Programmer's ROM - The Computer Language Library/programmersrom.iso/ada/message/unitrep.doc

Text File | 1988-05-03 | 1.8 KB | 50 lines

package UNITREP is -- the unit status and resource reporting subsystem --within
WWMCCS ADP software. The UNITREP database stores validated --UNITREP messages
from all --organizations and units in the United --States armed forces and some
foriegn forces under U.S. control.

    package MESSAGE_INPUT_MODULE is
    --the module which communicates with the outside world. Incoming
    --messages are queued to the MESSAGE_VALIDATION_MODULE.

        task MESSAGE_REQUEST is
                entry REQUEST_FUNCTION(R: in PACKET_ACCESS);
        end MESSAGE_REQUEST;

    end MESSAGE_INPUT_MODULE;

  package MESSAGE_VALIDATION_MODULE is
  --the module which validates messages received from the
  --MESSAGE_INPUT_MODULE. Valid mesages are sent to the
  --DATABASE_BUILD module. Invalid messages and corresponding error
  --messages are sent to the MAN_MACHINE_INTERFACE module.

        task MESSAGE_RECEIVE is
                entry RECEIVE_FUNCTION(R: in PACKET_ACCESS);
         end MESSAGE_RECEIVE;

   end MESSAGE_VALIDATION_MODULE;

  package DATABASE_BUILD is
  --the module which sends valid messages to the database machine by
  --creating the appropriate database commands. Messages are sent via
  --stored command interface.

        task DATABASE_BUILD_TASK is
                entry RENDEZVOUS_POINT(IN_PACKET : in PACKET_ACCESS);
        end DATABASE_BUILD_TASK;

  end DATABASE_BUILD;

  package MAN_MACHINE_INTERFACE is
  --the module which controls the operator's terminal. Operator commands
  --are input and displays of system alerts and messages are output.

        task MMI_PACKET_PATH is
                entry PACKET_PROCESS(PP : in PACKET_ACCESS);
        end MMI_PACKET_PATH;

  end MAN_MACHINE_INTERFACE;

end UNITREP;