If (!1) Get SQLFetch Of !1 To SQLResult
#IF (!0=1)
//*** zero tells statement object to use file property
If (SQLResult) ;
Send SQLBindFile To !1 0
#ENDIF
#IFSAME !2 TO
If (SQLResult) Begin
#IF (!0>2)
SQL$NextFile !1 !3 !4 !5 !6 !7 !8 !9
#ENDIF
End
#ENDIF