HP 3000 Manuals

HP TRANSACT Quick Reference Guide

DEFINE 

     DEFINE(modifier) definition-list;

     MODIFIERS 
     ENTRY     - Defines a program control label
     INTRINSIC - Defines MPE intrinsic to be called
     ITEM      - Defines one or more items, a synonym, a marker item

     DEFINITION WITH DEFINE(ENTRY) 

     label[:label]

     DEFINITION WITH DEFINE(INTRINSIC) 
     intrinsic-name[:intrinsic-name]

     DEFINITION WITH DEFINE(ITEM) 
     item-name[count]
     [type(size[,decimal-length[,storage-length]])]
     [=parent-name[(position)]]
     [,ALIAS=(alias-reference)]
     [,COMPUTE=arithmetic-expression]
     [,EDIT="edit-mask"]
     [,ENTRY="entry-text"]
     [,HEAD="heading-text"]
     [,INIT=[value|(BINARY(value))|(HEX(value))|(OCTAL(value))]
     [,OPT]
     [:item-name...]

Example 

  DEFINE(ITEM) TOTAL I(4,0,2),COMPUTE=[(QTY)*(PRICE)];

MPE/iX 5.0 Documentation