Histórico da Página

#-----------------------------------------------#
FUNCTION TAS_setJobMode_test(l_status)
#-----------------------------------------------#
# 0 - JOBMODE DESLIGADO (DEFAULT)
# 1 - JOBMODE LIGADODEFINE l_idx   SMALLINT
    DEFINE l_statuscount SMALLINT

    #Ativando modo de execução JOB 
    CALL TAS_setJobMode(TRUE)

    IF TAS_CNPJ_load("<número de CNPJ>") THEN
        LET ml_jobModecount = TAS_getFieldLength("receitaFederal/atividadesEconomicasSecundarias")
 
        FOR l_status = TRUE)
END FUNCTION idx = 1 TO l_count
            #Neste caso o campo atividadesEconomicasSecundarias não possui nome para os elementos da lista, por isso o 3o parâmetro ficou em branco
            CALL conout("Atividade Economica Secundaria "||l_idx||": "||TAS_getFieldListValue("receitaFederal/atividadesEconomicasSecundarias",l_idx,""))
        END FOR
     ELSE
        CALL conout("Não foi possivel encontrar os dados do CNPJ via TAS.",TAS_getErrorMessage())
     END IF 
END FUNCTION