Re: U2 for date last saved

[Harry Binswanger hb@xxxxxxxx]

Carl,
Harry, you keep changing the rules! Yesterday, it was "the date the
file was last saved"; today it's "last printed".
Ooops, no I misspoke. It is indeed the file-date ("last saved," in effect),
so I know which print out is the current one.
 If all you want is
the date and time of printing, simply embed  and  in your
document, and Done.

Right.
But if you really want to embed the date and time of the last
*SAve*, you should note that the AddDI routine I posted yesterday
*works in NB*. Try it. Why make life difficult for yourself by
doing something kludge-y with FILEINFO, when there's a native way to
get what you want, with DocInfo?
Maybe it's just a prejudice against having things hanging off the end of
the file. Seems un-XyWrite-like: the file is no longer "transparent." But,
as I say, maybe that's prejudice. Maybe I'm being too "purist." Do you use
Doc Info? And, I assume having Doc Info running would mean I should set
Default 1A to not show anything past the 1A (otherwise, I'd always be
seeing the Info at the bottom of files).
 Since you have to modify your
imported-from-Word file in any event, you might as well enable
DocInfo and embed the VAs I mentioned yesterday: VA ^MD displays the
last-modified date and VA ^MT the last-modified time. It's elegant,
it's easy, and it works.

If you're worried about embedding data after the EOF, don't: you can
remove it at any time with DelDI.

Well, that's comforting. (Seriously--no sarcasm intended.)
 AddDI and DelDI are (or
will be, when AddDI is folded into U2) a matched pair that provides
effortless control over DocInfo. Be bold; give them a try.

While we're at it, here's a slightly modified, improved version of
AddDI:

Much appreciated, Carl. I'll try them.
XPLeNCODE v2.0
b-gin [UNTITLED]
{<}GL {>}[cr|lf]{{;5AddDI}} Embed Document Information in exi
sting file [CLD rev.9/7/07][cr|lf]{002}{<}LB{>}{<}IF{<}VA$WS{
{062}}<>1{>}{<}PRNo file{>}{<}EX{>}{<}EI{>}[XH_][BX_]es 1[Q2_][DX
_];*;[cr|lf]{<}SX01,{<}VA$WA{>}{>}{<}IF{<}PV01{>}<1{>}{<}PRNo
 window{>}{<}EX{>}{<}EI{>}[BX_]func #{<}PV01{>}[Q2_];*;[cr|lf
][BX_]sa[Q2_]{<}SX01,{<}VAIO{>}{>}{<}SX01,"[BX_]d io="+{<}IS0
1{>}+"[Q2_]"{>}[BX_]d io=1[Q2_];*;[cr|lf]{<}SX02,{<}VA$DT{>}{
{062}}{<}IF{<}PV02{>}<1{>}{<}SX01,100{>}{<}EI{>}[BX_]ne/{<}PV02{>
}[Q2_];*;[cr|lf][AS_][BX_]wait[Q2_]{<}SX02,{<}VA$FP{>}{>}{<}S
X03,{<}CP{>}{>}[BF_][BF_]{<}SX04,{<}CP{>}{>};*;[cr|lf][AS_][B
X_]me {<}PV02{>}[Q2_][BX_]wait[Q2_][BF_][BF_];*;[cr|lf]{<}IF{
<}CP{>}<>{<}PV04{>}{>}{<}PV01{>}{<}PRError while MErging file
 - No operation{>}{<}EX{>}{<}EI{>};*;[cr|lf][BX_]ernv {<}PV02
{>}[Q2_][AS_][BX_]ab/nv[Q2_]{<}IF{<}VA$WS{>}<1{>}[BX_]rs[Q2_]
{<}EI{>};*;[cr|lf][BX_]jmp {<}PV03{>}[Q2_][BX_]sa {<}PV02{>}[
Q2_][BX_]wait[Q2_]{<}PV01{>};*;[cr|lf][DO_][FF_]{<}PRDocInfo{032}
added{>}{<}EX{>}{002}[cr|lf][cr|lf]
-nd
XPLeNCODE

--
Carl Distefano
cld@xxxxxxxx


Harry Binswanger
hb@xxxxxxxx