Community
Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 
Read only

smartforms

Former Member

‎2008 Jul 23 1:36 PM

0 Likes
716

Hi guys,

How can we find the standard smartform for invoice. I think thru TNAPR table we can find the form name and print program name. But In IDES, I could found only script 'RVINVOICE01' and the corresponding print program there in the table.Please explain.

Rgds,

khadeer.

6 REPLIES 6
Read only

Former Member

‎2008 Jul 23 1:40 PM

0 Likes
667

hi basha

in smartforms tcode

search by /SMB40* it will give the f4 list

rewards if its usefull

Read only

Former Member

‎2008 Jul 23 1:46 PM

0 Likes
667

Hi,

Try using SF* in SMARTFORMS tcode.

SF_LB_INVOICE for standard invoice

Thanks & Regards,

Chandralekha.

Read only

Former Member

‎2008 Jul 23 1:56 PM

0 Likes
667

check if these can help

LB_BIL_INVOICE

Standard Print Program

RLB_INVOIC

Importing parameter

IS_BIL_INVOICE type LBBIL_INVOICE

IS_NAST type NAST

IS_REPEAT type NA_REPET

Transaction VF02

Read only

Former Member

‎2008 Jul 23 1:59 PM

0 Likes
667

LB_BIL_INVOICE is the standard smartform for Invoice and credit memo.

Search For Standard or Customise Smartform

&----

*& Report : ZTEST_SEARCH_FORMNAME

&----

*& This program will help you to search the SMARTFORM either Standard

Or Customer created in your compatiable language.

&----

REPORT ZTEST_SEARCH_FORMNAME .

TYPE-POOLS: SLIS.

TABLES: STXFADM, STXFADMT.

DATA: BEGIN OF ITAB OCCURS 0,

FORMNAME LIKE STXFADM-FORMNAME,

MASTERLANG LIKE STXFADM-MASTERLANG,

DEVCLASS LIKE STXFADM-DEVCLASS,

VERSION LIKE STXFADM-VERSION,

FIRSTUSER LIKE STXFADM-FIRSTUSER,

FIRSTDATE LIKE STXFADM-FIRSTDATE,

FIRSTTIME LIKE STXFADM-FIRSTTIME,

LASTUSER LIKE STXFADM-LASTUSER,

LASTDATE LIKE STXFADM-LASTDATE,

FORMTYPE LIKE STXFADM-FORMTYPE,

CAPTION LIKE STXFADMT-CAPTION,

END OF ITAB.

DATA: IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,

WA_FIELDCAT TYPE SLIS_FIELDCAT_ALV,

WA_LAYOUT TYPE SLIS_LAYOUT_ALV.

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.

SELECT-OPTIONS: S_DEV FOR STXFADM-DEVCLASS NO INTERVALS.

SELECT-OPTIONS: S_FORM FOR STXFADM-FORMNAME NO INTERVALS.

SELECTION-SCREEN SKIP 1.

PARAMETERS: P_LANG LIKE T002-SPRAS DEFAULT 'EN'.

SELECTION-SCREEN END OF BLOCK B1.

PERFORM F_SELECT_DATA.

PERFORM F_LAYOUT.

PERFORM F_FIELDCAT.

PERFORM DISPLAY.

&----

*& Form f_select_data

&----

text

-

--> p1 text

<-- p2 text

-

FORM F_SELECT_DATA .

SELECT

A~FORMNAME

A~MASTERLANG

A~DEVCLASS

A~VERSION

A~FIRSTUSER

A~FIRSTDATE

A~FIRSTTIME

A~LASTUSER

A~LASTDATE

A~FORMTYPE

B~CAPTION

FROM STXFADM AS A INNER JOIN STXFADMT AS B ON

AFORMNAME = BFORMNAME INTO TABLE ITAB WHERE

A~DEVCLASS IN S_DEV AND

A~FORMNAME IN S_FORM AND

B~LANGU = P_LANG.

