Do varying issue in unicode programs(ECC6.0)

Hi,
I am facing the error "Could not specify the range automatically. This means you need a RANGE addition." for the following code.
DATA : W_STRAT_LANC1 LIKE T16FD-FRGCT,  "stratégie de lancement 1 +DJA
         W_STRAT_LANC2 LIKE T16FD-FRGCT
DO 3 TIMES
     VARYING T16FS-FRGCX   FROM T16FS-FRGC1   NEXT T16FS-FRGC2 RANGE T16FS
     VARYING W_STRAT_LANCX FROM W_STRAT_LANC1 NEXT W_STRAT_LANC2.
Please send me a possible solution.
I have gone through many posts but this is a new issue.

Hi,
This is not a correct way of using the varying addition. Your fields should belong to the same structure...
something like:
TYPES: BEGIN OF ts_lanc,
         lanc1 TYPE frgct,
         lanc2 TYPE frgct,
        END OF ts_lanc.
DATA: w_strat_lancx TYPE t16fd-frgct,
      w_t16fs-frgcx TYPE t16fs-frgsx.
DATA: ws_t16fs TYPE t16fs,
      ws_lanc  TYPE ts_lanc.
DO 3 TIMES
   VARYING w_t16fs-frgcx FROM ws_t16fs-frgc1 NEXT ws_t16fs-frgc2 RANGE ws_t16fs
   VARYING w_strat_lancx FROM ws_lanc-lanc1  NEXT ws_lanc-lanc2  RANGE ws_lanc.
ENDDO.
Kr,
Manu.

