(FILECREATED " 8-May-86 10:40:10" {ROSEBOWL}<FEUERMAN>LISP>NCCLIENTCALLER.;4 1838   

      changes to:  (COURIERPROGRAMS NoteCardsClient)

      previous date: " 2-May-86 11:23:55" {ROSEBOWL}<FEUERMAN>LISP>NCCLIENTCALLER.;2)


(PRETTYCOMPRINT NCCLIENTCALLERCOMS)

(RPAQQ NCCLIENTCALLERCOMS ((* This file will load the NoteCardsClient Courier Program without the 
				IMPLEMENTEDBY statements. Thus, no one can use this machine as a 
				Client Listener.)
			     (FILES NCCOURIER)
			     (COURIERPROGRAMS NoteCardsClient)))



(* This file will load the NoteCardsClient Courier Program without the IMPLEMENTEDBY 
statements. Thus, no one can use this machine as a Client Listener.)

(FILESLOAD NCCOURIER)

(COURIERPROGRAM NoteCardsClient (1508 1)
    TYPES
      [(CARDPART (ENUMERATION (SUBSTANCE 0)
			      (TOLINKS 1)
			      (FROMLINKS 2)
			      (TITLE 3)
			      (PROPLIST 4)
			      (GLOBALTOLINKS 5]
    PROCEDURES
      ((CardCreated 1 (UID UID)
		    RETURNS
		    (BOOLEAN)
		    REPORTS
		    (ServiceNotImplemented)
		    IMPLEMENTEDBY NCCLIENT.CARDCREATED)
       (CardDeleted 2 (UID UID)
		    RETURNS
		    (BOOLEAN)
		    REPORTS
		    (ServiceNotImplemented)
		    IMPLEMENTEDBY NCCLIENT.CARDDELETED)
       (WriteLockObtained 3 (UID UID CARDPART)
			  RETURNS
			  (BOOLEAN)
			  REPORTS
			  (ServiceNotImplemented)
			  IMPLEMENTEDBY NCCLIENT.WRITELOCKOBTAINED)
       (CardPartChanged 4 (UID UID CARDPART)
			RETURNS
			(BOOLEAN)
			REPORTS
			(ServiceNotImplemented)
			IMPLEMENTEDBY NCCLIENT.CARDPARTCHANGED)
       (WriteLockReleased 5 (UID UID CARDPART)
			  RETURNS
			  (BOOLEAN)
			  REPORTS
			  (ServiceNotImplemented)
			  IMPLEMENTEDBY NCCLIENT.WRITELOCKRELEASED))
    ERRORS
      ((ServiceNotImplemented 1 (STRING)))
    INHERITS
      NIL)
(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP