No.of pallets - PO smartform

Hi all!
Im working on Purchase order SmartForm.I got struck at a field called No.of Pallets .it is given that to find no. of pallets find alternate unit of measure from material master. but i'm unable to follow .can anybody help me.immediate response is appreciated.
Thanks in advance.
regards
Durgaprasad.

Hi sorry, it's MARM table.
But it's ok, you found it !
No extra conversion :
if you work in PCE :
Go to MARM with matnr / PAL
then :
Nb Piece = ( marm-umrez / marm-umren ).
Erwan

Similar Messages

Standard smartforms for box and pallet labelling

Hi!
I'm searching for some standard smart forms and related printing programms for label printing in the transaction HUPAST. Unfortunately i think that there are no such forms and prgramms in the perconfigured smart forms package. I need a form with some barcodes. Does anybody know where I can get such sample smart forms and programms?
thanks,
Pavan

Hi Kumar,
There is no standard smartforms avialable for Shipping Labels. You have to develope them based on your requirement.
YOu can use the following function for getting complete Shipping information of a Shipment:
*--Get all the packing information of a Shipment
CALL FUNCTION 'SD_SHIPMENT_PACKING_VIEW'
We have created custom Shipping label to print all the HU information.
Regards,
Lanka
Message was edited by: Lanka Murthy

How to dynamically replace variables in SMARTFORM texts based on item data?

Hi experts,
I'm currently designing a confirmation of order using Adobe PDF forms. The general layout with tables, pictures and texts was not big deal.
But one tiny bit doesn't work and I'm becoming more and more desperate about it.
We need various free texts for our pdf form. I created the texts using smartform texts. Some of these texts need to be slightly dynamic, so I added some dynamic fields in it.
For example:
"The material is currently out of stock.You can expect shipping around week &num_week&."
To replace the dynamic field &num_week& in my interface, I read that I have to name the dynamic field exactly like the corresponding field in my interface. In my case this would be now:
"The material is currently out of stock.You can expect shipping around week &SLS_PRT_COM-ITEM_DETAIL-ZZ_EXTRAFIELDS-ZZWEEKNUM&."
To see the text on my form, I added a text object with type 'text module' and the proper textname. Of course I'm able to insert text on my form, save and activate it without problems. But if I want to print the form, nothing happens as the print program exits with an error code.
After some hours I found out that this problem only occurs if I'm trying to replace the dynamic field with a field from the item table. Using a field from head details or globals like sy-mandt works like a charm.
So my question is: Is it possible to use item data to replace dynamic fields of a smartform text?
Greetings and thanks in advance!
André

Hi
Have a look at the links below:
LiveCycle ES2 * Adobe LiveCycle Designer ES2
Using floating field in Adobe Forms to display text paragraph with dynamic variables in between
After adding the floating field it will apeare in the hierarchy pallet above or bellow the text field.
Good luck
Shai.

Printing problem for line items in a smartform

Hi
I am developing a smartform for inbound delivery, i have to print each line item in each page and each line item should be printed according to count of pallets.
lets say if my first line item has 5 pallets, it should print 5 time on smartform. and second line item should print on second page , and this logic should continue for all line items.
can some one help me out ?

item No Material No Descripition Putaway Bin SUT Vendor Batch LE QTY COA Base UOM
this how my line item should like, i am able to print only single line item for each item no.
if i have 5 pallets for single line item, i want the same line item to be printed 5 times and this is what i am looking at

Storage unit labels along with pallet labels in wm

Hello,
could you please explain how to generate storage unit label along with pallet label in wm. for example if 1pallet contains 4 boxes and each box will have20 bottles then we need to print pallet label for 4boxes and unit label for each box with 20 bottles information.
Thanks
Regards,
Pavan Kumar

Hi Pavan,
Based on your requirement and as far as standard SAP are concern there is no form which will help to generate the label in the above format. You need to take the help from development team who can design the format using SMARTFORM functionality as per your requirement. once the form is ready you can assign the print code and the SU lable form to below mentioned node. which will print the label on the printer specified
SPRO ---LE---WM ---Storage unit ---Define print control
additionally have a look on the below mentioned SAP standard link which will give you an idea about the printing of SU
Printing SU Documents Manually - Warehouse Management System (WMS) - SAP Library
Let me know if you need any further information

Custom Color in Smartform?

I'm creating a new smartform and none of the 64 pre-defined colors are what I need. Is there a way to create a custom color? I need to use it to shade boxes and in smartstyles for the color of some text.

