Sapscripts and smartforms

Hi,
Please tell me how to do language translations in sapscripts and smartforms.
I want to to each form in 12 languages.
Please help me.
Thanks,
Ravi

Hi
You can assign the language directly by trx SE71 fot sapscript and SMARTFORMS for sm.
In both trx you can see the section LANGUAGE ATTRIBUTES
Here you can create a version of your form for all language you need.
But all these versions'll be as original, so you need to change all texts you've inserted, i.e you have to translate all texts.
For SAPSCRIPT you can do it by SE71 because you can choose the language (so the version) of the sapscript you want to translate, but for the SAMRTFORMS I believe you can only use trx SE63.
Max

Similar Messages

Differnce between SapScript And Smartform

hi All,
Can anyone tell me the difference between sapscript and smartforms.Which we have to use
Points rewarded for answer
Harpreet

Hi harpreet,
1. Can anyone tell me the difference between sapscript and smartforms
some practical differences are :
<b>*----
One main difference which is
visibility in the report is TABLES
(in sapscript we cannot design MATRIX like tables,
having grid lines,
but in smartforms, it is much possible to
design tables, having grid lines, color just
like excel table)</b>
a) sapscript requires
    - driver program (se38 program)
    - layout (se71 layout)
   smartforms just require
   smartform,
(and a program is just required for
   selection screen purpose)
b) the logic of printing (ie. sequence, flow)
    is CONTROLLED BY drier program,
   in case of sapscript.
where as in smartform, it is inbuilt using TABLES element.
c) In sapscript we cannot write our own logic for printing.
   where as in smartform,
we can write our own logic for pritning.
(we can even write SELECT Statements, DATA statements,
   and many program lines + logic to suit our requirements)
2 Which we have to use
If we are copying some standard sapscript,
then we have to go for sapscript only.
We can use both. but practically smartforms is easier to
develop.
regards,
amit m.

Difference between SAPScript and Smartforms

Hi all,
Can any body tell me, which of these SAPScript and Smartforms are client independent or client dependent and why?
Thanks in advance....
Sri.

Hi Sri,
SAPScript is client dependent and Smartform is client independent.
So you need to transport the SAPScript from the development client to test client if both are in the same system.
Because Smartform is client independent it will behave like report program.
Thanks
Vinod

About SAPscripts and smartforms

Hi all,
         I am working on SAPscripts and i have one doubt.
I want to know the concepts how data is communicated between SAP scripts and print program.Suppose I am writing one subroutine. Can i write the form statements in the print program of the script or I have to write it in another program.
         I want whether SAPscript is calling the print program or vice versa.
         Please tell me the same concepts regarding smartforms.
         Please experts provide me a vivid idea so that I can get the concepts clear.
    With regards,
      Abir.

HI
GOOD
AS PER YOUR REQUIREMENT HERE I AM GIVING SOME POINTS RELATING TO SAP SCRIPT AND DRIVER PROGRAM
WHEN YOU R CREATING A SAPSCRIPT FORM IT CANT ABLE TO EXECUTE OF ITSELF, FOR EXECUTION IT NEEDS HELP .THAT IS THE REASON YOU R CREATING A DRIVER PROGRAM.
IF YOU GO THROUGH A DRIVER PROGRAM YOU CAN FIND OUT THAT YOU R PASSING THE SAP SCRIPT NAME AS A PARAMTER.SO YOUR DRIVER PROGRAM IS CALLING YOUR SAP SCRIPT FORM.
USING THE DRIVER PROGRAM YOU ARE PASSING THE APPROPRIATE VALUE FOR THE VARIBALE THAT YOU R GOING TO PRINT IN THE SAP SCRIPT FORM.
=============================
SMARTFORM CONCEPT=>
SAP Smartforms can be used for creating and maintaining forms for mass printing in SAP Systems. The output medium for Smartforms support printer, fax, e-mail, or the Internet (by using the generated XML output).
According to SAP, you need neither have any programming knowledge nor use a Script language to adapt standard forms. However, basic ABAP programming skills are required only in special cases (for example, to call a function module you created or for complex and extensive conditions).
1. Create a new smartforms
Transaction code SMARTFORMS
Create new smartforms call ZSMART
2. Define looping process for internal table
Pages and windows
First Page -> Header Window (Cursor at First Page then click Edit -> Node -> Create)
Here, you can specify your title and page numbering
&SFSY-PAGE& (Page 1) of &SFSY-FORMPAGES(Z4.0)& (Total Page)
Main windows -> TABLE -> DATA
In the Loop section, tick Internal table and fill in
ITAB1 (table in ABAP SMARTFORM calling function) INTO ITAB2
3. Define table in smartforms
Global settings :
Form interface
Variable name    Type assignment   Reference type
ITAB1               TYPE                  Table Structure
Global definitions
Variable name    Type assignment   Reference type
ITAB2               TYPE                  Table Structure
4. To display the data in the form
Make used of the Table Painter and declare the Line Type in Tabstrips Table
e.g. HD_GEN for printing header details,
        IT_GEN for printing data details.
You have to specify the Line Type in your Text elements in the Tabstrips Output options.
Tick the New Line and specify the Line Type for outputting the data.
Declare your output fields in Text elements
Tabstrips - Output Options
For different fonts use this Style : IDWTCERTSTYLE
For Quantity or Amout you can used this variable &GS_ITAB-AMOUNT(12.2)&
THANKS
MRUTYUN

Difference between Sapscripts and Smartforms

Hi
I need to create a form for print it in some predefined furmulary for the user signs it , something like a payment receipt.
Wich tool should i use, a Sapscript or Smartform, wath's the diffrerence between these two tools ?
Thanks
Frank

Hi,
SAP Scripts is the old tool and SMART Form is comparatively new tool to develop and print business documents.
SMART Forms are more GUI oreiented and you can do lot of things just by dragging and dropping. SAP Scripts are more code oreiented.Practically smartforms is easier to develop when compared with SAPscript.
Differences :
1. Sapscript is Client dependent Smartform is Client independent.
2. Multiple page formats are possible in smartforms which is not the case in SAPScripts.
3. It is possible to a smartform without MAIN Window.
4. Labels cannot be created in smartforms.
5. It is possible to have a smartform without a main window .
6. In sapscript we cannot write our own logic for printing where as in smartform, we can write our own logic for pritning
7. Sapscript requires a driver program (se38 program) and layout (se71 layout) where as Smartforms can be run independently without a driver program.
8. In sapscript we cannot design matrix like tables,having grid lines, but in smartforms, it is much possible to design tables, having grid lines, color etc. just like excel table.
9.Smartforms generates a function module when activated.
Regards,
V Joshi.

How to get SapScript and Smartform printed in one spool request?

Hello experts,
I want to print the production order package in one spool request.
Print program consists of Smartform and SapScript.
First page is in landscape format with barcode(Smartform) and the rest is in portrait format(Sapscript).
In SAP documentation is written that it is possible for several Smartforms to be printed in one spool request.
Is it possible for 1 Smartform and 1 SapScript called from a single program to be printed in one spool request?
I have tested it with calling first the Smartform control-no_close= 'X' without success.
Can anyone tell me if this is possible and how?
Thank you.
Kind regards,
Danijela

Hi
In the driver program .
*"Selection screen elements............................................
SELECTION-SCREEN BEGIN OF BLOCK block WITH FRAME.
PARAMETERS:
p_script   RADIOBUTTON GROUP rad1,
p_smartform RADIOBUTTON GROUP rad1,
SELECTION-SCREEN END OF BLOCK block.
*"Selection screen elements............................................
SELECTION-SCREEN BEGIN OF BLOCK block1 WITH FRAME.
PARAMETERS:
p_single RADIOBUTTON GROUP rad2,      " All the spool request
p_ind    RADIOBUTTON GROUP rad2.
SELECTION-SCREEN END OF BLOCK block1. " Single spool request
If p_script EQ 'x'.
w_form = 'Y_SCRIPT'.
Elseif p_smartfom EQ 'X'.
   w_form = 'Y_SMARTFORM'.
ENDIF.
call function 'SSF_FUNCTION_MODULE_NAME'.
Call function 'SSFCOMP_OPEN'.
w_control-no_open   = ' '.
    w_control-no_close = ' '.
*"Single spool request..................................................
    IF p_single EQ 'X'.
      w_control-no_open   = 'X'.
      w_control-no_close = 'X'.
    ELSE.
*"Individual spool request.............................................
      IF w_flag NE '1'.
        w_control-no_open = 'X'.
        w_control-no_close = ' '.
        w_flag = 1.
CALL FUNCTION '    '-----> smartform function module.
CALL FUNCTION 'SSFCOMP_CLOSE'.
Regards,
Sravanthi

