Introduction - If you have any usage issues, please Google them yourself
integer li_FileNum
blob emp_id_pic
SELECTBLOB salary_hist
INTO : emp_id_pic
FROM Employee
WHERE Employee.Emp_Num = 100
USING Emp_tran;
li_FileNum = FileOpen( "C:\EMPLOYEE\EMP_PICS.BMP", StreamMode!, Write!, Shared!,Replace!)
FileWrite(li_FileNum, emp_id_pic)