#include <stdio.h>
#include <string.h>

EXEC SQL INCLUDE sqlca.h;

typedef struct st_tdef_r
{
char test_name[10];
float test_ver;
short active_flag;
} st_tdef;

long SQLCODE;
st_tdef in_tdefs[10];
st_tdef out_tdefs[10];

main()
{
int i;
char login_name[30];
strcpy(login_name , "acsng_sch");

EXEC SQL WHENEVER SQLERROR DO CONTINUE;

EXEC SQL CONNECT :login_name IDENTIFIED BY :login_name;

printf("\nConnected to ORACLE as user: %s\n\n", username);

EXEC SQL EXECUTE
BEGIN
proc_modify_tdefs (:in_tdefs,:out_tdefs);

END;
END-EXEC;

for(i= 0; i < 10;i++)
{
 printf("%s     %f      %d",out_tdefs.test_name,out_tdefs.test_ver,out_tdefs.active_flag);
}

EXEC SQL COMMIT WORK RELEASE;
exit(0);
}