Handling multiple languages in SAPscripts and Smartforms

A lot of our output documents need to be printed in different languages. For e.g. a Sales Invoice would have to be in English, German and French and currently with Sapscripts we create separate output types and separate sapscripts for each one of them but they all share the same driver program.
Is this the easiest way to do this? Can it be made simpler using Smartforms perhaps using standard texts or text elements?

Hi,
IF you open the smart forms.
In form attributes :
We have language attribute.
there is one button "Into all languages" under translation tab.
check this button.Hope it may helpful to you.
Thanks

Advantages of adobe forms over sapscripts and smartforms.

Good day ,
Can anyone pls mention atleast 2 to 3 major differences between sapscripts,smartforms and adobe forms?
I want to know wat r the drawbacks in each n how we rectified it in adobe forms.Are there any disadvantages in adobe forms??
Awaiting your reply,
Thanks,
Deepthi.

Hi Martina,
SAP Interactive Forms by Adobe offer you the following business advantages:
1. Interactive functions automate the creation of data for SAP systems
2. Full integration into the SAP development environments for Java and ABAP
3. User-friendly tools reduce the time and costs associated with creating form layouts.
4. The usage of the PDF format means that forms retain their appearance regardless of the environment they are used in.
Moreover,
SAP Interactive Forms by Adobe offer the following basic functions:
1. Create form templates for the layout that include logos or pictures
2. Generate documents by merging form templates and current system data
3. Edit forms online or offline
4. Forms can be filled in advance automatically with specific data from SAP applications and then sent to the correct recipients using secure methods
5. Automatic consistency checks for forms
6. Activate enhanced functions such as comments
7. Digital signatures and form certification
8. Send completed forms to the SAP application with automatic updates of the business data
There are not any disadvantages in adobe forms as such except the value help is not present but that could be done after a little coding.
Reward if useful.
Regards,
Vaibhav Tiwari.

What SAP recommends in ECC 6. Either SAPSCRIPT or SMARTFORMS?

Hi all,
I want to know, what is the SAP's recommendation in ECC 6.0, whether to use sapscripts or smartforms for the important form print outs like purchase order, quotation, GR, GI, invoice, delivery note.
I knew that in ECC 6.0, for some cases, there are both sapscript and smartforms available, for example Purchase order, Delivery note, invoice etc. In this case what is the SAP's recommendation? to use sapscripts or smartforms??
I heard that SAP does recommend.
Awaiting your reply,
Balaji

