Re: Edit FootNote

[cld@xxxxxxxx (Carl Distefano)]

Reply to note from "M.W. Poirier"  Mon, 07
Mar 2005 10:40:59 -0400 (EDT)

> [EFN] is something I am going to use regularly. A very nice
> new U2 routine.

Thanks, Maben (and Manuel). Here is a revision, with a new feature:
If the cursor is not on an existing footnote when you issue
EFN the first time, EFN creates a *new* footnote (instead
of putting out an error message). This seems intuitive to me -- but
tell me what you think.

Also, this version does more to protect against erratic cursor
behavior associated with footnote windows. In a word, it's more
stable. Swap it in.

XPLeNCODE v2.0
b-gin [UNTITLED]
{{;5efn}} Edit footnote in separate window [CLD rev. 3/8/05][
cr|lf]{002}{<}IF0+{<}VA$WS{>}<>1{>}{<}PRNo file{>}{<}EX{>}{<}
EI{>}[BX_]es 1[Q2_]{<}SX56,{<}VA@50{>}{>}{<}SX50,{<}VA$ED{>}{
>}[JM_]2.GetPath[Q2_]{<}SX57,{<}IS50{>}+"\EFN.SAV"{>};*;[cr|l
f]{<}SU58,{<}IF0+{<}VA$DT{>}==8!0+{<}VA$DT{>}<1{>}[WG_]{<}IF0
+{<}VA$DT{>}>1{>}[MK_]{<}EI{>}{<}EI{>}{>}{<}IF{<}VA$FP{>}<>{<
}IS57{>}{>}[BX_]gofile {<}PV57{>}[Q2_]{<}IF@not({<}ER{>}){>}{
<}PREFN.SAV is open. ABort or STore it before editing another
 note{>}{<}EX{>}{<}EI{>}[GT_]{<}GT58{>}{<}IF{<}VA$TR{>}<>"0"{
>}{<}IF0+{<}VA$WA{>}<1{>}{<}PRNo window{>}{<}EX{>}{<}EI{>};*;
[cr|lf]{<}SX59,{<}CP{>}{>}[JM_]2.ef[Q2_]{<}LBa{>}[JM_]2.dfa[Q
2_][JM_]2.cut[Q2_][BX_]sa/nv {<}PV57{>}[Q2_][AS_][JM_]2.ef[Q2
_]{<}IF{<}CP{>}<>{<}PV59{>}{>}{<}SX50,{<}PV59{>}{>}[JM_]2.ReJ
uMP[Q2_]{<}EI{>}[AS_]{<}PREdit EFN.SAV. When done, issue EFN<
Helpkey> to (re)insert footnote{>}{<}EX{>}{<}EI{>}{<}SX59,{<}
CP{>}{>}[BX_]fn{<}IF{<}VA{021}56{>}>0{>}{<}PV56{>}{<}EI{>}[Q2
_]{<}GLa{>}{<}EI{>};*;[cr|lf][AS_]{<}IF0+{<}VA$TW{>}<1{>}{<}I
F{<}VA$TR{>}=="0"{>}{<}GT58{>}[AS_]{<}PRMove cursor onto foon
ote, switch back to this window & try again{>}{<}EX{>}{<}EI{>
}[JM_]2.ef[Q2_]{<}EI{>}{<}IF0+{<}VA$DE{>}<1{>}[JM_]2.dfa[Q2_]
{<}EI{>};*;[cr|lf][BX_]gofile {<}PV57{>}[Q2_][BX_]sa[Q2_][BX_
]wait[Q2_];*;[cr|lf][JM_]2.pst[Q2_][AS_][JM_]2.ab/nv[Q2_][JM_
]2.ef[Q2_]{<}PRNote inserted - File not SAved{>}{002}[cr|lf][
cr|lf]
-nd
XPLeNCODE

--
Carl Distefano
cld@xxxxxxxx