Object <- PrinterQueue <- FaxServer |
|
|
DoPhaseB DoPhaseC DoTCFTraining PrintPixelMap ReadHDLC ReinitializeClass SetLocalSubscriber WriteHDLC |
Class FaxServer defines no new attributes.
Fields
| Field | Type | |
|---|---|---|
| PrinterQueue: | spooler: | PrintServer |
| jobs: | ObjectList | |
| prototypePrintJob: | PrintJob | |
| image: | Image | |
| printerBusy: | Semaphore | |
| FaxServer: | faxFlags: | Flags |
| storage: | Object | |
| faxPagesCompleted: | Unsigned |
instance FaxServer tag; spooler: nilObject; jobs: nilObject; prototypePrintJob: nilObject; image: nilObject; printerBusy: nilObject; faxFlags: 0x00000000; storage: nilObject; faxPagesCompleted: 0; end instance;
#endif /* FAX_SERVER */ Define Class FaxServer; inherits from PrinterQueue; field faxFlags: Flags; field storage: Object; field faxPagesCompleted: Unsigned; overrides PrintPixelMap; // Print the imaged bits now. operation ReadHDLC(var fcf: UnsignedByte; fif: Pointer; var length: SignedShort; var lastFrame: Boolean; timeout: SignedShort): Boolean; operation WriteHDLC(fcf: UnsignedByte; fif: Pointer; length: SignedShort; frameFlags: UnsignedByte; transmitter: Boolean): Boolean; operation DoPhaseB(var minScanlineBytes: UnsignedShort; fineMode: Boolean; var localCapabilities: Unsigned; var minScanTime: SignedShort): Boolean; operation DoPhaseC(stream: Object; minScanlineBytes: UnsignedShort; buffer: Pointer; lineBuffer: Pointer; var localCapabilities: Unsigned; faxTotalPages: Unsigned; faxViewableCount: Unsigned): Unsigned; operation DoTCFTraining(var minScanlineBytes: UnsignedShort; var localCapabilities: Unsigned; minScanTime: SignedShort): Boolean; intrinsic SetLocalSubscriber(buffer: Pointer); overrides ReinitializeClass; // hack to take down fax progress announcement when faxing is interrupted end class;