|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 9216 (0x2400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c0fe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 1080 | | .CONST 0x1080 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 8009 | | .CONST 0x8009 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 010f | | .CONST 0x010f ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 003f | ? | .CONST 0x003f ; Number of locals
000b INIT_0008:
000b 029a 011b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0118
000d 029a 016b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0168
000f 029a 01e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01e0
0011 029a 0243 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0240
0013 029a 024b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0248
0015 4806 |H | Short_Literal 0x6
0016 e001 | | Load 0x0,0x1
0017 01d7 | | Execute Vector,Field_Read
0018 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
0019 029a 0253 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0250
001b 029a 031b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0318
001d 029a 0393 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0390
001f 029a 0413 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0410
0021 029a 0463 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0460
0023 029a 04bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_04b8
0025 029a 04e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_04e0
0027 029a 0553 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0550
0029 029a 055b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0558
002b 029a 0563 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0560
002d 029a 056b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0568
002f 029a 0573 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0570
0031 00bf | | Action Accept_Activation
0032 4800 |H | Short_Literal 0x0
0033 4840 |H@ | Short_Literal 0x40
0034 00e2 | | Load_Encached Integer_Cache
0035 03f8 | | Declare_Type Discrete,Constrained
0036 0092 0a05 | | Action Push_String_Extended,0xa05 ; "Login"
0038 0092 0a06 | | Action Push_String_Extended,0xa06 ; "Full Session"
003a 0092 0a07 | | Action Push_String_Extended,0xa07 ; "Fundamental Session"
003c 00ea | | Load_Encached Null_String_Cache
003d 4800 |H | Short_Literal 0x0
003e 4802 |H | Short_Literal 0x2
003f e001 | | Load 0x0,0x1
0040 01d7 | | Execute Vector,Field_Read
0041 02a0 | | Declare_Subprogram Null_Subprogram
0042 038e | | Declare_Type Package,Defined
0043 e001 | | Load 0x0,0x1
0044 4801 |H | Short_Literal 0x1
0045 e001 | | Load 0x0,0x1
0046 01d7 | | Execute Vector,Field_Read
0047 4802 |H | Short_Literal 0x2
0048 e224 | $ | Load 0x1,0x24
0049 020e | | Execute Module,Augment_Imports
004a 0387 | | Declare_Variable Package
004b 4800 |H | Short_Literal 0x0
004c 4804 |H | Short_Literal 0x4
004d e001 | | Load 0x0,0x1
004e 01d7 | | Execute Vector,Field_Read
004f 02a0 | | Declare_Subprogram Null_Subprogram
0050 038e | | Declare_Type Package,Defined
0051 e001 | | Load 0x0,0x1
0052 4803 |H | Short_Literal 0x3
0053 e001 | | Load 0x0,0x1
0054 01d7 | | Execute Vector,Field_Read
0055 4802 |H | Short_Literal 0x2
0056 e225 | % | Load 0x1,0x25
0057 020e | | Execute Module,Augment_Imports
0058 0387 | | Declare_Variable Package
0059 4800 |H | Short_Literal 0x0
005a 4808 |H | Short_Literal 0x8
005b e001 | | Load 0x0,0x1
005c 01d7 | | Execute Vector,Field_Read
005d 02a0 | | Declare_Subprogram Null_Subprogram
005e 038e | | Declare_Type Package,Defined
005f e001 | | Load 0x0,0x1
0060 4807 |H | Short_Literal 0x7
0061 e001 | | Load 0x0,0x1
0062 01d7 | | Execute Vector,Field_Read
0063 4802 |H | Short_Literal 0x2
0064 e226 | & | Load 0x1,0x26
0065 020e | | Execute Module,Augment_Imports
0066 0387 | | Declare_Variable Package
0067 0093 0000 | | PushFullAddress InMicrocode
0069 60fa |` | Indirect_Literal Discrete,0x164,{0x80000000, 0x00010000}
006a 0273 | s | Execute Discrete,Plus
006b 0007 | | Action Break_Optional
006c 00ea | | Load_Encached Null_String_Cache
006d 4800 |H | Short_Literal 0x0
006e 4800 |H | Short_Literal 0x0
006f 4800 |H | Short_Literal 0x0
0070 e002 | | Load 0x0,0x2
0071 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0072 e002 | | Load 0x0,0x2
0073 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0074 029b 057b | {| Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0578
0076 029b 059b | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0598
0078 029b 05c3 | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_05c0
007a 029b 05db | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_05d8
007c 029b 05eb | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_05e8
007e 029b 05fb | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_05f8
0080 029b 060b | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0608
0082 029b 061b | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0618
0084 029b 0663 | c| Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0660
0086 029b 06a3 | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_06a0
0088 029b 06db | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_06d8
008a 029b 0713 | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0710
008c 029b 074b | K| Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0748
008e 029b 077b | {| Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0778
0090 029b 07db | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_07d8
0092 029b 07f3 | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_07f0
0094 029b 0873 | s| Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0870
0096 029b 0883 | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0880
0098 029b 0893 | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0890
009a 029d 08a3 | | Declare_Subprogram For_Outer_Call,INIT_08a0
009c 029d 096b | k| Declare_Subprogram For_Outer_Call,INIT_0968
009e 029d 0983 | | Declare_Subprogram For_Outer_Call,INIT_0980
00a0 1d0d | | Execute_Immediate Reference_Lex_1,0xd
00a1 00c7 | | Action Elaborate_Subprogram
00a2 1d0e | | Execute_Immediate Reference_Lex_1,0xe
00a3 00c7 | | Action Elaborate_Subprogram
00a4 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00a5 00c7 | | Action Elaborate_Subprogram
00a6 1d15 | | Execute_Immediate Reference_Lex_1,0x15
00a7 00c7 | | Action Elaborate_Subprogram
00a8 1d13 | | Execute_Immediate Reference_Lex_1,0x13
00a9 00c7 | | Action Elaborate_Subprogram
00aa 1d14 | | Execute_Immediate Reference_Lex_1,0x14
00ab 00c7 | | Action Elaborate_Subprogram
00ac 1d10 | | Execute_Immediate Reference_Lex_1,0x10
00ad 00c7 | | Action Elaborate_Subprogram
00ae 1d0f | | Execute_Immediate Reference_Lex_1,0xf
00af 00c7 | | Action Elaborate_Subprogram
00b0 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00b1 00c7 | | Action Elaborate_Subprogram
00b2 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00b3 00c7 | | Action Elaborate_Subprogram
00b4 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00b5 00c7 | | Action Elaborate_Subprogram
00b6 1d12 | | Execute_Immediate Reference_Lex_1,0x12
00b7 00c7 | | Action Elaborate_Subprogram
00b8 1d11 | | Execute_Immediate Reference_Lex_1,0x11
00b9 00c7 | | Action Elaborate_Subprogram
00ba 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00bb 00c7 | | Action Elaborate_Subprogram
00bc 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00bd 00c7 | | Action Elaborate_Subprogram
00be 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00bf 00c7 | | Action Elaborate_Subprogram
00c0 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00c1 00c7 | | Action Elaborate_Subprogram
00c2 e003 | | Load 0x0,0x3
00c3 e004 | | Load 0x0,0x4
00c4 e227 | ' | Load 0x1,0x27
00c5 e005 | | Load 0x0,0x5
00c6 e006 | | Load 0x0,0x6
00c7 e007 | | Load 0x0,0x7
00c8 e008 | | Load 0x0,0x8
00c9 e009 | | Load 0x0,0x9
00ca e00a | | Load 0x0,0xa
00cb 4809 |H | Short_Literal 0x9
00cc e224 | $ | Load 0x1,0x24
00cd 020e | | Execute Module,Augment_Imports
00ce e224 | $ | Load 0x1,0x24
00cf 020f | | Execute Module,Activate
00d0 e00b | | Load 0x0,0xb
00d1 e00c | | Load 0x0,0xc
00d2 e00d | | Load 0x0,0xd
00d3 e00e | | Load 0x0,0xe
00d4 e00f | | Load 0x0,0xf
00d5 e010 | | Load 0x0,0x10
00d6 e002 | | Load 0x0,0x2
00d7 e008 | | Load 0x0,0x8
00d8 e011 | | Load 0x0,0x11
00d9 e012 | | Load 0x0,0x12
00da 1d11 | | Execute_Immediate Reference_Lex_1,0x11
00db e013 | | Load 0x0,0x13
00dc 480c |H | Short_Literal 0xc
00dd e226 | & | Load 0x1,0x26
00de 020e | | Execute Module,Augment_Imports
00df e226 | & | Load 0x1,0x26
00e0 020f | | Execute Module,Activate
00e1 e014 | | Load 0x0,0x14
00e2 4801 |H | Short_Literal 0x1
00e3 e225 | % | Load 0x1,0x25
00e4 020e | | Execute Module,Augment_Imports
00e5 e225 | % | Load 0x1,0x25
00e6 020f | | Execute Module,Activate
00e7 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
00e8 00c7 | | Action Elaborate_Subprogram
00e9 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
00ea 00c7 | | Action Elaborate_Subprogram
00eb 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
00ec 00c7 | | Action Elaborate_Subprogram
00ed 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
00ee 00c7 | | Action Elaborate_Subprogram
00ef 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33
00f0 00c7 | | Action Elaborate_Subprogram
00f1 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37
00f2 00c7 | | Action Elaborate_Subprogram
00f3 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
00f4 00c7 | | Action Elaborate_Subprogram
00f5 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36
00f6 00c7 | | Action Elaborate_Subprogram
00f7 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
00f8 00c7 | | Action Elaborate_Subprogram
00f9 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
00fa 00c7 | | Action Elaborate_Subprogram
00fb 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39
00fc 00c7 | | Action Elaborate_Subprogram
00fd 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
00fe 00c7 | | Action Elaborate_Subprogram
00ff 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
0100 00c7 | | Action Elaborate_Subprogram
0101 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
0102 00c7 | | Action Elaborate_Subprogram
0103 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c
0104 00c7 | | Action Elaborate_Subprogram
0105 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b
0106 00c7 | | Action Elaborate_Subprogram
0107 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
0108 00c7 | | Action Elaborate_Subprogram
0109 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
010a 00c7 | | Action Elaborate_Subprogram
010b 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
010c 00c7 | | Action Elaborate_Subprogram
010d 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
010e 00c7 | | Action Elaborate_Subprogram
010f BODY_0008:
010f 00bc | | Action Signal_Activated
0110 00bb | | Action Signal_Completion
0111 0000 0000 | | .BLANK 0000[0x7]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 0125 | % | .CONST 0x0125 ; Address of begin
0119 0146 | F | .CONST 0x0146 ; Address of exception handler
011a 0005 | | .CONST 0x0005 ; Number of locals
011b INIT_0118:
011b 0092 0a08 | | Action Push_String_Extended,0xa08 ; "Accept_Tokens"
011d e004 | | Load 0x0,0x4
011e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011f 02c7 | | Declare_Variable Any
0120 e004 | | Load 0x0,0x4
0121 180e | | Execute Package,Field_Execute,Field_Number 0xe
0122 a403 | | Store_Unchecked 0x2,0x3
0123 00e3 | | Load_Encached Natural_Cache
0124 00e3 | | Load_Encached Natural_Cache
0125 BODY_0118:
0125 e403 | | Load 0x2,0x3
0126 e5fa | | Load 0x2,-0x6
0127 e5fb | | Load 0x2,-0x5
0128 e5fc | | Load 0x2,-0x4
0129 e5fd | | Load 0x2,-0x3
012a e224 | $ | Load 0x1,0x24
012b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
012c e5fe | | Load 0x2,-0x2
012d e224 | $ | Load 0x1,0x24
012e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
012f e5ff | | Load 0x2,-0x1
0130 e402 | | Load 0x2,0x2
0131 e224 | $ | Load 0x1,0x24
0132 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0133 c403 | | Store 0x2,0x3
0134 e403 | | Load 0x2,0x3
0135 e224 | $ | Load 0x1,0x24
0136 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0137 e5fa | | Load 0x2,-0x6
0138 e5fb | | Load 0x2,-0x5
0139 e5fc | | Load 0x2,-0x4
013a e5fd | | Load 0x2,-0x3
013b e5fe | | Load 0x2,-0x2
013c e5ff | | Load 0x2,-0x1
013d 823f | ? | Call 0x1,0x3f
013e e5ff | | Load 0x2,-0x1
013f 823d | = | Call 0x1,0x3d
0140 e403 | | Load 0x2,0x3
0141 00ea | | Load_Encached Null_String_Cache
0142 e402 | | Load 0x2,0x2
0143 e224 | $ | Load 0x1,0x24
0144 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0145 4507 |E | Exit_Subprogram 0x7
0146 TRAP_0118:
0146 e004 | | Load 0x0,0x4
0147 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0148 010f | | Execute Exception,Equal
0149 6806 |h | Jump_Zero 0x150
014a e403 | | Load 0x2,0x3
014b e402 | | Load 0x2,0x2
014c e224 | $ | Load 0x1,0x24
014d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
014e 00d8 | | Load_Top At_Offset_0
014f 0101 | | Execute Exception,Reraise
0150 e227 | ' | Load 0x1,0x27
0151 010f | | Execute Exception,Equal
0152 6805 |h | Jump_Zero 0x158
0153 e403 | | Load 0x2,0x3
0154 e402 | | Load 0x2,0x2
0155 e224 | $ | Load 0x1,0x24
0156 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0157 4507 |E | Exit_Subprogram 0x7
0158 e403 | | Load 0x2,0x3
0159 4800 |H | Short_Literal 0x0
015a 4801 |H | Short_Literal 0x1
015b e015 | | Load 0x0,0x15
015c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
015d e402 | | Load 0x2,0x2
015e e224 | $ | Load 0x1,0x24
015f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0160 4507 |E | Exit_Subprogram 0x7
0161 0000 0000 | | .XXX[0x3]
0163 0000 | |
0164 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 0173 | s | .CONST 0x0173 ; Address of begin
0169 01c5 | | .CONST 0x01c5 ; Address of exception handler
016a 0003 | | .CONST 0x0003 ; Number of locals
016b INIT_0168:
016b 0092 0a09 | | Action Push_String_Extended,0xa09 ; "Donate_Tokens"
016d e004 | | Load 0x0,0x4
016e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
016f 02c7 | | Declare_Variable Any
0170 e004 | | Load 0x0,0x4
0171 180e | | Execute Package,Field_Execute,Field_Number 0xe
0172 a403 | | Store_Unchecked 0x2,0x3
0173 BODY_0168:
0173 00d8 | | Load_Top At_Offset_0
0174 e5fa | | Load 0x2,-0x6
0175 e5fb | | Load 0x2,-0x5
0176 e5fc | | Load 0x2,-0x4
0177 e224 | $ | Load 0x1,0x24
0178 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0179 e5fd | | Load 0x2,-0x3
017a e224 | $ | Load 0x1,0x24
017b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
017c e5fe | | Load 0x2,-0x2
017d e224 | $ | Load 0x1,0x24
017e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
017f e5ff | | Load 0x2,-0x1
0180 e402 | | Load 0x2,0x2
0181 e224 | $ | Load 0x1,0x24
0182 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0183 c403 | | Store 0x2,0x3
0184 00d8 | | Load_Top At_Offset_0
0185 e224 | $ | Load 0x1,0x24
0186 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0187 00d8 | | Load_Top At_Offset_0
0188 e5fb | | Load 0x2,-0x5
0189 8235 | 5 | Call 0x1,0x35
018a 00d8 | | Load_Top At_Offset_0
018b e5ff | | Load 0x2,-0x1
018c 8234 | 4 | Call 0x1,0x34
018d e5fc | | Load 0x2,-0x4
018e 8211 | | Call 0x1,0x11
018f 027f | | Execute Discrete,Equal
0190 6805 |h | Jump_Zero 0x196
0191 00d8 | | Load_Top At_Offset_0
0192 0092 0a0a | | Action Push_String_Extended,0xa0a ; "Remote_Machine_ID specified is the Machine_ID for this machine."
0194 e224 | $ | Load 0x1,0x24
0195 180d | | Execute Package,Field_Execute,Field_Number 0xd
0196 e5fb | | Load 0x2,-0x5
0197 8210 | | Call 0x1,0x10
0198 01df | | Execute Vector,Equal
0199 7005 |p | Jump_Nonzero 0x19f
019a 00d8 | | Load_Top At_Offset_0
019b 0092 0a0b | | Action Push_String_Extended,0xa0b ; "The Remote_Site specified does not match the Site_Id of this machine. These need to be the same for tokens to be donated. If necessary, contact your Rational technical representative to change the Site_Id of one or both machines."
019d e224 | $ | Load 0x1,0x24
019e 180d | | Execute Package,Field_Execute,Field_Number 0xd
019f e226 | & | Load 0x1,0x26
01a0 180d | | Execute Package,Field_Execute,Field_Number 0xd
01a1 822f | / | Call 0x1,0x2f
01a2 6805 |h | Jump_Zero 0x1a8
01a3 00d8 | | Load_Top At_Offset_0
01a4 0092 0a0c | | Action Push_String_Extended,0xa0c ; "This machine has accepted tokens today; it may not also give them up"
01a6 e224 | $ | Load 0x1,0x24
01a7 180d | | Execute Package,Field_Execute,Field_Number 0xd
01a8 00d8 | | Load_Top At_Offset_0
01a9 e5fd | | Load 0x2,-0x3
01aa e5fe | | Load 0x2,-0x2
01ab e5ff | | Load 0x2,-0x1
01ac 8237 | 7 | Call 0x1,0x37
01ad 00d8 | | Load_Top At_Offset_0
01ae e5fe | | Load 0x2,-0x2
01af e5ff | | Load 0x2,-0x1
01b0 8239 | 9 | Call 0x1,0x39
01b1 e00d | | Load 0x0,0xd
01b2 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01b3 e226 | & | Load 0x1,0x26
01b4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01b5 e226 | & | Load 0x1,0x26
01b6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01b7 e229 | ) | Load 0x1,0x29
01b8 e223 | # | Load 0x1,0x23
01b9 e5fb | | Load 0x2,-0x5
01ba e5fc | | Load 0x2,-0x4
01bb e5fd | | Load 0x2,-0x3
01bc e5fe | | Load 0x2,-0x2
01bd e5ff | | Load 0x2,-0x1
01be 8231 | 1 | Call 0x1,0x31
01bf 00d8 | | Load_Top At_Offset_0
01c0 00ea | | Load_Encached Null_String_Cache
01c1 e402 | | Load 0x2,0x2
01c2 e224 | $ | Load 0x1,0x24
01c3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01c4 4507 |E | Exit_Subprogram 0x7
01c5 TRAP_0168:
01c5 e004 | | Load 0x0,0x4
01c6 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
01c7 010f | | Execute Exception,Equal
01c8 6806 |h | Jump_Zero 0x1cf
01c9 e403 | | Load 0x2,0x3
01ca e402 | | Load 0x2,0x2
01cb e224 | $ | Load 0x1,0x24
01cc 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01cd 00d8 | | Load_Top At_Offset_0
01ce 0101 | | Execute Exception,Reraise
01cf e227 | ' | Load 0x1,0x27
01d0 010f | | Execute Exception,Equal
01d1 6805 |h | Jump_Zero 0x1d7
01d2 e403 | | Load 0x2,0x3
01d3 e402 | | Load 0x2,0x2
01d4 e224 | $ | Load 0x1,0x24
01d5 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01d6 4507 |E | Exit_Subprogram 0x7
01d7 e403 | | Load 0x2,0x3
01d8 4800 |H | Short_Literal 0x0
01d9 4801 |H | Short_Literal 0x1
01da e015 | | Load 0x0,0x15
01db 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01dc e402 | | Load 0x2,0x2
01dd e224 | $ | Load 0x1,0x24
01de 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01df 4507 |E | Exit_Subprogram 0x7
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01eb | | .CONST 0x01eb ; Address of begin
01e1 0225 | % | .CONST 0x0225 ; Address of exception handler
01e2 0003 | | .CONST 0x0003 ; Number of locals
01e3 INIT_01e0:
01e3 0092 0a0d | | Action Push_String_Extended,0xa0d ; "Set_Site"
01e5 e004 | | Load 0x0,0x4
01e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01e7 02c7 | | Declare_Variable Any
01e8 e004 | | Load 0x0,0x4
01e9 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ea a403 | | Store_Unchecked 0x2,0x3
01eb BODY_01e0:
01eb 00d8 | | Load_Top At_Offset_0
01ec e5fc | | Load 0x2,-0x4
01ed e5fd | | Load 0x2,-0x3
01ee e5fe | | Load 0x2,-0x2
01ef e5ff | | Load 0x2,-0x1
01f0 e402 | | Load 0x2,0x2
01f1 e224 | $ | Load 0x1,0x24
01f2 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01f3 c403 | | Store 0x2,0x3
01f4 00d8 | | Load_Top At_Offset_0
01f5 e224 | $ | Load 0x1,0x24
01f6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01f7 e5fe | | Load 0x2,-0x2
01f8 e228 | ( | Load 0x1,0x28
01f9 e5fd | | Load 0x2,-0x3
01fa 8211 | | Call 0x1,0x11
01fb e5ff | | Load 0x2,-0x1
01fc 822a | * | Call 0x1,0x2a
01fd 01de | | Execute Vector,Not_Equal
01fe 6814 |h | Jump_Zero 0x213
01ff 00d8 | | Load_Top At_Offset_0
0200 0092 0a0e | | Action Push_String_Extended,0xa0e ; "Code ("
0202 e5fe | | Load 0x2,-0x2
0203 e224 | $ | Load 0x1,0x24
0204 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0205 01cc | | Execute Vector,Catenate
0206 0092 0a0f | | Action Push_String_Extended,0xa0f ; ") does not correspond to Site ("
0208 01cc | | Execute Vector,Catenate
0209 e5ff | | Load 0x2,-0x1
020a e224 | $ | Load 0x1,0x24
020b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
020c 01cc | | Execute Vector,Catenate
020d 0092 0a10 | | Action Push_String_Extended,0xa10 ; ")."
020f 01cc | | Execute Vector,Catenate
0210 e224 | $ | Load 0x1,0x24
0211 180d | | Execute Package,Field_Execute,Field_Number 0xd
0212 780a |x | Jump 0x21d
0213 e5ff | | Load 0x2,-0x1
0214 e226 | & | Load 0x1,0x26
0215 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0216 00d8 | | Load_Top At_Offset_0
0217 0092 0a11 | | Action Push_String_Extended,0xa11 ; "Site set to "
0219 e5ff | | Load 0x2,-0x1
021a 01cc | | Execute Vector,Catenate
021b e224 | $ | Load 0x1,0x24
021c 180f | | Execute Package,Field_Execute,Field_Number 0xf
021d e226 | & | Load 0x1,0x26
021e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
021f 00d8 | | Load_Top At_Offset_0
0220 00ea | | Load_Encached Null_String_Cache
0221 e402 | | Load 0x2,0x2
0222 e224 | $ | Load 0x1,0x24
0223 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0224 4505 |E | Exit_Subprogram 0x5
0225 TRAP_01e0:
0225 e004 | | Load 0x0,0x4
0226 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0227 010f | | Execute Exception,Equal
0228 6806 |h | Jump_Zero 0x22f
0229 e403 | | Load 0x2,0x3
022a e402 | | Load 0x2,0x2
022b e224 | $ | Load 0x1,0x24
022c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
022d 00d8 | | Load_Top At_Offset_0
022e 0101 | | Execute Exception,Reraise
022f e227 | ' | Load 0x1,0x27
0230 010f | | Execute Exception,Equal
0231 6805 |h | Jump_Zero 0x237
0232 e403 | | Load 0x2,0x3
0233 e402 | | Load 0x2,0x2
0234 e224 | $ | Load 0x1,0x24
0235 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0236 4505 |E | Exit_Subprogram 0x5
0237 e403 | | Load 0x2,0x3
0238 4800 |H | Short_Literal 0x0
0239 4801 |H | Short_Literal 0x1
023a e015 | | Load 0x0,0x15
023b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
023c e402 | | Load 0x2,0x2
023d e224 | $ | Load 0x1,0x24
023e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
023f 4505 |E | Exit_Subprogram 0x5
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 e226 | & | Load 0x1,0x26
0244 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0245 00ca | | Action Exit_Nullary_Function
0246 0000 0000 | | .XXX[0x2]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b e016 | | Load 0x0,0x16
024c 180e | | Execute Package,Field_Execute,Field_Number 0xe
024d 00ca | | Action Exit_Nullary_Function
024e 0000 0000 | | .XXX[0x2]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 025e | ^ | .CONST 0x025e ; Address of begin
0251 02f9 | | .CONST 0x02f9 ; Address of exception handler
0252 0005 | | .CONST 0x0005 ; Number of locals
0253 INIT_0250:
0253 0092 0a12 | | Action Push_String_Extended,0xa12 ; "Convert_Tokens"
0255 e004 | | Load 0x0,0x4
0256 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0257 02c7 | | Declare_Variable Any
0258 e004 | | Load 0x0,0x4
0259 180e | | Execute Package,Field_Execute,Field_Number 0xe
025a a403 | | Store_Unchecked 0x2,0x3
025b 00e3 | | Load_Encached Natural_Cache
025c 029f 09ab | | Declare_Subprogram For_Call,INIT_09a8
025e BODY_0250:
025e e403 | | Load 0x2,0x3
025f e5fa | | Load 0x2,-0x6
0260 e5fb | | Load 0x2,-0x5
0261 e5fc | | Load 0x2,-0x4
0262 e5fd | | Load 0x2,-0x3
0263 e224 | $ | Load 0x1,0x24
0264 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0265 e5fe | | Load 0x2,-0x2
0266 e5ff | | Load 0x2,-0x1
0267 e402 | | Load 0x2,0x2
0268 e224 | $ | Load 0x1,0x24
0269 1816 | | Execute Package,Field_Execute,Field_Number 0x16
026a c403 | | Store 0x2,0x3
026b e403 | | Load 0x2,0x3
026c e224 | $ | Load 0x1,0x24
026d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
026e e403 | | Load 0x2,0x3
026f e5ff | | Load 0x2,-0x1
0270 8234 | 4 | Call 0x1,0x34
0271 e403 | | Load 0x2,0x3
0272 e5fe | | Load 0x2,-0x2
0273 8234 | 4 | Call 0x1,0x34
0274 e5ff | | Load 0x2,-0x1
0275 823a | : | Call 0x1,0x3a
0276 a404 | | Store_Unchecked 0x2,0x4
0277 e5fd | | Load 0x2,-0x3
0278 e404 | | Load 0x2,0x4
0279 027e | ~ | Execute Discrete,Not_Equal
027a 6819 |h | Jump_Zero 0x294
027b e403 | | Load 0x2,0x3
027c 0092 0a13 | | Action Push_String_Extended,0xa13 ; "The token count for the current product ("
027e 4820 |H | Short_Literal 0x20
027f 4800 |H | Short_Literal 0x0
0280 480a |H | Short_Literal 0xa
0281 e404 | | Load 0x2,0x4
0282 e008 | | Load 0x0,0x8
0283 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0284 01cc | | Execute Vector,Catenate
0285 0092 0a14 | | Action Push_String_Extended,0xa14 ; ") is NOT equal to Token_Count parameter ("
0287 01cc | | Execute Vector,Catenate
0288 4820 |H | Short_Literal 0x20
0289 4800 |H | Short_Literal 0x0
028a 480a |H | Short_Literal 0xa
028b e5fd | | Load 0x2,-0x3
028c e008 | | Load 0x0,0x8
028d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
028e 01cc | | Execute Vector,Catenate
028f 0092 0a15 | | Action Push_String_Extended,0xa15 ; "); these must be equal in order to proceed."
0291 01cc | | Execute Vector,Catenate
0292 e224 | $ | Load 0x1,0x24
0293 180d | | Execute Package,Field_Execute,Field_Number 0xd
0294 e5fb | | Load 0x2,-0x5
0295 e5fc | | Load 0x2,-0x4
0296 e5fd | | Load 0x2,-0x3
0297 e5fe | | Load 0x2,-0x2
0298 e5ff | | Load 0x2,-0x1
0299 822e | . | Call 0x1,0x2e
029a 7015 |p | Jump_Nonzero 0x2b0
029b e403 | | Load 0x2,0x3
029c 0092 0a16 | | Action Push_String_Extended,0xa16 ; "The code provided does NOT match the request being made. This might be caused by a transcription error of the code, current product, new product, or the Machine ID of this machine ("
029e 4820 |H | Short_Literal 0x20
029f 4800 |H | Short_Literal 0x0
02a0 480a |H | Short_Literal 0xa
02a1 8211 | | Call 0x1,0x11
02a2 e008 | | Load 0x0,0x8
02a3 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02a4 01cc | | Execute Vector,Catenate
02a5 0092 0a17 | | Action Push_String_Extended,0xa17 ; "), a delay in posting the request (code only valid for one day), "
02a7 01cc | | Execute Vector,Catenate
02a8 0092 0a18 | | Action Push_String_Extended,0xa18 ; "or some other combination of parameter problems. "
02aa 01cc | | Execute Vector,Catenate
02ab 0092 0a19 | | Action Push_String_Extended,0xa19 ; "Contact your Rational representative for further assistance."
02ad 01cc | | Execute Vector,Catenate
02ae e224 | $ | Load 0x1,0x24
02af 180d | | Execute Package,Field_Execute,Field_Number 0xd
02b0 e5fb | | Load 0x2,-0x5
02b1 01db | | Execute Vector,Length
02b2 680a |h | Jump_Zero 0x2bd
02b3 e5fb | | Load 0x2,-0x5
02b4 e5ff | | Load 0x2,-0x1
02b5 e226 | & | Load 0x1,0x26
02b6 1814 | | Execute Package,Field_Execute,Field_Number 0x14
02b7 7005 |p | Jump_Nonzero 0x2bd
02b8 e403 | | Load 0x2,0x3
02b9 0092 0a1a | | Action Push_String_Extended,0xa1a ; "The authorization provided has been used previously for this product. It must be unique for this machine for all time."
02bb e224 | $ | Load 0x1,0x24
02bc 180d | | Execute Package,Field_Execute,Field_Number 0xd
02bd e5fe | | Load 0x2,-0x2
02be e013 | | Load 0x0,0x13
02bf 180e | | Execute Package,Field_Execute,Field_Number 0xe
02c0 7009 |p | Jump_Nonzero 0x2ca
02c1 00ea | | Load_Encached Null_String_Cache
02c2 00ea | | Load_Encached Null_String_Cache
02c3 8211 | | Call 0x1,0x11
02c4 e5fe | | Load 0x2,-0x2
02c5 e013 | | Load 0x0,0x13
02c6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02c7 e5fe | | Load 0x2,-0x2
02c8 e013 | | Load 0x0,0x13
02c9 180d | | Execute Package,Field_Execute,Field_Number 0xd
02ca e5fd | | Load 0x2,-0x3
02cb e5fe | | Load 0x2,-0x2
02cc e012 | | Load 0x0,0x12
02cd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02ce 4800 |H | Short_Literal 0x0
02cf e5ff | | Load 0x2,-0x1
02d0 e012 | | Load 0x0,0x12
02d1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02d2 8405 | | Call 0x2,0x5
02d3 e5fe | | Load 0x2,-0x2
02d4 823b | ; | Call 0x1,0x3b
02d5 7004 |p | Jump_Nonzero 0x2da
02d6 480c |H | Short_Literal 0xc
02d7 e5fe | | Load 0x2,-0x2
02d8 e012 | | Load 0x0,0x12
02d9 1814 | | Execute Package,Field_Execute,Field_Number 0x14
02da e403 | | Load 0x2,0x3
02db 482e |H. | Short_Literal 0x2e
02dc e5fe | | Load 0x2,-0x2
02dd 0092 0a1b | | Action Push_String_Extended,0xa1b ; " tokens set to "
02df 01cc | | Execute Vector,Catenate
02e0 4820 |H | Short_Literal 0x20
02e1 4800 |H | Short_Literal 0x0
02e2 480a |H | Short_Literal 0xa
02e3 e5fd | | Load 0x2,-0x3
02e4 e008 | | Load 0x0,0x8
02e5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02e6 01cc | | Execute Vector,Catenate
02e7 01cb | | Execute Vector,Append
02e8 e224 | $ | Load 0x1,0x24
02e9 180f | | Execute Package,Field_Execute,Field_Number 0xf
02ea e403 | | Load 0x2,0x3
02eb e5ff | | Load 0x2,-0x1
02ec 0092 0a1c | | Action Push_String_Extended,0xa1c ; " has no more tokens."
02ee 01cc | | Execute Vector,Catenate
02ef e224 | $ | Load 0x1,0x24
02f0 180f | | Execute Package,Field_Execute,Field_Number 0xf
02f1 e226 | & | Load 0x1,0x26
02f2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02f3 e403 | | Load 0x2,0x3
02f4 00ea | | Load_Encached Null_String_Cache
02f5 e402 | | Load 0x2,0x2
02f6 e224 | $ | Load 0x1,0x24
02f7 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02f8 4507 |E | Exit_Subprogram 0x7
02f9 TRAP_0250:
02f9 e004 | | Load 0x0,0x4
02fa 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
02fb 010f | | Execute Exception,Equal
02fc 6806 |h | Jump_Zero 0x303
02fd e403 | | Load 0x2,0x3
02fe e402 | | Load 0x2,0x2
02ff e224 | $ | Load 0x1,0x24
0300 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0301 00d8 | | Load_Top At_Offset_0
0302 0101 | | Execute Exception,Reraise
0303 e227 | ' | Load 0x1,0x27
0304 010f | | Execute Exception,Equal
0305 6805 |h | Jump_Zero 0x30b
0306 e403 | | Load 0x2,0x3
0307 e402 | | Load 0x2,0x2
0308 e224 | $ | Load 0x1,0x24
0309 181a | | Execute Package,Field_Execute,Field_Number 0x1a
030a 4507 |E | Exit_Subprogram 0x7
030b e403 | | Load 0x2,0x3
030c 4800 |H | Short_Literal 0x0
030d 4801 |H | Short_Literal 0x1
030e e015 | | Load 0x0,0x15
030f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0310 e402 | | Load 0x2,0x2
0311 e224 | $ | Load 0x1,0x24
0312 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0313 4507 |E | Exit_Subprogram 0x7
0314 0000 0000 | | .BLANK 0000[0x4]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 0323 | # | .CONST 0x0323 ; Address of begin
0319 036e | n | .CONST 0x036e ; Address of exception handler
031a 0003 | | .CONST 0x0003 ; Number of locals
031b INIT_0318:
031b 0092 0a1d | | Action Push_String_Extended,0xa1d ; "Allow_Token_Conversion"
031d e004 | | Load 0x0,0x4
031e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
031f 02c7 | | Declare_Variable Any
0320 e004 | | Load 0x0,0x4
0321 180e | | Execute Package,Field_Execute,Field_Number 0xe
0322 a403 | | Store_Unchecked 0x2,0x3
0323 BODY_0318:
0323 00d8 | | Load_Top At_Offset_0
0324 e5f9 | | Load 0x2,-0x7
0325 e5fa | | Load 0x2,-0x6
0326 e5fb | | Load 0x2,-0x5
0327 e5fc | | Load 0x2,-0x4
0328 e224 | $ | Load 0x1,0x24
0329 181d | | Execute Package,Field_Execute,Field_Number 0x1d
032a e5fd | | Load 0x2,-0x3
032b e224 | $ | Load 0x1,0x24
032c 181c | | Execute Package,Field_Execute,Field_Number 0x1c
032d e5fe | | Load 0x2,-0x2
032e e5ff | | Load 0x2,-0x1
032f e402 | | Load 0x2,0x2
0330 e224 | $ | Load 0x1,0x24
0331 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0332 c403 | | Store 0x2,0x3
0333 00d8 | | Load_Top At_Offset_0
0334 e224 | $ | Load 0x1,0x24
0335 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0336 00d8 | | Load_Top At_Offset_0
0337 e5fa | | Load 0x2,-0x6
0338 8236 | 6 | Call 0x1,0x36
0339 00d8 | | Load_Top At_Offset_0
033a e5ff | | Load 0x2,-0x1
033b 8234 | 4 | Call 0x1,0x34
033c 00d8 | | Load_Top At_Offset_0
033d e5fe | | Load 0x2,-0x2
033e 8234 | 4 | Call 0x1,0x34
033f e226 | & | Load 0x1,0x26
0340 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0341 7005 |p | Jump_Nonzero 0x347
0342 00d8 | | Load_Top At_Offset_0
0343 0092 0a1e | | Action Push_String_Extended,0xa1e ; "Must be run from a Rational site."
0345 e224 | $ | Load 0x1,0x24
0346 180d | | Execute Package,Field_Execute,Field_Number 0xd
0347 e5fc | | Load 0x2,-0x4
0348 8211 | | Call 0x1,0x11
0349 027f | | Execute Discrete,Equal
034a 6805 |h | Jump_Zero 0x350
034b 00d8 | | Load_Top At_Offset_0
034c 0092 0a0a | | Action Push_String_Extended,0xa0a ; "Remote_Machine_ID specified is the Machine_ID for this machine."
034e e224 | $ | Load 0x1,0x24
034f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0350 00d8 | | Load_Top At_Offset_0
0351 e5fa | | Load 0x2,-0x6
0352 e5fb | | Load 0x2,-0x5
0353 e5ff | | Load 0x2,-0x1
0354 8238 | 8 | Call 0x1,0x38
0355 e5fa | | Load 0x2,-0x6
0356 e228 | ( | Load 0x1,0x28
0357 01df | | Execute Vector,Equal
0358 6808 |h | Jump_Zero 0x361
0359 e229 | ) | Load 0x1,0x29
035a e5fb | | Load 0x2,-0x5
035b e5fc | | Load 0x2,-0x4
035c e5fd | | Load 0x2,-0x3
035d e5fe | | Load 0x2,-0x2
035e e5ff | | Load 0x2,-0x1
035f 8232 | 2 | Call 0x1,0x32
0360 7807 |x | Jump 0x368
0361 e5fa | | Load 0x2,-0x6
0362 e5fb | | Load 0x2,-0x5
0363 e5fc | | Load 0x2,-0x4
0364 e5fd | | Load 0x2,-0x3
0365 e5fe | | Load 0x2,-0x2
0366 e5ff | | Load 0x2,-0x1
0367 8232 | 2 | Call 0x1,0x32
0368 00d8 | | Load_Top At_Offset_0
0369 00ea | | Load_Encached Null_String_Cache
036a e402 | | Load 0x2,0x2
036b e224 | $ | Load 0x1,0x24
036c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
036d 4508 |E | Exit_Subprogram 0x8
036e TRAP_0318:
036e e004 | | Load 0x0,0x4
036f 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0370 010f | | Execute Exception,Equal
0371 6806 |h | Jump_Zero 0x378
0372 e403 | | Load 0x2,0x3
0373 e402 | | Load 0x2,0x2
0374 e224 | $ | Load 0x1,0x24
0375 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0376 00d8 | | Load_Top At_Offset_0
0377 0101 | | Execute Exception,Reraise
0378 e227 | ' | Load 0x1,0x27
0379 010f | | Execute Exception,Equal
037a 6805 |h | Jump_Zero 0x380
037b e403 | | Load 0x2,0x3
037c e402 | | Load 0x2,0x2
037d e224 | $ | Load 0x1,0x24
037e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
037f 4508 |E | Exit_Subprogram 0x8
0380 e403 | | Load 0x2,0x3
0381 4800 |H | Short_Literal 0x0
0382 4801 |H | Short_Literal 0x1
0383 e015 | | Load 0x0,0x15
0384 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0385 e402 | | Load 0x2,0x2
0386 e224 | $ | Load 0x1,0x24
0387 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0388 4508 |E | Exit_Subprogram 0x8
0389 0000 0000 | | .BLANK 0000[0x7]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 039b | | .CONST 0x039b ; Address of begin
0391 03f0 | | .CONST 0x03f0 ; Address of exception handler
0392 0003 | | .CONST 0x0003 ; Number of locals
0393 INIT_0390:
0393 0092 0a1f | | Action Push_String_Extended,0xa1f ; "Assign_Tokens"
0395 e004 | | Load 0x0,0x4
0396 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0397 02c7 | | Declare_Variable Any
0398 e004 | | Load 0x0,0x4
0399 180e | | Execute Package,Field_Execute,Field_Number 0xe
039a a403 | | Store_Unchecked 0x2,0x3
039b BODY_0390:
039b 00d8 | | Load_Top At_Offset_0
039c e5f8 | | Load 0x2,-0x8
039d e5f9 | | Load 0x2,-0x7
039e e5fa | | Load 0x2,-0x6
039f e5fb | | Load 0x2,-0x5
03a0 e5fc | | Load 0x2,-0x4
03a1 e224 | $ | Load 0x1,0x24
03a2 181d | | Execute Package,Field_Execute,Field_Number 0x1d
03a3 e5fd | | Load 0x2,-0x3
03a4 e224 | $ | Load 0x1,0x24
03a5 181c | | Execute Package,Field_Execute,Field_Number 0x1c
03a6 e5fe | | Load 0x2,-0x2
03a7 e224 | $ | Load 0x1,0x24
03a8 181c | | Execute Package,Field_Execute,Field_Number 0x1c
03a9 e5ff | | Load 0x2,-0x1
03aa e402 | | Load 0x2,0x2
03ab e224 | $ | Load 0x1,0x24
03ac 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03ad c403 | | Store 0x2,0x3
03ae 00d8 | | Load_Top At_Offset_0
03af e224 | $ | Load 0x1,0x24
03b0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03b1 00d8 | | Load_Top At_Offset_0
03b2 e5fb | | Load 0x2,-0x5
03b3 8235 | 5 | Call 0x1,0x35
03b4 00d8 | | Load_Top At_Offset_0
03b5 e5f9 | | Load 0x2,-0x7
03b6 8236 | 6 | Call 0x1,0x36
03b7 00d8 | | Load_Top At_Offset_0
03b8 e5ff | | Load 0x2,-0x1
03b9 8234 | 4 | Call 0x1,0x34
03ba e226 | & | Load 0x1,0x26
03bb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03bc 7005 |p | Jump_Nonzero 0x3c2
03bd 00d8 | | Load_Top At_Offset_0
03be 0092 0a1e | | Action Push_String_Extended,0xa1e ; "Must be run from a Rational site."
03c0 e224 | $ | Load 0x1,0x24
03c1 180d | | Execute Package,Field_Execute,Field_Number 0xd
03c2 e5fc | | Load 0x2,-0x4
03c3 8211 | | Call 0x1,0x11
03c4 027f | | Execute Discrete,Equal
03c5 6805 |h | Jump_Zero 0x3cb
03c6 00d8 | | Load_Top At_Offset_0
03c7 0092 0a0a | | Action Push_String_Extended,0xa0a ; "Remote_Machine_ID specified is the Machine_ID for this machine."
03c9 e224 | $ | Load 0x1,0x24
03ca 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03cb 00d8 | | Load_Top At_Offset_0
03cc e5fd | | Load 0x2,-0x3
03cd e5fe | | Load 0x2,-0x2
03ce e5ff | | Load 0x2,-0x1
03cf 8237 | 7 | Call 0x1,0x37
03d0 00d8 | | Load_Top At_Offset_0
03d1 e5f9 | | Load 0x2,-0x7
03d2 e5fa | | Load 0x2,-0x6
03d3 e5ff | | Load 0x2,-0x1
03d4 8238 | 8 | Call 0x1,0x38
03d5 e5f9 | | Load 0x2,-0x7
03d6 e228 | ( | Load 0x1,0x28
03d7 01df | | Execute Vector,Equal
03d8 6809 |h | Jump_Zero 0x3e2
03d9 e229 | ) | Load 0x1,0x29
03da e5fa | | Load 0x2,-0x6
03db e5fb | | Load 0x2,-0x5
03dc e5fc | | Load 0x2,-0x4
03dd e5fd | | Load 0x2,-0x3
03de e5fe | | Load 0x2,-0x2
03df e5ff | | Load 0x2,-0x1
03e0 8231 | 1 | Call 0x1,0x31
03e1 7808 |x | Jump 0x3ea
03e2 e5f9 | | Load 0x2,-0x7
03e3 e5fa | | Load 0x2,-0x6
03e4 e5fb | | Load 0x2,-0x5
03e5 e5fc | | Load 0x2,-0x4
03e6 e5fd | | Load 0x2,-0x3
03e7 e5fe | | Load 0x2,-0x2
03e8 e5ff | | Load 0x2,-0x1
03e9 8231 | 1 | Call 0x1,0x31
03ea 00d8 | | Load_Top At_Offset_0
03eb 00ea | | Load_Encached Null_String_Cache
03ec e402 | | Load 0x2,0x2
03ed e224 | $ | Load 0x1,0x24
03ee 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03ef 4509 |E | Exit_Subprogram 0x9
03f0 TRAP_0390:
03f0 e004 | | Load 0x0,0x4
03f1 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
03f2 010f | | Execute Exception,Equal
03f3 6806 |h | Jump_Zero 0x3fa
03f4 e403 | | Load 0x2,0x3
03f5 e402 | | Load 0x2,0x2
03f6 e224 | $ | Load 0x1,0x24
03f7 181a | | Execute Package,Field_Execute,Field_Number 0x1a
03f8 00d8 | | Load_Top At_Offset_0
03f9 0101 | | Execute Exception,Reraise
03fa e227 | ' | Load 0x1,0x27
03fb 010f | | Execute Exception,Equal
03fc 6805 |h | Jump_Zero 0x402
03fd e403 | | Load 0x2,0x3
03fe e402 | | Load 0x2,0x2
03ff e224 | $ | Load 0x1,0x24
0400 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0401 4509 |E | Exit_Subprogram 0x9
0402 e403 | | Load 0x2,0x3
0403 4800 |H | Short_Literal 0x0
0404 4801 |H | Short_Literal 0x1
0405 e015 | | Load 0x0,0x15
0406 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0407 e402 | | Load 0x2,0x2
0408 e224 | $ | Load 0x1,0x24
0409 181b | | Execute Package,Field_Execute,Field_Number 0x1b
040a 4509 |E | Exit_Subprogram 0x9
040b 0000 0000 | | .BLANK 0000[0x5]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0427 | ' | .CONST 0x0427 ; Address of begin
0411 0457 | W | .CONST 0x0457 ; Address of exception handler
0412 0002 | | .CONST 0x0002 ; Number of locals
0413 INIT_0410:
0413 e004 | | Load 0x0,0x4
0414 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0415 02c7 | | Declare_Variable Any
0416 e004 | | Load 0x0,0x4
0417 180e | | Execute Package,Field_Execute,Field_Number 0xe
0418 e004 | | Load 0x0,0x4
0419 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
041a e004 | | Load 0x0,0x4
041b 180e | | Execute Package,Field_Execute,Field_Number 0xe
041c e004 | | Load 0x0,0x4
041d 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
041e 484d |HM | Short_Literal 0x4d
041f e004 | | Load 0x0,0x4
0420 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
0421 e004 | | Load 0x0,0x4
0422 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0423 4800 |H | Short_Literal 0x0
0424 e004 | | Load 0x0,0x4
0425 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
0426 a402 | | Store_Unchecked 0x2,0x2
0427 BODY_0410:
0427 00d8 | | Load_Top At_Offset_0
0428 e224 | $ | Load 0x1,0x24
0429 1811 | | Execute Package,Field_Execute,Field_Number 0x11
042a 00d8 | | Load_Top At_Offset_0
042b e5fb | | Load 0x2,-0x5
042c 8235 | 5 | Call 0x1,0x35
042d 00d8 | | Load_Top At_Offset_0
042e e5f9 | | Load 0x2,-0x7
042f 8236 | 6 | Call 0x1,0x36
0430 00d8 | | Load_Top At_Offset_0
0431 e5ff | | Load 0x2,-0x1
0432 8234 | 4 | Call 0x1,0x34
0433 e226 | & | Load 0x1,0x26
0434 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0435 7005 |p | Jump_Nonzero 0x43b
0436 00d8 | | Load_Top At_Offset_0
0437 0092 0a1e | | Action Push_String_Extended,0xa1e ; "Must be run from a Rational site."
0439 e224 | $ | Load 0x1,0x24
043a 180d | | Execute Package,Field_Execute,Field_Number 0xd
043b e5fc | | Load 0x2,-0x4
043c 8211 | | Call 0x1,0x11
043d 027f | | Execute Discrete,Equal
043e 6805 |h | Jump_Zero 0x444
043f 00d8 | | Load_Top At_Offset_0
0440 0092 0a0a | | Action Push_String_Extended,0xa0a ; "Remote_Machine_ID specified is the Machine_ID for this machine."
0442 e224 | $ | Load 0x1,0x24
0443 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0444 00d8 | | Load_Top At_Offset_0
0445 e5fd | | Load 0x2,-0x3
0446 e5fe | | Load 0x2,-0x2
0447 e5ff | | Load 0x2,-0x1
0448 8237 | 7 | Call 0x1,0x37
0449 00d8 | | Load_Top At_Offset_0
044a e5f9 | | Load 0x2,-0x7
044b e5fa | | Load 0x2,-0x6
044c e5ff | | Load 0x2,-0x1
044d 8238 | 8 | Call 0x1,0x38
044e e5f9 | | Load 0x2,-0x7
044f e5fa | | Load 0x2,-0x6
0450 e5fb | | Load 0x2,-0x5
0451 e5fc | | Load 0x2,-0x4
0452 e5fd | | Load 0x2,-0x3
0453 e5fe | | Load 0x2,-0x2
0454 e5ff | | Load 0x2,-0x1
0455 822b | + | Call 0x1,0x2b
0456 4407 |D | Exit_Subprogram With_Result,0x7
0457 TRAP_0410:
0457 e227 | ' | Load 0x1,0x27
0458 010f | | Execute Exception,Equal
0459 6803 |h | Jump_Zero 0x45d
045a e004 | | Load 0x0,0x4
045b 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
045c 0257 | W | Execute Discrete,Raise
045d 0100 | | Execute Exception,Raise
045e 0000 0000 | | .XXX[0x2]
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 046b | k | .CONST 0x046b ; Address of begin
0461 049b | | .CONST 0x049b ; Address of exception handler
0462 0003 | | .CONST 0x0003 ; Number of locals
0463 INIT_0460:
0463 0092 0a20 | | Action Push_String_Extended,0xa20 ; "Assign_Site"
0465 e004 | | Load 0x0,0x4
0466 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0467 02c7 | | Declare_Variable Any
0468 e004 | | Load 0x0,0x4
0469 180e | | Execute Package,Field_Execute,Field_Number 0xe
046a a403 | | Store_Unchecked 0x2,0x3
046b BODY_0460:
046b 00d8 | | Load_Top At_Offset_0
046c e5fc | | Load 0x2,-0x4
046d e5fd | | Load 0x2,-0x3
046e e5fe | | Load 0x2,-0x2
046f e224 | $ | Load 0x1,0x24
0470 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0471 e5ff | | Load 0x2,-0x1
0472 e402 | | Load 0x2,0x2
0473 e224 | $ | Load 0x1,0x24
0474 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0475 c403 | | Store 0x2,0x3
0476 00d8 | | Load_Top At_Offset_0
0477 e5ff | | Load 0x2,-0x1
0478 8235 | 5 | Call 0x1,0x35
0479 0092 0a21 | !| Action Push_String_Extended,0xa21 ; "Run the following on the remote machine:"
047b e014 | | Load 0x0,0x14
047c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
047d 0092 0a0d | | Action Push_String_Extended,0xa0d ; "Set_Site"
047f e225 | % | Load 0x1,0x25
0480 180d | | Execute Package,Field_Execute,Field_Number 0xd
0481 e5ff | | Load 0x2,-0x1
0482 e224 | $ | Load 0x1,0x24
0483 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0484 0092 0a22 | "| Action Push_String_Extended,0xa22 ; "Site"
0486 e225 | % | Load 0x1,0x25
0487 180e | | Execute Package,Field_Execute,Field_Number 0xe
0488 e228 | ( | Load 0x1,0x28
0489 e5fd | | Load 0x2,-0x3
048a e5fe | | Load 0x2,-0x2
048b e5ff | | Load 0x2,-0x1
048c 822a | * | Call 0x1,0x2a
048d e224 | $ | Load 0x1,0x24
048e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
048f 0092 0a23 | #| Action Push_String_Extended,0xa23 ; "Code"
0491 e225 | % | Load 0x1,0x25
0492 180e | | Execute Package,Field_Execute,Field_Number 0xe
0493 e225 | % | Load 0x1,0x25
0494 180f | | Execute Package,Field_Execute,Field_Number 0xf
0495 00d8 | | Load_Top At_Offset_0
0496 00ea | | Load_Encached Null_String_Cache
0497 e402 | | Load 0x2,0x2
0498 e224 | $ | Load 0x1,0x24
0499 1819 | | Execute Package,Field_Execute,Field_Number 0x19
049a 4505 |E | Exit_Subprogram 0x5
049b TRAP_0460:
049b e004 | | Load 0x0,0x4
049c 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
049d 010f | | Execute Exception,Equal
049e 6806 |h | Jump_Zero 0x4a5
049f e403 | | Load 0x2,0x3
04a0 e402 | | Load 0x2,0x2
04a1 e224 | $ | Load 0x1,0x24
04a2 181a | | Execute Package,Field_Execute,Field_Number 0x1a
04a3 00d8 | | Load_Top At_Offset_0
04a4 0101 | | Execute Exception,Reraise
04a5 e227 | ' | Load 0x1,0x27
04a6 010f | | Execute Exception,Equal
04a7 6805 |h | Jump_Zero 0x4ad
04a8 e403 | | Load 0x2,0x3
04a9 e402 | | Load 0x2,0x2
04aa e224 | $ | Load 0x1,0x24
04ab 181a | | Execute Package,Field_Execute,Field_Number 0x1a
04ac 4505 |E | Exit_Subprogram 0x5
04ad e403 | | Load 0x2,0x3
04ae 4800 |H | Short_Literal 0x0
04af 4801 |H | Short_Literal 0x1
04b0 e015 | | Load 0x0,0x15
04b1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04b2 e402 | | Load 0x2,0x2
04b3 e224 | $ | Load 0x1,0x24
04b4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
04b5 4505 |E | Exit_Subprogram 0x5
04b6 0000 0000 | | .XXX[0x2]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04cf | | .CONST 0x04cf ; Address of begin
04b9 04d8 | | .CONST 0x04d8 ; Address of exception handler
04ba 0002 | | .CONST 0x0002 ; Number of locals
04bb INIT_04b8:
04bb e004 | | Load 0x0,0x4
04bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04bd 02c7 | | Declare_Variable Any
04be e004 | | Load 0x0,0x4
04bf 180e | | Execute Package,Field_Execute,Field_Number 0xe
04c0 e004 | | Load 0x0,0x4
04c1 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
04c2 e004 | | Load 0x0,0x4
04c3 180e | | Execute Package,Field_Execute,Field_Number 0xe
04c4 e004 | | Load 0x0,0x4
04c5 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
04c6 484d |HM | Short_Literal 0x4d
04c7 e004 | | Load 0x0,0x4
04c8 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
04c9 e004 | | Load 0x0,0x4
04ca 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
04cb 4800 |H | Short_Literal 0x0
04cc e004 | | Load 0x0,0x4
04cd 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
04ce a402 | | Store_Unchecked 0x2,0x2
04cf BODY_04b8:
04cf 00d8 | | Load_Top At_Offset_0
04d0 e5ff | | Load 0x2,-0x1
04d1 8235 | 5 | Call 0x1,0x35
04d2 e228 | ( | Load 0x1,0x28
04d3 e5fd | | Load 0x2,-0x3
04d4 e5fe | | Load 0x2,-0x2
04d5 e5ff | | Load 0x2,-0x1
04d6 822a | * | Call 0x1,0x2a
04d7 4403 |D | Exit_Subprogram With_Result,0x3
04d8 TRAP_04b8:
04d8 e227 | ' | Load 0x1,0x27
04d9 010f | | Execute Exception,Equal
04da 6803 |h | Jump_Zero 0x4de
04db e004 | | Load 0x0,0x4
04dc 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
04dd 0257 | W | Execute Discrete,Raise
04de 0100 | | Execute Exception,Raise
04df 0000 | | .XXX[0x1]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04ed | | .CONST 0x04ed ; Address of begin
04e1 0532 | 2 | .CONST 0x0532 ; Address of exception handler
04e2 0004 | | .CONST 0x0004 ; Number of locals
04e3 INIT_04e0:
04e3 0092 0a24 | $| Action Push_String_Extended,0xa24 ; "Training"
04e5 0092 0a25 | %| Action Push_String_Extended,0xa25 ; "Training_Authorization"
04e7 e004 | | Load 0x0,0x4
04e8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04e9 02c7 | | Declare_Variable Any
04ea e004 | | Load 0x0,0x4
04eb 180e | | Execute Package,Field_Execute,Field_Number 0xe
04ec a404 | | Store_Unchecked 0x2,0x4
04ed BODY_04e0:
04ed 00d8 | | Load_Top At_Offset_0
04ee e5fc | | Load 0x2,-0x4
04ef 482b |H+ | Short_Literal 0x2b
04f0 e5fd | | Load 0x2,-0x3
04f1 00e1 | | Load_Encached Boolean_Cache
04f2 011c | | Execute Any,Convert_Unchecked
04f3 1c01 | | Execute_Immediate Run_Utility,0x1
04f4 01ca | | Execute Vector,Prepend
04f5 e5fe | | Load 0x2,-0x2
04f6 e5ff | | Load 0x2,-0x1
04f7 e403 | | Load 0x2,0x3
04f8 e224 | $ | Load 0x1,0x24
04f9 1814 | | Execute Package,Field_Execute,Field_Number 0x14
04fa c404 | | Store 0x2,0x4
04fb e5fd | | Load 0x2,-0x3
04fc 700f |p | Jump_Nonzero 0x50c
04fd 4801 |H | Short_Literal 0x1
04fe e013 | | Load 0x0,0x13
04ff 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0500 4801 |H | Short_Literal 0x1
0501 e012 | | Load 0x0,0x12
0502 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0503 4803 |H | Short_Literal 0x3
0504 0092 0a26 | &| Action Push_String_Extended,0xa26 ; "Product and Token authorization checking has been reinstated."
0506 0092 0a27 | '| Action Push_String_Extended,0xa27 ; "Authorization_Checking_Reinstated"
0508 e403 | | Load 0x2,0x3
0509 e224 | $ | Load 0x1,0x24
050a 181f | | Execute Package,Field_Execute,Field_Number 0x1f
050b 7820 |x | Jump 0x52c
050c e5ff | | Load 0x2,-0x1
050d e229 | ) | Load 0x1,0x29
050e e5fe | | Load 0x2,-0x2
050f e016 | | Load 0x0,0x16
0510 180e | | Execute Package,Field_Execute,Field_Number 0xe
0511 e402 | | Load 0x2,0x2
0512 822a | * | Call 0x1,0x2a
0513 01df | | Execute Vector,Equal
0514 680f |h | Jump_Zero 0x524
0515 4800 |H | Short_Literal 0x0
0516 e013 | | Load 0x0,0x13
0517 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0518 4800 |H | Short_Literal 0x0
0519 e012 | | Load 0x0,0x12
051a 181a | | Execute Package,Field_Execute,Field_Number 0x1a
051b 4803 |H | Short_Literal 0x3
051c 0092 0a28 | (| Action Push_String_Extended,0xa28 ; "Product and Token authorization checking has been suspended to allow training to proceed. Checking will be re-instated the next time the machine boots or by exectuting this procedure with Enable => False."
051e 0092 0a29 | )| Action Push_String_Extended,0xa29 ; "Authorization_Checking_Suspended"
0520 e403 | | Load 0x2,0x3
0521 e224 | $ | Load 0x1,0x24
0522 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0523 7808 |x | Jump 0x52c
0524 4807 |H | Short_Literal 0x7
0525 0092 0a2a | *| Action Push_String_Extended,0xa2a ; "The code provided is NOT correct for this purpose, on this machine, and for today's date. Please check for transcription errors or contact your Rational representative."
0527 0092 0a2b | +| Action Push_String_Extended,0xa2b ; "Authorization_Code_Error"
0529 e403 | | Load 0x2,0x3
052a e224 | $ | Load 0x1,0x24
052b 181f | | Execute Package,Field_Execute,Field_Number 0x1f
052c 00d8 | | Load_Top At_Offset_0
052d 00ea | | Load_Encached Null_String_Cache
052e e403 | | Load 0x2,0x3
052f e224 | $ | Load 0x1,0x24
0530 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0531 4505 |E | Exit_Subprogram 0x5
0532 TRAP_04e0:
0532 e004 | | Load 0x0,0x4
0533 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0534 010f | | Execute Exception,Equal
0535 6806 |h | Jump_Zero 0x53c
0536 e404 | | Load 0x2,0x4
0537 e403 | | Load 0x2,0x3
0538 e224 | $ | Load 0x1,0x24
0539 181a | | Execute Package,Field_Execute,Field_Number 0x1a
053a 00d8 | | Load_Top At_Offset_0
053b 0101 | | Execute Exception,Reraise
053c e227 | ' | Load 0x1,0x27
053d 010f | | Execute Exception,Equal
053e 6805 |h | Jump_Zero 0x544
053f e404 | | Load 0x2,0x4
0540 e403 | | Load 0x2,0x3
0541 e224 | $ | Load 0x1,0x24
0542 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0543 4505 |E | Exit_Subprogram 0x5
0544 e404 | | Load 0x2,0x4
0545 4800 |H | Short_Literal 0x0
0546 4801 |H | Short_Literal 0x1
0547 e015 | | Load 0x0,0x15
0548 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0549 e403 | | Load 0x2,0x3
054a e224 | $ | Load 0x1,0x24
054b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
054c 4505 |E | Exit_Subprogram 0x5
054d 0000 0000 | | .XXX[0x3]
054f 0000 | |
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0553 | S | .CONST 0x0553 ; Address of begin
0551 0004 | | .CONST 0x0004 ; Address of exception handler
0552 0001 | | .CONST 0x0001 ; Number of locals
0553 BODY_0550:
0553 INIT_0550:
0553 e00d | | Load 0x0,0xd
0554 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0555 e226 | & | Load 0x1,0x26
0556 180f | | Execute Package,Field_Execute,Field_Number 0xf
0557 4501 |E | Exit_Subprogram 0x1
0558 ; --------------------------------------------------------------------------------------
0558 ; SUBPROGRAM
0558 ; --------------------------------------------------------------------------------------
0558 055b | [ | .CONST 0x055b ; Address of begin
0559 0004 | | .CONST 0x0004 ; Address of exception handler
055a 0001 | | .CONST 0x0001 ; Number of locals
055b BODY_0558:
055b INIT_0558:
055b e00d | | Load 0x0,0xd
055c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
055d e226 | & | Load 0x1,0x26
055e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
055f 4501 |E | Exit_Subprogram 0x1
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0563 | c | .CONST 0x0563 ; Address of begin
0561 0004 | | .CONST 0x0004 ; Address of exception handler
0562 0001 | | .CONST 0x0001 ; Number of locals
0563 BODY_0560:
0563 INIT_0560:
0563 e002 | | Load 0x0,0x2
0564 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0565 e226 | & | Load 0x1,0x26
0566 180f | | Execute Package,Field_Execute,Field_Number 0xf
0567 4501 |E | Exit_Subprogram 0x1
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 056b | k | .CONST 0x056b ; Address of begin
0569 0004 | | .CONST 0x0004 ; Address of exception handler
056a 0001 | | .CONST 0x0001 ; Number of locals
056b BODY_0568:
056b INIT_0568:
056b e002 | | Load 0x0,0x2
056c 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
056d e226 | & | Load 0x1,0x26
056e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
056f 4501 |E | Exit_Subprogram 0x1
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0573 | s | .CONST 0x0573 ; Address of begin
0571 0004 | | .CONST 0x0004 ; Address of exception handler
0572 0001 | | .CONST 0x0001 ; Number of locals
0573 BODY_0570:
0573 INIT_0570:
0573 e226 | & | Load 0x1,0x26
0574 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0575 4501 |E | Exit_Subprogram 0x1
0576 0000 0000 | | .XXX[0x2]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b | { | .CONST 0x057b ; Address of begin
0579 0004 | | .CONST 0x0004 ; Address of exception handler
057a 0001 | | .CONST 0x0001 ; Number of locals
057b BODY_0578:
057b INIT_0578:
057b e5fd | | Load 0x2,-0x3
057c 01db | | Execute Vector,Length
057d 6808 |h | Jump_Zero 0x586
057e e228 | ( | Load 0x1,0x28
057f e5fe | | Load 0x2,-0x2
0580 e5ff | | Load 0x2,-0x1
0581 e5fd | | Load 0x2,-0x3
0582 01cc | | Execute Vector,Catenate
0583 e013 | | Load 0x0,0x13
0584 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0585 4404 |D | Exit_Subprogram With_Result,0x4
0586 e5fc | | Load 0x2,-0x4
0587 01db | | Execute Vector,Length
0588 7006 |p | Jump_Nonzero 0x58f
0589 e229 | ) | Load 0x1,0x29
058a e5fe | | Load 0x2,-0x2
058b e5ff | | Load 0x2,-0x1
058c e013 | | Load 0x0,0x13
058d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
058e 4404 |D | Exit_Subprogram With_Result,0x4
058f e5fc | | Load 0x2,-0x4
0590 e5fe | | Load 0x2,-0x2
0591 e5ff | | Load 0x2,-0x1
0592 e013 | | Load 0x0,0x13
0593 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0594 4404 |D | Exit_Subprogram With_Result,0x4
0595 0000 0000 | | .XXX[0x3]
0597 0000 | |
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 059b | | .CONST 0x059b ; Address of begin
0599 0004 | | .CONST 0x0004 ; Address of exception handler
059a 0001 | | .CONST 0x0001 ; Number of locals
059b BODY_0598:
059b INIT_0598:
059b e5f9 | | Load 0x2,-0x7
059c e5fa | | Load 0x2,-0x6
059d e5fc | | Load 0x2,-0x4
059e e5ff | | Load 0x2,-0x1
059f 0092 0a2c | ,| Action Push_String_Extended,0xa2c ; "/"
05a1 01cc | | Execute Vector,Catenate
05a2 e5fb | | Load 0x2,-0x5
05a3 01cc | | Execute Vector,Catenate
05a4 0092 0a2d | -| Action Push_String_Extended,0xa2d ; "="
05a6 01cc | | Execute Vector,Catenate
05a7 4820 |H | Short_Literal 0x20
05a8 4800 |H | Short_Literal 0x0
05a9 480a |H | Short_Literal 0xa
05aa e5fe | | Load 0x2,-0x2
05ab e008 | | Load 0x0,0x8
05ac 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05ad 01cc | | Execute Vector,Catenate
05ae 0092 0a2e | .| Action Push_String_Extended,0xa2e ; "|"
05b0 01cc | | Execute Vector,Catenate
05b1 4820 |H | Short_Literal 0x20
05b2 4800 |H | Short_Literal 0x0
05b3 480a |H | Short_Literal 0xa
05b4 e5fd | | Load 0x2,-0x3
05b5 e008 | | Load 0x0,0x8
05b6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05b7 01cc | | Execute Vector,Catenate
05b8 822a | * | Call 0x1,0x2a
05b9 4407 |D | Exit_Subprogram With_Result,0x7
05ba 0000 0000 | | .BLANK 0000[0x6]
05c0 ; --------------------------------------------------------------------------------------
05c0 ; SUBPROGRAM
05c0 ; --------------------------------------------------------------------------------------
05c0 05c3 | | .CONST 0x05c3 ; Address of begin
05c1 0004 | | .CONST 0x0004 ; Address of exception handler
05c2 0001 | | .CONST 0x0001 ; Number of locals
05c3 BODY_05c0:
05c3 INIT_05c0:
05c3 e5fa | | Load 0x2,-0x6
05c4 e5fb | | Load 0x2,-0x5
05c5 e5fc | | Load 0x2,-0x4
05c6 482d |H- | Short_Literal 0x2d
05c7 e5ff | | Load 0x2,-0x1
05c8 01cb | | Execute Vector,Append
05c9 e5fe | | Load 0x2,-0x2
05ca 01cc | | Execute Vector,Catenate
05cb 4820 |H | Short_Literal 0x20
05cc 4800 |H | Short_Literal 0x0
05cd 480a |H | Short_Literal 0xa
05ce e5fd | | Load 0x2,-0x3
05cf e008 | | Load 0x0,0x8
05d0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05d1 01cc | | Execute Vector,Catenate
05d2 822a | * | Call 0x1,0x2a
05d3 4406 |D | Exit_Subprogram With_Result,0x6
05d4 0000 0000 | | .BLANK 0000[0x4]
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05db | | .CONST 0x05db ; Address of begin
05d9 0004 | | .CONST 0x0004 ; Address of exception handler
05da 0001 | | .CONST 0x0001 ; Number of locals
05db BODY_05d8:
05db INIT_05d8:
05db 4801 |H | Short_Literal 0x1
05dc e5fc | | Load 0x2,-0x4
05dd e229 | ) | Load 0x1,0x29
05de e5fb | | Load 0x2,-0x5
05df 8210 | | Call 0x1,0x10
05e0 8211 | | Call 0x1,0x11
05e1 e5fd | | Load 0x2,-0x3
05e2 e5fe | | Load 0x2,-0x2
05e3 e5ff | | Load 0x2,-0x1
05e4 822b | + | Call 0x1,0x2b
05e5 e008 | | Load 0x0,0x8
05e6 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
05e7 4405 |D | Exit_Subprogram With_Result,0x5
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05eb | | .CONST 0x05eb ; Address of begin
05e9 0004 | | .CONST 0x0004 ; Address of exception handler
05ea 0001 | | .CONST 0x0001 ; Number of locals
05eb BODY_05e8:
05eb INIT_05e8:
05eb 4801 |H | Short_Literal 0x1
05ec e5fc | | Load 0x2,-0x4
05ed e229 | ) | Load 0x1,0x29
05ee e5fb | | Load 0x2,-0x5
05ef 8211 | | Call 0x1,0x11
05f0 e5fd | | Load 0x2,-0x3
05f1 e5fe | | Load 0x2,-0x2
05f2 e5ff | | Load 0x2,-0x1
05f3 822c | , | Call 0x1,0x2c
05f4 e008 | | Load 0x0,0x8
05f5 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
05f6 4405 |D | Exit_Subprogram With_Result,0x5
05f7 0000 | | .XXX[0x1]
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 0601 | | .CONST 0x0601 ; Address of begin
05f9 0004 | | .CONST 0x0004 ; Address of exception handler
05fa 0002 | | .CONST 0x0002 ; Number of locals
05fb INIT_05f8:
05fb e5ff | | Load 0x2,-0x1
05fc e00d | | Load 0x0,0xd
05fd 1812 | | Execute Package,Field_Execute,Field_Number 0x12
05fe 8230 | 0 | Call 0x1,0x30
05ff 00e1 | | Load_Encached Boolean_Cache
0600 03f1 | | Declare_Variable Discrete,With_Value
0601 BODY_05f8:
0601 00d8 | | Load_Top At_Offset_0
0602 4401 |D | Exit_Subprogram With_Result,0x1
0603 0000 0000 | | .BLANK 0000[0x5]
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060d | | .CONST 0x060d ; Address of begin
0609 0004 | | .CONST 0x0004 ; Address of exception handler
060a 0002 | | .CONST 0x0002 ; Number of locals
060b INIT_0608:
060b 029f 09bb | | Declare_Subprogram For_Call,INIT_09b8
060d BODY_0608:
060d e5ff | | Load 0x2,-0x1
060e 8402 | | Call 0x2,0x2
060f e5fe | | Load 0x2,-0x2
0610 8402 | | Call 0x2,0x2
0611 017f | | Execute Record,Equal
0612 4402 |D | Exit_Subprogram With_Result,0x2
0613 0000 0000 | | .BLANK 0000[0x5]
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 061b | | .CONST 0x061b ; Address of begin
0619 0004 | | .CONST 0x0004 ; Address of exception handler
061a 0001 | | .CONST 0x0001 ; Number of locals
061b BODY_0618:
061b INIT_0618:
061b 0092 0a21 | !| Action Push_String_Extended,0xa21 ; "Run the following on the remote machine:"
061d e014 | | Load 0x0,0x14
061e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
061f 0092 0a08 | | Action Push_String_Extended,0xa08 ; "Accept_Tokens"
0621 e225 | % | Load 0x1,0x25
0622 180d | | Execute Package,Field_Execute,Field_Number 0xd
0623 e5ff | | Load 0x2,-0x1
0624 e224 | $ | Load 0x1,0x24
0625 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0626 0092 0a2f | /| Action Push_String_Extended,0xa2f ; "Product"
0628 e225 | % | Load 0x1,0x25
0629 180e | | Execute Package,Field_Execute,Field_Number 0xe
062a 4820 |H | Short_Literal 0x20
062b 4800 |H | Short_Literal 0x0
062c 480a |H | Short_Literal 0xa
062d e5fe | | Load 0x2,-0x2
062e e008 | | Load 0x0,0x8
062f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0630 0092 0a30 | 0| Action Push_String_Extended,0xa30 ; "Donation"
0632 e225 | % | Load 0x1,0x25
0633 180e | | Execute Package,Field_Execute,Field_Number 0xe
0634 4820 |H | Short_Literal 0x20
0635 4800 |H | Short_Literal 0x0
0636 480a |H | Short_Literal 0xa
0637 e5fd | | Load 0x2,-0x3
0638 e008 | | Load 0x0,0x8
0639 1816 | | Execute Package,Field_Execute,Field_Number 0x16
063a 0092 0a31 | 1| Action Push_String_Extended,0xa31 ; "Resulting_Count"
063c e225 | % | Load 0x1,0x25
063d 180e | | Execute Package,Field_Execute,Field_Number 0xe
063e e5f9 | | Load 0x2,-0x7
063f e5fa | | Load 0x2,-0x6
0640 e5fb | | Load 0x2,-0x5
0641 e5fc | | Load 0x2,-0x4
0642 e5fd | | Load 0x2,-0x3
0643 e5fe | | Load 0x2,-0x2
0644 e5ff | | Load 0x2,-0x1
0645 822b | + | Call 0x1,0x2b
0646 e224 | $ | Load 0x1,0x24
0647 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0648 0092 0a23 | #| Action Push_String_Extended,0xa23 ; "Code"
064a e225 | % | Load 0x1,0x25
064b 180e | | Execute Package,Field_Execute,Field_Number 0xe
064c e5fa | | Load 0x2,-0x6
064d 01db | | Execute Vector,Length
064e 6807 |h | Jump_Zero 0x656
064f e5fa | | Load 0x2,-0x6
0650 e224 | $ | Load 0x1,0x24
0651 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0652 0092 0a32 | 2| Action Push_String_Extended,0xa32 ; "Authorization"
0654 e225 | % | Load 0x1,0x25
0655 180e | | Execute Package,Field_Execute,Field_Number 0xe
0656 e225 | % | Load 0x1,0x25
0657 180f | | Execute Package,Field_Execute,Field_Number 0xf
0658 4508 |E | Exit_Subprogram 0x8
0659 0000 0000 | | .BLANK 0000[0x7]
0660 ; --------------------------------------------------------------------------------------
0660 ; SUBPROGRAM
0660 ; --------------------------------------------------------------------------------------
0660 0663 | c | .CONST 0x0663 ; Address of begin
0661 0004 | | .CONST 0x0004 ; Address of exception handler
0662 0001 | | .CONST 0x0001 ; Number of locals
0663 BODY_0660:
0663 INIT_0660:
0663 0092 0a21 | !| Action Push_String_Extended,0xa21 ; "Run the following on the remote machine:"
0665 e014 | | Load 0x0,0x14
0666 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0667 0092 0a12 | | Action Push_String_Extended,0xa12 ; "Convert_Tokens"
0669 e225 | % | Load 0x1,0x25
066a 180d | | Execute Package,Field_Execute,Field_Number 0xd
066b e5ff | | Load 0x2,-0x1
066c e224 | $ | Load 0x1,0x24
066d 181e | | Execute Package,Field_Execute,Field_Number 0x1e
066e 0092 0a33 | 3| Action Push_String_Extended,0xa33 ; "Current_Product"
0670 e225 | % | Load 0x1,0x25
0671 180e | | Execute Package,Field_Execute,Field_Number 0xe
0672 e5fe | | Load 0x2,-0x2
0673 e224 | $ | Load 0x1,0x24
0674 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0675 0092 0a34 | 4| Action Push_String_Extended,0xa34 ; "New_Product"
0677 e225 | % | Load 0x1,0x25
0678 180e | | Execute Package,Field_Execute,Field_Number 0xe
0679 4820 |H | Short_Literal 0x20
067a 4800 |H | Short_Literal 0x0
067b 480a |H | Short_Literal 0xa
067c e5fd | | Load 0x2,-0x3
067d e008 | | Load 0x0,0x8
067e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
067f 0092 0a35 | 5| Action Push_String_Extended,0xa35 ; "Token_Count"
0681 e225 | % | Load 0x1,0x25
0682 180e | | Execute Package,Field_Execute,Field_Number 0xe
0683 e5fa | | Load 0x2,-0x6
0684 e5fb | | Load 0x2,-0x5
0685 e5fc | | Load 0x2,-0x4
0686 e5fd | | Load 0x2,-0x3
0687 e5fe | | Load 0x2,-0x2
0688 e5ff | | Load 0x2,-0x1
0689 822c | , | Call 0x1,0x2c
068a e224 | $ | Load 0x1,0x24
068b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
068c 0092 0a23 | #| Action Push_String_Extended,0xa23 ; "Code"
068e e225 | % | Load 0x1,0x25
068f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0690 e5fb | | Load 0x2,-0x5
0691 01db | | Execute Vector,Length
0692 6807 |h | Jump_Zero 0x69a
0693 e5fb | | Load 0x2,-0x5
0694 e224 | $ | Load 0x1,0x24
0695 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0696 0092 0a32 | 2| Action Push_String_Extended,0xa32 ; "Authorization"
0698 e225 | % | Load 0x1,0x25
0699 180e | | Execute Package,Field_Execute,Field_Number 0xe
069a e225 | % | Load 0x1,0x25
069b 180f | | Execute Package,Field_Execute,Field_Number 0xf
069c 4507 |E | Exit_Subprogram 0x7
069d 0000 0000 | | .XXX[0x3]
069f 0000 | |
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06a3 | | .CONST 0x06a3 ; Address of begin
06a1 0004 | | .CONST 0x0004 ; Address of exception handler
06a2 0001 | | .CONST 0x0001 ; Number of locals
06a3 BODY_06a0:
06a3 INIT_06a0:
06a3 e5ff | | Load 0x2,-0x1
06a4 e21f | | Load 0x1,0x1f
06a5 025f | _ | Execute Discrete,Not_In_Type
06a6 682d |h- | Jump_Zero 0x6d4
06a7 e5fc | | Load 0x2,-0x4
06a8 0092 0a36 | 6| Action Push_String_Extended,0xa36 ; "The legal range of "
06aa e5fe | | Load 0x2,-0x2
06ab 01cc | | Execute Vector,Catenate
06ac 0092 0a37 | 7| Action Push_String_Extended,0xa37 ; " for "
06ae 01cc | | Execute Vector,Catenate
06af e5fd | | Load 0x2,-0x3
06b0 01cc | | Execute Vector,Catenate
06b1 0092 0a38 | 8| Action Push_String_Extended,0xa38 ; " is "
06b3 01cc | | Execute Vector,Catenate
06b4 4820 |H | Short_Literal 0x20
06b5 4800 |H | Short_Literal 0x0
06b6 480a |H | Short_Literal 0xa
06b7 4800 |H | Short_Literal 0x0
06b8 e008 | | Load 0x0,0x8
06b9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06ba 01cc | | Execute Vector,Catenate
06bb 0092 0a39 | 9| Action Push_String_Extended,0xa39 ; ".."
06bd 01cc | | Execute Vector,Catenate
06be 4820 |H | Short_Literal 0x20
06bf 4800 |H | Short_Literal 0x0
06c0 480a |H | Short_Literal 0xa
06c1 4840 |H@ | Short_Literal 0x40
06c2 e008 | | Load 0x0,0x8
06c3 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06c4 01cc | | Execute Vector,Catenate
06c5 0092 0a3a | :| Action Push_String_Extended,0xa3a ; ", but the value specified ("
06c7 01cc | | Execute Vector,Catenate
06c8 4820 |H | Short_Literal 0x20
06c9 4800 |H | Short_Literal 0x0
06ca 480a |H | Short_Literal 0xa
06cb e5ff | | Load 0x2,-0x1
06cc e008 | | Load 0x0,0x8
06cd 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06ce 01cc | | Execute Vector,Catenate
06cf 0092 0a3b | ;| Action Push_String_Extended,0xa3b ; ") is outside that range"
06d1 01cc | | Execute Vector,Catenate
06d2 e224 | $ | Load 0x1,0x24
06d3 180d | | Execute Package,Field_Execute,Field_Number 0xd
06d4 4505 |E | Exit_Subprogram 0x5
06d5 0000 0000 | | .XXX[0x3]
06d7 0000 | |
06d8 ; --------------------------------------------------------------------------------------
06d8 ; SUBPROGRAM
06d8 ; --------------------------------------------------------------------------------------
06d8 06db | | .CONST 0x06db ; Address of begin
06d9 0004 | | .CONST 0x0004 ; Address of exception handler
06da 0001 | | .CONST 0x0001 ; Number of locals
06db BODY_06d8:
06db INIT_06d8:
06db e5ff | | Load 0x2,-0x1
06dc 01db | | Execute Vector,Length
06dd 7005 |p | Jump_Nonzero 0x6e3
06de e5fe | | Load 0x2,-0x2
06df 0092 0a3c | <| Action Push_String_Extended,0xa3c ; "Product name not specified."
06e1 e224 | $ | Load 0x1,0x24
06e2 180d | | Execute Package,Field_Execute,Field_Number 0xd
06e3 00cf | | Action Mark_Auxiliary
06e4 e5ff | | Load 0x2,-0x1
06e5 01d9 | | Execute Vector,Reverse_Bounds
06e6 0263 | c | Execute Discrete,Above_Bound
06e7 7018 |p | Jump_Nonzero 0x700
06e8 00d8 | | Load_Top At_Offset_0
06e9 e5ff | | Load 0x2,-0x1
06ea 01d7 | | Execute Vector,Field_Read
06eb 4820 |H | Short_Literal 0x20
06ec 487e |H~ | Short_Literal 0x7e
06ed 0261 | a | Execute Discrete,Not_In_Range
06ee 680f |h | Jump_Zero 0x6fe
06ef e5fe | | Load 0x2,-0x2
06f0 0092 0a3d | =| Action Push_String_Extended,0xa3d ; "Product name contains an illegal character ("
06f2 e404 | | Load 0x2,0x4
06f3 e5ff | | Load 0x2,-0x1
06f4 01d7 | | Execute Vector,Field_Read
06f5 00e8 | | Load_Encached Character_Cache
06f6 011c | | Execute Any,Convert_Unchecked
06f7 1c01 | | Execute_Immediate Run_Utility,0x1
06f8 01cc | | Execute Vector,Catenate
06f9 0092 0a10 | | Action Push_String_Extended,0xa10 ; ")."
06fb 01cc | | Execute Vector,Catenate
06fc e224 | $ | Load 0x1,0x24
06fd 180d | | Execute Package,Field_Execute,Field_Number 0xd
06fe 00c8 | | Action Pop_Auxiliary_Range
06ff 3fe8 |? | Loop_Increasing 0x6e8
0700 00ce | | Action Pop_Auxiliary
0701 e5ff | | Load 0x2,-0x1
0702 4820 |H | Short_Literal 0x20
0703 e5ff | | Load 0x2,-0x1
0704 e008 | | Load 0x0,0x8
0705 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0706 01de | | Execute Vector,Not_Equal
0707 6805 |h | Jump_Zero 0x70d
0708 e5fe | | Load 0x2,-0x2
0709 0092 0a3e | >| Action Push_String_Extended,0xa3e ; "Product name includes leading or trailing blanks."
070b e224 | $ | Load 0x1,0x24
070c 180d | | Execute Package,Field_Execute,Field_Number 0xd
070d 4503 |E | Exit_Subprogram 0x3
070e 0000 0000 | | .XXX[0x2]
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 0713 | | .CONST 0x0713 ; Address of begin
0711 0004 | | .CONST 0x0004 ; Address of exception handler
0712 0001 | | .CONST 0x0001 ; Number of locals
0713 BODY_0710:
0713 INIT_0710:
0713 e5ff | | Load 0x2,-0x1
0714 01db | | Execute Vector,Length
0715 7005 |p | Jump_Nonzero 0x71b
0716 e5fe | | Load 0x2,-0x2
0717 0092 0a3f | ?| Action Push_String_Extended,0xa3f ; "Site name not specified."
0719 e224 | $ | Load 0x1,0x24
071a 180d | | Execute Package,Field_Execute,Field_Number 0xd
071b 00cf | | Action Mark_Auxiliary
071c e5ff | | Load 0x2,-0x1
071d 01d9 | | Execute Vector,Reverse_Bounds
071e 0263 | c | Execute Discrete,Above_Bound
071f 7018 |p | Jump_Nonzero 0x738
0720 00d8 | | Load_Top At_Offset_0
0721 e5ff | | Load 0x2,-0x1
0722 01d7 | | Execute Vector,Field_Read
0723 4820 |H | Short_Literal 0x20
0724 487e |H~ | Short_Literal 0x7e
0725 0261 | a | Execute Discrete,Not_In_Range
0726 680f |h | Jump_Zero 0x736
0727 e5fe | | Load 0x2,-0x2
0728 0092 0a40 | @| Action Push_String_Extended,0xa40 ; "Site name contains an illegal character ("
072a e404 | | Load 0x2,0x4
072b e5ff | | Load 0x2,-0x1
072c 01d7 | | Execute Vector,Field_Read
072d 00e8 | | Load_Encached Character_Cache
072e 011c | | Execute Any,Convert_Unchecked
072f 1c01 | | Execute_Immediate Run_Utility,0x1
0730 01cc | | Execute Vector,Catenate
0731 0092 0a10 | | Action Push_String_Extended,0xa10 ; ")."
0733 01cc | | Execute Vector,Catenate
0734 e224 | $ | Load 0x1,0x24
0735 180d | | Execute Package,Field_Execute,Field_Number 0xd
0736 00c8 | | Action Pop_Auxiliary_Range
0737 3fe8 |? | Loop_Increasing 0x720
0738 00ce | | Action Pop_Auxiliary
0739 e5ff | | Load 0x2,-0x1
073a 4820 |H | Short_Literal 0x20
073b e5ff | | Load 0x2,-0x1
073c e008 | | Load 0x0,0x8
073d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
073e 01de | | Execute Vector,Not_Equal
073f 6805 |h | Jump_Zero 0x745
0740 e5fe | | Load 0x2,-0x2
0741 0092 0a41 | A| Action Push_String_Extended,0xa41 ; "Site name includes leading or trailing blanks."
0743 e224 | $ | Load 0x1,0x24
0744 180d | | Execute Package,Field_Execute,Field_Number 0xd
0745 4503 |E | Exit_Subprogram 0x3
0746 0000 0000 | | .XXX[0x2]
0748 ; --------------------------------------------------------------------------------------
0748 ; SUBPROGRAM
0748 ; --------------------------------------------------------------------------------------
0748 074d | M | .CONST 0x074d ; Address of begin
0749 0004 | | .CONST 0x0004 ; Address of exception handler
074a 0002 | | .CONST 0x0002 ; Number of locals
074b INIT_0748:
074b 029f 09db | | Declare_Subprogram For_Call,INIT_09d8
074d BODY_0748:
074d 4820 |H | Short_Literal 0x20
074e e5ff | | Load 0x2,-0x1
074f e008 | | Load 0x0,0x8
0750 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0751 01db | | Execute Vector,Length
0752 7001 |p | Jump_Nonzero 0x754
0753 4503 |E | Exit_Subprogram 0x3
0754 00cf | | Action Mark_Auxiliary
0755 e5ff | | Load 0x2,-0x1
0756 01d9 | | Execute Vector,Reverse_Bounds
0757 0263 | c | Execute Discrete,Above_Bound
0758 7018 |p | Jump_Nonzero 0x771
0759 00d8 | | Load_Top At_Offset_0
075a e5ff | | Load 0x2,-0x1
075b 01d7 | | Execute Vector,Field_Read
075c 4820 |H | Short_Literal 0x20
075d 487e |H~ | Short_Literal 0x7e
075e 0261 | a | Execute Discrete,Not_In_Range
075f 680f |h | Jump_Zero 0x76f
0760 e5fe | | Load 0x2,-0x2
0761 0092 0a42 | B| Action Push_String_Extended,0xa42 ; "Date contains an illegal character ("
0763 e405 | | Load 0x2,0x5
0764 e5ff | | Load 0x2,-0x1
0765 01d7 | | Execute Vector,Field_Read
0766 00e8 | | Load_Encached Character_Cache
0767 011c | | Execute Any,Convert_Unchecked
0768 1c01 | | Execute_Immediate Run_Utility,0x1
0769 01cc | | Execute Vector,Catenate
076a 0092 0a10 | | Action Push_String_Extended,0xa10 ; ")."
076c 01cc | | Execute Vector,Catenate
076d e224 | $ | Load 0x1,0x24
076e 180d | | Execute Package,Field_Execute,Field_Number 0xd
076f 00c8 | | Action Pop_Auxiliary_Range
0770 3fe8 |? | Loop_Increasing 0x759
0771 00ce | | Action Pop_Auxiliary
0772 8402 | | Call 0x2,0x2
0773 4503 |E | Exit_Subprogram 0x3
0774 0000 0000 | | .BLANK 0000[0x4]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 0781 | | .CONST 0x0781 ; Address of begin
0779 0004 | | .CONST 0x0004 ; Address of exception handler
077a 0003 | | .CONST 0x0003 ; Number of locals
077b INIT_0778:
077b e5ff | | Load 0x2,-0x1
077c 823a | : | Call 0x1,0x3a
077d 00e3 | | Load_Encached Natural_Cache
077e 03f1 | | Declare_Variable Discrete,With_Value
077f 029f 09f3 | | Declare_Subprogram For_Call,INIT_09f0
0781 BODY_0778:
0781 e5fc | | Load 0x2,-0x4
0782 e5ff | | Load 0x2,-0x1
0783 0092 0a30 | 0| Action Push_String_Extended,0xa30 ; "Donation"
0785 e5fe | | Load 0x2,-0x2
0786 8233 | 3 | Call 0x1,0x33
0787 e5fc | | Load 0x2,-0x4
0788 e5ff | | Load 0x2,-0x1
0789 0092 0a31 | 1| Action Push_String_Extended,0xa31 ; "Resulting_Count"
078b e5fd | | Load 0x2,-0x3
078c 8233 | 3 | Call 0x1,0x33
078d e5fe | | Load 0x2,-0x2
078e e5fd | | Load 0x2,-0x3
078f 027d | } | Execute Discrete,Greater
0790 681e |h | Jump_Zero 0x7af
0791 e5fc | | Load 0x2,-0x4
0792 0092 0a43 | C| Action Push_String_Extended,0xa43 ; "The number of tokens ("
0794 4820 |H | Short_Literal 0x20
0795 4800 |H | Short_Literal 0x0
0796 480a |H | Short_Literal 0xa
0797 e5fe | | Load 0x2,-0x2
0798 e008 | | Load 0x0,0x8
0799 1816 | | Execute Package,Field_Execute,Field_Number 0x16
079a 01cc | | Execute Vector,Catenate
079b 0092 0a44 | D| Action Push_String_Extended,0xa44 ; ") for "
079d 01cc | | Execute Vector,Catenate
079e e5ff | | Load 0x2,-0x1
079f 01cc | | Execute Vector,Catenate
07a0 0092 0a45 | E| Action Push_String_Extended,0xa45 ; " exceeds the target authorization ("
07a2 01cc | | Execute Vector,Catenate
07a3 4820 |H | Short_Literal 0x20
07a4 4800 |H | Short_Literal 0x0
07a5 480a |H | Short_Literal 0xa
07a6 e5fd | | Load 0x2,-0x3
07a7 e008 | | Load 0x0,0x8
07a8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
07a9 01cc | | Execute Vector,Catenate
07aa 0092 0a10 | | Action Push_String_Extended,0xa10 ; ")."
07ac 01cc | | Execute Vector,Catenate
07ad e224 | $ | Load 0x1,0x24
07ae 180d | | Execute Package,Field_Execute,Field_Number 0xd
07af e5fe | | Load 0x2,-0x2
07b0 e5fd | | Load 0x2,-0x3
07b1 027f | | Execute Discrete,Equal
07b2 6820 |h | Jump_Zero 0x7d3
07b3 4801 |H | Short_Literal 0x1
07b4 e220 | | Load 0x1,0x20
07b5 e5ff | | Load 0x2,-0x1
07b6 e008 | | Load 0x0,0x8
07b7 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
07b8 6805 |h | Jump_Zero 0x7be
07b9 e221 | ! | Load 0x1,0x21
07ba 8403 | | Call 0x2,0x3
07bb e222 | " | Load 0x1,0x22
07bc 8403 | | Call 0x2,0x3
07bd 4505 |E | Exit_Subprogram 0x5
07be 4801 |H | Short_Literal 0x1
07bf e221 | ! | Load 0x1,0x21
07c0 e5ff | | Load 0x2,-0x1
07c1 e008 | | Load 0x0,0x8
07c2 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
07c3 6805 |h | Jump_Zero 0x7c9
07c4 e220 | | Load 0x1,0x20
07c5 8403 | | Call 0x2,0x3
07c6 e222 | " | Load 0x1,0x22
07c7 8403 | | Call 0x2,0x3
07c8 4505 |E | Exit_Subprogram 0x5
07c9 4801 |H | Short_Literal 0x1
07ca e222 | " | Load 0x1,0x22
07cb e5ff | | Load 0x2,-0x1
07cc e008 | | Load 0x0,0x8
07cd 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
07ce 6804 |h | Jump_Zero 0x7d3
07cf e221 | ! | Load 0x1,0x21
07d0 8403 | | Call 0x2,0x3
07d1 e220 | | Load 0x1,0x20
07d2 8403 | | Call 0x2,0x3
07d3 4505 |E | Exit_Subprogram 0x5
07d4 0000 0000 | | .BLANK 0000[0x4]
07d8 ; --------------------------------------------------------------------------------------
07d8 ; SUBPROGRAM
07d8 ; --------------------------------------------------------------------------------------
07d8 07db | | .CONST 0x07db ; Address of begin
07d9 0004 | | .CONST 0x0004 ; Address of exception handler
07da 0001 | | .CONST 0x0001 ; Number of locals
07db BODY_07d8:
07db INIT_07d8:
07db e5fe | | Load 0x2,-0x2
07dc 01db | | Execute Vector,Length
07dd 680a |h | Jump_Zero 0x7e8
07de e5fd | | Load 0x2,-0x3
07df 01db | | Execute Vector,Length
07e0 6807 |h | Jump_Zero 0x7e8
07e1 e5fc | | Load 0x2,-0x4
07e2 0092 0a46 | F| Action Push_String_Extended,0xa46 ; "Cannot specify both authorization and date for "
07e4 e5ff | | Load 0x2,-0x1
07e5 01cc | | Execute Vector,Catenate
07e6 e224 | $ | Load 0x1,0x24
07e7 180d | | Execute Package,Field_Execute,Field_Number 0xd
07e8 4505 |E | Exit_Subprogram 0x5
07e9 0000 0000 | | .BLANK 0000[0x7]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07fb | | .CONST 0x07fb ; Address of begin
07f1 0004 | | .CONST 0x0004 ; Address of exception handler
07f2 0003 | | .CONST 0x0003 ; Number of locals
07f3 INIT_07f0:
07f3 e5ff | | Load 0x2,-0x1
07f4 823a | : | Call 0x1,0x3a
07f5 00e3 | | Load_Encached Natural_Cache
07f6 03f1 | | Declare_Variable Discrete,With_Value
07f7 e5ff | | Load 0x2,-0x1
07f8 823c | < | Call 0x1,0x3c
07f9 00e3 | | Load_Encached Natural_Cache
07fa 03f1 | | Declare_Variable Discrete,With_Value
07fb BODY_07f0:
07fb e402 | | Load 0x2,0x2
07fc 700a |p | Jump_Nonzero 0x807
07fd e5fd | | Load 0x2,-0x3
07fe 0092 0a47 | G| Action Push_String_Extended,0xa47 ; "There are currently no tokens for "
0800 e5ff | | Load 0x2,-0x1
0801 01cc | | Execute Vector,Catenate
0802 0092 0a48 | H| Action Push_String_Extended,0xa48 ; ", so they can't be donated."
0804 01cc | | Execute Vector,Catenate
0805 e224 | $ | Load 0x1,0x24
0806 180d | | Execute Package,Field_Execute,Field_Number 0xd
0807 e5fe | | Load 0x2,-0x2
0808 e402 | | Load 0x2,0x2
0809 027d | } | Execute Discrete,Greater
080a 681e |h | Jump_Zero 0x829
080b e5fd | | Load 0x2,-0x3
080c 0092 0a49 | I| Action Push_String_Extended,0xa49 ; "The requested donation ("
080e 4820 |H | Short_Literal 0x20
080f 4800 |H | Short_Literal 0x0
0810 480a |H | Short_Literal 0xa
0811 e5fe | | Load 0x2,-0x2
0812 e008 | | Load 0x0,0x8
0813 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0814 01cc | | Execute Vector,Catenate
0815 0092 0a44 | D| Action Push_String_Extended,0xa44 ; ") for "
0817 01cc | | Execute Vector,Catenate
0818 e5ff | | Load 0x2,-0x1
0819 01cc | | Execute Vector,Catenate
081a 0092 0a4a | J| Action Push_String_Extended,0xa4a ; "exceeds the current limit ("
081c 01cc | | Execute Vector,Catenate
081d 4820 |H | Short_Literal 0x20
081e 4800 |H | Short_Literal 0x0
081f 480a |H | Short_Literal 0xa
0820 e402 | | Load 0x2,0x2
0821 e008 | | Load 0x0,0x8
0822 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0823 01cc | | Execute Vector,Catenate
0824 0092 0a10 | | Action Push_String_Extended,0xa10 ; ")."
0826 01cc | | Execute Vector,Catenate
0827 e224 | $ | Load 0x1,0x24
0828 180d | | Execute Package,Field_Execute,Field_Number 0xd
0829 e402 | | Load 0x2,0x2
082a e5fe | | Load 0x2,-0x2
082b 0272 | r | Execute Discrete,Minus
082c e403 | | Load 0x2,0x3
082d 027c | | | Execute Discrete,Less
082e 6814 |h | Jump_Zero 0x843
082f e5fd | | Load 0x2,-0x3
0830 0092 0a4b | K| Action Push_String_Extended,0xa4b ; "Donation of "
0832 4820 |H | Short_Literal 0x20
0833 4800 |H | Short_Literal 0x0
0834 480a |H | Short_Literal 0xa
0835 e5fe | | Load 0x2,-0x2
0836 e008 | | Load 0x0,0x8
0837 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0838 01cc | | Execute Vector,Catenate
0839 0092 0a4c | L| Action Push_String_Extended,0xa4c ; " tokens for "
083b 01cc | | Execute Vector,Catenate
083c e5ff | | Load 0x2,-0x1
083d 01cc | | Execute Vector,Catenate
083e 0092 0a4d | M| Action Push_String_Extended,0xa4d ; " would transfer tokens currently in use."
0840 01cc | | Execute Vector,Catenate
0841 e224 | $ | Load 0x1,0x24
0842 180d | | Execute Package,Field_Execute,Field_Number 0xd
0843 e402 | | Load 0x2,0x2
0844 e5fe | | Load 0x2,-0x2
0845 0272 | r | Execute Discrete,Minus
0846 00d8 | | Load_Top At_Offset_0
0847 00e3 | | Load_Encached Natural_Cache
0848 0260 | ` | Execute Discrete,In_Type
0849 7001 |p | Jump_Nonzero 0x84b
084a 0801 | | Execute_Immediate Raise,0x1
084b e5ff | | Load 0x2,-0x1
084c e012 | | Load 0x0,0x12
084d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
084e e5fd | | Load 0x2,-0x3
084f 0092 0a4b | K| Action Push_String_Extended,0xa4b ; "Donation of "
0851 4820 |H | Short_Literal 0x20
0852 4800 |H | Short_Literal 0x0
0853 480a |H | Short_Literal 0xa
0854 e5fe | | Load 0x2,-0x2
0855 e008 | | Load 0x0,0x8
0856 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0857 01cc | | Execute Vector,Catenate
0858 0092 0a4c | L| Action Push_String_Extended,0xa4c ; " tokens for "
085a 01cc | | Execute Vector,Catenate
085b e5ff | | Load 0x2,-0x1
085c 01cc | | Execute Vector,Catenate
085d 0092 0a4e | N| Action Push_String_Extended,0xa4e ; " has resulted in "
085f 01cc | | Execute Vector,Catenate
0860 4820 |H | Short_Literal 0x20
0861 4800 |H | Short_Literal 0x0
0862 480a |H | Short_Literal 0xa
0863 e5ff | | Load 0x2,-0x1
0864 823a | : | Call 0x1,0x3a
0865 e008 | | Load 0x0,0x8
0866 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0867 01cc | | Execute Vector,Catenate
0868 0092 0a4f | O| Action Push_String_Extended,0xa4f ; " tokens."
086a 01cc | | Execute Vector,Catenate
086b e224 | $ | Load 0x1,0x24
086c 180f | | Execute Package,Field_Execute,Field_Number 0xf
086d 4504 |E | Exit_Subprogram 0x4
086e 0000 0000 | | .XXX[0x2]
0870 ; --------------------------------------------------------------------------------------
0870 ; SUBPROGRAM
0870 ; --------------------------------------------------------------------------------------
0870 0873 | s | .CONST 0x0873 ; Address of begin
0871 0877 | w | .CONST 0x0877 ; Address of exception handler
0872 0001 | | .CONST 0x0001 ; Number of locals
0873 BODY_0870:
0873 INIT_0870:
0873 e5ff | | Load 0x2,-0x1
0874 e012 | | Load 0x0,0x12
0875 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0876 4401 |D | Exit_Subprogram With_Result,0x1
0877 TRAP_0870:
0877 0007 | | Action Break_Optional
0878 4800 |H | Short_Literal 0x0
0879 4401 |D | Exit_Subprogram With_Result,0x1
087a 0000 0000 | | .BLANK 0000[0x6]
0880 ; --------------------------------------------------------------------------------------
0880 ; SUBPROGRAM
0880 ; --------------------------------------------------------------------------------------
0880 0883 | | .CONST 0x0883 ; Address of begin
0881 0887 | | .CONST 0x0887 ; Address of exception handler
0882 0001 | | .CONST 0x0001 ; Number of locals
0883 BODY_0880:
0883 INIT_0880:
0883 e5ff | | Load 0x2,-0x1
0884 e012 | | Load 0x0,0x12
0885 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0886 4401 |D | Exit_Subprogram With_Result,0x1
0887 TRAP_0880:
0887 0007 | | Action Break_Optional
0888 4800 |H | Short_Literal 0x0
0889 4401 |D | Exit_Subprogram With_Result,0x1
088a 0000 0000 | | .BLANK 0000[0x6]
0890 ; --------------------------------------------------------------------------------------
0890 ; SUBPROGRAM
0890 ; --------------------------------------------------------------------------------------
0890 0893 | | .CONST 0x0893 ; Address of begin
0891 0897 | | .CONST 0x0897 ; Address of exception handler
0892 0001 | | .CONST 0x0001 ; Number of locals
0893 BODY_0890:
0893 INIT_0890:
0893 e5ff | | Load 0x2,-0x1
0894 e012 | | Load 0x0,0x12
0895 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0896 4401 |D | Exit_Subprogram With_Result,0x1
0897 TRAP_0890:
0897 0007 | | Action Break_Optional
0898 4800 |H | Short_Literal 0x0
0899 4401 |D | Exit_Subprogram With_Result,0x1
089a 0000 0000 | | .BLANK 0000[0x6]
08a0 ; --------------------------------------------------------------------------------------
08a0 ; SUBPROGRAM
08a0 ; --------------------------------------------------------------------------------------
08a0 08ad | | .CONST 0x08ad ; Address of begin
08a1 0004 | | .CONST 0x0004 ; Address of exception handler
08a2 0005 | | .CONST 0x0005 ; Number of locals
08a3 INIT_08a0:
08a3 0092 0a08 | | Action Push_String_Extended,0xa08 ; "Accept_Tokens"
08a5 e004 | | Load 0x0,0x4
08a6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08a7 02c7 | | Declare_Variable Any
08a8 e004 | | Load 0x0,0x4
08a9 180e | | Execute Package,Field_Execute,Field_Number 0xe
08aa a403 | | Store_Unchecked 0x2,0x3
08ab 00e3 | | Load_Encached Natural_Cache
08ac 00e3 | | Load_Encached Natural_Cache
08ad BODY_08a0:
08ad e5fa | | Load 0x2,-0x6
08ae 01db | | Execute Vector,Length
08af 7009 |p | Jump_Nonzero 0x8b9
08b0 e226 | & | Load 0x1,0x26
08b1 180e | | Execute Package,Field_Execute,Field_Number 0xe
08b2 822f | / | Call 0x1,0x2f
08b3 6805 |h | Jump_Zero 0x8b9
08b4 e403 | | Load 0x2,0x3
08b5 0092 0a50 | P| Action Push_String_Extended,0xa50 ; "This machine has donated tokens today; it may not also accept them"
08b7 e224 | $ | Load 0x1,0x24
08b8 180d | | Execute Package,Field_Execute,Field_Number 0xd
08b9 e403 | | Load 0x2,0x3
08ba e5ff | | Load 0x2,-0x1
08bb 8234 | 4 | Call 0x1,0x34
08bc e403 | | Load 0x2,0x3
08bd e5fc | | Load 0x2,-0x4
08be e5fd | | Load 0x2,-0x3
08bf e5fe | | Load 0x2,-0x2
08c0 8237 | 7 | Call 0x1,0x37
08c1 e5fe | | Load 0x2,-0x2
08c2 823a | : | Call 0x1,0x3a
08c3 a405 | | Store_Unchecked 0x2,0x5
08c4 00d8 | | Load_Top At_Offset_0
08c5 e5fd | | Load 0x2,-0x3
08c6 0273 | s | Execute Discrete,Plus
08c7 c404 | | Store 0x2,0x4
08c8 e404 | | Load 0x2,0x4
08c9 e5fc | | Load 0x2,-0x4
08ca 027e | ~ | Execute Discrete,Not_Equal
08cb 6837 |h7 | Jump_Zero 0x903
08cc e403 | | Load 0x2,0x3
08cd 0092 0a51 | Q| Action Push_String_Extended,0xa51 ; "The sum of currently authorized tokens and Donations ("
08cf 4820 |H | Short_Literal 0x20
08d0 4800 |H | Short_Literal 0x0
08d1 480a |H | Short_Literal 0xa
08d2 e405 | | Load 0x2,0x5
08d3 e008 | | Load 0x0,0x8
08d4 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08d5 01cc | | Execute Vector,Catenate
08d6 0092 0a52 | R| Action Push_String_Extended,0xa52 ; "("
08d8 01cc | | Execute Vector,Catenate
08d9 e5fe | | Load 0x2,-0x2
08da 01cc | | Execute Vector,Catenate
08db 0092 0a53 | S| Action Push_String_Extended,0xa53 ; ") +"
08dd 01cc | | Execute Vector,Catenate
08de 4820 |H | Short_Literal 0x20
08df 4800 |H | Short_Literal 0x0
08e0 480a |H | Short_Literal 0xa
08e1 e5fd | | Load 0x2,-0x3
08e2 e008 | | Load 0x0,0x8
08e3 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08e4 01cc | | Execute Vector,Catenate
08e5 0092 0a52 | R| Action Push_String_Extended,0xa52 ; "("
08e7 01cc | | Execute Vector,Catenate
08e8 e5ff | | Load 0x2,-0x1
08e9 01cc | | Execute Vector,Catenate
08ea 0092 0a54 | T| Action Push_String_Extended,0xa54 ; ") ="
08ec 01cc | | Execute Vector,Catenate
08ed 4820 |H | Short_Literal 0x20
08ee 4800 |H | Short_Literal 0x0
08ef 480a |H | Short_Literal 0xa
08f0 e404 | | Load 0x2,0x4
08f1 e008 | | Load 0x0,0x8
08f2 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08f3 01cc | | Execute Vector,Catenate
08f4 0092 0a55 | U| Action Push_String_Extended,0xa55 ; ") is NOT equal to Resulting_Count parameter ("
08f6 01cc | | Execute Vector,Catenate
08f7 4820 |H | Short_Literal 0x20
08f8 4800 |H | Short_Literal 0x0
08f9 480a |H | Short_Literal 0xa
08fa e5fc | | Load 0x2,-0x4
08fb e008 | | Load 0x0,0x8
08fc 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08fd 01cc | | Execute Vector,Catenate
08fe 0092 0a15 | | Action Push_String_Extended,0xa15 ; "); these must be equal in order to proceed."
0900 01cc | | Execute Vector,Catenate
0901 e224 | $ | Load 0x1,0x24
0902 180d | | Execute Package,Field_Execute,Field_Number 0xd
0903 e5fa | | Load 0x2,-0x6
0904 e5fb | | Load 0x2,-0x5
0905 e5fc | | Load 0x2,-0x4
0906 e5fd | | Load 0x2,-0x3
0907 e5ff | | Load 0x2,-0x1
0908 822d | - | Call 0x1,0x2d
0909 701a |p | Jump_Nonzero 0x924
090a e403 | | Load 0x2,0x3
090b 0092 0a56 | V| Action Push_String_Extended,0xa56 ; "The code provided does NOT match the request being made. This might be caused by a transcription error of the code, an attempt to transfer between sites without Rational assistance, a transcription error of the Site of this machine ("
090d 8210 | | Call 0x1,0x10
090e 01cc | | Execute Vector,Catenate
090f 0092 0a57 | W| Action Push_String_Extended,0xa57 ; "), a transcription error of the Machine ID of this machine ("
0911 01cc | | Execute Vector,Catenate
0912 4820 |H | Short_Literal 0x20
0913 4800 |H | Short_Literal 0x0
0914 480a |H | Short_Literal 0xa
0915 8211 | | Call 0x1,0x11
0916 e008 | | Load 0x0,0x8
0917 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0918 01cc | | Execute Vector,Catenate
0919 0092 0a17 | | Action Push_String_Extended,0xa17 ; "), a delay in posting the request (code only valid for one day), "
091b 01cc | | Execute Vector,Catenate
091c 0092 0a18 | | Action Push_String_Extended,0xa18 ; "or some other combination of parameter problems. "
091e 01cc | | Execute Vector,Catenate
091f 0092 0a19 | | Action Push_String_Extended,0xa19 ; "Contact your Rational representative for further assistance."
0921 01cc | | Execute Vector,Catenate
0922 e224 | $ | Load 0x1,0x24
0923 180d | | Execute Package,Field_Execute,Field_Number 0xd
0924 e5fa | | Load 0x2,-0x6
0925 01db | | Execute Vector,Length
0926 680a |h | Jump_Zero 0x931
0927 e5fa | | Load 0x2,-0x6
0928 e5fe | | Load 0x2,-0x2
0929 e226 | & | Load 0x1,0x26
092a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
092b 7005 |p | Jump_Nonzero 0x931
092c e403 | | Load 0x2,0x3
092d 0092 0a1a | | Action Push_String_Extended,0xa1a ; "The authorization provided has been used previously for this product. It must be unique for this machine for all time."
092f e224 | $ | Load 0x1,0x24
0930 180d | | Execute Package,Field_Execute,Field_Number 0xd
0931 e5fe | | Load 0x2,-0x2
0932 e013 | | Load 0x0,0x13
0933 180e | | Execute Package,Field_Execute,Field_Number 0xe
0934 7009 |p | Jump_Nonzero 0x93e
0935 00ea | | Load_Encached Null_String_Cache
0936 00ea | | Load_Encached Null_String_Cache
0937 8211 | | Call 0x1,0x11
0938 e5fe | | Load 0x2,-0x2
0939 e013 | | Load 0x0,0x13
093a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
093b e5fe | | Load 0x2,-0x2
093c e013 | | Load 0x0,0x13
093d 180d | | Execute Package,Field_Execute,Field_Number 0xd
093e e5fc | | Load 0x2,-0x4
093f e5fe | | Load 0x2,-0x2
0940 e012 | | Load 0x0,0x12
0941 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0942 e5fe | | Load 0x2,-0x2
0943 823b | ; | Call 0x1,0x3b
0944 7004 |p | Jump_Nonzero 0x949
0945 480c |H | Short_Literal 0xc
0946 e5fe | | Load 0x2,-0x2
0947 e012 | | Load 0x0,0x12
0948 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0949 e403 | | Load 0x2,0x3
094a e5fe | | Load 0x2,-0x2
094b 0092 0a1b | | Action Push_String_Extended,0xa1b ; " tokens set to "
094d 01cc | | Execute Vector,Catenate
094e 4820 |H | Short_Literal 0x20
094f 4800 |H | Short_Literal 0x0
0950 480a |H | Short_Literal 0xa
0951 e5fc | | Load 0x2,-0x4
0952 e008 | | Load 0x0,0x8
0953 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0954 01cc | | Execute Vector,Catenate
0955 e224 | $ | Load 0x1,0x24
0956 180f | | Execute Package,Field_Execute,Field_Number 0xf
0957 e5fa | | Load 0x2,-0x6
0958 01db | | Execute Vector,Length
0959 7004 |p | Jump_Nonzero 0x95e
095a e00d | | Load 0x0,0xd
095b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
095c e226 | & | Load 0x1,0x26
095d 180f | | Execute Package,Field_Execute,Field_Number 0xf
095e e226 | & | Load 0x1,0x26
095f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0960 4508 |E | Exit_Subprogram 0x8
0961 0000 0000 | | .BLANK 0000[0x7]
0968 ; --------------------------------------------------------------------------------------
0968 ; SUBPROGRAM
0968 ; --------------------------------------------------------------------------------------
0968 0971 | q | .CONST 0x0971 ; Address of begin
0969 0004 | | .CONST 0x0004 ; Address of exception handler
096a 0002 | | .CONST 0x0002 ; Number of locals
096b INIT_0968:
096b e5ff | | Load 0x2,-0x1
096c e012 | | Load 0x0,0x12
096d 180e | | Execute Package,Field_Execute,Field_Number 0xe
096e e012 | | Load 0x0,0x12
096f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0970 03f1 | | Declare_Variable Discrete,With_Value
0971 BODY_0968:
0971 00d8 | | Load_Top At_Offset_0
0972 6804 |h | Jump_Zero 0x977
0973 00d8 | | Load_Top At_Offset_0
0974 e012 | | Load 0x0,0x12
0975 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0976 4401 |D | Exit_Subprogram With_Result,0x1
0977 4800 |H | Short_Literal 0x0
0978 4401 |D | Exit_Subprogram With_Result,0x1
0979 0000 0000 | | .BLANK 0000[0x7]
0980 ; --------------------------------------------------------------------------------------
0980 ; SUBPROGRAM
0980 ; --------------------------------------------------------------------------------------
0980 0983 | | .CONST 0x0983 ; Address of begin
0981 0004 | | .CONST 0x0004 ; Address of exception handler
0982 0001 | | .CONST 0x0001 ; Number of locals
0983 BODY_0980:
0983 INIT_0980:
0983 4801 |H | Short_Literal 0x1
0984 e220 | | Load 0x1,0x20
0985 e5ff | | Load 0x2,-0x1
0986 e008 | | Load 0x0,0x8
0987 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0988 700c |p | Jump_Nonzero 0x995
0989 4801 |H | Short_Literal 0x1
098a e221 | ! | Load 0x1,0x21
098b e5ff | | Load 0x2,-0x1
098c e008 | | Load 0x0,0x8
098d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
098e 7006 |p | Jump_Nonzero 0x995
098f 4801 |H | Short_Literal 0x1
0990 e222 | " | Load 0x1,0x22
0991 e5ff | | Load 0x2,-0x1
0992 e008 | | Load 0x0,0x8
0993 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0994 680c |h | Jump_Zero 0x9a1
0995 e221 | ! | Load 0x1,0x21
0996 823e | > | Call 0x1,0x3e
0997 6802 |h | Jump_Zero 0x99a
0998 e221 | ! | Load 0x1,0x21
0999 4401 |D | Exit_Subprogram With_Result,0x1
099a e222 | " | Load 0x1,0x22
099b 823e | > | Call 0x1,0x3e
099c 6802 |h | Jump_Zero 0x99f
099d e222 | " | Load 0x1,0x22
099e 4401 |D | Exit_Subprogram With_Result,0x1
099f e220 | | Load 0x1,0x20
09a0 4401 |D | Exit_Subprogram With_Result,0x1
09a1 e5ff | | Load 0x2,-0x1
09a2 4401 |D | Exit_Subprogram With_Result,0x1
09a3 0000 0000 | | .BLANK 0000[0x5]
09a8 ; --------------------------------------------------------------------------------------
09a8 ; SUBPROGRAM
09a8 ; --------------------------------------------------------------------------------------
09a8 09ad | | .CONST 0x09ad ; Address of begin
09a9 0004 | | .CONST 0x0004 ; Address of exception handler
09aa 0002 | | .CONST 0x0002 ; Number of locals
09ab INIT_09a8:
09ab 0092 0a58 | X| Action Push_String_Extended,0xa58 ; "1/1/90"
09ad BODY_09a8:
09ad 00d8 | | Load_Top At_Offset_0
09ae e602 | | Load 0x3,0x2
09af 8211 | | Call 0x1,0x11
09b0 e5ff | | Load 0x2,-0x1
09b1 e013 | | Load 0x0,0x13
09b2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
09b3 e5ff | | Load 0x2,-0x1
09b4 e013 | | Load 0x0,0x13
09b5 180d | | Execute Package,Field_Execute,Field_Number 0xd
09b6 4501 |E | Exit_Subprogram 0x1
09b7 0000 | | .XXX[0x1]
09b8 ; --------------------------------------------------------------------------------------
09b8 ; SUBPROGRAM
09b8 ; --------------------------------------------------------------------------------------
09b8 09c3 | | .CONST 0x09c3 ; Address of begin
09b9 0004 | | .CONST 0x0004 ; Address of exception handler
09ba 0002 | | .CONST 0x0002 ; Number of locals
09bb INIT_09b8:
09bb e002 | | Load 0x0,0x2
09bc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09bd 0322 | " | Declare_Variable Record
09be e7ff | | Load 0x3,-0x1
09bf e002 | | Load 0x0,0x2
09c0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
09c1 e602 | | Load 0x3,0x2
09c2 017d | } | Execute Record,Structure_Write
09c3 BODY_09b8:
09c3 4800 |H | Short_Literal 0x0
09c4 e602 | | Load 0x3,0x2
09c5 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
09c6 4800 |H | Short_Literal 0x0
09c7 e602 | | Load 0x3,0x2
09c8 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
09c9 4801 |H | Short_Literal 0x1
09ca e602 | | Load 0x3,0x2
09cb 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
09cc 4800 |H | Short_Literal 0x0
09cd e602 | | Load 0x3,0x2
09ce 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
09cf 00d8 | | Load_Top At_Offset_0
09d0 4401 |D | Exit_Subprogram With_Result,0x1
09d1 0000 0000 | | .BLANK 0000[0x7]
09d8 ; --------------------------------------------------------------------------------------
09d8 ; SUBPROGRAM
09d8 ; --------------------------------------------------------------------------------------
09d8 09de | | .CONST 0x09de ; Address of begin
09d9 09e4 | | .CONST 0x09e4 ; Address of exception handler
09da 0002 | | .CONST 0x0002 ; Number of locals
09db INIT_09d8:
09db e002 | | Load 0x0,0x2
09dc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09dd 0322 | " | Declare_Variable Record
09de BODY_09d8:
09de e5ff | | Load 0x2,-0x1
09df e002 | | Load 0x0,0x2
09e0 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
09e1 e602 | | Load 0x3,0x2
09e2 017d | } | Execute Record,Structure_Write
09e3 4501 |E | Exit_Subprogram 0x1
09e4 TRAP_09d8:
09e4 0007 | | Action Break_Optional
09e5 e5fe | | Load 0x2,-0x2
09e6 0092 0a59 | Y| Action Push_String_Extended,0xa59 ; "Date ("
09e8 e5ff | | Load 0x2,-0x1
09e9 01cc | | Execute Vector,Catenate
09ea 0092 0a5a | Z| Action Push_String_Extended,0xa5a ; ") doesn't represent a legal date."
09ec 01cc | | Execute Vector,Catenate
09ed e224 | $ | Load 0x1,0x24
09ee 180d | | Execute Package,Field_Execute,Field_Number 0xd
09ef 4501 |E | Exit_Subprogram 0x1
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 09f3 | | .CONST 0x09f3 ; Address of begin
09f1 0004 | | .CONST 0x0004 ; Address of exception handler
09f2 0001 | | .CONST 0x0001 ; Number of locals
09f3 BODY_09f0:
09f3 INIT_09f0:
09f3 e7ff | | Load 0x3,-0x1
09f4 823e | > | Call 0x1,0x3e
09f5 680e |h | Jump_Zero 0xa04
09f6 e5fc | | Load 0x2,-0x4
09f7 482e |H. | Short_Literal 0x2e
09f8 0092 0a5b | [| Action Push_String_Extended,0xa5b ; "Active tokens for "
09fa e7ff | | Load 0x3,-0x1
09fb 01cc | | Execute Vector,Catenate
09fc 0092 0a5c | \| Action Push_String_Extended,0xa5c ; " make it impossible to accept tokens for "
09fe 01cc | | Execute Vector,Catenate
09ff e5ff | | Load 0x2,-0x1
0a00 01cc | | Execute Vector,Catenate
0a01 01cb | | Execute Vector,Append
0a02 e224 | $ | Load 0x1,0x24
0a03 180d | | Execute Package,Field_Execute,Field_Number 0xd
0a04 4502 |E | Exit_Subprogram 0x2
0a05 ; --------------------------------------------------------------------------------------
0a05 ; STRING TABLE
0a05 ; --------------------------------------------------------------------------------------
0a05 00b2 | | .STRTAB 0x00b2->0x0a5e ; "Login"
0a06 00b5 | | .STRTAB 0x00b5->0x0a60 ; "Full Session"
0a07 00bf | | .STRTAB 0x00bf->0x0a66 ; "Fundamental Session"
0a08 00d0 | | .STRTAB 0x00d0->0x0a70 ; "Accept_Tokens"
; "Accept_Tokens"
; "Accept_Tokens"
0a09 00db | | .STRTAB 0x00db->0x0a76 ; "Donate_Tokens"
0a0a 00e6 | | .STRTAB 0x00e6->0x0a7d ; "Remote_Machine_ID specified is the Machine_ID for this machine."
; "Remote_Machine_ID specified is the Machine_ID for this machine."
; "Remote_Machine_ID specified is the Machine_ID for this machine."
; "Remote_Machine_ID specified is the Machine_ID for this machine."
0a0b 0123 | # | .STRTAB 0x0123->0x0a9c ; "The Remote_Site specified does not match the Site_Id of this machine. These need to be the same for tokens to be donated. If necessary, contact your Rational technical representative to change the Site_Id of one or both machines."
0a0c 0208 | | .STRTAB 0x0208->0x0b10 ; "This machine has accepted tokens today; it may not also give them up"
0a0d 024a | J | .STRTAB 0x024a->0x0b32 ; "Set_Site"
; "Set_Site"
0a0e 0250 | P | .STRTAB 0x0250->0x0b36 ; "Code ("
0a0f 0254 | T | .STRTAB 0x0254->0x0b39 ; ") does not correspond to Site ("
0a10 0271 | q | .STRTAB 0x0271->0x0b48 ; ")."
; ")."
; ")."
; ")."
; ")."
; ")."
0a11 0271 | q | .STRTAB 0x0271->0x0b49 ; "Site set to "
0a12 027b | { | .STRTAB 0x027b->0x0b4f ; "Convert_Tokens"
; "Convert_Tokens"
0a13 0287 | | .STRTAB 0x0287->0x0b56 ; "The token count for the current product ("
0a14 02ae | | .STRTAB 0x02ae->0x0b6b ; ") is NOT equal to Token_Count parameter ("
0a15 02d5 | | .STRTAB 0x02d5->0x0b7f ; "); these must be equal in order to proceed."
; "); these must be equal in order to proceed."
0a16 02fe | | .STRTAB 0x02fe->0x0b95 ; "The code provided does NOT match the request being made. This might be caused by a transcription error of the code, current product, new product, or the Machine ID of this machine ("
0a17 03b2 | | .STRTAB 0x03b2->0x0bf0 ; "), a delay in posting the request (code only valid for one day), "
; "), a delay in posting the request (code only valid for one day), "
0a18 03f1 | | .STRTAB 0x03f1->0x0c10 ; "or some other combination of parameter problems. "
; "or some other combination of parameter problems. "
0a19 0421 | ! | .STRTAB 0x0421->0x0c29 ; "Contact your Rational representative for further assistance."
; "Contact your Rational representative for further assistance."
0a1a 045b | [ | .STRTAB 0x045b->0x0c47 ; "The authorization provided has been used previously for this product. It must be unique for this machine for all time."
; "The authorization provided has been used previously for this product. It must be unique for this machine for all time."
0a1b 04d0 | | .STRTAB 0x04d0->0x0c83 ; " tokens set to "
; " tokens set to "
0a1c 04dd | | .STRTAB 0x04dd->0x0c8a ; " has no more tokens."
0a1d 04ef | | .STRTAB 0x04ef->0x0c94 ; "Allow_Token_Conversion"
0a1e 0503 | | .STRTAB 0x0503->0x0c9f ; "Must be run from a Rational site."
; "Must be run from a Rational site."
; "Must be run from a Rational site."
0a1f 0522 | " | .STRTAB 0x0522->0x0cb0 ; "Assign_Tokens"
0a20 052d | - | .STRTAB 0x052d->0x0cb6 ; "Assign_Site"
0a21 0536 | 6 | .STRTAB 0x0536->0x0cbc ; "Run the following on the remote machine:"
; "Run the following on the remote machine:"
; "Run the following on the remote machine:"
0a22 055c | \ | .STRTAB 0x055c->0x0cd0 ; "Site"
0a23 055e | ^ | .STRTAB 0x055e->0x0cd2 ; "Code"
; "Code"
; "Code"
0a24 0560 | ` | .STRTAB 0x0560->0x0cd4 ; "Training"
0a25 0566 | f | .STRTAB 0x0566->0x0cd8 ; "Training_Authorization"
0a26 057a | z | .STRTAB 0x057a->0x0ce3 ; "Product and Token authorization checking has been reinstated."
0a27 05b5 | | .STRTAB 0x05b5->0x0d01 ; "Authorization_Checking_Reinstated"
0a28 05d4 | | .STRTAB 0x05d4->0x0d12 ; "Product and Token authorization checking has been suspended to allow training to proceed. Checking will be re-instated the next time the machine boots or by exectuting this procedure with Enable => False."
0a29 069f | | .STRTAB 0x069f->0x0d78 ; "Authorization_Checking_Suspended"
0a2a 06bd | | .STRTAB 0x06bd->0x0d88 ; "The code provided is NOT correct for this purpose, on this machine, and for today's date. Please check for transcription errors or contact your Rational representative."
0a2b 0764 | d | .STRTAB 0x0764->0x0ddd ; "Authorization_Code_Error"
0a2c 077a | z | .STRTAB 0x077a->0x0de9 ; "/"
0a2d 0779 | y | .STRTAB 0x0779->0x0de9 ; "="
0a2e 0778 | x | .STRTAB 0x0778->0x0dea ; "|"
0a2f 0777 | w | .STRTAB 0x0777->0x0dea ; "Product"
0a30 077c | | | .STRTAB 0x077c->0x0dee ; "Donation"
; "Donation"
0a31 0782 | | .STRTAB 0x0782->0x0df2 ; "Resulting_Count"
; "Resulting_Count"
0a32 078f | | .STRTAB 0x078f->0x0df9 ; "Authorization"
; "Authorization"
0a33 079a | | .STRTAB 0x079a->0x0e00 ; "Current_Product"
0a34 07a7 | | .STRTAB 0x07a7->0x0e07 ; "New_Product"
0a35 07b0 | | .STRTAB 0x07b0->0x0e0d ; "Token_Count"
0a36 07b9 | | .STRTAB 0x07b9->0x0e12 ; "The legal range of "
0a37 07ca | | .STRTAB 0x07ca->0x0e1c ; " for "
0a38 07cd | | .STRTAB 0x07cd->0x0e1e ; " is "
0a39 07cf | | .STRTAB 0x07cf->0x0e20 ; ".."
0a3a 07cf | | .STRTAB 0x07cf->0x0e21 ; ", but the value specified ("
0a3b 07e8 | | .STRTAB 0x07e8->0x0e2f ; ") is outside that range"
0a3c 07fd | | .STRTAB 0x07fd->0x0e3a ; "Product name not specified."
0a3d 0816 | | .STRTAB 0x0816->0x0e48 ; "Product name contains an illegal character ("
0a3e 0840 | @ | .STRTAB 0x0840->0x0e5e ; "Product name includes leading or trailing blanks."
0a3f 086f | o | .STRTAB 0x086f->0x0e76 ; "Site name not specified."
0a40 0885 | | .STRTAB 0x0885->0x0e82 ; "Site name contains an illegal character ("
0a41 08ac | | .STRTAB 0x08ac->0x0e97 ; "Site name includes leading or trailing blanks."
0a42 08d8 | | .STRTAB 0x08d8->0x0eae ; "Date contains an illegal character ("
0a43 08fa | | .STRTAB 0x08fa->0x0ec0 ; "The number of tokens ("
0a44 090e | | .STRTAB 0x090e->0x0ecb ; ") for "
; ") for "
0a45 0912 | | .STRTAB 0x0912->0x0ece ; " exceeds the target authorization ("
0a46 0933 | 3 | .STRTAB 0x0933->0x0edf ; "Cannot specify both authorization and date for "
0a47 0960 | ` | .STRTAB 0x0960->0x0ef7 ; "There are currently no tokens for "
0a48 0980 | | .STRTAB 0x0980->0x0f08 ; ", so they can't be donated."
0a49 0999 | | .STRTAB 0x0999->0x0f15 ; "The requested donation ("
0a4a 09af | | .STRTAB 0x09af->0x0f21 ; "exceeds the current limit ("
0a4b 09c8 | | .STRTAB 0x09c8->0x0f2f ; "Donation of "
; "Donation of "
0a4c 09d2 | | .STRTAB 0x09d2->0x0f35 ; " tokens for "
; " tokens for "
0a4d 09dc | | .STRTAB 0x09dc->0x0f3b ; " would transfer tokens currently in use."
0a4e 0a02 | | .STRTAB 0x0a02->0x0f4f ; " has resulted in "
0a4f 0a11 | | .STRTAB 0x0a11->0x0f57 ; " tokens."
0a50 0a17 | | .STRTAB 0x0a17->0x0f5b ; "This machine has donated tokens today; it may not also accept them"
0a51 0a57 | W | .STRTAB 0x0a57->0x0f7c ; "The sum of currently authorized tokens and Donations ("
0a52 0a8b | | .STRTAB 0x0a8b->0x0f97 ; "("
; "("
0a53 0a8a | | .STRTAB 0x0a8a->0x0f98 ; ") +"
0a54 0a8b | | .STRTAB 0x0a8b->0x0f99 ; ") ="
0a55 0a8c | | .STRTAB 0x0a8c->0x0f9b ; ") is NOT equal to Resulting_Count parameter ("
0a56 0ab7 | | .STRTAB 0x0ab7->0x0fb1 ; "The code provided does NOT match the request being made. This might be caused by a transcription error of the code, an attempt to transfer between sites without Rational assistance, a transcription error of the Site of this machine ("
0a57 0b9f | | .STRTAB 0x0b9f->0x1026 ; "), a transcription error of the Machine ID of this machine ("
0a58 0bd9 | | .STRTAB 0x0bd9->0x1044 ; "1/1/90"
0a59 0bdd | | .STRTAB 0x0bdd->0x1047 ; "Date ("
0a5a 0be1 | | .STRTAB 0x0be1->0x104a ; ") doesn't represent a legal date."
0a5b 0c00 | | .STRTAB 0x0c00->0x105b ; "Active tokens for "
0a5c 0c10 | | .STRTAB 0x0c10->0x1064 ; " make it impossible to accept tokens for "
0a5d 0c37 | 7 | .STREND 0x0c37->0x1078
0a5e 4c6f 6769 |Logi| .STRTAB_STRINGS
1079 0000 0000 | | .BLANK 0000[0x7]
1080 ; --------------------------------------------------------------------------------------
1080 ; Debug Table
1080 ; --------------------------------------------------------------------------------------
1080 0004 0011 | | .DEBUG4 0x0004,0x0011,0x974c,0x0000,0x0001,0x0000
1086 0000 0000 | | .BLANK 0000[0x17a]