When a bitmap field is specified in the form descriptors, the Windows-bitmap format data with the extension "BMP", TIFF data with extension "TIF", PNG data with extension "PNG" and the JPEG data with the extension "JPG","JPEG" or "JPE" can be output.
To output bitmap data, define the format of the bitmap field to be visual and the type to be file name data when creating the form descriptors.
See Clipping and centering
To print image data in the Windows-bitmap format with the extension "BMP", write the application program as follows:
Write to the field control field.
Set the field control field of the bitmap field to output in bit map format by Setting the field display attribute.
Specify the bitmap file.
Specify the bitmap file by writing the file name in the bitmap field of the record to be used for printing.
Print the bitmap.
Enter the partition name containing the bitmap field as a single name specified in a GROUP clause. Specify the bitmap file for record data.
The following code shows an example of outputting a bitmap field in COBOL.
"PICTURE.BMP" is printed in bitmap field S001 as the bit map.
MOVE "SAMP" TO PRT-FORMAT. MOVE "B" TO EDIT-MODE OF S001 OF SAMP. MOVE "PICTURE.BMP" TO S001 OF SAMP. MOVE "S001" TO PRT-GROUP. WRITE SAMP.