PROC 
;
GOTO BEGIN
;
;# STOL Prolog $Header: /home/trace/.CVSROOT/procs/inst/Proc_Header,v 1.1.1.1 1997/03/13 21:46:10 tsingle Exp $
;#
;# Filename:	        
;# Author:		adapted from SLISR by Chris M. Hoffmann
;# Date Written:	
;#
;# Responsible Subsystem Lead:	SLISR
;#
;# Procedure Description:
;#   
;# Constraints:
;#
;# Inputs:		
;#
;# Outputs:		
;#
;# Variables:	
;#	  
;#
;# Other STOL Procedures Referenced:	
;#
;# Procedure Execution Duration:	
;#
;# Revision Section:
;#   INITIALS   DATE	CHANGE DESCRIPTION
;#     
;
BEGIN:
;
LOCAL 
GLOBAL inst_log, EXP_CONTROL_WORD, GSN, EXP_TIME
;
;
OPEN (inst_log) "/home/trace/procs/inst/Inst_Test_Logs/inst_test_log.txt " APPEND
;
;
WRITE (inst_log) " "
WRITE (inst_log) p@gbl_gmtoff, "     Executing procedure:          "
WRITE (inst_log) " "
;
;
WRITE (EGSE) concat("log ITOS Time: ",p@gbl_gmtoff," Executing proc:   ")