RE: SQLRPG - Fetch Into a record format?

[rob@xxxxxxxxx]

Pray tell, what do you mean by "on-the-fly"?
/free
 Select;
 when myvar='1';
/end-free
C/execsql
C+ set option naming=*sys
C/end-exec
/free
 other;
/end-free
C/execsql
C+ set option naming=*sql
C/end-exec
/free
 EndSl;
/end-free
???

Rob Berendt
-- 
"They that can give up essential liberty to obtain a little temporary 
safety deserve neither liberty nor safety." 
Benjamin Franklin 




MWalter@xxxxxxxxxxxxxxx
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
04/08/2003 02:16 PM
Please respond to RPG programming on the AS400 / iSeries
 
        To:     RPG programming on the AS400 / iSeries 
<rpg400-l@xxxxxxxxxxxx>
        cc: 
        Fax to: 
        Subject:        RE: SQLRPG - Fetch Into a record format?



Nice thing is that, if you need to , the SQL options can be set on the fly
without recompilation. H specs can't.


Thanks,

Mark


Mark Walter
Sr. Programmer/Analyst
Hanover Wire Cloth a div of CCX, Inc.
mwalter@xxxxxxxxxxxxxxx
http://www.hanoverwire.com
717.637.3795 Ext.3040
/"\
\ /
 X
/ \



  
                    rob@xxxxxxxxx   
                    Sent by:                   To:     RPG programming on 
the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> 
                    rpg400-l-bounces@xx        cc:     
                    drange.com                 Subject:     RE: SQLRPG - 
Fetch Into a record format? 
  
  
                    04/08/2003 03:00 PM    
                    Please respond to   
                    RPG programming on    
                    the AS400 / iSeries    
  
  




Come to think of it.  Might this be one time when the precompiler people
have one up on the compiler people?  Who has left more compiler options
hanging?

A)  SQL:  CRTSQLRPGI vs SET OPTION
B)  RPG:  CRTBNDRPG vs H spec

Rob Berendt
--
"They that can give up essential liberty to obtain a little temporary
safety deserve neither liberty nor safety."
Benjamin Franklin




rob@xxxxxxxxx
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
04/08/2003 01:39 PM
Please respond to RPG programming on the AS400 / iSeries

        To:     RPG programming on the AS400 / iSeries
<rpg400-l@xxxxxxxxxxxx>
        cc:
        Fax to:
        Subject:        RE: SQLRPG - Fetch Into a record format?


Yes, you can forget about the compile options with this.  Like I said,
SQL's answer to the H spec.

This:
     C/EXEC SQL
     C+ Set Option
     C+     Commit     = *None,
     C+     closqlcsr = *endmod
     C/END-EXEC
Might be cleaner.  For more information:
http://publib.boulder.ibm.com/iseries/v5r2/ic2924/info/db2/rbafzmstsoption.htm#HDRSOPTION




Rob Berendt
--
"They that can give up essential liberty to obtain a little temporary
safety deserve neither liberty nor safety."
Benjamin Franklin




"Mike Haston ** Data" <MHaston@xxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
04/08/2003 01:10 PM
Please respond to RPG programming on the AS400 / iSeries

        To:     "RPG programming on the AS400 / iSeries"
<rpg400-l@xxxxxxxxxxxx>
        cc:
        Fax to:
        Subject:        RE: SQLRPG - Fetch Into a record format?


Rob -

So I can get away from worry about remembering compile options with this
code?  Here are the three compile options I worry about ... so far.

COMMIT         *NONE
CLOSQLCSR      *ENDMOD
DLYPRP         *YES




     C/EXEC SQL
     C+ Set Option
     C+     Commit    = *None
     C/END-EXEC

      * close cursor
                 c/exec sql
                 c+ set option closqlcsr = *endmod
                 c/end-exec

_______________________________________________
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.


_______________________________________________
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.


_______________________________________________
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.





_______________________________________________
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.