print program

[Former Member]

what's the print program for the rvorder01.

where can i find it .

[Former Member]

Hi,

Check the table TNAPR.

Go to SE16..

Give RVORDER01 in the form name..Press F8..You will get the print program..

I believe it is RVADOR01...Not sure..I don't have system with me..

Thanks,

Naren

[Former Member]

Print Program : RVADOR01

GOTO NACE Transaction->select application V1->click on Output Type->Select BA00 Output type ->click on Processing Routines..

Use TNAPR Table by entering output type BA00

Message was edited by:

Seshu Maramreddy

[former_member583013]

You can use this small app -;)

REPORT ZDUMMY_ATG_2.

*======================================================================
* 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

Comments are in Spanish...Sorry about that -:)

Print program is <b>RVADOR01</b>

Greetings,

Blag.