‎2008 Mar 10 6:03 AM
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
‎2008 Mar 10 7:03 AM
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
‎2008 Mar 10 7:03 AM
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
‎2008 Mar 13 3:48 AM
dear Chandrasekhar
thank you for your advice , after i fellow it , my report syntax check passed .
really thank you for that ~ ^^
David