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

⟦f1edf3383⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_063cfc

Derivation

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

Disassembly

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 06b0       |    |		.CONST	0x06b0								; 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 8003       |    |		.CONST	0x8003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0058       | X  |		.CONST	0x0058								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0025       | %  |		.CONST	0x0025								; Number of locals
000b			INIT_0008:
000b 029a 0063  |   c|		Declare_Subprogram	INIT_0060,For_Outer_Call,Visible,Unelaborated
000d 00c4       |    |		Action	Make_Default
000e 00c4       |    |		Action	Make_Default
000f 00c4       |    |		Action	Make_Default
0010 00c4       |    |		Action	Make_Default
0011 00c4       |    |		Action	Make_Default
0012 00c4       |    |		Action	Make_Default
0013 00c4       |    |		Action	Make_Default
0014 00c4       |    |		Action	Make_Default
0015 00c4       |    |		Action	Make_Default
0016 00c4       |    |		Action	Make_Default
0017 00c4       |    |		Action	Make_Default
0018 00c4       |    |		Action	Make_Default
0019 00c4       |    |		Action	Make_Default
001a 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated
001c c215       |    |		Store	0x1,0x15
001d 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated
001f c21a       |    |		Store	0x1,0x1a
0020 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated
0022 c21b       |    |		Store	0x1,0x1b
0023 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated
0025 c21c       |    |		Store	0x1,0x1c
0026 029a 015b  |   [|		Declare_Subprogram	INIT_0158,For_Outer_Call,Visible,Unelaborated
0028 c21d       |    |		Store	0x1,0x1d
0029 029a 018b  |    |		Declare_Subprogram	INIT_0188,For_Outer_Call,Visible,Unelaborated
002b c214       |    |		Store	0x1,0x14
002c 00bf       |    |		Action	Accept_Activation
002d e001       |    |		Load	0x0,0x1
002e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
002f 02c7       |    |		Declare_Variable	Any
0030 00d8       |    |		Load_Top	At_Offset_0
0031 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0032 e001       |    |		Load	0x0,0x1
0033 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0034 02c7       |    |		Declare_Variable	Any
0035 00d8       |    |		Load_Top	At_Offset_0
0036 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0037 e002       |    |		Load	0x0,0x2
0038 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0039 02c7       |    |		Declare_Variable	Any
003a 00d8       |    |		Load_Top	At_Offset_0
003b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
003c e003       |    |		Load	0x0,0x3
003d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
003e 02c7       |    |		Declare_Variable	Any
003f e003       |    |		Load	0x0,0x3
0040 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0041 a221       | !  |		Store_Unchecked	0x1,0x21
0042 029d 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call
0044 029d 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call
0046 029d 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Outer_Call
0048 029d 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call
004a 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
004d 00c7       |    |		Action	Elaborate_Subprogram
004e 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
004f 00c7       |    |		Action	Elaborate_Subprogram
0050 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
0051 00c7       |    |		Action	Elaborate_Subprogram
0052 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0053 00c7       |    |		Action	Elaborate_Subprogram
0054 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0055 00c7       |    |		Action	Elaborate_Subprogram
0056 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0057 00c7       |    |		Action	Elaborate_Subprogram
0058			BODY_0008:
0058 00be       |    |		Action	Activate_Tasks
0059 00bc       |    |		Action	Signal_Activated
005a 00bb       |    |		Action	Signal_Completion
005b 0000 0000  |    |		.BLANK	0000[0x5]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0065       | e  |		.CONST	0x0065								; Address of begin
0061 0088       |    |		.CONST	0x0088								; Address of exception handler
0062 0002       |    |		.CONST	0x0002								; Number of locals
0063			INIT_0060:
0063 e004       |    |		Load	0x0,0x4
0064 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0065			BODY_0060:
0065 00db       |    |		Load_Top	At_Offset_3
0066 c220       |    |		Store	0x1,0x20
0067 e005       |    |		Load	0x0,0x5
0068 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0069 e5fe       |    |		Load	0x2,-0x2
006a e21e       |    |		Load	0x1,0x1e
006b 4801       |H   |		Short_Literal	0x1
006c 601f       |`   |		Indirect_Literal	Discrete,0x8c,{0x00000000, 0x00028000}
006d e003       |    |		Load	0x0,0x3
006e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
006f 4800       |H   |		Short_Literal	0x0
0070 e005       |    |		Load	0x0,0x5
0071 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0072 c21e       |    |		Store	0x1,0x1e
0073 c5fe       |    |		Store	0x2,-0x2
0074 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0075 e005       |    |		Load	0x0,0x5
0076 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0077 e21f       |    |		Load	0x1,0x1f
0078 4801       |H   |		Short_Literal	0x1
0079 6012       |`   |		Indirect_Literal	Discrete,0x8c,{0x00000000, 0x00028000}
007a e003       |    |		Load	0x0,0x3
007b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
007c e006       |    |		Load	0x0,0x6
007d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
007e e005       |    |		Load	0x0,0x5
007f 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0080 4800       |H   |		Short_Literal	0x0
0081 8224       | $  |		Call	0x1,0x24
0082 4800       |H   |		Short_Literal	0x0
0083 e005       |    |		Load	0x0,0x5
0084 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0085 c21f       |    |		Store	0x1,0x1f
0086 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0087 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0088			TRAP_0060:
0088 0007       |    |		Action	Break_Optional
0089 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
008a 0000 0000  |    |		.XXX[0x2]
008c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00028000}
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 009a       |    |		.CONST	0x009a								; Address of begin
0091 00bd       |    |		.CONST	0x00bd								; Address of exception handler
0092 0003       |    |		.CONST	0x0003								; Number of locals
0093			INIT_0090:
0093 e007       |    |		Load	0x0,0x7
0094 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0095 02c7       |    |		Declare_Variable	Any
0096 00d8       |    |		Load_Top	At_Offset_0
0097 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0098 e004       |    |		Load	0x0,0x4
0099 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
009a			BODY_0090:
009a 00d9       |    |		Load_Top	At_Offset_1
009b e220       |    |		Load	0x1,0x20
009c 0120       |    |		Execute	Any,Is_Value
009d 6803       |h   |		Jump_Zero	0xa1
009e e002       |    |		Load	0x0,0x2
009f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00a0 7801       |x   |		Jump	0xa2
00a1 e220       |    |		Load	0x1,0x20
00a2 0092 02d8  |    |		Action	Push_String_Extended,0x2d8					; " "
00a4 e002       |    |		Load	0x0,0x2
00a5 184c       | L  |		Execute	Package,Field_Execute,Field_Number 0x4c
00a6 c220       |    |		Store	0x1,0x20
00a7 c402       |    |		Store	0x2,0x2
00a8 e5ff       |    |		Load	0x2,-0x1
00a9 c221       | !  |		Store	0x1,0x21
00aa e005       |    |		Load	0x0,0x5
00ab 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
00ac e21f       |    |		Load	0x1,0x1f
00ad 4801       |H   |		Short_Literal	0x1
00ae 67dd       |g   |		Indirect_Literal	Discrete,0x8c,{0x00000000, 0x00028000}
00af e003       |    |		Load	0x0,0x3
00b0 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00b1 e006       |    |		Load	0x0,0x6
00b2 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00b3 e005       |    |		Load	0x0,0x5
00b4 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
00b5 4800       |H   |		Short_Literal	0x0
00b6 8224       | $  |		Call	0x1,0x24
00b7 4800       |H   |		Short_Literal	0x0
00b8 e005       |    |		Load	0x0,0x5
00b9 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
00ba c21f       |    |		Store	0x1,0x1f
00bb 0059       | Y  |		Store_Top	Discrete,At_Offset_1
00bc 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00bd			TRAP_0090:
00bd 0007       |    |		Action	Break_Optional
00be 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00bf 0000       |    |		.XXX[0x1]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c7       |    |		.CONST	0x00c7								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0003       |    |		.CONST	0x0003								; Number of locals
00c3			INIT_00c0:
00c3 029f 0203  |    |		Declare_Subprogram	INIT_0200,For_Call
00c5 029f 021b  |    |		Declare_Subprogram	INIT_0218,For_Call
00c7			BODY_00c0:
00c7 e5ff       |    |		Load	0x2,-0x1
00c8 01db       |    |		Execute	Vector,Length
00c9 6813       |h   |		Jump_Zero	0xdd
00ca 4801       |H   |		Short_Literal	0x1
00cb 0092 02d9  |    |		Action	Push_String_Extended,0x2d9					; "<default>"
00cd e5ff       |    |		Load	0x2,-0x1
00ce e008       |    |		Load	0x0,0x8
00cf 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
00d0 700c       |p   |		Jump_Nonzero	0xdd
00d1 0092 02da  |    |		Action	Push_String_Extended,0x2da					; "Remote_Machine has been specified in the command"
00d3 8222       | "  |		Call	0x1,0x22
00d4 0092 02db  |    |		Action	Push_String_Extended,0x2db					; "Remote_Machine =>"
00d6 e5ff       |    |		Load	0x2,-0x1
00d7 01cc       |    |		Execute	Vector,Catenate
00d8 8222       | "  |		Call	0x1,0x22
00d9 e5ff       |    |		Load	0x2,-0x1
00da 0335       | 5  |		Declare_Variable	Array,Duplicate
00db 00cd       |    |		Action	Spare6_Action
00dc 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
00dd e5fe       |    |		Load	0x2,-0x2
00de 6803       |h   |		Jump_Zero	0xe2
00df 0092 02dc  |    |		Action	Push_String_Extended,0x2dc					; "Remote_Machine has not been specified in the command."
00e1 8222       | "  |		Call	0x1,0x22
00e2 8402       |    |		Call	0x2,0x2
00e3 0092 02dd  |    |		Action	Push_String_Extended,0x2dd					; "Unable to obtain Remote_Machine from the library switches"
00e5 8222       | "  |		Call	0x1,0x22
00e6 8403       |    |		Call	0x2,0x3
00e7 0092 02de  |    |		Action	Push_String_Extended,0x2de					; "Unable to obtain Remote_Machine from the Session_Switches"
00e9 8222       | "  |		Call	0x1,0x22
00ea 00ea       |    |		Load_Encached	Null_String_Cache
00eb 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
00ec 0000 0000  |    |		.BLANK	0000[0x4]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f9       |    |		.CONST	0x00f9								; Address of begin
00f1 011c       |    |		.CONST	0x011c								; Address of exception handler
00f2 0004       |    |		.CONST	0x0004								; Number of locals
00f3			INIT_00f0:
00f3 029f 0233  |   3|		Declare_Subprogram	INIT_0230,For_Call
00f5 029f 024b  |   K|		Declare_Subprogram	INIT_0248,For_Call
00f7 029f 0263  |   c|		Declare_Subprogram	INIT_0260,For_Call
00f9			BODY_00f0:
00f9 e5ff       |    |		Load	0x2,-0x1
00fa 01db       |    |		Execute	Vector,Length
00fb 6813       |h   |		Jump_Zero	0x10f
00fc 4801       |H   |		Short_Literal	0x1
00fd 0092 02d9  |    |		Action	Push_String_Extended,0x2d9					; "<default>"
00ff e5ff       |    |		Load	0x2,-0x1
0100 e008       |    |		Load	0x0,0x8
0101 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0102 700c       |p   |		Jump_Nonzero	0x10f
0103 0092 02df  |    |		Action	Push_String_Extended,0x2df					; "Remote_Username has been specified in the command"
0105 8222       | "  |		Call	0x1,0x22
0106 0092 02e0  |    |		Action	Push_String_Extended,0x2e0					; "Remote_Username =>"
0108 e5ff       |    |		Load	0x2,-0x1
0109 01cc       |    |		Execute	Vector,Catenate
010a 8222       | "  |		Call	0x1,0x22
010b e5ff       |    |		Load	0x2,-0x1
010c 0335       | 5  |		Declare_Variable	Array,Duplicate
010d 00cd       |    |		Action	Spare6_Action
010e 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
010f 0092 02e1  |    |		Action	Push_String_Extended,0x2e1					; "Remote_Username has not been specified in the command."
0111 8222       | "  |		Call	0x1,0x22
0112 8402       |    |		Call	0x2,0x2
0113 0092 02e2  |    |		Action	Push_String_Extended,0x2e2					; "Unable to obtain Remote_Username from the library switches"
0115 8222       | "  |		Call	0x1,0x22
0116 8403       |    |		Call	0x2,0x3
0117 0092 02e3  |    |		Action	Push_String_Extended,0x2e3					; "Unable to obtain Remote_Username using Rpc_Access_Utiliites"
0119 8222       | "  |		Call	0x1,0x22
011a 8404       |    |		Call	0x2,0x4
011b 0831       | 1  |		Execute_Immediate	Raise,0x31
011c			TRAP_00f0:
011c 0007       |    |		Action	Break_Optional
011d 00ea       |    |		Load_Encached	Null_String_Cache
011e 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
011f 0000       |    |		.XXX[0x1]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0127       | '  |		.CONST	0x0127								; Address of begin
0121 014f       | O  |		.CONST	0x014f								; Address of exception handler
0122 0003       |    |		.CONST	0x0003								; Number of locals
0123			INIT_0120:
0123 029f 027b  |   {|		Declare_Subprogram	INIT_0278,For_Call
0125 029f 0293  |    |		Declare_Subprogram	INIT_0290,For_Call
0127			BODY_0120:
0127 e5ff       |    |		Load	0x2,-0x1
0128 01db       |    |		Execute	Vector,Length
0129 6813       |h   |		Jump_Zero	0x13d
012a 4801       |H   |		Short_Literal	0x1
012b 0092 02d9  |    |		Action	Push_String_Extended,0x2d9					; "<default>"
012d e5ff       |    |		Load	0x2,-0x1
012e e008       |    |		Load	0x0,0x8
012f 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0130 700c       |p   |		Jump_Nonzero	0x13d
0131 0092 02e4  |    |		Action	Push_String_Extended,0x2e4					; "Remote_Password has been specified in the command"
0133 8222       | "  |		Call	0x1,0x22
0134 0092 02e5  |    |		Action	Push_String_Extended,0x2e5					; "Remote_Password =>"
0136 e5ff       |    |		Load	0x2,-0x1
0137 01cc       |    |		Execute	Vector,Catenate
0138 8222       | "  |		Call	0x1,0x22
0139 e5ff       |    |		Load	0x2,-0x1
013a 0335       | 5  |		Declare_Variable	Array,Duplicate
013b 00cd       |    |		Action	Spare6_Action
013c 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
013d e5fd       |    |		Load	0x2,-0x3
013e 6803       |h   |		Jump_Zero	0x142
013f 0092 02e6  |    |		Action	Push_String_Extended,0x2e6					; "Remote_Password has not been specified in the command."
0141 8222       | "  |		Call	0x1,0x22
0142 8402       |    |		Call	0x2,0x2
0143 0092 02e7  |    |		Action	Push_String_Extended,0x2e7					; "Unable to obtain Remotes_Password from the library switches"
0145 8222       | "  |		Call	0x1,0x22
0146 8403       |    |		Call	0x2,0x3
0147 0092 02e8  |    |		Action	Push_String_Extended,0x2e8					; "Unable to obtain Remote_Password using Rpc_Access_Utiliites"
0149 8222       | "  |		Call	0x1,0x22
014a 0092 02e9  |    |		Action	Push_String_Extended,0x2e9					; "Remote_Password is assumed to be the null string"
014c 8222       | "  |		Call	0x1,0x22
014d 00ea       |    |		Load_Encached	Null_String_Cache
014e 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
014f			TRAP_0120:
014f 0007       |    |		Action	Break_Optional
0150 00ea       |    |		Load_Encached	Null_String_Cache
0151 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0152 0000 0000  |    |		.BLANK	0000[0x6]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015f       | _  |		.CONST	0x015f								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0003       |    |		.CONST	0x0003								; Number of locals
015b			INIT_0158:
015b 029f 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Call
015d 029f 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Call
015f			BODY_0158:
015f e5ff       |    |		Load	0x2,-0x1
0160 01db       |    |		Execute	Vector,Length
0161 6813       |h   |		Jump_Zero	0x175
0162 4801       |H   |		Short_Literal	0x1
0163 0092 02d9  |    |		Action	Push_String_Extended,0x2d9					; "<default>"
0165 e5ff       |    |		Load	0x2,-0x1
0166 e008       |    |		Load	0x0,0x8
0167 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0168 700c       |p   |		Jump_Nonzero	0x175
0169 0092 02ea  |    |		Action	Push_String_Extended,0x2ea					; "Remote_Directory has been specified in the command"
016b 8222       | "  |		Call	0x1,0x22
016c 0092 02eb  |    |		Action	Push_String_Extended,0x2eb					; "Remote_Directory =>"
016e e5ff       |    |		Load	0x2,-0x1
016f 01cc       |    |		Execute	Vector,Catenate
0170 8222       | "  |		Call	0x1,0x22
0171 e5ff       |    |		Load	0x2,-0x1
0172 0335       | 5  |		Declare_Variable	Array,Duplicate
0173 00cd       |    |		Action	Spare6_Action
0174 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0175 e5fe       |    |		Load	0x2,-0x2
0176 6803       |h   |		Jump_Zero	0x17a
0177 0092 02ec  |    |		Action	Push_String_Extended,0x2ec					; "Remote_Directory has not been specified in the command."
0179 8222       | "  |		Call	0x1,0x22
017a 8402       |    |		Call	0x2,0x2
017b 0092 02ed  |    |		Action	Push_String_Extended,0x2ed					; "Unable to obtain Remote_Directory from the library switches"
017d 8222       | "  |		Call	0x1,0x22
017e 8403       |    |		Call	0x2,0x3
017f 0092 02ee  |    |		Action	Push_String_Extended,0x2ee					; "Unable to obtain Remote_Directory from the Session_Switches"
0181 8222       | "  |		Call	0x1,0x22
0182 0092 02ef  |    |		Action	Push_String_Extended,0x2ef					; "Remote_Directory will default to the remote user's home directory on the remote machine"
0184 8222       | "  |		Call	0x1,0x22
0185 00ea       |    |		Load_Encached	Null_String_Cache
0186 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0187 0000       |    |		.XXX[0x1]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018d       |    |		.CONST	0x018d								; Address of begin
0189 019c       |    |		.CONST	0x019c								; Address of exception handler
018a 0002       |    |		.CONST	0x0002								; Number of locals
018b			INIT_0188:
018b e004       |    |		Load	0x0,0x4
018c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
018d			BODY_0188:
018d e005       |    |		Load	0x0,0x5
018e 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
018f e21e       |    |		Load	0x1,0x1e
0190 e005       |    |		Load	0x0,0x5
0191 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0192 c21e       |    |		Store	0x1,0x1e
0193 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0194 e005       |    |		Load	0x0,0x5
0195 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0196 e21f       |    |		Load	0x1,0x1f
0197 e005       |    |		Load	0x0,0x5
0198 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0199 c21f       |    |		Store	0x1,0x1f
019a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
019b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
019c			TRAP_0188:
019c 0007       |    |		Action	Break_Optional
019d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
019e 0000 0000  |    |		.XXX[0x2]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3       |    |		.CONST	0x01a3								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0001       |    |		.CONST	0x0001								; Number of locals
01a3			BODY_01a0:
01a3			INIT_01a0:
01a3 e220       |    |		Load	0x1,0x20
01a4 00db       |    |		Load_Top	At_Offset_3
01a5 820f       |    |		Call	0x1,0xf
01a6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01a7 0000       |    |		.XXX[0x1]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab       |    |		.CONST	0x01ab								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0001       |    |		.CONST	0x0001								; Number of locals
01ab			BODY_01a8:
01ab			INIT_01a8:
01ab 00da       |    |		Load_Top	At_Offset_2
01ac 01db       |    |		Execute	Vector,Length
01ad 0d10       |    |		Execute_Immediate	Less,0x10
01ae 6802       |h   |		Jump_Zero	0x1b1
01af 00da       |    |		Load_Top	At_Offset_2
01b0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01b1 00da       |    |		Load_Top	At_Offset_2
01b2 01dd       |    |		Execute	Vector,First
01b3 00db       |    |		Load_Top	At_Offset_3
01b4 01dd       |    |		Execute	Vector,First
01b5 0a0e       |    |		Execute_Immediate	Plus,0xe
01b6 00d8       |    |		Load_Top	At_Offset_0
01b7 00e2       |    |		Load_Encached	Integer_Cache
01b8 0260       | `  |		Execute	Discrete,In_Type
01b9 7001       |p   |		Jump_Nonzero	0x1bb
01ba 0801       |    |		Execute_Immediate	Raise,0x1
01bb e5ff       |    |		Load	0x2,-0x1
01bc 01cf       |    |		Execute	Vector,Slice_Read
01bd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01be 0000 0000  |    |		.XXX[0x2]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3       |    |		.CONST	0x01c3								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0001       |    |		.CONST	0x0001								; Number of locals
01c3			BODY_01c0:
01c3			INIT_01c0:
01c3 e009       |    |		Load	0x0,0x9
01c4 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
01c5 e009       |    |		Load	0x0,0x9
01c6 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01c7 e004       |    |		Load	0x0,0x4
01c8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01c9 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
01ca 0092 02f0  |    |		Action	Push_String_Extended,0x2f0					; "_SWITCHES"
01cc 01cc       |    |		Execute	Vector,Catenate
01cd 00ca       |    |		Action	Exit_Nullary_Function
01ce 0000 0000  |    |		.XXX[0x2]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 01f3       |    |		.CONST	0x01f3								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 00da       |    |		Load_Top	At_Offset_2
01d4 e005       |    |		Load	0x0,0x5
01d5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01d6 6810       |h   |		Jump_Zero	0x1e7
01d7 6020       |`   |		Indirect_Literal	Discrete,0x1f8,{0x00000000, 0x00028000}
01d8 e221       | !  |		Load	0x1,0x21
01d9 e5fe       |    |		Load	0x2,-0x2
01da e5fd       |    |		Load	0x2,-0x3
01db e001       |    |		Load	0x0,0x1
01dc 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
01dd 6807       |h   |		Jump_Zero	0x1e5
01de 6019       |`   |		Indirect_Literal	Discrete,0x1f8,{0x00000000, 0x00028000}
01df e221       | !  |		Load	0x1,0x21
01e0 e5fe       |    |		Load	0x2,-0x2
01e1 e5fd       |    |		Load	0x2,-0x3
01e2 e001       |    |		Load	0x0,0x1
01e3 1846       | F  |		Execute	Package,Field_Execute,Field_Number 0x46
01e4 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01e5 00ea       |    |		Load_Encached	Null_String_Cache
01e6 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01e7 00db       |    |		Load_Top	At_Offset_3
01e8 00db       |    |		Load_Top	At_Offset_3
01e9 e001       |    |		Load	0x0,0x1
01ea 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
01eb 6805       |h   |		Jump_Zero	0x1f1
01ec 00db       |    |		Load_Top	At_Offset_3
01ed 00db       |    |		Load_Top	At_Offset_3
01ee e001       |    |		Load	0x0,0x1
01ef 1847       | G  |		Execute	Package,Field_Execute,Field_Number 0x47
01f0 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01f1 00ea       |    |		Load_Encached	Null_String_Cache
01f2 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01f3			TRAP_01d0:
01f3 0007       |    |		Action	Break_Optional
01f4 00ea       |    |		Load_Encached	Null_String_Cache
01f5 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01f6 0000 0000  |    |		.XXX[0x2]
01f8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00028000}
01fc 0000 0000  |    |		.BLANK	0000[0x4]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0208       |    |		.CONST	0x0208								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0002       |    |		.CONST	0x0002								; Number of locals
0203			INIT_0200:
0203 e5fd       |    |		Load	0x2,-0x3
0204 0092 02f1  |    |		Action	Push_String_Extended,0x2f1					; "Ftp.Remote_Machine"
0206 e21e       |    |		Load	0x1,0x1e
0207 8225       | %  |		Call	0x1,0x25
0208			BODY_0200:
0208 00d8       |    |		Load_Top	At_Offset_0
0209 01db       |    |		Execute	Vector,Length
020a 680b       |h   |		Jump_Zero	0x216
020b 0092 02f2  |    |		Action	Push_String_Extended,0x2f2					; "Remote_Machine obtained from the library switch Ftp.Remote_Machine"
020d 8222       | "  |		Call	0x1,0x22
020e 0092 02f3  |    |		Action	Push_String_Extended,0x2f3					; "Remote_Machine => "
0210 00d9       |    |		Load_Top	At_Offset_1
0211 01cc       |    |		Execute	Vector,Catenate
0212 8222       | "  |		Call	0x1,0x22
0213 00d8       |    |		Load_Top	At_Offset_0
0214 00cb       |    |		Action	Pop_Block_With_Result
0215 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0216 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0217 0000       |    |		.XXX[0x1]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0221       | !  |		.CONST	0x0221								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0002       |    |		.CONST	0x0002								; Number of locals
021b			INIT_0218:
021b e004       |    |		Load	0x0,0x4
021c 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
021d 0092 02f4  |    |		Action	Push_String_Extended,0x2f4					; "Session_Ftp.Remote_Machine"
021f e21f       |    |		Load	0x1,0x1f
0220 8225       | %  |		Call	0x1,0x25
0221			BODY_0218:
0221 00d8       |    |		Load_Top	At_Offset_0
0222 01db       |    |		Execute	Vector,Length
0223 680b       |h   |		Jump_Zero	0x22f
0224 0092 02f5  |    |		Action	Push_String_Extended,0x2f5					; "Remote_Machine obtained from the session switch Session_Ftp.Remote_Machine"
0226 8222       | "  |		Call	0x1,0x22
0227 0092 02f3  |    |		Action	Push_String_Extended,0x2f3					; "Remote_Machine => "
0229 00d9       |    |		Load_Top	At_Offset_1
022a 01cc       |    |		Execute	Vector,Catenate
022b 8222       | "  |		Call	0x1,0x22
022c 00d8       |    |		Load_Top	At_Offset_0
022d 00cb       |    |		Action	Pop_Block_With_Result
022e 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
022f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0238       | 8  |		.CONST	0x0238								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0002       |    |		.CONST	0x0002								; Number of locals
0233			INIT_0230:
0233 e5fc       |    |		Load	0x2,-0x4
0234 0092 02f6  |    |		Action	Push_String_Extended,0x2f6					; "Ftp.Username"
0236 e21e       |    |		Load	0x1,0x1e
0237 8225       | %  |		Call	0x1,0x25
0238			BODY_0230:
0238 00d8       |    |		Load_Top	At_Offset_0
0239 01db       |    |		Execute	Vector,Length
023a 680b       |h   |		Jump_Zero	0x246
023b 0092 02f7  |    |		Action	Push_String_Extended,0x2f7					; "Remote_Username obtained from the library switch Ftp.Username"
023d 8222       | "  |		Call	0x1,0x22
023e 0092 02f8  |    |		Action	Push_String_Extended,0x2f8					; "Remote_Username => "
0240 00d9       |    |		Load_Top	At_Offset_1
0241 01cc       |    |		Execute	Vector,Catenate
0242 8222       | "  |		Call	0x1,0x22
0243 00d8       |    |		Load_Top	At_Offset_0
0244 00cb       |    |		Action	Pop_Block_With_Result
0245 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0246 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0247 0000       |    |		.XXX[0x1]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024f       | O  |		.CONST	0x024f								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0002       |    |		.CONST	0x0002								; Number of locals
024b			INIT_0248:
024b e220       |    |		Load	0x1,0x20
024c e5fe       |    |		Load	0x2,-0x2
024d e00a       |    |		Load	0x0,0xa
024e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
024f			BODY_0248:
024f 00d8       |    |		Load_Top	At_Offset_0
0250 01db       |    |		Execute	Vector,Length
0251 680b       |h   |		Jump_Zero	0x25d
0252 0092 02f9  |    |		Action	Push_String_Extended,0x2f9					; "Remote_Username obtained using Rpc_Access_Utilities"
0254 8222       | "  |		Call	0x1,0x22
0255 0092 02f8  |    |		Action	Push_String_Extended,0x2f8					; "Remote_Username => "
0257 00d9       |    |		Load_Top	At_Offset_1
0258 01cc       |    |		Execute	Vector,Catenate
0259 8222       | "  |		Call	0x1,0x22
025a 00d8       |    |		Load_Top	At_Offset_0
025b 00cb       |    |		Action	Pop_Block_With_Result
025c 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
025d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
025e 0000 0000  |    |		.XXX[0x2]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 026a       | j  |		.CONST	0x026a								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0002       |    |		.CONST	0x0002								; Number of locals
0263			INIT_0260:
0263 e009       |    |		Load	0x0,0x9
0264 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0265 e009       |    |		Load	0x0,0x9
0266 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0267 e008       |    |		Load	0x0,0x8
0268 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0269 8223       | #  |		Call	0x1,0x23
026a			BODY_0260:
026a 0092 02fa  |    |		Action	Push_String_Extended,0x2fa					; "Remote_Username is assumed to be the same as Local_Username"
026c 8222       | "  |		Call	0x1,0x22
026d 0092 02f8  |    |		Action	Push_String_Extended,0x2f8					; "Remote_Username => "
026f 00d9       |    |		Load_Top	At_Offset_1
0270 01cc       |    |		Execute	Vector,Catenate
0271 8222       | "  |		Call	0x1,0x22
0272 00d8       |    |		Load_Top	At_Offset_0
0273 00cb       |    |		Action	Pop_Block_With_Result
0274 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0275 0000 0000  |    |		.XXX[0x3]
0277 0000       |    |
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0280       |    |		.CONST	0x0280								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0002       |    |		.CONST	0x0002								; Number of locals
027b			INIT_0278:
027b e5fc       |    |		Load	0x2,-0x4
027c 0092 02fb  |    |		Action	Push_String_Extended,0x2fb					; "Ftp.Password"
027e e21e       |    |		Load	0x1,0x1e
027f 8225       | %  |		Call	0x1,0x25
0280			BODY_0278:
0280 00d8       |    |		Load_Top	At_Offset_0
0281 01db       |    |		Execute	Vector,Length
0282 680b       |h   |		Jump_Zero	0x28e
0283 0092 02fc  |    |		Action	Push_String_Extended,0x2fc					; "Remote_Password obtained from the library switch Ftp.Password"
0285 8222       | "  |		Call	0x1,0x22
0286 0092 02fd  |    |		Action	Push_String_Extended,0x2fd					; "Remote_Password => "
0288 00d9       |    |		Load_Top	At_Offset_1
0289 01cc       |    |		Execute	Vector,Catenate
028a 8222       | "  |		Call	0x1,0x22
028b 00d8       |    |		Load_Top	At_Offset_0
028c 00cb       |    |		Action	Pop_Block_With_Result
028d 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
028e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
028f 0000       |    |		.XXX[0x1]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0297       |    |		.CONST	0x0297								; Address of begin
0291 0004       |    |		.CONST	0x0004								; Address of exception handler
0292 0002       |    |		.CONST	0x0002								; Number of locals
0293			INIT_0290:
0293 e220       |    |		Load	0x1,0x20
0294 e5fe       |    |		Load	0x2,-0x2
0295 e00a       |    |		Load	0x0,0xa
0296 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0297			BODY_0290:
0297 00d8       |    |		Load_Top	At_Offset_0
0298 01db       |    |		Execute	Vector,Length
0299 680b       |h   |		Jump_Zero	0x2a5
029a 0092 02fe  |    |		Action	Push_String_Extended,0x2fe					; "Remote_Password obtained using Rpc_Access_Utilities"
029c 8222       | "  |		Call	0x1,0x22
029d 0092 02fd  |    |		Action	Push_String_Extended,0x2fd					; "Remote_Password => "
029f 00d9       |    |		Load_Top	At_Offset_1
02a0 01cc       |    |		Execute	Vector,Catenate
02a1 8222       | "  |		Call	0x1,0x22
02a2 00d8       |    |		Load_Top	At_Offset_0
02a3 00cb       |    |		Action	Pop_Block_With_Result
02a4 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
02a5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02a6 0000 0000  |    |		.XXX[0x2]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02b0       |    |		.CONST	0x02b0								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0002       |    |		.CONST	0x0002								; Number of locals
02ab			INIT_02a8:
02ab e5fd       |    |		Load	0x2,-0x3
02ac 0092 02ff  |    |		Action	Push_String_Extended,0x2ff					; "Ftp.Remote_Directory"
02ae e21e       |    |		Load	0x1,0x1e
02af 8225       | %  |		Call	0x1,0x25
02b0			BODY_02a8:
02b0 00d8       |    |		Load_Top	At_Offset_0
02b1 01db       |    |		Execute	Vector,Length
02b2 680b       |h   |		Jump_Zero	0x2be
02b3 0092 0300  |    |		Action	Push_String_Extended,0x300					; "Remote_Directory obtained from the library switch Ftp.Remote_Directory"
02b5 8222       | "  |		Call	0x1,0x22
02b6 0092 0301  |    |		Action	Push_String_Extended,0x301					; "Remote_Directory => "
02b8 00d9       |    |		Load_Top	At_Offset_1
02b9 01cc       |    |		Execute	Vector,Catenate
02ba 8222       | "  |		Call	0x1,0x22
02bb 00d8       |    |		Load_Top	At_Offset_0
02bc 00cb       |    |		Action	Pop_Block_With_Result
02bd 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02be 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02bf 0000       |    |		.XXX[0x1]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c9       |    |		.CONST	0x02c9								; Address of begin
02c1 0004       |    |		.CONST	0x0004								; Address of exception handler
02c2 0002       |    |		.CONST	0x0002								; Number of locals
02c3			INIT_02c0:
02c3 e004       |    |		Load	0x0,0x4
02c4 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
02c5 0092 0302  |    |		Action	Push_String_Extended,0x302					; "Session_Ftp.Remote_Directory"
02c7 e21f       |    |		Load	0x1,0x1f
02c8 8225       | %  |		Call	0x1,0x25
02c9			BODY_02c0:
02c9 00d8       |    |		Load_Top	At_Offset_0
02ca 01db       |    |		Execute	Vector,Length
02cb 680b       |h   |		Jump_Zero	0x2d7
02cc 0092 0303  |    |		Action	Push_String_Extended,0x303					; "Remote_Directory obtained from the session switch Session_Ftp.Remote_Directory"
02ce 8222       | "  |		Call	0x1,0x22
02cf 0092 0301  |    |		Action	Push_String_Extended,0x301					; "Remote_Directory => "
02d1 00d9       |    |		Load_Top	At_Offset_1
02d2 01cc       |    |		Execute	Vector,Catenate
02d3 8222       | "  |		Call	0x1,0x22
02d4 00d8       |    |		Load_Top	At_Offset_0
02d5 00cb       |    |		Action	Pop_Block_With_Result
02d6 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02d7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02d8 ; --------------------------------------------------------------------------------------
02d8 ; STRING TABLE
02d8 ; --------------------------------------------------------------------------------------
02d8 005a       | Z  |		.STRTAB	0x005a->0x0305							; " "
02d9 0059       | Y  |		.STRTAB	0x0059->0x0305							; "<default>"
02da 0060       | `  |		.STRTAB	0x0060->0x030a							; "Remote_Machine has been specified in the command"
02db 008e       |    |		.STRTAB	0x008e->0x0322							; "Remote_Machine =>"
02dc 009d       |    |		.STRTAB	0x009d->0x032a							; "Remote_Machine has not been specified in the command."
02dd 00d0       |    |		.STRTAB	0x00d0->0x0345							; "Unable to obtain Remote_Machine from the library switches"
02de 0107       |    |		.STRTAB	0x0107->0x0361							; "Unable to obtain Remote_Machine from the Session_Switches"
02df 013e       | >  |		.STRTAB	0x013e->0x037e							; "Remote_Username has been specified in the command"
02e0 016d       | m  |		.STRTAB	0x016d->0x0396							; "Remote_Username =>"
02e1 017d       | }  |		.STRTAB	0x017d->0x039f							; "Remote_Username has not been specified in the command."
02e2 01b1       |    |		.STRTAB	0x01b1->0x03ba							; "Unable to obtain Remote_Username from the library switches"
02e3 01e9       |    |		.STRTAB	0x01e9->0x03d7							; "Unable to obtain Remote_Username using Rpc_Access_Utiliites"
02e4 0222       | "  |		.STRTAB	0x0222->0x03f5							; "Remote_Password has been specified in the command"
02e5 0251       | Q  |		.STRTAB	0x0251->0x040d							; "Remote_Password =>"
02e6 0261       | a  |		.STRTAB	0x0261->0x0416							; "Remote_Password has not been specified in the command."
02e7 0295       |    |		.STRTAB	0x0295->0x0431							; "Unable to obtain Remotes_Password from the library switches"
02e8 02ce       |    |		.STRTAB	0x02ce->0x044f							; "Unable to obtain Remote_Password using Rpc_Access_Utiliites"
02e9 0307       |    |		.STRTAB	0x0307->0x046c							; "Remote_Password is assumed to be the null string"
02ea 0335       | 5  |		.STRTAB	0x0335->0x0484							; "Remote_Directory has been specified in the command"
02eb 0365       | e  |		.STRTAB	0x0365->0x049d							; "Remote_Directory =>"
02ec 0376       | v  |		.STRTAB	0x0376->0x04a7							; "Remote_Directory has not been specified in the command."
02ed 03ab       |    |		.STRTAB	0x03ab->0x04c2							; "Unable to obtain Remote_Directory from the library switches"
02ee 03e4       |    |		.STRTAB	0x03e4->0x04e0							; "Unable to obtain Remote_Directory from the Session_Switches"
02ef 041d       |    |		.STRTAB	0x041d->0x04fd							; "Remote_Directory will default to the remote user's home directory on the remote machine"
02f0 0472       | r  |		.STRTAB	0x0472->0x0529							; "_SWITCHES"
02f1 0479       | y  |		.STRTAB	0x0479->0x052d							; "Ftp.Remote_Machine"
02f2 0489       |    |		.STRTAB	0x0489->0x0536							; "Remote_Machine obtained from the library switch Ftp.Remote_Machine"
02f3 04c9       |    |		.STRTAB	0x04c9->0x0557							; "Remote_Machine => "
02f4 04d9       |    |		.STRTAB	0x04d9->0x0560							; "Session_Ftp.Remote_Machine"
02f5 04f1       |    |		.STRTAB	0x04f1->0x056d							; "Remote_Machine obtained from the session switch Session_Ftp.Remote_Machine"
02f6 0539       | 9  |		.STRTAB	0x0539->0x0592							; "Ftp.Username"
02f7 0543       | C  |		.STRTAB	0x0543->0x0598							; "Remote_Username obtained from the library switch Ftp.Username"
02f8 057e       | ~  |		.STRTAB	0x057e->0x05b7							; "Remote_Username => "
02f9 058f       |    |		.STRTAB	0x058f->0x05c0							; "Remote_Username obtained using Rpc_Access_Utilities"
02fa 05c0       |    |		.STRTAB	0x05c0->0x05da							; "Remote_Username is assumed to be the same as Local_Username"
02fb 05f9       |    |		.STRTAB	0x05f9->0x05f7							; "Ftp.Password"
02fc 0603       |    |		.STRTAB	0x0603->0x05fd							; "Remote_Password obtained from the library switch Ftp.Password"
02fd 063e       | >  |		.STRTAB	0x063e->0x061c							; "Remote_Password => "
02fe 064f       | O  |		.STRTAB	0x064f->0x0625							; "Remote_Password obtained using Rpc_Access_Utilities"
02ff 0680       |    |		.STRTAB	0x0680->0x063f							; "Ftp.Remote_Directory"
0300 0692       |    |		.STRTAB	0x0692->0x0649							; "Remote_Directory obtained from the library switch Ftp.Remote_Directory"
0301 06d6       |    |		.STRTAB	0x06d6->0x066c							; "Remote_Directory => "
0302 06e8       |    |		.STRTAB	0x06e8->0x0676							; "Session_Ftp.Remote_Directory"
0303 0702       |    |		.STRTAB	0x0702->0x0684							; "Remote_Directory obtained from the session switch Session_Ftp.Remote_Directory"
0304 074e       | N  |		.STREND 0x074e->0x06ab
0305 203c 6465  | <de|		.STRTAB_STRINGS
06ab 0000 0000  |    |		.BLANK	0000[0x5]
06b0 ; --------------------------------------------------------------------------------------
06b0 ; Debug Table
06b0 ; --------------------------------------------------------------------------------------
06b0 0004 000d  |    |		.DEBUG4	0x0004,0x000d,0xde4d,0x0000,0x0001,0x0000
06b6 0000 0000  |    |		.XXX[0x21]
06b8 0040 019b  | @  |
06ba 27d0 b9bf  |'   |
06bc 33f0 0012  |3   |
06be d245 4970  | EIp|
06c0 1001 0000  |    |
06c2 d000 0000  |    |
06c4 1e47 8000  | G  |
06c6 0b00 0000  |    |
06c8 1500 2800  |  ( |
06ca 0005 1000  |    |
06cc 0002 0000  |    |
06ce 0011 0000  |    |
06d0 0000 0800  |    |
06d2 0000 5200  |  R |
06d4 0050 2099  | P  |
06d6 1000       |    |
06d7 0000 0000  |    |		.BLANK	0000[0x1a]
06f1 0008 0033  |   3|		.XXX[0x3]
06f3 64f8       |d   |
06f4 0000 0000  |    |		.BLANK	0000[0xd]
0701 0020 0500  |    |		.XXX[0xc]
0703 0000 0000  |    |
0705 0000 4000  |  @ |
0707 0002 2000  |    |
0709 0000 0100  |    |
070b 0000 0a00  |    |
070d 0000 0000  |    |		.BLANK	0000[0x2d]
073a 0004 00a0  |    |		.XXX[0xc]
073c 0000 0000  |    |
073e 0000 0800  |    |
0740 0000 4400  |  D |
0742 0000 0020  |    |
0744 0000 0140  |   @|
0746 0000 0000  |    |		.BLANK	0000[0x2e]
0774 8014 0000  |    |		.XXX[0xb]
0776 0000 0000  |    |
0778 0100 0000  |    |
077a 0880 0000  |    |
077c 0004 0000  |    |
077e 0028       | (  |
077f 0000 0000  |    |		.BLANK	0000[0x2e]
07ad 1002 8000  |    |		.XXX[0xb]
07af 0000 0000  |    |
07b1 0020 0000  |    |
07b3 0110 0000  |    |
07b5 0000 8000  |    |
07b7 0005       |    |
07b8 0000 0000  |    |		.BLANK	0000[0x48]