Re: embedded sql, procedure, and report output

[Duane Kehoe <dkehoe@xxxxxxxxxxxxxx>]

   Jim,
   I agree it is good to learn but it is also good to complete the task at
   hand(which is rather simple in nature and should only take a couple of
   hours to write and test).  I will search Info Center some more and see
   what I can find.

   Jim Franz wrote:

     The SQL STT code did not change in 5.3 and would still give you same
     return code.
     There are pages in Info Center for list of SQLSTT and SQLCOD. Just put
     SQLSTT in search.
     Very informative.
     Stick with this - it's good to learn.
     Jim Franz

     ----- Original Message ----- From: "Duane Kehoe" <dkehoe@xxxxxxxxxxxxxx>
     To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
     Sent: Wednesday, October 26, 2005 3:49 PM
     Subject: Re: embedded sql, procedure, and report output

         I had my code looking very similar to that without the activation
       groups
         and can not get it to work on V5R2.  I am about to give up and
       convert the
         program back to regular file access as I know it will work.  I wish
       this
         SQL stuff was easier(I know upgrade to V5R3 and it is!!), thanks

         rob@xxxxxxxxx wrote:

       This compiles on my V5R3 machine
            h dftactgrp(*no) actgrp(*caller)
            FQSYSPRT   O    F   80        PRINTER
            D MySub           PR
            D ts              s               z
            C/exec sql
            C+ values current timestamp into :ts
            C/end-exec
             /free
              *inlr=*on;
              return;
             /end-free
            OQSYSPRT   E            H
            O                                           08 'DATE:'
            P MySub           B
            D MySub           PI
             /free
              return;
             /end-free
            P MySub           E

       With TGTRLS set to *CURRENT, V5R2M0 or V5R1M0.

       Rob Berendt

         --

         Weyco Group -

             Florsheim, Brass Boot, Nunn Bush, Stacy Adams
         Duane Kehoe                       Phone # 414.908.1814
         EC / Programmer / Analyst           Fax # 414.908.1601
                                   Email: dkehoe@xxxxxxxxxxxxxx
       -- 
       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.

   --

   Weyco Group -             
                             
       Florsheim, Brass Boot, Nunn Bush, Stacy Adams
   Duane Kehoe                       Phone # 414.908.1814 
   EC / Programmer / Analyst           Fax # 414.908.1601 
                             Email: dkehoe@xxxxxxxxxxxxxx