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

problem on native sql

Former Member
0 Likes
478

hi all

i suffered a syntax problem that don't know how to fix .

hope you can kindly teach me how to fix it .

the problem is while the "syntax check" function checked those line :

loop at IT_ZBC_HR01_TEMP .

write:/ IT_ZBC_HR01_TEMP-employeeid .

endloop.

the sap reply that : those statement is not accessible .

my native sql is :

================================

REPORT ZTEST_DAVID01.

tables: ZBC_HR01_TEMP .

data it_zbc_hr01_temp like table of ZBC_HR01_TEMP with header line .

data wa like ZBC_HR01_TEMP .

data con_name like dbcon-con_name value 'RELAYDB' .

data: DBN(128).

*SET CONNECTION

EXEC SQL.

CONNECT TO :CON_NAME

ENDEXEC.

*error handle

if sy-subrc ne 0 .

write: / 'error occur while open connection' , :CON_NAME .

ENDIF.

EXEC SQL.

SET CONNECTION 'RELAYDB'

ENDEXEC.

EXEC SQL PERFORMING loop_output.

SELECT EMPLOYEEID, WERKS, EMP_NAME_CH

INTO :wa-EMPLOYEEID , :wa-WERKS , :wa-EMP_NAME_CH

FROM ZTEMP1

WHERE OUIT_DATE IS NULL

ENDEXEC.

FORM loop_output.

MOVE-corresponding WA TO IT_ZBC_HR01_TEMP .

append IT_ZBC_HR01_TEMP .

ENDFORM.

loop at IT_ZBC_HR01_TEMP .

write:/ IT_ZBC_HR01_TEMP-employeeid .

endloop.

==========================================================

thank you ~

David

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
447

hi.,

Place the Loop piece of code before form and end form.

then it will work.

like this..

REPORT ZTEST_DAVID01.

tables: ZBC_HR01_TEMP .

data it_zbc_hr01_temp like table of ZBC_HR01_TEMP with header line .

data wa like ZBC_HR01_TEMP .

data con_name like dbcon-con_name value 'RELAYDB' .

data: DBN(128).

*SET CONNECTION

EXEC SQL.

CONNECT TO :CON_NAME

ENDEXEC.

*error handle

if sy-subrc ne 0 .

write: / 'error occur while open connection' , :CON_NAME .

ENDIF.

EXEC SQL.

SET CONNECTION 'RELAYDB'

ENDEXEC.

EXEC SQL PERFORMING loop_output.

SELECT EMPLOYEEID, WERKS, EMP_NAME_CH

INTO :wa-EMPLOYEEID , :wa-WERKS , :wa-EMP_NAME_CH

FROM ZTEMP1

WHERE OUIT_DATE IS NULL

ENDEXEC.

loop at IT_ZBC_HR01_TEMP .

write:/ IT_ZBC_HR01_TEMP-employeeid .

endloop.

FORM loop_output.

MOVE-corresponding WA TO IT_ZBC_HR01_TEMP .

append IT_ZBC_HR01_TEMP .

ENDFORM.

Reward points if useful

Chandra

2 REPLIES 2
Read only

Former Member
0 Likes
448

hi.,

Place the Loop piece of code before form and end form.

then it will work.

like this..

REPORT ZTEST_DAVID01.

tables: ZBC_HR01_TEMP .

data it_zbc_hr01_temp like table of ZBC_HR01_TEMP with header line .

data wa like ZBC_HR01_TEMP .

data con_name like dbcon-con_name value 'RELAYDB' .

data: DBN(128).

*SET CONNECTION

EXEC SQL.

CONNECT TO :CON_NAME

ENDEXEC.

*error handle

if sy-subrc ne 0 .

write: / 'error occur while open connection' , :CON_NAME .

ENDIF.

EXEC SQL.

SET CONNECTION 'RELAYDB'

ENDEXEC.

EXEC SQL PERFORMING loop_output.

SELECT EMPLOYEEID, WERKS, EMP_NAME_CH

INTO :wa-EMPLOYEEID , :wa-WERKS , :wa-EMP_NAME_CH

FROM ZTEMP1

WHERE OUIT_DATE IS NULL

ENDEXEC.

loop at IT_ZBC_HR01_TEMP .

write:/ IT_ZBC_HR01_TEMP-employeeid .

endloop.

FORM loop_output.

MOVE-corresponding WA TO IT_ZBC_HR01_TEMP .

append IT_ZBC_HR01_TEMP .

ENDFORM.

Reward points if useful

Chandra

Read only

0 Likes
447

dear Chandrasekhar

thank you for your advice , after i fellow it , my report syntax check passed .

really thank you for that ~ ^^

David