Gang;
I've been away from PowerHouse too long, apparently.
In File 1, the error "This action isn't valid for this screen." returns
after a successful Find. File 3 is a subscreen to File 2. I would like it
to appear as soon as File 2 is displayed.
Sorry for the length.
<File 1>
;FILE DISTRIB2 - USER MAINTENANCE
; $History: distrib2.qk $
SCREEN DISTRIB2.EXE &
ACTION &
AUTOMODIFY &
ACTIVITIES ENTRY, FIND, CHANGE, DELETE
FILE ANALYST-USER &
PRIMARY &
CLOSE
FILE PRINTERS &
SECONDARY &
CLOSE
SKIP TO LINE 4
TITLE "User Maintenance" CENTERED
SKIP TO LINE 8
FIELD BEMS-ID &
REQUIRED &
NOCHANGE &
LOOKUP NOTON ANALYST-USER &
ID 1 AT 8,25 &
LABEL AT 8,29 &
DATA AT 8,43 &
HELP "Enter leading zeros for a total of eight digits."
SKIP TO LINE 10
FIELD MAIL-STOP &
REQUIRED &
ID NEXT AT 10,25 &
LABEL AT 10,29 &
DATA AT 10,43
SKIP TO 12
FIELD LDEV &
REQUIRED &
LOOKUP ON PRINTERS &
ID NEXT AT 12,25 &
LABEL AT 12,29 &
DATA AT 12,43
BUILD
</File 1>
<File 2>
;FILE DISTRIB5 - DISTRIBUTION MASTER MAINTENANCE
; $History: distrib5.qk $
SCREEN DISTRIB5.EXE &
ACTION &
AUTOMODIFY &
ACTIVITIES ENTRY, FIND, CHANGE, DELETE
FILE REPORT-MASTER &
PRIMARY &
CLOSE
SKIP TO LINE 4
TITLE "Distribution Maintenance" CENTERED
SKIP TO LINE 6
FIELD ACCOUNT &
NOID &
LABEL AT 6,3 &
REQUIRED &
DATA AT 7,3
FIELD FILE-NAME &
NOID &
LABEL AT 6,13 &
REQUIRED &
DATA AT 7,13
FIELD ANALYST &
NOID &
LABEL AT 6,43 &
REQUIRED &
DATA AT 7,43
FIELD ACTIVE &
NOID &
LABEL AT 6,63 &
REQUIRED &
DATA AT 7,65
SKIP TO 9
FIELD COMMENTS &
NOID &
LABEL AT 9,3 &
DATA AT 10,3
SUBSCREEN DISTRIB6.EXE &
AUTO &
NOLABEL &
PASSING REPORT-MASTER &
MODE SAME
BUILD
</File 2>
<File 3>
;FILE DISTRIB6 - DISTRIBUTION DETAIL MAINTENANCE
; $History: distrib6.qk $
SCREEN DISTRIB6.EXE &
ON LINE 11 &
FOR 13 LINES &
ACTION &
RECEIVING REPORT-MASTER &
AUTOMODIFY
FILE REPORT-MASTER &
MASTER &
CLOSE
FILE REPORT-DETAIL &
PRIMARY &
OCCURS 8 TIMES &
CLOSE
FILE PRINTERS &
SECONDARY &
CLOSE
SKIP TO LINE 4
TITLE "Distribution Detail Maintenance" CENTERED
SKIP TO LINE 6
ALIGN (,,3)(,,17)(,,23)(,,41)(,,51)
TITLE "BEMS ID" AT 6,3
TITLE "COPIES" AT 6,15
TITLE "GENERIC" AT 6,23
TITLE "LDEV" AT 6,41
TITLE "PRI" AT 6,51
SKIP TO 7
FIELD BEMS-ID &
REQUIRED &
NOCHANGE
FIELD COPIES
FIELD GENERIC
FIELD LDEV &
LOOKUP ON PRINTERS
FIELD PRIORITY
BUILD
</File 3>
TIA,
Don Harrington
Sr. Systems Analyst
Total Enterprise Asset Management System
Facilities Computing Services
The Boeing Company
P.O. Box 3707 M/C 2R-71
Seattle, WA 98124-2207
(v) 206-544-7485 (f) 206-544-5889 (p) 206-797-6360
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
