(FILECREATED "30-Apr-87 16:26:29" ("compiled on " {QV}1.3K>NEXT>RHTPATCH251.;1) "12-Nov-85 14:59:23" tcompl'd in "INTERLISP-D 11-May-86 ..." dated "11-May-86 15:19:08") (FILECREATED "30-Apr-87 16:26:19" {QV}1.3K>NEXT>RHTPATCH251.;1 4114 changes to: (VARS RHTPATCH251COMS) (FNS NC.ProcessNoteFileNeedsTruncationError)) NC.ProcessNoteFileNeedsTruncationError D1 (P 0 TruncationFn I 16Q Don'tCheckForTruncationFlg I 15Q ReadOnlyFlg I 14Q QuietFlg I 13Q MenuPosition I 12Q PublicOrPrivate I 11Q PromptWindow I 10Q Don'tGetSpecialCardsFlg I 7 Don'tCreateInterfaceFlg I 6 Can'tTruncateFlg I 5 Don'tCreateArrayFlg I 4 Convertw/oConfirmFlg I 3 Don'tCreateFlg I 2 Don'tCacheTypesAndTitlesFlg I 1 NoteFilesHashArray I 0 NoteFile) ±G ²Gio@Éol ¿F³f@É*É$X²X@G dgð“gdgð²¿@ABCDEFGGGGGGGG gð²Ô@ABCDEFGGGGGGGG G ²Ghol ol g(253Q NC.PrintMsg 247Q CHARACTER 236Q CHARACTER 220Q WINDOWP 212Q NC.ProcessTruncationRequest 150Q NC.ProcessInspectAndRepairRequest 73Q NC.AskUserAboutTruncation 43Q NC.PrintMsg 37Q CHARACTER 7 WINDOWP) (256Q NoteFileNeedsTruncation 154Q Truncate% File 111Q Inspect% &% Repair 104Q CancelOpen 77Q Cancel 60Q NoteFileDevice 53Q NoteFile 24Q NoteFile) ( 242Q "See a NoteCards wizard." 231Q "No file truncation possible for this NoteFile." 32Q " has information written since last successful close or checkpoint." 20Q "NoteFile ") (PRETTYCOMPRINT RHTPATCH251COMS) (RPAQQ RHTPATCH251COMS ((* * Fixes bug reported by Kirk: NC.ProcessNoteFileNeedsTruncationError breaks with a shouldn't happen if the user selects outside of the menu asking whether to truncate or not.) ( * * Change to NCDATABASE) (FNS NC.ProcessNoteFileNeedsTruncationError))) (PUTPROPS RHTPATCH251 COPYRIGHT ("Xerox Corporation" 1987)) NIL