× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
--
[ Picked text/plain from multipart/alternative ]
The error doesn't reference a line number, or appear in a source listing,
just throws out the sev30 in the summary.

This is the only SQL in her (small, 9 proc srvpgm module) program:


 C                   Open      Csprd
 c/Exec Sql
 c+ SELECT sum(PBE@RD) into :Points
 c+ FROM CSPRD WHERE SYIDRD = :AcctNum7 and HDB@RD = :RunHyrd
 c+ and GMTPRD = :ProdType and STS@RD = 'A' and GmcdRD <> '**'
 c+ and TimiRD >= :StrTm  and TimoRD <= :EndTm
 c/End-Exec
 C*
 C                   Close     Csprd

-----Original Message-----
From: darren@dekko.com [mailto:darren@dekko.com]
Sent: Wednesday, October 30, 2002 6:33 AM
To: rpg400-l@midrange.com
Subject: Re: SQL pre compiler error CPF956A



I compile almost all my "fancy" SQLRPGLE programs with DBGVIEW(*SOURCE) and
have not seen that error with V5R2.  I've pasted the full description of
the error you received below.  I was looking at an API that would issue
this type of error Add View Text (QteAddViewText) API, and it talks about
debug views so I think this may be the actual API the compile is bombing
on.  When you're running debugger on an SQL program, you don't actually see
the underlying database calls, but rather, you see the SQL statements that
were in your source.  I'm guessing something is going wrong creating these
SQL source views.  Do you know which area of the source the error is being
issued against?


 Message . . . . :   No such text in previous view.
 Cause . . . . . :   A text descriptor indicated that text from line &1 in
the
   previous view was to be used.  However, this text does not exist.
 Recovery  . . . :   Before text in a previous view can be specified in a
text
   descriptor, the text descriptors for the previous view must be added.
The
   text specified which comes from the previous view must exist in the text
   descriptors. Refer to the System Programmer's Interface Reference
   (SC41-8223) for a discussion of using the source debug programming
   interfaces.



                      "Westdorp, Tom"
                      <Tom.Westdorp@StationC        To:
rpg400-l@midrange.com
                      asinos.com>                   cc:
                      Sent by:                      Fax to:
                      rpg400-l-admin@midrang        Subject:  SQL pre
compiler error CPF956A
                      e.com


                      10/29/2002 05:34 PM
                      Please respond to
                      rpg400-l







[ Picked text/plain from multipart/alternative ]
We're on v5r2, and one of my colleagues that uses that 'fancy SQL stuff' is
trying to compile a module (CRTSQLRPGI) with DBGVIEW(*SOURCE) instead of
the
default *NONE and the SQL precompiler throws out:

SQL8009  30          Debug view creation failed: message CPF956A, No such
                     text in previous view..

and quits.

Info Center offers nothing for the SQL8009, and just a ref to the
QteAddViewText API for the CPF956A.  She's not using that API.

The module compiles fine with DBGVIEW(*NONE).






_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.