Como puedo saber que tipo de formulario es?

[Cecilia]

Hola chicos! yo nuevamente, como bien dice mi post necesito saber que tipo de form es, ejecuto la transacción MB1C, y cuando termino me genera un formulario que no tengo idea que es. Puedo saberlo? existe alguna función o algo para determinar que formulario es?

Agradecería su pronta ayuda

Ceci

[toto]

te dejo esto para que lo pruebes

*======================================================================
* Tablas
*======================================================================
TABLES: TTXFP.

*======================================================================
* Tablas Internas
*======================================================================
DATA: T_TTXFP TYPE STANDARD TABLE OF TTXFP WITH HEADER LINE.

*======================================================================
* Selection-Screen
*======================================================================
SELECTION-SCREEN BEGIN OF BLOCK SCRIPT WITH FRAME.
SELECT-OPTIONS:
              PRINTNAM FOR TTXFP-PRINT_NAME,
              TDFORM   FOR TTXFP-TDFORM.
SELECTION-SCREEN END OF BLOCK SCRIPT.

*======================================================================
* Start-of-selection
*======================================================================
START-OF-SELECTION.

  PERFORM SELECT_DATA.
  PERFORM PRINT_DATA.

*&--------------------------------------------------------------------*
*&      Form  SELECT_DATA
*&--------------------------------------------------------------------*
*       Seleccionamos los datos del reporte.
*---------------------------------------------------------------------*
FORM SELECT_DATA.
  SELECT TDFORM PRINT_NAME LAST_PROG
  INTO TABLE T_TTXFP
  FROM TTXFP
  WHERE PRINT_NAME IN PRINTNAM
    AND TDFORM IN TDFORM
  ORDER BY TDFORM.
ENDFORM.                    "SELECT_DATA

*&--------------------------------------------------------------------*
*&      Form  PRINT_DATA
*&--------------------------------------------------------------------*
*       Imprimimos el resultado del reporte.
*---------------------------------------------------------------------*
FORM PRINT_DATA.

  FORMAT COLOR 3.
  WRITE: 'Programa', 18 'Formulario', 50 'Flag de Ultimo programa'.
  FORMAT COLOR OFF.

  SKIP 1.

  IF NOT T_TTXFP[] IS INITIAL.
  SORT T_TTXFP BY PRINT_NAME.
    LOOP AT T_TTXFP.
      IF T_TTXFP-LAST_PROG EQ 'X'.
      FORMAT COLOR 4.
      WRITE:/ T_TTXFP-PRINT_NAME, 18 T_TTXFP-TDFORM, 60 T_TTXFP-LAST_PROG.
      FORMAT COLOR OFF.
      ELSE.
      WRITE:/ T_TTXFP-PRINT_NAME, 18 T_TTXFP-TDFORM, 60 T_TTXFP-LAST_PROG.
      ENDIF.
    ENDLOOP.
  ENDIF.

ENDFORM.                    "PRINT_DATA