Re: U2 hide error

["Robert Holmgren" holmgren@xxxxxxxx]

** Reply to message from Harry Binswanger  on Fri, 09 Jun 2006
00:45:13 -0400

Harry:

Pulling back from the specifics of your usage, here's the problem as I see it:
HIDE puts Save/Gets away on a LIFO basis. If you balance each HIDE call with a
nested UNHIDE call, then what goes in must of necessity be identical to what
comes out. Parsing doesn't enter into the procedure. If you HIDE seven S/Gs
in order 01, 02, 03, 04, 05, 06, 07, then they are going to UNHIDE in order 07,
06, 05, 04, 03, 02, 01. The content of each of these seven pieces of data
can't possibly change!

Looking at your frame, I see two important departures from the original
AUTOFILE: You've commented out BX es 1Q2 (why? that's important!), and you
have two spaces instead of just one at BX  [delete one extra
space]Q2 . That last error is not trivial! Unless that's a formatting
error from your Emailer -- it seems to indent many new lines with two spaces
instead of just one...

Lastly, Carl's right: there's no trace here, no demo, of your problem.
Where's the "a" going in, "A" coming out? Here's a real demo, using *your
frame* (making the two corrections above, and changing S/G 01 to a valid
directory on my box). It works perfectly: hidden "a" in, hidden "a" out.
SAve this code to file, open a NEw [UNTITLED] window, scribble something in it,
then -- keeping the scribble in the current window -- RUN the following program
file:

XPLeNCODE v2.0
b-gin [UNTITLED]
{<}SV07,c{>}{<}SV06,b{>}{<}SV05,a{>}{<}SV04,b{>}{<}SV03,c{>}{
<}SV02,d{>}{<}SV01,e{>}[JM_]2.HIDE:01-07[Q2_]{<}GLz{>}[cr|lf]
{{;5hbautsav,hb}} My version of AutoFile for HBL use[cr|lf]{0
02};*; for HBL: adaptation of U2 AutoFile routine; March 25,{032}
2005[cr|lf]{<}LBz{>}[XH_][BX_]es 1[Q2_];*;[cr|lf]{<}SV01,G:\X
Y4\BTFONTS\{>};*; path to save backups of xfr.mbx in[cr|lf]{<
}SX02,{<}VA$MT{>}{>};*; $tm is time[cr|lf]{<}SX02,"[BX_]d mt=
"+{<}IS02{>}+"[Q2_]"{>}[BX_]d mt=1[Q2_];*; now have time in 2
4-hour form[cr|lf]{<}LBa{>};*;[cr|lf]{<}SX03,{<}VA$TM{>}{>};*
; 03 = time, e.g., 14:32[cr|lf]{<}SX04,{<}VAEU3{>}{>};*; have
 to do this to get colon for parsing it out below[cr|lf]{<}XS
03,04,05,,06{>};*; now 05 = hour (14) and 06 = minute (32)[cr
|lf]{<}SX03,{<}IS05{>}+"."+{<}IS06{>}{>};*; now 03 = e.g., 14
{046}32 for hh.mm in filename[cr|lf]{<}SX04,{<}VA$DAyymmdd{>}{>};
*; 04 = date in yymmdd format[cr|lf]{<}IF{<}VA|03{>}<5{>}{<}S
X03,"0"+{<}IS03{>}{>}{<}EI{>};*; add leading 0 if necessary[c
r|lf]{<}SX01,{<}IS01{>}+{<}IS04{>}+{<}IS03{>}{>};*; now 01 ={032}
e.g., C:\MAILHBL\05032413.32[cr|lf]{<}SV03,ABCDEFGHIJKLMNOPQR
STUVWXYZ0123456789{>};*; for last char. of extension[cr|lf]{<
}SV04,{027}X{>}{<}SV05,{>};*; 04 = wildcard [wX][cr|lf]{<}LBb
{>};*;[cr|lf]{<}IF{<}IS05{>}=="9"{>}{<}SX50,5{>}[JM_]2.sleep[
Q2_]{<}GLa{>};*; none left, wait then loop[cr|lf]{<}EI{>};*;{032}
below, 03 = ABCDEF ... table[cr|lf]{<}XS03,04,,05,06{>};*; pa
rse table with wildcard [wX] to get one character into 05[cr|
lf]{<}SX03,{<}IS06{>}{>};*; chop table BCDEF ...[cr|lf]{<}SX0
6,{<}IS01{>}+{<}IS05{>}{>};*; 06 = C:\MAILHBL\050324.32A[cr|l
f][BX_]exist {<}PV06{>}[Q2_]{<}IF@not({<}ER{>}){>}{<}GLb{>};*
; if that filename exists, loop[cr|lf]{<}EI{>};*; below here{032}
have valid filespec so rest is saving and prompting[cr|lf]{<}
SV01,sa{>}{<}SV
03,Saved to {>}{<}IF{<}VA$WS{>}<1!{<}VA$WS{>}+{<}VA$XD{>}>2{>
}{<}SV01,ne{>}{<}SV03,Opened as {>}{<}EI{>};*;[cr|lf][BX_]{<}
PV01{>} {<}PV06{>}[Q2_][BX_]wait[Q2_]{<}IF{<}ER{>}{>}{<}SX03,
{<}VA$ER{>}{>}{<}SX03,"{<}VA\"+{<}IS03{>}+"{>}"{>}{<}SX03,{<}
PV03{>}{>}{<}SV06,{>}{<}EI{>};*;[cr|lf][BX_]d mt=0[Q2_];*; re
set time format to AM/PM from 24-hour[cr|lf]{<}PV02{>}{<}SX01
,{<}IS03{>}+{<}IS06{>}{>}{<}PR@01{>};*;[cr|lf][JM_]2.UNHIDE[Q
2_]{<}SX99,"Here's S/G 05: "+{<}IS05{>}{>}{<}PR@99{>}{<}EX{>}
{002}[cr|lf][cr|lf]
-nd
XPLeNCODE

-----------------------------
Robert Holmgren
holmgren@xxxxxxxx
-----------------------------