Hi
These are few lines from sap help:
Smart Forms replace SAPscript forms. SAPscript forms will still be supported in the future; you can use them without making any changes for years to come. You can even use SAPscript texts in the Smart Forms.
Migration of SAPscript forms into Smart Forms is supported.
Even go through this link :
http://help.sap.com/saphelp_nw70/helpdata/EN/a5/de6838abce021ae10000009b38f842/content.htm
[Advantages of using smartforms|http://saplab.blogspot.com/2007/09/advantages-of-sap-smart-forms.html]
Regards,
Sravanthi

Sapscripts and smart forms

how many main windows can be created in sapscripts and smartforms? and how mnay sub windows can be created in sapscripts and smartforms?

Main Window in one page can be only One.
regards,
Rajesh Banka
Reward suitable points.
How to give points: Mark your thread as a question while creating it. In the answers you get, you can assign the points by clicking on the stars to the left. You also get a point yourself for rewarding (one per thread).

Re:BDC,ALV,SCRIPTS and SMARTFORMS

Hi,
         i need a complete BDC programming example codes with different methods, suppose if it is a material master mm01, i need the screen shots, what to fill in that transaction , the flat file data snapshot and program, so that i will do that example, otherwise iam so much confused
    I also need ALV ,SAPSCRIPTS and smartforms realtime sample codes with screenshots so tht i will try directly .
   Iam very thankful to all of them who helps me
Thanks & Regards,
Sravanthigopal
[email protected]

**　Program ID              ：              ZMAT_CREATE
**　Program Desc          ：              Material Master Creation
**　Process Overview
**　Created Date           ：               22/08/2006
**　Company Name        ：
REPORT ZMAT_CREATE
       NO STANDARD PAGE HEADING LINE-SIZE 132 MESSAGE-ID ZBDCMSG.
       Internal table definition        *
DATA: BEGIN OF ITAB OCCURS 0,
          MATNR LIKE RMMG1-MATNR,                 " Material Number
          MBRSH LIKE RMMG1-MBRSH,                 " Industry Sector
          MTART LIKE RMMG1-MTART,                  " Material Type
          WERKS LIKE RMMG1-WERKS,                  " Plant
          LGORT LIKE RMMG1-LGORT,                  " Storage Location
          VKORG LIKE RMMG1-VKORG,                  " Sales Organization
          VTWEG LIKE RMMG1-VTWEG,                  " Distribution Channel
          LGNUM LIKE RMMG1-LGNUM,                 " Warehouse Number
          LGTYP LIKE RMMG1-LGTYP,                   " Storage Type
          MAKTX LIKE MAKT-MAKTX,                    " Material Description
          MEINS LIKE MARA-MEINS,                      " Base Unit of Measure
         MATKL LIKE MARA-MATKL,                    " Material Group
          SPART LIKE MARA-SPART,                     " Division
          MTPOS_MARA LIKE MARA-MTPOS_MARA, "General item category group
          GEWEI LIKE MARA-GEWEI,                      " Weight Unit
          TAXKM1 LIKE MG03STEUER-TAXKM,        " Tax classification material
          TAXKM2 LIKE MG03STEUER-TAXKM,        " Tax classification material
          KONDM LIKE MVKE-KONDM,                  " Material Pricing Group
          MTPOS LIKE MVKE-MTPOS ,                  "ItemCategoryGroupFromMaterialMaster
          MTVFP LIKE MARC-MTVFP,                    " Checking Group for AvailabilityCheck
          TRAGR LIKE MARA-TRAGR,                    " Transportation group
          LADGR LIKE MARC-LADGR,                    " Loading group
          TDLINE LIKE RSTXT-TXLINE,                  " Text editor text line
          EKGRP LIKE MARC-EKGRP,                    " Purchasing Group
          DISMM LIKE MARC-DISMM,                    " MRP Type
          BESKZ LIKE MARC-BESKZ,                     " Procurement Type
          SOBSL LIKE MARC-SOBSL,                    " Special procurement type
          PERKZ LIKE MARC-PERKZ,                     " Period indicator
          PRMOD LIKE MPOP-PRMOD,                  " Forecast model
          KZINI LIKE MPOP-KZINI,                        " Initialization indicator
          AUTRU LIKE MARC-AUTRU,                    " Reset Forecast Model Automatically
          MODAV LIKE MPOP-MODAV,                   " Model selection procedure
          IPRKZ LIKE MARA-IPRKZ,                   " Period indicator for shelf life expiration date
          BWTTY LIKE MBEW-BWTTY,                    " Valuation Category
          BKLAS LIKE MBEW-BKLAS,                     " Valuation Class
          EKLAS LIKE MBEW-EKLAS,                      " Valuation Class for Sales OrderStock
          VPRSV LIKE MBEW-VPRSV,                     " Price Control Indicator
          EKALR LIKE MBEW-EKALR,                      "MaterialIsCostedWithQuantityStructure
       END OF ITAB,
*// TEXT HEADER
       GT_HEAD LIKE THEAD,
*// Text lines
       GT_TEXT LIKE STANDARD TABLE OF TLINE,
       GW_TEXT LIKE TLINE,
       Data definition        *
        WS_REP_CNT(6) TYPE C,
        SESSION(12) TYPE C.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-000.
PARAMETERS:
            PA_GROUP LIKE APQI-GROUPID OBLIGATORY DEFAULT 'MMupload',
            PA_FNAME LIKE IBIPPARMS-PATH OBLIGATORY.
SELECTION-SCREEN END OF BLOCK B1.
       Include statements        *
INCLUDE ZBDCREX.
     At Selection Screen definition      *
AT SELECTION-SCREEN ON VALUE-REQUEST FOR PA_FNAME.
*//GETTING FLAT FILE PATH
PERFORM FILE_PATH USING PA_FNAME.
     Start of Selection definition      *
START-OF-SELECTION.
*//UPLOADING THE FLAT FILE
PERFORM DATA_UPLOAD TABLES ITAB USING PA_FNAME.
*// BDC OPEN GROUP
PERFORM OPEN_GROUP USING PA_GROUP.
SKIP 3.
FORMAT COLOR COL_HEADING INVERSE ON.
    WRITE 40 TEXT-001.
FORMAT COLOR COL_HEADING INVERSE OFF.
SKIP 1.
FORMAT COLOR COL_NEGATIVE INVERSE ON.
    WRITE :/3 TEXT-002, 13 SY-MANDT, 104 TEXT-003, 113 SY-UNAME,
              /3 TEXT-004, 13 SY-DATUM, 104 TEXT-005, 113 SY-UZEIT.
FORMAT COLOR COL_NEGATIVE INVERSE OFF.
LOOP AT ITAB.
    WS_REP_CNT = WS_REP_CNT + 1.   "To Count no. of Records Processed
    PERFORM MM_UPLOAD.
ENDLOOP.
*//STATUS INDICATION
IF SY-SUBRC = 0.
    SESSION = PA_GROUP.
    SKIP 1.
    FORMAT COLOR COL_TOTAL INVERSE ON.
      WRITE: /38 TEXT-006 , WS_REP_CNT.
    FORMAT COLOR COL_TOTAL INVERSE OFF.
    MESSAGE S000 WITH SESSION.
ENDIF.
*// BDC CLOSE GROUP
PERFORM CLOSE_GROUP.
SET PF-STATUS 'ZMM01PF'.
AT USER-COMMAND.
CASE SY-UCOMM.
    WHEN 'SESSION'.
      CALL TRANSACTION 'SM35'.
    WHEN 'EXIT'.
      LEAVE PROGRAM.
    WHEN 'CANCEL'.
      LEAVE SCREEN.
ENDCASE .
     FORM MM_UPLOAD      *
FORM MM_UPLOAD.
REFRESH BDCDATA.
*// Create Material: Initial Screen
perform bdc_dynpro      using 'SAPLMGMM' '0060'.
perform bdc_field       using 'BDC_CURSOR'
                                'RMMG1-MATNR'.
perform bdc_field       using 'BDC_OKCODE'
                                '=ENTR'.
perform bdc_field       using 'RMMG1-MATNR'
                                ITAB-MATNR.
perform bdc_field       using 'RMMG1-MBRSH'
                                ITAB-MBRSH.
perform bdc_field       using 'RMMG1-MTART'
                                ITAB-MTART.
*// Selection Views
perform bdc_dynpro      using 'SAPLMGMM' '0070'.
perform bdc_field       using 'BDC_CURSOR'
                                'MSICHTAUSW-DYTXT(01)'.
perform bdc_field       using 'BDC_OKCODE'
                                'SELA'.
perform bdc_dynpro      using 'SAPLMGMM' '0070'.
perform bdc_field       using 'BDC_CURSOR'
                                'MSICHTAUSW-DYTXT(01)'.
perform bdc_field       using 'BDC_OKCODE'
                                '=ENTR'.
*// Organization Levels
perform bdc_dynpro      using 'SAPLMGMM' '0080'.
perform bdc_field       using 'BDC_OKCODE'
                                '=ENTR'.
perform bdc_field       using 'RMMG1-WERKS'
                                ITAB-WERKS.
perform bdc_field       using 'RMMG1-LGORT'
                                ITAB-LGORT.
perform bdc_field       using 'RMMG1-VKORG'
                                ITAB-VKORG.
perform bdc_field       using 'RMMG1-VTWEG'
                                ITAB-VTWEG.
perform bdc_field       using 'RMMG1-LGNUM'
                                ITAB-LGNUM.
perform bdc_field       using 'RMMG1-LGTYP'
                                ITAB-LGTYP.
*// Basic Data 1: Screen
perform bdc_dynpro      using 'SAPLMGMM' '4004'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP04'.
perform bdc_field       using 'MAKT-MAKTX'
                                ITAB-MAKTX.
perform bdc_field       using 'MARA-MEINS'
                                ITAB-MEINS.
perform bdc_field       using 'MARA-SPART'
                                ITAB-SPART.
perform bdc_field       using 'MARA-MTPOS_MARA'
                                ITAB-MTPOS_MARA.
perform bdc_field       using 'BDC_CURSOR'
                                'MARA-GEWEI'.
perform bdc_field       using 'MARA-BRGEW'
                                '9000'.
perform bdc_field       using 'MARA-GEWEI'
                                ITAB-GEWEI.
perform bdc_field       using 'MARA-NTGEW'
                                '8000'.
*// Sales: Sales Organization 1: Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP05'.
perform bdc_field       using 'MG03STEUER-TAXKM(01)'
                                ITAB-TAXKM1.
perform bdc_field       using 'MG03STEUER-TAXKM(02)'
                                ITAB-TAXKM2.
perform bdc_dynpro      using 'SAPLMGMM' '4200'.
perform bdc_field       using 'BDC_OKCODE'
                                '/00'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP05'.
*// Sales: Sales Organization 2: Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP06'.
perform bdc_field       using 'BDC_CURSOR'
                                'MVKE-KONDM'.
perform bdc_field       using 'MVKE-KONDM'
                                ITAB-KONDM.
perform bdc_field       using 'MARA-MTPOS_MARA'
                                ITAB-MTPOS_MARA.
perform bdc_field       using 'MVKE-MTPOS'
                                ITAB-MTPOS.
*// Sales: General / Plant Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP12'.
perform bdc_field       using 'MARA-MEINS'
                                ITAB-MEINS.
perform bdc_field       using 'MARA-BRGEW'
                                '9000'.
perform bdc_field       using 'MARA-GEWEI'
                                ITAB-GEWEI.
perform bdc_field       using 'MARA-XCHPF'
perform bdc_field       using 'MARA-NTGEW'
                                '8000'.
perform bdc_field       using 'MARC-MTVFP'
                                ITAB-MTVFP.
perform bdc_field       using 'BDC_CURSOR'
                                'MARC-LADGR'.
perform bdc_field       using 'MARA-TRAGR'
                                ITAB-TRAGR.
perform bdc_field       using 'MARC-LADGR'
                                ITAB-LADGR.
*// MRP 1: Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP13'.
perform bdc_field       using 'MARA-MEINS'
                                ITAB-MEINS.
perform bdc_field       using 'MARC-EKGRP'
                                ITAB-EKGRP.
perform bdc_field       using 'BDC_CURSOR'
                                'MARC-DISMM'.
perform bdc_field       using 'MARC-DISMM'
                                ITAB-DISMM.
*// MRP 2: Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP14'.
perform bdc_field       using 'BDC_CURSOR'
                                'RMMG1_BEZ-WERKS_BEZ'.
perform bdc_field       using 'MARC-BESKZ'
                                ITAB-BESKZ.
perform bdc_field       using 'MARC-SOBSL'
                                ITAB-SOBSL .
*// MRP 3: Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP16'.
perform bdc_field       using 'BDC_CURSOR'
                                'MARC-PERKZ'.
perform bdc_field       using 'MARC-PERKZ'
                                ITAB-PERKZ.
perform bdc_field       using 'MARC-MTVFP'
                                ITAB-MTVFP.
*// Forecasting Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP17'.
perform bdc_field       using 'BDC_CURSOR'
                                'MPOP-PRMOD'.
perform bdc_field       using 'MARA-MEINS'
                                ITAB-MEINS.
perform bdc_field       using 'MPOP-PRMOD'
                                ITAB-PRMOD.
perform bdc_field       using 'MARC-PERKZ'
                                ITAB-PERKZ.
perform bdc_field       using 'MPOP-PERAN'
                                '60'.
perform bdc_field       using 'MPOP-ANZPR'
                                '12'.
perform bdc_field       using 'MPOP-KZINI'
                                ITAB-KZINI.
perform bdc_field       using 'MPOP-SIGGR'
                                '4.000'.
perform bdc_field       using 'MARC-AUTRU'
                                ITAB-AUTRU.
perform bdc_field       using 'MPOP-MODAV'
                                ITAB-MODAV.
*// Work Scheduling Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP19'.
perform bdc_field       using 'BDC_CURSOR'
                                'MARC-FRTME'.
perform bdc_field       using 'MARA-MEINS'
                                ITAB-MEINS.
*// Plant data / Stor. 1: Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP20'.
perform bdc_field       using 'BDC_CURSOR'
                                'MAKT-MAKTX'.
perform bdc_field       using 'MARA-MEINS'
                                ITAB-MEINS.
perform bdc_field       using 'MARA-IPRKZ'
                                ITAB-IPRKZ.
*// Plant data / Stor. 2: Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP21'.
perform bdc_field       using 'BDC_CURSOR'
                                'MAKT-MAKTX'.
perform bdc_field       using 'MARA-BRGEW'
                                '9000'.
perform bdc_field       using 'MARA-GEWEI'
                                ITAB-GEWEI.
perform bdc_field       using 'MARA-NTGEW'
                                 '8000'.
*// Warehouse Management 1: Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP23'.
perform bdc_field       using 'BDC_CURSOR'
                                'MAKT-MAKTX'.
perform bdc_field       using 'MARA-MEINS'
                                ITAB-MEINS.
perform bdc_field       using 'MARA-BRGEW'
                                 '9000'.
perform bdc_field       using 'MARA-GEWEI'
                                ITAB-GEWEI.
*// Quality Management Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP24'.
perform bdc_field       using 'BDC_CURSOR'
                                'MAKT-MAKTX'.
perform bdc_field       using 'MARA-MEINS'
                                ITAB-MEINS.
*// Accounting 1: Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP26'.
perform bdc_field       using 'MARA-MEINS'
                                ITAB-MEINS.
perform bdc_field       using 'MBEW-BWTTY'
                                ITAB-BWTTY.
perform bdc_field       using 'MARA-SPART'
                                ITAB-SPART.
perform bdc_field       using 'BDC_CURSOR'
                                'MBEW-STPRS'.
perform bdc_field       using 'MBEW-BKLAS'
                                ITAB-BKLAS.
perform bdc_field       using 'MBEW-EKLAS'
                                ITAB-EKLAS.
perform bdc_field       using 'MBEW-VPRSV'
                                ITAB-VPRSV.
perform bdc_field       using 'MBEW-PEINH'
                                '1'.
perform bdc_field       using 'MBEW-VERPR'
                                '800'.
perform bdc_field       using 'MBEW-STPRS'
                                '800'.
*// Costing 1: Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=SP27'.
perform bdc_field       using 'BDC_CURSOR'
                                'MAKT-MAKTX'.
perform bdc_field       using 'MARA-MEINS'
                                ITAB-MEINS.
perform bdc_field       using 'MBEW-EKALR'
                                ITAB-EKALR.
perform bdc_field       using 'MARC-LOSGR'
                                '1'.
*// Costing 2: Screen
perform bdc_dynpro      using 'SAPLMGMM' '4000'.
perform bdc_field       using 'BDC_OKCODE'
                                '=BABA'.
perform bdc_field       using 'BDC_CURSOR'
                                'MAKT-MAKTX'.
perform bdc_field       using 'MBEW-BKLAS'
                                ITAB-BKLAS.
perform bdc_field       using 'MBEW-BWTTY'
                                ITAB-BWTTY.
perform bdc_field       using 'MBEW-EKLAS'
                                ITAB-EKLAS.
perform bdc_field       using 'MBEW-VPRSV'
                                ITAB-VPRSV.
perform bdc_field       using 'MBEW-PEINH'
                                '1'.
perform bdc_field       using 'MBEW-VERPR'
                                '800.00'.
perform bdc_field       using 'MBEW-STPRS'
                                '800.00'.
perform bdc_dynpro      using 'SAPLSPO1' '0300'.
perform bdc_field       using 'BDC_OKCODE'
                                '=YES'.
*//BDC INSERT
PERFORM BDC_TRANSACTION TABLES BDCDATA
                      USING 'MM01'. " MESSAGES INTO GT_MSG.
*// Text Header Data
CONCATENATE ITAB-MATNR '             000101'
                          INTO GT_HEAD-TDNAME .
GT_HEAD-TDOBJECT = 'MVKE' .
GT_HEAD-TDID     = '0001' .
GT_HEAD-TDSPRAS = SY-LANGU.
*// Sales Text
GW_TEXT-TDFORMAT = '00'.
GW_TEXT-TDLINE    = ITAB-TDLINE .
APPEND GW_TEXT TO GT_TEXT.
CALL FUNCTION 'SAVE_TEXT'
    EXPORTING
      CLIENT          = SY-MANDT
      HEADER          = GT_HEAD
      INSERT          = 'X'
      SAVEMODE_DIRECT = 'X'
      OWNER_SPECIFIED = ' '
    TABLES
      LINES           = GT_TEXT
    EXCEPTIONS
      ID              = 1
      LANGUAGE        = 2
      NAME            = 3
      OBJECT          = 4
      OTHERS          = 5.
IF SY-SUBRC <> 0.
    SKIP 2.
    FORMAT COLOR COL_NEGATIVE INVERSE ON.
      WRITE: / 'Unable to Insert Salestext for Material : ', ITAB-MATNR .
    FORMAT COLOR COL_NEGATIVE INVERSE OFF.
ENDIF.
CLEAR: GT_HEAD, GT_TEXT, GW_TEXT.
ENDFORM.                    "MM_UPLOAD
**　Program ID              ：              ZMAT_CREATE
**　Program Desc            ：              Material Master Creation Using BAPI
**　Process Overview        ：
**　Created By              ：              P.KARTHIKEYAN
**　Created Date            ：              17/08/2006
**　Company Name            ：              Infoview Technologies Limited
REPORT ZBAPI_MATERIAL_SAVETEXT LINE-SIZE 132 MESSAGE-ID ZMMBAPI.
*<<<DATA DECLEA FOR HEADER>>>>>>>>>>>>>>>>>>>>>>>>>>>>
****<<<<<Header segment with control information>>>>>>
DATA: HEADER LIKE BAPIMATHEAD.
*<<CLIENT DATA>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
*<<<<<<<<Client-specific material data>>>>>>>>>>>>>>>>
DATA: GT_CLIENTDATA LIKE BAPI_MARA.
**<<<<<<<<CLIENT DATA INITIAL>>>>>>>>>>>>>
**<<<<<<<<Information on update for CLIENTDATA>>>>>>>>
DATA: GT_CLIENTDATAX LIKE BAPI_MARAX.
***<<<<<PLANTDATA>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
**<<<<<<<Plant-specific material data>>>>>>>>>>>>>>>>>
DATA: GT_PLANTDATA LIKE BAPI_MARC.
**<<<<<<<<PLANT DATA INITIAL>>>>>>>>>>>>>>>
**<<<<<<<<Information on update for PLANTDATA>>>>>>>>
DATA:GT_PLANTDATAX LIKE BAPI_MARCX.
*<<<<<<<<<<<<<<<FORECASTPARAMETERS>>>>>>>>>>>>>>>>>>>
DATA: GT_FORECASTPARAMETERS LIKE BAPI_MPOP.
*<<<<<<<<<<<<<Information on update for FORECASTDATA>
*<<<<<<<<<<<<<<<FORECASTPARAMETERS DATA INTIAL>>>>>>>
DATA:GT_FORECASTPARAMETERSX LIKE BAPI_MPOPX.
*<<<<<<<<<<<<<<<PLANNING DATA >>>>>>>>>>>>>>>>>>>>>>
*<<<<<<<<<<<Information on update for PLANNINGDATA>>>
DATA:GT_PLANNINGDATA LIKE BAPI_MPGD.
*<<<<<<<<<<<<<<<PLANNING INITIAL >>>>>>>>>>>>>>>>>>>
DATA:GT_PLANNINGDATAX LIKE BAPI_MPGDX.
*<<<<<<<<<<<<<<<STORAGELOCATIONDATA>>>>>>>>>>
*<<<<<<<<<<<<Storage-location-specific material data>>
DATA: GT_STORAGELOCATIONDATA LIKE BAPI_MARD.
*<<<<<<Information on update for STORAGELOCATIONDATA>>
*<<<<<<<<<<<<<<<STORAGELOCATIONDATA INITIAL>>>>>>>>>>>
DATA:GT_STORAGELOCATIONDATAX LIKE BAPI_MARDX.
*<<<<<<<<<<<<<<<SALESDATA DATA   >>>>>>>>>>>>>>>>>>>>>
DATA: GT_SALESDATA LIKE BAPI_MVKE.
*<<<<<<<<<<<<<<<Information on update for SALESDATA>>>
*<<<<<<<<<<<<<<<SALESDATA DATA INITIAL >>>>>>>>>>>>>>
DATA: GT_SALESDATAX LIKE BAPI_MVKEX.
****<<<<<<<<<<<<Units of measure>>>>>>>>>>>>>>>>>>>>>>>
*****<<<<<<<<<<<<<<<GT_UNITSOFMEASURE>>>>>>>>>>>>>>>>>>
DATA: GT_UNITSOFMEASURE LIKE BAPI_MARM OCCURS 0 WITH HEADER LINE.
*****<<<<<<<<<<<<<<<GT_UNITSOFMEASUREX>>>>>>>>>>>>>>>>>
DATA: GT_UNITSOFMEASUREX LIKE BAPI_MARMX OCCURS 0 WITH HEADER LINE.
*****<<<<<<<<<<<<<<<SALES TEXT>>>>>>>>>>>>>>>>>>>>>>>>>>
DATA: GT_MATERIALLONGTEXT LIKE BAPI_MLTX OCCURS 0 WITH HEADER LINE.
*****<<<<<<<<<<<<<<<MATERIAL_DESC>>>>>>>>>>>>>>>>>>>>>>>>>>
DATA: MATERIAL_DESC LIKE BAPI_MAKT OCCURS 0 WITH HEADER LINE.
*******<<<<<<<RETURN PARAMETERS>>>>>>>>
DATA: ITAB_RETURN LIKE BAPIRET2 OCCURS 0 WITH HEADER LINE. "#EC NEEDED
******<<<<<<<WAREHOUSENUMBERDATA>>>>>>>>>>>>>>
DATA: GT_WAREHOUSENUMBERDATA LIKE     BAPI_MLGN.
******<<<<<<<WAREHOUSENUMBERDATA>>>>>>>>>>>>>>
DATA: GT_WAREHOUSENUMBERDATX LIKE     BAPI_MLGNX.
******<<<<<<<STORAGETYPEDATA>>>>>>>>>>>>>>>>>>
DATA: GT_STORAGETYPEDATA     LIKE     BAPI_MLGT.
******<<<<<<<STORAGETYPEDATAX>>>>>>>>
DATA: GT_STORAGETYPEDATAX     LIKE     BAPI_MLGTX.
***<<<BAPI_TRANSCATION COMMIT>>>>>>>>>>>>>>>>>
DATA: GT_RETURN TYPE BAPIRET2.                              "#EC NEEDED
***<<<<<<<<Valuation data>>>>>>>>>>>>>>>>>>>>>
DATA: GT_VALUATIONDATA like BAPI_MBEW. "Valuation data
***<<<<<<<<Valuation data>>>>>>>>>>>>>>>>>>>>>
DATA: GT_VALUATIONDATAX like BAPI_MBEWX. "Valuation data
data: gt_PRTDATA like BAPI_MFHM OCCURS 0 WITH HEADER LINE.
data: gt_PRTDATAX like BAPI_MFHM OCCURS 0 WITH HEADER LINE.
**<<<<International Article Numbers (EANs)>>>>
DATA: GT_INTERNATIONALARTNOS    LIKE    BAPI_MEAN OCCURS 0 WITH HEADER LINE,
**<<<<Tax classifications>>>>>>>>>>>>>>>>>>>>>>
      GT_TAXCLASSIFICATIONS          LIKE BAPI_MLAN OCCURS 0 WITH HEADER LINE,
      GT_RETURNMESSAGES              LIKE BAPI_MATRETURN2 OCCURS 0 WITH HEADER LINE.
**<<<<<<<<<<<<<<FLAT FILE INTERNAL TABLE USED FOR DOWNLOAD EXCEL FILE>>>>>>
DATA: BEGIN OF GT_FT_ITAB OCCURS 0,
      MATERIAL TYPE BAPIMATHEAD-MATERIAL , "Material Number
      IND_SECTOR TYPE BAPIMATHEAD-IND_SECTOR, "Industry Sector
      MATL_TYPE TYPE BAPIMATHEAD-MATL_TYPE , "Material Type
      BASIC_VIEW TYPE BAPIMATHEAD-BASIC_VIEW, "Basic Data View
      SALES_VIEW TYPE BAPIMATHEAD-SALES_VIEW , "Sales View
      PURCHASE_VIEW TYPE BAPIMATHEAD-PURCHASE_VIEW, "Purchasing View
      MRP_VIEW TYPE BAPIMATHEAD-MRP_VIEW ,"Material Requirements Planning (MRP) View
      FORECAST_VIEW TYPE BAPIMATHEAD-FORECAST_VIEW , "Forecasting View
      WORK_SCHED_VIEW TYPE BAPIMATHEAD-WORK_SCHED_VIEW ,"Work Scheduling View
      PRT_VIEW TYPE BAPIMATHEAD-PRT_VIEW , "Production Resources/Tools (PRT) View
      STORAGE_VIEW TYPE BAPIMATHEAD-STORAGE_VIEW , "Storage View
      WAREHOUSE_VIEW TYPE BAPIMATHEAD-WAREHOUSE_VIEW , "Warehouse Management View
      QUALITY_VIEW TYPE BAPIMATHEAD-QUALITY_VIEW, "Quality Management View
      ACCOUNT_VIEW TYPE BAPIMATHEAD-ACCOUNT_VIEW , "Accounting View
      COST_VIEW TYPE BAPIMATHEAD-COST_VIEW , "Costing View
*****<<<<<<<<CLIENT DATA>>>>>>>>>>>>>>>>>>>>
      MATL_GROUP TYPE BAPI_MARA-MATL_GROUP,   "Materialgroup
      OLD_MAT_NO TYPE BAPI_MARA-OLD_MAT_NO, "Old material number
      BASE_UOM TYPE BAPI_MARA-BASE_UOM,     "Base Unit of Measure
      BASE_UOM_ISO TYPE BAPI_MARA-BASE_UOM_ISO ,"Base unit of measure in ISO code
      DOCUMENT TYPE BAPI_MARA-DOCUMENT, "Document number
      DOC_TYPE TYPE BAPI_MARA-DOC_TYPE, "Document type
      DOC_VERS TYPE BAPI_MARA-DOC_VERS, "Document version
      DOC_FORMAT TYPE BAPI_MARA-DOC_FORMAT,"Page format of document
      DOC_CHG_NO TYPE BAPI_MARA-DOC_CHG_NO, "Document change number
      PAGE_NO TYPE BAPI_MARA-PAGE_NO, "Page number of document
      PROD_MEMO TYPE BAPI_MARA-PROD_MEMO , "Production/Inspection Memo
      PAGEFORMAT TYPE BAPI_MARA-PAGEFORMAT, "Page Format of Production Memo
      SIZE_DIM TYPE BAPI_MARA-SIZE_DIM, "Size/dimensions
      BASIC_MATL TYPE BAPI_MARA-BASIC_MATL, "Basic Material
      STD_DESCR TYPE BAPI_MARA-STD_DESCR, "Industry Standard Description
      DSN_OFFICE TYPE BAPI_MARA-DSN_OFFICE, "Laboratory/design office
      NET_WEIGHT TYPE BAPI_MARA-NET_WEIGHT, " "Net weight
      UNIT_OF_WT TYPE BAPI_MARA-UNIT_OF_WT, "Weight Unit
      DIVISION TYPE BAPI_MARA-DIVISION, "Division
      CAD_ID TYPE BAPI_MARA-CAD_ID, "Competitor
      PROD_ALLOC TYPE BAPI_MARA-PROD_ALLOC, "Procurement rule
      HAZMATPROF TYPE BAPI_MARA-HAZMATPROF, "Source of Supply
      HIGH_VISC TYPE BAPI_MARA-HIGH_VISC, "Allowed packaging weight
      LOOSEORLIQ TYPE BAPI_MARA-LOOSEORLIQ, "Long material number
      PERIOD_IND_EXPIRATION_DATE TYPE BAPI_MARA-PERIOD_IND_EXPIRATION_DATE,"Expiration Dat
      ITEM_CAT TYPE BAPI_MARA-ITEM_CAT, "General item category group
      EXTMATLGRP TYPE BAPI_MARA-EXTMATLGRP, "External Material Group
*****CLIENT DATA INITIAL>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
      MATL_GROUPX TYPE BAPI_MARAX-MATL_GROUP, "Materialgroup
      OLD_MAT_NOX TYPE BAPI_MARAX-OLD_MAT_NO, "Old material number
      BASE_UOMX TYPE BAPI_MARAX-BASE_UOM, "Base Unit of Measure
      BASE_UOM_ISOX TYPE BAPI_MARAX-BASE_UOM_ISO, "Base unit of measure in ISO code
      DOCUMENTX TYPE BAPI_MARAX-DOCUMENT, "Document number
      DOC_TYPEX TYPE BAPI_MARAX-DOC_TYPE, "Document type
      DOC_VERSX TYPE BAPI_MARAX-DOC_VERS, "Document version
      DOC_FORMATX TYPE BAPI_MARAX-DOC_FORMAT,"Page format of document
      DOC_CHG_NOX TYPE BAPI_MARAX-DOC_CHG_NO, "Document change number
      PAGE_NOX TYPE BAPI_MARAX-PAGE_NO, "Production/Inspection Memo
      PROD_MEMOX TYPE BAPI_MARAX-PROD_MEMO, "Page Format of Production Memo
      SIZE_DIMX TYPE BAPI_MARAX-SIZE_DIM, "Size/dimensions
      BASIC_MATLX TYPE BAPI_MARAX-BASIC_MATL, "Basic Material
      STD_DESCRX TYPE BAPI_MARAX-STD_DESCR, "Industry Standard Description
      DSN_OFFICEX TYPE BAPI_MARAX-DSN_OFFICE, "Laboratory/design office
      NET_WEIGHTX TYPE BAPI_MARAX-NET_WEIGHT, " "Net weight
      UNIT_OF_WTX TYPE BAPI_MARAX-UNIT_OF_WT, "Weight Unit
      DIVISIONX TYPE BAPI_MARAX-DIVISION, "Division
      PROD_HIERX TYPE BAPI_MARA, "Competitor
      CAD_IDX TYPE BAPI_MARAX-PROD_HIER, "Procurement rule
      ALLWD_VOLX TYPE BAPI_MARAX-ALLWD_VOL, "Allowed packaging
      PVALIDFROMX TYPE BAPI_MARAX-PVALIDFROM, "Date from which the cross-plant material status
      SVALIDFROMX   TYPE BAPI_MARAX-SVALIDFROM, "Date from which the X-distr.-chain material stat
      PROD_ALLOCX TYPE BAPI_MARAX-PROD_ALLOC,
      HIGH_VISCX TYPE BAPI_MARAX-HIGH_VISC,"Indicator: Highly Viscous
      LOOSEORLIQX TYPE BAPI_MARAX-LOOSEORLIQ, "Indicator: In Bulk/Liquid
      INV_MAT_NO_EXTERNALX TYPE BAPI_MARAX-INV_MAT_NO_EXTERNAL,
      EXTMATLGRPX TYPE BAPI_MARAX-EXTMATLGRP, " External Material Group
****<<<<<<<<<<<<<<PLANTDATA>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
      PLANT TYPE BAPI_MARC-PLANT, " Plant
      MRP_TYPE TYPE BAPI_MARC-MRP_TYPE, "MRP Type
      REORDER_PT TYPE BAPI_MARC-REORDER_PT, "Reorder Point
      SAFETY_STK TYPE BAPI_MARC-SAFETY_STK, "Safety stock
      MINLOTSIZE TYPE BAPI_MARC-MINLOTSIZE, "Minimum lot size
****<<<<<<<<<<<<<<PLANTDATA INITIAL>>>>>>>>>>>>>>>>>>>>>>
      PLANTX TYPE BAPI_MARCX-PLANT, " Plant
      MRP_TYPEX TYPE BAPI_MARCX-MRP_TYPE, "MRP Type
      REORDER_PTX TYPE BAPI_MARCX-REORDER_PT, "Reorder Point
      SAFETY_STKX TYPE BAPI_MARCX-SAFETY_STK, "Safety stock
      MINLOTSIZEX TYPE BAPI_MARCX-MINLOTSIZE, "Minimum lot size
*<<<<<<<<<<<<<<<FORECASTPARAMETERS>>>>>>>>>>
      F_PLANT TYPE BAPI_MPOPX-PLANT, " Plant
*<<<<<<<<<<<<<<<FORECASTPARAMETERS DATA INTIAL>>>>>>>>>>
      F_PLANTX TYPE BAPI_MPOPX-PLANT, " Plant
*<<<<<<<<<<<<<<<PLANNING DATA >>>>>>>>>>>>>>>>>>>>>>>>>
      P_PLANT TYPE BAPI_MPGD-PLANT, " Plant
*<<<<<<<<<<<<<<<PLANNING DATA INITAIAL >>>>>>>>>>>>>>>
      P_PLANTX TYPE BAPI_MPGDX-PLANT, " Plant
*<<<<<<<<<<<<<<<STORAGELOCATIONDATA>>>>>>>>>>>>>>>>>>>>
      S_PLANT   TYPE BAPI_MARD-PLANT, " Plant
      S_STGE_LOC TYPE BAPI_MARD-STGE_LOC,
*<<<<<<<<<<<<<<<STORAGELOCATIONDATA INITIAL>>>>>>>>>>
      S_PLANTX   TYPE BAPI_MARDX-PLANT, " Plant
      S_STGE_LOCX TYPE BAPI_MARDX-STGE_LOC, "Storage Location
*<<<<<<<<<<<<<<<SALESDATA DATA   >>>>>>>>>>
      SALES_ORG TYPE BAPI_MVKE-SALES_ORG, "Sales Organization
      DISTR_CHAN TYPE BAPI_MVKE-DISTR_CHAN, "Distribution Channel
*<<<<<<<<<<<<<<<SALESDATA DATA INITIAL >>>>>>>>>>
      SALES_ORGX TYPE BAPI_MVKEX-SALES_ORG, "Sales Organization
      DISTR_CHANX TYPE BAPI_MVKEX-DISTR_CHAN, "Distribution Channel
*****<<<<<<<<<<<<<<<MATERIAL_DESC>>>>>>>>>>>>>>>>>>>>>>>>>>
      LANGU   TYPE BAPI_MAKT-LANGU , "Language Key
      LANGU_ISO TYPE BAPI_MAKT-LANGU_ISO , "Language according to ISO 639
      MATL_DESC TYPE BAPI_MAKT-MATL_DESC , "Material Description
*****<<<<<<<<<<<<<<<GT_UNITSOFMEASURE>>>>>>>>>>>>>>>>>>>>>>>>>>
      ALT_UNIT TYPE BAPI_MARM-ALT_UNIT,
                 "Alternative Unit of Measure for Stockkeeping Unit
      ALT_UNIT_ISO TYPE BAPI_MARM-ALT_UNIT,
                 "Alternative Unit of Measure for Stockkeeping Unit
******<<<<<<<<<<<<<<<GT_UNITSOFMEASUREX>>>>>>>>>>>>>>>>>>>>>>>>>>
      UNIT TYPE BAPI_MARMX-ALT_UNIT,
                 "Alternative Unit of Measure for Stockkeeping Unit
      UNIT_ISO TYPE BAPI_MARMX-ALT_UNIT_ISO,
        "Alternative unit of measure to stockkeeping unit in ISO code
*****<<<<<<<<<<<<<<<SALES TEXT>>>>>>>>>>>>>>>>>>>>>>>>>>
      APPLOBJECT TYPE BAPI_MLTX-APPLOBJECT, "Texts: application object
      TEXT_NAME TYPE BAPI_MLTX-TEXT_NAME, "Name
      TEXT_ID TYPE BAPI_MLTX-TEXT_ID, "Text ID
      S_LANGU TYPE BAPI_MLTX-LANGU, "Language key
      TEXT_LINE TYPE BAPI_MLTX-TEXT_LINE, "Text line
END OF GT_FT_ITAB,
TEXT(243), " Return Message
WA_HEAD LIKE THEAD, " SalesText Header Info
ITAB_TLINE LIKE STANDARD TABLE OF TLINE WITH HEADER LINE, " SalesText
ERROR_REC TYPE I, " Error Records Counter
SUCCESS_REC TYPE I, " Successful Records Counter
TOT_REC TYPE I. " Total Records Counter
selection block for EXCEL UPLOAD FILE>>>>>>>>>>>>>>>>>>>>>>>>
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-000.
PARAMETERS FILE TYPE IBIPPARMS-PATH OBLIGATORY .
SELECTION-SCREEN END OF BLOCK B1.
*<<<<AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE .>>>>>>>>>>>>
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE .
CALL FUNCTION 'F4_FILENAME'
    EXPORTING
      PROGRAM_NAME = SYST-CPROG
      DYNPRO_NUMBER = SYST-DYNNR
    IMPORTING
      FILE_NAME     = FILE.
**<<<<<<<<<<<<<<<<<START-OF-SELECTION.>>>>>>>>>>>>>>>>>>>>>>>>>>>
START-OF-SELECTION.
CALL FUNCTION 'WS_UPLOAD'                                 "#EC *
    EXPORTING
      FILENAME                = FILE
      FILETYPE                = 'DAT'
    TABLES
      DATA_TAB                = GT_FT_ITAB
    EXCEPTIONS
      CONVERSION_ERROR        = 1
      FILE_OPEN_ERROR         = 2
      FILE_READ_ERROR         = 3
      INVALID_TYPE            = 4
      NO_BATCH                = 5
      UNKNOWN_ERROR           = 6
      INVALID_TABLE_WIDTH     = 7
      GUI_REFUSE_FILETRANSFER = 8
      CUSTOMER_ERROR          = 9
      NO_AUTHORITY            = 10
      OTHERS                  = 11.
IF SY-SUBRC <> 0 .
    MESSAGE E000.
ENDIF.
SKIP 3.
FORMAT COLOR COL_HEADING INVERSE ON.
WRITE 40 TEXT-001.
FORMAT COLOR COL_HEADING INVERSE OFF.
SKIP 1.
FORMAT COLOR COL_NEGATIVE INVERSE ON.
WRITE :/3 TEXT-002, 13 SY-MANDT , 104 TEXT-003, 111 SY-UNAME,
            /3 TEXT-004, 13 SY-DATUM , 104 TEXT-005, 111 SY-UZEIT.
FORMAT COLOR COL_NEGATIVE INVERSE OFF.
SKIP 3.
LOOP AT GT_FT_ITAB.
    HEADER-MATERIAL = GT_FT_ITAB-MATERIAL .                 " 'M-32'.
    HEADER-IND_SECTOR = GT_FT_ITAB-IND_SECTOR .          " 'C'.
    HEADER-MATL_TYPE = GT_FT_ITAB-MATL_TYPE .             " 'FERT'.
    HEADER-BASIC_VIEW = GT_FT_ITAB-BASIC_VIEW .            " 'X'.
    HEADER-SALES_VIEW = GT_FT_ITAB-SALES_VIEW.             " 'X'.
    HEADER-PURCHASE_VIEW = GT_FT_ITAB-PURCHASE_VIEW .    " 'X'.
    HEADER-MRP_VIEW = GT_FT_ITAB-MRP_VIEW .                      " 'X'.
    HEADER-FORECAST_VIEW = GT_FT_ITAB-FORECAST_VIEW .    " 'X'.
    HEADER-WORK_SCHED_VIEW = GT_FT_ITAB-WORK_SCHED_VIEW ." 'X'.
    HEADER-PRT_VIEW = GT_FT_ITAB-PRT_VIEW .                          " 'X'.
    HEADER-STORAGE_VIEW = GT_FT_ITAB-STORAGE_VIEW .           " 'X'.
    HEADER-WAREHOUSE_VIEW = GT_FT_ITAB-WAREHOUSE_VIEW .   " 'X'.
    HEADER-QUALITY_VIEW = GT_FT_ITAB-QUALITY_VIEW .             " 'X'.
    HEADER-ACCOUNT_VIEW = GT_FT_ITAB-ACCOUNT_VIEW .        " 'X'.
    HEADER-COST_VIEW = GT_FT_ITAB-COST_VIEW .                     " 'X'.
*<<CLIENT DATA>>>>>>>>>>>>>>>>>>>>>>>>>>>>
    GT_CLIENTDATA-MATL_GROUP = GT_FT_ITAB-MATL_GROUP .      " '01'.
    GT_CLIENTDATA-OLD_MAT_NO = GT_FT_ITAB-OLD_MAT_NO .      " '1000'.
    GT_CLIENTDATA-BASE_UOM = GT_FT_ITAB-BASE_UOM .         " 'EA'.
    GT_CLIENTDATA-BASE_UOM_ISO = GT_FT_ITAB-BASE_UOM_ISO ." 'EA'.
    GT_CLIENTDATA-DOCUMENT = GT_FT_ITAB-DOCUMENT .         "'MATERIAL'.
    GT_CLIENTDATA-DOC_TYPE = GT_FT_ITAB-DOC_TYPE .            " 'A'.
    GT_CLIENTDATA-DOC_VERS = GT_FT_ITAB-DOC_VERS .          " '5'.
    GT_CLIENTDATA-DOC_FORMAT = GT_FT_ITAB-DOC_FORMAT .      " '5'.
    GT_CLIENTDATA-DOC_CHG_NO = GT_FT_ITAB-DOC_CHG_NO .      " 'A4'.
    GT_CLIENTDATA-PAGE_NO = GT_FT_ITAB-PAGE_NO    .        " '1'.
    GT_CLIENTDATA-PROD_MEMO = GT_FT_ITAB-PROD_MEMO .      " 'MEMO'.
    GT_CLIENTDATA-PAGEFORMAT = GT_FT_ITAB-PAGEFORMAT .      " '1'.
    GT_CLIENTDATA-SIZE_DIM = GT_FT_ITAB-SIZE_DIM .          " '50/50'.
    GT_CLIENTDATA-BASIC_MATL = GT_FT_ITAB-BASIC_MATL .       " 'BASIS MATERIAL1'.
    GT_CLIENTDATA-STD_DESCR = GT_FT_ITAB-STD_DESCR .         " 'MATERIAL DESC'.
    GT_CLIENTDATA-DSN_OFFICE = GT_FT_ITAB-DSN_OFFICE .      " '001'.
    GT_CLIENTDATA-NET_WEIGHT = GT_FT_ITAB-NET_WEIGHT .      " 1000.
    GT_CLIENTDATA-UNIT_OF_WT = GT_FT_ITAB-UNIT_OF_WT .         " 'KG'.
    GT_CLIENTDATA-TRANS_GRP = '0001'.
    GT_CLIENTDATA-DIVISION =         GT_FT_ITAB-DIVISION . " '01'.
    GT_CLIENTDATA-QTY_GR_GI = '9000'.
    GT_CLIENTDATA-CAD_ID = GT_FT_ITAB-CAD_ID .                      " 'X'.
    GT_CLIENTDATA-ALLWD_VOL = '9000'.
    GT_CLIENTDATA-PROD_ALLOC = GT_FT_ITAB-PROD_ALLOC .      " 'PA01'.
    GT_CLIENTDATA-HAZMATPROF = GT_FT_ITAB-HAZMATPROF .      " '001'.
    GT_CLIENTDATA-HIGH_VISC = GT_FT_ITAB-HIGH_VISC .             " 'X'.
    GT_CLIENTDATA-LOOSEORLIQ = GT_FT_ITAB-LOOSEORLIQ .     " 'X'.
    GT_CLIENTDATA-PERIOD_IND_EXPIRATION_DATE = GT_FT_ITAB-PERIOD_IND_EXPIRATION_DATE . " 'D'.
    GT_CLIENTDATA-ITEM_CAT = 'NORM' . "GT_FT_ITAB-ITEM_CAT .   " 'NORM'.
    GT_CLIENTDATA-EXTMATLGRP = GT_FT_ITAB-EXTMATLGRP .      " '01'.
**<<<<<<<<CLIENT DATA INITIAL>>>>>>>>>>>>>
    GT_CLIENTDATAX-MATL_GROUP = 'X'.
    GT_CLIENTDATAX-OLD_MAT_NO = GT_FT_ITAB-OLD_MAT_NO .        " 'X'.
    GT_CLIENTDATAX-BASE_UOM = GT_FT_ITAB-BASE_UOM .              " 'X'.
    GT_CLIENTDATAX-BASE_UOM_ISO = GT_FT_ITAB-BASE_UOM_ISO .   "'X'.
    GT_CLIENTDATAX-DOCUMENT = GT_FT_ITAB-DOCUMENT .            "'X'.
    GT_CLIENTDATAX-DOC_TYPE = GT_FT_ITAB-DOC_TYPE .               "'X'.
    GT_CLIENTDATAX-DOC_VERS = GT_FT_ITAB-DOC_VERS .               "'X'.
    GT_CLIENTDATAX-DOC_FORMAT = GT_FT_ITAB-DOC_FORMAT .      "'X'.
    GT_CLIENTDATAX-DOC_CHG_NO = GT_FT_ITAB-DOC_CHG_NO .      "'X'.
    GT_CLIENTDATAX-PAGE_NO = GT_FT_ITAB-PAGE_NO .                  "'X'.
    GT_CLIENTDATAX-PROD_MEMO = GT_FT_ITAB-PROD_MEMO .        "'X'.
    GT_CLIENTDATAX-PAGEFORMAT = 'X'.
    GT_CLIENTDATAX-SIZE_DIM = GT_FT_ITAB-SIZE_DIM .                    "'X'
    GT_CLIENTDATAX-BASIC_MATL = GT_FT_ITAB-BASIC_MATL.           "'X'.
    GT_CLIENTDATAX-STD_DESCR = GT_FT_ITAB-STD_DESCR .            "'X'.
    GT_CLIENTDATAX-DSN_OFFICE = GT_FT_ITAB-DSN_OFFICE .           "'X'.
    GT_CLIENTDATAX-NET_WEIGHT = GT_FT_ITAB-NET_WEIGHT .           "'X'.
    GT_CLIENTDATAX-UNIT_OF_WT = GT_FT_ITAB-UNIT_OF_WT .            "'X'.
    GT_CLIENTDATAX-DIVISION = GT_FT_ITAB-DIVISION .                    "'X'.
    GT_CLIENTDATAX-PROD_HIER = GT_FT_ITAB-PROD_HIERX .              "'X'.
    GT_CLIENTDATAX-CAD_ID = GT_FT_ITAB-CAD_ID .                           "'X'.
    GT_CLIENTDATAX-ALLWD_VOL = GT_FT_ITAB-ALLWD_VOLX .             "'X'.
    GT_CLIENTDATAX-PROD_ALLOC = GT_FT_ITAB-PROD_ALLOCX .         "'X'.
    GT_CLIENTDATAX-HAZMATPROF = 'X'.
    GT_CLIENTDATAX-HIGH_VISC = GT_FT_ITAB-HIGH_VISCX .                "'X'.
    GT_CLIENTDATAX-LOOSEORLIQ = GT_FT_ITAB-LOOSEORLIQX .        "'X'.
    GT_CLIENTDATAX-ITEM_CAT = 'X'.
    GT_CLIENTDATAX-INV_MAT_NO_EXTERNAL = GT_FT_ITAB-INV_MAT_NO_EXTERNALX .      "'X'.
    GT_CLIENTDATAX-EXTMATLGRP = GT_FT_ITAB-EXTMATLGRPX .         " 'X'.
    GT_CLIENTDATAX-TRANS_GRP = 'X'.
    GT_CLIENTDATAX-QTY_GR_GI = 'X'.
    GT_CLIENTDATAX-ALLWD_VOL = 'X'.
***<<<<<PLANTDATA>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
    GT_PLANTDATA-PLANT = GT_FT_ITAB-PLANT .                 " '0001'.
    GT_PLANTDATA-MRP_TYPE = GT_FT_ITAB-MRP_TYPE .       "'ND'.
    GT_PLANTDATA-PUR_GROUP = '001'.                              "Purchasing Group
    GT_PLANTDATA-PROC_TYPE = 'F'.                                  "Procurement Type
    GT_PLANTDATA-SPPROCTYPE = '10'.                              "Special procurement type
   GT_PLANTDATA-REORDER_PT = GT_FT_ITAB-REORDER_PT .       "8000.
    GT_PLANTDATA-SAFETY_STK = 2.
    GT_PLANTDATA-LOADINGGRP = '0001'.                           "Loading group
    GT_PLANTDATA-MINLOTSIZE = GT_FT_ITAB-MINLOTSIZE .       "6000.
**<<<<<<<<PLANT DATA INITIAL>>>>>>>>>>>>>
    GT_PLANTDATAX-PLANT = GT_FT_ITAB-PLANTX.                " '0001'.
    GT_PLANTDATAX-MRP_TYPE = GT_FT_ITAB-MRP_TYPEX.      " 'X'.
    GT_PLANTDATAX-PUR_GROUP = 'X'.                                 "Purchasing Group
    GT_PLANTDATAX-PROC_TYPE = 'X'.                                  "Procurement Type
    GT_PLANTDATAX-SPPROCTYPE = 'X'.                               "Special procurement type
    GT_PLANTDATAX-LOADINGGRP = 'X'.                               "Loading group
   GT_PLANTDATAX-REORDER_PT = GT_FT_ITAB-REORDER_PTX.   " 'X'.
    GT_PLANTDATAX-SAFETY_STK = GT_FT_ITAB-SAFETY_STKX.      "'X'.
    GT_PLANTDATAX-MINLOTSIZE = GT_FT_ITAB-MINLOTSIZEX.       "'X'.
*<<<<<<<<<<<<<<<FORECASTPARAMETERS>>>>>>>>>>
    GT_FORECASTPARAMETERS-PLANT = GT_FT_ITAB-F_PLANT.      " '0001'.
*<<<<<<<<<<<<<<<FORECASTPARAMETERS DATA INTIAL>>>>>>>>>>
    GT_FORECASTPARAMETERSX = '0001'.
    GT_FORECASTPARAMETERSX-PLANT = GT_FT_ITAB-F_PLANTX.    " '0001'.
*<<<<<<<<<<<<<<<PLANNING DATA >>>>>>>>>>
*GT_PLANNINGDATA-PLANT = GT_FT_ITAB-P_PLANT.                    " '0001'.
    GT_PLANNINGDATA-PLANT =   '0001'.
*<<<<<<<<<<<<<<<PLAN

Migration of SAPscripts to smartforms and its advantages

Hi Folks,
Can we convert a SAPscript into PDF and send it in mail as an attachment like what we do using smartform. Folks could you please provide me some knowledge which will help me preparing a document for the client to convience them how using smartforms is always better than using a sapscript and they should migrate all the SAPscript to the smartform.
Thanks & reagrds,

Advantages of smartforms,
SAP Smart Forms have the following advantages:
1. The adaption of forms is supported to a large extent by graphic tools for layout and logic, so that no programming knowledge is necessary (at least 90% of all adjustments). Therefore, power user forms can also make configurations for your business processes with data from an SAP system. Consultants are only required in special cases.
2. Displaying table structures (dynamic framing of texts)
3. Output of background graphics, for form design in particular the use of templates which were scanned.
4. Colored output of texts
5. User-friendly and integrated Form Painter for the graphical design of forms
6. Graphical Table Painter for drawing tables
7. Reusing Font and paragraph formats in forms (Smart Styles)
8. Data interface in XML format (XML for Smart Forms, in short XSF)
9. Form translation is supported by standard translation tools
10. Flexible reuse of text modules
11. HTML output of forms (Basis release 6.10)
12. Interactive Web forms with input fields, pushbuttons, radio buttons, etc. (Basis-Release 6.10)
Source SAP-img.com

SAPScript or SMARTFORM for Purchage Requisition and Program in MM?

Dear Abapers,
Could you please tell me whether SAP Provided any SAPScript or SMARTFORM for Purchage Requisition form and Program in MM?
Thanks in advance.
Sekhar

Hi Chandra sekar
MEDRUCK this is the standard script and
SAPFM06P driver program for all type of PO.
If you want to know this... check here...
Goto NACE T-code
Select EF Purchase Order,
then click output types button in toolbar,
select NEU Purchase order ,
then doubleclick Processing routines folder in left side,
thn there u can find the details of PO related script forms and driver programs.
Thanx
Bgan.

How do we debug a sapscript and a smartform

how do we debug a sapscript and a smartform.

hi,
1) DEBUG Smartform:
One way to debug smartform is to debug the Function Module of that smartforms. If you want to debug particular smartform node that the solution would be, insert a "Program Line" just above the node you want to debug and this program line write a normal abap breakpoint. So whenever you call the smartforms, it will stop at this breakpoint and you can debug onwards.
2). DEBUG SAPScript
They are two ways to debug the SAPScript.
1). Use Tools - Word Processing - Layout Set (SE71). Enter name of layout set and then Utilities - Activate Debugger.
It is of no consequence which layoutset you enter when selecting the SAPscript debugger. (Menu path: Tools-Wordprocessing - Forms, Utilities - Activate Debugger) The next layoutset called will invoke the debugger.
2). Another way to set the SAPScript debugger is to run program RSTXDBUG.
When you debug Print program it is same as you debug any other ABAP program.
While when you debug SAPScript, you actually debug the code ( scripting) you have written SAPScript Form.
rgds
anver
pls mark points if hlped

