noviembre 22, 2006

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.

Como concatenar caracteres especiales.

En la version 4.7 no se puede concatenar mas un campo del tipo X para agregar, por ejemplo, el caracter de retorno de carro, fin de linea,tabulacion, etc.

Se debe utilizar la clase CL_ABAP_CHAR_UTILITIES.

Esta tiene los siguientes atributos:

HORIZONTAL_TAB
VERTICAL_TAB
NEWLINE
CR_LF
FORM_FEED
BACKSPACE
SPACE_STR
SPACE_STR_LANGU

Se usa de la siguiente manera:

Aca estoy concatenando una tabulacion.

DATA: v_horiz_tab(1) TYPE c.

v_horiz_tab = cl_abap_char_utilities=>horizontal_tab.

CONCATENATE t_attach-line v_horiz_tab INTO t_attach-line.

Me acabo de dar cuenta que ya lo habia posteado antes, pero ahora esta mas completo. Jejeje!