Histórico da Página

Dica

title	Integrando Cliente

Abaixo iremos mostrar como configurar o Processo de Envio Cliente do Protheus para integra-lo com o sistema Totvs Live. Siga o Passo a Passo.

Cadastrando o Processo de Cliente

Para integrarmos o Cliente com o Totvs Live primeiramente é necessário acessar o cadastro do Processo para verificar se o Cliente foi criado automaticamente no Protheus.

...

Chave: A1_FILIAL+A1_COD

Vinculando o Processo de Cliente ao Assinante Live

1- No módulo 12 (Controle de Lojas), acesse Atualizações/ RMI/ Cadastros/ Assinantes.

...

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:oLive:getSatelite(self) + "</liv:codigoSistemaSatelite>
			<liv:xmlTicketCliente><![CDATA[<?xml version='1.0'?><LC_TicketCliente>
          <Chave>" + self:oLive:getToken(self) + "</Chave>
          <CodigoSistemaSatelite>" + self:oLive:getSatelite(self) + "</CodigoSistemaSatelite>
          <Data>" + DtoS( Date() ) + "</Data>
          <Hora>" + StrTran(Time(), ':', '') + "</Hora>
          <Numero>" + RMITImeStamp() + "</Numero>
          <Documentos>
            <LC_Cliente>
              <Apelido>" + self:oPublica['A1_NOME'] + "</Apelido>
              <CPF_CNPJ>" + (self:cIdRetaguarda := 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'],5,2)+'-'+Substr(self:oPublica['A1_DTNASC'],7,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','2','3')+"</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>"

...

Árvore de páginas

Versões comparadas

Versão antiga 14

Nova versão 15

Chave

Cadastrando o Processo de Cliente

Vinculando o Processo de Cliente ao Assinante Live