HP3000-L Archives

April 1997, 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:
Costas Anastassiades <[log in to unmask]>
Reply To:
Costas Anastassiades <[log in to unmask]>
Date:
Wed, 9 Apr 1997 17:58:47 +-300
Content-Type:
text/plain
Parts/Attachments:
text/plain (45 lines)
Michael, assuming you are willing to change your "application manager", you
could build a two time loop around it.
The first time thru, all commands written to the stream file will be
prefixed with "ECHO" and affixed with ">> dummy".
The second time thru all commands will be written as is.

In effect every job will create an exact copy of itself in the file dummy
(which by default will be temporary to that particular job). If need be,
this file can then be restreamed.

I'm not sure how well I've explained that, so here's what the stream file
could look like :

:JOB your jobcard details
:
:ECHO   :JOB your jobcard details       >> dummyfile
:ECHO   :DSCOPY dscopy1 details         >> dummyfile
:ECHO   :IF CIERROR<>0 THEN             >> dummyfile
:ECHO   :       STREAM dummyfile        >> dummyfile
:ECHO   :ENDIF                          >> dummyfile
:ECHO   :DSCOPY dscopy2 details         >> dummyfile
:ECHO   :IF CIERROR<>0 THEN             >> dummyfile
:ECHO   :       STREAM dummyfile        >> dummyfile
:ECHO   :ENDIF                          >> dummyfile
:ECHO   :EOJ                            >> dummyfile
:
:DSCOPY dscopy1 details
:IF CIERROR<>0 THEN
:       STREAM dummyfile
:ENDIF
:DSCOPY dscopy2 details
:IF CIERROR<>0 THEN
:       STREAM dummyfile
:ENDIF
:EOJ

I did a small test of the basic idea (echoing commands and restreaming) and
yes it works !


Costas Anastassiades,
INTRACOM SA
Information Systems and Internal Communications Dept.
Athens, Greece

ATOM RSS1 RSS2