(FILECREATED "23-Sep-85 22:32:44" ("compiled on " {QV}RELEASE1.2I>KIRKPATCH002.;2) "19-Mar-85 14:34:17" recompiled changes: NC.MakeLink in "SMALLLOOPS 17-Sep-85 ..." dated "17-Sep-85 18:34:36") (FILECREATED "23-Sep-85 22:31:56" {QV}RELEASE1.2I>KIRKPATCH002.;2 2945 changes to: (FNS NC.AddLinkToGraphCard NC.MakeLink NC.AddLinkToTextCard) (VARS KIRKPATCH002COMS) previous date: "23-Sep-85 15:44:46" {QV}NC>KIRKPATCH002.;1) NC.MakeLinkA0001 D1 (I 0 CardID F 0 SourceID F 1 Window) !@Pð¡iQiol ol h(35Q NC.PrintMsg 31Q CHARACTER 20Q CHARACTER) NIL ( 24Q "Selection ignored." 13Q "A Card/Box cannot link to itself. ") NC.MakeLink D1 (P 2 Type P 1 Link P 0 LinkID I 10Q LinkToInsertAfter I 7 NoDisplayFlg I 6 Message I 5 AnchorMode I 4 DisplayMode I 3 SourceID I 2 DestinationID I 1 LinkLabel I 0 Window F 3 PSA.Database F 4 NC.SelectingSingleCardMenu) | 0C¦@ b¿@¦C b¿F¦ob ¿BµigTChF bgð²@ Zd˜hG b€B¡hS XgHCBEADµCS hYdSG IS I(170Q NC.AddFromLink 163Q NC.AddToLink 143Q NC.DefaultLinkDisplayMode 122Q NC.GetNewLinkID 107Q NC.CoerceToID 104Q NC.MakeNoteCard 73Q NC.AskNoteCardType 70Q WINDOWREGION 54Q NC.SelectNoteCards 21Q NC.FetchWindow 10Q NC.IDFromWindow) (126Q NOTECARDLINK 61Q *New% Card* 44Q NC.MakeLinkA0001) ( 32Q "Please select the Card or Box to be linked to.") (PRETTYCOMPRINT KIRKPATCH002COMS) (RPAQQ KIRKPATCH002COMS ((* * FNS Redefined from NCLINKS) (FNS NC.MakeLink))) (PUTPROPS KIRKPATCH002 COPYRIGHT ("Xerox Corporation" 1985)) NIL