Re: Jobname from a an SPL procedure?

Hi

Consider such CL

PGM (&JOB &USR)
DCL &USR *CHAR 10
DCL &JOB *CHAR 10
RTVJOBA JOB(&JOB) USER(&USR)
ENDPGM

Compile it like CLLE with ACTGRP(*CALLER), for example, with name GETJOB in library MYLIB.

And register it as procedure in SQL

CREATE PROCEDURE GETJOB (@JOB OUT CHAR(10), @USR OUT CHAR(10))
EXTERNAL NAME MYLIB/GETJOB PARANETER STYLE GENERAL

Then you can call this procedure in SQL
CALL GETJOB(@JOB, @USR);
where @JOB and @USR are SQL character(10) variables.

On Thu, 5 Apr 2012 09:04:48 +0100
"Dunk, Michael - Bognor" <mdunk@xxxxxxxxx> wrote:

As an infrequent user of SPL, writing a data fix, I figured out how to set date and time stamps in CYYMMDD and HHMMSS format but also need a simple way to get the job name and user profile from within the SQL procedure to complete the data to include a standard record update stamp.

E.g. is there an elegant way of accessing Retrieve Job Attributes (RTVJOBA) from within SPL?

Best regards,

Mike


------------------------------------------------------------------------------------------------------------
John Wiley & Sons Limited is a private limited company registered in England with registered number 641132.
Registered office address: The Atrium, Southern Gate, Chichester, West Sussex, United Kingdom. PO19 8SQ.
------------------------------------------------------------------------------------------------------------
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.