Go to the bottom.

!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!
! SDDL Name:	WGGS_CMTS.SDDL
!
! Purpose:      This SDDL file defines the wggs_cmts relation.
!
! Modification History:
!
!   Date       OPR      Who                       Reason
! --------   -------    ---   -------------------------------------------------
! 11/28/94    27329     EGB/  Original implementation
!                       RSL
!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!
!
 
LANGUAGE	FORTRAN, SQL

INCLUDE         ZSPSS_USER_TYPES.SDDL
 
RECORD  WGGS_CMT_TYPE
 
!------------------------------------------------------------------------------
!
!   RECORD INFORMATION
!
!------------------------------------------------------------------------------
 
    DESCRIPTION       "If the Guide Star Selection System returns pair
                      comments, the SPSS response processing program 
                      WRESPONS inserts them in the wggs_cmts relation.

                      Whether or not comments are returned is determined
                      by the setting of the GSAR_Output_Pair_Comments_Flag
                      in the GSSS Request Processor task parameter file.
                      The flag is currently set to FALSE. Setting it to
                      TRUE can be done by running an interactive request
                      and editing the parameter file, or by inputting
                      a user specified parameter file when running
                      the SPSS command GSSS/REQUEST/COMMENTS=afile.dat,
                      where 'afile.dat' specifies a particular task parameter
                      file.

                      An example of a pair comment is a count of the number
                      of satisfied primary target/aperture combinations."
 
!------------------------------------------------------------------------------
!
!   FIELD INFORMATION
!
!------------------------------------------------------------------------------
 

    FIELD  response_num
        TYPE GS_RESPONSE_NUM_TYPE
    END_FIELD


    FIELD  proposal_id
        TYPE PROPOSAL_ID_TYPE
    END_FIELD
 

    FIELD  obset_id
        TYPE OBSET_ID_TYPE
    END_FIELD
 

    FIELD  version_num
        TYPE VERSION_NUM_TYPE
    END_FIELD
 

    FIELD  gs_pair_id 
        TYPE GS_PAIR_ID_TYPE
    END_FIELD
 

    FIELD  page_num
        ! Can't use PAGE_NUM_TYPE here !
        TYPE            C4  
	DESCRIPTION     "This field is a page number for a PMDB comments
                         relation and enables multiple pages of comment
                         text to be entered."
    END_FIELD
 

    FIELD  comment1
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment2
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment3
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment4
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment5
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment6
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment7
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment8
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment9
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment10
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment11
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment12
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment13
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment14
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment15
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment16
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment17
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment18
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment19
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment20
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment21
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment22
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment23
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 

    FIELD  comment24
        TYPE COMMENT_LINE_TYPE
    END_FIELD
 
END_RECORD
 
!------------------------------------------------------------------------------
!
!   RELATION DECLARATION
!
!------------------------------------------------------------------------------
 
 
RELATION  wggs_cmts
 
    TYPE             WGGS_CMT_TYPE
 
    DESCRIPTION      "Guide Star Comments Relation"
 
    SUBSYSTEM_USING  "SPSS"
 
    INDEX  wggs_cmts_1
        TYPE         unique, clustered
        FIELDS       proposal_id, obset_id, version_num, response_num, 
                     gs_pair_id, page_num
    END_INDEX

    INDEX  wggs_cmts_2
        TYPE         unique, nonclustered
        FIELDS       response_num, gs_pair_id, proposal_id, obset_id, 
                     version_num, page_num
    END_INDEX

END_RELATION
 
!------------------------------------------------------------------------------
!
!   INSTANCE DECLARATION
!
!------------------------------------------------------------------------------
 
 
INSTANCE  wggs_cmts
 
    GLOBAL
 
    TYPE        WGGS_CMT_TYPE

END_INSTANCE

Go to the top.