Maybe this would be better on a Powerhouse list but I'm not on one of
those....
So heres the question...
I have a native mode KSAM (KSAMXL) file. It's a Powerhouse subfile with a
single key which I created with QUIZ or QTP ( I don't remember which)...

It's a calendar control file which I'm going to use to control my JCL a
login script defines variables which the JCL will use to determine what it
should do (WeekDay, Weekend, Monthend, Qtrend Etc...)

However I digress... I was intending to use QDESIGN to modify the file if
need be but I have included the ksam file data, The screen output, The
program and the file layout from quiz....

It's a simple program but it's been about 5 years since I've even looked at
QUICK/QDESIGN...Give me a QTP or QUIZ program and I have no problems.... But
I don't even know where to start with this....

Can anybody tell me what I'm doing wrong....


DATE-CYMD MONDAY TUESDAY WEDNESDAY THURSDAY FRIDAY SATURDAY SUNDAY WEEKEND
MONTHEND QTREND YEAREND

 Date        M       T        W        T       F       S       S       W
M       Q       Y
 19991020                     X
 19991021                              X
 19991022                                      X
 19991023                                              X               X
 19991024                                                      X
 19991025    X
 19991026            X
 19991027                     X
 19991028                              X
 19991029                                      X
 19991030                                              X               X
X
 19991031                                                      X
 19991101    X
 19991102            X
 19991103                     X
 19991104                              X
 19991105                                      X
 19991106                                              X               X



MODE:F ACTION:
01 DATE-CYMD
02 MONDAY
03 TUESDAY
04 WEDNESDAY
05 THURSDAY
06 FRIDAY
07 SATURDAY
08 SUNDAY
09 WEEKEND
10 MONTHEND
11 QTREND
12 YEAREND








Data access error. (CALENDAR*01)
THE FILE MUST BE LOCKED BEFORE ISSUING THIS INTRINSIC  (FSERR 179)

Press RETURN to continue.



screen cal1
file *Calendar.ci primary
FIELD DATE-CYMD OF CALENDAR REQUIRED NOCHANGE
FIELD MONDAY OF CALENDAR
FIELD TUESDAY OF CALENDAR
FIELD WEDNESDAY OF CALENDAR
FIELD THURSDAY OF CALENDAR
FIELD FRIDAY OF CALENDAR
FIELD SATURDAY OF CALENDAR
FIELD SUNDAY OF CALENDAR
FIELD WEEKEND OF CALENDAR
FIELD MONTHEND OF CALENDAR
FIELD QTREND OF CALENDAR
FIELD YEAREND OF CALENDAR
build

> access *calendar
> show items

                                             INPUT OUTPUT
CALENDAR                                TYPE SCALE SCALE  DEC PICTURE
* DATE-CYMD                             CHAR                  X(8)
  MONDAY                                CHAR                  X(1)
  TUESDAY                               CHAR                  X(1)
  WEDNESDAY                             CHAR                  X(1)
  THURSDAY                              CHAR                  X(1)
  FRIDAY                                CHAR                  X(1)
  SATURDAY                              CHAR                  X(1)
  SUNDAY                                CHAR                  X(1)
  WEEKEND                               CHAR                  X(1)
  MONTHEND                              CHAR                  X(1)
  QTREND                                CHAR                  X(1)
  YEAREND                               CHAR                  X(1)



Thanks

BW "Bear" Stephens, Department S491, IS Customer Service (NBOSS Support),
Nortel Networks Brampton
ESN 456-1157- External (705) 431-9601 Email [log in to unmask]
Pager (705) 720-8613  <> page by e-mail [log in to unmask]  by web
www.paging.mobility.com   pager number is bws
Outside of a dog, a book is a man's best friend. Inside a dog it's too dark
to read.  G. Marx