DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

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

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦2959d96eb⟧

    Length: 7168 (0x1c00)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0a20       |    |		.CONST	0x0a20								; 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 0006       |    |		.CONST	0x0006								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0128       | (  |		.CONST	0x0128								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0020       |    |		.CONST	0x0020								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x0a6a,0x8000,0x0000,0x0059,0xce15,0x0000,0x0003
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 00a2 02fc  |    |		Action	Push_Discrete_Extended						; Debug Table 0x0.0x3 = 0xe,0xfffc
0010 0129       | )  |		Execute	Any,Make_Visible
0011 00a2 02f8  |    |		Action	Push_Discrete_Extended						; Debug Table 0x0.0x4 = 0x11,0xfffb
0013 0129       | )  |		Execute	Any,Make_Visible
0014 00a2 02f4  |    |		Action	Push_Discrete_Extended						; Debug Table 0x0.0x5 = 0x14,0xfffa
0016 0129       | )  |		Execute	Any,Make_Visible
0017 00a2 02f0  |    |		Action	Push_Discrete_Extended						; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 0129       | )  |		Execute	Any,Make_Visible
001a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x7 = 0x1a,0xfff8
001b 487f       |H   |		Short_Literal	0x7f
001c 00e3       |    |		Load_Encached	Natural_Cache
001d 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
001e 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1e,0xfff7
0020 029a 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x20,0xfff6
0022 029a 0153  |   S|		Declare_Subprogram	INIT_0150,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x22,0xfff5
0024 029a 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x24,0xfff4
0026 00a2 02ec  |    |		Action	Push_Discrete_Extended						; Debug Table 0x0.0xc = 0x26,0xfff3
0028 0129       | )  |		Execute	Any,Make_Visible
0029 00a2 02e8  |    |		Action	Push_Discrete_Extended						; Debug Table 0x0.0xd = 0x29,0xfff2
002b 0129       | )  |		Execute	Any,Make_Visible
002c 029a 0303  |    |		Declare_Subprogram	INIT_0300,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x2c,0xfff1
002e e211       |    |		Load	0x1,0x11							; Debug Table 0x0.0xf = 0x2e,0xfff0
002f 0129       | )  |		Execute	Any,Make_Visible
0030 e211       |    |		Load	0x1,0x11							; Debug Table 0x0.0x10 = 0x30,0xffef
0031 0129       | )  |		Execute	Any,Make_Visible
0032 e211       |    |		Load	0x1,0x11							; Debug Table 0x0.0x11 = 0x32,0xffee
0033 0129       | )  |		Execute	Any,Make_Visible
0034 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x12 = 0x34,0xffed
0035 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x13 = 0x35,0xffec
0036 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x14 = 0x36,0xffeb
0037 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x15 = 0x37,0xffea
0038 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x16 = 0x38,0xffe9
0039 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x17 = 0x39,0xffe8
003a 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x18 = 0x3a,0xffe7
003b 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x19 = 0x3b,0xffe6
003c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1a = 0x3c,0xffe5
003d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1b = 0x3d,0xffe4
003e 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1c = 0x3e,0xffe3
003f 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1d = 0x3f,0xffe2
0040 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1e = 0x40,0xffe1
0041 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1f = 0x41,0xffe0
0042 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x20 = 0x42,0xffdf
0043 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x21 = 0x43,0xffde
0044 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x22 = 0x44,0xffdd
0045 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x23 = 0x45,0xffdc
0046 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x24 = 0x46,0xffdb
0047 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x25 = 0x47,0xffda
0048 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x26 = 0x48,0xffd9
0049 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x27 = 0x49,0xffd8
004a 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x28 = 0x4a,0xffd7
004b 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x29 = 0x4b,0xffd6
004c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2a = 0x4c,0xffd5
004d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2b = 0x4d,0xffd4
004e 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2c = 0x4e,0xffd3
004f 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2d = 0x4f,0xffd2
0050 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2e = 0x50,0xffd1
0051 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2f = 0x51,0xffd0
0052 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x30 = 0x52,0xffcf
0053 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x31 = 0x53,0xffce
0054 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x32 = 0x54,0xffcd
0055 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x33 = 0x55,0xffcc
0056 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x34 = 0x56,0xffcb
0057 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x35 = 0x57,0xffca
0058 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x36 = 0x58,0xffc9
0059 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x37 = 0x59,0xffc8
005a 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x38 = 0x5a,0xffc7
005b 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x39 = 0x5b,0xffc6
005c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x3a = 0x5c,0xffc5
005d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x3b = 0x5d,0xffc4
005e 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x3c = 0x5e,0xffc3
005f 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x3d = 0x5f,0xffc2
0060 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x3e = 0x60,0xffc1
0061 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x3f = 0x61,0xffc0
0062 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x40 = 0x62,0xffbf
0063 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x41 = 0x63,0xffbe
0064 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x42 = 0x64,0xffbd
0065 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x43 = 0x65,0xffbc
0066 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x44 = 0x66,0xffbb
0067 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x45 = 0x67,0xffba
0068 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x46 = 0x68,0xffb9
0069 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x47 = 0x69,0xffb8
006a 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x48 = 0x6a,0xffb7
006b 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x49 = 0x6b,0xffb6
006c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x4a = 0x6c,0xffb5
006d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x4b = 0x6d,0xffb4
006e 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x4c = 0x6e,0xffb3
006f 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x4d = 0x6f,0xffb2
0070 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x4e = 0x70,0xffb1
0071 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x4f = 0x71,0xffb0
0072 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x50 = 0x72,0xffaf
0073 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x51 = 0x73,0xffae
0074 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x52 = 0x74,0xffad
0075 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x53 = 0x75,0xffac
0076 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x54 = 0x76,0xffab
0077 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x55 = 0x77,0xffaa
0078 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x56 = 0x78,0xffa9
0079 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x57 = 0x79,0xffa8
007a 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x58 = 0x7a,0xffa7
007b 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x59 = 0x7b,0xffa6
007c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x5a = 0x7c,0xffa5
007d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x5b = 0x7d,0xffa4
007e 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x5c = 0x7e,0xffa3
007f 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x5d = 0x7f,0xffa2
0080 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x5e = 0x80,0xffa1
0081 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x5f = 0x81,0xffa0
0082 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x60 = 0x82,0xff9f
0083 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x61 = 0x83,0xff9e
0084 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x62 = 0x84,0xff9d
0085 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0.0x63 = 0x85,0xff9c
0086 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1 = .DEBUG	0x0086,0x0b34,0x8000,0x0000,0x0059,0xf6c5,0x0000,0x0005
													; Debug Table 0x1.0x0 = 0x86,0xffff
