System i: Programming i5/OS PASE - IBM

SQLRETURN fun_Process()
{
static
char*pszId = "fun_Process()";
charcLastName[ 80 ];
nml_ReturnCode = SQLAllocStmt( nml_HandleToDatabaseConnection,
&nml_HandleToSqlStatement );
if ( nml_ReturnCode != SQL_SUCCESS ) {
printf( "%s: SQLAllocStmt() failed\n", pszId );
fun_PrintError( SQL_NULL_HSTMT );
printf( "%s: Terminating\n", pszId );
return SQL_ERROR;
} else {
printf( "%s: SQLAllocStmt() succeeded\n", pszId );
} /* endif */
strcpy( chs_SqlStatement01, "select LSTNAM, STATE " );
strcat( chs_SqlStatement01, "from QIWS.QCUSTCDT " );
strcat( chs_SqlStatement01, "where " );
strcat( chs_SqlStatement01, "STATE =?");
nml_ReturnCode = SQLPrepare( nml_HandleToSqlStatement,
chs_SqlStatement01,
SQL_NTS );
if ( nml_ReturnCode != SQL_SUCCESS ) {
printf( "%s: SQLPrepare() failed\n", pszId );
fun_PrintError( nml_HandleToSqlStatement );
nml_ReturnCode = fun_ReleaseStmHandle();
printf( "%s: Terminating\n", pszId );
return SQL_ERROR;
} else {
printf( "%s: SQLPrepare() succeeded\n", pszId );
} /* endif */
Nmi_vParam = SQL_TRUE;
nml_ReturnCode = SQLSetStmtOption( nml_HandleToSqlStatement,
SQL_ATTR_CURSOR_SCROLLABLE,
( SQLINTEGER * ) &Nmi_vParam );
if ( nml_ReturnCode != SQL_SUCCESS ) {
printf( "%s: SQLSetStmtOption() failed\n", pszId );
fun_PrintError( nml_HandleToSqlStatement );
nml_ReturnCode = fun_ReleaseStmHandle();
printf( "%s: Terminating\n", pszId );
return SQL_ERROR;
} else {
printf( "%s: SQLSetStmtOption() succeeded\n", pszId );
} /* endif */
Nmi_vParam = SQL_TRUE;
nml_ReturnCode = SQLSetStmtOption( nml_HandleToSqlStatement,
SQL_ATTR_FOR_FETCH_ONLY,
( SQLINTEGER * ) &Nmi_vParam );
if ( nml_ReturnCode != SQL_SUCCESS ) {
printf( "%s: SQLSetStmtOption() failed\n", pszId );
fun_PrintError( nml_HandleToSqlStatement );
nml_ReturnCode = fun_ReleaseStmHandle();
printf( "%s: Terminating\n", pszId );
return SQL_ERROR;
} else {
printf( "%s: SQLSetStmtOption() succeeded\n", pszId );
} /* endif */
nmi_PcbValue = 0;
nml_ReturnCode = SQLBindParam( nml_HandleToSqlStatement,
1,
i5/OS PASE 45