You are viewing an old version of this page. View the current version.

Compare with Current View Page History

Version 1 Next »

The DEFINE command is used to define a field for local use within a function, form, reusable part or WAM. 

Also See

7.30.1 DEFINE Parameters

7.30.2 DEFINE Examples


                                                         Required 

  DEFINE ------- FIELD -------- field name --------------------->

 -----------------------------------------------------------------
                                                         Optional
             >-- TYPE --------- *REFFLD ------------------------>
                                *DEC
                                *PACKED
                                *CHAR
                                *NVARCHAR
                                *STRING
                                *SIGNED
                                *BIN
                                *DATE
                                *TIME
                                *DATETIME
                                *INT
                                *FLOAT
                                *BOOLEAN
             >-- LENGTH ------- *REFFLD ------------------------>
                                numeric value
                                      incr/decr      *PLUS
                                                     *MINUS
                                                     *NONE
                                      # to incr/decr *NONE
                                                     numeric value
             >-- DECIMALS ----- *REFFLD ------------------------>
                                numeric value
                                      incr/decr      *PLUS
                                                     *MINUS
                                                     *NONE
                                      # to incr/decr *NONE
                                                     numeric value
             >-- REFFLD ------- *NONE -------------------------->
                                name of reference field
             >-- LABEL -------- *DEFAULT ----------------------->
                                label name

             >-- DESC --------- *DEFAULT ----------------------->
                                text description

             >-- COLHDG ------- *DEFAULT ----------------------->
                                column heading
                                |             |
                                 - 3 maximum -

             >-- EDIT_CODE ---- *DEFAULT ----------------------->
                                edit code

             >-- EDIT_WORD ---- *DEFAULT ----------------------->
                                edit word

             >-- INPUT_ATR ---- *DEFAULT ----------------------->
                                input attributes

             >-- OUTPUT_ATR --- *DEFAULT ----------------------->
                                output attributes

             >-- DEFAULT ------ *DEFAULT ----------------------->
                                default value

             >-- TO_OVERLAY --- *NONE -------------- 1 --------->
                                #field name    start position

             >-- SHIFT -------- *DEFAULT -----------------------|
                                keyboard shift



  • No labels