|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 14396 (0x383c)
Notes: pts_type(SC)
Names: »XMESG.SC«
└─⟦35fda6e03⟧ Bits:30009701 Philips computer tape "BARCLAY"
└─⟦this⟧ »DEMO6800/XMESG.SC«
└─⟦e276fd206⟧ Bits:30009696 Philips computer tape "600413"
└─⟦this⟧ »DEMO6800/XMESG.SC«
└─⟦f350e1b7a⟧ Bits:30009678 Philips computer tape "600219"
└─⟦this⟧ »PTSDEMO/XMESG.SC«
IDENT XMESG ERROR- AND MESSAGECONTROL
DDUM DEMODD
PDIV
EXPROC XAKBIN
EXPROC XCLAMP
EXPROC ZMRDF
ENTRY XDMSG
ENTRY XEERR
ENTRY XFERR1
ENTRY XHERAS
************************************************************************
* *
* PROCEDURE: XDMSG*
* PARAMETER:*
* PWMSGNR (INPUT): NUMBER OF THE MESSAGE TO BE DISPLAYED.*
* FUNCTIONAL DESCRIPTION:*
* THE MESSAGE INDICATED BY PWMSGNR IS READ FROM THE FORMAT*
* FILE AND DISPLAYED ON THE FIRST LINE OF THE DISPLAY.*
* WORKVARIABLE:*
* WW1*
* *
************************************************************************
XDMSG PROC PWMSGNR
PLIT PWMSGNR
XD000
**
* READ FORMAT FROM FORMATFILE*
**
PERF XHERAS ERASE SCREEN
MOVE WW1,PWMSGNR
PERF ZMRDF,WW1,KW1 READ INTO FCBUFFER
EDWRT SPDSSCRN,FCBUFFER
XD999
RET
PEND
************************************************************************
* *
* PROCEDURE: XEERR*
* PARAMETERS:*
* PWERRNR (INPUT): NUMBER OF THE ERROR OR MESSAGE TO BE DISPLAYED*
* XWANSWER (INP): WHAT KIND OF ANSWER MUST BE REQUESTED.*
* FUNCTIONAL DESCRIPTION:*
* THIS IS AN INTERMEDIATE ROUTINE TO MAKE IT POSSIBLE TO GIVE*
* THE ERROR (MESS) NUMBER AS A LITERAL.*
* CONTROL IS IMMEDIATELY PASSED TO XFERR1.*
* VARIABLE USED:*
* SPBINW4: USED TO CONTAIN THE ERROR (MESS) NUMBER HELD IN*
* PWERRNR*
* *
************************************************************************
XEERR PROC PWERRNR,XWANSWER
PLIT PWERRNR
PBIN XWANSWER
XE000
MOVE SPBINW4,PWERRNR
PERF XFERR1,SPBINW4,XWANSWER
XE999
RET
PEND
************************************************************************
**
* PROCEDURE: XFERR1*
* PARAMETERS:*
* PWERRNR (INPUT): NUMBER OF THE ERROR OR MESSAGE TO BE DISPLAYED*
* XWANSWER (INP): INDICATES WHAT KIND OF ANSWER THE OPERATOR*
* MUST GIVE TO THE ERROR (MESS) DISPLAYED.*
* FUNCTIONAL DESCRIPTION:*
* BASICALLY AN ERROR OR MESSAGE IS READ FROM THE FORMAT-FILE*
* AND DISPLAYED ON THE LAST LINE OF THE SCREEN.*
* FURTHER ACTIONS ARE CONTROLLED BY XWANSWER AS FOLLOWS:*
* VALUE OF XWANSWER: ACTION TO BE TAKEN:*
* 0: ERROR LAMP IS LIT;*
* REQUEST NO ANSWER FROM THE OPERATOR.*
* 1: ERROR LAMP IS LIT;*
* THE OPERATOR MAY ONLY ANSWER 'CANCEL'*
* 2: ERROR LAMP IS LIT;*
* THE OPERATOR MAY ONLY ANSWER 'CANCEL' OR 'CLEAR'*
* 3: MESSAGE LAMP IS LIT;*
* THE OPERATOR MAY ONLY ANSWER 'CANCEL' OR 'CONT'*
* *
* IF XWANSWER IS NOT ZERO THEN THE MESSAGE OR ERROR IS ERASED*
* FROM THE SCREEN AND THE ERROR/MESSAGE LAMP IS EXTINGUISHED*
* AFTER A SATISFACTORY ANSWER HAS BEEN GIVEN BY THE OPERATOR.*
* IF XWANSWER = 0 THEN THE CALLING ROUTINE MUST TAKE CARE OF*
* GETTING THE ANSWER, ERASING THE ERROR/MESSAGE AND LAMPS.*
* *
************************************************************************
XFERR1 PROC XWERRNR,XWANSWER
PBIN XWERRNR,XWANSWER
XF000
EDWRT SPDSSCRN,FMTBELL
*
* IF XWANSWER = 3, MESSAGE-LAMP SHOULD BE BURNING,
* DO NOT LIGHT ERROR-LAMP
*
CBE XWANSWER,KW3,XF010
PERF XCLAMP,KW3,KW1 ERROR LAMP ON
B XF020
XF010
PERF XCLAMP,KW2,KW1 MESSAGE LAMP ON
XF020
MOVE WW1,SPLSTLNE CALCULATE DSC1 PARAMETER
MUL WW1,=W'256' SHIFT 2 POS. FOR LAST ROW
ADD WW1,=W'1' COLUMN 1
DSC1 SPDSSCRN,6,WW1 SET CURSOR
*
* READ ERROR OR MESSAGE FROM THE FORMATFILE
*
PERF ZMRDF,XWERRNR,KW1 READ INTO FCBUFFER
EDWRT SPDSSCRN,FCBUFFER
CBE XWANSWER,KW0,XF999 NO ANSWER EXPECTED
**
* ANSWER EXPECTED*
**
XF050
PERF XAKBIN,=W'0' WAIT FOR ANSWER
IB XWANSWER,XF100,XF200,XF300
**
* CANCEL EXPECTED*
**
XF100
CBE SPBINW2,KWCANCEL,XF990
B XF050
**
* CANCEL OR CLEAR EXPECTED
**
XF200
CBE SPBINW2,KWCANCEL,XF990
CBE SPBINW2,KWCLEAR,XF995
B XF050
*
* CANCEL OR CONT EXPECTED
*
XF300
CBE SPBINW2,KWCANCEL,XF990
CBE SPBINW2,KWCONT,XF995
B XF050
**
* CANCEL PRESSED*
**
XF990
SET SBCANCEL
XF995
MOVE WW1,SPLSTLNE
ERASE 0,WW1,WW1 ERASE LAST LINE
PERF XCLAMP,KW3,KW0 ERROR LAMP OFF
PERF XCLAMP,KW2,KW0 MESSAGE LAMP OFF
XF999
RET
PEND
************************************************************************
**
* SOUND BELL
**
************************************************************************
FMTBELL FRMT
FSL
FILLR X'07',1 BELL
FMEND
************************************************************************
* *
* PROCEDURE: XHERAS*
* FUNCTIONAL DESCRIPTION:*
* ERASE THE SCREEN.*
* *
************************************************************************
XHERAS PROC
XH000
EDWRT SPDSSCRN,FMTERASE
XH999
RET
PEND
************************************************************************
**
* ERASE SCREEN
**
************************************************************************
FMTERASE FRMT
FCOPY =X'2031' ERASE SCREEN
FMEND
************************************************************************
END
0x0000…004a (0, 0, 400) Head {h00=0x0046, h01=0x0050, text=» IDENT XMESG ERROR- AND MESSAGECONTROL «, t00=0x0000, t01=0x0004}
0x004a…005e Head {h00=0x0010, h01=0x0050, text=» DDUM DEMODD«, t00=0x0000, t01=0x004e}
0x005e…006c Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0000, t01=0x0062}
0x006c…0082 Head {h00=0x0012, h01=0x0050, text=» EXPROC XAKBIN«, t00=0x0000, t01=0x0070}
0x0082…0098 Head {h00=0x0012, h01=0x0050, text=» EXPROC XCLAMP«, t00=0x0000, t01=0x0086}
0x0098…00ae Head {h00=0x0012, h01=0x0050, text=» EXPROC ZMRDF «, t00=0x0000, t01=0x009c}
0x00ae…00c2 Head {h00=0x0010, h01=0x0050, text=» ENTRY XDMSG«, t00=0x0000, t01=0x00b2}
0x00c2…00d6 Head {h00=0x0010, h01=0x0050, text=» ENTRY XEERR«, t00=0x0000, t01=0x00c6}
0x00d6…00ec Head {h00=0x0012, h01=0x0050, text=» ENTRY XFERR1 «, t00=0x0000, t01=0x00da}
0x00ec…010c Head {h00=0x001c, h01=0x0050, text=» ENTRY XHERAS «, t00=0x0000, t01=0x00f0}
0x010c…015c Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0000, t01=0x0110}
0x015c…01ac Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0000, t01=0x0160}
0x01ac…01fc Head {h00=0x004c, h01=0x0050, text=»* PROCEDURE: XDMSG *«, t00=0x0001, t01=0x0020}
0x01fc…024c Head {h00=0x004c, h01=0x0050, text=»* PARAMETER: *«, t00=0x0001, t01=0x0070}
0x024c…029c Head {h00=0x004c, h01=0x0050, text=»* PWMSGNR (INPUT): NUMBER OF THE MESSAGE TO BE DISPLAYED. *«, t00=0x0001, t01=0x00c0}
0x029c…02ec Head {h00=0x004c, h01=0x0050, text=»* FUNCTIONAL DESCRIPTION: *«, t00=0x0001, t01=0x0110}
0x02ec…033c Head {h00=0x004c, h01=0x0050, text=»* THE MESSAGE INDICATED BY PWMSGNR IS READ FROM THE FORMAT *«, t00=0x0001, t01=0x0160}
0x033c…038c Head {h00=0x004c, h01=0x0050, text=»* FILE AND DISPLAYED ON THE FIRST LINE OF THE DISPLAY. *«, t00=0x0002, t01=0x0020}
0x038c…03dc Head {h00=0x004c, h01=0x0050, text=»* WORKVARIABLE: *«, t00=0x0002, t01=0x0070}
0x03dc…042c Head {h00=0x004c, h01=0x0050, text=»* WW1 *«, t00=0x0002, t01=0x00c0}
0x042c…047c Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0002, t01=0x0110}
0x047c…04cc Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0002, t01=0x0160}
0x04cc…051c Head {h00=0x004c, h01=0x0050, text=»XDMSG PROC PWMSGNR «, t00=0x0003, t01=0x0020}
0x051c…0532 Head {h00=0x0012, h01=0x0050, text=» PLIT PWMSGNR «, t00=0x0003, t01=0x0070}
0x0532…0582 Head {h00=0x004c, h01=0x0050, text=»XD000 «, t00=0x0003, t01=0x0086}
0x0582…05d2 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0003, t01=0x00d6}
0x05d2…0622 Head {h00=0x004c, h01=0x0050, text=»* READ FORMAT FROM FORMATFILE *«, t00=0x0003, t01=0x0126}
0x0622…0672 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0003, t01=0x0176}
0x0672…0694 Head {h00=0x001e, h01=0x0050, text=» PERF XHERAS ERASE SCREEN «, t00=0x0004, t01=0x0036}
0x0694…06e4 Head {h00=0x004c, h01=0x0050, text=» MOVE WW1,PWMSGNR «, t00=0x0004, t01=0x0058}
0x06e4…0712 Head {h00=0x002a, h01=0x0050, text=» PERF ZMRDF,WW1,KW1 READ INTO FCBUFFER«, t00=0x0004, t01=0x00a8}
0x0712…0732 Head {h00=0x001c, h01=0x0050, text=» EDWRT SPDSSCRN,FCBUFFER«, t00=0x0004, t01=0x00d6}
0x0732…0782 Head {h00=0x004c, h01=0x0050, text=»XD999 «, t00=0x0004, t01=0x00f6}
0x0782…07d2 Head {h00=0x004c, h01=0x0050, text=» RET «, t00=0x0004, t01=0x0146}
0x07d2…0822 Head {h00=0x004c, h01=0x0050, text=» PEND «, t00=0x0005, t01=0x0008}
0x0822…0872 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0005, t01=0x0058}
0x0872…08c2 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0005, t01=0x00a8}
0x08c2…0912 Head {h00=0x004c, h01=0x0050, text=»* PROCEDURE: XEERR *«, t00=0x0005, t01=0x00f8}
0x0912…0962 Head {h00=0x004c, h01=0x0050, text=»* PARAMETERS: *«, t00=0x0005, t01=0x0148}
0x0962…09b2 Head {h00=0x004c, h01=0x0050, text=»* PWERRNR (INPUT): NUMBER OF THE ERROR OR MESSAGE TO BE DISPLAYED *«, t00=0x0006, t01=0x0008}
0x09b2…0a02 Head {h00=0x004c, h01=0x0050, text=»* XWANSWER (INP): WHAT KIND OF ANSWER MUST BE REQUESTED. *«, t00=0x0006, t01=0x0058}
0x0a02…0a52 Head {h00=0x004c, h01=0x0050, text=»* FUNCTIONAL DESCRIPTION: *«, t00=0x0006, t01=0x00a8}
0x0a52…0aa2 Head {h00=0x004c, h01=0x0050, text=»* THIS IS AN INTERMEDIATE ROUTINE TO MAKE IT POSSIBLE TO GIVE *«, t00=0x0006, t01=0x00f8}
0x0aa2…0af2 Head {h00=0x004c, h01=0x0050, text=»* THE ERROR (MESS) NUMBER AS A LITERAL. *«, t00=0x0006, t01=0x0148}
0x0af2…0b42 Head {h00=0x004c, h01=0x0050, text=»* CONTROL IS IMMEDIATELY PASSED TO XFERR1. *«, t00=0x0007, t01=0x0008}
0x0b42…0b92 Head {h00=0x004c, h01=0x0050, text=»* VARIABLE USED: *«, t00=0x0007, t01=0x0058}
0x0b92…0be2 Head {h00=0x004c, h01=0x0050, text=»* SPBINW4: USED TO CONTAIN THE ERROR (MESS) NUMBER HELD IN *«, t00=0x0007, t01=0x00a8}
0x0be2…0c32 Head {h00=0x004c, h01=0x0050, text=»* PWERRNR *«, t00=0x0007, t01=0x00f8}
0x0c32…0c82 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0007, t01=0x0148}
0x0c82…0cd2 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0008, t01=0x0008}
0x0cd2…0d22 Head {h00=0x004c, h01=0x0050, text=»XEERR PROC PWERRNR,XWANSWER «, t00=0x0008, t01=0x0058}
0x0d22…0d38 Head {h00=0x0012, h01=0x0050, text=» PLIT PWERRNR «, t00=0x0008, t01=0x00a8}
0x0d38…0d4e Head {h00=0x0012, h01=0x0050, text=» PBIN XWANSWER«, t00=0x0008, t01=0x00be}
0x0d4e…0d9e Head {h00=0x004c, h01=0x0050, text=»XE000 «, t00=0x0008, t01=0x00d4}
0x0d9e…0dee Head {h00=0x004c, h01=0x0050, text=» MOVE SPBINW4,PWERRNR «, t00=0x0008, t01=0x0124}
0x0dee…0e3e Head {h00=0x004c, h01=0x0050, text=» PERF XFERR1,SPBINW4,XWANSWER «, t00=0x0008, t01=0x0174}
0x0e3e…0e8e Head {h00=0x004c, h01=0x0050, text=»XE999 «, t00=0x0009, t01=0x0034}
0x0e8e…0ede Head {h00=0x004c, h01=0x0050, text=» RET «, t00=0x0009, t01=0x0084}
0x0ede…0f2e Head {h00=0x004c, h01=0x0050, text=» PEND «, t00=0x0009, t01=0x00d4}
0x0f2e…0f7e Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0009, t01=0x0124}
0x0f7e…0fce Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0009, t01=0x0174}
0x0fce…101e Head {h00=0x004c, h01=0x0050, text=»* PROCEDURE: XFERR1 *«, t00=0x000a, t01=0x0034}
0x101e…106e Head {h00=0x004c, h01=0x0050, text=»* PARAMETERS: *«, t00=0x000a, t01=0x0084}
0x106e…10be Head {h00=0x004c, h01=0x0050, text=»* PWERRNR (INPUT): NUMBER OF THE ERROR OR MESSAGE TO BE DISPLAYED *«, t00=0x000a, t01=0x00d4}
0x10be…110e Head {h00=0x004c, h01=0x0050, text=»* XWANSWER (INP): INDICATES WHAT KIND OF ANSWER THE OPERATOR *«, t00=0x000a, t01=0x0124}
0x110e…115e Head {h00=0x004c, h01=0x0050, text=»* MUST GIVE TO THE ERROR (MESS) DISPLAYED. *«, t00=0x000a, t01=0x0174}
0x115e…11ae Head {h00=0x004c, h01=0x0050, text=»* FUNCTIONAL DESCRIPTION: *«, t00=0x000b, t01=0x0034}
0x11ae…11fe Head {h00=0x004c, h01=0x0050, text=»* BASICALLY AN ERROR OR MESSAGE IS READ FROM THE FORMAT-FILE *«, t00=0x000b, t01=0x0084}
0x11fe…124e Head {h00=0x004c, h01=0x0050, text=»* AND DISPLAYED ON THE LAST LINE OF THE SCREEN. *«, t00=0x000b, t01=0x00d4}
0x124e…129e Head {h00=0x004c, h01=0x0050, text=»* FURTHER ACTIONS ARE CONTROLLED BY XWANSWER AS FOLLOWS: *«, t00=0x000b, t01=0x0124}
0x129e…12ee Head {h00=0x004c, h01=0x0050, text=»* VALUE OF XWANSWER: ACTION TO BE TAKEN: *«, t00=0x000b, t01=0x0174}
0x12ee…133e Head {h00=0x004c, h01=0x0050, text=»* 0: ERROR LAMP IS LIT; *«, t00=0x000c, t01=0x0034}
0x133e…138e Head {h00=0x004c, h01=0x0050, text=»* REQUEST NO ANSWER FROM THE OPERATOR. *«, t00=0x000c, t01=0x0084}
0x138e…13de Head {h00=0x004c, h01=0x0050, text=»* 1: ERROR LAMP IS LIT; *«, t00=0x000c, t01=0x00d4}
0x13de…142e Head {h00=0x004c, h01=0x0050, text=»* THE OPERATOR MAY ONLY ANSWER 'CANCEL' *«, t00=0x000c, t01=0x0124}
0x142e…147e Head {h00=0x004c, h01=0x0050, text=»* 2: ERROR LAMP IS LIT; *«, t00=0x000c, t01=0x0174}
0x147e…14ce Head {h00=0x004c, h01=0x0050, text=»* THE OPERATOR MAY ONLY ANSWER 'CANCEL' OR 'CLEAR' *«, t00=0x000d, t01=0x0034}
0x14ce…151e Head {h00=0x004c, h01=0x0050, text=»* 3: MESSAGE LAMP IS LIT; *«, t00=0x000d, t01=0x0084}
0x151e…156e Head {h00=0x004c, h01=0x0050, text=»* THE OPERATOR MAY ONLY ANSWER 'CANCEL' OR 'CONT' *«, t00=0x000d, t01=0x00d4}
0x156e…15be Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x000d, t01=0x0124}
0x15be…160e Head {h00=0x004c, h01=0x0050, text=»* IF XWANSWER IS NOT ZERO THEN THE MESSAGE OR ERROR IS ERASED *«, t00=0x000d, t01=0x0174}
0x160e…165e Head {h00=0x004c, h01=0x0050, text=»* FROM THE SCREEN AND THE ERROR/MESSAGE LAMP IS EXTINGUISHED *«, t00=0x000e, t01=0x0034}
0x165e…16ae Head {h00=0x004c, h01=0x0050, text=»* AFTER A SATISFACTORY ANSWER HAS BEEN GIVEN BY THE OPERATOR. *«, t00=0x000e, t01=0x0084}
0x16ae…16fe Head {h00=0x004c, h01=0x0050, text=»* IF XWANSWER = 0 THEN THE CALLING ROUTINE MUST TAKE CARE OF *«, t00=0x000e, t01=0x00d4}
0x16fe…174e Head {h00=0x004c, h01=0x0050, text=»* GETTING THE ANSWER, ERASING THE ERROR/MESSAGE AND LAMPS. *«, t00=0x000e, t01=0x0124}
0x174e…179e Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x000e, t01=0x0174}
0x179e…17ee Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x000f, t01=0x0034}
0x17ee…183e Head {h00=0x004c, h01=0x0050, text=»XFERR1 PROC XWERRNR,XWANSWER «, t00=0x000f, t01=0x0084}
0x183e…185c Head {h00=0x001a, h01=0x0050, text=» PBIN XWERRNR,XWANSWER«, t00=0x000f, t01=0x00d4}
0x185c…18ac Head {h00=0x004c, h01=0x0050, text=»XF000 «, t00=0x000f, t01=0x00f2}
0x18ac…18fc Head {h00=0x004c, h01=0x0050, text=» EDWRT SPDSSCRN,FMTBELL «, t00=0x000f, t01=0x0142}
0x18fc…1906 (16, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0004}
0x1906…1942 Head {h00=0x0038, h01=0x0050, text=»* IF XWANSWER = 3, MESSAGE-LAMP SHOULD BE BURNING,«, t00=0x0010, t01=0x000e}
0x1942…1966 Head {h00=0x0020, h01=0x0050, text=»* DO NOT LIGHT ERROR-LAMP «, t00=0x0010, t01=0x004a}
0x1966…1970 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x006e}
0x1970…1990 Head {h00=0x001c, h01=0x0050, text=» CBE XWANSWER,KW3,XF010 «, t00=0x0010, t01=0x0078}
0x1990…19ba Head {h00=0x0026, h01=0x0050, text=» PERF XCLAMP,KW3,KW1 ERROR LAMP ON«, t00=0x0010, t01=0x0098}
0x19ba…19ca Head {h00=0x000c, h01=0x0050, text=» B XF020«, t00=0x0010, t01=0x00c2}
0x19ca…19d8 Head {h00=0x000a, h01=0x0050, text=»XF010 «, t00=0x0010, t01=0x00d2}
0x19d8…1a04 Head {h00=0x0028, h01=0x0050, text=» PERF XCLAMP,KW2,KW1 MESSAGE LAMP ON«, t00=0x0010, t01=0x00e0}
0x1a04…1a12 Head {h00=0x000a, h01=0x0050, text=»XF020 «, t00=0x0010, t01=0x010c}
0x1a12…1a62 Head {h00=0x004c, h01=0x0050, text=» MOVE WW1,SPLSTLNE CALCULATE DSC1 PARAMETER «, t00=0x0010, t01=0x011a}
0x1a62…1ab2 Head {h00=0x004c, h01=0x0050, text=» MUL WW1,=W'256' SHIFT 2 POS. FOR LAST ROW «, t00=0x0010, t01=0x016a}
0x1ab2…1b02 Head {h00=0x004c, h01=0x0050, text=» ADD WW1,=W'1' COLUMN 1 «, t00=0x0011, t01=0x002a}
0x1b02…1b52 Head {h00=0x004c, h01=0x0050, text=» DSC1 SPDSSCRN,6,WW1 SET CURSOR «, t00=0x0011, t01=0x007a}
0x1b52…1b5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00ca}
0x1b5c…1b90 Head {h00=0x0030, h01=0x0050, text=»* READ ERROR OR MESSAGE FROM THE FORMATFILE «, t00=0x0011, t01=0x00d4}
0x1b90…1b9a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0108}
0x1b9a…1bcc Head {h00=0x002e, h01=0x0050, text=» PERF ZMRDF,XWERRNR,KW1 READ INTO FCBUFFER«, t00=0x0011, t01=0x0112}
0x1bcc…1bec Head {h00=0x001c, h01=0x0050, text=» EDWRT SPDSSCRN,FCBUFFER«, t00=0x0011, t01=0x0144}
0x1bec…1c3c Head {h00=0x004c, h01=0x0050, text=» CBE XWANSWER,KW0,XF999 NO ANSWER EXPECTED «, t00=0x0011, t01=0x0164}
0x1c3c…1c8c Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0012, t01=0x0024}
0x1c8c…1cdc Head {h00=0x004c, h01=0x0050, text=»* ANSWER EXPECTED *«, t00=0x0012, t01=0x0074}
0x1cdc…1d2c Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0012, t01=0x00c4}
0x1d2c…1d7c Head {h00=0x004c, h01=0x0050, text=»XF050 «, t00=0x0012, t01=0x0114}
0x1d7c…1dcc Head {h00=0x004c, h01=0x0050, text=» PERF XAKBIN,=W'0' WAIT FOR ANSWER «, t00=0x0012, t01=0x0164}
0x1dcc…1df2 Head {h00=0x0022, h01=0x0050, text=» IB XWANSWER,XF100,XF200,XF300«, t00=0x0013, t01=0x0024}
0x1df2…1e42 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0013, t01=0x004a}
0x1e42…1e92 Head {h00=0x004c, h01=0x0050, text=»* CANCEL EXPECTED *«, t00=0x0013, t01=0x009a}
0x1e92…1ee2 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0013, t01=0x00ea}
0x1ee2…1ef0 Head {h00=0x000a, h01=0x0050, text=»XF100 «, t00=0x0013, t01=0x013a}
0x1ef0…1f40 Head {h00=0x004c, h01=0x0050, text=» CBE SPBINW2,KWCANCEL,XF990 «, t00=0x0013, t01=0x0148}
0x1f40…1f90 Head {h00=0x004c, h01=0x0050, text=» B XF050 «, t00=0x0014, t01=0x0008}
0x1f90…1fe0 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0014, t01=0x0058}
0x1fe0…2002 Head {h00=0x001e, h01=0x0050, text=»* CANCEL OR CLEAR EXPECTED«, t00=0x0014, t01=0x00a8}
0x2002…2052 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0014, t01=0x00ca}
0x2052…20a2 Head {h00=0x004c, h01=0x0050, text=»XF200 «, t00=0x0014, t01=0x011a}
0x20a2…20f2 Head {h00=0x004c, h01=0x0050, text=» CBE SPBINW2,KWCANCEL,XF990 «, t00=0x0014, t01=0x016a}
0x20f2…2144 Head {h00=0x004e, h01=0x0050, text=» CBE SPBINW2,KWCLEAR,XF995 «, t00=0x0015, t01=0x002a}
0x2144…2194 Head {h00=0x004c, h01=0x0050, text=» B XF050 «, t00=0x0015, t01=0x007c}
0x2194…219e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00cc}
0x219e…21c0 Head {h00=0x001e, h01=0x0050, text=»* CANCEL OR CONT EXPECTED «, t00=0x0015, t01=0x00d6}
0x21c0…21ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f8}
0x21ca…21d8 Head {h00=0x000a, h01=0x0050, text=»XF300 «, t00=0x0015, t01=0x0102}
0x21d8…21fc Head {h00=0x0020, h01=0x0050, text=» CBE SPBINW2,KWCANCEL,XF990 «, t00=0x0015, t01=0x0110}
0x21fc…221e Head {h00=0x001e, h01=0x0050, text=» CBE SPBINW2,KWCONT,XF995 «, t00=0x0015, t01=0x0134}
0x221e…222e Head {h00=0x000c, h01=0x0050, text=» B XF050«, t00=0x0015, t01=0x0156}
0x222e…227e Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0015, t01=0x0166}
0x227e…22ce Head {h00=0x004c, h01=0x0050, text=»* CANCEL PRESSED *«, t00=0x0016, t01=0x0026}
0x22ce…231e Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0016, t01=0x0076}
0x231e…236e Head {h00=0x004c, h01=0x0050, text=»XF990 «, t00=0x0016, t01=0x00c6}
0x236e…23be Head {h00=0x004c, h01=0x0050, text=» SET SBCANCEL «, t00=0x0016, t01=0x0116}
0x23be…23cc Head {h00=0x000a, h01=0x0050, text=»XF995 «, t00=0x0016, t01=0x0166}
0x23cc…23e6 Head {h00=0x0016, h01=0x0050, text=» MOVE WW1,SPLSTLNE«, t00=0x0016, t01=0x0174}
0x23e6…240e Head {h00=0x0024, h01=0x0050, text=» ERASE 0,WW1,WW1 ERASE LAST LINE«, t00=0x0016, t01=0x018e}
0x240e…243a Head {h00=0x0028, h01=0x0050, text=» PERF XCLAMP,KW3,KW0 ERROR LAMP OFF «, t00=0x0017, t01=0x0026}
0x243a…2468 Head {h00=0x002a, h01=0x0050, text=» PERF XCLAMP,KW2,KW0 MESSAGE LAMP OFF «, t00=0x0017, t01=0x0052}
0x2468…24b8 Head {h00=0x004c, h01=0x0050, text=»XF999 «, t00=0x0017, t01=0x0080}
0x24b8…2508 Head {h00=0x004c, h01=0x0050, text=» RET «, t00=0x0017, t01=0x00d0}
0x2508…2558 Head {h00=0x004c, h01=0x0050, text=» PEND «, t00=0x0017, t01=0x0120}
0x2558…25a8 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0017, t01=0x0170}
0x25a8…25f8 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0018, t01=0x0030}
0x25f8…260c Head {h00=0x0010, h01=0x0050, text=»* SOUND BELL«, t00=0x0018, t01=0x0080}
0x260c…265c Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0018, t01=0x0094}
0x265c…26ac Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0018, t01=0x00e4}
0x26ac…26fc Head {h00=0x004c, h01=0x0050, text=»FMTBELL FRMT «, t00=0x0018, t01=0x0134}
0x26fc…274c Head {h00=0x004c, h01=0x0050, text=» FSL «, t00=0x0018, t01=0x0184}
0x274c…279c Head {h00=0x004c, h01=0x0050, text=» FILLR X'07',1 BELL «, t00=0x0019, t01=0x0044}
0x279c…27ec Head {h00=0x004c, h01=0x0050, text=» FMEND «, t00=0x0019, t01=0x0094}
0x27ec…283c Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x0019, t01=0x00e4}
0x283c…288c Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x0019, t01=0x0134}
0x288c…28dc Head {h00=0x004c, h01=0x0050, text=»* PROCEDURE: XHERAS *«, t00=0x0019, t01=0x0184}
0x28dc…292c Head {h00=0x004c, h01=0x0050, text=»* FUNCTIONAL DESCRIPTION: *«, t00=0x001a, t01=0x0044}
0x292c…297c Head {h00=0x004c, h01=0x0050, text=»* ERASE THE SCREEN. *«, t00=0x001a, t01=0x0094}
0x297c…29cc Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x001a, t01=0x00e4}
0x29cc…2a1c Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x001a, t01=0x0134}
0x2a1c…2a32 Head {h00=0x0012, h01=0x0050, text=»XHERAS PROC «, t00=0x001a, t01=0x0184}
0x2a32…2a40 Head {h00=0x000a, h01=0x0050, text=»XH000 «, t00=0x001b, t01=0x000a}
0x2a40…2a6a Head {h00=0x0026, h01=0x0050, text=» EDWRT SPDSSCRN,FMTERASE«, t00=0x001b, t01=0x0018}
0x2a6a…2a78 Head {h00=0x000a, h01=0x0050, text=»XH999 «, t00=0x001b, t01=0x0042}
0x2a78…2a8c Head {h00=0x0010, h01=0x0050, text=» RET«, t00=0x001b, t01=0x0050}
0x2a8c…2aa2 Head {h00=0x0012, h01=0x0050, text=» PEND «, t00=0x001b, t01=0x0064}
0x2aa2…2af2 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x001b, t01=0x007a}
0x2af2…2b42 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x001b, t01=0x00ca}
0x2b42…2b58 Head {h00=0x0012, h01=0x0050, text=»* ERASE SCREEN«, t00=0x001b, t01=0x011a}
0x2b58…2ba8 Head {h00=0x004c, h01=0x0050, text=»* *«, t00=0x001b, t01=0x0130}
0x2ba8…2bf8 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x001b, t01=0x0180}
0x2bf8…2c48 Head {h00=0x004c, h01=0x0050, text=»FMTERASE FRMT «, t00=0x001c, t01=0x0040}
0x2c48…2c98 Head {h00=0x004c, h01=0x0050, text=» FCOPY =X'2031' ERASE SCREEN «, t00=0x001c, t01=0x0090}
0x2c98…2ce8 Head {h00=0x004c, h01=0x0050, text=» FMEND «, t00=0x001c, t01=0x00e0}
0x2ce8…2d38 Head {h00=0x004c, h01=0x0050, text=»************************************************************************«, t00=0x001c, t01=0x0130}
0x2d38…2d44 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x001c, t01=0x0180}
0x2d44…2d48 (29, 1, 8) Head {h00=0x2004, h01=0x0000}
0x2d48…2d4c 00 1d 00 04 ┆ ┆
0x2d4c…2d9c (30, 0, 400) 00 4c 00 50 5c 43 42 4c 5c 57 44 45 43 31 2c 3d 44 27 31 27 2c 53 31 36 35 30 30 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1e 00 04 ┆ L P CBL WDEC1,=D'1',S16500 ┆
0x2d9c…2dec 00 4c 00 50 5c 43 42 47 5c 57 44 45 43 31 2c 3d 44 27 32 34 27 2c 53 31 36 35 30 30 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1e 00 54 ┆ L P CBG WDEC1,=D'24',S16500 T┆
0x2dec…2e3c 00 4c 00 50 5c 42 5c 53 31 36 39 30 30 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1e 00 a4 ┆ L P B S16900 ┆
0x2e3c…2e8c 00 4c 00 50 53 31 36 35 30 30 5c 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1e 00 f4 ┆ L PS16500 ┆
0x2e8c…2edc 00 4c 00 50 5c 4d 4f 56 45 5c 58 57 52 45 54 2c 3d 57 27 31 27 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1e 01 44 ┆ L P MOVE XWRET,=W'1' D┆
0x2edc…2f2c (31, 0, 400) 00 4c 00 50 5c 4d 4f 56 45 5c 53 50 42 49 4e 57 34 2c 3d 57 27 31 27 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1f 00 04 ┆ L P MOVE SPBINW4,=W'1' ┆
0x2f2c…2f7c 00 4c 00 50 53 31 36 39 30 30 5c 20 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1f 00 54 ┆ L PS16900 T┆
0x2f7c…2fcc 00 4c 00 50 5c 52 45 54 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1f 00 a4 ┆ L P RET ┆
0x2fcc…301c 00 4c 00 50 5c 50 45 4e 44 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 1f 00 f4 ┆ L P PEND ┆
0x301c…306c 00 4c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 1f 01 44 ┆ L P************************************************************************ D┆
0x306c…30bc (32, 0, 400) 00 4c 00 50 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 20 00 04 ┆ L P* * ┆
0x30bc…310c 00 4c 00 50 2a 20 20 20 43 48 45 43 4b 20 50 4f 49 4e 54 45 52 20 54 4f 20 54 52 41 4e 53 41 43 54 49 4f 4e 2d 52 45 43 4f 52 44 20 28 20 42 45 54 57 45 45 4e 20 31 20 41 4e 44 20 38 20 29 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 20 00 54 ┆ L P* CHECK POINTER TO TRANSACTION-RECORD ( BETWEEN 1 AND 8 ) * T┆
0x310c…315c 00 4c 00 50 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 20 00 a4 ┆ L P* * ┆
0x315c…31ac 00 4c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 20 00 f4 ┆ L P************************************************************************ ┆
0x31ac…31fc 00 4c 00 50 53 50 41 50 31 37 5c 50 52 4f 43 5c 58 57 52 45 54 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 20 01 44 ┆ L PSPAP17 PROC XWRET D┆
0x31fc…324c (33, 0, 400) 00 4c 00 50 53 31 37 30 30 30 5c 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 21 00 04 ┆ L PS17000 ! ┆
0x324c…329c 00 4c 00 50 5c 4d 4f 56 45 5c 57 44 45 43 31 2c 53 50 49 4e 50 55 54 5c 43 4f 4e 56 45 52 54 20 54 4f 20 44 45 43 49 4d 41 4c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 21 00 54 ┆ L P MOVE WDEC1,SPINPUT CONVERT TO DECIMAL ! T┆
0x329c…32ec 00 4c 00 50 5c 43 42 4c 5c 57 44 45 43 31 2c 3d 44 27 31 27 2c 53 31 37 35 30 30 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 21 00 a4 ┆ L P CBL WDEC1,=D'1',S17500 ! ┆
0x32ec…333c 00 4c 00 50 5c 43 42 47 5c 57 44 45 43 31 2c 3d 44 27 38 27 2c 53 31 37 35 30 30 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 21 00 f4 ┆ L P CBG WDEC1,=D'8',S17500 ! ┆
0x333c…338c 00 4c 00 50 5c 42 5c 53 31 37 39 30 30 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 21 01 44 ┆ L P B S17900 ! D┆
0x338c…33dc (34, 0, 400) 00 4c 00 50 53 31 37 35 30 30 5c 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 22 00 04 ┆ L PS17500 " ┆
0x33dc…342c 00 4c 00 50 5c 4d 4f 56 45 5c 58 57 52 45 54 2c 3d 57 27 31 27 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 22 00 54 ┆ L P MOVE XWRET,=W'1' " T┆
0x342c…347c 00 4c 00 50 5c 4d 4f 56 45 5c 53 50 42 49 4e 57 34 2c 3d 57 27 31 27 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 22 00 a4 ┆ L P MOVE SPBINW4,=W'1' " ┆
0x347c…34cc 00 4c 00 50 53 31 37 39 30 30 5c 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 22 00 f4 ┆ L PS17900 " ┆
0x34cc…351c 00 4c 00 50 5c 52 45 54 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 22 01 44 ┆ L P RET " D┆
0x351c…356c (35, 0, 400) 00 4c 00 50 5c 50 45 4e 44 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 23 00 04 ┆ L P PEND # ┆
0x356c…35bc 00 4c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 23 00 54 ┆ L P************************************************************************ # T┆
0x35bc…360c 00 4c 00 50 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 23 00 a4 ┆ L P* * # ┆
0x360c…365c 00 4c 00 50 2a 20 20 20 49 4e 50 55 54 2d 46 49 45 4c 44 20 4d 55 53 54 20 4e 4f 54 20 42 45 20 53 50 41 43 45 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 23 00 f4 ┆ L P* INPUT-FIELD MUST NOT BE SPACES * # ┆
0x365c…36ac 00 4c 00 50 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2a 00 23 01 44 ┆ L P* * # D┆
0x36ac…36fc (36, 0, 400) 00 4c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 24 00 04 ┆ L P************************************************************************ $ ┆
0x36fc…374c 00 4c 00 50 53 50 41 50 31 38 5c 50 52 4f 43 5c 58 57 52 45 54 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 24 00 54 ┆ L PSPAP18 PROC XWRET $ T┆
0x374c…379c 00 4c 00 50 53 31 38 30 30 30 5c 5c 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 24 00 a4 ┆ L PS18000 $ ┆
0x379c…37ec 00 4c 00 50 5c 4d 4f 56 45 5c 57 43 53 54 52 47 32 35 2c 3d 43 27 20 27 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 24 00 f4 ┆ L P MOVE WCSTRG25,=C' ' $ ┆
0x37ec…383c 00 4c 00 50 5c 43 4f 50 59 5c 57 43 53 54 52 47 32 35 2c 4b 57 30 2c 53 50 42 49 4e 57 31 2c 53 50 49 4e 50 55 54 2c 4b 57 30 5c 5c 5c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 24 01 44 ┆ L P COPY WCSTRG25,KW0,SPBINW1,SPINPUT,KW0 $ D┆