<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Re: Why do we use Feild Symbols in Application Development and Automation Discussions</title>
    <link>https://community.sap.com/t5/application-development-and-automation-discussions/why-do-we-use-feild-symbols/m-p/3382890#M812218</link>
    <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;hi,&lt;/P&gt;&lt;P&gt;Field Symbol:&lt;/P&gt;&lt;P&gt;The field symbol &amp;lt;FS&amp;gt; can have data objects of any type assigned to it. When you assign a data object, the field symbol inherits its technical attributes. The data type of the assigned data object becomes the actual data type of the field symbol. The static field symbol is only a pointer to the field in memory, and does not have the complex type attributes of a reference or structured field until runtime. You can only use the field symbol to address the whole field.&lt;/P&gt;&lt;P&gt;TYPES: BEGIN OF LINE,&lt;/P&gt;&lt;P&gt;COL1,&lt;/P&gt;&lt;P&gt;COL2,&lt;/P&gt;&lt;P&gt;END OF LINE.&lt;/P&gt;&lt;P&gt;DATA: WA TYPE LINE,&lt;/P&gt;&lt;P&gt;ITAB TYPE HASHED TABLE OF LINE WITH UNIQUE KEY COL1,&lt;/P&gt;&lt;P&gt;KEY(4) VALUE 'COL1'.&lt;/P&gt;&lt;P&gt;FIELD-SYMBOLS &amp;lt;FS&amp;gt; TYPE ANY TABLE.&lt;/P&gt;&lt;P&gt;ASSIGN ITAB TO &amp;lt;FS&amp;gt;.&lt;/P&gt;&lt;P&gt;READ TABLE &amp;lt;FS&amp;gt; WITH TABLE KEY (KEY) = 'X' INTO WA.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;regards,&lt;/P&gt;&lt;P&gt;theja&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
    <pubDate>Tue, 12 Feb 2008 09:04:38 GMT</pubDate>
    <dc:creator>Former Member</dc:creator>
    <dc:date>2008-02-12T09:04:38Z</dc:date>
    <item>
      <title>Why do we use Feild Symbols</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/why-do-we-use-feild-symbols/m-p/3382889#M812217</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Hi All&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Breifly explain me why do we use field symbols. and how to use them and where to use them.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Thanks! in advance&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Tue, 12 Feb 2008 08:58:20 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/why-do-we-use-feild-symbols/m-p/3382889#M812217</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2008-02-12T08:58:20Z</dc:date>
    </item>
    <item>
      <title>Re: Why do we use Feild Symbols</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/why-do-we-use-feild-symbols/m-p/3382890#M812218</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;hi,&lt;/P&gt;&lt;P&gt;Field Symbol:&lt;/P&gt;&lt;P&gt;The field symbol &amp;lt;FS&amp;gt; can have data objects of any type assigned to it. When you assign a data object, the field symbol inherits its technical attributes. The data type of the assigned data object becomes the actual data type of the field symbol. The static field symbol is only a pointer to the field in memory, and does not have the complex type attributes of a reference or structured field until runtime. You can only use the field symbol to address the whole field.&lt;/P&gt;&lt;P&gt;TYPES: BEGIN OF LINE,&lt;/P&gt;&lt;P&gt;COL1,&lt;/P&gt;&lt;P&gt;COL2,&lt;/P&gt;&lt;P&gt;END OF LINE.&lt;/P&gt;&lt;P&gt;DATA: WA TYPE LINE,&lt;/P&gt;&lt;P&gt;ITAB TYPE HASHED TABLE OF LINE WITH UNIQUE KEY COL1,&lt;/P&gt;&lt;P&gt;KEY(4) VALUE 'COL1'.&lt;/P&gt;&lt;P&gt;FIELD-SYMBOLS &amp;lt;FS&amp;gt; TYPE ANY TABLE.&lt;/P&gt;&lt;P&gt;ASSIGN ITAB TO &amp;lt;FS&amp;gt;.&lt;/P&gt;&lt;P&gt;READ TABLE &amp;lt;FS&amp;gt; WITH TABLE KEY (KEY) = 'X' INTO WA.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;regards,&lt;/P&gt;&lt;P&gt;theja&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Tue, 12 Feb 2008 09:04:38 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/why-do-we-use-feild-symbols/m-p/3382890#M812218</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2008-02-12T09:04:38Z</dc:date>
    </item>
    <item>
      <title>Re: Why do we use Feild Symbols</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/why-do-we-use-feild-symbols/m-p/3382891#M812219</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Hi, this may help you.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*Field Symbols *&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Field symbols are placeholders or symbolic names for other fields. They do not physically reserve space for a field, but point to its contents. A field symbol cam point to any data object. The data object to which a field symbol points is assigned to it after it has been declared in the program. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Whenever you address a field symbol in a program, you are addressing the field that is assigned to the field symbol. After successful assignment, there is no difference in ABAP whether you reference the field symbol or the field itself. You must assign a field to each field symbol before you can address the latter in programs. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Field symbols are similar to dereferenced pointers in C (that is, pointers to which the content operator * is applied). However, the only real equivalent of pointers in ABAP, that is, variables that contain a memory address (reference) and that can be used without the contents operator, are reference variables in ABAP Objects. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;All operations programmed with field symbols are applied to the field assigned to it. For example, a MOVE statement between two field symbols moves the contents of the field assigned to the first field symbol to the field assigned to the second field symbol. The field symbols themselves point to the same fields after the MOVE statement as they did before.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;You can create field symbols either without or with type specifications. If you do not specify a type, the field symbol inherits all of the technical attributes of the field assigned to it. If you do specify a type, the system checks the compatibility of the field symbol and the field you are assigning to it during the ASSIGN statement. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Field symbols provide greater flexibility when you address data objects: &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;If you want to process sections of fields, you can specify the offset and length of the field dynamically. &lt;/P&gt;&lt;P&gt;You can assign one field symbol to another, which allows you to address parts of fields. &lt;/P&gt;&lt;P&gt;Assignments to field symbols may extend beyond field boundaries. This allows you to address regular sequences of fields in memory efficiently. &lt;/P&gt;&lt;P&gt;You can also force a field symbol to take different technical attributes from those of the field assigned to it. &lt;/P&gt;&lt;P&gt;The flexibility of field symbols provides elegant solutions to certain problems. On the other hand, it does mean that errors can easily occur. Since fields are not assigned to field symbols until runtime, the effectiveness of syntax and security checks is very limited for operations involving field symbols. This can lead to runtime errors or incorrect data assignments.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;While runtime errors indicate an obvious problem, incorrect data assignments are dangerous because they can be very difficult to detect. For this reason, you should only use field symbols if you cannot achieve the same result using other ABAP statements. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;For example, you may want to process part of a string where the offset and length depend on the contents of the field. You could use field symbols in this case. However, since the MOVE statement also supports variable offset and length specifications, you should use it instead. The MOVE statement (with your own auxiliary variables if required) is much safer than using field symbols, since it cannot address memory beyond the boundary of a field. However, field symbols may improve performance in some cases. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;check the below links u will get the answers for your questions&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://help.sap.com/saphelp_nw04/helpdata/en/fc/eb3860358411d1829f0000e829fbfe/content.htm" target="test_blank"&gt;http://help.sap.com/saphelp_nw04/helpdata/en/fc/eb3860358411d1829f0000e829fbfe/content.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://www.sts.tu-harburg.de/teaching/sap_r3/ABAP4/field_sy.htm" target="test_blank"&gt;http://www.sts.tu-harburg.de/teaching/sap_r3/ABAP4/field_sy.htm&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;A href="http://searchsap.techtarget.com/tip/1,289483,sid21_gci920484,00.html" target="test_blank"&gt;http://searchsap.techtarget.com/tip/1,289483,sid21_gci920484,00.html&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Syntax Diagram &lt;/P&gt;&lt;P&gt;FIELD-SYMBOLS &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Basic form &lt;/P&gt;&lt;P&gt;FIELD-SYMBOLS &amp;lt;fs&amp;gt;. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Extras: &lt;/P&gt;&lt;P&gt;1. ... TYPE type &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;2. ... TYPE REF TO cif &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;3. ... TYPE REF TO DATA &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;4. ... TYPE LINE OF type &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;5. ... LIKE s &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;6. ... LIKE LINE OF s &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;7. ... TYPE tabkind &lt;/P&gt;&lt;P&gt;8. ... STRUCTURE s DEFAULT wa &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;The syntax check performed in an ABAP Objects context is stricter than in other ABAP areas. See Cannot Use Untyped Field Symbols ad Cannot Use Field Symbols as Components of Classes. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Effect &lt;/P&gt;&lt;P&gt;This statement declares a symbolic field called &amp;lt;fs&amp;gt;. At runtime, you can assign a concrete field to the field symbol using ASSIGN. All operations performed with the field symbol then directly affect the field assigned to it. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;You can only use one of the additions. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Example &lt;/P&gt;&lt;P&gt;Output aircraft type from the table SFLIGHT using a field symbol: &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FIELD-SYMBOLS &amp;lt;PT&amp;gt; TYPE ANY. &lt;/P&gt;&lt;P&gt;DATA SFLIGHT_WA TYPE SFLIGHT. &lt;/P&gt;&lt;P&gt;... &lt;/P&gt;&lt;P&gt;ASSIGN SFLIGHT_WA-PLANETYPE TO &amp;lt;PT&amp;gt;. &lt;/P&gt;&lt;P&gt;WRITE &amp;lt;PT&amp;gt;. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Addition 1 &lt;/P&gt;&lt;P&gt;... TYPE type &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Addition 2 &lt;/P&gt;&lt;P&gt;... TYPE REF TO cif &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Addition 3 &lt;/P&gt;&lt;P&gt;... TYPE REF TO DATA &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Addition 4 &lt;/P&gt;&lt;P&gt;... TYPE LINE OF type &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Addition 5 &lt;/P&gt;&lt;P&gt;... LIKE s &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Addition 6 &lt;/P&gt;&lt;P&gt;... LIKE LINE OF s &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Addition 7 &lt;/P&gt;&lt;P&gt;... TYPE tabkind &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Effect &lt;/P&gt;&lt;P&gt;You can define the type of the field symbol using additions 2 to 7 (just as you can for FORM parameters (compare Defining the Type of Subroutine Parameters). When you use the ASSIGN statement, the system carries out the same type checks as for USING parameters of FORMs. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;This addition is not allowed in an ABAP Objects context. See Cannot Use Obsolete Casting for FIELD SYMBOLS. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;In some cases, the syntax rules that apply to Unicode programs are different than those for non-Unicode programs. See Defining Types Using STRUCTURE. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Effect &lt;/P&gt;&lt;P&gt;Assigns any (internal) field string or structure to the field symbol from the ABAP Dictionary (s). All fields of the structure can be addressed by name: &amp;lt;fs&amp;gt;-fieldname. The structured field symbol points initially to the work area wa specified after DEFAULT. &lt;/P&gt;&lt;P&gt;The work area wa must be at least as long as the structure s. If s contains fields of the type I or F, wa should have the structure s or at least begin in that way, since otherwise alignment problems may occur. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Example &lt;/P&gt;&lt;P&gt;Address components of the flight bookings table SBOOK using a field symbol: &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DATA SBOOK_WA LIKE SBOOK. &lt;/P&gt;&lt;P&gt;FIELD-SYMBOLS &amp;lt;SB&amp;gt; STRUCTURE SBOOK &lt;/P&gt;&lt;P&gt;DEFAULT SBOOK_WA. &lt;/P&gt;&lt;P&gt;... &lt;/P&gt;&lt;P&gt;WRITE: &amp;lt;SB&amp;gt;-BOOKID, &amp;lt;SB&amp;gt;-FLDATE. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Related &lt;/P&gt;&lt;P&gt;ASSIGN, DATA &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Additional help &lt;/P&gt;&lt;P&gt;Declaring Field Symbols &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Reward If Helpful.&lt;/P&gt;&lt;P&gt;Regards Madhu.&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Tue, 12 Feb 2008 09:09:52 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/why-do-we-use-feild-symbols/m-p/3382891#M812219</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2008-02-12T09:09:52Z</dc:date>
    </item>
    <item>
      <title>Re: Why do we use Feild Symbols</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/why-do-we-use-feild-symbols/m-p/3382892#M812220</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;Hi,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;The new style of definition of internal tables usually doesn't include a header area for the internal table. Furthermore, ABAP Objects will not allow internal tables with header lines. For added performance, instead of declaring a work area--use a field symbol. The work area concept and header line format both require data to be moved from the internal table to the work area or header area. A field symbol is just a pointer that will point to the proper line of the itab. With field symbols, no data needs to be moved. The field symbol just stores the proper memory address to point at the right line. The field symbol can have structure and be made up of fields similar to a work area or header line. Because no data needs to be copied, processing is much faster.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;The keys to the usage are:&lt;/P&gt;&lt;P&gt;1) Defining the table records and the field symbol in a similar type.&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;just an ordinary standard table&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;TYPES: BEGIN OF it_vbak_line,&lt;/P&gt;&lt;P&gt;vbeln LIKE vbak-vbeln,&lt;/P&gt;&lt;P&gt;vkorg LIKE vbak-vkorg,&lt;/P&gt;&lt;P&gt;vtweg LIKE vbak-vtweg,&lt;/P&gt;&lt;P&gt;spart LIKE vbak-spart,&lt;/P&gt;&lt;P&gt;kunnr LIKE vbak-kunnr,&lt;/P&gt;&lt;P&gt;END OF it_vbak_line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DATA: it_vbak TYPE TABLE OF it_vbak_line.&lt;/P&gt;&lt;P&gt;FIELD-SYMBOLS: &amp;lt;it_vbak_line&amp;gt; TYPE it_vbak_line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;or as a screaming fast hash table for keyed reads&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;TYPES: BEGIN OF it_vbpa_line,&lt;/P&gt;&lt;P&gt;vbeln LIKE vbak-vbeln,&lt;/P&gt;&lt;P&gt;kunnr LIKE vbak-kunnr,&lt;/P&gt;&lt;P&gt;END OF it_vbpa_line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DATA: it_vbpa TYPE HASHED TABLE OF it_vbpa_line&lt;/P&gt;&lt;P&gt;WITH UNIQUE KEY vbeln.&lt;/P&gt;&lt;P&gt;FIELD-SYMBOLS: &amp;lt;it_vbpa_line&amp;gt; TYPE it_vbpa_line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;2) In ITAB processing, utilize the ASSIGNING command.&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;loop example&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;LOOP AT it_vbak ASSIGNING &amp;lt;it_vbak_line&amp;gt;.&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;look at records--populate it_zpartner&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;read example&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;READ TABLE it_vbpa ASSIGNING &amp;lt;it_vbpa_line&amp;gt;&lt;/P&gt;&lt;P&gt;WITH TABLE KEY vbeln = &amp;lt;it_vbak_line&amp;gt;-vbeln.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;3) Refer to the field symbol's fields in the loop or after the read.&lt;/P&gt;&lt;P&gt;wa_zpartner-vkorg = &amp;lt;it_vbak_line&amp;gt;-vkorg.&lt;/P&gt;&lt;P&gt;wa_zpartner-vtweg = &amp;lt;it_vbak_line&amp;gt;-vtweg.&lt;/P&gt;&lt;P&gt;wa_zpartner-spart = &amp;lt;it_vbak_line&amp;gt;-spart.&lt;/P&gt;&lt;P&gt;wa_zpartner-kunag = &amp;lt;it_vbak_line&amp;gt;-kunnr.&lt;/P&gt;&lt;P&gt;wa_zpartner-kunwe = &amp;lt;it_vbpa_line&amp;gt;-kunnr.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;See the code example below for further detail. The code was written in R/3 4.6C and should work for all 4.x versions.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;Code&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;REPORT z_cnv_zshipto_from_hist          NO STANDARD PAGE HEADING&lt;/P&gt;&lt;P&gt;                                        LINE-SIZE 132&lt;/P&gt;&lt;P&gt;                                        LINE-COUNT 65&lt;/P&gt;&lt;P&gt;                                        MESSAGE-ID z1.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;************************************************************************&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;Program Name: ZSHIPTO from History             Creation: 07/23/2003  *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;                                                                     *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;SAP Name    : Z_CNV_ZSHIPTO_FROM_HIST           Application: SD      *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;                                                                     *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;Author      : James Vander Heyden               Type: 1              *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;______________________________________________________________________&lt;/STRONG&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;Description :  This program reads tables VBAK &amp;amp; VBPA and populates   *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;ZPARTNER. ZPARTNER table is read in by ZINTSC06. ZINTSC06 updates    *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;the ZSHIPTO relationships.                                           *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;______________________________________________________________________&lt;/STRONG&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;Inputs:  Selection Screen                                            *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;                                                                     *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;Outputs:                                                             *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;______________________________________________________________________&lt;/STRONG&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;External Routines                                                    *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;  Function Modules:                                                  *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;  Transactions    :                                                  *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;  Programs        :                                                  *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;______________________________________________________________________&lt;/STRONG&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;Return Codes:                                                        *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;                                                                     *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;______________________________________________________________________&lt;/STRONG&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;Ammendments:                                                         *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;   Programmer        Date     Req. #            Action               *&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;================  ==========  ======  ===============================*&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;J Vander Heyden   07/23/2003  PCR     Initial Build                  *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;************************************************************************&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;DATA DICTIONARY TABLES                                               *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;TABLES:&lt;/P&gt;&lt;P&gt;  zpartner.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;SELECTION SCREEN LAYOUT                                              *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;PARAMETERS: p_load   RADIOBUTTON GROUP a1 DEFAULT 'X',&lt;/P&gt;&lt;P&gt;            p_deltab  RADIOBUTTON GROUP a1.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;SELECTION-SCREEN SKIP 2.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;SELECT-OPTIONS: s_vkorg  FOR zpartner-vkorg MEMORY ID vko OBLIGATORY&lt;/P&gt;&lt;P&gt;                             NO INTERVALS NO-EXTENSION,&lt;/P&gt;&lt;P&gt;                s_vtweg  FOR zpartner-vtweg MEMORY ID vtw OBLIGATORY&lt;/P&gt;&lt;P&gt;                             NO INTERVALS NO-EXTENSION,&lt;/P&gt;&lt;P&gt;                s_spart  FOR zpartner-spart MEMORY ID spa OBLIGATORY&lt;/P&gt;&lt;P&gt;                             NO INTERVALS NO-EXTENSION.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;INTERNAL TABLES                                                      *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;TYPES: BEGIN OF it_vbak_line,&lt;/P&gt;&lt;P&gt;        vbeln LIKE vbak-vbeln,&lt;/P&gt;&lt;P&gt;        vkorg LIKE vbak-vkorg,&lt;/P&gt;&lt;P&gt;        vtweg LIKE vbak-vtweg,&lt;/P&gt;&lt;P&gt;        spart LIKE vbak-spart,&lt;/P&gt;&lt;P&gt;        kunnr LIKE vbak-kunnr,&lt;/P&gt;&lt;P&gt;      END OF it_vbak_line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DATA: it_vbak TYPE TABLE OF it_vbak_line.&lt;/P&gt;&lt;P&gt;FIELD-SYMBOLS: &amp;lt;it_vbak_line&amp;gt;  TYPE it_vbak_line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;TYPES: BEGIN OF it_vbpa_line,&lt;/P&gt;&lt;P&gt;        vbeln LIKE vbak-vbeln,&lt;/P&gt;&lt;P&gt;        kunnr LIKE vbak-kunnr,&lt;/P&gt;&lt;P&gt;      END OF it_vbpa_line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DATA: it_vbpa TYPE HASHED TABLE OF it_vbpa_line&lt;/P&gt;&lt;P&gt;                   WITH UNIQUE KEY vbeln.&lt;/P&gt;&lt;P&gt;FIELD-SYMBOLS: &amp;lt;it_vbpa_line&amp;gt;  TYPE it_vbpa_line.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DATA: it_zpartner TYPE TABLE OF zpartner.&lt;/P&gt;&lt;P&gt;DATA: wa_zpartner TYPE zpartner.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;STRUCTURES                                                           *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;VARIABLES                                                            *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;DATA:  z_mode   VALUE 'N',&lt;/P&gt;&lt;P&gt;       z_commit TYPE i,&lt;/P&gt;&lt;P&gt;       z_good   TYPE i,&lt;/P&gt;&lt;P&gt;       z_bad    TYPE i.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;CONSTANTS                                                            *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;SELECTION-SCREEN HELP                                                *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;INITIALIZATION                                                       *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;INITIALIZATION.&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;AT LINE SELECTION                                                    *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;AT LINE-SELECTION.&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;AT SELECTION SCREEN                                                  *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;AT SELECTION-SCREEN.&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;START-OF-SELECTION                                                   *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;START-OF-SELECTION.&lt;/P&gt;&lt;P&gt;  IF p_load = 'X'.&lt;/P&gt;&lt;P&gt;    PERFORM select_records.&lt;/P&gt;&lt;P&gt;    PERFORM process_itab.&lt;/P&gt;&lt;P&gt;  ELSE.&lt;/P&gt;&lt;P&gt;    PERFORM delete_table.&lt;/P&gt;&lt;P&gt;  ENDIF.&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;END-OF-SELECTION                                                     *&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;END-OF-SELECTION.&lt;/P&gt;&lt;P&gt;**********************************************************************&lt;/P&gt;&lt;P&gt;**********************************************************************&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*&amp;amp;      Form  DELETE_TABLE&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;      text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM delete_table.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;  DATA:  w_answer.&lt;/P&gt;&lt;P&gt;  CLEAR: w_answer.&lt;/P&gt;&lt;P&gt;  CALL FUNCTION 'POPUP_TO_CONFIRM'&lt;/P&gt;&lt;P&gt;       EXPORTING&lt;/P&gt;&lt;P&gt;            titlebar              = text-002&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;        DIAGNOSE_OBJECT       = ' '&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;            text_question         = text-003&lt;/P&gt;&lt;P&gt;            text_button_1         = text-004&lt;/P&gt;&lt;P&gt;            icon_button_1         = 'ICON_OKAY'&lt;/P&gt;&lt;P&gt;            text_button_2         = text-005&lt;/P&gt;&lt;P&gt;            icon_button_2         = 'ICON_CANCEL'&lt;/P&gt;&lt;P&gt;            default_button        = '2'&lt;/P&gt;&lt;P&gt;            display_cancel_button = ''&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;        USERDEFINED_F1_HELP   = ' '&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;        START_COLUMN          = 25&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;        START_ROW             = 6&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;        POPUP_TYPE            =&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;      IMPORTING&lt;/P&gt;&lt;P&gt;           answer                = w_answer.&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;   TABLES&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;        PARAMETER             =&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;   EXCEPTIONS&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;        TEXT_NOT_FOUND        = 1&lt;/P&gt;&lt;/LI&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;        OTHERS                = 2&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;  .&lt;/P&gt;&lt;P&gt;  IF w_answer = 1.&lt;/P&gt;&lt;P&gt;    DELETE FROM zpartner&lt;/P&gt;&lt;P&gt;   WHERE vkorg IN s_vkorg&lt;/P&gt;&lt;P&gt;     AND vtweg IN s_vtweg&lt;/P&gt;&lt;P&gt;     AND spart IN s_spart.&lt;/P&gt;&lt;P&gt;    MESSAGE i398(00) WITH 'Records deleted from table: '&lt;/P&gt;&lt;P&gt;                          sy-dbcnt&lt;/P&gt;&lt;P&gt;                          ' '&lt;/P&gt;&lt;P&gt;                          ' '.&lt;/P&gt;&lt;P&gt;  ENDIF.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;ENDFORM.                    " DELETE_TABLE&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*&amp;amp;      Form  SELECT_RECORDS&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;      text&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM select_records.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;get vbaks&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;  CLEAR: it_vbak.&lt;/P&gt;&lt;P&gt;  SELECT vbeln vkorg vtweg spart kunnr&lt;/P&gt;&lt;P&gt;    FROM vbak&lt;/P&gt;&lt;P&gt;    INTO CORRESPONDING FIELDS OF TABLE it_vbak&lt;/P&gt;&lt;P&gt;   WHERE vkorg IN s_vkorg&lt;/P&gt;&lt;P&gt;     AND vtweg IN s_vtweg&lt;/P&gt;&lt;P&gt;     AND spart IN s_spart&lt;/P&gt;&lt;P&gt;     AND auart = 'TA'.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;get vbpa we's&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;  CLEAR: it_vbpa.&lt;/P&gt;&lt;P&gt;  SELECT *&lt;/P&gt;&lt;P&gt;    FROM vbpa&lt;/P&gt;&lt;P&gt;    INTO CORRESPONDING FIELDS OF TABLE it_vbpa&lt;/P&gt;&lt;P&gt;    FOR ALL ENTRIES IN it_vbak&lt;/P&gt;&lt;P&gt;   WHERE vbeln = it_vbak-vbeln&lt;/P&gt;&lt;P&gt;     AND posnr = '000000'&lt;/P&gt;&lt;P&gt;     AND parvw = 'WE'.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;ENDFORM.                    " SELECT_RECORDS&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;*&amp;amp;      Form  PROCESS_ITAB&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;&amp;amp;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt; attempt post goods issue for all entries.&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;STRONG&gt;----&lt;/STRONG&gt;&lt;/P&gt;&lt;HR originaltext="-----------------------------------------------------------------" /&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;FORM process_itab.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;  LOOP AT it_vbak ASSIGNING &amp;lt;it_vbak_line&amp;gt;.&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;look at records--populate it_zpartner&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;    READ TABLE it_vbpa ASSIGNING &amp;lt;it_vbpa_line&amp;gt;&lt;/P&gt;&lt;P&gt;                WITH TABLE KEY  vbeln   = &amp;lt;it_vbak_line&amp;gt;-vbeln.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;    IF sy-subrc = 0.&lt;/P&gt;&lt;P&gt;      CLEAR: wa_zpartner.&lt;/P&gt;&lt;P&gt;      wa_zpartner-mandt = sy-mandt.&lt;/P&gt;&lt;P&gt;      wa_zpartner-vkorg = &amp;lt;it_vbak_line&amp;gt;-vkorg.&lt;/P&gt;&lt;P&gt;      wa_zpartner-vtweg = &amp;lt;it_vbak_line&amp;gt;-vtweg.&lt;/P&gt;&lt;P&gt;      wa_zpartner-spart = &amp;lt;it_vbak_line&amp;gt;-spart.&lt;/P&gt;&lt;P&gt;      wa_zpartner-kunag = &amp;lt;it_vbak_line&amp;gt;-kunnr.&lt;/P&gt;&lt;P&gt;      wa_zpartner-kunwe = &amp;lt;it_vbpa_line&amp;gt;-kunnr.&lt;/P&gt;&lt;P&gt;      APPEND wa_zpartner TO it_zpartner.&lt;/P&gt;&lt;P&gt;    ENDIF.&lt;/P&gt;&lt;P&gt;*&lt;/P&gt;&lt;P&gt;  ENDLOOP.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;  SORT it_zpartner BY mandt vkorg vtweg spart kunag kunwe..&lt;/P&gt;&lt;P&gt;  DELETE ADJACENT DUPLICATES FROM it_zpartner.&lt;/P&gt;&lt;UL&gt;&lt;LI level="1" type="ul"&gt;&lt;P&gt;do a mass table update.&lt;/P&gt;&lt;/LI&gt;&lt;/UL&gt;&lt;P&gt;  INSERT zpartner FROM TABLE it_zpartner.&lt;/P&gt;&lt;P&gt;  IF sy-subrc = 0.&lt;/P&gt;&lt;P&gt;    MESSAGE s398(00) WITH 'Inserted records: ' sy-dbcnt.&lt;/P&gt;&lt;P&gt;  ENDIF.&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;ENDFORM.                    " PROCESS_ITAB&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;reward if helpful,&lt;/P&gt;&lt;P&gt;kushagra&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Tue, 12 Feb 2008 09:11:30 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/why-do-we-use-feild-symbols/m-p/3382892#M812220</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2008-02-12T09:11:30Z</dc:date>
    </item>
    <item>
      <title>Re: Why do we use Feild Symbols</title>
      <link>https://community.sap.com/t5/application-development-and-automation-discussions/why-do-we-use-feild-symbols/m-p/3382893#M812221</link>
      <description>&lt;HTML&gt;&lt;HEAD&gt;&lt;/HEAD&gt;&lt;BODY&gt;&lt;P&gt;hi,&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;The new style of definition of internal tables usually doesn't include a header area for the internal table. Furthermore, ABAP Objects will not allow internal tables with header lines. For added performance, instead of declaring a work area--use a field symbol. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;The work area concept and header line format both require data to be moved from the internal table to the work area or header area. A field symbol is just a pointer that will point to the proper line of the itab. With field symbols, no data needs to be moved. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;The field symbol just stores the proper memory address to point at the right line. The field symbol can have structure and be made up of fields similar to a work area or header line. Because no data needs to be copied, processing is much faster. &lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;/P&gt;&lt;P&gt;&lt;STRONG&gt;Hope this is helpful, Do reward.&lt;/STRONG&gt;&lt;/P&gt;&lt;/BODY&gt;&lt;/HTML&gt;</description>
      <pubDate>Tue, 12 Feb 2008 09:13:42 GMT</pubDate>
      <guid>https://community.sap.com/t5/application-development-and-automation-discussions/why-do-we-use-feild-symbols/m-p/3382893#M812221</guid>
      <dc:creator>Former Member</dc:creator>
      <dc:date>2008-02-12T09:13:42Z</dc:date>
    </item>
  </channel>
</rss>