I don't know, if it is possible to create a new custom color pallet or not. But, we can achieve the required background color by modifying the Color Definition at runtime.
Check this WIKI, which describes the way to clear the background color:
https://wiki.sdn.sap.com/wiki/display/Snippets/DynamicBackgroundColorsinSmartForms
The same way, you can modify the corrosponding RED, GREEN and BLUE values in the FILLCOLOR and the CFILLCOLOR structure parts in the BORDER definition.
Like:
               L_BORDER-FILLCOLOR-RED = '195'.
               L_BORDER-FILLCOLOR-green = '217'.
               L_BORDER-FILLCOLOR-blue = '255'.
               L_BORDER-CFILLCOLOR-XRED = 'C3'.
               L_BORDER-CFILLCOLOR-xgreen = 'D9'.
               L_BORDER-CFILLCOLOR-xblue = 'FF'.
You can use this cool site http://html-color-codes.info/ to know the hexa code and the RGB value of any color.
In the Hexvalue:
Red = First 2 digit
Green = 3,4 digit
Blue = last 2 digit
Regards,
Naimesh Patel

Smartforms global ,intilization declarations ?

hi folks,
below is layout of the form i have to print in smartform ,this additional that is supplement from i have to add in existing form,so these are the fields i have to priint ,now what exactly i have to do in smartfrom ,do i need to change driver program also ,what exactly i have to do right from global defintions to page creation ,do i need to create another window and where i have to write logic that is select queries ?
fields for the layout is below ,layout is also given plz take a look ,points will be awarded for the answers .
order number (VBAK-VBELN), Whs BoL (VBAK-VBELN), customer PO number (VBKD-BSTKD), material number (LIPS-MATNR), legacy item number (MARA-ZZQNUM), description (LIPS-ARKTX) ship quantity (LIPSD-PIKMG), UOM (LIPSD-VRKMP) and pallets (VEKP-EXIDV) information. There is only one order to one delivery to one shipment. (1 to 1 relationship)
Whs. BOL: Customer PO:
Order No:
Ship to:
Material No Description Ship Qty UoM Pallets
010018500013850003 16OZ 1/12 LPT ICED TEA PEACH 216 CS 2.00
904560
010018500013850005 16OZ 6/2 LPT ICED TEA RASP 108 CS 1.00
904561
010018500013850006 16OZ 6/2 LPT ICED TEA SNL 324 CS 3.00
904562
0100185000138
hey all plz tell what should i delcare in global paramerets in global defintions ,imoport ,export paramaetrs ,what shoul;d i write ?in intilization what should i write ?in global defintion s what sghould i write in types tab plz VERY VERY VERY VERY Urgent points will awarded repl;y urgently very urgentily.

Hi,
Global Declaration is nothing bur the Internal Table Declaration in smartform. If u Declare the Tables in Global Declaration U can access that Internal Table for all the Windows within that Smartform.
Import : It will Pass the Value to write the coding inside the window, It Mean Ur getting the Value from Global. Already i told the Global will help for all the Windows.
Export : In the Import we r getting the value from global and doing some coding or calculation inside the Window. Now we need to take that Value to Print in within that Window.
Example :
Importing : t_ekko ( Here getting the Value from outside)
Loop at t_ekko into wa_ekko.
Append lt_ekko from wa_ekko.
endloop.
Exporting : lt_ekko ( Taking the final Value to Display)
Go through this link also,
form interface & global definition
Re: Urgent ! SmartForms internal table declaration
what is the use of types tab in global settings in smartforms?
Regards,
Saran,

SapScript Vs SmartForms

Hi Gurus,
I am designing new pallet label for shipping. Will be using RF device to scan the pallet. We are on ECC 6.0 and might be using user exit for the printing through the RF device.
Will it be better to use SapScript or SmartForms for this purpose?
Thanks
Puneet

Hi,
I would always recommend using the latest technology for any development, so adobe forms would be the better choice. However, as adobe forms needs ADS (Adobe Document Services) running on a java instance this may not be practical.
So then I would recommend smartforms.
Regards,
Nick

Filename in Webdynpro for a PDF created with Smartform

Hi,
I created a PDF with Smartform in my Webdynpro-Application.
When I click the save button there is a default filename f.pdf .
How can I change the filename?
Regards
Marcus Schug

Hi Experts,
any update on this?
I am facing the same problem with ESS payslip (smartform/Hrform): my customer wants to have custom file name for download salery statements from the portal. Do you know how to change the default form name unknown.pdf to e.g.. "payslip_month_year"?
I spent a lot of time to find any possibility to get and change the file name but without success till now.
Please respond.
Regards,
Zdzislaw Kaczmarczyk
Edited by: Zdzislaw Kaczmarczyk on Jun 14, 2010 4:41 PM

Sy-tabix for internal table in smartform

Hi friends,
How to capture the sy-tabix value for the entries in an internal table which has been looped into the loop of table node of a smartform?? I need to print something immedaitely after the end of the table
For every record the value of sy-tabix is showing 1 !!
Advance Thanks
Aadarsh

