Re: Where does CRTSQLRPG store the text of SQL instructions?

[Vern Hamberg <vhamberg@xxxxxxxxxxx>]

Right, Alan

The original embedded SQL is seen by the pre-compiler - a pre-compiler 
takes some code with special characters and converts it into true source 
code for the language in question.

Here the original code is commented out but present, to see what is 
being done. The code after this is working with variables that are 
listed in I-specs up higher in the code. These start with SQL and then 
have a 3-digit number - we have SQL005 and SQL006 here - these 
correspond to the BOL2DH and COUNT(*) in the SQL statement, resp., is my 
guess.

SQLRT is probably the SQL run-time - RT for run-time - and it is called 
for every statement you put into the program. I've never looked at 
SQLCA, but I suspect that has some of the statement stuff. One element, 
SQLER6, is set to -4, which I've always thought identified some 
operation or such. I really don't know.

But this makes sense to me - HTH
Vern

Now this is just normal RPG - it IS the true source that is used to 
compile the program. It does have extra stuff, which may allow for the 
different SQL display types in STRDBG.

As I replied in another thread here, change the output location for the 
generated source - this lets a person keep the source in a permanent 
location instead of QTEMP.

Vern

On 11/30/2011 10:07 AM, Alan Campin wrote:
> If I understanding the question correctly the text is only seen by the
> pre-compilier which converts to rpg calls. The SQLRT are the SQL calls.
>
> On Wed, Nov 30, 2011 at 8:42 AM, Steve Richter<stephenrichter@xxxxxxxxx>wrote:
>
> > When CRTSQLRPG runs it places the converted SQLRPG ->  RPG code in a srcmbr
> > in QTEMP/QSQLTEMP. When I look at the QSQLTEMP code I don't see the text of
> > the sql instructions. Just a call to SQLRT.
> >
> > How is it I can compile and run the source in QSQLTEMP without the sql
> > instruction text being passed to any of the SQL processor programs?
> >
> > this is the rpg code in QSQLTEMP that runs the SQL instruction:
> >
> >     C*EXEC SQL
> >     C*    SELECT          COUNT(*)
> >     C*    INTO            :VCOUNT
> >     C*    FROM            BOLMSTRH
> >     C*    WHERE           BOL2DH = :VBOL2D
> >     C*END-EXEC
> >     CL0                   Z-ADDVBOL2D    SQL005
> >     CL0                   Z-ADD-4        SQLER6            1
> >     CL0                   CALL SQLRT
> >     CL0                   PARM           SQLCA
> >     CL0                   PARM           SQL000
> >     CL0         SQL004    IFEQ '1'
> >     CL0                   Z-ADDSQL006    VCOUNT
> >     CL0                   END
> > --
> > 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.