oracle pro*C problem:varchar variable is truncated after calling C function

[manoj339]

I have varchar variable declared .When I print this var it shows me correct value before a C function.
Inside a c function this variable value is getting truncated .
The c function does not pass this variable .It intializes structure memebers only.
I am using Pro*C/C++: Release 8.1.7.0.0 and OS details is :
Release: 5.8
Kernel architecture: sun4u
Application architecture: sparc
Hardware provider: Sun_Microsystem s
Domain:
Kernel version: SunOS 5.8 Generic 117350-35 Mar 2006

Request your help in this matter.


EXEC SQL BEGIN DECLARE SECTION;
varchar ip_msg_type[5];
EXEC SQL END DECLARE SECTION;

/*Some of the Declarations are as below*/
struct op_msg_format
{
char message_type[5];
int section_positio n;
char section_name[5];
int section_length;
int min_occ;
int max_occ;
char write_to_file_f lag;
char file_name[36];
};

struct sec_msg_rec_typ e
{
char section_name[5];
int start_position;
int section_length;
};

char g_prog_name[100];
struct op_msg_format g_op_msg_tab[MAX_OP_MSG_FORM AT];
struct sec_msg_rec_typ e g_sec_tab[MAX_SEC_MAG_REC _TYPE];
int g_op_msg_tab_cn t;
FILE *g_fhndl_tab[MAX_OP_MSG_FORM AT];



/* Part of Main Program is below */
printf("^^***ip _msg_type.arr = %s\n",ip_msg_ty pe.arr);
/*value shows IMG */

if (init("SEC_MAG_ REC_TYPE") != SUCCESS)
{
if (fn_log_errors( g_error_log_fil e,(char *)C_FATAL,"TRAD E","E-INITFAILED",
"TRD_MQ_MSG_PRO CESS","BARCLAYS ","","STAGI NG",
"Initialisa tion of SEC_MAG_REC_TYP E Structure failed",
"","","") != SUCCESS)
{
fn_std_err("Err or in call to fn_log_errors : MAIN.E-INITFAILED");
}
goto sqlerror;
}
g_sec_ind = 0;
g_bt_ind = 'N';

printf("^^****i p_msg_type.arr = %s\n",ip_msg_ty pe.arr);
/*Value shows IM */


int init(char *struct_type)
{
int z;
if (strcmp(struct_ type,"OP_MSG_FO RMAT") == 0)
{
for (z = 0; z <= MAX_OP_MSG_FORM AT; z++)
{
g_op_msg_tab[z].message_type[0] = '\0';
g_op_msg_tab[z].section_positi on = 0;
g_op_msg_tab[z].section_name[0] = '\0';
g_op_msg_tab[z].section_length = 0;
g_op_msg_tab[z].min_occ = 0;
g_op_msg_tab[z].max_occ = 0;
g_op_msg_tab[z].write_to_file_ flag = '\0';
g_op_msg_tab[z].file_name[0] = '\0';

/* This is of type pointer and you are assigning
a char constant to it */
g_fhndl_tab[z] = NULL;
}
}
if (strcmp(struct_ type,"SEC_MAG_R EC_TYPE") == 0)
{
printf("!!ip_ms g_type = %s\n",ip_msg_ty pe.arr);
/*Value shows IMG */

for (z = 0; z <= MAX_SEC_MAG_REC _TYPE; z++)
{
g_sec_tab[z].section_name[0] = '\0';
g_sec_tab[z].start_position = 0;
}
printf("!!!ip_m sg_type = %s\n",ip_msg_ty pe.arr);
/*Value shows IM */
}
return SUCCESS;
}