Hi Aadarsh,
Give ur sy-tabix at the end of the loop.
loop at itab.
//table node populations.
endloop.
give a seperate loop for this.
loop at itab.
sy-tabix.
endloop
get the total no and print it after the table.
If u r using do loop then give sy-index.
Hope tihs helps u,
Regards,
Nagarajan.
Message was edited by: Nagarajan Kumarappan

Dunning won't print to smartform

Hey all,
I've been trying to set up the Dunning process to print to the standard SAP dunning smartform (F150_DUNN_SF). Here's what I've done so far:
1. Used transaction BF31 to change the function module for dunning to FI_PRINT_DUNNING_NOTICE_SMARTF.
2. Used transaction SPRO under Financial Accounting->Accounts Receivable and Accounts Payable->Business Transactions->Dunning->Printout->Assign Dunning Forms to set the Form for our custon procedure for all 3 Dunning Levels to F150_DUNN_SF
3. I then run the dunning report out of transaction F150. The Dunning list shows that the customer should receive the letter.
When I try to print, the job terminates. When I check the job log in SM37, I get the following error: "Include text does not exist (object TEXT, ID )" (Message class SSFCOMPOSER, Message No. 610). Everything looks like it is set up correctly. Did I miss a step?
Thanks for your help!
~William

Hi,
Seems that the smartform that you are using has a standard text which is not avaliable check the smartform for standard texts being used and check if they are all avaliable in SO10.
Regards,
Himanshu

Smartforms: How 2 fire print & download 2 PDF simultaniously 4 my forms

Dear Murugesh, Cristian
The following is my piece of code which directly downloads my forms into PDF but not creating any spool 4 firing print ,
1) I need the both to happen simultaniously .
2) I need to include the o/p(either SAPScript/report o/p) as the Smartform pages with o/p of my Driver prog ,by calling another TCODE from my driver prog .
Please throw some light on this .
have a look into my code
*Printing of Export Invoice, Packing List,Enclosure to Packing List & *
*Case Marking in one SMART FORMS Layout                                *
REPORT ZSD_REP_MULTI_PRINT.
TABLES :
    vbak,
    vbap,
    vbpa,
    vbfa,
    VBRK,
    VBRP,
    LIKP,
    LIPS,
    KONV,
    objk,
    tvko,
    ser01,
    sadr,
    equi,
    makt,
    mast,
    t005t,
    kna1,
    t001w,
    T001,
    ADRC,
    sscrfields,
    zpp_plcmi,      "Packing list history For Conf: Item data
    zplh,           "PACKING LIST HISTORY : HEADER DATA
    zpli.           "PACKING LIST HISTORY : ITEM DATA
DATA: FM_NAME1 TYPE RS38L_FNAM,
      FM_NAME2 TYPE RS38L_FNAM,
      FM_NAME3 TYPE RS38L_FNAM,
      FM_NAME4 TYPE RS38L_FNAM,
      P_E_DEVTYPE TYPE RSPOPTYPE,
      P_JOB_OUTPUT_INFO TYPE SSFCRESCL OCCURS 2000 WITH HEADER LINE,
      T_OTF LIKE ITCOO OCCURS 0 WITH HEADER LINE,
      P_OUTPUT_OPTIONS TYPE SSFCOMPOP OCCURS 0 WITH HEADER LINE,
      P_CONTROL_PARAMETERS TYPE SSFCTRLOP OCCURS 0 WITH HEADER LINE ,
      P_DOC LIKE DOCS OCCURS 2000 WITH HEADER LINE,
      P_LINES LIKE TLINE OCCURS 200,
      P_BIN_FILESIZE TYPE I,
      P_LANGUAGE TYPE SFLANGU,
      P_BIN_FILE TYPE XSTRING,
      OK_CODE LIKE SY-UCOMM.
DATA: T_ITEM   TYPE ZSD_TABL_LITEM,
      WA_ITEM TYPE ZSD_STRUCT_LITEM,
      T_ADRS   LIKE ZSD_STRUCT_ADRS OCCURS 0 WITH HEADER LINE,
      MSLINES LIKE TLINE OCCURS 1 WITH HEADER LINE,
      TIDNO    LIKE STXL-TDID,
      TNAME    LIKE STXL-TDNAME,
      TOBJT    LIKE STXL-TDOBJECT,
      SSORD    LIKE VBAK-VBELN,
      TOT      LIKE VBAK-NETWR,
      WORD     LIKE SPELL.
