cancel
Showing results for 
Search instead for 
Did you mean: 

smartforms

Former Member
0 Kudos

i want to step by step procedure in smartforms invoice?

Accepted Solutions (0)

Answers (2)

Answers (2)

Former Member
0 Kudos

give me ur mail-id i send step by step proces

SELECT * FROM VBRK INTO TABLE I_VBRK WHERE VBELN = V_VBELN.

IF SY-SUBRC = 0.

SELECT * FROM VBRP INTO TABLE I_VBRP

FOR ALL ENTRIES IN I_VBRK

WHERE VBELN = I_VBRK-VBELN.

ENDIF.

READ TABLE I_VBRK INTO WA_VBRK INDEX 1.

*&& get the address

SELECT single ADRNR FROM KNA1 INTO V_ADRNR WHERE KUNNR = WA_VBRK-KUNAG.

READ TABLE I_VBRP INTO WA_VBRP INDEX 1.

    • get the date of deliver & sales order

SELECT SINGLE ERDAT FROM LIKP INTO V_DERDAT

WHERE VBELN = WA_VBRP-VGBEL.

SELECT SINGLE ERDAT FROM VBAK INTO V_SERDAT

WHERE VBELN = WA_VBRP-AUBEL.

CLEAR : V_UPRICE, V_TPRICE.

*& serial number iteration

V_SLNO = V_SLNO + 1.

*& get the material description

SELECT SINGLE MAKTX FROM MAKT INTO V_MAKTX

WHERE MATNR = WA_VBRP-MATNR.

*& get the unit price & total price.

SELECT SINGLE KBETR KWERT FROM KONV INTO (V_UPRICE, V_TPRICE)

WHERE KNUMV = WA_VBRK-KNUMV

AND KPOSN = WA_VBRP-POSNR

AND KSCHL = 'PR00'.

IF SY-SUBRC = 0.

*& get total

*V_TOTAL = V_TOTAL + V_TPRICE.

ENDIF.

*& get discount total

SELECT SINGLE KWERT FROM KONV INTO V_DIS

WHERE KNUMV = WA_VBRK-KNUMV

AND KPOSN = WA_VBRP-POSNR

AND KSCHL = 'SKTO'.

IF SY-SUBRC = 0.

V_TDIS = V_TDIS + V_DIS.

ENDIF.

former_member196280
Active Contributor
0 Kudos

We have standard smartform for invoice, copy it into Z* form and do your customization according to the requirment.

Close the thread once your question is answered.

Regards,

SaiRam