举例如下:/*未加变量定义和初始化*/ EXEC SQL SELECT count(*) INTO :count FROM tabl WHERE a='1' EXEC SQL WHENEVER SQLERROR goto sqlerror_err; EXEC SQL DECLARE c_retdsf CURSOR FOR SELECT a,b,c FROM tabl WHERE a='1' ; EXEC SQL OPEN c_retdsf; for(j=0;j<count;j++) { EXEC SQL FETCH c_retdsf INTO :aa, :bb, :cc; sprintf(tmp, "%8s%06s%07s\n",aa,bb,cc); fputs(tmp,fp); /*fp is the file name you want to write into*/ } fclose(fp); EXEC SQL CLOSE c_retdsf; EXEC SQL COMMIT WORK RELEASE;
EXEC SQL SELECT count(*)
INTO :count
FROM tabl
WHERE a='1' EXEC SQL WHENEVER SQLERROR goto sqlerror_err;
EXEC SQL DECLARE c_retdsf CURSOR FOR
SELECT a,b,c
FROM tabl
WHERE a='1' ; EXEC SQL OPEN c_retdsf;
for(j=0;j<count;j++)
{
EXEC SQL FETCH c_retdsf
INTO :aa,
:bb,
:cc; sprintf(tmp, "%8s%06s%07s\n",aa,bb,cc);
fputs(tmp,fp); /*fp is the file name you want to write into*/
}
fclose(fp);
EXEC SQL CLOSE c_retdsf;
EXEC SQL COMMIT WORK RELEASE;