SELECTION-SCREEN BEGIN OF BLOCK blk1 WITH FRAME TITLE text-001.
PARAMETERS: P_DELNO LIKE LIKP-VBELN OBLIGATORY,
            P_INVNO LIKE VBRK-VBELN OBLIGATORY,
            P_DATE LIKE SY-DATUM.
SELECTION-SCREEN END   OF BLOCK blk1.
AT SELECTION-SCREEN.
CLEAR T_ADRS.
REFRESH T_ITEM.
T_ADRS-INVNO = P_INVNO.
T_ADRS-INVDAT = P_DATE.
SELECT SINGLE VBELV INTO VBFA-VBELV
                         FROM VBFA
                         WHERE VBELN = P_DELNO
                           AND VBTYP_N = 'J' .
SSORD = VBFA-VBELV.
*Exporter's Address
SELECT SINGLE BUKRS_VF INTO VBAK-BUKRS_VF
                         FROM VBAK
                         WHERE VBELN = VBFA-VBELV.
SELECT SINGLE   ADRNR
                  INTO T001-ADRNR
                  FROM T001
                  WHERE BUKRS = VBAK-BUKRS_VF.
SELECT SINGLE NAME1 STREET CITY1 POST_CODE1 COUNTRY
         INTO (T_ADRS-NAME1,T_ADRS-STREET,T_ADRS-CITY1,
               T_ADRS-POST_CODE1, ADRC-COUNTRY)
         FROM ADRC
         WHERE ADDRNUMBER EQ T001-ADRNR.
SELECT SINGLE LANDX
                INTO T_ADRS-COUNTRY
                FROM T005T
                WHERE     SPRAS = 'EN'
                      AND LAND1 = ADRC-COUNTRY.
*Consignee Address & Buyer Other Than Consignee
SELECT SINGLE KUNNR KUNAG INTO (LIKP-KUNNR, LIKP-KUNAG)
                            FROM LIKP WHERE VBELN = P_DELNO.
IF LIKP-KUNNR = LIKP-KUNAG.
    SELECT SINGLE NAME1 NAME2 STRAS ORT01 PSTLZ REGIO TELF1 ADRNR
              INTO (T_ADRS-CNAME1, T_ADRS-CNAME2, T_ADRS-CSTREET,
                    T_ADRS-CCITY, T_ADRS-CPCODE, T_ADRS-CREGIO,
                    T_ADRS-CTELF1, KNA1-ADRNR)
              FROM KNA1
              WHERE KUNNR = LIKP-KUNNR.
    SELECT SINGLE COUNTRY INTO ADRC-COUNTRY
                          FROM ADRC
                          WHERE ADDRNUMBER EQ KNA1-ADRNR.
    SELECT SINGLE LANDX
                INTO T_ADRS-CCOUNTRY
                FROM T005T
                WHERE     SPRAS = 'EN'
                      AND LAND1 = ADRC-COUNTRY.
    T_ADRS-ONAME1   = T_ADRS-CNAME1 .
    T_ADRS-ONAME2   = T_ADRS-CNAME2 .
    T_ADRS-OSTREET = T_ADRS-CSTREET .
    T_ADRS-OCITY    = T_ADRS-CCITY.
    T_ADRS-OPCODE   = T_ADRS-CPCODE .
    T_ADRS-OREGIO   = T_ADRS-CREGIO.
    T_ADRS-OTELF1   = T_ADRS-CTELF1 .
    T_ADRS-OCOUNTRY = T_ADRS-CCOUNTRY.
ELSE.
    SELECT SINGLE NAME1 NAME2 STRAS ORT01 PSTLZ REGIO TELF1 ADRNR
              INTO (T_ADRS-CNAME1, T_ADRS-CNAME2, T_ADRS-CSTREET,
                    T_ADRS-CCITY, T_ADRS-CPCODE, T_ADRS-CREGIO,
                    T_ADRS-CTELF1, KNA1-ADRNR)
              FROM KNA1
              WHERE KUNNR = LIKP-KUNNR.
    SELECT SINGLE COUNTRY INTO ADRC-COUNTRY
                          FROM ADRC
                          WHERE ADDRNUMBER EQ KNA1-ADRNR.
    SELECT SINGLE LANDX
                INTO T_ADRS-CCOUNTRY
                FROM T005T
                WHERE     SPRAS = 'EN'
                      AND LAND1 = ADRC-COUNTRY.
*Buyer Other than Consignee
    SELECT SINGLE NAME1 NAME2 STRAS ORT01 PSTLZ REGIO TELF1 ADRNR
               INTO (T_ADRS-ONAME1, T_ADRS-ONAME2, T_ADRS-OSTREET,
                     T_ADRS-OCITY, T_ADRS-OPCODE, T_ADRS-OREGIO,
                     T_ADRS-OTELF1, KNA1-ADRNR)
               FROM KNA1
               WHERE KUNNR = LIKP-KUNAG.
    SELECT SINGLE COUNTRY INTO ADRC-COUNTRY
                          FROM ADRC
                          WHERE ADDRNUMBER EQ KNA1-ADRNR.
    SELECT SINGLE LANDX
                INTO T_ADRS-OCOUNTRY
                FROM T005T
                WHERE     SPRAS = 'EN'
                      AND LAND1 = ADRC-COUNTRY.
