Função que busca dados de um CNPJ para a empresa Suframa.
TAS_SUFRAMA_load ( [ l_cnpj ],[ l_uf ] ) → BOOLEAN |
| Nome | Tipo | Obrigatório? | Descrição |
|---|---|---|---|
| l_cnpj | CHAR | Sim | Número do CNPJ para consulta. |
| l_uf | CHAR | Não | Sigla do estado.
|
| Tipo | Descrição |
|---|---|
| BOOLEAN | Indica que encontrou ou não os dados do CNPJ informado. |
#--------------------------------------#
FUNCTION TAS_SUFRAMA_test()
#--------------------------------------#
DEFINE l_idx, l_count SMALLINT
IF TAS_SUFRAMA_load('20337684000129',NULL) THEN
LET l_count = TAS_getFieldLength("suframa/inscricoesEstaduais")
FOR l_idx = 1 TO l_count
CALL CONOUT("TAS_SUFRAMA_getInscricaoEstadual["||LOG_alltrim(l_idx)||"]", TAS_SUFRAMA_getInscricaoEstadual(l_idx))
END FOR
END IF
END FUNCTION |