Passing Field Symbols in subroutines

Former Member · ‎2007 Jul 17

Hi all,

Can any body tell me how to pass field symbols in a suboutine and will that effect orignal value of that symbl if i change it in subroutine.

Any Help will be awarded.

Sachin

Former Member · ‎2007 Jul 17

HI Sachin

Refer to this code:

PERFORM f_conversion_exit

USING p_table

p_field

v_convexit :

CHANGING wa_srange-low,

wa_srange-high .



*&---------------------------------------------------------------------*
*&      Form  f_conversion_exit
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*      -->P_P_TABLE  text
*      -->P_P_FIELD  text
*      -->P_VARCONV_EXIT  text
*      <--P_S_RANGE_LOW  text
*----------------------------------------------------------------------*
FORM f_conversion_exit  USING    p_tabname                 "#EC *)
                              p_fname                      "#EC *)
                              p_convexit                   "#EC *)
                        CHANGING p_value.

* Declare a field symbol which has a field type structure
  FIELD-SYMBOLS: <fs_fld> TYPE ANY.
  ASSIGN COMPONENT p_field OF STRUCTURE <dyn_wa> TO <fs_fld>."#EC * )
  CALL FUNCTION p_convexit
    EXPORTING
      input  = p_value
    IMPORTING
      output = <fs_fld>.

  MOVE <fs_fld> TO p_value.


ENDFORM.                    " f_conversion_exit

regards

ravish

plz reward if useful

Former Member · ‎2007 Jul 17

Hi

Field Symbols

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.

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.

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.

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.

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.

Field symbols provide greater flexibility when you address data objects:

If you want to process sections of fields, you can specify the offset and length of the field dynamically.

You can assign one field symbol to another, which allows you to address parts of fields.

Assignments to field symbols may extend beyond field boundaries. This allows you to address regular sequences of fields in memory efficiently.

You can also force a field symbol to take different technical attributes from those of the field assigned to it.

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.

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.

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.

check the below links u will get the answers for your questions

http://help.sap.com/saphelp_nw04/helpdata/en/fc/eb3860358411d1829f0000e829fbfe/content.htm

http://www.sts.tu-harburg.de/teaching/sap_r3/ABAP4/field_sy.htm

http://searchsap.techtarget.com/tip/1,289483,sid21_gci920484,00.html

Syntax Diagram

FIELD-SYMBOLS

Basic form

FIELD-SYMBOLS <fs>.

Extras:

1. ... TYPE type

2. ... TYPE REF TO cif

3. ... TYPE REF TO DATA

4. ... TYPE LINE OF type

5. ... LIKE s

6. ... LIKE LINE OF s

7. ... TYPE tabkind

8. ... STRUCTURE s DEFAULT wa

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.

Effect

This statement declares a symbolic field called <fs>. 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.

You can only use one of the additions.

Example

Output aircraft type from the table SFLIGHT using a field symbol:

FIELD-SYMBOLS <PT> TYPE ANY.

DATA SFLIGHT_WA TYPE SFLIGHT.

...

ASSIGN SFLIGHT_WA-PLANETYPE TO <PT>.

WRITE <PT>.

Addition 1

... TYPE type

Addition 2

... TYPE REF TO cif

Addition 3

... TYPE REF TO DATA

Addition 4

... TYPE LINE OF type

Addition 5

... LIKE s

Addition 6

... LIKE LINE OF s

Addition 7

... TYPE tabkind

Effect

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.

This addition is not allowed in an ABAP Objects context. See Cannot Use Obsolete Casting for FIELD SYMBOLS.

In some cases, the syntax rules that apply to Unicode programs are different than those for non-Unicode programs. See Defining Types Using STRUCTURE.

Effect

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: <fs>-fieldname. The structured field symbol points initially to the work area wa specified after DEFAULT.

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.

Example

Address components of the flight bookings table SBOOK using a field symbol:

DATA SBOOK_WA LIKE SBOOK.

FIELD-SYMBOLS <SB> STRUCTURE SBOOK

DEFAULT SBOOK_WA.

...

WRITE: <SB>-BOOKID, <SB>-FLDATE.

Reward points for useful Answers

Regards

Anji

Former Member · ‎2007 Jul 17

Hi all,

Thanx all. i solved it. code that i do is:

&----

*& Report ZSUBROUTINE_IN_TEST

*&

&----

*&

&----

Adding Two Numbers using Subroutines PASS BY VALUE.

REPORT ZSUBROUTINE_IN_TEST.

PARAMETERS: A TYPE I,

B TYPE I.

FIELD-SYMBOLS <FS1>.

FIELD-SYMBOLS <FS2>.

PERFORM ADD USING A B CHANGING SUM.

ASSIGN A TO <FS1>.

ASSIGN B TO <FS2>.

WRITE : / 'BEFORE SWAPPING'.

WRITE : / 'FIELD SYMB 1: ', <FS1>.

WRITE : / 'FIELD SYMB 2: ', <FS2>.

PERFORM SWAP USING <FS1> <FS2>.

WRITE : / 'AFTER SWAPPING'.

WRITE : / 'FIELD SYMB 1: ', <FS1>.

WRITE : / 'FIELD SYMB 2: ', <FS2>.

&----

*& Form SWAP using FIELD-SYMBOLS

&----

text

----

-->F_NUM text
-->S_NUM text

----

FORM SWAP

USING NUM1 NUM2.

DATA: TEMP TYPE I.

TEMP = NUM1.

NUM1 = NUM2.

NUM2 = TEMP.

ENDFORM. "SWAP

Sachin