Categorias

Leitura de Campos de Uma Tela

Informação fornecida por Amaury Leme da Silva.

Para ler o conteúdo de campos de uma tela, utilizar a função standard “DYN_VALUES_READ”.

O código foi utilizado para a tela de Classif. Contábil de PC.

form monta_bukrs_pc.
data : begin of t_get occurs 0.
include structure dynpread.
data : end of t_get.

t_get-fieldname = 'EKPO-BUKRS'. " EMPRESA
append t_get.
t_get-fieldname = 'EKPO-KNTTP'. " CATEGORIA CLASS CONT
append t_get.

call function 'DYNP_VALUES_READ'
exporting
dyname = 'SAPMM06E'
dynumb = '0113'
tables
dynpfields = t_get
exceptions
invalid_abapworkarea = 1
invalid_dynprofield = 2
invalid_dynproname = 3
invalid_dynpronummer = 4
invalid_request = 5
no_fielddescription = 6
invalid_parameter = 7
undefind_error = 8
double_conversion = 9
stepl_not_found = 10
others = 11.
if sy-subrc ne 0.
message e398(00) with 'Zillo-Exit(wempf) E R R O '
'Funcao Valor de Tela PC - Subrc = ' sy-subrc.
else.
clear t_get.
read table t_get with key fieldname = 'EKPO-BUKRS'.
wbukrs = t_get-fieldvalue.
clear t_get.
read table t_get with key fieldname = 'EKPO-KNTTP'.
wknttp = t_get-fieldvalue.
endif.
endform. " MONTA_BUKRS