lext_current_active_image (ul_lextools)

	status.i4.v = lext_current_active_image(image_name.i1a.r)

	This routine returns the current active Lextools image.

	image_name	returned active Lextools image name
			(allow LEXT_SA_NAMLEN + 1 characters)

	This function returns ACNET status values as follows:

	OK			success
	CBS_NOINIT		no image is currently active

	This function requires the following include files:

	ul_lextools_h:lextuti_h, acnet_errors_h

	Related functions:

	lext_init_active_image, lext_remove_active_image, lext_draw_object_c,
	lext_modify_object_c, lext_erase_object, lext_sa_menu_c,
	lext_enable_device_monitoring, lext_disable_device_monitoring,
	lext_enable_image_control, lext_disable_image_control, lximag, lxobj

	C/C++ usage:

	char	image_name[LEXT_SA_NAMLEN+1];
	int	status;

	status = lext_current_active_image(image_name);