|
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 - download
Length: 9216 (0x2400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦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 1060 | ` | .CONST 0x1060 ; 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 INIT_0118,For_Outer_Call,Visible,Unelaborated
000d 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated
000f 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated
0011 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated
0013 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated
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 INIT_0250,For_Outer_Call,Visible,Unelaborated
001b 029a 031b | | Declare_Subprogram INIT_0318,For_Outer_Call,Visible,Unelaborated
001d 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated
001f 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated
0021 029a 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call,Visible,Unelaborated
0023 029a 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call,Visible,Unelaborated
0025 029a 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Visible,Unelaborated
0027 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated
0029 029a 055b | [| Declare_Subprogram INIT_0558,For_Outer_Call,Visible,Unelaborated
002b 029a 0563 | c| Declare_Subprogram INIT_0560,For_Outer_Call,Visible,Unelaborated
002d 029a 056b | k| Declare_Subprogram INIT_0568,For_Outer_Call,Visible,Unelaborated
002f 029a 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call,Visible,Unelaborated
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 09ed | | Action Push_String_Extended,0x9ed ; "Login"
0038 0092 09ee | | Action Push_String_Extended,0x9ee ; "Full Session"
003a 0092 09ef | | Action Push_String_Extended,0x9ef ; "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 | | push_full_address 0x0
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 INIT_0578,For_Outer_Call,Unelaborated
0076 029b 059b | | Declare_Subprogram INIT_0598,For_Outer_Call,Unelaborated
0078 029b 05c3 | | Declare_Subprogram INIT_05c0,For_Outer_Call,Unelaborated
007a 029b 05db | | Declare_Subprogram INIT_05d8,For_Outer_Call,Unelaborated
007c 029b 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call,Unelaborated
007e 029b 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call,Unelaborated
0080 029b 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call,Unelaborated
0082 029b 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call,Unelaborated
0084 029b 065b | [| Declare_Subprogram INIT_0658,For_Outer_Call,Unelaborated
0086 029b 069b | | Declare_Subprogram INIT_0698,For_Outer_Call,Unelaborated
0088 029b 06d3 | | Declare_Subprogram INIT_06d0,For_Outer_Call,Unelaborated
008a 029b 070b | | Declare_Subprogram INIT_0708,For_Outer_Call,Unelaborated
008c 029b 0743 | C| Declare_Subprogram INIT_0740,For_Outer_Call,Unelaborated
008e 029b 0773 | s| Declare_Subprogram INIT_0770,For_Outer_Call,Unelaborated
0090 029b 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call,Unelaborated
0092 029b 07eb | | Declare_Subprogram INIT_07e8,For_Outer_Call,Unelaborated
0094 029b 086b | k| Declare_Subprogram INIT_0868,For_Outer_Call,Unelaborated
0096 029b 087b | {| Declare_Subprogram INIT_0878,For_Outer_Call,Unelaborated
0098 029b 088b | | Declare_Subprogram INIT_0888,For_Outer_Call,Unelaborated
009a 029d 089b | | Declare_Subprogram INIT_0898,For_Outer_Call
009c 029d 0953 | S| Declare_Subprogram INIT_0950,For_Outer_Call
009e 029d 096b | k| Declare_Subprogram INIT_0968,For_Outer_Call
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 09f0 | | Action Push_String_Extended,0x9f0 ; "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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 09f1 | | Action Push_String_Extended,0x9f1 ; "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 09f2 | | Action Push_String_Extended,0x9f2 ; "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 09f3 | | Action Push_String_Extended,0x9f3 ; "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 09f4 | | Action Push_String_Extended,0x9f4 ; "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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 09f5 | | Action Push_String_Extended,0x9f5 ; "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 09f6 | | Action Push_String_Extended,0x9f6 ; "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 09f7 | | Action Push_String_Extended,0x9f7 ; ") 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 09f8 | | Action Push_String_Extended,0x9f8 ; ")."
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 09f9 | | Action Push_String_Extended,0x9f9 ; "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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 09fa | | Action Push_String_Extended,0x9fa ; "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 0993 | | Declare_Subprogram INIT_0990,For_Call
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 09fb | | Action Push_String_Extended,0x9fb ; "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 09fc | | Action Push_String_Extended,0x9fc ; ") 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 09fd | | Action Push_String_Extended,0x9fd ; "); 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 09fe | | Action Push_String_Extended,0x9fe ; "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 09ff | | Action Push_String_Extended,0x9ff ; "), a delay in posting the request (code only valid for one day), "
02a7 01cc | | Execute Vector,Catenate
02a8 0092 0a00 | | Action Push_String_Extended,0xa00 ; "or some other combination of parameter problems. "
02aa 01cc | | Execute Vector,Catenate
02ab 0092 0a01 | | Action Push_String_Extended,0xa01 ; "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 0a02 | | Action Push_String_Extended,0xa02 ; "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 0a03 | | Action Push_String_Extended,0xa03 ; " 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 0a04 | | Action Push_String_Extended,0xa04 ; " 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 0a05 | | Action Push_String_Extended,0xa05 ; "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 0a06 | | Action Push_String_Extended,0xa06 ; "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 09f2 | | Action Push_String_Extended,0x9f2 ; "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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 0a07 | | Action Push_String_Extended,0xa07 ; "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 0a06 | | Action Push_String_Extended,0xa06 ; "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 09f2 | | Action Push_String_Extended,0x9f2 ; "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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 0a06 | | Action Push_String_Extended,0xa06 ; "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 09f2 | | Action Push_String_Extended,0x9f2 ; "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_Value,New_Top_Offset 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 0a08 | | Action Push_String_Extended,0xa08 ; "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 0a09 | | Action Push_String_Extended,0xa09 ; "Run the following on the remote machine:"
047b e014 | | Load 0x0,0x14
047c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
047d 0092 09f5 | | Action Push_String_Extended,0x9f5 ; "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 0a0a | | Action Push_String_Extended,0xa0a ; "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 0a0b | | Action Push_String_Extended,0xa0b ; "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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Value,New_Top_Offset 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 0a0c | | Action Push_String_Extended,0xa0c ; "Training"
04e5 0092 0a0d | | Action Push_String_Extended,0xa0d ; "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 0a0e | | Action Push_String_Extended,0xa0e ; "Product and Token authorization checking has been reinstated."
0506 0092 0a0f | | Action Push_String_Extended,0xa0f ; "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 0a10 | | Action Push_String_Extended,0xa10 ; "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 0a11 | | Action Push_String_Extended,0xa11 ; "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 0a12 | | Action Push_String_Extended,0xa12 ; "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 0a13 | | Action Push_String_Extended,0xa13 ; "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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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 0a14 | | Action Push_String_Extended,0xa14 ; "/"
05a1 01cc | | Execute Vector,Catenate
05a2 e5fb | | Load 0x2,-0x5
05a3 01cc | | Execute Vector,Catenate
05a4 0092 0a15 | | Action Push_String_Extended,0xa15 ; "="
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 0a16 | | Action Push_String_Extended,0xa16 ; "|"
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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 0x5
05f7 0000 | | .XXX[0x1]
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 05fb | | .CONST 0x05fb ; Address of begin
05f9 0004 | | .CONST 0x0004 ; Address of exception handler
05fa 0001 | | .CONST 0x0001 ; Number of locals
05fb BODY_05f8:
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 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0605 | | .CONST 0x0605 ; Address of begin
0601 0004 | | .CONST 0x0004 ; Address of exception handler
0602 0002 | | .CONST 0x0002 ; Number of locals
0603 INIT_0600:
0603 029f 09a3 | | Declare_Subprogram INIT_09a0,For_Call
0605 BODY_0600:
0605 e5ff | | Load 0x2,-0x1
0606 8402 | | Call 0x2,0x2
0607 e5fe | | Load 0x2,-0x2
0608 8402 | | Call 0x2,0x2
0609 017f | | Execute Record,Equal
060a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
060b 0000 0000 | | .BLANK 0000[0x5]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0613 | | .CONST 0x0613 ; Address of begin
0611 0004 | | .CONST 0x0004 ; Address of exception handler
0612 0001 | | .CONST 0x0001 ; Number of locals
0613 BODY_0610:
0613 INIT_0610:
0613 0092 0a09 | | Action Push_String_Extended,0xa09 ; "Run the following on the remote machine:"
0615 e014 | | Load 0x0,0x14
0616 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0617 0092 09f0 | | Action Push_String_Extended,0x9f0 ; "Accept_Tokens"
0619 e225 | % | Load 0x1,0x25
061a 180d | | Execute Package,Field_Execute,Field_Number 0xd
061b e5ff | | Load 0x2,-0x1
061c e224 | $ | Load 0x1,0x24
061d 181e | | Execute Package,Field_Execute,Field_Number 0x1e
061e 0092 0a17 | | Action Push_String_Extended,0xa17 ; "Product"
0620 e225 | % | Load 0x1,0x25
0621 180e | | Execute Package,Field_Execute,Field_Number 0xe
0622 4820 |H | Short_Literal 0x20
0623 4800 |H | Short_Literal 0x0
0624 480a |H | Short_Literal 0xa
0625 e5fe | | Load 0x2,-0x2
0626 e008 | | Load 0x0,0x8
0627 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0628 0092 0a18 | | Action Push_String_Extended,0xa18 ; "Donation"
062a e225 | % | Load 0x1,0x25
062b 180e | | Execute Package,Field_Execute,Field_Number 0xe
062c 4820 |H | Short_Literal 0x20
062d 4800 |H | Short_Literal 0x0
062e 480a |H | Short_Literal 0xa
062f e5fd | | Load 0x2,-0x3
0630 e008 | | Load 0x0,0x8
0631 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0632 0092 0a19 | | Action Push_String_Extended,0xa19 ; "Resulting_Count"
0634 e225 | % | Load 0x1,0x25
0635 180e | | Execute Package,Field_Execute,Field_Number 0xe
0636 e5f9 | | Load 0x2,-0x7
0637 e5fa | | Load 0x2,-0x6
0638 e5fb | | Load 0x2,-0x5
0639 e5fc | | Load 0x2,-0x4
063a e5fd | | Load 0x2,-0x3
063b e5fe | | Load 0x2,-0x2
063c e5ff | | Load 0x2,-0x1
063d 822b | + | Call 0x1,0x2b
063e e224 | $ | Load 0x1,0x24
063f 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0640 0092 0a0b | | Action Push_String_Extended,0xa0b ; "Code"
0642 e225 | % | Load 0x1,0x25
0643 180e | | Execute Package,Field_Execute,Field_Number 0xe
0644 e5fa | | Load 0x2,-0x6
0645 01db | | Execute Vector,Length
0646 6807 |h | Jump_Zero 0x64e
0647 e5fa | | Load 0x2,-0x6
0648 e224 | $ | Load 0x1,0x24
0649 181e | | Execute Package,Field_Execute,Field_Number 0x1e
064a 0092 0a1a | | Action Push_String_Extended,0xa1a ; "Authorization"
064c e225 | % | Load 0x1,0x25
064d 180e | | Execute Package,Field_Execute,Field_Number 0xe
064e e225 | % | Load 0x1,0x25
064f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0650 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0651 0000 0000 | | .BLANK 0000[0x7]
0658 ; --------------------------------------------------------------------------------------
0658 ; SUBPROGRAM
0658 ; --------------------------------------------------------------------------------------
0658 065b | [ | .CONST 0x065b ; Address of begin
0659 0004 | | .CONST 0x0004 ; Address of exception handler
065a 0001 | | .CONST 0x0001 ; Number of locals
065b BODY_0658:
065b INIT_0658:
065b 0092 0a09 | | Action Push_String_Extended,0xa09 ; "Run the following on the remote machine:"
065d e014 | | Load 0x0,0x14
065e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
065f 0092 09fa | | Action Push_String_Extended,0x9fa ; "Convert_Tokens"
0661 e225 | % | Load 0x1,0x25
0662 180d | | Execute Package,Field_Execute,Field_Number 0xd
0663 e5ff | | Load 0x2,-0x1
0664 e224 | $ | Load 0x1,0x24
0665 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0666 0092 0a1b | | Action Push_String_Extended,0xa1b ; "Current_Product"
0668 e225 | % | Load 0x1,0x25
0669 180e | | Execute Package,Field_Execute,Field_Number 0xe
066a e5fe | | Load 0x2,-0x2
066b e224 | $ | Load 0x1,0x24
066c 181e | | Execute Package,Field_Execute,Field_Number 0x1e
066d 0092 0a1c | | Action Push_String_Extended,0xa1c ; "New_Product"
066f e225 | % | Load 0x1,0x25
0670 180e | | Execute Package,Field_Execute,Field_Number 0xe
0671 4820 |H | Short_Literal 0x20
0672 4800 |H | Short_Literal 0x0
0673 480a |H | Short_Literal 0xa
0674 e5fd | | Load 0x2,-0x3
0675 e008 | | Load 0x0,0x8
0676 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0677 0092 0a1d | | Action Push_String_Extended,0xa1d ; "Token_Count"
0679 e225 | % | Load 0x1,0x25
067a 180e | | Execute Package,Field_Execute,Field_Number 0xe
067b e5fa | | Load 0x2,-0x6
067c e5fb | | Load 0x2,-0x5
067d e5fc | | Load 0x2,-0x4
067e e5fd | | Load 0x2,-0x3
067f e5fe | | Load 0x2,-0x2
0680 e5ff | | Load 0x2,-0x1
0681 822c | , | Call 0x1,0x2c
0682 e224 | $ | Load 0x1,0x24
0683 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0684 0092 0a0b | | Action Push_String_Extended,0xa0b ; "Code"
0686 e225 | % | Load 0x1,0x25
0687 180e | | Execute Package,Field_Execute,Field_Number 0xe
0688 e5fb | | Load 0x2,-0x5
0689 01db | | Execute Vector,Length
068a 6807 |h | Jump_Zero 0x692
068b e5fb | | Load 0x2,-0x5
068c e224 | $ | Load 0x1,0x24
068d 181e | | Execute Package,Field_Execute,Field_Number 0x1e
068e 0092 0a1a | | Action Push_String_Extended,0xa1a ; "Authorization"
0690 e225 | % | Load 0x1,0x25
0691 180e | | Execute Package,Field_Execute,Field_Number 0xe
0692 e225 | % | Load 0x1,0x25
0693 180f | | Execute Package,Field_Execute,Field_Number 0xf
0694 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0695 0000 0000 | | .XXX[0x3]
0697 0000 | |
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 069b | | .CONST 0x069b ; Address of begin
0699 0004 | | .CONST 0x0004 ; Address of exception handler
069a 0001 | | .CONST 0x0001 ; Number of locals
069b BODY_0698:
069b INIT_0698:
069b e5ff | | Load 0x2,-0x1
069c e21f | | Load 0x1,0x1f
069d 025f | _ | Execute Discrete,Not_In_Type
069e 682d |h- | Jump_Zero 0x6cc
069f e5fc | | Load 0x2,-0x4
06a0 0092 0a1e | | Action Push_String_Extended,0xa1e ; "The legal range of "
06a2 e5fe | | Load 0x2,-0x2
06a3 01cc | | Execute Vector,Catenate
06a4 0092 0a1f | | Action Push_String_Extended,0xa1f ; " for "
06a6 01cc | | Execute Vector,Catenate
06a7 e5fd | | Load 0x2,-0x3
06a8 01cc | | Execute Vector,Catenate
06a9 0092 0a20 | | Action Push_String_Extended,0xa20 ; " is "
06ab 01cc | | Execute Vector,Catenate
06ac 4820 |H | Short_Literal 0x20
06ad 4800 |H | Short_Literal 0x0
06ae 480a |H | Short_Literal 0xa
06af 4800 |H | Short_Literal 0x0
06b0 e008 | | Load 0x0,0x8
06b1 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06b2 01cc | | Execute Vector,Catenate
06b3 0092 0a21 | !| Action Push_String_Extended,0xa21 ; ".."
06b5 01cc | | Execute Vector,Catenate
06b6 4820 |H | Short_Literal 0x20
06b7 4800 |H | Short_Literal 0x0
06b8 480a |H | Short_Literal 0xa
06b9 4840 |H@ | Short_Literal 0x40
06ba e008 | | Load 0x0,0x8
06bb 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06bc 01cc | | Execute Vector,Catenate
06bd 0092 0a22 | "| Action Push_String_Extended,0xa22 ; ", but the value specified ("
06bf 01cc | | Execute Vector,Catenate
06c0 4820 |H | Short_Literal 0x20
06c1 4800 |H | Short_Literal 0x0
06c2 480a |H | Short_Literal 0xa
06c3 e5ff | | Load 0x2,-0x1
06c4 e008 | | Load 0x0,0x8
06c5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06c6 01cc | | Execute Vector,Catenate
06c7 0092 0a23 | #| Action Push_String_Extended,0xa23 ; ") is outside that range"
06c9 01cc | | Execute Vector,Catenate
06ca e224 | $ | Load 0x1,0x24
06cb 180d | | Execute Package,Field_Execute,Field_Number 0xd
06cc 4505 |E | Exit_Suprogram New_Top_Offset 0x5
06cd 0000 0000 | | .XXX[0x3]
06cf 0000 | |
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d3 | | .CONST 0x06d3 ; Address of begin
06d1 0004 | | .CONST 0x0004 ; Address of exception handler
06d2 0001 | | .CONST 0x0001 ; Number of locals
06d3 BODY_06d0:
06d3 INIT_06d0:
06d3 e5ff | | Load 0x2,-0x1
06d4 01db | | Execute Vector,Length
06d5 7005 |p | Jump_Nonzero 0x6db
06d6 e5fe | | Load 0x2,-0x2
06d7 0092 0a24 | $| Action Push_String_Extended,0xa24 ; "Product name not specified."
06d9 e224 | $ | Load 0x1,0x24
06da 180d | | Execute Package,Field_Execute,Field_Number 0xd
06db 00cf | | Action Mark_Auxiliary
06dc e5ff | | Load 0x2,-0x1
06dd 01d9 | | Execute Vector,Reverse_Bounds
06de 0263 | c | Execute Discrete,Above_Bound
06df 7018 |p | Jump_Nonzero 0x6f8
06e0 00d8 | | Load_Top At_Offset_0
06e1 e5ff | | Load 0x2,-0x1
06e2 01d7 | | Execute Vector,Field_Read
06e3 4820 |H | Short_Literal 0x20
06e4 487e |H~ | Short_Literal 0x7e
06e5 0261 | a | Execute Discrete,Not_In_Range
06e6 680f |h | Jump_Zero 0x6f6
06e7 e5fe | | Load 0x2,-0x2
06e8 0092 0a25 | %| Action Push_String_Extended,0xa25 ; "Product name contains an illegal character ("
06ea e404 | | Load 0x2,0x4
06eb e5ff | | Load 0x2,-0x1
06ec 01d7 | | Execute Vector,Field_Read
06ed 00e8 | | Load_Encached Character_Cache
06ee 011c | | Execute Any,Convert_Unchecked
06ef 1c01 | | Execute_Immediate Run_Utility,0x1
06f0 01cc | | Execute Vector,Catenate
06f1 0092 09f8 | | Action Push_String_Extended,0x9f8 ; ")."
06f3 01cc | | Execute Vector,Catenate
06f4 e224 | $ | Load 0x1,0x24
06f5 180d | | Execute Package,Field_Execute,Field_Number 0xd
06f6 00c8 | | Action Pop_Auxiliary_Range
06f7 3fe8 |? | Loop_Increasing 0x6e0
06f8 00ce | | Action Pop_Auxiliary
06f9 e5ff | | Load 0x2,-0x1
06fa 4820 |H | Short_Literal 0x20
06fb e5ff | | Load 0x2,-0x1
06fc e008 | | Load 0x0,0x8
06fd 181c | | Execute Package,Field_Execute,Field_Number 0x1c
06fe 01de | | Execute Vector,Not_Equal
06ff 6805 |h | Jump_Zero 0x705
0700 e5fe | | Load 0x2,-0x2
0701 0092 0a26 | &| Action Push_String_Extended,0xa26 ; "Product name includes leading or trailing blanks."
0703 e224 | $ | Load 0x1,0x24
0704 180d | | Execute Package,Field_Execute,Field_Number 0xd
0705 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0706 0000 0000 | | .XXX[0x2]
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 070b | | .CONST 0x070b ; Address of begin
0709 0004 | | .CONST 0x0004 ; Address of exception handler
070a 0001 | | .CONST 0x0001 ; Number of locals
070b BODY_0708:
070b INIT_0708:
070b e5ff | | Load 0x2,-0x1
070c 01db | | Execute Vector,Length
070d 7005 |p | Jump_Nonzero 0x713
070e e5fe | | Load 0x2,-0x2
070f 0092 0a27 | '| Action Push_String_Extended,0xa27 ; "Site name not specified."
0711 e224 | $ | Load 0x1,0x24
0712 180d | | Execute Package,Field_Execute,Field_Number 0xd
0713 00cf | | Action Mark_Auxiliary
0714 e5ff | | Load 0x2,-0x1
0715 01d9 | | Execute Vector,Reverse_Bounds
0716 0263 | c | Execute Discrete,Above_Bound
0717 7018 |p | Jump_Nonzero 0x730
0718 00d8 | | Load_Top At_Offset_0
0719 e5ff | | Load 0x2,-0x1
071a 01d7 | | Execute Vector,Field_Read
071b 4820 |H | Short_Literal 0x20
071c 487e |H~ | Short_Literal 0x7e
071d 0261 | a | Execute Discrete,Not_In_Range
071e 680f |h | Jump_Zero 0x72e
071f e5fe | | Load 0x2,-0x2
0720 0092 0a28 | (| Action Push_String_Extended,0xa28 ; "Site name contains an illegal character ("
0722 e404 | | Load 0x2,0x4
0723 e5ff | | Load 0x2,-0x1
0724 01d7 | | Execute Vector,Field_Read
0725 00e8 | | Load_Encached Character_Cache
0726 011c | | Execute Any,Convert_Unchecked
0727 1c01 | | Execute_Immediate Run_Utility,0x1
0728 01cc | | Execute Vector,Catenate
0729 0092 09f8 | | Action Push_String_Extended,0x9f8 ; ")."
072b 01cc | | Execute Vector,Catenate
072c e224 | $ | Load 0x1,0x24
072d 180d | | Execute Package,Field_Execute,Field_Number 0xd
072e 00c8 | | Action Pop_Auxiliary_Range
072f 3fe8 |? | Loop_Increasing 0x718
0730 00ce | | Action Pop_Auxiliary
0731 e5ff | | Load 0x2,-0x1
0732 4820 |H | Short_Literal 0x20
0733 e5ff | | Load 0x2,-0x1
0734 e008 | | Load 0x0,0x8
0735 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0736 01de | | Execute Vector,Not_Equal
0737 6805 |h | Jump_Zero 0x73d
0738 e5fe | | Load 0x2,-0x2
0739 0092 0a29 | )| Action Push_String_Extended,0xa29 ; "Site name includes leading or trailing blanks."
073b e224 | $ | Load 0x1,0x24
073c 180d | | Execute Package,Field_Execute,Field_Number 0xd
073d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
073e 0000 0000 | | .XXX[0x2]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0745 | E | .CONST 0x0745 ; Address of begin
0741 0004 | | .CONST 0x0004 ; Address of exception handler
0742 0002 | | .CONST 0x0002 ; Number of locals
0743 INIT_0740:
0743 029f 09c3 | | Declare_Subprogram INIT_09c0,For_Call
0745 BODY_0740:
0745 4820 |H | Short_Literal 0x20
0746 e5ff | | Load 0x2,-0x1
0747 e008 | | Load 0x0,0x8
0748 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0749 01db | | Execute Vector,Length
074a 7001 |p | Jump_Nonzero 0x74c
074b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
074c 00cf | | Action Mark_Auxiliary
074d e5ff | | Load 0x2,-0x1
074e 01d9 | | Execute Vector,Reverse_Bounds
074f 0263 | c | Execute Discrete,Above_Bound
0750 7018 |p | Jump_Nonzero 0x769
0751 00d8 | | Load_Top At_Offset_0
0752 e5ff | | Load 0x2,-0x1
0753 01d7 | | Execute Vector,Field_Read
0754 4820 |H | Short_Literal 0x20
0755 487e |H~ | Short_Literal 0x7e
0756 0261 | a | Execute Discrete,Not_In_Range
0757 680f |h | Jump_Zero 0x767
0758 e5fe | | Load 0x2,-0x2
0759 0092 0a2a | *| Action Push_String_Extended,0xa2a ; "Date contains an illegal character ("
075b e405 | | Load 0x2,0x5
075c e5ff | | Load 0x2,-0x1
075d 01d7 | | Execute Vector,Field_Read
075e 00e8 | | Load_Encached Character_Cache
075f 011c | | Execute Any,Convert_Unchecked
0760 1c01 | | Execute_Immediate Run_Utility,0x1
0761 01cc | | Execute Vector,Catenate
0762 0092 09f8 | | Action Push_String_Extended,0x9f8 ; ")."
0764 01cc | | Execute Vector,Catenate
0765 e224 | $ | Load 0x1,0x24
0766 180d | | Execute Package,Field_Execute,Field_Number 0xd
0767 00c8 | | Action Pop_Auxiliary_Range
0768 3fe8 |? | Loop_Increasing 0x751
0769 00ce | | Action Pop_Auxiliary
076a 8402 | | Call 0x2,0x2
076b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
076c 0000 0000 | | .BLANK 0000[0x4]
0770 ; --------------------------------------------------------------------------------------
0770 ; SUBPROGRAM
0770 ; --------------------------------------------------------------------------------------
0770 0779 | y | .CONST 0x0779 ; Address of begin
0771 0004 | | .CONST 0x0004 ; Address of exception handler
0772 0003 | | .CONST 0x0003 ; Number of locals
0773 INIT_0770:
0773 e5ff | | Load 0x2,-0x1
0774 823a | : | Call 0x1,0x3a
0775 00e3 | | Load_Encached Natural_Cache
0776 03f1 | | Declare_Variable Discrete,With_Value
0777 029f 09db | | Declare_Subprogram INIT_09d8,For_Call
0779 BODY_0770:
0779 e5fc | | Load 0x2,-0x4
077a e5ff | | Load 0x2,-0x1
077b 0092 0a18 | | Action Push_String_Extended,0xa18 ; "Donation"
077d e5fe | | Load 0x2,-0x2
077e 8233 | 3 | Call 0x1,0x33
077f e5fc | | Load 0x2,-0x4
0780 e5ff | | Load 0x2,-0x1
0781 0092 0a19 | | Action Push_String_Extended,0xa19 ; "Resulting_Count"
0783 e5fd | | Load 0x2,-0x3
0784 8233 | 3 | Call 0x1,0x33
0785 e5fe | | Load 0x2,-0x2
0786 e5fd | | Load 0x2,-0x3
0787 027d | } | Execute Discrete,Greater
0788 681e |h | Jump_Zero 0x7a7
0789 e5fc | | Load 0x2,-0x4
078a 0092 0a2b | +| Action Push_String_Extended,0xa2b ; "The number of tokens ("
078c 4820 |H | Short_Literal 0x20
078d 4800 |H | Short_Literal 0x0
078e 480a |H | Short_Literal 0xa
078f e5fe | | Load 0x2,-0x2
0790 e008 | | Load 0x0,0x8
0791 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0792 01cc | | Execute Vector,Catenate
0793 0092 0a2c | ,| Action Push_String_Extended,0xa2c ; ") for "
0795 01cc | | Execute Vector,Catenate
0796 e5ff | | Load 0x2,-0x1
0797 01cc | | Execute Vector,Catenate
0798 0092 0a2d | -| Action Push_String_Extended,0xa2d ; " exceeds the target authorization ("
079a 01cc | | Execute Vector,Catenate
079b 4820 |H | Short_Literal 0x20
079c 4800 |H | Short_Literal 0x0
079d 480a |H | Short_Literal 0xa
079e e5fd | | Load 0x2,-0x3
079f e008 | | Load 0x0,0x8
07a0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
07a1 01cc | | Execute Vector,Catenate
07a2 0092 09f8 | | Action Push_String_Extended,0x9f8 ; ")."
07a4 01cc | | Execute Vector,Catenate
07a5 e224 | $ | Load 0x1,0x24
07a6 180d | | Execute Package,Field_Execute,Field_Number 0xd
07a7 e5fe | | Load 0x2,-0x2
07a8 e5fd | | Load 0x2,-0x3
07a9 027f | | Execute Discrete,Equal
07aa 6820 |h | Jump_Zero 0x7cb
07ab 4801 |H | Short_Literal 0x1
07ac e220 | | Load 0x1,0x20
07ad e5ff | | Load 0x2,-0x1
07ae e008 | | Load 0x0,0x8
07af 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
07b0 6805 |h | Jump_Zero 0x7b6
07b1 e221 | ! | Load 0x1,0x21
07b2 8403 | | Call 0x2,0x3
07b3 e222 | " | Load 0x1,0x22
07b4 8403 | | Call 0x2,0x3
07b5 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07b6 4801 |H | Short_Literal 0x1
07b7 e221 | ! | Load 0x1,0x21
07b8 e5ff | | Load 0x2,-0x1
07b9 e008 | | Load 0x0,0x8
07ba 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
07bb 6805 |h | Jump_Zero 0x7c1
07bc e220 | | Load 0x1,0x20
07bd 8403 | | Call 0x2,0x3
07be e222 | " | Load 0x1,0x22
07bf 8403 | | Call 0x2,0x3
07c0 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07c1 4801 |H | Short_Literal 0x1
07c2 e222 | " | Load 0x1,0x22
07c3 e5ff | | Load 0x2,-0x1
07c4 e008 | | Load 0x0,0x8
07c5 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
07c6 6804 |h | Jump_Zero 0x7cb
07c7 e221 | ! | Load 0x1,0x21
07c8 8403 | | Call 0x2,0x3
07c9 e220 | | Load 0x1,0x20
07ca 8403 | | Call 0x2,0x3
07cb 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07cc 0000 0000 | | .BLANK 0000[0x4]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07d3 | | .CONST 0x07d3 ; Address of begin
07d1 0004 | | .CONST 0x0004 ; Address of exception handler
07d2 0001 | | .CONST 0x0001 ; Number of locals
07d3 BODY_07d0:
07d3 INIT_07d0:
07d3 e5fe | | Load 0x2,-0x2
07d4 01db | | Execute Vector,Length
07d5 680a |h | Jump_Zero 0x7e0
07d6 e5fd | | Load 0x2,-0x3
07d7 01db | | Execute Vector,Length
07d8 6807 |h | Jump_Zero 0x7e0
07d9 e5fc | | Load 0x2,-0x4
07da 0092 0a2e | .| Action Push_String_Extended,0xa2e ; "Cannot specify both authorization and date for "
07dc e5ff | | Load 0x2,-0x1
07dd 01cc | | Execute Vector,Catenate
07de e224 | $ | Load 0x1,0x24
07df 180d | | Execute Package,Field_Execute,Field_Number 0xd
07e0 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07e1 0000 0000 | | .BLANK 0000[0x7]
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 07f3 | | .CONST 0x07f3 ; Address of begin
07e9 0004 | | .CONST 0x0004 ; Address of exception handler
07ea 0003 | | .CONST 0x0003 ; Number of locals
07eb INIT_07e8:
07eb e5ff | | Load 0x2,-0x1
07ec 823a | : | Call 0x1,0x3a
07ed 00e3 | | Load_Encached Natural_Cache
07ee 03f1 | | Declare_Variable Discrete,With_Value
07ef e5ff | | Load 0x2,-0x1
07f0 823c | < | Call 0x1,0x3c
07f1 00e3 | | Load_Encached Natural_Cache
07f2 03f1 | | Declare_Variable Discrete,With_Value
07f3 BODY_07e8:
07f3 e402 | | Load 0x2,0x2
07f4 700a |p | Jump_Nonzero 0x7ff
07f5 e5fd | | Load 0x2,-0x3
07f6 0092 0a2f | /| Action Push_String_Extended,0xa2f ; "There are currently no tokens for "
07f8 e5ff | | Load 0x2,-0x1
07f9 01cc | | Execute Vector,Catenate
07fa 0092 0a30 | 0| Action Push_String_Extended,0xa30 ; ", so they can't be donated."
07fc 01cc | | Execute Vector,Catenate
07fd e224 | $ | Load 0x1,0x24
07fe 180d | | Execute Package,Field_Execute,Field_Number 0xd
07ff e5fe | | Load 0x2,-0x2
0800 e402 | | Load 0x2,0x2
0801 027d | } | Execute Discrete,Greater
0802 681e |h | Jump_Zero 0x821
0803 e5fd | | Load 0x2,-0x3
0804 0092 0a31 | 1| Action Push_String_Extended,0xa31 ; "The requested donation ("
0806 4820 |H | Short_Literal 0x20
0807 4800 |H | Short_Literal 0x0
0808 480a |H | Short_Literal 0xa
0809 e5fe | | Load 0x2,-0x2
080a e008 | | Load 0x0,0x8
080b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
080c 01cc | | Execute Vector,Catenate
080d 0092 0a2c | ,| Action Push_String_Extended,0xa2c ; ") for "
080f 01cc | | Execute Vector,Catenate
0810 e5ff | | Load 0x2,-0x1
0811 01cc | | Execute Vector,Catenate
0812 0092 0a32 | 2| Action Push_String_Extended,0xa32 ; "exceeds the current limit ("
0814 01cc | | Execute Vector,Catenate
0815 4820 |H | Short_Literal 0x20
0816 4800 |H | Short_Literal 0x0
0817 480a |H | Short_Literal 0xa
0818 e402 | | Load 0x2,0x2
0819 e008 | | Load 0x0,0x8
081a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
081b 01cc | | Execute Vector,Catenate
081c 0092 09f8 | | Action Push_String_Extended,0x9f8 ; ")."
081e 01cc | | Execute Vector,Catenate
081f e224 | $ | Load 0x1,0x24
0820 180d | | Execute Package,Field_Execute,Field_Number 0xd
0821 e402 | | Load 0x2,0x2
0822 e5fe | | Load 0x2,-0x2
0823 0272 | r | Execute Discrete,Minus
0824 e403 | | Load 0x2,0x3
0825 027c | | | Execute Discrete,Less
0826 6814 |h | Jump_Zero 0x83b
0827 e5fd | | Load 0x2,-0x3
0828 0092 0a33 | 3| Action Push_String_Extended,0xa33 ; "Donation of "
082a 4820 |H | Short_Literal 0x20
082b 4800 |H | Short_Literal 0x0
082c 480a |H | Short_Literal 0xa
082d e5fe | | Load 0x2,-0x2
082e e008 | | Load 0x0,0x8
082f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0830 01cc | | Execute Vector,Catenate
0831 0092 0a34 | 4| Action Push_String_Extended,0xa34 ; " tokens for "
0833 01cc | | Execute Vector,Catenate
0834 e5ff | | Load 0x2,-0x1
0835 01cc | | Execute Vector,Catenate
0836 0092 0a35 | 5| Action Push_String_Extended,0xa35 ; " would transfer tokens currently in use."
0838 01cc | | Execute Vector,Catenate
0839 e224 | $ | Load 0x1,0x24
083a 180d | | Execute Package,Field_Execute,Field_Number 0xd
083b e402 | | Load 0x2,0x2
083c e5fe | | Load 0x2,-0x2
083d 0272 | r | Execute Discrete,Minus
083e 00d8 | | Load_Top At_Offset_0
083f 00e3 | | Load_Encached Natural_Cache
0840 0260 | ` | Execute Discrete,In_Type
0841 7001 |p | Jump_Nonzero 0x843
0842 0801 | | Execute_Immediate Raise,0x1
0843 e5ff | | Load 0x2,-0x1
0844 e012 | | Load 0x0,0x12
0845 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0846 e5fd | | Load 0x2,-0x3
0847 0092 0a33 | 3| Action Push_String_Extended,0xa33 ; "Donation of "
0849 4820 |H | Short_Literal 0x20
084a 4800 |H | Short_Literal 0x0
084b 480a |H | Short_Literal 0xa
084c e5fe | | Load 0x2,-0x2
084d e008 | | Load 0x0,0x8
084e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
084f 01cc | | Execute Vector,Catenate
0850 0092 0a34 | 4| Action Push_String_Extended,0xa34 ; " tokens for "
0852 01cc | | Execute Vector,Catenate
0853 e5ff | | Load 0x2,-0x1
0854 01cc | | Execute Vector,Catenate
0855 0092 0a36 | 6| Action Push_String_Extended,0xa36 ; " has resulted in "
0857 01cc | | Execute Vector,Catenate
0858 4820 |H | Short_Literal 0x20
0859 4800 |H | Short_Literal 0x0
085a 480a |H | Short_Literal 0xa
085b e5ff | | Load 0x2,-0x1
085c 823a | : | Call 0x1,0x3a
085d e008 | | Load 0x0,0x8
085e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
085f 01cc | | Execute Vector,Catenate
0860 0092 0a37 | 7| Action Push_String_Extended,0xa37 ; " tokens."
0862 01cc | | Execute Vector,Catenate
0863 e224 | $ | Load 0x1,0x24
0864 180f | | Execute Package,Field_Execute,Field_Number 0xf
0865 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0866 0000 0000 | | .XXX[0x2]
0868 ; --------------------------------------------------------------------------------------
0868 ; SUBPROGRAM
0868 ; --------------------------------------------------------------------------------------
0868 086b | k | .CONST 0x086b ; Address of begin
0869 086f | o | .CONST 0x086f ; Address of exception handler
086a 0001 | | .CONST 0x0001 ; Number of locals
086b BODY_0868:
086b INIT_0868:
086b e5ff | | Load 0x2,-0x1
086c e012 | | Load 0x0,0x12
086d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
086e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
086f TRAP_0868:
086f 0007 | | Action Break_Optional
0870 4800 |H | Short_Literal 0x0
0871 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0872 0000 0000 | | .BLANK 0000[0x6]
0878 ; --------------------------------------------------------------------------------------
0878 ; SUBPROGRAM
0878 ; --------------------------------------------------------------------------------------
0878 087b | { | .CONST 0x087b ; Address of begin
0879 087f | | .CONST 0x087f ; Address of exception handler
087a 0001 | | .CONST 0x0001 ; Number of locals
087b BODY_0878:
087b INIT_0878:
087b e5ff | | Load 0x2,-0x1
087c e012 | | Load 0x0,0x12
087d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
087e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
087f TRAP_0878:
087f 0007 | | Action Break_Optional
0880 4800 |H | Short_Literal 0x0
0881 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0882 0000 0000 | | .BLANK 0000[0x6]
0888 ; --------------------------------------------------------------------------------------
0888 ; SUBPROGRAM
0888 ; --------------------------------------------------------------------------------------
0888 088b | | .CONST 0x088b ; Address of begin
0889 088f | | .CONST 0x088f ; Address of exception handler
088a 0001 | | .CONST 0x0001 ; Number of locals
088b BODY_0888:
088b INIT_0888:
088b e5ff | | Load 0x2,-0x1
088c e012 | | Load 0x0,0x12
088d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
088e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
088f TRAP_0888:
088f 0007 | | Action Break_Optional
0890 4800 |H | Short_Literal 0x0
0891 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0892 0000 0000 | | .BLANK 0000[0x6]
0898 ; --------------------------------------------------------------------------------------
0898 ; SUBPROGRAM
0898 ; --------------------------------------------------------------------------------------
0898 08a5 | | .CONST 0x08a5 ; Address of begin
0899 0004 | | .CONST 0x0004 ; Address of exception handler
089a 0005 | | .CONST 0x0005 ; Number of locals
089b INIT_0898:
089b 0092 09f0 | | Action Push_String_Extended,0x9f0 ; "Accept_Tokens"
089d e004 | | Load 0x0,0x4
089e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
089f 02c7 | | Declare_Variable Any
08a0 e004 | | Load 0x0,0x4
08a1 180e | | Execute Package,Field_Execute,Field_Number 0xe
08a2 a403 | | Store_Unchecked 0x2,0x3
08a3 00e3 | | Load_Encached Natural_Cache
08a4 00e3 | | Load_Encached Natural_Cache
08a5 BODY_0898:
08a5 e5fa | | Load 0x2,-0x6
08a6 01db | | Execute Vector,Length
08a7 7009 |p | Jump_Nonzero 0x8b1
08a8 e226 | & | Load 0x1,0x26
08a9 180e | | Execute Package,Field_Execute,Field_Number 0xe
08aa 822f | / | Call 0x1,0x2f
08ab 6805 |h | Jump_Zero 0x8b1
08ac e403 | | Load 0x2,0x3
08ad 0092 0a38 | 8| Action Push_String_Extended,0xa38 ; "This machine has donated tokens today; it may not also accept them"
08af e224 | $ | Load 0x1,0x24
08b0 180d | | Execute Package,Field_Execute,Field_Number 0xd
08b1 e403 | | Load 0x2,0x3
08b2 e5ff | | Load 0x2,-0x1
08b3 8234 | 4 | Call 0x1,0x34
08b4 e403 | | Load 0x2,0x3
08b5 e5fc | | Load 0x2,-0x4
08b6 e5fd | | Load 0x2,-0x3
08b7 e5fe | | Load 0x2,-0x2
08b8 8237 | 7 | Call 0x1,0x37
08b9 e5fe | | Load 0x2,-0x2
08ba 823a | : | Call 0x1,0x3a
08bb a405 | | Store_Unchecked 0x2,0x5
08bc 00d8 | | Load_Top At_Offset_0
08bd e5fd | | Load 0x2,-0x3
08be 0273 | s | Execute Discrete,Plus
08bf c404 | | Store 0x2,0x4
08c0 e404 | | Load 0x2,0x4
08c1 e5fc | | Load 0x2,-0x4
08c2 027e | ~ | Execute Discrete,Not_Equal
08c3 682b |h+ | Jump_Zero 0x8ef
08c4 e403 | | Load 0x2,0x3
08c5 483d |H= | Short_Literal 0x3d
08c6 482b |H+ | Short_Literal 0x2b
08c7 0092 0a39 | 9| Action Push_String_Extended,0xa39 ; "The sum of currently authorized tokens and Donations ("
08c9 4820 |H | Short_Literal 0x20
08ca 4800 |H | Short_Literal 0x0
08cb 480a |H | Short_Literal 0xa
08cc e405 | | Load 0x2,0x5
08cd e008 | | Load 0x0,0x8
08ce 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08cf 01cc | | Execute Vector,Catenate
08d0 01cb | | Execute Vector,Append
08d1 4820 |H | Short_Literal 0x20
08d2 4800 |H | Short_Literal 0x0
08d3 480a |H | Short_Literal 0xa
08d4 e5fd | | Load 0x2,-0x3
08d5 e008 | | Load 0x0,0x8
08d6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08d7 01cc | | Execute Vector,Catenate
08d8 01cb | | Execute Vector,Append
08d9 4820 |H | Short_Literal 0x20
08da 4800 |H | Short_Literal 0x0
08db 480a |H | Short_Literal 0xa
08dc e404 | | Load 0x2,0x4
08dd e008 | | Load 0x0,0x8
08de 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08df 01cc | | Execute Vector,Catenate
08e0 0092 0a3a | :| Action Push_String_Extended,0xa3a ; ") is NOT equal to Resulting_Count parameter ("
08e2 01cc | | Execute Vector,Catenate
08e3 4820 |H | Short_Literal 0x20
08e4 4800 |H | Short_Literal 0x0
08e5 480a |H | Short_Literal 0xa
08e6 e5fc | | Load 0x2,-0x4
08e7 e008 | | Load 0x0,0x8
08e8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08e9 01cc | | Execute Vector,Catenate
08ea 0092 09fd | | Action Push_String_Extended,0x9fd ; "); these must be equal in order to proceed."
08ec 01cc | | Execute Vector,Catenate
08ed e224 | $ | Load 0x1,0x24
08ee 180d | | Execute Package,Field_Execute,Field_Number 0xd
08ef e5fa | | Load 0x2,-0x6
08f0 e5fb | | Load 0x2,-0x5
08f1 e5fc | | Load 0x2,-0x4
08f2 e5fd | | Load 0x2,-0x3
08f3 e5ff | | Load 0x2,-0x1
08f4 822d | - | Call 0x1,0x2d
08f5 701a |p | Jump_Nonzero 0x910
08f6 e403 | | Load 0x2,0x3
08f7 0092 0a3b | ;| Action Push_String_Extended,0xa3b ; "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 ("
08f9 8210 | | Call 0x1,0x10
08fa 01cc | | Execute Vector,Catenate
08fb 0092 0a3c | <| Action Push_String_Extended,0xa3c ; "), a transcription error of the Machine ID of this machine ("
08fd 01cc | | Execute Vector,Catenate
08fe 4820 |H | Short_Literal 0x20
08ff 4800 |H | Short_Literal 0x0
0900 480a |H | Short_Literal 0xa
0901 8211 | | Call 0x1,0x11
0902 e008 | | Load 0x0,0x8
0903 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0904 01cc | | Execute Vector,Catenate
0905 0092 09ff | | Action Push_String_Extended,0x9ff ; "), a delay in posting the request (code only valid for one day), "
0907 01cc | | Execute Vector,Catenate
0908 0092 0a00 | | Action Push_String_Extended,0xa00 ; "or some other combination of parameter problems. "
090a 01cc | | Execute Vector,Catenate
090b 0092 0a01 | | Action Push_String_Extended,0xa01 ; "Contact your Rational representative for further assistance."
090d 01cc | | Execute Vector,Catenate
090e e224 | $ | Load 0x1,0x24
090f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0910 e5fa | | Load 0x2,-0x6
0911 01db | | Execute Vector,Length
0912 680a |h | Jump_Zero 0x91d
0913 e5fa | | Load 0x2,-0x6
0914 e5fe | | Load 0x2,-0x2
0915 e226 | & | Load 0x1,0x26
0916 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0917 7005 |p | Jump_Nonzero 0x91d
0918 e403 | | Load 0x2,0x3
0919 0092 0a02 | | Action Push_String_Extended,0xa02 ; "The authorization provided has been used previously for this product. It must be unique for this machine for all time."
091b e224 | $ | Load 0x1,0x24
091c 180d | | Execute Package,Field_Execute,Field_Number 0xd
091d e5fe | | Load 0x2,-0x2
091e e013 | | Load 0x0,0x13
091f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0920 7009 |p | Jump_Nonzero 0x92a
0921 00ea | | Load_Encached Null_String_Cache
0922 00ea | | Load_Encached Null_String_Cache
0923 8211 | | Call 0x1,0x11
0924 e5fe | | Load 0x2,-0x2
0925 e013 | | Load 0x0,0x13
0926 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0927 e5fe | | Load 0x2,-0x2
0928 e013 | | Load 0x0,0x13
0929 180d | | Execute Package,Field_Execute,Field_Number 0xd
092a e5fc | | Load 0x2,-0x4
092b e5fe | | Load 0x2,-0x2
092c e012 | | Load 0x0,0x12
092d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
092e e5fe | | Load 0x2,-0x2
092f 823b | ; | Call 0x1,0x3b
0930 7004 |p | Jump_Nonzero 0x935
0931 480c |H | Short_Literal 0xc
0932 e5fe | | Load 0x2,-0x2
0933 e012 | | Load 0x0,0x12
0934 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0935 e403 | | Load 0x2,0x3
0936 e5fe | | Load 0x2,-0x2
0937 0092 0a03 | | Action Push_String_Extended,0xa03 ; " tokens set to "
0939 01cc | | Execute Vector,Catenate
093a 4820 |H | Short_Literal 0x20
093b 4800 |H | Short_Literal 0x0
093c 480a |H | Short_Literal 0xa
093d e5fc | | Load 0x2,-0x4
093e e008 | | Load 0x0,0x8
093f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0940 01cc | | Execute Vector,Catenate
0941 e224 | $ | Load 0x1,0x24
0942 180f | | Execute Package,Field_Execute,Field_Number 0xf
0943 e5fa | | Load 0x2,-0x6
0944 01db | | Execute Vector,Length
0945 7004 |p | Jump_Nonzero 0x94a
0946 e00d | | Load 0x0,0xd
0947 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0948 e226 | & | Load 0x1,0x26
0949 180f | | Execute Package,Field_Execute,Field_Number 0xf
094a e226 | & | Load 0x1,0x26
094b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
094c 4508 |E | Exit_Suprogram New_Top_Offset 0x8
094d 0000 0000 | | .XXX[0x3]
094f 0000 | |
0950 ; --------------------------------------------------------------------------------------
0950 ; SUBPROGRAM
0950 ; --------------------------------------------------------------------------------------
0950 0959 | Y | .CONST 0x0959 ; Address of begin
0951 0004 | | .CONST 0x0004 ; Address of exception handler
0952 0002 | | .CONST 0x0002 ; Number of locals
0953 INIT_0950:
0953 e5ff | | Load 0x2,-0x1
0954 e012 | | Load 0x0,0x12
0955 180e | | Execute Package,Field_Execute,Field_Number 0xe
0956 e012 | | Load 0x0,0x12
0957 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0958 03f1 | | Declare_Variable Discrete,With_Value
0959 BODY_0950:
0959 00d8 | | Load_Top At_Offset_0
095a 6804 |h | Jump_Zero 0x95f
095b 00d8 | | Load_Top At_Offset_0
095c e012 | | Load 0x0,0x12
095d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
095e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
095f 4800 |H | Short_Literal 0x0
0960 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0961 0000 0000 | | .BLANK 0000[0x7]
0968 ; --------------------------------------------------------------------------------------
0968 ; SUBPROGRAM
0968 ; --------------------------------------------------------------------------------------
0968 096b | k | .CONST 0x096b ; Address of begin
0969 0004 | | .CONST 0x0004 ; Address of exception handler
096a 0001 | | .CONST 0x0001 ; Number of locals
096b BODY_0968:
096b INIT_0968:
096b 4801 |H | Short_Literal 0x1
096c e220 | | Load 0x1,0x20
096d e5ff | | Load 0x2,-0x1
096e e008 | | Load 0x0,0x8
096f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0970 700c |p | Jump_Nonzero 0x97d
0971 4801 |H | Short_Literal 0x1
0972 e221 | ! | Load 0x1,0x21
0973 e5ff | | Load 0x2,-0x1
0974 e008 | | Load 0x0,0x8
0975 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0976 7006 |p | Jump_Nonzero 0x97d
0977 4801 |H | Short_Literal 0x1
0978 e222 | " | Load 0x1,0x22
0979 e5ff | | Load 0x2,-0x1
097a e008 | | Load 0x0,0x8
097b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
097c 680c |h | Jump_Zero 0x989
097d e221 | ! | Load 0x1,0x21
097e 823e | > | Call 0x1,0x3e
097f 6802 |h | Jump_Zero 0x982
0980 e221 | ! | Load 0x1,0x21
0981 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0982 e222 | " | Load 0x1,0x22
0983 823e | > | Call 0x1,0x3e
0984 6802 |h | Jump_Zero 0x987
0985 e222 | " | Load 0x1,0x22
0986 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0987 e220 | | Load 0x1,0x20
0988 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0989 e5ff | | Load 0x2,-0x1
098a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
098b 0000 0000 | | .BLANK 0000[0x5]
0990 ; --------------------------------------------------------------------------------------
0990 ; SUBPROGRAM
0990 ; --------------------------------------------------------------------------------------
0990 0995 | | .CONST 0x0995 ; Address of begin
0991 0004 | | .CONST 0x0004 ; Address of exception handler
0992 0002 | | .CONST 0x0002 ; Number of locals
0993 INIT_0990:
0993 0092 0a3d | =| Action Push_String_Extended,0xa3d ; "1/1/90"
0995 BODY_0990:
0995 00d8 | | Load_Top At_Offset_0
0996 e602 | | Load 0x3,0x2
0997 8211 | | Call 0x1,0x11
0998 e5ff | | Load 0x2,-0x1
0999 e013 | | Load 0x0,0x13
099a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
099b e5ff | | Load 0x2,-0x1
099c e013 | | Load 0x0,0x13
099d 180d | | Execute Package,Field_Execute,Field_Number 0xd
099e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
099f 0000 | | .XXX[0x1]
09a0 ; --------------------------------------------------------------------------------------
09a0 ; SUBPROGRAM
09a0 ; --------------------------------------------------------------------------------------
09a0 09ab | | .CONST 0x09ab ; Address of begin
09a1 0004 | | .CONST 0x0004 ; Address of exception handler
09a2 0002 | | .CONST 0x0002 ; Number of locals
09a3 INIT_09a0:
09a3 e002 | | Load 0x0,0x2
09a4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09a5 0322 | " | Declare_Variable Record
09a6 e7ff | | Load 0x3,-0x1
09a7 e002 | | Load 0x0,0x2
09a8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
09a9 e602 | | Load 0x3,0x2
09aa 017d | } | Execute Record,Structure_Write
09ab BODY_09a0:
09ab 4800 |H | Short_Literal 0x0
09ac e602 | | Load 0x3,0x2
09ad 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
09ae 4800 |H | Short_Literal 0x0
09af e602 | | Load 0x3,0x2
09b0 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
09b1 4801 |H | Short_Literal 0x1
09b2 e602 | | Load 0x3,0x2
09b3 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
09b4 4800 |H | Short_Literal 0x0
09b5 e602 | | Load 0x3,0x2
09b6 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
09b7 00d8 | | Load_Top At_Offset_0
09b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09b9 0000 0000 | | .BLANK 0000[0x7]
09c0 ; --------------------------------------------------------------------------------------
09c0 ; SUBPROGRAM
09c0 ; --------------------------------------------------------------------------------------
09c0 09c6 | | .CONST 0x09c6 ; Address of begin
09c1 09cc | | .CONST 0x09cc ; Address of exception handler
09c2 0002 | | .CONST 0x0002 ; Number of locals
09c3 INIT_09c0:
09c3 e002 | | Load 0x0,0x2
09c4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09c5 0322 | " | Declare_Variable Record
09c6 BODY_09c0:
09c6 e5ff | | Load 0x2,-0x1
09c7 e002 | | Load 0x0,0x2
09c8 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
09c9 e602 | | Load 0x3,0x2
09ca 017d | } | Execute Record,Structure_Write
09cb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
09cc TRAP_09c0:
09cc 0007 | | Action Break_Optional
09cd e5fe | | Load 0x2,-0x2
09ce 0092 0a3e | >| Action Push_String_Extended,0xa3e ; "Date ("
09d0 e5ff | | Load 0x2,-0x1
09d1 01cc | | Execute Vector,Catenate
09d2 0092 0a3f | ?| Action Push_String_Extended,0xa3f ; ") doesn't represent a legal date."
09d4 01cc | | Execute Vector,Catenate
09d5 e224 | $ | Load 0x1,0x24
09d6 180d | | Execute Package,Field_Execute,Field_Number 0xd
09d7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
09d8 ; --------------------------------------------------------------------------------------
09d8 ; SUBPROGRAM
09d8 ; --------------------------------------------------------------------------------------
09d8 09db | | .CONST 0x09db ; Address of begin
09d9 0004 | | .CONST 0x0004 ; Address of exception handler
09da 0001 | | .CONST 0x0001 ; Number of locals
09db BODY_09d8:
09db INIT_09d8:
09db e7ff | | Load 0x3,-0x1
09dc 823e | > | Call 0x1,0x3e
09dd 680e |h | Jump_Zero 0x9ec
09de e5fc | | Load 0x2,-0x4
09df 482e |H. | Short_Literal 0x2e
09e0 0092 0a40 | @| Action Push_String_Extended,0xa40 ; "Active tokens for "
09e2 e7ff | | Load 0x3,-0x1
09e3 01cc | | Execute Vector,Catenate
09e4 0092 0a41 | A| Action Push_String_Extended,0xa41 ; " make it impossible to accept tokens for "
09e6 01cc | | Execute Vector,Catenate
09e7 e5ff | | Load 0x2,-0x1
09e8 01cc | | Execute Vector,Catenate
09e9 01cb | | Execute Vector,Append
09ea e224 | $ | Load 0x1,0x24
09eb 180d | | Execute Package,Field_Execute,Field_Number 0xd
09ec 4502 |E | Exit_Suprogram New_Top_Offset 0x2
09ed ; --------------------------------------------------------------------------------------
09ed ; STRING TABLE
09ed ; --------------------------------------------------------------------------------------
09ed 00ac | | .STRTAB 0x00ac->0x0a43 ; "Login"
09ee 00af | | .STRTAB 0x00af->0x0a45 ; "Full Session"
09ef 00b9 | | .STRTAB 0x00b9->0x0a4b ; "Fundamental Session"
09f0 00ca | | .STRTAB 0x00ca->0x0a55 ; "Accept_Tokens"
09f1 00d5 | | .STRTAB 0x00d5->0x0a5b ; "Donate_Tokens"
09f2 00e0 | | .STRTAB 0x00e0->0x0a62 ; "Remote_Machine_ID specified is the Machine_ID for this machine."
09f3 011d | | .STRTAB 0x011d->0x0a81 ; "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."
09f4 0202 | | .STRTAB 0x0202->0x0af5 ; "This machine has accepted tokens today; it may not also give them up"
09f5 0244 | D | .STRTAB 0x0244->0x0b17 ; "Set_Site"
09f6 024a | J | .STRTAB 0x024a->0x0b1b ; "Code ("
09f7 024e | N | .STRTAB 0x024e->0x0b1e ; ") does not correspond to Site ("
09f8 026b | k | .STRTAB 0x026b->0x0b2d ; ")."
09f9 026b | k | .STRTAB 0x026b->0x0b2e ; "Site set to "
09fa 0275 | u | .STRTAB 0x0275->0x0b34 ; "Convert_Tokens"
09fb 0281 | | .STRTAB 0x0281->0x0b3b ; "The token count for the current product ("
09fc 02a8 | | .STRTAB 0x02a8->0x0b50 ; ") is NOT equal to Token_Count parameter ("
09fd 02cf | | .STRTAB 0x02cf->0x0b64 ; "); these must be equal in order to proceed."
09fe 02f8 | | .STRTAB 0x02f8->0x0b7a ; "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 ("
09ff 03ac | | .STRTAB 0x03ac->0x0bd5 ; "), a delay in posting the request (code only valid for one day), "
0a00 03eb | | .STRTAB 0x03eb->0x0bf5 ; "or some other combination of parameter problems. "
0a01 041b | | .STRTAB 0x041b->0x0c0e ; "Contact your Rational representative for further assistance."
0a02 0455 | U | .STRTAB 0x0455->0x0c2c ; "The authorization provided has been used previously for this product. It must be unique for this machine for all time."
0a03 04ca | | .STRTAB 0x04ca->0x0c68 ; " tokens set to "
0a04 04d7 | | .STRTAB 0x04d7->0x0c6f ; " has no more tokens."
0a05 04e9 | | .STRTAB 0x04e9->0x0c79 ; "Allow_Token_Conversion"
0a06 04fd | | .STRTAB 0x04fd->0x0c84 ; "Must be run from a Rational site."
0a07 051c | | .STRTAB 0x051c->0x0c95 ; "Assign_Tokens"
0a08 0527 | ' | .STRTAB 0x0527->0x0c9b ; "Assign_Site"
0a09 0530 | 0 | .STRTAB 0x0530->0x0ca1 ; "Run the following on the remote machine:"
0a0a 0556 | V | .STRTAB 0x0556->0x0cb5 ; "Site"
0a0b 0558 | X | .STRTAB 0x0558->0x0cb7 ; "Code"
0a0c 055a | Z | .STRTAB 0x055a->0x0cb9 ; "Training"
0a0d 0560 | ` | .STRTAB 0x0560->0x0cbd ; "Training_Authorization"
0a0e 0574 | t | .STRTAB 0x0574->0x0cc8 ; "Product and Token authorization checking has been reinstated."
0a0f 05af | | .STRTAB 0x05af->0x0ce6 ; "Authorization_Checking_Reinstated"
0a10 05ce | | .STRTAB 0x05ce->0x0cf7 ; "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."
0a11 0699 | | .STRTAB 0x0699->0x0d5d ; "Authorization_Checking_Suspended"
0a12 06b7 | | .STRTAB 0x06b7->0x0d6d ; "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."
0a13 075e | ^ | .STRTAB 0x075e->0x0dc2 ; "Authorization_Code_Error"
0a14 0774 | t | .STRTAB 0x0774->0x0dce ; "/"
0a15 0773 | s | .STRTAB 0x0773->0x0dce ; "="
0a16 0772 | r | .STRTAB 0x0772->0x0dcf ; "|"
0a17 0771 | q | .STRTAB 0x0771->0x0dcf ; "Product"
0a18 0776 | v | .STRTAB 0x0776->0x0dd3 ; "Donation"
0a19 077c | | | .STRTAB 0x077c->0x0dd7 ; "Resulting_Count"
0a1a 0789 | | .STRTAB 0x0789->0x0dde ; "Authorization"
0a1b 0794 | | .STRTAB 0x0794->0x0de5 ; "Current_Product"
0a1c 07a1 | | .STRTAB 0x07a1->0x0dec ; "New_Product"
0a1d 07aa | | .STRTAB 0x07aa->0x0df2 ; "Token_Count"
0a1e 07b3 | | .STRTAB 0x07b3->0x0df7 ; "The legal range of "
0a1f 07c4 | | .STRTAB 0x07c4->0x0e01 ; " for "
0a20 07c7 | | .STRTAB 0x07c7->0x0e03 ; " is "
0a21 07c9 | | .STRTAB 0x07c9->0x0e05 ; ".."
0a22 07c9 | | .STRTAB 0x07c9->0x0e06 ; ", but the value specified ("
0a23 07e2 | | .STRTAB 0x07e2->0x0e14 ; ") is outside that range"
0a24 07f7 | | .STRTAB 0x07f7->0x0e1f ; "Product name not specified."
0a25 0810 | | .STRTAB 0x0810->0x0e2d ; "Product name contains an illegal character ("
0a26 083a | : | .STRTAB 0x083a->0x0e43 ; "Product name includes leading or trailing blanks."
0a27 0869 | i | .STRTAB 0x0869->0x0e5b ; "Site name not specified."
0a28 087f | | .STRTAB 0x087f->0x0e67 ; "Site name contains an illegal character ("
0a29 08a6 | | .STRTAB 0x08a6->0x0e7c ; "Site name includes leading or trailing blanks."
0a2a 08d2 | | .STRTAB 0x08d2->0x0e93 ; "Date contains an illegal character ("
0a2b 08f4 | | .STRTAB 0x08f4->0x0ea5 ; "The number of tokens ("
0a2c 0908 | | .STRTAB 0x0908->0x0eb0 ; ") for "
0a2d 090c | | .STRTAB 0x090c->0x0eb3 ; " exceeds the target authorization ("
0a2e 092d | - | .STRTAB 0x092d->0x0ec4 ; "Cannot specify both authorization and date for "
0a2f 095a | Z | .STRTAB 0x095a->0x0edc ; "There are currently no tokens for "
0a30 097a | z | .STRTAB 0x097a->0x0eed ; ", so they can't be donated."
0a31 0993 | | .STRTAB 0x0993->0x0efa ; "The requested donation ("
0a32 09a9 | | .STRTAB 0x09a9->0x0f06 ; "exceeds the current limit ("
0a33 09c2 | | .STRTAB 0x09c2->0x0f14 ; "Donation of "
0a34 09cc | | .STRTAB 0x09cc->0x0f1a ; " tokens for "
0a35 09d6 | | .STRTAB 0x09d6->0x0f20 ; " would transfer tokens currently in use."
0a36 09fc | | .STRTAB 0x09fc->0x0f34 ; " has resulted in "
0a37 0a0b | | .STRTAB 0x0a0b->0x0f3c ; " tokens."
0a38 0a11 | | .STRTAB 0x0a11->0x0f40 ; "This machine has donated tokens today; it may not also accept them"
0a39 0a51 | Q | .STRTAB 0x0a51->0x0f61 ; "The sum of currently authorized tokens and Donations ("
0a3a 0a85 | | .STRTAB 0x0a85->0x0f7c ; ") is NOT equal to Resulting_Count parameter ("
0a3b 0ab0 | | .STRTAB 0x0ab0->0x0f93 ; "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 ("
0a3c 0b98 | | .STRTAB 0x0b98->0x1008 ; "), a transcription error of the Machine ID of this machine ("
0a3d 0bd2 | | .STRTAB 0x0bd2->0x1026 ; "1/1/90"
0a3e 0bd6 | | .STRTAB 0x0bd6->0x1029 ; "Date ("
0a3f 0bda | | .STRTAB 0x0bda->0x102c ; ") doesn't represent a legal date."
0a40 0bf9 | | .STRTAB 0x0bf9->0x103c ; "Active tokens for "
0a41 0c09 | | .STRTAB 0x0c09->0x1045 ; " make it impossible to accept tokens for "
0a42 0c30 | 0 | .STREND 0x0c30->0x105a
0a43 4c6f 6769 |Logi| .STRTAB_STRINGS
105a 0000 0000 | | .BLANK 0000[0x6]
1060 ; --------------------------------------------------------------------------------------
1060 ; Debug Table
1060 ; --------------------------------------------------------------------------------------
1060 0004 0010 | | .DEBUG4 0x0004,0x0010,0xd50d,0x0000,0x0001,0x0000
1066 e5fe 01db | | .XXX[0x11]
1068 680d e5fe |h |
106a e009 1b0d | |
106c 1817 a407 | |
106e e407 e2da | |
1070 1842 e407 | B |
1072 e009 1b0d | |
1074 1812 c407 | |
1076 4504 |E |
1077 0000 0000 | | .BLANK 0000[0x4]
107b 4000 0000 |@ | .XXX[0x41]
107d 0000 0000 | |
107f 5460 0000 |T` |
1081 0000 0008 | |
1083 ca00 0000 | |
1085 0000 0006 | |
1087 9780 0000 | |
1089 0000 0002 | |
108b 3280 ffff |2 |
108d ffff ffff | |
108f 7360 0000 |s` |
1091 0000 7fff | |
1093 ffff 0000 | |
1095 0000 0000 | |
1097 1770 0000 | p |
1099 0000 0000 | |
109b d2f0 0000 | |
109d 0000 0000 | |
109f 0bb8 0000 | |
10a1 0000 0000 | |
10a3 2ee0 0000 |. |
10a5 0000 0003 | |
10a7 4bc0 0000 |K |
10a9 0000 0000 | |
10ab 4650 0000 |FP |
10ad 0000 0000 | |
10af 5dc0 0000 |] |
10b1 0000 0000 | |
10b3 8ca0 0000 | |
10b5 0000 0001 | |
10b7 1940 0000 | @ |
10b9 0000 0007 | |
10bb 2420 |$ |
10bc 0000 0000 | | .BLANK 0000[0x4]
10c0 04db 0533 | 3| .XXX[0x140]
10c2 0004 e267 | g|
10c4 0322 e26e | " n|
10c6 02ff 00d8 | |
10c8 1c00 e5ff | |
10ca e073 1b35 | s 5|
10cc 1839 e066 | 9 f|
10ce 1b12 e067 | g|
10d0 183e 00d8 | > |
10d2 e067 183d | g =|
10d4 7003 e068 |p h|
10d6 1b27 0257 | ' W|
10d8 1811 01cc | |
10da 0007 e270 | p|
10dc 00ea e604 | |
10de 4800 e26f |H o|
10e0 1813 c270 | p|
10e2 e603 e270 | p|
10e4 e26f 181c | o |
10e6 00d1 4801 | H |
10e8 e603 2c02 | , |
10ea e603 2704 | ' |
10ec 01cf e26b | k|
10ee 01de 6801 | h |
10f0 08e2 e603 | |
10f2 2e03 e292 |. |
10f4 821f 6803 | h |
10f6 e603 2e03 | . |
10f8 c292 4800 | H |
10fa e602 3806 | 8 |
10fc 4800 e602 |H |
10fe 3807 4801 |8 H |
1100 e602 3808 | 8 |
1102 00cf e603 | |
1104 e270 e26f | p o|
1106 181c 00d1 | |
1108 e603 2605 | & |
110a e602 3800 | 8 |
110c e603 2e06 | . |
110e e602 3801 | 8 |
1110 e603 2e07 | . |
1112 e602 3802 | 8 |
1114 e603 2608 | & |
1116 e602 3803 | 8 |
1118 e603 2e09 | . |
111a e602 3804 | 8 |
111c e603 2e0a | . |
111e e602 3805 | 8 |
1120 e009 1b0d | |
1122 182b e602 | + |
1124 3809 e269 |8 i|
1126 4800 e602 |H |
1128 4801 e603 |H |
112a 2c02 e603 |, |
112c 270b 01cf |' |
112e e268 1815 | h |
1130 c269 00c9 | i |
1132 7fd0 00d8 | |
1134 0107 4920 | I |
1136 492f 0262 |I/ b|
1138 6801 4501 |h E |
113a 00d8 0107 | |
113c 4950 495f |IPI_|
113e 0262 6805 | bh |
1140 e270 e26f | p o|
1142 1814 c270 | p|
1144 4501 e270 |E p|
1146 e26f 181b | o |
1148 6810 e270 |h p|
114a e26f 1814 | o |
114c c270 e268 | p h|
114e 1b12 e268 | h|
1150 1817 c269 | i|
1152 e604 0092 | |
1154 0581 01cc | |
1156 e069 180f | i |
1158 4501 0092 |E |
115a 0582 e604 | |
115c 01cc 0092 | |
115e 057d 01cc | } |
1160 4800 4801 |H H |
1162 e070 1815 | p |
1164 01cc 0092 | |
1166 0583 01cc | |
1168 e069 180e | i |
116a 4501 0034 |E 4|
116c 003a 005d | : ]|
116e 0065 006b | e k|
1170 006e 0070 | n p|
1172 007f 008d | |
1174 0090 0097 | |
1176 009e 009e | |
1178 009e 00fe | |
117a 011a 0134 | 4|
117c 019f 01c8 | |
117e 01c8 023f | ?|
1180 0262 0285 | b |
1182 02b3 02cc | |
1184 02e0 7374 | st|
1186 616e 6461 |anda|
1188 7264 2253 |rd"S|
118a 7461 6e64 |tand|
118c 6172 6422 |ard"|
118e 2066 6f6e | fon|
1190 7420 6661 |t fa|
1192 6d69 6c79 |mily|
1194 2069 7320 | is |
1196 6e6f 7420 |not |
1198 6465 6669 |defi|
119a 6e65 6441 |nedA|
119c 7070 656e |ppen|
119e 6469 787e |dix~|
11a0 2046 6967 | Fig|
11a2 7572 657e |ure~|
11a4 207e 202d | ~ -|
11a6 7e20 626f |~ bo|
11a8 6c64 5461 |ldTa|
11aa 626c 6520 |ble |
11ac 4f66 2043 |Of C|
11ae 6f6e 7465 |onte|
11b0 6e74 7354 |ntsT|
11b2 6162 6c65 |able|
11b4 204f 6620 | Of |
11b6 4669 6775 |Figu|
11b8 7265 7349 |resI|
11ba 6e64 6578 |ndex|
11bc 7e31 7e2b |~1~+|
11be 2e7e 7c7e |.~|~|
11c0 317e 417e |1~A~|
11c2 2b2e 7e7c |+.~||
11c4 7e31 7e31 |~1~1|
11c6 7e69 7e31 |~i~1|
11c8 2e7e 7c7e |.~|~|
11ca 312e 7e7c |1.~||
11cc 7e31 2e7e |~1.~|
11ce 7c7e 312e ||~1.|
11d0 7e7c 7e31 |~|~1|
11d2 2e7e 7c7e |.~|~|
11d4 312e 7e7c |1.~||
11d6 7e31 2e7e |~1.~|
11d8 7c7e 312e ||~1.|
11da 7e7c 7e31 |~|~1|
11dc 2e7e 7c7e |.~|~|
11de 312e 7e7c |1.~||
11e0 7e31 2e7e |~1.~|
11e2 7c7e 312e ||~1.|
11e4 7e7c 7e31 |~|~1|
11e6 2e7e 7c7e |.~|~|
11e8 312e 7e7c |1.~||
11ea 7e31 2e7e |~1.~|
11ec 7c7e 312e ||~1.|
11ee 7e7c 7e31 |~|~1|
11f0 2e7e 7c7e |.~|~|
11f2 312e 7e7c |1.~||
11f4 7e31 2e7e |~1.~|
11f6 7c7e 312e ||~1.|
11f8 7e41 7e2b |~A~+|
11fa 2e7e 7c7e |.~|~|
11fc 312e 7e7c |1.~||
11fe 7e31 2e7e |~1.~|