Windev21 Aulas,Estudos e Desenvolvimento: Curso WinDev - Certificado - 009 - Soap - Parte 1/...

quinta-feira, 30 de junho de 2016

Curso WinDev - Certificado - 009 - Soap - Parte 1/... - Consulta Cadastro Sefaz

Nessa aula vou ensinar como buscar por soap o cadastro contribuinte no Sefaz-RS

In this lesson I will teach you how to search for soap registration taxpayer in Sefaz-RS

Dans cette leçon, je vais vous apprendre à chercher du savon enregistrement contribuable SEFAZ-RS

help1

//Informando o Soap // informing the soap // informer le savon
sEnvelope_soap is string=[
    <?xml version="1.0" encoding="utf-8"?>
    <soap12:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap12="http://www.w3.org/2003/05/soap-envelope">
    <soap12:Header>
    <nfeCabecMsg xmlns="http://www.portalfiscal.inf.br/nfe/wsdl/CadConsultaCadastro2">
    <cUF>43</cUF>
    <versaoDados>2.00</versaoDados>
    </nfeCabecMsg>
    </soap12:Header>
    <soap12:Body>
    <nfeDadosMsg xmlns="http://www.portalfiscal.inf.br/nfe/wsdl/CadConsultaCadastro2">
    <ConsCad xmlns="http://www.portalfiscal.inf.br/nfe" versao="2.00">
    <infCons>
    <xServ>CONS-CAD</xServ>
    <UF>#UF#</UF>
    <CNPJ>#CNPJ#</CNPJ>
    </infCons>
    </ConsCad>
    </nfeDadosMsg>
    </soap12:Body>
    </soap12:Envelope>
]
//Trocar os parametros do soap // change the parameters of soap // modifiez le paramètres de savon
sEnvelope_soap=Replace(sEnvelope_soap,"#UF#",EDT_Estado) //<UF>RS</UF>
sEnvelope_soap=Replace(sEnvelope_soap,"#CNPJ#",EDT_cnpj) //<CNPJ>94295912000181</CNPJ>
s_certificado is string="" //Criar uma variavel string _certificado // créer un certificat de chaîne de variable
IF EDT_certificado_digitado<>"" THEN //vou perguntar se foi informado certificado em arquivo
    //pegar a assinatura do certificado // get the certificate signature // obtenir la signature du certificat
    s_certificado="32CDD49A23675E407D129416573F16D34FD51BC1"
    HTTPCertificate(s_certificado)
END
_webservice is boolean=HTTPRequest("https://cad.sefazrs.rs.gov.br/ws/cadconsultacadastro/cadconsultacadastro2.asmx","","",sEnvelope_soap,"text/xml","","")//HTTPRequest
IF _webservice=True THEN
    s_retorno is string=HTTPGetResult(httpResult)
    EDT_xml=s_retorno
END

/Informando o Soap // informing the soap // informer le savon
sEnvelope_soap est chaîne=[
    <?xml version="1.0" encoding="utf-8"?>
    <soap12:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap12="http://www.w3.org/2003/05/soap-envelope">
    <soap12:Header>
    <nfeCabecMsg xmlns="http://www.portalfiscal.inf.br/nfe/wsdl/CadConsultaCadastro2">
    <cUF>43</cUF>
    <versaoDados>2.00</versaoDados>
    </nfeCabecMsg>
    </soap12:Header>
    <soap12:Body>
    <nfeDadosMsg xmlns="http://www.portalfiscal.inf.br/nfe/wsdl/CadConsultaCadastro2">
    <ConsCad xmlns="http://www.portalfiscal.inf.br/nfe" versao="2.00">
    <infCons>
    <xServ>CONS-CAD</xServ>
    <UF>#UF#</UF>
    <CNPJ>#CNPJ#</CNPJ>
    </infCons>
    </ConsCad>
    </nfeDadosMsg>
    </soap12:Body>
    </soap12:Envelope>
]
//Trocar os parametros do soap // change the parameters of soap // modifiez le paramètres de savon
sEnvelope_soap=Remplace(sEnvelope_soap,"#UF#",EDT_Estado) //<UF>RS</UF>
sEnvelope_soap=Remplace(sEnvelope_soap,"#CNPJ#",EDT_cnpj) //<CNPJ>94295912000181</CNPJ>
s_certificado est chaîne="" //Criar uma variavel string _certificado // créer un certificat de chaîne de variable
SI EDT_certificado_digitado<>"" ALORS //vou perguntar se foi informado certificado em arquivo
    //pegar a assinatura do certificado // get the certificate signature // obtenir la signature du certificat
    s_certificado="32CDD49A23675E407D129416573F16D34FD51BC1"
    HTTPCertificat(s_certificado)
FIN
_webservice est booléen=HTTPRequête("https://cad.sefazrs.rs.gov.br/ws/cadconsultacadastro/cadconsultacadastro2.asmx","","",sEnvelope_soap,"text/xml","","")//HTTPRequest
SI _webservice=Vrai ALORS
    s_retorno est chaîne=HTTPDonneRésultat(httpRésultat)
    EDT_xml=s_retorno
FIN

Páginas

quinta-feira, 30 de junho de 2016

Curso WinDev - Certificado - 009 - Soap - Parte 1/... - Consulta Cadastro Sefaz

Nenhum comentário:

Postar um comentário

Teste

Marcadores