PICTURE


The PICTURE statement displays a graphics file or graphical instruction set on the image. This statement is used to place pictures, buttons, or other graphics items on a displayed image.

    ••••• PICTURE  ••• •••••••••••••••••••••• ••• (AT APPEARANCE # •••)
    (1)            (2) (3)                    (4)                  (5)

(1) T/F execution conditions

(2) Application ID

(3) Field name or predefined field

(4) Occurrence (constant/index)

(5) Appearance (constant/index)

Using the Statement

The appearance number can be used if the same field appears more than once on an image.

PICTURE is one of the characteristic-type statements. Refer to the common attributes of all the statements in this category in the Characteristic-Type Statements section of this manual.

The operation of a PICTURE statement affects only the next generation of an image. In other words, the item characteristics are reset each time an image is produced,

Restrictions

Note that, because the PICTURE statement operates on items rather than fields, this statement is meaningful only in event points that are associated with an image.

Statement Ignored

The system ignores any PICTURE statements specified in non-image-related event points.

Related Statements

BLANK, BLINK, BOLD, BRIGHT, COLOR, DIM, DISPLAY, FONT, INVERSE, NO BOLD, NO ULINE, NORMAL, ULINE

Example

The PICTURE statement is used to cause the current contents of a graphics item to appear on the image. In this example, if no picture is available for the current product, a default “picture not available” graphics is displayed on the image in the field defined as WORK PICTURE FILE. Otherwise, the picture file associated with this product is displayed.

          IF       TIC PRODUCT PICTURE FILE       EQ
    T     SET      TIC WORK PICTURE FILE          =  TIC WORK PICTURE NOT AVAIL
    F     SET      TIC WORK PICTURE FILE          =  TIC PRODUCT PICTURE FILE

          PICTURE  TIC WORK PICTURE FILE          (AT APPEARANCE #    )
          DISPLAY  TIC WORK PICTURE FILE          (AT APPEARANCE #    )