HP3000-L Archives

January 2002, Week 4

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:
"Harrington, Don" <[log in to unmask]>
Reply To:
Harrington, Don
Date:
Fri, 25 Jan 2002 07:55:01 -0800
Content-Type:
text/plain
Parts/Attachments:
text/plain (71 lines)
Gang;

Boy, this conversion stuff is really kicking my butt.  I have the following
file equations in a job stream:

!FILE FTN01=HDR,OLD
!FILE FTN02=EDATA1,OLD
!FILE FTN03=FAC201D;DEV=LPS61 ,8,1;CCTL
!FILE FTN07=FAC201K;DEV=LPS61,8,1;CCTL
!FILE FTN08=SUSP201F,OLD
!FILE FTN10=FAC201S;DEV=LPS61 ,8,1;CCTL
!FILE FTN13=TEMP13,NEW;TEMP;REC=-30,,F,ASCII;DISC=500
!FILE FTN14=TEMP14,NEW;TEMP;REC=-30,,F,ASCII;DISC=500
!FILE FTN15=FAC201F;DEV=LPS61 ,8,1;CCTL
!FILE FTN16=FAC201E;DEV=LPS61 ,8,1;CCTL
!FILE FTN17=FAC201R;DEV=LPS61 ,8,1;CCTL
!FILE FTN18=FAC201P;DEV=LPS61 ,8,1;CCTL

The OPENs look like this:

      OPEN (1,FILE="HDR",STATUS="OLD")
      OPEN (2,FILE="EDATA1",STATUS="OLD")
      OPEN (3)                          ! FAC201D
      OPEN (7)                          ! FAC201K
      OPEN (8,FILE="SUSP201F",STATUS="OLD")
      OPEN (10)                         ! FAC201S
      OPEN (11,FILE="DELENG1",STATUS="OLD")
      OPEN (12)                         ! FAC201A
      OPEN (13)                         ! TEMP SORT FILE
      OPEN (14)                         ! SORT OUTPUT FILE OF TEMP FILE
      OPEN (15)                         ! FAC201F
      OPEN (16)                         ! FAC201E
      OPEN (17)                         ! FAC201R
      OPEN (18)                         ! FAC201P

The CLOSEs look like this:

      CLOSE (1)
      CLOSE (2)
      CLOSE (3)                          ! FAC201D
      CLOSE (7)                          ! FAC201K
      CLOSE (8)
      CLOSE (10)                         ! FAC201S
      CLOSE (11)
      CLOSE (12)                         ! FAC201A
      CLOSE (13)                         ! TEMP SORT FILE
      CLOSE (14)                         ! SORT OUTPUT FILE OF TEMP FILE
      CLOSE (15)                         ! FAC201F
      CLOSE (16)                         ! FAC201E
      CLOSE (17)                         ! FAC201R
      CLOSE (18)                         ! FAC201P

My question is: Why don't the output files get generated?

Thanks,
Don Harrington
Sr. Systems Analyst
Facilities Applications Support
Shared Services Group
The Boeing Company
P.O. Box 3707 M/C 6C-AK
Seattle, WA  98124-2207
(v) 425-234-1145 (f) 425-234-0464 (p) 206-797-6360

The opinions expressed in this e-mail reflect those of the sender.  They do
not necessarily reflect the opinions of The Boeing Company unless
specifically stated otherwise.

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

ATOM RSS1 RSS2