PDL 'Exit' terminates job on HP3000

[Blair Combs]

This is a known problem with PDL on the HP3000. You can resolve this problem by
placing about 10 blank lines before and after the EXIT command. It may not be
needed before and after but that is how we have set up our job. Please see below.

Good Luck

Blair

Steve Miller wrote:

> This message was sent to the following destinations:
>   1 HPLIST@INTERNET
>    {HP3000-L@raven.UTC.EDU}
>   2 POWERH@INTERNET
>    {POWERH-L@lists.swau.edu}
> ______________________________________________________________________________
> I'm scratching my head on this (which usually means I'm missing something
> simple), and am looking for any suggestions.
>
> We are upgrading from Powerhouse 6.09 to 7.29C8 on an HP3000, and from QDD to
> PDL as the dictionary (all as part of the Y2K project here).
>
> Under 6.09, we had built a short 'compile' job to let us recompile the
> production dictionary at times when users weren't on.  I simply changed that
> job to compile the PDL. The problems I'm experiencing is: when the EXIT
> statement is processed, the job not only quits the PDL program, but ends. The
> whole job! It just ends!! All statements that follow the PDL statement do not
> get executed.
>
> I have isolated the problem to the EXIT command by commenting out everything
> else. I also tried using QUIT instead of EXIT...same result.  Below I've
> reproduced the job, and the $STDLIST produced by the job.
>
> If I comment out (or remove) the EXIT, the MPE commands are executed inside of
> PDL...until the EOJ is reached, which generates a 'COMMAND NOT PROGRAMATICALLY
> whatever' message (after which the job ends for lack of further commands).
>
> This is not a show stopper...I can recompile the PDL interactively, and the
> PDL compiles successfully in the job. I just can't execute anything after it.
>
> The job is:
> !JOB PPIPDL,{HPUSER}.PROD2000,PUB;OUTCLASS={PROGPDEV},1
> !CONTINUE
> !PDL
> ; USE PPIPDL.PDLSRC.TEST2000 NOL
>
> EXIT
> !
> !LISTF @.PRINTMD
> !
> !CONTINUE
> !SAVE PPIPDL.PRINTMD
> !JTF S{hpjobnum},'Job finished.'
> !TELLOP #################### PPIPDL END OF JOB  #################
> !EOJ
>
> NOTE: the blank line before EXIT makes no difference. Tried it with and
> without.
>
> The $STDLIST is:
>  JOB PPIPDL,STEVE.PROD2000,PUB.
>  Priority = DS; HIPRI; Time = UNLIMITED seconds.
>  Job number = #j3884.
>  MON, NOV  9, 1998, 10:21 AM.
>  HP3000  Release: C.55.00   User Version: C.55.00
>  MPE/iX  HP31900 C.05.08  Copyright Hewlett-Packard 1987.
>  All rights reserved.
>  STREAMED BY STEVE.TEST2000 (#S6612) ON LDEV# 13
>     STREAM DATE:   MON, NOV  9, 1998, 10:21 AM
>  JOB OK TO PROCESS
>  :COMMENT   STREAM FILE PPIPDL.PDLJOBC.TEST2000
>  :COMMENT     STREAMED BY STEVE.TEST2000,STEVE ON LDEV 13
>  :COMMENT     RUNNING PROGRAM MAIN.PUB.VESOFT
>  :COMMENT     ON MON, NOV 09, 1998, 10:21 AM
>  :CONTINUE
>  :PDL
>
>  P D L   (7.29.C8)      Level 999
> (24/36) Continue?
>  Copyright 1997 COGNOS INCORPORATED
>
>  > ; USE PPIPDL.PDLSRC.TEST2000 NOL
>  >
>  > EXIT
>
>  END OF PROGRAM
>  CPU sec. = 1.  elapsed min. = 1.  MON, NOV  9, 1998, 10:21 AM.
>
> Thoughts, suggestions and wild guesses from the collective wisdom gladly
> accepted.
>
> Steve Miller
> Portion Pac, Inc.
> steve@portionpac.com
>
> = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
> Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
> Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
> powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
> This list is closed, thus to post to the list, you must be a subscriber.

********** Example Job ***************

    1     !JOB PDL,MGR.acct
    2     !FILE QSCHWORK;DISC=100000
    3     !FILE PHD=SIQDB.PROD
    4     !PDL
    5     USE SIQDBS.SOURCESI NOLIST
    6
    7
    8
    9
   10
   11
   12
   13
   14
   15
   16     EXIT
   17     !
   18     !
   19     !
   20     !
   21     !
   22     !
   23     !
   24     !
   25     !
   26     !EOJ

************ End **************

--
Blair Combs, Manager of Administrative Systems
Idaho State University Computing & Communications
Campus Box 8037, Pocatello, ID 83201-8037
Phone: 208.236.2399 - Fax: 208.236.3673
Email: combblai@isu.edu


= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
powerh-l@lists.swau.edu is gatewayed one-way to bit.listserv.powerh-l
This list is closed, thus to post to the list, you must be a subscriber.