Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

Field Symbol Document

Former Member
0 Likes
801

Hi,

If any1 has a good document on Field Symbols please do forward it.

Regards,

Siva.

1 ACCEPTED SOLUTION
Read only

Former Member

Hi,

If any1 has a good document on Field Symbols please do forward it.

Regards,

Siva.

5 REPLIES 5
Read only

suresh_datti
Active Contributor
0 Likes
773

PL check this<a href="http://help.sap.com/saphelp_47x200/helpdata/en/fc/eb3860358411d1829f0000e829fbfe/frameset.htm">SAP help</a>

Regards,

Suresh Datti

Read only

Former Member
Read only

Former Member
0 Likes
773

chk this help

<a href="http://help.sap.com/saphelp_nw04/helpdata/en/fc/eb3860358411d1829f0000e829fbfe/content.htm">field Symbols</a>

Message was edited by: Chandrasekhar Jagarlamudi

Read only

0 Likes
773

REPORT ztestit .

DATA: BEGIN OF i0008 OCCURS 10.

INCLUDE STRUCTURE p0008.

DATA: END OF i0008.

data:var_n_cnt type i,

var_lga_name(12),

var_bet_name(12),

wagetype like pa0008-lga01,

amount like pa0008-bet01,

sum like pa0008-bet01,

var_c_cnt(2).

FIELD-SYMBOLS <lga_var_name> TYPE ANY.

FIELD-SYMBOLS <bet_var_name> TYPE ANY.

FIELD-SYMBOLS <lga_val> TYPE ANY.

FIELD-SYMBOLS <bet_val> TYPE ANY.

CALL FUNCTION 'HR_READ_INFOTYPE'

EXPORTING

  • TCLAS = 'A'

pernr = '1687'

infty = '0008'

begda = '20041014'

endda = '99991231'

  • BYPASS_BUFFER = ' '

  • LEGACY_MODE = ' '

  • IMPORTING

  • SUBRC =

TABLES

infty_tab = i0008

  • EXCEPTIONS

  • INFTY_NOT_FOUND = 1

  • OTHERS = 2

  • .

*IF sy-subrc <> 0.

    • MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

    • WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

*ENDIF.

***********************check to be performed*******

LOOP AT i0008.

var_n_cnt = 1.

WHILE var_n_cnt <= 20.

IF var_n_cnt < 10.

var_c_cnt = var_n_cnt.

CONCATENATE '0' var_c_cnt INTO var_c_cnt.

ELSE.

var_c_cnt = var_n_cnt.

ENDIF.

CONCATENATE 'I0008-LGA' var_c_cnt INTO var_lga_name.

ASSIGN var_lga_name TO <lga_var_name>.

ASSIGN (<lga_var_name>) TO <lga_val>.

  • ASSIGN (<lga_var_name>) TO wagetype.

CONCATENATE 'I0008-BET' var_c_cnt INTO var_bet_name.

ASSIGN var_bet_name TO <bet_var_name>.

ASSIGN (<bet_var_name>) TO <bet_val>.

  • ASSIGN (<bet_var_name>) TO amount.

*

IF <lga_val> = '1000'.

sum = sum + <bet_val>.

  • write : sum.

    • <BET_VAR_NAME> = IT_ZWAGE-MIN_PAY.

  • IF <bet_val> = ''.

  • <bet_val> = it_zwage-min_pay.

*sum = sum + amount.

endif.

var_n_cnt = var_n_cnt + 1.

*unassign

endwhile.

ENDLOOP.

write:/ sum.

check this program and try ABAPDOCU for documentation ...

reward points if it helps

gunjan

Read only

Former Member
0 Likes
773

Hai Siva Prakash

Field-Symbols are place holders for existing fields.

A Field-Symbol does not physically reserve space for a field but points to a field, which is not known until run time of the program.

Field-Symbols are like Pointers in Programming language ‘ C ‘.

Syntax check is not effective.

Syntax :

Data : v1(4) value ‘abcd’.

Field-symbols <fs>.

Assign v1 to <fs>.

Write:/ <fs>.

DATA: BEGIN OF LINE,

COL1 TYPE I,

COL2 TYPE I,

END OF LINE.

DATA ITAB LIKE SORTED TABLE OF LINE WITH UNIQUE KEY COL1.

FIELD-SYMBOLS <FS> LIKE LINE OF ITAB.

DO 4 TIMES.

LINE-COL1 = SY-INDEX.

LINE-COL2 = SY-INDEX ** 2.

APPEND LINE TO ITAB.

ENDDO.

READ TABLE ITAB WITH TABLE KEY COL1 = 2 ASSIGNING <FS>.

<FS>-COL2 = 100.

READ TABLE ITAB WITH TABLE KEY COL1 = 3 ASSIGNING <FS>.

DELETE ITAB INDEX 3.

IF <FS> IS ASSIGNED.

WRITE '<FS> is assigned!'.

ENDIF.

LOOP AT ITAB ASSIGNING <FS>.

WRITE: / <FS>-COL1, <FS>-COL2.

ENDLOOP.

The output is:

1 1

2 100

4 16

Thanks & regards

Sreeni