!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!
! SDDL Name:	QGVALUE.SDDL
!
! Purpose:      This SDDL file defines the qgvalue relation.
!
! Modification History:
!
!   Date        PR     Who                       Reason
! --------   -------   ---   -------------------------------------------------
! 11/30/94   27329     SXT   Original implementation
! 08/13/96   29960     MRB   Add C output and refinements
! 03/12/99   38555     MRB   Remove instruction versions (version_num field)
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!
 
LANGUAGE  C, FORTRAN, SQL

INCLUDE  ZSPSS_USER_TYPES.SDDL
 
RECORD  QGVAL_TYPE
 
!------------------------------------------------------------------------------
!
!   RECORD INFORMATION
!
!------------------------------------------------------------------------------
 
 
    DESCRIPTION       "This relation is used to specify values for the
		      parameters of the components of an instruction. 
                      Parameters are used in instructions to manipulate data 
                      for the purpose of determining the proper course of 
                      action. They are always resolved before being output 
                      to the SMS.
                
                      Parameters may not be defined for top-level instructions.

                      The value of a parameter can be a blank, a number, a 
                      time specification, a character string, a substitute 
                      variable embraced by ampersands, or a pass by reference 
                      variable embraced by slashes.                       
                
                      This relation is populated by the command INSTRUCT/CLP."
 
 
!------------------------------------------------------------------------------
!
!   FIELD INFORMATION
!
!------------------------------------------------------------------------------
 
 
    FIELD  instr_name
        TYPE            INSTRUCTION_NAME_TYPE
    END_FIELD
 
 
    FIELD  seq_no
        TYPE            I4
        DESCRIPTION     "This is the component number to which the parameter 
                        belongs. A component is defined as a statement of an 
                        SCPL instruction. A component of a defined instruction 
                        is accessed by instruction name and component number."
    END_FIELD
 
 
    FIELD  order_no
        TYPE            I2
        DESCRIPTION     "The order number is the index for each parameter 
                        specification, since a component may have more than one 
                        parameter."
    END_FIELD
 
 
    FIELD  arg_no
        TYPE            I2
        DESCRIPTION     "This field contains the argument number for a list 
                        parameter. A list parameter is a single parameter that 
                        contains a list of one or more values to be passed 
                        into a PDB-defined primitive command, data block or 
                        table. If this is a list parameter, this field contains
                        the number of the argument within the list.  
                       
                        The various values of a list parameter are stored in
                        this relation with the same parameter name and order 
                        number, but a different argument number. The argument 
                        number indicates the position of the value within the 
                        list.
 
                        This field is set to zero if this is not a list 
                        parameter."
    END_FIELD
 
 
    FIELD  par_name
        TYPE            C12
        DESCRIPTION     "This field holds the name of the parameter of the 
                        component for which the value is defined here. This 
                        field is a key in this relation and for relation 
                        qgparameter."
    END_FIELD
 
 
    FIELD  par_value
        TYPE            C72
        DESCRIPTION     "This field holds the value assigned to the
                        parameter.  The value could be a blank, a number,
                        a time specification, a character string, a
                        substitute variable embraced by ampersands,
                        or a pass by reference variable embraced by
                        slashes. It defaults to blank."
    END_FIELD                       
 
 
END_RECORD
 
 
!------------------------------------------------------------------------------
!
!   RELATION DECLARATION
!
!------------------------------------------------------------------------------
 
 
RELATION  qgvalue
 
    TYPE             QGVAL_TYPE
 
    DESCRIPTION      "Parameter Value Relation"
 
    SUBSYSTEM_USING  "SPSS", "SCS", "IM"
 
    INDEX  qgvalue_1
        TYPE         unique, clustered
        FIELDS       instr_name, seq_no, par_name, arg_no
    END_INDEX
 
END_RELATION
 
!------------------------------------------------------------------------------
!
!   INSTANCE DECLARATION
!
!------------------------------------------------------------------------------
 
 
INSTANCE  qgvalue
 
    GLOBAL
 
    TYPE        QGVAL_TYPE
 
END_INSTANCE