DataMuseum.dk

Presents historical artifacts from the history of:

IBM System/36

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about IBM System/36

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦ff3b84fa6⟧ 

    Length: 768 (0x300)
    Notes: MEMBER_P, Member_Text
    Names: »PSPT    «

Derivation

└─⟦27db88c4d⟧ Bits:30009807 AS/ENTRY - S/36 SYST SUPP PROG SYST SUPP PGM 5363 DA Z250-0323-0 Refer to Memo 033109 Product Number 5727SS6 Rel 05 Created 19950301 Level 01 Seq 011 of 011
    └─⟦5f03407d3⟧ 
        └─⟦this⟧ ».PSPT    «

Text Member

* PRINT PD SEQUENCE TRACE.                                                                                              
// * ' '                                                                                                                
// * 'KEY IN THE WS-ID OF THE DISPLAY WHICH RAN THE ON-LINE PROBLEM DETERMINATION'                                      
// * ' (IE.:W1) '                                                                                                       
// LOCAL OFFSET-215,DATA-'?R?'                   * WHICH WS RAN PD FOR FILENAME                                         
// IF DATAF1-TRACEFIL DELETE TRACEFIL,F1,REMOVE                                                                         
// LOAD PSPTRC                                   * LOAD PRINT PROGRAM                                                   
// FILE NAME-TRACEFIL,LABEL-TRACEF?L'215,2'?,DISP-SHR  * TRACE FILE NAME                                                
// RUN                                                                                                                  
// * ' '                                                                                                                
// * 'DO YOU WANT A PRINTOUT OF THE SCREENS'                                                                            
// * 'IF YES    ----> KEY IN  YES'                                                                                      
// IFF ?R?/YES GOTO END                                                                                                 
// PSPTRPRI                                                                                                             
// TAG END

OctetView - MemberText

0x000…001 0x9a
0x001…01b »* PRINT PD SEQUENCE TRACE.«
0x01b…01c 0x5e
0x01c…01d 0x88
0x01d…025 »// * ' '«
0x025…026 0x70
0x026…027 0xd2
0x027…079 »// * 'KEY IN THE WS-ID OF THE DISPLAY WHICH RAN THE ON-LINE PROBLEM DETERMINATION'«
0x079…07a 0x26
0x07a…07b 0x91
0x07b…08c »// * ' (IE.:W1) '«
0x08c…08d 0x67
0x08d…08e 0x9e
0x08e…0ac »// LOCAL OFFSET-215,DATA-'?R?'«
0x0ac…0ad 0x13
0x0ad…0ae 0x9e
0x0ae…0cc »* WHICH WS RAN PD FOR FILENAME«
0x0cc…0cd 0x29
0x0cd…0ce 0xaf
0x0ce…0fd »// IF DATAF1-TRACEFIL DELETE TRACEFIL,F1,REMOVE«
0x0fd…0fe 0x49
0x0fe…0ff 0x8e
0x0ff…10d »// LOAD PSPTRC«
0x10d…10e 0x23
0x10e…10f 0x94
0x10f…123 »* LOAD PRINT PROGRAM«
0x123…124 0x33
0x124…125 0xb5
0x125…15a »// FILE NAME-TRACEFIL,LABEL-TRACEF?L'215,2'?,DISP-SHR«
0x15a…15b 0x02
0x15b…15c 0x91
0x15c…16d »* TRACE FILE NAME«
0x16d…16e 0x30
0x16e…16f 0x86
0x16f…175 »// RUN«
0x175…176 0x72
0x176…177 0x88
0x177…17f »// * ' '«
0x17f…180 0x70
0x180…181 0xac
0x181…1ad »// * 'DO YOU WANT A PRINTOUT OF THE SCREENS'«
0x1ad…1ae 0x4c
0x1ae…1af 0x8c
0x1af…1bb »// * 'IF YES«
0x1bb…1bc 0x04
0x1bc…1bd 0x8c
0x1bd…1c9 »----> KEY IN«
0x1c9…1ca 0x02
0x1ca…1cb 0x84
0x1cb…1cf »YES'«
0x1cf…1d0 0x56
0x1d0…1d1 0x97
0x1d1…1e8 »// IFF ?R?/YES GOTO END«
0x1e8…1e9 0x61
0x1e9…1ea 0x8b
0x1ea…1f5 »// PSPTRPRI«
0x1f5…1f6 0x6d
0x1f6…1f7 0x8a
0x1f7…201 »// TAG END«
0x201…202 0x6e
0x202…203 0x00
0x203…220 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00            ┆␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣┆
0x220…240 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣┆
          […0x6…]

Reduced view