ENDIF.
*Other's Ref
TIDNO = 'Z071'.
TNAME = SSORD.
TOBJT = 'VBBK'.
PERFORM FINDTEXT.
LOOP AT MSLINES.
    T_ADRS-OREF = mslines-tdline(25).
    EXIT.
ENDLOOP.
*Buyer's Order No Ref
TIDNO = 'Z023'.
TNAME = SSORD.
TOBJT = 'VBBK'.
PERFORM FINDTEXT.
LOOP AT MSLINES.
    T_ADRS-BUYER = mslines-tdline(25).
    EXIT.
ENDLOOP.
*Exporter Ref
TIDNO = 'Z072'.
TNAME = SSORD.
TOBJT = 'VBBK'.
PERFORM FINDTEXT.
LOOP AT MSLINES.
    T_ADRS-XPREF = mslines-tdline(25).
    EXIT.
ENDLOOP.
*Pre-Carraige By
TIDNO = 'Z074'.
TNAME = SSORD.
TOBJT = 'VBBK'.
PERFORM FINDTEXT.
LOOP AT MSLINES.
    T_ADRS-PCRG = mslines-tdline(25).
    EXIT.
ENDLOOP.
*Place Of reciept by Pre-Carraige
TIDNO = 'Z073'.
TNAME = SSORD.
TOBJT = 'VBBK'.
PERFORM FINDTEXT.
LOOP AT MSLINES.
    T_ADRS-PLPCRG = mslines-tdline(25).
    EXIT.
ENDLOOP.
*Vessel/Flight No
TIDNO = 'Z075'.
TNAME = SSORD.
TOBJT = 'VBBK'.
PERFORM FINDTEXT.
LOOP AT MSLINES.
    T_ADRS-VFNO = mslines-tdline(25).
    EXIT.
ENDLOOP.
*Port Of Loading
TIDNO = 'Z077'.
TNAME = SSORD.
TOBJT = 'VBBK'.
PERFORM FINDTEXT.
LOOP AT MSLINES.
    T_ADRS-PLOAD = mslines-tdline(25).
    EXIT.
ENDLOOP.
*Port Of Discharge
TIDNO = 'Z076'.
TNAME = SSORD.
TOBJT = 'VBBK'.
PERFORM FINDTEXT.
LOOP AT MSLINES.
    T_ADRS-PDISG = mslines-tdline(25).
    EXIT.
ENDLOOP.
*Final Destination
TIDNO = 'Z070'.
TNAME = SSORD.
TOBJT = 'VBBK'.
PERFORM FINDTEXT.
LOOP AT MSLINES.
    T_ADRS-FDEST = mslines-tdline(25).
    EXIT.
ENDLOOP.
*Terms Of Delivery & Payment
TIDNO = 'Z080'.
TNAME = SSORD.
TOBJT = 'VBBK'.
PERFORM FINDTEXT.
LOOP AT MSLINES.
    T_ADRS-TERMS = mslines-tdline(50).
    EXIT.
ENDLOOP.
APPEND T_ADRS.
*BODY SECTION FOR LINE ITEMS
SELECT POSNR KWMENG VRKME WAERK
         INTO (VBAP-POSNR, VBAP-KWMENG, VBAP-VRKME, VBAP-WAERK)
         FROM VBAP
         WHERE VBELN = SSORD.
*Mark/Case No
    TIDNO = '0002'.
    CONCATENATE SSORD
                VBAP-POSNR
    INTO        TNAME.
    TOBJT = 'VBBP'.
    PERFORM FINDTEXT.
    LOOP AT MSLINES.
      WA_ITEM-MARKNO = mslines-tdline(40).
      EXIT.
    ENDLOOP.
*Packing Type
    TIDNO = '0003'.
    CONCATENATE SSORD
                VBAP-POSNR
    INTO        TNAME.
    TOBJT = 'VBBP'.
    PERFORM FINDTEXT.
    LOOP AT MSLINES.
      WA_ITEM-PACKTYP = mslines-tdline(40).
      EXIT.
    ENDLOOP.
*Goods Description
    TIDNO = '0001'.
    CONCATENATE SSORD
                VBAP-POSNR
    INTO        TNAME.
    TOBJT = 'VBBP'.
    PERFORM FINDTEXT.
    LOOP AT MSLINES.
      WA_ITEM-GDESC = mslines-tdline(40).
      EXIT.
    ENDLOOP.
