[Date Prev][Date Next][Thread Prev][Thread Next]
[Author Index] [Date Index] [Thread Index]
[SQR-USERS Info] [SQRUG Home Page]

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



Hi Mohanborder,
 try converting the &date variable to date by using
TO_DATE function in SQR.

SQR converts date to the native date format.

talk to you later.

LAXMAN


--- "Nanjundappa, Mohan" <nanjundm@TALGOV.COM> wrote:
> 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


__________________________________________________
Do You Yahoo!?
Get personalized email addresses from Yahoo! Mail
http://personal.mail.yahoo.com/