Similar Messages

  • ABAP program issues..Unicode program "ITAB" must have the same structure?

    Dear Expert,
    I coded below code in se38, but system give below error message, could please kindly advie issue reason? Thanks!!
         Error message: A line of "ITAB" and "LINE" are not mutually convertible. In a Unicode program "ITAB" must have the same structure layout as "LINE" independent of the length of a . Unicode character. Unicode character.          
    REPORT  ZTEST_HIHIHI.
    Data: begin of line,
    num type i,
    sqr type i,
    end of line,
    itab type standard table of line with key table_line.
    Do 5 times.
    line-num = sy-index.
    line-sqr = sy-index ** 2.
    append line to itab.
    enddo.
    loop at itab into line.
    write: / line-num, line-sqr.
    endloop.
    clear itab.

    Hello Hoo Laa,
    This is because the way you have defined LINE, it is a structure & not a data type. Hence you are facing the issue
    You have to change the data declaration to:
    itab LIKE STANDARD TABLE OF line WITH KEY table_line.
    BR,
    Suhas

  • Variant Issue in Abap Program

    I came across this strange issue with Variants: Please let me know if anyone has come cross this issue.
    Issue:   I select a variant for a Zreport which has email address in the selection screen. Now i select another variant in which there is no email address but still i see the email address. basically the first variant value is being passed when i select the second variant.
    Code:
    SELECTION-SCREEN : BEGIN OF BLOCK em WITH FRAME TITLE text-307.
    PARAMETERS:  p_send TYPE char1 AS CHECKBOX DEFAULT ''.
    SELECT-OPTIONS   :s_emails FOR somlreci1-receiver NO INTERVALS. 
    SELECTION-SCREEN : END OF BLOCK em.

    Hi Vasudev,
    I have not seen any issue like that before,
    Try creating the variant again,
    Step1: enter an email address and then save
    Step2: name the variant as var1 and then save
    Step3: now remove the email address and then save
    Step4: name the variant as var2 and then save.
    Step5: refresh by /n followed by the T code
    Step6: try it out now with both the variants
    Revert for further clarification
    Thanks
    Sri

  • Unicode Programs

    Hi Friends,
                     I would like to know the difference between normal programming and Unicode programming.What are the options available for Unicode correction in Abap editor.small program explaining the Unicode.
    Regards,
    Pradeep P

    Hi,
    In the past, SAP developers used various codes to encode characters of different alphabets, for example, ASCII, EBCDI, or double-byte code pages.
    Using these character sets, you can account for each language relevant to the SAP System. However, problems occur if you want to merge texts from different incompatible character sets in a central system. Equally, exchanging data between systems with incompatible character sets can result in unprecedented situations.
    One solution to this problem is to use a code comprising all characters used on earth. This code is called Unicode (ISO/IEC 10646) and consists of at least 16 bit = 2 bytes, alternatively of 32 bit = 4 bytes per character. Although the conversion effort for the SAP kernel and applications is considerable, the migration to Unicode provides great benefits in the long run:
    BENEFITS
    1 The Internet (www) and consequently also mySAP.com are entirely based on Unicode, which thus is a basic requirement for international competitiveness. Unicode allows all SAP users to install a central system that covers all business processes worldwide.
    2 Companies using different distributed systems frequently want to aggregate their worldwide corporate data. Without Unicode, they would be able to do this only to a limited degree.   With Unicode, you can use multiple languages simultaneously at a single frontend computer.
    3 Unicode is required for cross-application data exchange without loss of data due to incompatible character sets. One way to present documents in the World Wide Web (www) is XML, for example.
    UNICODE Attribute has become a Mandatory thing in ECC6.0 to check the unicode errors related to different languages.
    especially during the upgrades from lower version to ECC versions, this is important attribute as most of the things become obsolete or changed.
    some unicode related errors are:
    THEN...UNTIL...CORRESPONDING are obsolete
    &1 must be a character type data object
    In Unicode, the addition IN BYTE/CHARACTER MODE must be specified
    DO...VARYING is not supported
    The access and storage modes ACCESS and MODE must be specified
    TRANSLATE…CODE PAGE/NUMBER FORMAT not allowed
    WHILE...VARY is not supported
    The data type/structure objetcs in 'ADD' statement should have same type
    IN TEXT MODE the addition ENCODING must be specified
    The ENCODING addition is not valid in BINARY mode
    The IGNORING CONVERSION ERRORS addition is not valid in BINARY mode
    The REPLACEMENT CHARACTER addition is not valid in BINARY mode
    UNICODE attribute in ABAP Editor   isan option set in the program to enable the code for Unicode Compatibility. So if you select this checkbox the system automatically checks for any unicode syntax errors.
    For example if you are using Open dataset statement if you dont select unicode check it will not give an error for the following statement.
    Open datatset for input in text mode.
    Regards,
    Raj.

  • Issue in submit program

    Hi all,
    The following is the issue in submit program:
    I am calling two programs /PBS/RIQMEL20  ( /pbs/iw59 ) and  /PBS/RIAUFK20 ( /pbs/iw39 ) using submit programs in my z program.
    I have created a layout /ZDEL56  for both programs. If I run submit program for /PBS/RIAUFK20 ( /pbs/iw39 ) I am getting the o/p in desired format ( As specified in the layout ).
    How ever for program /PBS/RIQMEL20  ( /pbs/iw59 ) submit program is giving an error saying that layout is not found.
    There is no difference b/w these two programs except that submitting program name is different.
    The txn /pbs/iw59 when executed in background is giving the desired result. But when I try using submit program it is failing.
    Can you please tell what mite be the problem?
    Following is the sample piece of code.
    submit /PBS/RIQMEL20
    with pbs_apar EQ '1'
    WITH VARIANT EQ '/ZDEL56'
    Pointers will be highly appreciated.
    Thanks,
    Shiva.

    Hi,
    In this case you need to use another internal table which is of type S_VBELN . Ex : it_vbeln.
    In that you have to append the record
    wa_vbeln-sign = 'I'
    wa_vbeln-option = 'EQ'
    wa_vbeln-low = w_inv.
    append wa_vbeln to it_vbeln.
    now use this
    submit B VIA SELECTION-SCREEN
    with P_DAYS = '4'
    with P_KALSM = 'ZATCIN'
    with S_VBELN = it_vbeln.
    Now the new record will be appended with the values which are passing,. SO u wil have two rows in the S_VBELN.
    Regards,
    Venkatesh.

  • Problems realted to changing the language for non-Unicode programs from one into anther.

    Hi,
    Hi everyone!
    Product Name: HP Pavilion dv6-6093ex
    Product Number : LM610EA#A2N.
    My Windows 7(464Bit) Ultimate,  and its base language, and display language is English.
    The Languages(English, French and Arabic) built-in (came re-downloaded and re-installed by the person who made the Windows disc installation). Thus, while installing Windows 7, those three lanauge listed for me to choose one of them to be the base language
    and display language, I have chosen 'English'. In the End of installation, there are three pre-packaged languages(English and French and Arabic) can be used as a display language.
    I would like anyone kindly to confirm for me why I have been facing these problems when changing  language for non-Unicode programs from English into Arabic.
    First: After I have installed the  AMD High-Definition Graphics Driver (sp55092) 8.882.2.3000 on my laptop. The contents of the of Intel Graphics and Media Control Panel are partially shown in Arabic while language for non-Unicode programs
    is Arabic, however, they are completely shown in English while language for non-Unicode programs is English.
    A: I found that contents of the of Intel Graphics and Media Control Panel are partially shown in Arabic (second screen shot below, however,
    when click on any options, for example 'Graphics properties' shown in Arabic in, the second window is shown in English) while language for non-Unicode programs is
    Arabic, and it doesn't matter what format or location is.
    B- when I changed language for non-Unicode programs into 
    English.
    I found that contents of the Intel Graphics and Media Control Panel are completely shown in English .
    Second:
    A- Only All Arabic contents will be displayed encryptely while language for non-Unicode programs is English
    B-  All the Arabic contents are displayed properly   while language for non-Unicode programs is  Arabic.
    Third: an error extracting drivers and software downloaded from official HP website while language for non-Unicode programs is English.
    A-  I noticed an error extracting all kinds of comprised files(drivers and software) downloaded from HP website while language for non-Unicode programs is English and whatever location and format are:
    B- However  while language for non-Unicode programs is Arabic, there is no error extracting files.
    In conclusion, Is it normal
    for all of you the contents of the of Intel Graphics and Media Control Panel are partially shown in your native while  language  used
    for non-Unicode programs is your native lanague, however, they are completely shown in English while language for non-Unicode programs is English?.  IF so I would be saying that if I have wanted the  contents of documents written in my language
    Arabic to be shown properly, then then I
    must let the language for non-Unicode programs be Arabic.
    Is this happens with you as well?
    Also, if I need extracting all kinds of comprised files(drivers and software) downloaded from HP website, then language for non-Unicode programs
    must be in my Arabic lanague English and whatever location and format are.
    Is this happened with you as well?
    I would highly appreciate any clarification from you.
    A man should convert his anger and sadness into strength to continue living in this life.

    Hi,
    I am confused about your issue.
    when you changed language for non-Unicode programs into  English, it show English.
    while language for non-Unicode programs is Arabic, it show Arabic, If it's none-Unicode.
    This is correct. Why you think it's an issue?
    About your second scenario description, I was not clear what you said. Could you give us a explanation?
    Note: System display language is not the un-Unicode program language.
    You can just choose one language to display the system at same time.
    This article might be helpful to you:
    Install or change a display language
    http://windows.microsoft.com/en-in/windows7/install-or-change-a-display-language
    Change the system locale
    http://windows.microsoft.com/en-in/windows/change-system-locale#1TC=windows-7
    Karen Hu
    TechNet Community Support

  • Problems realted to changing the language for non-Unicode programs

    Hi everyone!
    Product Name: HP Pavilion dv6-6093ex
    Product Number : LM610EA#A2N.
    My Windows 7(464Bit) Ultimate,  and its base language, and display language is English.
    The Languages(English, French and Arabic) built-in (came re-downloaded and re-installed by the person who made the Windows disc installation). Thus, while installing Windows 7, those three lanauge listed for me to choose one of them to be the base language and display language, I have chosen 'English'. In the End of installation, there are three pre-packaged languages(English and French and Arabic) can be used as a display language.
    I would like anyone kindly to confirm for me why I have been facing these problems when changing  language for non-Unicode programs from English into Arabic.
    First: After I have installed the  AMD High-Definition Graphics Driver (sp55092) 8.882.2.3000 on my laptop. The contents of the of Intel Graphics and Media Control Panel are partially shown in Arabic while language for non-Unicode programs is Arabic, however, they are completely shown in English while language for non-Unicode programs is English.
    A: I found that contents of the of Intel Graphics and Media Control Panel are partially shown in Arabic (second screen shot below, however, when click on any options, for example 'Graphics properties' shown in Arabic in, the second window is shown in English) while language for non-Unicode programs is Arabic, and it doesn't matter what format or location is.
    B- when I changed language for non-Unicode programs into  English.
    I found that contents of the Intel Graphics and Media Control Panel are completely shown in English .
    Second:
    A- Only All Arabic contents will be displayed encryptely while language for non-Unicode programs is English
    B-  All the Arabic contents are displayed properly   while language for non-Unicode programs is  Arabic.
    Third: an error extracting drivers and software downloaded from official HP website while language for non-Unicode programs is English.
    A-  I noticed an error extracting all kinds of comprised files(drivers and software) downloaded from HP website while language for non-Unicode programs is English and whatever location and format are:
    B- However  while language for non-Unicode programs is Arabic, there is no error extracting files.
    In conclusion, Is it normal for all of you the contents of the of Intel Graphics and Media Control Panel are partially shown in your native while  langauge  used for non-Unicode programs is your native lanague, however, they are completely shown in English while language for non-Unicode programs is English?.  IF so I would be saying that if I have wanted the  contents of documents written in my language Arabic to be shown properly, then then I must let the language for non-Unicode programs be Arabic. Is this happens with you as well?
    Also, if I need extracting all kinds of comprised files(drivers and software) downloaded from HP website, then language for non-Unicode programs must be in my Arabic lanague English and whatever location and format are. Is this happened with you as well?
    I would highly appreciate any clarification from you.
    This question was solved.
    View Solution.

    Hi cooperator,
    I saw your post regarding the language questions and I will be happy to help. What are you are experiencing with the languages is normal. The base operating system is in English and while you can change the display language the core kernal of the operating system would be in English.
    The reason that the Intel Graphic and Media Control Panel is in English and the rest in Arabic is because the driver would have been designed in English and is hard coded as into the driver but the display language is set to Arabic. So when the language is set to English everything will be in English.
    The reason you having issues extracting drivers when you English set at the language is because the HP website will determine where in the world you and when you download the driver it will be the appropriate language for the country you are from. So when it extracts it will look for the proper extraction path using Arabic but everything is English. It work no problem when you are on Arabic because the driver can read the path properly.
    Thank you,
    Please click “Accept as Solution ” if you feel my post solved your issue.
    Click the “Kudos Thumbs Up" on the right to say “Thanks” for helping!
    Thank you,
    BHK6
    I work on behalf of HP

  • Cant Set System Locale (language for non-Unicode programs)

    Im trying to deploy custom image wherein Input language and location should be English Australia , BUT system locale (language for non-Unicode programs) should be English-us. The requirement is as below
    Standards and Formats: English (Australia)
    Location: Australia
    Default input language: English (Australia) – US
    Installed input languages: English (Australia) – US
    Time zone: Cen. Australia Standard Time
    System Locale
    Language for non-Unicode programs: Default - English (United States)
    Below is my CS.ini
    SkipLocaleSelection=YES
    UserLocale=en-AU
    SystemLocale=en-US
    UIlanguage=en-AU
    KeyboardLocale=0c09:00000409
    SkipTimeZone=YES
    TimeZoneName=Cen. Australia Standard Time
    when image is deployed the language for non-Unicode is also getting set to en-AU while it should be en-US, other language setting are as per the requirement. what should I do :(
    thanks a lot
    Sanju.
     

    that is a little-known known issue
    Check this post:
    http://myitforum.com/cs2/blogs/smslist/archive/2009/01/12/mssms-userlocale-in-mdt-sccm-also-changes-system-locale-9a532hdf.aspx
    He details how to modify the ZTIConifgure.xml file.

  • Unicode programming on Solaris.

    Hi All,
    I am very new to Solarsi and working on unicode programming on Solaris. But I am unable to find very basic APIs like wcsdup(), wtoi(), wtof(), snwprintf(). I am working on Solaris 10 with gcc 3.4.6. Please suggest me what could be the reason or these APIs are not on Solaris or I have to upgarade the gcc version to work on unicode programming ? Any pointer in the direction would be helpfull.
    Thanks in advance.

    Set an alarm timer in the parent process. Waitid for the child to complete.
    - If the child completes, cancel the timer with alarm(0).
    - If the timer pops, issue a kill -15/9 to the child process, then waitid to clean up the zombie. You can check for EINTR returned from your waitid and kill the child then if you don't want to do it in the interrupt handler.
    Dave

  • Since I've installed Mountain Lion, I am having lock up issues with multiple programs. MS Outlook has crashed and I've lost all my folders. HELP?

    Since I've installed Mountain Lion, I am having lock up issues with multiple programs. MS Outlook has crashed and I've lost all my folders. HELP?

    okay I've finally been able to get tor and all the other programs to work according to my plan the only thing that's still making problems is that iptables doesn't work as I want it to, when I start chromium without proxy settings privoxy doesn't seem to forward the information to polipo.. do I need to add another rule to iptables.rules in order for the program to know it has to reroute the information again or how can I get this to work? and is there any way to run rtorrent with proxy support?
    anyway, problem 2 and 3 are still to be solved.
    and does anybody know where i can get a good dansguardian blacklist that was not designed for 6 year old children and for which I don't need to subscribe? I'm still getting these partypoker popups -.-
    //e: with iptables it's the same thing as described in the first post. https works, http doesnt. I get the output "Invalid header received from client." on http sites. still no idea why though.. (and the https-version of torcheck.xenubite says i'm tor unprotected while starting the browser with iptables)
    Last edited by deF291 (2011-04-23 16:16:31)

  • Dump error while executing this unicode program.....

    Hi,
         I got a program for 'Production Order Quantity Change Daily Checklist' ,but while executing i got the dump error from the following program stating tat,
      The current statement is only defined for character-type data objects.
    Error in the ABAP Application Program
    The current ABAP program "ZPROD" had to be terminated because it has
    come across a statement that unfortunately cannot be executed.
    For the statement
       "READ DATASET ... INTO f"
    only character-type data objects are supported at the argument position
    "f".
    In this case. the operand "f" has the non-character-type "u". The
    current program is a Unicode program. In the Unicode context, the type
    'X' or structures containing not only character-type components are
    regarded as non-character-type.
    Program:
    REPORT ZPPORDER LINE-SIZE 180 NO STANDARD PAGE HEADING
                    LINE-COUNT 058(001).
    TABLES: AUFK,  "Order master data
            AFKO,  "Order header data PP orders
            RESB,  "Reservation/dependent requirements
            MAST,  "Material to BOM Link
            STKO,  "BOM Header
            STPO.  "BOM item
    DATA: BEGIN OF WA,
             AUART      TYPE AUFK-AUART,
             AUFNR      TYPE AUFK-AUFNR,
             AEDAT      TYPE AUFK-AEDAT,
             AENAM      TYPE AUFK-AENAM,
             WERKS      TYPE AUFK-WERKS,
             PLNBEZ     TYPE AFKO-PLNBEZ,
             GAMNG      TYPE AFKO-GAMNG,
             GASMG      TYPE AFKO-GASMG,
             MATNR      TYPE RESB-MATNR,
             POSNR      TYPE RESB-POSNR,
             BDMNG      TYPE RESB-BDMNG,
             BMENG      TYPE STKO-BMENG,
             MENGE      TYPE STPO-MENGE,
          END OF WA,
          ITAB  LIKE SORTED   TABLE OF WA WITH NON-UNIQUE KEY AUFNR POSNR.
    DATA: BEGIN OF ITAB2 OCCURS 0.
          INCLUDE STRUCTURE WA.
    DATA: END OF ITAB2.
    DATA: BEGIN OF ITAB_AUFK OCCURS 0,
          AUART  LIKE AUFK-AUART,
          AUFNR  LIKE AUFK-AUFNR,
          POSNR  LIKE RESB-POSNR,
          AEDAT  LIKE AUFK-AEDAT,
          AENAM  LIKE AUFK-AENAM,
          WERKS  LIKE AUFK-WERKS,
          PLNBEZ LIKE AFKO-PLNBEZ,
          GAMNG(7) TYPE P DECIMALS 0,
          GASMG(7) TYPE P DECIMALS 0,
          MATNR  LIKE RESB-MATNR,
          BDMNG(7) TYPE P DECIMALS 0,
          BMENG(7) TYPE P DECIMALS 0,
          MENGE(7) TYPE P DECIMALS 3.
    DATA: END OF ITAB_AUFK.
    DATA: FDATE LIKE SY-DATUM,
          LDATE LIKE SY-DATUM.
    DATA: X_AUFNR LIKE AFKO-AUFNR,
          X_MENGE(7) TYPE P DECIMALS 0,
          X_ERR(3).
    DATA: W_DATASET1(500) VALUE '/usr/sap/trans/data/'.
    SELECT-OPTIONS T_WERKS  FOR  AUFK-WERKS OBLIGATORY.
    SELECT-OPTIONS T_AUFNR  FOR  AUFK-AUFNR.
    SELECT-OPTIONS T_AEDAT  FOR  AUFK-AEDAT.
    PARAMETERS     PDATA    LIKE W_DATASET1.
    CONCATENATE W_DATASET1 PDATA INTO W_DATASET1.
    PERFORM F_COLLECT_DATA.
    FORM F_COLLECT_DATA.
    OPEN DATASET W_DATASET1 FOR INPUT IN TEXT MODE encoding default.
      DO.
         IF sy-subrc <> 0.
            EXIT.
         ENDIF.
         READ DATASET W_DATASET1 INTO WA.
         APPEND WA TO ITAB2.
      ENDDO.
    CLOSE DATASET W_DATASET1.
    SELECT  AAUFNR  AAUART AAEDAT AAENAM A~WERKS
            BPLNBEZ BGAMNG B~GASMG
            CMATNR  CBDMNG C~POSNR
         INTO CORRESPONDING FIELDS OF TABLE ITAB
         FROM          ( AUFK AS A
              INNER JOIN AFKO AS B ON BAUFNR  = AAUFNR
              INNER JOIN RESB AS C ON CAUFNR  = AAUFNR )
         WHERE A~AEDAT IN T_AEDAT
           AND A~WERKS IN T_WERKS.
         LOOP AT ITAB INTO WA.
            CLEAR MAST.
            SELECT SINGLE * FROM MAST WHERE MATNR = WA-PLNBEZ
                                        AND WERKS = WA-WERKS.
            CLEAR STKO.
            SELECT SINGLE * FROM STKO WHERE STLNR = MAST-STLNR
                                        AND STLAL = MAST-STLAL.
            CLEAR STPO.
            SELECT SINGLE * FROM STPO WHERE STLNR = MAST-STLNR
                                        AND POSNR = WA-POSNR.
            WA-BMENG = STKO-BMENG.
            WA-MENGE = STPO-MENGE.
            MODIFY ITAB FROM WA.
            AT NEW AUFNR.
               SKIP.
            ENDAT.
            LOOP AT ITAB2 WHERE AUFNR = WA-AUFNR
                            AND POSNR = WA-POSNR.
                IF ITAB2-GAMNG <> WA-GAMNG OR
                   ITAB2-GASMG <> WA-GASMG OR
                   ITAB2-BDMNG <> WA-BDMNG.
                   CLEAR X_MENGE.
                   IF ITAB2-BMENG <> 0.
                      X_MENGE = ITAB2-GAMNG / ITAB2-BMENG * ITAB2-MENGE.
                   ENDIF.
                   CLEAR X_ERR.
                   IF ITAB2-BDMNG <> X_MENGE.
                      X_ERR = 'Err'.
                   ENDIF.
                   FORMAT COLOR COL_TOTAL.
                   WRITE: / ITAB2-AUART  UNDER 'Type',
                            ITAB2-AUFNR  UNDER 'Prod Order',
                            ITAB2-AEDAT  UNDER 'Last Chg Dt',
                            ITAB2-AENAM  UNDER 'Last Chg by',
                            ITAB2-WERKS  UNDER 'Plant',
                            ITAB2-PLNBEZ UNDER 'Material',
                       (10) ITAB2-GAMNG  UNDER 'Order Qty' DECIMALS 0,
                       (10) ITAB2-GASMG  UNDER 'Scrap Qty' DECIMALS 0,
                            ITAB2-POSNR  UNDER 'Item',
                            ITAB2-MATNR  UNDER 'Component Req',
                       (10) ITAB2-BDMNG  UNDER 'Req Qty' DECIMALS 0,
                            X_MENGE      UNDER 'BOM Qty' COLOR COL_TOTAL,
                            ITAB2-BMENG  UNDER 'BOM Base',
                            ITAB2-MENGE  UNDER 'BOM Comp',
                            X_ERR        UNDER 'Rmks' COLOR COL_TOTAL.
                   CLEAR X_MENGE.
                   IF WA-BMENG <> 0.
                      X_MENGE = WA-GAMNG / WA-BMENG * WA-MENGE.
                   ENDIF.
                   CLEAR X_ERR.
                   IF WA-BDMNG <> X_MENGE.
                      X_ERR = 'Err'.
                   ENDIF.
                   FORMAT COLOR OFF.
                   WRITE: / WA-AUART  UNDER 'Type',
                            WA-AUFNR  UNDER 'Prod Order',
                            WA-AEDAT  UNDER 'Last Chg Dt',
                            WA-AENAM  UNDER 'Last Chg by',
                            WA-WERKS  UNDER 'Plant',
                            WA-PLNBEZ UNDER 'Material',
                       (10) WA-GAMNG  UNDER 'Order Qty' DECIMALS 0,
                       (10) WA-GASMG  UNDER 'Scrap Qty' DECIMALS 0,
                            WA-POSNR  UNDER 'Item',
                            WA-MATNR  UNDER 'Component Req',
                       (10) WA-BDMNG  UNDER 'Req Qty' DECIMALS 0,
                            X_MENGE   UNDER 'BOM Qty' COLOR COL_TOTAL,
                            WA-BMENG  UNDER 'BOM Base',
                            WA-MENGE  UNDER 'BOM Comp',
                            X_ERR     UNDER 'Rmks' COLOR COL_TOTAL.
                 ENDIF.
            ENDLOOP.
         ENDLOOP.
       LOOP AT ITAB2.
            LOOP AT ITAB INTO WA WHERE AUFNR = ITAB2-AUFNR
                                   AND POSNR = ITAB2-POSNR.
                 DELETE ITAB2.
            ENDLOOP.
            SELECT SINGLE * FROM AUFK WHERE AUFNR = ITAB2-AUFNR.
            IF SY-SUBRC <> 0.
                 DELETE ITAB2.
            ENDIF.
       ENDLOOP.
       OPEN DATASET W_DATASET1 FOR OUTPUT IN TEXT MODE encoding default.
            LOOP AT ITAB  INTO WA.
               TRANSFER WA TO W_DATASET1.
            ENDLOOP.
            LOOP AT ITAB2 INTO WA.
               TRANSFER WA TO W_DATASET1.
            ENDLOOP.
       CLOSE DATASET W_DATASET1.
    ENDFORM.
    TOP-OF-PAGE.
        FORMAT COLOR COL_TOTAL.
        WRITE: / SY-DATUM, SY-UZEIT, SY-REPID, SY-UNAME,
             50 'Daily Qty Changed Checklist for Production Order',
            120 SY-PAGNO.
        SKIP.
        WRITE: / 'Plant ', T_WERKS-LOW.
        WRITE:   ' Last Change Date ', T_AEDAT-LOW, ' to ', T_AEDAT-HIGH.
        SKIP.
        WRITE: /1  'Type',
                6  'Prod Order',
                17 'Last Chg Dt',
                29 'Last Chg by',
                42 'Plant',
                49 'Material',
                69 'Order Qty',
                83 'Scrap Qty',
                99 'Item',
               105 'Component Req',
               121 'Req Qty',
               135 'BOM Qty',
               149 'BOM Base',
               163 'BOM Comp',
               178 'Rmks'.
         ULINE.
         WRITE: / 'Previous data :- '.
         FORMAT COLOR OFF.
         WRITE: / 'Current data :- '.
    INITIALIZATION.
       LDATE = SY-DATUM.
       LDATE  = LDATE - 1.
       FDATE = LDATE.
       MOVE:   FDATE         TO  T_AEDAT-LOW.
       APPEND T_AEDAT.
       PDATA = 'AE001'.
    So,give me any suggestions where to customize r do rectify the error.This will be useful for me.
    Advance Thnx..

    *REPORT  ZPROD.
    REPORT ZPPORDER LINE-SIZE 180 NO STANDARD PAGE HEADING
                    LINE-COUNT 058(001).
    TABLES: AUFK,  "Order master data
            AFKO,  "Order header data PP orders
            RESB,  "Reservation/dependent requirements
            MAST,  "Material to BOM Link
            STKO,  "BOM Header
            STPO.  "BOM item
    DATA: BEGIN OF WA,
             AUART      TYPE AUFK-AUART,
             AUFNR      TYPE AUFK-AUFNR,
             AEDAT      TYPE AUFK-AEDAT,
             AENAM      TYPE AUFK-AENAM,
             WERKS      TYPE AUFK-WERKS,
             PLNBEZ     TYPE AFKO-PLNBEZ,
             GAMNG      TYPE AFKO-GAMNG,
             GASMG      TYPE AFKO-GASMG,
             MATNR      TYPE RESB-MATNR,
             POSNR      TYPE RESB-POSNR,
             BDMNG      TYPE RESB-BDMNG,
             BMENG      TYPE STKO-BMENG,
             MENGE      TYPE STPO-MENGE,
          END OF WA,
          ITAB  LIKE SORTED   TABLE OF WA WITH NON-UNIQUE KEY AUFNR POSNR.
    DATA: BEGIN OF ITAB2 OCCURS 0.
          INCLUDE STRUCTURE WA.
    DATA: END OF ITAB2.
    DATA: BEGIN OF ITAB_AUFK OCCURS 0,
          AUART  LIKE AUFK-AUART,
          AUFNR  LIKE AUFK-AUFNR,
          POSNR  LIKE RESB-POSNR,
          AEDAT  LIKE AUFK-AEDAT,
          AENAM  LIKE AUFK-AENAM,
          WERKS  LIKE AUFK-WERKS,
          PLNBEZ LIKE AFKO-PLNBEZ,
          GAMNG(7) TYPE P DECIMALS 0,
          GASMG(7) TYPE P DECIMALS 0,
          MATNR  LIKE RESB-MATNR,
          BDMNG(7) TYPE P DECIMALS 0,
          BMENG(7) TYPE P DECIMALS 0,
          MENGE(7) TYPE P DECIMALS 3.
    DATA: END OF ITAB_AUFK.
    DATA: FDATE LIKE SY-DATUM,
          LDATE LIKE SY-DATUM.
    DATA: X_AUFNR LIKE AFKO-AUFNR,
          X_MENGE(7) TYPE P DECIMALS 0,
          X_ERR(3).
    DATA: W_DATASET1(500) VALUE '/usr/sap/trans/data/'.
    SELECT-OPTIONS T_WERKS  FOR  AUFK-WERKS OBLIGATORY.
    SELECT-OPTIONS T_AUFNR  FOR  AUFK-AUFNR.
    SELECT-OPTIONS T_AEDAT  FOR  AUFK-AEDAT.
    PARAMETERS     PDATA    LIKE W_DATASET1.
    CONCATENATE W_DATASET1 PDATA INTO W_DATASET1.
    PERFORM F_COLLECT_DATA.
    FORM F_COLLECT_DATA.
    OPEN DATASET W_DATASET1 FOR INPUT IN TEXT MODE encoding default.
      DO.
         IF sy-subrc <> 0.
            EXIT.
         ENDIF.
         READ DATASET W_DATASET1 INTO WA.
         APPEND WA TO ITAB2.
      ENDDO.
    CLOSE DATASET W_DATASET1.
    SELECT  AAUFNR  AAUART AAEDAT AAENAM A~WERKS
            BPLNBEZ BGAMNG B~GASMG
            CMATNR  CBDMNG C~POSNR
         INTO CORRESPONDING FIELDS OF TABLE ITAB
         FROM          ( AUFK AS A
              INNER JOIN AFKO AS B ON BAUFNR  = AAUFNR
              INNER JOIN RESB AS C ON CAUFNR  = AAUFNR )
         WHERE A~AEDAT IN T_AEDAT
           AND A~WERKS IN T_WERKS.
         LOOP AT ITAB INTO WA.
            CLEAR MAST.
            SELECT SINGLE * FROM MAST WHERE MATNR = WA-PLNBEZ
                                        AND WERKS = WA-WERKS.
            CLEAR STKO.
            SELECT SINGLE * FROM STKO WHERE STLNR = MAST-STLNR
                                        AND STLAL = MAST-STLAL.
            CLEAR STPO.
            SELECT SINGLE * FROM STPO WHERE STLNR = MAST-STLNR
                                        AND POSNR = WA-POSNR.
            WA-BMENG = STKO-BMENG.
            WA-MENGE = STPO-MENGE.
            MODIFY ITAB FROM WA.
            AT NEW AUFNR.
               SKIP.
            ENDAT.
            LOOP AT ITAB2 WHERE AUFNR = WA-AUFNR
                            AND POSNR = WA-POSNR.
                IF ITAB2-GAMNG <> WA-GAMNG OR
                   ITAB2-GASMG <> WA-GASMG OR
                   ITAB2-BDMNG <> WA-BDMNG.
                   CLEAR X_MENGE.
                   IF ITAB2-BMENG <> 0.
                      X_MENGE = ITAB2-GAMNG / ITAB2-BMENG * ITAB2-MENGE.
                   ENDIF.
                   CLEAR X_ERR.
                   IF ITAB2-BDMNG <> X_MENGE.
                      X_ERR = 'Err'.
                   ENDIF.
                   FORMAT COLOR COL_TOTAL.
                   WRITE: / ITAB2-AUART  UNDER 'Type',
                            ITAB2-AUFNR  UNDER 'Prod Order',
                            ITAB2-AEDAT  UNDER 'Last Chg Dt',
                            ITAB2-AENAM  UNDER 'Last Chg by',
                            ITAB2-WERKS  UNDER 'Plant',
                            ITAB2-PLNBEZ UNDER 'Material',
                       (10) ITAB2-GAMNG  UNDER 'Order Qty' DECIMALS 0,
                       (10) ITAB2-GASMG  UNDER 'Scrap Qty' DECIMALS 0,
                            ITAB2-POSNR  UNDER 'Item',
                            ITAB2-MATNR  UNDER 'Component Req',
                       (10) ITAB2-BDMNG  UNDER 'Req Qty' DECIMALS 0,
                            X_MENGE      UNDER 'BOM Qty' COLOR COL_TOTAL,
                            ITAB2-BMENG  UNDER 'BOM Base',
                            ITAB2-MENGE  UNDER 'BOM Comp',
                            X_ERR        UNDER 'Rmks' COLOR COL_TOTAL.
                   CLEAR X_MENGE.
                   IF WA-BMENG <> 0.
                      X_MENGE = WA-GAMNG / WA-BMENG * WA-MENGE.
                   ENDIF.
                   CLEAR X_ERR.
                   IF WA-BDMNG <> X_MENGE.
                      X_ERR = 'Err'.
                   ENDIF.
                   FORMAT COLOR OFF.
                   WRITE: / WA-AUART  UNDER 'Type',
                            WA-AUFNR  UNDER 'Prod Order',
                            WA-AEDAT  UNDER 'Last Chg Dt',
                            WA-AENAM  UNDER 'Last Chg by',
                            WA-WERKS  UNDER 'Plant',
                            WA-PLNBEZ UNDER 'Material',
                       (10) WA-GAMNG  UNDER 'Order Qty' DECIMALS 0,
                       (10) WA-GASMG  UNDER 'Scrap Qty' DECIMALS 0,
                            WA-POSNR  UNDER 'Item',
                            WA-MATNR  UNDER 'Component Req',
                       (10) WA-BDMNG  UNDER 'Req Qty' DECIMALS 0,
                            X_MENGE   UNDER 'BOM Qty' COLOR COL_TOTAL,
                            WA-BMENG  UNDER 'BOM Base',
                            WA-MENGE  UNDER 'BOM Comp',
                            X_ERR     UNDER 'Rmks' COLOR COL_TOTAL.
                 ENDIF.
            ENDLOOP.
         ENDLOOP.
       LOOP AT ITAB2.
            LOOP AT ITAB INTO WA WHERE AUFNR = ITAB2-AUFNR
                                   AND POSNR = ITAB2-POSNR.
                 DELETE ITAB2.
            ENDLOOP.
            SELECT SINGLE * FROM AUFK WHERE AUFNR = ITAB2-AUFNR.
            IF SY-SUBRC <> 0.
                 DELETE ITAB2.
            ENDIF.
       ENDLOOP.
       OPEN DATASET W_DATASET1 FOR OUTPUT IN TEXT MODE encoding default.
            LOOP AT ITAB  INTO WA.
               TRANSFER WA TO W_DATASET1.
            ENDLOOP.
            LOOP AT ITAB2 INTO WA.
               TRANSFER WA TO W_DATASET1.
            ENDLOOP.
       CLOSE DATASET W_DATASET1.
    ENDFORM.
    TOP-OF-PAGE.
        FORMAT COLOR COL_TOTAL.
        WRITE: / SY-DATUM, SY-UZEIT, SY-REPID, SY-UNAME,
             50 'Daily Qty Changed Checklist for Production Order',
            120 SY-PAGNO.
        SKIP.
        WRITE: / 'Plant ', T_WERKS-LOW.
        WRITE:   ' Last Change Date ', T_AEDAT-LOW, ' to ', T_AEDAT-HIGH.
        SKIP.
        WRITE: /1  'Type',
                6  'Prod Order',
                17 'Last Chg Dt',
                29 'Last Chg by',
                42 'Plant',
                49 'Material',
                69 'Order Qty',
                83 'Scrap Qty',
                99 'Item',
               105 'Component Req',
               121 'Req Qty',
               135 'BOM Qty',
               149 'BOM Base',
               163 'BOM Comp',
               178 'Rmks'.
         ULINE.
         WRITE: / 'Previous data :- '.
         FORMAT COLOR OFF.
         WRITE: / 'Current data :- '.
    INITIALIZATION.
       LDATE = SY-DATUM.
       LDATE  = LDATE - 1.
       FDATE = LDATE.
       MOVE:   FDATE         TO  T_AEDAT-LOW.
       APPEND T_AEDAT.
       PDATA = 'AE001'.

  • How to get the VARIANT name in the program

    Hi Guys,
    Can somebody tell me how to get  the VARIANT name in a program.
    I have to perform some code with specific variant only. So I want to check in program which variant has been used to call the program.
    Thanks,

    Hi,
    Variants are stored in table VARI and VARID.
    You can use RS_ALL_VARIANTS_4_1_REPORT to get all the variants for a report program.
    please check out the link below it will be helpful to you
    Re: Programs for a transaction variant
    Hope this helps.
    ashish

  • From which table could i get all the Variants of a ABAP program?

    Hi,
    From which table could i get all the Variants name which belong to a specific ABAP program?
    Thanks.

    Hi Hoo,
    You can get the variants of a ABAB Program from table <b>VARID</b>. Give the report name to the VARID-REPORT field and you will the list of variants for this report under field VARID-VARIANT and VARID-ENAME is the user who created the variant.
    Otherwise, You can use the function module RM_GET_VARIANTS_4_REPORT_USER to get the variants of a report
    Thanks,
    Vinay

  • Data objects in a Unicode program are not convertible?what does this mean?

    hello,everyone,
    when I execute a smartform directly in the transaction smartforms.,the result can be seen just no data.
    when I execute program to transfer two internal tables from interface with data to the smartforms,and I use tcode st22,
    the error is : Data objects in a Unicode program are not convertible.
    the error analysis; The statement
       "MOVE src TO dst"
    requires the operands "dst" and "src" to be comvertible.
    the source code that error occurs is :LOOP AT I_SHIP_DETAIL INTO WA_DETAIL .
    and I know that the internal table have errors ,I defined the internal table refer to a structure created myself,and I set break-point in the smartforms ,can see the data in the internal table ,so why occurs such errors ,pls help me if you know .thank you in advance.

    hi
    good
    go through this link
    https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/f2dac69e-0e01-0010-e2b6-81c1e8e5ce50
    thanks
    mrutyun^

  • In unicode programs how to handle unix files

    Hi Abapers,
    In Unicode programs.
      while transfering  file from unix directory to pdf format, logo is missing in that pdf file .
    how to handle this error.
    Thanks,
    Praveen

    have a look
    https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/60a35b0b-de0a-2a10-4ea5-dd82e6bbd74d
    Regards
    Shashi

Maybe you are looking for