*Goods Quantity
    WA_ITEM-QTY = VBAP-KWMENG.
    WA_ITEM-VRKME = VBAP-VRKME.
*Goods Rate
    SELECT SINGLE KNUMV INTO VBAK-KNUMV FROM VBAK WHERE VBELN = SSORD.
    SELECT SINGLE KBETR WAERS
                  INTO (WA_ITEM-RATE, WA_ITEM-WAERS)
                  FROM KONV
                  WHERE KNUMV = VBAK-KNUMV
                    AND KPOSN = VBAP-POSNR
                    AND KSCHL = 'PR00'.
*Item Remarks
    TIDNO = 'ZREM'.
    CONCATENATE SSORD
                VBAP-POSNR
    INTO        TNAME.
    TOBJT = 'VBBP'.
    PERFORM FINDTEXT.
    LOOP AT MSLINES.
      WA_ITEM-REMARK = mslines-tdline(40).
      EXIT.
    ENDLOOP.
*Goods Amount
    WA_ITEM-AMOUNT = WA_ITEM-QTY * WA_ITEM-RATE.
    WA_ITEM-WAERK = VBAP-WAERK.
    TOT = TOT + WA_ITEM-AMOUNT.
    APPEND WA_ITEM TO T_ITEM.
ENDSELECT.
T_ADRS-TOT = TOT.
CALL FUNCTION 'SPELL_AMOUNT'
   EXPORTING
     AMOUNT          = TOT
     CURRENCY        = VBAP-WAERK
FILLER          = ' '
     LANGUAGE        = SY-LANGU
   IMPORTING
     IN_WORDS        = WORD
   EXCEPTIONS
     NOT_FOUND       = 1
     TOO_LARGE       = 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.
*Gross Wieght
TIDNO = 'Z078'.
TNAME = SSORD.
TOBJT = 'VBBK'.
PERFORM FINDTEXT.
LOOP AT MSLINES.
    T_ADRS-GWT = mslines-tdline(15).
    EXIT.
ENDLOOP.
*Net Wieght
TIDNO = 'Z079'.
TNAME = SSORD.
TOBJT = 'VBBK'.
PERFORM FINDTEXT.
LOOP AT MSLINES.
    T_ADRS-NWT = mslines-tdline(15).
    EXIT.
ENDLOOP.
T_ADRS-TOT_WORDS = WORD-WORD.
APPEND T_ADRS.
START-OF-SELECTION.
P_LANGUAGE = 'EN'.
CALL   FUNCTION 'SSF_GET_DEVICE_TYPE'
    EXPORTING
      I_LANGUAGE    = P_LANGUAGE
      I_APPLICATION = 'SAPDEFAULT'
    IMPORTING
      E_DEVTYPE     = P_E_DEVTYPE.
P_OUTPUT_OPTIONS-XSFCMODE = 'X'.
P_OUTPUT_OPTIONS-XSF = SPACE.
P_OUTPUT_OPTIONS-XDFCMODE = 'X'.
P_OUTPUT_OPTIONS-XDF = SPACE.
P_OUTPUT_OPTIONS-TDPRINTER = P_E_DEVTYPE.
P_OUTPUT_OPTIONS-TDDEST = 'LOHP'.
APPEND P_OUTPUT_OPTIONS.
P_CONTROL_PARAMETERS-NO_DIALOG = 'X'.
P_CONTROL_PARAMETERS-GETOTF = 'X'.
P_CONTROL_PARAMETERS-NO_CLOSE = SPACE.
APPEND P_CONTROL_PARAMETERS.
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
    EXPORTING
      FORMNAME                 = 'ZSD_REP_MULTI_PRINT1'
VARIANT                  = ' '
DIRECT_CALL              = ' '
   IMPORTING
      FM_NAME                  = FM_NAME1
   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 FM_NAME1
   EXPORTING
ARCHIVE_INDEX              =
ARCHIVE_INDEX_TAB          =
ARCHIVE_PARAMETERS         =
    CONTROL_PARAMETERS         = P_CONTROL_PARAMETERS
MAIL_APPL_OBJ              =
MAIL_RECIPIENT             =
MAIL_SENDER                =
    OUTPUT_OPTIONS             = P_OUTPUT_OPTIONS
    USER_SETTINGS              = 'X'
IMPORTING
DOCUMENT_OUTPUT_INFO       =
    JOB_OUTPUT_INFO            = P_JOB_OUTPUT_INFO
JOB_OUTPUT_OPTIONS         =
TABLES
    T_ADRS                     = T_ADRS
    T_ITEM                     = T_ITEM
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.
LOOP AT P_JOB_OUTPUT_INFO-OTFDATA INTO T_OTF.
    APPEND T_OTF.
