7.30 DEFINE

Note: Usage options

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