static STATUS
qrlvcolret(
QRIOB * qriob,
bool * flushed
) {
short indvar;
/* if this isn't TM (others don`t handle blobs) these
** assignments will be overwritten, but that's OK
*/
qriob->dbv.db_datatype = DB_CHA_TYPE;
qriob->dbv.db_prec = 0;
/* qriob->dbv.db_length filled in by qrubdhldr */
/* dump cruft output from last column */
if ( ( ! *flushed ) && ( qriob->qrb->putfunc != NULL ) )
{
(*(qriob->qrb->putfunc))( qriob->qrb ); /* output to user */
*flushed = TRUE; /* buffers empty */
}
IILQldh_LoDataHandler( 1, &indvar, qrubdhdlr, qriob );
/* to align formatting,
** pad field with ' '
*/
if ( indvar == DB_EMB_NULL )
{
qrputc( qriob->qrb, DRCH_V );
for( indvar = DB_MAXNAME ; indvar > 0; indvar -- )
qrputc( qriob->qrb, ' ' );
}
return( OK );
}
void
IIpLQldh_LoDataHandler(i4 type,i2 *indvar,i4 (*datahdlr)(void *),
II_LQTYPE_PTR hdlr_arg)
{
IILQldh_LoDataHandler(type,indvar,datahdlr,hdlr_arg);
}