ENDLOOP.
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
    EXPORTING
      FORMNAME                 = 'ZSD_REP_MULTI_PRINT2'
VARIANT                  = ' '
DIRECT_CALL              = ' '
   IMPORTING
      FM_NAME                  = FM_NAME2
   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 FM_NAME2
   EXPORTING
ARCHIVE_INDEX              =
ARCHIVE_INDEX_TAB          =
ARCHIVE_PARAMETERS         =
    CONTROL_PARAMETERS         = P_CONTROL_PARAMETERS
MAIL_APPL_OBJ              =
MAIL_RECIPIENT             =
MAIL_SENDER                =
    OUTPUT_OPTIONS             = P_OUTPUT_OPTIONS
    USER_SETTINGS              = 'X'
IMPORTING
DOCUMENT_OUTPUT_INFO       =
    JOB_OUTPUT_INFO            = P_JOB_OUTPUT_INFO
JOB_OUTPUT_OPTIONS         =
TABLES
    T_ADRS                     = T_ADRS
    T_ITEM                     = T_ITEM
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.
LOOP AT P_JOB_OUTPUT_INFO-OTFDATA INTO T_OTF.
    APPEND T_OTF.
ENDLOOP.
<b>SET PARAMETER ID: 'AUN' FIELD SSORD ,"VBAK-VBELN VALUE ,
                   'APO' FIELD ITNO."VBAP-POSNR.
CALL TRANSACTION 'ZPL3' AND SKIP FIRST SCREEN.
IF SY-SUBRC NE 0.
   MESSAGE E001(ZQOTBANK).
ENDIF.
*SET PARAMETER ID: 'AUN' FIELD VBAK-VBELN,
                 'APO' FIELD VBAP-POSNR.
*CALL TRANSACTION 'ZA3C' AND SKIP FIRST SCREEN.
*IF SY-SUBRC NE 0.
MESSAGE E001(ZQOTBANK).
*ENDIF.
IMPORT (T_OTF2) FROM MEMORY ID 'MEMID'.
LOOP AT T_OTF2 INTO T_OTF2.
    APPEND T_OTF2 TO T_OTF.
ENDLOOP.
</b>
CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
    EXPORTING
      FORMNAME                 = 'ZSD_REP_MULTI_PRINT4'
VARIANT                  = ' '
DIRECT_CALL              = ' '
   IMPORTING
      FM_NAME                  = FM_NAME4
   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 FM_NAME4
   EXPORTING
ARCHIVE_INDEX              =
ARCHIVE_INDEX_TAB          =
ARCHIVE_PARAMETERS         =
    CONTROL_PARAMETERS         = P_CONTROL_PARAMETERS
MAIL_APPL_OBJ              =
MAIL_RECIPIENT             =
MAIL_SENDER                =
    OUTPUT_OPTIONS             = P_OUTPUT_OPTIONS
   USER_SETTINGS              = 'X'
IMPORTING
DOCUMENT_OUTPUT_INFO       =
    JOB_OUTPUT_INFO            = P_JOB_OUTPUT_INFO
JOB_OUTPUT_OPTIONS         =
TABLES
    T_ADRS                     = T_ADRS
    T_ITEM                     = T_ITEM
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.
LOOP AT P_JOB_OUTPUT_INFO-OTFDATA INTO T_OTF.
    APPEND T_OTF.
ENDLOOP.
CALL FUNCTION 'CONVERT_OTF_2_PDF'
EXPORTING
    USE_OTF_MC_CMD               = 'X'
ARCHIVE_INDEX                =
IMPORTING
    BIN_FILESIZE                 = P_BIN_FILESIZE
TABLES
    OTF                          = T_OTF
    DOCTAB_ARCHIVE               = P_DOC
    LINES                        = P_LINES
EXCEPTIONS
   ERR_CONV_NOT_POSSIBLE        = 1
   ERR_OTF_MC_NOENDMARKER       = 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 'GUI_DOWNLOAD'
EXPORTING
    BIN_FILESIZE                    = P_BIN_FILESIZE
    FILENAME                        = 'C:\SD4.pdf'
    FILETYPE                        = 'BIN'
APPEND                          = ' '
WRITE_FIELD_SEPARATOR           = ' '
HEADER                          = '00'
TRUNC_TRAILING_BLANKS           = ' '
WRITE_LF                        = 'X'
COL_SELECT                      = ' '
COL_SELECT_MASK                 = ' '
DAT_MODE                        = ' '
CONFIRM_OVERWRITE               = ' '
NO_AUTH_CHECK                   = ' '
CODEPAGE                        = ' '
IGNORE_CERR                     = ABAP_TRUE
REPLACEMENT                     = '#'
WRITE_BOM                       = ' '
TRUNC_TRAILING_BLANKS_EOL       = 'X'
IMPORTING
   FILELENGTH                      = P_BIN_FILESIZE
