Re: How do you give a multiple report SQR specific file names

["Nanjundappa, Mohan" <nanjundm@TALGOV.COM>]

I am trying to update PS_BUD_JRNL_LN
from the values in project_header. I am running the program on Oracle but
getting error as


follows



*******************************************************
Error on line 33:
   (SQR 1944) The date ' Updating  :' is not in the format
specified by SQR_DB_DATE_FORMAT or in one of the accepted
formats listed below:
        DD-MON-YY
        SYYYYMMDD[HH24[MI[SS[NNNNNN]]]]

SQR: Program Aborting.

*******************************************************

The Program is as given below.



#include 'setenv.sqc'
BEGIN-PROGRAM
  Display 'Check Project :'
  DO SELECT_PROJECT
  Display 'End Project:'
END-PROGRAM

BEGIN-PROCEDURE SELECT_PROJECT
BEGIN-SELECT
DISTINCT RTRIM(A.PROJECT_ID,' ') &PROJECT_ID
to_char(A.START_DT,'DD-MON-YYYY')  &start_dt
TO_CHAR(A.END_DT,'DD-MON-YYYY')    &end_dt


   lET #COUNT = #COUNT + 1
   dISPLAY ' Reading  :'

   DO UPDATE_BUD_JRNL_LN

FROM PS_PROJECT_HEADER A
  WHERE A.EFFDT =
        (SELECT MAX(A_ED.EFFDT) FROM PS_PROJECT_HEADER A_ED
        WHERE A.SETID = A_ED.SETID
          AND A.PROJECT_ID = A_ED.PROJECT_ID
          AND A_ED.EFFDT <= SYSDATE)
ORDER BY 2
END-SELECT
END-PROCEDURE


BEGIN-PROCEDURE UPDATE_BUD_JRNL_LN
      dISPLAY ' Updating  :'  #count
BEGIN-SQL
    UPDATE PS_BUD_JRNL_LN
    SET END_DT = &END_DT,
        BEGIN_DT = &START_DT
    WHERE
       PROJECT_ID = &PROJECT_ID
       AND LEDGER = 'PROJ_GRT'
END-SQL
     Display 'Updated :'
END-PROCEDURE


#Include 'prcsdef.sqc'   !Update Process Request variable declare
#Include 'prcsapi.sqc'   !Update Process API
#Include 'reset.sqc'     !Reset printer procedure
#Include 'curdttim.sqc'  !Get-Current-DateTime procedure
#Include 'datetime.sqc'  !Format-DateTime procedures
#Include 'number.sqc'    !Format-Number procedure
#Include 'eoj.sqc'       !Updates process scheduder



Thanks in Advance

Mohan Nanjundappa