0087 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0088 029b 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call,Unelaborated		; Debug Table 0x1.0x1 = 0x88,0xfffe
008a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x2 = 0x8a,0xfffd
008b 4802       |H   |		Short_Literal	0x2
008c 029f 0323  |   #|		Declare_Subprogram	INIT_0320,For_Call
008e 03fd       |    |		Declare_Type	Discrete,Defined
008f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x3 = 0x8f,0xfffc
0090 487f       |H   |		Short_Literal	0x7f
0091 00da       |    |		Load_Top	At_Offset_2
0092 02a0       |    |		Declare_Subprogram	Null_Subprogram
0093 4801       |H   |		Short_Literal	0x1
0094 035d       | ]  |		Declare_Type	Array,Defined
0095 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x4 = 0x95,0xfffb
0096 0337       | 7  |		Declare_Variable	Array
0097 00d9       |    |		Load_Top	At_Offset_1
0098 0337       | 7  |		Declare_Variable	Array
0099 4800       |H   |		Short_Literal	0x0
009a 4800       |H   |		Short_Literal	0x0
009b 00da       |    |		Load_Top	At_Offset_2
009c 01d6       |    |		Execute	Vector,Field_Write
009d 4801       |H   |		Short_Literal	0x1
009e 4803       |H   |		Short_Literal	0x3
009f 00da       |    |		Load_Top	At_Offset_2
00a0 01d6       |    |		Execute	Vector,Field_Write
00a1 4801       |H   |		Short_Literal	0x1
00a2 480c       |H   |		Short_Literal	0xc
00a3 00da       |    |		Load_Top	At_Offset_2
00a4 01d6       |    |		Execute	Vector,Field_Write
00a5 4801       |H   |		Short_Literal	0x1
00a6 4834       |H4  |		Short_Literal	0x34
00a7 00da       |    |		Load_Top	At_Offset_2
00a8 01d6       |    |		Execute	Vector,Field_Write
00a9 4801       |H   |		Short_Literal	0x1
00aa 4835       |H5  |		Short_Literal	0x35
00ab 00da       |    |		Load_Top	At_Offset_2
00ac 01d6       |    |		Execute	Vector,Field_Write
00ad 4800       |H   |		Short_Literal	0x0
00ae 483f       |H?  |		Short_Literal	0x3f
00af 00da       |    |		Load_Top	At_Offset_2
00b0 01d6       |    |		Execute	Vector,Field_Write
00b1 4801       |H   |		Short_Literal	0x1
00b2 483e       |H>  |		Short_Literal	0x3e
00b3 00da       |    |		Load_Top	At_Offset_2
00b4 01d6       |    |		Execute	Vector,Field_Write
00b5 4801       |H   |		Short_Literal	0x1
00b6 4848       |HH  |		Short_Literal	0x48
00b7 00da       |    |		Load_Top	At_Offset_2
00b8 01d6       |    |		Execute	Vector,Field_Write
00b9 4801       |H   |		Short_Literal	0x1
00ba 4849       |HI  |		Short_Literal	0x49
00bb 00da       |    |		Load_Top	At_Offset_2
00bc 01d6       |    |		Execute	Vector,Field_Write
00bd 4801       |H   |		Short_Literal	0x1
00be 4853       |HS  |		Short_Literal	0x53
00bf 00da       |    |		Load_Top	At_Offset_2
00c0 01d6       |    |		Execute	Vector,Field_Write
00c1 4801       |H   |		Short_Literal	0x1
00c2 4864       |Hd  |		Short_Literal	0x64
00c3 00da       |    |		Load_Top	At_Offset_2
00c4 01d6       |    |		Execute	Vector,Field_Write
00c5 4801       |H   |		Short_Literal	0x1
00c6 4865       |He  |		Short_Literal	0x65
00c7 00da       |    |		Load_Top	At_Offset_2
00c8 01d6       |    |		Execute	Vector,Field_Write
00c9 4801       |H   |		Short_Literal	0x1
00ca 4872       |Hr  |		Short_Literal	0x72
00cb 00da       |    |		Load_Top	At_Offset_2
00cc 01d6       |    |		Execute	Vector,Field_Write
00cd 4801       |H   |		Short_Literal	0x1
00ce 4877       |Hw  |		Short_Literal	0x77
00cf 00da       |    |		Load_Top	At_Offset_2
00d0 01d6       |    |		Execute	Vector,Field_Write
00d1 4802       |H   |		Short_Literal	0x2
00d2 4801       |H   |		Short_Literal	0x1
00d3 00da       |    |		Load_Top	At_Offset_2
00d4 01d6       |    |		Execute	Vector,Field_Write
00d5 4802       |H   |		Short_Literal	0x2
00d6 4802       |H   |		Short_Literal	0x2
00d7 00da       |    |		Load_Top	At_Offset_2
00d8 01d6       |    |		Execute	Vector,Field_Write
00d9 480b       |H   |		Short_Literal	0xb
00da 4804       |H   |		Short_Literal	0x4
00db 4802       |H   |		Short_Literal	0x2
00dc 00d9       |    |		Load_Top	At_Offset_1
00dd e221       | !  |		Load	0x1,0x21
00de 01d6       |    |		Execute	Vector,Field_Write
00df 3ffb       |?   |		Loop_Increasing	0xdb
00e0 4833       |H3  |		Short_Literal	0x33
00e1 480d       |H   |		Short_Literal	0xd
00e2 4802       |H   |		Short_Literal	0x2
00e3 00d9       |    |		Load_Top	At_Offset_1
00e4 e221       | !  |		Load	0x1,0x21
00e5 01d6       |    |		Execute	Vector,Field_Write
00e6 3ffb       |?   |		Loop_Increasing	0xe2
00e7 483d       |H=  |		Short_Literal	0x3d
00e8 4836       |H6  |		Short_Literal	0x36
00e9 4802       |H   |		Short_Literal	0x2
00ea 00d9       |    |		Load_Top	At_Offset_1
00eb e221       | !  |		Load	0x1,0x21
00ec 01d6       |    |		Execute	Vector,Field_Write
00ed 3ffb       |?   |		Loop_Increasing	0xe9
00ee 4847       |HG  |		Short_Literal	0x47
00ef 4840       |H@  |		Short_Literal	0x40
00f0 4802       |H   |		Short_Literal	0x2
00f1 00d9       |    |		Load_Top	At_Offset_1
00f2 e221       | !  |		Load	0x1,0x21
00f3 01d6       |    |		Execute	Vector,Field_Write
00f4 3ffb       |?   |		Loop_Increasing	0xf0
00f5 4852       |HR  |		Short_Literal	0x52
00f6 484a       |HJ  |		Short_Literal	0x4a
00f7 4802       |H   |		Short_Literal	0x2
00f8 00d9       |    |		Load_Top	At_Offset_1
00f9 e221       | !  |		Load	0x1,0x21
00fa 01d6       |    |		Execute	Vector,Field_Write
00fb 3ffb       |?   |		Loop_Increasing	0xf7
00fc 4863       |Hc  |		Short_Literal	0x63
00fd 4854       |HT  |		Short_Literal	0x54
00fe 4802       |H   |		Short_Literal	0x2
00ff 00d9       |    |		Load_Top	At_Offset_1
0100 e221       | !  |		Load	0x1,0x21
0101 01d6       |    |		Execute	Vector,Field_Write
0102 3ffb       |?   |		Loop_Increasing	0xfe
0103 4871       |Hq  |		Short_Literal	0x71
0104 4866       |Hf  |		Short_Literal	0x66
0105 4802       |H   |		Short_Literal	0x2
0106 00d9       |    |		Load_Top	At_Offset_1
0107 e221       | !  |		Load	0x1,0x21
0108 01d6       |    |		Execute	Vector,Field_Write
0109 3ffb       |?   |		Loop_Increasing	0x105
010a 4876       |Hv  |		Short_Literal	0x76
010b 4873       |Hs  |		Short_Literal	0x73
010c 4802       |H   |		Short_Literal	0x2
010d 00d9       |    |		Load_Top	At_Offset_1
010e e221       | !  |		Load	0x1,0x21
010f 01d6       |    |		Execute	Vector,Field_Write
0110 3ffb       |?   |		Loop_Increasing	0x10c
0111 487f       |H   |		Short_Literal	0x7f
0112 4878       |Hx  |		Short_Literal	0x78
0113 4802       |H   |		Short_Literal	0x2
0114 00d9       |    |		Load_Top	At_Offset_1
0115 e221       | !  |		Load	0x1,0x21
0116 01d6       |    |		Execute	Vector,Field_Write
0117 3ffb       |?   |		Loop_Increasing	0x113
0118 00da       |    |		Load_Top	At_Offset_2
0119 01c3       |    |		Execute	Vector,Check_In_Type
011a 00d9       |    |		Load_Top	At_Offset_1
011b 01d4       |    |		Execute	Vector,Structure_Write
011c 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x5 = 0x11c,0xfffa
011d 00c7       |    |		Action	Elaborate_Subprogram
011e 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x6 = 0x11e,0xfff9
011f 00c7       |    |		Action	Elaborate_Subprogram
0120 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x7 = 0x120,0xfff8
0121 00c7       |    |		Action	Elaborate_Subprogram
0122 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x8 = 0x122,0xfff7
0123 00c7       |    |		Action	Elaborate_Subprogram
0124 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x9 = 0x124,0xfff6
0125 00c7       |    |		Action	Elaborate_Subprogram
0126 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0xa = 0x126,0xfff5
0127 00c7       |    |		Action	Elaborate_Subprogram
0128			BODY_0008:
0128 00bc       |    |		Action	Signal_Activated
0129 00bb       |    |		Action	Signal_Completion
012a 0000 0000  |    |		.BLANK	0000[0x6]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133       | 3  |		.CONST	0x0133								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0001       |    |		.CONST	0x0001								; Number of locals
0133			BODY_0130:
0133			INIT_0130:
0133 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2 = .DEBUG	0x0133,0x0b4c,0x0002,0x0000,0x0059,0xce15,0x0000,0x0024
													; Debug Table 0x2.0x0 = 0x133,0x1
0134 e220       |    |		Load	0x1,0x20
0135 01d7       |    |		Execute	Vector,Field_Read
0136 0f02       |    |		Execute_Immediate	Equal,0x2
0137 7003       |p   |		Jump_Nonzero	0x13b
0138 821d       |    |		Call	0x1,0x1d
0139 0f00       |    |		Execute_Immediate	Equal,0x0
013a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
013b 4801       |H   |		Short_Literal	0x1
013c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
013d 0000 0000  |    |		.XXX[0x3]
013f 0000       |    |
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143       | C  |		.CONST	0x0143								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0001       |    |		.CONST	0x0001								; Number of locals
0143			BODY_0140:
0143			INIT_0140:
0143 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x0143,0x0b50,0x0002,0x0000,0x0059,0xce15,0x0000,0x002d
													; Debug Table 0x3.0x0 = 0x143,0x1
0144 e220       |    |		Load	0x1,0x20
0145 01d7       |    |		Execute	Vector,Field_Read
0146 0f01       |    |		Execute_Immediate	Equal,0x1
0147 6802       |h   |		Jump_Zero	0x14a
0148 821d       |    |		Call	0x1,0x1d
0149 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
014a 4800       |H   |		Short_Literal	0x0
014b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
014c 0000 0000  |    |		.BLANK	0000[0x4]
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4 = .DEBUG	0x0153,0x0b54,0x0002,0x0000,0x0059,0xce15,0x0000,0x0036
													; Debug Table 0x4.0x0 = 0x153,0x1
0154 e220       |    |		Load	0x1,0x20
0155 01d7       |    |		Execute	Vector,Field_Read
0156 7002       |p   |		Jump_Nonzero	0x159
0157 821d       |    |		Call	0x1,0x1d
0158 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0159 4800       |H   |		Short_Literal	0x0
015a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
015b 0000 0000  |    |		.BLANK	0000[0x5]
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 821d       |    |		Call	0x1,0x1d							; Debug Table 0x5 = .DEBUG	0x0163,0x0b58,0x0002,0x0000,0x0059,0xce15,0x0000,0x003f
													; Debug Table 0x5.0x0 = 0x163,0x1
