-- Copyright (C) Xerox Corporation 1985, 1986. All rights reserved. -- PSExecMessagesImpl.mesa -- Last edited by Jacks 29-Jul-86 17:20:31 DIRECTORY PSExecMessages USING [Key, totalKeys], PSKMessages USING [Name], XMessage USING [ AllocateMessages, Handle, Messages, MsgEntry, MsgID, RegisterMessages], XString USING [FromSTRING]; PSExecMessagesImpl: PROGRAM IMPORTS PSKMessages, XMessage, XString EXPORTS PSExecMessages = BEGIN <> segmentOneFirstKey: CARDINAL = ORD[FIRST[PSExecMessages.Key]]; segmentOneLastKey: CARDINAL = ORD[PSExecMessages.Key[mUnreadableName]]; segmentOneSize: CARDINAL = segmentOneLastKey - segmentOneFirstKey + 1; segmentTwoFirstKey: CARDINAL = ORD[PSExecMessages.Key[mInstallFromFloppy]]; segmentTwoLastKey: CARDINAL = ORD[PSExecMessages.Key[mFull]]; segmentTwoSize: CARDINAL = segmentTwoLastKey - segmentTwoFirstKey + 1; segmentThreeFirstKey: CARDINAL = ORD[PSExecMessages.Key[mSelect]]; segmentThreeLastKey: CARDINAL = ORD[LAST[PSExecMessages.Key]]; segmentThreeSize: CARDINAL = segmentThreeLastKey - segmentThreeFirstKey + 1; ExecMsgEntry: TYPE = RECORD [ key: PSExecMessages.Key, msg: LONG STRING, id: XMessage.MsgID, translatable: BOOLEAN ¬ TRUE]; InitMessages: PUBLIC PROCEDURE RETURNS [execMsgs: XMessage.Handle] = BEGIN execMsgs ¬ XMessage.AllocateMessages[ applicationName: PSKMessages.Name[exec], maxMessages: PSExecMessages.totalKeys, clientData: NIL, proc: NIL]; RegisterSegmentOne[execMsgs]; RegisterSegmentTwo[execMsgs]; RegisterSegmentThree[execMsgs]; END; -- of InitMessages RegisterSegmentOne: PROCEDURE [execMsgs: XMessage.Handle] = BEGIN entries: ARRAY [0..segmentOneSize) OF ExecMsgEntry = [ -- PRINT SERVICE NAME STRING -- Used by the PrintSDF file. -- This key must be the first key in the domain because it's value (0) -- is hardcoded in PrintSDFImpl.mesa. [mPrintService, "Print Service"L, 5], -- INITIALIZATION MESSAGES [mPrompt, "PS"L, 7], [mSpecifyOption, "Specify printing option"L, 10], [mSpecifyNonNormalOption, "Specify non-normal startup options"L, 11], [mConfigure, "Change configuration"L, 12], [mDeleteBackingFiles, "Delete backing files"L, 13], [mConfirmDeleteBackingFiles, "Ready to delete all Print Service backing files, including print queue data"L, 14], [mSpecifyRavenBuild, "Specify printer version"L, 15], [mConfirmOption, "Please confirm that printing option be changed to <1>"L, 20], [mNotSupported, "The <1> is not currently supported."L, 25], [mAnotherSelection, "Please make another selection."L, 30], [mDeletingFiles, "Deleting files..."L, 31], [mStopAll, "Stop queuing and printing"L, 32], [mCannotRunPS, "Cannot run Print Service."L, 34], [mPSNotProductFactored, "No Print Service software options enabled."L, 35], [mNoPrintingOptionSoftware, "No Print Service printing option software installed."L, 36], [mOptionsNotProductFactored, "No Print Service printing option software installed for the currently enabled software options."L, 37], [mDeleteOldFonts, "Any fonts installed for <1> will be deleted."L, 40], [mCheckFonts, "CHECK THAT FONTS HAVE BEEN INSTALLED"L, 45], [mSetTarget, "PLEASE SET TARGET PRINT SERVICE"L, 50], [mSetTargetAndCheckFonts, "SET TARGET PRINT SERVICE AND CHECK FONTS"L, 55], [mAbnormalStartup, "User specified non-normal PS startup"L, 60], [mUnableToCatalogFonts, " ** Unable to catalog fonts because of test pattern in progress. Use the Start Printing command after test pattern completes."L, 62], [mSystemControl, "System Control"L, 65], --duplicated in ControlMessages [mMemoryNotAvailable, "Required memory is not available."L, 66], [mMemoryInUse, "Required memory already allocated to another incompatible function."L, 67], [mActivate, "Please activate Print Service and reboot server."L, 68], [mContinueToRun, "Continue to run <1>?"L, 71], [mNotRun, "<1> not run."L, 72], [mRetainParameters, "Retain current system parameters?"L, 75], [mBandBuffersPrompt, "Number of band buffers (normal value is <1>; each band buffer is <2> pages)"L, 76], [mDecomposeWhileMarkingPrompt, "Decompose while marking?"L, 77], [mSpoolWhileMarkingPrompt, "Allow spooling while marking?"L, 78], [mRMLimitPrompt, "RM page limit observed by decomposer"L, 79], [mVMLimitPrompt, "VM pages reserved by decomposer"L, 80], [mDeleteObsoleteFonts, "Delete fonts and test patterns incompatible with current printing option?"L, 81], [mUnlimitedPrintingPrompt, "Enable image gap reprinting?"L, 82], -- EXECUTIVE COMMAND MESSAGES -- Miscellaneous messages [mOneCommaTwo, "<1>, <2>"L, 115], [mQuestion, "??"L, 120], [mDone, "Done."L, 125], [mDoneExpanded, "Done<1>."L, 130], [mNull, ""L, 135], [mAsterisk, "*"L, 140], [mConfirm, "Please confirm"L, 145], [mConfirmExpanded, "Please confirm <1>"L, 150], [mCanceled, "Canceled."L, 155], [mNone, "None"L, 160], [mInvalidChoice, "Invalid Choice"L, 165], [mRetry, "Retrying..."L, 170], -- Command name strings [mListDocs, "List Documents"L, 215], [mCancelDoc, "Cancel Document"L, 220], [mStart, "Start"L, 225], [mStop, "Stop"L, 230], [mStartSpooling, "Start Queuing"L, 235], [mStopSpooling, "Stop Queuing"L, 240], [mStartPrinting, "Start Printing"L, 245], [mStopPrinting, "Stop Printing"L, 250], [mStartDiagnostic, "Start Diagnostic"L, 255], [mStartPrintService, "Start Print Service"L, 260], [mWakeupRaven, "Wakeup Printer"L, 265], [mShutdownRaven, "Shutdown Printer"L, 270], [mGetDisplay, "Get Printer Display"L, 275], [mPutDisplay, "Put Printer Display"L, 280], [mSetTargetPS, "Set Target Print Service"L, 285], [mSetParameters, "Set Parameters"L, 290], [mSetBanner, "Set Banner"L, 295], [mResetStats, "Reset Statistics"L, 300], [mRenamePrintService, "Rename Print Service"L, 305], [mShowStatus, "Show Status"L, 310], [mQueryTargetPS, "Query Target Print Service"L, 315], [mInstallFonts, "Install From Floppy"L, 320], [mListFonts, "List Fonts"L, 325], [mListTPs, "List Test Patterns"L, 330], [mDeleteFonts, "Delete Font"L, 335], [mDeleteTPs, "Delete Test Pattern"L, 340], [mPrintTP, "Print Test Pattern"L, 345], [mSetTrace, "Set Trace"L, 358], -- Document-related command messages [mDocList, "Sent By Document Status Document Name Pages"L, 395], [mDocListTerse, " <1> (<2>)"L, 400], [mFaxDocList, " Transmit Status Destination Date Time Phone Time"L, 405], [mDocsListed, "<1> document(s) listed."L, 410], [mDocsCanceled, " <1> document(s) canceled."L, 415], [mAllDocs, "All documents"L, 420], [mMarkingDoc, "Printing document"L, 425], [mForwardingDoc, "Forwarding document"L, 430], [mFormatDoc, "Formatting document"L, 435], [mInProgDocs, "Documents being processed"L, 440], [mQdDocs, "Queued documents"L, 445], [mCompDocs, "Completed documents"L, 450], [mUnCompDocs, "All uncompleted documents"L, 455], [mSpooling, "Being received"L, 460], [mSpooled, "Queued"L, 465], [mRequeued, "Requeued"L, 470], [mBeingFormatted, "Being formatted"L, 475], [mDecomposed, "Formatted"L, 480], [mBeingPrinted, "Being printed"L, 485], [mPrinted, "Printed"L, 490], --duplicated in ControlMessages [mBeingForwarded, "Being forwarded"L, 495], [mForwarded, "Forwarded"L, 500], [mSpoolFailure, "Queue failure"L, 505], [mDecomposeFailure, "Format failure"L, 510], [mMarkFailure, "Print failure"L, 515], [mForwardFailure, "Forwarding failure"L, 520], [mCanceledInQueue, "Canceled in queue"L, 525], [mCanceledInDecomposer, "Canceled in formatter"L, 530], [mCanceledInMarker, "Canceled at printer"L, 535], [mCanceledInForwarder, "Canceled in forwarder"L, 540], [mSysRestartInQueue, "Purged from queue"L, 545], [mSysRestartInSpooler, "Purged from receiving queue"L, 550], [mSysRestartInDecomposer, "Purged from formatter"L, 555], [mSysRestartInMarker, "Purged from printer"L, 560], [mSysRestartInForwarder, "Canceled in forwarder"L, 565], [mLocal, "Local"L, 570], [mPending, "Pending"L, 575], [mInProgress, "In progress"L, 580], [mCompleted, "Completed"L, 585], [mBeingTransmitted, "Being transmitted"L, 590], [mTransmitted, "Transmitted"L, 595], --duplicated in ControlMessages [mNoAnswer, "No answer"L, 600], --duplicated in ControlMessages [mTransmitError, "Transmit error (<1>)"L, 605], --almost duplicated in ControlMessages [mShortXmitError, "Transmit error(<1>)"L, 606], [mWillRetry, "<1>-will retry"L, 610], [mBadPhoneNo, "Invalid phone number"L, 615], [mFaxFailure, "Local fax failure (<1>)"L, 620], --almost duplicated in ControlMessages [mShortFaxFailure, "Fax failure(<1>)"L, 621], [mAborted, "Aborted"L, 625], --duplicated in ControlMessages [mAnonymous, ""L, 630], [mPhoneTime, "<1>:<2>"L, 635], [mUnreadableName, "?? (Unreadable name)"L, 640] --Update segmentOneLastKey above ]; messages: ARRAY [0..segmentOneSize) OF XMessage.MsgEntry; FOR i: CARDINAL IN [0..segmentOneSize) DO messages[i] ¬ [ msgKey: ORD[entries[i].key], msg: XString.FromSTRING[entries[i].msg], translationNote: NIL, translatable: entries[i].translatable, type: userMsg, id: entries[i].id]; ENDLOOP; XMessage.RegisterMessages[ h: execMsgs, messages: DESCRIPTOR[messages], stringBodiesAreReal: FALSE]; END; -- of RegisterSegmentOne RegisterSegmentTwo: PROCEDURE [execMsgs: XMessage.Handle] = BEGIN entries: ARRAY [0..segmentTwoSize) OF ExecMsgEntry = [ -- EXECUTIVE COMMAND MESSAGES, cont. -- Font/file/test pattern/floppy-related messages [mInstallFromFloppy, "Install from Floppy: "L, 735], --Update segmentTwoFirstKey above [mFilesInstalled, " file(s) installed from <1>."L, 740], [mInstallFile, "Install <1> <2>"L, 745], [mFloppyNew, "(New)"L, 750], [mFloppyNewer, "(Newer)"L, 755], [mFloppySame, "(Same Version)"L, 760], [mFloppyOlder, "(Older)"L, 765], [mInstalling, "Installing <1>..."L, 770], [mFloppyFileCreated, "File version on floppy: <1>"L, 775], [mRDFileCreated, "File version on Print Server: <1>"L, 780], [mFloppyPleaseRemoveAndInsert, " Please remove floppy disk and insert <1> into reader."L, 785], [mInsertFloppy, "Please insert floppy, type Y when ready."L, 790], [mFloppyError, " ** Floppy error: <1>"L, 795], [mFloppyErrBadDisk, "Bad disk."L, 800], [mFloppyErrBadSectors, "Bad sectors."L, 805], [mFloppyErrHardware, "Hardware."L, 810], [mFloppyErrInvalidVolumeHandle, "Invalid volume handle."L, 815], [mFloppyErrNeedsScavenging, "Needs scavenging."L, 820], [mFloppyErrNoSuchDrive, "No such drive."L, 825], [mFloppyErrNotReady, "Not ready."L, 830], [mFloppyErrStringTooShort, "String too short."L, 835], [mFloppyErrVolumeNotOpen, "Volume not open."L, 840], [mFloppyErrInsufficientVolSpace, "Insufficient volume space."L, 845], [mFloppyErrUnknown, "Unknown."L, 850], [mFloppyReadError, " ** Floppy read error."L, 855], [mFloppyScriptError, "*** Font script error."L, 860], [mFloppyCreateFileError, "Create font file error."L, 865], [mFloppyFileError, "File error."L, 870], [mFloppyDone, " done."L, 875], [mFloppyIncompleteScript, "*** Incomplete font script."L, 880], [mFloppyNotFilePiece, "*** <1> is not a file piece."L, 885], [mFloppyCanceled, "*** Canceled."L, 890], [mBadFontFileType, "Font file ""<1>"" is incompatible with current printing option."L, 895], [mPleaseStopPrinting, "Please Stop Printing to <1> and Start Printing when done."L, 900], [mDocInProgress, " ** Document in progress!"L, 901], [mFontList, " <1> (<2> pages, created <3>)"L, 905], [mFontsListed, " <1> font(s) listed."L, 910], [mTPsListed, " <1> test pattern(s) listed."L, 915], [mDeletePrompt, "Delete <1>"L, 920], [mDeleting, "Deleting <1> ..."L, 925], [mFontsDeleted, " <1> font(s) deleted."L, 930], [mFilesDeleted, " <1> file(s) deleted."L, 935], [mTPsDeleted, " <1> test pattern(s) deleted."L, 940], [mEnterCopyC, "Enter copy count"L, 945], [mSelPaperSizeForTestPat, "Specify paper size"L, 950], [mLocalPrint, "Local print?"L, 955], [mRemotePrint, "Remote print?"L, 960], [mEnterPhoneNo, "Enter telephone number"L, 965], [mTPQueued, " Test Pattern queued for printing."L, 970], [mTPNotavailable, "**Test Pattern not available."L, 975], [mCantQueueTP, "**Can't queue Test Pattern."L, 980], [mNoTPs, "**No test patterns found."L, 985], [mInvalidPhoneNo, "Telephone number is not valid; "L, 990], -- Print Service status command messages [mStatusHerald, " Print Service ""<1>"" <2>"L, 1090], [mStarted, "started"L, 1095], [mStopped, "stopped"L, 1100], [mRepairMode, "is in repair mode"L, 1105], [mDiagMode, "is in diagnostic mode"L, 1110], [mInstalled, " Installed <1>"L, 1115], [mServerBooted, " Last booted <1>"L, 1120], [mQueuingStartedBy, " Queuing started by: <1>"L, 1125], [mPrintingStartedBy, " Printing started by: <1>"L, 1130], [mQueuingStoppedBy, " Queuing stopped by: <1> <2>"L, 1135], [mPrintingStoppedBy, " Printing stopped by: <1> <2>"L, 1140], [mQueuingPreempted, " Queuing preempted"L, 1145], [mPrintingPreempted, " Printing preempted"L, 1150], [mTimesRebooted, "<1>; Times rebooted = <2>"L, 1155], [mLastActivity, " Last activity <1>"L, 1160], [mStatsReset, " Statistics reset <1>"L, 1165], [mTotalVolumePages, " Total <1>volume pages = <2>; Free pages = <3>"L, 1170], [mUserVol, "user "L, 1175], [mSystemVol, "system "L, 1180], [mPagesAllocated, " Queue pages allocated = <1>; Font pages allocated = <2>"L, 1185], [mDocsPrinted, " Documents printed: <1>"L, 1190], [mDocsTransmitted, " Documents transmitted: <1>"L, 1200], [mDocsForwarded, " Documents forwarded: <1>"L, 1205], [mDocsCanceledStat, " Documents aborted: <1>; Total since reset: <2>"L, 1210], [mCommErrorsStat, " Queue failures: <1>; Total since reset: <2>"L, 1215], [mTPRequests, " Test pattern requests: <1>; Total since reset: <2>"L, 1220], [mRecoveryRetryRequests, " Recovery retry requests: <1>; Total since reset: <2>"L, 1225], [mDocsPurgedAtRecovery, " Docs purged at recovery: <1>; Total since reset: <2>"L, 1230], [mTotalSinceInstalled, "<1>; Total since reset: <2>"L, 1235], -- Printing option specific status messages: [mPrintingOption, " Printing option: <1>"L, 1240], [mRaven, "8040 Series Electronic Printer"L, 1245], [mFX3500, "Model-35 Electronic Printer"L, 1250], [mTC495, "Telecopier 495-1"L, 1255], [mBanshee, "NS 8000 Laser CP Electronic Printer"L, 1260], --duplicated in ControlMessages [mShortBanshee, "NS 8000 Laser CP"L, 1261], [mTC295, "Telecopier 295"L, 1265], [mFEPS, "Formatting Print Service"L, 1270], [mD1, "XP-9 Electronic Printer"L, 1275], [mRavenB1, "B1"L, 1280], [mRavenB2, "B2"L, 1285], [mPrinterStatus, " Printer <1>; Status: <2>"L, 1290], [mBusy, "Busy"L, 1295], --duplicated in ControlMessages [mIdle, "Idle"L, 1300], [mUnlimitedPrinting, " Image gap reprinting: <1>"L, 1392], [mTargetPS, "Target Print Service: <1>"L, 1305], [mForwardingActivity, " Forwarding activity: <1>"L, 1310], [mRetrying, "In progress; Status = <1>"L, 1315], [mOperationalParms, " Operational parameters: "L, 1320], [mUnknown, "UNKNOWN [<1>]"L, 1325], [mTargetNotSet, "Target Print Service not set."L, 1330], [mUnknownProblem, "Unknown problem."L, 1335], --duplicated in PrinterStatusMessages [mQueryError, " ** Query unsuccessful: <1>."L, 1340], [mCHName, "Clearinghouse name: <1>"L, 1345], [mNetAddress, "Network address: <1>"L, 1350], [mSpooler, "Spooler: <1>"L, 1355], [mFormatter, "Formatter: <1>"L, 1360], [mPrinter, "Printer: <1>"L, 1365], [mPaper, "Paper size = <1>"L, 1370], [mTwoSidedCopy, "Two-sided copy = <1>"L, 1375], [mStapling, "Stapling = <1>"L, 1380], [mEnabled, "Enabled"L, 1389], [mDisabled, "Disabled"L, 1390], [mAvailable, "Available"L, 1395], [mUnavailable, "Unavailable"L, 1400], [mNeedsAttention, "Needs attention"L, 1405], [mNeedsKeyOperator, "Needs key operator"L, 1410], [mFull, "Full"L, 1415] --Update segmentTwoLastKey above ]; messages: ARRAY [0..segmentTwoSize) OF XMessage.MsgEntry; FOR i: CARDINAL IN [0..segmentTwoSize) DO messages[i] ¬ [ msgKey: ORD[entries[i].key], msg: XString.FromSTRING[entries[i].msg], translationNote: NIL, translatable: entries[i].translatable, type: userMsg, id: entries[i].id]; ENDLOOP; XMessage.RegisterMessages[ h: execMsgs, messages: DESCRIPTOR[messages], stringBodiesAreReal: FALSE]; END; -- of RegisterSegmentTwo RegisterSegmentThree: PROCEDURE [execMsgs: XMessage.Handle] = BEGIN entries: ARRAY [0..segmentThreeSize) OF ExecMsgEntry = [ -- EXECUTIVE COMMAND MESSAGES, cont. -- Various parameter setting command messages [mSelect, "Select from"L, 1515], --Update segmentThreeFirstKey above [mExit, "Exit"L, 1520], [mPaperSize, "Paper size"L, 1525], [mSelTopPaper, "Specify top tray paper size"L, 1530], [mSelBottomPaper, "Specify bottom tray paper size"L, 1535], [mBottomTray, "bottom tray"L, 1540], [mTopTray, "top tray"L, 1545], [mBothTrays, "both trays"L, 1550], [mEnvelope, "Envelope"L, 1553], [mPostalCard, "Postal card"L, 1554], [mA4, "A4"L, 1555], [mA5, "A5"L, 1560], [mB4, "B4"L, 1565], [mB5, "B5"L, 1570], [mLegal, "8.5"" X 14"""L, 1575], [mLetter, "8.5"" X 11"""L, 1580], [mPaperSize2, "Paper size in <1> = <2>"L, 1585], [mFeed, "Feed"L, 1590], [mSpecifyFeedTray, "Specify feed tray"L, 1595], [mFromBottom, "From bottom"L, 1600], [mFromBottomBannerfromTop, "From bottom, banner from top"L, 1605], [mFromBottomorTop, "From bottom or top"L, 1610], [mFromTop, "From top"L, 1615], [mAlternateBottomAndTop, "Alternate bottom and top"L, 1620], [mAsAppropriate, "As appropriate"L, 1625], [mPaperFeed, "Paper feed = <1>"L, 1630], [mFromBottomBannerfromTopTray, "From bottom, banner from top tray"L, 1635], [mFromBottomorTopTray, "From bottom or top tray"L, 1640], [mStacking, "Stacking"L, 1645], [mSpecifyOutputStackingMode, "Specify output stacking mode"L, 1650], [mAligned, "Aligned"L, 1655], [mCopyOffset, "Each copy offset"L, 1660], [mSetOfCopiesOffset, "Each set of copies offset"L, 1665], [mOutputStacking, "Output stacking = <1>"L, 1670], [mPrintOrder, "Print order"L, 1675], [mSpecifyOutputPrintOrder, "Specify output printing order"L, 1680], [mFirstPagePrintedFirst, "First page printed first"L, 1685], [mLastPagePrintedFirst, "Last page printed first"L, 1690], [mPrintOrder2, "Print order = <1>"L, 1695], [mBanner, "Banner"L, 1700], [mSelBanner, "Select banner sheet option"L, 1705], [mSelLocalBanner, "Select local banner sheet option"L, 1710], [mSelRemoteBanner, "Select remote banner sheet option"L, 1715], [mPerCopy, "Per copy"L, 1720], [mPerSetOfCopies, "Per set of copies"L, 1725], [mSuppressed, "Suppressed"L, 1730], [mBanner2, "Banner = <1>"L, 1735], [mLocalBanner, "Local banner = <1>"L, 1740], [mRemoteBanner, "Remote banner = <1>"L, 1745], [mRegistration, "Registration"L, 1750], [mSetLongAxisRegistration, "Enter registration value for the long axis"L, 1755], [mSetShortAxisRegistration, "Enter registration value for the short axis"L, 1760], [mLongAxisRegistration, "Long (X) axis registration = <1>"L, 1765], [mShortAxisRegistration, "Short (Y) axis registration = <1>"L, 1770], [mRetries, "Transmission retries"L, 1775], [mTransmissionRetries, "Transmission retries (<1>) = <2>"L, 1780], [mRetryDelay, "<1>, retry delay (minutes) = <2>"L, 1785], [mRetries2, "Retries in case of <1>"L, 1790], [mRetryInterval, "Retry interval in minutes"L, 1795], [mNoConnection, "no connection"L, 1800], [mTransmitFailure, "transmit failure"L, 1805], [mCopies, "Multiple copies"L, 1810], [mSelLocalDuplicate, "Select local duplicate copy option"L, 1815], [mSelRemoteDuplicate, "Select remote duplicate copy option"L, 1820], [mAllowed, "Allowed"L, 1825], [mLocalCopies, "Local duplicate copies = <1>"L, 1830], [mRemoteCopies, "Remote duplicate copies = <1>"L, 1835], [mSpecifyFaxPaperWidth, "Specify 495-1 paper width supported"L, 1840], [mLetterLegalWidth, "8.5 inches (216 mm)"L, 1845], [mA4Width, "210 mm (8.3 inches)"L, 1850], [mSpecifyFaxResolution, "Specify 495-1 transmission resolution supported"L, 1855], [mStandard, "Standard"L, 1860], [mFine, "Fine"L, 1865], -- Set Target Print Service command -- NOTE: May be able to remove CH error messages. [mEnterNameOrAddr, "Enter clearinghouse name or network address"L, 1870], [mSetTargetWarning, " ** Warning: Target Print Service did not respond to status request."L, 1875], -- duplicated in ControlMessages [mTargetAttrDefaulted, " Paper size, two-sided copy and stapling attributes have been defaulted."L, 1880], [mUseCommand, " Use the <1> command to get the correct attributes."L, 1885], [mCantReadData, "Problem reading data entered."L, 1890], [mCHLookupProblem, "Unexpected clearinghouse problem."L, 1895], [mCHAuthProblem, "Authentication problem."L, 1900], -- Put/Get Printer Display commands [mPrinterDisplay, " Printer Display shows ""<1>"""L, 1905], [mDisplayChars, "Type two characters to display"L, 1910], -- Miscellaneous command messages [mPrintServerinRepairMode, "Print Service in Repair Mode, do you still want to Stop?"L, 2040], [mEnterReason, " Please enter reason"L, 2045], [mReason, "Reason: <1>"L, 2050], [mStartingPrinting, " Starting Printing..."L, 2055], [mStoppingPrinting, " Stopping Printing..."L, 2060], [mQueuingStarted, " Queuing Started<1>."L, 2065], [mStoppingQueuing, " Stopping Queuing..."L, 2070], [mCurrentlyPreempted, " (currently preempted)"L, 2075], [mDeleteOldName, "Delete old name..."L, 2080], [mAddNewName, "Add new name..."L, 2085], [mCheckClearinghouse, "You may need to perform this operation manually at the Clearinghouse."L, 2090], [mProblems, "Problems encountered..."L, 2095], [mTryAgainLater, "Please try again later."L, 2100], [mBootForNameOnBanner, "The new service name will not appear on the banner sheet until the server is rebooted."L, 2105], [mConflictingMode, " ** Cannot <1> because a conflicting operation is in progress."L, 2110], [mExpungeWarning, "Ready to delete all Print Service data, INCLUDING font files"L, 2115] ]; messages: ARRAY [0..segmentThreeSize) OF XMessage.MsgEntry; FOR i: CARDINAL IN [0..segmentThreeSize) DO messages[i] ¬ [ msgKey: ORD[entries[i].key], msg: XString.FromSTRING[entries[i].msg], translationNote: NIL, translatable: entries[i].translatable, type: userMsg, id: entries[i].id]; ENDLOOP; XMessage.RegisterMessages[ h: execMsgs, messages: DESCRIPTOR[messages], stringBodiesAreReal: FALSE]; END; -- of RegisterSegmentThree END. -- of PSExecMessagesImpl LOG [when - who - what] 23-Jul-85 15:31:53 - Jacks - Created. 7-Aug-85 12:47:15 - Jacks - Fixed MsgOps.DomainsFromFile catch phrase and InitMessages; hardcoded message IDs; got rid of obsolete CHS error msgs; added mUnreadableName. 14-Aug-85 16:08:43 - Jacks - Changed mPSNotProductFactored slightly. 28-Aug-85 15:47:58 - Jacks - Changed mPagesAllocated and mBanshee slightly. 10-Sep-85 16:35:51 - Jacks - Added mCannotRun mRetainParameters mNoPrintingOptionSoftware mOptionsNotProductFactored mContinueToRun mNotRun mBandBuffersPrompt mDecomposeWhileMarkingPrompt mSpoolWhileMarkingPrompt mRMLimitPrompt mVMLimitPrompt mDeleteObsoleteFonts mShortBanshee mSetTrace mDocInProgress. 26-Sep-85 9:31:36 - Jacks - Added mPostalCard mEnabled mUnlimitedPrinting; took hyphen out of mBanshee and mShortBanshee. 27-Sep-85 12:02:13 - Jacks - Added two spaces to mUnlimitedPrinting. 8-Oct-85 11:31:52 - Jacks - Changed string for mUnlimitedPrinting and added mUnlimitedPrintingPrompt. 15-Oct-85 9:59:32 - Jacks - Added mShortXmitError mShortFaxFailure mEnvelope; removed mbusy; capitalized mEnabled mDisabled mAvailable mUnavailable mNeedsAttention mNeedsKeyOperator mFull; changed mTransmitError mFaxFailure mFaxDocList slightly. 6-Nov-85 14:20:23 - Jacks - Removed RegisterMsgs and GetHandle; made InitMessages public; added mFontsNotCataloged mUnableToCatalogFonts mExpungeWarning. 7-Nov-85 11:25:17 - Jacks - Removed mFontsNotCataloged; changed mQueryError slightly. 12-Nov-85 12:03:10 - Jacks - Changed mPrintServerinRepairMode slightly. 13-Dec-85 16:13:13 - Jacks - Rewrote mPSNotProductFactored mNoPrintingOptionSoftware mOptionsNotProductFactored; added mCannotRunPS; renamed mCannotRun to mCannotRunNow; renamed module from ExecMessagesImpl to PSExecMessagesImpl. 29-Apr-86 13:55:33 - Jacks - Replaced mCannotRunNow with: mMemoryNotAvailable mMeans mDeactivated mActivate mMemoryTaken mRunBeforeOtherServices. 9-May-86 12:29:52 - Jacks - Changed mCommErrorsStat. 19-May-86 10:28:50 - Jacks - Changed mExpungeWarning; added mSpecifyNonNormalOption mConfigure mDeleteBackingFiles mConfirmDeleteBackingFiles mDeletingFiles. 20-May-86 11:39:43 - Jacks - Added mStopAll, mMemoryInUse; removed mMeans mDeactivated mMemoryTaken; changed mActivate, mRunBeforeOtherServices. 29-Jul-86 17:10:16 - Jacks - Removed mRunBeforeOtherServices (msg #69); reworded mMemoryInUse (#67).