vname[count] = $1;
printf " /* %s */\n", $0;
if ($2 ~ /INTEGER/ || $2 ~ /SMALLINT/ || $2 ~ /INTEGER1/) {
- printf " int\tt_%s;\n", vname[count];
+ printf " char\tt_%s[39];\n", vname[count];
vtype[count]="int";
} else if ($2 ~ /CHAR\([0-9]*\)/) {
t = split($2, temp, "(");
t = split(temp[2], temp2, ")");
if (t != 2) printf "Can't parse %s\n", temp[2];
printf " char\tt_%s[%d];\n", vname[count], temp2[1]+1;
- if ($1 == "signature") {
+ if ($1 == "signature" || $1 == "sid") {
vtype[count]="bin";
- printf " EXEC SQL VAR t_signature IS STRING(%d);\n", temp2[1]+1;
+ printf " EXEC SQL VAR t_%s IS STRING(%d);\n", vname[count], temp2[1]+1;
} else {
vtype[count]="str";
}
}
if(vtype[i] ~ /date/) {
printf " TO_CHAR(%s, 'DD-mon-YYYY HH24:MI:SS')", vname[i];
+ } else if(vtype[i] ~ /int/) {
+ printf " TO_CHAR(%s)", vname[i];
} else printf " %s", vname[i];
}
printf " FROM %s;\n", tablename;
printf " if (sqlca.sqlcode != 0)\n break;\n";
for (i = 0; i < count; i++) {
if (i != 0) print " dump_sep(f);";
- if (vtype[i] ~ /str/ || vtype[i] ~ /date/) {
+ if (vtype[i] ~ /str/ || vtype[i] ~ /date/ || vtype[i] ~ /int/) {
printf " dump_str(f, endtrim(t_%s));\n", vname[i];
} else {
printf " dump_%s(f, t_%s);\n", vtype[i], vname[i];