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
     [REV BEG]
     DEFINITION WITH ENTRY MODIFIER[REV END]
     label[:label]
     [REV BEG]
     DEFINITION WITH INTRINSIC MODIFIER[REV END]
     intrinsic-name[:intrinsic-name]
     [REV BEG]
     DEFINITIONS WITH ITEM MODIFIER[REV END]
     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.5 Documentation