I Use:

SUBROUTINE RETURN.SETPTR(JOBNAME,PON)
*
* RETURN-SETPTR - THIS SUBROUTINE WILL RETURN IN "JOBNAME" THE CURRENT
*                 SPOOL WILL GO TO.
*********************************************************************
*
*
   EXECUTE "SETPTR ":PON CAPTURING JUNK
   [EMAIL PROTECTED]:"Output to HOLD file"
   XX=INDEX(JUNK,SEARCH,1)
   IF XX=0 THEN
      JOBNAME=""
      RETURN
   END
   JUNK=JUNK[XX+1,LEN(JUNK)]
   YY=INDEX(JUNK,":",1)
   YZ=INDEX(JUNK,CHAR(254),1)
   JOBNAME=JUNK[YY+2,YZ-YY-2]
   RETURN
*
END

This will return the hold filename, you can then do a
FIELD(JOBNAME,"_",DCOUNT(JOBNAME,"_"))
to get the spool  number.

George

>-----Original Message-----
>From: [EMAIL PROTECTED]
>[mailto:[EMAIL PROTECTED] Behalf Of David A Barrett
>Sent: Monday, February 14, 2005 9:14 AM
>To: [email protected]
>Subject: [U2] Print Spool Number
>
>
>Does anyone know if there is any way in Universe to determine
>what the job
>number of the currently open printer will be while the process is still
>running?
>
>
>Dave Barrett,
>Lawyers' Professional Indemnity Company
>-------
>u2-users mailing list
>[email protected]
>To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to