Archivo

Posts Tagged ‘Sustituciones’

Crear sustituciones – GGB1

Caso: se busca crear una sustitución para el campo BKPF-XBLNR (campo referencia) en la MIRO para que si el valor ingresado es numérico, se quiten los ceros a la izquierda de éste.

1. Ingresamos a la transacción GGB1.

Allí vamos a “Contabilidad financiera” – “Cabecera documento” (ya que allí está el campo a sustituir) y presionamos el botón “Nueva Sustitución”.

Aquí se crea como una carpeta agrupadora de sustituciones.

Luego de esto, nos posicionamos en la carpeta recién grabada y presionamos el botón “Nuevo Paso”. Allí nos va a pedir el/los campos a sustituir. Seleccionamos el nuestro:

Nos va a pedir que sustitución realizaremos. En nuestro caso como vamos a generar algo de código, usaremos un EXIT. En caso de querer reeemplazarlo por una constante usar “Valor constante” y si se desea reemplazarlo por el valor de otro campo, la opción “Asignación campo-campo”

Definimos una descripción para el paso recién creado y nos posicionamos en el filtro de condiciones. Allí indicamos la/s transacciones en las cuales deseamos que se ejecute la sustitución y en nuestro caso que el campo no debe estar vacío.

Para agregar campos y operadores se recomienda usar las opciones de ayuda. Finalmente presionar el botón de verificar () y el Status debe quedar en verde.

Ahora vamos a indicar el EXIT. Nos posicionamos en “Sustitución” y allí vemos que hay que indicar un EXIT (yo ya lo tengo creado como U300).

2. El EXIT se debe crear haciendo una copia Z del programa estándar RGGBS000, por ejemplo como ZRGGBS000.

Ingresar a la transacción GCX2 y reemplazar el programa estándar RGGBS000 por el nuevo Z.

Allí se puede utilizar uno de los UXXX que están comentados que están puestos como ejemplo o crearnos uno nuevo. Lo importante es tener lo siguiente:

* Sustitución campo referencia (XBLNR) sin ceros a la izquierda
exits-name  = ‘U300’.                 ” Sustitución campo

referencia (XBLNR) sin ceros a la izquierda
exits-param = c_exit_param_field.
exits-title = text-300.
APPEND exits.

*———————————————————————* FORM U300*
*———————————————————————* Sustitución Campo Referencia de Factura. Si posee ceros a la izquierda se quitan
*———————————————————————FORM u300 USING bkpf-xblnr.

DATA: lv_xblnr TYPE xblnr,
lv_tipo  TYPE dd01v-datatype.

CALL FUNCTION ‘NUMERIC_CHECK’
EXPORTING
string_in  = bkpf-xblnr
IMPORTING
string_out = lv_xblnr
htype      = lv_tipo.

IF lv_tipo NE ‘CHAR’.
CALL FUNCTION ‘CONVERSION_EXIT_ALPHA_OUTPUT’
EXPORTING
input  = bkpf-xblnr
IMPORTING
output = bkpf-xblnr.
ENDIF.
ENDFORM.                                                    “u0300

*———————————————————————

3. Luego de crear todo el código, debo grabar todo en la GGB1 y finalmente crear una entrada en la transacción OBBH para activar la carpeta de sustituciones creada.

En grado de activación, se debe indicar “1” para activar.

Screenshot_1

Finalmente se debe ejecutar el programa RGUGBR00 para ajustar los cambios realizados, según el post:

https://abapers.wordpress.com/2013/07/22/regenerar-ggb0-ggb1-validacionessustituciones/

Nota: Tener en cuenta que tanto las sustituciones como las validaciones se ejecutan cuando hablamos de contabilizaciones, en este caso por ejemplo en la MIR7 (documento preliminar prerregistrado) no va a correr la sustitución ya que no se genera documento contable.

Link útil:

http://saptricks.wordpress.com/2012/10/21/truco-29-sustituciones-en-controllingco-usando-exits-ii/

Anuncios
Categorías:FI Etiquetas: , , , , , , ,

Regenerar GGB0 GGB1 (Validaciones/Sustituciones)

Caso: luego de crear una nueva validación, queremos regenerar el programa estándar para que se apliquen los cambios.

Solución: debe ejecutarse el programa RGUGBR00

PD: este post existe en mil blogs supongo, pero lo hago para tenerlo en el mío y no olvidarme!

Categorías:ABAP/4 Etiquetas: , , , ,