RE: can't get date with sqlrpg

[David FOXWELL <David.FOXWELL@xxxxxxxxx>]

Thanks Birgitta,

I just had to move 
> C/EXEC SQL
> C+ SET : WMAJDL = CURRENT DATE
> C/END-EXEC

from the *inzsr to the first c spec


> -----Message d'origine-----
> De : rpg400-l-bounces@xxxxxxxxxxxx 
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] De la part de Birgitta Hauser
> Envoyé : mardi 30 novembre 2010 17:33
> À : 'RPG programming on the IBM i / System i'
> Objet : AW: can't get date with sqlrpg
>
> SET OPTION are the "H-Specs" for embedded SQL but are not 
> executed at runtime.
> That's why a SET OPTION statement should be coded only once 
> and MUST physically precede ALL other SQL-Statements within 
> your Source code.
>
> A real date is always a binary value and date formats are 
> only for to make those binary values readeable.
>
> If you want to display or print a data within a specific 
> format, just convert it into character:
> c/EXEC SQL  Set :MyCharDate = CHAR(Current_Date, EUR) C/END-Exec
>
> Mit freundlichen Grüßen / Best regards
>
> Birgitta Hauser
>
> "Shoot for the moon, even if you miss, you'll land among the 
> stars." (Les
> Brown)
> "If you think education is expensive, try ignorance." (Derek 
> Bok) "What is worse than training your staff and losing them? 
> Not training them and keeping them!"
>
> -----Ursprüngliche Nachricht-----
> Von: rpg400-l-bounces@xxxxxxxxxxxx 
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im Auftrag von David FOXWELL
> Gesendet: Tuesday, 30. November 2010 15:28
> An: RPG programming on the IBM i / System i
> Betreff: RE: can't get date with sqlrpg
>
> > -----Message d'origine-----
> > [mailto:rpg400-l-bounces@xxxxxxxxxxxx] De la part de 
> > Tommy.Holden@xxxxxxxxxxxxxxxxxxxxx
> >
> > Remove the space between the colon and WMAJDL on you SET 
> statement...
>
> Huh? That line works. It's the format of the date that's wrong.
>
>
>
>
>
>
>
>
>
> > Hi all
> >
> > This was giving me '30/11/10  '
> >
> > C/EXEC SQL
> > C+ SET : WMAJDL = CURRENT DATE
> > C/END-EXEC
> >
> > I wanted '30.11.2010'
> >
> > So I tried :
> >
> > C/EXEC SQL
> > C+ SET OPTION DATFMT = *EUR
> > C/END-EXEC
> >
> > the editor accepts this but the compiler says position 9 
> not admitted.
> > Where is position 9 anyway? 
> >
> > Thanks for your help.
> >  
> > --
> > This is the RPG programming on the IBM i / System i
> > (RPG400-L) mailing
> > list
> > To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, 
> > unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx Before posting, 
> please take a 
> > moment to review the archives at 
> http://archive.midrange.com/rpg400-l.
> > -- 
> > This is the RPG programming on the IBM i / System i 
> > (RPG400-L) mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> -- 
> This is the RPG programming on the IBM i / System i 
> (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>
> -- 
> This is the RPG programming on the IBM i / System i 
> (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.