Trailing-Edge
-
PDP-10 Archives
-
decuslib10-01
-
43,50126/chgval.sav
There are no other files named chgval.sav in the archive.
h'0 +x-0x.8x?)p@(
~(@B+:pR A,@HWh6S:e(Z[
. SO%SC(pnf|``yDSJup.8ySC%wp(G")rMI `+
K0(5p-HpKaJMmM&dP`M
nPH@XxPHpmG")r?.@xp
pq0(zprHx H5
H0z " b+
<X->-8:-<+ggge}g#G ggG")rggINXG")rYO ggG")rgg7{@6@>O@ \8@,
~@[M`,
~,: Z*(*Zj[*[j\*\j]*]j^*^j_*_j`*aja*bjcc(),
~@h,
~Bhi j0@+.+{ j1@+2 k1@+2@l@t+* t1@+5@u+F,
~
@v@~@@@@,
~
@
+=,
~@@,
~@@@!@&@*@.@2@6@9@@@C@H@I@J,
~4,
~BKK,
~ L0@+K+{ M0@+M+M M0@+QNU(AH+| O0@+S+C O0@+V@+5+F@U@V+F,
~*WjW@@5fX+\X+pdY7+^Z+h,
~@_,
~B_` a0@+d+{fa7+f+g
JV+p
JU,
~@gBhh i0@+m+{ j1@+o+^
U JV,
~ $j4 A; ;1`+u@p@q+F0n q0@+x+}@vBvwdx+}
J@@@@@@,
~" x0@+")*yjz(),
~$@+} z0@+++! 2BV+
{0@+
"n@}~@@ @ +F 2BV+ 0@+@+@ "n+^ 0@+@+@
@ "n+F
+@+%@ @ @ @ "n+F@+@+%@ @ @ @ "n+F,
~&
+%@++ +&+: 0@+/+)@+} 0@+++,+("n@ @ @ "@ #+F@++2@+} #0@+4+4+1@ (@ ,"n ,0@+8")U(AHT()+`,
~( -0@+E@+%+?@+} -0@+A+A+>"n@ 0 0@ 1@ 3@ 4+F@++G@+} 40@+I+J+F"n@ 7 7@ 8@ :@ ;+F,
~*0K@ @B A A B0@+R+{ C1@+X C1@+X D1@+X D0@+Y+H" E F3B+e" G G3B+e" H I3B+e" J J3B+e" K L3B+e" M M2B+g* Nj N@+8+i@ Q"K+M R0@+k")* Sj S(),
~,@+}" T U3B+r" U V2B+u V W X@ +0 Y0@+w+w+l,
~.@ ^"K@ _+F,
~0B _ `,
~2 a0@++{ a1@+ b1@+ b1@+ c0@++H d+ e+ @ j+z j+
k+
@ p+z p q,
~4@ wB x x y0@++{ z1@+ z1@+ {1@+ {0@++H" | }3B+$" ~ ~3B+$"
3B+$"
3B+$"
3B+$"
2B+$+%@
+
0@+'")*
j
(),
~6@+}"
2"+/
1@+/+)"
3B+3"
3b+7"
3B+7"
2"+7+8+A"
3B+<"
2B+?@
@
@
@
0@+A+A+),
~8@
+F,
~:f
+F
+ed
+H@
+Qf
7+K
@
&B
'
'
(0@+N+{
)0@+P
)+e@
-,
~<B
-
.
/0@+U+{
/1@+\
01@+\
01@+\
11@+\
10@+]+Hf
27+_+`
2+e
JU@
8B
9
9
:1@+e@
=+Q
>,
~>
?0@+h")*
@j
@(),
~@@+}
A+p
B0@+o
B+p+r@
E
F@
G@
H+y
I+w@
K
K@
L@
M
N@
O+y
O0@+y+y+j,
~B@
P+F,
~D,8,
~FD)+")*
Qj
R+"
S
S2B++
#T.#@T#T1`+++
&
T T
+}*
Vj
VS(AH#T0@++},
~H
J
W*(@@T@@
W*(,
~J4,
~L
JzFn
JzFn,
~N #T.#@T#T0`+&
Xd+ @@T+#&
Z T
Fn+,
~P4,
~R
\*(
V J
\*(@+,
~T4,
~V
]*(@+,
~X4,
~ZHKi@ d
].
^`
^1`+6@+8,
~\4 ,
~^ d
_.
_`
`@
`"
aH
a`
c
c
dHKh
e DX
f*(]
ef
fHKi@
g0@+E+Q
g0@+G
j
k0@ +I
n
o0@ +K
r
s0@
+M
v
w0@
+O
z
{HKi@,
~`
|HKi@
}HKi@,
~b4,<G>{#pWWlY00000000000000
000<`$<bH
@o*X*X*PNEEDLHELP?HTYPEHINMYEORXNXHdH@8PHPH8<<<RSH@kINTORDERLTO=EXECUTEATHISNPGMEYOUAHAVETOVTYPEVINDYVORONMFORAHELPEMESSAGEHD@l<*HHuINH@vNUTOEEXECUTETHISBPROGRAMRUSE3THEPFOLLOWING COMMANDSOANDHACARRIAGETHDIwERRETURN:MH@P~ONH@*<E=TEXITVTHEVPROGRAMNHA8ONHY=TYPE.OUTTHISPMESSAGEHAXNUIB=R(NOTAAVALIDCOMMANDEATUPRESENTOTIME) INSERTHCPHIXXXXXXT=EINSERTRANTEMPNCHARGEONUMBERHB8ANDSYI=GFIRSTHCh:/1/2/3DIGIT OFCHARGE@NO)HAHAHVXXXXXX=VALIDATE<CHARGENUMBERXXXXXXHBHD$HH@I*HJH@8PHPH8<<<<H0<<***<NOTUA VALIDNCOMMAND;TPLEASEREFEROTOHELP(MESSAGEHC8P*2HV<<V<0<H0V<0<H0U***<TYPE*IN DESIRED CHARGE NUMBER.-SH0[H@8PHPH8<H0***HCHARGENO<NOTNUMERIC,ENTRYERRORH?(Y-N)-:HbH@8PHPH8<<HV*O* *=CHARGENUMBERHASLEADINGSPACES - REJECTEDHCk*GHp<V*B* *0DESCRIPTIONFORTHIS CHARGEP# =NH0rHA@PHPH@H@<Ttpy<y<T<T<V***<CHARGENUMBERH{HVH0PH0P"DELETEDH@@*H <V***$CHARGE NUMBER ALREADY EXISTINGHB <V* * * CHARGE NEMBQR NOT FOUNDHAh * H HH0V* * * CHARGE NUMBER H
$H($H
$H*$H
$H* * * INVALID CATEGORYHA0
<Ty
<
<T<<<T<<<<<0<0C2`$H
$H< H0
HH0PH0P H
HH@PHA@P<T* H
<0<00<0* * * TYPE IN CHARGE NO (6 CHARACTER) - H@
<0<H0U* * * CHARGE NUMBER NOT NUMERIC; ENTRY ERROR ? (Y-N) - H8
!H@8PHPH8<<HU00* * * KEY IN CHARGE NO - HH
*H@8PHPH8<<<<<<H0H00* * * CHARGE NO NOT NUMERIC ENTRY ERROR? (Y-N) - H
3H@8PHPH8<* * * KEY IN CHARGE NO - HH
;HU00<Tz`
?<
?<TH00<TH00* * * CHARGE NO H
C0H0PH0P NOT FOUNDH@P
GH00 H0
JHH0PH0P H
MHH@PHA@P<T* H
P<
Q<T~$H
R$H5HT4$H5$H33HT4H@T42 382PHSHSHSHRHRHRH P>HP[ TI
bHSHWHPX ;XT]<U<UI4[a6-m]Vl)9f}kH
jH
h<pc<U[Mm]t9 ]Vl)9f}kH
nH
l<pc<UaJ|M1i&}`k6\Y>uN H
rH
p<pc<UkN. Lm6E0]3HH
vH
t<pc<U_Z.*Cm6E0]3H
zH
x<pcHbHPXHmHPXHxHPXZx<.\x,~+px$$p+