|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 5120 (0x1400)
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 09d0 | | .CONST 0x09d0 ; 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 8005 | | .CONST 0x8005 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0018
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 009b | | .CONST 0x009b ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 001a | | .CONST 0x001a ; Number of locals
001b INIT_0018:
001b e002 | | Load 0x0,0x2
001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001d 02c7 | | Declare_Variable Any
001e 60b1 |` | Indirect_Literal Discrete,0xd0,{0x00000013, 0xc6800000}
001f e002 | | Load 0x0,0x2
0020 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0021 e002 | | Load 0x0,0x2
0022 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0023 0092 0872 | r| Action Push_String_Extended,0x872 ; "<MINUS_30_DAYS>"
0025 e5ff | | Load 0x2,-0x1
0026 8003 | | Call 0x0,0x3
0027 8004 | | Call 0x0,0x4
0028 a402 | | Store_Unchecked 0x2,0x2
0029 e002 | | Load 0x0,0x2
002a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002b 02c7 | | Declare_Variable Any
002c e002 | | Load 0x0,0x2
002d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
002e 0092 0873 | s| Action Push_String_Extended,0x873 ; "<TODAY>"
0030 e5fe | | Load 0x2,-0x2
0031 8003 | | Call 0x0,0x3
0032 8004 | | Call 0x0,0x4
0033 a403 | | Store_Unchecked 0x2,0x3
0034 00e7 | | Load_Encached Duration_Cache
0035 e005 | | Load 0x0,0x5
0036 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0037 02c7 | | Declare_Variable Any
0038 00d8 | | Load_Top At_Offset_0
0039 1c00 | | Execute_Immediate Run_Utility,0x0
003a e006 | | Load 0x0,0x6
003b 0007 | | Action Break_Optional
003c e007 | | Load 0x0,0x7
003d 0322 | " | Declare_Variable Record
003e 4800 |H | Short_Literal 0x0
003f 4807 |H | Short_Literal 0x7
0040 029f 00db | | Declare_Subprogram For_Call,INIT_00d8
0042 03fd | | Declare_Type Discrete,Defined
0043 4800 |H | Short_Literal 0x0
0044 480b |H | Short_Literal 0xb
0045 029f 0103 | | Declare_Subprogram For_Call,INIT_0100
0047 03fd | | Declare_Type Discrete,Defined
0048 4809 |H | Short_Literal 0x9
0049 480b |H | Short_Literal 0xb
004a e409 | | Load 0x2,0x9
004b 03f8 | | Declare_Type Discrete,Constrained
004c 4800 |H | Short_Literal 0x0
004d 4808 |H | Short_Literal 0x8
004e e409 | | Load 0x2,0x9
004f 03f8 | | Declare_Type Discrete,Constrained
0050 4800 |H | Short_Literal 0x0
0051 4801 |H | Short_Literal 0x1
0052 029f 012b | +| Declare_Subprogram For_Call,INIT_0128
0054 03fd | | Declare_Type Discrete,Defined
0055 00d8 | | Load_Top At_Offset_0
0056 0266 | f | Execute Discrete,Bounds
0057 00e7 | | Load_Encached Duration_Cache
0058 02a0 | | Declare_Subprogram Null_Subprogram
0059 4801 |H | Short_Literal 0x1
005a 035d | ] | Declare_Type Array,Defined
005b e409 | | Load 0x2,0x9
005c 0266 | f | Execute Discrete,Bounds
005d e40d | | Load 0x2,0xd
005e 02a0 | | Declare_Subprogram Null_Subprogram
005f 4801 |H | Short_Literal 0x1
0060 035d | ] | Declare_Type Array,Defined
0061 00e7 | | Load_Encached Duration_Cache
0062 00e7 | | Load_Encached Duration_Cache
0063 029f 0153 | S| Declare_Subprogram For_Call,INIT_0150
0065 4802 |H | Short_Literal 0x2
0066 032d | - | Declare_Type Record,Defined
0067 4801 |H | Short_Literal 0x1
0068 4807 |H | Short_Literal 0x7
0069 e40f | | Load 0x2,0xf
006a 029f 0163 | c| Declare_Subprogram For_Call,INIT_0160
006c 4801 |H | Short_Literal 0x1
006d 035d | ] | Declare_Type Array,Defined
006e e40e | | Load 0x2,0xe
006f 0337 | 7 | Declare_Variable Array
0070 00d8 | | Load_Top At_Offset_0
0071 0335 | 5 | Declare_Variable Array,Duplicate
0072 00cd | | Action Spare6_Action
0073 480b |H | Short_Literal 0xb
0074 4800 |H | Short_Literal 0x0
0075 e40d | | Load 0x2,0xd
0076 0337 | 7 | Declare_Variable Array
0077 4800 |H | Short_Literal 0x0
0078 4800 |H | Short_Literal 0x0
0079 e415 | | Load 0x2,0x15
007a 01d6 | | Execute Vector,Field_Write
007b 4800 |H | Short_Literal 0x0
007c 4801 |H | Short_Literal 0x1
007d e415 | | Load 0x2,0x15
007e 01d6 | | Execute Vector,Field_Write
007f e40d | | Load 0x2,0xd
0080 0119 | | Execute Any,Check_In_Formal_Type
0081 e414 | | Load 0x2,0x14
0082 e412 | | Load 0x2,0x12
0083 01d6 | | Execute Vector,Field_Write
0084 3ff0 |? | Loop_Increasing 0x75
0085 e411 | | Load 0x2,0x11
0086 01d4 | | Execute Vector,Structure_Write
0087 e410 | | Load 0x2,0x10
0088 0337 | 7 | Declare_Variable Array
0089 00d8 | | Load_Top At_Offset_0
008a 1c00 | | Execute_Immediate Run_Utility,0x0
008b 029f 017b | {| Declare_Subprogram For_Call,INIT_0178
008d 029f 027b | {| Declare_Subprogram For_Call,INIT_0278
008f 029f 036b | k| Declare_Subprogram For_Call,INIT_0368
0091 029f 0383 | | Declare_Subprogram For_Call,INIT_0380
0093 029f 0393 | | Declare_Subprogram For_Call,INIT_0390
0095 029f 03b3 | | Declare_Subprogram For_Call,INIT_03b0
0097 029f 03e3 | | Declare_Subprogram For_Call,INIT_03e0
0099 029f 060b | | Declare_Subprogram For_Call,INIT_0608
009b BODY_0018:
009b 8413 | | Call 0x2,0x13
009c e412 | | Load 0x2,0x12
009d 01d4 | | Execute Vector,Structure_Write
009e e402 | | Load 0x2,0x2
009f e403 | | Load 0x2,0x3
00a0 e002 | | Load 0x0,0x2
00a1 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00a2 0c01 | | Execute_Immediate Greater_Equal,0x1
00a3 6822 |h" | Jump_Zero 0xc6
00a4 e405 | | Load 0x2,0x5
00a5 00e7 | | Load_Encached Duration_Cache
00a6 e5fc | | Load 0x2,-0x4
00a7 4802 |H | Short_Literal 0x2
00a8 4801 |H | Short_Literal 0x1
00a9 4802 |H | Short_Literal 0x2
00aa e403 | | Load 0x2,0x3
00ab 8008 | | Call 0x0,0x8
00ac 4802 |H | Short_Literal 0x2
00ad 4801 |H | Short_Literal 0x1
00ae 4802 |H | Short_Literal 0x2
00af e402 | | Load 0x2,0x2
00b0 8008 | | Call 0x0,0x8
00b1 8009 | | Call 0x0,0x9
00b2 c404 | | Store 0x2,0x4
00b3 c405 | | Store 0x2,0x5
00b4 e006 | | Load 0x0,0x6
00b5 800a | | Call 0x0,0xa
00b6 c406 | | Store 0x2,0x6
00b7 00cf | | Action Mark_Auxiliary
00b8 7807 |x | Jump 0xc0
00b9 e406 | | Load 0x2,0x6
00ba 800b | | Call 0x0,0xb
00bb 8417 | | Call 0x2,0x17
00bc e406 | | Load 0x2,0x6
00bd 800c | | Call 0x0,0xc
00be c406 | | Store 0x2,0x6
00bf 00c9 | | Action Pop_Auxiliary_Loop
00c0 e406 | | Load 0x2,0x6
00c1 800d | | Call 0x0,0xd
00c2 6ff6 |o | Jump_Zero 0xb9
00c3 00ce | | Action Pop_Auxiliary
00c4 8419 | | Call 0x2,0x19
00c5 7804 |x | Jump 0xca
00c6 0092 0874 | t| Action Push_String_Extended,0x874 ; "Cannot calculate Availability, Starting Date = Ending Date"
00c8 e00e | | Load 0x0,0xe
00c9 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00ca e5fd | | Load 0x2,-0x3
00cb 6802 |h | Jump_Zero 0xce
00cc e412 | | Load 0x2,0x12
00cd 841a | | Call 0x2,0x1a
00ce 4505 |E | Exit_Subprogram 0x5
00cf 0000 | | .XXX[0x1]
00d0 0000 0013 | | .LITERAL {0x00000013, 0xc6800000}
00d4 0000 0000 | | .BLANK 0000[0x4]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db | | .CONST 0x00db ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0001 | | .CONST 0x0001 ; Number of locals
00db BODY_00d8:
00db INIT_00d8:
00db 4607 |F | Jump_Case 0x7
00dc 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
00dd 7807 |x | Jump 0xe5 ; case 0x1
00de 780a |x | Jump 0xe9 ; case 0x2
00df 780e |x | Jump 0xee ; case 0x3
00e0 7811 |x | Jump 0xf2 ; case 0x4
00e1 7812 |x | Jump 0xf4 ; case 0x5
00e2 7813 |x | Jump 0xf6 ; case 0x6
00e3 7816 |x | Jump 0xfa ; case 0x7
00e4 4302 |C | .XXX[0x1]
00e5 00da | | Load_Top At_Offset_2
00e6 0091 0854 | T| Action Push_String_Extended_Indexed,0x854 ; "NONE"
00e8 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
00e9 00db | | Load_Top At_Offset_3
00ea 00db | | Load_Top At_Offset_3
00eb 00e0 | | Load_Encached Standard_Cache
00ec 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00ed 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
00ee 00da | | Load_Top At_Offset_2
00ef 00e0 | | Load_Encached Standard_Cache
00f0 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00f1 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
00f2 00db | | Load_Top At_Offset_3
00f3 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
00f4 00db | | Load_Top At_Offset_3
00f5 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
00f6 e408 | | Load 0x2,0x8
00f7 00dc | | Load_Top At_Offset_4
00f8 0267 | g | Execute Discrete,Predecessor
00f9 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
00fa e408 | | Load 0x2,0x8
00fb 00dc | | Load_Top At_Offset_4
00fc 0268 | h | Execute Discrete,Successor
00fd 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
00fe 0000 0000 | | .XXX[0x2]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 4607 |F | Jump_Case 0x7
0104 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
0105 7807 |x | Jump 0x10d ; case 0x1
0106 780a |x | Jump 0x111 ; case 0x2
0107 780e |x | Jump 0x116 ; case 0x3
0108 7811 |x | Jump 0x11a ; case 0x4
0109 7812 |x | Jump 0x11c ; case 0x5
010a 7813 |x | Jump 0x11e ; case 0x6
010b 7816 |x | Jump 0x122 ; case 0x7
010c 4302 |C | .XXX[0x1]
010d 00da | | Load_Top At_Offset_2
010e 0091 085c | \| Action Push_String_Extended_Indexed,0x85c ; "PMH"
0110 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0111 00db | | Load_Top At_Offset_3
0112 00db | | Load_Top At_Offset_3
0113 00e0 | | Load_Encached Standard_Cache
0114 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0115 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0116 00da | | Load_Top At_Offset_2
0117 00e0 | | Load_Encached Standard_Cache
0118 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0119 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
011a 00db | | Load_Top At_Offset_3
011b 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
011c 00db | | Load_Top At_Offset_3
011d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
011e e409 | | Load 0x2,0x9
011f 00dc | | Load_Top At_Offset_4
0120 0267 | g | Execute Discrete,Predecessor
0121 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0122 e409 | | Load 0x2,0x9
0123 00dc | | Load_Top At_Offset_4
0124 0268 | h | Execute Discrete,Successor
0125 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0126 0000 0000 | | .XXX[0x2]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b | + | .CONST 0x012b ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0001 | | .CONST 0x0001 ; Number of locals
012b BODY_0128:
012b INIT_0128:
012b 4607 |F | Jump_Case 0x7
012c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
012d 7807 |x | Jump 0x135 ; case 0x1
012e 780a |x | Jump 0x139 ; case 0x2
012f 780e |x | Jump 0x13e ; case 0x3
0130 7811 |x | Jump 0x142 ; case 0x4
0131 7812 |x | Jump 0x144 ; case 0x5
0132 7813 |x | Jump 0x146 ; case 0x6
0133 7816 |x | Jump 0x14a ; case 0x7
0134 4302 |C | .XXX[0x1]
0135 00da | | Load_Top At_Offset_2
0136 0091 0868 | h| Action Push_String_Extended_Indexed,0x868 ; "CONTRACT"
0138 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0139 00db | | Load_Top At_Offset_3
013a 00db | | Load_Top At_Offset_3
013b 00e0 | | Load_Encached Standard_Cache
013c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
013d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
013e 00da | | Load_Top At_Offset_2
013f 00e0 | | Load_Encached Standard_Cache
0140 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0141 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0142 00db | | Load_Top At_Offset_3
0143 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0144 00db | | Load_Top At_Offset_3
0145 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0146 e40c | | Load 0x2,0xc
0147 00dc | | Load_Top At_Offset_4
0148 0267 | g | Execute Discrete,Predecessor
0149 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
014a e40c | | Load 0x2,0xc
014b 00dc | | Load_Top At_Offset_4
014c 0268 | h | Execute Discrete,Successor
014d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
014e 0000 0000 | | .XXX[0x2]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153 | S | .CONST 0x0153 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0001 | | .CONST 0x0001 ; Number of locals
0153 BODY_0150:
0153 INIT_0150:
0153 4601 |F | Jump_Case 0x1
0154 7801 |x | Jump 0x156 ; case 0x0
0155 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
0156 4800 |H | Short_Literal 0x0
0157 e7ff | | Load 0x3,-0x1
0158 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0159 4800 |H | Short_Literal 0x0
015a e7ff | | Load 0x3,-0x1
015b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
015c 4302 |C | Exit_Subprogram From_Utility,0x2
015d 0000 0000 | | .XXX[0x3]
015f 0000 | |
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163 | c | .CONST 0x0163 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0001 | | .CONST 0x0001 ; Number of locals
0163 BODY_0160:
0163 INIT_0160:
0163 00d1 | | Pop_Control Pop_Count_1
0164 e7ff | | Load 0x3,-0x1
0165 01d8 | | Execute Vector,Element_Type
0166 0322 | " | Declare_Variable Record
0167 00d8 | | Load_Top At_Offset_0
0168 1c00 | | Execute_Immediate Run_Utility,0x0
0169 e7ff | | Load 0x3,-0x1
016a 01dc | | Execute Vector,Last
016b e7ff | | Load 0x3,-0x1
016c 01dd | | Execute Vector,First
016d 0263 | c | Execute Discrete,Above_Bound
016e 7006 |p | Jump_Nonzero 0x175
016f e602 | | Load 0x3,0x2
0170 e604 | | Load 0x3,0x4
0171 e7ff | | Load 0x3,-0x1
0172 01d6 | | Execute Vector,Field_Write
0173 0a01 | | Execute_Immediate Plus,0x1
0174 7ff8 | | Jump 0x16d
0175 4302 |C | Exit_Subprogram From_Utility,0x2
0176 0000 0000 | | .XXX[0x2]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 01ce | | .CONST 0x01ce ; Address of begin
0179 024d | M | .CONST 0x024d ; Address of exception handler
017a 000c | | .CONST 0x000c ; Number of locals
017b INIT_0178:
017b e410 | | Load 0x2,0x10
017c 0337 | 7 | Declare_Variable Array
017d 00d8 | | Load_Top At_Offset_0
017e 0335 | 5 | Declare_Variable Array,Duplicate
017f 00cd | | Action Spare6_Action
0180 4805 |H | Short_Literal 0x5
0181 4801 |H | Short_Literal 0x1
0182 e40f | | Load 0x2,0xf
0183 0322 | " | Declare_Variable Record
0184 60ef |` | Indirect_Literal Discrete,0x274,{0x00000000, 0x38400000}
0185 e606 | | Load 0x3,0x6
0186 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0187 60e8 |` | Indirect_Literal Discrete,0x270,{0x00000000, 0x7e900000}
0188 e606 | | Load 0x3,0x6
0189 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
018a e605 | | Load 0x3,0x5
018b e603 | | Load 0x3,0x3
018c 01d6 | | Execute Vector,Field_Write
018d 3ff4 |? | Loop_Increasing 0x182
018e 4807 |H | Short_Literal 0x7
018f 4806 |H | Short_Literal 0x6
0190 e40f | | Load 0x2,0xf
0191 0322 | " | Declare_Variable Record
0192 4800 |H | Short_Literal 0x0
0193 e606 | | Load 0x3,0x6
0194 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0195 4800 |H | Short_Literal 0x0
0196 e606 | | Load 0x3,0x6
0197 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0198 e605 | | Load 0x3,0x5
0199 e603 | | Load 0x3,0x3
019a 01d6 | | Execute Vector,Field_Write
019b 3ff4 |? | Loop_Increasing 0x190
019c e602 | | Load 0x3,0x2
019d 01d4 | | Execute Vector,Structure_Write
019e e410 | | Load 0x2,0x10
019f 0337 | 7 | Declare_Variable Array
01a0 e602 | | Load 0x3,0x2
01a1 e603 | | Load 0x3,0x3
01a2 01d4 | | Execute Vector,Structure_Write
01a3 0092 0875 | u| Action Push_String_Extended,0x875 ; "!Machine.Contract_Hours"
01a5 e00e | | Load 0x0,0xe
01a6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a7 02c7 | | Declare_Variable Any
01a8 00d8 | | Load_Top At_Offset_0
01a9 1c00 | | Execute_Immediate Run_Utility,0x0
01aa 4800 |H | Short_Literal 0x0
01ab 4807 |H | Short_Literal 0x7
01ac 029f 065b | [| Declare_Subprogram For_Call,INIT_0658
01ae 03fd | | Declare_Type Discrete,Defined
01af e00f | | Load 0x0,0xf
01b0 e010 | | Load 0x0,0x10
01b1 e606 | | Load 0x3,0x6
01b2 4800 |H | Short_Literal 0x0
01b3 4801 |H | Short_Literal 0x1
01b4 4807 |H | Short_Literal 0x7
01b5 0092 0876 | v| Action Push_String_Extended,0x876 ; "others => Unspecified"
01b7 00ea | | Load_Encached Null_String_Cache
01b8 00ea | | Load_Encached Null_String_Cache
01b9 4801 |H | Short_Literal 0x1
01ba 4807 |H | Short_Literal 0x7
01bb e011 | | Load 0x0,0x11
01bc 0387 | | Declare_Variable Package
01bd 00d8 | | Load_Top At_Offset_0
01be 020f | | Execute Module,Activate
01bf 00d8 | | Load_Top At_Offset_0
01c0 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
01c1 e607 | | Load 0x3,0x7
01c2 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
01c3 e40f | | Load 0x2,0xf
01c4 0322 | " | Declare_Variable Record
01c5 00d8 | | Load_Top At_Offset_0
01c6 1c00 | | Execute_Immediate Run_Utility,0x0
01c7 e012 | | Load 0x0,0x12
01c8 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
01c9 0093 0000 | | PushFullAddress InMicrocode
01cb 60a0 |` | Indirect_Literal Discrete,0x26c,{0x80000000, 0x00010000}
01cc 0273 | s | Execute Discrete,Plus
01cd 0007 | | Action Break_Optional
01ce BODY_0178:
01ce e605 | | Load 0x3,0x5
01cf 00ea | | Load_Encached Null_String_Cache
01d0 e604 | | Load 0x3,0x4
01d1 4800 |H | Short_Literal 0x0
01d2 e00e | | Load 0x0,0xe
01d3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01d4 c605 | | Store 0x3,0x5
01d5 00cf | | Action Mark_Auxiliary
01d6 786b |xk | Jump 0x242
01d7 e605 | | Load 0x3,0x5
01d8 e00e | | Load 0x0,0xe
01d9 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
01da e607 | | Load 0x3,0x7
01db 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01dc a608 | | Store_Unchecked 0x3,0x8
01dd e608 | | Load 0x3,0x8
01de e607 | | Load 0x3,0x7
01df 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
01e0 7002 |p | Jump_Nonzero 0x1e3
01e1 e60c | | Load 0x3,0xc
01e2 0257 | W | Execute Discrete,Raise
01e3 00cf | | Action Mark_Auxiliary
01e4 7857 |xW | Jump 0x23c
01e5 e608 | | Load 0x3,0x8
01e6 e607 | | Load 0x3,0x7
01e7 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
01e8 00d8 | | Load_Top At_Offset_0
01e9 e012 | | Load 0x0,0x12
01ea 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
01eb 0260 | ` | Execute Discrete,In_Type
01ec 7001 |p | Jump_Nonzero 0x1ee
01ed 0801 | | Execute_Immediate Raise,0x1
01ee a60b | | Store_Unchecked 0x3,0xb
01ef 00ea | | Load_Encached Null_String_Cache
01f0 4800 |H | Short_Literal 0x0
01f1 e608 | | Load 0x3,0x8
01f2 e607 | | Load 0x3,0x7
01f3 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
01f4 e607 | | Load 0x3,0x7
01f5 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01f6 a609 | | Store_Unchecked 0x3,0x9
01f7 e609 | | Load 0x3,0x9
01f8 e607 | | Load 0x3,0x7
01f9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01fa 6802 |h | Jump_Zero 0x1fd
01fb e60c | | Load 0x3,0xc
01fc 0257 | W | Execute Discrete,Raise
01fd 4800 |H | Short_Literal 0x0
01fe e609 | | Load 0x3,0x9
01ff e607 | | Load 0x3,0x7
0200 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0201 e012 | | Load 0x0,0x12
0202 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0203 e012 | | Load 0x0,0x12
0204 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0205 e002 | | Load 0x0,0x2
0206 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0207 e60a | | Load 0x3,0xa
0208 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0209 e609 | | Load 0x3,0x9
020a e607 | | Load 0x3,0x7
020b 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
020c c609 | | Store 0x3,0x9
020d e609 | | Load 0x3,0x9
020e e607 | | Load 0x3,0x7
020f 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0210 6802 |h | Jump_Zero 0x213
0211 e60c | | Load 0x3,0xc
0212 0257 | W | Execute Discrete,Raise
0213 4800 |H | Short_Literal 0x0
0214 e609 | | Load 0x3,0x9
0215 e607 | | Load 0x3,0x7
0216 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0217 0092 0877 | w| Action Push_String_Extended,0x877 ; "24:00"
0219 01df | | Execute Vector,Equal
021a 6804 |h | Jump_Zero 0x21f
021b 604c |`L | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000}
021c e60a | | Load 0x3,0xa
021d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
021e 780c |x | Jump 0x22b
021f 4800 |H | Short_Literal 0x0
0220 e609 | | Load 0x3,0x9
0221 e607 | | Load 0x3,0x7
0222 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0223 e012 | | Load 0x0,0x12
0224 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0225 e012 | | Load 0x0,0x12
0226 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0227 e002 | | Load 0x0,0x2
0228 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0229 e60a | | Load 0x3,0xa
022a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
022b e60a | | Load 0x3,0xa
022c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
022d e60a | | Load 0x3,0xa
022e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
022f 027d | } | Execute Discrete,Greater
0230 6802 |h | Jump_Zero 0x233
0231 e60c | | Load 0x3,0xc
0232 0257 | W | Execute Discrete,Raise
0233 e60a | | Load 0x3,0xa
0234 e60b | | Load 0x3,0xb
0235 e603 | | Load 0x3,0x3
0236 01d6 | | Execute Vector,Field_Write
0237 e608 | | Load 0x3,0x8
0238 e607 | | Load 0x3,0x7
0239 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
023a c608 | | Store 0x3,0x8
023b 00c9 | | Action Pop_Auxiliary_Loop
023c e608 | | Load 0x3,0x8
023d e607 | | Load 0x3,0x7
023e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
023f 6fa5 |o | Jump_Zero 0x1e5
0240 00ce | | Action Pop_Auxiliary
0241 00c9 | | Action Pop_Auxiliary_Loop
0242 e605 | | Load 0x3,0x5
0243 e00e | | Load 0x0,0xe
0244 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0245 6f91 |o | Jump_Zero 0x1d7
0246 00ce | | Action Pop_Auxiliary
0247 e605 | | Load 0x3,0x5
0248 e00e | | Load 0x0,0xe
0249 181b | | Execute Package,Field_Execute,Field_Number 0x1b
024a c605 | | Store 0x3,0x5
024b e603 | | Load 0x3,0x3
024c 00ca | | Action Exit_Nullary_Function
024d TRAP_0178:
024d 00d8 | | Load_Top At_Offset_0
024e 0107 | | Execute Exception,Get_Name
024f 4920 |I | Short_Literal 0x120
0250 492f |I/ | Short_Literal 0x12f
0251 0262 | b | Execute Discrete,In_Range
0252 6802 |h | Jump_Zero 0x255
0253 e602 | | Load 0x3,0x2
0254 00ca | | Action Exit_Nullary_Function
0255 e605 | | Load 0x3,0x5
0256 e00e | | Load 0x0,0xe
0257 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0258 6804 |h | Jump_Zero 0x25d
0259 e605 | | Load 0x3,0x5
025a e00e | | Load 0x0,0xe
025b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
025c c605 | | Store 0x3,0x5
025d 0092 0878 | x| Action Push_String_Extended,0x878 ; "*** Error Parsing !Machine.Contract_Hours"
025f e00e | | Load 0x0,0xe
0260 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0261 0092 0879 | y| Action Push_String_Extended,0x879 ; " Using default contract hours."
0263 e00e | | Load 0x0,0xe
0264 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0265 e602 | | Load 0x3,0x2
0266 00ca | | Action Exit_Nullary_Function
0267 0000 | | .XXX[0x1]
0268 0000 0000 | | .LITERAL {0x00000000, 0xa8c00000}
026c 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0270 0000 0000 | | .LITERAL {0x00000000, 0x7e900000}
0274 0000 0000 | | .LITERAL {0x00000000, 0x38400000}
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 02a2 | | .CONST 0x02a2 ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0007 | | .CONST 0x0007 ; Number of locals
027b INIT_0278:
027b e7ff | | Load 0x3,-0x1
027c e012 | | Load 0x0,0x12
027d 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
027e e012 | | Load 0x0,0x12
027f 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0280 03f1 | | Declare_Variable Discrete,With_Value
0281 e002 | | Load 0x0,0x2
0282 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0283 02c7 | | Declare_Variable Any
0284 e7ff | | Load 0x3,-0x1
0285 a603 | | Store_Unchecked 0x3,0x3
0286 e7fe | | Load 0x3,-0x2
0287 00e7 | | Load_Encached Duration_Cache
0288 03f1 | | Declare_Variable Discrete,With_Value
0289 e7ff | | Load 0x3,-0x1
028a e002 | | Load 0x0,0x2
028b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
028c 00e7 | | Load_Encached Duration_Cache
028d 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
028e 00d8 | | Load_Top At_Offset_0
028f e604 | | Load 0x3,0x4
0290 0273 | s | Execute Discrete,Plus
0291 00e7 | | Load_Encached Duration_Cache
0292 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0293 e40d | | Load 0x2,0xd
0294 0337 | 7 | Declare_Variable Array
0295 00d8 | | Load_Top At_Offset_0
0296 0335 | 5 | Declare_Variable Array,Duplicate
0297 00cd | | Action Spare6_Action
0298 4800 |H | Short_Literal 0x0
0299 4800 |H | Short_Literal 0x0
029a e608 | | Load 0x3,0x8
029b 01d6 | | Execute Vector,Field_Write
029c 4800 |H | Short_Literal 0x0
029d 4801 |H | Short_Literal 0x1
029e e608 | | Load 0x3,0x8
029f 01d6 | | Execute Vector,Field_Write
02a0 e607 | | Load 0x3,0x7
02a1 01d4 | | Execute Vector,Structure_Write
02a2 BODY_0278:
02a2 00cf | | Action Mark_Auxiliary
02a3 e604 | | Load 0x3,0x4
02a4 0d01 | | Execute_Immediate Less,0x1
02a5 70bd |p | Jump_Nonzero 0x363
02a6 e605 | | Load 0x3,0x5
02a7 e602 | | Load 0x3,0x2
02a8 e7fd | | Load 0x3,-0x3
02a9 01d5 | | Execute Vector,Field_Reference
02aa 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02ab 027a | z | Execute Discrete,Less_Equal
02ac e606 | | Load 0x3,0x6
02ad e602 | | Load 0x3,0x2
02ae e7fd | | Load 0x3,-0x3
02af 01d5 | | Execute Vector,Field_Reference
02b0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02b1 027b | { | Execute Discrete,Greater_Equal
02b2 0279 | y | Execute Discrete,And
02b3 6875 |hu | Jump_Zero 0x329
02b4 e605 | | Load 0x3,0x5
02b5 e602 | | Load 0x3,0x2
02b6 e7fd | | Load 0x3,-0x3
02b7 01d5 | | Execute Vector,Field_Reference
02b8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02b9 027c | | | Execute Discrete,Less
02ba 681b |h | Jump_Zero 0x2d6
02bb 4801 |H | Short_Literal 0x1
02bc e607 | | Load 0x3,0x7
02bd 01d7 | | Execute Vector,Field_Read
02be e602 | | Load 0x3,0x2
02bf e7fd | | Load 0x3,-0x3
02c0 01d5 | | Execute Vector,Field_Reference
02c1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02c2 e605 | | Load 0x3,0x5
02c3 0272 | r | Execute Discrete,Minus
02c4 0273 | s | Execute Discrete,Plus
02c5 4801 |H | Short_Literal 0x1
02c6 e607 | | Load 0x3,0x7
02c7 01d6 | | Execute Vector,Field_Write
02c8 e604 | | Load 0x3,0x4
02c9 e602 | | Load 0x3,0x2
02ca e7fd | | Load 0x3,-0x3
02cb 01d5 | | Execute Vector,Field_Reference
02cc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02cd e605 | | Load 0x3,0x5
02ce 0272 | r | Execute Discrete,Minus
02cf 0272 | r | Execute Discrete,Minus
02d0 c604 | | Store 0x3,0x4
02d1 e602 | | Load 0x3,0x2
02d2 e7fd | | Load 0x3,-0x3
02d3 01d5 | | Execute Vector,Field_Reference
02d4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02d5 a605 | | Store_Unchecked 0x3,0x5
02d6 e606 | | Load 0x3,0x6
02d7 e602 | | Load 0x3,0x2
02d8 e7fd | | Load 0x3,-0x3
02d9 01d5 | | Execute Vector,Field_Reference
02da 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02db 027d | } | Execute Discrete,Greater
02dc 6843 |hC | Jump_Zero 0x320
02dd 4800 |H | Short_Literal 0x0
02de e607 | | Load 0x3,0x7
02df 01d7 | | Execute Vector,Field_Read
02e0 e602 | | Load 0x3,0x2
02e1 e7fd | | Load 0x3,-0x3
02e2 01d5 | | Execute Vector,Field_Reference
02e3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02e4 e605 | | Load 0x3,0x5
02e5 0272 | r | Execute Discrete,Minus
02e6 0273 | s | Execute Discrete,Plus
02e7 4800 |H | Short_Literal 0x0
02e8 e607 | | Load 0x3,0x7
02e9 01d6 | | Execute Vector,Field_Write
02ea e606 | | Load 0x3,0x6
02eb 677c |g| | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000}
02ec 027d | } | Execute Discrete,Greater
02ed 6824 |h$ | Jump_Zero 0x312
02ee 4801 |H | Short_Literal 0x1
02ef e607 | | Load 0x3,0x7
02f0 01d7 | | Execute Vector,Field_Read
02f1 6776 |gv | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000}
02f2 e602 | | Load 0x3,0x2
02f3 e7fd | | Load 0x3,-0x3
02f4 01d5 | | Execute Vector,Field_Reference
02f5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02f6 0272 | r | Execute Discrete,Minus
02f7 0273 | s | Execute Discrete,Plus
02f8 4801 |H | Short_Literal 0x1
02f9 e607 | | Load 0x3,0x7
02fa 01d6 | | Execute Vector,Field_Write
02fb 676c |gl | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000}
02fc e605 | | Load 0x3,0x5
02fd 0272 | r | Execute Discrete,Minus
02fe 00d8 | | Load_Top At_Offset_0
02ff 00e7 | | Load_Encached Duration_Cache
0300 0260 | ` | Execute Discrete,In_Type
0301 7001 |p | Jump_Nonzero 0x303
0302 0801 | | Execute_Immediate Raise,0x1
0303 e603 | | Load 0x3,0x3
0304 e002 | | Load 0x0,0x2
0305 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0306 c603 | | Store 0x3,0x3
0307 e604 | | Load 0x3,0x4
0308 675f |g_ | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000}
0309 e605 | | Load 0x3,0x5
030a 0272 | r | Execute Discrete,Minus
030b 0272 | r | Execute Discrete,Minus
030c c604 | | Store 0x3,0x4
030d 4800 |H | Short_Literal 0x0
030e a605 | | Store_Unchecked 0x3,0x5
030f e604 | | Load 0x3,0x4
0310 a606 | | Store_Unchecked 0x3,0x6
0311 784b |xK | Jump 0x35d
0312 4801 |H | Short_Literal 0x1
0313 e607 | | Load 0x3,0x7
0314 01d7 | | Execute Vector,Field_Read
0315 e606 | | Load 0x3,0x6
0316 0273 | s | Execute Discrete,Plus
0317 e602 | | Load 0x3,0x2
0318 e7fd | | Load 0x3,-0x3
0319 01d5 | | Execute Vector,Field_Reference
031a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
031b 0272 | r | Execute Discrete,Minus
031c 4801 |H | Short_Literal 0x1
031d e607 | | Load 0x3,0x7
031e 01d6 | | Execute Vector,Field_Write
031f 7843 |xC | Jump 0x363
0320 4800 |H | Short_Literal 0x0
0321 e607 | | Load 0x3,0x7
0322 01d7 | | Execute Vector,Field_Read
0323 e604 | | Load 0x3,0x4
0324 0273 | s | Execute Discrete,Plus
0325 4800 |H | Short_Literal 0x0
0326 e607 | | Load 0x3,0x7
0327 01d6 | | Execute Vector,Field_Write
0328 783a |x: | Jump 0x363
0329 e605 | | Load 0x3,0x5
032a e602 | | Load 0x3,0x2
032b e7fd | | Load 0x3,-0x3
032c 01d5 | | Execute Vector,Field_Reference
032d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
032e 027a | z | Execute Discrete,Less_Equal
032f e606 | | Load 0x3,0x6
0330 6737 |g7 | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000}
0331 027a | z | Execute Discrete,Less_Equal
0332 0278 | x | Execute Discrete,Or
0333 6809 |h | Jump_Zero 0x33d
0334 4801 |H | Short_Literal 0x1
0335 e607 | | Load 0x3,0x7
0336 01d7 | | Execute Vector,Field_Read
0337 e604 | | Load 0x3,0x4
0338 0273 | s | Execute Discrete,Plus
0339 4801 |H | Short_Literal 0x1
033a e607 | | Load 0x3,0x7
033b 01d6 | | Execute Vector,Field_Write
033c 7826 |x& | Jump 0x363
033d 4801 |H | Short_Literal 0x1
033e e607 | | Load 0x3,0x7
033f 01d7 | | Execute Vector,Field_Read
0340 6727 |g' | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000}
0341 e605 | | Load 0x3,0x5
0342 0272 | r | Execute Discrete,Minus
0343 0273 | s | Execute Discrete,Plus
0344 4801 |H | Short_Literal 0x1
0345 e607 | | Load 0x3,0x7
0346 01d6 | | Execute Vector,Field_Write
0347 6720 |g | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000}
0348 e605 | | Load 0x3,0x5
0349 0272 | r | Execute Discrete,Minus
034a 00d8 | | Load_Top At_Offset_0
034b 00e7 | | Load_Encached Duration_Cache
034c 0260 | ` | Execute Discrete,In_Type
034d 7001 |p | Jump_Nonzero 0x34f
034e 0801 | | Execute_Immediate Raise,0x1
034f e603 | | Load 0x3,0x3
0350 e002 | | Load 0x0,0x2
0351 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0352 c603 | | Store 0x3,0x3
0353 e604 | | Load 0x3,0x4
0354 6713 |g | Indirect_Literal Discrete,0x268,{0x00000000, 0xa8c00000}
0355 e605 | | Load 0x3,0x5
0356 0272 | r | Execute Discrete,Minus
0357 0272 | r | Execute Discrete,Minus
0358 c604 | | Store 0x3,0x4
0359 4800 |H | Short_Literal 0x0
035a a605 | | Store_Unchecked 0x3,0x5
035b e604 | | Load 0x3,0x4
035c a606 | | Store_Unchecked 0x3,0x6
035d e603 | | Load 0x3,0x3
035e e012 | | Load 0x0,0x12
035f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0360 a602 | | Store_Unchecked 0x3,0x2
0361 00c9 | | Action Pop_Auxiliary_Loop
0362 7f40 | @ | Jump 0x2a3
0363 00ce | | Action Pop_Auxiliary
0364 00d8 | | Load_Top At_Offset_0
0365 4403 |D | Exit_Subprogram With_Result,0x3
0366 0000 0000 | | .XXX[0x2]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036d | m | .CONST 0x036d ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0002 | | .CONST 0x0002 ; Number of locals
036b INIT_0368:
036b e40d | | Load 0x2,0xd
036c 0337 | 7 | Declare_Variable Array
036d BODY_0368:
036d 00cf | | Action Mark_Auxiliary
036e e40c | | Load 0x2,0xc
036f 0265 | e | Execute Discrete,Reverse_Bounds
0370 0007 | | Action Break_Optional
0371 00d8 | | Load_Top At_Offset_0
0372 e7ff | | Load 0x3,-0x1
0373 01d7 | | Execute Vector,Field_Read
0374 e605 | | Load 0x3,0x5
0375 e7fe | | Load 0x3,-0x2
0376 01d7 | | Execute Vector,Field_Read
0377 0273 | s | Execute Discrete,Plus
0378 e605 | | Load 0x3,0x5
0379 e602 | | Load 0x3,0x2
037a 01d6 | | Execute Vector,Field_Write
037b 00c8 | | Action Pop_Auxiliary_Range
037c 3ff4 |? | Loop_Increasing 0x371
037d 00ce | | Action Pop_Auxiliary
037e 00d8 | | Load_Top At_Offset_0
037f 4402 |D | Exit_Subprogram With_Result,0x2
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0383 | | .CONST 0x0383 ; Address of begin
0381 0387 | | .CONST 0x0387 ; Address of exception handler
0382 0001 | | .CONST 0x0001 ; Number of locals
0383 BODY_0380:
0383 INIT_0380:
0383 e7ff | | Load 0x3,-0x1
0384 e409 | | Load 0x2,0x9
0385 1c02 | | Execute_Immediate Run_Utility,0x2
0386 4401 |D | Exit_Subprogram With_Result,0x1
0387 TRAP_0380:
0387 0007 | | Action Break_Optional
0388 480b |H | Short_Literal 0xb
0389 4401 |D | Exit_Subprogram With_Result,0x1
038a 0000 0000 | | .BLANK 0000[0x6]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0399 | | .CONST 0x0399 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0002 | | .CONST 0x0002 ; Number of locals
0393 INIT_0390:
0393 e7ff | | Load 0x3,-0x1
0394 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0395 0217 | | Execute Heap_Access,All_Reference
0396 8416 | | Call 0x2,0x16
0397 e409 | | Load 0x2,0x9
0398 03f1 | | Declare_Variable Discrete,With_Value
0399 BODY_0390:
0399 e412 | | Load 0x2,0x12
039a e7ff | | Load 0x3,-0x1
039b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
039c e7ff | | Load 0x3,-0x1
039d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
039e e7ff | | Load 0x3,-0x1
039f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03a0 e013 | | Load 0x0,0x13
03a1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
03a2 e002 | | Load 0x0,0x2
03a3 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03a4 8414 | | Call 0x2,0x14
03a5 e602 | | Load 0x3,0x2
03a6 e411 | | Load 0x2,0x11
03a7 01d5 | | Execute Vector,Field_Reference
03a8 8415 | | Call 0x2,0x15
03a9 e602 | | Load 0x3,0x2
03aa e411 | | Load 0x2,0x11
03ab 01d6 | | Execute Vector,Field_Write
03ac 4502 |E | Exit_Subprogram 0x2
03ad 0000 0000 | | .XXX[0x3]
03af 0000 | |
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03b9 | | .CONST 0x03b9 ; Address of begin
03b1 03dd | | .CONST 0x03dd ; Address of exception handler
03b2 0002 | | .CONST 0x0002 ; Number of locals
03b3 INIT_03b0:
03b3 e7fe | | Load 0x3,-0x2
03b4 e7ff | | Load 0x3,-0x1
03b5 01db | | Execute Vector,Length
03b6 0272 | r | Execute Discrete,Minus
03b7 00e2 | | Load_Encached Integer_Cache
03b8 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
03b9 BODY_03b0:
03b9 00d8 | | Load_Top At_Offset_0
03ba 0d00 | | Execute_Immediate Less,0x0
03bb 680f |h | Jump_Zero 0x3cb
03bc e7ff | | Load 0x3,-0x1
03bd 01dd | | Execute Vector,First
03be e7ff | | Load 0x3,-0x1
03bf 01dd | | Execute Vector,First
03c0 e7fe | | Load 0x3,-0x2
03c1 0273 | s | Execute Discrete,Plus
03c2 0aff | | Execute_Immediate Plus,-0x1
03c3 00d8 | | Load_Top At_Offset_0
03c4 00e2 | | Load_Encached Integer_Cache
03c5 0260 | ` | Execute Discrete,In_Type
03c6 7001 |p | Jump_Nonzero 0x3c8
03c7 0801 | | Execute_Immediate Raise,0x1
03c8 e7ff | | Load 0x3,-0x1
03c9 01cf | | Execute Vector,Slice_Read
03ca 4402 |D | Exit_Subprogram With_Result,0x2
03cb 4801 |H | Short_Literal 0x1
03cc e602 | | Load 0x3,0x2
03cd 00e9 | | Load_Encached String_Cache
03ce 035b | [ | Declare_Type Array,Constrained
03cf 0337 | 7 | Declare_Variable Array
03d0 00d8 | | Load_Top At_Offset_0
03d1 01dc | | Execute Vector,Last
03d2 4801 |H | Short_Literal 0x1
03d3 0263 | c | Execute Discrete,Above_Bound
03d4 7005 |p | Jump_Nonzero 0x3da
03d5 4820 |H | Short_Literal 0x20
03d6 e605 | | Load 0x3,0x5
03d7 e603 | | Load 0x3,0x3
03d8 01d6 | | Execute Vector,Field_Write
03d9 3ffb |? | Loop_Increasing 0x3d5
03da e7ff | | Load 0x3,-0x1
03db 01cc | | Execute Vector,Catenate
03dc 4402 |D | Exit_Subprogram With_Result,0x2
03dd TRAP_03b0:
03dd 0007 | | Action Break_Optional
03de e7ff | | Load 0x3,-0x1
03df 4402 |D | Exit_Subprogram With_Result,0x2
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 0428 | ( | .CONST 0x0428 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0011 | | .CONST 0x0011 ; Number of locals
03e3 INIT_03e0:
03e3 e40d | | Load 0x2,0xd
03e4 0337 | 7 | Declare_Variable Array
03e5 00d8 | | Load_Top At_Offset_0
03e6 0335 | 5 | Declare_Variable Array,Duplicate
03e7 00cd | | Action Spare6_Action
03e8 4800 |H | Short_Literal 0x0
03e9 4800 |H | Short_Literal 0x0
03ea e603 | | Load 0x3,0x3
03eb 01d6 | | Execute Vector,Field_Write
03ec 4800 |H | Short_Literal 0x0
03ed 4801 |H | Short_Literal 0x1
03ee e603 | | Load 0x3,0x3
03ef 01d6 | | Execute Vector,Field_Write
03f0 e602 | | Load 0x3,0x2
03f1 01d4 | | Execute Vector,Structure_Write
03f2 00d8 | | Load_Top At_Offset_0
03f3 0337 | 7 | Declare_Variable Array
03f4 00d8 | | Load_Top At_Offset_0
03f5 0335 | 5 | Declare_Variable Array,Duplicate
03f6 00cd | | Action Spare6_Action
03f7 4800 |H | Short_Literal 0x0
03f8 4800 |H | Short_Literal 0x0
03f9 e604 | | Load 0x3,0x4
03fa 01d6 | | Execute Vector,Field_Write
03fb 4800 |H | Short_Literal 0x0
03fc 4801 |H | Short_Literal 0x1
03fd e604 | | Load 0x3,0x4
03fe 01d6 | | Execute Vector,Field_Write
03ff e603 | | Load 0x3,0x3
0400 01d4 | | Execute Vector,Structure_Write
0401 00d8 | | Load_Top At_Offset_0
0402 0337 | 7 | Declare_Variable Array
0403 00d8 | | Load_Top At_Offset_0
0404 0335 | 5 | Declare_Variable Array,Duplicate
0405 00cd | | Action Spare6_Action
0406 4800 |H | Short_Literal 0x0
0407 4800 |H | Short_Literal 0x0
0408 e605 | | Load 0x3,0x5
0409 01d6 | | Execute Vector,Field_Write
040a 4800 |H | Short_Literal 0x0
040b 4801 |H | Short_Literal 0x1
040c e605 | | Load 0x3,0x5
040d 01d6 | | Execute Vector,Field_Write
040e e604 | | Load 0x3,0x4
040f 01d4 | | Execute Vector,Structure_Write
0410 00e7 | | Load_Encached Duration_Cache
0411 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0412 03e9 | | Declare_Variable Discrete,Duplicate
0413 03e9 | | Declare_Variable Discrete,Duplicate
0414 029f 0683 | | Declare_Subprogram For_Call,INIT_0680
0416 029f 06cb | | Declare_Subprogram For_Call,INIT_06c8
0418 029f 06fb | | Declare_Subprogram For_Call,INIT_06f8
041a 029f 0723 | #| Declare_Subprogram For_Call,INIT_0720
041c 029f 0753 | S| Declare_Subprogram For_Call,INIT_0750
041e 029f 077b | {| Declare_Subprogram For_Call,INIT_0778
0420 029f 07ab | | Declare_Subprogram For_Call,INIT_07a8
0422 029f 07d3 | | Declare_Subprogram For_Call,INIT_07d0
0424 029f 0803 | | Declare_Subprogram For_Call,INIT_0800
0426 029f 082b | +| Declare_Subprogram For_Call,INIT_0828
0428 BODY_03e0:
0428 8608 | | Call 0x3,0x8
0429 4802 |H | Short_Literal 0x2
042a e00e | | Load 0x0,0xe
042b 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
042c 0092 087a | z| Action Push_String_Extended,0x87a ; "System Availability Report from "
042e 4802 |H | Short_Literal 0x2
042f 4801 |H | Short_Literal 0x1
0430 4802 |H | Short_Literal 0x2
0431 e402 | | Load 0x2,0x2
0432 8008 | | Call 0x0,0x8
0433 01cc | | Execute Vector,Catenate
0434 0092 087b | {| Action Push_String_Extended,0x87b ; " to "
0436 01cc | | Execute Vector,Catenate
0437 4802 |H | Short_Literal 0x2
0438 4801 |H | Short_Literal 0x1
0439 4802 |H | Short_Literal 0x2
043a e403 | | Load 0x2,0x3
043b 8008 | | Call 0x0,0x8
043c 01cc | | Execute Vector,Catenate
043d e00e | | Load 0x0,0xe
043e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
043f 4801 |H | Short_Literal 0x1
0440 e00e | | Load 0x0,0xe
0441 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0442 485d |H] | Short_Literal 0x5d
0443 483a |H: | Short_Literal 0x3a
0444 8014 | | Call 0x0,0x14
0445 0092 087c | || Action Push_String_Extended,0x87c ; " ["
0447 01cc | | Execute Vector,Catenate
0448 8015 | | Call 0x0,0x15
0449 01cc | | Execute Vector,Catenate
044a 01cb | | Execute Vector,Append
044b 8016 | | Call 0x0,0x16
044c 01cc | | Execute Vector,Catenate
044d 01cb | | Execute Vector,Append
044e e00e | | Load 0x0,0xe
044f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0450 4801 |H | Short_Literal 0x1
0451 e00e | | Load 0x0,0xe
0452 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0453 0092 087d | }| Action Push_String_Extended,0x87d ; "Total Contract Hours :"
0455 480b |H | Short_Literal 0xb
0456 4800 |H | Short_Literal 0x0
0457 4800 |H | Short_Literal 0x0
0458 e603 | | Load 0x3,0x3
0459 01d7 | | Execute Vector,Field_Read
045a 8017 | | Call 0x0,0x17
045b 8418 | | Call 0x2,0x18
045c 01cc | | Execute Vector,Catenate
045d e00e | | Load 0x0,0xe
045e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
045f 0092 087e | ~| Action Push_String_Extended,0x87e ; "Total Non Contract Hours :"
0461 480b |H | Short_Literal 0xb
0462 4800 |H | Short_Literal 0x0
0463 4801 |H | Short_Literal 0x1
0464 e603 | | Load 0x3,0x3
0465 01d7 | | Execute Vector,Field_Read
0466 8017 | | Call 0x0,0x17
0467 8418 | | Call 0x2,0x18
0468 01cc | | Execute Vector,Catenate
0469 e00e | | Load 0x0,0xe
046a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
046b 0092 087f | | Action Push_String_Extended,0x87f ; " =========="
046d e00e | | Load 0x0,0xe
046e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
046f 0092 0880 | | Action Push_String_Extended,0x880 ; "Total Hours :"
0471 480b |H | Short_Literal 0xb
0472 4800 |H | Short_Literal 0x0
0473 4800 |H | Short_Literal 0x0
0474 e603 | | Load 0x3,0x3
0475 01d7 | | Execute Vector,Field_Read
0476 4801 |H | Short_Literal 0x1
0477 e603 | | Load 0x3,0x3
0478 01d7 | | Execute Vector,Field_Read
0479 0273 | s | Execute Discrete,Plus
047a 00d8 | | Load_Top At_Offset_0
047b 00e7 | | Load_Encached Duration_Cache
047c 0260 | ` | Execute Discrete,In_Type
047d 7001 |p | Jump_Nonzero 0x47f
047e 0801 | | Execute_Immediate Raise,0x1
047f 8017 | | Call 0x0,0x17
0480 8418 | | Call 0x2,0x18
0481 01cc | | Execute Vector,Catenate
0482 e00e | | Load 0x0,0xe
0483 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0484 4801 |H | Short_Literal 0x1
0485 e00e | | Load 0x0,0xe
0486 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0487 480c |H | Short_Literal 0xc
0488 00ea | | Load_Encached Null_String_Cache
0489 8418 | | Call 0x2,0x18
048a 480c |H | Short_Literal 0xc
048b 0092 0881 | | Action Push_String_Extended,0x881 ; "Contract"
048d 8418 | | Call 0x2,0x18
048e 01cc | | Execute Vector,Catenate
048f 480c |H | Short_Literal 0xc
0490 0092 0882 | | Action Push_String_Extended,0x882 ; "Non Con"
0492 8418 | | Call 0x2,0x18
0493 01cc | | Execute Vector,Catenate
0494 480c |H | Short_Literal 0xc
0495 0092 0883 | | Action Push_String_Extended,0x883 ; "Total"
0497 8418 | | Call 0x2,0x18
0498 01cc | | Execute Vector,Catenate
0499 e00e | | Load 0x0,0xe
049a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
049b 4801 |H | Short_Literal 0x1
049c e00e | | Load 0x0,0xe
049d 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
049e 00cf | | Action Mark_Auxiliary
049f 4808 |H | Short_Literal 0x8
04a0 4800 |H | Short_Literal 0x0
04a1 0007 | | Action Break_Optional
04a2 480c |H | Short_Literal 0xc
04a3 e614 | | Load 0x3,0x14
04a4 e409 | | Load 0x2,0x9
04a5 011c | | Execute Any,Convert_Unchecked
04a6 1c01 | | Execute_Immediate Run_Utility,0x1
04a7 0092 0884 | | Action Push_String_Extended,0x884 ; " :"
04a9 01cc | | Execute Vector,Catenate
04aa 8418 | | Call 0x2,0x18
04ab e00e | | Load 0x0,0xe
04ac 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
04ad 4800 |H | Short_Literal 0x0
04ae a606 | | Store_Unchecked 0x3,0x6
04af 00cf | | Action Mark_Auxiliary
04b0 e40c | | Load 0x2,0xc
04b1 0265 | e | Execute Discrete,Reverse_Bounds
04b2 0007 | | Action Break_Optional
04b3 480c |H | Short_Literal 0xc
04b4 4800 |H | Short_Literal 0x0
04b5 e617 | | Load 0x3,0x17
04b6 e614 | | Load 0x3,0x14
04b7 e411 | | Load 0x2,0x11
04b8 01d5 | | Execute Vector,Field_Reference
04b9 01d7 | | Execute Vector,Field_Read
04ba 8017 | | Call 0x0,0x17
04bb 8418 | | Call 0x2,0x18
04bc e00e | | Load 0x0,0xe
04bd 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
04be e606 | | Load 0x3,0x6
04bf e617 | | Load 0x3,0x17
04c0 e614 | | Load 0x3,0x14
04c1 e411 | | Load 0x2,0x11
04c2 01d5 | | Execute Vector,Field_Reference
04c3 01d7 | | Execute Vector,Field_Read
04c4 0273 | s | Execute Discrete,Plus
04c5 c606 | | Store 0x3,0x6
04c6 00d8 | | Load_Top At_Offset_0
04c7 e604 | | Load 0x3,0x4
04c8 01d7 | | Execute Vector,Field_Read
04c9 e617 | | Load 0x3,0x17
04ca e614 | | Load 0x3,0x14
04cb e411 | | Load 0x2,0x11
04cc 01d5 | | Execute Vector,Field_Reference
04cd 01d7 | | Execute Vector,Field_Read
04ce 0273 | s | Execute Discrete,Plus
04cf e617 | | Load 0x3,0x17
04d0 e604 | | Load 0x3,0x4
04d1 01d6 | | Execute Vector,Field_Write
04d2 00c8 | | Action Pop_Auxiliary_Range
04d3 3fdf |? | Loop_Increasing 0x4b3
04d4 00ce | | Action Pop_Auxiliary
04d5 480c |H | Short_Literal 0xc
04d6 4800 |H | Short_Literal 0x0
04d7 e606 | | Load 0x3,0x6
04d8 8017 | | Call 0x0,0x17
04d9 8418 | | Call 0x2,0x18
04da e00e | | Load 0x0,0xe
04db 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04dc e607 | | Load 0x3,0x7
04dd e606 | | Load 0x3,0x6
04de 0273 | s | Execute Discrete,Plus
04df c607 | | Store 0x3,0x7
04e0 00c8 | | Action Pop_Auxiliary_Range
04e1 3fc0 |? | Loop_Increasing 0x4a2
04e2 00ce | | Action Pop_Auxiliary
04e3 480c |H | Short_Literal 0xc
04e4 0092 0885 | | Action Push_String_Extended,0x885 ; "========"
04e6 8418 | | Call 0x2,0x18
04e7 480c |H | Short_Literal 0xc
04e8 0092 0885 | | Action Push_String_Extended,0x885 ; "========"
04ea 8418 | | Call 0x2,0x18
04eb 01cc | | Execute Vector,Catenate
04ec 480c |H | Short_Literal 0xc
04ed 0092 0885 | | Action Push_String_Extended,0x885 ; "========"
04ef 8418 | | Call 0x2,0x18
04f0 01cc | | Execute Vector,Catenate
04f1 480c |H | Short_Literal 0xc
04f2 0092 0885 | | Action Push_String_Extended,0x885 ; "========"
04f4 8418 | | Call 0x2,0x18
04f5 01cc | | Execute Vector,Catenate
04f6 e00e | | Load 0x0,0xe
04f7 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04f8 480c |H | Short_Literal 0xc
04f9 0092 0886 | | Action Push_String_Extended,0x886 ; "Total :"
04fb 8418 | | Call 0x2,0x18
04fc 480c |H | Short_Literal 0xc
04fd 4800 |H | Short_Literal 0x0
04fe 4800 |H | Short_Literal 0x0
04ff e604 | | Load 0x3,0x4
0500 01d7 | | Execute Vector,Field_Read
0501 8017 | | Call 0x0,0x17
0502 8418 | | Call 0x2,0x18
0503 01cc | | Execute Vector,Catenate
0504 480c |H | Short_Literal 0xc
0505 4800 |H | Short_Literal 0x0
0506 4801 |H | Short_Literal 0x1
0507 e604 | | Load 0x3,0x4
0508 01d7 | | Execute Vector,Field_Read
0509 8017 | | Call 0x0,0x17
050a 8418 | | Call 0x2,0x18
050b 01cc | | Execute Vector,Catenate
050c 480c |H | Short_Literal 0xc
050d 4800 |H | Short_Literal 0x0
050e e607 | | Load 0x3,0x7
050f 8017 | | Call 0x0,0x17
0510 8418 | | Call 0x2,0x18
0511 01cc | | Execute Vector,Catenate
0512 e00e | | Load 0x0,0xe
0513 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0514 480c |H | Short_Literal 0xc
0515 0092 0887 | | Action Push_String_Extended,0x887 ; "Available :"
0517 8418 | | Call 0x2,0x18
0518 e00e | | Load 0x0,0xe
0519 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
051a 8609 | | Call 0x3,0x9
051b 4825 |H% | Short_Literal 0x25
051c e00e | | Load 0x0,0xe
051d 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
051e 860a | | Call 0x3,0xa
051f 4825 |H% | Short_Literal 0x25
0520 e00e | | Load 0x0,0xe
0521 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0522 860b | | Call 0x3,0xb
0523 4825 |H% | Short_Literal 0x25
0524 e00e | | Load 0x0,0xe
0525 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0526 4802 |H | Short_Literal 0x2
0527 e00e | | Load 0x0,0xe
0528 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0529 e604 | | Load 0x3,0x4
052a e602 | | Load 0x3,0x2
052b 01d4 | | Execute Vector,Structure_Write
052c e604 | | Load 0x3,0x4
052d 00d8 | | Load_Top At_Offset_0
052e 0335 | 5 | Declare_Variable Array,Duplicate
052f 00cd | | Action Spare6_Action
0530 4800 |H | Short_Literal 0x0
0531 4800 |H | Short_Literal 0x0
0532 e613 | | Load 0x3,0x13
0533 01d6 | | Execute Vector,Field_Write
0534 4800 |H | Short_Literal 0x0
0535 4801 |H | Short_Literal 0x1
0536 e613 | | Load 0x3,0x13
0537 01d6 | | Execute Vector,Field_Write
0538 00cd | | Action Spare6_Action
0539 e604 | | Load 0x3,0x4
053a 01d4 | | Execute Vector,Structure_Write
053b e607 | | Load 0x3,0x7
053c a605 | | Store_Unchecked 0x3,0x5
053d 4800 |H | Short_Literal 0x0
053e a607 | | Store_Unchecked 0x3,0x7
053f 00cf | | Action Mark_Auxiliary
0540 480b |H | Short_Literal 0xb
0541 4809 |H | Short_Literal 0x9
0542 0007 | | Action Break_Optional
0543 480c |H | Short_Literal 0xc
0544 e614 | | Load 0x3,0x14
0545 e409 | | Load 0x2,0x9
0546 011c | | Execute Any,Convert_Unchecked
0547 1c01 | | Execute_Immediate Run_Utility,0x1
0548 0092 0884 | | Action Push_String_Extended,0x884 ; " :"
054a 01cc | | Execute Vector,Catenate
054b 8418 | | Call 0x2,0x18
054c e00e | | Load 0x0,0xe
054d 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
054e 4800 |H | Short_Literal 0x0
054f a606 | | Store_Unchecked 0x3,0x6
0550 00cf | | Action Mark_Auxiliary
0551 e40c | | Load 0x2,0xc
0552 0265 | e | Execute Discrete,Reverse_Bounds
0553 0007 | | Action Break_Optional
0554 480c |H | Short_Literal 0xc
0555 4800 |H | Short_Literal 0x0
0556 e617 | | Load 0x3,0x17
0557 e614 | | Load 0x3,0x14
0558 e411 | | Load 0x2,0x11
0559 01d5 | | Execute Vector,Field_Reference
055a 01d7 | | Execute Vector,Field_Read
055b 8017 | | Call 0x0,0x17
055c 8418 | | Call 0x2,0x18
055d e00e | | Load 0x0,0xe
055e 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
055f e606 | | Load 0x3,0x6
0560 e617 | | Load 0x3,0x17
0561 e614 | | Load 0x3,0x14
0562 e411 | | Load 0x2,0x11
0563 01d5 | | Execute Vector,Field_Reference
0564 01d7 | | Execute Vector,Field_Read
0565 0273 | s | Execute Discrete,Plus
0566 c606 | | Store 0x3,0x6
0567 00d8 | | Load_Top At_Offset_0
0568 e604 | | Load 0x3,0x4
0569 01d7 | | Execute Vector,Field_Read
056a e617 | | Load 0x3,0x17
056b e614 | | Load 0x3,0x14
056c e411 | | Load 0x2,0x11
056d 01d5 | | Execute Vector,Field_Reference
056e 01d7 | | Execute Vector,Field_Read
056f 0273 | s | Execute Discrete,Plus
0570 e617 | | Load 0x3,0x17
0571 e604 | | Load 0x3,0x4
0572 01d6 | | Execute Vector,Field_Write
0573 00c8 | | Action Pop_Auxiliary_Range
0574 3fdf |? | Loop_Increasing 0x554
0575 00ce | | Action Pop_Auxiliary
0576 480c |H | Short_Literal 0xc
0577 4800 |H | Short_Literal 0x0
0578 e606 | | Load 0x3,0x6
0579 8017 | | Call 0x0,0x17
057a 8418 | | Call 0x2,0x18
057b e00e | | Load 0x0,0xe
057c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
057d e607 | | Load 0x3,0x7
057e e606 | | Load 0x3,0x6
057f 0273 | s | Execute Discrete,Plus
0580 c607 | | Store 0x3,0x7
0581 00c8 | | Action Pop_Auxiliary_Range
0582 3fc0 |? | Loop_Increasing 0x543
0583 00ce | | Action Pop_Auxiliary
0584 480c |H | Short_Literal 0xc
0585 0092 0885 | | Action Push_String_Extended,0x885 ; "========"
0587 8418 | | Call 0x2,0x18
0588 480c |H | Short_Literal 0xc
0589 0092 0885 | | Action Push_String_Extended,0x885 ; "========"
058b 8418 | | Call 0x2,0x18
058c 01cc | | Execute Vector,Catenate
058d 480c |H | Short_Literal 0xc
058e 0092 0885 | | Action Push_String_Extended,0x885 ; "========"
0590 8418 | | Call 0x2,0x18
0591 01cc | | Execute Vector,Catenate
0592 480c |H | Short_Literal 0xc
0593 0092 0885 | | Action Push_String_Extended,0x885 ; "========"
0595 8418 | | Call 0x2,0x18
0596 01cc | | Execute Vector,Catenate
0597 e00e | | Load 0x0,0xe
0598 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0599 480c |H | Short_Literal 0xc
059a 0092 0886 | | Action Push_String_Extended,0x886 ; "Total :"
059c 8418 | | Call 0x2,0x18
059d 480c |H | Short_Literal 0xc
059e 4800 |H | Short_Literal 0x0
059f 4800 |H | Short_Literal 0x0
05a0 e604 | | Load 0x3,0x4
05a1 01d7 | | Execute Vector,Field_Read
05a2 8017 | | Call 0x0,0x17
05a3 8418 | | Call 0x2,0x18
05a4 01cc | | Execute Vector,Catenate
05a5 480c |H | Short_Literal 0xc
05a6 4800 |H | Short_Literal 0x0
05a7 4801 |H | Short_Literal 0x1
05a8 e604 | | Load 0x3,0x4
05a9 01d7 | | Execute Vector,Field_Read
05aa 8017 | | Call 0x0,0x17
05ab 8418 | | Call 0x2,0x18
05ac 01cc | | Execute Vector,Catenate
05ad 480c |H | Short_Literal 0xc
05ae 4800 |H | Short_Literal 0x0
05af e607 | | Load 0x3,0x7
05b0 8017 | | Call 0x0,0x17
05b1 8418 | | Call 0x2,0x18
05b2 01cc | | Execute Vector,Catenate
05b3 e00e | | Load 0x0,0xe
05b4 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
05b5 480c |H | Short_Literal 0xc
05b6 0092 0887 | | Action Push_String_Extended,0x887 ; "Available :"
05b8 8418 | | Call 0x2,0x18
05b9 e00e | | Load 0x0,0xe
05ba 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
05bb 860c | | Call 0x3,0xc
05bc 4825 |H% | Short_Literal 0x25
05bd e00e | | Load 0x0,0xe
05be 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
05bf 860d | | Call 0x3,0xd
05c0 4825 |H% | Short_Literal 0x25
05c1 e00e | | Load 0x0,0xe
05c2 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
05c3 860e | | Call 0x3,0xe
05c4 4825 |H% | Short_Literal 0x25
05c5 e00e | | Load 0x0,0xe
05c6 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
05c7 4802 |H | Short_Literal 0x2
05c8 e00e | | Load 0x0,0xe
05c9 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
05ca e604 | | Load 0x3,0x4
05cb e602 | | Load 0x3,0x2
05cc 8415 | | Call 0x2,0x15
05cd e602 | | Load 0x3,0x2
05ce 01d4 | | Execute Vector,Structure_Write
05cf e605 | | Load 0x3,0x5
05d0 e607 | | Load 0x3,0x7
05d1 0273 | s | Execute Discrete,Plus
05d2 c605 | | Store 0x3,0x5
05d3 480c |H | Short_Literal 0xc
05d4 0092 0888 | | Action Push_String_Extended,0x888 ; "Grand Total"
05d6 8418 | | Call 0x2,0x18
05d7 480c |H | Short_Literal 0xc
05d8 4800 |H | Short_Literal 0x0
05d9 4800 |H | Short_Literal 0x0
05da e602 | | Load 0x3,0x2
05db 01d7 | | Execute Vector,Field_Read
05dc 8017 | | Call 0x0,0x17
05dd 8418 | | Call 0x2,0x18
05de 01cc | | Execute Vector,Catenate
05df 480c |H | Short_Literal 0xc
05e0 4800 |H | Short_Literal 0x0
05e1 4801 |H | Short_Literal 0x1
05e2 e602 | | Load 0x3,0x2
05e3 01d7 | | Execute Vector,Field_Read
05e4 8017 | | Call 0x0,0x17
05e5 8418 | | Call 0x2,0x18
05e6 01cc | | Execute Vector,Catenate
05e7 480c |H | Short_Literal 0xc
05e8 4800 |H | Short_Literal 0x0
05e9 e607 | | Load 0x3,0x7
05ea 8017 | | Call 0x0,0x17
05eb 8418 | | Call 0x2,0x18
05ec 01cc | | Execute Vector,Catenate
05ed e00e | | Load 0x0,0xe
05ee 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
05ef 480c |H | Short_Literal 0xc
05f0 0092 0889 | | Action Push_String_Extended,0x889 ; "Uptime :"
05f2 8418 | | Call 0x2,0x18
05f3 e00e | | Load 0x0,0xe
05f4 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
05f5 860f | | Call 0x3,0xf
05f6 4825 |H% | Short_Literal 0x25
05f7 e00e | | Load 0x0,0xe
05f8 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
05f9 8610 | | Call 0x3,0x10
05fa 4825 |H% | Short_Literal 0x25
05fb e00e | | Load 0x0,0xe
05fc 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
05fd 8611 | | Call 0x3,0x11
05fe 4825 |H% | Short_Literal 0x25
05ff e00e | | Load 0x0,0xe
0600 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0601 4802 |H | Short_Literal 0x2
0602 e00e | | Load 0x0,0xe
0603 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0604 4501 |E | Exit_Subprogram 0x1
0605 0000 0000 | | .XXX[0x3]
0607 0000 | |
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060b | | .CONST 0x060b ; Address of begin
0609 0004 | | .CONST 0x0004 ; Address of exception handler
060a 0001 | | .CONST 0x0001 ; Number of locals
060b BODY_0608:
060b INIT_0608:
060b 4802 |H | Short_Literal 0x2
060c e00e | | Load 0x0,0xe
060d 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
060e 0092 088a | | Action Push_String_Extended,0x88a ; "Contract Hours"
0610 e00e | | Load 0x0,0xe
0611 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0612 0092 088b | | Action Push_String_Extended,0x88b ; "=============="
0614 e00e | | Load 0x0,0xe
0615 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0616 00cf | | Action Mark_Auxiliary
0617 4807 |H | Short_Literal 0x7
0618 4801 |H | Short_Literal 0x1
0619 0007 | | Action Break_Optional
061a 0092 088c | | Action Push_String_Extended,0x88c ; " "
061c 480c |H | Short_Literal 0xc
061d e604 | | Load 0x3,0x4
061e 00d8 | | Load_Top At_Offset_0
061f e408 | | Load 0x2,0x8
0620 0260 | ` | Execute Discrete,In_Type
0621 7001 |p | Jump_Nonzero 0x623
0622 0801 | | Execute_Immediate Raise,0x1
0623 e408 | | Load 0x2,0x8
0624 011c | | Execute Any,Convert_Unchecked
0625 1c01 | | Execute_Immediate Run_Utility,0x1
0626 e018 | | Load 0x0,0x18
0627 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0628 0092 088d | | Action Push_String_Extended,0x88d ; " : "
062a 01cc | | Execute Vector,Catenate
062b 8418 | | Call 0x2,0x18
062c 01cc | | Execute Vector,Catenate
062d e00e | | Load 0x0,0xe
062e 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
062f 00d8 | | Load_Top At_Offset_0
0630 e7ff | | Load 0x3,-0x1
0631 01d5 | | Execute Vector,Field_Reference
0632 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0633 e604 | | Load 0x3,0x4
0634 e7ff | | Load 0x3,-0x1
0635 01d5 | | Execute Vector,Field_Reference
0636 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0637 027f | | Execute Discrete,Equal
0638 6805 |h | Jump_Zero 0x63e
0639 0092 088e | | Action Push_String_Extended,0x88e ; "None"
063b e00e | | Load 0x0,0xe
063c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
063d 7812 |x | Jump 0x650
063e 4800 |H | Short_Literal 0x0
063f e604 | | Load 0x3,0x4
0640 e7ff | | Load 0x3,-0x1
0641 01d5 | | Execute Vector,Field_Reference
0642 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0643 8017 | | Call 0x0,0x17
0644 0092 087b | {| Action Push_String_Extended,0x87b ; " to "
0646 01cc | | Execute Vector,Catenate
0647 4800 |H | Short_Literal 0x0
0648 e604 | | Load 0x3,0x4
0649 e7ff | | Load 0x3,-0x1
064a 01d5 | | Execute Vector,Field_Reference
064b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
064c 8017 | | Call 0x0,0x17
064d 01cc | | Execute Vector,Catenate
064e e00e | | Load 0x0,0xe
064f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0650 00c8 | | Action Pop_Auxiliary_Range
0651 3fc8 |? | Loop_Increasing 0x61a
0652 00ce | | Action Pop_Auxiliary
0653 4801 |H | Short_Literal 0x1
0654 e00e | | Load 0x0,0xe
0655 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0656 4502 |E | Exit_Subprogram 0x2
0657 0000 | | .XXX[0x1]
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 4607 |F | Jump_Case 0x7
065c 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
065d 7807 |x | Jump 0x665 ; case 0x1
065e 780a |x | Jump 0x669 ; case 0x2
065f 780e |x | Jump 0x66e ; case 0x3
0660 7811 |x | Jump 0x672 ; case 0x4
0661 7812 |x | Jump 0x674 ; case 0x5
0662 7813 |x | Jump 0x676 ; case 0x6
0663 7816 |x | Jump 0x67a ; case 0x7
0664 4302 |C | .XXX[0x1]
0665 00da | | Load_Top At_Offset_2
0666 0091 086a | j| Action Push_String_Extended_Indexed,0x86a ; "NONE"
0668 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0669 00db | | Load_Top At_Offset_3
066a 00db | | Load_Top At_Offset_3
066b 00e0 | | Load_Encached Standard_Cache
066c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
066d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
066e 00da | | Load_Top At_Offset_2
066f 00e0 | | Load_Encached Standard_Cache
0670 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0671 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0672 00db | | Load_Top At_Offset_3
0673 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0674 00db | | Load_Top At_Offset_3
0675 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0676 e606 | | Load 0x3,0x6
0677 00dc | | Load_Top At_Offset_4
0678 0267 | g | Execute Discrete,Predecessor
0679 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
067a e606 | | Load 0x3,0x6
067b 00dc | | Load_Top At_Offset_4
067c 0268 | h | Execute Discrete,Successor
067d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
067e 0000 0000 | | .XXX[0x2]
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 068c | | .CONST 0x068c ; Address of begin
0681 0004 | | .CONST 0x0004 ; Address of exception handler
0682 0004 | | .CONST 0x0004 ; Number of locals
0683 INIT_0680:
0683 e002 | | Load 0x0,0x2
0684 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0685 02c7 | | Declare_Variable Any
0686 e402 | | Load 0x2,0x2
0687 a802 | | Store_Unchecked 0x4,0x2
0688 e012 | | Load 0x0,0x12
0689 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
068a e40d | | Load 0x2,0xd
068b 0337 | 7 | Declare_Variable Array
068c BODY_0680:
068c 00cf | | Action Mark_Auxiliary
068d 782f |x/ | Jump 0x6bd
068e e802 | | Load 0x4,0x2
068f e012 | | Load 0x0,0x12
0690 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0691 a803 | | Store_Unchecked 0x4,0x3
0692 e803 | | Load 0x4,0x3
0693 e412 | | Load 0x2,0x12
0694 01d5 | | Execute Vector,Field_Reference
0695 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0696 e803 | | Load 0x4,0x3
0697 e412 | | Load 0x2,0x12
0698 01d5 | | Execute Vector,Field_Reference
0699 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
069a 0272 | r | Execute Discrete,Minus
069b 4800 |H | Short_Literal 0x0
069c e804 | | Load 0x4,0x4
069d 01d6 | | Execute Vector,Field_Write
069e 6025 |`% | Indirect_Literal Discrete,0x6c4,{0x00000000, 0xa8c00000}
069f 4800 |H | Short_Literal 0x0
06a0 e804 | | Load 0x4,0x4
06a1 01d7 | | Execute Vector,Field_Read
06a2 0272 | r | Execute Discrete,Minus
06a3 4801 |H | Short_Literal 0x1
06a4 e804 | | Load 0x4,0x4
06a5 01d6 | | Execute Vector,Field_Write
06a6 00cf | | Action Mark_Auxiliary
06a7 e40c | | Load 0x2,0xc
06a8 0265 | e | Execute Discrete,Reverse_Bounds
06a9 0007 | | Action Break_Optional
06aa 00d8 | | Load_Top At_Offset_0
06ab e603 | | Load 0x3,0x3
06ac 01d7 | | Execute Vector,Field_Read
06ad e808 | | Load 0x4,0x8
06ae e804 | | Load 0x4,0x4
06af 01d7 | | Execute Vector,Field_Read
06b0 0273 | s | Execute Discrete,Plus
06b1 e808 | | Load 0x4,0x8
06b2 e603 | | Load 0x3,0x3
06b3 01d6 | | Execute Vector,Field_Write
06b4 00c8 | | Action Pop_Auxiliary_Range
06b5 3ff4 |? | Loop_Increasing 0x6aa
06b6 00ce | | Action Pop_Auxiliary
06b7 600c |` | Indirect_Literal Discrete,0x6c4,{0x00000000, 0xa8c00000}
06b8 e802 | | Load 0x4,0x2
06b9 e002 | | Load 0x0,0x2
06ba 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06bb c802 | | Store 0x4,0x2
06bc 00c9 | | Action Pop_Auxiliary_Loop
06bd e403 | | Load 0x2,0x3
06be e802 | | Load 0x4,0x2
06bf e002 | | Load 0x0,0x2
06c0 181d | | Execute Package,Field_Execute,Field_Number 0x1d
06c1 77cc |w | Jump_Nonzero 0x68e
06c2 4501 |E | Exit_Subprogram 0x1
06c3 0000 | | .XXX[0x1]
06c4 0000 0000 | | .LITERAL {0x00000000, 0xa8c00000}
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06cb | | .CONST 0x06cb ; Address of begin
06c9 06e2 | | .CONST 0x06e2 ; Address of exception handler
06ca 0001 | | .CONST 0x0001 ; Number of locals
06cb BODY_06c8:
06cb INIT_06c8:
06cb 4800 |H | Short_Literal 0x0
06cc 4801 |H | Short_Literal 0x1
06cd 4809 |H | Short_Literal 0x9
06ce 5821 |X! | Indirect_Literal Float,0x6f0,100.0
06cf 4800 |H | Short_Literal 0x0
06d0 e604 | | Load 0x3,0x4
06d1 01d7 | | Execute Vector,Field_Read
06d2 0237 | 7 | Execute Float,Convert_From_Discrete
06d3 5818 |X | Indirect_Literal Float,0x6ec,3.0517578125e-05
06d4 023b | ; | Execute Float,Times
06d5 581a |X | Indirect_Literal Float,0x6f0,100.0
06d6 023b | ; | Execute Float,Times
06d7 4800 |H | Short_Literal 0x0
06d8 e603 | | Load 0x3,0x3
06d9 01d7 | | Execute Vector,Field_Read
06da 0237 | 7 | Execute Float,Convert_From_Discrete
06db 5810 |X | Indirect_Literal Float,0x6ec,3.0517578125e-05
06dc 023b | ; | Execute Float,Times
06dd 023a | : | Execute Float,Divide
06de 023c | < | Execute Float,Minus
06df e00e | | Load 0x0,0xe
06e0 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
06e1 4501 |E | Exit_Subprogram 0x1
06e2 TRAP_06c8:
06e2 0007 | | Action Break_Optional
06e3 4800 |H | Short_Literal 0x0
06e4 4801 |H | Short_Literal 0x1
06e5 4809 |H | Short_Literal 0x9
06e6 5809 |X | Indirect_Literal Float,0x6f0,100.0
06e7 e00e | | Load 0x0,0xe
06e8 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
06e9 4501 |E | Exit_Subprogram 0x1
06ea 0000 0000 | | .XXX[0x2]
06ec 3f00 0000 |? | .DBL 3.0517578125e-05
06ee 0000 0000 | |
06f0 4059 0000 |@Y | .DBL 100.0
06f2 0000 0000 | |
06f4 0000 0000 | | .BLANK 0000[0x4]
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 06fb | | .CONST 0x06fb ; Address of begin
06f9 0712 | | .CONST 0x0712 ; Address of exception handler
06fa 0001 | | .CONST 0x0001 ; Number of locals
06fb BODY_06f8:
06fb INIT_06f8:
06fb 4800 |H | Short_Literal 0x0
06fc 4801 |H | Short_Literal 0x1
06fd 4809 |H | Short_Literal 0x9
06fe 5ff1 |_ | Indirect_Literal Float,0x6f0,100.0
06ff 4801 |H | Short_Literal 0x1
0700 e604 | | Load 0x3,0x4
0701 01d7 | | Execute Vector,Field_Read
0702 0237 | 7 | Execute Float,Convert_From_Discrete
0703 5fe8 |_ | Indirect_Literal Float,0x6ec,3.0517578125e-05
0704 023b | ; | Execute Float,Times
0705 5fea |_ | Indirect_Literal Float,0x6f0,100.0
0706 023b | ; | Execute Float,Times
0707 4801 |H | Short_Literal 0x1
0708 e603 | | Load 0x3,0x3
0709 01d7 | | Execute Vector,Field_Read
070a 0237 | 7 | Execute Float,Convert_From_Discrete
070b 5fe0 |_ | Indirect_Literal Float,0x6ec,3.0517578125e-05
070c 023b | ; | Execute Float,Times
070d 023a | : | Execute Float,Divide
070e 023c | < | Execute Float,Minus
070f e00e | | Load 0x0,0xe
0710 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
0711 4501 |E | Exit_Subprogram 0x1
0712 TRAP_06f8:
0712 0007 | | Action Break_Optional
0713 4800 |H | Short_Literal 0x0
0714 4801 |H | Short_Literal 0x1
0715 4809 |H | Short_Literal 0x9
0716 5fd9 |_ | Indirect_Literal Float,0x6f0,100.0
0717 e00e | | Load 0x0,0xe
0718 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
0719 4501 |E | Exit_Subprogram 0x1
071a 0000 0000 | | .BLANK 0000[0x6]
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0723 | # | .CONST 0x0723 ; Address of begin
0721 073c | < | .CONST 0x073c ; Address of exception handler
0722 0001 | | .CONST 0x0001 ; Number of locals
0723 BODY_0720:
0723 INIT_0720:
0723 4800 |H | Short_Literal 0x0
0724 4801 |H | Short_Literal 0x1
0725 4809 |H | Short_Literal 0x9
0726 5821 |X! | Indirect_Literal Float,0x748,100.0
0727 e607 | | Load 0x3,0x7
0728 0237 | 7 | Execute Float,Convert_From_Discrete
0729 581a |X | Indirect_Literal Float,0x744,3.0517578125e-05
072a 023b | ; | Execute Float,Times
072b 581c |X | Indirect_Literal Float,0x748,100.0
072c 023b | ; | Execute Float,Times
072d 4800 |H | Short_Literal 0x0
072e e603 | | Load 0x3,0x3
072f 01d7 | | Execute Vector,Field_Read
0730 4801 |H | Short_Literal 0x1
0731 e603 | | Load 0x3,0x3
0732 01d7 | | Execute Vector,Field_Read
0733 0273 | s | Execute Discrete,Plus
0734 0237 | 7 | Execute Float,Convert_From_Discrete
0735 580e |X | Indirect_Literal Float,0x744,3.0517578125e-05
0736 023b | ; | Execute Float,Times
0737 023a | : | Execute Float,Divide
0738 023c | < | Execute Float,Minus
0739 e00e | | Load 0x0,0xe
073a 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
073b 4501 |E | Exit_Subprogram 0x1
073c TRAP_0720:
073c 0007 | | Action Break_Optional
073d 4800 |H | Short_Literal 0x0
073e 4801 |H | Short_Literal 0x1
073f 4809 |H | Short_Literal 0x9
0740 5807 |X | Indirect_Literal Float,0x748,100.0
0741 e00e | | Load 0x0,0xe
0742 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
0743 4501 |E | Exit_Subprogram 0x1
0744 3f00 0000 |? | .DBL 3.0517578125e-05
0746 0000 0000 | |
0748 4059 0000 |@Y | .DBL 100.0
074a 0000 0000 | |
074c 0000 0000 | | .BLANK 0000[0x4]
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 0753 | S | .CONST 0x0753 ; Address of begin
0751 076a | j | .CONST 0x076a ; Address of exception handler
0752 0001 | | .CONST 0x0001 ; Number of locals
0753 BODY_0750:
0753 INIT_0750:
0753 4800 |H | Short_Literal 0x0
0754 4801 |H | Short_Literal 0x1
0755 4809 |H | Short_Literal 0x9
0756 5ff1 |_ | Indirect_Literal Float,0x748,100.0
0757 4800 |H | Short_Literal 0x0
0758 e604 | | Load 0x3,0x4
0759 01d7 | | Execute Vector,Field_Read
075a 0237 | 7 | Execute Float,Convert_From_Discrete
075b 5fe8 |_ | Indirect_Literal Float,0x744,3.0517578125e-05
075c 023b | ; | Execute Float,Times
075d 5fea |_ | Indirect_Literal Float,0x748,100.0
075e 023b | ; | Execute Float,Times
075f 4800 |H | Short_Literal 0x0
0760 e603 | | Load 0x3,0x3
0761 01d7 | | Execute Vector,Field_Read
0762 0237 | 7 | Execute Float,Convert_From_Discrete
0763 5fe0 |_ | Indirect_Literal Float,0x744,3.0517578125e-05
0764 023b | ; | Execute Float,Times
0765 023a | : | Execute Float,Divide
0766 023c | < | Execute Float,Minus
0767 e00e | | Load 0x0,0xe
0768 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
0769 4501 |E | Exit_Subprogram 0x1
076a TRAP_0750:
076a 0007 | | Action Break_Optional
076b 4800 |H | Short_Literal 0x0
076c 4801 |H | Short_Literal 0x1
076d 4809 |H | Short_Literal 0x9
076e 5fd9 |_ | Indirect_Literal Float,0x748,100.0
076f e00e | | Load 0x0,0xe
0770 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
0771 4501 |E | Exit_Subprogram 0x1
0772 0000 0000 | | .BLANK 0000[0x6]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 077b | { | .CONST 0x077b ; Address of begin
0779 0792 | | .CONST 0x0792 ; Address of exception handler
077a 0001 | | .CONST 0x0001 ; Number of locals
077b BODY_0778:
077b INIT_0778:
077b 4800 |H | Short_Literal 0x0
077c 4801 |H | Short_Literal 0x1
077d 4809 |H | Short_Literal 0x9
077e 5821 |X! | Indirect_Literal Float,0x7a0,100.0
077f 4801 |H | Short_Literal 0x1
0780 e604 | | Load 0x3,0x4
0781 01d7 | | Execute Vector,Field_Read
0782 0237 | 7 | Execute Float,Convert_From_Discrete
0783 5818 |X | Indirect_Literal Float,0x79c,3.0517578125e-05
0784 023b | ; | Execute Float,Times
0785 581a |X | Indirect_Literal Float,0x7a0,100.0
0786 023b | ; | Execute Float,Times
0787 4801 |H | Short_Literal 0x1
0788 e603 | | Load 0x3,0x3
0789 01d7 | | Execute Vector,Field_Read
078a 0237 | 7 | Execute Float,Convert_From_Discrete
078b 5810 |X | Indirect_Literal Float,0x79c,3.0517578125e-05
078c 023b | ; | Execute Float,Times
078d 023a | : | Execute Float,Divide
078e 023c | < | Execute Float,Minus
078f e00e | | Load 0x0,0xe
0790 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
0791 4501 |E | Exit_Subprogram 0x1
0792 TRAP_0778:
0792 0007 | | Action Break_Optional
0793 4800 |H | Short_Literal 0x0
0794 4801 |H | Short_Literal 0x1
0795 4809 |H | Short_Literal 0x9
0796 5809 |X | Indirect_Literal Float,0x7a0,100.0
0797 e00e | | Load 0x0,0xe
0798 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
0799 4501 |E | Exit_Subprogram 0x1
079a 0000 0000 | | .XXX[0x2]
079c 3f00 0000 |? | .DBL 3.0517578125e-05
079e 0000 0000 | |
07a0 4059 0000 |@Y | .DBL 100.0
07a2 0000 0000 | |
07a4 0000 0000 | | .BLANK 0000[0x4]
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07ab | | .CONST 0x07ab ; Address of begin
07a9 07c4 | | .CONST 0x07c4 ; Address of exception handler
07aa 0001 | | .CONST 0x0001 ; Number of locals
07ab BODY_07a8:
07ab INIT_07a8:
07ab 4800 |H | Short_Literal 0x0
07ac 4801 |H | Short_Literal 0x1
07ad 4809 |H | Short_Literal 0x9
07ae 5ff1 |_ | Indirect_Literal Float,0x7a0,100.0
07af e607 | | Load 0x3,0x7
07b0 0237 | 7 | Execute Float,Convert_From_Discrete
07b1 5fea |_ | Indirect_Literal Float,0x79c,3.0517578125e-05
07b2 023b | ; | Execute Float,Times
07b3 5fec |_ | Indirect_Literal Float,0x7a0,100.0
07b4 023b | ; | Execute Float,Times
07b5 4800 |H | Short_Literal 0x0
07b6 e603 | | Load 0x3,0x3
07b7 01d7 | | Execute Vector,Field_Read
07b8 4801 |H | Short_Literal 0x1
07b9 e603 | | Load 0x3,0x3
07ba 01d7 | | Execute Vector,Field_Read
07bb 0273 | s | Execute Discrete,Plus
07bc 0237 | 7 | Execute Float,Convert_From_Discrete
07bd 5fde |_ | Indirect_Literal Float,0x79c,3.0517578125e-05
07be 023b | ; | Execute Float,Times
07bf 023a | : | Execute Float,Divide
07c0 023c | < | Execute Float,Minus
07c1 e00e | | Load 0x0,0xe
07c2 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
07c3 4501 |E | Exit_Subprogram 0x1
07c4 TRAP_07a8:
07c4 0007 | | Action Break_Optional
07c5 4800 |H | Short_Literal 0x0
07c6 4801 |H | Short_Literal 0x1
07c7 4809 |H | Short_Literal 0x9
07c8 5fd7 |_ | Indirect_Literal Float,0x7a0,100.0
07c9 e00e | | Load 0x0,0xe
07ca 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
07cb 4501 |E | Exit_Subprogram 0x1
07cc 0000 0000 | | .BLANK 0000[0x4]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07d3 | | .CONST 0x07d3 ; Address of begin
07d1 07ea | | .CONST 0x07ea ; Address of exception handler
07d2 0001 | | .CONST 0x0001 ; Number of locals
07d3 BODY_07d0:
07d3 INIT_07d0:
07d3 4800 |H | Short_Literal 0x0
07d4 4801 |H | Short_Literal 0x1
07d5 4809 |H | Short_Literal 0x9
07d6 5821 |X! | Indirect_Literal Float,0x7f8,100.0
07d7 4800 |H | Short_Literal 0x0
07d8 e602 | | Load 0x3,0x2
07d9 01d7 | | Execute Vector,Field_Read
07da 0237 | 7 | Execute Float,Convert_From_Discrete
07db 5818 |X | Indirect_Literal Float,0x7f4,3.0517578125e-05
07dc 023b | ; | Execute Float,Times
07dd 581a |X | Indirect_Literal Float,0x7f8,100.0
07de 023b | ; | Execute Float,Times
07df 4800 |H | Short_Literal 0x0
07e0 e603 | | Load 0x3,0x3
07e1 01d7 | | Execute Vector,Field_Read
07e2 0237 | 7 | Execute Float,Convert_From_Discrete
07e3 5810 |X | Indirect_Literal Float,0x7f4,3.0517578125e-05
07e4 023b | ; | Execute Float,Times
07e5 023a | : | Execute Float,Divide
07e6 023c | < | Execute Float,Minus
07e7 e00e | | Load 0x0,0xe
07e8 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
07e9 4501 |E | Exit_Subprogram 0x1
07ea TRAP_07d0:
07ea 0007 | | Action Break_Optional
07eb 4800 |H | Short_Literal 0x0
07ec 4801 |H | Short_Literal 0x1
07ed 4809 |H | Short_Literal 0x9
07ee 5809 |X | Indirect_Literal Float,0x7f8,100.0
07ef e00e | | Load 0x0,0xe
07f0 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
07f1 4501 |E | Exit_Subprogram 0x1
07f2 0000 0000 | | .XXX[0x2]
07f4 3f00 0000 |? | .DBL 3.0517578125e-05
07f6 0000 0000 | |
07f8 4059 0000 |@Y | .DBL 100.0
07fa 0000 0000 | |
07fc 0000 0000 | | .BLANK 0000[0x4]
0800 ; --------------------------------------------------------------------------------------
0800 ; SUBPROGRAM
0800 ; --------------------------------------------------------------------------------------
0800 0803 | | .CONST 0x0803 ; Address of begin
0801 081a | | .CONST 0x081a ; Address of exception handler
0802 0001 | | .CONST 0x0001 ; Number of locals
0803 BODY_0800:
0803 INIT_0800:
0803 4800 |H | Short_Literal 0x0
0804 4801 |H | Short_Literal 0x1
0805 4809 |H | Short_Literal 0x9
0806 5ff1 |_ | Indirect_Literal Float,0x7f8,100.0
0807 4801 |H | Short_Literal 0x1
0808 e602 | | Load 0x3,0x2
0809 01d7 | | Execute Vector,Field_Read
080a 0237 | 7 | Execute Float,Convert_From_Discrete
080b 5fe8 |_ | Indirect_Literal Float,0x7f4,3.0517578125e-05
080c 023b | ; | Execute Float,Times
080d 5fea |_ | Indirect_Literal Float,0x7f8,100.0
080e 023b | ; | Execute Float,Times
080f 4801 |H | Short_Literal 0x1
0810 e603 | | Load 0x3,0x3
0811 01d7 | | Execute Vector,Field_Read
0812 0237 | 7 | Execute Float,Convert_From_Discrete
0813 5fe0 |_ | Indirect_Literal Float,0x7f4,3.0517578125e-05
0814 023b | ; | Execute Float,Times
0815 023a | : | Execute Float,Divide
0816 023c | < | Execute Float,Minus
0817 e00e | | Load 0x0,0xe
0818 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
0819 4501 |E | Exit_Subprogram 0x1
081a TRAP_0800:
081a 0007 | | Action Break_Optional
081b 4800 |H | Short_Literal 0x0
081c 4801 |H | Short_Literal 0x1
081d 4809 |H | Short_Literal 0x9
081e 5fd9 |_ | Indirect_Literal Float,0x7f8,100.0
081f e00e | | Load 0x0,0xe
0820 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
0821 4501 |E | Exit_Subprogram 0x1
0822 0000 0000 | | .BLANK 0000[0x6]
0828 ; --------------------------------------------------------------------------------------
0828 ; SUBPROGRAM
0828 ; --------------------------------------------------------------------------------------
0828 082b | + | .CONST 0x082b ; Address of begin
0829 0844 | D | .CONST 0x0844 ; Address of exception handler
082a 0001 | | .CONST 0x0001 ; Number of locals
082b BODY_0828:
082b INIT_0828:
082b 4800 |H | Short_Literal 0x0
082c 4801 |H | Short_Literal 0x1
082d 4809 |H | Short_Literal 0x9
082e 5821 |X! | Indirect_Literal Float,0x850,100.0
082f e605 | | Load 0x3,0x5
0830 0237 | 7 | Execute Float,Convert_From_Discrete
0831 581a |X | Indirect_Literal Float,0x84c,3.0517578125e-05
0832 023b | ; | Execute Float,Times
0833 581c |X | Indirect_Literal Float,0x850,100.0
0834 023b | ; | Execute Float,Times
0835 4800 |H | Short_Literal 0x0
0836 e603 | | Load 0x3,0x3
0837 01d7 | | Execute Vector,Field_Read
0838 4801 |H | Short_Literal 0x1
0839 e603 | | Load 0x3,0x3
083a 01d7 | | Execute Vector,Field_Read
083b 0273 | s | Execute Discrete,Plus
083c 0237 | 7 | Execute Float,Convert_From_Discrete
083d 580e |X | Indirect_Literal Float,0x84c,3.0517578125e-05
083e 023b | ; | Execute Float,Times
083f 023a | : | Execute Float,Divide
0840 023c | < | Execute Float,Minus
0841 e00e | | Load 0x0,0xe
0842 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
0843 4501 |E | Exit_Subprogram 0x1
0844 TRAP_0828:
0844 0007 | | Action Break_Optional
0845 4800 |H | Short_Literal 0x0
0846 4801 |H | Short_Literal 0x1
0847 4809 |H | Short_Literal 0x9
0848 5807 |X | Indirect_Literal Float,0x850,100.0
0849 e00e | | Load 0x0,0xe
084a 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
084b 4501 |E | Exit_Subprogram 0x1
084c 3f00 0000 |? | .DBL 3.0517578125e-05
084e 0000 0000 | |
0850 4059 0000 |@Y | .DBL 100.0
0852 0000 0000 | |
0854 ; --------------------------------------------------------------------------------------
0854 ; STRING TABLE
0854 ; --------------------------------------------------------------------------------------
0854 0078 | x | .STRTAB 0x0078->0x0890 ; "NONE"
0855 007a | z | .STRTAB 0x007a->0x0892 ; "MONDAY"
0856 007e | ~ | .STRTAB 0x007e->0x0895 ; "TUESDAY"
0857 0083 | | .STRTAB 0x0083->0x0898 ; "WEDNESDAY"
0858 008a | | .STRTAB 0x008a->0x089d ; "THURSDAY"
0859 0090 | | .STRTAB 0x0090->0x08a1 ; "FRIDAY"
085a 0094 | | .STRTAB 0x0094->0x08a4 ; "SATURDAY"
085b 009a | | .STRTAB 0x009a->0x08a8 ; "SUNDAY"
085c 009e | | .STRTAB 0x009e->0x08ab ; "PMH"
085d 009f | | .STRTAB 0x009f->0x08ac ; "PMS"
085e 00a0 | | .STRTAB 0x00a0->0x08ae ; "HWC"
085f 00a1 | | .STRTAB 0x00a1->0x08af ; "SWC"
0860 00a2 | | .STRTAB 0x00a2->0x08b1 ; "CRASH"
0861 00a5 | | .STRTAB 0x00a5->0x08b3 ; "HANG"
0862 00a7 | | .STRTAB 0x00a7->0x08b5 ; "MAINT"
0863 00aa | | .STRTAB 0x00aa->0x08b8 ; "RELEASE"
0864 00af | | .STRTAB 0x00af->0x08bb ; "UCC"
0865 00b0 | | .STRTAB 0x00b0->0x08bd ; "COPS"
0866 00b2 | | .STRTAB 0x00b2->0x08bf ; "CSD"
0867 00b3 | | .STRTAB 0x00b3->0x08c0 ; "OTHER"
0868 00b6 | | .STRTAB 0x00b6->0x08c3 ; "CONTRACT"
0869 00bc | | .STRTAB 0x00bc->0x08c7 ; "NON_CONTRACT"
086a 00c6 | | .STRTAB 0x00c6->0x08cd ; "NONE"
086b 00c8 | | .STRTAB 0x00c8->0x08cf ; "MONDAY"
086c 00cc | | .STRTAB 0x00cc->0x08d2 ; "TUESDAY"
086d 00d1 | | .STRTAB 0x00d1->0x08d5 ; "WEDNESDAY"
086e 00d8 | | .STRTAB 0x00d8->0x08da ; "THURSDAY"
086f 00de | | .STRTAB 0x00de->0x08de ; "FRIDAY"
0870 00e2 | | .STRTAB 0x00e2->0x08e1 ; "SATURDAY"
0871 00e8 | | .STRTAB 0x00e8->0x08e5 ; "SUNDAY"
0872 00ec | | .STRTAB 0x00ec->0x08e8 ; "<MINUS_30_DAYS>"
0873 00f9 | | .STRTAB 0x00f9->0x08ef ; "<TODAY>"
0874 00fe | | .STRTAB 0x00fe->0x08f3 ; "Cannot calculate Availability, Starting Date = Ending Date"
0875 0136 | 6 | .STRTAB 0x0136->0x0910 ; "!Machine.Contract_Hours"
0876 014b | K | .STRTAB 0x014b->0x091b ; "others => Unspecified"
0877 015e | ^ | .STRTAB 0x015e->0x0926 ; "24:00"
0878 0161 | a | .STRTAB 0x0161->0x0928 ; "*** Error Parsing !Machine.Contract_Hours"
0879 0188 | | .STRTAB 0x0188->0x093d ; " Using default contract hours."
087a 01a7 | | .STRTAB 0x01a7->0x094d ; "System Availability Report from "
087b 01c6 | | .STRTAB 0x01c6->0x095e ; " to "
; " to "
087c 01c8 | | .STRTAB 0x01c8->0x0960 ; " ["
087d 01c8 | | .STRTAB 0x01c8->0x0961 ; "Total Contract Hours :"
087e 01e0 | | .STRTAB 0x01e0->0x096e ; "Total Non Contract Hours :"
087f 01f8 | | .STRTAB 0x01f8->0x097b ; " =========="
0880 021b | | .STRTAB 0x021b->0x098d ; "Total Hours :"
0881 0233 | 3 | .STRTAB 0x0233->0x099a ; "Contract"
0882 0239 | 9 | .STRTAB 0x0239->0x099e ; "Non Con"
0883 023e | > | .STRTAB 0x023e->0x09a2 ; "Total"
0884 0241 | A | .STRTAB 0x0241->0x09a4 ; " :"
; " :"
0885 0241 | A | .STRTAB 0x0241->0x09a5 ; "========"
; "========"
; "========"
; "========"
; "========"
; "========"
; "========"
; "========"
0886 0247 | G | .STRTAB 0x0247->0x09a9 ; "Total :"
; "Total :"
0887 024c | L | .STRTAB 0x024c->0x09ad ; "Available :"
; "Available :"
0888 0255 | U | .STRTAB 0x0255->0x09b2 ; "Grand Total"
0889 025e | ^ | .STRTAB 0x025e->0x09b8 ; "Uptime :"
088a 0264 | d | .STRTAB 0x0264->0x09bc ; "Contract Hours"
088b 0270 | p | .STRTAB 0x0270->0x09c3 ; "=============="
088c 027c | | | .STRTAB 0x027c->0x09ca ; " "
088d 027e | ~ | .STRTAB 0x027e->0x09cc ; " : "
088e 027f | | .STRTAB 0x027f->0x09cd ; "None"
088f 0281 | | .STREND 0x0281->0x09cf
0890 4e4f 4e45 |NONE| .STRTAB_STRINGS
09d0 ; --------------------------------------------------------------------------------------
09d0 ; Debug Table
09d0 ; --------------------------------------------------------------------------------------
09d0 0004 0011 | | .DEBUG4 0x0004,0x0011,0x2387,0x0000,0x0001,0x0000
09d6 0000 0000 | | .XXX[0x7]
09d8 0001 0404 | |
09da 0000 0280 | |
09dc 8000 | |
09dd 0000 0000 | | .BLANK 0000[0x9]
09e6 0057 26c5 | W& | .XXX[0x2]
09e8 0000 0000 | | .BLANK 0000[0x7]
09ef 006c | l | .XXX[0x1]
09f0 0000 0000 | | .BLANK 0000[0x8]
09f8 0001 0404 | | .XXX[0x8]
09fa 0000 0700 | |
09fc 8000 0000 | |
09fe 0000 0000 | |