|
DataMuseum.dkPresents historical artifacts from the history of: IBM System/36 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about IBM System/36 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 5888 (0x1700)
Notes: FORM36, MEMBER_O
Names: »#SA@EF «
└─⟦a3c23c3a0⟧ Bits:30009813 REF.NO PWD35 PGM 5727-UT6 FEAT9074 UTILITIES US Z250-0042-2 REV/LEV 05.01 SEQ. 2/2 DISKET 2S 96TPI INTERNAL 88.03.04 31
└─⟦16be10a51⟧
└─⟦this⟧ ».#SA@EF «
FormPointer36 {name=»SLCTMEOM«, f1=0x00, start=0x0002, length=0x03, f5=0x00, f6=0x00, f7=0x09, f8=0x00, f9=0000000000000000}
┌────────────────────────────────────────────────────────────────────────────────┐
00│ END OF MENU OPTIONS ╳␣␣╳│
01│ │
02│ Select one of the following: │
03│ │
04│ 0. Return to prior menu selection display │
05│ 1. Save the work done │
06│ 2. Disregard work done on all text for this menu │
07│ │
08│ Option . . . . . . .␣┴┤ │
09│ │
10│ │
11│ │
12│ If option 1 is entered, │
13│ │
14│ │
15│ Name the output source and load library. . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
16│ │
17│ Output source and load member names will be . . . .╳␣␣␣␣␣␣␣␣╳ │
18│ ╳␣␣␣␣␣␣␣␣╳ │
19│ │
20│ │
21│ │
22│ │
23│ │
24│ │
25│ │
26│ │
27│ │
└────────────────────────────────────────────────────────────────────────────────┘
FormPointer36 {name=»SLCTFEOM«, f1=0x00, start=0x0005, length=0x05, f5=0x00, f6=0x00, f7=0x23, f8=0x00, f9=0000000000000000}
┌────────────────────────────────────────────────────────────────────────────────┐
00│ END OF MEMBER OPTIONS ╳␣␣╳│
01│ │
02│ Select one of the following: │
03│ │
04│ 0. Return to prior member selection display │
05│ 1. Save the work done │
06│ 2. Disregard work done on all formats in the member │
07│ │
08│ Option . . . . . . .␣┴┤ │
09│ │
10│ │
11│ If option 1 is entered, │
12│ │
13│ Name the output source library . . . . . . . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
14│ Name the output source member. . . . . . . . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
15│ │
16│ Indicate if SDA should: │
17│ Renumber source specifications . . . . . . . . . . . . . Y,N␣┴┤ │
18│ ╳Compile the source member (evoke $SFGR). . . . . . . . . Y,N␣┴┤ │
19│ ╳ Output load library name. . . . .␣␣␣␣␣␣␣␣┴┤ │
20│ ╳Output load member name . . . . .␣␣␣␣␣␣␣␣┴┤ │
21│ │
22│ │
23│ │
24│ │
25│ │
26│ │
27│ │
└────────────────────────────────────────────────────────────────────────────────┘
FormPointer36 {name=»SLCTREOM«, f1=0x00, start=0x000a, length=0x04, f5=0x00, f6=0x00, f7=0x12, f8=0x00, f9=0000000000000000}
┌────────────────────────────────────────────────────────────────────────────────┐
00│ END OF RPG PROGRAM GENERATION OPTIONS ╳␣␣╳│
01│ │
02│ Select one of the following: │
03│ │
04│ ╳0. Return to prior RPG generation display ╳│
05│ ╳1. Save the generated RPG source specifications ╳│
06│ 2. Discard the generated specifications │
07│ │
08│ Option . . . . . . .␣┴┤ │
09│ │
10│ │
11│╳If option 1 is entered, ╳ │
12│ │
13│ ╳Name the output source library . . . . . . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
14│ ╳Name the output source member. . . . . . . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
15│ │
16│ ╳Indicate if SDA should:╳ │
17│ ╳Print generated source specifications. . . . . . . . . Y,N␣┴┤ │
18│ │
19│ │
20│ │
21│ │
22│ │
23│ │
24│ │
25│ │
26│ │
27│ │
└────────────────────────────────────────────────────────────────────────────────┘
FormPointer36 {name=»SLCTWEOM«, f1=0x00, start=0x000e, length=0x05, f5=0x00, f6=0x00, f7=0x13, f8=0x00, f9=0000000000000000}
┌────────────────────────────────────────────────────────────────────────────────┐
00│ END OF WSU PROGRAM GENERATION OPTIONS ╳␣␣╳│
01│ │
02│ Select one of the following: │
03│ │
04│ ╳0. Restart WSU program generation ╳│
05│ ╳1. Save the generated WSU source program ╳│
06│ 2. Discard the generated program │
07│ │
08│ Option . . . . . . .␣┴┤ │
09│ │
10│ │
11│╳If option 1 is entered, ╳ │
12│ │
13│ ╳Name the output source library . . . . . . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
14│ ╳Name the output source member. . . . . . . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
15│ │
16│ ╳Indicate if SDA should: ╳ │
17│ ╳ Print program source specifications. . . . . . . . . . Y,N␣┴┤ │
18│ ╳ Compile the source program (evoke WSU) . . . . . 0,1,2,Y,N␣┴┤ │
19│ │
20│ │
21│ │
22│ │
23│ │
24│ │
25│ │
26│ │
27│ │
└────────────────────────────────────────────────────────────────────────────────┘
FormPointer36 {name=»SLCTPEOM«, f1=0x00, start=0x0013, length=0x04, f5=0x00, f6=0x00, f7=0x05, f8=0x80, f9=0000000000000000}
┌────────────────────────────────────────────────────────────────────────────────┐
00│ END OF PRINT OPTIONS ╳␣␣╳│
01│ │
02│ Select one of the following: │
03│ │
04│ 0. Return to prior print selection display │
05│ ╳1. Print selected format images and specifications ╳ │
06│ 2. Disregard selections, no printing will be done │
07│ │
08│ Option . . . . . . .␣┴┤ │
09│ │
10│ │
11│ │
12│ │
13│╳If option 1 is entered, ╳ │
14│ │
15│ ╳Indicate if selected formats were designed for WSU . . . . Y,N␣┴┤ │
16│ │
17│ ╳Indicate if SDA should: ╳ │
18│ ╳ Print borders around display images . . . . . . . . . . .Y,N␣┴┤ │
19│ ╳ Indent all printed output . . . . . . . . . . . . . . . 2-35␣␣┴┤ │
20│ │
21│ │
22│ │
23│ │
24│ │
25│ │
26│ │
27│ │
└────────────────────────────────────────────────────────────────────────────────┘
0x0000…0078 Vector {
0x0000…0078 [0x0]: FormPointer36 {name=»SLCTMEOM«, f1=0x00, start=0x0002, length=0x03, f5=0x00, f6=0x00, f7=0x09, f8=0x00, f9=0000000000000000}
0x0000…0078 [0x1]: FormPointer36 {name=»SLCTFEOM«, f1=0x00, start=0x0005, length=0x05, f5=0x00, f6=0x00, f7=0x23, f8=0x00, f9=0000000000000000}
0x0000…0078 [0x2]: FormPointer36 {name=»SLCTREOM«, f1=0x00, start=0x000a, length=0x04, f5=0x00, f6=0x00, f7=0x12, f8=0x00, f9=0000000000000000}
0x0000…0078 [0x3]: FormPointer36 {name=»SLCTWEOM«, f1=0x00, start=0x000e, length=0x05, f5=0x00, f6=0x00, f7=0x13, f8=0x00, f9=0000000000000000}
0x0000…0078 [0x4]: FormPointer36 {name=»SLCTPEOM«, f1=0x00, start=0x0013, length=0x04, f5=0x00, f6=0x00, f7=0x05, f8=0x80, f9=0000000000000000}
0x0000…0078 }
0x0078…0080 ff ff ff ff ff ff ff ff ┆ ┆
0x0080…00a0 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
[…0xb…]
0x0200…07b1 Form36 {
0x0200…07b1 fh000 = 0x01 // 0x200 @0x0
0x0200…07b1 fh00 = 2605 // 0x201 @0x1
0x0200…07b1 fh01 = »NNN« // 0x203 @0x3
0x0200…07b1 fh02 = 000000 // 0x206 @0x6
0x0200…07b1 fh03 = »N N« // 0x209 @0x9
0x0200…07b1 fh04 = 0x00c8 // 0x20c @0xc
0x0200…07b1 fh05 = 0x0221 // 0x20e @0xe
0x0200…07b1 fh06 = 003e80011800000000000000000000000000 // 0x210 @0x10
0x0200…07b1 at0022 = 0x00000003 // 0x222 @0x22
0x0200…07b1 at0026 = Form36LV {f00=0x24, f01=0x1f, f12=0x0d011350, f13=»HPMENU02«, f14=»#SA@EH «, f15=»#SDALIB «, f1z=0x1e} // 0x226 @0x26
0x0200…07b1 at0045 = Form36LV {f00=0x24, f01=0x1f, f12=0x01011850, f13=»HPMENU01«, f14=»#SA@EH «, f15=»#SDALIB «, f1z=0x1e} // 0x245 @0x45
0x0200…07b1 at0064 = Form36LV {f00=0x51, f01=0x12, f22=000e00015111, f23=091708, f24=»Y«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0x264 @0x64
0x0200…07b1 at0076 = Form36LV {f00=0x51, f01=0x12, f22=001800085111, f23=104509, f24=»Y«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0x276 @0x76
0x0200…07b1 at0088 = Form36LV {f00=0x51, f01=0x12, f22=020000084101, f23=124500, f24=»N«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0x288 @0x88
0x0200…07b1 at009a = Form36LV {f00=0x51, f01=0x12, f22=020d00084101, f23=134500, f24=»N«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0x29a @0x9a
0x0200…07b1 at00ac = Form36LV {f00=0x51, f01=0x12, f22=021a00024101, f23=014e00, f24=»N«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0x2ac @0xac
0x0200…07b1 at00be = Form36LV {f00=0xfe, f01=0x0a, f88=00000000000000, f89=09} // 0x2be @0xbe
0x0200…07b1 panel = { // 0x2c8 @0xc8
0x0200…07b1 ┌────────────────────────────────────────────────────────────────────────────────┐
0x0200…07b1 00│ END OF MENU OPTIONS ╳␣␣╳│
0x0200…07b1 01│ │
0x0200…07b1 02│ Select one of the following: │
0x0200…07b1 03│ │
0x0200…07b1 04│ 0. Return to prior menu selection display │
0x0200…07b1 05│ 1. Save the work done │
0x0200…07b1 06│ 2. Disregard work done on all text for this menu │
0x0200…07b1 07│ │
0x0200…07b1 08│ Option . . . . . . .␣┴┤ │
0x0200…07b1 09│ │
0x0200…07b1 10│ │
0x0200…07b1 11│ │
0x0200…07b1 12│ If option 1 is entered, │
0x0200…07b1 13│ │
0x0200…07b1 14│ │
0x0200…07b1 15│ Name the output source and load library. . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
0x0200…07b1 16│ │
0x0200…07b1 17│ Output source and load member names will be . . . .╳␣␣␣␣␣␣␣␣╳ │
0x0200…07b1 18│ ╳␣␣␣␣␣␣␣␣╳ │
0x0200…07b1 19│ │
0x0200…07b1 20│ │
0x0200…07b1 21│ │
0x0200…07b1 22│ │
0x0200…07b1 23│ │
0x0200…07b1 24│ │
0x0200…07b1 25│ │
0x0200…07b1 26│ │
0x0200…07b1 27│ │
0x0200…07b1 └────────────────────────────────────────────────────────────────────────────────┘
0x0200…07b1 Panel5250 {
0x0200…07b1 at0000 = ClearUnit {esc=04, cu=40} // 0x2c8 @0x0
0x0200…07b1 at0002 = WriteToDisplay {esc=04, wtd=11, flags=0x0020} // 0x2ca @0x2
0x0200…07b1 at0006 = StartOfHeader {soh=01, len=0x03, extra=000001} // 0x2ce @0x6
0x0200…07b1 at000b = InsertCursor {ic=13, line=0x09, col=0x17} // 0x2d3 @0xb
0x0200…07b1 at000e = SetBufferAddress {ic=11, line=0x09, col=0x16} // 0x2d6 @0xe
0x0200…07b1 at0011 = StartField {sf=1d, ffw=0x4b25, attr=0x32, len=0x0001} // 0x2d9 @0x11
0x0200…07b1 at0017 = »␣« // 0x2df @0x17
0x0200…07b1 at0018 = SetBufferAddress {ic=11, line=0x10, col=0x44} // 0x2e0 @0x18
0x0200…07b1 at001b = StartField {sf=1d, ffw=0x4820, fcw=0x80ff, attr=0x32, len=0x0008} // 0x2e3 @0x1b
0x0200…07b1 at0023 = »␣␣␣␣␣␣␣␣« // 0x2eb @0x23
0x0200…07b1 at002b = SetBufferAddress {ic=11, line=0x01, col=0x19} // 0x2f3 @0x2b
0x0200…07b1 at002e = » END OF MENU OPTIONS « // 0x2f6 @0x2e
0x0200…07b1 at004b = SetBufferAddress {ic=11, line=0x03, col=0x02} // 0x313 @0x4b
0x0200…07b1 at004e = »Select one of the following: « // 0x316 @0x4e
0x0200…07b1 at0079 = SetBufferAddress {ic=11, line=0x05, col=0x17} // 0x341 @0x79
0x0200…07b1 at007c = »0. Return to prior menu selection display « // 0x344 @0x7c
0x0200…07b1 at00b5 = SetBufferAddress {ic=11, line=0x06, col=0x17} // 0x37d @0xb5
0x0200…07b1 at00b8 = »1. Save the work done « // 0x380 @0xb8
0x0200…07b1 at00f1 = SetBufferAddress {ic=11, line=0x07, col=0x17} // 0x3b9 @0xf1
0x0200…07b1 at00f4 = »2. Disregard work done on all text for this menu « // 0x3bc @0xf4
0x0200…07b1 at012d = SetBufferAddress {ic=11, line=0x09, col=0x02} // 0x3f5 @0x12d
0x0200…07b1 at0130 = »Option . . . . . . .« // 0x3f8 @0x130
0x0200…07b1 at0144 = SetBufferAddress {ic=11, line=0x0d, col=0x02} // 0x40c @0x144
0x0200…07b1 at0147 = »If option 1 is entered, « // 0x40f @0x147
0x0200…07b1 at0182 = SetBufferAddress {ic=11, line=0x10, col=0x08} // 0x44a @0x182
0x0200…07b1 at0185 = »Name the output source and load library. . . . . . . . . . .« // 0x44d @0x185
0x0200…07b1 at01c1 = SetBufferAddress {ic=11, line=0x12, col=0x08} // 0x489 @0x1c1
0x0200…07b1 at01c4 = » Output source and load member names will be . . . .« // 0x48c @0x1c4
0x0200…07b1 at0200 = SetBufferAddress {ic=11, line=0x12, col=0x44} // 0x4c8 @0x200
0x0200…07b1 at0203 = Attribute {type=0x20} // 0x4cb @0x203
0x0200…07b1 at0204 = »␣␣␣␣␣␣␣␣« // 0x4cc @0x204
0x0200…07b1 at020c = Attribute {type=0x20} // 0x4d4 @0x20c
0x0200…07b1 at020d = SetBufferAddress {ic=11, line=0x13, col=0x44} // 0x4d5 @0x20d
0x0200…07b1 at0210 = Attribute {type=0x20} // 0x4d8 @0x210
0x0200…07b1 at0211 = »␣␣␣␣␣␣␣␣« // 0x4d9 @0x211
0x0200…07b1 at0219 = Attribute {type=0x20} // 0x4e1 @0x219
0x0200…07b1 at021a = SetBufferAddress {ic=11, line=0x01, col=0x4d} // 0x4e2 @0x21a
0x0200…07b1 at021d = Attribute {type=0x20} // 0x4e5 @0x21d
0x0200…07b1 at021e = »␣␣« // 0x4e6 @0x21e
0x0200…07b1 at0220 = Attribute {type=0x20} // 0x4e8 @0x220
0x0200…07b1 }
0x0200…07b1 }
0x0200…07b1 }
0x0500…1016 Form36 {
0x0500…1016 fh000 = 0x01 // 0x500 @0x0
0x0500…1016 fh00 = 2605 // 0x501 @0x1
0x0500…1016 fh01 = »NNN« // 0x503 @0x3
0x0500…1016 fh02 = 000000 // 0x506 @0x6
0x0500…1016 fh03 = »N N« // 0x509 @0x9
0x0500…1016 fh04 = 0x0150 // 0x50c @0xc
0x0500…1016 fh05 = 0x0376 // 0x50e @0xe
0x0500…1016 fh06 = 005d80011800000000000000000000000000 // 0x510 @0x10
0x0500…1016 at0022 = 0x00000003 // 0x522 @0x22
0x0500…1016 at0026 = Form36LV {f00=0x24, f01=0x1f, f12=0x11011550, f13=»HPFRMT03«, f14=»#SA@EH «, f15=»#SDALIB «, f1z=0x1e} // 0x526 @0x26
0x0500…1016 at0045 = Form36LV {f00=0x24, f01=0x1f, f12=0x0c011550, f13=»HPFRMT02«, f14=»#SA@EH «, f15=»#SDALIB «, f1z=0x1e} // 0x545 @0x45
0x0500…1016 at0064 = Form36LV {f00=0x24, f01=0x1f, f12=0x01011850, f13=»HPFRMT01«, f14=»#SA@EH «, f15=»#SDALIB «, f1z=0x1e} // 0x564 @0x64
0x0500…1016 at0083 = Form36LV {f00=0x51, f01=0x12, f22=02ca003c0201, f23=130800, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0x583 @0x83
0x0500…1016 at0095 = Form36LV {f00=0x51, f01=0x12, f22=030a003c0201, f23=140800, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0x595 @0x95
0x0500…1016 at00a7 = Form36LV {f00=0x51, f01=0x12, f22=034a00210201, f23=152300, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0x5a7 @0xa7
0x0500…1016 at00b9 = Form36LV {f00=0x51, f01=0x12, f22=000e00015111, f23=091708, f24=»Y«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0x5b9 @0xb9
0x0500…1016 at00cb = Form36LV {f00=0x51, f01=0x12, f22=001800085111, f23=0e4509, f24=»Y«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0x5cb @0xcb
0x0500…1016 at00dd = Form36LV {f00=0x51, f01=0x12, f22=002900085111, f23=0f450a, f24=»Y«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0x5dd @0xdd
0x0500…1016 at00ef = Form36LV {f00=0x51, f01=0x12, f22=003a00015111, f23=12450b, f24=»Y«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0x5ef @0xef
0x0500…1016 at0101 = Form36LV {f00=0x51, f01=0x12, f22=004400015711, f23=13450c, f24=»Y«, f25=03, f26=» «, f27=01, f28=»NNN«} // 0x601 @0x101
0x0500…1016 at0113 = Form36LV {f00=0x51, f01=0x12, f22=004e00085711, f23=14450d, f24=»Y«, f25=03, f26=» «, f27=01, f28=»NNN«} // 0x613 @0x113
0x0500…1016 at0125 = Form36LV {f00=0x51, f01=0x12, f22=005f00085711, f23=15450e, f24=»Y«, f25=03, f26=» «, f27=01, f28=»NNN«} // 0x625 @0x125
0x0500…1016 at0137 = Form36LV {f00=0x51, f01=0x12, f22=036f00024101, f23=014e00, f24=»N«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0x637 @0x137
0x0500…1016 at0149 = Form36LV {f00=0xfe, f01=0x07, f88=00000000, f89=06} // 0x649 @0x149
0x0500…1016 panel = { // 0x650 @0x150
0x0500…1016 ┌────────────────────────────────────────────────────────────────────────────────┐
0x0500…1016 00│ END OF MEMBER OPTIONS ╳␣␣╳│
0x0500…1016 01│ │
0x0500…1016 02│ Select one of the following: │
0x0500…1016 03│ │
0x0500…1016 04│ 0. Return to prior member selection display │
0x0500…1016 05│ 1. Save the work done │
0x0500…1016 06│ 2. Disregard work done on all formats in the member │
0x0500…1016 07│ │
0x0500…1016 08│ Option . . . . . . .␣┴┤ │
0x0500…1016 09│ │
0x0500…1016 10│ │
0x0500…1016 11│ If option 1 is entered, │
0x0500…1016 12│ │
0x0500…1016 13│ Name the output source library . . . . . . . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
0x0500…1016 14│ Name the output source member. . . . . . . . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
0x0500…1016 15│ │
0x0500…1016 16│ Indicate if SDA should: │
0x0500…1016 17│ Renumber source specifications . . . . . . . . . . . . . Y,N␣┴┤ │
0x0500…1016 18│ ╳Compile the source member (evoke $SFGR). . . . . . . . . Y,N␣┴┤ │
0x0500…1016 19│ ╳ Output load library name. . . . .␣␣␣␣␣␣␣␣┴┤ │
0x0500…1016 20│ ╳Output load member name . . . . .␣␣␣␣␣␣␣␣┴┤ │
0x0500…1016 21│ │
0x0500…1016 22│ │
0x0500…1016 23│ │
0x0500…1016 24│ │
0x0500…1016 25│ │
0x0500…1016 26│ │
0x0500…1016 27│ │
0x0500…1016 └────────────────────────────────────────────────────────────────────────────────┘
0x0500…1016 Panel5250 {
0x0500…1016 at0000 = ClearUnit {esc=04, cu=40} // 0x650 @0x0
0x0500…1016 at0002 = WriteToDisplay {esc=04, wtd=11, flags=0x0020} // 0x652 @0x2
0x0500…1016 at0006 = StartOfHeader {soh=01, len=0x03, extra=000001} // 0x656 @0x6
0x0500…1016 at000b = InsertCursor {ic=13, line=0x09, col=0x17} // 0x65b @0xb
0x0500…1016 at000e = SetBufferAddress {ic=11, line=0x09, col=0x16} // 0x65e @0xe
0x0500…1016 at0011 = StartField {sf=1d, ffw=0x4b25, attr=0x32, len=0x0001} // 0x661 @0x11
0x0500…1016 at0017 = »␣« // 0x667 @0x17
0x0500…1016 at0018 = SetBufferAddress {ic=11, line=0x0e, col=0x44} // 0x668 @0x18
0x0500…1016 at001b = StartField {sf=1d, ffw=0x4820, attr=0x32, len=0x0008} // 0x66b @0x1b
0x0500…1016 at0021 = »␣␣␣␣␣␣␣␣« // 0x671 @0x21
0x0500…1016 at0029 = SetBufferAddress {ic=11, line=0x0f, col=0x44} // 0x679 @0x29
0x0500…1016 at002c = StartField {sf=1d, ffw=0x4820, attr=0x32, len=0x0008} // 0x67c @0x2c
0x0500…1016 at0032 = »␣␣␣␣␣␣␣␣« // 0x682 @0x32
0x0500…1016 at003a = SetBufferAddress {ic=11, line=0x12, col=0x44} // 0x68a @0x3a
0x0500…1016 at003d = StartField {sf=1d, ffw=0x4920, attr=0x32, len=0x0001} // 0x68d @0x3d
0x0500…1016 at0043 = »␣« // 0x693 @0x43
0x0500…1016 at0044 = SetBufferAddress {ic=11, line=0x13, col=0x44} // 0x694 @0x44
0x0500…1016 at0047 = StartField {sf=1d, ffw=0x4920, attr=0x32, len=0x0001} // 0x697 @0x47
0x0500…1016 at004d = »␣« // 0x69d @0x4d
0x0500…1016 at004e = SetBufferAddress {ic=11, line=0x14, col=0x44} // 0x69e @0x4e
0x0500…1016 at0051 = StartField {sf=1d, ffw=0x4820, attr=0x32, len=0x0008} // 0x6a1 @0x51
0x0500…1016 at0057 = »␣␣␣␣␣␣␣␣« // 0x6a7 @0x57
0x0500…1016 at005f = SetBufferAddress {ic=11, line=0x15, col=0x44} // 0x6af @0x5f
0x0500…1016 at0062 = StartField {sf=1d, ffw=0x4820, fcw=0x80ff, attr=0x32, len=0x0008} // 0x6b2 @0x62
0x0500…1016 at006a = »␣␣␣␣␣␣␣␣« // 0x6ba @0x6a
0x0500…1016 at0072 = SetBufferAddress {ic=11, line=0x01, col=0x19} // 0x6c2 @0x72
0x0500…1016 at0075 = » END OF MEMBER OPTIONS « // 0x6c5 @0x75
0x0500…1016 at0092 = SetBufferAddress {ic=11, line=0x03, col=0x02} // 0x6e2 @0x92
0x0500…1016 at0095 = »Select one of the following: « // 0x6e5 @0x95
0x0500…1016 at00c0 = SetBufferAddress {ic=11, line=0x05, col=0x17} // 0x710 @0xc0
0x0500…1016 at00c3 = »0. Return to prior member selection display « // 0x713 @0xc3
0x0500…1016 at00fc = SetBufferAddress {ic=11, line=0x06, col=0x17} // 0x74c @0xfc
0x0500…1016 at00ff = »1. Save the work done « // 0x74f @0xff
0x0500…1016 at0138 = SetBufferAddress {ic=11, line=0x07, col=0x17} // 0x788 @0x138
0x0500…1016 at013b = »2. Disregard work done on all formats in the member « // 0x78b @0x13b
0x0500…1016 at0174 = SetBufferAddress {ic=11, line=0x09, col=0x02} // 0x7c4 @0x174
0x0500…1016 at0177 = »Option . . . . . . .« // 0x7c7 @0x177
0x0500…1016 at018b = SetBufferAddress {ic=11, line=0x0c, col=0x02} // 0x7db @0x18b
0x0500…1016 at018e = »If option 1 is entered, « // 0x7de @0x18e
0x0500…1016 at01c9 = SetBufferAddress {ic=11, line=0x0e, col=0x06} // 0x819 @0x1c9
0x0500…1016 at01cc = »Name the output source library . . . . . . . . . . . . . . . .« // 0x81c @0x1cc
0x0500…1016 at020a = SetBufferAddress {ic=11, line=0x0f, col=0x06} // 0x85a @0x20a
0x0500…1016 at020d = »Name the output source member. . . . . . . . . . . . . . . . .« // 0x85d @0x20d
0x0500…1016 at024b = SetBufferAddress {ic=11, line=0x11, col=0x06} // 0x89b @0x24b
0x0500…1016 at024e = »Indicate if SDA should: « // 0x89e @0x24e
0x0500…1016 at028b = SetBufferAddress {ic=11, line=0x12, col=0x08} // 0x8db @0x28b
0x0500…1016 at028e = »Renumber source specifications . . . . . . . . . . . . . Y,N« // 0x8de @0x28e
0x0500…1016 at02ca = SetBufferAddress {ic=11, line=0x13, col=0x07} // 0x91a @0x2ca
0x0500…1016 at02cd = Attribute {type=0x20} // 0x91d @0x2cd
0x0500…1016 at02ce = »Compile the source member (evoke $SFGR). . . . . . . . . Y,N« // 0x91e @0x2ce
0x0500…1016 at030a = SetBufferAddress {ic=11, line=0x14, col=0x07} // 0x95a @0x30a
0x0500…1016 at030d = Attribute {type=0x20} // 0x95d @0x30d
0x0500…1016 at030e = » Output load library name. . . . .« // 0x95e @0x30e
0x0500…1016 at034a = SetBufferAddress {ic=11, line=0x15, col=0x22} // 0x99a @0x34a
0x0500…1016 at034d = Attribute {type=0x20} // 0x99d @0x34d
0x0500…1016 at034e = »Output load member name . . . . .« // 0x99e @0x34e
0x0500…1016 at036f = SetBufferAddress {ic=11, line=0x01, col=0x4d} // 0x9bf @0x36f
0x0500…1016 at0372 = Attribute {type=0x20} // 0x9c2 @0x372
0x0500…1016 at0373 = »␣␣« // 0x9c3 @0x373
0x0500…1016 at0375 = Attribute {type=0x20} // 0x9c5 @0x375
0x0500…1016 }
0x0500…1016 }
0x0500…1016 }
0x0a00…190f Form36 {
0x0a00…190f fh000 = 0x01 // 0xa00 @0x0
0x0a00…190f fh00 = 2605 // 0xa01 @0x1
0x0a00…190f fh01 = »NNN« // 0xa03 @0x3
0x0a00…190f fh02 = 000000 // 0xa06 @0x6
0x0a00…190f fh03 = »N N« // 0xa09 @0x9
0x0a00…190f fh04 = 0x0140 // 0xa0c @0xc
0x0a00…190f fh05 = 0x028f // 0xa0e @0xe
0x0a00…190f fh06 = 003e80011800000000000000000000000000 // 0xa10 @0x10
0x0a00…190f at0022 = 0x00000003 // 0xa22 @0x22
0x0a00…190f at0026 = Form36LV {f00=0x24, f01=0x1f, f12=0x0c011250, f13=»HPRPG202«, f14=»#SA@EH «, f15=»#SDALIB «, f1z=0x1e} // 0xa26 @0x26
0x0a00…190f at0045 = Form36LV {f00=0x24, f01=0x1f, f12=0x01011850, f13=»HPRPG201«, f14=»#SA@EH «, f15=»#SDALIB «, f1z=0x1e} // 0xa45 @0x45
0x0a00…190f at0064 = Form36LV {f00=0x51, f01=0x12, f22=009f00390201, f23=051700, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xa64 @0x64
0x0a00…190f at0076 = Form36LV {f00=0x51, f01=0x12, f22=00dd00390201, f23=061700, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xa76 @0x76
0x0a00…190f at0088 = Form36LV {f00=0x51, f01=0x12, f22=016e003b0201, f23=0c0200, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xa88 @0x88
0x0a00…190f at009a = Form36LV {f00=0x51, f01=0x12, f22=01ae003c0201, f23=0e0800, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xa9a @0x9a
0x0a00…190f at00ac = Form36LV {f00=0x51, f01=0x12, f22=01ee003c0201, f23=0f0800, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xaac @0xac
0x0a00…190f at00be = Form36LV {f00=0x51, f01=0x12, f22=022e00170201, f23=110800, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xabe @0xbe
0x0a00…190f at00d0 = Form36LV {f00=0x51, f01=0x12, f22=024a003a0201, f23=120a00, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xad0 @0xd0
0x0a00…190f at00e2 = Form36LV {f00=0x51, f01=0x12, f22=000e00015111, f23=091708, f24=»Y«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0xae2 @0xe2
0x0a00…190f at00f4 = Form36LV {f00=0x51, f01=0x12, f22=001800085711, f23=0e4509, f24=»Y«, f25=03, f26=» «, f27=01, f28=»NNN«} // 0xaf4 @0xf4
0x0a00…190f at0106 = Form36LV {f00=0x51, f01=0x12, f22=002900085711, f23=0f450a, f24=»Y«, f25=03, f26=» «, f27=01, f28=»NNN«} // 0xb06 @0x106
0x0a00…190f at0118 = Form36LV {f00=0x51, f01=0x12, f22=003a00015711, f23=12450b, f24=»Y«, f25=03, f26=» «, f27=01, f28=»NNN«} // 0xb18 @0x118
0x0a00…190f at012a = Form36LV {f00=0x51, f01=0x12, f22=028800024101, f23=014e00, f24=»N«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0xb2a @0x12a
0x0a00…190f at013c = Form36LV {f00=0xfe, f01=0x04, f88=00, f89=03} // 0xb3c @0x13c
0x0a00…190f panel = { // 0xb40 @0x140
0x0a00…190f ┌────────────────────────────────────────────────────────────────────────────────┐
0x0a00…190f 00│ END OF RPG PROGRAM GENERATION OPTIONS ╳␣␣╳│
0x0a00…190f 01│ │
0x0a00…190f 02│ Select one of the following: │
0x0a00…190f 03│ │
0x0a00…190f 04│ ╳0. Return to prior RPG generation display ╳│
0x0a00…190f 05│ ╳1. Save the generated RPG source specifications ╳│
0x0a00…190f 06│ 2. Discard the generated specifications │
0x0a00…190f 07│ │
0x0a00…190f 08│ Option . . . . . . .␣┴┤ │
0x0a00…190f 09│ │
0x0a00…190f 10│ │
0x0a00…190f 11│╳If option 1 is entered, ╳ │
0x0a00…190f 12│ │
0x0a00…190f 13│ ╳Name the output source library . . . . . . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
0x0a00…190f 14│ ╳Name the output source member. . . . . . . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
0x0a00…190f 15│ │
0x0a00…190f 16│ ╳Indicate if SDA should:╳ │
0x0a00…190f 17│ ╳Print generated source specifications. . . . . . . . . Y,N␣┴┤ │
0x0a00…190f 18│ │
0x0a00…190f 19│ │
0x0a00…190f 20│ │
0x0a00…190f 21│ │
0x0a00…190f 22│ │
0x0a00…190f 23│ │
0x0a00…190f 24│ │
0x0a00…190f 25│ │
0x0a00…190f 26│ │
0x0a00…190f 27│ │
0x0a00…190f └────────────────────────────────────────────────────────────────────────────────┘
0x0a00…190f Panel5250 {
0x0a00…190f at0000 = ClearUnit {esc=04, cu=40} // 0xb40 @0x0
0x0a00…190f at0002 = WriteToDisplay {esc=04, wtd=11, flags=0x0020} // 0xb42 @0x2
0x0a00…190f at0006 = StartOfHeader {soh=01, len=0x03, extra=000001} // 0xb46 @0x6
0x0a00…190f at000b = InsertCursor {ic=13, line=0x09, col=0x17} // 0xb4b @0xb
0x0a00…190f at000e = SetBufferAddress {ic=11, line=0x09, col=0x16} // 0xb4e @0xe
0x0a00…190f at0011 = StartField {sf=1d, ffw=0x4b25, attr=0x32, len=0x0001} // 0xb51 @0x11
0x0a00…190f at0017 = »␣« // 0xb57 @0x17
0x0a00…190f at0018 = SetBufferAddress {ic=11, line=0x0e, col=0x44} // 0xb58 @0x18
0x0a00…190f at001b = StartField {sf=1d, ffw=0x4820, attr=0x32, len=0x0008} // 0xb5b @0x1b
0x0a00…190f at0021 = »␣␣␣␣␣␣␣␣« // 0xb61 @0x21
0x0a00…190f at0029 = SetBufferAddress {ic=11, line=0x0f, col=0x44} // 0xb69 @0x29
0x0a00…190f at002c = StartField {sf=1d, ffw=0x4820, attr=0x32, len=0x0008} // 0xb6c @0x2c
0x0a00…190f at0032 = »␣␣␣␣␣␣␣␣« // 0xb72 @0x32
0x0a00…190f at003a = SetBufferAddress {ic=11, line=0x12, col=0x44} // 0xb7a @0x3a
0x0a00…190f at003d = StartField {sf=1d, ffw=0x4920, fcw=0x80ff, attr=0x32, len=0x0001} // 0xb7d @0x3d
0x0a00…190f at0045 = »␣« // 0xb85 @0x45
0x0a00…190f at0046 = SetBufferAddress {ic=11, line=0x01, col=0x11} // 0xb86 @0x46
0x0a00…190f at0049 = » END OF RPG PROGRAM GENERATION OPTIONS « // 0xb89 @0x49
0x0a00…190f at0071 = SetBufferAddress {ic=11, line=0x03, col=0x02} // 0xbb1 @0x71
0x0a00…190f at0074 = »Select one of the following: « // 0xbb4 @0x74
0x0a00…190f at009f = SetBufferAddress {ic=11, line=0x05, col=0x16} // 0xbdf @0x9f
0x0a00…190f at00a2 = Attribute {type=0x20} // 0xbe2 @0xa2
0x0a00…190f at00a3 = »0. Return to prior RPG generation display « // 0xbe3 @0xa3
0x0a00…190f at00dc = Attribute {type=0x20} // 0xc1c @0xdc
0x0a00…190f at00dd = SetBufferAddress {ic=11, line=0x06, col=0x16} // 0xc1d @0xdd
0x0a00…190f at00e0 = Attribute {type=0x20} // 0xc20 @0xe0
0x0a00…190f at00e1 = »1. Save the generated RPG source specifications « // 0xc21 @0xe1
0x0a00…190f at011a = Attribute {type=0x20} // 0xc5a @0x11a
0x0a00…190f at011b = SetBufferAddress {ic=11, line=0x07, col=0x17} // 0xc5b @0x11b
0x0a00…190f at011e = »2. Discard the generated specifications « // 0xc5e @0x11e
0x0a00…190f at0157 = SetBufferAddress {ic=11, line=0x09, col=0x02} // 0xc97 @0x157
0x0a00…190f at015a = »Option . . . . . . .« // 0xc9a @0x15a
0x0a00…190f at016e = SetBufferAddress {ic=11, line=0x0c, col=0x01} // 0xcae @0x16e
0x0a00…190f at0171 = Attribute {type=0x20} // 0xcb1 @0x171
0x0a00…190f at0172 = »If option 1 is entered, « // 0xcb2 @0x172
0x0a00…190f at01ad = Attribute {type=0x20} // 0xced @0x1ad
0x0a00…190f at01ae = SetBufferAddress {ic=11, line=0x0e, col=0x07} // 0xcee @0x1ae
0x0a00…190f at01b1 = Attribute {type=0x20} // 0xcf1 @0x1b1
0x0a00…190f at01b2 = »Name the output source library . . . . . . . . . . . . . . .« // 0xcf2 @0x1b2
0x0a00…190f at01ee = SetBufferAddress {ic=11, line=0x0f, col=0x07} // 0xd2e @0x1ee
0x0a00…190f at01f1 = Attribute {type=0x20} // 0xd31 @0x1f1
0x0a00…190f at01f2 = »Name the output source member. . . . . . . . . . . . . . . .« // 0xd32 @0x1f2
0x0a00…190f at022e = SetBufferAddress {ic=11, line=0x11, col=0x07} // 0xd6e @0x22e
0x0a00…190f at0231 = Attribute {type=0x20} // 0xd71 @0x231
0x0a00…190f at0232 = »Indicate if SDA should:« // 0xd72 @0x232
0x0a00…190f at0249 = Attribute {type=0x20} // 0xd89 @0x249
0x0a00…190f at024a = SetBufferAddress {ic=11, line=0x12, col=0x09} // 0xd8a @0x24a
0x0a00…190f at024d = Attribute {type=0x20} // 0xd8d @0x24d
0x0a00…190f at024e = »Print generated source specifications. . . . . . . . . Y,N« // 0xd8e @0x24e
0x0a00…190f at0288 = SetBufferAddress {ic=11, line=0x01, col=0x4d} // 0xdc8 @0x288
0x0a00…190f at028b = Attribute {type=0x20} // 0xdcb @0x28b
0x0a00…190f at028c = »␣␣« // 0xdcc @0x28c
0x0a00…190f at028e = Attribute {type=0x20} // 0xdce @0x28e
0x0a00…190f }
0x0a00…190f }
0x0a00…190f }
0x0e00…2210 Form36 {
0x0e00…2210 fh000 = 0x01 // 0xe00 @0x0
0x0e00…2210 fh00 = 2605 // 0xe01 @0x1
0x0e00…2210 fh01 = »NNN« // 0xe03 @0x3
0x0e00…2210 fh02 = 000000 // 0xe06 @0x6
0x0e00…2210 fh03 = »N N« // 0xe09 @0x9
0x0e00…2210 fh04 = 0x0188 // 0xe0c @0xc
0x0e00…2210 fh05 = 0x0300 // 0xe0e @0xe
0x0e00…2210 fh06 = 005d80011800000000000000000000000000 // 0xe10 @0x10
0x0e00…2210 at0022 = 0x00000003 // 0xe22 @0x22
0x0e00…2210 at0026 = Form36LV {f00=0x24, f01=0x1f, f12=0x11011350, f13=»HPWSUP03«, f14=»#SA@EH «, f15=»#SDALIB «, f1z=0x1e} // 0xe26 @0x26
0x0e00…2210 at0045 = Form36LV {f00=0x24, f01=0x1f, f12=0x0c011350, f13=»HPWSUP02«, f14=»#SA@EH «, f15=»#SDALIB «, f1z=0x1e} // 0xe45 @0x45
0x0e00…2210 at0064 = Form36LV {f00=0x24, f01=0x1f, f12=0x01011850, f13=»HPWSUP01«, f14=»#SA@EH «, f15=»#SDALIB «, f1z=0x1e} // 0xe64 @0x64
0x0e00…2210 at0083 = Form36LV {f00=0x51, f01=0x12, f22=00a900390201, f23=051700, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xe83 @0x83
0x0e00…2210 at0095 = Form36LV {f00=0x51, f01=0x12, f22=00e700390201, f23=061700, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xe95 @0x95
0x0e00…2210 at00a7 = Form36LV {f00=0x51, f01=0x12, f22=0178003b0201, f23=0c0200, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xea7 @0xa7
0x0e00…2210 at00b9 = Form36LV {f00=0x51, f01=0x12, f22=01b8003c0201, f23=0e0800, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xeb9 @0xb9
0x0e00…2210 at00cb = Form36LV {f00=0x51, f01=0x12, f22=01f8003c0201, f23=0f0800, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xecb @0xcb
0x0e00…2210 at00dd = Form36LV {f00=0x51, f01=0x12, f22=0238003c0201, f23=110800, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xedd @0xdd
0x0e00…2210 at00ef = Form36LV {f00=0x51, f01=0x12, f22=0279003c0201, f23=120800, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xeef @0xef
0x0e00…2210 at0101 = Form36LV {f00=0x51, f01=0x12, f22=02b9003c0201, f23=130800, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0xf01 @0x101
0x0e00…2210 at0113 = Form36LV {f00=0x51, f01=0x12, f22=000e00015111, f23=091708, f24=»Y«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0xf13 @0x113
0x0e00…2210 at0125 = Form36LV {f00=0x51, f01=0x12, f22=001800085711, f23=0e4509, f24=»Y«, f25=03, f26=» «, f27=01, f28=»NNN«} // 0xf25 @0x125
0x0e00…2210 at0137 = Form36LV {f00=0x51, f01=0x12, f22=002900085711, f23=0f450a, f24=»Y«, f25=03, f26=» «, f27=01, f28=»NNN«} // 0xf37 @0x137
0x0e00…2210 at0149 = Form36LV {f00=0x51, f01=0x12, f22=003a00015711, f23=12450b, f24=»Y«, f25=03, f26=» «, f27=01, f28=»NNN«} // 0xf49 @0x149
0x0e00…2210 at015b = Form36LV {f00=0x51, f01=0x12, f22=004400015711, f23=13450c, f24=»Y«, f25=03, f26=» «, f27=01, f28=»NNN«} // 0xf5b @0x15b
0x0e00…2210 at016d = Form36LV {f00=0x51, f01=0x12, f22=02f900024101, f23=014e00, f24=»N«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0xf6d @0x16d
0x0e00…2210 at017f = Form36LV {f00=0xfe, f01=0x09, f88=000000000000, f89=08} // 0xf7f @0x17f
0x0e00…2210 panel = { // 0xf88 @0x188
0x0e00…2210 ┌────────────────────────────────────────────────────────────────────────────────┐
0x0e00…2210 00│ END OF WSU PROGRAM GENERATION OPTIONS ╳␣␣╳│
0x0e00…2210 01│ │
0x0e00…2210 02│ Select one of the following: │
0x0e00…2210 03│ │
0x0e00…2210 04│ ╳0. Restart WSU program generation ╳│
0x0e00…2210 05│ ╳1. Save the generated WSU source program ╳│
0x0e00…2210 06│ 2. Discard the generated program │
0x0e00…2210 07│ │
0x0e00…2210 08│ Option . . . . . . .␣┴┤ │
0x0e00…2210 09│ │
0x0e00…2210 10│ │
0x0e00…2210 11│╳If option 1 is entered, ╳ │
0x0e00…2210 12│ │
0x0e00…2210 13│ ╳Name the output source library . . . . . . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
0x0e00…2210 14│ ╳Name the output source member. . . . . . . . . . . . . . . .␣␣␣␣␣␣␣␣┴┤ │
0x0e00…2210 15│ │
0x0e00…2210 16│ ╳Indicate if SDA should: ╳ │
0x0e00…2210 17│ ╳ Print program source specifications. . . . . . . . . . Y,N␣┴┤ │
0x0e00…2210 18│ ╳ Compile the source program (evoke WSU) . . . . . 0,1,2,Y,N␣┴┤ │
0x0e00…2210 19│ │
0x0e00…2210 20│ │
0x0e00…2210 21│ │
0x0e00…2210 22│ │
0x0e00…2210 23│ │
0x0e00…2210 24│ │
0x0e00…2210 25│ │
0x0e00…2210 26│ │
0x0e00…2210 27│ │
0x0e00…2210 └────────────────────────────────────────────────────────────────────────────────┘
0x0e00…2210 Panel5250 {
0x0e00…2210 at0000 = ClearUnit {esc=04, cu=40} // 0xf88 @0x0
0x0e00…2210 at0002 = WriteToDisplay {esc=04, wtd=11, flags=0x0020} // 0xf8a @0x2
0x0e00…2210 at0006 = StartOfHeader {soh=01, len=0x03, extra=000001} // 0xf8e @0x6
0x0e00…2210 at000b = InsertCursor {ic=13, line=0x09, col=0x17} // 0xf93 @0xb
0x0e00…2210 at000e = SetBufferAddress {ic=11, line=0x09, col=0x16} // 0xf96 @0xe
0x0e00…2210 at0011 = StartField {sf=1d, ffw=0x4b25, attr=0x32, len=0x0001} // 0xf99 @0x11
0x0e00…2210 at0017 = »␣« // 0xf9f @0x17
0x0e00…2210 at0018 = SetBufferAddress {ic=11, line=0x0e, col=0x44} // 0xfa0 @0x18
0x0e00…2210 at001b = StartField {sf=1d, ffw=0x4820, attr=0x32, len=0x0008} // 0xfa3 @0x1b
0x0e00…2210 at0021 = »␣␣␣␣␣␣␣␣« // 0xfa9 @0x21
0x0e00…2210 at0029 = SetBufferAddress {ic=11, line=0x0f, col=0x44} // 0xfb1 @0x29
0x0e00…2210 at002c = StartField {sf=1d, ffw=0x4820, attr=0x32, len=0x0008} // 0xfb4 @0x2c
0x0e00…2210 at0032 = »␣␣␣␣␣␣␣␣« // 0xfba @0x32
0x0e00…2210 at003a = SetBufferAddress {ic=11, line=0x12, col=0x44} // 0xfc2 @0x3a
0x0e00…2210 at003d = StartField {sf=1d, ffw=0x4920, attr=0x32, len=0x0001} // 0xfc5 @0x3d
0x0e00…2210 at0043 = »␣« // 0xfcb @0x43
0x0e00…2210 at0044 = SetBufferAddress {ic=11, line=0x13, col=0x44} // 0xfcc @0x44
0x0e00…2210 at0047 = StartField {sf=1d, ffw=0x4820, fcw=0x80ff, attr=0x32, len=0x0001} // 0xfcf @0x47
0x0e00…2210 at004f = »␣« // 0xfd7 @0x4f
0x0e00…2210 at0050 = SetBufferAddress {ic=11, line=0x01, col=0x11} // 0xfd8 @0x50
0x0e00…2210 at0053 = » END OF WSU PROGRAM GENERATION OPTIONS « // 0xfdb @0x53
0x0e00…2210 at007b = SetBufferAddress {ic=11, line=0x03, col=0x02} // 0x1003 @0x7b
0x0e00…2210 at007e = »Select one of the following: « // 0x1006 @0x7e
0x0e00…2210 at00a9 = SetBufferAddress {ic=11, line=0x05, col=0x16} // 0x1031 @0xa9
0x0e00…2210 at00ac = Attribute {type=0x20} // 0x1034 @0xac
0x0e00…2210 at00ad = »0. Restart WSU program generation « // 0x1035 @0xad
0x0e00…2210 at00e6 = Attribute {type=0x20} // 0x106e @0xe6
0x0e00…2210 at00e7 = SetBufferAddress {ic=11, line=0x06, col=0x16} // 0x106f @0xe7
0x0e00…2210 at00ea = Attribute {type=0x20} // 0x1072 @0xea
0x0e00…2210 at00eb = »1. Save the generated WSU source program « // 0x1073 @0xeb
0x0e00…2210 at0124 = Attribute {type=0x20} // 0x10ac @0x124
0x0e00…2210 at0125 = SetBufferAddress {ic=11, line=0x07, col=0x17} // 0x10ad @0x125
0x0e00…2210 at0128 = »2. Discard the generated program « // 0x10b0 @0x128
0x0e00…2210 at0161 = SetBufferAddress {ic=11, line=0x09, col=0x02} // 0x10e9 @0x161
0x0e00…2210 at0164 = »Option . . . . . . .« // 0x10ec @0x164
0x0e00…2210 at0178 = SetBufferAddress {ic=11, line=0x0c, col=0x01} // 0x1100 @0x178
0x0e00…2210 at017b = Attribute {type=0x20} // 0x1103 @0x17b
0x0e00…2210 at017c = »If option 1 is entered, « // 0x1104 @0x17c
0x0e00…2210 at01b7 = Attribute {type=0x20} // 0x113f @0x1b7
0x0e00…2210 at01b8 = SetBufferAddress {ic=11, line=0x0e, col=0x07} // 0x1140 @0x1b8
0x0e00…2210 at01bb = Attribute {type=0x20} // 0x1143 @0x1bb
0x0e00…2210 at01bc = »Name the output source library . . . . . . . . . . . . . . .« // 0x1144 @0x1bc
0x0e00…2210 at01f8 = SetBufferAddress {ic=11, line=0x0f, col=0x07} // 0x1180 @0x1f8
0x0e00…2210 at01fb = Attribute {type=0x20} // 0x1183 @0x1fb
0x0e00…2210 at01fc = »Name the output source member. . . . . . . . . . . . . . . .« // 0x1184 @0x1fc
0x0e00…2210 at0238 = SetBufferAddress {ic=11, line=0x11, col=0x07} // 0x11c0 @0x238
0x0e00…2210 at023b = Attribute {type=0x20} // 0x11c3 @0x23b
0x0e00…2210 at023c = »Indicate if SDA should: « // 0x11c4 @0x23c
0x0e00…2210 at0278 = Attribute {type=0x20} // 0x1200 @0x278
0x0e00…2210 at0279 = SetBufferAddress {ic=11, line=0x12, col=0x07} // 0x1201 @0x279
0x0e00…2210 at027c = Attribute {type=0x20} // 0x1204 @0x27c
0x0e00…2210 at027d = » Print program source specifications. . . . . . . . . . Y,N« // 0x1205 @0x27d
0x0e00…2210 at02b9 = SetBufferAddress {ic=11, line=0x13, col=0x07} // 0x1241 @0x2b9
0x0e00…2210 at02bc = Attribute {type=0x20} // 0x1244 @0x2bc
0x0e00…2210 at02bd = » Compile the source program (evoke WSU) . . . . . 0,1,2,Y,N« // 0x1245 @0x2bd
0x0e00…2210 at02f9 = SetBufferAddress {ic=11, line=0x01, col=0x4d} // 0x1281 @0x2f9
0x0e00…2210 at02fc = Attribute {type=0x20} // 0x1284 @0x2fc
0x0e00…2210 at02fd = »␣␣« // 0x1285 @0x2fd
0x0e00…2210 at02ff = Attribute {type=0x20} // 0x1287 @0x2ff
0x0e00…2210 }
0x0e00…2210 }
0x0e00…2210 }
0x1300…2aee Form36 {
0x1300…2aee fh000 = 0x01 // 0x1300 @0x0
0x1300…2aee fh00 = 2605 // 0x1301 @0x1
0x1300…2aee fh01 = »NNN« // 0x1303 @0x3
0x1300…2aee fh02 = 000000 // 0x1306 @0x6
0x1300…2aee fh03 = »N N« // 0x1309 @0x9
0x1300…2aee fh04 = 0x0130 // 0x130c @0xc
0x1300…2aee fh05 = 0x028e // 0x130e @0xe
0x1300…2aee fh06 = 003e80011800000000000000000000000000 // 0x1310 @0x10
0x1300…2aee at0022 = 0x00000003 // 0x1322 @0x22
0x1300…2aee at0026 = Form36LV {f00=0x24, f01=0x1f, f12=0x0e011450, f13=»HPPRNT02«, f14=»#SA@EH «, f15=»#SDALIB «, f1z=0x1e} // 0x1326 @0x26
0x1300…2aee at0045 = Form36LV {f00=0x24, f01=0x1f, f12=0x01011850, f13=»HPPRNT01«, f14=»#SA@EH «, f15=»#SDALIB «, f1z=0x1e} // 0x1345 @0x45
0x1300…2aee at0064 = Form36LV {f00=0x51, f01=0x12, f22=00b700330201, f23=061700, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0x1364 @0x64
0x1300…2aee at0076 = Form36LV {f00=0x51, f01=0x12, f22=014200410201, f23=0e0200, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0x1376 @0x76
0x1300…2aee at0088 = Form36LV {f00=0x51, f01=0x12, f22=0188003e0201, f23=100600, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0x1388 @0x88
0x1300…2aee at009a = Form36LV {f00=0x51, f01=0x12, f22=01ca00360201, f23=120600, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0x139a @0x9a
0x1300…2aee at00ac = Form36LV {f00=0x51, f01=0x12, f22=0205003d0201, f23=130700, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0x13ac @0xac
0x1300…2aee at00be = Form36LV {f00=0x51, f01=0x12, f22=0246003d0201, f23=140700, f24=»N«, f25=00, f26=» «, f27=00, f28=»NNN«} // 0x13be @0xbe
0x1300…2aee at00d0 = Form36LV {f00=0x51, f01=0x12, f22=000e00015111, f23=091708, f24=»Y«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0x13d0 @0xd0
0x1300…2aee at00e2 = Form36LV {f00=0x51, f01=0x12, f22=001800015711, f23=104509, f24=»Y«, f25=02, f26=» «, f27=01, f28=»NNN«} // 0x13e2 @0xe2
0x1300…2aee at00f4 = Form36LV {f00=0x51, f01=0x12, f22=002200015711, f23=13450a, f24=»Y«, f25=02, f26=» «, f27=01, f28=»NNN«} // 0x13f4 @0xf4
0x1300…2aee at0106 = Form36LV {f00=0x51, f01=0x12, f22=002c00025711, f23=14450b, f24=»Y«, f25=02, f26=» «, f27=01, f28=»NNN«} // 0x1406 @0x106
0x1300…2aee at0118 = Form36LV {f00=0x51, f01=0x12, f22=028700024101, f23=014e00, f24=»N«, f25=00, f26=»N«, f27=01, f28=»NNN«} // 0x1418 @0x118
0x1300…2aee at012a = Form36LV {f00=0xfe, f01=0x06, f88=000000, f89=05} // 0x142a @0x12a
0x1300…2aee panel = { // 0x1430 @0x130
0x1300…2aee ┌────────────────────────────────────────────────────────────────────────────────┐
0x1300…2aee 00│ END OF PRINT OPTIONS ╳␣␣╳│
0x1300…2aee 01│ │
0x1300…2aee 02│ Select one of the following: │
0x1300…2aee 03│ │
0x1300…2aee 04│ 0. Return to prior print selection display │
0x1300…2aee 05│ ╳1. Print selected format images and specifications ╳ │
0x1300…2aee 06│ 2. Disregard selections, no printing will be done │
0x1300…2aee 07│ │
0x1300…2aee 08│ Option . . . . . . .␣┴┤ │
0x1300…2aee 09│ │
0x1300…2aee 10│ │
0x1300…2aee 11│ │
0x1300…2aee 12│ │
0x1300…2aee 13│╳If option 1 is entered, ╳ │
0x1300…2aee 14│ │
0x1300…2aee 15│ ╳Indicate if selected formats were designed for WSU . . . . Y,N␣┴┤ │
0x1300…2aee 16│ │
0x1300…2aee 17│ ╳Indicate if SDA should: ╳ │
0x1300…2aee 18│ ╳ Print borders around display images . . . . . . . . . . .Y,N␣┴┤ │
0x1300…2aee 19│ ╳ Indent all printed output . . . . . . . . . . . . . . . 2-35␣␣┴┤ │
0x1300…2aee 20│ │
0x1300…2aee 21│ │
0x1300…2aee 22│ │
0x1300…2aee 23│ │
0x1300…2aee 24│ │
0x1300…2aee 25│ │
0x1300…2aee 26│ │
0x1300…2aee 27│ │
0x1300…2aee └────────────────────────────────────────────────────────────────────────────────┘
0x1300…2aee Panel5250 {
0x1300…2aee at0000 = ClearUnit {esc=04, cu=40} // 0x1430 @0x0
0x1300…2aee at0002 = WriteToDisplay {esc=04, wtd=11, flags=0x0020} // 0x1432 @0x2
0x1300…2aee at0006 = StartOfHeader {soh=01, len=0x03, extra=000001} // 0x1436 @0x6
0x1300…2aee at000b = InsertCursor {ic=13, line=0x09, col=0x17} // 0x143b @0xb
0x1300…2aee at000e = SetBufferAddress {ic=11, line=0x09, col=0x16} // 0x143e @0xe
0x1300…2aee at0011 = StartField {sf=1d, ffw=0x4b20, attr=0x32, len=0x0001} // 0x1441 @0x11
0x1300…2aee at0017 = »␣« // 0x1447 @0x17
0x1300…2aee at0018 = SetBufferAddress {ic=11, line=0x10, col=0x44} // 0x1448 @0x18
0x1300…2aee at001b = StartField {sf=1d, ffw=0x4920, attr=0x32, len=0x0001} // 0x144b @0x1b
0x1300…2aee at0021 = »␣« // 0x1451 @0x21
0x1300…2aee at0022 = SetBufferAddress {ic=11, line=0x13, col=0x44} // 0x1452 @0x22
0x1300…2aee at0025 = StartField {sf=1d, ffw=0x4920, attr=0x32, len=0x0001} // 0x1455 @0x25
0x1300…2aee at002b = »␣« // 0x145b @0x2b
0x1300…2aee at002c = SetBufferAddress {ic=11, line=0x14, col=0x44} // 0x145c @0x2c
0x1300…2aee at002f = StartField {sf=1d, ffw=0x4b20, fcw=0x80ff, attr=0x32, len=0x0002} // 0x145f @0x2f
0x1300…2aee at0037 = »␣␣« // 0x1467 @0x37
0x1300…2aee at0039 = SetBufferAddress {ic=11, line=0x01, col=0x1b} // 0x1469 @0x39
0x1300…2aee at003c = » END OF PRINT OPTIONS « // 0x146c @0x3c
0x1300…2aee at0058 = SetBufferAddress {ic=11, line=0x03, col=0x02} // 0x1488 @0x58
0x1300…2aee at005b = »Select one of the following: « // 0x148b @0x5b
0x1300…2aee at0083 = SetBufferAddress {ic=11, line=0x05, col=0x17} // 0x14b3 @0x83
0x1300…2aee at0086 = »0. Return to prior print selection display « // 0x14b6 @0x86
0x1300…2aee at00b7 = SetBufferAddress {ic=11, line=0x06, col=0x16} // 0x14e7 @0xb7
0x1300…2aee at00ba = Attribute {type=0x20} // 0x14ea @0xba
0x1300…2aee at00bb = »1. Print selected format images and specifications « // 0x14eb @0xbb
0x1300…2aee at00ee = Attribute {type=0x20} // 0x151e @0xee
0x1300…2aee at00ef = SetBufferAddress {ic=11, line=0x07, col=0x17} // 0x151f @0xef
0x1300…2aee at00f2 = »2. Disregard selections, no printing will be done « // 0x1522 @0xf2
0x1300…2aee at012b = SetBufferAddress {ic=11, line=0x09, col=0x02} // 0x155b @0x12b
0x1300…2aee at012e = »Option . . . . . . .« // 0x155e @0x12e
0x1300…2aee at0142 = SetBufferAddress {ic=11, line=0x0e, col=0x01} // 0x1572 @0x142
0x1300…2aee at0145 = Attribute {type=0x20} // 0x1575 @0x145
0x1300…2aee at0146 = »If option 1 is entered, « // 0x1576 @0x146
0x1300…2aee at0187 = Attribute {type=0x20} // 0x15b7 @0x187
0x1300…2aee at0188 = SetBufferAddress {ic=11, line=0x10, col=0x05} // 0x15b8 @0x188
0x1300…2aee at018b = Attribute {type=0x20} // 0x15bb @0x18b
0x1300…2aee at018c = »Indicate if selected formats were designed for WSU . . . . Y,N« // 0x15bc @0x18c
0x1300…2aee at01ca = SetBufferAddress {ic=11, line=0x12, col=0x05} // 0x15fa @0x1ca
0x1300…2aee at01cd = Attribute {type=0x20} // 0x15fd @0x1cd
0x1300…2aee at01ce = »Indicate if SDA should: « // 0x15fe @0x1ce
0x1300…2aee at0204 = Attribute {type=0x20} // 0x1634 @0x204
0x1300…2aee at0205 = SetBufferAddress {ic=11, line=0x13, col=0x06} // 0x1635 @0x205
0x1300…2aee at0208 = Attribute {type=0x20} // 0x1638 @0x208
0x1300…2aee at0209 = » Print borders around display images . . . . . . . . . . .Y,N« // 0x1639 @0x209
0x1300…2aee at0246 = SetBufferAddress {ic=11, line=0x14, col=0x06} // 0x1676 @0x246
0x1300…2aee at0249 = Attribute {type=0x20} // 0x1679 @0x249
0x1300…2aee at024a = » Indent all printed output . . . . . . . . . . . . . . . 2-35« // 0x167a @0x24a
0x1300…2aee at0287 = SetBufferAddress {ic=11, line=0x01, col=0x4d} // 0x16b7 @0x287
0x1300…2aee at028a = Attribute {type=0x20} // 0x16ba @0x28a
0x1300…2aee at028b = »␣␣« // 0x16bb @0x28b
0x1300…2aee at028d = Attribute {type=0x20} // 0x16bd @0x28d
0x1300…2aee }
0x1300…2aee }
0x1300…2aee }