0164 697f       |i   |		Jump_Zero	0x2e4
0165 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x1 = 0x165,0x2
0166 467f       |F   |		Jump_Case	0x80
0167 787f       |x   |		Jump	0x1e7								; case 0x0
0168 7881       |x   |		Jump	0x1ea								; case 0x1
0169 7883       |x   |		Jump	0x1ed								; case 0x2
016a 7885       |x   |		Jump	0x1f0								; case 0x3
016b 7887       |x   |		Jump	0x1f3								; case 0x4
016c 7889       |x   |		Jump	0x1f6								; case 0x5
016d 788b       |x   |		Jump	0x1f9								; case 0x6
016e 788d       |x   |		Jump	0x1fc								; case 0x7
016f 788f       |x   |		Jump	0x1ff								; case 0x8
0170 7891       |x   |		Jump	0x202								; case 0x9
0171 7893       |x   |		Jump	0x205								; case 0xa
0172 7895       |x   |		Jump	0x208								; case 0xb
0173 7897       |x   |		Jump	0x20b								; case 0xc
0174 7899       |x   |		Jump	0x20e								; case 0xd
0175 789b       |x   |		Jump	0x211								; case 0xe
0176 789d       |x   |		Jump	0x214								; case 0xf
0177 789f       |x   |		Jump	0x217								; case 0x10
0178 78a1       |x   |		Jump	0x21a								; case 0x11
0179 78a3       |x   |		Jump	0x21d								; case 0x12
017a 78a5       |x   |		Jump	0x220								; case 0x13
017b 78a7       |x   |		Jump	0x223								; case 0x14
017c 78a9       |x   |		Jump	0x226								; case 0x15
017d 78ab       |x   |		Jump	0x229								; case 0x16
017e 78ad       |x   |		Jump	0x22c								; case 0x17
017f 78af       |x   |		Jump	0x22f								; case 0x18
0180 78b1       |x   |		Jump	0x232								; case 0x19
0181 78b6       |x   |		Jump	0x238								; case 0x1a
0182 78b8       |x   |		Jump	0x23b								; case 0x1b
0183 78ba       |x   |		Jump	0x23e								; case 0x1c
0184 78bc       |x   |		Jump	0x241								; case 0x1d
0185 78be       |x   |		Jump	0x244								; case 0x1e
0186 78c0       |x   |		Jump	0x247								; case 0x1f
0187 78c2       |x   |		Jump	0x24a								; case 0x20
0188 78c4       |x   |		Jump	0x24d								; case 0x21
0189 78c6       |x   |		Jump	0x250								; case 0x22
018a 78c8       |x   |		Jump	0x253								; case 0x23
018b 78ca       |x   |		Jump	0x256								; case 0x24
018c 78cc       |x   |		Jump	0x259								; case 0x25
018d 78ce       |x   |		Jump	0x25c								; case 0x26
018e 78d0       |x   |		Jump	0x25f								; case 0x27
018f 78d2       |x   |		Jump	0x262								; case 0x28
0190 78d4       |x   |		Jump	0x265								; case 0x29
0191 78d6       |x   |		Jump	0x268								; case 0x2a
0192 78d8       |x   |		Jump	0x26b								; case 0x2b
0193 78a1       |x   |		Jump	0x235								; case 0x2c
0194 7945       |yE  |		Jump	0x2da								; case 0x2d
0195 7944       |yD  |		Jump	0x2da								; case 0x2e
0196 7943       |yC  |		Jump	0x2da								; case 0x2f
0197 7942       |yB  |		Jump	0x2da								; case 0x30
0198 7941       |yA  |		Jump	0x2da								; case 0x31
0199 78d4       |x   |		Jump	0x26e								; case 0x32
019a 78d6       |x   |		Jump	0x271								; case 0x33
019b 78d8       |x   |		Jump	0x274								; case 0x34
019c 78da       |x   |		Jump	0x277								; case 0x35
019d 793c       |y<  |		Jump	0x2da								; case 0x36
019e 793b       |y;  |		Jump	0x2da								; case 0x37
019f 793a       |y:  |		Jump	0x2da								; case 0x38
01a0 7939       |y9  |		Jump	0x2da								; case 0x39
01a1 7938       |y8  |		Jump	0x2da								; case 0x3a
01a2 7937       |y7  |		Jump	0x2da								; case 0x3b
01a3 78d6       |x   |		Jump	0x27a								; case 0x3c
01a4 78d8       |x   |		Jump	0x27d								; case 0x3d
01a5 78da       |x   |		Jump	0x280								; case 0x3e
01a6 78dc       |x   |		Jump	0x283								; case 0x3f
01a7 7932       |y2  |		Jump	0x2da								; case 0x40
01a8 7931       |y1  |		Jump	0x2da								; case 0x41
01a9 7930       |y0  |		Jump	0x2da								; case 0x42
01aa 792f       |y/  |		Jump	0x2da								; case 0x43
01ab 792e       |y.  |		Jump	0x2da								; case 0x44
01ac 792d       |y-  |		Jump	0x2da								; case 0x45
01ad 78d8       |x   |		Jump	0x286								; case 0x46
01ae 78da       |x   |		Jump	0x289								; case 0x47
01af 78dc       |x   |		Jump	0x28c								; case 0x48
01b0 78de       |x   |		Jump	0x28f								; case 0x49
01b1 7928       |y(  |		Jump	0x2da								; case 0x4a
01b2 7927       |y'  |		Jump	0x2da								; case 0x4b
01b3 7926       |y&  |		Jump	0x2da								; case 0x4c
01b4 7925       |y%  |		Jump	0x2da								; case 0x4d
01b5 7924       |y$  |		Jump	0x2da								; case 0x4e
01b6 7923       |y#  |		Jump	0x2da								; case 0x4f
01b7 78da       |x   |		Jump	0x292								; case 0x50
01b8 78dc       |x   |		Jump	0x295								; case 0x51
01b9 78de       |x   |		Jump	0x298								; case 0x52
01ba 78e0       |x   |		Jump	0x29b								; case 0x53
01bb 791e       |y   |		Jump	0x2da								; case 0x54
01bc 791d       |y   |		Jump	0x2da								; case 0x55
01bd 791c       |y   |		Jump	0x2da								; case 0x56
01be 791b       |y   |		Jump	0x2da								; case 0x57
01bf 791a       |y   |		Jump	0x2da								; case 0x58
01c0 7919       |y   |		Jump	0x2da								; case 0x59
01c1 78dc       |x   |		Jump	0x29e								; case 0x5a
01c2 78de       |x   |		Jump	0x2a1								; case 0x5b
01c3 78e0       |x   |		Jump	0x2a4								; case 0x5c
01c4 7915       |y   |		Jump	0x2da								; case 0x5d
01c5 7914       |y   |		Jump	0x2da								; case 0x5e
01c6 7913       |y   |		Jump	0x2da								; case 0x5f
01c7 7912       |y   |		Jump	0x2da								; case 0x60
01c8 7911       |y   |		Jump	0x2da								; case 0x61
01c9 7910       |y   |		Jump	0x2da								; case 0x62
01ca 790f       |y   |		Jump	0x2da								; case 0x63
01cb 78db       |x   |		Jump	0x2a7								; case 0x64
01cc 78dd       |x   |		Jump	0x2aa								; case 0x65
01cd 78df       |x   |		Jump	0x2ad								; case 0x66
01ce 790b       |y   |		Jump	0x2da								; case 0x67
01cf 790a       |y   |		Jump	0x2da								; case 0x68
01d0 7909       |y   |		Jump	0x2da								; case 0x69
01d1 7908       |y   |		Jump	0x2da								; case 0x6a
01d2 7907       |y   |		Jump	0x2da								; case 0x6b
01d3 7906       |y   |		Jump	0x2da								; case 0x6c
01d4 7905       |y   |		Jump	0x2da								; case 0x6d
01d5 7904       |y   |		Jump	0x2da								; case 0x6e
01d6 7903       |y   |		Jump	0x2da								; case 0x6f
01d7 7902       |y   |		Jump	0x2da								; case 0x70
01d8 7901       |y   |		Jump	0x2da								; case 0x71
01d9 78d6       |x   |		Jump	0x2b0								; case 0x72
01da 78d8       |x   |		Jump	0x2b3								; case 0x73
01db 78da       |x   |		Jump	0x2b6								; case 0x74
01dc 78dc       |x   |		Jump	0x2b9								; case 0x75
01dd 78de       |x   |		Jump	0x2bc								; case 0x76
01de 78e0       |x   |		Jump	0x2bf								; case 0x77
01df 78e2       |x   |		Jump	0x2c2								; case 0x78
01e0 78e4       |x   |		Jump	0x2c5								; case 0x79
01e1 78e6       |x   |		Jump	0x2c8								; case 0x7a
01e2 78e8       |x   |		Jump	0x2cb								; case 0x7b
01e3 78ea       |x   |		Jump	0x2ce								; case 0x7c
01e4 78ec       |x   |		Jump	0x2d1								; case 0x7d
01e5 78ee       |x   |		Jump	0x2d4								; case 0x7e
01e6 78f0       |x   |		Jump	0x2d7								; case 0x7f
01e7 0092 0338  |   8|		Action	Push_String_Extended,0x338					; "No errors detected."
													; Debug Table 0x5.0x2 = 0x1e7,0x3
01e9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ea 0092 0339  |   9|		Action	Push_String_Extended,0x339					; "Internal error: a read-only venture needs reorganization."
													; Debug Table 0x5.0x3 = 0x1ea,0x4
01ec 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ed 0092 033a  |   :|		Action	Push_String_Extended,0x33a					; "The venture handle must be open for update."
													; Debug Table 0x5.0x4 = 0x1ed,0x5
01ef 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f0 0092 033b  |   ;|		Action	Push_String_Extended,0x33b					; "There is no venture field with that name."
													; Debug Table 0x5.0x5 = 0x1f0,0x6
01f2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f3 0092 033c  |   <|		Action	Push_String_Extended,0x33c					; "The venture already has a field with that name."
													; Debug Table 0x5.0x6 = 0x1f3,0x7
01f5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f6 0092 033d  |   =|		Action	Push_String_Extended,0x33d					; "The venture field is of a different type."
													; Debug Table 0x5.0x7 = 0x1f6,0x8
01f8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f9 0092 033e  |   >|		Action	Push_String_Extended,0x33e					; "The venture field is (or is not) a vector."
													; Debug Table 0x5.0x8 = 0x1f9,0x9
01fb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01fc 0092 033f  |   ?|		Action	Push_String_Extended,0x33f					; "All venture fields must have default values."
													; Debug Table 0x5.0x9 = 0x1fc,0xa
01fe 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ff 0092 0340  |   @|		Action	Push_String_Extended,0x340					; "The venture must be opened."
													; Debug Table 0x5.0xa = 0x1ff,0xb
0201 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0202 0092 0341  |   A|		Action	Push_String_Extended,0x341					; "You must supply a real venture field_handle."
													; Debug Table 0x5.0xb = 0x202,0xc
0204 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0205 0092 0342  |   B|		Action	Push_String_Extended,0x342					; "Internal error: a read-only work order needs reorganization."
													; Debug Table 0x5.0xc = 0x205,0xd
0207 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0208 0092 0343  |   C|		Action	Push_String_Extended,0x343					; "The work order handle must be open for update."
													; Debug Table 0x5.0xd = 0x208,0xe
020a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
020b 0092 0344  |   D|		Action	Push_String_Extended,0x344					; "There is no field with that name."
													; Debug Table 0x5.0xe = 0x20b,0xf
020d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
020e 0092 0345  |   E|		Action	Push_String_Extended,0x345					; "A work-order field with that name already exists."
													; Debug Table 0x5.0xf = 0x20e,0x10
0210 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0211 0092 0346  |   F|		Action	Push_String_Extended,0x346					; "Work orders with data in that field exist."
													; Debug Table 0x5.0x10 = 0x211,0x11
0213 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0214 0092 0347  |   G|		Action	Push_String_Extended,0x347					; "The work order field is (or is not) a vector."
													; Debug Table 0x5.0x11 = 0x214,0x12
0216 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0217 0092 0348  |   H|		Action	Push_String_Extended,0x348					; "The work order field has a different type."
													; Debug Table 0x5.0x12 = 0x217,0x13
0219 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
021a 0092 0349  |   I|		Action	Push_String_Extended,0x349					; "You must supply a real order field_handle."
													; Debug Table 0x5.0x13 = 0x21a,0x14
021c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
021d 0092 034a  |   J|		Action	Push_String_Extended,0x34a					; "The work_order must be open."
													; Debug Table 0x5.0x14 = 0x21d,0x15
021f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0220 0092 034b  |   K|		Action	Push_String_Extended,0x34b					; "This is not a work_order for the given venture."
													; Debug Table 0x5.0x15 = 0x220,0x16
0222 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0223 0092 034c  |   L|		Action	Push_String_Extended,0x34c					; "Directory said something was locked."
													; Debug Table 0x5.0x16 = 0x223,0x17
0225 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0226 0092 034d  |   M|		Action	Push_String_Extended,0x34d					; "Directory reported semantic errors."
													; Debug Table 0x5.0x17 = 0x226,0x18
0228 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0229 0092 034e  |   N|		Action	Push_String_Extended,0x34e					; "Directory reported code generation errors."
													; Debug Table 0x5.0x18 = 0x229,0x19
022b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
022c 0092 034f  |   O|		Action	Push_String_Extended,0x34f					; "Directory reported obsolescence errors."
													; Debug Table 0x5.0x19 = 0x22c,0x1a
022e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
022f 0092 0350  |   P|		Action	Push_String_Extended,0x350					; "Directory reported a bad tree parameter."
													; Debug Table 0x5.0x1a = 0x22f,0x1b
0231 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0232 0092 0351  |   Q|		Action	Push_String_Extended,0x351					; "Directory reported an illegal operation."
													; Debug Table 0x5.0x1b = 0x232,0x1c
0234 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0235 0092 0352  |   R|		Action	Push_String_Extended,0x352					; "Directory reported a consistency error."
													; Debug Table 0x5.0x1c = 0x235,0x1d
0237 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0238 0092 0353  |   S|		Action	Push_String_Extended,0x353					; "Directory reported a version error."
													; Debug Table 0x5.0x1d = 0x238,0x1e
023a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
023b 0092 0354  |   T|		Action	Push_String_Extended,0x354					; "Directory reported a name error."
													; Debug Table 0x5.0x1e = 0x23b,0x1f
023d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
023e 0092 0355  |   U|		Action	Push_String_Extended,0x355					; "Access was denied."
													; Debug Table 0x5.0x1f = 0x23e,0x20
0240 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0241 0092 0356  |   V|		Action	Push_String_Extended,0x356					; "Directory reported a policy error."
													; Debug Table 0x5.0x20 = 0x241,0x21
0243 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0244 0092 0357  |   W|		Action	Push_String_Extended,0x357					; "Directory reported a bad action."
													; Debug Table 0x5.0x21 = 0x244,0x22
0246 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0247 0092 0358  |   X|		Action	Push_String_Extended,0x358					; "Directory reported a class error."
													; Debug Table 0x5.0x22 = 0x247,0x23
0249 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
024a 0092 0359  |   Y|		Action	Push_String_Extended,0x359					; "Directory reported some unknown error."
													; Debug Table 0x5.0x23 = 0x24a,0x24
024c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
024d 0092 035a  |   Z|		Action	Push_String_Extended,0x35a					; "Directory reported bad name resolution context."
													; Debug Table 0x5.0x24 = 0x24d,0x25
024f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0250 0092 035b  |   [|		Action	Push_String_Extended,0x35b					; "That name is poorly formed."
													; Debug Table 0x5.0x25 = 0x250,0x26
0252 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0253 0092 035c  |   \|		Action	Push_String_Extended,0x35c					; "Can't find an appropriate object with that name."
													; Debug Table 0x5.0x26 = 0x253,0x27
0255 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0256 0092 035d  |   ]|		Action	Push_String_Extended,0x35d					; "That name is ambiguous."
													; Debug Table 0x5.0x27 = 0x256,0x28
0258 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0259 0092 035e  |   ^|		Action	Push_String_Extended,0x35e					; "Select something first."
													; Debug Table 0x5.0x28 = 0x259,0x29
025b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
025c 0092 035f  |   _|		Action	Push_String_Extended,0x35f					; "Put the cursor in the selection."
													; Debug Table 0x5.0x29 = 0x25c,0x2a
025e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
025f 0092 0360  |   `|		Action	Push_String_Extended,0x360					; "Can't resolve selections on this kind of window."
													; Debug Table 0x5.0x2a = 0x25f,0x2b
0261 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0262 0092 0361  |   a|		Action	Push_String_Extended,0x361					; "No declaration for this object could be found."
													; Debug Table 0x5.0x2b = 0x262,0x2c
0264 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0265 0092 0362  |   b|		Action	Push_String_Extended,0x362					; "No object could be found."
													; Debug Table 0x5.0x2c = 0x265,0x2d
0267 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0268 0092 0363  |   c|		Action	Push_String_Extended,0x363					; "No editor could be found."
													; Debug Table 0x5.0x2d = 0x268,0x2e
026a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
026b 0092 0364  |   d|		Action	Push_String_Extended,0x364					; "Name resolution failed."
													; Debug Table 0x5.0x2e = 0x26b,0x2f
026d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
026e 0092 0365  |   e|		Action	Push_String_Extended,0x365					; "The work-order set handle must be open for update."
													; Debug Table 0x5.0x2f = 0x26e,0x30
0270 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0271 0092 0366  |   f|		Action	Push_String_Extended,0x366					; "Internal error: a read-only work order set needs reorganization."
													; Debug Table 0x5.0x30 = 0x271,0x31
0273 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0274 0092 0367  |   g|		Action	Push_String_Extended,0x367					; "That object is already in the set."
													; Debug Table 0x5.0x31 = 0x274,0x32
0276 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0277 0092 0368  |   h|		Action	Push_String_Extended,0x368					; "Couldn't find that object in the set."
													; Debug Table 0x5.0x32 = 0x277,0x33
0279 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
027a 0092 0369  |   i|		Action	Push_String_Extended,0x369					; "Internal error: a read-only default map needs reorganization."
													; Debug Table 0x5.0x33 = 0x27a,0x34
027c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
027d 0092 036a  |   j|		Action	Push_String_Extended,0x36a					; "The venture's default map must be open for update."
													; Debug Table 0x5.0x34 = 0x27d,0x35
027f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0280 0092 036b  |   k|		Action	Push_String_Extended,0x36b					; "You have no default in this venture."
													; Debug Table 0x5.0x35 = 0x280,0x36
0282 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0283 0092 036c  |   l|		Action	Push_String_Extended,0x36c					; "Successfully added a new user's default."
													; Debug Table 0x5.0x36 = 0x283,0x37
0285 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0286 0092 036d  |   m|		Action	Push_String_Extended,0x36d					; "The work-order handle must be open for update to add users."
													; Debug Table 0x5.0x37 = 0x286,0x38
0288 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0289 0092 036e  |   n|		Action	Push_String_Extended,0x36e					; "Internal error: a read-only order_user needs reorganization."
													; Debug Table 0x5.0x38 = 0x289,0x39
028b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
028c 0092 036f  |   o|		Action	Push_String_Extended,0x36f					; "That user is already in the set."
													; Debug Table 0x5.0x39 = 0x28c,0x3a
028e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
028f 0092 0370  |   p|		Action	Push_String_Extended,0x370					; "Couldn't find that user in the set."
													; Debug Table 0x5.0x3a = 0x28f,0x3b
0291 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0292 0092 0371  |   q|		Action	Push_String_Extended,0x371					; "The work-order must be open for update."
													; Debug Table 0x5.0x3b = 0x292,0x3c
0294 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0295 0092 0372  |   r|		Action	Push_String_Extended,0x372					; "Internal error: a read-only set needs reorganization."
													; Debug Table 0x5.0x3c = 0x295,0x3d
0297 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0298 0092 0373  |   s|		Action	Push_String_Extended,0x373					; "Something with that time-stamp is already in the set."
													; Debug Table 0x5.0x3d = 0x298,0x3e
029a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
029b 0092 0374  |   t|		Action	Push_String_Extended,0x374					; "Couldn't find that time-stamp in the set."
													; Debug Table 0x5.0x3e = 0x29b,0x3f
029d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
029e 0092 0375  |   u|		Action	Push_String_Extended,0x375					; "The work-order list must be open for update."
													; Debug Table 0x5.0x3f = 0x29e,0x40
02a0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02a1 0092 0376  |   v|		Action	Push_String_Extended,0x376					; "The work_order_list must be open."
													; Debug Table 0x5.0x40 = 0x2a1,0x41
02a3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02a4 0092 0377  |   w|		Action	Push_String_Extended,0x377					; "This list does not belong to this venture."
													; Debug Table 0x5.0x41 = 0x2a4,0x42
02a6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02a7 0092 0378  |   x|		Action	Push_String_Extended,0x378					; "Couldn't parse supplied default, and will use False."
													; Debug Table 0x5.0x42 = 0x2a7,0x43
02a9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02aa 0092 0379  |   y|		Action	Push_String_Extended,0x379					; "Couldn't parse supplied default, and will use 0."
													; Debug Table 0x5.0x43 = 0x2aa,0x44
02ac 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ad 0092 037a  |   z|		Action	Push_String_Extended,0x37a					; "The venture and list must be opened with the same action."
													; Debug Table 0x5.0x44 = 0x2ad,0x45
02af 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b0 0092 037b  |   {|		Action	Push_String_Extended,0x37b					; "The default is really a nonexistent object, so Nil will be returned."
													; Debug Table 0x5.0x45 = 0x2b0,0x46
02b2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b3 0092 037c  |   ||		Action	Push_String_Extended,0x37c					; "Field names cannot contain Ascii.Lf, '\x22', or \x22 => \x22."
													; Debug Table 0x5.0x46 = 0x2b3,0x47
02b5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b6 0092 037d  |   }|		Action	Push_String_Extended,0x37d					; "Your product authorization for Work_Orders has expired.  Call Rational."
													; Debug Table 0x5.0x47 = 0x2b6,0x48
02b8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b9 0092 037e  |   ~|		Action	Push_String_Extended,0x37e					; "This work order is not closed."
													; Debug Table 0x5.0x48 = 0x2b9,0x49
02bb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02bc 0092 037f  |    |		Action	Push_String_Extended,0x37f					; "Modifications are not allowed during traversal."
													; Debug Table 0x5.0x49 = 0x2bc,0x4a
02be 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02bf 0092 0380  |    |		Action	Push_String_Extended,0x380					; "Abandoned changes due to errors detected earlier."
													; Debug Table 0x5.0x4a = 0x2bf,0x4b
02c1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02c2 0092 0381  |    |		Action	Push_String_Extended,0x381					; "Objects cannot be opened with mode None."
													; Debug Table 0x5.0x4b = 0x2c2,0x4c
02c4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02c5 0092 0382  |    |		Action	Push_String_Extended,0x382					; "Invalid user id supplied."
													; Debug Table 0x5.0x4c = 0x2c5,0x4d
02c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02c8 0092 0383  |    |		Action	Push_String_Extended,0x383					; "This work order is closed - no modifications are allowed."
													; Debug Table 0x5.0x4d = 0x2c8,0x4e
02ca 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02cb 0092 0384  |    |		Action	Push_String_Extended,0x384					; "That isn't a venture."
													; Debug Table 0x5.0x4e = 0x2cb,0x4f
02cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ce 0092 0385  |    |		Action	Push_String_Extended,0x385					; "That isn't a work order."
													; Debug Table 0x5.0x4f = 0x2ce,0x50
02d0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d1 0092 0386  |    |		Action	Push_String_Extended,0x386					; "That isn't a work order list."
													; Debug Table 0x5.0x50 = 0x2d1,0x51
02d3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d4 0092 0387  |    |		Action	Push_String_Extended,0x387					; "Some unexplainable error was detected."
													; Debug Table 0x5.0x51 = 0x2d4,0x52
02d6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d7 0092 0388  |    |		Action	Push_String_Extended,0x388					; "Something bad happened."
													; Debug Table 0x5.0x52 = 0x2d7,0x53
02d9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02da 0092 0389  |    |		Action	Push_String_Extended,0x389					; "Internal error:  Whoops number"
													; Debug Table 0x5.0x53 = 0x2da,0x54
02dc 00db       |    |		Load_Top	At_Offset_3
02dd 00e0       |    |		Load_Encached	Standard_Cache
02de 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02df 01cc       |    |		Execute	Vector,Catenate
02e0 0092 038a  |    |		Action	Push_String_Extended,0x38a					; "!"
02e2 01cc       |    |		Execute	Vector,Catenate
02e3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02e4 0092 037d  |   }|		Action	Push_String_Extended,0x37d					; "Your product authorization for Work_Orders has expired.  Call Rational."
													; Debug Table 0x5.0x54 = 0x2e4,0x55
02e6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02e7 0000 0000  |    |		.XXX[0x3]
02e9 0000       |    |
02ea 59ce 1506  |Y   |		.XXX[0x16]
02ec 0000 0000  |    |
02ee 59ce 1505  |Y   |
02f0 0000 0000  |    |
02f2 59ce 1504  |Y   |
02f4 0000 0000  |    |
02f6 59ce 1503  |Y   |
02f8 0000 0000  |    |
02fa 59ce 1502  |Y   |
02fc 0000 0000  |    |
02fe 59ce 1501  |Y   |
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303       |    |		.CONST	0x0303								; Address of begin
0301 0004       |    |		.CONST	0x0004								; Address of exception handler
0302 0001       |    |		.CONST	0x0001								; Number of locals
0303			BODY_0300:
0303			INIT_0300:
0303 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x0303,0x0c04,0x0001,0x0000,0x0059,0xce15,0x0000,0x004e
													; Debug Table 0x6.0x0 = 0x303,0x1
0304 8212       |    |		Call	0x1,0x12
0305 7005       |p   |		Jump_Nonzero	0x30b
0306 00db       |    |		Load_Top	At_Offset_3
0307 00db       |    |		Load_Top	At_Offset_3
0308 8213       |    |		Call	0x1,0x13
0309 0279       | y  |		Execute	Discrete,And
030a 6802       |h   |		Jump_Zero	0x30d
030b e216       |    |		Load	0x1,0x16							; Debug Table 0x6.0x1 = 0x30b,0x2
030c 0257       | W  |		Execute	Discrete,Raise
030d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
030e 0000 0000  |    |		.XXX[0x2]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313       |    |		.CONST	0x0313								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0001       |    |		.CONST	0x0001								; Number of locals
0313			BODY_0310:
0313			INIT_0310:
0313 e21c       |    |		Load	0x1,0x1c							; Debug Table 0x7 = .DEBUG	0x0313,0x0c0a,0x0002,0x0000,0x0059,0xf6c5,0x0000,0x000c
													; Debug Table 0x7.0x0 = 0x313,0x1
0314 7005       |p   |		Jump_Nonzero	0x31a
0315 0092 038b  |    |		Action	Push_String_Extended,0x38b					; "Work_Orders"
													; Debug Table 0x7.0x1 = 0x315,0x2
0317 e001       |    |		Load	0x0,0x1
0318 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0319 a21c       |    |		Store_Unchecked	0x1,0x1c
031a e21c       |    |		Load	0x1,0x1c							; Debug Table 0x7.0x2 = 0x31a,0x3
031b 00ca       |    |		Action	Exit_Nullary_Function
031c 0000 0000  |    |		.BLANK	0000[0x4]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0323       | #  |		.CONST	0x0323								; Address of begin
0321 0004       |    |		.CONST	0x0004								; Address of exception handler
0322 0001       |    |		.CONST	0x0001								; Number of locals
0323			BODY_0320:
0323			INIT_0320:
0323 4603       |F   |		Jump_Case	0x4							; Debug Table 0x8 = .DEBUG	0x0323,0x0c12,0x0005,0x0000,0x0059,0xf6c5,0x0000,0x0011
0324 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0325 7802       |x   |		Jump	0x328								; case 0x1
0326 7805       |x   |		Jump	0x32c								; case 0x2
0327 7809       |x   |		Jump	0x331								; case 0x3
0328 00da       |    |		Load_Top	At_Offset_2
0329 0091 0335  |   5|		Action	Push_String_Extended_Indexed,0x335				; "A_SUCCESS"
032b 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
032c 00db       |    |		Load_Top	At_Offset_3
032d 00db       |    |		Load_Top	At_Offset_3
032e 00e0       |    |		Load_Encached	Standard_Cache
032f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0330 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0331 00da       |    |		Load_Top	At_Offset_2
0332 00e0       |    |		Load_Encached	Standard_Cache
0333 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0334 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0335 ; --------------------------------------------------------------------------------------
0335 ; STRING TABLE
0335 ; --------------------------------------------------------------------------------------
0335 00b0       |    |		.STRTAB	0x00b0->0x038d							; "A_SUCCESS"
0336 00b7       |    |		.STRTAB	0x00b7->0x0391							; "A_WARNING"
0337 00be       |    |		.STRTAB	0x00be->0x0396							; "AN_ERROR"
0338 00c4       |    |		.STRTAB	0x00c4->0x039a							; "No errors detected."
0339 00d5       |    |		.STRTAB	0x00d5->0x03a3							; "Internal error: a read-only venture needs reorganization."
033a 010c       |    |		.STRTAB	0x010c->0x03c0							; "The venture handle must be open for update."
033b 0135       | 5  |		.STRTAB	0x0135->0x03d5							; "There is no venture field with that name."
033c 015c       | \  |		.STRTAB	0x015c->0x03ea							; "The venture already has a field with that name."
033d 0189       |    |		.STRTAB	0x0189->0x0401							; "The venture field is of a different type."
033e 01b0       |    |		.STRTAB	0x01b0->0x0416							; "The venture field is (or is not) a vector."
033f 01d8       |    |		.STRTAB	0x01d8->0x042b							; "All venture fields must have default values."
0340 0202       |    |		.STRTAB	0x0202->0x0441							; "The venture must be opened."
0341 021b       |    |		.STRTAB	0x021b->0x044e							; "You must supply a real venture field_handle."
0342 0245       | E  |		.STRTAB	0x0245->0x0464							; "Internal error: a read-only work order needs reorganization."
0343 027f       |    |		.STRTAB	0x027f->0x0482							; "The work order handle must be open for update."
0344 02ab       |    |		.STRTAB	0x02ab->0x0499							; "There is no field with that name."
0345 02ca       |    |		.STRTAB	0x02ca->0x04aa							; "A work-order field with that name already exists."
0346 02f9       |    |		.STRTAB	0x02f9->0x04c2							; "Work orders with data in that field exist."
0347 0321       | !  |		.STRTAB	0x0321->0x04d7							; "The work order field is (or is not) a vector."
0348 034c       | L  |		.STRTAB	0x034c->0x04ee							; "The work order field has a different type."
0349 0374       | t  |		.STRTAB	0x0374->0x0503							; "You must supply a real order field_handle."
034a 039c       |    |		.STRTAB	0x039c->0x0518							; "The work_order must be open."
034b 03b6       |    |		.STRTAB	0x03b6->0x0526							; "This is not a work_order for the given venture."
034c 03e3       |    |		.STRTAB	0x03e3->0x053d							; "Directory said something was locked."
034d 0405       |    |		.STRTAB	0x0405->0x054f							; "Directory reported semantic errors."
034e 0426       | &  |		.STRTAB	0x0426->0x0561							; "Directory reported code generation errors."
034f 044e       | N  |		.STRTAB	0x044e->0x0576							; "Directory reported obsolescence errors."
0350 0473       | s  |		.STRTAB	0x0473->0x0589							; "Directory reported a bad tree parameter."
0351 0499       |    |		.STRTAB	0x0499->0x059d							; "Directory reported an illegal operation."
0352 04bf       |    |		.STRTAB	0x04bf->0x05b1							; "Directory reported a consistency error."
0353 04e4       |    |		.STRTAB	0x04e4->0x05c5							; "Directory reported a version error."
0354 0505       |    |		.STRTAB	0x0505->0x05d6							; "Directory reported a name error."
0355 0523       | #  |		.STRTAB	0x0523->0x05e6							; "Access was denied."
0356 0533       | 3  |		.STRTAB	0x0533->0x05ef							; "Directory reported a policy error."
0357 0553       | S  |		.STRTAB	0x0553->0x0600							; "Directory reported a bad action."
0358 0571       | q  |		.STRTAB	0x0571->0x0610							; "Directory reported a class error."
0359 0590       |    |		.STRTAB	0x0590->0x0621							; "Directory reported some unknown error."
035a 05b4       |    |		.STRTAB	0x05b4->0x0634							; "Directory reported bad name resolution context."
035b 05e1       |    |		.STRTAB	0x05e1->0x064b							; "That name is poorly formed."
035c 05fa       |    |		.STRTAB	0x05fa->0x0659							; "Can't find an appropriate object with that name."
035d 0628       | (  |		.STRTAB	0x0628->0x0671							; "That name is ambiguous."
035e 063d       | =  |		.STRTAB	0x063d->0x067c							; "Select something first."
035f 0652       | R  |		.STRTAB	0x0652->0x0688							; "Put the cursor in the selection."
0360 0670       | p  |		.STRTAB	0x0670->0x0698							; "Can't resolve selections on this kind of window."
0361 069e       |    |		.STRTAB	0x069e->0x06b0							; "No declaration for this object could be found."
0362 06ca       |    |		.STRTAB	0x06ca->0x06c7							; "No object could be found."
0363 06e1       |    |		.STRTAB	0x06e1->0x06d3							; "No editor could be found."
0364 06f8       |    |		.STRTAB	0x06f8->0x06e0							; "Name resolution failed."
0365 070d       |    |		.STRTAB	0x070d->0x06eb							; "The work-order set handle must be open for update."
0366 073d       | =  |		.STRTAB	0x073d->0x0704							; "Internal error: a read-only work order set needs reorganization."
0367 077b       | {  |		.STRTAB	0x077b->0x0724							; "That object is already in the set."
0368 079b       |    |		.STRTAB	0x079b->0x0735							; "Couldn't find that object in the set."
0369 07be       |    |		.STRTAB	0x07be->0x0748							; "Internal error: a read-only default map needs reorganization."
036a 07f9       |    |		.STRTAB	0x07f9->0x0766							; "The venture's default map must be open for update."
036b 0829       | )  |		.STRTAB	0x0829->0x077f							; "You have no default in this venture."
036c 084b       | K  |		.STRTAB	0x084b->0x0791							; "Successfully added a new user's default."
036d 0871       | q  |		.STRTAB	0x0871->0x07a5							; "The work-order handle must be open for update to add users."
036e 08aa       |    |		.STRTAB	0x08aa->0x07c3							; "Internal error: a read-only order_user needs reorganization."
036f 08e4       |    |		.STRTAB	0x08e4->0x07e1							; "That user is already in the set."
0370 0902       |    |		.STRTAB	0x0902->0x07f1							; "Couldn't find that user in the set."
0371 0923       | #  |		.STRTAB	0x0923->0x0802							; "The work-order must be open for update."
0372 0948       | H  |		.STRTAB	0x0948->0x0816							; "Internal error: a read-only set needs reorganization."
0373 097b       | {  |		.STRTAB	0x097b->0x0830							; "Something with that time-stamp is already in the set."
0374 09ae       |    |		.STRTAB	0x09ae->0x084b							; "Couldn't find that time-stamp in the set."
0375 09d5       |    |		.STRTAB	0x09d5->0x085f							; "The work-order list must be open for update."
0376 09ff       |    |		.STRTAB	0x09ff->0x0875							; "The work_order_list must be open."
0377 0a1e       |    |		.STRTAB	0x0a1e->0x0886							; "This list does not belong to this venture."
0378 0a46       | F  |		.STRTAB	0x0a46->0x089b							; "Couldn't parse supplied default, and will use False."
0379 0a78       | x  |		.STRTAB	0x0a78->0x08b5							; "Couldn't parse supplied default, and will use 0."
037a 0aa6       |    |		.STRTAB	0x0aa6->0x08cd							; "The venture and list must be opened with the same action."
037b 0add       |    |		.STRTAB	0x0add->0x08e9							; "The default is really a nonexistent object, so Nil will be returned."
037c 0b1f       |    |		.STRTAB	0x0b1f->0x090b							; "Field names cannot contain Ascii.Lf, '\x22', or \x22 => \x22."
037d 0b51       | Q  |		.STRTAB	0x0b51->0x0925							; "Your product authorization for Work_Orders has expired.  Call Rational."
037e 0b96       |    |		.STRTAB	0x0b96->0x0949							; "This work order is not closed."
037f 0bb2       |    |		.STRTAB	0x0bb2->0x0958							; "Modifications are not allowed during traversal."
0380 0bdf       |    |		.STRTAB	0x0bdf->0x096f							; "Abandoned changes due to errors detected earlier."
0381 0c0e       |    |		.STRTAB	0x0c0e->0x0988							; "Objects cannot be opened with mode None."
0382 0c34       | 4  |		.STRTAB	0x0c34->0x099c							; "Invalid user id supplied."
0383 0c4b       | K  |		.STRTAB	0x0c4b->0x09a8							; "This work order is closed - no modifications are allowed."
0384 0c82       |    |		.STRTAB	0x0c82->0x09c5							; "That isn't a venture."
0385 0c95       |    |		.STRTAB	0x0c95->0x09cf							; "That isn't a work order."
0386 0cab       |    |		.STRTAB	0x0cab->0x09db							; "That isn't a work order list."
0387 0cc6       |    |		.STRTAB	0x0cc6->0x09ea							; "Some unexplainable error was detected."
0388 0cea       |    |		.STRTAB	0x0cea->0x09fd							; "Something bad happened."
0389 0cff       |    |		.STRTAB	0x0cff->0x0a08							; "Internal error:  Whoops number"
038a 0d1b       |    |		.STRTAB	0x0d1b->0x0a17							; "!"
038b 0d1a       |    |		.STRTAB	0x0d1a->0x0a18							; "Work_Orders"
038c 0d23       | #  |		.STREND 0x0d23->0x0a1d
038d 415f 5355  |A_SU|		.STRTAB_STRINGS
0a1e 0000 0000  |    |		.XXX[0x2]
0a20 ; --------------------------------------------------------------------------------------
0a20 ; Debug Table
0a20 ; --------------------------------------------------------------------------------------
0a20 0003 0009  |    |		.CONST	0x0003,0x0009
0a22 000b 0a6a  |   j|		.DEBUG	0x000b,0x0a6a,0x8000,0x0000,0x0059,0xce15,0x0000,0x0003
0a2a 0086 0b34  |   4|		.DEBUG	0x0086,0x0b34,0x8000,0x0000,0x0059,0xf6c5,0x0000,0x0005
0a32 0133 0b4c  | 3 L|		.DEBUG	0x0133,0x0b4c,0x0002,0x0000,0x0059,0xce15,0x0000,0x0024
0a3a 0143 0b50  | C P|		.DEBUG	0x0143,0x0b50,0x0002,0x0000,0x0059,0xce15,0x0000,0x002d
0a42 0153 0b54  | S T|		.DEBUG	0x0153,0x0b54,0x0002,0x0000,0x0059,0xce15,0x0000,0x0036
0a4a 0163 0b58  | c X|		.DEBUG	0x0163,0x0b58,0x0002,0x0000,0x0059,0xce15,0x0000,0x003f
0a52 0303 0c04  |    |		.DEBUG	0x0303,0x0c04,0x0001,0x0000,0x0059,0xce15,0x0000,0x004e
0a5a 0313 0c0a  |    |		.DEBUG	0x0313,0x0c0a,0x0002,0x0000,0x0059,0xf6c5,0x0000,0x000c
0a62 0323 0c12  | #  |		.DEBUG	0x0323,0x0c12,0x0005,0x0000,0x0059,0xf6c5,0x0000,0x0011
0a6a ; --------------------------------------------------------------------------------------
0a6a ; Debug3 Subtable 0x0
0a6a ; --------------------------------------------------------------------------------------
0a6a 0064 0000  | d  |		.DBG3TAB	0x0064,0x0000
0a6c 000b ffff  |    |		.CONST	0x000b,0xffff
0a6e 000c fffe  |    |		.CONST	0x000c,0xfffe
0a70 000d fffd  |    |		.CONST	0x000d,0xfffd
0a72 000e fffc  |    |		.CONST	0x000e,0xfffc
0a74 0011 fffb  |    |		.CONST	0x0011,0xfffb
0a76 0014 fffa  |    |		.CONST	0x0014,0xfffa
0a78 0017 fff9  |    |		.CONST	0x0017,0xfff9
0a7a 001a fff8  |    |		.CONST	0x001a,0xfff8
0a7c 001e fff7  |    |		.CONST	0x001e,0xfff7
0a7e 0020 fff6  |    |		.CONST	0x0020,0xfff6
0a80 0022 fff5  | "  |		.CONST	0x0022,0xfff5
0a82 0024 fff4  | $  |		.CONST	0x0024,0xfff4
0a84 0026 fff3  | &  |		.CONST	0x0026,0xfff3
0a86 0029 fff2  | )  |		.CONST	0x0029,0xfff2
0a88 002c fff1  | ,  |		.CONST	0x002c,0xfff1
0a8a 002e fff0  | .  |		.CONST	0x002e,0xfff0
0a8c 0030 ffef  | 0  |		.CONST	0x0030,0xffef
0a8e 0032 ffee  | 2  |		.CONST	0x0032,0xffee
0a90 0034 ffed  | 4  |		.CONST	0x0034,0xffed
0a92 0035 ffec  | 5  |		.CONST	0x0035,0xffec
0a94 0036 ffeb  | 6  |		.CONST	0x0036,0xffeb
0a96 0037 ffea  | 7  |		.CONST	0x0037,0xffea
0a98 0038 ffe9  | 8  |		.CONST	0x0038,0xffe9
0a9a 0039 ffe8  | 9  |		.CONST	0x0039,0xffe8
0a9c 003a ffe7  | :  |		.CONST	0x003a,0xffe7
0a9e 003b ffe6  | ;  |		.CONST	0x003b,0xffe6
0aa0 003c ffe5  | <  |		.CONST	0x003c,0xffe5
0aa2 003d ffe4  | =  |		.CONST	0x003d,0xffe4
0aa4 003e ffe3  | >  |		.CONST	0x003e,0xffe3
0aa6 003f ffe2  | ?  |		.CONST	0x003f,0xffe2
0aa8 0040 ffe1  | @  |		.CONST	0x0040,0xffe1
0aaa 0041 ffe0  | A  |		.CONST	0x0041,0xffe0
0aac 0042 ffdf  | B  |		.CONST	0x0042,0xffdf
0aae 0043 ffde  | C  |		.CONST	0x0043,0xffde
0ab0 0044 ffdd  | D  |		.CONST	0x0044,0xffdd
0ab2 0045 ffdc  | E  |		.CONST	0x0045,0xffdc
0ab4 0046 ffdb  | F  |		.CONST	0x0046,0xffdb
0ab6 0047 ffda  | G  |		.CONST	0x0047,0xffda
0ab8 0048 ffd9  | H  |		.CONST	0x0048,0xffd9
0aba 0049 ffd8  | I  |		.CONST	0x0049,0xffd8
0abc 004a ffd7  | J  |		.CONST	0x004a,0xffd7
0abe 004b ffd6  | K  |		.CONST	0x004b,0xffd6
0ac0 004c ffd5  | L  |		.CONST	0x004c,0xffd5
0ac2 004d ffd4  | M  |		.CONST	0x004d,0xffd4
0ac4 004e ffd3  | N  |		.CONST	0x004e,0xffd3
0ac6 004f ffd2  | O  |		.CONST	0x004f,0xffd2
0ac8 0050 ffd1  | P  |		.CONST	0x0050,0xffd1
0aca 0051 ffd0  | Q  |		.CONST	0x0051,0xffd0
0acc 0052 ffcf  | R  |		.CONST	0x0052,0xffcf
0ace 0053 ffce  | S  |		.CONST	0x0053,0xffce
0ad0 0054 ffcd  | T  |		.CONST	0x0054,0xffcd
0ad2 0055 ffcc  | U  |		.CONST	0x0055,0xffcc
0ad4 0056 ffcb  | V  |		.CONST	0x0056,0xffcb
0ad6 0057 ffca  | W  |		.CONST	0x0057,0xffca
0ad8 0058 ffc9  | X  |		.CONST	0x0058,0xffc9
0ada 0059 ffc8  | Y  |		.CONST	0x0059,0xffc8
0adc 005a ffc7  | Z  |		.CONST	0x005a,0xffc7
0ade 005b ffc6  | [  |		.CONST	0x005b,0xffc6
0ae0 005c ffc5  | \  |		.CONST	0x005c,0xffc5
0ae2 005d ffc4  | ]  |		.CONST	0x005d,0xffc4
0ae4 005e ffc3  | ^  |		.CONST	0x005e,0xffc3
0ae6 005f ffc2  | _  |		.CONST	0x005f,0xffc2
0ae8 0060 ffc1  | `  |		.CONST	0x0060,0xffc1
0aea 0061 ffc0  | a  |		.CONST	0x0061,0xffc0
0aec 0062 ffbf  | b  |		.CONST	0x0062,0xffbf
0aee 0063 ffbe  | c  |		.CONST	0x0063,0xffbe
0af0 0064 ffbd  | d  |		.CONST	0x0064,0xffbd
0af2 0065 ffbc  | e  |		.CONST	0x0065,0xffbc
0af4 0066 ffbb  | f  |		.CONST	0x0066,0xffbb
0af6 0067 ffba  | g  |		.CONST	0x0067,0xffba
0af8 0068 ffb9  | h  |		.CONST	0x0068,0xffb9
0afa 0069 ffb8  | i  |		.CONST	0x0069,0xffb8
0afc 006a ffb7  | j  |		.CONST	0x006a,0xffb7
0afe 006b ffb6  | k  |		.CONST	0x006b,0xffb6
0b00 006c ffb5  | l  |		.CONST	0x006c,0xffb5
0b02 006d ffb4  | m  |		.CONST	0x006d,0xffb4
0b04 006e ffb3  | n  |		.CONST	0x006e,0xffb3
0b06 006f ffb2  | o  |		.CONST	0x006f,0xffb2
0b08 0070 ffb1  | p  |		.CONST	0x0070,0xffb1
0b0a 0071 ffb0  | q  |		.CONST	0x0071,0xffb0
0b0c 0072 ffaf  | r  |		.CONST	0x0072,0xffaf
0b0e 0073 ffae  | s  |		.CONST	0x0073,0xffae
0b10 0074 ffad  | t  |		.CONST	0x0074,0xffad
0b12 0075 ffac  | u  |		.CONST	0x0075,0xffac
0b14 0076 ffab  | v  |		.CONST	0x0076,0xffab
0b16 0077 ffaa  | w  |		.CONST	0x0077,0xffaa
0b18 0078 ffa9  | x  |		.CONST	0x0078,0xffa9
0b1a 0079 ffa8  | y  |		.CONST	0x0079,0xffa8
0b1c 007a ffa7  | z  |		.CONST	0x007a,0xffa7
0b1e 007b ffa6  | {  |		.CONST	0x007b,0xffa6
0b20 007c ffa5  | |  |		.CONST	0x007c,0xffa5
0b22 007d ffa4  | }  |		.CONST	0x007d,0xffa4
0b24 007e ffa3  | ~  |		.CONST	0x007e,0xffa3
0b26 007f ffa2  |    |		.CONST	0x007f,0xffa2
0b28 0080 ffa1  |    |		.CONST	0x0080,0xffa1
0b2a 0081 ffa0  |    |		.CONST	0x0081,0xffa0
0b2c 0082 ff9f  |    |		.CONST	0x0082,0xff9f
0b2e 0083 ff9e  |    |		.CONST	0x0083,0xff9e
0b30 0084 ff9d  |    |		.CONST	0x0084,0xff9d
0b32 0085 ff9c  |    |		.CONST	0x0085,0xff9c
0b34 ; --------------------------------------------------------------------------------------
0b34 ; Debug3 Subtable 0x1
0b34 ; --------------------------------------------------------------------------------------
0b34 000b 0000  |    |		.DBG3TAB	0x000b,0x0000
0b36 0086 ffff  |    |		.CONST	0x0086,0xffff
0b38 0088 fffe  |    |		.CONST	0x0088,0xfffe
0b3a 008a fffd  |    |		.CONST	0x008a,0xfffd
0b3c 008f fffc  |    |		.CONST	0x008f,0xfffc
0b3e 0095 fffb  |    |		.CONST	0x0095,0xfffb
0b40 011c fffa  |    |		.CONST	0x011c,0xfffa
0b42 011e fff9  |    |		.CONST	0x011e,0xfff9
0b44 0120 fff8  |    |		.CONST	0x0120,0xfff8
0b46 0122 fff7  | "  |		.CONST	0x0122,0xfff7
0b48 0124 fff6  | $  |		.CONST	0x0124,0xfff6
0b4a 0126 fff5  | &  |		.CONST	0x0126,0xfff5
0b4c ; --------------------------------------------------------------------------------------
0b4c ; Debug3 Subtable 0x2
0b4c ; --------------------------------------------------------------------------------------
0b4c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0b4e 0133 0001  | 3  |		.CONST	0x0133,0x0001
0b50 ; --------------------------------------------------------------------------------------
0b50 ; Debug3 Subtable 0x3
0b50 ; --------------------------------------------------------------------------------------
0b50 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0b52 0143 0001  | C  |		.CONST	0x0143,0x0001
0b54 ; --------------------------------------------------------------------------------------
0b54 ; Debug3 Subtable 0x4
0b54 ; --------------------------------------------------------------------------------------
0b54 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0b56 0153 0001  | S  |		.CONST	0x0153,0x0001
0b58 ; --------------------------------------------------------------------------------------
0b58 ; Debug3 Subtable 0x5
0b58 ; --------------------------------------------------------------------------------------
0b58 0000 0055  |   U|		.DBG3TAB	0x0000,0x0055
0b5a 0163 0001  | c  |		.CONST	0x0163,0x0001
0b5c 0165 0002  | e  |		.CONST	0x0165,0x0002
0b5e 01e7 0003  |    |		.CONST	0x01e7,0x0003
0b60 01ea 0004  |    |		.CONST	0x01ea,0x0004
0b62 01ed 0005  |    |		.CONST	0x01ed,0x0005
0b64 01f0 0006  |    |		.CONST	0x01f0,0x0006
0b66 01f3 0007  |    |		.CONST	0x01f3,0x0007
0b68 01f6 0008  |    |		.CONST	0x01f6,0x0008
0b6a 01f9 0009  |    |		.CONST	0x01f9,0x0009
0b6c 01fc 000a  |    |		.CONST	0x01fc,0x000a
0b6e 01ff 000b  |    |		.CONST	0x01ff,0x000b
0b70 0202 000c  |    |		.CONST	0x0202,0x000c
0b72 0205 000d  |    |		.CONST	0x0205,0x000d
0b74 0208 000e  |    |		.CONST	0x0208,0x000e
0b76 020b 000f  |    |		.CONST	0x020b,0x000f
0b78 020e 0010  |    |		.CONST	0x020e,0x0010
0b7a 0211 0011  |    |		.CONST	0x0211,0x0011
0b7c 0214 0012  |    |		.CONST	0x0214,0x0012
0b7e 0217 0013  |    |		.CONST	0x0217,0x0013
0b80 021a 0014  |    |		.CONST	0x021a,0x0014
0b82 021d 0015  |    |		.CONST	0x021d,0x0015
0b84 0220 0016  |    |		.CONST	0x0220,0x0016
0b86 0223 0017  | #  |		.CONST	0x0223,0x0017
0b88 0226 0018  | &  |		.CONST	0x0226,0x0018
0b8a 0229 0019  | )  |		.CONST	0x0229,0x0019
0b8c 022c 001a  | ,  |		.CONST	0x022c,0x001a
0b8e 022f 001b  | /  |		.CONST	0x022f,0x001b
0b90 0232 001c  | 2  |		.CONST	0x0232,0x001c
0b92 0235 001d  | 5  |		.CONST	0x0235,0x001d
0b94 0238 001e  | 8  |		.CONST	0x0238,0x001e
0b96 023b 001f  | ;  |		.CONST	0x023b,0x001f
0b98 023e 0020  | >  |		.CONST	0x023e,0x0020
0b9a 0241 0021  | A !|		.CONST	0x0241,0x0021
0b9c 0244 0022  | D "|		.CONST	0x0244,0x0022
0b9e 0247 0023  | G #|		.CONST	0x0247,0x0023
0ba0 024a 0024  | J $|		.CONST	0x024a,0x0024
0ba2 024d 0025  | M %|		.CONST	0x024d,0x0025
0ba4 0250 0026  | P &|		.CONST	0x0250,0x0026
0ba6 0253 0027  | S '|		.CONST	0x0253,0x0027
0ba8 0256 0028  | V (|		.CONST	0x0256,0x0028
0baa 0259 0029  | Y )|		.CONST	0x0259,0x0029
0bac 025c 002a  | \ *|		.CONST	0x025c,0x002a
0bae 025f 002b  | _ +|		.CONST	0x025f,0x002b
0bb0 0262 002c  | b ,|		.CONST	0x0262,0x002c
0bb2 0265 002d  | e -|		.CONST	0x0265,0x002d
0bb4 0268 002e  | h .|		.CONST	0x0268,0x002e
0bb6 026b 002f  | k /|		.CONST	0x026b,0x002f
0bb8 026e 0030  | n 0|		.CONST	0x026e,0x0030
0bba 0271 0031  | q 1|		.CONST	0x0271,0x0031
0bbc 0274 0032  | t 2|		.CONST	0x0274,0x0032
0bbe 0277 0033  | w 3|		.CONST	0x0277,0x0033
0bc0 027a 0034  | z 4|		.CONST	0x027a,0x0034
0bc2 027d 0035  | } 5|		.CONST	0x027d,0x0035
0bc4 0280 0036  |   6|		.CONST	0x0280,0x0036
0bc6 0283 0037  |   7|		.CONST	0x0283,0x0037
0bc8 0286 0038  |   8|		.CONST	0x0286,0x0038
0bca 0289 0039  |   9|		.CONST	0x0289,0x0039
0bcc 028c 003a  |   :|		.CONST	0x028c,0x003a
0bce 028f 003b  |   ;|		.CONST	0x028f,0x003b
0bd0 0292 003c  |   <|		.CONST	0x0292,0x003c
0bd2 0295 003d  |   =|		.CONST	0x0295,0x003d
0bd4 0298 003e  |   >|		.CONST	0x0298,0x003e
0bd6 029b 003f  |   ?|		.CONST	0x029b,0x003f
0bd8 029e 0040  |   @|		.CONST	0x029e,0x0040
0bda 02a1 0041  |   A|		.CONST	0x02a1,0x0041
0bdc 02a4 0042  |   B|		.CONST	0x02a4,0x0042
0bde 02a7 0043  |   C|		.CONST	0x02a7,0x0043
0be0 02aa 0044  |   D|		.CONST	0x02aa,0x0044
0be2 02ad 0045  |   E|		.CONST	0x02ad,0x0045
0be4 02b0 0046  |   F|		.CONST	0x02b0,0x0046
0be6 02b3 0047  |   G|		.CONST	0x02b3,0x0047
0be8 02b6 0048  |   H|		.CONST	0x02b6,0x0048
0bea 02b9 0049  |   I|		.CONST	0x02b9,0x0049
0bec 02bc 004a  |   J|		.CONST	0x02bc,0x004a
0bee 02bf 004b  |   K|		.CONST	0x02bf,0x004b
0bf0 02c2 004c  |   L|		.CONST	0x02c2,0x004c
0bf2 02c5 004d  |   M|		.CONST	0x02c5,0x004d
0bf4 02c8 004e  |   N|		.CONST	0x02c8,0x004e
0bf6 02cb 004f  |   O|		.CONST	0x02cb,0x004f
0bf8 02ce 0050  |   P|		.CONST	0x02ce,0x0050
0bfa 02d1 0051  |   Q|		.CONST	0x02d1,0x0051
0bfc 02d4 0052  |   R|		.CONST	0x02d4,0x0052
0bfe 02d7 0053  |   S|		.CONST	0x02d7,0x0053
0c00 02da 0054  |   T|		.CONST	0x02da,0x0054
0c02 02e4 0055  |   U|		.CONST	0x02e4,0x0055
0c04 ; --------------------------------------------------------------------------------------
0c04 ; Debug3 Subtable 0x6
0c04 ; --------------------------------------------------------------------------------------
0c04 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0c06 0303 0001  |    |		.CONST	0x0303,0x0001
0c08 030b 0002  |    |		.CONST	0x030b,0x0002
0c0a ; --------------------------------------------------------------------------------------
0c0a ; Debug3 Subtable 0x7
0c0a ; --------------------------------------------------------------------------------------
0c0a 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0c0c 0313 0001  |    |		.CONST	0x0313,0x0001
0c0e 0315 0002  |    |		.CONST	0x0315,0x0002
0c10 031a 0003  |    |		.CONST	0x031a,0x0003
0c12 ; --------------------------------------------------------------------------------------
0c12 ; Debug3 Subtable 0x8
0c12 ; --------------------------------------------------------------------------------------
0c12 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0c14 0000 0000  |    |		.BLANK	0000[0x1ec]