RE: API? SNDWAKUP -- MIDRANGE-L

Well its not an ILE program so I guess its option number 2.  Its entirely
possible that it never hits that line of code.  The program was written long
ago and since I'm not an RPG expert that part of the code hasn't been
scrutinized yet.

Thanks!!

-----Original Message-----
From: Rob Berendt [mailto:rob@dekko.com]
Sent: Thursday, November 12, 1998 12:54 PM
To: MIDRANGE-L@midrange.com
Subject: RE: API? SNDWAKUP


Ok.  So now we know that, since it is using a literal the actual program
name is SNDWAKUP.  We also know that since you've done a WRKOBJ that it is
not on your system.  And as the one person recommended, you do have *ALLOBJ
authority, right?  Otherwise it might not have shown.

IMHO this leaves us with one of two options:
1)  It is an ILE program that calls SNDWAKUP.  For an example, I have an ILE
program which calls the following:
CallB     'QtmmSendMail'
Ya'll know that you can't have an object name of this length right?  The
above is actually a part of 
CRTPGM PGM(mylib/mypgm) BNDSRVPGM(QTCP/QTMMSNDM)
If I do a DSPPGMREF on mylib/mypgm I see:
Number of objects referenced  . . . . . . . :         4    
Object  . . . . . . . . . . . . . . . . . . :     QCMDEXC  
  Library . . . . . . . . . . . . . . . . . :       *LIBL  
  Object type . . . . . . . . . . . . . . . :       *PGM   
Object  . . . . . . . . . . . . . . . . . . :     QTMMSNDM 
  Library . . . . . . . . . . . . . . . . . :       QTCP   
  Object type . . . . . . . . . . . . . . . :       *SRVPGM
Object  . . . . . . . . . . . . . . . . . . :     QRNXIE   
  Library . . . . . . . . . . . . . . . . . :       QSYS   
  Object type . . . . . . . . . . . . . . . :       *SRVPGM
Object  . . . . . . . . . . . . . . . . . . :     QLEAWI   
  Library . . . . . . . . . . . . . . . . . :       QSYS   
  Object type . . . . . . . . . . . . . . . :       *SRVPGM

2)  The calling program never actually calls this program, therefore the
error never occurs.  For example:
C                   GOTO      HECK      
C                   CALL      'SNDWAKUP'
C     HECK          TAG                 
Try a) STRDBG if it is an ILE pgm, b) STRISDB if it is an OPM pgm, to
determine if it ever does try to call that pgm.
If you're cursed then it will only call this program when a rare condition
applies, like if it tries to determine if a year divisible by 100 has a leap
day.







Gary_Lehman@mail.mchcp.org on 11/12/98 10:54:01 AM
Please respond to MIDRANGE-L@midrange.com@Internet
To:     MIDRANGE-L@midrange.com@Internet
cc:      

Subject:        RE: API? SNDWAKUP

I could not finding it using a WRKOBJ and the program does run.  Its
interactive and runs every day.

-----Original Message-----
From: Rob Berendt [mailto:rob@dekko.com]
Sent: Wednesday, November 11, 1998 9:38 AM
To: MIDRANGE-L@midrange.com
Subject: Re: API? SNDWAKUP


Ok, you've got PGMA which calls SNDWAKUP right?  And you've got the source
to PGMA 
also?  Or did you do a DSPPGMREF on PGMA to see what programs are called?

Is SNDWAKUP a literal or a variable?  In other words, when PGMA calls
SNDWAKUP does 
SNDWAKUP have quotes around it?  If not search the source on PGMA until you
find 
SNDWAKUP declared and what value is stored in it.  If you do not have the
source on 
PGMA and you see SNDWAKUP only in the DSPPGMREF then that tells us that it
is a 
literal and not a variable.

The existence, or lack thereof, of a called program will not affect the
compile.  
You can compile the chicken prior to the hatching of it's egg.  The lack of
existence 
will affect the execution of the program.  Try doing a WRKOBJ
*ALL/SNDWAKUP        
In the past you might have been assuming that SNDWAKUP was in a particular
library 
when it is not.  Perhaps the library list during the execution of PGMA is
different 
from your development library list.  The *ALL/SNDWAKUP should find it.  If
not, then 
PGMA will not run.  Unless, all of the following are true:  1)  PGMA is an
ILE program,  
2)  After doing a CRT...MOD on PGMA you have to do a CRTPGM and join it with
a service 
program that contains SNDWAKUP.




Gary_Lehman@mail.mchcp.org on 11/10/98 08:06:31 PM
Please respond to MIDRANGE-L@midrange.com@Internet
To:     MIDRANGE-L@midrange.com@Internet
cc:      

Subject:        API?  SNDWAKUP

Hello,

I came across something(actually another programmer did) in one of our old
RPG programs.  Its a call to a program called SNDWAKUP.  It looks like
nothing we wrote as we have no source and we can't seem to find an object,
yet the program compiles and runs fine.  So I was wondering if it was an
API, cause the routine its called in has to do with processing that the
document describes as IBM IN USE routine.  Looks as if it means when a
record is in use perform some function.  

Does this ring a bell with anyone?

Thanks,

Gary Lehman
Programmer Analyst II
Missouri Consolidated Health Care Plan

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


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


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