TABLES
    DATA_TAB                        = P_LINES
FIELDNAMES                      =
EXCEPTIONS
FILE_WRITE_ERROR                = 1
NO_BATCH                        = 2
GUI_REFUSE_FILETRANSFER         = 3
INVALID_TYPE                    = 4
NO_AUTHORITY                    = 5
UNKNOWN_ERROR                   = 6
HEADER_NOT_ALLOWED              = 7
SEPARATOR_NOT_ALLOWED           = 8
FILESIZE_NOT_ALLOWED            = 9
HEADER_TOO_LONG                 = 10
DP_ERROR_CREATE                 = 11
DP_ERROR_SEND                   = 12
DP_ERROR_WRITE                  = 13
UNKNOWN_DP_ERROR                = 14
ACCESS_DENIED                   = 15
DP_OUT_OF_MEMORY                = 16
DISK_FULL                       = 17
DP_TIMEOUT                      = 18
FILE_NOT_FOUND                  = 19
DATAPROVIDER_EXCEPTION          = 20
CONTROL_FLUSH_ERROR             = 21
OTHERS                          = 22
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
*&      Form FINDTEXT
      text
FORM FINDTEXT.
REFRESH mslines.
CALL FUNCTION 'READ_TEXT'
    EXPORTING
      client                  = sy-mandt
      id                      = tidno
      language                = sy-langu
      name                    = tname
      object                  = tobjt
    TABLES
      lines                   = mslines
    EXCEPTIONS
      id                      = 1
      language                = 2
      name                    = 3
      not_found               = 4
      object                  = 5
      reference_check         = 6
      wrong_access_to_archive = 7
      OTHERS                  = 8.
DELETE mslines WHERE tdline IS INITIAL.
ENDFORM.                    "FINDTEXT
Thnx
moni
Message was edited by: md monirujjaman
Message was edited by: md monirujjaman

Hello,
I had thought that your 4th output of the Transaction is an output of a list and NOT from a SCRIPT.
Now, if it is a SAP SCRIPT ourput, it is quite simple as you have to get the OTFDATA from the SCRIPT. But you may have to make the correction in your SAPSCRIPT driver program.
Sample:
CALL FUNCTION 'CLOSE_FORM'
     TABLES
          otfdata                  = te_otf_table
     EXCEPTIONS
          unopened                 = 1
          bad_pageformat_for_print = 2
          OTHERS                   = 3.
Next you may EXPORT this OTF Data Internal Table to ABAP Memory.
In your program where you are calling all the 3 forms + the transaction which outputs the SAPScript output, the exported data may be imported and appended into the MAIN Interal Table and single PDF could be generated.
Secondly, The PRINT prieview of the SSFs could be generated by passing Export options of the SSF FM
SAmple:
ssfctrlop-no_dialog = ' '.
CALL FUNCTION l_form
    EXPORTING
         control_parameters = ssfctrlop
         output_options     = ssfcompop
I hope this helps you.
Regards, Murugesh AS

How to print the superscript in smartform

Hi gurus,
Please tell me the procedure how to print the superscript in middle of the text displaying?
when we are displaying the smartform its converted to some special character like & .
please let me know procedure at the earliest
Regards
Raj

Hi thanks for ur patience.
see my requirment was to print TM as superscript for HLL ,already smartstyle is there, and also a character format with superscript is also defined.
then aftet HLL how it prints as superscript.
for HLL we are using another character format and for superscript we are using the another character format.
If posiible send me the code to write in smartforms
Regards
RAj
Points are awarded for useful answers.

How to print horizantal lines in smartforms?

hi friends,
how to print horizantal lines in smartforms.
waiting for ur valuble replies.
Thanks,
Kiran

HI,
If u use templates or table,then use borders to print the horizontal lines.
Eg : Create template-->Table painter->click select pattern button->Display framed pattern->select 3rd one.it will display only horizantal lines.
if want to print horizantal line under the text, then create one paragraph or character formate with Underline in smartstyles.Use that paragraph or character to u r text element

How to print a bullet in smartforms?

Hi All,
How to print a bullet in smartforms?
I need it urgently.
Any help would be appeciated.
Regards,
Mahesh.

Hi,
if i remember correct <600> is the value for bullets.
you can insert this using sap system symbols ---> select bullets (before this place your cursor where ever you want the bullets.
eg:
P1 <600> test.
Thanks,
Sree.

No.of pallets - PO smartform

Similar Messages

Maybe you are looking for