‎2007 May 04 1:17 PM
Hi,
can any one send me a sample smartform for printing invoice
and the code for printing this. I tried lb_bil_invoice ,but not working. if u could send me the smartform in XML and print prg wld be very helpful .
thanks
‎2007 May 04 3:09 PM
Hi,
i think it's simple to say what was wrong with your test, and correct it, instead of doing a new one from scratch.
I customized lb_bil_invoice and it worked fined.
Could you tell us what you do?
Best regards,
‎2007 May 04 3:11 PM
Hi
Have a look on these:
check most imp link
http://www.sapbrain.com/ARTICLES/TECHNICAL/SMARTFORMS/smartforms.html
step by step good ex link is....
Check these step-by-step links
for Smartforms material
http://www.sap-basis-abap.com/sapsf001.htm
http://www.sap-press.com/downloads/h955_preview.pdf
http://www.ossincorp.com/Black_Box/Black_Box_2.htm
http://www.sap-img.com/smartforms/sap-smart-forms.htm
http://www.sap-img.com/smartforms/smartform-tutorial.htm
http://www.sapgenie.com/abap/smartforms.htm
How to trace smartform
http://help.sap.com/saphelp_47x200/helpdata/en/49/c3d8a4a05b11d5b6ef006094192fe3/frameset.htm
http://www.help.sap.com/bp_presmartformsv1500/DOCU/OVIEW_EN.PDF
http://www.sap-img.com/smartforms/smart-006.htm
http://www.sap-img.com/smartforms/smartforms-faq-part-two.htm
Regards,
Sreeram
‎2007 May 04 3:13 PM
Hi Mamatha,
Refer this code :
SELECTION-SCREEN BEGIN OF BLOCK BL1 WITH FRAME.
SELECT-OPTIONS : P_VBELN FOR VBUK-VBELN .
SELECTION-SCREEN END OF BLOCK BL1.
*FUNCTION THAT GIVES ALL INVOICE HEADER & ITEMS DETAILS
WA_VBELN-VBELN = P_VBELN-LOW.
APPEND WA_VBELN TO D_VBELN.
CALL FUNCTION 'LB_BIL_INV_OUTP_READ_DBDATA'
EXPORTING
IT_BIL_NUMBER = D_VBELN
IF_LANGUAGE =
IS_DB_DATA_TO_READ =
IF_READ_MODE = ' '
IF_REFRESH_BUFFER = ' '
IMPORTING
ES_BIL_OUTP_DBDATA = D_DATA
EXCEPTIONS
RECORDS_NOT_FOUND = 1
RECORDS_NOT_REQUESTED = 2
OTHERS = 3
.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
*POPULATING DATA INTO INTERNAL TABLE IT_VBRK
LOOP AT D_DATA-VBRK INTO IT_VBRK.
APPEND IT_VBRK.
ENDLOOP.
*POPULATING DATA INTO INTERNAL TABLE IT_VBRP
LOOP AT D_DATA-VBRP INTO IT_VBRP.
APPEND IT_VBRP.
ENDLOOP.
*POPULATING DATA INTO INTERNAL TABLE IT_LIKP
LOOP AT D_DATA-LIKP INTO IT_LIKP.
APPEND IT_LIKP.
ENDLOOP.
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
EXPORTING
FORMNAME = P_FORM
VARIANT = ' '
DIRECT_CALL = ' '
IMPORTING
FM_NAME = P_FUNCTION
EXCEPTIONS
NO_FORM = 1
NO_FUNCTION_MODULE = 2
OTHERS = 3
.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION P_FUNCTION
EXPORTING
ARCHIVE_INDEX =
ARCHIVE_INDEX_TAB =
ARCHIVE_PARAMETERS =
CONTROL_PARAMETERS =
MAIL_APPL_OBJ =
MAIL_RECIPIENT =
MAIL_SENDER =
OUTPUT_OPTIONS =
USER_SETTINGS = 'X'
IMPORTING
DOCUMENT_OUTPUT_INFO =
JOB_OUTPUT_INFO =
JOB_OUTPUT_OPTIONS =
TABLES
D_VBRK = IT_VBRK
D_VBRP = IT_VBRP
D_LIKP = IT_LIKP
EXCEPTIONS
FORMATTING_ERROR = 1
INTERNAL_ERROR = 2
SEND_ERROR = 3
USER_CANCELED = 4
OTHERS = 5
.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
Reward points if helpful.
Regards,
Hemant