|
Hola compañero gracias por la ayuda pero no hay manera...
Mi código es el siguiente:
field-symbols: <f1> type any,
<f2> type any,
<f3> type any.
data: campo1(22) type c value 'G_ZCIC_MIN_OPER-ICONXX',
campo2(21) type c value 'G_ZCIC_MIN_OPER-DIAXX',
campo3(25) type c value 'G_ZCIC_MIN_OPER-WEEKENDXX',
l_dato(30) type c,
l_contador type i,
l_x(25) type c value 'X'.
DATA: v_daynr TYPE hrvsched-daynr,
v_daytxt LIKE HRVSCHED-DAYTXT.
CALL FUNCTION 'RH_GET_DATE_DAYNAME'
EXPORTING
langu = sy-langu
date = p_fecha
calid = 'ES'
IMPORTING
daynr = v_daynr
DAYTXT = v_daytxt
EXCEPTIONS
no_langu = 1
no_date = 2
no_daytxt_for_langu = 3
invalid_date = 4
OTHERS = 5.
if v_daynr eq 6 or v_daynr eq 7.
move p_fecha+6(2) to campo3+23(2).
assign campo3 to <f3>.
<f3> = l_x.
endif.
Pero no hay manera, en resumen con los field-symbols lo que quiere que por ejemplo asigno el valor de campo3 vale 'G_ZCIC_MIN_OPER-WEEKEND01'
que es el nombre del campo de la tabla lo asigno al field symbol por lo tanto
debería apuntar al valor de la variable y luego quiero asignar un valor a esa variable pero lo único que pasa es que campo 3 valga "X" y <f3> valga "X"
pero en la cabera de la tabla G_ZCIC_MIN_OPER-WEEKEND01 no cambio de valor. Alguna idea ?????
Saludos.
|