|
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: 256 (0x100)
Notes: MEMBER_P, Member_Text
Names: »ITF «
└─⟦edfbb8ae1⟧ Bits:30009818 AS/ENTRY - S/36 SYST SUPP PROG IDENT. S/36 PTFDK3900 FC 1991/9074/9084 Refer to Memo 36714 Product Number 5727SS6 Rel 05 3 Created 19950301 Level 01 Seq 001 of 011
└─⟦8738fec01⟧
└─⟦this⟧ ».ITF «
// MEMBER USER1-#TF#MS 00090000 // IF JOBQ-YES ERR 0150,3 00110000 // IF EVOKED-YES ERR 0160,3 00120000 // IF ?1?= HELP ITF,?1? 00140000 // ELSE IF ENABLED-',?1?' ITF1 ?1? 00150000 // ELSE ERR 0170,23 @S1C 00160000 // RETURN @S1A 00210000
0x000…001 0x96 0x001…017 »// MEMBER USER1-#TF#MS« 0x017…018 0x32 0x018…019 0x88 0x019…021 »00090000« 0x021…022 0x99 0x022…03b »// IF JOBQ-YES ERR 0150,3« 0x03b…03c 0x2f 0x03c…03d 0x88 0x03d…045 »00110000« 0x045…046 0x9b 0x046…061 »// IF EVOKED-YES ERR 0160,3« 0x061…062 0x2d 0x062…063 0x88 0x063…06b »00120000« 0x06b…06c 0x97 0x06c…083 »// IF ?1?= HELP ITF,?1?« 0x083…084 0x31 0x084…085 0x88 0x085…08d »00140000« 0x08d…08e 0x82 0x08e…090 »//« 0x090…091 0x03 0x091…092 0x9f 0x092…0b1 »ELSE IF ENABLED-',?1?' ITF1 ?1?« 0x0b1…0b2 0x24 0x0b2…0b3 0x88 0x0b3…0bb »00150000« 0x0bb…0bc 0x82 0x0bc…0be »//« 0x0be…0bf 0x0a 0x0bf…0c0 0x90 0x0c0…0d0 »ELSE ERR 0170,23« 0x0d0…0d1 0x27 0x0d1…0d2 0x8d 0x0d2…0df »@S1C 00160000« 0x0df…0e0 0x89 0x0e0…0e9 »// RETURN« 0x0e9…0ea 0x3a 0x0ea…0eb 0x8d 0x0eb…0f8 »@S1A 00210000« 0x0f8…0f9 0x00 0x0f9…100 00 00 00 00 00 00 d9 ┆␣␣␣␣␣␣R┆