Post-Relational Database Command Reference
BASIC Language Reference
 UNIVERSE 
 BASIC 
 BASIC
   ABORT
   ASSIGNMENT
   BOOLEAN
   BRANCHING
   BSD
   COMPILE.TIME
   CONSTANT
   DIMENSION
   DYNAMIC
   EQUATE
   EXECUTE
   IO
   MATH
   NLS
   SQL
   STRING
   SYSTEM
   TABLE
   TAPE
   TBD
   TRANSACTION
   TRANSFORM
 PROC
   BRANCHING
   BUFFER
   EXECUTE
 TCL
   ANALYSIS
   IO
   SYSTEM
BASIC CODE: ASSIGNMENT
Example of Assignment handling

Code Example

      subroutine MEASURE(VALUE, OLD.MEASURE, NEW.MEASURE)
      begin case
         case (ASSIGNED(VALUE) = 0)
            * Skip, there is no assigned value
         case (OLD.MEASURE = "EACH") and (NEW.MEASURE = "DOZEN")
            if (VALUE # 0) then
               VALUE = VALUE / 12
            end
         case (OLD.MEASURE = "DOZEN") and (NEW.MEASURE = "EACH")
            VALUE = VALUE * 12
      end case
*
      return                             ; * to calling program

Synonyms
See also      =      |     AND      |     ASSIGNED      |     BEGIN.CASE      |     CASE      |     END.CASE     
Categories      ALL      |     ASSIGNMENT     
More Details or Suggestions?
     

Updated from a Post-Relational data table on 10:18:30 23 Apr 2010
Courtesy of Key Ally, Inc.
More information at U2-Users Group
UniVerse is a Trademark of Rocket Software. Previous, IBM, Informix, Ardent, and vMark.
DMOZ
Wikipedia