Procedure CLON(table:Logical_table_typ;
		Log_nam: Packed array [lo..hi:Integer] of char;
		Equ_str: Packed array [elo..ehi:Integer] of char; 		
	);
   EXTERNAL;
{*USER*
 Pascal-3 procedure to create a logical name. Table specifies the logical
name table to contain the task (include the file LogNam.Typ). The modifiers
"terminal" and "privileged" are NOT provided. Use "SPAWN DFL" if required.
 Log_nam and Equ_str are defined as conformant string parameters.
 
 Directive Status is available in $DSW on return.
}