[B 
	
	'EasySteps_E1200_E1400' nknown not [B
		'EasySteps_E1200_E1400' import
	] if
	[B	   
		#0 EasySteps_E1200_E1400:Init
		EasySteps_E1200_E1400:InitPackInst	[B
			EasySteps_E1200_E1400:InstallProc
		] if	
	] [B
		/Msg get 'E' 'A' msgdlg
	] tryexcept
	
	EasySteps_E1200_E1400:PackInstExit
	
]