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


  • Subject: RE: QSPRWTRI not in QC2LE ???
  • From: "Sandiego, Angelito" <Angelito.Sandiego@xxxxxx>
  • Date: Wed, 4 Oct 2000 17:56:47 -0500

There might be a better way, but I usually do a WRKOBJ on the program/procedure 
in question and if I find it it's a program (otherwise, it's a procedure).

-----Original Message-----
From: Jim Langston [mailto:jimlangston@conexfreight.com]
Sent: Wednesday, October 04, 2000 10:10 AM
To: RPG400-L@midrange.com
Subject: Re: QSPRWTRI not in QC2LE ???


Hmm...  Okay, I changed it to ExtPgm and it compiled and ran fine.  

My question, how do I know if an API is a Proc or Pgm by looking at the manual?

It seems to give no indication.

Regards,

Jim Langston

"Sandiego, Angelito" wrote:
> 
> Sorry about that. QSPRWTRI is a program (please refer to my other post) and 
>should be prototyped as:
> 
> D RtvWtrInf       PR                  ExtPgm('QSPRWTRI')
> 
> Regards,
> Lito Sandiego
> 
> -----Original Message-----
> From: Jim Langston [mailto:jimlangston@conexfreight.com]
> Sent: Tuesday, October 03, 2000 2:27 PM
> To: RPG400-L@midrange.com
> Subject: Re: QSPRWTRI not in QC2LE ???
> 
> Well, I changed it to
> D RtvWtrInf       PR                  ExtProc('QSPRWTRI')
> 
> with the exact same results.
> 
> Regards,
> 
> Jim Langston
> 
> "Sandiego, Angelito" wrote:
> >
> > Shouldn't that be ExtProc('QSPRWTRI')?
> >
> > -----Original Message-----
> > From: Jim Langston [mailto:jimlangston@conexfreight.com]
> > Sent: Tuesday, October 03, 2000 12:47 PM
> > To: rpg400-l@midrange.com
> > Subject: QSPRWTRI not in QC2LE ???
> >
> > V3R7M0
> >
> > I'm trying to write an interface to the QSPRWTRI API (Retrieve Write 
>Information).
> >
> > This is my prototype:
> >
> > D RtvWtrInf       PR                  ExtProc(QSPRWTRI)
> > D  RWI_RcvVar                  289A
> > D  RWI_RcvLength                 9B 0
> > D  RWI_FmtName                   8A
> > D  RWI_PrtName                  10A
> > D  RWI_ErrCode                  16A
> >
> > I compile this with a DFTACTGRP(*NO) and BNDDIR(QC2LE)
> >
> > It compiles without errors, but I get a message at the end of the listing:
> > Errors were found during the binding step. See the job log for more 
>information.
> >
> > Checking the joblog:
> > >From module . . . . . . . . :   QBNBSYMR
> > >From procedure  . . . . . . :   QBNBSYMR__UnresolvedReferenceIterator
> > Statement . . . . . . . . . :   31
> > To module . . . . . . . . . :   QBNBSYMR
> > To procedure  . . . . . . . :   QBNBSYMR__SignalUnresolvedReferences
> > Statement . . . . . . . . . :   8
> > Message . . . . :   Definition not found for symbol 'QSPRWTRI'.
> > Cause . . . . . :   No definition was found for reference QSPRWTRI in 
>*MODULE
> > object SDGWRKSPL in library QTEMP. The definition either does not exist or
> > is not of the same data or procedure type as the reference. Recovery  . . .
> > :   Try the Create Program (CRTPGM) command again, supplying an object that
> > contains a definition for symbol QSPRWTRI.
> >
> > Any clues?
> >
> > Regards,
> >
> > Jim Langston
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: david@midrange.com
> +---
> 
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: david@midrange.com
> +---
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

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.