Problemas luego de activar BTE - 1110

[Former Member]

Buenas gusto en saludarles,

Tengo el siguiente problema active una bte para la transacción fb60 y funciona según lo solicitado. Pero el usuario quiso realizar un cambio en la fbl1n y mostró el siguiente error: CALL_FUNCTION_PARM_MISSING (CX_SY_DYN_CALL_PARAM_MISSING) indicándome que hace falta el parámetro I_BLDAT es decir cuando realiza el llamado mediante CALL FUNCTION FMTAB-FUNCT no la llama debido a el error mencionado anteriormente (dicho parámetro que no lo modifique ). A continuación el código elaborado:

FUNCTION zsample_process_00001110.
*"----------------------------------------------------------------------
*"*"Interfase local
*" IMPORTING
*" VALUE(I_BUKRS) LIKE BKPF-BUKRS
*" VALUE(I_LIFNR) LIKE BSEG-LIFNR
*" VALUE(I_WAERS) LIKE BKPF-WAERS
*" VALUE(I_BLDAT) LIKE BKPF-BLDAT
*" VALUE(I_XBLNR) LIKE BKPF-XBLNR
*" VALUE(I_WRBTR) LIKE BSEG-WRBTR OPTIONAL
*" VALUE(I_BELNR) LIKE BSEG-BELNR OPTIONAL
*" VALUE(I_GJAHR) LIKE BSEG-GJAHR OPTIONAL
*" VALUE(I_BUZEI) LIKE BSEG-BUZEI OPTIONAL
*" VALUE(I_SHKZG) LIKE BSEG-SHKZG
*" VALUE(I_BLART) TYPE BLART OPTIONAL
*" EXPORTING
*" VALUE(E_NOSTD) LIKE BOOLE-BOOLE
*"----------------------------------------------------------------------

DATA: wa_t169p TYPE t169p ,
wa_bkpf TYPE bkpf ,
wa_bsip TYPE bsip ,
lv_mg TYPE string,
lv_mg2(50) ,
lv_mg3(50) ,
lv_mg4(50) ,
lv_mg5(50).

if sy-tcode EQ 'FB60'.
SELECT
SINGLE
*
FROM
t169p
INTO
wa_t169p
WHERE
bukrs EQ i_bukrs.

IF wa_t169p IS NOT INITIAL.
IF wa_t169p-xxblnr EQ 'X'.
SELECT
SINGLE
*
FROM
bsip
INTO
wa_bsip
WHERE
bukrs EQ i_bukrs AND
lifnr EQ i_lifnr AND
waers EQ i_waers AND
bldat EQ i_bldat AND
xblnr EQ i_xblnr AND
gjahr EQ i_gjahr AND
shkzg EQ i_shkzg.

IF wa_bsip IS NOT INITIAL.
lv_mg2 = 'Factura ya contabilizada.'.
lv_mg3 = 'Referencia'.
lv_mg4 = 'y Acreedor'.
lv_mg5 = 'ya fueron utlizados'.
CONCATENATE lv_mg2 lv_mg3 wa_bsip-xblnr lv_mg4 wa_bsip-lifnr lv_mg5 INTO lv_mg SEPARATED BY ''.
MESSAGE lv_mg TYPE 'E' DISPLAY LIKE 'E'.
ENDIF.

ENDIF.
ENDIF.
ENDIF.
ENDFUNCTION.