Hi Guys,
can anybody tell me how to find the Application Type and output type based on Form name and print program name?
I am having form name as: ZINVENT (INVENT is the actual) and program name as RM07IDRU.How can i find the Appliction ntype and OutType for entering into the NACE tr code.
i tried thru TNAPR table but i was not able to find the Entry in the TNAPR with form Name and printprogram name
Th Script is about Phsical inventory Documents.
Thanks,
Gopi.
You can use this...
REPORT Z_DUMMY_ATG NO STANDARD PAGE HEADING. *====================================================================== * 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
Greetings,
Blag.
Add a comment