/* DANGER!!! DO NOT EDIT ANYTHING THAT IS NOT PART OF THE USER-CODE SECTION!!! */

/* THIS PART IS INCLUDED FROM INCLUDEH.ZVM.  DO NOT EDIT THIS PART.  LOOK FOR
   THE SECTION WHICH SAYS USER CODE SECTION.  YOU HAVE BEEN WARNED!
	
   V1.00
*/

/* we want results! */
options results

/* We want to trap on these things, to help us debug.  The definitions for
   these are in INLCUDET.ZVM
*/

signal on halt
signal on novalue
signal on syntax
signal on break_c

/* Set up modem stuff */
call doInitializations

/* We are about to start the user code section.  Any function that you
   write that has a PROCEDURE statement NEEDS to have an EXPOSE MODE. STATUS.
   for my stub functions to work.
*/
/*vvvvvvvvvvvvvvvvvvvvvvvvBEGINNING OF USER CODEvvvvvvvvvvvvvvvvvvvvvvvvvv*/