A.H.P., obrigado pela resposta, aqui está o código.
Também quero saber de qual tabela "padrão" essa fonte de dados principal está obtendo os dados de qualquer maneira? E como posso descobrir isso em geral?
PROGRAMA CONVERSION_ROUTINE.
-
Tipos de pools utilizados pelo programa de conversão
TYPE-POOLS: RS, RSARC, RSARR, SBIWA, RSSM.
-
Declaração da estrutura de transferência (apenas campos selecionados)
TYPES: BEGIN OF TRANSFER_STRUCTURE ,
-
InfoObject 0CO_AREA: CHAR - 000004
KOKRS(000004) TYPE C,
-
InfoObject 0COSTCENTER: CHAR - 000010
KOSTL(000010) TYPE C,
-
InfoObject 0DATETO: DATS - 000008
DATETO TYPE D,
-
InfoObject 0DATEFROM: DATS - 000008
DATEFROM TYPE D,
-
InfoObject 0RESP_PERS: CHAR - 000020
VERAK(000020) TYPE C,
-
InfoObject 0COMP_CODE: CHAR - 000004
BUKRS(000004) TYPE C,
-
InfoObject 0BUS_AREA: CHAR - 000004
GSBER(000004) TYPE C,
-
InfoObject ZABTEI: CHAR - 000012
ABTEI(000012) TYPE C,
-
InfoObject ZCCCATERY: CHAR - 000001
KOSAR(000001) TYPE C,
-
InfoObject 0OBJ_CURR: CUKY - 000005
WAERS(000005) TYPE C,
-
InfoObject 0PROFIT_CTR: CHAR - 000010
PRCTR(000010) TYPE C,
-
InfoObject 0FUNC_AREA: CHAR - 000016
FUNC_AREA(000016) TYPE C,
END OF TRANSFER_STRUCTURE .
-
Código global utilizado pelas regras de conversão
$ $ início global - insira sua declaração apenas abaixo desta linha -
-
TABELAS: ...
-
DATA: ...
tables: /BIC/PZWWID_EMP.
data: w_abtei(12) type c,
w_comp_code(4) type c,
w_region(2) type c,
w_district(3) type c,
w_teritory(2) type c value '00',
w_distmgr like /BIC/PZWWID_EMP-/BIC/ZWWID_EMP,
w_regmgr like /BIC/PZWWID_EMP-/BIC/ZWWID_EMP.
$ $ final global - insira sua declaração apenas antes desta linha -
----
-
FORM COMPUTE_/BIC/ZREGION
----
-
Calcular o valor do InfoObject ZREGION
