Code: Alles auswählen.
method EXECUTE.
DATA IV_FILE TYPE FILENAM255.
DATA IV_PATH TYPE EPSDIRNAM.
DATA IV_FILELIST_NAME TYPE EPSPATH.
DATA lT_RECORDS TYPE /H2C/T_P4_DATASET.
DATA lV_RC TYPE SYSUBRC.
*Kopfdatei auslesen
me->read_dataset(
EXPORTING
iv_file = iv_file
iv_path = iv_path
iv_filelist_name = iv_filelist_name
IMPORTING
et_records = lt_records
ev_rc = lv_rc
).
*MAKE DECISION
*Rechnung
me->xml_to_edifact_rec( it_records = lt_records ).
*Entlassung
me->xml_to_edifact_ent( it_records = lt_records ).
endmethod.