BP transaction enhanced with custom fields and Data entered is not updated in LFM1 table

100 Views Last edit Jan 31 at 01:35 PM 2 rev

Hi Gurus,

I have enhanced custom fields to BP tcode but the data entered is not updated to table.

Created field groups, views, sections, sub screen , PBO_FM, PAI_FM Appended structure to VMDS_EI_PURCHASING_DATA and VMDS_EI_PURCHASING_DATAX

PBO code

DATA: lt_lfm1 TYPE TABLE OF lfm1,
gs_lfm1 TYPE lfm1.

cvi_bdt_adapter=>data_pbo_with_purchasing_org(
EXPORTING i_table_name = 'LFM1'
IMPORTING e_data_table = lt_lfm1[] ).

TRY.
gs_lfm1 = lt_lfm1[ ekorg = cvi_bdt_adapter=>get_current_purchasing_org( ) ].
CATCH cx_sy_itab_line_not_found.
CLEAR: gs_lfm1. "text_field_tm_rel.
ENDTRY.

PAI CODE

DATA: lt_lfm1 TYPE TABLE OF lfm1,
gs_lfm1 TYPE lfm1.

CHECK cvi_bdt_adapter=>is_direct_input_active( ) = abap_false.

cvi_bdt_adapter=>get_current_bp_porg_data(
EXPORTING i_table_name = 'LFM1'
IMPORTING e_data_table = lt_lfm1[] ).
IF lt_lfm1[] IS INITIAL.
IF gs_lfm1 IS NOT INITIAL.
gs_lfm1-lifnr = cvi_bdt_adapter=>get_current_vendor( ).
APPEND gs_lfm1 TO lt_lfm1.
ENDIF.
ELSE.
ASSIGN lt_lfm1[ ekorg = cvi_bdt_adapter=>get_current_purchasing_org( ) ]
TO FIELD-SYMBOL(<ls_lfm1>).
<ls_lfm1>-ZZRAREQ = gs_lfm1-ZZRAREQ.
<ls_lfm1>-ZZREPOL = gs_lfm1-ZZREPOL.
<ls_lfm1>-ZZPROCTIME = gs_lfm1-ZZPROCTIME.

ENDIF.

cvi_bdt_adapter=>data_pai_with_purchasing_org( i_table_name = 'LFM1'
i_data_new = lt_lfm1[] ).

CHECK cvi_bdt_adapter=>get_activity( ) <> cvi_bdt_adapter=>activity_display.

Not sure why the data is not updated to LFM1 table. Can anyone help. Any code to add?

Thanks,

Chittu