!+
!  Mpa_Cld.Cld
!  (21-Mar-88 : v1.0)
!
!             (C) Copyright 1988 by
!          Rand P. Hall and M.P.Gerlek
!              All Rights Reserved
!
! This CFile is to be linked w/ the other objects.
! Command form:
!   $ MPA /log /brief
!              /collect /output /start /stop /interval
!              /analyze /input /count
!-

Module MPA_tables

define verb MPA
    noparameters
    qualifier brief, syntax = brief
    qualifier collect, syntax = collect
    qualifier analyze, syntax = analyze

define syntax brief
    routine svass
    noparameters
    qualifier log
        value (type = $file, default = "MPA.Log")
        default

define syntax collect
    routine mpap
    noparameters
    qualifier log
        value (type = $file, default = "MPA.Log")
        default
    qualifier output
        value (type = $file, default = "MPA_Collect.Dat")
        default
    qualifier start
        value (type = $datetime, default = "-- ::.")         ! now
        default
    qualifier stop
        value (type = $deltatime, default = "1 00:00:00")    ! (one day)
        default
    qualifier interval
        value (type = $deltatime, default = "0 00:01:00")    ! (one minute)
        default

define syntax analyze
    routine anlz
    noparameters
    qualifier log
        value (type = $file, default = "MPA.Log")
        default
    qualifier input
        value (type = $file, default = "MPA_Collect.Dat")
        default
    qualifier count
        value (type = $number, default = "15")
        default