Thursday, June 02, 2005

Ejemplo User-Exit Modular

FUNCTION ZZBW_KFECONT.
*"--------------------------------------------------------------------
*"*"Interfase local
*" TABLES
*" I_T_VAR_RANGE STRUCTURE RRRANGEEXIT
*" E_T_RANGE STRUCTURE RRRANGESID
*"--------------------------------------------------------------------
data: range type RRRANGESID,
variable like RRRANGEEXIT.

read table I_T_VAR_RANGE with key VNAM = 'FECHINI'
into variable.

range-sign = 'I'.
range-opt = 'BT'.
RANGE-LOW = VARIABLE-LOW.
RANGE-HIGH = VARIABLE-HIGH.

append range to e_t_range.

ENDFUNCTION.

0 Comments:

Post a Comment

<< Home