Añadir botón CESDE a la transacción estándar FD01.

Añadir botón CESDE a la transacción estándar FD01.

 

Añadimos el botón CESDE a la transacción estándar FD01.

El botón nos manda a una nueva dynpro la 1111.

Tras terminar la dynpro creamos la lógica de proceso .

*---------------------------------------------------------------------
-*
***INCLUDE LZSEGUROS_CESCEO01 .
*---------------------------------------------------------------------
-*
*&--------------------------------------------------------------------
-*
*& Module STATUS_1111 OUTPUT
*&--------------------------------------------------------------------
-*
* text
*---------------------------------------------------------------------
-*
module STATUS_1111 output.
* SET PF-STATUS 'xxxxxxxx'.
* SET TITLEBAR 'xxx'.
Constants wa_knb1(1270) Value '(SAPMF02D)KNB1'.
field-symbols: <fse> type knb1.
Assign (wa_knb1) to <fse>.
Move-CORRESPONDING <fse> To knb1.
Select Single * From t001 Where bukrs = knb1-bukrs And spras = sylangu.
If sy-tcode = 'XD03'.
Loop at screen.
If screen-group1 = 'PZ1'.
Screen-input = 0.
Modify screen.
Endif.
Endloop.
Endif.
endmodule. " STATUS_1111 OUTPUT

--------------------------------------------------------------------------------------------------------------------------

Este es el método que salta cuando pulsamos el botón que acabamos de añadir.

En este método los datos son pasados dese la pantalla Z.

Y este es el método de chequeos de los datos.

Ahora vamos a ver todos los métodos de los que no provehe la badi que vamos a usar para implementar las nuevas funcionalidades.

Aquí solo esta implementado la ultima clase.

Para el botón:

Vamos a la dynpro 7000 y hacemos un enhacemenet:

En le module del PF-status: