Comentarios graciosos en programas estandar de SAP - #2
Mas que un comentario es un mensaje de error.
Modulo de funciones: CRM_GET_KEYDATA
DATA FNAME(40) TYPE C .
GENERATE SUBROUTINE POOL LT_SOURCE NAME FNAME .
IF SY-SUBRC <> 0.
MESSAGE ID 'SU' TYPE 'E' NUMBER '000'
WITH 'Shit happens!'. "#EC NOTEXT
* MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
* WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
E_STATUS = SY-SUBRC.
Modulo de funciones: CRM_GET_KEYDATA
DATA FNAME(40) TYPE C .
GENERATE SUBROUTINE POOL LT_SOURCE NAME FNAME .
IF SY-SUBRC <> 0.
MESSAGE ID 'SU' TYPE 'E' NUMBER '000'
WITH 'Shit happens!'. "#EC NOTEXT
* MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
* WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
E_STATUS = SY-SUBRC.