*DECK GANALYZ 
USETEXT RPTEXT
PROC  GANALYZ;
          BEGIN 
  
          #GANALYZ  ROUTINE#
          #THIS ROUTINE#
          #- IS CALLED BY LEVEL01PROCG# 
          #- IT IN TURN CALLS THE FOLLOWING ROUTINES . LINECL#
          #WHICH DOES ANALYSIS ON ALL LINE NUMBER CLAUSES#
          #APPEARING IN THE REPORT GROUP CURRENTLY UNDER# 
          #ANALYSIS . COLMNCL#
          #WHICH DOES ANALYSIS ON ALL COLUMN NUMBER CLAUSES#
          #APPEARING IN REPORT GROUP CURRENTLY BEING ANALYZED. #
          #NXTGRCL WHICH DOES ANALYSIS ON ALL NEXT GROUP CLAUSES# 
          #APPEARING IN CURRENT REPORT GROUP# 
          #ALSO- POSSIBLY ADDS ON TO THE CONTROLSLINK . TYPECL# 
          #WHICH DOES ANALYSIS FOR ALL THE RULES PERTAINING#
          #TO THE TYPE CLAUSE#
  
          XREF   PROC         LINECL; 
          XREF   PROC         COLMNCL;
          XREF   PROC         NXTGRCL;
          XREF   PROC         TYPECL; 
  
  
  # * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *#
  # * #   EPTRACE("GANALYZ")                                       # * #
  # * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *#
  
          #PROCESSING  PROCEDURES -#
  
          LINECL; 
          COLMNCL;
          NXTGRCL;
          TYPECL; 
  
  # * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *#
  # * #   EXTRACE("GANALYZ")                                       # * #
  # * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *#
  
          END #GANALYZ# 
          TERM
