Re: Jobname from a an SPL procedure?

["Mike Bardin" <mike@xxxxxxxxx>]

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.