Re: Get the last job number for a job run everyday. (YOUR SOLUTION)

["Alan H Addison" <ahaddison@xxxxxxxx>]

Using the file information data structure on the printer file you could even load the printer file information that fills in the sndnetsplf command.   Or you could create a data queue, add an entry when the job completes and you could send all occurances of the report having been printed, not just the last one.  If you send the printer file information you could then delete the spool file (if it not needed).

----- Original Message -----

From: BillsVilla@aol.com

To: RPG400-L@midrange.com

Sent: Thursday, December 21, 2000 4:17 PM

Subject: Re: Get the last job number for a job run everyday. (YOUR SOLUTION)

In a message dated 12/21/2000 2:41:57 PM Eastern Standard Time,
bbuettel@udilink.com writes:

I need to get the user NAME and JOB NUMBER after the job completes for
SNDNETSPLF for a CLP
 that runs the next Day.

Easy enough.

Use a program status data structure in the program to get the user name and
job number and update a data area to hold the data.

Here is a sample of the Program Status Data Structure you will need.
D PSDS                SDS
     USRNAME                     254   263
     JOB#                             264   269  

I don't know your needs but I would simply create a 16 character data area
and use it to store the 10 char name and 6 char job# and update it in the RPG
program.

Sample data area setup you will need.
D DTAARA           UDS
     USRNAME                              10
     JOB#                                       16

I don't know about all this other stuff people tell ya on here but I would do
it just like that.

It doesn't get any easier.

The program will pull the information from the PSDS (automatically) and when
the program ends it will (automatically) update the DTAARA for you.

You could spend a couple days trying to figure out a tricked out way to do it
but the person comming behind you will have to do the same.  

I use the KISS method.

Keep
It
Simple
Stupid

Enjoy,

Bill