OpenVMS Source-Code Demos

MYSQL_IMPORT_HELPER_BASIC_TEMPLATE_106_PART1

	!
	! start of template 1/3
	!11111111111111111111111111111111111111111111111111111111111111111111111
	!=======================================================================
	! file   : mysql_import_helper_basic_template_106_part1.bas
	! author : Neil Rieck
	! history:
	! 100 NSR 140708 1. original effort
	! 106 NSR 170314 1. adding true unicode support
	!	  170316 2. more work					ver_106.3
	!=======================================================================
	option type=explicit							! no kid's stuff
	external string function cleanup(string, long)				! ver_106.3
	declare  string constant htab = '9'C					! <tab>
	declare  string delim$, my_file$, fs_i$, fs_o$				!
	declare  long   handler_error%, count_i%, count_o%, requested_datatype%	!
	!
	delim$ = htab								!
	fs_i$ = "csmis$dat:whatever.dat"					! change as required
	!11111111111111111111111111111111111111111111111111111111111111111111111
	! end of template 1/3
	!