cat > script.cc <<'+-+-+-+-+-END-OF-FILE-+-+-+-+-+'
#include	<mscc.h>
#include <stdlib.h>
void	error	(int	i);
EXEC SQL INCLUDE SQLCA;
EXEC SQL BEGIN DECLARE SECTION ;
	char	var[2][3][25];
EXEC SQL END DECLARE SECTION ;

int	main (int argc, char** argv)
{
EXEC SQL INIT;
EXEC SQL DATABASE IS "TEST_DATABASE";
EXEC SQL SELECT name,date,amount FROM loans 
	INTO :var[0][0],:var[0][1],:var[0][2] WHERE name = "Kilroy"; 
if(SQLCODE != 0) error(1);
EXEC SQL SELECT name,date,amount FROM loans 
	INTO :var[1][0],:var[1][1],:var[1][2] WHERE name = "Peterson"; 
if(SQLCODE != 0) error(2);
printf("%s %s %s \n",var[0][0],var[0][1],var[0][2]);
printf("%s %s %s \n",var[1][0],var[1][1],var[1][2]);
EXEC SQL EXIT ;
	return 0;
}
void	error (int	i)
{
	printf("error number %d\n",i);
	printf("SQLCODE number %ld\n",SQLCODE);
	exit(1);
}
+-+-+-+-+-END-OF-FILE-+-+-+-+-+
chmod 644 script.cc
cat > stdout <<'+-+-+-+-+-END-OF-FILE-+-+-+-+-+'
Kilroy 16 February  1981 $250.00 
Peterson 6 June      1981 $50.00 
+-+-+-+-+-END-OF-FILE-+-+-+-+-+
chmod 644 stdout
cat > tag <<'+-+-+-+-+-END-OF-FILE-+-+-+-+-+'
use of dimension
+-+-+-+-+-END-OF-FILE-+-+-+-+-+
chmod 644 tag
