РМщик написал(а):
примерно вот так:
Code:
REPORT ZTEST611 .
INFOTYPES: 0000, 0001, 0009.
NODES: PERNR.
DATA: BEGIN OF FILE_TAB OCCURS 0,
PERNR LIKE PA0001-PERNR,
ACCOUNT(40),
END OF FILE_TAB.
START-OF-SELECTION.
GET PERNR.
CLEAR: FILE_TAB.
FILE_TAB-PERNR = P0009-PERNR .
CONCATENATE P0009-BKONT P0009-BANKN INTO FILE_TAB-ACCOUNT.
CHECK NOT FILE_TAB-PERNR IS INITIAL.
APPEND FILE_TAB.
END-OF-SELECTION.
LOOP AT FILE_TAB.
WRITE:/ FILE_TAB-PERNR, FILE_TAB-ACCOUNT.
ENDLOOP.
у меня таже проблема, что и у девушки, только вот:
а если нужно считывать данные по всем табельным нескольких инфотипов, так, чтобы записи попадали в промежуток между датами и считанные записи еще и должны соотвествовать некоторому условию,
код программы:
get pernr.
provide * from p0000 BETWEEN pn-begda AND pn-endda.
if p0000-MASSN = '02' or p0000-MASSN = '03' or p0000-MASSN = '04'.
rp-provide-from-last p0001 space p0000-begda p0000-begda.
clear rec.
rec-pernr = pernr-pernr.
rec-SNAME = pernr-SNAME.
* еще какие-то действа
append rec to tabrec.
endif.
endprovide.
end-of-selection.
call screen 100.
если не задавать табельные, то происходит считывается куча записей
по всем возможным табельным выходят дублированные записи