%NOLIST
700	REMARK	*******  LOAD GENERAL INFORMATION  *******
	READ #Y9;G1,G2,G3.0,G4,G2$(1),G2$(2),G2$(3),G2$(4),G2$(5),G1$,\
	 G3(1),G3(2),G3(3),G3(4),G3(5),MSTR.RECORDS,HISTORY.RECORDS,JOB.RECORDS
	RETURN

720	REMARK	*******  SAVE GENERAL INFORMATION  *******
	PRINT #Y9;G1,G2,G3.0,G4,G2$(1),G2$(2),G2$(3),G2$(4),G2$(5),G1$,\
	 G3(1),G3(2),G3(3),G3(4),G3(5),MSTR.RECORDS,HISTORY.RECORDS,JOB.RECORDS
		RETURN
%LIST