Difference between HR Forms Smartforms sapscript and PE51

Hai all,
Could anyone give me the exact difference between HR Forms Smartforms sapscript and PE51.
Thanks in advance,
S.Jenibalet.

HR Forms
The Layout Editor can be used is Adobe Designing tool or Smart form Tool.
The HR Forms Workplace (which will be called the Forms Workplace from now
on) will enable you in future to create flexible reports with an attractive layout for HR master data,
personnel time data, and payroll results.
Smartforms
SMARTFORMS as the SAPScript successor tool is also used to generate formatted documents which can contain logos, tables and other formatting objects. And this documents can look like a pre-printed documents that normal ABAP codes cannot possible.The SAP SmartForms replace the SAPscript forms. SAP SmartForms offer the following advantages: 1)Creating and maintaining forms requiring half the time 2) Adapting forms without any programming knowledge due to entirely graphical user interface 3) Web Publishing using the generated XML output Here you will get some SAP SMARTFORMS tutorials and PDF guides to download.
You use SAP Smart Forms to create and maintain forms for mass printing in SAP Systems. As
output medium SAP Smart Forms support a printer, a fax, e-mail, or the Internet (by using the
generated XML output).
sapscript
SAPSCRIPTS are used to generate formatted documents which can contain logos, tables and other formatting objects. And this documents can look like a pre printed documents that normal ABAP codes cannot possible. SAPscript comprises these five components: 1)an editor for entering and editing the lines of a text. 2)styles and forms for print layout. 3)the composer as central output module. 4)a programming interface 5)several database tables for storing texts, styles and forms. Here you will get some SAPSCRIPTS tutorials and Pdf guides to download.
PE51
There are Limitataions for PE51.You can use only for HR module specifically for Payroll.

Sapscripts and smartforms

Similar Messages

Maybe you are looking for