AW: can't get date with sqlrpg

["Birgitta Hauser" <Hauser@xxxxxxxxxxxxxxx>]

If you are working with RPGIII, you need a character representation of a
date and NOT a real date?
So SET OPTION may or may not help you. 
To convert a date into a character representation, you may use the scalar
function CHAR and specifiy the desired format (without leading asteric)

C/EXEC SQL  Set :WMAJDL = 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: Thursday, 02. December 2010 09:20
An: RPG programming on the IBM i / System i
Betreff: RE: can't get date with sqlrpg

Wrong hammer, Mark. The subject says SQLRPG, not SQLRPGLE!

 

> -----Message d'origine-----
> De : rpg400-l-bounces@xxxxxxxxxxxx 
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] De la part de Mark 
> Murphy/STAR BASE Consulting Inc.
> Envoyé : mercredi 1 décembre 2010 22:50
> À : RPG programming on the IBM i / System i
> Objet : Re: can't get date with sqlrpg
>
> What's wrong with
>
>
> H DatFmt(*EUR)
>
>  /free
>    WMAJDL = %char(%date);
>  /end-free
>
> It is at least twice as fast, and you don't have all that SQL 
> syntax confusing the issue.  Do you use Exec SQL to do all of 
> your other assignments?
>
> Sure you can use a big wrench to pound in a nail, but why do 
> that when the hammer is right there.
>
> Mark Murphy
> STAR BASE Consulting, Inc.
> mmurphy@xxxxxxxxxxxxxxx
>
>
>
> From:   David FOXWELL <David.FOXWELL@xxxxxxxxx>
> To:     RPG programming on the IBM i / System i 
> <rpg400-l@xxxxxxxxxxxx>
> Date:   11/30/2010 09:18 AM
> Subject:        can't get date with sqlrpg
> Sent by:        rpg400-l-bounces@xxxxxxxxxxxx
>
>
>
> 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.