HP3000-L Archives

January 2004, Week 2

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
"Shahan, Ray" <[log in to unmask]>
Reply To:
Shahan, Ray
Date:
Tue, 13 Jan 2004 15:15:01 -0600
Content-Type:
text/plain
Parts/Attachments:
text/plain (57 lines)
Hi all,

        I needed to do a quick and dirty, but I can't seem to get it to work
as I thought it would.  Everything works except at the end of the suprtool
input, i get the following errror (the script won't do the MPEX loop):

Error:  EOF on stdin file

 Program terminated in an error state. (CIERR 976)


I'm sure it's a lame error, but I can't fix it, and I'm in a jam to get this
done ASAP.


TIA!!

:-)


!MPEX
REPEAT
 setvar SCFILENAME str("!MPEXCURRENTFILE",1,8)
 ECHO   SET VARSUB ON                                        > SUPRIN
 ECHO   IN !SCFILENAME.SHAHAN.DEVRNS                        >> SUPRIN
 ECHO    PURGE KEYTOADD                                     >> SUPRIN
 ECHO    DEF SHIPMENTNO,165,24                              >> SUPRIN
 ECHO    DEF KEY-TO-ADD,1,32                                >> SUPRIN
 ECHO    IF SHIPMENTNO <> " "                               >> SUPRIN
 ECHO     EXT KEY-TO-ADD = (SHIPMENTNO + "!SCFILENAME")     >> SUPRIN
 ECHO     SO SHIPMENTNO                                     >> SUPRIN
 ECHO      DUP NONE KEYS                                    >> SUPRIN
 ECHO     O KEYTOADD                                        >> SUPRIN
 ECHO   XEQ                                                 >> SUPRIN
 ECHO                                                       >> SUPRIN
 ECHO   BA YTCTRL.DATAVSS.SFD,1,MGR                         >> SUPRIN
 ECHO   IN KEYTOADD                                         >> SUPRIN
 ECHO    PUT M-SHIPMENTNO                                   >> SUPRIN
 ECHO   XEQ                                                 >> SUPRIN
 ECHO   EXIT                                                >> SUPRIN

 SUPR < SUPRIN

FORFILES SC######.SHAHAN.DEVRNS (CREDATE > 12/31/03)AND (NOT OPENED)
EXIT

Ray Shahan

"There is so much good in the worst of us,
and so much bad in the best of us,
that it behooves none of us
to talk about the rest of us"
                  --Robert Louis Stevenson?

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2