TWsdlManager:NextComplex

Retorna o elemento de tipo complexo que necessita definir o número de ocorrências (minOccurs < maxOccurs). Esse método deve ser chamado enquanto retornar um array com os dados do elemento complexo, e logo após deve ser chamado o método SetComplexOccurs, definido o número de ocorrências do elemento.

Sintaxe

NextComplex()

Retorno

Nome	Tipo	Descrição
aComplex	vetor	Retorna um array contendo os dados do elemento de tipo complexo da mensagem da operação atual com número variável de ocorrências. Em caso de não ter mais elementos complexos a serem definidos, ou não ter algum elemento complexo que necessite de definição do número de ocorrências, o método retorna Nil.

Observações

Os dados do array são:

Índice	Descrição	Tipo
1	ID	numérico
2	Nome do elemento	caractere
3	Valor mínimo de ocorrências	numérico
4	Valor máximo de ocorrências	numérico
5	String com as tags pai do tipo complexo seguidas de "#" e o índice da tag na mensagem, separadas por "."	caractere

Exemplos

Exemplo 1

User Function Teste()
  Local oWsdl
  Local xRet
  Local aComplex := {}
  
  // Cria o objeto da classe TWsdlManager
  oWsdl := TWsdlManager():New()
  
  // Define os certificados que serão usados para conectar ao site que contém o arquivo WSDL
  oWsdl:cSSLCACertFile := "\wsdl\myconectaca.pem"
  oWsdl:cSSLCertFile := "\wsdl\000001_cert.pem"
  oWsdl:cSSLKeyFile := "\wsdl\000001_key.pem"
  
  // Faz o parse de um arquivo
  xRet := oWsdl:ParseURL( "https://homextservicos-siafi.tesouro.gov.br/siafi2014he/services/cpr/manterContasPagarReceber?wsdl" )
  if xRet == .F.
    conout( "Erro: " + oWsdl:cError )
    Return
  endif
  
  // Define a operação
  xRet := oWsdl:SetOperation( "cprDHCadastrarDocumentoHabil" )
  if xRet == .F.
    conout( "Erro: " + oWsdl:cError )
    Return
  endif
  
  // Pega o tipo complexo que necessita de definição do número de ocorrências
  aComplex := oWsdl:NextComplex()
  varinfo( "", aComplex )
  
  // Define que o elemento complexo retornado vai aparecer 1 vez na mensagem
  oWsdl:SetComplexOccurs( aComplex[1], 1 )
Return

Abrangência

Esse método está disponível em builds superiores a 7.00.131227A-20150114.

Árvore de páginas