Hi Ati,
I believe this is the screen that you're stuck with.
As you can see in here, the G/L Acc field is inactive. So, we cannot pass any hkont value in here.
System takes the G/L automatically from the PERNR value that you pass on in the previous screen. The posting key(RF05A-NEWBS) that you use is important in here.
You just have to comment the code wherever you pass BSEG-HKONT value.
I've modified your code accordingly., Try this out
PERFORM bdc_dynpro USING 'SAPMF05A' '0100'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF05A-NEWKO'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BKPF-BLDAT'
lv_date.
PERFORM bdc_field USING 'BKPF-BLART'
wa_upload-blart.
PERFORM bdc_field USING 'BKPF-BUKRS'
wa_upload-bukrs.
PERFORM bdc_field USING 'BKPF-BUDAT'
lv_date.
PERFORM bdc_field USING 'BKPF-MONAT'
wa_upload-monat.
PERFORM bdc_field USING 'BKPF-WAERS'
wa_upload-waers.
PERFORM bdc_field USING 'FS006-DOCID'
wa_upload-docid.
PERFORM bdc_field USING 'RF05A-NEWBS'
wa_upload-newbs.
PERFORM bdc_field USING 'RF05A-NEWKO'
wa_upload-pernr.
PERFORM bdc_dynpro USING 'SAPMF05A' '0302'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF05A-NEWKO'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
* PERFORM bdc_field USING 'BSEG-HKONT'
* wa_upload-empgl.
PERFORM bdc_field USING 'BSEG-WRBTR'
wa_upload-a3f1.
PERFORM bdc_field USING 'BSEG-ZFBDT'
lv_date.
PERFORM bdc_field USING 'BSEG-SGTXT'
'Employee Contribution'.
PERFORM bdc_field USING 'RF05A-NEWBS'
wa_upload-newbs2.
PERFORM bdc_field USING 'RF05A-NEWKO'
wa_upload-pernr.
PERFORM bdc_dynpro USING 'SAPMF05A' '0302'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF05A-NEWKO'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
* PERFORM bdc_field USING 'BSEG-HKONT'
* wa_upload-emplgl.
PERFORM bdc_field USING 'BSEG-WRBTR'
wa_upload-a3f3.
PERFORM bdc_field USING 'BSEG-ZFBDT'
lv_date.
PERFORM bdc_field USING 'BSEG-SGTXT'
'Employers Contribution'.
PERFORM bdc_field USING 'RF05A-NEWBS'
wa_upload-newbs3.
PERFORM bdc_field USING 'RF05A-NEWKO'
wa_upload-g_pernr.
PERFORM bdc_dynpro USING 'SAPMF05A' '0301'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF05A-NEWKO'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
* PERFORM bdc_field USING 'BSEG-HKONT'
* wa_upload-loangl.
PERFORM bdc_field USING 'BSEG-WRBTR'
wa_upload-a3000.
PERFORM bdc_field USING 'BSEG-ZFBDT'
lv_date.
PERFORM bdc_field USING 'BSEG-SGTXT'
'pf loan recovery'.
PERFORM bdc_field USING 'RF05A-NEWBS'
wa_upload-newbs5."wa_upload-newbs5.
PERFORM bdc_field USING 'RF05A-NEWKO'
wa_upload-g_pernr.
PERFORM bdc_dynpro USING 'SAPMF05A' '0301'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF05A-NEWKO'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
* PERFORM bdc_field USING 'BSEG-HKONT'
* wa_upload-intgl.
PERFORM bdc_field USING 'BSEG-WRBTR'
wa_upload-intamt.
PERFORM bdc_field USING 'BSEG-ZFBDT'
lv_date.
PERFORM bdc_field USING 'BSEG-SGTXT'
'Interest on PF loan recovery'.
PERFORM bdc_field USING 'RF05A-NEWBS'
wa_upload-newbs4."wa_upload-newbs5.
PERFORM bdc_field USING 'RF05A-NEWKO'
wa_upload-bgl.
PERFORM bdc_dynpro USING 'SAPMF05A' '0300'.
PERFORM bdc_field USING 'BDC_CURSOR'
'BSEG-WRBTR'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=BU'.
PERFORM bdc_field USING 'BSEG-WRBTR'
'*'.
PERFORM bdc_field USING 'DKACB-FMORE'
'X'.
PERFORM bdc_dynpro USING 'SAPLKACB' '0002'.
PERFORM bdc_field USING 'BDC_CURSOR'
'COBL-RMVCT'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ENTE'.
*perform bdc_transaction using 'F-02'.
*perform close_group.
Thanks,
Harish.M
