Skip to Content
0
Former Member
Apr 20, 2010 at 01:15 PM

Error with two tables in se38

125 Views

hi all,

i am trying this program n getting such kind of error as i m very new in abap...so plz help me..

i m getting such kind of error------

program YFINAL_TABLE

after enhance ment,you may not be able to convert the structure

"WA_FINAL-PERNR"into into a character-type field and would then,as an operand,no longer be allowed.

my program is---->

&----


*& Report YFINAL_TABLE *

*& *

&----


*& *

*& *

&----


REPORT YFINAL_TABLE .

**DECLARATION OF TABLES

Tables : pa0002,pa0006.

**DECLARATION OF TYPES

Types : Begin of final,

pernr type pernr,

vorna type vorna,

nachn type nachn,

telnr type telnr,

ort01 type ort01,

state type state,

end of Final.

**DECLARATION OF INTERNAL TABLE AND WORK AREA

Data : it_pa0002 type pa0002 occurs 0 with header line.

data : it_pa0006 type pa0006 occurs 0 with header line..

data : it_final type standard table of final.

data : wa_final type final.

perform get_data.

perform Process_Data.

perform Display_Data.

&----


*& Form get_data

&----


  • text

----


  • --> p1 text

  • <-- p2 text

----


FORM get_data .

Select *

into table it_pa0002

from Pa0002.

if sy-subrc = 0.

if not it_pa0002[] is initial.

select *

into table it_pa0006

from pa0006

for ALL ENTRIES IN IT_PA0002

where pernr = it_pa0002-pernr.

endif.

endif.

ENDFORM. " get_data

&----


*& Form Process_Data

&----


  • text

----


  • --> p1 text

  • <-- p2 text

----


FORM Process_Data .

move it_pa0002-pernr to wa_Final-pernr.

move it_pa0002-vorna to wa_final-vorna.

move it_pa0002-nachn to wa_final-nachn.

move it_pa0006-telnr to wa_final-telnr.

wa_final-ort01 = it_pa0006-ort01.

wa_final-state = it_pa0006-state.

ENDFORM. " Process_Data

&----


*& Form Display_Data

&----


  • text

----


  • --> p1 text

  • <-- p2 text

----


FORM Display_Data .

write : / 'PERSONAL_NO',

40 'FIRST_NAME',

50 'LAST_NAME',

60 'contact number',

70 'city',

80 'state'.

Loop at it_final into wa_final.

write : / wa_final-pernr,

wa_final-vorna,

wa_final-nachn,

wa_final-telnr,

wa_final-ort01,

wa_final-state.

Endloop.

ENDFORM. " Display_Data

thanx

rose