HP3000-L Archives

November 1999, Week 5

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:
James Clark <[log in to unmask]>
Reply To:
James Clark <[log in to unmask]>
Date:
Mon, 29 Nov 1999 11:05:14 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (145 lines)
The ! is a reserved character for Job streams. If you are in the stream
facility then you must escape the ! character. This you can see in your
examples with the : in place of the !. The next problem is that if you do it
locally, that is use the variable, but the definition is within the Job then
you will get variable not found. The other is, you define it locally and
then try to use it within the Job, neither will work. You must define and
use the variable where you want it dereferenced. Keep you fingers crossed
and toes curled, hoping that the HP understands what you wrote in the manner
you wrote it, and all should be OK.

James

-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]]On
Behalf Of Rick Clark
Sent: Monday, November 29, 1999 10:18 AM
To: [log in to unmask]
Subject:


Good Monday morning to all.......

I am trying to create a job that echo's the commands to a file then stream
that job. When I create a variable for current day then try to echo that to
the file, it will either give me an error saying that the variable is not
found or it echos the variable name. I thought I had this working last week,
but I am stumped. The variable I created is curr_day. Basically here is what
I am trying to accomplish.

JCL WWA:SETVAR CURR_DAY "!HPMONTH"+"/"+"!HPDATE"+"/"+"!HPYEAR"
JCL WWA:SHOWVAR CURR_DAY
CURR_DAY = 11/29/99
JCL WWA:ECHO !CURR_DAY
11/29/99


Can someone please point out to me my mistake? Many thanks in advance....

Rick Clark
Senior Systems Analyst
WW&R
Cleveland, Ohio



----------------------------------------------------------------------------
----------------------------------------------------------------------------
-------
EXAMPLE 1
----------------------------------------------------------------------------
----------------------------------------------------------------------------
-------

!ECHO !!SETVAR FILE_NAME "!HPDATE" + "!HPHOUR"                  >>JOBTMP
 !ECHO !!SETVAR CURR_DAY "!HPMONTH"+"/"+"!HPDATE"+ "/"+"!HPYEAR" >>JOBTMP
create variable
 !ECHO !!SHOWVAR CURR_DAY                                        >>JOBTMP
show variable
 !ECHO !!PURGE ACH!!FILE_NAME                                    >>JOBTMP
 !ECHO !!PURGE NOT!!FILE_NAME                                    >>JOBTMP
 !ECHO !!PURGE   ACTHSDLY                                        >>JOBTMP
 !ECHO !!BUILD   ACTHSDLY;REC=-88,,F,ASCII;DISC=200000           >>JOBTMP
 !ECHO !!FILE    FACSF008=ACTHSDLY                               >>JOBTMP
 !ECHO !!COMMENT DATE SHOULD BE MM/DD/YY EX: 12/31/99            >>JOBTMP
 !ECHO !!RUN     FACSP008.OBJECT.WWA;LIB=P;PARM=0                >>JOBTMP
 !ECHO !!CURR_DAY                                                >>JOBTMP
echo !!variable
 !ECHO !!COMMENT DATE SHOULD BE MM/DD/YY EX: 12/31/99            >>JOBTMP
----------
file JOBTMP
---------
 :SETVAR FILE_NAME "29" + "8"
 :SETVAR CURR_DAY "11"+"/"+"29"+ "/"+"99"
variable is set
 :SHOWVAR CURR_DAY
 CURR_DAY = 11/29/99
variable is correct
 :PURGE ACH!FILE_NAME
 PURGE ACH298
       ^
 File "ACH298.FACSOUT.WWA" not found.  No purge done. (CIWARN 383)
 :PURGE NOT!FILE_NAME
 PURGE NOT298
       ^
 File "NOT298.FACSOUT.WWA" not found.  No purge done. (CIWARN 383)
 :PURGE   ACTHSDLY
 :BUILD   ACTHSDLY;REC=-88,,F,ASCII;DISC=200000
 :FILE    FACSF008=ACTHSDLY
 :COMMENT DATE SHOULD BE MM/DD    EX: 12/31/99
 :RUN     FACSP008.OBJECT.WWA;LIB=P;PARM=0

 SELECTED-DATE: :CURR_DA
s/b 11/29/99


----------------------------------------------------------------------------
----------------------------------------------------------------------------
---------------
EXAMPLE 2
----------------------------------------------------------------------------
----------------------------------------------------------------------------
---------------

 :ECHO !!JOB FACSJHST,MGR.WWA,FACSOUT;OUTCLASS=CLP5,1;HIPRI      > JOBTMP
 :ECHO !!SETVAR FILE_NAME "!HPDATE" + "!HPHOUR"                  >>JOBTMP
 :ECHO !!SETVAR CURR_DAY "!HPMONTH"+"/"+"!HPDATE"+ "/"+"!HPYEAR" >>JOBTMP
create variable
 :ECHO !!SHOWVAR CURR_DAY                                        >>JOBTMP
 :ECHO !!PURGE ACH!!FILE_NAME                                    >>JOBTMP
 :ECHO !!PURGE NOT!!FILE_NAME                                    >>JOBTMP
 :ECHO !!PURGE   ACTHSDLY                                        >>JOBTMP
 :ECHO !!BUILD   ACTHSDLY;REC=-88,,F,ASCII;DISC=200000           >>JOBTMP
 :ECHO !!FILE    FACSF008=ACTHSDLY                               >>JOBTMP
 :ECHO !!COMMENT DATE SHOULD BE MM/DD    EX: 12/31/99            >>JOBTMP
 :ECHO !!RUN     FACSP008.OBJECT.WWA;LIB=P;PARM=0                >>JOBTMP
 :ECHO !CURR_DAY                                                 >>JOBTMP
echo !variable
      ^
 Variable name not found in variable table. (CIWARN 8101)
 :ECHO !!COMMENT DATE SHOULD BE MM/DD    EX: 12/31/99            >>JOBTMP

-------------
file JOBTMP
-------------

 :SETVAR FILE_NAME "29" + "8"
 :SETVAR CURR_DAY "11"+"/"+"29"+ "/"+"99"
 :SHOWVAR CURR_DAY
 CURR_DAY = 11/29/99
 :PURGE ACH!FILE_NAME
 PURGE ACH298
       ^
 File "ACH298.FACSOUT.WWA" not found.  No purge done. (CIWARN 383)
 :PURGE NOT!FILE_NAME
 PURGE NOT298
       ^
 File "NOT298.FACSOUT.WWA" not found.  No purge done. (CIWARN 383)
 :PURGE   ACTHSDLY
 :BUILD   ACTHSDLY;REC=-88,,F,ASCII;DISC=200000
 :FILE    FACSF008=ACTHSDLY
 :COMMENT DATE SHOULD BE MM/DD    EX: 12/31/99
 :RUN     FACSP008.OBJECT.WWA;LIB=P;PARM=0

 SELECTED-DATE: :CURR_DA

ATOM RSS1 RSS2