...

1. verificação de imagem;
2. seleção de inscrição estadual SUFRAMA e segunda verificação de imagem.

O consumo do serviço pode ser feito de duas maneiras: a chamada do serviço, que abrirá as telas para verificação de imagem e seleção de inscrição, ou a execução em etapas, onde ocorrerá o retorno da imagem em base 64, reenvio dos dados com um segundo retorno com as inscrições estaduais e SUFRAMA e segunda imagem de verificação em base 64 e um terceiro envio de dados.

...

Um exemplo completo pode ser baixado aquibaixado aqui.

Âncora
etapas etapas

Execução em etapas

Após a configuração, deve ser feita a chamada para a procedure GetConsultaCNPJCaptchaprocedure SuframaGetCaptcha, que possui um parâmetro de saída no formato JSON. Este objeto possui a imagem de verificação no valor "Imagem" em formato base 64. Esta imagem pode ser utilizada para verificação na tela de preferência do desenvolvedor. A tela utilizada no exemplo é a mesma que a utilizada na execução direta:

RUN GetConsultaCNPJCaptchaSuframaGetCaptcha IN hMashup(OUTPUT oJson).
/*imagem retorna em formato base 64 - utilização de longchar*/
lcImg = oJson:getString("Imagem").

RUN utp\ut-mashup-tela(INPUT lcImg, INPUT "", OUTPUT cCaptcha, OUTPUT cValor).

Com o código de verificação da imagem, deve ser executada a procedure GetCNPJ com SuframaGetInscricoes com os seguintes parâmetros:

RUN GetCNPJ IN hMashup(INPUT "12345678901234", INPUT cCaptcha, INPUT-OUTPUT oJson).
 
lcImg = oJson:getString("Imagem").
oJsonArray = oJson:getJSONArray("Inscricoes").
 
/*percorrer array para montar LIST-ITEM-PAIRS a ser enviado à tela de verificação*/
DO iCount = 1 TO oJsonArray:COUNT():
    oJsonAux = oJsonArray:getJSONObject(iCount).
    IF cInsc <> "" THEN
        cInsc = cInsc + ",".
    cInsc = cInsc + oJsonAux:getString("Número") + "," + oJsonAux:getString("Número").
END.

RUN utp\ut-mashup-tela(INPUT lcImg, INPUT cInsc, OUTPUT cCaptcha, OUTPUT cValor).

Com o segundo código de verificação e o código da inscrição selecionado, deve ser executada a procedure SuframaGetDados  com os seguintes parâmetros:

RUN SuframaGetDados IN hMashup(INPUT cCaptcha, INPUT cValor, INPUT-OUTPUT oJson).

Um exemplo completo poder ser baixado aquibaixado aqui.

Retorno de dados

Os dados retornados pelo serviço de consulta de CNPJ são:

• CNPJ;Data

• de AberturaInscrição Suframa;

• Razão Social;

• Nome FantasiaEndereço;

• Atividade PrincipalComplemento;

• Atividade Secundária - lista de atividades secundárias apresentada em formato de array;

• Natureza JurídicaBairro;;

• EndereçoCidade;

• NúmeroEstado;

• Complemento;

• CEP;Bairro

• E-Mail;

• CidadeTelefone;

• EstadoAtividade Principal;

• Situação CadastralAtividade Secundária;Data da Situação Cadastral

• Atividade Estadual;

• Motivo Tipo de Situação CadastralIncentivos;

• Situação Especial;Data da Situação EspecialCadastral.