IF SY-SUBRC = 0.

SORT ITAB BY FORMNAME.

ELSE.

MESSAGE I398(00) WITH 'No Form Exits for this selection criteria'.

LEAVE LIST-PROCESSING.

ENDIF.

ENDFORM. " f_select_data

&----

*& Form display

&----

text

-

--> p1 text

<-- p2 text

-

FORM DISPLAY .

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

I_CALLBACK_PROGRAM = SYST-CPROG

IS_LAYOUT = WA_LAYOUT

IT_FIELDCAT = IT_FIELDCAT

TABLES

T_OUTTAB = ITAB.

IF SY-SUBRC 0.

ENDIF.

ENDFORM. " display

&----

*& Form f_fieldcat

&----

text

-

--> p1 text

<-- p2 text

-

FORM F_FIELDCAT .

DATA: WA_COL TYPE I VALUE 1.

WA_FIELDCAT-COL_POS = WA_COL + 1.

WA_FIELDCAT-SELTEXT_L = TEXT-003. " Form Name

WA_FIELDCAT-FIELDNAME = 'FORMNAME'.

WA_FIELDCAT-TABNAME = 'ITAB'.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

WA_FIELDCAT-COL_POS = WA_COL + 1.

WA_FIELDCAT-SELTEXT_L = TEXT-004. " Smart form Text

WA_FIELDCAT-FIELDNAME = 'CAPTION'.

WA_FIELDCAT-TABNAME = 'ITAB'.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

WA_FIELDCAT-COL_POS = WA_COL + 1.

WA_FIELDCAT-SELTEXT_L = TEXT-005. "Package

WA_FIELDCAT-FIELDNAME = 'DEVCLASS'.

WA_FIELDCAT-TABNAME = 'ITAB'.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

WA_FIELDCAT-COL_POS = WA_COL + 1.

WA_FIELDCAT-SELTEXT_L = TEXT-006. "First User

WA_FIELDCAT-FIELDNAME = 'FIRSTUSER'.

WA_FIELDCAT-TABNAME = 'ITAB'.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

WA_FIELDCAT-COL_POS = WA_COL + 1.

WA_FIELDCAT-SELTEXT_L = TEXT-007. "First Date

WA_FIELDCAT-FIELDNAME = 'FIRSTDATE'.

WA_FIELDCAT-TABNAME = 'ITAB'.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

WA_FIELDCAT-COL_POS = WA_COL + 1.

WA_FIELDCAT-SELTEXT_L = TEXT-008. "Version

WA_FIELDCAT-FIELDNAME = 'VERSION'.

WA_FIELDCAT-TABNAME = 'ITAB'.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

WA_FIELDCAT-COL_POS = WA_COL + 1.

WA_FIELDCAT-SELTEXT_L = TEXT-009. "Master Language

WA_FIELDCAT-FIELDNAME = 'MASTERLANG'.

WA_FIELDCAT-TABNAME = 'ITAB'.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

WA_FIELDCAT-COL_POS = WA_COL + 1.

WA_FIELDCAT-SELTEXT_L = TEXT-010. "Last User

WA_FIELDCAT-FIELDNAME = 'LASTUSER'.

WA_FIELDCAT-TABNAME = 'ITAB'.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

ENDFORM. " f_fieldcat

&----

*& Form f_layout

&----

text

-

--> p1 text

<-- p2 text

-

FORM F_LAYOUT .

WA_LAYOUT-COLWIDTH_OPTIMIZE = 'X'.

ENDFORM. " f_layout

Read only

JanStallkamp
Advisor
Advisor

‎2008 Jul 23 6:34 PM

0 Likes
667

Hi.

Please note that SDN has a well structured list of different forums. Always use the forum best matching to your question. Here you are in the ABAP general forum. This forum's topic are questions regarding ABAP that are not subject of one of the other more specialized forums. As your posting is not in the proper forum this thread will be locked.

Best regards,

Jan Stallkamp