Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
&"<soapenv:Envelope xmlns:soapenv='http://schemas.xmlsoap.org/soap/envelope/' xmlns:liv='http://LiveConnector/'>
    <soapenv:Header/>
    <soapenv:Body>
        <liv:ManterClienteLC_Integracao_Xml>
            <liv:codigoSistemaSatelite>" + self:oConfAssin['sistemasatelite'] + "</liv:codigoSistemaSatelite>
            <liv:xmlTicketCliente><![CDATA[<?xml version='1.0'?><LC_TicketCliente>
          <Chave>" + self:cToken + "</Chave>
          <CodigoSistemaSatelite>" + self:oConfAssin['sistemasatelite'] + "</CodigoSistemaSatelite>
          <Data>" + DtoS( Date() ) + "</Data>
          <Hora>" + StrTran(Time(), ':', '') + "</Hora>
          <Numero>" + RMITImeStamp() + "</Numero>
          <Documentos>
            <LC_Cliente>
              <Apelido>" + self:oPublica['A1_NOME'] + "</Apelido>
              <CPF_CNPJ>" + self:oPublica['A1_CGC'] + "</CPF_CNPJ>
              <DataNascimento>" +IIF(!Empty(self:oPublica['A1_DTNASC']),Substr(self:oPublica['A1_DTNASC'],1,4)+'-'+Substr(self:oPublica['A1_DTNASC'],45,2)+'-'+Substr(self:oPublica['A1_DTNASC'],67,2),'2003-10-30')+ "</DataNascimento>
              <Inativo>" + IIF(self:oPublica['A1_MSBLQL']=='2','false','true') + "</Inativo>
              <Indicacao></Indicacao>
              <Nome_RazaoSocial>" + self:oPublica['A1_NOME'] + "</Nome_RazaoSocial>
              <Nota>0</Nota>
              <NumeroSequencia>1</NumeroSequencia>
              <Observacoes>CLIENTE-INTEGRADO-PROTHEUS</Observacoes>
              <Sexo>"+IIF(self:oPublica['A1_XXSEXO'] == 'M','0','1')+"</Sexo>
              <TipoCliente>" + IIF(self:oPublica['A1_PESSOA'] == 'F','0','1') + "</TipoCliente>
              <TipoClassificacaoCliente>1</TipoClassificacaoCliente>
              <ListaDocumentosCliente>
                <LC_DocumentoCliente>
                  <Identificacao>" + self:oPublica['A1_CGC'] + "</Identificacao>
                  <TipoDocumentoCliente>"+IIF(self:oPublica['A1_PESSOA'] == 'F','02','23')+"</TipoDocumentoCliente>
                </LC_DocumentoCliente>
              </ListaDocumentosCliente>
              <ListaEnderecos>
                <LC_Endereco>
                  <Bairro>" + self:oPublica['A1_BAIRRO'] + "</Bairro>
                  <CEP>" + self:oPublica['A1_CEP'] + "</CEP>
                  <Cidade_NumeroMunicipioIBGE>" +RmiRetIBGE(self:oPublica['A1_EST'], self:oPublica['A1_COD_MUN']) + "</Cidade_NumeroMunicipioIBGE>
                  <Complemento>" + self:oPublica['A1_COMPLEM'] + "</Complemento>
                  <Estado>" + self:oPublica['A1_EST'] + "</Estado>
                  <Logradouro>" + self:oPublica['A1_END'] + "</Logradouro>
                  <Numero>0</Numero>
                  <TipoEndereco>0</TipoEndereco>
                </LC_Endereco>
              </ListaEnderecos>
              <ListaEnderecosEletronico>
                <LC_EnderecoEletronico>
                  <Descricao>"+ IIF(Empty(self:oPublica['A1_EMAIL']),'[email protected]',self:oPublica['A1_EMAIL'])+ "</Descricao>
                  <TipoEnderecoEletronico>0</TipoEnderecoEletronico>
                </LC_EnderecoEletronico>
              </ListaEnderecosEletronico>
              <ListaTelefones>
                <LC_Telefone>
                  <Complemento></Complemento>
                  <DDD>" + self:oPublica['A1_DDD'] + "</DDD>
                  <Numero>" + self:oPublica['A1_TEL'] + "</Numero>
                  <TipoTelefone>0</TipoTelefone>
                </LC_Telefone>
              </ListaTelefones>
              <ListaLimiteCredito>
                <LC_LimiteCredito>
                  <Ativo>true</Ativo>
                  <CodigoLoja>"+self:aArrayFil[1][1]+"</CodigoLoja>
                  <LimiteCredito>" + cValToChar(self:oPublica['A1_LC']) + "</LimiteCredito>
                  <LimiteMensal>" + cValToChar(self:oPublica['A1_LC']) + "</LimiteMensal>
                  <NomeContrato>" + self:oPublica['A1_NOME'] + "</NomeContrato>
                </LC_LimiteCredito>
              </ListaLimiteCredito>
              <ListaModalidades>
                    <LC_Modalidade>
                    <Codigo>1</Codigo>
                      <Descricao>Consumidor Final</Descricao>
                </LC_Modalidade>
              </ListaModalidades>
            </LC_Cliente>
          </Documentos>
        </LC_TicketCliente>]]>
            </liv:xmlTicketCliente>
        </liv:ManterClienteLC_Integracao_Xml>
    </soapenv:Body>
</soapenv:Envelope>"

...