PREGUNTA PARA CONFIRMACION

posted under by Luis Rolando
ESTA FUNCION AYUDA A PREGUNTAR ALGUNA CONFIRMACION POR SI SE QUIERE GUARDAR O BORRAR ALGO ETC.

Requerimientos (top)
DATA: ANTWORT(1) TYPE C.

Requerimientos (codigo)

CALL FUNCTION 'POPUP_TO_CONFIRM_STEP'
EXPORTING
TITEL = 'Atencion'
TEXTLINE1 = '¿Esta seguro de borrar este registro?'
TEXTLINE2 = PREGUNTA
IMPORTING ANSWER = ANTWORT.


los tipos de respuesta son "A" para cancelar "J" y "N" para no

IF ANTWORT = 'J'.
DELETE
FROM ZAV_T0002
WHERE ID_PROVEEDOR = ZAV_T0002-ID_PROVEEDOR.

IF SY-SUBRC = 0.
MESSAGE I005.
PERFORM CLEAR_T0002.
ELSE.
MESSAGE I008.
ENDIF.
ELSE.

ENDIF.

0 comentarios

Make A Comment
top