...
Para a utilização da api é necessário realizar os seguintes passos:
1. Definição do Handle
Aqui fazemos a definição Definição da variável h-handle para armazenar a referência ao programa externo.
...
2. Definição da Tabela Temporária
Define uma Definição da tabela temporária tt_integr_retorna_sdo_orcto com seus respectivos campos.
...
run prgfin/bgc/bgc705za.r persistent set h-handle.
run pi_main_retorna_dados_ctbl_01 in h-handle(input-output table tt_integr_retorna_sdo_orcto). |
|---|
6. Exibição dos Dados
Para exibição de dados, realizamos um FOR EACH que percorre cada registro da tabela temporária tt_integr_retorna_sdo_orcto (neste caso, apenas um registro) e exibe os valores dos campos na tela por um DISPLAY.
FOR EACH tt_integr_retorna_sdo_orcto:
DISPLAY "Produto - " tt_integr_retorna_sdo_orcto.ttv_cod_produt_dtsul
"Empresa - " tt_integr_retorna_sdo_orcto.tta_cod_empresa
"Estabelecimento - " tt_integr_retorna_sdo_orcto.tta_cod_estab
"Plano Conta Contabil -" tt_integr_retorna_sdo_orcto.tta_cod_plano_cta_ctbl
"Conta - " tt_integr_retorna_sdo_orcto.tta_cod_cta_ctbl
"PLano CCusto" tt_integr_retorna_sdo_orcto.tta_cod_plano_ccusto
"CCusto - " tt_integr_retorna_sdo_orcto.tta_cod_ccusto
"MAtriz EXT -" tt_integr_retorna_sdo_orcto.ttv_cod_matriz_trad_org_ext
"Empresa EXT - " tt_integr_retorna_sdo_orcto.ttv_cod_empresa_ext
"Estab EXT - " tt_integr_retorna_sdo_orcto.ttv_cod_estab_ext
"Conta EXT - " tt_integr_retorna_sdo_orcto.ttv_cod_cta_ctbl_ext
"Sub Conta - " tt_integr_retorna_sdo_orcto.ttv_cod_sub_cta_ctbl_ext
"Matriz Finalid EXT - " tt_integr_retorna_sdo_orcto.ttv_cod_matriz_trad_finalid_ext
"Finalid EXT - " tt_integr_retorna_sdo_orcto.ttv_num_finalid_ext
"UN - " tt_integr_retorna_sdo_orcto.tta_cod_unid_negoc
"Projeto - " tt_integr_retorna_sdo_orcto.tta_cod_proj_financ
"Finalidade - " tt_integr_retorna_sdo_orcto.tta_cod_finalid_econ
"Cenario - " tt_integr_retorna_sdo_orcto.tta_cod_cenar_ctbl
"Exercicio - " tt_integr_retorna_sdo_orcto.tta_cod_exerc_ctbl
"Periodo - " tt_integr_retorna_sdo_orcto.tta_num_period_ctbl
"Data Movto - " tt_integr_retorna_sdo_orcto.ttv_dat_movto
"Cenario OR€ - " tt_integr_retorna_sdo_orcto.tta_cod_cenar_orctario
"Unidade Or‡ - " tt_integr_retorna_sdo_orcto.tta_cod_unid_orctaria
"Seq Or‡ - " tt_integr_retorna_sdo_orcto.tta_num_seq_orcto_ctbl
"VersÆo - " tt_integr_retorna_sdo_orcto.tta_cod_vers_orcto_ctbl
"Vl Total Or‡ - " tt_integr_retorna_sdo_orcto.ttv_val_tot_orcado
"Vl Movto Emp - " tt_integr_retorna_sdo_orcto.ttv_val_movto_empenh
"Valor Realizado - " tt_integr_retorna_sdo_orcto.ttv_val_realiz
"Utiliza BGC - " tt_integr_retorna_sdo_orcto.ttv_log_utiliz_exec_orctaria
"Exercicio INI - " tt_integr_retorna_sdo_orcto.ttv_cod_exerc_ctbl_ini
"Exercicio FIM - " tt_integr_retorna_sdo_orcto.ttv_cod_exerc_ctbl_fim
"Periodo INI - " tt_integr_retorna_sdo_orcto.ttv_num_period_ctbl_ini
"Periodo FIM - " tt_integr_retorna_sdo_orcto.ttv_num_period_ctbl_fim
"Bloqueia Empres - " tt_integr_retorna_sdo_orcto.tta_log_bloq_empres
"Bloqueia Estab - " tt_integr_retorna_sdo_orcto.tta_log_bloq_estab
"Bloqueia Conta - " tt_integr_retorna_sdo_orcto.tta_log_bloq_cta_ctbl
"Bloqueia Plano CC - " tt_integr_retorna_sdo_orcto.ttv_log_plano_ccusto_bloq
"Bloqueia CC - " tt_integr_retorna_sdo_orcto.tta_log_bloq_ccusto
"Bloqueia UN - " tt_integr_retorna_sdo_orcto.tta_log_bloq_unid_negoc
"Bloqueia PLano CC - " tt_integr_retorna_sdo_orcto.ttv_log_plano_cta_ctbl_bloq
"Bloqueia Projeto - " tt_integr_retorna_sdo_orcto.tta_log_bloq_proj_financ
WITH 2 COL NO-LABEL.
MESSAGE ttv_des_msg_erro
ttv_des_msg_ajuda
ttv_num_cod_erro
VIEW-AS ALERT-BOX INFO BUTTONS OK.
END. |
|---|
