FILE OPSYS_LGCL.PRO - OPerating SYStem LoGiCaL 

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

 PRO OPSYS_EVENT, EVENT			

 The event handler for PRO OPSYS_LGCL 
	Only two actions will be handled here.  Either the user clicked
	on the button CANCEL or entered input to TEXT widget (which should
	be the data location)

 calls to  :  none
 COMMON opslog :  variable DESIGNATE is returned with user's input
		   variable OK is a success/failure flag

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 CALLS:
 CALLED BY
	ACRIM, ACRIM_EV, ACRIM_OUT, CP [2], CP_EVENT, HXISBORESIGHT, HXISOFF, HXISPOINT
	HXISWIDGET, HXISWIDG_EV, cp [1]

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

 PRO OPSYS_LGCL, PART1=PART1, DISCERN=DISCERN, PART2=PART2, SEPARATE=SEPARATE,$
		  DATAPLACE=DATAPLACE, INSTRUCTME=INSTRUCTME, $
		  CANCELLED=CANCELLED 
           
 Test for logical/environment name based on provide keywords.
 	If the provide logical/environent name is not defined for the 
	current session then create a widget to query the user for the
	data location.
 
 INPUT
 	PART1	: string naming part 1 of logical/environment name

 	PART2 	: string naming part 2 of logical/environment name 

	DISCERN  : 0 if not to discern two parts of logical/environment name
		   1 if user wants to discern the two parts of a 
		     logical/environment name (ex: part1$part2, part1_part2)
	          -or-
		   string containing the discerning value to be used

	SEPARATE   : 0 if not to separate location from filename
		     1 if user wants program to separate location from filename
		       (ex: vms=":", unix="/")

       INSTRUCTME : string array containing directions written to widget

 OUTPUT
	DATAPLACE  : returns whatever the user input to text widget

	STATUS     : 0 if no input is obtained from DATAPLACE
                    1 if input was provided to DATAPLACE
 
 COMMON opslog :  variables DESIGNATE and OK are returned by event handler

 MODIFICATION HISTORY
	JAN 1993 - Elaine Einfalt (HSTX)


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 CALLS:
 CALLED BY
	ACRIM, ACRIM_EV, ACRIM_OUT, CP [2], CP_EVENT, HXISBORESIGHT, HXISOFF, HXISPOINT
	HXISWIDGET, HXISWIDG_EV, cp [1]

 NAME: 
      OVERLAY
 PURPOSE:  
      Overlay two images
 CALLING SEQUENCE:  
      overlay,img1,img2
 INPUTS:  
      img1,img2 = image structure variables (see ST_IMG)
 KEYWORDS:
      color = color contour of overlaid image
 OUTPUTS:  
      img3  = img1 aligned with img2
 PROCEDURE:  
      Plots images side by side and user picks off features.
      IMG1 is then overlaid as a contour on IMG2
 MODIFICATION HISTORY:      
      DMZ (ARC) Aug'93