ZMAXGT

 
【機能】

  タイプを与えて最大値を得る


【使用形式】

  CALL ZMAXGT(ITYP,IMAX)


【引数説明】

  ［INPUT］
         ITYP ：タイプ
                      1 ; G−No
                      2 ; グループ数
                      3 ; アイテム数
                      4 ; アクティブリスト
 
  ［OUTPUT］
     IMAX
                    >0 ; 最大値
                   =-1 ; タイプエラー