RE: SQLRPGLE -- date format question

["DeLong, Eric" <EDeLong@xxxxxxxxxxxxxxx>]

Jimmy,

Since SQL has to pass through the precompiler, you need to tell SQL how it
is supposed to treat date data.  It does not use the DATFMT() from the H
spec.  Two ways to go about this; on the CRTSQLRPGI command, specify DATFMT
in the compile command, or (my preference) use a SQL options block in your
source member to specify your SQL options.  See the example below...

C/EXEC SQL                    
C+ Set Option                 
C+     DatFmt    = *Iso,      
C+     Naming    = *Sys,      
C+     Commit    = *None,     
C+     UsrPrf    = *User,     
C+     DynUsrPrf = *User,     
C+     CloSqlCsr = *EndMod    
C/END-EXEC                    


hth,

Eric DeLong
Sally Beauty Company
MIS-Project Manager (BSG)
940-898-7863 or ext. 1863



-----Original Message-----
From: Jimmy Ballard [mailto:JBallard@xxxxxxxxxxxxx]
Sent: Tuesday, November 30, 2004 3:27 PM
To: 'rpg400-l@xxxxxxxxxxxx'
Subject: SQLRPGLE -- date format question


Hello all,
 
I have an SQLRPGLE program that is populating a host data structure via an
SQL fetch statement. The date format in the file is *ISO, and my DS in the
RPG program specifies DATFMT(*ISO). However, the program will not compile --
the initial compile listing (which is very short -- I assume its some type
of SQL precompiler) lists the error as "Host structure array ... not defined
or not usable."
 
My question is this -- I can fix the problem if I compile the program with
DATFMT(*ISO) -- but if I add an H spec to the top of the source for
DATFMT(*ISO) it doesn't compile. In SQLRPGLE programs are the H specs
ignored? Sure would be nice if that worked.
 
While I have your attention -- a quick second question.  One of my
annoyances with Client Access is that the light blue and the yellow colors
on display files have those irritating column separators. Whats up with
that? Is there any way to get around it?
 
Thanks!
-Jimmy 
--
This is the RPG programming on the AS400 / iSeries (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.