Extracting all BLOB's from table

I have code like this that gets one blob. While debugging it looks like the
blob isn't written to my IFS directory until the 2nd fetch happens, IOW,
you have to setup the blob name before you do the fetch.

The file name needs to contain the value of AUDFID. How can I just read
through all of the rows and export the blob with the correct name?

Code:::
EXEC SQL Declare C1 Cursor for
Select lwiimage, audfid
from lwimages

EXEC SQL Open C1;
BLOB_NAME = '/IASP/PublicAS400/Images/' +
%trim(audfid) +
'.jpg';
blob_nl = %len(%trim(blob_name));
blob_fo = SQFOVR;

EXEC SQL Fetch Next from C1 into :blob, :audfid;

dow sqlstt = '00000';

BLOB_NAME = '/IASP/PublicAS400/Images/' +
%trim(audfid) +
'.jpg';
blob_nl = %len(%trim(blob_name));
blob_fo = SQFOVR;

EXEC SQL Fetch Next from C1 into :blob, :audfid;
enddo;

return;