topic Re: Field Symbol Document in Application Development and Automation Discussions

Field Symbol Document

Former Member — Mon, 22 May 2006 12:13:09 GMT

Hi,

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

Regards,

Siva.

Re: Field Symbol Document

suresh_datti — Mon, 22 May 2006 12:15:12 GMT

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

Regards,

Suresh Datti

Re: Field Symbol Document

Former Member — Mon, 22 May 2006 12:16:08 GMT

Hi Siva,

Check this link:

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

Regards,

Ravi

Re: Field Symbol Document

Former Member — Mon, 22 May 2006 12:17:17 GMT

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

Re: Field Symbol Document

Former Member — Mon, 22 May 2006 12:21:19 GMT

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

Re: Field Symbol Document

Former Member — Mon, 22 May 2006 12:21:46 GMT

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