%GO Global Output Utility
GT.M 27-APR-2025 17:17:43
^KOD(-999)
jildza dwqr
^KOD(-52)
`ayn daebz oi`
^KOD(-51)
dcya zerh
^KOD(-50)
mipezpd cqn z` geztl zexyt` oi`
^KOD(-44)
oiwz `l qihxk swez
^KOD(-43)
ieby ipci jxr zqpkd
^KOD(-42)
rbn zwqr mipezp oi`
^KOD(-41)
rbn `ll dwqr mipezp oi`
^KOD(-40)
zihpbn dwqr mipezp oi`
^KOD(-39)
oiwz `l jix`z
^KOD(-37)
oiwz `l wlc
^KOD(-36)
oiwz `l dahd cew
^KOD(-35)
oiwz `l dahd xtqn
^KOD(-34)
oiwz `l dahd mekq
^KOD(-33)
oiwz `l ccnl cenv jxr
^KOD(-32)
oiwz `l hicxw inelyz xtqn
^KOD(-31)
iwz `l minelyz xtqn
^KOD(-30)
mipiwz `l i`xy` ipezp
^KOD(-29)
oiwz `l tih
^KOD(-28)
oiwz `l way`w mekq
^KOD(-27)
oiwz `l dwqr beq
^KOD(-26)
oiwz `l rahn cew
^KOD(-25)
oiwz `l mekq
^KOD(-11)
qihxkd `xewa dlwz
^KOD(-10)
lcpd zlwz
^KOD(-9)
oken `l qihxkd `xew
^KOD(-8)
oiwz `l qihxkd `xew ddfn
^KOD(-7)
dlgzd `ll seqnd xtqn
^KOD(-6)
seqn xtqn oi`
^KOD(-5)
mkg qihxk e` gkwl xyw oi`
^KOD(-4)
mipezpd cqn z` geztl leki `l
^KOD(-3)
oexkf oi`
^KOD(-2)
xye`n `l dwqr beq
^KOD(-1)
dpken `l zkxrnd
^KOD(1)
qihxk mxgd .meqg
^KOD(2)
qihxk mxgd .aepb
^KOD(3)
i`xy`d zxagl xywzd
^KOD(4)
dxye` `l dwqr
^KOD(5)
mxgd .siefn qihxk
^KOD(6)
zeieby zepexg` zextq yely
^KOD(7)
ieby dgha` cew
^KOD(8)
miieby zaezk ipezp
^KOD(9)
sweza epi` qihxkd
^KOD(10)
iwlg xeyi`
^KOD(11)
xg`'/liin'/akek'/wp xqeg
^KOD(12)
seqna dyxen `l qihxkd
^KOD(13)
ieby dxzi cew .diigc
^KOD(14)
zyxl jieyn `l qihxk .diigc
^KOD(15)
zxeywza wzp .diigc
^KOD(16)
rahn beql d`yxd oi` .diigc
^KOD(17)
dwqra i`xy` beql d`yxd oi`
^KOD(26)
ieby ID :dwqr dgc
^KOD(29)
qihxk zqpkd avn oi`
^KOD(30)
90 xehwea riten `l qihxk
^KOD(31)
xehwea witpn oi`
^KOD(32)
xehwea bzen oi`
^KOD(33)
bzen witpn mixhnxt hq oi`
^KOD(34)
mixhnxta xiiz bzen oi`
^KOD(35)
miiw `l wleq
^KOD(36)
zxeywz oi` sweza `l qihxk
^KOD(37)
DCODE bzen hwiltpew
^KOD(38)
SVC 587 diigc
^KOD(39)
i`xy`d ibeq z` dgc qihxk
^KOD(40)
xye`n `l i`xy` beq
^KOD(41)
xye`n `l dwqr beq
^KOD(42)
dwqrd beq z` dgc qihxkd
^KOD(43)
xye`n `l rahn beq
^KOD(44)
oiwz `l 2 uexr
^KOD(45)
oiwz `l qihxk xtqn
^KOD(46)
zxye`n `l zihpbn dwqr
^KOD(47)
90 xehwea `l qihxkd
^KOD(48)
93 xehwea `l witpnd
^KOD(49)
92 xehwea `l beznd
^KOD(50)
wleq ipezp oi`
^KOD(51)
91 xehwea `l wleqd
^KOD(52)
mineqg uaewl zybl ozip `l
^KOD(53)
90 xehwea dieby dqipk
^KOD(54)
DCODE zaeyz diigc
^KOD(55)
587 zexiy cew diigc
^KOD(56)
zexiy cew diigc
^KOD(57)
mitwz uaew diigc
^KOD(58)
qihxkl oiwz `l dwqr beq
^KOD(59)
wlc dpi`y dwqra wlc qihxk
^KOD(60)
dwqr `ll xeyi`l d`yxd oi`
^KOD(61)
xye`n `l mipecren
^KOD(62)
wlc xiykn dwqr beqa hwiltpew
^KOD(65)
mkgd `xewl qihxk qipkdl dqp
^KOD(70)
xye`n `l dwqr beq
^KOD(71)
dwqr.q xyi` `l witpnd
^KOD(79)
bxeg rbn `ll ze`wqra mekq
^KOD(80)
qihxka dyxen `l dwqr cew
^KOD(85)
dyxen `l rahn dwqr cew
^KOD(90)
dyxen i`xy` beq oi`
^KOD(91)
dyxen `l libx i`xy` beq
^KOD(92)
dyxen `l sicr
^KOD(93)
dyxen `l iciin aeig
^KOD(96)
ziyxen dpi` hicxw zwqr
^KOD(98)
ziyxen dpi` minelyz zwqr
^KOD(100)
akx xtqna hwiltpew
^KOD(101)
mipezpd cqna miiw `l oecren
^KOD(110)
geehl uegn minelyz xtqn
^KOD(111)
oiwz `l melyzl menipin
^KOD(120)
he`` miih
^KOD(121)
zihpbna xye`n `l mkg qihxk
^KOD(122)
dwix micnren zniyx
^KOD(123)
aay z`iby
^KOD(124)
zxye`n `l zipetlh dwqr
^KOD(125)
iweg `l qihxk xtqn
^KOD(126)
dlertd z` lhia ynzynd
^KOD(130)
130 d`iby cew
^KOD(131)
131 d`iby cew
^KOD(132)
dahdl d`yxd oi`
^KOD(149)
miiw `l xlecd xry
^KOD(150)
dxwz oi`
^KOD(160)
oiwz `l ipci xeyi` xtqn
^KOD(161)
dneqg ziaihnxetpi` dwqr
^KOD(162)
ziaihnxetpi` dwqr
^KOD(200)
dgc qihxkd
^KOD(250)
qihxk zhlgd oi`
^KOD(251)
hwhpew qihxk zhlgd oi`
^KOD(257)
xeciyl zerepz oi`
^KOD(300)
akx xtqn oi`
^KOD(301)
ieby akx xtqn
^KOD(302)
welczl xye`n `l
^KOD(303)
oiwz `l xhnecitq
^KOD(400)
xeyi`l zelrl aiig
^KOD(450)
xeyi`l dilr zeawra diigc
^KOD(458)
xye`n `l i`xy` zxagl xywzd
^KOD(901)
zaezk ihxt mixqg
^KOD(902)
ipetlh xeyi` rval yi
^KOD(909)
mireci `l mihxt mixqg
^KOD(995)
zkxrna miiw ipevig dwqr ddfn
^KOD(996)
dwqr ddfn ipezp zlwz
^KOD(997)
drvazd xak dwqr
^KOD(998)
ynzyn ici lr lehia
^KOD(999)
dlgze` `l dwqr
^LEVSUGMS(1)
zery itl
^LEVSUGMS(2)
zetqep+qiqa zery
^LEVSUGMS(3)
zexnyn itl
^LEVSUGMS(4)
mini itl
^LEVSUGMS(5)
dxyn
^P1SBR(1)
mr
^P1SBR(2)
ila
^P1SBR(3)
cva
^P1SBR(4)
hrn
^P1SBR(5)
daxd
^P1STREET("IS","%")
%
^P1STREET("IS","%","wdilz axfil")
lifxa zlidw
^P1STREET("IS","`a` dll")
lld `a`
^P1STREET("IS","`ae bey")
yeb ea`
^P1STREET("IS","`ae bey","`l rac rli")
ilr car l`
^P1STREET("IS","`ae bey","`l-yxtd")
dtxy-l`
^P1STREET("IS","`ae bey","aiz dac")
cad zia
^P1STREET("IS","`ae bey","b'ax")
xa'b
^P1STREET("IS","`ae bey","d`ld")
dl`d
^P1STREET("IS","`ae bey","d`xnepiz")
zipenx`d
^P1STREET("IS","`ae bey","dbexo")
oxebd
^P1STREET("IS","`ae bey","de`ci")
ic`ed
^P1STREET("IS","`ae bey","diqnio")
oinqid
^P1STREET("IS","`ae bey","dtel")
letd
^P1STREET("IS","`ae bey","dtxgim")
migxtd
^P1STREET("IS","`ae bey","dylem")
melyd
^P1STREET("IS","`ae bey","dznx")
xnzd
^P1STREET("IS","`ae bey","g`b' neq`")
`qen 'b`g
^P1STREET("IS","`ae bey","ngnec xyic")
ciyx cengn
^P1STREET("IS","`ae bey","nrld dgniyd")
dyingd dlrn
^P1STREET("IS","`ae bey","xg' 29")
29 'gx
^P1STREET("IS","`ae bey","xg' 44")
44 'gx
^P1STREET("IS","`ae qp`o")
o`pq ea`
^P1STREET("IS","`ae qp`o","xg' 120")
120 'gx
^P1STREET("IS","`ahio")
oiha`
^P1STREET("IS","`ai`l")
l`ia`
^P1STREET("IS","`aibcex")
xecbia`
^P1STREET("IS","`aigil")
ligia`
^P1STREET("IS","`aigil","ao vai")
iav oa
^P1STREET("IS","`aigil","d`exo")
oxe`d
^P1STREET("IS","`aigil","dapim")
mipad
^P1STREET("IS","`aigil","dbcec draxi")
ixard cecbd
^P1STREET("IS","`aigil","dcwl")
lwcd
^P1STREET("IS","`aigil","ddbpd")
dpbdd
^P1STREET("IS","`aigil","ddcxim")
mixcdd
^P1STREET("IS","`aigil","drvn`ez")
ze`nvrd
^P1STREET("IS","`aigil","dtln""g")
g"nltd
^P1STREET("IS","`aigil","dyenx")
xneyd
^P1STREET("IS","`aigil","legni bliteli")
iletilb ingel
^P1STREET("IS","`aigil","pdbi dtxcez")
zecxtd ibdp
^P1STREET("IS","`aigil","rio reac")
caer oir
^P1STREET("IS","`aigil","vd""l")
l"dv
^P1STREET("IS","`aigil","zl gi")
ig lz
^P1STREET("IS","`ao idecd")
dcedi oa`
^P1STREET("IS","`ao idecd","`cm")
mc`
^P1STREET("IS","`ao idecd","`daz vieo")
oeiv zad`
^P1STREET("IS","`ao idecd","`gim glili")
ililg mig`
^P1STREET("IS","`ao idecd","`iilz dygx")
xgyd zlii`
^P1STREET("IS","`ao idecd","`leo")
oel`
^P1STREET("IS","`ao idecd","`ptd")
dtp`
^P1STREET("IS","`ao idecd","`qez`")
`zeq`
^P1STREET("IS","`ao idecd","a`x bpim")
mipb x`a
^P1STREET("IS","`ao idecd","aiz dye`ad")
da`eyd zia
^P1STREET("IS","`ao idecd","ao bexieo")
oeixeb oa
^P1STREET("IS","`ao idecd","api apinio")
oinipa ipa
^P1STREET("IS","`ao idecd","barz dilcim")
miclid zrab
^P1STREET("IS","`ao idecd","cxex")
xexc
^P1STREET("IS","`ao idecd","cxj xaio")
oiax jxc
^P1STREET("IS","`ao idecd","cxj zl ivgw")
wgvi lz jxc
^P1STREET("IS","`ao idecd","d`exo")
oxe`d
^P1STREET("IS","`ao idecd","d`ilpez")
zepli`d
^P1STREET("IS","`ao idecd","d`ld")
dl`d
^P1STREET("IS","`ao idecd","d`lnebo")
obenl`d
^P1STREET("IS","`ao idecd","d`xf")
fx`d
^P1STREET("IS","`ao idecd","d`yl")
ly`d
^P1STREET("IS","`ao idecd","dapim")
mipad
^P1STREET("IS","`ao idecd","daxey")
yexad
^P1STREET("IS","`ao idecd","dbard")
drabd
^P1STREET("IS","`ao idecd","dbelo")
olebd
^P1STREET("IS","`ao idecd","dblil")
lilbd
^P1STREET("IS","`ao idecd","dbto")
otbd
^P1STREET("IS","`ao idecd","dbz")
zbd
^P1STREET("IS","`ao idecd","dcq")
qcd
^P1STREET("IS","`ao idecd","dcwl")
lwcd
^P1STREET("IS","`ao idecd","ddcxim")
mixcdd
^P1STREET("IS","`ao idecd","ddqzcxez")
zexczqdd
^P1STREET("IS","`ao idecd","ddxcetim")
mitecxdd
^P1STREET("IS","`ao idecd","dexcim")
micxed
^P1STREET("IS","`ao idecd","dfiz")
zifd
^P1STREET("IS","`ao idecd","dgva")
avgd
^P1STREET("IS","`ao idecd","diaelim")
mileaid
^P1STREET("IS","`ao idecd","dlegnim")
mingeld
^P1STREET("IS","`ao idecd","dlilj")
jlild
^P1STREET("IS","`ao idecd","dngzxz")
zxzgnd
^P1STREET("IS","`ao idecd","dniiqcim")
micqiind
^P1STREET("IS","`ao idecd","dnriio")
oiirnd
^P1STREET("IS","`ao idecd","dnrtilim")
militrnd
^P1STREET("IS","`ao idecd","dnznic")
cinznd
^P1STREET("IS","`ao idecd","dpba")
abpd
^P1STREET("IS","`ao idecd","dpehr")
rhepd
^P1STREET("IS","`ao idecd","dpehx")
xhepd
^P1STREET("IS","`ao idecd","dpxwiqim")
miqiwxpd
^P1STREET("IS","`ao idecd","dqaieo")
oeiaqd
^P1STREET("IS","`ao idecd","drvn`ez")
ze`nvrd
^P1STREET("IS","`ao idecd","drxad")
daxrd
^P1STREET("IS","`ao idecd","dthl")
lhtd
^P1STREET("IS","`ao idecd","dtln""g")
g"nltd
^P1STREET("IS","`ao idecd","dv`leo")
oel`vd
^P1STREET("IS","`ao idecd","dwyz")
zywd
^P1STREET("IS","`ao idecd","dxineo")
oenixd
^P1STREET("IS","`ao idecd","dxinepim")
mipenixd
^P1STREET("IS","`ao idecd","dxwtez")
zetwxd
^P1STREET("IS","`ao idecd","dyenx")
xneyd
^P1STREET("IS","`ao idecd","dyenxeo")
oexneyd
^P1STREET("IS","`ao idecd","dyig")
giyd
^P1STREET("IS","`ao idecd","dyihd")
dhiyd
^P1STREET("IS","`ao idecd","dylem")
melyd
^P1STREET("IS","`ao idecd","dywc")
cwyd
^P1STREET("IS","`ao idecd","dywnd")
dnwyd
^P1STREET("IS","`ao idecd","dyxeo")
oexyd
^P1STREET("IS","`ao idecd","dz`pd")
dp`zd
^P1STREET("IS","`ao idecd","dzenx")
xnezd
^P1STREET("IS","`ao idecd","dztef")
fetzd
^P1STREET("IS","`ao idecd","eziwim")
miwize
^P1STREET("IS","`ao idecd","go")
og
^P1STREET("IS","`ao idecd","irxd")
dxri
^P1STREET("IS","`ao idecd","leheq")
qehel
^P1STREET("IS","`ao idecd","nkai")
iakn
^P1STREET("IS","`ao idecd","nrld d`xbno")
onbx`d dlrn
^P1STREET("IS","`ao idecd","nrld dlaepd")
dpeald dlrn
^P1STREET("IS","`ao idecd","nrld xznim")
minzx dlrn
^P1STREET("IS","`ao idecd","nxac dwqnim")
minqwd caxn
^P1STREET("IS","`ao idecd","nxim")
mixn
^P1STREET("IS","`ao idecd","ped dcx")
xcd dep
^P1STREET("IS","`ao idecd","qdxeo")
oexdq
^P1STREET("IS","`ao idecd","qipi")
ipiq
^P1STREET("IS","`ao idecd","qnhz dpivpim")
mipvipd zhnq
^P1STREET("IS","`ao idecd","qpepiz")
zipepq
^P1STREET("IS","`ao idecd","rbex")
xebr
^P1STREET("IS","`ao idecd","rcrc")
crcr
^P1STREET("IS","`ao idecd","rlid")
dilr
^P1STREET("IS","`ao idecd","rngi")
ignr
^P1STREET("IS","`ao idecd","rtxepi")
ipextr
^P1STREET("IS","`ao idecd","rvieo")
oeivr
^P1STREET("IS","`ao idecd","vax")
xav
^P1STREET("IS","`ao idecd","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","`ao idecd","wxo diqec")
ceqid oxw
^P1STREET("IS","`ao idecd","y ykhx")
xhky y
^P1STREET("IS","`ao idecd","yafi")
ifay
^P1STREET("IS","`ao idecd","ygs")
sgy
^P1STREET("IS","`ao idecd","yifs")
sfiy
^P1STREET("IS","`ao idecd","ylcb")
bcly
^P1STREET("IS","`ao idecd","zl vex")
xev lz
^P1STREET("IS","`ao ivgw")
wgvi oa`
^P1STREET("IS","`ao qtix")
xitq oa`
^P1STREET("IS","`ao yne`l")
l`eny oa`
^P1STREET("IS","`api `izo")
ozi` ipa`
^P1STREET("IS","`api `izo","dyeyo")
oyeyd
^P1STREET("IS","`api gtu")
utg ipa`
^P1STREET("IS","`api gtu","blrc")
crlb
^P1STREET("IS","`az`o")
o`za`
^P1STREET("IS","`cexd")
dxec`
^P1STREET("IS","`cexd","daxey")
yexad
^P1STREET("IS","`cixim")
mixic`
^P1STREET("IS","`ecim")
mice`
^P1STREET("IS","`ecim","d`ifcxkz")
zkxcfi`d
^P1STREET("IS","`ecim","dcbo")
obcd
^P1STREET("IS","`ecim","dcwl")
lwcd
^P1STREET("IS","`ecim","ddcxim")
mixcdd
^P1STREET("IS","`ecim","dklpiz")
ziplkd
^P1STREET("IS","`ecim","dpxwiq")
qiwxpd
^P1STREET("IS","`ecim","dxineo")
oenixd
^P1STREET("IS","`ecim","dxwtz")
ztwxd
^P1STREET("IS","`ecim","gxea")
aexg
^P1STREET("IS","`ecim","v`leo")
oel`v
^P1STREET("IS","`ecm")
mce`
^P1STREET("IS","`ecm","dklpiz")
ziplkd
^P1STREET("IS","`em `l-tgm")
mgt-l` me`
^P1STREET("IS","`em `l-tgm","`aeknl")
lnkea`
^P1STREET("IS","`em `l-tgm","`l gpew")
wepg l`
^P1STREET("IS","`em `l-tgm","`l ncipd")
dpicn l`
^P1STREET("IS","`em `l-tgm","cxj drixid")
dixird jxc
^P1STREET("IS","`enu")
une`
^P1STREET("IS","`enu","dxvl")
lvxd
^P1STREET("IS","`etwim")
miwte`
^P1STREET("IS","`etwim","`apx ao px")
xp oa xpa`
^P1STREET("IS","`etwim","`ecm")
mce`
^P1STREET("IS","`etwim","`etwim")
miwte`
^P1STREET("IS","`etwim","`ex dgiim")
miigd xe`
^P1STREET("IS","`etwim","`li kdo")
odk il`
^P1STREET("IS","`etwim","`lide dzyai")
iayzd edil`
^P1STREET("IS","`etwim","`liyr")
ryil`
^P1STREET("IS","`etwim","`lpwed")
dewpl`
^P1STREET("IS","`etwim","`q`")
`q`
^P1STREET("IS","`etwim","`qzx dnlkd")
dklnd xzq`
^P1STREET("IS","`etwim","`v""l")
l"v`
^P1STREET("IS","`etwim","`xarz dnipim")
mipind zrax`
^P1STREET("IS","`etwim","aefble cec")
cec elbfea
^P1STREET("IS","`etwim","ail""e")
e"lia
^P1STREET("IS","`etwim","ao `iy gi")
ig yi` oa
^P1STREET("IS","`etwim","ao a`x deyr")
ryed x`a oa
^P1STREET("IS","`etwim","ao bexieo")
oeixeb oa
^P1STREET("IS","`etwim","ao yno")
ony oa
^P1STREET("IS","`etwim","apide")
edipa
^P1STREET("IS","`etwim","avl`l")
l`lva
^P1STREET("IS","`etwim","axw")
wxa
^P1STREET("IS","`etwim","axwz")
zwxa
^P1STREET("IS","`etwim","baexi iyx`l")
l`xyi ixeab
^P1STREET("IS","`etwim","bc")
cb
^P1STREET("IS","`etwim","bcreo")
oercb
^P1STREET("IS","`etwim","belena")
aneleb
^P1STREET("IS","`etwim","blbl")
lblb
^P1STREET("IS","`etwim","blrc")
crlb
^P1STREET("IS","`etwim","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","`etwim","cce")
ecc
^P1STREET("IS","`etwim","ciwld")
dlwic
^P1STREET("IS","`etwim","cpi`l")
l`ipc
^P1STREET("IS","`etwim","cxj aiz ebo")
obe zia jxc
^P1STREET("IS","`etwim","cxj dhiiqim")
miqiihd jxc
^P1STREET("IS","`etwim","d`exo")
oxe`d
^P1STREET("IS","`etwim","d`leo")
oel`d
^P1STREET("IS","`etwim","d`xfim")
mifx`d
^P1STREET("IS","`etwim","d`xi")
ix`d
^P1STREET("IS","`etwim","d`yl")
ly`d
^P1STREET("IS","`etwim","dap`im")
mi`pad
^P1STREET("IS","`etwim","davix")
xivad
^P1STREET("IS","`etwim","dbexo")
oxebd
^P1STREET("IS","`etwim","dcq")
qcd
^P1STREET("IS","`etwim","dcx")
xcd
^P1STREET("IS","`etwim","ddbpd")
dpbdd
^P1STREET("IS","`etwim","ddqzcxez")
zexczqdd
^P1STREET("IS","`etwim","dexcim")
micxed
^P1STREET("IS","`etwim","dfiz")
zifd
^P1STREET("IS","`etwim","dgavlz")
zlvagd
^P1STREET("IS","`etwim","dgic""`")
`"cigd
^P1STREET("IS","`etwim","dgihd")
dhigd
^P1STREET("IS","`etwim","dgxea")
aexgd
^P1STREET("IS","`etwim","dieba")
abeid
^P1STREET("IS","`etwim","dievx")
xveid
^P1STREET("IS","`etwim","dkpqz dbceld")
dlecbd zqpkd
^P1STREET("IS","`etwim","dkxnim")
minxkd
^P1STREET("IS","`etwim","dll")
lld
^P1STREET("IS","`etwim","dnl`kd")
dk`lnd
^P1STREET("IS","`etwim","dnlj cec")
cec jlnd
^P1STREET("IS","`etwim","dnqbx")
xbqnd
^P1STREET("IS","`etwim","dpai`im")
mi`iapd
^P1STREET("IS","`etwim","dpxwiq")
qiwxpd
^P1STREET("IS","`etwim","dpyi`")
`iypd
^P1STREET("IS","`etwim","dripa")
apird
^P1STREET("IS","`etwim","dtlcd")
dcltd
^P1STREET("IS","`etwim","dxa `ae gvix`")
`xivg ea` axd
^P1STREET("IS","`etwim","dxa rnxm ao ciee`o")
o`eeic oa mxnr axd
^P1STREET("IS","`etwim","dxa wew")
wew axd
^P1STREET("IS","`etwim","dxi""s")
s"ixd
^P1STREET("IS","`etwim","dxineo")
oenixd
^P1STREET("IS","`etwim","dxkaz")
zakxd
^P1STREET("IS","`etwim","dxna""m")
m"anxd
^P1STREET("IS","`etwim","dxveb")
bevxd
^P1STREET("IS","`etwim","dxzj")
jzxd
^P1STREET("IS","`etwim","dyileg")
geliyd
^P1STREET("IS","`etwim","dywc")
cwyd
^P1STREET("IS","`etwim","dz`pd")
dp`zd
^P1STREET("IS","`etwim","dzaex")
xeazd
^P1STREET("IS","`etwim","dznx")
xnzd
^P1STREET("IS","`etwim","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","`etwim","fkxid")
dixkf
^P1STREET("IS","`etwim","fnexd")
dxenf
^P1STREET("IS","`etwim","gbi")
ibg
^P1STREET("IS","`etwim","gexa")
axeg
^P1STREET("IS","`etwim","gfeo `iy")
yi` oefg
^P1STREET("IS","`etwim","giim gexi")
ixeg miig
^P1STREET("IS","`etwim","gppid")
dippg
^P1STREET("IS","`etwim","gtu giim")
miig utg
^P1STREET("IS","`etwim","hxeniwl")
lwinexh
^P1STREET("IS","`etwim","hxentlcex")
xecltnexh
^P1STREET("IS","`etwim","ib`l `leo")
oel` l`bi
^P1STREET("IS","`etwim","idcez cxem `txiwd")
dwixt` mexc zecdi
^P1STREET("IS","`etwim","idecd dlei")
ield dcedi
^P1STREET("IS","`etwim","idepzo")
ozpedi
^P1STREET("IS","`etwim","idevcw")
wcvedi
^P1STREET("IS","`etwim","ideyr ao peo")
oep oa ryedi
^P1STREET("IS","`etwim","ideyth")
htyedi
^P1STREET("IS","`etwim","idlem")
meldi
^P1STREET("IS","`etwim","ie`a")
a`ei
^P1STREET("IS","`etwim","ie`l")
l`ei
^P1STREET("IS","`etwim","iepd")
dpei
^P1STREET("IS","`etwim","iepi")
ipei
^P1STREET("IS","`etwim","ieqs w`xe")
ex`w sqei
^P1STREET("IS","`etwim","igfw`l")
l`wfgi
^P1STREET("IS","`etwim","iqnio")
oinqi
^P1STREET("IS","`etwim","irwa dkdo")
odkd awri
^P1STREET("IS","`etwim","itzg")
gzti
^P1STREET("IS","`etwim","ivdx")
xdvi
^P1STREET("IS","`etwim","ixeylim")
milyexi
^P1STREET("IS","`etwim","ixnide")
edinxi
^P1STREET("IS","`etwim","iyi")
iyi
^P1STREET("IS","`etwim","iyride")
ediryi
^P1STREET("IS","`etwim","klpiz")
ziplk
^P1STREET("IS","`etwim","kvplqeo")
oeqlpvk
^P1STREET("IS","`etwim","kxnl")
lnxk
^P1STREET("IS","`etwim","lg""i")
i"gl
^P1STREET("IS","`etwim","navr wcy")
ycw rvan
^P1STREET("IS","`etwim","niyex dbto")
otbd xeyin
^P1STREET("IS","`etwim","nl`ki")
ik`ln
^P1STREET("IS","`etwim","nxac dwqnim")
minqwd caxn
^P1STREET("IS","`etwim","nxcki")
ikcxn
^P1STREET("IS","`etwim","ny' `ixiq")
qixi` 'yn
^P1STREET("IS","`etwim","ny' d`ixiq")
qixi`d 'yn
^P1STREET("IS","`etwim","ny' dbto")
otbd 'yn
^P1STREET("IS","`etwim","ny' dxwtz")
ztwxd 'yn
^P1STREET("IS","`etwim","ny' dywnd")
dnwyd 'yn
^P1STREET("IS","`etwim","nyd nqiwd")
dwiqn dyn
^P1STREET("IS","`etwim","pgeyzo")
ozyegp
^P1STREET("IS","`etwim","pgnid")
dingp
^P1STREET("IS","`etwim","pzo")
ozp
^P1STREET("IS","`etwim","qn' `ixiq")
qixi` 'nq
^P1STREET("IS","`etwim","qncx")
xcnq
^P1STREET("IS","`etwim","qtix")
xitq
^P1STREET("IS","`etwim","refi`l")
l`ifer
^P1STREET("IS","`etwim","refi`l dxa")
axd l`ifer
^P1STREET("IS","`etwim","refide")
edifer
^P1STREET("IS","`etwim","reli dbxcem")
mecxbd iler
^P1STREET("IS","`etwim","rfx`")
`xfr
^P1STREET("IS","`etwim","rice dpai`")
`iapd ecir
^P1STREET("IS","`etwim","rio bci")
icb oir
^P1STREET("IS","`etwim","rneq")
qenr
^P1STREET("IS","`etwim","rny`")
`ynr
^P1STREET("IS","`etwim","rxad")
daxr
^P1STREET("IS","`etwim","thie")
eiht
^P1STREET("IS","`etwim","tiphe giim")
miig ehpit
^P1STREET("IS","`etwim","tln""g")
g"nlt
^P1STREET("IS","`etwim","txi nbcim")
micbn ixt
^P1STREET("IS","`etwim","v`ld")
dl`v
^P1STREET("IS","`etwim","vcwide")
ediwcv
^P1STREET("IS","`etwim","vd""l")
l"dv
^P1STREET("IS","`etwim","wdilez irwa")
awri zelidw
^P1STREET("IS","`etwim","wew")
wew
^P1STREET("IS","`etwim","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","`etwim","wxiz qtx")
xtq zixw
^P1STREET("IS","`etwim","wxo diqec")
ceqid oxw
^P1STREET("IS","`etwim","xai rwia`")
`aiwr iax
^P1STREET("IS","`etwim","xfi`l cec")
cec l`ifx
^P1STREET("IS","`etwim","xy""i")
i"yx
^P1STREET("IS","`etwim","y`el dnlj")
jlnd le`y
^P1STREET("IS","`etwim","yafi")
ifay
^P1STREET("IS","`etwim","yc' dxvl")
lvxd 'cy
^P1STREET("IS","`etwim","yedm")
mdey
^P1STREET("IS","`etwim","ylnd dnlj")
jlnd dnly
^P1STREET("IS","`etwim","yne`l dnexd")
dxend l`eny
^P1STREET("IS","`etwim","yne`l dxe`d")
d`exd l`eny
^P1STREET("IS","`etwim","ynyeo")
oeyny
^P1STREET("IS","`etwim","ytix`")
`xity
^P1STREET("IS","`etwim","yxz")
zxy
^P1STREET("IS","`etwim","zixey")
yexiz
^P1STREET("IS","`etwim","zxyiy")
yiyxz
^P1STREET("IS","`ex dpx")
xpd xe`
^P1STREET("IS","`ex idecd")
dcedi xe`
^P1STREET("IS","`ex idecd","`cm")
mc`
^P1STREET("IS","`ex idecd","`dxeo kdo")
odk oexd`
^P1STREET("IS","`ex idecd","`ecm")
mce`
^P1STREET("IS","`ex idecd","`etixd")
dxite`
^P1STREET("IS","`ex idecd","`hc")
ch`
^P1STREET("IS","`ex idecd","`lide qrceo")
oecrq edil`
^P1STREET("IS","`ex idecd","`lneb")
benl`
^P1STREET("IS","`ex idecd","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","`ex idecd","`txim be`hd")
dh`eb mixt`
^P1STREET("IS","`ex idecd","aiz `l")
l` zia
^P1STREET("IS","`ex idecd","ax ieg`i")
i`gei xa
^P1STREET("IS","`ex idecd","axpx")
xpxa
^P1STREET("IS","`ex idecd","axwz")
zwxa
^P1STREET("IS","`ex idecd","cbpid")
dipbc
^P1STREET("IS","`ex idecd","cd eipvi")
ivpie dc
^P1STREET("IS","`ex idecd","cec `lrfx")
xfrl` cec
^P1STREET("IS","`ex idecd","cec kdo")
odk cec
^P1STREET("IS","`ex idecd","cwld")
dlwc
^P1STREET("IS","`ex idecd","cxj lec")
cel jxc
^P1STREET("IS","`ex idecd","cxj ylnd")
dnly jxc
^P1STREET("IS","`ex idecd","d`bef")
feb`d
^P1STREET("IS","`ex idecd","d`exo")
oxe`d
^P1STREET("IS","`ex idecd","d`ld")
dl`d
^P1STREET("IS","`ex idecd","d`v""l")
l"v`d
^P1STREET("IS","`ex idecd","d`xf")
fx`d
^P1STREET("IS","`ex idecd","d`xneo")
oenx`d
^P1STREET("IS","`ex idecd","d`yl")
ly`d
^P1STREET("IS","`ex idecd","d`zxeb")
bexz`d
^P1STREET("IS","`ex idecd","dapim")
mipad
^P1STREET("IS","`ex idecd","daxey")
yexad
^P1STREET("IS","`ex idecd","dayo")
oyad
^P1STREET("IS","`ex idecd","dbelo")
olebd
^P1STREET("IS","`ex idecd","dblil")
lilbd
^P1STREET("IS","`ex idecd","dcela")
alecd
^P1STREET("IS","`ex idecd","dcq")
qcd
^P1STREET("IS","`ex idecd","dcwl")
lwcd
^P1STREET("IS","`ex idecd","ddbpd")
dpbdd
^P1STREET("IS","`ex idecd","ddqzcxez")
zexczqdd
^P1STREET("IS","`ex idecd","def ca")
ac fed
^P1STREET("IS","`ex idecd","dexc")
cxed
^P1STREET("IS","`ex idecd","dfiz")
zifd
^P1STREET("IS","`ex idecd","dgavlz")
zlvagd
^P1STREET("IS","`ex idecd","dglevim")
mivelgd
^P1STREET("IS","`ex idecd","dgva")
avgd
^P1STREET("IS","`ex idecd","dgxea")
aexgd
^P1STREET("IS","`ex idecd","dgxeyz")
zyexgd
^P1STREET("IS","`ex idecd","dgynep`im")
mi`penygd
^P1STREET("IS","`ex idecd","diefnim")
minfeid
^P1STREET("IS","`ex idecd","dievxim")
mixveid
^P1STREET("IS","`ex idecd","diexcim")
micxeid
^P1STREET("IS","`ex idecd","divixd")
dxivid
^P1STREET("IS","`ex idecd","dixco")
ocxid
^P1STREET("IS","`ex idecd","dklpiz")
ziplkd
^P1STREET("IS","`ex idecd","dl""d")
d"ld
^P1STREET("IS","`ex idecd","dll qn")
nq lld
^P1STREET("IS","`ex idecd","dniiqcim")
micqiind
^P1STREET("IS","`ex idecd","dnkaim")
miaknd
^P1STREET("IS","`ex idecd","dnl`kd")
dk`lnd
^P1STREET("IS","`ex idecd","dnqbx")
xbqnd
^P1STREET("IS","`ex idecd","dntrl")
lrtnd
^P1STREET("IS","`ex idecd","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","`ex idecd","dqcp`")
`pcqd
^P1STREET("IS","`ex idecd","dqekpez dideciz")
zicedid zepkeqd
^P1STREET("IS","`ex idecd","dqiito")
otiiqd
^P1STREET("IS","`ex idecd","draecd")
dceard
^P1STREET("IS","`ex idecd","drnl")
lnrd
^P1STREET("IS","`ex idecd","drvn`ez")
ze`nvrd
^P1STREET("IS","`ex idecd","drxad")
daxrd
^P1STREET("IS","`ex idecd","drxneo")
oenxrd
^P1STREET("IS","`ex idecd","dtlcd")
dcltd
^P1STREET("IS","`ex idecd","dtln""g")
g"nltd
^P1STREET("IS","`ex idecd","dx`yepim")
mipey`xd
^P1STREET("IS","`ex idecd","dxa dxveb")
bevxd axd
^P1STREET("IS","`ex idecd","dxa kneq tlg")
glt qenk axd
^P1STREET("IS","`ex idecd","dxces")
secxd
^P1STREET("IS","`ex idecd","dxezm")
mzexd
^P1STREET("IS","`ex idecd","dxineo")
oenixd
^P1STREET("IS","`ex idecd","dxna""m")
m"anxd
^P1STREET("IS","`ex idecd","dxvl")
lvxd
^P1STREET("IS","`ex idecd","dxwtz")
ztwxd
^P1STREET("IS","`ex idecd","dyenx")
xneyd
^P1STREET("IS","`ex idecd","dyew")
weyd
^P1STREET("IS","`ex idecd","dyihd")
dhiyd
^P1STREET("IS","`ex idecd","dyldaz")
zadlyd
^P1STREET("IS","`ex idecd","dypim yc")
cy mipyd
^P1STREET("IS","`ex idecd","dywc")
cwyd
^P1STREET("IS","`ex idecd","dywnd")
dnwyd
^P1STREET("IS","`ex idecd","dz`pd")
dp`zd
^P1STREET("IS","`ex idecd","dzryid")
diyrzd
^P1STREET("IS","`ex idecd","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","`ex idecd","ghiaz `lkqpcxepi")
ipexcpqkl` zaihg
^P1STREET("IS","`ex idecd","giim ax la")
al xa miig
^P1STREET("IS","`ex idecd","hetf")
fteh
^P1STREET("IS","`ex idecd","i`ix yhxo")
oxhy xi`i
^P1STREET("IS","`ex idecd","ib`l `leo")
oel` l`bi
^P1STREET("IS","`ex idecd","idcez wpcd")
dcpw zecdi
^P1STREET("IS","`ex idecd","idlem")
meldi
^P1STREET("IS","`ex idecd","iepi pzpide")
edipzp ipei
^P1STREET("IS","`ex idecd","ieqs aexb")
bxea sqei
^P1STREET("IS","`ex idecd","ieqs giim")
miig sqei
^P1STREET("IS","`ex idecd","iwezi`l `cm")
mc` l`izewi
^P1STREET("IS","`ex idecd","ixeylim")
milyexi
^P1STREET("IS","`ex idecd","kaiy aiz cbo")
obc zia yiak
^P1STREET("IS","`ex idecd","kkx dpyi`")
`iypd xkk
^P1STREET("IS","`ex idecd","klil dgexy")
yxegd lilk
^P1STREET("IS","`ex idecd","kneq rbia")
aibr qenk
^P1STREET("IS","`ex idecd","ktx nqeaim")
miaeqn xtk
^P1STREET("IS","`ex idecd","ktx rpd")
dpr xtk
^P1STREET("IS","`ex idecd","kvplqeo")
oeqlpvk
^P1STREET("IS","`ex idecd","le qwl`x")
x`lwq el
^P1STREET("IS","`ex idecd","lec kaiy")
yiak cel
^P1STREET("IS","`ex idecd","lg""i")
i"gl
^P1STREET("IS","`ex idecd","liapd")
dpail
^P1STREET("IS","`ex idecd","nephitiexi")
ixeitihpen
^P1STREET("IS","`ex idecd","nileewi")
iweelin
^P1STREET("IS","`ex idecd","nrld dgend")
dnegd dlrn
^P1STREET("IS","`ex idecd","nrld dnbcl")
lcbnd dlrn
^P1STREET("IS","`ex idecd","nyd `aia")
aia` dyn
^P1STREET("IS","`ex idecd","pivo")
ovip
^P1STREET("IS","`ex idecd","qbleo")
oelbq
^P1STREET("IS","`ex idecd","qipi")
ipiq
^P1STREET("IS","`ex idecd","qn' dxa hiia gi")
ig aiih axd 'nq
^P1STREET("IS","`ex idecd","qn' nrld dnbcl")
lcbnd dlrn 'nq
^P1STREET("IS","`ex idecd","qnhz `ixiq")
qixi` zhnq
^P1STREET("IS","`ex idecd","qnhz anrld")
dlrna zhnq
^P1STREET("IS","`ex idecd","qnhz dbo")
obd zhnq
^P1STREET("IS","`ex idecd","qnhz diqnio")
oinqid zhnq
^P1STREET("IS","`ex idecd","qnhz dnrtilim")
militrnd zhnq
^P1STREET("IS","`ex idecd","qnhz dxna""o")
o"anxd zhnq
^P1STREET("IS","`ex idecd","qnhz gaxeo")
oexag zhnq
^P1STREET("IS","`ex idecd","qnhz kpxz")
zxpk zhnq
^P1STREET("IS","`ex idecd","qnhz ngeld")
dlegn zhnq
^P1STREET("IS","`ex idecd","qnhz qaieo")
oeiaq zhnq
^P1STREET("IS","`ex idecd","qnhz rio bci")
icb oir zhnq
^P1STREET("IS","`ex idecd","qnhz rio cex")
xec oir zhnq
^P1STREET("IS","`ex idecd","qnhz rio ida")
adi oir zhnq
^P1STREET("IS","`ex idecd","qrcid gzekd")
dkezg dicrq
^P1STREET("IS","`ex idecd","qtix")
xitq
^P1STREET("IS","`ex idecd","reli dbxcem")
mecxbd iler
^P1STREET("IS","`ex idecd","rfx` dqetx")
xteqd `xfr
^P1STREET("IS","`ex idecd","rpax")
xapr
^P1STREET("IS","`ex idecd","tpwq vai")
iav qwpt
^P1STREET("IS","`ex idecd","v`leo")
oel`v
^P1STREET("IS","`ex idecd","vtxix")
xixtv
^P1STREET("IS","`ex idecd","w`xe ieqs")
sqei ex`w
^P1STREET("IS","`ex idecd","wff igfw`l")
l`wfgi ffw
^P1STREET("IS","`ex idecd","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","`ex idecd","wlid")
dilw
^P1STREET("IS","`ex idecd","wtlo")
oltw
^P1STREET("IS","`ex idecd","wxiz biex`")
`xeib zixw
^P1STREET("IS","`ex idecd","xg' a'")
'a 'gx
^P1STREET("IS","`ex idecd","xg' e'")
'e 'gx
^P1STREET("IS","`ex idecd","xg' i""g")
g"i 'gx
^P1STREET("IS","`ex idecd","xnf")
fnx
^P1STREET("IS","`ex idecd","yc' cec ao bexieo")
oeixeb oa cec 'cy
^P1STREET("IS","`ex idecd","yc' ivgw xaio")
oiax wgvi 'cy
^P1STREET("IS","`ex idecd","yc' npgm abio")
oiba mgpn 'cy
^P1STREET("IS","`ex idecd","yc' nxcki ao texz")
zxet oa ikcxn 'cy
^P1STREET("IS","`ex idecd","yc' nyd ciio")
oiic dyn 'cy
^P1STREET("IS","`ex idecd","ydm")
mdy
^P1STREET("IS","`ex idecd","yifs")
sfiy
^P1STREET("IS","`ex idecd","yldaz")
zadly
^P1STREET("IS","`ex idecd","ylem rlikm")
mkilr mely
^P1STREET("IS","`ex idecd","yn`i qn")
nq i`ny
^P1STREET("IS","`ex idecd","ynreo gkm")
mkg oerny
^P1STREET("IS","`ex idecd","ypda")
adpy
^P1STREET("IS","`ex idecd","ypix")
xipy
^P1STREET("IS","`ex idecd","ytxipvw")
wvpixty
^P1STREET("IS","`ex idecd","yxz")
zxy
^P1STREET("IS","`ex idecd","zcdx")
xdcz
^P1STREET("IS","`ex idecd","zt`xz iyx`l")
l`xyi zx`tz
^P1STREET("IS","`ex idecd","zxyiy")
yiyxz
^P1STREET("IS","`ex rwia`")
`aiwr xe`
^P1STREET("IS","`ex rwia`","`axdm ytix`")
`xity mdxa`
^P1STREET("IS","`ex rwia`","`dxeo nbc")
cbn oexd`
^P1STREET("IS","`ex rwia`","`igec drm")
mrd cegi`
^P1STREET("IS","`ex rwia`","`li kdo")
odk il`
^P1STREET("IS","`ex rwia`","`lpai")
iapl`
^P1STREET("IS","`ex rwia`","ai`liw")
wil`ia
^P1STREET("IS","`ex rwia`","altex")
xetla
^P1STREET("IS","`ex rwia`","ao bexieo")
oeixeb oa
^P1STREET("IS","`ex rwia`","ao idecd")
dcedi oa
^P1STREET("IS","`ex rwia`","bpi `ex")
xe` ipb
^P1STREET("IS","`ex rwia`","bw ao neqd")
dqen oa wb
^P1STREET("IS","`ex rwia`","cec `lrfx")
xfrl` cec
^P1STREET("IS","`ex rwia`","d`ilo")
oli`d
^P1STREET("IS","`ex rwia`","d`ixeq")
qexi`d
^P1STREET("IS","`ex rwia`","d`leo")
oel`d
^P1STREET("IS","`ex rwia`","d`v""l")
l"v`d
^P1STREET("IS","`ex rwia`","daxey")
yexad
^P1STREET("IS","`ex rwia`","dbiaexim")
mixeaibd
^P1STREET("IS","`ex rwia`","dbto")
otbd
^P1STREET("IS","`ex rwia`","ddcq")
qcdd
^P1STREET("IS","`ex rwia`","dfizim")
mizifd
^P1STREET("IS","`ex rwia`","dgavlz")
zlvagd
^P1STREET("IS","`ex rwia`","dgxea")
aexgd
^P1STREET("IS","`ex rwia`","dgxneo")
oenxgd
^P1STREET("IS","`ex rwia`","diqnio")
oinqid
^P1STREET("IS","`ex rwia`","dlilj")
jlild
^P1STREET("IS","`ex rwia`","dll")
lld
^P1STREET("IS","`ex rwia`","dpai`im")
mi`iapd
^P1STREET("IS","`ex rwia`","dpyi`")
`iypd
^P1STREET("IS","`ex rwia`","dqaiepim")
mipeiaqd
^P1STREET("IS","`ex rwia`","dqibliz")
zilbiqd
^P1STREET("IS","`ex rwia`","drlid")
dilrd
^P1STREET("IS","`ex rwia`","drvn`ez")
ze`nvrd
^P1STREET("IS","`ex rwia`","drxad")
daxrd
^P1STREET("IS","`ex rwia`","dtln""g")
g"nltd
^P1STREET("IS","`ex rwia`","dxa dxveb")
bevxd axd
^P1STREET("IS","`ex rwia`","dxa kdp`")
`pdk axd
^P1STREET("IS","`ex rwia`","dxa nlel")
leln axd
^P1STREET("IS","`ex rwia`","dxa npyd")
dypn axd
^P1STREET("IS","`ex rwia`","dxa wew")
wew axd
^P1STREET("IS","`ex rwia`","dxebi dnlkez")
zeklnd ibexd
^P1STREET("IS","`ex rwia`","dxineo")
oenixd
^P1STREET("IS","`ex rwia`","dxvl")
lvxd
^P1STREET("IS","`ex rwia`","dywc")
cwyd
^P1STREET("IS","`ex rwia`","dz`pd")
dp`zd
^P1STREET("IS","`ex rwia`","dznx")
xnzd
^P1STREET("IS","`ex rwia`","dzryid")
diyrzd
^P1STREET("IS","`ex rwia`","eiqpaxb igi`l")
l`igi bxapqie
^P1STREET("IS","`ex rwia`","eiqpaxb npgm")
mgpn bxapqie
^P1STREET("IS","`ex rwia`","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","`ex rwia`","gi hiia")
aiih ig
^P1STREET("IS","`ex rwia`","glli cwx")
xwc illg
^P1STREET("IS","`ex rwia`","nxbliz")
zilbxn
^P1STREET("IS","`ex rwia`","pil""i")
i"lip
^P1STREET("IS","`ex rwia`","rwia`")
`aiwr
^P1STREET("IS","`ex rwia`","viepi npgm")
mgpn ipeiv
^P1STREET("IS","`ex rwia`","wetilaiu")
uialitew
^P1STREET("IS","`ex rwia`","wpci")
icpw
^P1STREET("IS","`ex rwia`","xehyilc")
cliyhex
^P1STREET("IS","`ex rwia`","xg' 13")
13 'gx
^P1STREET("IS","`ex rwia`","xg' 660")
660 'gx
^P1STREET("IS","`ex rwia`","xnam")
manx
^P1STREET("IS","`ex rwia`","xy""i")
i"yx
^P1STREET("IS","`ex rwia`","yc' cec dnlj")
jlnd cec 'cy
^P1STREET("IS","`ex rwia`","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","`ex rwia`","yc' yicleaqwi")
iwqaelciy 'cy
^P1STREET("IS","`ex rwia`","yf""x")
x"fy
^P1STREET("IS","`ex rwia`","yiaz vieo")
oeiv zaiy
^P1STREET("IS","`exd")
dxe`
^P1STREET("IS","`exd","drxad")
daxrd
^P1STREET("IS","`exd","gva")
avg
^P1STREET("IS","`exd","iqnio")
oinqi
^P1STREET("IS","`exd","lehm")
mhel
^P1STREET("IS","`exd","pxwiq")
qiwxp
^P1STREET("IS","`exd","z`pd")
dp`z
^P1STREET("IS","`exd","zlzo")
ozlz
^P1STREET("IS","`exez")
zexe`
^P1STREET("IS","`exez","dlilj")
jlild
^P1STREET("IS","`exez","dznx")
xnzd
^P1STREET("IS","`exim")
mixe`
^P1STREET("IS","`expim")
mipxe`
^P1STREET("IS","`expim","`dec")
ced`
^P1STREET("IS","`expim","`lrfx")
xfrl`
^P1STREET("IS","`expim","dxkq")
qkxd
^P1STREET("IS","`expim","npexd")
dxepn
^P1STREET("IS","`expiz")
zipxe`
^P1STREET("IS","`expiz","`npeo eznx")
xnze oepn`
^P1STREET("IS","`expiz","d`bef")
feb`d
^P1STREET("IS","`expiz","d`exo")
oxe`d
^P1STREET("IS","`expiz","d`ixeq")
qexi`d
^P1STREET("IS","`expiz","d`ld")
dl`d
^P1STREET("IS","`expiz","d`leo")
oel`d
^P1STREET("IS","`expiz","d`xbno")
onbx`d
^P1STREET("IS","`expiz","d`xf")
fx`d
^P1STREET("IS","`expiz","d`yl")
ly`d
^P1STREET("IS","`expiz","daxey")
yexad
^P1STREET("IS","`expiz","dbto")
otbd
^P1STREET("IS","`expiz","dcbpiz")
zipbcd
^P1STREET("IS","`expiz","dcela")
alecd
^P1STREET("IS","`expiz","dcq")
qcd
^P1STREET("IS","`expiz","dcwl")
lwcd
^P1STREET("IS","`expiz","ddxces")
secxdd
^P1STREET("IS","`expiz","dfiz")
zifd
^P1STREET("IS","`expiz","dgihd")
dhigd
^P1STREET("IS","`expiz","dgva")
avgd
^P1STREET("IS","`expiz","dgxea")
aexgd
^P1STREET("IS","`expiz","dhaw")
wahd
^P1STREET("IS","`expiz","diqnio")
oinqid
^P1STREET("IS","`expiz","dleheq")
qeheld
^P1STREET("IS","`expiz","dlehm")
mheld
^P1STREET("IS","`expiz","dliapd")
dpaild
^P1STREET("IS","`expiz","dnexo")
oxend
^P1STREET("IS","`expiz","dnxbpiz")
zipbxnd
^P1STREET("IS","`expiz","dqaieo")
oeiaqd
^P1STREET("IS","`expiz","dqgla")
algqd
^P1STREET("IS","`expiz","dqiito")
otiiqd
^P1STREET("IS","`expiz","drxad")
daxrd
^P1STREET("IS","`expiz","dtiweq")
qewitd
^P1STREET("IS","`expiz","dtxb")
bxtd
^P1STREET("IS","`expiz","dvax")
xavd
^P1STREET("IS","`expiz","dxineo")
oenixd
^P1STREET("IS","`expiz","dyihd")
dhiyd
^P1STREET("IS","`expiz","dywc")
cwyd
^P1STREET("IS","`expiz","dz`pd")
dp`zd
^P1STREET("IS","`expiz","exc")
cxe
^P1STREET("IS","`expiz","gavlz")
zlvag
^P1STREET("IS","`expiz","gxviz")
zivxg
^P1STREET("IS","`expiz","iwipheo")
oehpiwi
^P1STREET("IS","`expiz","klpiz")
ziplk
^P1STREET("IS","`expiz","kxkem")
mekxk
^P1STREET("IS","`expiz","ler d`xi")
ix`d rel
^P1STREET("IS","`expiz","lilj")
jlil
^P1STREET("IS","`expiz","pexiz")
zixep
^P1STREET("IS","`expiz","pxwiq")
qiwxp
^P1STREET("IS","`expiz","qbliz")
zilbq
^P1STREET("IS","`expiz","trnepiz")
zipenrt
^P1STREET("IS","`expiz","v`leo")
oel`v
^P1STREET("IS","`expiz","varepi")
iperav
^P1STREET("IS","`expiz","xwtz")
ztwx
^P1STREET("IS","`expiz","zcdx")
xdcz
^P1STREET("IS","`eyd")
dye`
^P1STREET("IS","`fex")
xef`
^P1STREET("IS","`fex","`gc an`i")
i`na cg`
^P1STREET("IS","`fex","`gc drm")
mrd cg`
^P1STREET("IS","`fex","`li kdo")
odk il`
^P1STREET("IS","`fex","`pilaiu")
uialip`
^P1STREET("IS","`fex","`xlefexea")
aexefelx`
^P1STREET("IS","`fex","aexekea")
aekexea
^P1STREET("IS","`fex","ai`liw")
wil`ia
^P1STREET("IS","`fex","ail""e")
e"lia
^P1STREET("IS","`fex","ao bexieo")
oeixeb oa
^P1STREET("IS","`fex","ao vai")
iav oa
^P1STREET("IS","`fex","axfili")
ilifxa
^P1STREET("IS","`fex","cxj dyard")
drayd jxc
^P1STREET("IS","`fex","cxj dylem")
melyd jxc
^P1STREET("IS","`fex","d`ikxim")
mixki`d
^P1STREET("IS","`fex","d`wlitheq")
qehtilw`d
^P1STREET("IS","`fex","dapim")
mipad
^P1STREET("IS","`fex","daxey")
yexad
^P1STREET("IS","`fex","ddbpd")
dpbdd
^P1STREET("IS","`fex","ddqzcxez")
zexczqdd
^P1STREET("IS","`fex","dfiz")
zifd
^P1STREET("IS","`fex","dgva")
avgd
^P1STREET("IS","`fex","diqnio")
oinqid
^P1STREET("IS","`fex","dnvecd")
dcevnd
^P1STREET("IS","`fex","dqcpd")
dpcqd
^P1STREET("IS","`fex","drliid dypiid")
diipyd diilrd
^P1STREET("IS","`fex","dtln""g")
g"nltd
^P1STREET("IS","`fex","dtxcq")
qcxtd
^P1STREET("IS","`fex","dvax")
xavd
^P1STREET("IS","`fex","dvpgpim")
mipgpvd
^P1STREET("IS","`fex","dxa vcew")
wecv axd
^P1STREET("IS","`fex","dxveb")
bevxd
^P1STREET("IS","`fex","dxvl")
lvxd
^P1STREET("IS","`fex","dyard")
drayd
^P1STREET("IS","`fex","dywnd")
dnwyd
^P1STREET("IS","`fex","eivno")
onvie
^P1STREET("IS","`fex","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","`fex","gpd qpy")
ypq dpg
^P1STREET("IS","`fex","gynep`im")
mi`penyg
^P1STREET("IS","`fex","ivgw ycd")
dcy wgvi
^P1STREET("IS","`fex","ixeylim")
milyexi
^P1STREET("IS","`fex","kvplqeo")
oeqlpvk
^P1STREET("IS","`fex","likh")
hkil
^P1STREET("IS","`fex","ncexbi dnvecd")
dcevnd ibxecn
^P1STREET("IS","`fex","nkaim")
miakn
^P1STREET("IS","`fex","nvcd")
dcvn
^P1STREET("IS","`fex","pexc`e")
e`cxep
^P1STREET("IS","`fex","qewelea")
aeleweq
^P1STREET("IS","`fex","qn' `lnepiz")
zipenl` 'nq
^P1STREET("IS","`fex","qtix")
xitq
^P1STREET("IS","`fex","tipqwx")
xwqpit
^P1STREET("IS","`fex","txu")
uxt
^P1STREET("IS","`fex","wtlo")
oltw
^P1STREET("IS","`fex","xna""m")
m"anx
^P1STREET("IS","`fex","xnf")
fnx
^P1STREET("IS","`fex","yegh npid")
dipn hgey
^P1STREET("IS","`fex","yf""x")
x"fy
^P1STREET("IS","`fex","ytipefd")
dfepity
^P1STREET("IS","`fex","ytix`")
`xity
^P1STREET("IS","`fex","ytxipvw")
wvpixty
^P1STREET("IS","`fex","yxz nyd")
dyn zxy
^P1STREET("IS","`fex zryiid zxcieo")
oeicxz diiyrz xef`
^P1STREET("IS","`fex zryiid zxcieo","kgel")
legk
^P1STREET("IS","`ged")
deg`
^P1STREET("IS","`ged","dyrexd")
dxeryd
^P1STREET("IS","`ged","znx")
xnz
^P1STREET("IS","`gefz axw")
wxa zfeg`
^P1STREET("IS","`gefz axw","klpiez")
zeiplk
^P1STREET("IS","`gefz axw","pexiez")
zeixep
^P1STREET("IS","`gefz axw","qnhz qzepiz")
zipezq zhnq
^P1STREET("IS","`gefz axw","xwtez")
zetwx
^P1STREET("IS","`gidec")
cedig`
^P1STREET("IS","`gihea")
aehig`
^P1STREET("IS","`gihea","dcwlim")
milwcd
^P1STREET("IS","`giqnj")
jnqig`
^P1STREET("IS","`giqnj","bto")
otb
^P1STREET("IS","`giqnj","dcwl")
lwcd
^P1STREET("IS","`giqnj","dfiz")
zifd
^P1STREET("IS","`giqnj","dz`pd")
dp`zd
^P1STREET("IS","`giqnj","yarz dnipim")
mipind zray
^P1STREET("IS","`girfx")
xfrig`
^P1STREET("IS","`iil")
lii`
^P1STREET("IS","`iilz dygx")
xgyd zlii`
^P1STREET("IS","`ileo")
oeli`
^P1STREET("IS","`ilpid")
dipli`
^P1STREET("IS","`ilz")
zli`
^P1STREET("IS","`ilz","`aewce")
ecwea`
^P1STREET("IS","`ilz","`bnepim")
mipenb`
^P1STREET("IS","`ilz","`cem")
mec`
^P1STREET("IS","`ilz","`cneo")
oenc`
^P1STREET("IS","`ilz","`fea")
aef`
^P1STREET("IS","`ilz","`g`a")
a`g`
^P1STREET("IS","`ilz","`gf")
fg`
^P1STREET("IS","`ilz","`hc")
ch`
^P1STREET("IS","`ilz","`ificex")
xecifi`
^P1STREET("IS","`ilz","`izo")
ozi`
^P1STREET("IS","`ilz","`lneb im")
mi benl`
^P1STREET("IS","`ilz","`nzl")
lzn`
^P1STREET("IS","`ilz","`ptd")
dtp`
^P1STREET("IS","`ilz","`xbno")
onbx`
^P1STREET("IS","`ilz","`xpeo")
oepx`
^P1STREET("IS","`ilz","`ylil")
lily`
^P1STREET("IS","`ilz","api iyx`l")
l`xyi ipa
^P1STREET("IS","`ilz","axph")
hpxa
^P1STREET("IS","`ilz","axpr")
rpxa
^P1STREET("IS","`ilz","axwo")
owxa
^P1STREET("IS","`ilz","axwz")
zwxa
^P1STREET("IS","`ilz","azi axno")
onxa iza
^P1STREET("IS","`ilz","bexceo")
oecxeb
^P1STREET("IS","`ilz","bxail")
liaxb
^P1STREET("IS","`ilz","bxetiz")
zitexb
^P1STREET("IS","`ilz","bxpih")
hipxb
^P1STREET("IS","`ilz","byxeo")
oexyb
^P1STREET("IS","`ilz","cbpiz")
zipbc
^P1STREET("IS","`ilz","ceacao")
oacaec
^P1STREET("IS","`ilz","ci fda")
adf ic
^P1STREET("IS","`ilz","cio")
oic
^P1STREET("IS","`ilz","cwx")
xwc
^P1STREET("IS","`ilz","cxao")
oaxc
^P1STREET("IS","`ilz","cxj dbi`")
`ibd jxc
^P1STREET("IS","`ilz","cxj dim")
mid jxc
^P1STREET("IS","`ilz","cxj drxad")
daxrd jxc
^P1STREET("IS","`ilz","cxj dxim")
mixd jxc
^P1STREET("IS","`ilz","cxj iezm")
mzei jxc
^P1STREET("IS","`ilz","d`bq")
qb`d
^P1STREET("IS","`ilz","d`cenim")
minec`d
^P1STREET("IS","`ilz","d`cxikl")
lkixc`d
^P1STREET("IS","`ilz","d`eno")
one`d
^P1STREET("IS","`ilz","d`exbim")
mibxe`d
^P1STREET("IS","`ilz","d`ivhcieo")
oeichvi`d
^P1STREET("IS","`ilz","d`ixeq")
qexi`d
^P1STREET("IS","`ilz","d`ld")
dl`d
^P1STREET("IS","`ilz","d`lnebim")
mibenl`d
^P1STREET("IS","`ilz","d`xf")
fx`d
^P1STREET("IS","`ilz","d`xnim")
minx`d
^P1STREET("IS","`ilz","daexqw`i")
i`wqxead
^P1STREET("IS","`ilz","daiz dncaxi")
ixacnd ziad
^P1STREET("IS","`ilz","dap`i")
i`pad
^P1STREET("IS","`ilz","daxbim")
mibxad
^P1STREET("IS","`ilz","daxclq")
qlcxad
^P1STREET("IS","`ilz","daxey")
yexad
^P1STREET("IS","`ilz","dbetxiz")
zixtebd
^P1STREET("IS","`ilz","dciib")
biicd
^P1STREET("IS","`ilz","dcq")
qcd
^P1STREET("IS","`ilz","dcwl")
lwcd
^P1STREET("IS","`ilz","dcxex")
xexcd
^P1STREET("IS","`ilz","ddacld")
dlcadd
^P1STREET("IS","`ilz","ddvlgd")
dglvdd
^P1STREET("IS","`ilz","dgezxim")
mixzegd
^P1STREET("IS","`ilz","dgxy")
yxgd
^P1STREET("IS","`ilz","dgynep`im")
mi`penygd
^P1STREET("IS","`ilz","dkefxim")
mixfekd
^P1STREET("IS","`ilz","dne`aim")
mia`end
^P1STREET("IS","`ilz","dnevx")
xvend
^P1STREET("IS","`ilz","dnl`kd")
dk`lnd
^P1STREET("IS","`ilz","dnligd")
dgilnd
^P1STREET("IS","`ilz","dnlkd")
dklnd
^P1STREET("IS","`ilz","dnqbx")
xbqnd
^P1STREET("IS","`ilz","dnrxa")
axrnd
^P1STREET("IS","`ilz","dpahim")
mihapd
^P1STREET("IS","`ilz","dpbx")
xbpd
^P1STREET("IS","`ilz","dpbxim")
mixbpd
^P1STREET("IS","`ilz","dpgeyz")
zyegpd
^P1STREET("IS","`ilz","dptd")
dtpd
^P1STREET("IS","`ilz","dptg")
gtpd
^P1STREET("IS","`ilz","dpu")
upd
^P1STREET("IS","`ilz","dqeex")
xeeqd
^P1STREET("IS","`ilz","dqpclx")
xlcpqd
^P1STREET("IS","`ilz","dqtexh`im")
mi`hxetqd
^P1STREET("IS","`ilz","dqto")
otqd
^P1STREET("IS","`ilz","dqzz")
zzqd
^P1STREET("IS","`ilz","drtxepi")
ipextrd
^P1STREET("IS","`ilz","dtgg")
ggtd
^P1STREET("IS","`ilz","dtln""g")
g"nltd
^P1STREET("IS","`ilz","dv`leo")
oel`vd
^P1STREET("IS","`ilz","dvlapim")
mipalvd
^P1STREET("IS","`ilz","dvltpim")
miptlvd
^P1STREET("IS","`ilz","dvtvtd")
dtvtvd
^P1STREET("IS","`ilz","dwitec")
cetiwd
^P1STREET("IS","`ilz","dx byex")
xeyb xd
^P1STREET("IS","`ilz","dxzj")
jzxd
^P1STREET("IS","`ilz","dyenxepim")
mipexneyd
^P1STREET("IS","`ilz","dyenxim")
mixneyd
^P1STREET("IS","`ilz","dygm")
mgyd
^P1STREET("IS","`ilz","dyxhh")
hhxyd
^P1STREET("IS","`ilz","dzekpd")
dpkezd
^P1STREET("IS","`ilz","dzetxz")
zxtezd
^P1STREET("IS","`ilz","dzeyid")
diyezd
^P1STREET("IS","`ilz","fdxeo")
oexdf
^P1STREET("IS","`ilz","firz `tij")
jit` zrif
^P1STREET("IS","`ilz","fizo")
ozif
^P1STREET("IS","`ilz","gexa")
axeg
^P1STREET("IS","`ilz","gil ddpcqd")
dqcpdd lig
^P1STREET("IS","`ilz","gklil")
lilkg
^P1STREET("IS","`ilz","hetf")
fteh
^P1STREET("IS","`ilz","hiilz ylnd dnlj")
jlnd dnly zliih
^P1STREET("IS","`ilz","ideyth")
htyedi
^P1STREET("IS","`ilz","idlem")
meldi
^P1STREET("IS","`ilz","ixeylim dylnd")
dnlyd milyexi
^P1STREET("IS","`ilz","kkx `iilim")
milii` xkk
^P1STREET("IS","`ilz","kkx d`xiez")
zeix`d xkk
^P1STREET("IS","`ilz","kkx exc")
cxe xkk
^P1STREET("IS","`ilz","kkx f`aim")
mia`f xkk
^P1STREET("IS","`ilz","kkx fdexiz")
zixedf xkk
^P1STREET("IS","`ilz","kkx gvxez")
zexvg xkk
^P1STREET("IS","`ilz","kkx lapd")
dpal xkk
^P1STREET("IS","`ilz","kkx nlki idecd")
dcedi ikln xkk
^P1STREET("IS","`ilz","kkx nwdlez")
zeldwn xkk
^P1STREET("IS","`ilz","kkx pnxim")
mixnp xkk
^P1STREET("IS","`ilz","kkx vpipiz")
zipipv xkk
^P1STREET("IS","`ilz","kkx xticim")
micitx xkk
^P1STREET("IS","`ilz","kxkem")
mekxk
^P1STREET("IS","`ilz","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","`ilz","leq `pb'lq")
ql'bp` qel
^P1STREET("IS","`ilz","lipci")
icpil
^P1STREET("IS","`ilz","lym")
myl
^P1STREET("IS","`ilz","n`xe")
ex`n
^P1STREET("IS","`ilz","nciio")
oiicn
^P1STREET("IS","`ilz","nlgd")
dgln
^P1STREET("IS","`ilz","nlkiz")
zikln
^P1STREET("IS","`ilz","nlkz ya`")
`ay zkln
^P1STREET("IS","`ilz","npbe")
ebpn
^P1STREET("IS","`ilz","nvtd pes")
sep dtvn
^P1STREET("IS","`ilz","nwex dgqicd")
dciqgd xewn
^P1STREET("IS","`ilz","nxkf xqwe")
ewqx fkxn
^P1STREET("IS","`ilz","ny' `aeao")
oaea` 'yn
^P1STREET("IS","`ilz","ny' `bef")
feb` 'yn
^P1STREET("IS","`ilz","ny' `cnepiz")
zipenc` 'yn
^P1STREET("IS","`ilz","ny' `ecm")
mce` 'yn
^P1STREET("IS","`ilz","ny' `ixiz")
zixi` 'yn
^P1STREET("IS","`ilz","ny' `teo")
oet` 'yn
^P1STREET("IS","`ilz","ny' `txqneo")
oenqxt` 'yn
^P1STREET("IS","`ilz","ny' `xpaz")
zapx` 'yn
^P1STREET("IS","`ilz","ny' `ykeliz")
zileky` 'yn
^P1STREET("IS","`ilz","ny' `zxeb")
bexz` 'yn
^P1STREET("IS","`ilz","ny' aewx")
xwea 'yn
^P1STREET("IS","`ilz","ny' axw")
wxa 'yn
^P1STREET("IS","`ilz","ny' bixiz")
zixib 'yn
^P1STREET("IS","`ilz","ny' cela")
alec 'yn
^P1STREET("IS","`ilz","ny' cexao")
oaxec 'yn
^P1STREET("IS","`ilz","ny' ctces")
sectc 'yn
^P1STREET("IS","`ilz","ny' cxcx")
xcxc 'yn
^P1STREET("IS","`ilz","ny' d`cenim")
minec`d 'yn
^P1STREET("IS","`ilz","ny' d`nex`im")
mi`xen`d 'yn
^P1STREET("IS","`ilz","ny' d`nexim")
mixen`d 'yn
^P1STREET("IS","`ilz","ny' d`txqw")
wqxt`d 'yn
^P1STREET("IS","`ilz","ny' d`xnim")
minx`d 'yn
^P1STREET("IS","`ilz","ny' dblrcim")
micrlbd 'yn
^P1STREET("IS","`ilz","ny' dbnlim")
milnbd 'yn
^P1STREET("IS","`ilz","ny' dcq")
qcd 'yn
^P1STREET("IS","`ilz","ny' ddnepim")
mipendd 'yn
^P1STREET("IS","`ilz","ny' dgizim")
mizigd 'yn
^P1STREET("IS","`ilz","ny' dgnpiz")
zipngd 'yn
^P1STREET("IS","`ilz","ny' dkprpim")
miprpkd 'yn
^P1STREET("IS","`ilz","ny' dnciipim")
mipiicnd 'yn
^P1STREET("IS","`ilz","ny' dne`aim")
mia`end 'yn
^P1STREET("IS","`ilz","ny' dnkaim")
miaknd 'yn
^P1STREET("IS","`ilz","ny' dpviu")
uivpd 'yn
^P1STREET("IS","`ilz","ny' drexa")
axerd 'yn
^P1STREET("IS","`ilz","ny' dwpd")
dpwd 'yn
^P1STREET("IS","`ilz","ny' dyenxepim")
mipexneyd 'yn
^P1STREET("IS","`ilz","ny' dywnd")
dnwyd 'yn
^P1STREET("IS","`ilz","ny' dzex")
xezd 'yn
^P1STREET("IS","`ilz","ny' fiz")
zif 'yn
^P1STREET("IS","`ilz","ny' glilo")
olilg 'yn
^P1STREET("IS","`ilz","ny' gpizo")
ozipg 'yn
^P1STREET("IS","`ilz","ny' gva")
avg 'yn
^P1STREET("IS","`ilz","ny' gxea")
aexg 'yn
^P1STREET("IS","`ilz","ny' gxviz")
zivxg 'yn
^P1STREET("IS","`ilz","ny' ieliz")
zilei 'yn
^P1STREET("IS","`ilz","ny' itd fpa")
apf dti 'yn
^P1STREET("IS","`ilz","ny' kxnim")
minxk 'yn
^P1STREET("IS","`ilz","ny' ldaiz")
ziadl 'yn
^P1STREET("IS","`ilz","ny' letiz")
zitel 'yn
^P1STREET("IS","`ilz","ny' lilj")
jlil 'yn
^P1STREET("IS","`ilz","ny' lineo")
oenil 'yn
^P1STREET("IS","`ilz","ny' lym")
myl 'yn
^P1STREET("IS","`ilz","ny' neliz")
zilen 'yn
^P1STREET("IS","`ilz","ny' npbe")
ebpn 'yn
^P1STREET("IS","`ilz","ny' npcxipd")
dpixcpn 'yn
^P1STREET("IS","`ilz","ny' nxieo")
oeixn 'yn
^P1STREET("IS","`ilz","ny' nyny")
ynyn 'yn
^P1STREET("IS","`ilz","ny' petx")
xtep 'yn
^P1STREET("IS","`ilz","ny' pexiz")
zixep 'yn
^P1STREET("IS","`ilz","ny' pivo")
ovip 'yn
^P1STREET("IS","`ilz","ny' pxwiq")
qiwxp 'yn
^P1STREET("IS","`ilz","ny' qaieo")
oeiaq 'yn
^P1STREET("IS","`ilz","ny' qdxeo")
oexdq 'yn
^P1STREET("IS","`ilz","ny' qeliz")
zileq 'yn
^P1STREET("IS","`ilz","ny' qnex")
xenq 'yn
^P1STREET("IS","`ilz","ny' rcrc")
crcr 'yn
^P1STREET("IS","`ilz","ny' ripa")
apir 'yn
^P1STREET("IS","`ilz","ny' rnepim")
mipenr 'yn
^P1STREET("IS","`ilz","ny' rxneo")
oenxr 'yn
^P1STREET("IS","`ilz","ny' tfiz")
zift 'yn
^P1STREET("IS","`ilz","ny' thiyo")
oyiht 'yn
^P1STREET("IS","`ilz","ny' thl")
lht 'yn
^P1STREET("IS","`ilz","ny' tlbiz")
ziblt 'yn
^P1STREET("IS","`ilz","ny' tqeo")
oeqt 'yn
^P1STREET("IS","`ilz","ny' tw`o")
o`wt 'yn
^P1STREET("IS","`ilz","ny' txtxeo")
oextxt 'yn
^P1STREET("IS","`ilz","ny' varepi")
iperav 'yn
^P1STREET("IS","`ilz","ny' vls")
slv 'yn
^P1STREET("IS","`ilz","ny' vpitim")
mitipv 'yn
^P1STREET("IS","`ilz","ny' wiqeq")
qeqiw 'yn
^P1STREET("IS","`ilz","ny' witecb")
bcetiw 'yn
^P1STREET("IS","`ilz","ny' xaia")
aiax 'yn
^P1STREET("IS","`ilz","ny' xebo")
obex 'yn
^P1STREET("IS","`ilz","ny' xiqo")
oqix 'yn
^P1STREET("IS","`ilz","ny' xwtz")
ztwx 'yn
^P1STREET("IS","`ilz","ny' ybi`")
`iby 'yn
^P1STREET("IS","`ilz","ny' yfis")
sify 'yn
^P1STREET("IS","`ilz","ny' ywc")
cwy 'yn
^P1STREET("IS","`ilz","ny' z`pd")
dp`z 'yn
^P1STREET("IS","`ilz","ny' zez")
zez 'yn
^P1STREET("IS","`ilz","ny' zlzo")
ozlz 'yn
^P1STREET("IS","`ilz","ny' ztef")
fetz 'yn
^P1STREET("IS","`ilz","ny' zteg")
getz 'yn
^P1STREET("IS","`ilz","nyrel azxo")
oxza leryn
^P1STREET("IS","`ilz","nyrel dbto")
otbd leryn
^P1STREET("IS","`ilz","nyrel dixco")
ocxid leryn
^P1STREET("IS","`ilz","pairez")
zeriap
^P1STREET("IS","`ilz","peed ncax")
xacn deep
^P1STREET("IS","`ilz","pgl fxgo")
ogxf lgp
^P1STREET("IS","`ilz","pgl gaieo")
oeiag lgp
^P1STREET("IS","`ilz","pgl gieo")
oeig lgp
^P1STREET("IS","`ilz","pgl kzeaez")
zeaezk lgp
^P1STREET("IS","`ilz","pgl nnyiz")
ziynn lgp
^P1STREET("IS","`ilz","pgl rnxm")
mxnr lgp
^P1STREET("IS","`ilz","pgl xgm")
mgx lgp
^P1STREET("IS","`ilz","pgl ygexz")
zxegy lgp
^P1STREET("IS","`ilz","pgl ygxez")
zexgy lgp
^P1STREET("IS","`ilz","pgyeo")
oeygp
^P1STREET("IS","`ilz","phtim kkx")
xkk mithp
^P1STREET("IS","`ilz","prnd")
dnrp
^P1STREET("IS","`ilz","pyx")
xyp
^P1STREET("IS","`ilz","qaieo")
oeiaq
^P1STREET("IS","`ilz","qcio")
oicq
^P1STREET("IS","`ilz","qgla")
algq
^P1STREET("IS","`ilz","qibim")
mibiq
^P1STREET("IS","`ilz","qibliz")
zilbiq
^P1STREET("IS","`ilz","qileo")
oeliq
^P1STREET("IS","`ilz","qipi")
ipiq
^P1STREET("IS","`ilz","qn' aynz")
znya 'nq
^P1STREET("IS","`ilz","qn' dvew")
wevd 'nq
^P1STREET("IS","`ilz","qn' dx leu")
uel xd 'nq
^P1STREET("IS","`ilz","qn' ne`a")
a`en 'nq
^P1STREET("IS","`ilz","qn' vio")
oiv 'nq
^P1STREET("IS","`ilz","qn' xineo")
oenix 'nq
^P1STREET("IS","`ilz","qnhz ciyepim")
mipeyic zhnq
^P1STREET("IS","`ilz","qnhz d`yl")
ly`d zhnq
^P1STREET("IS","`ilz","qnhz dnqilez")
zeliqnd zhnq
^P1STREET("IS","`ilz","qnhz dva`im")
mi`avd zhnq
^P1STREET("IS","`ilz","qnhz dx byex")
xeyb xd zhnq
^P1STREET("IS","`ilz","qnhz dx clrz")
zrlc xd zhnq
^P1STREET("IS","`ilz","qnhz dx glewim")
miwelg xd zhnq
^P1STREET("IS","`ilz","qnhz dx qrx")
xrq xd zhnq
^P1STREET("IS","`ilz","qnhz dx yileo")
oeliy xd zhnq
^P1STREET("IS","`ilz","qnhz dx ylnd")
dnly xd zhnq
^P1STREET("IS","`ilz","qnhz gavlz")
zlvag zhnq
^P1STREET("IS","`ilz","qnhz pgl ginx")
xnig lgp zhnq
^P1STREET("IS","`ilz","qnhz pgl npegd")
dgepn lgp zhnq
^P1STREET("IS","`ilz","qnhz pgl vigex")
xegiv lgp zhnq
^P1STREET("IS","`ilz","qnhz retxim")
mixter zhnq
^P1STREET("IS","`ilz","qnhz rixiz")
zixir zhnq
^P1STREET("IS","`ilz","qnhz vewim")
miwev zhnq
^P1STREET("IS","`ilz","qnhz ytiteo")
oetity zhnq
^P1STREET("IS","`ilz","qtix")
xitq
^P1STREET("IS","`ilz","qzepiz")
zipezq
^P1STREET("IS","`ilz","raxepd")
dpexar
^P1STREET("IS","`ilz","rio aeww")
wwea oir
^P1STREET("IS","`ilz","rio bci")
icb oir
^P1STREET("IS","`ilz","rio ida")
adi oir
^P1STREET("IS","`ilz","rio nex")
xen oir
^P1STREET("IS","`ilz","rio phtim")
mithp oir
^P1STREET("IS","`ilz","rio rwa")
awr oir
^P1STREET("IS","`ilz","rio rwxaim")
miaxwr oir
^P1STREET("IS","`ilz","rvieo bax")
xab oeivr
^P1STREET("IS","`ilz","ryey")
yeyr
^P1STREET("IS","`ilz","t`xo")
ox`t
^P1STREET("IS","`ilz","thie")
eiht
^P1STREET("IS","`ilz","tiweq")
qewit
^P1STREET("IS","`ilz","tpexnd")
dnxept
^P1STREET("IS","`ilz","txq")
qxt
^P1STREET("IS","`ilz","vareo")
oerav
^P1STREET("IS","`ilz","vetiz")
zitev
^P1STREET("IS","`ilz","vitgd")
dgtiv
^P1STREET("IS","`ilz","w`no")
on`w
^P1STREET("IS","`ilz","w`nto")
otn`w
^P1STREET("IS","`ilz","wcy")
ycw
^P1STREET("IS","`ilz","wevo fdea")
aedf ovew
^P1STREET("IS","`ilz","wxwl")
lwxw
^P1STREET("IS","`ilz","xecc")
ccex
^P1STREET("IS","`ilz","xg' 1")
1 'gx
^P1STREET("IS","`ilz","xg' 1010")
1010 'gx
^P1STREET("IS","`ilz","xg' 103")
103 'gx
^P1STREET("IS","`ilz","xg' 11")
11 'gx
^P1STREET("IS","`ilz","xg' 1101")
1101 'gx
^P1STREET("IS","`ilz","xg' 1103")
1103 'gx
^P1STREET("IS","`ilz","xg' 1106")
1106 'gx
^P1STREET("IS","`ilz","xg' 1107")
1107 'gx
^P1STREET("IS","`ilz","xg' 1109")
1109 'gx
^P1STREET("IS","`ilz","xg' 1110")
1110 'gx
^P1STREET("IS","`ilz","xg' 1111")
1111 'gx
^P1STREET("IS","`ilz","xg' 1112")
1112 'gx
^P1STREET("IS","`ilz","xg' 1113")
1113 'gx
^P1STREET("IS","`ilz","xg' 1128")
1128 'gx
^P1STREET("IS","`ilz","xg' 1129")
1129 'gx
^P1STREET("IS","`ilz","xg' 1131")
1131 'gx
^P1STREET("IS","`ilz","xg' 1132")
1132 'gx
^P1STREET("IS","`ilz","xg' 1133")
1133 'gx
^P1STREET("IS","`ilz","xg' 1134")
1134 'gx
^P1STREET("IS","`ilz","xg' 1141")
1141 'gx
^P1STREET("IS","`ilz","xg' 1142")
1142 'gx
^P1STREET("IS","`ilz","xg' 1143")
1143 'gx
^P1STREET("IS","`ilz","xg' 1144")
1144 'gx
^P1STREET("IS","`ilz","xg' 1146")
1146 'gx
^P1STREET("IS","`ilz","xg' 1150")
1150 'gx
^P1STREET("IS","`ilz","xg' 15")
15 'gx
^P1STREET("IS","`ilz","xg' 16")
16 'gx
^P1STREET("IS","`ilz","xg' 160")
160 'gx
^P1STREET("IS","`ilz","xg' 167")
167 'gx
^P1STREET("IS","`ilz","xg' 169")
169 'gx
^P1STREET("IS","`ilz","xg' 17")
17 'gx
^P1STREET("IS","`ilz","xg' 170")
170 'gx
^P1STREET("IS","`ilz","xg' 18")
18 'gx
^P1STREET("IS","`ilz","xg' 1853")
1853 'gx
^P1STREET("IS","`ilz","xg' 194")
194 'gx
^P1STREET("IS","`ilz","xg' 195")
195 'gx
^P1STREET("IS","`ilz","xg' 2")
2 'gx
^P1STREET("IS","`ilz","xg' 20")
20 'gx
^P1STREET("IS","`ilz","xg' 2110")
2110 'gx
^P1STREET("IS","`ilz","xg' 215")
215 'gx
^P1STREET("IS","`ilz","xg' 22")
22 'gx
^P1STREET("IS","`ilz","xg' 223")
223 'gx
^P1STREET("IS","`ilz","xg' 225")
225 'gx
^P1STREET("IS","`ilz","xg' 227")
227 'gx
^P1STREET("IS","`ilz","xg' 23")
23 'gx
^P1STREET("IS","`ilz","xg' 230")
230 'gx
^P1STREET("IS","`ilz","xg' 236")
236 'gx
^P1STREET("IS","`ilz","xg' 241")
241 'gx
^P1STREET("IS","`ilz","xg' 242")
242 'gx
^P1STREET("IS","`ilz","xg' 247")
247 'gx
^P1STREET("IS","`ilz","xg' 248")
248 'gx
^P1STREET("IS","`ilz","xg' 25")
25 'gx
^P1STREET("IS","`ilz","xg' 251")
251 'gx
^P1STREET("IS","`ilz","xg' 256")
256 'gx
^P1STREET("IS","`ilz","xg' 261")
261 'gx
^P1STREET("IS","`ilz","xg' 28")
28 'gx
^P1STREET("IS","`ilz","xg' 29")
29 'gx
^P1STREET("IS","`ilz","xg' 294")
294 'gx
^P1STREET("IS","`ilz","xg' 299")
299 'gx
^P1STREET("IS","`ilz","xg' 3")
3 'gx
^P1STREET("IS","`ilz","xg' 30")
30 'gx
^P1STREET("IS","`ilz","xg' 32")
32 'gx
^P1STREET("IS","`ilz","xg' 3307")
3307 'gx
^P1STREET("IS","`ilz","xg' 3308")
3308 'gx
^P1STREET("IS","`ilz","xg' 3309")
3309 'gx
^P1STREET("IS","`ilz","xg' 331")
331 'gx
^P1STREET("IS","`ilz","xg' 3344")
3344 'gx
^P1STREET("IS","`ilz","xg' 345")
345 'gx
^P1STREET("IS","`ilz","xg' 346")
346 'gx
^P1STREET("IS","`ilz","xg' 347")
347 'gx
^P1STREET("IS","`ilz","xg' 349")
349 'gx
^P1STREET("IS","`ilz","xg' 353")
353 'gx
^P1STREET("IS","`ilz","xg' 357")
357 'gx
^P1STREET("IS","`ilz","xg' 361")
361 'gx
^P1STREET("IS","`ilz","xg' 4")
4 'gx
^P1STREET("IS","`ilz","xg' 4003")
4003 'gx
^P1STREET("IS","`ilz","xg' 4008")
4008 'gx
^P1STREET("IS","`ilz","xg' 4009")
4009 'gx
^P1STREET("IS","`ilz","xg' 401")
401 'gx
^P1STREET("IS","`ilz","xg' 4010")
4010 'gx
^P1STREET("IS","`ilz","xg' 4011")
4011 'gx
^P1STREET("IS","`ilz","xg' 4013")
4013 'gx
^P1STREET("IS","`ilz","xg' 4014")
4014 'gx
^P1STREET("IS","`ilz","xg' 4016")
4016 'gx
^P1STREET("IS","`ilz","xg' 4019")
4019 'gx
^P1STREET("IS","`ilz","xg' 405")
405 'gx
^P1STREET("IS","`ilz","xg' 407")
407 'gx
^P1STREET("IS","`ilz","xg' 409")
409 'gx
^P1STREET("IS","`ilz","xg' 410")
410 'gx
^P1STREET("IS","`ilz","xg' 411")
411 'gx
^P1STREET("IS","`ilz","xg' 421")
421 'gx
^P1STREET("IS","`ilz","xg' 422")
422 'gx
^P1STREET("IS","`ilz","xg' 425")
425 'gx
^P1STREET("IS","`ilz","xg' 427")
427 'gx
^P1STREET("IS","`ilz","xg' 434")
434 'gx
^P1STREET("IS","`ilz","xg' 442")
442 'gx
^P1STREET("IS","`ilz","xg' 450")
450 'gx
^P1STREET("IS","`ilz","xg' 453")
453 'gx
^P1STREET("IS","`ilz","xg' 483")
483 'gx
^P1STREET("IS","`ilz","xg' 5")
5 'gx
^P1STREET("IS","`ilz","xg' 501")
501 'gx
^P1STREET("IS","`ilz","xg' 5067")
5067 'gx
^P1STREET("IS","`ilz","xg' 5076")
5076 'gx
^P1STREET("IS","`ilz","xg' 5101")
5101 'gx
^P1STREET("IS","`ilz","xg' 5102")
5102 'gx
^P1STREET("IS","`ilz","xg' 5103")
5103 'gx
^P1STREET("IS","`ilz","xg' 5104")
5104 'gx
^P1STREET("IS","`ilz","xg' 5107")
5107 'gx
^P1STREET("IS","`ilz","xg' 5111")
5111 'gx
^P1STREET("IS","`ilz","xg' 5112")
5112 'gx
^P1STREET("IS","`ilz","xg' 5113")
5113 'gx
^P1STREET("IS","`ilz","xg' 5202")
5202 'gx
^P1STREET("IS","`ilz","xg' 5203")
5203 'gx
^P1STREET("IS","`ilz","xg' 5204")
5204 'gx
^P1STREET("IS","`ilz","xg' 5205")
5205 'gx
^P1STREET("IS","`ilz","xg' 53")
53 'gx
^P1STREET("IS","`ilz","xg' 530")
530 'gx
^P1STREET("IS","`ilz","xg' 555")
555 'gx
^P1STREET("IS","`ilz","xg' 566")
566 'gx
^P1STREET("IS","`ilz","xg' 567")
567 'gx
^P1STREET("IS","`ilz","xg' 570")
570 'gx
^P1STREET("IS","`ilz","xg' 6003")
6003 'gx
^P1STREET("IS","`ilz","xg' 6004")
6004 'gx
^P1STREET("IS","`ilz","xg' 6005")
6005 'gx
^P1STREET("IS","`ilz","xg' 6006")
6006 'gx
^P1STREET("IS","`ilz","xg' 6007")
6007 'gx
^P1STREET("IS","`ilz","xg' 6008")
6008 'gx
^P1STREET("IS","`ilz","xg' 601")
601 'gx
^P1STREET("IS","`ilz","xg' 6010")
6010 'gx
^P1STREET("IS","`ilz","xg' 604")
604 'gx
^P1STREET("IS","`ilz","xg' 605")
605 'gx
^P1STREET("IS","`ilz","xg' 606")
606 'gx
^P1STREET("IS","`ilz","xg' 608")
608 'gx
^P1STREET("IS","`ilz","xg' 611")
611 'gx
^P1STREET("IS","`ilz","xg' 612")
612 'gx
^P1STREET("IS","`ilz","xg' 613")
613 'gx
^P1STREET("IS","`ilz","xg' 614")
614 'gx
^P1STREET("IS","`ilz","xg' 615")
615 'gx
^P1STREET("IS","`ilz","xg' 616")
616 'gx
^P1STREET("IS","`ilz","xg' 617")
617 'gx
^P1STREET("IS","`ilz","xg' 619")
619 'gx
^P1STREET("IS","`ilz","xg' 620")
620 'gx
^P1STREET("IS","`ilz","xg' 64")
64 'gx
^P1STREET("IS","`ilz","xg' 651")
651 'gx
^P1STREET("IS","`ilz","xg' 652")
652 'gx
^P1STREET("IS","`ilz","xg' 683")
683 'gx
^P1STREET("IS","`ilz","xg' 684")
684 'gx
^P1STREET("IS","`ilz","xg' 686")
686 'gx
^P1STREET("IS","`ilz","xg' 688")
688 'gx
^P1STREET("IS","`ilz","xg' 689")
689 'gx
^P1STREET("IS","`ilz","xg' 690")
690 'gx
^P1STREET("IS","`ilz","xg' 692")
692 'gx
^P1STREET("IS","`ilz","xg' 699")
699 'gx
^P1STREET("IS","`ilz","xg' 7")
7 'gx
^P1STREET("IS","`ilz","xg' 700")
700 'gx
^P1STREET("IS","`ilz","xg' 7002")
7002 'gx
^P1STREET("IS","`ilz","xg' 7003")
7003 'gx
^P1STREET("IS","`ilz","xg' 7004")
7004 'gx
^P1STREET("IS","`ilz","xg' 7005")
7005 'gx
^P1STREET("IS","`ilz","xg' 7007")
7007 'gx
^P1STREET("IS","`ilz","xg' 7008")
7008 'gx
^P1STREET("IS","`ilz","xg' 7009")
7009 'gx
^P1STREET("IS","`ilz","xg' 7011")
7011 'gx
^P1STREET("IS","`ilz","xg' 7013")
7013 'gx
^P1STREET("IS","`ilz","xg' 7017")
7017 'gx
^P1STREET("IS","`ilz","xg' 7019")
7019 'gx
^P1STREET("IS","`ilz","xg' 7020")
7020 'gx
^P1STREET("IS","`ilz","xg' 7021")
7021 'gx
^P1STREET("IS","`ilz","xg' 7022")
7022 'gx
^P1STREET("IS","`ilz","xg' 7045")
7045 'gx
^P1STREET("IS","`ilz","xg' 7054")
7054 'gx
^P1STREET("IS","`ilz","xg' 7061")
7061 'gx
^P1STREET("IS","`ilz","xg' 712")
712 'gx
^P1STREET("IS","`ilz","xg' 7500")
7500 'gx
^P1STREET("IS","`ilz","xg' 800")
800 'gx
^P1STREET("IS","`ilz","xg' 885")
885 'gx
^P1STREET("IS","`ilz","xg' 886")
886 'gx
^P1STREET("IS","`ilz","xg' 887")
887 'gx
^P1STREET("IS","`ilz","xg' 888")
888 'gx
^P1STREET("IS","`ilz","xg' 889")
889 'gx
^P1STREET("IS","`ilz","xg' 891")
891 'gx
^P1STREET("IS","`ilz","xg' 892")
892 'gx
^P1STREET("IS","`ilz","xg' 893")
893 'gx
^P1STREET("IS","`ilz","xg' 9")
9 'gx
^P1STREET("IS","`ilz","xnez `ilz")
zli` zenx
^P1STREET("IS","`ilz","xznim")
minzx
^P1STREET("IS","`ilz","yail baim")
miab liay
^P1STREET("IS","`ilz","yail dnkxez")
zexknd liay
^P1STREET("IS","`ilz","yail dvai")
iavd liay
^P1STREET("IS","`ilz","yail dzpipim")
mipipzd liay
^P1STREET("IS","`ilz","yail epeq")
qepe liay
^P1STREET("IS","`ilz","yail vax")
xav liay
^P1STREET("IS","`ilz","yail yf""x")
x"fy liay
^P1STREET("IS","`ilz","yc' `ilez")
zeli` 'cy
^P1STREET("IS","`ilz","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","`ilz","yc' apinio")
oinipa 'cy
^P1STREET("IS","`ilz","yc' dznxim")
mixnzd 'cy
^P1STREET("IS","`ilz","yc' ghiaz belpi")
ipleb zaihg 'cy
^P1STREET("IS","`ilz","yc' ghiaz dpba")
abpd zaihg 'cy
^P1STREET("IS","`ilz","yc' irlim")
milri 'cy
^P1STREET("IS","`ilz","yc' reacd")
dcaer 'cy
^P1STREET("IS","`ilz","yc' yyz dinim")
minid zyy 'cy
^P1STREET("IS","`ilz","yedm")
mdey
^P1STREET("IS","`ilz","yex")
xey
^P1STREET("IS","`ilz","ygneo")
oengy
^P1STREET("IS","`ilz","ygs")
sgy
^P1STREET("IS","`ilz","yx")
xy
^P1STREET("IS","`ilz","yxaiho")
ohiaxy
^P1STREET("IS","`ilz","zaepd")
dpeaz
^P1STREET("IS","`ilz","znx")
xnz
^P1STREET("IS","`izo")
ozi`
^P1STREET("IS","`kq`l")
l`qk`
^P1STREET("IS","`lend")
dnel`
^P1STREET("IS","`lend","igfw`l gfeo")
oefg l`wfgi
^P1STREET("IS","`leo")
oel`
^P1STREET("IS","`leo dblil")
lilbd oel`
^P1STREET("IS","`leo dblil","d`xarim")
mirax`d
^P1STREET("IS","`leo yaez")
zeay oel`
^P1STREET("IS","`leo yaez","bey rvieo")
oeivr yeb
^P1STREET("IS","`leo yaez","d`bef")
feb`d
^P1STREET("IS","`leo yaez","d`xf")
fx`d
^P1STREET("IS","`leo yaez","dfiz")
zifd
^P1STREET("IS","`leo yaez","dxwtz")
ztwxd
^P1STREET("IS","`leo yaez","dyiixez")
zexiiyd
^P1STREET("IS","`leo yaez","dz`pd")
dp`zd
^P1STREET("IS","`leo yaez","dznx")
xnzd
^P1STREET("IS","`leo yaez","k""g a`iix")
xii`a g"k
^P1STREET("IS","`leo yaez","nbipi dbey")
yebd ipibn
^P1STREET("IS","`leo yaez","nrld nik`l")
l`kin dlrn
^P1STREET("IS","`leo yaez","nyrel dexc")
cxed leryn
^P1STREET("IS","`leo yaez","waevz `axdm")
mdxa` zveaw
^P1STREET("IS","`lepi `a`")
`a` ipel`
^P1STREET("IS","`lepim")
mipel`
^P1STREET("IS","`likio")
oikil`
^P1STREET("IS","`likio",17)
17
^P1STREET("IS","`likio","dbto")
otbd
^P1STREET("IS","`likio","dcxex")
xexcd
^P1STREET("IS","`likio","dexc")
cxed
^P1STREET("IS","`likio","dgxviz")
zivxgd
^P1STREET("IS","`likio","diqnio")
oinqid
^P1STREET("IS","`likio","dpxwiq")
qiwxpd
^P1STREET("IS","`likio","dqaieo")
oeiaqd
^P1STREET("IS","`likio","dvitexo")
oxetivd
^P1STREET("IS","`likio","dxineo")
oenixd
^P1STREET("IS","`likio","dxwtz")
ztwxd
^P1STREET("IS","`likio","dxy""y")
y"yxd
^P1STREET("IS","`likio","dz`pd")
dp`zd
^P1STREET("IS","`likio","gavlz dyxeo")
oexyd zlvag
^P1STREET("IS","`likio","kpti dpyxim")
mixypd itpk
^P1STREET("IS","`likio","nxac dwqnim")
minqwd caxn
^P1STREET("IS","`likio","pexiz")
zixep
^P1STREET("IS","`likio","qlriz")
zirlq
^P1STREET("IS","`likio","xna""m")
m"anx
^P1STREET("IS","`likio","yafi")
ifay
^P1STREET("IS","`litlh")
hltil`
^P1STREET("IS","`liwim")
miwil`
^P1STREET("IS","`liyia")
aiyil`
^P1STREET("IS","`liyia","dblrc")
crlbd
^P1STREET("IS","`liyia","dglevim")
mivelgd
^P1STREET("IS","`liynr")
rnyil`
^P1STREET("IS","`liynr","dcwl")
lwcd
^P1STREET("IS","`liynr","dexcim")
micxed
^P1STREET("IS","`liynr","dklpiz")
ziplkd
^P1STREET("IS","`liynr","dpxwiq")
qiwxpd
^P1STREET("IS","`liynr","dxwtz")
ztwxd
^P1STREET("IS","`lnez")
zenl`
^P1STREET("IS","`lrc")
crl`
^P1STREET("IS","`lrc","`ahlieo")
oeilha`
^P1STREET("IS","`lrc","`ao baixel")
lexiab oa`
^P1STREET("IS","`lrc","arli dzeqtez")
zetqezd ilra
^P1STREET("IS","`lrc","dll")
lld
^P1STREET("IS","`lrc","dx""y")
y"xd
^P1STREET("IS","`lrc","dxi""s")
s"ixd
^P1STREET("IS","`lrc","dxiha""`")
`"ahixd
^P1STREET("IS","`lrc","dxya""i")
i"ayxd
^P1STREET("IS","`lrc","dxya""m")
m"ayxd
^P1STREET("IS","`lrc","dz`pd")
dp`zd
^P1STREET("IS","`lrc","dzex")
xezd
^P1STREET("IS","`lrc","fnix")
xinf
^P1STREET("IS","`lrc","gepi dnrbl")
lbrnd ipeg
^P1STREET("IS","`lrc","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","`lrc","iegpo ao fk`i")
i`kf oa opgei
^P1STREET("IS","`lrc","iepzo ao refi`l")
l`ifer oa ozpei
^P1STREET("IS","`lrc","ieqi ao wiqn`")
`nqiw oa iqei
^P1STREET("IS","`lrc","piqim b`eo")
oe`b miqip
^P1STREET("IS","`lrc","x`a""c")
c"a`x
^P1STREET("IS","`lrc","xai gii`")
`iig iax
^P1STREET("IS","`lrc","xai n`ix")
xi`n iax
^P1STREET("IS","`lrc","xai rwia`")
`aiwr iax
^P1STREET("IS","`lrc","xai tpgq ao i`ix")
xi`i oa qgpt iax
^P1STREET("IS","`lrc","xai yne`l dpbic")
cibpd l`eny iax
^P1STREET("IS","`lrc","xai ynreo ao yhg")
ghy oa oerny iax
^P1STREET("IS","`lrc","xape agii")
iiga epax
^P1STREET("IS","`lrc","xape reacid naxhpexd")
dxephxan dicaer epax
^P1STREET("IS","`lrc","xape zm")
mz epax
^P1STREET("IS","`lrc","xc""w")
w"cx
^P1STREET("IS","`lrc","xna""m")
m"anx
^P1STREET("IS","`lrc","xy""i")
i"yx
^P1STREET("IS","`lrc","yn`i")
i`ny
^P1STREET("IS","`lrc","ynreo dvciw")
wicvd oerny
^P1STREET("IS","`lrc","ynrid")
dirny
^P1STREET("IS","`lrfx")
xfrl`
^P1STREET("IS","`lrfx","betpd")
dpteb
^P1STREET("IS","`lrfx","bey rvieo")
oeivr yeb
^P1STREET("IS","`lrfx","idepzo")
ozpedi
^P1STREET("IS","`lrfx","ylenvieo")
oeivnely
^P1STREET("IS","`lti npyd")
dypn itl`
^P1STREET("IS","`lti npyd","`cix")
xic`
^P1STREET("IS","`lti npyd","`ecm")
mce`
^P1STREET("IS","`lti npyd","`iileo")
oelii`
^P1STREET("IS","`lti npyd","`ixeq")
qexi`
^P1STREET("IS","`lti npyd","`xal")
lax`
^P1STREET("IS","`lti npyd","`xbno")
onbx`
^P1STREET("IS","`lti npyd","belo")
oleb
^P1STREET("IS","`lti npyd","blaer")
realb
^P1STREET("IS","`lti npyd","blrc")
crlb
^P1STREET("IS","`lti npyd","co")
oc
^P1STREET("IS","`lti npyd","cxex")
xexc
^P1STREET("IS","`lti npyd","dfiz")
zifd
^P1STREET("IS","`lti npyd","dgxea")
aexgd
^P1STREET("IS","`lti npyd","dixco")
ocxid
^P1STREET("IS","`lti npyd","drnw")
wnrd
^P1STREET("IS","`lti npyd","drtxepi")
ipextrd
^P1STREET("IS","`lti npyd","dxces")
secxd
^P1STREET("IS","`lti npyd","dz`pd")
dp`zd
^P1STREET("IS","`lti npyd","gegiz")
zigeg
^P1STREET("IS","`lti npyd","glevi dzryiid")
diiyrzd ivelg
^P1STREET("IS","`lti npyd","gxneo")
oenxg
^P1STREET("IS","`lti npyd","klpiz")
ziplk
^P1STREET("IS","`lti npyd","kpro")
orpk
^P1STREET("IS","`lti npyd","kxkem")
mekxk
^P1STREET("IS","`lti npyd","kxnl")
lnxk
^P1STREET("IS","`lti npyd","lehm")
mhel
^P1STREET("IS","`lti npyd","liapd")
dpail
^P1STREET("IS","`lti npyd","lkiy")
yikl
^P1STREET("IS","`lti npyd","nixeo")
oexin
^P1STREET("IS","`lti npyd","npex")
xepn
^P1STREET("IS","`lti npyd","qaieo")
oeiaq
^P1STREET("IS","`lti npyd","qlriz")
zirlq
^P1STREET("IS","`lti npyd","qpepiz")
zipepq
^P1STREET("IS","`lti npyd","rvneo")
oenvr
^P1STREET("IS","`lti npyd","telb")
blet
^P1STREET("IS","`lti npyd","tyey")
yeyt
^P1STREET("IS","`lti npyd","vetiz")
zitev
^P1STREET("IS","`lti npyd","wcxeo")
oexcw
^P1STREET("IS","`lti npyd","xaic")
ciax
^P1STREET("IS","`lti npyd","xwtz")
ztwx
^P1STREET("IS","`lti npyd","ybi`")
`iby
^P1STREET("IS","`lti npyd","yexw")
wxey
^P1STREET("IS","`lti npyd","ylcb")
bcly
^P1STREET("IS","`lti npyd","zaex")
xeaz
^P1STREET("IS","`lwey")
yewl`
^P1STREET("IS","`lwpd")
dpwl`
^P1STREET("IS","`lwpd",9143)
9143
^P1STREET("IS","`lwpd","`edli wicx")
xciw ilde`
^P1STREET("IS","`lwpd","`tiwi nim")
min iwit`
^P1STREET("IS","`lwpd","`xal")
lax`
^P1STREET("IS","`lwpd","`yweaiz")
ziaewy`
^P1STREET("IS","`lwpd","bipz `bef")
feb` zpib
^P1STREET("IS","`lwpd","dxi aynim")
minya ixd
^P1STREET("IS","`lwpd","gavlz dyxeo")
oexyd zlvag
^P1STREET("IS","`lwpd","hexi fda")
adf ixeh
^P1STREET("IS","`lwpd","kxnl")
lnxk
^P1STREET("IS","`lwpd","nbcl dlapeo")
oepald lcbn
^P1STREET("IS","`lwpd","nyrel zxyiy")
yiyxz leryn
^P1STREET("IS","`lwpd","qncx")
xcnq
^P1STREET("IS","`lwpd","rxebez daeym")
myead zebexr
^P1STREET("IS","`lwpd","tlg dxineo")
oenixd glt
^P1STREET("IS","`lwpd","vxex dnex")
xend xexv
^P1STREET("IS","`lwpd","yix dyixim")
mixiyd xiy
^P1STREET("IS","`lwpd","ypix")
xipy
^P1STREET("IS","`lwpd","zteg")
getz
^P1STREET("IS","`lxe`i")
i`exl`
^P1STREET("IS","`lxe`i","dziyai")
iayizd
^P1STREET("IS","`m `l-bpm")
mpb-l` m`
^P1STREET("IS","`nepim")
mipen`
^P1STREET("IS","`nepim","dcwl")
lwcd
^P1STREET("IS","`nepim","dxineo")
oenixd
^P1STREET("IS","`nvid")
divn`
^P1STREET("IS","`ralio")
oilar`
^P1STREET("IS","`ralio","`l kxem")
mexk l`
^P1STREET("IS","`ralio","`l qixd")
dxiq l`
^P1STREET("IS","`ralio","`l rio")
oir l`
^P1STREET("IS","`tiwim")
miwit`
^P1STREET("IS","`tw")
wt`
^P1STREET("IS","`tw","dcxex")
xexcd
^P1STREET("IS","`tw","idepzo")
ozpedi
^P1STREET("IS","`twd")
dwt`
^P1STREET("IS","`twd","dpehx")
xhepd
^P1STREET("IS","`txicx")
xcixt`
^P1STREET("IS","`txicx","yc' cxem `txiwd")
dwixt` mexc 'cy
^P1STREET("IS","`txz")
zxt`
^P1STREET("IS","`txz","`lrfx")
xfrl`
^P1STREET("IS","`txz","barz xineo")
oenix zrab
^P1STREET("IS","`txz","bto")
otb
^P1STREET("IS","`txz","dbe`l")
l`ebd
^P1STREET("IS","`txz","dbexo")
oxebd
^P1STREET("IS","`txz","dcwl")
lwcd
^P1STREET("IS","`txz","dl""d")
d"ld
^P1STREET("IS","`txz","dnriio")
oiirnd
^P1STREET("IS","`txz","dnrio")
oirnd
^P1STREET("IS","`txz","dwhexz")
zxehwd
^P1STREET("IS","`txz","dyiixez")
zexiiyd
^P1STREET("IS","`txz","dzryid")
diyrzd
^P1STREET("IS","`txz","fiz dyno")
onyd zif
^P1STREET("IS","`txz","fxeaal")
laaexf
^P1STREET("IS","`txz","idecd dnkai")
iaknd dcedi
^P1STREET("IS","`txz","iepzo dgynep`i")
i`penygd ozpei
^P1STREET("IS","`txz","nae` `leo")
oel` `ean
^P1STREET("IS","`txz","nae` dcq")
qcd `ean
^P1STREET("IS","`txz","nae` dcx")
xcd `ean
^P1STREET("IS","`txz","nae` gxea")
aexg `ean
^P1STREET("IS","`txz","nae` rxad")
daxr `ean
^P1STREET("IS","`txz","nbcl rcx")
xcr lcbn
^P1STREET("IS","`txz","nexiz")
zixen
^P1STREET("IS","`txz","nrla dfiz")
zifd alrn
^P1STREET("IS","`txz","nrld `exo")
oxe` dlrn
^P1STREET("IS","`txz","nrld axey")
yexa dlrn
^P1STREET("IS","`txz","nrld dfiz")
zifd dlrn
^P1STREET("IS","`txz","nrld irxd")
dxri dlrn
^P1STREET("IS","`txz","nrld ktx rvieo")
oeivr xtk dlrn
^P1STREET("IS","`txz","nrld lehm")
mhel dlrn
^P1STREET("IS","`txz","nrld nkny")
ynkn dlrn
^P1STREET("IS","`txz","nrld rio vexim")
mixev oir dlrn
^P1STREET("IS","`txz","nrld whla")
alhw dlrn
^P1STREET("IS","`txz","nrld xacim")
micax dlrn
^P1STREET("IS","`txz","nrld zcdx")
xdcz dlrn
^P1STREET("IS","`txz","nyrel dkxnim")
minxkd leryn
^P1STREET("IS","`txz","pvg ixeylim")
milyexi gvp
^P1STREET("IS","`txz","pvx iyi")
iyi xvp
^P1STREET("IS","`txz","qncx")
xcnq
^P1STREET("IS","`txz","rfx`")
`xfr
^P1STREET("IS","`txz","xez")
zex
^P1STREET("IS","`txz","xineo")
oenix
^P1STREET("IS","`txz","yc' cec dnlj")
jlnd cec 'cy
^P1STREET("IS","`txz","yiaz vieo")
oeiv zaiy
^P1STREET("IS","`txz","z`pd")
dp`z
^P1STREET("IS","`txz","zixey")
yexiz
^P1STREET("IS","`txz","znx")
xnz
^P1STREET("IS","`xal")
lax`
^P1STREET("IS","`xf")
fx`
^P1STREET("IS","`xf","dgxeyz")
zyexgd
^P1STREET("IS","`xf","divixd")
dxivid
^P1STREET("IS","`xf","dnl`kd")
dk`lnd
^P1STREET("IS","`xf","dztixd")
dxitzd
^P1STREET("IS","`xf","vd""l")
l"dv
^P1STREET("IS","`xi`l")
l`ix`
^P1STREET("IS","`xi`l","`apx")
xpa`
^P1STREET("IS","`xi`l","`exi ax`eo")
oe`xa ixe`
^P1STREET("IS","`xi`l","`li`a")
a`il`
^P1STREET("IS","`xi`l","aiz lgm")
mgl zia
^P1STREET("IS","`xi`l","ao iwx bz")
zb xwi oa
^P1STREET("IS","`xi`l","awrz dixco")
ocxid zrwa
^P1STREET("IS","`xi`l","axw")
wxa
^P1STREET("IS","`xi`l","b'eo wpci")
icpw oe'b
^P1STREET("IS","`xi`l","bcreo")
oercb
^P1STREET("IS","`xi`l","bpim")
mipb
^P1STREET("IS","`xi`l","co")
oc
^P1STREET("IS","`xi`l","cwl")
lwc
^P1STREET("IS","`xi`l","cxj `txz`")
`zxt` jxc
^P1STREET("IS","`xi`l","cxj dviepez")
zepeivd jxc
^P1STREET("IS","`xi`l","cxj rtxeo")
oextr jxc
^P1STREET("IS","`xi`l","cxj xnz dbelo")
olebd znx jxc
^P1STREET("IS","`xi`l","d`leo")
oel`d
^P1STREET("IS","`xi`l","d`v""l")
l"v`d
^P1STREET("IS","`xi`l","d`xf")
fx`d
^P1STREET("IS","`xi`l","dayo")
oyad
^P1STREET("IS","`xi`l","dblil")
lilbd
^P1STREET("IS","`xi`l","dblrc")
crlbd
^P1STREET("IS","`xi`l","ddbpd")
dpbdd
^P1STREET("IS","`xi`l","dexcim")
micxed
^P1STREET("IS","`xi`l","deziwim")
miwized
^P1STREET("IS","`xi`l","dgxea")
aexgd
^P1STREET("IS","`xi`l","dgxneo")
oenxgd
^P1STREET("IS","`xi`l","dixco")
ocxid
^P1STREET("IS","`xi`l","dnl`kd")
dk`lnd
^P1STREET("IS","`xi`l","dpba")
abpd
^P1STREET("IS","`xi`l","dpgyepim")
mipeygpd
^P1STREET("IS","`xi`l","draecd")
dceard
^P1STREET("IS","`xi`l","drnl")
lnrd
^P1STREET("IS","`xi`l","drvn`ez")
ze`nvrd
^P1STREET("IS","`xi`l","drxad")
daxrd
^P1STREET("IS","`xi`l","dtqbd")
dbqtd
^P1STREET("IS","`xi`l","dwenniez")
zeinnewd
^P1STREET("IS","`xi`l","dyenxeo")
oexneyd
^P1STREET("IS","`xi`l","dywc")
cwyd
^P1STREET("IS","`xi`l","dywnd")
dnwyd
^P1STREET("IS","`xi`l","dzaex")
xeazd
^P1STREET("IS","`xi`l","gaxeo")
oexag
^P1STREET("IS","`xi`l","getiz")
ziteg
^P1STREET("IS","`xi`l","idecd")
dcedi
^P1STREET("IS","`xi`l","iectz")
ztcei
^P1STREET("IS","`xi`l","itd pes")
sep dti
^P1STREET("IS","`xi`l","kikx d` a`iix")
xii`a `d xkik
^P1STREET("IS","`xi`l","klpiez")
zeiplk
^P1STREET("IS","`xi`l","navr cpi")
ipc rvan
^P1STREET("IS","`xi`l","navr dx`l")
l`xd rvan
^P1STREET("IS","`xi`l","navr gixm")
mxig rvan
^P1STREET("IS","`xi`l","navr reacd")
dcaer rvan
^P1STREET("IS","`xi`l","navr wcy")
ycw rvan
^P1STREET("IS","`xi`l","nexid")
dixen
^P1STREET("IS","`xi`l","nrld dbard")
drabd dlrn
^P1STREET("IS","`xi`l","ntxu ylnd")
dnly uxtn
^P1STREET("IS","`xi`l","nyrel `'")
'` leryn
^P1STREET("IS","`xi`l","nyrel a'")
'a leryn
^P1STREET("IS","`xi`l","nyrel b'")
'b leryn
^P1STREET("IS","`xi`l","nyrel c'")
'c leryn
^P1STREET("IS","`xi`l","nyrel d'")
'd leryn
^P1STREET("IS","`xi`l","nyrel dfiz")
zifd leryn
^P1STREET("IS","`xi`l","nyrel e'")
'e leryn
^P1STREET("IS","`xi`l","nyrel f'")
'f leryn
^P1STREET("IS","`xi`l","nyrel ga""c")
c"ag leryn
^P1STREET("IS","`xi`l","qaiepim")
mipeiaq
^P1STREET("IS","`xi`l","vd""l")
l"dv
^P1STREET("IS","`xi`l","ypix")
xipy
^P1STREET("IS","`xi`l","yrx dbi`")
`ibd xry
^P1STREET("IS","`xi`l","yyz dinim")
minid zyy
^P1STREET("IS","`xi`l","z`yex")
xey`z
^P1STREET("IS","`xqes")
seqx`
^P1STREET("IS","`xqes","`lneb")
benl`
^P1STREET("IS","`xqes","nel dim")
mid len
^P1STREET("IS","`xqes","nel im")
mi len
^P1STREET("IS","`yael")
leay`
^P1STREET("IS","`ycec")
cecy`
^P1STREET("IS","`ycec","`.`h`li")
il`h`.`
^P1STREET("IS","`ycec","`.fiic")
ciif.`
^P1STREET("IS","`ycec","`.xetio")
oitex.`
^P1STREET("IS","`ycec","`a")
a`
^P1STREET("IS","`ycec","`a` `gin`ix")
xi`nig` `a`
^P1STREET("IS","`ycec","`a` dll")
lld `a`
^P1STREET("IS","`ycec","`aez iyexeo")
oexeyi zea`
^P1STREET("IS","`ycec","`ahlieo")
oeilha`
^P1STREET("IS","`ycec","`aii")
iia`
^P1STREET("IS","`ycec","`ao baixel")
lexiab oa`
^P1STREET("IS","`ycec","`ao rfx`")
`xfr oa`
^P1STREET("IS","`ycec","`apx ao px")
xp oa xpa`
^P1STREET("IS","`ycec","`axdm qetx")
xteq mdxa`
^P1STREET("IS","`ycec","`bcix")
xicb`
^P1STREET("IS","`ycec","`ciqeo")
oeqic`
^P1STREET("IS","`ycec","`cx")
xc`
^P1STREET("IS","`ycec","`dxepqeo yxd")
dxy oeqpexd`
^P1STREET("IS","`ycec","`epieo")
oeipe`
^P1STREET("IS","`ycec","`ex dgiim")
miigd xe`
^P1STREET("IS","`ycec","`exh")
hxe`
^P1STREET("IS","`ycec","`exi vai bxipaxb")
bxapixb iav ixe`
^P1STREET("IS","`ycec","`exid dgizi")
izigd dixe`
^P1STREET("IS","`ycec","`g""i `ilz")
zli` i"g`
^P1STREET("IS","`ycec","`gc drm")
mrd cg`
^P1STREET("IS","`ycec","`gefz aiz")
zia zfeg`
^P1STREET("IS","`ycec","`gim nfpw")
wpfn mig`
^P1STREET("IS","`ycec","`girfx")
xfrig`
^P1STREET("IS","`ycec","`iclqeo aa`")
`aa oeqlci`
^P1STREET("IS","`ycec","`iil")
lii`
^P1STREET("IS","`ycec","`iipyhio")
oihypii`
^P1STREET("IS","`ycec","`iix")
xii`
^P1STREET("IS","`ycec","`ileo")
oeli`
^P1STREET("IS","`ycec","`ixiq")
qixi`
^P1STREET("IS","`ycec","`iznx")
xnzi`
^P1STREET("IS","`ycec","`l dvitex")
xetivd l`
^P1STREET("IS","`ycec","`laxh wni")
inw hxal`
^P1STREET("IS","`ycec","`lel")
lel`
^P1STREET("IS","`ycec","`li`yeili")
iliey`il`
^P1STREET("IS","`ycec","`lkqpcx to")
ot xcpqkl`
^P1STREET("IS","`ycec","`nil feld")
dlef lin`
^P1STREET("IS","`ycec","`pd txpw")
wpxt dp`
^P1STREET("IS","`ycec","`qzx dnlkd")
dklnd xzq`
^P1STREET("IS","`ycec","`txzi `lide")
edil` izxt`
^P1STREET("IS","`ycec","`wqeceq")
qeceqw`
^P1STREET("IS","`ycec","`xlefexea")
aexefelx`
^P1STREET("IS","`ycec","a`xi")
ix`a
^P1STREET("IS","`ycec","aali")
ilaa
^P1STREET("IS","`ycec","aexekea")
aekexea
^P1STREET("IS","`ycec","aexl` idecd")
dcedi `lxea
^P1STREET("IS","`ycec","ahdeao")
oaedha
^P1STREET("IS","`ycec","ai`liw")
wil`ia
^P1STREET("IS","`ycec","ail""e")
e"lia
^P1STREET("IS","`ycec","altex")
xetla
^P1STREET("IS","`ycec","ao `lirfx")
xfril` oa
^P1STREET("IS","`ycec","arli nl`kd")
dk`ln ilra
^P1STREET("IS","`ycec","awrz dixg")
gxid zrwa
^P1STREET("IS","`ycec","axbo alfo")
ofla obxa
^P1STREET("IS","`ycec","axdnq")
qndxa
^P1STREET("IS","`ycec","axexid")
dixexa
^P1STREET("IS","`ycec","axpx")
xpxa
^P1STREET("IS","`ycec","axw ao `aiperm")
mrepia` oa wxa
^P1STREET("IS","`ycec","ayaiq fipbx")
xbpif qiaya
^P1STREET("IS","`ycec","b`tepea ca")
ac aepet`b
^P1STREET("IS","`ycec","barz rcd")
dcr zrab
^P1STREET("IS","`ycec","baxi`ld niqhxl")
lxhqin dl`ixab
^P1STREET("IS","`ycec","bcec 7")
7 cecb
^P1STREET("IS","`ycec","bcxd")
dxcb
^P1STREET("IS","`ycec","bebel")
lebeb
^P1STREET("IS","`ycec","belcaxb l`d")
d`l bxacleb
^P1STREET("IS","`ycec","bex ca")
ac xeb
^P1STREET("IS","`ycec","bhd")
dhb
^P1STREET("IS","`ycec","bi` `epi")
ipe` `ib
^P1STREET("IS","`ycec","blim")
milb
^P1STREET("IS","`ycec","blrc")
crlb
^P1STREET("IS","`ycec","byx rc dlem")
meld cr xyb
^P1STREET("IS","`ycec","ca bxepx")
xpexb ac
^P1STREET("IS","`ycec","ca def")
fed ac
^P1STREET("IS","`ycec","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","`ycec","cbpid")
dipbc
^P1STREET("IS","`ycec","cec eeltqeo")
oeqtlee cec
^P1STREET("IS","`ycec","cec ilio")
oili cec
^P1STREET("IS","`ycec","cekitz")
ztikec
^P1STREET("IS","`ycec","celipqwi")
iwqpilec
^P1STREET("IS","`ycec","cwx")
xwc
^P1STREET("IS","`ycec","cxex")
xexc
^P1STREET("IS","`ycec","cxj ao bexieo")
oeixeb oa jxc
^P1STREET("IS","`ycec","cxj npgm abio")
oiba mgpn jxc
^P1STREET("IS","`ycec","d` a`iix")
xii`a `d
^P1STREET("IS","`ycec","d`cne""x narlf")
flran x"enc`d
^P1STREET("IS","`ycec","d`cne""x ntihqaexb")
bxeaqhitn x"enc`d
^P1STREET("IS","`ycec","d`eno")
one`d
^P1STREET("IS","`ycec","d`etim")
mite`d
^P1STREET("IS","`ycec","d`exbim")
mibxe`d
^P1STREET("IS","`ycec","d`exo")
oxe`d
^P1STREET("IS","`ycec","d`lnebim")
mibenl`d
^P1STREET("IS","`ycec","d`v""l")
l"v`d
^P1STREET("IS","`ycec","d`x""f")
f"x`d
^P1STREET("IS","`ycec","d`xi")
ix`d
^P1STREET("IS","`ycec","d`ykel")
leky`d
^P1STREET("IS","`ycec","d`yl")
ly`d
^P1STREET("IS","`ycec","d`ylb")
bly`d
^P1STREET("IS","`ycec","d`zxeb")
bexz`d
^P1STREET("IS","`ycec","daepim")
mipead
^P1STREET("IS","`ycec","daeym")
myead
^P1STREET("IS","`ycec","dahigez")
zegihad
^P1STREET("IS","`ycec","dap`im")
mi`pad
^P1STREET("IS","`ycec","dapim")
mipad
^P1STREET("IS","`ycec","dayex")
xeyad
^P1STREET("IS","`ycec","db`eo `lide neilpd")
dplien edil` oe`bd
^P1STREET("IS","`ycec","dbcec draxi")
ixard cecbd
^P1STREET("IS","`ycec","dbelyim")
miylebd
^P1STREET("IS","`ycec","dblind")
dnilbd
^P1STREET("IS","`ycec","dbto")
otbd
^P1STREET("IS","`ycec","dceltio")
oitlecd
^P1STREET("IS","`ycec","dcliez")
zeilcd
^P1STREET("IS","`ycec","dcq")
qcd
^P1STREET("IS","`ycec","dcwl")
lwcd
^P1STREET("IS","`ycec","dcx")
xcd
^P1STREET("IS","`ycec","ddbpd")
dpbdd
^P1STREET("IS","`ycec","ddbynd")
dnybdd
^P1STREET("IS","`ycec","ddcxim")
mixcdd
^P1STREET("IS","`ycec","ddqzcxez")
zexczqdd
^P1STREET("IS","`ycec","ddykld")
dlkydd
^P1STREET("IS","`ycec","dexc")
cxed
^P1STREET("IS","`ycec","dfiz")
zifd
^P1STREET("IS","`ycec","dgavlz")
zlvagd
^P1STREET("IS","`ycec","dgealim")
milaegd
^P1STREET("IS","`ycec","dgic""`")
`"cigd
^P1STREET("IS","`ycec","dglevim")
mivelgd
^P1STREET("IS","`ycec","dgpikim")
mikipgd
^P1STREET("IS","`ycec","dgxeyz")
zyexgd
^P1STREET("IS","`ycec","dgxviz")
zivxgd
^P1STREET("IS","`ycec","dgynl")
lnygd
^P1STREET("IS","`ycec","dhiilz")
zliihd
^P1STREET("IS","`ycec","didlenim")
mineldid
^P1STREET("IS","`ycec","diefnd")
dnfeid
^P1STREET("IS","`ycec","dievx")
xveid
^P1STREET("IS","`ycec","diico")
ociid
^P1STREET("IS","`ycec","diqnio")
oinqid
^P1STREET("IS","`ycec","diviwd")
dwivid
^P1STREET("IS","`ycec","dklpiz")
ziplkd
^P1STREET("IS","`ycec","dkxnl")
lnxkd
^P1STREET("IS","`ycec","dkzx")
xzkd
^P1STREET("IS","`ycec","dlai`d")
d`iald
^P1STREET("IS","`ycec","dleizo")
ozield
^P1STREET("IS","`ycec","dll")
lld
^P1STREET("IS","`ycec","dltxio ixnide")
edinxi oixtld
^P1STREET("IS","`ycec","dnaxw")
wxand
^P1STREET("IS","`ycec","dnbic")
cibnd
^P1STREET("IS","`ycec","dncr")
rcnd
^P1STREET("IS","`ycec","dngwx")
xwgnd
^P1STREET("IS","`ycec","dniiqcim")
micqiind
^P1STREET("IS","`ycec","dnl`kd")
dk`lnd
^P1STREET("IS","`ycec","dnliu")
uilnd
^P1STREET("IS","`ycec","dnlj `liwim")
miwil` jlnd
^P1STREET("IS","`ycec","dnlj `nvid")
divn` jlnd
^P1STREET("IS","`ycec","dnlj `q`")
`q` jlnd
^P1STREET("IS","`ycec","dnlj cec")
cec jlnd
^P1STREET("IS","`ycec","dnlj dcc")
ccd jlnd
^P1STREET("IS","`ycec","dnlj gfwid")
diwfg jlnd
^P1STREET("IS","`ycec","dnlj gfwide")
ediwfg jlnd
^P1STREET("IS","`ycec","dnlj ideikio")
oikiedi jlnd
^P1STREET("IS","`ycec","dnlj ideyth")
htyedi jlnd
^P1STREET("IS","`ycec","dnlj ieaa")
aaei jlnd
^P1STREET("IS","`ycec","dnlj iezm")
mzei jlnd
^P1STREET("IS","`ycec","dnlj ixarm")
mraxi jlnd
^P1STREET("IS","`ycec","dnlj rfxid")
dixfr jlnd
^P1STREET("IS","`ycec","dnlj xgarm")
mragx jlnd
^P1STREET("IS","`ycec","dnlj y`el")
le`y jlnd
^P1STREET("IS","`ycec","dnlj ylnd")
dnly jlnd
^P1STREET("IS","`ycec","dnlkim")
miklnd
^P1STREET("IS","`ycec","dnqbx")
xbqnd
^P1STREET("IS","`ycec","dnqgx")
xgqnd
^P1STREET("IS","`ycec","dnrtilim")
militrnd
^P1STREET("IS","`ycec","dntxy")
yxtnd
^P1STREET("IS","`ycec","dnxi")
ixnd
^P1STREET("IS","`ycec","dnywis")
siwynd
^P1STREET("IS","`ycec","dnzkz")
zkznd
^P1STREET("IS","`ycec","dnznic")
cinznd
^P1STREET("IS","`ycec","dnzpcaim")
miacpznd
^P1STREET("IS","`ycec","dpai` `ikd")
dki` `iapd
^P1STREET("IS","`ycec","dpai` `lide")
edil` `iapd
^P1STREET("IS","`ycec","dpai` `liyr")
ryil` `iapd
^P1STREET("IS","`ycec","dpai` bc")
cb `iapd
^P1STREET("IS","`ycec","dpai` cpi`l")
l`ipc `iapd
^P1STREET("IS","`ycec","dpai` deyr")
ryed `iapd
^P1STREET("IS","`ycec","dpai` fkxid")
dixkf `iapd
^P1STREET("IS","`ycec","dpai` gawew")
wewag `iapd
^P1STREET("IS","`ycec","dpai` gbi")
ibg `iapd
^P1STREET("IS","`ycec","dpai` ie`l")
l`ei `iapd
^P1STREET("IS","`ycec","dpai` iepd")
dpei `iapd
^P1STREET("IS","`ycec","dpai` igfw`l")
l`wfgi `iapd
^P1STREET("IS","`ycec","dpai` ixnide")
edinxi `iapd
^P1STREET("IS","`ycec","dpai` iyride")
ediryi `iapd
^P1STREET("IS","`ycec","dpai` nikd")
dkin `iapd
^P1STREET("IS","`ycec","dpai` nl`ki")
ik`ln `iapd
^P1STREET("IS","`ycec","dpai` pgem")
megp `iapd
^P1STREET("IS","`ycec","dpai` pgnid")
dingp `iapd
^P1STREET("IS","`ycec","dpai` pzo")
ozp `iapd
^P1STREET("IS","`ycec","dpai` reacid")
dicaer `iapd
^P1STREET("IS","`ycec","dpai` rfx`")
`xfr `iapd
^P1STREET("IS","`ycec","dpai` rneq")
qenr `iapd
^P1STREET("IS","`ycec","dpai` vtpid")
diptv `iapd
^P1STREET("IS","`ycec","dpai` yne`l")
l`eny `iapd
^P1STREET("IS","`ycec","dpai`im")
mi`iapd
^P1STREET("IS","`ycec","dpbx")
xbpd
^P1STREET("IS","`ycec","dpexiz")
zixepd
^P1STREET("IS","`ycec","dpgeyz")
zyegpd
^P1STREET("IS","`ycec","dpth")
htpd
^P1STREET("IS","`ycec","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","`ycec","dpxwiq")
qiwxpd
^P1STREET("IS","`ycec","dpyi` eivno")
onvie `iypd
^P1STREET("IS","`ycec","dqaieo")
oeiaqd
^P1STREET("IS","`ycec","dqiito")
otiiqd
^P1STREET("IS","`ycec","dqito")
otiqd
^P1STREET("IS","`ycec","draecd")
dceard
^P1STREET("IS","`ycec","dretxim")
mixterd
^P1STREET("IS","`ycec","dretxz")
zxterd
^P1STREET("IS","`ycec","drlid")
dilrd
^P1STREET("IS","`ycec","drnl")
lnrd
^P1STREET("IS","`ycec","drvn`ez")
ze`nvrd
^P1STREET("IS","`ycec","dryxim e`gc")
cg`e mixyrd
^P1STREET("IS","`ycec","dtlcd")
dcltd
^P1STREET("IS","`ycec","dtln""g")
g"nltd
^P1STREET("IS","`ycec","dtxieo")
oeixtd
^P1STREET("IS","`ycec","dvai")
iavd
^P1STREET("IS","`ycec","dvarepi")
iperavd
^P1STREET("IS","`ycec","dvellim")
millevd
^P1STREET("IS","`ycec","dvextim")
mitxevd
^P1STREET("IS","`ycec","dvtixd")
dxitvd
^P1STREET("IS","`ycec","dwicnd")
dnciwd
^P1STREET("IS","`ycec","dwihex")
xehiwd
^P1STREET("IS","`ycec","dwlihd")
dhilwd
^P1STREET("IS","`ycec","dwyzez")
zezywd
^P1STREET("IS","`ycec","dx `aihl")
lhia` xd
^P1STREET("IS","`ycec","dx blaer")
realb xd
^P1STREET("IS","`ycec","dx dvetim")
mitevd xd
^P1STREET("IS","`ycec","dx kpro")
orpk xd
^P1STREET("IS","`ycec","dx nixeo")
oexin xd
^P1STREET("IS","`ycec","dx pae")
eap xd
^P1STREET("IS","`ycec","dx vieo")
oeiv xd
^P1STREET("IS","`ycec","dx yenxeo")
oexney xd
^P1STREET("IS","`ycec","dx zaex")
xeaz xd
^P1STREET("IS","`ycec","dx`""y")
y"`xd
^P1STREET("IS","`ycec","dx`""y xape `yx")
xy` epax y"`xd
^P1STREET("IS","`ycec","dx`m")
m`xd
^P1STREET("IS","`ycec","dx`yepim")
mipey`xd
^P1STREET("IS","`ycec","dxa `ae gvix`")
`xivg ea` axd
^P1STREET("IS","`ycec","dxa `axnqwi")
iwqnxa` axd
^P1STREET("IS","`ycec","dxa `ceppe axej")
jexa eppec` axd
^P1STREET("IS","`ycec","dxa `exi ao axej")
jexa oa ixe` axd
^P1STREET("IS","`ycec","dxa alele")
elela axd
^P1STREET("IS","`ycec","dxa ao cpo")
opc oa axd
^P1STREET("IS","`ycec","dxa cec aefble")
elbfea cec axd
^P1STREET("IS","`ycec","dxa dxveb")
bevxd axd
^P1STREET("IS","`ycec","dxa giim c`")
`c miig axd
^P1STREET("IS","`ycec","dxa giim tiphe")
ehpit miig axd
^P1STREET("IS","`ycec","dxa hiia")
aiih axd
^P1STREET("IS","`ycec","dxa ieqs ny`y")
y`yn sqei axd
^P1STREET("IS","`ycec","dxa ip`i")
i`pi axd
^P1STREET("IS","`ycec","dxa leio")
oiel axd
^P1STREET("IS","`ycec","dxa nineo")
oenin axd
^P1STREET("IS","`ycec","dxa piqim")
miqip axd
^P1STREET("IS","`ycec","dxa rnxm ao ci`eeo")
oee`ic oa mxnr axd
^P1STREET("IS","`ycec","dxa wew")
wew axd
^P1STREET("IS","`ycec","dxa wliyx")
xyilw axd
^P1STREET("IS","`ycec","dxa xefeaqwi yne`l")
l`eny iwqaefex axd
^P1STREET("IS","`ycec","dxa xiipq")
qpiix axd
^P1STREET("IS","`ycec","dxa y`eli")
ile`y axd
^P1STREET("IS","`ycec","dxezm")
mzexd
^P1STREET("IS","`ycec","dxi belo")
oleb ixd
^P1STREET("IS","`ycec","dxi yenxeo")
oexney ixd
^P1STREET("IS","`ycec","dxi""t")
t"ixd
^P1STREET("IS","`ycec","dxn""`")
`"nxd
^P1STREET("IS","`ycec","dxwtz")
ztwxd
^P1STREET("IS","`ycec","dyihd")
dhiyd
^P1STREET("IS","`ycec","dyiihim")
mihiiyd
^P1STREET("IS","`ycec","dywc")
cwyd
^P1STREET("IS","`ycec","dywnd")
dnwyd
^P1STREET("IS","`ycec","dz`pd")
dp`zd
^P1STREET("IS","`ycec","dzlnec")
cenlzd
^P1STREET("IS","`ycec","dzwed")
dewzd
^P1STREET("IS","`ycec","dzwend")
dnewzd
^P1STREET("IS","`ycec","ee`o bej")
jeb o`ee
^P1STREET("IS","`ycec","eili`m xphbo")
obhpx m`ilie
^P1STREET("IS","`ycec","eiwhex debe")
ebed xehwie
^P1STREET("IS","`ycec","eizwio ieqs")
sqei oiwzie
^P1STREET("IS","`ycec","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","`ycec","fkxeo irwa")
awri oexkf
^P1STREET("IS","`ycec","flno `xo")
ox` onlf
^P1STREET("IS","`ycec","flno cec leephio")
oihpeel cec onlf
^P1STREET("IS","`ycec","fnix")
xinf
^P1STREET("IS","`ycec","fpbeeil")
lieebpf
^P1STREET("IS","`ycec","gcxd")
dxcg
^P1STREET("IS","`ycec","gegiz")
zigeg
^P1STREET("IS","`ycec","gelcd dpai`d")
d`iapd dcleg
^P1STREET("IS","`ycec","gexa")
axeg
^P1STREET("IS","`ycec","gexgd le`iq aexgq")
qgxea qi`el dgxeg
^P1STREET("IS","`ycec","gexi giim")
miig ixeg
^P1STREET("IS","`ycec","ghiaz barzi")
izrab zaihg
^P1STREET("IS","`ycec","ghiaz belpi")
ipleb zaihg
^P1STREET("IS","`ycec","ghiaz dpba")
abpd zaihg
^P1STREET("IS","`ycec","ghiaz itzg")
gzti zaihg
^P1STREET("IS","`ycec","ghiaz kxnli")
ilnxk zaihg
^P1STREET("IS","`ycec","giaz vieo")
oeiv zaig
^P1STREET("IS","`ycec","giim lqwea")
aewql miig
^P1STREET("IS","`ycec","gpd qpy")
ypq dpg
^P1STREET("IS","`ycec","gqici `enez drelm")
mlerd zene` iciqg
^P1STREET("IS","`ycec","gqo eao bx`")
`xb oae oqg
^P1STREET("IS","`ycec","gtu giim")
miig utg
^P1STREET("IS","`ycec","gxneo")
oenxg
^P1STREET("IS","`ycec","gyeo")
oeyg
^P1STREET("IS","`ycec","haz")
zah
^P1STREET("IS","`ycec","helqhei")
iehqleh
^P1STREET("IS","`ycec","hxentlcex")
xecltnexh
^P1STREET("IS","`ycec","i""h vng")
gnv h"i
^P1STREET("IS","`ycec","i`ix")
xi`i
^P1STREET("IS","`ycec","i`pey wexv'`w")
w`'vxew yep`i
^P1STREET("IS","`ycec","iapi`l")
l`ipai
^P1STREET("IS","`ycec","idecd dlei")
ield dcedi
^P1STREET("IS","`ycec","idecd dnkai")
iaknd dcedi
^P1STREET("IS","`ycec","ideyr ao peo")
oep oa ryedi
^P1STREET("IS","`ycec","ideyr gpwio")
oiwpg ryedi
^P1STREET("IS","`ycec","ie`a ao vxeid")
diexv oa a`ei
^P1STREET("IS","`ycec","ie`l nyd qeleneo")
oeneleq dyn l`ei
^P1STREET("IS","`ycec","iedpd f'aehipqwi")
iwqpihea'f dpdei
^P1STREET("IS","`ycec","iepd q`lw")
wl`q dpei
^P1STREET("IS","`ycec","ieqs tiipaxb")
bxapiit sqei
^P1STREET("IS","`ycec","ieqthl")
lhtqei
^P1STREET("IS","`ycec","iexci dqixd")
dxiqd icxei
^P1STREET("IS","`ycec","ip`i xgl")
lgx i`pi
^P1STREET("IS","`ycec","iqec dnrld")
dlrnd ceqi
^P1STREET("IS","`ycec","irl")
lri
^P1STREET("IS","`ycec","ivgw excineo")
oenicxe wgvi
^P1STREET("IS","`ycec","ivgw ycd")
dcy wgvi
^P1STREET("IS","`ycec","ixnej")
jenxi
^P1STREET("IS","`ycec","ixweo")
oewxi
^P1STREET("IS","`ycec","iyx`l blrci")
icrlb l`xyi
^P1STREET("IS","`ycec","iyykx")
xkyyi
^P1STREET("IS","`ycec","k""h apeanax")
xanaepa h"k
^P1STREET("IS","`ycec","keka dcxem")
mexcd akek
^P1STREET("IS","`ycec","keka dvteo")
oetvd akek
^P1STREET("IS","`ycec","keka dygx")
xgyd akek
^P1STREET("IS","`ycec","kikx `li kdo")
odk il` xkik
^P1STREET("IS","`ycec","kikx qibl")
lbiq xkik
^P1STREET("IS","`ycec","kkx dviepez")
zepeivd xkk
^P1STREET("IS","`ycec","kkx nyd yxz")
zxy dyn xkk
^P1STREET("IS","`ycec","kpxz")
zxpk
^P1STREET("IS","`ycec","kqle")
elqk
^P1STREET("IS","`ycec","ktzex dgelez")
zelegd xeztk
^P1STREET("IS","`ycec","l`epxce cd eipv'i")
i'vpie dc ecxpe`l
^P1STREET("IS","`ycec","le`i tqhx")
xhqt i`el
^P1STREET("IS","`ycec","lnxga")
agxnl
^P1STREET("IS","`ycec","n`xw yb`l")
l`by wx`n
^P1STREET("IS","`ycec","nae` `lwlri")
irlwl` `ean
^P1STREET("IS","`ycec","nae` d`nex`im")
mi`xen`d `ean
^P1STREET("IS","`ycec","nae` dary""h")
h"yrad `ean
^P1STREET("IS","`ycec","nae` dben`")
`nebd `ean
^P1STREET("IS","`ycec","nae` dcbpiz")
zipbcd `ean
^P1STREET("IS","`ycec","nae` dcec`im")
mi`cecd `ean
^P1STREET("IS","`ycec","nae` dcneniz")
zinencd `ean
^P1STREET("IS","`ycec","nae` dgnviu")
uivngd `ean
^P1STREET("IS","`ycec","nae` din`im")
mi`nid `ean
^P1STREET("IS","`ycec","nae` dkxkem")
mekxkd `ean
^P1STREET("IS","`ycec","nae` dqtpim")
miptqd `ean
^P1STREET("IS","`ycec","nae` drixiz")
zixird `ean
^P1STREET("IS","`ycec","nae` dxa `lwlri")
irlwl` axd `ean
^P1STREET("IS","`ycec","nae` dygla")
algyd `ean
^P1STREET("IS","`ycec","nae` dyxaiho")
ohiaxyd `ean
^P1STREET("IS","`ycec","nae` dzp`im")
mi`pzd `ean
^P1STREET("IS","`ycec","nae` navr gexa")
axeg rvan `ean
^P1STREET("IS","`ycec","nae` navr pgyeo")
oeygp rvan `ean
^P1STREET("IS","`ycec","nae` xai rwia` ao ndll`l")
l`lldn oa `aiwr iax `ean
^P1STREET("IS","`ycec","ncxgea dpai`im")
mi`iapd aegxcn
^P1STREET("IS","`ycec","nephitiexi")
ixeitihpen
^P1STREET("IS","`ycec","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","`ycec","nexid")
dixen
^P1STREET("IS","`ycec","nfkxz azid")
diza zxkfn
^P1STREET("IS","`ycec","nfpw")
wpfn
^P1STREET("IS","`ycec","nheld")
dlehn
^P1STREET("IS","`ycec","nik`l `pb'le")
el'bp` l`kin
^P1STREET("IS","`ycec","nikwyeili")
ilieywkin
^P1STREET("IS","`ycec","nilno")
onlin
^P1STREET("IS","`ycec","nlkz ya`")
`ay zkln
^P1STREET("IS","`ycec","npgm `eqiywio")
oiwyiqe` mgpn
^P1STREET("IS","`ycec","npgm npcl")
lcpn mgpn
^P1STREET("IS","`ycec","npid yegh")
hgey dipn
^P1STREET("IS","`ycec","nvcd")
dcvn
^P1STREET("IS","`ycec","nwed iyx`l")
l`xyi dewn
^P1STREET("IS","`ycec","nwlpaexb")
bxeaplwn
^P1STREET("IS","`ycec","nxcki `pilaiu")
uialip` ikcxn
^P1STREET("IS","`ycec","nxfew")
wefxn
^P1STREET("IS","`ycec","nxhio aeax")
xaea oihxn
^P1STREET("IS","`ycec","nxim dpai`d")
d`iapd mixn
^P1STREET("IS","`ycec","nynx dixco")
ocxid xnyn
^P1STREET("IS","`ycec","nynx drnw")
wnrd xnyn
^P1STREET("IS","`ycec","nypd")
dpyn
^P1STREET("IS","`ycec","nyrel c'")
'c leryn
^P1STREET("IS","`ycec","p`ez qtix")
xitq ze`p
^P1STREET("IS","`ycec","pbxi `dxo")
oxd` ixbp
^P1STREET("IS","`ycec","pdll")
lldp
^P1STREET("IS","`ycec","pexc`e")
e`cxep
^P1STREET("IS","`ycec","pgl co")
oc lgp
^P1STREET("IS","`ycec","pgl dayex")
xeyad lgp
^P1STREET("IS","`ycec","pgl lih`pi")
ip`hil lgp
^P1STREET("IS","`ycec","pgl lkiy")
yikl lgp
^P1STREET("IS","`ycec","pgl rxebez")
zebexr lgp
^P1STREET("IS","`ycec","pgl vio")
oiv lgp
^P1STREET("IS","`ycec","pgl wcxeo")
oexcw lgp
^P1STREET("IS","`ycec","pgl yexw")
wxey lgp
^P1STREET("IS","`ycec","pgl ypix")
xipy lgp
^P1STREET("IS","`ycec","pgli`li")
il`ilgp
^P1STREET("IS","`ycec","pgno qixwio")
oiwxiq ongp
^P1STREET("IS","`ycec","piqo")
oqip
^P1STREET("IS","`ycec","pq viepd")
dpeiv qp
^P1STREET("IS","`ycec","prni")
inrp
^P1STREET("IS","`ycec","prno")
onrp
^P1STREET("IS","`ycec","pvg iyx`l")
l`xyi gvp
^P1STREET("IS","`ycec","pzo `laf")
fal` ozp
^P1STREET("IS","`ycec","pzo `lzxno")
onxzl` ozp
^P1STREET("IS","`ycec","qewelea")
aeleweq
^P1STREET("IS","`ycec","qhxend")
dnexhq
^P1STREET("IS","`ycec","qibl")
lbiq
^P1STREET("IS","`ycec","qieo")
oeiq
^P1STREET("IS","`ycec","qilax `a` dill")
llid `a` xaliq
^P1STREET("IS","`ycec","qipi")
ipiq
^P1STREET("IS","`ycec","qn' dnlj ide""`")
`"edi jlnd 'nq
^P1STREET("IS","`ycec","qn' dnlj ide`f")
f`edi jlnd 'nq
^P1STREET("IS","`ycec","qn' dnlj renxi")
ixner jlnd 'nq
^P1STREET("IS","`ycec","qn' ide`y")
y`edi 'nq
^P1STREET("IS","`ycec","qtig")
gitq
^P1STREET("IS","`ycec","rbpeo")
oepbr
^P1STREET("IS","`ycec","refi`l cec")
cec l`ifer
^P1STREET("IS","`ycec","retx `axdm")
mdxa` xter
^P1STREET("IS","`ycec","rfx` dqetx")
xteqd `xfr
^P1STREET("IS","`ycec","rlifd abio")
oiba dfilr
^P1STREET("IS","`ycec","rnxm gfpea")
aepfg mxnr
^P1STREET("IS","`ycec","rpaim")
miapr
^P1STREET("IS","`ycec","t`xo")
ox`t
^P1STREET("IS","`ycec","texvi dcxj")
jxcd ivxet
^P1STREET("IS","`ycec","tzg zwed")
dewz gzt
^P1STREET("IS","`ycec","v`lim")
mil`v
^P1STREET("IS","`ycec","vcwz ieqs")
sqei zwcv
^P1STREET("IS","`ycec","viflipb `dxeo")
oexd` bpilfiv
^P1STREET("IS","`ycec","vtz")
ztv
^P1STREET("IS","`ycec","wceyi alfo")
ofla iyecw
^P1STREET("IS","`ycec","wcy")
ycw
^P1STREET("IS","`ycec","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","`ycec","wiyeo")
oeyiw
^P1STREET("IS","`ycec","wtlo")
oltw
^P1STREET("IS","`ycec","wvxio")
oixvw
^P1STREET("IS","`ycec","ww""l")
l"ww
^P1STREET("IS","`ycec","wxo diqec")
ceqid oxw
^P1STREET("IS","`ycec","x`y tipd")
dpit y`x
^P1STREET("IS","`ycec","xa giqc`")
`cqig ax
^P1STREET("IS","`ycec","xa`")
`ax
^P1STREET("IS","`ycec","xai `lirfx")
xfril` iax
^P1STREET("IS","`ycec","xai `lirfx ao dexwpeq")
qepwxed oa xfril` iax
^P1STREET("IS","`ycec","xai `yi")
iy` iax
^P1STREET("IS","`ycec","xai gppid ao ceq`")
`qec oa dippg iax
^P1STREET("IS","`ycec","xai hxteo")
oetxh iax
^P1STREET("IS","`ycec","xai idecd dpyi`")
`iypd dcedi iax
^P1STREET("IS","`ycec","xai iegpo ao fk`i")
i`kf oa opgei iax
^P1STREET("IS","`ycec","xai ieqs ax gltz`")
`ztlg xa sqei iax
^P1STREET("IS","`ycec","xai ieqs w`xe")
ex`w sqei iax
^P1STREET("IS","`ycec","xai n`ix arl dpq")
qpd lra xi`n iax
^P1STREET("IS","`ycec","xai pgno naxqla")
alqxan ongp iax
^P1STREET("IS","`ycec","xai rwia`")
`aiwr iax
^P1STREET("IS","`ycec","xai ynreo ao yhg")
ghy oa oerny iax
^P1STREET("IS","`ycec","xai ynreo ax ieg`i")
i`gei xa oerny iax
^P1STREET("IS","`ycec","xaip`")
`piax
^P1STREET("IS","`ycec","xape bxyem")
meyxb epax
^P1STREET("IS","`ycec","xape eicl dvxtzi")
iztxvd lcie epax
^P1STREET("IS","`ycec","xape zm")
mz epax
^P1STREET("IS","`ycec","xebefio")
oifebex
^P1STREET("IS","`ycec","xefeelh")
hleefex
^P1STREET("IS","`ycec","xez dne`aid")
dia`end zex
^P1STREET("IS","`ycec","xfi`l cec")
cec l`ifx
^P1STREET("IS","`ycec","xg' 21")
21 'gx
^P1STREET("IS","`ycec","xgl `npe")
epn` lgx
^P1STREET("IS","`ycec","xna""m")
m"anx
^P1STREET("IS","`ycec","xnaxph")
hpxanx
^P1STREET("IS","`ycec","xya""i")
i"ayx
^P1STREET("IS","`ycec","y`el hyxpigeaqwi")
iwqaegipxyh le`y
^P1STREET("IS","`ycec","yafi")
ifay
^P1STREET("IS","`ycec","yah")
hay
^P1STREET("IS","`ycec","yah apinio")
oinipa hay
^P1STREET("IS","`ycec","yah co")
oc hay
^P1STREET("IS","`ycec","yah faeleo")
oeleaf hay
^P1STREET("IS","`ycec","yah idecd")
dcedi hay
^P1STREET("IS","`ycec","yah ieqs")
sqei hay
^P1STREET("IS","`ycec","yah lei")
iel hay
^P1STREET("IS","`ycec","yah ptzli")
ilztp hay
^P1STREET("IS","`ycec","yah x`eao")
oae`x hay
^P1STREET("IS","`ycec","yah ynreo")
oerny hay
^P1STREET("IS","`ycec","yai vieo")
oeiv iay
^P1STREET("IS","`ycec","yba")
aby
^P1STREET("IS","`ycec","yc' `xar `ndez")
zedn` rax` 'cy
^P1STREET("IS","`ycec","yc' ao vai")
iav oa 'cy
^P1STREET("IS","`ycec","yc' api axiz")
zixa ipa 'cy
^P1STREET("IS","`ycec","yc' dtxgim")
migxtd 'cy
^P1STREET("IS","`ycec","yc' dxvl")
lvxd 'cy
^P1STREET("IS","`ycec","yc' i""l bexceo")
oecxeb l"i 'cy
^P1STREET("IS","`ycec","yc' ivgw dpyi`")
`iypd wgvi 'cy
^P1STREET("IS","`ycec","yc' ivgw xaio")
oiax wgvi 'cy
^P1STREET("IS","`ycec","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","`ycec","yc' nyd ciio")
oiic dyn 'cy
^P1STREET("IS","`ycec","yc' refide")
edifer 'cy
^P1STREET("IS","`ycec","yc' x`yeo lvieo")
oeivl oey`x 'cy
^P1STREET("IS","`ycec","yc' xehyilc")
cliyhex 'cy
^P1STREET("IS","`ycec","yc' xgeaez")
zeaegx 'cy
^P1STREET("IS","`ycec","yc' xy""i")
i"yx 'cy
^P1STREET("IS","`ycec","yc' zl-gi")
ig-lz 'cy
^P1STREET("IS","`ycec","yedm")
mdey
^P1STREET("IS","`ycec","yenxeo")
oexney
^P1STREET("IS","`ycec","yerli ynyeo")
oeyny ilrey
^P1STREET("IS","`ycec","ygm ie`a")
a`ei mgy
^P1STREET("IS","`ycec","yihxiz akex")
xeka zixhiy
^P1STREET("IS","`ycec","yilx")
xliy
^P1STREET("IS","`ycec","ylcb")
bcly
^P1STREET("IS","`ycec","ylenvieo dnlkd")
dklnd oeivnely
^P1STREET("IS","`ycec","ylepqwi `axdm")
mdxa` iwqpely
^P1STREET("IS","`ycec","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","`ycec","ylnd lei")
iel dnly
^P1STREET("IS","`ycec","yn`i")
i`ny
^P1STREET("IS","`ycec","yne`l dpbic")
cibpd l`eny
^P1STREET("IS","`ycec","ynrid")
dirny
^P1STREET("IS","`ycec","yrx d`xiez")
zeix`d xry
^P1STREET("IS","`ycec","yrxi ieyx")
xyei ixry
^P1STREET("IS","`ycec","yrxi ixeylim")
milyexi ixry
^P1STREET("IS","`ycec","ytid")
dity
^P1STREET("IS","`ycec","ytix` `axdm")
mdxa` `xity
^P1STREET("IS","`ycec","ytix` giim nyd")
dyn miig `xity
^P1STREET("IS","`ycec","yxd `npe")
epn` dxy
^P1STREET("IS","`ycec","z`ecex xeqelc")
cleqex xece`z
^P1STREET("IS","`ycec","znef")
fenz
^P1STREET("IS","`ycec","zpio")
oipz
^P1STREET("IS","`ycec","zy""g")
g"yz
^P1STREET("IS","`ycec","zyxi")
ixyz
^P1STREET("IS","`ycez irwa [`igec]")
(cegi`) awri zecy`
^P1STREET("IS","`ycez irwa [n`egc]")
(cge`n) awri zecy`
^P1STREET("IS","`yl dpyi`")
`iypd ly`
^P1STREET("IS","`yl dpyi`","`ao rfx`")
`xfr oa`
^P1STREET("IS","`ywleo")
oelwy`
^P1STREET("IS","`ywleo","`""c bexceo")
oecxeb c"`
^P1STREET("IS","`ywleo","`a")
a`
^P1STREET("IS","`ywleo","`ahlieo")
oeilha`
^P1STREET("IS","`ywleo","`aiaiz")
ziaia`
^P1STREET("IS","`ywleo","`aibil")
libia`
^P1STREET("IS","`ywleo","`ainlj")
jlnia`
^P1STREET("IS","`ywleo","`aiyb")
byia`
^P1STREET("IS","`ywleo","`ao baixel")
lexiab oa`
^P1STREET("IS","`ywleo","`ao dyzid")
dizyd oa`
^P1STREET("IS","`ywleo","`ao rfx`")
`xfr oa`
^P1STREET("IS","`ywleo","`apx ao px")
xp oa xpa`
^P1STREET("IS","`ywleo","`axap`l")
l`paxa`
^P1STREET("IS","`ywleo","`aylem")
melya`
^P1STREET("IS","`ywleo","`cnepc cd xehyilc")
cliyhex dc cpenc`
^P1STREET("IS","`ywleo","`cx")
xc`
^P1STREET("IS","`ywleo","`daz ylem")
mely zad`
^P1STREET("IS","`ywleo","`dec")
ced`
^P1STREET("IS","`ywleo","`dxeo aehxyeili")
ilieyxhea oexd`
^P1STREET("IS","`ywleo","`dxepqeo")
oeqpexd`
^P1STREET("IS","`ywleo","`eqiywio")
oiwyiqe`
^P1STREET("IS","`ywleo","`etixd")
dxite`
^P1STREET("IS","`ywleo","`etixd paeo")
oeap dxite`
^P1STREET("IS","`ywleo","`exh")
hxe`
^P1STREET("IS","`ywleo","`exi `li`a")
a`il` ixe`
^P1STREET("IS","`ywleo","`gc drm")
mrd cg`
^P1STREET("IS","`ywleo","`gefz aiz")
zia zfeg`
^P1STREET("IS","`ywleo","`ibx rwia`")
`aiwr xbi`
^P1STREET("IS","`ywleo","`iix")
xii`
^P1STREET("IS","`ywleo","`ild")
dli`
^P1STREET("IS","`ywleo","`ilo qrceo")
oecrq oli`
^P1STREET("IS","`ywleo","`ilz")
zli`
^P1STREET("IS","`ywleo","`ipyhiio")
oiihypi`
^P1STREET("IS","`ywleo","`ixeq")
qexi`
^P1STREET("IS","`ywleo","`laf")
fal`
^P1STREET("IS","`ywleo","`lel")
lel`
^P1STREET("IS","`ywleo","`li kdo")
odk il`
^P1STREET("IS","`ywleo","`lide")
edil`
^P1STREET("IS","`ywleo","`liyar")
rayil`
^P1STREET("IS","`ywleo","`liyr")
ryil`
^P1STREET("IS","`ywleo","`lkqpcxepi")
ipexcpqkl`
^P1STREET("IS","`ywleo","`lrc")
crl`
^P1STREET("IS","`ywleo","`lwlri")
irlwl`
^P1STREET("IS","`ywleo","`lwpd")
dpwl`
^P1STREET("IS","`ywleo","`npeo")
oepn`
^P1STREET("IS","`ywleo","`pd txpw")
wpxt dp`
^P1STREET("IS","`ywleo","`pilaiu")
uialip`
^P1STREET("IS","`ywleo","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","`ywleo","`qs dxet`")
`texd sq`
^P1STREET("IS","`ywleo","`txim")
mixt`
^P1STREET("IS","`ywleo","`txqneo")
oenqxt`
^P1STREET("IS","`ywleo","`v""l")
l"v`
^P1STREET("IS","`ywleo","`wqeceq")
qeceqw`
^P1STREET("IS","`ywleo","`xi`l")
l`ix`
^P1STREET("IS","`ywleo","`xid")
dix`
^P1STREET("IS","`ywleo","`xid ao `lirfx")
xfril` oa dix`
^P1STREET("IS","`ywleo","`xv'i yxno")
onxy i'vx`
^P1STREET("IS","`ywleo","`ycec")
cecy`
^P1STREET("IS","`ywleo","`ykeli tf")
ft ileky`
^P1STREET("IS","`ywleo","`yx")
xy`
^P1STREET("IS","`ywleo","`yz`el")
le`zy`
^P1STREET("IS","`ywleo","aal")
laa
^P1STREET("IS","`ywleo","acelg")
gleca
^P1STREET("IS","`ywleo","aerf")
frea
^P1STREET("IS","`ywleo","aexekea")
aekexea
^P1STREET("IS","`ywleo","ai`liw")
wil`ia
^P1STREET("IS","`ywleo","ail""e")
e"lia
^P1STREET("IS","`ywleo","aiz `l")
l` zia
^P1STREET("IS","`ywleo","aiz dnyth")
htynd zia
^P1STREET("IS","`ywleo","aiz dye`ad")
da`eyd zia
^P1STREET("IS","`ywleo","aiz lgm")
mgl zia
^P1STREET("IS","`ywleo","aiz""x")
x"zia
^P1STREET("IS","`ywleo","altex")
xetla
^P1STREET("IS","`ywleo","ao cec")
cec oa
^P1STREET("IS","`ywleo","ao ceq`")
`qec oa
^P1STREET("IS","`ywleo","ao fen`")
`nef oa
^P1STREET("IS","`ywleo","ao fk`i")
i`kf oa
^P1STREET("IS","`ywleo","ao i`ix")
xi`i oa
^P1STREET("IS","`ywleo","ao idecd `lirfx")
xfril` dcedi oa
^P1STREET("IS","`ywleo","ao ie`y bcreo")
oercb y`ei oa
^P1STREET("IS","`ywleo","ao ref`i")
i`fer oa
^P1STREET("IS","`ywleo","ao rfxid")
dixfr oa
^P1STREET("IS","`ywleo","ao rhx")
xhr oa
^P1STREET("IS","`ywleo","ao rnx")
xnr oa
^P1STREET("IS","`ywleo","ao wpf rzpi`l")
l`ipzr fpw oa
^P1STREET("IS","`ywleo","ao yhg")
ghy oa
^P1STREET("IS","`ywleo","api rwia`")
`aiwr ipa
^P1STREET("IS","`ywleo","apinio")
oinipa
^P1STREET("IS","`ywleo","aqnz")
znqa
^P1STREET("IS","`ywleo","avl`l")
l`lva
^P1STREET("IS","`ywleo","ax keka`")
`akek xa
^P1STREET("IS","`ywleo","axbqeo")
oeqbxa
^P1STREET("IS","`ywleo","axbx cec")
cec xbxa
^P1STREET("IS","`ywleo","axexid")
dixexa
^P1STREET("IS","`ywleo","axhpexd")
dxephxa
^P1STREET("IS","`ywleo","axpyhiio txu")
uxt oiihypxa
^P1STREET("IS","`ywleo","axw")
wxa
^P1STREET("IS","`ywleo","axwz")
zwxa
^P1STREET("IS","`ywleo","az dcx")
xcd za
^P1STREET("IS","`ywleo","az go")
og za
^P1STREET("IS","`ywleo","azi `ilio")
oili` iza
^P1STREET("IS","`ywleo","azi leipqeo")
oeqpiel iza
^P1STREET("IS","`ywleo","azid")
diza
^P1STREET("IS","`ywleo","baexi iyx`l")
l`xyi ixeab
^P1STREET("IS","`ywleo","bar")
rab
^P1STREET("IS","`ywleo","bareo")
oerab
^P1STREET("IS","`ywleo","barz vieo")
oeiv zrab
^P1STREET("IS","`ywleo","barzi")
izrab
^P1STREET("IS","`ywleo","bcreo")
oercb
^P1STREET("IS","`ywleo","belena")
aneleb
^P1STREET("IS","`ywleo","belpi")
ipleb
^P1STREET("IS","`ywleo","bey rvieo")
oeivr yeb
^P1STREET("IS","`ywleo","beyo")
oyeb
^P1STREET("IS","`ywleo","bipvaexb")
bxeavpib
^P1STREET("IS","`ywleo","blrc")
crlb
^P1STREET("IS","`ywleo","bnl`")
`lnb
^P1STREET("IS","`ywleo","bpeqx")
xqepb
^P1STREET("IS","`ywleo","bxetiz")
zitexb
^P1STREET("IS","`ywleo","bxetx irwa")
awri xtexb
^P1STREET("IS","`ywleo","ca axiix")
xiixa ac
^P1STREET("IS","`ywleo","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","`ywleo","ceaa")
aaec
^P1STREET("IS","`ywleo","cebiz")
zibec
^P1STREET("IS","`ywleo","cec xfi`l")
l`ifx cec
^P1STREET("IS","`ywleo","cela")
alec
^P1STREET("IS","`ywleo","celtio")
oitlec
^P1STREET("IS","`ywleo","cexez nyd")
dyn zexec
^P1STREET("IS","`ywleo","cezo")
ozec
^P1STREET("IS","`ywleo","ciaelh")
hleaic
^P1STREET("IS","`ywleo","cifxr`li")
il`rxfic
^P1STREET("IS","`ywleo","cliez")
zeilc
^P1STREET("IS","`ywleo","co")
oc
^P1STREET("IS","`ywleo","cpi`l")
l`ipc
^P1STREET("IS","`ywleo","ctpd")
dptc
^P1STREET("IS","`ywleo","cxj dcxem")
mexcd jxc
^P1STREET("IS","`ywleo","d`aez")
zea`d
^P1STREET("IS","`ywleo","d`bef")
feb`d
^P1STREET("IS","`ywleo","d`eno")
one`d
^P1STREET("IS","`ywleo","d`etd")
dte`d
^P1STREET("IS","`ywleo","d`eto")
ote`d
^P1STREET("IS","`ywleo","d`etw")
wte`d
^P1STREET("IS","`ywleo","d`exb")
bxe`d
^P1STREET("IS","`ywleo","d`exim")
mixe`d
^P1STREET("IS","`ywleo","d`ilo")
oli`d
^P1STREET("IS","`ywleo","d`ld")
dl`d
^P1STREET("IS","`ywleo","d`leo")
oel`d
^P1STREET("IS","`ywleo","d`lneb")
benl`d
^P1STREET("IS","`ywleo","d`ndez")
zedn`d
^P1STREET("IS","`ywleo","d`x""i")
i"x`d
^P1STREET("IS","`ywleo","d`xf")
fx`d
^P1STREET("IS","`ywleo","d`xneo")
oenx`d
^P1STREET("IS","`ywleo","d`yeg")
gey`d
^P1STREET("IS","`ywleo","d`yl")
ly`d
^P1STREET("IS","`ywleo","d`zxeb")
bexz`d
^P1STREET("IS","`ywleo","dapim")
mipad
^P1STREET("IS","`ywleo","darl ym hea")
aeh my lrad
^P1STREET("IS","`ywleo","davix")
xivad
^P1STREET("IS","`ywleo","daxey")
yexad
^P1STREET("IS","`ywleo","dayo")
oyad
^P1STREET("IS","`ywleo","dbaexd")
dxeabd
^P1STREET("IS","`ywleo","dbcec draxi")
ixard cecbd
^P1STREET("IS","`ywleo","dbcpr")
rpcbd
^P1STREET("IS","`ywleo","dbelo")
olebd
^P1STREET("IS","`ywleo","dblbl")
lblbd
^P1STREET("IS","`ywleo","dblil")
lilbd
^P1STREET("IS","`ywleo","dbto")
otbd
^P1STREET("IS","`ywleo","dbx""`")
`"xbd
^P1STREET("IS","`ywleo","dcbl")
lbcd
^P1STREET("IS","`ywleo","dceacao")
oacaecd
^P1STREET("IS","`ywleo","dcwl")
lwcd
^P1STREET("IS","`ywleo","dcwl `txicx")
xcixt` lwcd
^P1STREET("IS","`ywleo","dcwl nbcl")
lcbn lwcd
^P1STREET("IS","`ywleo","dcxex")
xexcd
^P1STREET("IS","`ywleo","ddbpd")
dpbdd
^P1STREET("IS","`ywleo","ddcq")
qcdd
^P1STREET("IS","`ywleo","ddcxim")
mixcdd
^P1STREET("IS","`ywleo","ddqzcxez")
zexczqdd
^P1STREET("IS","`ywleo","ddxces")
secxdd
^P1STREET("IS","`ywleo","dex ddx")
xdd xed
^P1STREET("IS","`ywleo","dexceq")
qecxed
^P1STREET("IS","`ywleo","dexcim")
micxed
^P1STREET("IS","`ywleo","deyr")
ryed
^P1STREET("IS","`ywleo","dfiz")
zifd
^P1STREET("IS","`ywleo","dfkxeo")
oexkfd
^P1STREET("IS","`ywleo","dfnix")
xinfd
^P1STREET("IS","`ywleo","dgavlz")
zlvagd
^P1STREET("IS","`ywleo","dgeld")
dlegd
^P1STREET("IS","`ywleo","dgihd")
dhigd
^P1STREET("IS","`ywleo","dgleu")
uelgd
^P1STREET("IS","`ywleo","dgva")
avgd
^P1STREET("IS","`ywleo","dgxea")
aexgd
^P1STREET("IS","`ywleo","dgxh")
hxgd
^P1STREET("IS","`ywleo","dgxy")
yxgd
^P1STREET("IS","`ywleo","dgynl")
lnygd
^P1STREET("IS","`ywleo","dhiiqim")
miqiihd
^P1STREET("IS","`ywleo","diivel")
leviid
^P1STREET("IS","`ywleo","dill")
llid
^P1STREET("IS","`ywleo","diwa")
awid
^P1STREET("IS","`ywleo","dixco")
ocxid
^P1STREET("IS","`ywleo","dkekiz")
zikekd
^P1STREET("IS","`ywleo","dkiyex")
xeyikd
^P1STREET("IS","`ywleo","dklpiz")
ziplkd
^P1STREET("IS","`ywleo","dkxkem")
mekxkd
^P1STREET("IS","`ywleo","dkxm")
mxkd
^P1STREET("IS","`ywleo","dlef")
feld
^P1STREET("IS","`ywleo","dlela")
aleld
^P1STREET("IS","`ywleo","dlilj")
jlild
^P1STREET("IS","`ywleo","dlineo")
oenild
^P1STREET("IS","`ywleo","dll")
lld
^P1STREET("IS","`ywleo","dnb")
bnd
^P1STREET("IS","`ywleo","dngebd")
dbegnd
^P1STREET("IS","`ywleo","dnl`kd")
dk`lnd
^P1STREET("IS","`ywleo","dnlj ip`i")
i`pi jlnd
^P1STREET("IS","`ywleo","dnlkd `qzx")
xzq` dklnd
^P1STREET("IS","`ywleo","dnqbx")
xbqnd
^P1STREET("IS","`ywleo","dnqlel")
lelqnd
^P1STREET("IS","`ywleo","dnrtilim")
militrnd
^P1STREET("IS","`ywleo","dntxu")
uxtnd
^P1STREET("IS","`ywleo","dnvcd")
dcvnd
^P1STREET("IS","`ywleo","dnxc")
cxnd
^P1STREET("IS","`ywleo","dnxkad")
dakxnd
^P1STREET("IS","`ywleo","dnyaix")
xiaynd
^P1STREET("IS","`ywleo","dnypd")
dpynd
^P1STREET("IS","`ywleo","dnzkpo")
opkznd
^P1STREET("IS","`ywleo","dpai`im")
mi`iapd
^P1STREET("IS","`ywleo","dpba")
abpd
^P1STREET("IS","`ywleo","dpbx")
xbpd
^P1STREET("IS","`ywleo","dpehxim")
mixhepd
^P1STREET("IS","`ywleo","dperx dreac")
caerd xrepd
^P1STREET("IS","`ywleo","dpnl")
lnpd
^P1STREET("IS","`ywleo","dptg")
gtpd
^P1STREET("IS","`ywleo","dpxi qhxu'")
'uxhq ixpd
^P1STREET("IS","`ywleo","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","`ywleo","dpxwiq")
qiwxpd
^P1STREET("IS","`ywleo","dpyi`")
`iypd
^P1STREET("IS","`ywleo","dqegx")
xgeqd
^P1STREET("IS","`ywleo","dqell")
lleqd
^P1STREET("IS","`ywleo","dqetxim didecim")
micedid mixteqd
^P1STREET("IS","`ywleo","dqpd")
dpqd
^P1STREET("IS","`ywleo","dqpdcxio")
oixcdpqd
^P1STREET("IS","`ywleo","dqpepiz")
zipepqd
^P1STREET("IS","`ywleo","draecd")
dceard
^P1STREET("IS","`ywleo","drebo")
oberd
^P1STREET("IS","`ywleo","dripa")
apird
^P1STREET("IS","`ywleo","drnl")
lnrd
^P1STREET("IS","`ywleo","drvn`ez")
ze`nvrd
^P1STREET("IS","`ywleo","drxad")
daxrd
^P1STREET("IS","`ywleo","drxneo")
oenxrd
^P1STREET("IS","`ywleo","dryz")
zyrd
^P1STREET("IS","`ywleo","dtexvim")
mivxetd
^P1STREET("IS","`ywleo","dtln""g")
g"nltd
^P1STREET("IS","`ywleo","dtpipim")
mipiptd
^P1STREET("IS","`ywleo","dtxb")
bxtd
^P1STREET("IS","`ywleo","dtxcq")
qcxtd
^P1STREET("IS","`ywleo","dv`ld")
dl`vd
^P1STREET("IS","`ywleo","dvarepi")
iperavd
^P1STREET("IS","`ywleo","dvax")
xavd
^P1STREET("IS","`ywleo","dvetim")
mitevd
^P1STREET("IS","`ywleo","dvexs")
sxevd
^P1STREET("IS","`ywleo","dvpgpim")
mipgpvd
^P1STREET("IS","`ywleo","dvtvtd")
dtvtvd
^P1STREET("IS","`ywleo","dwiwieo")
oeiwiwd
^P1STREET("IS","`ywleo","dwxo")
oxwd
^P1STREET("IS","`ywleo","dx `xal")
lax` xd
^P1STREET("IS","`ywleo","dx daiz")
ziad xd
^P1STREET("IS","`ywleo","dx gvex")
xevg xd
^P1STREET("IS","`ywleo","dx kpro")
orpk xd
^P1STREET("IS","`ywleo","dx nixeo")
oexin xd
^P1STREET("IS","`ywleo","dx pae")
eap xd
^P1STREET("IS","`ywleo","dx zaex")
xeaz xd
^P1STREET("IS","`ywleo","dx`l")
l`xd
^P1STREET("IS","`ywleo","dxa")
axd
^P1STREET("IS","`ywleo","dxa axej qab")
baq jexa axd
^P1STREET("IS","`ywleo","dxa bpiy ge`he")
eh`eg yipb axd
^P1STREET("IS","`ywleo","dxa d`i b`eo")
oe`b i`d axd
^P1STREET("IS","`ywleo","dxa dxveb")
bevxd axd
^P1STREET("IS","`ywleo","dxa helicpe")
epcileh axd
^P1STREET("IS","`ywleo","dxa nineo")
oenin axd
^P1STREET("IS","`ywleo","dxa pexew")
wexep axd
^P1STREET("IS","`ywleo","dxa qte")
etq axd
^P1STREET("IS","`ywleo","dxa refi`l")
l`ifer axd
^P1STREET("IS","`ywleo","dxa w`xe")
ex`w axd
^P1STREET("IS","`ywleo","dxa wew")
wew axd
^P1STREET("IS","`ywleo","dxi""s")
s"ixd
^P1STREET("IS","`ywleo","dxneo")
oenxd
^P1STREET("IS","`ywleo","dxvl")
lvxd
^P1STREET("IS","`ywleo","dxwtz")
ztwxd
^P1STREET("IS","`ywleo","dyahim")
mihayd
^P1STREET("IS","`ywleo","dyehx")
xheyd
^P1STREET("IS","`ywleo","dyenx dvrix")
xirvd xneyd
^P1STREET("IS","`ywleo","dyenxeo")
oexneyd
^P1STREET("IS","`ywleo","dyepiz")
zipeyd
^P1STREET("IS","`ywleo","dyethim")
mihteyd
^P1STREET("IS","`ywleo","dyeypim")
mipyeyd
^P1STREET("IS","`ywleo","dyihd")
dhiyd
^P1STREET("IS","`ywleo","dyiihz")
zhiiyd
^P1STREET("IS","`ywleo","dyrexd")
dxeryd
^P1STREET("IS","`ywleo","dytld")
dltyd
^P1STREET("IS","`ywleo","dywc")
cwyd
^P1STREET("IS","`ywleo","dywc `txicx")
xcixt` cwyd
^P1STREET("IS","`ywleo","dywnd")
dnwyd
^P1STREET("IS","`ywleo","dywnd `txicx")
xcixt` dnwyd
^P1STREET("IS","`ywleo","dyxeo")
oexyd
^P1STREET("IS","`ywleo","dyxiep`im")
mi`peixyd
^P1STREET("IS","`ywleo","dzex")
xezd
^P1STREET("IS","`ywleo","dzgid")
digzd
^P1STREET("IS","`ywleo","dzlnec")
cenlzd
^P1STREET("IS","`ywleo","dznx")
xnzd
^P1STREET("IS","`ywleo","dzp`im")
mi`pzd
^P1STREET("IS","`ywleo","dzrpj")
jprzd
^P1STREET("IS","`ywleo","dztef")
fetzd
^P1STREET("IS","`ywleo","dzwed")
dewzd
^P1STREET("IS","`ywleo","eiiq irwa")
awri qiie
^P1STREET("IS","`ywleo","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","`ywleo","faeleo")
oeleaf
^P1STREET("IS","`ywleo","felehea")
aehelef
^P1STREET("IS","`ywleo","feppapc")
cpappef
^P1STREET("IS","`ywleo","fkxid")
dixkf
^P1STREET("IS","`ywleo","fnexd")
dxenf
^P1STREET("IS","`ywleo","fxeaal")
laaexf
^P1STREET("IS","`ywleo","fxriz")
zirxf
^P1STREET("IS","`ywleo","g""o")
o"g
^P1STREET("IS","`ywleo","ga""c")
c"ag
^P1STREET("IS","`ywleo","gaia `aylem")
melya` aiag
^P1STREET("IS","`ywleo","gawew")
wewag
^P1STREET("IS","`ywleo","gaxeo")
oexag
^P1STREET("IS","`ywleo","gbi")
ibg
^P1STREET("IS","`ywleo","geaai vieo")
oeiv iaaeg
^P1STREET("IS","`ywleo","gebld")
dlbeg
^P1STREET("IS","`ywleo","gegiz")
zigeg
^P1STREET("IS","`ywleo","gelcd dpai`d")
d`iapd dcleg
^P1STREET("IS","`ywleo","gepi dnrbl")
lbrnd ipeg
^P1STREET("IS","`ywleo","ges clild")
dlilc seg
^P1STREET("IS","`ywleo","getiz")
ziteg
^P1STREET("IS","`ywleo","gevez dievx")
xveid zeveg
^P1STREET("IS","`ywleo","gexa")
axeg
^P1STREET("IS","`ywleo","gfeo `iy")
yi` oefg
^P1STREET("IS","`ywleo","gfwide")
ediwfg
^P1STREET("IS","`ywleo","gh' rviepi")
ipeivr 'hg
^P1STREET("IS","`ywleo","ghiad ideciz legnz")
zngel zicedi daihg
^P1STREET("IS","`ywleo","gic""`")
`"cig
^P1STREET("IS","`ywleo","giim cec kdp`")
`pdk cec miig
^P1STREET("IS","`ywleo","giim eivno")
onvie miig
^P1STREET("IS","`ywleo","giim qlr")
rlq miig
^P1STREET("IS","`ywleo","gkm ynreo")
oerny mkg
^P1STREET("IS","`ywleo","glnepiz")
zipenlg
^P1STREET("IS","`ywleo","gpd eyarz apid")
dipa zraye dpg
^P1STREET("IS","`ywleo","gpd qpy")
ypq dpg
^P1STREET("IS","`ywleo","gpizd")
dzipg
^P1STREET("IS","`ywleo","gpp`l")
l`ppg
^P1STREET("IS","`ywleo","gppid")
dippg
^P1STREET("IS","`ywleo","gqicd")
dciqg
^P1STREET("IS","`ywleo","gtpi")
iptg
^P1STREET("IS","`ywleo","gvad")
davg
^P1STREET("IS","`ywleo","gvxepi")
ipexvg
^P1STREET("IS","`ywleo","gxez")
zexg
^P1STREET("IS","`ywleo","gxviz")
zivxg
^P1STREET("IS","`ywleo","gyeo")
oeyg
^P1STREET("IS","`ywleo","gzm qetx")
xteq mzg
^P1STREET("IS","`ywleo","gzo qetx")
xteq ozg
^P1STREET("IS","`ywleo","haeri qhxend")
dnexhq ireah
^P1STREET("IS","`ywleo","haeri txiiq")
qiixt ireah
^P1STREET("IS","`ywleo","haxid")
dixah
^P1STREET("IS","`ywleo","haz")
zah
^P1STREET("IS","`ywleo","hixo")
oxih
^P1STREET("IS","`ywleo","hxentlcex")
xecltnexh
^P1STREET("IS","`ywleo","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","`ywleo","i""l txu")
uxt l"i
^P1STREET("IS","`ywleo","iapd")
dpai
^P1STREET("IS","`ywleo","ic lapim")
mipal ci
^P1STREET("IS","`ywleo","idcez `nxiwd dlhipiz")
zipihld dwixn` zecdi
^P1STREET("IS","`ywleo","idcez axihpid")
diphixa zecdi
^P1STREET("IS","`ywleo","idcez qtxc")
cxtq zecdi
^P1STREET("IS","`ywleo","ide`y")
y`edi
^P1STREET("IS","`ywleo","idec")
cedi
^P1STREET("IS","`ywleo","idecd")
dcedi
^P1STREET("IS","`ywleo","idecd dlei")
ield dcedi
^P1STREET("IS","`ywleo","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","`ywleo","ideciz")
zicedi
^P1STREET("IS","`ywleo","ideyth")
htyedi
^P1STREET("IS","`ywleo","ie`a")
a`ei
^P1STREET("IS","`ywleo","ie`l")
l`ei
^P1STREET("IS","`ywleo","ieal bc")
cb laei
^P1STREET("IS","`ywleo","iectz")
ztcei
^P1STREET("IS","`ywleo","iedpqaexb")
bxeaqpdei
^P1STREET("IS","`ywleo","iehazd")
dzahei
^P1STREET("IS","`ywleo","iekac")
cakei
^P1STREET("IS","`ywleo","ieliy nyd")
dyn yilei
^P1STREET("IS","`ywleo","iepd")
dpei
^P1STREET("IS","`ywleo","ieqs `lide hxiexq")
qxeixh edil` sqei
^P1STREET("IS","`ywleo","ieqthl")
lhtqei
^P1STREET("IS","`ywleo","iezm")
mzei
^P1STREET("IS","`ywleo","igfw`l")
l`wfgi
^P1STREET("IS","`ywleo","ihazd")
dzahi
^P1STREET("IS","`ywleo","ikio")
oiki
^P1STREET("IS","`ywleo","ilz`")
`zli
^P1STREET("IS","`ywleo","iniz")
zini
^P1STREET("IS","`ywleo","ipew`")
`wepi
^P1STREET("IS","`ywleo","iqnio")
oinqi
^P1STREET("IS","`ywleo","irl")
lri
^P1STREET("IS","`ywleo","itd pes")
sep dti
^P1STREET("IS","`ywleo","itzg")
gzti
^P1STREET("IS","`ywleo","itzg dblrci")
icrlbd gzti
^P1STREET("IS","`ywleo","ivgw ao vai")
iav oa wgvi
^P1STREET("IS","`ywleo","ivgw piqim")
miqip wgvi
^P1STREET("IS","`ywleo","iwezi`l `cm")
mc` l`izewi
^P1STREET("IS","`ywleo","ixige")
egixi
^P1STREET("IS","`ywleo","ixnide")
edinxi
^P1STREET("IS","`ywleo","iyexeo")
oexeyi
^P1STREET("IS","`ywleo","iyi")
iyi
^P1STREET("IS","`ywleo","iyride")
ediryi
^P1STREET("IS","`ywleo","iyykx")
xkyyi
^P1STREET("IS","`ywleo","keka dim")
mid akek
^P1STREET("IS","`ywleo","kexy")
yxek
^P1STREET("IS","`ywleo","kkx axw")
wxa xkk
^P1STREET("IS","`ywleo","kkx d`exo")
oxe`d xkk
^P1STREET("IS","`ywleo","kkx dnlj cec")
cec jlnd xkk
^P1STREET("IS","`ywleo","kkx dnlj ylnd")
dnly jlnd xkk
^P1STREET("IS","`ywleo","kkx drvn`ez")
ze`nvrd xkk
^P1STREET("IS","`ywleo","kkx npbx")
xbpn xkk
^P1STREET("IS","`ywleo","kkx nyd nxbliz")
zilbxn dyn xkk
^P1STREET("IS","`ywleo","kkx qne`l")
l`enq xkk
^P1STREET("IS","`ywleo","kkx rzpi`l")
l`ipzr xkk
^P1STREET("IS","`ywleo","kkx vtpid")
diptv xkk
^P1STREET("IS","`ywleo","kkx y`el dnlj")
jlnd le`y xkk
^P1STREET("IS","`ywleo","kkx ynyeo")
oeyny xkk
^P1STREET("IS","`ywleo","kl iyx`l gaxim")
mixag l`xyi lk
^P1STREET("IS","`ywleo","klil dgexy")
yxegd lilk
^P1STREET("IS","`ywleo","kpti pyxim")
mixyp itpk
^P1STREET("IS","`ywleo","kpxz")
zxpk
^P1STREET("IS","`ywleo","kqle")
elqk
^P1STREET("IS","`ywleo","kvplqeo")
oeqlpvk
^P1STREET("IS","`ywleo","kxkim")
mikxk
^P1STREET("IS","`ywleo","kza qetx")
xteq azk
^P1STREET("IS","`ywleo","l`d")
d`l
^P1STREET("IS","`ywleo","lai`d")
d`ial
^P1STREET("IS","`ywleo","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","`ywleo","leheq")
qehel
^P1STREET("IS","`ywleo","lei")
iel
^P1STREET("IS","`ywleo","leizo")
oziel
^P1STREET("IS","`ywleo","ler d`xi")
ix`d rel
^P1STREET("IS","`ywleo","lg""i")
i"gl
^P1STREET("IS","`ywleo","lkiy")
yikl
^P1STREET("IS","`ywleo","lym")
myl
^P1STREET("IS","`ywleo","n`cim")
mic`n
^P1STREET("IS","`ywleo","navr nyd")
dyn rvan
^P1STREET("IS","`ywleo","nbice")
ecibn
^P1STREET("IS","`ywleo","nbo cec `cem")
mec` cec obn
^P1STREET("IS","`ywleo","nephitiexi")
ixeitihpen
^P1STREET("IS","`ywleo","ng""l")
l"gn
^P1STREET("IS","`ywleo","ngpiim")
miipgn
^P1STREET("IS","`ywleo","nikd")
dkin
^P1STREET("IS","`ywleo","nilxec `lirfx")
xfril` cexlin
^P1STREET("IS","`ywleo","niy`l")
l`yin
^P1STREET("IS","`ywleo","nkai vrix")
xirv iakn
^P1STREET("IS","`ywleo","nknexz")
zxenkn
^P1STREET("IS","`ywleo","nl`ki")
ik`ln
^P1STREET("IS","`ywleo","nlkd")
dkln
^P1STREET("IS","`ywleo","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","`ywleo","npcli nekx qtxim")
mixtq xken ilcpn
^P1STREET("IS","`ywleo","npgm abio")
oiba mgpn
^P1STREET("IS","`ywleo","npyd")
dypn
^P1STREET("IS","`ywleo","nrlez `yx")
xy` zelrn
^P1STREET("IS","`ywleo","nwexez")
zexewn
^P1STREET("IS","`ywleo","nxbliz")
zilbxn
^P1STREET("IS","`ywleo","nxim")
mixn
^P1STREET("IS","`ywleo","nxkeq")
qekxn
^P1STREET("IS","`ywleo","nxkf dzryid")
diyrzd fkxn
^P1STREET("IS","`ywleo","nyd")
dyn
^P1STREET("IS","`ywleo","nyd wel")
lew dyn
^P1STREET("IS","`ywleo","nyd yxz")
zxy dyn
^P1STREET("IS","`ywleo","nyelm nex")
xen mleyn
^P1STREET("IS","`ywleo","nykiz")
zikyn
^P1STREET("IS","`ywleo","p`ez axpr")
rpxa ze`p
^P1STREET("IS","`ywleo","pcepi abcc")
ccba ipecp
^P1STREET("IS","`ywleo","pcepi wdix")
xidw ipecp
^P1STREET("IS","`ywleo","pdxcr`")
`rcxdp
^P1STREET("IS","`ywleo","pebd")
dbep
^P1STREET("IS","`ywleo","ped xf")
fx dep
^P1STREET("IS","`ywleo","ped ylem")
mely dep
^P1STREET("IS","`ywleo","peed ges")
seg deep
^P1STREET("IS","`ywleo","perd")
drep
^P1STREET("IS","`ywleo","pexc`e")
e`cxep
^P1STREET("IS","`ywleo","pexiz")
zixep
^P1STREET("IS","`ywleo","pgeyzo")
ozyegp
^P1STREET("IS","`ywleo","pgl")
lgp
^P1STREET("IS","`ywleo","pgli`li")
il`ilgp
^P1STREET("IS","`ywleo","pgnid")
dingp
^P1STREET("IS","`ywleo","pgyeo")
oeygp
^P1STREET("IS","`ywleo","pili")
ilip
^P1STREET("IS","`ywleo","piqo")
oqip
^P1STREET("IS","`ywleo","pivpd")
dpvip
^P1STREET("IS","`ywleo","pivpim")
mipvip
^P1STREET("IS","`ywleo","pnx")
xnp
^P1STREET("IS","`ywleo","prni")
inrp
^P1STREET("IS","`ywleo","ptzli")
ilztp
^P1STREET("IS","`ywleo","pvg iyx`l")
l`xyi gvp
^P1STREET("IS","`ywleo","pzo dpai`")
`iapd ozp
^P1STREET("IS","`ywleo","pzp`li")
il`pzp
^P1STREET("IS","`ywleo","qaieo")
oeiaq
^P1STREET("IS","`ywleo","qbl vai")
iav lbq
^P1STREET("IS","`ywleo","qcem")
mecq
^P1STREET("IS","`ywleo","qekpez ideciz")
zicedi zepkeq
^P1STREET("IS","`ywleo","qgla")
algq
^P1STREET("IS","`ywleo","qieo")
oeiq
^P1STREET("IS","`ywleo","qiito")
otiiq
^P1STREET("IS","`ywleo","qipi")
ipiq
^P1STREET("IS","`ywleo","qixwio")
oiwxiq
^P1STREET("IS","`ywleo","qlriz")
zirlq
^P1STREET("IS","`ywleo","qn' `iileo")
oelii` 'nq
^P1STREET("IS","`ywleo","qn' ao peo")
oep oa 'nq
^P1STREET("IS","`ywleo","qn' blaer")
realb 'nq
^P1STREET("IS","`ywleo","qn' dl""d")
d"ld 'nq
^P1STREET("IS","`ywleo","qn' gnc")
cng 'nq
^P1STREET("IS","`ywleo","qn' ideyr")
ryedi 'nq
^P1STREET("IS","`ywleo","qn' kxnl")
lnxk 'nq
^P1STREET("IS","`ywleo","qn' kxnli")
ilnxk 'nq
^P1STREET("IS","`ywleo","qn' ndx""l")
l"xdn 'nq
^P1STREET("IS","`ywleo","qn' nex")
xen 'nq
^P1STREET("IS","`ywleo","qn' yne`l")
l`eny 'nq
^P1STREET("IS","`ywleo","qn' zgknepi")
ipenkgz 'nq
^P1STREET("IS","`ywleo","qnelpqwio")
oiwqplenq
^P1STREET("IS","`ywleo","qptix")
xitpq
^P1STREET("IS","`ywleo","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","`ywleo","rcelm")
mlecr
^P1STREET("IS","`ywleo","reacid")
dicaer
^P1STREET("IS","`ywleo","recc")
ccer
^P1STREET("IS","`ywleo","reli dbxcem")
mecxbd iler
^P1STREET("IS","`ywleo","retx `axdm")
mdxa` xter
^P1STREET("IS","`ywleo","rfx`")
`xfr
^P1STREET("IS","`ywleo","rfx` iqeci")
iceqi `xfr
^P1STREET("IS","`ywleo","rfxid")
dixfr
^P1STREET("IS","`ywleo","ripax")
xapir
^P1STREET("IS","`ywleo","rixiz")
zixir
^P1STREET("IS","`ywleo","rli")
ilr
^P1STREET("IS","`ywleo","rlid")
dilr
^P1STREET("IS","`ywleo","rliz dperx")
xrepd zilr
^P1STREET("IS","`ywleo","rneq")
qenr
^P1STREET("IS","`ywleo","rnirc")
crinr
^P1STREET("IS","`ywleo","rniref")
ferinr
^P1STREET("IS","`ywleo","rniya")
ayinr
^P1STREET("IS","`ywleo","rnpe`l")
l`epnr
^P1STREET("IS","`ywleo","rtxepi")
ipextr
^P1STREET("IS","`ywleo","rvieo")
oeivr
^P1STREET("IS","`ywleo","ryxz dyahim")
mihayd zxyr
^P1STREET("IS","`ywleo","tiphe")
ehpit
^P1STREET("IS","`ywleo","tipq")
qpit
^P1STREET("IS","`ywleo","tlebez")
zebelt
^P1STREET("IS","`ywleo","tpgq")
qgpt
^P1STREET("IS","`ywleo","twirio")
oiriwt
^P1STREET("IS","`ywleo","txbeo")
oebxt
^P1STREET("IS","`ywleo","txu i l")
l i uxt
^P1STREET("IS","`ywleo","varepi")
iperav
^P1STREET("IS","`ywleo","vcw")
wcv
^P1STREET("IS","`ywleo","vd""l")
l"dv
^P1STREET("IS","`ywleo","vetiz")
zitev
^P1STREET("IS","`ywleo","vex `txim")
mixt` xev
^P1STREET("IS","`ywleo","vexi`l")
l`ixev
^P1STREET("IS","`ywleo","viihlio")
oilhiiv
^P1STREET("IS","`ywleo","vio")
oiv
^P1STREET("IS","`ywleo","vitexi")
ixetiv
^P1STREET("IS","`ywleo","vitexo")
oxetiv
^P1STREET("IS","`ywleo","vletgc")
cgtelv
^P1STREET("IS","`ywleo","vls")
slv
^P1STREET("IS","`ywleo","w`tg `dxeo")
oexd` gt`w
^P1STREET("IS","`ywleo","waeu bleiez")
zeielb ueaw
^P1STREET("IS","`ywleo","wcenim")
minecw
^P1STREET("IS","`ywleo","wceyi wdix")
xidw iyecw
^P1STREET("IS","`ywleo","wcy")
ycw
^P1STREET("IS","`ywleo","wenniez")
zeinnew
^P1STREET("IS","`ywleo","wetz gelim")
mileg ztew
^P1STREET("IS","`ywleo","wexv'w")
w'vxew
^P1STREET("IS","`ywleo","wiqxid")
dixqiw
^P1STREET("IS","`ywleo","wtqhh")
hhqtw
^P1STREET("IS","`ywleo","wvxio")
oixvw
^P1STREET("IS","`ywleo","ww""l")
l"ww
^P1STREET("IS","`ywleo","wxiizi")
iziixw
^P1STREET("IS","`ywleo","wxo diqec")
ceqid oxw
^P1STREET("IS","`ywleo","x`eao")
oae`x
^P1STREET("IS","`ywleo","x`yeo lvieo")
oeivl oey`x
^P1STREET("IS","`ywleo","xai n`ix")
xi`n iax
^P1STREET("IS","`ywleo","xai rwia`")
`aiwr iax
^P1STREET("IS","`ywleo","xawd")
dwax
^P1STREET("IS","`ywleo","xez")
zex
^P1STREET("IS","`ywleo","xfi`l")
l`ifx
^P1STREET("IS","`ywleo","xg' 13")
13 'gx
^P1STREET("IS","`ywleo","xg' 2001")
2001 'gx
^P1STREET("IS","`ywleo","xg' 8216")
8216 'gx
^P1STREET("IS","`ywleo","xg' `'")
'` 'gx
^P1STREET("IS","`ywleo","xg' a'")
'a 'gx
^P1STREET("IS","`ywleo","xg' b'")
'b 'gx
^P1STREET("IS","`ywleo","xg' c'")
'c 'gx
^P1STREET("IS","`ywleo","xgl `npe")
epn` lgx
^P1STREET("IS","`ywleo","xna""m")
m"anx
^P1STREET("IS","`ywleo","xnf cec")
cec fnx
^P1STREET("IS","`ywleo","xnz `ykel")
leky` znx
^P1STREET("IS","`ywleo","xy""i")
i"yx
^P1STREET("IS","`ywleo","y""i rbpeo")
oepbr i"y
^P1STREET("IS","`ywleo","y`x iyea")
aeyi x`y
^P1STREET("IS","`ywleo","yafi")
ifay
^P1STREET("IS","`ywleo","yah")
hay
^P1STREET("IS","`ywleo","yah qetx")
xteq hay
^P1STREET("IS","`ywleo","yaih")
hiay
^P1STREET("IS","`ywleo","yail bxyeo")
oeyxb liay
^P1STREET("IS","`ywleo","yail dlilj")
jlild liay
^P1STREET("IS","`ywleo","yail ilio")
oili liay
^P1STREET("IS","`ywleo","yail pdxcr`")
`rcxdp liay
^P1STREET("IS","`ywleo","yail yar")
ray liay
^P1STREET("IS","`ywleo","yail ytix` ieqs")
sqei `xity liay
^P1STREET("IS","`ywleo","yaz`i")
i`zay
^P1STREET("IS","`ywleo","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","`ywleo","yc' cxem `txiwd")
dwixt` mexc 'cy
^P1STREET("IS","`ywleo","yc' dpvgeo")
oegvpd 'cy
^P1STREET("IS","`ywleo","yc' dviepez")
zepeivd 'cy
^P1STREET("IS","`ywleo","yc' dx pae")
eap xd 'cy
^P1STREET("IS","`ywleo","yc' dzryid")
diyrzd 'cy
^P1STREET("IS","`ywleo","yc' giim ax la")
al xa miig 'cy
^P1STREET("IS","`ywleo","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","`ywleo","yc' wcey")
yecw 'cy
^P1STREET("IS","`ywleo","yc' ynyeo")
oeyny 'cy
^P1STREET("IS","`ywleo","yc' ytix`")
`xity 'cy
^P1STREET("IS","`ywleo","yexw")
wxey
^P1STREET("IS","`ywleo","yiaz vieo")
oeiv zaiy
^P1STREET("IS","`ywleo","yild")
dliy
^P1STREET("IS","`ywleo","ykm")
mky
^P1STREET("IS","`ywleo","ylem rlikm")
mkilr mely
^P1STREET("IS","`ywleo","ylenvieo")
oeivnely
^P1STREET("IS","`ywleo","ylnd kdo")
odk dnly
^P1STREET("IS","`ywleo","yn`i")
i`ny
^P1STREET("IS","`ywleo","ynbx")
xbny
^P1STREET("IS","`ywleo","yngd delvaxb")
bxavled dgny
^P1STREET("IS","`ywleo","ynrid")
dirny
^P1STREET("IS","`ywleo","ypi `lide")
edil` ipy
^P1STREET("IS","`ywleo","ypix")
xipy
^P1STREET("IS","`ywleo","yrx dbi`")
`ibd xry
^P1STREET("IS","`ywleo","ytipefd")
dfepity
^P1STREET("IS","`ywleo","ytxd")
dxty
^P1STREET("IS","`ywleo","yxd")
dxy
^P1STREET("IS","`ywleo","zbx rlifd")
dfilr xbz
^P1STREET("IS","`ywleo","zgknepi")
ipenkgz
^P1STREET("IS","`ywleo","zl gi")
ig lz
^P1STREET("IS","`ywleo","zlm")
mlz
^P1STREET("IS","`ywleo","znef")
fenz
^P1STREET("IS","`ywleo","znpr")
rpnz
^P1STREET("IS","`ywleo","zxcieo")
oeicxz
^P1STREET("IS","`ywleo","zxvd")
dvxz
^P1STREET("IS","`ywleo","zyxi")
ixyz
^P1STREET("IS","`yxz")
zxy`
^P1STREET("IS","`yxz","nvtd bizd")
dzib dtvn
^P1STREET("IS","`yxz","yc' klil")
lilk 'cy
^P1STREET("IS","`yz`el")
le`zy`
^P1STREET("IS","a`wd `l-bxaid")
diaxb-l` dw`a
^P1STREET("IS","a`wd `l-bxaid","`laqd")
dqal`
^P1STREET("IS","a`wd `l-bxaid","cxl niiqx")
xqiin lxc
^P1STREET("IS","a`wd `l-bxaid","dce`x")
x`ecd
^P1STREET("IS","a`wd `l-bxaid","dpyi`")
`iypd
^P1STREET("IS","a`wz `l gha")
ahg l` zw`a
^P1STREET("IS","a`x `exd")
dxe` x`a
^P1STREET("IS","a`x heaid")
diaeh x`a
^P1STREET("IS","a`x irwa")
awri x`a
^P1STREET("IS","a`x irwa","`a` dll")
lld `a`
^P1STREET("IS","a`x irwa","`ild")
dli`
^P1STREET("IS","a`x irwa","`lide")
edil`
^P1STREET("IS","a`x irwa","`pwex")
xewp`
^P1STREET("IS","a`x irwa","`qs dxet`")
`texd sq`
^P1STREET("IS","a`x irwa","cec")
cec
^P1STREET("IS","a`x irwa","cec dkdo")
odkd cec
^P1STREET("IS","a`x irwa","cekitz")
ztikec
^P1STREET("IS","a`x irwa","cifpbes")
sebpfic
^P1STREET("IS","a`x irwa","co")
oc
^P1STREET("IS","a`x irwa","cxex")
xexc
^P1STREET("IS","a`x irwa","cxj vd""l")
l"dv jxc
^P1STREET("IS","a`x irwa","d`etd")
dte`d
^P1STREET("IS","a`x irwa","d`eto")
ote`d
^P1STREET("IS","a`x irwa","d`exo")
oxe`d
^P1STREET("IS","a`x irwa","d`ixiq")
qixi`d
^P1STREET("IS","a`x irwa","d`ptd")
dtp`d
^P1STREET("IS","a`x irwa","dapim")
mipad
^P1STREET("IS","a`x irwa","dayex")
xeyad
^P1STREET("IS","a`x irwa","dbelo")
olebd
^P1STREET("IS","a`x irwa","dblbl")
lblbd
^P1STREET("IS","a`x irwa","dbto")
otbd
^P1STREET("IS","a`x irwa","dcx")
xcd
^P1STREET("IS","a`x irwa","dcxex")
xexcd
^P1STREET("IS","a`x irwa","dexc")
cxed
^P1STREET("IS","a`x irwa","dfiz")
zifd
^P1STREET("IS","a`x irwa","dfnix")
xinfd
^P1STREET("IS","a`x irwa","dgavlz")
zlvagd
^P1STREET("IS","a`x irwa","dgxneo")
oenxgd
^P1STREET("IS","a`x irwa","dievx")
xveid
^P1STREET("IS","a`x irwa","dixnej")
jenxid
^P1STREET("IS","a`x irwa","dixweo")
oewxid
^P1STREET("IS","a`x irwa","dklpiz")
ziplkd
^P1STREET("IS","a`x irwa","dpxwiq")
qiwxpd
^P1STREET("IS","a`x irwa","draecd")
dceard
^P1STREET("IS","a`x irwa","drtxepi")
ipextrd
^P1STREET("IS","a`x irwa","dwiyeo")
oeyiwd
^P1STREET("IS","a`x irwa","dwxo")
oxwd
^P1STREET("IS","a`x irwa","dxa wew")
wew axd
^P1STREET("IS","a`x irwa","dxvl")
lvxd
^P1STREET("IS","a`x irwa","dz`pd")
dp`zd
^P1STREET("IS","a`x irwa","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","a`x irwa","gehx")
xheg
^P1STREET("IS","a`x irwa","gfeo `iy")
yi` oefg
^P1STREET("IS","a`x irwa","gpd kkx")
xkk dpg
^P1STREET("IS","a`x irwa","idecd")
dcedi
^P1STREET("IS","a`x irwa","n`ix arl dpq")
qpd lra xi`n
^P1STREET("IS","a`x irwa","nexo")
oxen
^P1STREET("IS","a`x irwa","nhxpi")
ipxhn
^P1STREET("IS","a`x irwa","ped cexeo")
oexec dep
^P1STREET("IS","a`x irwa","pgem")
megp
^P1STREET("IS","a`x irwa","qlriz")
zirlq
^P1STREET("IS","a`x irwa","qpepiz")
zipepq
^P1STREET("IS","a`x irwa","refi`l")
l`ifer
^P1STREET("IS","a`x irwa","tlnipbe")
ebpinlt
^P1STREET("IS","a`x irwa","vxitio")
oitixv
^P1STREET("IS","a`x irwa","wxo diqec")
ceqid oxw
^P1STREET("IS","a`x irwa","xna""m")
m"anx
^P1STREET("IS","a`x irwa","y` pq")
qp `y
^P1STREET("IS","a`x irwa","y`xiz ieqs")
sqei zix`y
^P1STREET("IS","a`x irwa","yeypim")
mipyey
^P1STREET("IS","a`x irwa","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","a`x irwa","yne`l dxet`")
`texd l`eny
^P1STREET("IS","a`x irwa","yrx ixeylim")
milyexi xry
^P1STREET("IS","a`x yar")
ray x`a
^P1STREET("IS","a`x yar","`""c bexceo")
oecxeb c"`
^P1STREET("IS","a`x yar","`ahlieo")
oeilha`
^P1STREET("IS","a`x yar","`aiaiz")
ziaia`
^P1STREET("IS","a`x yar","`aibc")
cbia`
^P1STREET("IS","a`x yar","`aibcex dn`ixi")
ixi`nd xecbia`
^P1STREET("IS","a`x yar","`aibil")
libia`
^P1STREET("IS","a`x yar","`aicea")
aecia`
^P1STREET("IS","a`x yar","`aicem npgm")
mgpn mecia`
^P1STREET("IS","a`x yar","`aid dyeth")
hteyd dia`
^P1STREET("IS","a`x yar","`aihl")
lhia`
^P1STREET("IS","a`x yar","`aiyb")
byia`
^P1STREET("IS","a`x yar","`aiyi")
iyia`
^P1STREET("IS","a`x yar","`aizx dkdo")
odkd xzia`
^P1STREET("IS","a`x yar","`ao baixel")
lexiab oa`
^P1STREET("IS","a`x yar","`ao go")
og oa`
^P1STREET("IS","a`x yar","`ao rfx`")
`xfr oa`
^P1STREET("IS","a`x yar","`apx")
xpa`
^P1STREET("IS","a`x yar","`axap`l")
l`paxa`
^P1STREET("IS","a`x yar","`axdm `aipe")
epia` mdxa`
^P1STREET("IS","a`x yar","`axdm `ao yeyo")
oyey oa` mdxa`
^P1STREET("IS","a`x yar","`axdm `nix")
xin` mdxa`
^P1STREET("IS","a`x yar","`axdm ao rni")
inr oa mdxa`
^P1STREET("IS","a`x yar","`axdm axeicq")
qciexa mdxa`
^P1STREET("IS","a`x yar","`axdm hike")
ekih mdxa`
^P1STREET("IS","a`x yar","`axdm n`te")
et`n mdxa`
^P1STREET("IS","a`x yar","`axdm retx")
xter mdxa`
^P1STREET("IS","a`x yar","`axdm yeth")
htey mdxa`
^P1STREET("IS","a`x yar","`aylem")
melya`
^P1STREET("IS","a`x yar","`aylem gaia")
aiag melya`
^P1STREET("IS","a`x yar","`bc")
cb`
^P1STREET("IS","a`x yar","`bef")
feb`
^P1STREET("IS","a`x yar","`bo")
ob`
^P1STREET("IS","a`x yar","`clx y`el")
le`y xlc`
^P1STREET("IS","a`x yar","`cneo icicid")
dicici oenc`
^P1STREET("IS","a`x yar","`cx nyd")
dyn xc`
^P1STREET("IS","a`x yar","`dec")
ced`
^P1STREET("IS","a`x yar","`dxeo nqwio")
oiwqn oexd`
^P1STREET("IS","a`x yar","`dxeo viflipb")
bpilfiv oexd`
^P1STREET("IS","a`x yar","`dxeo wvix")
xivw oexd`
^P1STREET("IS","a`x yar","`dxepqeo yxd e`dxeo")
oexd`e dxy oeqpexd`
^P1STREET("IS","a`x yar","`edli wicx")
xciw ilde`
^P1STREET("IS","a`x yar","`eknpiez")
zeipnke`
^P1STREET("IS","a`x yar","`elyo")
oyle`
^P1STREET("IS","a`x yar","`eqalce `xpid")
dipx` eclaqe`
^P1STREET("IS","a`x yar","`eqiywio")
oiwyiqe`
^P1STREET("IS","a`x yar","`eqwx yipclx")
xlcpiy xwqe`
^P1STREET("IS","a`x yar","`etixd")
dxite`
^P1STREET("IS","a`x yar","`exez iyx`l")
l`xyi zexe`
^P1STREET("IS","a`x yar","`exid")
dixe`
^P1STREET("IS","a`x yar","`gc drm")
mrd cg`
^P1STREET("IS","a`x yar","`gfid")
difg`
^P1STREET("IS","a`x yar","`giperm")
mrepig`
^P1STREET("IS","a`x yar","`hc")
ch`
^P1STREET("IS","a`x yar","`ificex aecpdiinx")
xniidpcea xecifi`
^P1STREET("IS","a`x yar","`ificex xiai")
iaix xecifi`
^P1STREET("IS","a`x yar","`iifpyhch")
hchypfii`
^P1STREET("IS","a`x yar","`iilz dygx")
xgyd zlii`
^P1STREET("IS","a`x yar","`ild")
dli`
^P1STREET("IS","a`x yar","`ipyhiio")
oiihypi`
^P1STREET("IS","a`x yar","`ixeq dpba")
abpd qexi`
^P1STREET("IS","a`x yar","`lhlpd")
dplhl`
^P1STREET("IS","a`x yar","`li kdo")
odk il`
^P1STREET("IS","a`x yar","`lide ao vexi")
ixev oa edil`
^P1STREET("IS","a`x yar","`lide dpai`")
`iapd edil`
^P1STREET("IS","a`x yar","`lide gkim")
mikg edil`
^P1STREET("IS","a`x yar","`lide yyeo")
oeyy edil`
^P1STREET("IS","a`x yar","`lirfx yne`li")
il`eny xfril`
^P1STREET("IS","a`x yar","`liyar")
rayil`
^P1STREET("IS","a`x yar","`liyr")
ryil`
^P1STREET("IS","a`x yar","`liyx nyd giim")
miig dyn xyil`
^P1STREET("IS","a`x yar","`lkqpcx `xbea")
aebx` xcpqkl`
^P1STREET("IS","a`x yar","`lkqpcx fxgio")
oigxf xcpqkl`
^P1STREET("IS","a`x yar","`lkqpcx ip`i")
i`pi xcpqkl`
^P1STREET("IS","a`x yar","`lneb")
benl`
^P1STREET("IS","a`x yar","`ltqi")
iqtl`
^P1STREET("IS","a`x yar","`ltxc txic")
cixt cxtl`
^P1STREET("IS","a`x yar","`lwiim piqim")
miqip miiwl`
^P1STREET("IS","a`x yar","`lwlri idecd")
dcedi irlwl`
^P1STREET("IS","a`x yar","`lzxno")
onxzl`
^P1STREET("IS","a`x yar","`npeo")
oepn`
^P1STREET("IS","a`x yar","`nvid")
divn`
^P1STREET("IS","a`x yar","`pcd tipwxtlc rnix")
xinr cltxwpit dcp`
^P1STREET("IS","a`x yar","`pcxhd")
dhxcp`
^P1STREET("IS","a`x yar","`pilaiu")
uialip`
^P1STREET("IS","a`x yar","`ptd")
dtp`
^P1STREET("IS","a`x yar","`pve qixpi")
ipxiq evp`
^P1STREET("IS","a`x yar","`pxi axbqeo")
oeqbxa ixp`
^P1STREET("IS","a`x yar","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","a`x yar","`qpz")
zpq`
^P1STREET("IS","a`x yar","`qs dxet`")
`texd sq`
^P1STREET("IS","a`x yar","`qs yngd")
dgny sq`
^P1STREET("IS","a`x yar","`qzx dnlkd")
dklnd xzq`
^P1STREET("IS","a`x yar","`tiwim apba")
abpa miwit`
^P1STREET("IS","a`x yar","`tw")
wt`
^P1STREET("IS","a`x yar","`txim")
mixt`
^P1STREET("IS","a`x yar","`txim ci fda")
adf ic mixt`
^P1STREET("IS","a`x yar","`txim lefeo")
oefel mixt`
^P1STREET("IS","a`x yar","`txqneo")
oenqxt`
^P1STREET("IS","a`x yar","`txz")
zxt`
^P1STREET("IS","a`x yar","`v""b")
b"v`
^P1STREET("IS","a`x yar","`v""l")
l"v`
^P1STREET("IS","a`x yar","`vwio apinio")
oinipa oiwv`
^P1STREET("IS","a`x yar","`xal")
lax`
^P1STREET("IS","a`x yar","`xar dbiaexez")
zexeaibd rax`
^P1STREET("IS","a`x yar","`xbno")
onbx`
^P1STREET("IS","a`x yar","`xid `elvwi")
iwvle` dix`
^P1STREET("IS","a`x yar","`xid celvio")
oivlec dix`
^P1STREET("IS","a`x yar","`xid tiibpa`em")
me`apbiit dix`
^P1STREET("IS","a`x yar","`xlefexea")
aexefelx`
^P1STREET("IS","a`x yar","`xpaz")
zapx`
^P1STREET("IS","a`x yar","`xpeo")
oepx`
^P1STREET("IS","a`x yar","`xpqh go")
og hqpx`
^P1STREET("IS","a`x yar","`xu gncd")
dcng ux`
^P1STREET("IS","a`x yar","`xvitlc `axdm")
mdxa` cltivx`
^P1STREET("IS","a`x yar","`yal nik`l")
l`kin lay`
^P1STREET("IS","a`x yar","`ylim")
mily`
^P1STREET("IS","a`x yar","`yx")
xy`
^P1STREET("IS","a`x yar","`yx axy")
yxa xy`
^P1STREET("IS","a`x yar","aeqweaiu `lkqpcx")
xcpqkl` uiaewqea
^P1STREET("IS","a`x yar","aeqzp`i")
i`pzqea
^P1STREET("IS","a`x yar","aexekea")
aekexea
^P1STREET("IS","a`x yar","aexl`")
`lxea
^P1STREET("IS","a`x yar","afl")
lfa
^P1STREET("IS","a`x yar","ai`liw")
wil`ia
^P1STREET("IS","a`x yar","ail""e")
e"lia
^P1STREET("IS","a`x yar","aiph nwq")
qwn hpia
^P1STREET("IS","a`x yar","aiz `l")
l` zia
^P1STREET("IS","a`x yar","aiz `yl")
ly` zia
^P1STREET("IS","a`x yar","aiz lgm")
mgl zia
^P1STREET("IS","a`x yar","aiz y`o")
o`y zia
^P1STREET("IS","a`x yar","akex yhxiz")
zixhy xeka
^P1STREET("IS","a`x yar","aldd")
ddla
^P1STREET("IS","a`x yar","alej ivgw")
wgvi jela
^P1STREET("IS","a`x yar","altex")
xetla
^P1STREET("IS","a`x yar","alwipc prno")
onrp cpiwla
^P1STREET("IS","a`x yar","ao `yx")
xy` oa
^P1STREET("IS","a`x yar","ao fk`i")
i`kf oa
^P1STREET("IS","a`x yar","ao gaia")
aiag oa
^P1STREET("IS","a`x yar","ao gex `lide")
edil` xeg oa
^P1STREET("IS","a`x yar","ao giim t`el")
le`t miig oa
^P1STREET("IS","a`x yar","ao i`ix `lrfx")
xfrl` xi`i oa
^P1STREET("IS","a`x yar","ao idecd")
dcedi oa
^P1STREET("IS","a`x yar","ao irwa vai")
iav awri oa
^P1STREET("IS","a`x yar","ao nzzide")
edizzn oa
^P1STREET("IS","a`x yar","ao peo")
oep oa
^P1STREET("IS","a`x yar","ao vai")
iav oa
^P1STREET("IS","a`x yar","ao yhg")
ghy oa
^P1STREET("IS","a`x yar","api `ex")
xe` ipa
^P1STREET("IS","a`x yar","api neyaim")
miayen ipa
^P1STREET("IS","a`x yar","api rio gxec")
cexg oir ipa
^P1STREET("IS","a`x yar","apinio")
oinipa
^P1STREET("IS","a`x yar","apinio ao `q`")
`q` oa oinipa
^P1STREET("IS","a`x yar","apinio nfx")
xfn oinipa
^P1STREET("IS","a`x yar","apinio nhecld")
dlcehn oinipa
^P1STREET("IS","a`x yar","aqwio")
oiwqa
^P1STREET("IS","a`x yar","arl dzeqtez")
zetqezd lra
^P1STREET("IS","a`x yar","avl`l")
l`lva
^P1STREET("IS","a`x yar","ax `ilo")
oli` xa
^P1STREET("IS","a`x yar","ax biex`")
`xeib xa
^P1STREET("IS","a`x yar","ax ieg`i")
i`gei xa
^P1STREET("IS","a`x yar","ax keka`")
`akek xa
^P1STREET("IS","a`x yar","ax la giim")
miig al xa
^P1STREET("IS","a`x yar","ax piqo")
oqip xa
^P1STREET("IS","a`x yar","axciv'a")
a'vicxa
^P1STREET("IS","a`x yar","axciv'aqwi nikd")
dkin iwqa'vicxa
^P1STREET("IS","a`x yar","axec nwq")
qwn cexa
^P1STREET("IS","a`x yar","axecixaqwi")
iwqaxicexa
^P1STREET("IS","a`x yar","axexid")
dixexa
^P1STREET("IS","a`x yar","axfili iyx`l")
l`xyi ilifxa
^P1STREET("IS","a`x yar","axiz kdepd")
dpedk zixa
^P1STREET("IS","a`x yar","axkd gaq")
qag dkxa
^P1STREET("IS","a`x yar","axpdxc edxno vepcw")
wcpev onxde cxdpxa
^P1STREET("IS","a`x yar","axpx")
xpxa
^P1STREET("IS","a`x yar","axw")
wxa
^P1STREET("IS","a`x yar","az yar")
ray za
^P1STREET("IS","a`x yar","b'efs `xlpbx")
xbplx` sfe'b
^P1STREET("IS","a`x yar","b'inq txpw")
wpxt qni'b
^P1STREET("IS","a`x yar","b`l`phi")
ihp`l`b
^P1STREET("IS","a`x yar","baix cpiq")
qipc xiab
^P1STREET("IS","a`x yar","barzi")
izrab
^P1STREET("IS","a`x yar","baxi`l")
l`ixab
^P1STREET("IS","a`x yar","baxide")
edixab
^P1STREET("IS","a`x yar","bc")
cb
^P1STREET("IS","a`x yar","bclide")
edilcb
^P1STREET("IS","a`x yar","beflo ieqs xt`l")
l`tx sqei olfeb
^P1STREET("IS","a`x yar","beihiio")
oiihieb
^P1STREET("IS","a`x yar","belcno pgem")
megp oncleb
^P1STREET("IS","a`x yar","belcyhiio")
oiihycleb
^P1STREET("IS","a`x yar","belena")
aneleb
^P1STREET("IS","a`x yar","belpi")
ipleb
^P1STREET("IS","a`x yar","bey rvieo")
oeivr yeb
^P1STREET("IS","a`x yar","bi`exb d`f")
f`d bxe`ib
^P1STREET("IS","a`x yar","biazeo gpej")
jepg oezaib
^P1STREET("IS","a`x yar","bixiz")
zixib
^P1STREET("IS","a`x yar","blfno")
onflb
^P1STREET("IS","a`x yar","blrc")
crlb
^P1STREET("IS","a`x yar","bnl")
lnb
^P1STREET("IS","a`x yar","bxipaeim ivgw")
wgvi mieapixb
^P1STREET("IS","a`x yar","bxiptlc")
cltpixb
^P1STREET("IS","a`x yar","bxipyto dxyl")
lyxd otypixb
^P1STREET("IS","a`x yar","bxu")
uxb
^P1STREET("IS","a`x yar","bxyeo")
oeyxb
^P1STREET("IS","a`x yar","bxyeo yetno")
ontey oeyxb
^P1STREET("IS","a`x yar","bxym ylem")
mely myxb
^P1STREET("IS","a`x yar","bz")
zb
^P1STREET("IS","a`x yar","ca bxepx")
xpexb ac
^P1STREET("IS","a`x yar","ca ieqs")
sqei ac
^P1STREET("IS","a`x yar","ca qco")
ocq ac
^P1STREET("IS","a`x yar","ca xep`l")
l`pex ac
^P1STREET("IS","a`x yar","caexd")
dxeac
^P1STREET("IS","a`x yar","caexd axeo")
oexa dxeac
^P1STREET("IS","a`x yar","caix")
xiac
^P1STREET("IS","a`x yar","cd deyi bi`exb")
bxe`ib iyed dc
^P1STREET("IS","a`x yar","ceapea")
aepaec
^P1STREET("IS","a`x yar","cec `lrfx")
xfrl` cec
^P1STREET("IS","a`x yar","cec `lxe`i")
i`exl` cec
^P1STREET("IS","a`x yar","cec `xpqh qineo")
oeniq hqpx` cec
^P1STREET("IS","a`x yar","cec bipvaexb")
bxeavpib cec
^P1STREET("IS","a`x yar","cec dnlj")
jlnd cec
^P1STREET("IS","a`x yar","cec dx`eapi")
ipae`xd cec
^P1STREET("IS","a`x yar","cec ilio")
oili cec
^P1STREET("IS","a`x yar","cec pia")
aip cec
^P1STREET("IS","a`x yar","cec tipwq")
qwpit cec
^P1STREET("IS","a`x yar","cec tleqx")
xqelt cec
^P1STREET("IS","a`x yar","cec txiyno")
onyixt cec
^P1STREET("IS","a`x yar","cec`im")
mi`cec
^P1STREET("IS","a`x yar","ceh `beo")
oeb` hec
^P1STREET("IS","a`x yar","cepwlalem")
melalwpec
^P1STREET("IS","a`x yar","cexi irwa")
awri ixec
^P1STREET("IS","a`x yar","cextno")
ontxec
^P1STREET("IS","a`x yar","cezo")
ozec
^P1STREET("IS","a`x yar","cipd")
dpic
^P1STREET("IS","a`x yar","cipex ao vieo")
oeiv oa xepic
^P1STREET("IS","a`x yar","co")
oc
^P1STREET("IS","a`x yar","cpey ao laxh")
hxal oa yepc
^P1STREET("IS","a`x yar","cpvibx")
xbivpc
^P1STREET("IS","a`x yar","cwl")
lwc
^P1STREET("IS","a`x yar","cwx")
xwc
^P1STREET("IS","a`x yar","cxao")
oaxc
^P1STREET("IS","a`x yar","cxei`pea `axdm")
mdxa` aep`iexc
^P1STREET("IS","a`x yar","cxj `aibcex `aihl")
lhia` xecbia` jxc
^P1STREET("IS","a`x yar","cxj `ilz")
zli` jxc
^P1STREET("IS","a`x yar","cxj b'e `leo ieqs")
sqei oel` e'b jxc
^P1STREET("IS","a`x yar","cxj dgxeyz")
zyexgd jxc
^P1STREET("IS","a`x yar","cxj dnl`kd")
dk`lnd jxc
^P1STREET("IS","a`x yar","cxj dnygxxim")
mixxgynd jxc
^P1STREET("IS","a`x yar","cxj dpyi`im")
mi`iypd jxc
^P1STREET("IS","a`x yar","cxj dx leu")
uel xd jxc
^P1STREET("IS","a`x yar","cxj gaxeo")
oexag jxc
^P1STREET("IS","a`x yar","cxj nvcd")
dcvn jxc
^P1STREET("IS","a`x yar","cxj rfd")
dfr jxc
^P1STREET("IS","a`x yar","cxj ynyeo")
oeyny jxc
^P1STREET("IS","a`x yar","d`aez")
zea`d
^P1STREET("IS","a`x yar","d`exbim")
mibxe`d
^P1STREET("IS","a`x yar","d`iqiim")
miiqi`d
^P1STREET("IS","a`x yar","d`nex`im")
mi`xen`d
^P1STREET("IS","a`x yar","dacil")
licad
^P1STREET("IS","a`x yar","daepim")
mipead
^P1STREET("IS","a`x yar","daexqw`i ieqi")
iqei i`wqxead
^P1STREET("IS","a`x yar","daxfl")
lfxad
^P1STREET("IS","a`x yar","db`elim")
mile`bd
^P1STREET("IS","a`x yar","db`epim")
mipe`bd
^P1STREET("IS","a`x yar","dbcecim")
micecbd
^P1STREET("IS","a`x yar","dbpo")
opbd
^P1STREET("IS","a`x yar","dbto")
otbd
^P1STREET("IS","a`x yar","dbx")
xbd
^P1STREET("IS","a`x yar","dcbo")
obcd
^P1STREET("IS","a`x yar","dcqd")
dqcd
^P1STREET("IS","a`x yar","dcrz")
zrcd
^P1STREET("IS","a`x yar","dcx")
xcd
^P1STREET("IS","a`x yar","ddbpd")
dpbdd
^P1STREET("IS","a`x yar","ddqzcxez")
zexczqdd
^P1STREET("IS","a`x yar","deaxno")
onxaed
^P1STREET("IS","a`x yar","dekaxb")
bxaked
^P1STREET("IS","a`x yar","dexwpeq")
qepwxed
^P1STREET("IS","a`x yar","deyr")
ryed
^P1STREET("IS","a`x yar","dfedx")
xdefd
^P1STREET("IS","a`x yar","dfexr")
rxefd
^P1STREET("IS","a`x yar","dgexy")
yxegd
^P1STREET("IS","a`x yar","dgic""`")
`"cigd
^P1STREET("IS","a`x yar","dgleu")
uelgd
^P1STREET("IS","a`x yar","dgxh")
hxgd
^P1STREET("IS","a`x yar","dgynep`im")
mi`penygd
^P1STREET("IS","a`x yar","dgynl`i")
i`lnygd
^P1STREET("IS","a`x yar","dhgpd")
dpghd
^P1STREET("IS","a`x yar","dievxim")
mixveid
^P1STREET("IS","a`x yar","diiltxio")
oixtliid
^P1STREET("IS","a`x yar","dkefxi")
ixfekd
^P1STREET("IS","a`x yar","dkezl dnrxai")
iaxrnd lzekd
^P1STREET("IS","a`x yar","dkpqz")
zqpkd
^P1STREET("IS","a`x yar","dkyxz diyea")
aeyid zxykd
^P1STREET("IS","a`x yar","dl""d")
d"ld
^P1STREET("IS","a`x yar","dlegm dideci ap`vim")
miv`pa icedid mgeld
^P1STREET("IS","a`x yar","dll dfwo")
owfd lld
^P1STREET("IS","a`x yar","dltxio")
oixtld
^P1STREET("IS","a`x yar","dncr")
rcnd
^P1STREET("IS","a`x yar","dnekzx")
xzkend
^P1STREET("IS","a`x yar","dneqkim")
mikqend
^P1STREET("IS","a`x yar","dnkaim")
miaknd
^P1STREET("IS","a`x yar","dnkep`i")
i`peknd
^P1STREET("IS","a`x yar","dnkzyim")
miyzknd
^P1STREET("IS","a`x yar","dnl`kd")
dk`lnd
^P1STREET("IS","a`x yar","dnlj `g`a")
a`g` jlnd
^P1STREET("IS","a`x yar","dnlj `q`")
`q` jlnd
^P1STREET("IS","a`x yar","dnlj gfwide")
ediwfg jlnd
^P1STREET("IS","a`x yar","dnlj i`yide")
ediy`i jlnd
^P1STREET("IS","a`x yar","dnlj ide`y")
y`edi jlnd
^P1STREET("IS","a`x yar","dnlj ideikio")
oikiedi jlnd
^P1STREET("IS","a`x yar","dnlj idexm")
mxedi jlnd
^P1STREET("IS","a`x yar","dnlj ideyth")
htyedi jlnd
^P1STREET("IS","a`x yar","dnlj refide")
edifer jlnd
^P1STREET("IS","a`x yar","dnlj vcwide")
ediwcv jlnd
^P1STREET("IS","a`x yar","dnlj y`el")
le`y jlnd
^P1STREET("IS","a`x yar","dnlj ylnd")
dnly jlnd
^P1STREET("IS","a`x yar","dnlkd vaid")
diav dklnd
^P1STREET("IS","a`x yar","dnlkim")
miklnd
^P1STREET("IS","a`x yar","dnpes")
sepnd
^P1STREET("IS","a`x yar","dnqbx")
xbqnd
^P1STREET("IS","a`x yar","dnqild")
dliqnd
^P1STREET("IS","a`x yar","dnrtilim")
militrnd
^P1STREET("IS","a`x yar","dnxc")
cxnd
^P1STREET("IS","a`x yar","dnxi draxi")
ixard ixnd
^P1STREET("IS","a`x yar","dnyw")
wynd
^P1STREET("IS","a`x yar","dpahim")
mihapd
^P1STREET("IS","a`x yar","dpai`im")
mi`iapd
^P1STREET("IS","a`x yar","dpbxim")
mixbpd
^P1STREET("IS","a`x yar","dpcia")
aicpd
^P1STREET("IS","a`x yar","dpehx")
xhepd
^P1STREET("IS","a`x yar","dpewm")
mwepd
^P1STREET("IS","a`x yar","dpgeyz")
zyegpd
^P1STREET("IS","a`x yar","dpgzim")
mizgpd
^P1STREET("IS","a`x yar","dptg")
gtpd
^P1STREET("IS","a`x yar","dpxi peitlc")
cltiep ixpd
^P1STREET("IS","a`x yar","dpxi wpcl")
lcpw ixpd
^P1STREET("IS","a`x yar","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","a`x yar","dpxwiq")
qiwxpd
^P1STREET("IS","a`x yar","dq")
qd
^P1STREET("IS","a`x yar","dqcp`")
`pcqd
^P1STREET("IS","a`x yar","dqelld")
dlleqd
^P1STREET("IS","a`x yar","dqetxim")
mixteqd
^P1STREET("IS","a`x yar","dr""l")
l"rd
^P1STREET("IS","a`x yar","drlid")
dilrd
^P1STREET("IS","a`x yar","drvn`ez")
ze`nvrd
^P1STREET("IS","a`x yar","drxim dz`enez")
zene`zd mixrd
^P1STREET("IS","a`x yar","dterlim")
milretd
^P1STREET("IS","a`x yar","dtgg")
ggtd
^P1STREET("IS","a`x yar","dtlcd")
dcltd
^P1STREET("IS","a`x yar","dtln""g")
g"nltd
^P1STREET("IS","a`x yar","dtlq")
qltd
^P1STREET("IS","a`x yar","dtxhifpim")
mipfihxtd
^P1STREET("IS","a`x yar","dvai")
iavd
^P1STREET("IS","a`x yar","dvciw nixeylim")
milyexin wicvd
^P1STREET("IS","a`x yar","dverx")
xrevd
^P1STREET("IS","a`x yar","dvpgpim")
mipgpvd
^P1STREET("IS","a`x yar","dvtixd")
dxitvd
^P1STREET("IS","a`x yar","dwevx")
xvewd
^P1STREET("IS","a`x yar","dwiyeo")
oeyiwd
^P1STREET("IS","a`x yar","dwp`im")
mi`pwd
^P1STREET("IS","a`x yar","dx aewx")
xwea xd
^P1STREET("IS","a`x yar","dx awr")
rwa xd
^P1STREET("IS","a`x yar","dx gxneo")
oenxg xd
^P1STREET("IS","a`x yar","dx kpro")
orpk xd
^P1STREET("IS","a`x yar","dx nixeo")
oexin xd
^P1STREET("IS","a`x yar","dx pq")
qp xd
^P1STREET("IS","a`x yar","dx recc")
ccer xd
^P1STREET("IS","a`x yar","dx rvneo")
oenvr xd
^P1STREET("IS","a`x yar","dx xneo")
oenx xd
^P1STREET("IS","a`x yar","dx zaex")
xeaz xd
^P1STREET("IS","a`x yar","dxa d`i b`eo")
oe`b i`d axd
^P1STREET("IS","a`x yar","dxa dxveb")
bevxd axd
^P1STREET("IS","a`x yar","dxa gi gaia")
aiag ig axd
^P1STREET("IS","a`x yar","dxa giim yeypd")
dpyey miig axd
^P1STREET("IS","a`x yar","dxa hp` ylnd")
dnly `ph axd
^P1STREET("IS","a`x yar","dxa igi` wt`g")
g`tw `igi axd
^P1STREET("IS","a`x yar","dxa npgm ba`i")
i`ab mgpn axd
^P1STREET("IS","a`x yar","dxa qilaxh `axdm")
mdxa` hxaliq axd
^P1STREET("IS","a`x yar","dxa qlph")
hplq axd
^P1STREET("IS","a`x yar","dxa reacid")
dicaer axd
^P1STREET("IS","a`x yar","dxa refi`l")
l`ifer axd
^P1STREET("IS","a`x yar","dxa ylnd rcpi")
ipcr dnly axd
^P1STREET("IS","a`x yar","dxa yxix` b`eo")
oe`b `xixy axd
^P1STREET("IS","a`x yar","dxaad")
daaxd
^P1STREET("IS","a`x yar","dxvl")
lvxd
^P1STREET("IS","a`x yar","dxwtz")
ztwxd
^P1STREET("IS","a`x yar","dxzj")
jzxd
^P1STREET("IS","a`x yar","dyahim")
mihayd
^P1STREET("IS","a`x yar","dyeewim")
miweeyd
^P1STREET("IS","a`x yar","dyenx")
xneyd
^P1STREET("IS","a`x yar","dylem")
melyd
^P1STREET("IS","a`x yar","dziaepim")
mipeaizd
^P1STREET("IS","a`x yar","dzlnec")
cenlzd
^P1STREET("IS","a`x yar","dzp`im")
mi`pzd
^P1STREET("IS","a`x yar","dzwed")
dewzd
^P1STREET("IS","a`x yar","eeltqeo cec")
cec oeqtlee
^P1STREET("IS","a`x yar","eihpaxb")
bxaphie
^P1STREET("IS","a`x yar","eilpx `xid")
dix` xplie
^P1STREET("IS","a`x yar","eipbiih")
hiibpie
^P1STREET("IS","a`x yar","eivno")
onvie
^P1STREET("IS","a`x yar","eizweo `ltxc")
cxtl` oewzie
^P1STREET("IS","a`x yar","eizwio")
oiwzie
^P1STREET("IS","a`x yar","ephexd eiwhex")
xehwie dxehpe
^P1STREET("IS","a`x yar","exaexb")
bxeaxe
^P1STREET("IS","a`x yar","exc")
cxe
^P1STREET("IS","a`x yar","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","a`x yar","f`a eipiw")
wipie a`f
^P1STREET("IS","a`x yar","faeleo")
oeleaf
^P1STREET("IS","a`x yar","filaxb")
bxalif
^P1STREET("IS","a`x yar","fipcx gncd evai")
iave dcng xcpif
^P1STREET("IS","a`x yar","fiqe")
eqif
^P1STREET("IS","a`x yar","fiqno")
onqif
^P1STREET("IS","a`x yar","fkxid")
dixkf
^P1STREET("IS","a`x yar","flno `xo")
ox` onlf
^P1STREET("IS","a`x yar","flno ewqno")
onqwe onlf
^P1STREET("IS","a`x yar","fltd")
dtlf
^P1STREET("IS","a`x yar","fnixd")
dxinf
^P1STREET("IS","a`x yar","fnpdes")
sedpnf
^P1STREET("IS","a`x yar","fpbeil iyx`l")
l`xyi liebpf
^P1STREET("IS","a`x yar","fxeaal")
laaexf
^P1STREET("IS","a`x yar","fxfix")
xifxf
^P1STREET("IS","a`x yar","g""o")
o"g
^P1STREET("IS","a`x yar","gavlz dpba")
abpd zlvag
^P1STREET("IS","a`x yar","gawew")
wewag
^P1STREET("IS","a`x yar","gbi")
ibg
^P1STREET("IS","a`x yar","gbld")
dlbg
^P1STREET("IS","a`x yar","ged")
deg
^P1STREET("IS","a`x yar","geez xm")
mx zeeg
^P1STREET("IS","a`x yar","gend enbcl")
lcbne dneg
^P1STREET("IS","a`x yar","getiz")
ziteg
^P1STREET("IS","a`x yar","gf""l")
l"fg
^P1STREET("IS","a`x yar","gfnd irwa")
awri dnfg
^P1STREET("IS","a`x yar","gfwide")
ediwfg
^P1STREET("IS","a`x yar","ghiad ynepd")
dpeny daihg
^P1STREET("IS","a`x yar","ghiaz dpba")
abpd zaihg
^P1STREET("IS","a`x yar","giaz vieo")
oeiv zaig
^P1STREET("IS","a`x yar","giim dff")
ffd miig
^P1STREET("IS","a`x yar","giim eixyeaqwi")
iwqaeyxie miig
^P1STREET("IS","a`x yar","giim igil")
ligi miig
^P1STREET("IS","a`x yar","giim lpc`e")
e`cpl miig
^P1STREET("IS","a`x yar","giim yia`")
`aiy miig
^P1STREET("IS","a`x yar","giim yixno")
onxiy miig
^P1STREET("IS","a`x yar","gil dpcqd")
dqcpd lig
^P1STREET("IS","a`x yar","gpd")
dpg
^P1STREET("IS","a`x yar","gpd qpy")
ypq dpg
^P1STREET("IS","a`x yar","gpd xeaip`")
`piaex dpg
^P1STREET("IS","a`x yar","gpej `law")
wal` jepg
^P1STREET("IS","a`x yar","gppi")
ippg
^P1STREET("IS","a`x yar","gqc`i ao ytxeh")
hexty oa i`cqg
^P1STREET("IS","a`x yar","gqicd")
dciqg
^P1STREET("IS","a`x yar","gva")
avg
^P1STREET("IS","a`x yar","gxceo")
oecxg
^P1STREET("IS","a`x yar","gxea")
aexg
^P1STREET("IS","a`x yar","gxviz")
zivxg
^P1STREET("IS","a`x yar","gyio")
oiyg
^P1STREET("IS","a`x yar","gzm qetx")
xteq mzg
^P1STREET("IS","a`x yar","h`ea vai")
iav ae`h
^P1STREET("IS","a`x yar","haiea iyx`l gi")
ig l`xyi aeiah
^P1STREET("IS","a`x yar","hapwio")
oiwpah
^P1STREET("IS","a`x yar","hcqwi")
iwqch
^P1STREET("IS","a`x yar","hea nyd")
dyn aeh
^P1STREET("IS","a`x yar","heai`q `qx")
xq` q`iaeh
^P1STREET("IS","a`x yar","helcpe")
epcleh
^P1STREET("IS","a`x yar","hienwio f`a")
a`f oiwneih
^P1STREET("IS","a`x yar","hl gxneo")
oenxg lh
^P1STREET("IS","a`x yar","hlneo irwa")
awri oenlh
^P1STREET("IS","a`x yar","hppaeiim")
miieapph
^P1STREET("IS","a`x yar","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","a`x yar","i""l txu")
uxt l"i
^P1STREET("IS","a`x yar","iael")
leai
^P1STREET("IS","a`x yar","ib`l `leo")
oel` l`bi
^P1STREET("IS","a`x yar","ic eym")
mye ci
^P1STREET("IS","a`x yar","ide`")
`edi
^P1STREET("IS","a`x yar","ide`y")
y`edi
^P1STREET("IS","a`x yar","idecd `lgxifi")
ifixgl` dcedi
^P1STREET("IS","a`x yar","idecd bex")
xeb dcedi
^P1STREET("IS","a`x yar","idecd cd aeheo")
oehea dc dcedi
^P1STREET("IS","a`x yar","idecd dlei")
ield dcedi
^P1STREET("IS","a`x yar","idecd dpgzem")
mezgpd dcedi
^P1STREET("IS","a`x yar","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","a`x yar","ideci qexid")
dixeq icedi
^P1STREET("IS","a`x yar","ideyer dvexs")
sxevd reyedi
^P1STREET("IS","a`x yar","ideyr ax dll")
lld xa ryedi
^P1STREET("IS","a`x yar","ideyr ax hea")
aeh xa ryedi
^P1STREET("IS","a`x yar","ideyr axhepea")
aepehxa ryedi
^P1STREET("IS","a`x yar","ideyr fnix")
xinf ryedi
^P1STREET("IS","a`x yar","ideyr tx`ex")
xe`xt ryedi
^P1STREET("IS","a`x yar","ie`l dyeth")
hteyd l`ei
^P1STREET("IS","a`x yar","ie`l xwg")
gwx l`ei
^P1STREET("IS","a`x yar","iegpo `dxepi")
ipexd` opgei
^P1STREET("IS","a`x yar","iegpo acx")
xca opgei
^P1STREET("IS","a`x yar","iegpo lipcx")
xcpil opgei
^P1STREET("IS","a`x yar","iehazd")
dzahei
^P1STREET("IS","a`x yar","iekac az nxim")
mixn za cakei
^P1STREET("IS","a`x yar","iepd")
dpei
^P1STREET("IS","a`x yar","ieqs")
sqei
^P1STREET("IS","a`x yar","ieqs ao cec")
cec oa sqei
^P1STREET("IS","a`x yar","ieqs aphe`iu")
ui`ehpa sqei
^P1STREET("IS","a`x yar","ieqs hxentlcex")
xecltnexh sqei
^P1STREET("IS","a`x yar","ieqs qxlio")
oilxq sqei
^P1STREET("IS","a`x yar","ieqs zwer")
rewz sqei
^P1STREET("IS","a`x yar","ieqthl")
lhtqei
^P1STREET("IS","a`x yar","iexci dqixd")
dxiqd icxei
^P1STREET("IS","a`x yar","igfw`l")
l`wfgi
^P1STREET("IS","a`x yar","igi`l cxfpx")
xpfxc l`igi
^P1STREET("IS","a`x yar","iiaio ideyr")
ryedi oiaii
^P1STREET("IS","a`x yar","ilio nex pzo")
ozp xen oili
^P1STREET("IS","a`x yar","iniz")
zini
^P1STREET("IS","a`x yar","iqnio")
oinqi
^P1STREET("IS","a`x yar","iqwi")
iwqi
^P1STREET("IS","a`x yar","irau")
uari
^P1STREET("IS","a`x yar","irwa `aipe")
epia` awri
^P1STREET("IS","a`x yar","irwa eiiq")
qiie awri
^P1STREET("IS","a`x yar","irwa gfo")
ofg awri
^P1STREET("IS","a`x yar","irwa kdo")
odk awri
^P1STREET("IS","a`x yar","irxd")
dxri
^P1STREET("IS","a`x yar","itd liia")
aiil dti
^P1STREET("IS","a`x yar","itzg dblrci")
icrlbd gzti
^P1STREET("IS","a`x yar","ivgw `aipe")
epia` wgvi
^P1STREET("IS","a`x yar","ivgw necri")
ircen wgvi
^P1STREET("IS","a`x yar","ivgw nik`lqeo")
oeql`kin wgvi
^P1STREET("IS","a`x yar","ivgw ycd")
dcy wgvi
^P1STREET("IS","a`x yar","ivgw yzl")
lzy wgvi
^P1STREET("IS","a`x yar","ivi`z `ixetd")
dtexi` z`ivi
^P1STREET("IS","a`x yar","ivwio")
oiwvi
^P1STREET("IS","a`x yar","ixige")
egixi
^P1STREET("IS","a`x yar","ixnide")
edinxi
^P1STREET("IS","a`x yar","ixwepi rneq")
qenr ipewxi
^P1STREET("IS","a`x yar","iynr`l")
l`rnyi
^P1STREET("IS","a`x yar","iyride")
ediryi
^P1STREET("IS","a`x yar","iyride fnix")
xinf ediryi
^P1STREET("IS","a`x yar","iyx`l `tyhiio")
oiihyt` l`xyi
^P1STREET("IS","a`x yar","iyx`l blili")
ililb l`xyi
^P1STREET("IS","a`x yar","iyx`l iyride")
ediryi l`xyi
^P1STREET("IS","a`x yar","iyx`l xewg")
gwex l`xyi
^P1STREET("IS","a`x yar","iyykx")
xkyyi
^P1STREET("IS","a`x yar","kkx `aix")
xia` xkk
^P1STREET("IS","a`x yar","kkx dbpim")
mipbd xkk
^P1STREET("IS","a`x yar","kkx dwpi")
ipwd xkk
^P1STREET("IS","a`x yar","kkx dwpifi")
ifipwd xkk
^P1STREET("IS","a`x yar","kkx npgm abio")
oiba mgpn xkk
^P1STREET("IS","a`x yar","kkx nreo")
oern xkk
^P1STREET("IS","a`x yar","kkx wtlo")
oltw xkk
^P1STREET("IS","a`x yar","kkx xgaim")
miagx xkk
^P1STREET("IS","a`x yar","klil dgexy")
yxegd lilk
^P1STREET("IS","a`x yar","klpiz")
ziplk
^P1STREET("IS","a`x yar","ktx dcxem")
mexcd xtk
^P1STREET("IS","a`x yar","kvplqeo")
oeqlpvk
^P1STREET("IS","a`x yar","kxnli")
ilnxk
^P1STREET("IS","a`x yar","l`d `npe")
epn` d`l
^P1STREET("IS","a`x yar","l`d belcaxb")
bxacleb d`l
^P1STREET("IS","a`x yar","la ceiceaiu")
uiaeciec al
^P1STREET("IS","a`x yar","laxi nxw")
wxn ixal
^P1STREET("IS","a`x yar","le`i twxc")
cxwt i`el
^P1STREET("IS","a`x yar","lei")
iel
^P1STREET("IS","a`x yar","leio witpiq")
qiptiw oiel
^P1STREET("IS","a`x yar","leivwi irwa")
awri iwviel
^P1STREET("IS","a`x yar","lel`iio")
oii`lel
^P1STREET("IS","a`x yar","lexi` vai")
iav `ixel
^P1STREET("IS","a`x yar","liypqwi ieqs")
sqei iwqpyil
^P1STREET("IS","a`x yar","lqwx txu")
uxt xwql
^P1STREET("IS","a`x yar","n`ix bxeqno")
onqexb xi`n
^P1STREET("IS","a`x yar","n`ix irxi")
ixri xi`n
^P1STREET("IS","a`x yar","n`ix pwx")
xwp xi`n
^P1STREET("IS","a`x yar","n`ix tiipyhiio")
oiihypiit xi`n
^P1STREET("IS","a`x yar","naehl")
lhean
^P1STREET("IS","a`x yar","navr `qs")
sq` rvan
^P1STREET("IS","a`x yar","navr axey")
yexa rvan
^P1STREET("IS","a`x yar","navr cpi")
ipc rvan
^P1STREET("IS","a`x yar","navr gexa")
axeg rvan
^P1STREET("IS","a`x yar","navr gixm")
mxig rvan
^P1STREET("IS","a`x yar","navr ie`a")
a`ei rvan
^P1STREET("IS","a`x yar","navr leh")
hel rvan
^P1STREET("IS","a`x yar","navr nyd")
dyn rvan
^P1STREET("IS","a`x yar","navr pgyeo")
oeygp rvan
^P1STREET("IS","a`x yar","navr reacd")
dcaer rvan
^P1STREET("IS","a`x yar","nbice")
ecibn
^P1STREET("IS","a`x yar","necirio")
oiricen
^P1STREET("IS","a`x yar","nei`l `lide")
edil` l`ien
^P1STREET("IS","a`x yar","nelke ylnd")
dnly eklen
^P1STREET("IS","a`x yar","nephitiexi")
ixeitihpen
^P1STREET("IS","a`x yar","nev`")
`ven
^P1STREET("IS","a`x yar","nexci dbih`ez")
ze`hibd icxen
^P1STREET("IS","a`x yar","nexid")
dixen
^P1STREET("IS","a`x yar","nfxgi `lide")
edil` igxfn
^P1STREET("IS","a`x yar","nik`l `ao `xi")
ix` oa` l`kin
^P1STREET("IS","a`x yar","nik`l fdxi")
ixdf l`kin
^P1STREET("IS","a`x yar","nik`l gfpi")
ipfg l`kin
^P1STREET("IS","a`x yar","nikd")
dkin
^P1STREET("IS","a`x yar","nikl")
lkin
^P1STREET("IS","a`x yar","nineo")
oenin
^P1STREET("IS","a`x yar","nipu")
upin
^P1STREET("IS","a`x yar","nkq aexo")
oxea qkn
^P1STREET("IS","a`x yar","nl`ki")
ik`ln
^P1STREET("IS","a`x yar","nnyiz")
ziynn
^P1STREET("IS","a`x yar","npcli nekx qtxim")
mixtq xken ilcpn
^P1STREET("IS","a`x yar","npclqeo")
oeqlcpn
^P1STREET("IS","a`x yar","npgm ao qxew")
wexq oa mgpn
^P1STREET("IS","a`x yar","npgm qaicex")
xeciaq mgpn
^P1STREET("IS","a`x yar","npgm wxeivx")
xviexw mgpn
^P1STREET("IS","a`x yar","npyd")
dypn
^P1STREET("IS","a`x yar","nrld rwxaim")
miaxwr dlrn
^P1STREET("IS","a`x yar","nwls nxcki")
ikcxn slwn
^P1STREET("IS","a`x yar","nxac dwqnim")
minqwd caxn
^P1STREET("IS","a`x yar","nxbelio `lirfx evild")
dlive xfril` oilebxn
^P1STREET("IS","a`x yar","nxcki `lwgi")
igwl` ikcxn
^P1STREET("IS","a`x yar","nxcki `xceo")
oecx` ikcxn
^P1STREET("IS","a`x yar","nxcki pnix")
xinp ikcxn
^P1STREET("IS","a`x yar","nxcki rli`y")
y`ilr ikcxn
^P1STREET("IS","a`x yar","nxhio aeax")
xaea oihxn
^P1STREET("IS","a`x yar","nxim dpai`d")
d`iapd mixn
^P1STREET("IS","a`x yar","nxim ilio yhwliq")
qilwhy oili mixn
^P1STREET("IS","a`x yar","nxkeq")
qekxn
^P1STREET("IS","a`x yar","nxkeq xipx")
xpix qekxn
^P1STREET("IS","a`x yar","nxkf dpba")
abpd fkxn
^P1STREET("IS","a`x yar","nxl`")
`lxn
^P1STREET("IS","a`x yar","nxw gqno")
onqg wxn
^P1STREET("IS","a`x yar","ny' xinlh `linlj")
jlnil` hlnix 'yn
^P1STREET("IS","a`x yar","nyd")
dyn
^P1STREET("IS","a`x yar","nyd ax`fpi")
ipf`xa dyn
^P1STREET("IS","a`x yar","nyd ciio")
oiic dyn
^P1STREET("IS","a`x yar","nyd eilpqwi")
iwqplie dyn
^P1STREET("IS","a`x yar","nyd geaa")
aaeg dyn
^P1STREET("IS","a`x yar","nyd ivgw")
wgvi dyn
^P1STREET("IS","a`x yar","nyd txiaq")
qaixt dyn
^P1STREET("IS","a`x yar","nyd wdixi")
ixidw dyn
^P1STREET("IS","a`x yar","nyrel `ibex hq")
qh xebi` leryn
^P1STREET("IS","a`x yar","nyrel aiz""x")
x"zia leryn
^P1STREET("IS","a`x yar","nyrel ao hea")
aeh oa leryn
^P1STREET("IS","a`x yar","nyrel b`exb")
bxe`b leryn
^P1STREET("IS","a`x yar","nyrel biareo")
oeraib leryn
^P1STREET("IS","a`x yar","nyrel cec vai tpwq")
qwpt iav cec leryn
^P1STREET("IS","a`x yar","nyrel dxbaim")
miabxd leryn
^P1STREET("IS","a`x yar","nyrel giim exhdiinx")
xniidhxe miig leryn
^P1STREET("IS","a`x yar","nyrel gtx")
xtg leryn
^P1STREET("IS","a`x yar","nyrel iectz")
ztcei leryn
^P1STREET("IS","a`x yar","nyrel ixaer")
reaxi leryn
^P1STREET("IS","a`x yar","nyrel nvtd")
dtvn leryn
^P1STREET("IS","a`x yar","nyrel pivpd")
dpvip leryn
^P1STREET("IS","a`x yar","nyrel qekez")
zekeq leryn
^P1STREET("IS","a`x yar","nyrel rwxeo")
oexwr leryn
^P1STREET("IS","a`x yar","nyrel t`el `icd")
dci` le`t leryn
^P1STREET("IS","a`x yar","nzzide")
edizzn
^P1STREET("IS","a`x yar","p`ez dkkx")
xkkd ze`p
^P1STREET("IS","a`x yar","p`ez ncax")
xacn ze`p
^P1STREET("IS","a`x yar","pbad")
dabp
^P1STREET("IS","a`x yar","pca")
acp
^P1STREET("IS","a`x yar","pdxim")
mixdp
^P1STREET("IS","a`x yar","pexc`e nwq")
qwn e`cxep
^P1STREET("IS","a`x yar","pexiz")
zixep
^P1STREET("IS","a`x yar","pgem")
megp
^P1STREET("IS","a`x yar","pgem behno")
onheb megp
^P1STREET("IS","a`x yar","pgem yxib")
bixy megp
^P1STREET("IS","a`x yar","pil""i")
i"lip
^P1STREET("IS","a`x yar","piqpno n`ix")
xi`n onpqip
^P1STREET("IS","a`x yar","pli fwy")
ywf ilp
^P1STREET("IS","a`x yar","prni")
inrp
^P1STREET("IS","a`x yar","ptg` ivgw")
wgvi `gtp
^P1STREET("IS","a`x yar","ptzli")
ilztp
^P1STREET("IS","a`x yar","ptzli hex qipi")
ipiq xeh ilztp
^P1STREET("IS","a`x yar","qaieo")
oeiaq
^P1STREET("IS","a`x yar","qell aepd")
dpea lleq
^P1STREET("IS","a`x yar","qewelea")
aeleweq
^P1STREET("IS","a`x yar","qhelx")
xlehq
^P1STREET("IS","a`x yar","qhxend")
dnexhq
^P1STREET("IS","a`x yar","qibleo")
oelbiq
^P1STREET("IS","a`x yar","qiito")
otiiq
^P1STREET("IS","a`x yar","qilno")
onliq
^P1STREET("IS","a`x yar","qipi")
ipiq
^P1STREET("IS","a`x yar","qlnd ivgw")
wgvi dnlq
^P1STREET("IS","a`x yar","qlriz")
zirlq
^P1STREET("IS","a`x yar","qnelipqwio txu")
uxt oiwqpilenq
^P1STREET("IS","a`x yar","qnhq")
qhnq
^P1STREET("IS","a`x yar","qnhz bxx")
xxb zhnq
^P1STREET("IS","a`x yar","qnhz dayex")
xeyad zhnq
^P1STREET("IS","a`x yar","qnhz dbicm")
mcibd zhnq
^P1STREET("IS","a`x yar","qnhz iepzo")
ozpei zhnq
^P1STREET("IS","a`x yar","qnhz navr idepzo")
ozpedi rvan zhnq
^P1STREET("IS","a`x yar","qnhz pgli`l")
l`ilgp zhnq
^P1STREET("IS","a`x yar","qnhz rxc")
cxr zhnq
^P1STREET("IS","a`x yar","qnhz vwlb")
blwv zhnq
^P1STREET("IS","a`x yar","qnhz wcy")
ycw zhnq
^P1STREET("IS","a`x yar","qnhz whexd")
dxehw zhnq
^P1STREET("IS","a`x yar","qnhz x`end")
dne`x zhnq
^P1STREET("IS","a`x yar","qnhz xticim")
micitx zhnq
^P1STREET("IS","a`x yar","qnilo xez")
zex olinq
^P1STREET("IS","a`x yar","qnilpqwi")
iwqplinq
^P1STREET("IS","a`x yar","qpdcxio")
oixcdpq
^P1STREET("IS","a`x yar","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","a`x yar","qxo ca")
ac oxq
^P1STREET("IS","a`x yar","qxp`")
`pxq
^P1STREET("IS","a`x yar","qzei nyd")
dyn iezq
^P1STREET("IS","a`x yar","qzepiz")
zipezq
^P1STREET("IS","a`x yar","racz")
zcar
^P1STREET("IS","a`x yar","reli dbxcem")
mecxbd iler
^P1STREET("IS","a`x yar","retxim")
mixter
^P1STREET("IS","a`x yar","rexa")
axer
^P1STREET("IS","a`x yar","rio bci")
icb oir
^P1STREET("IS","a`x yar","rio fiw")
wif oir
^P1STREET("IS","a`x yar","rke")
ekr
^P1STREET("IS","a`x yar","rneq cd ylih")
hily dc qenr
^P1STREET("IS","a`x yar","rnl")
lnr
^P1STREET("IS","a`x yar","rnxi")
ixnr
^P1STREET("IS","a`x yar","rxad")
daxr
^P1STREET("IS","a`x yar","ryd`l")
l`dyr
^P1STREET("IS","a`x yar","t`al")
la`t
^P1STREET("IS","a`x yar","t`el")
le`t
^P1STREET("IS","a`x yar","t`xo")
ox`t
^P1STREET("IS","a`x yar","teo deyi")
iyed oet
^P1STREET("IS","a`x yar","terd")
dret
^P1STREET("IS","a`x yar","terli apio")
oipa ilret
^P1STREET("IS","a`x yar","texz l`d")
d`l zxet
^P1STREET("IS","a`x yar","thxid")
dixht
^P1STREET("IS","a`x yar","tiipaxb `aylem")
melya` bxapiit
^P1STREET("IS","a`x yar","tiixaxb nxcki f`a")
a`f ikcxn bxaxiit
^P1STREET("IS","a`x yar","tikno")
onkit
^P1STREET("IS","a`x yar","tilcxno eildlm")
mldlie onxclit
^P1STREET("IS","a`x yar","tliwq")
qwilt
^P1STREET("IS","a`x yar","tpgq dgeva")
avegd qgpt
^P1STREET("IS","a`x yar","tpgq xefo")
ofex qgpt
^P1STREET("IS","a`x yar","tpipd")
dpipt
^P1STREET("IS","a`x yar","tqneo")
oenqt
^P1STREET("IS","a`x yar","twerd")
drewt
^P1STREET("IS","a`x yar","txeic")
ciext
^P1STREET("IS","a`x yar","txenwio")
oiwnext
^P1STREET("IS","a`x yar","txet `axdm axeex")
xeexa mdxa` text
^P1STREET("IS","a`x yar","txet' baxi`l hxw")
wxh l`ixab 'text
^P1STREET("IS","a`x yar","txet' f`a eilp`i")
i`plie a`f 'text
^P1STREET("IS","a`x yar","txet' giim baxide")
edixab miig 'text
^P1STREET("IS","a`x yar","txet' ieqs yhxo")
oxhy sqei 'text
^P1STREET("IS","a`x yar","txet' rli ciieiq")
qieiic ilr 'text
^P1STREET("IS","a`x yar","txhey rco")
ocr yehxt
^P1STREET("IS","a`x yar","txi gcy")
ycg ixt
^P1STREET("IS","a`x yar","txiu `laxh")
hxal` uixt
^P1STREET("IS","a`x yar","txpu `elpcexs")
sxecple` upxt
^P1STREET("IS","a`x yar","v'lpea igi`l")
l`igi aepl'v
^P1STREET("IS","a`x yar","vai qbl")
lbq iav
^P1STREET("IS","a`x yar","vaid eivgw")
wgvie diav
^P1STREET("IS","a`x yar","varepi")
iperav
^P1STREET("IS","a`x yar","vax")
xav
^P1STREET("IS","a`x yar","vcwide")
ediwcv
^P1STREET("IS","a`x yar","vio")
oiv
^P1STREET("IS","a`x yar","vitexd")
dxetiv
^P1STREET("IS","a`x yar","vtpid")
diptv
^P1STREET("IS","a`x yar","vtz")
ztv
^P1STREET("IS","a`x yar","wceyi abcc")
ccba iyecw
^P1STREET("IS","a`x yar","wceyi i`qi")
iq`i iyecw
^P1STREET("IS","a`x yar","wceyi qlepiwi")
iwipelq iyecw
^P1STREET("IS","a`x yar","wciy lef")
fel yicw
^P1STREET("IS","a`x yar","weapx `a`")
`a` xpaew
^P1STREET("IS","a`x yar","weitno")
ontiew
^P1STREET("IS","a`x yar","wex`")
`xew
^P1STREET("IS","a`x yar","wex` dcexez")
zexecd `xew
^P1STREET("IS","a`x yar","whipw` axej")
jexa `wpihw
^P1STREET("IS","a`x yar","wl`efpx ieqs")
sqei xpfe`lw
^P1STREET("IS","a`x yar","wliyx")
xyilw
^P1STREET("IS","a`x yar","wlno nbo")
obn onlw
^P1STREET("IS","a`x yar","wlyeo")
oeylw
^P1STREET("IS","a`x yar","wqxid")
dixqw
^P1STREET("IS","a`x yar","wtec")
cetw
^P1STREET("IS","a`x yar","wtxiqio")
oiqixtw
^P1STREET("IS","a`x yar","ww""l")
l"ww
^P1STREET("IS","a`x yar","wx`eq bxhxec")
cexhxb qe`xw
^P1STREET("IS","a`x yar","wxepno bxyeo")
oeyxb onpexw
^P1STREET("IS","a`x yar","wxew blrc")
crlb wexw
^P1STREET("IS","a`x yar","wxiizi")
iziixw
^P1STREET("IS","a`x yar","wxiz ideciz")
zicedi zixw
^P1STREET("IS","a`x yar","wxl phx")
xhp lxw
^P1STREET("IS","a`x yar","wxo diqec")
ceqid oxw
^P1STREET("IS","a`x yar","wy`pi `lirfx")
xfril` ip`yw
^P1STREET("IS","a`x yar","x`eao")
oae`x
^P1STREET("IS","a`x yar","x`eao dkh")
hkd oae`x
^P1STREET("IS","a`x yar","xai hxteo")
oetxh iax
^P1STREET("IS","a`x yar","xai n`ix")
xi`n iax
^P1STREET("IS","a`x yar","xai rwia`")
`aiwr iax
^P1STREET("IS","a`x yar","xai ynreo lai`")
`ial oerny iax
^P1STREET("IS","a`x yar","xao bnli`l")
l`ilnb oax
^P1STREET("IS","a`x yar","xape zm")
mz epax
^P1STREET("IS","a`x yar","xawd")
dwax
^P1STREET("IS","a`x yar","xeaw")
waex
^P1STREET("IS","a`x yar","xeaxh axpi")
ipxa hxaex
^P1STREET("IS","a`x yar","xecels n. alej")
jela .n slecex
^P1STREET("IS","a`x yar","xefpalem dxvl")
lvxd melapfex
^P1STREET("IS","a`x yar","xehpaxb")
bxaphex
^P1STREET("IS","a`x yar","xeqo `ltxc")
cxtl` oqex
^P1STREET("IS","a`x yar","xetio `xzex")
xezx` oitex
^P1STREET("IS","a`x yar","xez")
zex
^P1STREET("IS","a`x yar","xezm")
mzex
^P1STREET("IS","a`x yar","xfi`l")
l`ifx
^P1STREET("IS","a`x yar","xg' 1")
1 'gx
^P1STREET("IS","a`x yar","xg' 115")
115 'gx
^P1STREET("IS","a`x yar","xgaz `avo")
ova` zagx
^P1STREET("IS","a`x yar","xgaz `gfid")
difg` zagx
^P1STREET("IS","a`x yar","xgaz `lkqpcxepi")
ipexcpqkl` zagx
^P1STREET("IS","a`x yar","xgaz `nvid")
divn` zagx
^P1STREET("IS","a`x yar","xgaz bcreo")
oercb zagx
^P1STREET("IS","a`x yar","xgaz dblaer")
realbd zagx
^P1STREET("IS","a`x yar","xgaz dgetx")
xtegd zagx
^P1STREET("IS","a`x yar","xgaz dgiil")
liigd zagx
^P1STREET("IS","a`x yar","xgaz dx`""y")
y"`xd zagx
^P1STREET("IS","a`x yar","xgaz dx`l")
l`xd zagx
^P1STREET("IS","a`x yar","xgaz dxa wew")
wew axd zagx
^P1STREET("IS","a`x yar","xgaz dyl""d")
d"lyd zagx
^P1STREET("IS","a`x yar","xgaz giim ao rhx")
xhr oa miig zagx
^P1STREET("IS","a`x yar","xgaz go")
og zagx
^P1STREET("IS","a`x yar","xgaz gvex")
xevg zagx
^P1STREET("IS","a`x yar","xgaz haxid")
dixah zagx
^P1STREET("IS","a`x yar","xgaz iapd")
dpai zagx
^P1STREET("IS","a`x yar","xgaz ideci qexid")
dixeq icedi zagx
^P1STREET("IS","a`x yar","xgaz iezm")
mzei zagx
^P1STREET("IS","a`x yar","xgaz irl")
lri zagx
^P1STREET("IS","a`x yar","xgaz kgel lao")
oal legk zagx
^P1STREET("IS","a`x yar","xgaz lg""i")
i"gl zagx
^P1STREET("IS","a`x yar","xgaz lkiy")
yikl zagx
^P1STREET("IS","a`x yar","xgaz navr `xf")
fx` rvan zagx
^P1STREET("IS","a`x yar","xgaz navr axey")
yexa rvan zagx
^P1STREET("IS","a`x yar","xgaz navr iwa")
awi rvan zagx
^P1STREET("IS","a`x yar","xgaz navr wcm")
mcw rvan zagx
^P1STREET("IS","a`x yar","xgaz navr wilyeo")
oeyliw rvan zagx
^P1STREET("IS","a`x yar","xgaz nelcz")
zclen zagx
^P1STREET("IS","a`x yar","xgaz nileq")
qelin zagx
^P1STREET("IS","a`x yar","xgaz tli""m")
m"ilt zagx
^P1STREET("IS","a`x yar","xgaz vitexi")
ixetiv zagx
^P1STREET("IS","a`x yar","xgaz vtz")
ztv zagx
^P1STREET("IS","a`x yar","xgaz xc""w")
w"cx zagx
^P1STREET("IS","a`x yar","xgaz xn""`")
`"nx zagx
^P1STREET("IS","a`x yar","xgaz yihxiz")
zixhiy zagx
^P1STREET("IS","a`x yar","xgaz ylenvieo")
oeivnely zagx
^P1STREET("IS","a`x yar","xgaz ynbx dyeth")
hteyd xbny zagx
^P1STREET("IS","a`x yar","xgl `npe")
epn` lgx
^P1STREET("IS","a`x yar","xgl dnyexxz")
zxxeynd lgx
^P1STREET("IS","a`x yar","xiiq xt`l")
l`tx qiix
^P1STREET("IS","a`x yar","xiiw gaiad")
daiag wiix
^P1STREET("IS","a`x yar","xikxc yhiio")
oiihy cxkix
^P1STREET("IS","a`x yar","xipblalem")
melalbpix
^P1STREET("IS","a`x yar","xna""m")
m"anx
^P1STREET("IS","a`x yar","xna""o")
o"anx
^P1STREET("IS","a`x yar","xng""l")
l"gnx
^P1STREET("IS","a`x yar","xnh")
hnx
^P1STREET("IS","a`x yar","xnld")
dlnx
^P1STREET("IS","a`x yar","xpd w`qo")
oq`w dpx
^P1STREET("IS","a`x yar","xt`l wlv'wio")
oiw'vlw l`tx
^P1STREET("IS","a`x yar","xy""i")
i"yx
^P1STREET("IS","a`x yar","y""i rbpeo")
oepbr i"y
^P1STREET("IS","a`x yar","y`el `aibex")
xebia` le`y
^P1STREET("IS","a`x yar","y`el e`lide")
edil`e le`y
^P1STREET("IS","a`x yar","y`x iyea")
aeyi x`y
^P1STREET("IS","a`x yar","yafi")
ifay
^P1STREET("IS","a`x yar","yahd")
dhay
^P1STREET("IS","a`x yar","yc dk""b")
b"kd cy
^P1STREET("IS","a`x yar","yc' `a` `gin`ix")
xi`nig` `a` 'cy
^P1STREET("IS","a`x yar","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","a`x yar","yc' belcd n`ix")
xi`n dcleb 'cy
^P1STREET("IS","a`x yar","yc' cec heaide")
ediaeh cec 'cy
^P1STREET("IS","a`x yar","yc' iedpd f'aehipqwi")
iwqpihea'f dpdei 'cy
^P1STREET("IS","a`x yar","yc' irlim")
milri 'cy
^P1STREET("IS","a`x yar","yc' ivgw xbx")
xbx wgvi 'cy
^P1STREET("IS","a`x yar","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","a`x yar","yc' ptzli dxu `inax")
xani` uxd ilztp 'cy
^P1STREET("IS","a`x yar","yc' yf""x")
x"fy 'cy
^P1STREET("IS","a`x yar","yelniz")
zinley
^P1STREET("IS","a`x yar","yenxeo")
oexney
^P1STREET("IS","a`x yar","yerli ynyeo")
oeyny ilrey
^P1STREET("IS","a`x yar","yg""l")
l"gy
^P1STREET("IS","a`x yar","yhiipaxb idecd")
dcedi bxapiihy
^P1STREET("IS","a`x yar","yhxew")
wexhy
^P1STREET("IS","a`x yar","yhxo i`ix")
xi`i oxhy
^P1STREET("IS","a`x yar","yifs")
sfiy
^P1STREET("IS","a`x yar","yihd")
dhiy
^P1STREET("IS","a`x yar","yitx ivgw")
wgvi xtiy
^P1STREET("IS","a`x yar","ykm")
mky
^P1STREET("IS","a`x yar","ylem `y")
y` mely
^P1STREET("IS","a`x yar","ylem rlikm")
mkilr mely
^P1STREET("IS","a`x yar","ylepqwi")
iwqpely
^P1STREET("IS","a`x yar","yleyz dnvtim")
mitvnd zyely
^P1STREET("IS","a`x yar","ylie")
eily
^P1STREET("IS","a`x yar","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","a`x yar","ylnd bexo")
oxeb dnly
^P1STREET("IS","a`x yar","ylnd qwelqwi")
iwqlewq dnly
^P1STREET("IS","a`x yar","ylnd vai xo")
ox iav dnly
^P1STREET("IS","a`x yar","yn`i")
i`ny
^P1STREET("IS","a`x yar","yne`l")
l`eny
^P1STREET("IS","a`x yar","yne`l debe")
ebed l`eny
^P1STREET("IS","a`x yar","yne`l hnaexqwi")
iwqxeanh l`eny
^P1STREET("IS","a`x yar","yne`l qnaexqwi")
iwqxeanq l`eny
^P1STREET("IS","a`x yar","yne`l xecpqwi")
iwqpcex l`eny
^P1STREET("IS","a`x yar","yne`l znix")
xinz l`eny
^P1STREET("IS","a`x yar","yngd")
dgny
^P1STREET("IS","a`x yar","yngd `xlij")
jilx` dgny
^P1STREET("IS","a`x yar","yngepi `qs")
sq` ipegny
^P1STREET("IS","a`x yar","ynniz")
zinny
^P1STREET("IS","a`x yar","ynreo axptlc")
cltpxa oerny
^P1STREET("IS","a`x yar","ynreo tipwl")
lwpit oerny
^P1STREET("IS","a`x yar","ynrepi")
iperny
^P1STREET("IS","a`x yar","ynrid")
dirny
^P1STREET("IS","a`x yar","ynxide leio")
oiel edixny
^P1STREET("IS","a`x yar","ynyeo rnivex")
xevinr oeyny
^P1STREET("IS","a`x yar","ypepiz")
zipepy
^P1STREET("IS","a`x yar","ypi`ex")
xe`ipy
^P1STREET("IS","a`x yar","ypiicxeaiu n`ix")
xi`n uiaexciipy
^P1STREET("IS","a`x yar","yrx dbi`")
`ibd xry
^P1STREET("IS","a`x yar","ytix`")
`xity
^P1STREET("IS","a`x yar","ytxd")
dxty
^P1STREET("IS","a`x yar","ytxipvw")
wvpixty
^P1STREET("IS","a`x yar","yxb` `axnqeo")
oeqnxa` `bxy
^P1STREET("IS","a`x yar","yxd `npe")
epn` dxy
^P1STREET("IS","a`x yar","yxrai")
iarxy
^P1STREET("IS","a`x yar","yxwxw")
wxwxy
^P1STREET("IS","a`x yar","yxz nyd")
dyn zxy
^P1STREET("IS","a`x yar","yyz dinim")
minid zyy
^P1STREET("IS","a`x yar","zevxz d`xu")
ux`d zxvez
^P1STREET("IS","a`x yar","zexo ideyr")
ryedi oxez
^P1STREET("IS","a`x yar","zinpr")
rpniz
^P1STREET("IS","a`x yar","zl gi")
ig lz
^P1STREET("IS","a`x yar","zlnd ilio")
oili dnlz
^P1STREET("IS","a`x yar","znx")
xnz
^P1STREET("IS","a`x yar","ztef")
fetz
^P1STREET("IS","a`xez ivgw")
wgvi zex`a
^P1STREET("IS","a`xeziim")
miizex`a
^P1STREET("IS","a`xi")
ix`a
^P1STREET("IS","aeqzo dblil")
lilbd ozqea
^P1STREET("IS","aeqzo dblil","cxj dim")
mid jxc
^P1STREET("IS","aexbzd")
dzbxea
^P1STREET("IS","aexbzd","d`xf")
fx`d
^P1STREET("IS","aexbzd","d`xfim")
mifx`d
^P1STREET("IS","aexbzd","daxeyim")
miyexad
^P1STREET("IS","aexbzd","dbto")
otbd
^P1STREET("IS","aexbzd","dcqim")
miqcd
^P1STREET("IS","aexbzd","dcwl")
lwcd
^P1STREET("IS","aexbzd","ddcq")
qcdd
^P1STREET("IS","aexio")
oixea
^P1STREET("IS","aexwd")
dwxea
^P1STREET("IS","aexwio")
oiwxea
^P1STREET("IS","af`xid")
dix`fa
^P1STREET("IS","ahgd")
dgha
^P1STREET("IS","aia` lz")
zl `aia
^P1STREET("IS","aia` lz","oiit oe`l")
l`eo tiio
^P1STREET("IS","ailenxkf wpiez")
zeipw fkxnelia
^P1STREET("IS","ailenxkf wpiez","00")
00
^P1STREET("IS","aixid")
dixia
^P1STREET("IS","aixid","dcwlim")
milwcd
^P1STREET("IS","aixid","giim dcx")
xcd miig
^P1STREET("IS","aiz `enxio")
oixne` zia
^P1STREET("IS","aiz `exo")
oxe` zia
^P1STREET("IS","aiz `l")
l` zia
^P1STREET("IS","aiz `l","`xu gtu")
utg ux`
^P1STREET("IS","aiz `l","bxiiaqwi")
iwqaiixb
^P1STREET("IS","aiz `l","cxj dglevim")
mivelgd jxc
^P1STREET("IS","aiz `l","cxj yarz dnipim")
mipind zray jxc
^P1STREET("IS","aiz `l","dzgid")
digzd
^P1STREET("IS","aiz `l","gvx `cx")
xc` xvg
^P1STREET("IS","aiz `l","ni nxem")
mexn in
^P1STREET("IS","aiz `l","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","aiz `l","nrbli dx`i""d")
d"i`xd ilbrn
^P1STREET("IS","aiz `l","qetd")
dteq
^P1STREET("IS","aiz `l a'")
'a l` zia
^P1STREET("IS","aiz `l a'","aiz `l")
l` zia
^P1STREET("IS","aiz `lrfxi")
ixfrl` zia
^P1STREET("IS","aiz `lrfxi","dxineo")
oenixd
^P1STREET("IS","aiz `lrfxi","dz`pd")
dp`zd
^P1STREET("IS","aiz `lt`")
`tl` zia
^P1STREET("IS","aiz `xid")
dix` zia
^P1STREET("IS","aiz `xid","biqio")
oiqib
^P1STREET("IS","aiz `xid","dbto")
otbd
^P1STREET("IS","aiz `xid","dfiz")
zifd
^P1STREET("IS","aiz `xid","dvls")
slvd
^P1STREET("IS","aiz `xid","dywc")
cwyd
^P1STREET("IS","aiz `xid","dzryid")
diyrzd
^P1STREET("IS","aiz `xid","kxkem")
mekxk
^P1STREET("IS","aiz `xid","laepd")
dpeal
^P1STREET("IS","aiz `xid","lehm")
mhel
^P1STREET("IS","aiz `xid","piqpiz")
zipqip
^P1STREET("IS","aiz `xid","trnepiz")
zipenrt
^P1STREET("IS","aiz b'`ld")
dl`'b zia
^P1STREET("IS","aiz b'`ld","`lqdl")
ldql`
^P1STREET("IS","aiz b'o")
o'b zia
^P1STREET("IS","aiz beaxio")
oixaeb zia
^P1STREET("IS","aiz bn`l")
l`nb zia
^P1STREET("IS","aiz bnli`l")
l`ilnb zia
^P1STREET("IS","aiz bnli`l","dbto")
otbd
^P1STREET("IS","aiz bnli`l","dxineo")
oenixd
^P1STREET("IS","aiz bnli`l","dznx")
xnzd
^P1STREET("IS","aiz bo [iapi`l]")
(l`ipai) ob zia
^P1STREET("IS","aiz cbo")
obc zia
^P1STREET("IS","aiz cbo","`ixiq")
qixi`
^P1STREET("IS","aiz cbo","`lide ynix")
xiny edil`
^P1STREET("IS","aiz cbo","`xarz dnipim")
mipind zrax`
^P1STREET("IS","aiz cbo","d`ykeliz")
zileky`d
^P1STREET("IS","aiz cbo","d`zxeb")
bexz`d
^P1STREET("IS","aiz cbo","dapim")
mipad
^P1STREET("IS","aiz cbo","dbelo")
olebd
^P1STREET("IS","aiz cbo","dblil")
lilbd
^P1STREET("IS","aiz cbo","dbto")
otbd
^P1STREET("IS","aiz cbo","dceltio")
oitlecd
^P1STREET("IS","aiz cbo","dcq")
qcd
^P1STREET("IS","aiz cbo","dfiz")
zifd
^P1STREET("IS","aiz cbo","dgihd")
dhigd
^P1STREET("IS","aiz cbo","dgxneo")
oenxgd
^P1STREET("IS","aiz cbo","diqnio")
oinqid
^P1STREET("IS","aiz cbo","dklpiz")
ziplkd
^P1STREET("IS","aiz cbo","dkxnl")
lnxkd
^P1STREET("IS","aiz cbo","dnb")
bnd
^P1STREET("IS","aiz cbo","dpba")
abpd
^P1STREET("IS","aiz cbo","drvn`ez")
ze`nvrd
^P1STREET("IS","aiz cbo","drxad")
daxrd
^P1STREET("IS","aiz cbo","dxineo")
oenixd
^P1STREET("IS","aiz cbo","dxvl")
lvxd
^P1STREET("IS","aiz cbo","dxwtz")
ztwxd
^P1STREET("IS","aiz cbo","dyenxeo")
oexneyd
^P1STREET("IS","aiz cbo","dyrexd")
dxeryd
^P1STREET("IS","aiz cbo","dytld")
dltyd
^P1STREET("IS","aiz cbo","dyxeo")
oexyd
^P1STREET("IS","aiz cbo","dz`pd")
dp`zd
^P1STREET("IS","aiz cbo","dznx")
xnzd
^P1STREET("IS","aiz cbo","dztef")
fetzd
^P1STREET("IS","aiz cbo","exc")
cxe
^P1STREET("IS","aiz cbo","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","aiz cbo","hxentlcex")
xecltnexh
^P1STREET("IS","aiz cbo","kvplqeo")
oeqlpvk
^P1STREET("IS","aiz cbo","lilj")
jlil
^P1STREET("IS","aiz cbo","npgm abio")
oiba mgpn
^P1STREET("IS","aiz cbo","qaieo")
oeiaq
^P1STREET("IS","aiz cbo","vd""l")
l"dv
^P1STREET("IS","aiz cbo","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","aiz cbo","wtlo")
oltw
^P1STREET("IS","aiz cbo","ww""l")
l"ww
^P1STREET("IS","aiz cbo","xna""m")
m"anx
^P1STREET("IS","aiz cbo","xnf")
fnx
^P1STREET("IS","aiz cbo","yafi")
ifay
^P1STREET("IS","aiz dbci")
icbd zia
^P1STREET("IS","aiz dlei")
ield zia
^P1STREET("IS","aiz dll")
lld zia
^P1STREET("IS","aiz drnw")
wnrd zia
^P1STREET("IS","aiz dyihd")
dhiyd zia
^P1STREET("IS","aiz fiic")
ciif zia
^P1STREET("IS","aiz fiz")
zif zia
^P1STREET("IS","aiz fiz","cxj rio kxm")
mxk oir jxc
^P1STREET("IS","aiz fiz","nrld dyihd")
dhiyd dlrn
^P1STREET("IS","aiz fiz","pzia `expim")
mipxe` aizp
^P1STREET("IS","aiz fxr")
rxf zia
^P1STREET("IS","aiz gpipd")
dpipg zia
^P1STREET("IS","aiz gpipd","`ae dexiixd")
dxiixed ea`
^P1STREET("IS","aiz gpipd","`gnc `l qtci")
ictq l` cng`
^P1STREET("IS","aiz gpo")
opg zia
^P1STREET("IS","aiz gppid")
dippg zia
^P1STREET("IS","aiz gppid","cxj dim")
mid jxc
^P1STREET("IS","aiz gppid","cxj dkxnl")
lnxkd jxc
^P1STREET("IS","aiz gxez")
zexg zia
^P1STREET("IS","aiz gxez",3)
3
^P1STREET("IS","aiz gxez","cxj dim")
mid jxc
^P1STREET("IS","aiz gxez","d`bef")
feb`d
^P1STREET("IS","aiz gxez","d`exo")
oxe`d
^P1STREET("IS","aiz gxez","dncbxd")
dxbcnd
^P1STREET("IS","aiz gxez","dx`yepim")
mipey`xd
^P1STREET("IS","aiz gxez","yepiz")
zipey
^P1STREET("IS","aiz gynep`i")
i`penyg zia
^P1STREET("IS","aiz gynep`i","davix")
xivad
^P1STREET("IS","aiz gynep`i","navr idepzo")
ozpedi rvan
^P1STREET("IS","aiz ideyr")
ryedi zia
^P1STREET("IS","aiz ideyr","dbto")
otbd
^P1STREET("IS","aiz ideyr","dzklz")
zlkzd
^P1STREET("IS","aiz ideyr","dznx")
xnzd
^P1STREET("IS","aiz ideyr","idlem")
meldi
^P1STREET("IS","aiz ideyr","ypi")
ipy
^P1STREET("IS","aiz ieqs")
sqei zia
^P1STREET("IS","aiz ip`i")
i`pi zia
^P1STREET("IS","aiz ip`i","dim")
mid
^P1STREET("IS","aiz ip`i","dvew")
wevd
^P1STREET("IS","aiz ip`i","px dlild")
dlild xp
^P1STREET("IS","aiz ivgw-yrx gtx")
xtg xry-wgvi zia
^P1STREET("IS","aiz ivgw-yrx gtx","cxj d`ilpez")
zepli`d jxc
^P1STREET("IS","aiz ivgw-yrx gtx","cxj dycez")
zecyd jxc
^P1STREET("IS","aiz ivgw-yrx gtx","cxj dyxeo")
oexyd jxc
^P1STREET("IS","aiz ivgw-yrx gtx","cxj gtx")
xtg jxc
^P1STREET("IS","aiz ivgw-yrx gtx","daeqzo")
ozqead
^P1STREET("IS","aiz ivgw-yrx gtx","ddcxim")
mixcdd
^P1STREET("IS","aiz ivgw-yrx gtx","dexcim")
micxed
^P1STREET("IS","aiz ivgw-yrx gtx","dgva")
avgd
^P1STREET("IS","aiz ivgw-yrx gtx","dklpiz")
ziplkd
^P1STREET("IS","aiz ivgw-yrx gtx","dpxwiq")
qiwxpd
^P1STREET("IS","aiz ivgw-yrx gtx","drlid")
dilrd
^P1STREET("IS","aiz ivgw-yrx gtx","dx`yepim")
mipey`xd
^P1STREET("IS","aiz ivgw-yrx gtx","dycez")
zecyd
^P1STREET("IS","aiz ivgw-yrx gtx","dznxim")
mixnzd
^P1STREET("IS","aiz ivgw-yrx gtx","xgaz dapim")
mipad zagx
^P1STREET("IS","aiz izix")
xizi zia
^P1STREET("IS","aiz izix","eivno")
onvie
^P1STREET("IS","aiz lgm")
mgl zia
^P1STREET("IS","aiz lgm","`l pb'nd")
dn'bp l`
^P1STREET("IS","aiz lgm dbliliz")
zililbd mgl zia
^P1STREET("IS","aiz lgm dbliliz","cxj `xu")
ux` jxc
^P1STREET("IS","aiz n`ix")
xi`n zia
^P1STREET("IS","aiz pgnid")
dingp zia
^P1STREET("IS","aiz pix")
xip zia
^P1STREET("IS","aiz pwetd")
dtewp zia
^P1STREET("IS","aiz pwetd","daxey")
yexad
^P1STREET("IS","aiz pwetd","yail dlelim")
mileld liay
^P1STREET("IS","aiz reac")
caer zia
^P1STREET("IS","aiz refi`l")
l`ifer zia
^P1STREET("IS","aiz rfx`")
`xfr zia
^P1STREET("IS","aiz rxis")
sixr zia
^P1STREET("IS","aiz vai")
iav zia
^P1STREET("IS","aiz wnd")
dnw zia
^P1STREET("IS","aiz wyz")
zyw zia
^P1STREET("IS","aiz y`o")
o`y zia
^P1STREET("IS","aiz y`o","`aiho ideyr")
ryedi ohia`
^P1STREET("IS","aiz y`o","`daz vieo")
oeiv zad`
^P1STREET("IS","aiz y`o","`gc drm")
mrd cg`
^P1STREET("IS","aiz y`o","`li kdo")
odk il`
^P1STREET("IS","aiz y`o","`pcxii lley")
yell iixcp`
^P1STREET("IS","aiz y`o","`yzexi dtxgi")
igxtd ixezy`
^P1STREET("IS","aiz y`o","aei`x")
x`iea
^P1STREET("IS","aiz y`o","aexekea")
aekexea
^P1STREET("IS","aiz y`o","ai`liw")
wil`ia
^P1STREET("IS","aiz y`o","altex")
xetla
^P1STREET("IS","aiz y`o","ao bexieo")
oeixeb oa
^P1STREET("IS","aiz y`o","ao idecd")
dcedi oa
^P1STREET("IS","aiz y`o","apd aizj")
jzia dpa
^P1STREET("IS","aiz y`o","ax keka`")
`akek xa
^P1STREET("IS","aiz y`o","belena")
aneleb
^P1STREET("IS","aiz y`o","bexceo")
oecxeb
^P1STREET("IS","aiz y`o","biex`")
`xeib
^P1STREET("IS","aiz y`o","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","aiz y`o","cwl")
lwc
^P1STREET("IS","aiz y`o","d`qis")
siq`d
^P1STREET("IS","aiz y`o","d`xard")
drax`d
^P1STREET("IS","aiz y`o","daepim")
mipead
^P1STREET("IS","aiz y`o","dbiaexim")
mixeaibd
^P1STREET("IS","aiz y`o","dblaer")
realbd
^P1STREET("IS","aiz y`o","dblil")
lilbd
^P1STREET("IS","aiz y`o","ddqzcxez")
zexczqdd
^P1STREET("IS","aiz y`o","dglevim")
mivelgd
^P1STREET("IS","aiz y`o","dglniy")
yinlgd
^P1STREET("IS","aiz y`o","dneqkim")
mikqend
^P1STREET("IS","aiz y`o","dnrtilim")
militrnd
^P1STREET("IS","aiz y`o","dpba")
abpd
^P1STREET("IS","aiz y`o","draecd")
dceard
^P1STREET("IS","aiz y`o","drnw")
wnrd
^P1STREET("IS","aiz y`o","dtizeg")
gezitd
^P1STREET("IS","aiz y`o","dvpgpim")
mipgpvd
^P1STREET("IS","aiz y`o","dxa ivgw wew")
wew wgvi axd
^P1STREET("IS","aiz y`o","dxen`im")
mi`nexd
^P1STREET("IS","aiz y`o","dxet`im")
mi`texd
^P1STREET("IS","aiz y`o","dxnam")
manxd
^P1STREET("IS","aiz y`o","dxveb")
bevxd
^P1STREET("IS","aiz y`o","dxvl")
lvxd
^P1STREET("IS","aiz y`o","dyeewim")
miweeyd
^P1STREET("IS","aiz y`o","dyenxim")
mixneyd
^P1STREET("IS","aiz y`o","dygxex")
xexgyd
^P1STREET("IS","aiz y`o","dzenx")
xnezd
^P1STREET("IS","aiz y`o","dznx")
xnzd
^P1STREET("IS","aiz y`o","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","aiz y`o","giqkeo")
oekqig
^P1STREET("IS","aiz y`o","gpd qpy")
ypq dpg
^P1STREET("IS","aiz y`o","helicpe")
epcileh
^P1STREET("IS","aiz y`o","hxentlcex")
xecltnexh
^P1STREET("IS","aiz y`o","ib`l icio")
oici l`bi
^P1STREET("IS","aiz y`o","ieqs axpx")
xpxa sqei
^P1STREET("IS","aiz y`o","ieqthl")
lhtqei
^P1STREET("IS","aiz y`o","ivgw yny")
yny wgvi
^P1STREET("IS","aiz y`o","ixeylim daixd")
dxiad milyexi
^P1STREET("IS","aiz y`o","kkx drvn`ez")
ze`nvrd xkk
^P1STREET("IS","aiz y`o","kpqz iyx`l")
l`xyi zqpk
^P1STREET("IS","aiz y`o","kpxz")
zxpk
^P1STREET("IS","aiz y`o","nedliax")
xailden
^P1STREET("IS","aiz y`o","nifeb bleiez")
zeielb befin
^P1STREET("IS","aiz y`o","nineo dxa")
axd oenin
^P1STREET("IS","aiz y`o","nxkeq cec")
cec qekxn
^P1STREET("IS","aiz y`o","nxweq irwa")
awri qewxn
^P1STREET("IS","aiz y`o","nyd ciio")
oiic dyn
^P1STREET("IS","aiz y`o","nynx dbael")
leabd xnyn
^P1STREET("IS","aiz y`o","pes blaer")
realb sep
^P1STREET("IS","aiz y`o","pes blrc")
crlb sep
^P1STREET("IS","aiz y`o","pes dblrc")
crlbd sep
^P1STREET("IS","aiz y`o","pexc`e")
e`cxep
^P1STREET("IS","aiz y`o","pexiz")
zixep
^P1STREET("IS","aiz y`o","qhxend")
dnexhq
^P1STREET("IS","aiz y`o","rlid")
dilr
^P1STREET("IS","aiz y`o","vtvtd")
dtvtv
^P1STREET("IS","aiz y`o","wew")
wew
^P1STREET("IS","aiz y`o","wtlo")
oltw
^P1STREET("IS","aiz y`o","xai n`ix arl dpq")
qpd lra xi`n iax
^P1STREET("IS","aiz y`o","xebeaqwi")
iwqaebex
^P1STREET("IS","aiz y`o","xetio")
oitex
^P1STREET("IS","aiz y`o","xg `")
` gx
^P1STREET("IS","aiz y`o","xg c")
c gx
^P1STREET("IS","aiz y`o","xg d")
d gx
^P1STREET("IS","aiz y`o","xg f")
f gx
^P1STREET("IS","aiz y`o","xg g")
g gx
^P1STREET("IS","aiz y`o","xg h")
h gx
^P1STREET("IS","aiz y`o","xg' 21")
21 'gx
^P1STREET("IS","aiz y`o","xnf")
fnx
^P1STREET("IS","aiz y`o","y vx `cenim")
minec` xv y
^P1STREET("IS","aiz y`o","y`el dnlj")
jlnd le`y
^P1STREET("IS","aiz y`o","yc' npgm abio")
oiba mgpn 'cy
^P1STREET("IS","aiz y`o","yhexno")
onxehy
^P1STREET("IS","aiz y`o","yk' hixz vai")
iav zxih 'ky
^P1STREET("IS","aiz y`o","ynyeo")
oeyny
^P1STREET("IS","aiz y`o","ytxipvw")
wvpixty
^P1STREET("IS","aiz y`o","ywc")
cwy
^P1STREET("IS","aiz y`o","yxz")
zxy
^P1STREET("IS","aiz y`o","zl z`enim")
mine`z lz
^P1STREET("IS","aiz yny")
yny zia
^P1STREET("IS","aiz yny","`aihl")
lhia`
^P1STREET("IS","aiz yny","`cm iwezi`l")
l`izewi mc`
^P1STREET("IS","aiz yny","`ex giim")
miig xe`
^P1STREET("IS","aiz yny","`ex yng")
gny xe`
^P1STREET("IS","aiz yny","`exhl")
lhxe`
^P1STREET("IS","aiz yny","`gi rfx")
xfr ig`
^P1STREET("IS","aiz yny","`laxh npclx")
xlcpn hxal`
^P1STREET("IS","aiz yny","`likio")
oikil`
^P1STREET("IS","aiz yny","`nxi `nz")
zn` ixn`
^P1STREET("IS","aiz yny","`xid leio")
oiel dix`
^P1STREET("IS","aiz yny","`xlefexea")
aexefelx`
^P1STREET("IS","aiz yny","`yx")
xy`
^P1STREET("IS","aiz yny","ai`liw")
wil`ia
^P1STREET("IS","aiz yny","aiz iyx`l")
l`xyi zia
^P1STREET("IS","aiz yny","ao `lirfx")
xfril` oa
^P1STREET("IS","aiz yny","ao bx`")
`xb oa
^P1STREET("IS","aiz yny","ao rf`i")
i`fr oa
^P1STREET("IS","aiz yny","ao vai")
iav oa
^P1STREET("IS","aiz yny","api co")
oc ipa
^P1STREET("IS","aiz yny","ax `ilo")
oli` xa
^P1STREET("IS","aiz yny","axiqw")
wqixa
^P1STREET("IS","aiz yny","axkz `axdm")
mdxa` zkxa
^P1STREET("IS","aiz yny","bc")
cb
^P1STREET("IS","aiz yny","bex `xid")
dix` xeb
^P1STREET("IS","aiz yny","bipiu")
uipib
^P1STREET("IS","aiz yny","blrc")
crlb
^P1STREET("IS","aiz yny","bpi yny")
yny ipb
^P1STREET("IS","aiz yny","ceacao")
oacaec
^P1STREET("IS","aiz yny","cec xfi`l")
l`ifx cec
^P1STREET("IS","aiz yny","clid")
dilc
^P1STREET("IS","aiz yny","cm dnkaim")
miaknd mc
^P1STREET("IS","aiz yny","co lpx")
xpl oc
^P1STREET("IS","aiz yny","cxj dgiim")
miigd jxc
^P1STREET("IS","aiz yny","cxj ivgw xaio")
oiax wgvi jxc
^P1STREET("IS","aiz yny","d`eno")
one`d
^P1STREET("IS","aiz yny","d`exo")
oxe`d
^P1STREET("IS","aiz yny","d`ixiq")
qixi`d
^P1STREET("IS","aiz yny","d`ld")
dl`d
^P1STREET("IS","aiz yny","d`vl")
lv`d
^P1STREET("IS","aiz yny","d`xal")
lax`d
^P1STREET("IS","aiz yny","d`xf")
fx`d
^P1STREET("IS","aiz yny","d`xfim")
mifx`d
^P1STREET("IS","aiz yny","d`zxeb")
bexz`d
^P1STREET("IS","aiz yny","dap`i")
i`pad
^P1STREET("IS","aiz yny","daxey")
yexad
^P1STREET("IS","aiz yny","dbelo")
olebd
^P1STREET("IS","aiz yny","dblil")
lilbd
^P1STREET("IS","aiz yny","dbto")
otbd
^P1STREET("IS","aiz yny","dcwl")
lwcd
^P1STREET("IS","aiz yny","ddbpd")
dpbdd
^P1STREET("IS","aiz yny","ddcq")
qcdd
^P1STREET("IS","aiz yny","ddcx")
xcdd
^P1STREET("IS","aiz yny","ddkyxd")
dxykdd
^P1STREET("IS","aiz yny","deziwim")
miwized
^P1STREET("IS","aiz yny","dglevim")
mivelgd
^P1STREET("IS","aiz yny","dgva")
avgd
^P1STREET("IS","aiz yny","dgxneo")
oenxgd
^P1STREET("IS","aiz yny","dgxviz")
zivxgd
^P1STREET("IS","aiz yny","dgxy")
yxgd
^P1STREET("IS","aiz yny","diqnio")
oinqid
^P1STREET("IS","aiz yny","divixd")
dxivid
^P1STREET("IS","aiz yny","dll")
lld
^P1STREET("IS","aiz yny","dndxi""l ciqwio")
oiwqic l"ixdnd
^P1STREET("IS","aiz yny","dnkzy")
yzknd
^P1STREET("IS","aiz yny","dnl`kd")
dk`lnd
^P1STREET("IS","aiz yny","dnqbx")
xbqnd
^P1STREET("IS","aiz yny","dnrtilim")
militrnd
^P1STREET("IS","aiz yny","dnylh")
hlynd
^P1STREET("IS","aiz yny","dpexiz")
zixepd
^P1STREET("IS","aiz yny","dpxwiq")
qiwxpd
^P1STREET("IS","aiz yny","dpyi`")
`iypd
^P1STREET("IS","aiz yny","dqaieo")
oeiaqd
^P1STREET("IS","aiz yny","dqelld")
dlleqd
^P1STREET("IS","aiz yny","dqibliz")
zilbiqd
^P1STREET("IS","aiz yny","drlid")
dilrd
^P1STREET("IS","aiz yny","drnl")
lnrd
^P1STREET("IS","aiz yny","drvn`ez")
ze`nvrd
^P1STREET("IS","aiz yny","drxad")
daxrd
^P1STREET("IS","aiz yny","drxneo")
oenxrd
^P1STREET("IS","aiz yny","dv`ld")
dl`vd
^P1STREET("IS","aiz yny","dvari")
iravd
^P1STREET("IS","aiz yny","dvitexo")
oxetivd
^P1STREET("IS","aiz yny","dx dnexid")
dixend xd
^P1STREET("IS","aiz yny","dx nixeo")
oexin xd
^P1STREET("IS","aiz yny","dx pae")
eap xd
^P1STREET("IS","aiz yny","dxa iegpo ao fk`i")
i`kf oa opgei axd
^P1STREET("IS","aiz yny","dxa ieqs aeqwild")
dliwqea sqei axd
^P1STREET("IS","aiz yny","dxa naxiqw")
wqixan axd
^P1STREET("IS","aiz yny","dxhea")
aehxd
^P1STREET("IS","aiz yny","dxvl")
lvxd
^P1STREET("IS","aiz yny","dxwtz")
ztwxd
^P1STREET("IS","aiz yny","dyard")
drayd
^P1STREET("IS","aiz yny","dyeyo")
oyeyd
^P1STREET("IS","aiz yny","dyifs")
sfiyd
^P1STREET("IS","aiz yny","dyihd")
dhiyd
^P1STREET("IS","aiz yny","dz`pd")
dp`zd
^P1STREET("IS","aiz yny","dz`yex")
xey`zd
^P1STREET("IS","aiz yny","dzaex")
xeazd
^P1STREET("IS","aiz yny","dzryid")
diyrzd
^P1STREET("IS","aiz yny","dzteg")
getzd
^P1STREET("IS","aiz yny","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","aiz yny","fkxeo irwa")
awri oexkf
^P1STREET("IS","aiz yny","gavlz")
zlvag
^P1STREET("IS","aiz yny","gfeo `iy")
yi` oefg
^P1STREET("IS","aiz yny","ghiaz dx`l")
l`xd zaihg
^P1STREET("IS","aiz yny","giim dlei")
ield miig
^P1STREET("IS","aiz yny","giim lqwea")
aewql miig
^P1STREET("IS","aiz yny","gtu giim")
miig utg
^P1STREET("IS","aiz yny","ib`l icio")
oici l`bi
^P1STREET("IS","aiz yny","idecd dnkai")
iaknd dcedi
^P1STREET("IS","aiz yny","irwa cexi")
ixec awri
^P1STREET("IS","aiz yny","ivgw ycd")
dcy wgvi
^P1STREET("IS","aiz yny","ivgw yny")
yny wgvi
^P1STREET("IS","aiz yny","iyi")
iyi
^P1STREET("IS","aiz yny","kkx peino")
oniep xkk
^P1STREET("IS","aiz yny","klpiz")
ziplk
^P1STREET("IS","aiz yny","la yngd")
dgny al
^P1STREET("IS","aiz yny","lei `ykel")
leky` iel
^P1STREET("IS","aiz yny","nexci dbih`ez")
ze`hibd icxen
^P1STREET("IS","aiz yny","nexi irwa")
awri ixen
^P1STREET("IS","aiz yny","nihl")
lhin
^P1STREET("IS","aiz yny","npeg")
gepn
^P1STREET("IS","aiz yny","npgz ivgw")
wgvi zgpn
^P1STREET("IS","aiz yny","nqilz vieo")
oeiv zliqn
^P1STREET("IS","aiz yny","nrld cec")
cec dlrn
^P1STREET("IS","aiz yny","nrld dqiixim")
mixiiqd dlrn
^P1STREET("IS","aiz yny","nrld dvetim")
mitevd dlrn
^P1STREET("IS","aiz yny","nrld i`ix")
xi`i dlrn
^P1STREET("IS","aiz yny","nrtili `bef")
feb` ilitrn
^P1STREET("IS","aiz yny","nryi igii`")
`iigi iyrn
^P1STREET("IS","aiz yny","nvcd")
dcvn
^P1STREET("IS","aiz yny","nxcki nwls")
slwn ikcxn
^P1STREET("IS","aiz yny","ny' nvtd")
dtvn 'yn
^P1STREET("IS","aiz yny","pdx dixweo")
oewxid xdp
^P1STREET("IS","aiz yny","ped qtix")
xitq dep
^P1STREET("IS","aiz yny","peti dcx")
xcd itep
^P1STREET("IS","aiz yny","pgl `exid")
dixe` lgp
^P1STREET("IS","aiz yny","pgl `iileo")
oelii` lgp
^P1STREET("IS","aiz yny","pgl bild")
dlib lgp
^P1STREET("IS","aiz yny","pgl cela")
alec lgp
^P1STREET("IS","aiz yny","pgl dayex")
xeyad lgp
^P1STREET("IS","aiz yny","pgl fdx")
xdf lgp
^P1STREET("IS","aiz yny","pgl igileo")
oeligi lgp
^P1STREET("IS","aiz yny","pgl lef")
fel lgp
^P1STREET("IS","aiz yny","pgl lkiy")
yikl lgp
^P1STREET("IS","aiz yny","pgl n`ex")
xe`n lgp
^P1STREET("IS","aiz yny","pgl nhr")
rhn lgp
^P1STREET("IS","aiz yny","pgl nikd")
dkin lgp
^P1STREET("IS","aiz yny","pgl pivpim")
mipvip lgp
^P1STREET("IS","aiz yny","pgl whla")
alhw lgp
^P1STREET("IS","aiz yny","pgl wiyeo")
oeyiw lgp
^P1STREET("IS","aiz yny","pgl xaiaim")
miaiax lgp
^P1STREET("IS","aiz yny","pgl xnez")
zenx lgp
^P1STREET("IS","aiz yny","pgl xt`im")
mi`tx lgp
^P1STREET("IS","aiz yny","pgl yexw")
wxey lgp
^P1STREET("IS","aiz yny","pgl ynyeo")
oeyny lgp
^P1STREET("IS","aiz yny","pgl znpr")
rpnz lgp
^P1STREET("IS","aiz yny","pgl znx")
xnz lgp
^P1STREET("IS","aiz yny","pgld enpegd")
dgepne dlgp
^P1STREET("IS","aiz yny","pgyeo")
oeygp
^P1STREET("IS","aiz yny","ptzli")
ilztp
^P1STREET("IS","aiz yny","qelm irwa")
awri mleq
^P1STREET("IS","aiz yny","qipi")
ipiq
^P1STREET("IS","aiz yny","qn' d`leo")
oel`d 'nq
^P1STREET("IS","aiz yny","qn' dbto")
otbd 'nq
^P1STREET("IS","aiz yny","qn' dxineo")
oenixd 'nq
^P1STREET("IS","aiz yny","qn' dyiwnd")
dnwiyd 'nq
^P1STREET("IS","aiz yny","qn' eiv""e")
e"vie 'nq
^P1STREET("IS","aiz yny","qn' npeg")
gepn 'nq
^P1STREET("IS","aiz yny","qn' qncx")
xcnq 'nq
^P1STREET("IS","aiz yny","qn' rliiz dperx")
xrepd ziilr 'nq
^P1STREET("IS","aiz yny","qncx")
xcnq
^P1STREET("IS","aiz yny","rio bci")
icb oir
^P1STREET("IS","aiz yny","rlifd abio")
oiba dfilr
^P1STREET("IS","aiz yny","rliz dperx")
xrepd zilr
^P1STREET("IS","aiz yny","rnw dfizim")
mizifd wnr
^P1STREET("IS","aiz yny","rxaez dpgl")
lgpd zeaxr
^P1STREET("IS","aiz yny","teld ao bexieo")
oeixeb oa dlet
^P1STREET("IS","aiz yny","wdilz irwea")
aewri zlidw
^P1STREET("IS","aiz yny","wlno nbo")
obn onlw
^P1STREET("IS","aiz yny","wxo diqec")
ceqid oxw
^P1STREET("IS","aiz yny","x`eao")
oae`x
^P1STREET("IS","aiz yny","xai `lrfx")
xfrl` iax
^P1STREET("IS","aiz yny","xai hxteo")
oetxh iax
^P1STREET("IS","aiz yny","xai idecd dpyi`")
`iypd dcedi iax
^P1STREET("IS","aiz yny","xai ieqs ao wiqn`")
`nqiw oa sqei iax
^P1STREET("IS","aiz yny","xai ip`i")
i`pi iax
^P1STREET("IS","aiz yny","xai pgepid")
dipegp iax
^P1STREET("IS","aiz yny","xai rwia`")
`aiwr iax
^P1STREET("IS","aiz yny","xai tpgq ao i`ix")
xi`i oa qgpt iax
^P1STREET("IS","aiz yny","xai vcew")
wecv iax
^P1STREET("IS","aiz yny","xai ylem txu")
uxt mely iax
^P1STREET("IS","aiz yny","xaivwi")
iwviax
^P1STREET("IS","aiz yny","xeihl")
lhiex
^P1STREET("IS","aiz yny","xia""l")
l"aix
^P1STREET("IS","aiz yny","xna""m")
m"anx
^P1STREET("IS","aiz yny","xnz lgi")
igl znx
^P1STREET("IS","aiz yny","xt`l `lpwed")
dewpl` l`tx
^P1STREET("IS","aiz yny","xy""i")
i"yx
^P1STREET("IS","aiz yny","xya""b")
b"ayx
^P1STREET("IS","aiz yny","xya""i")
i"ayx
^P1STREET("IS","aiz yny","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","aiz yny","yail d`yl")
ly`d liay
^P1STREET("IS","aiz yny","yail dbigeo")
oegibd liay
^P1STREET("IS","aiz yny","yail dcela")
alecd liay
^P1STREET("IS","aiz yny","yail dgxeaim")
miaexgd liay
^P1STREET("IS","aiz yny","yail dl""d")
d"ld liay
^P1STREET("IS","aiz yny","yail dznxim")
mixnzd liay
^P1STREET("IS","aiz yny","yc' dcwl")
lwcd 'cy
^P1STREET("IS","aiz yny","yc' dwiyeo")
oeyiwd 'cy
^P1STREET("IS","aiz yny","yc' dxa dxveb")
bevxd axd 'cy
^P1STREET("IS","aiz yny","yc' ib`l `leo")
oel` l`bi 'cy
^P1STREET("IS","aiz yny","yc' pdx dixco")
ocxid xdp 'cy
^P1STREET("IS","aiz yny","yc' pgl dixweo")
oewxid lgp 'cy
^P1STREET("IS","aiz yny","yc' pgl v`lim")
mil`v lgp 'cy
^P1STREET("IS","aiz yny","yerli ynyeo")
oeyny ilrey
^P1STREET("IS","aiz yny","yne`l bepo")
opeb l`eny
^P1STREET("IS","aiz yny","ynreo")
oerny
^P1STREET("IS","aiz yny","yrx dynim")
minyd xry
^P1STREET("IS","aiz yny","ytz `nz")
zn` zty
^P1STREET("IS","aiz yny","zcdx")
xdcz
^P1STREET("IS","aiz yny","zt`xz nyd")
dyn zx`tz
^P1STREET("IS","aiz yrxim")
mixry zia
^P1STREET("IS","aiz ywnd")
dnwy zia
^P1STREET("IS","aizo `dxeo")
oexd` ozia
^P1STREET("IS","aizo `dxeo","cxj d`ilpez")
zepli`d jxc
^P1STREET("IS","aizx")
xzia
^P1STREET("IS","aizx riliz")
zilir xzia
^P1STREET("IS","aizx riliz","`bxez nyd")
dyn zexb`
^P1STREET("IS","aizx riliz","`eixaj")
jaxie`
^P1STREET("IS","aizx riliz","`ex dgiim")
miigd xe`
^P1STREET("IS","aizx riliz","`lrfx dnecri")
ircend xfrl`
^P1STREET("IS","aizx riliz","`m dapim")
mipad m`
^P1STREET("IS","aizx riliz","`qzx `exd")
dxe` xzq`
^P1STREET("IS","aizx riliz","`xi`li ivgw")
wgvi il`ix`
^P1STREET("IS","aizx riliz","`y wecy")
ycew y`
^P1STREET("IS","aizx riliz","ao `iy gi")
ig yi` oa
^P1STREET("IS","aizx riliz","arl dzpi`")
`ipzd lra
^P1STREET("IS","aizx riliz","caxi giim")
miig ixac
^P1STREET("IS","aizx riliz","daa` q`li")
il`q `aad
^P1STREET("IS","aizx riliz","dary""h")
h"yrad
^P1STREET("IS","aizx riliz","dbx""`")
`"xbd
^P1STREET("IS","aizx riliz","dgic""`")
`"cigd
^P1STREET("IS","aizx riliz","dhia ednhia")
aihnde aihd
^P1STREET("IS","aizx riliz","dnbic")
cibnd
^P1STREET("IS","aizx riliz","dnbic nnrfxihy")
yhixfrnn cibnd
^P1STREET("IS","aizx riliz","dx""o")
o"xd
^P1STREET("IS","aizx riliz","dxa axim")
mixa axd
^P1STREET("IS","aizx riliz","dxa idecd vcwd")
dwcv dcedi axd
^P1STREET("IS","aizx riliz","dxa wpiaqwi")
iwqaipw axd
^P1STREET("IS","aizx riliz","dxai nlieaaiu")
uiaaeiln iaxd
^P1STREET("IS","aizx riliz","dxai npcaexpd")
dpxeacpn iaxd
^P1STREET("IS","aizx riliz","dzrexxez dzyead")
daeyzd zexxerzd
^P1STREET("IS","aizx riliz","feerldil")
lidlreef
^P1STREET("IS","aizx riliz","ga""c")
c"ag
^P1STREET("IS","aizx riliz","gfeo `iy")
yi` oefg
^P1STREET("IS","aizx riliz","gii ivgw")
wgvi iig
^P1STREET("IS","aizx riliz","glwz ie`a")
a`ei zwlg
^P1STREET("IS","aizx riliz","gtu giim")
miig utg
^P1STREET("IS","aizx riliz","gzm qetx")
xteq mzg
^P1STREET("IS","aizx riliz","iegpo ao fk`i")
i`kf oa opgei
^P1STREET("IS","aizx riliz","ieqs w`xe")
ex`w sqei
^P1STREET("IS","aizx riliz","iqec draecd")
dceard ceqi
^P1STREET("IS","aizx riliz","ks dgiim")
miigd sk
^P1STREET("IS","aizx riliz","nrlez ixeylim")
milyexi zelrn
^P1STREET("IS","aizx riliz","pcaexp`")
`pxeacp
^P1STREET("IS","aizx riliz","perm `linlj")
jlnil` mrep
^P1STREET("IS","aizx riliz","tgc ivgw")
wgvi cgt
^P1STREET("IS","aizx riliz","tpim n`ixim")
mixi`n mipt
^P1STREET("IS","aizx riliz","wceyz lei")
iel zyecw
^P1STREET("IS","aizx riliz","xai pgno naxqla")
alqxan ongp iax
^P1STREET("IS","aizx riliz","xai rwia`")
`aiwr iax
^P1STREET("IS","aizx riliz","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","altexid")
dixetla
^P1STREET("IS","ao cex")
xec oa
^P1STREET("IS","ao cex","dahgeo")
oeghad
^P1STREET("IS","ao cex","pzia dim")
mid aizp
^P1STREET("IS","ao fk`i")
i`kf oa
^P1STREET("IS","ao rni")
inr oa
^P1STREET("IS","api axiz")
zixa ipa
^P1STREET("IS","api axw")
wxa ipa
^P1STREET("IS","api axw","`""c bexceo")
oecxeb c"`
^P1STREET("IS","api axw","`a` dll")
lld `a`
^P1STREET("IS","api axw","`ahlieo")
oeilha`
^P1STREET("IS","api axw","`airc")
cria`
^P1STREET("IS","api axw","`ao baixel")
lexiab oa`
^P1STREET("IS","api axw","`ao rfx`")
`xfr oa`
^P1STREET("IS","api axw","`ao ytxeh")
hexty oa`
^P1STREET("IS","api axw","`api pfx")
xfp ipa`
^P1STREET("IS","api axw","`axap`l")
l`paxa`
^P1STREET("IS","api axw","`axnqwi")
iwqnxa`
^P1STREET("IS","api axw","`cne""xi y`u")
u`y ix"enc`
^P1STREET("IS","api axw","`daz ylem")
mely zad`
^P1STREET("IS","api axw","`dxeo ca tewq")
qwet ac oexd`
^P1STREET("IS","api axw","`dxepeaiu")
uiaepexd`
^P1STREET("IS","api axw","`epwleq")
qelwpe`
^P1STREET("IS","api axw","`eqiywio")
oiwyiqe`
^P1STREET("IS","api axw","`ex dgiim")
miigd xe`
^P1STREET("IS","api axw","`exli`o")
o`ilxe`
^P1STREET("IS","api axw","`gid dyilepi")
ipeliyd dig`
^P1STREET("IS","api axw","`gin`ix")
xi`nig`
^P1STREET("IS","api axw","`girfx")
xfrig`
^P1STREET("IS","api axw","`les yngepi")
ipegny sel`
^P1STREET("IS","api axw","`lgxifi")
ifixgl`
^P1STREET("IS","api axw","`lide dpai`")
`iapd edil`
^P1STREET("IS","api axw","`liyr")
ryil`
^P1STREET("IS","api axw","`lwau ylnd")
dnly uawl`
^P1STREET("IS","api axw","`lwlri")
irlwl`
^P1STREET("IS","api axw","`lyij")
jiyl`
^P1STREET("IS","api axw","`nxi axej")
jexa ixn`
^P1STREET("IS","api axw","`nxi giim")
miig ixn`
^P1STREET("IS","api axw","`pilaiu")
uialip`
^P1STREET("IS","api axw","`qzx dnlkd")
dklnd xzq`
^P1STREET("IS","api axw","`txim")
mixt`
^P1STREET("IS","api axw","`v""l")
l"v`
^P1STREET("IS","api axw","`xid ao `lirfx")
xfril` oa dix`
^P1STREET("IS","api axw","`xlefexea")
aexefelx`
^P1STREET("IS","api axw","`yl `axdm")
mdxa` ly`
^P1STREET("IS","api axw","`yx wlno")
onlw xy`
^P1STREET("IS","api axw","a`x nim giim")
miig min x`a
^P1STREET("IS","api axw","a`xi")
ix`a
^P1STREET("IS","api axw","abpe nyd")
dyn epba
^P1STREET("IS","api axw","aexekea")
aekexea
^P1STREET("IS","api axw","ai`liw")
wil`ia
^P1STREET("IS","api axw","ail""e")
e"lia
^P1STREET("IS","api axw","aixid")
dixia
^P1STREET("IS","api axw","aixpaeim")
mieapxia
^P1STREET("IS","api axw","aiz dll")
lld zia
^P1STREET("IS","api axw","aiz gexeo")
oexeg zia
^P1STREET("IS","api axw","aiz ieqs")
sqei zia
^P1STREET("IS","api axw","aiz yn`i")
i`ny zia
^P1STREET("IS","api axw","ao cec")
cec oa
^P1STREET("IS","api axw","ao fen`")
`nef oa
^P1STREET("IS","api axw","ao fk`i")
i`kf oa
^P1STREET("IS","api axw","ao i`ix")
xi`i oa
^P1STREET("IS","api axw","ao iyi")
iyi oa
^P1STREET("IS","api axw","ao qix`")
`xiq oa
^P1STREET("IS","api axw","ao rf`i")
i`fr oa
^P1STREET("IS","api axw","ao tzgid")
digzt oa
^P1STREET("IS","api axw","ao yhg")
ghy oa
^P1STREET("IS","api axw","apinio `axdm")
mdxa` oinipa
^P1STREET("IS","api axw","arl dzpi`")
`ipzd lra
^P1STREET("IS","api axw","arl ym hea")
aeh my lra
^P1STREET("IS","api axw","ax ieg`i")
i`gei xa
^P1STREET("IS","api axw","ax keka`")
`akek xa
^P1STREET("IS","api axw","axei`x")
x`iexa
^P1STREET("IS","api axw","axej ao pxid")
dixp oa jexa
^P1STREET("IS","api axw","axej dixy")
yxid jexa
^P1STREET("IS","api axw","axexid")
dixexa
^P1STREET("IS","api axw","axh")
hxa
^P1STREET("IS","api axw","axhpexd")
dxephxa
^P1STREET("IS","api axw","axpcyhhx")
xhhycpxa
^P1STREET("IS","api axw","b`epi axiqw")
wqixa ipe`b
^P1STREET("IS","api axw","baexi iyx`l")
l`xyi ixeab
^P1STREET("IS","api axw","barz tpgq")
qgpt zrab
^P1STREET("IS","api axw","belena")
aneleb
^P1STREET("IS","api axw","bpi bc")
cb ipb
^P1STREET("IS","api axw","bpigeaqwi")
iwqaegipb
^P1STREET("IS","api axw","bxepx")
xpexb
^P1STREET("IS","api axw","bxipaxb")
bxapixb
^P1STREET("IS","api axw","ca def")
fed ac
^P1STREET("IS","api axw","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","api axw","cec teaxqwi")
iwqxaet cec
^P1STREET("IS","api axw","ceo ieqs pyi`")
`iyp sqei oec
^P1STREET("IS","api axw","cepele")
elepec
^P1STREET("IS","api axw","cnyw `lirfx")
xfril` wync
^P1STREET("IS","api axw","cpi`l")
l`ipc
^P1STREET("IS","api axw","cqlx")
xlqc
^P1STREET("IS","api axw","cwx")
xwc
^P1STREET("IS","api axw","cxj ao bexieo")
oeixeb oa jxc
^P1STREET("IS","api axw","cxj dpyi` dx`yeo")
oey`xd `iypd jxc
^P1STREET("IS","api axw","cxj yyz dinim")
minid zyy jxc
^P1STREET("IS","api axw","d`cne""x nalf")
flan x"enc`d
^P1STREET("IS","api axw","d`cne""x nbex")
xebn x"enc`d
^P1STREET("IS","api axw","d`cne""x neiye")
eyien x"enc`d
^P1STREET("IS","api axw","d`cne""x npcaexpd")
dpxeacpn x"enc`d
^P1STREET("IS","api axw","d`cne""x nqtipw`")
`wpitqn x"enc`d
^P1STREET("IS","api axw","d`cne""x nvpf")
fpvn x"enc`d
^P1STREET("IS","api axw","d`cne""x nwev'w")
w'vewn x"enc`d
^P1STREET("IS","api axw","d`cne""x nx`cfnio")
oinfc`xn x"enc`d
^P1STREET("IS","api axw","d`cne""x nxef'io")
oi'fexn x"enc`d
^P1STREET("IS","api axw","d`gim n`ix")
xi`n mig`d
^P1STREET("IS","api axw","d`x""i")
i"x`d
^P1STREET("IS","api axw","d`xfim")
mifx`d
^P1STREET("IS","api axw","dapim")
mipad
^P1STREET("IS","api axw","dblbl")
lblbd
^P1STREET("IS","api axw","dblil")
lilbd
^P1STREET("IS","api axw","dbx""`")
`"xbd
^P1STREET("IS","api axw","dcqim")
miqcd
^P1STREET("IS","api axw","ddbpd")
dpbdd
^P1STREET("IS","api axw","deyr")
ryed
^P1STREET("IS","api axw","dfiz")
zifd
^P1STREET("IS","api axw","dgiil")
liigd
^P1STREET("IS","api axw","dglevim")
mivelgd
^P1STREET("IS","api axw","dgxneo")
oenxgd
^P1STREET("IS","api axw","dgynep`im")
mi`penygd
^P1STREET("IS","api axw","dilcqdiinx")
xniidqclid
^P1STREET("IS","api axw","dixco")
ocxid
^P1STREET("IS","api axw","dixweo")
oewxid
^P1STREET("IS","api axw","dkiyex")
xeyikd
^P1STREET("IS","api axw","dlegnim")
mingeld
^P1STREET("IS","api axw","dltxio")
oixtld
^P1STREET("IS","api axw","dnkaim")
miaknd
^P1STREET("IS","api axw","dnlj cec")
cec jlnd
^P1STREET("IS","api axw","dnlj y`el")
le`y jlnd
^P1STREET("IS","api axw","dpba")
abpd
^P1STREET("IS","api axw","dtlebd dcziz")
zizcd dbeltd
^P1STREET("IS","api axw","dtln""g")
g"nltd
^P1STREET("IS","api axw","dvpgpim")
mipgpvd
^P1STREET("IS","api axw","dwiyeo")
oeyiwd
^P1STREET("IS","api axw","dx daiz")
ziad xd
^P1STREET("IS","api axw","dx pae")
eap xd
^P1STREET("IS","api axw","dx qipi")
ipiq xd
^P1STREET("IS","api axw","dx`yepim")
mipey`xd
^P1STREET("IS","api axw","dxa `ae gvix`")
`xivg ea` axd
^P1STREET("IS","api axw","dxa `dxepqeo")
oeqpexd` axd
^P1STREET("IS","api axw","dxa `xid xaipeaiu")
uiaepiax dix` axd
^P1STREET("IS","api axw","dxa alei")
iela axd
^P1STREET("IS","api axw","dxa anaxbx")
xbxana axd
^P1STREET("IS","api axw","dxa ao irwa")
awri oa axd
^P1STREET("IS","api axw","dxa ax `ilo")
oli` xa axd
^P1STREET("IS","api axw","dxa axeh")
hexa axd
^P1STREET("IS","api axw","dxa axeo `yx wlno")
onlw xy` oexa axd
^P1STREET("IS","api axw","dxa behnkx")
xknheb axd
^P1STREET("IS","api axw","dxa belc")
cleb axd
^P1STREET("IS","api axw","dxa cpbex")
xebpc axd
^P1STREET("IS","api axw","dxa dixy")
yxid axd
^P1STREET("IS","api axw","dxa dll exhdiinx")
xniidhxe lld axd
^P1STREET("IS","api axw","dxa ebno")
onbe axd
^P1STREET("IS","api axw","dxa eilwenixx")
xxinewlie axd
^P1STREET("IS","api axw","dxa eqxno")
onxqe axd
^P1STREET("IS","api axw","dxa expx")
xpxe axd
^P1STREET("IS","api axw","dxa fepptlc")
cltppef axd
^P1STREET("IS","api axw","dxa fna` npgm")
mgpn `anf axd
^P1STREET("IS","api axw","dxa gi hiia")
aiih ig axd
^P1STREET("IS","api axw","dxa helicpe")
epcileh axd
^P1STREET("IS","api axw","dxa hkexy")
yxekh axd
^P1STREET("IS","api axw","dxa i.n. dkdo")
odkd .n.i axd
^P1STREET("IS","api axw","dxa ieqs giim")
miig sqei axd
^P1STREET("IS","api axw","dxa irwa lpc`")
`cpl awri axd
^P1STREET("IS","api axw","dxa ivgw pqim")
miqp wgvi axd
^P1STREET("IS","api axw","dxa ivgw ynicno")
onciny wgvi axd
^P1STREET("IS","api axw","dxa kdo ylnd")
dnly odk axd
^P1STREET("IS","api axw","dxa leio nxiy`")
`yixn oiel axd
^P1STREET("IS","api axw","dxa niecqx")
xqcein axd
^P1STREET("IS","api axw","dxa nineo")
oenin axd
^P1STREET("IS","api axw","dxa nvlig")
gilvn axd
^P1STREET("IS","api axw","dxa nyd txce")
ecxt dyn axd
^P1STREET("IS","api axw","dxa piqpaeim")
mieapqip axd
^P1STREET("IS","api axw","dxa qexevwio")
oiwvexeq axd
^P1STREET("IS","api axw","dxa rhiid")
diihr axd
^P1STREET("IS","api axw","dxa rni`l")
l`inr axd
^P1STREET("IS","api axw","dxa tz`iid")
dii`zt axd
^P1STREET("IS","api axw","dxa vixlqeo")
oeqlxiv axd
^P1STREET("IS","api axw","dxa wehlx")
xlhew axd
^P1STREET("IS","api axw","dxa wew")
wew axd
^P1STREET("IS","api axw","dxa wliy")
yilw axd
^P1STREET("IS","api axw","dxa x`h nyelm")
mleyn h`x axd
^P1STREET("IS","api axw","dxa xaipea")
aepiax axd
^P1STREET("IS","api axw","dxa xfeaqwi")
iwqaefx axd
^P1STREET("IS","api axw","dxa y`el gcc")
ccg le`y axd
^P1STREET("IS","api axw","dxa yhxqx")
xqxhy axd
^P1STREET("IS","api axw","dxa yj")
jy axd
^P1STREET("IS","api axw","dxa yne`l xefeaqwi")
iwqaefex l`eny axd
^P1STREET("IS","api axw","dxa yny cec")
cec yny axd
^P1STREET("IS","api axw","dxa yx")
xy axd
^P1STREET("IS","api axw","dxi belo")
oleb ixd
^P1STREET("IS","api axw","dxi""m dkdo")
odkd m"ixd
^P1STREET("IS","api axw","dxkqim")
miqkxd
^P1STREET("IS","api axw","dxlipb vai")
iav bpilxd
^P1STREET("IS","api axw","dxveb")
bevxd
^P1STREET("IS","api axw","dxvl")
lvxd
^P1STREET("IS","api axw","dyenx")
xneyd
^P1STREET("IS","api axw","dyleyd")
dyelyd
^P1STREET("IS","api axw","dypiim")
miipyd
^P1STREET("IS","api axw","dyx giim lpc`e")
e`cpl miig xyd
^P1STREET("IS","api axw","dyx ib`l `leo")
oel` l`bi xyd
^P1STREET("IS","api axw","dyxiep`im")
mi`peixyd
^P1STREET("IS","api axw","dzp`im")
mi`pzd
^P1STREET("IS","api axw","eeltqeo")
oeqtlee
^P1STREET("IS","api axw","eipaxb")
bxapie
^P1STREET("IS","api axw","eipxa")
axpie
^P1STREET("IS","api axw","erc `xar `xvez")
zevx` rax` cre
^P1STREET("IS","api axw","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","api axw","faeleo dnx")
xnd oeleaf
^P1STREET("IS","api axw","fihpivwi")
iwviphif
^P1STREET("IS","api axw","fiy` `lkqpcx")
xcpqkl` `yif
^P1STREET("IS","api axw","fkxeo n`ix")
xi`n oexkf
^P1STREET("IS","api axw","fkxid")
dixkf
^P1STREET("IS","api axw","fxeaal")
laaexf
^P1STREET("IS","api axw","gawew")
wewag
^P1STREET("IS","api axw","gaxeo")
oexag
^P1STREET("IS","api axw","gbi")
ibg
^P1STREET("IS","api axw","gelcd dpai`d")
d`iapd dcleg
^P1STREET("IS","api axw","gfeo `iy")
yi` oefg
^P1STREET("IS","api axw","gic""`")
`"cig
^P1STREET("IS","api axw","giceyi dxi""n")
n"ixd iyecig
^P1STREET("IS","api axw","gpd qpy")
ypq dpg
^P1STREET("IS","api axw","gpwio")
oiwpg
^P1STREET("IS","api axw","gtu giim")
miig utg
^P1STREET("IS","api axw","gxl""t")
t"lxg
^P1STREET("IS","api axw","gya qetx")
xteq ayg
^P1STREET("IS","api axw","gzm qetx")
xteq mzg
^P1STREET("IS","api axw","haxid")
dixah
^P1STREET("IS","api axw","hl giim")
miig lh
^P1STREET("IS","api axw","hxentlcex")
xecltnexh
^P1STREET("IS","api axw","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","api axw","ib`l")
l`bi
^P1STREET("IS","api axw","idecd dlei")
ield dcedi
^P1STREET("IS","api axw","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","api axw","ideciz")
zicedi
^P1STREET("IS","api axw","ideyr")
ryedi
^P1STREET("IS","api axw","ideyr ao peo")
oep oa ryedi
^P1STREET("IS","api axw","ie`l")
l`ei
^P1STREET("IS","api axw","iegpo dqpclx")
xlcpqd opgei
^P1STREET("IS","api axw","iepd dpai`")
`iapd dpei
^P1STREET("IS","api axw","iepzo")
ozpei
^P1STREET("IS","api axw","ieqs dblili")
ililbd sqei
^P1STREET("IS","api axw","igfw`l")
l`wfgi
^P1STREET("IS","api axw","irau")
uari
^P1STREET("IS","api axw","irl")
lri
^P1STREET("IS","api axw","itd")
dti
^P1STREET("IS","api axw","ivgw ptg`")
`gtp wgvi
^P1STREET("IS","api axw","ivgw ycd")
dcy wgvi
^P1STREET("IS","api axw","ixeylim")
milyexi
^P1STREET("IS","api axw","ixnide")
edinxi
^P1STREET("IS","api axw","iyng nyd")
dyn gnyi
^P1STREET("IS","api axw","iynr`l")
l`rnyi
^P1STREET("IS","api axw","iyride")
ediryi
^P1STREET("IS","api axw","iyx`l nqlph")
hplqn l`xyi
^P1STREET("IS","api axw","kdpno")
onpdk
^P1STREET("IS","api axw","kkx d`gc ryx")
xyr cg`d xkk
^P1STREET("IS","api axw","kkx diyiad")
daiyid xkk
^P1STREET("IS","api axw","kkx dzryid")
diyrzd xkk
^P1STREET("IS","api axw","kpxz")
zxpk
^P1STREET("IS","api axw","kvplqeo")
oeqlpvk
^P1STREET("IS","api axw","lg""i")
i"gl
^P1STREET("IS","api axw","lityiu")
uiytil
^P1STREET("IS","api axw","navr wcy")
ycw rvan
^P1STREET("IS","api axw","ndx""l")
l"xdn
^P1STREET("IS","api axw","ndxy""l")
l"yxdn
^P1STREET("IS","api axw","nedliax")
xailden
^P1STREET("IS","api axw","nikd")
dkin
^P1STREET("IS","api axw","nipu")
upin
^P1STREET("IS","api axw","nixeo")
oexin
^P1STREET("IS","api axw","nl`ki")
ik`ln
^P1STREET("IS","api axw","nlvx")
xvln
^P1STREET("IS","api axw","npgm")
mgpn
^P1STREET("IS","api axw","npyd")
dypn
^P1STREET("IS","api axw","nriipd yl zexd")
dxez ly dpiirn
^P1STREET("IS","api axw","nrlez n`ix")
xi`n zelrn
^P1STREET("IS","api axw","nrlez nxbliz")
zilbxn zelrn
^P1STREET("IS","api axw","ntxu ylnd")
dnly uxtn
^P1STREET("IS","api axw","nvcd")
dcvn
^P1STREET("IS","api axw","nweax")
xaewn
^P1STREET("IS","api axw","nxim dpai`d")
d`iapd mixn
^P1STREET("IS","api axw","nxkf arli nl`kd")
dk`ln ilra fkxn
^P1STREET("IS","api axw","nyd `xid")
dix` dyn
^P1STREET("IS","api axw","nzzide")
edizzn
^P1STREET("IS","api axw","ped irwa")
awri dep
^P1STREET("IS","api axw","peitlc")
cltiep
^P1STREET("IS","api axw","perm `linlj")
jlnil` mrep
^P1STREET("IS","api axw","pexc`e")
e`cxep
^P1STREET("IS","api axw","pexew")
wexep
^P1STREET("IS","api axw","pgem")
megp
^P1STREET("IS","api axw","pgl yexw")
wxey lgp
^P1STREET("IS","api axw","pgnid")
dingp
^P1STREET("IS","api axw","pgyepi idecd")
dcedi ipeygp
^P1STREET("IS","api axw","picepi abcc")
ccba ipecip
^P1STREET("IS","api axw","pil""i")
i"lip
^P1STREET("IS","api axw","pzo dpai`")
`iapd ozp
^P1STREET("IS","api axw","qenj")
jneq
^P1STREET("IS","api axw","qewelea")
aeleweq
^P1STREET("IS","api axw","qixwio")
oiwxiq
^P1STREET("IS","api axw","qn' `f""x")
x"f` 'nq
^P1STREET("IS","api axw","qn' anaxbx")
xbxana 'nq
^P1STREET("IS","api axw","qn' behlia")
ailheb 'nq
^P1STREET("IS","api axw","qn' dapim")
mipad 'nq
^P1STREET("IS","api axw","qn' dfda")
adfd 'nq
^P1STREET("IS","api axw","qn' iapd")
dpai 'nq
^P1STREET("IS","api axw","qn' rfx")
xfr 'nq
^P1STREET("IS","api axw","qn' x`a""c")
c"a`x 'nq
^P1STREET("IS","api axw","qn' xgl")
lgx 'nq
^P1STREET("IS","api axw","qn' ytix`")
`xity 'nq
^P1STREET("IS","api axw","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","api axw","raecz iyx`l")
l`xyi zcear
^P1STREET("IS","api axw","reacid")
dicaer
^P1STREET("IS","api axw","refi`l")
l`ifer
^P1STREET("IS","api axw","rfx`")
`xfr
^P1STREET("IS","api axw","rhxez")
zexhr
^P1STREET("IS","api axw","rli dkdo")
odkd ilr
^P1STREET("IS","api axw","rlid ypid")
dipy dilr
^P1STREET("IS","api axw","rneq")
qenr
^P1STREET("IS","api axw","rni")
inr
^P1STREET("IS","api axw","rnw ifxr`l")
l`rxfi wnr
^P1STREET("IS","api axw","rnxm b`eo")
oe`b mxnr
^P1STREET("IS","api axw","tcxno cefid")
difec onxct
^P1STREET("IS","api axw","texvi rke")
ekr ivxet
^P1STREET("IS","api axw","tipqwx")
xwqpit
^P1STREET("IS","api axw","tlcno")
onclt
^P1STREET("IS","api axw","tpgq `tyhiio")
oiihyt` qgpt
^P1STREET("IS","api axw","tpwq")
qwpt
^P1STREET("IS","api axw","txcq axw`z")
z`wxa qcxt
^P1STREET("IS","api axw","txl giim")
miig lxt
^P1STREET("IS","api axw","viihlio")
oilhiiv
^P1STREET("IS","api axw","vng vciw")
wicv gnv
^P1STREET("IS","api axw","vtpid")
diptv
^P1STREET("IS","api axw","vtz")
ztv
^P1STREET("IS","api axw","wceyi bexliu")
uilxeb iyecw
^P1STREET("IS","api axw","wceyi exyd")
dyxe iyecw
^P1STREET("IS","api axw","wceyi lea")
ael iyecw
^P1STREET("IS","api axw","wceyz iem hea")
aeh mei zyecw
^P1STREET("IS","api axw","wdilez irwa")
awri zelidw
^P1STREET("IS","api axw","wealqwi")
iwqlaew
^P1STREET("IS","api axw","weypix")
xipyew
^P1STREET("IS","api axw","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","api axw","wliyx")
xyilw
^P1STREET("IS","api axw","wtlpqwi")
iwqpltw
^P1STREET("IS","api axw","x`a""c")
c"a`x
^P1STREET("IS","api axw","xa `ni")
in` ax
^P1STREET("IS","api axw","xa `qi")
iq` ax
^P1STREET("IS","api axw","xa `yi")
iy` ax
^P1STREET("IS","api axw","xa d`i b`eo")
oe`b i`d ax
^P1STREET("IS","api axw","xa hea")
aeh ax
^P1STREET("IS","api axw","xa n`icqx")
xqci`n ax
^P1STREET("IS","api axw","xai `lirfx")
xfril` iax
^P1STREET("IS","api axw","xai bxeqaxc `a`")
`a` cxaqexb iax
^P1STREET("IS","api axw","xai gii`")
`iig iax
^P1STREET("IS","api axw","xai ieqi")
iqei iax
^P1STREET("IS","api axw","xai ivgw n`ix dkdo")
odkd xi`n wgvi iax
^P1STREET("IS","api axw","xai lei ivgw")
wgvi iel iax
^P1STREET("IS","api axw","xai n`ix")
xi`n iax
^P1STREET("IS","api axw","xai pgno naxqla")
alqxan ongp iax
^P1STREET("IS","api axw","xai rwia`")
`aiwr iax
^P1STREET("IS","api axw","xaip`")
`piax
^P1STREET("IS","api axw","xao bnli`l")
l`ilnb oax
^P1STREET("IS","api axw","xape `yx")
xy` epax
^P1STREET("IS","api axw","xape agii")
iiga epax
^P1STREET("IS","api axw","xape zm")
mz epax
^P1STREET("IS","api axw","xc""w")
w"cx
^P1STREET("IS","api axw","xefpdiim")
miidpfex
^P1STREET("IS","api axw","xfi`l")
l`ifx
^P1STREET("IS","api axw","xfinio")
oinifx
^P1STREET("IS","api axw","xg' 143")
143 'gx
^P1STREET("IS","api axw","xg' 286")
286 'gx
^P1STREET("IS","api axw","xg' 294")
294 'gx
^P1STREET("IS","api axw","xg' 309")
309 'gx
^P1STREET("IS","api axw","xg' 337")
337 'gx
^P1STREET("IS","api axw","xg' 340")
340 'gx
^P1STREET("IS","api axw","xgaid")
diagx
^P1STREET("IS","api axw","xgaz wlnx")
xnlw zagx
^P1STREET("IS","api axw","xiipq")
qpiix
^P1STREET("IS","api axw","xineo")
oenix
^P1STREET("IS","api axw","xla""b")
b"alx
^P1STREET("IS","api axw","xna""m")
m"anx
^P1STREET("IS","api axw","xna""o")
o"anx
^P1STREET("IS","api axw","xng""l")
l"gnx
^P1STREET("IS","api axw","xnz `dxeo")
oexd` znx
^P1STREET("IS","api axw","xy""i")
i"yx
^P1STREET("IS","api axw","xya""m")
m"ayx
^P1STREET("IS","api axw","yafi")
ifay
^P1STREET("IS","api axw","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","api axw","yc""l")
l"cy
^P1STREET("IS","api axw","yc' `aii exa`")
`axe iia` 'cy
^P1STREET("IS","api axw","yc' `ipyhiio")
oiihypi` 'cy
^P1STREET("IS","api axw","yc' bxyhpwexo")
oxewphyxb 'cy
^P1STREET("IS","api axw","yc' d`cne""x neif'piu")
uip'fien x"enc`d 'cy
^P1STREET("IS","api axw","yc' d`cne""x neifpiu")
uipfien x"enc`d 'cy
^P1STREET("IS","api axw","yc' dpvia")
aivpd 'cy
^P1STREET("IS","api axw","yc' drm dvxtzi")
iztxvd mrd 'cy
^P1STREET("IS","api axw","yc' dxa `xid leio")
oiel dix` axd 'cy
^P1STREET("IS","api axw","yc' dxa qixewd")
dwexiq axd 'cy
^P1STREET("IS","api axw","yc' hxteo")
oetxh 'cy
^P1STREET("IS","api axw","yc' ktx rvieo")
oeivr xtk 'cy
^P1STREET("IS","api axw","yc' xnf")
fnx 'cy
^P1STREET("IS","api axw","yg""l")
l"gy
^P1STREET("IS","api axw","yl""d")
d"ly
^P1STREET("IS","api axw","yley dyrez")
zeryd yely
^P1STREET("IS","api axw","ylnd ao `lirfx")
xfril` oa dnly
^P1STREET("IS","api axw","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","api axw","ylnd dkdo")
odkd dnly
^P1STREET("IS","api axw","ylnd dnlj")
jlnd dnly
^P1STREET("IS","api axw","yne`l dpai`")
`iapd l`eny
^P1STREET("IS","api axw","yne`l eipaxb")
bxapie l`eny
^P1STREET("IS","api axw","ynreo dvciw")
wicvd oerny
^P1STREET("IS","api axw","ynrid")
dirny
^P1STREET("IS","api axw","ynyeo dbiaex")
xeaibd oeyny
^P1STREET("IS","api axw","ypix")
xipy
^P1STREET("IS","api axw","ytix`")
`xity
^P1STREET("IS","api axw","ytz `nz")
zn` zty
^P1STREET("IS","api axw","zexz giim")
miig zxez
^P1STREET("IS","api axw","zxt""c")
c"txz
^P1STREET("IS","api cxem")
mexc ipa
^P1STREET("IS","api cxex")
xexc ipa
^P1STREET("IS","api cxex","d`xal")
lax`d
^P1STREET("IS","api cxex","ypix")
xipy
^P1STREET("IS","api rhxez")
zexhr ipa
^P1STREET("IS","api rhxez","dbto")
otbd
^P1STREET("IS","api rhxez","dfiz")
zifd
^P1STREET("IS","api rhxez","dgihd")
dhigd
^P1STREET("IS","api rhxez","dxineo")
oenixd
^P1STREET("IS","api rhxez","dyrexd")
dxeryd
^P1STREET("IS","api rhxez","dz`pd")
dp`zd
^P1STREET("IS","api ri""y")
y"ir ipa
^P1STREET("IS","api ri""y","`cem")
mec`
^P1STREET("IS","api ri""y","bpi hl")
lh ipb
^P1STREET("IS","api ri""y","cxj dpvgeo")
oegvpd jxc
^P1STREET("IS","api ri""y","d`ld")
dl`d
^P1STREET("IS","api ri""y","d`leo")
oel`d
^P1STREET("IS","api ri""y","dcq")
qcd
^P1STREET("IS","api ri""y","dcwl")
lwcd
^P1STREET("IS","api ri""y","dexc")
cxed
^P1STREET("IS","api ri""y","dfiz")
zifd
^P1STREET("IS","api ri""y","dgihd")
dhigd
^P1STREET("IS","api ri""y","dgva")
avgd
^P1STREET("IS","api ri""y","dkdpim")
mipdkd
^P1STREET("IS","api ri""y","dklpiez")
zeiplkd
^P1STREET("IS","api ri""y","dqxo")
oxqd
^P1STREET("IS","api ri""y","dyiaelz")
zleaiyd
^P1STREET("IS","api ri""y","dyrexd")
dxeryd
^P1STREET("IS","api ri""y","dz`pd")
dp`zd
^P1STREET("IS","api ri""y","ivgw xaio")
oiax wgvi
^P1STREET("IS","api ri""y","qn' dweqnz")
znqewd 'nq
^P1STREET("IS","api ri""y","rxai dpgl")
lgpd iaxr
^P1STREET("IS","api vieo")
oeiv ipa
^P1STREET("IS","api vieo","d`bef")
feb`d
^P1STREET("IS","api vieo","dpgl")
lgpd
^P1STREET("IS","api x`m")
m`x ipa
^P1STREET("IS","api x`m","yafi")
ifay
^P1STREET("IS","apid")
dipa
^P1STREET("IS","apinipd")
dpinipa
^P1STREET("IS","apinipd","`ixiz")
zixi`
^P1STREET("IS","apinipd","bciy")
yicb
^P1STREET("IS","apinipd","cbo")
obc
^P1STREET("IS","apinipd","cxj fkxeo irwa")
awri oexkf jxc
^P1STREET("IS","apinipd","cxj pil""i")
i"lip jxc
^P1STREET("IS","apinipd","cxj tiw""`")
`"wit jxc
^P1STREET("IS","apinipd","d`bqim")
miqb`d
^P1STREET("IS","apinipd","d`eno")
one`d
^P1STREET("IS","apinipd","d`exo")
oxe`d
^P1STREET("IS","apinipd","d`ikx")
xki`d
^P1STREET("IS","apinipd","d`ixeq")
qexi`d
^P1STREET("IS","apinipd","d`qis")
siq`d
^P1STREET("IS","apinipd","d`tiw")
wit`d
^P1STREET("IS","apinipd","daeqzo")
ozqead
^P1STREET("IS","apinipd","daeym")
myead
^P1STREET("IS","apinipd","daflz")
zlfad
^P1STREET("IS","apinipd","davix")
xivad
^P1STREET("IS","apinipd","daxey")
yexad
^P1STREET("IS","apinipd","dbcp""r")
r"pcbd
^P1STREET("IS","apinipd","dbexo")
oxebd
^P1STREET("IS","apinipd","dbfiz")
zifbd
^P1STREET("IS","apinipd","dbiaexim")
mixeaibd
^P1STREET("IS","apinipd","dbpim")
mipbd
^P1STREET("IS","apinipd","dbto")
otbd
^P1STREET("IS","apinipd","dcela")
alecd
^P1STREET("IS","apinipd","dcwl")
lwcd
^P1STREET("IS","apinipd","ddbpd")
dpbdd
^P1STREET("IS","apinipd","dfiz")
zifd
^P1STREET("IS","apinipd","dgexy")
yxegd
^P1STREET("IS","apinipd","dgihd")
dhigd
^P1STREET("IS","apinipd","dgxea")
aexgd
^P1STREET("IS","apinipd","dgxez")
zexgd
^P1STREET("IS","apinipd","dhgpd")
dpghd
^P1STREET("IS","apinipd","dieal")
laeid
^P1STREET("IS","apinipd","diio")
oiid
^P1STREET("IS","apinipd","diwa")
awid
^P1STREET("IS","apinipd","dklpiz")
ziplkd
^P1STREET("IS","apinipd","dkxkem")
mekxkd
^P1STREET("IS","apinipd","dkxm")
mxkd
^P1STREET("IS","apinipd","dkxnl")
lnxkd
^P1STREET("IS","apinipd","dlehm")
mheld
^P1STREET("IS","apinipd","dnexd")
dxend
^P1STREET("IS","apinipd","dniiqcim")
micqiind
^P1STREET("IS","apinipd","dnl`kd")
dk`lnd
^P1STREET("IS","apinipd","dnqild")
dliqnd
^P1STREET("IS","apinipd","dpcia")
aicpd
^P1STREET("IS","apinipd","dpgl")
lgpd
^P1STREET("IS","apinipd","dpxwiq")
qiwxpd
^P1STREET("IS","apinipd","dpyi`")
`iypd
^P1STREET("IS","apinipd","dpyx")
xypd
^P1STREET("IS","apinipd","dqgla")
algqd
^P1STREET("IS","apinipd","drliid")
diilrd
^P1STREET("IS","apinipd","drvn`ez")
ze`nvrd
^P1STREET("IS","apinipd","dterl")
lretd
^P1STREET("IS","apinipd","dxet`")
`texd
^P1STREET("IS","apinipd","dxezm")
mzexd
^P1STREET("IS","apinipd","dxgad")
dagxd
^P1STREET("IS","apinipd","dxineo")
oenixd
^P1STREET("IS","apinipd","dxwtz")
ztwxd
^P1STREET("IS","apinipd","dyaelz")
zleayd
^P1STREET("IS","apinipd","dycd")
dcyd
^P1STREET("IS","apinipd","dyexyim")
miyxeyd
^P1STREET("IS","apinipd","dygs")
sgyd
^P1STREET("IS","apinipd","dygx")
xgyd
^P1STREET("IS","apinipd","dyihd")
dhiyd
^P1STREET("IS","apinipd","dyiy")
yiyd
^P1STREET("IS","apinipd","dypiim")
miipyd
^P1STREET("IS","apinipd","dyrexd")
dxeryd
^P1STREET("IS","apinipd","dyxib")
bixyd
^P1STREET("IS","apinipd","dz`pd")
dp`zd
^P1STREET("IS","apinipd","dznx")
xnzd
^P1STREET("IS","apinipd","gavlz")
zlvag
^P1STREET("IS","apinipd","iqnio")
oinqi
^P1STREET("IS","apinipd","itd pes")
sep dti
^P1STREET("IS","apinipd","nexb")
bxen
^P1STREET("IS","apinipd","pexiz")
zixep
^P1STREET("IS","apinipd","pglz f'aehipqwi")
iwqpihea'f zlgp
^P1STREET("IS","apinipd","qipi")
ipiq
^P1STREET("IS","apinipd","qncx")
xcnq
^P1STREET("IS","apinipd","raecd")
dcear
^P1STREET("IS","apinipd","rely")
yler
^P1STREET("IS","apinipd","ripa")
apir
^P1STREET("IS","apinipd","rniwm")
mwinr
^P1STREET("IS","apinipd","vd""l")
l"dv
^P1STREET("IS","apinipd","wexl")
lxew
^P1STREET("IS","apinipd","wxo diqec")
ceqid oxw
^P1STREET("IS","apinipd","yail dgla")
algd liay
^P1STREET("IS","apinipd","yedm")
mdey
^P1STREET("IS","apinipd","yeypd")
dpyey
^P1STREET("IS","apinipd","yyz dinim")
minid zyy
^P1STREET("IS","apinipd","zlzo")
ozlz
^P1STREET("IS","aqnz hareo")
oerah znqa
^P1STREET("IS","aqnz hareo","`l `nl")
ln` l`
^P1STREET("IS","aqnz hareo","`l ba`l")
l`ab l`
^P1STREET("IS","aqnz hareo","`l ee`ci")
ic`ee l`
^P1STREET("IS","aqnz hareo","`l fdex")
xedf l`
^P1STREET("IS","aqnz hareo","`l fizeo")
oezif l`
^P1STREET("IS","aqnz hareo","`l rnx")
xnr l`
^P1STREET("IS","aqnz hareo","`nl")
ln`
^P1STREET("IS","aqnz hareo","dfiizeo")
oeziifd
^P1STREET("IS","aqnz hareo","dfizim")
mizifd
^P1STREET("IS","aqnz hareo","iqnio")
oinqi
^P1STREET("IS","aqnz hareo","ivgw xaio")
oiax wgvi
^P1STREET("IS","aqnz hareo","kx""m")
m"xk
^P1STREET("IS","aqnz hareo","qrcid")
dicrq
^P1STREET("IS","aripd - peb'ic`z")
z`ci'bep - dpira
^P1STREET("IS","arpd")
dpra
^P1STREET("IS","avxd")
dxva
^P1STREET("IS","avxd","da`x")
x`ad
^P1STREET("IS","avxd","dexcim")
micxed
^P1STREET("IS","avxd","dpglim")
milgpd
^P1STREET("IS","avxd","drlid")
dilrd
^P1STREET("IS","avxd","dtxcq")
qcxtd
^P1STREET("IS","avxd","dtxgim")
migxtd
^P1STREET("IS","avxd","dx`yepim")
mipey`xd
^P1STREET("IS","avxd","nbcl dnim")
mind lcbn
^P1STREET("IS","avxd","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","avxeo")
oexva
^P1STREET("IS","avxeo","cxj dtiweqim")
miqewitd jxc
^P1STREET("IS","avxeo","dgiilim")
miliigd
^P1STREET("IS","avz")
zva
^P1STREET("IS","awrd")
drwa
^P1STREET("IS","awrd","cxj gaxeo")
oexag jxc
^P1STREET("IS","awrd","glu")
ulg
^P1STREET("IS","awrd","npyd")
dypn
^P1STREET("IS","ax biex`")
`xeib xa
^P1STREET("IS","ax biex`","dcwl")
lwcd
^P1STREET("IS","ax ieg`i")
i`gei xa
^P1STREET("IS","ax ieg`i","`ex bpef")
fepb xe`
^P1STREET("IS","axex gil")
lig xexa
^P1STREET("IS","axhrd")
drhxa
^P1STREET("IS","axkid")
dikxa
^P1STREET("IS","axrm")
mrxa
^P1STREET("IS","axw")
wxa
^P1STREET("IS","axw","klpiez")
zeiplk
^P1STREET("IS","axw","kxkem")
mekxk
^P1STREET("IS","axw","pexiez")
zeixep
^P1STREET("IS","axw`i")
i`wxa
^P1STREET("IS","axwo")
owxa
^P1STREET("IS","axwo","`lide `izo")
ozi` edil`
^P1STREET("IS","axwo","cxj axwo")
owxa jxc
^P1STREET("IS","axwo","d`ecm")
mce`d
^P1STREET("IS","axwo","d`exo")
oxe`d
^P1STREET("IS","axwo","d`ld")
dl`d
^P1STREET("IS","axwo","daxwz")
zwxad
^P1STREET("IS","axwo","dcwl")
lwcd
^P1STREET("IS","axwo","dexcim")
micxed
^P1STREET("IS","axwo","dglniy")
yinlgd
^P1STREET("IS","axwo","dqtix")
xitqd
^P1STREET("IS","axwo","drpax")
xaprd
^P1STREET("IS","axwo","drxad")
daxrd
^P1STREET("IS","axwo","dxces")
secxd
^P1STREET("IS","axwo","dyedm")
mdeyd
^P1STREET("IS","axwo","dypda")
adpyd
^P1STREET("IS","axwo","dz`pd")
dp`zd
^P1STREET("IS","axwo","nexo")
oxen
^P1STREET("IS","axwo","pexiz")
zixep
^P1STREET("IS","axwo","vlili dneqiwd")
dwiqend ililv
^P1STREET("IS","az gtx")
xtg za
^P1STREET("IS","az gtx","`yl")
ly`
^P1STREET("IS","az gtx","a`xi")
ix`a
^P1STREET("IS","az gtx","aiz dyihd")
dhiyd zia
^P1STREET("IS","az gtx","aiz fiz")
zif zia
^P1STREET("IS","az gtx","aiz pix")
xip zia
^P1STREET("IS","az gtx","aiz wnd")
dnw zia
^P1STREET("IS","az gtx","aiz wyz")
zyw zia
^P1STREET("IS","az gtx","avz")
zva
^P1STREET("IS","az gtx","awrez")
zerwa
^P1STREET("IS","az gtx","axwo")
owxa
^P1STREET("IS","az gtx","belo")
oleb
^P1STREET("IS","az gtx","blrc")
crlb
^P1STREET("IS","az gtx","bnl`")
`lnb
^P1STREET("IS","az gtx","cegl")
lgec
^P1STREET("IS","az gtx","cekitz")
ztikec
^P1STREET("IS","az gtx","cid")
dic
^P1STREET("IS","az gtx","d`exo")
oxe`d
^P1STREET("IS","az gtx","d`ld")
dl`d
^P1STREET("IS","az gtx","dblaer")
realbd
^P1STREET("IS","az gtx","dblil")
lilbd
^P1STREET("IS","az gtx","dgihd")
dhigd
^P1STREET("IS","az gtx","dgxviz")
zivxgd
^P1STREET("IS","az gtx","gavlz")
zlvag
^P1STREET("IS","az gtx","gippiz")
zippig
^P1STREET("IS","az gtx","glalea")
aelalg
^P1STREET("IS","az gtx","glnepiz")
zipenlg
^P1STREET("IS","az gtx","gva")
avg
^P1STREET("IS","az gtx","yc' dyenxeo")
oexneyd 'cy
^P1STREET("IS","az gtx","yc' dyxeo")
oexyd 'cy
^P1STREET("IS","az gtx","yc' rnw gtx")
xtg wnr 'cy
^P1STREET("IS","az im")
mi za
^P1STREET("IS","az im","`a` axciv'a")
a'vicxa `a`
^P1STREET("IS","az im","`ao baixel")
lexiab oa`
^P1STREET("IS","az im","`eqiywio")
oiwyiqe`
^P1STREET("IS","az im","`etix")
xite`
^P1STREET("IS","az im","`exh iyx`l")
l`xyi hxe`
^P1STREET("IS","az im","`g""i cwx")
xwc i"g`
^P1STREET("IS","az im","`gc drm")
mrd cg`
^P1STREET("IS","az im","`ilz")
zli`
^P1STREET("IS","az im","`inax")
xani`
^P1STREET("IS","az im","`li kdo")
odk il`
^P1STREET("IS","az im","`lnlig")
gilnl`
^P1STREET("IS","az im","`lzxno")
onxzl`
^P1STREET("IS","az im","`pd txpw")
wpxt dp`
^P1STREET("IS","az im","`pilaiu'")
'uialip`
^P1STREET("IS","az im","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","az im","`v""l")
l"v`
^P1STREET("IS","az im","`xfim")
mifx`
^P1STREET("IS","az im","`xlefexea")
aexefelx`
^P1STREET("IS","az im","`y ylem")
mely y`
^P1STREET("IS","az im","`zxeb")
bexz`
^P1STREET("IS","az im","aexekea")
aekexea
^P1STREET("IS","az im","afl")
lfa
^P1STREET("IS","az im","ai`liw")
wil`ia
^P1STREET("IS","az im","ail""e")
e"lia
^P1STREET("IS","az im","aiz ebo")
obe zia
^P1STREET("IS","az im","altex")
xetla
^P1STREET("IS","az im","ao ieqs")
sqei oa
^P1STREET("IS","az im","ao vai")
iav oa
^P1STREET("IS","az im","ao vieo glteo")
oetlg oeiv oa
^P1STREET("IS","az im","ao vieo iyx`l")
l`xyi oeiv oa
^P1STREET("IS","az im","ax `ilo")
oli` xa
^P1STREET("IS","az im","ax idecd")
dcedi xa
^P1STREET("IS","az im","axpx")
xpxa
^P1STREET("IS","az im","axu")
uxa
^P1STREET("IS","az im","b'pxl wpib")
bipw lxp'b
^P1STREET("IS","az im","b`elim")
mile`b
^P1STREET("IS","az im","barzi")
izrab
^P1STREET("IS","az im","belena")
aneleb
^P1STREET("IS","az im","bey rvieo")
oeivr yeb
^P1STREET("IS","az im","bipeqx")
xqepib
^P1STREET("IS","az im","blphi")
ihplb
^P1STREET("IS","az im","blpiz")
ziplb
^P1STREET("IS","az im","bpm nzzide")
edizzn mpb
^P1STREET("IS","az im","bxifim")
mifixb
^P1STREET("IS","az im","c""x nyd kdo")
odk dyn x"c
^P1STREET("IS","az im","c""x pix")
xip x"c
^P1STREET("IS","az im","ca def")
fed ac
^P1STREET("IS","az im","cbpid")
dipbc
^P1STREET("IS","az im","cebiz")
zibec
^P1STREET("IS","az im","cec dnlj")
jlnd cec
^P1STREET("IS","az im","celtio")
oitlec
^P1STREET("IS","az im","clid")
dilc
^P1STREET("IS","az im","cpi`l")
l`ipc
^P1STREET("IS","az im","cpio")
oipc
^P1STREET("IS","az im","cwx")
xwc
^P1STREET("IS","az im","cxj ao bexieo")
oeixeb oa jxc
^P1STREET("IS","az im","cxj npgm abio")
oiba mgpn jxc
^P1STREET("IS","az im","d`cne""x na`aea")
aea`an x"enc`d
^P1STREET("IS","az im","d`exbim")
mibxe`d
^P1STREET("IS","az im","d`nex`im")
mi`xen`d
^P1STREET("IS","az im","daepim")
mipead
^P1STREET("IS","az im","dapim")
mipad
^P1STREET("IS","az im","daxibcd")
dcbixad
^P1STREET("IS","az im","dbael")
leabd
^P1STREET("IS","az im","dbarez")
zerabd
^P1STREET("IS","az im","dbcec draxi")
ixard cecbd
^P1STREET("IS","az im","dbelo")
olebd
^P1STREET("IS","az im","dbiaexim")
mixeaibd
^P1STREET("IS","az im","dblaer")
realbd
^P1STREET("IS","az im","dblil")
lilbd
^P1STREET("IS","az im","dblrc")
crlbd
^P1STREET("IS","az im","dbto")
otbd
^P1STREET("IS","az im","dcci vieo")
oeiv iccd
^P1STREET("IS","az im","dcwl")
lwcd
^P1STREET("IS","az im","ddbpd")
dpbdd
^P1STREET("IS","az im","ddqzcxez")
zexczqdd
^P1STREET("IS","az im","dfiz")
zifd
^P1STREET("IS","az im","dglevim")
mivelgd
^P1STREET("IS","az im","dgynep`im")
mi`penygd
^P1STREET("IS","az im","dgynl")
lnygd
^P1STREET("IS","az im","dievwim")
miwveid
^P1STREET("IS","az im","dim")
mid
^P1STREET("IS","az im","dk""b")
b"kd
^P1STREET("IS","az im","dkxnl")
lnxkd
^P1STREET("IS","az im","dl""`")
`"ld
^P1STREET("IS","az im","dlaxyhh")
hhyxald
^P1STREET("IS","az im","dltx")
xtld
^P1STREET("IS","az im","dniiqcim")
micqiind
^P1STREET("IS","az im","dnl`kd")
dk`lnd
^P1STREET("IS","az im","dnlj y`el")
le`y jlnd
^P1STREET("IS","az im","dnlj ylnd")
dnly jlnd
^P1STREET("IS","az im","dnqbx")
xbqnd
^P1STREET("IS","az im","dnrtilim")
militrnd
^P1STREET("IS","az im","dnyexxz xgl")
lgx zxxeynd
^P1STREET("IS","az im","dpai`im")
mi`iapd
^P1STREET("IS","az im","dqaex`im")
mi`xeaqd
^P1STREET("IS","az im","dqellim")
milleqd
^P1STREET("IS","az im","draecd")
dceard
^P1STREET("IS","az im","drncez")
zecnrd
^P1STREET("IS","az im","drnl")
lnrd
^P1STREET("IS","az im","drvneo")
oenvrd
^P1STREET("IS","az im","dterl")
lretd
^P1STREET("IS","az im","dthno")
onhtd
^P1STREET("IS","az im","dtlcd")
dcltd
^P1STREET("IS","az im","dtln""g")
g"nltd
^P1STREET("IS","az im","dvextim")
mitxevd
^P1STREET("IS","az im","dvpgpim")
mipgpvd
^P1STREET("IS","az im","dvtixd")
dxitvd
^P1STREET("IS","az im","dwenniez")
zeinnewd
^P1STREET("IS","az im","dx`yepim")
mipey`xd
^P1STREET("IS","az im","dxa `airc")
cria` axd
^P1STREET("IS","az im","dxa ax y`el")
le`y xa axd
^P1STREET("IS","az im","dxa baifeo")
oefiab axd
^P1STREET("IS","az im","dxa dxveb")
bevxd axd
^P1STREET("IS","az im","dxa lefeo")
oefel axd
^P1STREET("IS","az im","dxa lei")
iel axd
^P1STREET("IS","az im","dxa nineo")
oenin axd
^P1STREET("IS","az im","dxa pqim akx")
xka miqp axd
^P1STREET("IS","az im","dxa vai idecd")
dcedi iav axd
^P1STREET("IS","az im","dxa wew")
wew axd
^P1STREET("IS","az im","dxa wewiq")
qiwew axd
^P1STREET("IS","az im","dxezm")
mzexd
^P1STREET("IS","az im","dxvl")
lvxd
^P1STREET("IS","az im","dxyz")
zyxd
^P1STREET("IS","az im","dyahim")
mihayd
^P1STREET("IS","az im","dyenx")
xneyd
^P1STREET("IS","az im","dyenxeo")
oexneyd
^P1STREET("IS","az im","dyethim")
mihteyd
^P1STREET("IS","az im","dyeypim")
mipyeyd
^P1STREET("IS","az im","dyleyd")
dyelyd
^P1STREET("IS","az im","dywnd")
dnwyd
^P1STREET("IS","az im","dyx axfili")
ilifxa xyd
^P1STREET("IS","az im","dyx tpwq")
qwpt xyd
^P1STREET("IS","az im","dyx ytix`")
`xity xyd
^P1STREET("IS","az im","dzaex")
xeazd
^P1STREET("IS","az im","dzezgpim")
mipgzezd
^P1STREET("IS","az im","dzgid")
digzd
^P1STREET("IS","az im","dzp`im")
mi`pzd
^P1STREET("IS","az im","eivno")
onvie
^P1STREET("IS","az im","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","az im","filax")
xalif
^P1STREET("IS","az im","fnpdes")
sedpnf
^P1STREET("IS","az im","fxeaal")
laaexf
^P1STREET("IS","az im","gi""y")
y"ig
^P1STREET("IS","az im","giim lqwea")
aewql miig
^P1STREET("IS","az im","gim")
mig
^P1STREET("IS","az im","glniz")
zinlg
^P1STREET("IS","az im","gnc drnw")
wnrd cng
^P1STREET("IS","az im","gpd qpy")
ypq dpg
^P1STREET("IS","az im","gppiz")
zippg
^P1STREET("IS","az im","gvex")
xevg
^P1STREET("IS","az im","gxeyz")
zyexg
^P1STREET("IS","az im","hapwio")
oiwpah
^P1STREET("IS","az im","hxentlcex")
xecltnexh
^P1STREET("IS","az im","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","az im","i""l txu")
uxt l"i
^P1STREET("IS","az im","idecd dlei")
ield dcedi
^P1STREET("IS","az im","iegpo dqpclx")
xlcpqd opgei
^P1STREET("IS","az im","iehazd")
dzahei
^P1STREET("IS","az im","ieqs dpyi`")
`iypd sqei
^P1STREET("IS","az im","ieqthl")
lhtqei
^P1STREET("IS","az im","iqnio")
oinqi
^P1STREET("IS","az im","ivgw ycd")
dcy wgvi
^P1STREET("IS","az im","iwe`l")
l`ewi
^P1STREET("IS","az im","iwipheo")
oehpiwi
^P1STREET("IS","az im","ixeylim")
milyexi
^P1STREET("IS","az im","iyx`liq")
qil`xyi
^P1STREET("IS","az im","k""h apeanax")
xanaepa h"k
^P1STREET("IS","az im","keayi dgxneo")
oenxgd iyaek
^P1STREET("IS","az im","kpex cec")
cec xepk
^P1STREET("IS","az im","kpxz")
zxpk
^P1STREET("IS","az im","kvplqeo")
oeqlpvk
^P1STREET("IS","az im","leizo")
oziel
^P1STREET("IS","az im","lg""i")
i"gl
^P1STREET("IS","az im","liaexpe")
epxeail
^P1STREET("IS","az im","liaqwipc")
cpiwqail
^P1STREET("IS","az im","lie`i")
i`eil
^P1STREET("IS","az im","lkiy")
yikl
^P1STREET("IS","az im","n""b")
b"n
^P1STREET("IS","az im","navr qipi")
ipiq rvan
^P1STREET("IS","az im","nbice")
ecibn
^P1STREET("IS","az im","necili`pi")
ip`ilicen
^P1STREET("IS","az im","necirio")
oiricen
^P1STREET("IS","az im","nedliax")
xailden
^P1STREET("IS","az im","nekxi dqibxiez")
zeixbiqd ixken
^P1STREET("IS","az im","ngxefz")
zfexgn
^P1STREET("IS","az im","niifl")
lfiin
^P1STREET("IS","az im","npcli nekx qtxim")
mixtq xken ilcpn
^P1STREET("IS","az im","nqxiw")
wixqn
^P1STREET("IS","az im","nrax iyi")
iyi xarn
^P1STREET("IS","az im","nrepez im")
mi zepern
^P1STREET("IS","az im","nvcd")
dcvn
^P1STREET("IS","az im","nvecz aiz""x")
x"zia zcevn
^P1STREET("IS","az im","nvtd")
dtvn
^P1STREET("IS","az im","nxac dwqnim")
minqwd caxn
^P1STREET("IS","az im","nxbpiz")
zipbxn
^P1STREET("IS","az im","ny' `iil")
lii` 'yn
^P1STREET("IS","az im","nyd yxz")
zxy dyn
^P1STREET("IS","az im","pbad")
dabp
^P1STREET("IS","az im","peiwlo")
olwiep
^P1STREET("IS","az im","peqa`em ivgw")
wgvi me`aqep
^P1STREET("IS","az im","pexc`e nwq")
qwn e`cxep
^P1STREET("IS","az im","pgiiqi `lide")
edil` iqiigp
^P1STREET("IS","az im","piqpa`em ivgw")
wgvi me`apqip
^P1STREET("IS","az im","pivpd")
dpvip
^P1STREET("IS","az im","ptg` ivgw")
wgvi `gtp
^P1STREET("IS","az im","pxwiq")
qiwxp
^P1STREET("IS","az im","pzo dpai`")
`iapd ozp
^P1STREET("IS","az im","qelc")
cleq
^P1STREET("IS","az im","qewelea")
aeleweq
^P1STREET("IS","az im","qhxend")
dnexhq
^P1STREET("IS","az im","qn' d`ilpez")
zepli`d 'nq
^P1STREET("IS","az im","qn' dexcim")
micxed 'nq
^P1STREET("IS","az im","qn' drnw")
wnrd 'nq
^P1STREET("IS","az im","qn' dvitexpim")
mipxetivd 'nq
^P1STREET("IS","az im","qn' dx`yepim")
mipey`xd 'nq
^P1STREET("IS","az im","qn' dyxeo")
oexyd 'nq
^P1STREET("IS","az im","qn' pil""i")
i"lip 'nq
^P1STREET("IS","az im","qpd nyd")
dyn dpq
^P1STREET("IS","az im","rcelq")
qlecr
^P1STREET("IS","az im","refi`l")
l`ifer
^P1STREET("IS","az im","rfx`")
`xfr
^P1STREET("IS","az im","rlid a'")
'a dilr
^P1STREET("IS","az im","trnepiz")
zipenrt
^P1STREET("IS","az im","txlyhiio")
oiihylxt
^P1STREET("IS","az im","vdl")
ldv
^P1STREET("IS","az im","vxpi`wea")
aew`ipxv
^P1STREET("IS","az im","waeu bleiez")
zeielb ueaw
^P1STREET("IS","az im","wceyi levw")
wvel iyecw
^P1STREET("IS","az im","wceyi wdix")
xidw iyecw
^P1STREET("IS","az im","wdilz qlepim")
mipelq zlidw
^P1STREET("IS","az im","wdilz wpcd")
dcpw zlidw
^P1STREET("IS","az im","wexv'w")
w'vxew
^P1STREET("IS","az im","wleifpx")
xpfielw
^P1STREET("IS","az im","wxizi")
izixw
^P1STREET("IS","az im","wxo diqec")
ceqid oxw
^P1STREET("IS","az im","wxo winz")
zniw oxw
^P1STREET("IS","az im","xai apinio")
oinipa iax
^P1STREET("IS","az im","xaipeaiu")
uiaepiax
^P1STREET("IS","az im","xda")
adx
^P1STREET("IS","az im","xehyilc")
cliyhex
^P1STREET("IS","az im","xfi`l")
l`ifx
^P1STREET("IS","az im","xiiw gaiad")
daiag wiix
^P1STREET("IS","az im","xna""m")
m"anx
^P1STREET("IS","az im","xneo")
oenx
^P1STREET("IS","az im","xnf")
fnx
^P1STREET("IS","az im","xwtz")
ztwx
^P1STREET("IS","az im","y""i rbpeo")
oepbr i"y
^P1STREET("IS","az im","yafi")
ifay
^P1STREET("IS","az im","yc' drvn`ez")
ze`nvrd 'cy
^P1STREET("IS","az im","yhxo")
oxhy
^P1STREET("IS","az im","yiaz vieo")
oeiv zaiy
^P1STREET("IS","az im","yipclx `eqwx")
xwqe` xlcpiy
^P1STREET("IS","az im","ylem rlikm")
mkilr mely
^P1STREET("IS","az im","ynreo daexqw`i")
i`wqxead oerny
^P1STREET("IS","az im","yo `xi")
ix` oy
^P1STREET("IS","az im","ytxax giim")
miig xaxty
^P1STREET("IS","az im","ytz` ivgw")
wgvi `zty
^P1STREET("IS","az im","yyz dinim")
minid zyy
^P1STREET("IS","az im","zl gi")
ig lz
^P1STREET("IS","az im","zpio")
oipz
^P1STREET("IS","az ylnd")
dnly za
^P1STREET("IS","azix")
xiza
^P1STREET("IS","b'`qx `-fxw`")
`wxf-` xq`'b
^P1STREET("IS","b'ar")
ra'b
^P1STREET("IS","b'ciicd-nkx")
xkn-dciic'b
^P1STREET("IS","b'ciicd-nkx","xg' 101")
101 'gx
^P1STREET("IS","b'eliq")
qile'b
^P1STREET("IS","b'ieq")
qei'b
^P1STREET("IS","b'laeo")
oeal'b
^P1STREET("IS","b'lb'elid")
dile'bl'b
^P1STREET("IS","b'lb'elid","xg' 1")
1 'gx
^P1STREET("IS","b'lb'elid","xg' 103")
103 'gx
^P1STREET("IS","b'lb'elid","xg' 105")
105 'gx
^P1STREET("IS","b'lb'elid","xg' 106")
106 'gx
^P1STREET("IS","b'lb'elid","xg' 107")
107 'gx
^P1STREET("IS","b'lb'elid","xg' 108")
108 'gx
^P1STREET("IS","b'lb'elid","xg' 110")
110 'gx
^P1STREET("IS","b'lb'elid","xg' 111")
111 'gx
^P1STREET("IS","b'lb'elid","xg' 112")
112 'gx
^P1STREET("IS","b'lb'elid","xg' 113")
113 'gx
^P1STREET("IS","b'lb'elid","xg' 115")
115 'gx
^P1STREET("IS","b'lb'elid","xg' 116")
116 'gx
^P1STREET("IS","b'lb'elid","xg' 117")
117 'gx
^P1STREET("IS","b'lb'elid","xg' 118")
118 'gx
^P1STREET("IS","b'lb'elid","xg' 120")
120 'gx
^P1STREET("IS","b'lb'elid","xg' 123")
123 'gx
^P1STREET("IS","b'lb'elid","xg' 124")
124 'gx
^P1STREET("IS","b'lb'elid","xg' 127")
127 'gx
^P1STREET("IS","b'lb'elid","xg' 128")
128 'gx
^P1STREET("IS","b'lb'elid","xg' 129")
129 'gx
^P1STREET("IS","b'lb'elid","xg' 130")
130 'gx
^P1STREET("IS","b'lb'elid","xg' 131")
131 'gx
^P1STREET("IS","b'lb'elid","xg' 132")
132 'gx
^P1STREET("IS","b'lb'elid","xg' 133")
133 'gx
^P1STREET("IS","b'lb'elid","xg' 134")
134 'gx
^P1STREET("IS","b'lb'elid","xg' 135")
135 'gx
^P1STREET("IS","b'lb'elid","xg' 136")
136 'gx
^P1STREET("IS","b'lb'elid","xg' 137")
137 'gx
^P1STREET("IS","b'lb'elid","xg' 139")
139 'gx
^P1STREET("IS","b'lb'elid","xg' 141")
141 'gx
^P1STREET("IS","b'lb'elid","xg' 144")
144 'gx
^P1STREET("IS","b'lb'elid","xg' 151")
151 'gx
^P1STREET("IS","b'lb'elid","xg' 152")
152 'gx
^P1STREET("IS","b'lb'elid","xg' 170")
170 'gx
^P1STREET("IS","b'lb'elid","xg' 171")
171 'gx
^P1STREET("IS","b'lb'elid","xg' 172")
172 'gx
^P1STREET("IS","b'lb'elid","xg' 2")
2 'gx
^P1STREET("IS","b'pio")
oip'b
^P1STREET("IS","b'pio","pvxz")
zxvp
^P1STREET("IS","b'z dnyely")
yleynd z'b
^P1STREET("IS","b'z dnyely","xg' 1")
1 'gx
^P1STREET("IS","b'z dnyely","xg' 12")
12 'gx
^P1STREET("IS","b'z dnyely","xg' 13")
13 'gx
^P1STREET("IS","b'z dnyely","xg' 133")
133 'gx
^P1STREET("IS","b'z dnyely","xg' 14")
14 'gx
^P1STREET("IS","b'z dnyely","xg' 15")
15 'gx
^P1STREET("IS","b'z dnyely","xg' 164")
164 'gx
^P1STREET("IS","b'z dnyely","xg' 17")
17 'gx
^P1STREET("IS","b'z dnyely","xg' 173")
173 'gx
^P1STREET("IS","b'z dnyely","xg' 18")
18 'gx
^P1STREET("IS","b'z dnyely","xg' 19")
19 'gx
^P1STREET("IS","b'z dnyely","xg' 2")
2 'gx
^P1STREET("IS","b'z dnyely","xg' 20")
20 'gx
^P1STREET("IS","b'z dnyely","xg' 4")
4 'gx
^P1STREET("IS","b'z dnyely","xg' 42")
42 'gx
^P1STREET("IS","b'z dnyely","xg' 64")
64 'gx
^P1STREET("IS","b'z dnyely","xg' 7")
7 'gx
^P1STREET("IS","b'z dnyely","xg' 8")
8 'gx
^P1STREET("IS","b`elim")
mile`b
^P1STREET("IS","b`lid")
dil`b
^P1STREET("IS","b`lid","`leo")
oel`
^P1STREET("IS","b`lid","`xf")
fx`
^P1STREET("IS","b`lid","cela")
alec
^P1STREET("IS","b`lid","d`bef")
feb`d
^P1STREET("IS","b`lid","xineo")
oenix
^P1STREET("IS","baelez")
zeleab
^P1STREET("IS","baim")
miab
^P1STREET("IS","bar")
rab
^P1STREET("IS","bar apinio [`cm]")
(mc`) oinipa rab
^P1STREET("IS","bar apinio [`cm]","bar apinio")
oinipa rab
^P1STREET("IS","bar apinio [`cm]","dgavlz")
zlvagd
^P1STREET("IS","bar apinio [`cm]","dgva")
avgd
^P1STREET("IS","bar apinio [`cm]","dgxviz")
zivxgd
^P1STREET("IS","bar apinio [`cm]","diqnio")
oinqid
^P1STREET("IS","bar apinio [`cm]","dlilj")
jlild
^P1STREET("IS","bar apinio [`cm]","dpxwiq")
qiwxpd
^P1STREET("IS","bar apinio [`cm]","dvitexo")
oxetivd
^P1STREET("IS","bar apinio [`cm]","dxces")
secxd
^P1STREET("IS","bar apinio [`cm]","iwipheo")
oehpiwi
^P1STREET("IS","bar apinio [`cm]","qaieo")
oeiaq
^P1STREET("IS","bar apinio [`cm]","rixiz")
zixir
^P1STREET("IS","bar apinio [`cm]","yc' `cm")
mc` 'cy
^P1STREET("IS","bar kxnl")
lnxk rab
^P1STREET("IS","bar kxnl","nyrel dtxcq")
qcxtd leryn
^P1STREET("IS","bar kxnl","ydm")
mdy
^P1STREET("IS","bareo dgcyd")
dycgd oerab
^P1STREET("IS","bareo dgcyd","d`exo")
oxe`d
^P1STREET("IS","bareo dgcyd","d`leo")
oel`d
^P1STREET("IS","bareo dgcyd","d`lneo")
oenl`d
^P1STREET("IS","bareo dgcyd","dceacao")
oacaecd
^P1STREET("IS","bareo dgcyd","dcela")
alecd
^P1STREET("IS","bareo dgcyd","ddcq")
qcdd
^P1STREET("IS","bareo dgcyd","dxezm")
mzexd
^P1STREET("IS","bareo dgcyd","klil dgexy")
yxegd lilk
^P1STREET("IS","bareo dgcyd","liapd")
dpail
^P1STREET("IS","barz `api")
ipa` zrab
^P1STREET("IS","barz `api","`expim")
mipxe`
^P1STREET("IS","barz `api","`ixeqim")
miqexi`
^P1STREET("IS","barz `api","`leo")
oel`
^P1STREET("IS","barz `api","dcwlim")
milwcd
^P1STREET("IS","barz `api","dqaiepim")
mipeiaqd
^P1STREET("IS","barz `api","klpiez")
zeiplk
^P1STREET("IS","barz `api","pxwiqim")
miqiwxp
^P1STREET("IS","barz `expim")
mipxe` zrab
^P1STREET("IS","barz `expim","`lrfx")
xfrl`
^P1STREET("IS","barz `ld")
dl` zrab
^P1STREET("IS","barz `ld","`ileo")
oeli`
^P1STREET("IS","barz `ld","`lepim")
mipel`
^P1STREET("IS","barz `ld","barz `ld")
dl` zrab
^P1STREET("IS","barz `ld","bipeqx")
xqepib
^P1STREET("IS","barz `ld","clid")
dilc
^P1STREET("IS","barz `ld","co")
oc
^P1STREET("IS","barz `ld","ctpd")
dptc
^P1STREET("IS","barz `ld","d`zxeb")
bexz`d
^P1STREET("IS","barz `ld","dblil")
lilbd
^P1STREET("IS","barz `ld","dfexrim")
mirxefd
^P1STREET("IS","barz `ld","drnw")
wnrd
^P1STREET("IS","barz `ld","gpizd")
dzipg
^P1STREET("IS","barz `ld","ngpiim")
miipgn
^P1STREET("IS","barz `ld","nqcd")
dcqn
^P1STREET("IS","barz `ld","rio ba")
ab oir
^P1STREET("IS","barz `ld","yrx dbelo")
olebd xry
^P1STREET("IS","barz axpx")
xpxa zrab
^P1STREET("IS","barz f`a")
a`f zrab
^P1STREET("IS","barz f`a","`api dgeyo")
oyegd ipa`
^P1STREET("IS","barz f`a","a`xez")
zex`a
^P1STREET("IS","barz f`a","bareo")
oerab
^P1STREET("IS","barz f`a","cekitz")
ztikec
^P1STREET("IS","barz f`a","cxbez")
zebxc
^P1STREET("IS","barz f`a","d`zxeb")
bexz`d
^P1STREET("IS","barz f`a","dbi`")
`ibd
^P1STREET("IS","barz f`a","dcq")
qcd
^P1STREET("IS","barz f`a","dfnix")
xinfd
^P1STREET("IS","barz f`a","dlela")
aleld
^P1STREET("IS","barz f`a","dnxbpiz")
zipbxnd
^P1STREET("IS","barz f`a","drxad")
daxrd
^P1STREET("IS","barz f`a","dx yne`l")
l`eny xd
^P1STREET("IS","barz f`a","dxgad")
dagxd
^P1STREET("IS","barz f`a","dzcdx")
xdczd
^P1STREET("IS","barz f`a","dzenx")
xnezd
^P1STREET("IS","barz f`a","dzex")
xezd
^P1STREET("IS","barz f`a","fiz")
zif
^P1STREET("IS","barz f`a","g""i")
i"g
^P1STREET("IS","barz f`a","gax")
xag
^P1STREET("IS","barz f`a","ideyr ao peo")
oep oa ryedi
^P1STREET("IS","barz f`a","irlim")
milri
^P1STREET("IS","barz f`a","iwipheo")
oehpiwi
^P1STREET("IS","barz f`a","laepd")
dpeal
^P1STREET("IS","barz f`a","nae` dbto")
otbd `ean
^P1STREET("IS","barz f`a","nae` dyny")
ynyd `ean
^P1STREET("IS","barz f`a","nae` dywnd")
dnwyd `ean
^P1STREET("IS","barz f`a","nexyz apinio")
oinipa zyxen
^P1STREET("IS","barz f`a","nkaim")
miakn
^P1STREET("IS","barz f`a","nvtd")
dtvn
^P1STREET("IS","barz f`a","nyrel d`cnepiz")
zipenc`d leryn
^P1STREET("IS","barz f`a","pgli`li")
il`ilgp
^P1STREET("IS","barz f`a","rlneo")
oenlr
^P1STREET("IS","barz f`a","rnw `ileo")
oeli` wnr
^P1STREET("IS","barz f`a","rpzez")
zezpr
^P1STREET("IS","barz f`a","rtxd")
dxtr
^P1STREET("IS","barz f`a","rtxepi")
ipextr
^P1STREET("IS","barz f`a","rxebez")
zebexr
^P1STREET("IS","barz f`a","wicxeo")
oexciw
^P1STREET("IS","barz f`a","wxiz irxim")
mixri zixw
^P1STREET("IS","barz f`a","xnd")
dnx
^P1STREET("IS","barz f`a","y`el dnlj")
jlnd le`y
^P1STREET("IS","barz f`a","yah apinio")
oinipa hay
^P1STREET("IS","barz f`a","ywc")
cwy
^P1STREET("IS","barz f`a","z`pd")
dp`z
^P1STREET("IS","barz giim n`egc")
cge`n miig zrab
^P1STREET("IS","barz go")
og zrab
^P1STREET("IS","barz go","trni `aia")
aia` inrt
^P1STREET("IS","barz ie`a")
a`ei zrab
^P1STREET("IS","barz ie`a","xnz dbelo")
olebd znx
^P1STREET("IS","barz irxim")
mixri zrab
^P1STREET("IS","barz irxim","`iilz go")
og zlii`
^P1STREET("IS","barz irxim","dxi idecd")
dcedi ixd
^P1STREET("IS","barz irxim","nxac dwqnim")
minqwd caxn
^P1STREET("IS","barz irxim","tlg dxineo")
oenixd glt
^P1STREET("IS","barz kg")
gk zrab
^P1STREET("IS","barz kg","dxces")
secxd
^P1STREET("IS","barz kg","pgld")
dlgp
^P1STREET("IS","barz pili")
ilip zrab
^P1STREET("IS","barz qaieo")
oeiaq zrab
^P1STREET("IS","barz qaieo","xa`eo")
oe`ax
^P1STREET("IS","barz rcd")
dcr zrab
^P1STREET("IS","barz rcd","biex`")
`xeib
^P1STREET("IS","barz rcd","d`bef")
feb`d
^P1STREET("IS","barz rcd","d`bq")
qb`d
^P1STREET("IS","barz rcd","d`expim")
mipxe`d
^P1STREET("IS","barz rcd","d`ld")
dl`d
^P1STREET("IS","barz rcd","d`leo")
oel`d
^P1STREET("IS","barz rcd","d`xfim")
mifx`d
^P1STREET("IS","barz rcd","d`ykel")
leky`d
^P1STREET("IS","barz rcd","dbard")
drabd
^P1STREET("IS","barz rcd","dben`")
`nebd
^P1STREET("IS","barz rcd","dbto")
otbd
^P1STREET("IS","barz rcd","dcbo")
obcd
^P1STREET("IS","barz rcd","dcwl")
lwcd
^P1STREET("IS","barz rcd","dcx")
xcd
^P1STREET("IS","barz rcd","ddxces")
secxdd
^P1STREET("IS","barz rcd","dfiz")
zifd
^P1STREET("IS","barz rcd","dgxea")
aexgd
^P1STREET("IS","barz rcd","dlaepd")
dpeald
^P1STREET("IS","barz rcd","dwnd")
dnwd
^P1STREET("IS","barz rcd","dx`yepim")
mipey`xd
^P1STREET("IS","barz rcd","dxezm")
mzexd
^P1STREET("IS","barz rcd","dxgad")
dagxd
^P1STREET("IS","barz rcd","dxineo")
oenixd
^P1STREET("IS","barz rcd","dxvl")
lvxd
^P1STREET("IS","barz rcd","dyrexd")
dxeryd
^P1STREET("IS","barz rcd","dywc")
cwyd
^P1STREET("IS","barz rcd","dz`pd")
dp`zd
^P1STREET("IS","barz rcd","eeltqeo")
oeqtlee
^P1STREET("IS","barz rcd","g""i")
i"g
^P1STREET("IS","barz rcd","ieqthl")
lhtqei
^P1STREET("IS","barz rcd","qncx")
xcnq
^P1STREET("IS","barz rcd","xbaim")
miabx
^P1STREET("IS","barz ref")
fer zrab
^P1STREET("IS","barz yne`l")
l`eny zrab
^P1STREET("IS","barz yne`l","`exi vai bxipaxb")
bxapixb iav ixe`
^P1STREET("IS","barz yne`l","`expim")
mipxe`
^P1STREET("IS","barz yne`l","`lepim")
mipel`
^P1STREET("IS","barz yne`l","`txim")
mixt`
^P1STREET("IS","barz yne`l","`xfim")
mifx`
^P1STREET("IS","barz yne`l","`xlefexea")
aexefelx`
^P1STREET("IS","barz yne`l","a`xi")
ix`a
^P1STREET("IS","barz yne`l","ai`liw")
wil`ia
^P1STREET("IS","barz yne`l","alej")
jela
^P1STREET("IS","barz yne`l","ao bexieo")
oeixeb oa
^P1STREET("IS","barz yne`l","ao ieqs")
sqei oa
^P1STREET("IS","barz yne`l","ax `ilo")
oli` xa
^P1STREET("IS","barz yne`l","ax keka`")
`akek xa
^P1STREET("IS","barz yne`l","axpyhio kdo")
odk oihypxa
^P1STREET("IS","barz yne`l","bey rvieo")
oeivr yeb
^P1STREET("IS","barz yne`l","biex`")
`xeib
^P1STREET("IS","barz yne`l","cec `lrfx")
xfrl` cec
^P1STREET("IS","barz yne`l","cxj dnlj")
jlnd jxc
^P1STREET("IS","barz yne`l","d`ixeq")
qexi`d
^P1STREET("IS","barz yne`l","dbiaexim")
mixeaibd
^P1STREET("IS","barz yne`l","dbto")
otbd
^P1STREET("IS","barz yne`l","dcwl")
lwcd
^P1STREET("IS","barz yne`l","dfizim")
mizifd
^P1STREET("IS","barz yne`l","dhqbi `dxo")
oxd` ibqhd
^P1STREET("IS","barz yne`l","dllq ylnd")
dnly qlld
^P1STREET("IS","barz yne`l","dnkaim")
miaknd
^P1STREET("IS","barz yne`l","dpyi`")
`iypd
^P1STREET("IS","barz yne`l","draecd")
dceard
^P1STREET("IS","barz yne`l","drvn`ez yc")
cy ze`nvrd
^P1STREET("IS","barz yne`l","dtln""g")
g"nltd
^P1STREET("IS","barz yne`l","dxa qelm nyd")
dyn mleq axd
^P1STREET("IS","barz yne`l","dxineo")
oenixd
^P1STREET("IS","barz yne`l","dxveb")
bevxd
^P1STREET("IS","barz yne`l","dxvl")
lvxd
^P1STREET("IS","barz yne`l","dygx")
xgyd
^P1STREET("IS","barz yne`l","dz`pd")
dp`zd
^P1STREET("IS","barz yne`l","dzenx")
xnezd
^P1STREET("IS","barz yne`l","dznx")
xnzd
^P1STREET("IS","barz yne`l","eivno")
onvie
^P1STREET("IS","barz yne`l","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","barz yne`l","faeleo dnx")
xnd oeleaf
^P1STREET("IS","barz yne`l","giim ax la")
al xa miig
^P1STREET("IS","barz yne`l","giim lpc`e")
e`cpl miig
^P1STREET("IS","barz yne`l","gpd qpy")
ypq dpg
^P1STREET("IS","barz yne`l","hix`o")
o`xih
^P1STREET("IS","barz yne`l","hxentlcex")
xecltnexh
^P1STREET("IS","barz yne`l","idecd dlei")
ield dcedi
^P1STREET("IS","barz yne`l","iepi pzpide")
edipzp ipei
^P1STREET("IS","barz yne`l","itzg")
gzti
^P1STREET("IS","barz yne`l","ivgw ycd")
dcy wgvi
^P1STREET("IS","barz yne`l","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","barz yne`l","lit`")
`til
^P1STREET("IS","barz yne`l","navr wcy")
ycw rvan
^P1STREET("IS","barz yne`l","nceax")
xaecn
^P1STREET("IS","barz yne`l","npgm abio")
oiba mgpn
^P1STREET("IS","barz yne`l","nxcki nehd bex")
xeb dhen ikcxn
^P1STREET("IS","barz yne`l","pg nefq")
qfen gp
^P1STREET("IS","barz yne`l","pgem")
megp
^P1STREET("IS","barz yne`l","qixpi")
ipxiq
^P1STREET("IS","barz yne`l","qn' aepi")
ipea 'nq
^P1STREET("IS","barz yne`l","qn' dxa wew")
wew axd 'nq
^P1STREET("IS","barz yne`l","qn' fipbx")
xbpif 'nq
^P1STREET("IS","barz yne`l","qn' irwa")
awri 'nq
^P1STREET("IS","barz yne`l","qn' ivgw necri")
ircen wgvi 'nq
^P1STREET("IS","barz yne`l","qn' lei `ykel")
leky` iel 'nq
^P1STREET("IS","barz yne`l","qn' nyd ciio")
oiic dyn 'nq
^P1STREET("IS","barz yne`l","qn' pg")
gp 'nq
^P1STREET("IS","barz yne`l","qn' pgem")
megp 'nq
^P1STREET("IS","barz yne`l","qn' pinxeax")
xaexnip 'nq
^P1STREET("IS","barz yne`l","qn' xawd")
dwax 'nq
^P1STREET("IS","barz yne`l","qn' xgl")
lgx 'nq
^P1STREET("IS","barz yne`l","qn' yi rbpeo")
oepbr iy 'nq
^P1STREET("IS","barz yne`l","qn' yngd delvaxb")
bxavled dgny 'nq
^P1STREET("IS","barz yne`l","refi`l")
l`ifer
^P1STREET("IS","barz yne`l","tipq")
qpit
^P1STREET("IS","barz yne`l","tiwqlx")
xlqwit
^P1STREET("IS","barz yne`l","txcq xefpalem")
melapfex qcxt
^P1STREET("IS","barz yne`l","txu")
uxt
^P1STREET("IS","barz yne`l","viepez")
zepeiv
^P1STREET("IS","barz yne`l","wxo diqec")
ceqid oxw
^P1STREET("IS","barz yne`l","wxtl lit`")
`til ltxw
^P1STREET("IS","barz yne`l","xgaz `ilo")
oli` zagx
^P1STREET("IS","barz yne`l","xna""m")
m"anx
^P1STREET("IS","barz yne`l","yc' db`elim")
mile`bd 'cy
^P1STREET("IS","barz yne`l","yhiipaxb")
bxapiihy
^P1STREET("IS","barz yne`l","ytipcl iepd")
dpei lcpity
^P1STREET("IS","barz yny")
yny zrab
^P1STREET("IS","barzi")
izrab
^P1STREET("IS","barziim")
miizrab
^P1STREET("IS","barziim","`""c bexceo")
oecxeb c"`
^P1STREET("IS","barziim","`api fkxeo")
oexkf ipa`
^P1STREET("IS","barziim","`dxeo")
oexd`
^P1STREET("IS","barziim","`gcez draecd")
dceard zecg`
^P1STREET("IS","barziim","`icniz")
zinci`
^P1STREET("IS","barziim","`ilz")
zli`
^P1STREET("IS","barziim","`lenez")
zenel`
^P1STREET("IS","barziim","`les ycd")
dcy sel`
^P1STREET("IS","barziim","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","barziim","`tpx")
xpt`
^P1STREET("IS","barziim","`tw")
wt`
^P1STREET("IS","barziim","`xi`l")
l`ix`
^P1STREET("IS","barziim","`xlefexea")
aexefelx`
^P1STREET("IS","barziim","`xpeo")
oepx`
^P1STREET("IS","barziim","aexekea")
aekexea
^P1STREET("IS","barziim","ai`liw")
wil`ia
^P1STREET("IS","barziim","alej")
jela
^P1STREET("IS","barziim","ao vieo iyx`li")
il`xyi oeiv oa
^P1STREET("IS","barziim","ax`yiz")
ziy`xa
^P1STREET("IS","barziim","axciv'aqwi")
iwqa'vicxa
^P1STREET("IS","barziim","axej")
jexa
^P1STREET("IS","barziim","baelez")
zeleab
^P1STREET("IS","barziim","bar")
rab
^P1STREET("IS","barziim","belcyhiio `dxeo")
oexd` oiihycleb
^P1STREET("IS","barziim","belena")
aneleb
^P1STREET("IS","barziim","bepo")
opeb
^P1STREET("IS","barziim","bey rvieo")
oeivr yeb
^P1STREET("IS","barziim","bfiz")
zifb
^P1STREET("IS","barziim","blaer")
realb
^P1STREET("IS","barziim","bpqio")
oiqpb
^P1STREET("IS","barziim","ca txicno")
oncixt ac
^P1STREET("IS","barziim","cec ilio")
oili cec
^P1STREET("IS","barziim","cec txicno")
oncixt cec
^P1STREET("IS","barziim","clid")
dilc
^P1STREET("IS","barziim","co")
oc
^P1STREET("IS","barziim","cxj ao bexieo")
oeixeb oa jxc
^P1STREET("IS","barziim","cxj dbaexd")
dxeabd jxc
^P1STREET("IS","barziim","cxj dylem")
melyd jxc
^P1STREET("IS","barziim","cxj ivgw xaio")
oiax wgvi jxc
^P1STREET("IS","barziim","d`v""l")
l"v`d
^P1STREET("IS","barziim","dbexo")
oxebd
^P1STREET("IS","barziim","dcbpim")
mipbcd
^P1STREET("IS","barziim","dcq")
qcd
^P1STREET("IS","barziim","ddbpd")
dpbdd
^P1STREET("IS","barziim","ddqzcxez")
zexczqdd
^P1STREET("IS","barziim","dexcim")
micxed
^P1STREET("IS","barziim","dicic")
cicid
^P1STREET("IS","barziim","dkpqz")
zqpkd
^P1STREET("IS","barziim","dl""d")
d"ld
^P1STREET("IS","barziim","dn`aw")
wa`nd
^P1STREET("IS","barziim","dn`ex")
xe`nd
^P1STREET("IS","barziim","dnae`")
`eand
^P1STREET("IS","barziim","dnbcl")
lcbnd
^P1STREET("IS","barziim","dncxbez")
zebxcnd
^P1STREET("IS","barziim","dnexc")
cxend
^P1STREET("IS","barziim","dnlao")
oalnd
^P1STREET("IS","barziim","dnrbl")
lbrnd
^P1STREET("IS","barziim","dnrexx")
xxernd
^P1STREET("IS","barziim","dnrio")
oirnd
^P1STREET("IS","barziim","dnrlez")
zelrnd
^P1STREET("IS","barziim","dntpd")
dptnd
^P1STREET("IS","barziim","dnxi")
ixnd
^P1STREET("IS","barziim","dpbad")
dabpd
^P1STREET("IS","barziim","dpcia")
aicpd
^P1STREET("IS","barziim","dterl dvrix")
xirvd lretd
^P1STREET("IS","barziim","dtln""g")
g"nltd
^P1STREET("IS","barziim","dvpgpim")
mipgpvd
^P1STREET("IS","barziim","dx`l")
l`xd
^P1STREET("IS","barziim","dxveb")
bevxd
^P1STREET("IS","barziim","dyenx")
xneyd
^P1STREET("IS","barziim","dylaim")
mialyd
^P1STREET("IS","barziim","dypiim")
miipyd
^P1STREET("IS","barziim","dzr""y")
y"rzd
^P1STREET("IS","barziim","eivno")
onvie
^P1STREET("IS","barziim","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","barziim","go")
og
^P1STREET("IS","barziim","gpd qpy")
ypq dpg
^P1STREET("IS","barziim","gpizd")
dzipg
^P1STREET("IS","barziim","hapwio")
oiwpah
^P1STREET("IS","barziim","hiiax")
xaiih
^P1STREET("IS","barziim","iapi`li")
il`ipai
^P1STREET("IS","barziim","ib`l `leo")
oel` l`bi
^P1STREET("IS","barziim","ic nxcki")
ikcxn ci
^P1STREET("IS","barziim","ilci hdxo")
oxdh icli
^P1STREET("IS","barziim","itd pes")
sep dti
^P1STREET("IS","barziim","ivgw xginea")
aenigx wgvi
^P1STREET("IS","barziim","ivgw ycd")
dcy wgvi
^P1STREET("IS","barziim","k""b")
b"k
^P1STREET("IS","barziim","kexfio")
oifxek
^P1STREET("IS","barziim","klpiz")
ziplk
^P1STREET("IS","barziim","kpxz")
zxpk
^P1STREET("IS","barziim","kvplqeo")
oeqlpvk
^P1STREET("IS","barziim","lai`")
`ial
^P1STREET("IS","barziim","lkiy")
yikl
^P1STREET("IS","barziim","ndxyw")
wyxdn
^P1STREET("IS","barziim","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","barziim","npexd")
dxepn
^P1STREET("IS","barziim","npxd")
dxpn
^P1STREET("IS","barziim","nqcd")
dcqn
^P1STREET("IS","barziim","nref")
fern
^P1STREET("IS","barziim","nrld irwa")
awri dlrn
^P1STREET("IS","barziim","nvelez im")
mi zelevn
^P1STREET("IS","barziim","nxyw")
wyxn
^P1STREET("IS","barziim","nyba rm")
mr abyn
^P1STREET("IS","barziim","nynx dixco")
ocxid xnyn
^P1STREET("IS","barziim","nynxez")
zexnyn
^P1STREET("IS","barziim","pivpd")
dpvip
^P1STREET("IS","barziim","pxwiq")
qiwxp
^P1STREET("IS","barziim","qixpi")
ipxiq
^P1STREET("IS","barziim","qixwio")
oiwxiq
^P1STREET("IS","barziim","qnhz `lide")
edil` zhnq
^P1STREET("IS","barziim","qnhz pbd")
dbp zhnq
^P1STREET("IS","barziim","qnhz pgl")
lgp zhnq
^P1STREET("IS","barziim","qnhz prn""z")
z"nrp zhnq
^P1STREET("IS","barziim","qnhz vaid leahwio")
oiwhael diav zhnq
^P1STREET("IS","barziim","qnhz vex")
xev zhnq
^P1STREET("IS","barziim","raxepd")
dpexar
^P1STREET("IS","barziim","rio bci")
icb oir
^P1STREET("IS","barziim","rliz dperx")
xrepd zilr
^P1STREET("IS","barziim","rnix")
xinr
^P1STREET("IS","barziim","rniya")
ayinr
^P1STREET("IS","barziim","rnl")
lnr
^P1STREET("IS","barziim","rxai pgl")
lgp iaxr
^P1STREET("IS","barziim","rxc")
cxr
^P1STREET("IS","barziim","terli dxkaz")
zakxd ilret
^P1STREET("IS","barziim","th`i")
i`ht
^P1STREET("IS","barziim","tiipaxb irwa")
awri bxapiit
^P1STREET("IS","barziim","vd""l")
l"dv
^P1STREET("IS","barziim","vifiw")
wifiv
^P1STREET("IS","barziim","vinax")
xaniv
^P1STREET("IS","barziim","vl dbard")
drabd lv
^P1STREET("IS","barziim","vtxixim")
mixixtv
^P1STREET("IS","barziim","waeu bleiez")
zeielb ueaw
^P1STREET("IS","barziim","wexfio")
oifxew
^P1STREET("IS","barziim","wiy")
yiw
^P1STREET("IS","barziim","wlri")
irlw
^P1STREET("IS","barziim","wtlpqwi")
iwqpltw
^P1STREET("IS","barziim","wxiz ieqs")
sqei zixw
^P1STREET("IS","barziim","wxnpivwi")
iwvipnxw
^P1STREET("IS","barziim","wxo diqec")
ceqid oxw
^P1STREET("IS","barziim","wxo winz liyx`l")
l`xyil zniw oxw
^P1STREET("IS","barziim","xaiaim")
miaiax
^P1STREET("IS","barziim","xecio `liyr")
ryil` oicex
^P1STREET("IS","barziim","xehaxb")
bxahex
^P1STREET("IS","barziim","xezm")
mzex
^P1STREET("IS","barziim","xgl")
lgx
^P1STREET("IS","barziim","xiipq")
qpiix
^P1STREET("IS","barziim","xiiw gaiad")
daiag wiix
^P1STREET("IS","barziim","xna""m")
m"anx
^P1STREET("IS","barziim","xnd")
dnx
^P1STREET("IS","barziim","xnf")
fnx
^P1STREET("IS","barziim","xwtz")
ztwx
^P1STREET("IS","barziim","yc' `tiwim")
miwit` 'cy
^P1STREET("IS","barziim","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","barziim","ycd aewx")
xwea dcy
^P1STREET("IS","barziim","yilea")
aeliy
^P1STREET("IS","barziim","yipwio")
oiwpiy
^P1STREET("IS","barziim","ynreo ao vai")
iav oa oerny
^P1STREET("IS","barziim","ytix`")
`xity
^P1STREET("IS","barziim","ytr hl")
lh rty
^P1STREET("IS","barziim","yx `dxeo")
oexd` xy
^P1STREET("IS","barziim","ztevez iyx`l")
l`xyi zevetz
^P1STREET("IS","baxrm")
mrxab
^P1STREET("IS","baz")
zab
^P1STREET("IS","bcez")
zecb
^P1STREET("IS","bciy")
yicb
^P1STREET("IS","bcrepd")
dpercb
^P1STREET("IS","bcxd")
dxcb
^P1STREET("IS","bcxd","`bef")
feb`
^P1STREET("IS","bcxd","`exo")
oxe`
^P1STREET("IS","bcxd","`ixeq")
qexi`
^P1STREET("IS","bcxd","`m kl gi")
ig lk m`
^P1STREET("IS","bcxd","`txim")
mixt`
^P1STREET("IS","bcxd","`xwio")
oiwx`
^P1STREET("IS","bcxd","`yx")
xy`
^P1STREET("IS","bcxd","ai`liw")
wil`ia
^P1STREET("IS","bcxd","ail""e")
e"lia
^P1STREET("IS","bcxd","ail""eiim")
miie"lia
^P1STREET("IS","bcxd","ao bexieo")
oeixeb oa
^P1STREET("IS","bcxd","ao bto")
otb oa
^P1STREET("IS","bcxd","apinio")
oinipa
^P1STREET("IS","bcxd","arli nl`kd")
dk`ln ilra
^P1STREET("IS","bcxd","axwz")
zwxa
^P1STREET("IS","bcxd","bc")
cb
^P1STREET("IS","bcxd","bef'pqwi")
iwqp'feb
^P1STREET("IS","bcxd","cekitz")
ztikec
^P1STREET("IS","bcxd","cela")
alec
^P1STREET("IS","bcxd","co")
oc
^P1STREET("IS","bcxd","cpvibx")
xbivpc
^P1STREET("IS","bcxd","cwl")
lwc
^P1STREET("IS","bcxd","cxj `xu")
ux` jxc
^P1STREET("IS","bcxd","cxj d`ilpez")
zepli`d jxc
^P1STREET("IS","bcxd","cxj dtxgim")
migxtd jxc
^P1STREET("IS","bcxd","d`ecm")
mce`d
^P1STREET("IS","bcxd","d`leo")
oel`d
^P1STREET("IS","bcxd","d`v""l")
l"v`d
^P1STREET("IS","bcxd","daxey")
yexad
^P1STREET("IS","bcxd","dbd")
dbd
^P1STREET("IS","bcxd","dbexo")
oxebd
^P1STREET("IS","bcxd","dcxim")
mixcd
^P1STREET("IS","bcxd","ddbpd")
dpbdd
^P1STREET("IS","bcxd","dexaiu")
uiaxed
^P1STREET("IS","bcxd","dgend")
dnegd
^P1STREET("IS","bcxd","dgva")
avgd
^P1STREET("IS","bcxd","dgxea")
aexgd
^P1STREET("IS","bcxd","dnbipim cxj")
jxc mipibnd
^P1STREET("IS","bcxd","dpwio")
oiwpd
^P1STREET("IS","bcxd","dpyi`")
`iypd
^P1STREET("IS","bcxd","drlid")
dilrd
^P1STREET("IS","bcxd","drvn`ez")
ze`nvrd
^P1STREET("IS","bcxd","dvarepi")
iperavd
^P1STREET("IS","bcxd","dwenniez")
zeinnewd
^P1STREET("IS","bcxd","dxineo")
oenixd
^P1STREET("IS","bcxd","dxvl")
lvxd
^P1STREET("IS","bcxd","dxvtlc")
cltvxd
^P1STREET("IS","bcxd","dywc")
cwyd
^P1STREET("IS","bcxd","dz`pd")
dp`zd
^P1STREET("IS","bcxd","eivno")
onvie
^P1STREET("IS","bcxd","exclea")
aelcxe
^P1STREET("IS","bcxd","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","bcxd","faeleo")
oeleaf
^P1STREET("IS","bcxd","fnix")
xinf
^P1STREET("IS","bcxd","geyo")
oyeg
^P1STREET("IS","bcxd","gfiz dcxem")
mexcd zifg
^P1STREET("IS","bcxd","gfpea")
aepfg
^P1STREET("IS","bcxd","gxeyz")
zyexg
^P1STREET("IS","bcxd","gxviz")
zivxg
^P1STREET("IS","bcxd","idecd")
dcedi
^P1STREET("IS","bcxd","ie`l")
l`ei
^P1STREET("IS","bcxd","ivgw ao vai")
iav oa wgvi
^P1STREET("IS","bcxd","iwipheo")
oehpiwi
^P1STREET("IS","bcxd","iyykx")
xkyyi
^P1STREET("IS","bcxd","klpiz")
ziplk
^P1STREET("IS","bcxd","ktx `lide")
edil` xtk
^P1STREET("IS","bcxd","kvplqeo")
oeqlpvk
^P1STREET("IS","bcxd","leavwi")
iwvael
^P1STREET("IS","bcxd","lei")
iel
^P1STREET("IS","bcxd","leipqeo")
oeqpiel
^P1STREET("IS","bcxd","liaeaiu")
uiaeail
^P1STREET("IS","bcxd","lilipalem")
melapilil
^P1STREET("IS","bcxd","lilj")
jlil
^P1STREET("IS","bcxd","nevwio")
oiwven
^P1STREET("IS","bcxd","nlx")
xln
^P1STREET("IS","bcxd","npyd")
dypn
^P1STREET("IS","bcxd","nxac dwqnim")
minqwd caxn
^P1STREET("IS","bcxd","pexiz")
zixep
^P1STREET("IS","bcxd","pgem")
megp
^P1STREET("IS","bcxd","pgl `ileo")
oeli` lgp
^P1STREET("IS","bcxd","pgl lihpi")
iphil lgp
^P1STREET("IS","bcxd","ptzli")
ilztp
^P1STREET("IS","bcxd","qaxclea")
aelcxaq
^P1STREET("IS","bcxd","qetx ylem")
mely xteq
^P1STREET("IS","bcxd","qhxend")
dnexhq
^P1STREET("IS","bcxd","qncx")
xcnq
^P1STREET("IS","bcxd","qtix")
xitq
^P1STREET("IS","bcxd","refi`l")
l`ifer
^P1STREET("IS","bcxd","rxad")
daxr
^P1STREET("IS","bcxd","tewq")
qwet
^P1STREET("IS","bcxd","tiial")
laiit
^P1STREET("IS","bcxd","tiipaxb")
bxapiit
^P1STREET("IS","bcxd","tipq")
qpit
^P1STREET("IS","bcxd","tiweq")
qewit
^P1STREET("IS","bcxd","txgi ax")
xa igxt
^P1STREET("IS","bcxd","txpwl `lide")
edil` lwpxt
^P1STREET("IS","bcxd","v`ld")
dl`v
^P1STREET("IS","bcxd","vewxno")
onxwev
^P1STREET("IS","bcxd","whla")
alhw
^P1STREET("IS","bcxd","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","bcxd","wwl")
lww
^P1STREET("IS","bcxd","x`eao")
oae`x
^P1STREET("IS","bcxd","xao bnli`l")
l`ilnb oax
^P1STREET("IS","bcxd","xezm")
mzex
^P1STREET("IS","bcxd","xnf")
fnx
^P1STREET("IS","bcxd","yae")
eay
^P1STREET("IS","bcxd","yafi")
ifay
^P1STREET("IS","bcxd","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","bcxd","yc' npgm abio")
oiba mgpn 'cy
^P1STREET("IS","bcxd","ykaiu")
uiaky
^P1STREET("IS","bcxd","ylem rlikm")
mkilr mely
^P1STREET("IS","bcxd","ynreo")
oerny
^P1STREET("IS","bcxd","ytix`")
`xity
^P1STREET("IS","bcxd","ytxipvw")
wvpixty
^P1STREET("IS","bcxd","ywnd")
dnwy
^P1STREET("IS","bcxd","yxd qiblaiu'")
'uialbiq dxy
^P1STREET("IS","bcxd","zl pes")
sep lz
^P1STREET("IS","bcxd","zxnd")
dnxz
^P1STREET("IS","bey gla")
alg yeb
^P1STREET("IS","bfiz")
zifb
^P1STREET("IS","bfx")
xfb
^P1STREET("IS","bi`d")
d`ib
^P1STREET("IS","biazeo")
oezaib
^P1STREET("IS","biazeo","ao iyx`l")
l`xyi oa
^P1STREET("IS","biazeo","dniiqcim")
micqiind
^P1STREET("IS","bileo")
oelib
^P1STREET("IS","bileo","bfiz")
zifb
^P1STREET("IS","bileo","lym")
myl
^P1STREET("IS","bilz")
zlib
^P1STREET("IS","bipez yenxeo")
oexney zepib
^P1STREET("IS","bipez yenxeo","`expim")
mipxe`
^P1STREET("IS","bipez yenxeo","d`leo")
oel`d
^P1STREET("IS","bipez yenxeo","d`xf")
fx`d
^P1STREET("IS","bipez yenxeo","daxey")
yexad
^P1STREET("IS","bipez yenxeo","dbto")
otbd
^P1STREET("IS","bipez yenxeo","drxad")
daxrd
^P1STREET("IS","bipez yenxeo","dxineo")
oenixd
^P1STREET("IS","bipez yenxeo","dywnd")
dnwyd
^P1STREET("IS","bipez yenxeo","dznx")
xnzd
^P1STREET("IS","bipez yenxeo","nyrel ddxces")
secxdd leryn
^P1STREET("IS","bipez yenxeo","nyrel dexcim")
micxed leryn
^P1STREET("IS","bipez yenxeo","nyrel dgva")
avgd leryn
^P1STREET("IS","bipez yenxeo","nyrel diqnio")
oinqid leryn
^P1STREET("IS","bipez yenxeo","nyrel dklpiz")
ziplkd leryn
^P1STREET("IS","bipez yenxeo","nyrel dpxwiq")
qiwxpd leryn
^P1STREET("IS","bipez yenxeo","nyrel dxwtz")
ztwxd leryn
^P1STREET("IS","bipez yenxeo","nyrel qaieo")
oeiaq leryn
^P1STREET("IS","bipez yenxeo","pivpim")
mipvip
^P1STREET("IS","bl`eo")
oe`lb
^P1STREET("IS","blil im")
mi lilb
^P1STREET("IS","blrc [`ao ivgw]")
(wgvi oa`) crlb
^P1STREET("IS","bnfe")
efnb
^P1STREET("IS","bnfe","daxey")
yexad
^P1STREET("IS","bo dyenxeo")
oexneyd ob
^P1STREET("IS","bo giim")
miig ob
^P1STREET("IS","bo giim","cxj dnlj")
jlnd jxc
^P1STREET("IS","bo giim","d`ixeq")
qexi`d
^P1STREET("IS","bo giim","d`ld")
dl`d
^P1STREET("IS","bo giim","dfiz")
zifd
^P1STREET("IS","bo giim","dgxea")
aexgd
^P1STREET("IS","bo giim","dpexiz")
zixepd
^P1STREET("IS","bo giim","dpxwiq")
qiwxpd
^P1STREET("IS","bo giim","drxad")
daxrd
^P1STREET("IS","bo giim","dxineo")
oenixd
^P1STREET("IS","bo giim","klpiz")
ziplk
^P1STREET("IS","bo i`yid")
diy`i ob
^P1STREET("IS","bo iapd")
dpai ob
^P1STREET("IS","bo iapd","`dec ao bx`")
`xb oa ced`
^P1STREET("IS","bo iapd","`expiz")
zipxe`
^P1STREET("IS","bo iapd","`gc drm")
mrd cg`
^P1STREET("IS","bo iapd","`gefd")
dfeg`
^P1STREET("IS","bo iapd","`li kdo")
odk il`
^P1STREET("IS","bo iapd","`lrfx")
xfrl`
^P1STREET("IS","bo iapd","`ykel")
leky`
^P1STREET("IS","bo iapd","ao bexieo")
oeixeb oa
^P1STREET("IS","bo iapd","ax ieg`i")
i`gei xa
^P1STREET("IS","bo iapd","ax keka`")
`akek xa
^P1STREET("IS","bo iapd","axwz")
zwxa
^P1STREET("IS","bo iapd","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","bo iapd","cxj wpcd")
dcpw jxc
^P1STREET("IS","bo iapd","cxj zl gi")
ig lz jxc
^P1STREET("IS","bo iapd","d`ecm")
mce`d
^P1STREET("IS","bo iapd","d`ex")
xe`d
^P1STREET("IS","bo iapd","d`exo")
oxe`d
^P1STREET("IS","bo iapd","d`v""l")
l"v`d
^P1STREET("IS","bo iapd","d`yl")
ly`d
^P1STREET("IS","bo iapd","d`zxeb")
bexz`d
^P1STREET("IS","bo iapd","dax")
xad
^P1STREET("IS","bo iapd","daxey")
yexad
^P1STREET("IS","bo iapd","db`eld")
dle`bd
^P1STREET("IS","bo iapd","dbiaexim")
mixeaibd
^P1STREET("IS","bo iapd","dbto")
otbd
^P1STREET("IS","bo iapd","dcq")
qcd
^P1STREET("IS","bo iapd","ddbpd")
dpbdd
^P1STREET("IS","bo iapd","ddcxim")
mixcdd
^P1STREET("IS","bo iapd","decid")
diced
^P1STREET("IS","bo iapd","dexc")
cxed
^P1STREET("IS","bo iapd","dgxea")
aexgd
^P1STREET("IS","bo iapd","dgxviz")
zivxgd
^P1STREET("IS","bo iapd","dgynep`im")
mi`penygd
^P1STREET("IS","bo iapd","diexd")
dxeid
^P1STREET("IS","bo iapd","dkc")
ckd
^P1STREET("IS","bo iapd","dkiyex")
xeyikd
^P1STREET("IS","bo iapd","dnbipim")
mipibnd
^P1STREET("IS","bo iapd","dnbo")
obnd
^P1STREET("IS","bo iapd","dnkaim")
miaknd
^P1STREET("IS","bo iapd","dnlj cec")
cec jlnd
^P1STREET("IS","bo iapd","dnlj ylnd")
dnly jlnd
^P1STREET("IS","bo iapd","dnlwey")
yewlnd
^P1STREET("IS","bo iapd","dntxy")
yxtnd
^P1STREET("IS","bo iapd","dpvgeo")
oegvpd
^P1STREET("IS","bo iapd","dpxwiq")
qiwxpd
^P1STREET("IS","bo iapd","dpyi`")
`iypd
^P1STREET("IS","bo iapd","dqiito")
otiiqd
^P1STREET("IS","bo iapd","drebo")
oberd
^P1STREET("IS","bo iapd","drtxepi")
ipextrd
^P1STREET("IS","bo iapd","drvn`ez")
ze`nvrd
^P1STREET("IS","bo iapd","drvneo")
oenvrd
^P1STREET("IS","bo iapd","drxebez")
zebexrd
^P1STREET("IS","bo iapd","dtln""g")
g"nltd
^P1STREET("IS","bo iapd","dvellim")
millevd
^P1STREET("IS","bo iapd","dwnd")
dnwd
^P1STREET("IS","bo iapd","dwvix")
xivwd
^P1STREET("IS","bo iapd","dx qipi")
ipiq xd
^P1STREET("IS","bo iapd","dx vieo")
oeiv xd
^P1STREET("IS","bo iapd","dxa wew")
wew axd
^P1STREET("IS","bo iapd","dxezm")
mzexd
^P1STREET("IS","bo iapd","dxineo")
oenixd
^P1STREET("IS","bo iapd","dxvl")
lvxd
^P1STREET("IS","bo iapd","dyehxim")
mixheyd
^P1STREET("IS","bo iapd","dyenx")
xneyd
^P1STREET("IS","bo iapd","dyethim")
mihteyd
^P1STREET("IS","bo iapd","dyeyo")
oyeyd
^P1STREET("IS","bo iapd","dyiaelim")
mileaiyd
^P1STREET("IS","bo iapd","dyihd")
dhiyd
^P1STREET("IS","bo iapd","dyiihz")
zhiiyd
^P1STREET("IS","bo iapd","dypiim")
miipyd
^P1STREET("IS","bo iapd","dyrexd")
dxeryd
^P1STREET("IS","bo iapd","dywnd")
dnwyd
^P1STREET("IS","bo iapd","dzaex")
xeazd
^P1STREET("IS","bo iapd","dzezgpim")
mipgzezd
^P1STREET("IS","bo iapd","flno yliio")
oiily onlf
^P1STREET("IS","bo iapd","iap`i")
i`pai
^P1STREET("IS","bo iapd","idecd")
dcedi
^P1STREET("IS","bo iapd","ideciz")
zicedi
^P1STREET("IS","bo iapd","iegpo")
opgei
^P1STREET("IS","bo iapd","iepzo")
ozpei
^P1STREET("IS","bo iapd","ip`i")
i`pi
^P1STREET("IS","bo iapd","irlim")
milri
^P1STREET("IS","bo iapd","itzg")
gzti
^P1STREET("IS","bo iapd","iwezi`l `cm")
mc` l`izewi
^P1STREET("IS","bo iapd","klpiz")
ziplk
^P1STREET("IS","bo iapd","lg""i")
i"gl
^P1STREET("IS","bo iapd","lilj")
jlil
^P1STREET("IS","bo iapd","linex")
xenil
^P1STREET("IS","bo iapd","ltic")
citl
^P1STREET("IS","bo iapd","necirio")
oiricen
^P1STREET("IS","bo iapd","nixeo")
oexin
^P1STREET("IS","bo iapd","nvcd")
dcvn
^P1STREET("IS","bo iapd","nxim")
mixn
^P1STREET("IS","bo iapd","nzzide")
edizzn
^P1STREET("IS","bo iapd","pil""i")
i"lip
^P1STREET("IS","bo iapd","pzo `lzxno")
onxzl` ozp
^P1STREET("IS","bo iapd","qa`o")
o`aq
^P1STREET("IS","bo iapd","qaieo")
oeiaq
^P1STREET("IS","bo iapd","reli dbxcem")
mecxbd iler
^P1STREET("IS","bo iapd","telb")
blet
^P1STREET("IS","bo iapd","v`lim")
mil`v
^P1STREET("IS","bo iapd","vd""l")
l"dv
^P1STREET("IS","bo iapd","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","bo iapd","xaiaim")
miaiax
^P1STREET("IS","bo iapd","y""i rbpeo")
oepbr i"y
^P1STREET("IS","bo iapd","yafi")
ifay
^P1STREET("IS","bo iapd","yedm")
mdey
^P1STREET("IS","bo iapd","yexw")
wxey
^P1STREET("IS","bo iapd","yne`l dpai`")
`iapd l`eny
^P1STREET("IS","bo iapd","ynreo")
oerny
^P1STREET("IS","bo iapd","zex")
xez
^P1STREET("IS","bo iapd","zexd eraecd")
dceare dxez
^P1STREET("IS","bo iapd","znx")
xnz
^P1STREET("IS","bo iapd","zteg")
getz
^P1STREET("IS","bo xeed")
deex ob
^P1STREET("IS","bo xeed","gavlz dges")
segd zlvag
^P1STREET("IS","bo yenxeo")
oexney ob
^P1STREET("IS","bo yenxeo","ped nxga")
agxn dep
^P1STREET("IS","bo yexw")
wxey ob
^P1STREET("IS","bo ylnd")
dnly ob
^P1STREET("IS","bo yne`l")
l`eny ob
^P1STREET("IS","bo yne`l","dklpiz")
ziplkd
^P1STREET("IS","bo-px")
xp-ob
^P1STREET("IS","bo-px","`ixeq")
qexi`
^P1STREET("IS","bo-px","qaieo")
oeiaq
^P1STREET("IS","bo-px","xwtz")
ztwx
^P1STREET("IS","bpeqx")
xqepb
^P1STREET("IS","bpez")
zepb
^P1STREET("IS","bpez","d`yl")
ly`d
^P1STREET("IS","bpez","ddcq")
qcdd
^P1STREET("IS","bpez","drxad")
daxrd
^P1STREET("IS","bpez","dxineo")
oenixd
^P1STREET("IS","bpez","dz`pd")
dp`zd
^P1STREET("IS","bpez dcx")
xcd zepb
^P1STREET("IS","bpez dcx","`npeo eznx")
xnze oepn`
^P1STREET("IS","bpez dcx","diqnio")
oinqid
^P1STREET("IS","bpez dcx","dqibliez")
zeilbiqd
^P1STREET("IS","bpez dcx","dyeypim")
mipyeyd
^P1STREET("IS","bpez dcx","qnhz d`ixeqim")
miqexi`d zhnq
^P1STREET("IS","bpez dcx","qnhz dvarepi")
iperavd zhnq
^P1STREET("IS","bpi dcx")
xcd ipb
^P1STREET("IS","bpi dcx","ddcxim")
mixcdd
^P1STREET("IS","bpi hl")
lh ipb
^P1STREET("IS","bpi idecd")
dcedi ipb
^P1STREET("IS","bpi idecd","bo dywnim")
minwyd ob
^P1STREET("IS","bpi idecd","d`ixeq")
qexi`d
^P1STREET("IS","bpi idecd","dexcim")
micxed
^P1STREET("IS","bpi idecd","dfiz")
zifd
^P1STREET("IS","bpi idecd","dgavlz")
zlvagd
^P1STREET("IS","bpi idecd","dgva")
avgd
^P1STREET("IS","bpi idecd","dklpiz")
ziplkd
^P1STREET("IS","bpi idecd","dncxbez")
zebxcnd
^P1STREET("IS","bpi idecd","dnxbpiz")
zipbxnd
^P1STREET("IS","bpi idecd","dnzpglim")
milgpznd
^P1STREET("IS","bpi idecd","dpexiz")
zixepd
^P1STREET("IS","bpi idecd","dpxwiq")
qiwxpd
^P1STREET("IS","bpi idecd","dvarepi")
iperavd
^P1STREET("IS","bpi idecd","dxwtz")
ztwxd
^P1STREET("IS","bpi idecd","dyiwnd")
dnwiyd
^P1STREET("IS","bpi idecd","kkx dryex")
xeyrd xkk
^P1STREET("IS","bpi idecd","qnhz dgavlz")
zlvagd zhnq
^P1STREET("IS","bpi iegpo")
opgei ipb
^P1STREET("IS","bpi iegpo","diqnio")
oinqid
^P1STREET("IS","bpi iegpo","qnhz ivgw")
wgvi zhnq
^P1STREET("IS","bpi qaieo")
oeiaq ipb
^P1STREET("IS","bpi qaieo","drxneo")
oenxrd
^P1STREET("IS","bpi rm")
mr ipb
^P1STREET("IS","bpi rm","airx")
xria
^P1STREET("IS","bpi rm","dapim")
mipad
^P1STREET("IS","bpi rm","dqaiepim")
mipeiaqd
^P1STREET("IS","bpi zwed")
dewz ipb
^P1STREET("IS","bpi zwed","`elitph")
hptile`
^P1STREET("IS","bpi zwed","`inax")
xani`
^P1STREET("IS","bpi zwed","`qs")
sq`
^P1STREET("IS","bpi zwed","a`xi")
ix`a
^P1STREET("IS","bpi zwed","aiz y`o")
o`y zia
^P1STREET("IS","bpi zwed","awrz dixco")
ocxid zrwa
^P1STREET("IS","bpi zwed","awrz dixg")
gxid zrwa
^P1STREET("IS","bpi zwed","bareo")
oerab
^P1STREET("IS","bpi zwed","barz qaieo")
oeiaq zrab
^P1STREET("IS","bpi zwed","bexceo")
oecxeb
^P1STREET("IS","bpi zwed","ca def")
fed ac
^P1STREET("IS","bpi zwed","caix")
xiac
^P1STREET("IS","bpi zwed","cbpid")
dipbc
^P1STREET("IS","bpi zwed","cxj `ilez")
zeli` jxc
^P1STREET("IS","bpi zwed","dbelo")
olebd
^P1STREET("IS","bpi zwed","dbicm")
mcibd
^P1STREET("IS","bpi zwed","dblil")
lilbd
^P1STREET("IS","bpi zwed","dblrc")
crlbd
^P1STREET("IS","bpi zwed","dbto")
otbd
^P1STREET("IS","bpi zwed","dcwl")
lwcd
^P1STREET("IS","bpi zwed","dgxneo")
oenxgd
^P1STREET("IS","bpi zwed","dkxnl")
lnxkd
^P1STREET("IS","bpi zwed","dnvtd")
dtvnd
^P1STREET("IS","bpi zwed","dnznic")
cinznd
^P1STREET("IS","bpi zwed","dpba")
abpd
^P1STREET("IS","bpi zwed","dpgl")
lgpd
^P1STREET("IS","bpi zwed","dpyi` dx`yeo")
oey`xd `iypd
^P1STREET("IS","bpi zwed","drlid")
dilrd
^P1STREET("IS","bpi zwed","drnwim")
miwnrd
^P1STREET("IS","bpi zwed","drvn`ez")
ze`nvrd
^P1STREET("IS","bpi zwed","drxad")
daxrd
^P1STREET("IS","bpi zwed","dtiqbd")
dbqitd
^P1STREET("IS","bpi zwed","dtln""g")
g"nltd
^P1STREET("IS","bpi zwed","dtxcq")
qcxtd
^P1STREET("IS","bpi zwed","dx pae")
eap xd
^P1STREET("IS","bpi zwed","dx qipi")
ipiq xd
^P1STREET("IS","bpi zwed","dxe`""d")
d"`exd
^P1STREET("IS","bpi zwed","dxi idecd")
dcedi ixd
^P1STREET("IS","bpi zwed","dxineo")
oenixd
^P1STREET("IS","bpi zwed","dxnd")
dnxd
^P1STREET("IS","bpi zwed","dycd")
dcyd
^P1STREET("IS","bpi zwed","dywcid")
dicwyd
^P1STREET("IS","bpi zwed","dyxeo")
oexyd
^P1STREET("IS","bpi zwed","dz`pd")
dp`zd
^P1STREET("IS","bpi zwed","dzaex")
xeazd
^P1STREET("IS","bpi zwed","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","bpi zwed","f`ai")
ia`f
^P1STREET("IS","bpi zwed","gefd dncipd")
dpicnd dfeg
^P1STREET("IS","bpi zwed","im dnlg")
glnd mi
^P1STREET("IS","bpi zwed","ivgw ycd")
dcy wgvi
^P1STREET("IS","bpi zwed","iyng nyd")
dyn gnyi
^P1STREET("IS","bpi zwed","kkx aexekea")
aekexea xkk
^P1STREET("IS","bpi zwed","kkx ddqzcxez")
zexczqdd xkk
^P1STREET("IS","bpi zwed","navr wcy")
ycw rvan
^P1STREET("IS","bpi zwed","nxgaid")
diagxn
^P1STREET("IS","bpi zwed","qnhz caix")
xiac zhnq
^P1STREET("IS","bpi zwed","qnhz dgeld")
dlegd zhnq
^P1STREET("IS","bpi zwed","qnhz dtqbd")
dbqtd zhnq
^P1STREET("IS","bpi zwed","qnhz dxi ixeylim")
milyexi ixd zhnq
^P1STREET("IS","bpi zwed","qnhz kpxz")
zxpk zhnq
^P1STREET("IS","bpi zwed","qnhz lapeo")
oepal zhnq
^P1STREET("IS","bpi zwed","qnhz rio bpim")
mipb oir zhnq
^P1STREET("IS","bpi zwed","qnhz wcy")
ycw zhnq
^P1STREET("IS","bpi zwed","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","bpi zwed","refi`l")
l`ifer
^P1STREET("IS","bpi zwed","rio gpej")
jepg oir
^P1STREET("IS","bpi zwed","rio yny")
yny oir
^P1STREET("IS","bpi zwed","rnw faeleo")
oeleaf wnr
^P1STREET("IS","bpi zwed","rnw ifxr`l")
l`rxfi wnr
^P1STREET("IS","bpi zwed","rwia`")
`aiwr
^P1STREET("IS","bpi zwed","txeipc")
cpiext
^P1STREET("IS","bpi zwed","wceyi dye`d")
d`eyd iyecw
^P1STREET("IS","bpi zwed","wceyz iem hea")
aeh mei zyecw
^P1STREET("IS","bpi zwed","wiyeo")
oeyiw
^P1STREET("IS","bpi zwed","xa `eo")
oe` ax
^P1STREET("IS","bpi zwed","xyi")
iyx
^P1STREET("IS","bpi zwed","yc' `li kdo")
odk il` 'cy
^P1STREET("IS","bpi zwed","ynyeo")
oeyny
^P1STREET("IS","bpi zwed","zl gi")
ig lz
^P1STREET("IS","bpibx")
xbipb
^P1STREET("IS","bpzeo")
oezpb
^P1STREET("IS","bpzeo","dxineo")
oenixd
^P1STREET("IS","brzeo")
oezrb
^P1STREET("IS","bto")
otb
^P1STREET("IS","byx")
xyb
^P1STREET("IS","byx dfie")
eifd xyb
^P1STREET("IS","byx dfie","pzia dcela")
alecd aizp
^P1STREET("IS","bz")
zb
^P1STREET("IS","bz xineo")
oenix zb
^P1STREET("IS","bz xineo","d`ilpez")
zepli`d
^P1STREET("IS","bz xineo","d`wlitheq")
qehtilw`d
^P1STREET("IS","bz xineo","daxey")
yexad
^P1STREET("IS","bz xineo","dxineo")
oenixd
^P1STREET("IS","bz xineo","hxeno")
onexh
^P1STREET("IS","bz xineo","nlgnz yyz dinim")
minid zyy zngln
^P1STREET("IS","c`liz `l-kxnl")
lnxk-l` zil`c
^P1STREET("IS","c`liz `l-kxnl","nhiilim")
miliihn
^P1STREET("IS","c`liz `l-kxnl","xg' 1")
1 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 10")
10 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 11")
11 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 12")
12 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 13")
13 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 14")
14 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 15")
15 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 16")
16 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 18")
18 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 19")
19 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 2")
2 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 21")
21 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 22")
22 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 23")
23 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 24")
24 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 25")
25 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 26")
26 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 29")
29 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 3")
3 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 31")
31 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 33")
33 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 34")
34 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 35")
35 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 36")
36 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 4")
4 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 43")
43 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 45")
45 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 5")
5 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 6")
6 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 60")
60 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 61")
61 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 7")
7 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 8")
8 'gx
^P1STREET("IS","c`liz `l-kxnl","xg' 9")
9 'gx
^P1STREET("IS","caexd")
dxeac
^P1STREET("IS","caexid")
dixeac
^P1STREET("IS","caexid","dx zaex")
xeaz xd
^P1STREET("IS","caxz")
zxac
^P1STREET("IS","caxz","dpexiz")
zixepd
^P1STREET("IS","caxz","kxkem")
mekxk
^P1STREET("IS","caxz","xwtez")
zetwx
^P1STREET("IS","cbpid `'")
'` dipbc
^P1STREET("IS","cbpid a'")
'a dipbc
^P1STREET("IS","cex")
xec
^P1STREET("IS","cexez")
zexec
^P1STREET("IS","cgi")
igc
^P1STREET("IS","cinepd")
dpenic
^P1STREET("IS","cinepd","`ao baixel")
lexiab oa`
^P1STREET("IS","cinepd","`ao rfx`")
`xfr oa`
^P1STREET("IS","cinepd","`cx")
xc`
^P1STREET("IS","cinepd","`exeo")
oexe`
^P1STREET("IS","cinepd","`fea")
aef`
^P1STREET("IS","cinepd","`ilz")
zli`
^P1STREET("IS","cinepd","`ld")
dl`
^P1STREET("IS","cinepd","`lgxifi")
ifixgl`
^P1STREET("IS","cinepd","`npeo eznx")
xnze oepn`
^P1STREET("IS","cinepd","`qs")
sq`
^P1STREET("IS","cinepd","`wlitheq")
qehtilw`
^P1STREET("IS","cinepd","`xf")
fx`
^P1STREET("IS","cinepd","`ygx")
xgy`
^P1STREET("IS","cinepd","aa` q`li")
il`q `aa
^P1STREET("IS","cinepd","aiz yrxim")
mixry zia
^P1STREET("IS","cinepd","ao rhx")
xhr oa
^P1STREET("IS","cinepd","ax ieg`i")
i`gei xa
^P1STREET("IS","cinepd","ax keka`")
`akek xa
^P1STREET("IS","cinepd","axpdiim")
miidpxa
^P1STREET("IS","cinepd","axwo")
owxa
^P1STREET("IS","cinepd","aynz")
znya
^P1STREET("IS","cinepd","az go")
og za
^P1STREET("IS","cinepd","bnl`")
`lnb
^P1STREET("IS","cinepd","cec `lrfx")
xfrl` cec
^P1STREET("IS","cinepd","cec xfi`l")
l`ifx cec
^P1STREET("IS","cinepd","cela")
alec
^P1STREET("IS","cinepd","ctpd")
dptc
^P1STREET("IS","cinepd","cxj ao bexieo")
oeixeb oa jxc
^P1STREET("IS","cinepd","cxj dvpgpim")
mipgpvd jxc
^P1STREET("IS","cinepd","cxj dylem")
melyd jxc
^P1STREET("IS","cinepd","d`exo")
oxe`d
^P1STREET("IS","cinepd","d`iqiim")
miiqi`d
^P1STREET("IS","cinepd","d`ixiq")
qixi`d
^P1STREET("IS","cinepd","d`leo")
oel`d
^P1STREET("IS","cinepd","d`yl")
ly`d
^P1STREET("IS","cinepd","daxey")
yexad
^P1STREET("IS","cinepd","dbard")
drabd
^P1STREET("IS","cinepd","dbi`")
`ibd
^P1STREET("IS","cinepd","dbto")
otbd
^P1STREET("IS","cinepd","ddbpd")
dpbdd
^P1STREET("IS","cinepd","ddcq")
qcdd
^P1STREET("IS","cinepd","dfiz")
zifd
^P1STREET("IS","cinepd","dgynep`im")
mi`penygd
^P1STREET("IS","cinepd","diexd")
dxeid
^P1STREET("IS","cinepd","dklpiz")
ziplkd
^P1STREET("IS","cinepd","dnkaim")
miaknd
^P1STREET("IS","cinepd","dnkzy")
yzknd
^P1STREET("IS","cinepd","dnl`kd")
dk`lnd
^P1STREET("IS","cinepd","dnlj cec")
cec jlnd
^P1STREET("IS","cinepd","dnlwey")
yewlnd
^P1STREET("IS","cinepd","dnqbx")
xbqnd
^P1STREET("IS","cinepd","dnrld")
dlrnd
^P1STREET("IS","cinepd","dnrtil")
litrnd
^P1STREET("IS","cinepd","dnrtilim")
militrnd
^P1STREET("IS","cinepd","dpg""l")
l"gpd
^P1STREET("IS","cinepd","dpxwiq")
qiwxpd
^P1STREET("IS","cinepd","dpyi`im")
mi`iypd
^P1STREET("IS","cinepd","dqcpd")
dpcqd
^P1STREET("IS","cinepd","drlid")
dilrd
^P1STREET("IS","cinepd","drnl")
lnrd
^P1STREET("IS","cinepd","drvn`ez")
ze`nvrd
^P1STREET("IS","cinepd","drxad")
daxrd
^P1STREET("IS","cinepd","dterlim")
milretd
^P1STREET("IS","cinepd","dtiqbd")
dbqitd
^P1STREET("IS","cinepd","dv`ld")
dl`vd
^P1STREET("IS","cinepd","dvax")
xavd
^P1STREET("IS","cinepd","dwvirez")
zerivwd
^P1STREET("IS","cinepd","dx qipi")
ipiq xd
^P1STREET("IS","cinepd","dxa `ae gvix`")
`xivg ea` axd
^P1STREET("IS","cinepd","dxa `lpweed")
deewpl` axd
^P1STREET("IS","cinepd","dxa giim tiphe")
ehpit miig axd
^P1STREET("IS","cinepd","dxa hiia")
aiih axd
^P1STREET("IS","cinepd","dxces dpglim")
milgpd secxd
^P1STREET("IS","cinepd","dxecieo")
oeicexd
^P1STREET("IS","cinepd","dxezm")
mzexd
^P1STREET("IS","cinepd","dxineo")
oenixd
^P1STREET("IS","cinepd","dxkq")
qkxd
^P1STREET("IS","cinepd","dxnd")
dnxd
^P1STREET("IS","cinepd","dxwtz")
ztwxd
^P1STREET("IS","cinepd","dyi`")
`iyd
^P1STREET("IS","cinepd","dyiaelim")
mileaiyd
^P1STREET("IS","cinepd","dyihd")
dhiyd
^P1STREET("IS","cinepd","dyled")
delyd
^P1STREET("IS","cinepd","dywc")
cwyd
^P1STREET("IS","cinepd","dywnd")
dnwyd
^P1STREET("IS","cinepd","dyxieo")
oeixyd
^P1STREET("IS","cinepd","dz`pd")
dp`zd
^P1STREET("IS","cinepd","dzixey")
yexizd
^P1STREET("IS","cinepd","dzteg")
getzd
^P1STREET("IS","cinepd","dztevez")
zevetzd
^P1STREET("IS","cinepd","excineo")
oenicxe
^P1STREET("IS","cinepd","gbi")
ibg
^P1STREET("IS","cinepd","ghiaz `lkqpcxepi")
ipexcpqkl` zaihg
^P1STREET("IS","cinepd","ghiaz barzi")
izrab zaihg
^P1STREET("IS","cinepd","ghiaz belpi")
ipleb zaihg
^P1STREET("IS","cinepd","ghiaz dpba")
abpd zaihg
^P1STREET("IS","cinepd","ghiaz dx`l")
l`xd zaihg
^P1STREET("IS","cinepd","gnz bcx")
xcb zng
^P1STREET("IS","cinepd","gva")
avg
^P1STREET("IS","cinepd","gxea")
aexg
^P1STREET("IS","cinepd","gxviz")
zivxg
^P1STREET("IS","cinepd","hetg")
gteh
^P1STREET("IS","cinepd","hiilz dqtexh")
hxetqd zliih
^P1STREET("IS","cinepd","i`ix yhxo")
oxhy xi`i
^P1STREET("IS","cinepd","ibex")
xebi
^P1STREET("IS","cinepd","idecd dlei")
ield dcedi
^P1STREET("IS","cinepd","iectz")
ztcei
^P1STREET("IS","cinepd","iepzo pbad")
dabp ozpei
^P1STREET("IS","cinepd","ieqs w`xe")
ex`w sqei
^P1STREET("IS","cinepd","ivgw hapwio")
oiwpah wgvi
^P1STREET("IS","cinepd","ivgw vewxno")
onxwev wgvi
^P1STREET("IS","cinepd","ivgw ycd")
dcy wgvi
^P1STREET("IS","cinepd","ivi`z `ixetd")
dtexi` z`ivi
^P1STREET("IS","cinepd","keayi `ilz")
zli` iyaek
^P1STREET("IS","cinepd","kexfio")
oifxek
^P1STREET("IS","cinepd","kkx f'aehipqwi")
iwqpihea'f xkk
^P1STREET("IS","cinepd","klil dgexy")
yxegd lilk
^P1STREET("IS","cinepd","leahwio vaid")
diav oiwhael
^P1STREET("IS","cinepd","liapd")
dpail
^P1STREET("IS","cinepd","lilj")
jlil
^P1STREET("IS","cinepd","navr axey")
yexa rvan
^P1STREET("IS","cinepd","navr cpi")
ipc rvan
^P1STREET("IS","cinepd","navr gexa")
axeg rvan
^P1STREET("IS","cinepd","navr ie`a")
a`ei rvan
^P1STREET("IS","cinepd","navr reacd")
dcaer rvan
^P1STREET("IS","cinepd","navr rke")
ekr rvan
^P1STREET("IS","cinepd","necirio")
oiricen
^P1STREET("IS","cinepd","neptex")
xetpen
^P1STREET("IS","cinepd","nexo dgexy")
yxegd oxen
^P1STREET("IS","cinepd","nilcd")
dclin
^P1STREET("IS","cinepd","nilxec `lirfx")
xfril` cexlin
^P1STREET("IS","cinepd","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","cinepd","nvcd")
dcvn
^P1STREET("IS","cinepd","nxeed")
deexn
^P1STREET("IS","cinepd","nxgaim")
miagxn
^P1STREET("IS","cinepd","nyd ciio")
oiic dyn
^P1STREET("IS","cinepd","nyrel `qs")
sq` leryn
^P1STREET("IS","cinepd","nyrel `xf")
fx` leryn
^P1STREET("IS","cinepd","nyrel cekitz")
ztikec leryn
^P1STREET("IS","cinepd","nyrel dcrez")
zercd leryn
^P1STREET("IS","cinepd","nyrel dcxex")
xexcd leryn
^P1STREET("IS","cinepd","nyrel ddbpd")
dpbdd leryn
^P1STREET("IS","cinepd","nyrel dfnix")
xinfd leryn
^P1STREET("IS","cinepd","nyrel dgexy")
yxegd leryn
^P1STREET("IS","cinepd","nyrel diepd")
dpeid leryn
^P1STREET("IS","cinepd","nyrel dzwed")
dewzd leryn
^P1STREET("IS","cinepd","nyrel gixm")
mxig leryn
^P1STREET("IS","cinepd","nyrel pahim")
mihap leryn
^P1STREET("IS","cinepd","nyrel phrim")
mirhp leryn
^P1STREET("IS","cinepd","nyrel rxebez")
zebexr leryn
^P1STREET("IS","cinepd","nyrel xbaim")
miabx leryn
^P1STREET("IS","cinepd","nyrel xebl")
lbex leryn
^P1STREET("IS","cinepd","nyrel ylcb")
bcly leryn
^P1STREET("IS","cinepd","nzzide dkdo")
odkd edizzn
^P1STREET("IS","cinepd","pbad")
dabp
^P1STREET("IS","cinepd","ped ncax")
xacn dep
^P1STREET("IS","cinepd","peed cec")
cec deep
^P1STREET("IS","cinepd","pexiz")
zixep
^P1STREET("IS","cinepd","pivgeo")
oegvip
^P1STREET("IS","cinepd","pivpd")
dpvip
^P1STREET("IS","cinepd","pzia dl""d")
d"ld aizp
^P1STREET("IS","cinepd","pzia dlg""i")
i"gld aizp
^P1STREET("IS","cinepd","pzia dvitexim")
mixetivd aizp
^P1STREET("IS","cinepd","qaieo")
oeiaq
^P1STREET("IS","cinepd","qbleo")
oelbq
^P1STREET("IS","cinepd","qglao dgexy")
yxegd oalgq
^P1STREET("IS","cinepd","qhxend")
dnexhq
^P1STREET("IS","cinepd","qncx")
xcnq
^P1STREET("IS","cinepd","qzeepiz")
zipeezq
^P1STREET("IS","cinepd","racz")
zcar
^P1STREET("IS","cinepd","rcrc")
crcr
^P1STREET("IS","cinepd","reli dbxcem")
mecxbd iler
^P1STREET("IS","cinepd","rfx` epgnid")
dingpe `xfr
^P1STREET("IS","cinepd","riipez")
zepiir
^P1STREET("IS","cinepd","rliiz dperx")
xrepd ziilr
^P1STREET("IS","cinepd","thxd")
dxht
^P1STREET("IS","cinepd","txb")
bxt
^P1STREET("IS","cinepd","txgi `xvpe")
epvx` igxt
^P1STREET("IS","cinepd","txi `xvpe")
epvx` ixt
^P1STREET("IS","cinepd","vaid hapwio")
oiwpah diav
^P1STREET("IS","cinepd","varepi")
iperav
^P1STREET("IS","cinepd","vexiz")
zixev
^P1STREET("IS","cinepd","vitexi")
ixetiv
^P1STREET("IS","cinepd","vitexo")
oxetiv
^P1STREET("IS","cinepd","viwlb")
blwiv
^P1STREET("IS","cinepd","vtvtd")
dtvtv
^P1STREET("IS","cinepd","wcy")
ycw
^P1STREET("IS","cinepd","wdilz axihpid")
diphixa zlidw
^P1STREET("IS","cinepd","whla")
alhw
^P1STREET("IS","cinepd","wlrz pnxec")
cexnp zrlw
^P1STREET("IS","cinepd","wvxio")
oixvw
^P1STREET("IS","cinepd","wxo diqec")
ceqid oxw
^P1STREET("IS","cinepd","wxpi gihio")
oihig ipxw
^P1STREET("IS","cinepd","xaiaim")
miaiax
^P1STREET("IS","cinepd","xg' 11")
11 'gx
^P1STREET("IS","cinepd","xg' 1177")
1177 'gx
^P1STREET("IS","cinepd","xgaz `exeo")
oexe` zagx
^P1STREET("IS","cinepd","xgaz `wqeceq")
qeceqw` zagx
^P1STREET("IS","cinepd","xgaz d`v""l")
l"v`d zagx
^P1STREET("IS","cinepd","xgaz d`ylb")
bly`d zagx
^P1STREET("IS","cinepd","xgaz dapim")
mipad zagx
^P1STREET("IS","cinepd","xgaz ddbpd")
dpbdd zagx
^P1STREET("IS","cinepd","xgaz dlg""i")
i"gld zagx
^P1STREET("IS","cinepd","xgaz dqekpez")
zepkeqd zagx
^P1STREET("IS","cinepd","xgaz dqpdcxio")
oixcdpqd zagx
^P1STREET("IS","cinepd","xgaz dtln""g")
g"nltd zagx
^P1STREET("IS","cinepd","xgaz dwp`im")
mi`pwd zagx
^P1STREET("IS","cinepd","xgaz dxa hiia")
aiih axd zagx
^P1STREET("IS","cinepd","xgaz necirio")
oiricen zagx
^P1STREET("IS","cinepd","xgaz xy""i")
i"yx zagx
^P1STREET("IS","cinepd","y`el dnlj")
jlnd le`y
^P1STREET("IS","cinepd","yafi ylem")
mely ifay
^P1STREET("IS","cinepd","yahd")
dhay
^P1STREET("IS","cinepd","yarz dnipim")
mipind zray
^P1STREET("IS","cinepd","yc' belcd n`ix")
xi`n dcleb 'cy
^P1STREET("IS","cinepd","yc' dcwl")
lwcd 'cy
^P1STREET("IS","cinepd","yc' dpyi`")
`iypd 'cy
^P1STREET("IS","cinepd","yc' dxvl")
lvxd 'cy
^P1STREET("IS","cinepd","yc' ib`l `leo")
oel` l`bi 'cy
^P1STREET("IS","cinepd","yeyo vgex")
xegv oyey
^P1STREET("IS","cinepd","yifs")
sfiy
^P1STREET("IS","cinepd","yleyz api rio gxec")
cexg oir ipa zyely
^P1STREET("IS","cinepd","zl `tw")
wt` lz
^P1STREET("IS","cinepd","zl gnd")
dng lz
^P1STREET("IS","cinepd","zl rxc")
cxr lz
^P1STREET("IS","cix `l cris")
sirc l` xic
^P1STREET("IS","cix `l-`qc")
cq`-l` xic
^P1STREET("IS","cix `l-`qc","`lbal")
labl`
^P1STREET("IS","cix `l-`qc","yiig `l `qc")
cq` l` giiy
^P1STREET("IS","cix gp`")
`pg xic
^P1STREET("IS","cix x`t`z")
z`t`x xic
^P1STREET("IS","clid")
dilc
^P1STREET("IS","clzeo")
oezlc
^P1STREET("IS","co")
oc
^P1STREET("IS","ctpd")
dptc
^P1STREET("IS","cwl")
lwc
^P1STREET("IS","cwl","dpba")
abpd
^P1STREET("IS","d`eo")
oe`d
^P1STREET("IS","daepim")
mipead
^P1STREET("IS","dbeyxim")
mixyebd
^P1STREET("IS","dcx rm")
mr xcd
^P1STREET("IS","dcx rm","cxj dx`yepim")
mipey`xd jxc
^P1STREET("IS","dcx rm","ddcxim")
mixcdd
^P1STREET("IS","dcx rm","ddelpcim")
micpledd
^P1STREET("IS","dcx rm","dpehr")
rhepd
^P1STREET("IS","dec dyxeo")
oexyd ced
^P1STREET("IS","dec dyxeo","`aia")
aia`
^P1STREET("IS","dec dyxeo","`axdm i`ix yhxo")
oxhy xi`i mdxa`
^P1STREET("IS","dec dyxeo","`cm dkdo")
odkd mc`
^P1STREET("IS","dec dyxeo","`dad")
dad`
^P1STREET("IS","dec dyxeo","`ecm")
mce`
^P1STREET("IS","dec dyxeo","`eknpiez")
zeipnke`
^P1STREET("IS","dec dyxeo","`eqiywio")
oiwyiqe`
^P1STREET("IS","dec dyxeo","`gc drm")
mrd cg`
^P1STREET("IS","dec dyxeo","`ifnxbc")
cbxnfi`
^P1STREET("IS","dec dyxeo","`igec")
cegi`
^P1STREET("IS","dec dyxeo","`iilz dygx")
xgyd zlii`
^P1STREET("IS","dec dyxeo","`ilpez")
zepli`
^P1STREET("IS","dec dyxeo","`ilz")
zli`
^P1STREET("IS","dec dyxeo","`iznx ao `a""i")
i"a` oa xnzi`
^P1STREET("IS","dec dyxeo","`les dpvgeo")
oegvpd sel`
^P1STREET("IS","dec dyxeo","`li kdo")
odk il`
^P1STREET("IS","dec dyxeo","`li nivc")
cvin il`
^P1STREET("IS","dec dyxeo","`lirfx")
xfril`
^P1STREET("IS","dec dyxeo","`liynr")
rnyil`
^P1STREET("IS","dec dyxeo","`lkqpcx dbcel")
lecbd xcpqkl`
^P1STREET("IS","dec dyxeo","`lkqpcx fiic")
ciif xcpqkl`
^P1STREET("IS","dec dyxeo","`lkqpcx to")
ot xcpqkl`
^P1STREET("IS","dec dyxeo","`pvilaiu")
uialivp`
^P1STREET("IS","dec dyxeo","`pyi ax`yiz")
ziy`xa iyp`
^P1STREET("IS","dec dyxeo","`pyi dkpqz dbceld")
dlecbd zqpkd iyp`
^P1STREET("IS","dec dyxeo","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","dec dyxeo","`qs dxet`")
`texd sq`
^P1STREET("IS","dec dyxeo","`tw")
wt`
^P1STREET("IS","dec dyxeo","`xal")
lax`
^P1STREET("IS","dec dyxeo","`xlefexea")
aexefelx`
^P1STREET("IS","dec dyxeo","`ykel")
leky`
^P1STREET("IS","dec dyxeo","a`xi")
ix`a
^P1STREET("IS","dec dyxeo","aeqzo")
ozqea
^P1STREET("IS","dec dyxeo","aexekea")
aekexea
^P1STREET("IS","dec dyxeo","aiz dac")
cad zia
^P1STREET("IS","dec dyxeo","aiz drm")
mrd zia
^P1STREET("IS","dec dyxeo","alewepim")
mipewela
^P1STREET("IS","dec dyxeo","ao bexieo")
oeixeb oa
^P1STREET("IS","dec dyxeo","ao idecd")
dcedi oa
^P1STREET("IS","dec dyxeo","api axiz")
zixa ipa
^P1STREET("IS","dec dyxeo","ax la")
al xa
^P1STREET("IS","dec dyxeo","axwz")
zwxa
^P1STREET("IS","dec dyxeo","az go")
og za
^P1STREET("IS","dec dyxeo","azi dqekpez")
zepkeqd iza
^P1STREET("IS","dec dyxeo","barz dzvtiz")
zitvzd zrab
^P1STREET("IS","dec dyxeo","belena")
aneleb
^P1STREET("IS","dec dyxeo","bexceo")
oecxeb
^P1STREET("IS","dec dyxeo","bfiz")
zifb
^P1STREET("IS","dec dyxeo","blaer")
realb
^P1STREET("IS","dec dyxeo","blbl dnflez")
zelfnd lblb
^P1STREET("IS","dec dyxeo","bnld")
dlnb
^P1STREET("IS","dec dyxeo","bpi vai")
iav ipb
^P1STREET("IS","dec dyxeo","bxpih")
hipxb
^P1STREET("IS","dec dyxeo","byni axkd")
dkxa inyb
^P1STREET("IS","dec dyxeo","caexd")
dxeac
^P1STREET("IS","dec dyxeo","cbpid")
dipbc
^P1STREET("IS","dec dyxeo","cbpiz")
zipbc
^P1STREET("IS","dec dyxeo","ceacao")
oacaec
^P1STREET("IS","dec dyxeo","cec `lrfx")
xfrl` cec
^P1STREET("IS","dec dyxeo","cec xfi`l")
l`ifx cec
^P1STREET("IS","dec dyxeo","cekitz")
ztikec
^P1STREET("IS","dec dyxeo","ctpd")
dptc
^P1STREET("IS","dec dyxeo","cxex")
xexc
^P1STREET("IS","dec dyxeo","cxj bnli`l")
l`ilnb jxc
^P1STREET("IS","dec dyxeo","cxj bpi rm")
mr ipb jxc
^P1STREET("IS","dec dyxeo","cxj dim")
mid jxc
^P1STREET("IS","dec dyxeo","cxj dqelho")
ohleqd jxc
^P1STREET("IS","dec dyxeo","cxj dyxeo")
oexyd jxc
^P1STREET("IS","dec dyxeo","cxj ktx dcx")
xcd xtk jxc
^P1STREET("IS","dec dyxeo","cxj nbci`l")
l`icbn jxc
^P1STREET("IS","dec dyxeo","cxj xnziim")
miiznx jxc
^P1STREET("IS","dec dyxeo","d`becd")
dceb`d
^P1STREET("IS","dec dyxeo","d`ehdwx")
xwdhe`d
^P1STREET("IS","dec dyxeo","d`expim")
mipxe`d
^P1STREET("IS","dec dyxeo","d`geed")
deeg`d
^P1STREET("IS","dec dyxeo","d`gim x`a")
a`x mig`d
^P1STREET("IS","dec dyxeo","d`igec")
cegi`d
^P1STREET("IS","dec dyxeo","d`ixeq")
qexi`d
^P1STREET("IS","dec dyxeo","d`lepim")
mipel`d
^P1STREET("IS","dec dyxeo","d`v""l")
l"v`d
^P1STREET("IS","dec dyxeo","d`yl")
ly`d
^P1STREET("IS","dec dyxeo","d`zxeb")
bexz`d
^P1STREET("IS","dec dyxeo","daali")
ilaad
^P1STREET("IS","dec dyxeo","dap`i")
i`pad
^P1STREET("IS","dec dyxeo","dapim")
mipad
^P1STREET("IS","dec dyxeo","daxeyim")
miyexad
^P1STREET("IS","dec dyxeo","daxikd")
dkixad
^P1STREET("IS","dec dyxeo","db`eld")
dle`bd
^P1STREET("IS","dec dyxeo","dbelo")
olebd
^P1STREET("IS","dec dyxeo","dbi`")
`ibd
^P1STREET("IS","dec dyxeo","dbiaex")
xeaibd
^P1STREET("IS","dec dyxeo","dbiard")
draibd
^P1STREET("IS","dec dyxeo","dblrc")
crlbd
^P1STREET("IS","dec dyxeo","dbo")
obd
^P1STREET("IS","dec dyxeo","dbpim")
mipbd
^P1STREET("IS","dec dyxeo","dbto")
otbd
^P1STREET("IS","dec dyxeo","dbyx")
xybd
^P1STREET("IS","dec dyxeo","dcay")
yacd
^P1STREET("IS","dec dyxeo","dcqim")
miqcd
^P1STREET("IS","dec dyxeo","dcwl")
lwcd
^P1STREET("IS","dec dyxeo","dcwlim")
milwcd
^P1STREET("IS","dec dyxeo","dcxim")
mixcd
^P1STREET("IS","dec dyxeo","ddbpd")
dpbdd
^P1STREET("IS","dec dyxeo","ddkyxez")
zexykdd
^P1STREET("IS","dec dyxeo","ddqzcxez")
zexczqdd
^P1STREET("IS","dec dyxeo","ddxces")
secxdd
^P1STREET("IS","dec dyxeo","dexc")
cxed
^P1STREET("IS","dec dyxeo","dfedx")
xdefd
^P1STREET("IS","dec dyxeo","dfiz")
zifd
^P1STREET("IS","dec dyxeo","dgeny")
ynegd
^P1STREET("IS","dec dyxeo","dgihd")
dhigd
^P1STREET("IS","dec dyxeo","dgiil")
liigd
^P1STREET("IS","dec dyxeo","dgwl`i")
i`lwgd
^P1STREET("IS","dec dyxeo","dgxneo")
oenxgd
^P1STREET("IS","dec dyxeo","dgxviz")
zivxgd
^P1STREET("IS","dec dyxeo","dgxy")
yxgd
^P1STREET("IS","dec dyxeo","dgynep`im")
mi`penygd
^P1STREET("IS","dec dyxeo","dicic")
cicid
^P1STREET("IS","dec dyxeo","dicicez")
zecicid
^P1STREET("IS","dec dyxeo","diealim")
milaeid
^P1STREET("IS","dec dyxeo","dirx")
xrid
^P1STREET("IS","dec dyxeo","dixco")
ocxid
^P1STREET("IS","dec dyxeo","dixwepim")
mipewxid
^P1STREET("IS","dec dyxeo","dkdpim")
mipdkd
^P1STREET("IS","dec dyxeo","dklpiz")
ziplkd
^P1STREET("IS","dec dyxeo","dkxm")
mxkd
^P1STREET("IS","dec dyxeo","dkxnl")
lnxkd
^P1STREET("IS","dec dyxeo","dkyxz diyea")
aeyid zxykd
^P1STREET("IS","dec dyxeo","dleiim")
miield
^P1STREET("IS","dec dyxeo","dlela")
aleld
^P1STREET("IS","dec dyxeo","dlg""i")
i"gld
^P1STREET("IS","dec dyxeo","dlineo")
oenild
^P1STREET("IS","dec dyxeo","dnbipim")
mipibnd
^P1STREET("IS","dec dyxeo","dncxbez")
zebxcnd
^P1STREET("IS","dec dyxeo","dneqcez")
zecqend
^P1STREET("IS","dec dyxeo","dngzxez")
zexzgnd
^P1STREET("IS","dec dyxeo","dniiqcim")
micqiind
^P1STREET("IS","dec dyxeo","dniqc")
cqind
^P1STREET("IS","dec dyxeo","dnkaim")
miaknd
^P1STREET("IS","dec dyxeo","dnl`kd")
dk`lnd
^P1STREET("IS","dec dyxeo","dnqbx")
xbqnd
^P1STREET("IS","dec dyxeo","dnrax")
xarnd
^P1STREET("IS","dec dyxeo","dnrbl")
lbrnd
^P1STREET("IS","dec dyxeo","dnrld")
dlrnd
^P1STREET("IS","dec dyxeo","dnrlez")
zelrnd
^P1STREET("IS","dec dyxeo","dnrtil")
litrnd
^P1STREET("IS","dec dyxeo","dnwyx")
xywnd
^P1STREET("IS","dec dyxeo","dnzpglim")
milgpznd
^P1STREET("IS","dec dyxeo","dpai`im")
mi`iapd
^P1STREET("IS","dec dyxeo","dpbx")
xbpd
^P1STREET("IS","dec dyxeo","dpehxim")
mixhepd
^P1STREET("IS","dec dyxeo","dpexiz")
zixepd
^P1STREET("IS","dec dyxeo","dpxwiq")
qiwxpd
^P1STREET("IS","dec dyxeo","dpyi`im")
mi`iypd
^P1STREET("IS","dec dyxeo","dqaieo")
oeiaqd
^P1STREET("IS","dec dyxeo","dqco")
ocqd
^P1STREET("IS","dec dyxeo","dqcp`")
`pcqd
^P1STREET("IS","dec dyxeo","dqekpez")
zepkeqd
^P1STREET("IS","dec dyxeo","dqxbl")
lbxqd
^P1STREET("IS","dec dyxeo","draecd")
dceard
^P1STREET("IS","dec dyxeo","dreac dviepi")
ipeivd caerd
^P1STREET("IS","dec dyxeo","drliez")
zeilrd
^P1STREET("IS","dec dyxeo","drnl")
lnrd
^P1STREET("IS","dec dyxeo","drnw")
wnrd
^P1STREET("IS","dec dyxeo","drvn`ez")
ze`nvrd
^P1STREET("IS","dec dyxeo","drxad")
daxrd
^P1STREET("IS","dec dyxeo","dthiy")
yihtd
^P1STREET("IS","dec dyxeo","dthl")
lhtd
^P1STREET("IS","dec dyxeo","dtln""g")
g"nltd
^P1STREET("IS","dec dyxeo","dtw`o")
o`wtd
^P1STREET("IS","dec dyxeo","dtxc")
cxtd
^P1STREET("IS","dec dyxeo","dtxcq")
qcxtd
^P1STREET("IS","dec dyxeo","dtxqd")
dqxtd
^P1STREET("IS","dec dyxeo","dvai")
iavd
^P1STREET("IS","dec dyxeo","dvarepi")
iperavd
^P1STREET("IS","dec dyxeo","dviepez")
zepeivd
^P1STREET("IS","dec dyxeo","dvpgpim")
mipgpvd
^P1STREET("IS","dec dyxeo","dx nixeo")
oexin xd
^P1STREET("IS","dec dyxeo","dx`l")
l`xd
^P1STREET("IS","dec dyxeo","dx`yepim")
mipey`xd
^P1STREET("IS","dec dyxeo","dxineo")
oenixd
^P1STREET("IS","dec dyxeo","dxnd")
dnxd
^P1STREET("IS","dec dyxeo","dxnez")
zenxd
^P1STREET("IS","dec dyxeo","dxvl")
lvxd
^P1STREET("IS","dec dyxeo","dxvtlc")
cltvxd
^P1STREET("IS","dec dyxeo","dxweo")
oewxd
^P1STREET("IS","dec dyxeo","dxyez")
zeyxd
^P1STREET("IS","dec dyxeo","dyenx")
xneyd
^P1STREET("IS","dec dyxeo","dyeypim")
mipyeyd
^P1STREET("IS","dec dyxeo","dygx")
xgyd
^P1STREET("IS","dec dyxeo","dyihd")
dhiyd
^P1STREET("IS","dec dyxeo","dylem")
melyd
^P1STREET("IS","dec dyxeo","dyleyd")
dyelyd
^P1STREET("IS","dec dyxeo","dyny dreld")
dlerd ynyd
^P1STREET("IS","dec dyxeo","dyrexd")
dxeryd
^P1STREET("IS","dec dyxeo","dywc")
cwyd
^P1STREET("IS","dec dyxeo","dywnim")
minwyd
^P1STREET("IS","dec dyxeo","dyxib")
bixyd
^P1STREET("IS","dec dyxeo","dz`pd")
dp`zd
^P1STREET("IS","dec dyxeo","dzaex")
xeazd
^P1STREET("IS","dec dyxeo","dzgid")
digzd
^P1STREET("IS","dec dyxeo","dzklz")
zlkzd
^P1STREET("IS","dec dyxeo","dzlnic")
cinlzd
^P1STREET("IS","dec dyxeo","dznx")
xnzd
^P1STREET("IS","dec dyxeo","dzteg")
getzd
^P1STREET("IS","dec dyxeo","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","dec dyxeo","flno yf""x")
x"fy onlf
^P1STREET("IS","dec dyxeo","fnix")
xinf
^P1STREET("IS","dec dyxeo","fwis")
siwf
^P1STREET("IS","dec dyxeo","gavlz")
zlvag
^P1STREET("IS","dec dyxeo","gegiz")
zigeg
^P1STREET("IS","dec dyxeo","gelez peccim")
miccep zeleg
^P1STREET("IS","dec dyxeo","ghiad yar")
ray daihg
^P1STREET("IS","dec dyxeo","ghiaz barzi")
izrab zaihg
^P1STREET("IS","dec dyxeo","ghiaz belpi")
ipleb zaihg
^P1STREET("IS","dec dyxeo","ghiaz dx`l")
l`xd zaihg
^P1STREET("IS","dec dyxeo","ghiaz itzg")
gzti zaihg
^P1STREET("IS","dec dyxeo","giim lqwea")
aewql miig
^P1STREET("IS","dec dyxeo","glevim")
mivelg
^P1STREET("IS","dec dyxeo","glewi pgl")
lgp iwelg
^P1STREET("IS","dec dyxeo","glniy")
yinlg
^P1STREET("IS","dec dyxeo","gnpiz")
zipng
^P1STREET("IS","dec dyxeo","gpd qpy")
ypq dpg
^P1STREET("IS","dec dyxeo","gpwio")
oiwpg
^P1STREET("IS","dec dyxeo","gva")
avg
^P1STREET("IS","dec dyxeo","gyeo")
oeyg
^P1STREET("IS","dec dyxeo","haz")
zah
^P1STREET("IS","dec dyxeo","heeq")
qeeh
^P1STREET("IS","dec dyxeo","hetf")
fteh
^P1STREET("IS","dec dyxeo","hxentlcex")
xecltnexh
^P1STREET("IS","dec dyxeo","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","dec dyxeo","i.l. txu")
uxt .l.i
^P1STREET("IS","dec dyxeo","ib`l `leo")
oel` l`bi
^P1STREET("IS","dec dyxeo","ib`l icio")
oici l`bi
^P1STREET("IS","dec dyxeo","idecd")
dcedi
^P1STREET("IS","dec dyxeo","idepzo")
ozpedi
^P1STREET("IS","dec dyxeo","ideyr ao bnl`")
`lnb oa ryedi
^P1STREET("IS","dec dyxeo","idlem")
meldi
^P1STREET("IS","dec dyxeo","iegpo")
opgei
^P1STREET("IS","dec dyxeo","iexci dim")
mid icxei
^P1STREET("IS","dec dyxeo","iqec dnrld")
dlrnd ceqi
^P1STREET("IS","dec dyxeo","iqnio")
oinqi
^P1STREET("IS","dec dyxeo","irwa cexi")
ixec awri
^P1STREET("IS","dec dyxeo","ivgw ao vai")
iav oa wgvi
^P1STREET("IS","dec dyxeo","ivgw ycd")
dcy wgvi
^P1STREET("IS","dec dyxeo","ixeyaqwi")
iwqayexi
^P1STREET("IS","dec dyxeo","ixeylni")
inlyexi
^P1STREET("IS","dec dyxeo","iyexeo")
oexeyi
^P1STREET("IS","dec dyxeo","iytd")
dtyi
^P1STREET("IS","dec dyxeo","iyx`li dxet`")
`texd il`xyi
^P1STREET("IS","dec dyxeo","kiaey")
yeaik
^P1STREET("IS","dec dyxeo","kkx heaid")
diaeh xkk
^P1STREET("IS","dec dyxeo","kpxz")
zxpk
^P1STREET("IS","dec dyxeo","kqle")
elqk
^P1STREET("IS","dec dyxeo","kvplqeo")
oeqlpvk
^P1STREET("IS","dec dyxeo","kxkem")
mekxk
^P1STREET("IS","dec dyxeo","lehm")
mhel
^P1STREET("IS","dec dyxeo","lym")
myl
^P1STREET("IS","dec dyxeo","nae` wcm")
mcw `ean
^P1STREET("IS","dec dyxeo","naei dgxy")
yxgd iean
^P1STREET("IS","dec dyxeo","navr nyd")
dyn rvan
^P1STREET("IS","dec dyxeo","navr wcy")
ycw rvan
^P1STREET("IS","dec dyxeo","nbo")
obn
^P1STREET("IS","dec dyxeo","necirio")
oiricen
^P1STREET("IS","dec dyxeo","nelcz")
zclen
^P1STREET("IS","dec dyxeo","nephitiexi")
ixeitihpen
^P1STREET("IS","dec dyxeo","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","dec dyxeo","nfl `xid")
dix` lfn
^P1STREET("IS","dec dyxeo","nfl bci")
icb lfn
^P1STREET("IS","dec dyxeo","nfl cli")
ilc lfn
^P1STREET("IS","dec dyxeo","nfl hld")
dlh lfn
^P1STREET("IS","dec dyxeo","nfl n`fpiim")
miipf`n lfn
^P1STREET("IS","dec dyxeo","nfl wyz")
zyw lfn
^P1STREET("IS","dec dyxeo","nfl z`enim")
mine`z lfn
^P1STREET("IS","dec dyxeo","nihl")
lhin
^P1STREET("IS","dec dyxeo","npegd epgld")
dlgpe dgepn
^P1STREET("IS","dec dyxeo","npgm")
mgpn
^P1STREET("IS","dec dyxeo","nripi")
ipirn
^P1STREET("IS","dec dyxeo","nrld dexcim")
micxed dlrn
^P1STREET("IS","dec dyxeo","nvcd")
dcvn
^P1STREET("IS","dec dyxeo","nxber")
rebxn
^P1STREET("IS","dec dyxeo","nxbliz")
zilbxn
^P1STREET("IS","dec dyxeo","nxcki")
ikcxn
^P1STREET("IS","dec dyxeo","nxgaid")
diagxn
^P1STREET("IS","dec dyxeo","nxim dgynep`iz")
zi`penygd mixn
^P1STREET("IS","dec dyxeo","nxkf exd qlenepeq")
qepenelq dxe fkxn
^P1STREET("IS","dec dyxeo","ny`aim")
mia`yn
^P1STREET("IS","dec dyxeo","nyd yxz")
zxy dyn
^P1STREET("IS","dec dyxeo","nzzide")
edizzn
^P1STREET("IS","dec dyxeo","pba")
abp
^P1STREET("IS","dec dyxeo","pbd")
dbp
^P1STREET("IS","dec dyxeo","petiz")
zitep
^P1STREET("IS","dec dyxeo","petj")
jtep
^P1STREET("IS","dec dyxeo","petx")
xtep
^P1STREET("IS","dec dyxeo","pgl cliez")
zeilc lgp
^P1STREET("IS","dec dyxeo","pgl rxebez")
zebexr lgp
^P1STREET("IS","dec dyxeo","pgli`li")
il`ilgp
^P1STREET("IS","dec dyxeo","pgyeo")
oeygp
^P1STREET("IS","dec dyxeo","phrim")
mirhp
^P1STREET("IS","dec dyxeo","prexim")
mixerp
^P1STREET("IS","dec dyxeo","pvg iyx`l")
l`xyi gvp
^P1STREET("IS","dec dyxeo","pzo `lzxno")
onxzl` ozp
^P1STREET("IS","dec dyxeo","qelc dpxi`hd")
dh`ixpd cleq
^P1STREET("IS","dec dyxeo","qewelea")
aeleweq
^P1STREET("IS","dec dyxeo","qipi")
ipiq
^P1STREET("IS","dec dyxeo","qizepiz")
zipeziq
^P1STREET("IS","dec dyxeo","qnhz `ao")
oa` zhnq
^P1STREET("IS","dec dyxeo","qnhz cex ddnyj")
jyndd xec zhnq
^P1STREET("IS","dec dyxeo","qnhz d`bef")
feb`d zhnq
^P1STREET("IS","dec dyxeo","qnhz d`leo")
oel`d zhnq
^P1STREET("IS","dec dyxeo","qnhz daxey")
yexad zhnq
^P1STREET("IS","dec dyxeo","qnhz daxig")
gixad zhnq
^P1STREET("IS","dec dyxeo","qnhz dbtpim")
miptbd zhnq
^P1STREET("IS","dec dyxeo","qnhz dcxex")
xexcd zhnq
^P1STREET("IS","dec dyxeo","qnhz di""g")
g"id zhnq
^P1STREET("IS","dec dyxeo","qnhz dixw")
wxid zhnq
^P1STREET("IS","dec dyxeo","qnhz dperx")
xrepd zhnq
^P1STREET("IS","dec dyxeo","qnhz dqiito")
otiiqd zhnq
^P1STREET("IS","dec dyxeo","qnhz dxipd")
dpixd zhnq
^P1STREET("IS","dec dyxeo","qnhz dyifs")
sfiyd zhnq
^P1STREET("IS","dec dyxeo","qnhz dzwend")
dnewzd zhnq
^P1STREET("IS","dec dyxeo","qnhz nexyd")
dyxen zhnq
^P1STREET("IS","dec dyxeo","qnhz pebd")
dbep zhnq
^P1STREET("IS","dec dyxeo","qnhz pil""i")
i"lip zhnq
^P1STREET("IS","dec dyxeo","qnhz tceiim")
miiect zhnq
^P1STREET("IS","dec dyxeo","qnhz zixey")
yexiz zhnq
^P1STREET("IS","dec dyxeo","qpepiz")
zipepq
^P1STREET("IS","dec dyxeo","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","dec dyxeo","qtix")
xitq
^P1STREET("IS","dec dyxeo","qzie")
eizq
^P1STREET("IS","dec dyxeo","rio gi")
ig oir
^P1STREET("IS","dec dyxeo","rixiz")
zixir
^P1STREET("IS","dec dyxeo","rliiz dperx")
xrepd ziilr
^P1STREET("IS","dec dyxeo","rwlzeo")
oezlwr
^P1STREET("IS","dec dyxeo","tceiim")
miiect
^P1STREET("IS","dec dyxeo","tipqwx")
xwqpit
^P1STREET("IS","dec dyxeo","trnepiz")
zipenrt
^P1STREET("IS","dec dyxeo","tvli yno")
ony ilvt
^P1STREET("IS","dec dyxeo","txgim")
migxt
^P1STREET("IS","dec dyxeo","tyey")
yeyt
^P1STREET("IS","dec dyxeo","vaxim")
mixav
^P1STREET("IS","dec dyxeo","vd""l")
l"dv
^P1STREET("IS","dec dyxeo","vetiz")
zitev
^P1STREET("IS","dec dyxeo","vex")
xev
^P1STREET("IS","dec dyxeo","vexo")
oxev
^P1STREET("IS","dec dyxeo","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","dec dyxeo","xehyilc")
cliyhex
^P1STREET("IS","dec dyxeo","xna""m")
m"anx
^P1STREET("IS","dec dyxeo","xnf")
fnx
^P1STREET("IS","dec dyxeo","xrez")
zerx
^P1STREET("IS","dec dyxeo","xwtz")
ztwx
^P1STREET("IS","dec dyxeo","xy""i")
i"yx
^P1STREET("IS","dec dyxeo","yae")
eay
^P1STREET("IS","dec dyxeo","yai vieo")
oeiv iay
^P1STREET("IS","dec dyxeo","yail dztefim")
mifetzd liay
^P1STREET("IS","dec dyxeo","yaz`i")
i`zay
^P1STREET("IS","dec dyxeo","yc' dpyi`")
`iypd 'cy
^P1STREET("IS","dec dyxeo","yg""l")
l"gy
^P1STREET("IS","dec dyxeo","ygla")
algy
^P1STREET("IS","dec dyxeo","ygm")
mgy
^P1STREET("IS","dec dyxeo","ygs")
sgy
^P1STREET("IS","dec dyxeo","ylcb")
bcly
^P1STREET("IS","dec dyxeo","ylem rlikm")
mkilr mely
^P1STREET("IS","dec dyxeo","ylenvieo")
oeivnely
^P1STREET("IS","dec dyxeo","ynix")
xiny
^P1STREET("IS","dec dyxeo","ynreo dvciw")
wicvd oerny
^P1STREET("IS","dec dyxeo","ypz dieal")
laeid zpy
^P1STREET("IS","dec dyxeo","ytxipvw")
wvpixty
^P1STREET("IS","dec dyxeo","ywp`i")
i`pwy
^P1STREET("IS","dec dyxeo","yyz dinim")
minid zyy
^P1STREET("IS","dec dyxeo","zex")
xez
^P1STREET("IS","dec dyxeo","zl co")
oc lz
^P1STREET("IS","dec dyxeo","zlc")
clz
^P1STREET("IS","dec dyxeo","zxt""d")
d"txz
^P1STREET("IS","dec dyxeo","zxyiy")
yiyxz
^P1STREET("IS","dec dyxeo","zyxi")
ixyz
^P1STREET("IS","decid")
diced
^P1STREET("IS","deyrid")
diryed
^P1STREET("IS","deyrid","dneail")
liaend
^P1STREET("IS","dfexr")
rxefd
^P1STREET("IS","dfexrim")
mirxefd
^P1STREET("IS","dgezxim")
mixzegd
^P1STREET("IS","dieba")
abeid
^P1STREET("IS","dktx dixew")
wexid xtkd
^P1STREET("IS","dktx dixew","cxj nyd qpd")
dpq dyn jxc
^P1STREET("IS","dnrtil")
litrnd
^P1STREET("IS","dqellim")
milleqd
^P1STREET("IS","drebo")
oberd
^P1STREET("IS","dx `cx")
xc` xd
^P1STREET("IS","dx `cx","barz dxc`x")
x`cxd zrab
^P1STREET("IS","dx `cx","cxj drxad")
daxrd jxc
^P1STREET("IS","dx `cx","d`exo")
oxe`d
^P1STREET("IS","dx `cx","d`ld")
dl`d
^P1STREET("IS","dx `cx","d`leo")
oel`d
^P1STREET("IS","dx `cx","daxey")
yexad
^P1STREET("IS","dx `cx","dbi`")
`ibd
^P1STREET("IS","dx `cx","dzenx")
xnezd
^P1STREET("IS","dx `cx","nae` daeqzo")
ozqead `ean
^P1STREET("IS","dx `cx","nae` dbto")
otbd `ean
^P1STREET("IS","dx `cx","nae` dcq")
qcd `ean
^P1STREET("IS","dx `cx","nae` dfiz")
zifd `ean
^P1STREET("IS","dx `cx","nae` dgxea")
aexgd `ean
^P1STREET("IS","dx `cx","nae` dlaepd")
dpeald `ean
^P1STREET("IS","dx `cx","nae` dxineo")
oenixd `ean
^P1STREET("IS","dx `cx","nae` dxkq")
qkxd `ean
^P1STREET("IS","dx `cx","nae` dywc")
cwyd `ean
^P1STREET("IS","dx `cx","nae` dz`pd")
dp`zd `ean
^P1STREET("IS","dx `cx","nae` kxnim")
minxk `ean
^P1STREET("IS","dx `cx","pes dxim")
mixd sep
^P1STREET("IS","dx `cx","yc' dx`l")
l`xd 'cy
^P1STREET("IS","dx gaxeo")
oexag xd
^P1STREET("IS","dx gaxeo","nrld dx gaxeo")
oexag xd dlrn
^P1STREET("IS","dx gaxeo","nrld gax")
xag dlrn
^P1STREET("IS","dx gaxeo","pba")
abp
^P1STREET("IS","dx rny`")
`ynr xd
^P1STREET("IS","dx`l")
l`xd
^P1STREET("IS","dxvlid")
dilvxd
^P1STREET("IS","dxvlid","`""c bexceo")
oecxeb c"`
^P1STREET("IS","dxvlid","`a` `ao")
oa` `a`
^P1STREET("IS","dxvlid","`aewd")
dwea`
^P1STREET("IS","dxvlid","`ahlieo")
oeilha`
^P1STREET("IS","dxvlid","`aia")
aia`
^P1STREET("IS","dxvlid","`aibil")
libia`
^P1STREET("IS","dxvlid","`ao `ecm")
mce` oa`
^P1STREET("IS","dxvlid","`ao baixel")
lexiab oa`
^P1STREET("IS","dxvlid","`ao rfx`")
`xfr oa`
^P1STREET("IS","dxvlid","`ao ytxeh")
hexty oa`
^P1STREET("IS","dxvlid","`apiim")
miipa`
^P1STREET("IS","dxvlid","`apx")
xpa`
^P1STREET("IS","dxvlid","`axap`l")
l`paxa`
^P1STREET("IS","dxvlid","`bq")
qb`
^P1STREET("IS","dxvlid","`bxz zino")
oniz zxb`
^P1STREET("IS","dxvlid","`ceed")
deec`
^P1STREET("IS","dxvlid","`daz vieo")
oeiv zad`
^P1STREET("IS","dxvlid","`epwleq")
qelwpe`
^P1STREET("IS","dxvlid","`eqiywio")
oiwyiqe`
^P1STREET("IS","dxvlid","`etix")
xite`
^P1STREET("IS","dxvlid","`evx dvngim")
mignvd xve`
^P1STREET("IS","dxvlid","`ex")
xe`
^P1STREET("IS","dxvlid","`ex dgiim")
miigd xe`
^P1STREET("IS","dxvlid","`exi")
ixe`
^P1STREET("IS","dxvlid","`exi vai bxipaxb")
bxapixb iav ixe`
^P1STREET("IS","dxvlid","`f""x")
x"f`
^P1STREET("IS","dxvlid","`g""i `ilz")
zli` i"g`
^P1STREET("IS","dxvlid","`g""i cwx")
xwc i"g`
^P1STREET("IS","dxvlid","`gc drm")
mrd cg`
^P1STREET("IS","dxvlid","`ged")
deg`
^P1STREET("IS","dxvlid","`iilz go")
og zlii`
^P1STREET("IS","dxvlid","`ipyhiio `laxh")
hxal` oiihypi`
^P1STREET("IS","dxvlid","`l rl")
lr l`
^P1STREET("IS","dxvlid","`lcc dcpi")
ipcd ccl`
^P1STREET("IS","dxvlid","`lenez")
zenel`
^P1STREET("IS","dxvlid","`lfiqe")
eqifl`
^P1STREET("IS","dxvlid","`lgxifi")
ifixgl`
^P1STREET("IS","dxvlid","`li kdo")
odk il`
^P1STREET("IS","dxvlid","`lirfx itd")
dti xfril`
^P1STREET("IS","dxvlid","`lirfx wtlo")
oltw xfril`
^P1STREET("IS","dxvlid","`lkqpcx ip`i")
i`pi xcpqkl`
^P1STREET("IS","dxvlid","`ltqi")
iqtl`
^P1STREET("IS","dxvlid","`lwlri idecd")
dcedi irlwl`
^P1STREET("IS","dxvlid","`nd h`eax")
xae`h dn`
^P1STREET("IS","dxvlid","`nixim")
mixin`
^P1STREET("IS","dxvlid","`npeo eznx")
xnze oepn`
^P1STREET("IS","dxvlid","`pd txpw")
wpxt dp`
^P1STREET("IS","dxvlid","`ptd")
dtp`
^P1STREET("IS","dxvlid","`pv'e qixpi")
ipxiq e'vp`
^P1STREET("IS","dxvlid","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","dxvlid","`s rl ti")
it lr s`
^P1STREET("IS","dxvlid","`txim")
mixt`
^P1STREET("IS","dxvlid","`txqneo")
oenqxt`
^P1STREET("IS","dxvlid","`v""l")
l"v`
^P1STREET("IS","dxvlid","`xal")
lax`
^P1STREET("IS","dxvlid","`xi`l")
l`ix`
^P1STREET("IS","dxvlid","`xid ypwx")
xwpy dix`
^P1STREET("IS","dxvlid","`xlefexea")
aexefelx`
^P1STREET("IS","dxvlid","a`xi")
ix`a
^P1STREET("IS","dxvlid","aeql")
lqea
^P1STREET("IS","dxvlid","aewx")
xwea
^P1STREET("IS","dxvlid","aexekea")
aekexea
^P1STREET("IS","dxvlid","aexl` idecd")
dcedi `lxea
^P1STREET("IS","dxvlid","afl")
lfa
^P1STREET("IS","dxvlid","ail""e")
e"lia
^P1STREET("IS","dxvlid","ailipqeo")
oeqpilia
^P1STREET("IS","dxvlid","aizx")
xzia
^P1STREET("IS","dxvlid","altex")
xetla
^P1STREET("IS","dxvlid","ao `lirfx")
xfril` oa
^P1STREET("IS","dxvlid","ao bexieo")
oeixeb oa
^P1STREET("IS","dxvlid","ao idecd")
dcedi oa
^P1STREET("IS","dxvlid","ao ieqs ylnd")
dnly sqei oa
^P1STREET("IS","dxvlid","ao qxew")
wexq oa
^P1STREET("IS","dxvlid","ao vieo cipex")
xepic oeiv oa
^P1STREET("IS","dxvlid","api apinio")
oinipa ipa
^P1STREET("IS","dxvlid","avl`l")
l`lva
^P1STREET("IS","dxvlid","ax `ilo")
oli` xa
^P1STREET("IS","dxvlid","ax ieg`i")
i`gei xa
^P1STREET("IS","dxvlid","ax keka`")
`akek xa
^P1STREET("IS","dxvlid","ax`eo")
oe`xa
^P1STREET("IS","dxvlid","axej wnio")
oinw jexa
^P1STREET("IS","dxvlid","axpx")
xpxa
^P1STREET("IS","dxvlid","axw")
wxa
^P1STREET("IS","dxvlid","axwz")
zwxa
^P1STREET("IS","dxvlid","axy `yx")
xy` yxa
^P1STREET("IS","dxvlid","az yar")
ray za
^P1STREET("IS","dxvlid","azi lenix")
xinel iza
^P1STREET("IS","dxvlid","baexi rvieo")
oeivr ixeab
^P1STREET("IS","dxvlid","barz dglenez")
zenelgd zrab
^P1STREET("IS","dxvlid","barz dqetx")
xteqd zrab
^P1STREET("IS","dxvlid","barz dzgneyz")
zyengzd zrab
^P1STREET("IS","dxvlid","barz nxcki")
ikcxn zrab
^P1STREET("IS","dxvlid","bcreo dyeth")
hteyd oercb
^P1STREET("IS","dxvlid","belcd n`ix")
xi`n dcleb
^P1STREET("IS","dxvlid","belena")
aneleb
^P1STREET("IS","dxvlid","bil")
lib
^P1STREET("IS","dxvlid","biqio")
oiqib
^P1STREET("IS","dxvlid","biziz")
zizib
^P1STREET("IS","dxvlid","blbli dtlcd")
dcltd ilblb
^P1STREET("IS","dxvlid","bli zklz")
zlkz ilb
^P1STREET("IS","dxvlid","bxepx")
xpexb
^P1STREET("IS","dxvlid","bz")
zb
^P1STREET("IS","dxvlid","ca def")
fed ac
^P1STREET("IS","dxvlid","cbpid")
dipbc
^P1STREET("IS","dxvlid","ceacao")
oacaec
^P1STREET("IS","dxvlid","ceapea")
aepaec
^P1STREET("IS","dxvlid","cec `lxe`i")
i`exl` cec
^P1STREET("IS","dxvlid","cec dx`eapi")
ipae`xd cec
^P1STREET("IS","dxvlid","cec xfi`l")
l`ifx cec
^P1STREET("IS","dxvlid","cec ynrepi")
iperny cec
^P1STREET("IS","dxvlid","cekitz")
ztikec
^P1STREET("IS","dxvlid","cela")
alec
^P1STREET("IS","dxvlid","ceo ieqs dpyi`")
`iypd sqei oec
^P1STREET("IS","dxvlid","cipex")
xepic
^P1STREET("IS","dxvlid","civd")
dvic
^P1STREET("IS","dxvlid","clid")
dilc
^P1STREET("IS","dxvlid","co")
oc
^P1STREET("IS","dxvlid","ctpd")
dptc
^P1STREET("IS","dxvlid","cxj ciio nyd")
dyn oiic jxc
^P1STREET("IS","dxvlid","cxj dbpim")
mipbd jxc
^P1STREET("IS","dxvlid","cxj dnlj")
jlnd jxc
^P1STREET("IS","dxvlid","cxj dycez")
zecyd jxc
^P1STREET("IS","dxvlid","cxj gitd")
dtig jxc
^P1STREET("IS","dxvlid","cxj ib`l icio")
oici l`bi jxc
^P1STREET("IS","dxvlid","cxj ixeylim")
milyexi jxc
^P1STREET("IS","dxvlid","cxj zl `aia")
aia` lz jxc
^P1STREET("IS","dxvlid","d-101")
101-d
^P1STREET("IS","dxvlid","d` a`iix")
xii`a `d
^P1STREET("IS","dxvlid","d`bef")
feb`d
^P1STREET("IS","dxvlid","d`cniz")
zinc`d
^P1STREET("IS","dxvlid","d`expim")
mipxe`d
^P1STREET("IS","dxvlid","d`ilpez")
zepli`d
^P1STREET("IS","dxvlid","d`ld")
dl`d
^P1STREET("IS","dxvlid","d`leo")
oel`d
^P1STREET("IS","dxvlid","d`qis")
siq`d
^P1STREET("IS","dxvlid","d`wlitheq")
qehtilw`d
^P1STREET("IS","dxvlid","d`x""f")
f"x`d
^P1STREET("IS","dxvlid","d`x""i")
i"x`d
^P1STREET("IS","dxvlid","d`yl")
ly`d
^P1STREET("IS","dxvlid","d`zxeb")
bexz`d
^P1STREET("IS","dxvlid","daeqzo")
ozqead
^P1STREET("IS","dxvlid","dapim")
mipad
^P1STREET("IS","dxvlid","darl ym hea")
aeh my lrad
^P1STREET("IS","dxvlid","daxey")
yexad
^P1STREET("IS","dxvlid","daxibcd dideciz")
zicedid dcbixad
^P1STREET("IS","dxvlid","dayex")
xeyad
^P1STREET("IS","dxvlid","dayo")
oyad
^P1STREET("IS","dxvlid","db`eo neilp`")
`plien oe`bd
^P1STREET("IS","dxvlid","dbaexd")
dxeabd
^P1STREET("IS","dxvlid","dbcec draxi")
ixard cecbd
^P1STREET("IS","dxvlid","dblaer")
realbd
^P1STREET("IS","dxvlid","dblil")
lilbd
^P1STREET("IS","dxvlid","dbto")
otbd
^P1STREET("IS","dxvlid","dcec`im")
mi`cecd
^P1STREET("IS","dxvlid","dcq")
qcd
^P1STREET("IS","dxvlid","dcqd")
dqcd
^P1STREET("IS","dxvlid","dcqim")
miqcd
^P1STREET("IS","dxvlid","dcwl")
lwcd
^P1STREET("IS","dxvlid","dcx")
xcd
^P1STREET("IS","dxvlid","ddbpd")
dpbdd
^P1STREET("IS","dxvlid","ddqzcxez")
zexczqdd
^P1STREET("IS","dxvlid","dexcim")
micxed
^P1STREET("IS","dxvlid","dfedx")
xdefd
^P1STREET("IS","dxvlid","dfexr")
rxefd
^P1STREET("IS","dxvlid","dfizim")
mizifd
^P1STREET("IS","dxvlid","dgexy")
yxegd
^P1STREET("IS","dxvlid","dgeylim")
milyegd
^P1STREET("IS","dxvlid","dgippiz")
zippigd
^P1STREET("IS","dxvlid","dgivim")
mivigd
^P1STREET("IS","dxvlid","dglem etyxe")
exyte melgd
^P1STREET("IS","dxvlid","dgleu")
uelgd
^P1STREET("IS","dxvlid","dgpiz")
zipgd
^P1STREET("IS","dxvlid","dgva")
avgd
^P1STREET("IS","dxvlid","dgxea")
aexgd
^P1STREET("IS","dxvlid","dgxevim")
mivexgd
^P1STREET("IS","dxvlid","dgxneo")
oenxgd
^P1STREET("IS","dxvlid","dgxny")
ynxgd
^P1STREET("IS","dxvlid","dgxviz")
zivxgd
^P1STREET("IS","dxvlid","dgynep`im")
mi`penygd
^P1STREET("IS","dxvlid","dhiiqim")
miqiihd
^P1STREET("IS","dxvlid","dicic")
cicid
^P1STREET("IS","dxvlid","didlem")
meldid
^P1STREET("IS","dxvlid","diexd")
dxeid
^P1STREET("IS","dxvlid","diqnio")
oinqid
^P1STREET("IS","dxvlid","diwipheo")
oehpiwid
^P1STREET("IS","dxvlid","dixco")
ocxid
^P1STREET("IS","dxvlid","dixy")
yxid
^P1STREET("IS","dxvlid","dizc")
czid
^P1STREET("IS","dxvlid","dk""b")
b"kd
^P1STREET("IS","dxvlid","dkefxi")
ixfekd
^P1STREET("IS","dxvlid","dkpqz")
zqpkd
^P1STREET("IS","dxvlid","dkxm")
mxkd
^P1STREET("IS","dxvlid","dkxnl")
lnxkd
^P1STREET("IS","dxvlid","dleheq")
qeheld
^P1STREET("IS","dxvlid","dliapd")
dpaild
^P1STREET("IS","dxvlid","dlilj")
jlild
^P1STREET("IS","dxvlid","dll")
lld
^P1STREET("IS","dxvlid","dlpi dnlkd")
dklnd ipld
^P1STREET("IS","dxvlid","dnbipim")
mipibnd
^P1STREET("IS","dxvlid","dnbyinim")
miniybnd
^P1STREET("IS","dxvlid","dncr")
rcnd
^P1STREET("IS","dxvlid","dncxeo")
oexcnd
^P1STREET("IS","dxvlid","dneqcez")
zecqend
^P1STREET("IS","dxvlid","dnlj cec")
cec jlnd
^P1STREET("IS","dxvlid","dnlj gfwide")
ediwfg jlnd
^P1STREET("IS","dxvlid","dnlj ideyth")
htyedi jlnd
^P1STREET("IS","dxvlid","dnlj refide")
edifer jlnd
^P1STREET("IS","dxvlid","dnlj y`el")
le`y jlnd
^P1STREET("IS","dxvlid","dnlj ylnd")
dnly jlnd
^P1STREET("IS","dxvlid","dnlkd `qzx")
xzq` dklnd
^P1STREET("IS","dxvlid","dnlwey")
yewlnd
^P1STREET("IS","dxvlid","dnpdxd")
dxdpnd
^P1STREET("IS","dxvlid","dnpetim")
mitepnd
^P1STREET("IS","dxvlid","dnqild")
dliqnd
^P1STREET("IS","dxvlid","dnrax")
xarnd
^P1STREET("IS","dxvlid","dnriio")
oiirnd
^P1STREET("IS","dxvlid","dnrlez")
zelrnd
^P1STREET("IS","dxvlid","dnrtilim")
militrnd
^P1STREET("IS","dxvlid","dnwealim")
milaewnd
^P1STREET("IS","dxvlid","dnxi")
ixnd
^P1STREET("IS","dxvlid","dnznic")
cinznd
^P1STREET("IS","dxvlid","dpai`im")
mi`iapd
^P1STREET("IS","dxvlid","dpba")
abpd
^P1STREET("IS","dxvlid","dpcia")
aicpd
^P1STREET("IS","dxvlid","dpehxim")
mixhepd
^P1STREET("IS","dxvlid","dpexiez")
zeixepd
^P1STREET("IS","dxvlid","dpivpim")
mipvipd
^P1STREET("IS","dxvlid","dprexim")
mixerpd
^P1STREET("IS","dxvlid","dpxwiqim")
miqiwxpd
^P1STREET("IS","dxvlid","dpyi` ivgw")
wgvi `iypd
^P1STREET("IS","dxvlid","dq")
qd
^P1STREET("IS","dxvlid","dqaieo")
oeiaqd
^P1STREET("IS","dxvlid","dqbliez")
zeilbqd
^P1STREET("IS","dxvlid","dqcp`ez")
ze`pcqd
^P1STREET("IS","dxvlid","dqiaim")
miaiqd
^P1STREET("IS","dxvlid","dqiitpim")
miptiiqd
^P1STREET("IS","dxvlid","drebo")
oberd
^P1STREET("IS","dxvlid","dretx")
xterd
^P1STREET("IS","dxvlid","drixiz")
zixird
^P1STREET("IS","dxvlid","drlenim")
minelrd
^P1STREET("IS","dxvlid","drlid dypid")
dipyd dilrd
^P1STREET("IS","dxvlid","drnw")
wnrd
^P1STREET("IS","dxvlid","drvn`ez")
ze`nvrd
^P1STREET("IS","dxvlid","drxad")
daxrd
^P1STREET("IS","dxvlid","drxebez")
zebexrd
^P1STREET("IS","dxvlid","dterl")
lretd
^P1STREET("IS","dxvlid","dtieq")
qeitd
^P1STREET("IS","dxvlid","dtxbim")
mibxtd
^P1STREET("IS","dxvlid","dtxcqim")
miqcxtd
^P1STREET("IS","dxvlid","dtxgim")
migxtd
^P1STREET("IS","dxvlid","dtxhifpim")
mipfihxtd
^P1STREET("IS","dxvlid","dtxqd")
dqxtd
^P1STREET("IS","dxvlid","dvarepi")
iperavd
^P1STREET("IS","dxvlid","dvaxim")
mixavd
^P1STREET("IS","dxvlid","dvcs")
scvd
^P1STREET("IS","dxvlid","dvpgo `a`")
`a` ogpvd
^P1STREET("IS","dxvlid","dvpgpim")
mipgpvd
^P1STREET("IS","dxvlid","dvtvtez")
zetvtvd
^P1STREET("IS","dxvlid","dwenniez")
zeinnewd
^P1STREET("IS","dxvlid","dwepbxq dviepi")
ipeivd qxbpewd
^P1STREET("IS","dxvlid","dwevx")
xvewd
^P1STREET("IS","dxvlid","dwevxim")
mixvewd
^P1STREET("IS","dxvlid","dwhis")
sihwd
^P1STREET("IS","dxvlid","dwicnd")
dnciwd
^P1STREET("IS","dxvlid","dwqm")
mqwd
^P1STREET("IS","dxvlid","dwxo dwinz")
zniwd oxwd
^P1STREET("IS","dxvlid","dx dnexid")
dixend xd
^P1STREET("IS","dxvlid","dx nixeo")
oexin xd
^P1STREET("IS","dxvlid","dx pae")
eap xd
^P1STREET("IS","dxvlid","dx qipi")
ipiq xd
^P1STREET("IS","dxvlid","dx rvneo")
oenvr xd
^P1STREET("IS","dxvlid","dx yenxeo")
oexney xd
^P1STREET("IS","dxvlid","dx`yepim")
mipey`xd
^P1STREET("IS","dxvlid","dxa bexo")
oxeb axd
^P1STREET("IS","dxvlid","dxa dltxio")
oixtld axd
^P1STREET("IS","dxvlid","dxa ivgw pqim")
miqp wgvi axd
^P1STREET("IS","dxvlid","dxa pexew")
wexep axd
^P1STREET("IS","dxvlid","dxa rni`l")
l`inr axd
^P1STREET("IS","dxvlid","dxa wew")
wew axd
^P1STREET("IS","dxvlid","dxezm")
mzexd
^P1STREET("IS","dxvlid","dxi belo")
oleb ixd
^P1STREET("IS","dxvlid","dxi blrc")
crlb ixd
^P1STREET("IS","dxvlid","dxinepim")
mipenixd
^P1STREET("IS","dxvlid","dxkaz")
zakxd
^P1STREET("IS","dxvlid","dxveb")
bevxd
^P1STREET("IS","dxvlid","dxvtlc")
cltvxd
^P1STREET("IS","dxvlid","dxwtez")
zetwxd
^P1STREET("IS","dxvlid","dyelniz")
zinleyd
^P1STREET("IS","dxvlid","dyenx")
xneyd
^P1STREET("IS","dxvlid","dyepiz")
zipeyd
^P1STREET("IS","dxvlid","dyethim")
mihteyd
^P1STREET("IS","dxvlid","dyeypim")
mipyeyd
^P1STREET("IS","dxvlid","dyihd")
dhiyd
^P1STREET("IS","dxvlid","dyiwnd")
dnwiyd
^P1STREET("IS","dxvlid","dywc")
cwyd
^P1STREET("IS","dxvlid","dywcim")
micwyd
^P1STREET("IS","dxvlid","dyxeo")
oexyd
^P1STREET("IS","dxvlid","dz`pd")
dp`zd
^P1STREET("IS","dxvlid","dzaex")
xeazd
^P1STREET("IS","dxvlid","dzcdx")
xdczd
^P1STREET("IS","dxvlid","dzenx")
xnezd
^P1STREET("IS","dxvlid","dzp`im")
mi`pzd
^P1STREET("IS","dxvlid","dzwed")
dewzd
^P1STREET("IS","dxvlid","eeltqeo")
oeqtlee
^P1STREET("IS","dxvlid","eipbiih")
hiibpie
^P1STREET("IS","dxvlid","eivno")
onvie
^P1STREET("IS","dxvlid","eizwio")
oiwzie
^P1STREET("IS","dxvlid","exaexb")
bxeaxe
^P1STREET("IS","dxvlid","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","dxvlid","f`a apinio")
oinipa a`f
^P1STREET("IS","dxvlid","f`a yxib")
bixy a`f
^P1STREET("IS","dxvlid","faeleo")
oeleaf
^P1STREET("IS","dxvlid","fdx hl")
lh xdf
^P1STREET("IS","dxvlid","fiqe")
eqif
^P1STREET("IS","dxvlid","flno `xo")
ox` onlf
^P1STREET("IS","dxvlid","flno ypi`ex")
xe`ipy onlf
^P1STREET("IS","dxvlid","fnpdes")
sedpnf
^P1STREET("IS","dxvlid","ga""c")
c"ag
^P1STREET("IS","dxvlid","gaiad xiiw")
wiix daiag
^P1STREET("IS","dxvlid","gavlz dyxeo")
oexyd zlvag
^P1STREET("IS","dxvlid","gaxeo")
oexag
^P1STREET("IS","dxvlid","gced")
decg
^P1STREET("IS","dxvlid","geaai vieo")
oeiv iaaeg
^P1STREET("IS","dxvlid","geaez dlaaez")
zeaald zeaeg
^P1STREET("IS","dxvlid","gegiz")
zigeg
^P1STREET("IS","dxvlid","gend enbcl")
lcbne dneg
^P1STREET("IS","dxvlid","gepi dnrbl")
lbrnd ipeg
^P1STREET("IS","dxvlid","ges dfda")
adfd seg
^P1STREET("IS","dxvlid","giilim `lnepim")
mipenl` miliig
^P1STREET("IS","dxvlid","giim dff")
ffd miig
^P1STREET("IS","dxvlid","giim lqwea")
aewql miig
^P1STREET("IS","dxvlid","gpd qpy")
ypq dpg
^P1STREET("IS","dxvlid","gpwio")
oiwpg
^P1STREET("IS","dxvlid","gtvi ad")
da ivtg
^P1STREET("IS","dxvlid","gxy")
yxg
^P1STREET("IS","dxvlid","gzm qetx")
xteq mzg
^P1STREET("IS","dxvlid","haia nxcki")
ikcxn aiah
^P1STREET("IS","dxvlid","hapwio")
oiwpah
^P1STREET("IS","dxvlid","hix`o")
o`xih
^P1STREET("IS","dxvlid","hp`")
`ph
^P1STREET("IS","dxvlid","hppaeim nxcki")
ikcxn mieapph
^P1STREET("IS","dxvlid","hxentlcex")
xecltnexh
^P1STREET("IS","dxvlid","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","dxvlid","i""l bexceo")
oecxeb l"i
^P1STREET("IS","dxvlid","i""l txu")
uxt l"i
^P1STREET("IS","dxvlid","i.l. axej")
jexa .l.i
^P1STREET("IS","dxvlid","iapd")
dpai
^P1STREET("IS","dxvlid","iapi`li")
il`ipai
^P1STREET("IS","dxvlid","ib`l `leo")
oel` l`bi
^P1STREET("IS","dxvlid","ic gxevim")
mivexg ci
^P1STREET("IS","dxvlid","idcez dcnnd")
dnncd zecdi
^P1STREET("IS","dxvlid","idecd aexx")
xxea dcedi
^P1STREET("IS","dxvlid","idecd dlei")
ield dcedi
^P1STREET("IS","dxvlid","idecd dnkai")
iaknd dcedi
^P1STREET("IS","dxvlid","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","dxvlid","idepzo")
ozpedi
^P1STREET("IS","dxvlid","ideyr ao peo")
oep oa ryedi
^P1STREET("IS","dxvlid","ie`a")
a`ei
^P1STREET("IS","dxvlid","iectz")
ztcei
^P1STREET("IS","dxvlid","iegpo dqpclx")
xlcpqd opgei
^P1STREET("IS","dxvlid","iepi pzpide")
edipzp ipei
^P1STREET("IS","dxvlid","iexci dim")
mid icxei
^P1STREET("IS","dxvlid","iezm")
mzei
^P1STREET("IS","dxvlid","igirm")
mrigi
^P1STREET("IS","dxvlid","il""b")
b"li
^P1STREET("IS","dxvlid","iqec dnrld")
dlrnd ceqi
^P1STREET("IS","dxvlid","irau")
uari
^P1STREET("IS","dxvlid","irl")
lri
^P1STREET("IS","dxvlid","irxd")
dxri
^P1STREET("IS","dxvlid","itzg")
gzti
^P1STREET("IS","dxvlid","ivgw ycd")
dcy wgvi
^P1STREET("IS","dxvlid","ivi`z `ixetd")
dtexi` z`ivi
^P1STREET("IS","dxvlid","ixnide dltxio")
oixtld edinxi
^P1STREET("IS","dxvlid","iyride iyx`l")
l`xyi ediryi
^P1STREET("IS","dxvlid","k""h apeanax")
xanaepa h"k
^P1STREET("IS","dxvlid","keka")
akek
^P1STREET("IS","dxvlid","kiaey draecd")
dceard yeaik
^P1STREET("IS","dxvlid","kkx ao rni")
inr oa xkk
^P1STREET("IS","dxvlid","kkx cd ylih")
hily dc xkk
^P1STREET("IS","dxvlid","kkx dpq txiu")
uixt qpd xkk
^P1STREET("IS","dxvlid","kkx dviepez")
zepeivd xkk
^P1STREET("IS","dxvlid","klpiz")
ziplk
^P1STREET("IS","dxvlid","kpti pyxim")
mixyp itpk
^P1STREET("IS","dxvlid","kpxz")
zxpk
^P1STREET("IS","dxvlid","kqetim")
miteqk
^P1STREET("IS","dxvlid","kvplqeo")
oeqlpvk
^P1STREET("IS","dxvlid","kxkem")
mekxk
^P1STREET("IS","dxvlid","leahwio vaid")
diav oiwhael
^P1STREET("IS","dxvlid","lef wciy")
yicw fel
^P1STREET("IS","dxvlid","lei `ykel")
leky` iel
^P1STREET("IS","dxvlid","leio")
oiel
^P1STREET("IS","dxvlid","lg""i")
i"gl
^P1STREET("IS","dxvlid","liaxno")
onxail
^P1STREET("IS","dxvlid","liia itd")
dti aiil
^P1STREET("IS","dxvlid","lil dbyxim")
mixybd lil
^P1STREET("IS","dxvlid","litqwi")
iwqtil
^P1STREET("IS","dxvlid","lkiy")
yikl
^P1STREET("IS","dxvlid","lnco ivgw")
wgvi ocnl
^P1STREET("IS","dxvlid","lticez")
zecitl
^P1STREET("IS","dxvlid","lym")
myl
^P1STREET("IS","dxvlid","n`f""d")
d"f`n
^P1STREET("IS","dxvlid","n`ix ao ylem")
mely oa xi`n
^P1STREET("IS","dxvlid","n`te")
et`n
^P1STREET("IS","dxvlid","n`xl")
lx`n
^P1STREET("IS","dxvlid","navr gexa")
axeg rvan
^P1STREET("IS","dxvlid","navr gixm")
mxig rvan
^P1STREET("IS","dxvlid","navr pgyeo")
oeygp rvan
^P1STREET("IS","dxvlid","navr wcy")
ycw rvan
^P1STREET("IS","dxvlid","nbipi pbad")
dabp ipibn
^P1STREET("IS","dxvlid","nbo cec")
cec obn
^P1STREET("IS","dxvlid","ncipz didecim")
micedid zpicn
^P1STREET("IS","dxvlid","ndx""l")
l"xdn
^P1STREET("IS","dxvlid","neayaiu apinio")
oinipa uiayaen
^P1STREET("IS","dxvlid","necirio")
oiricen
^P1STREET("IS","dxvlid","nedliax")
xailden
^P1STREET("IS","dxvlid","nelcz")
zclen
^P1STREET("IS","dxvlid","nelke ylnd")
dnly eklen
^P1STREET("IS","dxvlid","nephitiexi")
ixeitihpen
^P1STREET("IS","dxvlid","nerceo wxqpi")
ipqxw oecren
^P1STREET("IS","dxvlid","nevwio")
oiwven
^P1STREET("IS","dxvlid","nexcez im")
mi zecxen
^P1STREET("IS","dxvlid","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","dxvlid","nexo")
oxen
^P1STREET("IS","dxvlid","nf`""d")
d"`fn
^P1STREET("IS","dxvlid","nik""l")
l"kin
^P1STREET("IS","dxvlid","nineo")
oenin
^P1STREET("IS","dxvlid","nlki idecd")
dcedi ikln
^P1STREET("IS","dxvlid","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","dxvlid","nlkio")
oikln
^P1STREET("IS","dxvlid","npbx ivgw")
wgvi xbpn
^P1STREET("IS","dxvlid","npclalh vai")
iav hlalcpn
^P1STREET("IS","dxvlid","npcli nekx qtxim")
mixtq xken ilcpn
^P1STREET("IS","dxvlid","npexd")
dxepn
^P1STREET("IS","dxvlid","nrepez yxd")
dxy zepern
^P1STREET("IS","dxvlid","nrld pgnd")
dngp dlrn
^P1STREET("IS","dxvlid","nrtili nxewe")
ewexn ilitrn
^P1STREET("IS","dxvlid","nvcd")
dcvn
^P1STREET("IS","dxvlid","nvtd im")
mi dtvn
^P1STREET("IS","dxvlid","nxac dwqnim")
minqwd caxn
^P1STREET("IS","dxvlid","nxbpiez")
zeipbxn
^P1STREET("IS","dxvlid","nxcki `pilaiu")
uialip` ikcxn
^P1STREET("IS","dxvlid","nxed")
dexn
^P1STREET("IS","dxvlid","nxfew nyd")
dyn wefxn
^P1STREET("IS","dxvlid","nxgaid")
diagxn
^P1STREET("IS","dxvlid","nxhio aeax")
xaea oihxn
^P1STREET("IS","dxvlid","nxim")
mixn
^P1STREET("IS","dxvlid","nxkeq cec")
cec qekxn
^P1STREET("IS","dxvlid","nxt`z dnbipim")
mipibnd z`txn
^P1STREET("IS","dxvlid","nyd")
dyn
^P1STREET("IS","dxvlid","nykiz")
zikyn
^P1STREET("IS","dxvlid","nyw rfx`")
`xfr wyn
^P1STREET("IS","dxvlid","nzzide")
edizzn
^P1STREET("IS","dxvlid","p`ez dcwlim")
milwcd ze`p
^P1STREET("IS","dxvlid","pbx ivgw")
wgvi xbp
^P1STREET("IS","dxvlid","pcad")
dacp
^P1STREET("IS","dxvlid","pebd")
dbep
^P1STREET("IS","dxvlid","ped pnxec")
cexnp dep
^P1STREET("IS","dxvlid","pes im")
mi sep
^P1STREET("IS","dxvlid","pes ycnez")
zency sep
^P1STREET("IS","dxvlid","petx")
xtep
^P1STREET("IS","dxvlid","pexc`e")
e`cxep
^P1STREET("IS","dxvlid","pgnid")
dingp
^P1STREET("IS","dxvlid","pil""i")
i"lip
^P1STREET("IS","dxvlid","pix")
xip
^P1STREET("IS","dxvlid","pvg iyx`l")
l`xyi gvp
^P1STREET("IS","dxvlid","pzia dl""d")
d"ld aizp
^P1STREET("IS","dxvlid","pziaez")
zeaizp
^P1STREET("IS","dxvlid","pzo `lzxno")
onxzl` ozp
^P1STREET("IS","dxvlid","qelc dpxiihd")
dhiixpd cleq
^P1STREET("IS","dxvlid","qelu `lkqpcx")
xcpqkl` uleq
^P1STREET("IS","dxvlid","qewelea")
aeleweq
^P1STREET("IS","dxvlid","qhxend")
dnexhq
^P1STREET("IS","dxvlid","qicpi rli")
ilr ipciq
^P1STREET("IS","dxvlid","qixwio")
oiwxiq
^P1STREET("IS","dxvlid","qn' cxex")
xexc 'nq
^P1STREET("IS","dxvlid","qncx")
xcnq
^P1STREET("IS","dxvlid","qnhz api axiz")
zixa ipa zhnq
^P1STREET("IS","dxvlid","qnhz axpciiq")
qiicpxa zhnq
^P1STREET("IS","dxvlid","qnhz cbo")
obc zhnq
^P1STREET("IS","dxvlid","qnhz dnxbpiz")
zipbxnd zhnq
^P1STREET("IS","dxvlid","qnhz dxa neyweaiu")
uiaewyen axd zhnq
^P1STREET("IS","dxvlid","qnhz phrim")
mirhp zhnq
^P1STREET("IS","dxvlid","qnhz piqpea")
aepqip zhnq
^P1STREET("IS","dxvlid","qnilpqwi nyd")
dyn iwqplinq
^P1STREET("IS","dxvlid","qpd")
dpq
^P1STREET("IS","dxvlid","qpdcxio")
oixcdpq
^P1STREET("IS","dxvlid","qpepiz")
zipepq
^P1STREET("IS","dxvlid","qptix")
xitpq
^P1STREET("IS","dxvlid","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","dxvlid","qtix")
xitq
^P1STREET("IS","dxvlid","qxb")
bxq
^P1STREET("IS","dxvlid","qyd `xbea")
aebx` dyq
^P1STREET("IS","dxvlid","reacd")
dcaer
^P1STREET("IS","dxvlid","refi`l")
l`ifer
^P1STREET("IS","dxvlid","reli aal")
laa iler
^P1STREET("IS","dxvlid","reli dbxcem")
mecxbd iler
^P1STREET("IS","dxvlid","rfx` dqetx")
xteqd `xfr
^P1STREET("IS","dxvlid","rio bci")
icb oir
^P1STREET("IS","dxvlid","ripa")
apir
^P1STREET("IS","dxvlid","rxnepim")
mipenxr
^P1STREET("IS","dxvlid","ryxz dxebi nlkez")
zekln ibexd zxyr
^P1STREET("IS","dxvlid","teqhx dxelc")
clexd xhqet
^P1STREET("IS","dxvlid","terli vieo")
oeiv ilret
^P1STREET("IS","dxvlid","texvi dcxj")
jxcd ivxet
^P1STREET("IS","dxvlid","thxid")
dixht
^P1STREET("IS","dxvlid","tipq")
qpit
^P1STREET("IS","dxvlid","tipqwx")
xwqpit
^P1STREET("IS","dxvlid","tipz giim")
miig zpit
^P1STREET("IS","dxvlid","tiyno")
onyit
^P1STREET("IS","dxvlid","tln""g")
g"nlt
^P1STREET("IS","dxvlid","tpgq xefo")
ofex qgpt
^P1STREET("IS","dxvlid","tpwq")
qwpt
^P1STREET("IS","dxvlid","tqg itd")
dti gqt
^P1STREET("IS","dxvlid","tqg itdx")
xdti gqt
^P1STREET("IS","dxvlid","tqno")
onqt
^P1STREET("IS","dxvlid","trnepiz")
zipenrt
^P1STREET("IS","dxvlid","txcqid")
diqcxt
^P1STREET("IS","dxvlid","tzg zwed")
dewz gzt
^P1STREET("IS","dxvlid","vcw")
wcv
^P1STREET("IS","dxvlid","vd""l")
l"dv
^P1STREET("IS","dxvlid","vewxno")
onxwev
^P1STREET("IS","dxvlid","vitexi")
ixetiv
^P1STREET("IS","dxvlid","vlr cxem")
mexc rlv
^P1STREET("IS","dxvlid","vlr vteo")
oetv rlv
^P1STREET("IS","dxvlid","vnxez")
zexnv
^P1STREET("IS","dxvlid","vnxz")
zxnv
^P1STREET("IS","dxvlid","vrixi vieo")
oeiv ixirv
^P1STREET("IS","dxvlid","w`xe ieqs")
sqei ex`w
^P1STREET("IS","dxvlid","waeu bleiez")
zeielb ueaw
^P1STREET("IS","dxvlid","wceyi dye`d")
d`eyd iyecw
^P1STREET("IS","dxvlid","wcind")
dnicw
^P1STREET("IS","dxvlid","wdilz vieo")
oeiv zlidw
^P1STREET("IS","dxvlid","wexo")
oxew
^P1STREET("IS","dxvlid","wexv'w")
w'vxew
^P1STREET("IS","dxvlid","wlefpx")
xpfelw
^P1STREET("IS","dxvlid","wliyx")
xyilw
^P1STREET("IS","dxvlid","wtlpqwi")
iwqpltw
^P1STREET("IS","dxvlid","wvix `dxeo")
oexd` xivw
^P1STREET("IS","dxvlid","wxo diqec")
ceqid oxw
^P1STREET("IS","dxvlid","wxz")
zxw
^P1STREET("IS","dxvlid","x`y tipd")
dpit y`x
^P1STREET("IS","dxvlid","x`yeo lvieo")
oeivl oey`x
^P1STREET("IS","dxvlid","xai rwia`")
`aiwr iax
^P1STREET("IS","dxvlid","xai ynreo lai`")
`ial oerny iax
^P1STREET("IS","dxvlid","xaiaim")
miaiax
^P1STREET("IS","dxvlid","xao bnli`l")
l`ilnb oax
^P1STREET("IS","dxvlid","xape zm")
mz epax
^P1STREET("IS","dxvlid","xbaim")
miabx
^P1STREET("IS","dxvlid","xegnd")
dngex
^P1STREET("IS","dxvlid","xetio")
oitex
^P1STREET("IS","dxvlid","xez")
zex
^P1STREET("IS","dxvlid","xfi`l cec")
cec l`ifx
^P1STREET("IS","dxvlid","xgl")
lgx
^P1STREET("IS","dxvlid","xigo")
ogix
^P1STREET("IS","dxvlid","xiipq")
qpiix
^P1STREET("IS","dxvlid","xip""d")
d"pix
^P1STREET("IS","dxvlid","xka iyx`l")
l`xyi akx
^P1STREET("IS","dxvlid","xna""m")
m"anx
^P1STREET("IS","dxvlid","xnf")
fnx
^P1STREET("IS","dxvlid","xng""l")
l"gnx
^P1STREET("IS","dxvlid","xnz `lide")
edil` znx
^P1STREET("IS","dxvlid","xnz im")
mi znx
^P1STREET("IS","dxvlid","xp""w")
w"px
^P1STREET("IS","dxvlid","xy""i")
i"yx
^P1STREET("IS","dxvlid","xya""m")
m"ayx
^P1STREET("IS","dxvlid","xys")
syx
^P1STREET("IS","dxvlid","y""i rbpeo")
oepbr i"y
^P1STREET("IS","dxvlid","y`xiz dtlihd")
dhiltd zix`y
^P1STREET("IS","dxvlid","yafi")
ifay
^P1STREET("IS","dxvlid","yah npyd")
dypn hay
^P1STREET("IS","dxvlid","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","dxvlid","yaiclqeo")
oeqlciay
^P1STREET("IS","dxvlid","yarz dkekaim")
miakekd zray
^P1STREET("IS","dxvlid","yc""l")
l"cy
^P1STREET("IS","dxvlid","yc' `a` `ao")
oa` `a` 'cy
^P1STREET("IS","dxvlid","yc' dzyrim eyley")
yelye miryzd 'cy
^P1STREET("IS","dxvlid","yc' g""o")
o"g 'cy
^P1STREET("IS","dxvlid","yc' lpvh irwa")
awri hvpl 'cy
^P1STREET("IS","dxvlid","yc' npgm abio")
oiba mgpn 'cy
^P1STREET("IS","dxvlid","yc' ped reac")
caer dep 'cy
^P1STREET("IS","dxvlid","yc' vetiz")
zitev 'cy
^P1STREET("IS","dxvlid","yegh iyx`l")
l`xyi hgey
^P1STREET("IS","dxvlid","yeiclqeo")
oeqlciey
^P1STREET("IS","dxvlid","yf""x")
x"fy
^P1STREET("IS","dxvlid","yg""l")
l"gy
^P1STREET("IS","dxvlid","ygxiz")
zixgy
^P1STREET("IS","dxvlid","yhexno")
onxehy
^P1STREET("IS","dxvlid","yhxo i`ix")
xi`i oxhy
^P1STREET("IS","dxvlid","yiaz vieo")
oeiv zaiy
^P1STREET("IS","dxvlid","yixz b`elim")
mile`b zxiy
^P1STREET("IS","dxvlid","yixz caexd")
dxeac zxiy
^P1STREET("IS","dxvlid","yixz dfnix")
xinfd zxiy
^P1STREET("IS","dxvlid","yled")
dely
^P1STREET("IS","dxvlid","ylem rlikm")
mkilr mely
^P1STREET("IS","dxvlid","ylenvieo dnlkd")
dklnd oeivnely
^P1STREET("IS","dxvlid","ylepqwi")
iwqpely
^P1STREET("IS","dxvlid","yn`i")
i`ny
^P1STREET("IS","dxvlid","yne`l dpbic")
cibpd l`eny
^P1STREET("IS","dxvlid","yngd delvaxb")
bxavled dgny
^P1STREET("IS","dxvlid","ynrid")
dirny
^P1STREET("IS","dxvlid","ynyeo dbaex")
xeabd oeyny
^P1STREET("IS","dxvlid","yrx dim")
mid xry
^P1STREET("IS","dxvlid","ytiim")
miity
^P1STREET("IS","dxvlid","ytipefd")
dfepity
^P1STREET("IS","dxvlid","ytix` ivgw")
wgvi `xity
^P1STREET("IS","dxvlid","ytix` vai")
iav `xity
^P1STREET("IS","dxvlid","ytr")
rty
^P1STREET("IS","dxvlid","ytxipvw")
wvpixty
^P1STREET("IS","dxvlid","yxd `dxepqeo")
oeqpexd` dxy
^P1STREET("IS","dxvlid","yxrai")
iarxy
^P1STREET("IS","dxvlid","yxz nyd")
dyn zxy
^P1STREET("IS","dxvlid","zex fda")
adf xez
^P1STREET("IS","dxvlid","zl gi")
ig lz
^P1STREET("IS","dxvlid","znx")
xnz
^P1STREET("IS","dxvlid","zteg")
getz
^P1STREET("IS","dxvlid","zxyiy")
yiyxz
^P1STREET("IS","f`eeid")
diee`f
^P1STREET("IS","fa`acd")
dca`af
^P1STREET("IS","fdx")
xdf
^P1STREET("IS","fiwim")
miwif
^P1STREET("IS","fiz` b'n`rio")
oir`n'b `zif
^P1STREET("IS","fizo")
ozif
^P1STREET("IS","fkxeo irwa")
awri oexkf
^P1STREET("IS","fkxeo irwa","`g""i `ilz")
zli` i"g`
^P1STREET("IS","fkxeo irwa","`iilz dygx")
xgyd zlii`
^P1STREET("IS","fkxeo irwa","`lepim")
mipel`
^P1STREET("IS","fkxeo irwa","`li kdo")
odk il`
^P1STREET("IS","fkxeo irwa","`pd txpw")
wpxt dp`
^P1STREET("IS","fkxeo irwa","`s rl ti ko")
ok it lr s`
^P1STREET("IS","fkxeo irwa","`v""l")
l"v`
^P1STREET("IS","fkxeo irwa","`wqeceq")
qeceqw`
^P1STREET("IS","fkxeo irwa","`ykel")
leky`
^P1STREET("IS","fkxeo irwa","a`x iyx`l")
l`xyi x`a
^P1STREET("IS","fkxeo irwa","ai`liw")
wil`ia
^P1STREET("IS","fkxeo irwa","ao bexieo")
oeixeb oa
^P1STREET("IS","fkxeo irwa","axw")
wxa
^P1STREET("IS","fkxeo irwa","axwz")
zwxa
^P1STREET("IS","fkxeo irwa","b`elim")
mile`b
^P1STREET("IS","fkxeo irwa","barz rco")
ocr zrab
^P1STREET("IS","fkxeo irwa","cexez")
zexec
^P1STREET("IS","fkxeo irwa","cxj `dxeo")
oexd` jxc
^P1STREET("IS","fkxeo irwa","cxj dbxpez")
zepxbd jxc
^P1STREET("IS","fkxeo irwa","cxj dyihd")
dhiyd jxc
^P1STREET("IS","fkxeo irwa","cxj tiplq")
qlpit jxc
^P1STREET("IS","fkxeo irwa","cxj yxd")
dxy jxc
^P1STREET("IS","fkxeo irwa","d`expim")
mipxe`d
^P1STREET("IS","fkxeo irwa","d`xfim")
mifx`d
^P1STREET("IS","fkxeo irwa","daxeyim")
miyexad
^P1STREET("IS","fkxeo irwa","dbcec draxi")
ixard cecbd
^P1STREET("IS","fkxeo irwa","dbcrepim")
mipercbd
^P1STREET("IS","fkxeo irwa","dbexo")
oxebd
^P1STREET("IS","fkxeo irwa","dbpd")
dpbd
^P1STREET("IS","fkxeo irwa","dbto")
otbd
^P1STREET("IS","fkxeo irwa","dbxpih")
hipxbd
^P1STREET("IS","fkxeo irwa","dbz")
zbd
^P1STREET("IS","fkxeo irwa","dcbo")
obcd
^P1STREET("IS","fkxeo irwa","dcq")
qcd
^P1STREET("IS","fkxeo irwa","dfiz")
zifd
^P1STREET("IS","fkxeo irwa","dgihd")
dhigd
^P1STREET("IS","fkxeo irwa","dgxea")
aexgd
^P1STREET("IS","fkxeo irwa","diio")
oiid
^P1STREET("IS","fkxeo irwa","dkeayim")
miyaekd
^P1STREET("IS","fkxeo irwa","dklpiz")
ziplkd
^P1STREET("IS","fkxeo irwa","dkxm")
mxkd
^P1STREET("IS","fkxeo irwa","dll itd")
dti lld
^P1STREET("IS","fkxeo irwa","dnbipim")
mipibnd
^P1STREET("IS","fkxeo irwa","dncr")
rcnd
^P1STREET("IS","fkxeo irwa","dniiqcim")
micqiind
^P1STREET("IS","fkxeo irwa","dnrtilim")
militrnd
^P1STREET("IS","fkxeo irwa","dpcia")
aicpd
^P1STREET("IS","fkxeo irwa","dpehxim")
mixhepd
^P1STREET("IS","fkxeo irwa","dphtim")
mithpd
^P1STREET("IS","fkxeo irwa","dpxwiq")
qiwxpd
^P1STREET("IS","fkxeo irwa","dpyi`")
`iypd
^P1STREET("IS","fkxeo irwa","dqekd")
dkeqd
^P1STREET("IS","fkxeo irwa","draecd")
dceard
^P1STREET("IS","fkxeo irwa","drliid")
diilrd
^P1STREET("IS","fkxeo irwa","drvn`ez")
ze`nvrd
^P1STREET("IS","fkxeo irwa","dtcez")
zectd
^P1STREET("IS","fkxeo irwa","dtln""g")
g"nltd
^P1STREET("IS","fkxeo irwa","dtqbd")
dbqtd
^P1STREET("IS","fkxeo irwa","dxineo")
oenixd
^P1STREET("IS","fkxeo irwa","dxvl")
lvxd
^P1STREET("IS","fkxeo irwa","dxwtez")
zetwxd
^P1STREET("IS","fkxeo irwa","dxwtz")
ztwxd
^P1STREET("IS","fkxeo irwa","dyenx")
xneyd
^P1STREET("IS","fkxeo irwa","dyethim")
mihteyd
^P1STREET("IS","fkxeo irwa","dyfis")
sifyd
^P1STREET("IS","fkxeo irwa","dyleyd")
dyelyd
^P1STREET("IS","fkxeo irwa","dynexd")
dxenyd
^P1STREET("IS","fkxeo irwa","dywc")
cwyd
^P1STREET("IS","fkxeo irwa","dywnd")
dnwyd
^P1STREET("IS","fkxeo irwa","dz`pd")
dp`zd
^P1STREET("IS","fkxeo irwa","dzenx")
xnezd
^P1STREET("IS","fkxeo irwa","dzixey")
yexizd
^P1STREET("IS","fkxeo irwa","dzteg")
getzd
^P1STREET("IS","fkxeo irwa","eipbiih")
hiibpie
^P1STREET("IS","fkxeo irwa","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","fkxeo irwa","gfeo `iy")
yi` oefg
^P1STREET("IS","fkxeo irwa","gi""l")
l"ig
^P1STREET("IS","fkxeo irwa","gpd qpy")
ypq dpg
^P1STREET("IS","fkxeo irwa","gva")
avg
^P1STREET("IS","fkxeo irwa","hxentlcex")
xecltnexh
^P1STREET("IS","fkxeo irwa","i`ix")
xi`i
^P1STREET("IS","fkxeo irwa","ib`l `leo")
oel` l`bi
^P1STREET("IS","fkxeo irwa","idlem")
meldi
^P1STREET("IS","fkxeo irwa","iqnio")
oinqi
^P1STREET("IS","fkxeo irwa","itd pes")
sep dti
^P1STREET("IS","fkxeo irwa","ivgw ycd")
dcy wgvi
^P1STREET("IS","fkxeo irwa","ivi`z `ixetd")
dtexi` z`ivi
^P1STREET("IS","fkxeo irwa","kpti pyxim")
mixyp itpk
^P1STREET("IS","fkxeo irwa","kxkem")
mekxk
^P1STREET("IS","fkxeo irwa","n`ix ytiid")
diity xi`n
^P1STREET("IS","fkxeo irwa","nelcz")
zclen
^P1STREET("IS","fkxeo irwa","nlki idecd")
dcedi ikln
^P1STREET("IS","fkxeo irwa","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","fkxeo irwa","nrld dkxnl")
lnxkd dlrn
^P1STREET("IS","fkxeo irwa","nrld x`yepim")
mipey`x dlrn
^P1STREET("IS","fkxeo irwa","nvcd")
dcvn
^P1STREET("IS","fkxeo irwa","nxac dwqnim")
minqwd caxn
^P1STREET("IS","fkxeo irwa","nyrel dbo")
obd leryn
^P1STREET("IS","fkxeo irwa","pbad")
dabp
^P1STREET("IS","fkxeo irwa","ped daxeo")
oexad dep
^P1STREET("IS","fkxeo irwa","ped xnf")
fnx dep
^P1STREET("IS","fkxeo irwa","ped yle")
ely dep
^P1STREET("IS","fkxeo irwa","ped yxz")
zxy dep
^P1STREET("IS","fkxeo irwa","pexiz")
zixep
^P1STREET("IS","fkxeo irwa","qaieo")
oeiaq
^P1STREET("IS","fkxeo irwa","qelc")
cleq
^P1STREET("IS","fkxeo irwa","qizeepiz")
zipeeziq
^P1STREET("IS","fkxeo irwa","qnhz `s rl ti ko")
ok it lr s` zhnq
^P1STREET("IS","fkxeo irwa","qnhz d`ld")
dl`d zhnq
^P1STREET("IS","fkxeo irwa","qnhz da`x")
x`ad zhnq
^P1STREET("IS","fkxeo irwa","qnhz dapim")
mipad zhnq
^P1STREET("IS","fkxeo irwa","qnhz daxeo")
oexad zhnq
^P1STREET("IS","fkxeo irwa","qnhz dy`iad")
dai`yd zhnq
^P1STREET("IS","fkxeo irwa","qnhz dywc")
cwyd zhnq
^P1STREET("IS","fkxeo irwa","qnhz irau")
uari zhnq
^P1STREET("IS","fkxeo irwa","qnhz qhxend")
dnexhq zhnq
^P1STREET("IS","fkxeo irwa","qnhz xewg")
gwex zhnq
^P1STREET("IS","fkxeo irwa","qnhz zxn""a")
a"nxz zhnq
^P1STREET("IS","fkxeo irwa","qtipz `bef")
feb` zpitq
^P1STREET("IS","fkxeo irwa","qtix")
xitq
^P1STREET("IS","fkxeo irwa","rpax")
xapr
^P1STREET("IS","fkxeo irwa","rvieo")
oeivr
^P1STREET("IS","fkxeo irwa","rxad")
daxr
^P1STREET("IS","fkxeo irwa","vd""l")
l"dv
^P1STREET("IS","fkxeo irwa","wceyi dye`d")
d`eyd iyecw
^P1STREET("IS","fkxeo irwa","wcnd")
dncw
^P1STREET("IS","fkxeo irwa","wcy")
ycw
^P1STREET("IS","fkxeo irwa","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","fkxeo irwa","wxo diqec")
ceqid oxw
^P1STREET("IS","fkxeo irwa","x`eao")
oae`x
^P1STREET("IS","fkxeo irwa","xg' 4")
4 'gx
^P1STREET("IS","fkxeo irwa","xg' 834")
834 'gx
^P1STREET("IS","fkxeo irwa","xgl")
lgx
^P1STREET("IS","fkxeo irwa","xiiw gaiad")
daiag wiix
^P1STREET("IS","fkxeo irwa","xnf")
fnx
^P1STREET("IS","fkxeo irwa","xnz vai")
iav znx
^P1STREET("IS","fkxeo irwa","yai vieo")
oeiv iay
^P1STREET("IS","fkxeo irwa","yc' pil""i")
i"lip 'cy
^P1STREET("IS","fkxeo irwa","yedm")
mdey
^P1STREET("IS","fkxeo irwa","yixz dim")
mid zxiy
^P1STREET("IS","fkxeo irwa","yyz dinim")
minid zyy
^P1STREET("IS","fkxeo irwa","z`yex")
xey`z
^P1STREET("IS","fkxeo irwa","zxn""a")
a"nxz
^P1STREET("IS","fkxeo irwa","zxr""a")
a"rxz
^P1STREET("IS","fkxeo irwa","zxyiy")
yiyxz
^P1STREET("IS","fkxeo irwa","zy""g")
g"yz
^P1STREET("IS","fltd")
dtlf
^P1STREET("IS","g`xq")
qx`g
^P1STREET("IS","gavlz dyxeo")
oexyd zlvag
^P1STREET("IS","gavlz dyxeo","cxj dfizim")
mizifd jxc
^P1STREET("IS","gavlz dyxeo","cxj dim")
mid jxc
^P1STREET("IS","gavlz dyxeo","cxj dpxwiqim")
miqiwxpd jxc
^P1STREET("IS","gavlz dyxeo","cxj dtxcqim")
miqcxtd jxc
^P1STREET("IS","gavlz dyxeo","dklpiz")
ziplkd
^P1STREET("IS","gavlz dyxeo","dnlkim")
miklnd
^P1STREET("IS","gavlz dyxeo","kkx dapim")
mipad xkk
^P1STREET("IS","gavlz dyxeo","vewi im")
mi iwev
^P1STREET("IS","gaxeo")
oexag
^P1STREET("IS","gaxeo","`axdm `aipe")
epia` mdxa`
^P1STREET("IS","gbex")
xebg
^P1STREET("IS","gbex","diqnio")
oinqid
^P1STREET("IS","gbex","dklpiz")
ziplkd
^P1STREET("IS","gbex","dpxwiq")
qiwxpd
^P1STREET("IS","gbex","pexiz")
zixep
^P1STREET("IS","gbex","xwtz")
ztwx
^P1STREET("IS","gcic")
cicg
^P1STREET("IS","gcic","d`ixeq")
qexi`d
^P1STREET("IS","gcic","dpxwiq")
qiwxpd
^P1STREET("IS","gcxd")
dxcg
^P1STREET("IS","gcxd","`a` `gin`ix")
xi`nig` `a`
^P1STREET("IS","gcxd","`a` dll")
lld `a`
^P1STREET("IS","gcxd","`ae gvix`")
`xivg ea`
^P1STREET("IS","gcxd","`ai`ex")
xe`ia`
^P1STREET("IS","gcxd","`aia")
aia`
^P1STREET("IS","gcxd","`aiperm")
mrepia`
^P1STREET("IS","gcxd","`api tf")
ft ipa`
^P1STREET("IS","gcxd","`api`li")
il`ipa`
^P1STREET("IS","gcxd","`axdm n`te")
et`n mdxa`
^P1STREET("IS","gcxd","`aylem")
melya`
^P1STREET("IS","gcxd","`cleeio")
oieelc`
^P1STREET("IS","gcxd","`dxepqeo `dxeo")
oexd` oeqpexd`
^P1STREET("IS","gcxd","`edli wicx")
xciw ilde`
^P1STREET("IS","gcxd","`eqiywio")
oiwyiqe`
^P1STREET("IS","gcxd","`etixd")
dxite`
^P1STREET("IS","gcxd","`gc drm")
mrd cg`
^P1STREET("IS","gcxd","`icleeio")
oieelci`
^P1STREET("IS","gcxd","`iileo")
oelii`
^P1STREET("IS","gcxd","`ilz")
zli`
^P1STREET("IS","gcxd","`l xm")
mx l`
^P1STREET("IS","gcxd","`li kdo")
odk il`
^P1STREET("IS","gcxd","`li`y caexd")
dxeac y`il`
^P1STREET("IS","gcxd","`qhexid n`ix")
xi`n dixehq`
^P1STREET("IS","gcxd","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","gcxd","`tyhiio nyd")
dyn oiihyt`
^P1STREET("IS","gcxd","`v""l")
l"v`
^P1STREET("IS","gcxd","`xal")
lax`
^P1STREET("IS","gcxd","`xar d`becez")
zeceb`d rax`
^P1STREET("IS","gcxd","`xfi dlapeo")
oepald ifx`
^P1STREET("IS","gcxd","`xlefexea")
aexefelx`
^P1STREET("IS","gcxd","`yal")
lay`
^P1STREET("IS","gcxd","`yc")
cy`
^P1STREET("IS","gcxd","`ykel")
leky`
^P1STREET("IS","gcxd","a`x `exd")
dxe` x`a
^P1STREET("IS","gcxd","aehweaqwi")
iwqaewhea
^P1STREET("IS","gcxd","aeql")
lqea
^P1STREET("IS","gcxd","aexekea")
aekexea
^P1STREET("IS","gcxd","ai`liw")
wil`ia
^P1STREET("IS","gcxd","ailipqeo")
oeqpilia
^P1STREET("IS","gcxd","ao `lirfx")
xfril` oa
^P1STREET("IS","gcxd","ao vai ivgw")
wgvi iav oa
^P1STREET("IS","gcxd","api`q")
q`ipa
^P1STREET("IS","gcxd","arli dnl`kd")
dk`lnd ilra
^P1STREET("IS","gcxd","ax `ilo")
oli` xa
^P1STREET("IS","gcxd","axno")
onxa
^P1STREET("IS","gcxd","axpciq")
qicpxa
^P1STREET("IS","gcxd","axpx")
xpxa
^P1STREET("IS","gcxd","axw")
wxa
^P1STREET("IS","gcxd","barz dlaepd")
dpeald zrab
^P1STREET("IS","gcxd","belcd n`ix")
xi`n dcleb
^P1STREET("IS","gcxd","belcpaxb")
bxapcleb
^P1STREET("IS","gcxd","belena `lide")
edil` aneleb
^P1STREET("IS","gcxd","belo")
oleb
^P1STREET("IS","gcxd","bexceo")
oecxeb
^P1STREET("IS","gcxd","bey rvieo")
oeivr yeb
^P1STREET("IS","gcxd","bfiz")
zifb
^P1STREET("IS","gcxd","blefbl")
lbfelb
^P1STREET("IS","gcxd","bleqw`")
`wqelb
^P1STREET("IS","gcxd","bpi `leo")
oel` ipb
^P1STREET("IS","gcxd","btpeaiu")
uiaeptb
^P1STREET("IS","gcxd","bxipaeim")
mieapixb
^P1STREET("IS","gcxd","bxpez")
zepxb
^P1STREET("IS","gcxd","c""x axio cpi`l")
l`ipc oixa x"c
^P1STREET("IS","gcxd","cbpid")
dipbc
^P1STREET("IS","gcxd","cec `lrfx")
xfrl` cec
^P1STREET("IS","gcxd","cec ae`xio")
oix`ea cec
^P1STREET("IS","gcxd","cec ynrepi")
iperny cec
^P1STREET("IS","gcxd","cexi irwa")
awri ixec
^P1STREET("IS","gcxd","cexyi vieo")
oeiv iyxec
^P1STREET("IS","gcxd","cpio")
oipc
^P1STREET("IS","gcxd","ctpd")
dptc
^P1STREET("IS","gcxd","cwl cem")
mec lwc
^P1STREET("IS","gcxd","cxj dxkaz")
zakxd jxc
^P1STREET("IS","gcxd","d` a`iix")
xii`a `d
^P1STREET("IS","gcxd","d`aewce")
ecwea`d
^P1STREET("IS","gcxd","d`bef")
feb`d
^P1STREET("IS","gcxd","d`bneo")
oenb`d
^P1STREET("IS","gcxd","d`bnid")
dinb`d
^P1STREET("IS","gcxd","d`cnd")
dnc`d
^P1STREET("IS","gcxd","d`cnepiz")
zipenc`d
^P1STREET("IS","gcxd","d`cx")
xc`d
^P1STREET("IS","gcxd","d`eno")
one`d
^P1STREET("IS","gcxd","d`etw")
wte`d
^P1STREET("IS","gcxd","d`exo")
oxe`d
^P1STREET("IS","gcxd","d`eyx")
xye`d
^P1STREET("IS","gcxd","d`ge")
eg`d
^P1STREET("IS","gcxd","d`ilpez")
zepli`d
^P1STREET("IS","gcxd","d`ixiq")
qixi`d
^P1STREET("IS","gcxd","d`ld")
dl`d
^P1STREET("IS","gcxd","d`leo")
oel`d
^P1STREET("IS","gcxd","d`lneb")
benl`d
^P1STREET("IS","gcxd","d`nex`im")
mi`xen`d
^P1STREET("IS","gcxd","d`wlitheq")
qehtilw`d
^P1STREET("IS","gcxd","d`wvid")
divw`d
^P1STREET("IS","gcxd","d`x""i")
i"x`d
^P1STREET("IS","gcxd","d`xbno")
onbx`d
^P1STREET("IS","gcxd","d`xf")
fx`d
^P1STREET("IS","gcxd","d`yex")
xey`d
^P1STREET("IS","gcxd","d`yl")
ly`d
^P1STREET("IS","gcxd","d`zxeb")
bexz`d
^P1STREET("IS","gcxd","daepim")
mipead
^P1STREET("IS","gcxd","daflz")
zlfad
^P1STREET("IS","gcxd","dapim")
mipad
^P1STREET("IS","gcxd","daxeo")
oexad
^P1STREET("IS","gcxd","daxey")
yexad
^P1STREET("IS","gcxd","daxibcd dideciz")
zicedid dcbixad
^P1STREET("IS","gcxd","dayo")
oyad
^P1STREET("IS","gcxd","dbcec draxi")
ixard cecbd
^P1STREET("IS","gcxd","dben`")
`nebd
^P1STREET("IS","gcxd","dbexo")
oxebd
^P1STREET("IS","gcxd","dbiaexim")
mixeaibd
^P1STREET("IS","gcxd","dbiziz")
zizibd
^P1STREET("IS","gcxd","dblaer")
realbd
^P1STREET("IS","gcxd","dblil")
lilbd
^P1STREET("IS","gcxd","dblrc")
crlbd
^P1STREET("IS","gcxd","dbpd")
dpbd
^P1STREET("IS","gcxd","dbto")
otbd
^P1STREET("IS","gcxd","dbx""`")
`"xbd
^P1STREET("IS","gcxd","dbyx")
xybd
^P1STREET("IS","gcxd","dcaix")
xiacd
^P1STREET("IS","gcxd","dcbo")
obcd
^P1STREET("IS","gcxd","dcela")
alecd
^P1STREET("IS","gcxd","dciibim")
mibiicd
^P1STREET("IS","gcxd","dclid")
dilcd
^P1STREET("IS","gcxd","dctpd")
dptcd
^P1STREET("IS","gcxd","dcwl")
lwcd
^P1STREET("IS","gcxd","dcxex")
xexcd
^P1STREET("IS","gcxd","ddcq")
qcdd
^P1STREET("IS","gcxd","ddcx")
xcdd
^P1STREET("IS","gcxd","ddqzcxez")
zexczqdd
^P1STREET("IS","gcxd","dexc")
cxed
^P1STREET("IS","gcxd","dfbb")
bbfd
^P1STREET("IS","gcxd","dfebo")
obefd
^P1STREET("IS","gcxd","dfiz")
zifd
^P1STREET("IS","gcxd","dfnix")
xinfd
^P1STREET("IS","gcxd","dgegiz")
zigegd
^P1STREET("IS","gcxd","dgeliz")
zilegd
^P1STREET("IS","gcxd","dgetiz")
zitegd
^P1STREET("IS","gcxd","dgic""`")
`"cigd
^P1STREET("IS","gcxd","dgihd")
dhigd
^P1STREET("IS","gcxd","dgixez")
zexigd
^P1STREET("IS","gcxd","dgleu")
uelgd
^P1STREET("IS","gcxd","dgqicd")
dciqgd
^P1STREET("IS","gcxd","dgva")
avgd
^P1STREET("IS","gcxd","dgxy")
yxgd
^P1STREET("IS","gcxd","dhiiqim")
miqiihd
^P1STREET("IS","gcxd","dibeqlaim")
mialqebid
^P1STREET("IS","gcxd","diepd")
dpeid
^P1STREET("IS","gcxd","dievxim")
mixveid
^P1STREET("IS","gcxd","diqnio")
oinqid
^P1STREET("IS","gcxd","diqrex")
xerqid
^P1STREET("IS","gcxd","dk""b")
b"kd
^P1STREET("IS","gcxd","dkipex")
xepikd
^P1STREET("IS","gcxd","dkipxz")
zxpikd
^P1STREET("IS","gcxd","dklpiz")
ziplkd
^P1STREET("IS","gcxd","dkpqz")
zqpkd
^P1STREET("IS","gcxd","dks binl")
lnib skd
^P1STREET("IS","gcxd","dkxkem")
mekxkd
^P1STREET("IS","gcxd","dkxm")
mxkd
^P1STREET("IS","gcxd","dkxnl")
lnxkd
^P1STREET("IS","gcxd","dl""d")
d"ld
^P1STREET("IS","gcxd","dlapiz")
zipald
^P1STREET("IS","gcxd","dlbepd")
dpebld
^P1STREET("IS","gcxd","dlehm")
mheld
^P1STREET("IS","gcxd","dlei")
ield
^P1STREET("IS","gcxd","dlineo")
oenild
^P1STREET("IS","gcxd","dll itd")
dti lld
^P1STREET("IS","gcxd","dnbipim")
mipibnd
^P1STREET("IS","gcxd","dnelcz")
zclend
^P1STREET("IS","gcxd","dnexo")
oxend
^P1STREET("IS","gcxd","dneyad")
dayend
^P1STREET("IS","gcxd","dniiqcim")
micqiind
^P1STREET("IS","gcxd","dnkaim")
miaknd
^P1STREET("IS","gcxd","dnklld")
dllknd
^P1STREET("IS","gcxd","dnqbx")
xbqnd
^P1STREET("IS","gcxd","dnrtilim")
militrnd
^P1STREET("IS","gcxd","dnwyx")
xywnd
^P1STREET("IS","gcxd","dnzkz")
zkznd
^P1STREET("IS","gcxd","dpai`im")
mi`iapd
^P1STREET("IS","gcxd","dpal")
lapd
^P1STREET("IS","gcxd","dpba")
abpd
^P1STREET("IS","gcxd","dpbipez")
zepibpd
^P1STREET("IS","gcxd","dpexiz")
zixepd
^P1STREET("IS","gcxd","dpgyepim")
mipeygpd
^P1STREET("IS","gcxd","dpvi""a")
a"ivpd
^P1STREET("IS","gcxd","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","gcxd","dpxwiq")
qiwxpd
^P1STREET("IS","gcxd","dpyi` eiivno")
onviie `iypd
^P1STREET("IS","gcxd","dq nyd")
dyn qd
^P1STREET("IS","gcxd","dqaieo")
oeiaqd
^P1STREET("IS","gcxd","dqdxeo")
oexdqd
^P1STREET("IS","gcxd","dqibliz")
zilbiqd
^P1STREET("IS","gcxd","dqlr d`cem")
mec`d rlqd
^P1STREET("IS","gcxd","draecd")
dceard
^P1STREET("IS","gcxd","dreba")
aberd
^P1STREET("IS","gcxd","drix drziwd")
dwizrd xird
^P1STREET("IS","gcxd","drvn`ez")
ze`nvrd
^P1STREET("IS","gcxd","drxad")
daxrd
^P1STREET("IS","gcxd","dtlb")
bltd
^P1STREET("IS","gcxd","dtln""g")
g"nltd
^P1STREET("IS","gcxd","dtw`o")
o`wtd
^P1STREET("IS","gcxd","dtxcq")
qcxtd
^P1STREET("IS","gcxd","dtxcq `'")
'` qcxtd
^P1STREET("IS","gcxd","dtxcq a")
a qcxtd
^P1STREET("IS","gcxd","dtxcq b'")
'b qcxtd
^P1STREET("IS","gcxd","dtxcq c'")
'c qcxtd
^P1STREET("IS","gcxd","dtxcq d'")
'd qcxtd
^P1STREET("IS","gcxd","dv`leo")
oel`vd
^P1STREET("IS","gcxd","dvai")
iavd
^P1STREET("IS","gcxd","dvarepi")
iperavd
^P1STREET("IS","gcxd","dvax")
xavd
^P1STREET("IS","gcxd","dvewim")
miwevd
^P1STREET("IS","gcxd","dvitexo")
oxetivd
^P1STREET("IS","gcxd","dvpgpim")
mipgpvd
^P1STREET("IS","gcxd","dwenepd dgcxziz")
zizxcgd dpenewd
^P1STREET("IS","gcxd","dwepbxq")
qxbpewd
^P1STREET("IS","gcxd","dwicd")
dciwd
^P1STREET("IS","gcxd","dwipneo")
oenpiwd
^P1STREET("IS","gcxd","dwiqeq")
qeqiwd
^P1STREET("IS","gcxd","dwpd")
dpwd
^P1STREET("IS","gcxd","dx dnex")
xend xd
^P1STREET("IS","gcxd","dx qipi")
ipiq xd
^P1STREET("IS","gcxd","dx vio")
oiv xd
^P1STREET("IS","gcxd","dx`yepim")
mipey`xd
^P1STREET("IS","gcxd","dxa `expyhiio")
oiihypxe` axd
^P1STREET("IS","gcxd","dxa dxveb")
bevxd axd
^P1STREET("IS","gcxd","dxa piqim")
miqip axd
^P1STREET("IS","gcxd","dxa wew")
wew axd
^P1STREET("IS","gcxd","dxaxh qne`l")
l`enq hxaxd
^P1STREET("IS","gcxd","dxezm")
mzexd
^P1STREET("IS","gcxd","dxi aynim")
minya ixd
^P1STREET("IS","gcxd","dxinepim")
mipenixd
^P1STREET("IS","gcxd","dxna""o")
o"anxd
^P1STREET("IS","gcxd","dxvl")
lvxd
^P1STREET("IS","gcxd","dxwtz")
ztwxd
^P1STREET("IS","gcxd","dxy""y")
y"yxd
^P1STREET("IS","gcxd","dycxd")
dxcyd
^P1STREET("IS","gcxd","dyenx")
xneyd
^P1STREET("IS","gcxd","dyenxeo")
oexneyd
^P1STREET("IS","gcxd","dyethim")
mihteyd
^P1STREET("IS","gcxd","dyew")
weyd
^P1STREET("IS","gcxd","dygs")
sgyd
^P1STREET("IS","gcxd","dyihd")
dhiyd
^P1STREET("IS","gcxd","dylcb")
bclyd
^P1STREET("IS","gcxd","dyldaz")
zadlyd
^P1STREET("IS","gcxd","dylem")
melyd
^P1STREET("IS","gcxd","dylkz")
zklyd
^P1STREET("IS","gcxd","dynipiz")
zipinyd
^P1STREET("IS","gcxd","dywc")
cwyd
^P1STREET("IS","gcxd","dywnd")
dnwyd
^P1STREET("IS","gcxd","dyxeo")
oexyd
^P1STREET("IS","gcxd","dz`pd")
dp`zd
^P1STREET("IS","gcxd","dz`pim")
mip`zd
^P1STREET("IS","gcxd","dzcdx")
xdczd
^P1STREET("IS","gcxd","dzeniz")
zinezd
^P1STREET("IS","gcxd","dzez")
zezd
^P1STREET("IS","gcxd","dzgid")
digzd
^P1STREET("IS","gcxd","dznxim")
mixnzd
^P1STREET("IS","gcxd","dztef")
fetzd
^P1STREET("IS","gcxd","eeltaxb")
bxatlee
^P1STREET("IS","gcxd","eicxwx")
xwxcie
^P1STREET("IS","gcxd","eilepqwi")
iwqpelie
^P1STREET("IS","gcxd","eizwio")
oiwzie
^P1STREET("IS","gcxd","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","gcxd","fecwaiu")
uiawcef
^P1STREET("IS","gcxd","felehxea")
aexhelef
^P1STREET("IS","gcxd","flno yf""x")
x"fy onlf
^P1STREET("IS","gcxd","gavlz dyxeo")
oexyd zlvag
^P1STREET("IS","gcxd","geaai vieo")
oeiv iaaeg
^P1STREET("IS","gcxd","geh dypi")
ipyd heg
^P1STREET("IS","gcxd","gelzd")
dzleg
^P1STREET("IS","gcxd","ges dkxnl")
lnxkd seg
^P1STREET("IS","gcxd","gfeo `iy")
yi` oefg
^P1STREET("IS","gcxd","gfpi nik`l")
l`kin ipfg
^P1STREET("IS","gcxd","gh' dpg""l")
l"gpd 'hg
^P1STREET("IS","gcxd","ghiad yar")
ray daihg
^P1STREET("IS","gcxd","ghiaz `lkqpcxepi")
ipexcpqkl` zaihg
^P1STREET("IS","gcxd","ghiaz barzi")
izrab zaihg
^P1STREET("IS","gcxd","ghiaz belpi")
ipleb zaihg
^P1STREET("IS","gcxd","ghiaz dx`l")
l`xd zaihg
^P1STREET("IS","gcxd","ghiaz kxnli")
ilnxk zaihg
^P1STREET("IS","gcxd","ghiaz recc")
ccer zaihg
^P1STREET("IS","gcxd","ghiaz rviepi")
ipeivr zaihg
^P1STREET("IS","gcxd","ghiaz wxiizi")
iziixw zaihg
^P1STREET("IS","gcxd","gitd")
dtig
^P1STREET("IS","gcxd","glevd")
dvelg
^P1STREET("IS","gcxd","gpd qpy")
ypq dpg
^P1STREET("IS","gcxd","gpwio")
oiwpg
^P1STREET("IS","gcxd","gv' axpciq")
qicpxa 'vg
^P1STREET("IS","gcxd","gvxez axpciq")
qicpxa zexvg
^P1STREET("IS","gcxd","gxeaim")
miaexg
^P1STREET("IS","gcxd","haia")
aiah
^P1STREET("IS","gcxd","hienwio")
oiwneih
^P1STREET("IS","gcxd","hiia")
aiih
^P1STREET("IS","gcxd","hxentlcex")
xecltnexh
^P1STREET("IS","gcxd","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","gcxd","i""l txu")
uxt l"i
^P1STREET("IS","gcxd","iapi`li")
il`ipai
^P1STREET("IS","gcxd","ib`l")
l`bi
^P1STREET("IS","gcxd","ib`l `leo")
oel` l`bi
^P1STREET("IS","gcxd","ic lapim")
mipal ci
^P1STREET("IS","gcxd","ic yne`l")
l`eny ci
^P1STREET("IS","gcxd","ic yxd")
dxy ci
^P1STREET("IS","gcxd","ieqthl")
lhtqei
^P1STREET("IS","gcxd","im-dnlg")
glnd-mi
^P1STREET("IS","gcxd","im-qes")
seq-mi
^P1STREET("IS","gcxd","itd pes")
sep dti
^P1STREET("IS","gcxd","ivgw xaio")
oiax wgvi
^P1STREET("IS","gcxd","ivgw ycd")
dcy wgvi
^P1STREET("IS","gcxd","ivi`z `ixetd")
dtexi` z`ivi
^P1STREET("IS","gcxd","ixeylim")
milyexi
^P1STREET("IS","gcxd","iyi")
iyi
^P1STREET("IS","gcxd","iyride")
ediryi
^P1STREET("IS","gcxd","k""g a`iix")
xii`a g"k
^P1STREET("IS","gcxd","k""h apeanax")
xanaepa h"k
^P1STREET("IS","gcxd","kdo `eqwx")
xwqe` odk
^P1STREET("IS","gcxd","kpti pyxim")
mixyp itpk
^P1STREET("IS","gcxd","kqti n`ix")
xi`n itqk
^P1STREET("IS","gcxd","ktx dim")
mid xtk
^P1STREET("IS","gcxd","kvplqeo axl")
lxa oeqlpvk
^P1STREET("IS","gcxd","laevwio")
oiwveal
^P1STREET("IS","gcxd","lafeaqwi")
iwqaefal
^P1STREET("IS","gcxd","lei `ykel")
leky` iel
^P1STREET("IS","gcxd","leihq")
qhiel
^P1STREET("IS","gcxd","lg""i")
i"gl
^P1STREET("IS","gcxd","lieaio")
oiaeil
^P1STREET("IS","gcxd","lilipalem")
melapilil
^P1STREET("IS","gcxd","lkd ceci")
icec dkl
^P1STREET("IS","gcxd","navr cpi")
ipc rvan
^P1STREET("IS","gcxd","navr gexa")
axeg rvan
^P1STREET("IS","gcxd","navr gixm")
mxig rvan
^P1STREET("IS","gcxd","navr ie`a")
a`ei rvan
^P1STREET("IS","gcxd","navr iepzo")
ozpei rvan
^P1STREET("IS","gcxd","navr pgyeo")
oeygp rvan
^P1STREET("IS","gcxd","navr reacd")
dcaer rvan
^P1STREET("IS","gcxd","navr rfx`")
`xfr rvan
^P1STREET("IS","gcxd","navr ryx dnkez")
zeknd xyr rvan
^P1STREET("IS","gcxd","navr wcy")
ycw rvan
^P1STREET("IS","gcxd","nbcl cec")
cec lcbn
^P1STREET("IS","gcxd","nbcli riliz")
zilir ilcbn
^P1STREET("IS","gcxd","ncexqwi")
iwqxecn
^P1STREET("IS","gcxd","ndx""l")
l"xdn
^P1STREET("IS","gcxd","ndxi""u")
u"ixdn
^P1STREET("IS","gcxd","nedliax")
xailden
^P1STREET("IS","gcxd","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","gcxd","nexd")
dxen
^P1STREET("IS","gcxd","ng""l")
l"gn
^P1STREET("IS","gcxd","niifx ieqs")
sqei xfiin
^P1STREET("IS","gcxd","nilpx")
xplin
^P1STREET("IS","gcxd","nineo idecd")
dcedi oenin
^P1STREET("IS","gcxd","nlgnz iem dkitexim")
mixetikd mei zngln
^P1STREET("IS","gcxd","nlgnz yyz dinim")
minid zyy zngln
^P1STREET("IS","gcxd","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","gcxd","nnyiz")
ziynn
^P1STREET("IS","gcxd","npxd")
dxpn
^P1STREET("IS","gcxd","nvtd im")
mi dtvn
^P1STREET("IS","gcxd","nvtd xneo")
oenx dtvn
^P1STREET("IS","gcxd","nwed iyx`l")
l`xyi dewn
^P1STREET("IS","gcxd","nwls nxcki")
ikcxn slwn
^P1STREET("IS","gcxd","nxac dwqnim")
minqwd caxn
^P1STREET("IS","gcxd","nxed")
dexn
^P1STREET("IS","gcxd","nyd ciio")
oiic dyn
^P1STREET("IS","gcxd","nyd yxz")
zxy dyn
^P1STREET("IS","gcxd","nynx dim")
mid xnyn
^P1STREET("IS","gcxd","pbd")
dbp
^P1STREET("IS","gcxd","pdll")
lldp
^P1STREET("IS","gcxd","pdxepiz")
zipexdp
^P1STREET("IS","gcxd","pea")
aep
^P1STREET("IS","gcxd","ped `lirfx")
xfril` dep
^P1STREET("IS","gcxd","peed im")
mi deep
^P1STREET("IS","gcxd","peed ktxi")
ixtk deep
^P1STREET("IS","gcxd","pehxi dkxnim")
minxkd ixhep
^P1STREET("IS","gcxd","pexc`e")
e`cxep
^P1STREET("IS","gcxd","pgl kfia")
aifk lgp
^P1STREET("IS","gcxd","pgl txz")
zxt lgp
^P1STREET("IS","gcxd","pgl vio")
oiv lgp
^P1STREET("IS","gcxd","pgneaqwi")
iwqaengp
^P1STREET("IS","gcxd","pil""i")
i"lip
^P1STREET("IS","gcxd","piqo")
oqip
^P1STREET("IS","gcxd","pivpd")
dpvip
^P1STREET("IS","gcxd","pivpim")
mipvip
^P1STREET("IS","gcxd","prno")
onrp
^P1STREET("IS","gcxd","px dlild")
dlild xp
^P1STREET("IS","gcxd","pziaez")
zeaizp
^P1STREET("IS","gcxd","qbl")
lbq
^P1STREET("IS","gcxd","qhiwea")
aewihq
^P1STREET("IS","gcxd","qicwea")
aewciq
^P1STREET("IS","gcxd","qihwea")
aewhiq
^P1STREET("IS","gcxd","qlevwio")
oiwvelq
^P1STREET("IS","gcxd","qlr")
rlq
^P1STREET("IS","gcxd","qn' aehweaqwi")
iwqaewhea 'nq
^P1STREET("IS","gcxd","qn' tlhxio")
oixhlt 'nq
^P1STREET("IS","gcxd","qncx")
xcnq
^P1STREET("IS","gcxd","qnelpiw")
wiplenq
^P1STREET("IS","gcxd","qnhz dg`o")
o`gd zhnq
^P1STREET("IS","gcxd","qnhz dxvl")
lvxd zhnq
^P1STREET("IS","gcxd","qnilpqwi nyd")
dyn iwqplinq
^P1STREET("IS","gcxd","qnqepea")
aepeqnq
^P1STREET("IS","gcxd","qtix ieqs")
sqei xitq
^P1STREET("IS","gcxd","refi`l")
l`ifer
^P1STREET("IS","gcxd","reli dbxcem")
mecxbd iler
^P1STREET("IS","gcxd","rio `xeaez")
zeaex` oir
^P1STREET("IS","gcxd","rio ba")
ab oir
^P1STREET("IS","gcxd","rio bci")
icb oir
^P1STREET("IS","gcxd","rio bpim")
mipb oir
^P1STREET("IS","gcxd","rio dcay")
yacd oir
^P1STREET("IS","gcxd","rio fieeo")
oeeif oir
^P1STREET("IS","gcxd","rixiz")
zixir
^P1STREET("IS","gcxd","rlid x`yepd")
dpey`x dilr
^P1STREET("IS","gcxd","rlid ypid")
dipy dilr
^P1STREET("IS","gcxd","rliiz dperx")
xrepd ziilr
^P1STREET("IS","gcxd","rliiz zino")
oniz ziilr
^P1STREET("IS","gcxd","rnw ifxr`l")
l`rxfi wnr
^P1STREET("IS","gcxd","rvneo")
oenvr
^P1STREET("IS","gcxd","rvneo a'")
'a oenvr
^P1STREET("IS","gcxd","rx `vil")
liv` xr
^P1STREET("IS","gcxd","tiipaxb")
bxapiit
^P1STREET("IS","gcxd","tipqwx")
xwqpit
^P1STREET("IS","gcxd","tiw""`")
`"wit
^P1STREET("IS","gcxd","tlc `yx")
xy` clt
^P1STREET("IS","gcxd","txiclpcx")
xcplcixt
^P1STREET("IS","gcxd","txpw")
wpxt
^P1STREET("IS","gcxd","vd""l")
l"dv
^P1STREET("IS","gcxd","vicwea")
aewciv
^P1STREET("IS","gcxd","vitexd")
dxetiv
^P1STREET("IS","gcxd","vrixi ylem")
mely ixirv
^P1STREET("IS","gcxd","vtxd")
dxtv
^P1STREET("IS","gcxd","vtz")
ztv
^P1STREET("IS","gcxd","waeu bleiez")
zeielb ueaw
^P1STREET("IS","gcxd","wcind")
dnicw
^P1STREET("IS","gcxd","wehlx")
xlhew
^P1STREET("IS","gcxd","wenad")
danew
^P1STREET("IS","gcxd","wlf")
flw
^P1STREET("IS","gcxd","wphxbi")
ibxhpw
^P1STREET("IS","gcxd","wqhl")
lhqw
^P1STREET("IS","gcxd","ww""l")
l"ww
^P1STREET("IS","gcxd","wxo diqec")
ceqid oxw
^P1STREET("IS","gcxd","x`y dpwxd")
dxwpd y`x
^P1STREET("IS","gcxd","xai idecd dlei")
ield dcedi iax
^P1STREET("IS","gcxd","xai w`xe ieqs")
sqei ex`w iax
^P1STREET("IS","gcxd","xehno")
onhex
^P1STREET("IS","gcxd","xfi`l cec")
cec l`ifx
^P1STREET("IS","gcxd","xg""y")
y"gx
^P1STREET("IS","gcxd","xigo")
ogix
^P1STREET("IS","gcxd","xna""m")
m"anx
^P1STREET("IS","gcxd","xng""l")
l"gnx
^P1STREET("IS","gcxd","xqwe")
ewqx
^P1STREET("IS","gcxd","xy""i")
i"yx
^P1STREET("IS","gcxd","xya""m")
m"ayx
^P1STREET("IS","gcxd","y""i rbpeo")
oepbr i"y
^P1STREET("IS","gcxd","y`x iyea")
aeyi x`y
^P1STREET("IS","gcxd","yafi")
ifay
^P1STREET("IS","gcxd","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","gcxd","yc' `dxepeaiu")
uiaepexd` 'cy
^P1STREET("IS","gcxd","yc' `lkqpcx")
xcpqkl` 'cy
^P1STREET("IS","gcxd","yc' abio")
oiba 'cy
^P1STREET("IS","gcxd","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","gcxd","yc' axej ae`xeo")
oex`ea jexa 'cy
^P1STREET("IS","gcxd","yc' dgxez")
zexgd 'cy
^P1STREET("IS","gcxd","yc' xehyilc")
cliyhex 'cy
^P1STREET("IS","gcxd","yc' xeo")
oex 'cy
^P1STREET("IS","gcxd","yerli ynyeo")
oeyny ilrey
^P1STREET("IS","gcxd","yeypim")
mipyey
^P1STREET("IS","gcxd","yg""l")
l"gy
^P1STREET("IS","gcxd","yhxpio")
oipxhy
^P1STREET("IS","gcxd","yiaz vieo")
oeiv zaiy
^P1STREET("IS","gcxd","yifs")
sfiy
^P1STREET("IS","gcxd","ylnd dnlj")
jlnd dnly
^P1STREET("IS","gcxd","yne`lfeo")
oefl`eny
^P1STREET("IS","gcxd","ynich")
hciny
^P1STREET("IS","gcxd","ynreo bexceo")
oecxeb oerny
^P1STREET("IS","gcxd","ynyeo")
oeyny
^P1STREET("IS","gcxd","ypi`exqeo")
oeqxe`ipy
^P1STREET("IS","gcxd","ytix` giim")
miig `xity
^P1STREET("IS","gcxd","ytw")
wty
^P1STREET("IS","gcxd","ytxipvw")
wvpixty
^P1STREET("IS","gcxd","ywnepd")
dpenwy
^P1STREET("IS","gcxd","ywvx")
xvwy
^P1STREET("IS","gcxd","yyz dinim")
minid zyy
^P1STREET("IS","gcxd","zex dfda")
adfd xez
^P1STREET("IS","gcxd","zl cex")
xec lz
^P1STREET("IS","gcxd","zl co")
oc lz
^P1STREET("IS","gcxd","zl gvex")
xevg lz
^P1STREET("IS","gcxd","zp`im")
mi`pz
^P1STREET("IS","gcxd","zxn""a")
a"nxz
^P1STREET("IS","gcxd","zxp""`")
`"pxz
^P1STREET("IS","gcxd","zxr""a")
a"rxz
^P1STREET("IS","gcxd","zxv""a")
a"vxz
^P1STREET("IS","gcxd","zxyiy")
yiyxz
^P1STREET("IS","gebld")
dlbeg
^P1STREET("IS","gelcd")
dcleg
^P1STREET("IS","gelcd","nbirim nnynx cec")
cec xnynn miribn
^P1STREET("IS","geleo")
oeleg
^P1STREET("IS","geleo","`""c bexceo")
oecxeb c"`
^P1STREET("IS","geleo","`a` dll")
lld `a`
^P1STREET("IS","geleo","`aiaim")
miaia`
^P1STREET("IS","geleo","`aico ynreo")
oerny ocia`
^P1STREET("IS","geleo","`ao baixel")
lexiab oa`
^P1STREET("IS","geleo","`ao rfx`")
`xfr oa`
^P1STREET("IS","geleo","`ao ytxeh")
hexty oa`
^P1STREET("IS","geleo","`apx")
xpa`
^P1STREET("IS","geleo","`axap`l")
l`paxa`
^P1STREET("IS","geleo","`axdm n`te")
et`n mdxa`
^P1STREET("IS","geleo","`aylem")
melya`
^P1STREET("IS","geleo","`dec")
ced`
^P1STREET("IS","geleo","`dxeo blrci")
icrlb oexd`
^P1STREET("IS","geleo","`dxeo ixia")
aixi oexd`
^P1STREET("IS","geleo","`dxepeaiu")
uiaepexd`
^P1STREET("IS","geleo","`edl yxd")
dxy lde`
^P1STREET("IS","geleo","`etix")
xite`
^P1STREET("IS","geleo","`exi vai bxipaxb")
bxapixb iav ixe`
^P1STREET("IS","geleo","`exim")
mixe`
^P1STREET("IS","geleo","`f""x")
x"f`
^P1STREET("IS","geleo","`g""i cwx")
xwc i"g`
^P1STREET("IS","geleo","`gc an`i")
i`na cg`
^P1STREET("IS","geleo","`gc drm")
mrd cg`
^P1STREET("IS","geleo","`ged")
deg`
^P1STREET("IS","geleo","`ilz")
zli`
^P1STREET("IS","geleo","`inax")
xani`
^P1STREET("IS","geleo","`ixiq")
qixi`
^P1STREET("IS","geleo","`leti vd""l")
l"dv itel`
^P1STREET("IS","geleo","`lgxifi")
ifixgl`
^P1STREET("IS","geleo","`li kdo")
odk il`
^P1STREET("IS","geleo","`lide dpai`")
`iapd edil`
^P1STREET("IS","geleo","`lirfx ao idecd")
dcedi oa xfril`
^P1STREET("IS","geleo","`liyr")
ryil`
^P1STREET("IS","geleo","`lwlri ieqs")
sqei irlwl`
^P1STREET("IS","geleo","`lxe`i cec")
cec i`exl`
^P1STREET("IS","geleo","`pd txpw")
wpxt dp`
^P1STREET("IS","geleo","`pilaiu")
uialip`
^P1STREET("IS","geleo","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","geleo","`trl")
lrt`
^P1STREET("IS","geleo","`v""l")
l"v`
^P1STREET("IS","geleo","`wcn`im")
mi`ncw`
^P1STREET("IS","geleo","`xar `xvez")
zevx` rax`
^P1STREET("IS","geleo","`xbea n`ix")
xi`n aebx`
^P1STREET("IS","geleo","`xlefexea giim")
miig aexefelx`
^P1STREET("IS","geleo","`xlij yngd")
dgny jilx`
^P1STREET("IS","geleo","`xpqh debe")
ebed hqpx`
^P1STREET("IS","geleo","`yz`el")
le`zy`
^P1STREET("IS","geleo","aeql ieqs")
sqei lqea
^P1STREET("IS","geleo","aeqzp`i")
i`pzqea
^P1STREET("IS","geleo","aexekea")
aekexea
^P1STREET("IS","geleo","afl")
lfa
^P1STREET("IS","geleo","ai`liw")
wil`ia
^P1STREET("IS","geleo","ail""e")
e"lia
^P1STREET("IS","geleo","ailipqeo")
oeqpilia
^P1STREET("IS","geleo","aiz lgm")
mgl zia
^P1STREET("IS","geleo","aiz yrxim")
mixry zia
^P1STREET("IS","geleo","alao n`ix")
xi`n oala
^P1STREET("IS","geleo","alem")
mela
^P1STREET("IS","geleo","ao `lirfx `xid")
dix` xfril` oa
^P1STREET("IS","geleo","ao dll")
lld oa
^P1STREET("IS","geleo","ao rnxm")
mxnr oa
^P1STREET("IS","geleo","ao vieo iyx`l")
l`xyi oeiv oa
^P1STREET("IS","geleo","api nyd")
dyn ipa
^P1STREET("IS","geleo","arl dngyaez")
zeaygnd lra
^P1STREET("IS","geleo","avl`l")
l`lva
^P1STREET("IS","geleo","ax `ilo")
oli` xa
^P1STREET("IS","geleo","ax keka`")
`akek xa
^P1STREET("IS","geleo","axciv'aqwi")
iwqa'vicxa
^P1STREET("IS","geleo","axecxfeo")
oefxcexa
^P1STREET("IS","geleo","axfail")
liafxa
^P1STREET("IS","geleo","axfili iyx`l")
l`xyi ilifxa
^P1STREET("IS","geleo","axpciq le`i")
i`el qicpxa
^P1STREET("IS","geleo","axpx ieqs giim")
miig sqei xpxa
^P1STREET("IS","geleo","axu ieqs")
sqei uxa
^P1STREET("IS","geleo","axw")
wxa
^P1STREET("IS","geleo","axwo")
owxa
^P1STREET("IS","geleo","axwz x`eao")
oae`x zwxa
^P1STREET("IS","geleo","b`elim")
mile`b
^P1STREET("IS","geleo","bard yiyim ezyr")
ryze miyiy drab
^P1STREET("IS","geleo","bareo")
oerab
^P1STREET("IS","geleo","barz dzgneyz")
zyengzd zrab
^P1STREET("IS","geleo","barzi")
izrab
^P1STREET("IS","geleo","bcreo")
oercb
^P1STREET("IS","geleo","belcd n`ix")
xi`n dcleb
^P1STREET("IS","geleo","belena")
aneleb
^P1STREET("IS","geleo","bey gla")
alg yeb
^P1STREET("IS","geleo","bey rvieo")
oeivr yeb
^P1STREET("IS","geleo","biivl wxql")
lqxw lviib
^P1STREET("IS","geleo","bleqio")
oiqelb
^P1STREET("IS","geleo","bpqio")
oiqpb
^P1STREET("IS","geleo","bxipaeim ivgw")
wgvi mieapixb
^P1STREET("IS","geleo","bxu vai")
iav uxb
^P1STREET("IS","geleo","c""x kdo irwa")
awri odk x"c
^P1STREET("IS","geleo","c""x pg wtlipqwi")
iwqpiltw gp x"c
^P1STREET("IS","geleo","c""x q`lw iepd")
dpei wl`q x"c
^P1STREET("IS","geleo","c""x taxibh")
hbixat x"c
^P1STREET("IS","geleo","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","geleo","cbpid")
dipbc
^P1STREET("IS","geleo","cd ylih rneq")
qenr hily dc
^P1STREET("IS","geleo","ceapea ynreo")
oerny aepaec
^P1STREET("IS","geleo","cec `lrfx")
xfrl` cec
^P1STREET("IS","geleo","cec txiyno")
onyixt cec
^P1STREET("IS","geleo","celtio")
oitlec
^P1STREET("IS","geleo","ceo ieqs dpyi`")
`iypd sqei oec
^P1STREET("IS","geleo","cexi irwa")
awri ixec
^P1STREET("IS","geleo","ciio nyd")
dyn oiic
^P1STREET("IS","geleo","clid")
dilc
^P1STREET("IS","geleo","cpi`l")
l`ipc
^P1STREET("IS","geleo","cxj dyard")
drayd jxc
^P1STREET("IS","geleo","d` a`iix")
xii`a `d
^P1STREET("IS","geleo","d`aez")
zea`d
^P1STREET("IS","geleo","d`bef")
feb`d
^P1STREET("IS","geleo","d`eto")
ote`d
^P1STREET("IS","geleo","d`exbim")
mibxe`d
^P1STREET("IS","geleo","d`gim")
mig`d
^P1STREET("IS","geleo","d`nex`im")
mi`xen`d
^P1STREET("IS","geleo","d`pwex")
xewp`d
^P1STREET("IS","geleo","d`x""f")
f"x`d
^P1STREET("IS","geleo","d`xi")
ix`d
^P1STREET("IS","geleo","d`yl")
ly`d
^P1STREET("IS","geleo","dap`i")
i`pad
^P1STREET("IS","geleo","dapim")
mipad
^P1STREET("IS","geleo","darl ym hea")
aeh my lrad
^P1STREET("IS","geleo","dawrd")
drwad
^P1STREET("IS","geleo","daxaex")
xeaxad
^P1STREET("IS","geleo","daxey")
yexad
^P1STREET("IS","geleo","db`epim")
mipe`bd
^P1STREET("IS","geleo","dbaiy")
yiabd
^P1STREET("IS","geleo","dbarel")
lerabd
^P1STREET("IS","geleo","dbcec draxi")
ixard cecbd
^P1STREET("IS","geleo","dbcp""rim")
mir"pcbd
^P1STREET("IS","geleo","dbiaexim")
mixeaibd
^P1STREET("IS","geleo","dblaer")
realbd
^P1STREET("IS","geleo","dblil")
lilbd
^P1STREET("IS","geleo","dblrc")
crlbd
^P1STREET("IS","geleo","dbto")
otbd
^P1STREET("IS","geleo","dbx""`")
`"xbd
^P1STREET("IS","geleo","dcekitz")
ztikecd
^P1STREET("IS","geleo","dciid")
diicd
^P1STREET("IS","geleo","dcwl")
lwcd
^P1STREET("IS","geleo","dcx")
xcd
^P1STREET("IS","geleo","dcxex")
xexcd
^P1STREET("IS","geleo","ddbpd")
dpbdd
^P1STREET("IS","geleo","ddqzcxez")
zexczqdd
^P1STREET("IS","geleo","detiio `lirfx")
xfril` oiited
^P1STREET("IS","geleo","dfexr")
rxefd
^P1STREET("IS","geleo","dfiz")
zifd
^P1STREET("IS","geleo","dfnix")
xinfd
^P1STREET("IS","geleo","dgavlz")
zlvagd
^P1STREET("IS","geleo","dgbld")
dlbgd
^P1STREET("IS","geleo","dgegiz")
zigegd
^P1STREET("IS","geleo","dgehxim")
mixhegd
^P1STREET("IS","geleo","dgetx")
xtegd
^P1STREET("IS","geleo","dgexhim")
mihxegd
^P1STREET("IS","geleo","dgezxim")
mixzegd
^P1STREET("IS","geleo","dgi""l")
l"igd
^P1STREET("IS","geleo","dgi""m")
m"igd
^P1STREET("IS","geleo","dgi""y")
y"igd
^P1STREET("IS","geleo","dgleu")
uelgd
^P1STREET("IS","geleo","dgnpid")
dipngd
^P1STREET("IS","geleo","dgnxid")
dixngd
^P1STREET("IS","geleo","dgqicd")
dciqgd
^P1STREET("IS","geleo","dgva")
avgd
^P1STREET("IS","geleo","dgxneo")
oenxgd
^P1STREET("IS","geleo","dgxny")
ynxgd
^P1STREET("IS","geleo","dgxviz")
zivxgd
^P1STREET("IS","geleo","dgxy")
yxgd
^P1STREET("IS","geleo","dgynep`im")
mi`penygd
^P1STREET("IS","geleo","dheeq")
qeehd
^P1STREET("IS","geleo","dhiiqim")
miqiihd
^P1STREET("IS","geleo","di""c")
c"id
^P1STREET("IS","geleo","dieal")
laeid
^P1STREET("IS","geleo","dieba")
abeid
^P1STREET("IS","geleo","dievx")
xveid
^P1STREET("IS","geleo","dizc")
czid
^P1STREET("IS","geleo","dkgl")
lgkd
^P1STREET("IS","geleo","dkiyex")
xeyikd
^P1STREET("IS","geleo","dkpqz")
zqpkd
^P1STREET("IS","geleo","dkxm")
mxkd
^P1STREET("IS","geleo","dlda")
adld
^P1STREET("IS","geleo","dlegnim")
mingeld
^P1STREET("IS","geleo","dnbic")
cibnd
^P1STREET("IS","geleo","dnkaim")
miaknd
^P1STREET("IS","geleo","dnkzy")
yzknd
^P1STREET("IS","geleo","dnl`kd")
dk`lnd
^P1STREET("IS","geleo","dnpex")
xepnd
^P1STREET("IS","geleo","dnqbx")
xbqnd
^P1STREET("IS","geleo","dnrexx")
xxernd
^P1STREET("IS","geleo","dnrio")
oirnd
^P1STREET("IS","geleo","dnrtilim")
militrnd
^P1STREET("IS","geleo","dnvecd")
dcevnd
^P1STREET("IS","geleo","dnxbpiz")
zipbxnd
^P1STREET("IS","geleo","dnxkad")
dakxnd
^P1STREET("IS","geleo","dnyaix")
xiaynd
^P1STREET("IS","geleo","dnyex")
xeynd
^P1STREET("IS","geleo","dnznic")
cinznd
^P1STREET("IS","geleo","dnzpcaim")
miacpznd
^P1STREET("IS","geleo","dpai`im")
mi`iapd
^P1STREET("IS","geleo","dpbx")
xbpd
^P1STREET("IS","geleo","dpehxim")
mixhepd
^P1STREET("IS","geleo","dpetj")
jtepd
^P1STREET("IS","geleo","dpgeyz")
zyegpd
^P1STREET("IS","geleo","dpgli`li")
il`ilgpd
^P1STREET("IS","geleo","dpivpim")
mipvipd
^P1STREET("IS","geleo","dptg")
gtpd
^P1STREET("IS","geleo","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","geleo","dpxwiq")
qiwxpd
^P1STREET("IS","geleo","dpyi`im")
mi`iypd
^P1STREET("IS","geleo","dpyx")
xypd
^P1STREET("IS","geleo","dqaex`im")
mi`xeaqd
^P1STREET("IS","geleo","dqco")
ocqd
^P1STREET("IS","geleo","dqcp`")
`pcqd
^P1STREET("IS","geleo","dqell")
lleqd
^P1STREET("IS","geleo","dqiixz")
zxiiqd
^P1STREET("IS","geleo","dqlro")
orlqd
^P1STREET("IS","geleo","dqpdcxio")
oixcdpqd
^P1STREET("IS","geleo","dqpepiz")
zipepqd
^P1STREET("IS","geleo","dqtexh`im")
mi`hxetqd
^P1STREET("IS","geleo","dqzz")
zzqd
^P1STREET("IS","geleo","draecd")
dceard
^P1STREET("IS","geleo","drbex")
xebrd
^P1STREET("IS","geleo","drebo")
oberd
^P1STREET("IS","geleo","drlid dypid")
dipyd dilrd
^P1STREET("IS","geleo","drtxepi")
ipextrd
^P1STREET("IS","geleo","drvn`ez")
ze`nvrd
^P1STREET("IS","geleo","drvneo")
oenvrd
^P1STREET("IS","geleo","drxad")
daxrd
^P1STREET("IS","geleo","dtexvim")
mivxetd
^P1STREET("IS","geleo","dthiy")
yihtd
^P1STREET("IS","geleo","dtlc")
cltd
^P1STREET("IS","geleo","dtln""g")
g"nltd
^P1STREET("IS","geleo","dtxcq")
qcxtd
^P1STREET("IS","geleo","dvetiz")
zitevd
^P1STREET("IS","geleo","dvexs")
sxevd
^P1STREET("IS","geleo","dviepez")
zepeivd
^P1STREET("IS","geleo","dvpgpim")
mipgpvd
^P1STREET("IS","geleo","dvtexo")
oxetvd
^P1STREET("IS","geleo","dvtixd")
dxitvd
^P1STREET("IS","geleo","dwenniez")
zeinnewd
^P1STREET("IS","geleo","dwepbxq")
qxbpewd
^P1STREET("IS","geleo","dwewid")
diwewd
^P1STREET("IS","geleo","dwlix `lirfx")
xfril` xilwd
^P1STREET("IS","geleo","dx dvetim")
mitevd xd
^P1STREET("IS","geleo","dx`eapi")
ipae`xd
^P1STREET("IS","geleo","dx`l")
l`xd
^P1STREET("IS","geleo","dxa a`fea cec")
cec aef`a axd
^P1STREET("IS","geleo","dxa dlei ivgw")
wgvi ield axd
^P1STREET("IS","geleo","dxa dxveb")
bevxd axd
^P1STREET("IS","geleo","dxa ivgw pqim")
miqp wgvi axd
^P1STREET("IS","geleo","dxa nineo")
oenin axd
^P1STREET("IS","geleo","dxa piqpa`em ivgw")
wgvi me`apqip axd
^P1STREET("IS","geleo","dxa wew")
wew axd
^P1STREET("IS","geleo","dxa wt`g")
g`tw axd
^P1STREET("IS","geleo","dxa xiipq")
qpiix axd
^P1STREET("IS","geleo","dxewnim")
minwexd
^P1STREET("IS","geleo","dxezm")
mzexd
^P1STREET("IS","geleo","dxineo")
oenixd
^P1STREET("IS","geleo","dxvl")
lvxd
^P1STREET("IS","geleo","dxvtlc")
cltvxd
^P1STREET("IS","geleo","dxwtz")
ztwxd
^P1STREET("IS","geleo","dxxi giim")
miig ixxd
^P1STREET("IS","geleo","dye`aim")
mia`eyd
^P1STREET("IS","geleo","dyenx")
xneyd
^P1STREET("IS","geleo","dyenxeo")
oexneyd
^P1STREET("IS","geleo","dyethim")
mihteyd
^P1STREET("IS","geleo","dygs")
sgyd
^P1STREET("IS","geleo","dygx")
xgyd
^P1STREET("IS","geleo","dyihd")
dhiyd
^P1STREET("IS","geleo","dyleg")
gelyd
^P1STREET("IS","geleo","dynix")
xinyd
^P1STREET("IS","geleo","dywnd")
dnwyd
^P1STREET("IS","geleo","dywp`i")
i`pwyd
^P1STREET("IS","geleo","dyx giim ytix`")
`xity miig xyd
^P1STREET("IS","geleo","dyxeo")
oexyd
^P1STREET("IS","geleo","dyxieo")
oeixyd
^P1STREET("IS","geleo","dz`pd")
dp`zd
^P1STREET("IS","geleo","dzaex")
xeazd
^P1STREET("IS","geleo","dzenx")
xnezd
^P1STREET("IS","geleo","dzex")
xezd
^P1STREET("IS","geleo","dzezgpim")
mipgzezd
^P1STREET("IS","geleo","dzgid")
digzd
^P1STREET("IS","geleo","dzp`im")
mi`pzd
^P1STREET("IS","geleo","dzrld")
dlrzd
^P1STREET("IS","geleo","dzwend")
dnewzd
^P1STREET("IS","geleo","eeltqeo cec")
cec oeqtlee
^P1STREET("IS","geleo","eelwpi ivgw")
wgvi ipwlee
^P1STREET("IS","geleo","eizwio")
oiwzie
^P1STREET("IS","geleo","elpaxb x`el")
le`x bxaple
^P1STREET("IS","geleo","exaexb")
bxeaxe
^P1STREET("IS","geleo","exc")
cxe
^P1STREET("IS","geleo","f'`o f'exq")
qxe'f o`'f
^P1STREET("IS","geleo","f`a f'aehipqwi")
iwqpihea'f a`f
^P1STREET("IS","geleo","faeleo")
oeleaf
^P1STREET("IS","geleo","fkxid")
dixkf
^P1STREET("IS","geleo","fkxid dxet`")
`texd dixkf
^P1STREET("IS","geleo","flno `xo")
ox` onlf
^P1STREET("IS","geleo","fnpdes")
sedpnf
^P1STREET("IS","geleo","fxeaal")
laaexf
^P1STREET("IS","geleo","ga""c")
c"ag
^P1STREET("IS","geleo","gaiad xiiw")
wiix daiag
^P1STREET("IS","geleo","gawew")
wewag
^P1STREET("IS","geleo","gaxeo")
oexag
^P1STREET("IS","geleo","gbi")
ibg
^P1STREET("IS","geleo","geaa")
aaeg
^P1STREET("IS","geleo","geaai vieo")
oeiv iaaeg
^P1STREET("IS","geleo","gend enbcl")
lcbne dneg
^P1STREET("IS","geleo","gfiz gny")
yng zifg
^P1STREET("IS","geleo","giim ax la")
al xa miig
^P1STREET("IS","geleo","giim eivno")
onvie miig
^P1STREET("IS","geleo","giim lqwea")
aewql miig
^P1STREET("IS","geleo","glu")
ulg
^P1STREET("IS","geleo","gpd qpy")
ypq dpg
^P1STREET("IS","geleo","gppid")
dippg
^P1STREET("IS","geleo","gqc`i")
i`cqg
^P1STREET("IS","geleo","gvxim")
mixvg
^P1STREET("IS","geleo","hdeo")
oedh
^P1STREET("IS","geleo","hyxpigeaqwi y`el")
le`y iwqaegipxyh
^P1STREET("IS","geleo","i""` a`cx")
xc`a `"i
^P1STREET("IS","geleo","i""l txu")
uxt l"i
^P1STREET("IS","geleo","i`ix")
xi`i
^P1STREET("IS","geleo","i`pey wexv'w")
w'vxew yep`i
^P1STREET("IS","geleo","iapd")
dpai
^P1STREET("IS","geleo","ib`l icio")
oici l`bi
^P1STREET("IS","geleo","ic lbeld")
dlebl ci
^P1STREET("IS","geleo","idecd dlei")
ield dcedi
^P1STREET("IS","geleo","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","geleo","ideyr gpwio")
oiwpg ryedi
^P1STREET("IS","geleo","ideyr xaipeaiu")
uiaepiax ryedi
^P1STREET("IS","geleo","ideyth")
htyedi
^P1STREET("IS","geleo","ie`a")
a`ei
^P1STREET("IS","geleo","ie`l")
l`ei
^P1STREET("IS","geleo","ieg`i ao peo")
oep oa i`gei
^P1STREET("IS","geleo","iehazd")
dzahei
^P1STREET("IS","geleo","iem dkitexim")
mixetikd mei
^P1STREET("IS","geleo","iepd")
dpei
^P1STREET("IS","geleo","iepzo")
ozpei
^P1STREET("IS","geleo","ieqs hxentlcex")
xecltnexh sqei
^P1STREET("IS","geleo","ieqs qxlio")
oilxq sqei
^P1STREET("IS","geleo","ieqs w`xe")
ex`w sqei
^P1STREET("IS","geleo","iezm")
mzei
^P1STREET("IS","geleo","igfw`l")
l`wfgi
^P1STREET("IS","geleo","il""b")
b"li
^P1STREET("IS","geleo","iqec dnrld")
dlrnd ceqi
^P1STREET("IS","geleo","irau f`a")
a`f uari
^P1STREET("IS","geleo","irl")
lri
^P1STREET("IS","geleo","itd `axdm")
mdxa` dti
^P1STREET("IS","geleo","itd `lirfx")
xfril` dti
^P1STREET("IS","geleo","ite")
eti
^P1STREET("IS","geleo","itzg")
gzti
^P1STREET("IS","geleo","ivgw xaio")
oiax wgvi
^P1STREET("IS","geleo","ivgw ycd")
dcy wgvi
^P1STREET("IS","geleo","iwezi`l `cm")
mc` l`izewi
^P1STREET("IS","geleo","ixige")
egixi
^P1STREET("IS","geleo","ixnide")
edinxi
^P1STREET("IS","geleo","iyride")
ediryi
^P1STREET("IS","geleo","iyx`l blili")
ililb l`xyi
^P1STREET("IS","geleo","iyx`l pb'`xd")
dx`'bp l`xyi
^P1STREET("IS","geleo","kdo nwq bqi")
iqb qwn odk
^P1STREET("IS","geleo","kkx a`xi")
ix`a xkk
^P1STREET("IS","geleo","kkx dyard")
drayd xkk
^P1STREET("IS","geleo","kkx eivno")
onvie xkk
^P1STREET("IS","geleo","kkx qhxend")
dnexhq xkk
^P1STREET("IS","geleo","kkx qixo")
oxiq xkk
^P1STREET("IS","geleo","klpiz")
ziplk
^P1STREET("IS","geleo","kpxz")
zxpk
^P1STREET("IS","geleo","ktx blrci")
icrlb xtk
^P1STREET("IS","geleo","legni dpba")
abpd ingel
^P1STREET("IS","geleo","leizo")
oziel
^P1STREET("IS","geleo","lg""i")
i"gl
^P1STREET("IS","geleo","lilipalem")
melapilil
^P1STREET("IS","geleo","liqio `axdm")
mdxa` oiqil
^P1STREET("IS","geleo","liyipqwi")
iwqpiyil
^P1STREET("IS","geleo","liypqwi")
iwqpyil
^P1STREET("IS","geleo","lkiy")
yikl
^P1STREET("IS","geleo","lpc`e giim")
miig e`cpl
^P1STREET("IS","geleo","lql txcippc")
cppicxt lql
^P1STREET("IS","geleo","navr qipi")
ipiq rvan
^P1STREET("IS","geleo","nbice")
ecibn
^P1STREET("IS","geleo","necirio")
oiricen
^P1STREET("IS","geleo","nedliax")
xailden
^P1STREET("IS","geleo","nehd bex")
xeb dhen
^P1STREET("IS","geleo","nelcz")
zclen
^P1STREET("IS","geleo","nelke")
eklen
^P1STREET("IS","geleo","nephitiexi")
ixeitihpen
^P1STREET("IS","geleo","nevwio")
oiwven
^P1STREET("IS","geleo","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","geleo","nf`""d")
d"`fn
^P1STREET("IS","geleo","nheld")
dlehn
^P1STREET("IS","geleo","nikd")
dkin
^P1STREET("IS","geleo","niy`l")
l`yin
^P1STREET("IS","geleo","nl`ki")
ik`ln
^P1STREET("IS","geleo","npcli nekx qtxim")
mixtq xken ilcpn
^P1STREET("IS","geleo","npeg")
gepn
^P1STREET("IS","geleo","npgm `eqiywio")
oiwyiqe` mgpn
^P1STREET("IS","geleo","npgm abio")
oiba mgpn
^P1STREET("IS","geleo","nqilz drelim")
milerd zliqn
^P1STREET("IS","geleo","nrepez im")
mi zepern
^P1STREET("IS","geleo","nrlez")
zelrn
^P1STREET("IS","geleo","ntxu ylnd")
dnly uxtn
^P1STREET("IS","geleo","nwed iyx`l")
l`xyi dewn
^P1STREET("IS","geleo","nwls nxcki")
ikcxn slwn
^P1STREET("IS","geleo","nxac dwqnim")
minqwd caxn
^P1STREET("IS","geleo","nxhio aeax")
xaea oihxn
^P1STREET("IS","geleo","nxim dpai`d")
d`iapd mixn
^P1STREET("IS","geleo","nxweaiu yxd")
dxy uiaewxn
^P1STREET("IS","geleo","nxweavwi")
iwvaewxn
^P1STREET("IS","geleo","ny' cx")
xc 'yn
^P1STREET("IS","geleo","ny' dacelg")
glecad 'yn
^P1STREET("IS","geleo","ny' dcx")
xcd 'yn
^P1STREET("IS","geleo","ny' dhetf")
ftehd 'yn
^P1STREET("IS","geleo","ny' didlem")
meldid 'yn
^P1STREET("IS","geleo","ny' dlym")
myld 'yn
^P1STREET("IS","geleo","ny' dqtixim")
mixitqd 'yn
^P1STREET("IS","geleo","ny' dtf")
ftd 'yn
^P1STREET("IS","geleo","ny' dyedm")
mdeyd 'yn
^P1STREET("IS","geleo","ny' dzxyiy")
yiyxzd 'yn
^P1STREET("IS","geleo","ny' rpax")
xapr 'yn
^P1STREET("IS","geleo","nyd dq")
qd dyn
^P1STREET("IS","geleo","nyd npclqeo")
oeqlcpn dyn
^P1STREET("IS","geleo","nyd qpd")
dpq dyn
^P1STREET("IS","geleo","nyd yxz")
zxy dyn
^P1STREET("IS","geleo","nynx dixco")
ocxid xnyn
^P1STREET("IS","geleo","pdxid")
dixdp
^P1STREET("IS","geleo","peaicaex")
xeaciaep
^P1STREET("IS","geleo","pexc`e")
e`cxep
^P1STREET("IS","geleo","pgem")
megp
^P1STREET("IS","geleo","pglz ylem")
mely zlgp
^P1STREET("IS","geleo","pgnid")
dingp
^P1STREET("IS","geleo","pgyeo")
oeygp
^P1STREET("IS","geleo","phx wxl")
lxw xhp
^P1STREET("IS","geleo","pil""i")
i"lip
^P1STREET("IS","geleo","pix rm")
mr xip
^P1STREET("IS","geleo","pq viepd")
dpeiv qp
^P1STREET("IS","geleo","pqpa`em")
me`apqp
^P1STREET("IS","geleo","ptg`")
`gtp
^P1STREET("IS","geleo","qaieo")
oeiaq
^P1STREET("IS","geleo","qewelea pgem")
megp aeleweq
^P1STREET("IS","geleo","qixpi giim")
miig ipxiq
^P1STREET("IS","geleo","qixwio")
oiwxiq
^P1STREET("IS","geleo","qn' piqpiz")
zipqip 'nq
^P1STREET("IS","geleo","qnelpqwio")
oiwqplenq
^P1STREET("IS","geleo","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","geleo","qtix")
xitq
^P1STREET("IS","geleo","reacid")
dicaer
^P1STREET("IS","geleo","refi pxwiq")
qiwxp ifer
^P1STREET("IS","geleo","refi`l")
l`ifer
^P1STREET("IS","geleo","rfx`")
`xfr
^P1STREET("IS","geleo","rfxid")
dixfr
^P1STREET("IS","geleo","rhxez")
zexhr
^P1STREET("IS","geleo","rio bci")
icb oir
^P1STREET("IS","geleo","rio ida")
adi oir
^P1STREET("IS","geleo","rneq")
qenr
^P1STREET("IS","geleo","rnipca")
acpinr
^P1STREET("IS","geleo","rnl")
lnr
^P1STREET("IS","geleo","rnw `ileo")
oeli` wnr
^P1STREET("IS","geleo","rnw cezo")
ozec wnr
^P1STREET("IS","geleo","rnw ifxr`l")
l`rxfi wnr
^P1STREET("IS","geleo","tceii dyai")
iayd iiect
^P1STREET("IS","geleo","ti`xaxb")
bxax`it
^P1STREET("IS","geleo","tiix wpib")
bipw xiit
^P1STREET("IS","geleo","tikno irwa")
awri onkit
^P1STREET("IS","geleo","tilcltid")
ditlclit
^P1STREET("IS","geleo","tipqwx")
xwqpit
^P1STREET("IS","geleo","tlexphio")
oihpxelt
^P1STREET("IS","geleo","tpgq `ileo")
oeli` qgpt
^P1STREET("IS","geleo","tpgq laeo")
oeal qgpt
^P1STREET("IS","geleo","txeb")
bext
^P1STREET("IS","geleo","txet' wleifpx")
xpfielw 'text
^P1STREET("IS","geleo","txet' yex")
xey 'text
^P1STREET("IS","geleo","txu axpyhiio")
oiihypxa uxt
^P1STREET("IS","geleo","txu belcyhiio")
oiihycleb uxt
^P1STREET("IS","geleo","tzg zwed")
dewz gzt
^P1STREET("IS","geleo","v")
v
^P1STREET("IS","geleo","v'lpea")
aepl'v
^P1STREET("IS","geleo","v`lim")
mil`v
^P1STREET("IS","geleo","vcew cec")
cec wecv
^P1STREET("IS","geleo","vtpid")
diptv
^P1STREET("IS","geleo","vtz")
ztv
^P1STREET("IS","geleo","vxrd")
drxv
^P1STREET("IS","geleo","wceyi alfo")
ofla iyecw
^P1STREET("IS","geleo","wceyi wdix")
xidw iyecw
^P1STREET("IS","geleo","wcno")
oncw
^P1STREET("IS","geleo","wdilz eilp`")
`plie zlidw
^P1STREET("IS","geleo","wdilz exyd")
dyxe zlidw
^P1STREET("IS","geleo","wedlz")
zldew
^P1STREET("IS","geleo","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","geleo","wlenl")
lnelw
^P1STREET("IS","geleo","wlenx n`ix")
xi`n xnelw
^P1STREET("IS","geleo","wliyx")
xyilw
^P1STREET("IS","geleo","wtlo `lirfx")
xfril` oltw
^P1STREET("IS","geleo","wtlpqwi ylnd")
dnly iwqpltw
^P1STREET("IS","geleo","wvix `dxeo")
oexd` xivw
^P1STREET("IS","geleo","wvplqeo ivgw")
wgvi oeqlpvw
^P1STREET("IS","geleo","wx`efd")
dfe`xw
^P1STREET("IS","geleo","wxiizi")
iziixw
^P1STREET("IS","geleo","wxiz ynepd")
dpeny zixw
^P1STREET("IS","geleo","wxo diqec")
ceqid oxw
^P1STREET("IS","geleo","wxo wiinz liyx`l")
l`xyil zniiw oxw
^P1STREET("IS","geleo","x`y tipd")
dpit y`x
^P1STREET("IS","geleo","x`yeo lvieo")
oeivl oey`x
^P1STREET("IS","geleo","xai rwia`")
`aiwr iax
^P1STREET("IS","geleo","xawd beax")
xaeb dwax
^P1STREET("IS","geleo","xehyilc")
cliyhex
^P1STREET("IS","geleo","xennd")
dnnex
^P1STREET("IS","geleo","xetio `xzex")
xezx` oitex
^P1STREET("IS","geleo","xezx eelhx")
xhlee xzex
^P1STREET("IS","geleo","xg h")
h gx
^P1STREET("IS","geleo","xg' k""`")
`"k 'gx
^P1STREET("IS","geleo","xg' k""a")
a"k 'gx
^P1STREET("IS","geleo","xg' k""b")
b"k 'gx
^P1STREET("IS","geleo","xg' k""c")
c"k 'gx
^P1STREET("IS","geleo","xg' k""d")
d"k 'gx
^P1STREET("IS","geleo","xg' k""e")
e"k 'gx
^P1STREET("IS","geleo","xg' k""f")
f"k 'gx
^P1STREET("IS","geleo","xg' k'")
'k 'gx
^P1STREET("IS","geleo","xgarm f`ai")
ia`f mragx
^P1STREET("IS","geleo","xgl")
lgx
^P1STREET("IS","geleo","xipblalem")
melalbpix
^P1STREET("IS","geleo","xna""m")
m"anx
^P1STREET("IS","geleo","xnf cec")
cec fnx
^P1STREET("IS","geleo","xng""l")
l"gnx
^P1STREET("IS","geleo","xnz dbelo")
olebd znx
^P1STREET("IS","geleo","xy""i")
i"yx
^P1STREET("IS","geleo","y""i rbpeo")
oepbr i"y
^P1STREET("IS","geleo","y""u vai")
iav u"y
^P1STREET("IS","geleo","y`lzi`l")
l`izl`y
^P1STREET("IS","geleo","yafi ylem")
mely ifay
^P1STREET("IS","geleo","yahd")
dhay
^P1STREET("IS","geleo","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","geleo","yc""l")
l"cy
^P1STREET("IS","geleo","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","geleo","yc' ca def")
fed ac 'cy
^P1STREET("IS","geleo","yc' ieqthl")
lhtqei 'cy
^P1STREET("IS","geleo","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","geleo","yc' lei `ykel")
leky` iel 'cy
^P1STREET("IS","geleo","yc' webl giim")
miig lbew 'cy
^P1STREET("IS","geleo","ycd aewx")
xwea dcy
^P1STREET("IS","geleo","yegh iyx`l enpid")
dipne l`xyi hgey
^P1STREET("IS","geleo","yhxew dxno")
onxd wexhy
^P1STREET("IS","geleo","yiaz vieo")
oeiv zaiy
^P1STREET("IS","geleo","yitx ivgw")
wgvi xtiy
^P1STREET("IS","geleo","ykhx ynreo")
oerny xhky
^P1STREET("IS","geleo","ylem rlikm")
mkilr mely
^P1STREET("IS","geleo","yne`l")
l`eny
^P1STREET("IS","geleo","yne`l dpbic")
cibpd l`eny
^P1STREET("IS","geleo","yne`l iapi`li")
il`ipai l`eny
^P1STREET("IS","geleo","ynexw")
wxeny
^P1STREET("IS","geleo","ynix")
xiny
^P1STREET("IS","geleo","ynrepi")
iperny
^P1STREET("IS","geleo","ynrid")
dirny
^P1STREET("IS","geleo","ynxide leio")
oiel edixny
^P1STREET("IS","geleo","ynyeo")
oeyny
^P1STREET("IS","geleo","ypwx `xid")
dix` xwpy
^P1STREET("IS","geleo","yrx d`xiez")
zeix`d xry
^P1STREET("IS","geleo","yrx dbi`")
`ibd xry
^P1STREET("IS","geleo","yrx dtxgim")
migxtd xry
^P1STREET("IS","geleo","yrx vieo")
oeiv xry
^P1STREET("IS","geleo","ytix` giim nyd")
dyn miig `xity
^P1STREET("IS","geleo","ytix` vai")
iav `xity
^P1STREET("IS","geleo","ytxipvw ieqs")
sqei wvpixty
^P1STREET("IS","geleo","ywp`i")
i`pwy
^P1STREET("IS","geleo","yyz dinim")
minid zyy
^P1STREET("IS","geleo","zl gi")
ig lz
^P1STREET("IS","geleo","znpr")
rpnz
^P1STREET("IS","geleo","zxv""e")
e"vxz
^P1STREET("IS","geleo","zyg")
gyz
^P1STREET("IS","gelzd")
dzleg
^P1STREET("IS","getiz")
ziteg
^P1STREET("IS","getiz","`lneb")
benl`
^P1STREET("IS","getiz","`wlitheq")
qehtilw`
^P1STREET("IS","getiz","dvcs")
scvd
^P1STREET("IS","getiz","keka dim")
mid akek
^P1STREET("IS","getiz","nexc dpgl")
lgpd cxen
^P1STREET("IS","getiz","qpepiz")
zipepq
^P1STREET("IS","getiz","yepiz")
zipey
^P1STREET("IS","getiz","ygs")
sgy
^P1STREET("IS","getiz","ylcb")
bcly
^P1STREET("IS","gewew")
weweg
^P1STREET("IS","gexd")
dxeg
^P1STREET("IS","gexd","iqnio")
oinqi
^P1STREET("IS","gexyim")
miyxeg
^P1STREET("IS","giaz vieo")
oeiv zaig
^P1STREET("IS","giaz vieo","nbyinim")
miniybn
^P1STREET("IS","gitd")
dtig
^P1STREET("IS","gitd","`""c bexceo")
oecxeb c"`
^P1STREET("IS","gitd","`.qlh")
hlq.`
^P1STREET("IS","gitd","`a` dll qilax")
xaliq lld `a`
^P1STREET("IS","gitd","`acini")
inica`
^P1STREET("IS","gitd","`aibcex dn`ixi")
ixi`nd xecbia`
^P1STREET("IS","gitd","`aibcex ryz")
zyr xecbia`
^P1STREET("IS","gitd","`aibil")
libia`
^P1STREET("IS","gitd","`aix nxw")
wxn xia`
^P1STREET("IS","gitd","`ao `l newtr")
rtwen l` oa`
^P1STREET("IS","gitd","`ao baixel")
lexiab oa`
^P1STREET("IS","gitd","`ao qip`")
`piq oa`
^P1STREET("IS","gitd","`ao rfx`")
`xfr oa`
^P1STREET("IS","gitd","`ao xeyc")
cyex oa`
^P1STREET("IS","gitd","`apx")
xpa`
^P1STREET("IS","gitd","`axap`l")
l`paxa`
^P1STREET("IS","gitd","`axdm eiipyl")
lypiie mdxa`
^P1STREET("IS","gitd","`axdm qkpio")
oipkq mdxa`
^P1STREET("IS","gitd","`axdm wxia")
aixw mdxa`
^P1STREET("IS","gitd","`axdm ylepqwi")
iwqpely mdxa`
^P1STREET("IS","gitd","`aylem")
melya`
^P1STREET("IS","gitd","`bef")
feb`
^P1STREET("IS","gitd","`bneo")
oenb`
^P1STREET("IS","gitd","`cm dkdo")
odkd mc`
^P1STREET("IS","gitd","`cnepc tlb")
blt cpenc`
^P1STREET("IS","gitd","`daz iyx`l")
l`xyi zad`
^P1STREET("IS","gitd","`daz vieo")
oeiv zad`
^P1STREET("IS","gitd","`dec")
ced`
^P1STREET("IS","gitd","`dxepqeo")
oeqpexd`
^P1STREET("IS","gitd","`egpd pqim")
miqp dpge`
^P1STREET("IS","gitd","`elitph")
hptile`
^P1STREET("IS","gitd","`enid")
dine`
^P1STREET("IS","gitd","`eqwx yipclx")
xlcpiy xwqe`
^P1STREET("IS","gitd","`etix")
xite`
^P1STREET("IS","gitd","`ex dgiim")
miigd xe`
^P1STREET("IS","gitd","`exaj `lide")
edil` jaxe`
^P1STREET("IS","gitd","`exh")
hxe`
^P1STREET("IS","gitd","`exi vai bxipaxb")
bxapixb iav ixe`
^P1STREET("IS","gitd","`exi`l yleo")
oely l`ixe`
^P1STREET("IS","gitd","`exiio n`ix")
xi`n oiixe`
^P1STREET("IS","gitd","`exo")
oxe`
^P1STREET("IS","gitd","`eyd")
dye`
^P1STREET("IS","gitd","`f""x")
x"f`
^P1STREET("IS","gitd","`fel`i irwa")
awri i`lef`
^P1STREET("IS","gitd","`ffnkyxi")
ixyknff`
^P1STREET("IS","gitd","`gc drm")
mrd cg`
^P1STREET("IS","gitd","`ged")
deg`
^P1STREET("IS","gitd","`gf")
fg`
^P1STREET("IS","gitd","`hebx`i")
i`xbeh`
^P1STREET("IS","gitd","`icx")
xci`
^P1STREET("IS","gitd","`ihlid")
dilhi`
^P1STREET("IS","gitd","`ileo")
oeli`
^P1STREET("IS","gitd","`ilez")
zeli`
^P1STREET("IS","gitd","`ilpez")
zepli`
^P1STREET("IS","gitd","`ilz")
zli`
^P1STREET("IS","gitd","`inax ptzli")
ilztp xani`
^P1STREET("IS","gitd","`iphxpviepl")
lpeivpxhpi`
^P1STREET("IS","gitd","`ipyhio")
oihypi`
^P1STREET("IS","gitd","`ivweaiu")
uiaewvi`
^P1STREET("IS","gitd","`ixiq")
qixi`
^P1STREET("IS","gitd","`ixo")
oxi`
^P1STREET("IS","gitd","`izpim")
mipzi`
^P1STREET("IS","gitd","`l `cxiqi")
iqixc` l`
^P1STREET("IS","gitd","`l `qtdpi")
ipdtq` l`
^P1STREET("IS","gitd","`l aekzexi")
ixezkea l`
^P1STREET("IS","gitd","`l bf`li")
il`fb l`
^P1STREET("IS","gitd","`l dil`l")
l`lid l`
^P1STREET("IS","gitd","`l gxixi")
ixixg l`
^P1STREET("IS","gitd","`l kpq`")
`qpk l`
^P1STREET("IS","gitd","`l nedci")
icden l`
^P1STREET("IS","gitd","`l newt`")
`twen l`
^P1STREET("IS","gitd","`l nexipd")
dpixen l`
^P1STREET("IS","gitd","`l nezpai")
iapzen l`
^P1STREET("IS","gitd","`l nrxi")
ixrn l`
^P1STREET("IS","gitd","`l rxiy")
yixr l`
^P1STREET("IS","gitd","`l rziwd")
dwizr l`
^P1STREET("IS","gitd","`l tx`ai")
ia`xt l`
^P1STREET("IS","gitd","`li kdo")
odk il`
^P1STREET("IS","gitd","`lide dpai`")
`iapd edil`
^P1STREET("IS","gitd","`lide gkim")
mikg edil`
^P1STREET("IS","gitd","`lieh")
heil`
^P1STREET("IS","gitd","`lirfx `lzx")
xzl` xfril`
^P1STREET("IS","gitd","`lirfx aepd")
dpea xfril`
^P1STREET("IS","gitd","`liyar wtlo")
oltw rayil`
^P1STREET("IS","gitd","`liyr")
ryil`
^P1STREET("IS","gitd","`lkqpcx ip`i")
i`pi xcpqkl`
^P1STREET("IS","gitd","`ltqi")
iqtl`
^P1STREET("IS","gitd","`lwlri")
irlwl`
^P1STREET("IS","gitd","`nd lfxeq")
qexfl dn`
^P1STREET("IS","gitd","`nepd")
dpen`
^P1STREET("IS","gitd","`nil fel`")
`lef lin`
^P1STREET("IS","gitd","`nix")
xin`
^P1STREET("IS","gitd","`npeo")
oepn`
^P1STREET("IS","gitd","`npeo eznx")
xnze oepn`
^P1STREET("IS","gitd","`nt`")
`tn`
^P1STREET("IS","gitd","`pcd rnix")
xinr dcp`
^P1STREET("IS","gitd","`pcxi qgxea")
aexgq ixcp`
^P1STREET("IS","gitd","`pd txpw")
wpxt dp`
^P1STREET("IS","gitd","`pheexto")
otxeehp`
^P1STREET("IS","gitd","`pi n`nio")
oin`n ip`
^P1STREET("IS","gitd","`pilaiu'")
'uialip`
^P1STREET("IS","gitd","`pv'e qixpi")
ipxiq e'vp`
^P1STREET("IS","gitd","`qs cec")
cec sq`
^P1STREET("IS","gitd","`v""l")
l"v`
^P1STREET("IS","gitd","`wqeceq")
qeceqw`
^P1STREET("IS","gitd","`xbno")
onbx`
^P1STREET("IS","gitd","`xid celvio")
oivlec dix`
^P1STREET("IS","gitd","`xlefexea")
aexefelx`
^P1STREET("IS","gitd","`xpeo")
oepx`
^P1STREET("IS","gitd","`xu dvai")
iavd ux`
^P1STREET("IS","gitd","`ykelez")
zeleky`
^P1STREET("IS","gitd","`yx")
xy`
^P1STREET("IS","gitd","`zbx")
xbz`
^P1STREET("IS","gitd","a`al ivgw")
wgvi la`a
^P1STREET("IS","gitd","a`x")
x`a
^P1STREET("IS","gitd","aecpdiinx")
xniidpcea
^P1STREET("IS","gitd","aeql ieqs")
sqei lqea
^P1STREET("IS","gitd","aerf")
frea
^P1STREET("IS","gitd","aexekea")
aekexea
^P1STREET("IS","gitd","aexl` idecd")
dcedi `lxea
^P1STREET("IS","gitd","ai`liw")
wil`ia
^P1STREET("IS","gitd","aiiliq npgm")
mgpn qiliia
^P1STREET("IS","gitd","ail""e")
e"lia
^P1STREET("IS","gitd","aildxu")
uxdlia
^P1STREET("IS","gitd","ailipqeo")
oeqpilia
^P1STREET("IS","gitd","aix `l ifiw")
wifi l` xia
^P1STREET("IS","gitd","aiz `l")
l` zia
^P1STREET("IS","gitd","aiz lgm")
mgl zia
^P1STREET("IS","gitd","aiz y`o")
o`y zia
^P1STREET("IS","gitd","aiz""x")
x"zia
^P1STREET("IS","gitd","akexim")
mixeka
^P1STREET("IS","gitd","al `lkqpcx bxdm")
mdxb xcpqkl` la
^P1STREET("IS","gitd","aldd")
ddla
^P1STREET("IS","gitd","alej")
jela
^P1STREET("IS","gitd","alihphl")
lhphila
^P1STREET("IS","gitd","altex")
xetla
^P1STREET("IS","gitd","anqild")
dliqna
^P1STREET("IS","gitd","ao `xvi")
ivx` oa
^P1STREET("IS","gitd","ao aa`")
`aa oa
^P1STREET("IS","gitd","ao fk`i")
i`kf oa
^P1STREET("IS","gitd","ao idecd")
dcedi oa
^P1STREET("IS","gitd","ao rcid")
dicr oa
^P1STREET("IS","gitd","ao rni")
inr oa
^P1STREET("IS","gitd","ao vex")
xev oa
^P1STREET("IS","gitd","ao vieo")
oeiv oa
^P1STREET("IS","gitd","ao yaz")
zay oa
^P1STREET("IS","gitd","ao yno")
ony oa
^P1STREET("IS","gitd","api axiz")
zixa ipa
^P1STREET("IS","gitd","aqxd")
dxqa
^P1STREET("IS","gitd","arl ym hea")
aeh my lra
^P1STREET("IS","gitd","arli nl`kd")
dk`ln ilra
^P1STREET("IS","gitd","avl`l")
l`lva
^P1STREET("IS","gitd","ax `ilo")
oli` xa
^P1STREET("IS","gitd","ax biex`")
`xeib xa
^P1STREET("IS","gitd","ax ieg`i")
i`gei xa
^P1STREET("IS","gitd","ax keka`")
`akek xa
^P1STREET("IS","gitd","axeelc")
cleexa
^P1STREET("IS","gitd","axexid")
dixexa
^P1STREET("IS","gitd","axfili")
ilifxa
^P1STREET("IS","gitd","axl kvplqeo")
oeqlpvk lxa
^P1STREET("IS","gitd","axpciq")
qicpxa
^P1STREET("IS","gitd","axpx")
xpxa
^P1STREET("IS","gitd","axpyhiio txu")
uxt oiihypxa
^P1STREET("IS","gitd","ayo")
oya
^P1STREET("IS","gitd","az go")
og za
^P1STREET("IS","gitd","azi qekpez")
zepkeq iza
^P1STREET("IS","gitd","b'iinq ee`h")
h`ee qnii'b
^P1STREET("IS","gitd","b'lnd")
dnl'b
^P1STREET("IS","gitd","b`eld")
dle`b
^P1STREET("IS","gitd","b`eli zino")
oniz ile`b
^P1STREET("IS","gitd","bareo")
oerab
^P1STREET("IS","gitd","barz `expim")
mipxe` zrab
^P1STREET("IS","gitd","barz c`epq")
qpe`c zrab
^P1STREET("IS","gitd","barz rneq")
qenr zrab
^P1STREET("IS","gitd","bclide")
edilcb
^P1STREET("IS","gitd","bcp""r")
r"pcb
^P1STREET("IS","gitd","bcreo")
oercb
^P1STREET("IS","gitd","beh leio")
oiel heb
^P1STREET("IS","gitd","behlia yenkx")
xkney ailheb
^P1STREET("IS","gitd","belcd n`ix")
xi`n dcleb
^P1STREET("IS","gitd","belcno")
oncleb
^P1STREET("IS","gitd","belena `lide")
edil` aneleb
^P1STREET("IS","gitd","bex idecd")
dcedi xeb
^P1STREET("IS","gitd","bexq")
qxeb
^P1STREET("IS","gitd","bey gla")
alg yeb
^P1STREET("IS","gitd","bey rvieo")
oeivr yeb
^P1STREET("IS","gitd","bf`l")
l`fb
^P1STREET("IS","gitd","biaexi bhe exyd")
dyxe ehb ixeaib
^P1STREET("IS","gitd","bicim")
micib
^P1STREET("IS","gitd","biex` ieqthl")
lhtqei `xeib
^P1STREET("IS","gitd","bixpi")
ipxib
^P1STREET("IS","gitd","bl`l `l cio")
oic l` l`lb
^P1STREET("IS","gitd","blaer")
realb
^P1STREET("IS","gitd","blbl")
lblb
^P1STREET("IS","gitd","bpqio")
oiqpb
^P1STREET("IS","gitd","bxipaeim ivgw")
wgvi mieapixb
^P1STREET("IS","gitd","bz")
zb
^P1STREET("IS","gitd","c""x aixm")
mxia x"c
^P1STREET("IS","gitd","c""x finpd pgem")
megp dpnif x"c
^P1STREET("IS","gitd","c""x iepd `pbl")
lbp` dpei x"c
^P1STREET("IS","gitd","c""x nik`l lpc`e")
e`cpl l`kin x"c
^P1STREET("IS","gitd","c""x vitx")
xtiv x"c
^P1STREET("IS","gitd","c""x wxtl lit`")
`til ltxw x"c
^P1STREET("IS","gitd","c""x yinwio pgem")
megp oiwniy x"c
^P1STREET("IS","gitd","c""x yleqaxb yne`l")
l`eny bxaqely x"c
^P1STREET("IS","gitd","ca txenx")
xnext ac
^P1STREET("IS","gitd","caexd")
dxeac
^P1STREET("IS","gitd","cbpid")
dipbc
^P1STREET("IS","gitd","ceapea")
aepaec
^P1STREET("IS","gitd","ceaxio pgem")
megp oixaec
^P1STREET("IS","gitd","cec `lrfx")
xfrl` cec
^P1STREET("IS","gitd","cec ax xa d`i")
i`d ax xa cec
^P1STREET("IS","gitd","cec dnlj")
jlnd cec
^P1STREET("IS","gitd","cec tipqwi")
iwqpit cec
^P1STREET("IS","gitd","cekitz")
ztikec
^P1STREET("IS","gitd","ceqhxeaqwi `lirfx")
xfril` iwqaexhqec
^P1STREET("IS","gitd","cexez")
zexec
^P1STREET("IS","gitd","ciyx`li")
il`xyic
^P1STREET("IS","gitd","cld")
dlc
^P1STREET("IS","gitd","cpi`l")
l`ipc
^P1STREET("IS","gitd","cpid")
dipc
^P1STREET("IS","gitd","ctpd")
dptc
^P1STREET("IS","gitd","cxex")
xexc
^P1STREET("IS","gitd","cxiiteq")
qetiixc
^P1STREET("IS","gitd","cxj `lpai")
iapl` jxc
^P1STREET("IS","gitd","cxj ax idecd")
dcedi xa jxc
^P1STREET("IS","gitd","cxj d`xard")
drax`d jxc
^P1STREET("IS","gitd","cxj dim")
mid jxc
^P1STREET("IS","gitd","cxj drvn`ez")
ze`nvrd jxc
^P1STREET("IS","gitd","cxj gitd")
dtig jxc
^P1STREET("IS","gitd","cxj gpwio")
oiwpg jxc
^P1STREET("IS","gitd","cxj ic lapim")
mipal ci jxc
^P1STREET("IS","gitd","cxj ielieq qineo")
oeniq qeilei jxc
^P1STREET("IS","gitd","cxj ite")
eti jxc
^P1STREET("IS","gitd","cxj qhld nxiq")
qixn dlhq jxc
^P1STREET("IS","gitd","cxj rke")
ekr jxc
^P1STREET("IS","gitd","cxj vxtz")
ztxv jxc
^P1STREET("IS","gitd","cxj xetio")
oitex jxc
^P1STREET("IS","gitd","cxj yngd belo")
oleb dgny jxc
^P1STREET("IS","gitd","d`b")
b`d
^P1STREET("IS","gitd","d`e""m")
m"e`d
^P1STREET("IS","gitd","d`ihlwim")
miwlhi`d
^P1STREET("IS","gitd","d`ivhcieo")
oeichvi`d
^P1STREET("IS","gitd","d`ld")
dl`d
^P1STREET("IS","gitd","d`leo")
oel`d
^P1STREET("IS","gitd","d`ntxi ieaxh")
hxaei ixtn`d
^P1STREET("IS","gitd","d`qis")
siq`d
^P1STREET("IS","gitd","d`x""i")
i"x`d
^P1STREET("IS","gitd","d`xal")
lax`d
^P1STREET("IS","gitd","d`xfim")
mifx`d
^P1STREET("IS","gitd","d`ygx")
xgy`d
^P1STREET("IS","gitd","d`yl")
ly`d
^P1STREET("IS","gitd","d`ylb")
bly`d
^P1STREET("IS","gitd","daepim dgetyiim")
miiytegd mipead
^P1STREET("IS","gitd","dapim")
mipad
^P1STREET("IS","gitd","dapwim")
miwpad
^P1STREET("IS","gitd","daqhilid")
dilihqad
^P1STREET("IS","gitd","daxeo dixy")
yxid oexad
^P1STREET("IS","gitd","daxeyim")
miyexad
^P1STREET("IS","gitd","daxikd")
dkixad
^P1STREET("IS","gitd","dayex")
xeyad
^P1STREET("IS","gitd","db`epim")
mipe`bd
^P1STREET("IS","gitd","dbaexd")
dxeabd
^P1STREET("IS","gitd","dbcec draxi")
ixard cecbd
^P1STREET("IS","gitd","dbiaexim")
mixeaibd
^P1STREET("IS","gitd","dblil")
lilbd
^P1STREET("IS","gitd","dbpim")
mipbd
^P1STREET("IS","gitd","dbto")
otbd
^P1STREET("IS","gitd","dcela")
alecd
^P1STREET("IS","gitd","dciibim")
mibiicd
^P1STREET("IS","gitd","dcqim")
miqcd
^P1STREET("IS","gitd","dcwl")
lwcd
^P1STREET("IS","gitd","dcwlim")
milwcd
^P1STREET("IS","gitd","dcx")
xcd
^P1STREET("IS","gitd","dcypim")
mipycd
^P1STREET("IS","gitd","ddbd")
dbdd
^P1STREET("IS","gitd","deaxno axepiqla")
alqipexa onxaed
^P1STREET("IS","gitd","debe eiwhex")
xehwie ebed
^P1STREET("IS","gitd","deiqnpq wnil")
linw qpnqied
^P1STREET("IS","gitd","delpc")
cpled
^P1STREET("IS","gitd","dexcim")
micxed
^P1STREET("IS","gitd","deziwim")
miwized
^P1STREET("IS","gitd","dfbb")
bbfd
^P1STREET("IS","gitd","dfiz")
zifd
^P1STREET("IS","gitd","dges dywh")
hwyd segd
^P1STREET("IS","gitd","dgezxim")
mixzegd
^P1STREET("IS","gitd","dgi""l")
l"igd
^P1STREET("IS","gitd","dgihd")
dhigd
^P1STREET("IS","gitd","dgippiz")
zippigd
^P1STREET("IS","gitd","dgleu")
uelgd
^P1STREET("IS","gitd","dgwl`im")
mi`lwgd
^P1STREET("IS","gitd","dgxny")
ynxgd
^P1STREET("IS","gitd","dgynep`im")
mi`penygd
^P1STREET("IS","gitd","dgynl")
lnygd
^P1STREET("IS","gitd","dhia")
aihd
^P1STREET("IS","gitd","dhp`")
`phd
^P1STREET("IS","gitd","dieal")
laeid
^P1STREET("IS","gitd","dievw")
wveid
^P1STREET("IS","gitd","diipd diipxij")
jixpiid dpiid
^P1STREET("IS","gitd","dixco")
ocxid
^P1STREET("IS","gitd","dixew")
wexid
^P1STREET("IS","gitd","dixnej")
jenxid
^P1STREET("IS","gitd","dixweo")
oewxid
^P1STREET("IS","gitd","dk""b")
b"kd
^P1STREET("IS","gitd","dkcxim")
mixckd
^P1STREET("IS","gitd","dkpqiez")
zeiqpkd
^P1STREET("IS","gitd","dkxkenim")
minekxkd
^P1STREET("IS","gitd","dkyxz diyea")
aeyid zxykd
^P1STREET("IS","gitd","dlapd")
dpald
^P1STREET("IS","gitd","dliapd")
dpaild
^P1STREET("IS","gitd","dlilj")
jlild
^P1STREET("IS","gitd","dll")
lld
^P1STREET("IS","gitd","dnelcz")
zclend
^P1STREET("IS","gitd","dneqkim")
mikqend
^P1STREET("IS","gitd","dngpj ptgd")
dgtp jpgnd
^P1STREET("IS","gitd","dnim")
mind
^P1STREET("IS","gitd","dninepi")
ipenind
^P1STREET("IS","gitd","dnkq")
qknd
^P1STREET("IS","gitd","dnl`kd")
dk`lnd
^P1STREET("IS","gitd","dnlj `nvide")
edivn` jlnd
^P1STREET("IS","gitd","dnlj `q`")
`q` jlnd
^P1STREET("IS","gitd","dnlj gfwide")
ediwfg jlnd
^P1STREET("IS","gitd","dnlj ide`y")
y`edi jlnd
^P1STREET("IS","gitd","dnlj ideyth")
htyedi jlnd
^P1STREET("IS","gitd","dnlj refide")
edifer jlnd
^P1STREET("IS","gitd","dnlj y`el")
le`y jlnd
^P1STREET("IS","gitd","dnlj ylnd")
dnly jlnd
^P1STREET("IS","gitd","dnlkd `qzx")
xzq` dklnd
^P1STREET("IS","gitd","dnlkim")
miklnd
^P1STREET("IS","gitd","dnqbx")
xbqnd
^P1STREET("IS","gitd","dnqexz")
zxeqnd
^P1STREET("IS","gitd","dnqild")
dliqnd
^P1STREET("IS","gitd","dnrlez")
zelrnd
^P1STREET("IS","gitd","dnrtilim")
militrnd
^P1STREET("IS","gitd","dnxepizim")
mizipexnd
^P1STREET("IS","gitd","dnyaix")
xiaynd
^P1STREET("IS","gitd","dnyhxd")
dxhynd
^P1STREET("IS","gitd","dp`npim")
mipn`pd
^P1STREET("IS","gitd","dpai`im")
mi`iapd
^P1STREET("IS","gitd","dpba")
abpd
^P1STREET("IS","gitd","dpbic")
cibpd
^P1STREET("IS","gitd","dpehx")
xhepd
^P1STREET("IS","gitd","dpetx")
xtepd
^P1STREET("IS","gitd","dpfixez")
zexifpd
^P1STREET("IS","gitd","dphwd")
dwhpd
^P1STREET("IS","gitd","dpnl")
lnpd
^P1STREET("IS","gitd","dptg")
gtpd
^P1STREET("IS","gitd","dpth")
htpd
^P1STREET("IS","gitd","dpvi""a")
a"ivpd
^P1STREET("IS","gitd","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","gitd","dpxij dxu")
uxd jixpd
^P1STREET("IS","gitd","dpxwiqim")
miqiwxpd
^P1STREET("IS","gitd","dpyx")
xypd
^P1STREET("IS","gitd","dq")
qd
^P1STREET("IS","gitd","dqaiepim")
mipeiaqd
^P1STREET("IS","gitd","dqcpd")
dpcqd
^P1STREET("IS","gitd","dqgla")
algqd
^P1STREET("IS","gitd","dqiito")
otiiqd
^P1STREET("IS","gitd","dqlr")
rlqd
^P1STREET("IS","gitd","dqpd")
dpqd
^P1STREET("IS","gitd","dqtexh")
hxetqd
^P1STREET("IS","gitd","drebo")
oberd
^P1STREET("IS","gitd","drlid dypid")
dipyd dilrd
^P1STREET("IS","gitd","drnlim")
milnrd
^P1STREET("IS","gitd","drnw")
wnrd
^P1STREET("IS","gitd","drxnepim")
mipenxrd
^P1STREET("IS","gitd","drzic")
cizrd
^P1STREET("IS","gitd","dterl")
lretd
^P1STREET("IS","gitd","dthxid")
dixhtd
^P1STREET("IS","gitd","dtxgim")
migxtd
^P1STREET("IS","gitd","dtxhifpim")
mipfihxtd
^P1STREET("IS","gitd","dtxqim")
miqxtd
^P1STREET("IS","gitd","dvellz cwx")
xwc zllevd
^P1STREET("IS","gitd","dvetim")
mitevd
^P1STREET("IS","gitd","dvlapim")
mipalvd
^P1STREET("IS","gitd","dvltim")
mitlvd
^P1STREET("IS","gitd","dvtixd")
dxitvd
^P1STREET("IS","gitd","dwepbxq")
qxbpewd
^P1STREET("IS","gitd","dwexpq")
qpxewd
^P1STREET("IS","gitd","dwhx")
xhwd
^P1STREET("IS","gitd","dwiaevim")
miveaiwd
^P1STREET("IS","gitd","dwihex")
xehiwd
^P1STREET("IS","gitd","dwiyeo")
oeyiwd
^P1STREET("IS","gitd","dwlrim")
mirlwd
^P1STREET("IS","gitd","dwyz")
zywd
^P1STREET("IS","gitd","dx`l")
l`xd
^P1STREET("IS","gitd","dx`yepim")
mipey`xd
^P1STREET("IS","gitd","dxa `pw`ed")
de`wp` axd
^P1STREET("IS","gitd","dxa `pw`eed")
dee`wp` axd
^P1STREET("IS","gitd","dxa `qs")
sq` axd
^P1STREET("IS","gitd","dxa dxveb")
bevxd axd
^P1STREET("IS","gitd","dxa glteo")
oetlg axd
^P1STREET("IS","gitd","dxa klteo")
oetlk axd
^P1STREET("IS","gitd","dxa leio `xid")
dix` oiel axd
^P1STREET("IS","gitd","dxa ny`y")
y`yn axd
^P1STREET("IS","gitd","dxa wpi`l")
l`ipw axd
^P1STREET("IS","gitd","dxa xeaipyhiio")
oiihypiaex axd
^P1STREET("IS","gitd","dxa xecpx")
xpcex axd
^P1STREET("IS","gitd","dxa xiipq")
qpiix axd
^P1STREET("IS","gitd","dxa ylem yxrai")
iarxy mely axd
^P1STREET("IS","gitd","dxces")
secxd
^P1STREET("IS","gitd","dxeo `l xyic")
ciyx l` oexd
^P1STREET("IS","gitd","dxet`")
`texd
^P1STREET("IS","gitd","dxezm")
mzexd
^P1STREET("IS","gitd","dxis")
sixd
^P1STREET("IS","gitd","dxno")
onxd
^P1STREET("IS","gitd","dxvl")
lvxd
^P1STREET("IS","gitd","dxvlid")
dilvxd
^P1STREET("IS","gitd","dyehx")
xheyd
^P1STREET("IS","gitd","dyenx")
xneyd
^P1STREET("IS","gitd","dyeypim")
mipyeyd
^P1STREET("IS","gitd","dygs")
sgyd
^P1STREET("IS","gitd","dygx")
xgyd
^P1STREET("IS","gitd","dyifs")
sfiyd
^P1STREET("IS","gitd","dyihd")
dhiyd
^P1STREET("IS","gitd","dyiixd")
dxiiyd
^P1STREET("IS","gitd","dyleg")
gelyd
^P1STREET("IS","gitd","dylem")
melyd
^P1STREET("IS","gitd","dypda")
adpyd
^P1STREET("IS","gitd","dywcim")
micwyd
^P1STREET("IS","gitd","dyx yihxiz")
zixhiy xyd
^P1STREET("IS","gitd","dyxeo")
oexyd
^P1STREET("IS","gitd","dz`pim")
mip`zd
^P1STREET("IS","gitd","dzex")
xezd
^P1STREET("IS","gitd","dzexo")
oxezd
^P1STREET("IS","gitd","dzikeo")
oekizd
^P1STREET("IS","gitd","dzklz")
zlkzd
^P1STREET("IS","gitd","dznx")
xnzd
^P1STREET("IS","gitd","dzryiid")
diiyrzd
^P1STREET("IS","gitd","dzwed")
dewzd
^P1STREET("IS","gitd","dzyai")
iayzd
^P1STREET("IS","gitd","dzyrd")
dryzd
^P1STREET("IS","gitd","dzyrim eyly")
ylye miryzd
^P1STREET("IS","gitd","e`ci")
ic`e
^P1STREET("IS","gitd","e`ci qlia")
ailq ic`e
^P1STREET("IS","gitd","e`ci xeynid")
dinyex ic`e
^P1STREET("IS","gitd","e`o bej")
jeb o`e
^P1STREET("IS","gitd","eecb'eec")
cee'bcee
^P1STREET("IS","gitd","eelaey")
yealee
^P1STREET("IS","gitd","eeltqeo")
oeqtlee
^P1STREET("IS","gitd","eilpqwi")
iwqplie
^P1STREET("IS","gitd","eipx ieqs")
sqei xpie
^P1STREET("IS","gitd","eiv""e")
e"vie
^P1STREET("IS","gitd","eivno")
onvie
^P1STREET("IS","gitd","eizwio")
oiwzie
^P1STREET("IS","gitd","exaexb")
bxeaxe
^P1STREET("IS","gitd","excid")
dicxe
^P1STREET("IS","gitd","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","gitd","f'exq")
qxe'f
^P1STREET("IS","gitd","f`a dim")
mid a`f
^P1STREET("IS","gitd","f`a eilp`i")
i`plie a`f
^P1STREET("IS","gitd","faeleo")
oeleaf
^P1STREET("IS","gitd","fiepiz")
zipeif
^P1STREET("IS","gitd","fiic vtexd")
dxetv ciif
^P1STREET("IS","gitd","filtd")
dtlif
^P1STREET("IS","gitd","finp` pgem")
megp `pnif
^P1STREET("IS","gitd","fiqe")
eqif
^P1STREET("IS","gitd","fixipi")
ipixif
^P1STREET("IS","gitd","flno yf""x")
x"fy onlf
^P1STREET("IS","gitd","flno ypi`ex")
xe`ipy onlf
^P1STREET("IS","gitd","fnpdes")
sedpnf
^P1STREET("IS","gitd","fxeaal")
laaexf
^P1STREET("IS","gitd","g'exi")
ixe'g
^P1STREET("IS","gitd","gaead `lide")
edil` daeag
^P1STREET("IS","gitd","gaiad xiij")
jiix daiag
^P1STREET("IS","gitd","gaq axkd")
dkxa qag
^P1STREET("IS","gitd","gaxeo")
oexag
^P1STREET("IS","gitd","gc`c")
c`cg
^P1STREET("IS","gitd","gcxd")
dxcg
^P1STREET("IS","gitd","gegiz")
zigeg
^P1STREET("IS","gitd","gelcd")
dcleg
^P1STREET("IS","gitd","gend enbcl")
lcbne dneg
^P1STREET("IS","gitd","geqo")
oqeg
^P1STREET("IS","gitd","ges dypda")
adpyd seg
^P1STREET("IS","gitd","gexa")
axeg
^P1STREET("IS","gitd","gexyd")
dyxeg
^P1STREET("IS","gitd","ghi""a")
a"ihg
^P1STREET("IS","gitd","ghiaz belpi")
ipleb zaihg
^P1STREET("IS","gitd","ghiaz kxnli")
ilnxk zaihg
^P1STREET("IS","gitd","ghiaz recc")
ccer zaihg
^P1STREET("IS","gitd","gic""`")
`"cig
^P1STREET("IS","gitd","gid neyw`")
`wyen dig
^P1STREET("IS","gitd","giim")
miig
^P1STREET("IS","gitd","giim ax la")
al xa miig
^P1STREET("IS","gitd","giim dff")
ffd miig
^P1STREET("IS","gitd","giim lqwea")
aewql miig
^P1STREET("IS","gitd","gil dim")
mid lig
^P1STREET("IS","gitd","gixm")
mxig
^P1STREET("IS","gitd","glevi dzryiid")
diiyrzd ivelg
^P1STREET("IS","gitd","gliq` rliepd")
dpeilr `qilg
^P1STREET("IS","gitd","glniy")
yinlg
^P1STREET("IS","gitd","gls")
slg
^P1STREET("IS","gitd","glu")
ulg
^P1STREET("IS","gitd","gnm `l tyd")
dyt l` mng
^P1STREET("IS","gitd","gpd")
dpg
^P1STREET("IS","gitd","gpd qpy")
ypq dpg
^P1STREET("IS","gitd","gpd xeaip`")
`piaex dpg
^P1STREET("IS","gitd","gpizd")
dzipg
^P1STREET("IS","gitd","gqici `enez drelm")
mlerd zene` iciqg
^P1STREET("IS","gitd","gqo yewxi")
ixwey oqg
^P1STREET("IS","gitd","gtvi ad")
da ivtg
^P1STREET("IS","gitd","gv' kxnl")
lnxk 'vg
^P1STREET("IS","gitd","gxa l`z")
z`l axg
^P1STREET("IS","gitd","gxea")
aexg
^P1STREET("IS","gitd","gxneo")
oenxg
^P1STREET("IS","gitd","gyaeo")
oeayg
^P1STREET("IS","gitd","gzm qetx")
xteq mzg
^P1STREET("IS","gitd","h`xiw")
wix`h
^P1STREET("IS","gitd","hapwio")
oiwpah
^P1STREET("IS","gitd","haxid")
dixah
^P1STREET("IS","gitd","haxqwi b'pid")
dip'b iwqxah
^P1STREET("IS","gitd","hdeo irwa")
awri oedh
^P1STREET("IS","gitd","heaid cepid")
dipec diaeh
^P1STREET("IS","gitd","heaim")
miaeh
^P1STREET("IS","gitd","heqwpipi")
ipipwqeh
^P1STREET("IS","gitd","heqwppi")
ippwqeh
^P1STREET("IS","gitd","hieo")
oeih
^P1STREET("IS","gitd","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","gitd","i""l txu")
uxt l"i
^P1STREET("IS","gitd","i`cihip`d")
d`pihic`i
^P1STREET("IS","gitd","i`ix ku")
uk xi`i
^P1STREET("IS","gitd","i`pey wexv'`w")
w`'vxew yep`i
^P1STREET("IS","gitd","i`weh")
hew`i
^P1STREET("IS","gitd","iapd")
dpai
^P1STREET("IS","gitd","ib`l `leo")
oel` l`bi
^P1STREET("IS","gitd","ibex")
xebi
^P1STREET("IS","gitd","ibir ktiim")
miitk ribi
^P1STREET("IS","gitd","idecd dlei")
ield dcedi
^P1STREET("IS","gitd","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","gitd","ideciz")
zicedi
^P1STREET("IS","gitd","ideyr")
ryedi
^P1STREET("IS","gitd","ideyr dyl")
lyd ryedi
^P1STREET("IS","gitd","ie`a")
a`ei
^P1STREET("IS","gitd","ie`l")
l`ei
^P1STREET("IS","gitd","iectz")
ztcei
^P1STREET("IS","gitd","iegpo dqpclx")
xlcpqd opgei
^P1STREET("IS","gitd","iegpo dwcey")
yecwd opgei
^P1STREET("IS","gitd","iekac")
cakei
^P1STREET("IS","gitd","iepd")
dpei
^P1STREET("IS","gitd","iepzo")
ozpei
^P1STREET("IS","gitd","ieqs")
sqei
^P1STREET("IS","gitd","ieqs [dbicm]")
[mcibd] sqei
^P1STREET("IS","gitd","ieqs avxi")
ixva sqei
^P1STREET("IS","gitd","ieqs lei")
iel sqei
^P1STREET("IS","gitd","iezm")
mzei
^P1STREET("IS","gitd","igfw`l")
l`wfgi
^P1STREET("IS","gitd","igi`l")
l`igi
^P1STREET("IS","gitd","igirm")
mrigi
^P1STREET("IS","gitd","il""b")
b"li
^P1STREET("IS","gitd","il""b tpd cxeniz")
zinexc dpt b"li
^P1STREET("IS","gitd","il""b tpd vtepiz")
zipetv dpt b"li
^P1STREET("IS","gitd","ilci hdxo")
oxdh icli
^P1STREET("IS","gitd","im dzikeo")
oekizd mi
^P1STREET("IS","gitd","irl")
lri
^P1STREET("IS","gitd","irwa `exlpc")
cplxe` awri
^P1STREET("IS","gitd","irwa dkdo")
odkd awri
^P1STREET("IS","gitd","irwa gfo")
ofg awri
^P1STREET("IS","gitd","irxez")
zexri
^P1STREET("IS","gitd","itd dll")
lld dti
^P1STREET("IS","gitd","itd pes")
sep dti
^P1STREET("IS","gitd","itzg")
gzti
^P1STREET("IS","gitd","ivgw `lgpo")
opgl` wgvi
^P1STREET("IS","gitd","ivgw npbx")
xbpn wgvi
^P1STREET("IS","gitd","ivgw ycd")
dcy wgvi
^P1STREET("IS","gitd","ivi`z `ixetd")
dtexi` z`ivi
^P1STREET("IS","gitd","ivia ivgw")
wgvi aivi
^P1STREET("IS","gitd","iweh")
hewi
^P1STREET("IS","gitd","iwipheo")
oehpiwi
^P1STREET("IS","gitd","ixeylim")
milyexi
^P1STREET("IS","gitd","ixeylni")
inlyexi
^P1STREET("IS","gitd","iyexeo")
oexeyi
^P1STREET("IS","gitd","iyride")
ediryi
^P1STREET("IS","gitd","k""h")
h"k
^P1STREET("IS","gitd","kaixim")
mixiak
^P1STREET("IS","gitd","kaiy dyxez")
zexyd yiak
^P1STREET("IS","gitd","kaiy ktx `z`")
`z` xtk yiak
^P1STREET("IS","gitd","kaxi")
ixak
^P1STREET("IS","gitd","kbo xgl")
lgx obk
^P1STREET("IS","gitd","kdo axej")
jexa odk
^P1STREET("IS","gitd","kexy")
yxek
^P1STREET("IS","gitd","khia")
aihk
^P1STREET("IS","gitd","ki`h")
h`ik
^P1STREET("IS","gitd","kkx `lifah")
hafil` xkk
^P1STREET("IS","gitd","kkx cec")
cec xkk
^P1STREET("IS","gitd","kkx ddbpd")
dpbdd xkk
^P1STREET("IS","gitd","kkx dl""h")
h"ld xkk
^P1STREET("IS","gitd","kkx dnbcl")
lcbnd xkk
^P1STREET("IS","gitd","kkx dxaxh qne`l")
l`enq hxaxd xkk
^P1STREET("IS","gitd","kkx dxwtez")
zetwxd xkk
^P1STREET("IS","gitd","kkx ki`h")
h`ik xkk
^P1STREET("IS","gitd","kkx n`ixdes")
sedxi`n xkk
^P1STREET("IS","gitd","kkx qell aepd")
dpea lleq xkk
^P1STREET("IS","gitd","kkx tlenx")
xnelt xkk
^P1STREET("IS","gitd","kkx txiq")
qixt xkk
^P1STREET("IS","gitd","kkx wtlpqwi")
iwqpltw xkk
^P1STREET("IS","gitd","kl iyx`l gaxim")
mixag l`xyi lk
^P1STREET("IS","gitd","klil dgexy")
yxegd lilk
^P1STREET("IS","gitd","klpiez")
zeiplk
^P1STREET("IS","gitd","klpiz")
ziplk
^P1STREET("IS","gitd","kpxz")
zxpk
^P1STREET("IS","gitd","kqti irwa")
awri itqk
^P1STREET("IS","gitd","kqtxi")
ixtqk
^P1STREET("IS","gitd","ktx kaaix")
xiaak xtk
^P1STREET("IS","gitd","kxni")
inxk
^P1STREET("IS","gitd","kxnid")
dinxk
^P1STREET("IS","gitd","l`d")
d`l
^P1STREET("IS","gitd","l`d belcaxb")
bxacleb d`l
^P1STREET("IS","gitd","l`eo alem")
mela oe`l
^P1STREET("IS","gitd","laeo tpgq")
qgpt oeal
^P1STREET("IS","gitd","laepd")
dpeal
^P1STREET("IS","gitd","laephio")
oihpeal
^P1STREET("IS","gitd","lai`")
`ial
^P1STREET("IS","gitd","le`i tqhx")
xhqt i`el
^P1STREET("IS","gitd","lec")
cel
^P1STREET("IS","gitd","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","gitd","leheq")
qehel
^P1STREET("IS","gitd","lei ivgw")
wgvi iel
^P1STREET("IS","gitd","lepu")
upel
^P1STREET("IS","gitd","leu")
uel
^P1STREET("IS","gitd","lev`he")
eh`vel
^P1STREET("IS","gitd","lg""i")
i"gl
^P1STREET("IS","gitd","li`eo yhiio")
oiihy oe`il
^P1STREET("IS","gitd","li`epxce cd eipv'i")
i'vpie dc ecxpe`il
^P1STREET("IS","gitd","liaxid")
dixail
^P1STREET("IS","gitd","lieiw")
wieil
^P1STREET("IS","gitd","liepl eehqeo")
oeqhee lpeil
^P1STREET("IS","gitd","lih`piq")
qip`hil
^P1STREET("IS","gitd","liia itd")
dti aiil
^P1STREET("IS","gitd","liia ynrepi")
iperny aiil
^P1STREET("IS","gitd","lipcpyhx`eq")
qe`xhypcpil
^P1STREET("IS","gitd","lipwelo")
olewpil
^P1STREET("IS","gitd","liqio")
oiqil
^P1STREET("IS","gitd","lkiy")
yikl
^P1STREET("IS","gitd","lp""i")
i"pl
^P1STREET("IS","gitd","n`cipe")
epic`n
^P1STREET("IS","gitd","n`dci")
icd`n
^P1STREET("IS","gitd","n`i")
i`n
^P1STREET("IS","gitd","n`ix")
xi`n
^P1STREET("IS","gitd","n`ix dfexr")
rxefd xi`n
^P1STREET("IS","gitd","n`ix xehaxb")
bxahex xi`n
^P1STREET("IS","gitd","n`ixeaiu vai")
iav uiaexi`n
^P1STREET("IS","gitd","n`te")
et`n
^P1STREET("IS","gitd","n`vipi b'eftd")
dtfe'b ipiv`n
^P1STREET("IS","gitd","n`xw yb`l")
l`by wx`n
^P1STREET("IS","gitd","navr iepzo")
ozpei rvan
^P1STREET("IS","gitd","navr wcy")
ycw rvan
^P1STREET("IS","gitd","nbcim")
micbn
^P1STREET("IS","gitd","nbice")
ecibn
^P1STREET("IS","gitd","nc' dpai`im")
mi`iapd 'cn
^P1STREET("IS","gitd","nc' rbleo")
oelbr 'cn
^P1STREET("IS","gitd","nc' xyteo")
oetyx 'cn
^P1STREET("IS","gitd","ncxbez `axdm")
mdxa` zebxcn
^P1STREET("IS","gitd","ncxbez `l `tb`pi")
ip`bt` l` zebxcn
^P1STREET("IS","gitd","ncxbez `xac")
cax` zebxcn
^P1STREET("IS","gitd","ncxbez aiz yrxim")
mixry zia zebxcn
^P1STREET("IS","gitd","ncxbez api `ex")
xe` ipa zebxcn
^P1STREET("IS","gitd","ncxbez bcxd")
dxcb zebxcn
^P1STREET("IS","gitd","ncxbez cex")
xec zebxcn
^P1STREET("IS","gitd","ncxbez dixw")
wxid zebxcn
^P1STREET("IS","gitd","ncxbez dwp`im")
mi`pwd zebxcn
^P1STREET("IS","gitd","ncxbez fxeaal")
laaexf zebxcn
^P1STREET("IS","gitd","ncxbez gbld")
dlbg zebxcn
^P1STREET("IS","gitd","ncxbez gxez")
zexg zebxcn
^P1STREET("IS","gitd","ncxbez necirio")
oiricen zebxcn
^P1STREET("IS","gitd","ncxbez ngpez")
zepgn zebxcn
^P1STREET("IS","gitd","ncxbez nilx")
xlin zebxcn
^P1STREET("IS","gitd","ncxbez pbic")
cibp zebxcn
^P1STREET("IS","gitd","ncxbez perd")
drep zebxcn
^P1STREET("IS","gitd","ncxbez ptzli")
ilztp zebxcn
^P1STREET("IS","gitd","ncxbez twirio")
oiriwt zebxcn
^P1STREET("IS","gitd","ncxbez xdaz")
zadx zebxcn
^P1STREET("IS","gitd","ncxbez xgaz")
zagx zebxcn
^P1STREET("IS","gitd","ncxbez yewxi")
ixwey zebxcn
^P1STREET("IS","gitd","ncxbez yne`l")
l`eny zebxcn
^P1STREET("IS","gitd","ncxbez zino")
oniz zebxcn
^P1STREET("IS","gitd","nedliax")
xailden
^P1STREET("IS","gitd","nephitiexi")
ixeitihpen
^P1STREET("IS","gitd","nex")
xen
^P1STREET("IS","gitd","nexc dbi`")
`ibd cxen
^P1STREET("IS","gitd","nexc dfnix")
xinfd cxen
^P1STREET("IS","gitd","nexc diqnio")
oinqid cxen
^P1STREET("IS","gitd","nexc zaex")
xeaz cxen
^P1STREET("IS","gitd","nexo")
oxen
^P1STREET("IS","gitd","neyli")
ilyen
^P1STREET("IS","gitd","ngpiim")
miipgn
^P1STREET("IS","gitd","nik""l")
l"kin
^P1STREET("IS","gitd","nik`l")
l`kin
^P1STREET("IS","gitd","nineo")
oenin
^P1STREET("IS","gitd","nl""l")
l"ln
^P1STREET("IS","gitd","nlkd")
dkln
^P1STREET("IS","gitd","nlv'h")
h'vln
^P1STREET("IS","gitd","npcl fipbx")
xbpif lcpn
^P1STREET("IS","gitd","npcli")
ilcpn
^P1STREET("IS","gitd","npclqeo caexd")
dxeac oeqlcpn
^P1STREET("IS","gitd","npgm")
mgpn
^P1STREET("IS","gitd","npild")
dlipn
^P1STREET("IS","gitd","npqex")
xeqpn
^P1STREET("IS","gitd","nqcd")
dcqn
^P1STREET("IS","gitd","nqilz daxfl")
lfxad zliqn
^P1STREET("IS","gitd","nraxez")
zexarn
^P1STREET("IS","gitd","nrio")
oirn
^P1STREET("IS","gitd","nrld dygxex")
xexgyd dlrn
^P1STREET("IS","gitd","nrlez d`eno")
one`d zelrn
^P1STREET("IS","gitd","nrlez daevxim")
mixvead zelrn
^P1STREET("IS","gitd","nrlez dpai`im")
mi`iapd zelrn
^P1STREET("IS","gitd","nvcd")
dcvn
^P1STREET("IS","gitd","nvead")
daevn
^P1STREET("IS","gitd","nvipi")
ipivn
^P1STREET("IS","gitd","nvtd")
dtvn
^P1STREET("IS","gitd","nwex axej")
jexa xewn
^P1STREET("IS","gitd","nwls")
slwn
^P1STREET("IS","gitd","nwqiwe")
ewiqwn
^P1STREET("IS","gitd","nxbliz")
zilbxn
^P1STREET("IS","gitd","nxcki nwls")
slwn ikcxn
^P1STREET("IS","gitd","nxed")
dexn
^P1STREET("IS","gitd","nxgaid")
diagxn
^P1STREET("IS","gitd","nxhio aeax")
xaea oihxn
^P1STREET("IS","gitd","nxkeq axej")
jexa qekxn
^P1STREET("IS","gitd","nxkeq cec")
cec qekxn
^P1STREET("IS","gitd","nxqii")
iiqxn
^P1STREET("IS","gitd","nxwepi")
ipewxn
^P1STREET("IS","gitd","nxwiy txu")
uxt yiwxn
^P1STREET("IS","gitd","nyd `dxeo")
oexd` dyn
^P1STREET("IS","gitd","nyd ciio")
oiic dyn
^P1STREET("IS","gitd","nyd qpd")
dpq dyn
^P1STREET("IS","gitd","nyd wlnx")
xnlw dyn
^P1STREET("IS","gitd","nyd yxz")
zxy dyn
^P1STREET("IS","gitd","nyli irwa")
awri ilyn
^P1STREET("IS","gitd","nynx dbael")
leabd xnyn
^P1STREET("IS","gitd","nynx drnw")
wnrd xnyn
^P1STREET("IS","gitd","pca ivgw")
wgvi acp
^P1STREET("IS","gitd","pdeo ivgw")
wgvi oedp
^P1STREET("IS","gitd","pdll")
lldp
^P1STREET("IS","gitd","pebd")
dbep
^P1STREET("IS","gitd","pefd`")
`dfep
^P1STREET("IS","gitd","perd")
drep
^P1STREET("IS","gitd","pexabid")
dibaxep
^P1STREET("IS","gitd","pexc`e")
e`cxep
^P1STREET("IS","gitd","pexiz")
zixep
^P1STREET("IS","gitd","pgem gz")
zg megp
^P1STREET("IS","gitd","pgl")
lgp
^P1STREET("IS","gitd","pgli`li")
il`ilgp
^P1STREET("IS","gitd","pgni`q")
q`ingp
^P1STREET("IS","gitd","pgnid")
dingp
^P1STREET("IS","gitd","pgyeo")
oeygp
^P1STREET("IS","gitd","piqpaeim")
mieapqip
^P1STREET("IS","gitd","pivpim")
mipvip
^P1STREET("IS","gitd","prn""z")
z"nrp
^P1STREET("IS","gitd","prni")
inrp
^P1STREET("IS","gitd","pzia `etwim")
miwte` aizp
^P1STREET("IS","gitd","pzia `lirfx")
xfril` aizp
^P1STREET("IS","gitd","pzia d`nex`im")
mi`xen`d aizp
^P1STREET("IS","gitd","pzia d`zxeb")
bexz`d aizp
^P1STREET("IS","gitd","pzia ddcq")
qcdd aizp
^P1STREET("IS","gitd","pzia diyiad")
daiyid aizp
^P1STREET("IS","gitd","pzia dlela")
aleld aizp
^P1STREET("IS","gitd","pzia drxad")
daxrd aizp
^P1STREET("IS","gitd","pzia dteqwim")
miwqetd aizp
^P1STREET("IS","gitd","pzia dzp`im")
mi`pzd aizp
^P1STREET("IS","gitd","pzia go")
og aizp
^P1STREET("IS","gitd","pzia ieqiteo")
oetiqei aizp
^P1STREET("IS","gitd","pzia lityiu ieqs")
sqei uiytil aizp
^P1STREET("IS","gitd","pzia yc""x")
x"cy aizp
^P1STREET("IS","gitd","pzo `lzxno")
onxzl` ozp
^P1STREET("IS","gitd","pzpfeo")
oefpzp
^P1STREET("IS","gitd","qbliez")
zeilbq
^P1STREET("IS","gitd","qehio")
oiheq
^P1STREET("IS","gitd","qekez")
zekeq
^P1STREET("IS","gitd","qewelea")
aeleweq
^P1STREET("IS","gitd","qexewd nyd")
dyn dwexeq
^P1STREET("IS","gitd","qeyio")
oiyeq
^P1STREET("IS","gitd","qhto eeif")
fiee othq
^P1STREET("IS","gitd","qhxend")
dnexhq
^P1STREET("IS","gitd","qilifi`o")
o`ifiliq
^P1STREET("IS","gitd","qixwio")
oiwxiq
^P1STREET("IS","gitd","qleneo")
oenelq
^P1STREET("IS","gitd","qlno")
onlq
^P1STREET("IS","gitd","qlriz")
zirlq
^P1STREET("IS","gitd","qn' `dxeo")
oexd` 'nq
^P1STREET("IS","gitd","qn' `lide dpai`")
`iapd edil` 'nq
^P1STREET("IS","gitd","qn' `ywleo")
oelwy` 'nq
^P1STREET("IS","gitd","qn' aehbi")
ibhea 'nq
^P1STREET("IS","gitd","qn' apinio")
oinipa 'nq
^P1STREET("IS","gitd","qn' axw")
wxa 'nq
^P1STREET("IS","gitd","qn' ca def")
fed ac 'nq
^P1STREET("IS","gitd","qn' clid")
dilc 'nq
^P1STREET("IS","gitd","qn' daeqzo")
ozqead 'nq
^P1STREET("IS","gitd","qn' dblil")
lilbd 'nq
^P1STREET("IS","gitd","qn' dkxnim")
minxkd 'nq
^P1STREET("IS","gitd","qn' dpai`im")
mi`iapd 'nq
^P1STREET("IS","gitd","qn' drnim")
minrd 'nq
^P1STREET("IS","gitd","qn' drvn`ez")
ze`nvrd 'nq
^P1STREET("IS","gitd","qn' dvpgpim")
mipgpvd 'nq
^P1STREET("IS","gitd","qn' dwl""g")
g"lwd 'nq
^P1STREET("IS","gitd","qn' dxkaz")
zakxd 'nq
^P1STREET("IS","gitd","qn' dygx")
xgyd 'nq
^P1STREET("IS","gitd","qn' idecd")
dcedi 'nq
^P1STREET("IS","gitd","qn' ixnej")
jenxi 'nq
^P1STREET("IS","gitd","qn' nepy")
ypen 'nq
^P1STREET("IS","gitd","qn' neqel")
leqen 'nq
^P1STREET("IS","gitd","qn' nixeo")
oexin 'nq
^P1STREET("IS","gitd","qn' pefd`")
`dfep 'nq
^P1STREET("IS","gitd","qn' qbo `les idecd")
dcedi sel` obq 'nq
^P1STREET("IS","gitd","qn' qlepiwi")
iwipelq 'nq
^P1STREET("IS","gitd","qn' qncx")
xcnq 'nq
^P1STREET("IS","gitd","qn' qtxeo")
oextq 'nq
^P1STREET("IS","gitd","qn' rfd")
dfr 'nq
^P1STREET("IS","gitd","qn' rzliz")
zilzr 'nq
^P1STREET("IS","gitd","qn' tliw")
wilt 'nq
^P1STREET("IS","gitd","qn' vex")
xev 'nq
^P1STREET("IS","gitd","qn' viceo")
oeciv 'nq
^P1STREET("IS","gitd","qn' xeaio")
oiaex 'nq
^P1STREET("IS","gitd","qn' yne`l")
l`eny 'nq
^P1STREET("IS","gitd","qnelpqwio")
oiwqplenq
^P1STREET("IS","gitd","qph lewq")
qwel hpq
^P1STREET("IS","gitd","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","gitd","qzepiz")
zipezq
^P1STREET("IS","gitd","ra`q")
q`ar
^P1STREET("IS","gitd","rcd")
dcr
^P1STREET("IS","gitd","rcelm")
mlecr
^P1STREET("IS","gitd","reacid")
dicaer
^P1STREET("IS","gitd","recd pcd")
dcp dcer
^P1STREET("IS","gitd","renx `l ki`m")
m`ik l` xner
^P1STREET("IS","gitd","renx `l kz`a")
a`zk l` xner
^P1STREET("IS","gitd","riio heaim")
miaeh oiir
^P1STREET("IS","gitd","rio bci")
icb oir
^P1STREET("IS","gitd","rio cex")
xec oir
^P1STREET("IS","gitd","rke drziwd")
dwizrd ekr
^P1STREET("IS","gitd","rliz dperx")
xrepd zilr
^P1STREET("IS","gitd","rneo")
oenr
^P1STREET("IS","gitd","rneq")
qenr
^P1STREET("IS","gitd","rniwm iyx`l")
l`xyi mwinr
^P1STREET("IS","gitd","rnl")
lnr
^P1STREET("IS","gitd","rnw dfizim")
mizifd wnr
^P1STREET("IS","gitd","rpaim")
miapr
^P1STREET("IS","gitd","rpzez")
zezpr
^P1STREET("IS","gitd","rqtex")
xetqr
^P1STREET("IS","gitd","rqtid")
ditqr
^P1STREET("IS","gitd","rtxeo")
oextr
^P1STREET("IS","gitd","rvneo")
oenvr
^P1STREET("IS","gitd","rwad")
dawr
^P1STREET("IS","gitd","rwxeo")
oexwr
^P1STREET("IS","gitd","rxad")
daxr
^P1STREET("IS","gitd","rxc")
cxr
^P1STREET("IS","gitd","t`x")
x`t
^P1STREET("IS","gitd","tafpx")
xpfat
^P1STREET("IS","gitd","telc axkd")
dkxa clet
^P1STREET("IS","gitd","terd")
dret
^P1STREET("IS","gitd","tf qrcid")
dicrq ft
^P1STREET("IS","gitd","thl")
lht
^P1STREET("IS","gitd","ti`xaxb")
bxax`it
^P1STREET("IS","gitd","tiifx")
xfiit
^P1STREET("IS","gitd","tiivl")
lviit
^P1STREET("IS","gitd","tiix wpib")
bipw xiit
^P1STREET("IS","gitd","tikno")
onkit
^P1STREET("IS","gitd","tiplpc")
cplpit
^P1STREET("IS","gitd","tipqwx")
xwqpit
^P1STREET("IS","gitd","tipz ao yno")
ony oa zpit
^P1STREET("IS","gitd","tipz dxvl")
lvxd zpit
^P1STREET("IS","gitd","tipz ytix`")
`xity zpit
^P1STREET("IS","gitd","tiw""`")
`"wit
^P1STREET("IS","gitd","tli""m")
m"ilt
^P1STREET("IS","gitd","tlino nyd")
dyn onilt
^P1STREET("IS","gitd","tln""g")
g"nlt
^P1STREET("IS","gitd","tpgq xefo")
ofex qgpt
^P1STREET("IS","gitd","tpz ao idecd")
dcedi oa zpt
^P1STREET("IS","gitd","tpz bo")
ob zpt
^P1STREET("IS","gitd","twceo")
oecwt
^P1STREET("IS","gitd","txeb")
bext
^P1STREET("IS","gitd","txeic")
ciext
^P1STREET("IS","gitd","txet' xhpx")
xphx 'text
^P1STREET("IS","gitd","txiyno")
onyixt
^P1STREET("IS","gitd","txpu lei")
iel upxt
^P1STREET("IS","gitd","txpw tlb")
blt wpxt
^P1STREET("IS","gitd","v'xpi`aqwi")
iwqa`ipx'v
^P1STREET("IS","gitd","vai ao irwa")
awri oa iav
^P1STREET("IS","gitd","vai tiibio")
oibiit iav
^P1STREET("IS","gitd","varepi")
iperav
^P1STREET("IS","gitd","vax")
xav
^P1STREET("IS","gitd","vcwide")
ediwcv
^P1STREET("IS","gitd","vd""l")
l"dv
^P1STREET("IS","gitd","vdieo")
oeidv
^P1STREET("IS","gitd","vetiz")
zitev
^P1STREET("IS","gitd","vetx")
xtev
^P1STREET("IS","gitd","vexi")
ixev
^P1STREET("IS","gitd","vieo")
oeiv
^P1STREET("IS","gitd","viflipb")
bpilfiv
^P1STREET("IS","gitd","vild")
dliv
^P1STREET("IS","gitd","vtexi")
ixetv
^P1STREET("IS","gitd","vtxixim")
mixixtv
^P1STREET("IS","gitd","vtz")
ztv
^P1STREET("IS","gitd","w`ecxq")
qxce`w
^P1STREET("IS","gitd","wceyi abcc")
ccba iyecw
^P1STREET("IS","gitd","wceyi cnyw")
wync iyecw
^P1STREET("IS","gitd","wceyi dye`d")
d`eyd iyecw
^P1STREET("IS","gitd","wceyi i`qi")
iq`i iyecw
^P1STREET("IS","gitd","wceyi wdix")
xidw iyecw
^P1STREET("IS","gitd","wcind")
dnicw
^P1STREET("IS","gitd","wciy lef")
fel yicw
^P1STREET("IS","gitd","wcxeo")
oexcw
^P1STREET("IS","gitd","wdilz qlepiwi")
iwipelq zlidw
^P1STREET("IS","gitd","weitno igfw`l")
l`wfgi ontiew
^P1STREET("IS","gitd","wel nayx")
xyan lew
^P1STREET("IS","gitd","wenei")
ienew
^P1STREET("IS","gitd","weqhd xiwd")
dwix dhqew
^P1STREET("IS","gitd","weypix ieqs")
sqei xipyew
^P1STREET("IS","gitd","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","gitd","wifxno pzo")
ozp onxfiw
^P1STREET("IS","gitd","wiqxid")
dixqiw
^P1STREET("IS","gitd","wiyld")
dlyiw
^P1STREET("IS","gitd","wliapea")
aepailw
^P1STREET("IS","gitd","wliyx")
xyilw
^P1STREET("IS","gitd","wlx")
xlw
^P1STREET("IS","gitd","wql")
lqw
^P1STREET("IS","gitd","wvpyhiio")
oiihypvw
^P1STREET("IS","gitd","ww""l")
l"ww
^P1STREET("IS","gitd","wxiz qtx")
xtq zixw
^P1STREET("IS","gitd","wxo diqec")
ceqid oxw
^P1STREET("IS","gitd","wyho")
ohyw
^P1STREET("IS","gitd","x`el eelpaxb")
bxaplee le`x
^P1STREET("IS","gitd","x`y tipd")
dpit y`x
^P1STREET("IS","gitd","xa `les cexi irwa")
awri ixec sel` ax
^P1STREET("IS","gitd","xai ieqs w`xe")
ex`w sqei iax
^P1STREET("IS","gitd","xai rwia`")
`aiwr iax
^P1STREET("IS","gitd","xaio `qzx")
xzq` oiax
^P1STREET("IS","gitd","xape zm")
mz epax
^P1STREET("IS","gitd","xawd")
dwax
^P1STREET("IS","gitd","xc""w")
w"cx
^P1STREET("IS","gitd","xeco")
ocex
^P1STREET("IS","gitd","xefea yne`l")
l`eny aefex
^P1STREET("IS","gitd","xeid")
diex
^P1STREET("IS","gitd","xez")
zex
^P1STREET("IS","gitd","xfi`l cec")
cec l`ifx
^P1STREET("IS","gitd","xg' 115")
115 'gx
^P1STREET("IS","gitd","xg' 2001")
2001 'gx
^P1STREET("IS","gitd","xg' 2120")
2120 'gx
^P1STREET("IS","gitd","xg' 2136")
2136 'gx
^P1STREET("IS","gitd","xg' 2138")
2138 'gx
^P1STREET("IS","gitd","xg' 2287")
2287 'gx
^P1STREET("IS","gitd","xg' 2288")
2288 'gx
^P1STREET("IS","gitd","xg' 2306")
2306 'gx
^P1STREET("IS","gitd","xg' 2335")
2335 'gx
^P1STREET("IS","gitd","xg' 400")
400 'gx
^P1STREET("IS","gitd","xg' 509")
509 'gx
^P1STREET("IS","gitd","xg' 511")
511 'gx
^P1STREET("IS","gitd","xg' 520")
520 'gx
^P1STREET("IS","gitd","xg' 528")
528 'gx
^P1STREET("IS","gitd","xg' 5332")
5332 'gx
^P1STREET("IS","gitd","xg' 538")
538 'gx
^P1STREET("IS","gitd","xg' 540")
540 'gx
^P1STREET("IS","gitd","xg' 6032")
6032 'gx
^P1STREET("IS","gitd","xg' 728")
728 'gx
^P1STREET("IS","gitd","xg' 799")
799 'gx
^P1STREET("IS","gitd","xg' 804")
804 'gx
^P1STREET("IS","gitd","xg' 806")
806 'gx
^P1STREET("IS","gitd","xg' 808")
808 'gx
^P1STREET("IS","gitd","xg' 825")
825 'gx
^P1STREET("IS","gitd","xg' 834")
834 'gx
^P1STREET("IS","gitd","xg' 865")
865 'gx
^P1STREET("IS","gitd","xg' 945")
945 'gx
^P1STREET("IS","gitd","xg' 949")
949 'gx
^P1STREET("IS","gitd","xg' 951")
951 'gx
^P1STREET("IS","gitd","xg' 997")
997 'gx
^P1STREET("IS","gitd","xgaz cec")
cec zagx
^P1STREET("IS","gitd","xgl")
lgx
^P1STREET("IS","gitd","xgs")
sgx
^P1STREET("IS","gitd","xhpx")
xphx
^P1STREET("IS","gitd","xip""d")
d"pix
^P1STREET("IS","gitd","xna""o")
o"anx
^P1STREET("IS","gitd","xnepim")
mipenx
^P1STREET("IS","gitd","xp""w")
w"px
^P1STREET("IS","gitd","xrpo")
oprx
^P1STREET("IS","gitd","xvis tpgq nxbelio")
oilebxn qgpt sivx
^P1STREET("IS","gitd","xwtez")
zetwx
^P1STREET("IS","gitd","xy""i")
i"yx
^P1STREET("IS","gitd","y""i rbpeo")
oepbr i"y
^P1STREET("IS","gitd","y`el")
le`y
^P1STREET("IS","gitd","y`x iyea")
aeyi x`y
^P1STREET("IS","gitd","y`xiz dtlihd")
dhiltd zix`y
^P1STREET("IS","gitd","yacid")
dicay
^P1STREET("IS","gitd","yafi ylem")
mely ifay
^P1STREET("IS","gitd","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","gitd","yail d`aez")
zea`d liay
^P1STREET("IS","gitd","yail d`ndez")
zedn`d liay
^P1STREET("IS","gitd","yail d`nepd")
dpen`d liay
^P1STREET("IS","gitd","yail dhs")
shd liay
^P1STREET("IS","gitd","yail dnrxez")
zexrnd liay
^P1STREET("IS","gitd","yarz dnipim")
mipind zray
^P1STREET("IS","gitd","yaz`i lei")
iel i`zay
^P1STREET("IS","gitd","yc' `a` geyi")
iyeg `a` 'cy
^P1STREET("IS","gitd","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","gitd","yc' az blim")
milb za 'cy
^P1STREET("IS","gitd","yc' cbpid")
dipbc 'cy
^P1STREET("IS","gitd","yc' ddbpd")
dpbdd 'cy
^P1STREET("IS","gitd","yc' ddqzcxez")
zexczqdd 'cy
^P1STREET("IS","gitd","yc' dkxnl")
lnxkd 'cy
^P1STREET("IS","gitd","yc' dl""d")
d"ld 'cy
^P1STREET("IS","gitd","yc' dnbipim")
mipibnd 'cy
^P1STREET("IS","gitd","yc' dnzpcaim")
miacpznd 'cy
^P1STREET("IS","gitd","yc' dpcia")
aicpd 'cy
^P1STREET("IS","gitd","yc' dpyi`")
`iypd 'cy
^P1STREET("IS","gitd","yc' dvai")
iavd 'cy
^P1STREET("IS","gitd","yc' dviepez")
zepeivd 'cy
^P1STREET("IS","gitd","yc' dx`""d")
d"`xd 'cy
^P1STREET("IS","gitd","yc' eipbiih")
hiibpie 'cy
^P1STREET("IS","gitd","yc' hxentlcex")
xecltnexh 'cy
^P1STREET("IS","gitd","yc' ivgw")
wgvi 'cy
^P1STREET("IS","gitd","yc' nexid")
dixen 'cy
^P1STREET("IS","gitd","yc' nyig")
giyn 'cy
^P1STREET("IS","gitd","yc' qipi")
ipiq 'cy
^P1STREET("IS","gitd","yc' rnpe`l")
l`epnr 'cy
^P1STREET("IS","gitd","yc' vaid eivgw")
wgvie diav 'cy
^P1STREET("IS","gitd","yc' wiy")
yiw 'cy
^P1STREET("IS","gitd","yc' xehyilc")
cliyhex 'cy
^P1STREET("IS","gitd","yc' xez dkdo")
odkd zex 'cy
^P1STREET("IS","gitd","ycd aewx")
xwea dcy
^P1STREET("IS","gitd","yedm")
mdey
^P1STREET("IS","gitd","yeiivx `laxh")
hxal` xviiey
^P1STREET("IS","gitd","yenxeo")
oexney
^P1STREET("IS","gitd","yepiz")
zipey
^P1STREET("IS","gitd","yepniz")
zinpey
^P1STREET("IS","gitd","yetno bxyeo")
oeyxb ontey
^P1STREET("IS","gitd","yeypz dkxnl")
lnxkd zpyey
^P1STREET("IS","gitd","yg`ci ylg")
gly ic`gy
^P1STREET("IS","gitd","yhxo i`ix")
xi`i oxhy
^P1STREET("IS","gitd","yhxo ieqs")
sqei oxhy
^P1STREET("IS","gitd","yiaz vieo")
oeiv zaiy
^P1STREET("IS","gitd","yild")
dliy
^P1STREET("IS","gitd","ykeo relim")
miler oeky
^P1STREET("IS","gitd","ykhx")
xhky
^P1STREET("IS","gitd","yl""b")
b"ly
^P1STREET("IS","gitd","yldea b'nil")
lin'b aedly
^P1STREET("IS","gitd","ylem qlg")
glq mely
^P1STREET("IS","gitd","ylem rlikm")
mkilr mely
^P1STREET("IS","gitd","ylenvieo dnlkd")
dklnd oeivnely
^P1STREET("IS","gitd","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","gitd","yn`i")
i`ny
^P1STREET("IS","gitd","yne`l")
l`eny
^P1STREET("IS","gitd","yne`l iapi`li")
il`ipai l`eny
^P1STREET("IS","gitd","yngd delvaxb")
bxavled dgny
^P1STREET("IS","gitd","ynrepeaiu'")
'uiaeperny
^P1STREET("IS","gitd","ynxide leio")
oiel edixny
^P1STREET("IS","gitd","yny")
yny
^P1STREET("IS","gitd","ynyeo")
oeyny
^P1STREET("IS","gitd","ypi apeanax")
xanaepa ipy
^P1STREET("IS","gitd","yrx dbi`")
`ibd xry
^P1STREET("IS","gitd","yrx dlapeo")
oepald xry
^P1STREET("IS","gitd","yrx drlid")
dilrd xry
^P1STREET("IS","gitd","yrx nfxgi")
igxfn xry
^P1STREET("IS","gitd","yrx tlnx")
xnlt xry
^P1STREET("IS","gitd","yrx wtho qhia")
aihq ohtw xry
^P1STREET("IS","gitd","ytipefd")
dfepity
^P1STREET("IS","gitd","ytix`")
`xity
^P1STREET("IS","gitd","ytxd")
dxty
^P1STREET("IS","gitd","ytxipvw")
wvpixty
^P1STREET("IS","gitd","ytxrm")
mrxty
^P1STREET("IS","gitd","ywnd")
dnwy
^P1STREET("IS","gitd","ywnepd")
dpenwy
^P1STREET("IS","gitd","yxd")
dxy
^P1STREET("IS","gitd","yyz dinim")
minid zyy
^P1STREET("IS","gitd","z`cl")
lc`z
^P1STREET("IS","gitd","z`yex")
xey`z
^P1STREET("IS","gitd","zcdx")
xdcz
^P1STREET("IS","gitd","zexd eraecd")
dceare dxez
^P1STREET("IS","gitd","zgpz dkxnl")
lnxkd zpgz
^P1STREET("IS","gitd","zl `aia")
aia` lz
^P1STREET("IS","gitd","zl gi")
ig lz
^P1STREET("IS","gitd","zl n`pd")
dp`n lz
^P1STREET("IS","gitd","zrpj")
jprz
^P1STREET("IS","gitd","zwend")
dnewz
^P1STREET("IS","gitd","zxi""b")
b"ixz
^P1STREET("IS","gitd","zxvd")
dvxz
^P1STREET("IS","gitd","zxyiy")
yiyxz
^P1STREET("IS","gitd","zyxi")
ixyz
^P1STREET("IS","gls")
slg
^P1STREET("IS","gls","cxj petiz")
zitep jxc
^P1STREET("IS","gnc")
cng
^P1STREET("IS","gnc","dfiz")
zifd
^P1STREET("IS","gnc","nae` dbto")
otbd `ean
^P1STREET("IS","gnc","nae` dgihd")
dhigd `ean
^P1STREET("IS","gnc","nae` dz`pd")
dp`zd `ean
^P1STREET("IS","gncid")
dicng
^P1STREET("IS","gpi`l")
l`ipg
^P1STREET("IS","gpi`l","d`leo")
oel`d
^P1STREET("IS","gpi`l","dbard")
drabd
^P1STREET("IS","gpi`l","dbi`")
`ibd
^P1STREET("IS","gpi`l","dgxea")
aexgd
^P1STREET("IS","gpi`l","dtxcq")
qcxtd
^P1STREET("IS","gpi`l","dx`yepim")
mipey`xd
^P1STREET("IS","gpi`l","kkx `expim")
mipxe` xkk
^P1STREET("IS","gpizd")
dzipg
^P1STREET("IS","gpzeo")
oezpg
^P1STREET("IS","gqo")
oqg
^P1STREET("IS","gtu giim")
miig utg
^P1STREET("IS","gtvi-ad")
da-ivtg
^P1STREET("IS","gva")
avg
^P1STREET("IS","gvad")
davg
^P1STREET("IS","gvex dbliliz")
zililbd xevg
^P1STREET("IS","gvex dbliliz","`lepim")
mipel`
^P1STREET("IS","gvex dbliliz","apd aizj")
jzia dpa
^P1STREET("IS","gvex dbliliz","axw ao `aiprm")
mrpia` oa wxa
^P1STREET("IS","gvex dbliliz","b`elim")
mile`b
^P1STREET("IS","gvex dbliliz","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","gvex dbliliz","cxj dapim")
mipad jxc
^P1STREET("IS","gvex dbliliz","cxj dgeld")
dlegd jxc
^P1STREET("IS","gvex dbliliz","cxj ptzli")
ilztp jxc
^P1STREET("IS","gvex dbliliz","d`expim")
mipxe`d
^P1STREET("IS","gvex dbliliz","daeqzo")
ozqead
^P1STREET("IS","gvex dbliliz","dblil")
lilbd
^P1STREET("IS","gvex dbliliz","ddqzcxez")
zexczqdd
^P1STREET("IS","gvex dbliliz","diino")
oniid
^P1STREET("IS","gvex dbliliz","dixco")
ocxid
^P1STREET("IS","gvex dbliliz","dklpiz")
ziplkd
^P1STREET("IS","gvex dbliliz","dniiqcim")
micqiind
^P1STREET("IS","gvex dbliliz","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","gvex dbliliz","dpyi` eivno")
onvie `iypd
^P1STREET("IS","gvex dbliliz","dwxid dgqiciz")
ziciqgd dixwd
^P1STREET("IS","gvex dbliliz","dxna""m")
m"anxd
^P1STREET("IS","gvex dbliliz","dxwir")
riwxd
^P1STREET("IS","gvex dbliliz","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","gvex dbliliz","gepi dnrbl")
lbrnd ipeg
^P1STREET("IS","gvex dbliliz","gvex")
xevg
^P1STREET("IS","gvex dbliliz","hxentlcex")
xecltnexh
^P1STREET("IS","gvex dbliliz","ixeylim")
milyexi
^P1STREET("IS","gvex dbliliz","kpro")
orpk
^P1STREET("IS","gvex dbliliz","nrld dfizim")
mizifd dlrn
^P1STREET("IS","gvex dbliliz","peed dxim")
mixd deep
^P1STREET("IS","gvex dbliliz","pxwiq")
qiwxp
^P1STREET("IS","gvex dbliliz","qnhz dkxkem")
mekxkd zhnq
^P1STREET("IS","gvex dbliliz","qnhz dxwtz")
ztwxd zhnq
^P1STREET("IS","gvex dbliliz","vd""l")
l"dv
^P1STREET("IS","gvex dbliliz","wxiz alej")
jela zixw
^P1STREET("IS","gvex dbliliz","yc' `xwir")
riwx` 'cy
^P1STREET("IS","gvex dbliliz","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","gvex dbliliz","ytxipvw")
wvpixty
^P1STREET("IS","gvex dbliliz","zl gi")
ig lz
^P1STREET("IS","gvex dbliliz","zy""g")
g"yz
^P1STREET("IS","gvex-`ycec")
cecy`-xevg
^P1STREET("IS","gvxim")
mixvg
^P1STREET("IS","gxa l`z")
z`l axg
^P1STREET("IS","gxevim")
mivexg
^P1STREET("IS","gxevim","dbto")
otbd
^P1STREET("IS","gxevim","ddcq")
qcdd
^P1STREET("IS","gxevim","dfiz")
zifd
^P1STREET("IS","gxevim","drxad")
daxrd
^P1STREET("IS","gxevim","dxineo")
oenixd
^P1STREET("IS","gxevim","dz`pd")
dp`zd
^P1STREET("IS","gxevim","dznx")
xnzd
^P1STREET("IS","gxevim","zixey")
yexiz
^P1STREET("IS","gxez")
zexg
^P1STREET("IS","gxez","cxj dim")
mid jxc
^P1STREET("IS","gxez","cxj dniiqcim")
micqiind jxc
^P1STREET("IS","gxez","d`bef")
feb`d
^P1STREET("IS","gxez","d`leo")
oel`d
^P1STREET("IS","gxez","dvarepi")
iperavd
^P1STREET("IS","gxez","dvax")
xavd
^P1STREET("IS","gxez","dywc")
cwyd
^P1STREET("IS","gxez","tiweq")
qewit
^P1STREET("IS","gxiy")
yixg
^P1STREET("IS","gxiy","dfeizo")
oziefd
^P1STREET("IS","gxiy","dnyeyim")
miyeynd
^P1STREET("IS","gxiy","qrx")
xrq
^P1STREET("IS","gynep`im")
mi`penyg
^P1STREET("IS","gynep`im","aiz ieqs")
sqei zia
^P1STREET("IS","gynep`im","d`xal")
lax`d
^P1STREET("IS","gynep`im","dfiz")
zifd
^P1STREET("IS","gynep`im","dgxneo")
oenxgd
^P1STREET("IS","gynep`im","divdx")
xdvid
^P1STREET("IS","gynep`im","dkxnl")
lnxkd
^P1STREET("IS","gynep`im","dnex")
xend
^P1STREET("IS","gynep`im","dx pae")
eap xd
^P1STREET("IS","gynep`im","dxn""`")
`"nxd
^P1STREET("IS","gynep`im","dxna""m")
m"anxd
^P1STREET("IS","gynep`im","dz`pd")
dp`zd
^P1STREET("IS","gynep`im","dzaex")
xeazd
^P1STREET("IS","gynep`im","dzixey")
yexizd
^P1STREET("IS","gynep`im","dznx")
xnzd
^P1STREET("IS","gynep`im","irxez cay")
yac zexri
^P1STREET("IS","gynep`im","ndxiu")
uixdn
^P1STREET("IS","gynep`im","nexid")
dixen
^P1STREET("IS","gynep`im","rvneo")
oenvr
^P1STREET("IS","gynep`im","yafi")
ifay
^P1STREET("IS","haxid")
dixah
^P1STREET("IS","haxid","`aelrtid")
ditrlea`
^P1STREET("IS","haxid","`daz vieo")
oeiv zad`
^P1STREET("IS","haxid","`dl irwa")
awri ld`
^P1STREET("IS","haxid","`eqiywio")
oiwyiqe`
^P1STREET("IS","haxid","`ex giim")
miig xe`
^P1STREET("IS","haxid","`gc drm")
mrd cg`
^P1STREET("IS","haxid","`ged")
deg`
^P1STREET("IS","haxid","`gefz aiz")
zia zfeg`
^P1STREET("IS","haxid","`gefz kpxz")
zxpk zfeg`
^P1STREET("IS","haxid","`ilz")
zli`
^P1STREET("IS","haxid","`lepim")
mipel`
^P1STREET("IS","haxid","`lgcis")
sicgl`
^P1STREET("IS","haxid","`ltqi")
iqtl`
^P1STREET("IS","haxid","`v""l")
l"v`
^P1STREET("IS","haxid","`xlij")
jilx`
^P1STREET("IS","haxid","ai`liw")
wil`ia
^P1STREET("IS","haxid","aia`q")
q`aia
^P1STREET("IS","haxid","aixa")
axia
^P1STREET("IS","haxid","aiz iyx`l")
l`xyi zia
^P1STREET("IS","haxid","ao `lirfx")
xfril` oa
^P1STREET("IS","haxid","ao idecd")
dcedi oa
^P1STREET("IS","haxid","ao vai")
iav oa
^P1STREET("IS","haxid","ax biex`")
`xeib xa
^P1STREET("IS","haxid","ax keka`")
`akek xa
^P1STREET("IS","haxid","axexid")
dixexa
^P1STREET("IS","haxid","axfili")
ilifxa
^P1STREET("IS","haxid","axpx")
xpxa
^P1STREET("IS","haxid","axu")
uxa
^P1STREET("IS","haxid","belcd n`ix")
xi`n dcleb
^P1STREET("IS","haxid","belena")
aneleb
^P1STREET("IS","haxid","belpi")
ipleb
^P1STREET("IS","haxid","bexceo")
oecxeb
^P1STREET("IS","haxid","bey rvieo")
oeivr yeb
^P1STREET("IS","haxid","bpeqx")
xqepb
^P1STREET("IS","haxid","ca def")
fed ac
^P1STREET("IS","haxid","cbpid")
dipbc
^P1STREET("IS","haxid","cd`o ynreo")
oerny o`dc
^P1STREET("IS","haxid","cec `lrfx")
xfrl` cec
^P1STREET("IS","haxid","ceo ieqs")
sqei oec
^P1STREET("IS","haxid","ceo ieqs dpyi`")
`iypd sqei oec
^P1STREET("IS","haxid","cepd bxvid")
divxb dpec
^P1STREET("IS","haxid","cxj bcec axw")
wxa cecb jxc
^P1STREET("IS","haxid","cxj dbaexd")
dxeabd jxc
^P1STREET("IS","haxid","cxj dviepez")
zepeivd jxc
^P1STREET("IS","haxid","cxj glteo")
oetlg jxc
^P1STREET("IS","haxid","cxj vtz")
ztv jxc
^P1STREET("IS","haxid","d`aez")
zea`d
^P1STREET("IS","haxid","d`expim")
mipxe`d
^P1STREET("IS","haxid","d`ild")
dli`d
^P1STREET("IS","haxid","d`ld")
dl`d
^P1STREET("IS","haxid","d`ndez")
zedn`d
^P1STREET("IS","haxid","d`x""i")
i"x`d
^P1STREET("IS","haxid","d`xf")
fx`d
^P1STREET("IS","haxid","d`xfim")
mifx`d
^P1STREET("IS","haxid","daexb")
bxead
^P1STREET("IS","haxid","dapim")
mipad
^P1STREET("IS","haxid","dbcec draxi")
ixard cecbd
^P1STREET("IS","haxid","dblaer")
realbd
^P1STREET("IS","haxid","dblil")
lilbd
^P1STREET("IS","haxid","dbto")
otbd
^P1STREET("IS","haxid","dceacao")
oacaecd
^P1STREET("IS","haxid","dciibim")
mibiicd
^P1STREET("IS","haxid","dcq")
qcd
^P1STREET("IS","haxid","dcwl")
lwcd
^P1STREET("IS","haxid","detio")
oited
^P1STREET("IS","haxid","dexceq")
qecxed
^P1STREET("IS","haxid","dglnepiz")
zipenlgd
^P1STREET("IS","haxid","dgva")
avgd
^P1STREET("IS","haxid","dgxneo")
oenxgd
^P1STREET("IS","haxid","dgynep`im")
mi`penygd
^P1STREET("IS","haxid","dhiilz")
zliihd
^P1STREET("IS","haxid","dill")
llid
^P1STREET("IS","haxid","dim")
mid
^P1STREET("IS","haxid","dixco")
ocxid
^P1STREET("IS","haxid","dixweo")
oewxid
^P1STREET("IS","haxid","dklpiz")
ziplkd
^P1STREET("IS","haxid","dnbipim")
mipibnd
^P1STREET("IS","haxid","dnkaim")
miaknd
^P1STREET("IS","haxid","dnl`kd")
dk`lnd
^P1STREET("IS","haxid","dnlj cec")
cec jlnd
^P1STREET("IS","haxid","dnxgv`ez")
ze`vgxnd
^P1STREET("IS","haxid","dnyex")
xeynd
^P1STREET("IS","haxid","dnyig")
giynd
^P1STREET("IS","haxid","dpai`im")
mi`iapd
^P1STREET("IS","haxid","dpehx")
xhepd
^P1STREET("IS","haxid","dpevxim")
mixvepd
^P1STREET("IS","haxid","dpyi`")
`iypd
^P1STREET("IS","haxid","dpyi` eivno")
onvie `iypd
^P1STREET("IS","haxid","dqaiepim")
mipeiaqd
^P1STREET("IS","haxid","dqiito")
otiiqd
^P1STREET("IS","haxid","drnwim")
miwnrd
^P1STREET("IS","haxid","drvn`ez")
ze`nvrd
^P1STREET("IS","haxid","drvneo")
oenvrd
^P1STREET("IS","haxid","dtln""g")
g"nltd
^P1STREET("IS","haxid","dtxgim")
migxtd
^P1STREET("IS","haxid","dvpgpim")
mipgpvd
^P1STREET("IS","haxid","dwceyim")
miyecwd
^P1STREET("IS","haxid","dwiyeo")
oeyiwd
^P1STREET("IS","haxid","dxa giim hiia")
aiih miig axd
^P1STREET("IS","haxid","dxa giim hnqez")
zeqnh miig axd
^P1STREET("IS","haxid","dxa giim qn`b'd")
d'b`nq miig axd
^P1STREET("IS","haxid","dxa i' `ae gvix`")
`xivg ea` 'i axd
^P1STREET("IS","haxid","dxa i. `aegvix`")
`xivgea` .i axd
^P1STREET("IS","haxid","dxa kdo nyd")
dyn odk axd
^P1STREET("IS","haxid","dxa n`ix erwpio")
oipwre xi`n axd
^P1STREET("IS","haxid","dxa wew")
wew axd
^P1STREET("IS","haxid","dyenx")
xneyd
^P1STREET("IS","haxid","dyethim")
mihteyd
^P1STREET("IS","haxid","dyifs")
sfiyd
^P1STREET("IS","haxid","dyihd")
dhiyd
^P1STREET("IS","haxid","dyileg")
geliyd
^P1STREET("IS","haxid","dyl""d")
d"lyd
^P1STREET("IS","haxid","dylem")
melyd
^P1STREET("IS","haxid","dywcim")
micwyd
^P1STREET("IS","haxid","dzaex")
xeazd
^P1STREET("IS","haxid","dznx")
xnzd
^P1STREET("IS","haxid","dzp`im")
mi`pzd
^P1STREET("IS","haxid","dzryid")
diyrzd
^P1STREET("IS","haxid","eipbih")
hibpie
^P1STREET("IS","haxid","expx")
xpxe
^P1STREET("IS","haxid","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","haxid","fiicl")
lciif
^P1STREET("IS","haxid","gaxeo")
oexag
^P1STREET("IS","haxid","gfeo `iy")
yi` oefg
^P1STREET("IS","haxid","gii` eapie")
eipae `iig
^P1STREET("IS","haxid","gpd qpy")
ypq dpg
^P1STREET("IS","haxid","haex d`xu")
ux`d xeah
^P1STREET("IS","haxid","helicpe")
epcileh
^P1STREET("IS","haxid","hxentlcex")
xecltnexh
^P1STREET("IS","haxid","ib`l `leo")
oel` l`bi
^P1STREET("IS","haxid","idecd dlei")
ield dcedi
^P1STREET("IS","haxid","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","haxid","iegpo ao fk`i")
i`kf oa opgei
^P1STREET("IS","haxid","itd pes")
sep dti
^P1STREET("IS","haxid","ivgw ycd")
dcy wgvi
^P1STREET("IS","haxid","ixeylim")
milyexi
^P1STREET("IS","haxid","kdp`")
`pdk
^P1STREET("IS","haxid","ki""g")
g"ik
^P1STREET("IS","haxid","kkx dcx")
xcd xkk
^P1STREET("IS","haxid","kkx dnqbx")
xbqnd xkk
^P1STREET("IS","haxid","kkx f'aehipqwi")
iwqpihea'f xkk
^P1STREET("IS","haxid","kkx wexcead")
daecxew xkk
^P1STREET("IS","haxid","kkx xaio")
oiax xkk
^P1STREET("IS","haxid","kkx xqwe")
ewqx xkk
^P1STREET("IS","haxid","lg""i")
i"gl
^P1STREET("IS","haxid","necirio")
oiricen
^P1STREET("IS","haxid","nexcez haxid")
dixah zecxen
^P1STREET("IS","haxid","nik`l")
l`kin
^P1STREET("IS","haxid","nipe")
epin
^P1STREET("IS","haxid","nleo bz")
zb oeln
^P1STREET("IS","haxid","npgm abio")
oiba mgpn
^P1STREET("IS","haxid","nqcd")
dcqn
^P1STREET("IS","haxid","nrld ww""l")
l"ww dlrn
^P1STREET("IS","haxid","nvcd")
dcvn
^P1STREET("IS","haxid","nxeed")
deexn
^P1STREET("IS","haxid","nxkf arli nl`kd")
dk`ln ilra fkxn
^P1STREET("IS","haxid","nyda")
adyn
^P1STREET("IS","haxid","ped dcx")
xcd dep
^P1STREET("IS","haxid","ped go")
og dep
^P1STREET("IS","haxid","ped reac")
caer dep
^P1STREET("IS","haxid","pes kpexez")
zexepk sep
^P1STREET("IS","haxid","pgnid")
dingp
^P1STREET("IS","haxid","pgnpi ieqs")
sqei ipngp
^P1STREET("IS","haxid","piaxb")
bxaip
^P1STREET("IS","haxid","pvxz")
zxvp
^P1STREET("IS","haxid","pxwiq")
qiwxp
^P1STREET("IS","haxid","qipi")
ipiq
^P1STREET("IS","haxid","refi`l")
l`ifer
^P1STREET("IS","haxid","rfx`")
`xfr
^P1STREET("IS","haxid","rlifd abio")
oiba dfilr
^P1STREET("IS","haxid","rliz")
zilr
^P1STREET("IS","haxid","terli vieo")
oeiv ilret
^P1STREET("IS","haxid","tiw""`")
`"wit
^P1STREET("IS","haxid","tleq")
qelt
^P1STREET("IS","haxid","v`leo")
oel`v
^P1STREET("IS","haxid","vieo adlel")
lelda oeiv
^P1STREET("IS","haxid","viepim kllim")
millk mipeiv
^P1STREET("IS","haxid","vitexi")
ixetiv
^P1STREET("IS","haxid","wtlpqwi")
iwqpltw
^P1STREET("IS","haxid","wxiz nyd")
dyn zixw
^P1STREET("IS","haxid","wxiz v`pb")
bp`v zixw
^P1STREET("IS","haxid","wxiz v`pf")
fp`v zixw
^P1STREET("IS","haxid","xai n`ix")
xi`n iax
^P1STREET("IS","haxid","xai rwia`")
`aiwr iax
^P1STREET("IS","haxid","xehyilc")
cliyhex
^P1STREET("IS","haxid","xezm")
mzex
^P1STREET("IS","haxid","xfi`l")
l`ifx
^P1STREET("IS","haxid","xg' 1124")
1124 'gx
^P1STREET("IS","haxid","xg' 4")
4 'gx
^P1STREET("IS","haxid","xg' 751")
751 'gx
^P1STREET("IS","haxid","xgl")
lgx
^P1STREET("IS","haxid","xna""m")
m"anx
^P1STREET("IS","haxid","xng""l")
l"gnx
^P1STREET("IS","haxid","xnz kpxz")
zxpk znx
^P1STREET("IS","haxid","xwtz")
ztwx
^P1STREET("IS","haxid","xy""i")
i"yx
^P1STREET("IS","haxid","yc' `lph`eo")
oe`hpl` 'cy
^P1STREET("IS","haxid","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","haxid","yc' bpi npexd")
dxepn ipb 'cy
^P1STREET("IS","haxid","yc' dxvl")
lvxd 'cy
^P1STREET("IS","haxid","yc' qtix")
xitq 'cy
^P1STREET("IS","haxid","yc' wtlo `lirfx")
xfril` oltw 'cy
^P1STREET("IS","haxid","yc' ww""l")
l"ww 'cy
^P1STREET("IS","haxid","yf""x")
x"fy
^P1STREET("IS","haxid","yhxiz")
zixhy
^P1STREET("IS","haxid","ylnd dnlj")
jlnd dnly
^P1STREET("IS","haxid","ytix`")
`xity
^P1STREET("IS","haxid","ytz dim")
mid zty
^P1STREET("IS","haxid","ywc")
cwy
^P1STREET("IS","haxid","yxz nyd")
dyn zxy
^P1STREET("IS","haxid","zbx")
xbz
^P1STREET("IS","haxid","zl gi")
ig lz
^P1STREET("IS","hexr`o")
o`rxeh
^P1STREET("IS","hexr`o","q`lg `lcio")
oicl` gl`q
^P1STREET("IS","hexr`o","xg' 4")
4 'gx
^P1STREET("IS","hexr`o","xg' 47")
47 'gx
^P1STREET("IS","hiiad")
daiih
^P1STREET("IS","hiiad","xg' 16")
16 'gx
^P1STREET("IS","hiiad","xg' 17")
17 'gx
^P1STREET("IS","hiiad","xg' 20")
20 'gx
^P1STREET("IS","hiiad","xg' 21")
21 'gx
^P1STREET("IS","hiiad","xg' 30")
30 'gx
^P1STREET("IS","hiiad","xg' 4")
4 'gx
^P1STREET("IS","hiiad","xg' 47")
47 'gx
^P1STREET("IS","hixd")
dxih
^P1STREET("IS","hixd","` ql`m")
m`lq `
^P1STREET("IS","hixd","`l aqd")
dqa l`
^P1STREET("IS","hixd","`l b'lil")
lil'b l`
^P1STREET("IS","hixd","dneail")
liaend
^P1STREET("IS","hixd","gex-`lpc`")
`cpl`-xeg
^P1STREET("IS","hixd","h`xw rac `lgi")
igl` car wx`h
^P1STREET("IS","hixd","xg' 2")
2 'gx
^P1STREET("IS","hixd","xg' 24")
24 'gx
^P1STREET("IS","hixd","xg' 30")
30 'gx
^P1STREET("IS","hixd","xg' 35")
35 'gx
^P1STREET("IS","hixd","xg' 4")
4 'gx
^P1STREET("IS","hixz idecd")
dcedi zxih
^P1STREET("IS","hixz kxnl")
lnxk zxih
^P1STREET("IS","hixz kxnl",5)
5
^P1STREET("IS","hixz kxnl","`""c bexceo")
oecxeb c"`
^P1STREET("IS","hixz kxnl","`v""l")
l"v`
^P1STREET("IS","hixz kxnl","`ykel")
leky`
^P1STREET("IS","hixz kxnl","`zbx")
xbz`
^P1STREET("IS","hixz kxnl","ai`liw")
wil`ia
^P1STREET("IS","hixz kxnl","ao vai")
iav oa
^P1STREET("IS","hixz kxnl","axpx")
xpxa
^P1STREET("IS","hixz kxnl","biex` ieqthl")
lhtqei `xeib
^P1STREET("IS","hixz kxnl","cec pexi")
ixep cec
^P1STREET("IS","hixz kxnl","cwx")
xwc
^P1STREET("IS","hixz kxnl","d`ld")
dl`d
^P1STREET("IS","hixz kxnl","d`leo")
oel`d
^P1STREET("IS","hixz kxnl","daxey")
yexad
^P1STREET("IS","hixz kxnl","dcwl")
lwcd
^P1STREET("IS","hixz kxnl","ddbpd")
dpbdd
^P1STREET("IS","hixz kxnl","dexcim")
micxed
^P1STREET("IS","hixz kxnl","dfiz")
zifd
^P1STREET("IS","hixz kxnl","dgxea")
aexgd
^P1STREET("IS","hixz kxnl","dnl`kd")
dk`lnd
^P1STREET("IS","hixz kxnl","dnrtilim")
militrnd
^P1STREET("IS","hixz kxnl","dqcp`")
`pcqd
^P1STREET("IS","hixz kxnl","dqzcxez")
zexczqd
^P1STREET("IS","hixz kxnl","drvn`ez")
ze`nvrd
^P1STREET("IS","hixz kxnl","dthiy")
yihtd
^P1STREET("IS","hixz kxnl","dtln""g")
g"nltd
^P1STREET("IS","hixz kxnl","dvpgpim")
mipgpvd
^P1STREET("IS","hixz kxnl","dxa eiipxia")
aixpiie axd
^P1STREET("IS","hixz kxnl","dxa fxaia")
aiaxf axd
^P1STREET("IS","hixz kxnl","dxa nyd nxcki")
ikcxn dyn axd
^P1STREET("IS","hixz kxnl","dxa wew")
wew axd
^P1STREET("IS","hixz kxnl","dxces")
secxd
^P1STREET("IS","hixz kxnl","dxineo")
oenixd
^P1STREET("IS","hixz kxnl","dxvl")
lvxd
^P1STREET("IS","hixz kxnl","dygxex")
xexgyd
^P1STREET("IS","hixz kxnl","dyixieo")
oeixiyd
^P1STREET("IS","hixz kxnl","dzpetd")
dtepzd
^P1STREET("IS","hixz kxnl","dzwend")
dnewzd
^P1STREET("IS","hixz kxnl","eivno")
onvie
^P1STREET("IS","hixz kxnl","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","hixz kxnl","i""` dqtexh`im")
mi`hxetqd `"i
^P1STREET("IS","hixz kxnl","iefnd")
dnfei
^P1STREET("IS","hixz kxnl","ieqthl")
lhtqei
^P1STREET("IS","hixz kxnl","k""b iexci dqixd")
dxiqd icxei b"k
^P1STREET("IS","hixz kxnl","kdo")
odk
^P1STREET("IS","hixz kxnl","kkx ixeylim")
milyexi xkk
^P1STREET("IS","hixz kxnl","kkx y.i. rbpeo")
oepbr .i.y xkk
^P1STREET("IS","hixz kxnl","kkx yxz")
zxy xkk
^P1STREET("IS","hixz kxnl","klpiez")
zeiplk
^P1STREET("IS","hixz kxnl","kxnlim")
milnxk
^P1STREET("IS","hixz kxnl","lei `ykel")
leky` iel
^P1STREET("IS","hixz kxnl","lpi`ce rfx`")
`xfr ec`ipl
^P1STREET("IS","hixz kxnl","nevwio")
oiwven
^P1STREET("IS","hixz kxnl","nrld pes")
sep dlrn
^P1STREET("IS","hixz kxnl","nyd yxz")
zxy dyn
^P1STREET("IS","hixz kxnl","ped `li`q")
q`il` dep
^P1STREET("IS","hixz kxnl","ped blim")
milb dep
^P1STREET("IS","hixz kxnl","pgem gz")
zg megp
^P1STREET("IS","hixz kxnl","pxwiqim")
miqiwxp
^P1STREET("IS","hixz kxnl","pzo `laf")
fal` ozp
^P1STREET("IS","hixz kxnl","qipi")
ipiq
^P1STREET("IS","hixz kxnl","qn' dnrtil")
litrnd 'nq
^P1STREET("IS","hixz kxnl","qn' dzwend")
dnewzd 'nq
^P1STREET("IS","hixz kxnl","revnd")
dnver
^P1STREET("IS","hixz kxnl","rnicx")
xcinr
^P1STREET("IS","hixz kxnl","vd""l")
l"dv
^P1STREET("IS","hixz kxnl","waeu bleiez")
zeielb ueaw
^P1STREET("IS","hixz kxnl","wicnd")
dnciw
^P1STREET("IS","hixz kxnl","wxo diqec")
ceqid oxw
^P1STREET("IS","hixz kxnl","xfi`l")
l`ifx
^P1STREET("IS","hixz kxnl","xna""m")
m"anx
^P1STREET("IS","hixz kxnl","xna""o")
o"anx
^P1STREET("IS","hixz kxnl","yf""x")
x"fy
^P1STREET("IS","hixz kxnl","yhxiz")
zixhy
^P1STREET("IS","hixz kxnl","yyz dinim")
minid zyy
^P1STREET("IS","hixz vai")
iav zxih
^P1STREET("IS","hl ygx")
xgy lh
^P1STREET("IS","hl ygx","dixco")
ocxid
^P1STREET("IS","hneo")
oenh
^P1STREET("IS","hnxd")
dxnh
^P1STREET("IS","hnxd","xg' 1")
1 'gx
^P1STREET("IS","hnxd","xg' 10")
10 'gx
^P1STREET("IS","hnxd","xg' 14")
14 'gx
^P1STREET("IS","hnxd","xg' 15")
15 'gx
^P1STREET("IS","hnxd","xg' 16")
16 'gx
^P1STREET("IS","hnxd","xg' 18")
18 'gx
^P1STREET("IS","hnxd","xg' 19")
19 'gx
^P1STREET("IS","hnxd","xg' 20")
20 'gx
^P1STREET("IS","hnxd","xg' 28")
28 'gx
^P1STREET("IS","hnxd","xg' 3")
3 'gx
^P1STREET("IS","hnxd","xg' 3048")
3048 'gx
^P1STREET("IS","hnxd","xg' 32")
32 'gx
^P1STREET("IS","hnxd","xg' 4")
4 'gx
^P1STREET("IS","hnxd","xg' 5")
5 'gx
^P1STREET("IS","hnxd","xg' 6")
6 'gx
^P1STREET("IS","hnxd","xg' 7")
7 'gx
^P1STREET("IS","hnxd","xg' 8")
8 'gx
^P1STREET("IS","hnxd","xg' 9")
9 'gx
^P1STREET("IS","hnxd","xg' 91")
91 'gx
^P1STREET("IS","hnxd ifxr`l")
l`rxfi dxnh
^P1STREET("IS","hp`")
`ph
^P1STREET("IS","hp`","hp` renxim")
mixner `ph
^P1STREET("IS","hp`","xkqim")
miqkx
^P1STREET("IS","hphexd")
dxehph
^P1STREET("IS","hxr`o")
o`rxh
^P1STREET("IS","hxr`o","xg' 1")
1 'gx
^P1STREET("IS","hxr`o","xg' 114")
114 'gx
^P1STREET("IS","hxr`o","xg' 2")
2 'gx
^P1STREET("IS","hxr`o","xg' 21")
21 'gx
^P1STREET("IS","hxr`o","xg' 3")
3 'gx
^P1STREET("IS","hxr`o","xg' 4")
4 'gx
^P1STREET("IS","i`peg")
gep`i
^P1STREET("IS","i`vic")
civ`i
^P1STREET("IS","iap`l")
l`pai
^P1STREET("IS","iap`l","ao bexieo")
oeixeb oa
^P1STREET("IS","iap`l","dapim")
mipad
^P1STREET("IS","iap`l","dbexo")
oxebd
^P1STREET("IS","iap`l","ddqzcxez")
zexczqdd
^P1STREET("IS","iap`l","dpcia")
aicpd
^P1STREET("IS","iap`l","irwa bexo")
oxeb awri
^P1STREET("IS","iap`l","itxg")
gxti
^P1STREET("IS","iap`l","kpxz")
zxpk
^P1STREET("IS","iap`l","nrio bpim")
mipb oirn
^P1STREET("IS","iap`l","nynx dylyd")
dylyd xnyn
^P1STREET("IS","iap`l","ptzli")
ilztp
^P1STREET("IS","iap`l","qncx")
xcnq
^P1STREET("IS","iapd")
dpai
^P1STREET("IS","iapd","`ae gvix`")
`xivg ea`
^P1STREET("IS","iapd","`aiaiz")
ziaia`
^P1STREET("IS","iapd","`bef")
feb`
^P1STREET("IS","iapd","`bneo")
oenb`
^P1STREET("IS","iapd","`bq")
qb`
^P1STREET("IS","iapd","`dxeo gb'b'")
'b'bg oexd`
^P1STREET("IS","iapd","`fea")
aef`
^P1STREET("IS","iapd","`ixiq")
qixi`
^P1STREET("IS","iapd","`ld")
dl`
^P1STREET("IS","iapd","`qaqhepim")
mipehqaq`
^P1STREET("IS","iapd","`txqneo")
oenqxt`
^P1STREET("IS","iapd","`xal")
lax`
^P1STREET("IS","iapd","`xf")
fx`
^P1STREET("IS","iapd","`zxeb")
bexz`
^P1STREET("IS","iapd","aekxiq")
qixkea
^P1STREET("IS","iapd","ao fk`i")
i`kf oa
^P1STREET("IS","iapd","axey")
yexa
^P1STREET("IS","iapd","axwo")
owxa
^P1STREET("IS","iapd","ayo")
oya
^P1STREET("IS","iapd","ben`")
`neb
^P1STREET("IS","iapd","bexceo")
oecxeb
^P1STREET("IS","iapd","biaexi dgiil")
liigd ixeaib
^P1STREET("IS","iapd","bliz")
zilb
^P1STREET("IS","iapd","blrc")
crlb
^P1STREET("IS","iapd","cec `lrfx")
xfrl` cec
^P1STREET("IS","iapd","cekitz")
ztikec
^P1STREET("IS","iapd","cela")
alec
^P1STREET("IS","iapd","cezo")
ozec
^P1STREET("IS","iapd","cm dnkaim")
miaknd mc
^P1STREET("IS","iapd","co")
oc
^P1STREET("IS","iapd","co napd")
dpan oc
^P1STREET("IS","iapd","ctpd")
dptc
^P1STREET("IS","iapd","cxj dim")
mid jxc
^P1STREET("IS","iapd","cxj x`yl""v")
v"ly`x jxc
^P1STREET("IS","iapd","cxj xgeaez")
zeaegx jxc
^P1STREET("IS","iapd","d`eno")
one`d
^P1STREET("IS","iapd","d`exbim")
mibxe`d
^P1STREET("IS","iapd","d`exo")
oxe`d
^P1STREET("IS","iapd","d`hc")
ch`d
^P1STREET("IS","iapd","d`ixeq")
qexi`d
^P1STREET("IS","iapd","d`leo")
oel`d
^P1STREET("IS","iapd","d`nex`im")
mi`xen`d
^P1STREET("IS","iapd","d`v""l")
l"v`d
^P1STREET("IS","iapd","d`wlitheq")
qehtilw`d
^P1STREET("IS","iapd","d`yl")
ly`d
^P1STREET("IS","iapd","dbelo")
olebd
^P1STREET("IS","iapd","dblaer")
realbd
^P1STREET("IS","iapd","dbto")
otbd
^P1STREET("IS","iapd","dcq")
qcd
^P1STREET("IS","iapd","dcwl")
lwcd
^P1STREET("IS","iapd","dcxem")
mexcd
^P1STREET("IS","iapd","dcxex")
xexcd
^P1STREET("IS","iapd","dfiz")
zifd
^P1STREET("IS","iapd","dgavlz")
zlvagd
^P1STREET("IS","iapd","dgicwl")
lwcigd
^P1STREET("IS","iapd","dglnepiz")
zipenlgd
^P1STREET("IS","iapd","dgxy")
yxgd
^P1STREET("IS","iapd","dixco")
ocxid
^P1STREET("IS","iapd","dixnej")
jenxid
^P1STREET("IS","iapd","dixweo")
oewxid
^P1STREET("IS","iapd","dlilj")
jlild
^P1STREET("IS","iapd","dnbcl")
lcbnd
^P1STREET("IS","iapd","dniqa")
aqind
^P1STREET("IS","iapd","dnl`kd")
dk`lnd
^P1STREET("IS","iapd","dnteg")
getnd
^P1STREET("IS","iapd","dpai`im")
mi`iapd
^P1STREET("IS","iapd","dpba")
abpd
^P1STREET("IS","iapd","dpetx")
xtepd
^P1STREET("IS","iapd","dpyi`im")
mi`iypd
^P1STREET("IS","iapd","dpyx")
xypd
^P1STREET("IS","iapd","dqgla")
algqd
^P1STREET("IS","iapd","draecd")
dceard
^P1STREET("IS","iapd","drbex")
xebrd
^P1STREET("IS","iapd","drely")
ylerd
^P1STREET("IS","iapd","drnl")
lnrd
^P1STREET("IS","iapd","drxad")
daxrd
^P1STREET("IS","iapd","drxrx")
xrxrd
^P1STREET("IS","iapd","dtehepid")
dipehetd
^P1STREET("IS","iapd","dtxqd")
dqxtd
^P1STREET("IS","iapd","dtxz")
zxtd
^P1STREET("IS","iapd","dvls")
slvd
^P1STREET("IS","iapd","dwipneo")
oenpiwd
^P1STREET("IS","iapd","dwiyeo")
oeyiwd
^P1STREET("IS","iapd","dx fizim")
mizif xd
^P1STREET("IS","iapd","dx nixeo")
oexin xd
^P1STREET("IS","iapd","dx pae")
eap xd
^P1STREET("IS","iapd","dx qipi")
ipiq xd
^P1STREET("IS","iapd","dx`yepim")
mipey`xd
^P1STREET("IS","iapd","dxces")
secxd
^P1STREET("IS","iapd","dyard")
drayd
^P1STREET("IS","iapd","dyenxeo")
oexneyd
^P1STREET("IS","iapd","dyethim")
mihteyd
^P1STREET("IS","iapd","dyeypim")
mipyeyd
^P1STREET("IS","iapd","dyihd")
dhiyd
^P1STREET("IS","iapd","dyiwnd")
dnwiyd
^P1STREET("IS","iapd","dywc")
cwyd
^P1STREET("IS","iapd","dyxeo")
oexyd
^P1STREET("IS","iapd","dz`pd")
dp`zd
^P1STREET("IS","iapd","dzexneq")
qenxezd
^P1STREET("IS","iapd","dzlzo")
ozlzd
^P1STREET("IS","iapd","dztef")
fetzd
^P1STREET("IS","iapd","dzteg")
getzd
^P1STREET("IS","iapd","fdaiz")
ziadf
^P1STREET("IS","iapd","fnix")
xinf
^P1STREET("IS","iapd","galal")
lalag
^P1STREET("IS","iapd","gavlz dges")
segd zlvag
^P1STREET("IS","iapd","ghiaz barzi")
izrab zaihg
^P1STREET("IS","iapd","gnpiz")
zipng
^P1STREET("IS","iapd","gva")
avg
^P1STREET("IS","iapd","gxea")
aexg
^P1STREET("IS","iapd","gxneo")
oenxg
^P1STREET("IS","iapd","gxviz")
zivxg
^P1STREET("IS","iapd","i""c")
c"i
^P1STREET("IS","iapd","iqnio")
oinqi
^P1STREET("IS","iapd","irxd")
dxri
^P1STREET("IS","iapd","iwipheo")
oehpiwi
^P1STREET("IS","iapd","keka dixco")
ocxid akek
^P1STREET("IS","iapd","kekaiz")
ziakek
^P1STREET("IS","iapd","kgliz")
zilgk
^P1STREET("IS","iapd","klpiz")
ziplk
^P1STREET("IS","iapd","kxnl")
lnxk
^P1STREET("IS","iapd","ler d`xi")
ix`d rel
^P1STREET("IS","iapd","liapd")
dpail
^P1STREET("IS","iapd","lineo")
oenil
^P1STREET("IS","iapd","navr cpi")
ipc rvan
^P1STREET("IS","iapd","navr giim")
miig rvan
^P1STREET("IS","iapd","navr gixm")
mxig rvan
^P1STREET("IS","iapd","navr ie`a")
a`ei rvan
^P1STREET("IS","iapd","navr iepzo")
ozpei rvan
^P1STREET("IS","iapd","navr reacd")
dcaer rvan
^P1STREET("IS","iapd","navr wcy")
ycw rvan
^P1STREET("IS","iapd","navr ynyeo")
oeyny rvan
^P1STREET("IS","iapd","navr zy""g")
g"yz rvan
^P1STREET("IS","iapd","neqc vetid")
ditev cqen
^P1STREET("IS","iapd","nexid")
dixen
^P1STREET("IS","iapd","nexo")
oxen
^P1STREET("IS","iapd","nlki idecd")
dcedi ikln
^P1STREET("IS","iapd","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","iapd","nqild")
dliqn
^P1STREET("IS","iapd","nraxd")
dxarn
^P1STREET("IS","iapd","nxbpiz")
zipbxn
^P1STREET("IS","iapd","nyrel d`cx")
xc`d leryn
^P1STREET("IS","iapd","nyrel d`lnebo")
obenl`d leryn
^P1STREET("IS","iapd","nyrel d`txqw")
wqxt`d leryn
^P1STREET("IS","iapd","nyrel daedipid")
dipidead leryn
^P1STREET("IS","iapd","nyrel dbei`ad")
da`iebd leryn
^P1STREET("IS","iapd","nyrel ddcxim")
mixcdd leryn
^P1STREET("IS","iapd","nyrel dfiz")
zifd leryn
^P1STREET("IS","iapd","nyrel dgaey")
yeagd leryn
^P1STREET("IS","iapd","nyrel dkxnim")
minxkd leryn
^P1STREET("IS","iapd","nyrel dnpbe")
ebpnd leryn
^P1STREET("IS","iapd","nyrel dqibleo")
oelbiqd leryn
^P1STREET("IS","iapd","nyrel dtiweq")
qewitd leryn
^P1STREET("IS","iapd","nyrel dtw`o")
o`wtd leryn
^P1STREET("IS","iapd","nyrel dvax")
xavd leryn
^P1STREET("IS","iapd","nyrel dweweq")
qewewd leryn
^P1STREET("IS","iapd","nyrel dwhla")
alhwd leryn
^P1STREET("IS","iapd","nyrel dz`yex")
xey`zd leryn
^P1STREET("IS","iapd","nyrel dzcdx")
xdczd leryn
^P1STREET("IS","iapd","nyrel dzez")
zezd leryn
^P1STREET("IS","iapd","nyrel dztef")
fetzd leryn
^P1STREET("IS","iapd","nyrel klil dgexy")
yxegd lilk leryn
^P1STREET("IS","iapd","nyrel qdxeo")
oexdq leryn
^P1STREET("IS","iapd","nyrel vtvtd")
dtvtv leryn
^P1STREET("IS","iapd","pdxepiz")
zipexdp
^P1STREET("IS","iapd","pexiz")
zixep
^P1STREET("IS","iapd","pfniz")
zinfp
^P1STREET("IS","iapd","pgl gxis")
sixg lgp
^P1STREET("IS","iapd","pgl rxebez")
zebexr lgp
^P1STREET("IS","iapd","pgl telb")
blet lgp
^P1STREET("IS","iapd","pgl yexw")
wxey lgp
^P1STREET("IS","iapd","pgl ypix")
xipy lgp
^P1STREET("IS","iapd","pgl zpipim")
mipipz lgp
^P1STREET("IS","iapd","pgli`li")
il`ilgp
^P1STREET("IS","iapd","pifniz")
zinfip
^P1STREET("IS","iapd","pivpiz")
zipvip
^P1STREET("IS","iapd","pxwiq")
qiwxp
^P1STREET("IS","iapd","qaieo")
oeiaq
^P1STREET("IS","iapd","qibl")
lbiq
^P1STREET("IS","iapd","qiito")
otiiq
^P1STREET("IS","iapd","qizeepiz")
zipeeziq
^P1STREET("IS","iapd","rc rc")
cr cr
^P1STREET("IS","iapd","rcrc")
crcr
^P1STREET("IS","iapd","reli dbxcem")
mecxbd iler
^P1STREET("IS","iapd","rixiz")
zixir
^P1STREET("IS","iapd","rpal")
lapr
^P1STREET("IS","iapd","rxneo")
oenxr
^P1STREET("IS","iapd","ryie")
eiyr
^P1STREET("IS","iapd","t`xo")
ox`t
^P1STREET("IS","iapd","thl")
lht
^P1STREET("IS","iapd","trnepiz")
zipenrt
^P1STREET("IS","iapd","txb")
bxt
^P1STREET("IS","iapd","v`leo")
oel`v
^P1STREET("IS","iapd","varepi")
iperav
^P1STREET("IS","iapd","vexiz")
zixev
^P1STREET("IS","iapd","vitexo")
oxetiv
^P1STREET("IS","iapd","vx gcy")
ycg xv
^P1STREET("IS","iapd","wexpiz")
zipxew
^P1STREET("IS","iapd","xeaipyhiio")
oiihypiaex
^P1STREET("IS","iapd","xefnxio")
oixnfex
^P1STREET("IS","iapd","xezm")
mzex
^P1STREET("IS","iapd","xg' `'")
'` 'gx
^P1STREET("IS","iapd","xg' a'")
'a 'gx
^P1STREET("IS","iapd","xg' b'")
'b 'gx
^P1STREET("IS","iapd","xg' c'")
'c 'gx
^P1STREET("IS","iapd","xg' d'")
'd 'gx
^P1STREET("IS","iapd","xg' f'")
'f 'gx
^P1STREET("IS","iapd","xg' g'")
'g 'gx
^P1STREET("IS","iapd","xg' h""e")
e"h 'gx
^P1STREET("IS","iapd","xg' h""f")
f"h 'gx
^P1STREET("IS","iapd","xg' i""`")
`"i 'gx
^P1STREET("IS","iapd","xg' i""a")
a"i 'gx
^P1STREET("IS","iapd","xg' i""b")
b"i 'gx
^P1STREET("IS","iapd","xg' i""c")
c"i 'gx
^P1STREET("IS","iapd","xg' i""f")
f"i 'gx
^P1STREET("IS","iapd","xg' i'")
'i 'gx
^P1STREET("IS","iapd","xineo")
oenix
^P1STREET("IS","iapd","xwtz")
ztwx
^P1STREET("IS","iapd","y cxem")
mexc y
^P1STREET("IS","iapd","y gelez")
zeleg y
^P1STREET("IS","iapd","y gqkeo")
oekqg y
^P1STREET("IS","iapd","y hxeniim")
miinexh y
^P1STREET("IS","iapd","y ped reac")
caer dep y
^P1STREET("IS","iapd","y rnicx")
xcinr y
^P1STREET("IS","iapd","yafi")
ifay
^P1STREET("IS","iapd","yc' bo xeed")
deex ob 'cy
^P1STREET("IS","iapd","yc' ce`pi")
ip`ec 'cy
^P1STREET("IS","iapd","yc' dbxi fkxid")
dixkf ixbd 'cy
^P1STREET("IS","iapd","yc' dqpdcxio")
oixcdpqd 'cy
^P1STREET("IS","iapd","yc' drvn`ez")
ze`nvrd 'cy
^P1STREET("IS","iapd","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","iapd","yfis")
sify
^P1STREET("IS","iapd","ygs")
sgy
^P1STREET("IS","iapd","yicleaqwi")
iwqaelciy
^P1STREET("IS","iapd","yig `axdm")
mdxa` giy
^P1STREET("IS","iapd","yps")
spy
^P1STREET("IS","iapd","yxeo")
oexy
^P1STREET("IS","iapd","zaex")
xeaz
^P1STREET("IS","iapd","znx")
xnz
^P1STREET("IS","ibex")
xebi
^P1STREET("IS","ibl")
lbi
^P1STREET("IS","ibl","dlineo")
oenild
^P1STREET("IS","ibl","dxveb")
bevxd
^P1STREET("IS","ic apinio")
oinipa ci
^P1STREET("IS","ic apinio","cxj d`aez")
zea`d jxc
^P1STREET("IS","ic apinio","d`yl")
ly`d
^P1STREET("IS","ic apinio","dpglim")
milgpd
^P1STREET("IS","ic apinio","dx`l")
l`xd
^P1STREET("IS","ic gpd")
dpg ci
^P1STREET("IS","ic nxcki")
ikcxn ci
^P1STREET("IS","ic pzo")
ozp ci
^P1STREET("IS","ic xna""m")
m"anx ci
^P1STREET("IS","icicid")
dicici
^P1STREET("IS","icicid","dapim")
mipad
^P1STREET("IS","idec")
cedi
^P1STREET("IS","idec","`""c bexceo")
oecxeb c"`
^P1STREET("IS","idec","`ao baixel")
lexiab oa`
^P1STREET("IS","idec","`axap`l")
l`paxa`
^P1STREET("IS","idec","`axdm bixeo")
oexib mdxa`
^P1STREET("IS","idec","`bef")
feb`
^P1STREET("IS","idec","`exi nwla")
alwn ixe`
^P1STREET("IS","idec","`lhls")
slhl`
^P1STREET("IS","idec","`li kdo")
odk il`
^P1STREET("IS","idec","`lrfx")
xfrl`
^P1STREET("IS","idec","`ltxh")
hxtl`
^P1STREET("IS","idec","`pilaiu")
uialip`
^P1STREET("IS","idec","`xarz dnipim")
mipind zrax`
^P1STREET("IS","idec","`xlefexea")
aexefelx`
^P1STREET("IS","idec","`ykpfi")
ifpky`
^P1STREET("IS","idec","aeqnio")
oinqea
^P1STREET("IS","idec","ai`liw")
wil`ia
^P1STREET("IS","idec","ail""e")
e"lia
^P1STREET("IS","idec","aiweaqwi")
iwqaewia
^P1STREET("IS","idec","ao bexieo")
oeixeb oa
^P1STREET("IS","idec","ao vai")
iav oa
^P1STREET("IS","idec","ax qino hea")
aeh oniq xa
^P1STREET("IS","idec","axpx")
xpxa
^P1STREET("IS","idec","belcd n`ix")
xi`n dcleb
^P1STREET("IS","idec","biex`")
`xeib
^P1STREET("IS","idec","biex` ieqthl")
lhtqei `xeib
^P1STREET("IS","idec","cxj dgexy")
yxegd jxc
^P1STREET("IS","idec","cxj drvn`ez")
ze`nvrd jxc
^P1STREET("IS","idec","cxj nyd ciio")
oiic dyn jxc
^P1STREET("IS","idec","d`v""l")
l"v`d
^P1STREET("IS","idec","dbcec draxi")
ixard cecbd
^P1STREET("IS","idec","dbto")
otbd
^P1STREET("IS","idec","dcbim")
mibcd
^P1STREET("IS","idec","dcbpim")
mipbcd
^P1STREET("IS","idec","ddbpd")
dpbdd
^P1STREET("IS","idec","dexcim")
micxed
^P1STREET("IS","idec","dgexy")
yxegd
^P1STREET("IS","idec","dgxea")
aexgd
^P1STREET("IS","idec","dgxeyz")
zyexgd
^P1STREET("IS","idec","dgxviz")
zivxgd
^P1STREET("IS","idec","dniiqcim")
micqiind
^P1STREET("IS","idec","dnl`kd")
dk`lnd
^P1STREET("IS","idec","dnrtilim")
militrnd
^P1STREET("IS","idec","dpxwiq")
qiwxpd
^P1STREET("IS","idec","dwepbxq dviepi")
ipeivd qxbpewd
^P1STREET("IS","idec","dxe`""d")
d"`exd
^P1STREET("IS","idec","dxveb")
bevxd
^P1STREET("IS","idec","dxvl")
lvxd
^P1STREET("IS","idec","dyiteo")
oetiyd
^P1STREET("IS","idec","dylem")
melyd
^P1STREET("IS","idec","dyleyd")
dyelyd
^P1STREET("IS","idec","dyrexd")
dxeryd
^P1STREET("IS","idec","dz`pd")
dp`zd
^P1STREET("IS","idec","dznx")
xnzd
^P1STREET("IS","idec","dzryid")
diyrzd
^P1STREET("IS","idec","eivno")
onvie
^P1STREET("IS","idec","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","idec","f`a eipdeif")
fiedpie a`f
^P1STREET("IS","idec","gfpeaiu")
uiaepfg
^P1STREET("IS","idec","gpd qpy")
ypq dpg
^P1STREET("IS","idec","gqic nyd")
dyn ciqg
^P1STREET("IS","idec","hppa`em")
me`apph
^P1STREET("IS","idec","hxentlcex")
xecltnexh
^P1STREET("IS","idec","idecd dlei")
ield dcedi
^P1STREET("IS","idec","idepzo pzpide")
edipzp ozpedi
^P1STREET("IS","idec","idlem")
meldi
^P1STREET("IS","idec","iepd")
dpei
^P1STREET("IS","idec","iepzo")
ozpei
^P1STREET("IS","idec","ivgw ycd")
dcy wgvi
^P1STREET("IS","idec","kkx ycd")
dcy xkk
^P1STREET("IS","idec","kvplqeo")
oeqlpvk
^P1STREET("IS","idec","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","idec","lei `ykel")
leky` iel
^P1STREET("IS","idec","nae` `zxeb")
bexz` `ean
^P1STREET("IS","idec","nae` axepiwd")
dwipexa `ean
^P1STREET("IS","idec","nae` clid")
dilc `ean
^P1STREET("IS","idec","nae` d`ixeq")
qexi`d `ean
^P1STREET("IS","idec","nae` d`ld")
dl`d `ean
^P1STREET("IS","idec","nae` daxey")
yexad `ean
^P1STREET("IS","idec","nae` dben`")
`nebd `ean
^P1STREET("IS","idec","nae` dcela")
alecd `ean
^P1STREET("IS","idec","nae` dcq")
qcd `ean
^P1STREET("IS","idec","nae` dfiz")
zifd `ean
^P1STREET("IS","idec","nae` dxces")
secxd `ean
^P1STREET("IS","idec","nae` exapd")
dpaxe `ean
^P1STREET("IS","idec","nae` fdaiz")
ziadf `ean
^P1STREET("IS","idec","nae` gavlz")
zlvag `ean
^P1STREET("IS","idec","nae` gihd")
dhig `ean
^P1STREET("IS","idec","nae` hetg")
gteh `ean
^P1STREET("IS","idec","nae` iqnio")
oinqi `ean
^P1STREET("IS","idec","nae` lela")
alel `ean
^P1STREET("IS","idec","nae` rxad")
daxr `ean
^P1STREET("IS","idec","nae` yiaelz")
zleaiy `ean
^P1STREET("IS","idec","nedliax")
xailden
^P1STREET("IS","idec","nevwio")
oiwven
^P1STREET("IS","idec","nlnc")
cnln
^P1STREET("IS","idec","nxac dwqnim")
minqwd caxn
^P1STREET("IS","idec","nxkeq cec")
cec qekxn
^P1STREET("IS","idec","pexc`e")
e`cxep
^P1STREET("IS","idec","pil""i")
i"lip
^P1STREET("IS","idec","piqo hexv'io")
oi'vxeh oqip
^P1STREET("IS","idec","qewpiw")
wipweq
^P1STREET("IS","idec","qixwio")
oiwxiq
^P1STREET("IS","idec","qrcid gzekd")
dkezg dicrq
^P1STREET("IS","idec","ru d`txqw")
wqxt`d ur
^P1STREET("IS","idec","txgi ax")
xa igxt
^P1STREET("IS","idec","vai iyi")
iyi iav
^P1STREET("IS","idec","vd""l")
l"dv
^P1STREET("IS","idec","vewxno")
onxwev
^P1STREET("IS","idec","wceyi nvxim")
mixvn iyecw
^P1STREET("IS","idec","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","idec","wtlo")
oltw
^P1STREET("IS","idec","wtlpqwi")
iwqpltw
^P1STREET("IS","idec","wxo wiinz")
zniiw oxw
^P1STREET("IS","idec","xg 22")
22 gx
^P1STREET("IS","idec","xg 23")
23 gx
^P1STREET("IS","idec","xg 3")
3 gx
^P1STREET("IS","idec","xg 711")
711 gx
^P1STREET("IS","idec","xg' 1")
1 'gx
^P1STREET("IS","idec","xg' 11")
11 'gx
^P1STREET("IS","idec","xg' 12")
12 'gx
^P1STREET("IS","idec","xg' 15")
15 'gx
^P1STREET("IS","idec","xg' 16")
16 'gx
^P1STREET("IS","idec","xg' 18")
18 'gx
^P1STREET("IS","idec","xg' 19")
19 'gx
^P1STREET("IS","idec","xg' 20")
20 'gx
^P1STREET("IS","idec","xg' 24")
24 'gx
^P1STREET("IS","idec","xg' 26")
26 'gx
^P1STREET("IS","idec","xg' 28")
28 'gx
^P1STREET("IS","idec","xg' 29")
29 'gx
^P1STREET("IS","idec","xg' 32")
32 'gx
^P1STREET("IS","idec","xg' 4")
4 'gx
^P1STREET("IS","idec","xg' 5")
5 'gx
^P1STREET("IS","idec","xg' 7")
7 'gx
^P1STREET("IS","idec","xg' 8")
8 'gx
^P1STREET("IS","idec","xineo")
oenix
^P1STREET("IS","idec","xna""m")
m"anx
^P1STREET("IS","idec","xnf")
fnx
^P1STREET("IS","idec","yafi")
ifay
^P1STREET("IS","idec","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","idec","yc' npgm abio")
oiba mgpn 'cy
^P1STREET("IS","idec","yf""x")
x"fy
^P1STREET("IS","idec","yiaelz yerl")
lrey zleaiy
^P1STREET("IS","idec","yiaz vieo")
oeiv zaiy
^P1STREET("IS","idec","yihxiz")
zixhiy
^P1STREET("IS","idec","ytix`")
`xity
^P1STREET("IS","idec","yyz dinim")
minid zyy
^P1STREET("IS","idec","z`yex")
xey`z
^P1STREET("IS","idec","zcdx")
xdcz
^P1STREET("IS","idec - nepeqeo")
oeqepen - cedi
^P1STREET("IS","idec - nepeqeo","idlem")
meldi
^P1STREET("IS","idec - nepeqeo","vd""l")
l"dv
^P1STREET("IS","iectz")
ztcei
^P1STREET("IS","iectz","dbto")
otbd
^P1STREET("IS","ifxr`l")
l`rxfi
^P1STREET("IS","ifxrm")
mrxfi
^P1STREET("IS","igc")
cgi
^P1STREET("IS","igirm")
mrigi
^P1STREET("IS","in`")
`ni
^P1STREET("IS","ipea")
aepi
^P1STREET("IS","ipea","d`exo")
oxe`d
^P1STREET("IS","ipea","nae` dbto")
otbd `ean
^P1STREET("IS","ipea","nexc dz`pd")
dp`zd cxen
^P1STREET("IS","ipeo")
oepi
^P1STREET("IS","iqec dnrld")
dlrnd ceqi
^P1STREET("IS","iqec dnrld","cxj daeqzo")
ozqead jxc
^P1STREET("IS","iqec dnrld","cxj dynexd")
dxenyd jxc
^P1STREET("IS","iqec dnrld","d`bm")
mb`d
^P1STREET("IS","iqec dnrld","d`lepim")
mipel`d
^P1STREET("IS","iqec dnrld","dbto")
otbd
^P1STREET("IS","iqec dnrld","dexcim")
micxed
^P1STREET("IS","iqec dnrld","dfiz")
zifd
^P1STREET("IS","iqec dnrld","dglevim")
mivelgd
^P1STREET("IS","iqec dnrld","dniiqcim")
micqiind
^P1STREET("IS","iqec dnrld","dxgad")
dagxd
^P1STREET("IS","iqec dnrld","dywc")
cwyd
^P1STREET("IS","iqecez")
zeceqi
^P1STREET("IS","iqrex")
xerqi
^P1STREET("IS","irxd")
dxri
^P1STREET("IS","irxiz")
zixri
^P1STREET("IS","irxiz","dcay")
yacd
^P1STREET("IS","itir")
riti
^P1STREET("IS","itir","`l `flio")
oilf` l`
^P1STREET("IS","itir","`l beflo")
olfeb l`
^P1STREET("IS","itir","`l gx`b")
b`xg l`
^P1STREET("IS","itir","`la`al")
la`al`
^P1STREET("IS","itir","`lbaali")
ilaabl`
^P1STREET("IS","itir","`lbnl")
lnbl`
^P1STREET("IS","itir","`lneklq")
qlkenl`
^P1STREET("IS","itir","`lnpix")
xipnl`
^P1STREET("IS","itir","`lpe`x")
x`epl`
^P1STREET("IS","itir","`lpex")
xepl`
^P1STREET("IS","itir","glz agx")
xga zlg
^P1STREET("IS","itir","npcl`l")
l`lcpn
^P1STREET("IS","itir","qixi")
ixiq
^P1STREET("IS","itir","rvew")
wevr
^P1STREET("IS","itir","xg' 100")
100 'gx
^P1STREET("IS","itir","xg' 105")
105 'gx
^P1STREET("IS","itir","xg' 107")
107 'gx
^P1STREET("IS","itir","xg' 109")
109 'gx
^P1STREET("IS","itir","xg' 133")
133 'gx
^P1STREET("IS","itir","xg' 14")
14 'gx
^P1STREET("IS","itir","xg' 145")
145 'gx
^P1STREET("IS","itir","xg' 15")
15 'gx
^P1STREET("IS","itir","xg' 18")
18 'gx
^P1STREET("IS","itir","xg' 180")
180 'gx
^P1STREET("IS","itir","xg' 188")
188 'gx
^P1STREET("IS","itir","xg' 205")
205 'gx
^P1STREET("IS","itir","xg' 210")
210 'gx
^P1STREET("IS","itir","xg' 225")
225 'gx
^P1STREET("IS","itir","xg' 230")
230 'gx
^P1STREET("IS","itir","xg' 235")
235 'gx
^P1STREET("IS","itir","xg' 238")
238 'gx
^P1STREET("IS","itir","xg' 240")
240 'gx
^P1STREET("IS","itir","xg' 250")
250 'gx
^P1STREET("IS","itir","xg' 41")
41 'gx
^P1STREET("IS","itir","xg' 42")
42 'gx
^P1STREET("IS","itir","xg' 6")
6 'gx
^P1STREET("IS","itrz")
zrti
^P1STREET("IS","itzg")
gzti
^P1STREET("IS","iviu")
uivi
^P1STREET("IS","iviu","dfiz")
zifd
^P1STREET("IS","iviu","dznx")
xnzd
^P1STREET("IS","iwem")
mewi
^P1STREET("IS","iwix")
xiwi
^P1STREET("IS","iwix","dznx")
xnzd
^P1STREET("IS","iwix","nyrel dgexy")
yxegd leryn
^P1STREET("IS","iwix","yc' dx`yepim")
mipey`xd 'cy
^P1STREET("IS","iwprm")
mrpwi
^P1STREET("IS","iwprm","`bxd")
dxb`
^P1STREET("IS","iwprm","`tw")
wt`
^P1STREET("IS","iwprm","`xal")
lax`
^P1STREET("IS","iwprm","`yl")
ly`
^P1STREET("IS","iwprm","cliez")
zeilc
^P1STREET("IS","iwprm","cxj drnw")
wnrd jxc
^P1STREET("IS","iwprm","d`expim")
mipxe`d
^P1STREET("IS","iwprm","d`ilpez")
zepli`d
^P1STREET("IS","iwprm","d`ixiqim")
miqixi`d
^P1STREET("IS","iwprm","d`lepim")
mipel`d
^P1STREET("IS","iwprm","d`xfim")
mifx`d
^P1STREET("IS","iwprm","dbiaexim")
mixeaibd
^P1STREET("IS","iwprm","dcec`im")
mi`cecd
^P1STREET("IS","iwprm","ddcq")
qcdd
^P1STREET("IS","iwprm","ddxcetim")
mitecxdd
^P1STREET("IS","iwprm","dexcim")
micxed
^P1STREET("IS","iwprm","dgvapi")
ipavgd
^P1STREET("IS","iwprm","dgxviz")
zivxgd
^P1STREET("IS","iwprm","divixd")
dxivid
^P1STREET("IS","iwprm","dixco")
ocxid
^P1STREET("IS","iwprm","dixnej")
jenxid
^P1STREET("IS","iwprm","dncr")
rcnd
^P1STREET("IS","iwprm","dnl`kd")
dk`lnd
^P1STREET("IS","iwprm","dnxbpiz")
zipbxnd
^P1STREET("IS","iwprm","drxad")
daxrd
^P1STREET("IS","iwprm","dtrnepiz")
zipenrtd
^P1STREET("IS","iwprm","dv`lim")
mil`vd
^P1STREET("IS","iwprm","dyihd")
dhiyd
^P1STREET("IS","iwprm","dywc")
cwyd
^P1STREET("IS","iwprm","dywnd")
dnwyd
^P1STREET("IS","iwprm","dznx")
xnzd
^P1STREET("IS","iwprm","irx d`ecm")
mce`d xri
^P1STREET("IS","iwprm","itd pes")
sep dti
^P1STREET("IS","iwprm","klpiez")
zeiplk
^P1STREET("IS","iwprm","nivx")
xvin
^P1STREET("IS","iwprm","petx")
xtep
^P1STREET("IS","iwprm","pgl wxz")
zxw lgp
^P1STREET("IS","iwprm","qibliz")
zilbiq
^P1STREET("IS","iwprm","yc' dx`yepim")
mipey`xd 'cy
^P1STREET("IS","iwprm riliz")
zilir mrpwi
^P1STREET("IS","iwprm riliz","`aihl")
lhia`
^P1STREET("IS","iwprm riliz","`exhl")
lhxe`
^P1STREET("IS","iwprm riliz","`iznx")
xnzi`
^P1STREET("IS","iwprm riliz","`kfia")
aifk`
^P1STREET("IS","iwprm riliz","`teo")
oet`
^P1STREET("IS","iwprm riliz","`tw")
wt`
^P1STREET("IS","iwprm riliz","`xal")
lax`
^P1STREET("IS","iwprm riliz","aphl")
lhpa
^P1STREET("IS","iwprm riliz","axw")
wxa
^P1STREET("IS","iwprm riliz","barz dnbcl")
lcbnd zrab
^P1STREET("IS","iwprm riliz","belo")
oleb
^P1STREET("IS","iwprm riliz","bepo")
opeb
^P1STREET("IS","iwprm riliz","caexd")
dxeac
^P1STREET("IS","iwprm riliz","cliez")
zeilc
^P1STREET("IS","iwprm riliz","co")
oc
^P1STREET("IS","iwprm riliz","cxj b`elim")
mile`b jxc
^P1STREET("IS","iwprm riliz","d`exo")
oxe`d
^P1STREET("IS","iwprm riliz","d`expim")
mipxe`d
^P1STREET("IS","iwprm riliz","d`ild")
dli`d
^P1STREET("IS","iwprm riliz","d`ilpez")
zepli`d
^P1STREET("IS","iwprm riliz","d`ixiqim")
miqixi`d
^P1STREET("IS","iwprm riliz","d`ld")
dl`d
^P1STREET("IS","iwprm riliz","d`lepim")
mipel`d
^P1STREET("IS","iwprm riliz","d`xfim")
mifx`d
^P1STREET("IS","iwprm riliz","dapi`q")
q`ipad
^P1STREET("IS","iwprm riliz","daxeyim")
miyexad
^P1STREET("IS","iwprm riliz","dbiaexim")
mixeaibd
^P1STREET("IS","iwprm riliz","dblrc")
crlbd
^P1STREET("IS","iwprm riliz","dcec`im")
mi`cecd
^P1STREET("IS","iwprm riliz","dcq")
qcd
^P1STREET("IS","iwprm riliz","dcwl")
lwcd
^P1STREET("IS","iwprm riliz","ddxcetim")
mitecxdd
^P1STREET("IS","iwprm riliz","dexcim")
micxed
^P1STREET("IS","iwprm riliz","dgvapi")
ipavgd
^P1STREET("IS","iwprm riliz","dgxneo")
oenxgd
^P1STREET("IS","iwprm riliz","dgxviz")
zivxgd
^P1STREET("IS","iwprm riliz","diqnio")
oinqid
^P1STREET("IS","iwprm riliz","divixd")
dxivid
^P1STREET("IS","iwprm riliz","dixco")
ocxid
^P1STREET("IS","iwprm riliz","dklpiz")
ziplkd
^P1STREET("IS","iwprm riliz","dncr")
rcnd
^P1STREET("IS","iwprm riliz","dnivx")
xvind
^P1STREET("IS","iwprm riliz","dnl`kd")
dk`lnd
^P1STREET("IS","iwprm riliz","dnxbpiz")
zipbxnd
^P1STREET("IS","iwprm riliz","dpexiez")
zeixepd
^P1STREET("IS","iwprm riliz","dqglaim")
mialgqd
^P1STREET("IS","iwprm riliz","dqibliz")
zilbiqd
^P1STREET("IS","iwprm riliz","drxad")
daxrd
^P1STREET("IS","iwprm riliz","dtrnepiz")
zipenrtd
^P1STREET("IS","iwprm riliz","dv`lim")
mil`vd
^P1STREET("IS","iwprm riliz","dxezm")
mzexd
^P1STREET("IS","iwprm riliz","dxineo")
oenixd
^P1STREET("IS","iwprm riliz","dxwtez")
zetwxd
^P1STREET("IS","iwprm riliz","dyihd")
dhiyd
^P1STREET("IS","iwprm riliz","dywc")
cwyd
^P1STREET("IS","iwprm riliz","dywnd")
dnwyd
^P1STREET("IS","iwprm riliz","dz`pd")
dp`zd
^P1STREET("IS","iwprm riliz","dzaex")
xeazd
^P1STREET("IS","iwprm riliz","dznx")
xnzd
^P1STREET("IS","iwprm riliz","dzryid")
diyrzd
^P1STREET("IS","iwprm riliz","gexyz hl")
lh zyxeg
^P1STREET("IS","iwprm riliz","iectz")
ztcei
^P1STREET("IS","iwprm riliz","irl nrlez")
zelrn lri
^P1STREET("IS","iwprm riliz","irx `ecm")
mce` xri
^P1STREET("IS","iwprm riliz","itd pes")
sep dti
^P1STREET("IS","iwprm riliz","iwipheo")
oehpiwi
^P1STREET("IS","iwprm riliz","ixnej")
jenxi
^P1STREET("IS","iwprm riliz","kxnl")
lnxk
^P1STREET("IS","iwprm riliz","lilj")
jlil
^P1STREET("IS","iwprm riliz","nixeo")
oexin
^P1STREET("IS","iwprm riliz","nrld drvn`ez")
ze`nvrd dlrn
^P1STREET("IS","iwprm riliz","nvtd dkxnl")
lnxkd dtvn
^P1STREET("IS","iwprm riliz","petx")
xtep
^P1STREET("IS","iwprm riliz","pgl yexw")
wxey lgp
^P1STREET("IS","iwprm riliz","waeu bleiez")
zeielb ueaw
^P1STREET("IS","iwprm riliz","yaz vieo kkx")
xkk oeiv zay
^P1STREET("IS","iwprm riliz","yenxeo")
oexney
^P1STREET("IS","iwprm riliz","ypix")
xipy
^P1STREET("IS","ix`eo")
oe`xi
^P1STREET("IS","ixegm")
mgexi
^P1STREET("IS","ixegm","`ae gvixd")
dxivg ea`
^P1STREET("IS","ixegm","`ao rfx`")
`xfr oa`
^P1STREET("IS","ixegm","`li kdo")
odk il`
^P1STREET("IS","ixegm","`lide dpai`")
`iapd edil`
^P1STREET("IS","ixegm","`qs yngepi")
ipegny sq`
^P1STREET("IS","ixegm","aexpyhiio")
oiihypxea
^P1STREET("IS","ixegm","ail""eiim")
miie"lia
^P1STREET("IS","ixegm","ax keka`")
`akek xa
^P1STREET("IS","ixegm","baelez")
zeleab
^P1STREET("IS","ixegm","bey rvieo")
oeivr yeb
^P1STREET("IS","ixegm","ddbpd")
dpbdd
^P1STREET("IS","ixegm","ddqzcxez")
zexczqdd
^P1STREET("IS","ixegm","dgleu")
uelgd
^P1STREET("IS","ixegm","dgynep`im")
mi`penygd
^P1STREET("IS","ixegm","diqnio")
oinqid
^P1STREET("IS","ixegm","dnrtilim")
militrnd
^P1STREET("IS","ixegm","dpai`im")
mi`iapd
^P1STREET("IS","ixegm","drlid")
dilrd
^P1STREET("IS","ixegm","drvn`ez")
ze`nvrd
^P1STREET("IS","ixegm","dtiqbd")
dbqitd
^P1STREET("IS","ixegm","dtln""g")
g"nltd
^P1STREET("IS","ixegm","dxa kdo")
odk axd
^P1STREET("IS","ixegm","dxa wew")
wew axd
^P1STREET("IS","ixegm","dxna""m")
m"anxd
^P1STREET("IS","ixegm","dxvl")
lvxd
^P1STREET("IS","ixegm","geaai vieo")
oeiv iaaeg
^P1STREET("IS","ixegm","ivgw ycd")
dcy wgvi
^P1STREET("IS","ixegm","nrbl dbto")
otbd lbrn
^P1STREET("IS","ixegm","nrbl drxad")
daxrd lbrn
^P1STREET("IS","ixegm","nrbl dxineo")
oenixd lbrn
^P1STREET("IS","ixegm","qipi")
ipiq
^P1STREET("IS","ixegm","rneq dpai`")
`iapd qenr
^P1STREET("IS","ixegm","xaiaim")
miaiax
^P1STREET("IS","ixegm","ywc")
cwy
^P1STREET("IS","ixeylim")
milyexi
^P1STREET("IS","ixeylim","%f`a%")
%a`f%
^P1STREET("IS","ixeylim",". a`a `l `qaz")
zaq` l` a`a .
^P1STREET("IS","ixeylim","`""c bexceo")
oecxeb c"`
^P1STREET("IS","ixeylim","`-hex")
xeh-`
^P1STREET("IS","ixeylim","`. pdcd")
dcdp .`
^P1STREET("IS","ixeylim","`a` `gin`ix")
xi`nig` `a`
^P1STREET("IS","ixeylim","`a` axciv'a")
a'vicxa `a`
^P1STREET("IS","ixeylim","`a` dll")
lld `a`
^P1STREET("IS","ixeylim","`a` qiwx`")
`xwiq `a`
^P1STREET("IS","ixeylim","`ae nciio")
oiicn ea`
^P1STREET("IS","ixeylim","`ae reaiicd")
dciiaer ea`
^P1STREET("IS","ixeylim","`ae txq `l gncpi")
ipcng l` qxt ea`
^P1STREET("IS","ixeylim","`ae zex")
xez ea`
^P1STREET("IS","ixeylim","`aeda")
adea`
^P1STREET("IS","ixeylim","`aelrtid")
ditrlea`
^P1STREET("IS","ixeylim","`ahlieo")
oeilha`
^P1STREET("IS","ixeylim","`ai iepd nik`l")
l`kin dpei ia`
^P1STREET("IS","ixeylim","`aiaiz")
ziaia`
^P1STREET("IS","ixeylim","`aibcexi")
ixecbia`
^P1STREET("IS","ixeylim","`aibex y`el")
le`y xebia`
^P1STREET("IS","ixeylim","`aibil")
libia`
^P1STREET("IS","ixeylim","`aicr")
rcia`
^P1STREET("IS","ixeylim","`aiepd")
dpeia`
^P1STREET("IS","ixeylim","`aifedx")
xdefia`
^P1STREET("IS","ixeylim","`aihl")
lhia`
^P1STREET("IS","ixeylim","`aipca")
acpia`
^P1STREET("IS","ixeylim","`aiperm ilio")
oili mrepia`
^P1STREET("IS","ixeylim","`airc")
cria`
^P1STREET("IS","ixeylim","`airfx")
xfria`
^P1STREET("IS","ixeylim","`aix irwa")
awri xia`
^P1STREET("IS","ixeylim","`aiyi")
iyia`
^P1STREET("IS","ixeylim","`aiyx")
xyia`
^P1STREET("IS","ixeylim","`aizx dkdo")
odkd xzia`
^P1STREET("IS","ixeylim","`al to")
ot la`
^P1STREET("IS","ixeylim","`ao b'x`g")
g`x'b oa`
^P1STREET("IS","ixeylim","`ao baixel")
lexiab oa`
^P1STREET("IS","ixeylim","`ao d`fl")
lf`d oa`
^P1STREET("IS","ixeylim","`ao glceo")
oeclg oa`
^P1STREET("IS","ixeylim","`ao ideyr")
ryedi oa`
^P1STREET("IS","ixeylim","`ao iyx`l")
l`xyi oa`
^P1STREET("IS","ixeylim","`ao qip`")
`piq oa`
^P1STREET("IS","ixeylim","`ao qtix")
xitq oa`
^P1STREET("IS","ixeylim","`ao rfx`")
`xfr oa`
^P1STREET("IS","ixeylim","`ao yne`l")
l`eny oa`
^P1STREET("IS","ixeylim","`ao ytxeh")
hexty oa`
^P1STREET("IS","ixeylim","`apx")
xpa`
^P1STREET("IS","ixeylim","`axap`l")
l`paxa`
^P1STREET("IS","ixeylim","`axdm ao cec")
cec oa mdxa`
^P1STREET("IS","ixeylim","`axdm nqlepim")
mipelqn mdxa`
^P1STREET("IS","ixeylim","`axdm piqo")
oqip mdxa`
^P1STREET("IS","ixeylim","`axdm txxd")
dxxt mdxa`
^P1STREET("IS","ixeylim","`axdm ylem idecd")
dcedi mely mdxa`
^P1STREET("IS","ixeylim","`axnqwi")
iwqnxa`
^P1STREET("IS","ixeylim","`b `lkqpcx")
xcpqkl` b`
^P1STREET("IS","ixeylim","`becz qtexh `livex")
xevil` hxetq zceb`
^P1STREET("IS","ixeylim","`becz qtexh aiz""x")
x"zia hxetq zceb`
^P1STREET("IS","ixeylim","`becz qtexh dterl")
lretd hxetq zceb`
^P1STREET("IS","ixeylim","`becz qtexh nkai")
iakn hxetq zceb`
^P1STREET("IS","ixeylim","`bneo")
oenb`
^P1STREET("IS","ixeylim","`bqi")
iqb`
^P1STREET("IS","ixeylim","`bxeo")
oexb`
^P1STREET("IS","ixeylim","`bxitq")
qtixb`
^P1STREET("IS","ixeylim","`cd`o igii`")
`iigi o`dc`
^P1STREET("IS","ixeylim","`clno")
onlc`
^P1STREET("IS","ixeylim","`clx ao vieo")
oeiv oa xlc`
^P1STREET("IS","ixeylim","`clx y`el")
le`y xlc`
^P1STREET("IS","ixeylim","`cm")
mc`
^P1STREET("IS","ixeylim","`cneo")
oenc`
^P1STREET("IS","ixeylim","`cnepc tlb")
blt cpenc`
^P1STREET("IS","ixeylim","`cpide dkdo")
odkd edipc`
^P1STREET("IS","ixeylim","`daz iyx`l")
l`xyi zad`
^P1STREET("IS","ixeylim","`dec")
ced`
^P1STREET("IS","ixeylim","`dl ideyr")
ryedi ld`
^P1STREET("IS","ixeylim","`dl nyd")
dyn ld`
^P1STREET("IS","ixeylim","`dli ieqs")
sqei ild`
^P1STREET("IS","ixeylim","`dli`a")
a`ild`
^P1STREET("IS","ixeylim","`dxeo `ykeli")
ileky` oexd`
^P1STREET("IS","ixeylim","`dxeo nfi`")
`ifn oexd`
^P1STREET("IS","ixeylim","`dxeo tiyl")
lyit oexd`
^P1STREET("IS","ixeylim","`dxepea")
aepexd`
^P1STREET("IS","ixeylim","`dxepi iyx`l")
l`xyi ipexd`
^P1STREET("IS","ixeylim","`dxptlc pgem")
megp cltpxd`
^P1STREET("IS","ixeylim","`ecm")
mce`
^P1STREET("IS","ixeylim","`edl ylnd")
dnly lde`
^P1STREET("IS","ixeylim","`elaxiih eili`m")
m`ilie hiixale`
^P1STREET("IS","ixeylim","`eli`l cxex")
xexc l`ile`
^P1STREET("IS","ixeylim","`elitph")
hptile`
^P1STREET("IS","ixeylim","`elivex")
xevile`
^P1STREET("IS","ixeylim","`elyeepbx")
xbpeeyle`
^P1STREET("IS","ixeylim","`elyo ivgw")
wgvi oyle`
^P1STREET("IS","ixeylim","`em hea`")
`aeh me`
^P1STREET("IS","ixeylim","`ephxno")
onxhpe`
^P1STREET("IS","ixeylim","`epwleq")
qelwpe`
^P1STREET("IS","ixeylim","`eqiywio")
oiwyiqe`
^P1STREET("IS","ixeylim","`etixd")
dxite`
^P1STREET("IS","ixeylim","`etlwhwd")
dwhwlte`
^P1STREET("IS","ixeylim","`evx db`epim")
mipe`bd xve`
^P1STREET("IS","ixeylim","`evx dqtxim")
mixtqd xve`
^P1STREET("IS","ixeylim","`ex dgiim")
miigd xe`
^P1STREET("IS","ixeylim","`ex yxb`")
`bxy xe`
^P1STREET("IS","ixeylim","`exaej")
jeaxe`
^P1STREET("IS","ixeylim","`exebe`i")
i`ebexe`
^P1STREET("IS","ixeylim","`exi`l")
l`ixe`
^P1STREET("IS","ixeylim","`ey`")
`ye`
^P1STREET("IS","ixeylim","`fdxd")
dxdf`
^P1STREET("IS","ixeylim","`fel`i rwia`")
`aiwr i`lef`
^P1STREET("IS","ixeylim","`gc drm")
mrd cg`
^P1STREET("IS","ixeylim","`ge`o `lvt`")
`tvl` o`eg`
^P1STREET("IS","ixeylim","`gec dktx")
xtkd ceg`
^P1STREET("IS","ixeylim","`gefz `dxeo")
oexd` zfeg`
^P1STREET("IS","ixeylim","`gim `lvtd")
dtvl` mig`
^P1STREET("IS","ixeylim","`ginru")
urnig`
^P1STREET("IS","ixeylim","`giprm")
mrpig`
^P1STREET("IS","ixeylim","`giyx")
xyig`
^P1STREET("IS","ixeylim","`glnd")
dnlg`
^P1STREET("IS","ixeylim","`heo ao vieo")
oeiv oa oeh`
^P1STREET("IS","ixeylim","`hipbx")
xbpih`
^P1STREET("IS","ixeylim","`iao cpo")
opc oai`
^P1STREET("IS","ixeylim","`iao heleo")
oeleh oai`
^P1STREET("IS","ixeylim","`ibxez nyd")
dyn zexbi`
^P1STREET("IS","ixeylim","`iclqeo `axdm")
mdxa` oeqlci`
^P1STREET("IS","ixeylim","`igec drix")
xird cegi`
^P1STREET("IS","ixeylim","`iifiw xnad")
danx wifii`
^P1STREET("IS","ixeylim","`iileo cec")
cec oelii`
^P1STREET("IS","ixeylim","`ile`c")
c`eli`
^P1STREET("IS","ixeylim","`ilo")
oli`
^P1STREET("IS","ixeylim","`ilo nxcki vai")
iav ikcxn oli`
^P1STREET("IS","ixeylim","`ilz")
zli`
^P1STREET("IS","ixeylim","`ipe y`wi")
iw`y epi`
^P1STREET("IS","ixeylim","`iphxwephipphl")
lhppihpewxhpi`
^P1STREET("IS","ixeylim","`iqlpc")
cplqi`
^P1STREET("IS","ixeylim","`iqx pzpfeo")
oefpzp xqi`
^P1STREET("IS","ixeylim","`iznx ao `a""i")
i"a` oa xnzi`
^P1STREET("IS","ixeylim","`izo")
ozi`
^P1STREET("IS","ixeylim","`izo liapi")
ipail ozi`
^P1STREET("IS","ixeylim","`khl")
lhk`
^P1STREET("IS","ixeylim","`l `cxiqi")
iqixc` l`
^P1STREET("IS","ixeylim","`l `fel")
lef` l`
^P1STREET("IS","ixeylim","`l `in`ae nlw")
wln ea`ni` l`
^P1STREET("IS","ixeylim","`l `in`m neqlim")
milqen m`ni` l`
^P1STREET("IS","ixeylim","`l `l`l`m")
m`l`l` l`
^P1STREET("IS","ixeylim","`l `nxiwo")
owixn` l`
^P1STREET("IS","ixeylim","`l `phx")
xhp` l`
^P1STREET("IS","ixeylim","`l `vtd`pi")
ip`dtv` l`
^P1STREET("IS","ixeylim","`l `xno")
onx` l`
^P1STREET("IS","ixeylim","`l acxid")
dixca l`
^P1STREET("IS","ixeylim","`l aehnd")
dnhea l`
^P1STREET("IS","ixeylim","`l b'ayd")
dya'b l`
^P1STREET("IS","ixeylim","`l bal `l bcic")
cicb l` lab l`
^P1STREET("IS","ixeylim","`l bayiw")
wiyab l`
^P1STREET("IS","ixeylim","`l bixni")
inxib l`
^P1STREET("IS","ixeylim","`l bqnpid")
dipnqb l`
^P1STREET("IS","ixeylim","`l cee`x `l `f`l")
l`f` l` x`eec l`
^P1STREET("IS","ixeylim","`l dcad")
dacd l`
^P1STREET("IS","ixeylim","`l dw`xi")
ix`wd l`
^P1STREET("IS","ixeylim","`l dxcea")
aecxd l`
^P1STREET("IS","ixeylim","`l e`c")
c`e l`
^P1STREET("IS","ixeylim","`l fdxd")
dxdf l`
^P1STREET("IS","ixeylim","`l fizeo")
oezif l`
^P1STREET("IS","ixeylim","`l gpw`")
`wpg l`
^P1STREET("IS","ixeylim","`l gxixi")
ixixg l`
^P1STREET("IS","ixeylim","`l irweai")
iaewri l`
^P1STREET("IS","ixeylim","`l k`ld")
dl`k l`
^P1STREET("IS","ixeylim","`l kpiiq")
qiipk l`
^P1STREET("IS","ixeylim","`l ncxqd `l bcic")
cicb l` dqxcn l`
^P1STREET("IS","ixeylim","`l nebdicio")
oicidben l`
^P1STREET("IS","ixeylim","`l nebx`x")
x`xben l`
^P1STREET("IS","ixeylim","`l neqxxd")
dxxqen l`
^P1STREET("IS","ixeylim","`l nez`pai")
iap`zen l`
^P1STREET("IS","ixeylim","`l niyniy")
yinyin l`
^P1STREET("IS","ixeylim","`l nqreci")
icerqn l`
^P1STREET("IS","ixeylim","`l nwciq")
qicwn l`
^P1STREET("IS","ixeylim","`l nwcqi")
iqcwn l`
^P1STREET("IS","ixeylim","`l qlacex")
xecalq l`
^P1STREET("IS","ixeylim","`l raicid")
diciar l`
^P1STREET("IS","ixeylim","`l renxi")
ixner l`
^P1STREET("IS","ixeylim","`l riq`eid")
die`qir l`
^P1STREET("IS","ixeylim","`l w`r")
r`w l`
^P1STREET("IS","ixeylim","`l wldd")
ddlw l`
^P1STREET("IS","ixeylim","`l wvqiil")
liiqvw l`
^P1STREET("IS","ixeylim","`l wxni")
inxw l`
^P1STREET("IS","ixeylim","`l xyic")
ciyx l`
^P1STREET("IS","ixeylim","`l`hio")
oih`l`
^P1STREET("IS","ixeylim","`la`qhi")
ihq`al`
^P1STREET("IS","ixeylim","`lae")
eal`
^P1STREET("IS","ixeylim","`lahiw")
wihal`
^P1STREET("IS","ixeylim","`lahxi`w `lh")
hl` w`ixhal`
^P1STREET("IS","ixeylim","`law gpej")
jepg wal`
^P1STREET("IS","ixeylim","`lbfi")
ifbl`
^P1STREET("IS","ixeylim","`ldcni")
incdl`
^P1STREET("IS","ixeylim","`ldw`xi")
ix`wdl`
^P1STREET("IS","ixeylim","`lelbd")
dblel`
^P1STREET("IS","ixeylim","`lepi ygx")
xgy ipel`
^P1STREET("IS","ixeylim","`les yngepi")
ipegny sel`
^P1STREET("IS","ixeylim","`lfd dnyexxz")
zxxeynd dfl`
^P1STREET("IS","ixeylim","`lgqax")
xaqgl`
^P1STREET("IS","ixeylim","`lgxifi")
ifixgl`
^P1STREET("IS","ixeylim","`lhno `xid")
dix` onhl`
^P1STREET("IS","ixeylim","`li kdo")
odk il`
^P1STREET("IS","ixeylim","`li tf")
ft il`
^P1STREET("IS","ixeylim","`li zaio")
oiaz il`
^P1STREET("IS","ixeylim","`li`a irwa")
awri a`il`
^P1STREET("IS","ixeylim","`li`j ylnd ieqs")
sqei dnly j`il`
^P1STREET("IS","ixeylim","`li`l cxex")
xexc l`il`
^P1STREET("IS","ixeylim","`li`yaxb")
bxay`il`
^P1STREET("IS","ixeylim","`lide irwa ap`i")
i`pa awri edil`
^P1STREET("IS","ixeylim","`lide nxicex")
xecixn edil`
^P1STREET("IS","ixeylim","`lide qlno")
onlq edil`
^P1STREET("IS","ixeylim","`lide yn`r")
r`ny edil`
^P1STREET("IS","ixeylim","`linlj nlifpqw")
wqpfiln jlnil`
^P1STREET("IS","ixeylim","`lirfx `xbea")
aebx` xfril`
^P1STREET("IS","ixeylim","`lirfx dbcel")
lecbd xfril`
^P1STREET("IS","ixeylim","`lirfx detiio")
oiited xfril`
^P1STREET("IS","ixeylim","`lirfx dlei")
ield xfril`
^P1STREET("IS","ixeylim","`lirfxea")
aexfril`
^P1STREET("IS","ixeylim","`lirfxi")
ixfril`
^P1STREET("IS","ixeylim","`livex idecd")
dcedi xevil`
^P1STREET("IS","ixeylim","`liyia")
aiyil`
^P1STREET("IS","ixeylim","`liyr")
ryil`
^P1STREET("IS","ixeylim","`liyx")
xyil`
^P1STREET("IS","ixeylim","`lkp`iim")
mii`pkl`
^P1STREET("IS","ixeylim","`lkqpcx xeaeaiu'")
'uiaeaex xcpqkl`
^P1STREET("IS","ixeylim","`lkqpcxieo")
oeixcpqkl`
^P1STREET("IS","ixeylim","`lncpd `lgnx")
xngl` dpcnl`
^P1STREET("IS","ixeylim","`lneb")
benl`
^P1STREET("IS","ixeylim","`lnef`cio")
oic`fenl`
^P1STREET("IS","ixeylim","`lnlig")
gilnl`
^P1STREET("IS","ixeylim","`lnwciq")
qicwnl`
^P1STREET("IS","ixeylim","`lqilqilid")
diliqliql`
^P1STREET("IS","ixeylim","`lqn`x")
x`nql`
^P1STREET("IS","ixeylim","`lrfx ao i`ix")
xi`i oa xfrl`
^P1STREET("IS","ixeylim","`lrfx dnecri")
ircend xfrl`
^P1STREET("IS","ixeylim","`lrfx dnkai")
iaknd xfrl`
^P1STREET("IS","ixeylim","`lryd")
dyrl`
^P1STREET("IS","ixeylim","`ltpcxi")
ixcptl`
^P1STREET("IS","ixeylim","`ltqi")
iqtl`
^P1STREET("IS","ixeylim","`ltxc eizweo")
oewzie cxtl`
^P1STREET("IS","ixeylim","`lvl`gid")
dig`lvl`
^P1STREET("IS","ixeylim","`lw`a`h")
h`a`wl`
^P1STREET("IS","ixeylim","`lwau")
uawl`
^P1STREET("IS","ixeylim","`lwgi nxcki")
ikcxn igwl`
^P1STREET("IS","ixeylim","`lwlri")
irlwl`
^P1STREET("IS","ixeylim","`lwpd")
dpwl`
^P1STREET("IS","ixeylim","`lxqel")
leqxl`
^P1STREET("IS","ixeylim","`ly`eiy")
yie`yl`
^P1STREET("IS","ixeylim","`lyij")
jiyl`
^P1STREET("IS","ixeylim","`lzaxi")
ixazl`
^P1STREET("IS","ixeylim","`m dapim")
mipad m`
^P1STREET("IS","ixeylim","`ncexqwi")
iwqxecn`
^P1STREET("IS","ixeylim","`nil aehd")
dhea lin`
^P1STREET("IS","ixeylim","`nil fel`")
`lef lin`
^P1STREET("IS","ixeylim","`nix")
xin`
^P1STREET("IS","ixeylim","`nvid")
divn`
^P1STREET("IS","ixeylim","`nx` `lwiim")
miiwl` `xn`
^P1STREET("IS","ixeylim","`nxe `l wiq")
qiw l` exn`
^P1STREET("IS","ixeylim","`nxi aipd")
dpia ixn`
^P1STREET("IS","ixeylim","`nxi giim")
miig ixn`
^P1STREET("IS","ixeylim","`nz lirwa")
awril zn`
^P1STREET("IS","ixeylim","`pe`o `qtd")
dtq` o`ep`
^P1STREET("IS","ixeylim","`peqi nydc")
cdyn iqep`
^P1STREET("IS","ixeylim","`phewelqwi")
iwqlewehp`
^P1STREET("IS","ixeylim","`phibepeq")
qepebihp`
^P1STREET("IS","ixeylim","`pilaiu'")
'uialip`
^P1STREET("IS","ixeylim","`q`")
`q`
^P1STREET("IS","ixeylim","`qa' dx dvetim")
mitevd xd 'aq`
^P1STREET("IS","ixeylim","`qa' wxiz ieal")
laei zixw 'aq`
^P1STREET("IS","ixeylim","`qhexd")
dxehq`
^P1STREET("IS","ixeylim","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","ixeylim","`qrciid")
diicrq`
^P1STREET("IS","ixeylim","`qtpiil")
liiptq`
^P1STREET("IS","ixeylim","`qzx dnlkd")
dklnd xzq`
^P1STREET("IS","ixeylim","`teci")
icet`
^P1STREET("IS","ixeylim","`txim")
mixt`
^P1STREET("IS","ixeylim","`txqneo")
oenqxt`
^P1STREET("IS","ixeylim","`txzd")
dzxt`
^P1STREET("IS","ixeylim","`tyhiio")
oiihyt`
^P1STREET("IS","ixeylim","`v""b")
b"v`
^P1STREET("IS","ixeylim","`vrtd")
dtrv`
^P1STREET("IS","ixeylim","`xal")
lax`
^P1STREET("IS","ixeylim","`xbno")
onbx`
^P1STREET("IS","ixeylim","`xeo diaeqi")
iqeaid oex`
^P1STREET("IS","ixeylim","`xfi daixd")
dxiad ifx`
^P1STREET("IS","ixeylim","`xgnd")
dngx`
^P1STREET("IS","ixeylim","`xi anqzxim")
mixzqna ix`
^P1STREET("IS","ixeylim","`xi`l")
l`ix`
^P1STREET("IS","ixeylim","`xid ao `lirfx")
xfril` oa dix`
^P1STREET("IS","ixeylim","`xid ardm")
mdra dix`
^P1STREET("IS","ixeylim","`xid celvio")
oivlec dix`
^P1STREET("IS","ixeylim","`xiqhealeq")
qelaehqix`
^P1STREET("IS","ixeylim","`xiqhi`q")
q`ihqix`
^P1STREET("IS","ixeylim","`xlefexea")
aexefelx`
^P1STREET("IS","ixeylim","`xqh `axdm")
mdxa` hqx`
^P1STREET("IS","ixeylim","`xu gtu")
utg ux`
^P1STREET("IS","ixeylim","`xxh")
hxx`
^P1STREET("IS","ixeylim","`y`xs")
sx`y`
^P1STREET("IS","ixeylim","`yiig")
giiy`
^P1STREET("IS","ixeylim","`yitd")
dtiy`
^P1STREET("IS","ixeylim","`ykpfi")
ifpky`
^P1STREET("IS","ixeylim","`yx")
xy`
^P1STREET("IS","ixeylim","`yx belw")
wleb xy`
^P1STREET("IS","ixeylim","`yzexi dtxgi")
igxtd ixezy`
^P1STREET("IS","ixeylim","`zietid")
diteiz`
^P1STREET("IS","ixeylim","a`a ` fdxd")
dxdf ` a`a
^P1STREET("IS","ixeylim","a`a ` nbxad")
daxbn ` a`a
^P1STREET("IS","ixeylim","a`a `l bcic")
cicb l` a`a
^P1STREET("IS","ixeylim","a`a `l gcic")
cicg l` a`a
^P1STREET("IS","ixeylim","a`a `l nblq")
qlbn l` a`a
^P1STREET("IS","ixeylim","a`a `l rnec")
cenr l` a`a
^P1STREET("IS","ixeylim","a`a g`o `lfz")
zfl` o`g a`a
^P1STREET("IS","ixeylim","a`eno")
one`a
^P1STREET("IS","ixeylim","a`fea")
aef`a
^P1STREET("IS","ixeylim","a`x yar")
ray x`a
^P1STREET("IS","ixeylim","a`xez ivgw")
wgvi zex`a
^P1STREET("IS","ixeylim","a`xi")
ix`a
^P1STREET("IS","ixeylim","a`yix")
xiy`a
^P1STREET("IS","ixeylim","aa ` qilqild")
dliqliq ` aa
^P1STREET("IS","ixeylim","aa gehd")
dheg aa
^P1STREET("IS","ixeylim","ab`ie giim")
miig ei`ba
^P1STREET("IS","ixeylim","add cio")
oic dda
^P1STREET("IS","ixeylim","adx""o")
o"xda
^P1STREET("IS","ixeylim","aealiw")
wilaea
^P1STREET("IS","ixeylim","aeax nxcki")
ikcxn xaea
^P1STREET("IS","ixeylim","aecpdiinx")
xniidpcea
^P1STREET("IS","ixeylim","aehxeq")
qexhea
^P1STREET("IS","ixeylim","aeliaid")
diailea
^P1STREET("IS","ixeylim","aepaephexd")
dxehpeapea
^P1STREET("IS","ixeylim","aepi dgend")
dnegd ipea
^P1STREET("IS","ixeylim","aeqzp`i")
i`pzqea
^P1STREET("IS","ixeylim","aerf")
frea
^P1STREET("IS","ixeylim","aexekea")
aekexea
^P1STREET("IS","ixeylim","aexekes nyig")
giyn sekexea
^P1STREET("IS","ixeylim","aexl`")
`lxea
^P1STREET("IS","ixeylim","aeym")
myea
^P1STREET("IS","ixeylim","afl")
lfa
^P1STREET("IS","ixeylim","afw avl`l")
l`lva wfa
^P1STREET("IS","ixeylim","ahiy ynreo")
oerny yiha
^P1STREET("IS","ixeylim","ai xa irwa")
awri ax ia
^P1STREET("IS","ixeylim","ai`liw")
wil`ia
^P1STREET("IS","ixeylim","ai`pwipi")
ipiwp`ia
^P1STREET("IS","ixeylim","aia`q")
q`aia
^P1STREET("IS","ixeylim","aiax")
xaia
^P1STREET("IS","ixeylim","aiib l`wlw")
wlw`l biia
^P1STREET("IS","ixeylim","aiih yne`l")
l`eny hiia
^P1STREET("IS","ixeylim","aiiliq npcl")
lcpn qiliia
^P1STREET("IS","ixeylim","ail""e")
e"lia
^P1STREET("IS","ixeylim","aipz iyykx")
xkyyi zpia
^P1STREET("IS","ixeylim","aivex ideyr")
ryedi xevia
^P1STREET("IS","ixeylim","aiwex gelim")
mileg xewia
^P1STREET("IS","ixeylim","aix `iea")
aei` xia
^P1STREET("IS","ixeylim","aix npqex")
xeqpn xia
^P1STREET("IS","ixeylim","aixpa`em")
me`apxia
^P1STREET("IS","ixeylim","aiz `l")
l` zia
^P1STREET("IS","ixeylim","aiz `yl")
ly` zia
^P1STREET("IS","ixeylim","aiz dcteq")
qetcd zia
^P1STREET("IS","ixeylim","aiz dievx")
xveid zia
^P1STREET("IS","ixeylim","aiz dkxm")
mxkd zia
^P1STREET("IS","ixeylim","aiz drxad")
daxrd zia
^P1STREET("IS","ixeylim","aiz dye`ad")
da`eyd zia
^P1STREET("IS","ixeylim","aiz ebo")
obe zia
^P1STREET("IS","ixeylim","aiz gbld")
dlbg zia
^P1STREET("IS","ixeylim","aiz irwa")
awri zia
^P1STREET("IS","ixeylim","aiz ivgw")
wgvi zia
^P1STREET("IS","ixeylim","aiz iyx`l")
l`xyi zia
^P1STREET("IS","ixeylim","aiz nipexi")
ixepin zia
^P1STREET("IS","ixeylim","aiz rli")
ilr zia
^P1STREET("IS","ixeylim","aiz vex")
xev zia
^P1STREET("IS","ixeylim","aiz vexi `lide")
edil` ixev zia
^P1STREET("IS","ixeylim","aiz vttd")
dttv zia
^P1STREET("IS","ixeylim","aiz wyz")
zyw zia
^P1STREET("IS","ixeylim","aiz xiwliq")
qilwix zia
^P1STREET("IS","ixeylim","aiz yrxim")
mixry zia
^P1STREET("IS","ixeylim","aiz""x")
x"zia
^P1STREET("IS","ixeylim","akx f`a")
a`f xka
^P1STREET("IS","ixeylim","akx pqim")
miqp xka
^P1STREET("IS","ixeylim","alao n`ix")
xi`n oala
^P1STREET("IS","ixeylim","alenptlc")
cltpnela
^P1STREET("IS","ixeylim","alfx ivgw")
wgvi xfla
^P1STREET("IS","ixeylim","alilieq")
qeilila
^P1STREET("IS","ixeylim","alkx")
xkla
^P1STREET("IS","ixeylim","altex")
xetla
^P1STREET("IS","ixeylim","ao aa`")
`aa oa
^P1STREET("IS","ixeylim","ao ahehd")
dheha oa
^P1STREET("IS","ixeylim","ao baxi`l")
l`ixab oa
^P1STREET("IS","ixeylim","ao f`a")
a`f oa
^P1STREET("IS","ixeylim","ao fk`i")
i`kf oa
^P1STREET("IS","ixeylim","ao glceo")
oeclg oa
^P1STREET("IS","ixeylim","ao gtu heaid")
diaeh utg oa
^P1STREET("IS","ixeylim","ao ha`i")
i`ah oa
^P1STREET("IS","ixeylim","ao idecd")
dcedi oa
^P1STREET("IS","ixeylim","ao itepd")
dpeti oa
^P1STREET("IS","ixeylim","ao iyx`l npyd")
dypn l`xyi oa
^P1STREET("IS","ixeylim","ao laxh")
hxal oa
^P1STREET("IS","ixeylim","ao qix`")
`xiq oa
^P1STREET("IS","ixeylim","ao qxew")
wexq oa
^P1STREET("IS","ixeylim","ao refi`l")
l`ifer oa
^P1STREET("IS","ixeylim","ao rf`i")
i`fr oa
^P1STREET("IS","ixeylim","ao rhx")
xhr oa
^P1STREET("IS","ixeylim","ao rnxm")
mxnr oa
^P1STREET("IS","ixeylim","ao vex")
xev oa
^P1STREET("IS","ixeylim","ao vieo")
oeiv oa
^P1STREET("IS","ixeylim","ao vieo cipex")
xepic oeiv oa
^P1STREET("IS","ixeylim","ao vieo li`eo")
oe`il oeiv oa
^P1STREET("IS","ixeylim","ao wdz rnxm")
mxnr zdw oa
^P1STREET("IS","ixeylim","ao yhg ynreo")
oerny ghy oa
^P1STREET("IS","ixeylim","apb'nio pepiif")
fiipep oin'bpa
^P1STREET("IS","ixeylim","apez go")
og zepa
^P1STREET("IS","ixeylim","apheaiu")
uiaehpa
^P1STREET("IS","ixeylim","api axiz")
zixa ipa
^P1STREET("IS","ixeylim","api azix`")
`xiza ipa
^P1STREET("IS","ixeylim","api qp`d")
d`pq ipa
^P1STREET("IS","ixeylim","apide")
edipa
^P1STREET("IS","ixeylim","apinio nhecld")
dlcehn oinipa
^P1STREET("IS","ixeylim","apw iyx`l")
l`xyi wpa
^P1STREET("IS","ixeylim","aq`o ivgw")
wgvi o`qa
^P1STREET("IS","ixeylim","arl `ex yng")
gny xe` lra
^P1STREET("IS","ixeylim","arl dy`ilzez")
zezli`yd lra
^P1STREET("IS","ixeylim","arl dzpi`")
`ipzd lra
^P1STREET("IS","ixeylim","arl ym hea")
aeh my lra
^P1STREET("IS","ixeylim","arli nl`kd")
dk`ln ilra
^P1STREET("IS","ixeylim","avl`l")
l`lva
^P1STREET("IS","ixeylim","avl`l avx`eei")
iee`xva l`lva
^P1STREET("IS","ixeylim","aw piqo")
oqip wa
^P1STREET("IS","ixeylim","ax `eo `lide")
edil` oe` xa
^P1STREET("IS","ixeylim","ax `ilo")
oli` xa
^P1STREET("IS","ixeylim","ax biex`")
`xeib xa
^P1STREET("IS","ixeylim","ax fk`i")
i`kf xa
^P1STREET("IS","ixeylim","ax ieg`i")
i`gei xa
^P1STREET("IS","ixeylim","ax iwx ca")
ac xwi xa
^P1STREET("IS","ixeylim","ax keka`")
`akek xa
^P1STREET("IS","ixeylim","ax piqo")
oqip xa
^P1STREET("IS","ixeylim","ax pzpid")
dipzp xa
^P1STREET("IS","ixeylim","ax`eo `exi")
ixe` oe`xa
^P1STREET("IS","ixeylim","axbno")
onbxa
^P1STREET("IS","ixeylim","axbx")
xbxa
^P1STREET("IS","ixeylim","axcpea ixnide")
edinxi aepcxa
^P1STREET("IS","ixeylim","axecvwi")
iwvcexa
^P1STREET("IS","ixeylim","axefd")
dfexa
^P1STREET("IS","ixeylim","axej ao pxid")
dixp oa jexa
^P1STREET("IS","ixeylim","axej ceacapi")
ipacaec jexa
^P1STREET("IS","ixeylim","axew")
wexa
^P1STREET("IS","ixeylim","axexid")
dixexa
^P1STREET("IS","ixeylim","axfil")
lifxa
^P1STREET("IS","ixeylim","axfili")
ilifxa
^P1STREET("IS","ixeylim","axfpi nyd")
dyn ipfxa
^P1STREET("IS","ixeylim","axhpex`")
`xephxa
^P1STREET("IS","ixeylim","axkd vtixd")
dxitv dkxa
^P1STREET("IS","ixeylim","axkide")
edikxa
^P1STREET("IS","ixeylim","axkz `axdm")
mdxa` zkxa
^P1STREET("IS","ixeylim","axl lewx")
xwel lxa
^P1STREET("IS","ixeylim","axno irwa")
awri onxa
^P1STREET("IS","ixeylim","axpc `dxeo")
oexd` cpxa
^P1STREET("IS","ixeylim","axpceeio")
oieecpxa
^P1STREET("IS","ixeylim","axpciq")
qicpxa
^P1STREET("IS","ixeylim","axpiwi")
iwipxa
^P1STREET("IS","ixeylim","axpx")
xpxa
^P1STREET("IS","ixeylim","axpyhiio txu")
uxt oiihypxa
^P1STREET("IS","ixeylim","axw")
wxa
^P1STREET("IS","ixeylim","axw`i")
i`wxa
^P1STREET("IS","ixeylim","axwew")
wewxa
^P1STREET("IS","ixeylim","axwli")
ilwxa
^P1STREET("IS","ixeylim","axwli y`el")
le`y ilwxa
^P1STREET("IS","ixeylim","axws")
swxa
^P1STREET("IS","ixeylim","axwz")
zwxa
^P1STREET("IS","ixeylim","az yar")
ray za
^P1STREET("IS","ixeylim","azi axeicd")
dciexa iza
^P1STREET("IS","ixeylim","azi depbxim")
mixbped iza
^P1STREET("IS","ixeylim","azi dexecp`")
`pcexed iza
^P1STREET("IS","ixeylim","azi dexpyhio")
oihypxed iza
^P1STREET("IS","ixeylim","azi eihpaxb")
bxaphie iza
^P1STREET("IS","ixeylim","azi exy`")
`yxe iza
^P1STREET("IS","ixeylim","azi nepwu")
uwpen iza
^P1STREET("IS","ixeylim","azi ngqd")
dqgn iza
^P1STREET("IS","ixeylim","azi nilpx")
xplin iza
^P1STREET("IS","ixeylim","azi nipqw")
wqpin iza
^P1STREET("IS","ixeylim","azi pihio")
oihip iza
^P1STREET("IS","ixeylim","azi wnipiu")
uipinw iza
^P1STREET("IS","ixeylim","azi xpc qlph")
hplq cpx iza
^P1STREET("IS","ixeylim","b'exb' `lieh")
heil` 'bxe'b
^P1STREET("IS","ixeylim","b'exb' qniz")
zinq 'bxe'b
^P1STREET("IS","ixeylim","b`nr racio")
oicar rn`b
^P1STREET("IS","ixeylim","b`xqid bxp`ceq")
qec`pxb diqx`b
^P1STREET("IS","ixeylim","baixvno nyd")
dyn onvxiab
^P1STREET("IS","ixeylim","bal nekax")
xaken lab
^P1STREET("IS","ixeylim","bar")
rab
^P1STREET("IS","ixeylim","bareo")
oerab
^P1STREET("IS","ixeylim","barepim")
miperab
^P1STREET("IS","ixeylim","barz aiz dkxm")
mxkd zia zrab
^P1STREET("IS","ixeylim","barz dieepim")
mipeeid zrab
^P1STREET("IS","ixeylim","barz nyd")
dyn zrab
^P1STREET("IS","ixeylim","barz wpcd")
dcpw zrab
^P1STREET("IS","ixeylim","barz xm")
mx zrab
^P1STREET("IS","ixeylim","barz xm ykepi `ls")
sl` ipeky mx zrab
^P1STREET("IS","ixeylim","barz y`el")
le`y zrab
^P1STREET("IS","ixeylim","bayd")
dyab
^P1STREET("IS","ixeylim","bc")
cb
^P1STREET("IS","ixeylim","bc hcqwi")
iwqch cb
^P1STREET("IS","ixeylim","bcec gxny")
ynxg cecb
^P1STREET("IS","ixeylim","bcec nkny")
ynkn cecb
^P1STREET("IS","ixeylim","bclid")
dilcb
^P1STREET("IS","ixeylim","bclide `leo")
oel` edilcb
^P1STREET("IS","ixeylim","bcreo")
oercb
^P1STREET("IS","ixeylim","bcxd")
dxcb
^P1STREET("IS","ixeylim","be`hn`ld")
dl`nh`eb
^P1STREET("IS","ixeylim","behlia")
ailheb
^P1STREET("IS","ixeylim","bel ao vieo")
oeiv oa leb
^P1STREET("IS","ixeylim","belc")
cleb
^P1STREET("IS","ixeylim","belcd n`ix")
xi`n dcleb
^P1STREET("IS","ixeylim","belcwpets")
stepwcleb
^P1STREET("IS","ixeylim","belena")
aneleb
^P1STREET("IS","ixeylim","beli wpid")
dipw ileb
^P1STREET("IS","ixeylim","bfx")
xfb
^P1STREET("IS","ixeylim","bifd")
dfib
^P1STREET("IS","ixeylim","bigeo")
oegib
^P1STREET("IS","ixeylim","bipi`e n`ix")
xi`n e`ipib
^P1STREET("IS","ixeylim","bl")
lb
^P1STREET("IS","ixeylim","blax")
xalb
^P1STREET("IS","ixeylim","blrc")
crlb
^P1STREET("IS","ixeylim","blrci")
icrlb
^P1STREET("IS","ixeylim","blrpiz")
ziprlb
^P1STREET("IS","ixeylim","bnel")
lenb
^P1STREET("IS","ixeylim","bnfeo")
oefnb
^P1STREET("IS","ixeylim","bo dryxim")
mixyrd ob
^P1STREET("IS","ixeylim","bo xgaid")
diagx ob
^P1STREET("IS","ixeylim","bpiy")
yipb
^P1STREET("IS","ixeylim","bqhx nyd")
dyn xhqb
^P1STREET("IS","ixeylim","bxefpaxb")
bxapfexb
^P1STREET("IS","ixeylim","bxeq f`a")
a`f qexb
^P1STREET("IS","ixeylim","bxeqaxb")
bxaqexb
^P1STREET("IS","ixeylim","bxipaxb")
bxapixb
^P1STREET("IS","ixeylim","bxipeelc")
cleepixb
^P1STREET("IS","ixeylim","bxipyto dxyl")
lyxd otypixb
^P1STREET("IS","ixeylim","bxiw thxi`kh")
hk`ixht wixb
^P1STREET("IS","ixeylim","bxni vieo")
oeiv inxb
^P1STREET("IS","ixeylim","bxpez `axdm")
mdxa` zepxb
^P1STREET("IS","ixeylim","bxu")
uxb
^P1STREET("IS","ixeylim","byx dgiim")
miigd xyb
^P1STREET("IS","ixeylim","bz")
zb
^P1STREET("IS","ixeylim","c`x `lnxepih")
hipexnl` x`c
^P1STREET("IS","ixeylim","ca bxepx")
xpexb ac
^P1STREET("IS","ixeylim","ca def")
fed ac
^P1STREET("IS","ixeylim","ca qco")
ocq ac
^P1STREET("IS","ixeylim","cabd")
dbac
^P1STREET("IS","ixeylim","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","ixeylim","caix")
xiac
^P1STREET("IS","ixeylim","caxi giim")
miig ixac
^P1STREET("IS","ixeylim","caxi ixegm")
mgexi ixac
^P1STREET("IS","ixeylim","cay")
yac
^P1STREET("IS","ixeylim","cbl x`eao")
oae`x lbc
^P1STREET("IS","ixeylim","cbo")
obc
^P1STREET("IS","ixeylim","cbpid")
dipbc
^P1STREET("IS","ixeylim","cd d`f")
f`d dc
^P1STREET("IS","ixeylim","cd lind pgnid")
dingp dnil dc
^P1STREET("IS","ixeylim","cd xeqi")
iqex dc
^P1STREET("IS","ixeylim","cdenii")
iinedc
^P1STREET("IS","ixeylim","cdxi")
ixdc
^P1STREET("IS","ixeylim","ceaa niyxim")
mixyin aaec
^P1STREET("IS","ixeylim","ceapea")
aepaec
^P1STREET("IS","ixeylim","ceax ylem")
mely xaec
^P1STREET("IS","ixeylim","cebd ylnd")
dnly dbec
^P1STREET("IS","ixeylim","cec")
cec
^P1STREET("IS","ixeylim","cec `lrfx")
xfrl` cec
^P1STREET("IS","ixeylim","cec `lxe`i")
i`exl` cec
^P1STREET("IS","ixeylim","cec beiiho")
ohiieb cec
^P1STREET("IS","ixeylim","cec dgfo")
ofgd cec
^P1STREET("IS","ixeylim","cec ilio")
oili cec
^P1STREET("IS","ixeylim","cec nxu")
uxn cec
^P1STREET("IS","ixeylim","cec ynrepi")
iperny cec
^P1STREET("IS","ixeylim","ceicqeo")
oeqciec
^P1STREET("IS","ixeylim","ceo ieqs dpyi`")
`iypd sqei oec
^P1STREET("IS","ixeylim","cepe`q")
q`epec
^P1STREET("IS","ixeylim","ceqhxeaqwi `xid")
dix` iwqaexhqec
^P1STREET("IS","ixeylim","ceqz`i")
i`zqec
^P1STREET("IS","ixeylim","cex ecexyie")
eiyxece xec
^P1STREET("IS","ixeylim","cexez x`yepim")
mipey`x zexec
^P1STREET("IS","ixeylim","cexy hea")
aeh yxec
^P1STREET("IS","ixeylim","ceyipqwi")
iwqpiyec
^P1STREET("IS","ixeylim","cgiiz `l axic")
cixa l` ziigc
^P1STREET("IS","ixeylim","cinehxieq")
qeixhenic
^P1STREET("IS","ixeylim","cipeaiu bihl")
lhib uiaepic
^P1STREET("IS","ixeylim","ciqwio")
oiwqic
^P1STREET("IS","ixeylim","cix `l gay")
yag l` xic
^P1STREET("IS","ixeylim","cix `liep`o")
o`peil` xic
^P1STREET("IS","ixeylim","cix `lnxepez")
zepexnl` xic
^P1STREET("IS","ixeylim","cix `lqxi`o")
o`ixql` xic
^P1STREET("IS","ixeylim","cix `lrcq")
qcrl` xic
^P1STREET("IS","ixeylim","cix `lxem")
mexl` xic
^P1STREET("IS","ixeylim","ciyx`li")
il`xyic
^P1STREET("IS","ixeylim","clzeo")
oezlc
^P1STREET("IS","ixeylim","co")
oc
^P1STREET("IS","ixeylim","co tbiq")
qibt oc
^P1STREET("IS","ixeylim","cpi`l")
l`ipc
^P1STREET("IS","ixeylim","cpi`l ipeaqwi")
iwqaepi l`ipc
^P1STREET("IS","ixeylim","cxb `lbepnd")
dnpebl` bxc
^P1STREET("IS","ixeylim","cxbez")
zebxc
^P1STREET("IS","ixeylim","cxfpx igi`l")
l`igi xpfxc
^P1STREET("IS","ixeylim","cxj `lec")
cel` jxc
^P1STREET("IS","ixeylim","cxj aiz gexeo")
oexeg zia jxc
^P1STREET("IS","ixeylim","cxj aiz gpip`")
`pipg zia jxc
^P1STREET("IS","ixeylim","cxj aiz lgm")
mgl zia jxc
^P1STREET("IS","ixeylim","cxj apinipd")
dpinipa jxc
^P1STREET("IS","ixeylim","cxj bo dgiez")
zeigd ob jxc
^P1STREET("IS","ixeylim","cxj d`giez")
zeig`d jxc
^P1STREET("IS","ixeylim","cxj d`ilpez")
zepli`d jxc
^P1STREET("IS","ixeylim","cxj d`les refi pxwiq")
qiwxp ifer sel`d jxc
^P1STREET("IS","ixeylim","cxj dfizim")
mizifd jxc
^P1STREET("IS","ixeylim","cxj dgexy")
yxegd jxc
^P1STREET("IS","ixeylim","cxj dkxnim")
minxkd jxc
^P1STREET("IS","ixeylim","cxj dnepclio")
oilcpend jxc
^P1STREET("IS","ixeylim","cxj dqlr")
rlqd jxc
^P1STREET("IS","ixeylim","cxj dretl")
lterd jxc
^P1STREET("IS","ixeylim","cxj dzvtiz")
zitvzd jxc
^P1STREET("IS","ixeylim","cxj gaxeo")
oexag jxc
^P1STREET("IS","ixeylim","cxj gexio")
oixeg jxc
^P1STREET("IS","ixeylim","cxj gfnd")
dnfg jxc
^P1STREET("IS","ixeylim","cxj giim vitexi")
ixetiv miig jxc
^P1STREET("IS","ixeylim","cxj ixige")
egixi jxc
^P1STREET("IS","ixeylim","cxj libz dpyim")
miypd zbil jxc
^P1STREET("IS","ixeylim","cxj nbipi ixeylim")
milyexi ipibn jxc
^P1STREET("IS","ixeylim","cxj nyd axrm")
mrxa dyn jxc
^P1STREET("IS","ixeylim","cxj nye`d")
d`eyn jxc
^P1STREET("IS","ixeylim","cxj paleq")
qelap jxc
^P1STREET("IS","ixeylim","cxj qelc")
cleq jxc
^P1STREET("IS","ixeylim","cxj riqeeid")
dieeqir jxc
^P1STREET("IS","ixeylim","cxj xetio")
oitex jxc
^P1STREET("IS","ixeylim","cxj yexw")
wxey jxc
^P1STREET("IS","ixeylim","cxj ykm")
mky jxc
^P1STREET("IS","ixeylim","cxj yrx d`xiez")
zeix`d xry jxc
^P1STREET("IS","ixeylim","cxj zl `aia")
aia` lz jxc
^P1STREET("IS","ixeylim","d`bef")
feb`d
^P1STREET("IS","ixeylim","d`bq")
qb`d
^P1STREET("IS","ixeylim","d`cne""x naei`o")
o`iean x"enc`d
^P1STREET("IS","ixeylim","d`cne""x naeqheo")
oehqean x"enc`d
^P1STREET("IS","ixeylim","d`cne""x narlf")
flran x"enc`d
^P1STREET("IS","ixeylim","d`cne""x nbex")
xebn x"enc`d
^P1STREET("IS","ixeylim","d`cne""x neif'piu")
uip'fien x"enc`d
^P1STREET("IS","ixeylim","d`cne""x nlieaeihy")
yhieaeiln x"enc`d
^P1STREET("IS","ixeylim","d`cne""x nqcibex`")
`xebicqn x"enc`d
^P1STREET("IS","ixeylim","d`cne""x nv'kpea")
aepk'vn x"enc`d
^P1STREET("IS","ixeylim","d`cne""x nxef'io")
oi'fexn x"enc`d
^P1STREET("IS","ixeylim","d`cnexim nypix")
xipyn mixenc`d
^P1STREET("IS","ixeylim","d`cxikl")
lkixc`d
^P1STREET("IS","ixeylim","d`cxz")
zxc`d
^P1STREET("IS","ixeylim","d`e""m")
m"e`d
^P1STREET("IS","ixeylim","d`ebcd")
dcbe`d
^P1STREET("IS","ixeylim","d`efpx bcreo")
oercb xpfe`d
^P1STREET("IS","ixeylim","d`eno")
one`d
^P1STREET("IS","ixeylim","d`etd")
dte`d
^P1STREET("IS","ixeylim","d`ex")
xe`d
^P1STREET("IS","ixeylim","d`exo")
oxe`d
^P1STREET("IS","ixeylim","d`fea")
aef`d
^P1STREET("IS","ixeylim","d`geed nrlez")
zelrn deeg`d
^P1STREET("IS","ixeylim","d`gez flnd")
dnlf zeg`d
^P1STREET("IS","ixeylim","d`gez ideciz")
zicedi zeg`d
^P1STREET("IS","ixeylim","d`giez")
zeig`d
^P1STREET("IS","ixeylim","d`gim ldxo")
oxdl mig`d
^P1STREET("IS","ixeylim","d`iil")
lii`d
^P1STREET("IS","ixeylim","d`ild")
dli`d
^P1STREET("IS","ixeylim","d`ixiz")
zixi`d
^P1STREET("IS","ixeylim","d`nex`im")
mi`xen`d
^P1STREET("IS","ixeylim","d`nxklim")
milkxn`d
^P1STREET("IS","ixeylim","d`ptd")
dtp`d
^P1STREET("IS","ixeylim","d`txqw")
wqxt`d
^P1STREET("IS","ixeylim","d`v""l")
l"v`d
^P1STREET("IS","ixeylim","d`x""i")
i"x`d
^P1STREET("IS","ixeylim","d`xard")
drax`d
^P1STREET("IS","ixeylim","d`xf")
fx`d
^P1STREET("IS","ixeylim","d`xfim")
mifx`d
^P1STREET("IS","ixeylim","d`xi hxeno")
onexh ix`d
^P1STREET("IS","ixeylim","d`xnpim")
mipnx`d
^P1STREET("IS","ixeylim","d`xpeo")
oepx`d
^P1STREET("IS","ixeylim","d`ykel")
leky`d
^P1STREET("IS","ixeylim","d`yl")
ly`d
^P1STREET("IS","ixeylim","daali")
ilaad
^P1STREET("IS","ixeylim","dakexim")
mixekad
^P1STREET("IS","ixeylim","dap`i")
i`pad
^P1STREET("IS","ixeylim","daxeo dixy")
yxid oexad
^P1STREET("IS","ixeylim","daxibcd draxiz")
zixard dcbixad
^P1STREET("IS","ixeylim","daxikd")
dkixad
^P1STREET("IS","ixeylim","db`eo nhexc`")
`cxehn oe`bd
^P1STREET("IS","ixeylim","db`epim")
mipe`bd
^P1STREET("IS","ixeylim","dbcec dgniyi")
iyingd cecbd
^P1STREET("IS","ixeylim","dbcec draxi")
ixard cecbd
^P1STREET("IS","ixeylim","dbcp""r")
r"pcbd
^P1STREET("IS","ixeylim","dbe`l")
l`ebd
^P1STREET("IS","ixeylim","dben`")
`nebd
^P1STREET("IS","ixeylim","dbi`")
`ibd
^P1STREET("IS","ixeylim","dbild")
dlibd
^P1STREET("IS","ixeylim","dblaer")
realbd
^P1STREET("IS","ixeylim","dblbl")
lblbd
^P1STREET("IS","ixeylim","dblil")
lilbd
^P1STREET("IS","ixeylim","dbo dhkpelebi")
ibelepkhd obd
^P1STREET("IS","ixeylim","dbpez")
zepbd
^P1STREET("IS","ixeylim","dbppz")
zppbd
^P1STREET("IS","ixeylim","dbto")
otbd
^P1STREET("IS","ixeylim","dbtpim")
miptbd
^P1STREET("IS","ixeylim","dbx""`")
`"xbd
^P1STREET("IS","ixeylim","dbziz")
zizbd
^P1STREET("IS","ixeylim","dc`id")
di`cd
^P1STREET("IS","ixeylim","dca")
acd
^P1STREET("IS","ixeylim","dcela")
alecd
^P1STREET("IS","ixeylim","dcid reacid")
dicaer dicd
^P1STREET("IS","ixeylim","dciyeo")
oeyicd
^P1STREET("IS","ixeylim","dcneniz")
zinencd
^P1STREET("IS","ixeylim","dcs dieni")
ineid scd
^P1STREET("IS","ixeylim","dctpd")
dptcd
^P1STREET("IS","ixeylim","dcwl")
lwcd
^P1STREET("IS","ixeylim","dcxem")
mexcd
^P1STREET("IS","ixeylim","ddahgd")
dghadd
^P1STREET("IS","ixeylim","ddbpd")
dpbdd
^P1STREET("IS","ixeylim","ddcqim")
miqcdd
^P1STREET("IS","ixeylim","ddqzcxez")
zexczqdd
^P1STREET("IS","ixeylim","ddraxd")
dxardd
^P1STREET("IS","ixeylim","ddzpglez")
zelgpzdd
^P1STREET("IS","ixeylim","delvaxb yngd")
dgny bxavled
^P1STREET("IS","ixeylim","denipx yne`l")
l`eny xpined
^P1STREET("IS","ixeylim","derc dl`eni")
ine`ld cred
^P1STREET("IS","ixeylim","dexaiu")
uiaxed
^P1STREET("IS","ixeylim","dexwpeq iegpo")
opgei qepwxed
^P1STREET("IS","ixeylim","dexwpid")
dipwxed
^P1STREET("IS","ixeylim","deyr")
ryed
^P1STREET("IS","ixeylim","dfiz")
zifd
^P1STREET("IS","ixeylim","dfkxeo")
oexkfd
^P1STREET("IS","ixeylim","dfnix")
xinfd
^P1STREET("IS","ixeylim","dgaey")
yeagd
^P1STREET("IS","ixeylim","dgavlz")
zlvagd
^P1STREET("IS","ixeylim","dgend dyliyiz")
ziyilyd dnegd
^P1STREET("IS","ixeylim","dgeva")
avegd
^P1STREET("IS","ixeylim","dgi""l")
l"igd
^P1STREET("IS","ixeylim","dgi""y")
y"igd
^P1STREET("IS","ixeylim","dgic""`")
`"cigd
^P1STREET("IS","ixeylim","dgleu")
uelgd
^P1STREET("IS","ixeylim","dglniz")
zinlgd
^P1STREET("IS","ixeylim","dgqicd")
dciqgd
^P1STREET("IS","ixeylim","dgva")
avgd
^P1STREET("IS","ixeylim","dgvevxd")
dxvevgd
^P1STREET("IS","ixeylim","dgxea")
aexgd
^P1STREET("IS","ixeylim","dgxhem")
mehxgd
^P1STREET("IS","ixeylim","dgxneo")
oenxgd
^P1STREET("IS","ixeylim","dgxviz")
zivxgd
^P1STREET("IS","ixeylim","dgxy")
yxgd
^P1STREET("IS","ixeylim","dgxyz")
zyxgd
^P1STREET("IS","ixeylim","dgynep`im")
mi`penygd
^P1STREET("IS","ixeylim","dhexim")
mixehd
^P1STREET("IS","ixeylim","dhgpd")
dpghd
^P1STREET("IS","ixeylim","dhiiqim")
miqiihd
^P1STREET("IS","ixeylim","diaew")
weaid
^P1STREET("IS","ixeylim","didecim")
micedid
^P1STREET("IS","ixeylim","diefnd")
dnfeid
^P1STREET("IS","ixeylim","dilcqdiinx")
xniidqclid
^P1STREET("IS","ixeylim","diro")
orid
^P1STREET("IS","ixeylim","dixco")
ocxid
^P1STREET("IS","ixeylim","dixeylni")
inlyexid
^P1STREET("IS","ixeylim","dixnej")
jenxid
^P1STREET("IS","ixeylim","dixweo")
oewxid
^P1STREET("IS","ixeylim","dixypaxb")
bxapyxid
^P1STREET("IS","ixeylim","diyiad")
daiyid
^P1STREET("IS","ixeylim","dkexkim")
mikxekd
^P1STREET("IS","ixeylim","dkezl")
lzekd
^P1STREET("IS","ixeylim","dkipex")
xepikd
^P1STREET("IS","ixeylim","dklpiz")
ziplkd
^P1STREET("IS","ixeylim","dkpqz `exgim")
migxe` zqpkd
^P1STREET("IS","ixeylim","dktix")
xitkd
^P1STREET("IS","ixeylim","dkxkem")
mekxkd
^P1STREET("IS","ixeylim","dkxnl")
lnxkd
^P1STREET("IS","ixeylim","dl""d")
d"ld
^P1STREET("IS","ixeylim","dla draxi")
ixard ald
^P1STREET("IS","ixeylim","dlapeo")
oepald
^P1STREET("IS","ixeylim","dleh")
held
^P1STREET("IS","ixeylim","dlhipim")
mipihld
^P1STREET("IS","ixeylim","dll")
lld
^P1STREET("IS","ixeylim","dlpd kbo")
obk dpld
^P1STREET("IS","ixeylim","dlpi dnlkd")
dklnd ipld
^P1STREET("IS","ixeylim","dltxio iyx`l")
l`xyi oixtld
^P1STREET("IS","ixeylim","dlx giim")
miig xld
^P1STREET("IS","ixeylim","dn""b")
b"nd
^P1STREET("IS","ixeylim","dn`qs")
sq`nd
^P1STREET("IS","ixeylim","dnaih")
hiand
^P1STREET("IS","ixeylim","dnayx")
xyand
^P1STREET("IS","ixeylim","dnbcl")
lcbnd
^P1STREET("IS","ixeylim","dnbic")
cibnd
^P1STREET("IS","ixeylim","dnctiqim")
miqitcnd
^P1STREET("IS","ixeylim","dncxbez")
zebxcnd
^P1STREET("IS","ixeylim","dneo")
oend
^P1STREET("IS","ixeylim","dneqkim")
mikqend
^P1STREET("IS","ixeylim","dnex")
xend
^P1STREET("IS","ixeylim","dnexd")
dxend
^P1STREET("IS","ixeylim","dnfxgo")
ogxfnd
^P1STREET("IS","ixeylim","dngpkz")
zkpgnd
^P1STREET("IS","ixeylim","dngvaez")
zeavgnd
^P1STREET("IS","ixeylim","dngzxez")
zexzgnd
^P1STREET("IS","ixeylim","dniiqcim")
micqiind
^P1STREET("IS","ixeylim","dnkaim")
miaknd
^P1STREET("IS","ixeylim","dnl`j")
j`lnd
^P1STREET("IS","ixeylim","dnl`kd")
dk`lnd
^P1STREET("IS","ixeylim","dnliu")
uilnd
^P1STREET("IS","ixeylim","dnlj b'exb'")
'bxe'b jlnd
^P1STREET("IS","ixeylim","dnlj cec")
cec jlnd
^P1STREET("IS","ixeylim","dnlj ylnd")
dnly jlnd
^P1STREET("IS","ixeylim","dnlnc")
cnlnd
^P1STREET("IS","ixeylim","dnnepd")
dpennd
^P1STREET("IS","ixeylim","dnnvi`")
`ivnnd
^P1STREET("IS","ixeylim","dnqbx")
xbqnd
^P1STREET("IS","ixeylim","dnrio")
oirnd
^P1STREET("IS","ixeylim","dnrlez")
zelrnd
^P1STREET("IS","ixeylim","dnrtilim")
militrnd
^P1STREET("IS","ixeylim","dnrxaim")
miaxrnd
^P1STREET("IS","ixeylim","dnry")
yrnd
^P1STREET("IS","ixeylim","dntwc")
cwtnd
^P1STREET("IS","ixeylim","dnvecd")
dcevnd
^P1STREET("IS","ixeylim","dnvex")
xevnd
^P1STREET("IS","ixeylim","dnvlziim")
miizlvnd
^P1STREET("IS","ixeylim","dnwealim")
milaewnd
^P1STREET("IS","ixeylim","dnxt`")
`txnd
^P1STREET("IS","ixeylim","dnyexipim")
mipixeynd
^P1STREET("IS","ixeylim","dnyexxim")
mixxeynd
^P1STREET("IS","ixeylim","dnylh")
hlynd
^P1STREET("IS","ixeylim","dnzpglim adx")
xda milgpznd
^P1STREET("IS","ixeylim","dpai`im")
mi`iapd
^P1STREET("IS","ixeylim","dpal")
lapd
^P1STREET("IS","ixeylim","dpbx")
xbpd
^P1STREET("IS","ixeylim","dpehxim")
mixhepd
^P1STREET("IS","ixeylim","dpevxim")
mixvepd
^P1STREET("IS","ixeylim","dpgl")
lgpd
^P1STREET("IS","ixeylim","dphwd")
dwhpd
^P1STREET("IS","ixeylim","dpiicez")
zeciipd
^P1STREET("IS","ixeylim","dpivo")
ovipd
^P1STREET("IS","ixeylim","dpnx")
xnpd
^P1STREET("IS","ixeylim","dpvi""a")
a"ivpd
^P1STREET("IS","ixeylim","dpxc")
cxpd
^P1STREET("IS","ixeylim","dpyi`")
`iypd
^P1STREET("IS","ixeylim","dpyi` idecd")
dcedi `iypd
^P1STREET("IS","ixeylim","dpyx")
xypd
^P1STREET("IS","ixeylim","dq`gd")
dg`qd
^P1STREET("IS","ixeylim","dqcp`")
`pcqd
^P1STREET("IS","ixeylim","dqellim")
milleqd
^P1STREET("IS","ixeylim","dqetx")
xteqd
^P1STREET("IS","ixeylim","dqexb")
bxeqd
^P1STREET("IS","ixeylim","dqgla")
algqd
^P1STREET("IS","ixeylim","dqiix")
xiiqd
^P1STREET("IS","ixeylim","dqiixz dixeylniz")
zinlyexid zxiiqd
^P1STREET("IS","ixeylim","dqlg")
glqd
^P1STREET("IS","ixeylim","dqzepiz")
zipezqd
^P1STREET("IS","ixeylim","dqzz")
zzqd
^P1STREET("IS","ixeylim","dr""g")
g"rd
^P1STREET("IS","ixeylim","dreba")
aberd
^P1STREET("IS","ixeylim","drenx")
xnerd
^P1STREET("IS","ixeylim","dretxz")
zxterd
^P1STREET("IS","ixeylim","drixiz")
zixird
^P1STREET("IS","ixeylim","drlei")
ielrd
^P1STREET("IS","ixeylim","drlid dypid")
dipyd dilrd
^P1STREET("IS","ixeylim","drliid")
diilrd
^P1STREET("IS","ixeylim","drnlim")
milnrd
^P1STREET("IS","ixeylim","drnwim")
miwnrd
^P1STREET("IS","ixeylim","drqwo")
owqrd
^P1STREET("IS","ixeylim","drxnepim")
mipenxrd
^P1STREET("IS","ixeylim","dtexvim")
mivxetd
^P1STREET("IS","ixeylim","dtlc")
cltd
^P1STREET("IS","ixeylim","dtln""g")
g"nltd
^P1STREET("IS","ixeylim","dtqbd")
dbqtd
^P1STREET("IS","ixeylim","dtxhifpim")
mipfihxtd
^P1STREET("IS","ixeylim","dtxqd")
dqxtd
^P1STREET("IS","ixeylim","dvai")
iavd
^P1STREET("IS","ixeylim","dvarepi")
iperavd
^P1STREET("IS","ixeylim","dvax")
xavd
^P1STREET("IS","ixeylim","dves")
sevd
^P1STREET("IS","ixeylim","dviepez")
zepeivd
^P1STREET("IS","ixeylim","dvitexo")
oxetivd
^P1STREET("IS","ixeylim","dvls")
slvd
^P1STREET("IS","ixeylim","dvpgpim")
mipgpvd
^P1STREET("IS","ixeylim","dvtixd")
dxitvd
^P1STREET("IS","ixeylim","dwalo")
olawd
^P1STREET("IS","ixeylim","dwepbxq dviepi")
ipeivd qxbpewd
^P1STREET("IS","ixeylim","dwex`")
`xewd
^P1STREET("IS","ixeylim","dwiyeo")
oeyiwd
^P1STREET("IS","ixeylim","dwlix")
xilwd
^P1STREET("IS","ixeylim","dwnxepez")
zepexnwd
^P1STREET("IS","ixeylim","dwpd")
dpwd
^P1STREET("IS","ixeylim","dwpneo")
oenpwd
^P1STREET("IS","ixeylim","dwvio qilax")
xaliq oivwd
^P1STREET("IS","ixeylim","dwx`im")
mi`xwd
^P1STREET("IS","ixeylim","dwxce")
ecxwd
^P1STREET("IS","ixeylim","dx dfizim")
mizifd xd
^P1STREET("IS","ixeylim","dx dgevaim")
miavegd xd
^P1STREET("IS","ixeylim","dx dxvl")
lvxd xd
^P1STREET("IS","ixeylim","dx vieo")
oeiv xd
^P1STREET("IS","ixeylim","dx yne`l")
l`eny xd
^P1STREET("IS","ixeylim","dx`""d")
d"`xd
^P1STREET("IS","ixeylim","dx`eapi cec")
cec ipae`xd
^P1STREET("IS","ixeylim","dx`m")
m`xd
^P1STREET("IS","ixeylim","dxa `axdm th`l")
l`ht mdxa` axd
^P1STREET("IS","ixeylim","dxa `b""o")
o"b` axd
^P1STREET("IS","ixeylim","dxa `laegx giim")
miig xgeal` axd
^P1STREET("IS","ixeylim","dxa `lide eqxno")
onxqe edil` axd
^P1STREET("IS","ixeylim","dxa `lide lti`o")
o`itl edil` axd
^P1STREET("IS","ixeylim","dxa `pb'l eic`l")
l`cie l'bp` axd
^P1STREET("IS","ixeylim","dxa `pweed")
deewp` axd
^P1STREET("IS","ixeylim","dxa `ylb")
bly` axd
^P1STREET("IS","ixeylim","dxa alei")
iela axd
^P1STREET("IS","ixeylim","dxa ao ynreo cec")
cec oerny oa axd
^P1STREET("IS","ixeylim","dxa avl`l f'elhi")
ihle'f l`lva axd
^P1STREET("IS","ixeylim","dxa axeci")
icexa axd
^P1STREET("IS","ixeylim","dxa axlio")
oilxa axd
^P1STREET("IS","ixeylim","dxa ba`i")
i`ab axd
^P1STREET("IS","ixeylim","dxa dxu ieqs vai")
iav sqei uxd axd
^P1STREET("IS","ixeylim","dxa dxveb")
bevxd axd
^P1STREET("IS","ixeylim","dxa dxylx")
xlyxd axd
^P1STREET("IS","ixeylim","dxa eelpyhiio")
oiihyplee axd
^P1STREET("IS","ixeylim","dxa gfwid yaz`i")
i`zay diwfg axd
^P1STREET("IS","ixeylim","dxa giim eihl")
lhie miig axd
^P1STREET("IS","ixeylim","dxa giim rix`wi")
iw`xir miig axd
^P1STREET("IS","ixeylim","dxa go")
og axd
^P1STREET("IS","ixeylim","dxa ideyr axim")
mixa ryedi axd
^P1STREET("IS","ixeylim","dxa ieqs yxim")
mixy sqei axd
^P1STREET("IS","ixeylim","dxa irwa n`ix")
xi`n awri axd
^P1STREET("IS","ixeylim","dxa ivgw `aeda")
adea` wgvi axd
^P1STREET("IS","ixeylim","dxa ivgw gi hiia")
aiih ig wgvi axd
^P1STREET("IS","ixeylim","dxa kdpno")
onpdk axd
^P1STREET("IS","ixeylim","dxa leio")
oiel axd
^P1STREET("IS","ixeylim","dxa n`ix gcy")
ycg xi`n axd
^P1STREET("IS","ixeylim","dxa nineo")
oenin axd
^P1STREET("IS","ixeylim","dxa nyd `lneylipe")
epilyenl` dyn axd
^P1STREET("IS","ixeylim","dxa nyd kdo y`eli")
ile`y odk dyn axd
^P1STREET("IS","ixeylim","dxa nywlea")
aelwyn axd
^P1STREET("IS","ixeylim","dxa pexew")
wexep axd
^P1STREET("IS","ixeylim","dxa pqim ivgw")
wgvi miqp axd
^P1STREET("IS","ixeylim","dxa qexevwio")
oiwvexeq axd
^P1STREET("IS","ixeylim","dxa rcpi")
ipcr axd
^P1STREET("IS","ixeylim","dxa refi wlkdiim")
miidklw ifer axd
^P1STREET("IS","ixeylim","dxa refi`l")
l`ifer axd
^P1STREET("IS","ixeylim","dxa rfxo")
oxfr axd
^P1STREET("IS","ixeylim","dxa rni`l")
l`inr axd
^P1STREET("IS","ixeylim","dxa tpibl")
lbipt axd
^P1STREET("IS","ixeylim","dxa txcq")
qcxt axd
^P1STREET("IS","ixeylim","dxa txpw")
wpxt axd
^P1STREET("IS","ixeylim","dxa vai idecd")
dcedi iav axd
^P1STREET("IS","ixeylim","dxa weqeaqwi")
iwqaeqew axd
^P1STREET("IS","ixeylim","dxa wew")
wew axd
^P1STREET("IS","ixeylim","dxa wlepineq")
qenipelw axd
^P1STREET("IS","ixeylim","dxa xiipq")
qpiix axd
^P1STREET("IS","ixeylim","dxa xt`l th`l")
l`ht l`tx axd
^P1STREET("IS","ixeylim","dxa y`b")
b`y axd
^P1STREET("IS","ixeylim","dxa ytxax")
xaxty axd
^P1STREET("IS","ixeylim","dxa yxix`")
`xixy axd
^P1STREET("IS","ixeylim","dxai nleaaiu'")
'uiaaeln iaxd
^P1STREET("IS","ixeylim","dxaxh qne`l")
l`enq hxaxd
^P1STREET("IS","ixeylim","dxca""f")
f"acxd
^P1STREET("IS","ixeylim","dxces")
secxd
^P1STREET("IS","ixeylim","dxeo `l xyic")
ciyx l` oexd
^P1STREET("IS","ixeylim","dxeqnxio")
oixnqexd
^P1STREET("IS","ixeylim","dxhem")
mehxd
^P1STREET("IS","ixeylim","dxka")
akxd
^P1STREET("IS","ixeylim","dxkaim")
miakxd
^P1STREET("IS","ixeylim","dxkaz")
zakxd
^P1STREET("IS","ixeylim","dxliu")
uilxd
^P1STREET("IS","ixeylim","dxo")
oxd
^P1STREET("IS","ixeylim","dxtealiwd dcenipiwpiz")
zipwipinecd dwilaetxd
^P1STREET("IS","ixeylim","dxvaxb f`a")
a`f bxavxd
^P1STREET("IS","ixeylim","dxvl ")
 lvxd
^P1STREET("IS","ixeylim","dxwg")
gwxd
^P1STREET("IS","ixeylim","dxwnd")
dnwxd
^P1STREET("IS","ixeylim","dxwtz")
ztwxd
^P1STREET("IS","ixeylim","dxxi xtel")
letx ixxd
^P1STREET("IS","ixeylim","dxycm")
mcyxd
^P1STREET("IS","ixeylim","dyard")
drayd
^P1STREET("IS","ixeylim","dyenx")
xneyd
^P1STREET("IS","ixeylim","dyerl")
lreyd
^P1STREET("IS","ixeylim","dyerxim")
mixreyd
^P1STREET("IS","ixeylim","dyetx")
xteyd
^P1STREET("IS","ixeylim","dyeypim")
mipyeyd
^P1STREET("IS","ixeylim","dyfis")
sifyd
^P1STREET("IS","ixeylim","dyiixez")
zexiiyd
^P1STREET("IS","ixeylim","dyixiep`i")
i`peixiyd
^P1STREET("IS","ixeylim","dyiy")
yiyd
^P1STREET("IS","ixeylim","dyiyd ryx")
xyr dyiyd
^P1STREET("IS","ixeylim","dyl""d")
d"lyd
^P1STREET("IS","ixeylim","dylie")
eilyd
^P1STREET("IS","ixeylim","dylkz")
zklyd
^P1STREET("IS","ixeylim","dylylz")
zlylyd
^P1STREET("IS","ixeylim","dynipiz")
zipinyd
^P1STREET("IS","ixeylim","dywc")
cwyd
^P1STREET("IS","ixeylim","dywnd")
dnwyd
^P1STREET("IS","ixeylim","dz`pd")
dp`zd
^P1STREET("IS","ixeylim","dzaex")
xeazd
^P1STREET("IS","ixeylim","dzalio")
oilazd
^P1STREET("IS","ixeylim","dzenx")
xnezd
^P1STREET("IS","ixeylim","dzetim")
mitezd
^P1STREET("IS","ixeylim","dzex")
xezd
^P1STREET("IS","ixeylim","dzez")
zezd
^P1STREET("IS","ixeylim","dzezgo")
ogzezd
^P1STREET("IS","ixeylim","dziaepim")
mipeaizd
^P1STREET("IS","ixeylim","dzklz")
zlkzd
^P1STREET("IS","ixeylim","dznic")
cinzd
^P1STREET("IS","ixeylim","dznxim")
mixnzd
^P1STREET("IS","ixeylim","dzp`im")
mi`pzd
^P1STREET("IS","ixeylim","dzpetd")
dtepzd
^P1STREET("IS","ixeylim","dzryid")
diyrzd
^P1STREET("IS","ixeylim","dzteg")
getzd
^P1STREET("IS","ixeylim","dzwed")
dewzd
^P1STREET("IS","ixeylim","dzwetd")
dtewzd
^P1STREET("IS","ixeylim","e`ci b'ef")
fe'b ic`e
^P1STREET("IS","ixeylim","e`ci gileed")
deelig ic`e
^P1STREET("IS","ixeylim","e`ci w`cem")
mec`w ic`e
^P1STREET("IS","ixeylim","eecb'eec")
cee'bcee
^P1STREET("IS","ixeylim","eeif yne`l")
l`eny fiee
^P1STREET("IS","ixeylim","eelhd drliz")
zilrd dhlee
^P1STREET("IS","ixeylim","eelhx `alq")
qla` xhlee
^P1STREET("IS","ixeylim","eelj")
jlee
^P1STREET("IS","ixeylim","eelpaxb x`el")
le`x bxaplee
^P1STREET("IS","ixeylim","eeltqeo")
oeqtlee
^P1STREET("IS","ixeylim","eeyipbheo")
oehbpiyee
^P1STREET("IS","ixeylim","eid celexefd")
dfexelec die
^P1STREET("IS","ixeylim","eiiq irwa")
awri qiie
^P1STREET("IS","ixeylim","eiiqaxb giim")
miig bxaqiie
^P1STREET("IS","ixeylim","eiiu ieqs")
sqei uiie
^P1STREET("IS","ixeylim","eilidm txl")
lxt mdilie
^P1STREET("IS","ixeylim","eilp`i")
i`plie
^P1STREET("IS","ixeylim","eipcdm cicq")
qcic mdcpie
^P1STREET("IS","ixeylim","eipd")
dpie
^P1STREET("IS","ixeylim","eipebxc")
cxbepie
^P1STREET("IS","ixeylim","eiwhex eielieq")
qeileie xehwie
^P1STREET("IS","ixeylim","elixe")
exile
^P1STREET("IS","ixeylim","epeaqwi")
iwqaepe
^P1STREET("IS","ixeylim","ephexd nyd")
dyn dxehpe
^P1STREET("IS","ixeylim","erc `xar `xvez")
zevx` rax` cre
^P1STREET("IS","ixeylim","exaexb")
bxeaxe
^P1STREET("IS","ixeylim","exc")
cxe
^P1STREET("IS","ixeylim","excipeo")
oepicxe
^P1STREET("IS","ixeylim","eyiu")
uiye
^P1STREET("IS","ixeylim","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","ixeylim","f`a eilp`i")
i`plie a`f
^P1STREET("IS","ixeylim","f`a yxs")
sxy a`f
^P1STREET("IS","ixeylim","faeleo")
oeleaf
^P1STREET("IS","ixeylim","fdaiz")
ziadf
^P1STREET("IS","ixeylim","fdexiz")
zixedf
^P1STREET("IS","ixeylim","fdxd")
dxdf
^P1STREET("IS","ixeylim","feh`")
`hef
^P1STREET("IS","ixeylim","fepptlc")
cltppef
^P1STREET("IS","ixeylim","feqno")
onqef
^P1STREET("IS","ixeylim","fibtxic nefq")
qfen cixtbif
^P1STREET("IS","ixeylim","fieeio y""i")
i"y oieeif
^P1STREET("IS","ixeylim","filaxb nyd")
dyn bxalif
^P1STREET("IS","ixeylim","filaxyhiio")
oiihyxalif
^P1STREET("IS","ixeylim","fiz xrpo")
oprx zif
^P1STREET("IS","ixeylim","fkxeo heaid")
diaeh oexkf
^P1STREET("IS","ixeylim","fkxeo irwa")
awri oexkf
^P1STREET("IS","ixeylim","fkxid")
dixkf
^P1STREET("IS","ixeylim","fkxid dxet`")
`texd dixkf
^P1STREET("IS","ixeylim","flcd dnyexxz")
zxxeynd dclf
^P1STREET("IS","ixeylim","flno ypi`ex")
xe`ipy onlf
^P1STREET("IS","ixeylim","fnexd")
dxenf
^P1STREET("IS","ixeylim","fnpdes")
sedpnf
^P1STREET("IS","ixeylim","fpbeil iyx`l")
l`xyi liebpf
^P1STREET("IS","ixeylim","frix`")
`xirf
^P1STREET("IS","ixeylim","fwq nyd")
dyn qwf
^P1STREET("IS","ixeylim","fx nxcki")
ikcxn xf
^P1STREET("IS","ixeylim","fxeaal")
laaexf
^P1STREET("IS","ixeylim","fxg axph")
hpxa gxf
^P1STREET("IS","ixeylim","fxgi iyx`l")
l`xyi igxf
^P1STREET("IS","ixeylim","fxivwi")
iwvixf
^P1STREET("IS","ixeylim","g`o `l`wa`h")
h`aw`l` o`g
^P1STREET("IS","ixeylim","g`xz `lpv`xd")
dx`vpl` zx`g
^P1STREET("IS","ixeylim","ga""c")
c"ag
^P1STREET("IS","ixeylim","gaia `aylem")
melya` aiag
^P1STREET("IS","ixeylim","gaia y`ewi")
iwe`y aiag
^P1STREET("IS","ixeylim","gawew")
wewag
^P1STREET("IS","ixeylim","gax")
xag
^P1STREET("IS","ixeylim","gaxepi tqg")
gqt ipexag
^P1STREET("IS","ixeylim","gaxz nypiez")
zeipyn zxag
^P1STREET("IS","ixeylim","gaxz y""q")
q"y zxag
^P1STREET("IS","ixeylim","gaxz zdilim")
milidz zxag
^P1STREET("IS","ixeylim","gayey")
yeyag
^P1STREET("IS","ixeylim","gb`fi")
if`bg
^P1STREET("IS","ixeylim","gbai dqlr")
rlqd iabg
^P1STREET("IS","ixeylim","gbi")
ibg
^P1STREET("IS","ixeylim","gbif")
fibg
^P1STREET("IS","ixeylim","geaai vieo")
oeiv iaaeg
^P1STREET("IS","ixeylim","geez dlinec")
cenild zeeg
^P1STREET("IS","ixeylim","geknz iyx`l")
l`xyi znkeg
^P1STREET("IS","ixeylim","gelcd dpai`d")
d`iapd dcleg
^P1STREET("IS","ixeylim","genz dvltim")
mitlvd zneg
^P1STREET("IS","ixeylim","genz pgnid")
dingp zneg
^P1STREET("IS","ixeylim","gepi dnrbl")
lbrnd ipeg
^P1STREET("IS","ixeylim","geqm `cio b'xlld")
dllx'b oic` mqeg
^P1STREET("IS","ixeylim","gevez dievx")
xveid zeveg
^P1STREET("IS","ixeylim","gey `lgle")
elgl` yeg
^P1STREET("IS","ixeylim","gfeo `iy")
yi` oefg
^P1STREET("IS","ixeylim","gfeo vieo")
oeiv oefg
^P1STREET("IS","ixeylim","gfpeaiu")
uiaepfg
^P1STREET("IS","ixeylim","gfwide dnlj")
jlnd ediwfg
^P1STREET("IS","ixeylim","ghiaz barzi")
izrab zaihg
^P1STREET("IS","ixeylim","ghiaz dpgl")
lgpd zaihg
^P1STREET("IS","ixeylim","ghiaz dx`l")
l`xd zaihg
^P1STREET("IS","ixeylim","ghiaz ixeylim")
milyexi zaihg
^P1STREET("IS","ixeylim","ghiaz rviepi")
ipeivr zaihg
^P1STREET("IS","ixeylim","giax")
xaig
^P1STREET("IS","ixeylim","giez")
zeig
^P1STREET("IS","ixeylim","gii `cm")
mc` iig
^P1STREET("IS","ixeylim","giim gaia")
aiag miig
^P1STREET("IS","ixeylim","giim lqwea")
aewql miig
^P1STREET("IS","ixeylim","giim refx")
xfer miig
^P1STREET("IS","ixeylim","giim wdo")
odw miig
^P1STREET("IS","ixeylim","giim zexo")
oxez miig
^P1STREET("IS","ixeylim","gil d`eix")
xie`d lig
^P1STREET("IS","ixeylim","gil dginey")
yenigd lig
^P1STREET("IS","ixeylim","gil dpcqd")
dqcpd lig
^P1STREET("IS","ixeylim","gil dwyx")
xywd lig
^P1STREET("IS","ixeylim","gil dxte`d")
d`etxd lig
^P1STREET("IS","ixeylim","gil nynx")
xnyn lig
^P1STREET("IS","ixeylim","gil pyim")
miyp lig
^P1STREET("IS","ixeylim","gixm")
mxig
^P1STREET("IS","ixeylim","gkim `lide")
edil` mikg
^P1STREET("IS","ixeylim","gkm `axdm")
mdxa` mkg
^P1STREET("IS","ixeylim","gkm ylem")
mely mkg
^P1STREET("IS","ixeylim","gkm yne`l axekim")
mikexa l`eny mkg
^P1STREET("IS","ixeylim","gkni lealio")
oilael inkg
^P1STREET("IS","ixeylim","glc `ao `l e`lic")
cil`e l` oa` clg
^P1STREET("IS","ixeylim","glc ao `leli")
ilel` oa clg
^P1STREET("IS","ixeylim","glgel")
leglg
^P1STREET("IS","ixeylim","glicid")
dicilg
^P1STREET("IS","ixeylim","gltz`")
`ztlg
^P1STREET("IS","ixeylim","glu")
ulg
^P1STREET("IS","ixeylim","glwid `a`")
`a` diwlg
^P1STREET("IS","ixeylim","gnm `lrio")
oirl` mng
^P1STREET("IS","ixeylim","gpd")
dpg
^P1STREET("IS","ixeylim","gpd aali")
ilaa dpg
^P1STREET("IS","ixeylim","gpo")
opg
^P1STREET("IS","ixeylim","gpp`l")
l`ppg
^P1STREET("IS","ixeylim","gppid")
dippg
^P1STREET("IS","ixeylim","gpwd")
dwpg
^P1STREET("IS","ixeylim","gqc l`axdm")
mdxa`l cqg
^P1STREET("IS","ixeylim","gqc`")
`cqg
^P1STREET("IS","ixeylim","gqices")
seciqg
^P1STREET("IS","ixeylim","gqici wxlio")
oilxw iciqg
^P1STREET("IS","ixeylim","gtu giim")
miig utg
^P1STREET("IS","ixeylim","gtvci pgem")
megp icvtg
^P1STREET("IS","ixeylim","gv' barz dnheq")
qehnd zrab 'vg
^P1STREET("IS","ixeylim","gvex")
xevg
^P1STREET("IS","ixeylim","gwl`i f`a")
a`f i`lwg
^P1STREET("IS","ixeylim","gx`z `lqrcid")
dicrql` z`xg
^P1STREET("IS","ixeylim","gxh `l qrcid")
dicrq l` hxg
^P1STREET("IS","ixeylim","gxh `l yxs")
sxy l` hxg
^P1STREET("IS","ixeylim","gxl""t")
t"lxg
^P1STREET("IS","ixeylim","gxyi axfl")
lfxa iyxg
^P1STREET("IS","ixeylim","gxz `q dxeo")
oexd q` zxg
^P1STREET("IS","ixeylim","gyio")
oiyg
^P1STREET("IS","ixeylim","gzm qetx")
xteq mzg
^P1STREET("IS","ixeylim","hai")
iah
^P1STREET("IS","ixeylim","hapwio ivgw")
wgvi oiwpah
^P1STREET("IS","ixeylim","haxid")
dixah
^P1STREET("IS","ixeylim","hdeo")
oedh
^P1STREET("IS","ixeylim","heaid")
diaeh
^P1STREET("IS","ixeylim","hetf")
fteh
^P1STREET("IS","ixeylim","hex qipi")
ipiq xeh
^P1STREET("IS","ixeylim","hex`")
`xeh
^P1STREET("IS","ixeylim","hgexy")
yxegh
^P1STREET("IS","ixeylim","hienwio nxcki")
ikcxn oiwneih
^P1STREET("IS","ixeylim","hike")
ekih
^P1STREET("IS","ixeylim","hllim")
millh
^P1STREET("IS","ixeylim","hxentlcex")
xecltnexh
^P1STREET("IS","ixeylim","hxiw `lx`m")
m`xl` wixh
^P1STREET("IS","ixeylim","hxteo")
oetxh
^P1STREET("IS","ixeylim","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","ixeylim","i.v. nik`lqeo")
oeql`kin .v.i
^P1STREET("IS","ixeylim","i`ix")
xi`i
^P1STREET("IS","ixeylim","ib`l `leo")
oel` l`bi
^P1STREET("IS","ixeylim","ib`l icio")
oici l`bi
^P1STREET("IS","ixeylim","ic gxevim")
mivexg ci
^P1STREET("IS","ixeylim","ic nxcki")
ikcxn ci
^P1STREET("IS","ixeylim","icicid")
dicici
^P1STREET("IS","ixeylim","ide`y")
y`edi
^P1STREET("IS","ixeylim","idec")
cedi
^P1STREET("IS","ixeylim","idecd")
dcedi
^P1STREET("IS","ixeylim","idecd dlei")
ield dcedi
^P1STREET("IS","ixeylim","idecd dnkai")
iaknd dcedi
^P1STREET("IS","ixeylim","idecies")
seicedi
^P1STREET("IS","ixeylim","ideciz")
zicedi
^P1STREET("IS","ixeylim","ideixia")
aixiedi
^P1STREET("IS","ixeylim","ideyr ao bnl`")
`lnb oa ryedi
^P1STREET("IS","ixeylim","ideyr ao peo")
oep oa ryedi
^P1STREET("IS","ixeylim","ideyr axeki")
ikexa ryedi
^P1STREET("IS","ixeylim","ideyr iaio")
oiai ryedi
^P1STREET("IS","ixeylim","ideyr txeex")
xeext ryedi
^P1STREET("IS","ixeylim","ideyth")
htyedi
^P1STREET("IS","ixeylim","idlem")
meldi
^P1STREET("IS","ixeylim","ie`a")
a`ei
^P1STREET("IS","ixeylim","ie`l")
l`ei
^P1STREET("IS","ixeylim","ie`l nyd qleneo")
oenelq dyn l`ei
^P1STREET("IS","ixeylim","ie`l txiclx")
xlcixt l`ei
^P1STREET("IS","ixeylim","ieaa")
aaei
^P1STREET("IS","ixeylim","ieg`i ao peo")
oep oa i`gei
^P1STREET("IS","ixeylim","iegpo dqpclx")
xlcpqd opgei
^P1STREET("IS","ixeylim","iegpo nbey gla")
alg yebn opgei
^P1STREET("IS","ixeylim","iekac")
cakei
^P1STREET("IS","ixeylim","iepd")
dpei
^P1STREET("IS","ixeylim","iepzo")
ozpei
^P1STREET("IS","ixeylim","ieqhno nyd")
dyn onhqei
^P1STREET("IS","ixeylim","ieqi ao ierfx")
xfrei oa iqei
^P1STREET("IS","ixeylim","ieqs `aicx")
xcia` sqei
^P1STREET("IS","ixeylim","ieqs ao nzzide")
edizzn oa sqei
^P1STREET("IS","ixeylim","ieqs ca")
ac sqei
^P1STREET("IS","ixeylim","ieqs fie")
eif sqei
^P1STREET("IS","ixeylim","ieqs giim")
miig sqei
^P1STREET("IS","ixeylim","ieqs gkni")
inkg sqei
^P1STREET("IS","ixeylim","ieqs ialio")
oilai sqei
^P1STREET("IS","ixeylim","ieqs pcad")
dacp sqei
^P1STREET("IS","ixeylim","ieqs vai xineo")
oenix iav sqei
^P1STREET("IS","ixeylim","ieqs w`xe")
ex`w sqei
^P1STREET("IS","ixeylim","ieqthl")
lhtqei
^P1STREET("IS","ixeylim","iexci dqixd")
dxiqd icxei
^P1STREET("IS","ixeylim","iexm xepo")
opex mxei
^P1STREET("IS","ixeylim","iezm")
mzei
^P1STREET("IS","ixeylim","ifxr`l")
l`rxfi
^P1STREET("IS","ixeylim","igfw`l")
l`wfgi
^P1STREET("IS","ixeylim","igil giim")
miig ligi
^P1STREET("IS","ixeylim","ileo gpej")
jepg oeli
^P1STREET("IS","ixeylim","im dnlg")
glnd mi
^P1STREET("IS","ixeylim","im qes")
seq mi
^P1STREET("IS","ixeylim","inind weaxqwi")
iwqxaew dnini
^P1STREET("IS","ixeylim","inio `aez")
zea` oini
^P1STREET("IS","ixeylim","inio nyd")
dyn oini
^P1STREET("IS","ixeylim","ip`i")
i`pi
^P1STREET("IS","ixeylim","ipeaqwi cpi`l")
l`ipc iwqaepi
^P1STREET("IS","ixeylim","iqwi giim")
miig iwqi
^P1STREET("IS","ixeylim","irau")
uari
^P1STREET("IS","ixeylim","irl")
lri
^P1STREET("IS","ixeylim","irwa ao ca")
ac oa awri
^P1STREET("IS","ixeylim","irwa ideyr")
ryedi awri
^P1STREET("IS","ixeylim","irwa phx")
xhp awri
^P1STREET("IS","ixeylim","irwa tz")
zt awri
^P1STREET("IS","ixeylim","irwa xf")
fx awri
^P1STREET("IS","ixeylim","irwa yxaeiim")
miieaxy awri
^P1STREET("IS","ixeylim","irweafeo")
oefaewri
^P1STREET("IS","ixeylim","irwez `lgn`o")
o`ngl` zewri
^P1STREET("IS","ixeylim","irxi `axdm")
mdxa` ixri
^P1STREET("IS","ixeylim","itd pes")
sep dti
^P1STREET("IS","ixeylim","itd ripim")
mipir dti
^P1STREET("IS","ixeylim","itd xem")
mex dti
^P1STREET("IS","ixeylim","itdo")
odti
^P1STREET("IS","ixeylim","ite")
eti
^P1STREET("IS","ixeylim","itzg")
gzti
^P1STREET("IS","ixeylim","ivdx")
xdvi
^P1STREET("IS","ixeylim","ivgw `expyhiio")
oiihypxe` wgvi
^P1STREET("IS","ixeylim","ivgw `lgpo")
opgl` wgvi
^P1STREET("IS","ixeylim","ivgw ao cex")
xec oa wgvi
^P1STREET("IS","ixeylim","ivgw axei`x")
x`iexa wgvi
^P1STREET("IS","ixeylim","ivgw hepiw")
wipeh wgvi
^P1STREET("IS","ixeylim","ivgw wxia")
aixw wgvi
^P1STREET("IS","ixeylim","ivgw ycd")
dcy wgvi
^P1STREET("IS","ixeylim","ivgw yild")
dliy wgvi
^P1STREET("IS","ixeylim","ivgw yle")
ely wgvi
^P1STREET("IS","ixeylim","ivi`z `ixetd")
dtexi` z`ivi
^P1STREET("IS","ixeylim","ivia")
aivi
^P1STREET("IS","ixeylim","iweh `l gn`ei")
ie`ng l` hewi
^P1STREET("IS","ixeylim","iwezi`l `cm")
mc` l`izewi
^P1STREET("IS","ixeylim","iwim")
miwi
^P1STREET("IS","ixeylim","iwipheo")
oehpiwi
^P1STREET("IS","ixeylim","ix`eo")
oe`xi
^P1STREET("IS","ixeylim","ixnide")
edinxi
^P1STREET("IS","ixeylim","iy` axkd")
dkxa `yi
^P1STREET("IS","ixeylim","iyerz irwa")
awri zreyi
^P1STREET("IS","ixeylim","iyi")
iyi
^P1STREET("IS","ixeylim","iyng nlj")
jln gnyi
^P1STREET("IS","ixeylim","iyride")
ediryi
^P1STREET("IS","ixeylim","iyx`l `lcc")
ccl` l`xyi
^P1STREET("IS","ixeylim","iyx`l texz")
zxet l`xyi
^P1STREET("IS","ixeylim","iyx`lq")
ql`xyi
^P1STREET("IS","ixeylim","iyykx")
xkyyi
^P1STREET("IS","ixeylim","izxeo")
oexzi
^P1STREET("IS","ixeylim","izxia")
aixzi
^P1STREET("IS","ixeylim","k""h apeanax")
xanaepa h"k
^P1STREET("IS","ixeylim","k""u nikl liia")
aiil lkin u"k
^P1STREET("IS","ixeylim","kdo `txim")
mixt` odk
^P1STREET("IS","ixeylim","kdo irwa")
awri odk
^P1STREET("IS","ixeylim","kdo npgm")
mgpn odk
^P1STREET("IS","ixeylim","kdpea")
aepdk
^P1STREET("IS","ixeylim","keayi whneo")
oenhw iyaek
^P1STREET("IS","ixeylim","kexfio")
oifxek
^P1STREET("IS","ixeylim","kexy")
yxek
^P1STREET("IS","ixeylim","ki hea")
aeh ik
^P1STREET("IS","ixeylim","kiq` xgnim")
mingx `qik
^P1STREET("IS","ixeylim","kiqetim")
miteqik
^P1STREET("IS","ixeylim","kkx `eqhx")
xhqe` xkk
^P1STREET("IS","ixeylim","kkx `lpai")
iapl` xkk
^P1STREET("IS","ixeylim","kkx ax keka`")
`akek xa xkk
^P1STREET("IS","ixeylim","kkx cec xnf")
fnx cec xkk
^P1STREET("IS","ixeylim","kkx cpid")
dipc xkk
^P1STREET("IS","ixeylim","kkx dceicwd")
dwciecd xkk
^P1STREET("IS","ixeylim","kkx dnexiqho")
ohqixend xkk
^P1STREET("IS","ixeylim","kkx dwqhl")
lhqwd xkk
^P1STREET("IS","ixeylim","kkx dzperd dviepi")
ipeivd drepzd xkk
^P1STREET("IS","ixeylim","kkx eipbih")
hibpie xkk
^P1STREET("IS","ixeylim","kkx flno `xo")
ox` onlf xkk
^P1STREET("IS","ixeylim","kkx nbpq")
qpbn xkk
^P1STREET("IS","ixeylim","kkx nikl dkdo")
odkd lkin xkk
^P1STREET("IS","ixeylim","kkx pexc`e")
e`cxep xkk
^P1STREET("IS","ixeylim","kkx qtx`")
`xtq xkk
^P1STREET("IS","ixeylim","kkx renx kza")
azk xner xkk
^P1STREET("IS","ixeylim","kkx rio kxm")
mxk oir xkk
^P1STREET("IS","ixeylim","kkx vd""l")
l"dv xkk
^P1STREET("IS","ixeylim","kkx vieo")
oeiv xkk
^P1STREET("IS","ixeylim","kl iyx`l gaxim")
mixag l`xyi lk
^P1STREET("IS","ixeylim","klc `ao `le`")
`el` oa` clk
^P1STREET("IS","ixeylim","klil `l alci")
icla l` lilk
^P1STREET("IS","ixeylim","kneo")
oenk
^P1STREET("IS","ixeylim","ko `l`wp`h")
h`pw`l` ok
^P1STREET("IS","ixeylim","ko `lnehx`o")
o`xhenl` ok
^P1STREET("IS","ixeylim","kpqiz nx iqs")
sqi xn ziqpk
^P1STREET("IS","ixeylim","kpqz nxcki")
ikcxn zqpk
^P1STREET("IS","ixeylim","kpti pyxim")
mixyp itpk
^P1STREET("IS","ixeylim","kpxz")
zxpk
^P1STREET("IS","ixeylim","kqti")
itqk
^P1STREET("IS","ixeylim","ktx axrm")
mrxa xtk
^P1STREET("IS","ixeylim","ktx dyleg")
gelyd xtk
^P1STREET("IS","ixeylim","ktx pgem")
megp xtk
^P1STREET("IS","ixeylim","ktx raxi")
ixar xtk
^P1STREET("IS","ixeylim","ktx rvieo")
oeivr xtk
^P1STREET("IS","ixeylim","kvplqeo")
oeqlpvk
^P1STREET("IS","ixeylim","kxneo")
oenxk
^P1STREET("IS","ixeylim","kxnid ivgw")
wgvi dinxk
^P1STREET("IS","ixeylim","kxtq")
qtxk
^P1STREET("IS","ixeylim","kza qetx")
xteq azk
^P1STREET("IS","ixeylim","l`d belcaxb")
bxacleb d`l
^P1STREET("IS","ixeylim","l`d texz")
zxet d`l
^P1STREET("IS","ixeylim","l`e tiwxc")
cxwit e`l
^P1STREET("IS","ixeylim","laepd")
dpeal
^P1STREET("IS","ixeylim","laewx xipd")
dpix xweal
^P1STREET("IS","ixeylim","laey nxcki")
ikcxn yeal
^P1STREET("IS","ixeylim","lai` zi`ecex")
xece`iz `ial
^P1STREET("IS","ixeylim","lapd `lirfx")
xfril` dpal
^P1STREET("IS","ixeylim","lbxls qlnd")
dnlq slxbl
^P1STREET("IS","ixeylim","lc`ce")
ec`cl
^P1STREET("IS","ixeylim","le`iq eipqh")
hqpie qi`el
^P1STREET("IS","ixeylim","lec")
cel
^P1STREET("IS","ixeylim","lef wciy")
yicw fel
^P1STREET("IS","ixeylim","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","ixeylim","legni dxear azy""g")
g"yza raexd ingel
^P1STREET("IS","ixeylim","leho biex`")
`xeib ohel
^P1STREET("IS","ixeylim","lei")
iel
^P1STREET("IS","ixeylim","lei naxciv'a")
a'vicxan iel
^P1STREET("IS","ixeylim","lei y`el")
le`y iel
^P1STREET("IS","ixeylim","leic b'exb'")
'bxe'b ciel
^P1STREET("IS","ixeylim","lepu nyd")
dyn upel
^P1STREET("IS","ixeylim","lete yne`l")
l`eny etel
^P1STREET("IS","ixeylim","leu v'`xlq")
qlx`'v uel
^P1STREET("IS","ixeylim","lexi`")
`ixel
^P1STREET("IS","ixeylim","lg""i")
i"gl
^P1STREET("IS","ixeylim","lhio thxi`kh")
hk`ixht oihl
^P1STREET("IS","ixeylim","li`e eiqno")
onqie e`il
^P1STREET("IS","ixeylim","liapd")
dpail
^P1STREET("IS","ixeylim","liia ciio")
oiic aiil
^P1STREET("IS","ixeylim","liia itd")
dti aiil
^P1STREET("IS","ixeylim","liiaeaiu")
uiaeaiil
^P1STREET("IS","ixeylim","likhno `axdm")
mdxa` onhkil
^P1STREET("IS","ixeylim","likhpyhiio")
oiihyphkil
^P1STREET("IS","ixeylim","lilj")
jlil
^P1STREET("IS","ixeylim","lipu")
upil
^P1STREET("IS","ixeylim","lipwelo")
olewpil
^P1STREET("IS","ixeylim","litqwi le`i")
i`el iwqtil
^P1STREET("IS","ixeylim","lityiu pgem")
megp uiytil
^P1STREET("IS","ixeylim","liy")
yil
^P1STREET("IS","ixeylim","lkiy")
yikl
^P1STREET("IS","ixeylim","lntxephi")
ihpextnl
^P1STREET("IS","ixeylim","lpcpx")
xpcpl
^P1STREET("IS","ixeylim","lpwio `lide")
edil` oiwpl
^P1STREET("IS","ixeylim","lrfrx nyd e`qzx")
xzq`e dyn xrfrl
^P1STREET("IS","ixeylim","lticez")
zecitl
^P1STREET("IS","ixeylim","lym")
myl
^P1STREET("IS","ixeylim","n`d yrxim")
mixry d`n
^P1STREET("IS","ixeylim","n`ix `apx")
xpa` xi`n
^P1STREET("IS","ixeylim","n`ix bxeqno")
onqexb xi`n
^P1STREET("IS","ixeylim","n`ix bxyeo")
oeyxb xi`n
^P1STREET("IS","ixeylim","n`ix ieyr")
ryei xi`n
^P1STREET("IS","ixeylim","n`ix ilio")
oili xi`n
^P1STREET("IS","ixeylim","n`ix ygm")
mgy xi`n
^P1STREET("IS","ixeylim","n`te")
et`n
^P1STREET("IS","ixeylim","nae` `a` gexi")
ixeg `a` `ean
^P1STREET("IS","ixeylim","nae` `xarz dnipim")
mipind zrax` `ean
^P1STREET("IS","ixeylim","nae` `xid liia")
aiil dix` `ean
^P1STREET("IS","ixeylim","nae` ao axej")
jexa oa `ean
^P1STREET("IS","ixeylim","nae` apinio qlph")
hplq oinipa `ean
^P1STREET("IS","ixeylim","nae` apinio ylem")
mely oinipa `ean
^P1STREET("IS","ixeylim","nae` apio")
oipa `ean
^P1STREET("IS","ixeylim","nae` aynz")
znya `ean
^P1STREET("IS","ixeylim","nae` ci fda")
adf ic `ean
^P1STREET("IS","ixeylim","nae` cwx")
xwc `ean
^P1STREET("IS","ixeylim","nae` d`zxeb")
bexz`d `ean
^P1STREET("IS","ixeylim","nae` daxkd")
dkxad `ean
^P1STREET("IS","ixeylim","nae` dcec`im")
mi`cecd `ean
^P1STREET("IS","ixeylim","nae` ddzpcaez")
zeacpzdd `ean
^P1STREET("IS","ixeylim","nae` dgeqo")
oqegd `ean
^P1STREET("IS","ixeylim","nae` dgihd")
dhigd `ean
^P1STREET("IS","ixeylim","nae` diqnio")
oinqid `ean
^P1STREET("IS","ixeylim","nae` dlela")
aleld `ean
^P1STREET("IS","ixeylim","nae` dn`aw")
wa`nd `ean
^P1STREET("IS","ixeylim","nae` dnznic")
cinznd `ean
^P1STREET("IS","ixeylim","nae` dreld")
dlerd `ean
^P1STREET("IS","ixeylim","nae` dryxd")
dxyrd `ean
^P1STREET("IS","ixeylim","nae` dvxi")
ixvd `ean
^P1STREET("IS","ixeylim","nae` dx ytx")
xty xd `ean
^P1STREET("IS","ixeylim","nae` dxkai")
iakxd `ean
^P1STREET("IS","ixeylim","nae` dxxi")
ixxd `ean
^P1STREET("IS","ixeylim","nae` dylem ed`gcez")
zecg`de melyd `ean
^P1STREET("IS","ixeylim","nae` dyrexd")
dxeryd `ean
^P1STREET("IS","ixeylim","nae` dyrx")
xryd `ean
^P1STREET("IS","ixeylim","nae` fedxd")
dxdef `ean
^P1STREET("IS","ixeylim","nae` gebld")
dlbeg `ean
^P1STREET("IS","ixeylim","nae` gii relm")
mler iig `ean
^P1STREET("IS","ixeylim","nae` giim dlei")
ield miig `ean
^P1STREET("IS","ixeylim","nae` gvxez")
zexvg `ean
^P1STREET("IS","ixeylim","nae` gvxiz")
zixvg `ean
^P1STREET("IS","ixeylim","nae` iclx")
xlci `ean
^P1STREET("IS","ixeylim","nae` ideyr ilio")
oili ryedi `ean
^P1STREET("IS","ixeylim","nae` iehazd")
dzahei `ean
^P1STREET("IS","ixeylim","nae` iexm")
mxei `ean
^P1STREET("IS","ixeylim","nae` ifdx")
xdfi `ean
^P1STREET("IS","ixeylim","nae` ivgw")
wgvi `ean
^P1STREET("IS","ixeylim","nae` liapd")
dpail `ean
^P1STREET("IS","ixeylim","nae` pdbi dtxcez")
zecxtd ibdp `ean
^P1STREET("IS","ixeylim","nae` pgl vio")
oiv lgp `ean
^P1STREET("IS","ixeylim","nae` pgli`l")
l`ilgp `ean
^P1STREET("IS","ixeylim","nae` phs")
shp `ean
^P1STREET("IS","ixeylim","nae` ql im")
mi lq `ean
^P1STREET("IS","ixeylim","nae` raxepd")
dpexar `ean
^P1STREET("IS","ixeylim","nae` rxad")
daxr `ean
^P1STREET("IS","ixeylim","nae` tli""m")
m"ilt `ean
^P1STREET("IS","ixeylim","nae` txi d`cnd")
dnc`d ixt `ean
^P1STREET("IS","ixeylim","nae` txi dru")
urd ixt `ean
^P1STREET("IS","ixeylim","nae` tziid")
diizt `ean
^P1STREET("IS","ixeylim","nae` vlnepd")
dpenlv `ean
^P1STREET("IS","ixeylim","nae` whexd")
dxehw `ean
^P1STREET("IS","ixeylim","nae` wicd")
dciw `ean
^P1STREET("IS","ixeylim","nae` wvird")
drivw `ean
^P1STREET("IS","ixeylim","nae` xai giim nweapd")
dpaewn miig iax `ean
^P1STREET("IS","ixeylim","nae` xai gpipd")
dpipg iax `ean
^P1STREET("IS","ixeylim","nae` xefphl")
lhpfex `ean
^P1STREET("IS","ixeylim","nae` xticim")
micitx `ean
^P1STREET("IS","ixeylim","nae` yxs")
sxy `ean
^P1STREET("IS","ixeylim","nae` znpr")
rpnz `ean
^P1STREET("IS","ixeylim","navr wcy")
ycw rvan
^P1STREET("IS","ixeylim","nbcim")
micbn
^P1STREET("IS","ixeylim","nbo d`ls")
sl`d obn
^P1STREET("IS","ixeylim","ncax qipi")
ipiq xacn
^P1STREET("IS","ixeylim","ncri dxeg")
gexd ircn
^P1STREET("IS","ixeylim","ncxbez b`eo")
oe`b zebxcn
^P1STREET("IS","ixeylim","ncxbez bo rco")
ocr ob zebxcn
^P1STREET("IS","ixeylim","ncxbez daiwex")
xewiad zebxcn
^P1STREET("IS","ixeylim","ncxbez davix")
xivad zebxcn
^P1STREET("IS","ixeylim","ncxbez dktx")
xtkd zebxcn
^P1STREET("IS","ixeylim","ncxbez dxen`im")
mi`nexd zebxcn
^P1STREET("IS","ixeylim","ndxa gkm")
mkg axdn
^P1STREET("IS","ixeylim","necirio")
oiricen
^P1STREET("IS","ixeylim","nedliax")
xailden
^P1STREET("IS","ixeylim","nefdcio")
oicdfen
^P1STREET("IS","ixeylim","nekiiq yertz")
ztrey qiiken
^P1STREET("IS","ixeylim","nelke")
eklen
^P1STREET("IS","ixeylim","nengim")
mignen
^P1STREET("IS","ixeylim","nepaf")
fapen
^P1STREET("IS","ixeylim","neqies ylnd")
dnly seiqen
^P1STREET("IS","ixeylim","nerlm piqim")
miqip mlren
^P1STREET("IS","ixeylim","nev` riliz")
zilir `ven
^P1STREET("IS","ixeylim","nevwio `xid")
dix` oiwven
^P1STREET("IS","ixeylim","nexbph`e")
e`hpbxen
^P1STREET("IS","ixeylim","nexid")
dixen
^P1STREET("IS","ixeylim","nexiqho")
ohqixen
^P1STREET("IS","ixeylim","nfex")
xefn
^P1STREET("IS","ixeylim","nfkxz nyd")
dyn zxkfn
^P1STREET("IS","ixeylim","nfl `xid")
dix` lfn
^P1STREET("IS","ixeylim","nfl bci")
icb lfn
^P1STREET("IS","ixeylim","nfl cbim")
mibc lfn
^P1STREET("IS","ixeylim","nfl cli")
ilc lfn
^P1STREET("IS","ixeylim","nfl hld")
dlh lfn
^P1STREET("IS","ixeylim","nfl n`fpiim")
miipf`n lfn
^P1STREET("IS","ixeylim","nfl wyz")
zyw lfn
^P1STREET("IS","ixeylim","nfl yex")
xey lfn
^P1STREET("IS","ixeylim","nfl z`enim")
mine`z lfn
^P1STREET("IS","ixeylim","nfxgi iegpo")
opgei igxfn
^P1STREET("IS","ixeylim","nfxgi ieqs")
sqei igxfn
^P1STREET("IS","ixeylim","ng""l")
l"gn
^P1STREET("IS","ixeylim","ngef`")
`fegn
^P1STREET("IS","ixeylim","nglwi dnim")
mind iwlgn
^P1STREET("IS","ixeylim","ngpd idecd")
dcedi dpgn
^P1STREET("IS","ixeylim","ngpiim")
miipgn
^P1STREET("IS","ixeylim","ngva")
avgn
^P1STREET("IS","ixeylim","ni ptzeg")
geztp in
^P1STREET("IS","ixeylim","niegq")
qgein
^P1STREET("IS","ixeylim","niha pbo")
obp ahin
^P1STREET("IS","ixeylim","nik""l")
l"kin
^P1STREET("IS","ixeylim","nikd")
dkin
^P1STREET("IS","ixeylim","niklio")
oilkin
^P1STREET("IS","ixeylim","nio d`cenim")
minec`d oin
^P1STREET("IS","ixeylim","nipu apinio")
oinipa upin
^P1STREET("IS","ixeylim","nipvaxb")
bxavpin
^P1STREET("IS","ixeylim","niq lpc`e")
e`cpl qin
^P1STREET("IS","ixeylim","nivxi hixo")
oxih ixvin
^P1STREET("IS","ixeylim","nixeo")
oexin
^P1STREET("IS","ixeylim","nixqwi ivgw")
wgvi iwqxin
^P1STREET("IS","ixeylim","niy`l")
l`yin
^P1STREET("IS","ixeylim","nkex")
xekn
^P1STREET("IS","ixeylim","nl""l")
l"ln
^P1STREET("IS","ixeylim","nl`ki")
ik`ln
^P1STREET("IS","ixeylim","nlai""m")
m"ialn
^P1STREET("IS","ixeylim","nlj dvciw")
wicvd jln
^P1STREET("IS","ixeylim","nlki")
ikln
^P1STREET("IS","ixeylim","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","ixeylim","nlki vcw")
wcv ikln
^P1STREET("IS","ixeylim","nlvx tiial")
laiit xvln
^P1STREET("IS","ixeylim","nnil`")
`linn
^P1STREET("IS","ixeylim","no")
on
^P1STREET("IS","ixeylim","npcli nekx qtxim")
mixtq xken ilcpn
^P1STREET("IS","ixeylim","npclqeo `xiw")
wix` oeqlcpn
^P1STREET("IS","ixeylim","npd")
dpn
^P1STREET("IS","ixeylim","npexd")
dxepn
^P1STREET("IS","ixeylim","npfx d`yexim")
mixey`d xfpn
^P1STREET("IS","ixeylim","npgm")
mgpn
^P1STREET("IS","ixeylim","npgz")
zgpn
^P1STREET("IS","ixeylim","npgz ivgw")
wgvi zgpn
^P1STREET("IS","ixeylim","nphwd ` gnxd")
dxng ` dwhpn
^P1STREET("IS","ixeylim","npi `lide")
edil` ipn
^P1STREET("IS","ixeylim","npid yegh")
hgey dipn
^P1STREET("IS","ixeylim","npyd")
dypn
^P1STREET("IS","ixeylim","nqilz iyxim")
mixyi zliqn
^P1STREET("IS","ixeylim","nqreci")
icerqn
^P1STREET("IS","ixeylim","nqxiw")
wixqn
^P1STREET("IS","ixeylim","nrax aiz cec")
cec zia xarn
^P1STREET("IS","ixeylim","nrax aiz dkpqz")
zqpkd zia xarn
^P1STREET("IS","ixeylim","nrax dnizld")
dlzind xarn
^P1STREET("IS","ixeylim","nrax dx`a""c")
c"a`xd xarn
^P1STREET("IS","ixeylim","nrax tlh b'inq")
qni'b hlt xarn
^P1STREET("IS","ixeylim","nrbl aiz dncxy")
yxcnd zia lbrn
^P1STREET("IS","ixeylim","nrbl dpiwad")
dawipd lbrn
^P1STREET("IS","ixeylim","nrbli dxi""m leio")
oiel m"ixd ilbrn
^P1STREET("IS","ixeylim","nrbli iapd")
dpai ilbrn
^P1STREET("IS","ixeylim","nref")
fern
^P1STREET("IS","ixeylim","nreo")
oern
^P1STREET("IS","ixeylim","nrepez `iclqeo")
oeqlci` zepern
^P1STREET("IS","ixeylim","nrld d`expim")
mipxe`d dlrn
^P1STREET("IS","ixeylim","nrld d`kqpid")
dipqk`d dlrn
^P1STREET("IS","ixeylim","nrld daeqzo")
ozqead dlrn
^P1STREET("IS","ixeylim","nrld daxeyim")
miyexad dlrn
^P1STREET("IS","ixeylim","nrld dgniyd")
dyingd dlrn
^P1STREET("IS","ixeylim","nrld dnervd")
dvrend dlrn
^P1STREET("IS","ixeylim","nrld dylem")
melyd dlrn
^P1STREET("IS","ixeylim","nrld f`a")
a`f dlrn
^P1STREET("IS","ixeylim","nrlez `ltid")
ditl` zelrn
^P1STREET("IS","ixeylim","nrlez `lxm")
mxl` zelrn
^P1STREET("IS","ixeylim","nrlez `txim flno")
onlf mixt` zelrn
^P1STREET("IS","ixeylim","nrlez a`cda")
adc`a zelrn
^P1STREET("IS","ixeylim","nrlez api ndxyw")
wyxdn ipa zelrn
^P1STREET("IS","ixeylim","nrlez ctpd")
dptc zelrn
^P1STREET("IS","ixeylim","nrlez dngpj")
jpgnd zelrn
^P1STREET("IS","ixeylim","nrlez gced")
decg zelrn
^P1STREET("IS","ixeylim","nrlez ivgw `hipbx")
xbpih` wgvi zelrn
^P1STREET("IS","ixeylim","nrlez nercim")
micren zelrn
^P1STREET("IS","ixeylim","nrlez nexid")
dixen zelrn
^P1STREET("IS","ixeylim","nrlez pexi`l")
l`ixep zelrn
^P1STREET("IS","ixeylim","nrlez pglz yard")
dray zlgp zelrn
^P1STREET("IS","ixeylim","nrlez qilno")
onliq zelrn
^P1STREET("IS","ixeylim","nrlez qpy gpd")
dpg ypq zelrn
^P1STREET("IS","ixeylim","nrlez ra`ci")
ic`ar zelrn
^P1STREET("IS","ixeylim","nrlez rxwi")
iwxr zelrn
^P1STREET("IS","ixeylim","nrlez tceiim")
miiect zelrn
^P1STREET("IS","ixeylim","nrlez vai lvciw")
wicvl iav zelrn
^P1STREET("IS","ixeylim","nrlez vieo")
oeiv zelrn
^P1STREET("IS","ixeylim","nrlez waw")
waw zelrn
^P1STREET("IS","ixeylim","nrlez xppim")
mippx zelrn
^P1STREET("IS","ixeylim","nrlez ypdx")
xdpy zelrn
^P1STREET("IS","ixeylim","nrlez yx ylem")
mely xy zelrn
^P1STREET("IS","ixeylim","nrncez iyx`l")
l`xyi zecnrn
^P1STREET("IS","ixeylim","nrnl `l zlb'")
'blz l` lnrn
^P1STREET("IS","ixeylim","nrpd yingd")
dgniy dprn
^P1STREET("IS","ixeylim","nryd geya")
ayeg dyrn
^P1STREET("IS","ixeylim","ntrlez")
zelrtn
^P1STREET("IS","ixeylim","ntxu ylnd")
dnly uxtn
^P1STREET("IS","ixeylim","nvcd")
dcvn
^P1STREET("IS","ixeylim","nvtd")
dtvn
^P1STREET("IS","ixeylim","nvtd daixd")
dxiad dtvn
^P1STREET("IS","ixeylim","nvtd npgm")
mgpn dtvn
^P1STREET("IS","ixeylim","nwed iyx`l")
l`xyi dewn
^P1STREET("IS","ixeylim","nwex giim")
miig xewn
^P1STREET("IS","ixeylim","nwls")
slwn
^P1STREET("IS","ixeylim","nwqiwe")
ewiqwn
^P1STREET("IS","ixeylim","nx `li`q")
q`il` xn
^P1STREET("IS","ixeylim","nx bxiiq")
qiixb xn
^P1STREET("IS","ixeylim","nxbelio")
oilebxn
^P1STREET("IS","ixeylim","nxbliz")
zilbxn
^P1STREET("IS","ixeylim","nxcki `iy ylem")
mely yi` ikcxn
^P1STREET("IS","ixeylim","nxcki aewqaeim")
mieaqwea ikcxn
^P1STREET("IS","ixeylim","nxcki ao dll")
lld oa ikcxn
^P1STREET("IS","ixeylim","nxcki ao igfw`l")
l`wfgi oa ikcxn
^P1STREET("IS","ixeylim","nxcki dideci")
icedid ikcxn
^P1STREET("IS","ixeylim","nxd")
dxn
^P1STREET("IS","ixeylim","nxed")
dexn
^P1STREET("IS","ixeylim","nxem vieo")
oeiv mexn
^P1STREET("IS","ixeylim","nxhio aeax")
xaea oihxn
^P1STREET("IS","ixeylim","nxhio igfw`l")
l`wfgi oihxn
^P1STREET("IS","ixeylim","nxhio lezx wipb")
bpiw xzel oihxn
^P1STREET("IS","ixeylim","nxim dgynep`iz")
zi`penygd mixn
^P1STREET("IS","ixeylim","nxkeq")
qekxn
^P1STREET("IS","ixeylim","nxkf qtix")
xitq fkxn
^P1STREET("IS","ixeylim","nxkf yhpx")
xphy fkxn
^P1STREET("IS","ixeylim","nxwe axej")
jexa ewxn
^P1STREET("IS","ixeylim","ny' d`expim")
mipxe`d 'yn
^P1STREET("IS","ixeylim","ny' dbaexd")
dxeabd 'yn
^P1STREET("IS","ixeylim","ny' dcq")
qcd 'yn
^P1STREET("IS","ixeylim","ny' dcwlim")
milwcd 'yn
^P1STREET("IS","ixeylim","ny' dirxd")
dxrid 'yn
^P1STREET("IS","ixeylim","ny' drefxc")
cxferd 'yn
^P1STREET("IS","ixeylim","ny' dwexhm")
mhxewd 'yn
^P1STREET("IS","ixeylim","ny' dwexpiz")
zipxewd 'yn
^P1STREET("IS","ixeylim","ny' dwzxeo")
oexzwd 'yn
^P1STREET("IS","ixeylim","ny' dxezm")
mzexd 'yn
^P1STREET("IS","ixeylim","ny' nexo")
oxen 'yn
^P1STREET("IS","ixeylim","ny' wzxeo")
oexzw 'yn
^P1STREET("IS","ixeylim","ny`z nyd")
dyn z`yn
^P1STREET("IS","ixeylim","nyba lcj")
jcl abyn
^P1STREET("IS","ixeylim","nyd `dxeo hea")
aeh oexd` dyn
^P1STREET("IS","ixeylim","nyd dq")
qd dyn
^P1STREET("IS","ixeylim","nyd geaa")
aaeg dyn
^P1STREET("IS","ixeylim","nyd nxfew")
wefxn dyn
^P1STREET("IS","ixeylim","nyd vai qbl")
lbq iav dyn
^P1STREET("IS","ixeylim","nyd yxz")
zxy dyn
^P1STREET("IS","ixeylim","nye`ez ivgw")
wgvi ze`eyn
^P1STREET("IS","ixeylim","nyhxz diyeaim")
miaeyid zxhyn
^P1STREET("IS","ixeylim","nyia npgm")
mgpn aiyn
^P1STREET("IS","ixeylim","nyko yild")
dliy okyn
^P1STREET("IS","ixeylim","nykpez")
zepkyn
^P1STREET("IS","ixeylim","nykpez y`ppim")
mipp`y zepkyn
^P1STREET("IS","ixeylim","nynx dbael")
leabd xnyn
^P1STREET("IS","ixeylim","nynx drm")
mrd xnyn
^P1STREET("IS","ixeylim","nynxez")
zexnyn
^P1STREET("IS","ixeylim","nynxez dkdepd")
dpedkd zexnyn
^P1STREET("IS","ixeylim","nyrel dnbliz")
zilbnd leryn
^P1STREET("IS","ixeylim","nyth cxiiteq")
qetiixc htyn
^P1STREET("IS","ixeylim","nzzide")
edizzn
^P1STREET("IS","ixeylim","p`ez cy`")
`yc ze`p
^P1STREET("IS","ixeylim","p`y`yiai")
iaiy`y`p
^P1STREET("IS","ixeylim","pae")
eap
^P1STREET("IS","ixeylim","paeo")
oeap
^P1STREET("IS","ixeylim","pai yeriim")
miirey iap
^P1STREET("IS","ixeylim","pai` yediia")
aiidey `iap
^P1STREET("IS","ixeylim","paxz`")
`zxap
^P1STREET("IS","ixeylim","pb'`xd")
dx`'bp
^P1STREET("IS","ixeylim","pbad")
dabp
^P1STREET("IS","ixeylim","pdex`i")
i`xedp
^P1STREET("IS","ixeylim","pdx txz")
zxt xdp
^P1STREET("IS","ixeylim","pdxcr`")
`rcxdp
^P1STREET("IS","ixeylim","pea")
aep
^P1STREET("IS","ixeylim","peaeniqwi nyd")
dyn iwqineaep
^P1STREET("IS","ixeylim","ped vcw")
wcv dep
^P1STREET("IS","ixeylim","ped y`po")
op`y dep
^P1STREET("IS","ixeylim","pefdd")
ddfep
^P1STREET("IS","ixeylim","peiino yne`l")
l`eny oniiep
^P1STREET("IS","ixeylim","peqiiad")
daiiqep
^P1STREET("IS","ixeylim","pes dxim")
mixd sep
^P1STREET("IS","ixeylim","pes xnez")
zenx sep
^P1STREET("IS","ixeylim","petj")
jtep
^P1STREET("IS","ixeylim","pex `cio")
oic` xep
^P1STREET("IS","ixeylim","pexc`e")
e`cxep
^P1STREET("IS","ixeylim","pexiz")
zixep
^P1STREET("IS","ixeylim","pfx cec")
cec xfp
^P1STREET("IS","ixeylim","pgem")
megp
^P1STREET("IS","ixeylim","pgem `iy bnfe")
efnb yi` megp
^P1STREET("IS","ixeylim","pgl d`bef")
feb`d lgp
^P1STREET("IS","ixeylim","pgli`li")
il`ilgp
^P1STREET("IS","ixeylim","pglz vai")
iav zlgp
^P1STREET("IS","ixeylim","pglz vcew")
wecv zlgp
^P1STREET("IS","ixeylim","pglz vieo")
oeiv zlgp
^P1STREET("IS","ixeylim","pgnd")
dngp
^P1STREET("IS","ixeylim","pgne")
engp
^P1STREET("IS","ixeylim","pgnid")
dingp
^P1STREET("IS","ixeylim","pgno `aibc")
cbia` ongp
^P1STREET("IS","ixeylim","pgno naxqla")
alqxan ongp
^P1STREET("IS","ixeylim","pgyeo")
oeygp
^P1STREET("IS","ixeylim","phxep`i b`eo")
oe`b i`pexhp
^P1STREET("IS","ixeylim","pia cec")
cec aip
^P1STREET("IS","ixeylim","piez")
zeip
^P1STREET("IS","ixeylim","piiciu")
uiciip
^P1STREET("IS","ixeylim","piino yne`l")
l`eny oniip
^P1STREET("IS","ixeylim","pil""i")
i"lip
^P1STREET("IS","ixeylim","piqpaeim")
mieapqip
^P1STREET("IS","ixeylim","piwead xipd")
dpix daewip
^P1STREET("IS","ixeylim","piwpex")
xepwip
^P1STREET("IS","ixeylim","piwxbe`d")
d`ebxwip
^P1STREET("IS","ixeylim","pkeo")
oekp
^P1STREET("IS","ixeylim","plqeo bliw")
wilb oeqlp
^P1STREET("IS","ixeylim","prim fnixez")
zexinf mirp
^P1STREET("IS","ixeylim","prni")
inrp
^P1STREET("IS","ixeylim","ptg`")
`gtp
^P1STREET("IS","ixeylim","ptzli")
ilztp
^P1STREET("IS","ixeylim","pwcineo")
oenicwp
^P1STREET("IS","ixeylim","pwx n`ix")
xi`n xwp
^P1STREET("IS","ixeylim","pxazd")
dzaxp
^P1STREET("IS","ixeylim","pxez yaz")
zay zexp
^P1STREET("IS","ixeylim","pxwiq")
qiwxp
^P1STREET("IS","ixeylim","pz`i d`xali")
ilax`d i`zp
^P1STREET("IS","ixeylim","pzia dnflez")
zelfnd aizp
^P1STREET("IS","ixeylim","pzia ivgw")
wgvi aizp
^P1STREET("IS","ixeylim","pziai rm")
mr iaizp
^P1STREET("IS","ixeylim","pzo dpai`")
`iapd ozp
^P1STREET("IS","ixeylim","qaieo")
oeiaq
^P1STREET("IS","ixeylim","qbelz iyx`l")
l`xyi zlebq
^P1STREET("IS","ixeylim","qeeg `l yxwid")
diwxy l` geeq
^P1STREET("IS","ixeylim","qekz ylem")
mely zkeq
^P1STREET("IS","ixeylim","qel litvio")
oivtil leq
^P1STREET("IS","ixeylim","qeleaiiviw")
wiviiaeleq
^P1STREET("IS","ixeylim","qelho qelino")
onileq ohleq
^P1STREET("IS","ixeylim","qelm irwa")
awri mleq
^P1STREET("IS","ixeylim","qenj reacid")
dicaer jneq
^P1STREET("IS","ixeylim","qeqpiw `lirfx")
xfril` wipqeq
^P1STREET("IS","ixeylim","qewelea")
aeleweq
^P1STREET("IS","ixeylim","qex`")
`xeq
^P1STREET("IS","ixeylim","qibliz")
zilbiq
^P1STREET("IS","ixeylim","qieo ylem")
mely oeiq
^P1STREET("IS","ixeylim","qiineo `xid")
dix` oeniiq
^P1STREET("IS","ixeylim","qiito")
otiiq
^P1STREET("IS","ixeylim","qiixz belpi")
ipleb zxiiq
^P1STREET("IS","ixeylim","qiixz cekitz")
ztikec zxiiq
^P1STREET("IS","ixeylim","qiixz d`bef")
feb`d zxiiq
^P1STREET("IS","ixeylim","qiixz dgxea")
aexgd zxiiq
^P1STREET("IS","ixeylim","qiixz ywc")
cwy zxiiq
^P1STREET("IS","ixeylim","qinphea")
aehpniq
^P1STREET("IS","ixeylim","qixpi")
ipxiq
^P1STREET("IS","ixeylim","qixwiq cpi`l")
l`ipc qiwxiq
^P1STREET("IS","ixeylim","qle`o dnxkfiz")
zifkxnd o`elq
^P1STREET("IS","ixeylim","qle`o dzgziz")
zizgzd o`elq
^P1STREET("IS","ixeylim","qlno nevti")
itven onlq
^P1STREET("IS","ixeylim","qlph")
hplq
^P1STREET("IS","ixeylim","qn' `lepd")
dpel` 'nq
^P1STREET("IS","ixeylim","qn' da`x")
x`ad 'nq
^P1STREET("IS","ixeylim","qn' dbard")
drabd 'nq
^P1STREET("IS","ixeylim","qn' diio")
oiid 'nq
^P1STREET("IS","ixeylim","qn' drexa")
axerd 'nq
^P1STREET("IS","ixeylim","qn' drhls")
slhrd 'nq
^P1STREET("IS","ixeylim","qn' dvtvtd")
dtvtvd 'nq
^P1STREET("IS","ixeylim","qn' dwyzez")
zezywd 'nq
^P1STREET("IS","ixeylim","qn' pglz yard")
dray zlgp 'nq
^P1STREET("IS","ixeylim","qn' rfz`")
`zfr 'nq
^P1STREET("IS","ixeylim","qn'diwa")
awid'nq
^P1STREET("IS","ixeylim","qn`hq")
qh`nq
^P1STREET("IS","ixeylim","qncx")
xcnq
^P1STREET("IS","ixeylim","qnelpqwio")
oiwqplenq
^P1STREET("IS","ixeylim","qo nxhio")
oihxn oq
^P1STREET("IS","ixeylim","qpd nyd")
dyn dpq
^P1STREET("IS","ixeylim","qpdcxid dnexgaz")
zagxend dixcdpq
^P1STREET("IS","ixeylim","qpdcxio")
oixcdpq
^P1STREET("IS","ixeylim","qpepiz")
zipepq
^P1STREET("IS","ixeylim","qph `ahineq")
qeniha` hpq
^P1STREET("IS","ixeylim","qph b'exb'")
'bxe'b hpq
^P1STREET("IS","ixeylim","qph b'iinq")
qnii'b hpq
^P1STREET("IS","ixeylim","qph cinihxiq")
qixhinic hpq
^P1STREET("IS","ixeylim","qph dlpd")
dpld hpq
^P1STREET("IS","ixeylim","qph niyl")
lyin hpq
^P1STREET("IS","ixeylim","qph nxwq")
qwxn hpq
^P1STREET("IS","ixeylim","qph thx")
xht hpq
^P1STREET("IS","ixeylim","qph txpviq")
qivpxt hpq
^P1STREET("IS","ixeylim","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","ixeylim","qtc`")
`ctq
^P1STREET("IS","ixeylim","qtix")
xitq
^P1STREET("IS","ixeylim","qxp` igfw`l")
l`wfgi `pxq
^P1STREET("IS","ixeylim","raeci y`el")
le`y icear
^P1STREET("IS","ixeylim","raecz iyx`l")
l`xyi zcear
^P1STREET("IS","ixeylim","reac")
caer
^P1STREET("IS","ixeylim","reacid")
dicaer
^P1STREET("IS","ixeylim","refi gqeo")
oeqg ifer
^P1STREET("IS","ixeylim","refid")
difer
^P1STREET("IS","ixeylim","reli dbxcem")
mecxbd iler
^P1STREET("IS","ixeylim","renx `ao kza")
azk oa` xner
^P1STREET("IS","ixeylim","repb yaz")
zay bper
^P1STREET("IS","ixeylim","retx npyq")
qypn xter
^P1STREET("IS","ixeylim","rfd")
dfr
^P1STREET("IS","ixeylim","rfx ielcez")
zeclei xfr
^P1STREET("IS","ixeylim","rfx yne`l")
l`eny xfr
^P1STREET("IS","ixeylim","rfx`")
`xfr
^P1STREET("IS","ixeylim","rfxi`l")
l`ixfr
^P1STREET("IS","ixeylim","rfxid")
dixfr
^P1STREET("IS","ixeylim","rfxz iyx`l")
l`xyi zxfr
^P1STREET("IS","ixeylim","rfxz zexd")
dxez zxfr
^P1STREET("IS","ixeylim","rhxez")
zexhr
^P1STREET("IS","ixeylim","rice dpai`")
`iapd ecir
^P1STREET("IS","ixeylim","rio ` lefd")
dfel ` oir
^P1STREET("IS","ixeylim","rio bci")
icb oir
^P1STREET("IS","ixeylim","rio dyleg")
gelyd oir
^P1STREET("IS","ixeylim","rio irwa")
awri oir
^P1STREET("IS","ixeylim","rio kxm")
mxk oir
^P1STREET("IS","ixeylim","rio qle`o")
o`elq oir
^P1STREET("IS","ixeylim","rio xebl")
lbex oir
^P1STREET("IS","ixeylim","ripim lnyth")
htynl mipir
^P1STREET("IS","ixeylim","riqd `l nerfm")
mfren l` dqir
^P1STREET("IS","ixeylim","rl""x")
x"lr
^P1STREET("IS","ixeylim","rl` `lcio `l")
l` oicl` `lr
^P1STREET("IS","ixeylim","rleeo yaz`i")
i`zay oeelr
^P1STREET("IS","ixeylim","rlfd")
dflr
^P1STREET("IS","ixeylim","rli `ao `ae hla")
alh ea` oa` ilr
^P1STREET("IS","ixeylim","rli dkdo")
odkd ilr
^P1STREET("IS","ixeylim","rli`y")
y`ilr
^P1STREET("IS","ixeylim","rliz dperx")
xrepd zilr
^P1STREET("IS","ixeylim","rln`")
`nlr
^P1STREET("IS","ixeylim","rlneo")
oenlr
^P1STREET("IS","ixeylim","rm erelne")
enlere mr
^P1STREET("IS","ixeylim","rneq")
qenr
^P1STREET("IS","ixeylim","rnipca")
acpinr
^P1STREET("IS","ixeylim","rnpe`l pg")
gp l`epnr
^P1STREET("IS","ixeylim","rnw dfizim")
mizifd wnr
^P1STREET("IS","ixeylim","rnw dzinpim")
mipnizd wnr
^P1STREET("IS","ixeylim","rnw xt`im")
mi`tx wnr
^P1STREET("IS","ixeylim","rnxm b`eo")
oe`b mxnr
^P1STREET("IS","ixeylim","rny`")
`ynr
^P1STREET("IS","ixeylim","rpzai")
iazpr
^P1STREET("IS","ixeylim","rpzd dgcyd")
dycgd dzpr
^P1STREET("IS","ixeylim","rpzez")
zezpr
^P1STREET("IS","ixeylim","rqiq")
qiqr
^P1STREET("IS","ixeylim","rtxepi")
ipextr
^P1STREET("IS","ixeylim","ru dcx")
xcd ur
^P1STREET("IS","ixeylim","ru giim")
miig ur
^P1STREET("IS","ixeylim","rvieo bax")
xab oeivr
^P1STREET("IS","ixeylim","rvnd")
dnvr
^P1STREET("IS","ixeylim","rw ` n`eleid")
diele`n ` wr
^P1STREET("IS","ixeylim","rw `l `q`ld")
dl`q` l` wr
^P1STREET("IS","ixeylim","rw `l glicid")
dicilg l` wr
^P1STREET("IS","ixeylim","rw yig lele")
elel giy wr
^P1STREET("IS","ixeylim","rw yig xig`o")
o`gix giy wr
^P1STREET("IS","ixeylim","rwaz")
zawr
^P1STREET("IS","ixeylim","rwaz ` gpwd")
dwpg ` zawr
^P1STREET("IS","ixeylim","rwaz `laixw")
wxial` zawr
^P1STREET("IS","ixeylim","rwaz `lnetz")
ztenl` zawr
^P1STREET("IS","ixeylim","rwaz `lqx`i`")
`i`xql` zawr
^P1STREET("IS","ixeylim","rwaz `xvs")
svx` zawr
^P1STREET("IS","ixeylim","rwaz cxeeiy")
yieexc zawr
^P1STREET("IS","ixeylim","rwaz y`cc")
cc`y zawr
^P1STREET("IS","ixeylim","rwaz yig gqo")
oqg giy zawr
^P1STREET("IS","ixeylim","rwaz zwid")
diwz zawr
^P1STREET("IS","ixeylim","rwpz `lzizd")
dzizl` zpwr
^P1STREET("IS","ixeylim","rxc")
cxr
^P1STREET("IS","ixeylim","ryd`l")
l`dyr
^P1STREET("IS","ixeylim","rz dfnix")
xinfd zr
^P1STREET("IS","ixeylim","rzpi`l")
l`ipzr
^P1STREET("IS","ixeylim","t`el bxipbx")
xbpixb le`t
^P1STREET("IS","ixeylim","t`xo")
ox`t
^P1STREET("IS","ixeylim","t`z dyelgo")
ogleyd z`t
^P1STREET("IS","ixeylim","tbiq co")
oc qibt
^P1STREET("IS","ixeylim","tcxno cec")
cec onxct
^P1STREET("IS","ixeylim","telenae")
eanelet
^P1STREET("IS","ixeylim","telepqwi")
iwqpelet
^P1STREET("IS","ixeylim","televwi irwa")
awri iwvelet
^P1STREET("IS","ixeylim","tentciz`")
`zictnet
^P1STREET("IS","ixeylim","teph iyx`l")
l`xyi hpet
^P1STREET("IS","ixeylim","terd")
dret
^P1STREET("IS","ixeylim","terli vcw")
wcv ilret
^P1STREET("IS","ixeylim","texh qric")
cirq hxet
^P1STREET("IS","ixeylim","texz ieqs")
sqei zxet
^P1STREET("IS","ixeylim","tfpx giim")
miig xpft
^P1STREET("IS","ixeylim","thx")
xht
^P1STREET("IS","ixeylim","thxid")
dixht
^P1STREET("IS","ixeylim","thxqeo")
oeqxht
^P1STREET("IS","ixeylim","tiio b'inq")
qni'b oiit
^P1STREET("IS","ixeylim","tiipyhio")
oihypiit
^P1STREET("IS","ixeylim","tiix wpib")
bipw xiit
^P1STREET("IS","ixeylim","tikno")
onkit
^P1STREET("IS","ixeylim","tiplq yne`l")
l`eny qlpit
^P1STREET("IS","ixeylim","tipq")
qpit
^P1STREET("IS","ixeylim","tipqwx")
xwqpit
^P1STREET("IS","ixeylim","tiw giim")
miig wit
^P1STREET("IS","ixeylim","tiyx nexiq")
qixen xyit
^P1STREET("IS","ixeylim","tizegi gezm")
mzeg igezit
^P1STREET("IS","ixeylim","tl` ieru")
urei `lt
^P1STREET("IS","ixeylim","tlebz dhpwim")
miwphd zbelt
^P1STREET("IS","ixeylim","tlebz dkezl")
lzekd zbelt
^P1STREET("IS","ixeylim","tlexphio")
oihpxelt
^P1STREET("IS","ixeylim","tlw f`a")
a`f wlt
^P1STREET("IS","ixeylim","tpgq bxiiaqwi")
iwqaiixb qgpt
^P1STREET("IS","ixeylim","tpgq xefo")
ofex qgpt
^P1STREET("IS","ixeylim","tpim n`ixez")
zexi`n mipt
^P1STREET("IS","ixeylim","tpipd")
dpipt
^P1STREET("IS","ixeylim","tpnd")
dnpt
^P1STREET("IS","ixeylim","tpwq")
qwpt
^P1STREET("IS","ixeylim","twec nxkf")
fkxn cewt
^P1STREET("IS","ixeylim","twirio")
oiriwt
^P1STREET("IS","ixeylim","tx`b ivgw")
wgvi b`xt
^P1STREET("IS","ixeylim","txayhiio")
oiihyaxt
^P1STREET("IS","ixeylim","txb")
bxt
^P1STREET("IS","ixeylim","txenwio")
oiwnext
^P1STREET("IS","ixeylim","txet' giim baxide")
edixab miig 'text
^P1STREET("IS","ixeylim","txet' wehyx")
xyhew 'text
^P1STREET("IS","ixeylim","txet' xwg")
gwx 'text
^P1STREET("IS","ixeylim","txetq")
qtext
^P1STREET("IS","ixeylim","txey")
yext
^P1STREET("IS","ixeylim","txgi giim")
miig igxt
^P1STREET("IS","ixeylim","txgi go")
og igxt
^P1STREET("IS","ixeylim","txi gcy")
ycg ixt
^P1STREET("IS","ixeylim","txi rnl")
lnr ixt
^P1STREET("IS","ixeylim","txicno")
oncixt
^P1STREET("IS","ixeylim","txine lei")
iel enixt
^P1STREET("IS","ixeylim","txiyno")
onyixt
^P1STREET("IS","ixeylim","txpq")
qpxt
^P1STREET("IS","ixeylim","txpwtexhx")
xhxetwpxt
^P1STREET("IS","ixeylim","txq iyride")
ediryi qxt
^P1STREET("IS","ixeylim","txu")
uxt
^P1STREET("IS","ixeylim","tzg zwed")
dewz gzt
^P1STREET("IS","ixeylim","tzgid")
digzt
^P1STREET("IS","ixeylim","v'lpea")
aepl'v
^P1STREET("IS","ixeylim","v'xlqheo")
oehqlx'v
^P1STREET("IS","ixeylim","v`lim")
mil`v
^P1STREET("IS","ixeylim","vai lapeo")
oepal iav
^P1STREET("IS","ixeylim","vai nqli`pqwi")
iwqp`ilqn iav
^P1STREET("IS","ixeylim","vaid eivgw")
wgvie diav
^P1STREET("IS","ixeylim","vcwide")
ediwcv
^P1STREET("IS","ixeylim","vepcw")
wcpev
^P1STREET("IS","ixeylim","verx")
xrev
^P1STREET("IS","ixeylim","vewi diyerd")
dreyid iwev
^P1STREET("IS","ixeylim","vewxno axej")
jexa onxwev
^P1STREET("IS","ixeylim","vex agx")
xga xev
^P1STREET("IS","ixeylim","vex irwa")
awri xev
^P1STREET("IS","ixeylim","vgi`z `laxic")
cixal` z`igv
^P1STREET("IS","ixeylim","viihlio")
oilhiiv
^P1STREET("IS","ixeylim","vili")
iliv
^P1STREET("IS","ixeylim","vlg ` cio")
oic ` glv
^P1STREET("IS","ixeylim","vng dycd")
dcyd gnv
^P1STREET("IS","ixeylim","vng ylnd")
dnly gnv
^P1STREET("IS","ixeylim","vtexd")
dxetv
^P1STREET("IS","ixeylim","vtexi")
ixetv
^P1STREET("IS","ixeylim","vtpid")
diptv
^P1STREET("IS","ixeylim","vtxixim")
mixixtv
^P1STREET("IS","ixeylim","vtz")
ztv
^P1STREET("IS","ixeylim","vxeid")
diexv
^P1STREET("IS","ixeylim","vxz")
zxv
^P1STREET("IS","ixeylim","w`qehe")
eheq`w
^P1STREET("IS","ixeylim","w`tg")
gt`w
^P1STREET("IS","ixeylim","wa epwi")
iwpe aw
^P1STREET("IS","ixeylim","waeu bleiez")
zeielb ueaw
^P1STREET("IS","ixeylim","wceyi aal")
laa iyecw
^P1STREET("IS","ixeylim","wceyi qhxend")
dnexhq iyecw
^P1STREET("IS","ixeylim","wceyi qlepiwi")
iwipelq iyecw
^P1STREET("IS","ixeylim","wceyz `dxeo")
oexd` zyecw
^P1STREET("IS","ixeylim","wcind")
dnicw
^P1STREET("IS","ixeylim","wdilez irwa")
awri zelidw
^P1STREET("IS","ixeylim","wdilez yem")
mey zelidw
^P1STREET("IS","ixeylim","wdilz `epbeex")
xeebpe` zlidw
^P1STREET("IS","ixeylim","wdzi tpgq")
qgpt izdw
^P1STREET("IS","ixeylim","we`piwd")
dwip`ew
^P1STREET("IS","ixeylim","weaeai")
iaeaew
^P1STREET("IS","ixeylim","wehlx")
xlhew
^P1STREET("IS","ixeylim","wehyx")
xyhew
^P1STREET("IS","ixeylim","weitno igfw`l")
l`wfgi ontiew
^P1STREET("IS","ixeylim","wel nyd")
dyn lew
^P1STREET("IS","ixeylim","welenaid")
dianelew
^P1STREET("IS","ixeylim","weles")
selew
^P1STREET("IS","ixeylim","weqhd xiwd")
dwix dhqew
^P1STREET("IS","ixeylim","wex` dcexez")
zexecd `xew
^P1STREET("IS","ixeylim","wexceaixe")
exiaecxew
^P1STREET("IS","ixeylim","wexez drizim")
mizird zexew
^P1STREET("IS","ixeylim","wexv'w")
w'vxew
^P1STREET("IS","ixeylim","weypix")
xipyew
^P1STREET("IS","ixeylim","wfd pead")
daep dfw
^P1STREET("IS","ixeylim","wl`efpx")
xpfe`lw
^P1STREET("IS","ixeylim","wliio")
oiilw
^P1STREET("IS","ixeylim","wliipno")
onpiilw
^P1STREET("IS","ixeylim","wlinwx")
xwnilw
^P1STREET("IS","ixeylim","wlno `nxi")
ixn` onlw
^P1STREET("IS","ixeylim","wlpcid")
dicplw
^P1STREET("IS","ixeylim","wlpx `xid")
dix` xplw
^P1STREET("IS","ixeylim","wnfeo")
oefnw
^P1STREET("IS","ixeylim","wngi ca")
ac ignw
^P1STREET("IS","ixeylim","wp`i dblil")
lilbd i`pw
^P1STREET("IS","ixeylim","wtlo")
oltw
^P1STREET("IS","ixeylim","wvix `dxeo")
oexd` xivw
^P1STREET("IS","ixeylim","wvplaebo")
obealpvw
^P1STREET("IS","ixeylim","wx`eq")
qe`xw
^P1STREET("IS","ixeylim","wxiz ncr")
rcn zixw
^P1STREET("IS","ixeylim","wxiz nexid")
dixen zixw
^P1STREET("IS","ixeylim","wxiz nyd")
dyn zixw
^P1STREET("IS","ixeylim","wxl phx")
xhp lxw
^P1STREET("IS","ixeylim","wxliaj")
jailxw
^P1STREET("IS","ixeylim","wxnpvwi")
iwvpnxw
^P1STREET("IS","ixeylim","wxo diqec")
ceqid oxw
^P1STREET("IS","ixeylim","wxo wiinz liyx`l")
l`xyil zniiw oxw
^P1STREET("IS","ixeylim","wxpi idecd")
dcedi ipxw
^P1STREET("IS","ixeylim","wxpiac xt`l")
l`tx caipxw
^P1STREET("IS","ixeylim","wy`pi `lirfx")
xfril` ip`yw
^P1STREET("IS","ixeylim","x`eao")
oae`x
^P1STREET("IS","ixeylim","x`eao `xfi")
ifx` oae`x
^P1STREET("IS","ixeylim","x`eao nq")
qn oae`x
^P1STREET("IS","ixeylim","x`eao yxi")
ixy oae`x
^P1STREET("IS","ixeylim","x`h")
h`x
^P1STREET("IS","ixeylim","x`m `lide")
edil` m`x
^P1STREET("IS","ixeylim","x`q `l pzx")
xzp l` q`x
^P1STREET("IS","ixeylim","x`q `l rnec")
cenr l` q`x
^P1STREET("IS","ixeylim","x`q weaqd")
dqaew q`x
^P1STREET("IS","ixeylim","x`rwph `lahw")
whal` hpwr`x
^P1STREET("IS","ixeylim","x`y tipd")
dpit y`x
^P1STREET("IS","ixeylim","x`yeo lvieo")
oeivl oey`x
^P1STREET("IS","ixeylim","x`yiz gknd")
dnkg ziy`x
^P1STREET("IS","ixeylim","xa `yi")
iy` ax
^P1STREET("IS","ixeylim","xa dgeal")
laegd ax
^P1STREET("IS","ixeylim","xa geal")
laeg ax
^P1STREET("IS","ixeylim","xa vrix")
xirv ax
^P1STREET("IS","ixeylim","xa ylnd nfeeil")
lieefn dnly ax
^P1STREET("IS","ixeylim","xacim")
micax
^P1STREET("IS","ixeylim","xai `xid leio")
oiel dix` iax
^P1STREET("IS","ixeylim","xai apinio")
oinipa iax
^P1STREET("IS","ixeylim","xai gii`")
`iig iax
^P1STREET("IS","ixeylim","xai ivgw `xi`li")
il`ix` wgvi iax
^P1STREET("IS","ixeylim","xai n`ix")
xi`n iax
^P1STREET("IS","ixeylim","xai rwia`")
`aiwr iax
^P1STREET("IS","ixeylim","xai vcew")
wecv iax
^P1STREET("IS","ixeylim","xai zpgen`")
`negpz iax
^P1STREET("IS","ixeylim","xaiaim")
miaiax
^P1STREET("IS","ixeylim","xaio gfwide")
ediwfg oiax
^P1STREET("IS","ixeylim","xaipeaiu `dxeo")
oexd` uiaepiax
^P1STREET("IS","ixeylim","xape bxyem")
meyxb epax
^P1STREET("IS","ixeylim","xape telihi")
ihilet epax
^P1STREET("IS","ixeylim","xape zm")
mz epax
^P1STREET("IS","ixeylim","xawd")
dwax
^P1STREET("IS","ixeylim","xb'e`o bebd")
dbeb o`e'bx
^P1STREET("IS","ixeylim","xba pyyiai")
iaiyyp abx
^P1STREET("IS","ixeylim","xc""w")
w"cx
^P1STREET("IS","ixeylim","xeaio nxcki")
ikcxn oiaex
^P1STREET("IS","ixeylim","xeaipyhiio")
oiihypiaex
^P1STREET("IS","ixeylim","xef`piq")
qip`fex
^P1STREET("IS","ixeylim","xefpalh ieqld")
dlqei hlapfex
^P1STREET("IS","ixeylim","xefpdiim")
miidpfex
^P1STREET("IS","ixeylim","xefpyhiio ca")
ac oiihypfex
^P1STREET("IS","ixeylim","xehpaxb")
bxaphex
^P1STREET("IS","ixeylim","xehyilc")
cliyhex
^P1STREET("IS","ixeylim","xennd")
dnnex
^P1STREET("IS","ixeylim","xerd v`o")
o`v drex
^P1STREET("IS","ixeylim","xewg ynreo")
oerny gwex
^P1STREET("IS","ixeylim","xewtlx")
xltwex
^P1STREET("IS","ixeylim","xez")
zex
^P1STREET("IS","ixeylim","xfi`l cec")
cec l`ifx
^P1STREET("IS","ixeylim","xfpiw")
wipfx
^P1STREET("IS","ixeylim","xg' 128")
128 'gx
^P1STREET("IS","ixeylim","xg' 609")
609 'gx
^P1STREET("IS","ixeylim","xg' 73")
73 'gx
^P1STREET("IS","ixeylim","xgeaez daekxim")
mixkead zeaegx
^P1STREET("IS","ixeylim","xgl `npe")
epn` lgx
^P1STREET("IS","ixeylim","xgl dnyexxz")
zxxeynd lgx
^P1STREET("IS","ixeylim","xgnilaiu")
uialingx
^P1STREET("IS","ixeylim","xhpes")
sephx
^P1STREET("IS","ixeylim","xialio `lirfx")
xfril` oilaix
^P1STREET("IS","ixeylim","xialio ieqs")
sqei oilaix
^P1STREET("IS","ixeylim","xiiw gaiad")
daiag wiix
^P1STREET("IS","ixeylim","xikno")
onkix
^P1STREET("IS","ixeylim","xipblalem")
melalbpix
^P1STREET("IS","ixeylim","xitno")
ontix
^P1STREET("IS","ixeylim","xiy lwiy")
yiwl yix
^P1STREET("IS","ixeylim","xla""g")
g"alx
^P1STREET("IS","ixeylim","xna""m")
m"anx
^P1STREET("IS","ixeylim","xna""o")
o"anx
^P1STREET("IS","ixeylim","xnd")
dnx
^P1STREET("IS","ixeylim","xnez telio")
oilet zenx
^P1STREET("IS","ixeylim","xnz aiz dkxm")
mxkd zia znx
^P1STREET("IS","ixeylim","xnz dbelo")
olebd znx
^P1STREET("IS","ixeylim","xnz nev`")
`ven znx
^P1STREET("IS","ixeylim","xq `hed")
deh` qx
^P1STREET("IS","ixeylim","xt`l ax lai`")
`ial xa l`tx
^P1STREET("IS","ixeylim","xt`l cld txbeld")
dlebxt dlc l`tx
^P1STREET("IS","ixeylim","xt`li rfx`")
`xfr il`tx
^P1STREET("IS","ixeylim","xt`li yne`l")
l`eny il`tx
^P1STREET("IS","ixeylim","xt`li ynyeo")
oeyny il`tx
^P1STREET("IS","ixeylim","xttexh")
hxettx
^P1STREET("IS","ixeylim","xv`ai")
ia`vx
^P1STREET("IS","ixeylim","xwm")
mwx
^P1STREET("IS","ixeylim","xwp`hi `axdm")
mdxa` ih`pwx
^P1STREET("IS","ixeylim","xy""i")
i"yx
^P1STREET("IS","ixeylim","xya""`")
`"ayx
^P1STREET("IS","ixeylim","xya""b")
b"ayx
^P1STREET("IS","ixeylim","xya""m")
m"ayx
^P1STREET("IS","ixeylim","y""i")
i"y
^P1STREET("IS","ixeylim","y""i rbpeo")
oepbr i"y
^P1STREET("IS","ixeylim","y""u")
u"y
^P1STREET("IS","ixeylim","y`ciwx pgem")
megp xwic`y
^P1STREET("IS","ixeylim","y`el dnlj")
jlnd le`y
^P1STREET("IS","ixeylim","y`elfeo")
oefle`y
^P1STREET("IS","ixeylim","y`lzi`l")
l`izl`y
^P1STREET("IS","ixeylim","y`x iyea")
aeyi x`y
^P1STREET("IS","ixeylim","yae")
eay
^P1STREET("IS","ixeylim","yaez")
zeay
^P1STREET("IS","ixeylim","yafi")
ifay
^P1STREET("IS","ixeylim","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","ixeylim","yail d`xid")
dix`d liay
^P1STREET("IS","ixeylim","yail dgend")
dnegd liay
^P1STREET("IS","ixeylim","yail dhead")
daehd liay
^P1STREET("IS","ixeylim","yail dvetiz")
zitevd liay
^P1STREET("IS","ixeylim","yail dvewim")
miwevd liay
^P1STREET("IS","ixeylim","yail dyiaelim")
mileaiyd liay
^P1STREET("IS","ixeylim","yar wdilez")
zelidw ray
^P1STREET("IS","ixeylim","yaz vcw")
wcv zay
^P1STREET("IS","ixeylim","yaz`i dpbai")
iabpd i`zay
^P1STREET("IS","ixeylim","yc""l")
l"cy
^P1STREET("IS","ixeylim","yc' ao nineo")
oenin oa 'cy
^P1STREET("IS","ixeylim","yc' ao vai")
iav oa 'cy
^P1STREET("IS","ixeylim","yc' cec ao bexieo")
oeixeb oa cec 'cy
^P1STREET("IS","ixeylim","yc' dn`ixi")
ixi`nd 'cy
^P1STREET("IS","ixeylim","yc' dxvl")
lvxd 'cy
^P1STREET("IS","ixeylim","yc' eivno")
onvie 'cy
^P1STREET("IS","ixeylim","yc' flno yf""x")
x"fy onlf 'cy
^P1STREET("IS","ixeylim","yc' giim dff")
ffd miig 'cy
^P1STREET("IS","ixeylim","yc' ivgw xaio")
oiax wgvi 'cy
^P1STREET("IS","ixeylim","yc' lei `ykel")
leky` iel 'cy
^P1STREET("IS","ixeylim","yc' nyd ciio")
oiic dyn 'cy
^P1STREET("IS","ixeylim","yc' ped irwa")
awri dep 'cy
^P1STREET("IS","ixeylim","yc' rio vexim")
mixev oir 'cy
^P1STREET("IS","ixeylim","yc' txet' nbpq")
qpbn 'text 'cy
^P1STREET("IS","ixeylim","yc' v'xv'il")
li'vx'v 'cy
^P1STREET("IS","ixeylim","ycd gnc")
cng dcy
^P1STREET("IS","ixeylim","yedm")
mdey
^P1STREET("IS","ixeylim","yeexvaxc ylem")
mely cxavxeey
^P1STREET("IS","ixeylim","yel`l ivgw")
wgvi l`ley
^P1STREET("IS","ixeylim","yenxeo")
oexney
^P1STREET("IS","ixeylim","yenxi `nepim")
mipen` ixney
^P1STREET("IS","ixeylim","yenxi dgenez")
zenegd ixney
^P1STREET("IS","ixeylim","yenxi dkezl")
lzekd ixney
^P1STREET("IS","ixeylim","yepi dlkez")
zekld ipey
^P1STREET("IS","ixeylim","yeto")
otey
^P1STREET("IS","ixeylim","yew `lafx")
xfal` wey
^P1STREET("IS","ixeylim","yew `layxxd")
dxxyal` wey
^P1STREET("IS","ixeylim","yew `lgeb'`z")
z`'begl` wey
^P1STREET("IS","ixeylim","yew `lgnio")
oingl` wey
^P1STREET("IS","ixeylim","yew `lwh`pio")
oip`hwl` wey
^P1STREET("IS","ixeylim","yew aiz iyx`l")
l`xyi zia wey
^P1STREET("IS","ixeylim","yew cabd")
dbac wey
^P1STREET("IS","ixeylim","yew dvarim")
miravd wey
^P1STREET("IS","ixeylim","yew qihep`i")
i`pehiq wey
^P1STREET("IS","ixeylim","yewo flno")
onlf owey
^P1STREET("IS","ixeylim","yex nyd")
dyn xey
^P1STREET("IS","ixeylim","yexu")
uxey
^P1STREET("IS","ixeylim","yeyo")
oyey
^P1STREET("IS","ixeylim","yeypd")
dpyey
^P1STREET("IS","ixeylim","yg""l")
l"gy
^P1STREET("IS","ixeylim","ygx")
xgy
^P1STREET("IS","ixeylim","ygx`i")
i`xgy
^P1STREET("IS","ixeylim","yhiipaxb igi`l")
l`igi bxapiihy
^P1STREET("IS","ixeylim","yhiipaxb nik`l")
l`kin bxapiihy
^P1STREET("IS","ixeylim","yhiipdx irwa")
awri xdpiihy
^P1STREET("IS","ixeylim","yhx`eq")
qe`xhy
^P1STREET("IS","ixeylim","yhxew dxno")
onxd wexhy
^P1STREET("IS","ixeylim","yhxo `axdm")
mdxa` oxhy
^P1STREET("IS","ixeylim","yhxo liia")
aiil oxhy
^P1STREET("IS","ixeylim","yiaz vieo")
oeiv zaiy
^P1STREET("IS","ixeylim","yig b'x`g")
g`x'b giy
^P1STREET("IS","ixeylim","yiig")
giiy
^P1STREET("IS","ixeylim","yiig a`cx")
xc`a giiy
^P1STREET("IS","ixeylim","yiig' rpax")
xapr 'giiy
^P1STREET("IS","ixeylim","yij ngnec")
cengn jiy
^P1STREET("IS","ixeylim","yild")
dliy
^P1STREET("IS","ixeylim","yilepi tebl")
lbet ipeliy
^P1STREET("IS","ixeylim","yilx")
xliy
^P1STREET("IS","ixeylim","yis `axdm")
mdxa` siy
^P1STREET("IS","ixeylim","yixz dim")
mid zxiy
^P1STREET("IS","ixeylim","ykeo dx`l")
l`xd oeky
^P1STREET("IS","ixeylim","ykhno")
onhky
^P1STREET("IS","ixeylim","yl`io")
oi`ly
^P1STREET("IS","ixeylim","ylem e`gcez")
zecg`e mely
^P1STREET("IS","ixeylim","ylem evcw")
wcve mely
^P1STREET("IS","ixeylim","ylem ivgw")
wgvi mely
^P1STREET("IS","ixeylim","ylem rlikm")
mkilr mely
^P1STREET("IS","ixeylim","ylem vieo dnlkd")
dklnd oeiv mely
^P1STREET("IS","ixeylim","ylenvieo dnlkd")
dklnd oeivnely
^P1STREET("IS","ixeylim","yley")
yely
^P1STREET("IS","ixeylim","ylm")
mly
^P1STREET("IS","ixeylim","ylnd")
dnly
^P1STREET("IS","ixeylim","ylnd a`em")
me`a dnly
^P1STREET("IS","ixeylim","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","ixeylim","ylnd dxxi")
ixxd dnly
^P1STREET("IS","ixeylim","ylnd enyd zb'x")
x'bz dyne dnly
^P1STREET("IS","ixeylim","ylnd flno cxew")
wexc onlf dnly
^P1STREET("IS","ixeylim","yn`i")
i`ny
^P1STREET("IS","ixeylim","ynbx")
xbny
^P1STREET("IS","ixeylim","yne`l ao rcid")
dicr oa l`eny
^P1STREET("IS","ixeylim","yne`l axej")
jexa l`eny
^P1STREET("IS","ixeylim","yne`l axekim")
mikexa l`eny
^P1STREET("IS","ixeylim","yne`l dpai`")
`iapd l`eny
^P1STREET("IS","ixeylim","yne`l dpbic")
cibpd l`eny
^P1STREET("IS","ixeylim","yne`l itd")
dti l`eny
^P1STREET("IS","ixeylim","yne`l pzo")
ozp l`eny
^P1STREET("IS","ixeylim","yne`l rco")
ocr l`eny
^P1STREET("IS","ixeylim","yne`l znix")
xinz l`eny
^P1STREET("IS","ixeylim","ynexw")
wxeny
^P1STREET("IS","ixeylim","yni ivgw")
wgvi iny
^P1STREET("IS","ixeylim","ynix")
xiny
^P1STREET("IS","ixeylim","ynq `cio `l `qieh")
heiq` l` oic` qny
^P1STREET("IS","ixeylim","ynreo")
oerny
^P1STREET("IS","ixeylim","ynreo dgkm")
mkgd oerny
^P1STREET("IS","ixeylim","ynreo dnkai")
iaknd oerny
^P1STREET("IS","ixeylim","ynreo dvciw")
wicvd oerny
^P1STREET("IS","ixeylim","ynrid")
dirny
^P1STREET("IS","ixeylim","ynxid")
dixny
^P1STREET("IS","ixeylim","ynxide leio")
oiel edixny
^P1STREET("IS","ixeylim","ynyeo")
oeyny
^P1STREET("IS","ixeylim","ypaxbx")
xbxapy
^P1STREET("IS","ixeylim","ypi`ex tlb")
blt xe`ipy
^P1STREET("IS","ixeylim","ypixx")
xxipy
^P1STREET("IS","ixeylim","yrth")
htry
^P1STREET("IS","ixeylim","yrx daxfl")
lfxad xry
^P1STREET("IS","ixeylim","yrx dtxgim")
migxtd xry
^P1STREET("IS","ixeylim","yrx ykm")
mky xry
^P1STREET("IS","ixeylim","yrxi gqc")
cqg ixry
^P1STREET("IS","ixeylim","yrxi ixeylim")
milyexi ixry
^P1STREET("IS","ixeylim","yrxi nyd")
dyn ixry
^P1STREET("IS","ixeylim","yrxi nyth")
htyn ixry
^P1STREET("IS","ixeylim","yrxi tipd")
dpit ixry
^P1STREET("IS","ixeylim","yrxi vcw")
wcv ixry
^P1STREET("IS","ixeylim","yrxi ynim")
miny ixry
^P1STREET("IS","ixeylim","yrxi zexd")
dxez ixry
^P1STREET("IS","ixeylim","ytivx")
xvity
^P1STREET("IS","ixeylim","ytix` n`ix")
xi`n `xity
^P1STREET("IS","ixeylim","ytix` vai")
iav `xity
^P1STREET("IS","ixeylim","ytxd")
dxty
^P1STREET("IS","ixeylim","ytxrm")
mrxty
^P1STREET("IS","ixeylim","ytz `nz")
zn` zty
^P1STREET("IS","ixeylim","yxeo")
oexy
^P1STREET("IS","ixeylim","yxeo `axdm")
mdxa` oexy
^P1STREET("IS","ixeylim","yxi iyx`l")
l`xyi ixy
^P1STREET("IS","ixeylim","yxifli")
ilfixy
^P1STREET("IS","ixeylim","yxiiax iyx`l")
l`xyi xaiixy
^P1STREET("IS","ixeylim","yxm giim")
miig mxy
^P1STREET("IS","ixeylim","yxrai")
iarxy
^P1STREET("IS","ixeylim","yyz dinim")
minid zyy
^P1STREET("IS","ixeylim","zcdx")
xdcz
^P1STREET("IS","ixeylim","zeal")
laez
^P1STREET("IS","ixeylim","zeqid dkdo")
odkd diqez
^P1STREET("IS","ixeylim","zeqtez iem hea")
aeh mei zetqez
^P1STREET("IS","ixeylim","zevxz")
zxvez
^P1STREET("IS","ixeylim","zexd eraecd")
dceare dxez
^P1STREET("IS","ixeylim","zexd nvieo")
oeivn dxez
^P1STREET("IS","ixeylim","zexz gqc")
cqg zxez
^P1STREET("IS","ixeylim","zgknepi")
ipenkgz
^P1STREET("IS","ixeylim","zin`")
`niz
^P1STREET("IS","ixeylim","zixey")
yexiz
^P1STREET("IS","ixeylim","zklz nxcki")
ikcxn zlkz
^P1STREET("IS","ixeylim","zl gi")
ig lz
^P1STREET("IS","ixeylim","zlnd ilio")
oili dnlz
^P1STREET("IS","ixeylim","zlneci")
icenlz
^P1STREET("IS","ixeylim","zlni ieqs")
sqei inlz
^P1STREET("IS","ixeylim","zlzo")
ozlz
^P1STREET("IS","ixeylim","zt`xz iyx`l")
l`xyi zx`tz
^P1STREET("IS","ixeylim","zt`xz xnez")
zenx zx`tz
^P1STREET("IS","ixeylim","zwer")
rewz
^P1STREET("IS","ixeylim","zxn""a")
a"nxz
^P1STREET("IS","ixeylim","zxvd")
dvxz
^P1STREET("IS","ixeylim","zxyiy")
yiyxz
^P1STREET("IS","ixeylim","zya""u")
u"ayz
^P1STREET("IS","ixeylim drziwd")
dwizrd milyexi
^P1STREET("IS","ixeylim drziwd","cabd")
dbac
^P1STREET("IS","ixeylim drziwd","xg' 73")
73 'gx
^P1STREET("IS","ixgia")
aigxi
^P1STREET("IS","ixk`")
`kxi
^P1STREET("IS","ixk`","xg' 1")
1 'gx
^P1STREET("IS","ixk`","xg' 23")
23 'gx
^P1STREET("IS","ixk`","xg' 3")
3 'gx
^P1STREET("IS","ixk`","xg' 45")
45 'gx
^P1STREET("IS","ixk`","xg' 5")
5 'gx
^P1STREET("IS","ixk`","xg' 56")
56 'gx
^P1STREET("IS","ixk`","xg' 61")
61 'gx
^P1STREET("IS","ixk`","xg' 7")
7 'gx
^P1STREET("IS","ixk`","xg' 75")
75 'gx
^P1STREET("IS","ixk`","xg' 76")
76 'gx
^P1STREET("IS","ixwepd")
dpewxi
^P1STREET("IS","ixwepd","d`ld")
dl`d
^P1STREET("IS","ixwepd","daxey")
yexad
^P1STREET("IS","ixwepd","dcwl")
lwcd
^P1STREET("IS","iyxy")
yxyi
^P1STREET("IS","iyxy","co")
oc
^P1STREET("IS","k`ael")
lea`k
^P1STREET("IS","k`ael","xg' 20")
20 'gx
^P1STREET("IS","kaxi")
ixak
^P1STREET("IS","kcexi")
ixeck
^P1STREET("IS","kcim")
mick
^P1STREET("IS","keka")
akek
^P1STREET("IS","keka dygx")
xgyd akek
^P1STREET("IS","keka dygx","nvtd kxnim")
minxk dtvn
^P1STREET("IS","keka i`ix")
xi`i akek
^P1STREET("IS","keka i`ix","`bef")
feb`
^P1STREET("IS","keka i`ix","`exo")
oxe`
^P1STREET("IS","keka i`ix","`ld")
dl`
^P1STREET("IS","keka i`ix","`leo")
oel`
^P1STREET("IS","keka i`ix","`xf")
fx`
^P1STREET("IS","keka i`ix","`yl")
ly`
^P1STREET("IS","keka i`ix","a`xeziim")
miizex`a
^P1STREET("IS","keka i`ix","a`xi")
ix`a
^P1STREET("IS","keka i`ix","aflz")
zlfa
^P1STREET("IS","keka i`ix","aixpiz")
zipxia
^P1STREET("IS","keka i`ix","aiz `l")
l` zia
^P1STREET("IS","keka i`ix","axrm")
mrxa
^P1STREET("IS","keka i`ix","axw")
wxa
^P1STREET("IS","keka i`ix","axw`i")
i`wxa
^P1STREET("IS","keka i`ix","az `l")
l` za
^P1STREET("IS","keka i`ix","az ylnd")
dnly za
^P1STREET("IS","keka i`ix","belo")
oleb
^P1STREET("IS","keka i`ix","bild")
dlib
^P1STREET("IS","keka i`ix","blaer")
realb
^P1STREET("IS","keka i`ix","bnl`")
`lnb
^P1STREET("IS","keka i`ix","bxifim")
mifixb
^P1STREET("IS","keka i`ix","caexd")
dxeac
^P1STREET("IS","keka i`ix","cela")
alec
^P1STREET("IS","keka i`ix","cex")
xec
^P1STREET("IS","keka i`ix","cezo")
ozec
^P1STREET("IS","keka i`ix","cid")
dic
^P1STREET("IS","keka i`ix","ciyeo")
oeyic
^P1STREET("IS","keka i`ix","cliez")
zeilc
^P1STREET("IS","keka i`ix","clzeo")
oezlc
^P1STREET("IS","keka i`ix","co")
oc
^P1STREET("IS","keka i`ix","ctpd")
dptc
^P1STREET("IS","keka i`ix","cwld")
dlwc
^P1STREET("IS","keka i`ix","cxbez")
zebxc
^P1STREET("IS","keka i`ix","dblrc")
crlbd
^P1STREET("IS","keka i`ix","dcq")
qcd
^P1STREET("IS","keka i`ix","ddx")
xdd
^P1STREET("IS","keka i`ix","dexc")
cxed
^P1STREET("IS","keka i`ix","dim")
mid
^P1STREET("IS","keka i`ix","diqnio")
oinqid
^P1STREET("IS","keka i`ix","dklpiz")
ziplkd
^P1STREET("IS","keka i`ix","dkpexez")
zexepkd
^P1STREET("IS","keka i`ix","dkxkem")
mekxkd
^P1STREET("IS","keka i`ix","dleheq")
qeheld
^P1STREET("IS","keka i`ix","dlehm")
mheld
^P1STREET("IS","keka i`ix","dncax")
xacnd
^P1STREET("IS","keka i`ix","dniyx")
xyind
^P1STREET("IS","keka i`ix","dnkzy")
yzknd
^P1STREET("IS","keka i`ix","dpexiz")
zixepd
^P1STREET("IS","keka i`ix","dpxwiq")
qiwxpd
^P1STREET("IS","keka i`ix","drnw")
wnrd
^P1STREET("IS","keka i`ix","drxad")
daxrd
^P1STREET("IS","keka i`ix","dyenxeo")
oexneyd
^P1STREET("IS","keka i`ix","dytld")
dltyd
^P1STREET("IS","keka i`ix","dyxeo")
oexyd
^P1STREET("IS","keka i`ix","kxnl")
lnxk
^P1STREET("IS","keka i`ix","nae` dbard")
drabd `ean
^P1STREET("IS","keka i`ix","pae")
eap
^P1STREET("IS","keka i`ix","pes im")
mi sep
^P1STREET("IS","keka i`ix","yc' d`xu")
ux`d 'cy
^P1STREET("IS","keka irwa")
awri akek
^P1STREET("IS","keka irwa","`daz `nz")
zn` zad`
^P1STREET("IS","keka irwa","`daz iyx`l")
l`xyi zad`
^P1STREET("IS","keka irwa","`tiwi nim")
min iwit`
^P1STREET("IS","keka irwa","gbai dqlr")
rlqd iabg
^P1STREET("IS","keka irwa","gla ecay")
yace alg
^P1STREET("IS","keka irwa","pdx ylem")
mely xdp
^P1STREET("IS","keka irwa","zexd nvieo")
oeivn dxez
^P1STREET("IS","keka`")
`akek
^P1STREET("IS","kexfim")
mifxek
^P1STREET("IS","kexfim","exc dblil")
lilbd cxe
^P1STREET("IS","kpez")
zepk
^P1STREET("IS","kpez","d`cem")
mec`d
^P1STREET("IS","kpez","dixew")
wexid
^P1STREET("IS","kpez","dkgel")
legkd
^P1STREET("IS","kpxz [neyad]")
(dayen) zxpk
^P1STREET("IS","kpxz [neyad]","cxj bo xgl")
lgx ob jxc
^P1STREET("IS","kpxz [waevd]")
(dveaw) zxpk
^P1STREET("IS","kqx`")
`xqk
^P1STREET("IS","ktx `cenim")
minec` xtk
^P1STREET("IS","ktx `cenim","`leo")
oel`
^P1STREET("IS","ktx `cenim","peti txz")
zxt itep
^P1STREET("IS","ktx `exid")
dixe` xtk
^P1STREET("IS","ktx `f""x")
x"f` xtk
^P1STREET("IS","ktx `f""x","ao bexieo")
oeixeb oa
^P1STREET("IS","ktx `f""x","cxj ax `ilo")
oli` xa jxc
^P1STREET("IS","ktx `f""x","cxj lec")
cel jxc
^P1STREET("IS","ktx `f""x","cxj yia`")
`aiy jxc
^P1STREET("IS","ktx `f""x","d` a`iix")
xii`a `d
^P1STREET("IS","ktx `f""x","dapim")
mipad
^P1STREET("IS","ktx `f""x","ddbpd")
dpbdd
^P1STREET("IS","ktx `f""x","dieal")
laeid
^P1STREET("IS","ktx `f""x","dlilj")
jlild
^P1STREET("IS","ktx `f""x","dpgl")
lgpd
^P1STREET("IS","ktx `f""x","drvn`ez")
ze`nvrd
^P1STREET("IS","ktx `f""x","dtln""g")
g"nltd
^P1STREET("IS","ktx `f""x","dyenx")
xneyd
^P1STREET("IS","ktx `f""x","tli""m")
m"ilt
^P1STREET("IS","ktx `f""x","vd""l")
l"dv
^P1STREET("IS","ktx `f""x","zl gi")
ig lz
^P1STREET("IS","ktx `gim")
mig` xtk
^P1STREET("IS","ktx `l ciw")
wic l` xtk
^P1STREET("IS","ktx ai`liw")
wil`ia xtk
^P1STREET("IS","ktx ai`liw","`eyd")
dye`
^P1STREET("IS","ktx ai`liw","dgwl`im")
mi`lwgd
^P1STREET("IS","ktx ai`liw","dpxihd qelc")
cleq dhixpd
^P1STREET("IS","ktx ai`liw","klpiez")
zeiplk
^P1STREET("IS","ktx ai`liw","nik`l")
l`kin
^P1STREET("IS","ktx ai`liw","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","ktx ail""e")
e"lia xtk
^P1STREET("IS","ktx ail""e","bto")
otb
^P1STREET("IS","ktx ail""e","cxj dtxcqim")
miqcxtd jxc
^P1STREET("IS","ktx ail""e","ddcxim")
mixcdd
^P1STREET("IS","ktx ail""e","dfiz")
zifd
^P1STREET("IS","ktx ail""e","dfiz 15")
15 zifd
^P1STREET("IS","ktx ail""e","dniiqcim")
micqiind
^P1STREET("IS","ktx ail""e","dtw`o")
o`wtd
^P1STREET("IS","ktx ail""e","dtxgim")
migxtd
^P1STREET("IS","ktx alem")
mela xtk
^P1STREET("IS","ktx ao peo")
oep oa xtk
^P1STREET("IS","ktx ao peo","dbto")
otbd
^P1STREET("IS","ktx ax`")
`xa xtk
^P1STREET("IS","ktx ax`","xg' 1")
1 'gx
^P1STREET("IS","ktx ax`","xg' 10")
10 'gx
^P1STREET("IS","ktx ax`","xg' 11")
11 'gx
^P1STREET("IS","ktx ax`","xg' 12")
12 'gx
^P1STREET("IS","ktx ax`","xg' 13")
13 'gx
^P1STREET("IS","ktx ax`","xg' 14")
14 'gx
^P1STREET("IS","ktx ax`","xg' 19")
19 'gx
^P1STREET("IS","ktx ax`","xg' 2")
2 'gx
^P1STREET("IS","ktx ax`","xg' 3")
3 'gx
^P1STREET("IS","ktx ax`","xg' 4")
4 'gx
^P1STREET("IS","ktx ax`","xg' 6")
6 'gx
^P1STREET("IS","ktx ax`","xg' 7")
7 'gx
^P1STREET("IS","ktx ax`","xg' 8")
8 'gx
^P1STREET("IS","ktx ax`","xg' 9")
9 'gx
^P1STREET("IS","ktx axej")
jexa xtk
^P1STREET("IS","ktx b'n`l")
l`n'b xtk
^P1STREET("IS","ktx bcreo")
oercb xtk
^P1STREET("IS","ktx blim")
milb xtk
^P1STREET("IS","ktx bliwqeo")
oeqwilb xtk
^P1STREET("IS","ktx bliwqeo","npyd")
dypn
^P1STREET("IS","ktx blrci")
icrlb xtk
^P1STREET("IS","ktx c`o")
o`c xtk
^P1STREET("IS","ktx cpi`l")
l`ipc xtk
^P1STREET("IS","ktx d`expim")
mipxe`d xtk
^P1STREET("IS","ktx d`expim",9)
9
^P1STREET("IS","ktx d`expim","`dec")
ced`
^P1STREET("IS","ktx d`expim","d`etw")
wte`d
^P1STREET("IS","ktx d`expim","d`expim")
mipxe`d
^P1STREET("IS","ktx d`expim","dbard")
drabd
^P1STREET("IS","ktx d`expim","dirx")
xrid
^P1STREET("IS","ktx d`expim","dnriio")
oiirnd
^P1STREET("IS","ktx d`expim","drnw")
wnrd
^P1STREET("IS","ktx d`expim","dtqbd")
dbqtd
^P1STREET("IS","ktx d`expim","dxkq")
qkxd
^P1STREET("IS","ktx d`expim","iepzo")
ozpei
^P1STREET("IS","ktx d`expim","itd pes")
sep dti
^P1STREET("IS","ktx d`expim","pgl necirio")
oiricen lgp
^P1STREET("IS","ktx dgexy")
yxegd xtk
^P1STREET("IS","ktx dnkai")
iaknd xtk
^P1STREET("IS","ktx dpbic")
cibpd xtk
^P1STREET("IS","ktx dpbic","d`leo")
oel`d
^P1STREET("IS","ktx dpbic","d`xf")
fx`d
^P1STREET("IS","ktx dpbic","dcela")
alecd
^P1STREET("IS","ktx dpbic","dyiwnd")
dnwiyd
^P1STREET("IS","ktx dpbic","yifs")
sfiy
^P1STREET("IS","ktx dpyi`")
`iypd xtk
^P1STREET("IS","ktx dq")
qd xtk
^P1STREET("IS","ktx dx`""d")
d"`xd xtk
^P1STREET("IS","ktx dx`""d","gxa l`z")
z`l axg
^P1STREET("IS","ktx eizwio")
oiwzie xtk
^P1STREET("IS","ktx eizwio","cebiz")
zibec
^P1STREET("IS","ktx eizwio","cxj dgel")
legd jxc
^P1STREET("IS","ktx eizwio","cxj dktx")
xtkd jxc
^P1STREET("IS","ktx eizwio","cxj nel dim")
mid len jxc
^P1STREET("IS","ktx eizwio","da`x")
x`ad
^P1STREET("IS","ktx eizwio","dnbclex")
xelcbnd
^P1STREET("IS","ktx eizwio","dnfg")
gfnd
^P1STREET("IS","ktx eizwio","dnglad")
dalgnd
^P1STREET("IS","ktx eizwio","dnrtil")
litrnd
^P1STREET("IS","ktx eizwio","dntxy")
yxtnd
^P1STREET("IS","ktx eizwio","qinhz dnxt`d")
d`txnd zhniq
^P1STREET("IS","ktx exaexb")
bxeaxe xtk
^P1STREET("IS","ktx excim")
micxe xtk
^P1STREET("IS","ktx excim","`exo")
oxe`
^P1STREET("IS","ktx excim","`ild")
dli`
^P1STREET("IS","ktx excim","`leo")
oel`
^P1STREET("IS","ktx excim","`xf")
fx`
^P1STREET("IS","ktx excim","`ykx")
xky`
^P1STREET("IS","ktx excim","ayex")
xeya
^P1STREET("IS","ktx excim","ben`")
`neb
^P1STREET("IS","ktx excim","bl")
lb
^P1STREET("IS","ktx excim","cela")
alec
^P1STREET("IS","ktx excim","ciyeo")
oeyic
^P1STREET("IS","ktx excim","ctpd")
dptc
^P1STREET("IS","ktx excim","d`ixeq")
qexi`d
^P1STREET("IS","ktx excim","d`ld")
dl`d
^P1STREET("IS","ktx excim","d`xal")
lax`d
^P1STREET("IS","ktx excim","dcq")
qcd
^P1STREET("IS","ktx excim","dfiz")
zifd
^P1STREET("IS","ktx excim","dxces")
secxd
^P1STREET("IS","ktx excim","dxineo")
oenixd
^P1STREET("IS","ktx excim","dxwtz")
ztwxd
^P1STREET("IS","ktx excim","fnix")
xinf
^P1STREET("IS","ktx excim","gavlz")
zlvag
^P1STREET("IS","ktx excim","gixm")
mxig
^P1STREET("IS","ktx excim","gva")
avg
^P1STREET("IS","ktx excim","gxea")
aexg
^P1STREET("IS","ktx excim","gxneo")
oenxg
^P1STREET("IS","ktx excim","gxviz")
zivxg
^P1STREET("IS","ktx excim","irxd")
dxri
^P1STREET("IS","ktx excim","iwipheo")
oehpiwi
^P1STREET("IS","ktx excim","kfia")
aifk
^P1STREET("IS","ktx excim","lehm")
mhel
^P1STREET("IS","ktx excim","nexo")
oxen
^P1STREET("IS","ktx excim","nixeo")
oexin
^P1STREET("IS","ktx excim","nxeed")
deexn
^P1STREET("IS","ktx excim","nyrel dkxkem")
mekxkd leryn
^P1STREET("IS","ktx excim","nyrel dpexiz")
zixepd leryn
^P1STREET("IS","ktx excim","nyrel dpxwiq")
qiwxpd leryn
^P1STREET("IS","ktx excim","nyrel dqgla")
algqd leryn
^P1STREET("IS","ktx excim","prno")
onrp
^P1STREET("IS","ktx excim","qrx")
xrq
^P1STREET("IS","ktx excim","rtxepi")
ipextr
^P1STREET("IS","ktx excim","rxad")
daxr
^P1STREET("IS","ktx excim","v`lim")
mil`v
^P1STREET("IS","ktx excim","xezm")
mzex
^P1STREET("IS","ktx excim","ypix")
xipy
^P1STREET("IS","ktx fia`c")
c`aif xtk
^P1STREET("IS","ktx fizim")
mizif xtk
^P1STREET("IS","ktx ga""c")
c"ag xtk
^P1STREET("IS","ktx ga""c","dxa `ykpfi")
ifpky` axd
^P1STREET("IS","ktx gihim")
mihig xtk
^P1STREET("IS","ktx giim")
miig xtk
^P1STREET("IS","ktx gppid")
dippg xtk
^P1STREET("IS","ktx gqicim")
miciqg xtk
^P1STREET("IS","ktx gqicim","dniiqcim")
micqiind
^P1STREET("IS","ktx gqicim","dterl dnfxgi")
igxfnd lretd
^P1STREET("IS","ktx gqicim","dwnd")
dnwd
^P1STREET("IS","ktx gqicim","dxa wew")
wew axd
^P1STREET("IS","ktx gqicim","pgl wcenim")
minecw lgp
^P1STREET("IS","ktx gqicim","pglz irwa")
awri zlgp
^P1STREET("IS","ktx gqicim","raecz iyx`l")
l`xyi zcear
^P1STREET("IS","ktx gqicim","xinepim")
mipenix
^P1STREET("IS","ktx gqicim `'")
'` miciqg xtk
^P1STREET("IS","ktx gqicim `'","`expim")
mipxe`
^P1STREET("IS","ktx gqicim `'","api zexd")
dxez ipa
^P1STREET("IS","ktx gqicim `'","bard a")
a drab
^P1STREET("IS","ktx gqicim `'","cxj dxa")
axd jxc
^P1STREET("IS","ktx gqicim `'","dbto")
otbd
^P1STREET("IS","ktx gqicim `'","dexcim")
micxed
^P1STREET("IS","ktx gqicim `'","dneqj")
jqend
^P1STREET("IS","ktx gqicim `'","drlieo")
oeilrd
^P1STREET("IS","ktx gqicim `'","dterl dnfxgi")
igxfnd lretd
^P1STREET("IS","ktx gqicim `'","dxa refi`l")
l`ifer axd
^P1STREET("IS","ktx gqicim `'","dxa wew")
wew axd
^P1STREET("IS","ktx gqicim `'","dxinepim")
mipenixd
^P1STREET("IS","ktx gqicim `'","klpiz")
ziplk
^P1STREET("IS","ktx gqicim `'","xwtez")
zetwx
^P1STREET("IS","ktx gqicim `'","ynrepeaiu")
uiaeperny
^P1STREET("IS","ktx hxeno")
onexh xtk
^P1STREET("IS","ktx hxeno","d`ld")
dl`d
^P1STREET("IS","ktx hxeno","weyivwi nyd")
dyn iwviyew
^P1STREET("IS","ktx i`qis")
siq`i xtk
^P1STREET("IS","ktx ideyr")
ryedi xtk
^P1STREET("IS","ktx iepd")
dpei xtk
^P1STREET("IS","ktx iepd","`ecm")
mce`
^P1STREET("IS","ktx iepd","`g""i `ilz")
zli` i"g`
^P1STREET("IS","ktx iepd","`li kdo")
odk il`
^P1STREET("IS","ktx iepd","`lnebo")
obenl`
^P1STREET("IS","ktx iepd","`ltqi")
iqtl`
^P1STREET("IS","ktx iepd","`xal")
lax`
^P1STREET("IS","ktx iepd","`yeg")
gey`
^P1STREET("IS","ktx iepd","axwz")
zwxa
^P1STREET("IS","ktx iepd","baexi iyx`l")
l`xyi ixeab
^P1STREET("IS","ktx iepd","belo")
oleb
^P1STREET("IS","ktx iepd","belpi")
ipleb
^P1STREET("IS","ktx iepd","blrc")
crlb
^P1STREET("IS","ktx iepd","cec dnlj")
jlnd cec
^P1STREET("IS","ktx iepd","ctpd")
dptc
^P1STREET("IS","ktx iepd","d`bef")
feb`d
^P1STREET("IS","ktx iepd","d`ld")
dl`d
^P1STREET("IS","ktx iepd","d`yl")
ly`d
^P1STREET("IS","ktx iepd","d`zxeb")
bexz`d
^P1STREET("IS","ktx iepd","daxey")
yexad
^P1STREET("IS","ktx iepd","dblaer")
realbd
^P1STREET("IS","ktx iepd","dblil")
lilbd
^P1STREET("IS","ktx iepd","dbto")
otbd
^P1STREET("IS","ktx iepd","dcec`im")
mi`cecd
^P1STREET("IS","ktx iepd","dcwl")
lwcd
^P1STREET("IS","ktx iepd","ddbpd")
dpbdd
^P1STREET("IS","ktx iepd","ddcxim")
mixcdd
^P1STREET("IS","ktx iepd","dexcim")
micxed
^P1STREET("IS","ktx iepd","dgavlz")
zlvagd
^P1STREET("IS","ktx iepd","dgxea")
aexgd
^P1STREET("IS","ktx iepd","dgxneo")
oenxgd
^P1STREET("IS","ktx iepd","dgxviz")
zivxgd
^P1STREET("IS","ktx iepd","diqnio")
oinqid
^P1STREET("IS","ktx iepd","dixco")
ocxid
^P1STREET("IS","ktx iepd","dixnej")
jenxid
^P1STREET("IS","ktx iepd","dklpiez")
zeiplkd
^P1STREET("IS","ktx iepd","dklpiz")
ziplkd
^P1STREET("IS","ktx iepd","dkxnl")
lnxkd
^P1STREET("IS","ktx iepd","dl""d")
d"ld
^P1STREET("IS","ktx iepd","dniiqcim")
micqiind
^P1STREET("IS","ktx iepd","dnxbpiz")
zipbxnd
^P1STREET("IS","ktx iepd","dpba")
abpd
^P1STREET("IS","ktx iepd","dpxwiq")
qiwxpd
^P1STREET("IS","ktx iepd","dqibleo")
oelbiqd
^P1STREET("IS","ktx iepd","drlid")
dilrd
^P1STREET("IS","ktx iepd","drnw")
wnrd
^P1STREET("IS","ktx iepd","drvn`ez")
ze`nvrd
^P1STREET("IS","ktx iepd","drxad")
daxrd
^P1STREET("IS","ktx iepd","dv`leo")
oel`vd
^P1STREET("IS","ktx iepd","dvax")
xavd
^P1STREET("IS","ktx iepd","dvls")
slvd
^P1STREET("IS","ktx iepd","dxa wew")
wew axd
^P1STREET("IS","ktx iepd","dxces")
secxd
^P1STREET("IS","ktx iepd","dxineo")
oenixd
^P1STREET("IS","ktx iepd","dxna""m")
m"anxd
^P1STREET("IS","ktx iepd","dxvl")
lvxd
^P1STREET("IS","ktx iepd","dxwtz")
ztwxd
^P1STREET("IS","ktx iepd","dywc")
cwyd
^P1STREET("IS","ktx iepd","dywnd")
dnwyd
^P1STREET("IS","ktx iepd","dyxeo")
oexyd
^P1STREET("IS","ktx iepd","dz`pd")
dp`zd
^P1STREET("IS","ktx iepd","dzaex")
xeazd
^P1STREET("IS","ktx iepd","dznx")
xnzd
^P1STREET("IS","ktx iepd","eivno")
onvie
^P1STREET("IS","ktx iepd","hetf")
fteh
^P1STREET("IS","ktx iepd","iapd")
dpai
^P1STREET("IS","ktx iepd","idecd dlei")
ield dcedi
^P1STREET("IS","ktx iepd","ieqthl")
lhtqei
^P1STREET("IS","ktx iepd","itzg")
gzti
^P1STREET("IS","ktx iepd","iwipheo")
oehpiwi
^P1STREET("IS","ktx iepd","kkx ax keka`")
`akek xa xkk
^P1STREET("IS","ktx iepd","nevwio")
oiwven
^P1STREET("IS","ktx iepd","nexid")
dixen
^P1STREET("IS","ktx iepd","nexo")
oxen
^P1STREET("IS","ktx iepd","nixeo")
oexin
^P1STREET("IS","ktx iepd","npgm abio")
oiba mgpn
^P1STREET("IS","ktx iepd","pgl ayex")
xeya lgp
^P1STREET("IS","ktx iepd","pgl brzeo")
oezrb lgp
^P1STREET("IS","ktx iepd","pgl clzeo")
oezlc lgp
^P1STREET("IS","ktx iepd","pgl feizo")
ozief lgp
^P1STREET("IS","ktx iepd","pgl gxec")
cexg lgp
^P1STREET("IS","ktx iepd","pgl ixnej")
jenxi lgp
^P1STREET("IS","ktx iepd","pgl niyx")
xyin lgp
^P1STREET("IS","ktx iepd","pgl nyeyim")
miyeyn lgp
^P1STREET("IS","ktx iepd","pgl telb")
blet lgp
^P1STREET("IS","ktx iepd","pgl vio")
oiv lgp
^P1STREET("IS","ktx iepd","pgl wnd")
dnw lgp
^P1STREET("IS","ktx iepd","pgl zpipim")
mipipz lgp
^P1STREET("IS","ktx iepd","qewelea")
aeleweq
^P1STREET("IS","ktx iepd","qnhz d`leo")
oel`d zhnq
^P1STREET("IS","ktx iepd","qnhz dqaieo")
oeiaqd zhnq
^P1STREET("IS","ktx iepd","qnhz gva")
avg zhnq
^P1STREET("IS","ktx iepd","qnhz pexiz")
zixep zhnq
^P1STREET("IS","ktx iepd","reli dbxcem")
mecxbd iler
^P1STREET("IS","ktx iepd","tiyx nexiq")
qixen xyit
^P1STREET("IS","ktx iepd","tln""g")
g"nlt
^P1STREET("IS","ktx iepd","wxo diqec")
ceqid oxw
^P1STREET("IS","ktx iepd","xai `linlj")
jlnil` iax
^P1STREET("IS","ktx iepd","xezm")
mzex
^P1STREET("IS","ktx iepd","yc' dcwlim")
milwcd 'cy
^P1STREET("IS","ktx iepd","yc' igfw`l")
l`wfgi 'cy
^P1STREET("IS","ktx iepd","ycxez xaio")
oiax zexcy
^P1STREET("IS","ktx iepd","yxz")
zxy
^P1STREET("IS","ktx iepd","zexneq")
qenxez
^P1STREET("IS","ktx igfw`l")
l`wfgi xtk
^P1STREET("IS","ktx irau")
uari xtk
^P1STREET("IS","ktx kn`")
`nk xtk
^P1STREET("IS","ktx kp`")
`pk xtk
^P1STREET("IS","ktx kp`","dkpqiez")
zeiqpkd
^P1STREET("IS","ktx kp`","xg' 1")
1 'gx
^P1STREET("IS","ktx kp`","xg' 100")
100 'gx
^P1STREET("IS","ktx kp`","xg' 102")
102 'gx
^P1STREET("IS","ktx leac")
cael xtk
^P1STREET("IS","ktx nep`y")
y`pen xtk
^P1STREET("IS","ktx nl""l")
l"ln xtk
^P1STREET("IS","ktx nl""l","ao bnl` ideyr")
ryedi `lnb oa
^P1STREET("IS","ktx nl""l","cxj dyxeo")
oexyd jxc
^P1STREET("IS","ktx nl""l","dapim")
mipad
^P1STREET("IS","ktx nl""l","dcxim")
mixcd
^P1STREET("IS","ktx nl""l","dfiz")
zifd
^P1STREET("IS","ktx nl""l","dhiiqim")
miqiihd
^P1STREET("IS","ktx nl""l","dkixkxd")
dxkxikd
^P1STREET("IS","ktx nl""l","dlineo")
oenild
^P1STREET("IS","ktx nl""l","dniiqcim")
micqiind
^P1STREET("IS","ktx nl""l","dtxgim")
migxtd
^P1STREET("IS","ktx nl""l","dvpgpim")
mipgpvd
^P1STREET("IS","ktx nl""l","rio gi")
ig oir
^P1STREET("IS","ktx npc`")
`cpn xtk
^P1STREET("IS","ktx npgm")
mgpn xtk
^P1STREET("IS","ktx nqeaim")
miaeqn xtk
^P1STREET("IS","ktx nqxiw")
wixqn xtk
^P1STREET("IS","ktx nry")
yrn xtk
^P1STREET("IS","ktx nry","`ilz")
zli`
^P1STREET("IS","ktx nry","d`expim")
mipxe`d
^P1STREET("IS","ktx nry","d`ilpez")
zepli`d
^P1STREET("IS","ktx nry","ddcxim")
mixcdd
^P1STREET("IS","ktx nry","dfiz")
zifd
^P1STREET("IS","ktx nry","dklpiz")
ziplkd
^P1STREET("IS","ktx nry","dvarepi")
iperavd
^P1STREET("IS","ktx nry","dyleyd")
dyelyd
^P1STREET("IS","ktx nry","dztef")
fetzd
^P1STREET("IS","ktx nxcki")
ikcxn xtk
^P1STREET("IS","ktx nxcki","dtxcq")
qcxtd
^P1STREET("IS","ktx nxcki","laepd")
dpeal
^P1STREET("IS","ktx phx")
xhp xtk
^P1STREET("IS","ktx phx","d`exo")
oxe`d
^P1STREET("IS","ktx phx","d`leo")
oel`d
^P1STREET("IS","ktx phx","ddcxim")
mixcdd
^P1STREET("IS","ktx phx","dxezm")
mzexd
^P1STREET("IS","ktx phx","dyihd")
dhiyd
^P1STREET("IS","ktx phx","dylem")
melyd
^P1STREET("IS","ktx q`lc")
cl`q xtk
^P1STREET("IS","ktx qa`")
`aq xtk
^P1STREET("IS","ktx qa`","`a` axciv'a")
a'vicxa `a`
^P1STREET("IS","ktx qa`","`a` weapx")
xpaew `a`
^P1STREET("IS","ktx qa`","`ai dtverim")
mirevtd ia`
^P1STREET("IS","ktx qa`","`aibil")
libia`
^P1STREET("IS","ktx qa`","`ao baixel")
lexiab oa`
^P1STREET("IS","ktx qa`","`ao rfx`")
`xfr oa`
^P1STREET("IS","ktx qa`","`ao ytxeh")
hexty oa`
^P1STREET("IS","ktx qa`","`axap`l")
l`paxa`
^P1STREET("IS","ktx qa`","`axdm wxo")
oxw mdxa`
^P1STREET("IS","ktx qa`","`bxeo")
oexb`
^P1STREET("IS","ktx qa`","`cm iwezi`l")
l`izewi mc`
^P1STREET("IS","ktx qa`","`dxepeaiu")
uiaepexd`
^P1STREET("IS","ktx qa`","`eqhyipqwi")
iwqpiyhqe`
^P1STREET("IS","ktx qa`","`exh")
hxe`
^P1STREET("IS","ktx qa`","`exi vai bxipaxb")
bxapixb iav ixe`
^P1STREET("IS","ktx qa`","`exlpqwi")
iwqplxe`
^P1STREET("IS","ktx qa`","`expim")
mipxe`
^P1STREET("IS","ktx qa`","`f""x")
x"f`
^P1STREET("IS","ktx qa`","`g""i `ilz")
zli` i"g`
^P1STREET("IS","ktx qa`","`g""i cwx")
xwc i"g`
^P1STREET("IS","ktx qa`","`gc drm")
mrd cg`
^P1STREET("IS","ktx qa`","`gcez")
zecg`
^P1STREET("IS","ktx qa`","`inax")
xani`
^P1STREET("IS","ktx qa`","`ipyhio")
oihypi`
^P1STREET("IS","ktx qa`","`ixiq")
qixi`
^P1STREET("IS","ktx qa`","`iznx ao `a""i")
i"a` oa xnzi`
^P1STREET("IS","ktx qa`","`lgxifi")
ifixgl`
^P1STREET("IS","ktx qa`","`li kdo")
odk il`
^P1STREET("IS","ktx qa`","`lide dzyai")
iayzd edil`
^P1STREET("IS","ktx qa`","`liyar")
rayil`
^P1STREET("IS","ktx qa`","`liyr")
ryil`
^P1STREET("IS","ktx qa`","`lwlri")
irlwl`
^P1STREET("IS","ktx qa`","`pd txpw")
wpxt dp`
^P1STREET("IS","ktx qa`","`phw ivgw vewxno")
onxwev wgvi whp`
^P1STREET("IS","ktx qa`","`pilaiu")
uialip`
^P1STREET("IS","ktx qa`","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","ktx qa`","`qs yngd")
dgny sq`
^P1STREET("IS","ktx qa`","`wxno")
onxw`
^P1STREET("IS","ktx qa`","`xal")
lax`
^P1STREET("IS","ktx qa`","`xlefexea")
aexefelx`
^P1STREET("IS","ktx qa`","`y ylem")
mely y`
^P1STREET("IS","ktx qa`","aeql")
lqea
^P1STREET("IS","ktx qa`","aexekea")
aekexea
^P1STREET("IS","ktx qa`","ai`liw")
wil`ia
^P1STREET("IS","ktx qa`","ail""e")
e"lia
^P1STREET("IS","ktx qa`","ailipqeo")
oeqpilia
^P1STREET("IS","ktx qa`","aiz ga""c")
c"ag zia
^P1STREET("IS","ktx qa`","alao")
oala
^P1STREET("IS","ktx qa`","aleayhio")
oihyaela
^P1STREET("IS","ktx qa`","altex")
xetla
^P1STREET("IS","ktx qa`","ao bexieo")
oeixeb oa
^P1STREET("IS","ktx qa`","ao idecd")
dcedi oa
^P1STREET("IS","ktx qa`","api axiz")
zixa ipa
^P1STREET("IS","ktx qa`","awrz aiz phetd")
dtehp zia zrwa
^P1STREET("IS","ktx qa`","awrz dixg")
gxid zrwa
^P1STREET("IS","ktx qa`","awrz iapi`l")
l`ipai zrwa
^P1STREET("IS","ktx qa`","awrz qiixim")
mixiiq zrwa
^P1STREET("IS","ktx qa`","awrz xneo")
oenx zrwa
^P1STREET("IS","ktx qa`","ax `ilo")
oli` xa
^P1STREET("IS","ktx qa`","axey")
yexa
^P1STREET("IS","ktx qa`","axl kvplqeo")
oeqlpvk lxa
^P1STREET("IS","ktx qa`","axpx")
xpxa
^P1STREET("IS","ktx qa`","axw")
wxa
^P1STREET("IS","ktx qa`","axwo")
owxa
^P1STREET("IS","ktx qa`","axy `yx")
xy` yxa
^P1STREET("IS","ktx qa`","az itzg")
gzti za
^P1STREET("IS","ktx qa`","az yar")
ray za
^P1STREET("IS","ktx qa`","b`eld")
dle`b
^P1STREET("IS","ktx qa`","baexez")
zexeab
^P1STREET("IS","ktx qa`","baexi iyx`l")
l`xyi ixeab
^P1STREET("IS","ktx qa`","barelim")
milerab
^P1STREET("IS","ktx qa`","barz `ykel")
leky` zrab
^P1STREET("IS","ktx qa`","barzi")
izrab
^P1STREET("IS","ktx qa`","bc dpai`")
`iapd cb
^P1STREET("IS","ktx qa`","bcreo")
oercb
^P1STREET("IS","ktx qa`","belc f`a")
a`f cleb
^P1STREET("IS","ktx qa`","belcyhiio")
oiihycleb
^P1STREET("IS","ktx qa`","belena")
aneleb
^P1STREET("IS","ktx qa`","bexceo")
oecxeb
^P1STREET("IS","ktx qa`","biiqez dyxieo")
oeixyd zeqiib
^P1STREET("IS","ktx qa`","blaer")
realb
^P1STREET("IS","ktx qa`","blbli dtlcd")
dcltd ilblb
^P1STREET("IS","ktx qa`","blrc")
crlb
^P1STREET("IS","ktx qa`","bxio")
oixb
^P1STREET("IS","ktx qa`","bxu")
uxb
^P1STREET("IS","ktx qa`","ca def")
fed ac
^P1STREET("IS","ktx qa`","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","ktx qa`","cec `aico")
ocia` cec
^P1STREET("IS","ktx qa`","cec `lrfx")
xfrl` cec
^P1STREET("IS","ktx qa`","cec`im")
mi`cec
^P1STREET("IS","ktx qa`","cekitz")
ztikec
^P1STREET("IS","ktx qa`","cela")
alec
^P1STREET("IS","ktx qa`","clid")
dilc
^P1STREET("IS","ktx qa`","cpi`l")
l`ipc
^P1STREET("IS","ktx qa`","cwl")
lwc
^P1STREET("IS","ktx qa`","cxj dyxeo")
oexyd jxc
^P1STREET("IS","ktx qa`","cxj nbci`l")
l`icbn jxc
^P1STREET("IS","ktx qa`","cxj wcenim")
minecw jxc
^P1STREET("IS","ktx qa`","d`bef")
feb`d
^P1STREET("IS","ktx qa`","d`ged")
deg`d
^P1STREET("IS","ktx qa`","d`ilpez")
zepli`d
^P1STREET("IS","ktx qa`","d`ld")
dl`d
^P1STREET("IS","ktx qa`","d`nex`im")
mi`xen`d
^P1STREET("IS","ktx qa`","d`wlitheq")
qehtilw`d
^P1STREET("IS","ktx qa`","d`xfim")
mifx`d
^P1STREET("IS","ktx qa`","d`ykeliz")
zileky`d
^P1STREET("IS","ktx qa`","d`yl")
ly`d
^P1STREET("IS","ktx qa`","d`zxeb")
bexz`d
^P1STREET("IS","ktx qa`","dapim")
mipad
^P1STREET("IS","ktx qa`","dbaiy")
yiabd
^P1STREET("IS","ktx qa`","dbcec draxi")
ixard cecbd
^P1STREET("IS","ktx qa`","dbcp""r")
r"pcbd
^P1STREET("IS","ktx qa`","dbelo")
olebd
^P1STREET("IS","ktx qa`","dblil")
lilbd
^P1STREET("IS","ktx qa`","dbpd")
dpbd
^P1STREET("IS","ktx qa`","dbto")
otbd
^P1STREET("IS","ktx qa`","dbx""`")
`"xbd
^P1STREET("IS","ktx qa`","dcx")
xcd
^P1STREET("IS","ktx qa`","ddqzcxez")
zexczqdd
^P1STREET("IS","ktx qa`","ddykld")
dlkydd
^P1STREET("IS","ktx qa`","deyr")
ryed
^P1STREET("IS","ktx qa`","dfiz")
zifd
^P1STREET("IS","ktx qa`","dfnx")
xnfd
^P1STREET("IS","ktx qa`","dgexyd")
dyxegd
^P1STREET("IS","ktx qa`","dgi""l")
l"igd
^P1STREET("IS","ktx qa`","dgi""y")
y"igd
^P1STREET("IS","ktx qa`","dgleu")
uelgd
^P1STREET("IS","ktx qa`","dgxea")
aexgd
^P1STREET("IS","ktx qa`","dgxeyz")
zyexgd
^P1STREET("IS","ktx qa`","dgxneo")
oenxgd
^P1STREET("IS","ktx qa`","dhgpd")
dpghd
^P1STREET("IS","ktx qa`","dhiiqim")
miqiihd
^P1STREET("IS","ktx qa`","dicic")
cicid
^P1STREET("IS","ktx qa`","dicicez")
zecicid
^P1STREET("IS","ktx qa`","diciez")
zeicid
^P1STREET("IS","ktx qa`","didlem")
meldid
^P1STREET("IS","ktx qa`","dieal")
laeid
^P1STREET("IS","ktx qa`","diefnd")
dnfeid
^P1STREET("IS","ktx qa`","dievxim")
mixveid
^P1STREET("IS","ktx qa`","diqnio")
oinqid
^P1STREET("IS","ktx qa`","dixco")
ocxid
^P1STREET("IS","ktx qa`","dkeayim")
miyaekd
^P1STREET("IS","ktx qa`","dkikx")
xkikd
^P1STREET("IS","ktx qa`","dklpiz")
ziplkd
^P1STREET("IS","ktx qa`","dkpqz")
zqpkd
^P1STREET("IS","ktx qa`","dkxm")
mxkd
^P1STREET("IS","ktx qa`","dkxnl")
lnxkd
^P1STREET("IS","ktx qa`","dl""d")
d"ld
^P1STREET("IS","ktx qa`","dlineo")
oenild
^P1STREET("IS","ktx qa`","dneail")
liaend
^P1STREET("IS","ktx qa`","dngzxez")
zexzgnd
^P1STREET("IS","ktx qa`","dniiqcim")
micqiind
^P1STREET("IS","ktx qa`","dnlj cec")
cec jlnd
^P1STREET("IS","ktx qa`","dnlj ip`i")
i`pi jlnd
^P1STREET("IS","ktx qa`","dnlj y`el")
le`y jlnd
^P1STREET("IS","ktx qa`","dnlj ylnd")
dnly jlnd
^P1STREET("IS","ktx qa`","dnlkim")
miklnd
^P1STREET("IS","ktx qa`","dnpdxd")
dxdpnd
^P1STREET("IS","ktx qa`","dnpetim")
mitepnd
^P1STREET("IS","ktx qa`","dnqbx")
xbqnd
^P1STREET("IS","ktx qa`","dnrlez")
zelrnd
^P1STREET("IS","ktx qa`","dnrtilim")
militrnd
^P1STREET("IS","ktx qa`","dntlq")
qltnd
^P1STREET("IS","ktx qa`","dpai`im")
mi`iapd
^P1STREET("IS","ktx qa`","dpba")
abpd
^P1STREET("IS","ktx qa`","dpbx")
xbpd
^P1STREET("IS","ktx qa`","dpvia")
aivpd
^P1STREET("IS","ktx qa`","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","ktx qa`","dpziaez")
zeaizpd
^P1STREET("IS","ktx qa`","dq")
qd
^P1STREET("IS","ktx qa`","dqcp`")
`pcqd
^P1STREET("IS","ktx qa`","dqealpez")
zeplaeqd
^P1STREET("IS","ktx qa`","dqpclx")
xlcpqd
^P1STREET("IS","ktx qa`","dqpdcxio")
oixcdpqd
^P1STREET("IS","ktx qa`","draecd")
dceard
^P1STREET("IS","ktx qa`","drbexim")
mixebrd
^P1STREET("IS","ktx qa`","drebo")
oberd
^P1STREET("IS","ktx qa`","drlid dypid")
dipyd dilrd
^P1STREET("IS","ktx qa`","drnw")
wnrd
^P1STREET("IS","ktx qa`","drvn`ez")
ze`nvrd
^P1STREET("IS","ktx qa`","drxad")
daxrd
^P1STREET("IS","ktx qa`","dterl dvrix")
xirvd lretd
^P1STREET("IS","ktx qa`","dtexvim")
mivxetd
^P1STREET("IS","ktx qa`","dtxcq")
qcxtd
^P1STREET("IS","ktx qa`","dtxgim")
migxtd
^P1STREET("IS","ktx qa`","dtxqd")
dqxtd
^P1STREET("IS","ktx qa`","dvax")
xavd
^P1STREET("IS","ktx qa`","dvaxim")
mixavd
^P1STREET("IS","ktx qa`","dvcw")
wcvd
^P1STREET("IS","ktx qa`","dvenz")
znevd
^P1STREET("IS","ktx qa`","dvpgpim")
mipgpvd
^P1STREET("IS","ktx qa`","dwyz")
zywd
^P1STREET("IS","ktx qa`","dx gxis")
sixg xd
^P1STREET("IS","ktx qa`","dx kneo")
oenk xd
^P1STREET("IS","ktx qa`","dx kpro")
orpk xd
^P1STREET("IS","ktx qa`","dx vio")
oiv xd
^P1STREET("IS","ktx qa`","dx xezm")
mzex xd
^P1STREET("IS","ktx qa`","dx yews")
swey xd
^P1STREET("IS","ktx qa`","dx zaex")
xeaz xd
^P1STREET("IS","ktx qa`","dx`l")
l`xd
^P1STREET("IS","ktx qa`","dx`yepim")
mipey`xd
^P1STREET("IS","ktx qa`","dxa rni`l")
l`inr axd
^P1STREET("IS","ktx qa`","dxa wew")
wew axd
^P1STREET("IS","ktx qa`","dxces")
secxd
^P1STREET("IS","ktx qa`","dxineo")
oenixd
^P1STREET("IS","ktx qa`","dxnd")
dnxd
^P1STREET("IS","ktx qa`","dxrez")
zerxd
^P1STREET("IS","ktx qa`","dxveb")
bevxd
^P1STREET("IS","ktx qa`","dxvl")
lvxd
^P1STREET("IS","ktx qa`","dxvtlc `axdm")
mdxa` cltvxd
^P1STREET("IS","ktx qa`","dxwtz")
ztwxd
^P1STREET("IS","ktx qa`","dyenx")
xneyd
^P1STREET("IS","ktx qa`","dyethim")
mihteyd
^P1STREET("IS","ktx qa`","dygx")
xgyd
^P1STREET("IS","ktx qa`","dyilepi")
ipeliyd
^P1STREET("IS","ktx qa`","dyix")
xiyd
^P1STREET("IS","ktx qa`","dylem")
melyd
^P1STREET("IS","ktx qa`","dyngd")
dgnyd
^P1STREET("IS","ktx qa`","dytld")
dltyd
^P1STREET("IS","ktx qa`","dywcim")
micwyd
^P1STREET("IS","ktx qa`","dywnd")
dnwyd
^P1STREET("IS","ktx qa`","dyxeo")
oexyd
^P1STREET("IS","ktx qa`","dz`pd")
dp`zd
^P1STREET("IS","ktx qa`","dzekpd")
dpkezd
^P1STREET("IS","ktx qa`","dzezgpim")
mipgzezd
^P1STREET("IS","ktx qa`","dzgid")
digzd
^P1STREET("IS","ktx qa`","dznx")
xnzd
^P1STREET("IS","ktx qa`","dzp`im")
mi`pzd
^P1STREET("IS","ktx qa`","dzr""y")
y"rzd
^P1STREET("IS","ktx qa`","dztef")
fetzd
^P1STREET("IS","ktx qa`","dzwend")
dnewzd
^P1STREET("IS","ktx qa`","eivno")
onvie
^P1STREET("IS","ktx qa`","eizwio")
oiwzie
^P1STREET("IS","ktx qa`","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","ktx qa`","f`a blx")
xlb a`f
^P1STREET("IS","ktx qa`","fkxid dpai`")
`iapd dixkf
^P1STREET("IS","ktx qa`","flcd dnyexxz")
zxxeynd dclf
^P1STREET("IS","ktx qa`","flnpea")
aepnlf
^P1STREET("IS","ktx qa`","fnpdes")
sedpnf
^P1STREET("IS","ktx qa`","ga""c")
c"ag
^P1STREET("IS","ktx qa`","gavlz dyxeo")
oexyd zlvag
^P1STREET("IS","ktx qa`","gawew")
wewag
^P1STREET("IS","ktx qa`","gaxeo")
oexag
^P1STREET("IS","ktx qa`","gbi")
ibg
^P1STREET("IS","ktx qa`","geaai vieo")
oeiv iaaeg
^P1STREET("IS","ktx qa`","gegiz")
zigeg
^P1STREET("IS","ktx qa`","gelcd dpai`d")
d`iapd dcleg
^P1STREET("IS","ktx qa`","gelvd")
dvleg
^P1STREET("IS","ktx qa`","gend enbcl")
lcbne dneg
^P1STREET("IS","ktx qa`","gexbio")
oibxeg
^P1STREET("IS","ktx qa`","gh' belpi")
ipleb 'hg
^P1STREET("IS","ktx qa`","gh' dawrd")
drwad 'hg
^P1STREET("IS","ktx qa`","gh' dpgl")
lgpd 'hg
^P1STREET("IS","ktx qa`","gh' dx`l")
l`xd 'hg
^P1STREET("IS","ktx qa`","gh' ie`a")
a`ei 'hg
^P1STREET("IS","ktx qa`","gh' itzg")
gzti 'hg
^P1STREET("IS","ktx qa`","ghiaz `lkqpcxepi")
ipexcpqkl` zaihg
^P1STREET("IS","ktx qa`","giipq")
qpiig
^P1STREET("IS","ktx qa`","gpd qpy")
ypq dpg
^P1STREET("IS","ktx qa`","gpizd")
dzipg
^P1STREET("IS","ktx qa`","gvxez dcx")
xcd zexvg
^P1STREET("IS","ktx qa`","gvxez dcx `'")
'` xcd zexvg
^P1STREET("IS","ktx qa`","gxviz")
zivxg
^P1STREET("IS","ktx qa`","hdeo")
oedh
^P1STREET("IS","ktx qa`","hixz vai")
iav zxih
^P1STREET("IS","ktx qa`","hxeno")
onexh
^P1STREET("IS","ktx qa`","hxentlcex")
xecltnexh
^P1STREET("IS","ktx qa`","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","ktx qa`","i""` dqtexh`im")
mi`hxetqd `"i
^P1STREET("IS","ktx qa`","i""l txu")
uxt l"i
^P1STREET("IS","ktx qa`","i`ix yhxo")
oxhy xi`i
^P1STREET("IS","ktx qa`","iapd")
dpai
^P1STREET("IS","ktx qa`","iapi`li")
il`ipai
^P1STREET("IS","ktx qa`","ib`l icio")
oici l`bi
^P1STREET("IS","ktx qa`","ibir ktiim")
miitk ribi
^P1STREET("IS","ktx qa`","ic gxevim")
mivexg ci
^P1STREET("IS","ktx qa`","idecd")
dcedi
^P1STREET("IS","ktx qa`","idecd dlei")
ield dcedi
^P1STREET("IS","ktx qa`","idecd dnkai")
iaknd dcedi
^P1STREET("IS","ktx qa`","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","ktx qa`","ie`l")
l`ei
^P1STREET("IS","ktx qa`","iegpo dqpclx")
xlcpqd opgei
^P1STREET("IS","ktx qa`","iepd")
dpei
^P1STREET("IS","ktx qa`","iepd eelj")
jlee dpei
^P1STREET("IS","ktx qa`","ieqthl")
lhtqei
^P1STREET("IS","ktx qa`","igfw`l")
l`wfgi
^P1STREET("IS","ktx qa`","igirm")
mrigi
^P1STREET("IS","ktx qa`","il""b")
b"li
^P1STREET("IS","ktx qa`","irl")
lri
^P1STREET("IS","ktx qa`","irxd")
dxri
^P1STREET("IS","ktx qa`","ivgw ycd")
dcy wgvi
^P1STREET("IS","ktx qa`","ivi`z `ixetd")
dtexi` z`ivi
^P1STREET("IS","ktx qa`","ixeylim")
milyexi
^P1STREET("IS","ktx qa`","ixnide")
edinxi
^P1STREET("IS","ktx qa`","iyride")
ediryi
^P1STREET("IS","ktx qa`","iyx`l iyride")
ediryi l`xyi
^P1STREET("IS","ktx qa`","kdo irwa")
awri odk
^P1STREET("IS","ktx qa`","kpti pyxim")
mixyp itpk
^P1STREET("IS","ktx qa`","kpxz")
zxpk
^P1STREET("IS","ktx qa`","l`d belcaxb")
bxacleb d`l
^P1STREET("IS","ktx qa`","laepd")
dpeal
^P1STREET("IS","ktx qa`","leahwio vaid")
diav oiwhael
^P1STREET("IS","ktx qa`","lei `ykel")
leky` iel
^P1STREET("IS","ktx qa`","leipqwi")
iwqpiel
^P1STREET("IS","ktx qa`","letao")
oatel
^P1STREET("IS","ktx qa`","li`eo alem")
mela oe`il
^P1STREET("IS","ktx qa`","lilipalem")
melapilil
^P1STREET("IS","ktx qa`","lql")
lql
^P1STREET("IS","ktx qa`","n`te")
et`n
^P1STREET("IS","ktx qa`","navr iepzo")
ozpei rvan
^P1STREET("IS","ktx qa`","navr qipi")
ipiq rvan
^P1STREET("IS","ktx qa`","nbyinim")
miniybn
^P1STREET("IS","ktx qa`","nehd bex")
xeb dhen
^P1STREET("IS","ktx qa`","neviz")
ziven
^P1STREET("IS","ktx qa`","nex")
xen
^P1STREET("IS","ktx qa`","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","ktx qa`","nexo")
oxen
^P1STREET("IS","ktx qa`","nfex")
xefn
^P1STREET("IS","ktx qa`","nikd")
dkin
^P1STREET("IS","ktx qa`","nikl")
lkin
^P1STREET("IS","ktx qa`","nl""l")
l"ln
^P1STREET("IS","ktx qa`","nl`kd")
dk`ln
^P1STREET("IS","ktx qa`","nrld d`expim")
mipxe`d dlrn
^P1STREET("IS","ktx qa`","nrpiz")
ziprn
^P1STREET("IS","ktx qa`","nvcd")
dcvn
^P1STREET("IS","ktx qa`","nxac dwqnim")
minqwd caxn
^P1STREET("IS","ktx qa`","nxim")
mixn
^P1STREET("IS","ktx qa`","nxkeq")
qekxn
^P1STREET("IS","ktx qa`","ny' `npeo eznx")
xnze oepn` 'yn
^P1STREET("IS","ktx qa`","ny' aiz dac")
cad zia 'yn
^P1STREET("IS","ktx qa`","ny' awrz vio")
oiv zrwa 'yn
^P1STREET("IS","ktx qa`","ny' d`dad")
dad`d 'yn
^P1STREET("IS","ktx qa`","ny' dgo")
ogd 'yn
^P1STREET("IS","ktx qa`","ny' dltic")
citld 'yn
^P1STREET("IS","ktx qa`","ny' rxebez daeym")
myead zebexr 'yn
^P1STREET("IS","ktx qa`","ny' xys")
syx 'yn
^P1STREET("IS","ktx qa`","nyd ciio")
oiic dyn
^P1STREET("IS","ktx qa`","nyd qpd")
dpq dyn
^P1STREET("IS","ktx qa`","nyd yxz")
zxy dyn
^P1STREET("IS","ktx qa`","nyrel bil")
lib leryn
^P1STREET("IS","ktx qa`","nyrel dwlr")
rlwd leryn
^P1STREET("IS","ktx qa`","p`ez cy`")
`yc ze`p
^P1STREET("IS","ktx qa`","pexc`e")
e`cxep
^P1STREET("IS","ktx qa`","pexiz")
zixep
^P1STREET("IS","ktx qa`","pgem")
megp
^P1STREET("IS","ktx qa`","pgl dcq")
qcd lgp
^P1STREET("IS","ktx qa`","pgl wpd")
dpw lgp
^P1STREET("IS","ktx qa`","pgli`li")
il`ilgp
^P1STREET("IS","ktx qa`","pgnid")
dingp
^P1STREET("IS","ktx qa`","pgyeo")
oeygp
^P1STREET("IS","ktx qa`","pil""i")
i"lip
^P1STREET("IS","ktx qa`","pivpim")
mipvip
^P1STREET("IS","ktx qa`","pix")
xip
^P1STREET("IS","ktx qa`","prexim")
mixerp
^P1STREET("IS","ktx qa`","prni")
inrp
^P1STREET("IS","ktx qa`","pzia d`aez")
zea`d aizp
^P1STREET("IS","ktx qa`","pziaez")
zeaizp
^P1STREET("IS","ktx qa`","pzo `lzxno")
onxzl` ozp
^P1STREET("IS","ktx qa`","pzo dpai`")
`iapd ozp
^P1STREET("IS","ktx qa`","qaieo")
oeiaq
^P1STREET("IS","ktx qa`","qewelea")
aeleweq
^P1STREET("IS","ktx qa`","qibliz")
zilbiq
^P1STREET("IS","ktx qa`","qito")
otiq
^P1STREET("IS","ktx qa`","qixpi `pvie")
eivp` ipxiq
^P1STREET("IS","ktx qa`","qixwio")
oiwxiq
^P1STREET("IS","ktx qa`","qn' `aiaim")
miaia` 'nq
^P1STREET("IS","ktx qa`","qn' `pey")
yep` 'nq
^P1STREET("IS","ktx qa`","qn' dcxex")
xexcd 'nq
^P1STREET("IS","ktx qa`","qn' xeo")
oex 'nq
^P1STREET("IS","ktx qa`","qnilpqwi")
iwqplinq
^P1STREET("IS","ktx qa`","raxepi")
ipexar
^P1STREET("IS","ktx qa`","reacid dpai`")
`iapd dicaer
^P1STREET("IS","ktx qa`","refi`l")
l`ifer
^P1STREET("IS","ktx qa`","rfx`")
`xfr
^P1STREET("IS","ktx qa`","rio bci")
icb oir
^P1STREET("IS","ktx qa`","rneq")
qenr
^P1STREET("IS","ktx qa`","rnipca")
acpinr
^P1STREET("IS","ktx qa`","rnl")
lnr
^P1STREET("IS","ktx qa`","rnw `iileo")
oelii` wnr
^P1STREET("IS","ktx qa`","rnw cezo")
ozec wnr
^P1STREET("IS","ktx qa`","rnw dgeld")
dlegd wnr
^P1STREET("IS","ktx qa`","rnw faeleo")
oeleaf wnr
^P1STREET("IS","ktx qa`","rnw gtx")
xtg wnr
^P1STREET("IS","ktx qa`","rnw gxec")
cexg wnr
^P1STREET("IS","ktx qa`","rnw rixeo")
oexir wnr
^P1STREET("IS","ktx qa`","rnxni")
inxnr
^P1STREET("IS","ktx qa`","rtxepi")
ipextr
^P1STREET("IS","ktx qa`","rvieo")
oeivr
^P1STREET("IS","ktx qa`","rzix icr")
rci xizr
^P1STREET("IS","ktx qa`","ti`xaxb")
bxax`it
^P1STREET("IS","ktx qa`","tipq")
qpit
^P1STREET("IS","ktx qa`","tln""g")
g"nlt
^P1STREET("IS","ktx qa`","tpgq laeo")
oeal qgpt
^P1STREET("IS","ktx qa`","tpwq")
qwpt
^P1STREET("IS","ktx qa`","txeb")
bext
^P1STREET("IS","ktx qa`","txet' cipex")
xepic 'text
^P1STREET("IS","ktx qa`","txiyno")
onyixt
^P1STREET("IS","ktx qa`","tyey")
yeyt
^P1STREET("IS","ktx qa`","v`leo")
oel`v
^P1STREET("IS","ktx qa`","varepi")
iperav
^P1STREET("IS","ktx qa`","vcwide")
ediwcv
^P1STREET("IS","ktx qa`","vd""l")
l"dv
^P1STREET("IS","ktx qa`","viihlio")
oilhiiv
^P1STREET("IS","ktx qa`","vtpid")
diptv
^P1STREET("IS","ktx qa`","waevz l""b")
b"l zveaw
^P1STREET("IS","ktx qa`","wceyi alfo")
ofla iyecw
^P1STREET("IS","ktx qa`","wciy lef")
fel yicw
^P1STREET("IS","ktx qa`","wdilz vieo")
oeiv zlidw
^P1STREET("IS","ktx qa`","wexv'w")
w'vxew
^P1STREET("IS","ktx qa`","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","ktx qa`","wliyx")
xyilw
^P1STREET("IS","ktx qa`","wtlpqwi")
iwqpltw
^P1STREET("IS","ktx qa`","wvplqeo ivgw")
wgvi oeqlpvw
^P1STREET("IS","ktx qa`","wxl phx")
xhp lxw
^P1STREET("IS","ktx qa`","wxo diqec")
ceqid oxw
^P1STREET("IS","ktx qa`","xawd")
dwax
^P1STREET("IS","ktx qa`","xawd beax")
xaeb dwax
^P1STREET("IS","ktx qa`","xehyilc")
cliyhex
^P1STREET("IS","ktx qa`","xetio")
oitex
^P1STREET("IS","ktx qa`","xez")
zex
^P1STREET("IS","ktx qa`","xfi`l cec")
cec l`ifx
^P1STREET("IS","ktx qa`","xgl dnyexxz")
zxxeynd lgx
^P1STREET("IS","ktx qa`","xiipq")
qpiix
^P1STREET("IS","ktx qa`","xiiw gaiad")
daiag wiix
^P1STREET("IS","ktx qa`","xipblalem")
melalbpix
^P1STREET("IS","ktx qa`","xna""m")
m"anx
^P1STREET("IS","ktx qa`","xnf cec")
cec fnx
^P1STREET("IS","ktx qa`","xng""l")
l"gnx
^P1STREET("IS","ktx qa`","xrm")
mrx
^P1STREET("IS","ktx qa`","xy""i")
i"yx
^P1STREET("IS","ktx qa`","y""i rbpeo")
oepbr i"y
^P1STREET("IS","ktx qa`","ya""c")
c"ay
^P1STREET("IS","ktx qa`","yafi")
ifay
^P1STREET("IS","ktx qa`","yc""l")
l"cy
^P1STREET("IS","ktx qa`","yc' b`elim")
mile`b 'cy
^P1STREET("IS","ktx qa`","yc' npgm abio")
oiba mgpn 'cy
^P1STREET("IS","ktx qa`","yc' wceyi wdix")
xidw iyecw 'cy
^P1STREET("IS","ktx qa`","yenxeo")
oexney
^P1STREET("IS","ktx qa`","yerli ynyeo")
oeyny ilrey
^P1STREET("IS","ktx qa`","yg""l")
l"gy
^P1STREET("IS","ktx qa`","yhxo `axdm")
mdxa` oxhy
^P1STREET("IS","ktx qa`","yiaz vieo")
oeiv zaiy
^P1STREET("IS","ktx qa`","yifs")
sfiy
^P1STREET("IS","ktx qa`","yilx")
xliy
^P1STREET("IS","ktx qa`","yitx")
xtiy
^P1STREET("IS","ktx qa`","ylem rlikm")
mkilr mely
^P1STREET("IS","ktx qa`","ylepqwi")
iwqpely
^P1STREET("IS","ktx qa`","yngepi `qs")
sq` ipegny
^P1STREET("IS","ktx qa`","ynrepi")
iperny
^P1STREET("IS","ktx qa`","ynrid dpai`")
`iapd dirny
^P1STREET("IS","ktx qa`","ynxide leio")
oiel edixny
^P1STREET("IS","ktx qa`","ypix")
xipy
^P1STREET("IS","ktx qa`","ytxipvw")
wvpixty
^P1STREET("IS","ktx qa`","yyz dinim")
minid zyy
^P1STREET("IS","ktx qa`","z`yex")
xey`z
^P1STREET("IS","ktx qa`","zcdx")
xdcz
^P1STREET("IS","ktx qa`","zexd eraecd")
dceare dxez
^P1STREET("IS","ktx qa`","zl gi")
ig lz
^P1STREET("IS","ktx qa`","zlm")
mlz
^P1STREET("IS","ktx qa`","zxi ryx")
xyr ixz
^P1STREET("IS","ktx qilax")
xaliq xtk
^P1STREET("IS","ktx qixwio")
oiwxiq xtk
^P1STREET("IS","ktx qixwio","cxj `tw")
wt` jxc
^P1STREET("IS","ktx qixwio","d`ilpez")
zepli`d
^P1STREET("IS","ktx qixwio","d`ixeqim")
miqexi`d
^P1STREET("IS","ktx qixwio","dapim")
mipad
^P1STREET("IS","ktx qixwio","dbtpim")
miptbd
^P1STREET("IS","ktx qixwio","dcwlim")
milwcd
^P1STREET("IS","ktx qixwio","dexcim")
micxed
^P1STREET("IS","ktx qixwio","dklpiez")
zeiplkd
^P1STREET("IS","ktx qixwio","dlela")
aleld
^P1STREET("IS","ktx qixwio","dnxbpiez")
zeipbxnd
^P1STREET("IS","ktx qixwio","dpxwiqim")
miqiwxpd
^P1STREET("IS","ktx qixwio","dqaiepim")
mipeiaqd
^P1STREET("IS","ktx qixwio","drpal")
laprd
^P1STREET("IS","ktx qixwio","kkx qixwio")
oiwxiq xkk
^P1STREET("IS","ktx qixwio","nqxiw")
wixqn
^P1STREET("IS","ktx qnir")
rinq xtk
^P1STREET("IS","ktx raey")
year xtk
^P1STREET("IS","ktx tipq")
qpit xtk
^P1STREET("IS","ktx vex")
xev xtk
^P1STREET("IS","ktx w`qm")
mq`w xtk
^P1STREET("IS","ktx w`qm","`ao g`lceo")
oecl`g oa`
^P1STREET("IS","ktx w`qm","`l ncipd")
dpicn l`
^P1STREET("IS","ktx w`qm","`l npyid")
diypn l`
^P1STREET("IS","ktx w`qm","`l pex")
xep l`
^P1STREET("IS","ktx w`qm","`l yedc`")
`cdey l`
^P1STREET("IS","ktx w`qm","`l`pq`x")
x`qp`l`
^P1STREET("IS","ktx w`qm","`lneb'dicio")
oicid'benl`
^P1STREET("IS","ktx w`qm","`lx`fi")
if`xl`
^P1STREET("IS","ktx w`qm","dye`cd")
dc`eyd
^P1STREET("IS","ktx w`qm","haew")
weah
^P1STREET("IS","ktx w`qm","qelhpd")
dphleq
^P1STREET("IS","ktx w`qm","renx `l kza")
azk l` xner
^P1STREET("IS","ktx wcem")
mecw xtk
^P1STREET("IS","ktx wiy")
yiw xtk
^P1STREET("IS","ktx wxr")
rxw xtk
^P1STREET("IS","ktx wxr","`l aix")
xia l`
^P1STREET("IS","ktx x`y dpwxd")
dxwpd y`x xtk
^P1STREET("IS","ktx xefpeelc")
cleepfex xtk
^P1STREET("IS","ktx xetio")
oitex xtk
^P1STREET("IS","ktx xez")
zex xtk
^P1STREET("IS","ktx xez","gnnd")
dnng
^P1STREET("IS","ktx yn`i")
i`ny xtk
^P1STREET("IS","ktx yne`l")
l`eny xtk
^P1STREET("IS","ktx yne`l","dfiz")
zifd
^P1STREET("IS","ktx ynxide")
edixny xtk
^P1STREET("IS","ktx ynxide","cxj d`aia")
aia`d jxc
^P1STREET("IS","ktx ynxide","cxj dbpim")
mipbd jxc
^P1STREET("IS","ktx ynxide","cxj dycez")
zecyd jxc
^P1STREET("IS","ktx ynxide","d`expim")
mipxe`d
^P1STREET("IS","ktx ynxide","d`ilpez")
zepli`d
^P1STREET("IS","ktx ynxide","da`x")
x`ad
^P1STREET("IS","ktx ynxide","dblaer")
realbd
^P1STREET("IS","ktx ynxide","dexcim")
micxed
^P1STREET("IS","ktx ynxide","dfexr")
rxefd
^P1STREET("IS","ktx ynxide","dfiz")
zifd
^P1STREET("IS","ktx ynxide","dgexy")
yxegd
^P1STREET("IS","ktx ynxide","dgxviz")
zivxgd
^P1STREET("IS","ktx ynxide","dnrtilim")
militrnd
^P1STREET("IS","ktx ynxide","dpehr")
rhepd
^P1STREET("IS","ktx ynxide","dpxwiqim")
miqiwxpd
^P1STREET("IS","ktx ynxide","dqaieo")
oeiaqd
^P1STREET("IS","ktx ynxide","dwevx")
xvewd
^P1STREET("IS","ktx ynxide","dx`yepim")
mipey`xd
^P1STREET("IS","ktx ynxide","dxwtez")
zetwxd
^P1STREET("IS","ktx ynxide","dywc")
cwyd
^P1STREET("IS","ktx ynxide","dzixey")
yexizd
^P1STREET("IS","ktx ynxide","fnpdes")
sedpnf
^P1STREET("IS","ktx ynxide","gavlz")
zlvag
^P1STREET("IS","ktx ynxide","pexc`e")
e`cxep
^P1STREET("IS","ktx ynxide","qnhz d`expim")
mipxe`d zhnq
^P1STREET("IS","ktx ynxide","wxo diqec")
ceqid oxw
^P1STREET("IS","ktx zaex")
xeaz xtk
^P1STREET("IS","ktx zaex","`lepim")
mipel`
^P1STREET("IS","ktx zaex","dbtpim")
miptbd
^P1STREET("IS","ktx zaex","dfizim")
mizifd
^P1STREET("IS","ktx zaex","dgxeaim")
miaexgd
^P1STREET("IS","ktx zaex","dniiqcim")
micqiind
^P1STREET("IS","ktx zaex","dxinepim")
mipenixd
^P1STREET("IS","ktx zaex","dyfitim")
mitifyd
^P1STREET("IS","ktx zaex","dywcim")
micwyd
^P1STREET("IS","ktx zaex","dz`pim")
mip`zd
^P1STREET("IS","ktx zaex","yc' ww""l")
l"ww 'cy
^P1STREET("IS","ktx zlez")
zelz xtk
^P1STREET("IS","ktx zteg")
getz xtk
^P1STREET("IS","kxi cy`")
`yc ixk
^P1STREET("IS","kxm ao fnxd")
dxnf oa mxk
^P1STREET("IS","kxm ndx""l")
l"xdn mxk
^P1STREET("IS","kxni ieqs")
sqei inxk
^P1STREET("IS","kxni ieqs","d`exo")
oxe`d
^P1STREET("IS","kxni ieqs","d`leo")
oel`d
^P1STREET("IS","kxni ieqs","d`xf")
fx`d
^P1STREET("IS","kxni ieqs","daxey")
yexad
^P1STREET("IS","kxni ieqs","dbto")
otbd
^P1STREET("IS","kxni ieqs","dexc")
cxed
^P1STREET("IS","kxni ieqs","dfiz")
zifd
^P1STREET("IS","kxni ieqs","diqnio")
oinqid
^P1STREET("IS","kxni ieqs","dklpiz")
ziplkd
^P1STREET("IS","kxni ieqs","dpxwiq")
qiwxpd
^P1STREET("IS","kxni ieqs","dxineo")
oenixd
^P1STREET("IS","kxni ieqs","dxwtz")
ztwxd
^P1STREET("IS","kxni ieqs","dz`pd")
dp`zd
^P1STREET("IS","kxni ieqs","dznx")
xnzd
^P1STREET("IS","kxni ieqs","qibliz")
zilbiq
^P1STREET("IS","kxni ieqs","qncx")
xcnq
^P1STREET("IS","kxni vex")
xev inxk
^P1STREET("IS","kxni vex","bey rvieo")
oeivr yeb
^P1STREET("IS","kxni`l")
l`inxk
^P1STREET("IS","kxni`l","`aia")
aia`
^P1STREET("IS","kxni`l","`hc")
ch`
^P1STREET("IS","kxni`l","`id")
di`
^P1STREET("IS","kxni`l","`ixiq")
qixi`
^P1STREET("IS","kxni`l","`ld")
dl`
^P1STREET("IS","kxni`l","`ptd")
dtp`
^P1STREET("IS","kxni`l","`qis")
siq`
^P1STREET("IS","kxni`l","`xal")
lax`
^P1STREET("IS","kxni`l","`xfim")
mifx`
^P1STREET("IS","kxni`l","`yex")
xey`
^P1STREET("IS","kxni`l","`ygx")
xgy`
^P1STREET("IS","kxni`l","`ykelez")
zeleky`
^P1STREET("IS","kxni`l","`yl")
ly`
^P1STREET("IS","kxni`l","af")
fa
^P1STREET("IS","kxni`l","aikexim")
mixekia
^P1STREET("IS","kxni`l","aiz dkxm")
mxkd zia
^P1STREET("IS","kxni`l","avix")
xiva
^P1STREET("IS","kxni`l","bl xm")
mx lb
^P1STREET("IS","kxni`l","bnl`")
`lnb
^P1STREET("IS","kxni`l","bxipaeim")
mieapixb
^P1STREET("IS","kxni`l","cbpiz")
zipbc
^P1STREET("IS","kxni`l","cekitz")
ztikec
^P1STREET("IS","kxni`l","cela")
alec
^P1STREET("IS","kxni`l","d`eno")
one`d
^P1STREET("IS","kxni`l","d`eto")
ote`d
^P1STREET("IS","kxni`l","d`exb")
bxe`d
^P1STREET("IS","kxni`l","d`exo")
oxe`d
^P1STREET("IS","kxni`l","d`ilpez")
zepli`d
^P1STREET("IS","kxni`l","d`pwex")
xewp`d
^P1STREET("IS","kxni`l","dap`i")
i`pad
^P1STREET("IS","kxni`l","daxeyim")
miyexad
^P1STREET("IS","kxni`l","daynim")
minyad
^P1STREET("IS","kxni`l","dblil")
lilbd
^P1STREET("IS","kxni`l","dbto")
otbd
^P1STREET("IS","kxni`l","dcq")
qcd
^P1STREET("IS","kxni`l","dcwl")
lwcd
^P1STREET("IS","kxni`l","dcxkim")
mikxcd
^P1STREET("IS","kxni`l","ddbpd")
dpbdd
^P1STREET("IS","kxni`l","dfiz")
zifd
^P1STREET("IS","kxni`l","dgavlz")
zlvagd
^P1STREET("IS","kxni`l","dgexy")
yxegd
^P1STREET("IS","kxni`l","dgxea")
aexgd
^P1STREET("IS","kxni`l","dgxeyz")
zyexgd
^P1STREET("IS","kxni`l","dgxez")
zexgd
^P1STREET("IS","kxni`l","dgxny")
ynxgd
^P1STREET("IS","kxni`l","dgxviz")
zivxgd
^P1STREET("IS","kxni`l","dgynl")
lnygd
^P1STREET("IS","kxni`l","dhego")
ogehd
^P1STREET("IS","kxni`l","dievxim")
mixveid
^P1STREET("IS","kxni`l","dka`i")
i`akd
^P1STREET("IS","kxni`l","dklpiz")
ziplkd
^P1STREET("IS","kxni`l","dkxea")
aexkd
^P1STREET("IS","kxni`l","dlaepd")
dpeald
^P1STREET("IS","kxni`l","dnbl")
lbnd
^P1STREET("IS","kxni`l","dnl`kd")
dk`lnd
^P1STREET("IS","kxni`l","dnqbx")
xbqnd
^P1STREET("IS","kxni`l","dnrbl")
lbrnd
^P1STREET("IS","kxni`l","dnxbpiz")
zipbxnd
^P1STREET("IS","kxni`l","dnzkz")
zkznd
^P1STREET("IS","kxni`l","dptg")
gtpd
^P1STREET("IS","kxni`l","dpyx")
xypd
^P1STREET("IS","kxni`l","dqaiepim")
mipeiaqd
^P1STREET("IS","kxni`l","dqiito")
otiiqd
^P1STREET("IS","kxni`l","drnw")
wnrd
^P1STREET("IS","kxni`l","drtxepi")
ipextrd
^P1STREET("IS","kxni`l","dtln""g")
g"nltd
^P1STREET("IS","kxni`l","dtqbd")
dbqtd
^P1STREET("IS","kxni`l","dtxgim")
migxtd
^P1STREET("IS","kxni`l","dxces")
secxd
^P1STREET("IS","kxni`l","dxwtez")
zetwxd
^P1STREET("IS","kxni`l","dyeypim")
mipyeyd
^P1STREET("IS","kxni`l","dyiy")
yiyd
^P1STREET("IS","kxni`l","dz`pd")
dp`zd
^P1STREET("IS","kxni`l","dznx")
xnzd
^P1STREET("IS","kxni`l","dzryid")
diyrzd
^P1STREET("IS","kxni`l","exc")
cxe
^P1STREET("IS","kxni`l","fnexd")
dxenf
^P1STREET("IS","kxni`l","fnix")
xinf
^P1STREET("IS","kxni`l","gavlz")
zlvag
^P1STREET("IS","kxni`l","gegiz")
zigeg
^P1STREET("IS","kxni`l","ghiaz barzi")
izrab zaihg
^P1STREET("IS","kxni`l","ghiaz belpi")
ipleb zaihg
^P1STREET("IS","kxni`l","ghiaz dpba")
abpd zaihg
^P1STREET("IS","kxni`l","ghiaz dx`l")
l`xd zaihg
^P1STREET("IS","kxni`l","ghiaz itzg")
gzti zaihg
^P1STREET("IS","kxni`l","ghiaz kxnli")
ilnxk zaihg
^P1STREET("IS","kxni`l","ghiaz rviepi")
ipeivr zaihg
^P1STREET("IS","kxni`l","go")
og
^P1STREET("IS","kxni`l","gva")
avg
^P1STREET("IS","kxni`l","gvex")
xevg
^P1STREET("IS","kxni`l","gxneo")
oenxg
^P1STREET("IS","kxni`l","iectz")
ztcei
^P1STREET("IS","kxni`l","iepz dax")
xad zpei
^P1STREET("IS","kxni`l","igirm")
mrigi
^P1STREET("IS","kxni`l","iqnio")
oinqi
^P1STREET("IS","kxni`l","iqrex")
xerqi
^P1STREET("IS","kxni`l","irxd")
dxri
^P1STREET("IS","kxni`l","ixeylim")
milyexi
^P1STREET("IS","kxni`l","kxkem")
mekxk
^P1STREET("IS","kxni`l","lda")
adl
^P1STREET("IS","kxni`l","leheq")
qehel
^P1STREET("IS","kxni`l","lehm")
mhel
^P1STREET("IS","kxni`l","liapd")
dpail
^P1STREET("IS","kxni`l","lilj")
jlil
^P1STREET("IS","kxni`l","navr `qs")
sq` rvan
^P1STREET("IS","kxni`l","navr ao rni")
inr oa rvan
^P1STREET("IS","kxni`l","navr gexa")
axeg rvan
^P1STREET("IS","kxni`l","navr nkai")
iakn rvan
^P1STREET("IS","kxni`l","navr pgyeo")
oeygp rvan
^P1STREET("IS","kxni`l","nbice")
ecibn
^P1STREET("IS","kxni`l","nex")
xen
^P1STREET("IS","kxni`l","nexc dbi`")
`ibd cxen
^P1STREET("IS","kxni`l","nixeo")
oexin
^P1STREET("IS","kxni`l","nrld `exh")
hxe` dlrn
^P1STREET("IS","kxni`l","nrld dkxnim")
minxkd dlrn
^P1STREET("IS","kxni`l","nrld kneo")
oenk dlrn
^P1STREET("IS","kxni`l","nvtd")
dtvn
^P1STREET("IS","kxni`l","nvtd pes")
sep dtvn
^P1STREET("IS","kxni`l","nxeed")
deexn
^P1STREET("IS","kxni`l","nyba")
abyn
^P1STREET("IS","kxni`l","nyrel `xf")
fx` leryn
^P1STREET("IS","kxni`l","nyrel dgva")
avgd leryn
^P1STREET("IS","kxni`l","nyrel diio")
oiid leryn
^P1STREET("IS","kxni`l","nyrel dkexm")
mxekd leryn
^P1STREET("IS","kxni`l","nyrel dqaiepim")
mipeiaqd leryn
^P1STREET("IS","kxni`l","nyrel nexo")
oxen leryn
^P1STREET("IS","kxni`l","nyrel ycnd")
dncy leryn
^P1STREET("IS","kxni`l","nyrel ywc")
cwy leryn
^P1STREET("IS","kxni`l","nyrel zto")
otz leryn
^P1STREET("IS","kxni`l","pexiz")
zixep
^P1STREET("IS","kxni`l","pgeyz")
zyegp
^P1STREET("IS","kxni`l","pgli`li")
il`ilgp
^P1STREET("IS","kxni`l","pzia dqiixim")
mixiiqd aizp
^P1STREET("IS","kxni`l","qizepiz")
zipeziq
^P1STREET("IS","kxni`l","qncx")
xcnq
^P1STREET("IS","kxni`l","qpepiz")
zipepq
^P1STREET("IS","kxni`l","qxib")
bixq
^P1STREET("IS","kxni`l","rbex")
xebr
^P1STREET("IS","kxni`l","renx")
xner
^P1STREET("IS","kxni`l","ripa")
apir
^P1STREET("IS","kxni`l","rvneo")
oenvr
^P1STREET("IS","kxni`l","rxad")
daxr
^P1STREET("IS","kxni`l","v`leo")
oel`v
^P1STREET("IS","kxni`l","vd""l")
l"dv
^P1STREET("IS","kxni`l","vetiz")
zitev
^P1STREET("IS","kxni`l","whis")
sihw
^P1STREET("IS","kxni`l","xezm")
mzex
^P1STREET("IS","kxni`l","xineo")
oenix
^P1STREET("IS","kxni`l","xnim")
minx
^P1STREET("IS","kxni`l","yail `iix")
xii` liay
^P1STREET("IS","kxni`l","yail `lel")
lel` liay
^P1STREET("IS","kxni`l","yail dfexrim")
mirxefd liay
^P1STREET("IS","kxni`l","yail gyeo")
oeyg liay
^P1STREET("IS","kxni`l","yail haz")
zah liay
^P1STREET("IS","kxni`l","yail kqle")
elqk liay
^P1STREET("IS","kxni`l","yail piqo")
oqip liay
^P1STREET("IS","kxni`l","yail qieo")
oeiq liay
^P1STREET("IS","kxni`l","yail wvix")
xivw liay
^P1STREET("IS","kxni`l","yail yah")
hay liay
^P1STREET("IS","kxni`l","yail znef")
fenz liay
^P1STREET("IS","kxni`l","yail zyxi")
ixyz liay
^P1STREET("IS","kxni`l","yc' aiz dkxm")
mxkd zia 'cy
^P1STREET("IS","kxni`l","yc' ddqzcxez")
zexczqdd 'cy
^P1STREET("IS","kxni`l","yc' dylem")
melyd 'cy
^P1STREET("IS","kxni`l","yc' pyi`i iyx`l")
l`xyi i`iyp 'cy
^P1STREET("IS","kxni`l","yc' ww""l")
l"ww 'cy
^P1STREET("IS","kxni`l","ycnd")
dncy
^P1STREET("IS","kxni`l","yexw")
wxey
^P1STREET("IS","kxni`l","ygm")
mgy
^P1STREET("IS","kxni`l","ygs")
sgy
^P1STREET("IS","kxni`l","yifs")
sfiy
^P1STREET("IS","kxni`l","yihd")
dhiy
^P1STREET("IS","kxni`l","ylnd bexo")
oxeb dnly
^P1STREET("IS","kxni`l","yrx dbi`")
`ibd xry
^P1STREET("IS","kxni`l","yxib")
bixy
^P1STREET("IS","kxni`l","zaex")
xeaz
^P1STREET("IS","kxni`l","zixey")
yexiz
^P1STREET("IS","kxnid")
dinxk
^P1STREET("IS","kxnl")
lnxk
^P1STREET("IS","kxnl","d`eto")
ote`d
^P1STREET("IS","lai`")
`ial
^P1STREET("IS","lapim")
mipal
^P1STREET("IS","lapim","d`xfim")
mifx`d
^P1STREET("IS","ldaez dayo")
oyad zeadl
^P1STREET("IS","ldaez gaiad")
daiag zeadl
^P1STREET("IS","ldaim")
miadl
^P1STREET("IS","ldaim","`bniz")
zinb`
^P1STREET("IS","ldaim","`ixiq")
qixi`
^P1STREET("IS","ldaim","`ptd")
dtp`
^P1STREET("IS","ldaim","af")
fa
^P1STREET("IS","ldaim","axkid")
dikxa
^P1STREET("IS","ldaim","axwo")
owxa
^P1STREET("IS","ldaim","bcxeo")
oexcb
^P1STREET("IS","ldaim","ben`")
`neb
^P1STREET("IS","ldaim","biazeo")
oezaib
^P1STREET("IS","ldaim","cbpiz")
zipbc
^P1STREET("IS","ldaim","cxex")
xexc
^P1STREET("IS","ldaim","dgqicd")
dciqgd
^P1STREET("IS","ldaim","drih")
hird
^P1STREET("IS","ldaim","dxces")
secxd
^P1STREET("IS","ldaim","exc")
cxe
^P1STREET("IS","ldaim","exciz")
zicxe
^P1STREET("IS","ldaim","febeo")
oebef
^P1STREET("IS","ldaim","fxfix")
xifxf
^P1STREET("IS","ldaim","gebld")
dlbeg
^P1STREET("IS","ldaim","gpwo")
owpg
^P1STREET("IS","ldaim","gxviz")
zivxg
^P1STREET("IS","ldaim","halo")
olah
^P1STREET("IS","ldaim","hetg")
gteh
^P1STREET("IS","ldaim","hqiz")
ziqh
^P1STREET("IS","ldaim","iqrex")
xerqi
^P1STREET("IS","ldaim","irxd")
dxri
^P1STREET("IS","ldaim","kekao")
oakek
^P1STREET("IS","ldaim","kgel dfpa")
apfd legk
^P1STREET("IS","ldaim","lapiz")
zipal
^P1STREET("IS","ldaim","lehm")
mhel
^P1STREET("IS","ldaim","liliz")
zilil
^P1STREET("IS","ldaim","ncaxeo")
oexacn
^P1STREET("IS","ldaim","nexo")
oxen
^P1STREET("IS","ldaim","pu")
up
^P1STREET("IS","ldaim","pxwiq")
qiwxp
^P1STREET("IS","ldaim","pyx")
xyp
^P1STREET("IS","ldaim","qaki")
ikaq
^P1STREET("IS","ldaim","qetiz")
ziteq
^P1STREET("IS","ldaim","qiito")
otiiq
^P1STREET("IS","ldaim","qlriz")
zirlq
^P1STREET("IS","ldaim","qpepiz")
zipepq
^P1STREET("IS","ldaim","rbex")
xebr
^P1STREET("IS","ldaim","rcrc")
crcr
^P1STREET("IS","ldaim","rtxepi")
ipextr
^P1STREET("IS","ldaim","tpipiz")
zipipt
^P1STREET("IS","ldaim","trnepiz")
zipenrt
^P1STREET("IS","ldaim","varepi")
iperav
^P1STREET("IS","ldaim","wicd")
dciw
^P1STREET("IS","ldaim","xwtz")
ztwx
^P1STREET("IS","ldaim","yc' xineo")
oenix 'cy
^P1STREET("IS","lec")
cel
^P1STREET("IS","lec","`""c bexceo")
oecxeb c"`
^P1STREET("IS","lec","`a` `gin`ix")
xi`nig` `a`
^P1STREET("IS","lec","`a` dll")
lld `a`
^P1STREET("IS","lec","`a` dll qilax")
xaliq lld `a`
^P1STREET("IS","lec","`aiyi `lyeili")
ilieyl` iyia`
^P1STREET("IS","lec","`bef")
feb`
^P1STREET("IS","lec","`bq")
qb`
^P1STREET("IS","lec","`ciqeo zenq")
qnez oeqic`
^P1STREET("IS","lec","`cnepiz")
zipenc`
^P1STREET("IS","lec","`dxeo ao gne")
eng oa oexd`
^P1STREET("IS","lec","`dxeo lealio")
oilael oexd`
^P1STREET("IS","lec","`dxepqeo")
oeqpexd`
^P1STREET("IS","lec","`dxo ao ieqs")
sqei oa oxd`
^P1STREET("IS","lec","`eqiywio npgm")
mgpn oiwyiqe`
^P1STREET("IS","lec","`gc ryx aieli")
ileia xyr cg`
^P1STREET("IS","lec","`ged")
deg`
^P1STREET("IS","lec","`gicea")
aecig`
^P1STREET("IS","lec","`girfx")
xfrig`
^P1STREET("IS","lec","`iileo")
oelii`
^P1STREET("IS","lec","`ilz")
zli`
^P1STREET("IS","lec","`ipyhiio `laxh")
hxal` oiihypi`
^P1STREET("IS","lec","`iqn`ilea lei")
iel aeli`nqi`
^P1STREET("IS","lec","`iqwea")
aewqi`
^P1STREET("IS","lec","`l newcqi")
iqcwen l`
^P1STREET("IS","lec","`li kdo")
odk il`
^P1STREET("IS","lec","`lirfx")
xfril`
^P1STREET("IS","lec","`liyar `ykel")
leky` rayil`
^P1STREET("IS","lec","`lkqpcx")
xcpqkl`
^P1STREET("IS","lec","`ltrl")
lrtl`
^P1STREET("IS","lec","`lzx xgl")
lgx xzl`
^P1STREET("IS","lec","`npeo eznx")
xnze oepn`
^P1STREET("IS","lec","`pd txpw")
wpxt dp`
^P1STREET("IS","lec","`pilaiu nxcki")
ikcxn uialip`
^P1STREET("IS","lec","`txim lefeo")
oefel mixt`
^P1STREET("IS","lec","`txqw")
wqxt`
^P1STREET("IS","lec","`wqeceq")
qeceqw`
^P1STREET("IS","lec","`xar repez")
zeper rax`
^P1STREET("IS","lec","`xf")
fx`
^P1STREET("IS","lec","`xid ao `lirfx")
xfril` oa dix`
^P1STREET("IS","lec","`xid xeaio")
oiaex dix`
^P1STREET("IS","lec","`xlefexea giim")
miig aexefelx`
^P1STREET("IS","lec","`ykeliz")
zileky`
^P1STREET("IS","lec","`yl")
ly`
^P1STREET("IS","lec","`zxeb")
bexz`
^P1STREET("IS","lec","aexekea ca")
ac aekexea
^P1STREET("IS","lec","aia`xq")
qx`aia
^P1STREET("IS","lec","ail""e")
e"lia
^P1STREET("IS","lec","aiz""x")
x"zia
^P1STREET("IS","lec","altex")
xetla
^P1STREET("IS","lec","ao `xi lixo")
oxil ix` oa
^P1STREET("IS","lec","ao bexieo")
oeixeb oa
^P1STREET("IS","lec","ao gweo")
oewg oa
^P1STREET("IS","lec","ao idecd")
dcedi oa
^P1STREET("IS","lec","ax `ilo")
oli` xa
^P1STREET("IS","lec","ax keka`")
`akek xa
^P1STREET("IS","lec","axpx ieqs giim")
miig sqei xpxa
^P1STREET("IS","lec","axw")
wxa
^P1STREET("IS","lec","az yar")
ray za
^P1STREET("IS","lec","baexi iyx`l")
l`xyi ixeab
^P1STREET("IS","lec","baxi`l")
l`ixab
^P1STREET("IS","lec","behno `xid")
dix` onheb
^P1STREET("IS","lec","belcaxb")
bxacleb
^P1STREET("IS","lec","belena `lide")
edil` aneleb
^P1STREET("IS","lec","beyo")
oyeb
^P1STREET("IS","lec","blrc")
crlb
^P1STREET("IS","lec","bpi `aia")
aia` ipb
^P1STREET("IS","lec","bpxl lwlxw")
wxlwl lxpb
^P1STREET("IS","lec","bpxl qo nxhio")
oihxn oq lxpb
^P1STREET("IS","lec","bxepx ca")
ac xpexb
^P1STREET("IS","lec","bxhael bcreo")
oercb leahxb
^P1STREET("IS","lec","bxipaeim")
mieapixb
^P1STREET("IS","lec","bxu")
uxb
^P1STREET("IS","lec","c""x nxfew nyd")
dyn wefxn x"c
^P1STREET("IS","lec","ca def")
fed ac
^P1STREET("IS","lec","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","lec","ceacao")
oacaec
^P1STREET("IS","lec","ceapea")
aepaec
^P1STREET("IS","lec","cec axej")
jexa cec
^P1STREET("IS","lec","cec xnf")
fnx cec
^P1STREET("IS","lec","cifxr`li")
il`rxfic
^P1STREET("IS","lec","ciio caexd")
dxeac oiic
^P1STREET("IS","lec","cm dnkaim")
miaknd mc
^P1STREET("IS","lec","co")
oc
^P1STREET("IS","lec","cwx")
xwc
^P1STREET("IS","lec","cxeni `yx")
xy` inexc
^P1STREET("IS","lec","cxj lec dixewd")
dwexid cel jxc
^P1STREET("IS","lec","cxj nynx pes")
sep xnyn jxc
^P1STREET("IS","lec","cxj peti gnc")
cng itep jxc
^P1STREET("IS","lec","cxki nyd")
dyn ikxc
^P1STREET("IS","lec","d`cne""x d`nvri")
irvn`d x"enc`d
^P1STREET("IS","lec","d`expim")
mipxe`d
^P1STREET("IS","lec","d`ilpez")
zepli`d
^P1STREET("IS","lec","d`ixiq")
qixi`d
^P1STREET("IS","lec","d`ld")
dl`d
^P1STREET("IS","lec","d`ntxi ieaxh")
hxaei ixtn`d
^P1STREET("IS","lec","d`xarim eylyd")
dylye mirax`d
^P1STREET("IS","lec","darl ym hea")
aeh my lrad
^P1STREET("IS","lec","daxclqim")
miqlcxad
^P1STREET("IS","lec","daxeyim")
miyexad
^P1STREET("IS","lec","dayex")
xeyad
^P1STREET("IS","lec","dbcec draxi")
ixard cecbd
^P1STREET("IS","lec","dbelo")
olebd
^P1STREET("IS","lec","dbi`")
`ibd
^P1STREET("IS","lec","dblaer")
realbd
^P1STREET("IS","lec","dbx")
xbd
^P1STREET("IS","lec","dcq")
qcd
^P1STREET("IS","lec","dcwl")
lwcd
^P1STREET("IS","lec","dcxim")
mixcd
^P1STREET("IS","lec","ddqzcxez")
zexczqdd
^P1STREET("IS","lec","deexcim")
micxeed
^P1STREET("IS","lec","dgleu")
uelgd
^P1STREET("IS","lec","dgxneo")
oenxgd
^P1STREET("IS","lec","dgynep`im")
mi`penygd
^P1STREET("IS","lec","dievxim")
mixveid
^P1STREET("IS","lec","dkeayim")
miyaekd
^P1STREET("IS","lec","dlo wlx")
xlw old
^P1STREET("IS","lec","dlpi dnlkd")
dklnd ipld
^P1STREET("IS","lec","dngwx")
xwgnd
^P1STREET("IS","lec","dnl`kd")
dk`lnd
^P1STREET("IS","lec","dnlj ylnd")
dnly jlnd
^P1STREET("IS","lec","dnqbx")
xbqnd
^P1STREET("IS","lec","dntepim")
mipetnd
^P1STREET("IS","lec","dnvai`im")
mi`iavnd
^P1STREET("IS","lec","dnzpcaim")
miacpznd
^P1STREET("IS","lec","dpxi dxu")
uxd ixpd
^P1STREET("IS","lec","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","lec","dpxwiqim")
miqiwxpd
^P1STREET("IS","lec","dpyi`")
`iypd
^P1STREET("IS","lec","dq nyd")
dyn qd
^P1STREET("IS","lec","dqiixim")
mixiiqd
^P1STREET("IS","lec","drlid dypid")
dipyd dilrd
^P1STREET("IS","lec","drnlim")
milnrd
^P1STREET("IS","lec","dtxgim")
migxtd
^P1STREET("IS","lec","dtxqd")
dqxtd
^P1STREET("IS","lec","dvax")
xavd
^P1STREET("IS","lec","dvextim")
mitxevd
^P1STREET("IS","lec","dviix x`eao")
oae`x xiivd
^P1STREET("IS","lec","dvitexo")
oxetivd
^P1STREET("IS","lec","dvpgpim")
mipgpvd
^P1STREET("IS","lec","dxa `ae gvix`")
`xivg ea` axd
^P1STREET("IS","lec","dxa `txi`h")
h`ixt` axd
^P1STREET("IS","lec","dxa dkdo xt`l")
l`tx odkd axd
^P1STREET("IS","lec","dxa gexi")
ixeg axd
^P1STREET("IS","lec","dxa gexi giim")
miig ixeg axd
^P1STREET("IS","lec","dxa hiia")
aiih axd
^P1STREET("IS","lec","dxa refi`l")
l`ifer axd
^P1STREET("IS","lec","dxa rfxid")
dixfr axd
^P1STREET("IS","lec","dxa wew")
wew axd
^P1STREET("IS","lec","dxces")
secxd
^P1STREET("IS","lec","dxebi nlkez")
zekln ibexd
^P1STREET("IS","lec","dxineo")
oenixd
^P1STREET("IS","lec","dxkaz")
zakxd
^P1STREET("IS","lec","dxveb")
bevxd
^P1STREET("IS","lec","dxvl")
lvxd
^P1STREET("IS","lec","dxwtez")
zetwxd
^P1STREET("IS","lec","dyenx")
xneyd
^P1STREET("IS","lec","dyenxepim")
mipexneyd
^P1STREET("IS","lec","dygxex")
xexgyd
^P1STREET("IS","lec","dyiihz")
zhiiyd
^P1STREET("IS","lec","dywc")
cwyd
^P1STREET("IS","lec","dzaex")
xeazd
^P1STREET("IS","lec","dzryid")
diyrzd
^P1STREET("IS","lec","dzwed")
dewzd
^P1STREET("IS","lec","eibecqwi rneq")
qenr iwqcebie
^P1STREET("IS","lec","eili`m xefpeelc")
cleepfex m`ilie
^P1STREET("IS","lec","f'aehipqwi f`a")
a`f iwqpihea'f
^P1STREET("IS","lec","feeizo")
ozieef
^P1STREET("IS","lec","fibla`em")
me`albif
^P1STREET("IS","lec","fiz")
zif
^P1STREET("IS","lec","fizo")
ozif
^P1STREET("IS","lec","flno `xo")
ox` onlf
^P1STREET("IS","lec","flno ypi`ex")
xe`ipy onlf
^P1STREET("IS","lec","ftxpi `laxh")
hxal` ipxtf
^P1STREET("IS","lec","g""p ai`liw")
wil`ia p"g
^P1STREET("IS","lec","ga""c")
c"ag
^P1STREET("IS","lec","gavlz")
zlvag
^P1STREET("IS","lec","gcic e`epe")
epe`e cicg
^P1STREET("IS","lec","gfpi qeleneo")
oeneleq ipfg
^P1STREET("IS","lec","gh' dx`l")
l`xd 'hg
^P1STREET("IS","lec","gh' itzg")
gzti 'hg
^P1STREET("IS","lec","gicwl")
lwcig
^P1STREET("IS","lec","giim nyd ytix`")
`xity dyn miig
^P1STREET("IS","lec","gil dim")
mid lig
^P1STREET("IS","lec","glli `bcix")
xicb` illg
^P1STREET("IS","lec","glli `bef")
feb` illg
^P1STREET("IS","lec","gpd qpy")
ypq dpg
^P1STREET("IS","lec","gqxim")
mixqg
^P1STREET("IS","lec","gxea")
aexg
^P1STREET("IS","lec","gxviz")
zivxg
^P1STREET("IS","lec","heihe")
ehieh
^P1STREET("IS","lec","helicpe")
epcileh
^P1STREET("IS","lec","hxentlcex")
xecltnexh
^P1STREET("IS","lec","hxteo")
oetxh
^P1STREET("IS","lec","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","lec","i""` glli nipko")
okpin illg `"i
^P1STREET("IS","lec","iectz")
ztcei
^P1STREET("IS","lec","iegpo")
opgei
^P1STREET("IS","lec","iepzo pzpide")
edipzp ozpei
^P1STREET("IS","lec","ieqthl biex`")
`xeib lhtqei
^P1STREET("IS","lec","igfw`l")
l`wfgi
^P1STREET("IS","lec","il""b")
b"li
^P1STREET("IS","lec","iqnio")
oinqi
^P1STREET("IS","lec","ivgw ycd")
dcy wgvi
^P1STREET("IS","lec","iwipheo")
oehpiwi
^P1STREET("IS","lec","ixeylim")
milyexi
^P1STREET("IS","lec","ixige")
egixi
^P1STREET("IS","lec","ixnej")
jenxi
^P1STREET("IS","lec","iyiaz gac")
cag zaiyi
^P1STREET("IS","lec","iyx`l fnexd")
dxenf l`xyi
^P1STREET("IS","lec","iyykx ebno")
onbe xkyyi
^P1STREET("IS","lec","kdo irwa")
awri odk
^P1STREET("IS","lec","kdo nik`l")
l`kin odk
^P1STREET("IS","lec","kkx drvn`ez")
ze`nvrd xkk
^P1STREET("IS","lec","kkx dtln""g")
g"nltd xkk
^P1STREET("IS","lec","kkx dwenpce")
ecpnewd xkk
^P1STREET("IS","lec","kkx dyxieo")
oeixyd xkk
^P1STREET("IS","lec","kkx qhxend")
dnexhq xkk
^P1STREET("IS","lec","kkx wenpce")
ecpnew xkk
^P1STREET("IS","lec","klil dgexy")
yxegd lilk
^P1STREET("IS","lec","klpiez")
zeiplk
^P1STREET("IS","lec","kvplqeo")
oeqlpvk
^P1STREET("IS","lec","kxkem")
mekxk
^P1STREET("IS","lec","kxnl")
lnxk
^P1STREET("IS","lec","l`eo alem")
mela oe`l
^P1STREET("IS","lec","la tqg")
gqt al
^P1STREET("IS","lec","ldno")
ondl
^P1STREET("IS","lec","liapd")
dpail
^P1STREET("IS","lec","lih`pi")
ip`hil
^P1STREET("IS","lec","lilj")
jlil
^P1STREET("IS","lec","lineo")
oenil
^P1STREET("IS","lec","navr iepzo")
ozpei rvan
^P1STREET("IS","lec","necirio")
oiricen
^P1STREET("IS","lec","nephitiexi")
ixeitihpen
^P1STREET("IS","lec","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","lec","nexo")
oxen
^P1STREET("IS","lec","nfxgi `axdm")
mdxa` igxfn
^P1STREET("IS","lec","nfxgi cec")
cec igxfn
^P1STREET("IS","lec","ngpez wtxiqio")
oiqixtw zepgn
^P1STREET("IS","lec","nicpw `xid")
dix` wpcin
^P1STREET("IS","lec","nikd xiiqx")
xqiix dkin
^P1STREET("IS","lec","npgm abio")
oiba mgpn
^P1STREET("IS","lec","nq cpi")
ipc qn
^P1STREET("IS","lec","nqcd")
dcqn
^P1STREET("IS","lec","nvcd")
dcvn
^P1STREET("IS","lec","nxbpiz")
zipbxn
^P1STREET("IS","lec","nyd yxz")
zxy dyn
^P1STREET("IS","lec","nygzz `ilz")
zli` zzgyn
^P1STREET("IS","lec","peiyhio tpgq")
qgpt oihyiep
^P1STREET("IS","lec","pexc`e nwq")
qwn e`cxep
^P1STREET("IS","lec","pexiz")
zixep
^P1STREET("IS","lec","pgeyzo `exi")
ixe` ozyegp
^P1STREET("IS","lec","pil""i")
i"lip
^P1STREET("IS","lec","pinixeax")
xaexinip
^P1STREET("IS","lec","pivpim")
mipvip
^P1STREET("IS","lec","pixim")
mixip
^P1STREET("IS","lec","pzo `laf")
fal` ozp
^P1STREET("IS","lec","qaieo")
oeiaq
^P1STREET("IS","lec","qbxd")
dxbq
^P1STREET("IS","lec","qewelea")
aeleweq
^P1STREET("IS","lec","qgla")
algq
^P1STREET("IS","lec","qhxend")
dnexhq
^P1STREET("IS","lec","qibleo")
oelbiq
^P1STREET("IS","lec","qibliz")
zilbiq
^P1STREET("IS","lec","qiito")
otiiq
^P1STREET("IS","lec","qizepiz")
zipeziq
^P1STREET("IS","lec","qlepiwi yne`l")
l`eny iwipelq
^P1STREET("IS","lec","qlnd ylnd")
dnly dnlq
^P1STREET("IS","lec","qn' `ged")
deg` 'nq
^P1STREET("IS","lec","qn' xeaio")
oiaex 'nq
^P1STREET("IS","lec","qn' ylnd dnlj")
jlnd dnly 'nq
^P1STREET("IS","lec","qtxo n`ix")
xi`n oxtq
^P1STREET("IS","lec","reli dbxcem")
mecxbd iler
^P1STREET("IS","lec","rli kezxz")
zxzek ilr
^P1STREET("IS","lec","rnpe`l")
l`epnr
^P1STREET("IS","lec","ru dgiim")
miigd ur
^P1STREET("IS","lec","rwia` qrx")
xrq `aiwr
^P1STREET("IS","lec","rxad")
daxr
^P1STREET("IS","lec","rxebez")
zebexr
^P1STREET("IS","lec","tebd")
dbet
^P1STREET("IS","lec","tiplq")
qlpit
^P1STREET("IS","lec","tipqwx")
xwqpit
^P1STREET("IS","lec","tipyhiio nyd")
dyn oiihypit
^P1STREET("IS","lec","tiweq")
qewit
^P1STREET("IS","lec","tlcno `dxeo")
oexd` onclt
^P1STREET("IS","lec","tlenpiw irwa")
awri wipnelt
^P1STREET("IS","lec","tpwq cec")
cec qwpt
^P1STREET("IS","lec","txce `'")
'` ecxt
^P1STREET("IS","lec","v`leo")
oel`v
^P1STREET("IS","lec","vellz cwx")
xwc zllev
^P1STREET("IS","lec","vng cec")
cec gnv
^P1STREET("IS","lec","vng vcw")
wcv gnv
^P1STREET("IS","lec","vnxez")
zexnv
^P1STREET("IS","lec","wceyi nfxiu")
uixfn iyecw
^P1STREET("IS","lec","wdilz chxeih")
hiexhc zlidw
^P1STREET("IS","lec","wdilz pie-iexw")
wxei-eip zlidw
^P1STREET("IS","lec","wleifpx ieqs")
sqei xpfielw
^P1STREET("IS","lec","wpi qes")
seq ipw
^P1STREET("IS","lec","wtlo `lirfx")
xfril` oltw
^P1STREET("IS","lec","xai `lirfx ao dexwpeq")
qepwxed oa xfril` iax
^P1STREET("IS","lec","xai rwia`")
`aiwr iax
^P1STREET("IS","lec","xbaim")
miabx
^P1STREET("IS","lec","xeaio x`eao")
oae`x oiaex
^P1STREET("IS","lec","xefpalem ca `lhx")
xhl` ac melapfex
^P1STREET("IS","lec","xewg iyx`l")
l`xyi gwex
^P1STREET("IS","lec","xezm")
mzex
^P1STREET("IS","lec","xfi`l cec")
cec l`ifx
^P1STREET("IS","lec","xg nb`")
`bn gx
^P1STREET("IS","lec","xg yx")
xy gx
^P1STREET("IS","lec","xg' 1")
1 'gx
^P1STREET("IS","lec","xg' k""e")
e"k 'gx
^P1STREET("IS","lec","xg' lb""`")
`"bl 'gx
^P1STREET("IS","lec","xg' n""f")
f"n 'gx
^P1STREET("IS","lec","xg' n""g")
g"n 'gx
^P1STREET("IS","lec","xg' n""p")
p"n 'gx
^P1STREET("IS","lec","xg' n""q")
q"n 'gx
^P1STREET("IS","lec","xg' p""e")
e"p 'gx
^P1STREET("IS","lec","xg' p""f")
f"p 'gx
^P1STREET("IS","lec","xg' p""g")
g"p 'gx
^P1STREET("IS","lec","xg' p""h")
h"p 'gx
^P1STREET("IS","lec","xg' pc""`")
`"cp 'gx
^P1STREET("IS","lec","xg' q""`")
`"q 'gx
^P1STREET("IS","lec","xg' q""a")
a"q 'gx
^P1STREET("IS","lec","xg' q""e")
e"q 'gx
^P1STREET("IS","lec","xg' q""f")
f"q 'gx
^P1STREET("IS","lec","xg' q""g")
g"q 'gx
^P1STREET("IS","lec","xg' q""h")
h"q 'gx
^P1STREET("IS","lec","xg' t""`")
`"t 'gx
^P1STREET("IS","lec","xg' t""a")
a"t 'gx
^P1STREET("IS","lec","xg' t""b")
b"t 'gx
^P1STREET("IS","lec","xg' t""c")
c"t 'gx
^P1STREET("IS","lec","xg' v""`")
`"v 'gx
^P1STREET("IS","lec","xg' v""a")
a"v 'gx
^P1STREET("IS","lec","xg' v""b")
b"v 'gx
^P1STREET("IS","lec","xg' x""`")
`"x 'gx
^P1STREET("IS","lec","xg' y'")
'y 'gx
^P1STREET("IS","lec","xg' z""b")
b"z 'gx
^P1STREET("IS","lec","xg' z""c")
c"z 'gx
^P1STREET("IS","lec","xg' z""d")
d"z 'gx
^P1STREET("IS","lec","xg' z""e")
e"z 'gx
^P1STREET("IS","lec","xg' z""g")
g"z 'gx
^P1STREET("IS","lec","xgl dnyexxz")
zxxeynd lgx
^P1STREET("IS","lec","xna""m")
m"anx
^P1STREET("IS","lec","yaiq")
qiay
^P1STREET("IS","lec","yc' dnlj cec")
cec jlnd 'cy
^P1STREET("IS","lec","yc' dviepez")
zepeivd 'cy
^P1STREET("IS","lec","yc' txino")
onixt 'cy
^P1STREET("IS","lec","yc' vd""l")
l"dv 'cy
^P1STREET("IS","lec","yew rixepi")
ipexir wey
^P1STREET("IS","lec","yexu ieqs")
sqei uxey
^P1STREET("IS","lec","yexu pzo")
ozp uxey
^P1STREET("IS","lec","yeyo")
oyey
^P1STREET("IS","lec","yfis")
sify
^P1STREET("IS","lec","yhiipaxb")
bxapiihy
^P1STREET("IS","lec","yihd")
dhiy
^P1STREET("IS","lec","ylem rlikm")
mkilr mely
^P1STREET("IS","lec","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","lec","yngepi `qs")
sq` ipegny
^P1STREET("IS","lec","ynreo ax ieg`i")
i`gei xa oerny
^P1STREET("IS","lec","ypix")
xipy
^P1STREET("IS","lec","ytxipvw ieqs")
sqei wvpixty
^P1STREET("IS","lec","ywc")
cwy
^P1STREET("IS","lec","ywnd")
dnwy
^P1STREET("IS","lec","z`pd")
dp`z
^P1STREET("IS","lec","zez")
zez
^P1STREET("IS","lec","zlnim")
minlz
^P1STREET("IS","lec","zlzo")
ozlz
^P1STREET("IS","lec","znx")
xnz
^P1STREET("IS","lec","ztef")
fetz
^P1STREET("IS","lec","zteg")
getz
^P1STREET("IS","lefiz")
zifel
^P1STREET("IS","legni dbih`ez")
ze`hibd ingel
^P1STREET("IS","lino")
onil
^P1STREET("IS","lino","dfiz")
zifd
^P1STREET("IS","lino","qeaa lino")
onil aaeq
^P1STREET("IS","lkiy")
yikl
^P1STREET("IS","ltic")
citl
^P1STREET("IS","ltic","`xfim")
mifx`
^P1STREET("IS","ltic","d`expim")
mipxe`d
^P1STREET("IS","ltic","d`lepim")
mipel`d
^P1STREET("IS","ltic","dbelo")
olebd
^P1STREET("IS","ltic","dblil")
lilbd
^P1STREET("IS","ltic","dcwl")
lwcd
^P1STREET("IS","ltic","dfiz")
zifd
^P1STREET("IS","ltic","dxi ixeylim")
milyexi ixd
^P1STREET("IS","ltic","dywnd")
dnwyd
^P1STREET("IS","ltic","im dnlg")
glnd mi
^P1STREET("IS","ltic","im kpxz")
zxpk mi
^P1STREET("IS","n`ex necirim")
miricen xe`n
^P1STREET("IS","n`ix ytid")
dity xi`n
^P1STREET("IS","n`wexd")
dxew`n
^P1STREET("IS","nae` aizx")
xzia `ean
^P1STREET("IS","naerim")
mirean
^P1STREET("IS","naerim","axwo")
owxa
^P1STREET("IS","naerim","dpxwiq")
qiwxpd
^P1STREET("IS","naerim","xxces")
secxx
^P1STREET("IS","nawirim")
miriwan
^P1STREET("IS","nayxz ixeylim")
milyexi zxyan
^P1STREET("IS","nayxz ixeylim","ail""e")
e"lia
^P1STREET("IS","nayxz ixeylim","dcxex")
xexcd
^P1STREET("IS","nayxz ixeylim","dgevaim")
miavegd
^P1STREET("IS","nayxz ixeylim","ngva")
avgn
^P1STREET("IS","nayxz vieo")
oeiv zxyan
^P1STREET("IS","nayxz vieo","`bh")
hb`
^P1STREET("IS","nayxz vieo","`etix")
xite`
^P1STREET("IS","nayxz vieo","`etl")
lte`
^P1STREET("IS","nayxz vieo","`expim")
mipxe`
^P1STREET("IS","nayxz vieo","`glnd")
dnlg`
^P1STREET("IS","nayxz vieo","`xal")
lax`
^P1STREET("IS","nayxz vieo","`xfim")
mifx`
^P1STREET("IS","nayxz vieo","ail""e")
e"lia
^P1STREET("IS","nayxz vieo","axey")
yexa
^P1STREET("IS","nayxz vieo","axwz x`eao")
oae`x zwxa
^P1STREET("IS","nayxz vieo","blaer")
realb
^P1STREET("IS","nayxz vieo","cxex")
xexc
^P1STREET("IS","nayxz vieo","d`ecm")
mce`d
^P1STREET("IS","nayxz vieo","d`exo")
oxe`d
^P1STREET("IS","nayxz vieo","d`giez")
zeig`d
^P1STREET("IS","nayxz vieo","d`ilpez")
zepli`d
^P1STREET("IS","nayxz vieo","d`ld")
dl`d
^P1STREET("IS","nayxz vieo","d`txqw")
wqxt`d
^P1STREET("IS","nayxz vieo","daeqzpim")
mipzqead
^P1STREET("IS","nayxz vieo","daeym")
myead
^P1STREET("IS","nayxz vieo","dbto")
otbd
^P1STREET("IS","nayxz vieo","dcq")
qcd
^P1STREET("IS","nayxz vieo","dfiz")
zifd
^P1STREET("IS","nayxz vieo","dgevaim")
miavegd
^P1STREET("IS","nayxz vieo","dgxea")
aexgd
^P1STREET("IS","nayxz vieo","divixd")
dxivid
^P1STREET("IS","nayxz vieo","dixwo")
owxid
^P1STREET("IS","nayxz vieo","dkxkem")
mekxkd
^P1STREET("IS","nayxz vieo","dnex")
xend
^P1STREET("IS","nayxz vieo","dnylh")
hlynd
^P1STREET("IS","nayxz vieo","dpexiz")
zixepd
^P1STREET("IS","nayxz vieo","dqcp""`")
`"pcqd
^P1STREET("IS","nayxz vieo","dqcp`")
`pcqd
^P1STREET("IS","nayxz vieo","dqpepiz")
zipepqd
^P1STREET("IS","nayxz vieo","dtln""g")
g"nltd
^P1STREET("IS","nayxz vieo","dx kpro")
orpk xd
^P1STREET("IS","nayxz vieo","dx`l")
l`xd
^P1STREET("IS","nayxz vieo","dx`yepim")
mipey`xd
^P1STREET("IS","nayxz vieo","dxa ivgw piqim")
miqip wgvi axd
^P1STREET("IS","nayxz vieo","dygxex")
xexgyd
^P1STREET("IS","nayxz vieo","dylem")
melyd
^P1STREET("IS","nayxz vieo","dywnd")
dnwyd
^P1STREET("IS","nayxz vieo","dz`pd")
dp`zd
^P1STREET("IS","nayxz vieo","exc")
cxe
^P1STREET("IS","nayxz vieo","fiz xrpo")
oprx zif
^P1STREET("IS","nayxz vieo","fnix")
xinf
^P1STREET("IS","nayxz vieo","gavlz")
zlvag
^P1STREET("IS","nayxz vieo","gva")
avg
^P1STREET("IS","nayxz vieo","gxneo")
oenxg
^P1STREET("IS","nayxz vieo","hetf")
fteh
^P1STREET("IS","nayxz vieo","idecd dlei")
ield dcedi
^P1STREET("IS","nayxz vieo","ieqs giim")
miig sqei
^P1STREET("IS","nayxz vieo","iqnio")
oinqi
^P1STREET("IS","nayxz vieo","iytd")
dtyi
^P1STREET("IS","nayxz vieo","klpiz")
ziplk
^P1STREET("IS","nayxz vieo","kxnim")
minxk
^P1STREET("IS","nayxz vieo","kxnl")
lnxk
^P1STREET("IS","nayxz vieo","lilj")
jlil
^P1STREET("IS","nayxz vieo","lym")
myl
^P1STREET("IS","nayxz vieo","nae` aqnz")
znqa `ean
^P1STREET("IS","nayxz vieo","nae` ceacao")
oacaec `ean
^P1STREET("IS","nayxz vieo","nae` d`bef")
feb`d `ean
^P1STREET("IS","nayxz vieo","nae` hllim")
millh `ean
^P1STREET("IS","nayxz vieo","nae` idlem")
meldi `ean
^P1STREET("IS","nayxz vieo","nae` irxd")
dxri `ean
^P1STREET("IS","nayxz vieo","nae` laepd")
dpeal `ean
^P1STREET("IS","nayxz vieo","nae` prnd")
dnrp `ean
^P1STREET("IS","nayxz vieo","nae` qtix")
xitq `ean
^P1STREET("IS","nayxz vieo","nae` yfis")
sify `ean
^P1STREET("IS","nayxz vieo","nae` zcdx")
xdcz `ean
^P1STREET("IS","nayxz vieo","navr pgyeo")
oeygp rvan
^P1STREET("IS","nayxz vieo","navr wcy")
ycw rvan
^P1STREET("IS","nayxz vieo","nev` dwhpd")
dphwd `ven
^P1STREET("IS","nayxz vieo","nixeo")
oexin
^P1STREET("IS","nayxz vieo","nqilz vieo")
oeiv zliqn
^P1STREET("IS","nayxz vieo","nrld dwqhl")
lhqwd dlrn
^P1STREET("IS","nayxz vieo","nvtd daixd")
dxiad dtvn
^P1STREET("IS","nayxz vieo","pdx txz")
zxt xdp
^P1STREET("IS","nayxz vieo","pes dxim")
mixd sep
^P1STREET("IS","nayxz vieo","pgyeo")
oeygp
^P1STREET("IS","nayxz vieo","pvg iyx`l")
l`xyi gvp
^P1STREET("IS","nayxz vieo","pxwiq")
qiwxp
^P1STREET("IS","nayxz vieo","pzia dtexvim")
mivxetd aizp
^P1STREET("IS","nayxz vieo","qnhz dcekitz")
ztikecd zhnq
^P1STREET("IS","nayxz vieo","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","nayxz vieo","rio gnc")
cng oir
^P1STREET("IS","nayxz vieo","rpax")
xapr
^P1STREET("IS","nayxz vieo","rtxepi")
ipextr
^P1STREET("IS","nayxz vieo","rwxaim")
miaxwr
^P1STREET("IS","nayxz vieo","rxad")
daxr
^P1STREET("IS","nayxz vieo","thcd")
dcht
^P1STREET("IS","nayxz vieo","txi nbcim")
micbn ixt
^P1STREET("IS","nayxz vieo","txz")
zxt
^P1STREET("IS","nayxz vieo","vax")
xav
^P1STREET("IS","nayxz vieo","wxo diqec")
ceqid oxw
^P1STREET("IS","nayxz vieo","xna""m")
m"anx
^P1STREET("IS","nayxz vieo","xwtz")
ztwx
^P1STREET("IS","nayxz vieo","yae")
eay
^P1STREET("IS","nayxz vieo","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","nayxz vieo","yai vieo")
oeiv iay
^P1STREET("IS","nayxz vieo","yar d`giez")
zeig`d ray
^P1STREET("IS","nayxz vieo","yc' geyo")
oyeg 'cy
^P1STREET("IS","nayxz vieo","yci gnc")
cng icy
^P1STREET("IS","nayxz vieo","yedm")
mdey
^P1STREET("IS","nayxz vieo","yeypd")
dpyey
^P1STREET("IS","nayxz vieo","ynreo qeeiqd")
dqieeq oerny
^P1STREET("IS","nayxz vieo","yxi vieo")
oeiv ixy
^P1STREET("IS","nayxz vieo","yyz dinim")
minid zyy
^P1STREET("IS","nayxz vieo","zaex")
xeaz
^P1STREET("IS","nb'`x")
x`'bn
^P1STREET("IS","nb'`x","x`q `l gaid")
diag l` q`x
^P1STREET("IS","nb'`x","xg' 101")
101 'gx
^P1STREET("IS","nb'`x","xg' 106")
106 'gx
^P1STREET("IS","nb'`x","xg' 22")
22 'gx
^P1STREET("IS","nb'`x","xg' 23")
23 'gx
^P1STREET("IS","nb'`x","xg' 24")
24 'gx
^P1STREET("IS","nb'`x","xg' 25")
25 'gx
^P1STREET("IS","nb'`x","xg' 26")
26 'gx
^P1STREET("IS","nb'`x","xg' 260")
260 'gx
^P1STREET("IS","nb'`x","xg' 481")
481 'gx
^P1STREET("IS","nb'`x","xg' 7")
7 'gx
^P1STREET("IS","nb'`x","xg' 9")
9 'gx
^P1STREET("IS","nb'c `l-kxem")
mexk-l` c'bn
^P1STREET("IS","nbcim")
micbn
^P1STREET("IS","nbcim","ges dkxnl")
lnxkd seg
^P1STREET("IS","nbcim","nyba")
abyn
^P1STREET("IS","nbcl")
lcbn
^P1STREET("IS","nbcl","dkxkex")
xekxkd
^P1STREET("IS","nbcl","dv`leo")
oel`vd
^P1STREET("IS","nbcl","dvarepi")
iperavd
^P1STREET("IS","nbcl","dxineo")
oenixd
^P1STREET("IS","nbcl","dyifs")
sfiyd
^P1STREET("IS","nbcl","ped pes")
sep dep
^P1STREET("IS","nbcl","pes kpxz")
zxpk sep
^P1STREET("IS","nbcl drnw")
wnrd lcbn
^P1STREET("IS","nbcl drnw","%yc%")
%cy%
^P1STREET("IS","nbcl drnw","`expim")
mipxe`
^P1STREET("IS","nbcl drnw","`ixiq")
qixi`
^P1STREET("IS","nbcl drnw","`lepim")
mipel`
^P1STREET("IS","nbcl drnw","`li kdo")
odk il`
^P1STREET("IS","nbcl drnw","`xfim")
mifx`
^P1STREET("IS","nbcl drnw","abc rex")
xer cba
^P1STREET("IS","nbcl drnw","aeqwild")
dliwqea
^P1STREET("IS","nbcl drnw","ayo")
oya
^P1STREET("IS","nbcl drnw","blaer")
realb
^P1STREET("IS","nbcl drnw","blrc")
crlb
^P1STREET("IS","nbcl drnw","caxz")
zxac
^P1STREET("IS","nbcl drnw","ceacao")
oacaec
^P1STREET("IS","nbcl drnw","ctpd")
dptc
^P1STREET("IS","nbcl drnw","cxj drnw")
wnrd jxc
^P1STREET("IS","nbcl drnw","d`aia")
aia`d
^P1STREET("IS","nbcl drnw","d`ivhcieo")
oeichvi`d
^P1STREET("IS","nbcl drnw","d`ld")
dl`d
^P1STREET("IS","nbcl drnw","d`xib")
bix`d
^P1STREET("IS","nbcl drnw","daxeyim")
miyexad
^P1STREET("IS","nbcl drnw","dayo")
oyad
^P1STREET("IS","nbcl drnw","dbi`")
`ibd
^P1STREET("IS","nbcl drnw","dbto")
otbd
^P1STREET("IS","nbcl drnw","dexc")
cxed
^P1STREET("IS","nbcl drnw","dfiz")
zifd
^P1STREET("IS","nbcl drnw","dgexy")
yxegd
^P1STREET("IS","nbcl drnw","dgfiz")
zifgd
^P1STREET("IS","nbcl drnw","dgxea")
aexgd
^P1STREET("IS","nbcl drnw","dgxeyz")
zyexgd
^P1STREET("IS","nbcl drnw","dgynl")
lnygd
^P1STREET("IS","nbcl drnw","dleeio")
oieeld
^P1STREET("IS","nbcl drnw","dndpcq")
qcpdnd
^P1STREET("IS","nbcl drnw","dngwx")
xwgnd
^P1STREET("IS","nbcl drnw","dnl`kd")
dk`lnd
^P1STREET("IS","nbcl drnw","dnzkz")
zkznd
^P1STREET("IS","nbcl drnw","dpba")
abpd
^P1STREET("IS","nbcl drnw","dpcia")
aicpd
^P1STREET("IS","nbcl drnw","dqizeepiz")
zipeeziqd
^P1STREET("IS","nbcl drnw","drlid")
dilrd
^P1STREET("IS","nbcl drnw","drnl")
lnrd
^P1STREET("IS","nbcl drnw","drvn`ez")
ze`nvrd
^P1STREET("IS","nbcl drnw","drxad")
daxrd
^P1STREET("IS","nbcl drnw","dvitexo")
oxetivd
^P1STREET("IS","nbcl drnw","dx`yepim")
mipey`xd
^P1STREET("IS","nbcl drnw","dxineo")
oenixd
^P1STREET("IS","nbcl drnw","dyepniz")
zinpeyd
^P1STREET("IS","nbcl drnw","dyihim")
mihiyd
^P1STREET("IS","nbcl drnw","dyxeo")
oexyd
^P1STREET("IS","nbcl drnw","dzaex")
xeazd
^P1STREET("IS","nbcl drnw","dznx")
xnzd
^P1STREET("IS","nbcl drnw","dzryid")
diyrzd
^P1STREET("IS","nbcl drnw","dzwyexz")
zxeywzd
^P1STREET("IS","nbcl drnw","faeleo")
oeleaf
^P1STREET("IS","nbcl drnw","gavlz")
zlvag
^P1STREET("IS","nbcl drnw","ghiaz belpi")
ipleb zaihg
^P1STREET("IS","nbcl drnw","gil d`eix")
xie`d lig
^P1STREET("IS","nbcl drnw","ginx")
xnig
^P1STREET("IS","nbcl drnw","gxviz")
zivxg
^P1STREET("IS","nbcl drnw","iectz")
ztcei
^P1STREET("IS","nbcl drnw","iqnio")
oinqi
^P1STREET("IS","nbcl drnw","irxd")
dxri
^P1STREET("IS","nbcl drnw","itd pes")
sep dti
^P1STREET("IS","nbcl drnw","iwipheo")
oehpiwi
^P1STREET("IS","nbcl drnw","iyx`l ytix`")
`xity l`xyi
^P1STREET("IS","nbcl drnw","kkx axwe lifx")
xfil ewxa xkk
^P1STREET("IS","nbcl drnw","kkx ginx")
xnig xkk
^P1STREET("IS","nbcl drnw","kkx ivgw xaio")
oiax wgvi xkk
^P1STREET("IS","nbcl drnw","kkx xehxi")
ixhex xkk
^P1STREET("IS","nbcl drnw","klil dgexy")
yxegd lilk
^P1STREET("IS","nbcl drnw","klpiz")
ziplk
^P1STREET("IS","nbcl drnw","kxnl")
lnxk
^P1STREET("IS","nbcl drnw","n`exivie lei")
iel eivixe`n
^P1STREET("IS","nbcl drnw","nbpiz")
zipbn
^P1STREET("IS","nbcl drnw","nixeo")
oexin
^P1STREET("IS","nbcl drnw","nvtd")
dtvn
^P1STREET("IS","nbcl drnw","nyrel cxex")
xexc leryn
^P1STREET("IS","nbcl drnw","nyrel dcwlim")
milwcd leryn
^P1STREET("IS","nbcl drnw","nyrel ddcxim")
mixcdd leryn
^P1STREET("IS","nbcl drnw","nyrel dirlim")
milrid leryn
^P1STREET("IS","nbcl drnw","nyrel dkxnim")
minxkd leryn
^P1STREET("IS","nbcl drnw","nyrel dlilj")
jlild leryn
^P1STREET("IS","nbcl drnw","nyrel fnix")
xinf leryn
^P1STREET("IS","nbcl drnw","nyrel kpxiz")
zixpk leryn
^P1STREET("IS","nbcl drnw","nyrel pgli`li")
il`ilgp leryn
^P1STREET("IS","nbcl drnw","nyrel retxim")
mixter leryn
^P1STREET("IS","nbcl drnw","nyrel rtxepi")
ipextr leryn
^P1STREET("IS","nbcl drnw","nyrel varepi")
iperav leryn
^P1STREET("IS","nbcl drnw","pes drnw")
wnrd sep
^P1STREET("IS","nbcl drnw","petx")
xtep
^P1STREET("IS","nbcl drnw","pexiz")
zixep
^P1STREET("IS","nbcl drnw","pgl vai")
iav lgp
^P1STREET("IS","nbcl drnw","pivpim")
mipvip
^P1STREET("IS","nbcl drnw","pxwiq")
qiwxp
^P1STREET("IS","nbcl drnw","pyi`im")
mi`iyp
^P1STREET("IS","nbcl drnw","qaieo")
oeiaq
^P1STREET("IS","nbcl drnw","qgla")
algq
^P1STREET("IS","nbcl drnw","qhxend")
dnexhq
^P1STREET("IS","nbcl drnw","qibliz")
zilbiq
^P1STREET("IS","nbcl drnw","qn' dxe`""d")
d"`exd 'nq
^P1STREET("IS","nbcl drnw","qnekd")
dkenq
^P1STREET("IS","nbcl drnw","rvneo")
oenvr
^P1STREET("IS","nbcl drnw","tpipz drnw")
wnrd zpipt
^P1STREET("IS","nbcl drnw","trnepiz")
zipenrt
^P1STREET("IS","nbcl drnw","vax")
xav
^P1STREET("IS","nbcl drnw","vitexi")
ixetiv
^P1STREET("IS","nbcl drnw","wcy")
ycw
^P1STREET("IS","nbcl drnw","wivpiz")
zipviw
^P1STREET("IS","nbcl drnw","wiyeo")
oeyiw
^P1STREET("IS","nbcl drnw","wxo diqec")
ceqid oxw
^P1STREET("IS","nbcl drnw","xg' 5")
5 'gx
^P1STREET("IS","nbcl drnw","xnz baxi`l")
l`ixab znx
^P1STREET("IS","nbcl drnw","xnz ifxr`l")
l`rxfi znx
^P1STREET("IS","nbcl drnw","xwtz")
ztwx
^P1STREET("IS","nbcl drnw","yail dpxwiq")
qiwxpd liay
^P1STREET("IS","nbcl drnw","yc' dncr")
rcnd 'cy
^P1STREET("IS","nbcl drnw","yc' y`el rnex")
xenr le`y 'cy
^P1STREET("IS","nbcl drnw","yedm")
mdey
^P1STREET("IS","nbcl drnw","yenxeo")
oexney
^P1STREET("IS","nbcl drnw","yepniz")
zinpey
^P1STREET("IS","nbcl drnw","yeypz drnwim")
miwnrd zpyey
^P1STREET("IS","nbcl drnw","yfxiz")
zixfy
^P1STREET("IS","nbcl drnw","ylem rlikm")
mkilr mely
^P1STREET("IS","nbcl drnw","ywc")
cwy
^P1STREET("IS","nbcl drnw","ywnd")
dnwy
^P1STREET("IS","nbcl drnw","yyz dinim")
minid zyy
^P1STREET("IS","nbcl drnw","zcdx")
xdcz
^P1STREET("IS","nbcl drnw","zinexim")
mixeniz
^P1STREET("IS","nbcl drnw","zy""b")
b"yz
^P1STREET("IS","nbice")
ecibn
^P1STREET("IS","nbl")
lbn
^P1STREET("IS","nbo")
obn
^P1STREET("IS","nbyinim")
miniybn
^P1STREET("IS","nbyinim","axey")
yexa
^P1STREET("IS","nbyinim","cec paeo")
oeap cec
^P1STREET("IS","nbyinim","d`exo")
oxe`d
^P1STREET("IS","nbyinim","dcwl")
lwcd
^P1STREET("IS","nbyinim","drxad")
daxrd
^P1STREET("IS","nbyinim","dxces")
secxd
^P1STREET("IS","nbyinim","dznx")
xnzd
^P1STREET("IS","nbyinim","klpiz")
ziplk
^P1STREET("IS","nbyinim","qnhz qiito")
otiiq zhnq
^P1STREET("IS","nbyinim","qnhz xezm")
mzex zhnq
^P1STREET("IS","necirio")
oiricen
^P1STREET("IS","necirio","`api geyo")
oyeg ipa`
^P1STREET("IS","necirio","`api pfx")
xfp ipa`
^P1STREET("IS","necirio","`bq")
qb`
^P1STREET("IS","necirio","`cnepiz")
zipenc`
^P1STREET("IS","necirio","`ecm")
mce`
^P1STREET("IS","necirio","`ex dgiim")
miigd xe`
^P1STREET("IS","necirio","`fex dnl`kd")
dk`lnd xef`
^P1STREET("IS","necirio","`ifcxkz")
zkxcfi`
^P1STREET("IS","necirio","`lide dpai`")
`iapd edil`
^P1STREET("IS","necirio","`liyr dpai`")
`iapd ryil`
^P1STREET("IS","necirio","`lnebo")
obenl`
^P1STREET("IS","necirio","`qzx dnlkd")
dklnd xzq`
^P1STREET("IS","necirio","`tiwi nim")
min iwit`
^P1STREET("IS","necirio","`ygx")
xgy`
^P1STREET("IS","necirio","`yx")
xy`
^P1STREET("IS","necirio","`zxeb")
bexz`
^P1STREET("IS","necirio","acelg")
gleca
^P1STREET("IS","necirio","apinio")
oinipa
^P1STREET("IS","necirio","bipez cezo")
ozec zepib
^P1STREET("IS","necirio","bipz `bef")
feb` zpib
^P1STREET("IS","necirio","bipz `ileo")
oeli` zpib
^P1STREET("IS","necirio","bipz cezo")
ozec zpib
^P1STREET("IS","necirio","bipz dgeld")
dlegd zpib
^P1STREET("IS","necirio","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","necirio","caexpiz")
zipxeac
^P1STREET("IS","necirio","cec `lrfx")
xfrl` cec
^P1STREET("IS","necirio","cela")
alec
^P1STREET("IS","necirio","cm dnkaim")
miaknd mc
^P1STREET("IS","necirio","co")
oc
^P1STREET("IS","necirio","ctpd")
dptc
^P1STREET("IS","necirio","cxj pes dxim")
mixd sep jxc
^P1STREET("IS","necirio","dcec`im")
mi`cecd
^P1STREET("IS","necirio","dkxnim")
minxkd
^P1STREET("IS","necirio","dpai`im")
mi`iapd
^P1STREET("IS","necirio","dpivpim")
mipvipd
^P1STREET("IS","necirio","dycxd dnxkfiz")
zifkxnd dxcyd
^P1STREET("IS","necirio","dyelniz")
zinleyd
^P1STREET("IS","necirio","dzlzo")
ozlzd
^P1STREET("IS","necirio","fkxid dpai`")
`iapd dixkf
^P1STREET("IS","necirio","gavlz dyxeo")
oexyd zlvag
^P1STREET("IS","necirio","gbeei dqlr")
rlqd ieebg
^P1STREET("IS","necirio","gbi dpai`")
`iapd ibg
^P1STREET("IS","necirio","geh dypi")
ipyd heg
^P1STREET("IS","necirio","ghiad yar")
ray daihg
^P1STREET("IS","necirio","ghiaz `lkqpcxepi")
ipexcpqkl` zaihg
^P1STREET("IS","necirio","ghiaz barzi")
izrab zaihg
^P1STREET("IS","necirio","ghiaz belpi")
ipleb zaihg
^P1STREET("IS","necirio","ghiaz dpg""l")
l"gpd zaihg
^P1STREET("IS","necirio","ghiaz dvpgpim")
mipgpvd zaihg
^P1STREET("IS","necirio","ghiaz dx`l")
l`xd zaihg
^P1STREET("IS","necirio","ghiaz itzg")
gzti zaihg
^P1STREET("IS","necirio","giim ax la")
al xa miig
^P1STREET("IS","necirio","giim lqwea")
aewql miig
^P1STREET("IS","necirio","gippiz")
zippig
^P1STREET("IS","necirio","glnepiz")
zipenlg
^P1STREET("IS","necirio","gtu giim")
miig utg
^P1STREET("IS","necirio","gxneo")
oenxg
^P1STREET("IS","necirio","gxviz")
zivxg
^P1STREET("IS","necirio","gzm qetx")
xteq mzg
^P1STREET("IS","necirio","ib`l icio")
oici l`bi
^P1STREET("IS","necirio","idecd")
dcedi
^P1STREET("IS","necirio","idlem")
meldi
^P1STREET("IS","necirio","ie`l dpai`")
`iapd l`ei
^P1STREET("IS","necirio","iepd dpai`")
`iapd dpei
^P1STREET("IS","necirio","ieqs")
sqei
^P1STREET("IS","necirio","igfw`l dpai`")
`iapd l`wfgi
^P1STREET("IS","necirio","irl dbiaexd")
dxeaibd lri
^P1STREET("IS","necirio","irwa cexi")
ixec awri
^P1STREET("IS","necirio","ixgim")
migxi
^P1STREET("IS","necirio","ixnide dpai`")
`iapd edinxi
^P1STREET("IS","necirio","iyride dpai`")
`iapd ediryi
^P1STREET("IS","necirio","iytd")
dtyi
^P1STREET("IS","necirio","iyykx")
xkyyi
^P1STREET("IS","necirio","kgliz ddxim")
mixdd zilgk
^P1STREET("IS","necirio","kikx ghiaz dpba")
abpd zaihg xkik
^P1STREET("IS","necirio","kikx ghiaz dx`l")
l`xd zaihg xkik
^P1STREET("IS","necirio","kikx nl`ki dpai`")
`iapd ik`ln xkik
^P1STREET("IS","necirio","kikx rneq dpai`")
`iapd qenr xkik
^P1STREET("IS","necirio","klil dgexy")
yxegd lilk
^P1STREET("IS","necirio","kqlie")
eilqk
^P1STREET("IS","necirio","kxkem")
mekxk
^P1STREET("IS","necirio","kzm tf")
ft mzk
^P1STREET("IS","necirio","laepd")
dpeal
^P1STREET("IS","necirio","lei")
iel
^P1STREET("IS","necirio","ler d`xi")
ix`d rel
^P1STREET("IS","necirio","lineo")
oenil
^P1STREET("IS","necirio","lym")
myl
^P1STREET("IS","necirio","navr cpi")
ipc rvan
^P1STREET("IS","necirio","navr cwl")
lwc rvan
^P1STREET("IS","necirio","navr gexa")
axeg rvan
^P1STREET("IS","necirio","navr gixm")
mxig rvan
^P1STREET("IS","necirio","navr ie`a")
a`ei rvan
^P1STREET("IS","necirio","navr iepzo")
ozpei rvan
^P1STREET("IS","necirio","navr leh")
hel rvan
^P1STREET("IS","necirio","navr pgyeo")
oeygp rvan
^P1STREET("IS","necirio","navr reacd")
dcaer rvan
^P1STREET("IS","necirio","navr wcy")
ycw rvan
^P1STREET("IS","necirio","navr wlyeo")
oeylw rvan
^P1STREET("IS","necirio","nbcl cec")
cec lcbn
^P1STREET("IS","necirio","nbcl dlapeo")
oepald lcbn
^P1STREET("IS","necirio","nbcl dnpexd")
dxepnd lcbn
^P1STREET("IS","necirio","nbcl im")
mi lcbn
^P1STREET("IS","necirio","nbcl ref")
fer lcbn
^P1STREET("IS","necirio","nehd bex")
xeb dhen
^P1STREET("IS","necirio","nikd dpai`")
`iapd dkin
^P1STREET("IS","necirio","npzex")
xezpn
^P1STREET("IS","necirio","nqilz ieqs")
sqei zliqn
^P1STREET("IS","necirio","nrld bcreo")
oercb dlrn
^P1STREET("IS","necirio","nrld cexeo")
oexec dlrn
^P1STREET("IS","necirio","nrld pnx")
xnp dlrn
^P1STREET("IS","necirio","nrld rnirf")
frinr dlrn
^P1STREET("IS","necirio","nxcki nwls")
slwn ikcxn
^P1STREET("IS","necirio","nxeed")
deexn
^P1STREET("IS","necirio","nyd ciio")
oiic dyn
^P1STREET("IS","necirio","nyj geknd")
dnkeg jyn
^P1STREET("IS","necirio","p`ez cy`")
`yc ze`p
^P1STREET("IS","necirio","pdx dixco")
ocxid xdp
^P1STREET("IS","necirio","pecr aidecd")
dcedia rcep
^P1STREET("IS","necirio","petj")
jtep
^P1STREET("IS","necirio","pgl `lrl")
lrl` lgp
^P1STREET("IS","necirio","pgl `xpeo")
oepx` lgp
^P1STREET("IS","necirio","pgl aeww")
wwea lgp
^P1STREET("IS","necirio","pgl afw")
wfa lgp
^P1STREET("IS","necirio","pgl avz")
zva lgp
^P1STREET("IS","necirio","pgl blim")
milb lgp
^P1STREET("IS","necirio","pgl brzeo")
oezrb lgp
^P1STREET("IS","necirio","pgl clid")
dilc lgp
^P1STREET("IS","necirio","pgl dayex")
xeyad lgp
^P1STREET("IS","necirio","pgl dixnej")
jenxid lgp
^P1STREET("IS","necirio","pgl dixweo")
oewxid lgp
^P1STREET("IS","necirio","pgl fedx")
xdef lgp
^P1STREET("IS","necirio","pgl gax")
xag lgp
^P1STREET("IS","necirio","pgl iap`l")
l`pai lgp
^P1STREET("IS","necirio","pgl ibex")
xebi lgp
^P1STREET("IS","necirio","pgl nixeo")
oexin lgp
^P1STREET("IS","necirio","pgl p`no")
on`p lgp
^P1STREET("IS","necirio","pgl phtim")
mithp lgp
^P1STREET("IS","necirio","pgl prno")
onrp lgp
^P1STREET("IS","necirio","pgl rieo")
oeir lgp
^P1STREET("IS","necirio","pgl rnec")
cenr lgp
^P1STREET("IS","necirio","pgl t`xo")
ox`t lgp
^P1STREET("IS","necirio","pgl vetx")
xtev lgp
^P1STREET("IS","necirio","pgl vio")
oiv lgp
^P1STREET("IS","necirio","pgl vitexi")
ixetiv lgp
^P1STREET("IS","necirio","pgl vlneo")
oenlv lgp
^P1STREET("IS","necirio","pgl whla")
alhw lgp
^P1STREET("IS","necirio","pgl wicxeo")
oexciw lgp
^P1STREET("IS","necirio","pgl yexw")
wxey lgp
^P1STREET("IS","necirio","pgl yiwnd")
dnwiy lgp
^P1STREET("IS","necirio","pgl ypix")
xipy lgp
^P1STREET("IS","necirio","pgl zaex")
xeaz lgp
^P1STREET("IS","necirio","pgl zpipim")
mipipz lgp
^P1STREET("IS","necirio","pil""i")
i"lip
^P1STREET("IS","necirio","ptzli")
ilztp
^P1STREET("IS","necirio","pu dgla")
algd up
^P1STREET("IS","necirio","pziaez nyth")
htyn zeaizp
^P1STREET("IS","necirio","qaieo")
oeiaq
^P1STREET("IS","necirio","qibleo")
oelbiq
^P1STREET("IS","necirio","qieeo")
oeeiq
^P1STREET("IS","necirio","qncx")
xcnq
^P1STREET("IS","necirio","qzeepiz")
zipeezq
^P1STREET("IS","necirio","reacid dpai`")
`iapd dicaer
^P1STREET("IS","necirio","retx d`iilim")
milii`d xter
^P1STREET("IS","necirio","rnw `iileo")
oelii` wnr
^P1STREET("IS","necirio","rnw aiz y`o")
o`y zia wnr
^P1STREET("IS","necirio","rnw cezo")
ozec wnr
^P1STREET("IS","necirio","rnw d`ld")
dl`d wnr
^P1STREET("IS","necirio","rnw dgeld")
dlegd wnr
^P1STREET("IS","necirio","rnw faeleo")
oeleaf wnr
^P1STREET("IS","necirio","rnw gxec")
cexg wnr
^P1STREET("IS","necirio","rnw ifxr`l")
l`rxfi wnr
^P1STREET("IS","necirio","rvi dirx")
xrid ivr
^P1STREET("IS","necirio","rxebez daeym")
myead zebexr
^P1STREET("IS","necirio","rxrx")
xrxr
^P1STREET("IS","necirio","rz dfnix")
xinfd zr
^P1STREET("IS","necirio","tiweq")
qewit
^P1STREET("IS","necirio","tlg dxineo")
oenixd glt
^P1STREET("IS","necirio","txi nbcim")
micbn ixt
^P1STREET("IS","necirio","v`leo")
oel`v
^P1STREET("IS","necirio","vitexpiz")
zipxetiv
^P1STREET("IS","necirio","vxex dnex")
xend xexv
^P1STREET("IS","necirio","wel ceci")
icec lew
^P1STREET("IS","necirio","wel cexi")
ixec lew
^P1STREET("IS","necirio","wel dzex")
xezd lew
^P1STREET("IS","necirio","wicd")
dciw
^P1STREET("IS","necirio","witeco")
ocetiw
^P1STREET("IS","necirio","x`eao")
oae`x
^P1STREET("IS","necirio","yae")
eay
^P1STREET("IS","necirio","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","necirio","yc' dgynep`im")
mi`penygd 'cy
^P1STREET("IS","necirio","yc' ivgw xaio")
oiax wgvi 'cy
^P1STREET("IS","necirio","ycd gnc")
cng dcy
^P1STREET("IS","necirio","yenxi dgenez")
zenegd ixney
^P1STREET("IS","necirio","yeyo vgex")
xegv oyey
^P1STREET("IS","necirio","yeypz drnwim")
miwnrd zpyey
^P1STREET("IS","necirio","yix dyixim")
mixiyd xiy
^P1STREET("IS","necirio","yne`l dpai`")
`iapd l`eny
^P1STREET("IS","necirio","ynreo")
oerny
^P1STREET("IS","necirio","ypi")
ipy
^P1STREET("IS","necirio","zklz")
zlkz
^P1STREET("IS","necirio","zteg")
getz
^P1STREET("IS","necirio","zxyiy")
yiyxz
^P1STREET("IS","necirio","zyxi")
ixyz
^P1STREET("IS","necirio riliz")
zilir oiricen
^P1STREET("IS","necirio riliz","`ai rfxi")
ixfr ia`
^P1STREET("IS","necirio riliz","`api pfx")
xfp ipa`
^P1STREET("IS","necirio riliz","`ex dgiim")
miigd xe`
^P1STREET("IS","necirio riliz","dxiha""`")
`"ahixd
^P1STREET("IS","necirio riliz","gtu giim")
miig utg
^P1STREET("IS","necirio riliz","gzm qetx")
xteq mzg
^P1STREET("IS","necirio riliz","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","necirio riliz","nqilz ieqs")
sqei zliqn
^P1STREET("IS","necirio riliz","nxeni ycd")
dcy inexn
^P1STREET("IS","necirio riliz","ny' xai hxteo")
oetxh iax 'yn
^P1STREET("IS","necirio riliz","nyj geknd")
dnkeg jyn
^P1STREET("IS","necirio riliz","pecr aidecd")
dcedia rcep
^P1STREET("IS","necirio riliz","pziaez dnyth")
htynd zeaizp
^P1STREET("IS","necirio riliz","xa yne`l")
l`eny ax
^P1STREET("IS","necirio riliz","xai rwia`")
`aiwr iax
^P1STREET("IS","necirio riliz","xai ynreo ax ieg`i")
i`gei xa oerny iax
^P1STREET("IS","necirio riliz","yc' igfw`l")
l`wfgi 'cy
^P1STREET("IS","necirio riliz","yci gnc")
cng icy
^P1STREET("IS","nekiim b'pio")
oip'b miiken
^P1STREET("IS","nelcz")
zclen
^P1STREET("IS","nev` riliz")
zilir `ven
^P1STREET("IS","nev` riliz","d`ld")
dl`d
^P1STREET("IS","nev` riliz","d`lepim")
mipel`d
^P1STREET("IS","nev` riliz","d`xfim")
mifx`d
^P1STREET("IS","nev` riliz","daxey")
yexad
^P1STREET("IS","nev` riliz","dfiz")
zifd
^P1STREET("IS","nev` riliz","dnzpglim adx")
xda milgpznd
^P1STREET("IS","nev` riliz","dx`yepim")
mipey`xd
^P1STREET("IS","nev` riliz","dxineo")
oenixd
^P1STREET("IS","nev` riliz","dywc")
cwyd
^P1STREET("IS","nev` riliz","dzteg")
getzd
^P1STREET("IS","nev` riliz","nae` dbto")
otbd `ean
^P1STREET("IS","nev` riliz","nae` dlilj")
jlild `ean
^P1STREET("IS","nev` riliz","nrld d`exo")
oxe`d dlrn
^P1STREET("IS","nev` riliz","nrld d`xf")
fx`d dlrn
^P1STREET("IS","nev` riliz","nwls")
slwn
^P1STREET("IS","nev` zgziz")
zizgz `ven
^P1STREET("IS","nev` zgziz","dnzpglim adx")
xda milgpznd
^P1STREET("IS","nev` zgziz","nwls `xid")
dix` slwn
^P1STREET("IS","nev` zgziz","yhiipaxb nik`l")
l`kin bxapiihy
^P1STREET("IS","nexyz")
zyxen
^P1STREET("IS","nexyz","`xi`l")
l`ix`
^P1STREET("IS","nexyz","dyileg")
geliyd
^P1STREET("IS","nfex")
xefn
^P1STREET("IS","nfex","dcwl")
lwcd
^P1STREET("IS","nfex","dieba")
abeid
^P1STREET("IS","nfex","dklpiz")
ziplkd
^P1STREET("IS","nfex","dniiqcim")
micqiind
^P1STREET("IS","nfex","dtxcq")
qcxtd
^P1STREET("IS","nfex","dygx")
xgyd
^P1STREET("IS","nfex","xwtz")
ztwx
^P1STREET("IS","nfkxz azid")
diza zxkfn
^P1STREET("IS","nfkxz azid","`axdm ivgw blno")
onlb wgvi mdxa`
^P1STREET("IS","nfkxz azid","`exo")
oxe`
^P1STREET("IS","nfkxz azid","`ld")
dl`
^P1STREET("IS","nfkxz azid","`ptd")
dtp`
^P1STREET("IS","nfkxz azid","`xf")
fx`
^P1STREET("IS","nfkxz azid","`xwio `lirfx")
xfril` oiwx`
^P1STREET("IS","nfkxz azid","`ykel")
leky`
^P1STREET("IS","nfkxz azid","ao bexieo")
oeixeb oa
^P1STREET("IS","nfkxz azid","axey")
yexa
^P1STREET("IS","nfkxz azid","barzi")
izrab
^P1STREET("IS","nfkxz azid","ca ynix")
xiny ac
^P1STREET("IS","nfkxz azid","cela")
alec
^P1STREET("IS","nfkxz azid","cxj npgm abio")
oiba mgpn jxc
^P1STREET("IS","nfkxz azid","d`yl")
ly`d
^P1STREET("IS","nfkxz azid","dbexo")
oxebd
^P1STREET("IS","nfkxz azid","dbto")
otbd
^P1STREET("IS","nfkxz azid","dceacao")
oacaecd
^P1STREET("IS","nfkxz azid","dcwl")
lwcd
^P1STREET("IS","nfkxz azid","ddcxim")
mixcdd
^P1STREET("IS","nfkxz azid","dexc")
cxed
^P1STREET("IS","nfkxz azid","dfiz")
zifd
^P1STREET("IS","nfkxz azid","dgihd")
dhigd
^P1STREET("IS","nfkxz azid","dgxviz")
zivxgd
^P1STREET("IS","nfkxz azid","diqnio")
oinqid
^P1STREET("IS","nfkxz azid","dnbo")
obnd
^P1STREET("IS","nfkxz azid","dniiqcim")
micqiind
^P1STREET("IS","nfkxz azid","dpehxim")
mixhepd
^P1STREET("IS","nfkxz azid","dpyi` yf""x")
x"fy `iypd
^P1STREET("IS","nfkxz azid","dqibliz")
zilbiqd
^P1STREET("IS","nfkxz azid","drvn`ez")
ze`nvrd
^P1STREET("IS","nfkxz azid","dtln""g")
g"nltd
^P1STREET("IS","nfkxz azid","dvpgpim")
mipgpvd
^P1STREET("IS","nfkxz azid","dx`yepim")
mipey`xd
^P1STREET("IS","nfkxz azid","dxezm")
mzexd
^P1STREET("IS","nfkxz azid","dxineo")
oenixd
^P1STREET("IS","nfkxz azid","dyehxim")
mixheyd
^P1STREET("IS","nfkxz azid","dywc")
cwyd
^P1STREET("IS","nfkxz azid","dz`pd")
dp`zd
^P1STREET("IS","nfkxz azid","dznx")
xnzd
^P1STREET("IS","nfkxz azid","fnix")
xinf
^P1STREET("IS","nfkxz azid","giim nlx")
xln miig
^P1STREET("IS","nfkxz azid","gxea")
aexg
^P1STREET("IS","nfkxz azid","gxviz")
zivxg
^P1STREET("IS","nfkxz azid","ib`l `leo")
oel` l`bi
^P1STREET("IS","nfkxz azid","irwa lqweaqwi")
iwqaewql awri
^P1STREET("IS","nfkxz azid","nceo")
oecn
^P1STREET("IS","nfkxz azid","nedliax")
xailden
^P1STREET("IS","nfkxz azid","nyd leio")
oiel dyn
^P1STREET("IS","nfkxz azid","petx")
xtep
^P1STREET("IS","nfkxz azid","pzia dyiixez")
zexiiyd aizp
^P1STREET("IS","nfkxz azid","rvn`ez")
ze`nvr
^P1STREET("IS","nfkxz azid","rvn`z")
z`nvr
^P1STREET("IS","nfkxz azid","wxo diqec")
ceqid oxw
^P1STREET("IS","nfkxz azid","xecaqwi ieqs")
sqei iwqacex
^P1STREET("IS","nfkxz azid","xehyilc")
cliyhex
^P1STREET("IS","nfkxz azid","xt`l qeeiqd")
dqieeq l`tx
^P1STREET("IS","nfkxz azid","xwtz")
ztwx
^P1STREET("IS","nfkxz azid","yc' `lide")
edil` 'cy
^P1STREET("IS","nfkxz azid","ycxez `lide")
edil` zexcy
^P1STREET("IS","nfkxz azid","zxn""b")
b"nxz
^P1STREET("IS","nfxr")
rxfn
^P1STREET("IS","nfxrd")
drxfn
^P1STREET("IS","ngpiim")
miipgn
^P1STREET("IS","ngqid")
diqgn
^P1STREET("IS","nheld")
dlehn
^P1STREET("IS","nheld","`xfim")
mifx`
^P1STREET("IS","nheld","dbexo")
oxebd
^P1STREET("IS","nheld","dceacao")
oacaecd
^P1STREET("IS","nheld","dfiz")
zifd
^P1STREET("IS","nheld","dgvaim")
miavgd
^P1STREET("IS","nheld","dgxneo")
oenxgd
^P1STREET("IS","nheld","dlapeo")
oepald
^P1STREET("IS","nheld","dnrio")
oirnd
^P1STREET("IS","nheld","dpcia")
aicpd
^P1STREET("IS","nheld","dx`yepim")
mipey`xd
^P1STREET("IS","nheld","dxgad")
dagxd
^P1STREET("IS","nheld","dxwtz")
ztwxd
^P1STREET("IS","nheld","dz`pd")
dp`zd
^P1STREET("IS","nheld","dzgpd")
dpgzd
^P1STREET("IS","nheld","nvtd dgeld")
dlegd dtvn
^P1STREET("IS","nheld","nvtd ptzli")
ilztp dtvn
^P1STREET("IS","nheld","pexiz")
zixep
^P1STREET("IS","nheld","pxwiq")
qiwxp
^P1STREET("IS","nheld","rieo")
oeir
^P1STREET("IS","niqx")
xqin
^P1STREET("IS","nixeo")
oexin
^P1STREET("IS","nixeo","ax ieg`i")
i`gei xa
^P1STREET("IS","niyex `cenim")
minec` xeyin
^P1STREET("IS","niyex `cenim","rvnepd")
dpenvr
^P1STREET("IS","niyx")
xyin
^P1STREET("IS","nizleo")
oelzin
^P1STREET("IS","nizx")
xzin
^P1STREET("IS","nizx","`ixeq")
qexi`
^P1STREET("IS","nizx","a`xi")
ix`a
^P1STREET("IS","nizx","aeqnz")
znqea
^P1STREET("IS","nizx","aiz `yl")
ly` zia
^P1STREET("IS","nizx","aynz")
znya
^P1STREET("IS","nizx","bto")
otb
^P1STREET("IS","nizx","bxetiz")
zitexb
^P1STREET("IS","nizx","bxx")
xxb
^P1STREET("IS","nizx","cio")
oic
^P1STREET("IS","nizx","cxj dayex")
xeyad jxc
^P1STREET("IS","nizx","cxj dniiqcim")
micqiind jxc
^P1STREET("IS","nizx","cxj nizx")
xzin jxc
^P1STREET("IS","nizx","dkeayim")
miyaekd
^P1STREET("IS","nizx","drvn`ez")
ze`nvrd
^P1STREET("IS","nizx","dyihd")
dhiyd
^P1STREET("IS","nizx","fedx")
xdef
^P1STREET("IS","nizx","fiz")
zif
^P1STREET("IS","nizx","glevd")
dvelg
^P1STREET("IS","nizx","glnepiz")
zipenlg
^P1STREET("IS","nizx","glniy")
yinlg
^P1STREET("IS","nizx","gva")
avg
^P1STREET("IS","nizx","gvad")
davg
^P1STREET("IS","nizx","irlim")
milri
^P1STREET("IS","nizx","izix")
xizi
^P1STREET("IS","nizx","kiqetim")
miteqik
^P1STREET("IS","nizx","kxkem")
mekxk
^P1STREET("IS","nizx","nbo")
obn
^P1STREET("IS","nizx","nexb")
bxen
^P1STREET("IS","nizx","nnyiz")
ziynn
^P1STREET("IS","nizx","nvcd")
dcvn
^P1STREET("IS","nizx","nyrel dtln""g")
g"nltd leryn
^P1STREET("IS","nizx","perm")
mrep
^P1STREET("IS","nizx","pivpd")
dpvip
^P1STREET("IS","nizx","pixim")
mixip
^P1STREET("IS","nizx","racz")
zcar
^P1STREET("IS","nizx","retxim")
mixter
^P1STREET("IS","nizx","rio aeww")
wwea oir
^P1STREET("IS","nizx","rio fiw")
wif oir
^P1STREET("IS","nizx","rio nex")
xen oir
^P1STREET("IS","nizx","rio phtim")
mithp oir
^P1STREET("IS","nizx","rixiz")
zixir
^P1STREET("IS","nizx","rvieo bax")
xab oeivr
^P1STREET("IS","nizx","rvneo")
oenvr
^P1STREET("IS","nizx","rwxa")
axwr
^P1STREET("IS","nizx","t`xo")
ox`t
^P1STREET("IS","nizx","txb")
bxt
^P1STREET("IS","nizx","v`ld")
dl`v
^P1STREET("IS","nizx","v`lim")
mil`v
^P1STREET("IS","nizx","va`im")
mi`av
^P1STREET("IS","nizx","vio")
oiv
^P1STREET("IS","nizx","viwlb")
blwiv
^P1STREET("IS","nizx","vpitim")
mitipv
^P1STREET("IS","nizx","wcy axpr")
rpxa ycw
^P1STREET("IS","nizx","whexd")
dxehw
^P1STREET("IS","nizx","wp`im")
mi`pw
^P1STREET("IS","nizx","wvirez")
zerivw
^P1STREET("IS","nizx","xineo")
oenix
^P1STREET("IS","nizx","yahd")
dhay
^P1STREET("IS","nizx","yc' dylem")
melyd 'cy
^P1STREET("IS","nizx","yc' renxim")
mixner 'cy
^P1STREET("IS","nizx","yeal")
laey
^P1STREET("IS","nizx","yifs")
sfiy
^P1STREET("IS","nizx","ywc")
cwy
^P1STREET("IS","nizx","ywnd")
dnwy
^P1STREET("IS","nizx","znpr")
rpnz
^P1STREET("IS","nizx","znx")
xnz
^P1STREET("IS","nkaim-xrez")
zerx-miakn
^P1STREET("IS","nkaim-xrez","`aihl")
lhia`
^P1STREET("IS","nkaim-xrez","`api pfx")
xfp ipa`
^P1STREET("IS","nkaim-xrez","`bef")
feb`
^P1STREET("IS","nkaim-xrez","`cix")
xic`
^P1STREET("IS","nkaim-xrez","`exo")
oxe`
^P1STREET("IS","nkaim-xrez","`ld")
dl`
^P1STREET("IS","nkaim-xrez","`lneb")
benl`
^P1STREET("IS","nkaim-xrez","`npeo eznx")
xnze oepn`
^P1STREET("IS","nkaim-xrez","`ptd")
dtp`
^P1STREET("IS","nkaim-xrez","`xal")
lax`
^P1STREET("IS","nkaim-xrez","`xf")
fx`
^P1STREET("IS","nkaim-xrez","`ykel")
leky`
^P1STREET("IS","nkaim-xrez","aeqzo")
ozqea
^P1STREET("IS","nkaim-xrez","axey")
yexa
^P1STREET("IS","nkaim-xrez","axwpiz")
zipwxa
^P1STREET("IS","nkaim-xrez","axwz")
zwxa
^P1STREET("IS","nkaim-xrez","ayo")
oya
^P1STREET("IS","nkaim-xrez","barz dlaepd")
dpeald zrab
^P1STREET("IS","nkaim-xrez","bci")
icb
^P1STREET("IS","nkaim-xrez","belo")
oleb
^P1STREET("IS","nkaim-xrez","biziz")
zizib
^P1STREET("IS","nkaim-xrez","blaer")
realb
^P1STREET("IS","nkaim-xrez","blil")
lilb
^P1STREET("IS","nkaim-xrez","blrc")
crlb
^P1STREET("IS","nkaim-xrez","bxetiz")
zitexb
^P1STREET("IS","nkaim-xrez","ceacao")
oacaec
^P1STREET("IS","nkaim-xrez","cela")
alec
^P1STREET("IS","nkaim-xrez","cwl")
lwc
^P1STREET("IS","nkaim-xrez","cxex")
xexc
^P1STREET("IS","nkaim-xrez","cxj dniiqcim")
micqiind jxc
^P1STREET("IS","nkaim-xrez","cxj dx`yepim")
mipey`xd jxc
^P1STREET("IS","nkaim-xrez","cxj ghiaz itzg")
gzti zaihg jxc
^P1STREET("IS","nkaim-xrez","cxj pes dxim")
mixd sep jxc
^P1STREET("IS","nkaim-xrez","d`ixeqim")
miqexi`d
^P1STREET("IS","nkaim-xrez","dbto")
otbd
^P1STREET("IS","nkaim-xrez","dcexiz")
zixecd
^P1STREET("IS","nkaim-xrez","dcq")
qcd
^P1STREET("IS","nkaim-xrez","dcxim")
mixcd
^P1STREET("IS","nkaim-xrez","dgva")
avgd
^P1STREET("IS","nkaim-xrez","dv`ld")
dl`vd
^P1STREET("IS","nkaim-xrez","dx `nix")
xin` xd
^P1STREET("IS","nkaim-xrez","dx `xbno")
onbx` xd
^P1STREET("IS","nkaim-xrez","dx aewx")
xwea xd
^P1STREET("IS","nkaim-xrez","dx beepim")
mipeeb xd
^P1STREET("IS","nkaim-xrez","dx clzeo")
oezlc xd
^P1STREET("IS","nkaim-xrez","dx dild")
dlid xd
^P1STREET("IS","nkaim-xrez","dx excd")
dcxe xd
^P1STREET("IS","nkaim-xrez","dx fie")
eif xd
^P1STREET("IS","nkaim-xrez","dx gfeo")
oefg xd
^P1STREET("IS","nkaim-xrez","dx hllim")
millh xd
^P1STREET("IS","nkaim-xrez","dx iectz")
ztcei xd
^P1STREET("IS","nkaim-xrez","dx kpro")
orpk xd
^P1STREET("IS","nkaim-xrez","dx ldaim")
miadl xd
^P1STREET("IS","nkaim-xrez","dx nref")
fern xd
^P1STREET("IS","nkaim-xrez","dx phetd")
dtehp xd
^P1STREET("IS","nkaim-xrez","dx qpd")
dpq xd
^P1STREET("IS","nkaim-xrez","dx rnipca")
acpinr xd
^P1STREET("IS","nkaim-xrez","dx texz")
zxet xd
^P1STREET("IS","nkaim-xrez","dx vtxix")
xixtv xd
^P1STREET("IS","nkaim-xrez","dx wcxim")
mixcw xd
^P1STREET("IS","nkaim-xrez","dx xaic")
ciax xd
^P1STREET("IS","nkaim-xrez","dx xneo")
oenx xd
^P1STREET("IS","nkaim-xrez","dx y`el")
le`y xd
^P1STREET("IS","nkaim-xrez","dx ygx")
xgy xd
^P1STREET("IS","nkaim-xrez","dx zexro")
orxez xd
^P1STREET("IS","nkaim-xrez","dx znpr")
rpnz xd
^P1STREET("IS","nkaim-xrez","dxces")
secxd
^P1STREET("IS","nkaim-xrez","dxkqim")
miqkxd
^P1STREET("IS","nkaim-xrez","exc")
cxe
^P1STREET("IS","nkaim-xrez","exciz")
zicxe
^P1STREET("IS","nkaim-xrez","fiz")
zif
^P1STREET("IS","nkaim-xrez","fnix")
xinf
^P1STREET("IS","nkaim-xrez","gavlz")
zlvag
^P1STREET("IS","nkaim-xrez","gegiz")
zigeg
^P1STREET("IS","nkaim-xrez","gxea")
aexg
^P1STREET("IS","nkaim-xrez","gxneo")
oenxg
^P1STREET("IS","nkaim-xrez","halo")
olah
^P1STREET("IS","nkaim-xrez","haw")
wah
^P1STREET("IS","nkaim-xrez","hetf")
fteh
^P1STREET("IS","nkaim-xrez","iealim")
milaei
^P1STREET("IS","nkaim-xrez","iqrex")
xerqi
^P1STREET("IS","nkaim-xrez","irxd")
dxri
^P1STREET("IS","nkaim-xrez","itd pes")
sep dti
^P1STREET("IS","nkaim-xrez","iwipheo")
oehpiwi
^P1STREET("IS","nkaim-xrez","kkx necirio")
oiricen xkk
^P1STREET("IS","nkaim-xrez","kkx xaio")
oiax xkk
^P1STREET("IS","nkaim-xrez","klpiz")
ziplk
^P1STREET("IS","nkaim-xrez","kpxiz")
zixpk
^P1STREET("IS","nkaim-xrez","kxnl")
lnxk
^P1STREET("IS","nkaim-xrez","lai`")
`ial
^P1STREET("IS","nkaim-xrez","leheq")
qehel
^P1STREET("IS","nkaim-xrez","lilj")
jlil
^P1STREET("IS","nkaim-xrez","nae` xrez")
zerx `ean
^P1STREET("IS","nkaim-xrez","nixeo")
oexin
^P1STREET("IS","nkaim-xrez","nizx")
xzin
^P1STREET("IS","nkaim-xrez","nrld dnex")
xend dlrn
^P1STREET("IS","nkaim-xrez","nvtd xrez")
zerx dtvn
^P1STREET("IS","nkaim-xrez","nxbpiz")
zipbxn
^P1STREET("IS","nkaim-xrez","nxem")
mexn
^P1STREET("IS","nkaim-xrez","nxeniz")
zinexn
^P1STREET("IS","nkaim-xrez","pes wcenim")
minecw sep
^P1STREET("IS","nkaim-xrez","petx")
xtep
^P1STREET("IS","nkaim-xrez","pexiz")
zixep
^P1STREET("IS","nkaim-xrez","pgl `aia")
aia` lgp
^P1STREET("IS","nkaim-xrez","pgl axw")
wxa lgp
^P1STREET("IS","nkaim-xrez","pgl bxetiz")
zitexb lgp
^P1STREET("IS","nkaim-xrez","pgl co")
oc lgp
^P1STREET("IS","nkaim-xrez","pgl dnriipez")
zepiirnd lgp
^P1STREET("IS","nkaim-xrez","pgl feizo")
ozief lgp
^P1STREET("IS","nkaim-xrez","pgl gxez")
zexg lgp
^P1STREET("IS","nkaim-xrez","pgl hs")
sh lgp
^P1STREET("IS","nkaim-xrez","pgl irlim")
milri lgp
^P1STREET("IS","nkaim-xrez","pgl kiqetim")
miteqik lgp
^P1STREET("IS","nkaim-xrez","pgl lkiy")
yikl lgp
^P1STREET("IS","nkaim-xrez","pgl nyeyim")
miyeyn lgp
^P1STREET("IS","nkaim-xrez","pgl phes")
sehp lgp
^P1STREET("IS","nkaim-xrez","pgl qrx")
xrq lgp
^P1STREET("IS","nkaim-xrez","pgl ref")
fer lgp
^P1STREET("IS","nkaim-xrez","pgl rxebez")
zebexr lgp
^P1STREET("IS","nkaim-xrez","pgl telb")
blet lgp
^P1STREET("IS","nkaim-xrez","pgl v`lim")
mil`v lgp
^P1STREET("IS","nkaim-xrez","pgl wiyeo")
oeyiw lgp
^P1STREET("IS","nkaim-xrez","pivo")
ovip
^P1STREET("IS","nkaim-xrez","pwx")
xwp
^P1STREET("IS","nkaim-xrez","pxwiq")
qiwxp
^P1STREET("IS","nkaim-xrez","qaiepim")
mipeiaq
^P1STREET("IS","nkaim-xrez","qgla")
algq
^P1STREET("IS","nkaim-xrez","qito")
otiq
^P1STREET("IS","nkaim-xrez","qpepiz")
zipepq
^P1STREET("IS","nkaim-xrez","qtix")
xitq
^P1STREET("IS","nkaim-xrez","rbex")
xebr
^P1STREET("IS","nkaim-xrez","rvneo")
oenvr
^P1STREET("IS","nkaim-xrez","rxad")
daxr
^P1STREET("IS","nkaim-xrez","rxai pgl")
lgp iaxr
^P1STREET("IS","nkaim-xrez","trnepiz")
zipenrt
^P1STREET("IS","nkaim-xrez","tyey")
yeyt
^P1STREET("IS","nkaim-xrez","varepi")
iperav
^P1STREET("IS","nkaim-xrez","wexl")
lxew
^P1STREET("IS","nkaim-xrez","wiqeq")
qeqiw
^P1STREET("IS","nkaim-xrez","wxo")
oxw
^P1STREET("IS","nkaim-xrez","wyz")
zyw
^P1STREET("IS","nkaim-xrez","xezm")
mzex
^P1STREET("IS","nkaim-xrez","xineo")
oenix
^P1STREET("IS","nkaim-xrez","xwtz")
ztwx
^P1STREET("IS","nkaim-xrez","ybi`")
`iby
^P1STREET("IS","nkaim-xrez","yc' `expim")
mipxe` 'cy
^P1STREET("IS","nkaim-xrez","yc' dnkaim")
miaknd 'cy
^P1STREET("IS","nkaim-xrez","yc' drenxim")
mixnerd 'cy
^P1STREET("IS","nkaim-xrez","yc' dtxgim")
migxtd 'cy
^P1STREET("IS","nkaim-xrez","yci gnc")
cng icy
^P1STREET("IS","nkaim-xrez","yedm")
mdey
^P1STREET("IS","nkaim-xrez","yifs")
sfiy
^P1STREET("IS","nkaim-xrez","ywc")
cwy
^P1STREET("IS","nkaim-xrez","ywnd")
dnwy
^P1STREET("IS","nkaim-xrez","z`pd")
dp`z
^P1STREET("IS","nkaim-xrez","zaex")
xeaz
^P1STREET("IS","nkaim-xrez","zenx")
xnez
^P1STREET("IS","nknexz")
zxenkn
^P1STREET("IS","nknexz","celtio")
oitlec
^P1STREET("IS","nknexz","cxj dges")
segd jxc
^P1STREET("IS","nknexz","cxj dim")
mid jxc
^P1STREET("IS","nknexz","d`lneb")
benl`d
^P1STREET("IS","nknexz","dntzg")
gztnd
^P1STREET("IS","nknexz","drebo")
oberd
^P1STREET("IS","nknexz","dtxcq")
qcxtd
^P1STREET("IS","nknexz","dygs")
sgyd
^P1STREET("IS","nknexz","keka dim")
mid akek
^P1STREET("IS","nknexz","nrld d`ylim")
mily`d dlrn
^P1STREET("IS","nknexz","qn' dciibim")
mibiicd 'nq
^P1STREET("IS","nknexz","ylcb")
bcly
^P1STREET("IS","nl`d")
d`ln
^P1STREET("IS","nlkid")
dikln
^P1STREET("IS","npez")
zepn
^P1STREET("IS","npez","dcela")
alecd
^P1STREET("IS","npgnid")
dingpn
^P1STREET("IS","npgnid","dapim")
mipad
^P1STREET("IS","npgnid","dbto")
otbd
^P1STREET("IS","npgnid","dcwl")
lwcd
^P1STREET("IS","npgnid","ddcxim")
mixcdd
^P1STREET("IS","npgnid","dgwl`i")
i`lwgd
^P1STREET("IS","npgnid","dixco")
ocxid
^P1STREET("IS","npgnid","dkpxiz")
zixpkd
^P1STREET("IS","npgnid","dniiqcim")
micqiind
^P1STREET("IS","npgnid","dxineo")
oenixd
^P1STREET("IS","npgnid","dxwtz")
ztwxd
^P1STREET("IS","npgnid","dz`pd")
dp`zd
^P1STREET("IS","npgnid","kpxz")
zxpk
^P1STREET("IS","npgnid","nyrel dcxex")
xexcd leryn
^P1STREET("IS","npgnid","nyrel dklpiz")
ziplkd leryn
^P1STREET("IS","npgnid","wxo diqec")
ceqid oxw
^P1STREET("IS","npxd")
dxpn
^P1STREET("IS","nqcd")
dcqn
^P1STREET("IS","nqgd")
dgqn
^P1STREET("IS","nqilez")
zeliqn
^P1STREET("IS","nqilz vieo")
oeiv zliqn
^P1STREET("IS","nqlel")
lelqn
^P1STREET("IS","nqlid")
dilqn
^P1STREET("IS","nqnid")
dinqn
^P1STREET("IS","nqnid","ywnim")
minwy
^P1STREET("IS","nraxez")
zexarn
^P1STREET("IS","nrblim")
milbrn
^P1STREET("IS","nrblim","dpxwiq")
qiwxpd
^P1STREET("IS","nrbo")
obrn
^P1STREET("IS","nrbo nik`l")
l`kin obrn
^P1STREET("IS","nref giim")
miig fern
^P1STREET("IS","nrepd")
dpern
^P1STREET("IS","nrili`")
`ilirn
^P1STREET("IS","nrio axej")
jexa oirn
^P1STREET("IS","nrio vai")
iav oirn
^P1STREET("IS","nrld `cenim")
minec` dlrn
^P1STREET("IS","nrld `cenim","`api dgeyo")
oyegd ipa`
^P1STREET("IS","nrld `cenim","`bo dqdx")
xdqd ob`
^P1STREET("IS","nrld `cenim","`eqiywio")
oiwyiqe`
^P1STREET("IS","nrld `cenim","`etixd")
dxite`
^P1STREET("IS","nrld `cenim","`iai dpgl")
lgpd iai`
^P1STREET("IS","nrld `cenim","`izm")
mzi`
^P1STREET("IS","nrld `cenim","ax `ilo")
oli` xa
^P1STREET("IS","nrld `cenim","az pcia")
aicp za
^P1STREET("IS","nrld `cenim","barz dniiqcim")
micqiind zrab
^P1STREET("IS","nrld `cenim","cxj abi`")
`iba jxc
^P1STREET("IS","nrld `cenim","cxj ixige")
egixi jxc
^P1STREET("IS","nrld `cenim","cxj wcm")
mcw jxc
^P1STREET("IS","nrld `cenim","d`ao")
oa`d
^P1STREET("IS","nrld `cenim","d`ebcd")
dcbe`d
^P1STREET("IS","nrld `cenim","d`exo")
oxe`d
^P1STREET("IS","nrld `cenim","d`ld")
dl`d
^P1STREET("IS","nrld `cenim","d`yl")
ly`d
^P1STREET("IS","nrld `cenim","dbaim")
miabd
^P1STREET("IS","nrld `cenim","dbaiy")
yiabd
^P1STREET("IS","nrld `cenim","dbilbl")
lblibd
^P1STREET("IS","nrld `cenim","dbix")
xibd
^P1STREET("IS","nrld `cenim","dbiziz")
zizibd
^P1STREET("IS","nrld `cenim","dbxpih")
hipxbd
^P1STREET("IS","nrld `cenim","dcwl")
lwcd
^P1STREET("IS","nrld `cenim","dexwpid")
dipwxed
^P1STREET("IS","nrld `cenim","dgexo")
oxegd
^P1STREET("IS","nrld `cenim","dglil")
lilgd
^P1STREET("IS","nrld `cenim","dglniy")
yinlgd
^P1STREET("IS","nrld `cenim","dgvevxd")
dxvevgd
^P1STREET("IS","nrld `cenim","dgxqiz")
ziqxgd
^P1STREET("IS","nrld `cenim","dixic")
cixid
^P1STREET("IS","nrld `cenim","dkipex")
xepikd
^P1STREET("IS","nrld `cenim","dnvcim")
micvnd
^P1STREET("IS","nrld `cenim","dnvew")
wevnd
^P1STREET("IS","nrld `cenim","dnxeed")
deexnd
^P1STREET("IS","nrld `cenim","dpal")
lapd
^P1STREET("IS","nrld `cenim","dpglim")
milgpd
^P1STREET("IS","nrld `cenim","dpiwxd")
dxwipd
^P1STREET("IS","nrld `cenim","dreba")
aberd
^P1STREET("IS","nrld `cenim","drefxx")
xxferd
^P1STREET("IS","nrld `cenim","drixiz")
zixird
^P1STREET("IS","nrld `cenim","drxad")
daxrd
^P1STREET("IS","nrld `cenim","dryex")
xeyrd
^P1STREET("IS","nrld `cenim","dtxb")
bxtd
^P1STREET("IS","nrld `cenim","dvitgd")
dgtivd
^P1STREET("IS","nrld `cenim","dvlvl")
lvlvd
^P1STREET("IS","nrld `cenim","dvtvtd")
dtvtvd
^P1STREET("IS","nrld `cenim","dwpd")
dpwd
^P1STREET("IS","nrld `cenim","dwxo")
oxwd
^P1STREET("IS","nrld `cenim","dx bcex")
xecb xd
^P1STREET("IS","nrld `cenim","dx daiz")
ziad xd
^P1STREET("IS","nrld `cenim","dx nikeex")
xeekin xd
^P1STREET("IS","nrld `cenim","dx qxhad")
dahxq xd
^P1STREET("IS","nrld `cenim","dxezm")
mzexd
^P1STREET("IS","nrld `cenim","dxkq")
qkxd
^P1STREET("IS","nrld `cenim","dyepiz")
zipeyd
^P1STREET("IS","nrld `cenim","dyetx")
xteyd
^P1STREET("IS","nrld `cenim","dygm")
mgyd
^P1STREET("IS","nrld `cenim","dyihd")
dhiyd
^P1STREET("IS","nrld `cenim","dyiy")
yiyd
^P1STREET("IS","nrld `cenim","dynipiz")
zipinyd
^P1STREET("IS","nrld `cenim","dywnd")
dnwyd
^P1STREET("IS","nrld `cenim","dzes")
sezd
^P1STREET("IS","nrld `cenim","dzexo")
oxezd
^P1STREET("IS","nrld `cenim","dzlzo")
ozlzd
^P1STREET("IS","nrld `cenim","gbeei dqlr")
rlqd ieebg
^P1STREET("IS","nrld `cenim","geh dypi")
ipyd heg
^P1STREET("IS","nrld `cenim","geliz")
zileg
^P1STREET("IS","nrld `cenim","gxeaiz")
ziaexg
^P1STREET("IS","nrld `cenim","iezm")
mzei
^P1STREET("IS","nrld `cenim","iniz")
zini
^P1STREET("IS","nrld `cenim","keka dixco")
ocxid akek
^P1STREET("IS","nrld `cenim","kkx idlem")
meldi xkk
^P1STREET("IS","nrld `cenim","nae` d`fea")
aef`d `ean
^P1STREET("IS","nrld `cenim","nae` dben`")
`nebd `ean
^P1STREET("IS","nrld `cenim","nae` dexcieo")
oeicxed `ean
^P1STREET("IS","nrld `cenim","nae` dkxkem")
mekxkd `ean
^P1STREET("IS","nrld `cenim","nae` drpal")
laprd `ean
^P1STREET("IS","nrld `cenim","nae` dtrneo")
oenrtd `ean
^P1STREET("IS","nrld `cenim","nae` dyifs")
sfiyd `ean
^P1STREET("IS","nrld `cenim","nae` dyxj")
jxyd `ean
^P1STREET("IS","nrld `cenim","nae` nvlziim")
miizlvn `ean
^P1STREET("IS","nrld `cenim","nae` whxeq")
qexhw `ean
^P1STREET("IS","nrld `cenim","nae` wzxeq")
qexzw `ean
^P1STREET("IS","nrld `cenim","ncax idecd")
dcedi xacn
^P1STREET("IS","nrld `cenim","ncliwi dnye`ez")
ze`eynd iwilcn
^P1STREET("IS","nrld `cenim","nvtd pae")
eap dtvn
^P1STREET("IS","nrld `cenim","pes wcenim")
minecw sep
^P1STREET("IS","nrld `cenim","peti dqlr")
rlqd itep
^P1STREET("IS","nrld `cenim","pgl `eb")
be` lgp
^P1STREET("IS","nrld `cenim","pgl aeww")
wwea lgp
^P1STREET("IS","nrld `cenim","pgl bxeto")
otexb lgp
^P1STREET("IS","nrld `cenim","pgl cxbez")
zebxc lgp
^P1STREET("IS","nrld `cenim","pgl dxces")
secxd lgp
^P1STREET("IS","nrld `cenim","pgl exciz")
zicxe lgp
^P1STREET("IS","nrld `cenim","pgl fedx")
xdef lgp
^P1STREET("IS","nrld `cenim","pgl gax")
xag lgp
^P1STREET("IS","nrld `cenim","pgl hex")
xeh lgp
^P1STREET("IS","nrld `cenim","pgl irlim")
milri lgp
^P1STREET("IS","nrld `cenim","piqim akx")
xka miqip
^P1STREET("IS","nrld `cenim","pzia `tiwim")
miwit` aizp
^P1STREET("IS","nrld `cenim","pzia d`tec")
cet`d aizp
^P1STREET("IS","nrld `cenim","pzia dryxd")
dxyrd aizp
^P1STREET("IS","nrld `cenim","qetd")
dteq
^P1STREET("IS","nrld `cenim","qnhz `ecm")
mce` zhnq
^P1STREET("IS","nrld `cenim","qnhz axwz")
zwxa zhnq
^P1STREET("IS","nrld `cenim","qnhz dpgl")
lgpd zhnq
^P1STREET("IS","nrld `cenim","qnhz dxces")
secxd zhnq
^P1STREET("IS","nrld `cenim","qnhz lym")
myl zhnq
^P1STREET("IS","nrld `cenim","qnhz petj")
jtep zhnq
^P1STREET("IS","nrld `cenim","qnhz thcd")
dcht zhnq
^P1STREET("IS","nrld `cenim","rvnepd")
dpenvr
^P1STREET("IS","nrld `cenim","rz dfnix")
xinfd zr
^P1STREET("IS","nrld `cenim","thcd")
dcht
^P1STREET("IS","nrld `cenim","txi nbcim")
micbn ixt
^P1STREET("IS","nrld `cenim","txibo")
obixt
^P1STREET("IS","nrld `cenim","vng dycd")
dcyd gnv
^P1STREET("IS","nrld `cenim","wel dzex")
xezd lew
^P1STREET("IS","nrld `cenim","wxo diqec")
ceqid oxw
^P1STREET("IS","nrld `cenim","yc' dgaxd dklkliz")
zilklkd dxagd 'cy
^P1STREET("IS","nrld `cenim","ycez")
zecy
^P1STREET("IS","nrld `cenim","yedm")
mdey
^P1STREET("IS","nrld `cenim","zlni ieqs")
sqei inlz
^P1STREET("IS","nrld `cenim","zxyiy")
yiyxz
^P1STREET("IS","nrld `txim")
mixt` dlrn
^P1STREET("IS","nrld `txim","`ycx")
xcy`
^P1STREET("IS","nrld `txim","b`eo dixco")
ocxid oe`b
^P1STREET("IS","nrld `txim","cxj dblrc")
crlbd jxc
^P1STREET("IS","nrld `txim","cxj nye`d")
d`eyn jxc
^P1STREET("IS","nrld `txim","kkx didlem")
meldid xkk
^P1STREET("IS","nrld dgniyd")
dyingd dlrn
^P1STREET("IS","nrld laepd")
dpeal dlrn
^P1STREET("IS","nrld nkny")
ynkn dlrn
^P1STREET("IS","nrld vaid")
diav dlrn
^P1STREET("IS","nrld yenxeo")
oexney dlrn
^P1STREET("IS","nrld yenxeo","`xpeo")
oepx`
^P1STREET("IS","nrld yenxeo","co")
oc
^P1STREET("IS","nrlez-zxyig`")
`giyxz-zelrn
^P1STREET("IS","nrlez-zxyig`","`ae `lrll` `lnrxi")
ixrnl` `llrl` ea`
^P1STREET("IS","nrlez-zxyig`","`ao qip`")
`piq oa`
^P1STREET("IS","nrlez-zxyig`","`cnepiz dgexy")
yxegd zipenc`
^P1STREET("IS","nrlez-zxyig`","`expim")
mipxe`
^P1STREET("IS","nrlez-zxyig`","`ili` `ae n`ci")
ic`n ea` `ili`
^P1STREET("IS","nrlez-zxyig`","`ilpez")
zepli`
^P1STREET("IS","nrlez-zxyig`","`ixiq")
qixi`
^P1STREET("IS","nrlez-zxyig`","`l nb`dc")
cd`bn l`
^P1STREET("IS","nrlez-zxyig`","`lenez")
zenel`
^P1STREET("IS","nrlez-zxyig`","`leo")
oel`
^P1STREET("IS","nrlez-zxyig`","`lnezpai")
iapzenl`
^P1STREET("IS","nrlez-zxyig`","`qzx dnlkd")
dklnd xzq`
^P1STREET("IS","nrlez-zxyig`","`xfim")
mifx`
^P1STREET("IS","nrlez-zxyig`","`ygx")
xgy`
^P1STREET("IS","nrlez-zxyig`","`ykelez")
zeleky`
^P1STREET("IS","nrlez-zxyig`","`zxeb")
bexz`
^P1STREET("IS","nrlez-zxyig`","aelael")
lealea
^P1STREET("IS","nrlez-zxyig`","akex d`aia")
aia`d xeka
^P1STREET("IS","nrlez-zxyig`","ao bexieo")
oeixeb oa
^P1STREET("IS","nrlez-zxyig`","ao rni")
inr oa
^P1STREET("IS","nrlez-zxyig`","avix")
xiva
^P1STREET("IS","nrlez-zxyig`","beax`o")
o`xaeb
^P1STREET("IS","nrlez-zxyig`","cec `lrfx")
xfrl` cec
^P1STREET("IS","nrlez-zxyig`","ctpd")
dptc
^P1STREET("IS","nrlez-zxyig`","cxj d`les refi pxwiq")
qiwxp ifer sel`d jxc
^P1STREET("IS","nrlez-zxyig`","d`ecm")
mce`d
^P1STREET("IS","nrlez-zxyig`","d`enpim")
mipne`d
^P1STREET("IS","nrlez-zxyig`","d`ixiq")
qixi`d
^P1STREET("IS","nrlez-zxyig`","d`v""l")
l"v`d
^P1STREET("IS","nrlez-zxyig`","daxwo")
owxad
^P1STREET("IS","nrlez-zxyig`","dbard")
drabd
^P1STREET("IS","nrlez-zxyig`","dblil")
lilbd
^P1STREET("IS","nrlez-zxyig`","dbpd")
dpbd
^P1STREET("IS","nrlez-zxyig`","dcqim")
miqcd
^P1STREET("IS","nrlez-zxyig`","dcxim")
mixcd
^P1STREET("IS","nrlez-zxyig`","deeziwim")
miwizeed
^P1STREET("IS","nrlez-zxyig`","dexc")
cxed
^P1STREET("IS","nrlez-zxyig`","dexcim")
micxed
^P1STREET("IS","nrlez-zxyig`","dfiz")
zifd
^P1STREET("IS","nrlez-zxyig`","dfizim")
mizifd
^P1STREET("IS","nrlez-zxyig`","dgxeyz")
zyexgd
^P1STREET("IS","nrlez-zxyig`","dgxviz")
zivxgd
^P1STREET("IS","nrlez-zxyig`","dgynep`im")
mi`penygd
^P1STREET("IS","nrlez-zxyig`","dkpqiez")
zeiqpkd
^P1STREET("IS","nrlez-zxyig`","dnl`kd")
dk`lnd
^P1STREET("IS","nrlez-zxyig`","dnlj cec")
cec jlnd
^P1STREET("IS","nrlez-zxyig`","dnlj y`el")
le`y jlnd
^P1STREET("IS","nrlez-zxyig`","dnlj ylnd")
dnly jlnd
^P1STREET("IS","nrlez-zxyig`","dnqbx")
xbqnd
^P1STREET("IS","nrlez-zxyig`","dpai`im")
mi`iapd
^P1STREET("IS","nrlez-zxyig`","dpxwiq")
qiwxpd
^P1STREET("IS","nrlez-zxyig`","dqgla")
algqd
^P1STREET("IS","nrlez-zxyig`","dqibliez")
zeilbiqd
^P1STREET("IS","nrlez-zxyig`","dtln""g")
g"nltd
^P1STREET("IS","nrlez-zxyig`","dvarepi")
iperavd
^P1STREET("IS","nrlez-zxyig`","dvitexpim")
mipxetivd
^P1STREET("IS","nrlez-zxyig`","dxa ny`y")
y`yn axd
^P1STREET("IS","nrlez-zxyig`","dxa wew")
wew axd
^P1STREET("IS","nrlez-zxyig`","dxezm")
mzexd
^P1STREET("IS","nrlez-zxyig`","dxvl")
lvxd
^P1STREET("IS","nrlez-zxyig`","dxwtz")
ztwxd
^P1STREET("IS","nrlez-zxyig`","dyenx")
xneyd
^P1STREET("IS","nrlez-zxyig`","dyew")
weyd
^P1STREET("IS","nrlez-zxyig`","dywcim")
micwyd
^P1STREET("IS","nrlez-zxyig`","dz`pd")
dp`zd
^P1STREET("IS","nrlez-zxyig`","dzenx")
xnezd
^P1STREET("IS","nrlez-zxyig`","eivno")
onvie
^P1STREET("IS","nrlez-zxyig`","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","nrlez-zxyig`","flno yf""x")
x"fy onlf
^P1STREET("IS","nrlez-zxyig`","gavlz")
zlvag
^P1STREET("IS","nrlez-zxyig`","giim dxveb")
bevxd miig
^P1STREET("IS","nrlez-zxyig`","glnepiz")
zipenlg
^P1STREET("IS","nrlez-zxyig`","gva")
avg
^P1STREET("IS","nrlez-zxyig`","iqnio")
oinqi
^P1STREET("IS","nrlez-zxyig`","iwipheo")
oehpiwi
^P1STREET("IS","nrlez-zxyig`","ixco")
ocxi
^P1STREET("IS","nrlez-zxyig`","ixeylim")
milyexi
^P1STREET("IS","nrlez-zxyig`","kkx dktx")
xtkd xkk
^P1STREET("IS","nrlez-zxyig`","kkx zxyig`")
`giyxz xkk
^P1STREET("IS","nrlez-zxyig`","klil dgexy")
yxegd lilk
^P1STREET("IS","nrlez-zxyig`","klpiz")
ziplk
^P1STREET("IS","nrlez-zxyig`","kxkem")
mekxk
^P1STREET("IS","nrlez-zxyig`","leheq")
qehel
^P1STREET("IS","nrlez-zxyig`","lei `ykel")
leky` iel
^P1STREET("IS","nrlez-zxyig`","lg""i")
i"gl
^P1STREET("IS","nrlez-zxyig`","liapd")
dpail
^P1STREET("IS","nrlez-zxyig`","nexc dbi`")
`ibd cxen
^P1STREET("IS","nrlez-zxyig`","nexo")
oxen
^P1STREET("IS","nrlez-zxyig`","nlgnz iem dkitexim")
mixetikd mei zngln
^P1STREET("IS","nrlez-zxyig`","nrld belpi")
ipleb dlrn
^P1STREET("IS","nrlez-zxyig`","nrld dapim")
mipad dlrn
^P1STREET("IS","nrlez-zxyig`","nrld dbto")
otbd dlrn
^P1STREET("IS","nrlez-zxyig`","nrld dclid")
dilcd dlrn
^P1STREET("IS","nrlez-zxyig`","nrld ddx")
xdd dlrn
^P1STREET("IS","nrlez-zxyig`","nrld dnqbc")
cbqnd dlrn
^P1STREET("IS","nrlez-zxyig`","nrld dpxwiqim")
miqiwxpd dlrn
^P1STREET("IS","nrlez-zxyig`","nrld dtxg")
gxtd dlrn
^P1STREET("IS","nrlez-zxyig`","nrld gqeo")
oeqg dlrn
^P1STREET("IS","nrlez-zxyig`","nrld itd pes")
sep dti dlrn
^P1STREET("IS","nrlez-zxyig`","nrtilim")
militrn
^P1STREET("IS","nrlez-zxyig`","nxbpiz")
zipbxn
^P1STREET("IS","nrlez-zxyig`","nxeed")
deexn
^P1STREET("IS","nrlez-zxyig`","ny' barepiz")
ziperab 'yn
^P1STREET("IS","nrlez-zxyig`","ny' d`yl")
ly`d 'yn
^P1STREET("IS","nrlez-zxyig`","ny' daxey")
yexad 'yn
^P1STREET("IS","nrlez-zxyig`","ny' dben`")
`nebd 'yn
^P1STREET("IS","nrlez-zxyig`","ny' dqaieo")
oeiaqd 'yn
^P1STREET("IS","nrlez-zxyig`","ny' dqibliez")
zeilbiqd 'yn
^P1STREET("IS","nrlez-zxyig`","ny' dqiito")
otiiqd 'yn
^P1STREET("IS","nrlez-zxyig`","pbia ngtef")
fetgn aibp
^P1STREET("IS","nrlez-zxyig`","pexiz")
zixep
^P1STREET("IS","nrlez-zxyig`","pxwiq")
qiwxp
^P1STREET("IS","nrlez-zxyig`","qiito")
otiiq
^P1STREET("IS","nrlez-zxyig`","qtix")
xitq
^P1STREET("IS","nrlez-zxyig`","qzeepiz")
zipeezq
^P1STREET("IS","nrlez-zxyig`","rcrc")
crcr
^P1STREET("IS","nrlez-zxyig`","reli dbxcem")
mecxbd iler
^P1STREET("IS","nrlez-zxyig`","rliz dperx")
xrepd zilr
^P1STREET("IS","nrlez-zxyig`","rxad")
daxr
^P1STREET("IS","nrlez-zxyig`","rxnepim")
mipenxr
^P1STREET("IS","nrlez-zxyig`","trnepiz")
zipenrt
^P1STREET("IS","nrlez-zxyig`","twirio")
oiriwt
^P1STREET("IS","nrlez-zxyig`","vax")
xav
^P1STREET("IS","nrlez-zxyig`","wdilz idcez vxtz")
ztxv zecdi zlidw
^P1STREET("IS","nrlez-zxyig`","wexpiz")
zipxew
^P1STREET("IS","nrlez-zxyig`","whis")
sihw
^P1STREET("IS","nrlez-zxyig`","wvix")
xivw
^P1STREET("IS","nrlez-zxyig`","wxo diqec")
ceqid oxw
^P1STREET("IS","nrlez-zxyig`","wxo wiinz liyx`l")
l`xyil zniiw oxw
^P1STREET("IS","nrlez-zxyig`","xineo")
oenix
^P1STREET("IS","nrlez-zxyig`","xinepim")
mipenix
^P1STREET("IS","nrlez-zxyig`","yail `lgxixi")
ixixgl` liay
^P1STREET("IS","nrlez-zxyig`","yail `lqeqo")
oqeql` liay
^P1STREET("IS","nrlez-zxyig`","yail d`geed")
deeg`d liay
^P1STREET("IS","nrlez-zxyig`","yail d`ixiq")
qixi`d liay
^P1STREET("IS","nrlez-zxyig`","yail diqnio")
oinqid liay
^P1STREET("IS","nrlez-zxyig`","yail dncxbez")
zebxcnd liay
^P1STREET("IS","nrlez-zxyig`","yail dnqbc")
cbqnd liay
^P1STREET("IS","nrlez-zxyig`","yail dnqbcim")
micbqnd liay
^P1STREET("IS","nrlez-zxyig`","yail dnriio")
oiirnd liay
^P1STREET("IS","nrlez-zxyig`","yail xinepim")
mipenix liay
^P1STREET("IS","nrlez-zxyig`","yc' dpyi`")
`iypd 'cy
^P1STREET("IS","nrlez-zxyig`","yc' dpyi`im")
mi`iypd 'cy
^P1STREET("IS","nrlez-zxyig`","yc' n""b dnrtilim")
militrnd b"n 'cy
^P1STREET("IS","nrlez-zxyig`","ydm")
mdy
^P1STREET("IS","nrlez-zxyig`","yiaelz")
zleaiy
^P1STREET("IS","nrlez-zxyig`","yiaz vieo")
oeiv zaiy
^P1STREET("IS","nrlez-zxyig`","ylnd yxix`")
`xixy dnly
^P1STREET("IS","nrlez-zxyig`","ypix")
xipy
^P1STREET("IS","nrlez-zxyig`","zcdx")
xdcz
^P1STREET("IS","nrlez-zxyig`","zetiw `lgkim")
mikgl` witez
^P1STREET("IS","nrpiz")
ziprn
^P1STREET("IS","ntlqim")
miqltn
^P1STREET("IS","ntrli gal iapd")
dpai lag ilrtn
^P1STREET("IS","ntrli gal iapd","dbto")
otbd
^P1STREET("IS","ntrli gtx")
xtg ilrtn
^P1STREET("IS","ntrli gtx","byx dru")
urd xyb
^P1STREET("IS","ntrli gtx","dgxiy")
yixgd
^P1STREET("IS","ntrli gtx","dnfg")
gfnd
^P1STREET("IS","ntrli gtx","dnqiw")
wiqnd
^P1STREET("IS","ntrli gtx","dx`yepim")
mipey`xd
^P1STREET("IS","ntrli gtx","vai dpgl")
lgpd iav
^P1STREET("IS","ntxu gitd")
dtig uxtn
^P1STREET("IS","ntxu gitd","li`eo yhiio")
oiihy oe`il
^P1STREET("IS","nvead")
daevn
^P1STREET("IS","nvlig")
gilvn
^P1STREET("IS","nvtd")
dtvn
^P1STREET("IS","nvtd `ai""a")
a"ia` dtvn
^P1STREET("IS","nvtd `ai""a","dcq")
qcd
^P1STREET("IS","nvtd vetiz")
zitev dtvn
^P1STREET("IS","nvtd vetiz","dznx")
xnzd
^P1STREET("IS","nvtd xneo")
oenx dtvn
^P1STREET("IS","nvtd xneo","cxj `ilz")
zli` jxc
^P1STREET("IS","nvtd xneo","cxj xneo")
oenx jxc
^P1STREET("IS","nvtd xneo","dx `xceo")
oecx` xd
^P1STREET("IS","nvtd xneo","dx aewx")
xwea xd
^P1STREET("IS","nvtd xneo","dx recc")
ccer xd
^P1STREET("IS","nvtd xneo","pgl `xceo")
oecx` lgp
^P1STREET("IS","nvtd xneo","pgl beepim")
mipeeb lgp
^P1STREET("IS","nvtd xneo","pgl bxetiz")
zitexb lgp
^P1STREET("IS","nvtd xneo","pgl exciz")
zicxe lgp
^P1STREET("IS","nvtd xneo","pgl ged")
deg lgp
^P1STREET("IS","nvtd xneo","pgl geliz")
zileg lgp
^P1STREET("IS","nvtd xneo","pgl kxkem")
mekxk lgp
^P1STREET("IS","nvtd xneo","pgl niyx")
xyin lgp
^P1STREET("IS","nvtd xneo","pgl pivpd")
dpvip lgp
^P1STREET("IS","nvtd xneo","pgl qlriz")
zirlq lgp
^P1STREET("IS","nvtd xneo","pgl qxtc")
ctxq lgp
^P1STREET("IS","nvtd xneo","pgl rxad")
daxr lgp
^P1STREET("IS","nvtd xneo","pgl rxec")
cexr lgp
^P1STREET("IS","nvtd xneo","pgl vid")
div lgp
^P1STREET("IS","nvtd xneo","pgl vigex")
xegiv lgp
^P1STREET("IS","nvtd xneo","pgl vio")
oiv lgp
^P1STREET("IS","nvtd xneo","qdxepim")
mipexdq
^P1STREET("IS","nvtd xneo","rio fiw")
wif oir
^P1STREET("IS","nvtd xneo","rio nex")
xen oir
^P1STREET("IS","nvtd xneo","rio nyw")
wyn oir
^P1STREET("IS","nvtd xneo","rio racz")
zcar oir
^P1STREET("IS","nvtd xneo","rio retxim")
mixter oir
^P1STREET("IS","nvtd xneo","rio rwa")
awr oir
^P1STREET("IS","nvtd xneo","rio yaia")
aiay oir
^P1STREET("IS","nvtd xneo","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","nvx")
xvn
^P1STREET("IS","nwed iyx`l")
l`xyi dewn
^P1STREET("IS","nwiald")
dlaiwn
^P1STREET("IS","nxb'd")
d'bxn
^P1STREET("IS","nxcd")
dcxn
^P1STREET("IS","nxgaid [neya]")
(ayen) diagxn
^P1STREET("IS","nxgaid wiaeu")
ueaiw diagxn
^P1STREET("IS","nxkf ytix`")
`xity fkxn
^P1STREET("IS","nxkf ytix`","dbto")
otbd
^P1STREET("IS","nxkf ytix`","dgihd")
dhigd
^P1STREET("IS","nxkf ytix`","dyrexd")
dxeryd
^P1STREET("IS","nxkf ytix`","dz`pd")
dp`zd
^P1STREET("IS","nxkf ytix`","yarz dnipim")
mipind zray
^P1STREET("IS","ny`ai ycd")
dcy ia`yn
^P1STREET("IS","nyba")
abyn
^P1STREET("IS","nyba","iealim")
milaei
^P1STREET("IS","nyba","rvneo")
oenvr
^P1STREET("IS","nyba ca")
ac abyn
^P1STREET("IS","nyba rm")
mr abyn
^P1STREET("IS","nydc")
cdyn
^P1STREET("IS","nydc","xg' 29")
29 'gx
^P1STREET("IS","nydc","xg' 6")
6 'gx
^P1STREET("IS","nye`d")
d`eyn
^P1STREET("IS","nye`d","celv'io")
oi'vlec
^P1STREET("IS","nye`ez ivgw")
wgvi ze`eyn
^P1STREET("IS","nye`ez ivgw","d`exo")
oxe`d
^P1STREET("IS","nye`ez ivgw","dcwl")
lwcd
^P1STREET("IS","nye`ez ivgw","dexc")
cxed
^P1STREET("IS","nye`ez ivgw","dfiz")
zifd
^P1STREET("IS","nye`ez ivgw","dgxviz")
zivxgd
^P1STREET("IS","nye`ez ivgw","dpexiz")
zixepd
^P1STREET("IS","nyixtd")
dtxiyn
^P1STREET("IS","nynx `ileo")
oeli` xnyn
^P1STREET("IS","nynx cec")
cec xnyn
^P1STREET("IS","nynx dixco")
ocxid xnyn
^P1STREET("IS","nynx dpba")
abpd xnyn
^P1STREET("IS","nynx drnw")
wnrd xnyn
^P1STREET("IS","nynx dyard")
drayd xnyn
^P1STREET("IS","nynx dyard","`iapivwi cec")
cec iwvipai`
^P1STREET("IS","nynx dyard","`lide ynix")
xiny edil`
^P1STREET("IS","nynx dyard","irwa relni")
inler awri
^P1STREET("IS","nynx dyard","ivgw wexcead")
daecxew wgvi
^P1STREET("IS","nynx dyard","lcxno")
onxcl
^P1STREET("IS","nynx dyard","npgm `ahigi")
igiha` mgpn
^P1STREET("IS","nynx dyard","ww""l")
l"ww
^P1STREET("IS","nynx dyard","xefpalem wlno")
onlw melapfex
^P1STREET("IS","nynx dyard","xna""m")
m"anx
^P1STREET("IS","nynx dyxeo")
oexyd xnyn
^P1STREET("IS","nynxez")
zexnyn
^P1STREET("IS","nynxz")
zxnyn
^P1STREET("IS","nyro")
oryn
^P1STREET("IS","nzo")
ozn
^P1STREET("IS","nzo","`exo")
oxe`
^P1STREET("IS","nzo","`leo")
oel`
^P1STREET("IS","nzo","dbto")
otbd
^P1STREET("IS","nzo","dcq")
qcd
^P1STREET("IS","nzo","dcx")
xcd
^P1STREET("IS","nzo","dexc")
cxed
^P1STREET("IS","nzo","dpexiz")
zixepd
^P1STREET("IS","nzo","dpxwiq")
qiwxpd
^P1STREET("IS","nzo","dz`pd")
dp`zd
^P1STREET("IS","nzo","gavlz")
zlvag
^P1STREET("IS","nzo","gva")
avg
^P1STREET("IS","nzo","klpiz")
ziplk
^P1STREET("IS","nzo","nex")
xen
^P1STREET("IS","nzo","pes dyxeo")
oexyd sep
^P1STREET("IS","nzo","qaieo")
oeiaq
^P1STREET("IS","nzo","varepi")
iperav
^P1STREET("IS","nzo","vex")
xev
^P1STREET("IS","nzo","xwtz")
ztwx
^P1STREET("IS","nzo","yeyo")
oyey
^P1STREET("IS","nzzide")
edizzn
^P1STREET("IS","nzzide","`api pfx")
xfp ipa`
^P1STREET("IS","nzzide","`ex dgiim")
miigd xe`
^P1STREET("IS","nzzide","dxa eeqxno")
onxqee axd
^P1STREET("IS","nzzide","gtu giim")
miig utg
^P1STREET("IS","nzzide","yc' gnc")
cng 'cy
^P1STREET("IS","nzzide","ycd gnc")
cng dcy
^P1STREET("IS","p`ez nxcki")
ikcxn ze`p
^P1STREET("IS","p`rexd")
dxer`p
^P1STREET("IS","pahim")
mihap
^P1STREET("IS","pbad")
dabp
^P1STREET("IS","pbd")
dbp
^P1STREET("IS","pdexd")
dxedp
^P1STREET("IS","pdexd","nxkf pdexd")
dxedp fkxn
^P1STREET("IS","pdexd","yneliw")
wileny
^P1STREET("IS","pdll")
lldp
^P1STREET("IS","pdxid")
dixdp
^P1STREET("IS","pdxid","`""c bexceo")
oecxeb c"`
^P1STREET("IS","pdxid","`a` dll qilax")
xaliq lld `a`
^P1STREET("IS","pdxid","`aix irwa")
awri xia`
^P1STREET("IS","pdxid","`cnepiz")
zipenc`
^P1STREET("IS","pdxid","`cniz")
zinc`
^P1STREET("IS","pdxid","`gc drm")
mrd cg`
^P1STREET("IS","pdxid","`li kdo")
odk il`
^P1STREET("IS","pdxid","`pilaiu")
uialip`
^P1STREET("IS","pdxid","`txim yxix")
xixy mixt`
^P1STREET("IS","pdxid","`xlefexea")
aexefelx`
^P1STREET("IS","pdxid","`xpeo")
oepx`
^P1STREET("IS","pdxid","aexekea")
aekexea
^P1STREET("IS","pdxid","ai`liw")
wil`ia
^P1STREET("IS","pdxid","altex")
xetla
^P1STREET("IS","pdxid","ao b`eo cec")
cec oe`b oa
^P1STREET("IS","pdxid","avz")
zva
^P1STREET("IS","pdxid","aw li`e")
e`il wa
^P1STREET("IS","pdxid","ax idecd")
dcedi xa
^P1STREET("IS","pdxid","ax keka`")
`akek xa
^P1STREET("IS","pdxid","belena")
aneleb
^P1STREET("IS","pdxid","bey rvieo")
oeivr yeb
^P1STREET("IS","pdxid","bxipaeim")
mieapixb
^P1STREET("IS","pdxid","bxpiem")
meipxb
^P1STREET("IS","pdxid","cec `lrfx")
xfrl` cec
^P1STREET("IS","pdxid","cec ao bexieo")
oeixeb oa cec
^P1STREET("IS","pdxid","cxj dfizim")
mizifd jxc
^P1STREET("IS","pdxid","cxj dim")
mid jxc
^P1STREET("IS","pdxid","cxj drvn`ez")
ze`nvrd jxc
^P1STREET("IS","pdxid","cxj dyenx")
xneyd jxc
^P1STREET("IS","pdxid","cxj dyiixd")
dxiiyd jxc
^P1STREET("IS","pdxid","cxj igirm")
mrigi jxc
^P1STREET("IS","pdxid","cxj qhxend")
dnexhq jxc
^P1STREET("IS","pdxid","cxj ylnd")
dnly jxc
^P1STREET("IS","pdxid","d`exo")
oxe`d
^P1STREET("IS","pdxid","d`fcxkz")
zkxcf`d
^P1STREET("IS","pdxid","d`ixiq")
qixi`d
^P1STREET("IS","pdxid","d`ixiz")
zixi`d
^P1STREET("IS","pdxid","d`leo")
oel`d
^P1STREET("IS","pdxid","d`x""f")
f"x`d
^P1STREET("IS","pdxid","d`yl")
ly`d
^P1STREET("IS","pdxid","d`zxeb")
bexz`d
^P1STREET("IS","pdxid","daxey")
yexad
^P1STREET("IS","pdxid","db`eld")
dle`bd
^P1STREET("IS","pdxid","dbcec draxi")
ixard cecbd
^P1STREET("IS","pdxid","dbelo")
olebd
^P1STREET("IS","pdxid","dblrc")
crlbd
^P1STREET("IS","pdxid","dbpim")
mipbd
^P1STREET("IS","pdxid","dbto")
otbd
^P1STREET("IS","pdxid","dclid")
dilcd
^P1STREET("IS","pdxid","ddbpd")
dpbdd
^P1STREET("IS","pdxid","ddcq")
qcdd
^P1STREET("IS","pdxid","ddcx")
xcdd
^P1STREET("IS","pdxid","dexc")
cxed
^P1STREET("IS","pdxid","dfnix")
xinfd
^P1STREET("IS","pdxid","dgiil")
liigd
^P1STREET("IS","pdxid","dgleu")
uelgd
^P1STREET("IS","pdxid","dgnpiz")
zipngd
^P1STREET("IS","pdxid","dgva")
avgd
^P1STREET("IS","pdxid","dgynep`im")
mi`penygd
^P1STREET("IS","pdxid","dievxim")
mixveid
^P1STREET("IS","pdxid","dixco")
ocxid
^P1STREET("IS","pdxid","dixweo")
oewxid
^P1STREET("IS","pdxid","dklpiz")
ziplkd
^P1STREET("IS","pdxid","dkxm")
mxkd
^P1STREET("IS","pdxid","dkxnl")
lnxkd
^P1STREET("IS","pdxid","dlihim")
mihild
^P1STREET("IS","pdxid","dnbipim")
mipibnd
^P1STREET("IS","pdxid","dniiqcim")
micqiind
^P1STREET("IS","pdxid","dnlj cec")
cec jlnd
^P1STREET("IS","pdxid","dnlj y`el")
le`y jlnd
^P1STREET("IS","pdxid","dnrtilim")
militrnd
^P1STREET("IS","pdxid","dnxbpiz")
zipbxnd
^P1STREET("IS","pdxid","dnxeed")
deexnd
^P1STREET("IS","pdxid","dpba")
abpd
^P1STREET("IS","pdxid","dpexiz")
zixepd
^P1STREET("IS","pdxid","dpfixez")
zexifpd
^P1STREET("IS","pdxid","dpiqpiz")
zipqipd
^P1STREET("IS","pdxid","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","pdxid","dpxwiq")
qiwxpd
^P1STREET("IS","pdxid","dqaieo")
oeiaqd
^P1STREET("IS","pdxid","dqibliz")
zilbiqd
^P1STREET("IS","pdxid","dqiito")
otiiqd
^P1STREET("IS","pdxid","drlid")
dilrd
^P1STREET("IS","pdxid","drxad")
daxrd
^P1STREET("IS","pdxid","dtln""g")
g"nltd
^P1STREET("IS","pdxid","dtxb")
bxtd
^P1STREET("IS","pdxid","dvitexo")
oxetivd
^P1STREET("IS","pdxid","dvls")
slvd
^P1STREET("IS","pdxid","dwiyeo")
oeyiwd
^P1STREET("IS","pdxid","dx nixeo")
oexin xd
^P1STREET("IS","pdxid","dx zaex")
xeaz xd
^P1STREET("IS","pdxid","dxa dxveb")
bevxd axd
^P1STREET("IS","pdxid","dxa nineo")
oenin axd
^P1STREET("IS","pdxid","dxa wew")
wew axd
^P1STREET("IS","pdxid","dxces")
secxd
^P1STREET("IS","pdxid","dxezm")
mzexd
^P1STREET("IS","pdxid","dxneo")
oenxd
^P1STREET("IS","pdxid","dxvl")
lvxd
^P1STREET("IS","pdxid","dxwtz")
ztwxd
^P1STREET("IS","pdxid","dyeypd")
dpyeyd
^P1STREET("IS","pdxid","dyiwnd")
dnwiyd
^P1STREET("IS","pdxid","dyxeo")
oexyd
^P1STREET("IS","pdxid","dz`pd")
dp`zd
^P1STREET("IS","pdxid","dzaex")
xeazd
^P1STREET("IS","pdxid","dzenx")
xnezd
^P1STREET("IS","pdxid","dznx")
xnzd
^P1STREET("IS","pdxid","dzryid")
diyrzd
^P1STREET("IS","pdxid","eeltqeo")
oeqtlee
^P1STREET("IS","pdxid","eiiqaexb giim")
miig bxeaqiie
^P1STREET("IS","pdxid","eivno")
onvie
^P1STREET("IS","pdxid","f'aehipqwi f`a")
a`f iwqpihea'f
^P1STREET("IS","pdxid","fiqe")
eqif
^P1STREET("IS","pdxid","fnpdes")
sedpnf
^P1STREET("IS","pdxid","gavlz dges")
segd zlvag
^P1STREET("IS","pdxid","gend enbcl")
lcbne dneg
^P1STREET("IS","pdxid","gpd qpy")
ypq dpg
^P1STREET("IS","pdxid","gpizd")
dzipg
^P1STREET("IS","pdxid","gxneo")
oenxg
^P1STREET("IS","pdxid","gxviz")
zivxg
^P1STREET("IS","pdxid","hxentlcex")
xecltnexh
^P1STREET("IS","pdxid","i`pey wexv'w")
w'vxew yep`i
^P1STREET("IS","pdxid","iapd")
dpai
^P1STREET("IS","pdxid","idecd dnkai")
iaknd dcedi
^P1STREET("IS","pdxid","inaex ieqs")
sqei xeani
^P1STREET("IS","pdxid","irl")
lri
^P1STREET("IS","pdxid","itd pes")
sep dti
^P1STREET("IS","pdxid","ivgw ycd")
dcy wgvi
^P1STREET("IS","pdxid","ixeylim")
milyexi
^P1STREET("IS","pdxid","iyexeo")
oexeyi
^P1STREET("IS","pdxid","kkx dcwl")
lwcd xkk
^P1STREET("IS","pdxid","kkx drixid")
dixird xkk
^P1STREET("IS","pdxid","kkx ic lapim")
mipal ci xkk
^P1STREET("IS","pdxid","kkx ylem")
mely xkk
^P1STREET("IS","pdxid","kvplqeo")
oeqlpvk
^P1STREET("IS","pdxid","l`e aw")
wa e`l
^P1STREET("IS","pdxid","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","pdxid","leheq")
qehel
^P1STREET("IS","pdxid","lehm")
mhel
^P1STREET("IS","pdxid","lei `ykel")
leky` iel
^P1STREET("IS","pdxid","lei ieqs")
sqei iel
^P1STREET("IS","pdxid","lino")
onil
^P1STREET("IS","pdxid","nexid")
dixen
^P1STREET("IS","pdxid","nqxiw")
wixqn
^P1STREET("IS","pdxid","nrld pdxid")
dixdp dlrn
^P1STREET("IS","pdxid","nvcd")
dcvn
^P1STREET("IS","pdxid","nxber")
rebxn
^P1STREET("IS","pdxid","nxim")
mixn
^P1STREET("IS","pdxid","nzzide")
edizzn
^P1STREET("IS","pdxid","p`ez `ld")
dl` ze`p
^P1STREET("IS","pdxid","ped xaio")
oiax dep
^P1STREET("IS","pdxid","petx")
xtep
^P1STREET("IS","pdxid","pexc`e")
e`cxep
^P1STREET("IS","pdxid","pgli`li")
il`ilgp
^P1STREET("IS","pdxid","pglz `yx")
xy` zlgp
^P1STREET("IS","pdxid","pgnid")
dingp
^P1STREET("IS","pdxid","pinxeax")
xaexnip
^P1STREET("IS","pdxid","px dlild")
dlild xp
^P1STREET("IS","pdxid","qeqwio flib")
bilf oiwqeq
^P1STREET("IS","pdxid","qewelea")
aeleweq
^P1STREET("IS","pdxid","qgla")
algq
^P1STREET("IS","pdxid","qixwio")
oiwxiq
^P1STREET("IS","pdxid","qn' xeo")
oex 'nq
^P1STREET("IS","pdxid","qnhz ail""e")
e"lia zhnq
^P1STREET("IS","pdxid","qnhz fiqe")
eqif zhnq
^P1STREET("IS","pdxid","qnhz qipi")
ipiq zhnq
^P1STREET("IS","pdxid","rfx`")
`xfr
^P1STREET("IS","pdxid","rio dzklz")
zlkzd oir
^P1STREET("IS","pdxid","rnw ifxr`l")
l`rxfi wnr
^P1STREET("IS","pdxid","rvneo")
oenvr
^P1STREET("IS","pdxid","rwia`")
`aiwr
^P1STREET("IS","pdxid","telc axkd")
dkxa clet
^P1STREET("IS","pdxid","texvi kl` rke")
ekr `lk ivxet
^P1STREET("IS","pdxid","tipqwx")
xwqpit
^P1STREET("IS","pdxid","tpgq laeo")
oeal qgpt
^P1STREET("IS","pdxid","txcq `ix`pi")
ip`xi` qcxt
^P1STREET("IS","pdxid","varepi")
iperav
^P1STREET("IS","pdxid","waeu bleiez")
zeielb ueaw
^P1STREET("IS","pdxid","wtlo")
oltw
^P1STREET("IS","pdxid","ww""l")
l"ww
^P1STREET("IS","pdxid","wxiz ryex")
xeyr zixw
^P1STREET("IS","pdxid","wxo diqec")
ceqid oxw
^P1STREET("IS","pdxid","x`eviw")
wive`x
^P1STREET("IS","pdxid","xa `les cec `lrfx")
xfrl` cec sel` ax
^P1STREET("IS","pdxid","xiij gaiad")
daiag jiix
^P1STREET("IS","pdxid","xiij ynreo")
oerny jiix
^P1STREET("IS","pdxid","xiiv'w")
w'viix
^P1STREET("IS","pdxid","xna""m")
m"anx
^P1STREET("IS","pdxid","xnf")
fnx
^P1STREET("IS","pdxid","y""i rbpeo")
oepbr i"y
^P1STREET("IS","pdxid","yafi ylem")
mely ifay
^P1STREET("IS","pdxid","yail caexd")
dxeac liay
^P1STREET("IS","pdxid","yail d`ld")
dl`d liay
^P1STREET("IS","pdxid","yail d`xf")
fx`d liay
^P1STREET("IS","pdxid","yail dbto")
otbd liay
^P1STREET("IS","pdxid","yail dcbpim")
mipbcd liay
^P1STREET("IS","pdxid","yail dcbpiz")
zipbcd liay
^P1STREET("IS","pdxid","yail dinid")
dinid liay
^P1STREET("IS","pdxid","yail dll")
lld liay
^P1STREET("IS","pdxid","yail dnrepd")
dpernd liay
^P1STREET("IS","pdxid","yail dqzeepiz")
zipeezqd liay
^P1STREET("IS","pdxid","yail dyihd")
dhiyd liay
^P1STREET("IS","pdxid","yail dzez")
zezd liay
^P1STREET("IS","pdxid","yail i""c lil dbyxim")
mixybd lil c"i liay
^P1STREET("IS","pdxid","yail idepzo")
ozpedi liay
^P1STREET("IS","pdxid","yail iegpo")
opgei liay
^P1STREET("IS","pdxid","yail navr iepzo")
ozpei rvan liay
^P1STREET("IS","pdxid","yail prniz")
zinrp liay
^P1STREET("IS","pdxid","yc' ao vai")
iav oa 'cy
^P1STREET("IS","pdxid","yc' dbrzeo")
oezrbd 'cy
^P1STREET("IS","pdxid","yc' dvai")
iavd 'cy
^P1STREET("IS","pdxid","yc' exd")
dxe 'cy
^P1STREET("IS","pdxid","yc' wii `axdm")
mdxa` iiw 'cy
^P1STREET("IS","pdxid","yc' yf""x")
x"fy 'cy
^P1STREET("IS","pdxid","yhiipdxc")
cxdpiihy
^P1STREET("IS","pdxid","yhiipnu nwq")
qwn unpiihy
^P1STREET("IS","pdxid","yhxo")
oxhy
^P1STREET("IS","pdxid","ylnd dnlj")
jlnd dnly
^P1STREET("IS","pdxid","ynreo")
oerny
^P1STREET("IS","pdxid","ynxide leio")
oiel edixny
^P1STREET("IS","pdxid","ytix`")
`xity
^P1STREET("IS","pdxid","ytxipvw ieqs")
sqei wvpixty
^P1STREET("IS","pdxid","ywc")
cwy
^P1STREET("IS","pdxid","zi`hxeo")
oexh`iz
^P1STREET("IS","pdxid","zl gi")
ig lz
^P1STREET("IS","ped `ex")
xe` dep
^P1STREET("IS","ped `hi""a")
a"ih` dep
^P1STREET("IS","ped `hi""a","dgxneo")
oenxgd
^P1STREET("IS","ped `hi""a","ptzli")
ilztp
^P1STREET("IS","ped `hi""a","qiixz `bef")
feb` zxiiq
^P1STREET("IS","ped `hi""a","rixiz")
zixir
^P1STREET("IS","ped `izo")
ozi` dep
^P1STREET("IS","ped cpi`l")
l`ipc dep
^P1STREET("IS","ped cpi`l","nbcl rcx")
xcr lcbn
^P1STREET("IS","ped cwlim")
milwc dep
^P1STREET("IS","ped cwlim","`wqeceq")
qeceqw`
^P1STREET("IS","ped fie")
eif dep
^P1STREET("IS","ped fie","cxj dznx")
xnzd jxc
^P1STREET("IS","ped fie","dnxbpiz")
zipbxnd
^P1STREET("IS","ped fie","dnxeed")
deexnd
^P1STREET("IS","ped fie","gva")
avg
^P1STREET("IS","ped fie","kxkem")
mekxk
^P1STREET("IS","ped fie","qaieo")
oeiaq
^P1STREET("IS","ped fie","qgla")
algq
^P1STREET("IS","ped fie","varepi")
iperav
^P1STREET("IS","ped inio")
oini dep
^P1STREET("IS","ped inio","`bef")
feb`
^P1STREET("IS","ped inio","d`exo")
oxe`d
^P1STREET("IS","ped inio","daxey")
yexad
^P1STREET("IS","ped inio","dbeyo")
oyebd
^P1STREET("IS","ped inio","dbto")
otbd
^P1STREET("IS","ped inio","dcwl")
lwcd
^P1STREET("IS","ped inio","dcx")
xcd
^P1STREET("IS","ped inio","drxad")
daxrd
^P1STREET("IS","ped inio","dtiweq")
qewitd
^P1STREET("IS","ped inio","dxineo")
oenixd
^P1STREET("IS","ped inio","dznx")
xnzd
^P1STREET("IS","ped ixw")
wxi dep
^P1STREET("IS","ped ixw","d`bef")
feb`d
^P1STREET("IS","ped ixw","daxey")
yexad
^P1STREET("IS","ped ixw","dbto")
otbd
^P1STREET("IS","ped ixw","dtxcq")
qcxtd
^P1STREET("IS","ped nepeqeo")
oeqepen dep
^P1STREET("IS","ped nepeqeo","`bef")
feb`
^P1STREET("IS","ped nepeqeo","`inax")
xani`
^P1STREET("IS","ped nepeqeo","`lneb")
benl`
^P1STREET("IS","ped nepeqeo","`txim")
mixt`
^P1STREET("IS","ped nepeqeo","`zxeb")
bexz`
^P1STREET("IS","ped nepeqeo","axwz")
zwxa
^P1STREET("IS","ped nepeqeo","dbto")
otbd
^P1STREET("IS","ped nepeqeo","dcx")
xcd
^P1STREET("IS","ped nepeqeo","dtpipim")
mipiptd
^P1STREET("IS","ped nepeqeo","dxineo")
oenixd
^P1STREET("IS","ped nepeqeo","dywc")
cwyd
^P1STREET("IS","ped nepeqeo","idlem")
meldi
^P1STREET("IS","ped nepeqeo","qtix")
xitq
^P1STREET("IS","ped nepeqeo","rpax")
xapr
^P1STREET("IS","ped nepeqeo","vpeax")
xaepv
^P1STREET("IS","ped nepeqeo","vtxix")
xixtv
^P1STREET("IS","ped nepeqeo","yedm")
mdey
^P1STREET("IS","ped nepeqeo","ypda")
adpy
^P1STREET("IS","ped nepeqeo","ywc")
cwy
^P1STREET("IS","ped nepeqeo","znx")
xnz
^P1STREET("IS","ped nepeqeo","zxyiy")
yiyxz
^P1STREET("IS","ped nik`l")
l`kin dep
^P1STREET("IS","ped nik`l","xebliz")
zilbex
^P1STREET("IS","ped reac")
caer dep
^P1STREET("IS","peed `ilo")
oli` deep
^P1STREET("IS","peed im")
mi deep
^P1STREET("IS","peed im","dpgyel")
leygpd
^P1STREET("IS","peed nahg")
ghan deep
^P1STREET("IS","peed nahg","`lenez")
zenel`
^P1STREET("IS","peed nahg","dgxiy")
yixgd
^P1STREET("IS","perm")
mrep
^P1STREET("IS","pes `iileo")
oelii` sep
^P1STREET("IS","pes `iileo","`xi`l")
l`ix`
^P1STREET("IS","pes `iileo","axwz")
zwxa
^P1STREET("IS","pes `iileo","dgeyo")
oyegd
^P1STREET("IS","pes `iileo","idlem")
meldi
^P1STREET("IS","pes `iileo","lym")
myl
^P1STREET("IS","pes `iileo","nexid")
dixen
^P1STREET("IS","pes `iileo","qtix")
xitq
^P1STREET("IS","pes `iileo","yedm")
mdey
^P1STREET("IS","petim")
mitep
^P1STREET("IS","petim","`ixiq")
qixi`
^P1STREET("IS","petim","dklpiz")
ziplkd
^P1STREET("IS","petim","varepi")
iperav
^P1STREET("IS","petiz")
zitep
^P1STREET("IS","petiz","`aihl")
lhia`
^P1STREET("IS","petiz","`izpim")
mipzi`
^P1STREET("IS","petiz","`xal")
lax`
^P1STREET("IS","petiz","belo")
oleb
^P1STREET("IS","petiz","dblaer")
realbd
^P1STREET("IS","petiz","dblil")
lilbd
^P1STREET("IS","petiz","dkxnl")
lnxkd
^P1STREET("IS","petiz","dtqbd")
dbqtd
^P1STREET("IS","petiz","nixeo")
oexin
^P1STREET("IS","petiz","rvneo")
oenvr
^P1STREET("IS","petiz","vtxixim")
mixixtv
^P1STREET("IS","petiz","xineo")
oenix
^P1STREET("IS","petiz","zaex")
xeaz
^P1STREET("IS","petj")
jtep
^P1STREET("IS","petj","`ecm")
mce`
^P1STREET("IS","petj","zxyiy")
yiyxz
^P1STREET("IS","pex ynq")
qny xep
^P1STREET("IS","pexcid")
dicxep
^P1STREET("IS","pexcid","`bef")
feb`
^P1STREET("IS","pexcid","d`exo")
oxe`d
^P1STREET("IS","pexcid","d`leo")
oel`d
^P1STREET("IS","pexcid","dbto")
otbd
^P1STREET("IS","pexcid","dfiz")
zifd
^P1STREET("IS","pexcid","dxineo")
oenixd
^P1STREET("IS","pexcid","dz`pd")
dp`zd
^P1STREET("IS","pexcid","qnhz dklpiz")
ziplkd zhnq
^P1STREET("IS","pexcid","qnhz dnxbpiz")
zipbxnd zhnq
^P1STREET("IS","pexcid","qnhz drxad")
daxrd zhnq
^P1STREET("IS","pexcid","qnhz v`leo")
oel`v zhnq
^P1STREET("IS","pgeyd")
dyegp
^P1STREET("IS","pgli`l")
l`ilgp
^P1STREET("IS","pgli`l","zxn""a")
a"nxz
^P1STREET("IS","pglim")
milgp
^P1STREET("IS","pglim","co")
oc
^P1STREET("IS","pglim","dixco")
ocxid
^P1STREET("IS","pglim","gxneo")
oenxg
^P1STREET("IS","pglim","ypix")
xipy
^P1STREET("IS","pgs")
sgp
^P1STREET("IS","pgyelim")
mileygp
^P1STREET("IS","pgyeo")
oeygp
^P1STREET("IS","pgyepim")
mipeygp
^P1STREET("IS","phrim")
mirhp
^P1STREET("IS","pio")
oip
^P1STREET("IS","piqpiz")
zipqip
^P1STREET("IS","piqpiz","dywc")
cwyd
^P1STREET("IS","piqpiz","yifs")
sfiy
^P1STREET("IS","pivo")
ovip
^P1STREET("IS","pivo","d`yl")
ly`d
^P1STREET("IS","pivo","dxineo")
oenixd
^P1STREET("IS","pivo","dyiwnd")
dnwiyd
^P1STREET("IS","pivo","nyrel dfnix")
xinfd leryn
^P1STREET("IS","pivo","nyrel dqlriz")
zirlqd leryn
^P1STREET("IS","pivo","nyrel drebo")
oberd leryn
^P1STREET("IS","pivo","nyrel dygs")
sgyd leryn
^P1STREET("IS","pivo","nyrel dywp`i")
i`pwyd leryn
^P1STREET("IS","pivo","nyrel dz`pd")
dp`zd leryn
^P1STREET("IS","pivo","nyrel dzpynz")
znypzd leryn
^P1STREET("IS","pivo","nyrel dzteg")
getzd leryn
^P1STREET("IS","pivo","nyrel keka dim")
mid akek leryn
^P1STREET("IS","pivo","nyrel pgl dixweo")
oewxid lgp leryn
^P1STREET("IS","pivo","nyrel pgl vitexi")
ixetiv lgp leryn
^P1STREET("IS","pivpi ref")
fer ipvip
^P1STREET("IS","pivpi ref","`lenez")
zenel`
^P1STREET("IS","pivpi ref","cxj dycez")
zecyd jxc
^P1STREET("IS","pivpi ref","dtxgim")
migxtd
^P1STREET("IS","pivpi ref","dyleyd")
dyelyd
^P1STREET("IS","pivpi ref","rxebez")
zebexr
^P1STREET("IS","pivpi ref","xbaim")
miabx
^P1STREET("IS","pivpi ref","yiaelim")
mileaiy
^P1STREET("IS","pivpim")
mipvip
^P1STREET("IS","pivpim [ktx perx]")
(xrep xtk) mipvip
^P1STREET("IS","pix apim")
mipa xip
^P1STREET("IS","pix blim")
milb xip
^P1STREET("IS","pix blim","dz`pd")
dp`zd
^P1STREET("IS","pix cec")
cec xip
^P1STREET("IS","pix g""o")
o"g xip
^P1STREET("IS","pix itd")
dti xip
^P1STREET("IS","pix ivgw")
wgvi xip
^P1STREET("IS","pix iyx`l")
l`xyi xip
^P1STREET("IS","pix ref")
fer xip
^P1STREET("IS","pix rm")
mr xip
^P1STREET("IS","pix rvieo")
oeivr xip
^P1STREET("IS","pix vai")
iav xip
^P1STREET("IS","pix vai","`izo")
ozi`
^P1STREET("IS","pix vai","ben`")
`neb
^P1STREET("IS","pix vai","d`yl")
ly`d
^P1STREET("IS","pix vai","dcwl")
lwcd
^P1STREET("IS","pix vai","drxad")
daxrd
^P1STREET("IS","pix vai","dxineo")
oenixd
^P1STREET("IS","pix vai","irxd")
dxri
^P1STREET("IS","pix vai","v`leo")
oel`v
^P1STREET("IS","pixim")
mixip
^P1STREET("IS","pixiz")
zixip
^P1STREET("IS","pixiz","blrc")
crlb
^P1STREET("IS","pixiz","dbelo")
olebd
^P1STREET("IS","pixiz","gxneo")
oenxg
^P1STREET("IS","pq viepd")
dpeiv qp
^P1STREET("IS","pq viepd","`dxeo aewqx")
xqwea oexd`
^P1STREET("IS","pq viepd","`eqwx yipclx")
xlcpiy xwqe`
^P1STREET("IS","pq viepd","`ipyhiio")
oiihypi`
^P1STREET("IS","pq viepd","`iznx ao `ai")
ia` oa xnzi`
^P1STREET("IS","pq viepd","`li kdo")
odk il`
^P1STREET("IS","pq viepd","`lide nixeo")
oexin edil`
^P1STREET("IS","pq viepd","`lzxno")
onxzl`
^P1STREET("IS","pq viepd","`pd txpw")
wpxt dp`
^P1STREET("IS","pq viepd","`pilaiu")
uialip`
^P1STREET("IS","pq viepd","`v""l")
l"v`
^P1STREET("IS","pq viepd","`xal")
lax`
^P1STREET("IS","pq viepd","`xbno")
onbx`
^P1STREET("IS","pq viepd","aewqx ixnide")
edinxi xqwea
^P1STREET("IS","pq viepd","aexekea")
aekexea
^P1STREET("IS","pq viepd","ai`liw")
wil`ia
^P1STREET("IS","pq viepd","ail""e")
e"lia
^P1STREET("IS","pq viepd","ao bexieo")
oeixeb oa
^P1STREET("IS","pq viepd","ao vai")
iav oa
^P1STREET("IS","pq viepd","ax keka`")
`akek xa
^P1STREET("IS","pq viepd","b`eld")
dle`b
^P1STREET("IS","pq viepd","barzi")
izrab
^P1STREET("IS","pq viepd","belcd n`ix")
xi`n dcleb
^P1STREET("IS","pq viepd","belena `lide")
edil` aneleb
^P1STREET("IS","pq viepd","beli cnyw")
wync ileb
^P1STREET("IS","pq viepd","bexceo")
oecxeb
^P1STREET("IS","pq viepd","blim")
milb
^P1STREET("IS","pq viepd","caexpiz")
zipxeac
^P1STREET("IS","pq viepd","cbpid")
dipbc
^P1STREET("IS","pq viepd","cec `lrfx")
xfrl` cec
^P1STREET("IS","pq viepd","ctpd")
dptc
^P1STREET("IS","pq viepd","cxj xaio")
oiax jxc
^P1STREET("IS","pq viepd","d`etw")
wte`d
^P1STREET("IS","pq viepd","d`ifnl")
lnfi`d
^P1STREET("IS","pq viepd","d`indez")
zedni`d
^P1STREET("IS","pq viepd","d`ixeqim")
miqexi`d
^P1STREET("IS","pq viepd","d`letim")
mitel`d
^P1STREET("IS","pq viepd","da`x")
x`ad
^P1STREET("IS","pq viepd","dapim")
mipad
^P1STREET("IS","pq viepd","dbi`")
`ibd
^P1STREET("IS","pq viepd","dblaer")
realbd
^P1STREET("IS","pq viepd","dbto")
otbd
^P1STREET("IS","pq viepd","dcwl")
lwcd
^P1STREET("IS","pq viepd","ddbpd")
dpbdd
^P1STREET("IS","pq viepd","ddcxim")
mixcdd
^P1STREET("IS","pq viepd","ddqzcxez")
zexczqdd
^P1STREET("IS","pq viepd","detno yne`l")
l`eny onted
^P1STREET("IS","pq viepd","dexc")
cxed
^P1STREET("IS","pq viepd","dfiz")
zifd
^P1STREET("IS","pq viepd","dgleu")
uelgd
^P1STREET("IS","pq viepd","dgxneo")
oenxgd
^P1STREET("IS","pq viepd","dgxy")
yxgd
^P1STREET("IS","pq viepd","dhiiqim")
miqiihd
^P1STREET("IS","pq viepd","diino yne`l")
l`eny oniid
^P1STREET("IS","pq viepd","dklpiz")
ziplkd
^P1STREET("IS","pq viepd","dkxnim")
minxkd
^P1STREET("IS","pq viepd","dlegnim ap`vim")
miv`pa mingeld
^P1STREET("IS","pq viepd","dn`d e`gc")
cg`e d`nd
^P1STREET("IS","pq viepd","dnelcz")
zclend
^P1STREET("IS","pq viepd","dnfnxd")
dxnfnd
^P1STREET("IS","pq viepd","dniiqcim")
micqiind
^P1STREET("IS","pq viepd","dnpio dx`yeo")
oey`xd oipnd
^P1STREET("IS","pq viepd","dnqbx")
xbqnd
^P1STREET("IS","pq viepd","dpxwiq")
qiwxpd
^P1STREET("IS","pq viepd","draecd")
dceard
^P1STREET("IS","pq viepd","drbex")
xebrd
^P1STREET("IS","pq viepd","drbld")
dlbrd
^P1STREET("IS","pq viepd","drebo")
oberd
^P1STREET("IS","pq viepd","drenxim")
mixnerd
^P1STREET("IS","pq viepd","dryex")
xeyrd
^P1STREET("IS","pq viepd","dthiy")
yihtd
^P1STREET("IS","pq viepd","dtxb")
bxtd
^P1STREET("IS","pq viepd","dtxhifpim")
mipfihxtd
^P1STREET("IS","pq viepd","dvpgpim")
mipgpvd
^P1STREET("IS","pq viepd","dwvix")
xivwd
^P1STREET("IS","pq viepd","dwyz")
zywd
^P1STREET("IS","pq viepd","dxces")
secxd
^P1STREET("IS","pq viepd","dxineo")
oenixd
^P1STREET("IS","pq viepd","dxvl")
lvxd
^P1STREET("IS","pq viepd","dxwtz")
ztwxd
^P1STREET("IS","pq viepd","dyenx")
xneyd
^P1STREET("IS","pq viepd","dywc")
cwyd
^P1STREET("IS","pq viepd","dywnd")
dnwyd
^P1STREET("IS","pq viepd","dyxieo")
oeixyd
^P1STREET("IS","pq viepd","dz`pd")
dp`zd
^P1STREET("IS","pq viepd","dzaex")
xeazd
^P1STREET("IS","pq viepd","dzgid")
digzd
^P1STREET("IS","pq viepd","dznx")
xnzd
^P1STREET("IS","pq viepd","eiqbl")
lbqie
^P1STREET("IS","pq viepd","eivno")
onvie
^P1STREET("IS","pq viepd","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","pq viepd","fnl feqi`")
`iqef lnf
^P1STREET("IS","pq viepd","fxeaal")
laaexf
^P1STREET("IS","pq viepd","gavlz")
zlvag
^P1STREET("IS","pq viepd","gfwide")
ediwfg
^P1STREET("IS","pq viepd","giim ax la")
al xa miig
^P1STREET("IS","pq viepd","gpd qpy")
ypq dpg
^P1STREET("IS","pq viepd","gva")
avg
^P1STREET("IS","pq viepd","hixz ylem")
mely zxih
^P1STREET("IS","pq viepd","htx")
xth
^P1STREET("IS","pq viepd","ie`y")
y`ei
^P1STREET("IS","pq viepd","iqnio")
oinqi
^P1STREET("IS","pq viepd","itd pes")
sep dti
^P1STREET("IS","pq viepd","ivgw ycd")
dcy wgvi
^P1STREET("IS","pq viepd","ivi`z `ixetd")
dtexi` z`ivi
^P1STREET("IS","pq viepd","iwipheo")
oehpiwi
^P1STREET("IS","pq viepd","ixeylim")
milyexi
^P1STREET("IS","pq viepd","kdpea f`a")
a`f aepdk
^P1STREET("IS","pq viepd","ktx `dxeo")
oexd` xtk
^P1STREET("IS","pq viepd","kvplqeo")
oeqlpvk
^P1STREET("IS","pq viepd","kxnl")
lnxk
^P1STREET("IS","pq viepd","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","pq viepd","leheq")
qehel
^P1STREET("IS","pq viepd","lg""i")
i"gl
^P1STREET("IS","pq viepd","lilj")
jlil
^P1STREET("IS","pq viepd","lpc`e cec")
cec e`cpl
^P1STREET("IS","pq viepd","lqwea")
aewql
^P1STREET("IS","pq viepd","n`ix dxno")
onxd xi`n
^P1STREET("IS","pq viepd","navr wcy")
ycw rvan
^P1STREET("IS","pq viepd","nkai")
iakn
^P1STREET("IS","pq viepd","nl`kd")
dk`ln
^P1STREET("IS","pq viepd","npex")
xepn
^P1STREET("IS","pq viepd","npgm abio")
oiba mgpn
^P1STREET("IS","pq viepd","nweed iyx`l")
l`xyi deewn
^P1STREET("IS","pq viepd","nxbelio")
oilebxn
^P1STREET("IS","pq viepd","nxbpiz")
zipbxn
^P1STREET("IS","pq viepd","nyd lei")
iel dyn
^P1STREET("IS","pq viepd","nyd qpd")
dpq dyn
^P1STREET("IS","pq viepd","pbad")
dabp
^P1STREET("IS","pq viepd","pexc`e")
e`cxep
^P1STREET("IS","pq viepd","pexiz")
zixep
^P1STREET("IS","pq viepd","pgni`q yne`l")
l`eny q`ingp
^P1STREET("IS","pq viepd","pil""i")
i"lip
^P1STREET("IS","pq viepd","qewelea")
aeleweq
^P1STREET("IS","pq viepd","qhxend")
dnexhq
^P1STREET("IS","pq viepd","qibliz")
zilbiq
^P1STREET("IS","pq viepd","qiito")
otiiq
^P1STREET("IS","pq viepd","qipi")
ipiq
^P1STREET("IS","pq viepd","qizeepiz")
zipeeziq
^P1STREET("IS","pq viepd","qleaiq yne`l")
l`eny qiaelq
^P1STREET("IS","pq viepd","qn' clid")
dilc 'nq
^P1STREET("IS","pq viepd","qn' d`ixiqim")
miqixi`d 'nq
^P1STREET("IS","pq viepd","qnhz dclid")
dilcd zhnq
^P1STREET("IS","pq viepd","qrcid pgem")
megp dicrq
^P1STREET("IS","pq viepd","qtix tpgq")
qgpt xitq
^P1STREET("IS","pq viepd","repez dypd")
dpyd zeper
^P1STREET("IS","pq viepd","rfx`")
`xfr
^P1STREET("IS","pq viepd","rfx` epgnid")
dingpe `xfr
^P1STREET("IS","pq viepd","rlid")
dilr
^P1STREET("IS","pq viepd","rnw dyeypim")
mipyeyd wnr
^P1STREET("IS","pq viepd","rvn`ez")
ze`nvr
^P1STREET("IS","pq viepd","rvneo")
oenvr
^P1STREET("IS","pq viepd","tlcno ieqs")
sqei onclt
^P1STREET("IS","pq viepd","tln""g")
g"nlt
^P1STREET("IS","pq viepd","tpiw cec")
cec wipt
^P1STREET("IS","pq viepd","trnepiz")
zipenrt
^P1STREET("IS","pq viepd","varepi")
iperav
^P1STREET("IS","pq viepd","vd""l")
l"dv
^P1STREET("IS","pq viepd","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","pq viepd","wxo wiinz liyx`l")
l`xyil zniiw oxw
^P1STREET("IS","pq viepd","x`eao lxx")
xxl oae`x
^P1STREET("IS","pq viepd","xehyilc")
cliyhex
^P1STREET("IS","pq viepd","xezm")
mzex
^P1STREET("IS","pq viepd","xg' dl""a")
a"ld 'gx
^P1STREET("IS","pq viepd","xg' l""b")
b"l 'gx
^P1STREET("IS","pq viepd","xgarm")
mragx
^P1STREET("IS","pq viepd","xgarm f`ai")
ia`f mragx
^P1STREET("IS","pq viepd","xna""m")
m"anx
^P1STREET("IS","pq viepd","xnf")
fnx
^P1STREET("IS","pq viepd","y`el dnlj")
jlnd le`y
^P1STREET("IS","pq viepd","yafi")
ifay
^P1STREET("IS","pq viepd","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","pq viepd","yail dblil")
lilbd liay
^P1STREET("IS","pq viepd","yc' `txim")
mixt` 'cy
^P1STREET("IS","pq viepd","yeyo")
oyey
^P1STREET("IS","pq viepd","yiaz vieo")
oeiv zaiy
^P1STREET("IS","pq viepd","yiwnim")
minwiy
^P1STREET("IS","pq viepd","ylem lgni")
ingl mely
^P1STREET("IS","pq viepd","yne`l behdlu")
uldheb l`eny
^P1STREET("IS","pq viepd","ywp`i")
i`pwy
^P1STREET("IS","pq viepd","yyz dinim")
minid zyy
^P1STREET("IS","pq viepd","zl `aia")
aia` lz
^P1STREET("IS","pq viepd","zl gi")
ig lz
^P1STREET("IS","pq viepd","zxn""b")
b"nxz
^P1STREET("IS","prexim")
mixerp
^P1STREET("IS","pro")
orp
^P1STREET("IS","pro","00")
00
^P1STREET("IS","prxo")
oxrp
^P1STREET("IS","pvx gfpi")
ipfg xvp
^P1STREET("IS","pvx qxpi")
ipxq xvp
^P1STREET("IS","pvxz")
zxvp
^P1STREET("IS","pvxz","9224%")
9224%
^P1STREET("IS","pvxz","`em wa`i")
i`aw me`
^P1STREET("IS","pvxz","`ikq`l")
l`qki`
^P1STREET("IS","pvxz","`l `geed")
deeg` l`
^P1STREET("IS","pvxz","`l `nl")
ln` l`
^P1STREET("IS","pvxz","`l aiy`xd")
dx`yia l`
^P1STREET("IS","pvxz","`l g'pew")
wep'g l`
^P1STREET("IS","pvxz","`l kxem")
mexk l`
^P1STREET("IS","pvxz","`l neglq")
qlgen l`
^P1STREET("IS","pvxz","`l nehx`o")
o`xhen l`
^P1STREET("IS","pvxz","`l nqlj")
jlqn l`
^P1STREET("IS","pvxz","`l p`m")
m`p l`
^P1STREET("IS","pvxz","`l pnq`ei")
ie`qnp l`
^P1STREET("IS","pvxz","`l qektd")
dtkeq l`
^P1STREET("IS","pvxz","`l qkp`")
`pkq l`
^P1STREET("IS","pvxz","`l t`gexd")
dxeg`t l`
^P1STREET("IS","pvxz","`l win`")
`niw l`
^P1STREET("IS","pvxz","`l wnd")
dnw l`
^P1STREET("IS","pvxz","`l x`m")
m`x l`
^P1STREET("IS","pvxz","`lrio")
oirl`
^P1STREET("IS","pvxz","`lrn`xd")
dx`nrl`
^P1STREET("IS","pvxz","`lwyld")
dlywl`
^P1STREET("IS","pvxz","`nxiw`o")
o`wixn`
^P1STREET("IS","pvxz","`piq wxcey")
yecxw qip`
^P1STREET("IS","pvxz","a`x `l `nix")
xin` l` x`a
^P1STREET("IS","pvxz","aeleq b'`c")
c`'b qelea
^P1STREET("IS","pvxz","aix `ae`lby")
ybl`ea` xia
^P1STREET("IS","pvxz","aiz dicicez")
zecicid zia
^P1STREET("IS","pvxz","al`l")
l`la
^P1STREET("IS","pvxz","apw axwliq")
qilwxa wpa
^P1STREET("IS","pvxz","b'al `lceld")
dlecl` la'b
^P1STREET("IS","pvxz","cxj dghiaez")
zeaihgd jxc
^P1STREET("IS","pvxz","cxj gitd")
dtig jxc
^P1STREET("IS","pvxz","cxj ktx dgexy")
yxegd xtk jxc
^P1STREET("IS","pvxz","cxj ytxrm")
mrxty jxc
^P1STREET("IS","pvxz","dayexd")
dxeyad
^P1STREET("IS","pvxz","dblil")
lilbd
^P1STREET("IS","pvxz","deexcim")
micxeed
^P1STREET("IS","pvxz","dgxneo")
oenxgd
^P1STREET("IS","pvxz","dngvaez")
zeavgnd
^P1STREET("IS","pvxz","dnriio")
oiirnd
^P1STREET("IS","pvxz","dterlim")
milretd
^P1STREET("IS","pvxz","dterlim d 20")
20 d milretd
^P1STREET("IS","pvxz","dwiyeo")
oeyiwd
^P1STREET("IS","pvxz","fi`c zetiw")
witez c`if
^P1STREET("IS","pvxz","g'l`z ` cix")
xic ` z`l'g
^P1STREET("IS","pvxz","giilim nyegxxim")
mixxgeyn miliig
^P1STREET("IS","pvxz","haxid")
dixah
^P1STREET("IS","pvxz","keka dvteo")
oetvd akek
^P1STREET("IS","pvxz","kkx dneqkim")
mikqend xkk
^P1STREET("IS","pvxz","kkx wfpead")
daepfw xkk
^P1STREET("IS","pvxz","n`gexd")
dxeg`n
^P1STREET("IS","pvxz","qlifi`o")
o`ifilq
^P1STREET("IS","pvxz","qt`txd")
dxt`tq
^P1STREET("IS","pvxz","rac `l w`cx")
xc`w l` car
^P1STREET("IS","pvxz","racel w`cx")
xc`w lecar
^P1STREET("IS","pvxz","rli p`qx negnc")
cngen xq`p ilr
^P1STREET("IS","pvxz","t`eleq dyiyi")
iyiyd qele`t
^P1STREET("IS","pvxz","tqbez dxim")
mixd zebqt
^P1STREET("IS","pvxz","tqbz yplx")
xlpy zbqt
^P1STREET("IS","pvxz","vitexi")
ixetiv
^P1STREET("IS","pvxz","xg 013")
013 gx
^P1STREET("IS","pvxz","xg 320")
320 gx
^P1STREET("IS","pvxz","xg 722")
722 gx
^P1STREET("IS","pvxz","xg 725")
725 gx
^P1STREET("IS","pvxz","xg' 1")
1 'gx
^P1STREET("IS","pvxz","xg' 10")
10 'gx
^P1STREET("IS","pvxz","xg' 1000")
1000 'gx
^P1STREET("IS","pvxz","xg' 1001")
1001 'gx
^P1STREET("IS","pvxz","xg' 1002")
1002 'gx
^P1STREET("IS","pvxz","xg' 1004")
1004 'gx
^P1STREET("IS","pvxz","xg' 1005")
1005 'gx
^P1STREET("IS","pvxz","xg' 1006")
1006 'gx
^P1STREET("IS","pvxz","xg' 1007")
1007 'gx
^P1STREET("IS","pvxz","xg' 1008")
1008 'gx
^P1STREET("IS","pvxz","xg' 1009")
1009 'gx
^P1STREET("IS","pvxz","xg' 101")
101 'gx
^P1STREET("IS","pvxz","xg' 1010")
1010 'gx
^P1STREET("IS","pvxz","xg' 1011")
1011 'gx
^P1STREET("IS","pvxz","xg' 1012")
1012 'gx
^P1STREET("IS","pvxz","xg' 1013")
1013 'gx
^P1STREET("IS","pvxz","xg' 1014")
1014 'gx
^P1STREET("IS","pvxz","xg' 1015")
1015 'gx
^P1STREET("IS","pvxz","xg' 1016")
1016 'gx
^P1STREET("IS","pvxz","xg' 1017")
1017 'gx
^P1STREET("IS","pvxz","xg' 1018")
1018 'gx
^P1STREET("IS","pvxz","xg' 1019")
1019 'gx
^P1STREET("IS","pvxz","xg' 102")
102 'gx
^P1STREET("IS","pvxz","xg' 1020")
1020 'gx
^P1STREET("IS","pvxz","xg' 1021")
1021 'gx
^P1STREET("IS","pvxz","xg' 1022")
1022 'gx
^P1STREET("IS","pvxz","xg' 1023")
1023 'gx
^P1STREET("IS","pvxz","xg' 1024")
1024 'gx
^P1STREET("IS","pvxz","xg' 1025")
1025 'gx
^P1STREET("IS","pvxz","xg' 1026")
1026 'gx
^P1STREET("IS","pvxz","xg' 1027")
1027 'gx
^P1STREET("IS","pvxz","xg' 1028")
1028 'gx
^P1STREET("IS","pvxz","xg' 1029")
1029 'gx
^P1STREET("IS","pvxz","xg' 103")
103 'gx
^P1STREET("IS","pvxz","xg' 1032")
1032 'gx
^P1STREET("IS","pvxz","xg' 104")
104 'gx
^P1STREET("IS","pvxz","xg' 1047")
1047 'gx
^P1STREET("IS","pvxz","xg' 105")
105 'gx
^P1STREET("IS","pvxz","xg' 1054")
1054 'gx
^P1STREET("IS","pvxz","xg' 106")
106 'gx
^P1STREET("IS","pvxz","xg' 107")
107 'gx
^P1STREET("IS","pvxz","xg' 108")
108 'gx
^P1STREET("IS","pvxz","xg' 109")
109 'gx
^P1STREET("IS","pvxz","xg' 11")
11 'gx
^P1STREET("IS","pvxz","xg' 110")
110 'gx
^P1STREET("IS","pvxz","xg' 1100")
1100 'gx
^P1STREET("IS","pvxz","xg' 1101")
1101 'gx
^P1STREET("IS","pvxz","xg' 111")
111 'gx
^P1STREET("IS","pvxz","xg' 112")
112 'gx
^P1STREET("IS","pvxz","xg' 113")
113 'gx
^P1STREET("IS","pvxz","xg' 114")
114 'gx
^P1STREET("IS","pvxz","xg' 115")
115 'gx
^P1STREET("IS","pvxz","xg' 116")
116 'gx
^P1STREET("IS","pvxz","xg' 117")
117 'gx
^P1STREET("IS","pvxz","xg' 118")
118 'gx
^P1STREET("IS","pvxz","xg' 119")
119 'gx
^P1STREET("IS","pvxz","xg' 12")
12 'gx
^P1STREET("IS","pvxz","xg' 120")
120 'gx
^P1STREET("IS","pvxz","xg' 1201")
1201 'gx
^P1STREET("IS","pvxz","xg' 121")
121 'gx
^P1STREET("IS","pvxz","xg' 122")
122 'gx
^P1STREET("IS","pvxz","xg' 123")
123 'gx
^P1STREET("IS","pvxz","xg' 124")
124 'gx
^P1STREET("IS","pvxz","xg' 125")
125 'gx
^P1STREET("IS","pvxz","xg' 126")
126 'gx
^P1STREET("IS","pvxz","xg' 127")
127 'gx
^P1STREET("IS","pvxz","xg' 128")
128 'gx
^P1STREET("IS","pvxz","xg' 129")
129 'gx
^P1STREET("IS","pvxz","xg' 13")
13 'gx
^P1STREET("IS","pvxz","xg' 130")
130 'gx
^P1STREET("IS","pvxz","xg' 132")
132 'gx
^P1STREET("IS","pvxz","xg' 133")
133 'gx
^P1STREET("IS","pvxz","xg' 134")
134 'gx
^P1STREET("IS","pvxz","xg' 135")
135 'gx
^P1STREET("IS","pvxz","xg' 15")
15 'gx
^P1STREET("IS","pvxz","xg' 16")
16 'gx
^P1STREET("IS","pvxz","xg' 17")
17 'gx
^P1STREET("IS","pvxz","xg' 175")
175 'gx
^P1STREET("IS","pvxz","xg' 18")
18 'gx
^P1STREET("IS","pvxz","xg' 182")
182 'gx
^P1STREET("IS","pvxz","xg' 188")
188 'gx
^P1STREET("IS","pvxz","xg' 19")
19 'gx
^P1STREET("IS","pvxz","xg' 20")
20 'gx
^P1STREET("IS","pvxz","xg' 2001")
2001 'gx
^P1STREET("IS","pvxz","xg' 2004")
2004 'gx
^P1STREET("IS","pvxz","xg' 2006")
2006 'gx
^P1STREET("IS","pvxz","xg' 201")
201 'gx
^P1STREET("IS","pvxz","xg' 202")
202 'gx
^P1STREET("IS","pvxz","xg' 203")
203 'gx
^P1STREET("IS","pvxz","xg' 204")
204 'gx
^P1STREET("IS","pvxz","xg' 205")
205 'gx
^P1STREET("IS","pvxz","xg' 206")
206 'gx
^P1STREET("IS","pvxz","xg' 207")
207 'gx
^P1STREET("IS","pvxz","xg' 208")
208 'gx
^P1STREET("IS","pvxz","xg' 209")
209 'gx
^P1STREET("IS","pvxz","xg' 21")
21 'gx
^P1STREET("IS","pvxz","xg' 2101")
2101 'gx
^P1STREET("IS","pvxz","xg' 211")
211 'gx
^P1STREET("IS","pvxz","xg' 213")
213 'gx
^P1STREET("IS","pvxz","xg' 215")
215 'gx
^P1STREET("IS","pvxz","xg' 216")
216 'gx
^P1STREET("IS","pvxz","xg' 217")
217 'gx
^P1STREET("IS","pvxz","xg' 219")
219 'gx
^P1STREET("IS","pvxz","xg' 2201")
2201 'gx
^P1STREET("IS","pvxz","xg' 221")
221 'gx
^P1STREET("IS","pvxz","xg' 227")
227 'gx
^P1STREET("IS","pvxz","xg' 23")
23 'gx
^P1STREET("IS","pvxz","xg' 231")
231 'gx
^P1STREET("IS","pvxz","xg' 24")
24 'gx
^P1STREET("IS","pvxz","xg' 27")
27 'gx
^P1STREET("IS","pvxz","xg' 29")
29 'gx
^P1STREET("IS","pvxz","xg' 3001")
3001 'gx
^P1STREET("IS","pvxz","xg' 3002")
3002 'gx
^P1STREET("IS","pvxz","xg' 301")
301 'gx
^P1STREET("IS","pvxz","xg' 3015")
3015 'gx
^P1STREET("IS","pvxz","xg' 302")
302 'gx
^P1STREET("IS","pvxz","xg' 3021")
3021 'gx
^P1STREET("IS","pvxz","xg' 3027")
3027 'gx
^P1STREET("IS","pvxz","xg' 303")
303 'gx
^P1STREET("IS","pvxz","xg' 3030")
3030 'gx
^P1STREET("IS","pvxz","xg' 304")
304 'gx
^P1STREET("IS","pvxz","xg' 3042")
3042 'gx
^P1STREET("IS","pvxz","xg' 305")
305 'gx
^P1STREET("IS","pvxz","xg' 306")
306 'gx
^P1STREET("IS","pvxz","xg' 307")
307 'gx
^P1STREET("IS","pvxz","xg' 308")
308 'gx
^P1STREET("IS","pvxz","xg' 309")
309 'gx
^P1STREET("IS","pvxz","xg' 31")
31 'gx
^P1STREET("IS","pvxz","xg' 310")
310 'gx
^P1STREET("IS","pvxz","xg' 3101")
3101 'gx
^P1STREET("IS","pvxz","xg' 311")
311 'gx
^P1STREET("IS","pvxz","xg' 312")
312 'gx
^P1STREET("IS","pvxz","xg' 313")
313 'gx
^P1STREET("IS","pvxz","xg' 314")
314 'gx
^P1STREET("IS","pvxz","xg' 315")
315 'gx
^P1STREET("IS","pvxz","xg' 316")
316 'gx
^P1STREET("IS","pvxz","xg' 317")
317 'gx
^P1STREET("IS","pvxz","xg' 318")
318 'gx
^P1STREET("IS","pvxz","xg' 319")
319 'gx
^P1STREET("IS","pvxz","xg' 32")
32 'gx
^P1STREET("IS","pvxz","xg' 3201")
3201 'gx
^P1STREET("IS","pvxz","xg' 321")
321 'gx
^P1STREET("IS","pvxz","xg' 327")
327 'gx
^P1STREET("IS","pvxz","xg' 331")
331 'gx
^P1STREET("IS","pvxz","xg' 34")
34 'gx
^P1STREET("IS","pvxz","xg' 37")
37 'gx
^P1STREET("IS","pvxz","xg' 38")
38 'gx
^P1STREET("IS","pvxz","xg' 39")
39 'gx
^P1STREET("IS","pvxz","xg' 4001")
4001 'gx
^P1STREET("IS","pvxz","xg' 401")
401 'gx
^P1STREET("IS","pvxz","xg' 4013")
4013 'gx
^P1STREET("IS","pvxz","xg' 402")
402 'gx
^P1STREET("IS","pvxz","xg' 403")
403 'gx
^P1STREET("IS","pvxz","xg' 4032")
4032 'gx
^P1STREET("IS","pvxz","xg' 404")
404 'gx
^P1STREET("IS","pvxz","xg' 4040")
4040 'gx
^P1STREET("IS","pvxz","xg' 405")
405 'gx
^P1STREET("IS","pvxz","xg' 406")
406 'gx
^P1STREET("IS","pvxz","xg' 4060")
4060 'gx
^P1STREET("IS","pvxz","xg' 407")
407 'gx
^P1STREET("IS","pvxz","xg' 4070")
4070 'gx
^P1STREET("IS","pvxz","xg' 4076")
4076 'gx
^P1STREET("IS","pvxz","xg' 408")
408 'gx
^P1STREET("IS","pvxz","xg' 4080")
4080 'gx
^P1STREET("IS","pvxz","xg' 409")
409 'gx
^P1STREET("IS","pvxz","xg' 4098")
4098 'gx
^P1STREET("IS","pvxz","xg' 413")
413 'gx
^P1STREET("IS","pvxz","xg' 416")
416 'gx
^P1STREET("IS","pvxz","xg' 417")
417 'gx
^P1STREET("IS","pvxz","xg' 419")
419 'gx
^P1STREET("IS","pvxz","xg' 4201")
4201 'gx
^P1STREET("IS","pvxz","xg' 421")
421 'gx
^P1STREET("IS","pvxz","xg' 427")
427 'gx
^P1STREET("IS","pvxz","xg' 431")
431 'gx
^P1STREET("IS","pvxz","xg' 46")
46 'gx
^P1STREET("IS","pvxz","xg' 47")
47 'gx
^P1STREET("IS","pvxz","xg' 5000")
5000 'gx
^P1STREET("IS","pvxz","xg' 5001")
5001 'gx
^P1STREET("IS","pvxz","xg' 5007")
5007 'gx
^P1STREET("IS","pvxz","xg' 501")
501 'gx
^P1STREET("IS","pvxz","xg' 502")
502 'gx
^P1STREET("IS","pvxz","xg' 5026")
5026 'gx
^P1STREET("IS","pvxz","xg' 503")
503 'gx
^P1STREET("IS","pvxz","xg' 5036")
5036 'gx
^P1STREET("IS","pvxz","xg' 504")
504 'gx
^P1STREET("IS","pvxz","xg' 5045")
5045 'gx
^P1STREET("IS","pvxz","xg' 5047")
5047 'gx
^P1STREET("IS","pvxz","xg' 505")
505 'gx
^P1STREET("IS","pvxz","xg' 5053")
5053 'gx
^P1STREET("IS","pvxz","xg' 5058")
5058 'gx
^P1STREET("IS","pvxz","xg' 506")
506 'gx
^P1STREET("IS","pvxz","xg' 507")
507 'gx
^P1STREET("IS","pvxz","xg' 5070")
5070 'gx
^P1STREET("IS","pvxz","xg' 508")
508 'gx
^P1STREET("IS","pvxz","xg' 5080")
5080 'gx
^P1STREET("IS","pvxz","xg' 509")
509 'gx
^P1STREET("IS","pvxz","xg' 5099")
5099 'gx
^P1STREET("IS","pvxz","xg' 510")
510 'gx
^P1STREET("IS","pvxz","xg' 5101")
5101 'gx
^P1STREET("IS","pvxz","xg' 5109")
5109 'gx
^P1STREET("IS","pvxz","xg' 511")
511 'gx
^P1STREET("IS","pvxz","xg' 512")
512 'gx
^P1STREET("IS","pvxz","xg' 5129")
5129 'gx
^P1STREET("IS","pvxz","xg' 513")
513 'gx
^P1STREET("IS","pvxz","xg' 516")
516 'gx
^P1STREET("IS","pvxz","xg' 517")
517 'gx
^P1STREET("IS","pvxz","xg' 519")
519 'gx
^P1STREET("IS","pvxz","xg' 52")
52 'gx
^P1STREET("IS","pvxz","xg' 5201")
5201 'gx
^P1STREET("IS","pvxz","xg' 521")
521 'gx
^P1STREET("IS","pvxz","xg' 527")
527 'gx
^P1STREET("IS","pvxz","xg' 531")
531 'gx
^P1STREET("IS","pvxz","xg' 59")
59 'gx
^P1STREET("IS","pvxz","xg' 6")
6 'gx
^P1STREET("IS","pvxz","xg' 6001")
6001 'gx
^P1STREET("IS","pvxz","xg' 601")
601 'gx
^P1STREET("IS","pvxz","xg' 602")
602 'gx
^P1STREET("IS","pvxz","xg' 6021")
6021 'gx
^P1STREET("IS","pvxz","xg' 603")
603 'gx
^P1STREET("IS","pvxz","xg' 604")
604 'gx
^P1STREET("IS","pvxz","xg' 605")
605 'gx
^P1STREET("IS","pvxz","xg' 606")
606 'gx
^P1STREET("IS","pvxz","xg' 607")
607 'gx
^P1STREET("IS","pvxz","xg' 6075")
6075 'gx
^P1STREET("IS","pvxz","xg' 608")
608 'gx
^P1STREET("IS","pvxz","xg' 609")
609 'gx
^P1STREET("IS","pvxz","xg' 6101")
6101 'gx
^P1STREET("IS","pvxz","xg' 611")
611 'gx
^P1STREET("IS","pvxz","xg' 612")
612 'gx
^P1STREET("IS","pvxz","xg' 613")
613 'gx
^P1STREET("IS","pvxz","xg' 614")
614 'gx
^P1STREET("IS","pvxz","xg' 615")
615 'gx
^P1STREET("IS","pvxz","xg' 6153")
6153 'gx
^P1STREET("IS","pvxz","xg' 616")
616 'gx
^P1STREET("IS","pvxz","xg' 617")
617 'gx
^P1STREET("IS","pvxz","xg' 619")
619 'gx
^P1STREET("IS","pvxz","xg' 6201")
6201 'gx
^P1STREET("IS","pvxz","xg' 621")
621 'gx
^P1STREET("IS","pvxz","xg' 627")
627 'gx
^P1STREET("IS","pvxz","xg' 6520")
6520 'gx
^P1STREET("IS","pvxz","xg' 7")
7 'gx
^P1STREET("IS","pvxz","xg' 7000")
7000 'gx
^P1STREET("IS","pvxz","xg' 7001")
7001 'gx
^P1STREET("IS","pvxz","xg' 7005")
7005 'gx
^P1STREET("IS","pvxz","xg' 701")
701 'gx
^P1STREET("IS","pvxz","xg' 702")
702 'gx
^P1STREET("IS","pvxz","xg' 703")
703 'gx
^P1STREET("IS","pvxz","xg' 704")
704 'gx
^P1STREET("IS","pvxz","xg' 7040")
7040 'gx
^P1STREET("IS","pvxz","xg' 7041")
7041 'gx
^P1STREET("IS","pvxz","xg' 705")
705 'gx
^P1STREET("IS","pvxz","xg' 706")
706 'gx
^P1STREET("IS","pvxz","xg' 707")
707 'gx
^P1STREET("IS","pvxz","xg' 708")
708 'gx
^P1STREET("IS","pvxz","xg' 709")
709 'gx
^P1STREET("IS","pvxz","xg' 710")
710 'gx
^P1STREET("IS","pvxz","xg' 7101")
7101 'gx
^P1STREET("IS","pvxz","xg' 711")
711 'gx
^P1STREET("IS","pvxz","xg' 712")
712 'gx
^P1STREET("IS","pvxz","xg' 713")
713 'gx
^P1STREET("IS","pvxz","xg' 714")
714 'gx
^P1STREET("IS","pvxz","xg' 715")
715 'gx
^P1STREET("IS","pvxz","xg' 716")
716 'gx
^P1STREET("IS","pvxz","xg' 717")
717 'gx
^P1STREET("IS","pvxz","xg' 718")
718 'gx
^P1STREET("IS","pvxz","xg' 719")
719 'gx
^P1STREET("IS","pvxz","xg' 720")
720 'gx
^P1STREET("IS","pvxz","xg' 7201")
7201 'gx
^P1STREET("IS","pvxz","xg' 721")
721 'gx
^P1STREET("IS","pvxz","xg' 724")
724 'gx
^P1STREET("IS","pvxz","xg' 726")
726 'gx
^P1STREET("IS","pvxz","xg' 727")
727 'gx
^P1STREET("IS","pvxz","xg' 750")
750 'gx
^P1STREET("IS","pvxz","xg' 767")
767 'gx
^P1STREET("IS","pvxz","xg' 8")
8 'gx
^P1STREET("IS","pvxz","xg' 8001")
8001 'gx
^P1STREET("IS","pvxz","xg' 8003")
8003 'gx
^P1STREET("IS","pvxz","xg' 8004")
8004 'gx
^P1STREET("IS","pvxz","xg' 8009")
8009 'gx
^P1STREET("IS","pvxz","xg' 801")
801 'gx
^P1STREET("IS","pvxz","xg' 802")
802 'gx
^P1STREET("IS","pvxz","xg' 8020")
8020 'gx
^P1STREET("IS","pvxz","xg' 803")
803 'gx
^P1STREET("IS","pvxz","xg' 804")
804 'gx
^P1STREET("IS","pvxz","xg' 805")
805 'gx
^P1STREET("IS","pvxz","xg' 806")
806 'gx
^P1STREET("IS","pvxz","xg' 807")
807 'gx
^P1STREET("IS","pvxz","xg' 808")
808 'gx
^P1STREET("IS","pvxz","xg' 809")
809 'gx
^P1STREET("IS","pvxz","xg' 810")
810 'gx
^P1STREET("IS","pvxz","xg' 8101")
8101 'gx
^P1STREET("IS","pvxz","xg' 811")
811 'gx
^P1STREET("IS","pvxz","xg' 813")
813 'gx
^P1STREET("IS","pvxz","xg' 817")
817 'gx
^P1STREET("IS","pvxz","xg' 819")
819 'gx
^P1STREET("IS","pvxz","xg' 8201")
8201 'gx
^P1STREET("IS","pvxz","xg' 821")
821 'gx
^P1STREET("IS","pvxz","xg' 827")
827 'gx
^P1STREET("IS","pvxz","xg' 857")
857 'gx
^P1STREET("IS","pvxz","xg' 9")
9 'gx
^P1STREET("IS","pvxz","xg' 9001")
9001 'gx
^P1STREET("IS","pvxz","xg' 901")
901 'gx
^P1STREET("IS","pvxz","xg' 902")
902 'gx
^P1STREET("IS","pvxz","xg' 903")
903 'gx
^P1STREET("IS","pvxz","xg' 904")
904 'gx
^P1STREET("IS","pvxz","xg' 905")
905 'gx
^P1STREET("IS","pvxz","xg' 906")
906 'gx
^P1STREET("IS","pvxz","xg' 907")
907 'gx
^P1STREET("IS","pvxz","xg' 908")
908 'gx
^P1STREET("IS","pvxz","xg' 909")
909 'gx
^P1STREET("IS","pvxz","xg' 910")
910 'gx
^P1STREET("IS","pvxz","xg' 9101")
9101 'gx
^P1STREET("IS","pvxz","xg' 911")
911 'gx
^P1STREET("IS","pvxz","xg' 912")
912 'gx
^P1STREET("IS","pvxz","xg' 913")
913 'gx
^P1STREET("IS","pvxz","xg' 914")
914 'gx
^P1STREET("IS","pvxz","xg' 915")
915 'gx
^P1STREET("IS","pvxz","xg' 916")
916 'gx
^P1STREET("IS","pvxz","xg' 917")
917 'gx
^P1STREET("IS","pvxz","xg' 918")
918 'gx
^P1STREET("IS","pvxz","xg' 919")
919 'gx
^P1STREET("IS","pvxz","xg' 920")
920 'gx
^P1STREET("IS","pvxz","xg' 9201")
9201 'gx
^P1STREET("IS","pvxz","xg' 921")
921 'gx
^P1STREET("IS","pvxz","zlz `l aix")
xia l` zlz
^P1STREET("IS","pvxz riliz")
zilir zxvp
^P1STREET("IS","pvxz riliz","`bef")
feb`
^P1STREET("IS","pvxz riliz","`bneo")
oenb`
^P1STREET("IS","pvxz riliz","`cneo")
oenc`
^P1STREET("IS","pvxz riliz","`exd")
dxe`
^P1STREET("IS","pvxz riliz","`expim")
mipxe`
^P1STREET("IS","pvxz riliz","`iipyhiio")
oiihypii`
^P1STREET("IS","pvxz riliz","`ixiq")
qixi`
^P1STREET("IS","pvxz riliz","`lend")
dnel`
^P1STREET("IS","pvxz riliz","`lneb")
benl`
^P1STREET("IS","pvxz riliz","`xal")
lax`
^P1STREET("IS","pvxz riliz","`xf")
fx`
^P1STREET("IS","pvxz riliz","`yeg")
gey`
^P1STREET("IS","pvxz riliz","aexekea")
aekexea
^P1STREET("IS","pvxz riliz","axey")
yexa
^P1STREET("IS","pvxz riliz","axwz")
zwxa
^P1STREET("IS","pvxz riliz","belo")
oleb
^P1STREET("IS","pvxz riliz","blaer")
realb
^P1STREET("IS","pvxz riliz","blrc")
crlb
^P1STREET("IS","pvxz riliz","bpez")
zepb
^P1STREET("IS","pvxz riliz","cbpiz")
zipbc
^P1STREET("IS","pvxz riliz","cec ao bexieo")
oeixeb oa cec
^P1STREET("IS","pvxz riliz","cela")
alec
^P1STREET("IS","pvxz riliz","clid")
dilc
^P1STREET("IS","pvxz riliz","ctpd")
dptc
^P1STREET("IS","pvxz riliz","cxj caexd")
dxeac jxc
^P1STREET("IS","pvxz riliz","cxj dblil")
lilbd jxc
^P1STREET("IS","pvxz riliz","cxj dghiaez")
zeaihgd jxc
^P1STREET("IS","pvxz riliz","cxj drnw")
wnrd jxc
^P1STREET("IS","pvxz riliz","cxj dviepez")
zepeivd jxc
^P1STREET("IS","pvxz riliz","d`ged")
deg`d
^P1STREET("IS","pvxz riliz","d`lepim")
mipel`d
^P1STREET("IS","pvxz riliz","dbaiy")
yiabd
^P1STREET("IS","pvxz riliz","dbard")
drabd
^P1STREET("IS","pvxz riliz","dben`")
`nebd
^P1STREET("IS","pvxz riliz","dbend")
dnebd
^P1STREET("IS","pvxz riliz","dbi`")
`ibd
^P1STREET("IS","pvxz riliz","dbrzeo")
oezrbd
^P1STREET("IS","pvxz riliz","dbto")
otbd
^P1STREET("IS","pvxz riliz","dcwl")
lwcd
^P1STREET("IS","pvxz riliz","dcx")
xcd
^P1STREET("IS","pvxz riliz","ddcqim")
miqcdd
^P1STREET("IS","pvxz riliz","dfiz")
zifd
^P1STREET("IS","pvxz riliz","dgihd")
dhigd
^P1STREET("IS","pvxz riliz","dgnpiez")
zeipngd
^P1STREET("IS","pvxz riliz","dgva")
avgd
^P1STREET("IS","pvxz riliz","dgxeyz")
zyexgd
^P1STREET("IS","pvxz riliz","dicicez")
zecicid
^P1STREET("IS","pvxz riliz","dievx")
xveid
^P1STREET("IS","pvxz riliz","digc")
cgid
^P1STREET("IS","pvxz riliz","divixd")
dxivid
^P1STREET("IS","pvxz riliz","dixco")
ocxid
^P1STREET("IS","pvxz riliz","dizc")
czid
^P1STREET("IS","pvxz riliz","dkxnim")
minxkd
^P1STREET("IS","pvxz riliz","dlda")
adld
^P1STREET("IS","pvxz riliz","dlela")
aleld
^P1STREET("IS","pvxz riliz","dneail")
liaend
^P1STREET("IS","pvxz riliz","dnexc")
cxend
^P1STREET("IS","pvxz riliz","dnl`kd")
dk`lnd
^P1STREET("IS","pvxz riliz","dnriio")
oiirnd
^P1STREET("IS","pvxz riliz","dnxkad")
dakxnd
^P1STREET("IS","pvxz riliz","dnzkz")
zkznd
^P1STREET("IS","pvxz riliz","dqcp`")
`pcqd
^P1STREET("IS","pvxz riliz","dqgla")
algqd
^P1STREET("IS","pvxz riliz","draecd")
dceard
^P1STREET("IS","pvxz riliz","drlid")
dilrd
^P1STREET("IS","pvxz riliz","drvn`ez")
ze`nvrd
^P1STREET("IS","pvxz riliz","drxad")
daxrd
^P1STREET("IS","pvxz riliz","dtixieo")
oeixitd
^P1STREET("IS","pvxz riliz","dtlcd")
dcltd
^P1STREET("IS","pvxz riliz","dtqbez")
zebqtd
^P1STREET("IS","pvxz riliz","dvax")
xavd
^P1STREET("IS","pvxz riliz","dvexs")
sxevd
^P1STREET("IS","pvxz riliz","dvls")
slvd
^P1STREET("IS","pvxz riliz","dx iepd")
dpei xd
^P1STREET("IS","pvxz riliz","dyard")
drayd
^P1STREET("IS","pvxz riliz","dyeypim")
mipyeyd
^P1STREET("IS","pvxz riliz","dyiy")
yiyd
^P1STREET("IS","pvxz riliz","dywnd")
dnwyd
^P1STREET("IS","pvxz riliz","dz`pd")
dp`zd
^P1STREET("IS","pvxz riliz","dzryid")
diyrzd
^P1STREET("IS","pvxz riliz","excim")
micxe
^P1STREET("IS","pvxz riliz","gavlz")
zlvag
^P1STREET("IS","pvxz riliz","gexy")
yxeg
^P1STREET("IS","pvxz riliz","gippiz")
zippig
^P1STREET("IS","pvxz riliz","gitd")
dtig
^P1STREET("IS","pvxz riliz","gxea")
aexg
^P1STREET("IS","pvxz riliz","gxec")
cexg
^P1STREET("IS","pvxz riliz","gxneo")
oenxg
^P1STREET("IS","pvxz riliz","iectz")
ztcei
^P1STREET("IS","pvxz riliz","iepd")
dpei
^P1STREET("IS","pvxz riliz","ifxr`l")
l`rxfi
^P1STREET("IS","pvxz riliz","iqnio")
oinqi
^P1STREET("IS","pvxz riliz","irl")
lri
^P1STREET("IS","pvxz riliz","irxd")
dxri
^P1STREET("IS","pvxz riliz","iwipheo")
oehpiwi
^P1STREET("IS","pvxz riliz","kekaiz")
ziakek
^P1STREET("IS","pvxz riliz","kkx `li kdo")
odk il` xkk
^P1STREET("IS","pvxz riliz","kkx dblil")
lilbd xkk
^P1STREET("IS","pvxz riliz","kkx nbo cec `cem")
mec` cec obn xkk
^P1STREET("IS","pvxz riliz","klil dgexy")
yxegd lilk
^P1STREET("IS","pvxz riliz","klpiez")
zeiplk
^P1STREET("IS","pvxz riliz","kqelez")
zeleqk
^P1STREET("IS","pvxz riliz","kxkem")
mekxk
^P1STREET("IS","pvxz riliz","kxnl")
lnxk
^P1STREET("IS","pvxz riliz","lapd")
dpal
^P1STREET("IS","pvxz riliz","lehm")
mhel
^P1STREET("IS","pvxz riliz","lilj")
jlil
^P1STREET("IS","pvxz riliz","nbice")
ecibn
^P1STREET("IS","pvxz riliz","nekzx nedp`")
`pden xzken
^P1STREET("IS","pvxz riliz","nexo")
oxen
^P1STREET("IS","pvxz riliz","nixeo")
oexin
^P1STREET("IS","pvxz riliz","nrld ivgw")
wgvi dlrn
^P1STREET("IS","pvxz riliz","nrxaiz")
ziaxrn
^P1STREET("IS","pvxz riliz","nxbpiz")
zipbxn
^P1STREET("IS","pvxz riliz","nxkf laeo")
oeal fkxn
^P1STREET("IS","pvxz riliz","nyrel dcaexd")
dxeacd leryn
^P1STREET("IS","pvxz riliz","pes zaex")
xeaz sep
^P1STREET("IS","pvxz riliz","pexiz")
zixep
^P1STREET("IS","pvxz riliz","phetd")
dtehp
^P1STREET("IS","pvxz riliz","pivo")
ovip
^P1STREET("IS","pvxz riliz","pivpiz")
zipvip
^P1STREET("IS","pvxz riliz","pxwiqim")
miqiwxp
^P1STREET("IS","pvxz riliz","qaieo")
oeiaq
^P1STREET("IS","pvxz riliz","qibliz")
zilbiq
^P1STREET("IS","pvxz riliz","qieo")
oeiq
^P1STREET("IS","pvxz riliz","qiito")
otiiq
^P1STREET("IS","pvxz riliz","qizeepiz")
zipeeziq
^P1STREET("IS","pvxz riliz","rcrc")
crcr
^P1STREET("IS","pvxz riliz","rely")
yler
^P1STREET("IS","pvxz riliz","rhxd")
dxhr
^P1STREET("IS","pvxz riliz","rixiz")
zixir
^P1STREET("IS","pvxz riliz","rke")
ekr
^P1STREET("IS","pvxz riliz","rnl")
lnr
^P1STREET("IS","pvxz riliz","rvneo")
oenvr
^P1STREET("IS","pvxz riliz","tpwq")
qwpt
^P1STREET("IS","pvxz riliz","varepi")
iperav
^P1STREET("IS","pvxz riliz","vitexi")
ixetiv
^P1STREET("IS","pvxz riliz","vitexo")
oxetiv
^P1STREET("IS","pvxz riliz","wexpiz")
zipxew
^P1STREET("IS","pvxz riliz","wiyeo")
oeyiw
^P1STREET("IS","pvxz riliz","ww""l")
l"ww
^P1STREET("IS","pvxz riliz","wyzez")
zezyw
^P1STREET("IS","pvxz riliz","xezm")
mzex
^P1STREET("IS","pvxz riliz","xg' 111")
111 'gx
^P1STREET("IS","pvxz riliz","xg' 207")
207 'gx
^P1STREET("IS","pvxz riliz","xg' 807")
807 'gx
^P1STREET("IS","pvxz riliz","xineo")
oenix
^P1STREET("IS","pvxz riliz","xwtz")
ztwx
^P1STREET("IS","pvxz riliz","yenxeo")
oexney
^P1STREET("IS","pvxz riliz","ywc")
cwy
^P1STREET("IS","pvxz riliz","zaex")
xeaz
^P1STREET("IS","pvxz riliz","zixey")
yexiz
^P1STREET("IS","pvxz riliz","znx")
xnz
^P1STREET("IS","pyx")
xyp
^P1STREET("IS","pyx","`aix irwa")
awri xia`
^P1STREET("IS","pyx","`etwim")
miwte`
^P1STREET("IS","pyx","`exg giim")
miig gxe`
^P1STREET("IS","pyx","`exo")
oxe`
^P1STREET("IS","pyx","`ykelez")
zeleky`
^P1STREET("IS","pyx","axw")
wxa
^P1STREET("IS","pyx","caexd")
dxeac
^P1STREET("IS","pyx","cxj ax idecd")
dcedi xa jxc
^P1STREET("IS","pyx","cxj dhkpieo")
oeipkhd jxc
^P1STREET("IS","pyx","cxj dhs")
shd jxc
^P1STREET("IS","pyx","cxj dylem")
melyd jxc
^P1STREET("IS","pyx","d`ilpez")
zepli`d
^P1STREET("IS","pyx","d`ixeqim")
miqexi`d
^P1STREET("IS","pyx","d`leo")
oel`d
^P1STREET("IS","pyx","d`yl")
ly`d
^P1STREET("IS","pyx","daepim")
mipead
^P1STREET("IS","pyx","dahgeo")
oeghad
^P1STREET("IS","pyx","daxey")
yexad
^P1STREET("IS","pyx","dbaexd")
dxeabd
^P1STREET("IS","pyx","dcwlim")
milwcd
^P1STREET("IS","pyx","ddcq")
qcdd
^P1STREET("IS","pyx","ddqzcxez")
zexczqdd
^P1STREET("IS","pyx","ddykld")
dlkydd
^P1STREET("IS","pyx","deeziwim")
miwizeed
^P1STREET("IS","pyx","dexcim")
micxed
^P1STREET("IS","pyx","dfiz")
zifd
^P1STREET("IS","pyx","dglevim")
mivelgd
^P1STREET("IS","pyx","dgva")
avgd
^P1STREET("IS","pyx","dgxea")
aexgd
^P1STREET("IS","pyx","dgxeyz")
zyexgd
^P1STREET("IS","pyx","divixd")
dxivid
^P1STREET("IS","pyx","dixew")
wexid
^P1STREET("IS","pyx","dklpiez")
zeiplkd
^P1STREET("IS","pyx","dlehm")
mheld
^P1STREET("IS","pyx","dlilj")
jlild
^P1STREET("IS","pyx","dnbipim")
mipibnd
^P1STREET("IS","pyx","dnexc")
cxend
^P1STREET("IS","pyx","dniiqcim")
micqiind
^P1STREET("IS","pyx","dnl`kd")
dk`lnd
^P1STREET("IS","pyx","dnqbx")
xbqnd
^P1STREET("IS","pyx","dnqild")
dliqnd
^P1STREET("IS","pyx","dnrtilim")
militrnd
^P1STREET("IS","pyx","dnvtd")
dtvnd
^P1STREET("IS","pyx","dnxbpiz")
zipbxnd
^P1STREET("IS","pyx","dnxkf")
fkxnd
^P1STREET("IS","pyx","dnyrel dzlel")
lelzd lerynd
^P1STREET("IS","pyx","dnznic")
cinznd
^P1STREET("IS","pyx","dpxwiqim")
miqiwxpd
^P1STREET("IS","pyx","dqaieo")
oeiaqd
^P1STREET("IS","pyx","dqgla")
algqd
^P1STREET("IS","pyx","drlid")
dilrd
^P1STREET("IS","pyx","drnw")
wnrd
^P1STREET("IS","pyx","drxad")
daxrd
^P1STREET("IS","pyx","drxnepim")
mipenxrd
^P1STREET("IS","pyx","dterl")
lretd
^P1STREET("IS","pyx","dtlcd")
dcltd
^P1STREET("IS","pyx","dvarepi")
iperavd
^P1STREET("IS","pyx","dvtvtd")
dtvtvd
^P1STREET("IS","pyx","dwenniez")
zeinnewd
^P1STREET("IS","pyx","dwiyeo")
oeyiwd
^P1STREET("IS","pyx","dwvx")
xvwd
^P1STREET("IS","pyx","dxces")
secxd
^P1STREET("IS","pyx","dxwtez")
zetwxd
^P1STREET("IS","pyx","dyeypim")
mipyeyd
^P1STREET("IS","pyx","dyfis")
sifyd
^P1STREET("IS","pyx","dyihd")
dhiyd
^P1STREET("IS","pyx","dyiy")
yiyd
^P1STREET("IS","pyx","dywnd")
dnwyd
^P1STREET("IS","pyx","dzgpd")
dpgzd
^P1STREET("IS","pyx","dzikeo")
oekizd
^P1STREET("IS","pyx","dznx")
xnzd
^P1STREET("IS","pyx","dzryid")
diyrzd
^P1STREET("IS","pyx","dztef")
fetzd
^P1STREET("IS","pyx","dzyai")
iayzd
^P1STREET("IS","pyx","faeleo")
oeleaf
^P1STREET("IS","pyx","gavlz")
zlvag
^P1STREET("IS","pyx","iqnio")
oinqi
^P1STREET("IS","pyx","irl")
lri
^P1STREET("IS","pyx","itd pes")
sep dti
^P1STREET("IS","pyx","iyexeo")
oexeyi
^P1STREET("IS","pyx","kkx ddqzcxez")
zexczqdd xkk
^P1STREET("IS","pyx","klil dgexy")
yxegd lilk
^P1STREET("IS","pyx","legni dbih`ez")
ze`hibd ingel
^P1STREET("IS","pyx","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","pyx","nexo")
oxen
^P1STREET("IS","pyx","nik`l")
l`kin
^P1STREET("IS","pyx","nrld dbiaexim")
mixeaibd dlrn
^P1STREET("IS","pyx","nrlez `lide")
edil` zelrn
^P1STREET("IS","pyx","nxcki ax neg`")
`gen xa ikcxn
^P1STREET("IS","pyx","pexi`l")
l`ixep
^P1STREET("IS","pyx","pexiez")
zeixep
^P1STREET("IS","pyx","pzia d`xfim")
mifx`d aizp
^P1STREET("IS","pyx","pzia dhxyim")
miyxhd aizp
^P1STREET("IS","pyx","pzia dim")
mid aizp
^P1STREET("IS","pyx","pzia dkxnl")
lnxkd aizp
^P1STREET("IS","pyx","pzia dxineo")
oenixd aizp
^P1STREET("IS","pyx","pzia dz`pd")
dp`zd aizp
^P1STREET("IS","pyx","qipi")
ipiq
^P1STREET("IS","pyx","qnhz aiz `l")
l` zia zhnq
^P1STREET("IS","pyx","qnhz daxikd")
dkixad zhnq
^P1STREET("IS","pyx","qnhz dznx")
xnzd zhnq
^P1STREET("IS","pyx","rneq")
qenr
^P1STREET("IS","pyx","txu `axdm")
mdxa` uxt
^P1STREET("IS","pyx","vax")
xav
^P1STREET("IS","pyx","vd""l")
l"dv
^P1STREET("IS","pyx","vieo")
oeiv
^P1STREET("IS","pyx","vxitim")
mitixv
^P1STREET("IS","pyx","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","pyx","wxo diqec")
ceqid oxw
^P1STREET("IS","pyx","yail da`x")
x`ad liay
^P1STREET("IS","pyx","yail drncd")
dcnrd liay
^P1STREET("IS","pyx","ywc")
cwy
^P1STREET("IS","pyx","yyz dinim")
minid zyy
^P1STREET("IS","pza""b")
b"azp
^P1STREET("IS","pza""b","blil")
lilb
^P1STREET("IS","pza""b","dbelo")
olebd
^P1STREET("IS","pza""b","dblaer")
realbd
^P1STREET("IS","pza""b","dixco")
ocxid
^P1STREET("IS","pza""b","drxad")
daxrd
^P1STREET("IS","pza""b","dyxeo")
oexyd
^P1STREET("IS","pza""b","gxneo")
oenxg
^P1STREET("IS","pza""b","kpxz")
zxpk
^P1STREET("IS","pza""b","pba")
abp
^P1STREET("IS","pzia dl""d")
d"ld aizp
^P1STREET("IS","pzia dyiixd")
dxiiyd aizp
^P1STREET("IS","pzia dyiixd","cx' qhxend")
dnexhq 'xc
^P1STREET("IS","pziaez")
zeaizp
^P1STREET("IS","pziaez","`ae gvix`")
`xivg ea`
^P1STREET("IS","pziaez","`ao cpo")
opc oa`
^P1STREET("IS","pziaez","`bef")
feb`
^P1STREET("IS","pziaez","`ex lvieo")
oeivl xe`
^P1STREET("IS","pziaez","`exg giim")
miig gxe`
^P1STREET("IS","pziaez","`lide dpai`")
`iapd edil`
^P1STREET("IS","pziaez","`ltqi")
iqtl`
^P1STREET("IS","pziaez","`v""l")
l"v`
^P1STREET("IS","pziaez","aiz ebo")
obe zia
^P1STREET("IS","pziaez","ao bexieo")
oeixeb oa
^P1STREET("IS","pziaez","arli dnl`kd")
dk`lnd ilra
^P1STREET("IS","pziaez","ax `ilo")
oli` xa
^P1STREET("IS","pziaez","axihiy wehb'")
'bhew yihixa
^P1STREET("IS","pziaez","axiz kdepd")
dpedk zixa
^P1STREET("IS","pziaez","barz yitxd")
dxtiy zrab
^P1STREET("IS","pziaez","belena")
aneleb
^P1STREET("IS","pziaez","biaexi zyk""f")
f"kyz ixeaib
^P1STREET("IS","pziaez","cxj dxineo")
oenixd jxc
^P1STREET("IS","pziaez","d`eno")
one`d
^P1STREET("IS","pziaez","d`x""i")
i"x`d
^P1STREET("IS","pziaez","d`xfim")
mifx`d
^P1STREET("IS","pziaez","daxey")
yexad
^P1STREET("IS","pziaez","dbiaexim")
mixeaibd
^P1STREET("IS","pziaez","dbto")
otbd
^P1STREET("IS","pziaez","dexc")
cxed
^P1STREET("IS","pziaez","dgic""`")
`"cigd
^P1STREET("IS","pziaez","dgxy")
yxgd
^P1STREET("IS","pziaez","dixco")
ocxid
^P1STREET("IS","pziaez","dkezl")
lzekd
^P1STREET("IS","pziaez","dnrtil")
litrnd
^P1STREET("IS","pziaez","drlid")
dilrd
^P1STREET("IS","pziaez","dtln""g")
g"nltd
^P1STREET("IS","pziaez","dv`ld")
dl`vd
^P1STREET("IS","pziaez","dxa `lpwed")
dewpl` axd
^P1STREET("IS","pziaez","dxa gi dkdo")
odkd ig axd
^P1STREET("IS","pziaez","dxa piqim")
miqip axd
^P1STREET("IS","pziaez","dxa refi`l")
l`ifer axd
^P1STREET("IS","pziaez","dxa va`o")
o`av axd
^P1STREET("IS","pziaez","dxa wew")
wew axd
^P1STREET("IS","pziaez","dxna""m")
m"anxd
^P1STREET("IS","pziaez","dxveb")
bevxd
^P1STREET("IS","pziaez","dxya""i")
i"ayxd
^P1STREET("IS","pziaez","dz`pd")
dp`zd
^P1STREET("IS","pziaez","eivno")
onvie
^P1STREET("IS","pziaez","excineo")
oenicxe
^P1STREET("IS","pziaez","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","pziaez","ga""c")
c"ag
^P1STREET("IS","pziaez","gexi")
ixeg
^P1STREET("IS","pziaez","gfeo `iy")
yi` oefg
^P1STREET("IS","pziaez","gfpi")
ipfg
^P1STREET("IS","pziaez","gi hiia")
aiih ig
^P1STREET("IS","pziaez","gtu giim")
miig utg
^P1STREET("IS","pziaez","ieal")
laei
^P1STREET("IS","pziaez","ieqs dkdo")
odkd sqei
^P1STREET("IS","pziaez","ieqs qnle")
elnq sqei
^P1STREET("IS","pziaez","ilci `eqle")
elqe` icli
^P1STREET("IS","pziaez","kdo giim")
miig odk
^P1STREET("IS","pziaez","kkx idcez vxtz")
ztxv zecdi xkk
^P1STREET("IS","pziaez","lei `ykel")
leky` iel
^P1STREET("IS","pziaez","navr wcy")
ycw rvan
^P1STREET("IS","pziaez","nephitiexi")
ixeitihpen
^P1STREET("IS","pziaez","nlel")
leln
^P1STREET("IS","pziaez","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","pziaez","nyd""a")
a"dyn
^P1STREET("IS","pziaez","nyrel aile")
elia leryn
^P1STREET("IS","pziaez","peed pei")
iep deep
^P1STREET("IS","pziaez","phrim")
mirhp
^P1STREET("IS","pziaez","qipi")
ipiq
^P1STREET("IS","pziaez","vd""l")
l"dv
^P1STREET("IS","pziaez","vxtzi")
iztxv
^P1STREET("IS","pziaez","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","pziaez","wxiz nyd")
dyn zixw
^P1STREET("IS","pziaez","xai rwia`")
`aiwr iax
^P1STREET("IS","pziaez","xnz dbelo")
olebd znx
^P1STREET("IS","pziaez","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","pziaez","yc' dxvl")
lvxd 'cy
^P1STREET("IS","pziaez","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","pziaez","ylem aepiij")
jiipea mely
^P1STREET("IS","pziaez","ytix`")
`xity
^P1STREET("IS","pziaez","ytzi giim")
miig izty
^P1STREET("IS","pziaez","zexd enl`kd")
dk`lne dxez
^P1STREET("IS","pziaez","zwend")
dnewz
^P1STREET("IS","pzpid")
dipzp
^P1STREET("IS","pzpid","`""c bexceo")
oecxeb c"`
^P1STREET("IS","pzpid","`.v.b")
b.v.`
^P1STREET("IS","pzpid","`a` `gin`ix")
xi`nig` `a`
^P1STREET("IS","pzpid","`a` dll qilax")
xaliq lld `a`
^P1STREET("IS","pzpid","`ae gvix`")
`xivg ea`
^P1STREET("IS","pzpid","`ae ycic")
cicy ea`
^P1STREET("IS","pzpid","`airc")
cria`
^P1STREET("IS","pzpid","`ao baixel")
lexiab oa`
^P1STREET("IS","pzpid","`ao rfx`")
`xfr oa`
^P1STREET("IS","pzpid","`apx ao px")
xp oa xpa`
^P1STREET("IS","pzpid","`apx n`ix")
xi`n xpa`
^P1STREET("IS","pzpid","`axap`l")
l`paxa`
^P1STREET("IS","pzpid","`axdm")
mdxa`
^P1STREET("IS","pzpid","`axdm ytix`")
`xity mdxa`
^P1STREET("IS","pzpid","`cm dkdo")
odkd mc`
^P1STREET("IS","pzpid","`cnepiz")
zipenc`
^P1STREET("IS","pzpid","`dec")
ced`
^P1STREET("IS","pzpid","`dxeo")
oexd`
^P1STREET("IS","pzpid","`dxepeaiu")
uiaepexd`
^P1STREET("IS","pzpid","`dxepi ivgw")
wgvi ipexd`
^P1STREET("IS","pzpid","`dxepqeo")
oeqpexd`
^P1STREET("IS","pzpid","`em glc")
clg me`
^P1STREET("IS","pzpid","`eqiywio")
oiwyiqe`
^P1STREET("IS","pzpid","`exh")
hxe`
^P1STREET("IS","pzpid","`exid")
dixe`
^P1STREET("IS","pzpid","`g""i cwx")
xwc i"g`
^P1STREET("IS","pzpid","`gc drm")
mrd cg`
^P1STREET("IS","pzpid","`gxiz dinim")
minid zixg`
^P1STREET("IS","pzpid","`iix")
xii`
^P1STREET("IS","pzpid","`ikilea")
aeliki`
^P1STREET("IS","pzpid","`inax")
xani`
^P1STREET("IS","pzpid","`ixeq `xbno")
onbx` qexi`
^P1STREET("IS","pzpid","`lenez")
zenel`
^P1STREET("IS","pzpid","`lepi `a`")
`a` ipel`
^P1STREET("IS","pzpid","`les ycd")
dcy sel`
^P1STREET("IS","pzpid","`les yngepi")
ipegny sel`
^P1STREET("IS","pzpid","`lgxifi")
ifixgl`
^P1STREET("IS","pzpid","`li kdo")
odk il`
^P1STREET("IS","pzpid","`lide dblrci")
icrlbd edil`
^P1STREET("IS","pzpid","`liyr")
ryil`
^P1STREET("IS","pzpid","`lwlri")
irlwl`
^P1STREET("IS","pzpid","`nix")
xin`
^P1STREET("IS","pzpid","`npeo eznx")
xnze oepn`
^P1STREET("IS","pzpid","`nxi ieqs")
sqei ixn`
^P1STREET("IS","pzpid","`pheexto")
otxeehp`
^P1STREET("IS","pzpid","`pilaiu")
uialip`
^P1STREET("IS","pzpid","`pv'e qixpi")
ipxiq e'vp`
^P1STREET("IS","pzpid","`pve qixpi")
ipxiq evp`
^P1STREET("IS","pzpid","`qzx dnlkd")
dklnd xzq`
^P1STREET("IS","pzpid","`txim")
mixt`
^P1STREET("IS","pzpid","`tyhiio")
oiihyt`
^P1STREET("IS","pzpid","`v""l")
l"v`
^P1STREET("IS","pzpid","`x`l")
l`x`
^P1STREET("IS","pzpid","`xbno")
onbx`
^P1STREET("IS","pzpid","`xlefexea")
aexefelx`
^P1STREET("IS","pzpid","`xlij yngd")
dgny jilx`
^P1STREET("IS","pzpid","`xliu")
uilx`
^P1STREET("IS","pzpid","`y ylem")
mely y`
^P1STREET("IS","pzpid","`yx")
xy`
^P1STREET("IS","pzpid","a`xeo caexd")
dxeac oex`a
^P1STREET("IS","pzpid","a`xi")
ix`a
^P1STREET("IS","pzpid","aealiw bclide")
edilcb wilaea
^P1STREET("IS","pzpid","aeax nxhio")
oihxn xaea
^P1STREET("IS","pzpid","aeql")
lqea
^P1STREET("IS","pzpid","aexekea")
aekexea
^P1STREET("IS","pzpid","ai`liw")
wil`ia
^P1STREET("IS","pzpid","ail""e")
e"lia
^P1STREET("IS","pzpid","ailipqeo")
oeqpilia
^P1STREET("IS","pzpid","aiz glevez")
zevelg zia
^P1STREET("IS","pzpid","alao")
oala
^P1STREET("IS","pzpid","alenptlc")
cltpnela
^P1STREET("IS","pzpid","altex")
xetla
^P1STREET("IS","pzpid","alwipc prno")
onrp cpiwla
^P1STREET("IS","pzpid","ao `iy gi")
ig yi` oa
^P1STREET("IS","pzpid","ao `lirfx")
xfril` oa
^P1STREET("IS","pzpid","ao idecd")
dcedi oa
^P1STREET("IS","pzpid","ao ieqs ylnd")
dnly sqei oa
^P1STREET("IS","pzpid","ao n`ix")
xi`n oa
^P1STREET("IS","pzpid","ao rhx")
xhr oa
^P1STREET("IS","pzpid","ao vieo")
oeiv oa
^P1STREET("IS","pzpid","api apinio")
oinipa ipa
^P1STREET("IS","pzpid","ax `ilo")
oli` xa
^P1STREET("IS","pzpid","ax idecd")
dcedi xa
^P1STREET("IS","pzpid","ax keka`")
`akek xa
^P1STREET("IS","pzpid","ax la")
al xa
^P1STREET("IS","pzpid","axec")
cexa
^P1STREET("IS","pzpid","axecvwi")
iwvcexa
^P1STREET("IS","pzpid","axexid")
dixexa
^P1STREET("IS","pzpid","axh `dxeo")
oexd` hxa
^P1STREET("IS","pzpid","axhpex`")
`xephxa
^P1STREET("IS","pzpid","axkd ynreo")
oerny dkxa
^P1STREET("IS","pzpid","axpx")
xpxa
^P1STREET("IS","pzpid","axw")
wxa
^P1STREET("IS","pzpid","axwz")
zwxa
^P1STREET("IS","pzpid","azi tewqeo")
oeqwet iza
^P1STREET("IS","pzpid","baexi pivpim")
mipvip ixeab
^P1STREET("IS","pzpid","bar")
rab
^P1STREET("IS","pzpid","barz giim")
miig zrab
^P1STREET("IS","pzpid","bc nkpq")
qpkn cb
^P1STREET("IS","pzpid","bc npld")
dlpn cb
^P1STREET("IS","pzpid","bcreo")
oercb
^P1STREET("IS","pzpid","behnkx `lide")
edil` xknheb
^P1STREET("IS","pzpid","behno pgem")
megp onheb
^P1STREET("IS","pzpid","belena")
aneleb
^P1STREET("IS","pzpid","beli wpid")
dipw ileb
^P1STREET("IS","pzpid","bexliu")
uilxeb
^P1STREET("IS","pzpid","biaexi iyx`l")
l`xyi ixeaib
^P1STREET("IS","pzpid","blbli dtlcd")
dcltd ilblb
^P1STREET("IS","pzpid","bliwqeo")
oeqwilb
^P1STREET("IS","pzpid","bxepx ca")
ac xpexb
^P1STREET("IS","pzpid","bxipaeim")
mieapixb
^P1STREET("IS","pzpid","bxipaxb")
bxapixb
^P1STREET("IS","pzpid","bxpceq")
qecpxb
^P1STREET("IS","pzpid","bxu")
uxb
^P1STREET("IS","pzpid","c""x `nix")
xin` x"c
^P1STREET("IS","pzpid","c""x awno")
onwa x"c
^P1STREET("IS","pzpid","c""x idecd txg")
gxt dcedi x"c
^P1STREET("IS","pzpid","ca def")
fed ac
^P1STREET("IS","pzpid","caexd")
dxeac
^P1STREET("IS","pzpid","caxi giim")
miig ixac
^P1STREET("IS","pzpid","cbpid")
dipbc
^P1STREET("IS","pzpid","ceapea")
aepaec
^P1STREET("IS","pzpid","cec dnlj")
jlnd cec
^P1STREET("IS","pzpid","cekitz")
ztikec
^P1STREET("IS","pzpid","cepd bxvid")
divxb dpec
^P1STREET("IS","pzpid","ceyi rxw")
wxr iyec
^P1STREET("IS","pzpid","cifpbes")
sebpfic
^P1STREET("IS","pzpid","ciio yne`l")
l`eny oiic
^P1STREET("IS","pzpid","cpi`l")
l`ipc
^P1STREET("IS","pzpid","cpwpx")
xpwpc
^P1STREET("IS","pzpid","cx' dim")
mid 'xc
^P1STREET("IS","pzpid","cxex")
xexc
^P1STREET("IS","pzpid","cxex ylnd")
dnly xexc
^P1STREET("IS","pzpid","cxj dcxem")
mexcd jxc
^P1STREET("IS","pzpid","cxj dixco")
ocxid jxc
^P1STREET("IS","pzpid","cxj dxkaz")
zakxd jxc
^P1STREET("IS","pzpid","d 93")
93 d
^P1STREET("IS","pzpid","d`bef")
feb`d
^P1STREET("IS","pzpid","d`bxd")
dxb`d
^P1STREET("IS","pzpid","d`cne""x neifpiu")
uipfien x"enc`d
^P1STREET("IS","pzpid","d`enpez")
zepne`d
^P1STREET("IS","pzpid","d`epiaxqihd")
dhiqxaipe`d
^P1STREET("IS","pzpid","d`exb")
bxe`d
^P1STREET("IS","pzpid","d`exfim")
mifxe`d
^P1STREET("IS","pzpid","d`exo")
oxe`d
^P1STREET("IS","pzpid","d`expim")
mipxe`d
^P1STREET("IS","pzpid","d`ixiqim")
miqixi`d
^P1STREET("IS","pzpid","d`leo")
oel`d
^P1STREET("IS","pzpid","d`nex`im")
mi`xen`d
^P1STREET("IS","pzpid","d`pid `xiptexd")
dxetpix` dip`d
^P1STREET("IS","pzpid","d`x""i")
i"x`d
^P1STREET("IS","pzpid","d`yl")
ly`d
^P1STREET("IS","pzpid","d`zxeb")
bexz`d
^P1STREET("IS","pzpid","daepim")
mipead
^P1STREET("IS","pzpid","daikexim")
mixekiad
^P1STREET("IS","pzpid","daxaex")
xeaxad
^P1STREET("IS","pzpid","daxibcd dideciz")
zicedid dcbixad
^P1STREET("IS","pzpid","db`eld")
dle`bd
^P1STREET("IS","pzpid","db`epim")
mipe`bd
^P1STREET("IS","pzpid","dbaiy")
yiabd
^P1STREET("IS","pzpid","dbcec draxi")
ixard cecbd
^P1STREET("IS","pzpid","dbefl")
lfebd
^P1STREET("IS","pzpid","dbelo")
olebd
^P1STREET("IS","pzpid","dbiaexim")
mixeaibd
^P1STREET("IS","pzpid","dbild")
dlibd
^P1STREET("IS","pzpid","dblaer")
realbd
^P1STREET("IS","pzpid","dblil")
lilbd
^P1STREET("IS","pzpid","dblrci")
icrlbd
^P1STREET("IS","pzpid","dbto")
otbd
^P1STREET("IS","pzpid","dbx axej")
jexa xbd
^P1STREET("IS","pzpid","dbx""`")
`"xbd
^P1STREET("IS","pzpid","dcec`im")
mi`cecd
^P1STREET("IS","pzpid","dcliez")
zeilcd
^P1STREET("IS","pzpid","dcq")
qcd
^P1STREET("IS","pzpid","dcwl")
lwcd
^P1STREET("IS","pzpid","ddbpd")
dpbdd
^P1STREET("IS","pzpid","ddcx")
xcdd
^P1STREET("IS","pzpid","ddqzcxez")
zexczqdd
^P1STREET("IS","pzpid","ddxces")
secxdd
^P1STREET("IS","pzpid","ddykld")
dlkydd
^P1STREET("IS","pzpid","deiqnpq wnil")
linw qpnqied
^P1STREET("IS","pzpid","delpc")
cpled
^P1STREET("IS","pzpid","dexcim")
micxed
^P1STREET("IS","pzpid","dfiz")
zifd
^P1STREET("IS","pzpid","dfnix")
xinfd
^P1STREET("IS","pzpid","dgefd nlealio")
oilaeln dfegd
^P1STREET("IS","pzpid","dges")
segd
^P1STREET("IS","pzpid","dgihd")
dhigd
^P1STREET("IS","pzpid","dgipej draxi")
ixard jepigd
^P1STREET("IS","pzpid","dglevim")
mivelgd
^P1STREET("IS","pzpid","dgqicd")
dciqgd
^P1STREET("IS","pzpid","dgvaim")
miavgd
^P1STREET("IS","pzpid","dgxea")
aexgd
^P1STREET("IS","pzpid","dgxevim")
mivexgd
^P1STREET("IS","pzpid","dgynep`im")
mi`penygd
^P1STREET("IS","pzpid","dhex")
xehd
^P1STREET("IS","pzpid","dhexim")
mixehd
^P1STREET("IS","pzpid","didlem")
meldid
^P1STREET("IS","pzpid","didleno `axdnq")
qndxa` oneldid
^P1STREET("IS","pzpid","diexcim")
micxeid
^P1STREET("IS","pzpid","divixd")
dxivid
^P1STREET("IS","pzpid","dkcx")
xckd
^P1STREET("IS","pzpid","dkeayim")
miyaekd
^P1STREET("IS","pzpid","dklpiz")
ziplkd
^P1STREET("IS","pzpid","dkxnl")
lnxkd
^P1STREET("IS","pzpid","dl""d")
d"ld
^P1STREET("IS","pzpid","dlapeo")
oepald
^P1STREET("IS","pzpid","dltxio ixnide")
edinxi oixtld
^P1STREET("IS","pzpid","dltxio nik`l")
l`kin oixtld
^P1STREET("IS","pzpid","dnbic")
cibnd
^P1STREET("IS","pzpid","dncr")
rcnd
^P1STREET("IS","pzpid","dngwx")
xwgnd
^P1STREET("IS","pzpid","dngya")
aygnd
^P1STREET("IS","pzpid","dniiqcim")
micqiind
^P1STREET("IS","pzpid","dnl`kd")
dk`lnd
^P1STREET("IS","pzpid","dnliu")
uilnd
^P1STREET("IS","pzpid","dnlj y`el")
le`y jlnd
^P1STREET("IS","pzpid","dnlkim")
miklnd
^P1STREET("IS","pzpid","dnqbx")
xbqnd
^P1STREET("IS","pzpid","dnrtilim")
militrnd
^P1STREET("IS","pzpid","dnxbpiz")
zipbxnd
^P1STREET("IS","pzpid","dnxc")
cxnd
^P1STREET("IS","pzpid","dnxkad")
dakxnd
^P1STREET("IS","pzpid","dnznic")
cinznd
^P1STREET("IS","pzpid","dpai`im")
mi`iapd
^P1STREET("IS","pzpid","dpba")
abpd
^P1STREET("IS","pzpid","dpbx")
xbpd
^P1STREET("IS","pzpid","dpehr")
rhepd
^P1STREET("IS","pzpid","dpexiz")
zixepd
^P1STREET("IS","pzpid","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","pzpid","dpxwiq")
qiwxpd
^P1STREET("IS","pzpid","dpyx")
xypd
^P1STREET("IS","pzpid","dq")
qd
^P1STREET("IS","pzpid","draecd")
dceard
^P1STREET("IS","pzpid","drenx")
xnerd
^P1STREET("IS","pzpid","drlid")
dilrd
^P1STREET("IS","pzpid","drnl")
lnrd
^P1STREET("IS","pzpid","dterl dvrix")
xirvd lretd
^P1STREET("IS","pzpid","dtexvim")
mivxetd
^P1STREET("IS","pzpid","dtlcd")
dcltd
^P1STREET("IS","pzpid","dtxbim")
mibxtd
^P1STREET("IS","pzpid","dtxcq")
qcxtd
^P1STREET("IS","pzpid","dvexo")
oxevd
^P1STREET("IS","pzpid","dvpgpim")
mipgpvd
^P1STREET("IS","pzpid","dvtixd")
dxitvd
^P1STREET("IS","pzpid","dwalpim")
miplawd
^P1STREET("IS","pzpid","dwlix")
xilwd
^P1STREET("IS","pzpid","dx daiz")
ziad xd
^P1STREET("IS","pzpid","dx nixeo")
oexin xd
^P1STREET("IS","pzpid","dx vieo")
oeiv xd
^P1STREET("IS","pzpid","dxa `ephxno")
onxhpe` axd
^P1STREET("IS","pzpid","dxa `txim `lpweed")
deewpl` mixt` axd
^P1STREET("IS","pzpid","dxa belc")
cleb axd
^P1STREET("IS","pzpid","dxa dkdo dpfix")
xifpd odkd axd
^P1STREET("IS","pzpid","dxa dlaxyhh")
hhyxald axd
^P1STREET("IS","pzpid","dxa dlaxyhiio")
oiihyxald axd
^P1STREET("IS","pzpid","dxa fe`xu")
ux`ef axd
^P1STREET("IS","pzpid","dxa gi hiia")
aiih ig axd
^P1STREET("IS","pzpid","dxa helcpe")
epcleh axd
^P1STREET("IS","pzpid","dxa i`pd")
dp`i axd
^P1STREET("IS","pzpid","dxa icicid txpwl")
lwpxt dicici axd
^P1STREET("IS","pzpid","dxa l`e")
e`l axd
^P1STREET("IS","pzpid","dxa leio `xid")
dix` oiel axd
^P1STREET("IS","pzpid","dxa nf`""d")
d"`fn axd
^P1STREET("IS","pzpid","dxa niineo")
oeniin axd
^P1STREET("IS","pzpid","dxa wew")
wew axd
^P1STREET("IS","pzpid","dxa wliyx")
xyilw axd
^P1STREET("IS","pzpid","dxa xiipq")
qpiix axd
^P1STREET("IS","pzpid","dxa xt`l `pw`eed")
dee`wp` l`tx axd
^P1STREET("IS","pzpid","dxhea")
aehxd
^P1STREET("IS","pzpid","dxhem")
mehxd
^P1STREET("IS","pzpid","dxi""s")
s"ixd
^P1STREET("IS","pzpid","dxineo")
oenixd
^P1STREET("IS","pzpid","dxka")
akxd
^P1STREET("IS","pzpid","dxn""`")
`"nxd
^P1STREET("IS","pzpid","dxrez")
zerxd
^P1STREET("IS","pzpid","dxveb")
bevxd
^P1STREET("IS","pzpid","dxvl")
lvxd
^P1STREET("IS","pzpid","dxwtz")
ztwxd
^P1STREET("IS","pzpid","dyard")
drayd
^P1STREET("IS","pzpid","dyenx")
xneyd
^P1STREET("IS","pzpid","dyethim")
mihteyd
^P1STREET("IS","pzpid","dyeypd")
dpyeyd
^P1STREET("IS","pzpid","dygs")
sgyd
^P1STREET("IS","pzpid","dygx")
xgyd
^P1STREET("IS","pzpid","dyiy")
yiyd
^P1STREET("IS","pzpid","dyleg")
gelyd
^P1STREET("IS","pzpid","dyrexd")
dxeryd
^P1STREET("IS","pzpid","dywc")
cwyd
^P1STREET("IS","pzpid","dywnd")
dnwyd
^P1STREET("IS","pzpid","dz`pd")
dp`zd
^P1STREET("IS","pzpid","dzdild")
dlidzd
^P1STREET("IS","pzpid","dzex")
xezd
^P1STREET("IS","pzpid","dznx")
xnzd
^P1STREET("IS","pzpid","dzp`im")
mi`pzd
^P1STREET("IS","pzpid","dzwetd")
dtewzd
^P1STREET("IS","pzpid","dzxetd")
dtexzd
^P1STREET("IS","pzpid","eelj iepd")
dpei jlee
^P1STREET("IS","pzpid","eeltqeo")
oeqtlee
^P1STREET("IS","pzpid","eexpx")
xpxee
^P1STREET("IS","pzpid","eipx pgnd")
dngp xpie
^P1STREET("IS","pzpid","eiq irwa")
awri qie
^P1STREET("IS","pzpid","eiqaexb")
bxeaqie
^P1STREET("IS","pzpid","eiqlaxbx")
xbxalqie
^P1STREET("IS","pzpid","eizwio")
oiwzie
^P1STREET("IS","pzpid","ericz dlqipwi")
iwpiqld zcire
^P1STREET("IS","pzpid","f'ilax tiix")
xiit xali'f
^P1STREET("IS","pzpid","f`a liax")
xail a`f
^P1STREET("IS","pzpid","faeleo")
oeleaf
^P1STREET("IS","pzpid","fdaiz")
ziadf
^P1STREET("IS","pzpid","fenxyhiio")
oiihyxnef
^P1STREET("IS","pzpid","fiic `lkqpcx")
xcpqkl` ciif
^P1STREET("IS","pzpid","flno `xo")
ox` onlf
^P1STREET("IS","pzpid","flno yf""x")
x"fy onlf
^P1STREET("IS","pzpid","fnad")
danf
^P1STREET("IS","pzpid","fnpdes")
sedpnf
^P1STREET("IS","pzpid","fpbail")
liabpf
^P1STREET("IS","pzpid","ga""c")
c"ag
^P1STREET("IS","pzpid","gaiad xiiw")
wiix daiag
^P1STREET("IS","pzpid","gavlz dges")
segd zlvag
^P1STREET("IS","pzpid","gawew")
wewag
^P1STREET("IS","pzpid","gbi")
ibg
^P1STREET("IS","pzpid","gceed")
deecg
^P1STREET("IS","pzpid","geknz iyx`l")
l`xyi znkeg
^P1STREET("IS","pzpid","gelcd")
dcleg
^P1STREET("IS","pzpid","gexbio")
oibxeg
^P1STREET("IS","pzpid","gfpi")
ipfg
^P1STREET("IS","pzpid","gh' barzi")
izrab 'hg
^P1STREET("IS","pzpid","ghiaz `lkqpcxepi")
ipexcpqkl` zaihg
^P1STREET("IS","pzpid","ghiaz dx`l")
l`xd zaihg
^P1STREET("IS","pzpid","giaz vieo")
oeiv zaig
^P1STREET("IS","pzpid","giez")
zeig
^P1STREET("IS","pzpid","giilim nyegxxim")
mixxgeyn miliig
^P1STREET("IS","pzpid","giim dff")
ffd miig
^P1STREET("IS","pzpid","giim lapeo")
oepal miig
^P1STREET("IS","pzpid","glnepiz")
zipenlg
^P1STREET("IS","pzpid","gpd qpy")
ypq dpg
^P1STREET("IS","pzpid","gtu giim")
miig utg
^P1STREET("IS","pzpid","gtviad")
daivtg
^P1STREET("IS","pzpid","gxl""t")
t"lxg
^P1STREET("IS","pzpid","gxviz")
zivxg
^P1STREET("IS","pzpid","gzm qetx")
xteq mzg
^P1STREET("IS","pzpid","haia `axdm")
mdxa` aiah
^P1STREET("IS","pzpid","haz")
zah
^P1STREET("IS","pzpid","hdeo ideyr")
ryedi oedh
^P1STREET("IS","pzpid","hienwio")
oiwneih
^P1STREET("IS","pzpid","hxentlcex")
xecltnexh
^P1STREET("IS","pzpid","hxteo")
oetxh
^P1STREET("IS","pzpid","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","pzpid","i""l txu")
uxt l"i
^P1STREET("IS","pzpid","i`ix")
xi`i
^P1STREET("IS","pzpid","iapd")
dpai
^P1STREET("IS","pzpid","ib`l icio")
oici l`bi
^P1STREET("IS","pzpid","ic dglevim")
mivelgd ci
^P1STREET("IS","pzpid","ic gxevim")
mivexg ci
^P1STREET("IS","pzpid","idecd aekpx")
xpkea dcedi
^P1STREET("IS","pzpid","idecd dlei")
ield dcedi
^P1STREET("IS","pzpid","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","pzpid","ideyr ao peo")
oep oa ryedi
^P1STREET("IS","pzpid","ie`a")
a`ei
^P1STREET("IS","pzpid","iectz")
ztcei
^P1STREET("IS","pzpid","iegpo ao fk`i")
i`kf oa opgei
^P1STREET("IS","pzpid","iegpo dqpclx")
xlcpqd opgei
^P1STREET("IS","pzpid","iepd dpai`")
`iapd dpei
^P1STREET("IS","pzpid","ieqi ao ieqi")
iqei oa iqei
^P1STREET("IS","pzpid","ieqs")
sqei
^P1STREET("IS","pzpid","ieqs `itxbo")
obxti` sqei
^P1STREET("IS","pzpid","ieqs dpyi`")
`iypd sqei
^P1STREET("IS","pzpid","ieqthl")
lhtqei
^P1STREET("IS","pzpid","iezm")
mzei
^P1STREET("IS","pzpid","igfw`l")
l`wfgi
^P1STREET("IS","pzpid","igid dlei")
ield digi
^P1STREET("IS","pzpid","il""b")
b"li
^P1STREET("IS","pzpid","ilio")
oili
^P1STREET("IS","pzpid","ip`i")
i`pi
^P1STREET("IS","pzpid","ipea")
aepi
^P1STREET("IS","pzpid","iqnio")
oinqi
^P1STREET("IS","pzpid","irau")
uari
^P1STREET("IS","pzpid","irwa cexi")
ixec awri
^P1STREET("IS","pzpid","itd liia `xid")
dix` aiil dti
^P1STREET("IS","pzpid","itzg")
gzti
^P1STREET("IS","pzpid","ivgw ao gpo")
opg oa wgvi
^P1STREET("IS","pzpid","ivgw dlei naxciv'a")
a'vicxan ield wgvi
^P1STREET("IS","pzpid","ivgw dptg")
gtpd wgvi
^P1STREET("IS","pzpid","ivgw necri")
ircen wgvi
^P1STREET("IS","pzpid","ivgw ycd")
dcy wgvi
^P1STREET("IS","pzpid","iwipheo")
oehpiwi
^P1STREET("IS","pzpid","ixeylim")
milyexi
^P1STREET("IS","pzpid","ixnide")
edinxi
^P1STREET("IS","pzpid","iyride")
ediryi
^P1STREET("IS","pzpid","iyx`l blili")
ililb l`xyi
^P1STREET("IS","pzpid","iyykx")
xkyyi
^P1STREET("IS","pzpid","kkx dbaexim")
mixeabd xkk
^P1STREET("IS","pzpid","kkx drvn`ez")
ze`nvrd xkk
^P1STREET("IS","pzpid","kkx vieo")
oeiv xkk
^P1STREET("IS","pzpid","kkx yxd")
dxy xkk
^P1STREET("IS","pzpid","ktx ricec")
cecir xtk
^P1STREET("IS","pzpid","ktx zaex")
xeaz xtk
^P1STREET("IS","pzpid","kvplqeo ivgw")
wgvi oeqlpvk
^P1STREET("IS","pzpid","l`d belcaxb")
bxacleb d`l
^P1STREET("IS","pzpid","laeo tpgq")
qgpt oeal
^P1STREET("IS","pzpid","laephio")
oihpeal
^P1STREET("IS","pzpid","leahwio")
oiwhael
^P1STREET("IS","pzpid","lei `ykel")
leky` iel
^P1STREET("IS","pzpid","lg""i")
i"gl
^P1STREET("IS","pzpid","liaqwipc")
cpiwqail
^P1STREET("IS","pzpid","lilipalem")
melapilil
^P1STREET("IS","pzpid","lilj")
jlil
^P1STREET("IS","pzpid","liypqwi")
iwqpyil
^P1STREET("IS","pzpid","lpc`e yne`l")
l`eny e`cpl
^P1STREET("IS","pzpid","lqwea")
aewql
^P1STREET("IS","pzpid","n`ix giim")
miig xi`n
^P1STREET("IS","pzpid","n`ixeaiu")
uiaexi`n
^P1STREET("IS","pzpid","n`pd")
dp`n
^P1STREET("IS","pzpid","nedliax")
xailden
^P1STREET("IS","pzpid","nel rnpe`l")
l`epnr len
^P1STREET("IS","pzpid","nephitiexi")
ixeitihpen
^P1STREET("IS","pzpid","neqipfeo ib`l")
l`bi oefpiqen
^P1STREET("IS","pzpid","nevwio")
oiwven
^P1STREET("IS","pzpid","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","pzpid","nexid")
dixen
^P1STREET("IS","pzpid","ngpd irwa")
awri dpgn
^P1STREET("IS","pzpid","nheld")
dlehn
^P1STREET("IS","pzpid","nik""l")
l"kin
^P1STREET("IS","pzpid","nikd")
dkin
^P1STREET("IS","pzpid","nipu")
upin
^P1STREET("IS","pzpid","nl`ki")
ik`ln
^P1STREET("IS","pzpid","nlao cexd")
dxec oaln
^P1STREET("IS","pzpid","nlgnz yyz dinim")
minid zyy zngln
^P1STREET("IS","pzpid","nlkio yxd")
dxy oikln
^P1STREET("IS","pzpid","npcli nekx qtxim")
mixtq xken ilcpn
^P1STREET("IS","pzpid","npclqeo")
oeqlcpn
^P1STREET("IS","pzpid","npgm abio")
oiba mgpn
^P1STREET("IS","pzpid","npgm qaicex")
xeciaq mgpn
^P1STREET("IS","pzpid","nqcd")
dcqn
^P1STREET("IS","pzpid","nqilez")
zeliqn
^P1STREET("IS","pzpid","nqxiw")
wixqn
^P1STREET("IS","pzpid","nraxz `aix")
xia` zxarn
^P1STREET("IS","pzpid","nrtili `bef")
feb` ilitrn
^P1STREET("IS","pzpid","nwceplc")
clpecwn
^P1STREET("IS","pzpid","nxcki bex")
xeb ikcxn
^P1STREET("IS","pzpid","nxcki nwls")
slwn ikcxn
^P1STREET("IS","pzpid","nxe`pi nkles")
selkn ip`exn
^P1STREET("IS","pzpid","nxim")
mixn
^P1STREET("IS","pzpid","nxw `axdm")
mdxa` wxn
^P1STREET("IS","pzpid","nyd leio")
oiel dyn
^P1STREET("IS","pzpid","nyd qpd")
dpq dyn
^P1STREET("IS","pzpid","nyd ytix`")
`xity dyn
^P1STREET("IS","pzpid","nynx dixco")
ocxid xnyn
^P1STREET("IS","pzpid","nzzide dkdo")
odkd edizzn
^P1STREET("IS","pzpid","nzzide n`ix")
xi`n edizzn
^P1STREET("IS","pzpid","p`ez dzklz")
zlkzd ze`p
^P1STREET("IS","pzpid","p`ez ywc")
cwy ze`p
^P1STREET("IS","pzpid","ped `a`")
`a` dep
^P1STREET("IS","pzpid","peed ylem")
mely deep
^P1STREET("IS","pzpid","peitlc")
cltiep
^P1STREET("IS","pzpid","pexc`e")
e`cxep
^P1STREET("IS","pzpid","pexew")
wexep
^P1STREET("IS","pzpid","pgem")
megp
^P1STREET("IS","pzpid","pgnid")
dingp
^P1STREET("IS","pzpid","picgi iyx`l")
l`xyi igcip
^P1STREET("IS","pzpid","pil""i")
i"lip
^P1STREET("IS","pzpid","piqpaeim")
mieapqip
^P1STREET("IS","pzpid","pvg iyx`l")
l`xyi gvp
^P1STREET("IS","pzpid","px dlild")
dlild xp
^P1STREET("IS","pzpid","pzo dnyexx")
xxeynd ozp
^P1STREET("IS","pzpid","qaieo")
oeiaq
^P1STREET("IS","pzpid","qewelea")
aeleweq
^P1STREET("IS","pzpid","qgla")
algq
^P1STREET("IS","pzpid","qhecie")
eicehq
^P1STREET("IS","pzpid","qhet `axdm")
mdxa` tehq
^P1STREET("IS","pzpid","qhxend")
dnexhq
^P1STREET("IS","pzpid","qibliz")
zilbiq
^P1STREET("IS","pzpid","qipi")
ipiq
^P1STREET("IS","pzpid","qixwio")
oiwxiq
^P1STREET("IS","pzpid","qleneo ie`l")
l`ei oenelq
^P1STREET("IS","pzpid","qlet`")
`telq
^P1STREET("IS","pzpid","qn' zt`xz apim")
mipa zx`tz 'nq
^P1STREET("IS","pzpid","qnhz `npeo eznx")
xnze oepn` zhnq
^P1STREET("IS","pzpid","qnhz dlehm")
mheld zhnq
^P1STREET("IS","pzpid","qnhz nkles bc")
cb selkn zhnq
^P1STREET("IS","pzpid","qnhz yail dztefim")
mifetzd liay zhnq
^P1STREET("IS","pzpid","qnilpqwi")
iwqplinq
^P1STREET("IS","pzpid","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","pzpid","qtix")
xitq
^P1STREET("IS","pzpid","reacid `axdm")
mdxa` dicaer
^P1STREET("IS","pzpid","reli dbxcem")
mecxbd iler
^P1STREET("IS","pzpid","reli qicwea")
aewciq iler
^P1STREET("IS","pzpid","rely nvei")
ievn yler
^P1STREET("IS","pzpid","rfx`")
`xfr
^P1STREET("IS","pzpid","rixiz")
zixir
^P1STREET("IS","pzpid","rlid")
dilr
^P1STREET("IS","pzpid","rneq")
qenr
^P1STREET("IS","pzpid","rni`l")
l`inr
^P1STREET("IS","pzpid","rnix")
xinr
^P1STREET("IS","pzpid","rnix `pcd")
dcp` xinr
^P1STREET("IS","pzpid","rnw gtx")
xtg wnr
^P1STREET("IS","pzpid","rvieo")
oeivr
^P1STREET("IS","pzpid","texx ylem")
mely xxet
^P1STREET("IS","pzpid","tiix wpib")
bipw xiit
^P1STREET("IS","pzpid","tiixaxb")
bxaxiit
^P1STREET("IS","pzpid","tikno")
onkit
^P1STREET("IS","pzpid","tipq")
qpit
^P1STREET("IS","pzpid","tipqwx")
xwqpit
^P1STREET("IS","pzpid","tlebz nkai")
iakn zbelt
^P1STREET("IS","pzpid","tln""g")
g"nlt
^P1STREET("IS","pzpid","tpgq xefo")
ofex qgpt
^P1STREET("IS","pzpid","tpwq cec")
cec qwpt
^P1STREET("IS","pzpid","trnepiz")
zipenrt
^P1STREET("IS","pzpid","txcq qnih")
hinq qcxt
^P1STREET("IS","pzpid","txeb ynreo")
oerny bext
^P1STREET("IS","pzpid","txenwio")
oiwnext
^P1STREET("IS","pzpid","txeqh `dxeo")
oexd` hqext
^P1STREET("IS","pzpid","txet' `ipyhiio")
oiihypi` 'text
^P1STREET("IS","pzpid","txet' yex")
xey 'text
^P1STREET("IS","pzpid","txetq `dxeo vai")
iav oexd` qtext
^P1STREET("IS","pzpid","txicno")
oncixt
^P1STREET("IS","pzpid","txicx")
xcixt
^P1STREET("IS","pzpid","txiyno")
onyixt
^P1STREET("IS","pzpid","tzg zwed")
dewz gzt
^P1STREET("IS","pzpid","v'xv'il")
li'vx'v
^P1STREET("IS","pzpid","varepi")
iperav
^P1STREET("IS","pzpid","vaxi giim")
miig ixav
^P1STREET("IS","pzpid","vewi im")
mi iwev
^P1STREET("IS","pzpid","vexo")
oxev
^P1STREET("IS","pzpid","viihlio")
oilhiiv
^P1STREET("IS","pzpid","vitexo")
oxetiv
^P1STREET("IS","pzpid","vixlqeo")
oeqlxiv
^P1STREET("IS","pzpid","vtpid")
diptv
^P1STREET("IS","pzpid","w`tg igid")
digi gt`w
^P1STREET("IS","pzpid","w`xe")
ex`w
^P1STREET("IS","pzpid","waeu `ilz")
zli` ueaw
^P1STREET("IS","pzpid","waeu bleiez")
zeielb ueaw
^P1STREET("IS","pzpid","wceyi alfo")
ofla iyecw
^P1STREET("IS","pzpid","wceyi rixw")
wxir iyecw
^P1STREET("IS","pzpid","wcnd")
dncw
^P1STREET("IS","pzpid","wcy")
ycw
^P1STREET("IS","pzpid","wenei pzo")
ozp ienew
^P1STREET("IS","pzpid","wexv'w i`pey")
yep`i w'vxew
^P1STREET("IS","pzpid","wiy")
yiw
^P1STREET("IS","pzpid","wl`efpx")
xpfe`lw
^P1STREET("IS","pzpid","wlefpx")
xpfelw
^P1STREET("IS","pzpid","wpci")
icpw
^P1STREET("IS","pzpid","wtlo")
oltw
^P1STREET("IS","pzpid","wtlpqwi")
iwqpltw
^P1STREET("IS","pzpid","wwl")
lww
^P1STREET("IS","pzpid","wx`efd")
dfe`xw
^P1STREET("IS","pzpid","wxipivi")
ivipixw
^P1STREET("IS","pzpid","wxiz `lirfx")
xfril` zixw
^P1STREET("IS","pzpid","wxizi")
izixw
^P1STREET("IS","pzpid","wxliaj")
jailxw
^P1STREET("IS","pzpid","wxnpi`o nyd")
dyn o`ipnxw
^P1STREET("IS","pzpid","wxo diqec")
ceqid oxw
^P1STREET("IS","pzpid","x`eao")
oae`x
^P1STREET("IS","pzpid","x`h")
h`x
^P1STREET("IS","pzpid","x`y tipd")
dpit y`x
^P1STREET("IS","pzpid","x`yeo lvieo")
oeivl oey`x
^P1STREET("IS","pzpid","xa `yi")
iy` ax
^P1STREET("IS","pzpid","xai ivgw naxciv'a")
a'vicxan wgvi iax
^P1STREET("IS","pzpid","xai rwia`")
`aiwr iax
^P1STREET("IS","pzpid","xao bnli`l")
l`ilnb oax
^P1STREET("IS","pzpid","xba `xid")
dix` abx
^P1STREET("IS","pzpid","xc""w")
w"cx
^P1STREET("IS","pzpid","xehpaxb")
bxaphex
^P1STREET("IS","pzpid","xetio")
oitex
^P1STREET("IS","pzpid","xewg")
gwex
^P1STREET("IS","pzpid","xez dne`aid")
dia`end zex
^P1STREET("IS","pzpid","xezm")
mzex
^P1STREET("IS","pzpid","xfi`l")
l`ifx
^P1STREET("IS","pzpid","xfpiw cec")
cec wipfx
^P1STREET("IS","pzpid","xg' 160")
160 'gx
^P1STREET("IS","pzpid","xg' 557")
557 'gx
^P1STREET("IS","pzpid","xg' 558")
558 'gx
^P1STREET("IS","pzpid","xg' 561")
561 'gx
^P1STREET("IS","pzpid","xgl dnyexxz")
zxxeynd lgx
^P1STREET("IS","pzpid","xialio")
oilaix
^P1STREET("IS","pzpid","xiij l`eo")
oe`l jiix
^P1STREET("IS","pzpid","xineo i.v.")
.v.i oenix
^P1STREET("IS","pzpid","xm axej")
jexa mx
^P1STREET("IS","pzpid","xna""m")
m"anx
^P1STREET("IS","pzpid","xna""o")
o"anx
^P1STREET("IS","pzpid","xnad `ifiw")
wifi` danx
^P1STREET("IS","pzpid","xnf cec")
cec fnx
^P1STREET("IS","pzpid","xy""i")
i"yx
^P1STREET("IS","pzpid","y `li kdo")
odk il` y
^P1STREET("IS","pzpid","yafi")
ifay
^P1STREET("IS","pzpid","yag")
gay
^P1STREET("IS","pzpid","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","pzpid","yc' `lirfx")
xfril` 'cy
^P1STREET("IS","pzpid","yc' `pcxieq")
qeixcp` 'cy
^P1STREET("IS","pzpid","yc' ao `a""i")
i"a` oa 'cy
^P1STREET("IS","pzpid","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","pzpid","yc' ao vai")
iav oa 'cy
^P1STREET("IS","pzpid","yc' apinio")
oinipa 'cy
^P1STREET("IS","pzpid","yc' belcd n`ix")
xi`n dcleb 'cy
^P1STREET("IS","pzpid","yc' dzperd dviepiz")
zipeivd drepzd 'cy
^P1STREET("IS","pzpid","yc' eivno")
onvie 'cy
^P1STREET("IS","pzpid","yc' f'aehipqwi")
iwqpihea'f 'cy
^P1STREET("IS","pzpid","yc' g""o")
o"g 'cy
^P1STREET("IS","pzpid","yc' pivd")
dvip 'cy
^P1STREET("IS","pzpid","yc' reac ao rni")
inr oa caer 'cy
^P1STREET("IS","pzpid","yc' rio dzklz")
zlkzd oir 'cy
^P1STREET("IS","pzpid","yc' vxtz")
ztxv 'cy
^P1STREET("IS","pzpid","yc' ynyeo")
oeyny 'cy
^P1STREET("IS","pzpid","yea cec")
cec aey
^P1STREET("IS","pzpid","yedm")
mdey
^P1STREET("IS","pzpid","yeexvax`c ylem")
mely c`xavxeey
^P1STREET("IS","pzpid","yg""l")
l"gy
^P1STREET("IS","pzpid","yhiibx")
xbiihy
^P1STREET("IS","pzpid","yhnttx ideyr")
ryedi xttnhy
^P1STREET("IS","pzpid","yhpc")
cphy
^P1STREET("IS","pzpid","yhxiwx")
xwixhy
^P1STREET("IS","pzpid","yi rbpeo")
oepbr iy
^P1STREET("IS","pzpid","yihxiz")
zixhiy
^P1STREET("IS","pzpid","yitx irwa")
awri xtiy
^P1STREET("IS","pzpid","ykhxno")
onxhky
^P1STREET("IS","pzpid","ylem rlikm")
mkilr mely
^P1STREET("IS","pzpid","ylepqwi")
iwqpely
^P1STREET("IS","pzpid","ylnd dnlj")
jlnd dnly
^P1STREET("IS","pzpid","yne`l")
l`eny
^P1STREET("IS","pzpid","yne`l dpvia")
aivpd l`eny
^P1STREET("IS","pzpid","ynexw `axdm")
mdxa` wxeny
^P1STREET("IS","pzpid","ynreo ax ieg`i")
i`gei xa oerny
^P1STREET("IS","pzpid","ypi`ex")
xe`ipy
^P1STREET("IS","pzpid","yrx dbi`")
`ibd xry
^P1STREET("IS","pzpid","yrx drnw")
wnrd xry
^P1STREET("IS","pzpid","yrx reac")
caer xry
^P1STREET("IS","pzpid","ytiblno")
onlbity
^P1STREET("IS","pzpid","ytipefd")
dfepity
^P1STREET("IS","pzpid","ytxipvw")
wvpixty
^P1STREET("IS","pzpid","yu bxyeo")
oeyxb uy
^P1STREET("IS","pzpid","yxhxno")
onxhxy
^P1STREET("IS","pzpid","yxrai")
iarxy
^P1STREET("IS","pzpid","yxz")
zxy
^P1STREET("IS","pzpid","zexneq")
qenxez
^P1STREET("IS","pzpid","zgknepi")
ipenkgz
^P1STREET("IS","pzpid","zl gi")
ig lz
^P1STREET("IS","pzpid","zyxi")
ixyz
^P1STREET("IS","q`b'ex")
xe'b`q
^P1STREET("IS","q`lm")
ml`q
^P1STREET("IS","q`q`")
`q`q
^P1STREET("IS","qaieo")
oeiaq
^P1STREET("IS","qaieo","`nixim")
mixin`
^P1STREET("IS","qaieo","aieweaqwi")
iwqaeweia
^P1STREET("IS","qaieo","bo dywnim")
minwyd ob
^P1STREET("IS","qaieo","d`etw")
wte`d
^P1STREET("IS","qaieo","d`expim")
mipxe`d
^P1STREET("IS","qaieo","d`leo")
oel`d
^P1STREET("IS","qaieo","d`x""f")
f"x`d
^P1STREET("IS","qaieo","d`zxeb")
bexz`d
^P1STREET("IS","qaieo","daxey")
yexad
^P1STREET("IS","qaieo","dbard")
drabd
^P1STREET("IS","qaieo","dbcxez")
zexcbd
^P1STREET("IS","qaieo","dbi`")
`ibd
^P1STREET("IS","qaieo","dcbo")
obcd
^P1STREET("IS","qaieo","dcq")
qcd
^P1STREET("IS","qaieo","dcwl")
lwcd
^P1STREET("IS","qaieo","dcxem")
mexcd
^P1STREET("IS","qaieo","ddcxim")
mixcdd
^P1STREET("IS","qaieo","dexcim")
micxed
^P1STREET("IS","qaieo","dfiz")
zifd
^P1STREET("IS","qaieo","dgexy")
yxegd
^P1STREET("IS","qaieo","dgxny")
ynxgd
^P1STREET("IS","qaieo","dnerceo")
oecrend
^P1STREET("IS","qaieo","dpes")
sepd
^P1STREET("IS","qaieo","dvax")
xavd
^P1STREET("IS","qaieo","dvteo")
oetvd
^P1STREET("IS","qaieo","dwyz")
zywd
^P1STREET("IS","qaieo","dx ctpd")
dptc xd
^P1STREET("IS","qaieo","dx`yepim")
mipey`xd
^P1STREET("IS","qaieo","dxba")
abxd
^P1STREET("IS","qaieo","dxkq")
qkxd
^P1STREET("IS","qaieo","dycxez")
zexcyd
^P1STREET("IS","qaieo","dygx")
xgyd
^P1STREET("IS","qaieo","dyled")
delyd
^P1STREET("IS","qaieo","dywc")
cwyd
^P1STREET("IS","qaieo","dywnd")
dnwyd
^P1STREET("IS","qaieo","dzenx")
xnezd
^P1STREET("IS","qaieo","dzikeo")
oekizd
^P1STREET("IS","qaieo","dzlm")
mlzd
^P1STREET("IS","qaieo","kxm dfizim")
mizifd mxk
^P1STREET("IS","qaieo","nbl")
lbn
^P1STREET("IS","qaieo","nxkeq")
qekxn
^P1STREET("IS","qaieo","qaieo")
oeiaq
^P1STREET("IS","qaieo","qn' dcxem")
mexcd 'nq
^P1STREET("IS","qaieo","qncx")
xcnq
^P1STREET("IS","qaieo","qnhz dbard")
drabd zhnq
^P1STREET("IS","qaieo","qnhz dbcxez")
zexcbd zhnq
^P1STREET("IS","qaieo","qnhz dbi`")
`ibd zhnq
^P1STREET("IS","qaieo","qnhz dgxny")
ynxgd zhnq
^P1STREET("IS","qaieo","qnhz dx ctpd")
dptc xd zhnq
^P1STREET("IS","qaieo","qnhz dxkq")
qkxd zhnq
^P1STREET("IS","qaieo","qnhz kxm dfizim")
mizifd mxk zhnq
^P1STREET("IS","qaieo","qnhz nae`ez")
ze`ean zhnq
^P1STREET("IS","qaieo","qnhz nbl")
lbn zhnq
^P1STREET("IS","qaieo","rlenim")
minelr
^P1STREET("IS","qaieo","tpexnd")
dnxept
^P1STREET("IS","qaieo","vd""l")
l"dv
^P1STREET("IS","qaieo","xinepiz")
zipenix
^P1STREET("IS","qcem")
mecq
^P1STREET("IS","qelm")
mleq
^P1STREET("IS","qilz `-gxziid")
diizxg-` zliq
^P1STREET("IS","qixiq")
qixiq
^P1STREET("IS","qlriz")
zirlq
^P1STREET("IS","qlriz","vex pzo")
ozp xev
^P1STREET("IS","qpixid")
dixipq
^P1STREET("IS","qrc")
crq
^P1STREET("IS","qrx")
xrq
^P1STREET("IS","qtix")
xitq
^P1STREET("IS","qtix","dx baim")
miab xd
^P1STREET("IS","qtix","dx xneo")
oenx xd
^P1STREET("IS","qtix","dx ygxez")
zexgy xd
^P1STREET("IS","qtqetd-ktx geyo")
oyeg xtk-dteqtq
^P1STREET("IS","qzxid")
dixzq
^P1STREET("IS","qzxid","axwz")
zwxa
^P1STREET("IS","qzxid","dgihd")
dhigd
^P1STREET("IS","qzxid","dxineo")
oenixd
^P1STREET("IS","qzxid","dz`pd")
dp`zd
^P1STREET("IS","qzxid","dznx")
xnzd
^P1STREET("IS","qzxid","idlem")
meldi
^P1STREET("IS","qzxid","lym")
myl
^P1STREET("IS","qzxid","qtix")
xitq
^P1STREET("IS","qzxid","rpax")
xapr
^P1STREET("IS","r`pio")
oip`r
^P1STREET("IS","r`xd")
dx`r
^P1STREET("IS","raxeo")
oexar
^P1STREET("IS","rb'd")
d'br
^P1STREET("IS","rbex")
xebr
^P1STREET("IS","rci")
icr
^P1STREET("IS","rci","`ecm")
mce`
^P1STREET("IS","rci","axey")
yexa
^P1STREET("IS","rci","barz gxea")
aexg zrab
^P1STREET("IS","rci","dcq")
qcd
^P1STREET("IS","rci","dfiz")
zifd
^P1STREET("IS","rci","gxea")
aexg
^P1STREET("IS","rci","idlem")
meldi
^P1STREET("IS","rci","ywc")
cwy
^P1STREET("IS","rcpim")
mipcr
^P1STREET("IS","rcpim","ddcx")
xcdd
^P1STREET("IS","rcpim","dnxeed")
deexnd
^P1STREET("IS","rely")
yler
^P1STREET("IS","rely","dnbl")
lbnd
^P1STREET("IS","rely","pes ycez")
zecy sep
^P1STREET("IS","rely","yc' dieba")
abeid 'cy
^P1STREET("IS","renx")
xner
^P1STREET("IS","renx","`bc")
cb`
^P1STREET("IS","renx","`bef")
feb`
^P1STREET("IS","renx","`bneo")
oenb`
^P1STREET("IS","renx","`cnepiz")
zipenc`
^P1STREET("IS","renx","`exo")
oxe`
^P1STREET("IS","renx","`hc")
ch`
^P1STREET("IS","renx","`lenez")
zenel`
^P1STREET("IS","renx","`leo")
oel`
^P1STREET("IS","renx","`txqneo")
oenqxt`
^P1STREET("IS","renx","`v""l")
l"v`
^P1STREET("IS","renx","`wlitheq")
qehtilw`
^P1STREET("IS","renx","`xf")
fx`
^P1STREET("IS","renx","`yeg")
gey`
^P1STREET("IS","renx","`yl")
ly`
^P1STREET("IS","renx","axey")
yexa
^P1STREET("IS","renx","axwo")
owxa
^P1STREET("IS","renx","cbpiz")
zipbc
^P1STREET("IS","renx","ctpd")
dptc
^P1STREET("IS","renx","d`bm")
mb`d
^P1STREET("IS","renx","d`ixeq")
qexi`d
^P1STREET("IS","renx","d`ld")
dl`d
^P1STREET("IS","renx","daxaex")
xeaxad
^P1STREET("IS","renx","dbexo")
oxebd
^P1STREET("IS","renx","dbto")
otbd
^P1STREET("IS","renx","dbz")
zbd
^P1STREET("IS","renx","dcq")
qcd
^P1STREET("IS","renx","dcx")
xcd
^P1STREET("IS","renx","dfiz")
zifd
^P1STREET("IS","renx","dkxm")
mxkd
^P1STREET("IS","renx","dxces")
secxd
^P1STREET("IS","renx","dxineo")
oenixd
^P1STREET("IS","renx","dyihd")
dhiyd
^P1STREET("IS","renx","gavlz")
zlvag
^P1STREET("IS","renx","gippiz")
zippig
^P1STREET("IS","renx","gva")
avg
^P1STREET("IS","renx","gxea")
aexg
^P1STREET("IS","renx","irxd")
dxri
^P1STREET("IS","renx","klil dgexy")
yxegd lilk
^P1STREET("IS","renx","klpiz")
ziplk
^P1STREET("IS","renx","liapd")
dpail
^P1STREET("IS","renx","nxbpiz")
zipbxn
^P1STREET("IS","renx","nyrel `cneo")
oenc` leryn
^P1STREET("IS","renx","nyrel cekitz")
ztikec leryn
^P1STREET("IS","renx","nyrel cela")
alec leryn
^P1STREET("IS","renx","nyrel dcxex")
xexcd leryn
^P1STREET("IS","renx","nyrel dfnix")
xinfd leryn
^P1STREET("IS","renx","nyrel dfxfix")
xifxfd leryn
^P1STREET("IS","renx","nyrel dgqicd")
dciqgd leryn
^P1STREET("IS","renx","nyrel dipyes")
seypid leryn
^P1STREET("IS","renx","nyrel dliliz")
zilild leryn
^P1STREET("IS","renx","nyrel drbex")
xebrd leryn
^P1STREET("IS","renx","nyrel dwewid")
diwewd leryn
^P1STREET("IS","renx","nyrel dzipynz")
znypizd leryn
^P1STREET("IS","renx","nyrel fdaeo")
oeadf leryn
^P1STREET("IS","renx","nyrel gebld")
dlbeg leryn
^P1STREET("IS","renx","nyrel gegiz")
zigeg leryn
^P1STREET("IS","renx","nyrel iepd")
dpei leryn
^P1STREET("IS","renx","nyrel ixweo")
oewxi leryn
^P1STREET("IS","renx","nyrel nexo")
oxen leryn
^P1STREET("IS","renx","nyrel pgli`li")
il`ilgp leryn
^P1STREET("IS","renx","nyrel pu")
up leryn
^P1STREET("IS","renx","nyrel pyx")
xyp leryn
^P1STREET("IS","renx","nyrel qiqm")
mqiq leryn
^P1STREET("IS","renx","nyrel qpepiz")
zipepq leryn
^P1STREET("IS","renx","nyrel rexa")
axer leryn
^P1STREET("IS","renx","nyrel rih")
hir leryn
^P1STREET("IS","renx","nyrel rtxepi")
ipextr leryn
^P1STREET("IS","renx","nyrel tyey")
yeyt leryn
^P1STREET("IS","renx","nyrel vetiz")
zitev leryn
^P1STREET("IS","renx","nyrel ygs")
sgy leryn
^P1STREET("IS","renx","nyrel ygxex")
xexgy leryn
^P1STREET("IS","renx","nyrel zex")
xez leryn
^P1STREET("IS","renx","pba")
abp
^P1STREET("IS","renx","pexiz")
zixep
^P1STREET("IS","renx","pxwiq")
qiwxp
^P1STREET("IS","renx","qibleo")
oelbiq
^P1STREET("IS","renx","rcrc")
crcr
^P1STREET("IS","renx","renxim")
mixner
^P1STREET("IS","renx","rxad")
daxr
^P1STREET("IS","renx","tltleo")
oeltlt
^P1STREET("IS","renx","v`ld")
dl`v
^P1STREET("IS","renx","vax")
xav
^P1STREET("IS","renx","vdld")
dldv
^P1STREET("IS","renx","vitexo")
oxetiv
^P1STREET("IS","renx","vls")
slv
^P1STREET("IS","renx","vtvtd")
dtvtv
^P1STREET("IS","renx","wicd")
dciw
^P1STREET("IS","renx","wyz")
zyw
^P1STREET("IS","renx","xezm")
mzex
^P1STREET("IS","renx","xwtz")
ztwx
^P1STREET("IS","renx","yifs")
sfiy
^P1STREET("IS","renx","ywc")
cwy
^P1STREET("IS","renx","ywnd")
dnwy
^P1STREET("IS","renx","z`pd")
dp`z
^P1STREET("IS","renx","z`yex")
xey`z
^P1STREET("IS","renx","zcdx")
xdcz
^P1STREET("IS","renx","znx")
xnz
^P1STREET("IS","renx","ztef")
fetz
^P1STREET("IS","reqtii`")
`iitqer
^P1STREET("IS","reqtii`","`a` geyi")
iyeg `a`
^P1STREET("IS","reqtii`","giilim nyegxxim")
mixxgeyn miliig
^P1STREET("IS","reqtii`","xg' 1")
1 'gx
^P1STREET("IS","reqtii`","xg' 2")
2 'gx
^P1STREET("IS","reqtii`","xg' 21")
21 'gx
^P1STREET("IS","reqtii`","xg' 22")
22 'gx
^P1STREET("IS","reqtii`","xg' 23")
23 'gx
^P1STREET("IS","reqtii`","xg' 3")
3 'gx
^P1STREET("IS","reqtii`","xg' 5")
5 'gx
^P1STREET("IS","reqtii`","xg' 55")
55 'gx
^P1STREET("IS","reqtii`","xg' 7")
7 'gx
^P1STREET("IS","retxim")
mixter
^P1STREET("IS","retxim","daxey")
yexad
^P1STREET("IS","retxim","dcwl")
lwcd
^P1STREET("IS","retxim","dfiz")
zifd
^P1STREET("IS","retxim","dyihd")
dhiyd
^P1STREET("IS","retxim","dywc")
cwyd
^P1STREET("IS","revm")
mver
^P1STREET("IS","rexis")
sixer
^P1STREET("IS","rfix")
xifr
^P1STREET("IS","rfx")
xfr
^P1STREET("IS","rfx","cekitz")
ztikec
^P1STREET("IS","rfx","d`leo")
oel`d
^P1STREET("IS","rfx","dklpiz")
ziplkd
^P1STREET("IS","rfx","dlilj")
jlild
^P1STREET("IS","rfx","dygs")
sgyd
^P1STREET("IS","rfx","pxwiq")
qiwxp
^P1STREET("IS","rfxid")
dixfr
^P1STREET("IS","rhxez")
zexhr
^P1STREET("IS","rhxez","`izo")
ozi`
^P1STREET("IS","rhxez","aiz lgm")
mgl zia
^P1STREET("IS","rhxez","ivia")
aivi
^P1STREET("IS","rhxez","izxeo")
oexzi
^P1STREET("IS","rhxez","rvnd")
dnvr
^P1STREET("IS","rilaeo")
oealir
^P1STREET("IS","rio `-qdld")
dldq-` oir
^P1STREET("IS","rio `ild")
dli` oir
^P1STREET("IS","rio `ild","dxineo")
oenixd
^P1STREET("IS","rio `ild","dznx")
xnzd
^P1STREET("IS","rio `l-`qc")
cq`-l` oir
^P1STREET("IS","rio ba")
ab oir
^P1STREET("IS","rio cex")
xec oir
^P1STREET("IS","rio dayex")
xeyad oir
^P1STREET("IS","rio dayex","pairez")
zeriap
^P1STREET("IS","rio dayex","txi`l")
l`ixt
^P1STREET("IS","rio dayex","ycez")
zecy
^P1STREET("IS","rio dec")
ced oir
^P1STREET("IS","rio dgexy")
yxegd oir
^P1STREET("IS","rio dntxu")
uxtnd oir
^P1STREET("IS","rio dpvia")
aivpd oir
^P1STREET("IS","rio drnw")
wnrd oir
^P1STREET("IS","rio dyeth")
hteyd oir
^P1STREET("IS","rio dylyd")
dylyd oir
^P1STREET("IS","rio exc")
cxe oir
^P1STREET("IS","rio exc","dcxex")
xexcd
^P1STREET("IS","rio exc","dnriio")
oiirnd
^P1STREET("IS","rio exc","dpg""l")
l"gpd
^P1STREET("IS","rio exc","dtxcq")
qcxtd
^P1STREET("IS","rio exc","dv`leo")
oel`vd
^P1STREET("IS","rio exc","dx`yepim")
mipey`xd
^P1STREET("IS","rio gxec [`igec]")
(cegi`) cexg oir
^P1STREET("IS","rio gxec [n`egc]")
(cge`n) cexg oir
^P1STREET("IS","rio kxm")
mxk oir
^P1STREET("IS","rio kxm","d`exo")
oxe`d
^P1STREET("IS","rio kxm","dnrio")
oirnd
^P1STREET("IS","rio kxnl")
lnxk oir
^P1STREET("IS","rio n`dl")
ld`n oir
^P1STREET("IS","rio pwea`")
`aewp oir
^P1STREET("IS","rio pwea`","diqnio")
oinqid
^P1STREET("IS","rio pwea`","dnqbx")
xbqnd
^P1STREET("IS","rio rixeo")
oexir oir
^P1STREET("IS","rio vexim")
mixev oir
^P1STREET("IS","rio x`td")
dt`x oir
^P1STREET("IS","rio ynx")
xny oir
^P1STREET("IS","rio yxd")
dxy oir
^P1STREET("IS","rio yxd","`xpeo")
oepx`
^P1STREET("IS","rio yxd","qgla")
algq
^P1STREET("IS","rio yxic")
cixy oir
^P1STREET("IS","rio yxic","dqiito")
otiiqd
^P1STREET("IS","rio yxic","dxvl")
lvxd
^P1STREET("IS","rio yxic","iqrex")
xerqi
^P1STREET("IS","rio yxic","qlriz")
zirlq
^P1STREET("IS","rio yxic","rbex")
xebr
^P1STREET("IS","rio yxic","rih")
hir
^P1STREET("IS","rio yxic","rtxepi")
ipextr
^P1STREET("IS","ripa")
apir
^P1STREET("IS","ripez")
zepir
^P1STREET("IS","rke")
ekr
^P1STREET("IS","rke","`""c bexceo")
oecxeb c"`
^P1STREET("IS","rke","`ao yeyo")
oyey oa`
^P1STREET("IS","rke","`axdm ao yeyo")
oyey oa mdxa`
^P1STREET("IS","rke","`axdm cpipe")
epipc mdxa`
^P1STREET("IS","rke","`eqiywio")
oiwyiqe`
^P1STREET("IS","rke","`g""i `ilz")
zli` i"g`
^P1STREET("IS","rke","`gc drm")
mrd cg`
^P1STREET("IS","rke","`l bf`x")
x`fb l`
^P1STREET("IS","rke","`l nbcld")
dlcbn l`
^P1STREET("IS","rke","`lgxifi")
ifixgl`
^P1STREET("IS","rke","`lide ypi")
ipy edil`
^P1STREET("IS","rke","`lwlri")
irlwl`
^P1STREET("IS","rke","`nlti")
itln`
^P1STREET("IS","rke","`pilaiu")
uialip`
^P1STREET("IS","rke","`qixi dnavx")
xvand ixiq`
^P1STREET("IS","rke","`xid ceyipqwi")
iwqpiyec dix`
^P1STREET("IS","rke","aal")
laa
^P1STREET("IS","rke","aexekea")
aekexea
^P1STREET("IS","rke","aexl`")
`lxea
^P1STREET("IS","rke","ail""e")
e"lia
^P1STREET("IS","rke","alhinex")
xenihla
^P1STREET("IS","rke","ao bexieo")
oeixeb oa
^P1STREET("IS","rke","ao idecd")
dcedi oa
^P1STREET("IS","rke","ao rni")
inr oa
^P1STREET("IS","rke","axihiy wehb'")
'bhew yihixa
^P1STREET("IS","rke","axl")
lxa
^P1STREET("IS","rke","axpx")
xpxa
^P1STREET("IS","rke","baexi qipi")
ipiq ixeab
^P1STREET("IS","rke","bcec 22")
22 cecb
^P1STREET("IS","rke","bciy ieqs")
sqei yicb
^P1STREET("IS","rke","belcaxb ivgw")
wgvi bxacleb
^P1STREET("IS","rke","belena")
aneleb
^P1STREET("IS","rke","ca bxepx")
xpexb ac
^P1STREET("IS","rke","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","rke","cec txpwe")
ewpxt cec
^P1STREET("IS","rke","cxj ao bexieo")
oeixeb oa jxc
^P1STREET("IS","rke","cxj d`xard")
drax`d jxc
^P1STREET("IS","rke","cxj dgiim")
miigd jxc
^P1STREET("IS","rke","cxj dgxeyz")
zyexgd jxc
^P1STREET("IS","rke","cxj dnl`kd")
dk`lnd jxc
^P1STREET("IS","rke","cxj dpnl")
lnpd jxc
^P1STREET("IS","rke","cxj igi`li")
il`igi jxc
^P1STREET("IS","rke","d`exo")
oxe`d
^P1STREET("IS","rke","d`ilo")
oli`d
^P1STREET("IS","rke","d`yl")
ly`d
^P1STREET("IS","rke","daeqzo")
ozqead
^P1STREET("IS","rke","daxey")
yexad
^P1STREET("IS","rke","db`eld")
dle`bd
^P1STREET("IS","rke","dben`")
`nebd
^P1STREET("IS","rke","dbo")
obd
^P1STREET("IS","rke","dcq")
qcd
^P1STREET("IS","rke","dcwl")
lwcd
^P1STREET("IS","rke","ddbpd")
dpbdd
^P1STREET("IS","rke","dfiz")
zifd
^P1STREET("IS","rke","dgxneo")
oenxgd
^P1STREET("IS","rke","dievxim")
mixveid
^P1STREET("IS","rke","dim")
mid
^P1STREET("IS","rke","dklpiz")
ziplkd
^P1STREET("IS","rke","dkxm")
mxkd
^P1STREET("IS","rke","dnbclex")
xelcbnd
^P1STREET("IS","rke","dneqkim")
mikqend
^P1STREET("IS","rke","dnlj fibexc")
cxebif jlnd
^P1STREET("IS","rke","dnqbx")
xbqnd
^P1STREET("IS","rke","dnrtilim")
militrnd
^P1STREET("IS","rke","dntrl")
lrtnd
^P1STREET("IS","rke","dpcia")
aicpd
^P1STREET("IS","rke","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","rke","dq")
qd
^P1STREET("IS","rke","dqcpd")
dpcqd
^P1STREET("IS","rke","dqtpim")
miptqd
^P1STREET("IS","rke","draecd")
dceard
^P1STREET("IS","rke","drlid")
dilrd
^P1STREET("IS","rke","drnl")
lnrd
^P1STREET("IS","rke","drvn`ez")
ze`nvrd
^P1STREET("IS","rke","dxa letf")
ftel axd
^P1STREET("IS","rke","dxa piqim")
miqip axd
^P1STREET("IS","rke","dxineo")
oenixd
^P1STREET("IS","rke","dxna""m")
m"anxd
^P1STREET("IS","rke","dxveb")
bevxd
^P1STREET("IS","rke","dxvl")
lvxd
^P1STREET("IS","rke","dyeewim")
miweeyd
^P1STREET("IS","rke","dyew dlao")
oald weyd
^P1STREET("IS","rke","dyihd")
dhiyd
^P1STREET("IS","rke","dzl")
lzd
^P1STREET("IS","rke","eeltqeo")
oeqtlee
^P1STREET("IS","rke","eivno")
onvie
^P1STREET("IS","rke","eizwio")
oiwzie
^P1STREET("IS","rke","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","rke","filax")
xalif
^P1STREET("IS","rke","flno dvexs")
sxevd onlf
^P1STREET("IS","rke","g`o `l txpb")
bpxt l` o`g
^P1STREET("IS","rke","g`o ye`xcd")
dcx`ey o`g
^P1STREET("IS","rke","ghiaz belpi")
ipleb zaihg
^P1STREET("IS","rke","gpd qpy")
ypq dpg
^P1STREET("IS","rke","gxez")
zexg
^P1STREET("IS","rke","hxentlcex")
xecltnexh
^P1STREET("IS","rke","i`pey wexv'`w")
w`'vxew yep`i
^P1STREET("IS","rke","ib`l icio")
oici l`bi
^P1STREET("IS","rke","idecd dlei")
ield dcedi
^P1STREET("IS","rke","ideyth")
htyedi
^P1STREET("IS","rke","iepzo dgynep`i")
i`penygd ozpei
^P1STREET("IS","rke","ieqs bxyeo")
oeyxb sqei
^P1STREET("IS","rke","il""b")
b"li
^P1STREET("IS","rke","itd pes")
sep dti
^P1STREET("IS","rke","ivgw `axapl")
lpaxa` wgvi
^P1STREET("IS","rke","ivgw ycd")
dcy wgvi
^P1STREET("IS","rke","iwezi`l `cm")
mc` l`izewi
^P1STREET("IS","rke","ixeylim")
milyexi
^P1STREET("IS","rke","kkx bpe`d")
d`epb xkk
^P1STREET("IS","rke","kkx epvid")
divpe xkk
^P1STREET("IS","rke","kkx raec")
cear xkk
^P1STREET("IS","rke","kkx tifd")
dfit xkk
^P1STREET("IS","rke","kkx txgi")
igxt xkk
^P1STREET("IS","rke","ktx raxi")
ixar xtk
^P1STREET("IS","rke","kvplqeo")
oeqlpvk
^P1STREET("IS","rke","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","rke","lqwea giim")
miig aewql
^P1STREET("IS","rke","nephitiexi")
ixeitihpen
^P1STREET("IS","rke","nhecld")
dlcehn
^P1STREET("IS","rke","nqxiw")
wixqn
^P1STREET("IS","rke","nraxd")
dxarn
^P1STREET("IS","rke","nreo")
oern
^P1STREET("IS","rke","nrld dgexyd")
dyxegd dlrn
^P1STREET("IS","rke","ntxu ylnd")
dnly uxtn
^P1STREET("IS","rke","nxcki bex")
xeb ikcxn
^P1STREET("IS","rke","nxwe tele")
elet ewxn
^P1STREET("IS","rke","nyd aexepyhiio")
oiihypexea dyn
^P1STREET("IS","rke","nyd yxz")
zxy dyn
^P1STREET("IS","rke","pei cec")
cec iep
^P1STREET("IS","rke","pexc`e")
e`cxep
^P1STREET("IS","rke","pnl dciibim")
mibiicd lnp
^P1STREET("IS","rke","pteli`eo aeptxhd")
dhxtpea oe`iletp
^P1STREET("IS","rke","qnelpqwio")
oiwqplenq
^P1STREET("IS","rke","qnhz `aez eapim")
mipae zea` zhnq
^P1STREET("IS","rke","qnhz dhexim")
mixehd zhnq
^P1STREET("IS","rke","qnhz dzryid")
diyrzd zhnq
^P1STREET("IS","rke","qx `iifiw")
wifii` xq
^P1STREET("IS","rke","rhxez")
zexhr
^P1STREET("IS","rke","rliz dperx")
xrepd zilr
^P1STREET("IS","rke","rtxepi")
ipextr
^P1STREET("IS","rke","rvieo")
oeivr
^P1STREET("IS","rke","tgx `-cio")
oic-` xgt
^P1STREET("IS","rke","tipqwx")
xwqpit
^P1STREET("IS","rke","tpwq")
qwpt
^P1STREET("IS","rke","tqg txlno")
onlxt gqt
^P1STREET("IS","rke","vexi nyd")
dyn ixev
^P1STREET("IS","rke","vl`g ` cio")
oic ` g`lv
^P1STREET("IS","rke","vl`g eavxi")
ixvae g`lv
^P1STREET("IS","rke","wceyi dye`d")
d`eyd iyecw
^P1STREET("IS","rke","wceyi wdix")
xidw iyecw
^P1STREET("IS","rke","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","rke","wtlo")
oltw
^P1STREET("IS","rke","xg 100")
100 gx
^P1STREET("IS","rke","xg 330")
330 gx
^P1STREET("IS","rke","xg' 1")
1 'gx
^P1STREET("IS","rke","xg' 10")
10 'gx
^P1STREET("IS","rke","xg' 101")
101 'gx
^P1STREET("IS","rke","xg' 11")
11 'gx
^P1STREET("IS","rke","xg' 12")
12 'gx
^P1STREET("IS","rke","xg' 126")
126 'gx
^P1STREET("IS","rke","xg' 13")
13 'gx
^P1STREET("IS","rke","xg' 171")
171 'gx
^P1STREET("IS","rke","xg' 21")
21 'gx
^P1STREET("IS","rke","xg' 217")
217 'gx
^P1STREET("IS","rke","xg' 31")
31 'gx
^P1STREET("IS","rke","xg' 33")
33 'gx
^P1STREET("IS","rke","xg' 76")
76 'gx
^P1STREET("IS","rke","xg' 94")
94 'gx
^P1STREET("IS","rke","xg' 98")
98 'gx
^P1STREET("IS","rke","xnf cec")
cec fnx
^P1STREET("IS","rke","xng""l")
l"gnx
^P1STREET("IS","rke","yail `ao baixel")
lexiab oa` liay
^P1STREET("IS","rke","yail d`ixeqim")
miqexi`d liay
^P1STREET("IS","rke","yail d`ld")
dl`d liay
^P1STREET("IS","rke","yail d`ptd")
dtp`d liay
^P1STREET("IS","rke","yail d`ykeliz")
zileky`d liay
^P1STREET("IS","rke","yail d`zxeb")
bexz`d liay
^P1STREET("IS","rke","yail daxj")
jxad liay
^P1STREET("IS","rke","yail dbto")
otbd liay
^P1STREET("IS","rke","yail dcbpiz")
zipbcd liay
^P1STREET("IS","rke","yail ddxces")
secxdd liay
^P1STREET("IS","rke","yail dgavlz")
zlvagd liay
^P1STREET("IS","rke","yail dgexy")
yxegd liay
^P1STREET("IS","rke","yail dgxea")
aexgd liay
^P1STREET("IS","rke","yail dgxviz")
zivxgd liay
^P1STREET("IS","rke","yail diqnio")
oinqid liay
^P1STREET("IS","rke","yail dirxd")
dxrid liay
^P1STREET("IS","rke","yail dktix")
xitkd liay
^P1STREET("IS","rke","yail dlai`")
`iald liay
^P1STREET("IS","rke","yail dleheq")
qeheld liay
^P1STREET("IS","rke","yail dlineo")
oenild liay
^P1STREET("IS","rke","yail dnpcxipd")
dpixcpnd liay
^P1STREET("IS","rke","yail dnxeed")
deexnd liay
^P1STREET("IS","rke","yail dpexiz")
zixepd liay
^P1STREET("IS","rke","yail dpxwiq")
qiwxpd liay
^P1STREET("IS","rke","yail dpyx")
xypd liay
^P1STREET("IS","rke","yail dqaieo")
oeiaqd liay
^P1STREET("IS","rke","yail dqibliz")
zilbiqd liay
^P1STREET("IS","rke","yail dqiito")
otiiqd liay
^P1STREET("IS","rke","yail drxad")
daxrd liay
^P1STREET("IS","rke","yail dtln""g")
g"nltd liay
^P1STREET("IS","rke","yail dtxgim")
migxtd liay
^P1STREET("IS","rke","yail dwepeq")
qepewd liay
^P1STREET("IS","rke","yail dxwtz")
ztwxd liay
^P1STREET("IS","rke","yail dyeypim")
mipyeyd liay
^P1STREET("IS","rke","yail dygw")
wgyd liay
^P1STREET("IS","rke","yail dz`pd")
dp`zd liay
^P1STREET("IS","rke","yail dztef")
fetzd liay
^P1STREET("IS","rke","yail txpwe")
ewpxt liay
^P1STREET("IS","rke","yc' dtln""g")
g"nltd 'cy
^P1STREET("IS","rke","ycliu")
uilcy
^P1STREET("IS","rke","ylcb")
bcly
^P1STREET("IS","rke","ylem dblil")
lilbd mely
^P1STREET("IS","rke","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","rke","ylnd wliio")
oiilw dnly
^P1STREET("IS","rke","yrxi piwpex")
xepwip ixry
^P1STREET("IS","rke","ytix` nyd")
dyn `xity
^P1STREET("IS","rke","yyz dinim")
minid zyy
^P1STREET("IS","rli")
ilr
^P1STREET("IS","rli","axwz")
zwxa
^P1STREET("IS","rli","d`xf")
fx`d
^P1STREET("IS","rli","dexc")
cxed
^P1STREET("IS","rli","dklpiz")
ziplkd
^P1STREET("IS","rli","dlilj")
jlild
^P1STREET("IS","rli","dxwtz")
ztwxd
^P1STREET("IS","rli","dywc")
cwyd
^P1STREET("IS","rli","qtix")
xitq
^P1STREET("IS","rli fda")
adf ilr
^P1STREET("IS","rli fda","`fnxbc")
cbxnf`
^P1STREET("IS","rli fda","axwz")
zwxa
^P1STREET("IS","rli fda","d`ecm")
mce`d
^P1STREET("IS","rli fda","qtix")
xitq
^P1STREET("IS","rlnd")
dnlr
^P1STREET("IS","rlneo")
oenlr
^P1STREET("IS","rlneo","`yael")
leay`
^P1STREET("IS","rlneo","d`npim")
mipn`d
^P1STREET("IS","rlneo","kpti xeg")
gex itpk
^P1STREET("IS","rnipca")
acpinr
^P1STREET("IS","rnipca","d`leo")
oel`d
^P1STREET("IS","rnipca","dywc")
cwyd
^P1STREET("IS","rnirc")
crinr
^P1STREET("IS","rniref")
ferinr
^P1STREET("IS","rniwm")
mwinr
^P1STREET("IS","rniwm","ddx drbel")
lebrd xdd
^P1STREET("IS","rnix")
xinr
^P1STREET("IS","rnpe`l")
l`epnr
^P1STREET("IS","rnpe`l","`zx xawd")
dwax xz`
^P1STREET("IS","rnpe`l","aiz iyx`l")
l`xyi zia
^P1STREET("IS","rnpe`l","darl ym hea")
aeh my lrad
^P1STREET("IS","rnpe`l","dbx""`")
`"xbd
^P1STREET("IS","rnpe`l","dgefd nlealio")
oilaeln dfegd
^P1STREET("IS","rnpe`l","gzm qetx")
xteq mzg
^P1STREET("IS","rnpe`l","leio tpgq")
qgpt oiel
^P1STREET("IS","rnpe`l","n`ix ntxilyno")
onylixtn xi`n
^P1STREET("IS","rnwd")
dwnr
^P1STREET("IS","rpfd")
dfpr
^P1STREET("IS","rqkx dgcy")
ycgd xkqr
^P1STREET("IS","rteld")
dletr
^P1STREET("IS","rteld","`ao baixel")
lexiab oa`
^P1STREET("IS","rteld","`ao rfx`")
`xfr oa`
^P1STREET("IS","rteld","`axdm itd")
dti mdxa`
^P1STREET("IS","rteld","`bef")
feb`
^P1STREET("IS","rteld","`bnid")
dinb`
^P1STREET("IS","rteld","`expim")
mipxe`
^P1STREET("IS","rteld","`gc drm")
mrd cg`
^P1STREET("IS","rteld","`gixezm")
mzexig`
^P1STREET("IS","rteld","`ipyhiio")
oiihypi`
^P1STREET("IS","rteld","`l rl")
lr l`
^P1STREET("IS","rteld","`lgcis")
sicgl`
^P1STREET("IS","rteld","`lide belena")
aneleb edil`
^P1STREET("IS","rteld","`qis")
siq`
^P1STREET("IS","rteld","`qs yngepi")
ipegny sq`
^P1STREET("IS","rteld","`t""w")
w"t`
^P1STREET("IS","rteld","`txim")
mixt`
^P1STREET("IS","rteld","`tyhiio")
oiihyt`
^P1STREET("IS","rteld","`ygx")
xgy`
^P1STREET("IS","rteld","aexekea")
aekexea
^P1STREET("IS","rteld","ai`liw")
wil`ia
^P1STREET("IS","rteld","ail""e")
e"lia
^P1STREET("IS","rteld","aiz ebo")
obe zia
^P1STREET("IS","rteld","ao idecd")
dcedi oa
^P1STREET("IS","rteld","api axiz")
zixa ipa
^P1STREET("IS","rteld","api co")
oc ipa
^P1STREET("IS","rteld","api iyx`l")
l`xyi ipa
^P1STREET("IS","rteld","api rwia`")
`aiwr ipa
^P1STREET("IS","rteld","api vieo")
oeiv ipa
^P1STREET("IS","rteld","avix")
xiva
^P1STREET("IS","rteld","ax biex`")
`xeib xa
^P1STREET("IS","rteld","ax keka`")
`akek xa
^P1STREET("IS","rteld","axk`o")
o`kxa
^P1STREET("IS","rteld","axpx")
xpxa
^P1STREET("IS","rteld","axwo")
owxa
^P1STREET("IS","rteld","ayo")
oya
^P1STREET("IS","rteld","baexi qipi")
ipiq ixeab
^P1STREET("IS","rteld","barzi")
izrab
^P1STREET("IS","rteld","belo")
oleb
^P1STREET("IS","rteld","bexceo")
oecxeb
^P1STREET("IS","rteld","bey rvieo")
oeivr yeb
^P1STREET("IS","rteld","blil")
lilb
^P1STREET("IS","rteld","bto")
otb
^P1STREET("IS","rteld","caexpiz")
zipxeac
^P1STREET("IS","rteld","cec `lrfx")
xfrl` cec
^P1STREET("IS","rteld","cexi irwa")
awri ixec
^P1STREET("IS","rteld","cpi`l")
l`ipc
^P1STREET("IS","rteld","cxj aiz gelim")
mileg zia jxc
^P1STREET("IS","rteld","cxj belpi")
ipleb jxc
^P1STREET("IS","rteld","d`aez")
zea`d
^P1STREET("IS","rteld","d`aia")
aia`d
^P1STREET("IS","rteld","d`bq")
qb`d
^P1STREET("IS","rteld","d`eno")
one`d
^P1STREET("IS","rteld","d`exb")
bxe`d
^P1STREET("IS","rteld","d`fea")
aef`d
^P1STREET("IS","rteld","d`hc")
ch`d
^P1STREET("IS","rteld","d`ixeqim")
miqexi`d
^P1STREET("IS","rteld","d`ld")
dl`d
^P1STREET("IS","rteld","d`leo")
oel`d
^P1STREET("IS","rteld","d`nex`im")
mi`xen`d
^P1STREET("IS","rteld","d`xf")
fx`d
^P1STREET("IS","rteld","d`zxeb")
bexz`d
^P1STREET("IS","rteld","daekxim")
mixkead
^P1STREET("IS","rteld","daepd")
dpead
^P1STREET("IS","rteld","dap`i")
i`pad
^P1STREET("IS","rteld","dapim")
mipad
^P1STREET("IS","rteld","daxey")
yexad
^P1STREET("IS","rteld","daxibcd dideciz")
zicedid dcbixad
^P1STREET("IS","rteld","db`epim")
mipe`bd
^P1STREET("IS","rteld","db`i")
i`bd
^P1STREET("IS","rteld","dbcec draxi")
ixard cecbd
^P1STREET("IS","rteld","dbecc")
ccebd
^P1STREET("IS","rteld","dben`")
`nebd
^P1STREET("IS","rteld","dbi`")
`ibd
^P1STREET("IS","rteld","dblaer")
realbd
^P1STREET("IS","rteld","dblrc")
crlbd
^P1STREET("IS","rteld","dbo")
obd
^P1STREET("IS","rteld","dbz")
zbd
^P1STREET("IS","rteld","dcbo")
obcd
^P1STREET("IS","rteld","dcekitz")
ztikecd
^P1STREET("IS","rteld","dcela")
alecd
^P1STREET("IS","rteld","dcwl")
lwcd
^P1STREET("IS","rteld","dcxex")
xexcd
^P1STREET("IS","rteld","ddbpd")
dpbdd
^P1STREET("IS","rteld","ddcqim")
miqcdd
^P1STREET("IS","rteld","ddcxim")
mixcdd
^P1STREET("IS","rteld","ddqzcxez")
zexczqdd
^P1STREET("IS","rteld","delpc")
cpled
^P1STREET("IS","rteld","dexc")
cxed
^P1STREET("IS","rteld","dfiz")
zifd
^P1STREET("IS","rteld","dfnix")
xinfd
^P1STREET("IS","rteld","dgegiz")
zigegd
^P1STREET("IS","rteld","dgleu")
uelgd
^P1STREET("IS","rteld","dglnepiz")
zipenlgd
^P1STREET("IS","rteld","dgqicd")
dciqgd
^P1STREET("IS","rteld","dgqicim")
miciqgd
^P1STREET("IS","rteld","dgva")
avgd
^P1STREET("IS","rteld","dgxh")
hxgd
^P1STREET("IS","rteld","dgxny")
ynxgd
^P1STREET("IS","rteld","dgxviz")
zivxgd
^P1STREET("IS","rteld","dgynep`im")
mi`penygd
^P1STREET("IS","rteld","dgynl")
lnygd
^P1STREET("IS","rteld","dieba")
abeid
^P1STREET("IS","rteld","divixd")
dxivid
^P1STREET("IS","rteld","diwipheo")
oehpiwid
^P1STREET("IS","rteld","dixweo")
oewxid
^P1STREET("IS","rteld","dkexm")
mxekd
^P1STREET("IS","rteld","dkgliz")
zilgkd
^P1STREET("IS","rteld","dkpqz")
zqpkd
^P1STREET("IS","rteld","dkyxz iyea")
aeyi zxykd
^P1STREET("IS","rteld","dnbl")
lbnd
^P1STREET("IS","rteld","dnbo")
obnd
^P1STREET("IS","rteld","dneqkim")
mikqend
^P1STREET("IS","rteld","dngylim")
milygnd
^P1STREET("IS","rteld","dniiqcim")
micqiind
^P1STREET("IS","rteld","dnl`kd")
dk`lnd
^P1STREET("IS","rteld","dnlkim")
miklnd
^P1STREET("IS","rteld","dnqbx")
xbqnd
^P1STREET("IS","rteld","dnqiw")
wiqnd
^P1STREET("IS","rteld","dnyhxd")
dxhynd
^P1STREET("IS","rteld","dpai`im")
mi`iapd
^P1STREET("IS","rteld","dpbx")
xbpd
^P1STREET("IS","rteld","dpehx")
xhepd
^P1STREET("IS","rteld","dpetx")
xtepd
^P1STREET("IS","rteld","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","rteld","dpyi`")
`iypd
^P1STREET("IS","rteld","dqco")
ocqd
^P1STREET("IS","rteld","dqekpez dideciz")
zicedid zepkeqd
^P1STREET("IS","rteld","dqetxim")
mixteqd
^P1STREET("IS","rteld","dqgla")
algqd
^P1STREET("IS","rteld","dqiito")
otiiqd
^P1STREET("IS","rteld","dqlqild")
dliqlqd
^P1STREET("IS","rteld","dqzeepiz")
zipeezqd
^P1STREET("IS","rteld","draecd")
dceard
^P1STREET("IS","rteld","drbex")
xebrd
^P1STREET("IS","rteld","drelim")
milerd
^P1STREET("IS","rteld","drlid")
dilrd
^P1STREET("IS","rteld","drnl")
lnrd
^P1STREET("IS","rteld","drtxepi")
ipextrd
^P1STREET("IS","rteld","dtihpim")
miphitd
^P1STREET("IS","rteld","dtln""g")
g"nltd
^P1STREET("IS","rteld","dtrnepiz")
zipenrtd
^P1STREET("IS","rteld","dtxqd")
dqxtd
^P1STREET("IS","rteld","dvpgpim")
mipgpvd
^P1STREET("IS","rteld","dvtvtez")
zetvtvd
^P1STREET("IS","rteld","dwenniez")
zeinnewd
^P1STREET("IS","rteld","dwepbxq dviepi")
ipeivd qxbpewd
^P1STREET("IS","rteld","dwiyeo")
oeyiwd
^P1STREET("IS","rteld","dwp`im")
mi`pwd
^P1STREET("IS","rteld","dwyz")
zywd
^P1STREET("IS","rteld","dx`yepim")
mipey`xd
^P1STREET("IS","rteld","dxa idecd yhxiz")
zixhy dcedi axd
^P1STREET("IS","rteld","dxa l`eo")
oe`l axd
^P1STREET("IS","rteld","dxa leio")
oiel axd
^P1STREET("IS","rteld","dxa refi`l")
l`ifer axd
^P1STREET("IS","rteld","dxa rni`l")
l`inr axd
^P1STREET("IS","rteld","dxa wew")
wew axd
^P1STREET("IS","rteld","dxces")
secxd
^P1STREET("IS","rteld","dxebi nlkez")
zekln ibexd
^P1STREET("IS","rteld","dxineo")
oenixd
^P1STREET("IS","rteld","dxqo")
oqxd
^P1STREET("IS","rteld","dxveb")
bevxd
^P1STREET("IS","rteld","dxvl")
lvxd
^P1STREET("IS","rteld","dyenx")
xneyd
^P1STREET("IS","rteld","dyethim")
mihteyd
^P1STREET("IS","rteld","dyew")
weyd
^P1STREET("IS","rteld","dygs")
sgyd
^P1STREET("IS","rteld","dygx")
xgyd
^P1STREET("IS","rteld","dyihd")
dhiyd
^P1STREET("IS","rteld","dyiwnd")
dnwiyd
^P1STREET("IS","rteld","dylcb")
bclyd
^P1STREET("IS","rteld","dylem")
melyd
^P1STREET("IS","rteld","dywc")
cwyd
^P1STREET("IS","rteld","dyxhh")
hhxyd
^P1STREET("IS","rteld","dzexneq")
qenxezd
^P1STREET("IS","rteld","dzp`im")
mi`pzd
^P1STREET("IS","rteld","dzryid")
diyrzd
^P1STREET("IS","rteld","dzwed")
dewzd
^P1STREET("IS","rteld","eeltqeo")
oeqtlee
^P1STREET("IS","rteld","eipbiih")
hiibpie
^P1STREET("IS","rteld","excd")
dcxe
^P1STREET("IS","rteld","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","rteld","fdao")
oadf
^P1STREET("IS","rteld","flno def")
fed onlf
^P1STREET("IS","rteld","gavlz")
zlvag
^P1STREET("IS","rteld","getiz")
ziteg
^P1STREET("IS","rteld","ghiad zyr")
ryz daihg
^P1STREET("IS","rteld","ghtiz")
zithg
^P1STREET("IS","rteld","giaz vieo")
oeiv zaig
^P1STREET("IS","rteld","gihd")
dhig
^P1STREET("IS","rteld","gippiz")
zippig
^P1STREET("IS","rteld","giqkeo")
oekqig
^P1STREET("IS","rteld","gpd qpy")
ypq dpg
^P1STREET("IS","rteld","gxea")
aexg
^P1STREET("IS","rteld","gxec")
cexg
^P1STREET("IS","rteld","gxiy")
yixg
^P1STREET("IS","rteld","gxneo")
oenxg
^P1STREET("IS","rteld","halo")
olah
^P1STREET("IS","rteld","havpiw tiiaiy")
yiaiit wipvah
^P1STREET("IS","rteld","hetg")
gteh
^P1STREET("IS","rteld","hxentlcex")
xecltnexh
^P1STREET("IS","rteld","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","rteld","i`ix")
xi`i
^P1STREET("IS","rteld","i`pey wexv'`w")
w`'vxew yep`i
^P1STREET("IS","rteld","ib`l icio")
oici l`bi
^P1STREET("IS","rteld","ib`l kdo")
odk l`bi
^P1STREET("IS","rteld","idecd dlei")
ield dcedi
^P1STREET("IS","rteld","ideyr gpwio")
oiwpg ryedi
^P1STREET("IS","rteld","ieqs giim")
miig sqei
^P1STREET("IS","rteld","ieqthl biex`")
`xeib lhtqei
^P1STREET("IS","rteld","irxd")
dxri
^P1STREET("IS","rteld","ivgw ao vai")
iav oa wgvi
^P1STREET("IS","rteld","ivgw ycd")
dcy wgvi
^P1STREET("IS","rteld","ivtex")
xetvi
^P1STREET("IS","rteld","ixco")
ocxi
^P1STREET("IS","rteld","ixeylim")
milyexi
^P1STREET("IS","rteld","kcexi")
ixeck
^P1STREET("IS","rteld","kexy")
yxek
^P1STREET("IS","rteld","kkx drvn`ez")
ze`nvrd xkk
^P1STREET("IS","rteld","klpiz")
ziplk
^P1STREET("IS","rteld","kpxz")
zxpk
^P1STREET("IS","rteld","kvplqeo")
oeqlpvk
^P1STREET("IS","rteld","kxnliz")
zilnxk
^P1STREET("IS","rteld","lehm")
mhel
^P1STREET("IS","rteld","lg""i")
i"gl
^P1STREET("IS","rteld","liapiz")
zipail
^P1STREET("IS","rteld","lilj")
jlil
^P1STREET("IS","rteld","n`ix ytix`")
`xity xi`n
^P1STREET("IS","rteld","n`te")
et`n
^P1STREET("IS","rteld","nbyinim")
miniybn
^P1STREET("IS","rteld","nexo")
oxen
^P1STREET("IS","rteld","nfxgi `txim")
mixt` igxfn
^P1STREET("IS","rteld","nlkio yxd")
dxy oikln
^P1STREET("IS","rteld","npgm `eqiywio")
oiwyiqe` mgpn
^P1STREET("IS","rteld","npgm a. kdo")
odk .a mgpn
^P1STREET("IS","rteld","npyd")
dypn
^P1STREET("IS","rteld","nrtilim")
militrn
^P1STREET("IS","rteld","nvcd")
dcvn
^P1STREET("IS","rteld","nvtd")
dtvn
^P1STREET("IS","rteld","nwls nxcki")
ikcxn slwn
^P1STREET("IS","rteld","nxac dwqnim")
minqwd caxn
^P1STREET("IS","rteld","nxeed")
deexn
^P1STREET("IS","rteld","nxweq")
qewxn
^P1STREET("IS","rteld","nynx dixco")
ocxid xnyn
^P1STREET("IS","rteld","nyrel dqtexhw")
whxetqd leryn
^P1STREET("IS","rteld","pbad")
dabp
^P1STREET("IS","rteld","pewiqim")
miqiwep
^P1STREET("IS","rteld","pexc`e")
e`cxep
^P1STREET("IS","rteld","pexiz")
zixep
^P1STREET("IS","rteld","pil""i")
i"lip
^P1STREET("IS","rteld","ptzli")
ilztp
^P1STREET("IS","rteld","pxwiqim")
miqiwxp
^P1STREET("IS","rteld","pzo `laf")
fal` ozp
^P1STREET("IS","rteld","pzo `lzxno")
onxzl` ozp
^P1STREET("IS","rteld","qaieo")
oeiaq
^P1STREET("IS","rteld","qewelea")
aeleweq
^P1STREET("IS","rteld","qlriz")
zirlq
^P1STREET("IS","rteld","qnilpqwi txu")
uxt iwqplinq
^P1STREET("IS","rteld","qnx")
xnq
^P1STREET("IS","rteld","qrcid gzekd")
dkezg dicrq
^P1STREET("IS","rteld","rcrc")
crcr
^P1STREET("IS","rteld","renx")
xner
^P1STREET("IS","rteld","rexapi")
ipaxer
^P1STREET("IS","rteld","rliz dperx")
xrepd zilr
^P1STREET("IS","rteld","rpal")
lapr
^P1STREET("IS","rteld","rvneo")
oenvr
^P1STREET("IS","rteld","rxad")
daxr
^P1STREET("IS","rteld","rxebez")
zebexr
^P1STREET("IS","rteld","rxrx")
xrxr
^P1STREET("IS","rteld","terli vieo")
oeiv ilret
^P1STREET("IS","rteld","tiw""`")
`"wit
^P1STREET("IS","rteld","tl im")
mi lt
^P1STREET("IS","rteld","tpwq")
qwpt
^P1STREET("IS","rteld","tw`o")
o`wt
^P1STREET("IS","rteld","txb")
bxt
^P1STREET("IS","rteld","tyey")
yeyt
^P1STREET("IS","rteld","v`leo")
oel`v
^P1STREET("IS","rteld","varepi")
iperav
^P1STREET("IS","rteld","vax")
xav
^P1STREET("IS","rteld","vetiz")
zitev
^P1STREET("IS","rteld","vewiz")
ziwev
^P1STREET("IS","rteld","vim")
miv
^P1STREET("IS","rteld","vls")
slv
^P1STREET("IS","rteld","vnx")
xnv
^P1STREET("IS","rteld","waeu bleiez")
zeielb ueaw
^P1STREET("IS","rteld","wcd")
dcw
^P1STREET("IS","rteld","wceyi dye`d")
d`eyd iyecw
^P1STREET("IS","rteld","wcxeo")
oexcw
^P1STREET("IS","rteld","wdilz vieo")
oeiv zlidw
^P1STREET("IS","rteld","whis")
sihw
^P1STREET("IS","rteld","wixyhiio `yx")
xy` oiihyxiw
^P1STREET("IS","rteld","wlh")
hlw
^P1STREET("IS","rteld","wpd")
dpw
^P1STREET("IS","rteld","wpi`l")
l`ipw
^P1STREET("IS","rteld","wpneo")
oenpw
^P1STREET("IS","rteld","wtlo")
oltw
^P1STREET("IS","rteld","wvix")
xivw
^P1STREET("IS","rteld","wxo diqec")
ceqid oxw
^P1STREET("IS","rteld","wxo winz")
zniw oxw
^P1STREET("IS","rteld","x`ql")
lq`x
^P1STREET("IS","rteld","xennd")
dnnex
^P1STREET("IS","rteld","xezm")
mzex
^P1STREET("IS","rteld","xna""m")
m"anx
^P1STREET("IS","rteld","xnf")
fnx
^P1STREET("IS","rteld","xqwe")
ewqx
^P1STREET("IS","rteld","xwtz")
ztwx
^P1STREET("IS","rteld","xy""i")
i"yx
^P1STREET("IS","rteld","y""i rbpeo")
oepbr i"y
^P1STREET("IS","rteld","yafi")
ifay
^P1STREET("IS","rteld","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","rteld","yarz dnipim")
mipind zray
^P1STREET("IS","rteld","yc' `xlefexea")
aexefelx` 'cy
^P1STREET("IS","rteld","yc' ivgw xaio")
oiax wgvi 'cy
^P1STREET("IS","rteld","yc' npgm abio")
oiba mgpn 'cy
^P1STREET("IS","rteld","yc' wephiwh")
hwihpew 'cy
^P1STREET("IS","rteld","ycniz")
zincy
^P1STREET("IS","rteld","yexw")
wxey
^P1STREET("IS","rteld","yeyo")
oyey
^P1STREET("IS","rteld","yfis")
sify
^P1STREET("IS","rteld","yiaelim")
mileaiy
^P1STREET("IS","rteld","yiaz vieo")
oeiv zaiy
^P1STREET("IS","rteld","yipaeim")
mieapiy
^P1STREET("IS","rteld","yldaiz")
ziadly
^P1STREET("IS","rteld","ylem rlikm")
mkilr mely
^P1STREET("IS","rteld","ypi`ex flno yf""x")
x"fy onlf xe`ipy
^P1STREET("IS","rteld","yrexd")
dxery
^P1STREET("IS","rteld","ytipefd")
dfepity
^P1STREET("IS","rteld","ytxipvw")
wvpixty
^P1STREET("IS","rteld","ywp`i")
i`pwy
^P1STREET("IS","rteld","yxz")
zxy
^P1STREET("IS","rteld","z`pd")
dp`z
^P1STREET("IS","rteld","z`yex")
xey`z
^P1STREET("IS","rteld","zaex")
xeaz
^P1STREET("IS","rteld","zbiz")
zibz
^P1STREET("IS","rteld","zcdx")
xdcz
^P1STREET("IS","rteld","zl gi")
ig lz
^P1STREET("IS","rteld","znx")
xnz
^P1STREET("IS","rtxd")
dxtr
^P1STREET("IS","rtxd","`xu inpi")
ipni ux`
^P1STREET("IS","rtxd","bc")
cb
^P1STREET("IS","rtxd","h' a`iix")
xii`a 'h
^P1STREET("IS","rtxd","lei")
iel
^P1STREET("IS","rtxd","nwini dbcx")
xcbd iniwn
^P1STREET("IS","rtxd","ptzli")
ilztp
^P1STREET("IS","rtxd","rnepd")
dpenr
^P1STREET("IS","rtxd","x`eao")
oae`x
^P1STREET("IS","ru `txim")
mixt` ur
^P1STREET("IS","ru `txim","cwl")
lwc
^P1STREET("IS","ru `txim","d`exo")
oxe`d
^P1STREET("IS","ru `txim","d`leo")
oel`d
^P1STREET("IS","ru `txim","d`xf")
fx`d
^P1STREET("IS","ru `txim","daxey")
yexad
^P1STREET("IS","ru `txim","dgxea")
aexgd
^P1STREET("IS","rw`ad")
da`wr
^P1STREET("IS","rwxa`")
`axwr
^P1STREET("IS","rx`ad")
da`xr
^P1STREET("IS","rxc")
cxr
^P1STREET("IS","rxc","`aia")
aia`
^P1STREET("IS","rxc","`bef")
feb`
^P1STREET("IS","rxc","`bniz")
zinb`
^P1STREET("IS","rxc","`bq")
qb`
^P1STREET("IS","rxc","`ceed")
deec`
^P1STREET("IS","rxc","`ecm")
mce`
^P1STREET("IS","rxc","`eto")
ote`
^P1STREET("IS","rxc","`etw")
wte`
^P1STREET("IS","rxc","`etwim")
miwte`
^P1STREET("IS","rxc","`geed")
deeg`
^P1STREET("IS","rxc","`hc")
ch`
^P1STREET("IS","rxc","`lrfx ao i`ix")
xi`i oa xfrl`
^P1STREET("IS","rxc","`ptd")
dtp`
^P1STREET("IS","rxc","`pwex")
xewp`
^P1STREET("IS","rxc","`tiw")
wit`
^P1STREET("IS","rxc","`yc")
cy`
^P1STREET("IS","rxc","`zxeb")
bexz`
^P1STREET("IS","rxc","aerf")
frea
^P1STREET("IS","rxc","aeww")
wwea
^P1STREET("IS","rxc","af")
fa
^P1STREET("IS","rxc","avl`l")
l`lva
^P1STREET("IS","rxc","axfl")
lfxa
^P1STREET("IS","rxc","axwo")
owxa
^P1STREET("IS","rxc","axwz")
zwxa
^P1STREET("IS","rxc","bl")
lb
^P1STREET("IS","rxc","cec dnlj")
jlnd cec
^P1STREET("IS","rxc","cekitz")
ztikec
^P1STREET("IS","rxc","d`leo")
oel`d
^P1STREET("IS","rxc","dayex")
xeyad
^P1STREET("IS","rxc","dblrc")
crlbd
^P1STREET("IS","rxc","dcq")
qcd
^P1STREET("IS","rxc","ddx")
xdd
^P1STREET("IS","rxc","dgqicd")
dciqgd
^P1STREET("IS","rxc","dqiixim")
mixiiqd
^P1STREET("IS","rxc","dqtexh")
hxetqd
^P1STREET("IS","rxc","dtlcd")
dcltd
^P1STREET("IS","rxc","dvai")
iavd
^P1STREET("IS","rxc","dwecgim")
migcewd
^P1STREET("IS","rxc","dxces")
secxd
^P1STREET("IS","rxc","dzryid")
diyrzd
^P1STREET("IS","rxc","exc")
cxe
^P1STREET("IS","rxc","fnix")
xinf
^P1STREET("IS","rxc","fxfix")
xifxf
^P1STREET("IS","rxc","gaxeo")
oexag
^P1STREET("IS","rxc","gegiz")
zigeg
^P1STREET("IS","rxc","gend")
dneg
^P1STREET("IS","rxc","getiz")
ziteg
^P1STREET("IS","rxc","glnepiz")
zipenlg
^P1STREET("IS","rxc","glniy")
yinlg
^P1STREET("IS","rxc","go")
og
^P1STREET("IS","rxc","gxea")
aexg
^P1STREET("IS","rxc","gxviz")
zivxg
^P1STREET("IS","rxc","gynl")
lnyg
^P1STREET("IS","rxc","hl")
lh
^P1STREET("IS","rxc","i`yide")
ediy`i
^P1STREET("IS","rxc","idecd")
dcedi
^P1STREET("IS","rxc","ieal")
laei
^P1STREET("IS","rxc","iepd")
dpei
^P1STREET("IS","rxc","iepzo")
ozpei
^P1STREET("IS","rxc","iqnio")
oinqi
^P1STREET("IS","rxc","iqrex")
xerqi
^P1STREET("IS","rxc","ixeylim")
milyexi
^P1STREET("IS","rxc","klpiz")
ziplk
^P1STREET("IS","rxc","kxnl")
lnxk
^P1STREET("IS","rxc","le`i tiwxc")
cxwit i`el
^P1STREET("IS","rxc","liliz")
zilil
^P1STREET("IS","rxc","lym")
myl
^P1STREET("IS","rxc","navr leh")
hel rvan
^P1STREET("IS","rxc","nbcl")
lcbn
^P1STREET("IS","rxc","nbyinim")
miniybn
^P1STREET("IS","rxc","ne`a")
a`en
^P1STREET("IS","rxc","nex")
xen
^P1STREET("IS","rxc","nifxg")
gxfin
^P1STREET("IS","rxc","nkaim")
miakn
^P1STREET("IS","rxc","nkepd")
dpekn
^P1STREET("IS","rxc","npes")
sepn
^P1STREET("IS","rxc","nref")
fern
^P1STREET("IS","rxc","nreo")
oern
^P1STREET("IS","rxc","nriio")
oiirn
^P1STREET("IS","rxc","ntl")
ltn
^P1STREET("IS","rxc","nynx")
xnyn
^P1STREET("IS","rxc","pairez")
zeriap
^P1STREET("IS","rxc","pbd")
dbp
^P1STREET("IS","rxc","pes")
sep
^P1STREET("IS","rxc","pexiz")
zixep
^P1STREET("IS","rxc","pgl")
lgp
^P1STREET("IS","rxc","pibepim")
mipebip
^P1STREET("IS","rxc","pwx")
xwp
^P1STREET("IS","rxc","pxwiq")
qiwxp
^P1STREET("IS","rxc","pyx")
xyp
^P1STREET("IS","rxc","pzia caexd")
dxeac aizp
^P1STREET("IS","rxc","pzia dbto")
otbd aizp
^P1STREET("IS","rxc","pzia dz`pd")
dp`zd aizp
^P1STREET("IS","rxc","pzia irl")
lri aizp
^P1STREET("IS","rxc","pzia nxim")
mixn aizp
^P1STREET("IS","rxc","pzia znx")
xnz aizp
^P1STREET("IS","rxc","qco")
ocq
^P1STREET("IS","rxc","qiito")
otiiq
^P1STREET("IS","rxc","qipi")
ipiq
^P1STREET("IS","rxc","qiq")
qiq
^P1STREET("IS","rxc","qlriz")
zirlq
^P1STREET("IS","rxc","qpepiz")
zipepq
^P1STREET("IS","rxc","qtix")
xitq
^P1STREET("IS","rxc","rbex")
xebr
^P1STREET("IS","rxc","rcrc")
crcr
^P1STREET("IS","rxc","rexa")
axer
^P1STREET("IS","rxc","rih")
hir
^P1STREET("IS","rxc","riipez")
zepiir
^P1STREET("IS","rxc","rio dzklz")
zlkzd oir
^P1STREET("IS","rxc","ripalim")
milapir
^P1STREET("IS","rxc","rixiz")
zixir
^P1STREET("IS","rxc","rpax")
xapr
^P1STREET("IS","rxc","rtxepi")
ipextr
^P1STREET("IS","rxc","ru")
ur
^P1STREET("IS","rxc","rxad")
daxr
^P1STREET("IS","rxc","rxeu")
uexr
^P1STREET("IS","rxc","thie")
eiht
^P1STREET("IS","rxc","tlb")
blt
^P1STREET("IS","rxc","tln""g")
g"nlt
^P1STREET("IS","rxc","tyey")
yeyt
^P1STREET("IS","rxc","v`lim")
mil`v
^P1STREET("IS","rxc","varepi")
iperav
^P1STREET("IS","rxc","vax")
xav
^P1STREET("IS","rxc","vetiz")
zitev
^P1STREET("IS","rxc","wp`im")
mi`pw
^P1STREET("IS","rxc","xaiaim")
miaiax
^P1STREET("IS","rxc","xear irlim")
milri raex
^P1STREET("IS","rxc","xgaz go")
og zagx
^P1STREET("IS","rxc","xineo")
oenix
^P1STREET("IS","rxc","xka")
akx
^P1STREET("IS","rxc","xrpo")
oprx
^P1STREET("IS","rxc","y`el")
le`y
^P1STREET("IS","rxc","yedm")
mdey
^P1STREET("IS","rxc","yew rixepi")
ipexir wey
^P1STREET("IS","rxc","yeyo")
oyey
^P1STREET("IS","rxc","ygs")
sgy
^P1STREET("IS","rxc","yifs")
sfiy
^P1STREET("IS","rxc","yiy")
yiy
^P1STREET("IS","rxc","ylcb")
bcly
^P1STREET("IS","rxc","yleed")
deely
^P1STREET("IS","rxc","ynix")
xiny
^P1STREET("IS","rxc","ynreo")
oerny
^P1STREET("IS","rxc","zcdx")
xdcz
^P1STREET("IS","rxc","zex")
xez
^P1STREET("IS","rxc","zteg")
getz
^P1STREET("IS","rxc","zxyiy")
yiyxz
^P1STREET("IS","rxebez")
zebexr
^P1STREET("IS","rxebez","%dyi")
iyd%
^P1STREET("IS","rxebez","dyiwnim")
minwiyd
^P1STREET("IS","rxerx")
xrexr
^P1STREET("IS","rxerx","xg' 1")
1 'gx
^P1STREET("IS","rxerx","xg' 11")
11 'gx
^P1STREET("IS","rxrxd")
dxrxr
^P1STREET("IS","rxwd")
dwxr
^P1STREET("IS","ryxz")
zxyr
^P1STREET("IS","ryxz","d`bef")
feb`d
^P1STREET("IS","ryxz","d`exo")
oxe`d
^P1STREET("IS","ryxz","d`leo")
oel`d
^P1STREET("IS","ryxz","d`ykel")
leky`d
^P1STREET("IS","ryxz","dbto")
otbd
^P1STREET("IS","ryxz","dcwl")
lwcd
^P1STREET("IS","ryxz","dfiz")
zifd
^P1STREET("IS","ryxz","dxineo")
oenixd
^P1STREET("IS","ryxz","dywc")
cwyd
^P1STREET("IS","ryxz","dywnd")
dnwyd
^P1STREET("IS","ryxz","xifd")
dfix
^P1STREET("IS","rzliz")
zilzr
^P1STREET("IS","rzliz","`ixiq")
qixi`
^P1STREET("IS","rzliz","`nz dnim")
mind zn`
^P1STREET("IS","rzliz","`xbno")
onbx`
^P1STREET("IS","rzliz","axihiy wehb'")
'bhew yihixa
^P1STREET("IS","rzliz","barz daxkez")
zekxad zrab
^P1STREET("IS","rzliz","barz qaieo")
oeiaq zrab
^P1STREET("IS","rzliz","cxj dim")
mid jxc
^P1STREET("IS","rzliz","d`bef")
feb`d
^P1STREET("IS","rzliz","d`exo")
oxe`d
^P1STREET("IS","rzliz","d`xf")
fx`d
^P1STREET("IS","rzliz","dbexo")
oxebd
^P1STREET("IS","rzliz","ddxces")
secxdd
^P1STREET("IS","rzliz","dexc")
cxed
^P1STREET("IS","rzliz","dfiz")
zifd
^P1STREET("IS","rzliz","dgexa")
axegd
^P1STREET("IS","rzliz","dgxea")
aexgd
^P1STREET("IS","rzliz","dklpiez")
zeiplkd
^P1STREET("IS","rzliz","dlegnim")
mingeld
^P1STREET("IS","rzliz","dlilj")
jlild
^P1STREET("IS","rzliz","dngzxez")
zexzgnd
^P1STREET("IS","rzliz","dniiqcim")
micqiind
^P1STREET("IS","rzliz","dpxwiqim")
miqiwxpd
^P1STREET("IS","rzliz","dqaieo")
oeiaqd
^P1STREET("IS","rzliz","dqlr")
rlqd
^P1STREET("IS","rzliz","dxineo")
oenixd
^P1STREET("IS","rzliz","dxwtz")
ztwxd
^P1STREET("IS","rzliz","dywc")
cwyd
^P1STREET("IS","rzliz","hxentlcex")
xecltnexh
^P1STREET("IS","rzliz","iqnio")
oinqi
^P1STREET("IS","rzliz","itd pes")
sep dti
^P1STREET("IS","rzliz","kxm ndx""l")
l"xdn mxk
^P1STREET("IS","rzliz","legni dngzxz")
zxzgnd ingel
^P1STREET("IS","rzliz","nbcim")
micbn
^P1STREET("IS","rzliz","pgl dnrxez")
zexrnd lgp
^P1STREET("IS","rzliz","pzia dkxnim")
minxkd aizp
^P1STREET("IS","rzliz","qnhz daxey")
yexad zhnq
^P1STREET("IS","rzliz","qnhz dnxbpiz")
zipbxnd zhnq
^P1STREET("IS","rzliz","qnhz dpexiz")
zixepd zhnq
^P1STREET("IS","rzliz","qnhz dznx")
xnzd zhnq
^P1STREET("IS","rzliz","qnhz qibliz")
zilbiq zhnq
^P1STREET("IS","rzliz","refi`l")
l`ifer
^P1STREET("IS","rzliz","yeypz dim")
mid zpyey
^P1STREET("IS","rzpi`l")
l`ipzr
^P1STREET("IS","rzpi`l","dx gaxeo")
oexag xd
^P1STREET("IS","t`xrd")
drx`t
^P1STREET("IS","t`xw zryiez kpez")
zepk zeiyrz wx`t
^P1STREET("IS","t`xw zryiez kpez","`cem")
mec`
^P1STREET("IS","t`xw zryiez kpez","ixew")
wexi
^P1STREET("IS","t`xw zryiez kpez","kgel")
legk
^P1STREET("IS","t`z ycd")
dcy z`t
^P1STREET("IS","tce`l")
l`ect
^P1STREET("IS","tceiim")
miiect
^P1STREET("IS","tcid")
dict
^P1STREET("IS","tcid","pgl `ileo")
oeli` lgp
^P1STREET("IS","texid riliz")
zilir dixet
^P1STREET("IS","texid riliz","cxj dgva")
avgd jxc
^P1STREET("IS","texz")
zxet
^P1STREET("IS","tgnd")
dngt
^P1STREET("IS","thiy")
yiht
^P1STREET("IS","ti-px")
xp-it
^P1STREET("IS","ti-px","dblil")
lilbd
^P1STREET("IS","tlngim")
mignlt
^P1STREET("IS","tpcweni`")
`inewcpt
^P1STREET("IS","tqehd")
dheqt
^P1STREET("IS","twerd")
drewt
^P1STREET("IS","twirio")
oiriwt
^P1STREET("IS","txciq")
qicxt
^P1STREET("IS","txciq","xg' 1")
1 'gx
^P1STREET("IS","txciq","xg' 10")
10 'gx
^P1STREET("IS","txciq","xg' 11")
11 'gx
^P1STREET("IS","txciq","xg' 12")
12 'gx
^P1STREET("IS","txciq","xg' 14")
14 'gx
^P1STREET("IS","txciq","xg' 15")
15 'gx
^P1STREET("IS","txciq","xg' 2")
2 'gx
^P1STREET("IS","txciq","xg' 3")
3 'gx
^P1STREET("IS","txciq","xg' 4")
4 'gx
^P1STREET("IS","txciq","xg' 65")
65 'gx
^P1STREET("IS","txciq","xg' 7")
7 'gx
^P1STREET("IS","txciq","xg' 8")
8 'gx
^P1STREET("IS","txciq","xg' 9")
9 'gx
^P1STREET("IS","txcq gpd-kxkex")
xekxk-dpg qcxt
^P1STREET("IS","txcq gpd-kxkex","`aiaim")
miaia`
^P1STREET("IS","txcq gpd-kxkex","`bc")
cb`
^P1STREET("IS","txcq gpd-kxkex","`gcez")
zecg`
^P1STREET("IS","txcq gpd-kxkex","`ged")
deg`
^P1STREET("IS","txcq gpd-kxkex","`gefd")
dfeg`
^P1STREET("IS","txcq gpd-kxkex","`ilz")
zli`
^P1STREET("IS","txcq gpd-kxkex","`lenez")
zenel`
^P1STREET("IS","txcq gpd-kxkex","`lepim")
mipel`
^P1STREET("IS","txcq gpd-kxkex","`lgxifi")
ifixgl`
^P1STREET("IS","txcq gpd-kxkex","`lide")
edil`
^P1STREET("IS","txcq gpd-kxkex","`liyr")
ryil`
^P1STREET("IS","txcq gpd-kxkex","`lkqpcxepi")
ipexcpqkl`
^P1STREET("IS","txcq gpd-kxkex","`pwex")
xewp`
^P1STREET("IS","txcq gpd-kxkex","`qzx")
xzq`
^P1STREET("IS","txcq gpd-kxkex","`wlitheq")
qehtilw`
^P1STREET("IS","txcq gpd-kxkex","`xal")
lax`
^P1STREET("IS","txcq gpd-kxkex","`yl")
ly`
^P1STREET("IS","txcq gpd-kxkex","afl")
lfa
^P1STREET("IS","txcq gpd-kxkex","ail""e")
e"lia
^P1STREET("IS","txcq gpd-kxkex","aiz `l")
l` zia
^P1STREET("IS","txcq gpd-kxkex","ao yhg")
ghy oa
^P1STREET("IS","txcq gpd-kxkex","api gexio")
oixeg ipa
^P1STREET("IS","txcq gpd-kxkex","avix")
xiva
^P1STREET("IS","txcq gpd-kxkex","ax biex`")
`xeib xa
^P1STREET("IS","txcq gpd-kxkex","ax keka`")
`akek xa
^P1STREET("IS","txcq gpd-kxkex","axeyim")
miyexa
^P1STREET("IS","txcq gpd-kxkex","axw`i")
i`wxa
^P1STREET("IS","txcq gpd-kxkex","axwz")
zwxa
^P1STREET("IS","txcq gpd-kxkex","ayo")
oya
^P1STREET("IS","txcq gpd-kxkex","b`eld")
dle`b
^P1STREET("IS","txcq gpd-kxkex","barz idlem")
meldi zrab
^P1STREET("IS","txcq gpd-kxkex","belo")
oleb
^P1STREET("IS","txcq gpd-kxkex","belpi")
ipleb
^P1STREET("IS","txcq gpd-kxkex","bey gla")
alg yeb
^P1STREET("IS","txcq gpd-kxkex","bipz `bef")
feb` zpib
^P1STREET("IS","txcq gpd-kxkex","blaer")
realb
^P1STREET("IS","txcq gpd-kxkex","bo ref")
fer ob
^P1STREET("IS","txcq gpd-kxkex","caix")
xiac
^P1STREET("IS","txcq gpd-kxkex","cbpid")
dipbc
^P1STREET("IS","txcq gpd-kxkex","cekitz")
ztikec
^P1STREET("IS","txcq gpd-kxkex","co")
oc
^P1STREET("IS","txcq gpd-kxkex","cpi`l")
l`ipc
^P1STREET("IS","txcq gpd-kxkex","ctpd")
dptc
^P1STREET("IS","txcq gpd-kxkex","cxewx")
xwexc
^P1STREET("IS","txcq gpd-kxkex","cxj dapim")
mipad jxc
^P1STREET("IS","txcq gpd-kxkex","cxj dim")
mid jxc
^P1STREET("IS","txcq gpd-kxkex","cxj dpcia")
aicpd jxc
^P1STREET("IS","txcq gpd-kxkex","cxj dycd")
dcyd jxc
^P1STREET("IS","txcq gpd-kxkex","cxj lnxga")
agxnl jxc
^P1STREET("IS","txcq gpd-kxkex","cxj rixeo")
oexir jxc
^P1STREET("IS","txcq gpd-kxkex","cxj tiw`")
`wit jxc
^P1STREET("IS","txcq gpd-kxkex","d`apim")
mipa`d
^P1STREET("IS","txcq gpd-kxkex","d`cpim")
mipc`d
^P1STREET("IS","txcq gpd-kxkex","d`expim")
mipxe`d
^P1STREET("IS","txcq gpd-kxkex","d`leo")
oel`d
^P1STREET("IS","txcq gpd-kxkex","d`qis")
siq`d
^P1STREET("IS","txcq gpd-kxkex","d`v""l")
l"v`d
^P1STREET("IS","txcq gpd-kxkex","d`x""i")
i"x`d
^P1STREET("IS","txcq gpd-kxkex","d`ykeliz")
zileky`d
^P1STREET("IS","txcq gpd-kxkex","d`zxeb")
bexz`d
^P1STREET("IS","txcq gpd-kxkex","daehpim")
miphead
^P1STREET("IS","txcq gpd-kxkex","daeqzo")
ozqead
^P1STREET("IS","txcq gpd-kxkex","davlim")
milvad
^P1STREET("IS","txcq gpd-kxkex","daxibcd")
dcbixad
^P1STREET("IS","txcq gpd-kxkex","daxkd")
dkxad
^P1STREET("IS","txcq gpd-kxkex","db`eo")
oe`bd
^P1STREET("IS","txcq gpd-kxkex","dbcec")
cecbd
^P1STREET("IS","txcq gpd-kxkex","dbcp""r")
r"pcbd
^P1STREET("IS","txcq gpd-kxkex","dbexo")
oxebd
^P1STREET("IS","txcq gpd-kxkex","dblil")
lilbd
^P1STREET("IS","txcq gpd-kxkex","dblrc")
crlbd
^P1STREET("IS","txcq gpd-kxkex","dblrio")
oirlbd
^P1STREET("IS","txcq gpd-kxkex","dbpd")
dpbd
^P1STREET("IS","txcq gpd-kxkex","dbto")
otbd
^P1STREET("IS","txcq gpd-kxkex","dcec`im")
mi`cecd
^P1STREET("IS","txcq gpd-kxkex","dcwlim")
milwcd
^P1STREET("IS","txcq gpd-kxkex","dcxex")
xexcd
^P1STREET("IS","txcq gpd-kxkex","ddcqim")
miqcdd
^P1STREET("IS","txcq gpd-kxkex","ddcxim")
mixcdd
^P1STREET("IS","txcq gpd-kxkex","ddqzcxez")
zexczqdd
^P1STREET("IS","txcq gpd-kxkex","dec")
ced
^P1STREET("IS","txcq gpd-kxkex","dfiz")
zifd
^P1STREET("IS","txcq gpd-kxkex","dgavlz")
zlvagd
^P1STREET("IS","txcq gpd-kxkex","dgexy")
yxegd
^P1STREET("IS","txcq gpd-kxkex","dgi""l")
l"igd
^P1STREET("IS","txcq gpd-kxkex","dgleu")
uelgd
^P1STREET("IS","txcq gpd-kxkex","dgu")
ugd
^P1STREET("IS","txcq gpd-kxkex","dgxeaim")
miaexgd
^P1STREET("IS","txcq gpd-kxkex","dgxneo")
oenxgd
^P1STREET("IS","txcq gpd-kxkex","dhiiqim")
miqiihd
^P1STREET("IS","txcq gpd-kxkex","dhllim")
millhd
^P1STREET("IS","txcq gpd-kxkex","didlem")
meldid
^P1STREET("IS","txcq gpd-kxkex","dieba")
abeid
^P1STREET("IS","txcq gpd-kxkex","din`im")
mi`nid
^P1STREET("IS","txcq gpd-kxkex","divxpim")
mipxvid
^P1STREET("IS","txcq gpd-kxkex","dkxm")
mxkd
^P1STREET("IS","txcq gpd-kxkex","dkxnl")
lnxkd
^P1STREET("IS","txcq gpd-kxkex","dlaepd")
dpeald
^P1STREET("IS","txcq gpd-kxkex","dnbcl")
lcbnd
^P1STREET("IS","txcq gpd-kxkex","dnbipim")
mipibnd
^P1STREET("IS","txcq gpd-kxkex","dncxyid")
diyxcnd
^P1STREET("IS","txcq gpd-kxkex","dneya")
ayend
^P1STREET("IS","txcq gpd-kxkex","dniiqcim")
micqiind
^P1STREET("IS","txcq gpd-kxkex","dnkaim")
miaknd
^P1STREET("IS","txcq gpd-kxkex","dnqild")
dliqnd
^P1STREET("IS","txcq gpd-kxkex","dnriio")
oiirnd
^P1STREET("IS","txcq gpd-kxkex","dnrld")
dlrnd
^P1STREET("IS","txcq gpd-kxkex","dnrtilim")
militrnd
^P1STREET("IS","txcq gpd-kxkex","dnynx")
xnynd
^P1STREET("IS","txcq gpd-kxkex","dpehx")
xhepd
^P1STREET("IS","txcq gpd-kxkex","dpg""l")
l"gpd
^P1STREET("IS","txcq gpd-kxkex","dprexim")
mixerpd
^P1STREET("IS","txcq gpd-kxkex","dpyi`")
`iypd
^P1STREET("IS","txcq gpd-kxkex","drlid")
dilrd
^P1STREET("IS","txcq gpd-kxkex","drqiq")
qiqrd
^P1STREET("IS","txcq gpd-kxkex","dtln""g")
g"nltd
^P1STREET("IS","txcq gpd-kxkex","dvai")
iavd
^P1STREET("IS","txcq gpd-kxkex","dves")
sevd
^P1STREET("IS","txcq gpd-kxkex","dvpgpim")
mipgpvd
^P1STREET("IS","txcq gpd-kxkex","dvtixd")
dxitvd
^P1STREET("IS","txcq gpd-kxkex","dwenniez")
zeinnewd
^P1STREET("IS","txcq gpd-kxkex","dwhis")
sihwd
^P1STREET("IS","txcq gpd-kxkex","dwp`im")
mi`pwd
^P1STREET("IS","txcq gpd-kxkex","dwvix")
xivwd
^P1STREET("IS","txcq gpd-kxkex","dwyz")
zywd
^P1STREET("IS","txcq gpd-kxkex","dx`l")
l`xd
^P1STREET("IS","txcq gpd-kxkex","dxineo")
oenixd
^P1STREET("IS","txcq gpd-kxkex","dyenx")
xneyd
^P1STREET("IS","txcq gpd-kxkex","dyethim")
mihteyd
^P1STREET("IS","txcq gpd-kxkex","dygx")
xgyd
^P1STREET("IS","txcq gpd-kxkex","dyiwnd")
dnwiyd
^P1STREET("IS","txcq gpd-kxkex","dylem")
melyd
^P1STREET("IS","txcq gpd-kxkex","dypiim")
miipyd
^P1STREET("IS","txcq gpd-kxkex","dywcim")
micwyd
^P1STREET("IS","txcq gpd-kxkex","dzaex")
xeazd
^P1STREET("IS","txcq gpd-kxkex","dzezgpim")
mipgzezd
^P1STREET("IS","txcq gpd-kxkex","dzgid")
digzd
^P1STREET("IS","txcq gpd-kxkex","dzryid")
diyrzd
^P1STREET("IS","txcq gpd-kxkex","fkxid")
dixkf
^P1STREET("IS","txcq gpd-kxkex","fnix")
xinf
^P1STREET("IS","txcq gpd-kxkex","fxeaal")
laaexf
^P1STREET("IS","txcq gpd-kxkex","gawew")
wewag
^P1STREET("IS","txcq gpd-kxkex","gaxeo")
oexag
^P1STREET("IS","txcq gpd-kxkex","gbi")
ibg
^P1STREET("IS","txcq gpd-kxkex","gbld")
dlbg
^P1STREET("IS","txcq gpd-kxkex","giy")
yig
^P1STREET("IS","txcq gpd-kxkex","glevim")
mivelg
^P1STREET("IS","txcq gpd-kxkex","go")
og
^P1STREET("IS","txcq gpd-kxkex","gqicd")
dciqg
^P1STREET("IS","txcq gpd-kxkex","gxeyz")
zyexg
^P1STREET("IS","txcq gpd-kxkex","gynep`im")
mi`penyg
^P1STREET("IS","txcq gpd-kxkex","hexiim")
miixeh
^P1STREET("IS","txcq gpd-kxkex","idecd dlei")
ield dcedi
^P1STREET("IS","txcq gpd-kxkex","iepd")
dpei
^P1STREET("IS","txcq gpd-kxkex","ieqs w`xe")
ex`w sqei
^P1STREET("IS","txcq gpd-kxkex","itd pes")
sep dti
^P1STREET("IS","txcq gpd-kxkex","ixeylim")
milyexi
^P1STREET("IS","txcq gpd-kxkex","keka")
akek
^P1STREET("IS","txcq gpd-kxkex","kexy")
yxek
^P1STREET("IS","txcq gpd-kxkex","kkx dpyi`")
`iypd xkk
^P1STREET("IS","txcq gpd-kxkex","kpxz")
zxpk
^P1STREET("IS","txcq gpd-kxkex","leih")
hiel
^P1STREET("IS","txcq gpd-kxkex","lg""i")
i"gl
^P1STREET("IS","txcq gpd-kxkex","lineo")
oenil
^P1STREET("IS","txcq gpd-kxkex","nbc")
cbn
^P1STREET("IS","txcq gpd-kxkex","necirio")
oiricen
^P1STREET("IS","txcq gpd-kxkex","nex")
xen
^P1STREET("IS","txcq gpd-kxkex","nexid")
dixen
^P1STREET("IS","txcq gpd-kxkex","nexo")
oxen
^P1STREET("IS","txcq gpd-kxkex","nheld")
dlehn
^P1STREET("IS","txcq gpd-kxkex","nivtex")
xetvin
^P1STREET("IS","txcq gpd-kxkex","nixeo")
oexin
^P1STREET("IS","txcq gpd-kxkex","nkaim")
miakn
^P1STREET("IS","txcq gpd-kxkex","nkexd")
dxekn
^P1STREET("IS","txcq gpd-kxkex","nl`kd")
dk`ln
^P1STREET("IS","txcq gpd-kxkex","nl`ki")
ik`ln
^P1STREET("IS","txcq gpd-kxkex","nrld dbiaexim")
mixeaibd dlrn
^P1STREET("IS","txcq gpd-kxkex","nvcd")
dcvn
^P1STREET("IS","txcq gpd-kxkex","nxbpiz")
zipbxn
^P1STREET("IS","txcq gpd-kxkex","nxcki")
ikcxn
^P1STREET("IS","txcq gpd-kxkex","nynx")
xnyn
^P1STREET("IS","txcq gpd-kxkex","pae")
eap
^P1STREET("IS","txcq gpd-kxkex","pahim")
mihap
^P1STREET("IS","txcq gpd-kxkex","pbd")
dbp
^P1STREET("IS","txcq gpd-kxkex","ped bpim")
mipb dep
^P1STREET("IS","txcq gpd-kxkex","ped nxga")
agxn dep
^P1STREET("IS","txcq gpd-kxkex","pei")
iep
^P1STREET("IS","txcq gpd-kxkex","pgld")
dlgp
^P1STREET("IS","txcq gpd-kxkex","pgli`li")
il`ilgp
^P1STREET("IS","txcq gpd-kxkex","pgnid")
dingp
^P1STREET("IS","txcq gpd-kxkex","pgyeo")
oeygp
^P1STREET("IS","txcq gpd-kxkex","pil""i")
i"lip
^P1STREET("IS","txcq gpd-kxkex","pivpim")
mipvip
^P1STREET("IS","txcq gpd-kxkex","pix")
xip
^P1STREET("IS","txcq gpd-kxkex","pu")
up
^P1STREET("IS","txcq gpd-kxkex","pyx")
xyp
^P1STREET("IS","txcq gpd-kxkex","qaieo")
oeiaq
^P1STREET("IS","txcq gpd-kxkex","qbeld")
dlebq
^P1STREET("IS","txcq gpd-kxkex","qipi")
ipiq
^P1STREET("IS","txcq gpd-kxkex","qn' `ixiq")
qixi` 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' `ld")
dl` 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' `xf")
fx` 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' axwo")
owxa 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' ben`")
`neb 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' cela")
alec 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' dbo")
obd 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' dklpiz")
ziplkd 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' dxces")
secxd 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' dyihd")
dhiyd 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' exc")
cxe 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' fdaiz")
ziadf 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' gippiz")
zippig 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' gxviz")
zivxg 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' htg")
gth 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' igfw`l")
l`wfgi 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' iqnio")
oinqi 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' iwipzeo")
oezpiwi 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' kekaiz")
ziakek 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' kzind")
dnizk 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' lehm")
mhel 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' lilj")
jlil 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' nbyinim")
miniybn 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' nxeed")
deexn 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' qibliz")
zilbiq 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' vax")
xav 'nq
^P1STREET("IS","txcq gpd-kxkex","qn' xwtz")
ztwx 'nq
^P1STREET("IS","txcq gpd-kxkex","qpepiz")
zipepq
^P1STREET("IS","txcq gpd-kxkex","qtix")
xitq
^P1STREET("IS","txcq gpd-kxkex","rfx`")
`xfr
^P1STREET("IS","txcq gpd-kxkex","rlenim")
minelr
^P1STREET("IS","txcq gpd-kxkex","rnl")
lnr
^P1STREET("IS","txcq gpd-kxkex","rvieo")
oeivr
^P1STREET("IS","txcq gpd-kxkex","rvn`ez")
ze`nvr
^P1STREET("IS","txcq gpd-kxkex","rvneo")
oenvr
^P1STREET("IS","txcq gpd-kxkex","rwia`")
`aiwr
^P1STREET("IS","txcq gpd-kxkex","rxebez")
zebexr
^P1STREET("IS","txcq gpd-kxkex","t`x")
x`t
^P1STREET("IS","txcq gpd-kxkex","tceiim")
miiect
^P1STREET("IS","txcq gpd-kxkex","tlb")
blt
^P1STREET("IS","txcq gpd-kxkex","tpgq")
qgpt
^P1STREET("IS","txcq gpd-kxkex","vax irl")
lri xav
^P1STREET("IS","txcq gpd-kxkex","vdld")
dldv
^P1STREET("IS","txcq gpd-kxkex","vnxz dneyad")
dayend zxnv
^P1STREET("IS","txcq gpd-kxkex","vtpid")
diptv
^P1STREET("IS","txcq gpd-kxkex","vtxixim")
mixixtv
^P1STREET("IS","txcq gpd-kxkex","w`etno")
onte`w
^P1STREET("IS","txcq gpd-kxkex","wcnd")
dncw
^P1STREET("IS","txcq gpd-kxkex","wexo")
oxew
^P1STREET("IS","txcq gpd-kxkex","wlr")
rlw
^P1STREET("IS","txcq gpd-kxkex","wpci")
icpw
^P1STREET("IS","txcq gpd-kxkex","wxo diqec")
ceqid oxw
^P1STREET("IS","txcq gpd-kxkex","x`yepim")
mipey`x
^P1STREET("IS","txcq gpd-kxkex","xna""m")
m"anx
^P1STREET("IS","txcq gpd-kxkex","xnf")
fnx
^P1STREET("IS","txcq gpd-kxkex","y`ppim")
mipp`y
^P1STREET("IS","txcq gpd-kxkex","ya""l")
l"ay
^P1STREET("IS","txcq gpd-kxkex","yafi")
ifay
^P1STREET("IS","txcq gpd-kxkex","yai vieo")
oeiv iay
^P1STREET("IS","txcq gpd-kxkex","yail dzlnic")
cinlzd liay
^P1STREET("IS","txcq gpd-kxkex","yc' viepez")
zepeiv 'cy
^P1STREET("IS","txcq gpd-kxkex","yc' ww""l")
l"ww 'cy
^P1STREET("IS","txcq gpd-kxkex","yedm")
mdey
^P1STREET("IS","txcq gpd-kxkex","yeyo")
oyey
^P1STREET("IS","txcq gpd-kxkex","ygs")
sgy
^P1STREET("IS","txcq gpd-kxkex","yiaelim")
mileaiy
^P1STREET("IS","txcq gpd-kxkex","yihd")
dhiy
^P1STREET("IS","txcq gpd-kxkex","ylcb")
bcly
^P1STREET("IS","txcq gpd-kxkex","ylenvieo")
oeivnely
^P1STREET("IS","txcq gpd-kxkex","ylnd `ao baixel")
lexiab oa` dnly
^P1STREET("IS","txcq gpd-kxkex","ynyeo")
oeyny
^P1STREET("IS","txcq gpd-kxkex","zcdx")
xdcz
^P1STREET("IS","txcq gpd-kxkex","zenx")
xnez
^P1STREET("IS","txcq gpd-kxkex","zgknepi")
ipenkgz
^P1STREET("IS","txcq gpd-kxkex","zl ivgw")
wgvi lz
^P1STREET("IS","txcq gpd-kxkex","zl vai")
iav lz
^P1STREET("IS","txcq gpd-kxkex","zl ylem")
mely lz
^P1STREET("IS","txcq gpd-kxkex","zlnim")
minlz
^P1STREET("IS","txcq gpd-kxkex","zltiez")
zeitlz
^P1STREET("IS","txcq gpd-kxkex","znx")
xnz
^P1STREET("IS","txcq gpd-kxkex","ztef")
fetz
^P1STREET("IS","txcq gpd-kxkex","zwend")
dnewz
^P1STREET("IS","txcq gpd-kxkex","zxt""h")
h"txz
^P1STREET("IS","txcqid")
diqcxt
^P1STREET("IS","txcqid","cxj d`xfim")
mifx`d jxc
^P1STREET("IS","txcqid","d`bef")
feb`d
^P1STREET("IS","txcqid","d`ixeq")
qexi`d
^P1STREET("IS","txcqid","d`ld")
dl`d
^P1STREET("IS","txcqid","d`leo")
oel`d
^P1STREET("IS","txcqid","d`xf")
fx`d
^P1STREET("IS","txcqid","d`yl")
ly`d
^P1STREET("IS","txcqid","daxey")
yexad
^P1STREET("IS","txcqid","dbto")
otbd
^P1STREET("IS","txcqid","dcwl")
lwcd
^P1STREET("IS","txcqid","ddcxim")
mixcdd
^P1STREET("IS","txcqid","dexc")
cxed
^P1STREET("IS","txcqid","dfiz")
zifd
^P1STREET("IS","txcqid","dgxea")
aexgd
^P1STREET("IS","txcqid","dgxviz")
zivxgd
^P1STREET("IS","txcqid","diqnio")
oinqid
^P1STREET("IS","txcqid","dklpiz")
ziplkd
^P1STREET("IS","txcqid","dniiqcim")
micqiind
^P1STREET("IS","txcqid","dpxwiq")
qiwxpd
^P1STREET("IS","txcqid","dpyi`")
`iypd
^P1STREET("IS","txcqid","dqaieo")
oeiaqd
^P1STREET("IS","txcqid","drxad")
daxrd
^P1STREET("IS","txcqid","dthl")
lhtd
^P1STREET("IS","txcqid","dtiweq")
qewitd
^P1STREET("IS","txcqid","dvax")
xavd
^P1STREET("IS","txcqid","dvpgpim")
mipgpvd
^P1STREET("IS","txcqid","dxezm")
mzexd
^P1STREET("IS","txcqid","dxineo")
oenixd
^P1STREET("IS","txcqid","dxna""m")
m"anxd
^P1STREET("IS","txcqid","dxwtz")
ztwxd
^P1STREET("IS","txcqid","dyeyo")
oyeyd
^P1STREET("IS","txcqid","dywnd")
dnwyd
^P1STREET("IS","txcqid","dz`pd")
dp`zd
^P1STREET("IS","txcqid","dzez")
zezd
^P1STREET("IS","txcqid","dzicdx")
xdcizd
^P1STREET("IS","txcqid","dznx")
xnzd
^P1STREET("IS","txcqid","dzteg")
getzd
^P1STREET("IS","txcqid","iepd tiyx")
xyit dpei
^P1STREET("IS","txcqid","pexiz")
zixep
^P1STREET("IS","txcqid","qnhz dcxex")
xexcd zhnq
^P1STREET("IS","txcqid","qnhz dygs")
sgyd zhnq
^P1STREET("IS","txcqid","rli dyxeo")
oexyd ilr
^P1STREET("IS","txcqid","yc' piqim")
miqip 'cy
^P1STREET("IS","txcqid","ylem yafi")
ifay mely
^P1STREET("IS","txcqid","yxz")
zxy
^P1STREET("IS","txec")
cext
^P1STREET("IS","txkd")
dkxt
^P1STREET("IS","txreo")
oerxt
^P1STREET("IS","tzg zwed")
dewz gzt
^P1STREET("IS","tzg zwed","`a` `gin`ix")
xi`nig` `a`
^P1STREET("IS","tzg zwed","`ai `exo")
oxe` ia`
^P1STREET("IS","tzg zwed","`aihl")
lhia`
^P1STREET("IS","tzg zwed","`ainlj")
jlnia`
^P1STREET("IS","tzg zwed","`ao baixel")
lexiab oa`
^P1STREET("IS","tzg zwed","`ao qtix")
xitq oa`
^P1STREET("IS","tzg zwed","`ao rfx`")
`xfr oa`
^P1STREET("IS","tzg zwed","`axap`l")
l`paxa`
^P1STREET("IS","tzg zwed","`axdm dxvtlc")
cltvxd mdxa`
^P1STREET("IS","tzg zwed","`bxeo bxyeo")
oeyxb oexb`
^P1STREET("IS","tzg zwed","`cb")
bc`
^P1STREET("IS","tzg zwed","`daz vieo")
oeiv zad`
^P1STREET("IS","tzg zwed","`dxeo kvplqeo")
oeqlpvk oexd`
^P1STREET("IS","tzg zwed","`dxeo nqwio")
oiwqn oexd`
^P1STREET("IS","tzg zwed","`dxepeaiu")
uiaepexd`
^P1STREET("IS","tzg zwed","`ecm")
mce`
^P1STREET("IS","tzg zwed","`elhxno")
onxhle`
^P1STREET("IS","tzg zwed","`epwleq")
qelwpe`
^P1STREET("IS","tzg zwed","`etix")
xite`
^P1STREET("IS","tzg zwed","`etwim")
miwte`
^P1STREET("IS","tzg zwed","`ex igfw`l leipyhiio")
oiihypiel l`wfgi xe`
^P1STREET("IS","tzg zwed","`exi vai bxipaxb")
bxapixb iav ixe`
^P1STREET("IS","tzg zwed","`exlea")
aelxe`
^P1STREET("IS","tzg zwed","`exlpqwi")
iwqplxe`
^P1STREET("IS","tzg zwed","`f""x")
x"f`
^P1STREET("IS","tzg zwed","`gc drm")
mrd cg`
^P1STREET("IS","tzg zwed","`ged irwa")
awri deg`
^P1STREET("IS","tzg zwed","`gim akx")
xka mig`
^P1STREET("IS","tzg zwed","`gim biqio")
oiqib mig`
^P1STREET("IS","tzg zwed","`gim ihweaqwi")
iwqaewhi mig`
^P1STREET("IS","tzg zwed","`gim itd")
dti mig`
^P1STREET("IS","tzg zwed","`gim iyx`li")
il`xyi mig`
^P1STREET("IS","tzg zwed","`gim kxnli")
ilnxk mig`
^P1STREET("IS","tzg zwed","`gim xefea")
aefex mig`
^P1STREET("IS","tzg zwed","`iclno")
onlci`
^P1STREET("IS","tzg zwed","`iileo")
oelii`
^P1STREET("IS","tzg zwed","`ikilea ivgw")
wgvi aeliki`
^P1STREET("IS","tzg zwed","`ikilea rfx`")
`xfr aeliki`
^P1STREET("IS","tzg zwed","`ilz")
zli`
^P1STREET("IS","tzg zwed","`inax")
xani`
^P1STREET("IS","tzg zwed","`ipyhiio")
oiihypi`
^P1STREET("IS","tzg zwed","`lepim")
mipel`
^P1STREET("IS","tzg zwed","`lgpo ivgw")
wgvi opgl`
^P1STREET("IS","tzg zwed","`lgxifi")
ifixgl`
^P1STREET("IS","tzg zwed","`lhno")
onhl`
^P1STREET("IS","tzg zwed","`liwim")
miwil`
^P1STREET("IS","tzg zwed","`liyia")
aiyil`
^P1STREET("IS","tzg zwed","`lkqpcx fiic")
ciif xcpqkl`
^P1STREET("IS","tzg zwed","`lkqpcx ip`i")
i`pi xcpqkl`
^P1STREET("IS","tzg zwed","`lkqpcx to")
ot xcpqkl`
^P1STREET("IS","tzg zwed","`lnbex")
xebnl`
^P1STREET("IS","tzg zwed","`lneb")
benl`
^P1STREET("IS","tzg zwed","`lrfx excipeo")
oepicxe xfrl`
^P1STREET("IS","tzg zwed","`lwgi nxcki")
ikcxn igwl`
^P1STREET("IS","tzg zwed","`lzx nidec")
cedin xzl`
^P1STREET("IS","tzg zwed","`lzxno")
onxzl`
^P1STREET("IS","tzg zwed","`nil fel`")
`lef lin`
^P1STREET("IS","tzg zwed","`nix blaer")
realb xin`
^P1STREET("IS","tzg zwed","`nqhxcm")
mcxhqn`
^P1STREET("IS","tzg zwed","`pbl")
lbp`
^P1STREET("IS","tzg zwed","`pcxqo")
oqxcp`
^P1STREET("IS","tzg zwed","`pd hike")
ekih dp`
^P1STREET("IS","tzg zwed","`pd txpw")
wpxt dp`
^P1STREET("IS","tzg zwed","`pilaiu")
uialip`
^P1STREET("IS","tzg zwed","`pqwi")
iwqp`
^P1STREET("IS","tzg zwed","`qhd")
dhq`
^P1STREET("IS","tzg zwed","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","tzg zwed","`trl")
lrt`
^P1STREET("IS","tzg zwed","`tyhiio")
oiihyt`
^P1STREET("IS","tzg zwed","`v""l")
l"v`
^P1STREET("IS","tzg zwed","`xfim")
mifx`
^P1STREET("IS","tzg zwed","`xid ao `lirfx")
xfril` oa dix`
^P1STREET("IS","tzg zwed","`xlefexea")
aexefelx`
^P1STREET("IS","tzg zwed","`ykpfi igfw`l")
l`wfgi ifpky`
^P1STREET("IS","tzg zwed","`yx ax lei")
iel xa xy`
^P1STREET("IS","tzg zwed","`zx qixwio")
oiwxiq xz`
^P1STREET("IS","tzg zwed","a`xi")
ix`a
^P1STREET("IS","tzg zwed","aali")
ilaa
^P1STREET("IS","tzg zwed","acx cec")
cec xca
^P1STREET("IS","tzg zwed","ad""c 1")
1 c"da
^P1STREET("IS","tzg zwed","adh")
hda
^P1STREET("IS","tzg zwed","aeql")
lqea
^P1STREET("IS","tzg zwed","aew iyi")
iyi wea
^P1STREET("IS","tzg zwed","aexekea")
aekexea
^P1STREET("IS","tzg zwed","aexl`")
`lxea
^P1STREET("IS","tzg zwed","afl")
lfa
^P1STREET("IS","tzg zwed","ai`liw")
wil`ia
^P1STREET("IS","tzg zwed","aihxno")
onxhia
^P1STREET("IS","tzg zwed","ail""e")
e"lia
^P1STREET("IS","tzg zwed","ailiq")
qilia
^P1STREET("IS","tzg zwed","aixpaeim pzo")
ozp mieapxia
^P1STREET("IS","tzg zwed","akx nyd")
dyn xka
^P1STREET("IS","tzg zwed","alei nyd")
dyn iela
^P1STREET("IS","tzg zwed","alhinex")
xenihla
^P1STREET("IS","tzg zwed","altex")
xetla
^P1STREET("IS","tzg zwed","ao fk`i")
i`kf oa
^P1STREET("IS","tzg zwed","ao idecd")
dcedi oa
^P1STREET("IS","tzg zwed","ao nyd")
dyn oa
^P1STREET("IS","tzg zwed","ao rfx")
xfr oa
^P1STREET("IS","tzg zwed","ao vieo bliq")
qilb oeiv oa
^P1STREET("IS","tzg zwed","apinio idlem")
meldi oinipa
^P1STREET("IS","tzg zwed","apinipi `nix")
xin` ipinipa
^P1STREET("IS","tzg zwed","aq flib")
bilf qa
^P1STREET("IS","tzg zwed","arl dzpi`")
`ipzd lra
^P1STREET("IS","tzg zwed","arl rxebez")
zebexr lra
^P1STREET("IS","tzg zwed","ary""h")
h"yra
^P1STREET("IS","tzg zwed","avxi ieqs")
sqei ixva
^P1STREET("IS","tzg zwed","ax `ilo")
oli` xa
^P1STREET("IS","tzg zwed","ax biex`")
`xeib xa
^P1STREET("IS","tzg zwed","ax ieg`i")
i`gei xa
^P1STREET("IS","tzg zwed","ax keka`")
`akek xa
^P1STREET("IS","tzg zwed","ax`""f f`a")
a`f f"`xa
^P1STREET("IS","tzg zwed","ax`pciq")
qicp`xa
^P1STREET("IS","tzg zwed","axbno vai")
iav onbxa
^P1STREET("IS","tzg zwed","axciv'a `a`")
`a` a'vicxa
^P1STREET("IS","tzg zwed","axec nkq")
qkn cexa
^P1STREET("IS","tzg zwed","axeicd")
dciexa
^P1STREET("IS","tzg zwed","axej nwq")
qwn jexa
^P1STREET("IS","tzg zwed","axeo cd npyd")
dypn dc oexa
^P1STREET("IS","tzg zwed","axh `dxeo")
oexd` hxa
^P1STREET("IS","tzg zwed","axhpex`")
`xephxa
^P1STREET("IS","tzg zwed","axleaiu")
uiaelxa
^P1STREET("IS","tzg zwed","axpcd f`a")
a`f dcpxa
^P1STREET("IS","tzg zwed","axph fxg")
gxf hpxa
^P1STREET("IS","tzg zwed","axpx")
xpxa
^P1STREET("IS","tzg zwed","axpyhiio kdo")
odk oiihypxa
^P1STREET("IS","tzg zwed","axweaiu ivgw")
wgvi uiaewxa
^P1STREET("IS","tzg zwed","axwz")
zwxa
^P1STREET("IS","tzg zwed","axy `yx")
xy` yxa
^P1STREET("IS","tzg zwed","az yar")
ray za
^P1STREET("IS","tzg zwed","az ylnd")
dnly za
^P1STREET("IS","tzg zwed","b'nili")
ilin'b
^P1STREET("IS","tzg zwed","b`eli zino")
oniz ile`b
^P1STREET("IS","tzg zwed","bc nkpq")
qpkn cb
^P1STREET("IS","tzg zwed","bcp""r")
r"pcb
^P1STREET("IS","tzg zwed","bcxd")
dxcb
^P1STREET("IS","tzg zwed","behno")
onheb
^P1STREET("IS","tzg zwed","belcaxb cec")
cec bxacleb
^P1STREET("IS","tzg zwed","belcaxb ivgw")
wgvi bxacleb
^P1STREET("IS","tzg zwed","belcaxb l`d")
d`l bxacleb
^P1STREET("IS","tzg zwed","belcd n`ix")
xi`n dcleb
^P1STREET("IS","tzg zwed","belcpdixy")
yxidpcleb
^P1STREET("IS","tzg zwed","belena `lide")
edil` aneleb
^P1STREET("IS","tzg zwed","bepo")
opeb
^P1STREET("IS","tzg zwed","bexceo")
oecxeb
^P1STREET("IS","tzg zwed","bexceo `dxeo cec")
cec oexd` oecxeb
^P1STREET("IS","tzg zwed","bexceo nxcki")
ikcxn oecxeb
^P1STREET("IS","tzg zwed","bexyhiio")
oiihyxeb
^P1STREET("IS","tzg zwed","bey gla")
alg yeb
^P1STREET("IS","tzg zwed","bey rvieo")
oeivr yeb
^P1STREET("IS","tzg zwed","bfiz")
zifb
^P1STREET("IS","tzg zwed","biayhiio")
oiihyaib
^P1STREET("IS","tzg zwed","biiqez dyixieo")
oeixiyd zeqiib
^P1STREET("IS","tzg zwed","biqio `aylem")
melya` oiqib
^P1STREET("IS","tzg zwed","bl rc")
cr lb
^P1STREET("IS","tzg zwed","blio")
oilb
^P1STREET("IS","tzg zwed","blivpyhiio")
oiihypvilb
^P1STREET("IS","tzg zwed","bo ylnd")
dnly ob
^P1STREET("IS","tzg zwed","bpi bfiz")
zifb ipb
^P1STREET("IS","tzg zwed","bxefpaxb")
bxapfexb
^P1STREET("IS","tzg zwed","bxepipbx t`el")
le`t xbpipexb
^P1STREET("IS","tzg zwed","bxipaeim")
mieapixb
^P1STREET("IS","tzg zwed","bxipaxb `""i")
i"` bxapixb
^P1STREET("IS","tzg zwed","bxipaxb giim")
miig bxapixb
^P1STREET("IS","tzg zwed","bxipyhiio")
oiihypixb
^P1STREET("IS","tzg zwed","bxipyteo")
oetypixb
^P1STREET("IS","tzg zwed","bxpih")
hipxb
^P1STREET("IS","tzg zwed","bxu")
uxb
^P1STREET("IS","tzg zwed","ca bxepx")
xpexb ac
^P1STREET("IS","tzg zwed","ca def")
fed ac
^P1STREET("IS","tzg zwed","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","tzg zwed","cbl x`eao")
oae`x lbc
^P1STREET("IS","tzg zwed","cbpid")
dipbc
^P1STREET("IS","tzg zwed","ceacapi")
ipacaec
^P1STREET("IS","tzg zwed","ceapea ynreo")
oerny aepaec
^P1STREET("IS","tzg zwed","cec `aico")
ocia` cec
^P1STREET("IS","tzg zwed","cec ao bexieo")
oeixeb oa cec
^P1STREET("IS","tzg zwed","cec enyd niifpx")
xpfiin dyne cec
^P1STREET("IS","tzg zwed","cec iyx`l")
l`xyi cec
^P1STREET("IS","tzg zwed","cec txiyno")
onyixt cec
^P1STREET("IS","tzg zwed","cexeo")
oexec
^P1STREET("IS","tzg zwed","cipeaiu `aylem")
melya` uiaepic
^P1STREET("IS","tzg zwed","ciqwio")
oiwqic
^P1STREET("IS","tzg zwed","cpnxw")
wxnpc
^P1STREET("IS","tzg zwed","cpwpx n`ix")
xi`n xpwpc
^P1STREET("IS","tzg zwed","ctpd")
dptc
^P1STREET("IS","tzg zwed","cwx")
xwc
^P1STREET("IS","tzg zwed","cxfpx igi`l")
l`igi xpfxc
^P1STREET("IS","tzg zwed","cxiiteq")
qetiixc
^P1STREET("IS","tzg zwed","cxj `m dneyaez")
zeayend m` jxc
^P1STREET("IS","tzg zwed","cxj lec")
cel jxc
^P1STREET("IS","tzg zwed","cxj npgm abio")
oiba mgpn jxc
^P1STREET("IS","tzg zwed","cxj xaio")
oiax jxc
^P1STREET("IS","tzg zwed","d` a`iix")
xii`a `d
^P1STREET("IS","tzg zwed","d`aia")
aia`d
^P1STREET("IS","tzg zwed","d`bneo")
oenb`d
^P1STREET("IS","tzg zwed","d`eto")
ote`d
^P1STREET("IS","tzg zwed","d`exim")
mixe`d
^P1STREET("IS","tzg zwed","d`expim")
mipxe`d
^P1STREET("IS","tzg zwed","d`gim x`a")
a`x mig`d
^P1STREET("IS","tzg zwed","d`gim yhxiih")
hiixhy mig`d
^P1STREET("IS","tzg zwed","d`ilpez")
zepli`d
^P1STREET("IS","tzg zwed","d`ixeqim")
miqexi`d
^P1STREET("IS","tzg zwed","d`les cec nxkeq")
qekxn cec sel`d
^P1STREET("IS","tzg zwed","d`les xgarm f`ai")
ia`f mragx sel`d
^P1STREET("IS","tzg zwed","d`x""f")
f"x`d
^P1STREET("IS","tzg zwed","d`x""i dwcey")
yecwd i"x`d
^P1STREET("IS","tzg zwed","d`zxeb")
bexz`d
^P1STREET("IS","tzg zwed","daepim")
mipead
^P1STREET("IS","tzg zwed","daexqw`i")
i`wqxead
^P1STREET("IS","tzg zwed","dahgeo")
oeghad
^P1STREET("IS","tzg zwed","dapim")
mipad
^P1STREET("IS","tzg zwed","daxeo dixy")
yxid oexad
^P1STREET("IS","tzg zwed","daxey")
yexad
^P1STREET("IS","tzg zwed","dblil")
lilbd
^P1STREET("IS","tzg zwed","dbto")
otbd
^P1STREET("IS","tzg zwed","dbx""`")
`"xbd
^P1STREET("IS","tzg zwed","dc`id reacid")
dicaer di`cd
^P1STREET("IS","tzg zwed","dcs dieni")
ineid scd
^P1STREET("IS","tzg zwed","dcwl")
lwcd
^P1STREET("IS","tzg zwed","dcxex")
xexcd
^P1STREET("IS","tzg zwed","ddbpd")
dpbdd
^P1STREET("IS","tzg zwed","ddcq")
qcdd
^P1STREET("IS","tzg zwed","ddcx")
xcdd
^P1STREET("IS","tzg zwed","ddqzcxez")
zexczqdd
^P1STREET("IS","tzg zwed","deaxno")
onxaed
^P1STREET("IS","tzg zwed","dephxno")
onxhped
^P1STREET("IS","tzg zwed","dexc")
cxed
^P1STREET("IS","tzg zwed","deyr")
ryed
^P1STREET("IS","tzg zwed","deziwim")
miwized
^P1STREET("IS","tzg zwed","dfdx")
xdfd
^P1STREET("IS","tzg zwed","dff")
ffd
^P1STREET("IS","tzg zwed","dfiz")
zifd
^P1STREET("IS","tzg zwed","dfnix")
xinfd
^P1STREET("IS","tzg zwed","dgavlz")
zlvagd
^P1STREET("IS","tzg zwed","dgiil d`lnepi")
ipenl`d liigd
^P1STREET("IS","tzg zwed","dglevim")
mivelgd
^P1STREET("IS","tzg zwed","dglil")
lilgd
^P1STREET("IS","tzg zwed","dgniyd")
dyingd
^P1STREET("IS","tzg zwed","dgva")
avgd
^P1STREET("IS","tzg zwed","dgxea")
aexgd
^P1STREET("IS","tzg zwed","dgxeyz")
zyexgd
^P1STREET("IS","tzg zwed","dgxneo")
oenxgd
^P1STREET("IS","tzg zwed","dgxy")
yxgd
^P1STREET("IS","tzg zwed","dgynep`im")
mi`penygd
^P1STREET("IS","tzg zwed","dgzm qetx")
xteq mzgd
^P1STREET("IS","tzg zwed","diapx")
xpaid
^P1STREET("IS","tzg zwed","diqnio")
oinqid
^P1STREET("IS","tzg zwed","divixd")
dxivid
^P1STREET("IS","tzg zwed","dixco")
ocxid
^P1STREET("IS","tzg zwed","dixwepim")
mipewxid
^P1STREET("IS","tzg zwed","dkexm")
mxekd
^P1STREET("IS","tzg zwed","dkipex")
xepikd
^P1STREET("IS","tzg zwed","dkxm")
mxkd
^P1STREET("IS","tzg zwed","dl""d")
d"ld
^P1STREET("IS","tzg zwed","dlei")
ield
^P1STREET("IS","tzg zwed","dlela")
aleld
^P1STREET("IS","tzg zwed","dlilj")
jlild
^P1STREET("IS","tzg zwed","dlineo")
oenild
^P1STREET("IS","tzg zwed","dll fkxid")
dixkf lld
^P1STREET("IS","tzg zwed","dlqipwi")
iwpiqld
^P1STREET("IS","tzg zwed","dltic")
citld
^P1STREET("IS","tzg zwed","dltxio")
oixtld
^P1STREET("IS","tzg zwed","dlx")
xld
^P1STREET("IS","tzg zwed","dn""b")
b"nd
^P1STREET("IS","tzg zwed","dnbic")
cibnd
^P1STREET("IS","tzg zwed","dnbipim")
mipibnd
^P1STREET("IS","tzg zwed","dnbyinim")
miniybnd
^P1STREET("IS","tzg zwed","dndx""l ntx`b")
b`xtn l"xdnd
^P1STREET("IS","tzg zwed","dnexim")
mixend
^P1STREET("IS","tzg zwed","dniiqcim")
micqiind
^P1STREET("IS","tzg zwed","dnizx")
xzind
^P1STREET("IS","tzg zwed","dnkaim")
miaknd
^P1STREET("IS","tzg zwed","dnl`kd")
dk`lnd
^P1STREET("IS","tzg zwed","dnlj kexy")
yxek jlnd
^P1STREET("IS","tzg zwed","dnlj y`el")
le`y jlnd
^P1STREET("IS","tzg zwed","dnlkd `qzx")
xzq` dklnd
^P1STREET("IS","tzg zwed","dnlkim")
miklnd
^P1STREET("IS","tzg zwed","dnrtilim")
militrnd
^P1STREET("IS","tzg zwed","dntlqim")
miqltnd
^P1STREET("IS","tzg zwed","dntrlim")
milrtnd
^P1STREET("IS","tzg zwed","dnxu")
uxnd
^P1STREET("IS","tzg zwed","dpai`im")
mi`iapd
^P1STREET("IS","tzg zwed","dpba")
abpd
^P1STREET("IS","tzg zwed","dpg""l")
l"gpd
^P1STREET("IS","tzg zwed","dpibepim")
mipebipd
^P1STREET("IS","tzg zwed","dpivpim")
mipvipd
^P1STREET("IS","tzg zwed","dpvgeo")
oegvpd
^P1STREET("IS","tzg zwed","dpvi""a")
a"ivpd
^P1STREET("IS","tzg zwed","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","tzg zwed","dpxwiqim")
miqiwxpd
^P1STREET("IS","tzg zwed","dpyi`im")
mi`iypd
^P1STREET("IS","tzg zwed","dq")
qd
^P1STREET("IS","tzg zwed","dqcp`")
`pcqd
^P1STREET("IS","tzg zwed","dqedxim")
mixdeqd
^P1STREET("IS","tzg zwed","dqiaim")
miaiqd
^P1STREET("IS","tzg zwed","dqpdcxio")
oixcdpqd
^P1STREET("IS","tzg zwed","dqzeepiz")
zipeezqd
^P1STREET("IS","tzg zwed","draecd")
dceard
^P1STREET("IS","tzg zwed","dreac dviepi")
ipeivd caerd
^P1STREET("IS","tzg zwed","dreba")
aberd
^P1STREET("IS","tzg zwed","drlid dypid")
dipyd dilrd
^P1STREET("IS","tzg zwed","drpal")
laprd
^P1STREET("IS","tzg zwed","drvn`ez")
ze`nvrd
^P1STREET("IS","tzg zwed","drvneo")
oenvrd
^P1STREET("IS","tzg zwed","drxad")
daxrd
^P1STREET("IS","tzg zwed","dterl dnfxgi")
igxfnd lretd
^P1STREET("IS","tzg zwed","dterl dvrix")
xirvd lretd
^P1STREET("IS","tzg zwed","dtexvim")
mivxetd
^P1STREET("IS","tzg zwed","dtiweq")
qewitd
^P1STREET("IS","tzg zwed","dtln""g")
g"nltd
^P1STREET("IS","tzg zwed","dtxcq")
qcxtd
^P1STREET("IS","tzg zwed","dtxcqim")
miqcxtd
^P1STREET("IS","tzg zwed","dtxg")
gxtd
^P1STREET("IS","tzg zwed","dtxhifpim")
mipfihxtd
^P1STREET("IS","tzg zwed","dverxim")
mixrevd
^P1STREET("IS","tzg zwed","dviix")
xiivd
^P1STREET("IS","tzg zwed","dvpgpim")
mipgpvd
^P1STREET("IS","tzg zwed","dvtixd")
dxitvd
^P1STREET("IS","tzg zwed","dwepbxq")
qxbpewd
^P1STREET("IS","tzg zwed","dwxo")
oxwd
^P1STREET("IS","tzg zwed","dwyz")
zywd
^P1STREET("IS","tzg zwed","dwzxeq")
qexzwd
^P1STREET("IS","tzg zwed","dx vieo")
oeiv xd
^P1STREET("IS","tzg zwed","dx`yepim")
mipey`xd
^P1STREET("IS","tzg zwed","dxa `aexair")
riaxea` axd
^P1STREET("IS","tzg zwed","dxa `ephxno")
onxhpe` axd
^P1STREET("IS","tzg zwed","dxa `exaj n`ix")
xi`n jaxe` axd
^P1STREET("IS","tzg zwed","dxa `ileivwi")
iwvieli` axd
^P1STREET("IS","tzg zwed","dxa `lwlri")
irlwl` axd
^P1STREET("IS","tzg zwed","dxa al`e")
e`la axd
^P1STREET("IS","tzg zwed","dxa belc")
cleb axd
^P1STREET("IS","tzg zwed","dxa bleqw`")
`wqelb axd
^P1STREET("IS","tzg zwed","dxa ceihy")
yhiec axd
^P1STREET("IS","tzg zwed","dxa dlx")
xld axd
^P1STREET("IS","tzg zwed","dxa dxveb")
bevxd axd
^P1STREET("IS","tzg zwed","dxa eels")
slee axd
^P1STREET("IS","tzg zwed","dxa hiia ivgw")
wgvi aiih axd
^P1STREET("IS","tzg zwed","dxa k""u x`eao")
oae`x u"k axd
^P1STREET("IS","tzg zwed","dxa le`i")
i`el axd
^P1STREET("IS","tzg zwed","dxa nyd tiphe")
ehpit dyn axd
^P1STREET("IS","tzg zwed","dxa nyd vai pxid")
dixp iav dyn axd
^P1STREET("IS","tzg zwed","dxa piino")
oniip axd
^P1STREET("IS","tzg zwed","dxa piqim ivgw")
wgvi miqip axd
^P1STREET("IS","tzg zwed","dxa refi`l")
l`ifer axd
^P1STREET("IS","tzg zwed","dxa rni`l")
l`inr axd
^P1STREET("IS","tzg zwed","dxa tipv'i")
i'vpit axd
^P1STREET("IS","tzg zwed","dxa vaiw")
wiav axd
^P1STREET("IS","tzg zwed","dxa vrixi ylnd")
dnly ixirv axd
^P1STREET("IS","tzg zwed","dxa wew")
wew axd
^P1STREET("IS","tzg zwed","dxa x`m")
m`x axd
^P1STREET("IS","tzg zwed","dxa ywci")
icwy axd
^P1STREET("IS","tzg zwed","dxapiz nxbliz")
zilbxn zipaxd
^P1STREET("IS","tzg zwed","dxaxh qne`l")
l`enq hxaxd
^P1STREET("IS","tzg zwed","dxc""w")
w"cxd
^P1STREET("IS","tzg zwed","dxf""d")
d"fxd
^P1STREET("IS","tzg zwed","dxineo")
oenixd
^P1STREET("IS","tzg zwed","dxka")
akxd
^P1STREET("IS","tzg zwed","dxkaz")
zakxd
^P1STREET("IS","tzg zwed","dxky")
ykxd
^P1STREET("IS","tzg zwed","dxnzi kdo")
odk iznxd
^P1STREET("IS","tzg zwed","dxp""w")
w"pxd
^P1STREET("IS","tzg zwed","dxvl")
lvxd
^P1STREET("IS","tzg zwed","dxwtz")
ztwxd
^P1STREET("IS","tzg zwed","dycxd")
dxcyd
^P1STREET("IS","tzg zwed","dyenx")
xneyd
^P1STREET("IS","tzg zwed","dyethim")
mihteyd
^P1STREET("IS","tzg zwed","dyetx")
xteyd
^P1STREET("IS","tzg zwed","dyew")
weyd
^P1STREET("IS","tzg zwed","dyeypim")
mipyeyd
^P1STREET("IS","tzg zwed","dygid")
digyd
^P1STREET("IS","tzg zwed","dygx")
xgyd
^P1STREET("IS","tzg zwed","dyihd")
dhiyd
^P1STREET("IS","tzg zwed","dyleg")
gelyd
^P1STREET("IS","tzg zwed","dyleyd")
dyelyd
^P1STREET("IS","tzg zwed","dytld")
dltyd
^P1STREET("IS","tzg zwed","dywnd")
dnwyd
^P1STREET("IS","tzg zwed","dyxeo")
oexyd
^P1STREET("IS","tzg zwed","dz`pd")
dp`zd
^P1STREET("IS","tzg zwed","dzekpd")
dpkezd
^P1STREET("IS","tzg zwed","dzes")
sezd
^P1STREET("IS","tzg zwed","dzgid")
digzd
^P1STREET("IS","tzg zwed","dznx")
xnzd
^P1STREET("IS","tzg zwed","dzpetd")
dtepzd
^P1STREET("IS","tzg zwed","dzryid")
diyrzd
^P1STREET("IS","tzg zwed","dztef")
fetzd
^P1STREET("IS","tzg zwed","dzwed")
dewzd
^P1STREET("IS","tzg zwed","dzyrim eyly")
ylye miryzd
^P1STREET("IS","tzg zwed","eeltqeo")
oeqtlee
^P1STREET("IS","tzg zwed","ehweaqwi")
iwqaewhe
^P1STREET("IS","tzg zwed","eiipbih `exc")
cxe` hibpiie
^P1STREET("IS","tzg zwed","eipaxbx")
xbxapie
^P1STREET("IS","tzg zwed","eipvwi lit`")
`til iwvpie
^P1STREET("IS","tzg zwed","eipwlx `lzx")
xzl` xlwpie
^P1STREET("IS","tzg zwed","eiqaxeb")
bexaqie
^P1STREET("IS","tzg zwed","eiqewx")
xweqie
^P1STREET("IS","tzg zwed","eivno")
onvie
^P1STREET("IS","tzg zwed","erc `xar `xvez")
zevx` rax` cre
^P1STREET("IS","tzg zwed","excipeo `lirfx")
xfril` oepicxe
^P1STREET("IS","tzg zwed","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","tzg zwed","faleceaiu")
uiaecelaf
^P1STREET("IS","tzg zwed","fdai ynreo")
oerny iadf
^P1STREET("IS","tzg zwed","fiblaeim")
miealbif
^P1STREET("IS","tzg zwed","fkxeo irwa")
awri oexkf
^P1STREET("IS","tzg zwed","fkxeo nyd")
dyn oexkf
^P1STREET("IS","tzg zwed","fkxid")
dixkf
^P1STREET("IS","tzg zwed","flno yf""x")
x"fy onlf
^P1STREET("IS","tzg zwed","fnpdes")
sedpnf
^P1STREET("IS","tzg zwed","ftxo nxcki")
ikcxn oxtf
^P1STREET("IS","tzg zwed","fwo dyenxim")
mixneyd owf
^P1STREET("IS","tzg zwed","fxeaal irwa")
awri laaexf
^P1STREET("IS","tzg zwed","g""o")
o"g
^P1STREET("IS","tzg zwed","ga""c")
c"ag
^P1STREET("IS","tzg zwed","gaia aiheo")
oehia aiag
^P1STREET("IS","tzg zwed","gawew")
wewag
^P1STREET("IS","tzg zwed","gaxeo")
oexag
^P1STREET("IS","tzg zwed","gbi")
ibg
^P1STREET("IS","tzg zwed","gcxd")
dxcg
^P1STREET("IS","tzg zwed","geaai vieo")
oeiv iaaeg
^P1STREET("IS","tzg zwed","gfeo `iy")
yi` oefg
^P1STREET("IS","tzg zwed","gfo irwa")
awri ofg
^P1STREET("IS","tzg zwed","ghiaz `lkqpcxepi")
ipexcpqkl` zaihg
^P1STREET("IS","tzg zwed","gieo cec")
cec oeig
^P1STREET("IS","tzg zwed","giim blrc")
crlb miig
^P1STREET("IS","tzg zwed","giim dff")
ffd miig
^P1STREET("IS","tzg zwed","giim fk`i")
i`kf miig
^P1STREET("IS","tzg zwed","giim lqwea")
aewql miig
^P1STREET("IS","tzg zwed","giim refx")
xfer miig
^P1STREET("IS","tzg zwed","giqio")
oiqig
^P1STREET("IS","tzg zwed","gkm ieqs giim")
miig sqei mkg
^P1STREET("IS","tzg zwed","gkni iyx`l")
l`xyi inkg
^P1STREET("IS","tzg zwed","glevz dtxcqpez")
zepqcxtd zvelg
^P1STREET("IS","tzg zwed","gpd qpy")
ypq dpg
^P1STREET("IS","tzg zwed","gpd xeaip`")
`piaex dpg
^P1STREET("IS","tzg zwed","gppi ieqs")
sqei ippg
^P1STREET("IS","tzg zwed","gpwio")
oiwpg
^P1STREET("IS","tzg zwed","gqci ynreo")
oerny icqg
^P1STREET("IS","tzg zwed","gtu giim")
miig utg
^P1STREET("IS","tzg zwed","gtu nxcki")
ikcxn utg
^P1STREET("IS","tzg zwed","gv' iyx`lim")
mil`xyi 'vg
^P1STREET("IS","tzg zwed","haia `axdm")
mdxa` aiah
^P1STREET("IS","tzg zwed","hapwio")
oiwpah
^P1STREET("IS","tzg zwed","hav'piw")
wip'vah
^P1STREET("IS","tzg zwed","haxid")
dixah
^P1STREET("IS","tzg zwed","helicpe irwa")
awri epcileh
^P1STREET("IS","tzg zwed","heqwpipi")
ipipwqeh
^P1STREET("IS","tzg zwed","hxeno")
onexh
^P1STREET("IS","tzg zwed","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","tzg zwed","i""l txu")
uxt l"i
^P1STREET("IS","tzg zwed","iadm")
mdai
^P1STREET("IS","tzg zwed","iap`l")
l`pai
^P1STREET("IS","tzg zwed","iapd")
dpai
^P1STREET("IS","tzg zwed","ibir ktiim")
miitk ribi
^P1STREET("IS","tzg zwed","ibpq")
qpbi
^P1STREET("IS","tzg zwed","ic dapim")
mipad ci
^P1STREET("IS","tzg zwed","ic lapim")
mipal ci
^P1STREET("IS","tzg zwed","idec")
cedi
^P1STREET("IS","tzg zwed","idecd dlei")
ield dcedi
^P1STREET("IS","tzg zwed","idecd dnkai")
iaknd dcedi
^P1STREET("IS","tzg zwed","ideyr ao peo")
oep oa ryedi
^P1STREET("IS","tzg zwed","ideyr axhepea")
aepehxa ryedi
^P1STREET("IS","tzg zwed","ie`l")
l`ei
^P1STREET("IS","tzg zwed","ieklno igi`l")
l`igi onlkei
^P1STREET("IS","tzg zwed","iepd")
dpei
^P1STREET("IS","tzg zwed","iepd bxio")
oixb dpei
^P1STREET("IS","tzg zwed","ieqs axu")
uxa sqei
^P1STREET("IS","tzg zwed","ieqs dpyi`")
`iypd sqei
^P1STREET("IS","tzg zwed","ieqs hxentlcex")
xecltnexh sqei
^P1STREET("IS","tzg zwed","ieqs leio")
oiel sqei
^P1STREET("IS","tzg zwed","ieqs pwx")
xwp sqei
^P1STREET("IS","tzg zwed","ieqtqaxb")
bxaqtqei
^P1STREET("IS","tzg zwed","iexci dqixd")
dxiqd icxei
^P1STREET("IS","tzg zwed","igaea")
aeagi
^P1STREET("IS","tzg zwed","igi`l nxcki")
ikcxn l`igi
^P1STREET("IS","tzg zwed","igirm")
mrigi
^P1STREET("IS","tzg zwed","il""b")
b"li
^P1STREET("IS","tzg zwed","ilci hdxo")
oxdh icli
^P1STREET("IS","tzg zwed","ilio `aiprm")
mrpia` oili
^P1STREET("IS","tzg zwed","iliyaiu irwa")
awri uiayili
^P1STREET("IS","tzg zwed","inipi")
ipini
^P1STREET("IS","tzg zwed","ipia")
aipi
^P1STREET("IS","tzg zwed","irau f`a")
a`f uari
^P1STREET("IS","tzg zwed","irwa tikno")
onkit awri
^P1STREET("IS","tzg zwed","irxi n`ix")
xi`n ixri
^P1STREET("IS","tzg zwed","itd avl`l")
l`lva dti
^P1STREET("IS","tzg zwed","itd pes")
sep dti
^P1STREET("IS","tzg zwed","itxg")
gxti
^P1STREET("IS","tzg zwed","ivgw ao cec")
cec oa wgvi
^P1STREET("IS","tzg zwed","ivgw ao vai")
iav oa wgvi
^P1STREET("IS","tzg zwed","ivgw ycd")
dcy wgvi
^P1STREET("IS","tzg zwed","ivgwi ivgw")
wgvi iwgvi
^P1STREET("IS","tzg zwed","ivi`z `ixetd")
dtexi` z`ivi
^P1STREET("IS","tzg zwed","iwezi`l `cm")
mc` l`izewi
^P1STREET("IS","tzg zwed","ixeo n`id")
di`n oexi
^P1STREET("IS","tzg zwed","ixeylim")
milyexi
^P1STREET("IS","tzg zwed","iyride")
ediryi
^P1STREET("IS","tzg zwed","iyx`l eyxd")
dxye l`xyi
^P1STREET("IS","tzg zwed","iyx`lea")
ael`xyi
^P1STREET("IS","tzg zwed","k""f apiqo")
oqipa f"k
^P1STREET("IS","tzg zwed","k""h apeanax")
xanaepa h"k
^P1STREET("IS","tzg zwed","kdo giim")
miig odk
^P1STREET("IS","tzg zwed","kdo igi`l")
l`igi odk
^P1STREET("IS","tzg zwed","kiaey draecd")
dceard yeaik
^P1STREET("IS","tzg zwed","kkx `exebe`i")
i`ebexe` xkk
^P1STREET("IS","tzg zwed","kkx a'")
'a xkk
^P1STREET("IS","tzg zwed","kpqz iyx`l")
l`xyi zqpk
^P1STREET("IS","tzg zwed","ktx nry")
yrn xtk
^P1STREET("IS","tzg zwed","ktx nry gcy")
ycg yrn xtk
^P1STREET("IS","tzg zwed","ku nikl liia")
aiil lkin uk
^P1STREET("IS","tzg zwed","kvplqeo")
oeqlpvk
^P1STREET("IS","tzg zwed","kxnli f`a")
a`f ilnxk
^P1STREET("IS","tzg zwed","leahwio vaid")
diav oiwhael
^P1STREET("IS","tzg zwed","legni dbihe")
ehibd ingel
^P1STREET("IS","tzg zwed","legni dygxex")
xexgyd ingel
^P1STREET("IS","tzg zwed","lei `ykel")
leky` iel
^P1STREET("IS","tzg zwed","leio")
oiel
^P1STREET("IS","tzg zwed","leipqeo kla")
alk oeqpiel
^P1STREET("IS","tzg zwed","lg""i")
i"gl
^P1STREET("IS","tzg zwed","liapi `izo")
ozi` ipail
^P1STREET("IS","tzg zwed","liaxkh rwia`")
`aiwr hkxail
^P1STREET("IS","tzg zwed","liaxno `dxeo")
oexd` onxail
^P1STREET("IS","tzg zwed","lihweaqwi")
iwqaewhil
^P1STREET("IS","tzg zwed","liieeiw")
wieeiil
^P1STREET("IS","tzg zwed","litwiq")
qiwtil
^P1STREET("IS","tzg zwed","lm iyx`l")
l`xyi ml
^P1STREET("IS","tzg zwed","lpc`e")
e`cpl
^P1STREET("IS","tzg zwed","lqio")
oiql
^P1STREET("IS","tzg zwed","lym")
myl
^P1STREET("IS","tzg zwed","n`ix ytid")
dity xi`n
^P1STREET("IS","tzg zwed","n`ixea flib")
bilf aexi`n
^P1STREET("IS","tzg zwed","n`te")
et`n
^P1STREET("IS","tzg zwed","nahgim")
mighan
^P1STREET("IS","tzg zwed","navr wcy")
ycw rvan
^P1STREET("IS","tzg zwed","ndx""l")
l"xdn
^P1STREET("IS","tzg zwed","ndxyw api")
ipa wyxdn
^P1STREET("IS","tzg zwed","necirio")
oiricen
^P1STREET("IS","tzg zwed","nedliax yne`l")
l`eny xailden
^P1STREET("IS","tzg zwed","nephitiexi")
ixeitihpen
^P1STREET("IS","tzg zwed","neqheaei")
ieaehqen
^P1STREET("IS","tzg zwed","nevwio")
oiwven
^P1STREET("IS","tzg zwed","nexid")
dixen
^P1STREET("IS","tzg zwed","nf`""d")
d"`fn
^P1STREET("IS","tzg zwed","nfkxz azid")
diza zxkfn
^P1STREET("IS","tzg zwed","nfxgi `axdm")
mdxa` igxfn
^P1STREET("IS","tzg zwed","ngpd idecd")
dcedi dpgn
^P1STREET("IS","tzg zwed","ngpd nexid")
dixen dpgn
^P1STREET("IS","tzg zwed","nik`liq")
qil`kin
^P1STREET("IS","tzg zwed","nikd")
dkin
^P1STREET("IS","tzg zwed","nikl")
lkin
^P1STREET("IS","tzg zwed","nilq yne`l")
l`eny qlin
^P1STREET("IS","tzg zwed","nilx ylnd")
dnly xlin
^P1STREET("IS","tzg zwed","nineo")
oenin
^P1STREET("IS","tzg zwed","nipu")
upin
^P1STREET("IS","tzg zwed","nl`ki")
ik`ln
^P1STREET("IS","tzg zwed","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","tzg zwed","npclqeo")
oeqlcpn
^P1STREET("IS","tzg zwed","npgm `eqiywio")
oiwyiqe` mgpn
^P1STREET("IS","tzg zwed","npgm xveo")
oevx mgpn
^P1STREET("IS","tzg zwed","npgz ylnd")
dnly zgpn
^P1STREET("IS","tzg zwed","npid yegh")
hgey dipn
^P1STREET("IS","tzg zwed","nqcd")
dcqn
^P1STREET("IS","tzg zwed","nqxiw")
wixqn
^P1STREET("IS","tzg zwed","nwliq")
qilwn
^P1STREET("IS","tzg zwed","nxac dwqnim")
minqwd caxn
^P1STREET("IS","tzg zwed","nxbliz")
zilbxn
^P1STREET("IS","tzg zwed","nxbpiez")
zeipbxn
^P1STREET("IS","tzg zwed","nxcki itd")
dti ikcxn
^P1STREET("IS","tzg zwed","nxgai")
iagxn
^P1STREET("IS","tzg zwed","nxhio aeax")
xaea oihxn
^P1STREET("IS","tzg zwed","nxhio bdl")
ldb oihxn
^P1STREET("IS","tzg zwed","nxicex irwa")
awri xecixn
^P1STREET("IS","tzg zwed","nxkeq nyd")
dyn qekxn
^P1STREET("IS","tzg zwed","nxwio")
oiwxn
^P1STREET("IS","tzg zwed","nyd ciio")
oiic dyn
^P1STREET("IS","tzg zwed","nyd yeela")
aleey dyn
^P1STREET("IS","tzg zwed","nyd yxz")
zxy dyn
^P1STREET("IS","tzg zwed","nynx dixco")
ocxid xnyn
^P1STREET("IS","tzg zwed","nzix drbepez")
zepebrd xizn
^P1STREET("IS","tzg zwed","pahim")
mihap
^P1STREET("IS","tzg zwed","pbad")
dabp
^P1STREET("IS","tzg zwed","peaiw cec")
cec wiaep
^P1STREET("IS","tzg zwed","peaiw xawd")
dwax wiaep
^P1STREET("IS","tzg zwed","ped ieqs")
sqei dep
^P1STREET("IS","tzg zwed","ped kaey")
yeak dep
^P1STREET("IS","tzg zwed","ped xrim")
mirx dep
^P1STREET("IS","tzg zwed","pexc`e")
e`cxep
^P1STREET("IS","tzg zwed","pgem")
megp
^P1STREET("IS","tzg zwed","pgem qewelea")
aeleweq megp
^P1STREET("IS","tzg zwed","pglz vai")
iav zlgp
^P1STREET("IS","tzg zwed","pgno blno")
onlb ongp
^P1STREET("IS","tzg zwed","pgno naxvla")
alvxan ongp
^P1STREET("IS","tzg zwed","pgyeo")
oeygp
^P1STREET("IS","tzg zwed","pix")
xip
^P1STREET("IS","tzg zwed","pq viepd")
dpeiv qp
^P1STREET("IS","tzg zwed","pty gid")
dig ytp
^P1STREET("IS","tzg zwed","pvg iyx`l")
l`xyi gvp
^P1STREET("IS","tzg zwed","pzia dieal")
laeid aizp
^P1STREET("IS","tzg zwed","pziaim")
miaizp
^P1STREET("IS","tzg zwed","pzo `laf")
fal` ozp
^P1STREET("IS","tzg zwed","qaieo")
oeiaq
^P1STREET("IS","tzg zwed","qbeld")
dlebq
^P1STREET("IS","tzg zwed","qehivwi")
iwviheq
^P1STREET("IS","tzg zwed","qhxend")
dnexhq
^P1STREET("IS","tzg zwed","qhxikilaiu")
uialikixhq
^P1STREET("IS","tzg zwed","qipi")
ipiq
^P1STREET("IS","tzg zwed","qlapci")
icpalq
^P1STREET("IS","tzg zwed","qleneo")
oenelq
^P1STREET("IS","tzg zwed","qlepci")
icpelq
^P1STREET("IS","tzg zwed","qlex")
xelq
^P1STREET("IS","tzg zwed","qlph yne`l")
l`eny hplq
^P1STREET("IS","tzg zwed","qnhz `qid")
diq` zhnq
^P1STREET("IS","tzg zwed","qnhz `txzi yngd")
dgny izxt` zhnq
^P1STREET("IS","tzg zwed","qnhz dpziaim")
miaizpd zhnq
^P1STREET("IS","tzg zwed","qnhz dxa ixnd")
dnxi axd zhnq
^P1STREET("IS","tzg zwed","qnhz dzaex")
xeazd zhnq
^P1STREET("IS","tzg zwed","qnilpqwi")
iwqplinq
^P1STREET("IS","tzg zwed","qpcx gcc")
ccg xcpq
^P1STREET("IS","tzg zwed","qpcxea")
aexcpq
^P1STREET("IS","tzg zwed","qpd nyd")
dyn dpq
^P1STREET("IS","tzg zwed","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","tzg zwed","qrcid retxi")
ixter dicrq
^P1STREET("IS","tzg zwed","qtix ieqs")
sqei xitq
^P1STREET("IS","tzg zwed","rbpeo")
oepbr
^P1STREET("IS","tzg zwed","reacid")
dicaer
^P1STREET("IS","tzg zwed","reli aal")
laa iler
^P1STREET("IS","tzg zwed","reli dbxcem")
mecxbd iler
^P1STREET("IS","tzg zwed","rfx` epgnid")
dingpe `xfr
^P1STREET("IS","tzg zwed","rio bci")
icb oir
^P1STREET("IS","tzg zwed","rio bpim")
mipb oir
^P1STREET("IS","tzg zwed","ripax")
xapir
^P1STREET("IS","tzg zwed","rneq")
qenr
^P1STREET("IS","tzg zwed","rni")
inr
^P1STREET("IS","tzg zwed","rnipg pgnid")
dingp gpinr
^P1STREET("IS","tzg zwed","rnivex `axdm")
mdxa` xevinr
^P1STREET("IS","tzg zwed","rniwm")
mwinr
^P1STREET("IS","tzg zwed","rniya")
ayinr
^P1STREET("IS","tzg zwed","rnl")
lnr
^P1STREET("IS","tzg zwed","rnpe`l fnix")
xinf l`epnr
^P1STREET("IS","tzg zwed","rnw dyar")
rayd wnr
^P1STREET("IS","tzg zwed","rzliz")
zilzr
^P1STREET("IS","tzg zwed","t`blio rnigi")
iginr oilb`t
^P1STREET("IS","tzg zwed","tb'd qbl")
lbq d'bt
^P1STREET("IS","tzg zwed","tebl dxno")
onxd lbet
^P1STREET("IS","tzg zwed","tegq")
qget
^P1STREET("IS","tzg zwed","thx")
xht
^P1STREET("IS","tzg zwed","ti`xaxb")
bxax`it
^P1STREET("IS","tzg zwed","tikaxb")
bxakit
^P1STREET("IS","tzg zwed","tipq")
qpit
^P1STREET("IS","tzg zwed","tipqwx")
xwqpit
^P1STREET("IS","tzg zwed","tipwl")
lwpit
^P1STREET("IS","tzg zwed","tipyhiio gid")
dig oiihypit
^P1STREET("IS","tzg zwed","tiw""`")
`"wit
^P1STREET("IS","tzg zwed","tlcno")
onclt
^P1STREET("IS","tzg zwed","tpgq gbio")
oibg qgpt
^P1STREET("IS","tzg zwed","tpgq laeo")
oeal qgpt
^P1STREET("IS","tzg zwed","tpgq n`ixi")
ixi`n qgpt
^P1STREET("IS","tzg zwed","tpgqi irwa")
awri iqgpt
^P1STREET("IS","tzg zwed","tpi npgm")
mgpn ipt
^P1STREET("IS","tzg zwed","tpwq")
qwpt
^P1STREET("IS","tzg zwed","tpz irwa")
awri zpt
^P1STREET("IS","tzg zwed","tqwl")
lwqt
^P1STREET("IS","tzg zwed","ttx ieqs")
sqei xtt
^P1STREET("IS","tzg zwed","twirio")
oiriwt
^P1STREET("IS","tzg zwed","txeb")
bext
^P1STREET("IS","tzg zwed","txenwio")
oiwnext
^P1STREET("IS","tzg zwed","txet wleifpx")
xpfielw text
^P1STREET("IS","tzg zwed","txet' hex")
xeh 'text
^P1STREET("IS","tzg zwed","txet' yex")
xey 'text
^P1STREET("IS","tzg zwed","txicno `lirfx")
xfril` oncixt
^P1STREET("IS","tzg zwed","txicno ilio")
oili oncixt
^P1STREET("IS","tzg zwed","txpwtexhx")
xhxetwpxt
^P1STREET("IS","tzg zwed","txu ptzli")
ilztp uxt
^P1STREET("IS","tzg zwed","v'lpea")
aepl'v
^P1STREET("IS","tzg zwed","v`lim")
mil`v
^P1STREET("IS","tzg zwed","vai bxs")
sxb iav
^P1STREET("IS","tzg zwed","vd""l")
l"dv
^P1STREET("IS","tzg zwed","vixlqeo")
oeqlxiv
^P1STREET("IS","tzg zwed","vlg ylem")
mely glv
^P1STREET("IS","tzg zwed","vtpid")
diptv
^P1STREET("IS","tzg zwed","vtz")
ztv
^P1STREET("IS","tzg zwed","w`xe ieqs")
sqei ex`w
^P1STREET("IS","tzg zwed","wceyi txdec")
cedxt iyecw
^P1STREET("IS","tzg zwed","wceyi wdix")
xidw iyecw
^P1STREET("IS","tzg zwed","wciy lef")
fel yicw
^P1STREET("IS","tzg zwed","wdilez irwa")
awri zelidw
^P1STREET("IS","tzg zwed","wdilz ieqheo")
oehqei zlidw
^P1STREET("IS","tzg zwed","wdilz irwa")
awri zlidw
^P1STREET("IS","tzg zwed","wdilz tipqw")
wqpit zlidw
^P1STREET("IS","tzg zwed","wdilz tx`b")
b`xt zlidw
^P1STREET("IS","tzg zwed","wdilz yiw`be")
eb`wiy zlidw
^P1STREET("IS","tzg zwed","weblno")
onlbew
^P1STREET("IS","tzg zwed","wetlno `axdm")
mdxa` onltew
^P1STREET("IS","tzg zwed","wexv'w i`pey")
yep`i w'vxew
^P1STREET("IS","tzg zwed","whxepi")
ipexhw
^P1STREET("IS","tzg zwed","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","tzg zwed","wiy")
yiw
^P1STREET("IS","tzg zwed","wliyx")
xyilw
^P1STREET("IS","tzg zwed","wnipqwi")
iwqpinw
^P1STREET("IS","tzg zwed","wtlo")
oltw
^P1STREET("IS","tzg zwed","wtlpqwi")
iwqpltw
^P1STREET("IS","tzg zwed","wvix")
xivw
^P1STREET("IS","tzg zwed","wvix `dxeo")
oexd` xivw
^P1STREET("IS","tzg zwed","ww""l")
l"ww
^P1STREET("IS","tzg zwed","wxel")
lexw
^P1STREET("IS","tzg zwed","wxinpivwi")
iwvipnixw
^P1STREET("IS","tzg zwed","wxo diqec")
ceqid oxw
^P1STREET("IS","tzg zwed","wy`pi `lirfx")
xfril` ip`yw
^P1STREET("IS","tzg zwed","x`a idecd")
dcedi a`x
^P1STREET("IS","tzg zwed","x`a nyd")
dyn a`x
^P1STREET("IS","tzg zwed","x`y drio")
oird y`x
^P1STREET("IS","tzg zwed","x`y tipd")
dpit y`x
^P1STREET("IS","tzg zwed","x`yeo lvieo")
oeivl oey`x
^P1STREET("IS","tzg zwed","xai idecd dpyi`")
`iypd dcedi iax
^P1STREET("IS","tzg zwed","xai rwia`")
`aiwr iax
^P1STREET("IS","tzg zwed","xaipeaiu")
uiaepiax
^P1STREET("IS","tzg zwed","xaipfeo igfw`l")
l`wfgi oefpiax
^P1STREET("IS","tzg zwed","xao")
oax
^P1STREET("IS","tzg zwed","xapivwi")
iwvipax
^P1STREET("IS","tzg zwed","xefeaqwi ieqs")
sqei iwqaefex
^P1STREET("IS","tzg zwed","xehaxc")
cxahex
^P1STREET("IS","tzg zwed","xehyilc")
cliyhex
^P1STREET("IS","tzg zwed","xetio")
oitex
^P1STREET("IS","tzg zwed","xewg")
gwex
^P1STREET("IS","tzg zwed","xez")
zex
^P1STREET("IS","tzg zwed","xfi`l")
l`ifx
^P1STREET("IS","tzg zwed","xg 604")
604 gx
^P1STREET("IS","tzg zwed","xg' 106")
106 'gx
^P1STREET("IS","tzg zwed","xg' 107")
107 'gx
^P1STREET("IS","tzg zwed","xg' 16")
16 'gx
^P1STREET("IS","tzg zwed","xg' 275")
275 'gx
^P1STREET("IS","tzg zwed","xg' 316")
316 'gx
^P1STREET("IS","tzg zwed","xg' 37")
37 'gx
^P1STREET("IS","tzg zwed","xg' 377")
377 'gx
^P1STREET("IS","tzg zwed","xg' 395")
395 'gx
^P1STREET("IS","tzg zwed","xg' 406")
406 'gx
^P1STREET("IS","tzg zwed","xg' 475")
475 'gx
^P1STREET("IS","tzg zwed","xg' 49")
49 'gx
^P1STREET("IS","tzg zwed","xg' 495")
495 'gx
^P1STREET("IS","tzg zwed","xg' 503")
503 'gx
^P1STREET("IS","tzg zwed","xg' 572")
572 'gx
^P1STREET("IS","tzg zwed","xg' 573")
573 'gx
^P1STREET("IS","tzg zwed","xg' 574")
574 'gx
^P1STREET("IS","tzg zwed","xg' 576")
576 'gx
^P1STREET("IS","tzg zwed","xg' 579")
579 'gx
^P1STREET("IS","tzg zwed","xg' 585")
585 'gx
^P1STREET("IS","tzg zwed","xg' 593")
593 'gx
^P1STREET("IS","tzg zwed","xg' 594")
594 'gx
^P1STREET("IS","tzg zwed","xg' 595")
595 'gx
^P1STREET("IS","tzg zwed","xg' 596")
596 'gx
^P1STREET("IS","tzg zwed","xg' 597")
597 'gx
^P1STREET("IS","tzg zwed","xg' 598")
598 'gx
^P1STREET("IS","tzg zwed","xg' 599")
599 'gx
^P1STREET("IS","tzg zwed","xg' 6")
6 'gx
^P1STREET("IS","tzg zwed","xg' 600")
600 'gx
^P1STREET("IS","tzg zwed","xg' 601")
601 'gx
^P1STREET("IS","tzg zwed","xg' 603")
603 'gx
^P1STREET("IS","tzg zwed","xg' 610")
610 'gx
^P1STREET("IS","tzg zwed","xg' 611")
611 'gx
^P1STREET("IS","tzg zwed","xg' 613")
613 'gx
^P1STREET("IS","tzg zwed","xg' 695")
695 'gx
^P1STREET("IS","tzg zwed","xg' 701")
701 'gx
^P1STREET("IS","tzg zwed","xg' 73")
73 'gx
^P1STREET("IS","tzg zwed","xg' 773")
773 'gx
^P1STREET("IS","tzg zwed","xg' 795")
795 'gx
^P1STREET("IS","tzg zwed","xg' 895")
895 'gx
^P1STREET("IS","tzg zwed","xg' 94")
94 'gx
^P1STREET("IS","tzg zwed","xg' 975")
975 'gx
^P1STREET("IS","tzg zwed","xg' 995")
995 'gx
^P1STREET("IS","tzg zwed","xgaz `ilo")
oli` zagx
^P1STREET("IS","tzg zwed","xgeaez")
zeaegx
^P1STREET("IS","tzg zwed","xgl dnyexxz")
zxxeynd lgx
^P1STREET("IS","tzg zwed","xgl epgem")
megpe lgx
^P1STREET("IS","tzg zwed","xialio")
oilaix
^P1STREET("IS","tzg zwed","xiipq")
qpiix
^P1STREET("IS","tzg zwed","xiiw gaiad")
daiag wiix
^P1STREET("IS","tzg zwed","xipblalem")
melalbpix
^P1STREET("IS","tzg zwed","xn""`")
`"nx
^P1STREET("IS","tzg zwed","xna""m")
m"anx
^P1STREET("IS","tzg zwed","xnf")
fnx
^P1STREET("IS","tzg zwed","xng""l")
l"gnx
^P1STREET("IS","tzg zwed","xnz dbelo")
olebd znx
^P1STREET("IS","tzg zwed","xt`l xiiq")
qiix l`tx
^P1STREET("IS","tzg zwed","xttexh pzo")
ozp hxettx
^P1STREET("IS","tzg zwed","xy""i")
i"yx
^P1STREET("IS","tzg zwed","xyiy gced")
decg yiyx
^P1STREET("IS","tzg zwed","yacid")
dicay
^P1STREET("IS","tzg zwed","yah `yx")
xy` hay
^P1STREET("IS","tzg zwed","yah apinio")
oinipa hay
^P1STREET("IS","tzg zwed","yah bc")
cb hay
^P1STREET("IS","tzg zwed","yah co")
oc hay
^P1STREET("IS","tzg zwed","yah faeleo")
oeleaf hay
^P1STREET("IS","tzg zwed","yah idecd")
dcedi hay
^P1STREET("IS","tzg zwed","yah ieqs")
sqei hay
^P1STREET("IS","tzg zwed","yah iyykx")
xkyyi hay
^P1STREET("IS","tzg zwed","yah lei")
iel hay
^P1STREET("IS","tzg zwed","yah ptzli")
ilztp hay
^P1STREET("IS","tzg zwed","yah x`eao")
oae`x hay
^P1STREET("IS","tzg zwed","yah ynreo")
oerny hay
^P1STREET("IS","tzg zwed","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","tzg zwed","yedm")
mdey
^P1STREET("IS","tzg zwed","yeeinx")
xnieey
^P1STREET("IS","tzg zwed","yelniz")
zinley
^P1STREET("IS","tzg zwed","ygm")
mgy
^P1STREET("IS","tzg zwed","yhexnpim")
mipnxehy
^P1STREET("IS","tzg zwed","yhnttx")
xttnhy
^P1STREET("IS","tzg zwed","yhxew dxno")
onxd wexhy
^P1STREET("IS","tzg zwed","yhxiz")
zixhy
^P1STREET("IS","tzg zwed","yhxo `axdm")
mdxa` oxhy
^P1STREET("IS","tzg zwed","yihxiz akex")
xeka zixhiy
^P1STREET("IS","tzg zwed","yilx ylnd")
dnly xliy
^P1STREET("IS","tzg zwed","yitx")
xtiy
^P1STREET("IS","tzg zwed","yitxiq pzo")
ozp qixtiy
^P1STREET("IS","tzg zwed","yiwbe")
ebwiy
^P1STREET("IS","tzg zwed","yixz `qzx")
xzq` zxiy
^P1STREET("IS","tzg zwed","ykhx ieqs")
sqei xhky
^P1STREET("IS","tzg zwed","yl""b")
b"ly
^P1STREET("IS","tzg zwed","ylem `y")
y` mely
^P1STREET("IS","tzg zwed","ylem rlikm")
mkilr mely
^P1STREET("IS","tzg zwed","ylem yafi")
ifay mely
^P1STREET("IS","tzg zwed","ylenvieo dnlkd")
dklnd oeivnely
^P1STREET("IS","tzg zwed","ylepqwi")
iwqpely
^P1STREET("IS","tzg zwed","ylfipbx")
xbpifly
^P1STREET("IS","tzg zwed","ylnd")
dnly
^P1STREET("IS","tzg zwed","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","tzg zwed","ylnd x`m")
m`x dnly
^P1STREET("IS","tzg zwed","ylnd yicxeaqwi")
iwqaexciy dnly
^P1STREET("IS","tzg zwed","yne`l dpbic")
cibpd l`eny
^P1STREET("IS","tzg zwed","yne`l x`a")
a`x l`eny
^P1STREET("IS","tzg zwed","yne`li")
il`eny
^P1STREET("IS","tzg zwed","ynehwio")
oiwheny
^P1STREET("IS","tzg zwed","yngd delvaxb")
bxavled dgny
^P1STREET("IS","tzg zwed","yngepi")
ipegny
^P1STREET("IS","tzg zwed","ynrepi")
iperny
^P1STREET("IS","tzg zwed","ynrid e`ahlieo")
oeilha`e dirny
^P1STREET("IS","tzg zwed","ynyeo")
oeyny
^P1STREET("IS","tzg zwed","ypi`ex")
xe`ipy
^P1STREET("IS","tzg zwed","ypwx `xid")
dix` xwpy
^P1STREET("IS","tzg zwed","yrxid")
dixry
^P1STREET("IS","tzg zwed","ytibl feqid")
diqef lbity
^P1STREET("IS","tzg zwed","ytipefd")
dfepity
^P1STREET("IS","tzg zwed","ytiw rcy")
ycr wity
^P1STREET("IS","tzg zwed","ytix` dxno vai")
iav onxd `xity
^P1STREET("IS","tzg zwed","ytxipvw")
wvpixty
^P1STREET("IS","tzg zwed","yxb` xt`li")
il`tx `bxy
^P1STREET("IS","tzg zwed","yxd `dxepqeo")
oeqpexd` dxy
^P1STREET("IS","tzg zwed","yxrai ylem")
mely iarxy
^P1STREET("IS","tzg zwed","yyz dinim")
minid zyy
^P1STREET("IS","tzg zwed","zaexi nyd")
dyn ixeaz
^P1STREET("IS","tzg zwed","zcdx")
xdcz
^P1STREET("IS","tzg zwed","zevxz d`xu")
ux`d zxvez
^P1STREET("IS","tzg zwed","zex dfda")
adfd xez
^P1STREET("IS","tzg zwed","zexd eraecd")
dceare dxez
^P1STREET("IS","tzg zwed","zl gi")
ig lz
^P1STREET("IS","tzg zwed","zlnim")
minlz
^P1STREET("IS","tzg zwed","ztevez iyx`l")
l`xyi zevetz
^P1STREET("IS","v`lim")
mil`v
^P1STREET("IS","v`pex")
xep`v
^P1STREET("IS","vareo")
oerav
^P1STREET("IS","vead")
daev
^P1STREET("IS","vetim")
mitev
^P1STREET("IS","vetim","dfiz")
zifd
^P1STREET("IS","vetim","dgxea")
aexgd
^P1STREET("IS","vetim","dxineo")
oenixd
^P1STREET("IS","vetim","dywc")
cwyd
^P1STREET("IS","vetim","dznx")
xnzd
^P1STREET("IS","vetim","rxai dpgl")
lgpd iaxr
^P1STREET("IS","vetio")
oitev
^P1STREET("IS","vetio","dznx")
xnzd
^P1STREET("IS","vetio","xineo")
oenix
^P1STREET("IS","vetiz")
zitev
^P1STREET("IS","vetiz","dcwl")
lwcd
^P1STREET("IS","vetiz","dcx")
xcd
^P1STREET("IS","vetiz","dfiz")
zifd
^P1STREET("IS","vetiz","dneail")
liaend
^P1STREET("IS","vetiz","dwyz")
zywd
^P1STREET("IS","vetiz","dxineo")
oenixd
^P1STREET("IS","vetiz","dycxd")
dxcyd
^P1STREET("IS","vewi im")
mi iwev
^P1STREET("IS","vewi im","cxj d`lneb")
benl`d jxc
^P1STREET("IS","vex dcqd")
dqcd xev
^P1STREET("IS","vex dcqd","`txqneo")
oenqxt`
^P1STREET("IS","vex dcqd","aeynz")
znyea
^P1STREET("IS","vex dcqd","ctpd")
dptc
^P1STREET("IS","vex dcqd","dcela")
alecd
^P1STREET("IS","vex dcqd","diqnio")
oinqid
^P1STREET("IS","vex dcqd","dkxkem")
mekxkd
^P1STREET("IS","vex dcqd","dx kzxeo")
oexzk xd
^P1STREET("IS","vex dcqd","dyihd")
dhiyd
^P1STREET("IS","vex dcqd","nae` dbto")
otbd `ean
^P1STREET("IS","vex dcqd","nae` dcq")
qcd `ean
^P1STREET("IS","vex dcqd","nae` gxea")
aexg `ean
^P1STREET("IS","vex dcqd","nae` znx")
xnz `ean
^P1STREET("IS","vex dcqd","nex")
xen
^P1STREET("IS","vex dcqd","whla")
alhw
^P1STREET("IS","vex dcqd","xkqim")
miqkx
^P1STREET("IS","vex dcqd","xwtz")
ztwx
^P1STREET("IS","vex dcqd","yexw")
wxey
^P1STREET("IS","vex dcqd","ylneo")
oenly
^P1STREET("IS","vex dcqd","ywc")
cwy
^P1STREET("IS","vex ib`l")
l`bi xev
^P1STREET("IS","vex ib`l","`api dgeyo")
oyegd ipa`
^P1STREET("IS","vex ib`l","`api go")
og ipa`
^P1STREET("IS","vex ib`l","`bniz")
zinb`
^P1STREET("IS","vex ib`l","`ecm")
mce`
^P1STREET("IS","vex ib`l","`pwex")
xewp`
^P1STREET("IS","vex ib`l","`xal")
lax`
^P1STREET("IS","vex ib`l","aflz")
zlfa
^P1STREET("IS","vex ib`l","afw")
wfa
^P1STREET("IS","vex ib`l","axwz")
zwxa
^P1STREET("IS","vex ib`l","ayex")
xeya
^P1STREET("IS","vex ib`l","bareo")
oerab
^P1STREET("IS","vex ib`l","blbl")
lblb
^P1STREET("IS","vex ib`l","bxpih")
hipxb
^P1STREET("IS","vex ib`l","d`ilpez")
zepli`d
^P1STREET("IS","vex ib`l","daxey")
yexad
^P1STREET("IS","vex ib`l","dcxex")
xexcd
^P1STREET("IS","vex ib`l","ddcx")
xcdd
^P1STREET("IS","vex ib`l","dfnix")
xinfd
^P1STREET("IS","vex ib`l","diqnio")
oinqid
^P1STREET("IS","vex ib`l","dx pae")
eap xd
^P1STREET("IS","vex ib`l","dxces")
secxd
^P1STREET("IS","vex ib`l","dygs")
sgyd
^P1STREET("IS","vex ib`l","dyihd")
dhiyd
^P1STREET("IS","vex ib`l","dywc")
cwyd
^P1STREET("IS","vex ib`l","feeizo")
ozieef
^P1STREET("IS","vex ib`l","hetf")
fteh
^P1STREET("IS","vex ib`l","kxnl")
lnxk
^P1STREET("IS","vex ib`l","liapim")
mipail
^P1STREET("IS","vex ib`l","lym")
myl
^P1STREET("IS","vex ib`l","nexo")
oxen
^P1STREET("IS","vex ib`l","pes dxim")
mixd sep
^P1STREET("IS","vex ib`l","pgyeo")
oeygp
^P1STREET("IS","vex ib`l","phtim")
mithp
^P1STREET("IS","vex ib`l","qpepiz")
zipepq
^P1STREET("IS","vex ib`l","qtix")
xitq
^P1STREET("IS","vex ib`l","rbex")
xebr
^P1STREET("IS","vex ib`l","reacz")
zcaer
^P1STREET("IS","vex ib`l","rnw d`ld")
dl`d wnr
^P1STREET("IS","vex ib`l","rtxepi")
ipextr
^P1STREET("IS","vex ib`l","rvneo")
oenvr
^P1STREET("IS","vex ib`l","tqbez")
zebqt
^P1STREET("IS","vex ib`l","vex")
xev
^P1STREET("IS","vex ib`l","vxrd")
drxv
^P1STREET("IS","vex ib`l","wexpiz")
zipxew
^P1STREET("IS","vex ib`l","wicxeo")
oexciw
^P1STREET("IS","vex ib`l","xezm")
mzex
^P1STREET("IS","vex ib`l","yc' dcwlim")
milwcd 'cy
^P1STREET("IS","vex ib`l","yedm")
mdey
^P1STREET("IS","vex ib`l","yexw")
wxey
^P1STREET("IS","vex nyd")
dyn xev
^P1STREET("IS","vex nyd","d`ilpez")
zepli`d
^P1STREET("IS","vex nyd","dapim")
mipad
^P1STREET("IS","vex nyd","dcxex")
xexcd
^P1STREET("IS","vex nyd","ddcq")
qcdd
^P1STREET("IS","vex nyd","ddcx")
xcdd
^P1STREET("IS","vex nyd","dfiz")
zifd
^P1STREET("IS","vex nyd","dlela")
aleld
^P1STREET("IS","vex nyd","drxad")
daxrd
^P1STREET("IS","vex nyd","dtxcq")
qcxtd
^P1STREET("IS","vex nyd","dxineo")
oenixd
^P1STREET("IS","vex nyd","dylcb")
bclyd
^P1STREET("IS","vex nyd","dznx")
xnzd
^P1STREET("IS","vex nyd","qnhz d`ptd")
dtp`d zhnq
^P1STREET("IS","vex nyd","rbex")
xebr
^P1STREET("IS","vexi`l")
l`ixev
^P1STREET("IS","vexiz")
zixev
^P1STREET("IS","vexiz","d`xf")
fx`d
^P1STREET("IS","vexiz","dxineo")
oenixd
^P1STREET("IS","vexo")
oxev
^P1STREET("IS","vexo","`ilpez")
zepli`
^P1STREET("IS","vexo","`npeo eznx")
xnze oepn`
^P1STREET("IS","vexo","cxj dyxeo")
oexyd jxc
^P1STREET("IS","vexo","cxj la dyxeo")
oexyd al jxc
^P1STREET("IS","vexo","d`cnepiz")
zipenc`d
^P1STREET("IS","vexo","d`ixiq")
qixi`d
^P1STREET("IS","vexo","d`leo")
oel`d
^P1STREET("IS","vexo","daxey")
yexad
^P1STREET("IS","vexo","dbto")
otbd
^P1STREET("IS","vexo","dcela")
alecd
^P1STREET("IS","vexo","dctpd")
dptcd
^P1STREET("IS","vexo","ddcq")
qcdd
^P1STREET("IS","vexo","ddcxim")
mixcdd
^P1STREET("IS","vexo","dfiz")
zifd
^P1STREET("IS","vexo","dgva")
avgd
^P1STREET("IS","vexo","dgxviz")
zivxgd
^P1STREET("IS","vexo","diqnio")
oinqid
^P1STREET("IS","vexo","dnkaim")
miaknd
^P1STREET("IS","vexo","dnxbpiz")
zipbxnd
^P1STREET("IS","vexo","dqgla")
algqd
^P1STREET("IS","vexo","dtw`o")
o`wtd
^P1STREET("IS","vexo","dywnd")
dnwyd
^P1STREET("IS","vexo","gelez b`elim")
mile`b zeleg
^P1STREET("IS","vexo","irxd")
dxri
^P1STREET("IS","vexo","pixim")
mixip
^P1STREET("IS","vexo","qizepiz")
zipeziq
^P1STREET("IS","vexo","xwtz")
ztwx
^P1STREET("IS","vitexi")
ixetiv
^P1STREET("IS","vlteo")
oetlv
^P1STREET("IS","vlteo","bife")
efib
^P1STREET("IS","vlteo","dbto")
otbd
^P1STREET("IS","vpcld")
dlcpv
^P1STREET("IS","vtxid")
dixtv
^P1STREET("IS","vtz")
ztv
^P1STREET("IS","vtz","`aed`a")
a`dea`
^P1STREET("IS","vtz","`bef")
feb`
^P1STREET("IS","vtz","`gc ryx")
xyr cg`
^P1STREET("IS","vtz","`iaiwex")
xewiai`
^P1STREET("IS","vtz","`iy bnfe")
efnb yi`
^P1STREET("IS","vtz","`lenez")
zenel`
^P1STREET("IS","vtz","`leo")
oel`
^P1STREET("IS","vtz","`lwau ylnd")
dnly uawl`
^P1STREET("IS","vtz","`lyij")
jiyl`
^P1STREET("IS","vtz","`pilaiu")
uialip`
^P1STREET("IS","vtz","`xlefexea")
aexefelx`
^P1STREET("IS","vtz","ai`liw")
wil`ia
^P1STREET("IS","vtz","aiz aeql")
lqea zia
^P1STREET("IS","vtz","aiz ieqs")
sqei zia
^P1STREET("IS","vtz","ax ieg`i")
i`gei xa
^P1STREET("IS","vtz","belo")
oleb
^P1STREET("IS","vtz","bexi d`x""i")
i"x`d ixeb
^P1STREET("IS","vtz","cec `lrfx")
xfrl` cec
^P1STREET("IS","vtz","cxj `lide")
edil` jxc
^P1STREET("IS","vtz","cxj dgqicim")
miciqgd jxc
^P1STREET("IS","vtz","cxj dyiard")
draiyd jxc
^P1STREET("IS","vtz","d`exo")
oxe`d
^P1STREET("IS","vtz","d`qis")
siq`d
^P1STREET("IS","vtz","d`x""i")
i"x`d
^P1STREET("IS","vtz","d`xfim")
mifx`d
^P1STREET("IS","vtz","daxey")
yexad
^P1STREET("IS","vtz","dbcec dyliyi")
iyilyd cecbd
^P1STREET("IS","vtz","dbexo")
oxebd
^P1STREET("IS","vtz","dblil")
lilbd
^P1STREET("IS","vtz","dbto")
otbd
^P1STREET("IS","vtz","dcqd")
dqcd
^P1STREET("IS","vtz","dcxex")
xexcd
^P1STREET("IS","vtz","ddbpd")
dpbdd
^P1STREET("IS","vtz","ddqzcxez")
zexczqdd
^P1STREET("IS","vtz","dfiz")
zifd
^P1STREET("IS","vtz","dgleu")
uelgd
^P1STREET("IS","vtz","dgxneo")
oenxgd
^P1STREET("IS","vtz","dkyxz diyea")
aeyid zxykd
^P1STREET("IS","vtz","dnres")
sernd
^P1STREET("IS","vtz","dnwealim")
milaewnd
^P1STREET("IS","vtz","dpglim")
milgpd
^P1STREET("IS","vtz","dpyi`")
`iypd
^P1STREET("IS","vtz","dqtxci")
icxtqd
^P1STREET("IS","vtz","dtln""g")
g"nltd
^P1STREET("IS","vtz","dtxgim")
migxtd
^P1STREET("IS","vtz","dtyey")
yeytd
^P1STREET("IS","vtz","dx `cix")
xic` xd
^P1STREET("IS","vtz","dx `xal")
lax` xd
^P1STREET("IS","vtz","dx aphl")
lhpa xd
^P1STREET("IS","vtz","dx blaer")
realb xd
^P1STREET("IS","vtz","dxa wtlo")
oltw axd
^P1STREET("IS","vtz","dxai nleaaiu'")
'uiaaeln iaxd
^P1STREET("IS","vtz","dxica""f")
f"acixd
^P1STREET("IS","vtz","dxineo")
oenixd
^P1STREET("IS","vtz","dxinepim")
mipenixd
^P1STREET("IS","vtz","dxvl")
lvxd
^P1STREET("IS","vtz","dyard")
drayd
^P1STREET("IS","vtz","dyiaelim")
mileaiyd
^P1STREET("IS","vtz","dywnd")
dnwyd
^P1STREET("IS","vtz","dz`pd")
dp`zd
^P1STREET("IS","vtz","dzaex")
xeazd
^P1STREET("IS","vtz","eivno")
onvie
^P1STREET("IS","vtz","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","vtz","flno yf""x")
x"fy onlf
^P1STREET("IS","vtz","genpi rley")
yelr ipneg
^P1STREET("IS","vtz","ghiaz itzg")
gzti zaihg
^P1STREET("IS","vtz","gzm qetx")
xteq mzg
^P1STREET("IS","vtz","i`pey wexv'`w")
w`'vxew yep`i
^P1STREET("IS","vtz","iepd")
dpei
^P1STREET("IS","vtz","ieqthl")
lhtqei
^P1STREET("IS","vtz","iexci dqixd")
dxiqd icxei
^P1STREET("IS","vtz","irau")
uari
^P1STREET("IS","vtz","itd pes")
sep dti
^P1STREET("IS","vtz","ixeylim")
milyexi
^P1STREET("IS","vtz","iyx`l a""w")
w"a l`xyi
^P1STREET("IS","vtz","k""a ilci nrlez")
zelrn icli a"k
^P1STREET("IS","vtz","keka dvteo")
oetvd akek
^P1STREET("IS","vtz","kkx dnbipim")
mipibnd xkk
^P1STREET("IS","vtz","kkx drvn`ez")
ze`nvrd xkk
^P1STREET("IS","vtz","klil dgexy")
yxegd lilk
^P1STREET("IS","vtz","klpiz")
ziplk
^P1STREET("IS","vtz","lapeo")
oepal
^P1STREET("IS","vtz","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","vtz","lehm")
mhel
^P1STREET("IS","vtz","lg""i")
i"gl
^P1STREET("IS","vtz","nbipi vtz")
ztv ipibn
^P1STREET("IS","vtz","nephitiexi")
ixeitihpen
^P1STREET("IS","vtz","nknpim")
mipnkn
^P1STREET("IS","vtz","nleo cec")
cec oeln
^P1STREET("IS","vtz","nliae")
eailn
^P1STREET("IS","vtz","npgm abio")
oiba mgpn
^P1STREET("IS","vtz","npgm nfxgi")
igxfn mgpn
^P1STREET("IS","vtz","nrld kpro")
orpk dlrn
^P1STREET("IS","vtz","nrlez dxn""w")
w"nxd zelrn
^P1STREET("IS","vtz","nvtd d`bm")
mb`d dtvn
^P1STREET("IS","vtz","nxcki fbbi")
ibbf ikcxn
^P1STREET("IS","vtz","pb`xd")
dx`bp
^P1STREET("IS","vtz","peed `expim")
mipxe` deep
^P1STREET("IS","vtz","pes belo")
oleb sep
^P1STREET("IS","vtz","pes hlid")
dilh sep
^P1STREET("IS","vtz","pes kpxz")
zxpk sep
^P1STREET("IS","vtz","pgl co")
oc lgp
^P1STREET("IS","vtz","pgl rnec")
cenr lgp
^P1STREET("IS","vtz","pgli`li")
il`ilgp
^P1STREET("IS","vtz","pxwiq")
qiwxp
^P1STREET("IS","vtz","qaieo")
oeiaq
^P1STREET("IS","vtz","qepid fw""y")
y"wf dipeq
^P1STREET("IS","vtz","qn' h""e")
e"h 'nq
^P1STREET("IS","vtz","qnhd `'")
'` dhnq
^P1STREET("IS","vtz","qnhd a'")
'a dhnq
^P1STREET("IS","vtz","qnhd b'")
'b dhnq
^P1STREET("IS","vtz","qnhd c'")
'c dhnq
^P1STREET("IS","vtz","qnhd d'")
'd dhnq
^P1STREET("IS","vtz","qnhz i""f")
f"i zhnq
^P1STREET("IS","vtz","qnhz i""h")
h"i zhnq
^P1STREET("IS","vtz","reli dbxcem")
mecxbd iler
^P1STREET("IS","vtz","rlid a'")
'a dilr
^P1STREET("IS","vtz","rtxepi")
ipextr
^P1STREET("IS","vtz","txenvpwe")
ewpvnext
^P1STREET("IS","vtz","vd""l")
l"dv
^P1STREET("IS","vtz","vetiz")
zitev
^P1STREET("IS","vtz","w`xe ieqs")
sqei ex`w
^P1STREET("IS","vtz","waeu bleiez")
zeielb ueaw
^P1STREET("IS","vtz","wceyi nrlez")
zelrn iyecw
^P1STREET("IS","vtz","welepl xaivwi")
iwviax lpelew
^P1STREET("IS","vtz","wvix")
xivw
^P1STREET("IS","vtz","wxiz ga""c")
c"ag zixw
^P1STREET("IS","vtz","wxo diqec")
ceqid oxw
^P1STREET("IS","vtz","xai cec enyd")
dyne cec iax
^P1STREET("IS","vtz","xg if")
fi gx
^P1STREET("IS","vtz","xg' a'")
'a 'gx
^P1STREET("IS","vtz","xg' b'")
'b 'gx
^P1STREET("IS","vtz","xg' c'")
'c 'gx
^P1STREET("IS","vtz","xg' e'")
'e 'gx
^P1STREET("IS","vtz","xg' f'")
'f 'gx
^P1STREET("IS","vtz","xg' g'")
'g 'gx
^P1STREET("IS","vtz","xg' h""e")
e"h 'gx
^P1STREET("IS","vtz","xg' h""f")
f"h 'gx
^P1STREET("IS","vtz","xg' h'")
'h 'gx
^P1STREET("IS","vtz","xg' hl")
lh 'gx
^P1STREET("IS","vtz","xg' i""`")
`"i 'gx
^P1STREET("IS","vtz","xg' i""a")
a"i 'gx
^P1STREET("IS","vtz","xg' i""b")
b"i 'gx
^P1STREET("IS","vtz","xg' i""c")
c"i 'gx
^P1STREET("IS","vtz","xg' i""f")
f"i 'gx
^P1STREET("IS","vtz","xg' i""g")
g"i 'gx
^P1STREET("IS","vtz","xg' i""h")
h"i 'gx
^P1STREET("IS","vtz","xg' i'")
'i 'gx
^P1STREET("IS","vtz","xg' k""`")
`"k 'gx
^P1STREET("IS","vtz","xg' k""b")
b"k 'gx
^P1STREET("IS","vtz","xg' k""c")
c"k 'gx
^P1STREET("IS","vtz","xg' k""d")
d"k 'gx
^P1STREET("IS","vtz","xg' k""e")
e"k 'gx
^P1STREET("IS","vtz","xg' k""f")
f"k 'gx
^P1STREET("IS","vtz","xg' k""g")
g"k 'gx
^P1STREET("IS","vtz","xg' k""h")
h"k 'gx
^P1STREET("IS","vtz","xg' l""`")
`"l 'gx
^P1STREET("IS","vtz","xg' l'")
'l 'gx
^P1STREET("IS","vtz","xnf cec")
cec fnx
^P1STREET("IS","vtz","xwtz")
ztwx
^P1STREET("IS","vtz","yarz dnipim")
mipind zray
^P1STREET("IS","vtz","yba")
aby
^P1STREET("IS","vtz","yikeo rnni")
innr oekiy
^P1STREET("IS","vtz","ynih npgm")
mgpn hiny
^P1STREET("IS","vtz","ytxipvw")
wvpixty
^P1STREET("IS","vtz","ywc")
cwy
^P1STREET("IS","vtz","znx")
xnz
^P1STREET("IS","vtz","zxt""h")
h"txz
^P1STREET("IS","vxd")
dxv
^P1STREET("IS","vxetd")
dtexv
^P1STREET("IS","vxetd","dbto")
otbd
^P1STREET("IS","vxetd","dz`pd")
dp`zd
^P1STREET("IS","vxrd")
drxv
^P1STREET("IS","waevz iapd")
dpai zveaw
^P1STREET("IS","waevz yilx")
xliy zveaw
^P1STREET("IS","wal`o")
o`law
^P1STREET("IS","wcenim")
minecw
^P1STREET("IS","wcenim","axwz")
zwxa
^P1STREET("IS","wcenim","barz xy""i")
i"yx zrab
^P1STREET("IS","wcenim","dbiziz")
zizibd
^P1STREET("IS","wcenim","dieal")
laeid
^P1STREET("IS","wcenim","dpal")
lapd
^P1STREET("IS","wcenim","dxxi wcm")
mcw ixxd
^P1STREET("IS","wcenim","idlem")
meldi
^P1STREET("IS","wcenim","itd pes")
sep dti
^P1STREET("IS","wcenim","xg' b")
b 'gx
^P1STREET("IS","wcenim","yedm")
mdey
^P1STREET("IS","wcenim","zae`ez yny")
yny ze`eaz
^P1STREET("IS","wcenim","zxyiy")
yiyxz
^P1STREET("IS","wcind")
dnicw
^P1STREET("IS","wcind","`a` qilax")
xaliq `a`
^P1STREET("IS","wcind","`g""i cwx")
xwc i"g`
^P1STREET("IS","wcind","`gc drm")
mrd cg`
^P1STREET("IS","wcind","`li kdo")
odk il`
^P1STREET("IS","wcind","`lneb")
benl`
^P1STREET("IS","wcind","`lwlri dxa")
axd irlwl`
^P1STREET("IS","wcind","`ptd")
dtp`
^P1STREET("IS","wcind","ai`liw")
wil`ia
^P1STREET("IS","wcind","ao vai")
iav oa
^P1STREET("IS","wcind","ax idecd")
dcedi xa
^P1STREET("IS","wcind","axpx")
xpxa
^P1STREET("IS","wcind","bc")
cb
^P1STREET("IS","wcind","bexceo")
oecxeb
^P1STREET("IS","wcind","ceacao")
oacaec
^P1STREET("IS","wcind","cekitz")
ztikec
^P1STREET("IS","wcind","cxj dcqim")
miqcd jxc
^P1STREET("IS","wcind","d`exb")
bxe`d
^P1STREET("IS","wcind","d`fcxkz")
zkxcf`d
^P1STREET("IS","wcind","d`ixeqim")
miqexi`d
^P1STREET("IS","wcind","d`leo")
oel`d
^P1STREET("IS","wcind","d`lnebo")
obenl`d
^P1STREET("IS","wcind","d`txqneo")
oenqxt`d
^P1STREET("IS","wcind","d`wlitheq")
qehtilw`d
^P1STREET("IS","wcind","d`xf")
fx`d
^P1STREET("IS","wcind","d`ykeliz")
zileky`d
^P1STREET("IS","wcind","daxaex")
xeaxad
^P1STREET("IS","wcind","daxey")
yexad
^P1STREET("IS","wcind","dben`")
`nebd
^P1STREET("IS","wcind","dblaer")
realbd
^P1STREET("IS","wcind","dblrc")
crlbd
^P1STREET("IS","wcind","dbto")
otbd
^P1STREET("IS","wcind","dceltio")
oitlecd
^P1STREET("IS","wcind","ddcq")
qcdd
^P1STREET("IS","wcind","ddcxim")
mixcdd
^P1STREET("IS","wcind","ddqzcxez")
zexczqdd
^P1STREET("IS","wcind","dexcim")
micxed
^P1STREET("IS","wcind","dfnix")
xinfd
^P1STREET("IS","wcind","dglil")
lilgd
^P1STREET("IS","wcind","dgqicd")
dciqgd
^P1STREET("IS","wcind","dgva")
avgd
^P1STREET("IS","wcind","dgxea")
aexgd
^P1STREET("IS","wcind","dheeq")
qeehd
^P1STREET("IS","wcind","diqnio")
oinqid
^P1STREET("IS","wcind","diqrex")
xerqid
^P1STREET("IS","wcind","dirxd")
dxrid
^P1STREET("IS","wcind","diwipheo")
oehpiwid
^P1STREET("IS","wcind","dlaepd")
dpeald
^P1STREET("IS","wcind","dlela")
aleld
^P1STREET("IS","wcind","dlineo")
oenild
^P1STREET("IS","wcind","dnizx")
xzind
^P1STREET("IS","wcind","dnrliz")
zilrnd
^P1STREET("IS","wcind","dpal")
lapd
^P1STREET("IS","wcind","dpba")
abpd
^P1STREET("IS","wcind","dpetx")
xtepd
^P1STREET("IS","wcind","dpexiez")
zeixepd
^P1STREET("IS","wcind","dpgli`li")
il`ilgpd
^P1STREET("IS","wcind","dpxwiq")
qiwxpd
^P1STREET("IS","wcind","dpyx")
xypd
^P1STREET("IS","wcind","dqaieo")
oeiaqd
^P1STREET("IS","wcind","drexa")
axerd
^P1STREET("IS","wcind","drih")
hird
^P1STREET("IS","wcind","drxad")
daxrd
^P1STREET("IS","wcind","dtln""g")
g"nltd
^P1STREET("IS","wcind","dtrneo")
oenrtd
^P1STREET("IS","wcind","dtw`o")
o`wtd
^P1STREET("IS","wcind","dtxb")
bxtd
^P1STREET("IS","wcind","dtyey")
yeytd
^P1STREET("IS","wcind","dvarepi")
iperavd
^P1STREET("IS","wcind","dvitexim")
mixetivd
^P1STREET("IS","wcind","dvitexo")
oxetivd
^P1STREET("IS","wcind","dxezm")
mzexd
^P1STREET("IS","wcind","dxveb")
bevxd
^P1STREET("IS","wcind","dxvl")
lvxd
^P1STREET("IS","wcind","dxwtz")
ztwxd
^P1STREET("IS","wcind","dyenxeo")
oexneyd
^P1STREET("IS","wcind","dygs")
sgyd
^P1STREET("IS","wcind","dyifs")
sfiyd
^P1STREET("IS","wcind","dyihd")
dhiyd
^P1STREET("IS","wcind","dylcb")
bclyd
^P1STREET("IS","wcind","dywc")
cwyd
^P1STREET("IS","wcind","dywnd")
dnwyd
^P1STREET("IS","wcind","dz`pd")
dp`zd
^P1STREET("IS","wcind","dzteg")
getzd
^P1STREET("IS","wcind","eivno")
onvie
^P1STREET("IS","wcind","eizwio")
oiwzie
^P1STREET("IS","wcind","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","wcind","gebld")
dlbeg
^P1STREET("IS","wcind","gpwio")
oiwpg
^P1STREET("IS","wcind","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","wcind","ideyr hdeo")
oedh ryedi
^P1STREET("IS","wcind","iepw dcay")
yacd wpei
^P1STREET("IS","wcind","ieqthl")
lhtqei
^P1STREET("IS","wcind","irwa dkdo")
odkd awri
^P1STREET("IS","wcind","ivgw ycd")
dcy wgvi
^P1STREET("IS","wcind","kvplqeo")
oeqlpvk
^P1STREET("IS","wcind","ler d`xi")
ix`d rel
^P1STREET("IS","wcind","n""b")
b"n
^P1STREET("IS","wcind","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","wcind","nineo")
oenin
^P1STREET("IS","wcind","nrld ylnd")
dnly dlrn
^P1STREET("IS","wcind","qetid eqxno")
onxqe diteq
^P1STREET("IS","wcind","qibleo")
oelbiq
^P1STREET("IS","wcind","qn' drxnepim")
mipenxrd 'nq
^P1STREET("IS","wcind","wexvw")
wvxew
^P1STREET("IS","wcind","xefpaj")
japfex
^P1STREET("IS","wcind","xehyilc")
cliyhex
^P1STREET("IS","wcind","xnf")
fnx
^P1STREET("IS","wcind","yafi")
ifay
^P1STREET("IS","wcind","yc' dcwlim")
milwcd 'cy
^P1STREET("IS","wcind","ytix`")
`xity
^P1STREET("IS","wcnd")
dncw
^P1STREET("IS","wcnz vai")
iav zncw
^P1STREET("IS","wcxeo")
oexcw
^P1STREET("IS","wcxeo","d`bq")
qb`d
^P1STREET("IS","wcxeo","dbto")
otbd
^P1STREET("IS","wcxeo","ddcx")
xcdd
^P1STREET("IS","wcxeo","dexc")
cxed
^P1STREET("IS","wcxeo","dfiz")
zifd
^P1STREET("IS","wcxeo","dpexiz")
zixepd
^P1STREET("IS","wehio")
oihew
^P1STREET("IS","wenniez")
zeinnew
^P1STREET("IS","wevio")
oivew
^P1STREET("IS","wicx")
xciw
^P1STREET("IS","wicx","nrld `cenim")
minec` dlrn
^P1STREET("IS","wicx","rco")
ocr
^P1STREET("IS","wiqxid")
dixqiw
^P1STREET("IS","wiqxid","`ixiq")
qixi`
^P1STREET("IS","wiqxid","`leo dzaex")
xeazd oel`
^P1STREET("IS","wiqxid","`lneb")
benl`
^P1STREET("IS","wiqxid","`lz dnqhiw")
wihqnd zl`
^P1STREET("IS","wiqxid","`ykeliz")
zileky`
^P1STREET("IS","wiqxid","ai`liw")
wil`ia
^P1STREET("IS","wiqxid","aixepiwd")
dwipexia
^P1STREET("IS","wiqxid","axwz")
zwxa
^P1STREET("IS","wiqxid","bxpih")
hipxb
^P1STREET("IS","wiqxid","cebiz")
zibec
^P1STREET("IS","wiqxid","cekitz")
ztikec
^P1STREET("IS","wiqxid","cela")
alec
^P1STREET("IS","wiqxid","cpid")
dipc
^P1STREET("IS","wiqxid","cxex")
xexc
^P1STREET("IS","wiqxid","cxj dkxnl")
lnxkd jxc
^P1STREET("IS","wiqxid","d`bef")
feb`d
^P1STREET("IS","wiqxid","d`bq")
qb`d
^P1STREET("IS","wiqxid","d`bs")
sb`d
^P1STREET("IS","wiqxid","d`ecm")
mce`d
^P1STREET("IS","wiqxid","d`exo")
oxe`d
^P1STREET("IS","wiqxid","d`leo")
oel`d
^P1STREET("IS","wiqxid","d`yl")
ly`d
^P1STREET("IS","wiqxid","d`zxeb")
bexz`d
^P1STREET("IS","wiqxid","daxey")
yexad
^P1STREET("IS","wiqxid","daxwz")
zwxad
^P1STREET("IS","wiqxid","dbto")
otbd
^P1STREET("IS","wiqxid","dcwl")
lwcd
^P1STREET("IS","wiqxid","dcx")
xcd
^P1STREET("IS","wiqxid","dexceq")
qecxed
^P1STREET("IS","wiqxid","dfedx")
xdefd
^P1STREET("IS","wiqxid","dfiz")
zifd
^P1STREET("IS","wiqxid","dgavlz")
zlvagd
^P1STREET("IS","wiqxid","dgxea")
aexgd
^P1STREET("IS","wiqxid","dgxy")
yxgd
^P1STREET("IS","wiqxid","dhego")
ogehd
^P1STREET("IS","wiqxid","dkekaim")
miakekd
^P1STREET("IS","wiqxid","dklpiz")
ziplkd
^P1STREET("IS","wiqxid","dlineo")
oenild
^P1STREET("IS","wiqxid","dnbcl")
lcbnd
^P1STREET("IS","wiqxid","dniiqcim")
micqiind
^P1STREET("IS","wiqxid","dnlj `bxitq")
qtixb` jlnd
^P1STREET("IS","wiqxid","dnpcxipd")
dpixcpnd
^P1STREET("IS","wiqxid","dpxwiq")
qiwxpd
^P1STREET("IS","wiqxid","dpyi`")
`iypd
^P1STREET("IS","wiqxid","drlid")
dilrd
^P1STREET("IS","wiqxid","dxces dpglim")
milgpd secxd
^P1STREET("IS","wiqxid","dxic")
cixd
^P1STREET("IS","wiqxid","dxineo")
oenixd
^P1STREET("IS","wiqxid","dxwtz")
ztwxd
^P1STREET("IS","wiqxid","dyfis")
sifyd
^P1STREET("IS","wiqxid","dygs")
sgyd
^P1STREET("IS","wiqxid","dyihd")
dhiyd
^P1STREET("IS","wiqxid","dyny")
ynyd
^P1STREET("IS","wiqxid","dywc")
cwyd
^P1STREET("IS","wiqxid","dz`pd")
dp`zd
^P1STREET("IS","wiqxid","dzex")
xezd
^P1STREET("IS","wiqxid","dznx")
xnzd
^P1STREET("IS","wiqxid","dztef")
fetzd
^P1STREET("IS","wiqxid","fnix")
xinf
^P1STREET("IS","wiqxid","gavlz dges")
segd zlvag
^P1STREET("IS","wiqxid","ges dfda")
adfd seg
^P1STREET("IS","wiqxid","glniy")
yinlg
^P1STREET("IS","wiqxid","hetf")
fteh
^P1STREET("IS","wiqxid","icic dgelez")
zelegd cici
^P1STREET("IS","wiqxid","kikx dxces")
secxd xkik
^P1STREET("IS","wiqxid","kpxiz")
zixpk
^P1STREET("IS","wiqxid","liapd")
dpail
^P1STREET("IS","wiqxid","lym")
myl
^P1STREET("IS","wiqxid","pwx")
xwp
^P1STREET("IS","wiqxid","px dlild")
dlild xp
^P1STREET("IS","wiqxid","pyx")
xyp
^P1STREET("IS","wiqxid","qlriz")
zirlq
^P1STREET("IS","wiqxid","qpepiz")
zipepq
^P1STREET("IS","wiqxid","qptix")
xitpq
^P1STREET("IS","wiqxid","qtix")
xitq
^P1STREET("IS","wiqxid","rbex")
xebr
^P1STREET("IS","wiqxid","rih")
hir
^P1STREET("IS","wiqxid","rpax")
xapr
^P1STREET("IS","wiqxid","rtxepi")
ipextr
^P1STREET("IS","wiqxid","tenle")
elnet
^P1STREET("IS","wiqxid","vetiz")
zitev
^P1STREET("IS","wiqxid","wipb dxec")
cexd bpiw
^P1STREET("IS","wiqxid","xezm dncax")
xacnd mzex
^P1STREET("IS","wiqxid","yc' xehyilc")
cliyhex 'cy
^P1STREET("IS","wiqxid","yedm")
mdey
^P1STREET("IS","wiqxid","yepiz")
zipey
^P1STREET("IS","wiqxid","ygm")
mgy
^P1STREET("IS","wiqxid","zxyiy")
yiyxz
^P1STREET("IS","wiqxid","zxyiy t`xw dzryiid")
diiyrzd wx`t yiyxz
^P1STREET("IS","wiqxid drziwd")
dwizrd dixqiw
^P1STREET("IS","wiqxid drziwd","hetf")
fteh
^P1STREET("IS","wiqxid drziwd","riih")
hiir
^P1STREET("IS","wlgim")
miglw
^P1STREET("IS","wlpqeed")
deeqplw
^P1STREET("IS","wlpqeed","xg' 1")
1 'gx
^P1STREET("IS","wlpqeed","xg' 11")
11 'gx
^P1STREET("IS","wlpqeed","xg' 111")
111 'gx
^P1STREET("IS","wlpqeed","xg' 112")
112 'gx
^P1STREET("IS","wlpqeed","xg' 113")
113 'gx
^P1STREET("IS","wlpqeed","xg' 114")
114 'gx
^P1STREET("IS","wlpqeed","xg' 115")
115 'gx
^P1STREET("IS","wlpqeed","xg' 116")
116 'gx
^P1STREET("IS","wlpqeed","xg' 117")
117 'gx
^P1STREET("IS","wlpqeed","xg' 118")
118 'gx
^P1STREET("IS","wlpqeed","xg' 119")
119 'gx
^P1STREET("IS","wlpqeed","xg' 12")
12 'gx
^P1STREET("IS","wlpqeed","xg' 120")
120 'gx
^P1STREET("IS","wlpqeed","xg' 121")
121 'gx
^P1STREET("IS","wlpqeed","xg' 123")
123 'gx
^P1STREET("IS","wlpqeed","xg' 124")
124 'gx
^P1STREET("IS","wlpqeed","xg' 125")
125 'gx
^P1STREET("IS","wlpqeed","xg' 126")
126 'gx
^P1STREET("IS","wlpqeed","xg' 127")
127 'gx
^P1STREET("IS","wlpqeed","xg' 128")
128 'gx
^P1STREET("IS","wlpqeed","xg' 13")
13 'gx
^P1STREET("IS","wlpqeed","xg' 131")
131 'gx
^P1STREET("IS","wlpqeed","xg' 132")
132 'gx
^P1STREET("IS","wlpqeed","xg' 133")
133 'gx
^P1STREET("IS","wlpqeed","xg' 134")
134 'gx
^P1STREET("IS","wlpqeed","xg' 135")
135 'gx
^P1STREET("IS","wlpqeed","xg' 136")
136 'gx
^P1STREET("IS","wlpqeed","xg' 137")
137 'gx
^P1STREET("IS","wlpqeed","xg' 138")
138 'gx
^P1STREET("IS","wlpqeed","xg' 139")
139 'gx
^P1STREET("IS","wlpqeed","xg' 14")
14 'gx
^P1STREET("IS","wlpqeed","xg' 140")
140 'gx
^P1STREET("IS","wlpqeed","xg' 141")
141 'gx
^P1STREET("IS","wlpqeed","xg' 142")
142 'gx
^P1STREET("IS","wlpqeed","xg' 146")
146 'gx
^P1STREET("IS","wlpqeed","xg' 148")
148 'gx
^P1STREET("IS","wlpqeed","xg' 15")
15 'gx
^P1STREET("IS","wlpqeed","xg' 150")
150 'gx
^P1STREET("IS","wlpqeed","xg' 151")
151 'gx
^P1STREET("IS","wlpqeed","xg' 152")
152 'gx
^P1STREET("IS","wlpqeed","xg' 154")
154 'gx
^P1STREET("IS","wlpqeed","xg' 156")
156 'gx
^P1STREET("IS","wlpqeed","xg' 158")
158 'gx
^P1STREET("IS","wlpqeed","xg' 16")
16 'gx
^P1STREET("IS","wlpqeed","xg' 17")
17 'gx
^P1STREET("IS","wlpqeed","xg' 18")
18 'gx
^P1STREET("IS","wlpqeed","xg' 19")
19 'gx
^P1STREET("IS","wlpqeed","xg' 2")
2 'gx
^P1STREET("IS","wlpqeed","xg' 20")
20 'gx
^P1STREET("IS","wlpqeed","xg' 21")
21 'gx
^P1STREET("IS","wlpqeed","xg' 3")
3 'gx
^P1STREET("IS","wlpqeed","xg' 4")
4 'gx
^P1STREET("IS","wlpqeed","xg' 5")
5 'gx
^P1STREET("IS","wlpqeed","xg' 6")
6 'gx
^P1STREET("IS","wlpqeed","xg' 8")
8 'gx
^P1STREET("IS","wvix-gxiy")
yixg-xivw
^P1STREET("IS","wvix-gxiy","`xf")
fx`
^P1STREET("IS","wvix-gxiy","d`leo")
oel`d
^P1STREET("IS","wvix-gxiy","d`nixim")
mixin`d
^P1STREET("IS","wvix-gxiy","dbexo")
oxebd
^P1STREET("IS","wvix-gxiy","dbz")
zbd
^P1STREET("IS","wvix-gxiy","dcbo")
obcd
^P1STREET("IS","wvix-gxiy","dfiz")
zifd
^P1STREET("IS","wvix-gxiy","dgxea")
aexgd
^P1STREET("IS","wvix-gxiy","dnbl")
lbnd
^P1STREET("IS","wvix-gxiy","dnexb")
bxend
^P1STREET("IS","wvix-gxiy","dngxyd")
dyxgnd
^P1STREET("IS","wvix-gxiy","dnvtd")
dtvnd
^P1STREET("IS","wvix-gxiy","dycnd")
dncyd
^P1STREET("IS","wvix-gxiy","nyrel dthl")
lhtd leryn
^P1STREET("IS","wvix-gxiy","nyrel dxces")
secxd leryn
^P1STREET("IS","wvxd")
dxvw
^P1STREET("IS","wvxio")
oixvw
^P1STREET("IS","wvxio","`aihl")
lhia`
^P1STREET("IS","wvxio","`ecm")
mce`
^P1STREET("IS","wvxio","`lepim")
mipel`
^P1STREET("IS","wvxio","`xal")
lax`
^P1STREET("IS","wvxio","`xf")
fx`
^P1STREET("IS","wvxio","aphl")
lhpa
^P1STREET("IS","wvxio","bazeo")
oezab
^P1STREET("IS","wvxio","bilaeo")
oealib
^P1STREET("IS","wvxio","bnl`")
`lnb
^P1STREET("IS","wvxio","caexpiz")
zipxeac
^P1STREET("IS","wvxio","caxz")
zxac
^P1STREET("IS","wvxio","cela")
alec
^P1STREET("IS","wvxio","cliez")
zeilc
^P1STREET("IS","wvxio","cxex")
xexc
^P1STREET("IS","wvxio","cxj dgxneo")
oenxgd jxc
^P1STREET("IS","wvxio","d`enpim")
mipne`d
^P1STREET("IS","wvxio","d`ld")
dl`d
^P1STREET("IS","wvxio","dcec`im")
mi`cecd
^P1STREET("IS","wvxio","dcq")
qcd
^P1STREET("IS","wvxio","dgqicd")
dciqgd
^P1STREET("IS","wvxio","dnyeyim")
miyeynd
^P1STREET("IS","wvxio","drxaez")
zeaxrd
^P1STREET("IS","wvxio","dvarepim")
miperavd
^P1STREET("IS","wvxio","exciz")
zicxe
^P1STREET("IS","wvxio","feizo")
ozief
^P1STREET("IS","wvxio","getiz")
ziteg
^P1STREET("IS","wvxio","gewew")
weweg
^P1STREET("IS","wvxio","gva")
avg
^P1STREET("IS","wvxio","idecid")
dicedi
^P1STREET("IS","wvxio","iectz")
ztcei
^P1STREET("IS","wvxio","ipyes")
seypi
^P1STREET("IS","wvxio","ix`eo")
oe`xi
^P1STREET("IS","wvxio","kipexez")
zexepik
^P1STREET("IS","wvxio","kpxez")
zexpk
^P1STREET("IS","wvxio","liapd")
dpail
^P1STREET("IS","wvxio","nyrel `cneo")
oenc` leryn
^P1STREET("IS","wvxio","nyrel `exgd")
dgxe` leryn
^P1STREET("IS","wvxio","nyrel a`xiz")
zix`a leryn
^P1STREET("IS","wvxio","nyrel biazeo")
oezaib leryn
^P1STREET("IS","wvxio","nyrel bicxeo")
oexcib leryn
^P1STREET("IS","wvxio","nyrel fnixeo")
oexinf leryn
^P1STREET("IS","wvxio","nyrel gebld")
dlbeg leryn
^P1STREET("IS","wvxio","nyrel giee`i")
i`eeig leryn
^P1STREET("IS","wvxio","nyrel gxnepiz")
zipenxg leryn
^P1STREET("IS","wvxio","nyrel iepd")
dpei leryn
^P1STREET("IS","wvxio","nyrel iqrex")
xerqi leryn
^P1STREET("IS","wvxio","nyrel pgli`li")
il`ilgp leryn
^P1STREET("IS","wvxio","nyrel pnxeo")
oexnp leryn
^P1STREET("IS","wvxio","nyrel pwx")
xwp leryn
^P1STREET("IS","wvxio","nyrel pyx")
xyp leryn
^P1STREET("IS","wvxio","nyrel qpepiz")
zipepq leryn
^P1STREET("IS","wvxio","nyrel rtxepi")
ipextr leryn
^P1STREET("IS","wvxio","nyrel yi`eo")
oe`iy leryn
^P1STREET("IS","wvxio","peed")
deep
^P1STREET("IS","wvxio","qeqiz`")
`ziqeq
^P1STREET("IS","wvxio","qrx")
xrq
^P1STREET("IS","wvxio","vng")
gnv
^P1STREET("IS","wvxio","vtz")
ztv
^P1STREET("IS","wvxio","xg' 6")
6 'gx
^P1STREET("IS","wvxio","xineo")
oenix
^P1STREET("IS","wvxio","xnez blrc")
crlb zenx
^P1STREET("IS","wvxio","yifs")
sfiy
^P1STREET("IS","wvxio","yinxeo")
oexniy
^P1STREET("IS","wvxio","zcdx")
xdcz
^P1STREET("IS","wx`ez api gqo")
oqg ipa ze`xw
^P1STREET("IS","wxiez")
zeixw
^P1STREET("IS","wxiz `epe")
epe` zixw
^P1STREET("IS","wxiz `epe","`.c. bexceo")
oecxeb .c.`
^P1STREET("IS","wxiz `epe","`ao baixel")
lexiab oa`
^P1STREET("IS","wxiz `epe","`ao rfx`")
`xfr oa`
^P1STREET("IS","wxiz `epe","`dxepqeo `dxeo")
oexd` oeqpexd`
^P1STREET("IS","wxiz `epe","`eqiywio")
oiwyiqe`
^P1STREET("IS","wxiz `epe","`exo")
oxe`
^P1STREET("IS","wxiz `epe","`g`a")
a`g`
^P1STREET("IS","wxiz `epe","`pbl")
lbp`
^P1STREET("IS","wxiz `epe","`qzx")
xzq`
^P1STREET("IS","wxiz `epe","`v""l")
l"v`
^P1STREET("IS","wxiz `epe","`xlefexea")
aexefelx`
^P1STREET("IS","wxiz `epe","`xpeo")
oepx`
^P1STREET("IS","wxiz `epe","a`xi")
ix`a
^P1STREET("IS","wxiz `epe","abio")
oiba
^P1STREET("IS","wxiz `epe","ai`liw")
wil`ia
^P1STREET("IS","wxiz `epe","ailipqeo")
oeqpilia
^P1STREET("IS","wxiz `epe","altex")
xetla
^P1STREET("IS","wxiz `epe","ao idecd")
dcedi oa
^P1STREET("IS","wxiz `epe","ax idecd")
dcedi xa
^P1STREET("IS","wxiz `epe","ax la giim")
miig al xa
^P1STREET("IS","wxiz `epe","axkd telc")
clet dkxa
^P1STREET("IS","wxiz `epe","axpx")
xpxa
^P1STREET("IS","wxiz `epe","axw")
wxa
^P1STREET("IS","wxiz `epe","axy")
yxa
^P1STREET("IS","wxiz `epe","belena")
aneleb
^P1STREET("IS","wxiz `epe","c""x nyd qpd")
dpq dyn x"c
^P1STREET("IS","wxiz `epe","ca def")
fed ac
^P1STREET("IS","wxiz `epe","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","wxiz `epe","cbpid")
dipbc
^P1STREET("IS","wxiz `epe","cec caexd")
dxeac cec
^P1STREET("IS","wxiz `epe","cec dnlj")
jlnd cec
^P1STREET("IS","wxiz `epe","cxj ax `ilo")
oli` xa jxc
^P1STREET("IS","wxiz `epe","cxj dbpim")
mipbd jxc
^P1STREET("IS","wxiz `epe","cxj irwa cexi")
ixec awri jxc
^P1STREET("IS","wxiz `epe","d`expim")
mipxe`d
^P1STREET("IS","wxiz `epe","d`ixiq")
qixi`d
^P1STREET("IS","wxiz `epe","dahgeo")
oeghad
^P1STREET("IS","wxiz `epe","daxey")
yexad
^P1STREET("IS","wxiz `epe","dbcec draxi")
ixard cecbd
^P1STREET("IS","wxiz `epe","dbelo")
olebd
^P1STREET("IS","wxiz `epe","dbiaex d`lnepi")
ipenl`d xeaibd
^P1STREET("IS","wxiz `epe","dblaer")
realbd
^P1STREET("IS","wxiz `epe","dblil")
lilbd
^P1STREET("IS","wxiz `epe","dblrc")
crlbd
^P1STREET("IS","wxiz `epe","dbto")
otbd
^P1STREET("IS","wxiz `epe","dcxex")
xexcd
^P1STREET("IS","wxiz `epe","ddbpd")
dpbdd
^P1STREET("IS","wxiz `epe","ddcx")
xcdd
^P1STREET("IS","wxiz `epe","ddqzcxez")
zexczqdd
^P1STREET("IS","wxiz `epe","delvaxb yngd")
dgny bxavled
^P1STREET("IS","wxiz `epe","dexc")
cxed
^P1STREET("IS","wxiz `epe","deyr")
ryed
^P1STREET("IS","wxiz `epe","dfiz")
zifd
^P1STREET("IS","wxiz `epe","dfnix")
xinfd
^P1STREET("IS","wxiz `epe","dgavlz")
zlvagd
^P1STREET("IS","wxiz `epe","dgxneo")
oenxgd
^P1STREET("IS","wxiz `epe","dgynl")
lnygd
^P1STREET("IS","wxiz `epe","dixweo")
oewxid
^P1STREET("IS","wxiz `epe","dklpiz")
ziplkd
^P1STREET("IS","wxiz `epe","dktx")
xtkd
^P1STREET("IS","wxiz `epe","dnbipim")
mipibnd
^P1STREET("IS","wxiz `epe","dniiqcim")
micqiind
^P1STREET("IS","wxiz `epe","dnlj y`el")
le`y jlnd
^P1STREET("IS","wxiz `epe","dnrbl")
lbrnd
^P1STREET("IS","wxiz `epe","dnrtilim")
militrnd
^P1STREET("IS","wxiz `epe","dnvtd")
dtvnd
^P1STREET("IS","wxiz `epe","dnxi")
ixnd
^P1STREET("IS","wxiz `epe","dpai`im")
mi`iapd
^P1STREET("IS","wxiz `epe","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","wxiz `epe","dpxwiq")
qiwxpd
^P1STREET("IS","wxiz `epe","dpyi`")
`iypd
^P1STREET("IS","wxiz `epe","dq")
qd
^P1STREET("IS","wxiz `epe","draecd")
dceard
^P1STREET("IS","wxiz `epe","drnl")
lnrd
^P1STREET("IS","wxiz `epe","drnwim")
miwnrd
^P1STREET("IS","wxiz `epe","dtln""g")
g"nltd
^P1STREET("IS","wxiz `epe","dtxcq")
qcxtd
^P1STREET("IS","wxiz `epe","dvarepi")
iperavd
^P1STREET("IS","wxiz `epe","dvax")
xavd
^P1STREET("IS","wxiz `epe","dwyz")
zywd
^P1STREET("IS","wxiz `epe","dx dblaer")
realbd xd
^P1STREET("IS","wxiz `epe","dx dgxneo")
oenxgd xd
^P1STREET("IS","wxiz `epe","dx dkxnl")
lnxkd xd
^P1STREET("IS","wxiz `epe","dx idecd")
dcedi xd
^P1STREET("IS","wxiz `epe","dx zaex")
xeaz xd
^P1STREET("IS","wxiz `epe","dxebi dnlkez")
zeklnd ibexd
^P1STREET("IS","wxiz `epe","dxi idecd")
dcedi ixd
^P1STREET("IS","wxiz `epe","dxineo")
oenixd
^P1STREET("IS","wxiz `epe","dxveb")
bevxd
^P1STREET("IS","wxiz `epe","dxvl")
lvxd
^P1STREET("IS","wxiz `epe","dxvtlc")
cltvxd
^P1STREET("IS","wxiz `epe","dxwtz")
ztwxd
^P1STREET("IS","wxiz `epe","dyleyd")
dyelyd
^P1STREET("IS","wxiz `epe","dywc")
cwyd
^P1STREET("IS","wxiz `epe","dywnd")
dnwyd
^P1STREET("IS","wxiz `epe","dz`pd")
dp`zd
^P1STREET("IS","wxiz `epe","dznx")
xnzd
^P1STREET("IS","wxiz `epe","eelj")
jlee
^P1STREET("IS","wxiz `epe","eipbiih")
hiibpie
^P1STREET("IS","wxiz `epe","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","wxiz `epe","f'o f'exq")
qxe'f o'f
^P1STREET("IS","wxiz `epe","f`a")
a`f
^P1STREET("IS","wxiz `epe","fiicno")
onciif
^P1STREET("IS","wxiz `epe","gaiad xiiw")
wiix daiag
^P1STREET("IS","wxiz `epe","gfwide")
ediwfg
^P1STREET("IS","wxiz `epe","giim inipi")
ipini miig
^P1STREET("IS","wxiz `epe","gpd qpy")
ypq dpg
^P1STREET("IS","wxiz `epe","hxeno")
onexh
^P1STREET("IS","wxiz `epe","hxentlcex")
xecltnexh
^P1STREET("IS","wxiz `epe","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","wxiz `epe","ib`l `leo")
oel` l`bi
^P1STREET("IS","wxiz `epe","ide`y")
y`edi
^P1STREET("IS","wxiz `epe","idecd dlei")
ield dcedi
^P1STREET("IS","wxiz `epe","idecd dnkai")
iaknd dcedi
^P1STREET("IS","wxiz `epe","ideyr ao peo")
oep oa ryedi
^P1STREET("IS","wxiz `epe","ie`y")
y`ei
^P1STREET("IS","wxiz `epe","iectz")
ztcei
^P1STREET("IS","wxiz `epe","iexm")
mxei
^P1STREET("IS","wxiz `epe","igfw`l")
l`wfgi
^P1STREET("IS","wxiz `epe","im dnlg")
glnd mi
^P1STREET("IS","wxiz `epe","ivgw ycd")
dcy wgvi
^P1STREET("IS","wxiz `epe","ixeylim")
milyexi
^P1STREET("IS","wxiz `epe","ixnew")
wenxi
^P1STREET("IS","wxiz `epe","ixnide")
edinxi
^P1STREET("IS","wxiz `epe","iyng nyd")
dyn gnyi
^P1STREET("IS","wxiz `epe","iyride")
ediryi
^P1STREET("IS","wxiz `epe","kkx cxkho")
ohkxc xkk
^P1STREET("IS","wxiz `epe","kkx xaio")
oiax xkk
^P1STREET("IS","wxiz `epe","kvplqeo")
oeqlpvk
^P1STREET("IS","wxiz `epe","lei `ykel")
leky` iel
^P1STREET("IS","wxiz `epe","leq `pb'lq")
ql'bp` qel
^P1STREET("IS","wxiz `epe","lg""i")
i"gl
^P1STREET("IS","wxiz `epe","lkiy")
yikl
^P1STREET("IS","wxiz `epe","lpc`e")
e`cpl
^P1STREET("IS","wxiz `epe","ndxi""u")
u"ixdn
^P1STREET("IS","wxiz `epe","nephitiexi")
ixeitihpen
^P1STREET("IS","wxiz `epe","nexci dbih`ez")
ze`hibd icxen
^P1STREET("IS","wxiz `epe","nlkez aal")
laa zekln
^P1STREET("IS","wxiz `epe","nlv'h")
h'vln
^P1STREET("IS","wxiz `epe","npid yegh")
hgey dipn
^P1STREET("IS","wxiz `epe","nry")
yrn
^P1STREET("IS","wxiz `epe","nxbelio")
oilebxn
^P1STREET("IS","wxiz `epe","nxfew rfx")
xfr wefxn
^P1STREET("IS","wxiz `epe","nxgaid")
diagxn
^P1STREET("IS","wxiz `epe","nyd `dxeo hea")
aeh oexd` dyn
^P1STREET("IS","wxiz `epe","pba")
abp
^P1STREET("IS","wxiz `epe","pdx dixco")
ocxid xdp
^P1STREET("IS","wxiz `epe","pgl co")
oc lgp
^P1STREET("IS","wxiz `epe","pglz pylqwi")
iwqlyp zlgp
^P1STREET("IS","wxiz `epe","pgnid")
dingp
^P1STREET("IS","wxiz `epe","pil""i")
i"lip
^P1STREET("IS","wxiz `epe","qewelea")
aeleweq
^P1STREET("IS","wxiz `epe","qn' lipwelo")
olewpil 'nq
^P1STREET("IS","wxiz `epe","qnhz afl")
lfa zhnq
^P1STREET("IS","wxiz `epe","qnhz aiz y`o")
o`y zia zhnq
^P1STREET("IS","wxiz `epe","qnhz cxiiteq")
qetiixc zhnq
^P1STREET("IS","wxiz `epe","qnhz dgeld")
dlegd zhnq
^P1STREET("IS","wxiz `epe","qnhz dpgl")
lgpd zhnq
^P1STREET("IS","wxiz `epe","qnhz dwiyeo")
oeyiwd zhnq
^P1STREET("IS","wxiz `epe","qnhz dx qipi")
ipiq xd zhnq
^P1STREET("IS","wxiz `epe","qnhz dxi ixeylim")
milyexi ixd zhnq
^P1STREET("IS","wxiz `epe","qnhz eilqeo")
oeqlie zhnq
^P1STREET("IS","wxiz `epe","qnhz eyipbheo")
oehbpiye zhnq
^P1STREET("IS","wxiz `epe","qnhz kpxz")
zxpk zhnq
^P1STREET("IS","wxiz `epe","qnhz nbice")
ecibn zhnq
^P1STREET("IS","wxiz `epe","qnhz nvcd")
dcvn zhnq
^P1STREET("IS","wxiz `epe","qnhz rnw faeleo")
oeleaf wnr zhnq
^P1STREET("IS","wxiz `epe","qnhz rxad")
daxr zhnq
^P1STREET("IS","wxiz `epe","qnhz vcwide")
ediwcv zhnq
^P1STREET("IS","wxiz `epe","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","wxiz `epe","rbex")
xebr
^P1STREET("IS","wxiz `epe","rbpeo y""i")
i"y oepbr
^P1STREET("IS","wxiz `epe","rfx`")
`xfr
^P1STREET("IS","wxiz `epe","rneq")
qenr
^P1STREET("IS","wxiz `epe","rnw `iileo")
oelii` wnr
^P1STREET("IS","wxiz `epe","rnw d`ld")
dl`d wnr
^P1STREET("IS","wxiz `epe","rnw deexcim")
micxeed wnr
^P1STREET("IS","wxiz `epe","rnw dgeld")
dlegd wnr
^P1STREET("IS","wxiz `epe","rnw dixco")
ocxid wnr
^P1STREET("IS","wxiz `epe","rnw ifxr`l")
l`rxfi wnr
^P1STREET("IS","wxiz `epe","rpax")
xapr
^P1STREET("IS","wxiz `epe","rxad")
daxr
^P1STREET("IS","wxiz `epe","tpwq")
qwpt
^P1STREET("IS","wxiz `epe","twirio")
oiriwt
^P1STREET("IS","wxiz `epe","txeipc")
cpiext
^P1STREET("IS","wxiz `epe","vd""l")
l"dv
^P1STREET("IS","wxiz `epe","wceyz iem hea")
aeh mei zyecw
^P1STREET("IS","wxiz `epe","wexv'`w i`pey")
yep`i w`'vxew
^P1STREET("IS","wxiz `epe","wtlo")
oltw
^P1STREET("IS","wxiz `epe","xa`eo")
oe`ax
^P1STREET("IS","wxiz `epe","xai gpip`")
`pipg iax
^P1STREET("IS","wxiz `epe","xai rwia`")
`aiwr iax
^P1STREET("IS","wxiz `epe","xehyilc")
cliyhex
^P1STREET("IS","wxiz `epe","xetio")
oitex
^P1STREET("IS","wxiz `epe","xgaz d`exo")
oxe`d zagx
^P1STREET("IS","wxiz `epe","xna""m")
m"anx
^P1STREET("IS","wxiz `epe","xna""o")
o"anx
^P1STREET("IS","wxiz `epe","xnd")
dnx
^P1STREET("IS","wxiz `epe","xnf")
fnx
^P1STREET("IS","wxiz `epe","xy""i")
i"yx
^P1STREET("IS","wxiz `epe","yafi")
ifay
^P1STREET("IS","wxiz `epe","yc' `nil fel`")
`lef lin` 'cy
^P1STREET("IS","wxiz `epe","yc' afl")
lfa 'cy
^P1STREET("IS","wxiz `epe","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","wxiz `epe","yc' dcqd")
dqcd 'cy
^P1STREET("IS","wxiz `epe","yc' ideciz")
zicedi 'cy
^P1STREET("IS","wxiz `epe","yc' irl")
lri 'cy
^P1STREET("IS","wxiz `epe","yc' necirio")
oiricen 'cy
^P1STREET("IS","wxiz `epe","yc' pexc`e")
e`cxep 'cy
^P1STREET("IS","wxiz `epe","yc' ww""l")
l"ww 'cy
^P1STREET("IS","wxiz `epe","yhiipaxb")
bxapiihy
^P1STREET("IS","wxiz `epe","yhxo")
oxhy
^P1STREET("IS","wxiz `epe","yiaz vieo")
oeiv zaiy
^P1STREET("IS","wxiz `epe","ylnd dnlj")
jlnd dnly
^P1STREET("IS","wxiz `epe","yne`l dpai`")
`iapd l`eny
^P1STREET("IS","wxiz `epe","zl gi")
ig lz
^P1STREET("IS","wxiz `epe","zperz dnxi")
ixnd zrepz
^P1STREET("IS","wxiz `xar")
rax` zixw
^P1STREET("IS","wxiz `xar","apd aizj")
jzia dpa
^P1STREET("IS","wxiz `xar","cec dnlj")
jlnd cec
^P1STREET("IS","wxiz `xar","i`ix")
xi`i
^P1STREET("IS","wxiz `xar","ideyr ao peo")
oep oa ryedi
^P1STREET("IS","wxiz `xar","kla ao itepd")
dpeti oa alk
^P1STREET("IS","wxiz `xar","qelm `lcc")
ccl` mleq
^P1STREET("IS","wxiz `xar","ww""l")
l"ww
^P1STREET("IS","wxiz `z`")
`z` zixw
^P1STREET("IS","wxiz `z`","`aibcex ryz")
zyr xecbia`
^P1STREET("IS","wxiz `z`","`ao baixel")
lexiab oa`
^P1STREET("IS","wxiz `z`","`ao rfx`")
`xfr oa`
^P1STREET("IS","wxiz `z`","`axdm haia")
aiah mdxa`
^P1STREET("IS","wxiz `z`","`cbx cbd")
dbc xbc`
^P1STREET("IS","wxiz `z`","`dxeo ao ieqs")
sqei oa oexd`
^P1STREET("IS","wxiz `z`","`eqiywio")
oiwyiqe`
^P1STREET("IS","wxiz `z`","`ex dgiim")
miigd xe`
^P1STREET("IS","wxiz `z`","`gc drm")
mrd cg`
^P1STREET("IS","wxiz `z`","`laf")
fal`
^P1STREET("IS","wxiz `z`","`li kdo")
odk il`
^P1STREET("IS","wxiz `z`","`lide dpai`")
`iapd edil`
^P1STREET("IS","wxiz `z`","`lirfx ao idecd")
dcedi oa xfril`
^P1STREET("IS","wxiz `z`","`lnebo")
obenl`
^P1STREET("IS","wxiz `z`","`pilaiu nxcki")
ikcxn uialip`
^P1STREET("IS","wxiz `z`","`qs yngepi")
ipegny sq`
^P1STREET("IS","wxiz `z`","`xid xba")
abx dix`
^P1STREET("IS","wxiz `z`","`xlefexea")
aexefelx`
^P1STREET("IS","wxiz `z`","`z`")
`z`
^P1STREET("IS","wxiz `z`","aexekea")
aekexea
^P1STREET("IS","wxiz `z`","ai`liw")
wil`ia
^P1STREET("IS","wxiz `z`","ail""e")
e"lia
^P1STREET("IS","wxiz `z`","aiz ebo")
obe zia
^P1STREET("IS","wxiz `z`","aiz lgm")
mgl zia
^P1STREET("IS","wxiz `z`","aizx")
xzia
^P1STREET("IS","wxiz `z`","ao rni")
inr oa
^P1STREET("IS","wxiz `z`","arl ym hea")
aeh my lra
^P1STREET("IS","wxiz `z`","ax idecd")
dcedi xa
^P1STREET("IS","wxiz `z`","ax ieg`i")
i`gei xa
^P1STREET("IS","wxiz `z`","ax keka`")
`akek xa
^P1STREET("IS","wxiz `z`","axciv'aqwi")
iwqa'vicxa
^P1STREET("IS","wxiz `z`","axkd telc")
clet dkxa
^P1STREET("IS","wxiz `z`","axpx")
xpxa
^P1STREET("IS","wxiz `z`","baexi vieo")
oeiv ixeab
^P1STREET("IS","wxiz `z`","bc npld")
dlpn cb
^P1STREET("IS","wxiz `z`","belena")
aneleb
^P1STREET("IS","wxiz `z`","bey rvieo")
oeivr yeb
^P1STREET("IS","wxiz `z`","biaexi dwxid")
dixwd ixeaib
^P1STREET("IS","wxiz `z`","blaer")
realb
^P1STREET("IS","wxiz `z`","c""x fnpdes")
sedpnf x"c
^P1STREET("IS","wxiz `z`","c""x nyd nxfew")
wefxn dyn x"c
^P1STREET("IS","wxiz `z`","c`li")
il`c
^P1STREET("IS","wxiz `z`","cec xfi`l")
l`ifx cec
^P1STREET("IS","wxiz `z`","cec xnf")
fnx cec
^P1STREET("IS","wxiz `z`","ciibe eelqwif")
fiwqlee ebiic
^P1STREET("IS","wxiz `z`","ctpd")
dptc
^P1STREET("IS","wxiz `z`","cxj `eyd")
dye` jxc
^P1STREET("IS","wxiz `z`","cxj dyard")
drayd jxc
^P1STREET("IS","wxiz `z`","cxj gitd")
dtig jxc
^P1STREET("IS","wxiz `z`","cxj ivgw xaio")
oiax wgvi jxc
^P1STREET("IS","wxiz `z`","cxj ktx gqicim")
miciqg xtk jxc
^P1STREET("IS","wxiz `z`","cxj ytxrm")
mrxty jxc
^P1STREET("IS","wxiz `z`","d`exo")
oxe`d
^P1STREET("IS","wxiz `z`","d`ld")
dl`d
^P1STREET("IS","wxiz `z`","d`qis")
siq`d
^P1STREET("IS","wxiz `z`","d`xc")
cx`d
^P1STREET("IS","wxiz `z`","d`xf")
fx`d
^P1STREET("IS","wxiz `z`","d`yl")
ly`d
^P1STREET("IS","wxiz `z`","daikexim")
mixekiad
^P1STREET("IS","wxiz `z`","daxey")
yexad
^P1STREET("IS","wxiz `z`","dbaexd")
dxeabd
^P1STREET("IS","wxiz `z`","dbexo")
oxebd
^P1STREET("IS","wxiz `z`","dblil")
lilbd
^P1STREET("IS","wxiz `z`","dbto")
otbd
^P1STREET("IS","wxiz `z`","dcq")
qcd
^P1STREET("IS","wxiz `z`","dcwlim")
milwcd
^P1STREET("IS","wxiz `z`","dcypim")
mipycd
^P1STREET("IS","wxiz `z`","ddbpd")
dpbdd
^P1STREET("IS","wxiz `z`","ddqzcxez")
zexczqdd
^P1STREET("IS","wxiz `z`","debe nelx")
xlen ebed
^P1STREET("IS","wxiz `z`","deeziwim")
miwizeed
^P1STREET("IS","wxiz `z`","dfiz")
zifd
^P1STREET("IS","wxiz `z`","dgxy")
yxgd
^P1STREET("IS","wxiz `z`","dklpiz")
ziplkd
^P1STREET("IS","wxiz `z`","dll")
lld
^P1STREET("IS","wxiz `z`","dniiqcim")
micqiind
^P1STREET("IS","wxiz `z`","dnkaim")
miaknd
^P1STREET("IS","wxiz `z`","dnrtilim")
militrnd
^P1STREET("IS","wxiz `z`","dpai`im")
mi`iapd
^P1STREET("IS","wxiz `z`","dpxi nex")
xen ixpd
^P1STREET("IS","wxiz `z`","dpxwiqim")
miqiwxpd
^P1STREET("IS","wxiz `z`","dqell")
lleqd
^P1STREET("IS","wxiz `z`","drvn`ez")
ze`nvrd
^P1STREET("IS","wxiz `z`","dvpgpim")
mipgpvd
^P1STREET("IS","wxiz `z`","dwiyeo")
oeyiwd
^P1STREET("IS","wxiz `z`","dx`yepim")
mipey`xd
^P1STREET("IS","wxiz `z`","dxa `lyiij")
jiiyl` axd
^P1STREET("IS","wxiz `z`","dxa ax `ilo")
oli` xa axd
^P1STREET("IS","wxiz `z`","dxa dxveb")
bevxd axd
^P1STREET("IS","wxiz `z`","dxa igi` vlg")
glv `igi axd
^P1STREET("IS","wxiz `z`","dxa niineo")
oeniin axd
^P1STREET("IS","wxiz `z`","dxa nipu")
upin axd
^P1STREET("IS","wxiz `z`","dxa refi`l")
l`ifer axd
^P1STREET("IS","wxiz `z`","dxa rnpe`l yaili")
iliay l`epnr axd
^P1STREET("IS","wxiz `z`","dxa wew")
wew axd
^P1STREET("IS","wxiz `z`","dxa wliyx")
xyilw axd
^P1STREET("IS","wxiz `z`","dxa xiipq")
qpiix axd
^P1STREET("IS","wxiz `z`","dxa yafi")
ifay axd
^P1STREET("IS","wxiz `z`","dxezm")
mzexd
^P1STREET("IS","wxiz `z`","dxvl")
lvxd
^P1STREET("IS","wxiz `z`","dyenx")
xneyd
^P1STREET("IS","wxiz `z`","dyethim")
mihteyd
^P1STREET("IS","wxiz `z`","dywcim")
micwyd
^P1STREET("IS","wxiz `z`","dz`pim")
mip`zd
^P1STREET("IS","wxiz `z`","dzaex")
xeazd
^P1STREET("IS","wxiz `z`","dznxim")
mixnzd
^P1STREET("IS","wxiz `z`","dzryid")
diyrzd
^P1STREET("IS","wxiz `z`","e`o bej")
jeb o`e
^P1STREET("IS","wxiz `z`","eipbiih")
hiibpie
^P1STREET("IS","wxiz `z`","eqili wpcipqwi")
iwqpicpw iliqe
^P1STREET("IS","wxiz `z`","exc")
cxe
^P1STREET("IS","wxiz `z`","f`a f'aehipqwi")
iwqpihea'f a`f
^P1STREET("IS","wxiz `z`","faeleo")
oeleaf
^P1STREET("IS","wxiz `z`","fkxid")
dixkf
^P1STREET("IS","wxiz `z`","flno ypi`ex")
xe`ipy onlf
^P1STREET("IS","wxiz `z`","gavlz")
zlvag
^P1STREET("IS","wxiz `z`","ge`o nixe")
exin o`eg
^P1STREET("IS","wxiz `z`","giim eivno")
onvie miig
^P1STREET("IS","wxiz `z`","gpd qpy")
ypq dpg
^P1STREET("IS","wxiz `z`","gpwio")
oiwpg
^P1STREET("IS","wxiz `z`","gtu giim")
miig utg
^P1STREET("IS","wxiz `z`","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","wxiz `z`","i""l txu")
uxt l"i
^P1STREET("IS","wxiz `z`","idecd dlei")
ield dcedi
^P1STREET("IS","wxiz `z`","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","wxiz `z`","ideyer ao peo")
oep oa reyedi
^P1STREET("IS","wxiz `z`","ie`a")
a`ei
^P1STREET("IS","wxiz `z`","ieqs avxi")
ixva sqei
^P1STREET("IS","wxiz `z`","ieqs hxentlcex")
xecltnexh sqei
^P1STREET("IS","wxiz `z`","ieqs w`xe")
ex`w sqei
^P1STREET("IS","wxiz `z`","ieqs ytxipvw")
wvpixty sqei
^P1STREET("IS","wxiz `z`","il""b")
b"li
^P1STREET("IS","wxiz `z`","iqnio")
oinqi
^P1STREET("IS","wxiz `z`","irwa kdo")
odk awri
^P1STREET("IS","wxiz `z`","ivgw ao vai")
iav oa wgvi
^P1STREET("IS","wxiz `z`","ivgw ycd")
dcy wgvi
^P1STREET("IS","wxiz `z`","ixeylim")
milyexi
^P1STREET("IS","wxiz `z`","kipxz")
zxpik
^P1STREET("IS","wxiz `z`","kkx drixid")
dixird xkk
^P1STREET("IS","wxiz `z`","kkx dtxgim")
migxtd xkk
^P1STREET("IS","wxiz `z`","kkx dxwtez")
zetwxd xkk
^P1STREET("IS","wxiz `z`","lilipalem")
melapilil
^P1STREET("IS","wxiz `z`","n""b")
b"n
^P1STREET("IS","wxiz `z`","n`te")
et`n
^P1STREET("IS","wxiz `z`","n`xw y`bl")
lb`y wx`n
^P1STREET("IS","wxiz `z`","navr qipi")
ipiq rvan
^P1STREET("IS","wxiz `z`","necli`pi")
ip`ilcen
^P1STREET("IS","wxiz `z`","nevwio")
oiwven
^P1STREET("IS","wxiz `z`","nexci dbih`ez")
ze`hibd icxen
^P1STREET("IS","wxiz `z`","nexo")
oxen
^P1STREET("IS","wxiz `z`","nixeo")
oexin
^P1STREET("IS","wxiz `z`","nkq pexc`e")
e`cxep qkn
^P1STREET("IS","wxiz `z`","nl`kd")
dk`ln
^P1STREET("IS","wxiz `z`","npcli nekx qtxim")
mixtq xken ilcpn
^P1STREET("IS","wxiz `z`","nrld dgxneo")
oenxgd dlrn
^P1STREET("IS","wxiz `z`","nwex axej")
jexa xewn
^P1STREET("IS","wxiz `z`","nyd dq")
qd dyn
^P1STREET("IS","wxiz `z`","nyd qhntl")
ltnhq dyn
^P1STREET("IS","wxiz `z`","nyd yxz")
zxy dyn
^P1STREET("IS","wxiz `z`","ped ddqzcxez")
zexczqdd dep
^P1STREET("IS","wxiz `z`","pes dkxnl")
lnxkd sep
^P1STREET("IS","wxiz `z`","pgem")
megp
^P1STREET("IS","wxiz `z`","pgem qewelea")
aeleweq megp
^P1STREET("IS","wxiz `z`","pgl prno")
onrp lgp
^P1STREET("IS","wxiz `z`","pgl wicxeo")
oexciw lgp
^P1STREET("IS","wxiz `z`","pil""i")
i"lip
^P1STREET("IS","wxiz `z`","pzia dyenxez")
zexneyd aizp
^P1STREET("IS","wxiz `z`","pzia yenxeo")
oexney aizp
^P1STREET("IS","wxiz `z`","qelc dpxiihd")
dhiixpd cleq
^P1STREET("IS","wxiz `z`","qewelea")
aeleweq
^P1STREET("IS","wxiz `z`","qixwio")
oiwxiq
^P1STREET("IS","wxiz `z`","qn' `aia")
aia` 'nq
^P1STREET("IS","wxiz `z`","qn' `expim")
mipxe` 'nq
^P1STREET("IS","wxiz `z`","qn' `ileo")
oeli` 'nq
^P1STREET("IS","wxiz `z`","qn' blrci")
icrlb 'nq
^P1STREET("IS","wxiz `z`","qn' deyr")
ryed 'nq
^P1STREET("IS","wxiz `z`","qn' dpba")
abpd 'nq
^P1STREET("IS","wxiz `z`","qn' drnw")
wnrd 'nq
^P1STREET("IS","wxiz `z`","qn' drxad")
daxrd 'nq
^P1STREET("IS","wxiz `z`","qn' dtw`o")
o`wtd 'nq
^P1STREET("IS","wxiz `z`","qn' dygx")
xgyd 'nq
^P1STREET("IS","wxiz `z`","qn' gawew")
wewag 'nq
^P1STREET("IS","wxiz `z`","qn' gbi")
ibg 'nq
^P1STREET("IS","wxiz `z`","qn' i`ix")
xi`i 'nq
^P1STREET("IS","wxiz `z`","qn' ie`l")
l`ei 'nq
^P1STREET("IS","wxiz `z`","qn' iepd")
dpei 'nq
^P1STREET("IS","wxiz `z`","qn' ixnide")
edinxi 'nq
^P1STREET("IS","wxiz `z`","qn' iyrid")
diryi 'nq
^P1STREET("IS","wxiz `z`","qn' nikd")
dkin 'nq
^P1STREET("IS","wxiz `z`","qn' nl`ki")
ik`ln 'nq
^P1STREET("IS","wxiz `z`","qn' pgem")
megp 'nq
^P1STREET("IS","wxiz `z`","qn' reacid")
dicaer 'nq
^P1STREET("IS","wxiz `z`","qn' rio dzklz")
zlkzd oir 'nq
^P1STREET("IS","wxiz `z`","qn' rneq")
qenr 'nq
^P1STREET("IS","wxiz `z`","qn' rvneo")
oenvr 'nq
^P1STREET("IS","wxiz `z`","qn' vtpid")
diptv 'nq
^P1STREET("IS","wxiz `z`","qn' xwtz")
ztwx 'nq
^P1STREET("IS","wxiz `z`","qnelpqwio")
oiwqplenq
^P1STREET("IS","wxiz `z`","raecd")
dcear
^P1STREET("IS","wxiz `z`","rfx `lide")
edil` xfr
^P1STREET("IS","wxiz `z`","tih nepcxi`o")
o`ixcpen hit
^P1STREET("IS","wxiz `z`","tiix aepx")
xpea xiit
^P1STREET("IS","wxiz `z`","tipqwx")
xwqpit
^P1STREET("IS","wxiz `z`","tiw`qe")
eq`wit
^P1STREET("IS","wxiz `z`","tln""g")
g"nlt
^P1STREET("IS","wxiz `z`","txet' `iipyhiio")
oiihypii` 'text
^P1STREET("IS","wxiz `z`","txet' ieqs wl`efpx")
xpfe`lw sqei 'text
^P1STREET("IS","wxiz `z`","txiyno")
onyixt
^P1STREET("IS","wxiz `z`","txpqiqwe cd beid")
dieb dc ewqiqpxt
^P1STREET("IS","wxiz `z`","vai dxx")
xxd iav
^P1STREET("IS","wxiz `z`","vtz")
ztv
^P1STREET("IS","wxiz `z`","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","wxiz `z`","wiy")
yiw
^P1STREET("IS","wxiz `z`","wl`efpx")
xpfe`lw
^P1STREET("IS","wxiz `z`","wxo diqec")
ceqid oxw
^P1STREET("IS","wxiz `z`","wxo wiinz liyx`l")
l`xyil zniiw oxw
^P1STREET("IS","wxiz `z`","xetio")
oitex
^P1STREET("IS","wxiz `z`","xna""m")
m"anx
^P1STREET("IS","wxiz `z`","xpd nbxih")
hixbn dpx
^P1STREET("IS","wxiz `z`","xpe`x")
x`epx
^P1STREET("IS","wxiz `z`","xy""i")
i"yx
^P1STREET("IS","wxiz `z`","y""i rbpeo")
oepbr i"y
^P1STREET("IS","wxiz `z`","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","wxiz `z`","yaih")
hiay
^P1STREET("IS","wxiz `z`","yail dxi belo")
oleb ixd liay
^P1STREET("IS","wxiz `z`","yc' biex` ieqthl")
lhtqei `xeib 'cy
^P1STREET("IS","wxiz `z`","yc' dnbipim")
mipibnd 'cy
^P1STREET("IS","wxiz `z`","yc' dviepez")
zepeivd 'cy
^P1STREET("IS","wxiz `z`","yc' kvplqeo")
oeqlpvk 'cy
^P1STREET("IS","wxiz `z`","ycd aewx")
xwea dcy
^P1STREET("IS","wxiz `z`","yeypz drnwim")
miwnrd zpyey
^P1STREET("IS","wxiz `z`","yg""l")
l"gy
^P1STREET("IS","wxiz `z`","yhiipaxb irwa")
awri bxapiihy
^P1STREET("IS","wxiz `z`","yhpc")
cphy
^P1STREET("IS","wxiz `z`","yi ao vieo")
oeiv oa iy
^P1STREET("IS","wxiz `z`","yiaz vieo")
oeiv zaiy
^P1STREET("IS","wxiz `z`","ylem qlg")
glq mely
^P1STREET("IS","wxiz `z`","ylem rlikm")
mkilr mely
^P1STREET("IS","wxiz `z`","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","wxiz `z`","yne`l iapi`li")
il`ipai l`eny
^P1STREET("IS","wxiz `z`","yne`l rf`x")
x`fr l`eny
^P1STREET("IS","wxiz `z`","zl gi")
ig lz
^P1STREET("IS","wxiz ai`liw")
wil`ia zixw
^P1STREET("IS","wxiz ai`liw","`aibcex ryz")
zyr xecbia`
^P1STREET("IS","wxiz ai`liw","`bef")
feb`
^P1STREET("IS","wxiz ai`liw","`eqiywio")
oiwyiqe`
^P1STREET("IS","wxiz ai`liw","`ex dgiim")
miigd xe`
^P1STREET("IS","wxiz ai`liw","`expim")
mipxe`
^P1STREET("IS","wxiz ai`liw","`eyd")
dye`
^P1STREET("IS","wxiz ai`liw","`g""i `ilz")
zli` i"g`
^P1STREET("IS","wxiz ai`liw","`gc drm")
mrd cg`
^P1STREET("IS","wxiz ai`liw","`ileo")
oeli`
^P1STREET("IS","wxiz ai`liw","`lepim")
mipel`
^P1STREET("IS","wxiz ai`liw","`txim")
mixt`
^P1STREET("IS","wxiz ai`liw","`txqneo")
oenqxt`
^P1STREET("IS","wxiz ai`liw","`v""l")
l"v`
^P1STREET("IS","wxiz ai`liw","`xfim")
mifx`
^P1STREET("IS","wxiz ai`liw","`ykel")
leky`
^P1STREET("IS","wxiz ai`liw","`yl")
ly`
^P1STREET("IS","wxiz ai`liw","aexl`")
`lxea
^P1STREET("IS","wxiz ai`liw","apinio")
oinipa
^P1STREET("IS","wxiz ai`liw","arli nl`kd")
dk`ln ilra
^P1STREET("IS","wxiz ai`liw","axpx")
xpxa
^P1STREET("IS","wxiz ai`liw","axw")
wxa
^P1STREET("IS","wxiz ai`liw","bc")
cb
^P1STREET("IS","wxiz ai`liw","belo")
oleb
^P1STREET("IS","wxiz ai`liw","bey gla")
alg yeb
^P1STREET("IS","wxiz ai`liw","biex` ieqthl")
lhtqei `xeib
^P1STREET("IS","wxiz ai`liw","cbpid")
dipbc
^P1STREET("IS","wxiz ai`liw","cbpiez")
zeipbc
^P1STREET("IS","wxiz ai`liw","cekitz")
ztikec
^P1STREET("IS","wxiz ai`liw","clid")
dilc
^P1STREET("IS","wxiz ai`liw","co")
oc
^P1STREET("IS","wxiz ai`liw","ctpd")
dptc
^P1STREET("IS","wxiz ai`liw","cxex")
xexc
^P1STREET("IS","wxiz ai`liw","cxj abio")
oiba jxc
^P1STREET("IS","wxiz ai`liw","cxj rke")
ekr jxc
^P1STREET("IS","wxiz ai`liw","d`ixeq")
qexi`d
^P1STREET("IS","wxiz ai`liw","d`wlitheq")
qehtilw`d
^P1STREET("IS","wxiz ai`liw","daepim")
mipead
^P1STREET("IS","wxiz ai`liw","dap`im")
mi`pad
^P1STREET("IS","wxiz ai`liw","daxeyim")
miyexad
^P1STREET("IS","wxiz ai`liw","dblil")
lilbd
^P1STREET("IS","wxiz ai`liw","dbpd")
dpbd
^P1STREET("IS","wxiz ai`liw","dbpim")
mipbd
^P1STREET("IS","wxiz ai`liw","dbto")
otbd
^P1STREET("IS","wxiz ai`liw","dcblim")
milbcd
^P1STREET("IS","wxiz ai`liw","dcwlim")
milwcd
^P1STREET("IS","wxiz ai`liw","dgxeyz")
zyexgd
^P1STREET("IS","wxiz ai`liw","dgxviz")
zivxgd
^P1STREET("IS","wxiz ai`liw","dgynep`im")
mi`penygd
^P1STREET("IS","wxiz ai`liw","diefm")
mfeid
^P1STREET("IS","wxiz ai`liw","dievx")
xveid
^P1STREET("IS","wxiz ai`liw","dixco")
ocxid
^P1STREET("IS","wxiz ai`liw","dniiqcim")
micqiind
^P1STREET("IS","wxiz ai`liw","dnkaim")
miaknd
^P1STREET("IS","wxiz ai`liw","dnqbx")
xbqnd
^P1STREET("IS","wxiz ai`liw","dnrtil")
litrnd
^P1STREET("IS","wxiz ai`liw","dpexiz")
zixepd
^P1STREET("IS","wxiz ai`liw","dpq nelx")
xlen qpd
^P1STREET("IS","wxiz ai`liw","dpxwiqim")
miqiwxpd
^P1STREET("IS","wxiz ai`liw","dqcp`")
`pcqd
^P1STREET("IS","wxiz ai`liw","dqgla")
algqd
^P1STREET("IS","wxiz ai`liw","dqitpim qn")
nq miptiqd
^P1STREET("IS","wxiz ai`liw","dvarepi")
iperavd
^P1STREET("IS","wxiz ai`liw","dvaxim")
mixavd
^P1STREET("IS","wxiz ai`liw","dxvl")
lvxd
^P1STREET("IS","wxiz ai`liw","dxwtez")
zetwxd
^P1STREET("IS","wxiz ai`liw","dyenx")
xneyd
^P1STREET("IS","wxiz ai`liw","dyethim")
mihteyd
^P1STREET("IS","wxiz ai`liw","dywc")
cwyd
^P1STREET("IS","wxiz ai`liw","dywcim")
micwyd
^P1STREET("IS","wxiz ai`liw","dywnd")
dnwyd
^P1STREET("IS","wxiz ai`liw","dz`pd")
dp`zd
^P1STREET("IS","wxiz ai`liw","dzl")
lzd
^P1STREET("IS","wxiz ai`liw","eivno")
onvie
^P1STREET("IS","wxiz ai`liw","exc")
cxe
^P1STREET("IS","wxiz ai`liw","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","wxiz ai`liw","faeleo")
oeleaf
^P1STREET("IS","wxiz ai`liw","fipbx")
xbpif
^P1STREET("IS","wxiz ai`liw","fiz")
zif
^P1STREET("IS","wxiz ai`liw","flno yf""x")
x"fy onlf
^P1STREET("IS","wxiz ai`liw","gaiad xiiw")
wiix daiag
^P1STREET("IS","wxiz ai`liw","gavlz")
zlvag
^P1STREET("IS","wxiz ai`liw","gebld")
dlbeg
^P1STREET("IS","wxiz ai`liw","giim")
miig
^P1STREET("IS","wxiz ai`liw","go")
og
^P1STREET("IS","wxiz ai`liw","gpd qpy")
ypq dpg
^P1STREET("IS","wxiz ai`liw","gpizd")
dzipg
^P1STREET("IS","wxiz ai`liw","gva")
avg
^P1STREET("IS","wxiz ai`liw","gwl`im")
mi`lwg
^P1STREET("IS","wxiz ai`liw","gxeaim")
miaexg
^P1STREET("IS","wxiz ai`liw","gxneo")
oenxg
^P1STREET("IS","wxiz ai`liw","ibex")
xebi
^P1STREET("IS","wxiz ai`liw","idecd")
dcedi
^P1STREET("IS","wxiz ai`liw","iepzo")
ozpei
^P1STREET("IS","wxiz ai`liw","ieqs")
sqei
^P1STREET("IS","wxiz ai`liw","ieqs lei")
iel sqei
^P1STREET("IS","wxiz ai`liw","igirm")
mrigi
^P1STREET("IS","wxiz ai`liw","iwipheo")
oehpiwi
^P1STREET("IS","wxiz ai`liw","kexcpid")
dipcxek
^P1STREET("IS","wxiz ai`liw","klpiez")
zeiplk
^P1STREET("IS","wxiz ai`liw","kpxz")
zxpk
^P1STREET("IS","wxiz ai`liw","kxnl")
lnxk
^P1STREET("IS","wxiz ai`liw","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","wxiz ai`liw","lg""i")
i"gl
^P1STREET("IS","wxiz ai`liw","lilj")
jlil
^P1STREET("IS","wxiz ai`liw","lpc`ex")
xe`cpl
^P1STREET("IS","wxiz ai`liw","nbcl")
lcbn
^P1STREET("IS","wxiz ai`liw","nik`l")
l`kin
^P1STREET("IS","wxiz ai`liw","nineo")
oenin
^P1STREET("IS","wxiz ai`liw","npyd")
dypn
^P1STREET("IS","wxiz ai`liw","nxhio aeax")
xaea oihxn
^P1STREET("IS","wxiz ai`liw","pgli`l")
l`ilgp
^P1STREET("IS","wxiz ai`liw","pil""i")
i"lip
^P1STREET("IS","wxiz ai`liw","pivpim")
mipvip
^P1STREET("IS","wxiz ai`liw","pix rm")
mr xip
^P1STREET("IS","wxiz ai`liw","ptzli")
ilztp
^P1STREET("IS","wxiz ai`liw","qcpd")
dpcq
^P1STREET("IS","wxiz ai`liw","qelc dpxiihd")
dhiixpd cleq
^P1STREET("IS","wxiz ai`liw","qibliez")
zeilbiq
^P1STREET("IS","wxiz ai`liw","qizeepiz")
zipeeziq
^P1STREET("IS","wxiz ai`liw","qn dpxwiqim")
miqiwxpd nq
^P1STREET("IS","wxiz ai`liw","qnhz `yx")
xy` zhnq
^P1STREET("IS","wxiz ai`liw","qnhz blaer")
realb zhnq
^P1STREET("IS","wxiz ai`liw","qnhz dznxim")
mixnzd zhnq
^P1STREET("IS","wxiz ai`liw","qnhz kll")
llk zhnq
^P1STREET("IS","wxiz ai`liw","qnhz kpro")
orpk zhnq
^P1STREET("IS","wxiz ai`liw","qnhz kpxz")
zxpk zhnq
^P1STREET("IS","wxiz ai`liw","qnhz xrpo")
oprx zhnq
^P1STREET("IS","wxiz ai`liw","qpepiz")
zipepq
^P1STREET("IS","wxiz ai`liw","qtix")
xitq
^P1STREET("IS","wxiz ai`liw","rbpeo")
oepbr
^P1STREET("IS","wxiz ai`liw","rlid")
dilr
^P1STREET("IS","wxiz ai`liw","rnwim")
miwnr
^P1STREET("IS","wxiz ai`liw","rtxepi")
ipextr
^P1STREET("IS","wxiz ai`liw","rvn`ez")
ze`nvr
^P1STREET("IS","wxiz ai`liw","rvneo")
oenvr
^P1STREET("IS","wxiz ai`liw","rxnepim")
mipenxr
^P1STREET("IS","wxiz ai`liw","tlb")
blt
^P1STREET("IS","wxiz ai`liw","tln""g")
g"nlt
^P1STREET("IS","wxiz ai`liw","txhifpim")
mipfihxt
^P1STREET("IS","wxiz ai`liw","txiyno")
onyixt
^P1STREET("IS","wxiz ai`liw","txu")
uxt
^P1STREET("IS","wxiz ai`liw","v`lim")
mil`v
^P1STREET("IS","wxiz ai`liw","vetiz")
zitev
^P1STREET("IS","wxiz ai`liw","vex ylem")
mely xev
^P1STREET("IS","wxiz ai`liw","vitexi")
ixetiv
^P1STREET("IS","wxiz ai`liw","vitexo")
oxetiv
^P1STREET("IS","wxiz ai`liw","wih qicpi yc")
cy ipciq hiw
^P1STREET("IS","wxiz ai`liw","wiyeo")
oeyiw
^P1STREET("IS","wxiz ai`liw","ww""l")
l"ww
^P1STREET("IS","wxiz ai`liw","wxel")
lexw
^P1STREET("IS","wxiz ai`liw","wxo diqec")
ceqid oxw
^P1STREET("IS","wxiz ai`liw","x`eao")
oae`x
^P1STREET("IS","wxiz ai`liw","xgl")
lgx
^P1STREET("IS","wxiz ai`liw","xineo")
oenix
^P1STREET("IS","wxiz ai`liw","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","wxiz ai`liw","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","wxiz ai`liw","yc' dapim")
mipad 'cy
^P1STREET("IS","wxiz ai`liw","yc' ddqzcxez")
zexczqdd 'cy
^P1STREET("IS","wxiz ai`liw","yc' dryex")
xeyrd 'cy
^P1STREET("IS","wxiz ai`liw","yc' g""o")
o"g 'cy
^P1STREET("IS","wxiz ai`liw","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","wxiz ai`liw","yeypim")
mipyey
^P1STREET("IS","wxiz ai`liw","ylem rlikm")
mkilr mely
^P1STREET("IS","wxiz ai`liw","ynreo")
oerny
^P1STREET("IS","wxiz ai`liw","ytxrm")
mrxty
^P1STREET("IS","wxiz ai`liw","z`pim")
mip`z
^P1STREET("IS","wxiz ai`liw","zaex")
xeaz
^P1STREET("IS","wxiz ai`liw","znx")
xnz
^P1STREET("IS","wxiz bz")
zb zixw
^P1STREET("IS","wxiz bz","`cexiim")
miixec`
^P1STREET("IS","wxiz bz","`cneo")
oenc`
^P1STREET("IS","wxiz bz","`cx")
xc`
^P1STREET("IS","wxiz bz","`dec ao bx`")
`xb oa ced`
^P1STREET("IS","wxiz bz","`dxeo")
oexd`
^P1STREET("IS","wxiz bz","`ecm")
mce`
^P1STREET("IS","wxiz bz","`exd")
dxe`
^P1STREET("IS","wxiz bz","`ifnxbc")
cbxnfi`
^P1STREET("IS","wxiz bz","`iix")
xii`
^P1STREET("IS","wxiz bz","`lel")
lel`
^P1STREET("IS","wxiz bz","`lide dpai`")
`iapd edil`
^P1STREET("IS","wxiz bz","`liyr")
ryil`
^P1STREET("IS","wxiz bz","`lkqpcxepi")
ipexcpqkl`
^P1STREET("IS","wxiz bz","`nvid")
divn`
^P1STREET("IS","wxiz bz","`q`")
`q`
^P1STREET("IS","wxiz bz","`tw")
wt`
^P1STREET("IS","wxiz bz","`txz")
zxt`
^P1STREET("IS","wxiz bz","`wqeceq")
qeceqw`
^P1STREET("IS","wxiz bz","ail""e")
e"lia
^P1STREET("IS","wxiz bz","aiz beaxio")
oixaeb zia
^P1STREET("IS","wxiz bz","b`eo dixco")
ocxid oe`b
^P1STREET("IS","wxiz bz","barzi")
izrab
^P1STREET("IS","wxiz bz","bc")
cb
^P1STREET("IS","wxiz bz","bcp""r")
r"pcb
^P1STREET("IS","wxiz bz","belpi")
ipleb
^P1STREET("IS","wxiz bz","caix")
xiac
^P1STREET("IS","wxiz bz","cex")
xec
^P1STREET("IS","wxiz bz","co")
oc
^P1STREET("IS","wxiz bz","cxj dcxem")
mexcd jxc
^P1STREET("IS","wxiz bz","cxj dgxeyz")
zyexgd jxc
^P1STREET("IS","wxiz bz","cxj dzryid")
diyrzd jxc
^P1STREET("IS","wxiz bz","d`au")
ua`d
^P1STREET("IS","wxiz bz","d`bq")
qb`d
^P1STREET("IS","wxiz bz","d`exb")
bxe`d
^P1STREET("IS","wxiz bz","d`exo")
oxe`d
^P1STREET("IS","wxiz bz","d`ld")
dl`d
^P1STREET("IS","wxiz bz","d`leo")
oel`d
^P1STREET("IS","wxiz bz","d`lnebim")
mibenl`d
^P1STREET("IS","wxiz bz","d`xf")
fx`d
^P1STREET("IS","wxiz bz","d`yex")
xey`d
^P1STREET("IS","wxiz bz","d`yl")
ly`d
^P1STREET("IS","wxiz bz","d`ylbo")
obly`d
^P1STREET("IS","wxiz bz","daepim")
mipead
^P1STREET("IS","wxiz bz","daxey")
yexad
^P1STREET("IS","wxiz bz","dbaexd")
dxeabd
^P1STREET("IS","wxiz bz","dblaer")
realbd
^P1STREET("IS","wxiz bz","dbto")
otbd
^P1STREET("IS","wxiz bz","dcbo")
obcd
^P1STREET("IS","wxiz bz","dclid")
dilcd
^P1STREET("IS","wxiz bz","dcwl")
lwcd
^P1STREET("IS","wxiz bz","dcx")
xcd
^P1STREET("IS","wxiz bz","ddbpd")
dpbdd
^P1STREET("IS","wxiz bz","ddcq")
qcdd
^P1STREET("IS","wxiz bz","ddcxim")
mixcdd
^P1STREET("IS","wxiz bz","dfiz")
zifd
^P1STREET("IS","wxiz bz","dfxr")
rxfd
^P1STREET("IS","wxiz bz","dgavlz")
zlvagd
^P1STREET("IS","wxiz bz","dgicwl")
lwcigd
^P1STREET("IS","wxiz bz","dgiil d`lnepi")
ipenl`d liigd
^P1STREET("IS","wxiz bz","dgleu")
uelgd
^P1STREET("IS","wxiz bz","dgva")
avgd
^P1STREET("IS","wxiz bz","dievx")
xveid
^P1STREET("IS","wxiz bz","diqnio")
oinqid
^P1STREET("IS","wxiz bz","dklpiz")
ziplkd
^P1STREET("IS","wxiz bz","dkxnl")
lnxkd
^P1STREET("IS","wxiz bz","dn`aw")
wa`nd
^P1STREET("IS","wxiz bz","dnelcz")
zclend
^P1STREET("IS","wxiz bz","dngzxez")
zexzgnd
^P1STREET("IS","wxiz bz","dnl`kd")
dk`lnd
^P1STREET("IS","wxiz bz","dnlj cec")
cec jlnd
^P1STREET("IS","wxiz bz","dnqbx")
xbqnd
^P1STREET("IS","wxiz bz","dnxbliz")
zilbxnd
^P1STREET("IS","wxiz bz","dnxi draxi")
ixard ixnd
^P1STREET("IS","wxiz bz","dpexiz")
zixepd
^P1STREET("IS","wxiz bz","dpxwiq")
qiwxpd
^P1STREET("IS","wxiz bz","draecd")
dceard
^P1STREET("IS","wxiz bz","drxad")
daxrd
^P1STREET("IS","wxiz bz","dtxcq")
qcxtd
^P1STREET("IS","wxiz bz","dtxz")
zxtd
^P1STREET("IS","wxiz bz","dv`ld")
dl`vd
^P1STREET("IS","wxiz bz","dvarepi")
iperavd
^P1STREET("IS","wxiz bz","dwenniez")
zeinnewd
^P1STREET("IS","wxiz bz","dwyzez")
zezywd
^P1STREET("IS","wxiz bz","dx `xceo")
oecx` xd
^P1STREET("IS","wxiz bz","dx dvetim")
mitevd xd
^P1STREET("IS","wxiz bz","dx dyenxeo")
oexneyd xd
^P1STREET("IS","wxiz bz","dx gaxeo")
oexag xd
^P1STREET("IS","wxiz bz","dx gfeo")
oefg xd
^P1STREET("IS","wxiz bz","dx nvcd")
dcvn xd
^P1STREET("IS","wxiz bz","dx qipi")
ipiq xd
^P1STREET("IS","wxiz bz","dx rvneo")
oenvr xd
^P1STREET("IS","wxiz bz","dx t`x")
x`t xd
^P1STREET("IS","wxiz bz","dxineo")
oenixd
^P1STREET("IS","wxiz bz","dxwtz")
ztwxd
^P1STREET("IS","wxiz bz","dyeyo")
oyeyd
^P1STREET("IS","wxiz bz","dywc")
cwyd
^P1STREET("IS","wxiz bz","dywnd")
dnwyd
^P1STREET("IS","wxiz bz","dz`pd")
dp`zd
^P1STREET("IS","wxiz bz","dzcdx")
xdczd
^P1STREET("IS","wxiz bz","dznxim")
mixnzd
^P1STREET("IS","wxiz bz","dzwend")
dnewzd
^P1STREET("IS","wxiz bz","fda")
adf
^P1STREET("IS","wxiz bz","gfwide")
ediwfg
^P1STREET("IS","wxiz bz","glevd")
dvelg
^P1STREET("IS","wxiz bz","gyeo")
oeyg
^P1STREET("IS","wxiz bz","haz")
zah
^P1STREET("IS","wxiz bz","hetf")
fteh
^P1STREET("IS","wxiz bz","idecd")
dcedi
^P1STREET("IS","wxiz bz","ideyth")
htyedi
^P1STREET("IS","wxiz bz","ivi`z zy""f")
f"yz z`ivi
^P1STREET("IS","wxiz bz","kkx dpba")
abpd xkk
^P1STREET("IS","wxiz bz","kkx tf")
ft xkk
^P1STREET("IS","wxiz bz","kqle")
elqk
^P1STREET("IS","wxiz bz","kqs")
sqk
^P1STREET("IS","wxiz bz","liapd")
dpail
^P1STREET("IS","wxiz bz","lym")
myl
^P1STREET("IS","wxiz bz","nae` `yex")
xey` `ean
^P1STREET("IS","wxiz bz","nae` apinio")
oinipa `ean
^P1STREET("IS","wxiz bz","nae` bareo")
oerab `ean
^P1STREET("IS","wxiz bz","nae` beyo")
oyeb `ean
^P1STREET("IS","wxiz bz","nae` caix")
xiac `ean
^P1STREET("IS","wxiz bz","nae` dblbl")
lblbd `ean
^P1STREET("IS","wxiz bz","nae` dgxneo")
oenxgd `ean
^P1STREET("IS","wxiz bz","nae` dlehm")
mheld `ean
^P1STREET("IS","wxiz bz","nae` dtexvim")
mivxetd `ean
^P1STREET("IS","wxiz bz","nae` dzaex")
xeazd `ean
^P1STREET("IS","wxiz bz","nae` gil d`eix")
xie`d lig `ean
^P1STREET("IS","wxiz bz","nae` iyride")
ediryi `ean
^P1STREET("IS","wxiz bz","nae` lapd")
dpal `ean
^P1STREET("IS","wxiz bz","nae` nino")
onin `ean
^P1STREET("IS","wxiz bz","nae` piqo")
oqip `ean
^P1STREET("IS","wxiz bz","nae` qco")
ocq `ean
^P1STREET("IS","wxiz bz","nae` qieo")
oeiq `ean
^P1STREET("IS","wxiz bz","nae` rfw`")
`wfr `ean
^P1STREET("IS","wxiz bz","nae` rtxd")
dxtr `ean
^P1STREET("IS","wxiz bz","nae` thiy")
yiht `ean
^P1STREET("IS","wxiz bz","nae` ypix")
xipy `ean
^P1STREET("IS","wxiz bz","nae` zy""g")
g"yz `ean
^P1STREET("IS","wxiz bz","navr qipi")
ipiq rvan
^P1STREET("IS","wxiz bz","ncipz didecim")
micedid zpicn
^P1STREET("IS","wxiz bz","necirio")
oiricen
^P1STREET("IS","wxiz bz","nexyd")
dyxen
^P1STREET("IS","wxiz bz","nikd")
dkin
^P1STREET("IS","wxiz bz","nixeo")
oexin
^P1STREET("IS","wxiz bz","nlilez")
zeliln
^P1STREET("IS","wxiz bz","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","wxiz bz","nynx dbael")
leabd xnyn
^P1STREET("IS","wxiz bz","nyrel `dec ao bx`")
`xb oa ced` leryn
^P1STREET("IS","wxiz bz","nyrel `dxeo")
oexd` leryn
^P1STREET("IS","wxiz bz","nyrel `ileo dfaelepi")
ipeleafd oeli` leryn
^P1STREET("IS","wxiz bz","nyrel `yx")
xy` leryn
^P1STREET("IS","wxiz bz","nyrel bxyeo")
oeyxb leryn
^P1STREET("IS","wxiz bz","nyrel cwx")
xwc leryn
^P1STREET("IS","wxiz bz","nyrel d`cnepiz")
zipenc`d leryn
^P1STREET("IS","wxiz bz","nyrel d`ixiq")
qixi`d leryn
^P1STREET("IS","wxiz bz","nyrel d`txqneo")
oenqxt`d leryn
^P1STREET("IS","wxiz bz","nyrel d`v""l")
l"v`d leryn
^P1STREET("IS","wxiz bz","nyrel d`xal")
lax`d leryn
^P1STREET("IS","wxiz bz","nyrel d`ykeliz")
zileky`d leryn
^P1STREET("IS","wxiz bz","nyrel d`zxeb")
bexz`d leryn
^P1STREET("IS","wxiz bz","nyrel dayex")
xeyad leryn
^P1STREET("IS","wxiz bz","nyrel dblaer")
realbd leryn
^P1STREET("IS","wxiz bz","nyrel dceacao")
oacaecd leryn
^P1STREET("IS","wxiz bz","nyrel dciyeo")
oeyicd leryn
^P1STREET("IS","wxiz bz","nyrel dctpd")
dptcd leryn
^P1STREET("IS","wxiz bz","nyrel ddbpd")
dpbdd leryn
^P1STREET("IS","wxiz bz","nyrel ddcxim")
mixcdd leryn
^P1STREET("IS","wxiz bz","nyrel dexc")
cxed leryn
^P1STREET("IS","wxiz bz","nyrel dlg""i")
i"gld leryn
^P1STREET("IS","wxiz bz","nyrel dlineo")
oenild leryn
^P1STREET("IS","wxiz bz","nyrel dnpbe")
ebpnd leryn
^P1STREET("IS","wxiz bz","nyrel dqaieo")
oeiaqd leryn
^P1STREET("IS","wxiz bz","nyrel dqiito")
otiiqd leryn
^P1STREET("IS","wxiz bz","nyrel dripa")
apird leryn
^P1STREET("IS","wxiz bz","nyrel dtln""g")
g"nltd leryn
^P1STREET("IS","wxiz bz","nyrel dwiyeo")
oeyiwd leryn
^P1STREET("IS","wxiz bz","nyrel dyeyo")
oyeyd leryn
^P1STREET("IS","wxiz bz","nyrel dztef")
fetzd leryn
^P1STREET("IS","wxiz bz","nyrel dzteg")
getzd leryn
^P1STREET("IS","wxiz bz","nyrel gbi")
ibg leryn
^P1STREET("IS","wxiz bz","nyrel gil ddpcqd")
dqcpdd lig leryn
^P1STREET("IS","wxiz bz","nyrel gpej")
jepg leryn
^P1STREET("IS","wxiz bz","nyrel gvxeo")
oexvg leryn
^P1STREET("IS","wxiz bz","nyrel ieqs")
sqei leryn
^P1STREET("IS","wxiz bz","nyrel kxni")
inxk leryn
^P1STREET("IS","wxiz bz","nyrel npyd")
dypn leryn
^P1STREET("IS","wxiz bz","nyrel rzpi`l ao wpf")
fpw oa l`ipzr leryn
^P1STREET("IS","wxiz bz","nyrel t""f")
f"t leryn
^P1STREET("IS","wxiz bz","nyrel vex")
xev leryn
^P1STREET("IS","wxiz bz","nyrel ya`")
`ay leryn
^P1STREET("IS","wxiz bz","nyrel ynyeo")
oeyny leryn
^P1STREET("IS","wxiz bz","nyrel zpio")
oipz leryn
^P1STREET("IS","wxiz bz","pg""l")
l"gp
^P1STREET("IS","wxiz bz","pil""i")
i"lip
^P1STREET("IS","wxiz bz","piped")
depip
^P1STREET("IS","wxiz bz","ptzli")
ilztp
^P1STREET("IS","wxiz bz","pzxo")
oxzp
^P1STREET("IS","wxiz bz","qhxend")
dnexhq
^P1STREET("IS","wxiz bz","qncx")
xcnq
^P1STREET("IS","wxiz bz","qnhz `yz`el")
le`zy` zhnq
^P1STREET("IS","wxiz bz","qnhz gvex")
xevg zhnq
^P1STREET("IS","wxiz bz","qnhz nbice")
ecibn zhnq
^P1STREET("IS","wxiz bz","qnhz nvcd")
dcvn zhnq
^P1STREET("IS","wxiz bz","qnhz rio cex")
xec oir zhnq
^P1STREET("IS","wxiz bz","racz")
zcar
^P1STREET("IS","wxiz bz","rcelm")
mlecr
^P1STREET("IS","wxiz bz","refide")
edifer
^P1STREET("IS","wxiz bz","reli dbxcem")
mecxbd iler
^P1STREET("IS","wxiz bz","rfwd")
dwfr
^P1STREET("IS","wxiz bz","rio iexwrm")
mrwxei oir
^P1STREET("IS","wxiz bz","rio phtim")
mithp oir
^P1STREET("IS","wxiz bz","rpzez")
zezpr
^P1STREET("IS","wxiz bz","twirio")
oiriwt
^P1STREET("IS","wxiz bz","viwlb")
blwiv
^P1STREET("IS","wxiz bz","vpgpim")
mipgpv
^P1STREET("IS","wxiz bz","x`eao")
oae`x
^P1STREET("IS","wxiz bz","xgaz `avo")
ova` zagx
^P1STREET("IS","wxiz bz","xgaz a`x `exd")
dxe` x`a zagx
^P1STREET("IS","wxiz bz","xgaz bcreo ao ie`y")
y`ei oa oercb zagx
^P1STREET("IS","wxiz bz","xgaz bxetiz")
zitexb zagx
^P1STREET("IS","wxiz bz","xgaz d`lnebim")
mibenl`d zagx
^P1STREET("IS","wxiz bz","xgaz dvitexo")
oxetivd zagx
^P1STREET("IS","wxiz bz","xgaz dx dfizim")
mizifd xd zagx
^P1STREET("IS","wxiz bz","xgaz glevd")
dvelg zagx
^P1STREET("IS","wxiz bz","xgaz idl")
ldi zagx
^P1STREET("IS","wxiz bz","xgaz inio")
oini zagx
^P1STREET("IS","wxiz bz","xgaz itzg dblrci")
icrlbd gzti zagx
^P1STREET("IS","wxiz bz","xgaz ixnide")
edinxi zagx
^P1STREET("IS","wxiz bz","xgaz iyykx")
xkyyi zagx
^P1STREET("IS","wxiz bz","xgaz navr gexa")
axeg rvan zagx
^P1STREET("IS","wxiz bz","xgaz navr gixm")
mxig rvan zagx
^P1STREET("IS","wxiz bz","xgaz navr ie`a")
a`ei rvan zagx
^P1STREET("IS","wxiz bz","xgaz navr pgyeo")
oeygp rvan zagx
^P1STREET("IS","wxiz bz","xgaz nexid")
dixen zagx
^P1STREET("IS","wxiz bz","xgaz nnyiz")
ziynn zagx
^P1STREET("IS","wxiz bz","xgaz pivpd")
dpvip zagx
^P1STREET("IS","wxiz bz","xgaz racz")
zcar zagx
^P1STREET("IS","wxiz bz","xgaz reacd")
dcaer zagx
^P1STREET("IS","wxiz bz","xgaz rio aeww")
wwea oir zagx
^P1STREET("IS","wxiz bz","xgaz rio bci")
icb oir zagx
^P1STREET("IS","wxiz bz","xgaz rio dayex")
xeyad oir zagx
^P1STREET("IS","wxiz bz","xgaz rio dnrxd")
dxrnd oir zagx
^P1STREET("IS","wxiz bz","xgaz rio ixwrm")
mrwxi oir zagx
^P1STREET("IS","wxiz bz","xgaz rio nex")
xen oir zagx
^P1STREET("IS","wxiz bz","xgaz rio phtim")
mithp oir zagx
^P1STREET("IS","wxiz bz","xgaz rio raxepd")
dpexar oir zagx
^P1STREET("IS","wxiz bz","xgaz rio vewim")
miwev oir zagx
^P1STREET("IS","wxiz bz","xgaz vetx")
xtev zagx
^P1STREET("IS","wxiz bz","xgaz whexd")
dxehw zagx
^P1STREET("IS","wxiz bz","xgaz xezm")
mzex zagx
^P1STREET("IS","wxiz bz","xgaz y`el dnlj")
jlnd le`y zagx
^P1STREET("IS","wxiz bz","xgaz yahd")
dhay zagx
^P1STREET("IS","wxiz bz","xgaz yepiz")
zipey zagx
^P1STREET("IS","wxiz bz","xgaz yifteo")
oetfiy zagx
^P1STREET("IS","wxiz bz","xgaz ynbx ao rpz")
zpr oa xbny zagx
^P1STREET("IS","wxiz bz","xgaz znpr")
rpnz zagx
^P1STREET("IS","wxiz bz","xgaz zyxi")
ixyz zagx
^P1STREET("IS","wxiz bz","xnez cec")
cec zenx
^P1STREET("IS","wxiz bz","xt`l")
l`tx
^P1STREET("IS","wxiz bz","yah")
hay
^P1STREET("IS","wxiz bz","yahd")
dhay
^P1STREET("IS","wxiz bz","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","wxiz bz","yc' `au")
ua` 'cy
^P1STREET("IS","wxiz bz","yc' `zxi dnwx`")
`xwnd ixz` 'cy
^P1STREET("IS","wxiz bz","yc' bz")
zb 'cy
^P1STREET("IS","wxiz bz","yc' caexd")
dxeac 'cy
^P1STREET("IS","wxiz bz","yc' daxfl")
lfxad 'cy
^P1STREET("IS","wxiz bz","yc' dayo")
oyad 'cy
^P1STREET("IS","wxiz bz","yc' dbelo")
olebd 'cy
^P1STREET("IS","wxiz bz","yc' dnrtil")
litrnd 'cy
^P1STREET("IS","wxiz bz","yc' drvn`ez")
ze`nvrd 'cy
^P1STREET("IS","wxiz bz","yc' dtlcd")
dcltd 'cy
^P1STREET("IS","wxiz bz","yc' dtrnepiz")
zipenrtd 'cy
^P1STREET("IS","wxiz bz","yc' dyethim")
mihteyd 'cy
^P1STREET("IS","wxiz bz","yc' fxgo")
ogxf 'cy
^P1STREET("IS","wxiz bz","yc' idlem")
meldi 'cy
^P1STREET("IS","wxiz bz","yc' igfw`l")
l`wfgi 'cy
^P1STREET("IS","wxiz bz","yc' iyx`l telw")
wlet l`xyi 'cy
^P1STREET("IS","wxiz bz","yc' lkiy")
yikl 'cy
^P1STREET("IS","wxiz bz","yc' nlki iyx`l")
l`xyi ikln 'cy
^P1STREET("IS","wxiz bz","yc' nyd")
dyn 'cy
^P1STREET("IS","wxiz bz","yc' tf")
ft 'cy
^P1STREET("IS","wxiz bz","yc' tlhipd")
dpihlt 'cy
^P1STREET("IS","wxiz bz","yc' vd""l")
l"dv 'cy
^P1STREET("IS","wxiz bz","yc' vexo")
oxev 'cy
^P1STREET("IS","wxiz bz","yeypz drnwim")
miwnrd zpyey
^P1STREET("IS","wxiz bz","yifteo")
oetfiy
^P1STREET("IS","wxiz bz","ylnd dnlj")
jlnd dnly
^P1STREET("IS","wxiz bz","yne`l dpai`")
`iapd l`eny
^P1STREET("IS","wxiz bz","ynreo")
oerny
^P1STREET("IS","wxiz bz","yxieo")
oeixy
^P1STREET("IS","wxiz bz","zezgpim")
mipgzez
^P1STREET("IS","wxiz bz","znef")
fenz
^P1STREET("IS","wxiz bz","zxyiy")
yiyxz
^P1STREET("IS","wxiz giim")
miig zixw
^P1STREET("IS","wxiz giim","`aix nxw")
wxn xia`
^P1STREET("IS","wxiz giim","`axap`l")
l`paxa`
^P1STREET("IS","wxiz giim","`ciqeo")
oeqic`
^P1STREET("IS","wxiz giim","`dxepeaiu ieqs")
sqei uiaepexd`
^P1STREET("IS","wxiz giim","`g""i `ilz")
zli` i"g`
^P1STREET("IS","wxiz giim","`gc drm")
mrd cg`
^P1STREET("IS","wxiz giim","`lepim")
mipel`
^P1STREET("IS","wxiz giim","`li kdo")
odk il`
^P1STREET("IS","wxiz giim","`lkqpcx fiic")
ciif xcpqkl`
^P1STREET("IS","wxiz giim","`pd txpw")
wpxt dp`
^P1STREET("IS","wxiz giim","`xid leio")
oiel dix`
^P1STREET("IS","wxiz giim","adxa iwezi`l")
l`izewi axda
^P1STREET("IS","wxiz giim","aeql ieqs")
sqei lqea
^P1STREET("IS","wxiz giim","ailipqeo")
oeqpilia
^P1STREET("IS","wxiz giim","aiz `lt`")
`tl` zia
^P1STREET("IS","wxiz giim","al `lkqpcx bxdm")
mdxb xcpqkl` la
^P1STREET("IS","wxiz giim","ax `ilo")
oli` xa
^P1STREET("IS","wxiz giim","axecvwi")
iwvcexa
^P1STREET("IS","wxiz giim","baiy")
yiab
^P1STREET("IS","wxiz giim","bexcepid")
dipecxeb
^P1STREET("IS","wxiz giim","c""x vitx")
xtiv x"c
^P1STREET("IS","wxiz giim","c""x wxtl")
ltxw x"c
^P1STREET("IS","wxiz giim","cbpid")
dipbc
^P1STREET("IS","wxiz giim","d`ivhcieo")
oeichvi`d
^P1STREET("IS","wxiz giim","d`nepd")
dpen`d
^P1STREET("IS","wxiz giim","d`xfim")
mifx`d
^P1STREET("IS","wxiz giim","d`yl")
ly`d
^P1STREET("IS","wxiz giim","dapid")
dipad
^P1STREET("IS","wxiz giim","dbcec draxi")
ixard cecbd
^P1STREET("IS","wxiz giim","dcbo")
obcd
^P1STREET("IS","wxiz giim","dciibim")
mibiicd
^P1STREET("IS","wxiz giim","dcypim")
mipycd
^P1STREET("IS","wxiz giim","deziwim")
miwized
^P1STREET("IS","wxiz giim","dgavlz")
zlvagd
^P1STREET("IS","wxiz giim","dgihd")
dhigd
^P1STREET("IS","wxiz giim","dgxviz")
zivxgd
^P1STREET("IS","wxiz giim","dgxy")
yxgd
^P1STREET("IS","wxiz giim","dievw")
wveid
^P1STREET("IS","wxiz giim","dim dzikeo")
oekizd mid
^P1STREET("IS","wxiz giim","divixd")
dxivid
^P1STREET("IS","wxiz giim","dnelcz")
zclend
^P1STREET("IS","wxiz giim","dnqbx")
xbqnd
^P1STREET("IS","wxiz giim","dpehr")
rhepd
^P1STREET("IS","wxiz giim","dpehx")
xhepd
^P1STREET("IS","wxiz giim","dpvi""a")
a"ivpd
^P1STREET("IS","wxiz giim","dqell")
lleqd
^P1STREET("IS","wxiz giim","dqpepiz")
zipepqd
^P1STREET("IS","wxiz giim","draecd")
dceard
^P1STREET("IS","wxiz giim","drnlim")
milnrd
^P1STREET("IS","wxiz giim","dtlebez")
zebeltd
^P1STREET("IS","wxiz giim","dtlq")
qltd
^P1STREET("IS","wxiz giim","dwepbxq")
qxbpewd
^P1STREET("IS","wxiz giim","dwiaevim")
miveaiwd
^P1STREET("IS","wxiz giim","dwihex")
xehiwd
^P1STREET("IS","wxiz giim","dx`yepim")
mipey`xd
^P1STREET("IS","wxiz giim","dxa xiipq")
qpiix axd
^P1STREET("IS","wxiz giim","dxineo")
oenixd
^P1STREET("IS","wxiz giim","dyiixd")
dxiiyd
^P1STREET("IS","wxiz giim","dyiy")
yiyd
^P1STREET("IS","wxiz giim","dywc")
cwyd
^P1STREET("IS","wxiz giim","dyx yihxiz")
zixhiy xyd
^P1STREET("IS","wxiz giim","dz`pd")
dp`zd
^P1STREET("IS","wxiz giim","dzwend")
dnewzd
^P1STREET("IS","wxiz giim","flno `xo")
ox` onlf
^P1STREET("IS","wxiz giim","gend enbcl")
lcbne dneg
^P1STREET("IS","wxiz giim","gid neywd")
dwyen dig
^P1STREET("IS","wxiz giim","glevi dzryiid")
diiyrzd ivelg
^P1STREET("IS","wxiz giim","gtvi ad")
da ivtg
^P1STREET("IS","wxiz giim","gxa l`z")
z`l axg
^P1STREET("IS","wxiz giim","gxeyz")
zyexg
^P1STREET("IS","wxiz giim","i`pey wexv'w")
w'vxew yep`i
^P1STREET("IS","wxiz giim","iapi`li")
il`ipai
^P1STREET("IS","wxiz giim","ibir ktiim")
miitk ribi
^P1STREET("IS","wxiz giim","ielieq qineo")
oeniq qeilei
^P1STREET("IS","wxiz giim","ieqs lei")
iel sqei
^P1STREET("IS","wxiz giim","ieqs yhxo")
oxhy sqei
^P1STREET("IS","wxiz giim","igirm")
mrigi
^P1STREET("IS","wxiz giim","itd liia")
aiil dti
^P1STREET("IS","wxiz giim","ivgw ao vai")
iav oa wgvi
^P1STREET("IS","wxiz giim","ivia ivgw")
wgvi aivi
^P1STREET("IS","wxiz giim","iyx`li ao vieo")
oeiv oa il`xyi
^P1STREET("IS","wxiz giim","iyykx")
xkyyi
^P1STREET("IS","wxiz giim","k`do irwa")
awri od`k
^P1STREET("IS","wxiz giim","kaxi")
ixak
^P1STREET("IS","wxiz giim","kkx dl""h")
h"ld xkk
^P1STREET("IS","wxiz giim","lai` ylnd")
dnly `ial
^P1STREET("IS","wxiz giim","li`eo yhiio")
oiihy oe`il
^P1STREET("IS","wxiz giim","lidno")
ondil
^P1STREET("IS","wxiz giim","lieiw")
wieil
^P1STREET("IS","wxiz giim","navr wcy")
ycw rvan
^P1STREET("IS","wxiz giim","nedliax")
xailden
^P1STREET("IS","wxiz giim","nkai")
iakn
^P1STREET("IS","wxiz giim","npbx ivgw")
wgvi xbpn
^P1STREET("IS","wxiz giim","nreo `wcn`im")
mi`ncw` oern
^P1STREET("IS","wxiz giim","nyd ciio")
oiic dyn
^P1STREET("IS","wxiz giim","nyd ytix`")
`xity dyn
^P1STREET("IS","wxiz giim","nynx drnw")
wnrd xnyn
^P1STREET("IS","wxiz giim","pieheo `iifiw")
wifii` oeheip
^P1STREET("IS","wxiz giim","pzia arli dzpi`")
`ipzd ilra aizp
^P1STREET("IS","wxiz giim","pzia d`zxeb")
bexz`d aizp
^P1STREET("IS","wxiz giim","pzia ddcq")
qcdd aizp
^P1STREET("IS","wxiz giim","pzia diyiad")
daiyid aizp
^P1STREET("IS","wxiz giim","pzia dlela")
aleld aizp
^P1STREET("IS","wxiz giim","pzia drlid")
dilrd aizp
^P1STREET("IS","wxiz giim","pzia drxad")
daxrd aizp
^P1STREET("IS","wxiz giim","pzia dxi""s")
s"ixd aizp
^P1STREET("IS","wxiz giim","pzia dzp`im")
mi`pzd aizp
^P1STREET("IS","wxiz giim","pzia gkni iyx`l")
l`xyi inkg aizp
^P1STREET("IS","wxiz giim","pzia ieqiteo")
oetiqei aizp
^P1STREET("IS","wxiz giim","pzia lei ivgw")
wgvi iel aizp
^P1STREET("IS","wxiz giim","pzia wel nayx")
xyan lew aizp
^P1STREET("IS","wxiz giim","pzia yc""x")
x"cy aizp
^P1STREET("IS","wxiz giim","ryz `aibcex")
xecbia` zyr
^P1STREET("IS","wxiz giim","telc axkd")
dkxa clet
^P1STREET("IS","wxiz giim","txpu lei")
iel upxt
^P1STREET("IS","wxiz giim","viflipb")
bpilfiv
^P1STREET("IS","wxiz giim","viihlio `dxeo")
oexd` oilhiiv
^P1STREET("IS","wxiz giim","wceyi dye`d")
d`eyd iyecw
^P1STREET("IS","wxiz giim","wlnx nyd")
dyn xnlw
^P1STREET("IS","wxiz giim","wtlo `liyar")
rayil` oltw
^P1STREET("IS","wxiz giim","wvpyhiio")
oiihypvw
^P1STREET("IS","wxiz giim","wxo winz liyx`l")
l`xyil zniw oxw
^P1STREET("IS","wxiz giim","wxtl")
ltxw
^P1STREET("IS","wxiz giim","xg' 1358")
1358 'gx
^P1STREET("IS","wxiz giim","xg' 1886")
1886 'gx
^P1STREET("IS","wxiz giim","xg' 6881")
6881 'gx
^P1STREET("IS","wxiz giim","xg' 7881")
7881 'gx
^P1STREET("IS","wxiz giim","y`x iyea")
aeyi x`y
^P1STREET("IS","wxiz giim","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","wxiz giim","yail `xu dvai")
iavd ux` liay
^P1STREET("IS","wxiz giim","yail d`aez")
zea`d liay
^P1STREET("IS","wxiz giim","yail d`ndez")
zedn`d liay
^P1STREET("IS","wxiz giim","yail d`nex`im")
mi`xen`d liay
^P1STREET("IS","wxiz giim","yail db`epim")
mipe`bd liay
^P1STREET("IS","wxiz giim","yail dnqexz")
zxeqnd liay
^P1STREET("IS","wxiz giim","yail dteqwim")
miwqetd liay
^P1STREET("IS","wxiz giim","yc' ddqzcxez")
zexczqdd 'cy
^P1STREET("IS","wxiz giim","yc' dpyi` hxeno")
onexh `iypd 'cy
^P1STREET("IS","wxiz giim","yc' dx`""d")
d"`xd 'cy
^P1STREET("IS","wxiz giim","yc' exaexb")
bxeaxe 'cy
^P1STREET("IS","wxiz giim","yc' ng""l")
l"gn 'cy
^P1STREET("IS","wxiz giim","yc' yarz dnipim")
mipind zray 'cy
^P1STREET("IS","wxiz giim","yc' zxi""b")
b"ixz 'cy
^P1STREET("IS","wxiz giim","ycd aewx")
xwea dcy
^P1STREET("IS","wxiz giim","yhxo")
oxhy
^P1STREET("IS","wxiz giim","ypwx `xid")
dix` xwpy
^P1STREET("IS","wxiz giim","yxz nyd")
dyn zxy
^P1STREET("IS","wxiz giim","yyz dinim")
minid zyy
^P1STREET("IS","wxiz giim","zeal")
laez
^P1STREET("IS","wxiz giim","zexd eraecd")
dceare dxez
^P1STREET("IS","wxiz hareo")
oerah zixw
^P1STREET("IS","wxiz hareo","`""c bexceo")
oecxeb c"`
^P1STREET("IS","wxiz hareo","`expim")
mipxe`
^P1STREET("IS","wxiz hareo","`lepim")
mipel`
^P1STREET("IS","wxiz hareo","`lkqpcx fiic")
ciif xcpqkl`
^P1STREET("IS","wxiz hareo","`lxe`i")
i`exl`
^P1STREET("IS","wxiz hareo","`npeo eznx")
xnze oepn`
^P1STREET("IS","wxiz hareo","aexekea")
aekexea
^P1STREET("IS","wxiz hareo","aiz yrxim")
mixry zia
^P1STREET("IS","wxiz hareo","ao idecd")
dcedi oa
^P1STREET("IS","wxiz hareo","axeyim")
miyexa
^P1STREET("IS","wxiz hareo","axl kvplqeo")
oeqlpvk lxa
^P1STREET("IS","wxiz hareo","axw ao `aiprm")
mrpia` oa wxa
^P1STREET("IS","wxiz hareo","belena `lide")
edil` aneleb
^P1STREET("IS","wxiz hareo","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","wxiz hareo","cbpiez")
zeipbc
^P1STREET("IS","wxiz hareo","cec `lrfx")
xfrl` cec
^P1STREET("IS","wxiz hareo","cec xnf")
fnx cec
^P1STREET("IS","wxiz hareo","cwl")
lwc
^P1STREET("IS","wxiz hareo","cxj petiz")
zitep jxc
^P1STREET("IS","wxiz hareo","cxj wxiz rnl")
lnr zixw jxc
^P1STREET("IS","wxiz hareo","d`ixiq")
qixi`d
^P1STREET("IS","wxiz hareo","d`ld")
dl`d
^P1STREET("IS","wxiz hareo","daepim")
mipead
^P1STREET("IS","wxiz hareo","daxeyim")
miyexad
^P1STREET("IS","wxiz hareo","dben`")
`nebd
^P1STREET("IS","wxiz hareo","dblil")
lilbd
^P1STREET("IS","wxiz hareo","dbto")
otbd
^P1STREET("IS","wxiz hareo","dbx`")
`xbd
^P1STREET("IS","wxiz hareo","dcq")
qcd
^P1STREET("IS","wxiz hareo","dexcim")
micxed
^P1STREET("IS","wxiz hareo","dfiz")
zifd
^P1STREET("IS","wxiz hareo","dfizim")
mizifd
^P1STREET("IS","wxiz hareo","dgexy")
yxegd
^P1STREET("IS","wxiz hareo","dkxkem")
mekxkd
^P1STREET("IS","wxiz hareo","dkxnl")
lnxkd
^P1STREET("IS","wxiz hareo","dnfxg")
gxfnd
^P1STREET("IS","wxiz hareo","dniiqcim")
micqiind
^P1STREET("IS","wxiz hareo","dnxbliez")
zeilbxnd
^P1STREET("IS","wxiz hareo","dnxbpiez")
zeipbxnd
^P1STREET("IS","wxiz hareo","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","wxiz hareo","drlid")
dilrd
^P1STREET("IS","wxiz hareo","drnw")
wnrd
^P1STREET("IS","wxiz hareo","dvarepi")
iperavd
^P1STREET("IS","wxiz hareo","dxezm")
mzexd
^P1STREET("IS","wxiz hareo","dxinepim")
mipenixd
^P1STREET("IS","wxiz hareo","dxvl")
lvxd
^P1STREET("IS","wxiz hareo","dxwtez")
zetwxd
^P1STREET("IS","wxiz hareo","dyenxim")
mixneyd
^P1STREET("IS","wxiz hareo","dyihim")
mihiyd
^P1STREET("IS","wxiz hareo","dywcim")
micwyd
^P1STREET("IS","wxiz hareo","dywnd")
dnwyd
^P1STREET("IS","wxiz hareo","dz`pd")
dp`zd
^P1STREET("IS","wxiz hareo","dzyai")
iayzd
^P1STREET("IS","wxiz hareo","f'exq")
qxe'f
^P1STREET("IS","wxiz hareo","faeleo")
oeleaf
^P1STREET("IS","wxiz hareo","gavlz")
zlvag
^P1STREET("IS","wxiz hareo","giim eiivno")
onviie miig
^P1STREET("IS","wxiz hareo","gpd qpy")
ypq dpg
^P1STREET("IS","wxiz hareo","gxviz")
zivxg
^P1STREET("IS","wxiz hareo","ib`l `leo")
oel` l`bi
^P1STREET("IS","wxiz hareo","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","wxiz hareo","ifxr`l")
l`rxfi
^P1STREET("IS","wxiz hareo","iqnio")
oinqi
^P1STREET("IS","wxiz hareo","irxd")
dxri
^P1STREET("IS","wxiz hareo","ivgw ao vai")
iav oa wgvi
^P1STREET("IS","wxiz hareo","ivgw xaio")
oiax wgvi
^P1STREET("IS","wxiz hareo","kkx ao bexieo")
oeixeb oa xkk
^P1STREET("IS","wxiz hareo","kkx dgixez")
zexigd xkk
^P1STREET("IS","wxiz hareo","kkx dxwtez")
zetwxd xkk
^P1STREET("IS","wxiz hareo","klpiez")
zeiplk
^P1STREET("IS","wxiz hareo","liapd")
dpail
^P1STREET("IS","wxiz hareo","lilj")
jlil
^P1STREET("IS","wxiz hareo","nbcl")
lcbn
^P1STREET("IS","wxiz hareo","nexo")
oxen
^P1STREET("IS","wxiz hareo","nrld `aylem")
melya` dlrn
^P1STREET("IS","wxiz hareo","nrld wxiz hareo")
oerah zixw dlrn
^P1STREET("IS","wxiz hareo","nxcki")
ikcxn
^P1STREET("IS","wxiz hareo","nxeed")
deexn
^P1STREET("IS","wxiz hareo","nyd ciio")
oiic dyn
^P1STREET("IS","wxiz hareo","nyd yxz")
zxy dyn
^P1STREET("IS","wxiz hareo","nyrel dlehm")
mheld leryn
^P1STREET("IS","wxiz hareo","nyrel dqiito")
otiiqd leryn
^P1STREET("IS","wxiz hareo","pexiez")
zeixep
^P1STREET("IS","wxiz hareo","pgl wcenim")
minecw lgp
^P1STREET("IS","wxiz hareo","pxwiqim")
miqiwxp
^P1STREET("IS","wxiz hareo","qaieo")
oeiaq
^P1STREET("IS","wxiz hareo","qbliez")
zeilbq
^P1STREET("IS","wxiz hareo","qgla")
algq
^P1STREET("IS","wxiz hareo","qn' dgxea")
aexgd 'nq
^P1STREET("IS","wxiz hareo","qnhz d`gim tiy")
yit mig`d zhnq
^P1STREET("IS","wxiz hareo","qnhz d`ld")
dl`d zhnq
^P1STREET("IS","wxiz hareo","qnhz dgva")
avgd zhnq
^P1STREET("IS","wxiz hareo","qzeepiz")
zipeezq
^P1STREET("IS","wxiz hareo","rixiz")
zixir
^P1STREET("IS","wxiz hareo","rnlim")
milnr
^P1STREET("IS","wxiz hareo","rxad")
daxr
^P1STREET("IS","wxiz hareo","vd""l")
l"dv
^P1STREET("IS","wxiz hareo","vitexpim")
mipxetiv
^P1STREET("IS","wxiz hareo","wiyeo")
oeyiw
^P1STREET("IS","wxiz hareo","wxo winz")
zniw oxw
^P1STREET("IS","wxiz hareo","xnz dcqd")
dqcd znx
^P1STREET("IS","wxiz hareo","yeypim")
mipyey
^P1STREET("IS","wxiz hareo","yikeo `ld")
dl` oekiy
^P1STREET("IS","wxiz hareo","ytxipvw")
wvpixty
^P1STREET("IS","wxiz hareo","ytxivw ieqs")
sqei wvixty
^P1STREET("IS","wxiz hareo","znx")
xnz
^P1STREET("IS","wxiz im")
mi zixw
^P1STREET("IS","wxiz im","`daz vieo")
oeiv zad`
^P1STREET("IS","wxiz im","`exo")
oxe`
^P1STREET("IS","wxiz im","`gc drm")
mrd cg`
^P1STREET("IS","wxiz im","`ilz")
zli`
^P1STREET("IS","wxiz im","`ixeq")
qexi`
^P1STREET("IS","wxiz im","`leo")
oel`
^P1STREET("IS","wxiz im","`li kdo")
odk il`
^P1STREET("IS","wxiz im","`txim")
mixt`
^P1STREET("IS","wxiz im","`v""l")
l"v`
^P1STREET("IS","wxiz im","`xtlq`")
`qltx`
^P1STREET("IS","wxiz im","`yl")
ly`
^P1STREET("IS","wxiz im","`yx")
xy`
^P1STREET("IS","wxiz im","`zxeb")
bexz`
^P1STREET("IS","wxiz im","aexekea")
aekexea
^P1STREET("IS","wxiz im","ail""e")
e"lia
^P1STREET("IS","wxiz im","alej")
jela
^P1STREET("IS","wxiz im","apinio")
oinipa
^P1STREET("IS","wxiz im","ax idecd")
dcedi xa
^P1STREET("IS","wxiz im","axciv'aqwi")
iwqa'vicxa
^P1STREET("IS","wxiz im","axfili")
ilifxa
^P1STREET("IS","wxiz im","bc")
cb
^P1STREET("IS","wxiz im","belcd n`ix")
xi`n dcleb
^P1STREET("IS","wxiz im","belena")
aneleb
^P1STREET("IS","wxiz im","belo")
oleb
^P1STREET("IS","wxiz im","bexceo")
oecxeb
^P1STREET("IS","wxiz im","blaer")
realb
^P1STREET("IS","wxiz im","blrc")
crlb
^P1STREET("IS","wxiz im","bxifim")
mifixb
^P1STREET("IS","wxiz im","cbpiz")
zipbc
^P1STREET("IS","wxiz im","cela")
alec
^P1STREET("IS","wxiz im","co")
oc
^P1STREET("IS","wxiz im","cwl")
lwc
^P1STREET("IS","wxiz im","d`xfim")
mifx`d
^P1STREET("IS","wxiz im","daxey")
yexad
^P1STREET("IS","wxiz im","dayex")
xeyad
^P1STREET("IS","wxiz im","dblil")
lilbd
^P1STREET("IS","wxiz im","dbrzeo")
oezrbd
^P1STREET("IS","wxiz im","dbto")
otbd
^P1STREET("IS","wxiz im","dcq")
qcd
^P1STREET("IS","wxiz im","ddbpd")
dpbdd
^P1STREET("IS","wxiz im","ddcxim")
mixcdd
^P1STREET("IS","wxiz im","dexc")
cxed
^P1STREET("IS","wxiz im","dfiz")
zifd
^P1STREET("IS","wxiz im","dgavlz")
zlvagd
^P1STREET("IS","wxiz im","dgynep`im")
mi`penygd
^P1STREET("IS","wxiz im","dim dzikeo")
oekizd mid
^P1STREET("IS","wxiz im","diqnio")
oinqid
^P1STREET("IS","wxiz im","dixco")
ocxid
^P1STREET("IS","wxiz im","dklpiz")
ziplkd
^P1STREET("IS","wxiz im","dlilj")
jlild
^P1STREET("IS","wxiz im","dngzxz")
zxzgnd
^P1STREET("IS","wxiz im","dniiqcim")
micqiind
^P1STREET("IS","wxiz im","dnlj cec")
cec jlnd
^P1STREET("IS","wxiz im","dpba")
abpd
^P1STREET("IS","wxiz im","dprno")
onrpd
^P1STREET("IS","wxiz im","dptg")
gtpd
^P1STREET("IS","wxiz im","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","wxiz im","drlid")
dilrd
^P1STREET("IS","wxiz im","drvn`ez")
ze`nvrd
^P1STREET("IS","wxiz im","drxad")
daxrd
^P1STREET("IS","wxiz im","dwenniez")
zeinnewd
^P1STREET("IS","wxiz im","dwepbxq")
qxbpewd
^P1STREET("IS","wxiz im","dx`yepim")
mipey`xd
^P1STREET("IS","wxiz im","dxa aefble")
elbfea axd
^P1STREET("IS","wxiz im","dxa ny`y ieqs")
sqei y`yn axd
^P1STREET("IS","wxiz im","dxineo")
oenixd
^P1STREET("IS","wxiz im","dyethim")
mihteyd
^P1STREET("IS","wxiz im","dyiwnim")
minwiyd
^P1STREET("IS","wxiz im","exaexb yc")
cy bxeaxe
^P1STREET("IS","wxiz im","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","wxiz im","faeleo")
oeleaf
^P1STREET("IS","wxiz im","flno `xo")
ox` onlf
^P1STREET("IS","wxiz im","flno yfx")
xfy onlf
^P1STREET("IS","wxiz im","gpd qpy")
ypq dpg
^P1STREET("IS","wxiz im","gxeaim")
miaexg
^P1STREET("IS","wxiz im","hxentlcex")
xecltnexh
^P1STREET("IS","wxiz im","hyxpigeaqwi y`el")
le`y iwqaegipxyh
^P1STREET("IS","wxiz im","i""l txu")
uxt l"i
^P1STREET("IS","wxiz im","idecd")
dcedi
^P1STREET("IS","wxiz im","idecd dlei")
ield dcedi
^P1STREET("IS","wxiz im","ieqs")
sqei
^P1STREET("IS","wxiz im","ieqthl biex`")
`xeib lhtqei
^P1STREET("IS","wxiz im","igirm")
mrigi
^P1STREET("IS","wxiz im","ivgw ycd")
dcy wgvi
^P1STREET("IS","wxiz im","iyx`l iyride")
ediryi l`xyi
^P1STREET("IS","wxiz im","iyykx")
xkyyi
^P1STREET("IS","wxiz im","kkx lei `ykel")
leky` iel xkk
^P1STREET("IS","wxiz im","kkx pivo")
ovip xkk
^P1STREET("IS","wxiz im","kkx pnix")
xinp xkk
^P1STREET("IS","wxiz im","kvplqeo")
oeqlpvk
^P1STREET("IS","wxiz im","ldno dxaxh")
hxaxd ondl
^P1STREET("IS","wxiz im","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","wxiz im","lei")
iel
^P1STREET("IS","wxiz im","lg""i")
i"gl
^P1STREET("IS","wxiz im","lkiy")
yikl
^P1STREET("IS","wxiz im","n`ix alihi")
ihila xi`n
^P1STREET("IS","wxiz im","nbice")
ecibn
^P1STREET("IS","wxiz im","necirio")
oiricen
^P1STREET("IS","wxiz im","nedliax")
xailden
^P1STREET("IS","wxiz im","nikl")
lkin
^P1STREET("IS","wxiz im","nixeo")
oexin
^P1STREET("IS","wxiz im","npcli nekx qtxim")
mixtq xken ilcpn
^P1STREET("IS","wxiz im","npyd")
dypn
^P1STREET("IS","wxiz im","nrld kexcpi")
ipcxek dlrn
^P1STREET("IS","wxiz im","nrtilim")
militrn
^P1STREET("IS","wxiz im","nvcd")
dcvn
^P1STREET("IS","wxiz im","nxbpiz")
zipbxn
^P1STREET("IS","wxiz im","nxcki pnix")
xinp ikcxn
^P1STREET("IS","wxiz im","nxhio aeax")
xaea oihxn
^P1STREET("IS","wxiz im","pil""i")
i"lip
^P1STREET("IS","wxiz im","pnxi irwa")
awri ixnp
^P1STREET("IS","wxiz im","ptzli")
ilztp
^P1STREET("IS","wxiz im","pxwiq")
qiwxp
^P1STREET("IS","wxiz im","pzia wel dnayx")
xyand lew aizp
^P1STREET("IS","wxiz im","qaieo")
oeiaq
^P1STREET("IS","wxiz im","qelc dpxiihd")
dhiixpd cleq
^P1STREET("IS","wxiz im","qewelea")
aeleweq
^P1STREET("IS","wxiz im","qhxend")
dnexhq
^P1STREET("IS","wxiz im","qibliez")
zeilbiq
^P1STREET("IS","wxiz im","qnhz dwenniez")
zeinnewd zhnq
^P1STREET("IS","wxiz im","rcelm")
mlecr
^P1STREET("IS","wxiz im","rvieo")
oeivr
^P1STREET("IS","wxiz im","rxnepim")
mipenxr
^P1STREET("IS","wxiz im","tipqwx")
xwqpit
^P1STREET("IS","wxiz im","tln""g")
g"nlt
^P1STREET("IS","wxiz im","tpgq laeo")
oeal qgpt
^P1STREET("IS","wxiz im","tpgq qtix")
xitq qgpt
^P1STREET("IS","wxiz im","tpwq")
qwpt
^P1STREET("IS","wxiz im","txiyno")
onyixt
^P1STREET("IS","wxiz im","vitexo")
oxetiv
^P1STREET("IS","wxiz im","wtlo")
oltw
^P1STREET("IS","wxiz im","wxo wiinz")
zniiw oxw
^P1STREET("IS","wxiz im","x`eao")
oae`x
^P1STREET("IS","wxiz im","xeaxh qelc")
cleq hxaex
^P1STREET("IS","wxiz im","xiipq")
qpiix
^P1STREET("IS","wxiz im","xna""m")
m"anx
^P1STREET("IS","wxiz im","xwtz")
ztwx
^P1STREET("IS","wxiz im","y""i rbpeo")
oepbr i"y
^P1STREET("IS","wxiz im","y.v.w")
w.v.y
^P1STREET("IS","wxiz im","yafi")
ifay
^P1STREET("IS","wxiz im","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","wxiz im","yc' ai`liw")
wil`ia 'cy
^P1STREET("IS","wxiz im","yc' ao vai ivgw")
wgvi iav oa 'cy
^P1STREET("IS","wxiz im","yc' ddqzcxez")
zexczqdd 'cy
^P1STREET("IS","wxiz im","yc' dtln""g")
g"nltd 'cy
^P1STREET("IS","wxiz im","yc' dxvl")
lvxd 'cy
^P1STREET("IS","wxiz im","yc' eivno")
onvie 'cy
^P1STREET("IS","wxiz im","yc' f'aehipqwi f`a")
a`f iwqpihea'f 'cy
^P1STREET("IS","wxiz im","yc' ib`l `leo")
oel` l`bi 'cy
^P1STREET("IS","wxiz im","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","wxiz im","yc' nyd yxz")
zxy dyn 'cy
^P1STREET("IS","wxiz im","yc' vd""l")
l"dv 'cy
^P1STREET("IS","wxiz im","ynreo")
oerny
^P1STREET("IS","wxiz im","ytix`")
`xity
^P1STREET("IS","wxiz im","ytxipvw")
wvpixty
^P1STREET("IS","wxiz im","yv""w")
w"vy
^P1STREET("IS","wxiz im","ywc")
cwy
^P1STREET("IS","wxiz im","z`pd")
dp`z
^P1STREET("IS","wxiz im","zaex")
xeaz
^P1STREET("IS","wxiz im","znx")
xnz
^P1STREET("IS","wxiz im `'")
'` mi zixw
^P1STREET("IS","wxiz im `'","ai`liw")
wil`ia
^P1STREET("IS","wxiz irxim")
mixri zixw
^P1STREET("IS","wxiz irxim","`aipca")
acpia`
^P1STREET("IS","wxiz irxim","`efpiim lzexd")
dxezl miipfe`
^P1STREET("IS","wxiz irxim","alej")
jela
^P1STREET("IS","wxiz irxim","bexceo")
oecxeb
^P1STREET("IS","wxiz irxim","cxj `axdm")
mdxa` jxc
^P1STREET("IS","wxiz irxim","dbx""`")
`"xbd
^P1STREET("IS","wxiz irxim","dxi""s")
s"ixd
^P1STREET("IS","wxiz irxim","ivgw")
wgvi
^P1STREET("IS","wxiz irxim","navr pgyeo")
oeygp rvan
^P1STREET("IS","wxiz irxim","nrlez wceyi hlf")
flh iyecw zelrn
^P1STREET("IS","wxiz irxim","pglz irwa")
awri zlgp
^P1STREET("IS","wxiz irxim","wxiz hlfqheo")
oehqflh zixw
^P1STREET("IS","wxiz nevwio")
oiwven zixw
^P1STREET("IS","wxiz nevwio","`dxeo")
oexd`
^P1STREET("IS","wxiz nevwio","`eqiywio")
oiwyiqe`
^P1STREET("IS","wxiz nevwio","`eyd")
dye`
^P1STREET("IS","wxiz nevwio","`g""i `ilz")
zli` i"g`
^P1STREET("IS","wxiz nevwio","`ileo dfaelepi")
ipeleafd oeli`
^P1STREET("IS","wxiz nevwio","`ixiq")
qixi`
^P1STREET("IS","wxiz nevwio","`li kdo")
odk il`
^P1STREET("IS","wxiz nevwio","`lnebi ieqs")
sqei ibenl`
^P1STREET("IS","wxiz nevwio","`pilaiu nxcki")
ikcxn uialip`
^P1STREET("IS","wxiz nevwio","`xf")
fx`
^P1STREET("IS","wxiz nevwio","`xid celvio")
oivlec dix`
^P1STREET("IS","wxiz nevwio","`ykel")
leky`
^P1STREET("IS","wxiz nevwio","`zxeb")
bexz`
^P1STREET("IS","wxiz nevwio","ao vai")
iav oa
^P1STREET("IS","wxiz nevwio","ax `ilo")
oli` xa
^P1STREET("IS","wxiz nevwio","axciv'aqwi")
iwqa'vicxa
^P1STREET("IS","wxiz nevwio","axw")
wxa
^P1STREET("IS","wxiz nevwio","belo")
oleb
^P1STREET("IS","wxiz nevwio","bexceo")
oecxeb
^P1STREET("IS","wxiz nevwio","bo drvn`ez")
ze`nvrd ob
^P1STREET("IS","wxiz nevwio","bxeywaiu")
uiawyexb
^P1STREET("IS","wxiz nevwio","caexd")
dxeac
^P1STREET("IS","wxiz nevwio","cec `lrfx")
xfrl` cec
^P1STREET("IS","wxiz nevwio","clid")
dilc
^P1STREET("IS","wxiz nevwio","co")
oc
^P1STREET("IS","wxiz nevwio","cwx")
xwc
^P1STREET("IS","wxiz nevwio","cxj rke")
ekr jxc
^P1STREET("IS","wxiz nevwio","d`expim")
mipxe`d
^P1STREET("IS","wxiz nevwio","d`ld")
dl`d
^P1STREET("IS","wxiz nevwio","d`xfim")
mifx`d
^P1STREET("IS","wxiz nevwio","dapim")
mipad
^P1STREET("IS","wxiz nevwio","dbcec draxi")
ixard cecbd
^P1STREET("IS","wxiz nevwio","ddbpd")
dpbdd
^P1STREET("IS","wxiz nevwio","dgynep`im")
mi`penygd
^P1STREET("IS","wxiz nevwio","dilcim")
miclid
^P1STREET("IS","wxiz nevwio","dim dzikeo")
oekizd mid
^P1STREET("IS","wxiz nevwio","dixco")
ocxid
^P1STREET("IS","wxiz nevwio","dnl`kd")
dk`lnd
^P1STREET("IS","wxiz nevwio","dnlj cec")
cec jlnd
^P1STREET("IS","wxiz nevwio","dnrtilim")
militrnd
^P1STREET("IS","wxiz nevwio","drxad")
daxrd
^P1STREET("IS","wxiz nevwio","dtln""g")
g"nltd
^P1STREET("IS","wxiz nevwio","dvitexo")
oxetivd
^P1STREET("IS","wxiz nevwio","dxa dxveb")
bevxd axd
^P1STREET("IS","wxiz nevwio","dxa ieqs lei")
iel sqei axd
^P1STREET("IS","wxiz nevwio","dxa refi`l")
l`ifer axd
^P1STREET("IS","wxiz nevwio","dxa teblno")
onlbet axd
^P1STREET("IS","wxiz nevwio","dxa wew")
wew axd
^P1STREET("IS","wxiz nevwio","dxwtz")
ztwxd
^P1STREET("IS","wxiz nevwio","dywcim")
micwyd
^P1STREET("IS","wxiz nevwio","dz`pd")
dp`zd
^P1STREET("IS","wxiz nevwio","exc")
cxe
^P1STREET("IS","wxiz nevwio","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","wxiz nevwio","faeleo dnx")
xnd oeleaf
^P1STREET("IS","wxiz nevwio","fiz")
zif
^P1STREET("IS","wxiz nevwio","flno yf""x")
x"fy onlf
^P1STREET("IS","wxiz nevwio","fxeaal")
laaexf
^P1STREET("IS","wxiz nevwio","gfpi nik`l")
l`kin ipfg
^P1STREET("IS","wxiz nevwio","giaz vieo")
oeiv zaig
^P1STREET("IS","wxiz nevwio","gpd qpy")
ypq dpg
^P1STREET("IS","wxiz nevwio","hxentlcex")
xecltnexh
^P1STREET("IS","wxiz nevwio","iapd")
dpai
^P1STREET("IS","wxiz nevwio","ib`l `leo")
oel` l`bi
^P1STREET("IS","wxiz nevwio","idecd dlei")
ield dcedi
^P1STREET("IS","wxiz nevwio","iectz")
ztcei
^P1STREET("IS","wxiz nevwio","iepzo pzpide")
edipzp ozpei
^P1STREET("IS","wxiz nevwio","ieqthl")
lhtqei
^P1STREET("IS","wxiz nevwio","irl")
lri
^P1STREET("IS","wxiz nevwio","ivgw ycd")
dcy wgvi
^P1STREET("IS","wxiz nevwio","iyykx")
xkyyi
^P1STREET("IS","wxiz nevwio","klpiez")
zeiplk
^P1STREET("IS","wxiz nevwio","kvplqeo")
oeqlpvk
^P1STREET("IS","wxiz nevwio","la dwxiez")
zeixwd al
^P1STREET("IS","wxiz nevwio","necirio")
oiricen
^P1STREET("IS","wxiz nevwio","nehd bex")
xeb dhen
^P1STREET("IS","wxiz nevwio","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","wxiz nevwio","nkai")
iakn
^P1STREET("IS","wxiz nevwio","npgm abio")
oiba mgpn
^P1STREET("IS","wxiz nevwio","npgm yp`exqeo")
oeqxe`py mgpn
^P1STREET("IS","wxiz nevwio","nqcd")
dcqn
^P1STREET("IS","wxiz nevwio","pae")
eap
^P1STREET("IS","wxiz nevwio","pgnid znxi")
ixnz dingp
^P1STREET("IS","wxiz nevwio","pil""i")
i"lip
^P1STREET("IS","wxiz nevwio","pxwiq")
qiwxp
^P1STREET("IS","wxiz nevwio","pzia drlid")
dilrd aizp
^P1STREET("IS","wxiz nevwio","pzia xnf")
fnx aizp
^P1STREET("IS","wxiz nevwio","pzpide")
edipzp
^P1STREET("IS","wxiz nevwio","qaieo")
oeiaq
^P1STREET("IS","wxiz nevwio","qn' blrc")
crlb 'nq
^P1STREET("IS","wxiz nevwio","qn' cwl")
lwc 'nq
^P1STREET("IS","wxiz nevwio","qn' dwxa")
axwd 'nq
^P1STREET("IS","wxiz nevwio","qn' znx")
xnz 'nq
^P1STREET("IS","wxiz nevwio","qn, `exo")
oxe` ,nq
^P1STREET("IS","wxiz nevwio","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","wxiz nevwio","qtix")
xitq
^P1STREET("IS","wxiz nevwio","rio bci")
icb oir
^P1STREET("IS","wxiz nevwio","tf")
ft
^P1STREET("IS","wxiz nevwio","v`leo")
oel`v
^P1STREET("IS","wxiz nevwio","vibl `axdm")
mdxa` lbiv
^P1STREET("IS","wxiz nevwio","wciy lef")
fel yicw
^P1STREET("IS","wxiz nevwio","wel dnayx")
xyand lew
^P1STREET("IS","wxiz nevwio","wexv'w")
w'vxew
^P1STREET("IS","wxiz nevwio","wliapea irwa")
awri aepailw
^P1STREET("IS","wxiz nevwio","wxo diqec")
ceqid oxw
^P1STREET("IS","wxiz nevwio","xan""c")
c"nax
^P1STREET("IS","wxiz nevwio","xewg")
gwex
^P1STREET("IS","wxiz nevwio","xna""m")
m"anx
^P1STREET("IS","wxiz nevwio","xp""q")
q"px
^P1STREET("IS","wxiz nevwio","xyi")
iyx
^P1STREET("IS","wxiz nevwio","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","wxiz nevwio","yail aiz""x")
x"zia liay
^P1STREET("IS","wxiz nevwio","yail d`aez")
zea`d liay
^P1STREET("IS","wxiz nevwio","yail dbto")
otbd liay
^P1STREET("IS","wxiz nevwio","yail dxineo")
oenixd liay
^P1STREET("IS","wxiz nevwio","yc ixeylim")
milyexi cy
^P1STREET("IS","wxiz nevwio","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","wxiz nevwio","yc' ddqzcxez")
zexczqdd 'cy
^P1STREET("IS","wxiz nevwio","yc' eivno")
onvie 'cy
^P1STREET("IS","wxiz nevwio","yc' exaexb")
bxeaxe 'cy
^P1STREET("IS","wxiz nevwio","yc' nyd beyo")
oyeb dyn 'cy
^P1STREET("IS","wxiz nevwio","yc' wxo wiinz")
zniiw oxw 'cy
^P1STREET("IS","wxiz nevwio","ytxipvw")
wvpixty
^P1STREET("IS","wxiz nevwio","yxz nyd")
dyn zxy
^P1STREET("IS","wxiz nevwio","zcdx")
xdcz
^P1STREET("IS","wxiz nl`ki")
ik`ln zixw
^P1STREET("IS","wxiz nl`ki","`ilz")
zli`
^P1STREET("IS","wxiz nl`ki","`ixiq")
qixi`
^P1STREET("IS","wxiz nl`ki","`li kdo")
odk il`
^P1STREET("IS","wxiz nl`ki","`xid celvio")
oivlec dix`
^P1STREET("IS","wxiz nl`ki","`xid vinewi")
iweniv dix`
^P1STREET("IS","wxiz nl`ki","`xlefexea")
aexefelx`
^P1STREET("IS","wxiz nl`ki","aiz dye`ad")
da`eyd zia
^P1STREET("IS","wxiz nl`ki","ao `dxeo")
oexd` oa
^P1STREET("IS","wxiz nl`ki","belcd n`ix")
xi`n dcleb
^P1STREET("IS","wxiz nl`ki","beyo")
oyeb
^P1STREET("IS","wxiz nl`ki","cec `lrfx")
xfrl` cec
^P1STREET("IS","wxiz nl`ki","d`eno")
one`d
^P1STREET("IS","wxiz nl`ki","da`x")
x`ad
^P1STREET("IS","wxiz nl`ki","dayex")
xeyad
^P1STREET("IS","wxiz nl`ki","dbelo")
olebd
^P1STREET("IS","wxiz nl`ki","dblil")
lilbd
^P1STREET("IS","wxiz nl`ki","dbto")
otbd
^P1STREET("IS","wxiz nl`ki","dexcim")
micxed
^P1STREET("IS","wxiz nl`ki","dfiz")
zifd
^P1STREET("IS","wxiz nl`ki","dgihd")
dhigd
^P1STREET("IS","wxiz nl`ki","dgxeyz")
zyexgd
^P1STREET("IS","wxiz nl`ki","dievx")
xveid
^P1STREET("IS","wxiz nl`ki","dievxim")
mixveid
^P1STREET("IS","wxiz nl`ki","dkxnl")
lnxkd
^P1STREET("IS","wxiz nl`ki","dn""b")
b"nd
^P1STREET("IS","wxiz nl`ki","dnl`kd")
dk`lnd
^P1STREET("IS","wxiz nl`ki","dnwed")
dewnd
^P1STREET("IS","wxiz nl`ki","dpba")
abpd
^P1STREET("IS","wxiz nl`ki","dpvia")
aivpd
^P1STREET("IS","wxiz nl`ki","dpxwiq")
qiwxpd
^P1STREET("IS","wxiz nl`ki","drlid")
dilrd
^P1STREET("IS","wxiz nl`ki","drnl")
lnrd
^P1STREET("IS","wxiz nl`ki","drnw")
wnrd
^P1STREET("IS","wxiz nl`ki","drxad")
daxrd
^P1STREET("IS","wxiz nl`ki","dtyzo")
ozytd
^P1STREET("IS","wxiz nl`ki","dvitexo")
oxetivd
^P1STREET("IS","wxiz nl`ki","dwicnd")
dnciwd
^P1STREET("IS","wxiz nl`ki","dxa giim tiphe")
ehpit miig axd
^P1STREET("IS","wxiz nl`ki","dxa irwa `ae gvix`")
`xivg ea` awri axd
^P1STREET("IS","wxiz nl`ki","dxa ivgw pqim")
miqp wgvi axd
^P1STREET("IS","wxiz nl`ki","dxna""m")
m"anxd
^P1STREET("IS","wxiz nl`ki","dxneo")
oenxd
^P1STREET("IS","wxiz nl`ki","dxvl")
lvxd
^P1STREET("IS","wxiz nl`ki","dxwtz")
ztwxd
^P1STREET("IS","wxiz nl`ki","dyenxeo")
oexneyd
^P1STREET("IS","wxiz nl`ki","dyeypim")
mipyeyd
^P1STREET("IS","wxiz nl`ki","dytld")
dltyd
^P1STREET("IS","wxiz nl`ki","dz`pd")
dp`zd
^P1STREET("IS","wxiz nl`ki","dzenx")
xnezd
^P1STREET("IS","wxiz nl`ki","excineo")
oenicxe
^P1STREET("IS","wxiz nl`ki","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","wxiz nl`ki","ga""c")
c"ag
^P1STREET("IS","wxiz nl`ki","giim dxveb")
bevxd miig
^P1STREET("IS","wxiz nl`ki","glevi dzryid")
diyrzd ivelg
^P1STREET("IS","wxiz nl`ki","glevi zryid")
diyrz ivelg
^P1STREET("IS","wxiz nl`ki","gpd qpy")
ypq dpg
^P1STREET("IS","wxiz nl`ki","ib`l `leo")
oel` l`bi
^P1STREET("IS","wxiz nl`ki","ib`l dexeaiu")
uiaexed l`bi
^P1STREET("IS","wxiz nl`ki","ib`l icio")
oici l`bi
^P1STREET("IS","wxiz nl`ki","iectz")
ztcei
^P1STREET("IS","wxiz nl`ki","iepzo pzpide")
edipzp ozpei
^P1STREET("IS","wxiz nl`ki","iqnio")
oinqi
^P1STREET("IS","wxiz nl`ki","ivgw ao vai")
iav oa wgvi
^P1STREET("IS","wxiz nl`ki","ivgw ycd")
dcy wgvi
^P1STREET("IS","wxiz nl`ki","iwezi`l `cm")
mc` l`izewi
^P1STREET("IS","wxiz nl`ki","ixco")
ocxi
^P1STREET("IS","wxiz nl`ki","kkx dapim")
mipad xkk
^P1STREET("IS","wxiz nl`ki","kkx darl ym hea")
aeh my lrad xkk
^P1STREET("IS","wxiz nl`ki","kkx dpyi`im")
mi`iypd xkk
^P1STREET("IS","wxiz nl`ki","kkx xaio")
oiax xkk
^P1STREET("IS","wxiz nl`ki","klpiz")
ziplk
^P1STREET("IS","wxiz nl`ki","kpro")
orpk
^P1STREET("IS","wxiz nl`ki","lei `ykel")
leky` iel
^P1STREET("IS","wxiz nl`ki","n`ix rfx`")
`xfr xi`n
^P1STREET("IS","wxiz nl`ki","nae` `exez")
zexe` `ean
^P1STREET("IS","wxiz nl`ki","nbice")
ecibn
^P1STREET("IS","wxiz nl`ki","nvcd")
dcvn
^P1STREET("IS","wxiz nl`ki","nxkf `exo")
oxe` fkxn
^P1STREET("IS","wxiz nl`ki","nyd ciio")
oiic dyn
^P1STREET("IS","wxiz nl`ki","nyd yxz")
zxy dyn
^P1STREET("IS","wxiz nl`ki","nyrel ddxces")
secxdd leryn
^P1STREET("IS","wxiz nl`ki","nyrel diwipheo")
oehpiwid leryn
^P1STREET("IS","wxiz nl`ki","q`o cii`be")
eb`iic o`q
^P1STREET("IS","wxiz nl`ki","qtx`")
`xtq
^P1STREET("IS","wxiz nl`ki","rfx` epgnid")
dingpe `xfr
^P1STREET("IS","wxiz nl`ki","tpgq qtix")
xitq qgpt
^P1STREET("IS","wxiz nl`ki","twx")
xwt
^P1STREET("IS","wxiz nl`ki","vd""l")
l"dv
^P1STREET("IS","wxiz nl`ki","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","wxiz nl`ki","xa `les giim lqwea")
aewql miig sel` ax
^P1STREET("IS","wxiz nl`ki","xai ylem yafi")
ifay mely iax
^P1STREET("IS","wxiz nl`ki","xawd beax")
xaeb dwax
^P1STREET("IS","wxiz nl`ki","xfi`l cec")
cec l`ifx
^P1STREET("IS","wxiz nl`ki","xi`l nlniqeo")
oeqinln l`ix
^P1STREET("IS","wxiz nl`ki","xy""i")
i"yx
^P1STREET("IS","wxiz nl`ki","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","wxiz nl`ki","yc' ax idecd")
dcedi xa 'cy
^P1STREET("IS","wxiz nl`ki","yc' deexcim")
micxeed 'cy
^P1STREET("IS","wxiz nl`ki","yc' dpyi`")
`iypd 'cy
^P1STREET("IS","wxiz nl`ki","yc' eivno")
onvie 'cy
^P1STREET("IS","wxiz nl`ki","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","wxiz nl`ki","yc' npgm abio")
oiba mgpn 'cy
^P1STREET("IS","wxiz nl`ki","yc' xy""i")
i"yx 'cy
^P1STREET("IS","wxiz nl`ki","yf""x")
x"fy
^P1STREET("IS","wxiz phtim")
mithp zixw
^P1STREET("IS","wxiz phtim","drlenim")
minelrd
^P1STREET("IS","wxiz qtx")
xtq zixw
^P1STREET("IS","wxiz qtx","`api pfx")
xfp ipa`
^P1STREET("IS","wxiz qtx","`ex dgiim")
miigd xe`
^P1STREET("IS","wxiz qtx","dnyth")
htynd
^P1STREET("IS","wxiz qtx","gtu giim")
miig utg
^P1STREET("IS","wxiz qtx","gzm qetx")
xteq mzg
^P1STREET("IS","wxiz qtx","nqilz ieqs")
sqei zliqn
^P1STREET("IS","wxiz qtx","nyj geknd")
dnkeg jyn
^P1STREET("IS","wxiz qtx","pecr aidecd")
dcedia rcep
^P1STREET("IS","wxiz qtx","yci gnc")
cng icy
^P1STREET("IS","wxiz rpaim")
miapr zixw
^P1STREET("IS","wxiz rwxeo")
oexwr zixw
^P1STREET("IS","wxiz rwxeo","`axdm yhxo")
oxhy mdxa`
^P1STREET("IS","wxiz rwxeo","`gc drm")
mrd cg`
^P1STREET("IS","wxiz rwxeo","`li kdo")
odk il`
^P1STREET("IS","wxiz rwxeo","`v""l")
l"v`
^P1STREET("IS","wxiz rwxeo","aeqi qph bexb")
bxeb hpq iqea
^P1STREET("IS","wxiz rwxeo","ax giim idecd")
dcedi miig xa
^P1STREET("IS","wxiz rwxeo","belpi")
ipleb
^P1STREET("IS","wxiz rwxeo","cxj ixeylim")
milyexi jxc
^P1STREET("IS","wxiz rwxeo","d`bef")
feb`d
^P1STREET("IS","wxiz rwxeo","d`ixeq")
qexi`d
^P1STREET("IS","wxiz rwxeo","d`leo")
oel`d
^P1STREET("IS","wxiz rwxeo","dapim")
mipad
^P1STREET("IS","wxiz rwxeo","dbeyxim")
mixyebd
^P1STREET("IS","wxiz rwxeo","dcwl")
lwcd
^P1STREET("IS","wxiz rwxeo","ddcq")
qcdd
^P1STREET("IS","wxiz rwxeo","dfiz")
zifd
^P1STREET("IS","wxiz rwxeo","dgxea")
aexgd
^P1STREET("IS","wxiz rwxeo","didlem")
meldid
^P1STREET("IS","wxiz rwxeo","dlaepd")
dpeald
^P1STREET("IS","wxiz rwxeo","dlehm")
mheld
^P1STREET("IS","wxiz rwxeo","dpexiz")
zixepd
^P1STREET("IS","wxiz rwxeo","dpxwiq")
qiwxpd
^P1STREET("IS","wxiz rwxeo","dqaiepim")
mipeiaqd
^P1STREET("IS","wxiz rwxeo","dretxim")
mixterd
^P1STREET("IS","wxiz rwxeo","dxa cec")
cec axd
^P1STREET("IS","wxiz rwxeo","dxa ncri")
ircn axd
^P1STREET("IS","wxiz rwxeo","dxa nineo")
oenin axd
^P1STREET("IS","wxiz rwxeo","dxvl")
lvxd
^P1STREET("IS","wxiz rwxeo","dyigpiz")
zipgiyd
^P1STREET("IS","wxiz rwxeo","dywc")
cwyd
^P1STREET("IS","wxiz rwxeo","dz`pd")
dp`zd
^P1STREET("IS","wxiz rwxeo","dznx")
xnzd
^P1STREET("IS","wxiz rwxeo","eivno")
onvie
^P1STREET("IS","wxiz rwxeo","exaexb")
bxeaxe
^P1STREET("IS","wxiz rwxeo","gavlz")
zlvag
^P1STREET("IS","wxiz rwxeo","glli vd""l")
l"dv illg
^P1STREET("IS","wxiz rwxeo","i`ix yhxo")
oxhy xi`i
^P1STREET("IS","wxiz rwxeo","ivgw dlei")
ield wgvi
^P1STREET("IS","wxiz rwxeo","ivgw xaio")
oiax wgvi
^P1STREET("IS","wxiz rwxeo","keayi dgxneo")
oenxgd iyaek
^P1STREET("IS","wxiz rwxeo","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","wxiz rwxeo","nxac dwqnim")
minqwd caxn
^P1STREET("IS","wxiz rwxeo","nyd yxz")
zxy dyn
^P1STREET("IS","wxiz rwxeo","peed `ykel")
leky` deep
^P1STREET("IS","wxiz rwxeo","qeiqd cec")
cec dqieq
^P1STREET("IS","wxiz rwxeo","rnigi")
iginr
^P1STREET("IS","wxiz rwxeo","rtxepi")
ipextr
^P1STREET("IS","wxiz rwxeo","vcew dlei")
ield wecv
^P1STREET("IS","wxiz rwxeo","wdilz `edie")
eide` zlidw
^P1STREET("IS","wxiz rwxeo","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","wxiz rwxeo","wxo diqec")
ceqid oxw
^P1STREET("IS","wxiz rwxeo","xai n`ix")
xi`n iax
^P1STREET("IS","wxiz rwxeo","xg' 1")
1 'gx
^P1STREET("IS","wxiz rwxeo","xg' 14")
14 'gx
^P1STREET("IS","wxiz rwxeo","xg' 15")
15 'gx
^P1STREET("IS","wxiz rwxeo","xg' 16")
16 'gx
^P1STREET("IS","wxiz rwxeo","xna""m")
m"anx
^P1STREET("IS","wxiz rwxeo","yafi")
ifay
^P1STREET("IS","wxiz rwxeo","yc' dnlj gqo")
oqg jlnd 'cy
^P1STREET("IS","wxiz rwxeo","yc' ivgw xaio")
oiax wgvi 'cy
^P1STREET("IS","wxiz rwxeo","ygs")
sgy
^P1STREET("IS","wxiz rwxeo","yiaz vieo")
oeiv zaiy
^P1STREET("IS","wxiz rwxeo","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","wxiz ycd dzretd")
dterzd dcy zixw
^P1STREET("IS","wxiz ycd dzretd","belo")
oleb
^P1STREET("IS","wxiz ycd dzretd","blaer")
realb
^P1STREET("IS","wxiz ycd dzretd","blil")
lilb
^P1STREET("IS","wxiz ycd dzretd","dixco")
ocxid
^P1STREET("IS","wxiz ycd dzretd","gxneo")
oenxg
^P1STREET("IS","wxiz ycd dzretd","kpxz")
zxpk
^P1STREET("IS","wxiz ycd dzretd","kxnl")
lnxk
^P1STREET("IS","wxiz ycd dzretd","pba")
abp
^P1STREET("IS","wxiz ycd dzretd","rxad")
daxr
^P1STREET("IS","wxiz ycd dzretd","yxeo")
oexy
^P1STREET("IS","wxiz ycd dzretd","zaex")
xeaz
^P1STREET("IS","wxiz ylnd")
dnly zixw
^P1STREET("IS","wxiz ynepd")
dpeny zixw
^P1STREET("IS","wxiz ynepd","`exi `ilo")
oli` ixe`
^P1STREET("IS","wxiz ynepd","`g""i `ilz")
zli` i"g`
^P1STREET("IS","wxiz ynepd","`gc drm")
mrd cg`
^P1STREET("IS","wxiz ynepd","`ixeq")
qexi`
^P1STREET("IS","wxiz ynepd","`ixiz")
zixi`
^P1STREET("IS","wxiz ynepd","`lirfx txi")
ixt xfril`
^P1STREET("IS","wxiz ynepd","`npeo")
oepn`
^P1STREET("IS","wxiz ynepd","`xlefexea")
aexefelx`
^P1STREET("IS","wxiz ynepd","`xpeo")
oepx`
^P1STREET("IS","wxiz ynepd","`yhxem")
mexhy`
^P1STREET("IS","wxiz ynepd","`ykel")
leky`
^P1STREET("IS","wxiz ynepd","a`a` q`li")
il`q `a`a
^P1STREET("IS","wxiz ynepd","ai`liw")
wil`ia
^P1STREET("IS","wxiz ynepd","ail""e")
e"lia
^P1STREET("IS","wxiz ynepd","ao idecd")
dcedi oa
^P1STREET("IS","wxiz ynepd","apd aizj")
jzia dpa
^P1STREET("IS","wxiz ynepd","axfili")
ilifxa
^P1STREET("IS","wxiz ynepd","axl")
lxa
^P1STREET("IS","wxiz ynepd","axl kvplqeo")
oeqlpvk lxa
^P1STREET("IS","wxiz ynepd","axpx")
xpxa
^P1STREET("IS","wxiz ynepd","cec qlipbx")
xbpilq cec
^P1STREET("IS","wxiz ynepd","cec ynrepi")
iperny cec
^P1STREET("IS","wxiz ynepd","co")
oc
^P1STREET("IS","wxiz ynepd","co ciio")
oiic oc
^P1STREET("IS","wxiz ynepd","dapim")
mipad
^P1STREET("IS","wxiz ynepd","dbiaex")
xeaibd
^P1STREET("IS","wxiz ynepd","dblil")
lilbd
^P1STREET("IS","wxiz ynepd","dblrc")
crlbd
^P1STREET("IS","wxiz ynepd","ddbpd")
dpbdd
^P1STREET("IS","wxiz ynepd","ddqzcxez")
zexczqdd
^P1STREET("IS","wxiz ynepd","deexcim")
micxeed
^P1STREET("IS","wxiz ynepd","dgeld")
dlegd
^P1STREET("IS","wxiz ynepd","dixco")
ocxid
^P1STREET("IS","wxiz ynepd","dlapeo")
oepald
^P1STREET("IS","wxiz ynepd","dngxefz")
zfexgnd
^P1STREET("IS","wxiz ynepd","dngzxz")
zxzgnd
^P1STREET("IS","wxiz ynepd","dnkaim")
miaknd
^P1STREET("IS","wxiz ynepd","dpai`im")
mi`iapd
^P1STREET("IS","wxiz ynepd","dpba")
abpd
^P1STREET("IS","wxiz ynepd","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","wxiz ynepd","dpyi`")
`iypd
^P1STREET("IS","wxiz ynepd","dx `aihl")
lhia` xd
^P1STREET("IS","wxiz ynepd","dx dvetim")
mitevd xd
^P1STREET("IS","wxiz ynepd","dx ptzli")
ilztp xd
^P1STREET("IS","wxiz ynepd","dx`l")
l`xd
^P1STREET("IS","wxiz ynepd","dxa dxveb")
bevxd axd
^P1STREET("IS","wxiz ynepd","dxa nny ieqs")
sqei ynn axd
^P1STREET("IS","wxiz ynepd","dxa nyy ieqs")
sqei yyn axd
^P1STREET("IS","wxiz ynepd","dxa wew")
wew axd
^P1STREET("IS","wxiz ynepd","dxvl")
lvxd
^P1STREET("IS","wxiz ynepd","dyethim")
mihteyd
^P1STREET("IS","wxiz ynepd","dzryid")
diyrzd
^P1STREET("IS","wxiz ynepd","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","wxiz ynepd","flipbx")
xbpilf
^P1STREET("IS","wxiz ynepd","gavlz")
zlvag
^P1STREET("IS","wxiz ynepd","gend enbcl")
lcbne dneg
^P1STREET("IS","wxiz ynepd","gpd qpy")
ypq dpg
^P1STREET("IS","wxiz ynepd","gva")
avg
^P1STREET("IS","wxiz ynepd","gxviz")
zivxg
^P1STREET("IS","wxiz ynepd","hxentlcex")
xecltnexh
^P1STREET("IS","wxiz ynepd","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","wxiz ynepd","ibx ieqs")
sqei xbi
^P1STREET("IS","wxiz ynepd","idecd dlei")
ield dcedi
^P1STREET("IS","wxiz ynepd","iqnio")
oinqi
^P1STREET("IS","wxiz ynepd","irwa nlel")
leln awri
^P1STREET("IS","wxiz ynepd","itd pes")
sep dti
^P1STREET("IS","wxiz ynepd","ivgw ycd")
dcy wgvi
^P1STREET("IS","wxiz ynepd","iwezi`l `cm")
mc` l`izewi
^P1STREET("IS","wxiz ynepd","ixweo")
oewxi
^P1STREET("IS","wxiz ynepd","kkx vd""l")
l"dv xkk
^P1STREET("IS","wxiz ynepd","klpiz")
ziplk
^P1STREET("IS","wxiz ynepd","la drix")
xird al
^P1STREET("IS","wxiz ynepd","nae` `nepd")
dpen` `ean
^P1STREET("IS","wxiz ynepd","nae` `npd")
dpn` `ean
^P1STREET("IS","wxiz ynepd","nicr")
rcin
^P1STREET("IS","wxiz ynepd","nraxd ykeo e")
e oeky dxarn
^P1STREET("IS","wxiz ynepd","nynx dbael")
leabd xnyn
^P1STREET("IS","wxiz ynepd","p`ez dblil")
lilbd ze`p
^P1STREET("IS","wxiz ynepd","pes gxneo")
oenxg sep
^P1STREET("IS","wxiz ynepd","pexiz")
zixep
^P1STREET("IS","wxiz ynepd","pixiz")
zixip
^P1STREET("IS","wxiz ynepd","pxwiq")
qiwxp
^P1STREET("IS","wxiz ynepd","qaieo")
oeiaq
^P1STREET("IS","wxiz ynepd","qipi")
ipiq
^P1STREET("IS","wxiz ynepd","qlnpeaiu")
uiaepnlq
^P1STREET("IS","wxiz ynepd","qnhz dnl`kd")
dk`lnd zhnq
^P1STREET("IS","wxiz ynepd","qnhz dnlkim")
miklnd zhnq
^P1STREET("IS","wxiz ynepd","qnhz dpehx")
xhepd zhnq
^P1STREET("IS","wxiz ynepd","qnhz dvewim")
miwevd zhnq
^P1STREET("IS","wxiz ynepd","reli dbxcem")
mecxbd iler
^P1STREET("IS","wxiz ynepd","rio fda")
adf oir
^P1STREET("IS","wxiz ynepd","rliiz dperx")
xrepd ziilr
^P1STREET("IS","wxiz ynepd","rwia`")
`aiwr
^P1STREET("IS","wxiz ynepd","vnxz dblil")
lilbd zxnv
^P1STREET("IS","wxiz ynepd","wxo diqec")
ceqid oxw
^P1STREET("IS","wxiz ynepd","x`y dpgy")
ygpd y`x
^P1STREET("IS","wxiz ynepd","xfi`l cec")
cec l`ifx
^P1STREET("IS","wxiz ynepd","xna""m")
m"anx
^P1STREET("IS","wxiz ynepd","xpd wehi")
ihew dpx
^P1STREET("IS","wxiz ynepd","xqwe")
ewqx
^P1STREET("IS","wxiz ynepd","xy""i")
i"yx
^P1STREET("IS","wxiz ynepd","y""i rbpeo")
oepbr i"y
^P1STREET("IS","wxiz ynepd","yail d`aez")
zea`d liay
^P1STREET("IS","wxiz ynepd","yc' d`v""l")
l"v`d 'cy
^P1STREET("IS","wxiz ynepd","yc' npgm abio")
oiba mgpn 'cy
^P1STREET("IS","wxiz ynepd","yc' zl gi")
ig lz 'cy
^P1STREET("IS","wxiz ynepd","yew dcekpim")
mipkecd wey
^P1STREET("IS","wxiz ynepd","yne`l `egpd")
dpge` l`eny
^P1STREET("IS","wxiz ynepd","ytxipvw")
wvpixty
^P1STREET("IS","wxiz ynepd","yyeo rfx`")
`xfr oeyy
^P1STREET("IS","wxiz ynepd","yyz dinim")
minid zyy
^P1STREET("IS","wxiz ynepd","zl gi")
ig lz
^P1STREET("IS","wxpi yenxeo")
oexney ipxw
^P1STREET("IS","wxpi yenxeo","`liyia")
aiyil`
^P1STREET("IS","wxpi yenxeo","d`leo")
oel`d
^P1STREET("IS","wxpi yenxeo","d`nepd")
dpen`d
^P1STREET("IS","wxpi yenxeo","d`v""l")
l"v`d
^P1STREET("IS","wxpi yenxeo","d`xf")
fx`d
^P1STREET("IS","wxpi yenxeo","daxey")
yexad
^P1STREET("IS","wxpi yenxeo","dbaexd")
dxeabd
^P1STREET("IS","wxpi yenxeo","dbto")
otbd
^P1STREET("IS","wxpi yenxeo","ddzpglez")
zelgpzdd
^P1STREET("IS","wxpi yenxeo","dfkez")
zekfd
^P1STREET("IS","wxpi yenxeo","dglilim")
mililgd
^P1STREET("IS","wxpi yenxeo","dlegnim")
mingeld
^P1STREET("IS","wxpi yenxeo","dniiqcim")
micqiind
^P1STREET("IS","wxpi yenxeo","dpgl")
lgpd
^P1STREET("IS","wxpi yenxeo","drxad")
daxrd
^P1STREET("IS","wxpi yenxeo","dtrneo")
oenrtd
^P1STREET("IS","wxpi yenxeo","dvlvlim")
milvlvd
^P1STREET("IS","wxpi yenxeo","dwenniez")
zeinnewd
^P1STREET("IS","wxpi yenxeo","dx`yepim")
mipey`xd
^P1STREET("IS","wxpi yenxeo","dxineo")
oenixd
^P1STREET("IS","wxpi yenxeo","dywnd")
dnwyd
^P1STREET("IS","wxpi yenxeo","dznx")
xnzd
^P1STREET("IS","wxpi yenxeo","dzwed")
dewzd
^P1STREET("IS","wxpi yenxeo","gend enbcl")
lcbne dneg
^P1STREET("IS","wxpi yenxeo","kli yix")
xiy ilk
^P1STREET("IS","wxpi yenxeo","nrlez wceyim")
miyecw zelrn
^P1STREET("IS","wxpi yenxeo","nyrel ddxces")
secxdd leryn
^P1STREET("IS","wxpi yenxeo","nyrel dexcim")
micxed leryn
^P1STREET("IS","wxpi yenxeo","nyrel dgavlz")
zlvagd leryn
^P1STREET("IS","wxpi yenxeo","nyrel dgva")
avgd leryn
^P1STREET("IS","wxpi yenxeo","nyrel diqnio")
oinqid leryn
^P1STREET("IS","wxpi yenxeo","nyrel dklpiz")
ziplkd leryn
^P1STREET("IS","wxpi yenxeo","nyrel dpxwiq")
qiwxpd leryn
^P1STREET("IS","wxpi yenxeo","nyrel dvarepi")
iperavd leryn
^P1STREET("IS","wxpi yenxeo","nyrel dxwtz")
ztwxd leryn
^P1STREET("IS","wxpi yenxeo","ped rlifd")
dfilr dep
^P1STREET("IS","wxpi yenxeo","pivpim")
mipvip
^P1STREET("IS","wxpi yenxeo","qnhz dglevim")
mivelgd zhnq
^P1STREET("IS","wxpi yenxeo","qnhz dkpexez")
zexepkd zhnq
^P1STREET("IS","wxpi yenxeo","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","wxpi yenxeo","wpiio d`xu")
ux`d oiipw
^P1STREET("IS","wxpi yenxeo","yc' xgarm f`ai")
ia`f mragx 'cy
^P1STREET("IS","x`ad")
da`x
^P1STREET("IS","x`nd")
dn`x
^P1STREET("IS","x`nd","xg' 1")
1 'gx
^P1STREET("IS","x`nd","xg' 12")
12 'gx
^P1STREET("IS","x`nd","xg' 13")
13 'gx
^P1STREET("IS","x`nd","xg' 14")
14 'gx
^P1STREET("IS","x`nd","xg' 17")
17 'gx
^P1STREET("IS","x`nd","xg' 2")
2 'gx
^P1STREET("IS","x`nd","xg' 20")
20 'gx
^P1STREET("IS","x`nd","xg' 26")
26 'gx
^P1STREET("IS","x`nd","xg' 27")
27 'gx
^P1STREET("IS","x`nd","xg' 4")
4 'gx
^P1STREET("IS","x`nd","xg' 40")
40 'gx
^P1STREET("IS","x`nd","xg' 43")
43 'gx
^P1STREET("IS","x`nd","xg' 49")
49 'gx
^P1STREET("IS","x`nd","xg' 5")
5 'gx
^P1STREET("IS","x`nd","xg' 50")
50 'gx
^P1STREET("IS","x`nd","xg' 51")
51 'gx
^P1STREET("IS","x`nd","xg' 7")
7 'gx
^P1STREET("IS","x`nio")
oin`x
^P1STREET("IS","x`y drio")
oird y`x
^P1STREET("IS","x`y drio","`aiaim")
miaia`
^P1STREET("IS","x`y drio","`aihl")
lhia`
^P1STREET("IS","x`y drio","`ao baixel")
lexiab oa`
^P1STREET("IS","x`y drio","`ao rfx`")
`xfr oa`
^P1STREET("IS","x`y drio","`api`li")
il`ipa`
^P1STREET("IS","x`y drio","`bef")
feb`
^P1STREET("IS","x`y drio","`bq")
qb`
^P1STREET("IS","x`y drio","`cix")
xic`
^P1STREET("IS","x`y drio","`cnepiz")
zipenc`
^P1STREET("IS","x`y drio","`dli wicx")
xciw ild`
^P1STREET("IS","x`y drio","`eb")
be`
^P1STREET("IS","x`y drio","`ecm")
mce`
^P1STREET("IS","x`y drio","`exo")
oxe`
^P1STREET("IS","x`y drio","`geed")
deeg`
^P1STREET("IS","x`y drio","`iid")
dii`
^P1STREET("IS","x`y drio","`iileo")
oelii`
^P1STREET("IS","x`y drio","`ilez")
zeli`
^P1STREET("IS","x`y drio","`ixeq")
qexi`
^P1STREET("IS","x`y drio","`ld")
dl`
^P1STREET("IS","x`y drio","`leo")
oel`
^P1STREET("IS","x`y drio","`lneb")
benl`
^P1STREET("IS","x`y drio","`npeo eznx")
xnze oepn`
^P1STREET("IS","x`y drio","`ptd")
dtp`
^P1STREET("IS","x`y drio","`tw")
wt`
^P1STREET("IS","x`y drio","`v""l")
l"v`
^P1STREET("IS","x`y drio","`xal")
lax`
^P1STREET("IS","x`y drio","`xu iyx`l dylnd")
dnlyd l`xyi ux`
^P1STREET("IS","x`y drio","`ykeliz")
zileky`
^P1STREET("IS","x`y drio","`yl")
ly`
^P1STREET("IS","x`y drio","`zxeb")
bexz`
^P1STREET("IS","x`y drio","aflz")
zlfa
^P1STREET("IS","x`y drio","afw")
wfa
^P1STREET("IS","x`y drio","arl nl`kd")
dk`ln lra
^P1STREET("IS","x`y drio","arl nnlkz ylnd")
dnly zklnn lra
^P1STREET("IS","x`y drio","axaex")
xeaxa
^P1STREET("IS","x`y drio","axey")
yexa
^P1STREET("IS","x`y drio","axw")
wxa
^P1STREET("IS","x`y drio","axwo")
owxa
^P1STREET("IS","x`y drio","axwz")
zwxa
^P1STREET("IS","x`y drio","ayo")
oya
^P1STREET("IS","x`y drio","b'eo wpci")
icpw oe'b
^P1STREET("IS","x`y drio","barzi")
izrab
^P1STREET("IS","x`y drio","bazeo")
oezab
^P1STREET("IS","x`y drio","bcxeo")
oexcb
^P1STREET("IS","x`y drio","bfiz")
zifb
^P1STREET("IS","x`y drio","biaexi iyx`l")
l`xyi ixeaib
^P1STREET("IS","x`y drio","bleqw`")
`wqelb
^P1STREET("IS","x`y drio","blrc")
crlb
^P1STREET("IS","x`y drio","bto")
otb
^P1STREET("IS","x`y drio","bxnd nik`l")
l`kin dnxb
^P1STREET("IS","x`y drio","bxpih")
hipxb
^P1STREET("IS","x`y drio","c`dxi")
ixd`c
^P1STREET("IS","x`y drio","ca bxepx")
xpexb ac
^P1STREET("IS","x`y drio","cekitz")
ztikec
^P1STREET("IS","x`y drio","ciid")
diic
^P1STREET("IS","x`y drio","cliez")
zeilc
^P1STREET("IS","x`y drio","cm dnkaim")
miaknd mc
^P1STREET("IS","x`y drio","co")
oc
^P1STREET("IS","x`y drio","ctpd")
dptc
^P1STREET("IS","x`y drio","cwx")
xwc
^P1STREET("IS","x`y drio","cxbez")
zebxc
^P1STREET("IS","x`y drio","cxj dviepez")
zepeivd jxc
^P1STREET("IS","x`y drio","cxj npgm abio")
oiba mgpn jxc
^P1STREET("IS","x`y drio","d' a`iix")
xii`a 'd
^P1STREET("IS","x`y drio","d`ilpez")
zepli`d
^P1STREET("IS","x`y drio","dapim")
mipad
^P1STREET("IS","x`y drio","dawrd")
drwad
^P1STREET("IS","x`y drio","dayex")
xeyad
^P1STREET("IS","x`y drio","db`eld")
dle`bd
^P1STREET("IS","x`y drio","dblil")
lilbd
^P1STREET("IS","x`y drio","dbx""`")
`"xbd
^P1STREET("IS","x`y drio","dbyx")
xybd
^P1STREET("IS","x`y drio","dcec`im")
mi`cecd
^P1STREET("IS","x`y drio","dcq")
qcd
^P1STREET("IS","x`y drio","dcxex")
xexcd
^P1STREET("IS","x`y drio","dgleu")
uelgd
^P1STREET("IS","x`y drio","dglil")
lilgd
^P1STREET("IS","x`y drio","dgniyd")
dyingd
^P1STREET("IS","x`y drio","dhiiq")
qiihd
^P1STREET("IS","x`y drio","divixd")
dxivid
^P1STREET("IS","x`y drio","dixweo")
oewxid
^P1STREET("IS","x`y drio","dlaepd")
dpeald
^P1STREET("IS","x`y drio","dlg""i")
i"gld
^P1STREET("IS","x`y drio","dneail")
liaend
^P1STREET("IS","x`y drio","dniilcz")
zcliind
^P1STREET("IS","x`y drio","dnkzy")
yzknd
^P1STREET("IS","x`y drio","dnl`kd")
dk`lnd
^P1STREET("IS","x`y drio","dnlj cec")
cec jlnd
^P1STREET("IS","x`y drio","dnqild")
dliqnd
^P1STREET("IS","x`y drio","dnrtil")
litrnd
^P1STREET("IS","x`y drio","dnvtd")
dtvnd
^P1STREET("IS","x`y drio","dnxu")
uxnd
^P1STREET("IS","x`y drio","dnznic")
cinznd
^P1STREET("IS","x`y drio","dpai`im")
mi`iapd
^P1STREET("IS","x`y drio","dqetx")
xteqd
^P1STREET("IS","x`y drio","dqlr")
rlqd
^P1STREET("IS","x`y drio","draecd")
dceard
^P1STREET("IS","x`y drio","drlid")
dilrd
^P1STREET("IS","x`y drio","drvn`ez")
ze`nvrd
^P1STREET("IS","x`y drio","dtrneo")
oenrtd
^P1STREET("IS","x`y drio","dtxgim")
migxtd
^P1STREET("IS","x`y drio","dvpgpim")
mipgpvd
^P1STREET("IS","x`y drio","dwdild")
dlidwd
^P1STREET("IS","x`y drio","dwhx")
xhwd
^P1STREET("IS","x`y drio","dwyz")
zywd
^P1STREET("IS","x`y drio","dx dnex")
xend xd
^P1STREET("IS","x`y drio","dxa ivdxi vcew")
wecv ixdvi axd
^P1STREET("IS","x`y drio","dxa kls")
slk axd
^P1STREET("IS","x`y drio","dxa piqim b`eo")
oe`b miqip axd
^P1STREET("IS","x`y drio","dxa ylem yafi")
ifay mely axd
^P1STREET("IS","x`y drio","dxkaz")
zakxd
^P1STREET("IS","x`y drio","dxvl")
lvxd
^P1STREET("IS","x`y drio","dxy""y")
y"yxd
^P1STREET("IS","x`y drio","dytld")
dltyd
^P1STREET("IS","x`y drio","dyxeo")
oexyd
^P1STREET("IS","x`y drio","dyxieo")
oeixyd
^P1STREET("IS","x`y drio","dzeyid")
diyezd
^P1STREET("IS","x`y drio","dzp`im")
mi`pzd
^P1STREET("IS","x`y drio","dzryid")
diyrzd
^P1STREET("IS","x`y drio","dzteg")
getzd
^P1STREET("IS","x`y drio","dzwed")
dewzd
^P1STREET("IS","x`y drio","eeltqeo")
oeqtlee
^P1STREET("IS","x`y drio","eivno")
onvie
^P1STREET("IS","x`y drio","exc")
cxe
^P1STREET("IS","x`y drio","exciz")
zicxe
^P1STREET("IS","x`y drio","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","x`y drio","fdx")
xdf
^P1STREET("IS","x`y drio","fie")
eif
^P1STREET("IS","x`y drio","fiz")
zif
^P1STREET("IS","x`y drio","flno yf""x")
x"fy onlf
^P1STREET("IS","x`y drio","flno ypi`ex")
xe`ipy onlf
^P1STREET("IS","x`y drio","fnix")
xinf
^P1STREET("IS","x`y drio","fxfix")
xifxf
^P1STREET("IS","x`y drio","fxriz")
zirxf
^P1STREET("IS","x`y drio","gavlz")
zlvag
^P1STREET("IS","x`y drio","gb'ai cec")
cec ia'bg
^P1STREET("IS","x`y drio","gebld")
dlbeg
^P1STREET("IS","x`y drio","gegiz")
zigeg
^P1STREET("IS","x`y drio","getiz")
ziteg
^P1STREET("IS","x`y drio","gezni dnbild")
dlibnd inzeg
^P1STREET("IS","x`y drio","gfeo `iy")
yi` oefg
^P1STREET("IS","x`y drio","glniy")
yinlg
^P1STREET("IS","x`y drio","gqicd")
dciqg
^P1STREET("IS","x`y drio","gtu giim")
miig utg
^P1STREET("IS","x`y drio","gva")
avg
^P1STREET("IS","x`y drio","gxea")
aexg
^P1STREET("IS","x`y drio","gxneo")
oenxg
^P1STREET("IS","x`y drio","gxqiz")
ziqxg
^P1STREET("IS","x`y drio","gxviz")
zivxg
^P1STREET("IS","x`y drio","gynep`im")
mi`penyg
^P1STREET("IS","x`y drio","gzekd iexm")
mxei dkezg
^P1STREET("IS","x`y drio","hllim")
millh
^P1STREET("IS","x`y drio","iap`li")
il`pai
^P1STREET("IS","x`y drio","id""l")
l"di
^P1STREET("IS","x`y drio","idecd")
dcedi
^P1STREET("IS","x`y drio","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","x`y drio","ideyer ao peo")
oep oa reyedi
^P1STREET("IS","x`y drio","idlem")
meldi
^P1STREET("IS","x`y drio","iepd")
dpei
^P1STREET("IS","x`y drio","igi` `aiyi")
iyia` `igi
^P1STREET("IS","x`y drio","iqnio")
oinqi
^P1STREET("IS","x`y drio","iqrex")
xerqi
^P1STREET("IS","x`y drio","irxd")
dxri
^P1STREET("IS","x`y drio","ivgw dlei")
ield wgvi
^P1STREET("IS","x`y drio","iwipheo")
oehpiwi
^P1STREET("IS","x`y drio","ixbfi")
ifbxi
^P1STREET("IS","x`y drio","ixco")
ocxi
^P1STREET("IS","x`y drio","ixeylim dylnd")
dnlyd milyexi
^P1STREET("IS","x`y drio","ixirez ylnd")
dnly zerixi
^P1STREET("IS","x`y drio","ixnej")
jenxi
^P1STREET("IS","x`y drio","kipex")
xepik
^P1STREET("IS","x`y drio","kkx eivno")
onvie xkk
^P1STREET("IS","x`y drio","klpiz")
ziplk
^P1STREET("IS","x`y drio","kpti pyxim")
mixyp itpk
^P1STREET("IS","x`y drio","ktix")
xitk
^P1STREET("IS","x`y drio","kxkem")
mekxk
^P1STREET("IS","x`y drio","kxnl")
lnxk
^P1STREET("IS","x`y drio","lai`")
`ial
^P1STREET("IS","x`y drio","lilj")
jlil
^P1STREET("IS","x`y drio","lineo")
oenil
^P1STREET("IS","x`y drio","lkiy")
yikl
^P1STREET("IS","x`y drio","navr cpi")
ipc rvan
^P1STREET("IS","x`y drio","navr dx`l")
l`xd rvan
^P1STREET("IS","x`y drio","navr gixm")
mxig rvan
^P1STREET("IS","x`y drio","navr pgyeo")
oeygp rvan
^P1STREET("IS","x`y drio","nbcim")
micbn
^P1STREET("IS","x`y drio","nbcl cec")
cec lcbn
^P1STREET("IS","x`y drio","nbice")
ecibn
^P1STREET("IS","x`y drio","ndxi""u")
u"ixdn
^P1STREET("IS","x`y drio","ndxiw""`")
`"wixdn
^P1STREET("IS","x`y drio","necirio")
oiricen
^P1STREET("IS","x`y drio","nedliax")
xailden
^P1STREET("IS","x`y drio","nexo")
oxen
^P1STREET("IS","x`y drio","ngpd `")
` dpgn
^P1STREET("IS","x`y drio","ngpd ` qekpe")
epkeq ` dpgn
^P1STREET("IS","x`y drio","ngpd a")
a dpgn
^P1STREET("IS","x`y drio","ngpd b")
b dpgn
^P1STREET("IS","x`y drio","nixeo")
oexin
^P1STREET("IS","x`y drio","niyx")
xyin
^P1STREET("IS","x`y drio","nizx")
xzin
^P1STREET("IS","x`y drio","nl`ki ieqs")
sqei ik`ln
^P1STREET("IS","x`y drio","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","x`y drio","nnlkz ylnd")
dnly zklnn
^P1STREET("IS","x`y drio","npex")
xepn
^P1STREET("IS","x`y drio","npvexd")
dxevpn
^P1STREET("IS","x`y drio","nrecd ylnd")
dnly dcern
^P1STREET("IS","x`y drio","nrld `ygx")
xgy` dlrn
^P1STREET("IS","x`y drio","nvcd")
dcvn
^P1STREET("IS","x`y drio","nxac dwqnim")
minqwd caxn
^P1STREET("IS","x`y drio","nxbpiz")
zipbxn
^P1STREET("IS","x`y drio","nyd ciio")
oiic dyn
^P1STREET("IS","x`y drio","pba")
abp
^P1STREET("IS","x`y drio","pgl rixeo")
oexir lgp
^P1STREET("IS","x`y drio","pgl rxebez")
zebexr lgp
^P1STREET("IS","x`y drio","pgl wiyeo")
oeyiw lgp
^P1STREET("IS","x`y drio","pgli`li")
il`ilgp
^P1STREET("IS","x`y drio","prno")
onrp
^P1STREET("IS","x`y drio","pwx")
xwp
^P1STREET("IS","x`y drio","pyx")
xyp
^P1STREET("IS","x`y drio","pzo y`el")
le`y ozp
^P1STREET("IS","x`y drio","qaieo")
oeiaq
^P1STREET("IS","x`y drio","qibliz")
zilbiq
^P1STREET("IS","x`y drio","qipi")
ipiq
^P1STREET("IS","x`y drio","qlriz")
zirlq
^P1STREET("IS","x`y drio","qncx")
xcnq
^P1STREET("IS","x`y drio","qpdcxio")
oixcdpq
^P1STREET("IS","x`y drio","qpepiz")
zipepq
^P1STREET("IS","x`y drio","qrcid db`eo")
oe`bd dicrq
^P1STREET("IS","x`y drio","qrx")
xrq
^P1STREET("IS","x`y drio","qtix")
xitq
^P1STREET("IS","x`y drio","qzepiz")
zipezq
^P1STREET("IS","x`y drio","qzz")
zzq
^P1STREET("IS","x`y drio","rbex")
xebr
^P1STREET("IS","x`y drio","rcelm")
mlecr
^P1STREET("IS","x`y drio","reacd")
dcaer
^P1STREET("IS","x`y drio","reba")
aber
^P1STREET("IS","x`y drio","recc")
ccer
^P1STREET("IS","x`y drio","retxd")
dxter
^P1STREET("IS","x`y drio","rexa")
axer
^P1STREET("IS","x`y drio","rio bci")
icb oir
^P1STREET("IS","x`y drio","ripax")
xapir
^P1STREET("IS","x`y drio","rixiz")
zixir
^P1STREET("IS","x`y drio","rlifd abio")
oiba dfilr
^P1STREET("IS","x`y drio","rliiz dperx")
xrepd ziilr
^P1STREET("IS","x`y drio","rneqi npgm")
mgpn iqenr
^P1STREET("IS","x`y drio","rnl")
lnr
^P1STREET("IS","x`y drio","rnxpi `axdm")
mdxa` ipxnr
^P1STREET("IS","x`y drio","rtxepi")
ipextr
^P1STREET("IS","x`y drio","rxad")
daxr
^P1STREET("IS","x`y drio","rxebez")
zebexr
^P1STREET("IS","x`y drio","t`xo")
ox`t
^P1STREET("IS","x`y drio","telb")
blet
^P1STREET("IS","x`y drio","tlg dlineo")
oenild glt
^P1STREET("IS","x`y drio","v`leo")
oel`v
^P1STREET("IS","x`y drio","varepi")
iperav
^P1STREET("IS","x`y drio","vcw")
wcv
^P1STREET("IS","x`y drio","vd""l")
l"dv
^P1STREET("IS","x`y drio","vetiz")
zitev
^P1STREET("IS","x`y drio","vex")
xev
^P1STREET("IS","x`y drio","vlil")
lilv
^P1STREET("IS","x`y drio","wenniez")
zeinnew
^P1STREET("IS","x`y drio","wxo")
oxw
^P1STREET("IS","x`y drio","wzxeq")
qexzw
^P1STREET("IS","x`y drio","xai idecd dlei")
ield dcedi iax
^P1STREET("IS","x`y drio","xai igi` `aiu")
uia` `igi iax
^P1STREET("IS","x`y drio","xai rwia`")
`aiwr iax
^P1STREET("IS","x`y drio","xaiaim")
miaiax
^P1STREET("IS","x`y drio","xigo")
ogix
^P1STREET("IS","x`y drio","xineo")
oenix
^P1STREET("IS","x`y drio","xna""m")
m"anx
^P1STREET("IS","x`y drio","xnz dbelo")
olebd znx
^P1STREET("IS","x`y drio","xrez")
zerx
^P1STREET("IS","x`y drio","xwtz")
ztwx
^P1STREET("IS","x`y drio","xy""i")
i"yx
^P1STREET("IS","x`y drio","y`afi")
ifa`y
^P1STREET("IS","x`y drio","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","x`y drio","ybi`")
`iby
^P1STREET("IS","x`y drio","yc' ylnd dnlj")
jlnd dnly 'cy
^P1STREET("IS","x`y drio","yedm")
mdey
^P1STREET("IS","x`y drio","yexw")
wxey
^P1STREET("IS","x`y drio","yeyo")
oyey
^P1STREET("IS","x`y drio","yeypz drnwim")
miwnrd zpyey
^P1STREET("IS","x`y drio","ygs")
sgy
^P1STREET("IS","x`y drio","yifs")
sfiy
^P1STREET("IS","x`y drio","yild")
dliy
^P1STREET("IS","x`y drio","yix dyixim")
mixiyd xiy
^P1STREET("IS","x`y drio","ylcb")
bcly
^P1STREET("IS","x`y drio","ylem fkxid")
dixkf mely
^P1STREET("IS","x`y drio","yne`l iapi`li")
il`ipai l`eny
^P1STREET("IS","x`y drio","yqw")
wqy
^P1STREET("IS","x`y drio","ywc")
cwy
^P1STREET("IS","x`y drio","ywnd")
dnwy
^P1STREET("IS","x`y drio","yyz dinim")
minid zyy
^P1STREET("IS","x`y drio","z`pd")
dp`z
^P1STREET("IS","x`y drio","zaex")
xeaz
^P1STREET("IS","x`y drio","zex")
xez
^P1STREET("IS","x`y drio","zexi fda")
adf ixez
^P1STREET("IS","x`y drio","zez")
zez
^P1STREET("IS","x`y drio","znx")
xnz
^P1STREET("IS","x`y drio","zrpj")
jprz
^P1STREET("IS","x`y drio","zxyiy")
yiyxz
^P1STREET("IS","x`y tipd")
dpit y`x
^P1STREET("IS","x`y tipd","ao idecd")
dcedi oa
^P1STREET("IS","x`y tipd","cec yea")
aey cec
^P1STREET("IS","x`y tipd","cxj daeqzpim")
mipzqead jxc
^P1STREET("IS","x`y tipd","cxj dblil")
lilbd jxc
^P1STREET("IS","x`y tipd","cxj dxdh")
hdxd jxc
^P1STREET("IS","x`y tipd","d`ixeq")
qexi`d
^P1STREET("IS","x`y tipd","d`txqw")
wqxt`d
^P1STREET("IS","x`y tipd","dexc")
cxed
^P1STREET("IS","x`y tipd","dfizim")
mizifd
^P1STREET("IS","x`y tipd","dgleniz")
zinelgd
^P1STREET("IS","x`y tipd","dglevim")
mivelgd
^P1STREET("IS","x`y tipd","dklpiz")
ziplkd
^P1STREET("IS","x`y tipd","dpcia")
aicpd
^P1STREET("IS","x`y tipd","dpexiz")
zixepd
^P1STREET("IS","x`y tipd","dpxwiq")
qiwxpd
^P1STREET("IS","x`y tipd","dpyi`")
`iypd
^P1STREET("IS","x`y tipd","drlieo")
oeilrd
^P1STREET("IS","x`y tipd","dtln""g")
g"nltd
^P1STREET("IS","x`y tipd","dx`yepim")
mipey`xd
^P1STREET("IS","x`y tipd","dxgad")
dagxd
^P1STREET("IS","x`y tipd","dxgad `'")
'` dagxd
^P1STREET("IS","x`y tipd","dxgad a'")
'a dagxd
^P1STREET("IS","x`y tipd","dxgad b'")
'b dagxd
^P1STREET("IS","x`y tipd","dxgad c'")
'c dagxd
^P1STREET("IS","x`y tipd","dxgad dgwl`iz")
zi`lwgd dagxd
^P1STREET("IS","x`y tipd","dyihd")
dhiyd
^P1STREET("IS","x`y tipd","dylem")
melyd
^P1STREET("IS","x`y tipd","dywcim")
micwyd
^P1STREET("IS","x`y tipd","dzexneq")
qenxezd
^P1STREET("IS","x`y tipd","nrld bi` `epi")
ipe` `ib dlrn
^P1STREET("IS","x`y tipd","nrld dfizim")
mizifd dlrn
^P1STREET("IS","x`y tipd","pes kpxz")
zxpk sep
^P1STREET("IS","x`y tipd","qnhz blili")
ililb zhnq
^P1STREET("IS","x`y tipd","rniwm yn`i")
i`ny mwinr
^P1STREET("IS","x`y tipd","thx tai`o")
o`iat xht
^P1STREET("IS","x`y tipd","tpi belo")
oleb ipt
^P1STREET("IS","x`y tipd","wxo diqec")
ceqid oxw
^P1STREET("IS","x`y tipd","wxo wiinz")
zniiw oxw
^P1STREET("IS","x`y tipd","xnz bo")
ob znx
^P1STREET("IS","x`y tipd","ylem")
mely
^P1STREET("IS","x`yeo lvieo")
oeivl oey`x
^P1STREET("IS","x`yeo lvieo","`""c bexceo")
oecxeb c"`
^P1STREET("IS","x`yeo lvieo","`a` `gin`ix")
xi`nig` `a`
^P1STREET("IS","x`yeo lvieo","`a` dll qilax")
xaliq lld `a`
^P1STREET("IS","x`yeo lvieo","`a` weapx")
xpaew `a`
^P1STREET("IS","x`yeo lvieo","`ae gvix`")
`xivg ea`
^P1STREET("IS","x`yeo lvieo","`ai d`qixim")
mixiq`d ia`
^P1STREET("IS","x`yeo lvieo","`aico ynreo")
oerny ocia`
^P1STREET("IS","x`yeo lvieo","`aigil")
ligia`
^P1STREET("IS","x`yeo lvieo","`airfx")
xfria`
^P1STREET("IS","x`yeo lvieo","`ao baixel")
lexiab oa`
^P1STREET("IS","x`yeo lvieo","`ao go")
og oa`
^P1STREET("IS","x`yeo lvieo","`ao yeyo")
oyey oa`
^P1STREET("IS","x`yeo lvieo","`api dgeyo")
oyegd ipa`
^P1STREET("IS","x`yeo lvieo","`apx")
xpa`
^P1STREET("IS","x`yeo lvieo","`axap`l")
l`paxa`
^P1STREET("IS","x`yeo lvieo","`axneaiu")
uiaenxa`
^P1STREET("IS","x`yeo lvieo","`aylem")
melya`
^P1STREET("IS","x`yeo lvieo","`befi")
ifeb`
^P1STREET("IS","x`yeo lvieo","`cx")
xc`
^P1STREET("IS","x`yeo lvieo","`dxeo eaxej")
jexae oexd`
^P1STREET("IS","x`yeo lvieo","`dxeo wleb")
belw oexd`
^P1STREET("IS","x`yeo lvieo","`dxepeaiu")
uiaepexd`
^P1STREET("IS","x`yeo lvieo","`dxepqeo")
oeqpexd`
^P1STREET("IS","x`yeo lvieo","`elbd eideyr")
ryedie dble`
^P1STREET("IS","x`yeo lvieo","`eqhyipqwi")
iwqpiyhqe`
^P1STREET("IS","x`yeo lvieo","`eqiywio")
oiwyiqe`
^P1STREET("IS","x`yeo lvieo","`etixd")
dxite`
^P1STREET("IS","x`yeo lvieo","`ex kycim")
micyk xe`
^P1STREET("IS","x`yeo lvieo","`exi vai")
iav ixe`
^P1STREET("IS","x`yeo lvieo","`eyd")
dye`
^P1STREET("IS","x`yeo lvieo","`f""x")
x"f`
^P1STREET("IS","x`yeo lvieo","`fel`i cec")
cec i`lef`
^P1STREET("IS","x`yeo lvieo","`gc drm")
mrd cg`
^P1STREET("IS","x`yeo lvieo","`gez yxd")
dxy zeg`
^P1STREET("IS","x`yeo lvieo","`gim fibx")
xbif mig`
^P1STREET("IS","x`yeo lvieo","`girfx")
xfrig`
^P1STREET("IS","x`yeo lvieo","`ifcex")
xecfi`
^P1STREET("IS","x`yeo lvieo","`ifiwqeo")
oeqwifi`
^P1STREET("IS","x`yeo lvieo","`iifpapc")
cpapfii`
^P1STREET("IS","x`yeo lvieo","`ileo")
oeli`
^P1STREET("IS","x`yeo lvieo","`inax")
xani`
^P1STREET("IS","x`yeo lvieo","`ipyhiio")
oiihypi`
^P1STREET("IS","x`yeo lvieo","`izm")
mzi`
^P1STREET("IS","x`yeo lvieo","`lgpo")
opgl`
^P1STREET("IS","x`yeo lvieo","`lgxifi")
ifixgl`
^P1STREET("IS","x`yeo lvieo","`lhlpd")
dplhl`
^P1STREET("IS","x`yeo lvieo","`li kdo")
odk il`
^P1STREET("IS","x`yeo lvieo","`li`pq w`phi")
ihp`w qp`il`
^P1STREET("IS","x`yeo lvieo","`lide `izo")
ozi` edil`
^P1STREET("IS","x`yeo lvieo","`lirfx alao")
oala xfril`
^P1STREET("IS","x`yeo lvieo","`liwem")
mewil`
^P1STREET("IS","x`yeo lvieo","`ltqi")
iqtl`
^P1STREET("IS","x`yeo lvieo","`lwau")
uawl`
^P1STREET("IS","x`yeo lvieo","`lwlri")
irlwl`
^P1STREET("IS","x`yeo lvieo","`lxe`i")
i`exl`
^P1STREET("IS","x`yeo lvieo","`lzxno")
onxzl`
^P1STREET("IS","x`yeo lvieo","`nex`im")
mi`xen`
^P1STREET("IS","x`yeo lvieo","`nflb")
blfn`
^P1STREET("IS","x`yeo lvieo","`nil fel`")
`lef lin`
^P1STREET("IS","x`yeo lvieo","`pd txpw")
wpxt dp`
^P1STREET("IS","x`yeo lvieo","`pilaiu")
uialip`
^P1STREET("IS","x`yeo lvieo","`pirm")
mrip`
^P1STREET("IS","x`yeo lvieo","`q`")
`q`
^P1STREET("IS","x`yeo lvieo","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","x`yeo lvieo","`rld aznx")
xnza dlr`
^P1STREET("IS","x`yeo lvieo","`v""l")
l"v`
^P1STREET("IS","x`yeo lvieo","`xal")
lax`
^P1STREET("IS","x`yeo lvieo","`xbno")
onbx`
^P1STREET("IS","x`yeo lvieo","`xe wph b'eqs")
sqe'b hpw ex`
^P1STREET("IS","x`yeo lvieo","`xi`a giim")
miig a`ix`
^P1STREET("IS","x`yeo lvieo","`xid axbx")
xbxa dix`
^P1STREET("IS","x`yeo lvieo","`xlefexea")
aexefelx`
^P1STREET("IS","x`yeo lvieo","`yx axy")
yxa xy`
^P1STREET("IS","x`yeo lvieo","a`x`c")
c`x`a
^P1STREET("IS","x`yeo lvieo","a`xi")
ix`a
^P1STREET("IS","x`yeo lvieo","adh")
hda
^P1STREET("IS","x`yeo lvieo","aelhinex cec")
cec xenihlea
^P1STREET("IS","x`yeo lvieo","aexekea")
aekexea
^P1STREET("IS","x`yeo lvieo","aexiq tqhxpw")
wpxhqt qixea
^P1STREET("IS","x`yeo lvieo","aexl`")
`lxea
^P1STREET("IS","x`yeo lvieo","ai`liw")
wil`ia
^P1STREET("IS","x`yeo lvieo","aiiwx")
xwiia
^P1STREET("IS","x`yeo lvieo","ail""e")
e"lia
^P1STREET("IS","x`yeo lvieo","ailipqeo")
oeqpilia
^P1STREET("IS","x`yeo lvieo","aiz dlei")
ield zia
^P1STREET("IS","x`yeo lvieo","aiz drxad")
daxrd zia
^P1STREET("IS","x`yeo lvieo","aiz ideyr")
ryedi zia
^P1STREET("IS","x`yeo lvieo","aiz ieqs")
sqei zia
^P1STREET("IS","x`yeo lvieo","aiz lgm")
mgl zia
^P1STREET("IS","x`yeo lvieo","aiz zxvd")
dvxz zia
^P1STREET("IS","x`yeo lvieo","aizx")
xzia
^P1STREET("IS","x`yeo lvieo","alei npyd")
dypn iela
^P1STREET("IS","x`yeo lvieo","altex")
xetla
^P1STREET("IS","x`yeo lvieo","ao `ai `iznx")
xnzi` ia` oa
^P1STREET("IS","x`yeo lvieo","ao `lirfx")
xfril` oa
^P1STREET("IS","x`yeo lvieo","ao bexieo")
oeixeb oa
^P1STREET("IS","x`yeo lvieo","ao f`a")
a`f oa
^P1STREET("IS","x`yeo lvieo","ao fk`i")
i`kf oa
^P1STREET("IS","x`yeo lvieo","ao idecd")
dcedi oa
^P1STREET("IS","x`yeo lvieo","ao pgem")
megp oa
^P1STREET("IS","x`yeo lvieo","ao qxew")
wexq oa
^P1STREET("IS","x`yeo lvieo","ao vieo")
oeiv oa
^P1STREET("IS","x`yeo lvieo","ao yhg")
ghy oa
^P1STREET("IS","x`yeo lvieo","apapiyzi")
izyipapa
^P1STREET("IS","x`yeo lvieo","aqwipc pca")
acp cpiwqa
^P1STREET("IS","x`yeo lvieo","arl dhexim")
mixehd lra
^P1STREET("IS","x`yeo lvieo","awxno `cm")
mc` onxwa
^P1STREET("IS","x`yeo lvieo","ax `axdm")
mdxa` xa
^P1STREET("IS","x`yeo lvieo","ax `ilo")
oli` xa
^P1STREET("IS","x`yeo lvieo","ax ieg`i")
i`gei xa
^P1STREET("IS","x`yeo lvieo","ax keka`")
`akek xa
^P1STREET("IS","x`yeo lvieo","ax la giim")
miig al xa
^P1STREET("IS","x`yeo lvieo","axb tel")
let bxa
^P1STREET("IS","x`yeo lvieo","axbno")
onbxa
^P1STREET("IS","x`yeo lvieo","axc `axdm")
mdxa` cxa
^P1STREET("IS","x`yeo lvieo","axej ap`qxs")
sxq`pa jexa
^P1STREET("IS","x`yeo lvieo","axeo caexd")
dxeac oexa
^P1STREET("IS","x`yeo lvieo","axew")
wexa
^P1STREET("IS","x`yeo lvieo","axfili")
ilifxa
^P1STREET("IS","x`yeo lvieo","axiz ieqs")
sqei zixa
^P1STREET("IS","x`yeo lvieo","axpciq")
qicpxa
^P1STREET("IS","x`yeo lvieo","axpivwi pzo")
ozp iwvipxa
^P1STREET("IS","x`yeo lvieo","axpx")
xpxa
^P1STREET("IS","x`yeo lvieo","axpyhiio")
oiihypxa
^P1STREET("IS","x`yeo lvieo","axw")
wxa
^P1STREET("IS","x`yeo lvieo","axwz")
zwxa
^P1STREET("IS","x`yeo lvieo","axyaqwi")
iwqayxa
^P1STREET("IS","x`yeo lvieo","b'exb' cd dayi")
iyad dc 'bxe'b
^P1STREET("IS","x`yeo lvieo","b'xeti ylem")
mely itex'b
^P1STREET("IS","x`yeo lvieo","b`elim")
mile`b
^P1STREET("IS","x`yeo lvieo","barz `aia")
aia` zrab
^P1STREET("IS","x`yeo lvieo","barz ie`a")
a`ei zrab
^P1STREET("IS","x`yeo lvieo","barzi")
izrab
^P1STREET("IS","x`yeo lvieo","bceli iyx`l")
l`xyi ilecb
^P1STREET("IS","x`yeo lvieo","bcreo")
oercb
^P1STREET("IS","x`yeo lvieo","belcaxb dpcao")
oacpd bxacleb
^P1STREET("IS","x`yeo lvieo","belcd n`ix")
xi`n dcleb
^P1STREET("IS","x`yeo lvieo","belena")
aneleb
^P1STREET("IS","x`yeo lvieo","belipwio")
oiwpileb
^P1STREET("IS","x`yeo lvieo","bepo")
opeb
^P1STREET("IS","x`yeo lvieo","bex")
xeb
^P1STREET("IS","x`yeo lvieo","bey gla")
alg yeb
^P1STREET("IS","x`yeo lvieo","bey rvieo")
oeivr yeb
^P1STREET("IS","x`yeo lvieo","biaexi iyx`l")
l`xyi ixeaib
^P1STREET("IS","x`yeo lvieo","biayhiio")
oiihyaib
^P1STREET("IS","x`yeo lvieo","bipfaexb")
bxeafpib
^P1STREET("IS","x`yeo lvieo","biqio")
oiqib
^P1STREET("IS","x`yeo lvieo","bleqw` fkxid")
dixkf `wqelb
^P1STREET("IS","x`yeo lvieo","bleqwio")
oiwqelb
^P1STREET("IS","x`yeo lvieo","blili iyx`l")
l`xyi ililb
^P1STREET("IS","x`yeo lvieo","bly`e ylceo")
oecly e`ylb
^P1STREET("IS","x`yeo lvieo","bo dywnim")
minwyd ob
^P1STREET("IS","x`yeo lvieo","bo iapd")
dpai ob
^P1STREET("IS","x`yeo lvieo","bpeqx")
xqepb
^P1STREET("IS","x`yeo lvieo","bxefpaxb")
bxapfexb
^P1STREET("IS","x`yeo lvieo","bxeqaxb")
bxaqexb
^P1STREET("IS","x`yeo lvieo","bxipaeim")
mieapixb
^P1STREET("IS","x`yeo lvieo","bxipyto dxyl")
lyxd otypixb
^P1STREET("IS","x`yeo lvieo","bxpih")
hipxb
^P1STREET("IS","x`yeo lvieo","bxu")
uxb
^P1STREET("IS","x`yeo lvieo","bxyaxb `axdm")
mdxa` bxayxb
^P1STREET("IS","x`yeo lvieo","bxyeo no")
on oeyxb
^P1STREET("IS","x`yeo lvieo","bxyepi `xid")
dix` ipeyxb
^P1STREET("IS","x`yeo lvieo","byx")
xyb
^P1STREET("IS","x`yeo lvieo","c""x cxald")
dlaxc x"c
^P1STREET("IS","x`yeo lvieo","c""x f'iee`be")
eb`eei'f x"c
^P1STREET("IS","x`yeo lvieo","ca def")
fed ac
^P1STREET("IS","x`yeo lvieo","ca txicno")
oncixt ac
^P1STREET("IS","x`yeo lvieo","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","x`yeo lvieo","cb dfda")
adfd bc
^P1STREET("IS","x`yeo lvieo","cbpid")
dipbc
^P1STREET("IS","x`yeo lvieo","ceapea")
aepaec
^P1STREET("IS","x`yeo lvieo","cec `lrfx")
xfrl` cec
^P1STREET("IS","x`yeo lvieo","cec ao tpgq")
qgpt oa cec
^P1STREET("IS","x`yeo lvieo","cec dnlj")
jlnd cec
^P1STREET("IS","x`yeo lvieo","cec dx`eapi")
ipae`xd cec
^P1STREET("IS","x`yeo lvieo","ceicfeo")
oefciec
^P1STREET("IS","x`yeo lvieo","cela")
alec
^P1STREET("IS","x`yeo lvieo","cexi")
ixec
^P1STREET("IS","x`yeo lvieo","ci fda")
adf ic
^P1STREET("IS","x`yeo lvieo","clid")
dilc
^P1STREET("IS","x`yeo lvieo","cn`xi")
ix`nc
^P1STREET("IS","x`yeo lvieo","co")
oc
^P1STREET("IS","x`yeo lvieo","cpi`l dpai`")
`iapd l`ipc
^P1STREET("IS","x`yeo lvieo","cpi`l pzpq")
qpzp l`ipc
^P1STREET("IS","x`yeo lvieo","ctpd")
dptc
^P1STREET("IS","x`yeo lvieo","cwld")
dlwc
^P1STREET("IS","x`yeo lvieo","cxeaio")
oiaexc
^P1STREET("IS","x`yeo lvieo","cxex")
xexc
^P1STREET("IS","x`yeo lvieo","cxj dnkaim")
miaknd jxc
^P1STREET("IS","x`yeo lvieo","cxj iyx`l iyride")
ediryi l`xyi jxc
^P1STREET("IS","x`yeo lvieo","cxj rfd")
dfr jxc
^P1STREET("IS","x`yeo lvieo","d' a`iix")
xii`a 'd
^P1STREET("IS","x`yeo lvieo","d`aez")
zea`d
^P1STREET("IS","x`yeo lvieo","d`bef")
feb`d
^P1STREET("IS","x`yeo lvieo","d`bq")
qb`d
^P1STREET("IS","x`yeo lvieo","d`bxz")
zxb`d
^P1STREET("IS","x`yeo lvieo","d`ebcd")
dcbe`d
^P1STREET("IS","x`yeo lvieo","d`eknpiez")
zeipnke`d
^P1STREET("IS","x`yeo lvieo","d`eo")
oe`d
^P1STREET("IS","x`yeo lvieo","d`exbo")
obxe`d
^P1STREET("IS","x`yeo lvieo","d`exo")
oxe`d
^P1STREET("IS","x`yeo lvieo","d`expim")
mipxe`d
^P1STREET("IS","x`yeo lvieo","d`gc ryx")
xyr cg`d
^P1STREET("IS","x`yeo lvieo","d`gim `aiea")
aeia` mig`d
^P1STREET("IS","x`yeo lvieo","d`gim irwai")
iawri mig`d
^P1STREET("IS","x`yeo lvieo","d`gim qelino")
onileq mig`d
^P1STREET("IS","x`yeo lvieo","d`ilziz")
zizli`d
^P1STREET("IS","x`yeo lvieo","d`ixiq")
qixi`d
^P1STREET("IS","x`yeo lvieo","d`ld")
dl`d
^P1STREET("IS","x`yeo lvieo","d`leo")
oel`d
^P1STREET("IS","x`yeo lvieo","d`lnebim")
mibenl`d
^P1STREET("IS","x`yeo lvieo","d`m")
m`d
^P1STREET("IS","x`yeo lvieo","d`pid")
dip`d
^P1STREET("IS","x`yeo lvieo","d`txqneo")
oenqxt`d
^P1STREET("IS","x`yeo lvieo","d`txqw")
wqxt`d
^P1STREET("IS","x`yeo lvieo","d`x""f")
f"x`d
^P1STREET("IS","x`yeo lvieo","d`x""i")
i"x`d
^P1STREET("IS","x`yeo lvieo","d`xard ryx")
xyr drax`d
^P1STREET("IS","x`yeo lvieo","d`ykeliz")
zileky`d
^P1STREET("IS","x`yeo lvieo","d`yl")
ly`d
^P1STREET("IS","x`yeo lvieo","d`zxeb")
bexz`d
^P1STREET("IS","x`yeo lvieo","daevxim")
mixvead
^P1STREET("IS","x`yeo lvieo","dao dx`yeo")
oey`xd oad
^P1STREET("IS","x`yeo lvieo","dapim")
mipad
^P1STREET("IS","x`yeo lvieo","darl ym hea")
aeh my lrad
^P1STREET("IS","x`yeo lvieo","daxeo dixy")
yxid oexad
^P1STREET("IS","x`yeo lvieo","daxey")
yexad
^P1STREET("IS","x`yeo lvieo","daxeyim")
miyexad
^P1STREET("IS","x`yeo lvieo","daxibcd")
dcbixad
^P1STREET("IS","x`yeo lvieo","daxwo")
owxad
^P1STREET("IS","x`yeo lvieo","dayo")
oyad
^P1STREET("IS","x`yeo lvieo","db`eo neilp`")
`plien oe`bd
^P1STREET("IS","x`yeo lvieo","dbaexd dideciz")
zicedid dxeabd
^P1STREET("IS","x`yeo lvieo","dbarel")
lerabd
^P1STREET("IS","x`yeo lvieo","dbcec draxi")
ixard cecbd
^P1STREET("IS","x`yeo lvieo","dben`")
`nebd
^P1STREET("IS","x`yeo lvieo","dbiziz")
zizibd
^P1STREET("IS","x`yeo lvieo","dblaer")
realbd
^P1STREET("IS","x`yeo lvieo","dblil")
lilbd
^P1STREET("IS","x`yeo lvieo","dblim")
milbd
^P1STREET("IS","x`yeo lvieo","dblrc")
crlbd
^P1STREET("IS","x`yeo lvieo","dbto")
otbd
^P1STREET("IS","x`yeo lvieo","dbz")
zbd
^P1STREET("IS","x`yeo lvieo","dcbl draxi")
ixard lbcd
^P1STREET("IS","x`yeo lvieo","dcbo")
obcd
^P1STREET("IS","x`yeo lvieo","dcebiz")
zibecd
^P1STREET("IS","x`yeo lvieo","dcekitz")
ztikecd
^P1STREET("IS","x`yeo lvieo","dceltio")
oitlecd
^P1STREET("IS","x`yeo lvieo","dciepeo")
oepeicd
^P1STREET("IS","x`yeo lvieo","dciibim")
mibiicd
^P1STREET("IS","x`yeo lvieo","dcqd")
dqcd
^P1STREET("IS","x`yeo lvieo","dcwl")
lwcd
^P1STREET("IS","x`yeo lvieo","ddbpd")
dpbdd
^P1STREET("IS","x`yeo lvieo","ddcq")
qcdd
^P1STREET("IS","x`yeo lvieo","ddcx")
xcdd
^P1STREET("IS","x`yeo lvieo","ddcxim")
mixcdd
^P1STREET("IS","x`yeo lvieo","ddqzcxez")
zexczqdd
^P1STREET("IS","x`yeo lvieo","ddxces")
secxdd
^P1STREET("IS","x`yeo lvieo","delvaxb yngd")
dgny bxavled
^P1STREET("IS","x`yeo lvieo","detno")
onted
^P1STREET("IS","x`yeo lvieo","dexc")
cxed
^P1STREET("IS","x`yeo lvieo","dexeaiu")
uiaexed
^P1STREET("IS","x`yeo lvieo","dfdaiz")
ziadfd
^P1STREET("IS","x`yeo lvieo","dfdxeo")
oexdfd
^P1STREET("IS","x`yeo lvieo","dfexrim")
mirxefd
^P1STREET("IS","x`yeo lvieo","dff")
ffd
^P1STREET("IS","x`yeo lvieo","dfiz")
zifd
^P1STREET("IS","x`yeo lvieo","dfnexd")
dxenfd
^P1STREET("IS","x`yeo lvieo","dfnix")
xinfd
^P1STREET("IS","x`yeo lvieo","dfxfix")
xifxfd
^P1STREET("IS","x`yeo lvieo","dgavlz")
zlvagd
^P1STREET("IS","x`yeo lvieo","dgebld")
dlbegd
^P1STREET("IS","x`yeo lvieo","dgegiz")
zigegd
^P1STREET("IS","x`yeo lvieo","dgend")
dnegd
^P1STREET("IS","x`yeo lvieo","dgexy")
yxegd
^P1STREET("IS","x`yeo lvieo","dgic""`")
`"cigd
^P1STREET("IS","x`yeo lvieo","dgiil d`lnepi")
ipenl`d liigd
^P1STREET("IS","x`yeo lvieo","dglalea")
aelalgd
^P1STREET("IS","x`yeo lvieo","dgleu")
uelgd
^P1STREET("IS","x`yeo lvieo","dglil")
lilgd
^P1STREET("IS","x`yeo lvieo","dglnepiz")
zipenlgd
^P1STREET("IS","x`yeo lvieo","dgnpiz")
zipngd
^P1STREET("IS","x`yeo lvieo","dgva")
avgd
^P1STREET("IS","x`yeo lvieo","dgvevxd")
dxvevgd
^P1STREET("IS","x`yeo lvieo","dgxea")
aexgd
^P1STREET("IS","x`yeo lvieo","dgxneo")
oenxgd
^P1STREET("IS","x`yeo lvieo","dgxviz")
zivxgd
^P1STREET("IS","x`yeo lvieo","dgxy ednqbx")
xbqnde yxgd
^P1STREET("IS","x`yeo lvieo","dgynep`im")
mi`penygd
^P1STREET("IS","x`yeo lvieo","dhiilz")
zliihd
^P1STREET("IS","x`yeo lvieo","diebaim")
miabeid
^P1STREET("IS","x`yeo lvieo","diio")
oiid
^P1STREET("IS","x`yeo lvieo","diiqno yxb`")
`bxy onqiid
^P1STREET("IS","x`yeo lvieo","diqnio")
oinqid
^P1STREET("IS","x`yeo lvieo","dirx")
xrid
^P1STREET("IS","x`yeo lvieo","divdx")
xdvid
^P1STREET("IS","x`yeo lvieo","diwa")
awid
^P1STREET("IS","x`yeo lvieo","diwipheo")
oehpiwid
^P1STREET("IS","x`yeo lvieo","dixco")
ocxid
^P1STREET("IS","x`yeo lvieo","dixnej")
jenxid
^P1STREET("IS","x`yeo lvieo","dixweo")
oewxid
^P1STREET("IS","x`yeo lvieo","dixytlc")
cltyxid
^P1STREET("IS","x`yeo lvieo","dkeay")
yaekd
^P1STREET("IS","x`yeo lvieo","dkefxi")
ixfekd
^P1STREET("IS","x`yeo lvieo","dkexnim")
minxekd
^P1STREET("IS","x`yeo lvieo","dkipex")
xepikd
^P1STREET("IS","x`yeo lvieo","dklpiz")
ziplkd
^P1STREET("IS","x`yeo lvieo","dkpex")
xepkd
^P1STREET("IS","x`yeo lvieo","dkpqz")
zqpkd
^P1STREET("IS","x`yeo lvieo","dkqis")
siqkd
^P1STREET("IS","x`yeo lvieo","dkxkem")
mekxkd
^P1STREET("IS","x`yeo lvieo","dkxnl")
lnxkd
^P1STREET("IS","x`yeo lvieo","dkxtq")
qtxkd
^P1STREET("IS","x`yeo lvieo","dkyxz diyea")
aeyid zxykd
^P1STREET("IS","x`yeo lvieo","dkzx")
xzkd
^P1STREET("IS","x`yeo lvieo","dleeizo")
ozieeld
^P1STREET("IS","x`yeo lvieo","dlegnim")
mingeld
^P1STREET("IS","x`yeo lvieo","dleheq")
qeheld
^P1STREET("IS","x`yeo lvieo","dlehm")
mheld
^P1STREET("IS","x`yeo lvieo","dlei ngli")
ilgn ield
^P1STREET("IS","x`yeo lvieo","dliapd")
dpaild
^P1STREET("IS","x`yeo lvieo","dlineo")
oenild
^P1STREET("IS","x`yeo lvieo","dll ptzli")
ilztp lld
^P1STREET("IS","x`yeo lvieo","dltxio")
oixtld
^P1STREET("IS","x`yeo lvieo","dnbild")
dlibnd
^P1STREET("IS","x`yeo lvieo","dnex")
xend
^P1STREET("IS","x`yeo lvieo","dnexo")
oxend
^P1STREET("IS","x`yeo lvieo","dniiqcim")
micqiind
^P1STREET("IS","x`yeo lvieo","dnlgim")
miglnd
^P1STREET("IS","x`yeo lvieo","dnliu")
uilnd
^P1STREET("IS","x`yeo lvieo","dnlj")
jlnd
^P1STREET("IS","x`yeo lvieo","dnlj y`el")
le`y jlnd
^P1STREET("IS","x`yeo lvieo","dnlkd `qzx")
xzq` dklnd
^P1STREET("IS","x`yeo lvieo","dnlkim")
miklnd
^P1STREET("IS","x`yeo lvieo","dnrio")
oirnd
^P1STREET("IS","x`yeo lvieo","dnrtilim")
militrnd
^P1STREET("IS","x`yeo lvieo","dntegiz")
zigetnd
^P1STREET("IS","x`yeo lvieo","dntxy")
yxtnd
^P1STREET("IS","x`yeo lvieo","dnvilziim")
miizlivnd
^P1STREET("IS","x`yeo lvieo","dnxbpiz")
zipbxnd
^P1STREET("IS","x`yeo lvieo","dnxkad")
dakxnd
^P1STREET("IS","x`yeo lvieo","dnyeh")
heynd
^P1STREET("IS","x`yeo lvieo","dnyexx ylem")
mely xxeynd
^P1STREET("IS","x`yeo lvieo","dnzpcaim")
miacpznd
^P1STREET("IS","x`yeo lvieo","dpai`im")
mi`iapd
^P1STREET("IS","x`yeo lvieo","dpba")
abpd
^P1STREET("IS","x`yeo lvieo","dpbic")
cibpd
^P1STREET("IS","x`yeo lvieo","dpehxim")
mixhepd
^P1STREET("IS","x`yeo lvieo","dpetx")
xtepd
^P1STREET("IS","x`yeo lvieo","dpexiz")
zixepd
^P1STREET("IS","x`yeo lvieo","dpgl")
lgpd
^P1STREET("IS","x`yeo lvieo","dpgli`li")
il`ilgpd
^P1STREET("IS","x`yeo lvieo","dpgyel")
leygpd
^P1STREET("IS","x`yeo lvieo","dpgyeo")
oeygpd
^P1STREET("IS","x`yeo lvieo","dpnl")
lnpd
^P1STREET("IS","x`yeo lvieo","dpvia neelefo")
ofeleen aivpd
^P1STREET("IS","x`yeo lvieo","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","x`yeo lvieo","dpxwiq")
qiwxpd
^P1STREET("IS","x`yeo lvieo","dq")
qd
^P1STREET("IS","x`yeo lvieo","dqaieo")
oeiaqd
^P1STREET("IS","x`yeo lvieo","dqekd")
dkeqd
^P1STREET("IS","x`yeo lvieo","dqgla")
algqd
^P1STREET("IS","x`yeo lvieo","dqibliz")
zilbiqd
^P1STREET("IS","x`yeo lvieo","dqiteo")
oetiqd
^P1STREET("IS","x`yeo lvieo","dqixd")
dxiqd
^P1STREET("IS","x`yeo lvieo","dqncx")
xcnqd
^P1STREET("IS","x`yeo lvieo","dqptix")
xitpqd
^P1STREET("IS","x`yeo lvieo","dqzeepiz")
zipeezqd
^P1STREET("IS","x`yeo lvieo","dreba")
aberd
^P1STREET("IS","x`yeo lvieo","drebo")
oberd
^P1STREET("IS","x`yeo lvieo","drexa")
axerd
^P1STREET("IS","x`yeo lvieo","dripa")
apird
^P1STREET("IS","x`yeo lvieo","drlid")
dilrd
^P1STREET("IS","x`yeo lvieo","drniz ivgw nfxgi")
igxfn wgvi zinrd
^P1STREET("IS","x`yeo lvieo","drqiq")
qiqrd
^P1STREET("IS","x`yeo lvieo","drtxepi")
ipextrd
^P1STREET("IS","x`yeo lvieo","drvn`ez")
ze`nvrd
^P1STREET("IS","x`yeo lvieo","drxneo")
oenxrd
^P1STREET("IS","x`yeo lvieo","dtex")
xetd
^P1STREET("IS","x`yeo lvieo","dtexvim")
mivxetd
^P1STREET("IS","x`yeo lvieo","dtfiz")
ziftd
^P1STREET("IS","x`yeo lvieo","dtiweq")
qewitd
^P1STREET("IS","x`yeo lvieo","dtqpzx")
xzpqtd
^P1STREET("IS","x`yeo lvieo","dtrnepiz")
zipenrtd
^P1STREET("IS","x`yeo lvieo","dtxb")
bxtd
^P1STREET("IS","x`yeo lvieo","dtxcq dx`yeo")
oey`xd qcxtd
^P1STREET("IS","x`yeo lvieo","dtxg")
gxtd
^P1STREET("IS","x`yeo lvieo","dv`lim")
mil`vd
^P1STREET("IS","x`yeo lvieo","dvarepi")
iperavd
^P1STREET("IS","x`yeo lvieo","dvax")
xavd
^P1STREET("IS","x`yeo lvieo","dvcs")
scvd
^P1STREET("IS","x`yeo lvieo","dvetim")
mitevd
^P1STREET("IS","x`yeo lvieo","dvitexo")
oxetivd
^P1STREET("IS","x`yeo lvieo","dvpgpim")
mipgpvd
^P1STREET("IS","x`yeo lvieo","dvteo dx`yeo")
oey`xd oetvd
^P1STREET("IS","x`yeo lvieo","dvtixd")
dxitvd
^P1STREET("IS","x`yeo lvieo","dwaxpih")
hipxawd
^P1STREET("IS","x`yeo lvieo","dwepkid")
dikpewd
^P1STREET("IS","x`yeo lvieo","dwewid")
diwewd
^P1STREET("IS","x`yeo lvieo","dwiyeo")
oeyiwd
^P1STREET("IS","x`yeo lvieo","dwlxpiz")
zipxlwd
^P1STREET("IS","x`yeo lvieo","dx dnexid")
dixend xd
^P1STREET("IS","x`yeo lvieo","dx qipi")
ipiq xd
^P1STREET("IS","x`yeo lvieo","dx vieo")
oeiv xd
^P1STREET("IS","x`yeo lvieo","dxa `ephxno")
onxhpe` axd
^P1STREET("IS","x`yeo lvieo","dxa ao lele")
elel oa axd
^P1STREET("IS","x`yeo lvieo","dxa bexo")
oxeb axd
^P1STREET("IS","x`yeo lvieo","dxa bxipaxb")
bxapixb axd
^P1STREET("IS","x`yeo lvieo","dxa dxveb")
bevxd axd
^P1STREET("IS","x`yeo lvieo","dxa gcc giim")
miig ccg axd
^P1STREET("IS","x`yeo lvieo","dxa gxl""t")
t"lxg axd
^P1STREET("IS","x`yeo lvieo","dxa helic`pe ieqs")
sqei ep`cileh axd
^P1STREET("IS","x`yeo lvieo","dxa hxeaiu")
uiaexh axd
^P1STREET("IS","x`yeo lvieo","dxa nipu")
upin axd
^P1STREET("IS","x`yeo lvieo","dxa nyd vl`g")
g`lv dyn axd
^P1STREET("IS","x`yeo lvieo","dxa pexew")
wexep axd
^P1STREET("IS","x`yeo lvieo","dxa pqim")
miqp axd
^P1STREET("IS","x`yeo lvieo","dxa pxid")
dixp axd
^P1STREET("IS","x`yeo lvieo","dxa qiadi")
idaiq axd
^P1STREET("IS","x`yeo lvieo","dxa refi`l")
l`ifer axd
^P1STREET("IS","x`yeo lvieo","dxa vcew")
wecv axd
^P1STREET("IS","x`yeo lvieo","dxa wew")
wew axd
^P1STREET("IS","x`yeo lvieo","dxa xttexh")
hxettx axd
^P1STREET("IS","x`yeo lvieo","dxai nleaaiu")
uiaaeln iaxd
^P1STREET("IS","x`yeo lvieo","dxaxh qineo")
oeniq hxaxd
^P1STREET("IS","x`yeo lvieo","dxaxh qne`l")
l`enq hxaxd
^P1STREET("IS","x`yeo lvieo","dxezm")
mzexd
^P1STREET("IS","x`yeo lvieo","dxineo")
oenixd
^P1STREET("IS","x`yeo lvieo","dxtqecd")
dceqtxd
^P1STREET("IS","x`yeo lvieo","dxvl")
lvxd
^P1STREET("IS","x`yeo lvieo","dxwtz")
ztwxd
^P1STREET("IS","x`yeo lvieo","dxya""`")
`"ayxd
^P1STREET("IS","x`yeo lvieo","dxyz")
zyxd
^P1STREET("IS","x`yeo lvieo","dyail")
liayd
^P1STREET("IS","x`yeo lvieo","dycd")
dcyd
^P1STREET("IS","x`yeo lvieo","dyenx")
xneyd
^P1STREET("IS","x`yeo lvieo","dyenxd")
dxneyd
^P1STREET("IS","x`yeo lvieo","dyenxeo")
oexneyd
^P1STREET("IS","x`yeo lvieo","dyepiz")
zipeyd
^P1STREET("IS","x`yeo lvieo","dyethim")
mihteyd
^P1STREET("IS","x`yeo lvieo","dyfis")
sifyd
^P1STREET("IS","x`yeo lvieo","dygx")
xgyd
^P1STREET("IS","x`yeo lvieo","dyhd")
dhyd
^P1STREET("IS","x`yeo lvieo","dyiihim")
mihiiyd
^P1STREET("IS","x`yeo lvieo","dyixd draxiz")
zixard dxiyd
^P1STREET("IS","x`yeo lvieo","dypiim")
miipyd
^P1STREET("IS","x`yeo lvieo","dywc")
cwyd
^P1STREET("IS","x`yeo lvieo","dywnd")
dnwyd
^P1STREET("IS","x`yeo lvieo","dyx giim ytix`")
`xity miig xyd
^P1STREET("IS","x`yeo lvieo","dyxaih")
hiaxyd
^P1STREET("IS","x`yeo lvieo","dyxib")
bixyd
^P1STREET("IS","x`yeo lvieo","dz`pd")
dp`zd
^P1STREET("IS","x`yeo lvieo","dzaex")
xeazd
^P1STREET("IS","x`yeo lvieo","dzcdx")
xdczd
^P1STREET("IS","x`yeo lvieo","dzenx")
xnezd
^P1STREET("IS","x`yeo lvieo","dzes")
sezd
^P1STREET("IS","x`yeo lvieo","dzex")
xezd
^P1STREET("IS","x`yeo lvieo","dzexneq")
qenxezd
^P1STREET("IS","x`yeo lvieo","dzexo")
oxezd
^P1STREET("IS","x`yeo lvieo","dzez")
zezd
^P1STREET("IS","x`yeo lvieo","dzfnexz")
zxenfzd
^P1STREET("IS","x`yeo lvieo","dzixey")
yexizd
^P1STREET("IS","x`yeo lvieo","dzklz")
zlkzd
^P1STREET("IS","x`yeo lvieo","dzlzo")
ozlzd
^P1STREET("IS","x`yeo lvieo","dznx")
xnzd
^P1STREET("IS","x`yeo lvieo","dzryiio")
oiiyrzd
^P1STREET("IS","x`yeo lvieo","dztef")
fetzd
^P1STREET("IS","x`yeo lvieo","dzteg")
getzd
^P1STREET("IS","x`yeo lvieo","dzwed")
dewzd
^P1STREET("IS","x`yeo lvieo","dzwend")
dnewzd
^P1STREET("IS","x`yeo lvieo","dzyai")
iayzd
^P1STREET("IS","x`yeo lvieo","eeltqeo")
oeqtlee
^P1STREET("IS","x`yeo lvieo","eibecqwi")
iwqcebie
^P1STREET("IS","x`yeo lvieo","eipiw n`ix")
xi`n wipie
^P1STREET("IS","x`yeo lvieo","eivaxc")
cxavie
^P1STREET("IS","x`yeo lvieo","eivno")
onvie
^P1STREET("IS","x`yeo lvieo","eizwio")
oiwzie
^P1STREET("IS","x`yeo lvieo","ewqlx nyd")
dyn xlqwe
^P1STREET("IS","x`yeo lvieo","exyaqwi")
iwqayxe
^P1STREET("IS","x`yeo lvieo","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","x`yeo lvieo","f`a")
a`f
^P1STREET("IS","x`yeo lvieo","fc""l")
l"cf
^P1STREET("IS","x`yeo lvieo","fipbx nxcki")
ikcxn xbpif
^P1STREET("IS","x`yeo lvieo","fipx cec eitd")
dtie cec xpif
^P1STREET("IS","x`yeo lvieo","fkxeo yxd")
dxy oexkf
^P1STREET("IS","x`yeo lvieo","flno yf""x")
x"fy onlf
^P1STREET("IS","x`yeo lvieo","flno ypi`ex")
xe`ipy onlf
^P1STREET("IS","x`yeo lvieo","fnpdes")
sedpnf
^P1STREET("IS","x`yeo lvieo","fnqwi")
iwqnf
^P1STREET("IS","x`yeo lvieo","fw""q pli")
ilp q"wf
^P1STREET("IS","x`yeo lvieo","fxeaal")
laaexf
^P1STREET("IS","x`yeo lvieo","ga""c")
c"ag
^P1STREET("IS","x`yeo lvieo","gawew")
wewag
^P1STREET("IS","x`yeo lvieo","gaxeo")
oexag
^P1STREET("IS","x`yeo lvieo","gbi")
ibg
^P1STREET("IS","x`yeo lvieo","gc pq")
qp cg
^P1STREET("IS","x`yeo lvieo","gend enbcl")
lcbne dneg
^P1STREET("IS","x`yeo lvieo","gepi dnrbl")
lbrnd ipeg
^P1STREET("IS","x`yeo lvieo","gfeo `iy")
yi` oefg
^P1STREET("IS","x`yeo lvieo","ghiaz wxiizi")
iziixw zaihg
^P1STREET("IS","x`yeo lvieo","gi""y")
y"ig
^P1STREET("IS","x`yeo lvieo","giim ao `txim")
mixt` oa miig
^P1STREET("IS","x`yeo lvieo","gil d`eix")
xie`d lig
^P1STREET("IS","x`yeo lvieo","gil ddpcqd")
dqcpdd lig
^P1STREET("IS","x`yeo lvieo","gil dginey")
yenigd lig
^P1STREET("IS","x`yeo lvieo","gil dim")
mid lig
^P1STREET("IS","x`yeo lvieo","gil dnecirio")
oiricend lig
^P1STREET("IS","x`yeo lvieo","gil dvpgpim")
mipgpvd lig
^P1STREET("IS","x`yeo lvieo","gil dwyx")
xywd lig
^P1STREET("IS","x`yeo lvieo","gil dxblim")
milbxd lig
^P1STREET("IS","x`yeo lvieo","gil dxte`d")
d`etxd lig
^P1STREET("IS","x`yeo lvieo","gil dyliyez")
zeyilyd lig
^P1STREET("IS","x`yeo lvieo","gil dyxieo")
oeixyd lig
^P1STREET("IS","x`yeo lvieo","gil dzezgpim")
mipgzezd lig
^P1STREET("IS","x`yeo lvieo","giqio")
oiqig
^P1STREET("IS","x`yeo lvieo","glevi iqec dnrld")
dlrnd ceqi ivelg
^P1STREET("IS","x`yeo lvieo","glu")
ulg
^P1STREET("IS","x`yeo lvieo","gncid")
dicng
^P1STREET("IS","x`yeo lvieo","go")
og
^P1STREET("IS","x`yeo lvieo","gpd qpy")
ypq dpg
^P1STREET("IS","x`yeo lvieo","gpd xeaip`")
`piaex dpg
^P1STREET("IS","x`yeo lvieo","gpizd")
dzipg
^P1STREET("IS","x`yeo lvieo","gpwio")
oiwpg
^P1STREET("IS","x`yeo lvieo","gqc e`nz")
zn`e cqg
^P1STREET("IS","x`yeo lvieo","gqc`i")
i`cqg
^P1STREET("IS","x`yeo lvieo","gqici `enez drelm")
mlerd zene` iciqg
^P1STREET("IS","x`yeo lvieo","gtu giim")
miig utg
^P1STREET("IS","x`yeo lvieo","gv' `cx")
xc` 'vg
^P1STREET("IS","x`yeo lvieo","gzpi txq peal")
laep qxt ipzg
^P1STREET("IS","x`yeo lvieo","haia")
aiah
^P1STREET("IS","x`yeo lvieo","hdeo")
oedh
^P1STREET("IS","x`yeo lvieo","helitno")
ontileh
^P1STREET("IS","x`yeo lvieo","hetexaqwi")
iwqaxeteh
^P1STREET("IS","x`yeo lvieo","hetf")
fteh
^P1STREET("IS","x`yeo lvieo","hiaeaiu idecd")
dcedi uiaeaih
^P1STREET("IS","x`yeo lvieo","hienwio")
oiwneih
^P1STREET("IS","x`yeo lvieo","hiia")
aiih
^P1STREET("IS","x`yeo lvieo","hixz vai")
iav zxih
^P1STREET("IS","x`yeo lvieo","hxentlcex")
xecltnexh
^P1STREET("IS","x`yeo lvieo","hxkhpaxb")
bxaphkxh
^P1STREET("IS","x`yeo lvieo","hxteo")
oetxh
^P1STREET("IS","x`yeo lvieo","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","x`yeo lvieo","i`ix")
xi`i
^P1STREET("IS","x`yeo lvieo","i`pey wexv'`w")
w`'vxew yep`i
^P1STREET("IS","x`yeo lvieo","iapi`li")
il`ipai
^P1STREET("IS","x`yeo lvieo","ib`l `leo")
oel` l`bi
^P1STREET("IS","x`yeo lvieo","ib`l icio")
oici l`bi
^P1STREET("IS","x`yeo lvieo","idecd")
dcedi
^P1STREET("IS","x`yeo lvieo","idecd dlei")
ield dcedi
^P1STREET("IS","x`yeo lvieo","idecd liia [tipqwx]")
[xwqpit] aiil dcedi
^P1STREET("IS","x`yeo lvieo","idecd ybi`")
`iby dcedi
^P1STREET("IS","x`yeo lvieo","idlem")
meldi
^P1STREET("IS","x`yeo lvieo","ie`l kdo")
odk l`ei
^P1STREET("IS","x`yeo lvieo","ie`l nxcki")
ikcxn l`ei
^P1STREET("IS","x`yeo lvieo","iecilaiu cec")
cec uialicei
^P1STREET("IS","x`yeo lvieo","iegpo dqpclx")
xlcpqd opgei
^P1STREET("IS","x`yeo lvieo","iepd dpai`")
`iapd dpei
^P1STREET("IS","x`yeo lvieo","ieqs axecqwi")
iwqcexa sqei
^P1STREET("IS","x`yeo lvieo","ieqs dlei")
ield sqei
^P1STREET("IS","x`yeo lvieo","ieqs dpyi`")
`iypd sqei
^P1STREET("IS","x`yeo lvieo","ieqs w`xe")
ex`w sqei
^P1STREET("IS","x`yeo lvieo","igfw`l")
l`wfgi
^P1STREET("IS","x`yeo lvieo","il""b")
b"li
^P1STREET("IS","x`yeo lvieo","ilci hdxo")
oxdh icli
^P1STREET("IS","x`yeo lvieo","ilio")
oili
^P1STREET("IS","x`yeo lvieo","im dnlg")
glnd mi
^P1STREET("IS","x`yeo lvieo","iniz")
zini
^P1STREET("IS","x`yeo lvieo","ipeaqwi")
iwqaepi
^P1STREET("IS","x`yeo lvieo","iqec dnrld")
dlrnd ceqi
^P1STREET("IS","x`yeo lvieo","irwa dkdo")
odkd awri
^P1STREET("IS","x`yeo lvieo","irwa gfo")
ofg awri
^P1STREET("IS","x`yeo lvieo","irwa kdo")
odk awri
^P1STREET("IS","x`yeo lvieo","irweafeo yngd")
dgny oefaewri
^P1STREET("IS","x`yeo lvieo","itzg")
gzti
^P1STREET("IS","x`yeo lvieo","ivgw aixbx")
xbxia wgvi
^P1STREET("IS","x`yeo lvieo","ivgw ao vai")
iav oa wgvi
^P1STREET("IS","x`yeo lvieo","ivgw ycd")
dcy wgvi
^P1STREET("IS","x`yeo lvieo","ixeylim")
milyexi
^P1STREET("IS","x`yeo lvieo","ixnide")
edinxi
^P1STREET("IS","x`yeo lvieo","iyride")
ediryi
^P1STREET("IS","x`yeo lvieo","iyx`li ynreo")
oerny il`xyi
^P1STREET("IS","x`yeo lvieo","kdo npgm")
mgpn odk
^P1STREET("IS","x`yeo lvieo","kexy")
yxek
^P1STREET("IS","x`yeo lvieo","kkx dniiqcim")
micqiind xkk
^P1STREET("IS","x`yeo lvieo","kneq vcew enlkd")
dklne wecv qenk
^P1STREET("IS","x`yeo lvieo","kpti pyxim")
mixyp itpk
^P1STREET("IS","x`yeo lvieo","kpxz")
zxpk
^P1STREET("IS","x`yeo lvieo","ktx `xid")
dix` xtk
^P1STREET("IS","x`yeo lvieo","ktx bliwqeo")
oeqwilb xtk
^P1STREET("IS","x`yeo lvieo","ktx gihim")
mihig xtk
^P1STREET("IS","x`yeo lvieo","ktx npgm")
mgpn xtk
^P1STREET("IS","x`yeo lvieo","ktx nqxiw")
wixqn xtk
^P1STREET("IS","x`yeo lvieo","kvlx")
xlvk
^P1STREET("IS","x`yeo lvieo","kvplqeo")
oeqlpvk
^P1STREET("IS","x`yeo lvieo","kzxi`l xtetexh")
hxetetx l`ixzk
^P1STREET("IS","x`yeo lvieo","l`d xaio")
oiax d`l
^P1STREET("IS","x`yeo lvieo","la lpc`e ceiceaiu")
uiaeciec e`cpl al
^P1STREET("IS","x`yeo lvieo","laephio")
oihpeal
^P1STREET("IS","x`yeo lvieo","leano")
onael
^P1STREET("IS","x`yeo lvieo","lef")
fel
^P1STREET("IS","x`yeo lvieo","lei ivgw")
wgvi iel
^P1STREET("IS","x`yeo lvieo","lei nyd")
dyn iel
^P1STREET("IS","x`yeo lvieo","leio `yx")
xy` oiel
^P1STREET("IS","x`yeo lvieo","leio nik`l egpd")
dpge l`kin oiel
^P1STREET("IS","x`yeo lvieo","ler d`xi")
ix`d rel
^P1STREET("IS","x`yeo lvieo","lexpq wliio")
oiilw qpxel
^P1STREET("IS","x`yeo lvieo","lfxea")
aexfl
^P1STREET("IS","x`yeo lvieo","lg""i")
i"gl
^P1STREET("IS","x`yeo lvieo","li`epic wphexeaiu")
uiaexehpw cipe`il
^P1STREET("IS","x`yeo lvieo","lilipalem")
melapilil
^P1STREET("IS","x`yeo lvieo","liypqwi")
iwqpyil
^P1STREET("IS","x`yeo lvieo","lnco")
ocnl
^P1STREET("IS","x`yeo lvieo","lpc`e")
e`cpl
^P1STREET("IS","x`yeo lvieo","lqwea")
aewql
^P1STREET("IS","x`yeo lvieo","lym")
myl
^P1STREET("IS","x`yeo lvieo","n`ex dbeld")
dlebd xe`n
^P1STREET("IS","x`yeo lvieo","n`ix aiph")
hpia xi`n
^P1STREET("IS","x`yeo lvieo","n`ix irxi")
ixri xi`n
^P1STREET("IS","x`yeo lvieo","n`ixeaiu")
uiaexi`n
^P1STREET("IS","x`yeo lvieo","n`te")
et`n
^P1STREET("IS","x`yeo lvieo","navr cpi")
ipc rvan
^P1STREET("IS","x`yeo lvieo","navr dx`l")
l`xd rvan
^P1STREET("IS","x`yeo lvieo","navr gexa")
axeg rvan
^P1STREET("IS","x`yeo lvieo","navr nyd")
dyn rvan
^P1STREET("IS","x`yeo lvieo","navr pgyeo")
oeygp rvan
^P1STREET("IS","x`yeo lvieo","navr wcy")
ycw rvan
^P1STREET("IS","x`yeo lvieo","navr ylnd")
dnly rvan
^P1STREET("IS","x`yeo lvieo","navr znef")
fenz rvan
^P1STREET("IS","x`yeo lvieo","naxxw")
wxxan
^P1STREET("IS","x`yeo lvieo","nbclex")
xelcbn
^P1STREET("IS","x`yeo lvieo","necirio")
oiricen
^P1STREET("IS","x`yeo lvieo","nedliax")
xailden
^P1STREET("IS","x`yeo lvieo","nehd bex")
xeb dhen
^P1STREET("IS","x`yeo lvieo","nelke")
eklen
^P1STREET("IS","x`yeo lvieo","nephitiexi")
ixeitihpen
^P1STREET("IS","x`yeo lvieo","neq`l ivgw")
wgvi l`qen
^P1STREET("IS","x`yeo lvieo","nevwio")
oiwven
^P1STREET("IS","x`yeo lvieo","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","x`yeo lvieo","nexii blno")
onlb iixen
^P1STREET("IS","x`yeo lvieo","nexyz iyx`l")
l`xyi zyxen
^P1STREET("IS","x`yeo lvieo","nfi`")
`ifn
^P1STREET("IS","x`yeo lvieo","nfl `lirfx")
xfril` lfn
^P1STREET("IS","x`yeo lvieo","nfxgi nyd")
dyn igxfn
^P1STREET("IS","x`yeo lvieo","ngel dkxm")
mxkd legn
^P1STREET("IS","x`yeo lvieo","ngpez drelim")
milerd zepgn
^P1STREET("IS","x`yeo lvieo","ngpiim")
miipgn
^P1STREET("IS","x`yeo lvieo","niineo")
oeniin
^P1STREET("IS","x`yeo lvieo","nikd ieqs")
sqei dkin
^P1STREET("IS","x`yeo lvieo","nixeo")
oexin
^P1STREET("IS","x`yeo lvieo","niyex dpes")
sepd xeyin
^P1STREET("IS","x`yeo lvieo","nl`ki")
ik`ln
^P1STREET("IS","x`yeo lvieo","nlj dbym")
mybd jln
^P1STREET("IS","x`yeo lvieo","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","x`yeo lvieo","npcli")
ilcpn
^P1STREET("IS","x`yeo lvieo","nqilez")
zeliqn
^P1STREET("IS","x`yeo lvieo","nrbl dylem")
melyd lbrn
^P1STREET("IS","x`yeo lvieo","nref giim")
miig fern
^P1STREET("IS","x`yeo lvieo","nrepez axkd")
dkxa zepern
^P1STREET("IS","x`yeo lvieo","nrld bnl`")
`lnb dlrn
^P1STREET("IS","x`yeo lvieo","nrld dgniyd")
dyingd dlrn
^P1STREET("IS","x`yeo lvieo","nrtili nxewe")
ewexn ilitrn
^P1STREET("IS","x`yeo lvieo","nvcd")
dcvn
^P1STREET("IS","x`yeo lvieo","nwls")
slwn
^P1STREET("IS","x`yeo lvieo","nxac dwqnim")
minqwd caxn
^P1STREET("IS","x`yeo lvieo","nxbelio")
oilebxn
^P1STREET("IS","x`yeo lvieo","nxcki dideci")
icedid ikcxn
^P1STREET("IS","x`yeo lvieo","nxcki iaxaeim")
mieaxai ikcxn
^P1STREET("IS","x`yeo lvieo","nxem belo")
oleb mexn
^P1STREET("IS","x`yeo lvieo","nxhio aeax")
xaea oihxn
^P1STREET("IS","x`yeo lvieo","nxim")
mixn
^P1STREET("IS","x`yeo lvieo","nxweaiu `axdm")
mdxa` uiaewxn
^P1STREET("IS","x`yeo lvieo","nyd `xpeo")
oepx` dyn
^P1STREET("IS","x`yeo lvieo","nyd awx")
xwa dyn
^P1STREET("IS","x`yeo lvieo","nyd yxz")
zxy dyn
^P1STREET("IS","x`yeo lvieo","nye`ez ivgw")
wgvi ze`eyn
^P1STREET("IS","x`yeo lvieo","nyexx dye`d")
d`eyd xxeyn
^P1STREET("IS","x`yeo lvieo","nynx dixco")
ocxid xnyn
^P1STREET("IS","x`yeo lvieo","nynx dyleyd")
dyelyd xnyn
^P1STREET("IS","x`yeo lvieo","p`ez belo")
oleb ze`p
^P1STREET("IS","x`yeo lvieo","p`ez qpi")
ipq ze`p
^P1STREET("IS","x`yeo lvieo","pairez")
zeriap
^P1STREET("IS","x`yeo lvieo","pbad")
dabp
^P1STREET("IS","x`yeo lvieo","pdxiim")
miixdp
^P1STREET("IS","x`yeo lvieo","pea")
aep
^P1STREET("IS","x`yeo lvieo","ped cwlim")
milwc dep
^P1STREET("IS","x`yeo lvieo","ped nxcki")
ikcxn dep
^P1STREET("IS","x`yeo lvieo","peed `hia")
aih` deep
^P1STREET("IS","x`yeo lvieo","peed vieo")
oeiv deep
^P1STREET("IS","x`yeo lvieo","pexc`e")
e`cxep
^P1STREET("IS","x`yeo lvieo","pgl im")
mi lgp
^P1STREET("IS","x`yeo lvieo","pgl yexw")
wxey lgp
^P1STREET("IS","x`yeo lvieo","pgnd")
dngp
^P1STREET("IS","x`yeo lvieo","pgnid")
dingp
^P1STREET("IS","x`yeo lvieo","pie b'xqi")
iqx'b eip
^P1STREET("IS","x`yeo lvieo","pil""i")
i"lip
^P1STREET("IS","x`yeo lvieo","pix `axdm")
mdxa` xip
^P1STREET("IS","x`yeo lvieo","pix cec")
cec xip
^P1STREET("IS","x`yeo lvieo","prnd")
dnrp
^P1STREET("IS","x`yeo lvieo","prno")
onrp
^P1STREET("IS","x`yeo lvieo","pzia dryxd")
dxyrd aizp
^P1STREET("IS","x`yeo lvieo","pzo ylnd")
dnly ozp
^P1STREET("IS","x`yeo lvieo","q`lg nyd")
dyn gl`q
^P1STREET("IS","x`yeo lvieo","qbiq idecd")
dcedi qibq
^P1STREET("IS","x`yeo lvieo","qbl ie`l")
l`ei lbq
^P1STREET("IS","x`yeo lvieo","qbl nxcki")
ikcxn lbq
^P1STREET("IS","x`yeo lvieo","qdxea")
aexdq
^P1STREET("IS","x`yeo lvieo","qel ale")
ela leq
^P1STREET("IS","x`yeo lvieo","qetx irwa")
awri xteq
^P1STREET("IS","x`yeo lvieo","qewelea")
aeleweq
^P1STREET("IS","x`yeo lvieo","qgxea cec")
cec aexgq
^P1STREET("IS","x`yeo lvieo","qhto eiif")
fiie othq
^P1STREET("IS","x`yeo lvieo","qhxend")
dnexhq
^P1STREET("IS","x`yeo lvieo","qicpi `lhno")
onhl` ipciq
^P1STREET("IS","x`yeo lvieo","qitexi `bcez")
zecb` ixetiq
^P1STREET("IS","x`yeo lvieo","qnhz avl`l")
l`lva zhnq
^P1STREET("IS","x`yeo lvieo","qnilpqwi")
iwqplinq
^P1STREET("IS","x`yeo lvieo","qnilv'pqwi")
iwqp'vlinq
^P1STREET("IS","x`yeo lvieo","qpiex")
xeipq
^P1STREET("IS","x`yeo lvieo","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","x`yeo lvieo","qtipz dyleyd")
dyelyd zpitq
^P1STREET("IS","x`yeo lvieo","qtix ieqs")
sqei xitq
^P1STREET("IS","x`yeo lvieo","reacid")
dicaer
^P1STREET("IS","x`yeo lvieo","reli aal")
laa iler
^P1STREET("IS","x`yeo lvieo","reli dbxcem")
mecxbd iler
^P1STREET("IS","x`yeo lvieo","rfx`")
`xfr
^P1STREET("IS","x`yeo lvieo","rfx` eavxeo")
oexvae `xfr
^P1STREET("IS","x`yeo lvieo","rhxez")
zexhr
^P1STREET("IS","x`yeo lvieo","rhxz fda")
adf zxhr
^P1STREET("IS","x`yeo lvieo","rio ba")
ab oir
^P1STREET("IS","x`yeo lvieo","rio dntxu")
uxtnd oir
^P1STREET("IS","x`yeo lvieo","rio dwex`")
`xewd oir
^P1STREET("IS","x`yeo lvieo","rio vexim")
mixev oir
^P1STREET("IS","x`yeo lvieo","rix`wi ylnd")
dnly iw`xir
^P1STREET("IS","x`yeo lvieo","rl kpti pyxim")
mixyp itpk lr
^P1STREET("IS","x`yeo lvieo","rlenim")
minelr
^P1STREET("IS","x`yeo lvieo","rlifd abio")
oiba dfilr
^P1STREET("IS","x`yeo lvieo","rliz dperx")
xrepd zilr
^P1STREET("IS","x`yeo lvieo","rnix")
xinr
^P1STREET("IS","x`yeo lvieo","rpax")
xapr
^P1STREET("IS","x`yeo lvieo","rvnepd")
dpenvr
^P1STREET("IS","x`yeo lvieo","tefppqwi npgm")
mgpn iwqppfet
^P1STREET("IS","x`yeo lvieo","tegv'aqwi nikl")
lkin iwqa'vget
^P1STREET("IS","x`yeo lvieo","tel diif")
fiid let
^P1STREET("IS","x`yeo lvieo","tetl")
ltet
^P1STREET("IS","x`yeo lvieo","thxid")
dixht
^P1STREET("IS","x`yeo lvieo","tiio apinio")
oinipa oiit
^P1STREET("IS","x`yeo lvieo","tiipaxb")
bxapiit
^P1STREET("IS","x`yeo lvieo","tiipyhiio")
oiihypiit
^P1STREET("IS","x`yeo lvieo","tiiq cec")
cec qiit
^P1STREET("IS","x`yeo lvieo","tipq")
qpit
^P1STREET("IS","x`yeo lvieo","tipqwx")
xwqpit
^P1STREET("IS","x`yeo lvieo","tiw""`")
`"wit
^P1STREET("IS","x`yeo lvieo","tiylfeo")
oeflyit
^P1STREET("IS","x`yeo lvieo","tlehivwi")
iwvihelt
^P1STREET("IS","x`yeo lvieo","tlhio ptzli")
ilztp oihlt
^P1STREET("IS","x`yeo lvieo","tln""g")
g"nlt
^P1STREET("IS","x`yeo lvieo","tpgqeaiu")
uiaeqgpt
^P1STREET("IS","x`yeo lvieo","tpi eiyx`l")
l`xyie ipt
^P1STREET("IS","x`yeo lvieo","tpipd nyd")
dyn dpipt
^P1STREET("IS","x`yeo lvieo","tpipz dim")
mid zpipt
^P1STREET("IS","x`yeo lvieo","tpwq cec")
cec qwpt
^P1STREET("IS","x`yeo lvieo","txeb")
bext
^P1STREET("IS","x`yeo lvieo","txet' baxide")
edixab 'text
^P1STREET("IS","x`yeo lvieo","txet' pgem")
megp 'text
^P1STREET("IS","x`yeo lvieo","txi bo")
ob ixt
^P1STREET("IS","x`yeo lvieo","txicno nilheo")
oehlin oncixt
^P1STREET("IS","x`yeo lvieo","txiino irwa")
awri oniixt
^P1STREET("IS","x`yeo lvieo","txiyno")
onyixt
^P1STREET("IS","x`yeo lvieo","txpw vai")
iav wpxt
^P1STREET("IS","x`yeo lvieo","txu")
uxt
^P1STREET("IS","x`yeo lvieo","txu wxlo")
olxw uxt
^P1STREET("IS","x`yeo lvieo","txyweaqwi")
iwqaewyxt
^P1STREET("IS","x`yeo lvieo","v""b apez")
zepa b"v
^P1STREET("IS","x`yeo lvieo","v'lpea")
aepl'v
^P1STREET("IS","x`yeo lvieo","vai behno")
onheb iav
^P1STREET("IS","x`yeo lvieo","vd""l")
l"dv
^P1STREET("IS","x`yeo lvieo","viihlio")
oilhiiv
^P1STREET("IS","x`yeo lvieo","vllikio")
oikillv
^P1STREET("IS","x`yeo lvieo","vng")
gnv
^P1STREET("IS","x`yeo lvieo","vxpea vai")
iav aepxv
^P1STREET("IS","x`yeo lvieo","w`lia")
ail`w
^P1STREET("IS","x`yeo lvieo","w`tg")
gt`w
^P1STREET("IS","x`yeo lvieo","wcnz qipi")
ipiq zncw
^P1STREET("IS","x`yeo lvieo","wcnz qpi")
ipq zncw
^P1STREET("IS","x`yeo lvieo","wfeypx `axdm")
mdxa` xpyefw
^P1STREET("IS","x`yeo lvieo","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","x`yeo lvieo","wicey dym")
myd yeciw
^P1STREET("IS","x`yeo lvieo","witpiq")
qiptiw
^P1STREET("IS","x`yeo lvieo","wl""g")
g"lw
^P1STREET("IS","x`yeo lvieo","wlefpx ieqs")
sqei xpfelw
^P1STREET("IS","x`yeo lvieo","wliavwi")
iwvailw
^P1STREET("IS","x`yeo lvieo","wlitexpid")
dipxetilw
^P1STREET("IS","x`yeo lvieo","wliyx")
xyilw
^P1STREET("IS","x`yeo lvieo","wntipqwi")
iwqpitnw
^P1STREET("IS","x`yeo lvieo","wp`im")
mi`pw
^P1STREET("IS","x`yeo lvieo","wpx")
xpw
^P1STREET("IS","x`yeo lvieo","wtlo")
oltw
^P1STREET("IS","x`yeo lvieo","wtlpqwi")
iwqpltw
^P1STREET("IS","x`yeo lvieo","wvxio")
oixvw
^P1STREET("IS","x`yeo lvieo","wxeo `dxo")
oxd` oexw
^P1STREET("IS","x`yeo lvieo","wxiizi")
iziixw
^P1STREET("IS","x`yeo lvieo","wxiz qtx")
xtq zixw
^P1STREET("IS","x`yeo lvieo","wxl phx")
xhp lxw
^P1STREET("IS","x`yeo lvieo","wxo diqec")
ceqid oxw
^P1STREET("IS","x`yeo lvieo","wxo winz")
zniw oxw
^P1STREET("IS","x`yeo lvieo","wxv'aqwi")
iwqa'vxw
^P1STREET("IS","x`yeo lvieo","x`eao")
oae`x
^P1STREET("IS","x`yeo lvieo","x`eao eaz yar")
ray zae oae`x
^P1STREET("IS","x`yeo lvieo","x`eao ieclaiu")
uialcei oae`x
^P1STREET("IS","x`yeo lvieo","x`m")
m`x
^P1STREET("IS","x`yeo lvieo","xacim")
micax
^P1STREET("IS","x`yeo lvieo","xai idecd dpyi`")
`iypd dcedi iax
^P1STREET("IS","x`yeo lvieo","xai n`ix")
xi`n iax
^P1STREET("IS","x`yeo lvieo","xai nyd ao pgno")
ongp oa dyn iax
^P1STREET("IS","x`yeo lvieo","xai rwia`")
`aiwr iax
^P1STREET("IS","x`yeo lvieo","xaic")
ciax
^P1STREET("IS","x`yeo lvieo","xape zm")
mz epax
^P1STREET("IS","x`yeo lvieo","xawd beax")
xaeb dwax
^P1STREET("IS","x`yeo lvieo","xba nxcki")
ikcxn abx
^P1STREET("IS","x`yeo lvieo","xc""w")
w"cx
^P1STREET("IS","x`yeo lvieo","xeaxh tebl")
lbet hxaex
^P1STREET("IS","x`yeo lvieo","xefio")
oifex
^P1STREET("IS","x`yeo lvieo","xefpqwi nxcki")
ikcxn iwqpfex
^P1STREET("IS","x`yeo lvieo","xehpaxb")
bxaphex
^P1STREET("IS","x`yeo lvieo","xehyilc")
cliyhex
^P1STREET("IS","x`yeo lvieo","xeif ieqs")
sqei fiex
^P1STREET("IS","x`yeo lvieo","xeo giim")
miig oex
^P1STREET("IS","x`yeo lvieo","xetio")
oitex
^P1STREET("IS","x`yeo lvieo","xewg")
gwex
^P1STREET("IS","x`yeo lvieo","xgl dnyexxz")
zxxeynd lgx
^P1STREET("IS","x`yeo lvieo","xgl ip`iz")
zi`pi lgx
^P1STREET("IS","x`yeo lvieo","xia""l")
l"aix
^P1STREET("IS","x`yeo lvieo","xiipq")
qpiix
^P1STREET("IS","x`yeo lvieo","xiv`xc tiipno")
onpiit cx`vix
^P1STREET("IS","x`yeo lvieo","xna""m")
m"anx
^P1STREET("IS","x`yeo lvieo","xna""o")
o"anx
^P1STREET("IS","x`yeo lvieo","xnf")
fnx
^P1STREET("IS","x`yeo lvieo","xng""l")
l"gnx
^P1STREET("IS","x`yeo lvieo","xnz nbyinim")
miniybn znx
^P1STREET("IS","x`yeo lvieo","xt`l `xid")
dix` l`tx
^P1STREET("IS","x`yeo lvieo","xticim")
micitx
^P1STREET("IS","x`yeo lvieo","xy""i")
i"yx
^P1STREET("IS","x`yeo lvieo","xya""`")
`"ayx
^P1STREET("IS","x`yeo lvieo","y""i rbpeo")
oepbr i"y
^P1STREET("IS","x`yeo lvieo","yafi")
ifay
^P1STREET("IS","x`yeo lvieo","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","x`yeo lvieo","yaz `gim")
mig` zay
^P1STREET("IS","x`yeo lvieo","yc' dieal")
laeid 'cy
^P1STREET("IS","x`yeo lvieo","yc' dviepez")
zepeivd 'cy
^P1STREET("IS","x`yeo lvieo","yc' dxvl")
lvxd 'cy
^P1STREET("IS","x`yeo lvieo","yc' irwa")
awri 'cy
^P1STREET("IS","x`yeo lvieo","yc' ivgw xaio")
oiax wgvi 'cy
^P1STREET("IS","x`yeo lvieo","yc' lei `ykel")
leky` iel 'cy
^P1STREET("IS","x`yeo lvieo","yc' nipqhx")
xhqpin 'cy
^P1STREET("IS","x`yeo lvieo","yc' npgm abio")
oiba mgpn 'cy
^P1STREET("IS","x`yeo lvieo","yc' nxilpc")
cplixn 'cy
^P1STREET("IS","x`yeo lvieo","yc' nyd ciio")
oiic dyn 'cy
^P1STREET("IS","x`yeo lvieo","yc' pim")
mip 'cy
^P1STREET("IS","x`yeo lvieo","yc' xgarm f`ai")
ia`f mragx 'cy
^P1STREET("IS","x`yeo lvieo","yc' zy""g")
g"yz 'cy
^P1STREET("IS","x`yeo lvieo","ycd `lide")
edil` dcy
^P1STREET("IS","x`yeo lvieo","ycd exaexb")
bxeaxe dcy
^P1STREET("IS","x`yeo lvieo","ycd pgem")
megp dcy
^P1STREET("IS","x`yeo lvieo","ycez")
zecy
^P1STREET("IS","x`yeo lvieo","ycnez caexd")
dxeac zency
^P1STREET("IS","x`yeo lvieo","yedm")
mdey
^P1STREET("IS","x`yeo lvieo","yegh npid")
dipn hgey
^P1STREET("IS","x`yeo lvieo","yeyo daixd")
dxiad oyey
^P1STREET("IS","x`yeo lvieo","yeypz irwa")
awri zpyey
^P1STREET("IS","x`yeo lvieo","yiaz vieo")
oeiv zaiy
^P1STREET("IS","x`yeo lvieo","yipwio")
oiwpiy
^P1STREET("IS","x`yeo lvieo","yixd")
dxiy
^P1STREET("IS","x`yeo lvieo","ylem `y")
y` mely
^P1STREET("IS","x`yeo lvieo","ylem rlikm")
mkilr mely
^P1STREET("IS","x`yeo lvieo","ylepqwi")
iwqpely
^P1STREET("IS","x`yeo lvieo","ylih")
hily
^P1STREET("IS","x`yeo lvieo","ylnd ao cec")
cec oa dnly
^P1STREET("IS","x`yeo lvieo","ylnd dnlj")
jlnd dnly
^P1STREET("IS","x`yeo lvieo","ylnd teanaxeaqwi")
iwqaexanaet dnly
^P1STREET("IS","x`yeo lvieo","ylpb f`a")
a`f bply
^P1STREET("IS","x`yeo lvieo","yne`l dpai`")
`iapd l`eny
^P1STREET("IS","x`yeo lvieo","yne`l yxix`")
`xixy l`eny
^P1STREET("IS","x`yeo lvieo","ynehwio")
oiwheny
^P1STREET("IS","x`yeo lvieo","ynreo txq")
qxt oerny
^P1STREET("IS","x`yeo lvieo","ynrepi")
iperny
^P1STREET("IS","x`yeo lvieo","ynxide leio")
oiel edixny
^P1STREET("IS","x`yeo lvieo","ynyeo")
oeyny
^P1STREET("IS","x`yeo lvieo","ynyeo alwipc")
cpiwla oeyny
^P1STREET("IS","x`yeo lvieo","ynyeo xaipeaiu")
uiaepiax oeyny
^P1STREET("IS","x`yeo lvieo","ypda")
adpy
^P1STREET("IS","x`yeo lvieo","yrx dbelo")
olebd xry
^P1STREET("IS","x`yeo lvieo","yrx dnlj")
jlnd xry
^P1STREET("IS","x`yeo lvieo","yrxid")
dixry
^P1STREET("IS","x`yeo lvieo","ythl `xid")
dix` lhty
^P1STREET("IS","x`yeo lvieo","ytipefd")
dfepity
^P1STREET("IS","x`yeo lvieo","ytix` b`eo")
oe`b `xity
^P1STREET("IS","x`yeo lvieo","ytix` vai dxno")
onxd iav `xity
^P1STREET("IS","x`yeo lvieo","ytxipvw")
wvpixty
^P1STREET("IS","x`yeo lvieo","ywelpiw")
wiplewy
^P1STREET("IS","x`yeo lvieo","yxd e`lide wtlo")
oltw edil`e dxy
^P1STREET("IS","x`yeo lvieo","yxepd")
dpexy
^P1STREET("IS","x`yeo lvieo","yxs giim")
miig sxy
^P1STREET("IS","x`yeo lvieo","zcdx cec")
cec xdcz
^P1STREET("IS","x`yeo lvieo","zex dfda")
adfd xez
^P1STREET("IS","x`yeo lvieo","zexd eraecd")
dceare dxez
^P1STREET("IS","x`yeo lvieo","zl gi")
ig lz
^P1STREET("IS","x`yeo lvieo","zl ivgw")
wgvi lz
^P1STREET("IS","x`yeo lvieo","zp`im")
mi`pz
^P1STREET("IS","x`yeo lvieo","zperz dperx")
xrepd zrepz
^P1STREET("IS","x`yeo lvieo","zpgem")
megpz
^P1STREET("IS","x`yeo lvieo","zxn""a")
a"nxz
^P1STREET("IS","x`yeo lvieo","zxyiy")
yiyxz
^P1STREET("IS","xaad")
daax
^P1STREET("IS","xaad","`xu gncd")
dcng ux`
^P1STREET("IS","xaad","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","xacim")
micax
^P1STREET("IS","xaiaim")
miaiax
^P1STREET("IS","xbad")
dabx
^P1STREET("IS","xbaim")
miabx
^P1STREET("IS","xdh")
hdx
^P1STREET("IS","xdh","xg' 18")
18 'gx
^P1STREET("IS","xdh","xg' 19")
19 'gx
^P1STREET("IS","xdh","xg' 50")
50 'gx
^P1STREET("IS","xegnd")
dngex
^P1STREET("IS","xgeaez")
zeaegx
^P1STREET("IS","xgeaez","`""c bexceo")
oecxeb c"`
^P1STREET("IS","xgeaez","`ai' enzi' leqhxpiw")
wipxhqel 'izne 'ia`
^P1STREET("IS","xgeaez","`aiperm pgnpi")
ipngp mrepia`
^P1STREET("IS","xgeaez","`ao baixel")
lexiab oa`
^P1STREET("IS","xgeaez","`ao rfx`")
`xfr oa`
^P1STREET("IS","xgeaez","`axap`l")
l`paxa`
^P1STREET("IS","xgeaez","`axj gpd")
dpg jxa`
^P1STREET("IS","xgeaez","`axnqeo nixeo")
oexin oeqnxa`
^P1STREET("IS","xgeaez","`bnid")
dinb`
^P1STREET("IS","xgeaez","`daz ylem")
mely zad`
^P1STREET("IS","xgeaez","`dxeo `iifpaxb")
bxapfii` oexd`
^P1STREET("IS","xgeaez","`dxeo ixia")
aixi oexd`
^P1STREET("IS","xgeaez","`dxepeaiu dll")
lld uiaepexd`
^P1STREET("IS","xgeaez","`dxepeaiu ieqs")
sqei uiaepexd`
^P1STREET("IS","xgeaez","`dxepi")
ipexd`
^P1STREET("IS","xgeaez","`ecm")
mce`
^P1STREET("IS","xgeaez","`eqiywio")
oiwyiqe`
^P1STREET("IS","xgeaez","`exaj giim")
miig jaxe`
^P1STREET("IS","xgeaez","`eyd")
dye`
^P1STREET("IS","xgeaez","`gc drm")
mrd cg`
^P1STREET("IS","xgeaez","`gim wiaeaiu")
uiaeaiw mig`
^P1STREET("IS","xgeaez","`ifnxbc")
cbxnfi`
^P1STREET("IS","xgeaez","`ipyhiio")
oiihypi`
^P1STREET("IS","xgeaez","`lenez")
zenel`
^P1STREET("IS","xgeaez","`lhyelx irwa")
awri xleyhl`
^P1STREET("IS","xgeaez","`lirfx ao idecd")
dcedi oa xfril`
^P1STREET("IS","xgeaez","`lkq ieqs yxb`")
`bxy sqei qkl`
^P1STREET("IS","xgeaez","`lwlri")
irlwl`
^P1STREET("IS","xgeaez","`nxi giim")
miig ixn`
^P1STREET("IS","xgeaez","`pilaiu")
uialip`
^P1STREET("IS","xgeaez","`xbno")
onbx`
^P1STREET("IS","xgeaez","`xid celv'io")
oi'vlec dix`
^P1STREET("IS","xgeaez","`xlefexea")
aexefelx`
^P1STREET("IS","xgeaez","`xlij vai")
iav jilx`
^P1STREET("IS","xgeaez","`xvi f`a")
a`f ivx`
^P1STREET("IS","xgeaez","`yc ynreo")
oerny cy`
^P1STREET("IS","xgeaez","`yl")
ly`
^P1STREET("IS","xgeaez","`yxea")
aexy`
^P1STREET("IS","xgeaez","a`x nim giim")
miig min x`a
^P1STREET("IS","xgeaez","a`xi")
ix`a
^P1STREET("IS","xgeaez","aeql")
lqea
^P1STREET("IS","xgeaez","aeqzo")
ozqea
^P1STREET("IS","xgeaez","aeqzp`i")
i`pzqea
^P1STREET("IS","xgeaez","aexbio ideyr")
ryedi oibxea
^P1STREET("IS","xgeaez","aexekea")
aekexea
^P1STREET("IS","xgeaez","ai`lx wlno")
onlw xl`ia
^P1STREET("IS","xgeaez","ail""e")
e"lia
^P1STREET("IS","xgeaez","aiz dievx")
xveid zia
^P1STREET("IS","xgeaez","aiz dterlim")
milretd zia
^P1STREET("IS","xgeaez","akx nik`l")
l`kin xka
^P1STREET("IS","xgeaez","ao `xi yxb`")
`bxy ix` oa
^P1STREET("IS","xgeaez","ao iyx`l")
l`xyi oa
^P1STREET("IS","xgeaez","ao vieo tebl")
lbet oeiv oa
^P1STREET("IS","xgeaez","api nyd")
dyn ipa
^P1STREET("IS","xgeaez","apinio")
oinipa
^P1STREET("IS","xgeaez","arl dzpi`")
`ipzd lra
^P1STREET("IS","xgeaez","ax `ilo")
oli` xa
^P1STREET("IS","xgeaez","ax keka`")
`akek xa
^P1STREET("IS","xgeaez","ax y`el")
le`y xa
^P1STREET("IS","xgeaez","axfili nyd")
dyn ilifxa
^P1STREET("IS","xgeaez","axno irwa")
awri onxa
^P1STREET("IS","xgeaez","axpx")
xpxa
^P1STREET("IS","xgeaez","axwz")
zwxa
^P1STREET("IS","xgeaez","ay`xi")
ix`ya
^P1STREET("IS","xgeaez","b`eld")
dle`b
^P1STREET("IS","xgeaez","baexi iyx`l")
l`xyi ixeab
^P1STREET("IS","xgeaez","barz dgxeaim")
miaexgd zrab
^P1STREET("IS","xgeaez","baxi`lea wlno")
onlw ael`ixab
^P1STREET("IS","xgeaez","bazeo")
oezab
^P1STREET("IS","xgeaez","bcec 52")
52 cecb
^P1STREET("IS","xgeaez","bcqi `dxeo")
oexd` iqcb
^P1STREET("IS","xgeaez","belcaxb")
bxacleb
^P1STREET("IS","xgeaez","belcd n`ix")
xi`n dcleb
^P1STREET("IS","xgeaez","belcio")
oicleb
^P1STREET("IS","xgeaez","belcyhiio")
oiihycleb
^P1STREET("IS","xgeaez","belena")
aneleb
^P1STREET("IS","xgeaez","bex idecd")
dcedi xeb
^P1STREET("IS","xgeaez","bexceo ")
 oecxeb
^P1STREET("IS","xgeaez","bexeciqwi")
iwqicexeb
^P1STREET("IS","xgeaez","bey rvieo")
oeivr yeb
^P1STREET("IS","xgeaez","blbl")
lblb
^P1STREET("IS","xgeaez","bleqw` fkxid")
dixkf `wqelb
^P1STREET("IS","xgeaez","bleqwio")
oiwqelb
^P1STREET("IS","xgeaez","blfx `lide")
edil` xflb
^P1STREET("IS","xgeaez","bnli`l ao fk`i")
i`kf oa l`ilnb
^P1STREET("IS","xgeaez","bxu")
uxb
^P1STREET("IS","xgeaez","c""x aerf awx")
xwa frea x"c
^P1STREET("IS","xgeaez","c""x dxno n``q")
q``n onxd x"c
^P1STREET("IS","xgeaez","ca def")
fed ac
^P1STREET("IS","xgeaez","cbo")
obc
^P1STREET("IS","xgeaez","cdxi ylem")
mely ixdc
^P1STREET("IS","xgeaez","ceaipaeim")
mieapiaec
^P1STREET("IS","xgeaez","ceapea")
aepaec
^P1STREET("IS","xgeaez","cec `lrfx")
xfrl` cec
^P1STREET("IS","xgeaez","cec iyx`l")
l`xyi cec
^P1STREET("IS","xgeaez","cec ynrepi")
iperny cec
^P1STREET("IS","xgeaez","cekitz")
ztikec
^P1STREET("IS","xgeaez","celipqwi")
iwqpilec
^P1STREET("IS","xgeaez","cepciwea")
aewicpec
^P1STREET("IS","xgeaez","cex idecd")
dcedi xec
^P1STREET("IS","xgeaez","ciio ynreo")
oerny oiic
^P1STREET("IS","xgeaez","cnyw `lirfx")
xfril` wync
^P1STREET("IS","xgeaez","cpi`li rneq")
qenr il`ipc
^P1STREET("IS","xgeaez","cxex")
xexc
^P1STREET("IS","xgeaez","cxj `v""l")
l"v` jxc
^P1STREET("IS","xgeaez","cxj ao bexieo")
oeixeb oa jxc
^P1STREET("IS","xgeaez","cxj ao bx`")
`xb oa jxc
^P1STREET("IS","xgeaez","cxj bc tipyhiio")
oiihypit cb jxc
^P1STREET("IS","xgeaez","cxj dim")
mid jxc
^P1STREET("IS","xgeaez","cxj iapd")
dpai jxc
^P1STREET("IS","xgeaez","cxj iem dktexim")
mixetkd mei jxc
^P1STREET("IS","xgeaez","cxj ivgw ao `xi")
ix` oa wgvi jxc
^P1STREET("IS","xgeaez","cxj ivgw tpibx")
xbipt wgvi jxc
^P1STREET("IS","xgeaez","cxj ixeylim")
milyexi jxc
^P1STREET("IS","xgeaez","cxj n`ix eiqbl")
lbqie xi`n jxc
^P1STREET("IS","xgeaez","cxj npgm abio")
oiba mgpn jxc
^P1STREET("IS","xgeaez","cxj yyz dinim")
minid zyy jxc
^P1STREET("IS","xgeaez","d' a`iix")
xii`a 'd
^P1STREET("IS","xgeaez","d`bef")
feb`d
^P1STREET("IS","xgeaez","d`cnex")
xenc`d
^P1STREET("IS","xgeaez","d`exo")
oxe`d
^P1STREET("IS","xgeaez","d`gim hxaq")
qaxh mig`d
^P1STREET("IS","xgeaez","d`ld")
dl`d
^P1STREET("IS","xgeaez","d`leo")
oel`d
^P1STREET("IS","xgeaez","d`ndez")
zedn`d
^P1STREET("IS","xgeaez","d`nex`im")
mi`xen`d
^P1STREET("IS","xgeaez","d`x""i")
i"x`d
^P1STREET("IS","xgeaez","d`xf")
fx`d
^P1STREET("IS","xgeaez","daeym")
myead
^P1STREET("IS","xgeaez","dapim")
mipad
^P1STREET("IS","xgeaez","dary""h")
h"yrad
^P1STREET("IS","xgeaez","daxey")
yexad
^P1STREET("IS","xgeaez","daxibcd")
dcbixad
^P1STREET("IS","xgeaez","db`eo dao `iy gi")
ig yi` oad oe`bd
^P1STREET("IS","xgeaez","db`epim")
mipe`bd
^P1STREET("IS","xgeaez","dbelo")
olebd
^P1STREET("IS","xgeaez","dbexo")
oxebd
^P1STREET("IS","xgeaez","dblil")
lilbd
^P1STREET("IS","xgeaez","dblrc")
crlbd
^P1STREET("IS","xgeaez","dbto")
otbd
^P1STREET("IS","xgeaez","dbx""`")
`"xbd
^P1STREET("IS","xgeaez","dcbpiez")
zeipbcd
^P1STREET("IS","xgeaez","dcela")
alecd
^P1STREET("IS","xgeaez","dcwl")
lwcd
^P1STREET("IS","xgeaez","dcx")
xcd
^P1STREET("IS","xgeaez","ddbpd")
dpbdd
^P1STREET("IS","xgeaez","ddcq")
qcdd
^P1STREET("IS","xgeaez","ddqzcxez")
zexczqdd
^P1STREET("IS","xgeaez","ddxces")
secxdd
^P1STREET("IS","xgeaez","delvno giim")
miig onvled
^P1STREET("IS","xgeaez","dexeaiu")
uiaexed
^P1STREET("IS","xgeaez","dfedx")
xdefd
^P1STREET("IS","xgeaez","dfiz")
zifd
^P1STREET("IS","xgeaez","dgaexd")
dxeagd
^P1STREET("IS","xgeaez","dgihd")
dhigd
^P1STREET("IS","xgeaez","dgippiz")
zippigd
^P1STREET("IS","xgeaez","dgleu")
uelgd
^P1STREET("IS","xgeaez","dgva")
avgd
^P1STREET("IS","xgeaez","dgxviz")
zivxgd
^P1STREET("IS","xgeaez","didlem")
meldid
^P1STREET("IS","xgeaez","diqnio")
oinqid
^P1STREET("IS","xgeaez","dixco")
ocxid
^P1STREET("IS","xgeaez","dklpiez")
zeiplkd
^P1STREET("IS","xgeaez","dkxm")
mxkd
^P1STREET("IS","xgeaez","dlaepd")
dpeald
^P1STREET("IS","xgeaez","dll egpo `etpdiinx")
xniidpte` opge lld
^P1STREET("IS","xgeaez","dll irwa")
awri lld
^P1STREET("IS","xgeaez","dncr")
rcnd
^P1STREET("IS","xgeaez","dnex")
xend
^P1STREET("IS","xgeaez","dnlkim")
miklnd
^P1STREET("IS","xgeaez","dnpes")
sepnd
^P1STREET("IS","xgeaez","dnrtil")
litrnd
^P1STREET("IS","xgeaez","dnxc")
cxnd
^P1STREET("IS","xgeaez","dpai`im")
mi`iapd
^P1STREET("IS","xgeaez","dpehx")
xhepd
^P1STREET("IS","xgeaez","dpexiz")
zixepd
^P1STREET("IS","xgeaez","dpxwiqim")
miqiwxpd
^P1STREET("IS","xgeaez","dpyi` dx`yeo")
oey`xd `iypd
^P1STREET("IS","xgeaez","dqaieo")
oeiaqd
^P1STREET("IS","xgeaez","dqbliez")
zeilbqd
^P1STREET("IS","xgeaez","dqncx")
xcnqd
^P1STREET("IS","xgeaez","dqpdcxio")
oixcdpqd
^P1STREET("IS","xgeaez","draecd")
dceard
^P1STREET("IS","xgeaez","drixiz")
zixird
^P1STREET("IS","xgeaez","drlid")
dilrd
^P1STREET("IS","xgeaez","drnw")
wnrd
^P1STREET("IS","xgeaez","drxad")
daxrd
^P1STREET("IS","xgeaez","drxneo")
oenxrd
^P1STREET("IS","xgeaez","dterl dvrix")
xirvd lretd
^P1STREET("IS","xgeaez","dtxb")
bxtd
^P1STREET("IS","xgeaez","dtxhifpim")
mipfihxtd
^P1STREET("IS","xgeaez","dvpgpim")
mipgpvd
^P1STREET("IS","xgeaez","dvtixd")
dxitvd
^P1STREET("IS","xgeaez","dx dvetim")
mitevd xd
^P1STREET("IS","xgeaez","dx`""f")
f"`xd
^P1STREET("IS","xgeaez","dx`yepim")
mipey`xd
^P1STREET("IS","xgeaez","dxa cec pca")
acp cec axd
^P1STREET("IS","xgeaez","dxa dxveb")
bevxd axd
^P1STREET("IS","xgeaez","dxa n`ix")
xi`n axd
^P1STREET("IS","xgeaez","dxa nineo")
oenin axd
^P1STREET("IS","xgeaez","dxa y`eli")
ile`y axd
^P1STREET("IS","xgeaez","dxa yhiipno vai")
iav onpiihy axd
^P1STREET("IS","xgeaez","dxa yiax")
xaiy axd
^P1STREET("IS","xgeaez","dxaaqwi")
iwqaaxd
^P1STREET("IS","xgeaez","dxe`d")
d`exd
^P1STREET("IS","xgeaez","dxezm")
mzexd
^P1STREET("IS","xgeaez","dxineo")
oenixd
^P1STREET("IS","xgeaez","dxvl")
lvxd
^P1STREET("IS","xgeaez","dxwtz")
ztwxd
^P1STREET("IS","xgeaez","dxypfeo")
oefpyxd
^P1STREET("IS","xgeaez","dyenxim")
mixneyd
^P1STREET("IS","xgeaez","dyethim")
mihteyd
^P1STREET("IS","xgeaez","dyfis")
sifyd
^P1STREET("IS","xgeaez","dyiwnd")
dnwiyd
^P1STREET("IS","xgeaez","dylem")
melyd
^P1STREET("IS","xgeaez","dyrexd")
dxeryd
^P1STREET("IS","xgeaez","dywc")
cwyd
^P1STREET("IS","xgeaez","dyxeo")
oexyd
^P1STREET("IS","xgeaez","dz`pd")
dp`zd
^P1STREET("IS","xgeaez","dzgid")
digzd
^P1STREET("IS","xgeaez","dzp`im")
mi`pzd
^P1STREET("IS","xgeaez","dzwed")
dewzd
^P1STREET("IS","xgeaez","dzwend")
dnewzd
^P1STREET("IS","xgeaez","eicx f`a")
a`f xcie
^P1STREET("IS","xgeaez","eiiqaexb")
bxeaqiie
^P1STREET("IS","xgeaez","eilweniu")
uinewlie
^P1STREET("IS","xgeaez","eipx ieqs")
sqei xpie
^P1STREET("IS","xgeaez","eivno")
onvie
^P1STREET("IS","xgeaez","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","xgeaez","f`a `iifpx")
xpfii` a`f
^P1STREET("IS","xgeaez","filaxno y`el")
le`y onxalif
^P1STREET("IS","xgeaez","fq")
qf
^P1STREET("IS","xgeaez","fwq `txim")
mixt` qwf
^P1STREET("IS","xgeaez","ga""c")
c"ag
^P1STREET("IS","xgeaez","gaiai igfw`l")
l`wfgi iaiag
^P1STREET("IS","xgeaez","gavlz dyxeo")
oexyd zlvag
^P1STREET("IS","xgeaez","gebld")
dlbeg
^P1STREET("IS","xgeaez","gegiz")
zigeg
^P1STREET("IS","xgeaez","gexy")
yxeg
^P1STREET("IS","xgeaez","geyo")
oyeg
^P1STREET("IS","xgeaez","gfeo `iy")
yi` oefg
^P1STREET("IS","xgeaez","gfiz dcxem")
mexcd zifg
^P1STREET("IS","xgeaez","gi""y")
y"ig
^P1STREET("IS","xgeaez","giim `lirfx")
xfril` miig
^P1STREET("IS","xgeaez","giim ax la")
al xa miig
^P1STREET("IS","xgeaez","giim dxno w`etno")
onte`w onxd miig
^P1STREET("IS","xgeaez","giim ilio")
oili miig
^P1STREET("IS","xgeaez","giim lqwea")
aewql miig
^P1STREET("IS","xgeaez","giim qixpi")
ipxiq miig
^P1STREET("IS","xgeaez","gpwio")
oiwpg
^P1STREET("IS","xgeaez","gq""n")
n"qg
^P1STREET("IS","xgeaez","gqicd")
dciqg
^P1STREET("IS","xgeaez","gtu giim")
miig utg
^P1STREET("IS","xgeaez","gv' qlr")
rlq 'vg
^P1STREET("IS","xgeaez","gxevim")
mivexg
^P1STREET("IS","xgeaez","gxeyz")
zyexg
^P1STREET("IS","xgeaez","gxl""t")
t"lxg
^P1STREET("IS","xgeaez","gxy nyd")
dyn yxg
^P1STREET("IS","xgeaez","hekno")
onkeh
^P1STREET("IS","xgeaez","hlx")
xlh
^P1STREET("IS","xgeaez","htx iyx`l")
l`xyi xth
^P1STREET("IS","xgeaez","hxentlcex")
xecltnexh
^P1STREET("IS","xgeaez","hxiiaey")
yeaiixh
^P1STREET("IS","xgeaez","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","xgeaez","i""l txu")
uxt l"i
^P1STREET("IS","xgeaez","i`ix")
xi`i
^P1STREET("IS","xgeaez","i`ix eyxd wtx`")
`xtw dxye xi`i
^P1STREET("IS","xgeaez","i`pey wexv'`w")
w`'vxew yep`i
^P1STREET("IS","xgeaez","ic eym")
mye ci
^P1STREET("IS","xgeaez","ide`y")
y`edi
^P1STREET("IS","xgeaez","idecd dlei")
ield dcedi
^P1STREET("IS","xgeaez","idecd dnkai")
iaknd dcedi
^P1STREET("IS","xgeaez","ideciz `axdm tqhxpw")
wpxhqt mdxa` zicedi
^P1STREET("IS","xgeaez","ideyr ao gppid")
dippg oa ryedi
^P1STREET("IS","xgeaez","ieqs ao `dxeo")
oexd` oa sqei
^P1STREET("IS","xgeaez","ieqs geayi")
iyaeg sqei
^P1STREET("IS","xgeaez","ieqs iyride")
ediryi sqei
^P1STREET("IS","xgeaez","igi` ib`l")
l`bi `igi
^P1STREET("IS","xgeaez","il""b")
b"li
^P1STREET("IS","xgeaez","irau")
uari
^P1STREET("IS","xgeaez","irwa")
awri
^P1STREET("IS","xgeaez","irwa cxei`o")
o`iexc awri
^P1STREET("IS","xgeaez","irwa yxrai")
iarxy awri
^P1STREET("IS","xgeaez","irweai ivgw")
wgvi iaewri
^P1STREET("IS","xgeaez","irweaqeo")
oeqaewri
^P1STREET("IS","xgeaez","ivixd")
dxivi
^P1STREET("IS","xgeaez","ixnide")
edinxi
^P1STREET("IS","xgeaez","iyride")
ediryi
^P1STREET("IS","xgeaez","iyx`l alwipc")
cpiwla l`xyi
^P1STREET("IS","xgeaez","iyx`l txypi")
ipyxt l`xyi
^P1STREET("IS","xgeaez","kdo `exi")
ixe` odk
^P1STREET("IS","xgeaez","kdo igfw`l")
l`wfgi odk
^P1STREET("IS","xgeaez","kdo nik`l")
l`kin odk
^P1STREET("IS","xgeaez","kdpea")
aepdk
^P1STREET("IS","xgeaez","keayi dgxneo")
oenxgd iyaek
^P1STREET("IS","xgeaez","keayi ieqs")
sqei iyaek
^P1STREET("IS","xgeaez","kekai cec")
cec iakek
^P1STREET("IS","xgeaez","kiyex")
xeyik
^P1STREET("IS","xgeaez","kkx dgynep`im")
mi`penygd xkk
^P1STREET("IS","xgeaez","kkx xnd")
dnx xkk
^P1STREET("IS","xgeaez","kkx ycd")
dcy xkk
^P1STREET("IS","xgeaez","kpxz")
zxpk
^P1STREET("IS","xgeaez","ktx baixel")
lexiab xtk
^P1STREET("IS","xgeaez","kxnl")
lnxk
^P1STREET("IS","xgeaez","laweaiu")
uiaewal
^P1STREET("IS","xgeaez","lcifpqwi reac")
caer iwqpficl
^P1STREET("IS","xgeaez","lehm")
mhel
^P1STREET("IS","xgeaez","lei")
iel
^P1STREET("IS","xgeaez","lei `ykel")
leky` iel
^P1STREET("IS","xgeaez","lei ylnd")
dnly iel
^P1STREET("IS","xgeaez","leio `tyhiio")
oiihyt` oiel
^P1STREET("IS","xgeaez","leqhib")
bihqel
^P1STREET("IS","xgeaez","levwi ged")
deg iwvel
^P1STREET("IS","xgeaez","lg""i")
i"gl
^P1STREET("IS","xgeaez","lipcd avl`l")
l`lva dcpil
^P1STREET("IS","xgeaez","litwio")
oiwtil
^P1STREET("IS","xgeaez","lym")
myl
^P1STREET("IS","xgeaez","n`ex ieqs")
sqei xe`n
^P1STREET("IS","xgeaez","n`nx nxcki")
ikcxn xn`n
^P1STREET("IS","xgeaez","n`te")
et`n
^P1STREET("IS","xgeaez","navr lihpi")
iphil rvan
^P1STREET("IS","xgeaez","nbipi dblil")
lilbd ipibn
^P1STREET("IS","xgeaez","nbxyi ynyeo")
oeyny iyxbn
^P1STREET("IS","xgeaez","nc`x fkxid")
dixkf x`cn
^P1STREET("IS","xgeaez","ncdld irwa")
awri dldcn
^P1STREET("IS","xgeaez","ncdld ivgw")
wgvi dldcn
^P1STREET("IS","xgeaez","nebfd ivgw")
wgvi dfben
^P1STREET("IS","xgeaez","nedliax")
xailden
^P1STREET("IS","xgeaez","nehd bex")
xeb dhen
^P1STREET("IS","xgeaez","neqweaiu")
uiaewqen
^P1STREET("IS","xgeaez","newqii tpgq")
qgpt iiqwen
^P1STREET("IS","xgeaez","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","xgeaez","nexi giim")
miig ixen
^P1STREET("IS","xgeaez","nexo")
oxen
^P1STREET("IS","xgeaez","nfxgi cec")
cec igxfn
^P1STREET("IS","xgeaez","nfxgi nxim")
mixn igxfn
^P1STREET("IS","xgeaez","nfxgi nyd")
dyn igxfn
^P1STREET("IS","xgeaez","nilv'o giim")
miig o'vlin
^P1STREET("IS","xgeaez","nilx heaid")
diaeh xlin
^P1STREET("IS","xgeaez","nlvx vai idecd")
dcedi iav xvln
^P1STREET("IS","xgeaez","npcli nekx qtxim")
mixtq xken ilcpn
^P1STREET("IS","xgeaez","npegd epgld")
dlgpe dgepn
^P1STREET("IS","xgeaez","npegio `exi`l")
l`ixe` oigepn
^P1STREET("IS","xgeaez","npgm ao idecd")
dcedi oa mgpn
^P1STREET("IS","xgeaez","nteg")
getn
^P1STREET("IS","xgeaez","nvcd")
dcvn
^P1STREET("IS","xgeaez","nwea azid")
diza aewn
^P1STREET("IS","xgeaez","nxac dwqnim")
minqwd caxn
^P1STREET("IS","xgeaez","nxbelio")
oilebxn
^P1STREET("IS","xgeaez","nxcki ayiqh")
hqiya ikcxn
^P1STREET("IS","xgeaez","nxcki dx`l")
l`xd ikcxn
^P1STREET("IS","xgeaez","nxhio")
oihxn
^P1STREET("IS","xgeaez","nxyea")
aeyxn
^P1STREET("IS","xgeaez","nxzeo")
oezxn
^P1STREET("IS","xgeaez","nyd dq")
qd dyn
^P1STREET("IS","xgeaez","nyd fkxid")
dixkf dyn
^P1STREET("IS","xgeaez","nyd izem")
mezi dyn
^P1STREET("IS","xgeaez","nyelm ieqs")
sqei mleyn
^P1STREET("IS","xgeaez","nywd ivgw")
wgvi dwyn
^P1STREET("IS","xgeaez","nyyeili")
ilieyyn
^P1STREET("IS","xgeaez","pb'`xd iyx`l")
l`xyi dx`'bp
^P1STREET("IS","xgeaez","pbad")
dabp
^P1STREET("IS","xgeaez","ped `leo")
oel` dep
^P1STREET("IS","xgeaez","ped nu")
un dep
^P1STREET("IS","xgeaez","pehno `axdm")
mdxa` onhep
^P1STREET("IS","xgeaez","pexc`e")
e`cxep
^P1STREET("IS","xgeaez","pgem wqlno")
onlqw megp
^P1STREET("IS","xgeaez","pgeyzo")
ozyegp
^P1STREET("IS","xgeaez","pgli`li")
il`ilgp
^P1STREET("IS","xgeaez","pgnpi nxcki")
ikcxn ipngp
^P1STREET("IS","xgeaez","pil""i")
i"lip
^P1STREET("IS","xgeaez","pivo")
ovip
^P1STREET("IS","xgeaez","ptzelqwi peg")
gep iwqleztp
^P1STREET("IS","xgeaez","ptzli ao `txim")
mixt` oa ilztp
^P1STREET("IS","xgeaez","ptzli bcqi")
iqcb ilztp
^P1STREET("IS","xgeaez","pzia dl""d")
d"ld aizp
^P1STREET("IS","xgeaez","pzia iem-hea")
aeh-mei aizp
^P1STREET("IS","xgeaez","pzpide idepzo")
ozpedi edipzp
^P1STREET("IS","xgeaez","qcpd")
dpcq
^P1STREET("IS","xgeaez","qegeaelqwi vai")
iav iwqleaegeq
^P1STREET("IS","xgeaez","qewelea")
aeleweq
^P1STREET("IS","xgeaez","qgla")
algq
^P1STREET("IS","xgeaez","qhelaea flwipc")
cpiwlf aealehq
^P1STREET("IS","xgeaez","qhxend")
dnexhq
^P1STREET("IS","xgeaez","qihwea")
aewhiq
^P1STREET("IS","xgeaez","qipi")
ipiq
^P1STREET("IS","xgeaez","qiwe n`ix")
xi`n ewiq
^P1STREET("IS","xgeaez","qixwio")
oiwxiq
^P1STREET("IS","xgeaez","qnhz d`ykeliez")
zeileky`d zhnq
^P1STREET("IS","xgeaez","qnhz d`zxeb")
bexz`d zhnq
^P1STREET("IS","xgeaez","qnhz diwa")
awid zhnq
^P1STREET("IS","xgeaez","qnhz dlineo")
oenild zhnq
^P1STREET("IS","xgeaez","qnhz dnekzx")
xzkend zhnq
^P1STREET("IS","xgeaez","qnhz dtxcq")
qcxtd zhnq
^P1STREET("IS","xgeaez","qnhz dznx")
xnzd zhnq
^P1STREET("IS","xgeaez","qnhz dztef")
fetzd zhnq
^P1STREET("IS","xgeaez","qnhz f'")
'f zhnq
^P1STREET("IS","xgeaez","qnhz nyd")
dyn zhnq
^P1STREET("IS","xgeaez","qnhz xgl")
lgx zhnq
^P1STREET("IS","xgeaez","qnilpqwi")
iwqplinq
^P1STREET("IS","xgeaez","qpd nyd")
dyn dpq
^P1STREET("IS","xgeaez","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","xgeaez","qtix")
xitq
^P1STREET("IS","xgeaez","qxpbd nyelm")
mleyn dbpxq
^P1STREET("IS","xgeaez","renx")
xner
^P1STREET("IS","xgeaez","rewyi iyx`l")
l`xyi iywer
^P1STREET("IS","xgeaez","rezni ylem")
mely inzer
^P1STREET("IS","xgeaez","rfx`")
`xfr
^P1STREET("IS","xgeaez","rio dzklz")
zlkzd oir
^P1STREET("IS","xgeaez","ripa")
apir
^P1STREET("IS","xgeaez","rn""i")
i"nr
^P1STREET("IS","xgeaez","rnigi")
iginr
^P1STREET("IS","xgeaez","rtb'io `axdm")
mdxa` oi'btr
^P1STREET("IS","xgeaez","rwia`")
`aiwr
^P1STREET("IS","xgeaez","ryz")
zyr
^P1STREET("IS","xgeaez","tcead heaid")
diaeh daect
^P1STREET("IS","xgeaez","tenxpu")
upxnet
^P1STREET("IS","xgeaez","texx ideyr")
ryedi xxet
^P1STREET("IS","xgeaez","texx nyd")
dyn xxet
^P1STREET("IS","xgeaez","tiiwq cec")
cec qwiit
^P1STREET("IS","xgeaez","tipq")
qpit
^P1STREET("IS","xgeaez","tipqwx")
xwqpit
^P1STREET("IS","xgeaez","tipwlyhiio")
oiihylwpit
^P1STREET("IS","xgeaez","tipyhiio irwa")
awri oiihypit
^P1STREET("IS","xgeaez","tl`eh")
he`lt
^P1STREET("IS","xgeaez","tlci")
iclt
^P1STREET("IS","xgeaez","tln""g")
g"nlt
^P1STREET("IS","xgeaez","tpgq")
qgpt
^P1STREET("IS","xgeaez","tpwq `axdm")
mdxa` qwpt
^P1STREET("IS","xgeaez","twirio")
oiriwt
^P1STREET("IS","xgeaez","twxiq")
qixwt
^P1STREET("IS","xgeaez","txeb")
bext
^P1STREET("IS","xgeaez","txet `.c. axbno")
onbxa .c.` text
^P1STREET("IS","xgeaez","txet' giim tiwxiq")
qixwit miig 'text
^P1STREET("IS","xgeaez","txet' ib`l icio")
oici l`bi 'text
^P1STREET("IS","xgeaez","txibefio")
oifebixt
^P1STREET("IS","xgeaez","txic nyd")
dyn cixt
^P1STREET("IS","xgeaez","txiyno")
onyixt
^P1STREET("IS","xgeaez","tyey")
yeyt
^P1STREET("IS","xgeaez","v`leo")
oel`v
^P1STREET("IS","xgeaez","vai `tl")
lt` iav
^P1STREET("IS","xgeaez","vax")
xav
^P1STREET("IS","xgeaez","vetiz")
zitev
^P1STREET("IS","xgeaez","viikpx")
xpkiiv
^P1STREET("IS","xgeaez","vitexi")
ixetiv
^P1STREET("IS","xgeaez","vrici ylem")
mely icirv
^P1STREET("IS","xgeaez","vtexd hea")
aeh dxetv
^P1STREET("IS","xgeaez","wdilz hexephe")
ehpexeh zlidw
^P1STREET("IS","xgeaez","weapx")
xpaew
^P1STREET("IS","xgeaez","weqeax")
xaeqew
^P1STREET("IS","xgeaez","wexpiz")
zipxew
^P1STREET("IS","xgeaez","wipc cec")
cec cpiw
^P1STREET("IS","xgeaez","witpiq nyd")
dyn qiptiw
^P1STREET("IS","xgeaez","wliapx")
xpailw
^P1STREET("IS","xgeaez","wliio ca")
ac oiilw
^P1STREET("IS","xgeaez","wliyx")
xyilw
^P1STREET("IS","xgeaez","wlqci cec")
cec icqlw
^P1STREET("IS","xgeaez","wpclx")
xlcpw
^P1STREET("IS","xgeaez","wphxeaiu piqo")
oqip uiaexhpw
^P1STREET("IS","xgeaez","wtx` npyd")
dypn `xtw
^P1STREET("IS","xgeaez","ww""l")
l"ww
^P1STREET("IS","xgeaez","wxenx pg")
gp xnexw
^P1STREET("IS","xgeaez","wxeppaxb ieqs")
sqei bxappexw
^P1STREET("IS","xgeaez","wxiz eifpiu")
uipfie zixw
^P1STREET("IS","xgeaez","wxiz eivno")
onvie zixw
^P1STREET("IS","xgeaez","xebefio")
oifebex
^P1STREET("IS","xgeaez","xefpqwi")
iwqpfex
^P1STREET("IS","xgeaez","xehxi")
ixhex
^P1STREET("IS","xgeaez","xetio")
oitex
^P1STREET("IS","xgeaez","xg' f'")
'f 'gx
^P1STREET("IS","xgeaez","xna""m")
m"anx
^P1STREET("IS","xgeaez","xnf")
fnx
^P1STREET("IS","xgeaez","xng""l")
l"gnx
^P1STREET("IS","xgeaez","xnz `dxeo")
oexd` znx
^P1STREET("IS","xgeaez","xy""i")
i"yx
^P1STREET("IS","xgeaez","y""i")
i"y
^P1STREET("IS","xgeaez","yafi")
ifay
^P1STREET("IS","xgeaez","yaz`i")
i`zay
^P1STREET("IS","xgeaez","yc""l")
l"cy
^P1STREET("IS","xgeaez","yc' ao vieo")
oeiv oa 'cy
^P1STREET("IS","xgeaez","yc' dwiaevim")
miveaiwd 'cy
^P1STREET("IS","xgeaez","yc' eelwpi")
ipwlee 'cy
^P1STREET("IS","xgeaez","yc' go")
og 'cy
^P1STREET("IS","xgeaez","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","xgeaez","yc' npgm xt`l")
l`tx mgpn 'cy
^P1STREET("IS","xgeaez","yc' retx")
xter 'cy
^P1STREET("IS","xgeaez","yc' tpgq ao cec")
cec oa qgpt 'cy
^P1STREET("IS","xgeaez","yedm")
mdey
^P1STREET("IS","xgeaez","yeqiea ylem")
mely aeiqey
^P1STREET("IS","xgeaez","yeypz drnwim")
miwnrd zpyey
^P1STREET("IS","xgeaez","ygx")
xgy
^P1STREET("IS","xgeaez","yhiio nyd")
dyn oiihy
^P1STREET("IS","xgeaez","yhipaxb")
bxapihy
^P1STREET("IS","xgeaez","yiaelim")
mileaiy
^P1STREET("IS","xgeaez","yihd nlaipd")
dpialn dhiy
^P1STREET("IS","xgeaez","yitno")
ontiy
^P1STREET("IS","xgeaez","yne`l eyxd xetno")
ontex dxye l`eny
^P1STREET("IS","xgeaez","yneli`o `dxeo")
oexd` o`ileny
^P1STREET("IS","xgeaez","yngd delvaxb")
bxavled dgny
^P1STREET("IS","xgeaez","yngi `axdm")
mdxa` igny
^P1STREET("IS","xgeaez","ypi")
ipy
^P1STREET("IS","xgeaez","ypix")
xipy
^P1STREET("IS","xgeaez","yreai fxg")
gxf iaery
^P1STREET("IS","xgeaez","yrx dbi`")
`ibd xry
^P1STREET("IS","xgeaez","ytipefd")
dfepity
^P1STREET("IS","xgeaez","ywelpiw `dxeo")
oexd` wiplewy
^P1STREET("IS","xgeaez","yx rix`")
`xir xy
^P1STREET("IS","xgeaez","yxz nyd")
dyn zxy
^P1STREET("IS","xgeaez","zex d`aia")
aia`d xez
^P1STREET("IS","xgeaez","znix rwia`")
`aiwr xinz
^P1STREET("IS","xgeaez","zx""o")
o"xz
^P1STREET("IS","xgeaez","zxyiy")
yiyxz
^P1STREET("IS","xig`pid")
dip`gix
^P1STREET("IS","xiipd")
dpiix
^P1STREET("IS","xiipd","l`hio")
oih`l
^P1STREET("IS","xiipd","xg' 10")
10 'gx
^P1STREET("IS","xiipd","xg' 101")
101 'gx
^P1STREET("IS","xiipd","xg' 1028")
1028 'gx
^P1STREET("IS","xiipd","xg' 107")
107 'gx
^P1STREET("IS","xiipd","xg' 109")
109 'gx
^P1STREET("IS","xiipd","xg' 112")
112 'gx
^P1STREET("IS","xiipd","xg' 124")
124 'gx
^P1STREET("IS","xiipd","xg' 131")
131 'gx
^P1STREET("IS","xiipd","xg' 134")
134 'gx
^P1STREET("IS","xiipd","xg' 137")
137 'gx
^P1STREET("IS","xiipd","xg' 139")
139 'gx
^P1STREET("IS","xiipd","xg' 150")
150 'gx
^P1STREET("IS","xiipd","xg' 153")
153 'gx
^P1STREET("IS","xiipd","xg' 157")
157 'gx
^P1STREET("IS","xiipd","xg' 162")
162 'gx
^P1STREET("IS","xiipd","xg' 170")
170 'gx
^P1STREET("IS","xiipd","xg' 175")
175 'gx
^P1STREET("IS","xiipd","xg' 214")
214 'gx
^P1STREET("IS","xiipd","xg' 263")
263 'gx
^P1STREET("IS","xiipd","xg' 3")
3 'gx
^P1STREET("IS","xinepim")
mipenix
^P1STREET("IS","xinepim","xinepim")
mipenix
^P1STREET("IS","xipzid")
dizpix
^P1STREET("IS","xipzid","cxj d`expim")
mipxe`d jxc
^P1STREET("IS","xipzid","dklpiz")
ziplkd
^P1STREET("IS","xipzid","dxezm")
mzexd
^P1STREET("IS","xipzid","dxineo")
oenixd
^P1STREET("IS","xipzid","gexy")
yxeg
^P1STREET("IS","xipzid","petj")
jtep
^P1STREET("IS","xkqim")
miqkx
^P1STREET("IS","xkqim","`ae gvix`")
`xivg ea`
^P1STREET("IS","xkqim","`expim")
mipxe`
^P1STREET("IS","xkqim","`yl")
ly`
^P1STREET("IS","xkqim","api zexd")
dxez ipa
^P1STREET("IS","xkqim","ctpd")
dptc
^P1STREET("IS","xkqim","cwl")
lwc
^P1STREET("IS","xkqim","cxj dxa ayweaqwi")
iwqaewya axd jxc
^P1STREET("IS","xkqim","d`ixeqim")
miqexi`d
^P1STREET("IS","xkqim","d`lepim")
mipel`d
^P1STREET("IS","xkqim","dbto")
otbd
^P1STREET("IS","xkqim","dcq")
qcd
^P1STREET("IS","xkqim","dexcim")
micxed
^P1STREET("IS","xkqim","dklpiez")
zeiplkd
^P1STREET("IS","xkqim","dpxwiqim")
miqiwxpd
^P1STREET("IS","xkqim","dxa wew")
wew axd
^P1STREET("IS","xkqim","dxinepim")
mipenixd
^P1STREET("IS","xkqim","dxwtez")
zetwxd
^P1STREET("IS","xkqim","dywnim")
minwyd
^P1STREET("IS","xkqim","dz`pd")
dp`zd
^P1STREET("IS","xkqim","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","xkqim","gxviz")
zivxg
^P1STREET("IS","xkqim","iepivno")
onvipei
^P1STREET("IS","xkqim","la `lide")
edil` al
^P1STREET("IS","xkqim","lilj")
jlil
^P1STREET("IS","xkqim","nxbpiz")
zipbxn
^P1STREET("IS","xkqim","pexiz")
zixep
^P1STREET("IS","xkqim","qaieo")
oeiaq
^P1STREET("IS","xkqim","refi`l")
l`ifer
^P1STREET("IS","xkqim","rxad")
daxr
^P1STREET("IS","xkqim","txb")
bxt
^P1STREET("IS","xkqim","xezm")
mzex
^P1STREET("IS","xkqim","ynrepeaiu")
uiaeperny
^P1STREET("IS","xn`lld")
dll`nx
^P1STREET("IS","xn`lld","`lpdcd")
dcdpl`
^P1STREET("IS","xn`pd")
dp`nx
^P1STREET("IS","xnez")
zenx
^P1STREET("IS","xnez","azx`")
`xza
^P1STREET("IS","xnez dyaim")
miayd zenx
^P1STREET("IS","xnez dyaim","aiz drm")
mrd zia
^P1STREET("IS","xnez dyaim","d`lepim")
mipel`d
^P1STREET("IS","xnez dyaim","dapim")
mipad
^P1STREET("IS","xnez dyaim","daxeyim")
miyexad
^P1STREET("IS","xnez dyaim","daxikd")
dkixad
^P1STREET("IS","xnez dyaim","dbard")
drabd
^P1STREET("IS","xnez dyaim","dcwl")
lwcd
^P1STREET("IS","xnez dyaim","dixwpim")
mipwxid
^P1STREET("IS","xnez dyaim","dkxm")
mxkd
^P1STREET("IS","xnez dyaim","dlineo")
oenild
^P1STREET("IS","xnez dyaim","dniiqcim")
micqiind
^P1STREET("IS","xnez dyaim","dnrbl")
lbrnd
^P1STREET("IS","xnez dyaim","dny`aim")
mia`ynd
^P1STREET("IS","xnez dyaim","dqelho")
ohleqd
^P1STREET("IS","xnez dyaim","dtw`o")
o`wtd
^P1STREET("IS","xnez dyaim","dtxcq")
qcxtd
^P1STREET("IS","xnez dyaim","dvax")
xavd
^P1STREET("IS","xnez dyaim","dyny dreld")
dlerd ynyd
^P1STREET("IS","xnez dyaim","dywc")
cwyd
^P1STREET("IS","xnez dyaim","dznx")
xnzd
^P1STREET("IS","xnez dyaim","nrld excim")
micxe dlrn
^P1STREET("IS","xnez dyaim","qnhz `l rl")
lr l` zhnq
^P1STREET("IS","xnez dyaim","qnhz dgva")
avgd zhnq
^P1STREET("IS","xnez dyaim","qnhz dperx")
xrepd zhnq
^P1STREET("IS","xnez dyaim","qnhz nbo")
obn zhnq
^P1STREET("IS","xnez dyaim","yxz")
zxy
^P1STREET("IS","xnez n`ix")
xi`n zenx
^P1STREET("IS","xnez n`ix","cxj dgnnez")
zenngd jxc
^P1STREET("IS","xnez npyd")
dypn zenx
^P1STREET("IS","xnez ptzli")
ilztp zenx
^P1STREET("IS","xnez ptzli","nxi")
ixn
^P1STREET("IS","xnld")
dlnx
^P1STREET("IS","xnld","`""c bexceo")
oecxeb c"`
^P1STREET("IS","xnld","`a` `gin`ix")
xi`nig` `a`
^P1STREET("IS","xnld","`ae gvix`")
`xivg ea`
^P1STREET("IS","xnld","`ae wiyw")
wyiw ea`
^P1STREET("IS","xnld","`axdm dll")
lld mdxa`
^P1STREET("IS","xnld","`befi")
ifeb`
^P1STREET("IS","xnld","`bni ynreo")
oerny inb`
^P1STREET("IS","xnld","`by")
yb`
^P1STREET("IS","xnld","`dxeo aebpim")
mipbea oexd`
^P1STREET("IS","xnld","`dxeo dkdo")
odkd oexd`
^P1STREET("IS","xnld","`eqiywio")
oiwyiqe`
^P1STREET("IS","xnld","`gc an`i")
i`na cg`
^P1STREET("IS","xnld","`gc drm")
mrd cg`
^P1STREET("IS","xnld","`ilz")
zli`
^P1STREET("IS","xnld","`ipyhiio")
oiihypi`
^P1STREET("IS","xnld","`li kdo")
odk il`
^P1STREET("IS","xnld","`lide dpai`")
`iapd edil`
^P1STREET("IS","xnld","`nil fel`")
`lef lin`
^P1STREET("IS","xnld","`npeo eznx")
xnze oepn`
^P1STREET("IS","xnld","`pbl")
lbp`
^P1STREET("IS","xnld","`qzx dnlkd")
dklnd xzq`
^P1STREET("IS","xnld","`txi`h ivgw")
wgvi h`ixt`
^P1STREET("IS","xnld","`v""l")
l"v`
^P1STREET("IS","xnld","`wqeceq")
qeceqw`
^P1STREET("IS","xnld","`xid ao `lirfx")
xfril` oa dix`
^P1STREET("IS","xnld","`xid wxnx")
xnxw dix`
^P1STREET("IS","xnld","`xlefexea")
aexefelx`
^P1STREET("IS","xnld","aexekea")
aekexea
^P1STREET("IS","xnld","ai`liw")
wil`ia
^P1STREET("IS","xnld","ail""e")
e"lia
^P1STREET("IS","xnld","ailipqeo")
oeqpilia
^P1STREET("IS","xnld","aiz""x")
x"zia
^P1STREET("IS","xnld","altex")
xetla
^P1STREET("IS","xnld","ao idecd")
dcedi oa
^P1STREET("IS","xnld","ao ieqs `dxeo")
oexd` sqei oa
^P1STREET("IS","xnld","aph n`ix")
xi`n hpa
^P1STREET("IS","xnld","arli dnl`kd")
dk`lnd ilra
^P1STREET("IS","xnld","ax `ilo")
oli` xa
^P1STREET("IS","xnld","ax ieg`i")
i`gei xa
^P1STREET("IS","xnld","ax keka`")
`akek xa
^P1STREET("IS","xnld","axfili")
ilifxa
^P1STREET("IS","xnld","axpx")
xpxa
^P1STREET("IS","xnld","b'ee`xiy")
yix`ee'b
^P1STREET("IS","xnld","baexi iyx`l")
l`xyi ixeab
^P1STREET("IS","xnld","bcreo")
oercb
^P1STREET("IS","xnld","belena")
aneleb
^P1STREET("IS","xnld","bhe e`xyd")
dyx`e ehb
^P1STREET("IS","xnld","blrc")
crlb
^P1STREET("IS","xnld","bxu")
uxb
^P1STREET("IS","xnld","bxyeo y""u")
u"y oeyxb
^P1STREET("IS","xnld","c""x q`lw")
wl`q x"c
^P1STREET("IS","xnld","ca def")
fed ac
^P1STREET("IS","xnld","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","xnld","cec `lrfx")
xfrl` cec
^P1STREET("IS","xnld","cec dnlj")
jlnd cec
^P1STREET("IS","xnld","cec xfi`l")
l`ifx cec
^P1STREET("IS","xnld","d`exo")
oxe`d
^P1STREET("IS","xnld","d`ilpez")
zepli`d
^P1STREET("IS","xnld","d`ixiqim")
miqixi`d
^P1STREET("IS","xnld","d`ld")
dl`d
^P1STREET("IS","xnld","d`lepim")
mipel`d
^P1STREET("IS","xnld","d`xfim")
mifx`d
^P1STREET("IS","xnld","d`yl")
ly`d
^P1STREET("IS","xnld","d`zxeb")
bexz`d
^P1STREET("IS","xnld","darl ym hea")
aeh my lrad
^P1STREET("IS","xnld","daxey")
yexad
^P1STREET("IS","xnld","dbcec draxi")
ixard cecbd
^P1STREET("IS","xnld","dbelo")
olebd
^P1STREET("IS","xnld","dblrci")
icrlbd
^P1STREET("IS","xnld","dbto")
otbd
^P1STREET("IS","xnld","dcec`im")
mi`cecd
^P1STREET("IS","xnld","dcq")
qcd
^P1STREET("IS","xnld","dcwl")
lwcd
^P1STREET("IS","xnld","dcx")
xcd
^P1STREET("IS","xnld","ddbpd")
dpbdd
^P1STREET("IS","xnld","deexcim")
micxeed
^P1STREET("IS","xnld","deyr")
ryed
^P1STREET("IS","xnld","dfiz")
zifd
^P1STREET("IS","xnld","dgavlz")
zlvagd
^P1STREET("IS","xnld","dgleu")
uelgd
^P1STREET("IS","xnld","dgynep`im")
mi`penygd
^P1STREET("IS","xnld","diqnio")
oinqid
^P1STREET("IS","xnld","divixd")
dxivid
^P1STREET("IS","xnld","dixco")
ocxid
^P1STREET("IS","xnld","dklpiz")
ziplkd
^P1STREET("IS","xnld","dkxnl")
lnxkd
^P1STREET("IS","xnld","dlilj")
jlild
^P1STREET("IS","xnld","dll dfwo")
owfd lld
^P1STREET("IS","xnld","dnkaim")
miaknd
^P1STREET("IS","xnld","dnrtilim")
militrnd
^P1STREET("IS","xnld","dnxbpiz")
zipbxnd
^P1STREET("IS","xnld","dpetlim")
miltepd
^P1STREET("IS","xnld","dpexiz")
zixepd
^P1STREET("IS","xnld","dpgyel")
leygpd
^P1STREET("IS","xnld","dpivo")
ovipd
^P1STREET("IS","xnld","dq")
qd
^P1STREET("IS","xnld","draecd")
dceard
^P1STREET("IS","xnld","drlid dypid")
dipyd dilrd
^P1STREET("IS","xnld","drnl")
lnrd
^P1STREET("IS","xnld","dterl")
lretd
^P1STREET("IS","xnld","dtln""g")
g"nltd
^P1STREET("IS","xnld","dvetiz")
zitevd
^P1STREET("IS","xnld","dvpgpim")
mipgpvd
^P1STREET("IS","xnld","dx rvneo")
oenvr xd
^P1STREET("IS","xnld","dx`l")
l`xd
^P1STREET("IS","xnld","dxa dxveb")
bevxd axd
^P1STREET("IS","xnld","dxa helicpe")
epcileh axd
^P1STREET("IS","xnld","dxa nineo")
oenin axd
^P1STREET("IS","xnld","dxa refi`l")
l`ifer axd
^P1STREET("IS","xnld","dxa tzid igfw`l")
l`wfgi dizt axd
^P1STREET("IS","xnld","dxa wew")
wew axd
^P1STREET("IS","xnld","dxa xiipq")
qpiix axd
^P1STREET("IS","xnld","dxces")
secxd
^P1STREET("IS","xnld","dxn""`")
`"nxd
^P1STREET("IS","xnld","dxna""m")
m"anxd
^P1STREET("IS","xnld","dyenx")
xneyd
^P1STREET("IS","xnld","dyepiz")
zipeyd
^P1STREET("IS","xnld","dyethim")
mihteyd
^P1STREET("IS","xnld","dyixieo")
oeixiyd
^P1STREET("IS","xnld","dylem")
melyd
^P1STREET("IS","xnld","dywnd")
dnwyd
^P1STREET("IS","xnld","dz`pim")
mip`zd
^P1STREET("IS","xnld","dzaex")
xeazd
^P1STREET("IS","xnld","dznx")
xnzd
^P1STREET("IS","xnld","dzyrd")
dryzd
^P1STREET("IS","xnld","eilp`")
`plie
^P1STREET("IS","xnld","eipbiih")
hiibpie
^P1STREET("IS","xnld","eizwio")
oiwzie
^P1STREET("IS","xnld","ekil igfw`l")
l`wfgi like
^P1STREET("IS","xnld","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","xnld","fkxid")
dixkf
^P1STREET("IS","xnld","gaxeo")
oexag
^P1STREET("IS","xnld","gbi")
ibg
^P1STREET("IS","xnld","ghiaz belpi")
ipleb zaihg
^P1STREET("IS","xnld","giim ao rhx")
xhr oa miig
^P1STREET("IS","xnld","giim axla")
alxa miig
^P1STREET("IS","xnld","gpd qpy")
ypq dpg
^P1STREET("IS","xnld","gpej leio")
oiel jepg
^P1STREET("IS","xnld","gpizd")
dzipg
^P1STREET("IS","xnld","heipd")
dpieh
^P1STREET("IS","xnld","hetf")
fteh
^P1STREET("IS","xnld","hihla`em")
me`alhih
^P1STREET("IS","xnld","hxentlcex")
xecltnexh
^P1STREET("IS","xnld","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","xnld","i""l txu")
uxt l"i
^P1STREET("IS","xnld","i`ix yhxo")
oxhy xi`i
^P1STREET("IS","xnld","i`pey wexv'`w")
w`'vxew yep`i
^P1STREET("IS","xnld","iapd")
dpai
^P1STREET("IS","xnld","idecd dlei")
ield dcedi
^P1STREET("IS","xnld","idecd yhiio")
oiihy dcedi
^P1STREET("IS","xnld","ideyr ao peo")
oep oa ryedi
^P1STREET("IS","xnld","ie`l")
l`ei
^P1STREET("IS","xnld","iepd dpai`")
`iapd dpei
^P1STREET("IS","xnld","ieqi icio")
oici iqei
^P1STREET("IS","xnld","ieqs giim")
miig sqei
^P1STREET("IS","xnld","ieqthl biex`")
`xeib lhtqei
^P1STREET("IS","xnld","iexci dim")
mid icxei
^P1STREET("IS","xnld","igfw`l")
l`wfgi
^P1STREET("IS","xnld","ivgw ao vai")
iav oa wgvi
^P1STREET("IS","xnld","ivgw ycd")
dcy wgvi
^P1STREET("IS","xnld","ivgw ylnd")
dnly wgvi
^P1STREET("IS","xnld","ixnide")
edinxi
^P1STREET("IS","xnld","iyride")
ediryi
^P1STREET("IS","xnld","kkx dncipd")
dpicnd xkk
^P1STREET("IS","xnld","kpxz")
zxpk
^P1STREET("IS","xnld","kvplqeo")
oeqlpvk
^P1STREET("IS","xnld","l`d belcaxb")
bxacleb d`l
^P1STREET("IS","xnld","laepd")
dpeal
^P1STREET("IS","xnld","legni bey rvieo")
oeivr yeb ingel
^P1STREET("IS","xnld","legni daxibcd")
dcbixad ingel
^P1STREET("IS","xnld","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","xnld","lei `lide q`lm")
ml`q edil` iel
^P1STREET("IS","xnld","lei `ykel")
leky` iel
^P1STREET("IS","xnld","lei igfw`l")
l`wfgi iel
^P1STREET("IS","xnld","leio `xid")
dix` oiel
^P1STREET("IS","xnld","lilipalem")
melapilil
^P1STREET("IS","xnld","lkiy")
yikl
^P1STREET("IS","xnld","lpc`e giim")
miig e`cpl
^P1STREET("IS","xnld","navr iepzo")
ozpei rvan
^P1STREET("IS","xnld","navr nyd")
dyn rvan
^P1STREET("IS","xnld","navr wcy")
ycw rvan
^P1STREET("IS","xnld","necirio")
oiricen
^P1STREET("IS","xnld","nedliax")
xailden
^P1STREET("IS","xnld","nephitiexi")
ixeitihpen
^P1STREET("IS","xnld","nevwio")
oiwven
^P1STREET("IS","xnld","nex")
xen
^P1STREET("IS","xnld","nikd")
dkin
^P1STREET("IS","xnld","nl`ki")
ik`ln
^P1STREET("IS","xnld","npgm cpi`l")
l`ipc mgpn
^P1STREET("IS","xnld","nq cpi")
ipc qn
^P1STREET("IS","xnld","nq dkpqd")
dqpkd qn
^P1STREET("IS","xnld","nqcd")
dcqn
^P1STREET("IS","xnld","nqxiw")
wixqn
^P1STREET("IS","xnld","nxac dwqnim")
minqwd caxn
^P1STREET("IS","xnld","nxcki dideci")
icedid ikcxn
^P1STREET("IS","xnld","nxcki yxrai")
iarxy ikcxn
^P1STREET("IS","xnld","nxfew")
wefxn
^P1STREET("IS","xnld","nxim dpai`d")
d`iapd mixn
^P1STREET("IS","xnld","nxkeq")
qekxn
^P1STREET("IS","xnld","nyd ciio")
oiic dyn
^P1STREET("IS","xnld","nyd xape")
epax dyn
^P1STREET("IS","xnld","ped dcxim")
mixcd dep
^P1STREET("IS","xnld","pexc`e")
e`cxep
^P1STREET("IS","xnld","pgnid")
dingp
^P1STREET("IS","xnld","qaieo")
oeiaq
^P1STREET("IS","xnld","qenw reacid")
dicaer wneq
^P1STREET("IS","xnld","qewelea")
aeleweq
^P1STREET("IS","xnld","qhxend")
dnexhq
^P1STREET("IS","xnld","qnelpqwio")
oiwqplenq
^P1STREET("IS","xnld","qnhz zeglz")
zlgez zhnq
^P1STREET("IS","xnld","qrcd nxcki")
ikcxn dcrq
^P1STREET("IS","xnld","qrcid db`eo")
oe`bd dicrq
^P1STREET("IS","xnld","qtix")
xitq
^P1STREET("IS","xnld","reacid")
dicaer
^P1STREET("IS","xnld","reli dbxcem")
mecxbd iler
^P1STREET("IS","xnld","retxi ylem")
mely ixter
^P1STREET("IS","xnld","rfx`")
`xfr
^P1STREET("IS","xnld","rneq")
qenr
^P1STREET("IS","xnld","rnigi")
iginr
^P1STREET("IS","xnld","telc axkd")
dkxa clet
^P1STREET("IS","xnld","terli vieo")
oeiv ilret
^P1STREET("IS","xnld","tipq dxa")
axd qpit
^P1STREET("IS","xnld","tipqwx")
xwqpit
^P1STREET("IS","xnld","tlnipb")
bpinlt
^P1STREET("IS","xnld","tpgq")
qgpt
^P1STREET("IS","xnld","tpwq")
qwpt
^P1STREET("IS","xnld","tqhx")
xhqt
^P1STREET("IS","xnld","twirio")
oiriwt
^P1STREET("IS","xnld","txeic")
ciext
^P1STREET("IS","xnld","txpwl")
lwpxt
^P1STREET("IS","xnld","vcwd nyd")
dyn dwcv
^P1STREET("IS","xnld","vd""l")
l"dv
^P1STREET("IS","xnld","viceo")
oeciv
^P1STREET("IS","xnld","vieo `yx")
xy` oeiv
^P1STREET("IS","xnld","vitex bo rco")
ocr ob xetiv
^P1STREET("IS","xnld","vlg npyd")
dypn glv
^P1STREET("IS","xnld","vtpid")
diptv
^P1STREET("IS","xnld","vtz")
ztv
^P1STREET("IS","xnld","wdilz chxeih")
hiexhc zlidw
^P1STREET("IS","xnld","wej")
jew
^P1STREET("IS","xnld","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","xnld","wlefpx")
xpfelw
^P1STREET("IS","xnld","wtlo")
oltw
^P1STREET("IS","xnld","wxizi")
izixw
^P1STREET("IS","xnld","wxo diqec")
ceqid oxw
^P1STREET("IS","xnld","xez")
zex
^P1STREET("IS","xnld","xg c""p")
p"c gx
^P1STREET("IS","xnld","xg' 5")
5 'gx
^P1STREET("IS","xnld","xg' a""p")
p"a 'gx
^P1STREET("IS","xnld","xg' c""p")
p"c 'gx
^P1STREET("IS","xnld","xg' e""p")
p"e 'gx
^P1STREET("IS","xnld","xg' f""p")
p"f 'gx
^P1STREET("IS","xnld","xg' g""p")
p"g 'gx
^P1STREET("IS","xnld","xg' i""c")
c"i 'gx
^P1STREET("IS","xnld","xg' k""i")
i"k 'gx
^P1STREET("IS","xnld","xg' k'")
'k 'gx
^P1STREET("IS","xnld","xg' n""d")
d"n 'gx
^P1STREET("IS","xnld","xg' n""g")
g"n 'gx
^P1STREET("IS","xnld","xg' r""d")
d"r 'gx
^P1STREET("IS","xnld","xg' r""h")
h"r 'gx
^P1STREET("IS","xnld","xg' w""d")
d"w 'gx
^P1STREET("IS","xnld","xg' wi""a")
a"iw 'gx
^P1STREET("IS","xnld","xg' x""e")
e"x 'gx
^P1STREET("IS","xnld","xg' x""f")
f"x 'gx
^P1STREET("IS","xnld","xg' x""g")
g"x 'gx
^P1STREET("IS","xnld","xg' xg' zk""`")
`"kz 'gx 'gx
^P1STREET("IS","xnld","xg' y""c")
c"y 'gx
^P1STREET("IS","xnld","xg' z""f")
f"z 'gx
^P1STREET("IS","xnld","xg' z""g")
g"z 'gx
^P1STREET("IS","xnld","xg' zh""e")
e"hz 'gx
^P1STREET("IS","xnld","xg' zh""f")
f"hz 'gx
^P1STREET("IS","xnld","xg' zi""b")
b"iz 'gx
^P1STREET("IS","xnld","xg' zi""f")
f"iz 'gx
^P1STREET("IS","xnld","xg' zk""a")
a"kz 'gx
^P1STREET("IS","xnld","xg' zk""b")
b"kz 'gx
^P1STREET("IS","xnld","xiiqx nikd")
dkin xqiix
^P1STREET("IS","xnld","xwtz")
ztwx
^P1STREET("IS","xnld","xy""i")
i"yx
^P1STREET("IS","xnld","yafi")
ifay
^P1STREET("IS","xnld","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","xnld","yc' dxvl")
lvxd 'cy
^P1STREET("IS","xnld","yc' eivno")
onvie 'cy
^P1STREET("IS","xnld","yiaz vieo")
oeiv zaiy
^P1STREET("IS","xnld","ylem rlikm")
mkilr mely
^P1STREET("IS","xnld","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","xnld","ylnd dnlj")
jlnd dnly
^P1STREET("IS","xnld","yn""g")
g"ny
^P1STREET("IS","xnld","yne`l dpai`")
`iapd l`eny
^P1STREET("IS","xnld","yngd delvaxb")
bxavled dgny
^P1STREET("IS","xnld","yngepi")
ipegny
^P1STREET("IS","xnld","yny nyd")
dyn yny
^P1STREET("IS","xnld","ynyeo dbaex")
xeabd oeyny
^P1STREET("IS","xnld","ytipefd")
dfepity
^P1STREET("IS","xnld","ytiw rcq")
qcr wity
^P1STREET("IS","xnld","ytix` `axdm")
mdxa` `xity
^P1STREET("IS","xnld","ytix` g' nyd")
dyn 'g `xity
^P1STREET("IS","xnld","ytxipvw")
wvpixty
^P1STREET("IS","xnld","yxz")
zxy
^P1STREET("IS","xnld","yyeo iyx`l")
l`xyi oeyy
^P1STREET("IS","xnld","yyeo yngd")
dgny oeyy
^P1STREET("IS","xnld","zilzo")
ozliz
^P1STREET("IS","xnld","zka")
akz
^P1STREET("IS","xnld","zl gi")
ig lz
^P1STREET("IS","xnld","znix yne`l")
l`eny xinz
^P1STREET("IS","xnz `trl")
lrt` znx
^P1STREET("IS","xnz `trl","`bef")
feb`
^P1STREET("IS","xnz `trl","`bneo")
oenb`
^P1STREET("IS","xnz `trl","`eknpiz")
zipnke`
^P1STREET("IS","xnz `trl","`l rl")
lr l`
^P1STREET("IS","xnz `trl","`lenez")
zenel`
^P1STREET("IS","xnz `trl","`lneb")
benl`
^P1STREET("IS","xnz `trl","`xbno")
onbx`
^P1STREET("IS","xnz `trl","`zxeb")
bexz`
^P1STREET("IS","xnz `trl","axwz")
zwxa
^P1STREET("IS","xnz `trl","bxetiz")
zitexb
^P1STREET("IS","xnz `trl","d`hc")
ch`d
^P1STREET("IS","xnz `trl","d`ld")
dl`d
^P1STREET("IS","xnz `trl","d`leo")
oel`d
^P1STREET("IS","xnz `trl","d`yl")
ly`d
^P1STREET("IS","xnz `trl","dcec`im")
mi`cecd
^P1STREET("IS","xnz `trl","dgebd")
dbegd
^P1STREET("IS","xnz `trl","dgva")
avgd
^P1STREET("IS","xnz `trl","dgxea")
aexgd
^P1STREET("IS","xnz `trl","dgxviz")
zivxgd
^P1STREET("IS","xnz `trl","diqnio")
oinqid
^P1STREET("IS","xnz `trl","dleheq")
qeheld
^P1STREET("IS","xnz `trl","dpvia")
aivpd
^P1STREET("IS","xnz `trl","drxad")
daxrd
^P1STREET("IS","xnz `trl","dtxbim")
mibxtd
^P1STREET("IS","xnz `trl","dxces")
secxd
^P1STREET("IS","xnz `trl","dxwtz")
ztwxd
^P1STREET("IS","xnz `trl","dyihd")
dhiyd
^P1STREET("IS","xnz `trl","dywc")
cwyd
^P1STREET("IS","xnz `trl","idlem")
meldi
^P1STREET("IS","xnz `trl","ngeld")
dlegn
^P1STREET("IS","xnz `trl","nye`d")
d`eyn
^P1STREET("IS","xnz `trl","pahim")
mihap
^P1STREET("IS","xnz `trl","pexiz")
zixep
^P1STREET("IS","xnz `trl","qtix")
xitq
^P1STREET("IS","xnz `trl","v`lim")
mil`v
^P1STREET("IS","xnz `trl","vetx")
xtev
^P1STREET("IS","xnz `trl","vex")
xev
^P1STREET("IS","xnz `trl","wvird")
drivw
^P1STREET("IS","xnz `trl","xineo")
oenix
^P1STREET("IS","xnz `trl","yc' d`expim")
mipxe`d 'cy
^P1STREET("IS","xnz `trl","yc' d`xfim")
mifx`d 'cy
^P1STREET("IS","xnz `trl","yc' daxeyim")
miyexad 'cy
^P1STREET("IS","xnz `trl","ygm")
mgy
^P1STREET("IS","xnz `trl","ykhxno")
onxhky
^P1STREET("IS","xnz `trl","zcdx")
xdcz
^P1STREET("IS","xnz `trl","zt`xz vai")
iav zx`tz
^P1STREET("IS","xnz bo")
ob znx
^P1STREET("IS","xnz bo","`a` axciv'a")
a'vicxa `a`
^P1STREET("IS","xnz bo","`ahlieo")
oeilha`
^P1STREET("IS","xnz bo","`aiaim")
miaia`
^P1STREET("IS","xnz bo","`aibil")
libia`
^P1STREET("IS","xnz bo","`aiyi")
iyia`
^P1STREET("IS","xnz bo","`ao `aizex")
xezia` oa`
^P1STREET("IS","xnz bo","`ao gaia")
aiag oa`
^P1STREET("IS","xnz bo","`ao qtix")
xitq oa`
^P1STREET("IS","xnz bo","`ao rfx`")
`xfr oa`
^P1STREET("IS","xnz bo","`api dgeyo")
oyegd ipa`
^P1STREET("IS","xnz bo","`apx")
xpa`
^P1STREET("IS","xnz bo","`dec")
ced`
^P1STREET("IS","xnz bo","`dli`a")
a`ild`
^P1STREET("IS","xnz bo","`dxepqeo yxd")
dxy oeqpexd`
^P1STREET("IS","xnz bo","`exd")
dxe`
^P1STREET("IS","xnz bo","`exi piqo")
oqip ixe`
^P1STREET("IS","xnz bo","`exid")
dixe`
^P1STREET("IS","xnz bo","`g""i cwx")
xwc i"g`
^P1STREET("IS","xnz bo","`gc drm")
mrd cg`
^P1STREET("IS","xnz bo","`gin`ix")
xi`nig`
^P1STREET("IS","xnz bo","`iifiw xnad")
danx wifii`
^P1STREET("IS","xnz bo","`ipyhiio")
oiihypi`
^P1STREET("IS","xnz bo","`iznx")
xnzi`
^P1STREET("IS","xnz bo","`izo iepd")
dpei ozi`
^P1STREET("IS","xnz bo","`l rl")
lr l`
^P1STREET("IS","xnz bo","`lenez")
zenel`
^P1STREET("IS","xnz bo","`lepim")
mipel`
^P1STREET("IS","xnz bo","`les cec")
cec sel`
^P1STREET("IS","xnz bo","`les dpvgeo")
oegvpd sel`
^P1STREET("IS","xnz bo","`les ycd")
dcy sel`
^P1STREET("IS","xnz bo","`linlj")
jlnil`
^P1STREET("IS","xnz bo","`lirfx")
xfril`
^P1STREET("IS","xnz bo","`liyia")
aiyil`
^P1STREET("IS","xnz bo","`liyr")
ryil`
^P1STREET("IS","xnz bo","`lkqpcx")
xcpqkl`
^P1STREET("IS","xnz bo","`lkqpcxepi")
ipexcpqkl`
^P1STREET("IS","xnz bo","`lrfx dgexpi")
ipxegd xfrl`
^P1STREET("IS","xnz bo","`lxe`i")
i`exl`
^P1STREET("IS","xnz bo","`lxem")
mexl`
^P1STREET("IS","xnz bo","`nix")
xin`
^P1STREET("IS","xnz bo","`npeo eznx")
xnze oepn`
^P1STREET("IS","xnz bo","`pblpcx idecd")
dcedi xcplbp`
^P1STREET("IS","xnz bo","`pd txpw")
wpxt dp`
^P1STREET("IS","xnz bo","`pwexim")
mixewp`
^P1STREET("IS","xnz bo","`qs")
sq`
^P1STREET("IS","xnz bo","`txim")
mixt`
^P1STREET("IS","xnz bo","`v""l")
l"v`
^P1STREET("IS","xnz bo","`xbno")
onbx`
^P1STREET("IS","xnz bo","`xlefexea")
aexefelx`
^P1STREET("IS","xnz bo","`xpeo")
oepx`
^P1STREET("IS","xnz bo","`xpid")
dipx`
^P1STREET("IS","xnz bo","`yz`el")
le`zy`
^P1STREET("IS","xnz bo","a`x `exd")
dxe` x`a
^P1STREET("IS","xnz bo","acpx")
xpca
^P1STREET("IS","xnz bo","aerf")
frea
^P1STREET("IS","xnz bo","aexb")
bxea
^P1STREET("IS","xnz bo","af'xpe")
epx'fa
^P1STREET("IS","xnz bo","ai`liw")
wil`ia
^P1STREET("IS","xnz bo","aiz `l")
l` zia
^P1STREET("IS","xnz bo","aiz dll")
lld zia
^P1STREET("IS","xnz bo","aiz drxad")
daxrd zia
^P1STREET("IS","xnz bo","aiz dye`ad")
da`eyd zia
^P1STREET("IS","xnz bo","aiz gexeo")
oexeg zia
^P1STREET("IS","xnz bo","aiz glevez")
zevelg zia
^P1STREET("IS","xnz bo","aiz lgm")
mgl zia
^P1STREET("IS","xnz bo","aiz yn`i")
i`ny zia
^P1STREET("IS","xnz bo","ao `aibcex")
xecbia` oa
^P1STREET("IS","xnz bo","ao `lirfx")
xfril` oa
^P1STREET("IS","xnz bo","ao ieqs")
sqei oa
^P1STREET("IS","xnz bo","ao qxew")
wexq oa
^P1STREET("IS","xnz bo","ao yno")
ony oa
^P1STREET("IS","xnz bo","api dpai`im")
mi`iapd ipa
^P1STREET("IS","xnz bo","api nyd")
dyn ipa
^P1STREET("IS","xnz bo","apide")
edipa
^P1STREET("IS","xnz bo","apinio")
oinipa
^P1STREET("IS","xnz bo","avl`l")
l`lva
^P1STREET("IS","xnz bo","awrz `xal")
lax` zrwa
^P1STREET("IS","xnz bo","awrz bipeqx")
xqepib zrwa
^P1STREET("IS","xnz bo","ax biex`")
`xeib xa
^P1STREET("IS","xnz bo","ax ieg`i")
i`gei xa
^P1STREET("IS","xnz bo","ax keka`")
`akek xa
^P1STREET("IS","xnz bo","axecvwi")
iwvcexa
^P1STREET("IS","xnz bo","axexid")
dixexa
^P1STREET("IS","xnz bo","axpyhiio txu")
uxt oiihypxa
^P1STREET("IS","xnz bo","axw`i")
i`wxa
^P1STREET("IS","xnz bo","axweo")
oewxa
^P1STREET("IS","xnz bo","aynz")
znya
^P1STREET("IS","xnz bo","az yer")
rey za
^P1STREET("IS","xnz bo","b`elim")
mile`b
^P1STREET("IS","xnz bo","b`elz d`xu")
ux`d zle`b
^P1STREET("IS","xnz bo","bar")
rab
^P1STREET("IS","xnz bo","barz b`eld")
dle`b zrab
^P1STREET("IS","xnz bo","barzi")
izrab
^P1STREET("IS","xnz bo","bcreo")
oercb
^P1STREET("IS","xnz bo","belena")
aneleb
^P1STREET("IS","xnz bo","belpi")
ipleb
^P1STREET("IS","xnz bo","bexi idecd")
dcedi ixeb
^P1STREET("IS","xnz bo","bilcqbim")
mibqclib
^P1STREET("IS","xnz bo","blrc")
crlb
^P1STREET("IS","xnz bo","btepea")
aepetb
^P1STREET("IS","xnz bo","bxpceq")
qecpxb
^P1STREET("IS","xnz bo","bxyem")
meyxb
^P1STREET("IS","xnz bo","c""x `lide")
edil` x"c
^P1STREET("IS","xnz bo","c""x iegpo acx")
xca opgei x"c
^P1STREET("IS","xnz bo","c""x kdo")
odk x"c
^P1STREET("IS","xnz bo","ca txicno")
oncixt ac
^P1STREET("IS","xnz bo","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","xnz bo","cec")
cec
^P1STREET("IS","xnz bo","cec dnlj")
jlnd cec
^P1STREET("IS","xnz bo","cepy")
ypec
^P1STREET("IS","xnz bo","clid")
dilc
^P1STREET("IS","xnz bo","co")
oc
^P1STREET("IS","xnz bo","cpbex")
xebpc
^P1STREET("IS","xnz bo","cpi`l")
l`ipc
^P1STREET("IS","xnz bo","cwx")
xwc
^P1STREET("IS","xnz bo","cxj `a` dll qilax")
xaliq lld `a` jxc
^P1STREET("IS","xnz bo","cxj `ilz")
zli` jxc
^P1STREET("IS","xnz bo","cxj `lide")
edil` jxc
^P1STREET("IS","xnz bo","cxj ao bexieo")
oeixeb oa jxc
^P1STREET("IS","xnz bo","cxj dbaexd")
dxeabd jxc
^P1STREET("IS","xnz bo","cxj dhiiqim")
miqiihd jxc
^P1STREET("IS","xnz bo","cxj dztevez")
zevetzd jxc
^P1STREET("IS","xnz bo","cxj kdo")
odk jxc
^P1STREET("IS","xnz bo","cxj pbad")
dabp jxc
^P1STREET("IS","xnz bo","cxj yia`")
`aiy jxc
^P1STREET("IS","xnz bo","d`bcd")
dcb`d
^P1STREET("IS","xnz bo","d`exim")
mixe`d
^P1STREET("IS","xnz bo","d`exo")
oxe`d
^P1STREET("IS","xnz bo","d`gez `eqhx")
xhqe` zeg`d
^P1STREET("IS","xnz bo","d`gez gid")
dig zeg`d
^P1STREET("IS","xnz bo","d`gim af'xpe")
epx'fa mig`d
^P1STREET("IS","xnz bo","d`gim liheipqwi")
iwqpiehil mig`d
^P1STREET("IS","xnz bo","d`m")
m`d
^P1STREET("IS","xnz bo","d`nex`im")
mi`xen`d
^P1STREET("IS","xnz bo","d`x""i")
i"x`d
^P1STREET("IS","xnz bo","d`xar")
rax`d
^P1STREET("IS","xnz bo","d`xf")
fx`d
^P1STREET("IS","xnz bo","d`yl")
ly`d
^P1STREET("IS","xnz bo","daepim")
mipead
^P1STREET("IS","xnz bo","dail""eiim")
miie"liad
^P1STREET("IS","xnz bo","dapim")
mipad
^P1STREET("IS","xnz bo","dary""h")
h"yrad
^P1STREET("IS","xnz bo","daxeo dixy")
yxid oexad
^P1STREET("IS","xnz bo","daxey")
yexad
^P1STREET("IS","xnz bo","dayo")
oyad
^P1STREET("IS","xnz bo","db`eo `lide")
edil` oe`bd
^P1STREET("IS","xnz bo","dbard")
drabd
^P1STREET("IS","xnz bo","dbelo")
olebd
^P1STREET("IS","xnz bo","dblbl")
lblbd
^P1STREET("IS","xnz bo","dbto")
otbd
^P1STREET("IS","xnz bo","dbz")
zbd
^P1STREET("IS","xnz bo","dcwlim")
milwcd
^P1STREET("IS","xnz bo","dcx")
xcd
^P1STREET("IS","xnz bo","dcxexim")
mixexcd
^P1STREET("IS","xnz bo","ddbpd")
dpbdd
^P1STREET("IS","xnz bo","ddcq")
qcdd
^P1STREET("IS","xnz bo","ddlkd")
dkldd
^P1STREET("IS","xnz bo","dexcim")
micxed
^P1STREET("IS","xnz bo","deyr")
ryed
^P1STREET("IS","xnz bo","dfizim")
mizifd
^P1STREET("IS","xnz bo","dfnix")
xinfd
^P1STREET("IS","xnz bo","dgalpim")
miplagd
^P1STREET("IS","xnz bo","dgeld")
dlegd
^P1STREET("IS","xnz bo","dgi""l")
l"igd
^P1STREET("IS","xnz bo","dgiil d`lnepi")
ipenl`d liigd
^P1STREET("IS","xnz bo","dgilfeo")
oefligd
^P1STREET("IS","xnz bo","dgiveo")
oevigd
^P1STREET("IS","xnz bo","dgu")
ugd
^P1STREET("IS","xnz bo","dgxeu")
uexgd
^P1STREET("IS","xnz bo","dgxneo")
oenxgd
^P1STREET("IS","xnz bo","dgynep`im")
mi`penygd
^P1STREET("IS","xnz bo","dieba")
abeid
^P1STREET("IS","xnz bo","diefnd")
dnfeid
^P1STREET("IS","xnz bo","diqnio")
oinqid
^P1STREET("IS","xnz bo","dirxd")
dxrid
^P1STREET("IS","xnz bo","divixd")
dxivid
^P1STREET("IS","xnz bo","dixco")
ocxid
^P1STREET("IS","xnz bo","dizc")
czid
^P1STREET("IS","xnz bo","dka`im")
mi`akd
^P1STREET("IS","xnz bo","dlapeo")
oepald
^P1STREET("IS","xnz bo","dltic")
citld
^P1STREET("IS","xnz bo","dn`d e`gc")
cg`e d`nd
^P1STREET("IS","xnz bo","dn`ixi")
ixi`nd
^P1STREET("IS","xnz bo","dnacil")
licand
^P1STREET("IS","xnz bo","dngzxz")
zxzgnd
^P1STREET("IS","xnz bo","dnizx")
xzind
^P1STREET("IS","xnz bo","dnkai")
iaknd
^P1STREET("IS","xnz bo","dnl`kd")
dk`lnd
^P1STREET("IS","xnz bo","dnlj ieqs")
sqei jlnd
^P1STREET("IS","xnz bo","dnlj ip`i")
i`pi jlnd
^P1STREET("IS","xnz bo","dnrbl")
lbrnd
^P1STREET("IS","xnz bo","dnrio")
oirnd
^P1STREET("IS","xnz bo","dnrtil")
litrnd
^P1STREET("IS","xnz bo","dnvix")
xivnd
^P1STREET("IS","xnz bo","dnwex")
xewnd
^P1STREET("IS","xnz bo","dnxber")
rebxnd
^P1STREET("IS","xnz bo","dnxbpiz")
zipbxnd
^P1STREET("IS","xnz bo","dnyexx kdo")
odk xxeynd
^P1STREET("IS","xnz bo","dnznic")
cinznd
^P1STREET("IS","xnz bo","dpbic")
cibpd
^P1STREET("IS","xnz bo","dpgl")
lgpd
^P1STREET("IS","xnz bo","dprexim")
mixerpd
^P1STREET("IS","xnz bo","dpyi` dx`yeo")
oey`xd `iypd
^P1STREET("IS","xnz bo","dqelm")
mleqd
^P1STREET("IS","xnz bo","dqpd")
dpqd
^P1STREET("IS","xnz bo","dqxo ca")
ac oxqd
^P1STREET("IS","xnz bo","drliid dypiid")
diipyd diilrd
^P1STREET("IS","xnz bo","drnl")
lnrd
^P1STREET("IS","xnz bo","dtecim")
micetd
^P1STREET("IS","xnz bo","dtexvim")
mivxetd
^P1STREET("IS","xnz bo","dthno")
onhtd
^P1STREET("IS","xnz bo","dtln""g")
g"nltd
^P1STREET("IS","xnz bo","dtxqd")
dqxtd
^P1STREET("IS","xnz bo","dvlr")
rlvd
^P1STREET("IS","xnz bo","dx`""d")
d"`xd
^P1STREET("IS","xnz bo","dx`a""r")
r"a`xd
^P1STREET("IS","xnz bo","dx`eapi")
ipae`xd
^P1STREET("IS","xnz bo","dx`l")
l`xd
^P1STREET("IS","xnz bo","dx`yepim")
mipey`xd
^P1STREET("IS","xnz bo","dxa gad")
dag axd
^P1STREET("IS","xnz bo","dxa gi hiia")
aiih ig axd
^P1STREET("IS","xnz bo","dxa leio")
oiel axd
^P1STREET("IS","xnz bo","dxa txcq")
qcxt axd
^P1STREET("IS","xnz bo","dxai nxifio")
oifixn iaxd
^P1STREET("IS","xnz bo","dxet`im")
mi`texd
^P1STREET("IS","xnz bo","dxkqim")
miqkxd
^P1STREET("IS","xnz bo","dxneo")
oenxd
^P1STREET("IS","xnz bo","dxvl")
lvxd
^P1STREET("IS","xnz bo","dxvtlc")
cltvxd
^P1STREET("IS","xnz bo","dxweo")
oewxd
^P1STREET("IS","xnz bo","dxwnd")
dnwxd
^P1STREET("IS","xnz bo","dxxi")
ixxd
^P1STREET("IS","xnz bo","dyehxz")
zxheyd
^P1STREET("IS","xnz bo","dyenx")
xneyd
^P1STREET("IS","xnz bo","dyexd")
dxeyd
^P1STREET("IS","xnz bo","dyeyo")
oyeyd
^P1STREET("IS","xnz bo","dylyim eylyd")
dylye miylyd
^P1STREET("IS","xnz bo","dyrexd")
dxeryd
^P1STREET("IS","xnz bo","dywnd")
dnwyd
^P1STREET("IS","xnz bo","dyx nyd")
dyn xyd
^P1STREET("IS","xnz bo","dzaex")
xeazd
^P1STREET("IS","xnz bo","dzp`im")
mi`pzd
^P1STREET("IS","xnz bo","dzwed")
dewzd
^P1STREET("IS","xnz bo","eipyl")
lypie
^P1STREET("IS","xnz bo","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","xnz bo","fdx")
xdf
^P1STREET("IS","xnz bo","fiqno ylem")
mely onqif
^P1STREET("IS","xnz bo","fkxid")
dixkf
^P1STREET("IS","xnz bo","flno yf""x")
x"fy onlf
^P1STREET("IS","xnz bo","flno ypi`ex")
xe`ipy onlf
^P1STREET("IS","xnz bo","fx")
xf
^P1STREET("IS","xnz bo","gavlz")
zlvag
^P1STREET("IS","xnz bo","gawew")
wewag
^P1STREET("IS","xnz bo","gax")
xag
^P1STREET("IS","xnz bo","gaxeo")
oexag
^P1STREET("IS","xnz bo","gbi")
ibg
^P1STREET("IS","xnz bo","gc pq")
qp cg
^P1STREET("IS","xnz bo","gcxd")
dxcg
^P1STREET("IS","xnz bo","gexbio")
oibxeg
^P1STREET("IS","xnz bo","gfeo `iy")
yi` oefg
^P1STREET("IS","xnz bo","giaz vieo")
oeiv zaig
^P1STREET("IS","xnz bo","giim lpc`e")
e`cpl miig
^P1STREET("IS","xnz bo","gnix")
xing
^P1STREET("IS","xnz bo","gpd qpy")
ypq dpg
^P1STREET("IS","xnz bo","gvex")
xevg
^P1STREET("IS","xnz bo","gxec")
cexg
^P1STREET("IS","xnz bo","gxefim")
mifexg
^P1STREET("IS","xnz bo","gxez")
zexg
^P1STREET("IS","xnz bo","hapwio")
oiwpah
^P1STREET("IS","xnz bo","hex daxeyim")
miyexad xeh
^P1STREET("IS","xnz bo","hxeno")
onexh
^P1STREET("IS","xnz bo","i""` a`cx")
xc`a `"i
^P1STREET("IS","xnz bo","i`ix")
xi`i
^P1STREET("IS","xnz bo","iapd")
dpai
^P1STREET("IS","xnz bo","iapi`li")
il`ipai
^P1STREET("IS","xnz bo","ic dgfwd")
dwfgd ci
^P1STREET("IS","xnz bo","ic ylem")
mely ci
^P1STREET("IS","xnz bo","icicid")
dicici
^P1STREET("IS","xnz bo","icr rm")
mr rci
^P1STREET("IS","xnz bo","idecd")
dcedi
^P1STREET("IS","xnz bo","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","xnz bo","ideciz")
zicedi
^P1STREET("IS","xnz bo","idepzo")
ozpedi
^P1STREET("IS","xnz bo","ideyth")
htyedi
^P1STREET("IS","xnz bo","idlem")
meldi
^P1STREET("IS","xnz bo","ie`a")
a`ei
^P1STREET("IS","xnz bo","iegpo")
opgei
^P1STREET("IS","xnz bo","iepd")
dpei
^P1STREET("IS","xnz bo","ieqs dblili")
ililbd sqei
^P1STREET("IS","xnz bo","ieqs vai")
iav sqei
^P1STREET("IS","xnz bo","ieqs w`xe")
ex`w sqei
^P1STREET("IS","xnz bo","ieqti")
itqei
^P1STREET("IS","xnz bo","ifxr`l")
l`rxfi
^P1STREET("IS","xnz bo","igfw`l")
l`wfgi
^P1STREET("IS","xnz bo","ikio")
oiki
^P1STREET("IS","xnz bo","irau")
uari
^P1STREET("IS","xnz bo","irl dbiaexd")
dxeaibd lri
^P1STREET("IS","xnz bo","irlim")
milri
^P1STREET("IS","xnz bo","itd")
dti
^P1STREET("IS","xnz bo","ixige")
egixi
^P1STREET("IS","xnz bo","ixnid")
dinxi
^P1STREET("IS","xnz bo","iyexeo")
oexeyi
^P1STREET("IS","xnz bo","iyride")
ediryi
^P1STREET("IS","xnz bo","kdo `lide")
edil` odk
^P1STREET("IS","xnz bo","keayi rfd")
dfr iyaek
^P1STREET("IS","xnz bo","kkx bxepx")
xpexb xkk
^P1STREET("IS","xnz bo","kkx dlegnim")
mingeld xkk
^P1STREET("IS","xnz bo","kkx txcq")
qcxt xkk
^P1STREET("IS","xnz bo","kkx xna""m")
m"anx xkk
^P1STREET("IS","xnz bo","kpti pyxim")
mixyp itpk
^P1STREET("IS","xnz bo","kpxz")
zxpk
^P1STREET("IS","xnz bo","kvplqeo")
oeqlpvk
^P1STREET("IS","xnz bo","kxnli")
ilnxk
^P1STREET("IS","xnz bo","l`o")
o`l
^P1STREET("IS","xnz bo","la dfda")
adfd al
^P1STREET("IS","xnz bo","laai vng")
gnv iaal
^P1STREET("IS","xnz bo","lai`")
`ial
^P1STREET("IS","xnz bo","legni qipi")
ipiq ingel
^P1STREET("IS","xnz bo","lei")
iel
^P1STREET("IS","xnz bo","leihd")
dhiel
^P1STREET("IS","xnz bo","lg""i")
i"gl
^P1STREET("IS","xnz bo","lpcxq")
qxcpl
^P1STREET("IS","xnz bo","n`ix arl pq")
qp lra xi`n
^P1STREET("IS","xnz bo","nae` `xid")
dix` `ean
^P1STREET("IS","xnz bo","nae` cec")
cec `ean
^P1STREET("IS","xnz bo","nae` dcqim")
miqcd `ean
^P1STREET("IS","xnz bo","nae` drnl")
lnrd `ean
^P1STREET("IS","xnz bo","nae` dtecim")
micetd `ean
^P1STREET("IS","xnz bo","nae` dwepbxq")
qxbpewd `ean
^P1STREET("IS","xnz bo","nae` dxineo")
oenixd `ean
^P1STREET("IS","xnz bo","nae` dzikeo")
oekizd `ean
^P1STREET("IS","xnz bo","nae` f`a")
a`f `ean
^P1STREET("IS","xnz bo","nae` idlem")
meldi `ean
^P1STREET("IS","xnz bo","nae` irlim")
milri `ean
^P1STREET("IS","xnz bo","nae` npcq")
qcpn `ean
^P1STREET("IS","xnz bo","nae` pbad")
dabp `ean
^P1STREET("IS","xnz bo","nae` pq")
qp `ean
^P1STREET("IS","xnz bo","nae` pzo")
ozp `ean
^P1STREET("IS","xnz bo","nae` xaiaim")
miaiax `ean
^P1STREET("IS","xnz bo","navr qipi")
ipiq rvan
^P1STREET("IS","xnz bo","navr rio")
oir rvan
^P1STREET("IS","xnz bo","navr wcy")
ycw rvan
^P1STREET("IS","xnz bo","nbcim")
micbn
^P1STREET("IS","xnz bo","nefq pg")
gp qfen
^P1STREET("IS","xnz bo","nelke")
eklen
^P1STREET("IS","xnz bo","nev`")
`ven
^P1STREET("IS","xnz bo","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","xnz bo","nexid")
dixen
^P1STREET("IS","xnz bo","ngpiim")
miipgn
^P1STREET("IS","xnz bo","ngu")
ugn
^P1STREET("IS","xnz bo","nhd `dxeo")
oexd` dhn
^P1STREET("IS","xnz bo","nheld")
dlehn
^P1STREET("IS","xnz bo","nik`l")
l`kin
^P1STREET("IS","xnz bo","nikd")
dkin
^P1STREET("IS","xnz bo","nixwio")
oiwxin
^P1STREET("IS","xnz bo","nl""l")
l"ln
^P1STREET("IS","xnz bo","nl`ki")
ik`ln
^P1STREET("IS","xnz bo","nlgi")
igln
^P1STREET("IS","xnz bo","nlki vcw")
wcv ikln
^P1STREET("IS","xnz bo","npcq")
qcpn
^P1STREET("IS","xnz bo","npgm")
mgpn
^P1STREET("IS","xnz bo","npgm abio")
oiba mgpn
^P1STREET("IS","xnz bo","npgm ivgw")
wgvi mgpn
^P1STREET("IS","xnz bo","npyd")
dypn
^P1STREET("IS","xnz bo","nrld dapim")
mipad dlrn
^P1STREET("IS","xnz bo","nrld dpyx")
xypd dlrn
^P1STREET("IS","xnz bo","nrld dvai")
iavd dlrn
^P1STREET("IS","xnz bo","nrld dvetim")
mitevd dlrn
^P1STREET("IS","xnz bo","nrld dye`ad")
da`eyd dlrn
^P1STREET("IS","xnz bo","nrld dygx")
xgyd dlrn
^P1STREET("IS","xnz bo","nvcd")
dcvn
^P1STREET("IS","xnz bo","nvtd")
dtvn
^P1STREET("IS","xnz bo","nwceplc")
clpecwn
^P1STREET("IS","xnz bo","nxcki")
ikcxn
^P1STREET("IS","xnz bo","nxim")
mixn
^P1STREET("IS","xnz bo","nxim dpai`d")
d`iapd mixn
^P1STREET("IS","xnz bo","nxkeq")
qekxn
^P1STREET("IS","xnz bo","nyd ciio")
oiic dyn
^P1STREET("IS","xnz bo","nykiz")
zikyn
^P1STREET("IS","xnz bo","nynx dixco")
ocxid xnyn
^P1STREET("IS","xnz bo","nyrel qtx`i")
i`xtq leryn
^P1STREET("IS","xnz bo","nzpid")
dipzn
^P1STREET("IS","xnz bo","nzzide dgynep`i")
i`penygd edizzn
^P1STREET("IS","xnz bo","nzzide npcl")
lcpn edizzn
^P1STREET("IS","xnz bo","pae")
eap
^P1STREET("IS","xnz bo","pcepi wdix")
xidw ipecp
^P1STREET("IS","xnz bo","pdxcr`")
`rcxdp
^P1STREET("IS","xnz bo","ped ideyr")
ryedi dep
^P1STREET("IS","xnz bo","ped irwa")
awri dep
^P1STREET("IS","xnz bo","pexc`e")
e`cxep
^P1STREET("IS","xnz bo","pexiz")
zixep
^P1STREET("IS","xnz bo","pgem")
megp
^P1STREET("IS","xnz bo","pgld")
dlgp
^P1STREET("IS","xnz bo","pgli`li")
il`ilgp
^P1STREET("IS","xnz bo","pglz ieqs")
sqei zlgp
^P1STREET("IS","xnz bo","pgyeo")
oeygp
^P1STREET("IS","xnz bo","pu")
up
^P1STREET("IS","xnz bo","pvpim")
mipvp
^P1STREET("IS","xnz bo","pxcineo")
oenicxp
^P1STREET("IS","xnz bo","pyi`i iyx`l")
l`xyi i`iyp
^P1STREET("IS","xnz bo","pzo")
ozp
^P1STREET("IS","xnz bo","qaieo")
oeiaq
^P1STREET("IS","xnz bo","qewelea")
aeleweq
^P1STREET("IS","xnz bo","qex`")
`xeq
^P1STREET("IS","xnz bo","qhet")
tehq
^P1STREET("IS","xnz bo","qhxend")
dnexhq
^P1STREET("IS","xnz bo","qibliz")
zilbiq
^P1STREET("IS","xnz bo","qiixz cekitz")
ztikec zxiiq
^P1STREET("IS","xnz bo","qixwio")
oiwxiq
^P1STREET("IS","xnz bo","qlnd litwpi")
ipwtil dnlq
^P1STREET("IS","xnz bo","qlw")
wlq
^P1STREET("IS","xnz bo","qncx")
xcnq
^P1STREET("IS","xnz bo","qnhz `ileo")
oeli` zhnq
^P1STREET("IS","xnz bo","qnhz `laxh")
hxal` zhnq
^P1STREET("IS","xnz bo","qnhz ax biex`")
`xeib xa zhnq
^P1STREET("IS","xnz bo","qnhz da`x")
x`ad zhnq
^P1STREET("IS","xnz bo","qnhz dnrlez")
zelrnd zhnq
^P1STREET("IS","xnz bo","qnhz dyleg")
gelyd zhnq
^P1STREET("IS","xnz bo","qnhz dzlnic")
cinlzd zhnq
^P1STREET("IS","xnz bo","qnhz itzg")
gzti zhnq
^P1STREET("IS","xnz bo","qnhz tpgq")
qgpt zhnq
^P1STREET("IS","xnz bo","qnhz wxo")
oxw zhnq
^P1STREET("IS","xnz bo","qnhz yrx dbi`")
`ibd xry zhnq
^P1STREET("IS","xnz bo","qnhz ywnd")
dnwy zhnq
^P1STREET("IS","xnz bo","qo nxhio")
oihxn oq
^P1STREET("IS","xnz bo","qpdcxio")
oixcdpq
^P1STREET("IS","xnz bo","qtix ieqs")
sqei xitq
^P1STREET("IS","xnz bo","rce")
ecr
^P1STREET("IS","xnz bo","reacid")
dicaer
^P1STREET("IS","xnz bo","recc")
ccer
^P1STREET("IS","xnz bo","refi`l")
l`ifer
^P1STREET("IS","xnz bo","reli dbxcem")
mecxbd iler
^P1STREET("IS","xnz bo","rfxi`l")
l`ixfr
^P1STREET("IS","xnz bo","rhxez")
zexhr
^P1STREET("IS","xnz bo","rio ida")
adi oir
^P1STREET("IS","xnz bo","rix bpim")
mipb xir
^P1STREET("IS","xnz bo","rlenim")
minelr
^P1STREET("IS","xnz bo","rlid x`yepd")
dpey`x dilr
^P1STREET("IS","xnz bo","rlid yliyiz")
ziyily dilr
^P1STREET("IS","xnz bo","rliz dperx")
xrepd zilr
^P1STREET("IS","xnz bo","rneq")
qenr
^P1STREET("IS","xnz bo","rnipca")
acpinr
^P1STREET("IS","xnz bo","rniwm")
mwinr
^P1STREET("IS","xnz bo","rnw `xfim")
mifx` wnr
^P1STREET("IS","xnz bo","rnw cezo")
ozec wnr
^P1STREET("IS","xnz bo","rnw d`ld")
dl`d wnr
^P1STREET("IS","xnz bo","rvieo")
oeivr
^P1STREET("IS","xnz bo","rxnepim")
mipenxr
^P1STREET("IS","xnz bo","taxibh")
hbixat
^P1STREET("IS","xnz bo","tenaciz`")
`zicanet
^P1STREET("IS","xnz bo","tpgq xehpaxb")
bxaphex qgpt
^P1STREET("IS","xnz bo","tpi dbard")
drabd ipt
^P1STREET("IS","xnz bo","tpwq")
qwpt
^P1STREET("IS","xnz bo","txeb ynreo")
oerny bext
^P1STREET("IS","xnz bo","txetq")
qtext
^P1STREET("IS","xnz bo","tziid")
diizt
^P1STREET("IS","xnz bo","v`lim")
mil`v
^P1STREET("IS","xnz bo","vai")
iav
^P1STREET("IS","xnz bo","vcew")
wecv
^P1STREET("IS","xnz bo","veal")
laev
^P1STREET("IS","xnz bo","vexi`l")
l`ixev
^P1STREET("IS","xnz bo","vl dbard")
drabd lv
^P1STREET("IS","xnz bo","vtpid")
diptv
^P1STREET("IS","xnz bo","vx `lide")
edil` xv
^P1STREET("IS","xnz bo","wceyi wdix")
xidw iyecw
^P1STREET("IS","xnz bo","wcnd")
dncw
^P1STREET("IS","xnz bo","wcxeo")
oexcw
^P1STREET("IS","xnz bo","wenniez")
zeinnew
^P1STREET("IS","xnz bo","wiy")
yiw
^P1STREET("IS","xnz bo","wl`efpx")
xpfe`lw
^P1STREET("IS","xnz bo","wtlo")
oltw
^P1STREET("IS","xnz bo","wxipivi")
ivipixw
^P1STREET("IS","xnz bo","wxizi")
izixw
^P1STREET("IS","xnz bo","wxl phx")
xhp lxw
^P1STREET("IS","xnz bo","wxqwi")
iwqxw
^P1STREET("IS","xnz bo","x`y tipd")
dpit y`x
^P1STREET("IS","xnz bo","xa")
ax
^P1STREET("IS","xnz bo","xacim")
micax
^P1STREET("IS","xnz bo","xaipeaiu'")
'uiaepiax
^P1STREET("IS","xnz bo","xc""w")
w"cx
^P1STREET("IS","xnz bo","xecio")
oicex
^P1STREET("IS","xnz bo","xefo")
ofex
^P1STREET("IS","xnz bo","xegnd")
dngex
^P1STREET("IS","xnz bo","xehyilc")
cliyhex
^P1STREET("IS","xnz bo","xewg")
gwex
^P1STREET("IS","xnz bo","xez")
zex
^P1STREET("IS","xnz bo","xezm")
mzex
^P1STREET("IS","xnz bo","xfi`l")
l`ifx
^P1STREET("IS","xnz bo","xg' k""b")
b"k 'gx
^P1STREET("IS","xnz bo","xgeaez dpdx")
xdpd zeaegx
^P1STREET("IS","xnz bo","xiipq")
qpiix
^P1STREET("IS","xnz bo","xiiw gaiad")
daiag wiix
^P1STREET("IS","xnz bo","xinlh")
hlnix
^P1STREET("IS","xnz bo","xnf")
fnx
^P1STREET("IS","xnz bo","xnz go")
og znx
^P1STREET("IS","xnz bo","xppim")
mippx
^P1STREET("IS","xnz bo","xy""i")
i"yx
^P1STREET("IS","xnz bo","y`po")
op`y
^P1STREET("IS","xnz bo","y`x iyea")
aeyi x`y
^P1STREET("IS","xnz bo","yc' `axdm")
mdxa` 'cy
^P1STREET("IS","xnz bo","yc' `dxeo wvix")
xivw oexd` 'cy
^P1STREET("IS","xnz bo","yc' `xi`ld")
dl`ix` 'cy
^P1STREET("IS","xnz bo","yc' ao vai")
iav oa 'cy
^P1STREET("IS","xnz bo","yc' d`expim")
mipxe`d 'cy
^P1STREET("IS","xnz bo","yc' dbaexim")
mixeabd 'cy
^P1STREET("IS","xnz bo","yc' dgxeyz")
zyexgd 'cy
^P1STREET("IS","xnz bo","yc' dhiq")
qihd 'cy
^P1STREET("IS","xnz bo","yc' dilc")
clid 'cy
^P1STREET("IS","xnz bo","yc' dklpiez")
zeiplkd 'cy
^P1STREET("IS","xnz bo","yc' dpxwiqim")
miqiwxpd 'cy
^P1STREET("IS","xnz bo","yc' drm dvxtzi")
iztxvd mrd 'cy
^P1STREET("IS","xnz bo","yc' dvpgpim")
mipgpvd 'cy
^P1STREET("IS","xnz bo","yc' dwepbxq")
qxbpewd 'cy
^P1STREET("IS","xnz bo","yc' dxwtz")
ztwxd 'cy
^P1STREET("IS","xnz bo","yc' dyeypim")
mipyeyd 'cy
^P1STREET("IS","xnz bo","yc' dygxex")
xexgyd 'cy
^P1STREET("IS","xnz bo","yc' dznxim")
mixnzd 'cy
^P1STREET("IS","xnz bo","yc' eiv""e")
e"vie 'cy
^P1STREET("IS","xnz bo","yc' heaim")
miaeh 'cy
^P1STREET("IS","xnz bo","yc' idcez tlcltid")
ditlclt zecdi 'cy
^P1STREET("IS","xnz bo","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","xnz bo","yc' lnco")
ocnl 'cy
^P1STREET("IS","xnz bo","yc' pgnd")
dngp 'cy
^P1STREET("IS","xnz bo","yc' wm")
mw 'cy
^P1STREET("IS","xnz bo","ycd aewx")
xwea dcy
^P1STREET("IS","xnz bo","ydm")
mdy
^P1STREET("IS","xnz bo","yerli ynyeo")
oeyny ilrey
^P1STREET("IS","xnz bo","yi`eo")
oe`iy
^P1STREET("IS","xnz bo","yild")
dliy
^P1STREET("IS","xnz bo","ylem rlikm")
mkilr mely
^P1STREET("IS","xnz bo","ylenvieo")
oeivnely
^P1STREET("IS","xnz bo","ylm")
mly
^P1STREET("IS","xnz bo","yne`li")
il`eny
^P1STREET("IS","xnz bo","yngd")
dgny
^P1STREET("IS","xnz bo","ynrepi")
iperny
^P1STREET("IS","xnz bo","ynxlipb")
bpilxny
^P1STREET("IS","xnz bo","ypix")
xipy
^P1STREET("IS","xnz bo","ytix`")
`xity
^P1STREET("IS","xnz bo","ywcid")
dicwy
^P1STREET("IS","xnz bo","yxix` b`eo")
oe`b `xixy
^P1STREET("IS","xnz bo","yxz")
zxy
^P1STREET("IS","xnz bo","yyz dinim")
minid zyy
^P1STREET("IS","xnz bo","yzil")
lizy
^P1STREET("IS","xnz bo","zcdx")
xdcz
^P1STREET("IS","xnz bo","zeal")
laez
^P1STREET("IS","xnz bo","ziix")
xiiz
^P1STREET("IS","xnz bo","zl dyenx")
xneyd lz
^P1STREET("IS","xnz bo","zl gi")
ig lz
^P1STREET("IS","xnz bo","zl idecd")
dcedi lz
^P1STREET("IS","xnz bo","zltiez")
zeitlz
^P1STREET("IS","xnz bo","zperz dnxi")
ixnd zrepz
^P1STREET("IS","xnz bo","zr""y")
y"rz
^P1STREET("IS","xnz bo","zt`xz iyx`l")
l`xyi zx`tz
^P1STREET("IS","xnz bo","zxq""g")
g"qxz
^P1STREET("IS","xnz bo","zxr""c")
c"rxz
^P1STREET("IS","xnz bo","zxt""a")
a"txz
^P1STREET("IS","xnz bo","zxvd")
dvxz
^P1STREET("IS","xnz bo","zy""i")
i"yz
^P1STREET("IS","xnz cec")
cec znx
^P1STREET("IS","xnz dcx")
xcd znx
^P1STREET("IS","xnz dcx","ddkyxez")
zexykdd
^P1STREET("IS","xnz dkeay")
yaekd znx
^P1STREET("IS","xnz dyeth")
hteyd znx
^P1STREET("IS","xnz dyxeo")
oexyd znx
^P1STREET("IS","xnz dyxeo","`""c bexceo")
oecxeb c"`
^P1STREET("IS","xnz dyxeo","`aia")
aia`
^P1STREET("IS","xnz dyxeo","`bef")
feb`
^P1STREET("IS","xnz dyxeo","`bxz zino")
oniz zxb`
^P1STREET("IS","xnz dyxeo","`dec")
ced`
^P1STREET("IS","xnz dyxeo","`eqiywio")
oiwyiqe`
^P1STREET("IS","xnz dyxeo","`exaej")
jeaxe`
^P1STREET("IS","xnz dyxeo","`f""x")
x"f`
^P1STREET("IS","xnz dyxeo","`id")
di`
^P1STREET("IS","xnz dyxeo","`ifex dzryid")
diyrzd xefi`
^P1STREET("IS","xnz dyxeo","`iileo")
oelii`
^P1STREET("IS","xnz dyxeo","`ilz")
zli`
^P1STREET("IS","xnz dyxeo","`les")
sel`
^P1STREET("IS","xnz dyxeo","`li kdo")
odk il`
^P1STREET("IS","xnz dyxeo","`nixim")
mixin`
^P1STREET("IS","xnz dyxeo","`pi n`nio")
oin`n ip`
^P1STREET("IS","xnz dyxeo","`ptd")
dtp`
^P1STREET("IS","xnz dyxeo","`pwex")
xewp`
^P1STREET("IS","xnz dyxeo","`xf")
fx`
^P1STREET("IS","xnz dyxeo","`xlefexea")
aexefelx`
^P1STREET("IS","xnz dyxeo","`xpeo")
oepx`
^P1STREET("IS","xnz dyxeo","`yl `axdm")
mdxa` ly`
^P1STREET("IS","xnz dyxeo","aeqzp`i")
i`pzqea
^P1STREET("IS","xnz dyxeo","aerf")
frea
^P1STREET("IS","xnz dyxeo","aeww")
wwea
^P1STREET("IS","xnz dyxeo","af""l")
l"fa
^P1STREET("IS","xnz dyxeo","ailipqeo")
oeqpilia
^P1STREET("IS","xnz dyxeo","aiz beaxio")
oixaeb zia
^P1STREET("IS","xnz dyxeo","aiz dll")
lld zia
^P1STREET("IS","xnz dyxeo","aiz dye`ad")
da`eyd zia
^P1STREET("IS","xnz dyxeo","aiz yn`i")
i`ny zia
^P1STREET("IS","xnz dyxeo","altex")
xetla
^P1STREET("IS","xnz dyxeo","ao fk`i")
i`kf oa
^P1STREET("IS","xnz dyxeo","ao giim")
miig oa
^P1STREET("IS","xnz dyxeo","ao peo")
oep oa
^P1STREET("IS","xnz dyxeo","ao qixd")
dxiq oa
^P1STREET("IS","xnz dyxeo","ao ylem")
mely oa
^P1STREET("IS","xnz dyxeo","apinipi vai")
iav ipinipa
^P1STREET("IS","xnz dyxeo","ax ieg`i")
i`gei xa
^P1STREET("IS","xnz dyxeo","ax keka`")
`akek xa
^P1STREET("IS","xnz dyxeo","ax`yiz")
ziy`xa
^P1STREET("IS","xnz dyxeo","axpyhiio kdo")
odk oiihypxa
^P1STREET("IS","xnz dyxeo","axw")
wxa
^P1STREET("IS","xnz dyxeo","aynim")
minya
^P1STREET("IS","xnz dyxeo","b`eld")
dle`b
^P1STREET("IS","xnz dyxeo","b`elim")
mile`b
^P1STREET("IS","xnz dyxeo","bc")
cb
^P1STREET("IS","xnz dyxeo","bcreo")
oercb
^P1STREET("IS","xnz dyxeo","belcaxb")
bxacleb
^P1STREET("IS","xnz dyxeo","belena")
aneleb
^P1STREET("IS","xnz dyxeo","belo")
oleb
^P1STREET("IS","xnz dyxeo","blaer")
realb
^P1STREET("IS","xnz dyxeo","blrc")
crlb
^P1STREET("IS","xnz dyxeo","bnl`")
`lnb
^P1STREET("IS","xnz dyxeo","bnli`l")
l`ilnb
^P1STREET("IS","xnz dyxeo","bo giim")
miig ob
^P1STREET("IS","xnz dyxeo","ca def")
fed ac
^P1STREET("IS","xnz dyxeo","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","xnz dyxeo","cbo")
obc
^P1STREET("IS","xnz dyxeo","cec ao bexieo")
oeixeb oa cec
^P1STREET("IS","xnz dyxeo","co")
oc
^P1STREET("IS","xnz dyxeo","cwl")
lwc
^P1STREET("IS","xnz dyxeo","cxj dhpiq")
qiphd jxc
^P1STREET("IS","xnz dyxeo","cxj dx`yepim")
mipey`xd jxc
^P1STREET("IS","xnz dyxeo","d`exo")
oxe`d
^P1STREET("IS","xnz dyxeo","d`giez")
zeig`d
^P1STREET("IS","xnz dyxeo","d`ilpez")
zepli`d
^P1STREET("IS","xnz dyxeo","d`ld")
dl`d
^P1STREET("IS","xnz dyxeo","d`leo")
oel`d
^P1STREET("IS","xnz dyxeo","d`v""l")
l"v`d
^P1STREET("IS","xnz dyxeo","d`xi")
ix`d
^P1STREET("IS","xnz dyxeo","d`zxeb")
bexz`d
^P1STREET("IS","xnz dyxeo","da`x")
x`ad
^P1STREET("IS","xnz dyxeo","daeym")
myead
^P1STREET("IS","xnz dyxeo","dapim")
mipad
^P1STREET("IS","xnz dyxeo","daxeyim")
miyexad
^P1STREET("IS","xnz dyxeo","daxikd")
dkixad
^P1STREET("IS","xnz dyxeo","dayo")
oyad
^P1STREET("IS","xnz dyxeo","dbard")
drabd
^P1STREET("IS","xnz dyxeo","dbcecim")
micecbd
^P1STREET("IS","xnz dyxeo","dbi`")
`ibd
^P1STREET("IS","xnz dyxeo","dbpd")
dpbd
^P1STREET("IS","xnz dyxeo","dbpim")
mipbd
^P1STREET("IS","xnz dyxeo","dbto")
otbd
^P1STREET("IS","xnz dyxeo","dcbpiz")
zipbcd
^P1STREET("IS","xnz dyxeo","dcid")
dicd
^P1STREET("IS","xnz dyxeo","dcq")
qcd
^P1STREET("IS","xnz dyxeo","dcqim")
miqcd
^P1STREET("IS","xnz dyxeo","dcx")
xcd
^P1STREET("IS","xnz dyxeo","dcxex")
xexcd
^P1STREET("IS","xnz dyxeo","ddqzcxez")
zexczqdd
^P1STREET("IS","xnz dyxeo","dfedx")
xdefd
^P1STREET("IS","xnz dyxeo","dfexr")
rxefd
^P1STREET("IS","xnz dyxeo","dfiz")
zifd
^P1STREET("IS","xnz dyxeo","dfnix")
xinfd
^P1STREET("IS","xnz dyxeo","dfxfix")
xifxfd
^P1STREET("IS","xnz dyxeo","dgebd")
dbegd
^P1STREET("IS","xnz dyxeo","dgegiz")
zigegd
^P1STREET("IS","xnz dyxeo","dgiil")
liigd
^P1STREET("IS","xnz dyxeo","dgleu")
uelgd
^P1STREET("IS","xnz dyxeo","dgxea")
aexgd
^P1STREET("IS","xnz dyxeo","dgxy")
yxgd
^P1STREET("IS","xnz dyxeo","dhaw")
wahd
^P1STREET("IS","xnz dyxeo","dieba")
abeid
^P1STREET("IS","xnz dyxeo","diqrex")
xerqid
^P1STREET("IS","xnz dyxeo","dixco")
ocxid
^P1STREET("IS","xnz dyxeo","dkg")
gkd
^P1STREET("IS","xnz dyxeo","dkxkem")
mekxkd
^P1STREET("IS","xnz dyxeo","dkxnl")
lnxkd
^P1STREET("IS","xnz dyxeo","dlineo")
oenild
^P1STREET("IS","xnz dyxeo","dltic")
citld
^P1STREET("IS","xnz dyxeo","dn`aw")
wa`nd
^P1STREET("IS","xnz dyxeo","dngzxz")
zxzgnd
^P1STREET("IS","xnz dyxeo","dniiqcim")
micqiind
^P1STREET("IS","xnz dyxeo","dnkaim")
miaknd
^P1STREET("IS","xnz dyxeo","dnl`kd")
dk`lnd
^P1STREET("IS","xnz dyxeo","dnlkim")
miklnd
^P1STREET("IS","xnz dyxeo","dnqbx")
xbqnd
^P1STREET("IS","xnz dyxeo","dnrio")
oirnd
^P1STREET("IS","xnz dyxeo","dnrtilim")
militrnd
^P1STREET("IS","xnz dyxeo","dnvex")
xevnd
^P1STREET("IS","xnz dyxeo","dnxi")
ixnd
^P1STREET("IS","xnz dyxeo","dnzpglim")
milgpznd
^P1STREET("IS","xnz dyxeo","dpai`im")
mi`iapd
^P1STREET("IS","xnz dyxeo","dpehr")
rhepd
^P1STREET("IS","xnz dyxeo","dpehx")
xhepd
^P1STREET("IS","xnz dyxeo","dperx")
xrepd
^P1STREET("IS","xnz dyxeo","dpu")
upd
^P1STREET("IS","xnz dyxeo","dpvg")
gvpd
^P1STREET("IS","xnz dyxeo","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","xnz dyxeo","dpyx")
xypd
^P1STREET("IS","xnz dyxeo","dq")
qd
^P1STREET("IS","xnz dyxeo","dqiito")
otiiqd
^P1STREET("IS","xnz dyxeo","dqpd")
dpqd
^P1STREET("IS","xnz dyxeo","draecd")
dceard
^P1STREET("IS","xnz dyxeo","drenx")
xnerd
^P1STREET("IS","xnz dyxeo","drnl")
lnrd
^P1STREET("IS","xnz dyxeo","drnw")
wnrd
^P1STREET("IS","xnz dyxeo","drtxepi")
ipextrd
^P1STREET("IS","xnz dyxeo","dterlim")
milretd
^P1STREET("IS","xnz dyxeo","dtexvim")
mivxetd
^P1STREET("IS","xnz dyxeo","dtln""g")
g"nltd
^P1STREET("IS","xnz dyxeo","dtrnepiz")
zipenrtd
^P1STREET("IS","xnz dyxeo","dtxcq")
qcxtd
^P1STREET("IS","xnz dyxeo","dtxgim")
migxtd
^P1STREET("IS","xnz dyxeo","dvetim")
mitevd
^P1STREET("IS","xnz dyxeo","dvtexo")
oxetvd
^P1STREET("IS","xnz dyxeo","dwevx")
xvewd
^P1STREET("IS","xnz dyxeo","dwiaeu")
ueaiwd
^P1STREET("IS","xnz dyxeo","dwiyeo")
oeyiwd
^P1STREET("IS","xnz dyxeo","dwnd")
dnwd
^P1STREET("IS","xnz dyxeo","dwyz")
zywd
^P1STREET("IS","xnz dyxeo","dx pae")
eap xd
^P1STREET("IS","xnz dyxeo","dx zaex")
xeaz xd
^P1STREET("IS","xnz dyxeo","dxa `ae gvix`")
`xivg ea` axd
^P1STREET("IS","xnz dyxeo","dxa `exaj")
jaxe` axd
^P1STREET("IS","xnz dyxeo","dxa dxveb")
bevxd axd
^P1STREET("IS","xnz dyxeo","dxa wew")
wew axd
^P1STREET("IS","xnz dyxeo","dxa xiipq")
qpiix axd
^P1STREET("IS","xnz dyxeo","dxineo")
oenixd
^P1STREET("IS","xnz dyxeo","dyenx")
xneyd
^P1STREET("IS","xnz dyxeo","dyenxeo")
oexneyd
^P1STREET("IS","xnz dyxeo","dyethim")
mihteyd
^P1STREET("IS","xnz dyxeo","dygs")
sgyd
^P1STREET("IS","xnz dyxeo","dygxex")
xexgyd
^P1STREET("IS","xnz dyxeo","dyileg")
geliyd
^P1STREET("IS","xnz dyxeo","dytld")
dltyd
^P1STREET("IS","xnz dyxeo","dywc")
cwyd
^P1STREET("IS","xnz dyxeo","dywnd")
dnwyd
^P1STREET("IS","xnz dyxeo","dyxeo")
oexyd
^P1STREET("IS","xnz dyxeo","dz`pd")
dp`zd
^P1STREET("IS","xnz dyxeo","dzenx")
xnezd
^P1STREET("IS","xnz dyxeo","dzlnim")
minlzd
^P1STREET("IS","xnz dyxeo","dzwed")
dewzd
^P1STREET("IS","xnz dyxeo","dzxaez")
zeaxzd
^P1STREET("IS","xnz dyxeo","eizwio")
oiwzie
^P1STREET("IS","xnz dyxeo","f' agyeo")
oeyga 'f
^P1STREET("IS","xnz dyxeo","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","xnz dyxeo","flno ypi`ex")
xe`ipy onlf
^P1STREET("IS","xnz dyxeo","fxeaal")
laaexf
^P1STREET("IS","xnz dyxeo","gavlz")
zlvag
^P1STREET("IS","xnz dyxeo","ghiaz `lkqpcxepi")
ipexcpqkl` zaihg
^P1STREET("IS","xnz dyxeo","ghiaz barzi")
izrab zaihg
^P1STREET("IS","xnz dyxeo","ghiaz dpba")
abpd zaihg
^P1STREET("IS","xnz dyxeo","ghiaz dx`l")
l`xd zaihg
^P1STREET("IS","xnz dyxeo","gpd qpy")
ypq dpg
^P1STREET("IS","xnz dyxeo","gxeyz")
zyexg
^P1STREET("IS","xnz dyxeo","gxneo")
oenxg
^P1STREET("IS","xnz dyxeo","gynep`im")
mi`penyg
^P1STREET("IS","xnz dyxeo","hdeo")
oedh
^P1STREET("IS","xnz dyxeo","hxentlcex")
xecltnexh
^P1STREET("IS","xnz dyxeo","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","xnz dyxeo","i""l txu")
uxt l"i
^P1STREET("IS","xnz dyxeo","i`ix")
xi`i
^P1STREET("IS","xnz dyxeo","i`pey wexv'`w")
w`'vxew yep`i
^P1STREET("IS","xnz dyxeo","iaew")
weai
^P1STREET("IS","xnz dyxeo","iapd")
dpai
^P1STREET("IS","xnz dyxeo","ib`l `leo")
oel` l`bi
^P1STREET("IS","xnz dyxeo","ibir ktiim")
miitk ribi
^P1STREET("IS","xnz dyxeo","idecd")
dcedi
^P1STREET("IS","xnz dyxeo","idecd dlei")
ield dcedi
^P1STREET("IS","xnz dyxeo","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","xnz dyxeo","iepi pzpide")
edipzp ipei
^P1STREET("IS","xnz dyxeo","ieqthl")
lhtqei
^P1STREET("IS","xnz dyxeo","iezm")
mzei
^P1STREET("IS","xnz dyxeo","igirm")
mrigi
^P1STREET("IS","xnz dyxeo","irl")
lri
^P1STREET("IS","xnz dyxeo","irwa kdo")
odk awri
^P1STREET("IS","xnz dyxeo","itzg")
gzti
^P1STREET("IS","xnz dyxeo","ivdx")
xdvi
^P1STREET("IS","xnz dyxeo","ivgw `lgpo")
opgl` wgvi
^P1STREET("IS","xnz dyxeo","ivgw ycd")
dcy wgvi
^P1STREET("IS","xnz dyxeo","ivixd")
dxivi
^P1STREET("IS","xnz dyxeo","ixnej")
jenxi
^P1STREET("IS","xnz dyxeo","ixnide")
edinxi
^P1STREET("IS","xnz dyxeo","k""h apeanax")
xanaepa h"k
^P1STREET("IS","xnz dyxeo","kaey raecd")
dcear yeak
^P1STREET("IS","xnz dyxeo","kkx drvn`ez")
ze`nvrd xkk
^P1STREET("IS","xnz dyxeo","klpiz")
ziplk
^P1STREET("IS","xnz dyxeo","kvplqeo")
oeqlpvk
^P1STREET("IS","xnz dyxeo","laepd")
dpeal
^P1STREET("IS","xnz dyxeo","legni dbh`ez")
ze`hbd ingel
^P1STREET("IS","xnz dyxeo","lg""i")
i"gl
^P1STREET("IS","xnz dyxeo","lilj")
jlil
^P1STREET("IS","xnz dyxeo","lkiy")
yikl
^P1STREET("IS","xnz dyxeo","lnxga")
agxnl
^P1STREET("IS","xnz dyxeo","nahg ref")
fer ghan
^P1STREET("IS","xnz dyxeo","nbcim")
micbn
^P1STREET("IS","xnz dyxeo","nbice")
ecibn
^P1STREET("IS","xnz dyxeo","necirio")
oiricen
^P1STREET("IS","xnz dyxeo","nedliax")
xailden
^P1STREET("IS","xnz dyxeo","nexid")
dixen
^P1STREET("IS","xnz dyxeo","nexyd nrepez")
zepern dyxen
^P1STREET("IS","xnz dyxeo","npgm abio")
oiba mgpn
^P1STREET("IS","xnz dyxeo","nqcd")
dcqn
^P1STREET("IS","xnz dyxeo","nrio gxec")
cexg oirn
^P1STREET("IS","xnz dyxeo","nrxa")
axrn
^P1STREET("IS","xnz dyxeo","nvcd")
dcvn
^P1STREET("IS","xnz dyxeo","nxbpiz")
zipbxn
^P1STREET("IS","xnz dyxeo","nxcki")
ikcxn
^P1STREET("IS","xnz dyxeo","pdxcr`")
`rcxdp
^P1STREET("IS","xnz dyxeo","ped `xpeo")
oepx` dep
^P1STREET("IS","xnz dyxeo","ped xrim")
mirx dep
^P1STREET("IS","xnz dyxeo","pexc`e")
e`cxep
^P1STREET("IS","xnz dyxeo","pexiz")
zixep
^P1STREET("IS","xnz dyxeo","pgl")
lgp
^P1STREET("IS","xnz dyxeo","pgl dayex")
xeyad lgp
^P1STREET("IS","xnz dyxeo","pgl rnec")
cenr lgp
^P1STREET("IS","xnz dyxeo","pgl wicxeo")
oexciw lgp
^P1STREET("IS","xnz dyxeo","pgl yexw")
wxey lgp
^P1STREET("IS","xnz dyxeo","pgnid")
dingp
^P1STREET("IS","xnz dyxeo","pgyeo")
oeygp
^P1STREET("IS","xnz dyxeo","pgyepim")
mipeygp
^P1STREET("IS","xnz dyxeo","phs")
shp
^P1STREET("IS","xnz dyxeo","piqim")
miqip
^P1STREET("IS","xnz dyxeo","pivpd")
dpvip
^P1STREET("IS","xnz dyxeo","prni")
inrp
^P1STREET("IS","xnz dyxeo","pxwiqim")
miqiwxp
^P1STREET("IS","xnz dyxeo","qewelea")
aeleweq
^P1STREET("IS","xnz dyxeo","qhxend")
dnexhq
^P1STREET("IS","xnz dyxeo","qipi")
ipiq
^P1STREET("IS","xnz dyxeo","qlr")
rlq
^P1STREET("IS","xnz dyxeo","qn' nbc")
cbn 'nq
^P1STREET("IS","xnz dyxeo","qn' yiteo")
oetiy 'nq
^P1STREET("IS","xnz dyxeo","qncx")
xcnq
^P1STREET("IS","xnz dyxeo","qnhz `bcim")
micb` zhnq
^P1STREET("IS","xnz dyxeo","qnhz `etix")
xite` zhnq
^P1STREET("IS","xnz dyxeo","qnhz `ixiq")
qixi` zhnq
^P1STREET("IS","xnz dyxeo","qnhz `lgxifi")
ifixgl` zhnq
^P1STREET("IS","xnz dyxeo","qnhz `pwex")
xewp` zhnq
^P1STREET("IS","xnz dyxeo","qnhz `xal")
lax` zhnq
^P1STREET("IS","xnz dyxeo","qnhz anrld")
dlrna zhnq
^P1STREET("IS","xnz dyxeo","qnhz ax keka`")
`akek xa zhnq
^P1STREET("IS","xnz dyxeo","qnhz bareo")
oerab zhnq
^P1STREET("IS","xnz dyxeo","qnhz bc")
cb zhnq
^P1STREET("IS","xnz dyxeo","qnhz bey gla")
alg yeb zhnq
^P1STREET("IS","xnz dyxeo","qnhz bigeo")
oegib zhnq
^P1STREET("IS","xnz dyxeo","qnhz brzeo")
oezrb zhnq
^P1STREET("IS","xnz dyxeo","qnhz cela")
alec zhnq
^P1STREET("IS","xnz dyxeo","qnhz clid")
dilc zhnq
^P1STREET("IS","xnz dyxeo","qnhz d`bef")
feb`d zhnq
^P1STREET("IS","xnz dyxeo","qnhz dbelo")
olebd zhnq
^P1STREET("IS","xnz dyxeo","qnhz dbipd")
dpibd zhnq
^P1STREET("IS","xnz dyxeo","qnhz dgnxid")
dixngd zhnq
^P1STREET("IS","xnz dyxeo","qnhz diqnio")
oinqid zhnq
^P1STREET("IS","xnz dyxeo","qnhz dnex")
xend zhnq
^P1STREET("IS","xnz dyxeo","qnhz dnkaim")
miaknd zhnq
^P1STREET("IS","xnz dyxeo","qnhz dnrlez")
zelrnd zhnq
^P1STREET("IS","xnz dyxeo","qnhz dxa")
axd zhnq
^P1STREET("IS","xnz dyxeo","qnhz dxces")
secxd zhnq
^P1STREET("IS","xnz dyxeo","qnhz dyiy")
yiyd zhnq
^P1STREET("IS","xnz dyxeo","qnhz dylem")
melyd zhnq
^P1STREET("IS","xnz dyxeo","qnhz exc")
cxe zhnq
^P1STREET("IS","xnz dyxeo","qnhz gva")
avg zhnq
^P1STREET("IS","xnz dyxeo","qnhz gxviz")
zivxg zhnq
^P1STREET("IS","xnz dyxeo","qnhz ie`a")
a`ei zhnq
^P1STREET("IS","xnz dyxeo","qnhz ktx `exid")
dixe` xtk zhnq
^P1STREET("IS","xnz dyxeo","qnhz lnxga")
agxnl zhnq
^P1STREET("IS","xnz dyxeo","qnhz nrio gxec")
cexg oirn zhnq
^P1STREET("IS","xnz dyxeo","qnhz pgli`li")
il`ilgp zhnq
^P1STREET("IS","xnz dyxeo","qnhz qaieo")
oeiaq zhnq
^P1STREET("IS","xnz dyxeo","qnhz qibliz")
zilbiq zhnq
^P1STREET("IS","xnz dyxeo","qnhz rbex")
xebr zhnq
^P1STREET("IS","xnz dyxeo","qnhz rxebez")
zebexr zhnq
^P1STREET("IS","xnz dyxeo","qnhz varepi")
iperav zhnq
^P1STREET("IS","xnz dyxeo","qnhz vls")
slv zhnq
^P1STREET("IS","xnz dyxeo","qnhz xeo")
oex zhnq
^P1STREET("IS","xnz dyxeo","qnhz xezm")
mzex zhnq
^P1STREET("IS","xnz dyxeo","qnhz xwtz")
ztwx zhnq
^P1STREET("IS","xnz dyxeo","qnhz y`x iyea")
aeyi x`y zhnq
^P1STREET("IS","xnz dyxeo","qnhz ynyeo")
oeyny zhnq
^P1STREET("IS","xnz dyxeo","qpd nyd")
dyn dpq
^P1STREET("IS","xnz dyxeo","qpepiz")
zipepq
^P1STREET("IS","xnz dyxeo","racz")
zcar
^P1STREET("IS","xnz dyxeo","rbpeo")
oepbr
^P1STREET("IS","xnz dyxeo","reacd")
dcaer
^P1STREET("IS","xnz dyxeo","refid")
difer
^P1STREET("IS","xnz dyxeo","rfx`")
`xfr
^P1STREET("IS","xnz dyxeo","rio bci")
icb oir
^P1STREET("IS","xnz dyxeo","rlid")
dilr
^P1STREET("IS","xnz dyxeo","rvneo")
oenvr
^P1STREET("IS","xnz dyxeo","rxebez")
zebexr
^P1STREET("IS","xnz dyxeo","tceiim")
miiect
^P1STREET("IS","xnz dyxeo","tipz dperx")
xrepd zpit
^P1STREET("IS","xnz dyxeo","txu")
uxt
^P1STREET("IS","xnz dyxeo","v`leo")
oel`v
^P1STREET("IS","xnz dyxeo","vax")
xav
^P1STREET("IS","xnz dyxeo","vitexi")
ixetiv
^P1STREET("IS","xnz dyxeo","vixlqeo")
oeqlxiv
^P1STREET("IS","xnz dyxeo","waeu bleiez")
zeielb ueaw
^P1STREET("IS","xnz dyxeo","wceyi qhxend")
dnexhq iyecw
^P1STREET("IS","xnz dyxeo","wcnd")
dncw
^P1STREET("IS","xnz dyxeo","wcy")
ycw
^P1STREET("IS","xnz dyxeo","wdilz aal")
laa zlidw
^P1STREET("IS","xnz dyxeo","wdilz eilp`")
`plie zlidw
^P1STREET("IS","xnz dyxeo","wenniez")
zeinnew
^P1STREET("IS","xnz dyxeo","wxo diqec")
ceqid oxw
^P1STREET("IS","xnz dyxeo","xape zm")
mz epax
^P1STREET("IS","xnz dyxeo","xbaim")
miabx
^P1STREET("IS","xnz dyxeo","xc""w")
w"cx
^P1STREET("IS","xnz dyxeo","xez")
zex
^P1STREET("IS","xnz dyxeo","xfi`l")
l`ifx
^P1STREET("IS","xnz dyxeo","xna""m")
m"anx
^P1STREET("IS","xnz dyxeo","xnf")
fnx
^P1STREET("IS","xnz dyxeo","xy""i")
i"yx
^P1STREET("IS","xnz dyxeo","xya""m")
m"ayx
^P1STREET("IS","xnz dyxeo","y xqwe nrxa")
axrn ewqx y
^P1STREET("IS","xnz dyxeo","y`xiz iyx`l")
l`xyi zix`y
^P1STREET("IS","xnz dyxeo","yafi")
ifay
^P1STREET("IS","xnz dyxeo","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","xnz dyxeo","yai vieo")
oeiv iay
^P1STREET("IS","xnz dyxeo","yc dilc")
clid cy
^P1STREET("IS","xnz dyxeo","yc' ai`liw")
wil`ia 'cy
^P1STREET("IS","xnz dyxeo","yc' eivno")
onvie 'cy
^P1STREET("IS","xnz dyxeo","ycnd")
dncy
^P1STREET("IS","xnz dyxeo","yedm")
mdey
^P1STREET("IS","xnz dyxeo","yeyo")
oyey
^P1STREET("IS","xnz dyxeo","yg""l")
l"gy
^P1STREET("IS","xnz dyxeo","yiaelz")
zleaiy
^P1STREET("IS","xnz dyxeo","yiteo")
oetiy
^P1STREET("IS","xnz dyxeo","ylem rlikm")
mkilr mely
^P1STREET("IS","xnz dyxeo","ynbx")
xbny
^P1STREET("IS","xnz dyxeo","yne`l dpbic")
cibpd l`eny
^P1STREET("IS","xnz dyxeo","ypix")
xipy
^P1STREET("IS","xnz dyxeo","ypwio")
oiwpy
^P1STREET("IS","xnz dyxeo","yu vai")
iav uy
^P1STREET("IS","xnz dyxeo","yxs")
sxy
^P1STREET("IS","xnz dyxeo","yyz dinim")
minid zyy
^P1STREET("IS","xnz dyxeo","zgknepi")
ipenkgz
^P1STREET("IS","xnz dyxeo","zixey")
yexiz
^P1STREET("IS","xnz dyxeo","znpr")
rpnz
^P1STREET("IS","xnz dyxeo","zr""y")
y"rz
^P1STREET("IS","xnz dyxeo","zxfd")
dfxz
^P1STREET("IS","xnz dyxeo","zxt""c")
c"txz
^P1STREET("IS","xnz dyxeo","zxyiy")
yiyxz
^P1STREET("IS","xnz iegpo")
opgei znx
^P1STREET("IS","xnz iyi")
iyi znx
^P1STREET("IS","xnz iyi","`cnepiz dgexy")
yxegd zipenc`
^P1STREET("IS","xnz iyi","`wlitheq")
qehtilw`
^P1STREET("IS","xnz iyi","`ykel")
leky`
^P1STREET("IS","xnz iyi","caexpiz")
zipxeac
^P1STREET("IS","xnz iyi","d`bef")
feb`d
^P1STREET("IS","xnz iyi","d`exo")
oxe`d
^P1STREET("IS","xnz iyi","d`ixeqim")
miqexi`d
^P1STREET("IS","xnz iyi","d`leo")
oel`d
^P1STREET("IS","xnz iyi","d`xf")
fx`d
^P1STREET("IS","xnz iyi","d`zxeb")
bexz`d
^P1STREET("IS","xnz iyi","dbto")
otbd
^P1STREET("IS","xnz iyi","dcbo")
obcd
^P1STREET("IS","xnz iyi","dcwl")
lwcd
^P1STREET("IS","xnz iyi","ddcq")
qcdd
^P1STREET("IS","xnz iyi","ddxces")
secxdd
^P1STREET("IS","xnz iyi","dfiz")
zifd
^P1STREET("IS","xnz iyi","dgavlz")
zlvagd
^P1STREET("IS","xnz iyi","dgvaim")
miavgd
^P1STREET("IS","xnz iyi","dgxea")
aexgd
^P1STREET("IS","xnz iyi","diqnio")
oinqid
^P1STREET("IS","xnz iyi","diwipheo")
oehpiwid
^P1STREET("IS","xnz iyi","dklpiez")
zeiplkd
^P1STREET("IS","xnz iyi","dlehm")
mheld
^P1STREET("IS","xnz iyi","dpxwiqim")
miqiwxpd
^P1STREET("IS","xnz iyi","drxad")
daxrd
^P1STREET("IS","xnz iyi","dtxbim")
mibxtd
^P1STREET("IS","xnz iyi","dviepez")
zepeivd
^P1STREET("IS","xnz iyi","dxineo")
oenixd
^P1STREET("IS","xnz iyi","dz`pd")
dp`zd
^P1STREET("IS","xnz iyi","dzlzo")
ozlzd
^P1STREET("IS","xnz iyi","dznx")
xnzd
^P1STREET("IS","xnz iyi","glniz")
zinlg
^P1STREET("IS","xnz iyi","gxviz")
zivxg
^P1STREET("IS","xnz iyi","nexo")
oxen
^P1STREET("IS","xnz iyi","nrld dyiwnd")
dnwiyd dlrn
^P1STREET("IS","xnz iyi","qnhz d`ld")
dl`d zhnq
^P1STREET("IS","xnz iyi","qnhz dexc")
cxed zhnq
^P1STREET("IS","xnz iyi","qnhz dnxbpiz")
zipbxnd zhnq
^P1STREET("IS","xnz iyi","qnhz dqaieo")
oeiaqd zhnq
^P1STREET("IS","xnz iyi","qnhz dyqw")
wqyd zhnq
^P1STREET("IS","xnz iyi","qnhz lilj")
jlil zhnq
^P1STREET("IS","xnz iyi","rixiz")
zixir
^P1STREET("IS","xnz iyi","v`leo")
oel`v
^P1STREET("IS","xnz iyi","xwtez")
zetwx
^P1STREET("IS","xnz iyi","ywc")
cwy
^P1STREET("IS","xnz necirim")
miricen znx
^P1STREET("IS","xnz necirim","dgynep`im")
mi`penygd
^P1STREET("IS","xnz tpwq")
qwpt znx
^P1STREET("IS","xnz tpwq","dexc")
cxed
^P1STREET("IS","xnz tpwq","dpxwiq")
qiwxpd
^P1STREET("IS","xnz tpwq","gkm ieqs giim")
miig sqei mkg
^P1STREET("IS","xnz tpwq","kneq rbia")
aibr qenk
^P1STREET("IS","xnz tpwq","lpc`e")
e`cpl
^P1STREET("IS","xnz tpwq","nwex giim")
miig xewn
^P1STREET("IS","xnz tpwq","xn""`")
`"nx
^P1STREET("IS","xnz vai")
iav znx
^P1STREET("IS","xnz vai","dblaer")
realbd
^P1STREET("IS","xnz xfi`l")
l`ifx znx
^P1STREET("IS","xnz xgl")
lgx znx
^P1STREET("IS","xpo")
opx
^P1STREET("IS","xrez")
zerx
^P1STREET("IS","xrez","gavlz")
zlvag
^P1STREET("IS","xrim")
mirx
^P1STREET("IS","xrppd")
dpprx
^P1STREET("IS","xrppd","`""c bexceo")
oecxeb c"`
^P1STREET("IS","xrppd","`ao baixel")
lexiab oa`
^P1STREET("IS","xrppd","`ao rfx`")
`xfr oa`
^P1STREET("IS","xrppd","`axap`l")
l`paxa`
^P1STREET("IS","xrppd","`dxeo wvio")
oivw oexd`
^P1STREET("IS","xrppd","`dxepqeo yxd")
dxy oeqpexd`
^P1STREET("IS","xrppd","`eqhxeaqwi")
iwqaexhqe`
^P1STREET("IS","xrppd","`etqhxlpc")
cplxhqte`
^P1STREET("IS","xrppd","`exi vai bxipaxb")
bxapixb iav ixe`
^P1STREET("IS","xrppd","`fel`i")
i`lef`
^P1STREET("IS","xrppd","`g""i cwx")
xwc i"g`
^P1STREET("IS","xrppd","`gc drm")
mrd cg`
^P1STREET("IS","xrppd","`gefd")
dfeg`
^P1STREET("IS","xrppd","`ipyhiio")
oiihypi`
^P1STREET("IS","xrppd","`lgxifi")
ifixgl`
^P1STREET("IS","xrppd","`li kdo")
odk il`
^P1STREET("IS","xrppd","`lirfx itd")
dti xfril`
^P1STREET("IS","xrppd","`ltqi")
iqtl`
^P1STREET("IS","xrppd","`lwlri")
irlwl`
^P1STREET("IS","xrppd","`npeo eznx")
xnze oepn`
^P1STREET("IS","xrppd","`pd txpw")
wpxt dp`
^P1STREET("IS","xrppd","`pilaiu")
uialip`
^P1STREET("IS","xrppd","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","xrppd","`qzx dnlkd")
dklnd xzq`
^P1STREET("IS","xrppd","`xid")
dix`
^P1STREET("IS","xrppd","`xlefexea")
aexefelx`
^P1STREET("IS","xrppd","`xlij yngd")
dgny jilx`
^P1STREET("IS","xrppd","`yx")
xy`
^P1STREET("IS","xrppd","aeax")
xaea
^P1STREET("IS","xrppd","aexekea")
aekexea
^P1STREET("IS","xrppd","aexl` idecd")
dcedi `lxea
^P1STREET("IS","xrppd","ai`liw")
wil`ia
^P1STREET("IS","xrppd","ail""e")
e"lia
^P1STREET("IS","xrppd","aiz dll")
lld zia
^P1STREET("IS","xrppd","aiz dye`ad")
da`eyd zia
^P1STREET("IS","xrppd","aiz yn`i")
i`ny zia
^P1STREET("IS","xrppd","ao bexieo")
oeixeb oa
^P1STREET("IS","xrppd","ao fk`i")
i`kf oa
^P1STREET("IS","xrppd","ao hea nxcki")
ikcxn aeh oa
^P1STREET("IS","xrppd","ao idecd")
dcedi oa
^P1STREET("IS","xrppd","ao peo ideyr")
ryedi oep oa
^P1STREET("IS","xrppd","ax `ilo")
oli` xa
^P1STREET("IS","xrppd","ax biex`")
`xeib xa
^P1STREET("IS","xrppd","ax ieg`i")
i`gei xa
^P1STREET("IS","xrppd","ax keka`")
`akek xa
^P1STREET("IS","xrppd","axej ytipefd")
dfepity jexa
^P1STREET("IS","xrppd","axpciq")
qicpxa
^P1STREET("IS","xrppd","axpx")
xpxa
^P1STREET("IS","xrppd","b`eld")
dle`b
^P1STREET("IS","xrppd","behno pgem")
megp onheb
^P1STREET("IS","xrppd","belcaxb l`d")
d`l bxacleb
^P1STREET("IS","xrppd","belena")
aneleb
^P1STREET("IS","xrppd","bxu")
uxb
^P1STREET("IS","xrppd","ca bxepx")
xpexb ac
^P1STREET("IS","xrppd","ca def")
fed ac
^P1STREET("IS","xrppd","cbpid")
dipbc
^P1STREET("IS","xrppd","ceapea")
aepaec
^P1STREET("IS","xrppd","cec `lrfx")
xfrl` cec
^P1STREET("IS","xrppd","cec xfi`l")
l`ifx cec
^P1STREET("IS","xrppd","cekitz")
ztikec
^P1STREET("IS","xrppd","cela")
alec
^P1STREET("IS","xrppd","ctpd")
dptc
^P1STREET("IS","xrppd","cxex")
xexc
^P1STREET("IS","xrppd","d`bm")
mb`d
^P1STREET("IS","xrppd","d`etw")
wte`d
^P1STREET("IS","xrppd","d`exo")
oxe`d
^P1STREET("IS","xrppd","d`ixiq")
qixi`d
^P1STREET("IS","xrppd","d`ld")
dl`d
^P1STREET("IS","xrppd","d`leo")
oel`d
^P1STREET("IS","xrppd","d`v""l")
l"v`d
^P1STREET("IS","xrppd","d`x""i")
i"x`d
^P1STREET("IS","xrppd","d`xf")
fx`d
^P1STREET("IS","xrppd","d`yc")
cy`d
^P1STREET("IS","xrppd","d`yl")
ly`d
^P1STREET("IS","xrppd","dapim")
mipad
^P1STREET("IS","xrppd","daxey")
yexad
^P1STREET("IS","xrppd","daxikd")
dkixad
^P1STREET("IS","xrppd","dbcec draxi")
ixard cecbd
^P1STREET("IS","xrppd","dbcp""r")
r"pcbd
^P1STREET("IS","xrppd","dbelo")
olebd
^P1STREET("IS","xrppd","dblaer")
realbd
^P1STREET("IS","xrppd","dblil")
lilbd
^P1STREET("IS","xrppd","dblim")
milbd
^P1STREET("IS","xrppd","dbto")
otbd
^P1STREET("IS","xrppd","dclid")
dilcd
^P1STREET("IS","xrppd","dcq")
qcd
^P1STREET("IS","xrppd","dcwl")
lwcd
^P1STREET("IS","xrppd","ddbpd")
dpbdd
^P1STREET("IS","xrppd","ddqzcxez")
zexczqdd
^P1STREET("IS","xrppd","dexc")
cxed
^P1STREET("IS","xrppd","dfdx")
xdfd
^P1STREET("IS","xrppd","dfiz")
zifd
^P1STREET("IS","xrppd","dfnix")
xinfd
^P1STREET("IS","xrppd","dgegiz")
zigegd
^P1STREET("IS","xrppd","dgexyd")
dyxegd
^P1STREET("IS","xrppd","dgi""l")
l"igd
^P1STREET("IS","xrppd","dgleu")
uelgd
^P1STREET("IS","xrppd","dglil")
lilgd
^P1STREET("IS","xrppd","dgnpid")
dipngd
^P1STREET("IS","xrppd","dgva")
avgd
^P1STREET("IS","xrppd","dgxea")
aexgd
^P1STREET("IS","xrppd","dgxeyz")
zyexgd
^P1STREET("IS","xrppd","dgxneo")
oenxgd
^P1STREET("IS","xrppd","dgxviz")
zivxgd
^P1STREET("IS","xrppd","dgynep`im")
mi`penygd
^P1STREET("IS","xrppd","dhiiqim")
miqiihd
^P1STREET("IS","xrppd","dhllim")
millhd
^P1STREET("IS","xrppd","dieal")
laeid
^P1STREET("IS","xrppd","diqnio")
oinqid
^P1STREET("IS","xrppd","divixd")
dxivid
^P1STREET("IS","xrppd","diwipheo")
oehpiwid
^P1STREET("IS","xrppd","dixco")
ocxid
^P1STREET("IS","xrppd","dkeka")
akekd
^P1STREET("IS","xrppd","dklpiz")
ziplkd
^P1STREET("IS","xrppd","dkxkem")
mekxkd
^P1STREET("IS","xrppd","dl""d")
d"ld
^P1STREET("IS","xrppd","dlaepd")
dpeald
^P1STREET("IS","xrppd","dleheq")
qeheld
^P1STREET("IS","xrppd","dlineo")
oenild
^P1STREET("IS","xrppd","dngzxez")
zexzgnd
^P1STREET("IS","xrppd","dniiqcim")
micqiind
^P1STREET("IS","xrppd","dnizx")
xzind
^P1STREET("IS","xrppd","dnl`kd")
dk`lnd
^P1STREET("IS","xrppd","dnlkim")
miklnd
^P1STREET("IS","xrppd","dnqbx")
xbqnd
^P1STREET("IS","xrppd","dnriio")
oiirnd
^P1STREET("IS","xrppd","dnrlez")
zelrnd
^P1STREET("IS","xrppd","dnrtilim")
militrnd
^P1STREET("IS","xrppd","dnxbpiz")
zipbxnd
^P1STREET("IS","xrppd","dnxc")
cxnd
^P1STREET("IS","xrppd","dnywm")
mwynd
^P1STREET("IS","xrppd","dpba")
abpd
^P1STREET("IS","xrppd","dpehxim")
mixhepd
^P1STREET("IS","xrppd","dpetx")
xtepd
^P1STREET("IS","xrppd","dpexiz")
zixepd
^P1STREET("IS","xrppd","dpgl")
lgpd
^P1STREET("IS","xrppd","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","xrppd","dpxwiq")
qiwxpd
^P1STREET("IS","xrppd","dpyi`im")
mi`iypd
^P1STREET("IS","xrppd","dpyx")
xypd
^P1STREET("IS","xrppd","dqaieo")
oeiaqd
^P1STREET("IS","xrppd","dqcp`")
`pcqd
^P1STREET("IS","xrppd","dqelo")
oleqd
^P1STREET("IS","xrppd","dqgla")
algqd
^P1STREET("IS","xrppd","dqibliz")
zilbiqd
^P1STREET("IS","xrppd","dqiito")
otiiqd
^P1STREET("IS","xrppd","dqlil")
lilqd
^P1STREET("IS","xrppd","draecd")
dceard
^P1STREET("IS","xrppd","driih")
hiird
^P1STREET("IS","xrppd","drnw")
wnrd
^P1STREET("IS","xrppd","drtxepi")
ipextrd
^P1STREET("IS","xrppd","drvn`ez")
ze`nvrd
^P1STREET("IS","xrppd","drxad")
daxrd
^P1STREET("IS","xrppd","dtln""g")
g"nltd
^P1STREET("IS","xrppd","dtpipd")
dpiptd
^P1STREET("IS","xrppd","dtrnepim")
mipenrtd
^P1STREET("IS","xrppd","dtxb")
bxtd
^P1STREET("IS","xrppd","dtxgim")
migxtd
^P1STREET("IS","xrppd","dvarepi")
iperavd
^P1STREET("IS","xrppd","dvlil")
lilvd
^P1STREET("IS","xrppd","dvpgpim")
mipgpvd
^P1STREET("IS","xrppd","dvtexo")
oxetvd
^P1STREET("IS","xrppd","dwenniez")
zeinnewd
^P1STREET("IS","xrppd","dwiyeo")
oeyiwd
^P1STREET("IS","xrppd","dwxo")
oxwd
^P1STREET("IS","xrppd","dwyz")
zywd
^P1STREET("IS","xrppd","dx qipi")
ipiq xd
^P1STREET("IS","xrppd","dxa `txiim")
miixt` axd
^P1STREET("IS","xrppd","dxa piqim")
miqip axd
^P1STREET("IS","xrppd","dxa wew")
wew axd
^P1STREET("IS","xrppd","dxces")
secxd
^P1STREET("IS","xrppd","dxezm")
mzexd
^P1STREET("IS","xrppd","dxneo")
oenxd
^P1STREET("IS","xrppd","dxveb")
bevxd
^P1STREET("IS","xrppd","dxvl")
lvxd
^P1STREET("IS","xrppd","dxwtz")
ztwxd
^P1STREET("IS","xrppd","dyenx")
xneyd
^P1STREET("IS","xrppd","dyew")
weyd
^P1STREET("IS","xrppd","dyeyo")
oyeyd
^P1STREET("IS","xrppd","dygtim")
mitgyd
^P1STREET("IS","xrppd","dygx")
xgyd
^P1STREET("IS","xrppd","dyifs")
sfiyd
^P1STREET("IS","xrppd","dyihd")
dhiyd
^P1STREET("IS","xrppd","dylem")
melyd
^P1STREET("IS","xrppd","dywc")
cwyd
^P1STREET("IS","xrppd","dyxeo")
oexyd
^P1STREET("IS","xrppd","dyxieo")
oeixyd
^P1STREET("IS","xrppd","dz`pd")
dp`zd
^P1STREET("IS","xrppd","dzaex")
xeazd
^P1STREET("IS","xrppd","dzcdx")
xdczd
^P1STREET("IS","xrppd","dzex")
xezd
^P1STREET("IS","xrppd","dzgid")
digzd
^P1STREET("IS","xrppd","dznx")
xnzd
^P1STREET("IS","xrppd","dzp`im")
mi`pzd
^P1STREET("IS","xrppd","dzryid")
diyrzd
^P1STREET("IS","xrppd","dztef")
fetzd
^P1STREET("IS","xrppd","dzwed")
dewzd
^P1STREET("IS","xrppd","dzwend")
dnewzd
^P1STREET("IS","xrppd","eipbiih `exc")
cxe` hiibpie
^P1STREET("IS","xrppd","eivno")
onvie
^P1STREET("IS","xrppd","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","xrppd","fdaim")
miadf
^P1STREET("IS","xrppd","fxgio `lkqpcx")
xcpqkl` oigxf
^P1STREET("IS","xrppd","gaiad xiiw")
wiix daiag
^P1STREET("IS","xrppd","gavlz")
zlvag
^P1STREET("IS","xrppd","geaai vieo")
oeiv iaaeg
^P1STREET("IS","xrppd","gfeo `iy")
yi` oefg
^P1STREET("IS","xrppd","gfo irwa")
awri ofg
^P1STREET("IS","xrppd","ghiaz `lkqpcxepi")
ipexcpqkl` zaihg
^P1STREET("IS","xrppd","ghiaz barzi")
izrab zaihg
^P1STREET("IS","xrppd","ghiaz belpi")
ipleb zaihg
^P1STREET("IS","xrppd","ghiaz dx`l")
l`xd zaihg
^P1STREET("IS","xrppd","giaz vieo")
oeiv zaig
^P1STREET("IS","xrppd","giim ax la")
al xa miig
^P1STREET("IS","xrppd","gpd qpy")
ypq dpg
^P1STREET("IS","xrppd","gpwio")
oiwpg
^P1STREET("IS","xrppd","gtu giim")
miig utg
^P1STREET("IS","xrppd","hapwio")
oiwpah
^P1STREET("IS","xrppd","hxentlcex")
xecltnexh
^P1STREET("IS","xrppd","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","xrppd","i""l yhxo")
oxhy l"i
^P1STREET("IS","xrppd","i`ix")
xi`i
^P1STREET("IS","xrppd","ib`l `leo")
oel` l`bi
^P1STREET("IS","xrppd","ib`l icio")
oici l`bi
^P1STREET("IS","xrppd","idecd dlei")
ield dcedi
^P1STREET("IS","xrppd","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","xrppd","irwa cexi")
ixec awri
^P1STREET("IS","xrppd","irxd")
dxri
^P1STREET("IS","xrppd","ivgw ycd")
dcy wgvi
^P1STREET("IS","xrppd","ivi`z `ixetd")
dtexi` z`ivi
^P1STREET("IS","xrppd","iwezi`l `cm")
mc` l`izewi
^P1STREET("IS","xrppd","ixeylim")
milyexi
^P1STREET("IS","xrppd","klil dgexy")
yxegd lilk
^P1STREET("IS","xrppd","kpxz")
zxpk
^P1STREET("IS","xrppd","ktx pgno")
ongp xtk
^P1STREET("IS","xrppd","kvplqeo axl")
lxa oeqlpvk
^P1STREET("IS","xrppd","l""d dwceyim")
miyecwd d"l
^P1STREET("IS","xrppd","la dxi")
ixd al
^P1STREET("IS","xrppd","lei `ykel")
leky` iel
^P1STREET("IS","xrppd","lfx")
xfl
^P1STREET("IS","xrppd","lqwea")
aewql
^P1STREET("IS","xrppd","n`d eyyim")
miyye d`n
^P1STREET("IS","xrppd","n`te")
et`n
^P1STREET("IS","xrppd","navr wcy")
ycw rvan
^P1STREET("IS","xrppd","nbcl")
lcbn
^P1STREET("IS","xrppd","nelcz")
zclen
^P1STREET("IS","xrppd","nephitiexi")
ixeitihpen
^P1STREET("IS","xrppd","nevwio")
oiwven
^P1STREET("IS","xrppd","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","xrppd","nexyd")
dyxen
^P1STREET("IS","xrppd","ngpd relim")
miler dpgn
^P1STREET("IS","xrppd","nkai")
iakn
^P1STREET("IS","xrppd","npcli")
ilcpn
^P1STREET("IS","xrppd","npgm abio")
oiba mgpn
^P1STREET("IS","xrppd","nqcd")
dcqn
^P1STREET("IS","xrppd","nyd ciio")
oiic dyn
^P1STREET("IS","xrppd","nyd dq")
qd dyn
^P1STREET("IS","xrppd","nyd qpd")
dpq dyn
^P1STREET("IS","xrppd","nyd ytix`")
`xity dyn
^P1STREET("IS","xrppd","p`ez ycd")
dcy ze`p
^P1STREET("IS","xrppd","pbxd")
dxbp
^P1STREET("IS","xrppd","pexc`e")
e`cxep
^P1STREET("IS","xrppd","pgnid")
dingp
^P1STREET("IS","xrppd","pgyeo")
oeygp
^P1STREET("IS","xrppd","pil""i")
i"lip
^P1STREET("IS","xrppd","pzia d`aez")
zea`d aizp
^P1STREET("IS","xrppd","pziaez")
zeaizp
^P1STREET("IS","xrppd","pzo `lzxno")
onxzl` ozp
^P1STREET("IS","xrppd","qewelea")
aeleweq
^P1STREET("IS","xrppd","qhxend")
dnexhq
^P1STREET("IS","xrppd","qixwio")
oiwxiq
^P1STREET("IS","xrppd","qnhz dgend")
dnegd zhnq
^P1STREET("IS","xrppd","qnhz lg""i")
i"gl zhnq
^P1STREET("IS","xrppd","qpepiz")
zipepq
^P1STREET("IS","xrppd","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","xrppd","rhxez")
zexhr
^P1STREET("IS","xrppd","rnl")
lnr
^P1STREET("IS","xrppd","rvieo")
oeivr
^P1STREET("IS","xrppd","rwia`")
`aiwr
^P1STREET("IS","xrppd","tefio")
oifet
^P1STREET("IS","xrppd","thxid")
dixht
^P1STREET("IS","xrppd","tipq")
qpit
^P1STREET("IS","xrppd","tipqwx")
xwqpit
^P1STREET("IS","xrppd","tpgq xefo")
ofex qgpt
^P1STREET("IS","xrppd","txcq nyezs")
szeyn qcxt
^P1STREET("IS","xrppd","txiyno")
onyixt
^P1STREET("IS","xrppd","txu")
uxt
^P1STREET("IS","xrppd","vinpc")
cpniv
^P1STREET("IS","xrppd","vitno")
ontiv
^P1STREET("IS","xrppd","w`xe ieqs")
sqei ex`w
^P1STREET("IS","xrppd","wexv'w i`pey")
yep`i w'vxew
^P1STREET("IS","xrppd","wfo")
ofw
^P1STREET("IS","xrppd","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","xrppd","wl`efpx")
xpfe`lw
^P1STREET("IS","xrppd","wliyx")
xyilw
^P1STREET("IS","xrppd","wtlo")
oltw
^P1STREET("IS","xrppd","wxo diqec")
ceqid oxw
^P1STREET("IS","xrppd","x`el eelpaxb")
bxaplee le`x
^P1STREET("IS","xrppd","xaevwi")
iwveax
^P1STREET("IS","xrppd","xao bnli`l")
l`ilnb oax
^P1STREET("IS","xrppd","xawd beax")
xaeb dwax
^P1STREET("IS","xrppd","xg' 160")
160 'gx
^P1STREET("IS","xrppd","xgl dnyexxz")
zxxeynd lgx
^P1STREET("IS","xrppd","xiipq")
qpiix
^P1STREET("IS","xrppd","xinlh `linlj")
jlnil` hlnix
^P1STREET("IS","xrppd","xna""m")
m"anx
^P1STREET("IS","xrppd","xng""l")
l"gnx
^P1STREET("IS","xrppd","xppim")
mippx
^P1STREET("IS","xrppd","xy""i")
i"yx
^P1STREET("IS","xrppd","y""i rbpeo")
oepbr i"y
^P1STREET("IS","xrppd","yafi")
ifay
^P1STREET("IS","xrppd","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","xrppd","yaih")
hiay
^P1STREET("IS","xrppd","yail dfda")
adfd liay
^P1STREET("IS","xrppd","yaxu")
uxay
^P1STREET("IS","xrppd","ylem rlikm")
mkilr mely
^P1STREET("IS","xrppd","ylepqwi `axdm")
mdxa` iwqpely
^P1STREET("IS","xrppd","ylih")
hily
^P1STREET("IS","xrppd","yne`l bepo")
opeb l`eny
^P1STREET("IS","xrppd","yne`l dpbic")
cibpd l`eny
^P1STREET("IS","xrppd","yngd delvaxb")
bxavled dgny
^P1STREET("IS","xrppd","ynxide leio")
oiel edixny
^P1STREET("IS","xrppd","ytix` `ifi")
ifi` `xity
^P1STREET("IS","xrppd","yyz dinim")
minid zyy
^P1STREET("IS","xrppd","zl gi")
ig lz
^P1STREET("IS","xyteo")
oetyx
^P1STREET("IS","xyteo","cxj dnqild")
dliqnd jxc
^P1STREET("IS","xyteo","cxj dyiaelim")
mileaiyd jxc
^P1STREET("IS","xyteo","dbo")
obd
^P1STREET("IS","xyteo","dctpd")
dptcd
^P1STREET("IS","xyteo","dgxea")
aexgd
^P1STREET("IS","xyteo","dktx")
xtkd
^P1STREET("IS","xyteo","dtxcq")
qcxtd
^P1STREET("IS","xyteo","dtxgim")
migxtd
^P1STREET("IS","xyteo","dxcetim")
mitecxd
^P1STREET("IS","xyteo","dxezm")
mzexd
^P1STREET("IS","xyteo","dxineo")
oenixd
^P1STREET("IS","xyteo","dywc")
cwyd
^P1STREET("IS","xyteo","dznx")
xnzd
^P1STREET("IS","xyteo","yail dgla")
algd liay
^P1STREET("IS","xytim")
mityx
^P1STREET("IS","y`x iyea")
aeyi x`y
^P1STREET("IS","y`x iyea","iealim")
milaei
^P1STREET("IS","yai vieo")
oeiv iay
^P1STREET("IS","yai vieo","celtio")
oitlec
^P1STREET("IS","yai vieo","dbto")
otbd
^P1STREET("IS","yai vieo","dges")
segd
^P1STREET("IS","yai vieo","px dlild")
dlild xp
^P1STREET("IS","yai vieo","zexo")
oxez
^P1STREET("IS","ycd `ilo")
oli` dcy
^P1STREET("IS","ycd `lide")
edil` dcy
^P1STREET("IS","ycd cec")
cec dcy
^P1STREET("IS","ycd exaexb")
bxeaxe dcy
^P1STREET("IS","ycd exaexb","bo dilcim")
miclid ob
^P1STREET("IS","ycd exaexb","cxj d`leo")
oel`d jxc
^P1STREET("IS","ycd exaexb","cxj dtxgim")
migxtd jxc
^P1STREET("IS","ycd exaexb","d`expim")
mipxe`d
^P1STREET("IS","ycd exaexb","dcwl")
lwcd
^P1STREET("IS","ycd exaexb","ddcxim")
mixcdd
^P1STREET("IS","ycd exaexb","qnhz dilc")
clid zhnq
^P1STREET("IS","ycd ie`a")
a`ei dcy
^P1STREET("IS","ycd irwa")
awri dcy
^P1STREET("IS","ycd ivgw")
wgvi dcy
^P1STREET("IS","ycd ivgw","d`leo")
oel`d
^P1STREET("IS","ycd ivgw","dznx")
xnzd
^P1STREET("IS","ycd nyd")
dyn dcy
^P1STREET("IS","ycd pgem")
megp dcy
^P1STREET("IS","ycd pgnid")
dingp dcy
^P1STREET("IS","ycd pivo")
ovip dcy
^P1STREET("IS","ycd pivo","dxineo")
oenixd
^P1STREET("IS","ycd refide")
edifer dcy
^P1STREET("IS","ycez im")
mi zecy
^P1STREET("IS","ycez nikd")
dkin zecy
^P1STREET("IS","yci gnc")
cng icy
^P1STREET("IS","yci gnc","bto")
otb
^P1STREET("IS","yci gnc","d`xf")
fx`d
^P1STREET("IS","yci gnc","daxey")
yexad
^P1STREET("IS","yci gnc","dywnd")
dnwyd
^P1STREET("IS","yci gnc","dznx")
xnzd
^P1STREET("IS","yci gnc","yarz dnipim")
mipind zray
^P1STREET("IS","yci gnc","yrexd")
dxery
^P1STREET("IS","yci gnc","z`pd")
dp`z
^P1STREET("IS","ycnd")
dncy
^P1STREET("IS","ycnez caexd")
dxeac zency
^P1STREET("IS","ycnez ngeld")
dlegn zency
^P1STREET("IS","ycxez")
zexcy
^P1STREET("IS","ycxez","`ae gqxd")
dxqg ea`
^P1STREET("IS","ycxez","`ae gvix` iyx`l")
l`xyi `xivg ea`
^P1STREET("IS","ycxez","`ao baixel")
lexiab oa`
^P1STREET("IS","ycxez","`daz iyx`l")
l`xyi zad`
^P1STREET("IS","ycxez","`expim")
mipxe`
^P1STREET("IS","ycxez","`gc drm")
mrd cg`
^P1STREET("IS","ycxez","`li kdo")
odk il`
^P1STREET("IS","ycxez","`liyr")
ryil`
^P1STREET("IS","ycxez","`nqhxcm")
mcxhqn`
^P1STREET("IS","ycxez","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","ycxez","`yex")
xey`
^P1STREET("IS","ycxez","`zepd")
dpez`
^P1STREET("IS","ycxez","aexekea")
aekexea
^P1STREET("IS","ycxez","ai`liw")
wil`ia
^P1STREET("IS","ycxez","aiz `dxeo")
oexd` zia
^P1STREET("IS","ycxez","aiz txu")
uxt zia
^P1STREET("IS","ycxez","aiz xawd")
dwax zia
^P1STREET("IS","ycxez","alej")
jela
^P1STREET("IS","ycxez","ao bexieo")
oeixeb oa
^P1STREET("IS","ycxez","ao idecd")
dcedi oa
^P1STREET("IS","ycxez","arl ym hea")
aeh my lra
^P1STREET("IS","ycxez","ax `ilo")
oli` xa
^P1STREET("IS","ycxez","axihiy wehb'")
'bhew yihixa
^P1STREET("IS","ycxez","axiql")
lqixa
^P1STREET("IS","ycxez","axiz rxim")
mixr zixa
^P1STREET("IS","ycxez","axpx")
xpxa
^P1STREET("IS","ycxez","belena")
aneleb
^P1STREET("IS","ycxez","bexceo")
oecxeb
^P1STREET("IS","ycxez","bxipa`em")
me`apixb
^P1STREET("IS","ycxez","cec `lrfx")
xfrl` cec
^P1STREET("IS","ycxez","cec xfi`l")
l`ifx cec
^P1STREET("IS","ycxez","cpi`l")
l`ipc
^P1STREET("IS","ycxez","cxj ixeylim")
milyexi jxc
^P1STREET("IS","ycxez","cxj npgm abio")
oiba mgpn jxc
^P1STREET("IS","ycxez","cxj nyd ciio")
oiic dyn jxc
^P1STREET("IS","ycxez","d`ld")
dl`d
^P1STREET("IS","ycxez","d`leo")
oel`d
^P1STREET("IS","ycxez","d`nex`im")
mi`xen`d
^P1STREET("IS","ycxez","d`tx")
xt`d
^P1STREET("IS","ycxez","d`xfim")
mifx`d
^P1STREET("IS","ycxez","d`yl")
ly`d
^P1STREET("IS","ycxez","daileiim")
miieliad
^P1STREET("IS","ycxez","dapim")
mipad
^P1STREET("IS","ycxez","daxey")
yexad
^P1STREET("IS","ycxez","dbcec dypi")
ipyd cecbd
^P1STREET("IS","ycxez","dbetx")
xtebd
^P1STREET("IS","ycxez","dbiaexim")
mixeaibd
^P1STREET("IS","ycxez","dblilepiz")
zipelilbd
^P1STREET("IS","ycxez","dbto")
otbd
^P1STREET("IS","ycxez","dcbl")
lbcd
^P1STREET("IS","ycxez","dcwl")
lwcd
^P1STREET("IS","ycxez","ddbpd")
dpbdd
^P1STREET("IS","ycxez","ddqzcxez")
zexczqdd
^P1STREET("IS","ycxez","dexc")
cxed
^P1STREET("IS","ycxez","dfiz")
zifd
^P1STREET("IS","ycxez","dfxfix")
xifxfd
^P1STREET("IS","ycxez","dgavlz")
zlvagd
^P1STREET("IS","ycxez","dgic""`")
`"cigd
^P1STREET("IS","ycxez","dgleu")
uelgd
^P1STREET("IS","ycxez","dgva")
avgd
^P1STREET("IS","ycxez","dirxd")
dxrid
^P1STREET("IS","ycxez","dixco")
ocxid
^P1STREET("IS","ycxez","dkxnl")
lnxkd
^P1STREET("IS","ycxez","dlehm")
mheld
^P1STREET("IS","ycxez","dlg""i")
i"gld
^P1STREET("IS","ycxez","dll dfwo")
owfd lld
^P1STREET("IS","ycxez","dll itd")
dti lld
^P1STREET("IS","ycxez","dnbipim")
mipibnd
^P1STREET("IS","ycxez","dnkaim")
miaknd
^P1STREET("IS","ycxez","dpglim")
milgpd
^P1STREET("IS","ycxez","dqaieo")
oeiaqd
^P1STREET("IS","ycxez","dtln""g")
g"nltd
^P1STREET("IS","ycxez","dv`ld")
dl`vd
^P1STREET("IS","ycxez","dvdld")
dldvd
^P1STREET("IS","ycxez","dvpeax")
xaepvd
^P1STREET("IS","ycxez","dwepbxq")
qxbpewd
^P1STREET("IS","ycxez","dxa ao peo")
oep oa axd
^P1STREET("IS","ycxez","dxa niineo")
oeniin axd
^P1STREET("IS","ycxez","dxna""m")
m"anxd
^P1STREET("IS","ycxez","dxveb")
bevxd
^P1STREET("IS","ycxez","dxvl")
lvxd
^P1STREET("IS","ycxez","dxvtlc")
cltvxd
^P1STREET("IS","ycxez","dxwtz")
ztwxd
^P1STREET("IS","ycxez","dyihd")
dhiyd
^P1STREET("IS","ycxez","dywc")
cwyd
^P1STREET("IS","ycxez","dywnd")
dnwyd
^P1STREET("IS","ycxez","dzenx")
xnezd
^P1STREET("IS","ycxez","eivno")
onvie
^P1STREET("IS","ycxez","eizwio")
oiwzie
^P1STREET("IS","ycxez","fkxid")
dixkf
^P1STREET("IS","ycxez","flno `xo")
ox` onlf
^P1STREET("IS","ycxez","flno yf""x")
x"fy onlf
^P1STREET("IS","ycxez","flno ypi`ex")
xe`ipy onlf
^P1STREET("IS","ycxez","gawew")
wewag
^P1STREET("IS","ycxez","gaxeo")
oexag
^P1STREET("IS","ycxez","gbi")
ibg
^P1STREET("IS","ycxez","gend enbcl")
lcbne dneg
^P1STREET("IS","ycxez","getiz")
ziteg
^P1STREET("IS","ycxez","gfeo `iy")
yi` oefg
^P1STREET("IS","ycxez","ghiaz barzi")
izrab zaihg
^P1STREET("IS","ycxez","ghiaz dvpgpim")
mipgpvd zaihg
^P1STREET("IS","ycxez","ghiaz dx`l")
l`xd zaihg
^P1STREET("IS","ycxez","ghiaz itzg")
gzti zaihg
^P1STREET("IS","ycxez","ghiaz kxnli")
ilnxk zaihg
^P1STREET("IS","ycxez","giim ax la")
al xa miig
^P1STREET("IS","ycxez","giim ytix`")
`xity miig
^P1STREET("IS","ycxez","glli `bef")
feb` illg
^P1STREET("IS","ycxez","hienwio")
oiwneih
^P1STREET("IS","ycxez","hxentlcex")
xecltnexh
^P1STREET("IS","ycxez","hxyi nxcki")
ikcxn iyxh
^P1STREET("IS","ycxez","ib`l `leo")
oel` l`bi
^P1STREET("IS","ycxez","idcez `ihlid")
dilhi` zecdi
^P1STREET("IS","ycxez","idecd dlei")
ield dcedi
^P1STREET("IS","ycxez","ideyr ao peo")
oep oa ryedi
^P1STREET("IS","ycxez","ie`l")
l`ei
^P1STREET("IS","ycxez","iepd")
dpei
^P1STREET("IS","ycxez","ieqs giim")
miig sqei
^P1STREET("IS","ycxez","ieqs w`xe")
ex`w sqei
^P1STREET("IS","ycxez","ieqthl")
lhtqei
^P1STREET("IS","ycxez","iexci dqixd")
dxiqd icxei
^P1STREET("IS","ycxez","igfw`l")
l`wfgi
^P1STREET("IS","ycxez","ivgw ao vai")
iav oa wgvi
^P1STREET("IS","ycxez","ivgw ycd")
dcy wgvi
^P1STREET("IS","ycxez","ixnide")
edinxi
^P1STREET("IS","ycxez","iyiaz vieo")
oeiv zaiyi
^P1STREET("IS","ycxez","iyirde")
edriyi
^P1STREET("IS","ycxez","iyride")
ediryi
^P1STREET("IS","ycxez","iyx`l blili")
ililb l`xyi
^P1STREET("IS","ycxez","iyx`l iyrid")
diryi l`xyi
^P1STREET("IS","ycxez","kkx dpyi`")
`iypd xkk
^P1STREET("IS","ycxez","klpiz")
ziplk
^P1STREET("IS","ycxez","lepceo")
oecpel
^P1STREET("IS","ycxez","navr qipi")
ipiq rvan
^P1STREET("IS","ycxez","navr wcy")
ycw rvan
^P1STREET("IS","ycxez","ncxic")
cixcn
^P1STREET("IS","ycxez","nedliax")
xailden
^P1STREET("IS","ycxez","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","ycxez","nikd")
dkin
^P1STREET("IS","ycxez","nl`ki")
ik`ln
^P1STREET("IS","ycxez","nwed iyx`l")
l`xyi dewn
^P1STREET("IS","ycxez","ny' `gc drm")
mrd cg` 'yn
^P1STREET("IS","ycxez","ny' aile")
elia 'yn
^P1STREET("IS","ycxez","ny' altex")
xetla 'yn
^P1STREET("IS","ycxez","ny' belpi")
ipleb 'yn
^P1STREET("IS","ycxez","ny' cbpid")
dipbc 'yn
^P1STREET("IS","ycxez","ny' d`ixiq")
qixi`d 'yn
^P1STREET("IS","ycxez","ny' d`x""i")
i"x`d 'yn
^P1STREET("IS","ycxez","ny' dbi`")
`ibd 'yn
^P1STREET("IS","ycxez","ny' dblil")
lilbd 'yn
^P1STREET("IS","ycxez","ny' dbxcem")
mecxbd 'yn
^P1STREET("IS","ycxez","ny' dcxex")
xexcd 'yn
^P1STREET("IS","ycxez","ny' ddcq")
qcdd 'yn
^P1STREET("IS","ycxez","ny' dexcineo")
oenicxed 'yn
^P1STREET("IS","ycxez","ny' diapi`li")
il`ipaid 'yn
^P1STREET("IS","ycxez","ny' dl""d")
d"ld 'yn
^P1STREET("IS","ycxez","ny' dpvia")
aivpd 'yn
^P1STREET("IS","ycxez","ny' dtrnepiz")
zipenrtd 'yn
^P1STREET("IS","ycxez","ny' dwenniez")
zeinnewd 'yn
^P1STREET("IS","ycxez","ny' dxineo")
oenixd 'yn
^P1STREET("IS","ycxez","ny' dyethim")
mihteyd 'yn
^P1STREET("IS","ycxez","ny' dyxeo")
oexyd 'yn
^P1STREET("IS","ycxez","ny' excineo")
oenicxe 'yn
^P1STREET("IS","ycxez","ny' iapi`li")
il`ipai 'yn
^P1STREET("IS","ycxez","ny' pivpd")
dpvip 'yn
^P1STREET("IS","ycxez","ny' yngd delvaxb")
bxavled dgny 'yn
^P1STREET("IS","ycxez","ny'dlilj")
jlild'yn
^P1STREET("IS","ycxez","nyd fxg")
gxf dyn
^P1STREET("IS","ycxez","nyd xape")
epax dyn
^P1STREET("IS","ycxez","nyd yxz")
zxy dyn
^P1STREET("IS","ycxez","nyrel ghiaz dpba")
abpd zaihg leryn
^P1STREET("IS","ycxez","nyrel gpwio")
oiwpg leryn
^P1STREET("IS","ycxez","nyrel xetio")
oitex leryn
^P1STREET("IS","ycxez","p`ez ail""e")
e"lia ze`p
^P1STREET("IS","ycxez","p`ez ripz")
zpir ze`p
^P1STREET("IS","ycxez","p`ez ycxez")
zexcy ze`p
^P1STREET("IS","ycxez","peed `ykel")
leky` deep
^P1STREET("IS","ycxez","peed ycxez")
zexcy deep
^P1STREET("IS","ycxez","pexiz")
zixep
^P1STREET("IS","ycxez","pgem")
megp
^P1STREET("IS","ycxez","pgyeo")
oeygp
^P1STREET("IS","ycxez","pivo")
ovip
^P1STREET("IS","ycxez","pix rm")
mr xip
^P1STREET("IS","ycxez","pzo")
ozp
^P1STREET("IS","ycxez","pzo `laf")
fal` ozp
^P1STREET("IS","ycxez","pzo `lzxno")
onxzl` ozp
^P1STREET("IS","ycxez","qn' `iild")
dlii` 'nq
^P1STREET("IS","ycxez","qn' d`bef")
feb`d 'nq
^P1STREET("IS","ycxez","qn' d`v""l")
l"v`d 'nq
^P1STREET("IS","ycxez","qn' dcbo")
obcd 'nq
^P1STREET("IS","ycxez","qn' dcela")
alecd 'nq
^P1STREET("IS","ycxez","qn' dpxwiqim")
miqiwxpd 'nq
^P1STREET("IS","ycxez","qn' dtlcd")
dcltd 'nq
^P1STREET("IS","ycxez","qn' dyenx")
xneyd 'nq
^P1STREET("IS","ycxez","qn' dywnd")
dnwyd 'nq
^P1STREET("IS","ycxez","qn' dznx")
xnzd 'nq
^P1STREET("IS","ycxez","qn' qpy")
ypq 'nq
^P1STREET("IS","ycxez","qn' zcdx")
xdcz 'nq
^P1STREET("IS","ycxez","rnx ynreo")
oerny xnr
^P1STREET("IS","ycxez","thie")
eiht
^P1STREET("IS","ycxez","tipq")
qpit
^P1STREET("IS","ycxez","tipqwx")
xwqpit
^P1STREET("IS","ycxez","tpwq")
qwpt
^P1STREET("IS","ycxez","txif")
fixt
^P1STREET("IS","ycxez","txu ptzli")
ilztp uxt
^P1STREET("IS","ycxez","vd""l")
l"dv
^P1STREET("IS","ycxez","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","ycxez","ww""l")
l"ww
^P1STREET("IS","ycxez","wxo diqec")
ceqid oxw
^P1STREET("IS","ycxez","xehyilc")
cliyhex
^P1STREET("IS","ycxez","xeo irwa")
awri oex
^P1STREET("IS","ycxez","xeo yewxeo")
oexwey oex
^P1STREET("IS","ycxez","xg' 1")
1 'gx
^P1STREET("IS","ycxez","xg' 10")
10 'gx
^P1STREET("IS","ycxez","xg' 13")
13 'gx
^P1STREET("IS","ycxez","xg' 14")
14 'gx
^P1STREET("IS","ycxez","xg' 15")
15 'gx
^P1STREET("IS","ycxez","xg' 3")
3 'gx
^P1STREET("IS","ycxez","xg' 31")
31 'gx
^P1STREET("IS","ycxez","xg' 41")
41 'gx
^P1STREET("IS","ycxez","xg' 51")
51 'gx
^P1STREET("IS","ycxez","xg' 8")
8 'gx
^P1STREET("IS","ycxez","xg' 9")
9 'gx
^P1STREET("IS","ycxez","xkaez")
zeakx
^P1STREET("IS","ycxez","y""i rbpeo")
oepbr i"y
^P1STREET("IS","ycxez","y`x iyea")
aeyi x`y
^P1STREET("IS","ycxez","yc' dzryid")
diyrzd 'cy
^P1STREET("IS","ycxez","ye`iad")
dai`ey
^P1STREET("IS","ycxez","ylem rlikm")
mkilr mely
^P1STREET("IS","ycxez","ylem yafi")
ifay mely
^P1STREET("IS","ycxez","yne`l")
l`eny
^P1STREET("IS","ycxez","yngd axpx")
xpxa dgny
^P1STREET("IS","ycxez","ytxipvw")
wvpixty
^P1STREET("IS","ycxez","zl gi")
ig lz
^P1STREET("IS","ydm")
mdy
^P1STREET("IS","ydm","`ecm")
mce`
^P1STREET("IS","ydm","aflz")
zlfa
^P1STREET("IS","ydm","axwz")
zwxa
^P1STREET("IS","ydm","aynz")
znya
^P1STREET("IS","ydm","bxpih")
hipxb
^P1STREET("IS","ydm","d`ld")
dl`d
^P1STREET("IS","ydm","dayex")
xeyad
^P1STREET("IS","ydm","dbto")
otbd
^P1STREET("IS","ydm","dfedx")
xdefd
^P1STREET("IS","ydm","dfiz")
zifd
^P1STREET("IS","ydm","dgal")
lagd
^P1STREET("IS","ydm","dgihd")
dhigd
^P1STREET("IS","ydm","dild")
dlid
^P1STREET("IS","ydm","dixco")
ocxid
^P1STREET("IS","ydm","dltic")
citld
^P1STREET("IS","ydm","dnkaim")
miaknd
^P1STREET("IS","ydm","dqlr")
rlqd
^P1STREET("IS","ydm","dvex")
xevd
^P1STREET("IS","ydm","dwyz")
zywd
^P1STREET("IS","ydm","dxineo")
oenixd
^P1STREET("IS","ydm","dzto")
otzd
^P1STREET("IS","ydm","geyo")
oyeg
^P1STREET("IS","ydm","gtx")
xtg
^P1STREET("IS","ydm","gxneo")
oenxg
^P1STREET("IS","ydm","hetf")
fteh
^P1STREET("IS","ydm","idlem")
meldi
^P1STREET("IS","ydm","ifxr`l")
l`rxfi
^P1STREET("IS","ydm","iqnio")
oinqi
^P1STREET("IS","ydm","kxnl")
lnxk
^P1STREET("IS","ydm","lkiy")
yikl
^P1STREET("IS","ydm","lym")
myl
^P1STREET("IS","ydm","necirim")
miricen
^P1STREET("IS","ydm","necirio")
oiricen
^P1STREET("IS","ydm","nvtd")
dtvn
^P1STREET("IS","ydm","nxbliz")
zilbxn
^P1STREET("IS","ydm","pexiz")
zixep
^P1STREET("IS","ydm","pxwiq")
qiwxp
^P1STREET("IS","ydm","qtix")
xitq
^P1STREET("IS","ydm","rcelm")
mlecr
^P1STREET("IS","ydm","rfxi`li")
il`ixfr
^P1STREET("IS","ydm","ripax")
xapir
^P1STREET("IS","ydm","rnw `iileo")
oelii` wnr
^P1STREET("IS","ydm","vex ib`l")
l`bi xev
^P1STREET("IS","ydm","wcm")
mcw
^P1STREET("IS","ydm","xgaz dgeld")
dlegd zagx
^P1STREET("IS","ydm","xgaz klpiz")
ziplk zagx
^P1STREET("IS","ydm","xgaz phis")
sihp zagx
^P1STREET("IS","ydm","xgaz rci")
icr zagx
^P1STREET("IS","ydm","xgaz tpipd")
dpipt zagx
^P1STREET("IS","ydm","yba")
aby
^P1STREET("IS","ydm","ybi`")
`iby
^P1STREET("IS","ydm","yc' `iileo")
oelii` 'cy
^P1STREET("IS","ydm","yc' rnw `iileo")
oelii` wnr 'cy
^P1STREET("IS","ydm","ygm")
mgy
^P1STREET("IS","ydm","yiaelz")
zleaiy
^P1STREET("IS","ydm","z`pd")
dp`z
^P1STREET("IS","ydm","zaex")
xeaz
^P1STREET("IS","ydm","zal")
laz
^P1STREET("IS","ydm","znx")
xnz
^P1STREET("IS","ydm","zxyiy")
yiyxz
^P1STREET("IS","ye`ad")
da`ey
^P1STREET("IS","yead")
daey
^P1STREET("IS","yeal")
laey
^P1STREET("IS","yenxd")
dxney
^P1STREET("IS","yenxid")
dixney
^P1STREET("IS","yerth")
htrey
^P1STREET("IS","yerth","`ao xeyc")
cyex oa`
^P1STREET("IS","yerth","`gnc y`ewi")
iwe`y cng`
^P1STREET("IS","yerth","`l`qnri")
irnq`l`
^P1STREET("IS","yerth","`lkpq`")
`qpkl`
^P1STREET("IS","yerth","`lqdl")
ldql`
^P1STREET("IS","yerth","al`l ao xa`g")
g`ax oa l`la
^P1STREET("IS","yerth","cxj rp`z`")
`z`pr jxc
^P1STREET("IS","yerth","dqelho")
ohleqd
^P1STREET("IS","yewcd")
dcwey
^P1STREET("IS","yexy")
yxey
^P1STREET("IS","yexy","d`ld")
dl`d
^P1STREET("IS","yexy","dgxea")
aexgd
^P1STREET("IS","yexy","dyifs")
sfiyd
^P1STREET("IS","yeypz drnwim")
miwnrd zpyey
^P1STREET("IS","yeypz drnwim","`npeo eznx")
xnze oepn`
^P1STREET("IS","yeypz drnwim","d`yl")
ly`d
^P1STREET("IS","yeypz drnwim","dcwl")
lwcd
^P1STREET("IS","yeypz drnwim","ddcx")
xcdd
^P1STREET("IS","yeypz drnwim","dges")
segd
^P1STREET("IS","yeypz drnwim","gavlz")
zlvag
^P1STREET("IS","yeypz drnwim","vewi im")
mi iwev
^P1STREET("IS","yfex")
xefy
^P1STREET("IS","ygx")
xgy
^P1STREET("IS","yig")
giy
^P1STREET("IS","yilz")
zliy
^P1STREET("IS","yilz","dgnnez")
zenngd
^P1STREET("IS","yilz","dywc")
cwyd
^P1STREET("IS","yinyiz")
ziyniy
^P1STREET("IS","yinyiz","`lneb")
benl`
^P1STREET("IS","yinyiz","`xbno")
onbx`
^P1STREET("IS","yinyiz","axwz")
zwxa
^P1STREET("IS","yinyiz","bfiz")
zifb
^P1STREET("IS","yinyiz","bxpih")
hipxb
^P1STREET("IS","yinyiz","d`ecm")
mce`d
^P1STREET("IS","yinyiz","dgeyo")
oyegd
^P1STREET("IS","yinyiz","iealim")
milaei
^P1STREET("IS","yinyiz","nriipez")
zepiirn
^P1STREET("IS","yinyiz","ntlim")
miltn
^P1STREET("IS","yinyiz","qtix")
xitq
^P1STREET("IS","yinyiz","tlb")
blt
^P1STREET("IS","yinyiz","vexo")
oxev
^P1STREET("IS","yinyiz","yedm")
mdey
^P1STREET("IS","yinyiz","ygm")
mgy
^P1STREET("IS","yinyiz","ypi")
ipy
^P1STREET("IS","ylegez")
zegely
^P1STREET("IS","yleni")
inely
^P1STREET("IS","yleni","`gidec")
cedig`
^P1STREET("IS","yleni","`gidec ao yleni")
inely oa cedig`
^P1STREET("IS","yleni","`laf pzo")
ozp fal`
^P1STREET("IS","yleni","ao bexieo")
oeixeb oa
^P1STREET("IS","yleni","bexo")
oxeb
^P1STREET("IS","yleni","cxj d`xfim")
mifx`d jxc
^P1STREET("IS","yleni","d`ld")
dl`d
^P1STREET("IS","yleni","d`leo")
oel`d
^P1STREET("IS","yleni","dcq")
qcd
^P1STREET("IS","yleni","dcxex")
xexcd
^P1STREET("IS","yleni","dhiilz d`pbliz")
zilbp`d zliihd
^P1STREET("IS","yleni","dxa gfo")
ofg axd
^P1STREET("IS","yleni","dxa nineo")
oenin axd
^P1STREET("IS","yleni","dxa refi`l")
l`ifer axd
^P1STREET("IS","yleni","dxces")
secxd
^P1STREET("IS","yleni","eivno")
onvie
^P1STREET("IS","yleni","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","yleni","iqnio")
oinqi
^P1STREET("IS","yleni","itd pes")
sep dti
^P1STREET("IS","yleni","peed xaio")
oiax deep
^P1STREET("IS","yleni","pes im")
mi sep
^P1STREET("IS","yleni","pexiz")
zixep
^P1STREET("IS","yleni","pivo")
ovip
^P1STREET("IS","yleni","qgla")
algq
^P1STREET("IS","yleni","xwtz")
ztwx
^P1STREET("IS","yleni","ygs")
sgy
^P1STREET("IS","yleni","yleniz")
zinely
^P1STREET("IS","yleni","yyz dinim")
minid zyy
^P1STREET("IS","ym iyea")
aeyi my
^P1STREET("IS","ym iyea","ym xgea")
aegx my
^P1STREET("IS","ynix")
xiny
^P1STREET("IS","ynxz")
zxny
^P1STREET("IS","yra")
ary
^P1STREET("IS","yrlaim")
mialry
^P1STREET("IS","yrlaim","dgeyo")
oyegd
^P1STREET("IS","yrlaim","pes `ileo")
oeli` sep
^P1STREET("IS","yrlaim","qtix")
xitq
^P1STREET("IS","yrx `txim")
mixt` xry
^P1STREET("IS","yrx `txim","`xal")
lax`
^P1STREET("IS","yrx `txim","dblaer")
realbd
^P1STREET("IS","yrx `txim","didlem")
meldid
^P1STREET("IS","yrx `txim","dzaex")
xeazd
^P1STREET("IS","yrx `txim","rvneo")
oenvr
^P1STREET("IS","yrx dbelo")
olebd xry
^P1STREET("IS","yrx drnwim")
miwnrd xry
^P1STREET("IS","yrxi zwed")
dewz ixry
^P1STREET("IS","yrxi zwed","`aiaim")
miaia`
^P1STREET("IS","yrxi zwed","`ecm")
mce`
^P1STREET("IS","yrxi zwed","`lneb")
benl`
^P1STREET("IS","yrxi zwed","`tec")
cet`
^P1STREET("IS","yrxi zwed","aflz")
zlfa
^P1STREET("IS","yrxi zwed","aixid")
dixia
^P1STREET("IS","yrxi zwed","axwz")
zwxa
^P1STREET("IS","yrxi zwed","bxpih")
hipxb
^P1STREET("IS","yrxi zwed","cbpid")
dipbc
^P1STREET("IS","yrxi zwed","co")
oc
^P1STREET("IS","yrxi zwed","ctpd")
dptc
^P1STREET("IS","yrxi zwed","d`ixeq")
qexi`d
^P1STREET("IS","yrxi zwed","dxxiz")
zixxd
^P1STREET("IS","yrxi zwed","dywc")
cwyd
^P1STREET("IS","yrxi zwed","dz`pd")
dp`zd
^P1STREET("IS","yrxi zwed","glniy")
yinlg
^P1STREET("IS","yrxi zwed","gxqiz")
ziqxg
^P1STREET("IS","yrxi zwed","idlem")
meldi
^P1STREET("IS","yrxi zwed","kpxz")
zxpk
^P1STREET("IS","yrxi zwed","pbad")
dabp
^P1STREET("IS","yrxi zwed","qlr")
rlq
^P1STREET("IS","yrxi zwed","qtix")
xitq
^P1STREET("IS","yrxi zwed","rpax")
xapr
^P1STREET("IS","yrxi zwed","vew")
wev
^P1STREET("IS","yrxi zwed","xwtz")
ztwx
^P1STREET("IS","yrxi zwed","zl gi")
ig lz
^P1STREET("IS","yrxi zwed","zxyiy")
yiyxz
^P1STREET("IS","ytiim")
miity
^P1STREET("IS","ytiim","gevez")
zeveg
^P1STREET("IS","ytix")
xity
^P1STREET("IS","ytix","davix")
xivad
^P1STREET("IS","ytix","dfexr")
rxefd
^P1STREET("IS","ytxrm")
mrxty
^P1STREET("IS","ytxrm","`l te`x")
x`et l`
^P1STREET("IS","ytxrm","`lqwir")
riwql`
^P1STREET("IS","ytxrm","`lrio")
oirl`
^P1STREET("IS","ytxrm","b'aex")
xea'b
^P1STREET("IS","ytxrm","c`ec zlgni")
inglz ce`c
^P1STREET("IS","ytxrm","cdx `lkpiq")
qipkl` xdc
^P1STREET("IS","ytxrm","e`ci qwir")
riwq ic`e
^P1STREET("IS","ytxrm","pvxz")
zxvp
^P1STREET("IS","ytxrm","ra`qi")
iq`ar
^P1STREET("IS","ytxrm","rb'xey")
yex'br
^P1STREET("IS","ytxrm","xg' 1")
1 'gx
^P1STREET("IS","ytxrm","xg' 135")
135 'gx
^P1STREET("IS","ytxrm","xg' 223")
223 'gx
^P1STREET("IS","ytxrm","xg' 240")
240 'gx
^P1STREET("IS","ytxrm","xg' 248")
248 'gx
^P1STREET("IS","ytxrm","xg' 265")
265 'gx
^P1STREET("IS","ytxrm","xg' 28")
28 'gx
^P1STREET("IS","ytxrm","xg' 3")
3 'gx
^P1STREET("IS","ytxrm","xg' 304")
304 'gx
^P1STREET("IS","ytxrm","xg' 306")
306 'gx
^P1STREET("IS","ytxrm","xg' 319")
319 'gx
^P1STREET("IS","ytxrm","xg' 341")
341 'gx
^P1STREET("IS","ytxrm","xg' 38")
38 'gx
^P1STREET("IS","ytxrm","xg' 4")
4 'gx
^P1STREET("IS","ytxrm","xg' 42")
42 'gx
^P1STREET("IS","ytxrm","xg' 440")
440 'gx
^P1STREET("IS","ytxrm","xg' 5")
5 'gx
^P1STREET("IS","ytxrm","xg' 500")
500 'gx
^P1STREET("IS","ytxrm","xg' 510")
510 'gx
^P1STREET("IS","ytxrm","z`etiw fi`c")
c`if wite`z
^P1STREET("IS","yxepd")
dpexy
^P1STREET("IS","yxibim [li-`eo]")
(oe`-il) mibixy
^P1STREET("IS","yxibim [li-`eo]","d`ykelez")
zeleky`d
^P1STREET("IS","yxibim [li-`eo]","diwa")
awid
^P1STREET("IS","yxibim [li-`eo]","yxib")
bixy
^P1STREET("IS","yxic")
cixy
^P1STREET("IS","yxyxz")
zxyxy
^P1STREET("IS","yzelim")
milezy
^P1STREET("IS","yzelim","d`ld")
dl`d
^P1STREET("IS","yzelim","d`leo")
oel`d
^P1STREET("IS","yzelim","dyihd")
dhiyd
^P1STREET("IS","zenx")
xnez
^P1STREET("IS","zi`qix")
xiq`iz
^P1STREET("IS","ziexim")
lh ipb
^P1STREET("IS","zinexim")
mixeniz
^P1STREET("IS","zixey")
yexiz
^P1STREET("IS","zl `aia")
aia` lz
^P1STREET("IS","zl `aia","%alem%")
%mela%
^P1STREET("IS","zl `aia","%t""z%")
%z"t%
^P1STREET("IS","zl `aia","%xg'%")
%'gx%
^P1STREET("IS","zl `aia","`""c bexceo")
oecxeb c"`
^P1STREET("IS","zl `aia","`.v. bxipaxb")
bxapixb .v.`
^P1STREET("IS","zl `aia","`a")
a`
^P1STREET("IS","zl `aia","`a` `gin`ix")
xi`nig` `a`
^P1STREET("IS","zl `aia","`a` dll")
lld `a`
^P1STREET("IS","zl `aia","`a` weapx")
xpaew `a`
^P1STREET("IS","zl `aia","`aecxdm")
mdxcea`
^P1STREET("IS","zl `aia","`aehael irwa")
awri leahea`
^P1STREET("IS","zl `aia","`aelrtid")
ditrlea`
^P1STREET("IS","zl `aia","`aewd")
dwea`
^P1STREET("IS","zl `aia","`ahlieo")
oeilha`
^P1STREET("IS","zl `aia","`ai`qs")
sq`ia`
^P1STREET("IS","zl `aia","`aihl")
lhia`
^P1STREET("IS","zl `aia","`ainlj")
jlnia`
^P1STREET("IS","zl `aia","`aipxi ivgw")
wgvi ixpia`
^P1STREET("IS","zl `aia","`aivex yne`l")
l`eny xevia`
^P1STREET("IS","zl `aia","`aiyi")
iyia`
^P1STREET("IS","zl `aia","`aizx")
xzia`
^P1STREET("IS","zl `aia","`ao baixel")
lexiab oa`
^P1STREET("IS","zl `aia","`ao bp`g")
g`pb oa`
^P1STREET("IS","zl `aia","`ao qip`")
`piq oa`
^P1STREET("IS","zl `aia","`ao qtix")
xitq oa`
^P1STREET("IS","zl `aia","`ao xyc")
cyx oa`
^P1STREET("IS","zl `aia","`api fkxeo")
oexkf ipa`
^P1STREET("IS","zl `aia","`apx")
xpa`
^P1STREET("IS","zl `aia","`axap`l")
l`paxa`
^P1STREET("IS","zl `aia","`axdm `ao yeyo")
oyey oa` mdxa`
^P1STREET("IS","zl `aia","`axdm awx")
xwa mdxa`
^P1STREET("IS","zl `aia","`axdm nw`liqw")
wqil`wn mdxa`
^P1STREET("IS","zl `aia","`bczi axej")
jexa izcb`
^P1STREET("IS","zl `aia","`bxitq")
qtixb`
^P1STREET("IS","zl `aia","`c weu'")
'uew c`
^P1STREET("IS","zl `aia","`cixim")
mixic`
^P1STREET("IS","zl `aia","`cm dkdo")
odkd mc`
^P1STREET("IS","zl `aia","`cx")
xc`
^P1STREET("IS","zl `aia","`daz vieo")
oeiv zad`
^P1STREET("IS","zl `aia","`dec")
ced`
^P1STREET("IS","zl `aia","`dli irwa")
awri ild`
^P1STREET("IS","zl `aia","`dxeo awx")
xwa oexd`
^P1STREET("IS","zl `aia","`dxeo nqwio")
oiwqn oexd`
^P1STREET("IS","zl `aia","`dxepeaiu")
uiaepexd`
^P1STREET("IS","zl `aia","`dxepqeo")
oeqpexd`
^P1STREET("IS","zl `aia","`e`xaj")
jax`e`
^P1STREET("IS","zl `aia","`ebxiz")
zixbe`
^P1STREET("IS","zl `aia","`eda iyx`l")
l`xyi ade`
^P1STREET("IS","zl `aia","`edli irwa")
awri ilde`
^P1STREET("IS","zl `aia","`efywead")
daewyfe`
^P1STREET("IS","zl `aia","`elitph")
hptile`
^P1STREET("IS","zl `aia","`ephxno `iqx idecd")
dcedi xqi` onxhpe`
^P1STREET("IS","zl `aia","`epwleq")
qelwpe`
^P1STREET("IS","zl `aia","`eqiywio")
oiwyiqe`
^P1STREET("IS","zl `aia","`eqwx yipclx")
xlcpiy xwqe`
^P1STREET("IS","zl `aia","`etheye ieqs")
sqei eyehte`
^P1STREET("IS","zl `aia","`etix")
xite`
^P1STREET("IS","zl `aia","`etpdiinx")
xniidpte`
^P1STREET("IS","zl `aia","`ex dgiim")
miigd xe`
^P1STREET("IS","zl `aia","`exi")
ixe`
^P1STREET("IS","zl `aia","`exi`l `weqhd")
dhqew` l`ixe`
^P1STREET("IS","zl `aia","`exim")
mixe`
^P1STREET("IS","zl `aia","`exlea gpd")
dpg aelxe`
^P1STREET("IS","zl `aia","`eyd")
dye`
^P1STREET("IS","zl `aia","`f""x")
x"f`
^P1STREET("IS","zl `aia","`fcxkz")
zkxcf`
^P1STREET("IS","zl `aia","`fea")
aef`
^P1STREET("IS","zl `aia","`g""i cwx")
xwc i"g`
^P1STREET("IS","zl `aia","`gc drm")
mrd cg`
^P1STREET("IS","zl `aia","`ged")
deg`
^P1STREET("IS","zl `aia","`gefz aiz")
zia zfeg`
^P1STREET("IS","zl `aia","`giles")
selig`
^P1STREET("IS","zl `aia","`ginru")
urnig`
^P1STREET("IS","zl `aia","`girfx")
xfrig`
^P1STREET("IS","zl `aia","`gxeo")
oexg`
^P1STREET("IS","zl `aia","`iayiu")
uiyai`
^P1STREET("IS","zl `aia","`ibx rwia`")
`aiwr xbi`
^P1STREET("IS","zl `aia","`iclqeo")
oeqlci`
^P1STREET("IS","zl `aia","`iclqeo xgl eyne`l")
l`enye lgx oeqlci`
^P1STREET("IS","zl `aia","`ifnef'iw l`d ecec")
cece d`l wi'fenfi`
^P1STREET("IS","zl `aia","`iilz dygx")
xgyd zlii`
^P1STREET("IS","zl `aia","`iipyhiio")
oiihypii`
^P1STREET("IS","zl `aia","`iix")
xii`
^P1STREET("IS","zl `aia","`ilo")
oli`
^P1STREET("IS","zl `aia","`ilz")
zli`
^P1STREET("IS","zl `aia","`inax")
xani`
^P1STREET("IS","zl `aia","`ipyhiio")
oiihypi`
^P1STREET("IS","zl `aia","`iqwea")
aewqi`
^P1STREET("IS","zl `aia","`iqxliy")
yilxqi`
^P1STREET("IS","zl `aia","`ixiq")
qixi`
^P1STREET("IS","zl `aia","`izi`l")
l`izi`
^P1STREET("IS","zl `aia","`izio `dxeo")
oexd` oizi`
^P1STREET("IS","zl `aia","`iznx ao `a""i")
i"a` oa xnzi`
^P1STREET("IS","zl `aia","`l wvqiil")
liiqvw l`
^P1STREET("IS","zl `aia","`laxh npclx")
xlcpn hxal`
^P1STREET("IS","zl `aia","`lcc dcpi")
ipcd ccl`
^P1STREET("IS","zl `aia","`lel")
lel`
^P1STREET("IS","zl `aia","`les")
sel`
^P1STREET("IS","zl `aia","`les avlez")
zelva sel`
^P1STREET("IS","zl `aia","`les co lpx")
xpl oc sel`
^P1STREET("IS","zl `aia","`les npclx")
xlcpn sel`
^P1STREET("IS","zl `aia","`les wlno nbo")
obn onlw sel`
^P1STREET("IS","zl `aia","`leti vd""l")
l"dv itel`
^P1STREET("IS","zl `aia","`lgxifi")
ifixgl`
^P1STREET("IS","zl `aia","`li kdo")
odk il`
^P1STREET("IS","zl `aia","`lide axlio")
oilxa edil`
^P1STREET("IS","zl `aia","`lide belena")
aneleb edil`
^P1STREET("IS","zl `aia","`lide ieqs")
sqei edil`
^P1STREET("IS","zl `aia","`lide ntixxd")
dxxitn edil`
^P1STREET("IS","zl `aia","`lirfx yn`li")
il`ny xfril`
^P1STREET("IS","zl `aia","`litlh")
hltil`
^P1STREET("IS","zl `aia","`liwem")
mewil`
^P1STREET("IS","zl `aia","`liyaxb")
bxayil`
^P1STREET("IS","zl `aia","`liyia")
aiyil`
^P1STREET("IS","zl `aia","`lkqpcx fiic")
ciif xcpqkl`
^P1STREET("IS","zl `aia","`lkqpcx ip`i")
i`pi xcpqkl`
^P1STREET("IS","zl `aia","`lkqpcx to")
ot xcpqkl`
^P1STREET("IS","zl `aia","`lnbex")
xebnl`
^P1STREET("IS","zl `aia","`lpai")
iapl`
^P1STREET("IS","zl `aia","`lpwed")
dewpl`
^P1STREET("IS","zl `aia","`lrfx")
xfrl`
^P1STREET("IS","zl `aia","`lrfx ao ieqi")
iqei oa xfrl`
^P1STREET("IS","zl `aia","`lrfx ao vcew")
wecv oa xfrl`
^P1STREET("IS","zl `aia","`lrfx dgexpi")
ipxegd xfrl`
^P1STREET("IS","zl `aia","`ltqi")
iqtl`
^P1STREET("IS","zl `aia","`lweyi")
iyewl`
^P1STREET("IS","zl `aia","`lwgi nxcki")
ikcxn igwl`
^P1STREET("IS","zl `aia","`lwlri")
irlwl`
^P1STREET("IS","zl `aia","`lxe`i")
i`exl`
^P1STREET("IS","zl `aia","`lyij")
jiyl`
^P1STREET("IS","zl `aia","`nepim")
mipen`
^P1STREET("IS","zl `aia","`nflb")
blfn`
^P1STREET("IS","zl `aia","`nil fel`")
`lef lin`
^P1STREET("IS","zl `aia","`nil teixyhiio")
oiihyxiet lin`
^P1STREET("IS","zl `aia","`nilxc")
cxlin`
^P1STREET("IS","zl `aia","`nix blaer")
realb xin`
^P1STREET("IS","zl `aia","`nixim")
mixin`
^P1STREET("IS","zl `aia","`npeo eznx")
xnze oepn`
^P1STREET("IS","zl `aia","`nqhxcm")
mcxhqn`
^P1STREET("IS","zl `aia","`nu")
un`
^P1STREET("IS","zl `aia","`pbl")
lbp`
^P1STREET("IS","zl `aia","`pcxeq")
qexcp`
^P1STREET("IS","zl `aia","`pcxqo")
oqxcp`
^P1STREET("IS","zl `aia","`peki")
ikep`
^P1STREET("IS","zl `aia","`phewelqwi")
iwqlewehp`
^P1STREET("IS","zl `aia","`phibepeq")
qepebihp`
^P1STREET("IS","zl `aia","`phw vewxno ivgw")
wgvi onxwev whp`
^P1STREET("IS","zl `aia","`pi n`nio")
oin`n ip`
^P1STREET("IS","zl `aia","`pid xefo")
ofex dip`
^P1STREET("IS","zl `aia","`pilaiu")
uialip`
^P1STREET("IS","zl `aia","`pqwi")
iwqp`
^P1STREET("IS","zl `aia","`q` wcnepi")
ipencw `q`
^P1STREET("IS","zl `aia","`qixi vieo")
oeiv ixiq`
^P1STREET("IS","zl `aia","`qs dxet`")
`texd sq`
^P1STREET("IS","zl `aia","`qzx dnlkd")
dklnd xzq`
^P1STREET("IS","zl `aia","`thx")
xht`
^P1STREET("IS","zl `aia","`tiw")
wit`
^P1STREET("IS","zl `aia","`tlheo")
oehlt`
^P1STREET("IS","zl `aia","`tw")
wt`
^P1STREET("IS","zl `aia","`twim")
miwt`
^P1STREET("IS","zl `aia","`tyhiio")
oiihyt`
^P1STREET("IS","zl `aia","`v""l")
l"v`
^P1STREET("IS","zl `aia","`wqlxec")
cexlqw`
^P1STREET("IS","zl `aia","`xar `xvez")
zevx` rax`
^P1STREET("IS","zl `aia","`xax")
xax`
^P1STREET("IS","zl `aia","`xfi idecd")
dcedi ifx`
^P1STREET("IS","zl `aia","`xhx")
xhx`
^P1STREET("IS","zl `aia","`xi`l")
l`ix`
^P1STREET("IS","zl `aia","`xid celvio")
oivlec dix`
^P1STREET("IS","zl `aia","`xik` ieqs")
sqei `kix`
^P1STREET("IS","zl `aia","`xiqhe")
ehqix`
^P1STREET("IS","zl `aia","`xiqheael")
leaehqix`
^P1STREET("IS","zl `aia","`xlefexea")
aexefelx`
^P1STREET("IS","zl `aia","`xlij")
jilx`
^P1STREET("IS","zl `aia","`xlipbx")
xbpilx`
^P1STREET("IS","zl `aia","`xm nyd")
dyn mx`
^P1STREET("IS","zl `aia","`xpeo")
oepx`
^P1STREET("IS","zl `aia","`xpi`")
`ipx`
^P1STREET("IS","zl `aia","`xpqh nxhio")
oihxn hqpx`
^P1STREET("IS","zl `aia","`xzex xeaipyhiio")
oiihypiaex xezx`
^P1STREET("IS","zl `aia","`ycec")
cecy`
^P1STREET("IS","zl `aia","`ykpfi")
ifpky`
^P1STREET("IS","zl `aia","`ywleo")
oelwy`
^P1STREET("IS","zl `aia","`yxno ieqs")
sqei onxy`
^P1STREET("IS","zl `aia","`yzexi dtxgi")
igxtd ixezy`
^P1STREET("IS","zl `aia","a`kx f`a")
a`f xk`a
^P1STREET("IS","zl `aia","a`qeld")
dleq`a
^P1STREET("IS","zl `aia","a`x heaid")
diaeh x`a
^P1STREET("IS","zl `aia","a`x irwa")
awri x`a
^P1STREET("IS","zl `aia","a`x yar")
ray x`a
^P1STREET("IS","zl `aia","a`xh")
hx`a
^P1STREET("IS","zl `aia","a`xi")
ix`a
^P1STREET("IS","zl `aia","aali")
ilaa
^P1STREET("IS","zl `aia","acelg")
gleca
^P1STREET("IS","zl `aia","aealiw")
wilaea
^P1STREET("IS","zl `aia","aeax ylnd")
dnly xaea
^P1STREET("IS","zl `aia","aebxyea")
aeyxbea
^P1STREET("IS","zl `aia","aecpdiinx")
xniidpcea
^P1STREET("IS","zl `aia","aei`x `axdm")
mdxa` x`iea
^P1STREET("IS","zl `aia","aepi drix")
xird ipea
^P1STREET("IS","zl `aia","aeql")
lqea
^P1STREET("IS","zl `aia","aeqzp`i")
i`pzqea
^P1STREET("IS","zl `aia","aerf")
frea
^P1STREET("IS","zl `aia","aewi ao ibli")
ilbi oa iwea
^P1STREET("IS","zl `aia","aewyto cec")
cec otywea
^P1STREET("IS","zl `aia","aexbild")
dlibxea
^P1STREET("IS","zl `aia","aexekea")
aekexea
^P1STREET("IS","zl `aia","aexl`")
`lxea
^P1STREET("IS","zl `aia","aexnd")
dnxea
^P1STREET("IS","zl `aia","aeym")
myea
^P1STREET("IS","zl `aia","afl")
lfa
^P1STREET("IS","zl `aia","agex `lide")
edil` xega
^P1STREET("IS","zl `aia","ahdeao")
oaedha
^P1STREET("IS","zl `aia","ai`liqhew")
wehqil`ia
^P1STREET("IS","zl `aia","ai`liw")
wil`ia
^P1STREET("IS","zl `aia","aiixeo")
oexiia
^P1STREET("IS","zl `aia","ail""e")
e"lia
^P1STREET("IS","zl `aia","ailhnex")
xenhlia
^P1STREET("IS","zl `aia","ailipqeo")
oeqpilia
^P1STREET("IS","zl `aia","aixid")
dixia
^P1STREET("IS","zl `aia","aixpaeim")
mieapxia
^P1STREET("IS","zl `aia","aixpiz")
zipxia
^P1STREET("IS","zl `aia","aiz `exo")
oxe` zia
^P1STREET("IS","zl `aia","aiz `l")
l` zia
^P1STREET("IS","zl `aia","aiz `lt`")
`tl` zia
^P1STREET("IS","zl `aia","aiz `yl")
ly` zia
^P1STREET("IS","zl `aia","aiz beaxio")
oixaeb zia
^P1STREET("IS","zl `aia","aiz dgiim")
miigd zia
^P1STREET("IS","zl `aia","aiz dll")
lld zia
^P1STREET("IS","zl `aia","aiz dperx")
xrepd zia
^P1STREET("IS","zl `aia","aiz gcy")
ycg zia
^P1STREET("IS","zl `aia","aiz gexeo")
oexeg zia
^P1STREET("IS","zl `aia","aiz ieqs")
sqei zia
^P1STREET("IS","zl `aia","aiz ivwx")
xwvi zia
^P1STREET("IS","zl `aia","aiz ixg")
gxi zia
^P1STREET("IS","zl `aia","aiz lgm")
mgl zia
^P1STREET("IS","zl `aia","aiz reac")
caer zia
^P1STREET("IS","zl `aia","aiz tlh")
hlt zia
^P1STREET("IS","zl `aia","aiz vexi `lide")
edil` ixev zia
^P1STREET("IS","zl `aia","aiz wvix")
xivw zia
^P1STREET("IS","zl `aia","aiz wyz")
zyw zia
^P1STREET("IS","zl `aia","aiz xrim")
mirx zia
^P1STREET("IS","zl `aia","aiz yn`i")
i`ny zia
^P1STREET("IS","zl `aia","aiz yrxim")
mixry zia
^P1STREET("IS","zl `aia","aizeq")
qezia
^P1STREET("IS","zl `aia","akexi vieo")
oeiv ixeka
^P1STREET("IS","zl `aia","alao")
oala
^P1STREET("IS","zl `aia","alej")
jela
^P1STREET("IS","zl `aia","alem")
mela
^P1STREET("IS","zl `aia","altex")
xetla
^P1STREET("IS","zl `aia","alwipc")
cpiwla
^P1STREET("IS","zl `aia","alyo")
oyla
^P1STREET("IS","zl `aia","ao `aibcex")
xecbia` oa
^P1STREET("IS","zl `aia","ao `gihea")
aehig` oa
^P1STREET("IS","zl `aia","ao `yx")
xy` oa
^P1STREET("IS","zl `aia","ao bl nik`l")
l`kin lb oa
^P1STREET("IS","zl `aia","ao bnli`l")
l`ilnb oa
^P1STREET("IS","zl `aia","ao ceq`")
`qec oa
^P1STREET("IS","zl `aia","ao dexwpeq")
qepwxed oa
^P1STREET("IS","zl `aia","ao f`a")
a`f oa
^P1STREET("IS","zl `aia","ao fa`xd")
dx`af oa
^P1STREET("IS","zl `aia","ao fen`")
`nef oa
^P1STREET("IS","zl `aia","ao fk`i")
i`kf oa
^P1STREET("IS","zl `aia","ao giim t`el")
le`t miig oa
^P1STREET("IS","zl `aia","ao gil")
lig oa
^P1STREET("IS","zl `aia","ao gqc")
cqg oa
^P1STREET("IS","zl `aia","ao idecd")
dcedi oa
^P1STREET("IS","zl `aia","ao irwa")
awri oa
^P1STREET("IS","zl `aia","ao iyi")
iyi oa
^P1STREET("IS","zl `aia","ao laxh")
hxal oa
^P1STREET("IS","zl `aia","ao qix`")
`xiq oa
^P1STREET("IS","zl `aia","ao qxew")
wexq oa
^P1STREET("IS","zl `aia","ao rcid")
dicr oa
^P1STREET("IS","zl `aia","ao rf`i")
i`fr oa
^P1STREET("IS","zl `aia","ao rfx`")
`xfr oa
^P1STREET("IS","zl `aia","ao rfxid")
dixfr oa
^P1STREET("IS","zl `aia","ao rhx")
xhr oa
^P1STREET("IS","zl `aia","ao rni")
inr oa
^P1STREET("IS","zl `aia","ao txgid")
digxt oa
^P1STREET("IS","zl `aia","ao yno")
ony oa
^P1STREET("IS","zl `aia","ao ytxeh")
hexty oa
^P1STREET("IS","zl `aia","ao zxcieo")
oeicxz oa
^P1STREET("IS","zl `aia","apapiyzi")
izyipapa
^P1STREET("IS","zl `aia","api `txim")
mixt` ipa
^P1STREET("IS","zl `aia","api axw")
wxa ipa
^P1STREET("IS","zl `aia","api azix`")
`xiza ipa
^P1STREET("IS","zl `aia","api azx`")
`xza ipa
^P1STREET("IS","zl `aia","api co")
oc ipa
^P1STREET("IS","zl `aia","api iyx`l")
l`xyi ipa
^P1STREET("IS","zl `aia","api nyd")
dyn ipa
^P1STREET("IS","zl `aia","apide")
edipa
^P1STREET("IS","zl `aia","apinio nhecld")
dlcehn oinipa
^P1STREET("IS","zl `aia","apinipi")
ipinipa
^P1STREET("IS","zl `aia","arl dhexim")
mixehd lra
^P1STREET("IS","zl `aia","arl dlaeyim")
miyeald lra
^P1STREET("IS","zl `aia","arl drwicd")
dciwrd lra
^P1STREET("IS","zl `aia","arli dzeqtez")
zetqezd ilra
^P1STREET("IS","zl `aia","avl`l")
l`lva
^P1STREET("IS","zl `aia","avl`l itd")
dti l`lva
^P1STREET("IS","zl `aia","avxd")
dxva
^P1STREET("IS","zl `aia","avxeo")
oexva
^P1STREET("IS","zl `aia","ax `ilo")
oli` xa
^P1STREET("IS","zl `aia","ax biex`")
`xeib xa
^P1STREET("IS","zl `aia","ax detno")
onted xa
^P1STREET("IS","zl `aia","ax ieg`i")
i`gei xa
^P1STREET("IS","zl `aia","ax keka`")
`akek xa
^P1STREET("IS","zl `aia","ax`li")
il`xa
^P1STREET("IS","zl `aia","axbi apinio")
oinipa ibxa
^P1STREET("IS","zl `aia","axbpx `lifaz")
zafil` xpbxa
^P1STREET("IS","zl `aia","axbqeo")
oeqbxa
^P1STREET("IS","zl `aia","axciv'aqwi")
iwqa'vicxa
^P1STREET("IS","zl `aia","axeci")
icexa
^P1STREET("IS","zl `aia","axecvwi")
iwvcexa
^P1STREET("IS","zl `aia","axeicq `axdm")
mdxa` qciexa
^P1STREET("IS","zl `aia","axew vai")
iav wexa
^P1STREET("IS","zl `aia","axexid")
dixexa
^P1STREET("IS","zl `aia","axfil")
lifxa
^P1STREET("IS","zl `aia","axfili")
ilifxa
^P1STREET("IS","zl `aia","axfpi nyd")
dyn ipfxa
^P1STREET("IS","zl `aia","axiipio")
oipiixa
^P1STREET("IS","zl `aia","axiiz`")
`ziixa
^P1STREET("IS","zl `aia","axkid")
dikxa
^P1STREET("IS","zl `aia","axkide dpwco")
ocwpd edikxa
^P1STREET("IS","zl `aia","axlipx")
xpilxa
^P1STREET("IS","zl `aia","axpciq")
qicpxa
^P1STREET("IS","zl `aia","axph")
hpxa
^P1STREET("IS","zl `aia","axptlc ynreo")
oerny cltpxa
^P1STREET("IS","zl `aia","axpx")
xpxa
^P1STREET("IS","zl `aia","axpyhiio `ce`xc")
cx`ec` oiihypxa
^P1STREET("IS","zl `aia","axpyhiio kdo")
odk oiihypxa
^P1STREET("IS","zl `aia","axw")
wxa
^P1STREET("IS","zl `aia","axw`i")
i`wxa
^P1STREET("IS","zl `aia","axw`i yne`l")
l`eny i`wxa
^P1STREET("IS","zl `aia","axweaiu")
uiaewxa
^P1STREET("IS","zl `aia","axwo")
owxa
^P1STREET("IS","zl `aia","axwz")
zwxa
^P1STREET("IS","zl `aia","axy")
yxa
^P1STREET("IS","zl `aia","az blim")
milb za
^P1STREET("IS","zl `aia","az gel")
leg za
^P1STREET("IS","zl `aia","az go")
og za
^P1STREET("IS","zl `aia","az im")
mi za
^P1STREET("IS","zl `aia","az itzg")
gzti za
^P1STREET("IS","zl `aia","az rio")
oir za
^P1STREET("IS","zl `aia","az rni")
inr za
^P1STREET("IS","zl `aia","az vieo")
oeiv za
^P1STREET("IS","zl `aia","az-`l")
l`-za
^P1STREET("IS","zl `aia","b'exb' `lieh")
heil` 'bxe'b
^P1STREET("IS","zl `aia","b`eld")
dle`b
^P1STREET("IS","zl `aia","baelez")
zeleab
^P1STREET("IS","zl `aia","barelim")
milerab
^P1STREET("IS","zl `aia","bareo")
oerab
^P1STREET("IS","zl `aia","barz ao idecd")
dcedi oa zrab
^P1STREET("IS","zl `aia","barz dnexd")
dxend zrab
^P1STREET("IS","zl `aia","barz dzgneyz")
zyengzd zrab
^P1STREET("IS","zl `aia","barz kg")
gk zrab
^P1STREET("IS","zl `aia","barzi")
izrab
^P1STREET("IS","zl `aia","bciy")
yicb
^P1STREET("IS","zl `aia","bclid")
dilcb
^P1STREET("IS","zl `aia","bcp""r")
r"pcb
^P1STREET("IS","zl `aia","bcreo")
oercb
^P1STREET("IS","zl `aia","bcxd")
dxcb
^P1STREET("IS","zl `aia","be`l")
l`eb
^P1STREET("IS","zl `aia","befiwea")
aewifeb
^P1STREET("IS","zl `aia","behleax")
xaelheb
^P1STREET("IS","zl `aia","behlia")
ailheb
^P1STREET("IS","zl `aia","behn`kx")
xk`nheb
^P1STREET("IS","zl `aia","behno pgem")
megp onheb
^P1STREET("IS","zl `aia","belcaxb")
bxacleb
^P1STREET("IS","zl `aia","belct`co")
oc`tcleb
^P1STREET("IS","zl `aia","beli `xizx`d")
d`xzix` ileb
^P1STREET("IS","zl `aia","beli wpid")
dipw ileb
^P1STREET("IS","zl `aia","belipwio")
oiwpileb
^P1STREET("IS","zl `aia","ben`")
`neb
^P1STREET("IS","zl `aia","bepo")
opeb
^P1STREET("IS","zl `aia","betx")
xteb
^P1STREET("IS","zl `aia","bex idecd")
dcedi xeb
^P1STREET("IS","zl `aia","bexceo")
oecxeb
^P1STREET("IS","zl `aia","bexwi")
iwxeb
^P1STREET("IS","zl `aia","bey gla")
alg yeb
^P1STREET("IS","zl `aia","bey rvieo")
oeivr yeb
^P1STREET("IS","zl `aia","bfiz")
zifb
^P1STREET("IS","zl `aia","bfx")
xfb
^P1STREET("IS","zl `aia","biibx")
xbiib
^P1STREET("IS","zl `aia","bipeqx")
xqepib
^P1STREET("IS","zl `aia","bipvaexb")
bxeavpib
^P1STREET("IS","zl `aia","biziz")
zizib
^P1STREET("IS","zl `aia","blalem `xid")
dix` melalb
^P1STREET("IS","zl `aia","bleqw`")
`wqelb
^P1STREET("IS","zl `aia","bleqwio")
oiwqelb
^P1STREET("IS","zl `aia","blfpx")
xpflb
^P1STREET("IS","zl `aia","blivpyhiio")
oiihypvilb
^P1STREET("IS","zl `aia","bliwqaxb")
bxaqwilb
^P1STREET("IS","zl `aia","bliwqeo")
oeqwilb
^P1STREET("IS","zl `aia","blpu liia")
aiil uplb
^P1STREET("IS","zl `aia","blrfx `lide")
edil` xfrlb
^P1STREET("IS","zl `aia","blripiz")
zipirlb
^P1STREET("IS","zl `aia","bppi")
ippb
^P1STREET("IS","zl `aia","bpqio")
oiqpb
^P1STREET("IS","zl `aia","bpzeo")
oezpb
^P1STREET("IS","zl `aia","bry")
yrb
^P1STREET("IS","zl `aia","bx vcw")
wcv xb
^P1STREET("IS","zl `aia","bxefpaxb")
bxapfexb
^P1STREET("IS","zl `aia","bxepino")
onipexb
^P1STREET("IS","zl `aia","bxeqno n`ix")
xi`n onqexb
^P1STREET("IS","zl `aia","bxifim")
mifixb
^P1STREET("IS","zl `aia","bxipaeim")
mieapixb
^P1STREET("IS","zl `aia","bxu")
uxb
^P1STREET("IS","zl `aia","bxyeo")
oeyxb
^P1STREET("IS","zl `aia","bz xineo")
oenix zb
^P1STREET("IS","zl `aia","c""x `axdm xefpyhiio")
oiihypfex mdxa` x"c
^P1STREET("IS","zl `aia","c""x `li zaio")
oiaz il` x"c
^P1STREET("IS","zl `aia","c""x b'exb' q. eiif")
fiie .q 'bxe'b x"c
^P1STREET("IS","zl `aia","c""x irwa kdo")
odk awri x"c
^P1STREET("IS","zl `aia","c""x nyd ktq")
qtk dyn x"c
^P1STREET("IS","zl `aia","c""x nyd wxibx")
xbixw dyn x"c
^P1STREET("IS","zl `aia","c""x wphex")
xehpw x"c
^P1STREET("IS","zl `aia","c""x xez tlc")
clt zex x"c
^P1STREET("IS","zl `aia","c`phd")
dhp`c
^P1STREET("IS","zl `aia","ca bxepx")
xpexb ac
^P1STREET("IS","zl `aia","ca d`efpx")
xpfe`d ac
^P1STREET("IS","zl `aia","ca def")
fed ac
^P1STREET("IS","zl `aia","ca kxni")
inxk ac
^P1STREET("IS","zl `aia","ca nnfxiu")
uixfnn ac
^P1STREET("IS","zl `aia","caexd dpai`d")
d`iapd dxeac
^P1STREET("IS","zl `aia","caxi giim")
miig ixac
^P1STREET("IS","zl `aia","cbo")
obc
^P1STREET("IS","zl `aia","cbpid")
dipbc
^P1STREET("IS","zl `aia","cd d`f")
f`d dc
^P1STREET("IS","zl `aia","cd eipv'i")
i'vpie dc
^P1STREET("IS","zl `aia","cd necipd")
dpicen dc
^P1STREET("IS","zl `aia","cd tib'ehe")
ehe'bit dc
^P1STREET("IS","zl `aia","ceapea")
aepaec
^P1STREET("IS","zl `aia","cec `aico")
ocia` cec
^P1STREET("IS","zl `aia","cec dx`eapi")
ipae`xd cec
^P1STREET("IS","zl `aia","cec gkni")
inkg cec
^P1STREET("IS","zl `aia","cec ilio")
oili cec
^P1STREET("IS","zl `aia","cego")
ogec
^P1STREET("IS","zl `aia","ceic `eiqhxj")
jxhqie` ciec
^P1STREET("IS","zl `aia","ceicwd")
dwciec
^P1STREET("IS","zl `aia","celivwi")
iwvilec
^P1STREET("IS","zl `aia","cepele dxet`")
`texd elepec
^P1STREET("IS","zl `aia","cexeo")
oexec
^P1STREET("IS","zl `aia","cezo")
ozec
^P1STREET("IS","zl `aia","ci xeqi")
iqex ic
^P1STREET("IS","zl `aia","cifpbes")
sebpfic
^P1STREET("IS","zl `aia","cinepd")
dpenic
^P1STREET("IS","zl `aia","ciqpv'iw")
wi'vpqic
^P1STREET("IS","zl `aia","civd")
dvic
^P1STREET("IS","zl `aia","ciw")
wic
^P1STREET("IS","zl `aia","ciyeo")
oeyic
^P1STREET("IS","zl `aia","cm dnkaim")
miaknd mc
^P1STREET("IS","zl `aia","cnihxi yeqhweaiu")
uiaewhqey ixhinc
^P1STREET("IS","zl `aia","cpi`l")
l`ipc
^P1STREET("IS","zl `aia","cpi`l txiy")
yixt l`ipc
^P1STREET("IS","zl `aia","cpio")
oipc
^P1STREET("IS","zl `aia","cre`l")
l`erc
^P1STREET("IS","zl `aia","ctpd")
dptc
^P1STREET("IS","zl `aia","cwl")
lwc
^P1STREET("IS","zl `aia","cxei`pea")
aep`iexc
^P1STREET("IS","zl `aia","cxex")
xexc
^P1STREET("IS","zl `aia","cxiteq")
qetixc
^P1STREET("IS","zl `aia","cxj `iileo")
oelii` jxc
^P1STREET("IS","zl `aia","cxj ao vai")
iav oa jxc
^P1STREET("IS","zl `aia","cxj ax-la giim")
miig al-xa jxc
^P1STREET("IS","zl `aia","cxj dbaexd")
dxeabd jxc
^P1STREET("IS","zl `aia","cxj ddbpd")
dpbdd jxc
^P1STREET("IS","zl `aia","cxj dhiiqim")
miqiihd jxc
^P1STREET("IS","zl `aia","cxj dpvgeo")
oegvpd jxc
^P1STREET("IS","zl `aia","cxj dylem")
melyd jxc
^P1STREET("IS","zl `aia","cxj gil dyxieo")
oeixyd lig jxc
^P1STREET("IS","zl `aia","cxj ite-z""`")
`"z-eti jxc
^P1STREET("IS","zl `aia","cxj lec")
cel jxc
^P1STREET("IS","zl `aia","cxj npgm abio")
oiba mgpn jxc
^P1STREET("IS","zl `aia","cxj nxcki pnix")
xinp ikcxn jxc
^P1STREET("IS","zl `aia","cxj nyd ciio")
oiic dyn jxc
^P1STREET("IS","zl `aia","cxj ylnd qlnd")
[dnlq] dnly jxc
^P1STREET("IS","zl `aia","cyaqwi")
iwqayc
^P1STREET("IS","zl `aia","d` a`iix")
xii`a `d
^P1STREET("IS","zl `aia","d`bcd")
dcb`d
^P1STREET("IS","zl `aia","d`bef")
feb`d
^P1STREET("IS","zl `aia","d`bneo")
oenb`d
^P1STREET("IS","zl `aia","d`ecm")
mce`d
^P1STREET("IS","zl `aia","d`enpim")
mipne`d
^P1STREET("IS","zl `aia","d`epiaxqihd")
dhiqxaipe`d
^P1STREET("IS","zl `aia","d`expim")
mipxe`d
^P1STREET("IS","zl `aia","d`gim nql`eihd")
dhie`lqn mig`d
^P1STREET("IS","zl `aia","d`lend")
dnel`d
^P1STREET("IS","zl `aia","d`nex`im")
mi`xen`d
^P1STREET("IS","zl `aia","d`pbx")
xbp`d
^P1STREET("IS","zl `aia","d`qis")
siq`d
^P1STREET("IS","zl `aia","d`qtxbeq")
qebxtq`d
^P1STREET("IS","zl `aia","d`txqw")
wqxt`d
^P1STREET("IS","zl `aia","d`txzi ieqs")
sqei izxt`d
^P1STREET("IS","zl `aia","d`wlitheq")
qehtilw`d
^P1STREET("IS","zl `aia","d`x""i")
i"x`d
^P1STREET("IS","zl `aia","d`xard")
drax`d
^P1STREET("IS","zl `aia","d`xc")
cx`d
^P1STREET("IS","zl `aia","d`xneo")
oenx`d
^P1STREET("IS","zl `aia","d`ykeliz")
zileky`d
^P1STREET("IS","zl `aia","d`zxeb")
bexz`d
^P1STREET("IS","zl `aia","da`x")
x`ad
^P1STREET("IS","zl `aia","daxeo dixy")
yxid oexad
^P1STREET("IS","zl `aia","daxey")
yexad
^P1STREET("IS","zl `aia","daxfl")
lfxad
^P1STREET("IS","zl `aia","dayo")
oyad
^P1STREET("IS","zl `aia","dbael")
leabd
^P1STREET("IS","zl `aia","dbaex d`lnepi")
ipenl`d xeabd
^P1STREET("IS","zl `aia","dbaexd")
dxeabd
^P1STREET("IS","zl `aia","dbcec draxi")
ixard cecbd
^P1STREET("IS","zl `aia","dbelo")
olebd
^P1STREET("IS","zl `aia","dbiaexim")
mixeaibd
^P1STREET("IS","zl `aia","dbigeo")
oegibd
^P1STREET("IS","zl `aia","dbiiqez")
zeqiibd
^P1STREET("IS","zl `aia","dblaer")
realbd
^P1STREET("IS","zl `aia","dblil")
lilbd
^P1STREET("IS","zl `aia","dblrc")
crlbd
^P1STREET("IS","zl `aia","dbnpqid draxiz")
zixard diqpnbd
^P1STREET("IS","zl `aia","dbpim")
mipbd
^P1STREET("IS","zl `aia","dbto")
otbd
^P1STREET("IS","zl `aia","dbx""`")
`"xbd
^P1STREET("IS","zl `aia","dcbd")
dbcd
^P1STREET("IS","zl `aia","dcbl")
lbcd
^P1STREET("IS","zl `aia","dce`x")
x`ecd
^P1STREET("IS","zl `aia","dcec`im")
mi`cecd
^P1STREET("IS","zl `aia","dceltio")
oitlecd
^P1STREET("IS","zl `aia","dciibim")
mibiicd
^P1STREET("IS","zl `aia","dcneniz")
zinencd
^P1STREET("IS","zl `aia","dcqd")
dqcd
^P1STREET("IS","zl `aia","dcs dieni")
ineid scd
^P1STREET("IS","zl `aia","dcx ieqs")
sqei xcd
^P1STREET("IS","zl `aia","ddbd")
dbdd
^P1STREET("IS","zl `aia","ddcq")
qcdd
^P1STREET("IS","zl `aia","ddglnd")
dnlgdd
^P1STREET("IS","zl `aia","ddlkd")
dkldd
^P1STREET("IS","zl `aia","deaxno")
onxaed
^P1STREET("IS","zl `aia","debe eiwhex")
xehwie ebed
^P1STREET("IS","zl `aia","decid")
diced
^P1STREET("IS","zl `aia","dep`")
`ped
^P1STREET("IS","zl `aia","detiio")
oiited
^P1STREET("IS","zl `aia","dexcvwi")
iwvcxed
^P1STREET("IS","zl `aia","deyr")
ryed
^P1STREET("IS","zl `aia","dfedx")
xdefd
^P1STREET("IS","zl `aia","dff giim")
miig ffd
^P1STREET("IS","zl `aia","dff giim 81")
18 miig ffd
^P1STREET("IS","zl `aia","dfiz")
zifd
^P1STREET("IS","zl `aia","dfnexez")
zexenfd
^P1STREET("IS","zl `aia","dfnix")
xinfd
^P1STREET("IS","zl `aia","dfxm")
mxfd
^P1STREET("IS","zl `aia","dgavlz")
zlvagd
^P1STREET("IS","zl `aia","dgezxim")
mixzegd
^P1STREET("IS","zl `aia","dgfieo")
oeifgd
^P1STREET("IS","zl `aia","dghd")
dhgd
^P1STREET("IS","zl `aia","dglevim")
mivelgd
^P1STREET("IS","zl `aia","dglil")
lilgd
^P1STREET("IS","zl `aia","dgltpim")
miptlgd
^P1STREET("IS","zl `aia","dgva")
avgd
^P1STREET("IS","zl `aia","dgvevxd")
dxvevgd
^P1STREET("IS","zl `aia","dgxea")
aexgd
^P1STREET("IS","zl `aia","dgxeyz")
zyexgd
^P1STREET("IS","zl `aia","dgxneo")
oenxgd
^P1STREET("IS","zl `aia","dgxny")
ynxgd
^P1STREET("IS","zl `aia","dgxviz")
zivxgd
^P1STREET("IS","zl `aia","dgxy")
yxgd
^P1STREET("IS","zl `aia","dgynep`im")
mi`penygd
^P1STREET("IS","zl `aia","dgynl")
lnygd
^P1STREET("IS","zl `aia","dh""f")
f"hd
^P1STREET("IS","zl `aia","dharepim")
miperahd
^P1STREET("IS","zl `aia","dhiilz")
zliihd
^P1STREET("IS","zl `aia","dideci fiq")
qif icedid
^P1STREET("IS","zl `aia","diexd")
dxeid
^P1STREET("IS","zl `aia","diino")
oniid
^P1STREET("IS","zl `aia","diipd diipxij")
jixpiid dpiid
^P1STREET("IS","zl `aia","dikl dzlnec")
cenlzd lkid
^P1STREET("IS","zl `aia","dilcqdiinx")
xniidqclid
^P1STREET("IS","zl `aia","diqec")
ceqid
^P1STREET("IS","zl `aia","diqnio")
oinqid
^P1STREET("IS","zl `aia","dixco")
ocxid
^P1STREET("IS","zl `aia","dixweo")
oewxid
^P1STREET("IS","zl `aia","dixyaiio")
oiiayxid
^P1STREET("IS","zl `aia","dixypaxb")
bxapyxid
^P1STREET("IS","zl `aia","dizc")
czid
^P1STREET("IS","zl `aia","dkeayim")
miyaekd
^P1STREET("IS","zl `aia","dkefxi")
ixfekd
^P1STREET("IS","zl `aia","dkezpd")
dpzekd
^P1STREET("IS","zl `aia","dkiyex")
xeyikd
^P1STREET("IS","zl `aia","dklpiz")
ziplkd
^P1STREET("IS","zl `aia","dkpex")
xepkd
^P1STREET("IS","zl `aia","dkpqz dbceld")
dlecbd zqpkd
^P1STREET("IS","zl `aia","dkxm")
mxkd
^P1STREET("IS","zl `aia","dkxnl")
lnxkd
^P1STREET("IS","zl `aia","dkyxz diyea")
aeyid zxykd
^P1STREET("IS","zl `aia","dlapeo")
oepald
^P1STREET("IS","zl `aia","dlegnim")
mingeld
^P1STREET("IS","zl `aia","dleheq")
qeheld
^P1STREET("IS","zl `aia","dlineo")
oenild
^P1STREET("IS","zl `aia","dll dfwo")
owfd lld
^P1STREET("IS","zl `aia","dlnc d`")
`d cnld
^P1STREET("IS","zl `aia","dlqipwi")
iwpiqld
^P1STREET("IS","zl `aia","dlrpd")
dprld
^P1STREET("IS","zl `aia","dltic")
citld
^P1STREET("IS","zl `aia","dltxio")
oixtld
^P1STREET("IS","zl `aia","dlx")
xld
^P1STREET("IS","zl `aia","dn`aw")
wa`nd
^P1STREET("IS","zl `aia","dn`ixi")
ixi`nd
^P1STREET("IS","zl `aia","dnavrim")
mirvand
^P1STREET("IS","zl `aia","dnbclex")
xelcbnd
^P1STREET("IS","zl `aia","dnbic")
cibnd
^P1STREET("IS","zl `aia","dnbic nceap`")
`paecn cibnd
^P1STREET("IS","zl `aia","dnbild")
dlibnd
^P1STREET("IS","zl `aia","dnbo")
obnd
^P1STREET("IS","zl `aia","dngebd")
dbegnd
^P1STREET("IS","zl `aia","dnkai")
iaknd
^P1STREET("IS","zl `aia","dnkay")
yaknd
^P1STREET("IS","zl `aia","dnl`kd")
dk`lnd
^P1STREET("IS","zl `aia","dnlgim")
miglnd
^P1STREET("IS","zl `aia","dnliu")
uilnd
^P1STREET("IS","zl `aia","dnlj b'exb'")
'bxe'b jlnd
^P1STREET("IS","zl `aia","dnlj gixm")
mxig jlnd
^P1STREET("IS","zl `aia","dnper")
repnd
^P1STREET("IS","zl `aia","dnpex")
xepnd
^P1STREET("IS","zl `aia","dnqbx")
xbqnd
^P1STREET("IS","zl `aia","dnqild")
dliqnd
^P1STREET("IS","zl `aia","dnrxkd")
dkxrnd
^P1STREET("IS","zl `aia","dntxy")
yxtnd
^P1STREET("IS","zl `aia","dnvai`im")
mi`iavnd
^P1STREET("IS","zl `aia","dnvecd")
dcevnd
^P1STREET("IS","zl `aia","dnvto")
otvnd
^P1STREET("IS","zl `aia","dnwver")
revwnd
^P1STREET("IS","zl `aia","dnxc")
cxnd
^P1STREET("IS","zl `aia","dnxkad")
dakxnd
^P1STREET("IS","zl `aia","dnxt`")
`txnd
^P1STREET("IS","zl `aia","dnxu")
uxnd
^P1STREET("IS","zl `aia","dnyaix")
xiaynd
^P1STREET("IS","zl `aia","dnyeh")
heynd
^P1STREET("IS","zl `aia","dnyely")
yleynd
^P1STREET("IS","zl `aia","dnyex")
xeynd
^P1STREET("IS","zl `aia","dnylhim")
mihlynd
^P1STREET("IS","zl `aia","dnynx d`fxgi")
igxf`d xnynd
^P1STREET("IS","zl `aia","dnypd")
dpynd
^P1STREET("IS","zl `aia","dnzpca")
acpznd
^P1STREET("IS","zl `aia","dpai`im")
mi`iapd
^P1STREET("IS","zl `aia","dpal")
lapd
^P1STREET("IS","zl `aia","dpba")
abpd
^P1STREET("IS","zl `aia","dpbxim")
mixbpd
^P1STREET("IS","zl `aia","dpehx")
xhepd
^P1STREET("IS","zl `aia","dpety")
ytepd
^P1STREET("IS","zl `aia","dpgeyz")
zyegpd
^P1STREET("IS","zl `aia","dpivpim")
mipvipd
^P1STREET("IS","zl `aia","dpnl")
lnpd
^P1STREET("IS","zl `aia","dpvia")
aivpd
^P1STREET("IS","zl `aia","dpxiihd qelc")
cleq dhiixpd
^P1STREET("IS","zl `aia","dpxwiq")
qiwxpd
^P1STREET("IS","zl `aia","dpyi`im")
mi`iypd
^P1STREET("IS","zl `aia","dq")
qd
^P1STREET("IS","zl `aia","dqa` nyteld")
dletyn `aqd
^P1STREET("IS","zl `aia","dqaex`im")
mi`xeaqd
^P1STREET("IS","zl `aia","dqcp`")
`pcqd
^P1STREET("IS","zl `aia","dqekpez")
zepkeqd
^P1STREET("IS","zl `aia","dqellim")
milleqd
^P1STREET("IS","zl `aia","dqiito")
otiiqd
^P1STREET("IS","zl `aia","dqiixim")
mixiiqd
^P1STREET("IS","zl `aia","dqkl")
lkqd
^P1STREET("IS","zl `aia","dqpd")
dpqd
^P1STREET("IS","zl `aia","dqtipd")
dpitqd
^P1STREET("IS","zl `aia","draecd")
dceard
^P1STREET("IS","zl `aia","drcrc")
crcrd
^P1STREET("IS","zl `aia","dreba")
aberd
^P1STREET("IS","zl `aia","drebo")
oberd
^P1STREET("IS","zl `aia","drlid")
dilrd
^P1STREET("IS","zl `aia","drliid dypiid")
diipyd diilrd
^P1STREET("IS","zl `aia","drnl")
lnrd
^P1STREET("IS","zl `aia","drxad")
daxrd
^P1STREET("IS","zl `aia","drxneo")
oenxrd
^P1STREET("IS","zl `aia","dtexvim")
mivxetd
^P1STREET("IS","zl `aia","dthiy")
yihtd
^P1STREET("IS","zl `aia","dthno")
onhtd
^P1STREET("IS","zl `aia","dtlj")
jltd
^P1STREET("IS","zl `aia","dtln""g")
g"nltd
^P1STREET("IS","zl `aia","dtpipi icrid")
dirci ipiptd
^P1STREET("IS","zl `aia","dtpipim")
mipiptd
^P1STREET("IS","zl `aia","dtrneo")
oenrtd
^P1STREET("IS","zl `aia","dtxbim")
mibxtd
^P1STREET("IS","zl `aia","dtxcq")
qcxtd
^P1STREET("IS","zl `aia","dtxgim")
migxtd
^P1STREET("IS","zl `aia","dtxhifo dideci")
icedid ofihxtd
^P1STREET("IS","zl `aia","dtxqd")
dqxtd
^P1STREET("IS","zl `aia","dvai")
iavd
^P1STREET("IS","zl `aia","dvax")
xavd
^P1STREET("IS","zl `aia","dvcs")
scvd
^P1STREET("IS","zl `aia","dvextim")
mitxevd
^P1STREET("IS","zl `aia","dviix x`eao")
oae`x xiivd
^P1STREET("IS","zl `aia","dvls")
slvd
^P1STREET("IS","zl `aia","dvpgpim")
mipgpvd
^P1STREET("IS","zl `aia","dvtexo")
oxetvd
^P1STREET("IS","zl `aia","dvtixd")
dxitvd
^P1STREET("IS","zl `aia","dvxi")
ixvd
^P1STREET("IS","zl `aia","dwaxpih")
hipxawd
^P1STREET("IS","zl `aia","dwepbxq")
qxbpewd
^P1STREET("IS","zl `aia","dwiwieo")
oeiwiwd
^P1STREET("IS","zl `aia","dwiyeo")
oeyiwd
^P1STREET("IS","zl `aia","dwlix")
xilwd
^P1STREET("IS","zl `aia","dwlrim")
mirlwd
^P1STREET("IS","zl `aia","dwp`im")
mi`pwd
^P1STREET("IS","zl `aia","dwxid")
dixwd
^P1STREET("IS","zl `aia","dwxo")
oxwd
^P1STREET("IS","zl `aia","dwyz")
zywd
^P1STREET("IS","zl `aia","dx pae")
eap xd
^P1STREET("IS","zl `aia","dx qipi")
ipiq xd
^P1STREET("IS","zl `aia","dx`""y")
y"`xd
^P1STREET("IS","zl `aia","dx`a""r")
r"a`xd
^P1STREET("IS","zl `aia","dx`l")
l`xd
^P1STREET("IS","zl `aia","dxa baifeo")
oefiab axd
^P1STREET("IS","zl `aia","dxa dlx giim")
miig xld axd
^P1STREET("IS","zl `aia","dxa helicpe")
epcileh axd
^P1STREET("IS","zl `aia","dxa ivgw hiia")
aiih wgvi axd
^P1STREET("IS","zl `aia","dxa nfwes")
sewfn axd
^P1STREET("IS","zl `aia","dxa rni`l")
l`inr axd
^P1STREET("IS","zl `aia","dxa txicno")
oncixt axd
^P1STREET("IS","zl `aia","dxa vixlqeo")
oeqlxiv axd
^P1STREET("IS","zl `aia","dxa vrixi")
ixirv axd
^P1STREET("IS","zl `aia","dxa wew")
wew axd
^P1STREET("IS","zl `aia","dxa xiitno")
ontiix axd
^P1STREET("IS","zl `aia","dxai nakxj")
jxkan iaxd
^P1STREET("IS","zl `aia","dxai neihaqw")
wqahien iaxd
^P1STREET("IS","zl `aia","dxai nlilea")
aeliln iaxd
^P1STREET("IS","zl `aia","dxai nnfxiu")
uixfnn iaxd
^P1STREET("IS","zl `aia","dxai ntyiqg`")
`gqiytn iaxd
^P1STREET("IS","zl `aia","dxai nw`xlio")
oilx`wn iaxd
^P1STREET("IS","zl `aia","dxai nwehea")
aehewn iaxd
^P1STREET("IS","zl `aia","dxai nwevw")
wvewn iaxd
^P1STREET("IS","zl `aia","dxaqh wxl")
lxw hqaxd
^P1STREET("IS","zl `aia","dxaxh qne`l")
l`enq hxaxd
^P1STREET("IS","zl `aia","dxces")
secxd
^P1STREET("IS","zl `aia","dxebi nlkez")
zekln ibexd
^P1STREET("IS","zl `aia","dxecieo")
oeicexd
^P1STREET("IS","zl `aia","dxezm")
mzexd
^P1STREET("IS","zl `aia","dxhblq")
qlbhxd
^P1STREET("IS","zl `aia","dxhea")
aehxd
^P1STREET("IS","zl `aia","dxineo")
oenixd
^P1STREET("IS","zl `aia","dxka")
akxd
^P1STREET("IS","zl `aia","dxkai `axdm")
mdxa` iakxd
^P1STREET("IS","zl `aia","dxkaz")
zakxd
^P1STREET("IS","zl `aia","dxky")
ykxd
^P1STREET("IS","zl `aia","dxnlio ieqs")
sqei oilnxd
^P1STREET("IS","zl `aia","dxo")
oxd
^P1STREET("IS","zl `aia","dxu ptzli")
ilztp uxd
^P1STREET("IS","zl `aia","dxveb")
bevxd
^P1STREET("IS","zl `aia","dxvl")
lvxd
^P1STREET("IS","zl `aia","dxvl xefpalem")
melapfex lvxd
^P1STREET("IS","zl `aia","dxvtlc")
cltvxd
^P1STREET("IS","zl `aia","dxweo")
oewxd
^P1STREET("IS","zl `aia","dxwtz")
ztwxd
^P1STREET("IS","zl `aia","dxxi")
ixxd
^P1STREET("IS","zl `aia","dy""j")
j"yd
^P1STREET("IS","zl `aia","dyaelz")
zleayd
^P1STREET("IS","zl `aia","dyard")
drayd
^P1STREET("IS","zl `aia","dyenx")
xneyd
^P1STREET("IS","zl `aia","dyenxeo")
oexneyd
^P1STREET("IS","zl `aia","dyeth petj")
jtep hteyd
^P1STREET("IS","zl `aia","dyethim")
mihteyd
^P1STREET("IS","zl `aia","dyetx")
xteyd
^P1STREET("IS","zl `aia","dyew")
weyd
^P1STREET("IS","zl `aia","dygs")
sgyd
^P1STREET("IS","zl `aia","dygwpim")
mipwgyd
^P1STREET("IS","zl `aia","dygx")
xgyd
^P1STREET("IS","zl `aia","dyihd")
dhiyd
^P1STREET("IS","zl `aia","dyiixez")
zexiiyd
^P1STREET("IS","zl `aia","dyiteo")
oetiyd
^P1STREET("IS","zl `aia","dykl")
lkyd
^P1STREET("IS","zl `aia","dyl""d")
d"lyd
^P1STREET("IS","zl `aia","dyleg")
gelyd
^P1STREET("IS","zl `aia","dyleyd")
dyelyd
^P1STREET("IS","zl `aia","dypiz")
zipyd
^P1STREET("IS","zl `aia","dyrexd")
dxeryd
^P1STREET("IS","zl `aia","dytld")
dltyd
^P1STREET("IS","zl `aia","dywnd")
dnwyd
^P1STREET("IS","zl `aia","dyxaih")
hiaxyd
^P1STREET("IS","zl `aia","dyxeo")
oexyd
^P1STREET("IS","zl `aia","dz`pd")
dp`zd
^P1STREET("IS","zl `aia","dzaepim")
mipeazd
^P1STREET("IS","zl `aia","dzaex")
xeazd
^P1STREET("IS","zl `aia","dzexo")
oxezd
^P1STREET("IS","zl `aia","dzgid")
digzd
^P1STREET("IS","zl `aia","dznx")
xnzd
^P1STREET("IS","zl `aia","dzp`im")
mi`pzd
^P1STREET("IS","zl `aia","dzpetd")
dtepzd
^P1STREET("IS","zl `aia","dzpi`")
`ipzd
^P1STREET("IS","zl `aia","dzr""y")
y"rzd
^P1STREET("IS","zl `aia","dzrecd d`cend")
dnec`d dcerzd
^P1STREET("IS","zl `aia","dzrxekd")
dkexrzd
^P1STREET("IS","zl `aia","dzryid")
diyrzd
^P1STREET("IS","zl `aia","dzwed")
dewzd
^P1STREET("IS","zl `aia","dzwend")
dnewzd
^P1STREET("IS","zl `aia","dzyrim eyly")
ylye miryzd
^P1STREET("IS","zl `aia","eecb'eec")
cee'bcee
^P1STREET("IS","zl `aia","eelno liia idecd")
dcedi aiil onlee
^P1STREET("IS","zl `aia","eeltqeo")
oeqtlee
^P1STREET("IS","zl `aia","eeqxno")
onxqee
^P1STREET("IS","zl `aia","eexnifd")
dfinxee
^P1STREET("IS","zl `aia","eifl")
lfie
^P1STREET("IS","zl `aia","eihl giim")
miig lhie
^P1STREET("IS","zl `aia","eihpaxb l`e ivgw")
wgvi e`l bxaphie
^P1STREET("IS","zl `aia","eiiq")
qiie
^P1STREET("IS","zl `aia","eiiq irwa")
awri qiie
^P1STREET("IS","zl `aia","eildlm tlcxno")
onxclt mldlie
^P1STREET("IS","zl `aia","eileo")
oelie
^P1STREET("IS","zl `aia","eilp`")
`plie
^P1STREET("IS","zl `aia","eilqeo")
oeqlie
^P1STREET("IS","zl `aia","eipbiih")
hiibpie
^P1STREET("IS","zl `aia","eipyhiio pgem")
megp oiihypie
^P1STREET("IS","zl `aia","eiqaexb")
bxeaqie
^P1STREET("IS","zl `aia","eiqevwi")
iwveqie
^P1STREET("IS","zl `aia","eivno")
onvie
^P1STREET("IS","zl `aia","eizwio")
oiwzie
^P1STREET("IS","zl `aia","ekhpbea")
aebphke
^P1STREET("IS","zl `aia","elpqid")
diqple
^P1STREET("IS","zl `aia","ericz wheaiu")
uiaehw zcire
^P1STREET("IS","zl `aia","exaexb")
bxeaxe
^P1STREET("IS","zl `aia","exc")
cxe
^P1STREET("IS","zl `aia","exci`l")
l`icxe
^P1STREET("IS","zl `aia","exyaqwi")
iwqayxe
^P1STREET("IS","zl `aia","eziw")
wize
^P1STREET("IS","zl `aia","f'aehipqwi")
iwqpihea'f
^P1STREET("IS","zl `aia","f'o f'exq")
qxe'f o'f
^P1STREET("IS","zl `aia","f`a")
a`f
^P1STREET("IS","zl `aia","f`a xkhx")
xhkx a`f
^P1STREET("IS","zl `aia","fac")
caf
^P1STREET("IS","zl `aia","faeleo")
oeleaf
^P1STREET("IS","zl `aia","felvx")
xvlef
^P1STREET("IS","zl `aia","fhexi")
ixehf
^P1STREET("IS","zl `aia","fiblaeim")
miealbif
^P1STREET("IS","zl `aia","fie xawd")
dwax eif
^P1STREET("IS","zl `aia","fino ieqs")
sqei onif
^P1STREET("IS","zl `aia","fiwim")
miwif
^P1STREET("IS","zl `aia","fkez nyd")
dyn zekf
^P1STREET("IS","zl `aia","fkxeo irwa")
awri oexkf
^P1STREET("IS","zl `aia","fkxeo wceyim")
miyecw oexkf
^P1STREET("IS","zl `aia","fkxid")
dixkf
^P1STREET("IS","zl `aia","fkxipi")
ipixkf
^P1STREET("IS","zl `aia","fleviqhi")
ihqivelf
^P1STREET("IS","zl `aia","flflz")
zlflf
^P1STREET("IS","zl `aia","flhetelqwi")
iwqletehlf
^P1STREET("IS","zl `aia","fliapqwi cec dlei")
ield cec iwqpailf
^P1STREET("IS","zl `aia","flib")
bilf
^P1STREET("IS","zl `aia","flibno nwq")
qwn onbilf
^P1STREET("IS","zl `aia","flno yf""x")
x"fy onlf
^P1STREET("IS","zl `aia","flno ypi`ex")
xe`ipy onlf
^P1STREET("IS","zl `aia","fnpdes")
sedpnf
^P1STREET("IS","zl `aia","fpbail")
liabpf
^P1STREET("IS","zl `aia","fxeaal")
laaexf
^P1STREET("IS","zl `aia","fxg")
gxf
^P1STREET("IS","zl `aia","fxivwi")
iwvixf
^P1STREET("IS","zl `aia","fxrim")
mirxf
^P1STREET("IS","zl `aia","gaia `aylem")
melya` aiag
^P1STREET("IS","zl `aia","gaiad xiiw")
wiix daiag
^P1STREET("IS","zl `aia","gawew")
wewag
^P1STREET("IS","zl `aia","gawio")
oiwag
^P1STREET("IS","zl `aia","gax dl`enim")
mine`ld xag
^P1STREET("IS","zl `aia","gaxd gcyd")
dycg dxag
^P1STREET("IS","zl `aia","gaxeo")
oexag
^P1STREET("IS","zl `aia","gaxz y""q")
q"y zxag
^P1STREET("IS","zl `aia","gayey giim")
miig yeyag
^P1STREET("IS","zl `aia","gbi")
ibg
^P1STREET("IS","zl `aia","gcxd")
dxcg
^P1STREET("IS","zl `aia","geaai vieo")
oeiv iaaeg
^P1STREET("IS","zl `aia","geaez dlaaez")
zeaald zeaeg
^P1STREET("IS","zl `aia","gelcd")
dcleg
^P1STREET("IS","zl `aia","gend enbcl")
lcbne dneg
^P1STREET("IS","zl `aia","gepi dnrbl")
lbrnd ipeg
^P1STREET("IS","zl `aia","geqo")
oqeg
^P1STREET("IS","zl `aia","gexyz dbaexim")
mixeabd zyxeg
^P1STREET("IS","zl `aia","gfeo `iy")
yi` oefg
^P1STREET("IS","zl `aia","gfpeaiu")
uiaepfg
^P1STREET("IS","zl `aia","gfw")
wfg
^P1STREET("IS","zl `aia","gfwide dnlj")
jlnd ediwfg
^P1STREET("IS","zl `aia","gi ao hea")
aeh oa ig
^P1STREET("IS","zl `aia","gi""m")
m"ig
^P1STREET("IS","zl `aia","gi""y")
y"ig
^P1STREET("IS","zl `aia","giceyi dxi""n")
n"ixd iyecig
^P1STREET("IS","zl `aia","gieb idecd")
dcedi beig
^P1STREET("IS","zl `aia","giezno")
onzeig
^P1STREET("IS","zl `aia","gii `cm")
mc` iig
^P1STREET("IS","zl `aia","giiai nyd")
dyn iaiig
^P1STREET("IS","zl `aia","giim")
miig
^P1STREET("IS","zl `aia","giim dff")
ffd miig
^P1STREET("IS","zl `aia","giim e`liyr")
ryil`e miig
^P1STREET("IS","zl `aia","giim lapeo")
oepal miig
^P1STREET("IS","zl `aia","gile")
elig
^P1STREET("IS","zl `aia","gippiz")
zippig
^P1STREET("IS","zl `aia","giqio")
oiqig
^P1STREET("IS","zl `aia","gixezpe")
epzexig
^P1STREET("IS","zl `aia","gkim `lide")
edil` mikg
^P1STREET("IS","zl `aia","gkni `zepd")
dpez` inkg
^P1STREET("IS","zl `aia","gkni pxaepd")
dpeaxp inkg
^P1STREET("IS","zl `aia","gkni wixe`o")
o`exiw inkg
^P1STREET("IS","zl `aia","glniz")
zinlg
^P1STREET("IS","zl `aia","glu")
ulg
^P1STREET("IS","zl `aia","gpd qpy")
ypq dpg
^P1STREET("IS","zl `aia","gpd xeaip`")
`piaex dpg
^P1STREET("IS","zl `aia","gpej")
jepg
^P1STREET("IS","zl `aia","gpizd")
dzipg
^P1STREET("IS","zl `aia","gppid")
dippg
^P1STREET("IS","zl `aia","gpwio")
oiwpg
^P1STREET("IS","zl `aia","gqici d`enez")
zene`d iciqg
^P1STREET("IS","zl `aia","gtu giim")
miig utg
^P1STREET("IS","zl `aia","gtx")
xtg
^P1STREET("IS","zl `aia","gtyi cec")
cec iytg
^P1STREET("IS","zl `aia","gvex")
xevg
^P1STREET("IS","zl `aia","gvix")
xivg
^P1STREET("IS","zl `aia","gvxim")
mixvg
^P1STREET("IS","zl `aia","gxeu")
uexg
^P1STREET("IS","zl `aia","gxis `iifiw")
wifii` sixg
^P1STREET("IS","zl `aia","gyeo")
oeyg
^P1STREET("IS","zl `aia","gzm qetx")
xteq mzg
^P1STREET("IS","zl `aia","h`bex")
xeb`h
^P1STREET("IS","zl `aia","haiea")
aeiah
^P1STREET("IS","zl `aia","haxid")
dixah
^P1STREET("IS","zl `aia","haxqwi")
iwqxah
^P1STREET("IS","zl `aia","haz")
zah
^P1STREET("IS","zl `aia","hdeo ideyr")
ryedi oedh
^P1STREET("IS","zl `aia","heaid dxet`")
`texd diaeh
^P1STREET("IS","zl `aia","heaim")
miaeh
^P1STREET("IS","zl `aia","helef")
feleh
^P1STREET("IS","zl `aia","helweaqwi")
iwqaewleh
^P1STREET("IS","zl `aia","heqwpipi")
ipipwqeh
^P1STREET("IS","zl `aia","hex nlk`")
`kln xeh
^P1STREET("IS","zl `aia","hexhyipx")
xpiyhxeh
^P1STREET("IS","zl `aia","hexi fda")
adf ixeh
^P1STREET("IS","zl `aia","hexwea")
aewxeh
^P1STREET("IS","zl `aia","hibx dil")
lid xbih
^P1STREET("IS","zl `aia","hienwio")
oiwneih
^P1STREET("IS","zl `aia","hixz vai")
iav zxih
^P1STREET("IS","zl `aia","hlneo")
oenlh
^P1STREET("IS","zl `aia","hxentlcex")
xecltnexh
^P1STREET("IS","zl `aia","hxihy")
yhixh
^P1STREET("IS","zl `aia","hxteo")
oetxh
^P1STREET("IS","zl `aia","hyxp`")
`pxyh
^P1STREET("IS","zl `aia","hyxpigeaqwi")
iwqaegipxyh
^P1STREET("IS","zl `aia","i.l. txu")
uxt .l.i
^P1STREET("IS","zl `aia","i`ix")
xi`i
^P1STREET("IS","zl `aia","i`ix xefpalem")
melapfex xi`i
^P1STREET("IS","zl `aia","i`ix yhxo")
oxhy xi`i
^P1STREET("IS","zl `aia","ializ")
zilai
^P1STREET("IS","zl `aia","iapd")
dpai
^P1STREET("IS","zl `aia","iapi`l")
l`ipai
^P1STREET("IS","zl `aia","ib`l")
l`bi
^P1STREET("IS","zl `aia","ib`l `leo")
oel` l`bi
^P1STREET("IS","zl `aia","ib`l neqipfeo")
oefpiqen l`bi
^P1STREET("IS","zl `aia","ibex")
xebi
^P1STREET("IS","zl `aia","ibir ktiim")
miitk ribi
^P1STREET("IS","zl `aia","ic dnraix")
xiarnd ci
^P1STREET("IS","zl `aia","ic gxevim")
mivexg ci
^P1STREET("IS","zl `aia","ic ylem")
mely ci
^P1STREET("IS","zl `aia","icic dgelez")
zelegd cici
^P1STREET("IS","zl `aia","ide`y")
y`edi
^P1STREET("IS","zl `aia","idecd dgqic")
ciqgd dcedi
^P1STREET("IS","zl `aia","idecd diniz")
zinid dcedi
^P1STREET("IS","zl `aia","idecd dlei")
ield dcedi
^P1STREET("IS","zl `aia","idecd dnkai")
iaknd dcedi
^P1STREET("IS","zl `aia","idecd dpyi`")
`iypd dcedi
^P1STREET("IS","zl `aia","idecd liia axqwi")
iwqxa aiil dcedi
^P1STREET("IS","zl `aia","idepzo")
ozpedi
^P1STREET("IS","zl `aia","ideyr ao peo")
oep oa ryedi
^P1STREET("IS","zl `aia","ideyr axhepea")
aepehxa ryedi
^P1STREET("IS","zl `aia","ideyr dzlni")
inlzd ryedi
^P1STREET("IS","zl `aia","idll")
lldi
^P1STREET("IS","zl `aia","ie`a")
a`ei
^P1STREET("IS","zl `aia","ie`l")
l`ei
^P1STREET("IS","zl `aia","iealim")
milaei
^P1STREET("IS","zl `aia","iectz")
ztcei
^P1STREET("IS","zl `aia","ieeo nveld")
dlevn oeei
^P1STREET("IS","zl `aia","iegpo dbci")
icbd opgei
^P1STREET("IS","zl `aia","iegpo dexwpeq")
qepwxed opgei
^P1STREET("IS","zl `aia","iegpo dqpclx")
xlcpqd opgei
^P1STREET("IS","zl `aia","iekac az nxim")
mixn za cakei
^P1STREET("IS","zl `aia","iem hea")
aeh mei
^P1STREET("IS","zl `aia","iepca")
acpei
^P1STREET("IS","zl `aia","iepd dpai`")
`iapd dpei
^P1STREET("IS","zl `aia","iepivno")
onvipei
^P1STREET("IS","zl `aia","iepzo detqi")
iqted ozpei
^P1STREET("IS","zl `aia","ieqh")
hqei
^P1STREET("IS","zl `aia","ieqi ao ieqi")
iqei oa iqei
^P1STREET("IS","zl `aia","ieqs cd ld xiipd")
dpiix dl dc sqei
^P1STREET("IS","zl `aia","ieqs dpyi`")
`iypd sqei
^P1STREET("IS","zl `aia","ieqs ifxr`li")
il`rxfi sqei
^P1STREET("IS","zl `aia","ieqs nile`")
`elin sqei
^P1STREET("IS","zl `aia","ieqs w`xe")
ex`w sqei
^P1STREET("IS","zl `aia","ierfx `iy daixd")
dxiad yi` xfrei
^P1STREET("IS","zl `aia","iexci dqixd")
dxiqd icxei
^P1STREET("IS","zl `aia","iexm")
mxei
^P1STREET("IS","zl `aia","ifdx")
xdfi
^P1STREET("IS","zl `aia","igfw`l")
l`wfgi
^P1STREET("IS","zl `aia","igfw`l yhxiikno")
onkiixhy l`wfgi
^P1STREET("IS","zl `aia","igi`l ca cxfpx")
xpfxc ac l`igi
^P1STREET("IS","zl `aia","igi`li")
il`igi
^P1STREET("IS","zl `aia","igirm")
mrigi
^P1STREET("IS","zl `aia","ihaz")
zahi
^P1STREET("IS","zl `aia","ikio")
oiki
^P1STREET("IS","zl `aia","ilio")
oili
^P1STREET("IS","zl `aia","ilio nex pzo")
ozp xen oili
^P1STREET("IS","zl `aia","ilweh dxerim")
mirexd hewli
^P1STREET("IS","zl `aia","im qes")
seq mi
^P1STREET("IS","zl `aia","inio")
oini
^P1STREET("IS","zl `aia","ipeo")
oepi
^P1STREET("IS","zl `aia","ipia")
aipi
^P1STREET("IS","zl `aia","iqec dnrld")
dlrnd ceqi
^P1STREET("IS","zl `aia","iqrex")
xerqi
^P1STREET("IS","zl `aia","irau")
uari
^P1STREET("IS","zl `aia","irl")
lri
^P1STREET("IS","zl `aia","irwa")
awri
^P1STREET("IS","zl `aia","irwa eipyl")
lypie awri
^P1STREET("IS","zl `aia","irwa fxeaal")
laaexf awri
^P1STREET("IS","zl `aia","irwa gfo")
ofg awri
^P1STREET("IS","zl `aia","irwa nxicex")
xecixn awri
^P1STREET("IS","zl `aia","itd pes")
sep dti
^P1STREET("IS","zl `aia","itrz")
zrti
^P1STREET("IS","zl `aia","itxg")
gxti
^P1STREET("IS","zl `aia","itz")
zti
^P1STREET("IS","zl `aia","itzg")
gzti
^P1STREET("IS","zl `aia","ivgw `lgpo")
opgl` wgvi
^P1STREET("IS","zl `aia","ivgw ayaiq fipbx")
xbpif qiaya wgvi
^P1STREET("IS","zl `aia","ivgw hapwio")
oiwpah wgvi
^P1STREET("IS","zl `aia","ivgw wvplqeo")
oeqlpvw wgvi
^P1STREET("IS","zl `aia","ivgw ycd")
dcy wgvi
^P1STREET("IS","zl `aia","ivi`z `ixetd")
dtexi` z`ivi
^P1STREET("IS","zl `aia","iviu")
uivi
^P1STREET("IS","zl `aia","iwezi`l")
l`izewi
^P1STREET("IS","zl `aia","iwipheo")
oehpiwi
^P1STREET("IS","zl `aia","iwprm")
mrpwi
^P1STREET("IS","zl `aia","ixalem nxw")
wxn melaxi
^P1STREET("IS","zl `aia","ixeylni")
inlyexi
^P1STREET("IS","zl `aia","ixgip`i yne`l")
l`eny i`pigxi
^P1STREET("IS","zl `aia","ixige")
egixi
^P1STREET("IS","zl `aia","ixnide")
edinxi
^P1STREET("IS","zl `aia","iy""x nwpci`")
`icpwn x"yi
^P1STREET("IS","zl `aia","iyd gtu")
utg dyi
^P1STREET("IS","zl `aia","iyexeo")
oexeyi
^P1STREET("IS","zl `aia","iyiaz eelefio")
oifelee zaiyi
^P1STREET("IS","zl `aia","iykeo")
oekyi
^P1STREET("IS","zl `aia","iyride")
ediryi
^P1STREET("IS","zl `aia","iyride `axj")
jxa` ediryi
^P1STREET("IS","zl `aia","iyx`l a""w")
w"a l`xyi
^P1STREET("IS","zl `aia","iyx`l blili")
ililb l`xyi
^P1STREET("IS","zl `aia","iyx`l pb'`xd")
dx`'bp l`xyi
^P1STREET("IS","zl `aia","iyx`liq")
qil`xyi
^P1STREET("IS","zl `aia","iyxy")
yxyi
^P1STREET("IS","zl `aia","k""h apeanax")
xanaepa h"k
^P1STREET("IS","zl `aia","k""u irwa ieqs")
sqei awri u"k
^P1STREET("IS","zl `aia","kaix")
xiak
^P1STREET("IS","zl `aia","kdo dxno")
onxd odk
^P1STREET("IS","zl `aia","kdpyhm")
mhypdk
^P1STREET("IS","zl `aia","kekai ivgw")
wgvi iakek
^P1STREET("IS","zl `aia","kexfim")
mifxek
^P1STREET("IS","zl `aia","kexy")
yxek
^P1STREET("IS","zl `aia","kiqetim")
miteqik
^P1STREET("IS","zl `aia","kkx cifpbes")
sebpfic xkk
^P1STREET("IS","zl `aia","kkx daind")
dniad xkk
^P1STREET("IS","zl `aia","kkx dil")
lid xkk
^P1STREET("IS","zl `aia","kkx dqekpez")
zepkeqd xkk
^P1STREET("IS","zl `aia","kkx ivgw xaio")
oiax wgvi xkk
^P1STREET("IS","zl `aia","kkx lepceo")
oecpel xkk
^P1STREET("IS","zl `aia","kkx nik`lq")
ql`kin xkk
^P1STREET("IS","zl `aia","kkx pnix")
xinp xkk
^P1STREET("IS","zl `aia","kkx wcenim")
minecw xkk
^P1STREET("IS","zl `aia","kl iyx`l gaxim")
mixag l`xyi lk
^P1STREET("IS","zl `aia","kpti pyxim")
mixyp itpk
^P1STREET("IS","zl `aia","kpxz")
zxpk
^P1STREET("IS","zl `aia","kqle")
elqk
^P1STREET("IS","zl `aia","ktx blrci")
icrlb xtk
^P1STREET("IS","zl `aia","ktx iepd")
dpei xtk
^P1STREET("IS","zl `aia","ktx qa`")
`aq xtk
^P1STREET("IS","zl `aia","kxm dzinpim")
mipnizd mxk
^P1STREET("IS","zl `aia","kxm gnc")
cng mxk
^P1STREET("IS","zl `aia","kxni")
inxk
^P1STREET("IS","zl `aia","kxnid")
dinxk
^P1STREET("IS","zl `aia","kxnliz")
zilnxk
^P1STREET("IS","zl `aia","l`d")
d`l
^P1STREET("IS","zl `aia","l`eo tiio")
oiit oe`l
^P1STREET("IS","zl `aia","l`o `'")
'` o`l
^P1STREET("IS","zl `aia","l`o a'")
'a o`l
^P1STREET("IS","zl `aia","la `axdm")
mdxa` al
^P1STREET("IS","zl `aia","la tiio")
oiit al
^P1STREET("IS","zl `aia","laephio")
oihpeal
^P1STREET("IS","zl `aia","lalea")
aelal
^P1STREET("IS","zl `aia","lapcd")
dcpal
^P1STREET("IS","zl `aia","lapceaqwi")
iwqaecpal
^P1STREET("IS","zl `aia","lapepiz dges")
segd zipepal
^P1STREET("IS","zl `aia","ld bxcid")
dicxb dl
^P1STREET("IS","zl `aia","ld nxhio")
oihxn dl
^P1STREET("IS","zl `aia","le`i tqhx")
xhqt i`el
^P1STREET("IS","zl `aia","leahwio vaid")
diav oiwhael
^P1STREET("IS","zl `aia","leceitel")
letiecel
^P1STREET("IS","zl `aia","lefim")
mifel
^P1STREET("IS","zl `aia","legni bliteli")
iletilb ingel
^P1STREET("IS","zl `aia","lehm")
mhel
^P1STREET("IS","zl `aia","lei `ykel")
leky` iel
^P1STREET("IS","zl `aia","lei ivgw")
wgvi iel
^P1STREET("IS","zl `aia","leic b'exb'")
'bxe'b ciel
^P1STREET("IS","zl `aia","leihd")
dhiel
^P1STREET("IS","zl `aia","leiho")
ohiel
^P1STREET("IS","zl `aia","leio witpiq")
qiptiw oiel
^P1STREET("IS","zl `aia","leipqwi")
iwqpiel
^P1STREET("IS","zl `aia","lepu")
upel
^P1STREET("IS","zl `aia","ler d`xi")
ix`d rel
^P1STREET("IS","zl `aia","lexi`")
`ixel
^P1STREET("IS","zl `aia","lg""i")
i"gl
^P1STREET("IS","zl `aia","lgeax")
xaegl
^P1STREET("IS","zl `aia","lhxiq")
qixhl
^P1STREET("IS","zl `aia","li`epxc axpyhiio")
oiihypxa cxpe`il
^P1STREET("IS","zl `aia","liapd `lirfx")
xfril` dpail
^P1STREET("IS","zl `aia","liaxno")
onxail
^P1STREET("IS","zl `aia","liepceaqwi")
iwqaecpeil
^P1STREET("IS","zl `aia","liieeiw")
wieeiil
^P1STREET("IS","zl `aia","liliio")
oiilil
^P1STREET("IS","zl `aia","lilipalem")
melapilil
^P1STREET("IS","zl `aia","lipwelo")
olewpil
^P1STREET("IS","zl `aia","liqio")
oiqil
^P1STREET("IS","zl `aia","litqwi")
iwqtil
^P1STREET("IS","zl `aia","liy")
yil
^P1STREET("IS","zl `aia","lkiy")
yikl
^P1STREET("IS","zl `aia","lnco")
ocnl
^P1STREET("IS","zl `aia","lne`l")
l`enl
^P1STREET("IS","zl `aia","lnxhio")
oihxnl
^P1STREET("IS","zl `aia","lql")
lql
^P1STREET("IS","zl `aia","lqwea giim")
miig aewql
^P1STREET("IS","zl `aia","lqwx")
xwql
^P1STREET("IS","zl `aia","lticez")
zecitl
^P1STREET("IS","zl `aia","ltio")
oitl
^P1STREET("IS","zl `aia","lvxeq nyd")
dyn qexvl
^P1STREET("IS","zl `aia","lwxh")
hxwl
^P1STREET("IS","zl `aia","lym")
myl
^P1STREET("IS","zl `aia","n`d yrxim")
mixry d`n
^P1STREET("IS","zl `aia","n`ex dbeld")
dlebd xe`n
^P1STREET("IS","zl `aia","n`ex ripim")
mipir xe`n
^P1STREET("IS","zl `aia","n`ix irxi")
ixri xi`n
^P1STREET("IS","zl `aia","n`ix nxbliz")
zilbxn xi`n
^P1STREET("IS","zl `aia","n`ixax")
xaxi`n
^P1STREET("IS","zl `aia","n`pd")
dp`n
^P1STREET("IS","zl `aia","n`te")
et`n
^P1STREET("IS","zl `aia","nae` bilz")
zlib `ean
^P1STREET("IS","zl `aia","nae` bpibx")
xbipb `ean
^P1STREET("IS","zl `aia","nae` brzeo")
oezrb `ean
^P1STREET("IS","zl `aia","nae` bxetiz")
zitexb `ean
^P1STREET("IS","zl `aia","nae` eelwx")
xwlee `ean
^P1STREET("IS","zl `aia","nagx")
xgan
^P1STREET("IS","zl `aia","nahgim")
mighan
^P1STREET("IS","zl `aia","navr wcy")
ycw rvan
^P1STREET("IS","zl `aia","nawirim")
miriwan
^P1STREET("IS","zl `aia","nayx")
xyan
^P1STREET("IS","zl `aia","nbcl")
lcbn
^P1STREET("IS","zl `aia","nbcl yxyo")
oyxy lcbn
^P1STREET("IS","zl `aia","nbice")
ecibn
^P1STREET("IS","zl `aia","nbo `axdm")
mdxa` obn
^P1STREET("IS","zl `aia","nbyinim")
miniybn
^P1STREET("IS","zl `aia","nc' `pcxenicd")
dcinexcp` 'cn
^P1STREET("IS","zl `aia","ncxy tpgq")
qgpt yxcn
^P1STREET("IS","zl `aia","ncxy zpgen`")
`negpz yxcn
^P1STREET("IS","zl `aia","ndx""l")
l"xdn
^P1STREET("IS","zl `aia","ndxy""`")
`"yxdn
^P1STREET("IS","zl `aia","necili`pi")
ip`ilicen
^P1STREET("IS","zl `aia","necirio")
oiricen
^P1STREET("IS","zl `aia","nedliax")
xailden
^P1STREET("IS","zl `aia","nefix")
xifen
^P1STREET("IS","zl `aia","nefq pg eidecd")
dcedie gp qfen
^P1STREET("IS","zl `aia","nehd bex")
xeb dhen
^P1STREET("IS","zl `aia","nei`l yne`l")
l`eny l`ien
^P1STREET("IS","zl `aia","nelcz")
zclen
^P1STREET("IS","zl `aia","nelke ylnd")
dnly eklen
^P1STREET("IS","zl `aia","nep`y")
y`pen
^P1STREET("IS","zl `aia","nephitiexi")
ixeitihpen
^P1STREET("IS","zl `aia","neqipfeo")
oefpiqen
^P1STREET("IS","zl `aia","nev`")
`ven
^P1STREET("IS","zl `aia","nevwio")
oiwven
^P1STREET("IS","zl `aia","newci nyd")
dyn icwen
^P1STREET("IS","zl `aia","nex")
xen
^P1STREET("IS","zl `aia","nexci dbh`ez")
ze`hbd icxen
^P1STREET("IS","zl `aia","nexd paekim")
mikeap dxen
^P1STREET("IS","zl `aia","nexiu cpi`l")
l`ipc uixen
^P1STREET("IS","zl `aia","nexyz")
zyxen
^P1STREET("IS","zl `aia","neyir")
riyen
^P1STREET("IS","zl `aia","nf`""d")
d"`fn
^P1STREET("IS","zl `aia","nfl `xid")
dix` lfn
^P1STREET("IS","zl `aia","nfl azeld")
dleza lfn
^P1STREET("IS","zl `aia","nfl bci")
icb lfn
^P1STREET("IS","zl `aia","nfl cbim")
mibc lfn
^P1STREET("IS","zl `aia","nfl cli")
ilc lfn
^P1STREET("IS","zl `aia","nfl hld")
dlh lfn
^P1STREET("IS","zl `aia","nfl n`fpiim")
miipf`n lfn
^P1STREET("IS","zl `aia","nfl qxho")
ohxq lfn
^P1STREET("IS","zl `aia","nfl rwxa")
axwr lfn
^P1STREET("IS","zl `aia","nfl wyz")
zyw lfn
^P1STREET("IS","zl `aia","nfl yex")
xey lfn
^P1STREET("IS","zl `aia","nfl z`enim")
mine`z lfn
^P1STREET("IS","zl `aia","nfxgi")
igxfn
^P1STREET("IS","zl `aia","ng""l")
l"gn
^P1STREET("IS","zl `aia","ngpd ieqs")
sqei dpgn
^P1STREET("IS","zl `aia","ngpiim")
miipgn
^P1STREET("IS","zl `aia","ngxefz")
zfexgn
^P1STREET("IS","zl `aia","nheld")
dlehn
^P1STREET("IS","zl `aia","nhilcd bf")
fb dclihn
^P1STREET("IS","zl `aia","nhleo")
oelhn
^P1STREET("IS","zl `aia","nhneo kdo")
odk oenhn
^P1STREET("IS","zl `aia","nif`o")
o`fin
^P1STREET("IS","zl `aia","nifl flno")
onlf lfin
^P1STREET("IS","zl `aia","niha")
ahin
^P1STREET("IS","zl `aia","nik""l")
l"kin
^P1STREET("IS","zl `aia","nik`l `pb'le")
el'bp` l`kin
^P1STREET("IS","zl `aia","nikd")
dkin
^P1STREET("IS","zl `aia","nineo")
oenin
^P1STREET("IS","zl `aia","nipid nxicex")
xecixn dipin
^P1STREET("IS","zl `aia","nipu")
upin
^P1STREET("IS","zl `aia","nipweaqwi")
iwqaewpin
^P1STREET("IS","zl `aia","nivwaiu `cm")
mc` uiawvin
^P1STREET("IS","zl `aia","niwepiq yne`l")
l`eny qipewin
^P1STREET("IS","zl `aia","nixeo")
oexin
^P1STREET("IS","zl `aia","niy`l")
l`yin
^P1STREET("IS","zl `aia","nkll ieti")
itei llkn
^P1STREET("IS","zl `aia","nknexz")
zxenkn
^P1STREET("IS","zl `aia","nl""o")
o"ln
^P1STREET("IS","zl `aia","nl`ki")
ik`ln
^P1STREET("IS","zl `aia","nlaim")
mialn
^P1STREET("IS","zl `aia","nlilez")
zeliln
^P1STREET("IS","zl `aia","nlki iyx`l")
l`xyi ikln
^P1STREET("IS","zl `aia","nlv'h")
h'vln
^P1STREET("IS","zl `aia","nlwey")
yewln
^P1STREET("IS","zl `aia","npbx")
xbpn
^P1STREET("IS","zl `aia","npcli nekx qtxim")
mixtq xken ilcpn
^P1STREET("IS","zl `aia","npclqeo")
oeqlcpn
^P1STREET("IS","zl `aia","npclwxo")
oxwlcpn
^P1STREET("IS","zl `aia","npclyhm")
mhylcpn
^P1STREET("IS","zl `aia","npegd")
dgepn
^P1STREET("IS","zl `aia","npexd")
dxepn
^P1STREET("IS","zl `aia","npexz dn`ex")
xe`nd zxepn
^P1STREET("IS","zl `aia","npgm ncneo")
oencn mgpn
^P1STREET("IS","zl `aia","npid eiyx`l")
l`xyie dipn
^P1STREET("IS","zl `aia","npyd ao iyx`l")
l`xyi oa dypn
^P1STREET("IS","zl `aia","nqilz dgynep`im")
mi`penygd zliqn
^P1STREET("IS","zl `aia","nqilz drelim")
milerd zliqn
^P1STREET("IS","zl `aia","nqilz eeltqeo")
oeqtlee zliqn
^P1STREET("IS","zl `aia","nqilz iyxim")
mixyi zliqn
^P1STREET("IS","zl `aia","nqlel")
lelqn
^P1STREET("IS","zl `aia","nrax iaew")
weai xarn
^P1STREET("IS","zl `aia","nreo")
oern
^P1STREET("IS","zl `aia","nrpiz")
ziprn
^P1STREET("IS","zl `aia","nrtili `bef")
feb` ilitrn
^P1STREET("IS","zl `aia","nrtili qle`cex")
xec`elq ilitrn
^P1STREET("IS","zl `aia","ntlqim")
miqltn
^P1STREET("IS","zl `aia","ntxu ylnd")
dnly uxtn
^P1STREET("IS","zl `aia","nvcd")
dcvn
^P1STREET("IS","zl `aia","nvead")
daevn
^P1STREET("IS","zl `aia","nvecz aiz""x")
x"zia zcevn
^P1STREET("IS","zl `aia","nvtd")
dtvn
^P1STREET("IS","zl `aia","nwed iyx`l")
l`xyi dewn
^P1STREET("IS","zl `aia","nwex giim")
miig xewn
^P1STREET("IS","zl `aia","nwls nxcki")
ikcxn slwn
^P1STREET("IS","zl `aia","nwq aiph")
hpia qwn
^P1STREET("IS","zl `aia","nwq axec")
cexa qwn
^P1STREET("IS","zl `aia","nwx` wecy")
ycew `xwn
^P1STREET("IS","zl `aia","nxbefd idecd")
dcedi dfebxn
^P1STREET("IS","zl `aia","nxbelio")
oilebxn
^P1STREET("IS","zl `aia","nxber")
rebxn
^P1STREET("IS","zl `aia","nxbliz n`ix")
xi`n zilbxn
^P1STREET("IS","zl `aia","nxbpiz")
zipbxn
^P1STREET("IS","zl `aia","nxcki ao dll")
lld oa ikcxn
^P1STREET("IS","zl `aia","nxcki baixhib")
bihxiab ikcxn
^P1STREET("IS","zl `aia","nxcki frix`")
`xirf ikcxn
^P1STREET("IS","zl `aia","nxcki n`ix")
xi`n ikcxn
^P1STREET("IS","zl `aia","nxfew erfx")
xfre wefxn
^P1STREET("IS","zl `aia","nxgaid")
diagxn
^P1STREET("IS","zl `aia","nxim dgynep`iz")
zi`penygd mixn
^P1STREET("IS","zl `aia","nxkelz")
zlekxn
^P1STREET("IS","zl `aia","nxkeq")
qekxn
^P1STREET("IS","zl `aia","nxkf arli nl`kd")
dk`ln ilra fkxn
^P1STREET("IS","zl `aia","nxkf eelealqwi")
iwqlaelee fkxn
^P1STREET("IS","zl `aia","nxnexw")
wxenxn
^P1STREET("IS","zl `aia","nxql ipwe")
ewpi lqxn
^P1STREET("IS","zl `aia","nxw irwa")
awri wxn
^P1STREET("IS","zl `aia","nxw yb`l")
l`by wxn
^P1STREET("IS","zl `aia","nxyl le`i")
i`el lyxn
^P1STREET("IS","zl `aia","nyba rm")
mr abyn
^P1STREET("IS","zl `aia","nyd axil")
lixa dyn
^P1STREET("IS","zl `aia","nyd eilpqwi")
iwqplie dyn
^P1STREET("IS","zl `aia","nyd qpd")
dpq dyn
^P1STREET("IS","zl `aia","nyd txlew")
welxt dyn
^P1STREET("IS","zl `aia","nyd wel")
lew dyn
^P1STREET("IS","zl `aia","nyd yley")
yely dyn
^P1STREET("IS","zl `aia","nyd yxz")
zxy dyn
^P1STREET("IS","zl `aia","nynx dbael")
leabd xnyn
^P1STREET("IS","zl `aia","nynx dixco")
ocxid xnyn
^P1STREET("IS","zl `aia","nynxz")
zxnyn
^P1STREET("IS","zl `aia","nyrel irwa")
awri leryn
^P1STREET("IS","zl `aia","nyrel yixd")
dxiy leryn
^P1STREET("IS","zl `aia","nzzide kdo bcel")
lecb odk edizzn
^P1STREET("IS","zl `aia","pahim")
mihap
^P1STREET("IS","zl `aia","pbad")
dabp
^P1STREET("IS","zl `aia","pca")
acp
^P1STREET("IS","zl `aia","pdll")
lldp
^P1STREET("IS","zl `aia","pdxcr`")
`rcxdp
^P1STREET("IS","zl `aia","pdxiim")
miixdp
^P1STREET("IS","zl `aia","ped vcw")
wcv dep
^P1STREET("IS","zl `aia","ped y`po")
op`y dep
^P1STREET("IS","zl `aia","ped ylem")
mely dep
^P1STREET("IS","zl `aia","perm")
mrep
^P1STREET("IS","zl `aia","pex")
xep
^P1STREET("IS","zl `aia","pexi`l")
l`ixep
^P1STREET("IS","zl `aia","pexiz")
zixep
^P1STREET("IS","zl `aia","pg")
gp
^P1STREET("IS","zl `aia","pgem")
megp
^P1STREET("IS","zl `aia","pgem belcno")
oncleb megp
^P1STREET("IS","zl `aia","pgl `iileo")
oelii` lgp
^P1STREET("IS","zl `aia","pgl dayex")
xeyad lgp
^P1STREET("IS","zl `aia","pgl ref")
fer lgp
^P1STREET("IS","zl `aia","pgl yexw")
wxey lgp
^P1STREET("IS","zl `aia","pgl`ez")
ze`lgp
^P1STREET("IS","zl `aia","pgli`l")
l`ilgp
^P1STREET("IS","zl `aia","pglz apinio")
oinipa zlgp
^P1STREET("IS","zl `aia","pglz ivgw")
wgvi zlgp
^P1STREET("IS","zl `aia","pgnd")
dngp
^P1STREET("IS","zl `aia","pgnid")
dingp
^P1STREET("IS","zl `aia","pgno naxqla")
alqxan ongp
^P1STREET("IS","zl `aia","pgno ndexecpwd")
dwpcexedn ongp
^P1STREET("IS","zl `aia","pgnpi")
ipngp
^P1STREET("IS","zl `aia","pgyeo")
oeygp
^P1STREET("IS","zl `aia","phrim")
mirhp
^P1STREET("IS","zl `aia","pil""i")
i"lip
^P1STREET("IS","zl `aia","piqo")
oqip
^P1STREET("IS","zl `aia","piqpaeim")
mieapqip
^P1STREET("IS","zl `aia","pivpd")
dpvip
^P1STREET("IS","zl `aia","pix rm")
mr xip
^P1STREET("IS","zl `aia","pixim")
mixip
^P1STREET("IS","zl `aia","pli fw""y")
y"wf ilp
^P1STREET("IS","zl `aia","pnixeax")
xaexinp
^P1STREET("IS","zl `aia","pnl ite")
eti lnp
^P1STREET("IS","zl `aia","pnl z""`")
`"z lnp
^P1STREET("IS","zl `aia","pq dxim")
mixd qp
^P1STREET("IS","zl `aia","pq lbeiim")
miiebl qp
^P1STREET("IS","zl `aia","pq viepd")
dpeiv qp
^P1STREET("IS","zl `aia","pq`x b'exb'")
'bxe'b x`qp
^P1STREET("IS","zl `aia","prexim")
mixerp
^P1STREET("IS","zl `aia","prno")
onrp
^P1STREET("IS","zl `aia","ptg`")
`gtp
^P1STREET("IS","zl `aia","pvg iyx`l")
l`xyi gvp
^P1STREET("IS","zl `aia","pwx n`ix")
xi`n xwp
^P1STREET("IS","zl `aia","px dlild")
dlild xp
^P1STREET("IS","zl `aia","pxcex")
xecxp
^P1STREET("IS","zl `aia","pyxi vai")
iav ixyp
^P1STREET("IS","zl `aia","pzia dnflez")
zelfnd aizp
^P1STREET("IS","zl `aia","pziaez")
zeaizp
^P1STREET("IS","zl `aia","pzo")
ozp
^P1STREET("IS","zl `aia","pzo `laf")
fal` ozp
^P1STREET("IS","zl `aia","pzo `lzxno")
onxzl` ozp
^P1STREET("IS","zl `aia","pzo dgkm")
mkgd ozp
^P1STREET("IS","zl `aia","pzo tpu")
upt ozp
^P1STREET("IS","zl `aia","qaieo")
oeiaq
^P1STREET("IS","zl `aia","qb'xd `ilpid")
dipli` dx'bq
^P1STREET("IS","zl `aia","qbeld")
dlebq
^P1STREET("IS","zl `aia","qdxeo")
oexdq
^P1STREET("IS","zl `aia","qehio")
oiheq
^P1STREET("IS","zl `aia","qekz ylem")
mely zkeq
^P1STREET("IS","zl `aia","qene idecd")
dcedi eneq
^P1STREET("IS","zl `aia","qenwo")
owneq
^P1STREET("IS","zl `aia","qeqliw `xid")
dix` wilqeq
^P1STREET("IS","zl `aia","qeqwio `axdm")
mdxa` oiwqeq
^P1STREET("IS","zl `aia","qewelea")
aeleweq
^P1STREET("IS","zl `aia","qewxhq")
qhxweq
^P1STREET("IS","zl `aia","qh`xd `laxh")
hxal` dx`hq
^P1STREET("IS","zl `aia","qhinvwi")
iwvnihq
^P1STREET("IS","zl `aia","qhto veib")
biev othq
^P1STREET("IS","zl `aia","qhxend")
dnexhq
^P1STREET("IS","zl `aia","qi `pc q`o 0")
0 o`q cp` iq
^P1STREET("IS","zl `aia","qieo")
oeiq
^P1STREET("IS","zl `aia","qino hea")
aeh oniq
^P1STREET("IS","zl `aia","qixpi")
ipxiq
^P1STREET("IS","zl `aia","qixwio")
oiwxiq
^P1STREET("IS","zl `aia","qle`cex")
xec`elq
^P1STREET("IS","zl `aia","qleneo")
oenelq
^P1STREET("IS","zl `aia","qlepinqwi")
iwqnipelq
^P1STREET("IS","zl `aia","qlqld")
dlqlq
^P1STREET("IS","zl `aia","qlr irwa")
awri rlq
^P1STREET("IS","zl `aia","qn' `izo")
ozi` 'nq
^P1STREET("IS","zl `aia","qn' `le nvi`ez")
ze`ivn el` 'nq
^P1STREET("IS","zl `aia","qn' a`x yar")
ray x`a 'nq
^P1STREET("IS","zl `aia","qn' a`xi")
ix`a 'nq
^P1STREET("IS","zl `aia","qn' aiz dac")
cad zia 'nq
^P1STREET("IS","zl `aia","qn' aiz dye`ad")
da`eyd zia 'nq
^P1STREET("IS","zl `aia","qn' ao idecd")
dcedi oa 'nq
^P1STREET("IS","zl `aia","qn' ax ieg`i")
i`gei xa 'nq
^P1STREET("IS","zl `aia","qn' beli wpid")
dipw ileb 'nq
^P1STREET("IS","zl `aia","qn' bex `xid")
dix` xeb 'nq
^P1STREET("IS","zl `aia","qn' bo n`ix")
xi`n ob 'nq
^P1STREET("IS","zl `aia","qn' cela")
alec 'nq
^P1STREET("IS","zl `aia","qn' d`ex")
xe`d 'nq
^P1STREET("IS","zl `aia","qn' dbard")
drabd 'nq
^P1STREET("IS","zl `aia","qn' dbipd")
dpibd 'nq
^P1STREET("IS","zl `aia","qn' dgeaaim")
miaaegd 'nq
^P1STREET("IS","zl `aia","qn' dgxneo")
oenxgd 'nq
^P1STREET("IS","zl `aia","qn' dkdpim")
mipdkd 'nq
^P1STREET("IS","zl `aia","qn' dkxnl")
lnxkd 'nq
^P1STREET("IS","zl `aia","qn' drlid")
dilrd 'nq
^P1STREET("IS","zl `aia","qn' dx vieo")
oeiv xd 'nq
^P1STREET("IS","zl `aia","qn' dy""j")
j"yd 'nq
^P1STREET("IS","zl `aia","qn' dyew")
weyd 'nq
^P1STREET("IS","zl `aia","qn' dzaex")
xeazd 'nq
^P1STREET("IS","zl `aia","qn' dzxqi")
iqxzd 'nq
^P1STREET("IS","zl `aia","qn' ebpx")
xpbe 'nq
^P1STREET("IS","zl `aia","qn' eizpid")
dipzie 'nq
^P1STREET("IS","zl `aia","qn' fpbail")
liabpf 'nq
^P1STREET("IS","zl `aia","qn' fxz")
zxf 'nq
^P1STREET("IS","zl `aia","qn' gkni iyx`l")
l`xyi inkg 'nq
^P1STREET("IS","zl `aia","qn' hntl")
ltnh 'nq
^P1STREET("IS","zl `aia","qn' il""b")
b"li 'nq
^P1STREET("IS","zl `aia","qn' ivdx")
xdvi 'nq
^P1STREET("IS","zl `aia","qn' kaix")
xiak 'nq
^P1STREET("IS","zl `aia","qn' lhxiq")
qixhl 'nq
^P1STREET("IS","zl `aia","qn' nbcl")
lcbn 'nq
^P1STREET("IS","zl `aia","qn' nelke ylnd")
dnly eklen 'nq
^P1STREET("IS","zl `aia","qn' nikd")
dkin 'nq
^P1STREET("IS","zl `aia","qn' npclyhm")
mhylcpn 'nq
^P1STREET("IS","zl `aia","qn' nqild `'")
'` dliqn 'nq
^P1STREET("IS","zl `aia","qn' nqild a'")
'a dliqn 'nq
^P1STREET("IS","zl `aia","qn' nref")
fern 'nq
^P1STREET("IS","zl `aia","qn' nynx dixco")
ocxid xnyn 'nq
^P1STREET("IS","zl `aia","qn' ped vcw")
wcv dep 'nq
^P1STREET("IS","zl `aia","qn' pexc`e")
e`cxep 'nq
^P1STREET("IS","zl `aia","qn' pfniz")
zinfp 'nq
^P1STREET("IS","zl `aia","qn' pgeyzo")
ozyegp 'nq
^P1STREET("IS","zl `aia","qn' phr")
rhp 'nq
^P1STREET("IS","zl `aia","qn' pq")
qp 'nq
^P1STREET("IS","zl `aia","qn' pq viepd")
dpeiv qp 'nq
^P1STREET("IS","zl `aia","qn' reac")
caer 'nq
^P1STREET("IS","zl `aia","qn' rneq")
qenr 'nq
^P1STREET("IS","zl `aia","qn' rpzai")
iazpr 'nq
^P1STREET("IS","zl `aia","qn' x`a""c")
c"a`x 'nq
^P1STREET("IS","zl `aia","qn' x`yiz gknd")
dnkg ziy`x 'nq
^P1STREET("IS","zl `aia","qn' xktd")
dtkx 'nq
^P1STREET("IS","zl `aia","qn' xya""b")
b"ayx 'nq
^P1STREET("IS","zl `aia","qn' yafi")
ifay 'nq
^P1STREET("IS","zl `aia","qn' yar dywnim")
minwyd ray 'nq
^P1STREET("IS","zl `aia","qn' yley")
yely 'nq
^P1STREET("IS","zl `aia","qn' ytx")
xty 'nq
^P1STREET("IS","zl `aia","qn' yxix`")
`xixy 'nq
^P1STREET("IS","zl `aia","qn' zgknepi")
ipenkgz 'nq
^P1STREET("IS","zl `aia","qn' zlzo")
ozlz 'nq
^P1STREET("IS","zl `aia","qn' zref")
ferz 'nq
^P1STREET("IS","zl `aia","qnaexqwi cpi`l")
l`ipc iwqxeanq
^P1STREET("IS","zl `aia","qncx")
xcnq
^P1STREET("IS","zl `aia","qnelpqwio")
oiwqplenq
^P1STREET("IS","zl `aia","qnhd `lnepiz")
zipenl` dhnq
^P1STREET("IS","zl `aia","qnhd tlepiz")
zipelt dhnq
^P1STREET("IS","zl `aia","qnilpqwi")
iwqplinq
^P1STREET("IS","zl `aia","qpdcxio")
oixcdpq
^P1STREET("IS","zl `aia","qptix")
xitpq
^P1STREET("IS","zl `aia","qrcid b`eo")
oe`b dicrq
^P1STREET("IS","zl `aia","qtix")
xitq
^P1STREET("IS","zl `aia","qxlio ieqs")
sqei oilxq
^P1STREET("IS","zl `aia","qyd `xbea")
aebx` dyq
^P1STREET("IS","zl `aia","r. dll")
lld .r
^P1STREET("IS","zl `aia","ra`q `axdm")
mdxa` q`ar
^P1STREET("IS","zl `aia","rac `l b'pi")
ip'b l` car
^P1STREET("IS","zl `aia","rac `lbpi")
ipbl` car
^P1STREET("IS","zl `aia","raecz iyx`l")
l`xyi zcear
^P1STREET("IS","zl `aia","raxi")
ixar
^P1STREET("IS","zl `aia","rbex")
xebr
^P1STREET("IS","zl `aia","rcelm")
mlecr
^P1STREET("IS","zl `aia","reacid")
dicaer
^P1STREET("IS","zl `aia","reacid naxhpexd")
dxephxan dicaer
^P1STREET("IS","zl `aia","recc")
ccer
^P1STREET("IS","zl `aia","refi pxwiq")
qiwxp ifer
^P1STREET("IS","zl `aia","refi`l")
l`ifer
^P1STREET("IS","zl `aia","refx")
xfer
^P1STREET("IS","zl `aia","reli dbxcem")
mecxbd iler
^P1STREET("IS","zl `aia","reli vieo")
oeiv iler
^P1STREET("IS","zl `aia","rely")
yler
^P1STREET("IS","zl `aia","renxi")
ixner
^P1STREET("IS","zl `aia","rf`i")
i`fr
^P1STREET("IS","zl `aia","rfd")
dfr
^P1STREET("IS","zl `aia","rfx` dqetx")
xteqd `xfr
^P1STREET("IS","zl `aia","rfxid")
dixfr
^P1STREET("IS","zl `aia","rfxid no d`cenim")
minec`d on dixfr
^P1STREET("IS","zl `aia","rhxez")
zexhr
^P1STREET("IS","zl `aia","rio ba")
ab oir
^P1STREET("IS","zl `aia","rio bci")
icb oir
^P1STREET("IS","zl `aia","rio bpim")
mipb oir
^P1STREET("IS","zl `aia","rio cex")
xec oir
^P1STREET("IS","zl `aia","rio dwex`")
`xewd oir
^P1STREET("IS","zl `aia","rio exc")
cxe oir
^P1STREET("IS","zl `aia","rio fizim")
mizif oir
^P1STREET("IS","zl `aia","rio gxec")
cexg oir
^P1STREET("IS","zl `aia","rio irwa")
awri oir
^P1STREET("IS","zl `aia","ripez")
zepir
^P1STREET("IS","zl `aia","rix diepd")
dpeid xir
^P1STREET("IS","zl `aia","rix yny")
yny xir
^P1STREET("IS","zl `aia","rixiz")
zixir
^P1STREET("IS","zl `aia","rl txyz cxkim")
mikxc zyxt lr
^P1STREET("IS","zl `aia","rlenim")
minelr
^P1STREET("IS","zl `aia","rliz dperx")
xrepd zilr
^P1STREET("IS","zl `aia","rm iyx`l gi")
ig l`xyi mr
^P1STREET("IS","zl `aia","rnco")
ocnr
^P1STREET("IS","zl `aia","rneq")
qenr
^P1STREET("IS","zl `aia","rnipca")
acpinr
^P1STREET("IS","zl `aia","rnirc")
crinr
^P1STREET("IS","zl `aia","rniwm")
mwinr
^P1STREET("IS","zl `aia","rnix")
xinr
^P1STREET("IS","zl `aia","rniya")
ayinr
^P1STREET("IS","zl `aia","rnpe`l fnix")
xinf l`epnr
^P1STREET("IS","zl `aia","rnpe`l rnixo")
oxinr l`epnr
^P1STREET("IS","zl `aia","rnw `ileo")
oeli` wnr
^P1STREET("IS","zl `aia","rnw axkd")
dkxa wnr
^P1STREET("IS","zl `aia","rnw d`ld")
dl`d wnr
^P1STREET("IS","zl `aia","rnw ifxr`l")
l`rxfi wnr
^P1STREET("IS","zl `aia","rnxm b`eo")
oe`b mxnr
^P1STREET("IS","zl `aia","rpzai")
iazpr
^P1STREET("IS","zl `aia","rpzez")
zezpr
^P1STREET("IS","zl `aia","rteld")
dletr
^P1STREET("IS","zl `aia","rvieo bax")
xab oeivr
^P1STREET("IS","zl `aia","rvneo")
oenvr
^P1STREET("IS","zl `aia","rwia` `xid")
dix` `aiwr
^P1STREET("IS","zl `aia","rwia` axej")
jexa `aiwr
^P1STREET("IS","zl `aia","rwxeo")
oexwr
^P1STREET("IS","zl `aia","rxai pgl")
lgp iaxr
^P1STREET("IS","zl `aia","rxebez")
zebexr
^P1STREET("IS","zl `aia","ryd`l")
l`dyr
^P1STREET("IS","zl `aia","ryx hgpez")
zepgh xyr
^P1STREET("IS","zl `aia","t`blio rnigi")
iginr oilb`t
^P1STREET("IS","zl `aia","t`z dyelgo")
ogleyd z`t
^P1STREET("IS","zl `aia","tceiim")
miiect
^P1STREET("IS","zl `aia","tefppqwi")
iwqppfet
^P1STREET("IS","zl `aia","tegeaqwi `xid")
dix` iwqaeget
^P1STREET("IS","zl `aia","telc axkd")
dkxa clet
^P1STREET("IS","zl `aia","tenaciz`")
`zicanet
^P1STREET("IS","zl `aia","tenxew")
wexnet
^P1STREET("IS","zl `aia","terd")
dret
^P1STREET("IS","zl `aia","texid")
dixet
^P1STREET("IS","zl `aia","teywio")
oiwyet
^P1STREET("IS","zl `aia","tgc ivgw")
wgvi cgt
^P1STREET("IS","zl `aia","th`i ieqs")
sqei i`ht
^P1STREET("IS","zl `aia","thxid")
dixht
^P1STREET("IS","zl `aia","thxqeo")
oeqxht
^P1STREET("IS","zl `aia","ti blilez")
zelilb it
^P1STREET("IS","zl `aia","ti blilez 0")
0 zelilb it
^P1STREET("IS","zl `aia","ti`xaxb")
bxax`it
^P1STREET("IS","zl `aia","tiial")
laiit
^P1STREET("IS","zl `aia","tiix npcq")
qcpn xiit
^P1STREET("IS","zl `aia","tikno")
onkit
^P1STREET("IS","zl `aia","tilcltid")
ditlclit
^P1STREET("IS","zl `aia","tileo")
oelit
^P1STREET("IS","zl `aia","tilikeaqwi")
iwqaekilit
^P1STREET("IS","zl `aia","tio")
oit
^P1STREET("IS","zl `aia","tiplq")
qlpit
^P1STREET("IS","zl `aia","tipq")
qpit
^P1STREET("IS","zl `aia","tipqwx")
xwqpit
^P1STREET("IS","zl `aia","tipwl ynreo")
oerny lwpit
^P1STREET("IS","zl `aia","tipyhiio n`ix")
xi`n oiihypit
^P1STREET("IS","zl `aia","tiweq")
qewit
^P1STREET("IS","zl `aia","tiyno-nineo")
oenin-onyit
^P1STREET("IS","zl `aia","tlb")
blt
^P1STREET("IS","zl `aia","tlebez")
zebelt
^P1STREET("IS","zl `aia","tlexphio")
oihpxelt
^P1STREET("IS","zl `aia","tlhi`l")
l`ihlt
^P1STREET("IS","zl `aia","tlihi dqtx")
xtqd ihilt
^P1STREET("IS","zl `aia","tlwixd")
dxiwlt
^P1STREET("IS","zl `aia","tpe`l")
l`ept
^P1STREET("IS","zl `aia","tpgq ao i`ix")
xi`i oa qgpt
^P1STREET("IS","zl `aia","tpgq laeo")
oeal qgpt
^P1STREET("IS","zl `aia","tpgq x`eao")
oae`x qgpt
^P1STREET("IS","zl `aia","tpgq xefo")
ofex qgpt
^P1STREET("IS","zl `aia","tpwq")
qwpt
^P1STREET("IS","zl `aia","tqhlevi")
ivelhqt
^P1STREET("IS","zl `aia","tqhxpw")
wpxhqt
^P1STREET("IS","zl `aia","trnepi ieqs")
sqei ipenrt
^P1STREET("IS","zl `aia","trnepiz")
zipenrt
^P1STREET("IS","zl `aia","twirio")
oiriwt
^P1STREET("IS","zl `aia","tx`b")
b`xt
^P1STREET("IS","zl `aia","tx`pwl")
lwp`xt
^P1STREET("IS","zl `aia","txeb")
bext
^P1STREET("IS","zl `aia","txeic")
ciext
^P1STREET("IS","zl `aia","txet' yex")
xey 'text
^P1STREET("IS","zl `aia","txetq vai")
iav qtext
^P1STREET("IS","zl `aia","txfeo")
oefxt
^P1STREET("IS","zl `aia","txgi `aia")
aia` igxt
^P1STREET("IS","zl `aia","txi `lirfx")
xfril` ixt
^P1STREET("IS","zl `aia","txi nbcim")
micbn ixt
^P1STREET("IS","zl `aia","txi ru giim")
miig ur ixt
^P1STREET("IS","zl `aia","txiclpc vai")
iav cplcixt
^P1STREET("IS","zl `aia","txiyno")
onyixt
^P1STREET("IS","zl `aia","txlyhiio ivgw")
wgvi oiihylxt
^P1STREET("IS","zl `aia","txpu wtw`")
`wtw upxt
^P1STREET("IS","zl `aia","txpveif")
fievpxt
^P1STREET("IS","zl `aia","txpwl icicid")
dicici lwpxt
^P1STREET("IS","zl `aia","txpwtexh")
hxetwpxt
^P1STREET("IS","zl `aia","txqiu yeypd")
dpyey uiqxt
^P1STREET("IS","zl `aia","txu giez")
zeig uxt
^P1STREET("IS","zl `aia","tzgid")
digzt
^P1STREET("IS","zl `aia","v'lpea")
aepl'v
^P1STREET("IS","zl `aia","vcew dkdo")
odkd wecv
^P1STREET("IS","zl `aia","vd""l")
l"dv
^P1STREET("IS","zl `aia","vdizl""i")
i"lzidv
^P1STREET("IS","zl `aia","vdleo dxet`")
`texd oeldv
^P1STREET("IS","zl `aia","veitl")
ltiev
^P1STREET("IS","zl `aia","vepfx")
xfpev
^P1STREET("IS","zl `aia","vepu")
upev
^P1STREET("IS","zl `aia","vetiz")
zitev
^P1STREET("IS","zl `aia","vexiyci")
icyixev
^P1STREET("IS","zl `aia","vexiz")
zixev
^P1STREET("IS","zl `aia","vgi xineo")
oenix igv
^P1STREET("IS","zl `aia","viceo")
oeciv
^P1STREET("IS","zl `aia","viepd zb'x")
x'bz dpeiv
^P1STREET("IS","zl `aia","viihlio")
oilhiiv
^P1STREET("IS","zl `aia","viwlb")
blwiv
^P1STREET("IS","zl `aia","vlili gpip`")
`pipg ililv
^P1STREET("IS","zl `aia","vltgc")
cgtlv
^P1STREET("IS","zl `aia","vng cec")
cec gnv
^P1STREET("IS","zl `aia","vngi didecim")
micedid ignv
^P1STREET("IS","zl `aia","vnxipqwi axej")
jexa iwqpixnv
^P1STREET("IS","zl `aia","vpeax")
xaepv
^P1STREET("IS","zl `aia","vtpid")
diptv
^P1STREET("IS","zl `aia","vtxix")
xixtv
^P1STREET("IS","zl `aia","vtz")
ztv
^P1STREET("IS","zl `aia","vxitio")
oitixv
^P1STREET("IS","zl `aia","vxrd")
drxv
^P1STREET("IS","zl `aia","w`xe axej")
jexa ex`w
^P1STREET("IS","zl `aia","wceyi dye`d")
d`eyd iyecw
^P1STREET("IS","zl `aia","wcind")
dnicw
^P1STREET("IS","zl `aia","wcm")
mcw
^P1STREET("IS","zl `aia","wcni`l")
l`incw
^P1STREET("IS","zl `aia","wcxeo")
oexcw
^P1STREET("IS","zl `aia","wcy axpr")
rpxa ycw
^P1STREET("IS","zl `aia","wdilz `ecqd")
dqce` zlidw
^P1STREET("IS","zl `aia","wdilz `eqhxlid")
dilxhqe` zlidw
^P1STREET("IS","zl `aia","wdilz aectyh")
hytcea zlidw
^P1STREET("IS","zl `aia","wdilz axfil")
lifxa zlidw
^P1STREET("IS","zl `aia","wdilz axiqw")
wqixa zlidw
^P1STREET("IS","zl `aia","wdilz eipd")
dpie zlidw
^P1STREET("IS","zl `aia","wdilz epvid")
divpe zlidw
^P1STREET("IS","zl `aia","wdilz exyd")
dyxe zlidw
^P1STREET("IS","zl `aia","wdilz fihenix")
xinehif zlidw
^P1STREET("IS","zl `aia","wdilz hyxpeaiu")
uiaepxyh zlidw
^P1STREET("IS","zl `aia","wdilz i`qi")
iq`i zlidw
^P1STREET("IS","zl `aia","wdilz iyx`l")
l`xyi zlidw
^P1STREET("IS","zl `aia","wdilz laea")
aeal zlidw
^P1STREET("IS","zl `aia","wdilz lecb'")
'bcel zlidw
^P1STREET("IS","zl `aia","wdilz nwqiwe")
ewiqwn zlidw
^P1STREET("IS","zl `aia","wdilz pie iexw")
wxei eip zlidw
^P1STREET("IS","zl `aia","wdilz q`lepiwi")
iwipel`q zlidw
^P1STREET("IS","zl `aia","wdilz qetid")
diteq zlidw
^P1STREET("IS","zl `aia","wdilz qlepiwi")
iwipelq zlidw
^P1STREET("IS","zl `aia","wdilz rco")
ocr zlidw
^P1STREET("IS","zl `aia","wdilz t`cead")
daec`t zlidw
^P1STREET("IS","zl `aia","wdilz tefp`")
`pfet zlidw
^P1STREET("IS","zl `aia","wdilz weapd")
dpaew zlidw
^P1STREET("IS","zl `aia","wdilz wiia")
aiiw zlidw
^P1STREET("IS","zl `aia","wdilz wiyipa")
apiyiw zlidw
^P1STREET("IS","zl `aia","wdilz wlialpc")
cplailw zlidw
^P1STREET("IS","zl `aia","wdilz wpcd")
dcpw zlidw
^P1STREET("IS","zl `aia","wdilz wxwea")
aewxw zlidw
^P1STREET("IS","zl `aia","wdilz xibd")
dbix zlidw
^P1STREET("IS","zl `aia","weitno")
ontiew
^P1STREET("IS","zl `aia","wenniez")
zeinnew
^P1STREET("IS","zl `aia","wentxh")
hxtnew
^P1STREET("IS","zl `aia","weqeaqwi")
iwqaeqew
^P1STREET("IS","zl `aia","wexcead")
daecxew
^P1STREET("IS","zl `aia","wexceaixe")
exiaecxew
^P1STREET("IS","zl `aia","wexelpwe")
ewplexew
^P1STREET("IS","zl `aia","wexio rfx`")
`xfr oixew
^P1STREET("IS","zl `aia","wexv'w i`pey")
yep`i w'vxew
^P1STREET("IS","zl `aia","wexwici")
iciwxew
^P1STREET("IS","zl `aia","wiaeu bleiez")
zeielb ueaiw
^P1STREET("IS","zl `aia","wieqe `laxh")
hxal` eqeiw
^P1STREET("IS","zl `aia","wiqxi `exi")
ixe` ixqiw
^P1STREET("IS","zl `aia","wiqxid")
dixqiw
^P1STREET("IS","zl `aia","wiviq")
qiviw
^P1STREET("IS","zl `aia","wiy")
yiw
^P1STREET("IS","zl `aia","wl`efpx")
xpfe`lw
^P1STREET("IS","zl `aia","wlepineq")
qenipelw
^P1STREET("IS","zl `aia","wlii")
iilw
^P1STREET("IS","zl `aia","wliyx")
xyilw
^P1STREET("IS","zl `aia","wlno")
onlw
^P1STREET("IS","zl `aia","wlno nyd")
dyn onlw
^P1STREET("IS","zl `aia","wlnx nyd")
dyn xnlw
^P1STREET("IS","zl `aia","wlv'wio")
oiw'vlw
^P1STREET("IS","zl `aia","wm")
mw
^P1STREET("IS","zl `aia","wnd")
dnw
^P1STREET("IS","zl `aia","wne`l")
l`enw
^P1STREET("IS","zl `aia","wnipqwd")
dwqpinw
^P1STREET("IS","zl `aia","wt`g igid")
digi g`tw
^P1STREET("IS","zl `aia","wtlo")
oltw
^P1STREET("IS","zl `aia","wtlpqwi")
iwqpltw
^P1STREET("IS","zl `aia","wtxiqio")
oiqixtw
^P1STREET("IS","zl `aia","wwl")
lww
^P1STREET("IS","zl `aia","wxeiq")
qiexw
^P1STREET("IS","zl `aia","wxiz qtx")
xtq zixw
^P1STREET("IS","zl `aia","wxiz rzicim")
micizr zixw
^P1STREET("IS","zl `aia","wxiz y`el")
le`y zixw
^P1STREET("IS","zl `aia","wxizi")
izixw
^P1STREET("IS","zl `aia","wxl phx")
xhp lxw
^P1STREET("IS","zl `aia","wxliaj")
jailxw
^P1STREET("IS","zl `aia","wxnpivwi")
iwvipnxw
^P1STREET("IS","zl `aia","wxpi")
ipxw
^P1STREET("IS","zl `aia","wxtl litd")
dtil ltxw
^P1STREET("IS","zl `aia","wxywy gqc`i")
i`cqg ywyxw
^P1STREET("IS","zl `aia","wy`pi `lirfx")
xfril` ip`yw
^P1STREET("IS","zl `aia","x`a""c")
c"a`x
^P1STREET("IS","zl `aia","x`eao xeaio")
oiaex oae`x
^P1STREET("IS","zl `aia","x`el eelpaxb")
bxaplee le`x
^P1STREET("IS","zl `aia","x`el elpaxb")
bxaple le`x
^P1STREET("IS","zl `aia","x`m")
m`x
^P1STREET("IS","zl `aia","x`qio f'`o")
o`'f oiq`x
^P1STREET("IS","zl `aia","x`y tipd")
dpit y`x
^P1STREET("IS","zl `aia","x`yeo lvieo")
oeivl oey`x
^P1STREET("IS","zl `aia","x`yepim")
mipey`x
^P1STREET("IS","zl `aia","x`yiz gknd")
dnkg ziy`x
^P1STREET("IS","zl `aia","xa `yi")
iy` ax
^P1STREET("IS","zl `aia","xa d`i b`eo")
oe`b i`d ax
^P1STREET("IS","zl `aia","xa dgeal")
laegd ax
^P1STREET("IS","zl `aia","xa vrix")
xirv ax
^P1STREET("IS","zl `aia","xacim")
micax
^P1STREET("IS","zl `aia","xai `c`")
`c` iax
^P1STREET("IS","zl `aia","xai `g`")
`g` iax
^P1STREET("IS","zl `aia","xai ao yxd lia")
ail dxy oa iax
^P1STREET("IS","zl `aia","xai gpip`")
`pipg iax
^P1STREET("IS","zl `aia","xai iegpo")
opgei iax
^P1STREET("IS","zl `aia","xai iyx`l nqlph")
hplqn l`xyi iax
^P1STREET("IS","zl `aia","xai iyx`l nxifio")
oifixn l`xyi iax
^P1STREET("IS","zl `aia","xai iyx`li ivgw")
wgvi il`xyi iax
^P1STREET("IS","zl `aia","xai n`ix")
xi`n iax
^P1STREET("IS","zl `aia","xai n`ix arl dpq")
qpd lra xi`n iax
^P1STREET("IS","zl `aia","xai pgno")
ongp iax
^P1STREET("IS","zl `aia","xai rwia`")
`aiwr iax
^P1STREET("IS","zl `aia","xai tpgq")
qgpt iax
^P1STREET("IS","zl `aia","xai zpgem")
megpz iax
^P1STREET("IS","zl `aia","xaiaim")
miaiax
^P1STREET("IS","zl `aia","xaip`")
`piax
^P1STREET("IS","zl `aia","xaipeaiu ytx")
xty uiaepiax
^P1STREET("IS","zl `aia","xao bnli`l")
l`ilnb oax
^P1STREET("IS","zl `aia","xape gpp`l")
l`ppg epax
^P1STREET("IS","zl `aia","xape ixegm")
mgexi epax
^P1STREET("IS","zl `aia","xape zm")
mz epax
^P1STREET("IS","zl `aia","xapivwi")
iwvipax
^P1STREET("IS","zl `aia","xawd beax")
xaeb dwax
^P1STREET("IS","zl `aia","xc""w")
w"cx
^P1STREET("IS","zl `aia","xcipb")
bpicx
^P1STREET("IS","zl `aia","xeaio ylnd")
dnly oiaex
^P1STREET("IS","zl `aia","xeaipyhiio")
oiihypiaex
^P1STREET("IS","zl `aia","xecpqwi yne`l")
l`eny iwqpcex
^P1STREET("IS","zl `aia","xef`piq")
qip`fex
^P1STREET("IS","zl `aia","xefea")
aefex
^P1STREET("IS","zl `aia","xefpaeim")
mieapfex
^P1STREET("IS","zl `aia","xefpalh vai")
iav hlapfex
^P1STREET("IS","zl `aia","xegnd")
dngex
^P1STREET("IS","zl `aia","xehpyhxiij")
jiixhyphex
^P1STREET("IS","zl `aia","xeibe `axdm")
mdxa` ebiex
^P1STREET("IS","zl `aia","xennd")
dnnex
^P1STREET("IS","zl `aia","xeno xelo")
olex onex
^P1STREET("IS","zl `aia","xenpe")
epnex
^P1STREET("IS","zl `aia","xenpili")
ilipnex
^P1STREET("IS","zl `aia","xepi")
ipex
^P1STREET("IS","zl `aia","xeql`o")
o`lqex
^P1STREET("IS","zl `aia","xet` dngzxez")
zexzgnd `tex
^P1STREET("IS","zl `aia","xetio")
oitex
^P1STREET("IS","zl `aia","xez")
zex
^P1STREET("IS","zl `aia","xfi")
ifx
^P1STREET("IS","zl `aia","xfi`l")
l`ifx
^P1STREET("IS","zl `aia","xg kh qgpd `")
` dpgq hk gx
^P1STREET("IS","zl `aia","xg' 10")
10 'gx
^P1STREET("IS","zl `aia","xg' 100")
100 'gx
^P1STREET("IS","zl `aia","xg' 101")
101 'gx
^P1STREET("IS","zl `aia","xg' 101 `'")
'` 101 'gx
^P1STREET("IS","zl `aia","xg' 1014")
1014 'gx
^P1STREET("IS","zl `aia","xg' 102")
102 'gx
^P1STREET("IS","zl `aia","xg' 102 `'")
'` 102 'gx
^P1STREET("IS","zl `aia","xg' 103")
103 'gx
^P1STREET("IS","zl `aia","xg' 104")
104 'gx
^P1STREET("IS","zl `aia","xg' 106")
106 'gx
^P1STREET("IS","zl `aia","xg' 107")
107 'gx
^P1STREET("IS","zl `aia","xg' 108")
108 'gx
^P1STREET("IS","zl `aia","xg' 1084")
1084 'gx
^P1STREET("IS","zl `aia","xg' 109")
109 'gx
^P1STREET("IS","zl `aia","xg' 11")
11 'gx
^P1STREET("IS","zl `aia","xg' 110")
110 'gx
^P1STREET("IS","zl `aia","xg' 111")
111 'gx
^P1STREET("IS","zl `aia","xg' 1111")
1111 'gx
^P1STREET("IS","zl `aia","xg' 112")
112 'gx
^P1STREET("IS","zl `aia","xg' 1124")
1124 'gx
^P1STREET("IS","zl `aia","xg' 113")
113 'gx
^P1STREET("IS","zl `aia","xg' 114")
114 'gx
^P1STREET("IS","zl `aia","xg' 115")
115 'gx
^P1STREET("IS","zl `aia","xg' 116")
116 'gx
^P1STREET("IS","zl `aia","xg' 117")
117 'gx
^P1STREET("IS","zl `aia","xg' 1188")
1188 'gx
^P1STREET("IS","zl `aia","xg' 119")
119 'gx
^P1STREET("IS","zl `aia","xg' 12")
12 'gx
^P1STREET("IS","zl `aia","xg' 120")
120 'gx
^P1STREET("IS","zl `aia","xg' 121")
121 'gx
^P1STREET("IS","zl `aia","xg' 122")
122 'gx
^P1STREET("IS","zl `aia","xg' 123")
123 'gx
^P1STREET("IS","zl `aia","xg' 124")
124 'gx
^P1STREET("IS","zl `aia","xg' 1243")
1243 'gx
^P1STREET("IS","zl `aia","xg' 1244")
1244 'gx
^P1STREET("IS","zl `aia","xg' 125")
125 'gx
^P1STREET("IS","zl `aia","xg' 1265")
1265 'gx
^P1STREET("IS","zl `aia","xg' 1269")
1269 'gx
^P1STREET("IS","zl `aia","xg' 127")
127 'gx
^P1STREET("IS","zl `aia","xg' 1274")
1274 'gx
^P1STREET("IS","zl `aia","xg' 1275")
1275 'gx
^P1STREET("IS","zl `aia","xg' 1276")
1276 'gx
^P1STREET("IS","zl `aia","xg' 1277")
1277 'gx
^P1STREET("IS","zl `aia","xg' 1278")
1278 'gx
^P1STREET("IS","zl `aia","xg' 129")
129 'gx
^P1STREET("IS","zl `aia","xg' 1298")
1298 'gx
^P1STREET("IS","zl `aia","xg' 13")
13 'gx
^P1STREET("IS","zl `aia","xg' 130")
130 'gx
^P1STREET("IS","zl `aia","xg' 1300")
1300 'gx
^P1STREET("IS","zl `aia","xg' 131")
131 'gx
^P1STREET("IS","zl `aia","xg' 132")
132 'gx
^P1STREET("IS","zl `aia","xg' 133")
133 'gx
^P1STREET("IS","zl `aia","xg' 135")
135 'gx
^P1STREET("IS","zl `aia","xg' 136")
136 'gx
^P1STREET("IS","zl `aia","xg' 137")
137 'gx
^P1STREET("IS","zl `aia","xg' 1373")
1373 'gx
^P1STREET("IS","zl `aia","xg' 139")
139 'gx
^P1STREET("IS","zl `aia","xg' 14")
14 'gx
^P1STREET("IS","zl `aia","xg' 140")
140 'gx
^P1STREET("IS","zl `aia","xg' 141")
141 'gx
^P1STREET("IS","zl `aia","xg' 142")
142 'gx
^P1STREET("IS","zl `aia","xg' 143")
143 'gx
^P1STREET("IS","zl `aia","xg' 144")
144 'gx
^P1STREET("IS","zl `aia","xg' 145")
145 'gx
^P1STREET("IS","zl `aia","xg' 146")
146 'gx
^P1STREET("IS","zl `aia","xg' 147")
147 'gx
^P1STREET("IS","zl `aia","xg' 1473")
1473 'gx
^P1STREET("IS","zl `aia","xg' 148")
148 'gx
^P1STREET("IS","zl `aia","xg' 149")
149 'gx
^P1STREET("IS","zl `aia","xg' 15")
15 'gx
^P1STREET("IS","zl `aia","xg' 150")
150 'gx
^P1STREET("IS","zl `aia","xg' 151")
151 'gx
^P1STREET("IS","zl `aia","xg' 152")
152 'gx
^P1STREET("IS","zl `aia","xg' 152 `")
` 152 'gx
^P1STREET("IS","zl `aia","xg' 153")
153 'gx
^P1STREET("IS","zl `aia","xg' 1533")
1533 'gx
^P1STREET("IS","zl `aia","xg' 154")
154 'gx
^P1STREET("IS","zl `aia","xg' 155")
155 'gx
^P1STREET("IS","zl `aia","xg' 156")
156 'gx
^P1STREET("IS","zl `aia","xg' 157")
157 'gx
^P1STREET("IS","zl `aia","xg' 158")
158 'gx
^P1STREET("IS","zl `aia","xg' 159")
159 'gx
^P1STREET("IS","zl `aia","xg' 16")
16 'gx
^P1STREET("IS","zl `aia","xg' 160")
160 'gx
^P1STREET("IS","zl `aia","xg' 161")
161 'gx
^P1STREET("IS","zl `aia","xg' 162")
162 'gx
^P1STREET("IS","zl `aia","xg' 163")
163 'gx
^P1STREET("IS","zl `aia","xg' 164")
164 'gx
^P1STREET("IS","zl `aia","xg' 165")
165 'gx
^P1STREET("IS","zl `aia","xg' 167")
167 'gx
^P1STREET("IS","zl `aia","xg' 168")
168 'gx
^P1STREET("IS","zl `aia","xg' 169")
169 'gx
^P1STREET("IS","zl `aia","xg' 17")
17 'gx
^P1STREET("IS","zl `aia","xg' 170")
170 'gx
^P1STREET("IS","zl `aia","xg' 171")
171 'gx
^P1STREET("IS","zl `aia","xg' 172")
172 'gx
^P1STREET("IS","zl `aia","xg' 173 `'")
'` 173 'gx
^P1STREET("IS","zl `aia","xg' 174")
174 'gx
^P1STREET("IS","zl `aia","xg' 175")
175 'gx
^P1STREET("IS","zl `aia","xg' 176")
176 'gx
^P1STREET("IS","zl `aia","xg' 177")
177 'gx
^P1STREET("IS","zl `aia","xg' 178")
178 'gx
^P1STREET("IS","zl `aia","xg' 179")
179 'gx
^P1STREET("IS","zl `aia","xg' 180")
180 'gx
^P1STREET("IS","zl `aia","xg' 181")
181 'gx
^P1STREET("IS","zl `aia","xg' 181 `")
` 181 'gx
^P1STREET("IS","zl `aia","xg' 183")
183 'gx
^P1STREET("IS","zl `aia","xg' 184")
184 'gx
^P1STREET("IS","zl `aia","xg' 185")
185 'gx
^P1STREET("IS","zl `aia","xg' 186")
186 'gx
^P1STREET("IS","zl `aia","xg' 187")
187 'gx
^P1STREET("IS","zl `aia","xg' 1873")
1873 'gx
^P1STREET("IS","zl `aia","xg' 188")
188 'gx
^P1STREET("IS","zl `aia","xg' 189")
189 'gx
^P1STREET("IS","zl `aia","xg' 19")
19 'gx
^P1STREET("IS","zl `aia","xg' 19 `'")
'` 19 'gx
^P1STREET("IS","zl `aia","xg' 190")
190 'gx
^P1STREET("IS","zl `aia","xg' 191")
191 'gx
^P1STREET("IS","zl `aia","xg' 192")
192 'gx
^P1STREET("IS","zl `aia","xg' 193")
193 'gx
^P1STREET("IS","zl `aia","xg' 194")
194 'gx
^P1STREET("IS","zl `aia","xg' 195")
195 'gx
^P1STREET("IS","zl `aia","xg' 196")
196 'gx
^P1STREET("IS","zl `aia","xg' 197")
197 'gx
^P1STREET("IS","zl `aia","xg' 198")
198 'gx
^P1STREET("IS","zl `aia","xg' 2")
2 'gx
^P1STREET("IS","zl `aia","xg' 20")
20 'gx
^P1STREET("IS","zl `aia","xg' 200")
200 'gx
^P1STREET("IS","zl `aia","xg' 2004")
2004 'gx
^P1STREET("IS","zl `aia","xg' 2005")
2005 'gx
^P1STREET("IS","zl `aia","xg' 201")
201 'gx
^P1STREET("IS","zl `aia","xg' 201 `'")
'` 201 'gx
^P1STREET("IS","zl `aia","xg' 202")
202 'gx
^P1STREET("IS","zl `aia","xg' 204")
204 'gx
^P1STREET("IS","zl `aia","xg' 2040")
2040 'gx
^P1STREET("IS","zl `aia","xg' 205")
205 'gx
^P1STREET("IS","zl `aia","xg' 206")
206 'gx
^P1STREET("IS","zl `aia","xg' 207")
207 'gx
^P1STREET("IS","zl `aia","xg' 209")
209 'gx
^P1STREET("IS","zl `aia","xg' 2095")
2095 'gx
^P1STREET("IS","zl `aia","xg' 21")
21 'gx
^P1STREET("IS","zl `aia","xg' 210")
210 'gx
^P1STREET("IS","zl `aia","xg' 211")
211 'gx
^P1STREET("IS","zl `aia","xg' 212")
212 'gx
^P1STREET("IS","zl `aia","xg' 213")
213 'gx
^P1STREET("IS","zl `aia","xg' 214")
214 'gx
^P1STREET("IS","zl `aia","xg' 215")
215 'gx
^P1STREET("IS","zl `aia","xg' 216")
216 'gx
^P1STREET("IS","zl `aia","xg' 217")
217 'gx
^P1STREET("IS","zl `aia","xg' 2171")
2171 'gx
^P1STREET("IS","zl `aia","xg' 218")
218 'gx
^P1STREET("IS","zl `aia","xg' 2181")
2181 'gx
^P1STREET("IS","zl `aia","xg' 2184")
2184 'gx
^P1STREET("IS","zl `aia","xg' 219")
219 'gx
^P1STREET("IS","zl `aia","xg' 22")
22 'gx
^P1STREET("IS","zl `aia","xg' 220")
220 'gx
^P1STREET("IS","zl `aia","xg' 2203")
2203 'gx
^P1STREET("IS","zl `aia","xg' 2204")
2204 'gx
^P1STREET("IS","zl `aia","xg' 2216")
2216 'gx
^P1STREET("IS","zl `aia","xg' 222")
222 'gx
^P1STREET("IS","zl `aia","xg' 223")
223 'gx
^P1STREET("IS","zl `aia","xg' 224")
224 'gx
^P1STREET("IS","zl `aia","xg' 2253")
2253 'gx
^P1STREET("IS","zl `aia","xg' 2254")
2254 'gx
^P1STREET("IS","zl `aia","xg' 226")
226 'gx
^P1STREET("IS","zl `aia","xg' 2260")
2260 'gx
^P1STREET("IS","zl `aia","xg' 227")
227 'gx
^P1STREET("IS","zl `aia","xg' 228")
228 'gx
^P1STREET("IS","zl `aia","xg' 2280")
2280 'gx
^P1STREET("IS","zl `aia","xg' 2281")
2281 'gx
^P1STREET("IS","zl `aia","xg' 2283")
2283 'gx
^P1STREET("IS","zl `aia","xg' 229")
229 'gx
^P1STREET("IS","zl `aia","xg' 2290")
2290 'gx
^P1STREET("IS","zl `aia","xg' 23")
23 'gx
^P1STREET("IS","zl `aia","xg' 230")
230 'gx
^P1STREET("IS","zl `aia","xg' 231")
231 'gx
^P1STREET("IS","zl `aia","xg' 2321")
2321 'gx
^P1STREET("IS","zl `aia","xg' 2322")
2322 'gx
^P1STREET("IS","zl `aia","xg' 2327")
2327 'gx
^P1STREET("IS","zl `aia","xg' 234")
234 'gx
^P1STREET("IS","zl `aia","xg' 2345")
2345 'gx
^P1STREET("IS","zl `aia","xg' 2348")
2348 'gx
^P1STREET("IS","zl `aia","xg' 235")
235 'gx
^P1STREET("IS","zl `aia","xg' 236")
236 'gx
^P1STREET("IS","zl `aia","xg' 237")
237 'gx
^P1STREET("IS","zl `aia","xg' 2373")
2373 'gx
^P1STREET("IS","zl `aia","xg' 238")
238 'gx
^P1STREET("IS","zl `aia","xg' 24")
24 'gx
^P1STREET("IS","zl `aia","xg' 240")
240 'gx
^P1STREET("IS","zl `aia","xg' 241")
241 'gx
^P1STREET("IS","zl `aia","xg' 242")
242 'gx
^P1STREET("IS","zl `aia","xg' 244")
244 'gx
^P1STREET("IS","zl `aia","xg' 245")
245 'gx
^P1STREET("IS","zl `aia","xg' 246")
246 'gx
^P1STREET("IS","zl `aia","xg' 247")
247 'gx
^P1STREET("IS","zl `aia","xg' 2473")
2473 'gx
^P1STREET("IS","zl `aia","xg' 248")
248 'gx
^P1STREET("IS","zl `aia","xg' 248 `'")
'` 248 'gx
^P1STREET("IS","zl `aia","xg' 249")
249 'gx
^P1STREET("IS","zl `aia","xg' 25")
25 'gx
^P1STREET("IS","zl `aia","xg' 25 `'")
'` 25 'gx
^P1STREET("IS","zl `aia","xg' 250")
250 'gx
^P1STREET("IS","zl `aia","xg' 251")
251 'gx
^P1STREET("IS","zl `aia","xg' 251 `'")
'` 251 'gx
^P1STREET("IS","zl `aia","xg' 2513")
2513 'gx
^P1STREET("IS","zl `aia","xg' 252")
252 'gx
^P1STREET("IS","zl `aia","xg' 253")
253 'gx
^P1STREET("IS","zl `aia","xg' 255")
255 'gx
^P1STREET("IS","zl `aia","xg' 256")
256 'gx
^P1STREET("IS","zl `aia","xg' 258")
258 'gx
^P1STREET("IS","zl `aia","xg' 26")
26 'gx
^P1STREET("IS","zl `aia","xg' 260")
260 'gx
^P1STREET("IS","zl `aia","xg' 261")
261 'gx
^P1STREET("IS","zl `aia","xg' 263")
263 'gx
^P1STREET("IS","zl `aia","xg' 264")
264 'gx
^P1STREET("IS","zl `aia","xg' 265")
265 'gx
^P1STREET("IS","zl `aia","xg' 266")
266 'gx
^P1STREET("IS","zl `aia","xg' 267")
267 'gx
^P1STREET("IS","zl `aia","xg' 269")
269 'gx
^P1STREET("IS","zl `aia","xg' 27")
27 'gx
^P1STREET("IS","zl `aia","xg' 270")
270 'gx
^P1STREET("IS","zl `aia","xg' 271")
271 'gx
^P1STREET("IS","zl `aia","xg' 272")
272 'gx
^P1STREET("IS","zl `aia","xg' 273")
273 'gx
^P1STREET("IS","zl `aia","xg' 274")
274 'gx
^P1STREET("IS","zl `aia","xg' 275")
275 'gx
^P1STREET("IS","zl `aia","xg' 276")
276 'gx
^P1STREET("IS","zl `aia","xg' 277")
277 'gx
^P1STREET("IS","zl `aia","xg' 278")
278 'gx
^P1STREET("IS","zl `aia","xg' 279")
279 'gx
^P1STREET("IS","zl `aia","xg' 28")
28 'gx
^P1STREET("IS","zl `aia","xg' 280")
280 'gx
^P1STREET("IS","zl `aia","xg' 281")
281 'gx
^P1STREET("IS","zl `aia","xg' 282")
282 'gx
^P1STREET("IS","zl `aia","xg' 283")
283 'gx
^P1STREET("IS","zl `aia","xg' 288")
288 'gx
^P1STREET("IS","zl `aia","xg' 289")
289 'gx
^P1STREET("IS","zl `aia","xg' 29")
29 'gx
^P1STREET("IS","zl `aia","xg' 290")
290 'gx
^P1STREET("IS","zl `aia","xg' 291")
291 'gx
^P1STREET("IS","zl `aia","xg' 293")
293 'gx
^P1STREET("IS","zl `aia","xg' 294")
294 'gx
^P1STREET("IS","zl `aia","xg' 296")
296 'gx
^P1STREET("IS","zl `aia","xg' 298")
298 'gx
^P1STREET("IS","zl `aia","xg' 299")
299 'gx
^P1STREET("IS","zl `aia","xg' 3")
3 'gx
^P1STREET("IS","zl `aia","xg' 30")
30 'gx
^P1STREET("IS","zl `aia","xg' 300")
300 'gx
^P1STREET("IS","zl `aia","xg' 301")
301 'gx
^P1STREET("IS","zl `aia","xg' 3017")
3017 'gx
^P1STREET("IS","zl `aia","xg' 3019")
3019 'gx
^P1STREET("IS","zl `aia","xg' 302")
302 'gx
^P1STREET("IS","zl `aia","xg' 3029")
3029 'gx
^P1STREET("IS","zl `aia","xg' 303")
303 'gx
^P1STREET("IS","zl `aia","xg' 304")
304 'gx
^P1STREET("IS","zl `aia","xg' 3043")
3043 'gx
^P1STREET("IS","zl `aia","xg' 3048")
3048 'gx
^P1STREET("IS","zl `aia","xg' 305")
305 'gx
^P1STREET("IS","zl `aia","xg' 3052")
3052 'gx
^P1STREET("IS","zl `aia","xg' 3054")
3054 'gx
^P1STREET("IS","zl `aia","xg' 3057")
3057 'gx
^P1STREET("IS","zl `aia","xg' 3062")
3062 'gx
^P1STREET("IS","zl `aia","xg' 307")
307 'gx
^P1STREET("IS","zl `aia","xg' 3071")
3071 'gx
^P1STREET("IS","zl `aia","xg' 308")
308 'gx
^P1STREET("IS","zl `aia","xg' 3083")
3083 'gx
^P1STREET("IS","zl `aia","xg' 3094")
3094 'gx
^P1STREET("IS","zl `aia","xg' 31")
31 'gx
^P1STREET("IS","zl `aia","xg' 310")
310 'gx
^P1STREET("IS","zl `aia","xg' 312")
312 'gx
^P1STREET("IS","zl `aia","xg' 313")
313 'gx
^P1STREET("IS","zl `aia","xg' 314")
314 'gx
^P1STREET("IS","zl `aia","xg' 315")
315 'gx
^P1STREET("IS","zl `aia","xg' 316")
316 'gx
^P1STREET("IS","zl `aia","xg' 317")
317 'gx
^P1STREET("IS","zl `aia","xg' 318")
318 'gx
^P1STREET("IS","zl `aia","xg' 319")
319 'gx
^P1STREET("IS","zl `aia","xg' 321")
321 'gx
^P1STREET("IS","zl `aia","xg' 3210")
3210 'gx
^P1STREET("IS","zl `aia","xg' 323")
323 'gx
^P1STREET("IS","zl `aia","xg' 324")
324 'gx
^P1STREET("IS","zl `aia","xg' 325")
325 'gx
^P1STREET("IS","zl `aia","xg' 326")
326 'gx
^P1STREET("IS","zl `aia","xg' 327")
327 'gx
^P1STREET("IS","zl `aia","xg' 328")
328 'gx
^P1STREET("IS","zl `aia","xg' 3280")
3280 'gx
^P1STREET("IS","zl `aia","xg' 329")
329 'gx
^P1STREET("IS","zl `aia","xg' 33")
33 'gx
^P1STREET("IS","zl `aia","xg' 330")
330 'gx
^P1STREET("IS","zl `aia","xg' 331")
331 'gx
^P1STREET("IS","zl `aia","xg' 332")
332 'gx
^P1STREET("IS","zl `aia","xg' 3321")
3321 'gx
^P1STREET("IS","zl `aia","xg' 333")
333 'gx
^P1STREET("IS","zl `aia","xg' 3333")
3333 'gx
^P1STREET("IS","zl `aia","xg' 3335")
3335 'gx
^P1STREET("IS","zl `aia","xg' 334")
334 'gx
^P1STREET("IS","zl `aia","xg' 335")
335 'gx
^P1STREET("IS","zl `aia","xg' 3350")
3350 'gx
^P1STREET("IS","zl `aia","xg' 336")
336 'gx
^P1STREET("IS","zl `aia","xg' 3362")
3362 'gx
^P1STREET("IS","zl `aia","xg' 337")
337 'gx
^P1STREET("IS","zl `aia","xg' 3373")
3373 'gx
^P1STREET("IS","zl `aia","xg' 3377")
3377 'gx
^P1STREET("IS","zl `aia","xg' 338")
338 'gx
^P1STREET("IS","zl `aia","xg' 3381")
3381 'gx
^P1STREET("IS","zl `aia","xg' 3382")
3382 'gx
^P1STREET("IS","zl `aia","xg' 3383")
3383 'gx
^P1STREET("IS","zl `aia","xg' 3385")
3385 'gx
^P1STREET("IS","zl `aia","xg' 339")
339 'gx
^P1STREET("IS","zl `aia","xg' 34")
34 'gx
^P1STREET("IS","zl `aia","xg' 3404")
3404 'gx
^P1STREET("IS","zl `aia","xg' 3406")
3406 'gx
^P1STREET("IS","zl `aia","xg' 342")
342 'gx
^P1STREET("IS","zl `aia","xg' 343 `'")
'` 343 'gx
^P1STREET("IS","zl `aia","xg' 344")
344 'gx
^P1STREET("IS","zl `aia","xg' 345")
345 'gx
^P1STREET("IS","zl `aia","xg' 346")
346 'gx
^P1STREET("IS","zl `aia","xg' 348")
348 'gx
^P1STREET("IS","zl `aia","xg' 3488")
3488 'gx
^P1STREET("IS","zl `aia","xg' 35")
35 'gx
^P1STREET("IS","zl `aia","xg' 350")
350 'gx
^P1STREET("IS","zl `aia","xg' 351")
351 'gx
^P1STREET("IS","zl `aia","xg' 352")
352 'gx
^P1STREET("IS","zl `aia","xg' 355")
355 'gx
^P1STREET("IS","zl `aia","xg' 356")
356 'gx
^P1STREET("IS","zl `aia","xg' 357")
357 'gx
^P1STREET("IS","zl `aia","xg' 358")
358 'gx
^P1STREET("IS","zl `aia","xg' 359")
359 'gx
^P1STREET("IS","zl `aia","xg' 36")
36 'gx
^P1STREET("IS","zl `aia","xg' 360")
360 'gx
^P1STREET("IS","zl `aia","xg' 361")
361 'gx
^P1STREET("IS","zl `aia","xg' 3628")
3628 'gx
^P1STREET("IS","zl `aia","xg' 3629")
3629 'gx
^P1STREET("IS","zl `aia","xg' 363")
363 'gx
^P1STREET("IS","zl `aia","xg' 365")
365 'gx
^P1STREET("IS","zl `aia","xg' 367")
367 'gx
^P1STREET("IS","zl `aia","xg' 3694")
3694 'gx
^P1STREET("IS","zl `aia","xg' 37 `'")
'` 37 'gx
^P1STREET("IS","zl `aia","xg' 3701")
3701 'gx
^P1STREET("IS","zl `aia","xg' 371 `'")
'` 371 'gx
^P1STREET("IS","zl `aia","xg' 372")
372 'gx
^P1STREET("IS","zl `aia","xg' 373")
373 'gx
^P1STREET("IS","zl `aia","xg' 3731")
3731 'gx
^P1STREET("IS","zl `aia","xg' 3735")
3735 'gx
^P1STREET("IS","zl `aia","xg' 3738")
3738 'gx
^P1STREET("IS","zl `aia","xg' 3739")
3739 'gx
^P1STREET("IS","zl `aia","xg' 3748")
3748 'gx
^P1STREET("IS","zl `aia","xg' 375")
375 'gx
^P1STREET("IS","zl `aia","xg' 3750")
3750 'gx
^P1STREET("IS","zl `aia","xg' 376")
376 'gx
^P1STREET("IS","zl `aia","xg' 377")
377 'gx
^P1STREET("IS","zl `aia","xg' 3780")
3780 'gx
^P1STREET("IS","zl `aia","xg' 3785")
3785 'gx
^P1STREET("IS","zl `aia","xg' 379")
379 'gx
^P1STREET("IS","zl `aia","xg' 38")
38 'gx
^P1STREET("IS","zl `aia","xg' 380")
380 'gx
^P1STREET("IS","zl `aia","xg' 3808")
3808 'gx
^P1STREET("IS","zl `aia","xg' 381")
381 'gx
^P1STREET("IS","zl `aia","xg' 382")
382 'gx
^P1STREET("IS","zl `aia","xg' 3824")
3824 'gx
^P1STREET("IS","zl `aia","xg' 383")
383 'gx
^P1STREET("IS","zl `aia","xg' 3833")
3833 'gx
^P1STREET("IS","zl `aia","xg' 384")
384 'gx
^P1STREET("IS","zl `aia","xg' 385")
385 'gx
^P1STREET("IS","zl `aia","xg' 386")
386 'gx
^P1STREET("IS","zl `aia","xg' 387")
387 'gx
^P1STREET("IS","zl `aia","xg' 388")
388 'gx
^P1STREET("IS","zl `aia","xg' 389")
389 'gx
^P1STREET("IS","zl `aia","xg' 39")
39 'gx
^P1STREET("IS","zl `aia","xg' 390")
390 'gx
^P1STREET("IS","zl `aia","xg' 391")
391 'gx
^P1STREET("IS","zl `aia","xg' 392")
392 'gx
^P1STREET("IS","zl `aia","xg' 393")
393 'gx
^P1STREET("IS","zl `aia","xg' 394")
394 'gx
^P1STREET("IS","zl `aia","xg' 397")
397 'gx
^P1STREET("IS","zl `aia","xg' 399")
399 'gx
^P1STREET("IS","zl `aia","xg' 4")
4 'gx
^P1STREET("IS","zl `aia","xg' 40")
40 'gx
^P1STREET("IS","zl `aia","xg' 401")
401 'gx
^P1STREET("IS","zl `aia","xg' 402")
402 'gx
^P1STREET("IS","zl `aia","xg' 403")
403 'gx
^P1STREET("IS","zl `aia","xg' 404")
404 'gx
^P1STREET("IS","zl `aia","xg' 405")
405 'gx
^P1STREET("IS","zl `aia","xg' 407")
407 'gx
^P1STREET("IS","zl `aia","xg' 408")
408 'gx
^P1STREET("IS","zl `aia","xg' 409")
409 'gx
^P1STREET("IS","zl `aia","xg' 41")
41 'gx
^P1STREET("IS","zl `aia","xg' 410")
410 'gx
^P1STREET("IS","zl `aia","xg' 411")
411 'gx
^P1STREET("IS","zl `aia","xg' 412")
412 'gx
^P1STREET("IS","zl `aia","xg' 413")
413 'gx
^P1STREET("IS","zl `aia","xg' 414")
414 'gx
^P1STREET("IS","zl `aia","xg' 416")
416 'gx
^P1STREET("IS","zl `aia","xg' 4205")
4205 'gx
^P1STREET("IS","zl `aia","xg' 4206")
4206 'gx
^P1STREET("IS","zl `aia","xg' 421")
421 'gx
^P1STREET("IS","zl `aia","xg' 4210")
4210 'gx
^P1STREET("IS","zl `aia","xg' 4211")
4211 'gx
^P1STREET("IS","zl `aia","xg' 4212")
4212 'gx
^P1STREET("IS","zl `aia","xg' 4213")
4213 'gx
^P1STREET("IS","zl `aia","xg' 4218")
4218 'gx
^P1STREET("IS","zl `aia","xg' 4219")
4219 'gx
^P1STREET("IS","zl `aia","xg' 423")
423 'gx
^P1STREET("IS","zl `aia","xg' 4234")
4234 'gx
^P1STREET("IS","zl `aia","xg' 4283")
4283 'gx
^P1STREET("IS","zl `aia","xg' 429")
429 'gx
^P1STREET("IS","zl `aia","xg' 43")
43 'gx
^P1STREET("IS","zl `aia","xg' 43 `'")
'` 43 'gx
^P1STREET("IS","zl `aia","xg' 4313")
4313 'gx
^P1STREET("IS","zl `aia","xg' 4324")
4324 'gx
^P1STREET("IS","zl `aia","xg' 434")
434 'gx
^P1STREET("IS","zl `aia","xg' 435")
435 'gx
^P1STREET("IS","zl `aia","xg' 436")
436 'gx
^P1STREET("IS","zl `aia","xg' 437")
437 'gx
^P1STREET("IS","zl `aia","xg' 438")
438 'gx
^P1STREET("IS","zl `aia","xg' 439")
439 'gx
^P1STREET("IS","zl `aia","xg' 44")
44 'gx
^P1STREET("IS","zl `aia","xg' 441")
441 'gx
^P1STREET("IS","zl `aia","xg' 4421")
4421 'gx
^P1STREET("IS","zl `aia","xg' 45")
45 'gx
^P1STREET("IS","zl `aia","xg' 451")
451 'gx
^P1STREET("IS","zl `aia","xg' 456")
456 'gx
^P1STREET("IS","zl `aia","xg' 4573")
4573 'gx
^P1STREET("IS","zl `aia","xg' 46")
46 'gx
^P1STREET("IS","zl `aia","xg' 463")
463 'gx
^P1STREET("IS","zl `aia","xg' 47")
47 'gx
^P1STREET("IS","zl `aia","xg' 4721")
4721 'gx
^P1STREET("IS","zl `aia","xg' 478")
478 'gx
^P1STREET("IS","zl `aia","xg' 48")
48 'gx
^P1STREET("IS","zl `aia","xg' 4812")
4812 'gx
^P1STREET("IS","zl `aia","xg' 4875")
4875 'gx
^P1STREET("IS","zl `aia","xg' 4880")
4880 'gx
^P1STREET("IS","zl `aia","xg' 49")
49 'gx
^P1STREET("IS","zl `aia","xg' 491")
491 'gx
^P1STREET("IS","zl `aia","xg' 492")
492 'gx
^P1STREET("IS","zl `aia","xg' 493")
493 'gx
^P1STREET("IS","zl `aia","xg' 5")
5 'gx
^P1STREET("IS","zl `aia","xg' 50")
50 'gx
^P1STREET("IS","zl `aia","xg' 5002")
5002 'gx
^P1STREET("IS","zl `aia","xg' 5024")
5024 'gx
^P1STREET("IS","zl `aia","xg' 503")
503 'gx
^P1STREET("IS","zl `aia","xg' 504")
504 'gx
^P1STREET("IS","zl `aia","xg' 5083")
5083 'gx
^P1STREET("IS","zl `aia","xg' 52")
52 'gx
^P1STREET("IS","zl `aia","xg' 52 `'")
'` 52 'gx
^P1STREET("IS","zl `aia","xg' 53")
53 'gx
^P1STREET("IS","zl `aia","xg' 533")
533 'gx
^P1STREET("IS","zl `aia","xg' 5373")
5373 'gx
^P1STREET("IS","zl `aia","xg' 54")
54 'gx
^P1STREET("IS","zl `aia","xg' 543")
543 'gx
^P1STREET("IS","zl `aia","xg' 55")
55 'gx
^P1STREET("IS","zl `aia","xg' 552")
552 'gx
^P1STREET("IS","zl `aia","xg' 553")
553 'gx
^P1STREET("IS","zl `aia","xg' 5573")
5573 'gx
^P1STREET("IS","zl `aia","xg' 56")
56 'gx
^P1STREET("IS","zl `aia","xg' 561")
561 'gx
^P1STREET("IS","zl `aia","xg' 5621")
5621 'gx
^P1STREET("IS","zl `aia","xg' 57")
57 'gx
^P1STREET("IS","zl `aia","xg' 571")
571 'gx
^P1STREET("IS","zl `aia","xg' 5721")
5721 'gx
^P1STREET("IS","zl `aia","xg' 573")
573 'gx
^P1STREET("IS","zl `aia","xg' 58 `'")
'` 58 'gx
^P1STREET("IS","zl `aia","xg' 591")
591 'gx
^P1STREET("IS","zl `aia","xg' 6")
6 'gx
^P1STREET("IS","zl `aia","xg' 60 `")
` 60 'gx
^P1STREET("IS","zl `aia","xg' 6024")
6024 'gx
^P1STREET("IS","zl `aia","xg' 6043")
6043 'gx
^P1STREET("IS","zl `aia","xg' 6122")
6122 'gx
^P1STREET("IS","zl `aia","xg' 62")
62 'gx
^P1STREET("IS","zl `aia","xg' 622")
622 'gx
^P1STREET("IS","zl `aia","xg' 623")
623 'gx
^P1STREET("IS","zl `aia","xg' 63")
63 'gx
^P1STREET("IS","zl `aia","xg' 631")
631 'gx
^P1STREET("IS","zl `aia","xg' 633")
633 'gx
^P1STREET("IS","zl `aia","xg' 64")
64 'gx
^P1STREET("IS","zl `aia","xg' 644")
644 'gx
^P1STREET("IS","zl `aia","xg' 65")
65 'gx
^P1STREET("IS","zl `aia","xg' 653")
653 'gx
^P1STREET("IS","zl `aia","xg' 6573")
6573 'gx
^P1STREET("IS","zl `aia","xg' 66")
66 'gx
^P1STREET("IS","zl `aia","xg' 662")
662 'gx
^P1STREET("IS","zl `aia","xg' 67")
67 'gx
^P1STREET("IS","zl `aia","xg' 672")
672 'gx
^P1STREET("IS","zl `aia","xg' 6721")
6721 'gx
^P1STREET("IS","zl `aia","xg' 68")
68 'gx
^P1STREET("IS","zl `aia","xg' 681")
681 'gx
^P1STREET("IS","zl `aia","xg' 683")
683 'gx
^P1STREET("IS","zl `aia","xg' 69")
69 'gx
^P1STREET("IS","zl `aia","xg' 7")
7 'gx
^P1STREET("IS","zl `aia","xg' 70")
70 'gx
^P1STREET("IS","zl `aia","xg' 701")
701 'gx
^P1STREET("IS","zl `aia","xg' 7024")
7024 'gx
^P1STREET("IS","zl `aia","xg' 704")
704 'gx
^P1STREET("IS","zl `aia","xg' 706")
706 'gx
^P1STREET("IS","zl `aia","xg' 707")
707 'gx
^P1STREET("IS","zl `aia","xg' 7083")
7083 'gx
^P1STREET("IS","zl `aia","xg' 71")
71 'gx
^P1STREET("IS","zl `aia","xg' 7103")
7103 'gx
^P1STREET("IS","zl `aia","xg' 715")
715 'gx
^P1STREET("IS","zl `aia","xg' 718")
718 'gx
^P1STREET("IS","zl `aia","xg' 719")
719 'gx
^P1STREET("IS","zl `aia","xg' 72")
72 'gx
^P1STREET("IS","zl `aia","xg' 720")
720 'gx
^P1STREET("IS","zl `aia","xg' 73 `'")
'` 73 'gx
^P1STREET("IS","zl `aia","xg' 730")
730 'gx
^P1STREET("IS","zl `aia","xg' 7373")
7373 'gx
^P1STREET("IS","zl `aia","xg' 74")
74 'gx
^P1STREET("IS","zl `aia","xg' 742")
742 'gx
^P1STREET("IS","zl `aia","xg' 743")
743 'gx
^P1STREET("IS","zl `aia","xg' 746")
746 'gx
^P1STREET("IS","zl `aia","xg' 75")
75 'gx
^P1STREET("IS","zl `aia","xg' 751")
751 'gx
^P1STREET("IS","zl `aia","xg' 753")
753 'gx
^P1STREET("IS","zl `aia","xg' 76 `'")
'` 76 'gx
^P1STREET("IS","zl `aia","xg' 762")
762 'gx
^P1STREET("IS","zl `aia","xg' 765")
765 'gx
^P1STREET("IS","zl `aia","xg' 7721")
7721 'gx
^P1STREET("IS","zl `aia","xg' 773")
773 'gx
^P1STREET("IS","zl `aia","xg' 774")
774 'gx
^P1STREET("IS","zl `aia","xg' 775")
775 'gx
^P1STREET("IS","zl `aia","xg' 78")
78 'gx
^P1STREET("IS","zl `aia","xg' 783")
783 'gx
^P1STREET("IS","zl `aia","xg' 785")
785 'gx
^P1STREET("IS","zl `aia","xg' 79")
79 'gx
^P1STREET("IS","zl `aia","xg' 793")
793 'gx
^P1STREET("IS","zl `aia","xg' 794")
794 'gx
^P1STREET("IS","zl `aia","xg' 795")
795 'gx
^P1STREET("IS","zl `aia","xg' 796")
796 'gx
^P1STREET("IS","zl `aia","xg' 797")
797 'gx
^P1STREET("IS","zl `aia","xg' 799")
799 'gx
^P1STREET("IS","zl `aia","xg' 8")
8 'gx
^P1STREET("IS","zl `aia","xg' 80")
80 'gx
^P1STREET("IS","zl `aia","xg' 801")
801 'gx
^P1STREET("IS","zl `aia","xg' 802")
802 'gx
^P1STREET("IS","zl `aia","xg' 803")
803 'gx
^P1STREET("IS","zl `aia","xg' 804")
804 'gx
^P1STREET("IS","zl `aia","xg' 81")
81 'gx
^P1STREET("IS","zl `aia","xg' 81 `'")
'` 81 'gx
^P1STREET("IS","zl `aia","xg' 813")
813 'gx
^P1STREET("IS","zl `aia","xg' 82")
82 'gx
^P1STREET("IS","zl `aia","xg' 8203")
8203 'gx
^P1STREET("IS","zl `aia","xg' 83")
83 'gx
^P1STREET("IS","zl `aia","xg' 83 `'")
'` 83 'gx
^P1STREET("IS","zl `aia","xg' 832")
832 'gx
^P1STREET("IS","zl `aia","xg' 833")
833 'gx
^P1STREET("IS","zl `aia","xg' 8373")
8373 'gx
^P1STREET("IS","zl `aia","xg' 85")
85 'gx
^P1STREET("IS","zl `aia","xg' 85 `'")
'` 85 'gx
^P1STREET("IS","zl `aia","xg' 853")
853 'gx
^P1STREET("IS","zl `aia","xg' 86")
86 'gx
^P1STREET("IS","zl `aia","xg' 87")
87 'gx
^P1STREET("IS","zl `aia","xg' 871")
871 'gx
^P1STREET("IS","zl `aia","xg' 872")
872 'gx
^P1STREET("IS","zl `aia","xg' 8721")
8721 'gx
^P1STREET("IS","zl `aia","xg' 874")
874 'gx
^P1STREET("IS","zl `aia","xg' 88")
88 'gx
^P1STREET("IS","zl `aia","xg' 882")
882 'gx
^P1STREET("IS","zl `aia","xg' 89")
89 'gx
^P1STREET("IS","zl `aia","xg' 891")
891 'gx
^P1STREET("IS","zl `aia","xg' 9")
9 'gx
^P1STREET("IS","zl `aia","xg' 90")
90 'gx
^P1STREET("IS","zl `aia","xg' 902")
902 'gx
^P1STREET("IS","zl `aia","xg' 91 `'")
'` 91 'gx
^P1STREET("IS","zl `aia","xg' 9103")
9103 'gx
^P1STREET("IS","zl `aia","xg' 911")
911 'gx
^P1STREET("IS","zl `aia","xg' 9124")
9124 'gx
^P1STREET("IS","zl `aia","xg' 913")
913 'gx
^P1STREET("IS","zl `aia","xg' 92")
92 'gx
^P1STREET("IS","zl `aia","xg' 9203")
9203 'gx
^P1STREET("IS","zl `aia","xg' 93")
93 'gx
^P1STREET("IS","zl `aia","xg' 9373")
9373 'gx
^P1STREET("IS","zl `aia","xg' 94")
94 'gx
^P1STREET("IS","zl `aia","xg' 941")
941 'gx
^P1STREET("IS","zl `aia","xg' 95")
95 'gx
^P1STREET("IS","zl `aia","xg' 95 `'")
'` 95 'gx
^P1STREET("IS","zl `aia","xg' 953")
953 'gx
^P1STREET("IS","zl `aia","xg' 96")
96 'gx
^P1STREET("IS","zl `aia","xg' 971")
971 'gx
^P1STREET("IS","zl `aia","xg' 973")
973 'gx
^P1STREET("IS","zl `aia","xg' 975")
975 'gx
^P1STREET("IS","zl `aia","xg' 98")
98 'gx
^P1STREET("IS","zl `aia","xg' 983")
983 'gx
^P1STREET("IS","zl `aia","xg' 99")
99 'gx
^P1STREET("IS","zl `aia","xg' `'")
'` 'gx
^P1STREET("IS","zl `aia","xg' a'")
'a 'gx
^P1STREET("IS","zl `aia","xg' b'")
'b 'gx
^P1STREET("IS","zl `aia","xg' c'")
'c 'gx
^P1STREET("IS","zl `aia","xg' d'")
'd 'gx
^P1STREET("IS","zl `aia","xg' e'")
'e 'gx
^P1STREET("IS","zl `aia","xg' f'")
'f 'gx
^P1STREET("IS","zl `aia","xg' g'")
'g 'gx
^P1STREET("IS","zl `aia","xg' h""e")
e"h 'gx
^P1STREET("IS","zl `aia","xg' h""f")
f"h 'gx
^P1STREET("IS","zl `aia","xg' h'")
'h 'gx
^P1STREET("IS","zl `aia","xg' i""`")
`"i 'gx
^P1STREET("IS","zl `aia","xg' i""a")
a"i 'gx
^P1STREET("IS","zl `aia","xg' i""b")
b"i 'gx
^P1STREET("IS","zl `aia","xg' i""c")
c"i 'gx
^P1STREET("IS","zl `aia","xg' i""f")
f"i 'gx
^P1STREET("IS","zl `aia","xg' i""g")
g"i 'gx
^P1STREET("IS","zl `aia","xg' i""h")
h"i 'gx
^P1STREET("IS","zl `aia","xg' i'")
'i 'gx
^P1STREET("IS","zl `aia","xg' k""`")
`"k 'gx
^P1STREET("IS","zl `aia","xg' k""a")
a"k 'gx
^P1STREET("IS","zl `aia","xg' k""b")
b"k 'gx
^P1STREET("IS","zl `aia","xg' k""c")
c"k 'gx
^P1STREET("IS","zl `aia","xg' k""d")
d"k 'gx
^P1STREET("IS","zl `aia","xg' k""e")
e"k 'gx
^P1STREET("IS","zl `aia","xg' k""f")
f"k 'gx
^P1STREET("IS","zl `aia","xg' k""g")
g"k 'gx
^P1STREET("IS","zl `aia","xg' k""h")
h"k 'gx
^P1STREET("IS","zl `aia","xg' k'")
'k 'gx
^P1STREET("IS","zl `aia","xg' l""`")
`"l 'gx
^P1STREET("IS","zl `aia","xg' l""a")
a"l 'gx
^P1STREET("IS","zl `aia","xg' l""b")
b"l 'gx
^P1STREET("IS","zl `aia","xg' l""c")
c"l 'gx
^P1STREET("IS","zl `aia","xg' l""d")
d"l 'gx
^P1STREET("IS","zl `aia","xg' l""e")
e"l 'gx
^P1STREET("IS","zl `aia","xg' l""f")
f"l 'gx
^P1STREET("IS","zl `aia","xg' l""g")
g"l 'gx
^P1STREET("IS","zl `aia","xg' l""h")
h"l 'gx
^P1STREET("IS","zl `aia","xg' l'")
'l 'gx
^P1STREET("IS","zl `aia","xg' n""`")
`"n 'gx
^P1STREET("IS","zl `aia","xg' n""a")
a"n 'gx
^P1STREET("IS","zl `aia","xg' n""b")
b"n 'gx
^P1STREET("IS","zl `aia","xg' n""c")
c"n 'gx
^P1STREET("IS","zl `aia","xg' n""d")
d"n 'gx
^P1STREET("IS","zl `aia","xg' n""e")
e"n 'gx
^P1STREET("IS","zl `aia","xg' n""f")
f"n 'gx
^P1STREET("IS","zl `aia","xg' n""h")
h"n 'gx
^P1STREET("IS","zl `aia","xg' n'")
'n 'gx
^P1STREET("IS","zl `aia","xg' p""`")
`"p 'gx
^P1STREET("IS","zl `aia","xg' p""b")
b"p 'gx
^P1STREET("IS","zl `aia","xg' p""c")
c"p 'gx
^P1STREET("IS","zl `aia","xg' p""d")
d"p 'gx
^P1STREET("IS","zl `aia","xg' p""e")
e"p 'gx
^P1STREET("IS","zl `aia","xg' p""f")
f"p 'gx
^P1STREET("IS","zl `aia","xg' p""g")
g"p 'gx
^P1STREET("IS","zl `aia","xg' p""h")
h"p 'gx
^P1STREET("IS","zl `aia","xg' p'")
'p 'gx
^P1STREET("IS","zl `aia","xg' q""`")
`"q 'gx
^P1STREET("IS","zl `aia","xg' q""a")
a"q 'gx
^P1STREET("IS","zl `aia","xg' q""b")
b"q 'gx
^P1STREET("IS","zl `aia","xg' q""c")
c"q 'gx
^P1STREET("IS","zl `aia","xg' q""d")
d"q 'gx
^P1STREET("IS","zl `aia","xg' q""e")
e"q 'gx
^P1STREET("IS","zl `aia","xg' q""l")
l"q 'gx
^P1STREET("IS","zl `aia","xg' r""b")
b"r 'gx
^P1STREET("IS","zl `aia","xg' t""c")
c"t 'gx
^P1STREET("IS","zl `aia","xg' t""d")
d"t 'gx
^P1STREET("IS","zl `aia","xg' t""f")
f"t 'gx
^P1STREET("IS","zl `aia","xgaz nil`pe")
ep`lin zagx
^P1STREET("IS","zl `aia","xgl")
lgx
^P1STREET("IS","zl `aia","xhey iepzo")
ozpei yehx
^P1STREET("IS","zl `aia","xi""f")
f"ix
^P1STREET("IS","zl `aia","xia""l")
l"aix
^P1STREET("IS","zl `aia","xiij")
jiix
^P1STREET("IS","zl `aia","xiipq")
qpiix
^P1STREET("IS","zl `aia","xiiq")
qiix
^P1STREET("IS","zl `aia","xils ivgw")
wgvi slix
^P1STREET("IS","zl `aia","xipblalem")
melalbpix
^P1STREET("IS","zl `aia","xiy blez`")
`zelb yix
^P1STREET("IS","zl `aia","xla""b")
b"alx
^P1STREET("IS","zl `aia","xna""m")
m"anx
^P1STREET("IS","zl `aia","xnad `iifiw")
wifii` danx
^P1STREET("IS","zl `aia","xnaxpch")
hcpxanx
^P1STREET("IS","zl `aia","xnd")
dnx
^P1STREET("IS","zl `aia","xnez ptzli")
ilztp zenx
^P1STREET("IS","zl `aia","xnf")
fnx
^P1STREET("IS","zl `aia","xng""l")
l"gnx
^P1STREET("IS","zl `aia","xp""w")
w"px
^P1STREET("IS","zl `aia","xrpo")
oprx
^P1STREET("IS","zl `aia","xt`l `lirf")
fril` l`tx
^P1STREET("IS","zl `aia","xticim")
micitx
^P1STREET("IS","zl `aia","xveo")
oevx
^P1STREET("IS","zl `aia","xwp`hi")
ih`pwx
^P1STREET("IS","zl `aia","xy""i")
i"yx
^P1STREET("IS","zl `aia","xys")
syx
^P1STREET("IS","zl `aia","xytim")
mityx
^P1STREET("IS","zl `aia","y""i")
i"y
^P1STREET("IS","zl `aia","y""i rbpeo")
oepbr i"y
^P1STREET("IS","zl `aia","y""u")
u"y
^P1STREET("IS","zl `aia","y`el `aibex")
xebia` le`y
^P1STREET("IS","zl `aia","y`x iyea")
aeyi x`y
^P1STREET("IS","zl `aia","y`xiz iyx`l")
l`xyi zix`y
^P1STREET("IS","zl `aia","yafi")
ifay
^P1STREET("IS","zl `aia","yag")
gay
^P1STREET("IS","zl `aia","yah")
hay
^P1STREET("IS","zl `aia","yah `yx")
xy` hay
^P1STREET("IS","zl `aia","yah apinio")
oinipa hay
^P1STREET("IS","zl `aia","yah bc")
cb hay
^P1STREET("IS","zl `aia","yah co")
oc hay
^P1STREET("IS","zl `aia","yah faeleo")
oeleaf hay
^P1STREET("IS","zl `aia","yah idecd")
dcedi hay
^P1STREET("IS","zl `aia","yah ieqs")
sqei hay
^P1STREET("IS","zl `aia","yah iyykx")
xkyyi hay
^P1STREET("IS","zl `aia","yah lei")
iel hay
^P1STREET("IS","zl `aia","yah ptzli")
ilztp hay
^P1STREET("IS","zl `aia","yah x`eao")
oae`x hay
^P1STREET("IS","zl `aia","yah ynreo")
oerny hay
^P1STREET("IS","zl `aia","yahi iyx`l")
l`xyi ihay
^P1STREET("IS","zl `aia","yaia")
aiay
^P1STREET("IS","zl `aia","yail d`hc")
ch`d liay
^P1STREET("IS","zl `aia","yail dgla")
algd liay
^P1STREET("IS","zl `aia","yail dntrl")
lrtnd liay
^P1STREET("IS","zl `aia","yail dnxu")
uxnd liay
^P1STREET("IS","zl `aia","yail rke")
ekr liay
^P1STREET("IS","zl `aia","yalim")
milay
^P1STREET("IS","zl `aia","yaz`i")
i`zay
^P1STREET("IS","zl `aia","yaz`i irwa")
awri i`zay
^P1STREET("IS","zl `aia","yba")
aby
^P1STREET("IS","zl `aia","yc""l")
l"cy
^P1STREET("IS","zl `aia","yc' `apx n`ix")
xi`n xpa` 'cy
^P1STREET("IS","zl `aia","yc' ao bexieo")
oeixeb oa 'cy
^P1STREET("IS","zl `aia","yc' ao vieo")
oeiv oa 'cy
^P1STREET("IS","zl `aia","yc' dary""h")
h"yrad 'cy
^P1STREET("IS","zl `aia","yc' ddykld")
dlkydd 'cy
^P1STREET("IS","zl `aia","yc' deziwim")
miwized 'cy
^P1STREET("IS","zl `aia","yc' dgi""l")
l"igd 'cy
^P1STREET("IS","zl `aia","yc' dievx")
xveid 'cy
^P1STREET("IS","zl `aia","yc' dnlj cec")
cec jlnd 'cy
^P1STREET("IS","zl `aia","yc' dnrtilim")
militrnd 'cy
^P1STREET("IS","zl `aia","yc' dviepez")
zepeivd 'cy
^P1STREET("IS","zl `aia","yc' dx vieo")
oeiv xd 'cy
^P1STREET("IS","zl `aia","yc' dyeypim")
mipyeyd 'cy
^P1STREET("IS","zl `aia","yc' dylkz")
zklyd 'cy
^P1STREET("IS","zl `aia","yc' eyipbheo")
oehbpiye 'cy
^P1STREET("IS","zl `aia","yc' g""o")
o"g 'cy
^P1STREET("IS","zl `aia","yc' ga""c")
c"ag 'cy
^P1STREET("IS","zl `aia","yc' gkni iyx`l")
l`xyi inkg 'cy
^P1STREET("IS","zl `aia","yc' gkni lealio")
oilael inkg 'cy
^P1STREET("IS","zl `aia","yc' ic lapim")
mipal ci 'cy
^P1STREET("IS","zl `aia","yc' ideciz")
zicedi 'cy
^P1STREET("IS","zl `aia","yc' ixeylim")
milyexi 'cy
^P1STREET("IS","zl `aia","yc' iyx`l bexi")
ixeb l`xyi 'cy
^P1STREET("IS","zl `aia","yc' nik`l p`no")
on`p l`kin 'cy
^P1STREET("IS","zl `aia","yc' nqxiw")
wixqn 'cy
^P1STREET("IS","zl `aia","yc' pexc`e")
e`cxep 'cy
^P1STREET("IS","zl `aia","yc' qn`hq")
qh`nq 'cy
^P1STREET("IS","zl `aia","yc' rnpe`l")
l`epnr 'cy
^P1STREET("IS","zl `aia","yc' wxo diqec")
ceqid oxw 'cy
^P1STREET("IS","zl `aia","yc' wxo wiinz")
zniiw oxw 'cy
^P1STREET("IS","zl `aia","yc' xehyilc")
cliyhex 'cy
^P1STREET("IS","zl `aia","yc' xewg iyx`l")
l`xyi gwex 'cy
^P1STREET("IS","zl `aia","yc' y`el dnlj")
jlnd le`y 'cy
^P1STREET("IS","zl `aia","yc' yyz dinim")
minid zyy 'cy
^P1STREET("IS","zl `aia","yc' zxq""h")
h"qxz 'cy
^P1STREET("IS","zl `aia","yc' zy""g")
g"yz 'cy
^P1STREET("IS","zl `aia","yedm")
mdey
^P1STREET("IS","zl `aia","yelniz")
zinley
^P1STREET("IS","zl `aia","yelno")
onley
^P1STREET("IS","zl `aia","yepvipe")
epivpey
^P1STREET("IS","zl `aia","yewo")
owey
^P1STREET("IS","zl `aia","yexx giim")
miig xxey
^P1STREET("IS","zl `aia","yeypz dnim")
mind zpyey
^P1STREET("IS","zl `aia","yg""l")
l"gy
^P1STREET("IS","zl `aia","yhial")
laihy
^P1STREET("IS","zl `aia","yhiio")
oiihy
^P1STREET("IS","zl `aia","yhiipno `lirfx")
xfril` onpiihy
^P1STREET("IS","zl `aia","yhiipx")
xpiihy
^P1STREET("IS","zl `aia","yhipaxb")
bxapihy
^P1STREET("IS","zl `aia","yhipypicx")
xcipypihy
^P1STREET("IS","zl `aia","yhpc")
cphy
^P1STREET("IS","zl `aia","yhx`eq")
qe`xhy
^P1STREET("IS","zl `aia","yhxew")
wexhy
^P1STREET("IS","zl `aia","yhxiwx")
xwixhy
^P1STREET("IS","zl `aia","yhxpdxu")
uxdpxhy
^P1STREET("IS","zl `aia","yi""x")
x"iy
^P1STREET("IS","zl `aia","yiaz vieo")
oeiv zaiy
^P1STREET("IS","zl `aia","yihxiz")
zixhiy
^P1STREET("IS","zl `aia","yild")
dliy
^P1STREET("IS","zl `aia","yilx")
xliy
^P1STREET("IS","zl `aia","yipwio")
oiwpiy
^P1STREET("IS","zl `aia","yitx")
xtiy
^P1STREET("IS","zl `aia","yiw")
wiy
^P1STREET("IS","zl `aia","yix dyixim")
mixiyd xiy
^P1STREET("IS","zl `aia","yl""b")
b"ly
^P1STREET("IS","zl `aia","ylaim")
mialy
^P1STREET("IS","zl `aia","yldaiz")
ziadly
^P1STREET("IS","zl `aia","ylegez")
zegely
^P1STREET("IS","zl `aia","ylem `y")
y` mely
^P1STREET("IS","zl `aia","ylem rlikm")
mkilr mely
^P1STREET("IS","zl `aia","ylenvieo dnlkd")
dklnd oeivnely
^P1STREET("IS","zl `aia","ylepqwi")
iwqpely
^P1STREET("IS","zl `aia","yley")
yely
^P1STREET("IS","zl `aia","ylfipbx")
xbpifly
^P1STREET("IS","zl `aia","ylnd ao ieqs")
sqei oa dnly
^P1STREET("IS","zl `aia","ylnd dnlj")
jlnd dnly
^P1STREET("IS","zl `aia","ylneo")
oenly
^P1STREET("IS","zl `aia","ylyz dgvim")
mivgd zyly
^P1STREET("IS","zl `aia","ym dbcelim")
milecbd my
^P1STREET("IS","zl `aia","ynbx")
xbny
^P1STREET("IS","zl `aia","yne`l dpbic")
cibpd l`eny
^P1STREET("IS","zl `aia","yne`l znix")
xinz l`eny
^P1STREET("IS","zl `aia","yneliw qbl")
lbq wileny
^P1STREET("IS","zl `aia","yngd")
dgny
^P1STREET("IS","zl `aia","yngd delvaxb")
bxavled dgny
^P1STREET("IS","zl `aia","ynix")
xiny
^P1STREET("IS","zl `aia","ynreo `aico")
ocia` oerny
^P1STREET("IS","zl `aia","ynreo ao yhg")
ghy oa oerny
^P1STREET("IS","zl `aia","ynreo daexqwi")
iwqxead oerny
^P1STREET("IS","zl `aia","ynreo dvciw")
wicvd oerny
^P1STREET("IS","zl `aia","ynreo dzxqi")
iqxzd oerny
^P1STREET("IS","zl `aia","ynreo xewg")
gwex oerny
^P1STREET("IS","zl `aia","ynrepi")
iperny
^P1STREET("IS","zl `aia","ynrid")
dirny
^P1STREET("IS","zl `aia","ynxide leio")
oiel edixny
^P1STREET("IS","zl `aia","ynxlipb")
bpilxny
^P1STREET("IS","zl `aia","ynyeo")
oeyny
^P1STREET("IS","zl `aia","yo `xi")
ix` oy
^P1STREET("IS","zl `aia","ypivlx")
xlvipy
^P1STREET("IS","zl `aia","ypivx yne`l")
l`eny xvipy
^P1STREET("IS","zl `aia","ypix")
xipy
^P1STREET("IS","zl `aia","ypwx `xid")
dix` xwpy
^P1STREET("IS","zl `aia","yrx dbi`")
`ibd xry
^P1STREET("IS","zl `aia","yrx vieo")
oeiv xry
^P1STREET("IS","zl `aia","yrxi piwpex")
xepwip ixry
^P1STREET("IS","zl `aia","yrxi zyead")
daeyz ixry
^P1STREET("IS","zl `aia","ytid")
dity
^P1STREET("IS","zl `aia","ytiim")
miity
^P1STREET("IS","zl `aia","ytipefd")
dfepity
^P1STREET("IS","zl `aia","ytix wliio")
oiilw xity
^P1STREET("IS","zl `aia","ytix` vai dxno")
onxd iav `xity
^P1STREET("IS","zl `aia","ytr hl")
lh rty
^P1STREET("IS","zl `aia","ytxipvw")
wvpixty
^P1STREET("IS","zl `aia","ytzi iypim")
mipyi izty
^P1STREET("IS","zl `aia","ywc")
cwy
^P1STREET("IS","zl `aia","yxb` txicno")
oncixt `bxy
^P1STREET("IS","zl `aia","yxeo `xid")
dix` oexy
^P1STREET("IS","zl `aia","yxic")
cixy
^P1STREET("IS","zl `aia","yxix` b`eo")
oe`b `xixy
^P1STREET("IS","zl `aia","yxrai")
iarxy
^P1STREET("IS","zl `aia","yxyim")
miyxy
^P1STREET("IS","zl `aia","yxyxz")
zxyxy
^P1STREET("IS","zl `aia","yyeo")
oeyy
^P1STREET("IS","zl `aia","yzelim")
milezy
^P1STREET("IS","zl `aia","yzi `giez")
zeig` izy
^P1STREET("IS","zl `aia","zae`ez d`xu")
ux`d ze`eaz
^P1STREET("IS","zl `aia","zcdx cec")
cec xdcz
^P1STREET("IS","zl `aia","zeal")
laez
^P1STREET("IS","zl `aia","zenxwio")
oiwxnez
^P1STREET("IS","zl `aia","zeqtz`")
`ztqez
^P1STREET("IS","zl `aia","zevxz d`xu")
ux`d zxvez
^P1STREET("IS","zl `aia","zeyid")
diyez
^P1STREET("IS","zl `aia","zez")
zez
^P1STREET("IS","zl `aia","zgknepi")
ipenkgz
^P1STREET("IS","zl `aia","zixey")
yexiz
^P1STREET("IS","zl `aia","zl axej")
jexa lz
^P1STREET("IS","zl `aia","zl baexim")
mixeab lz
^P1STREET("IS","zl `aia","zl gi")
ig lz
^P1STREET("IS","zl `aia","zlnec aali")
ilaa cenlz
^P1STREET("IS","zl `aia","znef")
fenz
^P1STREET("IS","zl `aia","znpr")
rpnz
^P1STREET("IS","zl `aia","znxix")
xixnz
^P1STREET("IS","zl `aia","zteg")
getz
^P1STREET("IS","zl `aia","zwer")
rewz
^P1STREET("IS","zl `aia","zxcieo")
oeicxz
^P1STREET("IS","zl `aia","zxn""a")
a"nxz
^P1STREET("IS","zl `aia","zxt""`")
`"txz
^P1STREET("IS","zl `aia","zxt""h")
h"txz
^P1STREET("IS","zl `aia","zxv""e")
e"vxz
^P1STREET("IS","zl `aia","zxvd")
dvxz
^P1STREET("IS","zl `aia","zxyiy")
yiyxz
^P1STREET("IS","zl `aia","zyai")
iayz
^P1STREET("IS","zl `aia","zyxi")
ixyz
^P1STREET("IS","zl ieqs")
sqei lz
^P1STREET("IS","zl ivgw")
wgvi lz
^P1STREET("IS","zl ivgw","tqi dxkaz")
zakxd iqt
^P1STREET("IS","zl nepc")
cpen lz
^P1STREET("IS","zl nepc","`api go")
og ipa`
^P1STREET("IS","zl nepc","`dad")
dad`
^P1STREET("IS","zl nepc","`ged")
deg`
^P1STREET("IS","zl nepc","`ptd")
dtp`
^P1STREET("IS","zl nepc","`xal")
lax`
^P1STREET("IS","zl nepc","ayex")
xeya
^P1STREET("IS","zl nepc","az go")
og za
^P1STREET("IS","zl nepc","cekitz")
ztikec
^P1STREET("IS","zl nepc","cela")
alec
^P1STREET("IS","zl nepc","clid")
dilc
^P1STREET("IS","zl nepc","co")
oc
^P1STREET("IS","zl nepc","cxj api cxex")
xexc ipa jxc
^P1STREET("IS","zl nepc","cxj dlexc")
cxeld jxc
^P1STREET("IS","zl nepc","d`exo")
oxe`d
^P1STREET("IS","zl nepc","d`expiz")
zipxe`d
^P1STREET("IS","zl nepc","d`ixiq")
qixi`d
^P1STREET("IS","zl nepc","d`ld")
dl`d
^P1STREET("IS","zl nepc","d`leo")
oel`d
^P1STREET("IS","zl nepc","daxey")
yexad
^P1STREET("IS","zl nepc","daxwz")
zwxad
^P1STREET("IS","zl nepc","dbelo")
olebd
^P1STREET("IS","zl nepc","dblaer")
realbd
^P1STREET("IS","zl nepc","dbto")
otbd
^P1STREET("IS","zl nepc","dctpd")
dptcd
^P1STREET("IS","zl nepc","dcwl")
lwcd
^P1STREET("IS","zl nepc","ddcq")
qcdd
^P1STREET("IS","zl nepc","ddcxim")
mixcdd
^P1STREET("IS","zl nepc","dexc")
cxed
^P1STREET("IS","zl nepc","dfiz")
zifd
^P1STREET("IS","zl nepc","dfnix")
xinfd
^P1STREET("IS","zl nepc","dgavlz")
zlvagd
^P1STREET("IS","zl nepc","dgva")
avgd
^P1STREET("IS","zl nepc","dgxea")
aexgd
^P1STREET("IS","zl nepc","dgxez")
zexgd
^P1STREET("IS","zl nepc","dgxneo")
oenxgd
^P1STREET("IS","zl nepc","dgxviz")
zivxgd
^P1STREET("IS","zl nepc","didlem")
meldid
^P1STREET("IS","zl nepc","dixco")
ocxid
^P1STREET("IS","zl nepc","dklpiz")
ziplkd
^P1STREET("IS","zl nepc","dkxnl")
lnxkd
^P1STREET("IS","zl nepc","dlilj")
jlild
^P1STREET("IS","zl nepc","dlineo")
oenild
^P1STREET("IS","zl nepc","dlym")
myld
^P1STREET("IS","zl nepc","dnhrim")
mirhnd
^P1STREET("IS","zl nepc","dnpbe")
ebpnd
^P1STREET("IS","zl nepc","dpexiz")
zixepd
^P1STREET("IS","zl nepc","dpxwiq")
qiwxpd
^P1STREET("IS","zl nepc","dqaieo")
oeiaqd
^P1STREET("IS","zl nepc","dqibliz")
zilbiqd
^P1STREET("IS","zl nepc","dqiito")
otiiqd
^P1STREET("IS","zl nepc","dtxcq")
qcxtd
^P1STREET("IS","zl nepc","dvarepi")
iperavd
^P1STREET("IS","zl nepc","dvax")
xavd
^P1STREET("IS","zl nepc","dxineo")
oenixd
^P1STREET("IS","zl nepc","dxwtz")
ztwxd
^P1STREET("IS","zl nepc","dyedm")
mdeyd
^P1STREET("IS","zl nepc","dywc")
cwyd
^P1STREET("IS","zl nepc","dywnd")
dnwyd
^P1STREET("IS","zl nepc","dz`pd")
dp`zd
^P1STREET("IS","zl nepc","dzaex")
xeazd
^P1STREET("IS","zl nepc","dznx")
xnzd
^P1STREET("IS","zl nepc","dztef")
fetzd
^P1STREET("IS","zl nepc","feizo")
ozief
^P1STREET("IS","zl nepc","gegiz")
zigeg
^P1STREET("IS","zl nepc","gqicd")
dciqg
^P1STREET("IS","zl nepc","icicez")
zecici
^P1STREET("IS","zl nepc","iqnio")
oinqi
^P1STREET("IS","zl nepc","ixnej")
jenxi
^P1STREET("IS","zl nepc","lkiy")
yikl
^P1STREET("IS","zl nepc","nixeo")
oexin
^P1STREET("IS","zl nepc","nvcd")
dcvn
^P1STREET("IS","zl nepc","nxbpiz")
zipbxn
^P1STREET("IS","zl nepc","nyrel nexid")
dixen leryn
^P1STREET("IS","zl nepc","pae")
eap
^P1STREET("IS","zl nepc","px dapim")
mipad xp
^P1STREET("IS","zl nepc","qlriz")
zirlq
^P1STREET("IS","zl nepc","qpepiz")
zipepq
^P1STREET("IS","zl nepc","rio yxic")
cixy oir
^P1STREET("IS","zl nepc","telb")
blet
^P1STREET("IS","zl nepc","tw`o")
o`wt
^P1STREET("IS","zl nepc","vetiz")
zitev
^P1STREET("IS","zl nepc","wxo diqec")
ceqid oxw
^P1STREET("IS","zl nepc","xezm")
mzex
^P1STREET("IS","zl nepc","xrez")
zerx
^P1STREET("IS","zl nepc","yexw")
wxey
^P1STREET("IS","zl nepc","ygs")
sgy
^P1STREET("IS","zl nepc","yleed")
deely
^P1STREET("IS","zl pes")
sep lz
^P1STREET("IS","zl pes","yb")
by
^P1STREET("IS","zl rcyim")
miycr lz
^P1STREET("IS","zl vieo")
oeiv lz
^P1STREET("IS","zl vieo","`daz `nz")
zn` zad`
^P1STREET("IS","zl vieo","`daz iyx`l")
l`xyi zad`
^P1STREET("IS","zl vieo","nwex axej")
jexa xewn
^P1STREET("IS","zl wvix")
xivw lz
^P1STREET("IS","zl yar")
ray lz
^P1STREET("IS","zl yar","xg' 100")
100 'gx
^P1STREET("IS","zl yar","xg' 137")
137 'gx
^P1STREET("IS","zl yar","xg' 178")
178 'gx
^P1STREET("IS","zl yar","xg' 26")
26 'gx
^P1STREET("IS","zl yar","xg' 4")
4 'gx
^P1STREET("IS","zl yar","xg' 62")
62 'gx
^P1STREET("IS","zl yar","xg' 9")
9 'gx
^P1STREET("IS","zlni igi`l")
l`igi inlz
^P1STREET("IS","zlni itd")
dti inlz
^P1STREET("IS","znxz")
zxnz
^P1STREET("IS","znxz","d`exo")
oxe`d
^P1STREET("IS","znxz","d`ld")
dl`d
^P1STREET("IS","znxz","d`leo")
oel`d
^P1STREET("IS","znxz","daxey")
yexad
^P1STREET("IS","znxz","dcq")
qcd
^P1STREET("IS","znxz","dfiz")
zifd
^P1STREET("IS","znxz","dgxea")
aexgd
^P1STREET("IS","znxz","dliapd")
dpaild
^P1STREET("IS","znxz","dyihd")
dhiyd
^P1STREET("IS","znxz","irxd")
dxri
^P1STREET("IS","znxz","lehm")
mhel
^P1STREET("IS","znxz","nexo")
oxen
^P1STREET("IS","zref")
ferz
^P1STREET("IS","zto")
otz
^P1STREET("IS","ztxg")
gxtz
^P1STREET("IS","ztxg","dbard")
drabd
^P1STREET("IS","zwend")
dnewz
^P1STREET("IS","zxem")
mexz
^SCR
WTBINIT
^SCR("A2HZGV")
H
^SCR("A2HZGV",1)
                            # dwical `"k xez zbvd #                            
^SCR("A2HZGV",2)
                             {10 } dry {05     } jix`z                         
^SCR("A2HZGV",3)
                                                                          1$   
^SCR("A2HZGV",4)
           : qihxk zlaw onf : seqn :  mekq  :        qihxk 'qn       :         
^SCR("A2HZGV",5)
                                                                               
^SCR("A2HZGV",6)
                                                                               
^SCR("A2HZGV",7)
                                                                               
^SCR("A2HZGV",8)
                                                                               
^SCR("A2HZGV",9)
                                                                               
^SCR("A2HZGV",10)
                                                                               
^SCR("A2HZGV",11)
                                                                               
^SCR("A2HZGV",12)
                                                                               
^SCR("A2HZGV",13)
                                                                               
^SCR("A2HZGV",14)
                                                                               
^SCR("A2HZGV",15)
                                                                               
^SCR("A2HZGV",16)
                                                                               
^SCR("A2HZGV",17)
                                                                               
^SCR("A2HZGV",18)
                                                                               
^SCR("A2HZGV",19)
        $1                                                                     
^SCR("A2HZGV","A",1)
„—‰ƒ�Œ€"‹˜…šš‚–„
^SCR("A2HZGV","A",2)
„’™Š‰˜€š
^SCR("A2HZGV","A",3)

^SCR("A2HZGV","A",4)
‘‰ˆ˜‹šŒ�—�Ž†“…‘Ž�…‹‘‘‰ˆ˜‹'‘Ž
^SCR("A2HZGV","A",5)
------------------------------------------------------
^SCR("A2HZGV","A",6)

^SCR("A2HZGV","A",7)

^SCR("A2HZGV","A",8)

^SCR("A2HZGV","A",9)

^SCR("A2HZGV","A",10)

^SCR("A2HZGV","A",11)

^SCR("A2HZGV","A",12)

^SCR("A2HZGV","A",13)

^SCR("A2HZGV","A",14)

^SCR("A2HZGV","A",15)

^SCR("A2HZGV","A",16)

^SCR("A2HZGV","A",17)

^SCR("A2HZGV","A",18)

^SCR("A2HZGV","A",19)

^SCR("A2HZGV","AV",1)
vehsckt"fru,,dmv
^SCR("A2HZGV","AV",2)
vgalhrt,
^SCR("A2HZGV","AV",3)

^SCR("A2HZGV","AV",4)
xhyrf,kceinz;uxnoufxxhyrfwxn
^SCR("A2HZGV","AV",5)
------------------------------------------------------
^SCR("A2HZGV","AV",6)

^SCR("A2HZGV","AV",7)

^SCR("A2HZGV","AV",8)

^SCR("A2HZGV","AV",9)

^SCR("A2HZGV","AV",10)

^SCR("A2HZGV","AV",11)

^SCR("A2HZGV","AV",12)

^SCR("A2HZGV","AV",13)

^SCR("A2HZGV","AV",14)

^SCR("A2HZGV","AV",15)

^SCR("A2HZGV","AV",16)

^SCR("A2HZGV","AV",17)

^SCR("A2HZGV","AV",18)

^SCR("A2HZGV","AV",19)

^SCR("A2HZGV","G",1,"CRD")
5,69,E,19,0
^SCR("A2HZGV","G",1,"HELP")

^SCR("A2HZGV","G",1,"LMAX")
24
^SCR("A2HZGV","G",1,"MUMPS1")

^SCR("A2HZGV","G",1,"MUMPS2")

^SCR("A2HZGV","G",1,"OUTPUT")

^SCR("A2HZGV","G",1,"SHEM")
        qihxk 'qn       
^SCR("A2HZGV","G",1,"TYP")
E
^SCR("A2HZGV","G",2,"CRD")
5,44,N,8,2
^SCR("A2HZGV","G",2,"HELP")

^SCR("A2HZGV","G",2,"LMAX")
8
^SCR("A2HZGV","G",2,"MUMPS1")

^SCR("A2HZGV","G",2,"MUMPS2")

^SCR("A2HZGV","G",2,"OUTPUT")

^SCR("A2HZGV","G",2,"SHEM")
  mekq  
^SCR("A2HZGV","G",2,"TYP")
N
^SCR("A2HZGV","G",3,"CRD")
5,35,N,4,0
^SCR("A2HZGV","G",3,"HELP")

^SCR("A2HZGV","G",3,"LMAX")
6
^SCR("A2HZGV","G",3,"MUMPS1")

^SCR("A2HZGV","G",3,"MUMPS2")

^SCR("A2HZGV","G",3,"SHEM")
 seqn 
^SCR("A2HZGV","G",3,"TYP")
N
^SCR("A2HZGV","G",4,"CRD")
5,28,E,16,0
^SCR("A2HZGV","G",4,"HELP")

^SCR("A2HZGV","G",4,"LMAX")
16
^SCR("A2HZGV","G",4,"MUMPS1")

^SCR("A2HZGV","G",4,"MUMPS2")

^SCR("A2HZGV","G",4,"OUTPUT")

^SCR("A2HZGV","G",4,"SHEM")
 qihxk zlaw onf 
^SCR("A2HZGV","G",4,"TYP")
E
^SCR("A2HZGV","G","DEL")

^SCR("A2HZGV","G","MAX")
999
^SCR("A2HZGV","G","NAME","CARD")
1
^SCR("A2HZGV","G","NAME","MASOF")
3
^SCR("A2HZGV","G","NAME","SUM")
2
^SCR("A2HZGV","G","NAME","ZMANK")
4
^SCR("A2HZGV","G","NM",1)
CARD
^SCR("A2HZGV","G","NM",2)
SUM
^SCR("A2HZGV","G","NM",3)
MASOF
^SCR("A2HZGV","G","NM",4)
ZMANK
^SCR("A2HZGV","G","RB")
4,9,20,76
^SCR("A2HZGV","G","REF")
^TEMP($P
^SCR("A2HZGV","G","RZD")
\
^SCR("A2HZGV","G","STEP")
1
^SCR("A2HZGV","G","STG")
           : qihxk zlaw onf : seqn :  mekq  :        qihxk 'qn       :         
^SCR("A2HZGV","G","VG")
6
^SCR("A2HZGV","NAME")
dwical xez zbvd
^SCR("A2HZGV","P",5,"CRD")
2,39,D,8,0
^SCR("A2HZGV","P",5,"HELP")

^SCR("A2HZGV","P",5,"LMAX")
8
^SCR("A2HZGV","P",5,"MUMPS1")

^SCR("A2HZGV","P",5,"MUMPS2")

^SCR("A2HZGV","P",5,"OUTPUT")

^SCR("A2HZGV","P",5,"TYP")
D
^SCR("A2HZGV","P",10,"CRD")
2,29,T,4,0
^SCR("A2HZGV","P",10,"HELP")

^SCR("A2HZGV","P",10,"LMAX")
4
^SCR("A2HZGV","P",10,"MUMPS1")

^SCR("A2HZGV","P",10,"MUMPS2")

^SCR("A2HZGV","P",10,"OUTPUT")

^SCR("A2HZGV","P",10,"TYP")
T
^SCR("A2HZGV","P","NAME","SHAA")
10
^SCR("A2HZGV","P","NAME","TRH")
5
^SCR("A2HZGV","P","NM",5)
TRH
^SCR("A2HZGV","P","NM",10)
SHAA
^SCR("AA")
H
^SCR("AA",1)
                                              {       05} : zzzz````lllllcccccc
^SCR("AA","AV",1)
:,,,,ttttkkkkkssssss
^SCR("AA","NAME")

^SCR("AA","P",5,"CRD")
1,57,H,10,0
^SCR("AA","P",5,"HELP")

^SCR("AA","P",5,"LMAX")
10
^SCR("AA","P",5,"MUMPS1")

^SCR("AA","P",5,"MUMPS2")

^SCR("AA","P",5,"TYP")
H
^SCR("AA","P","NAME","AA")
5
^SCR("AA","P","NM",5)
AA
^SCR("AH")
H
^SCR("AH",1)
                                                                          1]   
^SCR("AH",2)
                   {   07} dwica cer      {       05} : zzzz````lllllcccccc    
^SCR("AH",3)
                                                         {10    } dwica mzq    
^SCR("AH",4)
        [1                                                                     
^SCR("AH",5)
                                                                               
^SCR("AH","AV",1)

^SCR("AH","AV",2)
ä÷éãáãåò:úúúúààààìììììãããããã
^SCR("AH","AV",3)
ä÷éãáíúñ
^SCR("AH","AV",4)

^SCR("AH","AV",5)

^SCR("AH","NAME")
1
^SCR("AH","P",5,"CRD")
2,53,H,10,0
^SCR("AH","P",5,"HELP")

^SCR("AH","P",5,"LMAX")
10
^SCR("AH","P",5,"MUMPS1")

^SCR("AH","P",5,"MUMPS2")

^SCR("AH","P",5,"TYP")
H
^SCR("AH","P",7,"CRD")
2,26,H,6
^SCR("AH","P",7,"HELP")

^SCR("AH","P",7,"LMAX")
6
^SCR("AH","P",7,"MUMPS1")

^SCR("AH","P",7,"MUMPS2")

^SCR("AH","P",7,"TYP")
H
^SCR("AH","P",10,"CRD")
3,57,E,7,0
^SCR("AH","P",10,"HELP")

^SCR("AH","P",10,"LMAX")
7
^SCR("AH","P",10,"MUMPS1")

^SCR("AH","P",10,"MUMPS2")

^SCR("AH","P",10,"TYP")
E
^SCR("AH","P","NAME","A1")
5
^SCR("AH","P","NAME","A2")
10
^SCR("AH","P","NAME","A3")
7
^SCR("AH","P","NM",5)
A1
^SCR("AH","P","NM",7)
A3
^SCR("AH","P","NM",10)
A2
^SCR("AH","P","RB",1)
2,9,5,76
^SCR("ARZ")
H
^SCR("ARZ",1)
                                # dfix` - hixt zlah #                          
^SCR("ARZ",2)
                                                                               
^SCR("ARZ",3)
                                                                             1$
^SCR("ARZ",4)
           :     dfix` xe`z     :   dfix`  :      dveaw xe`z    :   hixt   :   
^SCR("ARZ",5)
                                                                               
^SCR("ARZ",6)
                                                                               
^SCR("ARZ",7)
                                                                               
^SCR("ARZ",8)
                                                                               
^SCR("ARZ",9)
                                                                               
^SCR("ARZ",10)
                                                                               
^SCR("ARZ",11)
                                                                               
^SCR("ARZ",12)
                                                                               
^SCR("ARZ",13)
                                                                               
^SCR("ARZ",14)
                                                                               
^SCR("ARZ",15)
                                                                               
^SCR("ARZ",16)
                                                                               
^SCR("ARZ",17)
 $1                                                                            
^SCR("ARZ",18)
                                                                               
^SCR("ARZ","A",1)
„†‰˜€-ˆ‰˜”šŒ�ˆ
^SCR("ARZ","A",2)

^SCR("ARZ","A",3)

^SCR("ARZ","A",4)
„†‰˜€˜…€š„†‰˜€„–…�—˜…€šˆ‰˜”
^SCR("ARZ","A",5)
---------------------------------------------------------------
^SCR("ARZ","A",6)

^SCR("ARZ","A",7)

^SCR("ARZ","A",8)

^SCR("ARZ","A",9)

^SCR("ARZ","A",10)

^SCR("ARZ","A",11)

^SCR("ARZ","A",12)

^SCR("ARZ","A",13)

^SCR("ARZ","A",14)

^SCR("ARZ","A",15)

^SCR("ARZ","A",16)

^SCR("ARZ","A",17)

^SCR("ARZ","A",18)

^SCR("ARZ","AV",1)
vzhrt-yhrp,kcy
^SCR("ARZ","AV",2)

^SCR("ARZ","AV",3)

^SCR("ARZ","AV",4)
vzhrtrut,vzhrtvmucerut,yhrp
^SCR("ARZ","AV",5)
---------------------------------------------------------------
^SCR("ARZ","AV",6)

^SCR("ARZ","AV",7)

^SCR("ARZ","AV",8)

^SCR("ARZ","AV",9)

^SCR("ARZ","AV",10)

^SCR("ARZ","AV",11)

^SCR("ARZ","AV",12)

^SCR("ARZ","AV",13)

^SCR("ARZ","AV",14)

^SCR("ARZ","AV",15)

^SCR("ARZ","AV",16)

^SCR("ARZ","AV",17)

^SCR("ARZ","AV",18)

^SCR("ARZ","G",1,"CHECK")
Y
^SCR("ARZ","G",1,"CRD")
5,75,E,8,0
^SCR("ARZ","G",1,"FNC")

^SCR("ARZ","G",1,"GLOB")
PAR
^SCR("ARZ","G",1,"HELP")

^SCR("ARZ","G",1,"LMAX")
10
^SCR("ARZ","G",1,"MUMPS1")

^SCR("ARZ","G",1,"MUMPS2")
D BDIKA^P1ARZ
^SCR("ARZ","G",1,"MUST")

^SCR("ARZ","G",1,"NLN")
20
^SCR("ARZ","G",1,"RZD")
**
^SCR("ARZ","G",1,"SHEM")
   hixt   
^SCR("ARZ","G",1,"TOPB")
8
^SCR("ARZ","G",1,"TYP")
E
^SCR("ARZ","G",1,"VRB")
PARIT1
^SCR("ARZ","G",2,"CRD")
5,64,H,20,0
^SCR("ARZ","G",2,"HELP")

^SCR("ARZ","G",2,"LMAX")
20
^SCR("ARZ","G",2,"MUMPS1")

^SCR("ARZ","G",2,"MUMPS2")

^SCR("ARZ","G",2,"OUTPUT")

^SCR("ARZ","G",2,"SHEM")
      dveaw xe`z    
^SCR("ARZ","G",2,"TYP")
H
^SCR("ARZ","G",3,"CHECK")
Y
^SCR("ARZ","G",3,"CRD")
5,43,E,8,0
^SCR("ARZ","G",3,"FNC")

^SCR("ARZ","G",3,"GLOB")
PAR
^SCR("ARZ","G",3,"HELP")
<F7> - hixt 'qn itl , <F6> - my itl qetig 
^SCR("ARZ","G",3,"LMAX")
10
^SCR("ARZ","G",3,"MUMPS1")

^SCR("ARZ","G",3,"MUMPS2")
D ARIZA^P1ARZ
^SCR("ARZ","G",3,"NLN")
20
^SCR("ARZ","G",3,"RZD")
**
^SCR("ARZ","G",3,"SHEM")
   dfix`  
^SCR("ARZ","G",3,"TOPB")
8
^SCR("ARZ","G",3,"TYP")
E
^SCR("ARZ","G",3,"VRB")
ARIZA1
^SCR("ARZ","G",4,"CRD")
5,32,H,20,0
^SCR("ARZ","G",4,"HELP")

^SCR("ARZ","G",4,"LMAX")
20
^SCR("ARZ","G",4,"MUMPS1")

^SCR("ARZ","G",4,"MUMPS2")

^SCR("ARZ","G",4,"OUTPUT")

^SCR("ARZ","G",4,"SHEM")
     dfix` xe`z     
^SCR("ARZ","G",4,"TYP")
H
^SCR("ARZ","G","DEL")
Y
^SCR("ARZ","G","MAX")
999
^SCR("ARZ","G","NAME","ARIZA")
3
^SCR("ARZ","G","NAME","ARIZA1")
4
^SCR("ARZ","G","NAME","PARIT")
1
^SCR("ARZ","G","NAME","PARIT1")
2
^SCR("ARZ","G","NM",1)
PARIT
^SCR("ARZ","G","NM",2)
PARIT1
^SCR("ARZ","G","NM",3)
ARIZA
^SCR("ARZ","G","NM",4)
ARIZA1
^SCR("ARZ","G","RB")
4,2,18,79
^SCR("ARZ","G","REF")
^TEMP($P,"ARZ"
^SCR("ARZ","G","RZD")
\
^SCR("ARZ","G","STEP")
1
^SCR("ARZ","G","STG")
           :     dfix` xe`z     :   dfix`  :      dveaw xe`z    :   hixt   :   
^SCR("ARZ","G","VG")
6
^SCR("ARZ","NAME")

^SCR("B1ACTCRD")
H
^SCR("B1ACTCRD",1)
                                                                               
^SCR("B1ACTCRD",2)
                                                                               
^SCR("B1ACTCRD",3)
                                                                               
^SCR("B1ACTCRD",4)
                                                                     1]        
^SCR("B1ACTCRD",5)
         #{           03} gewll qihxk xtqn jeiy #                              
^SCR("B1ACTCRD",6)
                                                                               
^SCR("B1ACTCRD",7)
               {                                     01}: oecren               
^SCR("B1ACTCRD",8)
                                                                               
^SCR("B1ACTCRD",9)
                          qihxk cilwdl e` xiardl `p                            
^SCR("B1ACTCRD",10)
                {05                                       }                    
^SCR("B1ACTCRD",11)
                                                                               
^SCR("B1ACTCRD",12)
      [1                                                                       
^SCR("B1ACTCRD",13)
                                                                               
^SCR("B1ACTCRD",14)
                                                                               
^SCR("B1ACTCRD",15)
                                                                               
^SCR("B1ACTCRD",16)
                                                                               
^SCR("B1ACTCRD",17)
                                                                               
^SCR("B1ACTCRD",18)
                                                                               
^SCR("B1ACTCRD","A",1)

^SCR("B1ACTCRD","A",2)

^SCR("B1ACTCRD","A",3)

^SCR("B1ACTCRD","A",4)

^SCR("B1ACTCRD","A",5)
‡…—ŒŒ‘‰ˆ˜‹˜”‘ŽŠ…‰™
^SCR("B1ACTCRD","A",6)

^SCR("B1ACTCRD","A",7)
:�…ƒ’…Ž
^SCR("B1ACTCRD","A",8)

^SCR("B1ACTCRD","A",9)
‘‰ˆ˜‹ƒ‰Œ—„Œ…€˜‰�’„Œ€�
^SCR("B1ACTCRD","A",10)

^SCR("B1ACTCRD","A",11)

^SCR("B1ACTCRD","A",12)

^SCR("B1ACTCRD","A",13)

^SCR("B1ACTCRD","A",14)

^SCR("B1ACTCRD","A",15)

^SCR("B1ACTCRD","A",16)

^SCR("B1ACTCRD","A",17)

^SCR("B1ACTCRD","A",18)

^SCR("B1ACTCRD","AV",1)

^SCR("B1ACTCRD","AV",2)

^SCR("B1ACTCRD","AV",3)

^SCR("B1ACTCRD","AV",4)

^SCR("B1ACTCRD","AV",5)
juekkxhyrfrpxnluha
^SCR("B1ACTCRD","AV",6)

^SCR("B1ACTCRD","AV",7)
:iusgun
^SCR("B1ACTCRD","AV",8)

^SCR("B1ACTCRD","AV",9)
xhyrfshkevkutrhcgvktb
^SCR("B1ACTCRD","AV",10)

^SCR("B1ACTCRD","AV",11)

^SCR("B1ACTCRD","AV",12)

^SCR("B1ACTCRD","AV",13)

^SCR("B1ACTCRD","AV",14)

^SCR("B1ACTCRD","AV",15)

^SCR("B1ACTCRD","AV",16)

^SCR("B1ACTCRD","AV",17)

^SCR("B1ACTCRD","AV",18)

^SCR("B1ACTCRD","NAME")

^SCR("B1ACTCRD","P",1,"CRD")
7,56,H,40
^SCR("B1ACTCRD","P",1,"HELP")

^SCR("B1ACTCRD","P",1,"LMAX")
40
^SCR("B1ACTCRD","P",1,"MUMPS1")

^SCR("B1ACTCRD","P",1,"MUMPS2")

^SCR("B1ACTCRD","P",1,"OUTPUT")

^SCR("B1ACTCRD","P",1,"TYP")
H
^SCR("B1ACTCRD","P",3,"CRD")
5,25,H,14
^SCR("B1ACTCRD","P",3,"HELP")

^SCR("B1ACTCRD","P",3,"LMAX")
14
^SCR("B1ACTCRD","P",3,"MUMPS1")

^SCR("B1ACTCRD","P",3,"MUMPS2")

^SCR("B1ACTCRD","P",3,"OUTPUT")

^SCR("B1ACTCRD","P",3,"TYP")
H
^SCR("B1ACTCRD","P",5,"CRD")
10,16,E,42,0
^SCR("B1ACTCRD","P",5,"HELP")

^SCR("B1ACTCRD","P",5,"LMAX")
42
^SCR("B1ACTCRD","P",5,"MUMPS1")

^SCR("B1ACTCRD","P",5,"MUMPS2")
S B1NOHZG="" D BSCARD^B1CARD
^SCR("B1ACTCRD","P",5,"TYP")
E
^SCR("B1ACTCRD","P","NAME","B1CARD")
5
^SCR("B1ACTCRD","P","NAME","CUST")
3
^SCR("B1ACTCRD","P","NAME","MOADON")
1
^SCR("B1ACTCRD","P","NM",1)
MOADON
^SCR("B1ACTCRD","P","NM",3)
CUST
^SCR("B1ACTCRD","P","NM",5)
B1CARD
^SCR("B1ACTCRD","P","RB",1)
5,7,13,71
^SCR("B1ACTRES")
H
^SCR("B1ACTRES",1)
                                                                               
^SCR("B1ACTRES",2)
                                                                               
^SCR("B1ACTRES",3)
                                                                               
^SCR("B1ACTRES",4)
                                                                               
^SCR("B1ACTRES",5)
                                                                               
^SCR("B1ACTRES",6)
                                                                               
^SCR("B1ACTRES",7)
                                                             1]                
^SCR("B1ACTRES",8)
                                                                               
^SCR("B1ACTRES",9)
                 # gewll qihxk jeiy ze`vez #                                   
^SCR("B1ACTRES",10)
                                                                               
^SCR("B1ACTRES",11)
                {                                       01}                    
^SCR("B1ACTRES",12)
                                                                               
^SCR("B1ACTRES",13)
                {                           05} :   ihxt my                    
^SCR("B1ACTRES",14)
                                                                               
^SCR("B1ACTRES",15)
                {                           07} :  dgtyn my                    
^SCR("B1ACTRES",16)
                                                                               
^SCR("B1ACTRES",17)
                                  {10         } : qihxk 'qn                    
^SCR("B1ACTRES",18)
                                                                               
^SCR("B1ACTRES",19)
          [1                                                                   
^SCR("B1ACTRES","A",1)

^SCR("B1ACTRES","A",2)

^SCR("B1ACTRES","A",3)

^SCR("B1ACTRES","A",4)

^SCR("B1ACTRES","A",5)

^SCR("B1ACTRES","A",6)

^SCR("B1ACTRES","A",7)

^SCR("B1ACTRES","A",8)

^SCR("B1ACTRES","A",9)
‡…—ŒŒ‘‰ˆ˜‹Š…‰™š…€–…š
^SCR("B1ACTRES","A",10)

^SCR("B1ACTRES","A",11)

^SCR("B1ACTRES","A",12)

^SCR("B1ACTRES","A",13)
:‰ˆ˜”�™
^SCR("B1ACTRES","A",14)

^SCR("B1ACTRES","A",15)
:„‡”™Ž�™
^SCR("B1ACTRES","A",16)

^SCR("B1ACTRES","A",17)
:‘‰ˆ˜‹'‘Ž
^SCR("B1ACTRES","A",18)

^SCR("B1ACTRES","A",19)

^SCR("B1ACTRES","AV",1)

^SCR("B1ACTRES","AV",2)

^SCR("B1ACTRES","AV",3)

^SCR("B1ACTRES","AV",4)

^SCR("B1ACTRES","AV",5)

^SCR("B1ACTRES","AV",6)

^SCR("B1ACTRES","AV",7)

^SCR("B1ACTRES","AV",8)

^SCR("B1ACTRES","AV",9)
juekkxhyrfluha,utmu,
^SCR("B1ACTRES","AV",10)

^SCR("B1ACTRES","AV",11)

^SCR("B1ACTRES","AV",12)

^SCR("B1ACTRES","AV",13)
:hyrpoa
^SCR("B1ACTRES","AV",14)

^SCR("B1ACTRES","AV",15)
:vjpanoa
^SCR("B1ACTRES","AV",16)

^SCR("B1ACTRES","AV",17)
:xhyrfwxn
^SCR("B1ACTRES","AV",18)

^SCR("B1ACTRES","AV",19)

^SCR("B1ACTRES","NAME")

^SCR("B1ACTRES","P",1,"CRD")
11,59,H,42,0
^SCR("B1ACTRES","P",1,"HELP")

^SCR("B1ACTRES","P",1,"LMAX")
42
^SCR("B1ACTRES","P",1,"MUMPS1")

^SCR("B1ACTRES","P",1,"MUMPS2")

^SCR("B1ACTRES","P",1,"OUTPUT")

^SCR("B1ACTRES","P",1,"TYP")
H
^SCR("B1ACTRES","P",5,"CRD")
13,47,H,30
^SCR("B1ACTRES","P",5,"HELP")

^SCR("B1ACTRES","P",5,"LMAX")
30
^SCR("B1ACTRES","P",5,"MUMPS1")

^SCR("B1ACTRES","P",5,"MUMPS2")

^SCR("B1ACTRES","P",5,"OUTPUT")

^SCR("B1ACTRES","P",5,"TYP")
H
^SCR("B1ACTRES","P",7,"CRD")
15,47,H,30
^SCR("B1ACTRES","P",7,"HELP")

^SCR("B1ACTRES","P",7,"LMAX")
30
^SCR("B1ACTRES","P",7,"MUMPS1")

^SCR("B1ACTRES","P",7,"MUMPS2")

^SCR("B1ACTRES","P",7,"OUTPUT")

^SCR("B1ACTRES","P",7,"TYP")
H
^SCR("B1ACTRES","P",10,"CRD")
17,34,E,12,0
^SCR("B1ACTRES","P",10,"HELP")

^SCR("B1ACTRES","P",10,"LMAX")
12
^SCR("B1ACTRES","P",10,"MUMPS1")

^SCR("B1ACTRES","P",10,"MUMPS2")

^SCR("B1ACTRES","P",10,"OUTPUT")

^SCR("B1ACTRES","P",10,"TYP")
E
^SCR("B1ACTRES","P","NAME","BSCARD")
10
^SCR("B1ACTRES","P","NAME","BSFNAME")
5
^SCR("B1ACTRES","P","NAME","BSLNAME")
7
^SCR("B1ACTRES","P","NAME","MOADON")
1
^SCR("B1ACTRES","P","NM",1)
MOADON
^SCR("B1ACTRES","P","NM",5)
BSFNAME
^SCR("B1ACTRES","P","NM",7)
BSLNAME
^SCR("B1ACTRES","P","NM",10)
BSCARD
^SCR("B1ACTRES","P","RB",1)
8,11,20,63
^SCR("B1BITERR")
H
^SCR("B1BITERR",1)
                                                                               
^SCR("B1BITERR",2)
     # wi'bel qpfia qihxka melyz lehiaa d`iby #                                
^SCR("B1BITERR",3)
                                                                               
^SCR("B1BITERR",4)
                                                                        1]     
^SCR("B1BITERR",5)
                                                                               
^SCR("B1BITERR",6)
                                        {05              } :  qihxk 'qn        
^SCR("B1BITERR",7)
                                                                               
^SCR("B1BITERR",8)
                        {                              10} :    gewl my        
^SCR("B1BITERR",9)
                                                                               
^SCR("B1BITERR",10)
                                              {15        } : lehia mekq        
^SCR("B1BITERR",11)
                                                                               
^SCR("B1BITERR",12)
                                              {20        } : `zknq` 'qn        
^SCR("B1BITERR",13)
                                                                               
^SCR("B1BITERR",14)
                                                    {25  } :  d`iby cew        
^SCR("B1BITERR",15)
                                                                               
^SCR("B1BITERR",16)
     {                                                 30} : d`iby xe`z        
^SCR("B1BITERR",17)
     {                                                 31}                     
^SCR("B1BITERR",18)
                                                                               
^SCR("B1BITERR",19)
  [1                                                                           
^SCR("B1BITERR","A",1)

^SCR("B1BITERR","A",2)
—‰'‚…Œ‘�†‰�‘‰ˆ˜‹��…Œ™šŒ…ˆ‰��„€‰‚™
^SCR("B1BITERR","A",3)

^SCR("B1BITERR","A",4)

^SCR("B1BITERR","A",5)

^SCR("B1BITERR","A",6)
:‘‰ˆ˜‹'‘Ž
^SCR("B1BITERR","A",7)

^SCR("B1BITERR","A",8)
:‡…—Œ�™
^SCR("B1BITERR","A",9)

^SCR("B1BITERR","A",10)
:Œ…ˆ‰��…‹‘
^SCR("B1BITERR","A",11)

^SCR("B1BITERR","A",12)
:€š‹Ž‘€'‘Ž
^SCR("B1BITERR","A",13)

^SCR("B1BITERR","A",14)
:„€‰‚™ƒ…—
^SCR("B1BITERR","A",15)

^SCR("B1BITERR","A",16)
:„€‰‚™˜…€š
^SCR("B1BITERR","A",17)

^SCR("B1BITERR","A",18)

^SCR("B1BITERR","A",19)

^SCR("B1BITERR","AV",1)

^SCR("B1BITERR","AV",2)
ehwdukxbzhcxhyrfcouka,kuyhccvthda
^SCR("B1BITERR","AV",3)

^SCR("B1BITERR","AV",4)

^SCR("B1BITERR","AV",5)

^SCR("B1BITERR","AV",6)
:xhyrfwxn
^SCR("B1BITERR","AV",7)

^SCR("B1BITERR","AV",8)
:juekoa
^SCR("B1BITERR","AV",9)

^SCR("B1BITERR","AV",10)
:kuyhcoufx
^SCR("B1BITERR","AV",11)

^SCR("B1BITERR","AV",12)
:t,fnxtwxn
^SCR("B1BITERR","AV",13)

^SCR("B1BITERR","AV",14)
:vthdasue
^SCR("B1BITERR","AV",15)

^SCR("B1BITERR","AV",16)
:vthdarut,
^SCR("B1BITERR","AV",17)

^SCR("B1BITERR","AV",18)

^SCR("B1BITERR","AV",19)

^SCR("B1BITERR","NAME")
melyz lehiaa d`iby zrced
^SCR("B1BITERR","P",5,"CRD")
6,40,E,17,0
^SCR("B1BITERR","P",5,"HELP")

^SCR("B1BITERR","P",5,"LMAX")
17
^SCR("B1BITERR","P",5,"MUMPS1")

^SCR("B1BITERR","P",5,"MUMPS2")

^SCR("B1BITERR","P",5,"OUTPUT")

^SCR("B1BITERR","P",5,"TYP")
E
^SCR("B1BITERR","P",10,"CRD")
8,58,H,33,0
^SCR("B1BITERR","P",10,"HELP")

^SCR("B1BITERR","P",10,"LMAX")
33
^SCR("B1BITERR","P",10,"MUMPS1")

^SCR("B1BITERR","P",10,"MUMPS2")

^SCR("B1BITERR","P",10,"OUTPUT")

^SCR("B1BITERR","P",10,"TYP")
H
^SCR("B1BITERR","P",15,"CRD")
10,46,N,11,2
^SCR("B1BITERR","P",15,"HELP")

^SCR("B1BITERR","P",15,"LMAX")
11
^SCR("B1BITERR","P",15,"MUMPS1")

^SCR("B1BITERR","P",15,"MUMPS2")

^SCR("B1BITERR","P",15,"OUTPUT")

^SCR("B1BITERR","P",15,"TYP")
N
^SCR("B1BITERR","P",20,"CRD")
12,46,E,11,0
^SCR("B1BITERR","P",20,"HELP")

^SCR("B1BITERR","P",20,"LMAX")
11
^SCR("B1BITERR","P",20,"MUMPS1")

^SCR("B1BITERR","P",20,"MUMPS2")

^SCR("B1BITERR","P",20,"OUTPUT")

^SCR("B1BITERR","P",20,"TYP")
E
^SCR("B1BITERR","P",25,"CRD")
14,52,E,5,0
^SCR("B1BITERR","P",25,"HELP")

^SCR("B1BITERR","P",25,"LMAX")
5
^SCR("B1BITERR","P",25,"MUMPS1")

^SCR("B1BITERR","P",25,"MUMPS2")

^SCR("B1BITERR","P",25,"OUTPUT")

^SCR("B1BITERR","P",25,"TYP")
E
^SCR("B1BITERR","P",30,"CRD")
16,58,H,52,0
^SCR("B1BITERR","P",30,"HELP")

^SCR("B1BITERR","P",30,"LMAX")
52
^SCR("B1BITERR","P",30,"MUMPS1")

^SCR("B1BITERR","P",30,"MUMPS2")

^SCR("B1BITERR","P",30,"OUTPUT")

^SCR("B1BITERR","P",30,"TYP")
H
^SCR("B1BITERR","P",31,"CRD")
17,58,H,52,0
^SCR("B1BITERR","P",31,"HELP")

^SCR("B1BITERR","P",31,"LMAX")
52
^SCR("B1BITERR","P",31,"MUMPS1")

^SCR("B1BITERR","P",31,"MUMPS2")

^SCR("B1BITERR","P",31,"OUTPUT")

^SCR("B1BITERR","P",31,"TYP")
H
^SCR("B1BITERR","P","NAME","ASM")
20
^SCR("B1BITERR","P","NAME","B1ERR")
25
^SCR("B1BITERR","P","NAME","B1ERRA")
30
^SCR("B1BITERR","P","NAME","B1ERRB")
31
^SCR("B1BITERR","P","NAME","BITSUM")
15
^SCR("B1BITERR","P","NAME","BSCARD")
5
^SCR("B1BITERR","P","NAME","BSNAME")
10
^SCR("B1BITERR","P","NM",5)
BSCARD
^SCR("B1BITERR","P","NM",10)
BSNAME
^SCR("B1BITERR","P","NM",15)
BITSUM
^SCR("B1BITERR","P","NM",20)
ASM
^SCR("B1BITERR","P","NM",25)
B1ERR
^SCR("B1BITERR","P","NM",30)
B1ERRA
^SCR("B1BITERR","P","NM",31)
B1ERRB
^SCR("B1BITERR","P","RB",1)
5,3,20,74
^SCR("B1CARD")
H
^SCR("B1CARD",1)
                                                                               
^SCR("B1CARD",2)
                                                                     1]        
^SCR("B1CARD",3)
          # xidn qihxk yetig - wi'bel qpfia #                                  
^SCR("B1CARD",4)
                                                                               
^SCR("B1CARD",5)
                     {                            01}                          
^SCR("B1CARD",6)
                                                                               
^SCR("B1CARD",7)
                     oecren qihxk cilwdl e` xiardl `p                          
^SCR("B1CARD",8)
                {05                                       }                    
^SCR("B1CARD",9)
                                                                               
^SCR("B1CARD",10)
                       F8 - mcwzn yetig  , F6 - yetig                          
^SCR("B1CARD",11)
                                                                               
^SCR("B1CARD",12)
      [1                                                                       
^SCR("B1CARD",13)
                                                                               
^SCR("B1CARD",14)
                                                                               
^SCR("B1CARD",15)
                                                                               
^SCR("B1CARD",16)
                                                                               
^SCR("B1CARD",17)
                                                                               
^SCR("B1CARD",18)
                                                                               
^SCR("B1CARD","A",1)

^SCR("B1CARD","A",2)

^SCR("B1CARD","A",3)
˜‰„Ž‘‰ˆ˜‹™…”‰‡-—‰'‚…Œ‘�†‰�
^SCR("B1CARD","A",4)

^SCR("B1CARD","A",5)

^SCR("B1CARD","A",6)

^SCR("B1CARD","A",7)
�…ƒ’…Ž‘‰ˆ˜‹ƒ‰Œ—„Œ…€˜‰�’„Œ€�
^SCR("B1CARD","A",8)

^SCR("B1CARD","A",9)

^SCR("B1CARD","A",10)
F8-�ƒ—šŽ™…”‰‡,F6-™…”‰‡
^SCR("B1CARD","A",11)

^SCR("B1CARD","A",12)

^SCR("B1CARD","A",13)

^SCR("B1CARD","A",14)

^SCR("B1CARD","A",15)

^SCR("B1CARD","A",16)

^SCR("B1CARD","A",17)

^SCR("B1CARD","A",18)

^SCR("B1CARD","AV",1)

^SCR("B1CARD","AV",2)

^SCR("B1CARD","AV",3)
rhvnxhyrfauphj-ehwdukxbzhc
^SCR("B1CARD","AV",4)

^SCR("B1CARD","AV",5)

^SCR("B1CARD","AV",6)

^SCR("B1CARD","AV",7)
iusgunxhyrfshkevkutrhcgvktb
^SCR("B1CARD","AV",8)

^SCR("B1CARD","AV",9)

^SCR("B1CARD","AV",10)
F8-ose,nauphj'F6-auphj
^SCR("B1CARD","AV",11)

^SCR("B1CARD","AV",12)

^SCR("B1CARD","AV",13)

^SCR("B1CARD","AV",14)

^SCR("B1CARD","AV",15)

^SCR("B1CARD","AV",16)

^SCR("B1CARD","AV",17)

^SCR("B1CARD","AV",18)

^SCR("B1CARD","NAME")
cxw wibel qpfia
^SCR("B1CARD","P",1,"CRD")
5,53,H,31
^SCR("B1CARD","P",1,"HELP")

^SCR("B1CARD","P",1,"LMAX")
31
^SCR("B1CARD","P",1,"MUMPS1")

^SCR("B1CARD","P",1,"MUMPS2")

^SCR("B1CARD","P",1,"OUTPUT")

^SCR("B1CARD","P",1,"TYP")
H
^SCR("B1CARD","P",5,"CRD")
8,16,E,42,0
^SCR("B1CARD","P",5,"HELP")

^SCR("B1CARD","P",5,"LMAX")
42
^SCR("B1CARD","P",5,"MUMPS1")

^SCR("B1CARD","P",5,"MUMPS2")
D BSCARD^B1CARD
^SCR("B1CARD","P",5,"TYP")
E
^SCR("B1CARD","P","NAME","B1CARD")
5
^SCR("B1CARD","P","NAME","BSCLUB1")
1
^SCR("B1CARD","P","NM",1)
BSCLUB1
^SCR("B1CARD","P","NM",5)
B1CARD
^SCR("B1CARD","P","RB",1)
3,7,13,71
^SCR("B1CLUB")
H
^SCR("B1CLUB",1)

^SCR("B1CLUB",2)
                     # mipecren zlah #                                         
^SCR("B1CLUB",3)
                  zelecb zeidl zexen` zeilbp` zeize` lk                        
^SCR("B1CLUB",4)
                      oekpd hnxetl k"` mze` zkted dpkez                        
^SCR("B1CLUB",5)
                                                                             1$
^SCR("B1CLUB",6)
 :                          URL                        :   ynzynd my   :xtqn:  
^SCR("B1CLUB",7)
 \      gewl my      \  gewl 'qn  \            xe`z            \   dnqiq   \   
^SCR("B1CLUB",8)
                                                                               
^SCR("B1CLUB",9)
                                                                               
^SCR("B1CLUB",10)
                                                                               
^SCR("B1CLUB",11)
                                                                               
^SCR("B1CLUB",12)
                                                                               
^SCR("B1CLUB",13)
                                                                               
^SCR("B1CLUB",14)
                                                                               
^SCR("B1CLUB",15)
                                                                               
^SCR("B1CLUB",16)
                                                                               
^SCR("B1CLUB",17)
                                                                               
^SCR("B1CLUB",18)
                                                                               
^SCR("B1CLUB",19)
                                                                               
^SCR("B1CLUB",20)
                                                                               
^SCR("B1CLUB",21)
                                                                               
^SCR("B1CLUB",22)
 $1                                                                            
^SCR("B1CLUB","A",1)

^SCR("B1CLUB","A",2)
�‰�…ƒ’…ŽšŒ�ˆ
^SCR("B1CLUB","A",3)
š…Œ…ƒ‚š…‰„Œš…˜…Ž€š…‰Œ‚�€š…‰š…€Œ‹
^SCR("B1CLUB","A",4)
�…‹�„ˆŽ˜…”Œ‹"€�š…€š‹”…„„�‹…š
^SCR("B1CLUB","A",5)

^SCR("B1CLUB","A",6)
URL™Žš™Ž„�™˜”‘Ž
^SCR("B1CLUB","A",7)
‡…—Œ�™‡…—Œ'‘Ž˜…€š„Ž‘‰‘
^SCR("B1CLUB","A",8)
--------------------------------------------------------------------------
^SCR("B1CLUB","A",9)

^SCR("B1CLUB","A",10)

^SCR("B1CLUB","A",11)

^SCR("B1CLUB","A",12)

^SCR("B1CLUB","A",13)

^SCR("B1CLUB","A",14)

^SCR("B1CLUB","A",15)

^SCR("B1CLUB","A",16)

^SCR("B1CLUB","A",17)

^SCR("B1CLUB","A",18)

^SCR("B1CLUB","A",19)

^SCR("B1CLUB","A",20)

^SCR("B1CLUB","A",21)

^SCR("B1CLUB","A",22)

^SCR("B1CLUB","AV",1)

^SCR("B1CLUB","AV",2)
ohbusgun,kcy
^SCR("B1CLUB","AV",3)
,ukusd,uhvk,urunt,uhkdbt,uh,utkf
^SCR("B1CLUB","AV",4)
iufbvynrupkf"to,ut,fpuvvbfu,
^SCR("B1CLUB","AV",5)

^SCR("B1CLUB","AV",6)
URLan,anvoarpxn
^SCR("B1CLUB","AV",7)
juekoajuekwxnrut,vnxhx
^SCR("B1CLUB","AV",8)
--------------------------------------------------------------------------
^SCR("B1CLUB","AV",9)

^SCR("B1CLUB","AV",10)

^SCR("B1CLUB","AV",11)

^SCR("B1CLUB","AV",12)

^SCR("B1CLUB","AV",13)

^SCR("B1CLUB","AV",14)

^SCR("B1CLUB","AV",15)

^SCR("B1CLUB","AV",16)

^SCR("B1CLUB","AV",17)

^SCR("B1CLUB","AV",18)

^SCR("B1CLUB","AV",19)

^SCR("B1CLUB","AV",20)

^SCR("B1CLUB","AV",21)

^SCR("B1CLUB","AV",22)

^SCR("B1CLUB","G",1,"CRD")
8,76,N,4,0
^SCR("B1CLUB","G",1,"HELP")

^SCR("B1CLUB","G",1,"LMAX")
4
^SCR("B1CLUB","G",1,"MUMPS1")

^SCR("B1CLUB","G",1,"MUMPS2")

^SCR("B1CLUB","G",1,"MUST")

^SCR("B1CLUB","G",1,"SHEM")
xtqn
^SCR("B1CLUB","G",1,"TYP")
N
^SCR("B1CLUB","G",2,"CRD")
8,71,E,14,0
^SCR("B1CLUB","G",2,"HELP")

^SCR("B1CLUB","G",2,"LMAX")
15
^SCR("B1CLUB","G",2,"MUMPS1")

^SCR("B1CLUB","G",2,"MUMPS2")

^SCR("B1CLUB","G",2,"SHEM")
   ynzynd my   
^SCR("B1CLUB","G",2,"TYP")
E
^SCR("B1CLUB","G",3,"CRD")
8,55,E,53,0
^SCR("B1CLUB","G",3,"HELP")

^SCR("B1CLUB","G",3,"LMAX")
53
^SCR("B1CLUB","G",3,"MUMPS1")

^SCR("B1CLUB","G",3,"MUMPS2")

^SCR("B1CLUB","G",3,"SHEM")
                          URL                        
^SCR("B1CLUB","G",3,"TYP")
E
^SCR("B1CLUB","G",4,"CRD")
8,+75,E,11,0
^SCR("B1CLUB","G",4,"HELP")

^SCR("B1CLUB","G",4,"LMAX")
11
^SCR("B1CLUB","G",4,"MUMPS1")

^SCR("B1CLUB","G",4,"MUMPS2")

^SCR("B1CLUB","G",4,"SHEM")
   dnqiq   
^SCR("B1CLUB","G",4,"TYP")
E
^SCR("B1CLUB","G",5,"CRD")
8,+63,H,28,0
^SCR("B1CLUB","G",5,"HELP")

^SCR("B1CLUB","G",5,"LMAX")
28
^SCR("B1CLUB","G",5,"MUMPS1")

^SCR("B1CLUB","G",5,"MUMPS2")

^SCR("B1CLUB","G",5,"SHEM")
            xe`z            
^SCR("B1CLUB","G",5,"TYP")
H
^SCR("B1CLUB","G",6,"CHECK")
Y
^SCR("B1CLUB","G",6,"CRD")
8,+34,E,10,0
^SCR("B1CLUB","G",6,"CREAT")

^SCR("B1CLUB","G",6,"FNC")

^SCR("B1CLUB","G",6,"GLOB")
^LKH
^SCR("B1CLUB","G",6,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("B1CLUB","G",6,"LMAX")
12
^SCR("B1CLUB","G",6,"MUMPS1")

^SCR("B1CLUB","G",6,"MUMPS2")

^SCR("B1CLUB","G",6,"MUST")

^SCR("B1CLUB","G",6,"NLN")
20
^SCR("B1CLUB","G",6,"NS")
zegewl zlah
^SCR("B1CLUB","G",6,"RZD")
*
^SCR("B1CLUB","G",6,"SHEM")
  gewl 'qn  
^SCR("B1CLUB","G",6,"TOPB")
8
^SCR("B1CLUB","G",6,"TYP")
E
^SCR("B1CLUB","G",6,"VRB")
LKH1
^SCR("B1CLUB","G",7,"CRD")
8,+21,H,19,0
^SCR("B1CLUB","G",7,"HELP")

^SCR("B1CLUB","G",7,"LMAX")
19
^SCR("B1CLUB","G",7,"MUMPS1")

^SCR("B1CLUB","G",7,"MUMPS2")

^SCR("B1CLUB","G",7,"OUTPUT")

^SCR("B1CLUB","G",7,"SHEM")
      gewl my      
^SCR("B1CLUB","G",7,"TYP")
H
^SCR("B1CLUB","G","DEL")
Y
^SCR("B1CLUB","G","MAX")
15
^SCR("B1CLUB","G","NAME","DESC")
5
^SCR("B1CLUB","G","NAME","LKH")
6
^SCR("B1CLUB","G","NAME","LKH1")
7
^SCR("B1CLUB","G","NAME","NOM")
1
^SCR("B1CLUB","G","NAME","PSW")
4
^SCR("B1CLUB","G","NAME","URL")
3
^SCR("B1CLUB","G","NAME","USR")
2
^SCR("B1CLUB","G","NM",1)
NOM
^SCR("B1CLUB","G","NM",2)
USR
^SCR("B1CLUB","G","NM",3)
URL
^SCR("B1CLUB","G","NM",4)
PSW
^SCR("B1CLUB","G","NM",5)
DESC
^SCR("B1CLUB","G","NM",6)
LKH
^SCR("B1CLUB","G","NM",7)
LKH1
^SCR("B1CLUB","G","RB")
6,2,23,79
^SCR("B1CLUB","G","REF")
^TEMP($P,"SP"
^SCR("B1CLUB","G","RZD")
\
^SCR("B1CLUB","G","STEP")
2
^SCR("B1CLUB","G","STG")
 :                          URL                        :   ynzynd my   :xtqn:  
^SCR("B1CLUB","G","VG")
9
^SCR("B1CLUB","NAME")
oecren
^SCR("B1CLUBE")
E
^SCR("B1CLUBE",1)

^SCR("B1CLUBE",2)
                     # Buisness Locic Clubs Table #
^SCR("B1CLUBE",3)

^SCR("B1CLUBE",4)
$1      
^SCR("B1CLUBE",5)
   : User Name : Password :                 URL                          :     
^SCR("B1CLUBE",6)
   \                    Description                                     \
^SCR("B1CLUBE",7)

^SCR("B1CLUBE",8)

^SCR("B1CLUBE",9)

^SCR("B1CLUBE",10)

^SCR("B1CLUBE",11)

^SCR("B1CLUBE",12)

^SCR("B1CLUBE",13)

^SCR("B1CLUBE",14)

^SCR("B1CLUBE",15)

^SCR("B1CLUBE",16)

^SCR("B1CLUBE",17)

^SCR("B1CLUBE",18)

^SCR("B1CLUBE",19)

^SCR("B1CLUBE",20)

^SCR("B1CLUBE",21)
                                                                        1$
^SCR("B1CLUBE","A",1)

^SCR("B1CLUBE","A",2)
BuisnessLocicClubsTable
^SCR("B1CLUBE","A",3)

^SCR("B1CLUBE","A",4)

^SCR("B1CLUBE","A",5)
UserNamePasswordURL
^SCR("B1CLUBE","A",6)
Description
^SCR("B1CLUBE","A",7)
-------------------------------------------------------------------
^SCR("B1CLUBE","A",8)

^SCR("B1CLUBE","A",9)

^SCR("B1CLUBE","A",10)

^SCR("B1CLUBE","A",11)

^SCR("B1CLUBE","A",12)

^SCR("B1CLUBE","A",13)

^SCR("B1CLUBE","A",14)

^SCR("B1CLUBE","A",15)

^SCR("B1CLUBE","A",16)

^SCR("B1CLUBE","A",17)

^SCR("B1CLUBE","A",18)

^SCR("B1CLUBE","A",19)

^SCR("B1CLUBE","A",20)

^SCR("B1CLUBE","A",21)

^SCR("B1CLUBE","AV",1)

^SCR("B1CLUBE","AV",2)
BuisnessLocicClubsTable
^SCR("B1CLUBE","AV",3)

^SCR("B1CLUBE","AV",4)

^SCR("B1CLUBE","AV",5)
UserNamePasswordURL
^SCR("B1CLUBE","AV",6)
Description
^SCR("B1CLUBE","AV",7)
-------------------------------------------------------------------
^SCR("B1CLUBE","AV",8)

^SCR("B1CLUBE","AV",9)

^SCR("B1CLUBE","AV",10)

^SCR("B1CLUBE","AV",11)

^SCR("B1CLUBE","AV",12)

^SCR("B1CLUBE","AV",13)

^SCR("B1CLUBE","AV",14)

^SCR("B1CLUBE","AV",15)

^SCR("B1CLUBE","AV",16)

^SCR("B1CLUBE","AV",17)

^SCR("B1CLUBE","AV",18)

^SCR("B1CLUBE","AV",19)

^SCR("B1CLUBE","AV",20)

^SCR("B1CLUBE","AV",21)

^SCR("B1CLUBE","G",1,"CRD")
7,15,E,11,0
^SCR("B1CLUBE","G",1,"HELP")

^SCR("B1CLUBE","G",1,"LMAX")
11
^SCR("B1CLUBE","G",1,"MUMPS1")

^SCR("B1CLUBE","G",1,"MUMPS2")

^SCR("B1CLUBE","G",1,"SHEM")
 User Name 
^SCR("B1CLUBE","G",1,"TYP")
E
^SCR("B1CLUBE","G",2,"CRD")
7,26,E,10,0
^SCR("B1CLUBE","G",2,"HELP")

^SCR("B1CLUBE","G",2,"LMAX")
10
^SCR("B1CLUBE","G",2,"MUMPS1")

^SCR("B1CLUBE","G",2,"MUMPS2")

^SCR("B1CLUBE","G",2,"SHEM")
 Password 
^SCR("B1CLUBE","G",2,"TYP")
E
^SCR("B1CLUBE","G",3,"CRD")
7,73,E,46,0
^SCR("B1CLUBE","G",3,"HELP")

^SCR("B1CLUBE","G",3,"LMAX")
46
^SCR("B1CLUBE","G",3,"MUMPS1")

^SCR("B1CLUBE","G",3,"MUMPS2")

^SCR("B1CLUBE","G",3,"SHEM")
                 URL                          
^SCR("B1CLUBE","G",3,"TYP")
E
^SCR("B1CLUBE","G",4,"CRD")
7,+72,E,68,0
^SCR("B1CLUBE","G",4,"HELP")

^SCR("B1CLUBE","G",4,"LMAX")
68
^SCR("B1CLUBE","G",4,"MUMPS1")

^SCR("B1CLUBE","G",4,"MUMPS2")

^SCR("B1CLUBE","G",4,"SHEM")
                    Description                                     
^SCR("B1CLUBE","G",4,"TYP")
E
^SCR("B1CLUBE","G","DEL")
Y
^SCR("B1CLUBE","G","MAX")
15
^SCR("B1CLUBE","G","NAME","DESC")
4
^SCR("B1CLUBE","G","NAME","PSW")
2
^SCR("B1CLUBE","G","NAME","URL")
3
^SCR("B1CLUBE","G","NAME","USR")
1
^SCR("B1CLUBE","G","NM",1)
USR
^SCR("B1CLUBE","G","NM",2)
PSW
^SCR("B1CLUBE","G","NM",3)
URL
^SCR("B1CLUBE","G","NM",4)
DESC
^SCR("B1CLUBE","G","RB")
5,1,22,75
^SCR("B1CLUBE","G","REF")
^TMP($P
^SCR("B1CLUBE","G","RZD")
\
^SCR("B1CLUBE","G","STEP")
2
^SCR("B1CLUBE","G","STG")
   : User Name : Password :                 URL                          :     
^SCR("B1CLUBE","G","VG")
8
^SCR("B1CLUBE","NAME")
B.L. CLUBS ( ENGLISH )
^SCR("B1CNCLD")
H
^SCR("B1CNCLD",1)
                                                                               
^SCR("B1CNCLD",2)
                                                                               
^SCR("B1CNCLD",3)
                                                                               
^SCR("B1CNCLD",4)
                                                                               
^SCR("B1CNCLD",5)
                                                                               
^SCR("B1CNCLD",6)
                                                                               
^SCR("B1CNCLD",7)
                                                                               
^SCR("B1CNCLD",8)
                                                                               
^SCR("B1CNCLD",9)
                                                                               
^SCR("B1CNCLD",10)
                                                                               
^SCR("B1CNCLD",11)
                                                           1]                  
^SCR("B1CNCLD",12)
                                                                               
^SCR("B1CNCLD",13)
                          {05               } :  qihxk 'qn                     
^SCR("B1CNCLD",14)
                {                        10}  :    gewl my                     
^SCR("B1CNCLD",15)
                                                                               
^SCR("B1CNCLD",16)
                                   {15      } : lehia mekq                     
^SCR("B1CNCLD",17)
                                                `zknq` 'qn                     
^SCR("B1CNCLD",18)
                                  {20       } :   lehia ly                     
^SCR("B1CNCLD",19)
                                                                               
^SCR("B1CNCLD",20)
            [1                                                                 
^SCR("B1CNCLD","A",1)

^SCR("B1CNCLD","A",2)

^SCR("B1CNCLD","A",3)

^SCR("B1CNCLD","A",4)

^SCR("B1CNCLD","A",5)

^SCR("B1CNCLD","A",6)

^SCR("B1CNCLD","A",7)

^SCR("B1CNCLD","A",8)

^SCR("B1CNCLD","A",9)

^SCR("B1CNCLD","A",10)

^SCR("B1CNCLD","A",11)

^SCR("B1CNCLD","A",12)

^SCR("B1CNCLD","A",13)
:‘‰ˆ˜‹'‘Ž
^SCR("B1CNCLD","A",14)
:‡…—Œ�™
^SCR("B1CNCLD","A",15)

^SCR("B1CNCLD","A",16)
:Œ…ˆ‰��…‹‘
^SCR("B1CNCLD","A",17)
€š‹Ž‘€'‘Ž
^SCR("B1CNCLD","A",18)
:Œ…ˆ‰�Œ™
^SCR("B1CNCLD","A",19)

^SCR("B1CNCLD","A",20)

^SCR("B1CNCLD","AV",1)

^SCR("B1CNCLD","AV",2)

^SCR("B1CNCLD","AV",3)

^SCR("B1CNCLD","AV",4)

^SCR("B1CNCLD","AV",5)

^SCR("B1CNCLD","AV",6)

^SCR("B1CNCLD","AV",7)

^SCR("B1CNCLD","AV",8)

^SCR("B1CNCLD","AV",9)

^SCR("B1CNCLD","AV",10)

^SCR("B1CNCLD","AV",11)

^SCR("B1CNCLD","AV",12)

^SCR("B1CNCLD","AV",13)
:xhyrfwxn
^SCR("B1CNCLD","AV",14)
:juekoa
^SCR("B1CNCLD","AV",15)

^SCR("B1CNCLD","AV",16)
:kuyhcoufx
^SCR("B1CNCLD","AV",17)
t,fnxtwxn
^SCR("B1CNCLD","AV",18)
:kuyhcka
^SCR("B1CNCLD","AV",19)

^SCR("B1CNCLD","AV",20)

^SCR("B1CNCLD","NAME")
wi'bel qpfia qihxk zpirh lehia
^SCR("B1CNCLD","P",5,"CRD")
13,26,E,18,0
^SCR("B1CNCLD","P",5,"HELP")

^SCR("B1CNCLD","P",5,"LMAX")
18
^SCR("B1CNCLD","P",5,"MUMPS1")

^SCR("B1CNCLD","P",5,"MUMPS2")

^SCR("B1CNCLD","P",5,"OUTPUT")

^SCR("B1CNCLD","P",5,"TYP")
E
^SCR("B1CNCLD","P",10,"CRD")
14,44,H,27
^SCR("B1CNCLD","P",10,"HELP")

^SCR("B1CNCLD","P",10,"LMAX")
27
^SCR("B1CNCLD","P",10,"MUMPS1")

^SCR("B1CNCLD","P",10,"MUMPS2")

^SCR("B1CNCLD","P",10,"OUTPUT")

^SCR("B1CNCLD","P",10,"TYP")
H
^SCR("B1CNCLD","P",15,"CRD")
16,35,N,9,2
^SCR("B1CNCLD","P",15,"HELP")

^SCR("B1CNCLD","P",15,"LMAX")
9
^SCR("B1CNCLD","P",15,"MUMPS1")

^SCR("B1CNCLD","P",15,"MUMPS2")

^SCR("B1CNCLD","P",15,"OUTPUT")

^SCR("B1CNCLD","P",15,"TYP")
N
^SCR("B1CNCLD","P",20,"CRD")
18,34,E,10,0
^SCR("B1CNCLD","P",20,"HELP")

^SCR("B1CNCLD","P",20,"LMAX")
10
^SCR("B1CNCLD","P",20,"MUMPS1")

^SCR("B1CNCLD","P",20,"MUMPS2")

^SCR("B1CNCLD","P",20,"OUTPUT")

^SCR("B1CNCLD","P",20,"TYP")
E
^SCR("B1CNCLD","P","NAME","AMOUNT")
15
^SCR("B1CNCLD","P","NAME","ASM")
20
^SCR("B1CNCLD","P","NAME","BSCARD")
5
^SCR("B1CNCLD","P","NAME","BSNAME")
10
^SCR("B1CNCLD","P","NM",5)
BSCARD
^SCR("B1CNCLD","P","NM",10)
BSNAME
^SCR("B1CNCLD","P","NM",15)
AMOUNT
^SCR("B1CNCLD","P","NM",20)
ASM
^SCR("B1CNCLD","P","RB",1)
12,13,21,61
^SCR("B1DCB")
H
^SCR("B1DCB",1)
                #wi'bel qpfia ly miqihxk zepirh g"ec#                          
^SCR("B1DCB",2)
                     {10      }:jix`z cr    {05      }:jix`zn                  
^SCR("B1DCB",3)
                                                                             1$
^SCR("B1DCB",4)
 :'yz beq:    gewld my   : qihxk 'qn :    oecren    :  mekq : dlaw :  jix`z :  
^SCR("B1DCB",5)
                                                                               
^SCR("B1DCB",6)
                                                                               
^SCR("B1DCB",7)
                                                                               
^SCR("B1DCB",8)
                                                                               
^SCR("B1DCB",9)
                                                                               
^SCR("B1DCB",10)
                                                                               
^SCR("B1DCB",11)
                                                                               
^SCR("B1DCB",12)
                                                                               
^SCR("B1DCB",13)
                                                                               
^SCR("B1DCB",14)
                                                                               
^SCR("B1DCB",15)
                                                                               
^SCR("B1DCB",16)
                                                                               
^SCR("B1DCB",17)
                                                                               
^SCR("B1DCB",18)
                                                                               
^SCR("B1DCB",19)
                                                                               
^SCR("B1DCB",20)
                                                                               
^SCR("B1DCB",21)
                                                                               
^SCR("B1DCB",22)
 $1                                                                            
^SCR("B1DCB",23)
                                                 {20       }:k"dq  {15  }:zelaw
^SCR("B1DCB","A",1)
—‰'‚…Œ‘�†‰�Œ™�‰‘‰ˆ˜‹š…�‰’ˆ‡"…ƒ
^SCR("B1DCB","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("B1DCB","A",3)

^SCR("B1DCB","A",4)
'™š‚…‘‡…—Œ„�™‘‰ˆ˜‹'‘Ž�…ƒ’…Ž�…‹‘„Œ�—Š‰˜€š
^SCR("B1DCB","A",5)
----------------------------------------------------------------------
^SCR("B1DCB","A",6)

^SCR("B1DCB","A",7)

^SCR("B1DCB","A",8)

^SCR("B1DCB","A",9)

^SCR("B1DCB","A",10)

^SCR("B1DCB","A",11)

^SCR("B1DCB","A",12)

^SCR("B1DCB","A",13)

^SCR("B1DCB","A",14)

^SCR("B1DCB","A",15)

^SCR("B1DCB","A",16)

^SCR("B1DCB","A",17)

^SCR("B1DCB","A",18)

^SCR("B1DCB","A",19)

^SCR("B1DCB","A",20)

^SCR("B1DCB","A",21)

^SCR("B1DCB","A",22)

^SCR("B1DCB","A",23)
:‹"„‘:š…Œ�—
^SCR("B1DCB","AV",1)
ehwdukxbzhckaohxhyrf,ubhgyj"us
^SCR("B1DCB","AV",2)
:lhrt,sg:lhrt,n
^SCR("B1DCB","AV",3)

^SCR("B1DCB","AV",4)
wa,duxjuekvoaxhyrfwxniusgunoufxvkcelhrt,
^SCR("B1DCB","AV",5)
----------------------------------------------------------------------
^SCR("B1DCB","AV",6)

^SCR("B1DCB","AV",7)

^SCR("B1DCB","AV",8)

^SCR("B1DCB","AV",9)

^SCR("B1DCB","AV",10)

^SCR("B1DCB","AV",11)

^SCR("B1DCB","AV",12)

^SCR("B1DCB","AV",13)

^SCR("B1DCB","AV",14)

^SCR("B1DCB","AV",15)

^SCR("B1DCB","AV",16)

^SCR("B1DCB","AV",17)

^SCR("B1DCB","AV",18)

^SCR("B1DCB","AV",19)

^SCR("B1DCB","AV",20)

^SCR("B1DCB","AV",21)

^SCR("B1DCB","AV",22)

^SCR("B1DCB","AV",23)
:f"vx:,ukce
^SCR("B1DCB","G",1,"CRD")
5,76,D,8,0
^SCR("B1DCB","G",1,"HELP")

^SCR("B1DCB","G",1,"LMAX")
8
^SCR("B1DCB","G",1,"MUMPS1")

^SCR("B1DCB","G",1,"MUMPS2")

^SCR("B1DCB","G",1,"OUTPUT")

^SCR("B1DCB","G",1,"SHEM")
  jix`z 
^SCR("B1DCB","G",1,"TYP")
D
^SCR("B1DCB","G",2,"CRD")
5,67,E,6,0
^SCR("B1DCB","G",2,"HELP")
<F9> - dlaw bivdl  
^SCR("B1DCB","G",2,"LMAX")
6
^SCR("B1DCB","G",2,"MUMPS1")

^SCR("B1DCB","G",2,"MUMPS2")
D CB^B1DCB
^SCR("B1DCB","G",2,"SHEM")
 dlaw 
^SCR("B1DCB","G",2,"TYP")
E
^SCR("B1DCB","G",3,"CRD")
5,60,N,7,2
^SCR("B1DCB","G",3,"HELP")

^SCR("B1DCB","G",3,"LMAX")
7
^SCR("B1DCB","G",3,"MUMPS1")

^SCR("B1DCB","G",3,"MUMPS2")

^SCR("B1DCB","G",3,"OUTPUT")

^SCR("B1DCB","G",3,"SHEM")
  mekq 
^SCR("B1DCB","G",3,"TYP")
N
^SCR("B1DCB","G",4,"CRD")
5,52,H,11,0
^SCR("B1DCB","G",4,"HELP")

^SCR("B1DCB","G",4,"LMAX")
14
^SCR("B1DCB","G",4,"MUMPS1")

^SCR("B1DCB","G",4,"MUMPS2")

^SCR("B1DCB","G",4,"OUTPUT")

^SCR("B1DCB","G",4,"SHEM")
    oecren    
^SCR("B1DCB","G",4,"TYP")
H
^SCR("B1DCB","G",5,"CRD")
5,37,E,11,0
^SCR("B1DCB","G",5,"HELP")

^SCR("B1DCB","G",5,"LMAX")
11
^SCR("B1DCB","G",5,"MUMPS1")

^SCR("B1DCB","G",5,"MUMPS2")

^SCR("B1DCB","G",5,"OUTPUT")

^SCR("B1DCB","G",5,"SHEM")
 qihxk 'qn 
^SCR("B1DCB","G",5,"TYP")
E
^SCR("B1DCB","G",6,"CRD")
5,25,H,15,0
^SCR("B1DCB","G",6,"HELP")
<F9> - dpnfd zbvd
^SCR("B1DCB","G",6,"LMAX")
15
^SCR("B1DCB","G",6,"MUMPS1")

^SCR("B1DCB","G",6,"MUMPS2")

^SCR("B1DCB","G",6,"OUTPUT")

^SCR("B1DCB","G",6,"SHEM")
    gewld my   
^SCR("B1DCB","G",6,"TYP")
H
^SCR("B1DCB","G",7,"CRD")
5,9,E,7,0
^SCR("B1DCB","G",7,"HELP")

^SCR("B1DCB","G",7,"LMAX")
7
^SCR("B1DCB","G",7,"MUMPS1")

^SCR("B1DCB","G",7,"MUMPS2")

^SCR("B1DCB","G",7,"OUTPUT")

^SCR("B1DCB","G",7,"SHEM")
'yz beq
^SCR("B1DCB","G",7,"TYP")
E
^SCR("B1DCB","G","DEL")

^SCR("B1DCB","G","MAX")
99999
^SCR("B1DCB","G","NAME","CARD")
5
^SCR("B1DCB","G","NAME","CB")
2
^SCR("B1DCB","G","NAME","DATH")
1
^SCR("B1DCB","G","NAME","MOADON")
4
^SCR("B1DCB","G","NAME","NAME")
6
^SCR("B1DCB","G","NAME","SHUM")
3
^SCR("B1DCB","G","NAME","SUGT")
7
^SCR("B1DCB","G","NM",1)
DATH
^SCR("B1DCB","G","NM",2)
CB
^SCR("B1DCB","G","NM",3)
SHUM
^SCR("B1DCB","G","NM",4)
MOADON
^SCR("B1DCB","G","NM",5)
CARD
^SCR("B1DCB","G","NM",6)
NAME
^SCR("B1DCB","G","NM",7)
SUGT
^SCR("B1DCB","G","RB")
4,2,23,79
^SCR("B1DCB","G","REF")
^TEMPDH($P
^SCR("B1DCB","G","RZD")
\
^SCR("B1DCB","G","STEP")
1
^SCR("B1DCB","G","STG")
 :'yz beq:    gewld my   : qihxk 'qn :    oecren    :  mekq : dlaw :  jix`z :  
^SCR("B1DCB","G","VG")
6
^SCR("B1DCB","NAME")

^SCR("B1DCB","P",5,"CRD")
2,44,D,8,0
^SCR("B1DCB","P",5,"HELP")

^SCR("B1DCB","P",5,"LMAX")
9
^SCR("B1DCB","P",5,"MUMPS1")
S:'$G(DATS1) DATS1=$$^%L1DC($H,1)
^SCR("B1DCB","P",5,"MUMPS2")
S DATS=$$^%L1DC(DATS1,3)
^SCR("B1DCB","P",5,"MUST")

^SCR("B1DCB","P",5,"TYP")
D
^SCR("B1DCB","P",10,"CRD")
2,21,D,8,0
^SCR("B1DCB","P",10,"HELP")

^SCR("B1DCB","P",10,"LMAX")
9
^SCR("B1DCB","P",10,"MUMPS1")
S DATF1=DATS1
^SCR("B1DCB","P",10,"MUMPS2")
S DATF=$$^%L1DC(DATF1,3) I DATF<DATS S %SC("ER")=1
^SCR("B1DCB","P",10,"MUST")

^SCR("B1DCB","P",10,"TYP")
D
^SCR("B1DCB","P",15,"CRD")
23,67,N,5,0
^SCR("B1DCB","P",15,"HELP")

^SCR("B1DCB","P",15,"LMAX")
5
^SCR("B1DCB","P",15,"MUMPS1")

^SCR("B1DCB","P",15,"MUMPS2")

^SCR("B1DCB","P",15,"OUTPUT")

^SCR("B1DCB","P",15,"TYP")
N
^SCR("B1DCB","P",20,"CRD")
23,49,N,9,2
^SCR("B1DCB","P",20,"HELP")

^SCR("B1DCB","P",20,"LMAX")
10
^SCR("B1DCB","P",20,"MUMPS1")

^SCR("B1DCB","P",20,"MUMPS2")

^SCR("B1DCB","P",20,"OUTPUT")

^SCR("B1DCB","P",20,"TYP")
N
^SCR("B1DCB","P","NAME","DATF1")
10
^SCR("B1DCB","P","NAME","DATS1")
5
^SCR("B1DCB","P","NAME","SUMCB")
20
^SCR("B1DCB","P","NAME","SUMH")
15
^SCR("B1DCB","P","NM",5)
DATS1
^SCR("B1DCB","P","NM",10)
DATF1
^SCR("B1DCB","P","NM",15)
SUMH
^SCR("B1DCB","P","NM",20)
SUMCB
^SCR("B1DEACT")
H
^SCR("B1DEACT",1)
                                                                               
^SCR("B1DEACT",2)
                                                                               
^SCR("B1DEACT",3)
                                                                               
^SCR("B1DEACT",4)
                                                                               
^SCR("B1DEACT",5)
                                                                               
^SCR("B1DEACT",6)
                                                                               
^SCR("B1DEACT",7)
                                                             1]                
^SCR("B1DEACT",8)
                                                                               
^SCR("B1DEACT",9)
                {                           05} :   gewl my                    
^SCR("B1DEACT",10)
                                                                               
^SCR("B1DEACT",11)
                                  {10         } : qihxk 'qn                    
^SCR("B1DEACT",12)
                                                                               
^SCR("B1DEACT",13)
          [1                                                                   
^SCR("B1DEACT","A",1)

^SCR("B1DEACT","A",2)

^SCR("B1DEACT","A",3)

^SCR("B1DEACT","A",4)

^SCR("B1DEACT","A",5)

^SCR("B1DEACT","A",6)

^SCR("B1DEACT","A",7)

^SCR("B1DEACT","A",8)

^SCR("B1DEACT","A",9)
:‡…—Œ�™
^SCR("B1DEACT","A",10)

^SCR("B1DEACT","A",11)
:‘‰ˆ˜‹'‘Ž
^SCR("B1DEACT","A",12)

^SCR("B1DEACT","A",13)

^SCR("B1DEACT","AV",1)

^SCR("B1DEACT","AV",2)

^SCR("B1DEACT","AV",3)

^SCR("B1DEACT","AV",4)

^SCR("B1DEACT","AV",5)

^SCR("B1DEACT","AV",6)

^SCR("B1DEACT","AV",7)

^SCR("B1DEACT","AV",8)

^SCR("B1DEACT","AV",9)
:juekoa
^SCR("B1DEACT","AV",10)

^SCR("B1DEACT","AV",11)
:xhyrfwxn
^SCR("B1DEACT","AV",12)

^SCR("B1DEACT","AV",13)

^SCR("B1DEACT","NAME")

^SCR("B1DEACT","P",5,"CRD")
9,47,H,30,0
^SCR("B1DEACT","P",5,"HELP")

^SCR("B1DEACT","P",5,"LMAX")
30
^SCR("B1DEACT","P",5,"MUMPS1")

^SCR("B1DEACT","P",5,"MUMPS2")

^SCR("B1DEACT","P",5,"OUTPUT")

^SCR("B1DEACT","P",5,"TYP")
H
^SCR("B1DEACT","P",10,"CRD")
11,34,E,12,0
^SCR("B1DEACT","P",10,"HELP")

^SCR("B1DEACT","P",10,"LMAX")
12
^SCR("B1DEACT","P",10,"MUMPS1")

^SCR("B1DEACT","P",10,"MUMPS2")

^SCR("B1DEACT","P",10,"OUTPUT")

^SCR("B1DEACT","P",10,"TYP")
E
^SCR("B1DEACT","P","NAME","BSCARD")
10
^SCR("B1DEACT","P","NAME","BSNAME")
5
^SCR("B1DEACT","P","NM",5)
BSNAME
^SCR("B1DEACT","P","NM",10)
BSCARD
^SCR("B1DEACT","P","RB",1)
8,11,14,63
^SCR("B1ERR")
H
^SCR("B1ERR",1)
                                                                               
^SCR("B1ERR",2)
                                                                               
^SCR("B1ERR",3)
                                                                               
^SCR("B1ERR",4)
                                                                               
^SCR("B1ERR",5)
                                                                               
^SCR("B1ERR",6)
                                                                               
^SCR("B1ERR",7)
                                                                               
^SCR("B1ERR",8)
                                                                               
^SCR("B1ERR",9)
                                                                          1]   
^SCR("B1ERR",10)
                                                                               
^SCR("B1ERR",11)
     {                                                         05} : d`iby     
^SCR("B1ERR",12)
                                                                               
^SCR("B1ERR",13)
   [1                                                                          
^SCR("B1ERR","A",1)

^SCR("B1ERR","A",2)

^SCR("B1ERR","A",3)

^SCR("B1ERR","A",4)

^SCR("B1ERR","A",5)

^SCR("B1ERR","A",6)

^SCR("B1ERR","A",7)

^SCR("B1ERR","A",8)

^SCR("B1ERR","A",9)

^SCR("B1ERR","A",10)

^SCR("B1ERR","A",11)
:„€‰‚™
^SCR("B1ERR","A",12)

^SCR("B1ERR","A",13)

^SCR("B1ERR","AV",1)

^SCR("B1ERR","AV",2)

^SCR("B1ERR","AV",3)

^SCR("B1ERR","AV",4)

^SCR("B1ERR","AV",5)

^SCR("B1ERR","AV",6)

^SCR("B1ERR","AV",7)

^SCR("B1ERR","AV",8)

^SCR("B1ERR","AV",9)

^SCR("B1ERR","AV",10)

^SCR("B1ERR","AV",11)
:vthda
^SCR("B1ERR","AV",12)

^SCR("B1ERR","AV",13)

^SCR("B1ERR","NAME")
d`iby zrced
^SCR("B1ERR","P",5,"CRD")
11,66,H,60,0
^SCR("B1ERR","P",5,"HELP")

^SCR("B1ERR","P",5,"LMAX")
60
^SCR("B1ERR","P",5,"MUMPS1")

^SCR("B1ERR","P",5,"MUMPS2")

^SCR("B1ERR","P",5,"OUTPUT")

^SCR("B1ERR","P",5,"TYP")
H
^SCR("B1ERR","P","NAME","ERR")
5
^SCR("B1ERR","P","NM",5)
ERR
^SCR("B1ERR","P","RB",1)
10,4,14,76
^SCR("B1ITRA")
H
^SCR("B1ITRA",1)
                                                                               
^SCR("B1ITRA",2)
                                                                   1]          
^SCR("B1ITRA",3)
                 # gewl ly dxzi xexia #                                        
^SCR("B1ITRA",4)
              {                          05}: oecren                           
^SCR("B1ITRA",5)
    [1                                                                         
^SCR("B1ITRA",6)
                                                                   1$          
^SCR("B1ITRA",7)
     :                            dlawzdy rcin                   :             
^SCR("B1ITRA",8)
                                                                               
^SCR("B1ITRA",9)
                                                                               
^SCR("B1ITRA",10)
                                                                               
^SCR("B1ITRA",11)
                                                                               
^SCR("B1ITRA",12)
                                                                               
^SCR("B1ITRA",13)
                                                                               
^SCR("B1ITRA",14)
                                                                               
^SCR("B1ITRA",15)
                                                                               
^SCR("B1ITRA",16)
                                                                               
^SCR("B1ITRA",17)
                                                                               
^SCR("B1ITRA",18)
                                                                               
^SCR("B1ITRA",19)
                                                                               
^SCR("B1ITRA",20)
    $1                                                                         
^SCR("B1ITRA",21)
                                                                               
^SCR("B1ITRA",22)
                                                                               
^SCR("B1ITRA","A",1)

^SCR("B1ITRA","A",2)

^SCR("B1ITRA","A",3)
‡…—ŒŒ™„˜š‰˜…˜‰�
^SCR("B1ITRA","A",4)
:�…ƒ’…Ž
^SCR("B1ITRA","A",5)

^SCR("B1ITRA","A",6)

^SCR("B1ITRA","A",7)
„Œ�—š„™’ƒ‰Ž
^SCR("B1ITRA","A",8)
-----------------------------------------------------------
^SCR("B1ITRA","A",9)

^SCR("B1ITRA","A",10)

^SCR("B1ITRA","A",11)

^SCR("B1ITRA","A",12)

^SCR("B1ITRA","A",13)

^SCR("B1ITRA","A",14)

^SCR("B1ITRA","A",15)

^SCR("B1ITRA","A",16)

^SCR("B1ITRA","A",17)

^SCR("B1ITRA","A",18)

^SCR("B1ITRA","A",19)

^SCR("B1ITRA","A",20)

^SCR("B1ITRA","A",21)

^SCR("B1ITRA","A",22)

^SCR("B1ITRA","AV",1)

^SCR("B1ITRA","AV",2)

^SCR("B1ITRA","AV",3)
juekkavr,hrurhc
^SCR("B1ITRA","AV",4)
:iusgun
^SCR("B1ITRA","AV",5)

^SCR("B1ITRA","AV",6)

^SCR("B1ITRA","AV",7)
vkce,vagshn
^SCR("B1ITRA","AV",8)
-----------------------------------------------------------
^SCR("B1ITRA","AV",9)

^SCR("B1ITRA","AV",10)

^SCR("B1ITRA","AV",11)

^SCR("B1ITRA","AV",12)

^SCR("B1ITRA","AV",13)

^SCR("B1ITRA","AV",14)

^SCR("B1ITRA","AV",15)

^SCR("B1ITRA","AV",16)

^SCR("B1ITRA","AV",17)

^SCR("B1ITRA","AV",18)

^SCR("B1ITRA","AV",19)

^SCR("B1ITRA","AV",20)

^SCR("B1ITRA","AV",21)

^SCR("B1ITRA","AV",22)

^SCR("B1ITRA","G",1,"CRD")
8,65,H,55,0
^SCR("B1ITRA","G",1,"HELP")

^SCR("B1ITRA","G",1,"LMAX")
59
^SCR("B1ITRA","G",1,"MUMPS1")

^SCR("B1ITRA","G",1,"MUMPS2")

^SCR("B1ITRA","G",1,"OUTPUT")

^SCR("B1ITRA","G",1,"SHEM")
                            dlawzdy rcin                   
^SCR("B1ITRA","G",1,"TYP")
H
^SCR("B1ITRA","G","DEL")

^SCR("B1ITRA","G","MAX")
99
^SCR("B1ITRA","G","NAME","ATAVA")
1
^SCR("B1ITRA","G","NM",1)
ATAVA
^SCR("B1ITRA","G","RB")
7,5,21,69
^SCR("B1ITRA","G","REF")
^TMP($P
^SCR("B1ITRA","G","RZD")
\
^SCR("B1ITRA","G","STEP")
1
^SCR("B1ITRA","G","STG")
     :                            dlawzdy rcin                   :             
^SCR("B1ITRA","G","VG")
9
^SCR("B1ITRA","NAME")

^SCR("B1ITRA","P",5,"CRD")
4,44,H,29
^SCR("B1ITRA","P",5,"HELP")

^SCR("B1ITRA","P",5,"LMAX")
29
^SCR("B1ITRA","P",5,"MUMPS1")

^SCR("B1ITRA","P",5,"MUMPS2")

^SCR("B1ITRA","P",5,"OUTPUT")

^SCR("B1ITRA","P",5,"TYP")
H
^SCR("B1ITRA","P","NAME","CLUB1")
5
^SCR("B1ITRA","P","NM",5)
CLUB1
^SCR("B1ITRA","P","RB",1)
3,5,6,69
^SCR("B1LKH")
H
^SCR("B1LKH",1)
                                                                               
^SCR("B1LKH",2)
                           {05                 } wi'bel qpfia gewl 'qn         
^SCR("B1LKH",3)
                                                                         1]    
^SCR("B1LKH",4)
                                      {              10}:   ihxt my            
^SCR("B1LKH",5)
                                      {              12}:  dgtyn my            
^SCR("B1LKH",6)
                                            {17        }:zedf zcerz            
^SCR("B1LKH",7)
             {                                       20}:     zaezk            
^SCR("B1LKH",8)
                                           {37         }:  ciip 'lh            
^SCR("B1LKH",9)
             {40                                       }:     l"`ec            
^SCR("B1LKH",10)
                                             {45       }: zcled mei            
^SCR("B1LKH",11)
                                                                               
^SCR("B1LKH",12)
        [1                                                                     
^SCR("B1LKH","A",1)

^SCR("B1LKH","A",2)
—‰'‚…Œ‘�†‰�‡…—Œ'‘Ž
^SCR("B1LKH","A",3)

^SCR("B1LKH","A",4)
:‰ˆ˜”�™
^SCR("B1LKH","A",5)
:„‡”™Ž�™
^SCR("B1LKH","A",6)
:š…„†šƒ…’š
^SCR("B1LKH","A",7)
:š�…š‹
^SCR("B1LKH","A",8)
:ƒ‰‰�'Œˆ
^SCR("B1LKH","A",9)
:Œ"€…ƒ
^SCR("B1LKH","A",10)
:šƒŒ…„�…‰
^SCR("B1LKH","A",11)

^SCR("B1LKH","A",12)

^SCR("B1LKH","AV",1)

^SCR("B1LKH","AV",2)
ehwdukxbzhcjuekwxn
^SCR("B1LKH","AV",3)

^SCR("B1LKH","AV",4)
:hyrpoa
^SCR("B1LKH","AV",5)
:vjpanoa
^SCR("B1LKH","AV",6)
:,uvz,sug,
^SCR("B1LKH","AV",7)
:,cu,f
^SCR("B1LKH","AV",8)
:shhbwky
^SCR("B1LKH","AV",9)
:k"tus
^SCR("B1LKH","AV",10)
:,skuvouh
^SCR("B1LKH","AV",11)

^SCR("B1LKH","AV",12)

^SCR("B1LKH","NAME")

^SCR("B1LKH","P",5,"CRD")
2,27,E,16,0
^SCR("B1LKH","P",5,"HELP")

^SCR("B1LKH","P",5,"LMAX")
20
^SCR("B1LKH","P",5,"MUMPS1")

^SCR("B1LKH","P",5,"MUMPS2")

^SCR("B1LKH","P",5,"MUST")

^SCR("B1LKH","P",5,"OUTPUT")

^SCR("B1LKH","P",5,"TYP")
E
^SCR("B1LKH","P",10,"CRD")
4,56,H,16,0
^SCR("B1LKH","P",10,"HELP")

^SCR("B1LKH","P",10,"LMAX")
17
^SCR("B1LKH","P",10,"MUMPS1")

^SCR("B1LKH","P",10,"MUMPS2")

^SCR("B1LKH","P",10,"MUST")

^SCR("B1LKH","P",10,"TYP")
H
^SCR("B1LKH","P",12,"CRD")
5,56,H,17,0
^SCR("B1LKH","P",12,"HELP")

^SCR("B1LKH","P",12,"LMAX")
17
^SCR("B1LKH","P",12,"MUMPS1")

^SCR("B1LKH","P",12,"MUMPS2")

^SCR("B1LKH","P",12,"MUST")

^SCR("B1LKH","P",12,"TYP")
H
^SCR("B1LKH","P",17,"CRD")
6,44,E,9,0
^SCR("B1LKH","P",17,"HELP")

^SCR("B1LKH","P",17,"LMAX")
11
^SCR("B1LKH","P",17,"MUMPS1")

^SCR("B1LKH","P",17,"MUMPS2")

^SCR("B1LKH","P",17,"TYP")
E
^SCR("B1LKH","P",20,"CRD")
7,56,H,40,0
^SCR("B1LKH","P",20,"HELP")

^SCR("B1LKH","P",20,"LMAX")
42
^SCR("B1LKH","P",20,"MUMPS1")

^SCR("B1LKH","P",20,"MUMPS2")

^SCR("B1LKH","P",20,"MUST")

^SCR("B1LKH","P",20,"TYP")
H
^SCR("B1LKH","P",37,"CRD")
8,43,E,12,0
^SCR("B1LKH","P",37,"HELP")

^SCR("B1LKH","P",37,"LMAX")
12
^SCR("B1LKH","P",37,"MUMPS1")

^SCR("B1LKH","P",37,"MUMPS2")

^SCR("B1LKH","P",37,"MUST")

^SCR("B1LKH","P",37,"TYP")
E
^SCR("B1LKH","P",40,"CRD")
9,13,E,42,0
^SCR("B1LKH","P",40,"HELP")

^SCR("B1LKH","P",40,"LMAX")
42
^SCR("B1LKH","P",40,"MUMPS1")

^SCR("B1LKH","P",40,"MUMPS2")
S EMAIL=$$FUNC^%UCASE(EMAIL)
^SCR("B1LKH","P",40,"MUST")

^SCR("B1LKH","P",40,"TYP")
E
^SCR("B1LKH","P",45,"CRD")
10,45,D,8,0
^SCR("B1LKH","P",45,"HELP")

^SCR("B1LKH","P",45,"LMAX")
10
^SCR("B1LKH","P",45,"MUMPS1")

^SCR("B1LKH","P",45,"MUMPS2")

^SCR("B1LKH","P",45,"TYP")
D
^SCR("B1LKH","P","NAME","EMAIL")
40
^SCR("B1LKH","P","NAME","FNAME")
10
^SCR("B1LKH","P","NAME","JOMH")
45
^SCR("B1LKH","P","NAME","KTOV")
20
^SCR("B1LKH","P","NAME","LKH")
5
^SCR("B1LKH","P","NAME","LNAME")
12
^SCR("B1LKH","P","NAME","PELE")
37
^SCR("B1LKH","P","NAME","TZ")
17
^SCR("B1LKH","P","NM",5)
LKH
^SCR("B1LKH","P","NM",10)
FNAME
^SCR("B1LKH","P","NM",12)
LNAME
^SCR("B1LKH","P","NM",17)
TZ
^SCR("B1LKH","P","NM",20)
KTOV
^SCR("B1LKH","P","NM",37)
PELE
^SCR("B1LKH","P","NM",40)
EMAIL
^SCR("B1LKH","P","NM",45)
JOMH
^SCR("B1LKH","P","RB",1)
4,9,13,75
^SCR("B1PAY")
H
^SCR("B1PAY",1)
                                                                             1]
^SCR("B1PAY",2)
                                                                               
^SCR("B1PAY",3)
                                                 {05     } :   melyzl dxzi     
^SCR("B1PAY",4)
                                                                               
^SCR("B1PAY",5)
                                                 {10     } :   zecewp k"dq     
^SCR("B1PAY",6)
                                                                               
^SCR("B1PAY",7)
                                                 {15     } :  zecewpa mley     
^SCR("B1PAY",8)
                                                                               
^SCR("B1PAY",9)
                                                 {20     } :   melyzl x`yp     
^SCR("B1PAY",10)
                                                                               
^SCR("B1PAY",11)
                     {                          23} {22  } :        oecren     
^SCR("B1PAY",12)
                                                                               
^SCR("B1PAY",13)
                     {25                                 } :     qihxk 'qn     
^SCR("B1PAY",14)
                                                                               
^SCR("B1PAY",15)
                                                 {27     } :   qihxka dxzi     
^SCR("B1PAY",16)
                                                                               
^SCR("B1PAY",17)
                                                 {30     } :   qihxka mley     
^SCR("B1PAY",18)
                                                                               
^SCR("B1PAY",19)
                                                 {35     } :   melyzl dxzi     
^SCR("B1PAY",20)
                                                                               
^SCR("B1PAY",21)
               [1                                                              
^SCR("B1PAY","A",1)

^SCR("B1PAY","A",2)

^SCR("B1PAY","A",3)
:�…Œ™šŒ„˜š‰
^SCR("B1PAY","A",4)

^SCR("B1PAY","A",5)
:š…ƒ…—�‹"„‘
^SCR("B1PAY","A",6)

^SCR("B1PAY","A",7)
:š…ƒ…—���Œ…™
^SCR("B1PAY","A",8)

^SCR("B1PAY","A",9)
:�…Œ™šŒ˜€™�
^SCR("B1PAY","A",10)

^SCR("B1PAY","A",11)
:�…ƒ’…Ž
^SCR("B1PAY","A",12)

^SCR("B1PAY","A",13)
:‘‰ˆ˜‹'‘Ž
^SCR("B1PAY","A",14)

^SCR("B1PAY","A",15)
:‘‰ˆ˜‹�„˜š‰
^SCR("B1PAY","A",16)

^SCR("B1PAY","A",17)
:‘‰ˆ˜‹��Œ…™
^SCR("B1PAY","A",18)

^SCR("B1PAY","A",19)
:�…Œ™šŒ„˜š‰
^SCR("B1PAY","A",20)

^SCR("B1PAY","A",21)

^SCR("B1PAY","AV",1)

^SCR("B1PAY","AV",2)

^SCR("B1PAY","AV",3)
:ouka,kvr,h
^SCR("B1PAY","AV",4)

^SCR("B1PAY","AV",5)
:,usuebf"vx
^SCR("B1PAY","AV",6)

^SCR("B1PAY","AV",7)
:,usuebcokua
^SCR("B1PAY","AV",8)

^SCR("B1PAY","AV",9)
:ouka,krtab
^SCR("B1PAY","AV",10)

^SCR("B1PAY","AV",11)
:iusgun
^SCR("B1PAY","AV",12)

^SCR("B1PAY","AV",13)
:xhyrfwxn
^SCR("B1PAY","AV",14)

^SCR("B1PAY","AV",15)
:xhyrfcvr,h
^SCR("B1PAY","AV",16)

^SCR("B1PAY","AV",17)
:xhyrfcokua
^SCR("B1PAY","AV",18)

^SCR("B1PAY","AV",19)
:ouka,kvr,h
^SCR("B1PAY","AV",20)

^SCR("B1PAY","AV",21)

^SCR("B1PAY","NAME")
wi'bel qpfia melyz
^SCR("B1PAY","P",5,"CRD")
3,49,N,8,2
^SCR("B1PAY","P",5,"HELP")

^SCR("B1PAY","P",5,"LMAX")
8
^SCR("B1PAY","P",5,"MUMPS1")

^SCR("B1PAY","P",5,"MUMPS2")

^SCR("B1PAY","P",5,"OUTPUT")

^SCR("B1PAY","P",5,"TYP")
N
^SCR("B1PAY","P",10,"CRD")
5,49,N,8,2
^SCR("B1PAY","P",10,"HELP")

^SCR("B1PAY","P",10,"LMAX")
8
^SCR("B1PAY","P",10,"MUMPS1")

^SCR("B1PAY","P",10,"MUMPS2")

^SCR("B1PAY","P",10,"OUTPUT")

^SCR("B1PAY","P",10,"TYP")
N
^SCR("B1PAY","P",15,"CRD")
7,49,N,8,2
^SCR("B1PAY","P",15,"HELP")

^SCR("B1PAY","P",15,"LMAX")
8
^SCR("B1PAY","P",15,"MUMPS1")
D NKDPAY0^B1PAY
^SCR("B1PAY","P",15,"MUMPS2")
D NKDPAY^B1PAY
^SCR("B1PAY","P",15,"TYP")
N
^SCR("B1PAY","P",20,"CRD")
9,49,N,8,2
^SCR("B1PAY","P",20,"HELP")

^SCR("B1PAY","P",20,"LMAX")
8
^SCR("B1PAY","P",20,"MUMPS1")

^SCR("B1PAY","P",20,"MUMPS2")

^SCR("B1PAY","P",20,"OUTPUT")

^SCR("B1PAY","P",20,"TYP")
N
^SCR("B1PAY","P",22,"CRD")
11,52,E,5,0
^SCR("B1PAY","P",22,"HELP")

^SCR("B1PAY","P",22,"LMAX")
5
^SCR("B1PAY","P",22,"MUMPS1")
D CLUB0^B1PAY
^SCR("B1PAY","P",22,"MUMPS2")
D CLUB^B1PAY
^SCR("B1PAY","P",22,"TYP")
E
^SCR("B1PAY","P",23,"CRD")
11,51,H,29,0
^SCR("B1PAY","P",23,"HELP")

^SCR("B1PAY","P",23,"LMAX")
29
^SCR("B1PAY","P",23,"MUMPS1")

^SCR("B1PAY","P",23,"MUMPS2")

^SCR("B1PAY","P",23,"OUTPUT")

^SCR("B1PAY","P",23,"TYP")
H
^SCR("B1PAY","P",25,"CRD")
13,21,E,36,0
^SCR("B1PAY","P",25,"HELP")

^SCR("B1PAY","P",25,"LMAX")
36
^SCR("B1PAY","P",25,"MUMPS1")

^SCR("B1PAY","P",25,"MUMPS2")
D CARD^B1PAY
^SCR("B1PAY","P",25,"MUST")

^SCR("B1PAY","P",25,"TYP")
E
^SCR("B1PAY","P",27,"CRD")
15,49,N,8,2
^SCR("B1PAY","P",27,"HELP")

^SCR("B1PAY","P",27,"LMAX")
8
^SCR("B1PAY","P",27,"MUMPS1")

^SCR("B1PAY","P",27,"MUMPS2")

^SCR("B1PAY","P",27,"OUTPUT")

^SCR("B1PAY","P",27,"TYP")
N
^SCR("B1PAY","P",30,"CRD")
17,49,N,8,2
^SCR("B1PAY","P",30,"HELP")

^SCR("B1PAY","P",30,"LMAX")
8
^SCR("B1PAY","P",30,"MUMPS1")
D CRDPAY0^B1PAY
^SCR("B1PAY","P",30,"MUMPS2")
D CRDPAY^B1PAY
^SCR("B1PAY","P",30,"TYP")
N
^SCR("B1PAY","P",35,"CRD")
19,49,N,8,2
^SCR("B1PAY","P",35,"HELP")

^SCR("B1PAY","P",35,"LMAX")
8
^SCR("B1PAY","P",35,"MUMPS1")

^SCR("B1PAY","P",35,"MUMPS2")

^SCR("B1PAY","P",35,"OUTPUT")

^SCR("B1PAY","P",35,"TYP")
N
^SCR("B1PAY","P","NAME","CARD")
25
^SCR("B1PAY","P","NAME","CLUB")
22
^SCR("B1PAY","P","NAME","CLUB1")
23
^SCR("B1PAY","P","NAME","CRDITRA")
27
^SCR("B1PAY","P","NAME","CRDPAY")
30
^SCR("B1PAY","P","NAME","ITRA")
35
^SCR("B1PAY","P","NAME","NKD")
10
^SCR("B1PAY","P","NAME","NKDPAY")
15
^SCR("B1PAY","P","NAME","TOPAY")
5
^SCR("B1PAY","P","NAME","TOPAY1")
20
^SCR("B1PAY","P","NM",5)
TOPAY
^SCR("B1PAY","P","NM",10)
NKD
^SCR("B1PAY","P","NM",15)
NKDPAY
^SCR("B1PAY","P","NM",20)
TOPAY1
^SCR("B1PAY","P","NM",22)
CLUB
^SCR("B1PAY","P","NM",23)
CLUB1
^SCR("B1PAY","P","NM",25)
CARD
^SCR("B1PAY","P","NM",27)
CRDITRA
^SCR("B1PAY","P","NM",30)
CRDPAY
^SCR("B1PAY","P","NM",35)
ITRA
^SCR("B1PAY","P","RB",1)
2,16,22,79
^SCR("B1PAY1")
H
^SCR("B1PAY1",1)
                                              # zecewp yenin #                 
^SCR("B1PAY1",2)
                                                                               
^SCR("B1PAY1",3)
                                                                             1]
^SCR("B1PAY1",4)
                                                                               
^SCR("B1PAY1",5)
                                                 {05     } :   melyzl dxzi     
^SCR("B1PAY1",6)
                                                                               
^SCR("B1PAY1",7)
                                                 {10     } :   zecewp k"dq     
^SCR("B1PAY1",8)
                                                                               
^SCR("B1PAY1",9)
                                                 {15     } :  zecewpa mley     
^SCR("B1PAY1",10)
                                                                               
^SCR("B1PAY1",11)
                                                 {20     } :   melyzl x`yp     
^SCR("B1PAY1",12)
                                                                              
^SCR("B1PAY1",13)
                                           [1                                  
^SCR("B1PAY1","A",1)
š…ƒ…—�™…Ž‰Ž
^SCR("B1PAY1","A",2)

^SCR("B1PAY1","A",3)

^SCR("B1PAY1","A",4)

^SCR("B1PAY1","A",5)
:�…Œ™šŒ„˜š‰
^SCR("B1PAY1","A",6)

^SCR("B1PAY1","A",7)
:š…ƒ…—�‹"„‘
^SCR("B1PAY1","A",8)

^SCR("B1PAY1","A",9)
:š…ƒ…—���Œ…™
^SCR("B1PAY1","A",10)

^SCR("B1PAY1","A",11)
:�…Œ™šŒ˜€™�
^SCR("B1PAY1","A",12)

^SCR("B1PAY1","A",13)

^SCR("B1PAY1","AV",1)
,usuebaunhn
^SCR("B1PAY1","AV",2)

^SCR("B1PAY1","AV",3)

^SCR("B1PAY1","AV",4)

^SCR("B1PAY1","AV",5)
:ouka,kvr,h
^SCR("B1PAY1","AV",6)

^SCR("B1PAY1","AV",7)
:,usuebf"vx
^SCR("B1PAY1","AV",8)

^SCR("B1PAY1","AV",9)
:,usuebcokua
^SCR("B1PAY1","AV",10)

^SCR("B1PAY1","AV",11)
:ouka,krtab
^SCR("B1PAY1","AV",12)

^SCR("B1PAY1","AV",13)

^SCR("B1PAY1","NAME")

^SCR("B1PAY1","P",5,"CRD")
5,49,N,8,2
^SCR("B1PAY1","P",5,"HELP")

^SCR("B1PAY1","P",5,"LMAX")
8
^SCR("B1PAY1","P",5,"MUMPS1")

^SCR("B1PAY1","P",5,"MUMPS2")

^SCR("B1PAY1","P",5,"OUTPUT")

^SCR("B1PAY1","P",5,"TYP")
N
^SCR("B1PAY1","P",10,"CRD")
7,49,N,8,2
^SCR("B1PAY1","P",10,"HELP")

^SCR("B1PAY1","P",10,"LMAX")
8
^SCR("B1PAY1","P",10,"MUMPS1")

^SCR("B1PAY1","P",10,"MUMPS2")

^SCR("B1PAY1","P",10,"OUTPUT")

^SCR("B1PAY1","P",10,"TYP")
N
^SCR("B1PAY1","P",15,"CRD")
9,49,N,8,2
^SCR("B1PAY1","P",15,"HELP")

^SCR("B1PAY1","P",15,"LMAX")
8
^SCR("B1PAY1","P",15,"MUMPS1")
D NKDPAY0^B1PAY
^SCR("B1PAY1","P",15,"MUMPS2")
D NKDPAY^B1PAY
^SCR("B1PAY1","P",15,"TYP")
N
^SCR("B1PAY1","P",20,"CRD")
11,49,N,8,2
^SCR("B1PAY1","P",20,"HELP")

^SCR("B1PAY1","P",20,"LMAX")
8
^SCR("B1PAY1","P",20,"MUMPS1")

^SCR("B1PAY1","P",20,"MUMPS2")

^SCR("B1PAY1","P",20,"OUTPUT")

^SCR("B1PAY1","P",20,"TYP")
N
^SCR("B1PAY1","P","NAME","NKD")
10
^SCR("B1PAY1","P","NAME","NKDPAY")
15
^SCR("B1PAY1","P","NAME","TOPAY0")
5
^SCR("B1PAY1","P","NAME","TOPAY1")
20
^SCR("B1PAY1","P","NM",5)
TOPAY0
^SCR("B1PAY1","P","NM",10)
NKD
^SCR("B1PAY1","P","NM",15)
NKDPAY
^SCR("B1PAY1","P","NM",20)
TOPAY1
^SCR("B1PAY1","P","RB",1)
4,44,14,79
^SCR("B1PAY2")
H
^SCR("B1PAY2",1)
                        # wi'bel qpfia qihxka melyz #                          
^SCR("B1PAY2",2)
                                                                               
^SCR("B1PAY2",3)
                                                                             1]
^SCR("B1PAY2",4)
                                                                               
^SCR("B1PAY2",5)
                                                 {20     } :   melyzl dxzi     
^SCR("B1PAY2",6)
                                                                               
^SCR("B1PAY2",7)
                     {                          23} {22  } :        oecren     
^SCR("B1PAY2",8)
                                                                               
^SCR("B1PAY2",9)
                     {25                                 } :     qihxk 'qn     
^SCR("B1PAY2",10)
                                                                               
^SCR("B1PAY2",11)
                              {                        26} :       gewl my     
^SCR("B1PAY2",12)
                                                                               
^SCR("B1PAY2",13)
                                                 {27     } :   qihxka dxzi     
^SCR("B1PAY2",14)
                                                                               
^SCR("B1PAY2",15)
                                                 {30     } :   qihxka mley     
^SCR("B1PAY2",16)
                                                                               
^SCR("B1PAY2",17)
                                                 {35     } :   melyzl dxzi     
^SCR("B1PAY2",18)
                                                                               
^SCR("B1PAY2",19)
               [1                                                              
^SCR("B1PAY2","A",1)
—‰'‚…Œ‘�†‰�‘‰ˆ˜‹��…Œ™š
^SCR("B1PAY2","A",2)

^SCR("B1PAY2","A",3)

^SCR("B1PAY2","A",4)

^SCR("B1PAY2","A",5)
:�…Œ™šŒ„˜š‰
^SCR("B1PAY2","A",6)

^SCR("B1PAY2","A",7)
:�…ƒ’…Ž
^SCR("B1PAY2","A",8)

^SCR("B1PAY2","A",9)
:‘‰ˆ˜‹'‘Ž
^SCR("B1PAY2","A",10)

^SCR("B1PAY2","A",11)
:‡…—Œ�™
^SCR("B1PAY2","A",12)

^SCR("B1PAY2","A",13)
:‘‰ˆ˜‹�„˜š‰
^SCR("B1PAY2","A",14)

^SCR("B1PAY2","A",15)
:‘‰ˆ˜‹��Œ…™
^SCR("B1PAY2","A",16)

^SCR("B1PAY2","A",17)
:�…Œ™šŒ„˜š‰
^SCR("B1PAY2","A",18)

^SCR("B1PAY2","A",19)

^SCR("B1PAY2","AV",1)
ehwdukxbzhcxhyrfcouka,
^SCR("B1PAY2","AV",2)

^SCR("B1PAY2","AV",3)

^SCR("B1PAY2","AV",4)

^SCR("B1PAY2","AV",5)
:ouka,kvr,h
^SCR("B1PAY2","AV",6)

^SCR("B1PAY2","AV",7)
:iusgun
^SCR("B1PAY2","AV",8)

^SCR("B1PAY2","AV",9)
:xhyrfwxn
^SCR("B1PAY2","AV",10)

^SCR("B1PAY2","AV",11)
:juekoa
^SCR("B1PAY2","AV",12)

^SCR("B1PAY2","AV",13)
:xhyrfcvr,h
^SCR("B1PAY2","AV",14)

^SCR("B1PAY2","AV",15)
:xhyrfcokua
^SCR("B1PAY2","AV",16)

^SCR("B1PAY2","AV",17)
:ouka,kvr,h
^SCR("B1PAY2","AV",18)

^SCR("B1PAY2","AV",19)

^SCR("B1PAY2","NAME")

^SCR("B1PAY2","P",20,"CRD")
5,49,N,8,2
^SCR("B1PAY2","P",20,"HELP")

^SCR("B1PAY2","P",20,"LMAX")
8
^SCR("B1PAY2","P",20,"MUMPS1")

^SCR("B1PAY2","P",20,"MUMPS2")

^SCR("B1PAY2","P",20,"OUTPUT")

^SCR("B1PAY2","P",20,"TYP")
N
^SCR("B1PAY2","P",22,"CRD")
7,52,E,5,0
^SCR("B1PAY2","P",22,"HELP")

^SCR("B1PAY2","P",22,"LMAX")
5
^SCR("B1PAY2","P",22,"MUMPS1")
D CLUB0^B1PAY
^SCR("B1PAY2","P",22,"MUMPS2")
D CLUB^B1PAY
^SCR("B1PAY2","P",22,"TYP")
E
^SCR("B1PAY2","P",23,"CRD")
7,51,H,29
^SCR("B1PAY2","P",23,"HELP")

^SCR("B1PAY2","P",23,"LMAX")
29
^SCR("B1PAY2","P",23,"MUMPS1")

^SCR("B1PAY2","P",23,"MUMPS2")

^SCR("B1PAY2","P",23,"OUTPUT")

^SCR("B1PAY2","P",23,"TYP")
H
^SCR("B1PAY2","P",25,"CRD")
9,21,E,36,0
^SCR("B1PAY2","P",25,"HELP")

^SCR("B1PAY2","P",25,"LMAX")
36
^SCR("B1PAY2","P",25,"MUMPS1")

^SCR("B1PAY2","P",25,"MUMPS2")
D CARD^B1PAY
^SCR("B1PAY2","P",25,"MUST")

^SCR("B1PAY2","P",25,"TYP")
E
^SCR("B1PAY2","P",26,"CRD")
11,58,H,27,0
^SCR("B1PAY2","P",26,"HELP")

^SCR("B1PAY2","P",26,"LMAX")
27
^SCR("B1PAY2","P",26,"MUMPS1")

^SCR("B1PAY2","P",26,"MUMPS2")

^SCR("B1PAY2","P",26,"OUTPUT")

^SCR("B1PAY2","P",26,"TYP")
H
^SCR("B1PAY2","P",27,"CRD")
13,49,N,8,2
^SCR("B1PAY2","P",27,"HELP")

^SCR("B1PAY2","P",27,"LMAX")
8
^SCR("B1PAY2","P",27,"MUMPS1")

^SCR("B1PAY2","P",27,"MUMPS2")

^SCR("B1PAY2","P",27,"OUTPUT")

^SCR("B1PAY2","P",27,"TYP")
N
^SCR("B1PAY2","P",30,"CRD")
15,49,N,8,2
^SCR("B1PAY2","P",30,"HELP")

^SCR("B1PAY2","P",30,"LMAX")
8
^SCR("B1PAY2","P",30,"MUMPS1")
D CRDPAY0^B1PAY
^SCR("B1PAY2","P",30,"MUMPS2")
D CRDPAY^B1PAY
^SCR("B1PAY2","P",30,"TYP")
N
^SCR("B1PAY2","P",35,"CRD")
17,49,N,8,2
^SCR("B1PAY2","P",35,"HELP")

^SCR("B1PAY2","P",35,"LMAX")
8
^SCR("B1PAY2","P",35,"MUMPS1")

^SCR("B1PAY2","P",35,"MUMPS2")

^SCR("B1PAY2","P",35,"OUTPUT")

^SCR("B1PAY2","P",35,"TYP")
N
^SCR("B1PAY2","P","NAME","BSNAME")
26
^SCR("B1PAY2","P","NAME","CARD")
25
^SCR("B1PAY2","P","NAME","CLUB")
22
^SCR("B1PAY2","P","NAME","CLUB1")
23
^SCR("B1PAY2","P","NAME","CRDITRA")
27
^SCR("B1PAY2","P","NAME","CRDPAY")
30
^SCR("B1PAY2","P","NAME","ITRA")
35
^SCR("B1PAY2","P","NAME","TOPAY1")
20
^SCR("B1PAY2","P","NM",20)
TOPAY1
^SCR("B1PAY2","P","NM",22)
CLUB
^SCR("B1PAY2","P","NM",23)
CLUB1
^SCR("B1PAY2","P","NM",25)
CARD
^SCR("B1PAY2","P","NM",26)
BSNAME
^SCR("B1PAY2","P","NM",27)
CRDITRA
^SCR("B1PAY2","P","NM",30)
CRDPAY
^SCR("B1PAY2","P","NM",35)
ITRA
^SCR("B1PAY2","P","RB",1)
4,16,20,79
^SCR("B1PRM")
H
^SCR("B1PRM",1)
                       # "wi'bel qpfia"-l mixhnxt #                            
^SCR("B1PRM",2)
                                                                            1] 
^SCR("B1PRM",3)
                    {03 } : ( `l - 0 ,ok - 1 ) dlirt "wi'bel qpfia" zkxrn m`d  
^SCR("B1PRM",4)
                                                                               
^SCR("B1PRM",5)
                                          dwqr xeciy zra zecewp yenin zra m`d  
^SCR("B1PRM",6)
             {05 }  :     ( `l - 0 ,ok - 1 ) ixyt`d zecewpd mekq `eln z` miyl  
^SCR("B1PRM",7)
                                                                               
^SCR("B1PRM",8)
                                                      - oecren gewl iedif zra  
^SCR("B1PRM",9)
             {10 }  :( `l - 0 , ok - 1 ) dtewa zeiniptd zeahdd lk z` lhal m`d  
^SCR("B1PRM",10)
                                                                               
^SCR("B1PRM",11)
            {                  13} {12      } : "wi'bel qpfia qihxk" hixt cew  
^SCR("B1PRM",12)
                                                                               
^SCR("B1PRM",13)
                                                                               
^SCR("B1PRM",14)
            {                      41} {40     } :     "zeahd yenin" hixt cew  
^SCR("B1PRM",15)
            {                      46} {45     } :    "zecewp yenin" hixt cew  
^SCR("B1PRM",16)
       [1                                                                      
^SCR("B1PRM",17)
                                                                               
^SCR("B1PRM",18)
                                                                               
^SCR("B1PRM","A",1)
"—‰'‚…Œ‘�†‰�"-Œ�‰˜ˆŽ˜”
^SCR("B1PRM","A",2)

^SCR("B1PRM","A",3)
:(€Œ-0,�‹-1)„Œ‰’”"—‰'‚…Œ‘�†‰�"š‹˜’Ž�€„
^SCR("B1PRM","A",4)

^SCR("B1PRM","A",5)
„—‘’˜…ƒ‰™š’�š…ƒ…—�™…Ž‰Žš’��€„
^SCR("B1PRM","A",6)
:(€Œ-0,�‹-1)‰˜™”€„š…ƒ…—�„�…‹‘€…ŒŽš€�‰™Œ
^SCR("B1PRM","A",7)

^SCR("B1PRM","A",8)
-�…ƒ’…Ž‡…—Œ‰…„‰†š’�
^SCR("B1PRM","A",9)
:(€Œ-0,�‹-1)„”…—�š…‰Ž‰�”„š…�ˆ„„Œ‹š€Œˆ�Œ�€„
^SCR("B1PRM","A",10)

^SCR("B1PRM","A",11)
:"—‰'‚…Œ‘�†‰�‘‰ˆ˜‹"ˆ‰˜”ƒ…—
^SCR("B1PRM","A",12)

^SCR("B1PRM","A",13)

^SCR("B1PRM","A",14)
:"š…�ˆ„™…Ž‰Ž"ˆ‰˜”ƒ…—
^SCR("B1PRM","A",15)
:"š…ƒ…—�™…Ž‰Ž"ˆ‰˜”ƒ…—
^SCR("B1PRM","A",16)

^SCR("B1PRM","A",17)

^SCR("B1PRM","A",18)

^SCR("B1PRM","AV",1)
"ehwdukxbzhc"-kohrynrp
^SCR("B1PRM","AV",2)

^SCR("B1PRM","AV",3)
:(tk-0'if-1)vkhgp"ehwdukxbzhc",frgnotv
^SCR("B1PRM","AV",4)

^SCR("B1PRM","AV",5)
vexgrusha,gc,usuebaunhn,gcotv
^SCR("B1PRM","AV",6)
:(tk-0'if-1)hraptv,usuebvoufxtukn,tohak
^SCR("B1PRM","AV",7)

^SCR("B1PRM","AV",8)
-iusgunjuekhuvhz,gc
^SCR("B1PRM","AV",9)
:(tk-0'if-1)vpuec,uhnhbpv,ucyvvkf,tkyckotv
^SCR("B1PRM","AV",10)

^SCR("B1PRM","AV",11)
:"ehwdukxbzhcxhyrf"yhrpsue
^SCR("B1PRM","AV",12)

^SCR("B1PRM","AV",13)

^SCR("B1PRM","AV",14)
:",ucyvaunhn"yhrpsue
^SCR("B1PRM","AV",15)
:",usuebaunhn"yhrpsue
^SCR("B1PRM","AV",16)

^SCR("B1PRM","AV",17)

^SCR("B1PRM","AV",18)

^SCR("B1PRM","NAME")
wi'bel qpfial lixhnxt
^SCR("B1PRM","P",3,"CRD")
3,20,N,1,0
^SCR("B1PRM","P",3,"HELP")

^SCR("B1PRM","P",3,"LMAX")
4
^SCR("B1PRM","P",3,"MUMPS1")

^SCR("B1PRM","P",3,"MUMPS2")
D ^%L1BDO
^SCR("B1PRM","P",3,"MUST")

^SCR("B1PRM","P",3,"TYP")
N
^SCR("B1PRM","P",5,"CRD")
6,13,N,1,0
^SCR("B1PRM","P",5,"HELP")

^SCR("B1PRM","P",5,"LMAX")
4
^SCR("B1PRM","P",5,"MUMPS1")
S:$G(NKD)="" NKD=1
^SCR("B1PRM","P",5,"MUMPS2")
D ^%L1BDO
^SCR("B1PRM","P",5,"MUST")

^SCR("B1PRM","P",5,"TYP")
N
^SCR("B1PRM","P",10,"CRD")
9,13,N,1,0
^SCR("B1PRM","P",10,"HELP")

^SCR("B1PRM","P",10,"LMAX")
4
^SCR("B1PRM","P",10,"MUMPS1")
S:'$G(NOKFL) NOKFL=0
^SCR("B1PRM","P",10,"MUMPS2")

^SCR("B1PRM","P",10,"TYP")
N
^SCR("B1PRM","P",12,"CHECK")
Y
^SCR("B1PRM","P",12,"CRD")
11,35,E,8,0
^SCR("B1PRM","P",12,"FNC")

^SCR("B1PRM","P",12,"GLOB")
PAR
^SCR("B1PRM","P",12,"HELP")

^SCR("B1PRM","P",12,"LMAX")
9
^SCR("B1PRM","P",12,"MUMPS1")

^SCR("B1PRM","P",12,"MUMPS2")

^SCR("B1PRM","P",12,"NLN")
20
^SCR("B1PRM","P",12,"RZD")
\
^SCR("B1PRM","P",12,"TOPB")
8
^SCR("B1PRM","P",12,"TYP")
E
^SCR("B1PRM","P",12,"VRB")
PAR1
^SCR("B1PRM","P",13,"CRD")
11,34,H,21
^SCR("B1PRM","P",13,"HELP")

^SCR("B1PRM","P",13,"LMAX")
21
^SCR("B1PRM","P",13,"MUMPS1")

^SCR("B1PRM","P",13,"MUMPS2")

^SCR("B1PRM","P",13,"OUTPUT")

^SCR("B1PRM","P",13,"TYP")
H
^SCR("B1PRM","P",40,"CHECK")
Y
^SCR("B1PRM","P",40,"CRD")
14,39,E,8,0
^SCR("B1PRM","P",40,"FNC")

^SCR("B1PRM","P",40,"GLOB")
^PAR
^SCR("B1PRM","P",40,"HELP")

^SCR("B1PRM","P",40,"LMAX")
8
^SCR("B1PRM","P",40,"MUMPS1")

^SCR("B1PRM","P",40,"MUMPS2")

^SCR("B1PRM","P",40,"NLN")
20
^SCR("B1PRM","P",40,"RZD")
**
^SCR("B1PRM","P",40,"TOPB")
8
^SCR("B1PRM","P",40,"TYP")
E
^SCR("B1PRM","P",40,"VRB")
PARBON1
^SCR("B1PRM","P",41,"CRD")
14,38,H,25
^SCR("B1PRM","P",41,"HELP")

^SCR("B1PRM","P",41,"LMAX")
25
^SCR("B1PRM","P",41,"MUMPS1")

^SCR("B1PRM","P",41,"MUMPS2")

^SCR("B1PRM","P",41,"OUTPUT")

^SCR("B1PRM","P",41,"TYP")
H
^SCR("B1PRM","P",45,"CHECK")
Y
^SCR("B1PRM","P",45,"CRD")
15,39,N,8,0
^SCR("B1PRM","P",45,"FNC")

^SCR("B1PRM","P",45,"GLOB")
^PAR
^SCR("B1PRM","P",45,"HELP")

^SCR("B1PRM","P",45,"LMAX")
8
^SCR("B1PRM","P",45,"MUMPS1")

^SCR("B1PRM","P",45,"MUMPS2")

^SCR("B1PRM","P",45,"NLN")
20
^SCR("B1PRM","P",45,"RZD")
**
^SCR("B1PRM","P",45,"TOPB")
8
^SCR("B1PRM","P",45,"TYP")
N
^SCR("B1PRM","P",45,"VRB")
PARNKD1
^SCR("B1PRM","P",46,"CRD")
15,38,H,25
^SCR("B1PRM","P",46,"HELP")

^SCR("B1PRM","P",46,"LMAX")
25
^SCR("B1PRM","P",46,"MUMPS1")

^SCR("B1PRM","P",46,"MUMPS2")

^SCR("B1PRM","P",46,"OUTPUT")

^SCR("B1PRM","P",46,"TYP")
H
^SCR("B1PRM","P","NAME","BSL")
3
^SCR("B1PRM","P","NAME","NKD")
5
^SCR("B1PRM","P","NAME","NOKFL")
10
^SCR("B1PRM","P","NAME","PAR")
12
^SCR("B1PRM","P","NAME","PAR1")
13
^SCR("B1PRM","P","NAME","PARBON")
40
^SCR("B1PRM","P","NAME","PARBON1")
41
^SCR("B1PRM","P","NAME","PARNKD")
45
^SCR("B1PRM","P","NAME","PARNKD1")
46
^SCR("B1PRM","P","NM",3)
BSL
^SCR("B1PRM","P","NM",5)
NKD
^SCR("B1PRM","P","NM",10)
NOKFL
^SCR("B1PRM","P","NM",12)
PAR
^SCR("B1PRM","P","NM",13)
PAR1
^SCR("B1PRM","P","NM",40)
PARBON
^SCR("B1PRM","P","NM",41)
PARBON1
^SCR("B1PRM","P","NM",45)
PARNKD
^SCR("B1PRM","P","NM",46)
PARNKD1
^SCR("B1PRM","P","RB",1)
3,8,17,78
^SCR("B1PRM0")
H
^SCR("B1PRM0",1)
                       # "wi'bel qpfia"-l mixhnxt #                            
^SCR("B1PRM0",2)
                                                                            1] 
^SCR("B1PRM0",3)
                    {03 } : ( `l - 0 ,ok - 1 ) dlirt "wi'bel qpfia" zkxrn m`d  
^SCR("B1PRM0",4)
                                                                               
^SCR("B1PRM0",5)
                                          dwqr xeciy zra zecewp yenin zra m`d  
^SCR("B1PRM0",6)
             {05 }  :     ( `l - 0 ,ok - 1 ) ixyt`d zecewpd mekq `eln z` miyl  
^SCR("B1PRM0",7)
                                                                               
^SCR("B1PRM0",8)
                                                      - oecren gewl iedif zra  
^SCR("B1PRM0",9)
             {10 }  :( `l - 0 , ok - 1 ) dtewa zeiniptd zeahdd lk z` lhal m`d  
^SCR("B1PRM0",10)
                                                                               
^SCR("B1PRM0",11)
            {                  13} {12      } : "wi'bel qpfia qihxk" hixt cew  
^SCR("B1PRM0",12)
                                                                               
^SCR("B1PRM0",13)
            {                      16} {15     } : "oecrenl zetxhvd" hixt cew  
^SCR("B1PRM0",14)
            {                      21} {20     } :  "zetxhvda yecig" hixt cew  
^SCR("B1PRM0",15)
            {                      26} {25     } : "zcled mei yenin" hixt cew  
^SCR("B1PRM0",16)
            {                      31} {30     } :   "oi`eyip yenin" hixt cew  
^SCR("B1PRM0",17)
            {                      36} {35     } :   "zetxhvd yenin" hixt cew  
^SCR("B1PRM0",18)
                                                                               
^SCR("B1PRM0",19)
            {                      41} {40     } :     "zeahd yenin" hixt cew  
^SCR("B1PRM0",20)
            {                      46} {45     } :    "zecewp yenin" hixt cew  
^SCR("B1PRM0",21)
       [1                                                                      
^SCR("B1PRM0",22)
                                                                               
^SCR("B1PRM0",23)
                                                                               
^SCR("B1PRM0","A",1)
"—‰'‚…Œ‘�†‰�"-Œ�‰˜ˆŽ˜”
^SCR("B1PRM0","A",2)

^SCR("B1PRM0","A",3)
:(€Œ-0,�‹-1)„Œ‰’”"—‰'‚…Œ‘�†‰�"š‹˜’Ž�€„
^SCR("B1PRM0","A",4)

^SCR("B1PRM0","A",5)
„—‘’˜…ƒ‰™š’�š…ƒ…—�™…Ž‰Žš’��€„
^SCR("B1PRM0","A",6)
:(€Œ-0,�‹-1)‰˜™”€„š…ƒ…—�„�…‹‘€…ŒŽš€�‰™Œ
^SCR("B1PRM0","A",7)

^SCR("B1PRM0","A",8)
-�…ƒ’…Ž‡…—Œ‰…„‰†š’�
^SCR("B1PRM0","A",9)
:(€Œ-0,�‹-1)„”…—�š…‰Ž‰�”„š…�ˆ„„Œ‹š€Œˆ�Œ�€„
^SCR("B1PRM0","A",10)

^SCR("B1PRM0","A",11)
:"—‰'‚…Œ‘�†‰�‘‰ˆ˜‹"ˆ‰˜”ƒ…—
^SCR("B1PRM0","A",12)

^SCR("B1PRM0","A",13)
:"�…ƒ’…ŽŒš…”˜ˆ–„"ˆ‰˜”ƒ…—
^SCR("B1PRM0","A",14)
:"š…”˜ˆ–„�™…ƒ‰‡"ˆ‰˜”ƒ…—
^SCR("B1PRM0","A",15)
:"šƒŒ…„�…‰™…Ž‰Ž"ˆ‰˜”ƒ…—
^SCR("B1PRM0","A",16)
:"�‰€…™‰�™…Ž‰Ž"ˆ‰˜”ƒ…—
^SCR("B1PRM0","A",17)
:"š…”˜ˆ–„™…Ž‰Ž"ˆ‰˜”ƒ…—
^SCR("B1PRM0","A",18)

^SCR("B1PRM0","A",19)
:"š…�ˆ„™…Ž‰Ž"ˆ‰˜”ƒ…—
^SCR("B1PRM0","A",20)
:"š…ƒ…—�™…Ž‰Ž"ˆ‰˜”ƒ…—
^SCR("B1PRM0","A",21)

^SCR("B1PRM0","A",22)

^SCR("B1PRM0","A",23)

^SCR("B1PRM0","AV",1)
"ehwdukxbzhc"-kohrynrp
^SCR("B1PRM0","AV",2)

^SCR("B1PRM0","AV",3)
:(tk-0'if-1)vkhgp"ehwdukxbzhc",frgnotv
^SCR("B1PRM0","AV",4)

^SCR("B1PRM0","AV",5)
vexgrusha,gc,usuebaunhn,gcotv
^SCR("B1PRM0","AV",6)
:(tk-0'if-1)hraptv,usuebvoufxtukn,tohak
^SCR("B1PRM0","AV",7)

^SCR("B1PRM0","AV",8)
-iusgunjuekhuvhz,gc
^SCR("B1PRM0","AV",9)
:(tk-0'if-1)vpuec,uhnhbpv,ucyvvkf,tkyckotv
^SCR("B1PRM0","AV",10)

^SCR("B1PRM0","AV",11)
:"ehwdukxbzhcxhyrf"yhrpsue
^SCR("B1PRM0","AV",12)

^SCR("B1PRM0","AV",13)
:"iusgunk,uprymv"yhrpsue
^SCR("B1PRM0","AV",14)
:",uprymvcaushj"yhrpsue
^SCR("B1PRM0","AV",15)
:",skuvouhaunhn"yhrpsue
^SCR("B1PRM0","AV",16)
:"ihtuahbaunhn"yhrpsue
^SCR("B1PRM0","AV",17)
:",uprymvaunhn"yhrpsue
^SCR("B1PRM0","AV",18)

^SCR("B1PRM0","AV",19)
:",ucyvaunhn"yhrpsue
^SCR("B1PRM0","AV",20)
:",usuebaunhn"yhrpsue
^SCR("B1PRM0","AV",21)

^SCR("B1PRM0","AV",22)

^SCR("B1PRM0","AV",23)

^SCR("B1PRM0","NAME")
wi'bel qpfial lixhnxt
^SCR("B1PRM0","P",3,"CRD")
3,20,N,1,0
^SCR("B1PRM0","P",3,"HELP")

^SCR("B1PRM0","P",3,"LMAX")
4
^SCR("B1PRM0","P",3,"MUMPS1")

^SCR("B1PRM0","P",3,"MUMPS2")
D ^%L1BDO
^SCR("B1PRM0","P",3,"MUST")

^SCR("B1PRM0","P",3,"TYP")
N
^SCR("B1PRM0","P",5,"CRD")
6,13,N,1,0
^SCR("B1PRM0","P",5,"HELP")

^SCR("B1PRM0","P",5,"LMAX")
4
^SCR("B1PRM0","P",5,"MUMPS1")
S:$G(NKD)="" NKD=1
^SCR("B1PRM0","P",5,"MUMPS2")
D ^%L1BDO
^SCR("B1PRM0","P",5,"MUST")

^SCR("B1PRM0","P",5,"TYP")
N
^SCR("B1PRM0","P",10,"CRD")
9,13,N,1,0
^SCR("B1PRM0","P",10,"HELP")

^SCR("B1PRM0","P",10,"LMAX")
4
^SCR("B1PRM0","P",10,"MUMPS1")
S:'$G(NOKFL) NOKFL=0
^SCR("B1PRM0","P",10,"MUMPS2")

^SCR("B1PRM0","P",10,"TYP")
N
^SCR("B1PRM0","P",12,"CRD")
11,35,E,8,0
^SCR("B1PRM0","P",12,"HELP")

^SCR("B1PRM0","P",12,"LMAX")
9
^SCR("B1PRM0","P",12,"MUMPS1")

^SCR("B1PRM0","P",12,"MUMPS2")

^SCR("B1PRM0","P",12,"TYP")
E
^SCR("B1PRM0","P",13,"CRD")
11,34,H,21,0
^SCR("B1PRM0","P",13,"HELP")

^SCR("B1PRM0","P",13,"LMAX")
21
^SCR("B1PRM0","P",13,"MUMPS1")

^SCR("B1PRM0","P",13,"MUMPS2")

^SCR("B1PRM0","P",13,"OUTPUT")

^SCR("B1PRM0","P",13,"TYP")
H
^SCR("B1PRM0","P",15,"CHECK")
Y
^SCR("B1PRM0","P",15,"CRD")
13,39,E,8,0
^SCR("B1PRM0","P",15,"CREAT")

^SCR("B1PRM0","P",15,"FNC")

^SCR("B1PRM0","P",15,"GLOB")
^PAR
^SCR("B1PRM0","P",15,"HELP")

^SCR("B1PRM0","P",15,"LMAX")
8
^SCR("B1PRM0","P",15,"MUMPS1")

^SCR("B1PRM0","P",15,"MUMPS2")

^SCR("B1PRM0","P",15,"NLN")
20
^SCR("B1PRM0","P",15,"NS")
mihixt zlah
^SCR("B1PRM0","P",15,"RZD")
**
^SCR("B1PRM0","P",15,"TOPB")
8
^SCR("B1PRM0","P",15,"TYP")
E
^SCR("B1PRM0","P",15,"VRB")
PARMDN1
^SCR("B1PRM0","P",16,"CRD")
13,38,H,25
^SCR("B1PRM0","P",16,"HELP")

^SCR("B1PRM0","P",16,"LMAX")
25
^SCR("B1PRM0","P",16,"MUMPS1")

^SCR("B1PRM0","P",16,"MUMPS2")

^SCR("B1PRM0","P",16,"OUTPUT")

^SCR("B1PRM0","P",16,"TYP")
H
^SCR("B1PRM0","P",20,"CHECK")
Y
^SCR("B1PRM0","P",20,"CRD")
14,39,E,8,0
^SCR("B1PRM0","P",20,"CREAT")

^SCR("B1PRM0","P",20,"FNC")

^SCR("B1PRM0","P",20,"GLOB")
^PAR
^SCR("B1PRM0","P",20,"HELP")

^SCR("B1PRM0","P",20,"LMAX")
8
^SCR("B1PRM0","P",20,"MUMPS1")

^SCR("B1PRM0","P",20,"MUMPS2")

^SCR("B1PRM0","P",20,"NLN")
20
^SCR("B1PRM0","P",20,"NS")
mihixt
^SCR("B1PRM0","P",20,"RZD")
**
^SCR("B1PRM0","P",20,"TOPB")
8
^SCR("B1PRM0","P",20,"TYP")
E
^SCR("B1PRM0","P",20,"VRB")
PARUPD1
^SCR("B1PRM0","P",21,"CRD")
14,38,H,25
^SCR("B1PRM0","P",21,"HELP")

^SCR("B1PRM0","P",21,"LMAX")
25
^SCR("B1PRM0","P",21,"MUMPS1")

^SCR("B1PRM0","P",21,"MUMPS2")

^SCR("B1PRM0","P",21,"OUTPUT")

^SCR("B1PRM0","P",21,"TYP")
H
^SCR("B1PRM0","P",25,"CHECK")
Y
^SCR("B1PRM0","P",25,"CRD")
15,39,E,8,0
^SCR("B1PRM0","P",25,"CREAT")

^SCR("B1PRM0","P",25,"FNC")

^SCR("B1PRM0","P",25,"GLOB")
^PAR
^SCR("B1PRM0","P",25,"HELP")

^SCR("B1PRM0","P",25,"LMAX")
8
^SCR("B1PRM0","P",25,"MUMPS1")

^SCR("B1PRM0","P",25,"MUMPS2")

^SCR("B1PRM0","P",25,"NLN")
20
^SCR("B1PRM0","P",25,"NS")
hixt
^SCR("B1PRM0","P",25,"RZD")
**
^SCR("B1PRM0","P",25,"TOPB")
8
^SCR("B1PRM0","P",25,"TYP")
E
^SCR("B1PRM0","P",25,"VRB")
PARYMH1
^SCR("B1PRM0","P",26,"CRD")
15,38,H,25
^SCR("B1PRM0","P",26,"HELP")

^SCR("B1PRM0","P",26,"LMAX")
25
^SCR("B1PRM0","P",26,"MUMPS1")

^SCR("B1PRM0","P",26,"MUMPS2")

^SCR("B1PRM0","P",26,"OUTPUT")

^SCR("B1PRM0","P",26,"TYP")
H
^SCR("B1PRM0","P",30,"CHECK")
Y
^SCR("B1PRM0","P",30,"CRD")
16,39,E,8,0
^SCR("B1PRM0","P",30,"CREAT")

^SCR("B1PRM0","P",30,"FNC")

^SCR("B1PRM0","P",30,"GLOB")
^PAR
^SCR("B1PRM0","P",30,"HELP")

^SCR("B1PRM0","P",30,"LMAX")
8
^SCR("B1PRM0","P",30,"MUMPS1")

^SCR("B1PRM0","P",30,"MUMPS2")

^SCR("B1PRM0","P",30,"NLN")
20
^SCR("B1PRM0","P",30,"NS")
hixt
^SCR("B1PRM0","P",30,"RZD")
**
^SCR("B1PRM0","P",30,"TOPB")
8
^SCR("B1PRM0","P",30,"TYP")
E
^SCR("B1PRM0","P",30,"VRB")
PARNSN1
^SCR("B1PRM0","P",31,"CRD")
16,38,H,25
^SCR("B1PRM0","P",31,"HELP")

^SCR("B1PRM0","P",31,"LMAX")
25
^SCR("B1PRM0","P",31,"MUMPS1")

^SCR("B1PRM0","P",31,"MUMPS2")

^SCR("B1PRM0","P",31,"OUTPUT")

^SCR("B1PRM0","P",31,"TYP")
H
^SCR("B1PRM0","P",35,"CHECK")
Y
^SCR("B1PRM0","P",35,"CRD")
17,39,E,8,0
^SCR("B1PRM0","P",35,"CREAT")

^SCR("B1PRM0","P",35,"FNC")

^SCR("B1PRM0","P",35,"GLOB")
^PAR
^SCR("B1PRM0","P",35,"HELP")

^SCR("B1PRM0","P",35,"LMAX")
8
^SCR("B1PRM0","P",35,"MUMPS1")

^SCR("B1PRM0","P",35,"MUMPS2")

^SCR("B1PRM0","P",35,"NLN")
20
^SCR("B1PRM0","P",35,"NS")
hixt
^SCR("B1PRM0","P",35,"RZD")
**
^SCR("B1PRM0","P",35,"TOPB")
8
^SCR("B1PRM0","P",35,"TYP")
E
^SCR("B1PRM0","P",35,"VRB")
PARMHZT1
^SCR("B1PRM0","P",36,"CRD")
17,38,H,25
^SCR("B1PRM0","P",36,"HELP")

^SCR("B1PRM0","P",36,"LMAX")
25
^SCR("B1PRM0","P",36,"MUMPS1")

^SCR("B1PRM0","P",36,"MUMPS2")

^SCR("B1PRM0","P",36,"OUTPUT")

^SCR("B1PRM0","P",36,"TYP")
H
^SCR("B1PRM0","P",40,"CHECK")
Y
^SCR("B1PRM0","P",40,"CRD")
19,39,E,8,0
^SCR("B1PRM0","P",40,"FNC")

^SCR("B1PRM0","P",40,"GLOB")
^PAR
^SCR("B1PRM0","P",40,"HELP")

^SCR("B1PRM0","P",40,"LMAX")
8
^SCR("B1PRM0","P",40,"MUMPS1")

^SCR("B1PRM0","P",40,"MUMPS2")

^SCR("B1PRM0","P",40,"NLN")
20
^SCR("B1PRM0","P",40,"RZD")
**
^SCR("B1PRM0","P",40,"TOPB")
8
^SCR("B1PRM0","P",40,"TYP")
E
^SCR("B1PRM0","P",40,"VRB")
PARBON1
^SCR("B1PRM0","P",41,"CRD")
19,38,H,25
^SCR("B1PRM0","P",41,"HELP")

^SCR("B1PRM0","P",41,"LMAX")
25
^SCR("B1PRM0","P",41,"MUMPS1")

^SCR("B1PRM0","P",41,"MUMPS2")

^SCR("B1PRM0","P",41,"OUTPUT")

^SCR("B1PRM0","P",41,"TYP")
H
^SCR("B1PRM0","P",45,"CHECK")
Y
^SCR("B1PRM0","P",45,"CRD")
20,39,N,8,0
^SCR("B1PRM0","P",45,"FNC")

^SCR("B1PRM0","P",45,"GLOB")
^PAR
^SCR("B1PRM0","P",45,"HELP")

^SCR("B1PRM0","P",45,"LMAX")
8
^SCR("B1PRM0","P",45,"MUMPS1")

^SCR("B1PRM0","P",45,"MUMPS2")

^SCR("B1PRM0","P",45,"NLN")
20
^SCR("B1PRM0","P",45,"RZD")
**
^SCR("B1PRM0","P",45,"TOPB")
8
^SCR("B1PRM0","P",45,"TYP")
N
^SCR("B1PRM0","P",45,"VRB")
PARNKD1
^SCR("B1PRM0","P",46,"CRD")
20,38,H,25
^SCR("B1PRM0","P",46,"HELP")

^SCR("B1PRM0","P",46,"LMAX")
25
^SCR("B1PRM0","P",46,"MUMPS1")

^SCR("B1PRM0","P",46,"MUMPS2")

^SCR("B1PRM0","P",46,"OUTPUT")

^SCR("B1PRM0","P",46,"TYP")
H
^SCR("B1PRM0","P","NAME","BSL")
3
^SCR("B1PRM0","P","NAME","NKD")
5
^SCR("B1PRM0","P","NAME","NOKFL")
10
^SCR("B1PRM0","P","NAME","PAR")
12
^SCR("B1PRM0","P","NAME","PAR1")
13
^SCR("B1PRM0","P","NAME","PARBON")
40
^SCR("B1PRM0","P","NAME","PARBON1")
41
^SCR("B1PRM0","P","NAME","PARMDN")
15
^SCR("B1PRM0","P","NAME","PARMDN1")
16
^SCR("B1PRM0","P","NAME","PARMHZT")
35
^SCR("B1PRM0","P","NAME","PARMHZT1")
36
^SCR("B1PRM0","P","NAME","PARNKD")
45
^SCR("B1PRM0","P","NAME","PARNKD1")
46
^SCR("B1PRM0","P","NAME","PARNSN")
30
^SCR("B1PRM0","P","NAME","PARNSN1")
31
^SCR("B1PRM0","P","NAME","PARUPD")
20
^SCR("B1PRM0","P","NAME","PARUPD1")
21
^SCR("B1PRM0","P","NAME","PARYMH")
25
^SCR("B1PRM0","P","NAME","PARYMH1")
26
^SCR("B1PRM0","P","NM",3)
BSL
^SCR("B1PRM0","P","NM",5)
NKD
^SCR("B1PRM0","P","NM",10)
NOKFL
^SCR("B1PRM0","P","NM",12)
PAR
^SCR("B1PRM0","P","NM",13)
PAR1
^SCR("B1PRM0","P","NM",15)
PARMDN
^SCR("B1PRM0","P","NM",16)
PARMDN1
^SCR("B1PRM0","P","NM",20)
PARUPD
^SCR("B1PRM0","P","NM",21)
PARUPD1
^SCR("B1PRM0","P","NM",25)
PARYMH
^SCR("B1PRM0","P","NM",26)
PARYMH1
^SCR("B1PRM0","P","NM",30)
PARNSN
^SCR("B1PRM0","P","NM",31)
PARNSN1
^SCR("B1PRM0","P","NM",35)
PARMHZT
^SCR("B1PRM0","P","NM",36)
PARMHZT1
^SCR("B1PRM0","P","NM",40)
PARBON
^SCR("B1PRM0","P","NM",41)
PARBON1
^SCR("B1PRM0","P","NM",45)
PARNKD
^SCR("B1PRM0","P","NM",46)
PARNKD1
^SCR("B1PRM0","P","RB",1)
3,8,22,78
^SCR("B1QIDNT")
H
^SCR("B1QIDNT",1)
                                                                               
^SCR("B1QIDNT",2)
                                                                               
^SCR("B1QIDNT",3)
                                                                               
^SCR("B1QIDNT",4)
                                                                               
^SCR("B1QIDNT",5)
                                                                               
^SCR("B1QIDNT",6)
                                                                               
^SCR("B1QIDNT",7)
                                                                   1]          
^SCR("B1QIDNT",8)
                                       {05         } : zedf 'z 'qn             
^SCR("B1QIDNT",9)
                                                                               
^SCR("B1QIDNT",10)
                                       {10         } :   oetlh 'qn             
^SCR("B1QIDNT",11)
                                                                               
^SCR("B1QIDNT",12)
                                {15                } :   qihxk 'qn             
^SCR("B1QIDNT",13)
                             [1                                                
^SCR("B1QIDNT",14)
                                                                               
^SCR("B1QIDNT","A",1)

^SCR("B1QIDNT","A",2)

^SCR("B1QIDNT","A",3)

^SCR("B1QIDNT","A",4)

^SCR("B1QIDNT","A",5)

^SCR("B1QIDNT","A",6)

^SCR("B1QIDNT","A",7)

^SCR("B1QIDNT","A",8)
:š…„†'š'‘Ž
^SCR("B1QIDNT","A",9)

^SCR("B1QIDNT","A",10)
:�…”Œˆ'‘Ž
^SCR("B1QIDNT","A",11)

^SCR("B1QIDNT","A",12)
:‘‰ˆ˜‹'‘Ž
^SCR("B1QIDNT","A",13)

^SCR("B1QIDNT","A",14)

^SCR("B1QIDNT","AV",1)

^SCR("B1QIDNT","AV",2)

^SCR("B1QIDNT","AV",3)

^SCR("B1QIDNT","AV",4)

^SCR("B1QIDNT","AV",5)

^SCR("B1QIDNT","AV",6)

^SCR("B1QIDNT","AV",7)

^SCR("B1QIDNT","AV",8)
:,uvzw,wxn
^SCR("B1QIDNT","AV",9)

^SCR("B1QIDNT","AV",10)
:iupkywxn
^SCR("B1QIDNT","AV",11)

^SCR("B1QIDNT","AV",12)
:xhyrfwxn
^SCR("B1QIDNT","AV",13)

^SCR("B1QIDNT","AV",14)

^SCR("B1QIDNT","NAME")
xidn yetig
^SCR("B1QIDNT","P",5,"CRD")
8,39,E,9,0
^SCR("B1QIDNT","P",5,"HELP")

^SCR("B1QIDNT","P",5,"LMAX")
12
^SCR("B1QIDNT","P",5,"MUMPS1")

^SCR("B1QIDNT","P",5,"MUMPS2")

^SCR("B1QIDNT","P",5,"TYP")
E
^SCR("B1QIDNT","P",10,"CRD")
10,39,E,11,0
^SCR("B1QIDNT","P",10,"HELP")

^SCR("B1QIDNT","P",10,"LMAX")
12
^SCR("B1QIDNT","P",10,"MUMPS1")

^SCR("B1QIDNT","P",10,"MUMPS2")

^SCR("B1QIDNT","P",10,"TYP")
E
^SCR("B1QIDNT","P",15,"CRD")
12,32,E,19,0
^SCR("B1QIDNT","P",15,"HELP")

^SCR("B1QIDNT","P",15,"LMAX")
19
^SCR("B1QIDNT","P",15,"MUMPS1")

^SCR("B1QIDNT","P",15,"MUMPS2")

^SCR("B1QIDNT","P",15,"TYP")
E
^SCR("B1QIDNT","P","NAME","B1CARD")
15
^SCR("B1QIDNT","P","NAME","B1TEL")
10
^SCR("B1QIDNT","P","NAME","B1TZ")
5
^SCR("B1QIDNT","P","NM",5)
B1TZ
^SCR("B1QIDNT","P","NM",10)
B1TEL
^SCR("B1QIDNT","P","NM",15)
B1CARD
^SCR("B1QIDNT","P","RB",1)
8,30,14,69
^SCR("B1QIDRES")
H
^SCR("B1QIDRES",1)
                                                                               
^SCR("B1QIDRES",2)
                                                                               
^SCR("B1QIDRES",3)
                                                                               
^SCR("B1QIDRES",4)
                                                                               
^SCR("B1QIDRES",5)
                                                                               
^SCR("B1QIDRES",6)
                                                                               
^SCR("B1QIDRES",7)
                                                             1]                
^SCR("B1QIDRES",8)
                    # xidn yetig ze`vez #                                      
^SCR("B1QIDRES",9)
                                                                               
^SCR("B1QIDRES",10)
                          {                             01}                    
^SCR("B1QIDRES",11)
                                                                               
^SCR("B1QIDRES",12)
                {                           05} :   gewl my                    
^SCR("B1QIDRES",13)
                                                                               
^SCR("B1QIDRES",14)
                              {10             } : qihxk 'qn                    
^SCR("B1QIDRES",15)
                                                                               
^SCR("B1QIDRES",16)
                                      {15     } :      dxzi                    
^SCR("B1QIDRES",17)
                                                                               
^SCR("B1QIDRES",18)
          [1                                                                   
^SCR("B1QIDRES","A",1)

^SCR("B1QIDRES","A",2)

^SCR("B1QIDRES","A",3)

^SCR("B1QIDRES","A",4)

^SCR("B1QIDRES","A",5)

^SCR("B1QIDRES","A",6)

^SCR("B1QIDRES","A",7)

^SCR("B1QIDRES","A",8)
˜‰„Ž™…”‰‡š…€–…š
^SCR("B1QIDRES","A",9)

^SCR("B1QIDRES","A",10)

^SCR("B1QIDRES","A",11)

^SCR("B1QIDRES","A",12)
:‡…—Œ�™
^SCR("B1QIDRES","A",13)

^SCR("B1QIDRES","A",14)
:‘‰ˆ˜‹'‘Ž
^SCR("B1QIDRES","A",15)

^SCR("B1QIDRES","A",16)
:„˜š‰
^SCR("B1QIDRES","A",17)

^SCR("B1QIDRES","A",18)

^SCR("B1QIDRES","AV",1)

^SCR("B1QIDRES","AV",2)

^SCR("B1QIDRES","AV",3)

^SCR("B1QIDRES","AV",4)

^SCR("B1QIDRES","AV",5)

^SCR("B1QIDRES","AV",6)

^SCR("B1QIDRES","AV",7)

^SCR("B1QIDRES","AV",8)
rhvnauphj,utmu,
^SCR("B1QIDRES","AV",9)

^SCR("B1QIDRES","AV",10)

^SCR("B1QIDRES","AV",11)

^SCR("B1QIDRES","AV",12)
:juekoa
^SCR("B1QIDRES","AV",13)

^SCR("B1QIDRES","AV",14)
:xhyrfwxn
^SCR("B1QIDRES","AV",15)

^SCR("B1QIDRES","AV",16)
:vr,h
^SCR("B1QIDRES","AV",17)

^SCR("B1QIDRES","AV",18)

^SCR("B1QIDRES","NAME")
xidn yetig ze`vez
^SCR("B1QIDRES","P",1,"CRD")
10,59,H,32
^SCR("B1QIDRES","P",1,"HELP")

^SCR("B1QIDRES","P",1,"LMAX")
32
^SCR("B1QIDRES","P",1,"MUMPS1")

^SCR("B1QIDRES","P",1,"MUMPS2")

^SCR("B1QIDRES","P",1,"OUTPUT")

^SCR("B1QIDRES","P",1,"TYP")
H
^SCR("B1QIDRES","P",5,"CRD")
12,47,H,30
^SCR("B1QIDRES","P",5,"HELP")

^SCR("B1QIDRES","P",5,"LMAX")
30
^SCR("B1QIDRES","P",5,"MUMPS1")

^SCR("B1QIDRES","P",5,"MUMPS2")

^SCR("B1QIDRES","P",5,"OUTPUT")

^SCR("B1QIDRES","P",5,"TYP")
H
^SCR("B1QIDRES","P",10,"CRD")
14,30,E,16,0
^SCR("B1QIDRES","P",10,"HELP")

^SCR("B1QIDRES","P",10,"LMAX")
16
^SCR("B1QIDRES","P",10,"MUMPS1")

^SCR("B1QIDRES","P",10,"MUMPS2")

^SCR("B1QIDRES","P",10,"OUTPUT")

^SCR("B1QIDRES","P",10,"TYP")
E
^SCR("B1QIDRES","P",15,"CRD")
16,38,N,8,2
^SCR("B1QIDRES","P",15,"HELP")

^SCR("B1QIDRES","P",15,"LMAX")
8
^SCR("B1QIDRES","P",15,"MUMPS1")

^SCR("B1QIDRES","P",15,"MUMPS2")

^SCR("B1QIDRES","P",15,"OUTPUT")

^SCR("B1QIDRES","P",15,"TYP")
N
^SCR("B1QIDRES","P","NAME","BSCARD")
10
^SCR("B1QIDRES","P","NAME","BSITRA")
15
^SCR("B1QIDRES","P","NAME","BSNAME")
5
^SCR("B1QIDRES","P","NAME","MOADON")
1
^SCR("B1QIDRES","P","NM",1)
MOADON
^SCR("B1QIDRES","P","NM",5)
BSNAME
^SCR("B1QIDRES","P","NM",10)
BSCARD
^SCR("B1QIDRES","P","NM",15)
BSITRA
^SCR("B1QIDRES","P","RB",1)
8,11,19,63
^SCR("B1SRCH")
H
^SCR("B1SRCH",1)
                                                                               
^SCR("B1SRCH",2)
                                                                               
^SCR("B1SRCH",3)
                                                                               
^SCR("B1SRCH",4)
                                                                               
^SCR("B1SRCH",5)
                                                                               
^SCR("B1SRCH",6)
                                                                               
^SCR("B1SRCH",7)
                                                                  1]           
^SCR("B1SRCH",8)
                        {                         01}                          
^SCR("B1SRCH",9)
                                                                               
^SCR("B1SRCH",10)
                        {                         05} :  ihxt my               
^SCR("B1SRCH",11)
                                                                               
^SCR("B1SRCH",12)
                        {                         07} : dgtyn my               
^SCR("B1SRCH",13)
                                                                               
^SCR("B1SRCH",14)
                                         {10        } : gewl 'lh               
^SCR("B1SRCH",15)
                                                                               
^SCR("B1SRCH",16)
                                          {15       } :  zedf 'z               
^SCR("B1SRCH",17)
                                                                               
^SCR("B1SRCH",18)
                 {20                                } :    l"`ec               
^SCR("B1SRCH",19)
                                                                               
^SCR("B1SRCH",20)
             [1                                                                
^SCR("B1SRCH",21)
                                                                               
^SCR("B1SRCH","A",1)

^SCR("B1SRCH","A",2)

^SCR("B1SRCH","A",3)

^SCR("B1SRCH","A",4)

^SCR("B1SRCH","A",5)

^SCR("B1SRCH","A",6)

^SCR("B1SRCH","A",7)

^SCR("B1SRCH","A",8)

^SCR("B1SRCH","A",9)

^SCR("B1SRCH","A",10)
:‰ˆ˜”�™
^SCR("B1SRCH","A",11)

^SCR("B1SRCH","A",12)
:„‡”™Ž�™
^SCR("B1SRCH","A",13)

^SCR("B1SRCH","A",14)
:‡…—Œ'Œˆ
^SCR("B1SRCH","A",15)

^SCR("B1SRCH","A",16)
:š…„†'š
^SCR("B1SRCH","A",17)

^SCR("B1SRCH","A",18)
:Œ"€…ƒ
^SCR("B1SRCH","A",19)

^SCR("B1SRCH","A",20)

^SCR("B1SRCH","A",21)

^SCR("B1SRCH","AV",1)

^SCR("B1SRCH","AV",2)

^SCR("B1SRCH","AV",3)

^SCR("B1SRCH","AV",4)

^SCR("B1SRCH","AV",5)

^SCR("B1SRCH","AV",6)

^SCR("B1SRCH","AV",7)

^SCR("B1SRCH","AV",8)

^SCR("B1SRCH","AV",9)

^SCR("B1SRCH","AV",10)
:hyrpoa
^SCR("B1SRCH","AV",11)

^SCR("B1SRCH","AV",12)
:vjpanoa
^SCR("B1SRCH","AV",13)

^SCR("B1SRCH","AV",14)
:juekwky
^SCR("B1SRCH","AV",15)

^SCR("B1SRCH","AV",16)
:,uvzw,
^SCR("B1SRCH","AV",17)

^SCR("B1SRCH","AV",18)
:k"tus
^SCR("B1SRCH","AV",19)

^SCR("B1SRCH","AV",20)

^SCR("B1SRCH","AV",21)

^SCR("B1SRCH","NAME")
mcwzn gewl yetig
^SCR("B1SRCH","P",1,"CRD")
8,53,H,28
^SCR("B1SRCH","P",1,"HELP")

^SCR("B1SRCH","P",1,"LMAX")
28
^SCR("B1SRCH","P",1,"MUMPS1")

^SCR("B1SRCH","P",1,"MUMPS2")

^SCR("B1SRCH","P",1,"OUTPUT")

^SCR("B1SRCH","P",1,"TYP")
H
^SCR("B1SRCH","P",5,"CRD")
10,53,H,26
^SCR("B1SRCH","P",5,"HELP")

^SCR("B1SRCH","P",5,"LMAX")
28
^SCR("B1SRCH","P",5,"MUMPS1")

^SCR("B1SRCH","P",5,"MUMPS2")

^SCR("B1SRCH","P",5,"TYP")
H
^SCR("B1SRCH","P",7,"CRD")
12,53,H,28
^SCR("B1SRCH","P",7,"HELP")

^SCR("B1SRCH","P",7,"LMAX")
28
^SCR("B1SRCH","P",7,"MUMPS1")

^SCR("B1SRCH","P",7,"MUMPS2")

^SCR("B1SRCH","P",7,"TYP")
H
^SCR("B1SRCH","P",10,"CRD")
14,41,E,11,0
^SCR("B1SRCH","P",10,"HELP")

^SCR("B1SRCH","P",10,"LMAX")
11
^SCR("B1SRCH","P",10,"MUMPS1")

^SCR("B1SRCH","P",10,"MUMPS2")

^SCR("B1SRCH","P",10,"TYP")
E
^SCR("B1SRCH","P",15,"CRD")
16,42,E,9,0
^SCR("B1SRCH","P",15,"HELP")

^SCR("B1SRCH","P",15,"LMAX")
10
^SCR("B1SRCH","P",15,"MUMPS1")

^SCR("B1SRCH","P",15,"MUMPS2")

^SCR("B1SRCH","P",15,"TYP")
E
^SCR("B1SRCH","P",20,"CRD")
18,17,E,35,0
^SCR("B1SRCH","P",20,"HELP")

^SCR("B1SRCH","P",20,"LMAX")
35
^SCR("B1SRCH","P",20,"MUMPS1")

^SCR("B1SRCH","P",20,"MUMPS2")

^SCR("B1SRCH","P",20,"TYP")
E
^SCR("B1SRCH","P","NAME","B1EMAIL")
20
^SCR("B1SRCH","P","NAME","B1FNAME")
5
^SCR("B1SRCH","P","NAME","B1LNAME")
7
^SCR("B1SRCH","P","NAME","B1TEL")
10
^SCR("B1SRCH","P","NAME","B1TZ")
15
^SCR("B1SRCH","P","NAME","CLUB")
1
^SCR("B1SRCH","P","NM",1)
CLUB
^SCR("B1SRCH","P","NM",5)
B1FNAME
^SCR("B1SRCH","P","NM",7)
B1LNAME
^SCR("B1SRCH","P","NM",10)
B1TEL
^SCR("B1SRCH","P","NM",15)
B1TZ
^SCR("B1SRCH","P","NM",20)
B1EMAIL
^SCR("B1SRCH","P","RB",1)
8,14,21,68
^SCR("B1STAT")
H
^SCR("B1STAT",1)
                                                                               
^SCR("B1STAT",2)
                                                                   1]          
^SCR("B1STAT",3)
                    # gewl ly qehhq #                                          
^SCR("B1STAT",4)
              {                          05}: oecren                           
^SCR("B1STAT",5)
    [1                                                                         
^SCR("B1STAT",6)
                                                                   1$          
^SCR("B1STAT",7)
     :                            dlawzdy rcin                   :             
^SCR("B1STAT",8)
                                                                               
^SCR("B1STAT",9)
                                                                               
^SCR("B1STAT",10)
                                                                               
^SCR("B1STAT",11)
                                                                               
^SCR("B1STAT",12)
                                                                               
^SCR("B1STAT",13)
                                                                               
^SCR("B1STAT",14)
                                                                               
^SCR("B1STAT",15)
                                                                               
^SCR("B1STAT",16)
                                                                               
^SCR("B1STAT",17)
                                                                               
^SCR("B1STAT",18)
                                                                               
^SCR("B1STAT",19)
                                                                               
^SCR("B1STAT",20)
    $1                                                                         
^SCR("B1STAT",21)
                                                                               
^SCR("B1STAT",22)
                                                                               
^SCR("B1STAT","A",1)

^SCR("B1STAT","A",2)

^SCR("B1STAT","A",3)
‡…—ŒŒ™‘…ˆˆ‘
^SCR("B1STAT","A",4)
:�…ƒ’…Ž
^SCR("B1STAT","A",5)

^SCR("B1STAT","A",6)

^SCR("B1STAT","A",7)
„Œ�—š„™’ƒ‰Ž
^SCR("B1STAT","A",8)
-----------------------------------------------------------
^SCR("B1STAT","A",9)

^SCR("B1STAT","A",10)

^SCR("B1STAT","A",11)

^SCR("B1STAT","A",12)

^SCR("B1STAT","A",13)

^SCR("B1STAT","A",14)

^SCR("B1STAT","A",15)

^SCR("B1STAT","A",16)

^SCR("B1STAT","A",17)

^SCR("B1STAT","A",18)

^SCR("B1STAT","A",19)

^SCR("B1STAT","A",20)

^SCR("B1STAT","A",21)

^SCR("B1STAT","A",22)

^SCR("B1STAT","AV",1)

^SCR("B1STAT","AV",2)

^SCR("B1STAT","AV",3)
juekkaxuyyx
^SCR("B1STAT","AV",4)
:iusgun
^SCR("B1STAT","AV",5)

^SCR("B1STAT","AV",6)

^SCR("B1STAT","AV",7)
vkce,vagshn
^SCR("B1STAT","AV",8)
-----------------------------------------------------------
^SCR("B1STAT","AV",9)

^SCR("B1STAT","AV",10)

^SCR("B1STAT","AV",11)

^SCR("B1STAT","AV",12)

^SCR("B1STAT","AV",13)

^SCR("B1STAT","AV",14)

^SCR("B1STAT","AV",15)

^SCR("B1STAT","AV",16)

^SCR("B1STAT","AV",17)

^SCR("B1STAT","AV",18)

^SCR("B1STAT","AV",19)

^SCR("B1STAT","AV",20)

^SCR("B1STAT","AV",21)

^SCR("B1STAT","AV",22)

^SCR("B1STAT","G",1,"CRD")
8,65,H,55,0
^SCR("B1STAT","G",1,"HELP")

^SCR("B1STAT","G",1,"LMAX")
59
^SCR("B1STAT","G",1,"MUMPS1")

^SCR("B1STAT","G",1,"MUMPS2")

^SCR("B1STAT","G",1,"OUTPUT")

^SCR("B1STAT","G",1,"SHEM")
                            dlawzdy rcin                   
^SCR("B1STAT","G",1,"TYP")
H
^SCR("B1STAT","G","DEL")

^SCR("B1STAT","G","MAX")
99
^SCR("B1STAT","G","NAME","ATAVA")
1
^SCR("B1STAT","G","NM",1)
ATAVA
^SCR("B1STAT","G","RB")
7,5,21,69
^SCR("B1STAT","G","REF")
^TMP($P
^SCR("B1STAT","G","RZD")
\
^SCR("B1STAT","G","STEP")
1
^SCR("B1STAT","G","STG")
     :                            dlawzdy rcin                   :             
^SCR("B1STAT","G","VG")
9
^SCR("B1STAT","NAME")

^SCR("B1STAT","P",5,"CRD")
4,44,H,29
^SCR("B1STAT","P",5,"HELP")

^SCR("B1STAT","P",5,"LMAX")
29
^SCR("B1STAT","P",5,"MUMPS1")

^SCR("B1STAT","P",5,"MUMPS2")

^SCR("B1STAT","P",5,"OUTPUT")

^SCR("B1STAT","P",5,"TYP")
H
^SCR("B1STAT","P","NAME","CLUB1")
5
^SCR("B1STAT","P","NM",5)
CLUB1
^SCR("B1STAT","P","RB",1)
3,5,6,69
^SCR("BDIKA")
H
^SCR("BDIKA",1)
                                                 {05     } :  12.4 ... uaew 'qn
^SCR("BDIKA","A",1)
:12.4...•�…—'‘Ž
^SCR("BDIKA","AV",1)
:12/4///•cuewxn
^SCR("BDIKA","NAME")

^SCR("BDIKA","P",5,"CRD")
1,49,E,8,0
^SCR("BDIKA","P",5,"HELP")

^SCR("BDIKA","P",5,"LMAX")
8
^SCR("BDIKA","P",5,"MUMPS1")

^SCR("BDIKA","P",5,"MUMPS2")

^SCR("BDIKA","P",5,"TYP")
E
^SCR("BDIKA","P","NAME","AAA")
5
^SCR("BDIKA","P","NM",5)
AAA
^SCR("CHBA")
H
^SCR("CHBA",1)
                     #  dcwtdl zetewdn onefne miwiy zpkd  #                    
^SCR("CHBA",2)
                                 {07     } cr {05     } -n mikix`z xear dcwtd  
^SCR("CHBA",3)
   30} : miiegc miwiy   20} : ( mini 5 cr) miiegc miwiy   10} : mipnefn miwiy  
^SCR("CHBA",4)
                                                                             1$
^SCR("CHBA",5)
    : oniq:   mekq  :  w'yd 'qn  :wpa:sipq: oeaygd 'qn :   jix`z  :  jix`z   : 
^SCR("CHBA",6)
    :lehia:         :            :   :    :            :   dlaw   :  oerxtl  : 
^SCR("CHBA",7)
                                                                               
^SCR("CHBA",8)
                                                                               
^SCR("CHBA",9)
                                                                               
^SCR("CHBA",10)
                                                                               
^SCR("CHBA",11)
                                                                               
^SCR("CHBA",12)
                                                                               
^SCR("CHBA",13)
                                                                               
^SCR("CHBA",14)
                                                                               
^SCR("CHBA",15)
                                                                               
^SCR("CHBA",16)
                                                                               
^SCR("CHBA",17)
                                                                               
^SCR("CHBA",18)
                                                                               
^SCR("CHBA",19)
   $1                                                                          
^SCR("CHBA",20)
          {40       : k"dq                                 {35      : onefn    
^SCR("CHBA",21)
                                                                               
^SCR("CHBA",22)
                                                                               
^SCR("CHBA","A",1)
„ƒ—”„Œš…”…—„Ž�Ž…†Ž…�‰—‰™š�‹„
^SCR("CHBA","A",2)
ƒ’-Ž�‰‹‰˜€š˜…�’„ƒ—”„
^SCR("CHBA","A",3)
:�‰‰…‡ƒ�‰—‰™:(�‰Ž‰5ƒ’)�‰‰…‡ƒ�‰—‰™:�‰�Ž…†Ž�‰—‰™
^SCR("CHBA","A",4)

^SCR("CHBA","A",5)
�Ž‰‘�…‹‘—'™„'‘Ž—��“‰�‘�…�™‡„'‘ŽŠ‰˜€šŠ‰˜€š
^SCR("CHBA","A",6)
Œ…ˆ‰�„Œ�—�…’˜”Œ
^SCR("CHBA","A",7)
------------------------------------------------------------------
^SCR("CHBA","A",8)

^SCR("CHBA","A",9)

^SCR("CHBA","A",10)

^SCR("CHBA","A",11)

^SCR("CHBA","A",12)

^SCR("CHBA","A",13)

^SCR("CHBA","A",14)

^SCR("CHBA","A",15)

^SCR("CHBA","A",16)

^SCR("CHBA","A",17)

^SCR("CHBA","A",18)

^SCR("CHBA","A",19)

^SCR("CHBA","A",20)
:‹"„‘:�Ž…†Ž
^SCR("CHBA","A",21)

^SCR("CHBA","A",22)

^SCR("CHBA","AV",1)
vsepvk,upuevninuznuoheha,bfv
^SCR("CHBA","AV",2)
sg-nohfhrt,rucgvsepv
^SCR("CHBA","AV",3)
:ohhujsoheha:(ohnh5sg)ohhujsoheha:ohbnuznoheha
^SCR("CHBA","AV",4)

^SCR("CHBA","AV",5)
inhxoufxewavwxnebc;hbxiucajvwxnlhrt,lhrt,
^SCR("CHBA","AV",6)
kuyhcvkceiugrpk
^SCR("CHBA","AV",7)
------------------------------------------------------------------
^SCR("CHBA","AV",8)

^SCR("CHBA","AV",9)

^SCR("CHBA","AV",10)

^SCR("CHBA","AV",11)

^SCR("CHBA","AV",12)

^SCR("CHBA","AV",13)

^SCR("CHBA","AV",14)

^SCR("CHBA","AV",15)

^SCR("CHBA","AV",16)

^SCR("CHBA","AV",17)

^SCR("CHBA","AV",18)

^SCR("CHBA","AV",19)

^SCR("CHBA","AV",20)
:f"vx:inuzn
^SCR("CHBA","AV",21)

^SCR("CHBA","AV",22)

^SCR("CHBA","G",1,"CRD")
6,77,D,8,0
^SCR("CHBA","G",1,"HELP")

^SCR("CHBA","G",1,"LMAX")
10
^SCR("CHBA","G",1,"MUMPS1")

^SCR("CHBA","G",1,"MUMPS2")

^SCR("CHBA","G",1,"OUTPUT")

^SCR("CHBA","G",1,"SHEM")
  jix`z   
^SCR("CHBA","G",1,"TYP")
D
^SCR("CHBA","G",2,"CRD")
6,66,D,8,0
^SCR("CHBA","G",2,"HELP")

^SCR("CHBA","G",2,"LMAX")
10
^SCR("CHBA","G",2,"MUMPS1")

^SCR("CHBA","G",2,"MUMPS2")

^SCR("CHBA","G",2,"OUTPUT")

^SCR("CHBA","G",2,"SHEM")
   jix`z  
^SCR("CHBA","G",2,"TYP")
D
^SCR("CHBA","G",3,"CRD")
6,55,E,11,0
^SCR("CHBA","G",3,"HELP")

^SCR("CHBA","G",3,"LMAX")
12
^SCR("CHBA","G",3,"MUMPS1")

^SCR("CHBA","G",3,"MUMPS2")

^SCR("CHBA","G",3,"OUTPUT")

^SCR("CHBA","G",3,"SHEM")
 oeaygd 'qn 
^SCR("CHBA","G",3,"TYP")
E
^SCR("CHBA","G",4,"CRD")
6,42,E,3,0
^SCR("CHBA","G",4,"HELP")

^SCR("CHBA","G",4,"LMAX")
4
^SCR("CHBA","G",4,"MUMPS1")

^SCR("CHBA","G",4,"MUMPS2")

^SCR("CHBA","G",4,"OUTPUT")

^SCR("CHBA","G",4,"SHEM")
sipq
^SCR("CHBA","G",4,"TYP")
E
^SCR("CHBA","G",5,"CRD")
6,37,E,2,0
^SCR("CHBA","G",5,"HELP")

^SCR("CHBA","G",5,"LMAX")
3
^SCR("CHBA","G",5,"MUMPS1")

^SCR("CHBA","G",5,"MUMPS2")

^SCR("CHBA","G",5,"OUTPUT")

^SCR("CHBA","G",5,"SHEM")
wpa
^SCR("CHBA","G",5,"TYP")
E
^SCR("CHBA","G",6,"CRD")
6,33,E,11,0
^SCR("CHBA","G",6,"HELP")

^SCR("CHBA","G",6,"LMAX")
12
^SCR("CHBA","G",6,"MUMPS1")

^SCR("CHBA","G",6,"MUMPS2")

^SCR("CHBA","G",6,"OUTPUT")

^SCR("CHBA","G",6,"SHEM")
  w'yd 'qn  
^SCR("CHBA","G",6,"TYP")
E
^SCR("CHBA","G",7,"CRD")
6,20,N,9,2
^SCR("CHBA","G",7,"HELP")

^SCR("CHBA","G",7,"LMAX")
9
^SCR("CHBA","G",7,"MUMPS1")

^SCR("CHBA","G",7,"MUMPS2")

^SCR("CHBA","G",7,"OUTPUT")

^SCR("CHBA","G",7,"SHEM")
   mekq  
^SCR("CHBA","G",7,"TYP")
N
^SCR("CHBA","G",8,"CRD")
6,10,H,1,0
^SCR("CHBA","G",8,"HELP")
"-" - lhal 
^SCR("CHBA","G",8,"LMAX")
5
^SCR("CHBA","G",8,"MUMPS1")
S PRIZO=PRIZ
^SCR("CHBA","G",8,"MUMPS2")
D PROV^PLCHOUT1
^SCR("CHBA","G",8,"SHEM")
 oniq
^SCR("CHBA","G",8,"TYP")
H
^SCR("CHBA","G","DEL")

^SCR("CHBA","G","MAX")
1
^SCR("CHBA","G","NAME","BANK")
5
^SCR("CHBA","G","NAME","CHEK")
6
^SCR("CHBA","G","NAME","DAT")
2
^SCR("CHBA","G","NAME","HESH")
3
^SCR("CHBA","G","NAME","LPR")
1
^SCR("CHBA","G","NAME","PRIZ")
8
^SCR("CHBA","G","NAME","SNIF")
4
^SCR("CHBA","G","NAME","SUM")
7
^SCR("CHBA","G","NM",1)
LPR
^SCR("CHBA","G","NM",2)
DAT
^SCR("CHBA","G","NM",3)
HESH
^SCR("CHBA","G","NM",4)
SNIF
^SCR("CHBA","G","NM",5)
BANK
^SCR("CHBA","G","NM",6)
CHEK
^SCR("CHBA","G","NM",7)
SUM
^SCR("CHBA","G","NM",8)
PRIZ
^SCR("CHBA","G","RB")
5,4,20,79
^SCR("CHBA","G","REF")
^TEMP($P
^SCR("CHBA","G","RZD")
**
^SCR("CHBA","G","STEP")
1
^SCR("CHBA","G","STG")
    : oniq:   mekq  :  w'yd 'qn  :wpa:sipq: oeaygd 'qn :   jix`z  :  jix`z   : 
^SCR("CHBA","G","VG")
8
^SCR("CHBA","NAME")

^SCR("CHBA","P",5,"CRD")
2,46,D,8,0
^SCR("CHBA","P",5,"HELP")

^SCR("CHBA","P",5,"LMAX")
8
^SCR("CHBA","P",5,"MUMPS1")

^SCR("CHBA","P",5,"MUMPS2")

^SCR("CHBA","P",5,"OUTPUT")

^SCR("CHBA","P",5,"TYP")
D
^SCR("CHBA","P",7,"CRD")
2,33,D,8,0
^SCR("CHBA","P",7,"HELP")

^SCR("CHBA","P",7,"LMAX")
8
^SCR("CHBA","P",7,"MUMPS1")

^SCR("CHBA","P",7,"MUMPS2")

^SCR("CHBA","P",7,"OUTPUT")

^SCR("CHBA","P",7,"TYP")
D
^SCR("CHBA","P",10,"CRD")
3,61,H,1
^SCR("CHBA","P",10,"HELP")

^SCR("CHBA","P",10,"LMAX")
6
^SCR("CHBA","P",10,"MUMPS1")

^SCR("CHBA","P",10,"MUMPS2")
S CH1=$TR(CH1,"FK","kl") I "kl"'[CH1 S %SC("ST")=1
^SCR("CHBA","P",10,"MUST")

^SCR("CHBA","P",10,"TYP")
H
^SCR("CHBA","P",20,"CRD")
3,27,H,1
^SCR("CHBA","P",20,"HELP")

^SCR("CHBA","P",20,"LMAX")
6
^SCR("CHBA","P",20,"MUMPS1")

^SCR("CHBA","P",20,"MUMPS2")
S CH2=$TR(CH2,"FK","kl") I "kl"'[CH2 S %SC("ST")=1
^SCR("CHBA","P",20,"MUST")

^SCR("CHBA","P",20,"TYP")
H
^SCR("CHBA","P",30,"CRD")
3,6,H,1
^SCR("CHBA","P",30,"HELP")

^SCR("CHBA","P",30,"LMAX")
6
^SCR("CHBA","P",30,"MUMPS1")

^SCR("CHBA","P",30,"MUMPS2")
S CH3=$TR(CH3,"FK","kl") I "kl"'[CH3 S %SC("ST")=1
^SCR("CHBA","P",30,"MUST")

^SCR("CHBA","P",30,"TYP")
H
^SCR("CHBA","P",35,"CRD")
20,59,N,8,2
^SCR("CHBA","P",35,"HELP")

^SCR("CHBA","P",35,"LMAX")
9
^SCR("CHBA","P",35,"MUMPS1")

^SCR("CHBA","P",35,"MUMPS2")
D UST^PLCHOUT1
^SCR("CHBA","P",35,"TYP")
N
^SCR("CHBA","P",40,"CRD")
20,10,N,9,2
^SCR("CHBA","P",40,"HELP")

^SCR("CHBA","P",40,"LMAX")
10
^SCR("CHBA","P",40,"MUMPS1")

^SCR("CHBA","P",40,"MUMPS2")

^SCR("CHBA","P",40,"OUTPUT")

^SCR("CHBA","P",40,"TYP")
N
^SCR("CHBA","P","NAME","ADDATM")
7
^SCR("CHBA","P","NAME","CH1")
10
^SCR("CHBA","P","NAME","CH2")
20
^SCR("CHBA","P","NAME","CH3")
30
^SCR("CHBA","P","NAME","MEDATM")
5
^SCR("CHBA","P","NAME","MEZU")
35
^SCR("CHBA","P","NAME","SAX")
40
^SCR("CHBA","P","NM",5)
MEDATM
^SCR("CHBA","P","NM",7)
ADDATM
^SCR("CHBA","P","NM",10)
CH1
^SCR("CHBA","P","NM",20)
CH2
^SCR("CHBA","P","NM",30)
CH3
^SCR("CHBA","P","NM",35)
MEZU
^SCR("CHBA","P","NM",40)
SAX
^SCR("CHBA1")
H
^SCR("CHBA1",1)
                     #  dcwtdl zelawdn onefne miwiy zpkd  #                    
^SCR("CHBA1",2)
                               {07      } cr {05      } -n mikix`z xear dcwtd  
^SCR("CHBA1",3)
   30} : miiegc miwiy   20} : ( mini 5 cr) miiegc miwiy   10} : mipnefn miwiy  
^SCR("CHBA1",4)
                                                                             1$
^SCR("CHBA1",5)
  : oniq:   mekq  :  w'yd 'qn  :wpa:sipq: oeaygd 'qn :'qn :  jix`z :  jix`z  : 
^SCR("CHBA1",6)
  :lehia:         :            :   :    :            :dlaw:   dlaw : oerxtl  : 
^SCR("CHBA1",7)
                                                                               
^SCR("CHBA1",8)
                                                                               
^SCR("CHBA1",9)
                                                                               
^SCR("CHBA1",10)
                                                                               
^SCR("CHBA1",11)
                                                                               
^SCR("CHBA1",12)
                                                                               
^SCR("CHBA1",13)
                                                                               
^SCR("CHBA1",14)
                                                                               
^SCR("CHBA1",15)
                                                                               
^SCR("CHBA1",16)
                                                                               
^SCR("CHBA1",17)
                                                                               
^SCR("CHBA1",18)
                                                                               
^SCR("CHBA1",19)
 $1                                                                            
^SCR("CHBA1",20)
          {40       : k"dq                                 {35      : onefn    
^SCR("CHBA1",21)
                                                                               
^SCR("CHBA1",22)
                                                                               
^SCR("CHBA1","A",1)
„ƒ—”„Œš…Œ�—„Ž�Ž…†Ž…�‰—‰™š�‹„
^SCR("CHBA1","A",2)
ƒ’-Ž�‰‹‰˜€š˜…�’„ƒ—”„
^SCR("CHBA1","A",3)
:�‰‰…‡ƒ�‰—‰™:(�‰Ž‰5ƒ’)�‰‰…‡ƒ�‰—‰™:�‰�Ž…†Ž�‰—‰™
^SCR("CHBA1","A",4)

^SCR("CHBA1","A",5)
�Ž‰‘�…‹‘—'™„'‘Ž—��“‰�‘�…�™‡„'‘Ž'‘ŽŠ‰˜€šŠ‰˜€š
^SCR("CHBA1","A",6)
Œ…ˆ‰�„Œ�—„Œ�—�…’˜”Œ
^SCR("CHBA1","A",7)
-------------------------------------------------------------------
^SCR("CHBA1","A",8)

^SCR("CHBA1","A",9)

^SCR("CHBA1","A",10)

^SCR("CHBA1","A",11)

^SCR("CHBA1","A",12)

^SCR("CHBA1","A",13)

^SCR("CHBA1","A",14)

^SCR("CHBA1","A",15)

^SCR("CHBA1","A",16)

^SCR("CHBA1","A",17)

^SCR("CHBA1","A",18)

^SCR("CHBA1","A",19)

^SCR("CHBA1","A",20)
:‹"„‘:�Ž…†Ž
^SCR("CHBA1","A",21)

^SCR("CHBA1","A",22)

^SCR("CHBA1","AV",1)
vsepvk,ukcevninuznuoheha,bfv
^SCR("CHBA1","AV",2)
sg-nohfhrt,rucgvsepv
^SCR("CHBA1","AV",3)
:ohhujsoheha:(ohnh5sg)ohhujsoheha:ohbnuznoheha
^SCR("CHBA1","AV",4)

^SCR("CHBA1","AV",5)
inhxoufxewavwxnebc;hbxiucajvwxnwxnlhrt,lhrt,
^SCR("CHBA1","AV",6)
kuyhcvkcevkceiugrpk
^SCR("CHBA1","AV",7)
-------------------------------------------------------------------
^SCR("CHBA1","AV",8)

^SCR("CHBA1","AV",9)

^SCR("CHBA1","AV",10)

^SCR("CHBA1","AV",11)

^SCR("CHBA1","AV",12)

^SCR("CHBA1","AV",13)

^SCR("CHBA1","AV",14)

^SCR("CHBA1","AV",15)

^SCR("CHBA1","AV",16)

^SCR("CHBA1","AV",17)

^SCR("CHBA1","AV",18)

^SCR("CHBA1","AV",19)

^SCR("CHBA1","AV",20)
:f"vx:inuzn
^SCR("CHBA1","AV",21)

^SCR("CHBA1","AV",22)

^SCR("CHBA1","G",1,"CRD")
6,77,D,8,0
^SCR("CHBA1","G",1,"HELP")

^SCR("CHBA1","G",1,"LMAX")
9
^SCR("CHBA1","G",1,"MUMPS1")

^SCR("CHBA1","G",1,"MUMPS2")

^SCR("CHBA1","G",1,"OUTPUT")

^SCR("CHBA1","G",1,"SHEM")
  jix`z  
^SCR("CHBA1","G",1,"TYP")
D
^SCR("CHBA1","G",2,"CRD")
6,67,D,8,0
^SCR("CHBA1","G",2,"HELP")

^SCR("CHBA1","G",2,"LMAX")
8
^SCR("CHBA1","G",2,"MUMPS1")

^SCR("CHBA1","G",2,"MUMPS2")

^SCR("CHBA1","G",2,"OUTPUT")

^SCR("CHBA1","G",2,"SHEM")
  jix`z 
^SCR("CHBA1","G",2,"TYP")
D
^SCR("CHBA1","G",3,"CRD")
6,58,N,4,0
^SCR("CHBA1","G",3,"HELP")

^SCR("CHBA1","G",3,"LMAX")
4
^SCR("CHBA1","G",3,"MUMPS1")

^SCR("CHBA1","G",3,"MUMPS2")

^SCR("CHBA1","G",3,"OUTPUT")

^SCR("CHBA1","G",3,"SHEM")
'qn 
^SCR("CHBA1","G",3,"TYP")
N
^SCR("CHBA1","G",4,"CRD")
6,53,E,12,0
^SCR("CHBA1","G",4,"HELP")

^SCR("CHBA1","G",4,"LMAX")
12
^SCR("CHBA1","G",4,"MUMPS1")

^SCR("CHBA1","G",4,"MUMPS2")

^SCR("CHBA1","G",4,"OUTPUT")

^SCR("CHBA1","G",4,"SHEM")
 oeaygd 'qn 
^SCR("CHBA1","G",4,"TYP")
E
^SCR("CHBA1","G",5,"CRD")
6,40,E,3,0
^SCR("CHBA1","G",5,"HELP")

^SCR("CHBA1","G",5,"LMAX")
4
^SCR("CHBA1","G",5,"MUMPS1")

^SCR("CHBA1","G",5,"MUMPS2")

^SCR("CHBA1","G",5,"OUTPUT")

^SCR("CHBA1","G",5,"SHEM")
sipq
^SCR("CHBA1","G",5,"TYP")
E
^SCR("CHBA1","G",6,"CRD")
6,35,E,2,0
^SCR("CHBA1","G",6,"HELP")

^SCR("CHBA1","G",6,"LMAX")
3
^SCR("CHBA1","G",6,"MUMPS1")

^SCR("CHBA1","G",6,"MUMPS2")

^SCR("CHBA1","G",6,"OUTPUT")

^SCR("CHBA1","G",6,"SHEM")
wpa
^SCR("CHBA1","G",6,"TYP")
E
^SCR("CHBA1","G",7,"CRD")
6,31,E,12,0
^SCR("CHBA1","G",7,"HELP")

^SCR("CHBA1","G",7,"LMAX")
12
^SCR("CHBA1","G",7,"MUMPS1")

^SCR("CHBA1","G",7,"MUMPS2")

^SCR("CHBA1","G",7,"OUTPUT")

^SCR("CHBA1","G",7,"SHEM")
  w'yd 'qn  
^SCR("CHBA1","G",7,"TYP")
E
^SCR("CHBA1","G",8,"CRD")
6,18,N,9,2
^SCR("CHBA1","G",8,"HELP")

^SCR("CHBA1","G",8,"LMAX")
9
^SCR("CHBA1","G",8,"MUMPS1")

^SCR("CHBA1","G",8,"MUMPS2")

^SCR("CHBA1","G",8,"OUTPUT")

^SCR("CHBA1","G",8,"SHEM")
   mekq  
^SCR("CHBA1","G",8,"TYP")
N
^SCR("CHBA1","G",9,"CRD")
6,8,H,1,0
^SCR("CHBA1","G",9,"HELP")
"-" - lhal 
^SCR("CHBA1","G",9,"LMAX")
5
^SCR("CHBA1","G",9,"MUMPS1")
S PRIZO=PRIZ
^SCR("CHBA1","G",9,"MUMPS2")
D PROV^PLCHOUT1
^SCR("CHBA1","G",9,"SHEM")
 oniq
^SCR("CHBA1","G",9,"TYP")
H
^SCR("CHBA1","G","DEL")

^SCR("CHBA1","G","MAX")
1
^SCR("CHBA1","G","NAME","BANK")
6
^SCR("CHBA1","G","NAME","CHEK")
7
^SCR("CHBA1","G","NAME","DAT")
2
^SCR("CHBA1","G","NAME","HESH")
4
^SCR("CHBA1","G","NAME","KBL")
3
^SCR("CHBA1","G","NAME","LPR")
1
^SCR("CHBA1","G","NAME","PRIZ")
9
^SCR("CHBA1","G","NAME","SNIF")
5
^SCR("CHBA1","G","NAME","SUM")
8
^SCR("CHBA1","G","NM",1)
LPR
^SCR("CHBA1","G","NM",2)
DAT
^SCR("CHBA1","G","NM",3)
KBL
^SCR("CHBA1","G","NM",4)
HESH
^SCR("CHBA1","G","NM",5)
SNIF
^SCR("CHBA1","G","NM",6)
BANK
^SCR("CHBA1","G","NM",7)
CHEK
^SCR("CHBA1","G","NM",8)
SUM
^SCR("CHBA1","G","NM",9)
PRIZ
^SCR("CHBA1","G","RB")
5,2,20,79
^SCR("CHBA1","G","REF")
^TEMP($P
^SCR("CHBA1","G","RZD")
**
^SCR("CHBA1","G","STEP")
1
^SCR("CHBA1","G","STG")
  : oniq:   mekq  :  w'yd 'qn  :wpa:sipq: oeaygd 'qn :'qn :  jix`z :  jix`z  : 
^SCR("CHBA1","G","VG")
8
^SCR("CHBA1","NAME")

^SCR("CHBA1","P",5,"CRD")
2,45,D,8,0
^SCR("CHBA1","P",5,"HELP")

^SCR("CHBA1","P",5,"LMAX")
9
^SCR("CHBA1","P",5,"MUMPS1")

^SCR("CHBA1","P",5,"MUMPS2")

^SCR("CHBA1","P",5,"OUTPUT")

^SCR("CHBA1","P",5,"TYP")
D
^SCR("CHBA1","P",7,"CRD")
2,31,D,8,0
^SCR("CHBA1","P",7,"HELP")

^SCR("CHBA1","P",7,"LMAX")
9
^SCR("CHBA1","P",7,"MUMPS1")

^SCR("CHBA1","P",7,"MUMPS2")

^SCR("CHBA1","P",7,"OUTPUT")

^SCR("CHBA1","P",7,"TYP")
D
^SCR("CHBA1","P",10,"CRD")
3,61,H,1
^SCR("CHBA1","P",10,"HELP")

^SCR("CHBA1","P",10,"LMAX")
6
^SCR("CHBA1","P",10,"MUMPS1")

^SCR("CHBA1","P",10,"MUMPS2")
S CH1=$TR(CH1,"FK","kl") I "kl"'[CH1 S %SC("ST")=1
^SCR("CHBA1","P",10,"MUST")

^SCR("CHBA1","P",10,"TYP")
H
^SCR("CHBA1","P",20,"CRD")
3,27,H,1
^SCR("CHBA1","P",20,"HELP")

^SCR("CHBA1","P",20,"LMAX")
6
^SCR("CHBA1","P",20,"MUMPS1")

^SCR("CHBA1","P",20,"MUMPS2")
S CH2=$TR(CH2,"FK","kl") I "kl"'[CH2 S %SC("ST")=1
^SCR("CHBA1","P",20,"MUST")

^SCR("CHBA1","P",20,"TYP")
H
^SCR("CHBA1","P",30,"CRD")
3,6,H,1
^SCR("CHBA1","P",30,"HELP")

^SCR("CHBA1","P",30,"LMAX")
6
^SCR("CHBA1","P",30,"MUMPS1")

^SCR("CHBA1","P",30,"MUMPS2")
S CH3=$TR(CH3,"FK","kl") I "kl"'[CH3 S %SC("ST")=1
^SCR("CHBA1","P",30,"MUST")

^SCR("CHBA1","P",30,"TYP")
H
^SCR("CHBA1","P",35,"CRD")
20,59,N,8,2
^SCR("CHBA1","P",35,"HELP")

^SCR("CHBA1","P",35,"LMAX")
9
^SCR("CHBA1","P",35,"MUMPS1")

^SCR("CHBA1","P",35,"MUMPS2")
D UST^PLCHOUT1
^SCR("CHBA1","P",35,"TYP")
N
^SCR("CHBA1","P",40,"CRD")
20,10,N,9,2
^SCR("CHBA1","P",40,"HELP")

^SCR("CHBA1","P",40,"LMAX")
10
^SCR("CHBA1","P",40,"MUMPS1")

^SCR("CHBA1","P",40,"MUMPS2")

^SCR("CHBA1","P",40,"OUTPUT")

^SCR("CHBA1","P",40,"TYP")
N
^SCR("CHBA1","P","NAME","ADDATM")
7
^SCR("CHBA1","P","NAME","CH1")
10
^SCR("CHBA1","P","NAME","CH2")
20
^SCR("CHBA1","P","NAME","CH3")
30
^SCR("CHBA1","P","NAME","MEDATM")
5
^SCR("CHBA1","P","NAME","MEZU")
35
^SCR("CHBA1","P","NAME","SAX")
40
^SCR("CHBA1","P","NM",5)
MEDATM
^SCR("CHBA1","P","NM",7)
ADDATM
^SCR("CHBA1","P","NM",10)
CH1
^SCR("CHBA1","P","NM",20)
CH2
^SCR("CHBA1","P","NM",30)
CH3
^SCR("CHBA1","P","NM",35)
MEZU
^SCR("CHBA1","P","NM",40)
SAX
^SCR("CHHA")
H
^SCR("CHHA",1)
                                                   3]                          
^SCR("CHHA",2)
                                  exfgy miwiy zhilw                            
^SCR("CHHA",3)
                               [3                                              
^SCR("CHHA",4)
                                                  {11        :   f''z 'qn      
^SCR("CHHA",5)
                                                         12} :         my      
^SCR("CHHA",6)
                                                         13} :      zaezk      
^SCR("CHHA",7)
                                                {14          :      oetlh      
^SCR("CHHA",8)
                                                  {15        :dxfgd jix`z      
^SCR("CHHA",9)
                                                                       1]      
^SCR("CHHA",10)
                                                            2]                 
^SCR("CHHA",11)
                                             g''y  {20          :  mekq        
^SCR("CHHA",12)
                                                 [2                            
^SCR("CHHA",13)
                                                   {21          : jix`z        
^SCR("CHHA",14)
                                                                               
^SCR("CHHA",15)
             wiyd 'qn     wpa    sipmd 'qn       oeaygd 'qn                    
^SCR("CHHA",16)
             {19          {18    {17             {16                           
^SCR("CHHA",17)
       [1                                                                      
^SCR("CHHA",18)
                                                                               
^SCR("CHHA",19)
                                                22} : ( l/k ) ? i`xy` xeq`l    
^SCR("CHHA",20)
                                          {23       :          melyz jix`z     
^SCR("CHHA",21)
                                                                               
^SCR("CHHA","A",1)

^SCR("CHHA","A",2)
…˜†‡™�‰—‰™šˆ‰Œ—
^SCR("CHHA","A",3)

^SCR("CHHA","A",4)
:†''š'‘Ž
^SCR("CHHA","A",5)
:�™
^SCR("CHHA","A",6)
:š�…š‹
^SCR("CHHA","A",7)
:�…”Œˆ
^SCR("CHHA","A",8)
:„˜†‡„Š‰˜€š
^SCR("CHHA","A",9)

^SCR("CHHA","A",10)

^SCR("CHHA","A",11)
‡''™:�…‹‘
^SCR("CHHA","A",12)

^SCR("CHHA","A",13)
:Š‰˜€š
^SCR("CHHA","A",14)

^SCR("CHHA","A",15)
—‰™„'‘Ž—��“‰��„'‘Ž�…�™‡„'‘Ž
^SCR("CHHA","A",16)

^SCR("CHHA","A",17)

^SCR("CHHA","A",18)

^SCR("CHHA","A",19)
:(Œ/‹)?‰€˜™€˜…‘€Œ
^SCR("CHHA","A",20)
:�…Œ™šŠ‰˜€š
^SCR("CHHA","A",21)

^SCR("CHHA","AV",1)

^SCR("CHHA","AV",2)
urzjaoheha,yhke
^SCR("CHHA","AV",3)

^SCR("CHHA","AV",4)
:zww,wxn
^SCR("CHHA","AV",5)
:oa
^SCR("CHHA","AV",6)
:,cu,f
^SCR("CHHA","AV",7)
:iupky
^SCR("CHHA","AV",8)
:vrzjvlhrt,
^SCR("CHHA","AV",9)

^SCR("CHHA","AV",10)

^SCR("CHHA","AV",11)
jwwa:oufx
^SCR("CHHA","AV",12)

^SCR("CHHA","AV",13)
:lhrt,
^SCR("CHHA","AV",14)

^SCR("CHHA","AV",15)
ehavwxnebc;hbovwxniucajvwxn
^SCR("CHHA","AV",16)

^SCR("CHHA","AV",17)

^SCR("CHHA","AV",18)

^SCR("CHHA","AV",19)
:(kqf)?htratruxtk
^SCR("CHHA","AV",20)
:ouka,lhrt,
^SCR("CHHA","AV",21)

^SCR("CHHA","NAME")

^SCR("CHHA","P",11,"CRD")
4,50,E,10,0
^SCR("CHHA","P",11,"FNC")

^SCR("CHHA","P",11,"GLOB")
CHHA
^SCR("CHHA","P",11,"HELP")
<F7 > - dbvd 
^SCR("CHHA","P",11,"LMAX")
11
^SCR("CHHA","P",11,"MUMPS1")

^SCR("CHHA","P",11,"MUMPS2")

^SCR("CHHA","P",11,"MUST")

^SCR("CHHA","P",11,"NLN")
20
^SCR("CHHA","P",11,"RZD")
\
^SCR("CHHA","P",11,"TOPB")
8
^SCR("CHHA","P",11,"TYP")
E
^SCR("CHHA","P",11,"VRB")
NAME
^SCR("CHHA","P",12,"CRD")
5,60,H,30,0
^SCR("CHHA","P",12,"HELP")

^SCR("CHHA","P",12,"LMAX")
60
^SCR("CHHA","P",12,"MUMPS1")

^SCR("CHHA","P",12,"MUMPS2")

^SCR("CHHA","P",12,"TYP")
H
^SCR("CHHA","P",13,"CRD")
6,60,H,50,0
^SCR("CHHA","P",13,"HELP")

^SCR("CHHA","P",13,"LMAX")
60
^SCR("CHHA","P",13,"MUMPS1")

^SCR("CHHA","P",13,"MUMPS2")

^SCR("CHHA","P",13,"TYP")
H
^SCR("CHHA","P",14,"CRD")
7,48,E,12,0
^SCR("CHHA","P",14,"HELP")

^SCR("CHHA","P",14,"LMAX")
13
^SCR("CHHA","P",14,"MUMPS1")

^SCR("CHHA","P",14,"MUMPS2")

^SCR("CHHA","P",14,"TYP")
E
^SCR("CHHA","P",15,"CRD")
8,50,D,8,0
^SCR("CHHA","P",15,"HELP")

^SCR("CHHA","P",15,"LMAX")
11
^SCR("CHHA","P",15,"MUMPS1")

^SCR("CHHA","P",15,"MUMPS2")

^SCR("CHHA","P",15,"MUST")

^SCR("CHHA","P",15,"TYP")
D
^SCR("CHHA","P",16,"CRD")
16,49,N,9,0
^SCR("CHHA","P",16,"HELP")

^SCR("CHHA","P",16,"LMAX")
30
^SCR("CHHA","P",16,"MUMPS1")

^SCR("CHHA","P",16,"MUMPS2")

^SCR("CHHA","P",16,"TYP")
N
^SCR("CHHA","P",17,"CRD")
16,33,N,5,0
^SCR("CHHA","P",17,"HELP")

^SCR("CHHA","P",17,"LMAX")
16
^SCR("CHHA","P",17,"MUMPS1")

^SCR("CHHA","P",17,"MUMPS2")

^SCR("CHHA","P",17,"TYP")
N
^SCR("CHHA","P",18,"CRD")
16,26,N,3,0
^SCR("CHHA","P",18,"HELP")

^SCR("CHHA","P",18,"LMAX")
7
^SCR("CHHA","P",18,"MUMPS1")

^SCR("CHHA","P",18,"MUMPS2")

^SCR("CHHA","P",18,"TYP")
N
^SCR("CHHA","P",19,"CRD")
16,13,N,9,0
^SCR("CHHA","P",19,"HELP")

^SCR("CHHA","P",19,"LMAX")
13
^SCR("CHHA","P",19,"MUMPS1")

^SCR("CHHA","P",19,"MUMPS2")

^SCR("CHHA","P",19,"TYP")
N
^SCR("CHHA","P",20,"CRD")
11,51,N,8,0
^SCR("CHHA","P",20,"HELP")

^SCR("CHHA","P",20,"LMAX")
13
^SCR("CHHA","P",20,"MUMPS1")

^SCR("CHHA","P",20,"MUMPS2")

^SCR("CHHA","P",20,"TYP")
N
^SCR("CHHA","P",21,"CRD")
13,51,D,8,0
^SCR("CHHA","P",21,"HELP")

^SCR("CHHA","P",21,"LMAX")
13
^SCR("CHHA","P",21,"MUMPS1")

^SCR("CHHA","P",21,"MUMPS2")

^SCR("CHHA","P",21,"TYP")
D
^SCR("CHHA","P",22,"CRD")
19,51,H,1,0
^SCR("CHHA","P",22,"HELP")

^SCR("CHHA","P",22,"LMAX")
51
^SCR("CHHA","P",22,"MUMPS1")

^SCR("CHHA","P",22,"MUMPS2")

^SCR("CHHA","P",22,"TYP")
H
^SCR("CHHA","P",23,"CRD")
20,42,D,8,0
^SCR("CHHA","P",23,"HELP")

^SCR("CHHA","P",23,"LMAX")
10
^SCR("CHHA","P",23,"MUMPS1")

^SCR("CHHA","P",23,"MUMPS2")

^SCR("CHHA","P",23,"TYP")
D
^SCR("CHHA","P","NAME","ADR")
13
^SCR("CHHA","P","NAME","BANK")
18
^SCR("CHHA","P","NAME","CHEK")
19
^SCR("CHHA","P","NAME","DAHA")
15
^SCR("CHHA","P","NAME","DATA")
21
^SCR("CHHA","P","NAME","DATT")
23
^SCR("CHHA","P","NAME","HAV")
13
^SCR("CHHA","P","NAME","HESH")
16
^SCR("CHHA","P","NAME","KOCHE")
14
^SCR("CHHA","P","NAME","KUPA")
11
^SCR("CHHA","P","NAME","LEKO")
22
^SCR("CHHA","P","NAME","MISH")
12
^SCR("CHHA","P","NAME","NAME")
12
^SCR("CHHA","P","NAME","SNIF")
17
^SCR("CHHA","P","NAME","SUMCH")
20
^SCR("CHHA","P","NAME","TEL")
14
^SCR("CHHA","P","NAME","TZ")
11
^SCR("CHHA","P","NAME","ZAP")
22
^SCR("CHHA","P","NM",11)
TZ
^SCR("CHHA","P","NM",12)
NAME
^SCR("CHHA","P","NM",13)
ADR
^SCR("CHHA","P","NM",14)
TEL
^SCR("CHHA","P","NM",15)
DAHA
^SCR("CHHA","P","NM",16)
HESH
^SCR("CHHA","P","NM",17)
SNIF
^SCR("CHHA","P","NM",18)
BANK
^SCR("CHHA","P","NM",19)
CHEK
^SCR("CHHA","P","NM",20)
SUMCH
^SCR("CHHA","P","NM",21)
DATA
^SCR("CHHA","P","NM",22)
ZAP
^SCR("CHHA","P","NM",23)
DATT
^SCR("CHHA","P","RB",1)
10,8,18,73
^SCR("CHHA","P","RB",2)
11,50,13,62
^SCR("CHHA","P","RB",3)
2,32,4,53
^SCR("CRMN")
H
^SCR("CRMN",1)
        {                                 10}: dniyn xe`z  {05    } : dniyn cew
^SCR("CRMN",2)
        {                                 20}: hixtz xe`z  {15    } : hixtz cew
^SCR("CRMN",3)
                                          {               30} {25 } :   dty cew
^SCR("CRMN",4)
                                                                             1$
^SCR("CRMN",5)
 :           zaezk          :           hixtz zxey         :      i`pz      :  
^SCR("CRMN",6)
                                                                               
^SCR("CRMN",7)
                                                                               
^SCR("CRMN",8)
                                                                               
^SCR("CRMN",9)
                                                                               
^SCR("CRMN",10)
                                                                               
^SCR("CRMN",11)
                                                                               
^SCR("CRMN",12)
                                                                               
^SCR("CRMN",13)
                                                                               
^SCR("CRMN",14)
                                                                               
^SCR("CRMN",15)
                                                                               
^SCR("CRMN",16)
                                                                               
^SCR("CRMN",17)
                                                                               
^SCR("CRMN",18)
                                                                               
^SCR("CRMN",19)
                                                                               
^SCR("CRMN",20)
                                                                               
^SCR("CRMN",21)
                                                                               
^SCR("CRMN",22)
 $1                                                                            
^SCR("CRMN","A",1)
:„Ž‰™Ž˜…€š:„Ž‰™Žƒ…—
^SCR("CRMN","A",2)
:ˆ‰˜”š˜…€š:ˆ‰˜”šƒ…—
^SCR("CRMN","A",3)
:„”™ƒ…—
^SCR("CRMN","A",4)

^SCR("CRMN","A",5)
š�…š‹ˆ‰˜”šš˜…™‰€�š
^SCR("CRMN","A",6)
--------------------------------------------------------------------------
^SCR("CRMN","A",7)

^SCR("CRMN","A",8)

^SCR("CRMN","A",9)

^SCR("CRMN","A",10)

^SCR("CRMN","A",11)

^SCR("CRMN","A",12)

^SCR("CRMN","A",13)

^SCR("CRMN","A",14)

^SCR("CRMN","A",15)

^SCR("CRMN","A",16)

^SCR("CRMN","A",17)

^SCR("CRMN","A",18)

^SCR("CRMN","A",19)

^SCR("CRMN","A",20)

^SCR("CRMN","A",21)

^SCR("CRMN","A",22)

^SCR("CRMN","AV",1)
:vnhanrut,:vnhansue
^SCR("CRMN","AV",2)
:yhrp,rut,:yhrp,sue
^SCR("CRMN","AV",3)
:vpasue
^SCR("CRMN","AV",4)

^SCR("CRMN","AV",5)
,cu,fyhrp,,ruahtb,
^SCR("CRMN","AV",6)
--------------------------------------------------------------------------
^SCR("CRMN","AV",7)

^SCR("CRMN","AV",8)

^SCR("CRMN","AV",9)

^SCR("CRMN","AV",10)

^SCR("CRMN","AV",11)

^SCR("CRMN","AV",12)

^SCR("CRMN","AV",13)

^SCR("CRMN","AV",14)

^SCR("CRMN","AV",15)

^SCR("CRMN","AV",16)

^SCR("CRMN","AV",17)

^SCR("CRMN","AV",18)

^SCR("CRMN","AV",19)

^SCR("CRMN","AV",20)

^SCR("CRMN","AV",21)

^SCR("CRMN","AV",22)

^SCR("CRMN","G",1,"CRD")
6,76,E,16,0
^SCR("CRMN","G",1,"HELP")

^SCR("CRMN","G",1,"LMAX")
16
^SCR("CRMN","G",1,"MUMPS1")

^SCR("CRMN","G",1,"MUMPS2")
S:US="" US=1
^SCR("CRMN","G",1,"SHEM")
      i`pz      
^SCR("CRMN","G",1,"TYP")
E
^SCR("CRMN","G",2,"CRD")
6,59,H,30,0
^SCR("CRMN","G",2,"FNC")

^SCR("CRMN","G",2,"GLOB")
LNG
^SCR("CRMN","G",2,"HELP")

^SCR("CRMN","G",2,"LMAX")
30
^SCR("CRMN","G",2,"MUMPS1")

^SCR("CRMN","G",2,"MUMPS2")

^SCR("CRMN","G",2,"NLN")
20
^SCR("CRMN","G",2,"RZD")
\
^SCR("CRMN","G",2,"SHEM")
           hixtz zxey         
^SCR("CRMN","G",2,"TOPB")
8
^SCR("CRMN","G",2,"TYP")
H
^SCR("CRMN","G",3,"CRD")
6,28,E,26,0
^SCR("CRMN","G",3,"HELP")

^SCR("CRMN","G",3,"LMAX")
26
^SCR("CRMN","G",3,"MUMPS1")

^SCR("CRMN","G",3,"MUMPS2")

^SCR("CRMN","G",3,"SHEM")
           zaezk          
^SCR("CRMN","G",3,"TYP")
E
^SCR("CRMN","G","DEL")
Y
^SCR("CRMN","G","MAX")
9999
^SCR("CRMN","G","NAME","ADR")
3
^SCR("CRMN","G","NAME","LINE")
2
^SCR("CRMN","G","NAME","US")
1
^SCR("CRMN","G","NM",1)
US
^SCR("CRMN","G","NM",2)
LINE
^SCR("CRMN","G","NM",3)
ADR
^SCR("CRMN","G","RB")
5,2,23,79
^SCR("CRMN","G","REF")
^TEMP($P
^SCR("CRMN","G","RZD")
\
^SCR("CRMN","G","STEP")
1
^SCR("CRMN","G","STG")
 :           zaezk          :           hixtz zxey         :      i`pz      :  
^SCR("CRMN","G","VG")
7
^SCR("CRMN","NAME")
hixtz zipa
^SCR("CRMN","P",5,"CRD")
1,59,E,7,0
^SCR("CRMN","P",5,"FNC")

^SCR("CRMN","P",5,"GLOB")
^WBMENU
^SCR("CRMN","P",5,"HELP")

^SCR("CRMN","P",5,"LMAX")
7
^SCR("CRMN","P",5,"MUMPS1")

^SCR("CRMN","P",5,"MUMPS2")

^SCR("CRMN","P",5,"MUST")

^SCR("CRMN","P",5,"NLN")
20
^SCR("CRMN","P",5,"RZD")
\
^SCR("CRMN","P",5,"TOPB")
8
^SCR("CRMN","P",5,"TYP")
E
^SCR("CRMN","P",5,"VRB")
PACKAGE1
^SCR("CRMN","P",10,"CRD")
1,45,H,36
^SCR("CRMN","P",10,"HELP")

^SCR("CRMN","P",10,"LMAX")
36
^SCR("CRMN","P",10,"MUMPS1")

^SCR("CRMN","P",10,"MUMPS2")
D PACKAGE1^%L1CRMN
^SCR("CRMN","P",10,"TYP")
H
^SCR("CRMN","P",15,"CRD")
2,59,E,7,0
^SCR("CRMN","P",15,"HELP")

^SCR("CRMN","P",15,"LMAX")
7
^SCR("CRMN","P",15,"MUMPS1")

^SCR("CRMN","P",15,"MUMPS2")
D MENU^%L1CRMN
^SCR("CRMN","P",15,"MUST")

^SCR("CRMN","P",15,"TYP")
E
^SCR("CRMN","P",20,"CRD")
2,45,H,36
^SCR("CRMN","P",20,"HELP")

^SCR("CRMN","P",20,"LMAX")
36
^SCR("CRMN","P",20,"MUMPS1")

^SCR("CRMN","P",20,"MUMPS2")
D MENU1^%L1CRMN
^SCR("CRMN","P",20,"TYP")
H
^SCR("CRMN","P",25,"CRD")
3,62,E,4,0
^SCR("CRMN","P",25,"FNC")

^SCR("CRMN","P",25,"GLOB")
^LNG
^SCR("CRMN","P",25,"HELP")

^SCR("CRMN","P",25,"LMAX")
4
^SCR("CRMN","P",25,"MUMPS1")
S:$G(LNG)="" LNG="H"
^SCR("CRMN","P",25,"MUMPS2")
D LNG^%L1CRMN
^SCR("CRMN","P",25,"MUST")

^SCR("CRMN","P",25,"NLN")
20
^SCR("CRMN","P",25,"RZD")
\
^SCR("CRMN","P",25,"TOPB")
8
^SCR("CRMN","P",25,"TYP")
E
^SCR("CRMN","P",25,"VRB")
LNG1
^SCR("CRMN","P",30,"CRD")
3,61,H,18
^SCR("CRMN","P",30,"HELP")

^SCR("CRMN","P",30,"LMAX")
18
^SCR("CRMN","P",30,"MUMPS1")

^SCR("CRMN","P",30,"MUMPS2")
S ^LNG(LNG)=LNG1
^SCR("CRMN","P",30,"TYP")
H
^SCR("CRMN","P","NAME","LNG")
25
^SCR("CRMN","P","NAME","LNG1")
30
^SCR("CRMN","P","NAME","MENU")
15
^SCR("CRMN","P","NAME","MENU1")
20
^SCR("CRMN","P","NAME","PACKAGE")
5
^SCR("CRMN","P","NAME","PACKAGE1")
10
^SCR("CRMN","P","NM",5)
PACKAGE
^SCR("CRMN","P","NM",10)
PACKAGE1
^SCR("CRMN","P","NM",15)
MENU
^SCR("CRMN","P","NM",20)
MENU1
^SCR("CRMN","P","NM",25)
LNG
^SCR("CRMN","P","NM",30)
LNG1
^SCR("DARGA")
H
^SCR("DARGA",1)
                                     # zebxc zlah #                            
^SCR("DARGA",2)
                                                                               
^SCR("DARGA",3)
                                                                     1$        
^SCR("DARGA",4)
           :oeaygl dgpd % : hixtl dgpd % :  dbxc xe`z  : dbxc cew :            
^SCR("DARGA",5)
                                                                               
^SCR("DARGA",6)
                                                                               
^SCR("DARGA",7)
                                                                               
^SCR("DARGA",8)
                                                                               
^SCR("DARGA",9)
                                                                               
^SCR("DARGA",10)
                                                                               
^SCR("DARGA",11)
                                                                               
^SCR("DARGA",12)
                                                                               
^SCR("DARGA",13)
                                                                               
^SCR("DARGA",14)
                                                                               
^SCR("DARGA",15)
                                                                               
^SCR("DARGA",16)
                                                                               
^SCR("DARGA",17)
                                                                               
^SCR("DARGA",18)
      $1                                                                       
^SCR("DARGA",19)
                                                                               
^SCR("DARGA",20)
                                                                               
^SCR("DARGA","A",1)
š…‚˜ƒšŒ�ˆ
^SCR("DARGA","A",2)

^SCR("DARGA","A",3)

^SCR("DARGA","A",4)
�…�™‡Œ„‡�„%ˆ‰˜”Œ„‡�„%„‚˜ƒ˜…€š„‚˜ƒƒ…—
^SCR("DARGA","A",5)
---------------------------------------------------
^SCR("DARGA","A",6)

^SCR("DARGA","A",7)

^SCR("DARGA","A",8)

^SCR("DARGA","A",9)

^SCR("DARGA","A",10)

^SCR("DARGA","A",11)

^SCR("DARGA","A",12)

^SCR("DARGA","A",13)

^SCR("DARGA","A",14)

^SCR("DARGA","A",15)

^SCR("DARGA","A",16)

^SCR("DARGA","A",17)

^SCR("DARGA","A",18)

^SCR("DARGA","A",19)

^SCR("DARGA","A",20)

^SCR("DARGA","AV",1)
,udrs,kcy
^SCR("DARGA","AV",2)

^SCR("DARGA","AV",3)

^SCR("DARGA","AV",4)
iucajkvjbv%yhrpkvjbv%vdrsrut,vdrssue
^SCR("DARGA","AV",5)
---------------------------------------------------
^SCR("DARGA","AV",6)

^SCR("DARGA","AV",7)

^SCR("DARGA","AV",8)

^SCR("DARGA","AV",9)

^SCR("DARGA","AV",10)

^SCR("DARGA","AV",11)

^SCR("DARGA","AV",12)

^SCR("DARGA","AV",13)

^SCR("DARGA","AV",14)

^SCR("DARGA","AV",15)

^SCR("DARGA","AV",16)

^SCR("DARGA","AV",17)

^SCR("DARGA","AV",18)

^SCR("DARGA","AV",19)

^SCR("DARGA","AV",20)

^SCR("DARGA","G",1,"CRD")
5,66,E,2,0
^SCR("DARGA","G",1,"HELP")

^SCR("DARGA","G",1,"LMAX")
10
^SCR("DARGA","G",1,"MUMPS1")

^SCR("DARGA","G",1,"MUMPS2")

^SCR("DARGA","G",1,"MUST")

^SCR("DARGA","G",1,"SHEM")
 dbxc cew 
^SCR("DARGA","G",1,"TYP")
E
^SCR("DARGA","G",2,"CRD")
5,55,H,13,0
^SCR("DARGA","G",2,"HELP")

^SCR("DARGA","G",2,"LMAX")
13
^SCR("DARGA","G",2,"MUMPS1")

^SCR("DARGA","G",2,"MUMPS2")

^SCR("DARGA","G",2,"MUST")

^SCR("DARGA","G",2,"SHEM")
  dbxc xe`z  
^SCR("DARGA","G",2,"TYP")
H
^SCR("DARGA","G",3,"CRD")
5,41,E,3,0
^SCR("DARGA","G",3,"HELP")

^SCR("DARGA","G",3,"LMAX")
14
^SCR("DARGA","G",3,"MUMPS1")

^SCR("DARGA","G",3,"MUMPS2")

^SCR("DARGA","G",3,"SHEM")
 hixtl dgpd % 
^SCR("DARGA","G",3,"TYP")
E
^SCR("DARGA","G",4,"CRD")
5,26,E,3,0
^SCR("DARGA","G",4,"HELP")

^SCR("DARGA","G",4,"LMAX")
14
^SCR("DARGA","G",4,"MUMPS1")

^SCR("DARGA","G",4,"MUMPS2")

^SCR("DARGA","G",4,"SHEM")
oeaygl dgpd % 
^SCR("DARGA","G",4,"TYP")
E
^SCR("DARGA","G","DEL")
Y
^SCR("DARGA","G","MAX")
999
^SCR("DARGA","G","NAME","DARGA")
1
^SCR("DARGA","G","NAME","DARGA1")
2
^SCR("DARGA","G","NAME","HNHB")
4
^SCR("DARGA","G","NAME","HNHP")
3
^SCR("DARGA","G","NM",1)
DARGA
^SCR("DARGA","G","NM",2)
DARGA1
^SCR("DARGA","G","NM",3)
HNHP
^SCR("DARGA","G","NM",4)
HNHB
^SCR("DARGA","G","RB")
4,7,19,71
^SCR("DARGA","G","REF")
^TEMP($P,"DARGA"
^SCR("DARGA","G","RZD")
\
^SCR("DARGA","G","STEP")
1
^SCR("DARGA","G","STG")
           :oeaygl dgpd % : hixtl dgpd % :  dbxc xe`z  : dbxc cew :            
^SCR("DARGA","G","VG")
6
^SCR("DARGA","NAME")
ze`bxc zlah
^SCR("DLKH")
H
^SCR("DLKH",1)
                        # zegewl g"ec #                                        
^SCR("DLKH",2)
                 {10     } jix`z cr         {05     } jix`zn                   
^SCR("DLKH",3)
             {13  : zegewl zveaw cr     {11  : zegewl zveawn                   
^SCR("DLKH",4)
               {20        } gewl cr      {15        }  gewln                   
^SCR("DLKH",5)
                                                                             1$
^SCR("DLKH",6)
     :   dxzi  : minelyz :  zeipw  :zeipeayg:      gewl my     : gewl 'qn :    
^SCR("DLKH",7)
     :         :         :         :  zeipci:                  :          :    
^SCR("DLKH",8)
                                                                               
^SCR("DLKH",9)
                                                                               
^SCR("DLKH",10)
                                                                               
^SCR("DLKH",11)
                                                                               
^SCR("DLKH",12)
                                                                               
^SCR("DLKH",13)
                                                                               
^SCR("DLKH",14)
                                                                               
^SCR("DLKH",15)
                                                                               
^SCR("DLKH",16)
                                                                               
^SCR("DLKH",17)
                                                                               
^SCR("DLKH",18)
                                                                               
^SCR("DLKH",19)
                                                                               
^SCR("DLKH",20)
                                                                               
^SCR("DLKH",21)
  $1                                                                           
^SCR("DLKH",22)
    {40      } {35      } {30      } {25      }: k"dq                          
^SCR("DLKH","A",1)
š…‡…—Œ‡"…ƒ
^SCR("DLKH","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("DLKH","A",3)
:š…‡…—Œš–…�—ƒ’:š…‡…—Œš–…�—Ž
^SCR("DLKH","A",4)
‡…—Œƒ’‡…—ŒŽ
^SCR("DLKH","A",5)

^SCR("DLKH","A",6)
„˜š‰�‰Ž…Œ™šš…‰�—š…‰�…�™‡‡…—Œ�™‡…—Œ'‘Ž
^SCR("DLKH","A",7)
š…‰�ƒ‰
^SCR("DLKH","A",8)
-------------------------------------------------------------------
^SCR("DLKH","A",9)

^SCR("DLKH","A",10)

^SCR("DLKH","A",11)

^SCR("DLKH","A",12)

^SCR("DLKH","A",13)

^SCR("DLKH","A",14)

^SCR("DLKH","A",15)

^SCR("DLKH","A",16)

^SCR("DLKH","A",17)

^SCR("DLKH","A",18)

^SCR("DLKH","A",19)

^SCR("DLKH","A",20)

^SCR("DLKH","A",21)

^SCR("DLKH","A",22)
:‹"„‘
^SCR("DLKH","AV",1)
,ujuekj"us
^SCR("DLKH","AV",2)
lhrt,sglhrt,n
^SCR("DLKH","AV",3)
:,ujuek,mucesg:,ujuek,mucen
^SCR("DLKH","AV",4)
jueksgjuekn
^SCR("DLKH","AV",5)

^SCR("DLKH","AV",6)
vr,hohnuka,,uhbe,uhbucajjuekoajuekwxn
^SCR("DLKH","AV",7)
,uhbsh
^SCR("DLKH","AV",8)
-------------------------------------------------------------------
^SCR("DLKH","AV",9)

^SCR("DLKH","AV",10)

^SCR("DLKH","AV",11)

^SCR("DLKH","AV",12)

^SCR("DLKH","AV",13)

^SCR("DLKH","AV",14)

^SCR("DLKH","AV",15)

^SCR("DLKH","AV",16)

^SCR("DLKH","AV",17)

^SCR("DLKH","AV",18)

^SCR("DLKH","AV",19)

^SCR("DLKH","AV",20)

^SCR("DLKH","AV",21)

^SCR("DLKH","AV",22)
:f"vx
^SCR("DLKH","G",1,"CRD")
7,74,E,10,0
^SCR("DLKH","G",1,"HELP")
<F9> - hxetn g"ec bivdl 
^SCR("DLKH","G",1,"LMAX")
10
^SCR("DLKH","G",1,"MUMPS1")

^SCR("DLKH","G",1,"MUMPS2")
D LKH^P1DLKH
^SCR("DLKH","G",1,"SHEM")
 gewl 'qn 
^SCR("DLKH","G",1,"TYP")
E
^SCR("DLKH","G",2,"CRD")
7,63,H,18,0
^SCR("DLKH","G",2,"HELP")

^SCR("DLKH","G",2,"LMAX")
18
^SCR("DLKH","G",2,"MUMPS1")

^SCR("DLKH","G",2,"MUMPS2")

^SCR("DLKH","G",2,"OUTPUT")

^SCR("DLKH","G",2,"SHEM")
      gewl my     
^SCR("DLKH","G",2,"TYP")
H
^SCR("DLKH","G",3,"CRD")
7,44,N,8,2
^SCR("DLKH","G",3,"HELP")

^SCR("DLKH","G",3,"LMAX")
8
^SCR("DLKH","G",3,"MUMPS1")

^SCR("DLKH","G",3,"MUMPS2")

^SCR("DLKH","G",3,"OUTPUT")

^SCR("DLKH","G",3,"SHEM")
zeipeayg
^SCR("DLKH","G",3,"TYP")
N
^SCR("DLKH","G",4,"CRD")
7,35,N,9,2
^SCR("DLKH","G",4,"HELP")

^SCR("DLKH","G",4,"LMAX")
9
^SCR("DLKH","G",4,"MUMPS1")

^SCR("DLKH","G",4,"MUMPS2")

^SCR("DLKH","G",4,"OUTPUT")

^SCR("DLKH","G",4,"SHEM")
  zeipw  
^SCR("DLKH","G",4,"TYP")
N
^SCR("DLKH","G",5,"CRD")
7,25,N,9,2
^SCR("DLKH","G",5,"HELP")

^SCR("DLKH","G",5,"LMAX")
9
^SCR("DLKH","G",5,"MUMPS1")

^SCR("DLKH","G",5,"MUMPS2")

^SCR("DLKH","G",5,"OUTPUT")

^SCR("DLKH","G",5,"SHEM")
 minelyz 
^SCR("DLKH","G",5,"TYP")
N
^SCR("DLKH","G",6,"CRD")
7,15,N,9,2
^SCR("DLKH","G",6,"HELP")

^SCR("DLKH","G",6,"LMAX")
9
^SCR("DLKH","G",6,"MUMPS1")

^SCR("DLKH","G",6,"MUMPS2")

^SCR("DLKH","G",6,"OUTPUT")

^SCR("DLKH","G",6,"SHEM")
   dxzi  
^SCR("DLKH","G",6,"TYP")
N
^SCR("DLKH","G","DEL")

^SCR("DLKH","G","MAX")
99999
^SCR("DLKH","G","NAME","ITRA0")
3
^SCR("DLKH","G","NAME","ITRA1")
6
^SCR("DLKH","G","NAME","KNIJOT")
4
^SCR("DLKH","G","NAME","LKH")
1
^SCR("DLKH","G","NAME","NAME")
2
^SCR("DLKH","G","NAME","TASHL")
5
^SCR("DLKH","G","NM",1)
LKH
^SCR("DLKH","G","NM",2)
NAME
^SCR("DLKH","G","NM",3)
ITRA0
^SCR("DLKH","G","NM",4)
KNIJOT
^SCR("DLKH","G","NM",5)
TASHL
^SCR("DLKH","G","NM",6)
ITRA1
^SCR("DLKH","G","RB")
6,3,22,79
^SCR("DLKH","G","REF")
^TEMP($P,"L"
^SCR("DLKH","G","RZD")
\
^SCR("DLKH","G","STEP")
1
^SCR("DLKH","G","STG")
     :   dxzi  : minelyz :  zeipw  :zeipeayg:      gewl my     : gewl 'qn :    
^SCR("DLKH","G","VG")
9
^SCR("DLKH","NAME")
zegewl g"ec1
^SCR("DLKH","P",5,"CRD")
2,44,D,8,0
^SCR("DLKH","P",5,"HELP")

^SCR("DLKH","P",5,"LMAX")
8
^SCR("DLKH","P",5,"MUMPS1")
S:'$G(DAT11) DAT11=$$^%L1DC($H,1)
^SCR("DLKH","P",5,"MUMPS2")

^SCR("DLKH","P",5,"MUST")

^SCR("DLKH","P",5,"TYP")
D
^SCR("DLKH","P",10,"CRD")
2,17,D,8,0
^SCR("DLKH","P",10,"HELP")

^SCR("DLKH","P",10,"LMAX")
8
^SCR("DLKH","P",10,"MUMPS1")
S:'$G(DAT12) DAT12=DAT11
^SCR("DLKH","P",10,"MUMPS2")

^SCR("DLKH","P",10,"MUST")

^SCR("DLKH","P",10,"TYP")
D
^SCR("DLKH","P",11,"CRD")
3,40,E,5,0
^SCR("DLKH","P",11,"FNC")

^SCR("DLKH","P",11,"GLOB")
SUGL
^SCR("DLKH","P",11,"HELP")

^SCR("DLKH","P",11,"LMAX")
5
^SCR("DLKH","P",11,"MUMPS1")

^SCR("DLKH","P",11,"MUMPS2")

^SCR("DLKH","P",11,"NLN")
20
^SCR("DLKH","P",11,"RZD")
\
^SCR("DLKH","P",11,"TOPB")
8
^SCR("DLKH","P",11,"TYP")
E
^SCR("DLKH","P",13,"CRD")
3,13,E,5,0
^SCR("DLKH","P",13,"FNC")

^SCR("DLKH","P",13,"GLOB")
SUGL
^SCR("DLKH","P",13,"HELP")

^SCR("DLKH","P",13,"LMAX")
5
^SCR("DLKH","P",13,"MUMPS1")
S:'$G(ADSUG) ADSUG=MESUG
^SCR("DLKH","P",13,"MUMPS2")
I ADSUG<MESUG S %SC("ER")=1
^SCR("DLKH","P",13,"NLN")
20
^SCR("DLKH","P",13,"RZD")
\
^SCR("DLKH","P",13,"TOPB")
8
^SCR("DLKH","P",13,"TYP")
E
^SCR("DLKH","P",15,"CRD")
4,41,E,11,0
^SCR("DLKH","P",15,"FNC")

^SCR("DLKH","P",15,"GLOB")
LKH
^SCR("DLKH","P",15,"HELP")

^SCR("DLKH","P",15,"LMAX")
11
^SCR("DLKH","P",15,"MUMPS1")

^SCR("DLKH","P",15,"MUMPS2")

^SCR("DLKH","P",15,"NLN")
20
^SCR("DLKH","P",15,"RZD")
\
^SCR("DLKH","P",15,"TOPB")
8
^SCR("DLKH","P",15,"TYP")
E
^SCR("DLKH","P",20,"CRD")
4,15,E,11,0
^SCR("DLKH","P",20,"FNC")

^SCR("DLKH","P",20,"GLOB")
LKH
^SCR("DLKH","P",20,"HELP")

^SCR("DLKH","P",20,"LMAX")
11
^SCR("DLKH","P",20,"MUMPS1")
S:'$G(LKH2) LKH2=LKH1
^SCR("DLKH","P",20,"MUMPS2")

^SCR("DLKH","P",20,"NLN")
20
^SCR("DLKH","P",20,"RZD")
\
^SCR("DLKH","P",20,"TOPB")
8
^SCR("DLKH","P",20,"TYP")
E
^SCR("DLKH","P",25,"CRD")
22,37,N,9,2
^SCR("DLKH","P",25,"HELP")

^SCR("DLKH","P",25,"LMAX")
9
^SCR("DLKH","P",25,"MUMPS1")

^SCR("DLKH","P",25,"MUMPS2")

^SCR("DLKH","P",25,"OUTPUT")

^SCR("DLKH","P",25,"TYP")
N
^SCR("DLKH","P",30,"CRD")
22,26,N,9,2
^SCR("DLKH","P",30,"HELP")

^SCR("DLKH","P",30,"LMAX")
9
^SCR("DLKH","P",30,"MUMPS1")

^SCR("DLKH","P",30,"MUMPS2")

^SCR("DLKH","P",30,"OUTPUT")

^SCR("DLKH","P",30,"TYP")
N
^SCR("DLKH","P",35,"CRD")
22,15,N,9,2
^SCR("DLKH","P",35,"HELP")

^SCR("DLKH","P",35,"LMAX")
9
^SCR("DLKH","P",35,"MUMPS1")

^SCR("DLKH","P",35,"MUMPS2")

^SCR("DLKH","P",35,"OUTPUT")

^SCR("DLKH","P",35,"TYP")
N
^SCR("DLKH","P",40,"CRD")
22,4,N,9,2
^SCR("DLKH","P",40,"HELP")

^SCR("DLKH","P",40,"LMAX")
9
^SCR("DLKH","P",40,"MUMPS1")

^SCR("DLKH","P",40,"MUMPS2")

^SCR("DLKH","P",40,"OUTPUT")

^SCR("DLKH","P",40,"TYP")
N
^SCR("DLKH","P","NAME","ADSUG")
13
^SCR("DLKH","P","NAME","DAT11")
5
^SCR("DLKH","P","NAME","DAT12")
10
^SCR("DLKH","P","NAME","LKH1")
15
^SCR("DLKH","P","NAME","LKH2")
20
^SCR("DLKH","P","NAME","MESUG")
11
^SCR("DLKH","P","NAME","SITRA1")
40
^SCR("DLKH","P","NAME","SJAD")
25
^SCR("DLKH","P","NAME","SKNIJOT")
30
^SCR("DLKH","P","NAME","STASHL")
35
^SCR("DLKH","P","NM",5)
DAT11
^SCR("DLKH","P","NM",10)
DAT12
^SCR("DLKH","P","NM",11)
MESUG
^SCR("DLKH","P","NM",13)
ADSUG
^SCR("DLKH","P","NM",15)
LKH1
^SCR("DLKH","P","NM",20)
LKH2
^SCR("DLKH","P","NM",25)
SJAD
^SCR("DLKH","P","NM",30)
SKNIJOT
^SCR("DLKH","P","NM",35)
STASHL
^SCR("DLKH","P","NM",40)
SITRA1
^SCR("DLKHO")
H
^SCR("DLKHO",1)
                        # zegewl g"ec #                                        
^SCR("DLKHO",2)
                 {10     } jix`z cr         {05     } jix`zn                   
^SCR("DLKHO",3)
             {13  : zegewl zveaw cr     {11  : zegewl zveawn                   
^SCR("DLKHO",4)
               {20        } gewl cr      {15        }  gewln                   
^SCR("DLKHO",5)
                                                                             1$
^SCR("DLKHO",6)
    :   dxzi  : minelyz :  zeipw  :   dxzi  :      gewl my     : gewl 'qn :    
^SCR("DLKHO",7)
    :  ziteq  :         :         :  zncew  :                  :          :    
^SCR("DLKHO",8)
                                                                               
^SCR("DLKHO",9)
                                                                               
^SCR("DLKHO",10)
                                                                               
^SCR("DLKHO",11)
                                                                               
^SCR("DLKHO",12)
                                                                               
^SCR("DLKHO",13)
                                                                               
^SCR("DLKHO",14)
                                                                               
^SCR("DLKHO",15)
                                                                               
^SCR("DLKHO",16)
                                                                               
^SCR("DLKHO",17)
                                                                               
^SCR("DLKHO",18)
                                                                               
^SCR("DLKHO",19)
                                                                               
^SCR("DLKHO",20)
                                                                               
^SCR("DLKHO",21)
  $1                                                                           
^SCR("DLKHO",22)
  {40      } {35      } {30      } {25      }: k"dq                            
^SCR("DLKHO","A",1)
š…‡…—Œ‡"…ƒ
^SCR("DLKHO","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("DLKHO","A",3)
:š…‡…—Œš–…�—ƒ’:š…‡…—Œš–…�—Ž
^SCR("DLKHO","A",4)
‡…—Œƒ’‡…—ŒŽ
^SCR("DLKHO","A",5)

^SCR("DLKHO","A",6)
„˜š‰�‰Ž…Œ™šš…‰�—„˜š‰‡…—Œ�™‡…—Œ'‘Ž
^SCR("DLKHO","A",7)
š‰”…‘šŽƒ…—
^SCR("DLKHO","A",8)
--------------------------------------------------------------------
^SCR("DLKHO","A",9)

^SCR("DLKHO","A",10)

^SCR("DLKHO","A",11)

^SCR("DLKHO","A",12)

^SCR("DLKHO","A",13)

^SCR("DLKHO","A",14)

^SCR("DLKHO","A",15)

^SCR("DLKHO","A",16)

^SCR("DLKHO","A",17)

^SCR("DLKHO","A",18)

^SCR("DLKHO","A",19)

^SCR("DLKHO","A",20)

^SCR("DLKHO","A",21)

^SCR("DLKHO","A",22)
:‹"„‘
^SCR("DLKHO","AV",1)
,ujuekj"us
^SCR("DLKHO","AV",2)
lhrt,sglhrt,n
^SCR("DLKHO","AV",3)
:,ujuek,mucesg:,ujuek,mucen
^SCR("DLKHO","AV",4)
jueksgjuekn
^SCR("DLKHO","AV",5)

^SCR("DLKHO","AV",6)
vr,hohnuka,,uhbevr,hjuekoajuekwxn
^SCR("DLKHO","AV",7)
,hpux,nsue
^SCR("DLKHO","AV",8)
--------------------------------------------------------------------
^SCR("DLKHO","AV",9)

^SCR("DLKHO","AV",10)

^SCR("DLKHO","AV",11)

^SCR("DLKHO","AV",12)

^SCR("DLKHO","AV",13)

^SCR("DLKHO","AV",14)

^SCR("DLKHO","AV",15)

^SCR("DLKHO","AV",16)

^SCR("DLKHO","AV",17)

^SCR("DLKHO","AV",18)

^SCR("DLKHO","AV",19)

^SCR("DLKHO","AV",20)

^SCR("DLKHO","AV",21)

^SCR("DLKHO","AV",22)
:f"vx
^SCR("DLKHO","G",1,"CRD")
7,74,E,10,0
^SCR("DLKHO","G",1,"HELP")
<F9> - hxetn g"ec bivdl 
^SCR("DLKHO","G",1,"LMAX")
10
^SCR("DLKHO","G",1,"MUMPS1")

^SCR("DLKHO","G",1,"MUMPS2")
D LKH^P1DLKH
^SCR("DLKHO","G",1,"SHEM")
 gewl 'qn 
^SCR("DLKHO","G",1,"TYP")
E
^SCR("DLKHO","G",2,"CRD")
7,63,H,18,0
^SCR("DLKHO","G",2,"HELP")

^SCR("DLKHO","G",2,"LMAX")
18
^SCR("DLKHO","G",2,"MUMPS1")

^SCR("DLKHO","G",2,"MUMPS2")

^SCR("DLKHO","G",2,"OUTPUT")

^SCR("DLKHO","G",2,"SHEM")
      gewl my     
^SCR("DLKHO","G",2,"TYP")
H
^SCR("DLKHO","G",3,"CRD")
7,44,N,9,2
^SCR("DLKHO","G",3,"HELP")

^SCR("DLKHO","G",3,"LMAX")
9
^SCR("DLKHO","G",3,"MUMPS1")

^SCR("DLKHO","G",3,"MUMPS2")

^SCR("DLKHO","G",3,"OUTPUT")

^SCR("DLKHO","G",3,"SHEM")
   dxzi  
^SCR("DLKHO","G",3,"TYP")
N
^SCR("DLKHO","G",4,"CRD")
7,34,N,9,2
^SCR("DLKHO","G",4,"HELP")

^SCR("DLKHO","G",4,"LMAX")
9
^SCR("DLKHO","G",4,"MUMPS1")

^SCR("DLKHO","G",4,"MUMPS2")

^SCR("DLKHO","G",4,"OUTPUT")

^SCR("DLKHO","G",4,"SHEM")
  zeipw  
^SCR("DLKHO","G",4,"TYP")
N
^SCR("DLKHO","G",5,"CRD")
7,24,N,9,2
^SCR("DLKHO","G",5,"HELP")

^SCR("DLKHO","G",5,"LMAX")
9
^SCR("DLKHO","G",5,"MUMPS1")

^SCR("DLKHO","G",5,"MUMPS2")

^SCR("DLKHO","G",5,"OUTPUT")

^SCR("DLKHO","G",5,"SHEM")
 minelyz 
^SCR("DLKHO","G",5,"TYP")
N
^SCR("DLKHO","G",6,"CRD")
7,14,N,9,2
^SCR("DLKHO","G",6,"HELP")

^SCR("DLKHO","G",6,"LMAX")
9
^SCR("DLKHO","G",6,"MUMPS1")

^SCR("DLKHO","G",6,"MUMPS2")

^SCR("DLKHO","G",6,"OUTPUT")

^SCR("DLKHO","G",6,"SHEM")
   dxzi  
^SCR("DLKHO","G",6,"TYP")
N
^SCR("DLKHO","G","DEL")

^SCR("DLKHO","G","MAX")
99999
^SCR("DLKHO","G","NAME","ITRA0")
3
^SCR("DLKHO","G","NAME","ITRA1")
6
^SCR("DLKHO","G","NAME","KNIJOT")
4
^SCR("DLKHO","G","NAME","LKH")
1
^SCR("DLKHO","G","NAME","LKH1")
2
^SCR("DLKHO","G","NAME","TASHL")
5
^SCR("DLKHO","G","NM",1)
LKH
^SCR("DLKHO","G","NM",2)
LKH1
^SCR("DLKHO","G","NM",3)
ITRA0
^SCR("DLKHO","G","NM",4)
KNIJOT
^SCR("DLKHO","G","NM",5)
TASHL
^SCR("DLKHO","G","NM",6)
ITRA1
^SCR("DLKHO","G","RB")
6,3,22,79
^SCR("DLKHO","G","REF")
^TEMP($P,"L"
^SCR("DLKHO","G","RZD")
\
^SCR("DLKHO","G","STEP")
1
^SCR("DLKHO","G","STG")
    :   dxzi  : minelyz :  zeipw  :   dxzi  :      gewl my     : gewl 'qn :    
^SCR("DLKHO","G","VG")
9
^SCR("DLKHO","NAME")
zegewl g"ec1
^SCR("DLKHO","P",5,"CRD")
2,44,D,8,0
^SCR("DLKHO","P",5,"HELP")

^SCR("DLKHO","P",5,"LMAX")
8
^SCR("DLKHO","P",5,"MUMPS1")
S:'$G(DAT11) DAT11=$$^%L1DC($H,1)
^SCR("DLKHO","P",5,"MUMPS2")

^SCR("DLKHO","P",5,"MUST")

^SCR("DLKHO","P",5,"TYP")
D
^SCR("DLKHO","P",10,"CRD")
2,17,D,8,0
^SCR("DLKHO","P",10,"HELP")

^SCR("DLKHO","P",10,"LMAX")
8
^SCR("DLKHO","P",10,"MUMPS1")
S:'$G(DAT12) DAT12=DAT11
^SCR("DLKHO","P",10,"MUMPS2")

^SCR("DLKHO","P",10,"MUST")

^SCR("DLKHO","P",10,"TYP")
D
^SCR("DLKHO","P",11,"CRD")
3,40,E,5,0
^SCR("DLKHO","P",11,"FNC")

^SCR("DLKHO","P",11,"GLOB")
SUGL
^SCR("DLKHO","P",11,"HELP")

^SCR("DLKHO","P",11,"LMAX")
5
^SCR("DLKHO","P",11,"MUMPS1")

^SCR("DLKHO","P",11,"MUMPS2")

^SCR("DLKHO","P",11,"NLN")
20
^SCR("DLKHO","P",11,"RZD")
\
^SCR("DLKHO","P",11,"TOPB")
8
^SCR("DLKHO","P",11,"TYP")
E
^SCR("DLKHO","P",13,"CRD")
3,13,E,5,0
^SCR("DLKHO","P",13,"FNC")

^SCR("DLKHO","P",13,"GLOB")
SUGL
^SCR("DLKHO","P",13,"HELP")

^SCR("DLKHO","P",13,"LMAX")
5
^SCR("DLKHO","P",13,"MUMPS1")
S:'$G(ADSUG) ADSUG=MESUG
^SCR("DLKHO","P",13,"MUMPS2")
I ADSUG<MESUG S %SC("ER")=1
^SCR("DLKHO","P",13,"NLN")
20
^SCR("DLKHO","P",13,"RZD")
\
^SCR("DLKHO","P",13,"TOPB")
8
^SCR("DLKHO","P",13,"TYP")
E
^SCR("DLKHO","P",15,"CRD")
4,41,E,11,0
^SCR("DLKHO","P",15,"FNC")

^SCR("DLKHO","P",15,"GLOB")
LKH
^SCR("DLKHO","P",15,"HELP")

^SCR("DLKHO","P",15,"LMAX")
11
^SCR("DLKHO","P",15,"MUMPS1")

^SCR("DLKHO","P",15,"MUMPS2")

^SCR("DLKHO","P",15,"NLN")
20
^SCR("DLKHO","P",15,"RZD")
\
^SCR("DLKHO","P",15,"TOPB")
8
^SCR("DLKHO","P",15,"TYP")
E
^SCR("DLKHO","P",20,"CRD")
4,15,E,11,0
^SCR("DLKHO","P",20,"FNC")

^SCR("DLKHO","P",20,"GLOB")
LKH
^SCR("DLKHO","P",20,"HELP")

^SCR("DLKHO","P",20,"LMAX")
11
^SCR("DLKHO","P",20,"MUMPS1")
S:'$G(LKH2) LKH2=LKH1
^SCR("DLKHO","P",20,"MUMPS2")

^SCR("DLKHO","P",20,"NLN")
20
^SCR("DLKHO","P",20,"RZD")
\
^SCR("DLKHO","P",20,"TOPB")
8
^SCR("DLKHO","P",20,"TYP")
E
^SCR("DLKHO","P",25,"CRD")
22,35,N,9,2
^SCR("DLKHO","P",25,"HELP")

^SCR("DLKHO","P",25,"LMAX")
9
^SCR("DLKHO","P",25,"MUMPS1")

^SCR("DLKHO","P",25,"MUMPS2")

^SCR("DLKHO","P",25,"OUTPUT")

^SCR("DLKHO","P",25,"TYP")
N
^SCR("DLKHO","P",30,"CRD")
22,24,N,9,2
^SCR("DLKHO","P",30,"HELP")

^SCR("DLKHO","P",30,"LMAX")
9
^SCR("DLKHO","P",30,"MUMPS1")

^SCR("DLKHO","P",30,"MUMPS2")

^SCR("DLKHO","P",30,"OUTPUT")

^SCR("DLKHO","P",30,"TYP")
N
^SCR("DLKHO","P",35,"CRD")
22,13,N,9,2
^SCR("DLKHO","P",35,"HELP")

^SCR("DLKHO","P",35,"LMAX")
9
^SCR("DLKHO","P",35,"MUMPS1")

^SCR("DLKHO","P",35,"MUMPS2")

^SCR("DLKHO","P",35,"OUTPUT")

^SCR("DLKHO","P",35,"TYP")
N
^SCR("DLKHO","P",40,"CRD")
22,2,N,9,2
^SCR("DLKHO","P",40,"HELP")

^SCR("DLKHO","P",40,"LMAX")
9
^SCR("DLKHO","P",40,"MUMPS1")

^SCR("DLKHO","P",40,"MUMPS2")

^SCR("DLKHO","P",40,"OUTPUT")

^SCR("DLKHO","P",40,"TYP")
N
^SCR("DLKHO","P","NAME","ADSUG")
13
^SCR("DLKHO","P","NAME","DAT11")
5
^SCR("DLKHO","P","NAME","DAT12")
10
^SCR("DLKHO","P","NAME","LKH1")
15
^SCR("DLKHO","P","NAME","LKH2")
20
^SCR("DLKHO","P","NAME","MESUG")
11
^SCR("DLKHO","P","NAME","SITRA0")
25
^SCR("DLKHO","P","NAME","SITRA1")
40
^SCR("DLKHO","P","NAME","SKNIJOT")
30
^SCR("DLKHO","P","NAME","STASHL")
35
^SCR("DLKHO","P","NM",5)
DAT11
^SCR("DLKHO","P","NM",10)
DAT12
^SCR("DLKHO","P","NM",11)
MESUG
^SCR("DLKHO","P","NM",13)
ADSUG
^SCR("DLKHO","P","NM",15)
LKH1
^SCR("DLKHO","P","NM",20)
LKH2
^SCR("DLKHO","P","NM",25)
SITRA0
^SCR("DLKHO","P","NM",30)
SKNIJOT
^SCR("DLKHO","P","NM",35)
STASHL
^SCR("DLKHO","P","NM",40)
SITRA1
^SCR("E1SETUP")
H
^SCR("E1SETUP",1)
                                                                               
^SCR("E1SETUP",2)
                   # qeaiq zkxrnl mixhnxt #                                    
^SCR("E1SETUP",3)
                                                                               
^SCR("E1SETUP",4)
                                                             1]                
^SCR("E1SETUP",5)
                                                                               
^SCR("E1SETUP",6)
                       {05            } :         hxy zaezk                    
^SCR("E1SETUP",7)
                                  {10 } :          uexr 'qn                    
^SCR("E1SETUP",8)
                                  {15 } : (zeipy) dpznd onf                    
^SCR("E1SETUP",9)
                                  {20 } :        dcrqn xtqn                    
^SCR("E1SETUP",10)
                                  {25 } :         dtew xtqn                    
^SCR("E1SETUP",11)
                                                                               
^SCR("E1SETUP",12)
                   [1                                                          
^SCR("E1SETUP",13)
                                                                               
^SCR("E1SETUP","A",1)

^SCR("E1SETUP","A",2)
‘…�‰‘š‹˜’ŽŒ�‰˜ˆŽ˜”
^SCR("E1SETUP","A",3)

^SCR("E1SETUP","A",4)

^SCR("E1SETUP","A",5)

^SCR("E1SETUP","A",6)
:ˆ˜™š�…š‹
^SCR("E1SETUP","A",7)
:•…˜’'‘Ž
^SCR("E1SETUP","A",8)
:(š…‰�™)„�šŽ„�Ž†
^SCR("E1SETUP","A",9)
:„ƒ’‘Ž˜”‘Ž
^SCR("E1SETUP","A",10)
:„”…—˜”‘Ž
^SCR("E1SETUP","A",11)

^SCR("E1SETUP","A",12)

^SCR("E1SETUP","A",13)

^SCR("E1SETUP","AV",1)

^SCR("E1SETUP","AV",2)
xuchx,frgnkohrynrp
^SCR("E1SETUP","AV",3)

^SCR("E1SETUP","AV",4)

^SCR("E1SETUP","AV",5)

^SCR("E1SETUP","AV",6)
:yra,cu,f
^SCR("E1SETUP","AV",7)
:•urgwxn
^SCR("E1SETUP","AV",8)
:(,uhba)vb,nvinz
^SCR("E1SETUP","AV",9)
:vsgxnrpxn
^SCR("E1SETUP","AV",10)
:vpuerpxn
^SCR("E1SETUP","AV",11)

^SCR("E1SETUP","AV",12)

^SCR("E1SETUP","AV",13)

^SCR("E1SETUP","NAME")
SETUP FOR E1
^SCR("E1SETUP","P",5,"CRD")
6,23,E,15,0
^SCR("E1SETUP","P",5,"HELP")

^SCR("E1SETUP","P",5,"LMAX")
15
^SCR("E1SETUP","P",5,"MUMPS1")

^SCR("E1SETUP","P",5,"MUMPS2")

^SCR("E1SETUP","P",5,"TYP")
E
^SCR("E1SETUP","P",10,"CRD")
7,34,N,4,0
^SCR("E1SETUP","P",10,"HELP")

^SCR("E1SETUP","P",10,"LMAX")
4
^SCR("E1SETUP","P",10,"MUMPS1")

^SCR("E1SETUP","P",10,"MUMPS2")

^SCR("E1SETUP","P",10,"TYP")
N
^SCR("E1SETUP","P",15,"CRD")
8,34,N,4,0
^SCR("E1SETUP","P",15,"HELP")

^SCR("E1SETUP","P",15,"LMAX")
4
^SCR("E1SETUP","P",15,"MUMPS1")

^SCR("E1SETUP","P",15,"MUMPS2")

^SCR("E1SETUP","P",15,"TYP")
N
^SCR("E1SETUP","P",20,"CRD")
9,34,N,4,0
^SCR("E1SETUP","P",20,"HELP")

^SCR("E1SETUP","P",20,"LMAX")
4
^SCR("E1SETUP","P",20,"MUMPS1")

^SCR("E1SETUP","P",20,"MUMPS2")

^SCR("E1SETUP","P",20,"MUST")

^SCR("E1SETUP","P",20,"TYP")
N
^SCR("E1SETUP","P",25,"CRD")
10,34,N,4,0
^SCR("E1SETUP","P",25,"HELP")

^SCR("E1SETUP","P",25,"LMAX")
4
^SCR("E1SETUP","P",25,"MUMPS1")

^SCR("E1SETUP","P",25,"MUMPS2")

^SCR("E1SETUP","P",25,"TYP")
N
^SCR("E1SETUP","P","NAME","IPA")
5
^SCR("E1SETUP","P","NAME","KUP")
25
^SCR("E1SETUP","P","NAME","PORT")
10
^SCR("E1SETUP","P","NAME","RSID")
20
^SCR("E1SETUP","P","NAME","TOUT")
15
^SCR("E1SETUP","P","NM",5)
IPA
^SCR("E1SETUP","P","NM",10)
PORT
^SCR("E1SETUP","P","NM",15)
TOUT
^SCR("E1SETUP","P","NM",20)
RSID
^SCR("E1SETUP","P","NM",25)
KUP
^SCR("E1SETUP","P","RB",1)
5,20,13,63
^SCR("ENDSET")
H
^SCR("ENDSET",1)
                        # xnbidl micnery mihixt hq  #                          
^SCR("ENDSET",2)
                                                                               
^SCR("ENDSET",3)
                               {                    10} {05 : hq 'qn           
^SCR("ENDSET",4)
                                                                   1$          
^SCR("ENDSET",5)
                         :         hixt xe`z       : hixt cew  :               
^SCR("ENDSET",6)
                                                                               
^SCR("ENDSET",7)
                                                                               
^SCR("ENDSET",8)
                                                                               
^SCR("ENDSET",9)
                                                                               
^SCR("ENDSET",10)
                                                                               
^SCR("ENDSET",11)
                                                                               
^SCR("ENDSET",12)
                                                                               
^SCR("ENDSET",13)
                                                                               
^SCR("ENDSET",14)
                                                                               
^SCR("ENDSET",15)
                                                                               
^SCR("ENDSET",16)
                                                                               
^SCR("ENDSET",17)
                                                                               
^SCR("ENDSET",18)
                                                                               
^SCR("ENDSET",19)
                                                                               
^SCR("ENDSET",20)
                                                                               
^SCR("ENDSET",21)
                     $1                                                        
^SCR("ENDSET","A",1)
˜Ž‚‰„Œ�‰ƒŽ…’™�‰ˆ‰˜”ˆ‘
^SCR("ENDSET","A",2)

^SCR("ENDSET","A",3)
:ˆ‘'‘Ž
^SCR("ENDSET","A",4)

^SCR("ENDSET","A",5)
ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("ENDSET","A",6)
------------------------------------
^SCR("ENDSET","A",7)

^SCR("ENDSET","A",8)

^SCR("ENDSET","A",9)

^SCR("ENDSET","A",10)

^SCR("ENDSET","A",11)

^SCR("ENDSET","A",12)

^SCR("ENDSET","A",13)

^SCR("ENDSET","A",14)

^SCR("ENDSET","A",15)

^SCR("ENDSET","A",16)

^SCR("ENDSET","A",17)

^SCR("ENDSET","A",18)

^SCR("ENDSET","A",19)

^SCR("ENDSET","A",20)

^SCR("ENDSET","A",21)

^SCR("ENDSET","AV",1)
rndhvkohsnugaohyhrpyx
^SCR("ENDSET","AV",2)

^SCR("ENDSET","AV",3)
:yxwxn
^SCR("ENDSET","AV",4)

^SCR("ENDSET","AV",5)
yhrprut,yhrpsue
^SCR("ENDSET","AV",6)
------------------------------------
^SCR("ENDSET","AV",7)

^SCR("ENDSET","AV",8)

^SCR("ENDSET","AV",9)

^SCR("ENDSET","AV",10)

^SCR("ENDSET","AV",11)

^SCR("ENDSET","AV",12)

^SCR("ENDSET","AV",13)

^SCR("ENDSET","AV",14)

^SCR("ENDSET","AV",15)

^SCR("ENDSET","AV",16)

^SCR("ENDSET","AV",17)

^SCR("ENDSET","AV",18)

^SCR("ENDSET","AV",19)

^SCR("ENDSET","AV",20)

^SCR("ENDSET","AV",21)

^SCR("ENDSET","G",1,"CHECK")
Y
^SCR("ENDSET","G",1,"CRD")
6,63,E,6,0
^SCR("ENDSET","G",1,"CREAT")

^SCR("ENDSET","G",1,"FNC")
F6,F7,F9
^SCR("ENDSET","G",1,"GLOB")
PAR
^SCR("ENDSET","G",1,"HELP")

^SCR("ENDSET","G",1,"LMAX")
11
^SCR("ENDSET","G",1,"MUMPS1")

^SCR("ENDSET","G",1,"MUMPS2")
D BDIKA^P1ENDSET
^SCR("ENDSET","G",1,"MUST")

^SCR("ENDSET","G",1,"NLN")
20
^SCR("ENDSET","G",1,"NS")
J
^SCR("ENDSET","G",1,"RZD")
**
^SCR("ENDSET","G",1,"SHEM")
 hixt cew  
^SCR("ENDSET","G",1,"TOPB")
8
^SCR("ENDSET","G",1,"TYP")
E
^SCR("ENDSET","G",1,"VRB")
PAR1
^SCR("ENDSET","G",2,"CRD")
6,51,H,25,0
^SCR("ENDSET","G",2,"HELP")

^SCR("ENDSET","G",2,"LMAX")
25
^SCR("ENDSET","G",2,"MUMPS1")

^SCR("ENDSET","G",2,"MUMPS2")

^SCR("ENDSET","G",2,"OUTPUT")

^SCR("ENDSET","G",2,"SHEM")
         hixt xe`z       
^SCR("ENDSET","G",2,"TYP")
H
^SCR("ENDSET","G","DEL")
Y
^SCR("ENDSET","G","MAX")
99999
^SCR("ENDSET","G","NAME","PAR")
1
^SCR("ENDSET","G","NAME","PAR1")
2
^SCR("ENDSET","G","NM",1)
PAR
^SCR("ENDSET","G","NM",2)
PAR1
^SCR("ENDSET","G","RB")
5,22,22,69
^SCR("ENDSET","G","REF")
^TEMP($P
^SCR("ENDSET","G","RZD")
\
^SCR("ENDSET","G","STEP")
1
^SCR("ENDSET","G","STG")
                         :         hixt xe`z       : hixt cew  :               
^SCR("ENDSET","G","VG")
7
^SCR("ENDSET","NAME")

^SCR("ENDSET","P",5,"CRD")
3,56,E,3,0
^SCR("ENDSET","P",5,"FNC")
F7
^SCR("ENDSET","P",5,"GLOB")
ENDSET
^SCR("ENDSET","P",5,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("ENDSET","P",5,"LMAX")
4
^SCR("ENDSET","P",5,"MUMPS1")

^SCR("ENDSET","P",5,"MUMPS2")
D GET^P1ENDSET
^SCR("ENDSET","P",5,"MUST")

^SCR("ENDSET","P",5,"NLN")
20
^SCR("ENDSET","P",5,"RZD")
\
^SCR("ENDSET","P",5,"TOPB")
8
^SCR("ENDSET","P",5,"TYP")
E
^SCR("ENDSET","P",5,"VRB")
NS1
^SCR("ENDSET","P",10,"CRD")
3,55,H,23
^SCR("ENDSET","P",10,"HELP")

^SCR("ENDSET","P",10,"LMAX")
23
^SCR("ENDSET","P",10,"MUMPS1")

^SCR("ENDSET","P",10,"MUMPS2")

^SCR("ENDSET","P",10,"TYP")
H
^SCR("ENDSET","P","NAME","NS")
5
^SCR("ENDSET","P","NAME","NS1")
10
^SCR("ENDSET","P","NM",5)
NS
^SCR("ENDSET","P","NM",10)
NS1
^SCR("FND")
E
^SCR("FND",1)
 DIRECTORY : {10                                         }
^SCR("FND",2)

^SCR("FND",3)
 BY NAME   : {15                         }
^SCR("FND",4)

^SCR("FND",5)
 BY SIZE   : {20            }
^SCR("FND",6)

^SCR("FND",7)
 COMMAND   : {25                                          }
^SCR("FND","AV",1)
DIRECTORY:
^SCR("FND","AV",2)

^SCR("FND","AV",3)
BYNAME:
^SCR("FND","AV",4)

^SCR("FND","AV",5)
BYSIZE:
^SCR("FND","AV",6)

^SCR("FND","AV",7)
COMMAND:
^SCR("FND","NAME")
FIND IN LINUX
^SCR("FND","P",10,"CRD")
1,13,E,44,0
^SCR("FND","P",10,"HELP")

^SCR("FND","P",10,"LMAX")
44
^SCR("FND","P",10,"MUMPS1")

^SCR("FND","P",10,"MUMPS2")

^SCR("FND","P",10,"TYP")
E
^SCR("FND","P",15,"CRD")
3,13,E,28,0
^SCR("FND","P",15,"HELP")

^SCR("FND","P",15,"LMAX")
28
^SCR("FND","P",15,"MUMPS1")

^SCR("FND","P",15,"MUMPS2")

^SCR("FND","P",15,"TYP")
E
^SCR("FND","P",20,"CRD")
5,13,E,15,0
^SCR("FND","P",20,"HELP")

^SCR("FND","P",20,"LMAX")
15
^SCR("FND","P",20,"MUMPS1")

^SCR("FND","P",20,"MUMPS2")

^SCR("FND","P",20,"TYP")
E
^SCR("FND","P",25,"CRD")
7,13,E,45,0
^SCR("FND","P",25,"HELP")

^SCR("FND","P",25,"LMAX")
45
^SCR("FND","P",25,"MUMPS1")

^SCR("FND","P",25,"MUMPS2")

^SCR("FND","P",25,"TYP")
E
^SCR("FND","P","NAME","DIR")
10
^SCR("FND","P","NAME","EXEC")
25
^SCR("FND","P","NAME","NAME")
15
^SCR("FND","P","NAME","SIZE")
20
^SCR("FND","P","NM",10)
DIR
^SCR("FND","P","NM",15)
NAME
^SCR("FND","P","NM",20)
SIZE
^SCR("FND","P","NM",25)
EXEC
^SCR("HSV")
H
^SCR("HSV",1)
                                                                               
^SCR("HSV",2)
                                  # zayayg ixhnxt #                            
^SCR("HSV",3)
                                                                               
^SCR("HSV",4)
                                                                     1]        
^SCR("HSV",5)
                 {10      }: zeneyz n"rn     {05     }: zeipw oeayg            
^SCR("HSV",6)
                 {20      }: ze`wqr n"rn     {15     }:zeqpkd oeayg            
^SCR("HSV",7)
                                   {22      } : xewn qn iekip oeayg            
^SCR("HSV",8)
                 {30      }:    dtew wiy     {25     }: dtew  onefn            
^SCR("HSV",9)
                 {33      }:   onefn wiy     {27     }:   dtew yelz            
^SCR("HSV",10)
                                             {34     }:       mitih            
^SCR("HSV",11)
                 {40      }:dxag hxk`xyi     {35     }: dtew hxk`xyi           
^SCR("HSV",12)
                 {50      }:dxag    dfie     {45     }: dtew   dfie            
^SCR("HSV",13)
                 {60      }:dxag  qxpiic     {55     }: dtew qxpiic            
^SCR("HSV",14)
                 {70      }:dxag  AM.EXP     {65     }: dtew AM.EXP            
^SCR("HSV",15)
                 {72      }:dxag     JCB     {71     }: dtew    JCB            
^SCR("HSV",16)
                 {74      }:dxag    `tl`     {73     }: dtew   `tl`            
^SCR("HSV",17)
                                                                               
^SCR("HSV",18)
                 {80       : dtew oeayg      {75      :   wpa oeayg            
^SCR("HSV",19)
                                                                               
^SCR("HSV",20)
                 {90                   }: MOVEIN.DAT uaew miyl okid            
^SCR("HSV",21)
                 {95 :3 - PRIORITY , 2 - 90 ,1 - 180 : zeniyx hnxet            
^SCR("HSV",22)
           [1                                                                  
^SCR("HSV","A",1)

^SCR("HSV","A",2)
š�™�™‡‰˜ˆŽ˜”
^SCR("HSV","A",3)

^SCR("HSV","A",4)

^SCR("HSV","A",5)
:š…Ž…™šŽ"’Ž:š…‰�—�…�™‡
^SCR("HSV","A",6)
:š…€—‘’Ž"’Ž:š…‘�‹„�…�™‡
^SCR("HSV","A",7)
:˜…—Ž‘Ž‰…‹‰��…�™‡
^SCR("HSV","A",8)
:„”…——‰™:„”…—�Ž…†Ž
^SCR("HSV","A",9)
:�Ž…†Ž—‰™:„”…—™…Œš
^SCR("HSV","A",10)
:�‰”‰ˆ
^SCR("HSV","A",11)
:„˜�‡ˆ˜‹€˜™‰:„”…—ˆ˜‹€˜™‰
^SCR("HSV","A",12)
:„˜�‡„†‰…:„”…—„†‰…
^SCR("HSV","A",13)
:„˜�‡‘˜�‰‰ƒ:„”…—‘˜�‰‰ƒ
^SCR("HSV","A",14)
:„˜�‡AM.EXP:„”…—AM.EXP
^SCR("HSV","A",15)
:„˜�‡JCB:„”…—JCB
^SCR("HSV","A",16)
:„˜�‡€”Œ€:„”…—€”Œ€
^SCR("HSV","A",17)

^SCR("HSV","A",18)
:„”…—�…�™‡:—���…�™‡
^SCR("HSV","A",19)

^SCR("HSV","A",20)
:MOVEIN.DAT•�…—�‰™Œ�‹‰„
^SCR("HSV","A",21)
:3-PRIORITY,2-90,1-180:š…Ž‰™˜ˆŽ˜…”
^SCR("HSV","A",22)

^SCR("HSV","AV",1)

^SCR("HSV","AV",2)
,cacajhrynrp
^SCR("HSV","AV",3)

^SCR("HSV","AV",4)

^SCR("HSV","AV",5)
:,unua,n"gn:,uhbeiucaj
^SCR("HSV","AV",6)
:,utexgn"gn:,uxbfviucaj
^SCR("HSV","AV",7)
:ruenxnhufhbiucaj
^SCR("HSV","AV",8)
:vpueeha:vpueinuzn
^SCR("HSV","AV",9)
:inuzneha:vpueauk,
^SCR("HSV","AV",10)
:ohphy
^SCR("HSV","AV",11)
:vrcjyrftrah:vpueyrftrah
^SCR("HSV","AV",12)
:vrcjvzhu:vpuevzhu
^SCR("HSV","AV",13)
:vrcjxrbhhs:vpuexrbhhs
^SCR("HSV","AV",14)
:vrcjAM/EXP:vpueAM/EXP
^SCR("HSV","AV",15)
:vrcjJCB:vpueJCB
^SCR("HSV","AV",16)
:vrcjtpkt:vpuetpkt
^SCR("HSV","AV",17)

^SCR("HSV","AV",18)
:vpueiucaj:ebciucaj
^SCR("HSV","AV",19)

^SCR("HSV","AV",20)
:MOVEIN/DAT•cueohakifhv
^SCR("HSV","AV",21)
:3-PRIORITY'2-90'1-180:,unharynrup
^SCR("HSV","AV",22)

^SCR("HSV","NAME")

^SCR("HSV","P",5,"CRD")
5,45,E,8,0
^SCR("HSV","P",5,"HELP")

^SCR("HSV","P",5,"LMAX")
8
^SCR("HSV","P",5,"MUMPS1")

^SCR("HSV","P",5,"MUMPS2")

^SCR("HSV","P",5,"TYP")
E
^SCR("HSV","P",10,"CRD")
5,17,E,8,0
^SCR("HSV","P",10,"HELP")

^SCR("HSV","P",10,"LMAX")
9
^SCR("HSV","P",10,"MUMPS1")

^SCR("HSV","P",10,"MUMPS2")

^SCR("HSV","P",10,"TYP")
E
^SCR("HSV","P",15,"CRD")
6,45,E,8,0
^SCR("HSV","P",15,"HELP")

^SCR("HSV","P",15,"LMAX")
8
^SCR("HSV","P",15,"MUMPS1")

^SCR("HSV","P",15,"MUMPS2")

^SCR("HSV","P",15,"TYP")
E
^SCR("HSV","P",20,"CRD")
6,17,E,8,0
^SCR("HSV","P",20,"HELP")

^SCR("HSV","P",20,"LMAX")
9
^SCR("HSV","P",20,"MUMPS1")

^SCR("HSV","P",20,"MUMPS2")

^SCR("HSV","P",20,"TYP")
E
^SCR("HSV","P",22,"CRD")
7,35,E,8,0
^SCR("HSV","P",22,"HELP")

^SCR("HSV","P",22,"LMAX")
9
^SCR("HSV","P",22,"MUMPS1")

^SCR("HSV","P",22,"MUMPS2")

^SCR("HSV","P",22,"TYP")
E
^SCR("HSV","P",25,"CRD")
8,45,E,8,0
^SCR("HSV","P",25,"HELP")

^SCR("HSV","P",25,"LMAX")
8
^SCR("HSV","P",25,"MUMPS1")

^SCR("HSV","P",25,"MUMPS2")

^SCR("HSV","P",25,"TYP")
E
^SCR("HSV","P",27,"CRD")
9,45,E,8,0
^SCR("HSV","P",27,"HELP")

^SCR("HSV","P",27,"LMAX")
8
^SCR("HSV","P",27,"MUMPS1")

^SCR("HSV","P",27,"MUMPS2")

^SCR("HSV","P",27,"TYP")
E
^SCR("HSV","P",30,"CRD")
8,17,E,8,0
^SCR("HSV","P",30,"HELP")

^SCR("HSV","P",30,"LMAX")
9
^SCR("HSV","P",30,"MUMPS1")

^SCR("HSV","P",30,"MUMPS2")

^SCR("HSV","P",30,"TYP")
E
^SCR("HSV","P",33,"CRD")
9,17,E,8,0
^SCR("HSV","P",33,"HELP")

^SCR("HSV","P",33,"LMAX")
9
^SCR("HSV","P",33,"MUMPS1")

^SCR("HSV","P",33,"MUMPS2")

^SCR("HSV","P",33,"TYP")
E
^SCR("HSV","P",34,"CRD")
10,45,E,8,0
^SCR("HSV","P",34,"HELP")

^SCR("HSV","P",34,"LMAX")
8
^SCR("HSV","P",34,"MUMPS1")

^SCR("HSV","P",34,"MUMPS2")

^SCR("HSV","P",34,"TYP")
E
^SCR("HSV","P",35,"CRD")
11,45,E,8,0
^SCR("HSV","P",35,"HELP")

^SCR("HSV","P",35,"LMAX")
8
^SCR("HSV","P",35,"MUMPS1")

^SCR("HSV","P",35,"MUMPS2")

^SCR("HSV","P",35,"TYP")
E
^SCR("HSV","P",40,"CRD")
11,17,E,8,0
^SCR("HSV","P",40,"HELP")

^SCR("HSV","P",40,"LMAX")
9
^SCR("HSV","P",40,"MUMPS1")

^SCR("HSV","P",40,"MUMPS2")

^SCR("HSV","P",40,"TYP")
E
^SCR("HSV","P",45,"CRD")
12,45,E,8,0
^SCR("HSV","P",45,"HELP")

^SCR("HSV","P",45,"LMAX")
8
^SCR("HSV","P",45,"MUMPS1")

^SCR("HSV","P",45,"MUMPS2")

^SCR("HSV","P",45,"TYP")
E
^SCR("HSV","P",50,"CRD")
12,17,E,8,0
^SCR("HSV","P",50,"HELP")

^SCR("HSV","P",50,"LMAX")
9
^SCR("HSV","P",50,"MUMPS1")

^SCR("HSV","P",50,"MUMPS2")

^SCR("HSV","P",50,"TYP")
E
^SCR("HSV","P",55,"CRD")
13,45,E,8,0
^SCR("HSV","P",55,"HELP")

^SCR("HSV","P",55,"LMAX")
8
^SCR("HSV","P",55,"MUMPS1")

^SCR("HSV","P",55,"MUMPS2")

^SCR("HSV","P",55,"TYP")
E
^SCR("HSV","P",60,"CRD")
13,17,E,8,0
^SCR("HSV","P",60,"HELP")

^SCR("HSV","P",60,"LMAX")
9
^SCR("HSV","P",60,"MUMPS1")

^SCR("HSV","P",60,"MUMPS2")

^SCR("HSV","P",60,"TYP")
E
^SCR("HSV","P",65,"CRD")
14,45,E,8,0
^SCR("HSV","P",65,"HELP")

^SCR("HSV","P",65,"LMAX")
8
^SCR("HSV","P",65,"MUMPS1")

^SCR("HSV","P",65,"MUMPS2")

^SCR("HSV","P",65,"TYP")
E
^SCR("HSV","P",70,"CRD")
14,17,E,8,0
^SCR("HSV","P",70,"HELP")

^SCR("HSV","P",70,"LMAX")
9
^SCR("HSV","P",70,"MUMPS1")

^SCR("HSV","P",70,"MUMPS2")

^SCR("HSV","P",70,"TYP")
E
^SCR("HSV","P",71,"CRD")
15,45,E,8,0
^SCR("HSV","P",71,"HELP")

^SCR("HSV","P",71,"LMAX")
8
^SCR("HSV","P",71,"MUMPS1")

^SCR("HSV","P",71,"MUMPS2")

^SCR("HSV","P",71,"TYP")
E
^SCR("HSV","P",72,"CRD")
15,17,E,8,0
^SCR("HSV","P",72,"HELP")

^SCR("HSV","P",72,"LMAX")
9
^SCR("HSV","P",72,"MUMPS1")

^SCR("HSV","P",72,"MUMPS2")

^SCR("HSV","P",72,"TYP")
E
^SCR("HSV","P",73,"CRD")
16,45,E,8,0
^SCR("HSV","P",73,"HELP")

^SCR("HSV","P",73,"LMAX")
8
^SCR("HSV","P",73,"MUMPS1")

^SCR("HSV","P",73,"MUMPS2")

^SCR("HSV","P",73,"TYP")
E
^SCR("HSV","P",74,"CRD")
16,17,E,8,0
^SCR("HSV","P",74,"HELP")

^SCR("HSV","P",74,"LMAX")
9
^SCR("HSV","P",74,"MUMPS1")

^SCR("HSV","P",74,"MUMPS2")

^SCR("HSV","P",74,"TYP")
E
^SCR("HSV","P",75,"CRD")
18,45,E,8,0
^SCR("HSV","P",75,"HELP")

^SCR("HSV","P",75,"LMAX")
9
^SCR("HSV","P",75,"MUMPS1")

^SCR("HSV","P",75,"MUMPS2")

^SCR("HSV","P",75,"TYP")
E
^SCR("HSV","P",80,"CRD")
18,17,E,8,0
^SCR("HSV","P",80,"HELP")

^SCR("HSV","P",80,"LMAX")
10
^SCR("HSV","P",80,"MUMPS1")

^SCR("HSV","P",80,"MUMPS2")

^SCR("HSV","P",80,"TYP")
E
^SCR("HSV","P",90,"CRD")
20,17,E,22,0
^SCR("HSV","P",90,"HELP")

^SCR("HSV","P",90,"LMAX")
22
^SCR("HSV","P",90,"MUMPS1")

^SCR("HSV","P",90,"MUMPS2")

^SCR("HSV","P",90,"TYP")
E
^SCR("HSV","P",95,"CRD")
21,17,N,4,0
^SCR("HSV","P",95,"HELP")

^SCR("HSV","P",95,"LMAX")
4
^SCR("HSV","P",95,"MUMPS1")

^SCR("HSV","P",95,"MUMPS2")
I %S<1,%S>3 S %SC("ER")=1
^SCR("HSV","P",95,"MUST")

^SCR("HSV","P",95,"TYP")
N
^SCR("HSV","P","NAME","ALPHA")
74
^SCR("HSV","P","NAME","ALPHAK")
73
^SCR("HSV","P","NAME","AMEXP")
70
^SCR("HSV","P","NAME","AMEXPK")
65
^SCR("HSV","P","NAME","BANK")
75
^SCR("HSV","P","NAME","CHKK")
30
^SCR("HSV","P","NAME","CHKKM")
33
^SCR("HSV","P","NAME","DINERS")
60
^SCR("HSV","P","NAME","DINERSK")
55
^SCR("HSV","P","NAME","FORMAT")
95
^SCR("HSV","P","NAME","HKNIJOT")
5
^SCR("HSV","P","NAME","HMHIROT")
15
^SCR("HSV","P","NAME","HNKMM")
22
^SCR("HSV","P","NAME","ISR")
40
^SCR("HSV","P","NAME","ISRK")
35
^SCR("HSV","P","NAME","JCB")
72
^SCR("HSV","P","NAME","JCBK")
71
^SCR("HSV","P","NAME","KUPA")
80
^SCR("HSV","P","NAME","MAMI")
20
^SCR("HSV","P","NAME","MAMT")
10
^SCR("HSV","P","NAME","MZMK")
25
^SCR("HSV","P","NAME","PATH")
90
^SCR("HSV","P","NAME","TIP")
34
^SCR("HSV","P","NAME","VISA")
50
^SCR("HSV","P","NAME","VISAK")
45
^SCR("HSV","P","NAME","ZK")
27
^SCR("HSV","P","NM",5)
HKNIJOT
^SCR("HSV","P","NM",10)
MAMT
^SCR("HSV","P","NM",15)
HMHIROT
^SCR("HSV","P","NM",20)
MAMI
^SCR("HSV","P","NM",22)
HNKMM
^SCR("HSV","P","NM",25)
MZMK
^SCR("HSV","P","NM",27)
ZK
^SCR("HSV","P","NM",30)
CHKK
^SCR("HSV","P","NM",33)
CHKKM
^SCR("HSV","P","NM",34)
TIP
^SCR("HSV","P","NM",35)
ISRK
^SCR("HSV","P","NM",40)
ISR
^SCR("HSV","P","NM",45)
VISAK
^SCR("HSV","P","NM",50)
VISA
^SCR("HSV","P","NM",55)
DINERSK
^SCR("HSV","P","NM",60)
DINERS
^SCR("HSV","P","NM",65)
AMEXPK
^SCR("HSV","P","NM",70)
AMEXP
^SCR("HSV","P","NM",71)
JCBK
^SCR("HSV","P","NM",72)
JCB
^SCR("HSV","P","NM",73)
ALPHAK
^SCR("HSV","P","NM",74)
ALPHA
^SCR("HSV","P","NM",75)
BANK
^SCR("HSV","P","NM",80)
KUPA
^SCR("HSV","P","NM",90)
PATH
^SCR("HSV","P","NM",95)
FORMAT
^SCR("HSV","P","RB",1)
5,12,23,71
^SCR("HSV1")
H
^SCR("HSV1",1)
                           # zayaygl zerepz ibeq #                             
^SCR("HSV1",2)
                                                            1]                
^SCR("HSV1",3)
                   { 05}:           dlaw/qn 'aygl drepz beq                    
^SCR("HSV1",4)
                   { 10}:       gewll qn zipeaygl drepz beq                    
^SCR("HSV1",5)
                   { 15}:         gewln sqk zlawl drepz beq                    
^SCR("HSV1",6)
                   { 20}:        wtqn qn zipeaygl drepz beq                    
^SCR("HSV1",7)
                   { 22}:nrn `ll wtqn qn zipeaygl drepz beq                    
^SCR("HSV1",8)
                   { 25}:             wtql melyzl drepz beq                    
^SCR("HSV1",9)
                   { 30}:            onefn zcwtdl drepz beq                    
^SCR("HSV1",10)
                   { 32}:            mitih zcwtdl drepz beq                    
^SCR("HSV1",11)
                   { 35}:              wiy zcwtdl drepz beq                    
^SCR("HSV1",12)
                   { 40}:     ipci hxk`xyi zcwtdl drepz beq                    
^SCR("HSV1",13)
                   { 45}:        ipci dfie zcwtdl drepz beq                    
^SCR("HSV1",14)
                   { 50}:      ipci qxpiic zcwtdl drepz beq                    
^SCR("HSV1",15)
                   { 55}:      ipci qw`.n` zcwtdl drepz beq                    
^SCR("HSV1",16)
                   { 58}:        ipci `tl` zcwtdl drepz beq                    
^SCR("HSV1",17)
                   { 60}:    (`ay) hxk`xyi zcwtdl drepz beq                    
^SCR("HSV1",18)
                   { 65}:     (`ay)   dfie zcwtdl drepz beq                    
^SCR("HSV1",19)
                   { 70}:     (`ay) qxpiic zcwtdl drepz beq                    
^SCR("HSV1",20)
                   { 75}:     (`ay) qw`.n` zcwtdl drepz beq                    
^SCR("HSV1",21)
                   { 78}:     (`ay)   `lt` zcwtdl drepz beq                    
^SCR("HSV1",22)
                [1                                                             
^SCR("HSV1",23)
                                                                               
^SCR("HSV1","A",1)
š�™�™‡Œš…’…�š‰‚…‘
^SCR("HSV1","A",2)

^SCR("HSV1","A",3)
:„Œ�—/‘Ž'�™‡Œ„’…�š‚…‘
^SCR("HSV1","A",4)
:‡…—ŒŒ‘Žš‰�…�™‡Œ„’…�š‚…‘
^SCR("HSV1","A",5)
:‡…—ŒŽ“‘‹šŒ�—Œ„’…�š‚…‘
^SCR("HSV1","A",6)
:—”‘Ž‘Žš‰�…�™‡Œ„’…�š‚…‘
^SCR("HSV1","A",7)
:Ž’Ž€ŒŒ—”‘Ž‘Žš‰�…�™‡Œ„’…�š‚…‘
^SCR("HSV1","A",8)
:—”‘Œ�…Œ™šŒ„’…�š‚…‘
^SCR("HSV1","A",9)
:�Ž…†Žšƒ—”„Œ„’…�š‚…‘
^SCR("HSV1","A",10)
:�‰”‰ˆšƒ—”„Œ„’…�š‚…‘
^SCR("HSV1","A",11)
:—‰™šƒ—”„Œ„’…�š‚…‘
^SCR("HSV1","A",12)
:‰�ƒ‰ˆ˜‹€˜™‰šƒ—”„Œ„’…�š‚…‘
^SCR("HSV1","A",13)
:‰�ƒ‰„†‰…šƒ—”„Œ„’…�š‚…‘
^SCR("HSV1","A",14)
:‰�ƒ‰‘˜�‰‰ƒšƒ—”„Œ„’…�š‚…‘
^SCR("HSV1","A",15)
:‰�ƒ‰‘—€.Ž€šƒ—”„Œ„’…�š‚…‘
^SCR("HSV1","A",16)
:‰�ƒ‰€”Œ€šƒ—”„Œ„’…�š‚…‘
^SCR("HSV1","A",17)
:(€�™)ˆ˜‹€˜™‰šƒ—”„Œ„’…�š‚…‘
^SCR("HSV1","A",18)
:(€�™)„†‰…šƒ—”„Œ„’…�š‚…‘
^SCR("HSV1","A",19)
:(€�™)‘˜�‰‰ƒšƒ—”„Œ„’…�š‚…‘
^SCR("HSV1","A",20)
:(€�™)‘—€.Ž€šƒ—”„Œ„’…�š‚…‘
^SCR("HSV1","A",21)
:(€�™)€Œ”€šƒ—”„Œ„’…�š‚…‘
^SCR("HSV1","A",22)

^SCR("HSV1","A",23)

^SCR("HSV1","AV",1)
,cacajk,ugub,hdux
^SCR("HSV1","AV",2)

^SCR("HSV1","AV",3)
:vkceqxnwcajkvgub,dux
^SCR("HSV1","AV",4)
:juekkxn,hbucajkvgub,dux
^SCR("HSV1","AV",5)
:juekn;xf,kcekvgub,dux
^SCR("HSV1","AV",6)
:epxnxn,hbucajkvgub,dux
^SCR("HSV1","AV",7)
:ngntkkepxnxn,hbucajkvgub,dux
^SCR("HSV1","AV",8)
:epxkouka,kvgub,dux
^SCR("HSV1","AV",9)
:inuzn,sepvkvgub,dux
^SCR("HSV1","AV",10)
:ohphy,sepvkvgub,dux
^SCR("HSV1","AV",11)
:eha,sepvkvgub,dux
^SCR("HSV1","AV",12)
:hbshyrftrah,sepvkvgub,dux
^SCR("HSV1","AV",13)
:hbshvzhu,sepvkvgub,dux
^SCR("HSV1","AV",14)
:hbshxrbhhs,sepvkvgub,dux
^SCR("HSV1","AV",15)
:hbshxet/nt,sepvkvgub,dux
^SCR("HSV1","AV",16)
:hbshtpkt,sepvkvgub,dux
^SCR("HSV1","AV",17)
:(tca)yrftrah,sepvkvgub,dux
^SCR("HSV1","AV",18)
:(tca)vzhu,sepvkvgub,dux
^SCR("HSV1","AV",19)
:(tca)xrbhhs,sepvkvgub,dux
^SCR("HSV1","AV",20)
:(tca)xet/nt,sepvkvgub,dux
^SCR("HSV1","AV",21)
:(tca)tkpt,sepvkvgub,dux
^SCR("HSV1","AV",22)

^SCR("HSV1","AV",23)

^SCR("HSV1","NAME")
zayaygl zerepz
^SCR("HSV1","P",5,"CRD")
3,24,H,3
^SCR("HSV1","P",5,"HELP")

^SCR("HSV1","P",5,"LMAX")
4
^SCR("HSV1","P",5,"MUMPS1")

^SCR("HSV1","P",5,"MUMPS2")

^SCR("HSV1","P",5,"TYP")
H
^SCR("HSV1","P",10,"CRD")
4,24,H,3
^SCR("HSV1","P",10,"HELP")

^SCR("HSV1","P",10,"LMAX")
4
^SCR("HSV1","P",10,"MUMPS1")

^SCR("HSV1","P",10,"MUMPS2")

^SCR("HSV1","P",10,"TYP")
H
^SCR("HSV1","P",15,"CRD")
5,24,H,3
^SCR("HSV1","P",15,"HELP")

^SCR("HSV1","P",15,"LMAX")
4
^SCR("HSV1","P",15,"MUMPS1")

^SCR("HSV1","P",15,"MUMPS2")

^SCR("HSV1","P",15,"TYP")
H
^SCR("HSV1","P",20,"CRD")
6,24,H,3
^SCR("HSV1","P",20,"HELP")

^SCR("HSV1","P",20,"LMAX")
4
^SCR("HSV1","P",20,"MUMPS1")

^SCR("HSV1","P",20,"MUMPS2")

^SCR("HSV1","P",20,"TYP")
H
^SCR("HSV1","P",22,"CRD")
7,24,H,3
^SCR("HSV1","P",22,"HELP")

^SCR("HSV1","P",22,"LMAX")
4
^SCR("HSV1","P",22,"MUMPS1")

^SCR("HSV1","P",22,"MUMPS2")

^SCR("HSV1","P",22,"TYP")
H
^SCR("HSV1","P",25,"CRD")
8,24,H,3
^SCR("HSV1","P",25,"HELP")

^SCR("HSV1","P",25,"LMAX")
4
^SCR("HSV1","P",25,"MUMPS1")

^SCR("HSV1","P",25,"MUMPS2")

^SCR("HSV1","P",25,"TYP")
H
^SCR("HSV1","P",30,"CRD")
9,24,H,3,0
^SCR("HSV1","P",30,"HELP")

^SCR("HSV1","P",30,"LMAX")
4
^SCR("HSV1","P",30,"MUMPS1")

^SCR("HSV1","P",30,"MUMPS2")

^SCR("HSV1","P",30,"TYP")
H
^SCR("HSV1","P",32,"CRD")
10,24,H,3,0
^SCR("HSV1","P",32,"HELP")

^SCR("HSV1","P",32,"LMAX")
4
^SCR("HSV1","P",32,"MUMPS1")

^SCR("HSV1","P",32,"MUMPS2")

^SCR("HSV1","P",32,"TYP")
H
^SCR("HSV1","P",35,"CRD")
11,24,H,3
^SCR("HSV1","P",35,"HELP")

^SCR("HSV1","P",35,"LMAX")
4
^SCR("HSV1","P",35,"MUMPS1")

^SCR("HSV1","P",35,"MUMPS2")

^SCR("HSV1","P",35,"TYP")
H
^SCR("HSV1","P",40,"CRD")
12,24,H,3
^SCR("HSV1","P",40,"HELP")

^SCR("HSV1","P",40,"LMAX")
4
^SCR("HSV1","P",40,"MUMPS1")

^SCR("HSV1","P",40,"MUMPS2")

^SCR("HSV1","P",40,"TYP")
H
^SCR("HSV1","P",45,"CRD")
13,24,H,3
^SCR("HSV1","P",45,"HELP")

^SCR("HSV1","P",45,"LMAX")
4
^SCR("HSV1","P",45,"MUMPS1")

^SCR("HSV1","P",45,"MUMPS2")

^SCR("HSV1","P",45,"TYP")
H
^SCR("HSV1","P",50,"CRD")
14,24,H,3
^SCR("HSV1","P",50,"HELP")

^SCR("HSV1","P",50,"LMAX")
4
^SCR("HSV1","P",50,"MUMPS1")

^SCR("HSV1","P",50,"MUMPS2")

^SCR("HSV1","P",50,"TYP")
H
^SCR("HSV1","P",55,"CRD")
15,24,H,3
^SCR("HSV1","P",55,"HELP")

^SCR("HSV1","P",55,"LMAX")
4
^SCR("HSV1","P",55,"MUMPS1")

^SCR("HSV1","P",55,"MUMPS2")

^SCR("HSV1","P",55,"TYP")
H
^SCR("HSV1","P",58,"CRD")
16,24,H,3
^SCR("HSV1","P",58,"HELP")

^SCR("HSV1","P",58,"LMAX")
4
^SCR("HSV1","P",58,"MUMPS1")

^SCR("HSV1","P",58,"MUMPS2")

^SCR("HSV1","P",58,"TYP")
H
^SCR("HSV1","P",60,"CRD")
17,24,H,3
^SCR("HSV1","P",60,"HELP")

^SCR("HSV1","P",60,"LMAX")
4
^SCR("HSV1","P",60,"MUMPS1")

^SCR("HSV1","P",60,"MUMPS2")

^SCR("HSV1","P",60,"TYP")
H
^SCR("HSV1","P",65,"CRD")
18,24,H,3
^SCR("HSV1","P",65,"HELP")

^SCR("HSV1","P",65,"LMAX")
4
^SCR("HSV1","P",65,"MUMPS1")

^SCR("HSV1","P",65,"MUMPS2")

^SCR("HSV1","P",65,"TYP")
H
^SCR("HSV1","P",70,"CRD")
19,24,H,3
^SCR("HSV1","P",70,"HELP")

^SCR("HSV1","P",70,"LMAX")
4
^SCR("HSV1","P",70,"MUMPS1")

^SCR("HSV1","P",70,"MUMPS2")

^SCR("HSV1","P",70,"TYP")
H
^SCR("HSV1","P",75,"CRD")
20,24,H,3
^SCR("HSV1","P",75,"HELP")

^SCR("HSV1","P",75,"LMAX")
4
^SCR("HSV1","P",75,"MUMPS1")

^SCR("HSV1","P",75,"MUMPS2")

^SCR("HSV1","P",75,"TYP")
H
^SCR("HSV1","P",78,"CRD")
21,24,H,3
^SCR("HSV1","P",78,"HELP")

^SCR("HSV1","P",78,"LMAX")
4
^SCR("HSV1","P",78,"MUMPS1")

^SCR("HSV1","P",78,"MUMPS2")

^SCR("HSV1","P",78,"TYP")
H
^SCR("HSV1","P","NAME","CB")
15
^SCR("HSV1","P","NAME","HFAEA")
75
^SCR("HSV1","P","NAME","HFAEJ")
55
^SCR("HSV1","P","NAME","HFALA")
78
^SCR("HSV1","P","NAME","HFALJ")
58
^SCR("HSV1","P","NAME","HFCH")
35
^SCR("HSV1","P","NAME","HFDA")
70
^SCR("HSV1","P","NAME","HFDJ")
50
^SCR("HSV1","P","NAME","HFIA")
60
^SCR("HSV1","P","NAME","HFIJ")
40
^SCR("HSV1","P","NAME","HFMZ")
30
^SCR("HSV1","P","NAME","HFTP")
32
^SCR("HSV1","P","NAME","HFVA")
65
^SCR("HSV1","P","NAME","HFVJ")
45
^SCR("HSV1","P","NAME","HMK")
5
^SCR("HSV1","P","NAME","HML")
10
^SCR("HSV1","P","NAME","HMS")
20
^SCR("HSV1","P","NAME","HMSB")
22
^SCR("HSV1","P","NAME","TSH")
25
^SCR("HSV1","P","NM",5)
HMK
^SCR("HSV1","P","NM",10)
HML
^SCR("HSV1","P","NM",15)
CB
^SCR("HSV1","P","NM",20)
HMS
^SCR("HSV1","P","NM",22)
HMSB
^SCR("HSV1","P","NM",25)
TSH
^SCR("HSV1","P","NM",30)
HFMZ
^SCR("HSV1","P","NM",32)
HFTP
^SCR("HSV1","P","NM",35)
HFCH
^SCR("HSV1","P","NM",40)
HFIJ
^SCR("HSV1","P","NM",45)
HFVJ
^SCR("HSV1","P","NM",50)
HFDJ
^SCR("HSV1","P","NM",55)
HFAEJ
^SCR("HSV1","P","NM",58)
HFALJ
^SCR("HSV1","P","NM",60)
HFIA
^SCR("HSV1","P","NM",65)
HFVA
^SCR("HSV1","P","NM",70)
HFDA
^SCR("HSV1","P","NM",75)
HFAEA
^SCR("HSV1","P","NM",78)
HFALA
^SCR("HSV1","P","RB",1)
3,17,23,62
^SCR("HSV2")
H
^SCR("HSV2",1)
                                                                               
^SCR("HSV2",2)
                                                                    1]         
^SCR("HSV2",3)
                    {05 } (0-`l ,1-ok) dlaw/qn zeipeayg xiardl m`d             
^SCR("HSV2",4)
                    {10 } (0-`l ,1-ok)      wpal zecwtd xiardl m`d             
^SCR("HSV2",5)
                    {15 } (0-`l ,1-ok)    i`ln zeipeayg xiardl m`d             
^SCR("HSV2",6)
                    {20 } (0-`l ,1-ok)    'dtew' oeayga ynzydl m`d             
^SCR("HSV2",7)
               [1                                                              
^SCR("HSV2","A",1)

^SCR("HSV2","A",2)

^SCR("HSV2","A",3)
(0-€Œ,1-�‹)„Œ�—/‘Žš…‰�…�™‡˜‰�’„Œ�€„
^SCR("HSV2","A",4)
(0-€Œ,1-�‹)—��Œš…ƒ—”„˜‰�’„Œ�€„
^SCR("HSV2","A",5)
(0-€Œ,1-�‹)‰€ŒŽš…‰�…�™‡˜‰�’„Œ�€„
^SCR("HSV2","A",6)
(0-€Œ,1-�‹)'„”…—'�…�™‡�™Žš™„Œ�€„
^SCR("HSV2","A",7)

^SCR("HSV2","AV",1)

^SCR("HSV2","AV",2)

^SCR("HSV2","AV",3)
(0-tk'1-if)vkceqxn,uhbucajrhcgvkotv
^SCR("HSV2","AV",4)
(0-tk'1-if)ebck,usepvrhcgvkotv
^SCR("HSV2","AV",5)
(0-tk'1-if)htkn,uhbucajrhcgvkotv
^SCR("HSV2","AV",6)
(0-tk'1-if)wvpuewiucajcan,avkotv
^SCR("HSV2","AV",7)

^SCR("HSV2","NAME")
(3) zayaygl dxard mixhnxt
^SCR("HSV2","P",5,"CRD")
3,20,N,1,0
^SCR("HSV2","P",5,"HELP")

^SCR("HSV2","P",5,"LMAX")
4
^SCR("HSV2","P",5,"MUMPS1")

^SCR("HSV2","P",5,"MUMPS2")
D ^%L1BDO
^SCR("HSV2","P",5,"MUST")

^SCR("HSV2","P",5,"TYP")
N
^SCR("HSV2","P",10,"CRD")
4,20,N,1,0
^SCR("HSV2","P",10,"HELP")

^SCR("HSV2","P",10,"LMAX")
4
^SCR("HSV2","P",10,"MUMPS1")

^SCR("HSV2","P",10,"MUMPS2")
D ^%L1BDO
^SCR("HSV2","P",10,"MUST")

^SCR("HSV2","P",10,"TYP")
N
^SCR("HSV2","P",15,"CRD")
5,20,N,1,0
^SCR("HSV2","P",15,"HELP")

^SCR("HSV2","P",15,"LMAX")
4
^SCR("HSV2","P",15,"MUMPS1")

^SCR("HSV2","P",15,"MUMPS2")
D ^%L1BDO
^SCR("HSV2","P",15,"MUST")

^SCR("HSV2","P",15,"TYP")
N
^SCR("HSV2","P",20,"CRD")
6,20,N,1,0
^SCR("HSV2","P",20,"HELP")

^SCR("HSV2","P",20,"LMAX")
4
^SCR("HSV2","P",20,"MUMPS1")

^SCR("HSV2","P",20,"MUMPS2")
D ^%L1BDO
^SCR("HSV2","P",20,"MUST")

^SCR("HSV2","P",20,"TYP")
N
^SCR("HSV2","P","NAME","KPH")
20
^SCR("HSV2","P","NAME","NOHFK")
10
^SCR("HSV2","P","NAME","NOHMK")
5
^SCR("HSV2","P","NAME","NOMLY")
15
^SCR("HSV2","P","NM",5)
NOHMK
^SCR("HSV2","P","NM",10)
NOHFK
^SCR("HSV2","P","NM",15)
NOMLY
^SCR("HSV2","P","NM",20)
KPH
^SCR("HSV2","P","RB",1)
3,16,8,70
^SCR("HSVMTB")
H
^SCR("HSVMTB",1)
                              # g"hnl zepeayg 'qn #                            
^SCR("HSVMTB",2)
                                                                  1$           
^SCR("HSVMTB",3)
                        : oeayg 'qn  :   rahn my   : drahn cew :               
^SCR("HSVMTB",4)
                                                                               
^SCR("HSVMTB",5)
                                                                               
^SCR("HSVMTB",6)
                                                                               
^SCR("HSVMTB",7)
                                                                               
^SCR("HSVMTB",8)
                                                                               
^SCR("HSVMTB",9)
                                                                               
^SCR("HSVMTB",10)
                                                                               
^SCR("HSVMTB",11)
                                                                               
^SCR("HSVMTB",12)
                                                                               
^SCR("HSVMTB",13)
                                                                               
^SCR("HSVMTB",14)
                                                                               
^SCR("HSVMTB",15)
                                                                               
^SCR("HSVMTB",16)
                                                                               
^SCR("HSVMTB",17)
                                                                               
^SCR("HSVMTB",18)
                                                                               
^SCR("HSVMTB",19)
                                                                               
^SCR("HSVMTB",20)
                                                                               
^SCR("HSVMTB",21)
                                                                               
^SCR("HSVMTB",22)
                   $1                                                          
^SCR("HSVMTB","A",1)
‡"ˆŽŒš…�…�™‡'‘Ž
^SCR("HSVMTB","A",2)

^SCR("HSVMTB","A",3)
�…�™‡'‘Ž’�ˆŽ�™„’�ˆŽƒ…—
^SCR("HSVMTB","A",4)
------------------------------------
^SCR("HSVMTB","A",5)

^SCR("HSVMTB","A",6)

^SCR("HSVMTB","A",7)

^SCR("HSVMTB","A",8)

^SCR("HSVMTB","A",9)

^SCR("HSVMTB","A",10)

^SCR("HSVMTB","A",11)

^SCR("HSVMTB","A",12)

^SCR("HSVMTB","A",13)

^SCR("HSVMTB","A",14)

^SCR("HSVMTB","A",15)

^SCR("HSVMTB","A",16)

^SCR("HSVMTB","A",17)

^SCR("HSVMTB","A",18)

^SCR("HSVMTB","A",19)

^SCR("HSVMTB","A",20)

^SCR("HSVMTB","A",21)

^SCR("HSVMTB","A",22)

^SCR("HSVMTB","AV",1)
j"ynk,ubucajwxn
^SCR("HSVMTB","AV",2)

^SCR("HSVMTB","AV",3)
iucajwxngcynoavgcynsue
^SCR("HSVMTB","AV",4)
------------------------------------
^SCR("HSVMTB","AV",5)

^SCR("HSVMTB","AV",6)

^SCR("HSVMTB","AV",7)

^SCR("HSVMTB","AV",8)

^SCR("HSVMTB","AV",9)

^SCR("HSVMTB","AV",10)

^SCR("HSVMTB","AV",11)

^SCR("HSVMTB","AV",12)

^SCR("HSVMTB","AV",13)

^SCR("HSVMTB","AV",14)

^SCR("HSVMTB","AV",15)

^SCR("HSVMTB","AV",16)

^SCR("HSVMTB","AV",17)

^SCR("HSVMTB","AV",18)

^SCR("HSVMTB","AV",19)

^SCR("HSVMTB","AV",20)

^SCR("HSVMTB","AV",21)

^SCR("HSVMTB","AV",22)

^SCR("HSVMTB","G",1,"CRD")
4,63,E,11,0
^SCR("HSVMTB","G",1,"HELP")

^SCR("HSVMTB","G",1,"LMAX")
11
^SCR("HSVMTB","G",1,"MUMPS1")

^SCR("HSVMTB","G",1,"MUMPS2")

^SCR("HSVMTB","G",1,"OUTPUT")

^SCR("HSVMTB","G",1,"SHEM")
 drahn cew 
^SCR("HSVMTB","G",1,"TYP")
E
^SCR("HSVMTB","G",2,"CRD")
4,51,H,13,0
^SCR("HSVMTB","G",2,"HELP")

^SCR("HSVMTB","G",2,"LMAX")
13
^SCR("HSVMTB","G",2,"MUMPS1")

^SCR("HSVMTB","G",2,"MUMPS2")

^SCR("HSVMTB","G",2,"OUTPUT")

^SCR("HSVMTB","G",2,"SHEM")
   rahn my   
^SCR("HSVMTB","G",2,"TYP")
H
^SCR("HSVMTB","G",3,"CRD")
4,37,E,12,0
^SCR("HSVMTB","G",3,"HELP")

^SCR("HSVMTB","G",3,"LMAX")
12
^SCR("HSVMTB","G",3,"MUMPS1")

^SCR("HSVMTB","G",3,"MUMPS2")

^SCR("HSVMTB","G",3,"MUST")

^SCR("HSVMTB","G",3,"SHEM")
 oeayg 'qn  
^SCR("HSVMTB","G",3,"TYP")
E
^SCR("HSVMTB","G","MAX")
3
^SCR("HSVMTB","G","NAME","HSBMTB")
3
^SCR("HSVMTB","G","NAME","MTB")
1
^SCR("HSVMTB","G","NAME","MTB1")
2
^SCR("HSVMTB","G","NM",1)
MTB
^SCR("HSVMTB","G","NM",2)
MTB1
^SCR("HSVMTB","G","NM",3)
HSBMTB
^SCR("HSVMTB","G","RB")
3,20,23,68
^SCR("HSVMTB","G","REF")
^TEMP($P,"MB"
^SCR("HSVMTB","G","RZD")
\
^SCR("HSVMTB","G","STEP")
1
^SCR("HSVMTB","G","STG")
                        : oeayg 'qn  :   rahn my   : drahn cew :               
^SCR("HSVMTB","G","VG")
5
^SCR("HSVMTB","NAME")
zerahnl zepeayg 'qn
^SCR("INCH")
H
^SCR("INCH",1)
                              # wpal miwiy zcwtd #                             
^SCR("INCH",2)
                                                                               
^SCR("INCH",3)
  {30                 } oeayg 'qn  {20    }: `zknq` 'qn  {10      : dcwtd jix`z
^SCR("INCH",4)
                                                                             1$
^SCR("INCH",5)
      :l/k:  mekq  :  wiy 'qn  :wpa:sipq:   oeayg   : 'qn:  jix`z :  jix`z  :  
^SCR("INCH",6)
      :   :        :           :   :    :           :dlaw:   dlaw : oerxtl  :  
^SCR("INCH",7)
                                                                               
^SCR("INCH",8)
                                                                               
^SCR("INCH",9)
                                                                               
^SCR("INCH",10)
                                                                               
^SCR("INCH",11)
                                                                               
^SCR("INCH",12)
                                                                               
^SCR("INCH",13)
                                                                               
^SCR("INCH",14)
                                                                               
^SCR("INCH",15)
                                                                               
^SCR("INCH",16)
                                                                               
^SCR("INCH",17)
                                                                               
^SCR("INCH",18)
                                                                               
^SCR("INCH",19)
                                                                               
^SCR("INCH",20)
 $1                                                                            
^SCR("INCH",21)
         {40      }: miwiy k"dq                 {35      } : onefn k"dq        
^SCR("INCH",22)
         {45      }:       k"dq                                                
^SCR("INCH","A",1)
—��Œ�‰—‰™šƒ—”„
^SCR("INCH","A",2)

^SCR("INCH","A",3)
�…�™‡'‘Ž:€š‹Ž‘€'‘Ž:„ƒ—”„Š‰˜€š
^SCR("INCH","A",4)

^SCR("INCH","A",5)
Œ/‹�…‹‘—‰™'‘Ž—��“‰�‘�…�™‡'‘ŽŠ‰˜€šŠ‰˜€š
^SCR("INCH","A",6)
„Œ�—„Œ�—�…’˜”Œ
^SCR("INCH","A",7)
---------------------------------------------------------------
^SCR("INCH","A",8)

^SCR("INCH","A",9)

^SCR("INCH","A",10)

^SCR("INCH","A",11)

^SCR("INCH","A",12)

^SCR("INCH","A",13)

^SCR("INCH","A",14)

^SCR("INCH","A",15)

^SCR("INCH","A",16)

^SCR("INCH","A",17)

^SCR("INCH","A",18)

^SCR("INCH","A",19)

^SCR("INCH","A",20)

^SCR("INCH","A",21)
:�‰—‰™‹"„‘:�Ž…†Ž‹"„‘
^SCR("INCH","A",22)
:‹"„‘
^SCR("INCH","AV",1)
ebckoheha,sepv
^SCR("INCH","AV",2)

^SCR("INCH","AV",3)
iucajwxn:t,fnxtwxn:vsepvlhrt,
^SCR("INCH","AV",4)

^SCR("INCH","AV",5)
kqfoufxehawxnebc;hbxiucajwxnlhrt,lhrt,
^SCR("INCH","AV",6)
vkcevkceiugrpk
^SCR("INCH","AV",7)
---------------------------------------------------------------
^SCR("INCH","AV",8)

^SCR("INCH","AV",9)

^SCR("INCH","AV",10)

^SCR("INCH","AV",11)

^SCR("INCH","AV",12)

^SCR("INCH","AV",13)

^SCR("INCH","AV",14)

^SCR("INCH","AV",15)

^SCR("INCH","AV",16)

^SCR("INCH","AV",17)

^SCR("INCH","AV",18)

^SCR("INCH","AV",19)

^SCR("INCH","AV",20)

^SCR("INCH","AV",21)
:ohehaf"vx:inuznf"vx
^SCR("INCH","AV",22)
:f"vx
^SCR("INCH","G",1,"CRD")
6,76,D,8,0
^SCR("INCH","G",1,"HELP")

^SCR("INCH","G",1,"LMAX")
9
^SCR("INCH","G",1,"MUMPS1")

^SCR("INCH","G",1,"MUMPS2")

^SCR("INCH","G",1,"OUTPUT")

^SCR("INCH","G",1,"SHEM")
  jix`z  
^SCR("INCH","G",1,"TYP")
D
^SCR("INCH","G",2,"CRD")
6,66,D,8,0
^SCR("INCH","G",2,"HELP")

^SCR("INCH","G",2,"LMAX")
8
^SCR("INCH","G",2,"MUMPS1")

^SCR("INCH","G",2,"MUMPS2")

^SCR("INCH","G",2,"OUTPUT")

^SCR("INCH","G",2,"SHEM")
  jix`z 
^SCR("INCH","G",2,"TYP")
D
^SCR("INCH","G",3,"CRD")
6,57,N,4,0
^SCR("INCH","G",3,"HELP")

^SCR("INCH","G",3,"LMAX")
4
^SCR("INCH","G",3,"MUMPS1")

^SCR("INCH","G",3,"MUMPS2")

^SCR("INCH","G",3,"OUTPUT")

^SCR("INCH","G",3,"SHEM")
 'qn
^SCR("INCH","G",3,"TYP")
N
^SCR("INCH","G",4,"CRD")
6,52,N,11,0
^SCR("INCH","G",4,"HELP")

^SCR("INCH","G",4,"LMAX")
11
^SCR("INCH","G",4,"MUMPS1")

^SCR("INCH","G",4,"MUMPS2")

^SCR("INCH","G",4,"OUTPUT")

^SCR("INCH","G",4,"SHEM")
   oeayg   
^SCR("INCH","G",4,"TYP")
N
^SCR("INCH","G",5,"CRD")
6,40,E,3,0
^SCR("INCH","G",5,"HELP")

^SCR("INCH","G",5,"LMAX")
4
^SCR("INCH","G",5,"MUMPS1")

^SCR("INCH","G",5,"MUMPS2")

^SCR("INCH","G",5,"OUTPUT")

^SCR("INCH","G",5,"SHEM")
sipq
^SCR("INCH","G",5,"TYP")
E
^SCR("INCH","G",6,"CRD")
6,35,E,3,0
^SCR("INCH","G",6,"HELP")

^SCR("INCH","G",6,"LMAX")
3
^SCR("INCH","G",6,"MUMPS1")

^SCR("INCH","G",6,"MUMPS2")

^SCR("INCH","G",6,"OUTPUT")

^SCR("INCH","G",6,"SHEM")
wpa
^SCR("INCH","G",6,"TYP")
E
^SCR("INCH","G",7,"CRD")
6,31,N,11,0
^SCR("INCH","G",7,"HELP")

^SCR("INCH","G",7,"LMAX")
11
^SCR("INCH","G",7,"MUMPS1")

^SCR("INCH","G",7,"MUMPS2")

^SCR("INCH","G",7,"OUTPUT")

^SCR("INCH","G",7,"SHEM")
  wiy 'qn  
^SCR("INCH","G",7,"TYP")
N
^SCR("INCH","G",8,"CRD")
6,19,N,8,2
^SCR("INCH","G",8,"HELP")

^SCR("INCH","G",8,"LMAX")
8
^SCR("INCH","G",8,"MUMPS1")

^SCR("INCH","G",8,"MUMPS2")

^SCR("INCH","G",8,"OUTPUT")

^SCR("INCH","G",8,"SHEM")
  mekq  
^SCR("INCH","G",8,"TYP")
N
^SCR("INCH","G",9,"CRD")
6,10,H,1,0
^SCR("INCH","G",9,"HELP")

^SCR("INCH","G",9,"LMAX")
3
^SCR("INCH","G",9,"MUMPS1")

^SCR("INCH","G",9,"MUMPS2")
D YN^PLCHIN
^SCR("INCH","G",9,"SHEM")
l/k
^SCR("INCH","G",9,"TYP")
H
^SCR("INCH","G","DEL")

^SCR("INCH","G","MAX")
1
^SCR("INCH","G","NAME","BANK")
6
^SCR("INCH","G","NAME","CHEK")
7
^SCR("INCH","G","NAME","HSB")
4
^SCR("INCH","G","NAME","KBL")
3
^SCR("INCH","G","NAME","LPR")
1
^SCR("INCH","G","NAME","SNIF")
5
^SCR("INCH","G","NAME","SUM")
8
^SCR("INCH","G","NAME","TAAR")
2
^SCR("INCH","G","NAME","YN")
9
^SCR("INCH","G","NM",1)
LPR
^SCR("INCH","G","NM",2)
TAAR
^SCR("INCH","G","NM",3)
KBL
^SCR("INCH","G","NM",4)
HSB
^SCR("INCH","G","NM",5)
SNIF
^SCR("INCH","G","NM",6)
BANK
^SCR("INCH","G","NM",7)
CHEK
^SCR("INCH","G","NM",8)
SUM
^SCR("INCH","G","NM",9)
YN
^SCR("INCH","G","RB")
5,2,21,79
^SCR("INCH","G","REF")
^TEMP($P
^SCR("INCH","G","RZD")
**
^SCR("INCH","G","STEP")
1
^SCR("INCH","G","STG")
      :l/k:  mekq  :  wiy 'qn  :wpa:sipq:   oeayg   : 'qn:  jix`z :  jix`z  :  
^SCR("INCH","G","VG")
8
^SCR("INCH","NAME")
3
^SCR("INCH","P",10,"CRD")
3,57,D,8,0
^SCR("INCH","P",10,"HELP")

^SCR("INCH","P",10,"LMAX")
9
^SCR("INCH","P",10,"MUMPS1")

^SCR("INCH","P",10,"MUMPS2")

^SCR("INCH","P",10,"OUTPUT")

^SCR("INCH","P",10,"TYP")
D
^SCR("INCH","P",20,"CRD")
3,35,E,7,0
^SCR("INCH","P",20,"HELP")

^SCR("INCH","P",20,"LMAX")
7
^SCR("INCH","P",20,"MUMPS1")

^SCR("INCH","P",20,"MUMPS2")

^SCR("INCH","P",20,"TYP")
E
^SCR("INCH","P",30,"CRD")
3,2,E,20,0
^SCR("INCH","P",30,"HELP")

^SCR("INCH","P",30,"LMAX")
20
^SCR("INCH","P",30,"MUMPS1")

^SCR("INCH","P",30,"MUMPS2")

^SCR("INCH","P",30,"OUTPUT")

^SCR("INCH","P",30,"TYP")
E
^SCR("INCH","P",35,"CRD")
21,48,N,9,2
^SCR("INCH","P",35,"HELP")

^SCR("INCH","P",35,"LMAX")
9
^SCR("INCH","P",35,"MUMPS1")

^SCR("INCH","P",35,"MUMPS2")

^SCR("INCH","P",35,"OUTPUT")

^SCR("INCH","P",35,"TYP")
N
^SCR("INCH","P",40,"CRD")
21,9,N,9,2
^SCR("INCH","P",40,"HELP")

^SCR("INCH","P",40,"LMAX")
9
^SCR("INCH","P",40,"MUMPS1")

^SCR("INCH","P",40,"MUMPS2")

^SCR("INCH","P",40,"OUTPUT")

^SCR("INCH","P",40,"TYP")
N
^SCR("INCH","P",45,"CRD")
22,9,N,9,2
^SCR("INCH","P",45,"HELP")

^SCR("INCH","P",45,"LMAX")
9
^SCR("INCH","P",45,"MUMPS1")

^SCR("INCH","P",45,"MUMPS2")

^SCR("INCH","P",45,"OUTPUT")

^SCR("INCH","P",45,"TYP")
N
^SCR("INCH","P","NAME","ASMA")
20
^SCR("INCH","P","NAME","DATE")
10
^SCR("INCH","P","NAME","MEZU")
35
^SCR("INCH","P","NAME","SAX")
45
^SCR("INCH","P","NAME","SCHECK")
40
^SCR("INCH","P","NAME","XESH")
30
^SCR("INCH","P","NM",10)
DATE
^SCR("INCH","P","NM",20)
ASMA
^SCR("INCH","P","NM",30)
XESH
^SCR("INCH","P","NM",35)
MEZU
^SCR("INCH","P","NM",40)
SCHECK
^SCR("INCH","P","NM",45)
SAX
^SCR("INSES")
H
^SCR("INSES",1)
                                                                               
^SCR("INSES",2)
                               # wqrd oeiv  #                                  
^SCR("INSES",3)
                                                                               
^SCR("INSES",4)
                                                                1]             
^SCR("INSES",5)
                 {                                5}: wqrd my                  
^SCR("INSES",6)
                 {                               10}:   zaezk                  
^SCR("INSES",7)
                                         {15       }:   oetlh                  
^SCR("INSES",8)
                                {20         }:dyxen wqer xtqn                  
^SCR("INSES",9)
                                                {25 :sipq 'qn                  
^SCR("INSES",10)
                                         {30 : LOGO zexey 'qn                  
^SCR("INSES",11)
             [1                                                                
^SCR("INSES",12)
                                                                               
^SCR("INSES","A",1)

^SCR("INSES","A",2)
—‘’„�…‰–
^SCR("INSES","A",3)

^SCR("INSES","A",4)

^SCR("INSES","A",5)
:—‘’„�™
^SCR("INSES","A",6)
:š�…š‹
^SCR("INSES","A",7)
:�…”Œˆ
^SCR("INSES","A",8)
:„™˜…Ž—‘…’˜”‘Ž
^SCR("INSES","A",9)
:“‰�‘'‘Ž
^SCR("INSES","A",10)
:LOGOš…˜…™'‘Ž
^SCR("INSES","A",11)

^SCR("INSES","A",12)

^SCR("INSES","AV",1)

^SCR("INSES","AV",2)
exgviuhm
^SCR("INSES","AV",3)

^SCR("INSES","AV",4)

^SCR("INSES","AV",5)
:exgvoa
^SCR("INSES","AV",6)
:,cu,f
^SCR("INSES","AV",7)
:iupky
^SCR("INSES","AV",8)
:varunexugrpxn
^SCR("INSES","AV",9)
:;hbxwxn
^SCR("INSES","AV",10)
:LOGO,uruawxn
^SCR("INSES","AV",11)

^SCR("INSES","AV",12)

^SCR("INSES","NAME")
wqrd mixhnxt
^SCR("INSES","P",5,"CRD")
5,52,H,30
^SCR("INSES","P",5,"HELP")

^SCR("INSES","P",5,"LMAX")
34
^SCR("INSES","P",5,"MUMPS1")

^SCR("INSES","P",5,"MUMPS2")

^SCR("INSES","P",5,"MUST")

^SCR("INSES","P",5,"TYP")
H
^SCR("INSES","P",10,"CRD")
6,52,H,30
^SCR("INSES","P",10,"HELP")

^SCR("INSES","P",10,"LMAX")
34
^SCR("INSES","P",10,"MUMPS1")

^SCR("INSES","P",10,"MUMPS2")

^SCR("INSES","P",10,"MUST")

^SCR("INSES","P",10,"TYP")
H
^SCR("INSES","P",15,"CRD")
7,41,E,10,0
^SCR("INSES","P",15,"HELP")

^SCR("INSES","P",15,"LMAX")
10
^SCR("INSES","P",15,"MUMPS1")

^SCR("INSES","P",15,"MUMPS2")

^SCR("INSES","P",15,"MUST")

^SCR("INSES","P",15,"TYP")
E
^SCR("INSES","P",20,"CRD")
8,32,E,11,0
^SCR("INSES","P",20,"HELP")

^SCR("INSES","P",20,"LMAX")
12
^SCR("INSES","P",20,"MUMPS1")

^SCR("INSES","P",20,"MUMPS2")

^SCR("INSES","P",20,"MUST")

^SCR("INSES","P",20,"TYP")
E
^SCR("INSES","P",25,"CRD")
9,48,N,4,0
^SCR("INSES","P",25,"HELP")

^SCR("INSES","P",25,"LMAX")
4
^SCR("INSES","P",25,"MUMPS1")

^SCR("INSES","P",25,"MUMPS2")

^SCR("INSES","P",25,"TYP")
N
^SCR("INSES","P",30,"CRD")
10,41,N,2,0
^SCR("INSES","P",30,"HELP")

^SCR("INSES","P",30,"LMAX")
4
^SCR("INSES","P",30,"MUMPS1")

^SCR("INSES","P",30,"MUMPS2")

^SCR("INSES","P",30,"TYP")
N
^SCR("INSES","P","NAME","KTOV")
10
^SCR("INSES","P","NAME","LOGO")
30
^SCR("INSES","P","NAME","MURSH")
20
^SCR("INSES","P","NAME","NAME")
5
^SCR("INSES","P","NAME","SNIF")
25
^SCR("INSES","P","NAME","TEL")
15
^SCR("INSES","P","NM",5)
NAME
^SCR("INSES","P","NM",10)
KTOV
^SCR("INSES","P","NM",15)
TEL
^SCR("INSES","P","NM",20)
MURSH
^SCR("INSES","P","NM",25)
SNIF
^SCR("INSES","P","NM",30)
LOGO
^SCR("INSES","P","RB",1)
5,14,12,66
^SCR("INSHSVML")
H
^SCR("INSHSVML",1)
                   # i`ln zerepz zxardl mixhnxt zxcbd #                        
^SCR("INSHSVML",2)
                                                                               
^SCR("INSHSVML",3)
                                                                            1$ 
^SCR("INSHSVML",4)
   :drepz beq:drepz beq :drepz beq:   n"rn :  oeayg :     fkxn my    :fkxn:    
^SCR("INSHSVML",5)
   :   melyzl:  n"rn mr : n"rn `ll: zeneyz :  zeipw :                :    :    
^SCR("INSHSVML",6)
                                                                               
^SCR("INSHSVML",7)
                                                                               
^SCR("INSHSVML",8)
                                                                               
^SCR("INSHSVML",9)
                                                                               
^SCR("INSHSVML",10)
                                                                               
^SCR("INSHSVML",11)
                                                                               
^SCR("INSHSVML",12)
                                                                               
^SCR("INSHSVML",13)
                                                                               
^SCR("INSHSVML",14)
                                                                               
^SCR("INSHSVML",15)
                                                                               
^SCR("INSHSVML",16)
                                                                               
^SCR("INSHSVML",17)
                                                                               
^SCR("INSHSVML",18)
                                                                               
^SCR("INSHSVML",19)
                                                                               
^SCR("INSHSVML",20)
                                                                               
^SCR("INSHSVML",21)
 $1                                                                            
^SCR("INSHSVML","A",1)
‰€ŒŽš…’…�šš˜�’„Œ�‰˜ˆŽ˜”š˜ƒ‚„
^SCR("INSHSVML","A",2)

^SCR("INSHSVML","A",3)

^SCR("INSHSVML","A",4)
„’…�š‚…‘„’…�š‚…‘„’…�š‚…‘Ž"’Ž�…�™‡†‹˜Ž�™†‹˜Ž
^SCR("INSHSVML","A",5)
�…Œ™šŒŽ"’Ž�’Ž"’Ž€ŒŒš…Ž…™šš…‰�—
^SCR("INSHSVML","A",6)
----------------------------------------------------------------
^SCR("INSHSVML","A",7)

^SCR("INSHSVML","A",8)

^SCR("INSHSVML","A",9)

^SCR("INSHSVML","A",10)

^SCR("INSHSVML","A",11)

^SCR("INSHSVML","A",12)

^SCR("INSHSVML","A",13)

^SCR("INSHSVML","A",14)

^SCR("INSHSVML","A",15)

^SCR("INSHSVML","A",16)

^SCR("INSHSVML","A",17)

^SCR("INSHSVML","A",18)

^SCR("INSHSVML","A",19)

^SCR("INSHSVML","A",20)

^SCR("INSHSVML","A",21)

^SCR("INSHSVML","AV",1)
htkn,ugub,,rcgvkohrynrp,rsdv
^SCR("INSHSVML","AV",2)

^SCR("INSHSVML","AV",3)

^SCR("INSHSVML","AV",4)
vgub,duxvgub,duxvgub,duxn"gniucajzfrnoazfrn
^SCR("INSHSVML","AV",5)
ouka,kn"gnogn"gntkk,unua,,uhbe
^SCR("INSHSVML","AV",6)
----------------------------------------------------------------
^SCR("INSHSVML","AV",7)

^SCR("INSHSVML","AV",8)

^SCR("INSHSVML","AV",9)

^SCR("INSHSVML","AV",10)

^SCR("INSHSVML","AV",11)

^SCR("INSHSVML","AV",12)

^SCR("INSHSVML","AV",13)

^SCR("INSHSVML","AV",14)

^SCR("INSHSVML","AV",15)

^SCR("INSHSVML","AV",16)

^SCR("INSHSVML","AV",17)

^SCR("INSHSVML","AV",18)

^SCR("INSHSVML","AV",19)

^SCR("INSHSVML","AV",20)

^SCR("INSHSVML","AV",21)

^SCR("INSHSVML","G",1,"CHECK")
Y
^SCR("INSHSVML","G",1,"CRD")
5,74,N,4,0
^SCR("INSHSVML","G",1,"FNC")

^SCR("INSHSVML","G",1,"GLOB")
MRKZ
^SCR("INSHSVML","G",1,"HELP")

^SCR("INSHSVML","G",1,"LMAX")
4
^SCR("INSHSVML","G",1,"MUMPS1")

^SCR("INSHSVML","G",1,"MUMPS2")

^SCR("INSHSVML","G",1,"MUST")

^SCR("INSHSVML","G",1,"NLN")
20
^SCR("INSHSVML","G",1,"RZD")
\
^SCR("INSHSVML","G",1,"SHEM")
fkxn
^SCR("INSHSVML","G",1,"TOPB")
8
^SCR("INSHSVML","G",1,"TYP")
N
^SCR("INSHSVML","G",1,"VRB")
MRKZ1
^SCR("INSHSVML","G",2,"CRD")
5,69,H,16,0
^SCR("INSHSVML","G",2,"HELP")

^SCR("INSHSVML","G",2,"LMAX")
16
^SCR("INSHSVML","G",2,"MUMPS1")

^SCR("INSHSVML","G",2,"MUMPS2")

^SCR("INSHSVML","G",2,"OUTPUT")

^SCR("INSHSVML","G",2,"SHEM")
     fkxn my    
^SCR("INSHSVML","G",2,"TYP")
H
^SCR("INSHSVML","G",3,"CRD")
5,52,E,8,0
^SCR("INSHSVML","G",3,"HELP")

^SCR("INSHSVML","G",3,"LMAX")
8
^SCR("INSHSVML","G",3,"MUMPS1")

^SCR("INSHSVML","G",3,"MUMPS2")

^SCR("INSHSVML","G",3,"MUST")

^SCR("INSHSVML","G",3,"SHEM")
  oeayg 
^SCR("INSHSVML","G",3,"TYP")
E
^SCR("INSHSVML","G",4,"CRD")
5,43,E,8,0
^SCR("INSHSVML","G",4,"HELP")

^SCR("INSHSVML","G",4,"LMAX")
8
^SCR("INSHSVML","G",4,"MUMPS1")

^SCR("INSHSVML","G",4,"MUMPS2")

^SCR("INSHSVML","G",4,"SHEM")
   n"rn 
^SCR("INSHSVML","G",4,"TYP")
E
^SCR("INSHSVML","G",5,"CRD")
5,34,H,3,0
^SCR("INSHSVML","G",5,"HELP")

^SCR("INSHSVML","G",5,"LMAX")
9
^SCR("INSHSVML","G",5,"MUMPS1")

^SCR("INSHSVML","G",5,"MUMPS2")

^SCR("INSHSVML","G",5,"SHEM")
drepz beq
^SCR("INSHSVML","G",5,"TYP")
H
^SCR("INSHSVML","G",6,"CRD")
5,24,H,3,0
^SCR("INSHSVML","G",6,"HELP")

^SCR("INSHSVML","G",6,"LMAX")
10
^SCR("INSHSVML","G",6,"MUMPS1")

^SCR("INSHSVML","G",6,"MUMPS2")

^SCR("INSHSVML","G",6,"SHEM")
drepz beq 
^SCR("INSHSVML","G",6,"TYP")
H
^SCR("INSHSVML","G",7,"CRD")
5,13,H,3,0
^SCR("INSHSVML","G",7,"HELP")

^SCR("INSHSVML","G",7,"LMAX")
9
^SCR("INSHSVML","G",7,"MUMPS1")

^SCR("INSHSVML","G",7,"MUMPS2")

^SCR("INSHSVML","G",7,"SHEM")
drepz beq
^SCR("INSHSVML","G",7,"TYP")
H
^SCR("INSHSVML","G","DEL")
Y
^SCR("INSHSVML","G","MAX")
9999
^SCR("INSHSVML","G","NAME","HSBK")
3
^SCR("INSHSVML","G","NAME","MAMT")
4
^SCR("INSHSVML","G","NAME","MRKZ")
1
^SCR("INSHSVML","G","NAME","MRKZ1")
2
^SCR("INSHSVML","G","NAME","STNM")
6
^SCR("INSHSVML","G","NAME","STNNM")
5
^SCR("INSHSVML","G","NAME","STNT")
7
^SCR("INSHSVML","G","NM",1)
MRKZ
^SCR("INSHSVML","G","NM",2)
MRKZ1
^SCR("INSHSVML","G","NM",3)
HSBK
^SCR("INSHSVML","G","NM",4)
MAMT
^SCR("INSHSVML","G","NM",5)
STNNM
^SCR("INSHSVML","G","NM",6)
STNM
^SCR("INSHSVML","G","NM",7)
STNT
^SCR("INSHSVML","G","RB")
4,2,22,78
^SCR("INSHSVML","G","REF")
^TEMPH($P
^SCR("INSHSVML","G","RZD")
\
^SCR("INSHSVML","G","STEP")
1
^SCR("INSHSVML","G","STG")
   :drepz beq:drepz beq :drepz beq:   n"rn :  oeayg :     fkxn my    :fkxn:    
^SCR("INSHSVML","G","VG")
7
^SCR("INSHSVML","NAME")
mifkxnl i`ln mixhnxt
^SCR("INSTPK")
H
^SCR("INSTPK",1)
                   # zeipeayge zepeayg zqtcdl mixhnxt zxcbd #                  
^SCR("INSTPK",2)
                                                                              $
^SCR("INSTPK",3)
               : zqtcn mbc : zqtcn beq :zqtcnl hxet : dtew xtqn : hxet xtqn :  
^SCR("INSTPK",4)
     \lwyn beq\lwyn hxet\ lawn \yelz\onefn\zexy inc\zegpd\milehia\minelyz\     
^SCR("INSTPK",5)
                                                                               
^SCR("INSTPK",6)
                                                                               
^SCR("INSTPK",7)
                                                                               
^SCR("INSTPK",8)
                                                                               
^SCR("INSTPK",9)
                                                                               
^SCR("INSTPK",10)
                                                                               
^SCR("INSTPK",11)
                                                                               
^SCR("INSTPK",12)
                                                                               
^SCR("INSTPK",13)
                                                                               
^SCR("INSTPK",14)
                                                                               
^SCR("INSTPK",15)
                                                                               
^SCR("INSTPK",16)
                                                                               
^SCR("INSTPK",17)
                                                                               
^SCR("INSTPK",18)
                                                                               
^SCR("INSTPK",19)
                                                                               
^SCR("INSTPK",20)
                                                                               
^SCR("INSTPK",21)
 $                                                                             
^SCR("INSTPK","A",1)
š…‰�…�™‡…š…�…�™‡š‘”ƒ„Œ�‰˜ˆŽ˜”š˜ƒ‚„
^SCR("INSTPK","A",2)

^SCR("INSTPK","A",3)
š‘”ƒŽ�‚ƒš‘”ƒŽ‚…‘š‘”ƒŽŒˆ˜…”„”…—˜”‘Žˆ˜…”˜”‘Ž
^SCR("INSTPK","A",4)
Œ—™Ž‚…‘Œ—™Žˆ˜…”Œ�—Ž™…Œš�Ž…†Žš…˜™‰Žƒš…‡�„�‰Œ…ˆ‰��‰Ž…Œ™š
^SCR("INSTPK","A",5)
----------------------------------------------------------
^SCR("INSTPK","A",6)

^SCR("INSTPK","A",7)

^SCR("INSTPK","A",8)

^SCR("INSTPK","A",9)

^SCR("INSTPK","A",10)

^SCR("INSTPK","A",11)

^SCR("INSTPK","A",12)

^SCR("INSTPK","A",13)

^SCR("INSTPK","A",14)

^SCR("INSTPK","A",15)

^SCR("INSTPK","A",16)

^SCR("INSTPK","A",17)

^SCR("INSTPK","A",18)

^SCR("INSTPK","A",19)

^SCR("INSTPK","A",20)

^SCR("INSTPK","A",21)

^SCR("INSTPK","AV",1)
,uhbucaju,ubucaj,xpsvkohrynrp,rsdv
^SCR("INSTPK","AV",2)

^SCR("INSTPK","AV",3)
,xpsnods,xpsndux,xpsnkyrupvpuerpxnyruprpxn
^SCR("INSTPK","AV",4)
keanduxkeanyrupkcenauk,inuzn,urahns,ujbvohkuyhcohnuka,
^SCR("INSTPK","AV",5)
----------------------------------------------------------
^SCR("INSTPK","AV",6)

^SCR("INSTPK","AV",7)

^SCR("INSTPK","AV",8)

^SCR("INSTPK","AV",9)

^SCR("INSTPK","AV",10)

^SCR("INSTPK","AV",11)

^SCR("INSTPK","AV",12)

^SCR("INSTPK","AV",13)

^SCR("INSTPK","AV",14)

^SCR("INSTPK","AV",15)

^SCR("INSTPK","AV",16)

^SCR("INSTPK","AV",17)

^SCR("INSTPK","AV",18)

^SCR("INSTPK","AV",19)

^SCR("INSTPK","AV",20)

^SCR("INSTPK","AV",21)

^SCR("INSTPK","G",1,"CHECK")
Y
^SCR("INSTPK","G",1,"CRD")
5,76,N,2,0
^SCR("INSTPK","G",1,"FNC")

^SCR("INSTPK","G",1,"GLOB")
dev
^SCR("INSTPK","G",1,"HELP")
<F9> - ycg hxet znwd , <F7> - mihxet zbvd
^SCR("INSTPK","G",1,"LMAX")
11
^SCR("INSTPK","G",1,"MUMPS1")
D PORT0^INSTPK(PORT,75)
^SCR("INSTPK","G",1,"MUMPS2")
D PORT^INSTPK(PORT)
^SCR("INSTPK","G",1,"MUST")

^SCR("INSTPK","G",1,"NLN")
20
^SCR("INSTPK","G",1,"RZD")
**
^SCR("INSTPK","G",1,"SHEM")
 hxet xtqn 
^SCR("INSTPK","G",1,"TOPB")
8
^SCR("INSTPK","G",1,"TYP")
N
^SCR("INSTPK","G",2,"CRD")
5,64,N,2,0
^SCR("INSTPK","G",2,"HELP")

^SCR("INSTPK","G",2,"LMAX")
11
^SCR("INSTPK","G",2,"MUMPS1")

^SCR("INSTPK","G",2,"MUMPS2")

^SCR("INSTPK","G",2,"MUST")

^SCR("INSTPK","G",2,"SHEM")
 dtew xtqn 
^SCR("INSTPK","G",2,"TYP")
N
^SCR("INSTPK","G",3,"CRD")
5,52,E,2,0
^SCR("INSTPK","G",3,"HELP")

^SCR("INSTPK","G",3,"LMAX")
12
^SCR("INSTPK","G",3,"MUMPS1")
D PORT0^INSTPK(MDP,40)
^SCR("INSTPK","G",3,"MUMPS2")
D PORT^INSTPK(MDP)
^SCR("INSTPK","G",3,"SHEM")
zqtcnl hxet 
^SCR("INSTPK","G",3,"TYP")
E
^SCR("INSTPK","G",4,"CRD")
5,39,E,2,0
^SCR("INSTPK","G",4,"HELP")

^SCR("INSTPK","G",4,"LMAX")
11
^SCR("INSTPK","G",4,"MUMPS1")
D SUGMH^INSTPK
^SCR("INSTPK","G",4,"MUMPS2")
D SUGM^INSTPK
^SCR("INSTPK","G",4,"SHEM")
 zqtcn beq 
^SCR("INSTPK","G",4,"TYP")
E
^SCR("INSTPK","G",5,"CRD")
5,27,H,11,0
^SCR("INSTPK","G",5,"HELP")

^SCR("INSTPK","G",5,"LMAX")
11
^SCR("INSTPK","G",5,"MUMPS1")

^SCR("INSTPK","G",5,"MUMPS2")

^SCR("INSTPK","G",5,"OUTPUT")

^SCR("INSTPK","G",5,"SHEM")
 zqtcn mbc 
^SCR("INSTPK","G",5,"TYP")
H
^SCR("INSTPK","G",6,"CRD")
5,+73,N,1,0
^SCR("INSTPK","G",6,"HELP")
0 - `l ,1 - ok 
^SCR("INSTPK","G",6,"LMAX")
7
^SCR("INSTPK","G",6,"MUMPS1")

^SCR("INSTPK","G",6,"MUMPS2")
D 3^%L1BDO
^SCR("INSTPK","G",6,"SHEM")
minelyz
^SCR("INSTPK","G",6,"TYP")
N
^SCR("INSTPK","G",7,"CRD")
5,+65,N,1,0
^SCR("INSTPK","G",7,"HELP")
0 - `l ,1 - ok 
^SCR("INSTPK","G",7,"LMAX")
7
^SCR("INSTPK","G",7,"MUMPS1")

^SCR("INSTPK","G",7,"MUMPS2")
D 3^%L1BDO
^SCR("INSTPK","G",7,"SHEM")
milehia
^SCR("INSTPK","G",7,"TYP")
N
^SCR("INSTPK","G",8,"CRD")
5,+57,N,1,0
^SCR("INSTPK","G",8,"HELP")
0 - `l ,1 - ok 
^SCR("INSTPK","G",8,"LMAX")
5
^SCR("INSTPK","G",8,"MUMPS1")

^SCR("INSTPK","G",8,"MUMPS2")
D 3^%L1BDO
^SCR("INSTPK","G",8,"SHEM")
zegpd
^SCR("INSTPK","G",8,"TYP")
N
^SCR("INSTPK","G",9,"CRD")
5,+51,N,1,0
^SCR("INSTPK","G",9,"HELP")
0 - `l ,1 - ok 
^SCR("INSTPK","G",9,"LMAX")
8
^SCR("INSTPK","G",9,"MUMPS1")

^SCR("INSTPK","G",9,"MUMPS2")
D 3^%L1BDO
^SCR("INSTPK","G",9,"SHEM")
zexy inc
^SCR("INSTPK","G",9,"TYP")
N
^SCR("INSTPK","G",10,"CRD")
5,+42,N,1,0
^SCR("INSTPK","G",10,"HELP")
0 - zxg` , 1 - onefna melyz dcnra lawl xyt` m` 
^SCR("INSTPK","G",10,"LMAX")
5
^SCR("INSTPK","G",10,"MUMPS1")

^SCR("INSTPK","G",10,"MUMPS2")
D 3^%L1BDO
^SCR("INSTPK","G",10,"MUST")

^SCR("INSTPK","G",10,"SHEM")
onefn
^SCR("INSTPK","G",10,"TYP")
N
^SCR("INSTPK","G",11,"CRD")
5,+36,N,1,0
^SCR("INSTPK","G",11,"HELP")

^SCR("INSTPK","G",11,"LMAX")
4
^SCR("INSTPK","G",11,"MUMPS1")

^SCR("INSTPK","G",11,"MUMPS2")
D 3^%L1BDO
^SCR("INSTPK","G",11,"MUST")

^SCR("INSTPK","G",11,"SHEM")
yelz
^SCR("INSTPK","G",11,"TYP")
N
^SCR("INSTPK","G",12,"CRD")
5,+31,E,5.,0
^SCR("INSTPK","G",12,"FNC")

^SCR("INSTPK","G",12,"GLOB")
NAME
^SCR("INSTPK","G",12,"HELP")
(lcgn zxixa) dcnra lawnd xtqn cilwdl `p 
^SCR("INSTPK","G",12,"LMAX")
6
^SCR("INSTPK","G",12,"MUMPS1")
D MKBL^INSTPK
^SCR("INSTPK","G",12,"MUMPS2")
D MKBL^INSTPK
^SCR("INSTPK","G",12,"NLN")
20
^SCR("INSTPK","G",12,"RZD")
\
^SCR("INSTPK","G",12,"SHEM")
 lawn 
^SCR("INSTPK","G",12,"TOPB")
8
^SCR("INSTPK","G",12,"TYP")
E
^SCR("INSTPK","G",13,"CRD")
5,+24,N,2,0
^SCR("INSTPK","G",13,"HELP")

^SCR("INSTPK","G",13,"LMAX")
9
^SCR("INSTPK","G",13,"MUMPS1")

^SCR("INSTPK","G",13,"MUMPS2")
D MISHKAL^INSTPK
^SCR("INSTPK","G",13,"SHEM")
lwyn hxet
^SCR("INSTPK","G",13,"TYP")
N
^SCR("INSTPK","G",14,"CRD")
5,+14,N,2,0
^SCR("INSTPK","G",14,"HELP")
3 - LIAD ,2 - lwy ,1 - hlea
^SCR("INSTPK","G",14,"LMAX")
8
^SCR("INSTPK","G",14,"MUMPS1")

^SCR("INSTPK","G",14,"MUMPS2")

^SCR("INSTPK","G",14,"SHEM")
lwyn beq
^SCR("INSTPK","G",14,"TYP")
N
^SCR("INSTPK","G","DEL")
Y
^SCR("INSTPK","G","MAX")
99999
^SCR("INSTPK","G","NAME","BIT")
7
^SCR("INSTPK","G","NAME","DMSH")
9
^SCR("INSTPK","G","NAME","HNH")
8
^SCR("INSTPK","G","NAME","HSB")
6
^SCR("INSTPK","G","NAME","KUPA")
2
^SCR("INSTPK","G","NAME","MDP")
3
^SCR("INSTPK","G","NAME","MISHKAL")
13
^SCR("INSTPK","G","NAME","MKBL")
12
^SCR("INSTPK","G","NAME","MZM")
10
^SCR("INSTPK","G","NAME","PORT")
1
^SCR("INSTPK","G","NAME","SUGM")
4
^SCR("INSTPK","G","NAME","SUGM1")
5
^SCR("INSTPK","G","NAME","SUGMSK")
14
^SCR("INSTPK","G","NAME","TL")
11
^SCR("INSTPK","G","NM",1)
PORT
^SCR("INSTPK","G","NM",2)
KUPA
^SCR("INSTPK","G","NM",3)
MDP
^SCR("INSTPK","G","NM",4)
SUGM
^SCR("INSTPK","G","NM",5)
SUGM1
^SCR("INSTPK","G","NM",6)
HSB
^SCR("INSTPK","G","NM",7)
BIT
^SCR("INSTPK","G","NM",8)
HNH
^SCR("INSTPK","G","NM",9)
DMSH
^SCR("INSTPK","G","NM",10)
MZM
^SCR("INSTPK","G","NM",11)
TL
^SCR("INSTPK","G","NM",12)
MKBL
^SCR("INSTPK","G","NM",13)
MISHKAL
^SCR("INSTPK","G","NM",14)
SUGMSK
^SCR("INSTPK","G","RB")
3,2,22,79
^SCR("INSTPK","G","REF")
^MBG($P
^SCR("INSTPK","G","RZD")
\
^SCR("INSTPK","G","STEP")
2
^SCR("INSTPK","G","STG")
               : zqtcn mbc : zqtcn beq :zqtcnl hxet : dtew xtqn : hxet xtqn :  
^SCR("INSTPK","G","VG")
6
^SCR("INSTPK","NAME")
zetewl zexcbd
^SCR("JOMAN")
H
^SCR("JOMAN",1)
                                                                               
^SCR("JOMAN",2)
                                         {10 } mei   {05     }: jix`z          
^SCR("JOMAN",3)
                                                                             1$
^SCR("JOMAN",4)
    :                                      okez                    : dry :     
^SCR("JOMAN",5)
                                                                               
^SCR("JOMAN",6)
                                                                               
^SCR("JOMAN",7)
                                                                               
^SCR("JOMAN",8)
                                                                               
^SCR("JOMAN",9)
                                                                               
^SCR("JOMAN",10)
                                                                               
^SCR("JOMAN",11)
                                                                               
^SCR("JOMAN",12)
                                                                               
^SCR("JOMAN",13)
                                                                               
^SCR("JOMAN",14)
                                                                               
^SCR("JOMAN",15)
                                                                               
^SCR("JOMAN",16)
                                                                               
^SCR("JOMAN",17)
                                                                               
^SCR("JOMAN",18)
                                                                               
^SCR("JOMAN",19)
                                                                               
^SCR("JOMAN",20)
                                                                               
^SCR("JOMAN",21)
                                                                               
^SCR("JOMAN",22)
 $1                                                                            
^SCR("JOMAN","A",1)

^SCR("JOMAN","A",2)
�…‰:Š‰˜€š
^SCR("JOMAN","A",3)

^SCR("JOMAN","A",4)
�‹…š„’™
^SCR("JOMAN","A",5)
------------------------------------------------------------------------
^SCR("JOMAN","A",6)

^SCR("JOMAN","A",7)

^SCR("JOMAN","A",8)

^SCR("JOMAN","A",9)

^SCR("JOMAN","A",10)

^SCR("JOMAN","A",11)

^SCR("JOMAN","A",12)

^SCR("JOMAN","A",13)

^SCR("JOMAN","A",14)

^SCR("JOMAN","A",15)

^SCR("JOMAN","A",16)

^SCR("JOMAN","A",17)

^SCR("JOMAN","A",18)

^SCR("JOMAN","A",19)

^SCR("JOMAN","A",20)

^SCR("JOMAN","A",21)

^SCR("JOMAN","A",22)

^SCR("JOMAN","AV",1)

^SCR("JOMAN","AV",2)
ouh:lhrt,
^SCR("JOMAN","AV",3)

^SCR("JOMAN","AV",4)
ifu,vga
^SCR("JOMAN","AV",5)
------------------------------------------------------------------------
^SCR("JOMAN","AV",6)

^SCR("JOMAN","AV",7)

^SCR("JOMAN","AV",8)

^SCR("JOMAN","AV",9)

^SCR("JOMAN","AV",10)

^SCR("JOMAN","AV",11)

^SCR("JOMAN","AV",12)

^SCR("JOMAN","AV",13)

^SCR("JOMAN","AV",14)

^SCR("JOMAN","AV",15)

^SCR("JOMAN","AV",16)

^SCR("JOMAN","AV",17)

^SCR("JOMAN","AV",18)

^SCR("JOMAN","AV",19)

^SCR("JOMAN","AV",20)

^SCR("JOMAN","AV",21)

^SCR("JOMAN","AV",22)

^SCR("JOMAN","G",1,"CRD")
5,73,T,5,0
^SCR("JOMAN","G",1,"HELP")
<F4> - dry itl oein
^SCR("JOMAN","G",1,"LMAX")
5
^SCR("JOMAN","G",1,"MUMPS1")

^SCR("JOMAN","G",1,"MUMPS2")
D SHAA^JOMAN
^SCR("JOMAN","G",1,"SHEM")
 dry 
^SCR("JOMAN","G",1,"TYP")
T
^SCR("JOMAN","G",2,"CRD")
5,67,H,60,0
^SCR("JOMAN","G",2,"HELP")

^SCR("JOMAN","G",2,"LMAX")
62
^SCR("JOMAN","G",2,"MUMPS1")

^SCR("JOMAN","G",2,"MUMPS2")

^SCR("JOMAN","G",2,"SHEM")
                                      okez                    
^SCR("JOMAN","G",2,"TYP")
H
^SCR("JOMAN","G","DEL")
Y
^SCR("JOMAN","G","MAX")
9999
^SCR("JOMAN","G","NAME","SHAA")
1
^SCR("JOMAN","G","NAME","TOHEN")
2
^SCR("JOMAN","G","NM",1)
SHAA
^SCR("JOMAN","G","NM",2)
TOHEN
^SCR("JOMAN","G","RB")
4,2,23,79
^SCR("JOMAN","G","REF")
^TEMP($P,"J"
^SCR("JOMAN","G","RZD")
\
^SCR("JOMAN","G","STEP")
1
^SCR("JOMAN","G","STG")
    :                                      okez                    : dry :     
^SCR("JOMAN","G","VG")
6
^SCR("JOMAN","NAME")
onei
^SCR("JOMAN","P",5,"CRD")
2,53,D,8,0
^SCR("JOMAN","P",5,"HELP")

^SCR("JOMAN","P",5,"LMAX")
8
^SCR("JOMAN","P",5,"MUMPS1")

^SCR("JOMAN","P",5,"MUMPS2")

^SCR("JOMAN","P",5,"OUTPUT")

^SCR("JOMAN","P",5,"TYP")
D
^SCR("JOMAN","P",10,"CRD")
2,41,E,2,0
^SCR("JOMAN","P",10,"HELP")

^SCR("JOMAN","P",10,"LMAX")
4
^SCR("JOMAN","P",10,"MUMPS1")

^SCR("JOMAN","P",10,"MUMPS2")

^SCR("JOMAN","P",10,"OUTPUT")

^SCR("JOMAN","P",10,"TYP")
E
^SCR("JOMAN","P","NAME","DAT")
5
^SCR("JOMAN","P","NAME","JOM")
10
^SCR("JOMAN","P","NM",5)
DAT
^SCR("JOMAN","P","NM",10)
JOM
^SCR("KLINC")
H
^SCR("KLINC",1)
                             {04 }{03     } 'qn dlaw                           
^SCR("KLINC",2)
                                                                               
^SCR("KLINC",3)
                                 {07           :gewl 'qn  {05        : jix`z   
^SCR("KLINC",4)
 {                                          08}: gewl my                       
^SCR("KLINC",5)
                                                {10     }: zncew dxzi          
^SCR("KLINC",6)
                                                                            1$ 
^SCR("KLINC",7)
         : oerxtl :  wiy 'qn  :  oeayg  :  zedf zcerz  :sipq:wpa:  mekq  :     
^SCR("KLINC",8)
                                                                               
^SCR("KLINC",9)
                                                                               
^SCR("KLINC",10)
                                                                               
^SCR("KLINC",11)
                                                                               
^SCR("KLINC",12)
                                                                               
^SCR("KLINC",13)
                                                                               
^SCR("KLINC",14)
                                                                               
^SCR("KLINC",15)
                                                                               
^SCR("KLINC",16)
   $1                                                                          
^SCR("KLINC",17)
                           {13      } xewn qn iekip    {12         }:    onefn 
^SCR("KLINC",18)
      {     16}:dwqr beq {15                 }: `"k 'qn {14        }:`"ka mley 
^SCR("KLINC",19)
 {20    }:'lyz x`y {18   }:oey`x melyz {19 }:'lyz zenk  {     17}:i`xy` beq    
^SCR("KLINC",20)
                                   {27        }:dxzi   {25         }:     k"dq 
^SCR("KLINC",21)
             {                                                   30}:   drced  
^SCR("KLINC",22)
                                                                               
^SCR("KLINC","A",1)
'‘Ž„Œ�—
^SCR("KLINC","A",2)

^SCR("KLINC","A",3)
:‡…—Œ'‘Ž:Š‰˜€š
^SCR("KLINC","A",4)
:‡…—Œ�™
^SCR("KLINC","A",5)
:šŽƒ…—„˜š‰
^SCR("KLINC","A",6)

^SCR("KLINC","A",7)
�…’˜”Œ—‰™'‘Ž�…�™‡š…„†šƒ…’š“‰�‘—���…‹‘
^SCR("KLINC","A",8)
---------------------------------------------------------
^SCR("KLINC","A",9)

^SCR("KLINC","A",10)

^SCR("KLINC","A",11)

^SCR("KLINC","A",12)

^SCR("KLINC","A",13)

^SCR("KLINC","A",14)

^SCR("KLINC","A",15)

^SCR("KLINC","A",16)

^SCR("KLINC","A",17)
˜…—Ž‘Ž‰…‹‰�:�Ž…†Ž
^SCR("KLINC","A",18)
:„—‘’‚…‘:€"‹'‘Ž:€"‹��Œ…™
^SCR("KLINC","A",19)
:'Œ™š˜€™:�…™€˜�…Œ™š:'Œ™šš…Ž‹:‰€˜™€‚…‘
^SCR("KLINC","A",20)
:„˜š‰:‹"„‘
^SCR("KLINC","A",21)
:„’ƒ…„
^SCR("KLINC","A",22)

^SCR("KLINC","AV",1)
wxnvkce
^SCR("KLINC","AV",2)

^SCR("KLINC","AV",3)
:juekwxn:lhrt,
^SCR("KLINC","AV",4)
:juekoa
^SCR("KLINC","AV",5)
:,nsuevr,h
^SCR("KLINC","AV",6)

^SCR("KLINC","AV",7)
iugrpkehawxniucaj,uvz,sug,;hbxebcoufx
^SCR("KLINC","AV",8)
---------------------------------------------------------
^SCR("KLINC","AV",9)

^SCR("KLINC","AV",10)

^SCR("KLINC","AV",11)

^SCR("KLINC","AV",12)

^SCR("KLINC","AV",13)

^SCR("KLINC","AV",14)

^SCR("KLINC","AV",15)

^SCR("KLINC","AV",16)

^SCR("KLINC","AV",17)
ruenxnhufhb:inuzn
^SCR("KLINC","AV",18)
:vexgdux:t"fwxn:t"fcokua
^SCR("KLINC","AV",19)
:wka,rta:iuatrouka,:wka,,unf:htratdux
^SCR("KLINC","AV",20)
:vr,h:f"vx
^SCR("KLINC","AV",21)
:vgsuv
^SCR("KLINC","AV",22)

^SCR("KLINC","G",1,"CRD")
8,73,E,8,0
^SCR("KLINC","G",1,"HELP")
<F7> - mincew miwiy ihxt bivdl
^SCR("KLINC","G",1,"LMAX")
8
^SCR("KLINC","G",1,"MUMPS1")

^SCR("KLINC","G",1,"MUMPS2")
D SUM^KLINC
^SCR("KLINC","G",1,"MUST")

^SCR("KLINC","G",1,"SHEM")
  mekq  
^SCR("KLINC","G",1,"TYP")
E
^SCR("KLINC","G",2,"CRD")
8,64,E,2.,0
^SCR("KLINC","G",2,"HELP")

^SCR("KLINC","G",2,"LMAX")
3
^SCR("KLINC","G",2,"MUMPS1")

^SCR("KLINC","G",2,"MUMPS2")

^SCR("KLINC","G",2,"MUST")

^SCR("KLINC","G",2,"SHEM")
wpa
^SCR("KLINC","G",2,"TYP")
E
^SCR("KLINC","G",3,"CRD")
8,60,E,3.,0
^SCR("KLINC","G",3,"HELP")

^SCR("KLINC","G",3,"LMAX")
4
^SCR("KLINC","G",3,"MUMPS1")

^SCR("KLINC","G",3,"MUMPS2")

^SCR("KLINC","G",3,"MUST")

^SCR("KLINC","G",3,"SHEM")
sipq
^SCR("KLINC","G",3,"TYP")
E
^SCR("KLINC","G",4,"CRD")
8,55,E,9,0
^SCR("KLINC","G",4,"HELP")

^SCR("KLINC","G",4,"LMAX")
14
^SCR("KLINC","G",4,"MUMPS1")

^SCR("KLINC","G",4,"MUMPS2")
D TZ^KLINC
^SCR("KLINC","G",4,"MUST")

^SCR("KLINC","G",4,"SHEM")
  zedf zcerz  
^SCR("KLINC","G",4,"TYP")
E
^SCR("KLINC","G",5,"CRD")
8,40,E,9,0
^SCR("KLINC","G",5,"HELP")

^SCR("KLINC","G",5,"LMAX")
9
^SCR("KLINC","G",5,"MUMPS1")

^SCR("KLINC","G",5,"MUMPS2")
D HSB^KLINC
^SCR("KLINC","G",5,"MUST")

^SCR("KLINC","G",5,"SHEM")
  oeayg  
^SCR("KLINC","G",5,"TYP")
E
^SCR("KLINC","G",6,"CRD")
8,30,E,11,0
^SCR("KLINC","G",6,"HELP")

^SCR("KLINC","G",6,"LMAX")
11
^SCR("KLINC","G",6,"MUMPS1")

^SCR("KLINC","G",6,"MUMPS2")

^SCR("KLINC","G",6,"MUST")

^SCR("KLINC","G",6,"SHEM")
  wiy 'qn  
^SCR("KLINC","G",6,"TYP")
E
^SCR("KLINC","G",7,"CRD")
8,18,D,8,0
^SCR("KLINC","G",7,"HELP")

^SCR("KLINC","G",7,"LMAX")
8
^SCR("KLINC","G",7,"MUMPS1")

^SCR("KLINC","G",7,"MUMPS2")
D DATPR^KLINC
^SCR("KLINC","G",7,"MUST")

^SCR("KLINC","G",7,"SHEM")
 oerxtl 
^SCR("KLINC","G",7,"TYP")
D
^SCR("KLINC","G","DEL")
Y
^SCR("KLINC","G","MAX")
99999
^SCR("KLINC","G","NAME","BANK")
2
^SCR("KLINC","G","NAME","HESBON")
5
^SCR("KLINC","G","NAME","NCHECK")
6
^SCR("KLINC","G","NAME","PRAON")
7
^SCR("KLINC","G","NAME","SNIF")
3
^SCR("KLINC","G","NAME","SUM")
1
^SCR("KLINC","G","NAME","TZ")
4
^SCR("KLINC","G","NM",1)
SUM
^SCR("KLINC","G","NM",2)
BANK
^SCR("KLINC","G","NM",3)
SNIF
^SCR("KLINC","G","NM",4)
TZ
^SCR("KLINC","G","NM",5)
HESBON
^SCR("KLINC","G","NM",6)
NCHECK
^SCR("KLINC","G","NM",7)
PRAON
^SCR("KLINC","G","RB")
7,4,17,78
^SCR("KLINC","G","REF")
^MBG($P
^SCR("KLINC","G","RZD")
\
^SCR("KLINC","G","STEP")
1
^SCR("KLINC","G","STG")
         : oerxtl :  wiy 'qn  :  oeayg  :  zedf zcerz  :sipq:wpa:  mekq  :     
^SCR("KLINC","G","VG")
9
^SCR("KLINC","NAME")
dlaw
^SCR("KLINC","P",3,"CRD")
1,34,E,7,0
^SCR("KLINC","P",3,"HELP")
0 - ycg xtqn , <F7> - zecerz zbvd 
^SCR("KLINC","P",3,"LMAX")
8
^SCR("KLINC","P",3,"MUMPS1")
S:'$G(NUMBER) NUMBER=0
^SCR("KLINC","P",3,"MUMPS2")
D NUMBER^KLINC
^SCR("KLINC","P",3,"MUST")

^SCR("KLINC","P",3,"TYP")
E
^SCR("KLINC","P",4,"CRD")
1,29,E,3,0
^SCR("KLINC","P",4,"HELP")

^SCR("KLINC","P",4,"LMAX")
4
^SCR("KLINC","P",4,"MUMPS1")

^SCR("KLINC","P",4,"MUMPS2")

^SCR("KLINC","P",4,"OUTPUT")

^SCR("KLINC","P",4,"TYP")
E
^SCR("KLINC","P",5,"CRD")
3,58,D,8,0
^SCR("KLINC","P",5,"HELP")

^SCR("KLINC","P",5,"LMAX")
11
^SCR("KLINC","P",5,"MUMPS1")

^SCR("KLINC","P",5,"MUMPS2")

^SCR("KLINC","P",5,"MUST")

^SCR("KLINC","P",5,"OUTPUT")

^SCR("KLINC","P",5,"TYP")
D
^SCR("KLINC","P",7,"CHECK")
Y
^SCR("KLINC","P",7,"CRD")
3,33,E,14,0
^SCR("KLINC","P",7,"FNC")
F9
^SCR("KLINC","P",7,"GLOB")
LKH
^SCR("KLINC","P",7,"HELP")
<F9> - gewl qihxk zgizt , <F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("KLINC","P",7,"LMAX")
14
^SCR("KLINC","P",7,"MUMPS1")

^SCR("KLINC","P",7,"MUMPS2")
D STRING^KLINC
^SCR("KLINC","P",7,"MUST")

^SCR("KLINC","P",7,"NLN")
20
^SCR("KLINC","P",7,"RZD")
\
^SCR("KLINC","P",7,"TOPB")
8
^SCR("KLINC","P",7,"TYP")
E
^SCR("KLINC","P",7,"VRB")
LKH1
^SCR("KLINC","P",8,"CRD")
4,47,H,45,0
^SCR("KLINC","P",8,"HELP")

^SCR("KLINC","P",8,"LMAX")
45
^SCR("KLINC","P",8,"MUMPS1")

^SCR("KLINC","P",8,"MUMPS2")
I $G(%SCN)["LKH1" S ^[UCI]LKH=LKH1
^SCR("KLINC","P",8,"OUTPUT")

^SCR("KLINC","P",8,"TYP")
H
^SCR("KLINC","P",10,"CRD")
5,48,N,8,2
^SCR("KLINC","P",10,"HELP")

^SCR("KLINC","P",10,"LMAX")
8
^SCR("KLINC","P",10,"MUMPS1")

^SCR("KLINC","P",10,"MUMPS2")

^SCR("KLINC","P",10,"OUTPUT")

^SCR("KLINC","P",10,"TYP")
N
^SCR("KLINC","P",12,"CRD")
17,55,N,9,2
^SCR("KLINC","P",12,"HELP")

^SCR("KLINC","P",12,"LMAX")
12
^SCR("KLINC","P",12,"MUMPS1")

^SCR("KLINC","P",12,"MUMPS2")

^SCR("KLINC","P",12,"TYP")
N
^SCR("KLINC","P",13,"CRD")
17,27,N,7,2
^SCR("KLINC","P",13,"HELP")

^SCR("KLINC","P",13,"LMAX")
9
^SCR("KLINC","P",13,"MUMPS1")

^SCR("KLINC","P",13,"MUMPS2")

^SCR("KLINC","P",13,"TYP")
N
^SCR("KLINC","P",14,"CRD")
18,56,N,8,2
^SCR("KLINC","P",14,"HELP")

^SCR("KLINC","P",14,"LMAX")
11
^SCR("KLINC","P",14,"MUMPS1")

^SCR("KLINC","P",14,"MUMPS2")
I CAV D CA^KLINC
^SCR("KLINC","P",14,"TYP")
N
^SCR("KLINC","P",15,"CRD")
18,25,E,16,0
^SCR("KLINC","P",15,"HELP")

^SCR("KLINC","P",15,"LMAX")
20
^SCR("KLINC","P",15,"MUMPS1")

^SCR("KLINC","P",15,"MUMPS2")

^SCR("KLINC","P",15,"MUST")

^SCR("KLINC","P",15,"OUTPUT")

^SCR("KLINC","P",15,"TYP")
E
^SCR("KLINC","P",16,"CRD")
18,15,H,8
^SCR("KLINC","P",16,"HELP")

^SCR("KLINC","P",16,"LMAX")
8
^SCR("KLINC","P",16,"MUMPS1")

^SCR("KLINC","P",16,"MUMPS2")

^SCR("KLINC","P",16,"OUTPUT")

^SCR("KLINC","P",16,"TYP")
H
^SCR("KLINC","P",17,"CRD")
19,65,H,8
^SCR("KLINC","P",17,"HELP")

^SCR("KLINC","P",17,"LMAX")
8
^SCR("KLINC","P",17,"MUMPS1")

^SCR("KLINC","P",17,"MUMPS2")

^SCR("KLINC","P",17,"OUTPUT")

^SCR("KLINC","P",17,"TYP")
H
^SCR("KLINC","P",18,"CRD")
19,19,N,6,2
^SCR("KLINC","P",18,"HELP")

^SCR("KLINC","P",18,"LMAX")
6
^SCR("KLINC","P",18,"MUMPS1")

^SCR("KLINC","P",18,"MUMPS2")

^SCR("KLINC","P",18,"OUTPUT")

^SCR("KLINC","P",18,"TYP")
N
^SCR("KLINC","P",19,"CRD")
19,39,N,4,0
^SCR("KLINC","P",19,"HELP")

^SCR("KLINC","P",19,"LMAX")
4
^SCR("KLINC","P",19,"MUMPS1")

^SCR("KLINC","P",19,"MUMPS2")

^SCR("KLINC","P",19,"OUTPUT")

^SCR("KLINC","P",19,"TYP")
N
^SCR("KLINC","P",20,"CRD")
19,1,N,6,2
^SCR("KLINC","P",20,"HELP")

^SCR("KLINC","P",20,"LMAX")
7
^SCR("KLINC","P",20,"MUMPS1")

^SCR("KLINC","P",20,"MUMPS2")

^SCR("KLINC","P",20,"OUTPUT")

^SCR("KLINC","P",20,"TYP")
N
^SCR("KLINC","P",25,"CRD")
20,55,N,10,2
^SCR("KLINC","P",25,"HELP")

^SCR("KLINC","P",25,"LMAX")
12
^SCR("KLINC","P",25,"MUMPS1")

^SCR("KLINC","P",25,"MUMPS2")

^SCR("KLINC","P",25,"OUTPUT")

^SCR("KLINC","P",25,"TYP")
N
^SCR("KLINC","P",27,"CRD")
20,35,E,8,0
^SCR("KLINC","P",27,"HELP")

^SCR("KLINC","P",27,"LMAX")
11
^SCR("KLINC","P",27,"MUMPS1")

^SCR("KLINC","P",27,"MUMPS2")

^SCR("KLINC","P",27,"OUTPUT")

^SCR("KLINC","P",27,"TYP")
E
^SCR("KLINC","P",30,"CRD")
21,68,HH,50*2
^SCR("KLINC","P",30,"HELP")

^SCR("KLINC","P",30,"LMAX")
54
^SCR("KLINC","P",30,"MUMPS1")

^SCR("KLINC","P",30,"MUMPS2")

^SCR("KLINC","P",30,"TYP")
HH
^SCR("KLINC","P","NAME","CAV")
14
^SCR("KLINC","P","NAME","DAT21")
5
^SCR("KLINC","P","NAME","ITRA")
27
^SCR("KLINC","P","NAME","ITRA1")
10
^SCR("KLINC","P","NAME","LKH1")
8
^SCR("KLINC","P","NAME","MASMK")
13
^SCR("KLINC","P","NAME","MZMN")
12
^SCR("KLINC","P","NAME","NCA")
15
^SCR("KLINC","P","NAME","NUMBER")
3
^SCR("KLINC","P","NAME","P11")
18
^SCR("KLINC","P","NAME","PC1")
20
^SCR("KLINC","P","NAME","PN1")
19
^SCR("KLINC","P","NAME","PRATIM")
30
^SCR("KLINC","P","NAME","SNIF")
4
^SCR("KLINC","P","NAME","STRING")
7
^SCR("KLINC","P","NAME","SUGA")
17
^SCR("KLINC","P","NAME","SUGI")
16
^SCR("KLINC","P","NAME","SUMTZ1")
25
^SCR("KLINC","P","NM",3)
NUMBER
^SCR("KLINC","P","NM",4)
SNIF
^SCR("KLINC","P","NM",5)
DAT21
^SCR("KLINC","P","NM",7)
STRING
^SCR("KLINC","P","NM",8)
LKH1
^SCR("KLINC","P","NM",10)
ITRA1
^SCR("KLINC","P","NM",12)
MZMN
^SCR("KLINC","P","NM",13)
MASMK
^SCR("KLINC","P","NM",14)
CAV
^SCR("KLINC","P","NM",15)
NCA
^SCR("KLINC","P","NM",16)
SUGI
^SCR("KLINC","P","NM",17)
SUGA
^SCR("KLINC","P","NM",18)
P11
^SCR("KLINC","P","NM",19)
PN1
^SCR("KLINC","P","NM",20)
PC1
^SCR("KLINC","P","NM",25)
SUMTZ1
^SCR("KLINC","P","NM",27)
ITRA
^SCR("KLINC","P","NM",30)
PRATIM
^SCR("KLINC1")
H
^SCR("KLINC1",1)
                                                            {03     } 'qn dlaw 
^SCR("KLINC1",2)
                                                                               
^SCR("KLINC1",3)
                                                            {05        : jix`z 
^SCR("KLINC1",4)
                                                       {07           :gewl 'qn 
^SCR("KLINC1",5)
                                          {                       08}: gewl my 
^SCR("KLINC1",6)
                                                         {10     }: zncew dxzi 
^SCR("KLINC1",7)
                                                                            1$ 
^SCR("KLINC1",8)
                                                :  oeayg  :sipq:wpa:  mekq  :  
^SCR("KLINC1",9)
                                                        \ oerxtl \  wiy 'qn \  
^SCR("KLINC1",10)
                                                                               
^SCR("KLINC1",11)
                                                                               
^SCR("KLINC1",12)
                                                                               
^SCR("KLINC1",13)
                                                                               
^SCR("KLINC1",14)
                                            $1                                 
^SCR("KLINC1",15)
                                                       {12         }:    enefn 
^SCR("KLINC1",16)
                                                            {13      } xewn qn 
^SCR("KLINC1",17)
                                                                               
^SCR("KLINC1",18)
                                                        {14        }:`"ka mley 
^SCR("KLINC1",19)
                                                {15                 }: `"k 'qn 
^SCR("KLINC1",20)
                                       {19 }:'lyz zenk  {        17}:i`xy` beq 
^SCR("KLINC1",21)
                                         {20    }:'lyz x`y {18   }:oey`x melyz 
^SCR("KLINC1",22)
                                                                               
^SCR("KLINC1","A",1)
'‘Ž„Œ�—
^SCR("KLINC1","A",2)

^SCR("KLINC1","A",3)
:Š‰˜€š
^SCR("KLINC1","A",4)
:‡…—Œ'‘Ž
^SCR("KLINC1","A",5)
:‡…—Œ�™
^SCR("KLINC1","A",6)
:šŽƒ…—„˜š‰
^SCR("KLINC1","A",7)

^SCR("KLINC1","A",8)
�…�™‡“‰�‘—���…‹‘
^SCR("KLINC1","A",9)
�…’˜”Œ—‰™'‘Ž
^SCR("KLINC1","A",10)
------------------------
^SCR("KLINC1","A",11)

^SCR("KLINC1","A",12)

^SCR("KLINC1","A",13)

^SCR("KLINC1","A",14)

^SCR("KLINC1","A",15)
:…Ž…†Ž
^SCR("KLINC1","A",16)
˜…—Ž‘Ž
^SCR("KLINC1","A",17)

^SCR("KLINC1","A",18)
:€"‹��Œ…™
^SCR("KLINC1","A",19)
:€"‹'‘Ž
^SCR("KLINC1","A",20)
:'Œ™šš…Ž‹:‰€˜™€‚…‘
^SCR("KLINC1","A",21)
:'Œ™š˜€™:�…™€˜�…Œ™š
^SCR("KLINC1","A",22)

^SCR("KLINC1","AV",1)
wxnvkce
^SCR("KLINC1","AV",2)

^SCR("KLINC1","AV",3)
:lhrt,
^SCR("KLINC1","AV",4)
:juekwxn
^SCR("KLINC1","AV",5)
:juekoa
^SCR("KLINC1","AV",6)
:,nsuevr,h
^SCR("KLINC1","AV",7)

^SCR("KLINC1","AV",8)
iucaj;hbxebcoufx
^SCR("KLINC1","AV",9)
iugrpkehawxn
^SCR("KLINC1","AV",10)
------------------------
^SCR("KLINC1","AV",11)

^SCR("KLINC1","AV",12)

^SCR("KLINC1","AV",13)

^SCR("KLINC1","AV",14)

^SCR("KLINC1","AV",15)
:unuzn
^SCR("KLINC1","AV",16)
ruenxn
^SCR("KLINC1","AV",17)

^SCR("KLINC1","AV",18)
:t"fcokua
^SCR("KLINC1","AV",19)
:t"fwxn
^SCR("KLINC1","AV",20)
:wka,,unf:htratdux
^SCR("KLINC1","AV",21)
:wka,rta:iuatrouka,
^SCR("KLINC1","AV",22)

^SCR("KLINC1","G",1,"CRD")
10,76,E,7,0
^SCR("KLINC1","G",1,"HELP")

^SCR("KLINC1","G",1,"LMAX")
8
^SCR("KLINC1","G",1,"MUMPS1")

^SCR("KLINC1","G",1,"MUMPS2")
S SUM=$J(SUM,2,2)
^SCR("KLINC1","G",1,"MUST")

^SCR("KLINC1","G",1,"SHEM")
  mekq  
^SCR("KLINC1","G",1,"TYP")
E
^SCR("KLINC1","G",2,"CRD")
10,67,E,2,0
^SCR("KLINC1","G",2,"HELP")

^SCR("KLINC1","G",2,"LMAX")
3
^SCR("KLINC1","G",2,"MUMPS1")

^SCR("KLINC1","G",2,"MUMPS2")

^SCR("KLINC1","G",2,"MUST")

^SCR("KLINC1","G",2,"SHEM")
wpa
^SCR("KLINC1","G",2,"TYP")
E
^SCR("KLINC1","G",3,"CRD")
10,63,E,3,0
^SCR("KLINC1","G",3,"HELP")

^SCR("KLINC1","G",3,"LMAX")
4
^SCR("KLINC1","G",3,"MUMPS1")

^SCR("KLINC1","G",3,"MUMPS2")

^SCR("KLINC1","G",3,"MUST")

^SCR("KLINC1","G",3,"SHEM")
sipq
^SCR("KLINC1","G",3,"TYP")
E
^SCR("KLINC1","G",4,"CRD")
10,58,E,9,0
^SCR("KLINC1","G",4,"HELP")

^SCR("KLINC1","G",4,"LMAX")
9
^SCR("KLINC1","G",4,"MUMPS1")

^SCR("KLINC1","G",4,"MUMPS2")
D TZ^KLINC
^SCR("KLINC1","G",4,"MUST")

^SCR("KLINC1","G",4,"SHEM")
  oeayg  
^SCR("KLINC1","G",4,"TYP")
E
^SCR("KLINC1","G",5,"CRD")
10,+76,E,9,0
^SCR("KLINC1","G",5,"HELP")

^SCR("KLINC1","G",5,"LMAX")
10
^SCR("KLINC1","G",5,"MUMPS1")

^SCR("KLINC1","G",5,"MUMPS2")
D HSB^KLINC
^SCR("KLINC1","G",5,"MUST")

^SCR("KLINC1","G",5,"SHEM")
  wiy 'qn 
^SCR("KLINC1","G",5,"TYP")
E
^SCR("KLINC1","G",6,"CRD")
10,+65,E,8,0
^SCR("KLINC1","G",6,"HELP")

^SCR("KLINC1","G",6,"LMAX")
8
^SCR("KLINC1","G",6,"MUMPS1")

^SCR("KLINC1","G",6,"MUMPS2")

^SCR("KLINC1","G",6,"MUST")

^SCR("KLINC1","G",6,"SHEM")
 oerxtl 
^SCR("KLINC1","G",6,"TYP")
E
^SCR("KLINC1","G","DEL")
Y
^SCR("KLINC1","G","MAX")
99999
^SCR("KLINC1","G","NAME","BANK")
2
^SCR("KLINC1","G","NAME","HESBON")
5
^SCR("KLINC1","G","NAME","NCHECK")
6
^SCR("KLINC1","G","NAME","SNIF")
3
^SCR("KLINC1","G","NAME","SUM")
1
^SCR("KLINC1","G","NAME","TZ")
4
^SCR("KLINC1","G","NM",1)
SUM
^SCR("KLINC1","G","NM",2)
BANK
^SCR("KLINC1","G","NM",3)
SNIF
^SCR("KLINC1","G","NM",4)
TZ
^SCR("KLINC1","G","NM",5)
HESBON
^SCR("KLINC1","G","NM",6)
NCHECK
^SCR("KLINC1","G","RB")
8,45,15,78
^SCR("KLINC1","G","REF")
^MBG(%REM
^SCR("KLINC1","G","RZD")
\
^SCR("KLINC1","G","STEP")
2
^SCR("KLINC1","G","STG")
                                                :  oeayg  :sipq:wpa:  mekq  :  
^SCR("KLINC1","G","VG")
11
^SCR("KLINC1","NAME")

^SCR("KLINC1","P",3,"CRD")
1,60,E,7,0
^SCR("KLINC1","P",3,"HELP")
0 - ycg xtqn , <F7> - zecerz zbvd 
^SCR("KLINC1","P",3,"LMAX")
8
^SCR("KLINC1","P",3,"MUMPS1")

^SCR("KLINC1","P",3,"MUMPS2")
D NUMBER^KLINC
^SCR("KLINC1","P",3,"MUST")

^SCR("KLINC1","P",3,"TYP")
E
^SCR("KLINC1","P",5,"CRD")
3,60,D,8,0
^SCR("KLINC1","P",5,"HELP")

^SCR("KLINC1","P",5,"LMAX")
11
^SCR("KLINC1","P",5,"MUMPS1")
I '$G(DAT21) S DAT21=$TR($$^%L1DC(P1DZ,1),"/","")
^SCR("KLINC1","P",5,"MUMPS2")
S DAT2=$$^%L1DC(DAT21,2),DAT0=$$^%L1DC($$^%L1DC($H,1),2)
^SCR("KLINC1","P",5,"MUST")

^SCR("KLINC1","P",5,"TYP")
D
^SCR("KLINC1","P",7,"CHECK")
Y
^SCR("KLINC1","P",7,"CRD")
4,55,E,14,0
^SCR("KLINC1","P",7,"FNC")

^SCR("KLINC1","P",7,"GLOB")
LKH
^SCR("KLINC1","P",7,"HELP")

^SCR("KLINC1","P",7,"LMAX")
14
^SCR("KLINC1","P",7,"MUMPS1")

^SCR("KLINC1","P",7,"MUMPS2")
D STRING^KLINC
^SCR("KLINC1","P",7,"MUST")

^SCR("KLINC1","P",7,"NLN")
20
^SCR("KLINC1","P",7,"RZD")
\
^SCR("KLINC1","P",7,"TOPB")
8
^SCR("KLINC1","P",7,"TYP")
E
^SCR("KLINC1","P",7,"VRB")
LKH1
^SCR("KLINC1","P",8,"CRD")
5,69,H,20
^SCR("KLINC1","P",8,"HELP")

^SCR("KLINC1","P",8,"LMAX")
26
^SCR("KLINC1","P",8,"MUMPS1")

^SCR("KLINC1","P",8,"MUMPS2")
I $G(%SCN)["LKH1" S ^[UCI]LKH=LKH1
^SCR("KLINC1","P",8,"OUTPUT")

^SCR("KLINC1","P",8,"TYP")
H
^SCR("KLINC1","P",10,"CRD")
6,57,N,8,2
^SCR("KLINC1","P",10,"HELP")

^SCR("KLINC1","P",10,"LMAX")
8
^SCR("KLINC1","P",10,"MUMPS1")

^SCR("KLINC1","P",10,"MUMPS2")

^SCR("KLINC1","P",10,"OUTPUT")

^SCR("KLINC1","P",10,"TYP")
N
^SCR("KLINC1","P",12,"CRD")
15,55,N,9,2
^SCR("KLINC1","P",12,"HELP")

^SCR("KLINC1","P",12,"LMAX")
12
^SCR("KLINC1","P",12,"MUMPS1")

^SCR("KLINC1","P",12,"MUMPS2")

^SCR("KLINC1","P",12,"TYP")
N
^SCR("KLINC1","P",13,"CRD")
16,60,N,7,2
^SCR("KLINC1","P",13,"HELP")

^SCR("KLINC1","P",13,"LMAX")
9
^SCR("KLINC1","P",13,"MUMPS1")

^SCR("KLINC1","P",13,"MUMPS2")

^SCR("KLINC1","P",13,"TYP")
N
^SCR("KLINC1","P",14,"CRD")
18,56,N,8,2
^SCR("KLINC1","P",14,"HELP")

^SCR("KLINC1","P",14,"LMAX")
11
^SCR("KLINC1","P",14,"MUMPS1")

^SCR("KLINC1","P",14,"MUMPS2")
I CA D CA^KLINC
^SCR("KLINC1","P",14,"TYP")
N
^SCR("KLINC1","P",15,"CRD")
19,48,E,16,0
^SCR("KLINC1","P",15,"HELP")

^SCR("KLINC1","P",15,"LMAX")
20
^SCR("KLINC1","P",15,"MUMPS1")

^SCR("KLINC1","P",15,"MUMPS2")

^SCR("KLINC1","P",15,"MUST")

^SCR("KLINC1","P",15,"OUTPUT")

^SCR("KLINC1","P",15,"TYP")
E
^SCR("KLINC1","P",17,"CRD")
20,68,H,8
^SCR("KLINC1","P",17,"HELP")

^SCR("KLINC1","P",17,"LMAX")
11
^SCR("KLINC1","P",17,"MUMPS1")

^SCR("KLINC1","P",17,"MUMPS2")

^SCR("KLINC1","P",17,"OUTPUT")

^SCR("KLINC1","P",17,"TYP")
H
^SCR("KLINC1","P",18,"CRD")
21,59,N,6,2
^SCR("KLINC1","P",18,"HELP")

^SCR("KLINC1","P",18,"LMAX")
6
^SCR("KLINC1","P",18,"MUMPS1")

^SCR("KLINC1","P",18,"MUMPS2")

^SCR("KLINC1","P",18,"OUTPUT")

^SCR("KLINC1","P",18,"TYP")
N
^SCR("KLINC1","P",19,"CRD")
20,39,N,4,0
^SCR("KLINC1","P",19,"HELP")

^SCR("KLINC1","P",19,"LMAX")
4
^SCR("KLINC1","P",19,"MUMPS1")

^SCR("KLINC1","P",19,"MUMPS2")

^SCR("KLINC1","P",19,"OUTPUT")

^SCR("KLINC1","P",19,"TYP")
N
^SCR("KLINC1","P",20,"CRD")
21,41,N,6,2
^SCR("KLINC1","P",20,"HELP")

^SCR("KLINC1","P",20,"LMAX")
7
^SCR("KLINC1","P",20,"MUMPS1")

^SCR("KLINC1","P",20,"MUMPS2")

^SCR("KLINC1","P",20,"OUTPUT")

^SCR("KLINC1","P",20,"TYP")
N
^SCR("KLINC1","P","NAME","CA")
14
^SCR("KLINC1","P","NAME","DAT21")
5
^SCR("KLINC1","P","NAME","ITRA1")
10
^SCR("KLINC1","P","NAME","LKH1")
8
^SCR("KLINC1","P","NAME","MASMK")
13
^SCR("KLINC1","P","NAME","MZMN")
12
^SCR("KLINC1","P","NAME","NCA")
15
^SCR("KLINC1","P","NAME","NUMBER")
3
^SCR("KLINC1","P","NAME","P11")
18
^SCR("KLINC1","P","NAME","PC1")
20
^SCR("KLINC1","P","NAME","PN1")
19
^SCR("KLINC1","P","NAME","STRING")
7
^SCR("KLINC1","P","NAME","SUGA")
17
^SCR("KLINC1","P","NM",3)
NUMBER
^SCR("KLINC1","P","NM",5)
DAT21
^SCR("KLINC1","P","NM",7)
STRING
^SCR("KLINC1","P","NM",8)
LKH1
^SCR("KLINC1","P","NM",10)
ITRA1
^SCR("KLINC1","P","NM",12)
MZMN
^SCR("KLINC1","P","NM",13)
MASMK
^SCR("KLINC1","P","NM",14)
CA
^SCR("KLINC1","P","NM",15)
NCA
^SCR("KLINC1","P","NM",17)
SUGA
^SCR("KLINC1","P","NM",18)
P11
^SCR("KLINC1","P","NM",19)
PN1
^SCR("KLINC1","P","NM",20)
PC1
^SCR("KLINC2")
H
^SCR("KLINC2",1)
                                                            {03     } 'qn dlaw 
^SCR("KLINC2",2)
                                                                               
^SCR("KLINC2",3)
                                                            {05        : jix`z 
^SCR("KLINC2",4)
                                                       {07           :gewl 'qn 
^SCR("KLINC2",5)
                                          {                       08}: gewl my 
^SCR("KLINC2",6)
                                                                               
^SCR("KLINC2",7)
                                                       {12         }:    enefn 
^SCR("KLINC2",8)
                                                                               
^SCR("KLINC2",9)
                                                        {14        }:`"ka mley 
^SCR("KLINC2",10)
                                                {15                 }: `"k 'qn 
^SCR("KLINC2",11)
                                          {19 }:'lyz zenk  {     17}:i`xy` beq 
^SCR("KLINC2",12)
                                         {20    }:'lyz x`y {18   }:oey`x melyz 
^SCR("KLINC2",13)
                                                                               
^SCR("KLINC2","A",1)
'‘Ž„Œ�—
^SCR("KLINC2","A",2)

^SCR("KLINC2","A",3)
:Š‰˜€š
^SCR("KLINC2","A",4)
:‡…—Œ'‘Ž
^SCR("KLINC2","A",5)
:‡…—Œ�™
^SCR("KLINC2","A",6)

^SCR("KLINC2","A",7)
:…Ž…†Ž
^SCR("KLINC2","A",8)

^SCR("KLINC2","A",9)
:€"‹��Œ…™
^SCR("KLINC2","A",10)
:€"‹'‘Ž
^SCR("KLINC2","A",11)
:'Œ™šš…Ž‹:‰€˜™€‚…‘
^SCR("KLINC2","A",12)
:'Œ™š˜€™:�…™€˜�…Œ™š
^SCR("KLINC2","A",13)

^SCR("KLINC2","AV",1)
wxnvkce
^SCR("KLINC2","AV",2)

^SCR("KLINC2","AV",3)
:lhrt,
^SCR("KLINC2","AV",4)
:juekwxn
^SCR("KLINC2","AV",5)
:juekoa
^SCR("KLINC2","AV",6)

^SCR("KLINC2","AV",7)
:unuzn
^SCR("KLINC2","AV",8)

^SCR("KLINC2","AV",9)
:t"fcokua
^SCR("KLINC2","AV",10)
:t"fwxn
^SCR("KLINC2","AV",11)
:wka,,unf:htratdux
^SCR("KLINC2","AV",12)
:wka,rta:iuatrouka,
^SCR("KLINC2","AV",13)

^SCR("KLINC2","NAME")

^SCR("KLINC2","P",3,"CRD")
1,60,E,7,0
^SCR("KLINC2","P",3,"HELP")
0 - ycg xtqn , <F7> - zecerz zbvd 
^SCR("KLINC2","P",3,"LMAX")
8
^SCR("KLINC2","P",3,"MUMPS1")

^SCR("KLINC2","P",3,"MUMPS2")
D NUMBER^KLINC
^SCR("KLINC2","P",3,"MUST")

^SCR("KLINC2","P",3,"TYP")
E
^SCR("KLINC2","P",5,"CRD")
3,60,D,8,0
^SCR("KLINC2","P",5,"HELP")

^SCR("KLINC2","P",5,"LMAX")
11
^SCR("KLINC2","P",5,"MUMPS1")
I '$G(DAT21) S DAT21=$TR($$^%L1DC(P1DZ,1),"/","")
^SCR("KLINC2","P",5,"MUMPS2")
S DAT2=$$^%L1DC(DAT21,2),DAT0=$$^%L1DC($$^%L1DC($H,1),2)
^SCR("KLINC2","P",5,"MUST")

^SCR("KLINC2","P",5,"TYP")
D
^SCR("KLINC2","P",7,"CHECK")
Y
^SCR("KLINC2","P",7,"CRD")
4,55,E,14,0
^SCR("KLINC2","P",7,"FNC")

^SCR("KLINC2","P",7,"GLOB")
LKH
^SCR("KLINC2","P",7,"HELP")

^SCR("KLINC2","P",7,"LMAX")
14
^SCR("KLINC2","P",7,"MUMPS1")

^SCR("KLINC2","P",7,"MUMPS2")
D STRING^KLINC
^SCR("KLINC2","P",7,"MUST")

^SCR("KLINC2","P",7,"NLN")
20
^SCR("KLINC2","P",7,"RZD")
\
^SCR("KLINC2","P",7,"TOPB")
8
^SCR("KLINC2","P",7,"TYP")
E
^SCR("KLINC2","P",7,"VRB")
LKH1
^SCR("KLINC2","P",8,"CRD")
5,69,H,20
^SCR("KLINC2","P",8,"HELP")

^SCR("KLINC2","P",8,"LMAX")
26
^SCR("KLINC2","P",8,"MUMPS1")

^SCR("KLINC2","P",8,"MUMPS2")
I $G(%SCN)["LKH1" S ^[UCI]LKH=LKH1
^SCR("KLINC2","P",8,"OUTPUT")

^SCR("KLINC2","P",8,"TYP")
H
^SCR("KLINC2","P",12,"CRD")
7,55,N,9,2
^SCR("KLINC2","P",12,"HELP")

^SCR("KLINC2","P",12,"LMAX")
12
^SCR("KLINC2","P",12,"MUMPS1")

^SCR("KLINC2","P",12,"MUMPS2")

^SCR("KLINC2","P",12,"TYP")
N
^SCR("KLINC2","P",14,"CRD")
9,56,N,8,2
^SCR("KLINC2","P",14,"HELP")

^SCR("KLINC2","P",14,"LMAX")
11
^SCR("KLINC2","P",14,"MUMPS1")

^SCR("KLINC2","P",14,"MUMPS2")
I CA D CA^KLINC
^SCR("KLINC2","P",14,"TYP")
N
^SCR("KLINC2","P",15,"CRD")
10,48,E,16,0
^SCR("KLINC2","P",15,"HELP")

^SCR("KLINC2","P",15,"LMAX")
20
^SCR("KLINC2","P",15,"MUMPS1")

^SCR("KLINC2","P",15,"MUMPS2")

^SCR("KLINC2","P",15,"MUST")

^SCR("KLINC2","P",15,"OUTPUT")

^SCR("KLINC2","P",15,"TYP")
E
^SCR("KLINC2","P",17,"CRD")
11,68,H,8
^SCR("KLINC2","P",17,"HELP")

^SCR("KLINC2","P",17,"LMAX")
8
^SCR("KLINC2","P",17,"MUMPS1")

^SCR("KLINC2","P",17,"MUMPS2")

^SCR("KLINC2","P",17,"OUTPUT")

^SCR("KLINC2","P",17,"TYP")
H
^SCR("KLINC2","P",18,"CRD")
12,59,N,6,2
^SCR("KLINC2","P",18,"HELP")

^SCR("KLINC2","P",18,"LMAX")
6
^SCR("KLINC2","P",18,"MUMPS1")

^SCR("KLINC2","P",18,"MUMPS2")

^SCR("KLINC2","P",18,"OUTPUT")

^SCR("KLINC2","P",18,"TYP")
N
^SCR("KLINC2","P",19,"CRD")
11,42,N,4,0
^SCR("KLINC2","P",19,"HELP")

^SCR("KLINC2","P",19,"LMAX")
4
^SCR("KLINC2","P",19,"MUMPS1")

^SCR("KLINC2","P",19,"MUMPS2")

^SCR("KLINC2","P",19,"OUTPUT")

^SCR("KLINC2","P",19,"TYP")
N
^SCR("KLINC2","P",20,"CRD")
12,41,N,6,2
^SCR("KLINC2","P",20,"HELP")

^SCR("KLINC2","P",20,"LMAX")
7
^SCR("KLINC2","P",20,"MUMPS1")

^SCR("KLINC2","P",20,"MUMPS2")

^SCR("KLINC2","P",20,"OUTPUT")

^SCR("KLINC2","P",20,"TYP")
N
^SCR("KLINC2","P","NAME","CA")
14
^SCR("KLINC2","P","NAME","DAT21")
5
^SCR("KLINC2","P","NAME","LKH1")
8
^SCR("KLINC2","P","NAME","MZMN")
12
^SCR("KLINC2","P","NAME","NCA")
15
^SCR("KLINC2","P","NAME","NUMBER")
3
^SCR("KLINC2","P","NAME","P11")
18
^SCR("KLINC2","P","NAME","PC1")
20
^SCR("KLINC2","P","NAME","PN1")
19
^SCR("KLINC2","P","NAME","STRING")
7
^SCR("KLINC2","P","NAME","SUGA")
17
^SCR("KLINC2","P","NM",3)
NUMBER
^SCR("KLINC2","P","NM",5)
DAT21
^SCR("KLINC2","P","NM",7)
STRING
^SCR("KLINC2","P","NM",8)
LKH1
^SCR("KLINC2","P","NM",12)
MZMN
^SCR("KLINC2","P","NM",14)
CA
^SCR("KLINC2","P","NM",15)
NCA
^SCR("KLINC2","P","NM",17)
SUGA
^SCR("KLINC2","P","NM",18)
P11
^SCR("KLINC2","P","NM",19)
PN1
^SCR("KLINC2","P","NM",20)
PC1
^SCR("KLMDSV2")
H
^SCR("KLMDSV2",1)
            # iz`eeyd zegewl zeipw g"ec #                                      
^SCR("KLMDSV2",2)
              {02     } jix`z cr  {01     } jix`zn : (1)  zncew dtewz          
^SCR("KLMDSV2",3)
                        {05      }  mekq cr        {04      }:  mekqn          
^SCR("KLMDSV2",4)
              {11     } jix`z cr  {10     } jix`zn : (2) zigkep dtewz          
^SCR("KLMDSV2",5)
                        {20      }  mekq cr        {15      }:  mekqn          
^SCR("KLMDSV2",6)
                                                                            1$ 
^SCR("KLMDSV2",7)
     :   yxtd   :(2) zeipw k"dq:(1) zeipw k"dq:     gewl my    : gewl 'qn :    
^SCR("KLMDSV2",8)
                                                                               
^SCR("KLMDSV2",9)
                                                                               
^SCR("KLMDSV2",10)
                                                                               
^SCR("KLMDSV2",11)
                                                                               
^SCR("KLMDSV2",12)
                                                                               
^SCR("KLMDSV2",13)
                                                                               
^SCR("KLMDSV2",14)
                                                                               
^SCR("KLMDSV2",15)
                                                                               
^SCR("KLMDSV2",16)
                                                                               
^SCR("KLMDSV2",17)
                                                                               
^SCR("KLMDSV2",18)
                                                                               
^SCR("KLMDSV2",19)
                                                                               
^SCR("KLMDSV2",20)
                                                                               
^SCR("KLMDSV2",21)
 $1                                                                            
^SCR("KLMDSV2",22)
      {50       }    {45      }      {40       }                               
^SCR("KLMDSV2","A",1)
‰š€……™„š…‡…—Œš…‰�—‡"…ƒ
^SCR("KLMDSV2","A",2)
Š‰˜€šƒ’Š‰˜€šŽ:(1)šŽƒ…—„”…—š
^SCR("KLMDSV2","A",3)
�…‹‘ƒ’:�…‹‘Ž
^SCR("KLMDSV2","A",4)
Š‰˜€šƒ’Š‰˜€šŽ:(2)š‰‡‹…�„”…—š
^SCR("KLMDSV2","A",5)
�…‹‘ƒ’:�…‹‘Ž
^SCR("KLMDSV2","A",6)

^SCR("KLMDSV2","A",7)
™˜”„(2)š…‰�—‹"„‘(1)š…‰�—‹"„‘‡…—Œ�™‡…—Œ'‘Ž
^SCR("KLMDSV2","A",8)
----------------------------------------------------------------
^SCR("KLMDSV2","A",9)

^SCR("KLMDSV2","A",10)

^SCR("KLMDSV2","A",11)

^SCR("KLMDSV2","A",12)

^SCR("KLMDSV2","A",13)

^SCR("KLMDSV2","A",14)

^SCR("KLMDSV2","A",15)

^SCR("KLMDSV2","A",16)

^SCR("KLMDSV2","A",17)

^SCR("KLMDSV2","A",18)

^SCR("KLMDSV2","A",19)

^SCR("KLMDSV2","A",20)

^SCR("KLMDSV2","A",21)

^SCR("KLMDSV2","A",22)

^SCR("KLMDSV2","AV",1)
h,tuuav,ujuek,uhbej"us
^SCR("KLMDSV2","AV",2)
lhrt,sglhrt,n:(1),nsuevpue,
^SCR("KLMDSV2","AV",3)
oufxsg:oufxn
^SCR("KLMDSV2","AV",4)
lhrt,sglhrt,n:(2),hjfubvpue,
^SCR("KLMDSV2","AV",5)
oufxsg:oufxn
^SCR("KLMDSV2","AV",6)

^SCR("KLMDSV2","AV",7)
arpv(2),uhbef"vx(1),uhbef"vxjuekoajuekwxn
^SCR("KLMDSV2","AV",8)
----------------------------------------------------------------
^SCR("KLMDSV2","AV",9)

^SCR("KLMDSV2","AV",10)

^SCR("KLMDSV2","AV",11)

^SCR("KLMDSV2","AV",12)

^SCR("KLMDSV2","AV",13)

^SCR("KLMDSV2","AV",14)

^SCR("KLMDSV2","AV",15)

^SCR("KLMDSV2","AV",16)

^SCR("KLMDSV2","AV",17)

^SCR("KLMDSV2","AV",18)

^SCR("KLMDSV2","AV",19)

^SCR("KLMDSV2","AV",20)

^SCR("KLMDSV2","AV",21)

^SCR("KLMDSV2","AV",22)

^SCR("KLMDSV2","G",1,"CRD")
8,74,E,10,0
^SCR("KLMDSV2","G",1,"HELP")
<F10> - gewl qihxk bivdl ,<F9> - zerepz bivdl ,<F8> - oiinl
^SCR("KLMDSV2","G",1,"LMAX")
10
^SCR("KLMDSV2","G",1,"MUMPS1")

^SCR("KLMDSV2","G",1,"MUMPS2")
D LKH^KLMDSV2
^SCR("KLMDSV2","G",1,"SHEM")
 gewl 'qn 
^SCR("KLMDSV2","G",1,"TYP")
E
^SCR("KLMDSV2","G",2,"CRD")
8,63,H,16,0
^SCR("KLMDSV2","G",2,"HELP")

^SCR("KLMDSV2","G",2,"LMAX")
16
^SCR("KLMDSV2","G",2,"MUMPS1")

^SCR("KLMDSV2","G",2,"MUMPS2")

^SCR("KLMDSV2","G",2,"OUTPUT")

^SCR("KLMDSV2","G",2,"SHEM")
     gewl my    
^SCR("KLMDSV2","G",2,"TYP")
H
^SCR("KLMDSV2","G",3,"CRD")
8,46,N,10,2
^SCR("KLMDSV2","G",3,"HELP")
<F9> - zerepz bivdl
^SCR("KLMDSV2","G",3,"LMAX")
14
^SCR("KLMDSV2","G",3,"MUMPS1")

^SCR("KLMDSV2","G",3,"MUMPS2")
D SUM1^KLMDSV2
^SCR("KLMDSV2","G",3,"SHEM")
(1) zeipw k"dq
^SCR("KLMDSV2","G",3,"TYP")
N
^SCR("KLMDSV2","G",4,"CRD")
8,31,N,10,2
^SCR("KLMDSV2","G",4,"HELP")
<F9> - zerepz bivdl
^SCR("KLMDSV2","G",4,"LMAX")
14
^SCR("KLMDSV2","G",4,"MUMPS1")

^SCR("KLMDSV2","G",4,"MUMPS2")
D SUM2^KLMDSV2
^SCR("KLMDSV2","G",4,"SHEM")
(2) zeipw k"dq
^SCR("KLMDSV2","G",4,"TYP")
N
^SCR("KLMDSV2","G",5,"CRD")
8,16,N,10,2
^SCR("KLMDSV2","G",5,"HELP")

^SCR("KLMDSV2","G",5,"LMAX")
10
^SCR("KLMDSV2","G",5,"MUMPS1")

^SCR("KLMDSV2","G",5,"MUMPS2")

^SCR("KLMDSV2","G",5,"OUTPUT")

^SCR("KLMDSV2","G",5,"SHEM")
   yxtd   
^SCR("KLMDSV2","G",5,"TYP")
N
^SCR("KLMDSV2","G","MAX")
2
^SCR("KLMDSV2","G","NAME","HFR")
5
^SCR("KLMDSV2","G","NAME","LKH")
1
^SCR("KLMDSV2","G","NAME","LKH1")
2
^SCR("KLMDSV2","G","NAME","SUM1")
3
^SCR("KLMDSV2","G","NAME","SUM2")
4
^SCR("KLMDSV2","G","NM",1)
LKH
^SCR("KLMDSV2","G","NM",2)
LKH1
^SCR("KLMDSV2","G","NM",3)
SUM1
^SCR("KLMDSV2","G","NM",4)
SUM2
^SCR("KLMDSV2","G","NM",5)
HFR
^SCR("KLMDSV2","G","RB")
7,2,22,78
^SCR("KLMDSV2","G","REF")
^TEMP($P
^SCR("KLMDSV2","G","RZD")
\
^SCR("KLMDSV2","G","STEP")
1
^SCR("KLMDSV2","G","STG")
     :   yxtd   :(2) zeipw k"dq:(1) zeipw k"dq:     gewl my    : gewl 'qn :    
^SCR("KLMDSV2","G","VG")
9
^SCR("KLMDSV2","NAME")

^SCR("KLMDSV2","P",1,"CRD")
2,34,D,8,0
^SCR("KLMDSV2","P",1,"HELP")

^SCR("KLMDSV2","P",1,"LMAX")
8
^SCR("KLMDSV2","P",1,"MUMPS1")

^SCR("KLMDSV2","P",1,"MUMPS2")

^SCR("KLMDSV2","P",1,"MUST")

^SCR("KLMDSV2","P",1,"TYP")
D
^SCR("KLMDSV2","P",2,"CRD")
2,14,D,8,0
^SCR("KLMDSV2","P",2,"HELP")

^SCR("KLMDSV2","P",2,"LMAX")
8
^SCR("KLMDSV2","P",2,"MUMPS1")

^SCR("KLMDSV2","P",2,"MUMPS2")
I $$^%L1DC(DAT12,3)<$$^%L1DC(DAT11,3) S %SC("ER")=1
^SCR("KLMDSV2","P",2,"MUST")

^SCR("KLMDSV2","P",2,"TYP")
D
^SCR("KLMDSV2","P",4,"CRD")
3,51,N,9,2
^SCR("KLMDSV2","P",4,"HELP")

^SCR("KLMDSV2","P",4,"LMAX")
9
^SCR("KLMDSV2","P",4,"MUMPS1")
S:'$G(SUM1) SUM1=1
^SCR("KLMDSV2","P",4,"MUMPS2")

^SCR("KLMDSV2","P",4,"TYP")
N
^SCR("KLMDSV2","P",5,"CRD")
3,24,N,9,2
^SCR("KLMDSV2","P",5,"HELP")

^SCR("KLMDSV2","P",5,"LMAX")
9
^SCR("KLMDSV2","P",5,"MUMPS1")
S:'$G(SUM2) SUM2=$S(SUM1=1:999999,+SUM1=0:0,1:SUM1)
^SCR("KLMDSV2","P",5,"MUMPS2")

^SCR("KLMDSV2","P",5,"TYP")
N
^SCR("KLMDSV2","P",10,"CRD")
4,34,D,8,0
^SCR("KLMDSV2","P",10,"HELP")

^SCR("KLMDSV2","P",10,"LMAX")
8
^SCR("KLMDSV2","P",10,"MUMPS1")

^SCR("KLMDSV2","P",10,"MUMPS2")
I $$^%L1DC(DAT21,3)<$$^%L1DC(DAT12,3) S %SC("ER")=1
^SCR("KLMDSV2","P",10,"TYP")
D
^SCR("KLMDSV2","P",11,"CRD")
4,14,D,8,0
^SCR("KLMDSV2","P",11,"HELP")

^SCR("KLMDSV2","P",11,"LMAX")
8
^SCR("KLMDSV2","P",11,"MUMPS1")

^SCR("KLMDSV2","P",11,"MUMPS2")
D DAT22^KLMDSV2
^SCR("KLMDSV2","P",11,"MUST")

^SCR("KLMDSV2","P",11,"TYP")
D
^SCR("KLMDSV2","P",15,"CRD")
5,51,N,9,2
^SCR("KLMDSV2","P",15,"HELP")

^SCR("KLMDSV2","P",15,"LMAX")
9
^SCR("KLMDSV2","P",15,"MUMPS1")
S:'$G(SUM3) SUM3=1
^SCR("KLMDSV2","P",15,"MUMPS2")

^SCR("KLMDSV2","P",15,"TYP")
N
^SCR("KLMDSV2","P",20,"CRD")
5,24,N,9,2
^SCR("KLMDSV2","P",20,"HELP")

^SCR("KLMDSV2","P",20,"LMAX")
9
^SCR("KLMDSV2","P",20,"MUMPS1")
S:'$G(SUM4) SUM4=$S(SUM3=1:999999,+SUM3=0:0,1:SUM3)
^SCR("KLMDSV2","P",20,"MUMPS2")
D SUM4^KLMDSV2
^SCR("KLMDSV2","P",20,"TYP")
N
^SCR("KLMDSV2","P",40,"CRD")
22,37,N,10,2
^SCR("KLMDSV2","P",40,"HELP")

^SCR("KLMDSV2","P",40,"LMAX")
10
^SCR("KLMDSV2","P",40,"MUMPS1")

^SCR("KLMDSV2","P",40,"MUMPS2")

^SCR("KLMDSV2","P",40,"OUTPUT")

^SCR("KLMDSV2","P",40,"TYP")
N
^SCR("KLMDSV2","P",45,"CRD")
22,21,N,8,2
^SCR("KLMDSV2","P",45,"HELP")

^SCR("KLMDSV2","P",45,"LMAX")
9
^SCR("KLMDSV2","P",45,"MUMPS1")

^SCR("KLMDSV2","P",45,"MUMPS2")

^SCR("KLMDSV2","P",45,"OUTPUT")

^SCR("KLMDSV2","P",45,"TYP")
N
^SCR("KLMDSV2","P",50,"CRD")
22,6,N,10,2
^SCR("KLMDSV2","P",50,"HELP")

^SCR("KLMDSV2","P",50,"LMAX")
10
^SCR("KLMDSV2","P",50,"MUMPS1")

^SCR("KLMDSV2","P",50,"MUMPS2")

^SCR("KLMDSV2","P",50,"OUTPUT")

^SCR("KLMDSV2","P",50,"TYP")
N
^SCR("KLMDSV2","P","NAME","DAT11")
1
^SCR("KLMDSV2","P","NAME","DAT12")
2
^SCR("KLMDSV2","P","NAME","DAT21")
10
^SCR("KLMDSV2","P","NAME","DAT22")
11
^SCR("KLMDSV2","P","NAME","SHFR")
50
^SCR("KLMDSV2","P","NAME","SSUM1")
40
^SCR("KLMDSV2","P","NAME","SSUM2")
45
^SCR("KLMDSV2","P","NAME","SUM1")
4
^SCR("KLMDSV2","P","NAME","SUM2")
5
^SCR("KLMDSV2","P","NAME","SUM3")
15
^SCR("KLMDSV2","P","NAME","SUM4")
20
^SCR("KLMDSV2","P","NM",1)
DAT11
^SCR("KLMDSV2","P","NM",2)
DAT12
^SCR("KLMDSV2","P","NM",4)
SUM1
^SCR("KLMDSV2","P","NM",5)
SUM2
^SCR("KLMDSV2","P","NM",10)
DAT21
^SCR("KLMDSV2","P","NM",11)
DAT22
^SCR("KLMDSV2","P","NM",15)
SUM3
^SCR("KLMDSV2","P","NM",20)
SUM4
^SCR("KLMDSV2","P","NM",40)
SSUM1
^SCR("KLMDSV2","P","NM",45)
SSUM2
^SCR("KLMDSV2","P","NM",50)
SHFR
^SCR("KLTSHL")
H
^SCR("KLTSHL",1)
                                           {03 } yceg {02 }  dpyl melyz        
^SCR("KLTSHL",2)
                       {                        06} {05   } gewl   beqn        
^SCR("KLTSHL",3)
                       {                        11} {10   } gewl beq cr        
^SCR("KLTSHL",4)
                                                                             1$
^SCR("KLTSHL",5)
  :   dxzi :  melyz :  zekf  :  daeg  :          gewl my        : gewl 'qn :   
^SCR("KLTSHL",6)
                                                                               
^SCR("KLTSHL",7)
                                                                               
^SCR("KLTSHL",8)
                                                                               
^SCR("KLTSHL",9)
                                                                               
^SCR("KLTSHL",10)
                                                                               
^SCR("KLTSHL",11)
                                                                               
^SCR("KLTSHL",12)
                                                                               
^SCR("KLTSHL",13)
                                                                               
^SCR("KLTSHL",14)
                                                                               
^SCR("KLTSHL",15)
                                                                               
^SCR("KLTSHL",16)
                                                                               
^SCR("KLTSHL",17)
                                                                               
^SCR("KLTSHL",18)
                                                                               
^SCR("KLTSHL",19)
                                                                               
^SCR("KLTSHL",20)
                                                                               
^SCR("KLTSHL",21)
 $1                                                                            
^SCR("KLTSHL",22)
  {35      }{37     }{30     }{25     }                                        
^SCR("KLTSHL","A",1)
™ƒ…‡„�™Œ�…Œ™š
^SCR("KLTSHL","A",2)
‡…—Œ‚…‘Ž
^SCR("KLTSHL","A",3)
‡…—Œ‚…‘ƒ’
^SCR("KLTSHL","A",4)

^SCR("KLTSHL","A",5)
„˜š‰�…Œ™šš…‹†„�…‡‡…—Œ�™‡…—Œ'‘Ž
^SCR("KLTSHL","A",6)
----------------------------------------------------------------------
^SCR("KLTSHL","A",7)

^SCR("KLTSHL","A",8)

^SCR("KLTSHL","A",9)

^SCR("KLTSHL","A",10)

^SCR("KLTSHL","A",11)

^SCR("KLTSHL","A",12)

^SCR("KLTSHL","A",13)

^SCR("KLTSHL","A",14)

^SCR("KLTSHL","A",15)

^SCR("KLTSHL","A",16)

^SCR("KLTSHL","A",17)

^SCR("KLTSHL","A",18)

^SCR("KLTSHL","A",19)

^SCR("KLTSHL","A",20)

^SCR("KLTSHL","A",21)

^SCR("KLTSHL","A",22)

^SCR("KLTSHL","AV",1)
asujvbakouka,
^SCR("KLTSHL","AV",2)
juekduxn
^SCR("KLTSHL","AV",3)
juekduxsg
^SCR("KLTSHL","AV",4)

^SCR("KLTSHL","AV",5)
vr,houka,,ufzvcujjuekoajuekwxn
^SCR("KLTSHL","AV",6)
----------------------------------------------------------------------
^SCR("KLTSHL","AV",7)

^SCR("KLTSHL","AV",8)

^SCR("KLTSHL","AV",9)

^SCR("KLTSHL","AV",10)

^SCR("KLTSHL","AV",11)

^SCR("KLTSHL","AV",12)

^SCR("KLTSHL","AV",13)

^SCR("KLTSHL","AV",14)

^SCR("KLTSHL","AV",15)

^SCR("KLTSHL","AV",16)

^SCR("KLTSHL","AV",17)

^SCR("KLTSHL","AV",18)

^SCR("KLTSHL","AV",19)

^SCR("KLTSHL","AV",20)

^SCR("KLTSHL","AV",21)

^SCR("KLTSHL","AV",22)

^SCR("KLTSHL","G",1,"CRD")
6,75,E,10,0
^SCR("KLTSHL","G",1,"HELP")

^SCR("KLTSHL","G",1,"LMAX")
10
^SCR("KLTSHL","G",1,"MUMPS1")

^SCR("KLTSHL","G",1,"MUMPS2")

^SCR("KLTSHL","G",1,"SHEM")
 gewl 'qn 
^SCR("KLTSHL","G",1,"TYP")
E
^SCR("KLTSHL","G",2,"CRD")
6,64,H,25,0
^SCR("KLTSHL","G",2,"HELP")

^SCR("KLTSHL","G",2,"LMAX")
25
^SCR("KLTSHL","G",2,"MUMPS1")

^SCR("KLTSHL","G",2,"MUMPS2")

^SCR("KLTSHL","G",2,"OUTPUT")

^SCR("KLTSHL","G",2,"SHEM")
          gewl my        
^SCR("KLTSHL","G",2,"TYP")
H
^SCR("KLTSHL","G",3,"CRD")
6,38,N,8,2
^SCR("KLTSHL","G",3,"HELP")

^SCR("KLTSHL","G",3,"LMAX")
8
^SCR("KLTSHL","G",3,"MUMPS1")

^SCR("KLTSHL","G",3,"MUMPS2")

^SCR("KLTSHL","G",3,"OUTPUT")

^SCR("KLTSHL","G",3,"SHEM")
  daeg  
^SCR("KLTSHL","G",3,"TYP")
N
^SCR("KLTSHL","G",4,"CRD")
6,29,N,8,2
^SCR("KLTSHL","G",4,"HELP")

^SCR("KLTSHL","G",4,"LMAX")
8
^SCR("KLTSHL","G",4,"MUMPS1")

^SCR("KLTSHL","G",4,"MUMPS2")

^SCR("KLTSHL","G",4,"OUTPUT")

^SCR("KLTSHL","G",4,"SHEM")
  zekf  
^SCR("KLTSHL","G",4,"TYP")
N
^SCR("KLTSHL","G",5,"CRD")
6,20,N,7,2
^SCR("KLTSHL","G",5,"HELP")

^SCR("KLTSHL","G",5,"LMAX")
8
^SCR("KLTSHL","G",5,"MUMPS1")

^SCR("KLTSHL","G",5,"MUMPS2")

^SCR("KLTSHL","G",5,"OUTPUT")

^SCR("KLTSHL","G",5,"SHEM")
  melyz 
^SCR("KLTSHL","G",5,"TYP")
N
^SCR("KLTSHL","G",6,"CRD")
6,11,N,8,2
^SCR("KLTSHL","G",6,"HELP")

^SCR("KLTSHL","G",6,"LMAX")
8
^SCR("KLTSHL","G",6,"MUMPS1")

^SCR("KLTSHL","G",6,"MUMPS2")

^SCR("KLTSHL","G",6,"OUTPUT")

^SCR("KLTSHL","G",6,"SHEM")
   dxzi 
^SCR("KLTSHL","G",6,"TYP")
N
^SCR("KLTSHL","G","DEL")
Y
^SCR("KLTSHL","G","MAX")
99999
^SCR("KLTSHL","G","NAME","HOVA")
3
^SCR("KLTSHL","G","NAME","ITRA")
6
^SCR("KLTSHL","G","NAME","LKH")
1
^SCR("KLTSHL","G","NAME","LKH1")
2
^SCR("KLTSHL","G","NAME","TSH")
5
^SCR("KLTSHL","G","NAME","ZHUT")
4
^SCR("KLTSHL","G","NM",1)
LKH
^SCR("KLTSHL","G","NM",2)
LKH1
^SCR("KLTSHL","G","NM",3)
HOVA
^SCR("KLTSHL","G","NM",4)
ZHUT
^SCR("KLTSHL","G","NM",5)
TSH
^SCR("KLTSHL","G","NM",6)
ITRA
^SCR("KLTSHL","G","RB")
5,2,22,79
^SCR("KLTSHL","G","REF")
^MBG($P,"PT"
^SCR("KLTSHL","G","RZD")
\
^SCR("KLTSHL","G","STEP")
1
^SCR("KLTSHL","G","STG")
  :   dxzi :  melyz :  zekf  :  daeg  :          gewl my        : gewl 'qn :   
^SCR("KLTSHL","G","VG")
7
^SCR("KLTSHL","NAME")
illk melyz
^SCR("KLTSHL","P",2,"CRD")
1,54,E,2,0
^SCR("KLTSHL","P",2,"HELP")

^SCR("KLTSHL","P",2,"LMAX")
4
^SCR("KLTSHL","P",2,"MUMPS1")
S GG=$P($$^%L1DC($H,1),".",3)
^SCR("KLTSHL","P",2,"MUMPS2")
S GG=$TR($J(GG,2)," ",0) I GG>$P($$^%L1DC($H,1),".",3) S %SC("ER")=1
^SCR("KLTSHL","P",2,"MUST")

^SCR("KLTSHL","P",2,"TYP")
E
^SCR("KLTSHL","P",3,"CRD")
1,43,E,2,0
^SCR("KLTSHL","P",3,"HELP")

^SCR("KLTSHL","P",3,"LMAX")
4
^SCR("KLTSHL","P",3,"MUMPS1")
D HOD0^KLTSHL
^SCR("KLTSHL","P",3,"MUMPS2")
D HOD^KLTSHL
^SCR("KLTSHL","P",3,"MUST")

^SCR("KLTSHL","P",3,"TYP")
E
^SCR("KLTSHL","P",5,"CRD")
2,52,E,5,0
^SCR("KLTSHL","P",5,"FNC")

^SCR("KLTSHL","P",5,"GLOB")
SUGL
^SCR("KLTSHL","P",5,"HELP")

^SCR("KLTSHL","P",5,"LMAX")
6
^SCR("KLTSHL","P",5,"MUMPS1")

^SCR("KLTSHL","P",5,"MUMPS2")

^SCR("KLTSHL","P",5,"NLN")
20
^SCR("KLTSHL","P",5,"RZD")
\
^SCR("KLTSHL","P",5,"TOPB")
8
^SCR("KLTSHL","P",5,"TYP")
E
^SCR("KLTSHL","P",5,"VRB")
MESUG1
^SCR("KLTSHL","P",6,"CRD")
2,51,H,27
^SCR("KLTSHL","P",6,"HELP")

^SCR("KLTSHL","P",6,"LMAX")
27
^SCR("KLTSHL","P",6,"MUMPS1")

^SCR("KLTSHL","P",6,"MUMPS2")

^SCR("KLTSHL","P",6,"OUTPUT")

^SCR("KLTSHL","P",6,"TYP")
H
^SCR("KLTSHL","P",10,"CRD")
3,52,E,5,0
^SCR("KLTSHL","P",10,"FNC")

^SCR("KLTSHL","P",10,"GLOB")
SUGL
^SCR("KLTSHL","P",10,"HELP")

^SCR("KLTSHL","P",10,"LMAX")
6
^SCR("KLTSHL","P",10,"MUMPS1")
S:'$G(ADSUG) ADSUG=MESUG
^SCR("KLTSHL","P",10,"MUMPS2")
D ADSUG^KLTSHL
^SCR("KLTSHL","P",10,"NLN")
20
^SCR("KLTSHL","P",10,"RZD")
\
^SCR("KLTSHL","P",10,"TOPB")
8
^SCR("KLTSHL","P",10,"TYP")
E
^SCR("KLTSHL","P",10,"VRB")
ADSUG1
^SCR("KLTSHL","P",11,"CRD")
3,51,H,27
^SCR("KLTSHL","P",11,"HELP")

^SCR("KLTSHL","P",11,"LMAX")
27
^SCR("KLTSHL","P",11,"MUMPS1")

^SCR("KLTSHL","P",11,"MUMPS2")

^SCR("KLTSHL","P",11,"OUTPUT")

^SCR("KLTSHL","P",11,"TYP")
H
^SCR("KLTSHL","P",25,"CRD")
22,30,N,8,2
^SCR("KLTSHL","P",25,"HELP")

^SCR("KLTSHL","P",25,"LMAX")
8
^SCR("KLTSHL","P",25,"MUMPS1")

^SCR("KLTSHL","P",25,"MUMPS2")

^SCR("KLTSHL","P",25,"OUTPUT")

^SCR("KLTSHL","P",25,"TYP")
N
^SCR("KLTSHL","P",30,"CRD")
22,21,N,8,2
^SCR("KLTSHL","P",30,"HELP")

^SCR("KLTSHL","P",30,"LMAX")
8
^SCR("KLTSHL","P",30,"MUMPS1")

^SCR("KLTSHL","P",30,"MUMPS2")

^SCR("KLTSHL","P",30,"OUTPUT")

^SCR("KLTSHL","P",30,"TYP")
N
^SCR("KLTSHL","P",35,"CRD")
22,2,N,9,2
^SCR("KLTSHL","P",35,"HELP")

^SCR("KLTSHL","P",35,"LMAX")
9
^SCR("KLTSHL","P",35,"MUMPS1")

^SCR("KLTSHL","P",35,"MUMPS2")

^SCR("KLTSHL","P",35,"OUTPUT")

^SCR("KLTSHL","P",35,"TYP")
N
^SCR("KLTSHL","P",37,"CRD")
22,12,N,8,2
^SCR("KLTSHL","P",37,"HELP")

^SCR("KLTSHL","P",37,"LMAX")
8
^SCR("KLTSHL","P",37,"MUMPS1")

^SCR("KLTSHL","P",37,"MUMPS2")

^SCR("KLTSHL","P",37,"OUTPUT")

^SCR("KLTSHL","P",37,"TYP")
N
^SCR("KLTSHL","P","NAME","ADSUG")
10
^SCR("KLTSHL","P","NAME","ADSUG1")
11
^SCR("KLTSHL","P","NAME","GG")
2
^SCR("KLTSHL","P","NAME","HOD")
3
^SCR("KLTSHL","P","NAME","MESUG")
5
^SCR("KLTSHL","P","NAME","MESUG1")
6
^SCR("KLTSHL","P","NAME","SHOVA")
25
^SCR("KLTSHL","P","NAME","SITRA")
30
^SCR("KLTSHL","P","NAME","STSH")
37
^SCR("KLTSHL","P","NAME","SZHUT")
35
^SCR("KLTSHL","P","NM",2)
GG
^SCR("KLTSHL","P","NM",3)
HOD
^SCR("KLTSHL","P","NM",5)
MESUG
^SCR("KLTSHL","P","NM",6)
MESUG1
^SCR("KLTSHL","P","NM",10)
ADSUG
^SCR("KLTSHL","P","NM",11)
ADSUG1
^SCR("KLTSHL","P","NM",25)
SHOVA
^SCR("KLTSHL","P","NM",30)
SITRA
^SCR("KLTSHL","P","NM",35)
SZHUT
^SCR("KLTSHL","P","NM",37)
STSH
^SCR("KOT")
H
^SCR("KOT",1)
                #{                                    01}#                     
^SCR("KOT",2)
                                               {                          05}  
^SCR("KOT",3)
                                                              {10        }:lh  
^SCR("KOT",4)
                                                     {15        }  dyxen wqer  
^SCR("KOT",5)
     {25     }:dry {20       }:dwtd jix`z                                      
^SCR("KOT",6)
     {27     }: dry {26      }:jix`zl onfed                                    
^SCR("KOT",7)
           #{30   }{40     } qn {                 35}#                         
^SCR("KOT",8)
       {57   }:dpnfd 'qn         {                       55}                   
^SCR("KOT",9)
                                 {              59}: oinfnd                    
^SCR("KOT",10)
       {64 }:dqipk {63 }:dxic {62 }:dnew {61 }:'qn {                        60}
^SCR("KOT",11)
       {                                                               68}:dxrd
^SCR("KOT",12)
                                                          {75           }:lh   
^SCR("KOT",13)
                                                          {77           }:ciip 
^SCR("KOT",14)
                                                                          1$   
^SCR("KOT",15)
                             $1                                                
^SCR("KOT",16)
                                                                               
^SCR("KOT",17)
                                                       ______________: dnizg   
^SCR("KOT","A",1)

^SCR("KOT","A",2)

^SCR("KOT","A",3)
:Œˆ
^SCR("KOT","A",4)
„™˜…Ž—‘…’
^SCR("KOT","A",5)
:„’™:„—”„Š‰˜€š
^SCR("KOT","A",6)
:„’™:Š‰˜€šŒ�Ž†…„
^SCR("KOT","A",7)
‘Ž
^SCR("KOT","A",8)
:„�Ž†„'‘Ž
^SCR("KOT","A",9)
:�‰Ž†Ž„
^SCR("KOT","A",10)
:„‘‰�‹:„˜‰ƒ:„Ž…—:'‘Ž
^SCR("KOT","A",11)
:„˜’„
^SCR("KOT","A",12)
:Œˆ
^SCR("KOT","A",13)
:ƒ‰‰�
^SCR("KOT","A",14)
1$
^SCR("KOT","A",15)
$1
^SCR("KOT","A",16)

^SCR("KOT","A",17)
______________:„Ž‰š‡
^SCR("KOT","AV",1)

^SCR("KOT","AV",2)

^SCR("KOT","AV",3)
:ky
^SCR("KOT","AV",4)
varunexug
^SCR("KOT","AV",5)
:vga:vepvlhrt,
^SCR("KOT","AV",6)
:vga:lhrt,kinzuv
^SCR("KOT","AV",7)
xn
^SCR("KOT","AV",8)
:vbnzvwxn
^SCR("KOT","AV",9)
:ihnznv
^SCR("KOT","AV",10)
:vxhbf:vrhs:vnue:wxn
^SCR("KOT","AV",11)
:vrgv
^SCR("KOT","AV",12)
:ky
^SCR("KOT","AV",13)
:shhb
^SCR("KOT","AV",14)
1$
^SCR("KOT","AV",15)
$1
^SCR("KOT","AV",16)

^SCR("KOT","AV",17)
______________:vnh,j
^SCR("KOT","NAME")

^SCR("KOT","P",1,"CRD")
1,57,H,39
^SCR("KOT","P",1,"HELP")

^SCR("KOT","P",1,"LMAX")
39
^SCR("KOT","P",1,"MUMPS1")

^SCR("KOT","P",1,"MUMPS2")

^SCR("KOT","P",1,"OUTPUT")

^SCR("KOT","P",1,"TYP")
H
^SCR("KOT","P",5,"CRD")
2,77,H,29
^SCR("KOT","P",5,"HELP")

^SCR("KOT","P",5,"LMAX")
29
^SCR("KOT","P",5,"MUMPS1")

^SCR("KOT","P",5,"MUMPS2")

^SCR("KOT","P",5,"OUTPUT")

^SCR("KOT","P",5,"TYP")
E
^SCR("KOT","P",10,"CRD")
3,62,E,11,0
^SCR("KOT","P",10,"HELP")

^SCR("KOT","P",10,"LMAX")
11
^SCR("KOT","P",10,"MUMPS1")

^SCR("KOT","P",10,"MUMPS2")

^SCR("KOT","P",10,"OUTPUT")

^SCR("KOT","P",10,"TYP")
E
^SCR("KOT","P",15,"CRD")
4,53,E,11,0
^SCR("KOT","P",15,"HELP")

^SCR("KOT","P",15,"LMAX")
11
^SCR("KOT","P",15,"MUMPS1")

^SCR("KOT","P",15,"MUMPS2")

^SCR("KOT","P",15,"OUTPUT")

^SCR("KOT","P",15,"TYP")
E
^SCR("KOT","P",20,"CRD")
5,19,D,8,0
^SCR("KOT","P",20,"HELP")

^SCR("KOT","P",20,"LMAX")
10
^SCR("KOT","P",20,"MUMPS1")

^SCR("KOT","P",20,"MUMPS2")

^SCR("KOT","P",20,"OUTPUT")

^SCR("KOT","P",20,"TYP")
D
^SCR("KOT","P",25,"CRD")
5,5,T,8,0
^SCR("KOT","P",25,"HELP")

^SCR("KOT","P",25,"LMAX")
8
^SCR("KOT","P",25,"MUMPS1")

^SCR("KOT","P",25,"MUMPS2")

^SCR("KOT","P",25,"OUTPUT")

^SCR("KOT","P",25,"TYP")
T
^SCR("KOT","P",26,"CRD")
6,20,D,8,0
^SCR("KOT","P",26,"HELP")

^SCR("KOT","P",26,"LMAX")
9
^SCR("KOT","P",26,"MUMPS1")

^SCR("KOT","P",26,"MUMPS2")

^SCR("KOT","P",26,"OUTPUT")

^SCR("KOT","P",26,"TYP")
D
^SCR("KOT","P",27,"CRD")
6,5,T,8,0
^SCR("KOT","P",27,"HELP")

^SCR("KOT","P",27,"LMAX")
8
^SCR("KOT","P",27,"MUMPS1")

^SCR("KOT","P",27,"MUMPS2")

^SCR("KOT","P",27,"TYP")
T
^SCR("KOT","P",30,"CRD")
7,12,E,6,0
^SCR("KOT","P",30,"HELP")

^SCR("KOT","P",30,"LMAX")
6
^SCR("KOT","P",30,"MUMPS1")

^SCR("KOT","P",30,"MUMPS2")

^SCR("KOT","P",30,"OUTPUT")

^SCR("KOT","P",30,"TYP")
E
^SCR("KOT","P",35,"CRD")
7,53,H,19,0
^SCR("KOT","P",35,"HELP")

^SCR("KOT","P",35,"LMAX")
20
^SCR("KOT","P",35,"MUMPS1")

^SCR("KOT","P",35,"MUMPS2")

^SCR("KOT","P",35,"OUTPUT")

^SCR("KOT","P",35,"TYP")
H
^SCR("KOT","P",40,"CRD")
7,19,E,8,0
^SCR("KOT","P",40,"HELP")

^SCR("KOT","P",40,"LMAX")
8
^SCR("KOT","P",40,"MUMPS1")

^SCR("KOT","P",40,"MUMPS2")

^SCR("KOT","P",40,"OUTPUT")

^SCR("KOT","P",40,"TYP")
E
^SCR("KOT","P",55,"CRD")
8,60,H,20
^SCR("KOT","P",55,"HELP")

^SCR("KOT","P",55,"LMAX")
26
^SCR("KOT","P",55,"MUMPS1")

^SCR("KOT","P",55,"MUMPS2")

^SCR("KOT","P",55,"OUTPUT")

^SCR("KOT","P",55,"TYP")
E
^SCR("KOT","P",57,"CRD")
8,7,E,6,0
^SCR("KOT","P",57,"HELP")

^SCR("KOT","P",57,"LMAX")
6
^SCR("KOT","P",57,"MUMPS1")

^SCR("KOT","P",57,"MUMPS2")

^SCR("KOT","P",57,"TYP")
E
^SCR("KOT","P",59,"CRD")
9,51,H,17
^SCR("KOT","P",59,"HELP")

^SCR("KOT","P",59,"LMAX")
17
^SCR("KOT","P",59,"MUMPS1")

^SCR("KOT","P",59,"MUMPS2")

^SCR("KOT","P",59,"OUTPUT")

^SCR("KOT","P",59,"TYP")
H
^SCR("KOT","P",60,"CRD")
10,79,H,27
^SCR("KOT","P",60,"HELP")

^SCR("KOT","P",60,"LMAX")
27
^SCR("KOT","P",60,"MUMPS1")

^SCR("KOT","P",60,"MUMPS2")

^SCR("KOT","P",60,"TYP")
E
^SCR("KOT","P",61,"CRD")
10,41,E,3,0
^SCR("KOT","P",61,"HELP")

^SCR("KOT","P",61,"LMAX")
4
^SCR("KOT","P",61,"MUMPS1")

^SCR("KOT","P",61,"MUMPS2")

^SCR("KOT","P",61,"TYP")
E
^SCR("KOT","P",62,"CRD")
10,30,E,3,0
^SCR("KOT","P",62,"HELP")

^SCR("KOT","P",62,"LMAX")
4
^SCR("KOT","P",62,"MUMPS1")

^SCR("KOT","P",62,"MUMPS2")

^SCR("KOT","P",62,"TYP")
E
^SCR("KOT","P",63,"CRD")
10,19,E,3,0
^SCR("KOT","P",63,"HELP")

^SCR("KOT","P",63,"LMAX")
4
^SCR("KOT","P",63,"MUMPS1")

^SCR("KOT","P",63,"MUMPS2")

^SCR("KOT","P",63,"TYP")
E
^SCR("KOT","P",64,"CRD")
10,7,E,1,0
^SCR("KOT","P",64,"HELP")

^SCR("KOT","P",64,"LMAX")
4
^SCR("KOT","P",64,"MUMPS1")

^SCR("KOT","P",64,"MUMPS2")

^SCR("KOT","P",64,"TYP")
H
^SCR("KOT","P",68,"CRD")
11,74,H,18/36
^SCR("KOT","P",68,"HELP")

^SCR("KOT","P",68,"LMAX")
66
^SCR("KOT","P",68,"MUMPS1")

^SCR("KOT","P",68,"MUMPS2")

^SCR("KOT","P",68,"TYP")
H
^SCR("KOT","P",75,"CRD")
12,58,E,11,0
^SCR("KOT","P",75,"HELP")

^SCR("KOT","P",75,"LMAX")
14
^SCR("KOT","P",75,"MUMPS1")

^SCR("KOT","P",75,"MUMPS2")

^SCR("KOT","P",75,"OUTPUT")

^SCR("KOT","P",75,"TYP")
E
^SCR("KOT","P",77,"CRD")
13,58,E,11,0
^SCR("KOT","P",77,"HELP")

^SCR("KOT","P",77,"LMAX")
14
^SCR("KOT","P",77,"MUMPS1")

^SCR("KOT","P",77,"MUMPS2")

^SCR("KOT","P",77,"TYP")
E
^SCR("KOT","P","NAME","BAIT")
61
^SCR("KOT","P","NAME","CMNT")
68
^SCR("KOT","P","NAME","CNISA")
64
^SCR("KOT","P","NAME","DIRA")
63
^SCR("KOT","P","NAME","HZM")
57
^SCR("KOT","P","NAME","KOMA")
62
^SCR("KOT","P","NAME","KTESEK")
5
^SCR("KOT","P","NAME","KTV")
60
^SCR("KOT","P","NAME","MAZMIN")
59
^SCR("KOT","P","NAME","MESEK")
15
^SCR("KOT","P","NAME","MISPAR")
40
^SCR("KOT","P","NAME","MKET")
30
^SCR("KOT","P","NAME","NAME")
55
^SCR("KOT","P","NAME","NDOC")
35
^SCR("KOT","P","NAME","NESEK")
1
^SCR("KOT","P","NAME","NMB")
75
^SCR("KOT","P","NAME","PELE")
77
^SCR("KOT","P","NAME","SHAA")
27
^SCR("KOT","P","NAME","SHPK")
25
^SCR("KOT","P","NAME","TESEK")
10
^SCR("KOT","P","NAME","THPK")
20
^SCR("KOT","P","NAME","TRH")
26
^SCR("KOT","P","NM",1)
NESEK
^SCR("KOT","P","NM",5)
KTESEK
^SCR("KOT","P","NM",10)
TESEK
^SCR("KOT","P","NM",15)
MESEK
^SCR("KOT","P","NM",20)
THPK
^SCR("KOT","P","NM",25)
SHPK
^SCR("KOT","P","NM",26)
TRH
^SCR("KOT","P","NM",27)
SHAA
^SCR("KOT","P","NM",30)
MKET
^SCR("KOT","P","NM",35)
NDOC
^SCR("KOT","P","NM",40)
MISPAR
^SCR("KOT","P","NM",55)
NAME
^SCR("KOT","P","NM",57)
HZM
^SCR("KOT","P","NM",59)
MAZMIN
^SCR("KOT","P","NM",60)
KTV
^SCR("KOT","P","NM",61)
BAIT
^SCR("KOT","P","NM",62)
KOMA
^SCR("KOT","P","NM",63)
DIRA
^SCR("KOT","P","NM",64)
CNISA
^SCR("KOT","P","NM",68)
CMNT
^SCR("KOT","P","NM",75)
NMB
^SCR("KOT","P","NM",77)
PELE
^SCR("KOTMS")
H
^SCR("KOTMS",1)
              #{                                    01}#                       
^SCR("KOTMS",2)
                                               {                          05}  
^SCR("KOTMS",3)
                                                              {10        }:lh  
^SCR("KOTMS",4)
                                                     {15        }  dyxen wqer  
^SCR("KOTMS",5)
     {25     }:dry {20       }:dwtd jix`z                                      
^SCR("KOTMS",6)
     {27     }:dryl onfed                                                      
^SCR("KOTMS",7)
        #{30   }{40     } qn {                          35}#                   
^SCR("KOTMS",8)
                                     {53 }: micreq 'qn                         
^SCR("KOTMS",9)
 {57      }:dpnfd 'qn         {                       55}:oinfnd my            
^SCR("KOTMS",10)
                                                                               
^SCR("KOTMS",11)
       {64 }:dqipk {63 }:dxic {62 }:dnew {61 }:'qn {                        60}
^SCR("KOTMS",12)
       {                                                               80}:dxrd
^SCR("KOTMS",13)
                                                          {75           }:lh   
^SCR("KOTMS",14)
                                                          {77           }:ciip 
^SCR("KOTMS",15)
                                                                          1$   
^SCR("KOTMS",16)
                             $1                                                
^SCR("KOTMS",17)
                                                                               
^SCR("KOTMS",18)
                                                       ______________: dnizg   
^SCR("KOTMS","A",1)

^SCR("KOTMS","A",2)

^SCR("KOTMS","A",3)
:Œˆ
^SCR("KOTMS","A",4)
„™˜…Ž—‘…’
^SCR("KOTMS","A",5)
:„’™:„—”„Š‰˜€š
^SCR("KOTMS","A",6)
:„’™Œ�Ž†…„
^SCR("KOTMS","A",7)
‘Ž
^SCR("KOTMS","A",8)
:�‰ƒ’…‘'‘Ž
^SCR("KOTMS","A",9)
:„�Ž†„'‘Ž:�‰Ž†Ž„�™
^SCR("KOTMS","A",10)

^SCR("KOTMS","A",11)
:„‘‰�‹:„˜‰ƒ:„Ž…—:'‘Ž
^SCR("KOTMS","A",12)
:„˜’„
^SCR("KOTMS","A",13)
:Œˆ
^SCR("KOTMS","A",14)
:ƒ‰‰�
^SCR("KOTMS","A",15)
1$
^SCR("KOTMS","A",16)
$1
^SCR("KOTMS","A",17)

^SCR("KOTMS","A",18)
______________:„Ž‰š‡
^SCR("KOTMS","AV",1)

^SCR("KOTMS","AV",2)

^SCR("KOTMS","AV",3)
:ìè
^SCR("KOTMS","AV",4)
äùøåî÷ñåò
^SCR("KOTMS","AV",5)
:äòù:ä÷ôäêéøàú
^SCR("KOTMS","AV",6)
:äòùìïîæåä
^SCR("KOTMS","AV",7)
ñî
^SCR("KOTMS","AV",8)
:íéãòåñ'ñî
^SCR("KOTMS","AV",9)
:äðîæä'ñî:ïéîæîäíù
^SCR("KOTMS","AV",10)

^SCR("KOTMS","AV",11)
:äñéðë:äøéã:äîå÷:'ñî
^SCR("KOTMS","AV",12)
:äøòä
^SCR("KOTMS","AV",13)
:ìè
^SCR("KOTMS","AV",14)
:ãééð
^SCR("KOTMS","AV",15)
1$
^SCR("KOTMS","AV",16)
$1
^SCR("KOTMS","AV",17)

^SCR("KOTMS","AV",18)
______________:äîéúç
^SCR("KOTMS","NAME")

^SCR("KOTMS","P",1,"CRD")
1,55,H,39
^SCR("KOTMS","P",1,"HELP")

^SCR("KOTMS","P",1,"LMAX")
39
^SCR("KOTMS","P",1,"MUMPS1")

^SCR("KOTMS","P",1,"MUMPS2")

^SCR("KOTMS","P",1,"OUTPUT")

^SCR("KOTMS","P",1,"TYP")
H
^SCR("KOTMS","P",5,"CRD")
2,77,H,23
^SCR("KOTMS","P",5,"HELP")

^SCR("KOTMS","P",5,"LMAX")
29
^SCR("KOTMS","P",5,"MUMPS1")

^SCR("KOTMS","P",5,"MUMPS2")

^SCR("KOTMS","P",5,"OUTPUT")

^SCR("KOTMS","P",5,"TYP")
H
^SCR("KOTMS","P",10,"CRD")
3,62,E,11,0
^SCR("KOTMS","P",10,"HELP")

^SCR("KOTMS","P",10,"LMAX")
11
^SCR("KOTMS","P",10,"MUMPS1")

^SCR("KOTMS","P",10,"MUMPS2")

^SCR("KOTMS","P",10,"OUTPUT")

^SCR("KOTMS","P",10,"TYP")
E
^SCR("KOTMS","P",15,"CRD")
4,53,E,11,0
^SCR("KOTMS","P",15,"HELP")

^SCR("KOTMS","P",15,"LMAX")
11
^SCR("KOTMS","P",15,"MUMPS1")

^SCR("KOTMS","P",15,"MUMPS2")

^SCR("KOTMS","P",15,"OUTPUT")

^SCR("KOTMS","P",15,"TYP")
E
^SCR("KOTMS","P",20,"CRD")
5,19,D,8,0
^SCR("KOTMS","P",20,"HELP")

^SCR("KOTMS","P",20,"LMAX")
10
^SCR("KOTMS","P",20,"MUMPS1")

^SCR("KOTMS","P",20,"MUMPS2")

^SCR("KOTMS","P",20,"OUTPUT")

^SCR("KOTMS","P",20,"TYP")
D
^SCR("KOTMS","P",25,"CRD")
5,5,T,8,0
^SCR("KOTMS","P",25,"HELP")

^SCR("KOTMS","P",25,"LMAX")
8
^SCR("KOTMS","P",25,"MUMPS1")

^SCR("KOTMS","P",25,"MUMPS2")

^SCR("KOTMS","P",25,"OUTPUT")

^SCR("KOTMS","P",25,"TYP")
T
^SCR("KOTMS","P",27,"CRD")
6,5,T,8,0
^SCR("KOTMS","P",27,"HELP")

^SCR("KOTMS","P",27,"LMAX")
8
^SCR("KOTMS","P",27,"MUMPS1")

^SCR("KOTMS","P",27,"MUMPS2")

^SCR("KOTMS","P",27,"TYP")
T
^SCR("KOTMS","P",30,"CRD")
7,9,E,6,0
^SCR("KOTMS","P",30,"HELP")

^SCR("KOTMS","P",30,"LMAX")
6
^SCR("KOTMS","P",30,"MUMPS1")

^SCR("KOTMS","P",30,"MUMPS2")

^SCR("KOTMS","P",30,"OUTPUT")

^SCR("KOTMS","P",30,"TYP")
E
^SCR("KOTMS","P",35,"CRD")
7,59,H,28,0
^SCR("KOTMS","P",35,"HELP")

^SCR("KOTMS","P",35,"LMAX")
29
^SCR("KOTMS","P",35,"MUMPS1")

^SCR("KOTMS","P",35,"MUMPS2")

^SCR("KOTMS","P",35,"OUTPUT")

^SCR("KOTMS","P",35,"TYP")
H
^SCR("KOTMS","P",40,"CRD")
7,16,E,8,0
^SCR("KOTMS","P",40,"HELP")

^SCR("KOTMS","P",40,"LMAX")
8
^SCR("KOTMS","P",40,"MUMPS1")

^SCR("KOTMS","P",40,"MUMPS2")

^SCR("KOTMS","P",40,"OUTPUT")

^SCR("KOTMS","P",40,"TYP")
E
^SCR("KOTMS","P",53,"CRD")
8,37,N,3,0
^SCR("KOTMS","P",53,"HELP")

^SCR("KOTMS","P",53,"LMAX")
4
^SCR("KOTMS","P",53,"MUMPS1")

^SCR("KOTMS","P",53,"MUMPS2")

^SCR("KOTMS","P",53,"TYP")
N
^SCR("KOTMS","P",55,"CRD")
9,57,H,20
^SCR("KOTMS","P",55,"HELP")

^SCR("KOTMS","P",55,"LMAX")
26
^SCR("KOTMS","P",55,"MUMPS1")

^SCR("KOTMS","P",55,"MUMPS2")

^SCR("KOTMS","P",55,"OUTPUT")

^SCR("KOTMS","P",55,"TYP")
E
^SCR("KOTMS","P",57,"CRD")
9,1,E,7,0
^SCR("KOTMS","P",57,"HELP")

^SCR("KOTMS","P",57,"LMAX")
9
^SCR("KOTMS","P",57,"MUMPS1")

^SCR("KOTMS","P",57,"MUMPS2")

^SCR("KOTMS","P",57,"TYP")
E
^SCR("KOTMS","P",60,"CRD")
11,79,H,27
^SCR("KOTMS","P",60,"HELP")

^SCR("KOTMS","P",60,"LMAX")
27
^SCR("KOTMS","P",60,"MUMPS1")

^SCR("KOTMS","P",60,"MUMPS2")

^SCR("KOTMS","P",60,"TYP")
E
^SCR("KOTMS","P",61,"CRD")
11,41,E,3,0
^SCR("KOTMS","P",61,"HELP")

^SCR("KOTMS","P",61,"LMAX")
4
^SCR("KOTMS","P",61,"MUMPS1")

^SCR("KOTMS","P",61,"MUMPS2")

^SCR("KOTMS","P",61,"TYP")
E
^SCR("KOTMS","P",62,"CRD")
11,30,E,3,0
^SCR("KOTMS","P",62,"HELP")

^SCR("KOTMS","P",62,"LMAX")
4
^SCR("KOTMS","P",62,"MUMPS1")

^SCR("KOTMS","P",62,"MUMPS2")

^SCR("KOTMS","P",62,"TYP")
E
^SCR("KOTMS","P",63,"CRD")
11,19,E,3,0
^SCR("KOTMS","P",63,"HELP")

^SCR("KOTMS","P",63,"LMAX")
4
^SCR("KOTMS","P",63,"MUMPS1")

^SCR("KOTMS","P",63,"MUMPS2")

^SCR("KOTMS","P",63,"TYP")
E
^SCR("KOTMS","P",64,"CRD")
11,7,E,1,0
^SCR("KOTMS","P",64,"HELP")

^SCR("KOTMS","P",64,"LMAX")
4
^SCR("KOTMS","P",64,"MUMPS1")

^SCR("KOTMS","P",64,"MUMPS2")

^SCR("KOTMS","P",64,"TYP")
H
^SCR("KOTMS","P",75,"CRD")
13,58,E,11,0
^SCR("KOTMS","P",75,"HELP")

^SCR("KOTMS","P",75,"LMAX")
14
^SCR("KOTMS","P",75,"MUMPS1")

^SCR("KOTMS","P",75,"MUMPS2")

^SCR("KOTMS","P",75,"OUTPUT")

^SCR("KOTMS","P",75,"TYP")
E
^SCR("KOTMS","P",77,"CRD")
14,58,E,11,0
^SCR("KOTMS","P",77,"HELP")

^SCR("KOTMS","P",77,"LMAX")
14
^SCR("KOTMS","P",77,"MUMPS1")

^SCR("KOTMS","P",77,"MUMPS2")

^SCR("KOTMS","P",77,"TYP")
E
^SCR("KOTMS","P",80,"CRD")
12,74,H,66
^SCR("KOTMS","P",80,"HELP")

^SCR("KOTMS","P",80,"LMAX")
66
^SCR("KOTMS","P",80,"MUMPS1")

^SCR("KOTMS","P",80,"MUMPS2")

^SCR("KOTMS","P",80,"OUTPUT")

^SCR("KOTMS","P",80,"TYP")
H
^SCR("KOTMS","P","NAME","BAIT")
61
^SCR("KOTMS","P","NAME","CNISA")
64
^SCR("KOTMS","P","NAME","DIRA")
63
^SCR("KOTMS","P","NAME","HRA2")
80
^SCR("KOTMS","P","NAME","HZM")
57
^SCR("KOTMS","P","NAME","KOMA")
62
^SCR("KOTMS","P","NAME","KTESEK")
5
^SCR("KOTMS","P","NAME","KTV")
60
^SCR("KOTMS","P","NAME","MESEK")
15
^SCR("KOTMS","P","NAME","MISPAR")
40
^SCR("KOTMS","P","NAME","MKET")
30
^SCR("KOTMS","P","NAME","NAME")
55
^SCR("KOTMS","P","NAME","NDOC")
35
^SCR("KOTMS","P","NAME","NESEK")
1
^SCR("KOTMS","P","NAME","NMB")
75
^SCR("KOTMS","P","NAME","PELE")
77
^SCR("KOTMS","P","NAME","SHAA")
27
^SCR("KOTMS","P","NAME","SHPK")
25
^SCR("KOTMS","P","NAME","SOAD")
53
^SCR("KOTMS","P","NAME","TESEK")
10
^SCR("KOTMS","P","NAME","THPK")
20
^SCR("KOTMS","P","NM",1)
NESEK
^SCR("KOTMS","P","NM",5)
KTESEK
^SCR("KOTMS","P","NM",10)
TESEK
^SCR("KOTMS","P","NM",15)
MESEK
^SCR("KOTMS","P","NM",20)
THPK
^SCR("KOTMS","P","NM",25)
SHPK
^SCR("KOTMS","P","NM",27)
SHAA
^SCR("KOTMS","P","NM",30)
MKET
^SCR("KOTMS","P","NM",35)
NDOC
^SCR("KOTMS","P","NM",40)
MISPAR
^SCR("KOTMS","P","NM",53)
SOAD
^SCR("KOTMS","P","NM",55)
NAME
^SCR("KOTMS","P","NM",57)
HZM
^SCR("KOTMS","P","NM",60)
KTV
^SCR("KOTMS","P","NM",61)
BAIT
^SCR("KOTMS","P","NM",62)
KOMA
^SCR("KOTMS","P","NM",63)
DIRA
^SCR("KOTMS","P","NM",64)
CNISA
^SCR("KOTMS","P","NM",75)
NMB
^SCR("KOTMS","P","NM",77)
PELE
^SCR("KOTMS","P","NM",80)
HRA2
^SCR("L1DEV")
H
^SCR("L1DEV",1)
                                                                             1$
^SCR("L1DEV",2)
     :dfefz : rav :seqn beq:         dxrd        :     owzd my     :owzd 'qn:  
^SCR("L1DEV",3)
                                                                               
^SCR("L1DEV",4)
                                                                               
^SCR("L1DEV",5)
                                                                               
^SCR("L1DEV",6)
                                                                               
^SCR("L1DEV",7)
                                                                               
^SCR("L1DEV",8)
                                                                               
^SCR("L1DEV",9)
                                                                               
^SCR("L1DEV",10)
                                                                               
^SCR("L1DEV",11)
                                                                               
^SCR("L1DEV",12)
                                                                               
^SCR("L1DEV",13)
                                                                               
^SCR("L1DEV",14)
                                                                               
^SCR("L1DEV",15)
                                                                               
^SCR("L1DEV",16)
                                                                               
^SCR("L1DEV",17)
                                                                               
^SCR("L1DEV",18)
                                                                               
^SCR("L1DEV",19)
                                                                               
^SCR("L1DEV",20)
   $1                                                                          
^SCR("L1DEV","A",1)

^SCR("L1DEV","A",2)
„†…†š’�–“…‘Ž‚…‘„˜’„�—š„�™�—š„'‘Ž
^SCR("L1DEV","A",3)
-------------------------------------------------------------------
^SCR("L1DEV","A",4)

^SCR("L1DEV","A",5)

^SCR("L1DEV","A",6)

^SCR("L1DEV","A",7)

^SCR("L1DEV","A",8)

^SCR("L1DEV","A",9)

^SCR("L1DEV","A",10)

^SCR("L1DEV","A",11)

^SCR("L1DEV","A",12)

^SCR("L1DEV","A",13)

^SCR("L1DEV","A",14)

^SCR("L1DEV","A",15)

^SCR("L1DEV","A",16)

^SCR("L1DEV","A",17)

^SCR("L1DEV","A",18)

^SCR("L1DEV","A",19)

^SCR("L1DEV","A",20)

^SCR("L1DEV","AV",1)

^SCR("L1DEV","AV",2)
vzuz,gcm;uxnduxvrgvie,voaie,vwxn
^SCR("L1DEV","AV",3)
-------------------------------------------------------------------
^SCR("L1DEV","AV",4)

^SCR("L1DEV","AV",5)

^SCR("L1DEV","AV",6)

^SCR("L1DEV","AV",7)

^SCR("L1DEV","AV",8)

^SCR("L1DEV","AV",9)

^SCR("L1DEV","AV",10)

^SCR("L1DEV","AV",11)

^SCR("L1DEV","AV",12)

^SCR("L1DEV","AV",13)

^SCR("L1DEV","AV",14)

^SCR("L1DEV","AV",15)

^SCR("L1DEV","AV",16)

^SCR("L1DEV","AV",17)

^SCR("L1DEV","AV",18)

^SCR("L1DEV","AV",19)

^SCR("L1DEV","AV",20)

^SCR("L1DEV","G",1,"CRD")
3,76,N,2,0
^SCR("L1DEV","G",1,"HELP")

^SCR("L1DEV","G",1,"LMAX")
8
^SCR("L1DEV","G",1,"MUMPS1")

^SCR("L1DEV","G",1,"MUMPS2")

^SCR("L1DEV","G",1,"MUST")

^SCR("L1DEV","G",1,"SHEM")
owzd 'qn
^SCR("L1DEV","G",1,"TYP")
N
^SCR("L1DEV","G",2,"CRD")
3,67,E,17,0
^SCR("L1DEV","G",2,"HELP")

^SCR("L1DEV","G",2,"LMAX")
17
^SCR("L1DEV","G",2,"MUMPS1")

^SCR("L1DEV","G",2,"MUMPS2")

^SCR("L1DEV","G",2,"MUST")

^SCR("L1DEV","G",2,"SHEM")
     owzd my     
^SCR("L1DEV","G",2,"TYP")
E
^SCR("L1DEV","G",3,"CRD")
3,49,H,21,0
^SCR("L1DEV","G",3,"HELP")

^SCR("L1DEV","G",3,"LMAX")
21
^SCR("L1DEV","G",3,"MUMPS1")

^SCR("L1DEV","G",3,"MUMPS2")

^SCR("L1DEV","G",3,"SHEM")
         dxrd        
^SCR("L1DEV","G",3,"TYP")
H
^SCR("L1DEV","G",4,"CRD")
3,27,E,8,0
^SCR("L1DEV","G",4,"HELP")
PC , PC1 , VT520 , VT510
^SCR("L1DEV","G",4,"LMAX")
8
^SCR("L1DEV","G",4,"MUMPS1")

^SCR("L1DEV","G",4,"MUMPS2")

^SCR("L1DEV","G",4,"SHEM")
seqn beq
^SCR("L1DEV","G",4,"TYP")
E
^SCR("L1DEV","G",5,"CRD")
3,18,E,2,0
^SCR("L1DEV","G",5,"HELP")

^SCR("L1DEV","G",5,"LMAX")
5
^SCR("L1DEV","G",5,"MUMPS1")

^SCR("L1DEV","G",5,"MUMPS2")
I $L(CEVA)>2!(150'[CEVA) S %SC("ER")=1
^SCR("L1DEV","G",5,"SHEM")
 rav 
^SCR("L1DEV","G",5,"TYP")
E
^SCR("L1DEV","G",6,"CRD")
3,12,E,2,0
^SCR("L1DEV","G",6,"HELP")

^SCR("L1DEV","G",6,"LMAX")
6
^SCR("L1DEV","G",6,"MUMPS1")

^SCR("L1DEV","G",6,"MUMPS2")

^SCR("L1DEV","G",6,"SHEM")
dfefz 
^SCR("L1DEV","G",6,"TYP")
E
^SCR("L1DEV","G","DEL")
Y
^SCR("L1DEV","G","MAX")
999
^SCR("L1DEV","G","NAME","CEVA")
5
^SCR("L1DEV","G","NAME","DEVN")
1
^SCR("L1DEV","G","NAME","DEVS")
2
^SCR("L1DEV","G","NAME","HRA")
3
^SCR("L1DEV","G","NAME","SHIFT")
6
^SCR("L1DEV","G","NAME","TYPC")
4
^SCR("L1DEV","G","NM",1)
DEVN
^SCR("L1DEV","G","NM",2)
DEVS
^SCR("L1DEV","G","NM",3)
HRA
^SCR("L1DEV","G","NM",4)
TYPC
^SCR("L1DEV","G","NM",5)
CEVA
^SCR("L1DEV","G","NM",6)
SHIFT
^SCR("L1DEV","G","RB")
2,4,21,79
^SCR("L1DEV","G","REF")
^TEMP($P
^SCR("L1DEV","G","RZD")
\
^SCR("L1DEV","G","STEP")
1
^SCR("L1DEV","G","STG")
     :dfefz : rav :seqn beq:         dxrd        :     owzd my     :owzd 'qn:  
^SCR("L1DEV","G","VG")
4
^SCR("L1DEV","NAME")
mipwzd zlah
^SCR("L1MSF")
H
^SCR("L1MSF",1)
                               #zyx iteqn zlah#                                
^SCR("L1MSF",2)
                                                        1$                     
^SCR("L1MSF",3)
                              : seqn 'qn : seqn my  :                          
^SCR("L1MSF",4)
                                                                               
^SCR("L1MSF",5)
                                                                               
^SCR("L1MSF",6)
                                                                               
^SCR("L1MSF",7)
                                                                               
^SCR("L1MSF",8)
                                                                               
^SCR("L1MSF",9)
                                                                               
^SCR("L1MSF",10)
                                                                               
^SCR("L1MSF",11)
                                                                               
^SCR("L1MSF",12)
                                                                               
^SCR("L1MSF",13)
                                                                               
^SCR("L1MSF",14)
                                                                               
^SCR("L1MSF",15)
                                                                               
^SCR("L1MSF",16)
                                                                               
^SCR("L1MSF",17)
                        $1                                                     
^SCR("L1MSF","A",1)
š™˜‰”…‘ŽšŒ�ˆ
^SCR("L1MSF","A",2)

^SCR("L1MSF","A",3)
“…‘Ž'‘Ž“…‘Ž�™
^SCR("L1MSF","A",4)
--------------------
^SCR("L1MSF","A",5)

^SCR("L1MSF","A",6)

^SCR("L1MSF","A",7)

^SCR("L1MSF","A",8)

^SCR("L1MSF","A",9)

^SCR("L1MSF","A",10)

^SCR("L1MSF","A",11)

^SCR("L1MSF","A",12)

^SCR("L1MSF","A",13)

^SCR("L1MSF","A",14)

^SCR("L1MSF","A",15)

^SCR("L1MSF","A",16)

^SCR("L1MSF","A",17)

^SCR("L1MSF","AV",1)
,arhpuxn,kcy
^SCR("L1MSF","AV",2)

^SCR("L1MSF","AV",3)
;uxnwxn;uxnoa
^SCR("L1MSF","AV",4)
--------------------
^SCR("L1MSF","AV",5)

^SCR("L1MSF","AV",6)

^SCR("L1MSF","AV",7)

^SCR("L1MSF","AV",8)

^SCR("L1MSF","AV",9)

^SCR("L1MSF","AV",10)

^SCR("L1MSF","AV",11)

^SCR("L1MSF","AV",12)

^SCR("L1MSF","AV",13)

^SCR("L1MSF","AV",14)

^SCR("L1MSF","AV",15)

^SCR("L1MSF","AV",16)

^SCR("L1MSF","AV",17)

^SCR("L1MSF","G",1,"CRD")
4,52,E,10,0
^SCR("L1MSF","G",1,"HELP")

^SCR("L1MSF","G",1,"LMAX")
10
^SCR("L1MSF","G",1,"MUMPS1")

^SCR("L1MSF","G",1,"MUMPS2")

^SCR("L1MSF","G",1,"SHEM")
 seqn my  
^SCR("L1MSF","G",1,"TYP")
E
^SCR("L1MSF","G",2,"CRD")
4,41,N,2,0
^SCR("L1MSF","G",2,"HELP")

^SCR("L1MSF","G",2,"LMAX")
10
^SCR("L1MSF","G",2,"MUMPS1")

^SCR("L1MSF","G",2,"MUMPS2")

^SCR("L1MSF","G",2,"SHEM")
 seqn 'qn 
^SCR("L1MSF","G",2,"TYP")
N
^SCR("L1MSF","G","DEL")

^SCR("L1MSF","G","MAX")
999
^SCR("L1MSF","G","NAME","NMB")
2
^SCR("L1MSF","G","NAME","PSD")
1
^SCR("L1MSF","G","NM",1)
PSD
^SCR("L1MSF","G","NM",2)
NMB
^SCR("L1MSF","G","RB")
3,25,18,58
^SCR("L1MSF","G","REF")
^TEMP($P
^SCR("L1MSF","G","RZD")
\
^SCR("L1MSF","G","STEP")
1
^SCR("L1MSF","G","STG")
                              : seqn 'qn : seqn my  :                          
^SCR("L1MSF","G","VG")
5
^SCR("L1MSF","NAME")
PTS miteqn zxcbd
^SCR("L1TRP")
H
^SCR("L1TRP",1)
                                        {15      }: jix`z   {10     } : dvign  
^SCR("L1TRP",2)
                                                                               
^SCR("L1TRP",3)
                                                                           1$  
^SCR("L1TRP",4)
     :                            dpey`x   dxey                :  dpkez :      
^SCR("L1TRP",5)
                                                                               
^SCR("L1TRP",6)
                                                                               
^SCR("L1TRP",7)
                                                                               
^SCR("L1TRP",8)
                                                                               
^SCR("L1TRP",9)
                                                                               
^SCR("L1TRP",10)
                                                                               
^SCR("L1TRP",11)
                                                                               
^SCR("L1TRP",12)
                                                                               
^SCR("L1TRP",13)
                                                                               
^SCR("L1TRP",14)
                                                                               
^SCR("L1TRP",15)
                                                                               
^SCR("L1TRP",16)
                                                                               
^SCR("L1TRP",17)
                                                                               
^SCR("L1TRP",18)
                                                                               
^SCR("L1TRP",19)
                                                                               
^SCR("L1TRP",20)
  $1                                                                           
^SCR("L1TRP",21)
                                                                               
^SCR("L1TRP","A",1)
:Š‰˜€š:„–‰‡Ž
^SCR("L1TRP","A",2)

^SCR("L1TRP","A",3)

^SCR("L1TRP","A",4)
„�…™€˜„˜…™„�‹…š
^SCR("L1TRP","A",5)
-----------------------------------------------------------------
^SCR("L1TRP","A",6)

^SCR("L1TRP","A",7)

^SCR("L1TRP","A",8)

^SCR("L1TRP","A",9)

^SCR("L1TRP","A",10)

^SCR("L1TRP","A",11)

^SCR("L1TRP","A",12)

^SCR("L1TRP","A",13)

^SCR("L1TRP","A",14)

^SCR("L1TRP","A",15)

^SCR("L1TRP","A",16)

^SCR("L1TRP","A",17)

^SCR("L1TRP","A",18)

^SCR("L1TRP","A",19)

^SCR("L1TRP","A",20)

^SCR("L1TRP","A",21)

^SCR("L1TRP","AV",1)
:lhrt,:vmhjn
^SCR("L1TRP","AV",2)

^SCR("L1TRP","AV",3)

^SCR("L1TRP","AV",4)
vbuatrvruavbfu,
^SCR("L1TRP","AV",5)
-----------------------------------------------------------------
^SCR("L1TRP","AV",6)

^SCR("L1TRP","AV",7)

^SCR("L1TRP","AV",8)

^SCR("L1TRP","AV",9)

^SCR("L1TRP","AV",10)

^SCR("L1TRP","AV",11)

^SCR("L1TRP","AV",12)

^SCR("L1TRP","AV",13)

^SCR("L1TRP","AV",14)

^SCR("L1TRP","AV",15)

^SCR("L1TRP","AV",16)

^SCR("L1TRP","AV",17)

^SCR("L1TRP","AV",18)

^SCR("L1TRP","AV",19)

^SCR("L1TRP","AV",20)

^SCR("L1TRP","AV",21)

^SCR("L1TRP","G",1,"CRD")
5,72,E,8,0
^SCR("L1TRP","G",1,"HELP")
<F9> - dpkez bivdl , <F7> - zeipkez zniyx
^SCR("L1TRP","G",1,"LMAX")
8
^SCR("L1TRP","G",1,"MUMPS1")

^SCR("L1TRP","G",1,"MUMPS2")
D PROG^%L1TRP
^SCR("L1TRP","G",1,"MUST")

^SCR("L1TRP","G",1,"SHEM")
  dpkez 
^SCR("L1TRP","G",1,"TYP")
E
^SCR("L1TRP","G",2,"CRD")
5,63,E,55,0
^SCR("L1TRP","G",2,"HELP")

^SCR("L1TRP","G",2,"LMAX")
57
^SCR("L1TRP","G",2,"MUMPS1")

^SCR("L1TRP","G",2,"MUMPS2")

^SCR("L1TRP","G",2,"OUTPUT")

^SCR("L1TRP","G",2,"SHEM")
                            dpey`x   dxey                
^SCR("L1TRP","G",2,"TYP")
E
^SCR("L1TRP","G","DEL")
Y
^SCR("L1TRP","G","MAX")
9999
^SCR("L1TRP","G","NAME","HRA")
2
^SCR("L1TRP","G","NAME","PROG")
1
^SCR("L1TRP","G","NM",1)
PROG
^SCR("L1TRP","G","NM",2)
HRA
^SCR("L1TRP","G","RB")
4,3,21,77
^SCR("L1TRP","G","REF")
^TEMPR($P
^SCR("L1TRP","G","RZD")
\
^SCR("L1TRP","G","STEP")
1
^SCR("L1TRP","G","STG")
     :                            dpey`x   dxey                :  dpkez :      
^SCR("L1TRP","G","VG")
6
^SCR("L1TRP","NAME")

^SCR("L1TRP","P",10,"CRD")
1,60,E,7,0
^SCR("L1TRP","P",10,"HELP")

^SCR("L1TRP","P",10,"LMAX")
8
^SCR("L1TRP","P",10,"MUMPS1")

^SCR("L1TRP","P",10,"MUMPS2")

^SCR("L1TRP","P",10,"OUTPUT")

^SCR("L1TRP","P",10,"TYP")
E
^SCR("L1TRP","P",15,"CRD")
1,40,D,8,0
^SCR("L1TRP","P",15,"HELP")

^SCR("L1TRP","P",15,"LMAX")
9
^SCR("L1TRP","P",15,"MUMPS1")
S:'$G(TRH) TRH=$$^%L1DC($H,1)
^SCR("L1TRP","P",15,"MUMPS2")

^SCR("L1TRP","P",15,"OUTPUT")

^SCR("L1TRP","P",15,"TYP")
D
^SCR("L1TRP","P","NAME","TRH")
15
^SCR("L1TRP","P","NAME","UCI")
10
^SCR("L1TRP","P","NM",10)
UCI
^SCR("L1TRP","P","NM",15)
TRH
^SCR("L1TRPL")
H
^SCR("L1TRPL",1)
                                # xeciyl zegewl zniyx #                        
^SCR("L1TRPL",2)
                                                                               
^SCR("L1TRPL",3)
                                                                          1$   
^SCR("L1TRPL",4)
           : xar ji` : mcen 'qn :        gewl my         :  gewl 'qn  :        
^SCR("L1TRPL",5)
                                                                               
^SCR("L1TRPL",6)
                                                                               
^SCR("L1TRPL",7)
                                                                               
^SCR("L1TRPL",8)
                                                                               
^SCR("L1TRPL",9)
                                                                               
^SCR("L1TRPL",10)
                                                                               
^SCR("L1TRPL",11)
                                                                               
^SCR("L1TRPL",12)
                                                                               
^SCR("L1TRPL",13)
                                                                               
^SCR("L1TRPL",14)
                                                                               
^SCR("L1TRPL",15)
                                                                               
^SCR("L1TRPL",16)
                                                                               
^SCR("L1TRPL",17)
                                                                               
^SCR("L1TRPL",18)
                                                                               
^SCR("L1TRPL",19)
                                                                               
^SCR("L1TRPL",20)
                                                                               
^SCR("L1TRPL",21)
       $1                                                                      
^SCR("L1TRPL","A",1)
˜…ƒ‰™Œš…‡…—ŒšŽ‰™˜
^SCR("L1TRPL","A",2)

^SCR("L1TRPL","A",3)

^SCR("L1TRPL","A",4)
˜�’Š‰€�ƒ…Ž'‘Ž‡…—Œ�™‡…—Œ'‘Ž
^SCR("L1TRPL","A",5)
-------------------------------------------------------
^SCR("L1TRPL","A",6)

^SCR("L1TRPL","A",7)

^SCR("L1TRPL","A",8)

^SCR("L1TRPL","A",9)

^SCR("L1TRPL","A",10)

^SCR("L1TRPL","A",11)

^SCR("L1TRPL","A",12)

^SCR("L1TRPL","A",13)

^SCR("L1TRPL","A",14)

^SCR("L1TRPL","A",15)

^SCR("L1TRPL","A",16)

^SCR("L1TRPL","A",17)

^SCR("L1TRPL","A",18)

^SCR("L1TRPL","A",19)

^SCR("L1TRPL","A",20)

^SCR("L1TRPL","A",21)

^SCR("L1TRPL","AV",1)
rushak,ujuek,nhar
^SCR("L1TRPL","AV",2)

^SCR("L1TRPL","AV",3)

^SCR("L1TRPL","AV",4)
rcglhtosunwxnjuekoajuekwxn
^SCR("L1TRPL","AV",5)
-------------------------------------------------------
^SCR("L1TRPL","AV",6)

^SCR("L1TRPL","AV",7)

^SCR("L1TRPL","AV",8)

^SCR("L1TRPL","AV",9)

^SCR("L1TRPL","AV",10)

^SCR("L1TRPL","AV",11)

^SCR("L1TRPL","AV",12)

^SCR("L1TRPL","AV",13)

^SCR("L1TRPL","AV",14)

^SCR("L1TRPL","AV",15)

^SCR("L1TRPL","AV",16)

^SCR("L1TRPL","AV",17)

^SCR("L1TRPL","AV",18)

^SCR("L1TRPL","AV",19)

^SCR("L1TRPL","AV",20)

^SCR("L1TRPL","AV",21)

^SCR("L1TRPL","G",1,"CHECK")
Y
^SCR("L1TRPL","G",1,"CRD")
5,70,E,10,0
^SCR("L1TRPL","G",1,"FNC")
F6,F7
^SCR("L1TRPL","G",1,"GLOB")
LAK
^SCR("L1TRPL","G",1,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("L1TRPL","G",1,"LMAX")
12
^SCR("L1TRPL","G",1,"MUMPS1")

^SCR("L1TRPL","G",1,"MUMPS2")
D LKH^%L1TRP
^SCR("L1TRPL","G",1,"NLN")
20
^SCR("L1TRPL","G",1,"RZD")
\
^SCR("L1TRPL","G",1,"SHEM")
  gewl 'qn  
^SCR("L1TRPL","G",1,"TOPB")
8
^SCR("L1TRPL","G",1,"TYP")
E
^SCR("L1TRPL","G",1,"VRB")
LKH1
^SCR("L1TRPL","G",2,"CRD")
5,57,H,24,0
^SCR("L1TRPL","G",2,"HELP")

^SCR("L1TRPL","G",2,"LMAX")
24
^SCR("L1TRPL","G",2,"MUMPS1")

^SCR("L1TRPL","G",2,"MUMPS2")

^SCR("L1TRPL","G",2,"OUTPUT")

^SCR("L1TRPL","G",2,"SHEM")
        gewl my         
^SCR("L1TRPL","G",2,"TYP")
H
^SCR("L1TRPL","G",3,"CRD")
5,32,E,10,0
^SCR("L1TRPL","G",3,"HELP")

^SCR("L1TRPL","G",3,"LMAX")
10
^SCR("L1TRPL","G",3,"MUMPS1")

^SCR("L1TRPL","G",3,"MUMPS2")

^SCR("L1TRPL","G",3,"SHEM")
 mcen 'qn 
^SCR("L1TRPL","G",3,"TYP")
E
^SCR("L1TRPL","G",4,"CRD")
5,21,E,3,0
^SCR("L1TRPL","G",4,"HELP")

^SCR("L1TRPL","G",4,"LMAX")
9
^SCR("L1TRPL","G",4,"MUMPS1")

^SCR("L1TRPL","G",4,"MUMPS2")

^SCR("L1TRPL","G",4,"OUTPUT")

^SCR("L1TRPL","G",4,"SHEM")
 xar ji` 
^SCR("L1TRPL","G",4,"TYP")
E
^SCR("L1TRPL","G","DEL")
Y
^SCR("L1TRPL","G","MAX")
99999
^SCR("L1TRPL","G","NAME","LKH")
1
^SCR("L1TRPL","G","NAME","LKH1")
2
^SCR("L1TRPL","G","NAME","MDPHONE")
3
^SCR("L1TRPL","G","NAME","SIMAN")
4
^SCR("L1TRPL","G","NM",1)
LKH
^SCR("L1TRPL","G","NM",2)
LKH1
^SCR("L1TRPL","G","NM",3)
MDPHONE
^SCR("L1TRPL","G","NM",4)
SIMAN
^SCR("L1TRPL","G","RB")
4,8,22,76
^SCR("L1TRPL","G","REF")
^TEMPL($P
^SCR("L1TRPL","G","RZD")
\
^SCR("L1TRPL","G","STEP")
1
^SCR("L1TRPL","G","STG")
           : xar ji` : mcen 'qn :        gewl my         :  gewl 'qn  :        
^SCR("L1TRPL","G","VG")
6
^SCR("L1TRPL","NAME")

^SCR("L1TRSNSC")
H
^SCR("L1TRSNSC",1)
                                    # zegewl yetig #                           
^SCR("L1TRSNSC",2)
                                                                               
^SCR("L1TRSNSC",3)
                                                                             1]
^SCR("L1TRSNSC",4)
    {           26} {25 }:  gewl beq cr   {          21} {20 }:     gewl beqn  
^SCR("L1TRSNSC",5)
             {29        }:      gewl cr           {28        }:         gewln  
^SCR("L1TRSNSC",6)
                                                      {              35}: xir  
^SCR("L1TRSNSC",7)
                   {50      }: jix`z cr      {45      }: oecrenl dqipk jix`zn  
^SCR("L1TRSNSC",8)
                        {60     }:  dcil jix`z cr    {55     }:   dcil jix`zn  
^SCR("L1TRSNSC",9)
                        {63     }: dgizt jix`z cr    {62     }:  dgizt jix`zn  
^SCR("L1TRSNSC",10)
                                                              {70:i`xy`l xey`  
^SCR("L1TRSNSC",11)
                                      {80      } : dxzi cr {75      } : dxzin  
^SCR("L1TRSNSC",12)
 [1                                                                            
^SCR("L1TRSNSC","A",1)
š…‡…—Œ™…”‰‡
^SCR("L1TRSNSC","A",2)

^SCR("L1TRSNSC","A",3)

^SCR("L1TRSNSC","A",4)
:‡…—Œ‚…‘ƒ’:‡…—Œ‚…‘Ž
^SCR("L1TRSNSC","A",5)
:‡…—Œƒ’:‡…—ŒŽ
^SCR("L1TRSNSC","A",6)
:˜‰’
^SCR("L1TRSNSC","A",7)
:Š‰˜€šƒ’:�…ƒ’…ŽŒ„‘‰�‹Š‰˜€šŽ
^SCR("L1TRSNSC","A",8)
:„ƒ‰ŒŠ‰˜€šƒ’:„ƒ‰ŒŠ‰˜€šŽ
^SCR("L1TRSNSC","A",9)
:„‡‰š”Š‰˜€šƒ’:„‡‰š”Š‰˜€šŽ
^SCR("L1TRSNSC","A",10)
:‰€˜™€Œ˜…™€
^SCR("L1TRSNSC","A",11)
:„˜š‰ƒ’:„˜š‰Ž
^SCR("L1TRSNSC","A",12)

^SCR("L1TRSNSC","AV",1)
,ujuekauphj
^SCR("L1TRSNSC","AV",2)

^SCR("L1TRSNSC","AV",3)

^SCR("L1TRSNSC","AV",4)
:juekduxsg:juekduxn
^SCR("L1TRSNSC","AV",5)
:jueksg:juekn
^SCR("L1TRSNSC","AV",6)
:rhg
^SCR("L1TRSNSC","AV",7)
:lhrt,sg:iusgunkvxhbflhrt,n
^SCR("L1TRSNSC","AV",8)
:vshklhrt,sg:vshklhrt,n
^SCR("L1TRSNSC","AV",9)
:vjh,plhrt,sg:vjh,plhrt,n
^SCR("L1TRSNSC","AV",10)
:htratkruat
^SCR("L1TRSNSC","AV",11)
:vr,hsg:vr,hn
^SCR("L1TRSNSC","AV",12)

^SCR("L1TRSNSC","NAME")

^SCR("L1TRSNSC","P",20,"CRD")
4,57,E,4,0
^SCR("L1TRSNSC","P",20,"FNC")

^SCR("L1TRSNSC","P",20,"GLOB")
SUGL
^SCR("L1TRSNSC","P",20,"HELP")

^SCR("L1TRSNSC","P",20,"LMAX")
4
^SCR("L1TRSNSC","P",20,"MUMPS1")

^SCR("L1TRSNSC","P",20,"MUMPS2")

^SCR("L1TRSNSC","P",20,"NLN")
20
^SCR("L1TRSNSC","P",20,"RZD")
\
^SCR("L1TRSNSC","P",20,"TOPB")
8
^SCR("L1TRSNSC","P",20,"TYP")
E
^SCR("L1TRSNSC","P",20,"VRB")
MESUGL1
^SCR("L1TRSNSC","P",21,"CRD")
4,56,H,13
^SCR("L1TRSNSC","P",21,"HELP")

^SCR("L1TRSNSC","P",21,"LMAX")
13
^SCR("L1TRSNSC","P",21,"MUMPS1")

^SCR("L1TRSNSC","P",21,"MUMPS2")

^SCR("L1TRSNSC","P",21,"OUTPUT")

^SCR("L1TRSNSC","P",21,"TYP")
H
^SCR("L1TRSNSC","P",25,"CRD")
4,20,E,4,0
^SCR("L1TRSNSC","P",25,"FNC")

^SCR("L1TRSNSC","P",25,"GLOB")
SUGL
^SCR("L1TRSNSC","P",25,"HELP")

^SCR("L1TRSNSC","P",25,"LMAX")
4
^SCR("L1TRSNSC","P",25,"MUMPS1")
S:$G(MESUGL)&'$G(ADSUGL) ADSUGL=MESUGL
^SCR("L1TRSNSC","P",25,"MUMPS2")
I ADSUGL<MESUGL S %SC("ER")=1
^SCR("L1TRSNSC","P",25,"NLN")
20
^SCR("L1TRSNSC","P",25,"RZD")
\
^SCR("L1TRSNSC","P",25,"TOPB")
8
^SCR("L1TRSNSC","P",25,"TYP")
E
^SCR("L1TRSNSC","P",25,"VRB")
ADSUGL1
^SCR("L1TRSNSC","P",26,"CRD")
4,19,H,14
^SCR("L1TRSNSC","P",26,"HELP")

^SCR("L1TRSNSC","P",26,"LMAX")
14
^SCR("L1TRSNSC","P",26,"MUMPS1")

^SCR("L1TRSNSC","P",26,"MUMPS2")

^SCR("L1TRSNSC","P",26,"OUTPUT")

^SCR("L1TRSNSC","P",26,"TYP")
H
^SCR("L1TRSNSC","P",28,"CRD")
5,50,E,10,0
^SCR("L1TRSNSC","P",28,"FNC")

^SCR("L1TRSNSC","P",28,"GLOB")
LKH
^SCR("L1TRSNSC","P",28,"HELP")

^SCR("L1TRSNSC","P",28,"LMAX")
11
^SCR("L1TRSNSC","P",28,"MUMPS1")

^SCR("L1TRSNSC","P",28,"MUMPS2")

^SCR("L1TRSNSC","P",28,"NLN")
20
^SCR("L1TRSNSC","P",28,"RZD")
\
^SCR("L1TRSNSC","P",28,"TOPB")
8
^SCR("L1TRSNSC","P",28,"TYP")
E
^SCR("L1TRSNSC","P",29,"CRD")
5,13,E,10,0
^SCR("L1TRSNSC","P",29,"FNC")

^SCR("L1TRSNSC","P",29,"GLOB")
LKH
^SCR("L1TRSNSC","P",29,"HELP")

^SCR("L1TRSNSC","P",29,"LMAX")
11
^SCR("L1TRSNSC","P",29,"MUMPS1")

^SCR("L1TRSNSC","P",29,"MUMPS2")
I ADLKH<MELKH S %SC("ER")=1
^SCR("L1TRSNSC","P",29,"NLN")
20
^SCR("L1TRSNSC","P",29,"RZD")
\
^SCR("L1TRSNSC","P",29,"TOPB")
8
^SCR("L1TRSNSC","P",29,"TYP")
E
^SCR("L1TRSNSC","P",35,"CRD")
6,72,H,14
^SCR("L1TRSNSC","P",35,"HELP")

^SCR("L1TRSNSC","P",35,"LMAX")
17
^SCR("L1TRSNSC","P",35,"MUMPS1")

^SCR("L1TRSNSC","P",35,"MUMPS2")

^SCR("L1TRSNSC","P",35,"TYP")
H
^SCR("L1TRSNSC","P",45,"CRD")
7,45,D,8,0
^SCR("L1TRSNSC","P",45,"HELP")

^SCR("L1TRSNSC","P",45,"LMAX")
9
^SCR("L1TRSNSC","P",45,"MUMPS1")

^SCR("L1TRSNSC","P",45,"MUMPS2")

^SCR("L1TRSNSC","P",45,"TYP")
D
^SCR("L1TRSNSC","P",50,"CRD")
7,19,D,8,0
^SCR("L1TRSNSC","P",50,"HELP")

^SCR("L1TRSNSC","P",50,"LMAX")
9
^SCR("L1TRSNSC","P",50,"MUMPS1")

^SCR("L1TRSNSC","P",50,"MUMPS2")

^SCR("L1TRSNSC","P",50,"TYP")
D
^SCR("L1TRSNSC","P",55,"CRD")
8,53,D,8,0
^SCR("L1TRSNSC","P",55,"HELP")

^SCR("L1TRSNSC","P",55,"LMAX")
8
^SCR("L1TRSNSC","P",55,"MUMPS1")

^SCR("L1TRSNSC","P",55,"MUMPS2")

^SCR("L1TRSNSC","P",55,"TYP")
D
^SCR("L1TRSNSC","P",60,"CRD")
8,24,D,8,0
^SCR("L1TRSNSC","P",60,"HELP")

^SCR("L1TRSNSC","P",60,"LMAX")
8
^SCR("L1TRSNSC","P",60,"MUMPS1")

^SCR("L1TRSNSC","P",60,"MUMPS2")
I $$^%L1DC(ADTRH,3)<$$^%L1DC(METRH,3) S %SC("ER")=1
^SCR("L1TRSNSC","P",60,"TYP")
D
^SCR("L1TRSNSC","P",62,"CRD")
9,53,D,8,0
^SCR("L1TRSNSC","P",62,"HELP")

^SCR("L1TRSNSC","P",62,"LMAX")
8
^SCR("L1TRSNSC","P",62,"MUMPS1")

^SCR("L1TRSNSC","P",62,"MUMPS2")

^SCR("L1TRSNSC","P",62,"TYP")
D
^SCR("L1TRSNSC","P",63,"CRD")
9,24,D,8,0
^SCR("L1TRSNSC","P",63,"HELP")

^SCR("L1TRSNSC","P",63,"LMAX")
8
^SCR("L1TRSNSC","P",63,"MUMPS1")

^SCR("L1TRSNSC","P",63,"MUMPS2")
I $$^%L1DC(ADDATPTH,3)<$$^%L1DC(MEDATPTH,3) S %SC("ER")=1
^SCR("L1TRSNSC","P",63,"TYP")
D
^SCR("L1TRSNSC","P",70,"CRD")
10,62,E,1,0
^SCR("L1TRSNSC","P",70,"HELP")

^SCR("L1TRSNSC","P",70,"LMAX")
3
^SCR("L1TRSNSC","P",70,"MUMPS1")

^SCR("L1TRSNSC","P",70,"MUMPS2")
I $L(ISAH),$$^%L1YN("ISAH")<0 S %SC("ER")=1
^SCR("L1TRSNSC","P",70,"TYP")
E
^SCR("L1TRSNSC","P",75,"CRD")
11,59,N,9,1
^SCR("L1TRSNSC","P",75,"HELP")

^SCR("L1TRSNSC","P",75,"LMAX")
9
^SCR("L1TRSNSC","P",75,"MUMPS1")

^SCR("L1TRSNSC","P",75,"MUMPS2")

^SCR("L1TRSNSC","P",75,"TYP")
N
^SCR("L1TRSNSC","P",80,"CRD")
11,38,N,9,1
^SCR("L1TRSNSC","P",80,"HELP")

^SCR("L1TRSNSC","P",80,"LMAX")
9
^SCR("L1TRSNSC","P",80,"MUMPS1")

^SCR("L1TRSNSC","P",80,"MUMPS2")
S:'$G(ADITRA) ADITRA=9999999 I ADITRA<MEITRA S %SC("ER")=1
^SCR("L1TRSNSC","P",80,"TYP")
N
^SCR("L1TRSNSC","P","NAME","ADDATPTH")
63
^SCR("L1TRSNSC","P","NAME","ADITRA")
80
^SCR("L1TRSNSC","P","NAME","ADLKH")
29
^SCR("L1TRSNSC","P","NAME","ADSUGL")
25
^SCR("L1TRSNSC","P","NAME","ADSUGL1")
26
^SCR("L1TRSNSC","P","NAME","ADTRH")
60
^SCR("L1TRSNSC","P","NAME","ADTRHML")
50
^SCR("L1TRSNSC","P","NAME","IR")
35
^SCR("L1TRSNSC","P","NAME","ISAH")
70
^SCR("L1TRSNSC","P","NAME","MEDATPTH")
62
^SCR("L1TRSNSC","P","NAME","MEITRA")
75
^SCR("L1TRSNSC","P","NAME","MELKH")
28
^SCR("L1TRSNSC","P","NAME","MESUGL")
20
^SCR("L1TRSNSC","P","NAME","MESUGL1")
21
^SCR("L1TRSNSC","P","NAME","METRH")
55
^SCR("L1TRSNSC","P","NAME","METRHML")
45
^SCR("L1TRSNSC","P","NM",20)
MESUGL
^SCR("L1TRSNSC","P","NM",21)
MESUGL1
^SCR("L1TRSNSC","P","NM",25)
ADSUGL
^SCR("L1TRSNSC","P","NM",26)
ADSUGL1
^SCR("L1TRSNSC","P","NM",28)
MELKH
^SCR("L1TRSNSC","P","NM",29)
ADLKH
^SCR("L1TRSNSC","P","NM",35)
IR
^SCR("L1TRSNSC","P","NM",45)
METRHML
^SCR("L1TRSNSC","P","NM",50)
ADTRHML
^SCR("L1TRSNSC","P","NM",55)
METRH
^SCR("L1TRSNSC","P","NM",60)
ADTRH
^SCR("L1TRSNSC","P","NM",62)
MEDATPTH
^SCR("L1TRSNSC","P","NM",63)
ADDATPTH
^SCR("L1TRSNSC","P","NM",70)
ISAH
^SCR("L1TRSNSC","P","NM",75)
MEITRA
^SCR("L1TRSNSC","P","NM",80)
ADITRA
^SCR("L1TRSNSC","P","RB",1)
4,2,13,79
^SCR("L1TRSNSL")
H
^SCR("L1TRSNSL",1)
                                # xeciyl zegewl zniyx #                        
^SCR("L1TRSNSL",2)
                                                                               
^SCR("L1TRSNSL",3)
                                                                          1$   
^SCR("L1TRSNSL",4)
       : xar ji` : ciip 'lh 'qn :        gewl my         :  gewl 'qn  :        
^SCR("L1TRSNSL",5)
                                                                               
^SCR("L1TRSNSL",6)
                                                                               
^SCR("L1TRSNSL",7)
                                                                               
^SCR("L1TRSNSL",8)
                                                                               
^SCR("L1TRSNSL",9)
                                                                               
^SCR("L1TRSNSL",10)
                                                                               
^SCR("L1TRSNSL",11)
                                                                               
^SCR("L1TRSNSL",12)
                                                                               
^SCR("L1TRSNSL",13)
                                                                               
^SCR("L1TRSNSL",14)
                                                                               
^SCR("L1TRSNSL",15)
                                                                               
^SCR("L1TRSNSL",16)
                                                                               
^SCR("L1TRSNSL",17)
                                                                               
^SCR("L1TRSNSL",18)
                                                                               
^SCR("L1TRSNSL",19)
                                                                               
^SCR("L1TRSNSL",20)
                                                                               
^SCR("L1TRSNSL",21)
    $1                                                                         
^SCR("L1TRSNSL","A",1)
˜…ƒ‰™Œš…‡…—ŒšŽ‰™˜
^SCR("L1TRSNSL","A",2)

^SCR("L1TRSNSL","A",3)

^SCR("L1TRSNSL","A",4)
˜�’Š‰€ƒ‰‰�'Œˆ'‘Ž‡…—Œ�™‡…—Œ'‘Ž
^SCR("L1TRSNSL","A",5)
-----------------------------------------------------------
^SCR("L1TRSNSL","A",6)

^SCR("L1TRSNSL","A",7)

^SCR("L1TRSNSL","A",8)

^SCR("L1TRSNSL","A",9)

^SCR("L1TRSNSL","A",10)

^SCR("L1TRSNSL","A",11)

^SCR("L1TRSNSL","A",12)

^SCR("L1TRSNSL","A",13)

^SCR("L1TRSNSL","A",14)

^SCR("L1TRSNSL","A",15)

^SCR("L1TRSNSL","A",16)

^SCR("L1TRSNSL","A",17)

^SCR("L1TRSNSL","A",18)

^SCR("L1TRSNSL","A",19)

^SCR("L1TRSNSL","A",20)

^SCR("L1TRSNSL","A",21)

^SCR("L1TRSNSL","AV",1)
rushak,ujuek,nhar
^SCR("L1TRSNSL","AV",2)

^SCR("L1TRSNSL","AV",3)

^SCR("L1TRSNSL","AV",4)
rcglhtshhbwkywxnjuekoajuekwxn
^SCR("L1TRSNSL","AV",5)
-----------------------------------------------------------
^SCR("L1TRSNSL","AV",6)

^SCR("L1TRSNSL","AV",7)

^SCR("L1TRSNSL","AV",8)

^SCR("L1TRSNSL","AV",9)

^SCR("L1TRSNSL","AV",10)

^SCR("L1TRSNSL","AV",11)

^SCR("L1TRSNSL","AV",12)

^SCR("L1TRSNSL","AV",13)

^SCR("L1TRSNSL","AV",14)

^SCR("L1TRSNSL","AV",15)

^SCR("L1TRSNSL","AV",16)

^SCR("L1TRSNSL","AV",17)

^SCR("L1TRSNSL","AV",18)

^SCR("L1TRSNSL","AV",19)

^SCR("L1TRSNSL","AV",20)

^SCR("L1TRSNSL","AV",21)

^SCR("L1TRSNSL","G",1,"CRD")
5,70,E,11,0
^SCR("L1TRSNSL","G",1,"FNC")
F6,F7
^SCR("L1TRSNSL","G",1,"GLOB")
L1TRSNS
^SCR("L1TRSNSL","G",1,"HELP")
<F9> - gewl qihxk , <F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("L1TRSNSL","G",1,"LMAX")
12
^SCR("L1TRSNSL","G",1,"MUMPS1")

^SCR("L1TRSNSL","G",1,"MUMPS2")
D LKH^%L1TRSNS
^SCR("L1TRSNSL","G",1,"MUST")

^SCR("L1TRSNSL","G",1,"NLN")
20
^SCR("L1TRSNSL","G",1,"RZD")
\
^SCR("L1TRSNSL","G",1,"SHEM")
  gewl 'qn  
^SCR("L1TRSNSL","G",1,"TOPB")
8
^SCR("L1TRSNSL","G",1,"TYP")
E
^SCR("L1TRSNSL","G",1,"VRB")
LKH1
^SCR("L1TRSNSL","G",2,"CRD")
5,57,H,24,0
^SCR("L1TRSNSL","G",2,"HELP")

^SCR("L1TRSNSL","G",2,"LMAX")
24
^SCR("L1TRSNSL","G",2,"MUMPS1")

^SCR("L1TRSNSL","G",2,"MUMPS2")

^SCR("L1TRSNSL","G",2,"OUTPUT")

^SCR("L1TRSNSL","G",2,"SHEM")
        gewl my         
^SCR("L1TRSNSL","G",2,"TYP")
H
^SCR("L1TRSNSL","G",3,"CRD")
5,32,E,10,0
^SCR("L1TRSNSL","G",3,"HELP")

^SCR("L1TRSNSL","G",3,"LMAX")
14
^SCR("L1TRSNSL","G",3,"MUMPS1")

^SCR("L1TRSNSL","G",3,"MUMPS2")

^SCR("L1TRSNSL","G",3,"MUST")

^SCR("L1TRSNSL","G",3,"SHEM")
 ciip 'lh 'qn 
^SCR("L1TRSNSL","G",3,"TYP")
E
^SCR("L1TRSNSL","G",4,"CRD")
5,17,E,3,0
^SCR("L1TRSNSL","G",4,"HELP")

^SCR("L1TRSNSL","G",4,"LMAX")
9
^SCR("L1TRSNSL","G",4,"MUMPS1")

^SCR("L1TRSNSL","G",4,"MUMPS2")

^SCR("L1TRSNSL","G",4,"OUTPUT")

^SCR("L1TRSNSL","G",4,"SHEM")
 xar ji` 
^SCR("L1TRSNSL","G",4,"TYP")
E
^SCR("L1TRSNSL","G","DEL")
Y
^SCR("L1TRSNSL","G","MAX")
99999
^SCR("L1TRSNSL","G","NAME","LKH")
1
^SCR("L1TRSNSL","G","NAME","LKH1")
2
^SCR("L1TRSNSL","G","NAME","MDPHONE")
3
^SCR("L1TRSNSL","G","NAME","SIMAN")
4
^SCR("L1TRSNSL","G","NM",1)
LKH
^SCR("L1TRSNSL","G","NM",2)
LKH1
^SCR("L1TRSNSL","G","NM",3)
MDPHONE
^SCR("L1TRSNSL","G","NM",4)
SIMAN
^SCR("L1TRSNSL","G","RB")
4,5,22,76
^SCR("L1TRSNSL","G","REF")
^TMPL($P
^SCR("L1TRSNSL","G","RZD")
\
^SCR("L1TRSNSL","G","STEP")
1
^SCR("L1TRSNSL","G","STG")
       : xar ji` : ciip 'lh 'qn :        gewl my         :  gewl 'qn  :        
^SCR("L1TRSNSL","G","VG")
6
^SCR("L1TRSNSL","NAME")

^SCR("L1TRSNSV")
H
^SCR("L1TRSNSV",1)
                                                                               
^SCR("L1TRSNSV",2)
                                                                               
^SCR("L1TRSNSV",3)
                                                                               
^SCR("L1TRSNSV",4)
                                                                               
^SCR("L1TRSNSV",5)
                                                                               
^SCR("L1TRSNSV",6)
                                                                               
^SCR("L1TRSNSV",7)
                                                                               
^SCR("L1TRSNSV",8)
                                                                               
^SCR("L1TRSNSV",9)
                                                                               
^SCR("L1TRSNSV",10)
                                                                               
^SCR("L1TRSNSV",11)
                                                                               
^SCR("L1TRSNSV",12)
                                                                               
^SCR("L1TRSNSV",13)
                                                                               
^SCR("L1TRSNSV",14)
                                                                               
^SCR("L1TRSNSV",15)
                                                                               
^SCR("L1TRSNSV",16)
                                                                         1]    
^SCR("L1TRSNSV",17)
                   {05 : ( `l - 0, dniyx xegal - 2 ,ok - 1) zegewl uaew        
^SCR("L1TRSNSV",18)
                   {10 :         (`l - 0 ,ok- 1)      zexya zegewl uaew        
^SCR("L1TRSNSV",19)
                   {15 :         (`l - 0 ,ok- 1)            mipetlh xtq        
^SCR("L1TRSNSV",20)
                   {20 :         (`l - 0 ,ok- 1)      (i`ln) miwtq uaew        
^SCR("L1TRSNSV",21)
                   {25 :         (`l - 0 ,ok- 1) ( i`ln) miinipt mifkxn        
^SCR("L1TRSNSV",22)
             [1                                                                
^SCR("L1TRSNSV","A",1)

^SCR("L1TRSNSV","A",2)

^SCR("L1TRSNSV","A",3)

^SCR("L1TRSNSV","A",4)

^SCR("L1TRSNSV","A",5)

^SCR("L1TRSNSV","A",6)

^SCR("L1TRSNSV","A",7)

^SCR("L1TRSNSV","A",8)

^SCR("L1TRSNSV","A",9)

^SCR("L1TRSNSV","A",10)

^SCR("L1TRSNSV","A",11)

^SCR("L1TRSNSV","A",12)

^SCR("L1TRSNSV","A",13)

^SCR("L1TRSNSV","A",14)

^SCR("L1TRSNSV","A",15)

^SCR("L1TRSNSV","A",16)

^SCR("L1TRSNSV","A",17)
:(€Œ-0,„Ž‰™˜˜…‡�Œ-2,�‹-1)š…‡…—Œ•�…—
^SCR("L1TRSNSV","A",18)
:(€Œ-0,�‹-1)š…˜™�š…‡…—Œ•�…—
^SCR("L1TRSNSV","A",19)
:(€Œ-0,�‹-1)�‰�…”Œˆ˜”‘
^SCR("L1TRSNSV","A",20)
:(€Œ-0,�‹-1)(‰€ŒŽ)�‰—”‘•�…—
^SCR("L1TRSNSV","A",21)
:(€Œ-0,�‹-1)(‰€ŒŽ)�‰‰Ž‰�”�‰†‹˜Ž
^SCR("L1TRSNSV","A",22)

^SCR("L1TRSNSV","AV",1)

^SCR("L1TRSNSV","AV",2)

^SCR("L1TRSNSV","AV",3)

^SCR("L1TRSNSV","AV",4)

^SCR("L1TRSNSV","AV",5)

^SCR("L1TRSNSV","AV",6)

^SCR("L1TRSNSV","AV",7)

^SCR("L1TRSNSV","AV",8)

^SCR("L1TRSNSV","AV",9)

^SCR("L1TRSNSV","AV",10)

^SCR("L1TRSNSV","AV",11)

^SCR("L1TRSNSV","AV",12)

^SCR("L1TRSNSV","AV",13)

^SCR("L1TRSNSV","AV",14)

^SCR("L1TRSNSV","AV",15)

^SCR("L1TRSNSV","AV",16)

^SCR("L1TRSNSV","AV",17)
:(tk-0'vnharrujck-2'if-1),ujuek•cue
^SCR("L1TRSNSV","AV",18)
:(tk-0'if-1),urac,ujuek•cue
^SCR("L1TRSNSV","AV",19)
:(tk-0'if-1)ohbupkyrpx
^SCR("L1TRSNSV","AV",20)
:(tk-0'if-1)(htkn)ohepx•cue
^SCR("L1TRSNSV","AV",21)
:(tk-0'if-1)(htkn)ohhnhbpohzfrn
^SCR("L1TRSNSV","AV",22)

^SCR("L1TRSNSV","NAME")
zegewl zxiga
^SCR("L1TRSNSV","P",5,"CRD")
17,19,N,3,0
^SCR("L1TRSNSV","P",5,"HELP")

^SCR("L1TRSNSV","P",5,"LMAX")
4
^SCR("L1TRSNSV","P",5,"MUMPS1")

^SCR("L1TRSNSV","P",5,"MUMPS2")
I VLKH'=0,VLKH'=1,VLKH'=2 S %SC("ER")=1 Q
^SCR("L1TRSNSV","P",5,"TYP")
N
^SCR("L1TRSNSV","P",10,"CRD")
18,19,N,3,0
^SCR("L1TRSNSV","P",10,"HELP")

^SCR("L1TRSNSV","P",10,"LMAX")
4
^SCR("L1TRSNSV","P",10,"MUMPS1")

^SCR("L1TRSNSV","P",10,"MUMPS2")
D ^%L1BDO
^SCR("L1TRSNSV","P",10,"TYP")
N
^SCR("L1TRSNSV","P",15,"CRD")
19,19,N,3,0
^SCR("L1TRSNSV","P",15,"HELP")

^SCR("L1TRSNSV","P",15,"LMAX")
4
^SCR("L1TRSNSV","P",15,"MUMPS1")

^SCR("L1TRSNSV","P",15,"MUMPS2")
D ^%L1BDO
^SCR("L1TRSNSV","P",15,"TYP")
N
^SCR("L1TRSNSV","P",20,"CRD")
20,19,N,3,0
^SCR("L1TRSNSV","P",20,"HELP")

^SCR("L1TRSNSV","P",20,"LMAX")
4
^SCR("L1TRSNSV","P",20,"MUMPS1")

^SCR("L1TRSNSV","P",20,"MUMPS2")
D ^%L1BDO
^SCR("L1TRSNSV","P",20,"TYP")
N
^SCR("L1TRSNSV","P",25,"CRD")
21,19,N,3,0
^SCR("L1TRSNSV","P",25,"HELP")

^SCR("L1TRSNSV","P",25,"LMAX")
4
^SCR("L1TRSNSV","P",25,"MUMPS1")

^SCR("L1TRSNSV","P",25,"MUMPS2")
D ^%L1BDO
^SCR("L1TRSNSV","P",25,"TYP")
N
^SCR("L1TRSNSV","P","NAME","VLAK")
10
^SCR("L1TRSNSV","P","NAME","VLKH")
5
^SCR("L1TRSNSV","P","NAME","VMRK")
25
^SCR("L1TRSNSV","P","NAME","VSAP")
20
^SCR("L1TRSNSV","P","NAME","VSEF")
15
^SCR("L1TRSNSV","P","NM",5)
VLKH
^SCR("L1TRSNSV","P","NM",10)
VLAK
^SCR("L1TRSNSV","P","NM",15)
VSEF
^SCR("L1TRSNSV","P","NM",20)
VSAP
^SCR("L1TRSNSV","P","NM",25)
VMRK
^SCR("L1TRSNSV","P","RB",1)
17,14,23,75
^SCR("LEV1")
H
^SCR("LEV1",1)
                                                                               
^SCR("LEV1",2)
                                                                               
^SCR("LEV1",3)
                                                                               
^SCR("LEV1",4)
                                                                               
^SCR("LEV1",5)
                                                                               
^SCR("LEV1",6)
                                                                               
^SCR("LEV1",7)
                                                                               
^SCR("LEV1",8)
                                                                               
^SCR("LEV1",9)
                                                                               
^SCR("LEV1",10)
                                                                               
^SCR("LEV1",11)
                                                                               
^SCR("LEV1",12)
                                                                               
^SCR("LEV1",13)
                                                                               
^SCR("LEV1",14)
                                                                               
^SCR("LEV1",15)
                                                                               
^SCR("LEV1",16)
                                                                     1]        
^SCR("LEV1",17)
                                         {10    :         dryl zxekyn          
^SCR("LEV1",18)
                                         {12    :  'e mei zryl zxekyn          
^SCR("LEV1",19)
                                         {15    : zay mie zryl zxekyn          
^SCR("LEV1",20)
          [1                                                                   
^SCR("LEV1","A",1)

^SCR("LEV1","A",2)

^SCR("LEV1","A",3)

^SCR("LEV1","A",4)

^SCR("LEV1","A",5)

^SCR("LEV1","A",6)

^SCR("LEV1","A",7)

^SCR("LEV1","A",8)

^SCR("LEV1","A",9)

^SCR("LEV1","A",10)

^SCR("LEV1","A",11)

^SCR("LEV1","A",12)

^SCR("LEV1","A",13)

^SCR("LEV1","A",14)

^SCR("LEV1","A",15)

^SCR("LEV1","A",16)

^SCR("LEV1","A",17)
:„’™Œš˜…‹™Ž
^SCR("LEV1","A",18)
:'…�…‰š’™Œš˜…‹™Ž
^SCR("LEV1","A",19)
:š�™�‰…š’™Œš˜…‹™Ž
^SCR("LEV1","A",20)

^SCR("LEV1","AV",1)

^SCR("LEV1","AV",2)

^SCR("LEV1","AV",3)

^SCR("LEV1","AV",4)

^SCR("LEV1","AV",5)

^SCR("LEV1","AV",6)

^SCR("LEV1","AV",7)

^SCR("LEV1","AV",8)

^SCR("LEV1","AV",9)

^SCR("LEV1","AV",10)

^SCR("LEV1","AV",11)

^SCR("LEV1","AV",12)

^SCR("LEV1","AV",13)

^SCR("LEV1","AV",14)

^SCR("LEV1","AV",15)

^SCR("LEV1","AV",16)

^SCR("LEV1","AV",17)
:vgak,rufan
^SCR("LEV1","AV",18)
:wuouh,gak,rufan
^SCR("LEV1","AV",19)
:,caohu,gak,rufan
^SCR("LEV1","AV",20)

^SCR("LEV1","NAME")
zery itl micaer
^SCR("LEV1","P",10,"CRD")
17,41,N,7,2
^SCR("LEV1","P",10,"HELP")

^SCR("LEV1","P",10,"LMAX")
7
^SCR("LEV1","P",10,"MUMPS1")

^SCR("LEV1","P",10,"MUMPS2")

^SCR("LEV1","P",10,"TYP")
N
^SCR("LEV1","P",12,"CRD")
18,41,N,7,2
^SCR("LEV1","P",12,"HELP")

^SCR("LEV1","P",12,"LMAX")
7
^SCR("LEV1","P",12,"MUMPS1")

^SCR("LEV1","P",12,"MUMPS2")

^SCR("LEV1","P",12,"TYP")
N
^SCR("LEV1","P",15,"CRD")
19,41,N,7,2
^SCR("LEV1","P",15,"HELP")

^SCR("LEV1","P",15,"LMAX")
7
^SCR("LEV1","P",15,"MUMPS1")

^SCR("LEV1","P",15,"MUMPS2")

^SCR("LEV1","P",15,"TYP")
N
^SCR("LEV1","P","NAME","MSHAA")
10
^SCR("LEV1","P","NAME","MSHAAS")
15
^SCR("LEV1","P","NAME","MSHAAV")
12
^SCR("LEV1","P","NM",10)
MSHAA
^SCR("LEV1","P","NM",12)
MSHAAV
^SCR("LEV1","P","NM",15)
MSHAAS
^SCR("LEV1","P","RB",1)
17,11,21,71
^SCR("LEV2")
H
^SCR("LEV2",1)
                                                                               
^SCR("LEV2",2)
                                                                               
^SCR("LEV2",3)
                                                                               
^SCR("LEV2",4)
                                                                               
^SCR("LEV2",5)
                                                                               
^SCR("LEV2",6)
                                                                               
^SCR("LEV2",7)
                                                                               
^SCR("LEV2",8)
                                                                               
^SCR("LEV2",9)
                                                                               
^SCR("LEV2",10)
                                                                               
^SCR("LEV2",11)
                                                                               
^SCR("LEV2",12)
                                                                               
^SCR("LEV2",13)
                                                                               
^SCR("LEV2",14)
                                                                               
^SCR("LEV2",15)
                                                                               
^SCR("LEV2",16)
                                                                     1]        
^SCR("LEV2",17)
                    {15    : 'e mei   {10    :           dryl zxekyn           
^SCR("LEV2",18)
                    {25    : 'e mei   {20    : 1 zetqep zeryl zxekyn           
^SCR("LEV2",19)
                    {33    : 'e mei   {30    : 2 zetqep zeryl zxekyn           
^SCR("LEV2",20)
                                      {35    :       zay zryl zxekyn           
^SCR("LEV2",21)
          [1                                                                   
^SCR("LEV2","A",1)

^SCR("LEV2","A",2)

^SCR("LEV2","A",3)

^SCR("LEV2","A",4)

^SCR("LEV2","A",5)

^SCR("LEV2","A",6)

^SCR("LEV2","A",7)

^SCR("LEV2","A",8)

^SCR("LEV2","A",9)

^SCR("LEV2","A",10)

^SCR("LEV2","A",11)

^SCR("LEV2","A",12)

^SCR("LEV2","A",13)

^SCR("LEV2","A",14)

^SCR("LEV2","A",15)

^SCR("LEV2","A",16)

^SCR("LEV2","A",17)
:'…�…‰:„’™Œš˜…‹™Ž
^SCR("LEV2","A",18)
:'…�…‰:1š…”‘…�š…’™Œš˜…‹™Ž
^SCR("LEV2","A",19)
:'…�…‰:2š…”‘…�š…’™Œš˜…‹™Ž
^SCR("LEV2","A",20)
:š�™š’™Œš˜…‹™Ž
^SCR("LEV2","A",21)

^SCR("LEV2","AV",1)

^SCR("LEV2","AV",2)

^SCR("LEV2","AV",3)

^SCR("LEV2","AV",4)

^SCR("LEV2","AV",5)

^SCR("LEV2","AV",6)

^SCR("LEV2","AV",7)

^SCR("LEV2","AV",8)

^SCR("LEV2","AV",9)

^SCR("LEV2","AV",10)

^SCR("LEV2","AV",11)

^SCR("LEV2","AV",12)

^SCR("LEV2","AV",13)

^SCR("LEV2","AV",14)

^SCR("LEV2","AV",15)

^SCR("LEV2","AV",16)

^SCR("LEV2","AV",17)
:wuouh:vgak,rufan
^SCR("LEV2","AV",18)
:wuouh:1,upxub,ugak,rufan
^SCR("LEV2","AV",19)
:wuouh:2,upxub,ugak,rufan
^SCR("LEV2","AV",20)
:,ca,gak,rufan
^SCR("LEV2","AV",21)

^SCR("LEV2","NAME")
zetqez+qiqa zery itl micar
^SCR("LEV2","P",10,"CRD")
17,38,N,7,2
^SCR("LEV2","P",10,"HELP")

^SCR("LEV2","P",10,"LMAX")
7
^SCR("LEV2","P",10,"MUMPS1")

^SCR("LEV2","P",10,"MUMPS2")

^SCR("LEV2","P",10,"TYP")
N
^SCR("LEV2","P",15,"CRD")
17,20,N,7,2
^SCR("LEV2","P",15,"HELP")

^SCR("LEV2","P",15,"LMAX")
7
^SCR("LEV2","P",15,"MUMPS1")

^SCR("LEV2","P",15,"MUMPS2")

^SCR("LEV2","P",15,"TYP")
N
^SCR("LEV2","P",20,"CRD")
18,38,N,7,2
^SCR("LEV2","P",20,"HELP")

^SCR("LEV2","P",20,"LMAX")
7
^SCR("LEV2","P",20,"MUMPS1")

^SCR("LEV2","P",20,"MUMPS2")

^SCR("LEV2","P",20,"TYP")
N
^SCR("LEV2","P",25,"CRD")
18,20,N,7,2
^SCR("LEV2","P",25,"HELP")

^SCR("LEV2","P",25,"LMAX")
7
^SCR("LEV2","P",25,"MUMPS1")

^SCR("LEV2","P",25,"MUMPS2")

^SCR("LEV2","P",25,"TYP")
N
^SCR("LEV2","P",30,"CRD")
19,38,N,7,2
^SCR("LEV2","P",30,"HELP")

^SCR("LEV2","P",30,"LMAX")
7
^SCR("LEV2","P",30,"MUMPS1")

^SCR("LEV2","P",30,"MUMPS2")

^SCR("LEV2","P",30,"TYP")
N
^SCR("LEV2","P",33,"CRD")
19,20,N,7,2
^SCR("LEV2","P",33,"HELP")

^SCR("LEV2","P",33,"LMAX")
7
^SCR("LEV2","P",33,"MUMPS1")

^SCR("LEV2","P",33,"MUMPS2")

^SCR("LEV2","P",33,"TYP")
N
^SCR("LEV2","P",35,"CRD")
20,38,N,7,2
^SCR("LEV2","P",35,"HELP")

^SCR("LEV2","P",35,"LMAX")
7
^SCR("LEV2","P",35,"MUMPS1")

^SCR("LEV2","P",35,"MUMPS2")

^SCR("LEV2","P",35,"TYP")
N
^SCR("LEV2","P","NAME","MSHAA0")
10
^SCR("LEV2","P","NAME","MSHAA1")
20
^SCR("LEV2","P","NAME","MSHAA2")
30
^SCR("LEV2","P","NAME","MSHAAS")
35
^SCR("LEV2","P","NAME","MSHAAV0")
15
^SCR("LEV2","P","NAME","MSHAAV1")
25
^SCR("LEV2","P","NAME","MSHAAV2")
33
^SCR("LEV2","P","NM",10)
MSHAA0
^SCR("LEV2","P","NM",15)
MSHAAV0
^SCR("LEV2","P","NM",20)
MSHAA1
^SCR("LEV2","P","NM",25)
MSHAAV1
^SCR("LEV2","P","NM",30)
MSHAA2
^SCR("LEV2","P","NM",33)
MSHAAV2
^SCR("LEV2","P","NM",35)
MSHAAS
^SCR("LEV2","P","RB",1)
17,11,22,71
^SCR("LEV3")
H
^SCR("LEV3",1)
                                                                               
^SCR("LEV3",2)
                                                                               
^SCR("LEV3",3)
                                                                               
^SCR("LEV3",4)
                                                                               
^SCR("LEV3",5)
                                                                               
^SCR("LEV3",6)
                                                                               
^SCR("LEV3",7)
                                                                               
^SCR("LEV3",8)
                                                                               
^SCR("LEV3",9)
                                                                               
^SCR("LEV3",10)
                                                                               
^SCR("LEV3",11)
                                                                               
^SCR("LEV3",12)
                                                                               
^SCR("LEV3",13)
                                                                               
^SCR("LEV3",14)
                                                                               
^SCR("LEV3",15)
                                                                               
^SCR("LEV3",16)
                                                                     1]        
^SCR("LEV3",17)
                   {15    : 'e mei    {10    : (1 zxnyn) dryl zxekyn           
^SCR("LEV3",18)
                   {25    : 'e mei    {20    : (2 zxnyn) dryl zxekyn           
^SCR("LEV3",19)
                                      {30    : (3 zxnyn) dryl zxekyn           
^SCR("LEV3",20)
                                      {35    : (    zay)  ryl zxekyn           
^SCR("LEV3",21)
          [1                                                                   
^SCR("LEV3","A",1)

^SCR("LEV3","A",2)

^SCR("LEV3","A",3)

^SCR("LEV3","A",4)

^SCR("LEV3","A",5)

^SCR("LEV3","A",6)

^SCR("LEV3","A",7)

^SCR("LEV3","A",8)

^SCR("LEV3","A",9)

^SCR("LEV3","A",10)

^SCR("LEV3","A",11)

^SCR("LEV3","A",12)

^SCR("LEV3","A",13)

^SCR("LEV3","A",14)

^SCR("LEV3","A",15)

^SCR("LEV3","A",16)

^SCR("LEV3","A",17)
:'…�…‰:(1š˜Ž™Ž)„’™Œš˜…‹™Ž
^SCR("LEV3","A",18)
:'…�…‰:(2š˜Ž™Ž)„’™Œš˜…‹™Ž
^SCR("LEV3","A",19)
:(3š˜Ž™Ž)„’™Œš˜…‹™Ž
^SCR("LEV3","A",20)
:(š�™)’™Œš˜…‹™Ž
^SCR("LEV3","A",21)

^SCR("LEV3","AV",1)

^SCR("LEV3","AV",2)

^SCR("LEV3","AV",3)

^SCR("LEV3","AV",4)

^SCR("LEV3","AV",5)

^SCR("LEV3","AV",6)

^SCR("LEV3","AV",7)

^SCR("LEV3","AV",8)

^SCR("LEV3","AV",9)

^SCR("LEV3","AV",10)

^SCR("LEV3","AV",11)

^SCR("LEV3","AV",12)

^SCR("LEV3","AV",13)

^SCR("LEV3","AV",14)

^SCR("LEV3","AV",15)

^SCR("LEV3","AV",16)

^SCR("LEV3","AV",17)
:wuouh:(1,rnan)vgak,rufan
^SCR("LEV3","AV",18)
:wuouh:(2,rnan)vgak,rufan
^SCR("LEV3","AV",19)
:(3,rnan)vgak,rufan
^SCR("LEV3","AV",20)
:(,ca)gak,rufan
^SCR("LEV3","AV",21)

^SCR("LEV3","NAME")
zexnyn itl micaer
^SCR("LEV3","P",10,"CRD")
17,38,N,7,2
^SCR("LEV3","P",10,"HELP")

^SCR("LEV3","P",10,"LMAX")
7
^SCR("LEV3","P",10,"MUMPS1")

^SCR("LEV3","P",10,"MUMPS2")

^SCR("LEV3","P",10,"TYP")
N
^SCR("LEV3","P",15,"CRD")
17,19,N,7,2
^SCR("LEV3","P",15,"HELP")

^SCR("LEV3","P",15,"LMAX")
7
^SCR("LEV3","P",15,"MUMPS1")

^SCR("LEV3","P",15,"MUMPS2")

^SCR("LEV3","P",15,"TYP")
N
^SCR("LEV3","P",20,"CRD")
18,38,N,7,2
^SCR("LEV3","P",20,"HELP")

^SCR("LEV3","P",20,"LMAX")
7
^SCR("LEV3","P",20,"MUMPS1")

^SCR("LEV3","P",20,"MUMPS2")

^SCR("LEV3","P",20,"TYP")
N
^SCR("LEV3","P",25,"CRD")
18,19,N,7,2
^SCR("LEV3","P",25,"HELP")

^SCR("LEV3","P",25,"LMAX")
7
^SCR("LEV3","P",25,"MUMPS1")

^SCR("LEV3","P",25,"MUMPS2")

^SCR("LEV3","P",25,"TYP")
N
^SCR("LEV3","P",30,"CRD")
19,38,N,7,2
^SCR("LEV3","P",30,"HELP")

^SCR("LEV3","P",30,"LMAX")
7
^SCR("LEV3","P",30,"MUMPS1")

^SCR("LEV3","P",30,"MUMPS2")

^SCR("LEV3","P",30,"TYP")
N
^SCR("LEV3","P",35,"CRD")
20,38,N,7,2
^SCR("LEV3","P",35,"HELP")

^SCR("LEV3","P",35,"LMAX")
7
^SCR("LEV3","P",35,"MUMPS1")

^SCR("LEV3","P",35,"MUMPS2")

^SCR("LEV3","P",35,"TYP")
N
^SCR("LEV3","P","NAME","MSHAAM1")
10
^SCR("LEV3","P","NAME","MSHAAM2")
20
^SCR("LEV3","P","NAME","MSHAAM3")
30
^SCR("LEV3","P","NAME","MSHAAMV1")
15
^SCR("LEV3","P","NAME","MSHAAMV2")
25
^SCR("LEV3","P","NAME","MSHAAS")
35
^SCR("LEV3","P","NM",10)
MSHAAM1
^SCR("LEV3","P","NM",15)
MSHAAMV1
^SCR("LEV3","P","NM",20)
MSHAAM2
^SCR("LEV3","P","NM",25)
MSHAAMV2
^SCR("LEV3","P","NM",30)
MSHAAM3
^SCR("LEV3","P","NM",35)
MSHAAS
^SCR("LEV3","P","RB",1)
17,11,22,71
^SCR("LEV4")
H
^SCR("LEV4",1)
                                                                               
^SCR("LEV4",2)
                                                                               
^SCR("LEV4",3)
                                                                               
^SCR("LEV4",4)
                                                                               
^SCR("LEV4",5)
                                                                               
^SCR("LEV4",6)
                                                                               
^SCR("LEV4",7)
                                                                               
^SCR("LEV4",8)
                                                                               
^SCR("LEV4",9)
                                                                               
^SCR("LEV4",10)
                                                                               
^SCR("LEV4",11)
                                                                               
^SCR("LEV4",12)
                                                                               
^SCR("LEV4",13)
                                                                               
^SCR("LEV4",14)
                                                                               
^SCR("LEV4",15)
                                                                               
^SCR("LEV4",16)
                                                                     1]        
^SCR("LEV4",17)
                                              {10     :   inei zxekyn          
^SCR("LEV4",18)
                                              {15     : 'e mei zxekyn          
^SCR("LEV4",19)
                                              {20     :    zay zxekyn          
^SCR("LEV4",20)
          [1                                                                   
^SCR("LEV4","A",1)

^SCR("LEV4","A",2)

^SCR("LEV4","A",3)

^SCR("LEV4","A",4)

^SCR("LEV4","A",5)

^SCR("LEV4","A",6)

^SCR("LEV4","A",7)

^SCR("LEV4","A",8)

^SCR("LEV4","A",9)

^SCR("LEV4","A",10)

^SCR("LEV4","A",11)

^SCR("LEV4","A",12)

^SCR("LEV4","A",13)

^SCR("LEV4","A",14)

^SCR("LEV4","A",15)

^SCR("LEV4","A",16)

^SCR("LEV4","A",17)
:‰Ž…‰š˜…‹™Ž
^SCR("LEV4","A",18)
:'…�…‰š˜…‹™Ž
^SCR("LEV4","A",19)
:š�™š˜…‹™Ž
^SCR("LEV4","A",20)

^SCR("LEV4","AV",1)

^SCR("LEV4","AV",2)

^SCR("LEV4","AV",3)

^SCR("LEV4","AV",4)

^SCR("LEV4","AV",5)

^SCR("LEV4","AV",6)

^SCR("LEV4","AV",7)

^SCR("LEV4","AV",8)

^SCR("LEV4","AV",9)

^SCR("LEV4","AV",10)

^SCR("LEV4","AV",11)

^SCR("LEV4","AV",12)

^SCR("LEV4","AV",13)

^SCR("LEV4","AV",14)

^SCR("LEV4","AV",15)

^SCR("LEV4","AV",16)

^SCR("LEV4","AV",17)
:hnuh,rufan
^SCR("LEV4","AV",18)
:wuouh,rufan
^SCR("LEV4","AV",19)
:,ca,rufan
^SCR("LEV4","AV",20)

^SCR("LEV4","NAME")

^SCR("LEV4","P",10,"CRD")
17,46,N,8,2
^SCR("LEV4","P",10,"HELP")

^SCR("LEV4","P",10,"LMAX")
8
^SCR("LEV4","P",10,"MUMPS1")

^SCR("LEV4","P",10,"MUMPS2")

^SCR("LEV4","P",10,"TYP")
N
^SCR("LEV4","P",15,"CRD")
18,46,N,8,2
^SCR("LEV4","P",15,"HELP")

^SCR("LEV4","P",15,"LMAX")
8
^SCR("LEV4","P",15,"MUMPS1")

^SCR("LEV4","P",15,"MUMPS2")

^SCR("LEV4","P",15,"TYP")
N
^SCR("LEV4","P",20,"CRD")
19,46,N,8,2
^SCR("LEV4","P",20,"HELP")

^SCR("LEV4","P",20,"LMAX")
8
^SCR("LEV4","P",20,"MUMPS1")

^SCR("LEV4","P",20,"MUMPS2")

^SCR("LEV4","P",20,"TYP")
N
^SCR("LEV4","P","NAME","MJOM")
10
^SCR("LEV4","P","NAME","MJOMS")
20
^SCR("LEV4","P","NAME","MJOMV")
15
^SCR("LEV4","P","NM",10)
MJOM
^SCR("LEV4","P","NM",15)
MJOMV
^SCR("LEV4","P","NM",20)
MJOMS
^SCR("LEV4","P","RB",1)
17,11,21,71
^SCR("LEV5")
H
^SCR("LEV5",1)
                                                                               
^SCR("LEV5",2)
                                                                               
^SCR("LEV5",3)
                                                                               
^SCR("LEV5",4)
                                                                               
^SCR("LEV5",5)
                                                                               
^SCR("LEV5",6)
                                                                               
^SCR("LEV5",7)
                                                                               
^SCR("LEV5",8)
                                                                               
^SCR("LEV5",9)
                                                                               
^SCR("LEV5",10)
                                                                               
^SCR("LEV5",11)
                                                                               
^SCR("LEV5",12)
                                                                               
^SCR("LEV5",13)
                                                                               
^SCR("LEV5",14)
                                                                               
^SCR("LEV5",15)
                                                                               
^SCR("LEV5",16)
                                                                     1]        
^SCR("LEV5",17)
                                               {10     : iyceg zxekyn          
^SCR("LEV5",18)
          [1                                                                   
^SCR("LEV5","A",1)

^SCR("LEV5","A",2)

^SCR("LEV5","A",3)

^SCR("LEV5","A",4)

^SCR("LEV5","A",5)

^SCR("LEV5","A",6)

^SCR("LEV5","A",7)

^SCR("LEV5","A",8)

^SCR("LEV5","A",9)

^SCR("LEV5","A",10)

^SCR("LEV5","A",11)

^SCR("LEV5","A",12)

^SCR("LEV5","A",13)

^SCR("LEV5","A",14)

^SCR("LEV5","A",15)

^SCR("LEV5","A",16)

^SCR("LEV5","A",17)
:‰™ƒ…‡š˜…‹™Ž
^SCR("LEV5","A",18)

^SCR("LEV5","AV",1)

^SCR("LEV5","AV",2)

^SCR("LEV5","AV",3)

^SCR("LEV5","AV",4)

^SCR("LEV5","AV",5)

^SCR("LEV5","AV",6)

^SCR("LEV5","AV",7)

^SCR("LEV5","AV",8)

^SCR("LEV5","AV",9)

^SCR("LEV5","AV",10)

^SCR("LEV5","AV",11)

^SCR("LEV5","AV",12)

^SCR("LEV5","AV",13)

^SCR("LEV5","AV",14)

^SCR("LEV5","AV",15)

^SCR("LEV5","AV",16)

^SCR("LEV5","AV",17)
:hasuj,rufan
^SCR("LEV5","AV",18)

^SCR("LEV5","NAME")

^SCR("LEV5","P",10,"CRD")
17,47,N,8,2
^SCR("LEV5","P",10,"HELP")

^SCR("LEV5","P",10,"LMAX")
8
^SCR("LEV5","P",10,"MUMPS1")

^SCR("LEV5","P",10,"MUMPS2")

^SCR("LEV5","P",10,"TYP")
N
^SCR("LEV5","P","NAME","MHODESH")
10
^SCR("LEV5","P","NM",10)
MHODESH
^SCR("LEV5","P","RB",1)
17,11,19,71
^SCR("LEVDS")
H
^SCR("LEVDS",1)
                               # micaer g"ec #                                 
^SCR("LEVDS",2)
                   {10     } :    jix`z cr    {05      } :    jix`zn           
^SCR("LEVDS",3)
  {               14} {13  } : dveaw cr    {              12} {11 } : dveawn   
^SCR("LEVDS",4)
                     {20   } :caer xtqn cr       {15   } :caer xtqnn           
^SCR("LEVDS",5)
                                                                             1$
^SCR("LEVDS",6)
 : zxekyn : dncwn : qepea : yteg: 'lin: dlgn: ini : zery :     my     :  'qn : 
^SCR("LEVDS",7)
 :        : ( - ) :       :     :     :     :dcear:dcear :    caer    : caer : 
^SCR("LEVDS",8)
                                                                               
^SCR("LEVDS",9)
                                                                               
^SCR("LEVDS",10)
                                                                               
^SCR("LEVDS",11)
                                                                               
^SCR("LEVDS",12)
                                                                               
^SCR("LEVDS",13)
                                                                               
^SCR("LEVDS",14)
                                                                               
^SCR("LEVDS",15)
                                                                               
^SCR("LEVDS",16)
                                                                               
^SCR("LEVDS",17)
                                                                               
^SCR("LEVDS",18)
                                                                               
^SCR("LEVDS",19)
                                                                               
^SCR("LEVDS",20)
                                                                               
^SCR("LEVDS",21)
 $1                                                                            
^SCR("LEVDS",22)
 {60     }{55    }{52    }{50  }{45  }{40  }{35  }{30   }                      
^SCR("LEVDS","A",1)
�‰ƒ�…’‡"…ƒ
^SCR("LEVDS","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("LEVDS","A",3)
:„–…�—ƒ’:„–…�—Ž
^SCR("LEVDS","A",4)
:ƒ�…’˜”‘Žƒ’:ƒ�…’˜”‘ŽŽ
^SCR("LEVDS","A",5)

^SCR("LEVDS","A",6)
š˜…‹™Ž„Žƒ—Ž‘…�…�™”…‡'Œ‰Ž„Œ‡Ž‰Ž‰š…’™�™'‘Ž
^SCR("LEVDS","A",7)
(-)„ƒ…�’„ƒ…�’ƒ�…’ƒ�…’
^SCR("LEVDS","A",8)
-------------------------------------------------------------------
^SCR("LEVDS","A",9)

^SCR("LEVDS","A",10)

^SCR("LEVDS","A",11)

^SCR("LEVDS","A",12)

^SCR("LEVDS","A",13)

^SCR("LEVDS","A",14)

^SCR("LEVDS","A",15)

^SCR("LEVDS","A",16)

^SCR("LEVDS","A",17)

^SCR("LEVDS","A",18)

^SCR("LEVDS","A",19)

^SCR("LEVDS","A",20)

^SCR("LEVDS","A",21)

^SCR("LEVDS","A",22)

^SCR("LEVDS","AV",1)
ohscugj"us
^SCR("LEVDS","AV",2)
:lhrt,sg:lhrt,n
^SCR("LEVDS","AV",3)
:vmucesg:vmucen
^SCR("LEVDS","AV",4)
:scugrpxnsg:scugrpxnn
^SCR("LEVDS","AV",5)

^SCR("LEVDS","AV",6)
,rufanvnsenxubucapujwkhnvkjnhnh,ugaoawxn
^SCR("LEVDS","AV",7)
(-)vsucgvsucgscugscug
^SCR("LEVDS","AV",8)
-------------------------------------------------------------------
^SCR("LEVDS","AV",9)

^SCR("LEVDS","AV",10)

^SCR("LEVDS","AV",11)

^SCR("LEVDS","AV",12)

^SCR("LEVDS","AV",13)

^SCR("LEVDS","AV",14)

^SCR("LEVDS","AV",15)

^SCR("LEVDS","AV",16)

^SCR("LEVDS","AV",17)

^SCR("LEVDS","AV",18)

^SCR("LEVDS","AV",19)

^SCR("LEVDS","AV",20)

^SCR("LEVDS","AV",21)

^SCR("LEVDS","AV",22)

^SCR("LEVDS","G",1,"CRD")
7,77,E,5.,0
^SCR("LEVDS","G",1,"HELP")
<F9> - caer ly hxetn g"ec bivdl 
^SCR("LEVDS","G",1,"LMAX")
6
^SCR("LEVDS","G",1,"MUMPS1")

^SCR("LEVDS","G",1,"MUMPS2")
D MSP^LEVDS
^SCR("LEVDS","G",1,"SHEM")
  'qn 
^SCR("LEVDS","G",1,"TYP")
E
^SCR("LEVDS","G",2,"CRD")
7,70,H,12,0
^SCR("LEVDS","G",2,"HELP")

^SCR("LEVDS","G",2,"LMAX")
12
^SCR("LEVDS","G",2,"MUMPS1")

^SCR("LEVDS","G",2,"MUMPS2")

^SCR("LEVDS","G",2,"OUTPUT")

^SCR("LEVDS","G",2,"SHEM")
     my     
^SCR("LEVDS","G",2,"TYP")
H
^SCR("LEVDS","G",3,"CRD")
7,57,E,6,0
^SCR("LEVDS","G",3,"HELP")

^SCR("LEVDS","G",3,"LMAX")
6
^SCR("LEVDS","G",3,"MUMPS1")

^SCR("LEVDS","G",3,"MUMPS2")

^SCR("LEVDS","G",3,"OUTPUT")

^SCR("LEVDS","G",3,"SHEM")
 zery 
^SCR("LEVDS","G",3,"TYP")
E
^SCR("LEVDS","G",4,"CRD")
7,50,N,4,0
^SCR("LEVDS","G",4,"HELP")

^SCR("LEVDS","G",4,"LMAX")
5
^SCR("LEVDS","G",4,"MUMPS1")

^SCR("LEVDS","G",4,"MUMPS2")

^SCR("LEVDS","G",4,"OUTPUT")

^SCR("LEVDS","G",4,"SHEM")
 ini 
^SCR("LEVDS","G",4,"TYP")
N
^SCR("LEVDS","G",5,"CRD")
7,44,E,5,0
^SCR("LEVDS","G",5,"HELP")

^SCR("LEVDS","G",5,"LMAX")
5
^SCR("LEVDS","G",5,"MUMPS1")

^SCR("LEVDS","G",5,"MUMPS2")

^SCR("LEVDS","G",5,"OUTPUT")

^SCR("LEVDS","G",5,"SHEM")
 dlgn
^SCR("LEVDS","G",5,"TYP")
E
^SCR("LEVDS","G",6,"CRD")
7,38,E,5,0
^SCR("LEVDS","G",6,"HELP")

^SCR("LEVDS","G",6,"LMAX")
5
^SCR("LEVDS","G",6,"MUMPS1")

^SCR("LEVDS","G",6,"MUMPS2")

^SCR("LEVDS","G",6,"OUTPUT")

^SCR("LEVDS","G",6,"SHEM")
 'lin
^SCR("LEVDS","G",6,"TYP")
E
^SCR("LEVDS","G",7,"CRD")
7,32,E,5,0
^SCR("LEVDS","G",7,"HELP")

^SCR("LEVDS","G",7,"LMAX")
5
^SCR("LEVDS","G",7,"MUMPS1")

^SCR("LEVDS","G",7,"MUMPS2")

^SCR("LEVDS","G",7,"OUTPUT")

^SCR("LEVDS","G",7,"SHEM")
 yteg
^SCR("LEVDS","G",7,"TYP")
E
^SCR("LEVDS","G",8,"CRD")
7,26,N,7,1
^SCR("LEVDS","G",8,"HELP")

^SCR("LEVDS","G",8,"LMAX")
7
^SCR("LEVDS","G",8,"MUMPS1")

^SCR("LEVDS","G",8,"MUMPS2")

^SCR("LEVDS","G",8,"OUTPUT")

^SCR("LEVDS","G",8,"SHEM")
 qepea 
^SCR("LEVDS","G",8,"TYP")
N
^SCR("LEVDS","G",9,"CRD")
7,18,N,7,2
^SCR("LEVDS","G",9,"HELP")

^SCR("LEVDS","G",9,"LMAX")
7
^SCR("LEVDS","G",9,"MUMPS1")

^SCR("LEVDS","G",9,"MUMPS2")

^SCR("LEVDS","G",9,"OUTPUT")

^SCR("LEVDS","G",9,"SHEM")
 dncwn 
^SCR("LEVDS","G",9,"TYP")
N
^SCR("LEVDS","G",10,"CRD")
7,10,N,8,2
^SCR("LEVDS","G",10,"HELP")

^SCR("LEVDS","G",10,"LMAX")
8
^SCR("LEVDS","G",10,"MUMPS1")

^SCR("LEVDS","G",10,"MUMPS2")

^SCR("LEVDS","G",10,"OUTPUT")

^SCR("LEVDS","G",10,"SHEM")
 zxekyn 
^SCR("LEVDS","G",10,"TYP")
N
^SCR("LEVDS","G","DEL")

^SCR("LEVDS","G","MAX")
99999
^SCR("LEVDS","G","NAME","AVJ")
4
^SCR("LEVDS","G","NAME","AVS")
3
^SCR("LEVDS","G","NAME","BONUS")
9
^SCR("LEVDS","G","NAME","HF")
7
^SCR("LEVDS","G","NAME","MHL")
5
^SCR("LEVDS","G","NAME","MKDM")
8
^SCR("LEVDS","G","NAME","ML")
6
^SCR("LEVDS","G","NAME","MSP")
1
^SCR("LEVDS","G","NAME","NAME")
2
^SCR("LEVDS","G","NAME","SLR1")
10
^SCR("LEVDS","G","NM",1)
MSP
^SCR("LEVDS","G","NM",2)
NAME
^SCR("LEVDS","G","NM",3)
AVS
^SCR("LEVDS","G","NM",4)
AVJ
^SCR("LEVDS","G","NM",5)
MHL
^SCR("LEVDS","G","NM",6)
ML
^SCR("LEVDS","G","NM",7)
HF
^SCR("LEVDS","G","NM",8)
MKDM
^SCR("LEVDS","G","NM",9)
BONUS
^SCR("LEVDS","G","NM",10)
SLR1
^SCR("LEVDS","G","RB")
6,2,22,79
^SCR("LEVDS","G","REF")
^TEMP($P
^SCR("LEVDS","G","RZD")
\
^SCR("LEVDS","G","STEP")
1
^SCR("LEVDS","G","STG")
 : zxekyn : dncwn : qepea : yteg: 'lin: dlgn: ini : zery :     my     :  'qn : 
^SCR("LEVDS","G","VG")
9
^SCR("LEVDS","NAME")
minekiq g"ec
^SCR("LEVDS","P",5,"CRD")
2,46,D,8,0
^SCR("LEVDS","P",5,"HELP")

^SCR("LEVDS","P",5,"LMAX")
9
^SCR("LEVDS","P",5,"MUMPS1")
S:'$G(DAT11) DAT11=$ZD($H,3)
^SCR("LEVDS","P",5,"MUMPS2")
S DAT1=$$^%L1DC(DAT11,2)
^SCR("LEVDS","P",5,"TYP")
D
^SCR("LEVDS","P",10,"CRD")
2,19,D,8,0
^SCR("LEVDS","P",10,"HELP")

^SCR("LEVDS","P",10,"LMAX")
8
^SCR("LEVDS","P",10,"MUMPS1")
S:'$G(DAT21) DAT21=DAT11 
^SCR("LEVDS","P",10,"MUMPS2")
S DAT2=$$^%L1DC(DAT21,2)
^SCR("LEVDS","P",10,"TYP")
D
^SCR("LEVDS","P",11,"CRD")
3,62,E,4,0
^SCR("LEVDS","P",11,"FNC")

^SCR("LEVDS","P",11,"GLOB")
LEVKVZ
^SCR("LEVDS","P",11,"HELP")

^SCR("LEVDS","P",11,"LMAX")
4
^SCR("LEVDS","P",11,"MUMPS1")

^SCR("LEVDS","P",11,"MUMPS2")

^SCR("LEVDS","P",11,"NLN")
20
^SCR("LEVDS","P",11,"RZD")
\
^SCR("LEVDS","P",11,"TOPB")
8
^SCR("LEVDS","P",11,"TYP")
E
^SCR("LEVDS","P",11,"VRB")
MESUG1
^SCR("LEVDS","P",12,"CRD")
3,61,H,16
^SCR("LEVDS","P",12,"HELP")

^SCR("LEVDS","P",12,"LMAX")
17
^SCR("LEVDS","P",12,"MUMPS1")

^SCR("LEVDS","P",12,"MUMPS2")

^SCR("LEVDS","P",12,"OUTPUT")

^SCR("LEVDS","P",12,"TYP")
H
^SCR("LEVDS","P",13,"CRD")
3,22,E,5,0
^SCR("LEVDS","P",13,"FNC")

^SCR("LEVDS","P",13,"GLOB")
LEVKVZ
^SCR("LEVDS","P",13,"HELP")

^SCR("LEVDS","P",13,"LMAX")
5
^SCR("LEVDS","P",13,"MUMPS1")
S:'$G(ADSUG) ADSUG=MESUG
^SCR("LEVDS","P",13,"MUMPS2")
I ADSUG<MESUG S %SC("ER")=1
^SCR("LEVDS","P",13,"NLN")
20
^SCR("LEVDS","P",13,"RZD")
\
^SCR("LEVDS","P",13,"TOPB")
8
^SCR("LEVDS","P",13,"TYP")
E
^SCR("LEVDS","P",13,"VRB")
ADSUG1
^SCR("LEVDS","P",14,"CRD")
3,21,H,16
^SCR("LEVDS","P",14,"HELP")

^SCR("LEVDS","P",14,"LMAX")
18
^SCR("LEVDS","P",14,"MUMPS1")

^SCR("LEVDS","P",14,"MUMPS2")

^SCR("LEVDS","P",14,"OUTPUT")

^SCR("LEVDS","P",14,"TYP")
H
^SCR("LEVDS","P",15,"CRD")
4,49,N,5.,0
^SCR("LEVDS","P",15,"FNC")

^SCR("LEVDS","P",15,"GLOB")
NAME
^SCR("LEVDS","P",15,"HELP")

^SCR("LEVDS","P",15,"LMAX")
6
^SCR("LEVDS","P",15,"MUMPS1")

^SCR("LEVDS","P",15,"MUMPS2")

^SCR("LEVDS","P",15,"NLN")
20
^SCR("LEVDS","P",15,"RZD")
\
^SCR("LEVDS","P",15,"TOPB")
8
^SCR("LEVDS","P",15,"TYP")
N
^SCR("LEVDS","P",20,"CRD")
4,21,N,5.,0
^SCR("LEVDS","P",20,"FNC")

^SCR("LEVDS","P",20,"GLOB")
NAME
^SCR("LEVDS","P",20,"HELP")

^SCR("LEVDS","P",20,"LMAX")
6
^SCR("LEVDS","P",20,"MUMPS1")
S:'$G(STRING2) STRING2=90000
^SCR("LEVDS","P",20,"MUMPS2")
S:STRING2<STRING1 %SC("ER")=1 Q:$D(%SC("ER"))  D GET^LEVDS
^SCR("LEVDS","P",20,"NLN")
20
^SCR("LEVDS","P",20,"RZD")
\
^SCR("LEVDS","P",20,"TOPB")
8
^SCR("LEVDS","P",20,"TYP")
N
^SCR("LEVDS","P",30,"CRD")
22,50,E,6,0
^SCR("LEVDS","P",30,"HELP")

^SCR("LEVDS","P",30,"LMAX")
6
^SCR("LEVDS","P",30,"MUMPS1")

^SCR("LEVDS","P",30,"MUMPS2")

^SCR("LEVDS","P",30,"OUTPUT")

^SCR("LEVDS","P",30,"TYP")
E
^SCR("LEVDS","P",35,"CRD")
22,44,N,5,0
^SCR("LEVDS","P",35,"HELP")

^SCR("LEVDS","P",35,"LMAX")
5
^SCR("LEVDS","P",35,"MUMPS1")

^SCR("LEVDS","P",35,"MUMPS2")

^SCR("LEVDS","P",35,"OUTPUT")

^SCR("LEVDS","P",35,"TYP")
N
^SCR("LEVDS","P",40,"CRD")
22,38,N,4,0
^SCR("LEVDS","P",40,"HELP")

^SCR("LEVDS","P",40,"LMAX")
5
^SCR("LEVDS","P",40,"MUMPS1")

^SCR("LEVDS","P",40,"MUMPS2")

^SCR("LEVDS","P",40,"OUTPUT")

^SCR("LEVDS","P",40,"TYP")
N
^SCR("LEVDS","P",45,"CRD")
22,32,N,4,0
^SCR("LEVDS","P",45,"HELP")

^SCR("LEVDS","P",45,"LMAX")
5
^SCR("LEVDS","P",45,"MUMPS1")

^SCR("LEVDS","P",45,"MUMPS2")

^SCR("LEVDS","P",45,"OUTPUT")

^SCR("LEVDS","P",45,"TYP")
N
^SCR("LEVDS","P",50,"CRD")
22,26,N,4,0
^SCR("LEVDS","P",50,"HELP")

^SCR("LEVDS","P",50,"LMAX")
5
^SCR("LEVDS","P",50,"MUMPS1")

^SCR("LEVDS","P",50,"MUMPS2")

^SCR("LEVDS","P",50,"OUTPUT")

^SCR("LEVDS","P",50,"TYP")
N
^SCR("LEVDS","P",52,"CRD")
22,18,N,7,2
^SCR("LEVDS","P",52,"HELP")

^SCR("LEVDS","P",52,"LMAX")
7
^SCR("LEVDS","P",52,"MUMPS1")

^SCR("LEVDS","P",52,"MUMPS2")

^SCR("LEVDS","P",52,"OUTPUT")

^SCR("LEVDS","P",52,"TYP")
N
^SCR("LEVDS","P",55,"CRD")
22,10,N,7,2
^SCR("LEVDS","P",55,"HELP")

^SCR("LEVDS","P",55,"LMAX")
7
^SCR("LEVDS","P",55,"MUMPS1")

^SCR("LEVDS","P",55,"MUMPS2")

^SCR("LEVDS","P",55,"OUTPUT")

^SCR("LEVDS","P",55,"TYP")
N
^SCR("LEVDS","P",60,"CRD")
22,1,N,8,2
^SCR("LEVDS","P",60,"HELP")

^SCR("LEVDS","P",60,"LMAX")
8
^SCR("LEVDS","P",60,"MUMPS1")

^SCR("LEVDS","P",60,"MUMPS2")

^SCR("LEVDS","P",60,"OUTPUT")

^SCR("LEVDS","P",60,"TYP")
N
^SCR("LEVDS","P","NAME","ADSUG")
13
^SCR("LEVDS","P","NAME","ADSUG1")
14
^SCR("LEVDS","P","NAME","DAT11")
5
^SCR("LEVDS","P","NAME","DAT21")
10
^SCR("LEVDS","P","NAME","MESUG")
11
^SCR("LEVDS","P","NAME","MESUG1")
12
^SCR("LEVDS","P","NAME","SLR")
60
^SCR("LEVDS","P","NAME","STRING1")
15
^SCR("LEVDS","P","NAME","STRING2")
20
^SCR("LEVDS","P","NAME","SUMAV")
35
^SCR("LEVDS","P","NAME","SUMBON")
52
^SCR("LEVDS","P","NAME","SUMHF")
50
^SCR("LEVDS","P","NAME","SUMMH")
40
^SCR("LEVDS","P","NAME","SUMMKD")
55
^SCR("LEVDS","P","NAME","SUMML")
45
^SCR("LEVDS","P","NAME","SUMS")
30
^SCR("LEVDS","P","NM",5)
DAT11
^SCR("LEVDS","P","NM",10)
DAT21
^SCR("LEVDS","P","NM",11)
MESUG
^SCR("LEVDS","P","NM",12)
MESUG1
^SCR("LEVDS","P","NM",13)
ADSUG
^SCR("LEVDS","P","NM",14)
ADSUG1
^SCR("LEVDS","P","NM",15)
STRING1
^SCR("LEVDS","P","NM",20)
STRING2
^SCR("LEVDS","P","NM",30)
SUMS
^SCR("LEVDS","P","NM",35)
SUMAV
^SCR("LEVDS","P","NM",40)
SUMMH
^SCR("LEVDS","P","NM",45)
SUMML
^SCR("LEVDS","P","NM",50)
SUMHF
^SCR("LEVDS","P","NM",52)
SUMBON
^SCR("LEVDS","P","NM",55)
SUMMKD
^SCR("LEVDS","P","NM",60)
SLR
^SCR("LEVDS1")
H
^SCR("LEVDS1",1)
                               # micaer g"ec #                                 
^SCR("LEVDS1",2)
                   {10     } :    jix`z cr    {05      } :    jix`zn           
^SCR("LEVDS1",3)
  {               14} {13  } : dveaw cr    {              12} {11 } : dveawn   
^SCR("LEVDS1",4)
                     {20   } :caer xtqn cr       {15   } :caer xtqnn           
^SCR("LEVDS1",5)
                                                                             1$
^SCR("LEVDS1",6)
 : zxekyn:dncwn:yteg: k"dq :zery : zery : zery : zery :ini:     my     :  'qn :
^SCR("LEVDS1",7)
 :       : (-) :    : zery : zay :2'qep :1'qep :zelibx:'ar:    caer    : caer :
^SCR("LEVDS1",8)
                                                                               
^SCR("LEVDS1",9)
                                                                               
^SCR("LEVDS1",10)
                                                                               
^SCR("LEVDS1",11)
                                                                               
^SCR("LEVDS1",12)
                                                                               
^SCR("LEVDS1",13)
                                                                               
^SCR("LEVDS1",14)
                                                                               
^SCR("LEVDS1",15)
                                                                               
^SCR("LEVDS1",16)
                                                                               
^SCR("LEVDS1",17)
                                                                               
^SCR("LEVDS1",18)
                                                                               
^SCR("LEVDS1",19)
                                                                               
^SCR("LEVDS1",20)
                                                                               
^SCR("LEVDS1",21)
 $1                                                                            
^SCR("LEVDS1",22)
 {60    }{55   }{53  }{52   }{50   }{45  }{40  }{35   }{30   }                 
^SCR("LEVDS1",23)
                                                                               
^SCR("LEVDS1","A",1)
�‰ƒ�…’‡"…ƒ
^SCR("LEVDS1","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("LEVDS1","A",3)
:„–…�—ƒ’:„–…�—Ž
^SCR("LEVDS1","A",4)
:ƒ�…’˜”‘Žƒ’:ƒ�…’˜”‘ŽŽ
^SCR("LEVDS1","A",5)

^SCR("LEVDS1","A",6)
š˜…‹™Ž„Žƒ—Ž™”…‡‹"„‘š…’™š…’™š…’™š…’™‰Ž‰�™'‘Ž
^SCR("LEVDS1","A",7)
(-)š…’™š�™2'‘…�1'‘…�š…Œ‰‚˜'�’ƒ�…’ƒ�…’
^SCR("LEVDS1","A",8)
------------------------------------------------------------------
^SCR("LEVDS1","A",9)

^SCR("LEVDS1","A",10)

^SCR("LEVDS1","A",11)

^SCR("LEVDS1","A",12)

^SCR("LEVDS1","A",13)

^SCR("LEVDS1","A",14)

^SCR("LEVDS1","A",15)

^SCR("LEVDS1","A",16)

^SCR("LEVDS1","A",17)

^SCR("LEVDS1","A",18)

^SCR("LEVDS1","A",19)

^SCR("LEVDS1","A",20)

^SCR("LEVDS1","A",21)

^SCR("LEVDS1","A",22)

^SCR("LEVDS1","A",23)

^SCR("LEVDS1","AV",1)
ohscugj"us
^SCR("LEVDS1","AV",2)
:lhrt,sg:lhrt,n
^SCR("LEVDS1","AV",3)
:vmucesg:vmucen
^SCR("LEVDS1","AV",4)
:scugrpxnsg:scugrpxnn
^SCR("LEVDS1","AV",5)

^SCR("LEVDS1","AV",6)
,rufanvnsenapujf"vx,uga,uga,uga,ugahnhoawxn
^SCR("LEVDS1","AV",7)
(-),uga,ca2wxub1wxub,ukhdrwcgscugscug
^SCR("LEVDS1","AV",8)
------------------------------------------------------------------
^SCR("LEVDS1","AV",9)

^SCR("LEVDS1","AV",10)

^SCR("LEVDS1","AV",11)

^SCR("LEVDS1","AV",12)

^SCR("LEVDS1","AV",13)

^SCR("LEVDS1","AV",14)

^SCR("LEVDS1","AV",15)

^SCR("LEVDS1","AV",16)

^SCR("LEVDS1","AV",17)

^SCR("LEVDS1","AV",18)

^SCR("LEVDS1","AV",19)

^SCR("LEVDS1","AV",20)

^SCR("LEVDS1","AV",21)

^SCR("LEVDS1","AV",22)

^SCR("LEVDS1","AV",23)

^SCR("LEVDS1","G",1,"CRD")
7,78,E,5.,0
^SCR("LEVDS1","G",1,"HELP")
<F9> - caer ly hxetn g"ec bivdl 
^SCR("LEVDS1","G",1,"LMAX")
6
^SCR("LEVDS1","G",1,"MUMPS1")

^SCR("LEVDS1","G",1,"MUMPS2")
D MSP^LEVDS
^SCR("LEVDS1","G",1,"SHEM")
  'qn 
^SCR("LEVDS1","G",1,"TYP")
E
^SCR("LEVDS1","G",2,"CRD")
7,71,H,12,0
^SCR("LEVDS1","G",2,"HELP")

^SCR("LEVDS1","G",2,"LMAX")
12
^SCR("LEVDS1","G",2,"MUMPS1")

^SCR("LEVDS1","G",2,"MUMPS2")

^SCR("LEVDS1","G",2,"OUTPUT")

^SCR("LEVDS1","G",2,"SHEM")
     my     
^SCR("LEVDS1","G",2,"TYP")
H
^SCR("LEVDS1","G",3,"CRD")
7,58,N,3,0
^SCR("LEVDS1","G",3,"HELP")

^SCR("LEVDS1","G",3,"LMAX")
3
^SCR("LEVDS1","G",3,"MUMPS1")

^SCR("LEVDS1","G",3,"MUMPS2")

^SCR("LEVDS1","G",3,"OUTPUT")

^SCR("LEVDS1","G",3,"SHEM")
ini
^SCR("LEVDS1","G",3,"TYP")
N
^SCR("LEVDS1","G",4,"CRD")
7,54,E,5,0
^SCR("LEVDS1","G",4,"HELP")

^SCR("LEVDS1","G",4,"LMAX")
6
^SCR("LEVDS1","G",4,"MUMPS1")

^SCR("LEVDS1","G",4,"MUMPS2")

^SCR("LEVDS1","G",4,"OUTPUT")

^SCR("LEVDS1","G",4,"SHEM")
 zery 
^SCR("LEVDS1","G",4,"TYP")
E
^SCR("LEVDS1","G",5,"CRD")
7,47,E,6,0
^SCR("LEVDS1","G",5,"HELP")

^SCR("LEVDS1","G",5,"LMAX")
6
^SCR("LEVDS1","G",5,"MUMPS1")

^SCR("LEVDS1","G",5,"MUMPS2")

^SCR("LEVDS1","G",5,"SHEM")
 zery 
^SCR("LEVDS1","G",5,"TYP")
E
^SCR("LEVDS1","G",6,"CRD")
7,40,E,6,0
^SCR("LEVDS1","G",6,"HELP")

^SCR("LEVDS1","G",6,"LMAX")
6
^SCR("LEVDS1","G",6,"MUMPS1")

^SCR("LEVDS1","G",6,"MUMPS2")

^SCR("LEVDS1","G",6,"SHEM")
 zery 
^SCR("LEVDS1","G",6,"TYP")
E
^SCR("LEVDS1","G",7,"CRD")
7,33,E,5,0
^SCR("LEVDS1","G",7,"HELP")

^SCR("LEVDS1","G",7,"LMAX")
5
^SCR("LEVDS1","G",7,"MUMPS1")

^SCR("LEVDS1","G",7,"MUMPS2")

^SCR("LEVDS1","G",7,"SHEM")
zery 
^SCR("LEVDS1","G",7,"TYP")
E
^SCR("LEVDS1","G",8,"CRD")
7,27,E,6,0
^SCR("LEVDS1","G",8,"HELP")

^SCR("LEVDS1","G",8,"LMAX")
6
^SCR("LEVDS1","G",8,"MUMPS1")

^SCR("LEVDS1","G",8,"MUMPS2")

^SCR("LEVDS1","G",8,"OUTPUT")

^SCR("LEVDS1","G",8,"SHEM")
 k"dq 
^SCR("LEVDS1","G",8,"TYP")
E
^SCR("LEVDS1","G",9,"CRD")
7,20,E,4,0
^SCR("LEVDS1","G",9,"HELP")

^SCR("LEVDS1","G",9,"LMAX")
4
^SCR("LEVDS1","G",9,"MUMPS1")

^SCR("LEVDS1","G",9,"MUMPS2")

^SCR("LEVDS1","G",9,"OUTPUT")

^SCR("LEVDS1","G",9,"SHEM")
yteg
^SCR("LEVDS1","G",9,"TYP")
E
^SCR("LEVDS1","G",10,"CRD")
7,15,N,4,1
^SCR("LEVDS1","G",10,"HELP")

^SCR("LEVDS1","G",10,"LMAX")
5
^SCR("LEVDS1","G",10,"MUMPS1")

^SCR("LEVDS1","G",10,"MUMPS2")

^SCR("LEVDS1","G",10,"OUTPUT")

^SCR("LEVDS1","G",10,"SHEM")
dncwn
^SCR("LEVDS1","G",10,"TYP")
N
^SCR("LEVDS1","G",11,"CRD")
7,9,N,7,1
^SCR("LEVDS1","G",11,"HELP")

^SCR("LEVDS1","G",11,"LMAX")
7
^SCR("LEVDS1","G",11,"MUMPS1")

^SCR("LEVDS1","G",11,"MUMPS2")

^SCR("LEVDS1","G",11,"OUTPUT")

^SCR("LEVDS1","G",11,"SHEM")
 zxekyn
^SCR("LEVDS1","G",11,"TYP")
N
^SCR("LEVDS1","G","DEL")

^SCR("LEVDS1","G","MAX")
99999
^SCR("LEVDS1","G","NAME","AV")
3
^SCR("LEVDS1","G","NAME","HF")
9
^SCR("LEVDS1","G","NAME","MKDM")
10
^SCR("LEVDS1","G","NAME","MSP")
1
^SCR("LEVDS1","G","NAME","NAME")
2
^SCR("LEVDS1","G","NAME","SHAOT")
4
^SCR("LEVDS1","G","NAME","SHAOT1")
5
^SCR("LEVDS1","G","NAME","SHAOT2")
6
^SCR("LEVDS1","G","NAME","SHAOTA")
8
^SCR("LEVDS1","G","NAME","SHAOTS")
7
^SCR("LEVDS1","G","NAME","SLR")
11
^SCR("LEVDS1","G","NM",1)
MSP
^SCR("LEVDS1","G","NM",2)
NAME
^SCR("LEVDS1","G","NM",3)
AV
^SCR("LEVDS1","G","NM",4)
SHAOT
^SCR("LEVDS1","G","NM",5)
SHAOT1
^SCR("LEVDS1","G","NM",6)
SHAOT2
^SCR("LEVDS1","G","NM",7)
SHAOTS
^SCR("LEVDS1","G","NM",8)
SHAOTA
^SCR("LEVDS1","G","NM",9)
HF
^SCR("LEVDS1","G","NM",10)
MKDM
^SCR("LEVDS1","G","NM",11)
SLR
^SCR("LEVDS1","G","RB")
6,2,22,79
^SCR("LEVDS1","G","REF")
^TEMP($P
^SCR("LEVDS1","G","RZD")
\
^SCR("LEVDS1","G","STEP")
1
^SCR("LEVDS1","G","STG")
 : zxekyn:dncwn:yteg: k"dq :zery : zery : zery : zery :ini:     my     :  'qn :
^SCR("LEVDS1","G","VG")
9
^SCR("LEVDS1","NAME")

^SCR("LEVDS1","P",5,"CRD")
2,46,D,8,0
^SCR("LEVDS1","P",5,"HELP")

^SCR("LEVDS1","P",5,"LMAX")
9
^SCR("LEVDS1","P",5,"MUMPS1")
S:'$G(DAT11) DAT11=$ZD($H,3)
^SCR("LEVDS1","P",5,"MUMPS2")
S DAT1=$$^%L1DC(DAT11,2)
^SCR("LEVDS1","P",5,"TYP")
D
^SCR("LEVDS1","P",10,"CRD")
2,19,D,8,0
^SCR("LEVDS1","P",10,"HELP")

^SCR("LEVDS1","P",10,"LMAX")
8
^SCR("LEVDS1","P",10,"MUMPS1")
S:'$G(DAT21) DAT21=DAT11 
^SCR("LEVDS1","P",10,"MUMPS2")
S DAT2=$$^%L1DC(DAT21,2)
^SCR("LEVDS1","P",10,"TYP")
D
^SCR("LEVDS1","P",11,"CRD")
3,62,E,4,0
^SCR("LEVDS1","P",11,"FNC")

^SCR("LEVDS1","P",11,"GLOB")
LEVKVZ
^SCR("LEVDS1","P",11,"HELP")

^SCR("LEVDS1","P",11,"LMAX")
4
^SCR("LEVDS1","P",11,"MUMPS1")

^SCR("LEVDS1","P",11,"MUMPS2")

^SCR("LEVDS1","P",11,"NLN")
20
^SCR("LEVDS1","P",11,"RZD")
\
^SCR("LEVDS1","P",11,"TOPB")
8
^SCR("LEVDS1","P",11,"TYP")
E
^SCR("LEVDS1","P",11,"VRB")
MESUG1
^SCR("LEVDS1","P",12,"CRD")
3,61,H,16
^SCR("LEVDS1","P",12,"HELP")

^SCR("LEVDS1","P",12,"LMAX")
17
^SCR("LEVDS1","P",12,"MUMPS1")

^SCR("LEVDS1","P",12,"MUMPS2")

^SCR("LEVDS1","P",12,"OUTPUT")

^SCR("LEVDS1","P",12,"TYP")
H
^SCR("LEVDS1","P",13,"CRD")
3,22,E,5,0
^SCR("LEVDS1","P",13,"FNC")

^SCR("LEVDS1","P",13,"GLOB")
LEVKVZ
^SCR("LEVDS1","P",13,"HELP")

^SCR("LEVDS1","P",13,"LMAX")
5
^SCR("LEVDS1","P",13,"MUMPS1")
S:'$G(ADSUG) ADSUG=MESUG
^SCR("LEVDS1","P",13,"MUMPS2")
I ADSUG<MESUG S %SC("ER")=1
^SCR("LEVDS1","P",13,"NLN")
20
^SCR("LEVDS1","P",13,"RZD")
\
^SCR("LEVDS1","P",13,"TOPB")
8
^SCR("LEVDS1","P",13,"TYP")
E
^SCR("LEVDS1","P",13,"VRB")
ADSUG1
^SCR("LEVDS1","P",14,"CRD")
3,21,H,16
^SCR("LEVDS1","P",14,"HELP")

^SCR("LEVDS1","P",14,"LMAX")
18
^SCR("LEVDS1","P",14,"MUMPS1")

^SCR("LEVDS1","P",14,"MUMPS2")

^SCR("LEVDS1","P",14,"OUTPUT")

^SCR("LEVDS1","P",14,"TYP")
H
^SCR("LEVDS1","P",15,"CRD")
4,49,N,5.,0
^SCR("LEVDS1","P",15,"FNC")

^SCR("LEVDS1","P",15,"GLOB")
NAME
^SCR("LEVDS1","P",15,"HELP")

^SCR("LEVDS1","P",15,"LMAX")
6
^SCR("LEVDS1","P",15,"MUMPS1")

^SCR("LEVDS1","P",15,"MUMPS2")

^SCR("LEVDS1","P",15,"NLN")
20
^SCR("LEVDS1","P",15,"RZD")
\
^SCR("LEVDS1","P",15,"TOPB")
8
^SCR("LEVDS1","P",15,"TYP")
N
^SCR("LEVDS1","P",20,"CRD")
4,21,N,5.,0
^SCR("LEVDS1","P",20,"FNC")

^SCR("LEVDS1","P",20,"GLOB")
NAME
^SCR("LEVDS1","P",20,"HELP")

^SCR("LEVDS1","P",20,"LMAX")
6
^SCR("LEVDS1","P",20,"MUMPS1")
S:'$G(STRING2) STRING2=90000
^SCR("LEVDS1","P",20,"MUMPS2")
S:STRING2<STRING1 %SC("ER")=1 Q:$D(%SC("ER"))  D GET^LEVDS
^SCR("LEVDS1","P",20,"NLN")
20
^SCR("LEVDS1","P",20,"RZD")
\
^SCR("LEVDS1","P",20,"TOPB")
8
^SCR("LEVDS1","P",20,"TYP")
N
^SCR("LEVDS1","P",30,"CRD")
22,55,E,6,0
^SCR("LEVDS1","P",30,"HELP")

^SCR("LEVDS1","P",30,"LMAX")
6
^SCR("LEVDS1","P",30,"MUMPS1")

^SCR("LEVDS1","P",30,"MUMPS2")

^SCR("LEVDS1","P",30,"OUTPUT")

^SCR("LEVDS1","P",30,"TYP")
E
^SCR("LEVDS1","P",35,"CRD")
22,48,E,6,0
^SCR("LEVDS1","P",35,"HELP")

^SCR("LEVDS1","P",35,"LMAX")
6
^SCR("LEVDS1","P",35,"MUMPS1")

^SCR("LEVDS1","P",35,"MUMPS2")

^SCR("LEVDS1","P",35,"OUTPUT")

^SCR("LEVDS1","P",35,"TYP")
E
^SCR("LEVDS1","P",40,"CRD")
22,42,E,5,0
^SCR("LEVDS1","P",40,"HELP")

^SCR("LEVDS1","P",40,"LMAX")
5
^SCR("LEVDS1","P",40,"MUMPS1")

^SCR("LEVDS1","P",40,"MUMPS2")

^SCR("LEVDS1","P",40,"OUTPUT")

^SCR("LEVDS1","P",40,"TYP")
E
^SCR("LEVDS1","P",45,"CRD")
22,36,E,5,0
^SCR("LEVDS1","P",45,"HELP")

^SCR("LEVDS1","P",45,"LMAX")
5
^SCR("LEVDS1","P",45,"MUMPS1")

^SCR("LEVDS1","P",45,"MUMPS2")

^SCR("LEVDS1","P",45,"OUTPUT")

^SCR("LEVDS1","P",45,"TYP")
E
^SCR("LEVDS1","P",50,"CRD")
22,29,E,6,0
^SCR("LEVDS1","P",50,"HELP")

^SCR("LEVDS1","P",50,"LMAX")
6
^SCR("LEVDS1","P",50,"MUMPS1")

^SCR("LEVDS1","P",50,"MUMPS2")

^SCR("LEVDS1","P",50,"OUTPUT")

^SCR("LEVDS1","P",50,"TYP")
E
^SCR("LEVDS1","P",52,"CRD")
22,22,E,6,0
^SCR("LEVDS1","P",52,"HELP")

^SCR("LEVDS1","P",52,"LMAX")
6
^SCR("LEVDS1","P",52,"MUMPS1")

^SCR("LEVDS1","P",52,"MUMPS2")

^SCR("LEVDS1","P",52,"OUTPUT")

^SCR("LEVDS1","P",52,"TYP")
E
^SCR("LEVDS1","P",53,"CRD")
22,16,N,5,0
^SCR("LEVDS1","P",53,"HELP")

^SCR("LEVDS1","P",53,"LMAX")
5
^SCR("LEVDS1","P",53,"MUMPS1")

^SCR("LEVDS1","P",53,"MUMPS2")

^SCR("LEVDS1","P",53,"OUTPUT")

^SCR("LEVDS1","P",53,"TYP")
N
^SCR("LEVDS1","P",55,"CRD")
22,9,N,6,1
^SCR("LEVDS1","P",55,"HELP")

^SCR("LEVDS1","P",55,"LMAX")
6
^SCR("LEVDS1","P",55,"MUMPS1")

^SCR("LEVDS1","P",55,"MUMPS2")

^SCR("LEVDS1","P",55,"OUTPUT")

^SCR("LEVDS1","P",55,"TYP")
N
^SCR("LEVDS1","P",60,"CRD")
22,1,N,6,1
^SCR("LEVDS1","P",60,"HELP")

^SCR("LEVDS1","P",60,"LMAX")
7
^SCR("LEVDS1","P",60,"MUMPS1")

^SCR("LEVDS1","P",60,"MUMPS2")

^SCR("LEVDS1","P",60,"OUTPUT")

^SCR("LEVDS1","P",60,"TYP")
N
^SCR("LEVDS1","P","NAME","ADSUG")
13
^SCR("LEVDS1","P","NAME","ADSUG1")
14
^SCR("LEVDS1","P","NAME","DAT11")
5
^SCR("LEVDS1","P","NAME","DAT21")
10
^SCR("LEVDS1","P","NAME","MESUG")
11
^SCR("LEVDS1","P","NAME","MESUG1")
12
^SCR("LEVDS1","P","NAME","SLR")
60
^SCR("LEVDS1","P","NAME","STRING1")
15
^SCR("LEVDS1","P","NAME","STRING2")
20
^SCR("LEVDS1","P","NAME","SUMAV")
30
^SCR("LEVDS1","P","NAME","SUMHF")
53
^SCR("LEVDS1","P","NAME","SUMMKD")
55
^SCR("LEVDS1","P","NAME","SUMSH")
35
^SCR("LEVDS1","P","NAME","SUMSH1")
40
^SCR("LEVDS1","P","NAME","SUMSH2")
45
^SCR("LEVDS1","P","NAME","SUMSHA")
52
^SCR("LEVDS1","P","NAME","SUMSHS")
50
^SCR("LEVDS1","P","NM",5)
DAT11
^SCR("LEVDS1","P","NM",10)
DAT21
^SCR("LEVDS1","P","NM",11)
MESUG
^SCR("LEVDS1","P","NM",12)
MESUG1
^SCR("LEVDS1","P","NM",13)
ADSUG
^SCR("LEVDS1","P","NM",14)
ADSUG1
^SCR("LEVDS1","P","NM",15)
STRING1
^SCR("LEVDS1","P","NM",20)
STRING2
^SCR("LEVDS1","P","NM",30)
SUMAV
^SCR("LEVDS1","P","NM",35)
SUMSH
^SCR("LEVDS1","P","NM",40)
SUMSH1
^SCR("LEVDS1","P","NM",45)
SUMSH2
^SCR("LEVDS1","P","NM",50)
SUMSHS
^SCR("LEVDS1","P","NM",52)
SUMSHA
^SCR("LEVDS1","P","NM",53)
SUMHF
^SCR("LEVDS1","P","NM",55)
SUMMKD
^SCR("LEVDS1","P","NM",60)
SLR
^SCR("LEVHAG")
H
^SCR("LEVHAG",1)
                                                                               
^SCR("LEVHAG",2)
                                                                    1$         
^SCR("LEVHAG",3)
         : bg meiq zry : mcew meia dligz zry : mei : bg ly jix`z :             
^SCR("LEVHAG",4)
                                                                               
^SCR("LEVHAG",5)
                                                                               
^SCR("LEVHAG",6)
                                                                               
^SCR("LEVHAG",7)
                                                                               
^SCR("LEVHAG",8)
                                                                               
^SCR("LEVHAG",9)
                                                                               
^SCR("LEVHAG",10)
                                                                               
^SCR("LEVHAG",11)
                                                                               
^SCR("LEVHAG",12)
                                                                               
^SCR("LEVHAG",13)
                                                                               
^SCR("LEVHAG",14)
                                                                               
^SCR("LEVHAG",15)
                                                                               
^SCR("LEVHAG",16)
                                                                               
^SCR("LEVHAG",17)
                                                                               
^SCR("LEVHAG",18)
                                                                               
^SCR("LEVHAG",19)
                                                                               
^SCR("LEVHAG",20)
     $1                                                                        
^SCR("LEVHAG",21)
                                                                               
^SCR("LEVHAG","A",1)

^SCR("LEVHAG","A",2)

^SCR("LEVHAG","A",3)
‚‡�…‰‘š’™�ƒ…—�…‰�„Œ‰‡šš’™�…‰‚‡Œ™Š‰˜€š
^SCR("LEVHAG","A",4)
----------------------------------------------------
^SCR("LEVHAG","A",5)

^SCR("LEVHAG","A",6)

^SCR("LEVHAG","A",7)

^SCR("LEVHAG","A",8)

^SCR("LEVHAG","A",9)

^SCR("LEVHAG","A",10)

^SCR("LEVHAG","A",11)

^SCR("LEVHAG","A",12)

^SCR("LEVHAG","A",13)

^SCR("LEVHAG","A",14)

^SCR("LEVHAG","A",15)

^SCR("LEVHAG","A",16)

^SCR("LEVHAG","A",17)

^SCR("LEVHAG","A",18)

^SCR("LEVHAG","A",19)

^SCR("LEVHAG","A",20)

^SCR("LEVHAG","A",21)

^SCR("LEVHAG","AV",1)

^SCR("LEVHAG","AV",2)

^SCR("LEVHAG","AV",3)
djouhx,gaosueouhcvkhj,,gaouhdjkalhrt,
^SCR("LEVHAG","AV",4)
----------------------------------------------------
^SCR("LEVHAG","AV",5)

^SCR("LEVHAG","AV",6)

^SCR("LEVHAG","AV",7)

^SCR("LEVHAG","AV",8)

^SCR("LEVHAG","AV",9)

^SCR("LEVHAG","AV",10)

^SCR("LEVHAG","AV",11)

^SCR("LEVHAG","AV",12)

^SCR("LEVHAG","AV",13)

^SCR("LEVHAG","AV",14)

^SCR("LEVHAG","AV",15)

^SCR("LEVHAG","AV",16)

^SCR("LEVHAG","AV",17)

^SCR("LEVHAG","AV",18)

^SCR("LEVHAG","AV",19)

^SCR("LEVHAG","AV",20)

^SCR("LEVHAG","AV",21)

^SCR("LEVHAG","G",1,"CRD")
4,65,D,8,0
^SCR("LEVHAG","G",1,"HELP")

^SCR("LEVHAG","G",1,"LMAX")
13
^SCR("LEVHAG","G",1,"MUMPS1")

^SCR("LEVHAG","G",1,"MUMPS2")
S JOM=$$^%L1DC(TRH,9)
^SCR("LEVHAG","G",1,"MUST")

^SCR("LEVHAG","G",1,"SHEM")
 bg ly jix`z 
^SCR("LEVHAG","G",1,"TYP")
D
^SCR("LEVHAG","G",2,"CRD")
4,51,H,1,0
^SCR("LEVHAG","G",2,"HELP")

^SCR("LEVHAG","G",2,"LMAX")
5
^SCR("LEVHAG","G",2,"MUMPS1")

^SCR("LEVHAG","G",2,"MUMPS2")

^SCR("LEVHAG","G",2,"OUTPUT")

^SCR("LEVHAG","G",2,"SHEM")
 mei 
^SCR("LEVHAG","G",2,"TYP")
H
^SCR("LEVHAG","G",3,"CRD")
4,45,T,5,0
^SCR("LEVHAG","G",3,"HELP")

^SCR("LEVHAG","G",3,"LMAX")
21
^SCR("LEVHAG","G",3,"MUMPS1")

^SCR("LEVHAG","G",3,"MUMPS2")

^SCR("LEVHAG","G",3,"SHEM")
 mcew meia dligz zry 
^SCR("LEVHAG","G",3,"TYP")
T
^SCR("LEVHAG","G",4,"CRD")
4,23,T,5,0
^SCR("LEVHAG","G",4,"HELP")

^SCR("LEVHAG","G",4,"LMAX")
13
^SCR("LEVHAG","G",4,"MUMPS1")

^SCR("LEVHAG","G",4,"MUMPS2")

^SCR("LEVHAG","G",4,"SHEM")
 bg meiq zry 
^SCR("LEVHAG","G",4,"TYP")
T
^SCR("LEVHAG","G","DEL")
Y
^SCR("LEVHAG","G","MAX")
999
^SCR("LEVHAG","G","NAME","JOM")
2
^SCR("LEVHAG","G","NAME","SHAA1")
3
^SCR("LEVHAG","G","NAME","SHAA2")
4
^SCR("LEVHAG","G","NAME","TRH")
1
^SCR("LEVHAG","G","NM",1)
TRH
^SCR("LEVHAG","G","NM",2)
JOM
^SCR("LEVHAG","G","NM",3)
SHAA1
^SCR("LEVHAG","G","NM",4)
SHAA2
^SCR("LEVHAG","G","RB")
3,6,21,70
^SCR("LEVHAG","G","REF")
^TEMP($P
^SCR("LEVHAG","G","RZD")
\
^SCR("LEVHAG","G","STEP")
1
^SCR("LEVHAG","G","STG")
         : bg meiq zry : mcew meia dligz zry : mei : bg ly jix`z :             
^SCR("LEVHAG","G","VG")
5
^SCR("LEVHAG","NAME")
bg zery
^SCR("LEVHIST")
H
^SCR("LEVHIST",1)
                # micaer ixtqn ly miiepiye milehia lewehext #                  
^SCR("LEVHIST",2)
                                                                               
^SCR("LEVHIST",3)
                      {10     } jix`z cr    {05     } jix`zn                   
^SCR("LEVHIST",4)
                                                                               
^SCR("LEVHIST",5)
                                                                        1$     
^SCR("LEVHIST",6)
     : rvand my : dry :  jix`z : ycg : dlert :   caer my   :caer 'qn:          
^SCR("LEVHIST",7)
                                                                               
^SCR("LEVHIST",8)
                                                                               
^SCR("LEVHIST",9)
                                                                               
^SCR("LEVHIST",10)
                                                                               
^SCR("LEVHIST",11)
                                                                               
^SCR("LEVHIST",12)
                                                                               
^SCR("LEVHIST",13)
                                                                               
^SCR("LEVHIST",14)
                                                                               
^SCR("LEVHIST",15)
                                                                               
^SCR("LEVHIST",16)
                                                                               
^SCR("LEVHIST",17)
                                                                               
^SCR("LEVHIST",18)
                                                                               
^SCR("LEVHIST",19)
                                                                               
^SCR("LEVHIST",20)
                                                                               
^SCR("LEVHIST",21)
  $1                                                                           
^SCR("LEVHIST","A",1)
�‰ƒ�…’‰˜”‘ŽŒ™�‰‰…�‰™…�‰Œ…ˆ‰�Œ…—…ˆ…˜”
^SCR("LEVHIST","A",2)

^SCR("LEVHIST","A",3)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("LEVHIST","A",4)

^SCR("LEVHIST","A",5)

^SCR("LEVHIST","A",6)
’–�Ž„�™„’™Š‰˜€š™ƒ‡„Œ…’”ƒ�…’�™ƒ�…’'‘Ž
^SCR("LEVHIST","A",7)
--------------------------------------------------------
^SCR("LEVHIST","A",8)

^SCR("LEVHIST","A",9)

^SCR("LEVHIST","A",10)

^SCR("LEVHIST","A",11)

^SCR("LEVHIST","A",12)

^SCR("LEVHIST","A",13)

^SCR("LEVHIST","A",14)

^SCR("LEVHIST","A",15)

^SCR("LEVHIST","A",16)

^SCR("LEVHIST","A",17)

^SCR("LEVHIST","A",18)

^SCR("LEVHIST","A",19)

^SCR("LEVHIST","A",20)

^SCR("LEVHIST","A",21)

^SCR("LEVHIST","AV",1)
ohscughrpxnkaohhubhauohkuyhckueuyurp
^SCR("LEVHIST","AV",2)

^SCR("LEVHIST","AV",3)
lhrt,sglhrt,n
^SCR("LEVHIST","AV",4)

^SCR("LEVHIST","AV",5)

^SCR("LEVHIST","AV",6)
gmcnvoavgalhrt,asjvkugpscugoascugwxn
^SCR("LEVHIST","AV",7)
--------------------------------------------------------
^SCR("LEVHIST","AV",8)

^SCR("LEVHIST","AV",9)

^SCR("LEVHIST","AV",10)

^SCR("LEVHIST","AV",11)

^SCR("LEVHIST","AV",12)

^SCR("LEVHIST","AV",13)

^SCR("LEVHIST","AV",14)

^SCR("LEVHIST","AV",15)

^SCR("LEVHIST","AV",16)

^SCR("LEVHIST","AV",17)

^SCR("LEVHIST","AV",18)

^SCR("LEVHIST","AV",19)

^SCR("LEVHIST","AV",20)

^SCR("LEVHIST","AV",21)

^SCR("LEVHIST","G",1,"CRD")
7,68,E,5.,0
^SCR("LEVHIST","G",1,"HELP")

^SCR("LEVHIST","G",1,"LMAX")
8
^SCR("LEVHIST","G",1,"MUMPS1")

^SCR("LEVHIST","G",1,"MUMPS2")

^SCR("LEVHIST","G",1,"OUTPUT")

^SCR("LEVHIST","G",1,"SHEM")
caer 'qn
^SCR("LEVHIST","G",1,"TYP")
E
^SCR("LEVHIST","G",2,"CRD")
7,59,H,13,0
^SCR("LEVHIST","G",2,"HELP")

^SCR("LEVHIST","G",2,"LMAX")
13
^SCR("LEVHIST","G",2,"MUMPS1")

^SCR("LEVHIST","G",2,"MUMPS2")

^SCR("LEVHIST","G",2,"OUTPUT")

^SCR("LEVHIST","G",2,"SHEM")
   caer my   
^SCR("LEVHIST","G",2,"TYP")
H
^SCR("LEVHIST","G",3,"CRD")
7,45,H,7,0
^SCR("LEVHIST","G",3,"HELP")

^SCR("LEVHIST","G",3,"LMAX")
7
^SCR("LEVHIST","G",3,"MUMPS1")

^SCR("LEVHIST","G",3,"MUMPS2")

^SCR("LEVHIST","G",3,"OUTPUT")

^SCR("LEVHIST","G",3,"SHEM")
 dlert 
^SCR("LEVHIST","G",3,"TYP")
H
^SCR("LEVHIST","G",4,"CRD")
7,37,E,5.,0
^SCR("LEVHIST","G",4,"HELP")

^SCR("LEVHIST","G",4,"LMAX")
5
^SCR("LEVHIST","G",4,"MUMPS1")

^SCR("LEVHIST","G",4,"MUMPS2")

^SCR("LEVHIST","G",4,"OUTPUT")

^SCR("LEVHIST","G",4,"SHEM")
 ycg 
^SCR("LEVHIST","G",4,"TYP")
E
^SCR("LEVHIST","G",5,"CRD")
7,31,D,8,0
^SCR("LEVHIST","G",5,"HELP")

^SCR("LEVHIST","G",5,"LMAX")
8
^SCR("LEVHIST","G",5,"MUMPS1")

^SCR("LEVHIST","G",5,"MUMPS2")

^SCR("LEVHIST","G",5,"OUTPUT")

^SCR("LEVHIST","G",5,"SHEM")
  jix`z 
^SCR("LEVHIST","G",5,"TYP")
D
^SCR("LEVHIST","G",6,"CRD")
7,22,E,5,0
^SCR("LEVHIST","G",6,"HELP")

^SCR("LEVHIST","G",6,"LMAX")
5
^SCR("LEVHIST","G",6,"MUMPS1")

^SCR("LEVHIST","G",6,"MUMPS2")

^SCR("LEVHIST","G",6,"OUTPUT")

^SCR("LEVHIST","G",6,"SHEM")
 dry 
^SCR("LEVHIST","G",6,"TYP")
E
^SCR("LEVHIST","G",7,"CRD")
7,16,H,8,0
^SCR("LEVHIST","G",7,"HELP")

^SCR("LEVHIST","G",7,"LMAX")
10
^SCR("LEVHIST","G",7,"MUMPS1")

^SCR("LEVHIST","G",7,"MUMPS2")

^SCR("LEVHIST","G",7,"OUTPUT")

^SCR("LEVHIST","G",7,"SHEM")
 rvand my 
^SCR("LEVHIST","G",7,"TYP")
H
^SCR("LEVHIST","G","DEL")

^SCR("LEVHIST","G","MAX")
99999
^SCR("LEVHIST","G","NAME","HADASH")
4
^SCR("LEVHIST","G","NAME","MV")
7
^SCR("LEVHIST","G","NAME","OVED")
1
^SCR("LEVHIST","G","NAME","OVED1")
2
^SCR("LEVHIST","G","NAME","PEULA")
3
^SCR("LEVHIST","G","NAME","SHAA")
6
^SCR("LEVHIST","G","NAME","TRH")
5
^SCR("LEVHIST","G","NM",1)
OVED
^SCR("LEVHIST","G","NM",2)
OVED1
^SCR("LEVHIST","G","NM",3)
PEULA
^SCR("LEVHIST","G","NM",4)
HADASH
^SCR("LEVHIST","G","NM",5)
TRH
^SCR("LEVHIST","G","NM",6)
SHAA
^SCR("LEVHIST","G","NM",7)
MV
^SCR("LEVHIST","G","RB")
6,3,22,74
^SCR("LEVHIST","G","REF")
^TEMP1($P
^SCR("LEVHIST","G","RZD")
\
^SCR("LEVHIST","G","STEP")
1
^SCR("LEVHIST","G","STG")
     : rvand my : dry :  jix`z : ycg : dlert :   caer my   :caer 'qn:          
^SCR("LEVHIST","G","VG")
8
^SCR("LEVHIST","NAME")
micaer ilehia lewehext
^SCR("LEVHIST","P",5,"CRD")
3,44,D,8,0
^SCR("LEVHIST","P",5,"HELP")

^SCR("LEVHIST","P",5,"LMAX")
8
^SCR("LEVHIST","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($H,1)
^SCR("LEVHIST","P",5,"MUMPS2")

^SCR("LEVHIST","P",5,"MUST")

^SCR("LEVHIST","P",5,"TYP")
D
^SCR("LEVHIST","P",10,"CRD")
3,22,D,8,0
^SCR("LEVHIST","P",10,"HELP")

^SCR("LEVHIST","P",10,"LMAX")
8
^SCR("LEVHIST","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("LEVHIST","P",10,"MUMPS2")
D DAT2^LEVHIST
^SCR("LEVHIST","P",10,"MUST")

^SCR("LEVHIST","P",10,"TYP")
D
^SCR("LEVHIST","P","NAME","DAT1")
5
^SCR("LEVHIST","P","NAME","DAT2")
10
^SCR("LEVHIST","P","NM",5)
DAT1
^SCR("LEVHIST","P","NM",10)
DAT2
^SCR("LEVKVZ")
H
^SCR("LEVKVZ",1)
                                                                               
^SCR("LEVKVZ",2)
             {                          03}  {01 : micaer zveaw 'qn            
^SCR("LEVKVZ",3)
                                                                               
^SCR("LEVKVZ",4)
                                                                     1]        
^SCR("LEVKVZ",5)
                        {07  } -n 'e mei    {05  }-n  1 zxnyn zligz            
^SCR("LEVKVZ",6)
                        {17  } -n 'e mei    {15  }-n  2 zxnyn zligz            
^SCR("LEVKVZ",7)
                                            {25  }-n  3 zxnyn zligz            
^SCR("LEVKVZ",8)
                                                                               
^SCR("LEVKVZ",9)
                   {40  } dry '` mei cr {35  } dry 'e mein zay zery            
^SCR("LEVKVZ",10)
                   {42  } dry 'y mei cr e`                                     
^SCR("LEVKVZ",11)
                                         {45    } :    cr qiqa zery            
^SCR("LEVKVZ",12)
                                         {50    } :cr 1 zetqep zery            
^SCR("LEVKVZ",13)
                                         {55    } :cr 2 zetqep zery            
^SCR("LEVKVZ",14)
                                                                               
^SCR("LEVKVZ",15)
                                                           : 'e mei            
^SCR("LEVKVZ",16)
                                         {60    } :    cr qiqa zery            
^SCR("LEVKVZ",17)
                                         {65    } :cr 1 zetqep zery            
^SCR("LEVKVZ",18)
                                         {70    } :cr 2 zetqep zery            
^SCR("LEVKVZ",19)
                                                                               
^SCR("LEVKVZ",20)
                   {80 :(0-`l,1-ok) cxtpa iyiy mei ly zery aygl m`d            
^SCR("LEVKVZ",21)
               [1                                                              
^SCR("LEVKVZ","A",1)

^SCR("LEVKVZ","A",2)
:�‰ƒ�…’š–…�—'‘Ž
^SCR("LEVKVZ","A",3)

^SCR("LEVKVZ","A",4)

^SCR("LEVKVZ","A",5)
-Ž'…�…‰-Ž1š˜Ž™ŽšŒ‰‡š
^SCR("LEVKVZ","A",6)
-Ž'…�…‰-Ž2š˜Ž™ŽšŒ‰‡š
^SCR("LEVKVZ","A",7)
-Ž3š˜Ž™ŽšŒ‰‡š
^SCR("LEVKVZ","A",8)

^SCR("LEVKVZ","A",9)
„’™'€�…‰ƒ’„’™'…�…‰Žš�™š…’™
^SCR("LEVKVZ","A",10)
„’™'™�…‰ƒ’…€
^SCR("LEVKVZ","A",11)
:ƒ’‘‰‘�š…’™
^SCR("LEVKVZ","A",12)
:ƒ’1š…”‘…�š…’™
^SCR("LEVKVZ","A",13)
:ƒ’2š…”‘…�š…’™
^SCR("LEVKVZ","A",14)

^SCR("LEVKVZ","A",15)
:'…�…‰
^SCR("LEVKVZ","A",16)
:ƒ’‘‰‘�š…’™
^SCR("LEVKVZ","A",17)
:ƒ’1š…”‘…�š…’™
^SCR("LEVKVZ","A",18)
:ƒ’2š…”‘…�š…’™
^SCR("LEVKVZ","A",19)

^SCR("LEVKVZ","A",20)
:(0-€Œ,1-�‹)ƒ˜”��‰™‰™�…‰Œ™š…’™�™‡Œ�€„
^SCR("LEVKVZ","A",21)

^SCR("LEVKVZ","AV",1)

^SCR("LEVKVZ","AV",2)
:ohscug,mucewxn
^SCR("LEVKVZ","AV",3)

^SCR("LEVKVZ","AV",4)

^SCR("LEVKVZ","AV",5)
-nwuouh-n1,rnan,khj,
^SCR("LEVKVZ","AV",6)
-nwuouh-n2,rnan,khj,
^SCR("LEVKVZ","AV",7)
-n3,rnan,khj,
^SCR("LEVKVZ","AV",8)

^SCR("LEVKVZ","AV",9)
vgawtouhsgvgawuouhn,ca,uga
^SCR("LEVKVZ","AV",10)
vgawaouhsgut
^SCR("LEVKVZ","AV",11)
:sgxhxc,uga
^SCR("LEVKVZ","AV",12)
:sg1,upxub,uga
^SCR("LEVKVZ","AV",13)
:sg2,upxub,uga
^SCR("LEVKVZ","AV",14)

^SCR("LEVKVZ","AV",15)
:wuouh
^SCR("LEVKVZ","AV",16)
:sgxhxc,uga
^SCR("LEVKVZ","AV",17)
:sg1,upxub,uga
^SCR("LEVKVZ","AV",18)
:sg2,upxub,uga
^SCR("LEVKVZ","AV",19)

^SCR("LEVKVZ","AV",20)
:(0-tk'1-if)srpbchahaouhka,ugacajkotv
^SCR("LEVKVZ","AV",21)

^SCR("LEVKVZ","NAME")

^SCR("LEVKVZ","P",1,"CRD")
2,45,E,4,0
^SCR("LEVKVZ","P",1,"FNC")

^SCR("LEVKVZ","P",1,"GLOB")
LEVKVZ
^SCR("LEVKVZ","P",1,"HELP")

^SCR("LEVKVZ","P",1,"LMAX")
4
^SCR("LEVKVZ","P",1,"MUMPS1")

^SCR("LEVKVZ","P",1,"MUMPS2")
D KVZ^LEVKVZ
^SCR("LEVKVZ","P",1,"MUST")

^SCR("LEVKVZ","P",1,"NLN")
20
^SCR("LEVKVZ","P",1,"RZD")
\
^SCR("LEVKVZ","P",1,"TOPB")
8
^SCR("LEVKVZ","P",1,"TYP")
E
^SCR("LEVKVZ","P",1,"VRB")
KVZ1
^SCR("LEVKVZ","P",3,"CRD")
2,43,H,29
^SCR("LEVKVZ","P",3,"HELP")

^SCR("LEVKVZ","P",3,"LMAX")
29
^SCR("LEVKVZ","P",3,"MUMPS1")

^SCR("LEVKVZ","P",3,"MUMPS2")

^SCR("LEVKVZ","P",3,"MUST")

^SCR("LEVKVZ","P",3,"TYP")
H
^SCR("LEVKVZ","P",5,"CRD")
5,44,T,5,0
^SCR("LEVKVZ","P",5,"HELP")

^SCR("LEVKVZ","P",5,"LMAX")
5
^SCR("LEVKVZ","P",5,"MUMPS1")

^SCR("LEVKVZ","P",5,"MUMPS2")

^SCR("LEVKVZ","P",5,"TYP")
T
^SCR("LEVKVZ","P",7,"CRD")
5,24,T,5,0
^SCR("LEVKVZ","P",7,"HELP")

^SCR("LEVKVZ","P",7,"LMAX")
5
^SCR("LEVKVZ","P",7,"MUMPS1")

^SCR("LEVKVZ","P",7,"MUMPS2")

^SCR("LEVKVZ","P",7,"TYP")
T
^SCR("LEVKVZ","P",15,"CRD")
6,44,T,5,0
^SCR("LEVKVZ","P",15,"HELP")

^SCR("LEVKVZ","P",15,"LMAX")
5
^SCR("LEVKVZ","P",15,"MUMPS1")

^SCR("LEVKVZ","P",15,"MUMPS2")

^SCR("LEVKVZ","P",15,"TYP")
T
^SCR("LEVKVZ","P",17,"CRD")
6,24,T,5,0
^SCR("LEVKVZ","P",17,"HELP")

^SCR("LEVKVZ","P",17,"LMAX")
5
^SCR("LEVKVZ","P",17,"MUMPS1")

^SCR("LEVKVZ","P",17,"MUMPS2")

^SCR("LEVKVZ","P",17,"TYP")
T
^SCR("LEVKVZ","P",25,"CRD")
7,44,T,5,0
^SCR("LEVKVZ","P",25,"HELP")

^SCR("LEVKVZ","P",25,"LMAX")
5
^SCR("LEVKVZ","P",25,"MUMPS1")

^SCR("LEVKVZ","P",25,"MUMPS2")

^SCR("LEVKVZ","P",25,"TYP")
T
^SCR("LEVKVZ","P",35,"CRD")
9,40,T,5,0
^SCR("LEVKVZ","P",35,"HELP")

^SCR("LEVKVZ","P",35,"LMAX")
5
^SCR("LEVKVZ","P",35,"MUMPS1")

^SCR("LEVKVZ","P",35,"MUMPS2")
I SHB1="00:00"!(SHB1>23) S %SC("ER")=1
^SCR("LEVKVZ","P",35,"TYP")
T
^SCR("LEVKVZ","P",40,"CRD")
9,19,T,5,0
^SCR("LEVKVZ","P",40,"HELP")

^SCR("LEVKVZ","P",40,"LMAX")
5
^SCR("LEVKVZ","P",40,"MUMPS1")

^SCR("LEVKVZ","P",40,"MUMPS2")
D SHB2^LEVKVZ
^SCR("LEVKVZ","P",40,"TYP")
T
^SCR("LEVKVZ","P",42,"CRD")
10,19,T,5,0
^SCR("LEVKVZ","P",42,"HELP")

^SCR("LEVKVZ","P",42,"LMAX")
5
^SCR("LEVKVZ","P",42,"MUMPS1")

^SCR("LEVKVZ","P",42,"MUMPS2")
D SHB3^LEVKVZ
^SCR("LEVKVZ","P",42,"TYP")
T
^SCR("LEVKVZ","P",45,"CRD")
11,41,N,7,0
^SCR("LEVKVZ","P",45,"HELP")

^SCR("LEVKVZ","P",45,"LMAX")
7
^SCR("LEVKVZ","P",45,"MUMPS1")

^SCR("LEVKVZ","P",45,"MUMPS2")

^SCR("LEVKVZ","P",45,"TYP")
N
^SCR("LEVKVZ","P",50,"CRD")
12,41,N,7,0
^SCR("LEVKVZ","P",50,"HELP")

^SCR("LEVKVZ","P",50,"LMAX")
7
^SCR("LEVKVZ","P",50,"MUMPS1")

^SCR("LEVKVZ","P",50,"MUMPS2")

^SCR("LEVKVZ","P",50,"TYP")
N
^SCR("LEVKVZ","P",55,"CRD")
13,41,N,7,0
^SCR("LEVKVZ","P",55,"HELP")

^SCR("LEVKVZ","P",55,"LMAX")
7
^SCR("LEVKVZ","P",55,"MUMPS1")

^SCR("LEVKVZ","P",55,"MUMPS2")
D BDK2^LEVKVZ
^SCR("LEVKVZ","P",55,"TYP")
N
^SCR("LEVKVZ","P",60,"CRD")
16,41,N,7,0
^SCR("LEVKVZ","P",60,"HELP")

^SCR("LEVKVZ","P",60,"LMAX")
7
^SCR("LEVKVZ","P",60,"MUMPS1")

^SCR("LEVKVZ","P",60,"MUMPS2")

^SCR("LEVKVZ","P",60,"TYP")
N
^SCR("LEVKVZ","P",65,"CRD")
17,41,N,7,0
^SCR("LEVKVZ","P",65,"HELP")

^SCR("LEVKVZ","P",65,"LMAX")
7
^SCR("LEVKVZ","P",65,"MUMPS1")

^SCR("LEVKVZ","P",65,"MUMPS2")

^SCR("LEVKVZ","P",65,"TYP")
N
^SCR("LEVKVZ","P",70,"CRD")
18,41,N,7,0
^SCR("LEVKVZ","P",70,"HELP")

^SCR("LEVKVZ","P",70,"LMAX")
7
^SCR("LEVKVZ","P",70,"MUMPS1")

^SCR("LEVKVZ","P",70,"MUMPS2")

^SCR("LEVKVZ","P",70,"TYP")
N
^SCR("LEVKVZ","P",80,"CRD")
20,19,N,4,0
^SCR("LEVKVZ","P",80,"HELP")

^SCR("LEVKVZ","P",80,"LMAX")
4
^SCR("LEVKVZ","P",80,"MUMPS1")

^SCR("LEVKVZ","P",80,"MUMPS2")
D ^%L1BDO
^SCR("LEVKVZ","P",80,"MUST")

^SCR("LEVKVZ","P",80,"TYP")
N
^SCR("LEVKVZ","P","NAME","KVZ")
1
^SCR("LEVKVZ","P","NAME","KVZ1")
3
^SCR("LEVKVZ","P","NAME","SHAA0")
45
^SCR("LEVKVZ","P","NAME","SHAA1")
50
^SCR("LEVKVZ","P","NAME","SHAA2")
55
^SCR("LEVKVZ","P","NAME","SHAAME1")
5
^SCR("LEVKVZ","P","NAME","SHAAME2")
15
^SCR("LEVKVZ","P","NAME","SHAAME3")
25
^SCR("LEVKVZ","P","NAME","SHAAMV1")
7
^SCR("LEVKVZ","P","NAME","SHAAMV2")
17
^SCR("LEVKVZ","P","NAME","SHAAV0")
60
^SCR("LEVKVZ","P","NAME","SHAAV1")
65
^SCR("LEVKVZ","P","NAME","SHAAV2")
70
^SCR("LEVKVZ","P","NAME","SHB1")
35
^SCR("LEVKVZ","P","NAME","SHB2")
40
^SCR("LEVKVZ","P","NAME","SHB3")
42
^SCR("LEVKVZ","P","NAME","TVAV")
80
^SCR("LEVKVZ","P","NM",1)
KVZ
^SCR("LEVKVZ","P","NM",3)
KVZ1
^SCR("LEVKVZ","P","NM",5)
SHAAME1
^SCR("LEVKVZ","P","NM",7)
SHAAMV1
^SCR("LEVKVZ","P","NM",15)
SHAAME2
^SCR("LEVKVZ","P","NM",17)
SHAAMV2
^SCR("LEVKVZ","P","NM",25)
SHAAME3
^SCR("LEVKVZ","P","NM",35)
SHB1
^SCR("LEVKVZ","P","NM",40)
SHB2
^SCR("LEVKVZ","P","NM",42)
SHB3
^SCR("LEVKVZ","P","NM",45)
SHAA0
^SCR("LEVKVZ","P","NM",50)
SHAA1
^SCR("LEVKVZ","P","NM",55)
SHAA2
^SCR("LEVKVZ","P","NM",60)
SHAAV0
^SCR("LEVKVZ","P","NM",65)
SHAAV1
^SCR("LEVKVZ","P","NM",70)
SHAAV2
^SCR("LEVKVZ","P","NM",80)
TVAV
^SCR("LEVKVZ","P","RB",1)
5,16,22,71
^SCR("LEVP")
H
^SCR("LEVP",1)
                 # zegkep oery caer dti` zecnr zlah #                          
^SCR("LEVP",2)
                                                                               
^SCR("LEVP",3)
                                          {05      } : dnqiq                   
^SCR("LEVP",4)
                                                            1$                 
^SCR("LEVP",5)
                                     : oery : dcnr 'qn :                       
^SCR("LEVP",6)
                                                                               
^SCR("LEVP",7)
                                                                               
^SCR("LEVP",8)
                                                                               
^SCR("LEVP",9)
                                                                               
^SCR("LEVP",10)
                                                                               
^SCR("LEVP",11)
                                                                               
^SCR("LEVP",12)
                                                                               
^SCR("LEVP",13)
                                                                               
^SCR("LEVP",14)
                                                                               
^SCR("LEVP",15)
                                                                               
^SCR("LEVP",16)
                                                                               
^SCR("LEVP",17)
                                                                               
^SCR("LEVP",18)
                                                                               
^SCR("LEVP",19)
                                    $1                                         
^SCR("LEVP","A",1)
š…‡‹…��…’™ƒ�…’„”‰€š…ƒŽ’šŒ�ˆ
^SCR("LEVP","A",2)

^SCR("LEVP","A",3)
:„Ž‘‰‘
^SCR("LEVP","A",4)

^SCR("LEVP","A",5)
�…’™„ƒŽ’'‘Ž
^SCR("LEVP","A",6)
----------------
^SCR("LEVP","A",7)

^SCR("LEVP","A",8)

^SCR("LEVP","A",9)

^SCR("LEVP","A",10)

^SCR("LEVP","A",11)

^SCR("LEVP","A",12)

^SCR("LEVP","A",13)

^SCR("LEVP","A",14)

^SCR("LEVP","A",15)

^SCR("LEVP","A",16)

^SCR("LEVP","A",17)

^SCR("LEVP","A",18)

^SCR("LEVP","A",19)

^SCR("LEVP","AV",1)
,ujfubiugascugvpht,usng,kcy
^SCR("LEVP","AV",2)

^SCR("LEVP","AV",3)
:vnxhx
^SCR("LEVP","AV",4)

^SCR("LEVP","AV",5)
iugavsngwxn
^SCR("LEVP","AV",6)
----------------
^SCR("LEVP","AV",7)

^SCR("LEVP","AV",8)

^SCR("LEVP","AV",9)

^SCR("LEVP","AV",10)

^SCR("LEVP","AV",11)

^SCR("LEVP","AV",12)

^SCR("LEVP","AV",13)

^SCR("LEVP","AV",14)

^SCR("LEVP","AV",15)

^SCR("LEVP","AV",16)

^SCR("LEVP","AV",17)

^SCR("LEVP","AV",18)

^SCR("LEVP","AV",19)

^SCR("LEVP","G",1,"CRD")
6,55,N,2,0
^SCR("LEVP","G",1,"HELP")

^SCR("LEVP","G",1,"LMAX")
10
^SCR("LEVP","G",1,"MUMPS1")

^SCR("LEVP","G",1,"MUMPS2")

^SCR("LEVP","G",1,"OUTPUT")

^SCR("LEVP","G",1,"SHEM")
 dcnr 'qn 
^SCR("LEVP","G",1,"TYP")
N
^SCR("LEVP","G",2,"CRD")
6,44,N,1,0
^SCR("LEVP","G",2,"HELP")
0 - xeq` , 1 - oery mr cearl xyt` 
^SCR("LEVP","G",2,"LMAX")
6
^SCR("LEVP","G",2,"MUMPS1")
S:'$G(SHAON) SHAON=1
^SCR("LEVP","G",2,"MUMPS2")
I SHAON'=1,SHAON'=0 S %SC("ER")=1
^SCR("LEVP","G",2,"SHEM")
 oery 
^SCR("LEVP","G",2,"TYP")
N
^SCR("LEVP","G","DEL")

^SCR("LEVP","G","MAX")
4
^SCR("LEVP","G","NAME","PORT")
1
^SCR("LEVP","G","NAME","SHAON")
2
^SCR("LEVP","G","NM",1)
PORT
^SCR("LEVP","G","NM",2)
SHAON
^SCR("LEVP","G","RB")
5,37,20,62
^SCR("LEVP","G","REF")
^TMP($P
^SCR("LEVP","G","RZD")
\
^SCR("LEVP","G","STEP")
1
^SCR("LEVP","G","STG")
                                     : oery : dcnr 'qn :                       
^SCR("LEVP","G","VG")
7
^SCR("LEVP","NAME")
zegkep oeryl mihxet zlah
^SCR("LEVP","P",5,"CRD")
3,42,E,9,0
^SCR("LEVP","P",5,"HELP")

^SCR("LEVP","P",5,"LMAX")
9
^SCR("LEVP","P",5,"MUMPS1")

^SCR("LEVP","P",5,"MUMPS2")

^SCR("LEVP","P",5,"TYP")
E
^SCR("LEVP","P","NAME","SISMA")
5
^SCR("LEVP","P","NM",5)
SISMA
^SCR("LEVPR")
H
^SCR("LEVPR",1)
                           # caer ihxt #                                       
^SCR("LEVPR",2)
              {                   02} :caer my {01  }:       caer 'qn          
^SCR("LEVPR",3)
                    {                       05} {03 }:   micaer zveaw          
^SCR("LEVPR",4)
                   {                       08}  {07 }:     zxekyn beq          
^SCR("LEVPR",5)
                             ( `l - 0 ,ok - 1 ) {09 }: mitih itl caer          
^SCR("LEVPR",6)
                                                                     1]        
^SCR("LEVPR",7)
                {                                   10} :       zaezk          
^SCR("LEVPR",8)
                                         {15           }: zedf 'z 'qn          
^SCR("LEVPR",9)
                                  {20                  }:       oetlh          
^SCR("LEVPR",10)
                                       {            25} :  mileg ztew          
^SCR("LEVPR",11)
                                               {30     }: dcear zligz          
^SCR("LEVPR",12)
                                               {35     }:  dcear meiq          
^SCR("LEVPR",13)
                                               {40     }:   zcled mei          
^SCR("LEVPR",14)
                                  {                 45} :       ciwtz          
^SCR("LEVPR",15)
                {                                   50} :        dxrd          
^SCR("LEVPR",16)
          [1                                                                   
^SCR("LEVPR",17)
                                                                               
^SCR("LEVPR","A",1)
ƒ�…’‰ˆ˜”
^SCR("LEVPR","A",2)
:ƒ�…’�™:ƒ�…’'‘Ž
^SCR("LEVPR","A",3)
:�‰ƒ�…’š–…�—
^SCR("LEVPR","A",4)
:š˜…‹™Ž‚…‘
^SCR("LEVPR","A",5)
(€Œ-0,�‹-1):�‰”‰ˆ‰”Œƒ�…’
^SCR("LEVPR","A",6)

^SCR("LEVPR","A",7)
:š�…š‹
^SCR("LEVPR","A",8)
:š…„†'š'‘Ž
^SCR("LEVPR","A",9)
:�…”Œˆ
^SCR("LEVPR","A",10)
:�‰Œ…‡š”…—
^SCR("LEVPR","A",11)
:„ƒ…�’šŒ‰‡š
^SCR("LEVPR","A",12)
:„ƒ…�’�…‰‘
^SCR("LEVPR","A",13)
:šƒŒ…„�…‰
^SCR("LEVPR","A",14)
:ƒ‰—”š
^SCR("LEVPR","A",15)
:„˜’„
^SCR("LEVPR","A",16)

^SCR("LEVPR","A",17)

^SCR("LEVPR","AV",1)
scughyrp
^SCR("LEVPR","AV",2)
:scugoa:scugwxn
^SCR("LEVPR","AV",3)
:ohscug,muce
^SCR("LEVPR","AV",4)
:,rufandux
^SCR("LEVPR","AV",5)
(tk-0'if-1):ohphyhpkscug
^SCR("LEVPR","AV",6)

^SCR("LEVPR","AV",7)
:,cu,f
^SCR("LEVPR","AV",8)
:,uvzw,wxn
^SCR("LEVPR","AV",9)
:iupky
^SCR("LEVPR","AV",10)
:ohkuj,pue
^SCR("LEVPR","AV",11)
:vsucg,khj,
^SCR("LEVPR","AV",12)
:vsucgouhx
^SCR("LEVPR","AV",13)
:,skuvouh
^SCR("LEVPR","AV",14)
:shep,
^SCR("LEVPR","AV",15)
:vrgv
^SCR("LEVPR","AV",16)

^SCR("LEVPR","AV",17)

^SCR("LEVPR","NAME")

^SCR("LEVPR","P",1,"CRD")
2,47,E,5.,0
^SCR("LEVPR","P",1,"FNC")
F6
^SCR("LEVPR","P",1,"GLOB")
NAME
^SCR("LEVPR","P",1,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("LEVPR","P",1,"LMAX")
5
^SCR("LEVPR","P",1,"MUMPS1")

^SCR("LEVPR","P",1,"MUMPS2")
D OVED^LEVPR
^SCR("LEVPR","P",1,"MUST")

^SCR("LEVPR","P",1,"NLN")
20
^SCR("LEVPR","P",1,"RZD")
\
^SCR("LEVPR","P",1,"TOPB")
8
^SCR("LEVPR","P",1,"TYP")
E
^SCR("LEVPR","P",1,"VRB")
SHEM
^SCR("LEVPR","P",2,"CRD")
2,37,H,22
^SCR("LEVPR","P",2,"HELP")

^SCR("LEVPR","P",2,"LMAX")
22
^SCR("LEVPR","P",2,"MUMPS1")

^SCR("LEVPR","P",2,"MUMPS2")
I SHEM?.P S %SC("ER")=1
^SCR("LEVPR","P",2,"TYP")
H
^SCR("LEVPR","P",3,"CHECK")
Y
^SCR("LEVPR","P",3,"CRD")
3,48,E,4,0
^SCR("LEVPR","P",3,"CREAT")

^SCR("LEVPR","P",3,"FNC")
F6
^SCR("LEVPR","P",3,"GLOB")
LEVKVZ
^SCR("LEVPR","P",3,"HELP")

^SCR("LEVPR","P",3,"LMAX")
4
^SCR("LEVPR","P",3,"MUMPS1")

^SCR("LEVPR","P",3,"MUMPS2")

^SCR("LEVPR","P",3,"MUST")

^SCR("LEVPR","P",3,"NLN")
20
^SCR("LEVPR","P",3,"NS")
micaer zeveaw zlah
^SCR("LEVPR","P",3,"RZD")
\
^SCR("LEVPR","P",3,"TOPB")
8
^SCR("LEVPR","P",3,"TYP")
E
^SCR("LEVPR","P",3,"VRB")
KVZ1
^SCR("LEVPR","P",5,"CRD")
3,47,H,22
^SCR("LEVPR","P",5,"HELP")

^SCR("LEVPR","P",5,"LMAX")
26
^SCR("LEVPR","P",5,"MUMPS1")

^SCR("LEVPR","P",5,"MUMPS2")

^SCR("LEVPR","P",5,"OUTPUT")

^SCR("LEVPR","P",5,"TYP")
H
^SCR("LEVPR","P",7,"CHECK")
Y
^SCR("LEVPR","P",7,"CRD")
4,48,N,3,0
^SCR("LEVPR","P",7,"FNC")

^SCR("LEVPR","P",7,"GLOB")
LEVSUGMS
^SCR("LEVPR","P",7,"HELP")

^SCR("LEVPR","P",7,"LMAX")
4
^SCR("LEVPR","P",7,"MUMPS1")
D SUGMS0^LEVPR
^SCR("LEVPR","P",7,"MUMPS2")
D SUGMS^LEVPR
^SCR("LEVPR","P",7,"NLN")
20
^SCR("LEVPR","P",7,"RZD")
\
^SCR("LEVPR","P",7,"TOPB")
8
^SCR("LEVPR","P",7,"TYP")
N
^SCR("LEVPR","P",7,"VRB")
SUGMS1
^SCR("LEVPR","P",8,"CRD")
4,46,H,26
^SCR("LEVPR","P",8,"HELP")

^SCR("LEVPR","P",8,"LMAX")
26
^SCR("LEVPR","P",8,"MUMPS1")

^SCR("LEVPR","P",8,"MUMPS2")

^SCR("LEVPR","P",8,"OUTPUT")

^SCR("LEVPR","P",8,"TYP")
H
^SCR("LEVPR","P",9,"CRD")
5,48,N,4,0
^SCR("LEVPR","P",9,"HELP")

^SCR("LEVPR","P",9,"LMAX")
4
^SCR("LEVPR","P",9,"MUMPS1")

^SCR("LEVPR","P",9,"MUMPS2")
D ^%L1BDO
^SCR("LEVPR","P",9,"MUST")

^SCR("LEVPR","P",9,"TYP")
N
^SCR("LEVPR","P",10,"CRD")
7,55,H,37
^SCR("LEVPR","P",10,"HELP")

^SCR("LEVPR","P",10,"LMAX")
38
^SCR("LEVPR","P",10,"MUMPS1")

^SCR("LEVPR","P",10,"MUMPS2")

^SCR("LEVPR","P",10,"TYP")
H
^SCR("LEVPR","P",15,"CRD")
8,41,E,14,0
^SCR("LEVPR","P",15,"HELP")

^SCR("LEVPR","P",15,"LMAX")
14
^SCR("LEVPR","P",15,"MUMPS1")

^SCR("LEVPR","P",15,"MUMPS2")

^SCR("LEVPR","P",15,"TYP")
E
^SCR("LEVPR","P",20,"CRD")
9,34,E,21,0
^SCR("LEVPR","P",20,"HELP")

^SCR("LEVPR","P",20,"LMAX")
21
^SCR("LEVPR","P",20,"MUMPS1")

^SCR("LEVPR","P",20,"MUMPS2")

^SCR("LEVPR","P",20,"TYP")
E
^SCR("LEVPR","P",25,"CRD")
10,55,H,14
^SCR("LEVPR","P",25,"HELP")

^SCR("LEVPR","P",25,"LMAX")
15
^SCR("LEVPR","P",25,"MUMPS1")

^SCR("LEVPR","P",25,"MUMPS2")

^SCR("LEVPR","P",25,"TYP")
H
^SCR("LEVPR","P",30,"CRD")
11,47,D,8,0
^SCR("LEVPR","P",30,"HELP")

^SCR("LEVPR","P",30,"LMAX")
8
^SCR("LEVPR","P",30,"MUMPS1")

^SCR("LEVPR","P",30,"MUMPS2")

^SCR("LEVPR","P",30,"TYP")
D
^SCR("LEVPR","P",35,"CRD")
12,47,D,8,0
^SCR("LEVPR","P",35,"HELP")

^SCR("LEVPR","P",35,"LMAX")
8
^SCR("LEVPR","P",35,"MUMPS1")

^SCR("LEVPR","P",35,"MUMPS2")

^SCR("LEVPR","P",35,"TYP")
D
^SCR("LEVPR","P",40,"CRD")
13,47,D,8,0
^SCR("LEVPR","P",40,"HELP")

^SCR("LEVPR","P",40,"LMAX")
8
^SCR("LEVPR","P",40,"MUMPS1")

^SCR("LEVPR","P",40,"MUMPS2")

^SCR("LEVPR","P",40,"TYP")
D
^SCR("LEVPR","P",45,"CRD")
14,55,H,19
^SCR("LEVPR","P",45,"HELP")

^SCR("LEVPR","P",45,"LMAX")
20
^SCR("LEVPR","P",45,"MUMPS1")

^SCR("LEVPR","P",45,"MUMPS2")

^SCR("LEVPR","P",45,"TYP")
H
^SCR("LEVPR","P",50,"CRD")
15,55,H,38
^SCR("LEVPR","P",50,"HELP")

^SCR("LEVPR","P",50,"LMAX")
38
^SCR("LEVPR","P",50,"MUMPS1")

^SCR("LEVPR","P",50,"MUMPS2")

^SCR("LEVPR","P",50,"TYP")
H
^SCR("LEVPR","P","NAME","DATF")
35
^SCR("LEVPR","P","NAME","DATS")
30
^SCR("LEVPR","P","NAME","HRA")
50
^SCR("LEVPR","P","NAME","JOMH")
40
^SCR("LEVPR","P","NAME","KTV")
10
^SCR("LEVPR","P","NAME","KUPH")
25
^SCR("LEVPR","P","NAME","KVZ")
3
^SCR("LEVPR","P","NAME","KVZ1")
5
^SCR("LEVPR","P","NAME","MTIP")
9
^SCR("LEVPR","P","NAME","OVED")
1
^SCR("LEVPR","P","NAME","SHEM")
2
^SCR("LEVPR","P","NAME","SUGMS")
7
^SCR("LEVPR","P","NAME","SUGMS1")
8
^SCR("LEVPR","P","NAME","TEL")
20
^SCR("LEVPR","P","NAME","TFK")
45
^SCR("LEVPR","P","NAME","TZ")
15
^SCR("LEVPR","P","NM",1)
OVED
^SCR("LEVPR","P","NM",2)
SHEM
^SCR("LEVPR","P","NM",3)
KVZ
^SCR("LEVPR","P","NM",5)
KVZ1
^SCR("LEVPR","P","NM",7)
SUGMS
^SCR("LEVPR","P","NM",8)
SUGMS1
^SCR("LEVPR","P","NM",9)
MTIP
^SCR("LEVPR","P","NM",10)
KTV
^SCR("LEVPR","P","NM",15)
TZ
^SCR("LEVPR","P","NM",20)
TEL
^SCR("LEVPR","P","NM",25)
KUPH
^SCR("LEVPR","P","NM",30)
DATS
^SCR("LEVPR","P","NM",35)
DATF
^SCR("LEVPR","P","NM",40)
JOMH
^SCR("LEVPR","P","NM",45)
TFK
^SCR("LEVPR","P","NM",50)
HRA
^SCR("LEVPR","P","RB",1)
7,11,17,71
^SCR("LEVSPR")
H
^SCR("LEVSPR",1)
                            # migkep micaer zniyx #                            
^SCR("LEVSPR",2)
                                 {10  : dry  {05     } : jix`z                 
^SCR("LEVSPR",3)
                                                                             1$
^SCR("LEVSPR",4)
     :F9-xebql: `vnpy onf : dqipk zry :dqipk jix`z :   caer  my   :caer 'qn:   
^SCR("LEVSPR",5)
                                                                               
^SCR("LEVSPR",6)
                                                                               
^SCR("LEVSPR",7)
                                                                               
^SCR("LEVSPR",8)
                                                                               
^SCR("LEVSPR",9)
                                                                               
^SCR("LEVSPR",10)
                                                                               
^SCR("LEVSPR",11)
                                                                               
^SCR("LEVSPR",12)
                                                                               
^SCR("LEVSPR",13)
                                                                               
^SCR("LEVSPR",14)
                                                                               
^SCR("LEVSPR",15)
                                                                               
^SCR("LEVSPR",16)
                                                                               
^SCR("LEVSPR",17)
                                                                               
^SCR("LEVSPR",18)
                                                                               
^SCR("LEVSPR",19)
                                                                               
^SCR("LEVSPR",20)
                                                                               
^SCR("LEVSPR",21)
  $1                                                                           
^SCR("LEVSPR",22)
                                                                               
^SCR("LEVSPR","A",1)
�‰‡‹…��‰ƒ�…’šŽ‰™˜
^SCR("LEVSPR","A",2)
:„’™:Š‰˜€š
^SCR("LEVSPR","A",3)

^SCR("LEVSPR","A",4)
F9-˜…‚‘Œ€–Ž�™�Ž†„‘‰�‹š’™„‘‰�‹Š‰˜€šƒ�…’�™ƒ�…’'‘Ž
^SCR("LEVSPR","A",5)
-------------------------------------------------------------------
^SCR("LEVSPR","A",6)

^SCR("LEVSPR","A",7)

^SCR("LEVSPR","A",8)

^SCR("LEVSPR","A",9)

^SCR("LEVSPR","A",10)

^SCR("LEVSPR","A",11)

^SCR("LEVSPR","A",12)

^SCR("LEVSPR","A",13)

^SCR("LEVSPR","A",14)

^SCR("LEVSPR","A",15)

^SCR("LEVSPR","A",16)

^SCR("LEVSPR","A",17)

^SCR("LEVSPR","A",18)

^SCR("LEVSPR","A",19)

^SCR("LEVSPR","A",20)

^SCR("LEVSPR","A",21)

^SCR("LEVSPR","A",22)

^SCR("LEVSPR","AV",1)
ohjfubohscug,nhar
^SCR("LEVSPR","AV",2)
:vga:lhrt,
^SCR("LEVSPR","AV",3)

^SCR("LEVSPR","AV",4)
F9-rudxktmnbainzvxhbf,gavxhbflhrt,scugoascugwxn
^SCR("LEVSPR","AV",5)
-------------------------------------------------------------------
^SCR("LEVSPR","AV",6)

^SCR("LEVSPR","AV",7)

^SCR("LEVSPR","AV",8)

^SCR("LEVSPR","AV",9)

^SCR("LEVSPR","AV",10)

^SCR("LEVSPR","AV",11)

^SCR("LEVSPR","AV",12)

^SCR("LEVSPR","AV",13)

^SCR("LEVSPR","AV",14)

^SCR("LEVSPR","AV",15)

^SCR("LEVSPR","AV",16)

^SCR("LEVSPR","AV",17)

^SCR("LEVSPR","AV",18)

^SCR("LEVSPR","AV",19)

^SCR("LEVSPR","AV",20)

^SCR("LEVSPR","AV",21)

^SCR("LEVSPR","AV",22)

^SCR("LEVSPR","G",1,"CRD")
5,75,E,5,0
^SCR("LEVSPR","G",1,"HELP")

^SCR("LEVSPR","G",1,"LMAX")
8
^SCR("LEVSPR","G",1,"MUMPS1")

^SCR("LEVSPR","G",1,"MUMPS2")

^SCR("LEVSPR","G",1,"OUTPUT")

^SCR("LEVSPR","G",1,"SHEM")
caer 'qn
^SCR("LEVSPR","G",1,"TYP")
E
^SCR("LEVSPR","G",2,"CRD")
5,66,H,14,0
^SCR("LEVSPR","G",2,"HELP")

^SCR("LEVSPR","G",2,"LMAX")
14
^SCR("LEVSPR","G",2,"MUMPS1")

^SCR("LEVSPR","G",2,"MUMPS2")

^SCR("LEVSPR","G",2,"OUTPUT")

^SCR("LEVSPR","G",2,"SHEM")
   caer  my   
^SCR("LEVSPR","G",2,"TYP")
H
^SCR("LEVSPR","G",3,"CRD")
5,51,T,5,0
^SCR("LEVSPR","G",3,"HELP")

^SCR("LEVSPR","G",3,"LMAX")
12
^SCR("LEVSPR","G",3,"MUMPS1")

^SCR("LEVSPR","G",3,"MUMPS2")

^SCR("LEVSPR","G",3,"OUTPUT")

^SCR("LEVSPR","G",3,"SHEM")
dqipk jix`z 
^SCR("LEVSPR","G",3,"TYP")
T
^SCR("LEVSPR","G",4,"CRD")
5,38,T,5,0
^SCR("LEVSPR","G",4,"HELP")

^SCR("LEVSPR","G",4,"LMAX")
11
^SCR("LEVSPR","G",4,"MUMPS1")

^SCR("LEVSPR","G",4,"MUMPS2")

^SCR("LEVSPR","G",4,"OUTPUT")

^SCR("LEVSPR","G",4,"SHEM")
 dqipk zry 
^SCR("LEVSPR","G",4,"TYP")
T
^SCR("LEVSPR","G",5,"CRD")
5,26,T,5,0
^SCR("LEVSPR","G",5,"HELP")

^SCR("LEVSPR","G",5,"LMAX")
11
^SCR("LEVSPR","G",5,"MUMPS1")

^SCR("LEVSPR","G",5,"MUMPS2")

^SCR("LEVSPR","G",5,"OUTPUT")

^SCR("LEVSPR","G",5,"SHEM")
 `vnpy onf 
^SCR("LEVSPR","G",5,"TYP")
T
^SCR("LEVSPR","G",6,"CRD")
5,14,E,1,0
^SCR("LEVSPR","G",6,"HELP")

^SCR("LEVSPR","G",6,"LMAX")
8
^SCR("LEVSPR","G",6,"MUMPS1")

^SCR("LEVSPR","G",6,"MUMPS2")
D SGIRA^LEVSPR
^SCR("LEVSPR","G",6,"SHEM")
F9-xebql
^SCR("LEVSPR","G",6,"TYP")
E
^SCR("LEVSPR","G","DEL")

^SCR("LEVSPR","G","MAX")
0
^SCR("LEVSPR","G","NAME","KNISA")
3
^SCR("LEVSPR","G","NAME","OVED")
1
^SCR("LEVSPR","G","NAME","OVED1")
2
^SCR("LEVSPR","G","NAME","SGIRA")
6
^SCR("LEVSPR","G","NAME","SHAA")
4
^SCR("LEVSPR","G","NAME","ZMAN")
5
^SCR("LEVSPR","G","NM",1)
OVED
^SCR("LEVSPR","G","NM",2)
OVED1
^SCR("LEVSPR","G","NM",3)
KNISA
^SCR("LEVSPR","G","NM",4)
SHAA
^SCR("LEVSPR","G","NM",5)
ZMAN
^SCR("LEVSPR","G","NM",6)
SGIRA
^SCR("LEVSPR","G","RB")
4,3,22,79
^SCR("LEVSPR","G","REF")
^TEMPS($P
^SCR("LEVSPR","G","RZD")
\
^SCR("LEVSPR","G","STEP")
1
^SCR("LEVSPR","G","STG")
     :F9-xebql: `vnpy onf : dqipk zry :dqipk jix`z :   caer  my   :caer 'qn:   
^SCR("LEVSPR","G","VG")
6
^SCR("LEVSPR","NAME")
migkep micaer zniyx
^SCR("LEVSPR","P",5,"CRD")
2,45,D,8,0
^SCR("LEVSPR","P",5,"HELP")

^SCR("LEVSPR","P",5,"LMAX")
8
^SCR("LEVSPR","P",5,"MUMPS1")

^SCR("LEVSPR","P",5,"MUMPS2")

^SCR("LEVSPR","P",5,"OUTPUT")

^SCR("LEVSPR","P",5,"TYP")
D
^SCR("LEVSPR","P",10,"CRD")
2,33,T,5,0
^SCR("LEVSPR","P",10,"HELP")

^SCR("LEVSPR","P",10,"LMAX")
5
^SCR("LEVSPR","P",10,"MUMPS1")

^SCR("LEVSPR","P",10,"MUMPS2")

^SCR("LEVSPR","P",10,"OUTPUT")

^SCR("LEVSPR","P",10,"TYP")
T
^SCR("LEVSPR","P","NAME","TIM")
10
^SCR("LEVSPR","P","NAME","TRH")
5
^SCR("LEVSPR","P","NM",5)
TRH
^SCR("LEVSPR","P","NM",10)
TIM
^SCR("LEVSPRB")
H
^SCR("LEVSPRB",1)
                   # migezt cx`ilia zepgley zniyx #                            
^SCR("LEVSPRB",2)
                                 {10  : dry  {05     } : jix`z                 
^SCR("LEVSPRB",3)
                                                                             1$
^SCR("LEVSPRB",4)
         : F9-xebql : melyzl : wgyn onf :dlgzd zry: ogley xe`z :ogley 'qn:     
^SCR("LEVSPRB",5)
                                                                               
^SCR("LEVSPRB",6)
                                                                               
^SCR("LEVSPRB",7)
                                                                               
^SCR("LEVSPRB",8)
                                                                               
^SCR("LEVSPRB",9)
                                                                               
^SCR("LEVSPRB",10)
                                                                               
^SCR("LEVSPRB",11)
                                                                               
^SCR("LEVSPRB",12)
                                                                               
^SCR("LEVSPRB",13)
                                                                               
^SCR("LEVSPRB",14)
                                                                               
^SCR("LEVSPRB",15)
                                                                               
^SCR("LEVSPRB",16)
                                                                               
^SCR("LEVSPRB",17)
                                                                               
^SCR("LEVSPRB",18)
                                                                               
^SCR("LEVSPRB",19)
                                                                               
^SCR("LEVSPRB",20)
                                                                               
^SCR("LEVSPRB",21)
  $1                                                                           
^SCR("LEVSPRB",22)
                                                                               
^SCR("LEVSPRB","A",1)
�‰‡…š”ƒ˜€‰Œ‰�š…�‡Œ…™šŽ‰™˜
^SCR("LEVSPRB","A",2)
:„’™:Š‰˜€š
^SCR("LEVSPRB","A",3)

^SCR("LEVSPRB","A",4)
F9-˜…‚‘Œ�…Œ™šŒ—‡™Ž�Ž†„Œ‡š„š’™�‡Œ…™˜…€š�‡Œ…™'‘Ž
^SCR("LEVSPRB","A",5)
---------------------------------------------------------------
^SCR("LEVSPRB","A",6)

^SCR("LEVSPRB","A",7)

^SCR("LEVSPRB","A",8)

^SCR("LEVSPRB","A",9)

^SCR("LEVSPRB","A",10)

^SCR("LEVSPRB","A",11)

^SCR("LEVSPRB","A",12)

^SCR("LEVSPRB","A",13)

^SCR("LEVSPRB","A",14)

^SCR("LEVSPRB","A",15)

^SCR("LEVSPRB","A",16)

^SCR("LEVSPRB","A",17)

^SCR("LEVSPRB","A",18)

^SCR("LEVSPRB","A",19)

^SCR("LEVSPRB","A",20)

^SCR("LEVSPRB","A",21)

^SCR("LEVSPRB","A",22)

^SCR("LEVSPRB","AV",1)
ohju,psrthkhc,ubjkua,nhar
^SCR("LEVSPRB","AV",2)
:vga:lhrt,
^SCR("LEVSPRB","AV",3)

^SCR("LEVSPRB","AV",4)
F9-rudxkouka,kejaninzvkj,v,gaijkuarut,ijkuawxn
^SCR("LEVSPRB","AV",5)
---------------------------------------------------------------
^SCR("LEVSPRB","AV",6)

^SCR("LEVSPRB","AV",7)

^SCR("LEVSPRB","AV",8)

^SCR("LEVSPRB","AV",9)

^SCR("LEVSPRB","AV",10)

^SCR("LEVSPRB","AV",11)

^SCR("LEVSPRB","AV",12)

^SCR("LEVSPRB","AV",13)

^SCR("LEVSPRB","AV",14)

^SCR("LEVSPRB","AV",15)

^SCR("LEVSPRB","AV",16)

^SCR("LEVSPRB","AV",17)

^SCR("LEVSPRB","AV",18)

^SCR("LEVSPRB","AV",19)

^SCR("LEVSPRB","AV",20)

^SCR("LEVSPRB","AV",21)

^SCR("LEVSPRB","AV",22)

^SCR("LEVSPRB","G",1,"CRD")
5,73,E,5,0
^SCR("LEVSPRB","G",1,"HELP")

^SCR("LEVSPRB","G",1,"LMAX")
9
^SCR("LEVSPRB","G",1,"MUMPS1")

^SCR("LEVSPRB","G",1,"MUMPS2")

^SCR("LEVSPRB","G",1,"OUTPUT")

^SCR("LEVSPRB","G",1,"SHEM")
ogley 'qn
^SCR("LEVSPRB","G",1,"TYP")
E
^SCR("LEVSPRB","G",2,"CRD")
5,63,H,12,0
^SCR("LEVSPRB","G",2,"HELP")

^SCR("LEVSPRB","G",2,"LMAX")
12
^SCR("LEVSPRB","G",2,"MUMPS1")

^SCR("LEVSPRB","G",2,"MUMPS2")

^SCR("LEVSPRB","G",2,"OUTPUT")

^SCR("LEVSPRB","G",2,"SHEM")
 ogley xe`z 
^SCR("LEVSPRB","G",2,"TYP")
H
^SCR("LEVSPRB","G",3,"CRD")
5,50,T,5,0
^SCR("LEVSPRB","G",3,"HELP")

^SCR("LEVSPRB","G",3,"LMAX")
9
^SCR("LEVSPRB","G",3,"MUMPS1")

^SCR("LEVSPRB","G",3,"MUMPS2")

^SCR("LEVSPRB","G",3,"OUTPUT")

^SCR("LEVSPRB","G",3,"SHEM")
dlgzd zry
^SCR("LEVSPRB","G",3,"TYP")
T
^SCR("LEVSPRB","G",4,"CRD")
5,40,T,5,0
^SCR("LEVSPRB","G",4,"HELP")

^SCR("LEVSPRB","G",4,"LMAX")
10
^SCR("LEVSPRB","G",4,"MUMPS1")

^SCR("LEVSPRB","G",4,"MUMPS2")

^SCR("LEVSPRB","G",4,"OUTPUT")

^SCR("LEVSPRB","G",4,"SHEM")
 wgyn onf 
^SCR("LEVSPRB","G",4,"TYP")
T
^SCR("LEVSPRB","G",5,"CRD")
5,29,N,8,2
^SCR("LEVSPRB","G",5,"HELP")

^SCR("LEVSPRB","G",5,"LMAX")
8
^SCR("LEVSPRB","G",5,"MUMPS1")

^SCR("LEVSPRB","G",5,"MUMPS2")

^SCR("LEVSPRB","G",5,"OUTPUT")

^SCR("LEVSPRB","G",5,"SHEM")
 melyzl 
^SCR("LEVSPRB","G",5,"TYP")
N
^SCR("LEVSPRB","G",6,"CRD")
5,20,E,1,0
^SCR("LEVSPRB","G",6,"HELP")

^SCR("LEVSPRB","G",6,"LMAX")
10
^SCR("LEVSPRB","G",6,"MUMPS1")

^SCR("LEVSPRB","G",6,"MUMPS2")
D SGIRA^LEVSPR
^SCR("LEVSPRB","G",6,"SHEM")
 F9-xebql 
^SCR("LEVSPRB","G",6,"TYP")
E
^SCR("LEVSPRB","G","DEL")

^SCR("LEVSPRB","G","MAX")
1
^SCR("LEVSPRB","G","NAME","OVED")
1
^SCR("LEVSPRB","G","NAME","OVED1")
2
^SCR("LEVSPRB","G","NAME","SGIRA")
6
^SCR("LEVSPRB","G","NAME","SHAA")
3
^SCR("LEVSPRB","G","NAME","TSHB")
5
^SCR("LEVSPRB","G","NAME","ZMAN")
4
^SCR("LEVSPRB","G","NM",1)
OVED
^SCR("LEVSPRB","G","NM",2)
OVED1
^SCR("LEVSPRB","G","NM",3)
SHAA
^SCR("LEVSPRB","G","NM",4)
ZMAN
^SCR("LEVSPRB","G","NM",5)
TSHB
^SCR("LEVSPRB","G","NM",6)
SGIRA
^SCR("LEVSPRB","G","RB")
4,3,22,79
^SCR("LEVSPRB","G","REF")
^TEMPS($P
^SCR("LEVSPRB","G","RZD")
\
^SCR("LEVSPRB","G","STEP")
1
^SCR("LEVSPRB","G","STG")
         : F9-xebql : melyzl : wgyn onf :dlgzd zry: ogley xe`z :ogley 'qn:     
^SCR("LEVSPRB","G","VG")
6
^SCR("LEVSPRB","NAME")

^SCR("LEVSPRB","P",5,"CRD")
2,45,D,8,0
^SCR("LEVSPRB","P",5,"HELP")

^SCR("LEVSPRB","P",5,"LMAX")
8
^SCR("LEVSPRB","P",5,"MUMPS1")

^SCR("LEVSPRB","P",5,"MUMPS2")

^SCR("LEVSPRB","P",5,"OUTPUT")

^SCR("LEVSPRB","P",5,"TYP")
D
^SCR("LEVSPRB","P",10,"CRD")
2,33,T,5,0
^SCR("LEVSPRB","P",10,"HELP")

^SCR("LEVSPRB","P",10,"LMAX")
5
^SCR("LEVSPRB","P",10,"MUMPS1")

^SCR("LEVSPRB","P",10,"MUMPS2")

^SCR("LEVSPRB","P",10,"OUTPUT")

^SCR("LEVSPRB","P",10,"TYP")
T
^SCR("LEVSPRB","P","NAME","TIM")
10
^SCR("LEVSPRB","P","NAME","TRH")
5
^SCR("LEVSPRB","P","NM",5)
TRH
^SCR("LEVSPRB","P","NM",10)
TIM
^SCR("LEVTB")
H
^SCR("LEVTB",1)
                                                                               
^SCR("LEVTB",2)
                                                                           1$  
^SCR("LEVTB",3)
     : mitih :'n beq :     dveaw my    :dveaw:     caer my     :caer 'qn:      
^SCR("LEVTB",4)
                                                                               
^SCR("LEVTB",5)
                                                                               
^SCR("LEVTB",6)
                                                                               
^SCR("LEVTB",7)
                                                                               
^SCR("LEVTB",8)
                                                                               
^SCR("LEVTB",9)
                                                                               
^SCR("LEVTB",10)
                                                                               
^SCR("LEVTB",11)
                                                                               
^SCR("LEVTB",12)
                                                                               
^SCR("LEVTB",13)
                                                                               
^SCR("LEVTB",14)
                                                                               
^SCR("LEVTB",15)
                                                                               
^SCR("LEVTB",16)
                                                                               
^SCR("LEVTB",17)
                                                                               
^SCR("LEVTB",18)
                                                                               
^SCR("LEVTB",19)
                                                                               
^SCR("LEVTB",20)
                                                                               
^SCR("LEVTB",21)
  $1                                                                           
^SCR("LEVTB","A",1)

^SCR("LEVTB","A",2)

^SCR("LEVTB","A",3)
�‰”‰ˆ'Ž‚…‘„–…�—�™„–…�—ƒ�…’�™ƒ�…’'‘Ž
^SCR("LEVTB","A",4)
-------------------------------------------------------------
^SCR("LEVTB","A",5)

^SCR("LEVTB","A",6)

^SCR("LEVTB","A",7)

^SCR("LEVTB","A",8)

^SCR("LEVTB","A",9)

^SCR("LEVTB","A",10)

^SCR("LEVTB","A",11)

^SCR("LEVTB","A",12)

^SCR("LEVTB","A",13)

^SCR("LEVTB","A",14)

^SCR("LEVTB","A",15)

^SCR("LEVTB","A",16)

^SCR("LEVTB","A",17)

^SCR("LEVTB","A",18)

^SCR("LEVTB","A",19)

^SCR("LEVTB","A",20)

^SCR("LEVTB","A",21)

^SCR("LEVTB","AV",1)

^SCR("LEVTB","AV",2)

^SCR("LEVTB","AV",3)
ohphywnduxvmuceoavmucescugoascugwxn
^SCR("LEVTB","AV",4)
-------------------------------------------------------------
^SCR("LEVTB","AV",5)

^SCR("LEVTB","AV",6)

^SCR("LEVTB","AV",7)

^SCR("LEVTB","AV",8)

^SCR("LEVTB","AV",9)

^SCR("LEVTB","AV",10)

^SCR("LEVTB","AV",11)

^SCR("LEVTB","AV",12)

^SCR("LEVTB","AV",13)

^SCR("LEVTB","AV",14)

^SCR("LEVTB","AV",15)

^SCR("LEVTB","AV",16)

^SCR("LEVTB","AV",17)

^SCR("LEVTB","AV",18)

^SCR("LEVTB","AV",19)

^SCR("LEVTB","AV",20)

^SCR("LEVTB","AV",21)

^SCR("LEVTB","G",1,"CRD")
4,72,E,5.,0
^SCR("LEVTB","G",1,"HELP")

^SCR("LEVTB","G",1,"LMAX")
8
^SCR("LEVTB","G",1,"MUMPS1")

^SCR("LEVTB","G",1,"MUMPS2")

^SCR("LEVTB","G",1,"OUTPUT")

^SCR("LEVTB","G",1,"SHEM")
caer 'qn
^SCR("LEVTB","G",1,"TYP")
E
^SCR("LEVTB","G",2,"CRD")
4,63,H,17,0
^SCR("LEVTB","G",2,"HELP")

^SCR("LEVTB","G",2,"LMAX")
17
^SCR("LEVTB","G",2,"MUMPS1")

^SCR("LEVTB","G",2,"MUMPS2")

^SCR("LEVTB","G",2,"OUTPUT")

^SCR("LEVTB","G",2,"SHEM")
     caer my     
^SCR("LEVTB","G",2,"TYP")
H
^SCR("LEVTB","G",3,"CHECK")
Y
^SCR("LEVTB","G",3,"CRD")
4,45,N,5,0
^SCR("LEVTB","G",3,"CREAT")

^SCR("LEVTB","G",3,"FNC")

^SCR("LEVTB","G",3,"GLOB")
LEVKVZ
^SCR("LEVTB","G",3,"HELP")

^SCR("LEVTB","G",3,"LMAX")
5
^SCR("LEVTB","G",3,"MUMPS1")

^SCR("LEVTB","G",3,"MUMPS2")

^SCR("LEVTB","G",3,"NLN")
20
^SCR("LEVTB","G",3,"NS")
zeveaw zlah
^SCR("LEVTB","G",3,"RZD")
\
^SCR("LEVTB","G",3,"SHEM")
dveaw
^SCR("LEVTB","G",3,"TOPB")
8
^SCR("LEVTB","G",3,"TYP")
N
^SCR("LEVTB","G",3,"VRB")
KVZ1
^SCR("LEVTB","G",4,"CRD")
4,39,H,17,0
^SCR("LEVTB","G",4,"HELP")

^SCR("LEVTB","G",4,"LMAX")
17
^SCR("LEVTB","G",4,"MUMPS1")

^SCR("LEVTB","G",4,"MUMPS2")

^SCR("LEVTB","G",4,"OUTPUT")

^SCR("LEVTB","G",4,"SHEM")
     dveaw my    
^SCR("LEVTB","G",4,"TYP")
H
^SCR("LEVTB","G",5,"CRD")
4,21,N,7,0
^SCR("LEVTB","G",5,"HELP")
5- dxyn ,4- mini itl, 3- zxnyn zery ,2- zetqep+qiqa zery ,1- zery itl
^SCR("LEVTB","G",5,"LMAX")
7
^SCR("LEVTB","G",5,"MUMPS1")

^SCR("LEVTB","G",5,"MUMPS2")

^SCR("LEVTB","G",5,"SHEM")
'n beq 
^SCR("LEVTB","G",5,"TYP")
N
^SCR("LEVTB","G",6,"CRD")
4,13,B,1,0
^SCR("LEVTB","G",6,"HELP")
0 - zxg` , 1 - mitih itl zxekyn lawn caer mr 
^SCR("LEVTB","G",6,"LMAX")
7
^SCR("LEVTB","G",6,"MUMPS1")

^SCR("LEVTB","G",6,"MUMPS2")
I MTIP'=0,MTIP'=1,MTIP'="" S %SC("ER")=1
^SCR("LEVTB","G",6,"SHEM")
 mitih 
^SCR("LEVTB","G",6,"TYP")
B
^SCR("LEVTB","G","DEL")

^SCR("LEVTB","G","MAX")
4
^SCR("LEVTB","G","NAME","KVZ")
3
^SCR("LEVTB","G","NAME","KVZ1")
4
^SCR("LEVTB","G","NAME","MTIP")
6
^SCR("LEVTB","G","NAME","OVED")
1
^SCR("LEVTB","G","NAME","OVED1")
2
^SCR("LEVTB","G","NAME","SUGMS")
5
^SCR("LEVTB","G","NM",1)
OVED
^SCR("LEVTB","G","NM",2)
OVED1
^SCR("LEVTB","G","NM",3)
KVZ
^SCR("LEVTB","G","NM",4)
KVZ1
^SCR("LEVTB","G","NM",5)
SUGMS
^SCR("LEVTB","G","NM",6)
MTIP
^SCR("LEVTB","G","RB")
3,3,22,77
^SCR("LEVTB","G","REF")
^TEMP($P
^SCR("LEVTB","G","RZD")
\
^SCR("LEVTB","G","STEP")
1
^SCR("LEVTB","G","STG")
     : mitih :'n beq :     dveaw my    :dveaw:     caer my     :caer 'qn:      
^SCR("LEVTB","G","VG")
5
^SCR("LEVTB","NAME")
'n beq - zeveaw - micaer zlah
^SCR("LEVTIK")
H
^SCR("LEVTIK",1)
                                                                               
^SCR("LEVTIK",2)
                         {                    06} {05   }: caer 'qn            
^SCR("LEVTIK",3)
                      {15       }: jix`z cr    {10      }:   jix`zn            
^SCR("LEVTIK",4)
                                                                          1]   
^SCR("LEVTIK",5)
         |            |          d`ivi       |          dqipk                  
^SCR("LEVTIK",6)
         [1                                                               1$   
^SCR("LEVTIK",7)
           : dcear onf:  dry  : mei :  jix`z :   dry  : mei :  jix`z  :        
^SCR("LEVTIK",8)
                                                                               
^SCR("LEVTIK",9)
                                                                               
^SCR("LEVTIK",10)
                                                                               
^SCR("LEVTIK",11)
                                                                               
^SCR("LEVTIK",12)
                                                                               
^SCR("LEVTIK",13)
                                                                               
^SCR("LEVTIK",14)
                                                                               
^SCR("LEVTIK",15)
                                                                               
^SCR("LEVTIK",16)
                                                                               
^SCR("LEVTIK",17)
                                                                               
^SCR("LEVTIK",18)
                                                                               
^SCR("LEVTIK",19)
                                                                               
^SCR("LEVTIK",20)
         $1                                                                    
^SCR("LEVTIK",21)
                  {35   } dcear zery k"dq        {30  } dcear ini              
^SCR("LEVTIK",22)
                                                                               
^SCR("LEVTIK","A",1)

^SCR("LEVTIK","A",2)
:ƒ�…’'‘Ž
^SCR("LEVTIK","A",3)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("LEVTIK","A",4)

^SCR("LEVTIK","A",5)
||„€‰–‰|„‘‰�‹
^SCR("LEVTIK","A",6)

^SCR("LEVTIK","A",7)
„ƒ…�’�Ž†„’™�…‰Š‰˜€š„’™�…‰Š‰˜€š
^SCR("LEVTIK","A",8)
----------------------------------------------------
^SCR("LEVTIK","A",9)

^SCR("LEVTIK","A",10)

^SCR("LEVTIK","A",11)

^SCR("LEVTIK","A",12)

^SCR("LEVTIK","A",13)

^SCR("LEVTIK","A",14)

^SCR("LEVTIK","A",15)

^SCR("LEVTIK","A",16)

^SCR("LEVTIK","A",17)

^SCR("LEVTIK","A",18)

^SCR("LEVTIK","A",19)

^SCR("LEVTIK","A",20)

^SCR("LEVTIK","A",21)
„ƒ…�’š…’™‹"„‘„ƒ…�’‰Ž‰
^SCR("LEVTIK","A",22)

^SCR("LEVTIK","AV",1)

^SCR("LEVTIK","AV",2)
:scugwxn
^SCR("LEVTIK","AV",3)
:lhrt,sg:lhrt,n
^SCR("LEVTIK","AV",4)

^SCR("LEVTIK","AV",5)
||vthmh|vxhbf
^SCR("LEVTIK","AV",6)

^SCR("LEVTIK","AV",7)
vsucginzvgaouhlhrt,vgaouhlhrt,
^SCR("LEVTIK","AV",8)
----------------------------------------------------
^SCR("LEVTIK","AV",9)

^SCR("LEVTIK","AV",10)

^SCR("LEVTIK","AV",11)

^SCR("LEVTIK","AV",12)

^SCR("LEVTIK","AV",13)

^SCR("LEVTIK","AV",14)

^SCR("LEVTIK","AV",15)

^SCR("LEVTIK","AV",16)

^SCR("LEVTIK","AV",17)

^SCR("LEVTIK","AV",18)

^SCR("LEVTIK","AV",19)

^SCR("LEVTIK","AV",20)

^SCR("LEVTIK","AV",21)
vsucg,ugaf"vxvsucghnh
^SCR("LEVTIK","AV",22)

^SCR("LEVTIK","G",1,"CRD")
8,70,D,8,0
^SCR("LEVTIK","G",1,"HELP")

^SCR("LEVTIK","G",1,"LMAX")
9
^SCR("LEVTIK","G",1,"MUMPS1")

^SCR("LEVTIK","G",1,"MUMPS2")
D DATIN^LEVTIK
^SCR("LEVTIK","G",1,"SHEM")
  jix`z  
^SCR("LEVTIK","G",1,"TYP")
D
^SCR("LEVTIK","G",2,"CRD")
8,60,H,1,0
^SCR("LEVTIK","G",2,"HELP")

^SCR("LEVTIK","G",2,"LMAX")
5
^SCR("LEVTIK","G",2,"MUMPS1")

^SCR("LEVTIK","G",2,"MUMPS2")

^SCR("LEVTIK","G",2,"OUTPUT")

^SCR("LEVTIK","G",2,"SHEM")
 mei 
^SCR("LEVTIK","G",2,"TYP")
H
^SCR("LEVTIK","G",3,"CRD")
8,54,T,5,0
^SCR("LEVTIK","G",3,"HELP")

^SCR("LEVTIK","G",3,"LMAX")
8
^SCR("LEVTIK","G",3,"MUMPS1")

^SCR("LEVTIK","G",3,"MUMPS2")

^SCR("LEVTIK","G",3,"SHEM")
   dry  
^SCR("LEVTIK","G",3,"TYP")
T
^SCR("LEVTIK","G",4,"CRD")
8,45,D,8,0
^SCR("LEVTIK","G",4,"HELP")

^SCR("LEVTIK","G",4,"LMAX")
8
^SCR("LEVTIK","G",4,"MUMPS1")
S:'$G(DATOU) DATOU=DATIN
^SCR("LEVTIK","G",4,"MUMPS2")
D DATOU^LEVTIK
^SCR("LEVTIK","G",4,"SHEM")
  jix`z 
^SCR("LEVTIK","G",4,"TYP")
D
^SCR("LEVTIK","G",5,"CRD")
8,36,H,1,0
^SCR("LEVTIK","G",5,"HELP")

^SCR("LEVTIK","G",5,"LMAX")
5
^SCR("LEVTIK","G",5,"MUMPS1")

^SCR("LEVTIK","G",5,"MUMPS2")

^SCR("LEVTIK","G",5,"OUTPUT")

^SCR("LEVTIK","G",5,"SHEM")
 mei 
^SCR("LEVTIK","G",5,"TYP")
H
^SCR("LEVTIK","G",6,"CRD")
8,30,T,5,0
^SCR("LEVTIK","G",6,"HELP")

^SCR("LEVTIK","G",6,"LMAX")
7
^SCR("LEVTIK","G",6,"MUMPS1")

^SCR("LEVTIK","G",6,"MUMPS2")
D SHAOU^LEVTIK
^SCR("LEVTIK","G",6,"SHEM")
  dry  
^SCR("LEVTIK","G",6,"TYP")
T
^SCR("LEVTIK","G",7,"CRD")
8,22,H,10,0
^SCR("LEVTIK","G",7,"HELP")

^SCR("LEVTIK","G",7,"LMAX")
10
^SCR("LEVTIK","G",7,"MUMPS1")

^SCR("LEVTIK","G",7,"MUMPS2")

^SCR("LEVTIK","G",7,"OUTPUT")

^SCR("LEVTIK","G",7,"SHEM")
 dcear onf
^SCR("LEVTIK","G",7,"TYP")
H
^SCR("LEVTIK","G","DEL")

^SCR("LEVTIK","G","MAX")
99999
^SCR("LEVTIK","G","NAME","DATIN")
1
^SCR("LEVTIK","G","NAME","DATOU")
4
^SCR("LEVTIK","G","NAME","JOMIN")
2
^SCR("LEVTIK","G","NAME","JOMOU")
5
^SCR("LEVTIK","G","NAME","SHAIN")
3
^SCR("LEVTIK","G","NAME","SHAOU")
6
^SCR("LEVTIK","G","NAME","ZAV")
7
^SCR("LEVTIK","G","NM",1)
DATIN
^SCR("LEVTIK","G","NM",2)
JOMIN
^SCR("LEVTIK","G","NM",3)
SHAIN
^SCR("LEVTIK","G","NM",4)
DATOU
^SCR("LEVTIK","G","NM",5)
JOMOU
^SCR("LEVTIK","G","NM",6)
SHAOU
^SCR("LEVTIK","G","NM",7)
ZAV
^SCR("LEVTIK","G","RB")
7,10,21,76
^SCR("LEVTIK","G","REF")
^TEMP($P
^SCR("LEVTIK","G","RZD")
\
^SCR("LEVTIK","G","STEP")
1
^SCR("LEVTIK","G","STG")
           : dcear onf:  dry  : mei :  jix`z :   dry  : mei :  jix`z  :        
^SCR("LEVTIK","G","VG")
9
^SCR("LEVTIK","NAME")
zegkep oery
^SCR("LEVTIK","P",5,"CHECK")
Y
^SCR("LEVTIK","P",5,"CRD")
2,50,E,5.,0
^SCR("LEVTIK","P",5,"CREAT")

^SCR("LEVTIK","P",5,"FNC")

^SCR("LEVTIK","P",5,"GLOB")
NAME
^SCR("LEVTIK","P",5,"HELP")

^SCR("LEVTIK","P",5,"LMAX")
6
^SCR("LEVTIK","P",5,"MUMPS1")

^SCR("LEVTIK","P",5,"MUMPS2")
S OVED1=$G(^NAME(OVED,1))
^SCR("LEVTIK","P",5,"MUST")

^SCR("LEVTIK","P",5,"NLN")
20
^SCR("LEVTIK","P",5,"NS")
H
^SCR("LEVTIK","P",5,"RZD")
\
^SCR("LEVTIK","P",5,"TOPB")
8
^SCR("LEVTIK","P",5,"TYP")
E
^SCR("LEVTIK","P",5,"VRB")
OVED1
^SCR("LEVTIK","P",6,"CRD")
2,49,H,23
^SCR("LEVTIK","P",6,"HELP")

^SCR("LEVTIK","P",6,"LMAX")
23
^SCR("LEVTIK","P",6,"MUMPS1")

^SCR("LEVTIK","P",6,"MUMPS2")

^SCR("LEVTIK","P",6,"OUTPUT")

^SCR("LEVTIK","P",6,"TYP")
H
^SCR("LEVTIK","P",10,"CRD")
3,47,D,8,0
^SCR("LEVTIK","P",10,"HELP")

^SCR("LEVTIK","P",10,"LMAX")
9
^SCR("LEVTIK","P",10,"MUMPS1")
S:'$G(DAT11) DAT11=$$^%L1DC($H,1)
^SCR("LEVTIK","P",10,"MUMPS2")

^SCR("LEVTIK","P",10,"TYP")
D
^SCR("LEVTIK","P",15,"CRD")
3,22,D,8,0
^SCR("LEVTIK","P",15,"HELP")

^SCR("LEVTIK","P",15,"LMAX")
10
^SCR("LEVTIK","P",15,"MUMPS1")
S:'$G(DAT12) DAT12=$$^%L1DC($H,1)
^SCR("LEVTIK","P",15,"MUMPS2")
D BODED^LEVTIK
^SCR("LEVTIK","P",15,"TYP")
D
^SCR("LEVTIK","P",30,"CRD")
21,49,N,5,0
^SCR("LEVTIK","P",30,"HELP")

^SCR("LEVTIK","P",30,"LMAX")
5
^SCR("LEVTIK","P",30,"MUMPS1")

^SCR("LEVTIK","P",30,"MUMPS2")

^SCR("LEVTIK","P",30,"OUTPUT")

^SCR("LEVTIK","P",30,"TYP")
N
^SCR("LEVTIK","P",35,"CRD")
21,18,T,5,0
^SCR("LEVTIK","P",35,"HELP")

^SCR("LEVTIK","P",35,"LMAX")
6
^SCR("LEVTIK","P",35,"MUMPS1")

^SCR("LEVTIK","P",35,"MUMPS2")

^SCR("LEVTIK","P",35,"OUTPUT")

^SCR("LEVTIK","P",35,"TYP")
T
^SCR("LEVTIK","P","NAME","DAT11")
10
^SCR("LEVTIK","P","NAME","DAT12")
15
^SCR("LEVTIK","P","NAME","JOMAV")
30
^SCR("LEVTIK","P","NAME","OVED")
5
^SCR("LEVTIK","P","NAME","OVED1")
6
^SCR("LEVTIK","P","NAME","ZMANAV")
35
^SCR("LEVTIK","P","NM",5)
OVED
^SCR("LEVTIK","P","NM",6)
OVED1
^SCR("LEVTIK","P","NM",10)
DAT11
^SCR("LEVTIK","P","NM",15)
DAT12
^SCR("LEVTIK","P","NM",30)
JOMAV
^SCR("LEVTIK","P","NM",35)
ZMANAV
^SCR("LEVTIK","P","RB",1)
5,10,7,76
^SCR("LKHHIP")
H
^SCR("LKHHIP",1)
                                    # zegewl yetig #                           
^SCR("LKHHIP",2)
                                                                               
^SCR("LKHHIP",3)
                                                                             1]
^SCR("LKHHIP",4)
                            {                     03} {02    }:       dcy cew  
^SCR("LKHHIP",5)
                      {07: yetig beq {                    05} :       gewl my  
^SCR("LKHHIP",6)
    {           26} {25 }:  gewl beq cr   {          21} {20 }:     gewl beqn  
^SCR("LKHHIP",7)
             {29        }:      gewl cr           {28        }:         gewln  
^SCR("LKHHIP",8)
       {              35}: xir   {                         30}:         zaezk  
^SCR("LKHHIP",9)
                                      { 42} : avn      {40   }:         cewin  
^SCR("LKHHIP",10)
                   {50      }: jix`z cr      {45      }: oecrenl dqipk jix`zn  
^SCR("LKHHIP",11)
                        {60     }:  dcil jix`z cr    {55     }:   dcil jix`zn  
^SCR("LKHHIP",12)
                        {63     }: dgizt jix`z cr    {62     }:  dgizt jix`zn  
^SCR("LKHHIP",13)
                                  {70:i`xy`l xey`          {65:     wiyl xey`  
^SCR("LKHHIP",14)
                           { 73}: oinfnd my le`yl        { 72}:  dzknq` le`yl  
^SCR("LKHHIP",15)
                              {80        }  cr     {75       }: -n i`xy` lceb  
^SCR("LKHHIP",16)
                                                                               
^SCR("LKHHIP",17)
                                   {                86} {85 : dcrqnl ribd ji`  
^SCR("LKHHIP",18)
                                   {                91} {90 :     oiipern dna  
^SCR("LKHHIP",19)
                                                                               
^SCR("LKHHIP",20)
 [1                                                                            
^SCR("LKHHIP","A",1)
š…‡…—Œ™…”‰‡
^SCR("LKHHIP","A",2)

^SCR("LKHHIP","A",3)

^SCR("LKHHIP","A",4)
:„ƒ™ƒ…—
^SCR("LKHHIP","A",5)
:™…”‰‡‚…‘:‡…—Œ�™
^SCR("LKHHIP","A",6)
:‡…—Œ‚…‘ƒ’:‡…—Œ‚…‘Ž
^SCR("LKHHIP","A",7)
:‡…—Œƒ’:‡…—ŒŽ
^SCR("LKHHIP","A",8)
:˜‰’:š�…š‹
^SCR("LKHHIP","A",9)
:�–Ž:ƒ…—‰Ž
^SCR("LKHHIP","A",10)
:Š‰˜€šƒ’:�…ƒ’…ŽŒ„‘‰�‹Š‰˜€šŽ
^SCR("LKHHIP","A",11)
:„ƒ‰ŒŠ‰˜€šƒ’:„ƒ‰ŒŠ‰˜€šŽ
^SCR("LKHHIP","A",12)
:„‡‰š”Š‰˜€šƒ’:„‡‰š”Š‰˜€šŽ
^SCR("LKHHIP","A",13)
:‰€˜™€Œ˜…™€:—‰™Œ˜…™€
^SCR("LKHHIP","A",14)
:�‰Ž†Ž„�™Œ…€™Œ:„š‹Ž‘€Œ…€™Œ
^SCR("LKHHIP","A",15)
ƒ’:-Ž‰€˜™€Œƒ…‚
^SCR("LKHHIP","A",16)

^SCR("LKHHIP","A",17)
:„ƒ’‘ŽŒ’‰‚„Š‰€
^SCR("LKHHIP","A",18)
:�‰‰�…’Ž„Ž�
^SCR("LKHHIP","A",19)

^SCR("LKHHIP","A",20)

^SCR("LKHHIP","AV",1)
,ujuekauphj
^SCR("LKHHIP","AV",2)

^SCR("LKHHIP","AV",3)

^SCR("LKHHIP","AV",4)
:vsasue
^SCR("LKHHIP","AV",5)
:auphjdux:juekoa
^SCR("LKHHIP","AV",6)
:juekduxsg:juekduxn
^SCR("LKHHIP","AV",7)
:jueksg:juekn
^SCR("LKHHIP","AV",8)
:rhg:,cu,f
^SCR("LKHHIP","AV",9)
:cmn:suehn
^SCR("LKHHIP","AV",10)
:lhrt,sg:iusgunkvxhbflhrt,n
^SCR("LKHHIP","AV",11)
:vshklhrt,sg:vshklhrt,n
^SCR("LKHHIP","AV",12)
:vjh,plhrt,sg:vjh,plhrt,n
^SCR("LKHHIP","AV",13)
:htratkruat:ehakruat
^SCR("LKHHIP","AV",14)
:ihnznvoakutak:v,fnxtkutak
^SCR("LKHHIP","AV",15)
sg:-nhtratksud
^SCR("LKHHIP","AV",16)

^SCR("LKHHIP","AV",17)
:vsgxnkghdvlht
^SCR("LKHHIP","AV",18)
:ihhbugnvnc
^SCR("LKHHIP","AV",19)

^SCR("LKHHIP","AV",20)

^SCR("LKHHIP","NAME")
gewl yetig
^SCR("LKHHIP","P",2,"CRD")
4,54,E,7,0
^SCR("LKHHIP","P",2,"HELP")

^SCR("LKHHIP","P",2,"LMAX")
7
^SCR("LKHHIP","P",2,"MUMPS1")

^SCR("LKHHIP","P",2,"MUMPS2")
D FLD^LKHHIP
^SCR("LKHHIP","P",2,"TYP")
E
^SCR("LKHHIP","P",3,"CRD")
4,53,H,24
^SCR("LKHHIP","P",3,"HELP")

^SCR("LKHHIP","P",3,"LMAX")
24
^SCR("LKHHIP","P",3,"MUMPS1")

^SCR("LKHHIP","P",3,"MUMPS2")

^SCR("LKHHIP","P",3,"OUTPUT")

^SCR("LKHHIP","P",3,"TYP")
H
^SCR("LKHHIP","P",5,"CRD")
5,61,H,23
^SCR("LKHHIP","P",5,"HELP")

^SCR("LKHHIP","P",5,"LMAX")
23
^SCR("LKHHIP","P",5,"MUMPS1")

^SCR("LKHHIP","P",5,"MUMPS2")
K %SCO S PRHIP="" S:'$L(SHEML) %SCO="PRHIP"
^SCR("LKHHIP","P",5,"TYP")
H
^SCR("LKHHIP","P",7,"CRD")
5,22,E,1,0
^SCR("LKHHIP","P",7,"HELP")
4 - ihpet yetig ,3 - milin sqe` ,2 - mewn lka ,1 - dlgzda dlin
^SCR("LKHHIP","P",7,"LMAX")
3
^SCR("LKHHIP","P",7,"MUMPS1")
S:'$G(PRHIP)&$L(SHEML) PRHIP=3
^SCR("LKHHIP","P",7,"MUMPS2")

^SCR("LKHHIP","P",7,"MUST")

^SCR("LKHHIP","P",7,"TYP")
E
^SCR("LKHHIP","P",20,"CRD")
6,57,E,4,0
^SCR("LKHHIP","P",20,"FNC")

^SCR("LKHHIP","P",20,"GLOB")
SUGL
^SCR("LKHHIP","P",20,"HELP")

^SCR("LKHHIP","P",20,"LMAX")
4
^SCR("LKHHIP","P",20,"MUMPS1")

^SCR("LKHHIP","P",20,"MUMPS2")

^SCR("LKHHIP","P",20,"NLN")
20
^SCR("LKHHIP","P",20,"RZD")
\
^SCR("LKHHIP","P",20,"TOPB")
8
^SCR("LKHHIP","P",20,"TYP")
E
^SCR("LKHHIP","P",20,"VRB")
MESUGL1
^SCR("LKHHIP","P",21,"CRD")
6,56,H,13
^SCR("LKHHIP","P",21,"HELP")

^SCR("LKHHIP","P",21,"LMAX")
13
^SCR("LKHHIP","P",21,"MUMPS1")

^SCR("LKHHIP","P",21,"MUMPS2")

^SCR("LKHHIP","P",21,"OUTPUT")

^SCR("LKHHIP","P",21,"TYP")
H
^SCR("LKHHIP","P",25,"CRD")
6,20,E,4,0
^SCR("LKHHIP","P",25,"FNC")

^SCR("LKHHIP","P",25,"GLOB")
SUGL
^SCR("LKHHIP","P",25,"HELP")

^SCR("LKHHIP","P",25,"LMAX")
4
^SCR("LKHHIP","P",25,"MUMPS1")
S:$G(MESUGL)&'$G(ADSUGL) ADSUGL=MESUGL
^SCR("LKHHIP","P",25,"MUMPS2")
I ADSUGL<MESUGL S %SC("ER")=1
^SCR("LKHHIP","P",25,"NLN")
20
^SCR("LKHHIP","P",25,"RZD")
\
^SCR("LKHHIP","P",25,"TOPB")
8
^SCR("LKHHIP","P",25,"TYP")
E
^SCR("LKHHIP","P",25,"VRB")
ADSUGL1
^SCR("LKHHIP","P",26,"CRD")
6,19,H,14
^SCR("LKHHIP","P",26,"HELP")

^SCR("LKHHIP","P",26,"LMAX")
14
^SCR("LKHHIP","P",26,"MUMPS1")

^SCR("LKHHIP","P",26,"MUMPS2")

^SCR("LKHHIP","P",26,"OUTPUT")

^SCR("LKHHIP","P",26,"TYP")
H
^SCR("LKHHIP","P",28,"CRD")
7,50,E,10,0
^SCR("LKHHIP","P",28,"FNC")

^SCR("LKHHIP","P",28,"GLOB")
LKH
^SCR("LKHHIP","P",28,"HELP")

^SCR("LKHHIP","P",28,"LMAX")
11
^SCR("LKHHIP","P",28,"MUMPS1")

^SCR("LKHHIP","P",28,"MUMPS2")

^SCR("LKHHIP","P",28,"NLN")
20
^SCR("LKHHIP","P",28,"RZD")
\
^SCR("LKHHIP","P",28,"TOPB")
8
^SCR("LKHHIP","P",28,"TYP")
E
^SCR("LKHHIP","P",29,"CRD")
7,13,E,10,0
^SCR("LKHHIP","P",29,"FNC")

^SCR("LKHHIP","P",29,"GLOB")
LKH
^SCR("LKHHIP","P",29,"HELP")

^SCR("LKHHIP","P",29,"LMAX")
11
^SCR("LKHHIP","P",29,"MUMPS1")

^SCR("LKHHIP","P",29,"MUMPS2")
I ADLKH<MELKH S %SC("ER")=1
^SCR("LKHHIP","P",29,"NLN")
20
^SCR("LKHHIP","P",29,"RZD")
\
^SCR("LKHHIP","P",29,"TOPB")
8
^SCR("LKHHIP","P",29,"TYP")
E
^SCR("LKHHIP","P",30,"CRD")
8,62,H,28
^SCR("LKHHIP","P",30,"HELP")

^SCR("LKHHIP","P",30,"LMAX")
28
^SCR("LKHHIP","P",30,"MUMPS1")

^SCR("LKHHIP","P",30,"MUMPS2")

^SCR("LKHHIP","P",30,"TYP")
H
^SCR("LKHHIP","P",35,"CRD")
8,25,H,14
^SCR("LKHHIP","P",35,"HELP")

^SCR("LKHHIP","P",35,"LMAX")
17
^SCR("LKHHIP","P",35,"MUMPS1")

^SCR("LKHHIP","P",35,"MUMPS2")

^SCR("LKHHIP","P",35,"TYP")
H
^SCR("LKHHIP","P",40,"CRD")
9,55,E,5,0
^SCR("LKHHIP","P",40,"HELP")

^SCR("LKHHIP","P",40,"LMAX")
6
^SCR("LKHHIP","P",40,"MUMPS1")

^SCR("LKHHIP","P",40,"MUMPS2")

^SCR("LKHHIP","P",40,"TYP")
E
^SCR("LKHHIP","P",42,"CRD")
9,43,H,1
^SCR("LKHHIP","P",42,"HELP")
xebq - q , gezt - t
^SCR("LKHHIP","P",42,"LMAX")
4
^SCR("LKHHIP","P",42,"MUMPS1")
S:$G(MAZAV)="" MAZAV="t"
^SCR("LKHHIP","P",42,"MUMPS2")
I MAZAV'="",MAZAV'="t",MAZAV'="q" S %SC("ER")=1
^SCR("LKHHIP","P",42,"TYP")
H
^SCR("LKHHIP","P",45,"CRD")
10,45,D,8,0
^SCR("LKHHIP","P",45,"HELP")

^SCR("LKHHIP","P",45,"LMAX")
9
^SCR("LKHHIP","P",45,"MUMPS1")

^SCR("LKHHIP","P",45,"MUMPS2")

^SCR("LKHHIP","P",45,"TYP")
D
^SCR("LKHHIP","P",50,"CRD")
10,19,D,8,0
^SCR("LKHHIP","P",50,"HELP")

^SCR("LKHHIP","P",50,"LMAX")
9
^SCR("LKHHIP","P",50,"MUMPS1")

^SCR("LKHHIP","P",50,"MUMPS2")

^SCR("LKHHIP","P",50,"TYP")
D
^SCR("LKHHIP","P",55,"CRD")
11,53,D,8,0
^SCR("LKHHIP","P",55,"HELP")

^SCR("LKHHIP","P",55,"LMAX")
8
^SCR("LKHHIP","P",55,"MUMPS1")

^SCR("LKHHIP","P",55,"MUMPS2")

^SCR("LKHHIP","P",55,"TYP")
D
^SCR("LKHHIP","P",60,"CRD")
11,24,D,8,0
^SCR("LKHHIP","P",60,"HELP")

^SCR("LKHHIP","P",60,"LMAX")
8
^SCR("LKHHIP","P",60,"MUMPS1")

^SCR("LKHHIP","P",60,"MUMPS2")
I $$^%L1DC(ADTRH,3)<$$^%L1DC(METRH,3) S %SC("ER")=1
^SCR("LKHHIP","P",60,"TYP")
D
^SCR("LKHHIP","P",62,"CRD")
12,53,D,8,0
^SCR("LKHHIP","P",62,"HELP")

^SCR("LKHHIP","P",62,"LMAX")
8
^SCR("LKHHIP","P",62,"MUMPS1")

^SCR("LKHHIP","P",62,"MUMPS2")

^SCR("LKHHIP","P",62,"TYP")
D
^SCR("LKHHIP","P",63,"CRD")
12,24,D,8,0
^SCR("LKHHIP","P",63,"HELP")

^SCR("LKHHIP","P",63,"LMAX")
8
^SCR("LKHHIP","P",63,"MUMPS1")

^SCR("LKHHIP","P",63,"MUMPS2")
I $$^%L1DC(ADDATPTH,3)<$$^%L1DC(MEDATPTH,3) S %SC("ER")=1
^SCR("LKHHIP","P",63,"TYP")
D
^SCR("LKHHIP","P",65,"CRD")
13,59,E,1,0
^SCR("LKHHIP","P",65,"HELP")

^SCR("LKHHIP","P",65,"LMAX")
3
^SCR("LKHHIP","P",65,"MUMPS1")

^SCR("LKHHIP","P",65,"MUMPS2")
I $L(ISCH),$$^%L1YN("ISCH")<0 S %SC("ER")=1
^SCR("LKHHIP","P",65,"TYP")
E
^SCR("LKHHIP","P",70,"CRD")
13,34,E,1,0
^SCR("LKHHIP","P",70,"HELP")

^SCR("LKHHIP","P",70,"LMAX")
3
^SCR("LKHHIP","P",70,"MUMPS1")

^SCR("LKHHIP","P",70,"MUMPS2")
I $L(ISAH),$$^%L1YN("ISAH")<0 S %SC("ER")=1
^SCR("LKHHIP","P",70,"TYP")
E
^SCR("LKHHIP","P",72,"CRD")
14,62,H,1
^SCR("LKHHIP","P",72,"HELP")

^SCR("LKHHIP","P",72,"LMAX")
4
^SCR("LKHHIP","P",72,"MUMPS1")

^SCR("LKHHIP","P",72,"MUMPS2")
I ASM'="",$$^%L1YN("ASM")<0 S %SC("ER")=1
^SCR("LKHHIP","P",72,"TYP")
H
^SCR("LKHHIP","P",73,"CRD")
14,32,H,1
^SCR("LKHHIP","P",73,"HELP")

^SCR("LKHHIP","P",73,"LMAX")
4
^SCR("LKHHIP","P",73,"MUMPS1")

^SCR("LKHHIP","P",73,"MUMPS2")
I MZM'="",$$^%L1YN("MZM")<0 S %SC("ER")=1
^SCR("LKHHIP","P",73,"TYP")
H
^SCR("LKHHIP","P",75,"CRD")
15,51,N,10,1
^SCR("LKHHIP","P",75,"HELP")

^SCR("LKHHIP","P",75,"LMAX")
10
^SCR("LKHHIP","P",75,"MUMPS1")

^SCR("LKHHIP","P",75,"MUMPS2")

^SCR("LKHHIP","P",75,"TYP")
N
^SCR("LKHHIP","P",80,"CRD")
15,30,N,10,1
^SCR("LKHHIP","P",80,"HELP")

^SCR("LKHHIP","P",80,"LMAX")
11
^SCR("LKHHIP","P",80,"MUMPS1")

^SCR("LKHHIP","P",80,"MUMPS2")
S:'$G(ADGDCR) ADGDCR=9999999 I ADGDCR<MEGDCR S %SC("ER")=1
^SCR("LKHHIP","P",80,"TYP")
N
^SCR("LKHHIP","P",85,"CRD")
17,56,E,4,0
^SCR("LKHHIP","P",85,"FNC")

^SCR("LKHHIP","P",85,"GLOB")
HAGAA
^SCR("LKHHIP","P",85,"HELP")

^SCR("LKHHIP","P",85,"LMAX")
4
^SCR("LKHHIP","P",85,"MUMPS1")

^SCR("LKHHIP","P",85,"MUMPS2")

^SCR("LKHHIP","P",85,"NLN")
20
^SCR("LKHHIP","P",85,"RZD")
\
^SCR("LKHHIP","P",85,"TOPB")
8
^SCR("LKHHIP","P",85,"TYP")
E
^SCR("LKHHIP","P",85,"VRB")
HG1
^SCR("LKHHIP","P",86,"CRD")
17,55,H,19,0
^SCR("LKHHIP","P",86,"HELP")

^SCR("LKHHIP","P",86,"LMAX")
19
^SCR("LKHHIP","P",86,"MUMPS1")

^SCR("LKHHIP","P",86,"MUMPS2")

^SCR("LKHHIP","P",86,"OUTPUT")

^SCR("LKHHIP","P",86,"TYP")
H
^SCR("LKHHIP","P",90,"CRD")
18,56,E,4,0
^SCR("LKHHIP","P",90,"FNC")

^SCR("LKHHIP","P",90,"GLOB")
INTERES
^SCR("LKHHIP","P",90,"HELP")

^SCR("LKHHIP","P",90,"LMAX")
4
^SCR("LKHHIP","P",90,"MUMPS1")

^SCR("LKHHIP","P",90,"MUMPS2")

^SCR("LKHHIP","P",90,"NLN")
20
^SCR("LKHHIP","P",90,"RZD")
\
^SCR("LKHHIP","P",90,"TOPB")
8
^SCR("LKHHIP","P",90,"TYP")
E
^SCR("LKHHIP","P",90,"VRB")
INT1
^SCR("LKHHIP","P",91,"CRD")
18,55,H,19,0
^SCR("LKHHIP","P",91,"HELP")

^SCR("LKHHIP","P",91,"LMAX")
19
^SCR("LKHHIP","P",91,"MUMPS1")

^SCR("LKHHIP","P",91,"MUMPS2")

^SCR("LKHHIP","P",91,"OUTPUT")

^SCR("LKHHIP","P",91,"TYP")
H
^SCR("LKHHIP","P","NAME","ADDATPTH")
63
^SCR("LKHHIP","P","NAME","ADGDCR")
80
^SCR("LKHHIP","P","NAME","ADLKH")
29
^SCR("LKHHIP","P","NAME","ADSUGL")
25
^SCR("LKHHIP","P","NAME","ADSUGL1")
26
^SCR("LKHHIP","P","NAME","ADTRH")
60
^SCR("LKHHIP","P","NAME","ADTRHML")
50
^SCR("LKHHIP","P","NAME","ASM")
72
^SCR("LKHHIP","P","NAME","FLD")
2
^SCR("LKHHIP","P","NAME","FLD1")
3
^SCR("LKHHIP","P","NAME","HG")
85
^SCR("LKHHIP","P","NAME","HG1")
86
^SCR("LKHHIP","P","NAME","INT")
90
^SCR("LKHHIP","P","NAME","INT1")
91
^SCR("LKHHIP","P","NAME","IR")
35
^SCR("LKHHIP","P","NAME","ISAH")
70
^SCR("LKHHIP","P","NAME","ISCH")
65
^SCR("LKHHIP","P","NAME","KTV")
30
^SCR("LKHHIP","P","NAME","MAZAV")
42
^SCR("LKHHIP","P","NAME","MEDATPTH")
62
^SCR("LKHHIP","P","NAME","MEGDCR")
75
^SCR("LKHHIP","P","NAME","MELKH")
28
^SCR("LKHHIP","P","NAME","MESUGL")
20
^SCR("LKHHIP","P","NAME","MESUGL1")
21
^SCR("LKHHIP","P","NAME","METRH")
55
^SCR("LKHHIP","P","NAME","METRHML")
45
^SCR("LKHHIP","P","NAME","MIKUD")
40
^SCR("LKHHIP","P","NAME","MZM")
73
^SCR("LKHHIP","P","NAME","PRHIP")
7
^SCR("LKHHIP","P","NAME","SHEML")
5
^SCR("LKHHIP","P","NM",2)
FLD
^SCR("LKHHIP","P","NM",3)
FLD1
^SCR("LKHHIP","P","NM",5)
SHEML
^SCR("LKHHIP","P","NM",7)
PRHIP
^SCR("LKHHIP","P","NM",20)
MESUGL
^SCR("LKHHIP","P","NM",21)
MESUGL1
^SCR("LKHHIP","P","NM",25)
ADSUGL
^SCR("LKHHIP","P","NM",26)
ADSUGL1
^SCR("LKHHIP","P","NM",28)
MELKH
^SCR("LKHHIP","P","NM",29)
ADLKH
^SCR("LKHHIP","P","NM",30)
KTV
^SCR("LKHHIP","P","NM",35)
IR
^SCR("LKHHIP","P","NM",40)
MIKUD
^SCR("LKHHIP","P","NM",42)
MAZAV
^SCR("LKHHIP","P","NM",45)
METRHML
^SCR("LKHHIP","P","NM",50)
ADTRHML
^SCR("LKHHIP","P","NM",55)
METRH
^SCR("LKHHIP","P","NM",60)
ADTRH
^SCR("LKHHIP","P","NM",62)
MEDATPTH
^SCR("LKHHIP","P","NM",63)
ADDATPTH
^SCR("LKHHIP","P","NM",65)
ISCH
^SCR("LKHHIP","P","NM",70)
ISAH
^SCR("LKHHIP","P","NM",72)
ASM
^SCR("LKHHIP","P","NM",73)
MZM
^SCR("LKHHIP","P","NM",75)
MEGDCR
^SCR("LKHHIP","P","NM",80)
ADGDCR
^SCR("LKHHIP","P","NM",85)
HG
^SCR("LKHHIP","P","NM",86)
HG1
^SCR("LKHHIP","P","NM",90)
INT
^SCR("LKHHIP","P","NM",91)
INT1
^SCR("LKHHIP","P","RB",1)
4,2,21,79
^SCR("LKHHIP1")
H
^SCR("LKHHIP1",1)
                                                                               
^SCR("LKHHIP1",2)
            #{                  10}# dcy oekcr                                 
^SCR("LKHHIP1",3)
                                                                             1$
^SCR("LKHHIP1",4)
  :            :  ycg   :            :   oyi  :      gewl my    : gewl 'qn :   
^SCR("LKHHIP1",5)
                                                                               
^SCR("LKHHIP1",6)
                                                                               
^SCR("LKHHIP1",7)
                                                                               
^SCR("LKHHIP1",8)
                                                                               
^SCR("LKHHIP1",9)
                                                                               
^SCR("LKHHIP1",10)
                                                                               
^SCR("LKHHIP1",11)
                                                                               
^SCR("LKHHIP1",12)
                                                                               
^SCR("LKHHIP1",13)
                                                                               
^SCR("LKHHIP1",14)
                                                                               
^SCR("LKHHIP1",15)
                                                                               
^SCR("LKHHIP1",16)
                                                                               
^SCR("LKHHIP1",17)
                                                                               
^SCR("LKHHIP1",18)
                                                                               
^SCR("LKHHIP1",19)
                                                                               
^SCR("LKHHIP1",20)
 $1                                                                            
^SCR("LKHHIP1","A",1)

^SCR("LKHHIP1","A",2)
„ƒ™�…‹ƒ’
^SCR("LKHHIP1","A",3)

^SCR("LKHHIP1","A",4)
™ƒ‡�™‰‡…—Œ�™‡…—Œ'‘Ž
^SCR("LKHHIP1","A",5)
----------------------------------------------------------------------
^SCR("LKHHIP1","A",6)

^SCR("LKHHIP1","A",7)

^SCR("LKHHIP1","A",8)

^SCR("LKHHIP1","A",9)

^SCR("LKHHIP1","A",10)

^SCR("LKHHIP1","A",11)

^SCR("LKHHIP1","A",12)

^SCR("LKHHIP1","A",13)

^SCR("LKHHIP1","A",14)

^SCR("LKHHIP1","A",15)

^SCR("LKHHIP1","A",16)

^SCR("LKHHIP1","A",17)

^SCR("LKHHIP1","A",18)

^SCR("LKHHIP1","A",19)

^SCR("LKHHIP1","A",20)

^SCR("LKHHIP1","AV",1)

^SCR("LKHHIP1","AV",2)
vsaiufsg
^SCR("LKHHIP1","AV",3)

^SCR("LKHHIP1","AV",4)
asjiahjuekoajuekwxn
^SCR("LKHHIP1","AV",5)
----------------------------------------------------------------------
^SCR("LKHHIP1","AV",6)

^SCR("LKHHIP1","AV",7)

^SCR("LKHHIP1","AV",8)

^SCR("LKHHIP1","AV",9)

^SCR("LKHHIP1","AV",10)

^SCR("LKHHIP1","AV",11)

^SCR("LKHHIP1","AV",12)

^SCR("LKHHIP1","AV",13)

^SCR("LKHHIP1","AV",14)

^SCR("LKHHIP1","AV",15)

^SCR("LKHHIP1","AV",16)

^SCR("LKHHIP1","AV",17)

^SCR("LKHHIP1","AV",18)

^SCR("LKHHIP1","AV",19)

^SCR("LKHHIP1","AV",20)

^SCR("LKHHIP1","G",1,"CRD")
5,75,E,10,0
^SCR("LKHHIP1","G",1,"HELP")

^SCR("LKHHIP1","G",1,"LMAX")
10
^SCR("LKHHIP1","G",1,"MUMPS1")

^SCR("LKHHIP1","G",1,"MUMPS2")

^SCR("LKHHIP1","G",1,"OUTPUT")

^SCR("LKHHIP1","G",1,"SHEM")
 gewl 'qn 
^SCR("LKHHIP1","G",1,"TYP")
E
^SCR("LKHHIP1","G",2,"CRD")
5,64,H,17,0
^SCR("LKHHIP1","G",2,"HELP")

^SCR("LKHHIP1","G",2,"LMAX")
17
^SCR("LKHHIP1","G",2,"MUMPS1")

^SCR("LKHHIP1","G",2,"MUMPS2")

^SCR("LKHHIP1","G",2,"OUTPUT")

^SCR("LKHHIP1","G",2,"SHEM")
      gewl my    
^SCR("LKHHIP1","G",2,"TYP")
H
^SCR("LKHHIP1","G",3,"CRD")
5,46,E,8,0
^SCR("LKHHIP1","G",3,"HELP")

^SCR("LKHHIP1","G",3,"LMAX")
8
^SCR("LKHHIP1","G",3,"MUMPS1")

^SCR("LKHHIP1","G",3,"MUMPS2")

^SCR("LKHHIP1","G",3,"OUTPUT")

^SCR("LKHHIP1","G",3,"SHEM")
   oyi  
^SCR("LKHHIP1","G",3,"TYP")
E
^SCR("LKHHIP1","G",4,"CRD")
5,37,H,12,0
^SCR("LKHHIP1","G",4,"HELP")

^SCR("LKHHIP1","G",4,"LMAX")
12
^SCR("LKHHIP1","G",4,"MUMPS1")

^SCR("LKHHIP1","G",4,"MUMPS2")

^SCR("LKHHIP1","G",4,"OUTPUT")

^SCR("LKHHIP1","G",4,"SHEM")
            
^SCR("LKHHIP1","G",4,"TYP")
H
^SCR("LKHHIP1","G",5,"CHECK")
Y
^SCR("LKHHIP1","G",5,"CRD")
5,24,E,2,0
^SCR("LKHHIP1","G",5,"CREAT")

^SCR("LKHHIP1","G",5,"FNC")
F9
^SCR("LKHHIP1","G",5,"GLOB")
^SUGL
^SCR("LKHHIP1","G",5,"HELP")
<F10> - (zigkep dxeyn) izveaw iepiy , <F9> - gewl qihxk 
^SCR("LKHHIP1","G",5,"LMAX")
8
^SCR("LKHHIP1","G",5,"MUMPS1")

^SCR("LKHHIP1","G",5,"MUMPS2")
D VNEW^LKHHIP
^SCR("LKHHIP1","G",5,"NLN")
20
^SCR("LKHHIP1","G",5,"NS")
drbd zeaiq zlah
^SCR("LKHHIP1","G",5,"RZD")
\
^SCR("LKHHIP1","G",5,"SHEM")
  ycg   
^SCR("LKHHIP1","G",5,"TOPB")
8
^SCR("LKHHIP1","G",5,"TYP")
E
^SCR("LKHHIP1","G",5,"VRB")
VNEW1
^SCR("LKHHIP1","G",6,"CRD")
5,15,H,12,0
^SCR("LKHHIP1","G",6,"HELP")

^SCR("LKHHIP1","G",6,"LMAX")
12
^SCR("LKHHIP1","G",6,"MUMPS1")

^SCR("LKHHIP1","G",6,"MUMPS2")

^SCR("LKHHIP1","G",6,"OUTPUT")

^SCR("LKHHIP1","G",6,"SHEM")
            
^SCR("LKHHIP1","G",6,"TYP")
H
^SCR("LKHHIP1","G","MAX")
11
^SCR("LKHHIP1","G","NAME","LKHN")
1
^SCR("LKHHIP1","G","NAME","LKHN1")
2
^SCR("LKHHIP1","G","NAME","VNEW")
5
^SCR("LKHHIP1","G","NAME","VNEW1")
6
^SCR("LKHHIP1","G","NAME","VOLD")
3
^SCR("LKHHIP1","G","NAME","VOLD1")
4
^SCR("LKHHIP1","G","NM",1)
LKHN
^SCR("LKHHIP1","G","NM",2)
LKHN1
^SCR("LKHHIP1","G","NM",3)
VOLD
^SCR("LKHHIP1","G","NM",4)
VOLD1
^SCR("LKHHIP1","G","NM",5)
VNEW
^SCR("LKHHIP1","G","NM",6)
VNEW1
^SCR("LKHHIP1","G","RB")
4,2,21,79
^SCR("LKHHIP1","G","REF")
^TEMPHL($P
^SCR("LKHHIP1","G","RZD")
\
^SCR("LKHHIP1","G","STEP")
1
^SCR("LKHHIP1","G","STG")
  :            :  ycg   :            :   oyi  :      gewl my    : gewl 'qn :   
^SCR("LKHHIP1","G","VG")
6
^SCR("LKHHIP1","NAME")

^SCR("LKHHIP1","P",10,"CRD")
2,35,H,20
^SCR("LKHHIP1","P",10,"HELP")

^SCR("LKHHIP1","P",10,"LMAX")
21
^SCR("LKHHIP1","P",10,"MUMPS1")

^SCR("LKHHIP1","P",10,"MUMPS2")

^SCR("LKHHIP1","P",10,"OUTPUT")

^SCR("LKHHIP1","P",10,"TYP")
H
^SCR("LKHHIP1","P","NAME","FLD1")
10
^SCR("LKHHIP1","P","NM",10)
FLD1
^SCR("LKHMDP")
H
^SCR("LKHMDP",1)
                  # 'zeqtcn - zegewl zeveaw' zlah #                            
^SCR("LKHMDP",2)
                                                                               
^SCR("LKHMDP",3)
                                                                             1$
^SCR("LKHMDP",4)
      : zqtcn xe`z :   zqtcn 'qn   :         dveaw my       :  zegewl zveaw:   
^SCR("LKHMDP",5)
                                                                               
^SCR("LKHMDP",6)
                                                                               
^SCR("LKHMDP",7)
                                                                               
^SCR("LKHMDP",8)
                                                                               
^SCR("LKHMDP",9)
                                                                               
^SCR("LKHMDP",10)
                                                                               
^SCR("LKHMDP",11)
                                                                               
^SCR("LKHMDP",12)
                                                                               
^SCR("LKHMDP",13)
                                                                               
^SCR("LKHMDP",14)
                                                                               
^SCR("LKHMDP",15)
                                                                               
^SCR("LKHMDP",16)
                                                                               
^SCR("LKHMDP",17)
                                                                               
^SCR("LKHMDP",18)
                                                                               
^SCR("LKHMDP",19)
                                                                               
^SCR("LKHMDP",20)
                                                                               
^SCR("LKHMDP",21)
                                                                               
^SCR("LKHMDP",22)
 $1                                                                            
^SCR("LKHMDP","A",1)
'š…‘”ƒŽ-š…‡…—Œš…–…�—'šŒ�ˆ
^SCR("LKHMDP","A",2)

^SCR("LKHMDP","A",3)

^SCR("LKHMDP","A",4)
š‘”ƒŽ˜…€šš‘”ƒŽ'‘Ž„–…�—�™š…‡…—Œš–…�—
^SCR("LKHMDP","A",5)
--------------------------------------------------------------------
^SCR("LKHMDP","A",6)

^SCR("LKHMDP","A",7)

^SCR("LKHMDP","A",8)

^SCR("LKHMDP","A",9)

^SCR("LKHMDP","A",10)

^SCR("LKHMDP","A",11)

^SCR("LKHMDP","A",12)

^SCR("LKHMDP","A",13)

^SCR("LKHMDP","A",14)

^SCR("LKHMDP","A",15)

^SCR("LKHMDP","A",16)

^SCR("LKHMDP","A",17)

^SCR("LKHMDP","A",18)

^SCR("LKHMDP","A",19)

^SCR("LKHMDP","A",20)

^SCR("LKHMDP","A",21)

^SCR("LKHMDP","A",22)

^SCR("LKHMDP","AV",1)
w,uxpsn-,ujuek,umucew,kcy
^SCR("LKHMDP","AV",2)

^SCR("LKHMDP","AV",3)

^SCR("LKHMDP","AV",4)
,xpsnrut,,xpsnwxnvmuceoa,ujuek,muce
^SCR("LKHMDP","AV",5)
--------------------------------------------------------------------
^SCR("LKHMDP","AV",6)

^SCR("LKHMDP","AV",7)

^SCR("LKHMDP","AV",8)

^SCR("LKHMDP","AV",9)

^SCR("LKHMDP","AV",10)

^SCR("LKHMDP","AV",11)

^SCR("LKHMDP","AV",12)

^SCR("LKHMDP","AV",13)

^SCR("LKHMDP","AV",14)

^SCR("LKHMDP","AV",15)

^SCR("LKHMDP","AV",16)

^SCR("LKHMDP","AV",17)

^SCR("LKHMDP","AV",18)

^SCR("LKHMDP","AV",19)

^SCR("LKHMDP","AV",20)

^SCR("LKHMDP","AV",21)

^SCR("LKHMDP","AV",22)

^SCR("LKHMDP","G",1,"CRD")
5,75,E,5,0
^SCR("LKHMDP","G",1,"HELP")

^SCR("LKHMDP","G",1,"LMAX")
14
^SCR("LKHMDP","G",1,"MUMPS1")

^SCR("LKHMDP","G",1,"MUMPS2")

^SCR("LKHMDP","G",1,"OUTPUT")

^SCR("LKHMDP","G",1,"SHEM")
  zegewl zveaw
^SCR("LKHMDP","G",1,"TYP")
E
^SCR("LKHMDP","G",2,"CRD")
5,60,H,24,0
^SCR("LKHMDP","G",2,"HELP")

^SCR("LKHMDP","G",2,"LMAX")
24
^SCR("LKHMDP","G",2,"MUMPS1")

^SCR("LKHMDP","G",2,"MUMPS2")

^SCR("LKHMDP","G",2,"OUTPUT")

^SCR("LKHMDP","G",2,"SHEM")
         dveaw my       
^SCR("LKHMDP","G",2,"TYP")
H
^SCR("LKHMDP","G",3,"CRD")
5,35,E,15,0
^SCR("LKHMDP","G",3,"HELP")

^SCR("LKHMDP","G",3,"LMAX")
15
^SCR("LKHMDP","G",3,"MUMPS1")

^SCR("LKHMDP","G",3,"MUMPS2")
D MDP^P1LKHMDP
^SCR("LKHMDP","G",3,"MUST")

^SCR("LKHMDP","G",3,"SHEM")
   zqtcn 'qn   
^SCR("LKHMDP","G",3,"TYP")
E
^SCR("LKHMDP","G",4,"CRD")
5,19,H,12,0
^SCR("LKHMDP","G",4,"HELP")

^SCR("LKHMDP","G",4,"LMAX")
12
^SCR("LKHMDP","G",4,"MUMPS1")

^SCR("LKHMDP","G",4,"MUMPS2")

^SCR("LKHMDP","G",4,"OUTPUT")

^SCR("LKHMDP","G",4,"SHEM")
 zqtcn xe`z 
^SCR("LKHMDP","G",4,"TYP")
H
^SCR("LKHMDP","G","MAX")
5
^SCR("LKHMDP","G","NAME","KVZL")
1
^SCR("LKHMDP","G","NAME","KVZL1")
2
^SCR("LKHMDP","G","NAME","MDP")
3
^SCR("LKHMDP","G","NAME","MDP1")
4
^SCR("LKHMDP","G","NM",1)
KVZL
^SCR("LKHMDP","G","NM",2)
KVZL1
^SCR("LKHMDP","G","NM",3)
MDP
^SCR("LKHMDP","G","NM",4)
MDP1
^SCR("LKHMDP","G","RB")
4,2,23,79
^SCR("LKHMDP","G","REF")
^TEMP($P
^SCR("LKHMDP","G","RZD")
\
^SCR("LKHMDP","G","STEP")
1
^SCR("LKHMDP","G","STG")
      : zqtcn xe`z :   zqtcn 'qn   :         dveaw my       :  zegewl zveaw:   
^SCR("LKHMDP","G","VG")
6
^SCR("LKHMDP","NAME")

^SCR("LKHP")
H
^SCR("LKHP",1)
     {                               10}: my {05         }:(ycg- 0) gewl xtqn  
^SCR("LKHP",2)
                                                                           1]  
^SCR("LKHP",3)
                                {12      :oeayg                { 11}:  avn     
^SCR("LKHP",4)
                              {20 } 'qn {                        15}: aegx     
^SCR("LKHP",5)
                                   {  23} dqipk    {22 }:dxic {  21}: dnew     
^SCR("LKHP",6)
                   {                                             24}: dxrd     
^SCR("LKHP",7)
                     {                  26}:xir           {25     }: cewin     
^SCR("LKHP",8)
                      {28         }: ciip oetlh    {27       }:       .f.z     
^SCR("LKHP",9)
                      {35         }:dcear oetlh   {30        }:  zia oetlh     
^SCR("LKHP",10)
                      {41         }:       mcen   {40        }:        qwt     
^SCR("LKHP",11)
                      {42                                    }:     E-MAIL     
^SCR("LKHP",12)
    {48   }%:gewll dgpd {           46} {45 :gewl beq {      44}{43: revwn     
^SCR("LKHP",13)
            {50      } :   dgizt jix`z               {49     }: dcil jix`z     
^SCR("LKHP",14)
            {52      } : oi`eyip jix`z      {51     }:bef za/oa dcil jix`z     
^SCR("LKHP",15)
                                            {53     }: oecrenl dqipk jix`z     
^SCR("LKHP",16)
  [1                                                                           
^SCR("LKHP",17)
                                                                           2]  
^SCR("LKHP",18)
              { 57}:dpnfdl xeyi`  { 55}: dtwdl xeyi`  { 54}:    wiyl xeyi`     
^SCR("LKHP",19)
            {59   }:    reaw xign     {58                 }:  yelz ly ieey     
^SCR("LKHP",20)
         { 63}: oinfnd my  { 62}: `zknq` le`yl  {60       }:    i`xy` lceb     
^SCR("LKHP",21)
                           {68 }: + shey melyz  {65       }:zeipw itl dxzi     
^SCR("LKHP",22)
                                     {70       }: zelawe zeipeayg itl dxzi     
^SCR("LKHP",23)
  [2                                                                           
^SCR("LKHP","A",1)
:�™:(™ƒ‡-0)‡…—Œ˜”‘Ž
^SCR("LKHP","A",2)

^SCR("LKHP","A",3)
:�…�™‡:�–Ž
^SCR("LKHP","A",4)
'‘Ž:�…‡˜
^SCR("LKHP","A",5)
„‘‰�‹:„˜‰ƒ:„Ž…—
^SCR("LKHP","A",6)
:„˜’„
^SCR("LKHP","A",7)
:˜‰’:ƒ…—‰Ž
^SCR("LKHP","A",8)
:ƒ‰‰��…”Œˆ:.†.š
^SCR("LKHP","A",9)
:„ƒ…�’�…”Œˆ:š‰��…”Œˆ
^SCR("LKHP","A",10)
:�ƒ…Ž:‘—”
^SCR("LKHP","A",11)
:E-MAIL
^SCR("LKHP","A",12)
%:‡…—ŒŒ„‡�„:‡…—Œ‚…‘:’…–—Ž
^SCR("LKHP","A",13)
:„‡‰š”Š‰˜€š:„ƒ‰ŒŠ‰˜€š
^SCR("LKHP","A",14)
:�‰€…™‰�Š‰˜€š:‚…†š�/��„ƒ‰ŒŠ‰˜€š
^SCR("LKHP","A",15)
:�…ƒ’…ŽŒ„‘‰�‹Š‰˜€š
^SCR("LKHP","A",16)

^SCR("LKHP","A",17)

^SCR("LKHP","A",18)
:„�Ž†„Œ˜…™‰€:„”—„Œ˜…™‰€:—‰™Œ˜…™‰€
^SCR("LKHP","A",19)
:’…�—˜‰‡Ž:™…ŒšŒ™‰……™
^SCR("LKHP","A",20)
:�‰Ž†Ž„�™:€š‹Ž‘€Œ…€™Œ:‰€˜™€Œƒ…‚
^SCR("LKHP","A",21)
:+“ˆ…™�…Œ™š:š…‰�—‰”Œ„˜š‰
^SCR("LKHP","A",22)
:š…Œ�—…š…‰�…�™‡‰”Œ„˜š‰
^SCR("LKHP","A",23)

^SCR("LKHP","AV",1)
:oa:(asj-0)juekrpxn
^SCR("LKHP","AV",2)

^SCR("LKHP","AV",3)
:iucaj:cmn
^SCR("LKHP","AV",4)
wxn:cujr
^SCR("LKHP","AV",5)
vxhbf:vrhs:vnue
^SCR("LKHP","AV",6)
:vrgv
^SCR("LKHP","AV",7)
:rhg:suehn
^SCR("LKHP","AV",8)
:shhbiupky:/z/,
^SCR("LKHP","AV",9)
:vsucgiupky:,hciupky
^SCR("LKHP","AV",10)
:osun:xep
^SCR("LKHP","AV",11)
:E-MAIL
^SCR("LKHP","AV",12)
%:juekkvjbv:juekdux:gumen
^SCR("LKHP","AV",13)
:vjh,plhrt,:vshklhrt,
^SCR("LKHP","AV",14)
:ihtuahblhrt,:duz,cqicvshklhrt,
^SCR("LKHP","AV",15)
:iusgunkvxhbflhrt,
^SCR("LKHP","AV",16)

^SCR("LKHP","AV",17)

^SCR("LKHP","AV",18)
:vbnzvkruaht:vpevkruaht:ehakruaht
^SCR("LKHP","AV",19)
:gucerhjn:auk,kahuua
^SCR("LKHP","AV",20)
:ihnznvoa:t,fnxtkutak:htratksud
^SCR("LKHP","AV",21)
:+;yuaouka,:,uhbehpkvr,h
^SCR("LKHP","AV",22)
:,ukceu,uhbucajhpkvr,h
^SCR("LKHP","AV",23)

^SCR("LKHP","NAME")
gewl qihxk
^SCR("LKHP","P",5,"CRD")
1,45,E,12,0
^SCR("LKHP","P",5,"FNC")
F8,F9,F10
^SCR("LKHP","P",5,"GLOB")
LKH
^SCR("LKHP","P",5,"HELP")
<F10> oeayg itl, <F9> .f.z itl , <F8> lh itl ,<F6> my itl yetig
^SCR("LKHP","P",5,"LMAX")
12
^SCR("LKHP","P",5,"MUMPS1")
S %ZMSL("bf")="&<>SC"
^SCR("LKHP","P",5,"MUMPS2")
D LKH^KLLKHS
^SCR("LKHP","P",5,"MUST")

^SCR("LKHP","P",5,"NLN")
20
^SCR("LKHP","P",5,"RZD")
\
^SCR("LKHP","P",5,"TOPB")
8
^SCR("LKHP","P",5,"TYP")
E
^SCR("LKHP","P",5,"VRB")
LKH1
^SCR("LKHP","P",10,"CRD")
1,40,H,34
^SCR("LKHP","P",10,"HELP")
<F7> - dnec my mr miqihxk yetig 
^SCR("LKHP","P",10,"LMAX")
34
^SCR("LKHP","P",10,"MUMPS1")

^SCR("LKHP","P",10,"MUMPS2")
D BDIKA^KLLKHS
^SCR("LKHP","P",10,"TYP")
H
^SCR("LKHP","P",11,"CRD")
3,68,H,1,0
^SCR("LKHP","P",11,"HELP")
cala zepnfdl xebq - d ,xebq - q ,gezt - t
^SCR("LKHP","P",11,"LMAX")
4
^SCR("LKHP","P",11,"MUMPS1")
S:$G(MAZAV)'="q"&($G(MAZAV)'="d") MAZAV="t"
^SCR("LKHP","P",11,"MUMPS2")
D MAZAV^KLLKHS
^SCR("LKHP","P",11,"TYP")
H
^SCR("LKHP","P",12,"CRD")
3,32,E,8,0
^SCR("LKHP","P",12,"HELP")

^SCR("LKHP","P",12,"LMAX")
9
^SCR("LKHP","P",12,"MUMPS1")

^SCR("LKHP","P",12,"MUMPS2")

^SCR("LKHP","P",12,"TYP")
E
^SCR("LKHP","P",15,"CRD")
4,68,H,25
^SCR("LKHP","P",15,"HELP")

^SCR("LKHP","P",15,"LMAX")
27
^SCR("LKHP","P",15,"MUMPS1")

^SCR("LKHP","P",15,"MUMPS2")
S KTOV=$TR(KTOV,"{}\*","()/X")
^SCR("LKHP","P",15,"MUST")

^SCR("LKHP","P",15,"TYP")
H
^SCR("LKHP","P",20,"CRD")
4,30,E,3,0
^SCR("LKHP","P",20,"HELP")

^SCR("LKHP","P",20,"LMAX")
4
^SCR("LKHP","P",20,"MUMPS1")

^SCR("LKHP","P",20,"MUMPS2")

^SCR("LKHP","P",20,"TYP")
E
^SCR("LKHP","P",21,"CRD")
5,68,H,4
^SCR("LKHP","P",21,"HELP")

^SCR("LKHP","P",21,"LMAX")
5
^SCR("LKHP","P",21,"MUMPS1")

^SCR("LKHP","P",21,"MUMPS2")

^SCR("LKHP","P",21,"TYP")
H
^SCR("LKHP","P",22,"CRD")
5,51,E,4,0
^SCR("LKHP","P",22,"HELP")

^SCR("LKHP","P",22,"LMAX")
4
^SCR("LKHP","P",22,"MUMPS1")

^SCR("LKHP","P",22,"MUMPS2")

^SCR("LKHP","P",22,"TYP")
E
^SCR("LKHP","P",23,"CRD")
5,41,H,5
^SCR("LKHP","P",23,"HELP")

^SCR("LKHP","P",23,"LMAX")
5
^SCR("LKHP","P",23,"MUMPS1")

^SCR("LKHP","P",23,"MUMPS2")

^SCR("LKHP","P",23,"TYP")
H
^SCR("LKHP","P",24,"CRD")
6,68,H,48
^SCR("LKHP","P",24,"HELP")

^SCR("LKHP","P",24,"LMAX")
48
^SCR("LKHP","P",24,"MUMPS1")

^SCR("LKHP","P",24,"MUMPS2")

^SCR("LKHP","P",24,"TYP")
H
^SCR("LKHP","P",25,"CRD")
7,58,E,7,0
^SCR("LKHP","P",25,"HELP")

^SCR("LKHP","P",25,"LMAX")
8
^SCR("LKHP","P",25,"MUMPS1")

^SCR("LKHP","P",25,"MUMPS2")

^SCR("LKHP","P",25,"TYP")
E
^SCR("LKHP","P",26,"CRD")
7,43,H,20,0
^SCR("LKHP","P",26,"FNC")

^SCR("LKHP","P",26,"GLOB")
P1IR
^SCR("LKHP","P",26,"HELP")

^SCR("LKHP","P",26,"LMAX")
21
^SCR("LKHP","P",26,"MUMPS1")
S:$G(IR)="" IR=$G(^P1PRM("IR"))
^SCR("LKHP","P",26,"MUMPS2")

^SCR("LKHP","P",26,"NLN")
20
^SCR("LKHP","P",26,"RZD")
\
^SCR("LKHP","P",26,"TOPB")
8
^SCR("LKHP","P",26,"TYP")
H
^SCR("LKHP","P",26,"VRB")
IR
^SCR("LKHP","P",27,"CRD")
8,51,E,9,0
^SCR("LKHP","P",27,"HELP")

^SCR("LKHP","P",27,"LMAX")
10
^SCR("LKHP","P",27,"MUMPS1")

^SCR("LKHP","P",27,"MUMPS2")

^SCR("LKHP","P",27,"TYP")
E
^SCR("LKHP","P",28,"CRD")
8,22,E,11,0
^SCR("LKHP","P",28,"HELP")

^SCR("LKHP","P",28,"LMAX")
12
^SCR("LKHP","P",28,"MUMPS1")

^SCR("LKHP","P",28,"MUMPS2")

^SCR("LKHP","P",28,"TYP")
E
^SCR("LKHP","P",30,"CRD")
9,50,E,11,0
^SCR("LKHP","P",30,"HELP")

^SCR("LKHP","P",30,"LMAX")
11
^SCR("LKHP","P",30,"MUMPS1")

^SCR("LKHP","P",30,"MUMPS2")

^SCR("LKHP","P",30,"TYP")
E
^SCR("LKHP","P",35,"CRD")
9,22,E,11,0
^SCR("LKHP","P",35,"HELP")

^SCR("LKHP","P",35,"LMAX")
12
^SCR("LKHP","P",35,"MUMPS1")

^SCR("LKHP","P",35,"MUMPS2")

^SCR("LKHP","P",35,"TYP")
E
^SCR("LKHP","P",40,"CRD")
10,50,E,11,0
^SCR("LKHP","P",40,"HELP")

^SCR("LKHP","P",40,"LMAX")
11
^SCR("LKHP","P",40,"MUMPS1")

^SCR("LKHP","P",40,"MUMPS2")

^SCR("LKHP","P",40,"TYP")
E
^SCR("LKHP","P",41,"CRD")
10,22,E,11,0
^SCR("LKHP","P",41,"HELP")

^SCR("LKHP","P",41,"LMAX")
12
^SCR("LKHP","P",41,"MUMPS1")

^SCR("LKHP","P",41,"MUMPS2")

^SCR("LKHP","P",41,"TYP")
E
^SCR("LKHP","P",42,"CRD")
11,22,E,36,0
^SCR("LKHP","P",42,"HELP")

^SCR("LKHP","P",42,"LMAX")
39
^SCR("LKHP","P",42,"MUMPS1")

^SCR("LKHP","P",42,"MUMPS2")

^SCR("LKHP","P",42,"TYP")
E
^SCR("LKHP","P",43,"CHECK")
Y
^SCR("LKHP","P",43,"CRD")
12,64,E,3,0
^SCR("LKHP","P",43,"CREAT")

^SCR("LKHP","P",43,"FNC")

^SCR("LKHP","P",43,"GLOB")
MIKZ
^SCR("LKHP","P",43,"HELP")

^SCR("LKHP","P",43,"LMAX")
3
^SCR("LKHP","P",43,"MUMPS1")

^SCR("LKHP","P",43,"MUMPS2")

^SCR("LKHP","P",43,"NLN")
20
^SCR("LKHP","P",43,"NS")
zerevwn zlah
^SCR("LKHP","P",43,"RZD")
\
^SCR("LKHP","P",43,"TOPB")
8
^SCR("LKHP","P",43,"TYP")
E
^SCR("LKHP","P",43,"VRB")
MIKZ1
^SCR("LKHP","P",44,"CRD")
12,64,H,9
^SCR("LKHP","P",44,"HELP")

^SCR("LKHP","P",44,"LMAX")
9
^SCR("LKHP","P",44,"MUMPS1")

^SCR("LKHP","P",44,"MUMPS2")

^SCR("LKHP","P",44,"OUTPUT")

^SCR("LKHP","P",44,"TYP")
H
^SCR("LKHP","P",45,"CHECK")
Y
^SCR("LKHP","P",45,"CRD")
12,40,E,2,0
^SCR("LKHP","P",45,"CREAT")

^SCR("LKHP","P",45,"FNC")

^SCR("LKHP","P",45,"GLOB")
SUGL
^SCR("LKHP","P",45,"HELP")

^SCR("LKHP","P",45,"LMAX")
4
^SCR("LKHP","P",45,"MUMPS1")

^SCR("LKHP","P",45,"MUMPS2")
S:SUGL'=""&'$G(MHKV) AHUZ=+$G(^SUGL(SUGL,1))
^SCR("LKHP","P",45,"MUST")

^SCR("LKHP","P",45,"NLN")
20
^SCR("LKHP","P",45,"NS")
zegewl ibeq zlah
^SCR("LKHP","P",45,"RZD")
\
^SCR("LKHP","P",45,"TOPB")
8
^SCR("LKHP","P",45,"TYP")
E
^SCR("LKHP","P",45,"VRB")
SUGL1
^SCR("LKHP","P",46,"CRD")
12,39,H,14
^SCR("LKHP","P",46,"HELP")

^SCR("LKHP","P",46,"LMAX")
14
^SCR("LKHP","P",46,"MUMPS1")

^SCR("LKHP","P",46,"MUMPS2")

^SCR("LKHP","P",46,"OUTPUT")

^SCR("LKHP","P",46,"TYP")
H
^SCR("LKHP","P",48,"CRD")
12,4,N,6,2
^SCR("LKHP","P",48,"HELP")

^SCR("LKHP","P",48,"LMAX")
6
^SCR("LKHP","P",48,"MUMPS1")

^SCR("LKHP","P",48,"MUMPS2")

^SCR("LKHP","P",48,"OUTPUT")

^SCR("LKHP","P",48,"TYP")
N
^SCR("LKHP","P",49,"CRD")
13,53,D,8,0
^SCR("LKHP","P",49,"HELP")

^SCR("LKHP","P",49,"LMAX")
8
^SCR("LKHP","P",49,"MUMPS1")

^SCR("LKHP","P",49,"MUMPS2")

^SCR("LKHP","P",49,"TYP")
D
^SCR("LKHP","P",50,"CRD")
13,12,D,8,0
^SCR("LKHP","P",50,"HELP")

^SCR("LKHP","P",50,"LMAX")
9
^SCR("LKHP","P",50,"MUMPS1")

^SCR("LKHP","P",50,"MUMPS2")

^SCR("LKHP","P",50,"OUTPUT")

^SCR("LKHP","P",50,"TYP")
D
^SCR("LKHP","P",51,"CRD")
14,44,D,8,0
^SCR("LKHP","P",51,"HELP")

^SCR("LKHP","P",51,"LMAX")
8
^SCR("LKHP","P",51,"MUMPS1")

^SCR("LKHP","P",51,"MUMPS2")

^SCR("LKHP","P",51,"TYP")
D
^SCR("LKHP","P",52,"CRD")
14,12,D,8,0
^SCR("LKHP","P",52,"HELP")

^SCR("LKHP","P",52,"LMAX")
9
^SCR("LKHP","P",52,"MUMPS1")

^SCR("LKHP","P",52,"MUMPS2")

^SCR("LKHP","P",52,"TYP")
D
^SCR("LKHP","P",53,"CRD")
15,44,D,8,0
^SCR("LKHP","P",53,"HELP")

^SCR("LKHP","P",53,"LMAX")
8
^SCR("LKHP","P",53,"MUMPS1")

^SCR("LKHP","P",53,"MUMPS2")

^SCR("LKHP","P",53,"OUTPUT")

^SCR("LKHP","P",53,"TYP")
D
^SCR("LKHP","P",54,"CRD")
18,59,H,1,0
^SCR("LKHP","P",54,"HELP")

^SCR("LKHP","P",54,"LMAX")
4
^SCR("LKHP","P",54,"MUMPS1")
S:$G(ICH)="" ICH="k"
^SCR("LKHP","P",54,"MUMPS2")
I $$^%L1YN("ICH")<0 S %SC("ER")=1
^SCR("LKHP","P",54,"TYP")
H
^SCR("LKHP","P",55,"CRD")
18,39,H,1,0
^SCR("LKHP","P",55,"HELP")

^SCR("LKHP","P",55,"LMAX")
4
^SCR("LKHP","P",55,"MUMPS1")
S:$G(ICR)="" ICR="k"
^SCR("LKHP","P",55,"MUMPS2")
S:ICR="F" ICR="k" S:ICR="K" ICR="l" I ICR'="k",ICR'="l" S %SC("ER")=1
^SCR("LKHP","P",55,"MUST")

^SCR("LKHP","P",55,"TYP")
H
^SCR("LKHP","P",57,"CRD")
18,19,H,1
^SCR("LKHP","P",57,"HELP")

^SCR("LKHP","P",57,"LMAX")
4
^SCR("LKHP","P",57,"MUMPS1")
S:'$G(IHZM) IHZM="k"
^SCR("LKHP","P",57,"MUMPS2")
S:IHZM="F" IHZM="k" S:IHZM="K" IHZM="l" I IHZM'="k",IHZM'="l" S %SC("ER")=1
^SCR("LKHP","P",57,"MUST")

^SCR("LKHP","P",57,"TYP")
H
^SCR("LKHP","P",58,"CRD")
19,38,E,13,0
^SCR("LKHP","P",58,"HELP")
qepea - g"y 6  , zelr - g"y 25 dti` , 31=25+6 : lynl
^SCR("LKHP","P",58,"LMAX")
20
^SCR("LKHP","P",58,"MUMPS1")

^SCR("LKHP","P",58,"MUMPS2")
D TLUSH^KLLKHS
^SCR("LKHP","P",58,"TYP")
E
^SCR("LKHP","P",59,"CRD")
19,12,N,6,2
^SCR("LKHP","P",59,"HELP")

^SCR("LKHP","P",59,"LMAX")
6
^SCR("LKHP","P",59,"MUMPS1")

^SCR("LKHP","P",59,"MUMPS2")

^SCR("LKHP","P",59,"TYP")
N
^SCR("LKHP","P",60,"CRD")
20,48,N,10,2
^SCR("LKHP","P",60,"HELP")

^SCR("LKHP","P",60,"LMAX")
10
^SCR("LKHP","P",60,"MUMPS1")
S:'$G(GDCR) GDCR=$G(^P1PRM("GDCR"),2000)
^SCR("LKHP","P",60,"MUMPS2")

^SCR("LKHP","P",60,"MUST")

^SCR("LKHP","P",60,"TYP")
N
^SCR("LKHP","P",62,"CRD")
20,32,H,1
^SCR("LKHP","P",62,"HELP")

^SCR("LKHP","P",62,"LMAX")
4
^SCR("LKHP","P",62,"MUMPS1")
S:$G(ASM)="" ASM="l"
^SCR("LKHP","P",62,"MUMPS2")
I $$^%L1YN("ASM")<0 S %SC("ER")=1
^SCR("LKHP","P",62,"TYP")
H
^SCR("LKHP","P",63,"CRD")
20,14,H,1
^SCR("LKHP","P",63,"HELP")

^SCR("LKHP","P",63,"LMAX")
4
^SCR("LKHP","P",63,"MUMPS1")
S:$G(MZM)="" MZM="l"
^SCR("LKHP","P",63,"MUMPS2")
I $$^%L1YN("MZM")<0 S %SC("ER")=1
^SCR("LKHP","P",63,"MUST")

^SCR("LKHP","P",63,"TYP")
H
^SCR("LKHP","P",65,"CRD")
21,48,N,10,2
^SCR("LKHP","P",65,"HELP")

^SCR("LKHP","P",65,"LMAX")
10
^SCR("LKHP","P",65,"MUMPS1")

^SCR("LKHP","P",65,"MUMPS2")

^SCR("LKHP","P",65,"OUTPUT")

^SCR("LKHP","P",65,"TYP")
N
^SCR("LKHP","P",68,"CRD")
21,27,N,3,0
^SCR("LKHP","P",68,"HELP")

^SCR("LKHP","P",68,"LMAX")
4
^SCR("LKHP","P",68,"MUMPS1")

^SCR("LKHP","P",68,"MUMPS2")

^SCR("LKHP","P",68,"TYP")
N
^SCR("LKHP","P",70,"CRD")
22,37,N,10,2
^SCR("LKHP","P",70,"HELP")

^SCR("LKHP","P",70,"LMAX")
10
^SCR("LKHP","P",70,"MUMPS1")

^SCR("LKHP","P",70,"MUMPS2")

^SCR("LKHP","P",70,"OUTPUT")

^SCR("LKHP","P",70,"TYP")
N
^SCR("LKHP","P","NAME","AHUZ")
48
^SCR("LKHP","P","NAME","AHUZ","REF")
$P($G(^VRM($P,LKH,2)),"*",7)
^SCR("LKHP","P","NAME","AHUZ","REF1")
$P(^VRM($P,LKH,2),"*",7)
^SCR("LKHP","P","NAME","ASM")
62
^SCR("LKHP","P","NAME","ASM","REF")
$P($G(^VRM($P,LKH,2)),"*",12)
^SCR("LKHP","P","NAME","ASM","REF1")
$P(^VRM($P,LKH,2),"*",12)
^SCR("LKHP","P","NAME","BAIT")
20
^SCR("LKHP","P","NAME","BAIT","REF")
$P($G(^VRM($P,LKH,1)),"*",3)
^SCR("LKHP","P","NAME","BAIT","REF1")
$P(^VRM($P,LKH,1),"*",3)
^SCR("LKHP","P","NAME","CMNT")
24
^SCR("LKHP","P","NAME","CMNT","REF")
$P($G(^VRM($P,LKH,1)),"*",10)
^SCR("LKHP","P","NAME","CMNT","REF1")
$P(^VRM($P,LKH,1),"*",10)
^SCR("LKHP","P","NAME","CNISA")
23
^SCR("LKHP","P","NAME","CNISA","REF")
$P($G(^VRM($P,LKH,1)),"*",9)
^SCR("LKHP","P","NAME","CNISA","REF1")
$P(^VRM($P,LKH,1),"*",9)
^SCR("LKHP","P","NAME","DATPTH")
50
^SCR("LKHP","P","NAME","DATPTH","REF")
$P($G(^VRM($P,LKH,2)),"*",13)
^SCR("LKHP","P","NAME","DATPTH","REF1")
$P(^VRM($P,LKH,2),"*",13)
^SCR("LKHP","P","NAME","DIRA")
22
^SCR("LKHP","P","NAME","DIRA","REF")
$P($G(^VRM($P,LKH,1)),"*",6)
^SCR("LKHP","P","NAME","DIRA","REF1")
$P(^VRM($P,LKH,1),"*",6)
^SCR("LKHP","P","NAME","EMAIL")
42
^SCR("LKHP","P","NAME","EMAIL","REF")
$P($G(^VRM($P,LKH,2)),"*",22)
^SCR("LKHP","P","NAME","EMAIL","REF1")
$P(^VRM($P,LKH,2),"*",22)
^SCR("LKHP","P","NAME","FAX")
40
^SCR("LKHP","P","NAME","FAX","REF")
$P($G(^VRM($P,LKH,1)),"*",15)
^SCR("LKHP","P","NAME","FAX","REF1")
$P(^VRM($P,LKH,1),"*",15)
^SCR("LKHP","P","NAME","GDCR")
60
^SCR("LKHP","P","NAME","GDCR","REF")
$P($G(^VRM($P,LKH,2)),"*",3)
^SCR("LKHP","P","NAME","GDCR","REF1")
$P(^VRM($P,LKH,2),"*",3)
^SCR("LKHP","P","NAME","HAGAA","REF")
$P($G(^VRM($P,LKH,3)),"*",1)
^SCR("LKHP","P","NAME","HAGAA","REF1")
$P(^VRM($P,LKH,3),"*",1)
^SCR("LKHP","P","NAME","HESB")
12
^SCR("LKHP","P","NAME","HESB","REF")
$P($G(^VRM($P,LKH,1)),"*",1)
^SCR("LKHP","P","NAME","HESB","REF1")
$P(^VRM($P,LKH,1),"*",1)
^SCR("LKHP","P","NAME","ICH")
54
^SCR("LKHP","P","NAME","ICH","REF")
$P($G(^VRM($P,LKH,2)),"*",1)
^SCR("LKHP","P","NAME","ICH","REF1")
$P(^VRM($P,LKH,2),"*",1)
^SCR("LKHP","P","NAME","ICR")
55
^SCR("LKHP","P","NAME","ICR","REF")
$P($G(^VRM($P,LKH,2)),"*",2)
^SCR("LKHP","P","NAME","ICR","REF1")
$P(^VRM($P,LKH,2),"*",2)
^SCR("LKHP","P","NAME","IHZM")
57
^SCR("LKHP","P","NAME","IHZM","REF")
$P($G(^VRM($P,LKH,2)),"*",8)
^SCR("LKHP","P","NAME","IHZM","REF1")
$P(^VRM($P,LKH,2),"*",8)
^SCR("LKHP","P","NAME","INTERES","REF")
$P($G(^VRM($P,LKH,3)),"*",2)
^SCR("LKHP","P","NAME","INTERES","REF1")
$P(^VRM($P,LKH,3),"*",2)
^SCR("LKHP","P","NAME","IR")
26
^SCR("LKHP","P","NAME","IR","REF")
$P($G(^VRM($P,LKH,1)),"*",13)
^SCR("LKHP","P","NAME","IR","REF1")
$P(^VRM($P,LKH,1),"*",13)
^SCR("LKHP","P","NAME","ITRA")
65
^SCR("LKHP","P","NAME","ITRA","REF")
$P($G(^VRM($P,LKH,2)),"*",4)
^SCR("LKHP","P","NAME","ITRA","REF1")
$P(^VRM($P,LKH,2),"*",4)
^SCR("LKHP","P","NAME","ITRAH")
70
^SCR("LKHP","P","NAME","JOMH")
49
^SCR("LKHP","P","NAME","JOMH","REF")
$P($G(^VRM($P,LKH,1)),"*",17)
^SCR("LKHP","P","NAME","JOMH","REF1")
$P(^VRM($P,LKH,1),"*",17)
^SCR("LKHP","P","NAME","JOMHBZ")
51
^SCR("LKHP","P","NAME","JOMHBZ","REF")
$P($G(^VRM($P,LKH,2)),"*",20)
^SCR("LKHP","P","NAME","JOMHBZ","REF1")
$P(^VRM($P,LKH,2),"*",20)
^SCR("LKHP","P","NAME","JOMNS")
52
^SCR("LKHP","P","NAME","JOMNS","REF")
$P($G(^VRM($P,LKH,2)),"*",21)
^SCR("LKHP","P","NAME","JOMNS","REF1")
$P(^VRM($P,LKH,2),"*",21)
^SCR("LKHP","P","NAME","KODSK","REF")
$P($G(^VRM($P,LKH,2)),"*",6)
^SCR("LKHP","P","NAME","KODSK","REF1")
$P(^VRM($P,LKH,2),"*",6)
^SCR("LKHP","P","NAME","KOMA")
21
^SCR("LKHP","P","NAME","KOMA","REF")
$P($G(^VRM($P,LKH,1)),"*",4)
^SCR("LKHP","P","NAME","KOMA","REF1")
$P(^VRM($P,LKH,1),"*",4)
^SCR("LKHP","P","NAME","KTOV")
15
^SCR("LKHP","P","NAME","KTOV","REF")
$P($G(^VRM($P,LKH,1)),"*",5)
^SCR("LKHP","P","NAME","KTOV","REF1")
$P(^VRM($P,LKH,1),"*",5)
^SCR("LKHP","P","NAME","LKH")
5
^SCR("LKHP","P","NAME","LKH","KEY")

^SCR("LKHP","P","NAME","LKH","KEY",1)
LKH/\LKH1
^SCR("LKHP","P","NAME","LKH","KEY",2)
LKH/\HESB,TZ,BAIT,KOMA,KTOV,DIRA,TELB,TELA,CNISA,CMNT,TIDK,TIDK1,IR,MIKUD,FAX,SUGL,JOMH,MIKZ,MODEM
^SCR("LKHP","P","NAME","LKH","KEY",3)
LKH/\ICH,ICR,GDCR,ITRA,SUGL,KODSK,AHUZ,IHZM,YYMM,VZ,MHKV,ASM,DATPTH,SHOTEF,MZM,TRHMDL,TLUSH,MAZAV,PELE,JOMHBZ,JOMNS,EMAIL
^SCR("LKHP","P","NAME","LKH","KEY",4)
LKH/\HAGAA,INTERES
^SCR("LKHP","P","NAME","LKH1")
10
^SCR("LKHP","P","NAME","LKH1","REF")
$P($G(^VRM($P,LKH)),"*",1)
^SCR("LKHP","P","NAME","LKH1","REF1")
$P(^VRM($P,LKH),"*",1)
^SCR("LKHP","P","NAME","MAZAV")
11
^SCR("LKHP","P","NAME","MAZAV","REF")
$P($G(^VRM($P,LKH,2)),"*",18)
^SCR("LKHP","P","NAME","MAZAV","REF1")
$P(^VRM($P,LKH,2),"*",18)
^SCR("LKHP","P","NAME","MHKV")
59
^SCR("LKHP","P","NAME","MHKV","REF")
$P($G(^VRM($P,LKH,2)),"*",11)
^SCR("LKHP","P","NAME","MHKV","REF1")
$P(^VRM($P,LKH,2),"*",11)
^SCR("LKHP","P","NAME","MIKUD")
25
^SCR("LKHP","P","NAME","MIKUD","REF")
$P($G(^VRM($P,LKH,1)),"*",14)
^SCR("LKHP","P","NAME","MIKUD","REF1")
$P(^VRM($P,LKH,1),"*",14)
^SCR("LKHP","P","NAME","MIKZ")
43
^SCR("LKHP","P","NAME","MIKZ","REF")
$P($G(^VRM($P,LKH,1)),"*",18)
^SCR("LKHP","P","NAME","MIKZ","REF1")
$P(^VRM($P,LKH,1),"*",18)
^SCR("LKHP","P","NAME","MIKZ1")
44
^SCR("LKHP","P","NAME","MODEM")
41
^SCR("LKHP","P","NAME","MODEM","REF")
$P($G(^VRM($P,LKH,1)),"*",19)
^SCR("LKHP","P","NAME","MODEM","REF1")
$P(^VRM($P,LKH,1),"*",19)
^SCR("LKHP","P","NAME","MZM")
63
^SCR("LKHP","P","NAME","MZM","REF")
$P($G(^VRM($P,LKH,2)),"*",15)
^SCR("LKHP","P","NAME","MZM","REF1")
$P(^VRM($P,LKH,2),"*",15)
^SCR("LKHP","P","NAME","PELE")
28
^SCR("LKHP","P","NAME","PELE","REF")
$P($G(^VRM($P,LKH,2)),"*",19)
^SCR("LKHP","P","NAME","PELE","REF1")
$P(^VRM($P,LKH,2),"*",19)
^SCR("LKHP","P","NAME","PSW","REF")
$P($G(^VRM($P,LKH,3)),"*",3)
^SCR("LKHP","P","NAME","PSW","REF1")
$P(^VRM($P,LKH,3),"*",3)
^SCR("LKHP","P","NAME","SHOTEF")
68
^SCR("LKHP","P","NAME","SHOTEF","REF")
$P($G(^VRM($P,LKH,2)),"*",14)
^SCR("LKHP","P","NAME","SHOTEF","REF1")
$P(^VRM($P,LKH,2),"*",14)
^SCR("LKHP","P","NAME","SISMA","REF")
$P($G(^VRM($P,LKH,3)),"*",3)
^SCR("LKHP","P","NAME","SISMA","REF1")
$P(^VRM($P,LKH,3),"*",3)
^SCR("LKHP","P","NAME","SUGL")
45
^SCR("LKHP","P","NAME","SUGL","REF")
$P($G(^VRM($P,LKH,2)),"*",5)
^SCR("LKHP","P","NAME","SUGL","REF1")
$P(^VRM($P,LKH,2),"*",5)
^SCR("LKHP","P","NAME","SUGL1")
46
^SCR("LKHP","P","NAME","TELA")
35
^SCR("LKHP","P","NAME","TELA","REF")
$P($G(^VRM($P,LKH,1)),"*",8)
^SCR("LKHP","P","NAME","TELA","REF1")
$P(^VRM($P,LKH,1),"*",8)
^SCR("LKHP","P","NAME","TELB")
30
^SCR("LKHP","P","NAME","TELB","REF")
$P($G(^VRM($P,LKH,1)),"*",7)
^SCR("LKHP","P","NAME","TELB","REF1")
$P(^VRM($P,LKH,1),"*",7)
^SCR("LKHP","P","NAME","TIDK","REF")
$P($G(^VRM($P,LKH,1)),"*",11)
^SCR("LKHP","P","NAME","TIDK","REF1")
$P(^VRM($P,LKH,1),"*",11)
^SCR("LKHP","P","NAME","TIDK1","REF")
$P($G(^VRM($P,LKH,1)),"*",12)
^SCR("LKHP","P","NAME","TIDK1","REF1")
$P(^VRM($P,LKH,1),"*",12)
^SCR("LKHP","P","NAME","TLUSH")
58
^SCR("LKHP","P","NAME","TLUSH","REF")
$P($G(^VRM($P,LKH,2)),"*",17)
^SCR("LKHP","P","NAME","TLUSH","REF1")
$P(^VRM($P,LKH,2),"*",17)
^SCR("LKHP","P","NAME","TRHMDL")
53
^SCR("LKHP","P","NAME","TRHMDL","REF")
$P($G(^VRM($P,LKH,2)),"*",16)
^SCR("LKHP","P","NAME","TRHMDL","REF1")
$P(^VRM($P,LKH,2),"*",16)
^SCR("LKHP","P","NAME","TZ")
27
^SCR("LKHP","P","NAME","TZ","REF")
$P($G(^VRM($P,LKH,1)),"*",2)
^SCR("LKHP","P","NAME","TZ","REF1")
$P(^VRM($P,LKH,1),"*",2)
^SCR("LKHP","P","NAME","VZ","REF")
$P($G(^VRM($P,LKH,2)),"*",10)
^SCR("LKHP","P","NAME","VZ","REF1")
$P(^VRM($P,LKH,2),"*",10)
^SCR("LKHP","P","NAME","YYMM","REF")
$P($G(^VRM($P,LKH,2)),"*",9)
^SCR("LKHP","P","NAME","YYMM","REF1")
$P(^VRM($P,LKH,2),"*",9)
^SCR("LKHP","P","NM",5)
LKH
^SCR("LKHP","P","NM",10)
LKH1
^SCR("LKHP","P","NM",11)
MAZAV
^SCR("LKHP","P","NM",12)
HESB
^SCR("LKHP","P","NM",15)
KTOV
^SCR("LKHP","P","NM",20)
BAIT
^SCR("LKHP","P","NM",21)
KOMA
^SCR("LKHP","P","NM",22)
DIRA
^SCR("LKHP","P","NM",23)
CNISA
^SCR("LKHP","P","NM",24)
CMNT
^SCR("LKHP","P","NM",25)
MIKUD
^SCR("LKHP","P","NM",26)
IR
^SCR("LKHP","P","NM",27)
TZ
^SCR("LKHP","P","NM",28)
PELE
^SCR("LKHP","P","NM",30)
TELB
^SCR("LKHP","P","NM",35)
TELA
^SCR("LKHP","P","NM",40)
FAX
^SCR("LKHP","P","NM",41)
MODEM
^SCR("LKHP","P","NM",42)
EMAIL
^SCR("LKHP","P","NM",43)
MIKZ
^SCR("LKHP","P","NM",44)
MIKZ1
^SCR("LKHP","P","NM",45)
SUGL
^SCR("LKHP","P","NM",46)
SUGL1
^SCR("LKHP","P","NM",48)
AHUZ
^SCR("LKHP","P","NM",49)
JOMH
^SCR("LKHP","P","NM",50)
DATPTH
^SCR("LKHP","P","NM",51)
JOMHBZ
^SCR("LKHP","P","NM",52)
JOMNS
^SCR("LKHP","P","NM",53)
TRHMDL
^SCR("LKHP","P","NM",54)
ICH
^SCR("LKHP","P","NM",55)
ICR
^SCR("LKHP","P","NM",57)
IHZM
^SCR("LKHP","P","NM",58)
TLUSH
^SCR("LKHP","P","NM",59)
MHKV
^SCR("LKHP","P","NM",60)
GDCR
^SCR("LKHP","P","NM",62)
ASM
^SCR("LKHP","P","NM",63)
MZM
^SCR("LKHP","P","NM",65)
ITRA
^SCR("LKHP","P","NM",68)
SHOTEF
^SCR("LKHP","P","NM",70)
ITRAH
^SCR("LKHP","P","RB",1)
3,3,17,77
^SCR("LKHP","P","RB",2)
18,3,24,77
^SCR("LKHP","P","REF",1)
^VRM($P,LKH)
^SCR("LKHP","P","REF",1,"RZD")
*
^SCR("LKHP","P","REF",1,"STR")
LKH1
^SCR("LKHP","P","REF",2)
^VRM($P,LKH,1)
^SCR("LKHP","P","REF",2,"RZD")
*
^SCR("LKHP","P","REF",2,"STR")
HESB*TZ*BAIT*KOMA*KTOV*DIRA*TELB*TELA*CNISA*CMNT*TIDK*TIDK1*IR*MIKUD*FAX*SUGL*JOMH*MIKZ*MODEM
^SCR("LKHP","P","REF",3)
^VRM($P,LKH,2)
^SCR("LKHP","P","REF",3,"RZD")
*
^SCR("LKHP","P","REF",3,"STR")
ICH*ICR*GDCR*ITRA*SUGL*KODSK*AHUZ*IHZM*YYMM*VZ*MHKV*ASM*DATPTH*SHOTEF*MZM*TRHMDL*TLUSH*MAZAV*PELE*JOMHBZ*JOMNS*EMAIL
^SCR("LKHP","P","REF",4)
^VRM($P,LKH,3)
^SCR("LKHP","P","REF",4,"RZD")
*
^SCR("LKHP","P","REF",4,"STR")
HAGAA*INTERES
^SCR("LKHP1")
H
^SCR("LKHP1",1)
                                                                       1]      
^SCR("LKHP1",2)
                                                                               
^SCR("LKHP1",3)
                                 {05                  } : i`xy` qihxk          
^SCR("LKHP1",4)
                                          {08: yceg  {07: dpy cr swez          
^SCR("LKHP1",5)
                                                                               
^SCR("LKHP1",6)
                         {                    12} {10 } :    ribd ji`          
^SCR("LKHP1",7)
                                                                               
^SCR("LKHP1",8)
                         {                    16} {15 } : oiipern dna          
^SCR("LKHP1",9)
                                                                               
^SCR("LKHP1",10)
              [1                                                               
^SCR("LKHP1",11)
                                                                               
^SCR("LKHP1","A",1)

^SCR("LKHP1","A",2)

^SCR("LKHP1","A",3)
:‰€˜™€‘‰ˆ˜‹
^SCR("LKHP1","A",4)
:™ƒ…‡:„�™ƒ’“—…š
^SCR("LKHP1","A",5)

^SCR("LKHP1","A",6)
:’‰‚„Š‰€
^SCR("LKHP1","A",7)

^SCR("LKHP1","A",8)
:�‰‰�…’Ž„Ž�
^SCR("LKHP1","A",9)

^SCR("LKHP1","A",10)

^SCR("LKHP1","A",11)

^SCR("LKHP1","AV",1)

^SCR("LKHP1","AV",2)

^SCR("LKHP1","AV",3)
:htratxhyrf
^SCR("LKHP1","AV",4)
:asuj:vbasg;eu,
^SCR("LKHP1","AV",5)

^SCR("LKHP1","AV",6)
:ghdvlht
^SCR("LKHP1","AV",7)

^SCR("LKHP1","AV",8)
:ihhbugnvnc
^SCR("LKHP1","AV",9)

^SCR("LKHP1","AV",10)

^SCR("LKHP1","AV",11)

^SCR("LKHP1","NAME")

^SCR("LKHP1","P",5,"CRD")
3,33,N,19,0
^SCR("LKHP1","P",5,"HELP")

^SCR("LKHP1","P",5,"LMAX")
21
^SCR("LKHP1","P",5,"MUMPS1")

^SCR("LKHP1","P",5,"MUMPS2")
K %SCO I 'VZ S %SCO="YY,MM",(YY,MM)=""
^SCR("LKHP1","P",5,"TYP")
N
^SCR("LKHP1","P",7,"CRD")
4,53,E,2,0
^SCR("LKHP1","P",7,"HELP")

^SCR("LKHP1","P",7,"LMAX")
3
^SCR("LKHP1","P",7,"MUMPS1")

^SCR("LKHP1","P",7,"MUMPS2")

^SCR("LKHP1","P",7,"MUST")

^SCR("LKHP1","P",7,"TYP")
E
^SCR("LKHP1","P",8,"CRD")
4,42,E,2,0
^SCR("LKHP1","P",8,"HELP")

^SCR("LKHP1","P",8,"LMAX")
3
^SCR("LKHP1","P",8,"MUMPS1")

^SCR("LKHP1","P",8,"MUMPS2")

^SCR("LKHP1","P",8,"MUST")

^SCR("LKHP1","P",8,"TYP")
E
^SCR("LKHP1","P",10,"CHECK")
Y
^SCR("LKHP1","P",10,"CRD")
6,50,E,4,0
^SCR("LKHP1","P",10,"CREAT")

^SCR("LKHP1","P",10,"FNC")

^SCR("LKHP1","P",10,"GLOB")
HAGAA
^SCR("LKHP1","P",10,"HELP")

^SCR("LKHP1","P",10,"LMAX")
4
^SCR("LKHP1","P",10,"MUMPS1")

^SCR("LKHP1","P",10,"MUMPS2")

^SCR("LKHP1","P",10,"NLN")
20
^SCR("LKHP1","P",10,"NS")
drbd zeaiq zlah
^SCR("LKHP1","P",10,"RZD")
\
^SCR("LKHP1","P",10,"TOPB")
8
^SCR("LKHP1","P",10,"TYP")
E
^SCR("LKHP1","P",10,"VRB")
HAGAA1
^SCR("LKHP1","P",12,"CRD")
6,49,H,23
^SCR("LKHP1","P",12,"HELP")

^SCR("LKHP1","P",12,"LMAX")
23
^SCR("LKHP1","P",12,"MUMPS1")

^SCR("LKHP1","P",12,"MUMPS2")

^SCR("LKHP1","P",12,"OUTPUT")

^SCR("LKHP1","P",12,"TYP")
H
^SCR("LKHP1","P",15,"CHECK")
Y
^SCR("LKHP1","P",15,"CRD")
8,50,E,4,0
^SCR("LKHP1","P",15,"CREAT")

^SCR("LKHP1","P",15,"FNC")

^SCR("LKHP1","P",15,"GLOB")
INTERES
^SCR("LKHP1","P",15,"HELP")

^SCR("LKHP1","P",15,"LMAX")
4
^SCR("LKHP1","P",15,"MUMPS1")

^SCR("LKHP1","P",15,"MUMPS2")

^SCR("LKHP1","P",15,"NLN")
20
^SCR("LKHP1","P",15,"NS")
zepiprzd zlah
^SCR("LKHP1","P",15,"RZD")
\
^SCR("LKHP1","P",15,"TOPB")
8
^SCR("LKHP1","P",15,"TYP")
E
^SCR("LKHP1","P",15,"VRB")
INTERES1
^SCR("LKHP1","P",16,"CRD")
8,49,H,23
^SCR("LKHP1","P",16,"HELP")

^SCR("LKHP1","P",16,"LMAX")
23
^SCR("LKHP1","P",16,"MUMPS1")

^SCR("LKHP1","P",16,"MUMPS2")

^SCR("LKHP1","P",16,"OUTPUT")

^SCR("LKHP1","P",16,"TYP")
H
^SCR("LKHP1","P","NAME","HAGAA")
10
^SCR("LKHP1","P","NAME","HAGAA1")
12
^SCR("LKHP1","P","NAME","INTERES")
15
^SCR("LKHP1","P","NAME","INTERES1")
16
^SCR("LKHP1","P","NAME","MM")
8
^SCR("LKHP1","P","NAME","VZ")
5
^SCR("LKHP1","P","NAME","YY")
7
^SCR("LKHP1","P","NM",5)
VZ
^SCR("LKHP1","P","NM",7)
YY
^SCR("LKHP1","P","NM",8)
MM
^SCR("LKHP1","P","NM",10)
HAGAA
^SCR("LKHP1","P","NM",12)
HAGAA1
^SCR("LKHP1","P","NM",15)
INTERES
^SCR("LKHP1","P","NM",16)
INTERES1
^SCR("LKHP1","P","RB",1)
2,15,11,73
^SCR("LKHPT")
H
^SCR("LKHPT",1)
     {                               10}: my {05         }:(ycg- 0) gewl xtqn  
^SCR("LKHPT",2)
                                                                           1]  
^SCR("LKHPT",3)
                                {12      :oeayg                { 11}:  avn     
^SCR("LKHPT",4)
                              {20 } 'qn {                        15}: aegx     
^SCR("LKHPT",5)
                                   {  23} dqipk    {22 }:dxic {  21}: dnew     
^SCR("LKHPT",6)
                   {                                             24}: dxrd     
^SCR("LKHPT",7)
                     {                  26}:xir           {25     }: cewin     
^SCR("LKHPT",8)
                      {28         }: ciip oetlh    {27       }:       .f.z     
^SCR("LKHPT",9)
                      {35         }:dcear oetlh   {30        }:  zia oetlh     
^SCR("LKHPT",10)
                      {41         }:       mcen   {40        }:        qwt     
^SCR("LKHPT",11)
                      {42                                    }:     E-MAIL     
^SCR("LKHPT",12)
    {48   }%:gewll dgpd {           46} {45 :gewl beq {      44}{43: revwn     
^SCR("LKHPT",13)
            {50      } :   dgizt jix`z               {49     }: dcil jix`z     
^SCR("LKHPT",14)
            {52      } : oi`eyip jix`z      {51     }:bef za/oa dcil jix`z     
^SCR("LKHPT",15)
                                            {53     }: oecrenl dqipk jix`z     
^SCR("LKHPT",16)
              { 57}:dpnfdl xeyi`  { 55}: dtwdl xeyi`  { 54}:    wiyl xeyi`     
^SCR("LKHPT",17)
            {59   }:    reaw xign     {58                 }:  yelz ly ieey     
^SCR("LKHPT",18)
         { 63}: oinfnd my  { 62}: `zknq` le`yl  {60       }:    i`xy` lceb     
^SCR("LKHPT",19)
                           {68 }: + shey melyz  {65       }:zeipw itl dxzi     
^SCR("LKHPT",20)
                                     {70       }: zelawe zeipeayg itl dxzi     
^SCR("LKHPT",21)
  [1                                                                           
^SCR("LKHPT","A",1)
:�™:(™ƒ‡-0)‡…—Œ˜”‘Ž
^SCR("LKHPT","A",2)

^SCR("LKHPT","A",3)
:�…�™‡:�–Ž
^SCR("LKHPT","A",4)
'‘Ž:�…‡˜
^SCR("LKHPT","A",5)
„‘‰�‹:„˜‰ƒ:„Ž…—
^SCR("LKHPT","A",6)
:„˜’„
^SCR("LKHPT","A",7)
:˜‰’:ƒ…—‰Ž
^SCR("LKHPT","A",8)
:ƒ‰‰��…”Œˆ:.†.š
^SCR("LKHPT","A",9)
:„ƒ…�’�…”Œˆ:š‰��…”Œˆ
^SCR("LKHPT","A",10)
:�ƒ…Ž:‘—”
^SCR("LKHPT","A",11)
:E-MAIL
^SCR("LKHPT","A",12)
%:‡…—ŒŒ„‡�„:‡…—Œ‚…‘:’…–—Ž
^SCR("LKHPT","A",13)
:„‡‰š”Š‰˜€š:„ƒ‰ŒŠ‰˜€š
^SCR("LKHPT","A",14)
:�‰€…™‰�Š‰˜€š:‚…†š�/��„ƒ‰ŒŠ‰˜€š
^SCR("LKHPT","A",15)
:�…ƒ’…ŽŒ„‘‰�‹Š‰˜€š
^SCR("LKHPT","A",16)
:„�Ž†„Œ˜…™‰€:„”—„Œ˜…™‰€:—‰™Œ˜…™‰€
^SCR("LKHPT","A",17)
:’…�—˜‰‡Ž:™…ŒšŒ™‰……™
^SCR("LKHPT","A",18)
:�‰Ž†Ž„�™:€š‹Ž‘€Œ…€™Œ:‰€˜™€Œƒ…‚
^SCR("LKHPT","A",19)
:+“ˆ…™�…Œ™š:š…‰�—‰”Œ„˜š‰
^SCR("LKHPT","A",20)
:š…Œ�—…š…‰�…�™‡‰”Œ„˜š‰
^SCR("LKHPT","A",21)

^SCR("LKHPT","AV",1)
:oa:(asj-0)juekrpxn
^SCR("LKHPT","AV",2)

^SCR("LKHPT","AV",3)
:iucaj:cmn
^SCR("LKHPT","AV",4)
wxn:cujr
^SCR("LKHPT","AV",5)
vxhbf:vrhs:vnue
^SCR("LKHPT","AV",6)
:vrgv
^SCR("LKHPT","AV",7)
:rhg:suehn
^SCR("LKHPT","AV",8)
:shhbiupky:/z/,
^SCR("LKHPT","AV",9)
:vsucgiupky:,hciupky
^SCR("LKHPT","AV",10)
:osun:xep
^SCR("LKHPT","AV",11)
:E-MAIL
^SCR("LKHPT","AV",12)
%:juekkvjbv:juekdux:gumen
^SCR("LKHPT","AV",13)
:vjh,plhrt,:vshklhrt,
^SCR("LKHPT","AV",14)
:ihtuahblhrt,:duz,cqicvshklhrt,
^SCR("LKHPT","AV",15)
:iusgunkvxhbflhrt,
^SCR("LKHPT","AV",16)
:vbnzvkruaht:vpevkruaht:ehakruaht
^SCR("LKHPT","AV",17)
:gucerhjn:auk,kahuua
^SCR("LKHPT","AV",18)
:ihnznvoa:t,fnxtkutak:htratksud
^SCR("LKHPT","AV",19)
:+;yuaouka,:,uhbehpkvr,h
^SCR("LKHPT","AV",20)
:,ukceu,uhbucajhpkvr,h
^SCR("LKHPT","AV",21)

^SCR("LKHPT","NAME")
gewl qihxk
^SCR("LKHPT","P",5,"CRD")
1,45,E,12,0
^SCR("LKHPT","P",5,"FNC")
F8,F9,F10
^SCR("LKHPT","P",5,"GLOB")
LKH
^SCR("LKHPT","P",5,"HELP")
<F10> oeayg itl, <F9> .f.z itl , <F8> lh itl ,<F6> my itl yetig
^SCR("LKHPT","P",5,"LMAX")
12
^SCR("LKHPT","P",5,"MUMPS1")
S %ZMSL("bf")="&<>SC"
^SCR("LKHPT","P",5,"MUMPS2")
D LKH^KLLKHS
^SCR("LKHPT","P",5,"MUST")

^SCR("LKHPT","P",5,"NLN")
20
^SCR("LKHPT","P",5,"RZD")
\
^SCR("LKHPT","P",5,"TOPB")
8
^SCR("LKHPT","P",5,"TYP")
E
^SCR("LKHPT","P",5,"VRB")
LKH1
^SCR("LKHPT","P",10,"CRD")
1,40,H,34
^SCR("LKHPT","P",10,"HELP")
<F7> - dnec my mr miqihxk yetig 
^SCR("LKHPT","P",10,"LMAX")
34
^SCR("LKHPT","P",10,"MUMPS1")

^SCR("LKHPT","P",10,"MUMPS2")
D BDIKA^KLLKHS
^SCR("LKHPT","P",10,"TYP")
H
^SCR("LKHPT","P",11,"CRD")
3,68,H,1
^SCR("LKHPT","P",11,"HELP")
cala zepnfdl xebq - d ,xebq - q ,gezt - t
^SCR("LKHPT","P",11,"LMAX")
4
^SCR("LKHPT","P",11,"MUMPS1")
S:$G(MAZAV)'="q"&($G(MAZAV)'="d") MAZAV="t"
^SCR("LKHPT","P",11,"MUMPS2")
D MAZAV^KLLKHS
^SCR("LKHPT","P",11,"TYP")
H
^SCR("LKHPT","P",12,"CRD")
3,32,E,8,0
^SCR("LKHPT","P",12,"HELP")

^SCR("LKHPT","P",12,"LMAX")
9
^SCR("LKHPT","P",12,"MUMPS1")

^SCR("LKHPT","P",12,"MUMPS2")

^SCR("LKHPT","P",12,"TYP")
E
^SCR("LKHPT","P",15,"CRD")
4,68,H,25
^SCR("LKHPT","P",15,"HELP")

^SCR("LKHPT","P",15,"LMAX")
27
^SCR("LKHPT","P",15,"MUMPS1")

^SCR("LKHPT","P",15,"MUMPS2")
S KTOV=$TR(KTOV,"{}\*","()/X")
^SCR("LKHPT","P",15,"MUST")

^SCR("LKHPT","P",15,"TYP")
H
^SCR("LKHPT","P",20,"CRD")
4,30,E,3,0
^SCR("LKHPT","P",20,"HELP")

^SCR("LKHPT","P",20,"LMAX")
4
^SCR("LKHPT","P",20,"MUMPS1")

^SCR("LKHPT","P",20,"MUMPS2")

^SCR("LKHPT","P",20,"TYP")
E
^SCR("LKHPT","P",21,"CRD")
5,68,H,4
^SCR("LKHPT","P",21,"HELP")

^SCR("LKHPT","P",21,"LMAX")
5
^SCR("LKHPT","P",21,"MUMPS1")

^SCR("LKHPT","P",21,"MUMPS2")

^SCR("LKHPT","P",21,"TYP")
H
^SCR("LKHPT","P",22,"CRD")
5,51,E,4,0
^SCR("LKHPT","P",22,"HELP")

^SCR("LKHPT","P",22,"LMAX")
4
^SCR("LKHPT","P",22,"MUMPS1")

^SCR("LKHPT","P",22,"MUMPS2")

^SCR("LKHPT","P",22,"TYP")
E
^SCR("LKHPT","P",23,"CRD")
5,41,H,5
^SCR("LKHPT","P",23,"HELP")

^SCR("LKHPT","P",23,"LMAX")
5
^SCR("LKHPT","P",23,"MUMPS1")

^SCR("LKHPT","P",23,"MUMPS2")

^SCR("LKHPT","P",23,"TYP")
H
^SCR("LKHPT","P",24,"CRD")
6,68,H,48
^SCR("LKHPT","P",24,"HELP")

^SCR("LKHPT","P",24,"LMAX")
48
^SCR("LKHPT","P",24,"MUMPS1")

^SCR("LKHPT","P",24,"MUMPS2")

^SCR("LKHPT","P",24,"TYP")
H
^SCR("LKHPT","P",25,"CRD")
7,58,E,7,0
^SCR("LKHPT","P",25,"HELP")

^SCR("LKHPT","P",25,"LMAX")
8
^SCR("LKHPT","P",25,"MUMPS1")

^SCR("LKHPT","P",25,"MUMPS2")

^SCR("LKHPT","P",25,"TYP")
E
^SCR("LKHPT","P",26,"CRD")
7,43,H,20
^SCR("LKHPT","P",26,"FNC")

^SCR("LKHPT","P",26,"GLOB")
P1IR
^SCR("LKHPT","P",26,"HELP")

^SCR("LKHPT","P",26,"LMAX")
21
^SCR("LKHPT","P",26,"MUMPS1")
S:$G(IR)="" IR=$G(^P1PRM("IR"))
^SCR("LKHPT","P",26,"MUMPS2")

^SCR("LKHPT","P",26,"NLN")
20
^SCR("LKHPT","P",26,"RZD")
\
^SCR("LKHPT","P",26,"TOPB")
8
^SCR("LKHPT","P",26,"TYP")
H
^SCR("LKHPT","P",26,"VRB")
IR
^SCR("LKHPT","P",27,"CRD")
8,51,E,9,0
^SCR("LKHPT","P",27,"HELP")

^SCR("LKHPT","P",27,"LMAX")
10
^SCR("LKHPT","P",27,"MUMPS1")

^SCR("LKHPT","P",27,"MUMPS2")

^SCR("LKHPT","P",27,"TYP")
E
^SCR("LKHPT","P",28,"CRD")
8,22,E,11,0
^SCR("LKHPT","P",28,"HELP")

^SCR("LKHPT","P",28,"LMAX")
12
^SCR("LKHPT","P",28,"MUMPS1")

^SCR("LKHPT","P",28,"MUMPS2")

^SCR("LKHPT","P",28,"TYP")
E
^SCR("LKHPT","P",30,"CRD")
9,50,E,11,0
^SCR("LKHPT","P",30,"HELP")

^SCR("LKHPT","P",30,"LMAX")
11
^SCR("LKHPT","P",30,"MUMPS1")

^SCR("LKHPT","P",30,"MUMPS2")

^SCR("LKHPT","P",30,"TYP")
E
^SCR("LKHPT","P",35,"CRD")
9,22,E,11,0
^SCR("LKHPT","P",35,"HELP")

^SCR("LKHPT","P",35,"LMAX")
12
^SCR("LKHPT","P",35,"MUMPS1")

^SCR("LKHPT","P",35,"MUMPS2")

^SCR("LKHPT","P",35,"TYP")
E
^SCR("LKHPT","P",40,"CRD")
10,50,E,11,0
^SCR("LKHPT","P",40,"HELP")

^SCR("LKHPT","P",40,"LMAX")
11
^SCR("LKHPT","P",40,"MUMPS1")

^SCR("LKHPT","P",40,"MUMPS2")

^SCR("LKHPT","P",40,"TYP")
E
^SCR("LKHPT","P",41,"CRD")
10,22,E,11,0
^SCR("LKHPT","P",41,"HELP")

^SCR("LKHPT","P",41,"LMAX")
12
^SCR("LKHPT","P",41,"MUMPS1")

^SCR("LKHPT","P",41,"MUMPS2")

^SCR("LKHPT","P",41,"TYP")
E
^SCR("LKHPT","P",42,"CRD")
11,22,E,36,0
^SCR("LKHPT","P",42,"HELP")

^SCR("LKHPT","P",42,"LMAX")
39
^SCR("LKHPT","P",42,"MUMPS1")

^SCR("LKHPT","P",42,"MUMPS2")

^SCR("LKHPT","P",42,"TYP")
E
^SCR("LKHPT","P",43,"CHECK")
Y
^SCR("LKHPT","P",43,"CRD")
12,64,E,3,0
^SCR("LKHPT","P",43,"CREAT")

^SCR("LKHPT","P",43,"FNC")

^SCR("LKHPT","P",43,"GLOB")
MIKZ
^SCR("LKHPT","P",43,"HELP")

^SCR("LKHPT","P",43,"LMAX")
3
^SCR("LKHPT","P",43,"MUMPS1")

^SCR("LKHPT","P",43,"MUMPS2")

^SCR("LKHPT","P",43,"NLN")
20
^SCR("LKHPT","P",43,"NS")
zerevwn zlah
^SCR("LKHPT","P",43,"RZD")
\
^SCR("LKHPT","P",43,"TOPB")
8
^SCR("LKHPT","P",43,"TYP")
E
^SCR("LKHPT","P",43,"VRB")
MIKZ1
^SCR("LKHPT","P",44,"CRD")
12,64,H,9
^SCR("LKHPT","P",44,"HELP")

^SCR("LKHPT","P",44,"LMAX")
9
^SCR("LKHPT","P",44,"MUMPS1")

^SCR("LKHPT","P",44,"MUMPS2")

^SCR("LKHPT","P",44,"OUTPUT")

^SCR("LKHPT","P",44,"TYP")
H
^SCR("LKHPT","P",45,"CHECK")
Y
^SCR("LKHPT","P",45,"CRD")
12,40,E,2,0
^SCR("LKHPT","P",45,"CREAT")

^SCR("LKHPT","P",45,"FNC")

^SCR("LKHPT","P",45,"GLOB")
SUGL
^SCR("LKHPT","P",45,"HELP")

^SCR("LKHPT","P",45,"LMAX")
4
^SCR("LKHPT","P",45,"MUMPS1")

^SCR("LKHPT","P",45,"MUMPS2")
S:SUGL&'$G(MHKV) AHUZ=+$G(^SUGL(SUGL,1))
^SCR("LKHPT","P",45,"MUST")

^SCR("LKHPT","P",45,"NLN")
20
^SCR("LKHPT","P",45,"NS")
zegewl ibeq zlah
^SCR("LKHPT","P",45,"RZD")
\
^SCR("LKHPT","P",45,"TOPB")
8
^SCR("LKHPT","P",45,"TYP")
E
^SCR("LKHPT","P",45,"VRB")
SUGL1
^SCR("LKHPT","P",46,"CRD")
12,39,H,14
^SCR("LKHPT","P",46,"HELP")

^SCR("LKHPT","P",46,"LMAX")
14
^SCR("LKHPT","P",46,"MUMPS1")

^SCR("LKHPT","P",46,"MUMPS2")

^SCR("LKHPT","P",46,"OUTPUT")

^SCR("LKHPT","P",46,"TYP")
H
^SCR("LKHPT","P",48,"CRD")
12,4,N,6,2
^SCR("LKHPT","P",48,"HELP")

^SCR("LKHPT","P",48,"LMAX")
6
^SCR("LKHPT","P",48,"MUMPS1")

^SCR("LKHPT","P",48,"MUMPS2")

^SCR("LKHPT","P",48,"OUTPUT")

^SCR("LKHPT","P",48,"TYP")
N
^SCR("LKHPT","P",49,"CRD")
13,53,D,8,0
^SCR("LKHPT","P",49,"HELP")

^SCR("LKHPT","P",49,"LMAX")
8
^SCR("LKHPT","P",49,"MUMPS1")

^SCR("LKHPT","P",49,"MUMPS2")

^SCR("LKHPT","P",49,"TYP")
D
^SCR("LKHPT","P",50,"CRD")
13,12,D,8,0
^SCR("LKHPT","P",50,"HELP")

^SCR("LKHPT","P",50,"LMAX")
9
^SCR("LKHPT","P",50,"MUMPS1")

^SCR("LKHPT","P",50,"MUMPS2")

^SCR("LKHPT","P",50,"OUTPUT")

^SCR("LKHPT","P",50,"TYP")
D
^SCR("LKHPT","P",51,"CRD")
14,44,D,8,0
^SCR("LKHPT","P",51,"HELP")

^SCR("LKHPT","P",51,"LMAX")
8
^SCR("LKHPT","P",51,"MUMPS1")

^SCR("LKHPT","P",51,"MUMPS2")

^SCR("LKHPT","P",51,"TYP")
D
^SCR("LKHPT","P",52,"CRD")
14,12,D,8,0
^SCR("LKHPT","P",52,"HELP")

^SCR("LKHPT","P",52,"LMAX")
9
^SCR("LKHPT","P",52,"MUMPS1")

^SCR("LKHPT","P",52,"MUMPS2")

^SCR("LKHPT","P",52,"TYP")
D
^SCR("LKHPT","P",53,"CRD")
15,44,D,8,0
^SCR("LKHPT","P",53,"HELP")

^SCR("LKHPT","P",53,"LMAX")
8
^SCR("LKHPT","P",53,"MUMPS1")

^SCR("LKHPT","P",53,"MUMPS2")

^SCR("LKHPT","P",53,"OUTPUT")

^SCR("LKHPT","P",53,"TYP")
D
^SCR("LKHPT","P",54,"CRD")
16,59,H,1
^SCR("LKHPT","P",54,"HELP")

^SCR("LKHPT","P",54,"LMAX")
4
^SCR("LKHPT","P",54,"MUMPS1")
S:$G(ICH)="" ICH="k"
^SCR("LKHPT","P",54,"MUMPS2")
I $$^%L1YN("ICH")<0 S %SC("ER")=1
^SCR("LKHPT","P",54,"TYP")
H
^SCR("LKHPT","P",55,"CRD")
16,39,H,1
^SCR("LKHPT","P",55,"HELP")

^SCR("LKHPT","P",55,"LMAX")
4
^SCR("LKHPT","P",55,"MUMPS1")
S:$G(ICR)="" ICR="k"
^SCR("LKHPT","P",55,"MUMPS2")
S:ICR="F" ICR="k" S:ICR="K" ICR="l" I ICR'="k",ICR'="l" S %SC("ER")=1
^SCR("LKHPT","P",55,"MUST")

^SCR("LKHPT","P",55,"TYP")
H
^SCR("LKHPT","P",57,"CRD")
16,19,H,1
^SCR("LKHPT","P",57,"HELP")

^SCR("LKHPT","P",57,"LMAX")
4
^SCR("LKHPT","P",57,"MUMPS1")
S:'$G(IHZM) IHZM="k"
^SCR("LKHPT","P",57,"MUMPS2")
S:IHZM="F" IHZM="k" S:IHZM="K" IHZM="l" I IHZM'="k",IHZM'="l" S %SC("ER")=1
^SCR("LKHPT","P",57,"MUST")

^SCR("LKHPT","P",57,"TYP")
H
^SCR("LKHPT","P",58,"CRD")
17,38,E,13,0
^SCR("LKHPT","P",58,"HELP")
qepea - g"y 6  , zelr - g"y 25 dti` , 31=25+6 : lynl
^SCR("LKHPT","P",58,"LMAX")
20
^SCR("LKHPT","P",58,"MUMPS1")

^SCR("LKHPT","P",58,"MUMPS2")
D TLUSH^KLLKHS
^SCR("LKHPT","P",58,"TYP")
E
^SCR("LKHPT","P",59,"CRD")
17,12,N,6,2
^SCR("LKHPT","P",59,"HELP")

^SCR("LKHPT","P",59,"LMAX")
6
^SCR("LKHPT","P",59,"MUMPS1")

^SCR("LKHPT","P",59,"MUMPS2")

^SCR("LKHPT","P",59,"TYP")
N
^SCR("LKHPT","P",60,"CRD")
18,48,N,10,2
^SCR("LKHPT","P",60,"HELP")

^SCR("LKHPT","P",60,"LMAX")
10
^SCR("LKHPT","P",60,"MUMPS1")
S:'$G(GDCR) GDCR=$G(^P1PRM("GDCR"),2000)
^SCR("LKHPT","P",60,"MUMPS2")

^SCR("LKHPT","P",60,"MUST")

^SCR("LKHPT","P",60,"TYP")
N
^SCR("LKHPT","P",62,"CRD")
18,32,H,1
^SCR("LKHPT","P",62,"HELP")

^SCR("LKHPT","P",62,"LMAX")
4
^SCR("LKHPT","P",62,"MUMPS1")
S:$G(ASM)="" ASM="l"
^SCR("LKHPT","P",62,"MUMPS2")
I $$^%L1YN("ASM")<0 S %SC("ER")=1
^SCR("LKHPT","P",62,"TYP")
H
^SCR("LKHPT","P",63,"CRD")
18,14,H,1
^SCR("LKHPT","P",63,"HELP")

^SCR("LKHPT","P",63,"LMAX")
4
^SCR("LKHPT","P",63,"MUMPS1")
S:$G(MZM)="" MZM="l"
^SCR("LKHPT","P",63,"MUMPS2")
I $$^%L1YN("MZM")<0 S %SC("ER")=1
^SCR("LKHPT","P",63,"MUST")

^SCR("LKHPT","P",63,"TYP")
H
^SCR("LKHPT","P",65,"CRD")
19,48,N,10,2
^SCR("LKHPT","P",65,"HELP")

^SCR("LKHPT","P",65,"LMAX")
10
^SCR("LKHPT","P",65,"MUMPS1")

^SCR("LKHPT","P",65,"MUMPS2")

^SCR("LKHPT","P",65,"OUTPUT")

^SCR("LKHPT","P",65,"TYP")
N
^SCR("LKHPT","P",68,"CRD")
19,27,N,3,0
^SCR("LKHPT","P",68,"HELP")

^SCR("LKHPT","P",68,"LMAX")
4
^SCR("LKHPT","P",68,"MUMPS1")

^SCR("LKHPT","P",68,"MUMPS2")

^SCR("LKHPT","P",68,"TYP")
N
^SCR("LKHPT","P",70,"CRD")
20,37,N,10,2
^SCR("LKHPT","P",70,"HELP")

^SCR("LKHPT","P",70,"LMAX")
10
^SCR("LKHPT","P",70,"MUMPS1")

^SCR("LKHPT","P",70,"MUMPS2")

^SCR("LKHPT","P",70,"OUTPUT")

^SCR("LKHPT","P",70,"TYP")
N
^SCR("LKHPT","P","NAME","AHUZ")
48
^SCR("LKHPT","P","NAME","AHUZ","REF")
$P($G(^VRM($P,LKH,2)),"*",7)
^SCR("LKHPT","P","NAME","AHUZ","REF1")
$P(^VRM($P,LKH,2),"*",7)
^SCR("LKHPT","P","NAME","ASM")
62
^SCR("LKHPT","P","NAME","ASM","REF")
$P($G(^VRM($P,LKH,2)),"*",12)
^SCR("LKHPT","P","NAME","ASM","REF1")
$P(^VRM($P,LKH,2),"*",12)
^SCR("LKHPT","P","NAME","BAIT")
20
^SCR("LKHPT","P","NAME","BAIT","REF")
$P($G(^VRM($P,LKH,1)),"*",3)
^SCR("LKHPT","P","NAME","BAIT","REF1")
$P(^VRM($P,LKH,1),"*",3)
^SCR("LKHPT","P","NAME","CMNT")
24
^SCR("LKHPT","P","NAME","CMNT","REF")
$P($G(^VRM($P,LKH,1)),"*",10)
^SCR("LKHPT","P","NAME","CMNT","REF1")
$P(^VRM($P,LKH,1),"*",10)
^SCR("LKHPT","P","NAME","CNISA")
23
^SCR("LKHPT","P","NAME","CNISA","REF")
$P($G(^VRM($P,LKH,1)),"*",9)
^SCR("LKHPT","P","NAME","CNISA","REF1")
$P(^VRM($P,LKH,1),"*",9)
^SCR("LKHPT","P","NAME","DATPTH")
50
^SCR("LKHPT","P","NAME","DATPTH","REF")
$P($G(^VRM($P,LKH,2)),"*",13)
^SCR("LKHPT","P","NAME","DATPTH","REF1")
$P(^VRM($P,LKH,2),"*",13)
^SCR("LKHPT","P","NAME","DIRA")
22
^SCR("LKHPT","P","NAME","DIRA","REF")
$P($G(^VRM($P,LKH,1)),"*",6)
^SCR("LKHPT","P","NAME","DIRA","REF1")
$P(^VRM($P,LKH,1),"*",6)
^SCR("LKHPT","P","NAME","EMAIL")
42
^SCR("LKHPT","P","NAME","EMAIL","REF")
$P($G(^VRM($P,LKH,2)),"*",22)
^SCR("LKHPT","P","NAME","EMAIL","REF1")
$P(^VRM($P,LKH,2),"*",22)
^SCR("LKHPT","P","NAME","FAX")
40
^SCR("LKHPT","P","NAME","FAX","REF")
$P($G(^VRM($P,LKH,1)),"*",15)
^SCR("LKHPT","P","NAME","FAX","REF1")
$P(^VRM($P,LKH,1),"*",15)
^SCR("LKHPT","P","NAME","GDCR")
60
^SCR("LKHPT","P","NAME","GDCR","REF")
$P($G(^VRM($P,LKH,2)),"*",3)
^SCR("LKHPT","P","NAME","GDCR","REF1")
$P(^VRM($P,LKH,2),"*",3)
^SCR("LKHPT","P","NAME","HAGAA","REF")
$P($G(^VRM($P,LKH,3)),"*",1)
^SCR("LKHPT","P","NAME","HAGAA","REF1")
$P(^VRM($P,LKH,3),"*",1)
^SCR("LKHPT","P","NAME","HESB")
12
^SCR("LKHPT","P","NAME","HESB","REF")
$P($G(^VRM($P,LKH,1)),"*",1)
^SCR("LKHPT","P","NAME","HESB","REF1")
$P(^VRM($P,LKH,1),"*",1)
^SCR("LKHPT","P","NAME","ICH")
54
^SCR("LKHPT","P","NAME","ICH","REF")
$P($G(^VRM($P,LKH,2)),"*",1)
^SCR("LKHPT","P","NAME","ICH","REF1")
$P(^VRM($P,LKH,2),"*",1)
^SCR("LKHPT","P","NAME","ICR")
55
^SCR("LKHPT","P","NAME","ICR","REF")
$P($G(^VRM($P,LKH,2)),"*",2)
^SCR("LKHPT","P","NAME","ICR","REF1")
$P(^VRM($P,LKH,2),"*",2)
^SCR("LKHPT","P","NAME","IHZM")
57
^SCR("LKHPT","P","NAME","IHZM","REF")
$P($G(^VRM($P,LKH,2)),"*",8)
^SCR("LKHPT","P","NAME","IHZM","REF1")
$P(^VRM($P,LKH,2),"*",8)
^SCR("LKHPT","P","NAME","INTERES","REF")
$P($G(^VRM($P,LKH,3)),"*",2)
^SCR("LKHPT","P","NAME","INTERES","REF1")
$P(^VRM($P,LKH,3),"*",2)
^SCR("LKHPT","P","NAME","IR")
26
^SCR("LKHPT","P","NAME","IR","REF")
$P($G(^VRM($P,LKH,1)),"*",13)
^SCR("LKHPT","P","NAME","IR","REF1")
$P(^VRM($P,LKH,1),"*",13)
^SCR("LKHPT","P","NAME","ITRA")
65
^SCR("LKHPT","P","NAME","ITRA","REF")
$P($G(^VRM($P,LKH,2)),"*",4)
^SCR("LKHPT","P","NAME","ITRA","REF1")
$P(^VRM($P,LKH,2),"*",4)
^SCR("LKHPT","P","NAME","ITRAH")
70
^SCR("LKHPT","P","NAME","JOMH")
49
^SCR("LKHPT","P","NAME","JOMH","REF")
$P($G(^VRM($P,LKH,1)),"*",17)
^SCR("LKHPT","P","NAME","JOMH","REF1")
$P(^VRM($P,LKH,1),"*",17)
^SCR("LKHPT","P","NAME","JOMHBZ")
51
^SCR("LKHPT","P","NAME","JOMHBZ","REF")
$P($G(^VRM($P,LKH,2)),"*",20)
^SCR("LKHPT","P","NAME","JOMHBZ","REF1")
$P(^VRM($P,LKH,2),"*",20)
^SCR("LKHPT","P","NAME","JOMNS")
52
^SCR("LKHPT","P","NAME","JOMNS","REF")
$P($G(^VRM($P,LKH,2)),"*",21)
^SCR("LKHPT","P","NAME","JOMNS","REF1")
$P(^VRM($P,LKH,2),"*",21)
^SCR("LKHPT","P","NAME","KODSK","REF")
$P($G(^VRM($P,LKH,2)),"*",6)
^SCR("LKHPT","P","NAME","KODSK","REF1")
$P(^VRM($P,LKH,2),"*",6)
^SCR("LKHPT","P","NAME","KOMA")
21
^SCR("LKHPT","P","NAME","KOMA","REF")
$P($G(^VRM($P,LKH,1)),"*",4)
^SCR("LKHPT","P","NAME","KOMA","REF1")
$P(^VRM($P,LKH,1),"*",4)
^SCR("LKHPT","P","NAME","KTOV")
15
^SCR("LKHPT","P","NAME","KTOV","REF")
$P($G(^VRM($P,LKH,1)),"*",5)
^SCR("LKHPT","P","NAME","KTOV","REF1")
$P(^VRM($P,LKH,1),"*",5)
^SCR("LKHPT","P","NAME","LKH")
5
^SCR("LKHPT","P","NAME","LKH","KEY")

^SCR("LKHPT","P","NAME","LKH","KEY",1)
LKH/\LKH1
^SCR("LKHPT","P","NAME","LKH","KEY",2)
LKH/\HESB,TZ,BAIT,KOMA,KTOV,DIRA,TELB,TELA,CNISA,CMNT,TIDK,TIDK1,IR,MIKUD,FAX,SUGL,JOMH,MIKZ,MODEM
^SCR("LKHPT","P","NAME","LKH","KEY",3)
LKH/\ICH,ICR,GDCR,ITRA,SUGL,KODSK,AHUZ,IHZM,YYMM,VZ,MHKV,ASM,DATPTH,SHOTEF,MZM,TRHMDL,TLUSH,MAZAV,PELE,JOMHBZ,JOMNS,EMAIL
^SCR("LKHPT","P","NAME","LKH","KEY",4)
LKH/\HAGAA,INTERES
^SCR("LKHPT","P","NAME","LKH1")
10
^SCR("LKHPT","P","NAME","LKH1","REF")
$P($G(^VRM($P,LKH)),"*",1)
^SCR("LKHPT","P","NAME","LKH1","REF1")
$P(^VRM($P,LKH),"*",1)
^SCR("LKHPT","P","NAME","MAZAV")
11
^SCR("LKHPT","P","NAME","MAZAV","REF")
$P($G(^VRM($P,LKH,2)),"*",18)
^SCR("LKHPT","P","NAME","MAZAV","REF1")
$P(^VRM($P,LKH,2),"*",18)
^SCR("LKHPT","P","NAME","MHKV")
59
^SCR("LKHPT","P","NAME","MHKV","REF")
$P($G(^VRM($P,LKH,2)),"*",11)
^SCR("LKHPT","P","NAME","MHKV","REF1")
$P(^VRM($P,LKH,2),"*",11)
^SCR("LKHPT","P","NAME","MIKUD")
25
^SCR("LKHPT","P","NAME","MIKUD","REF")
$P($G(^VRM($P,LKH,1)),"*",14)
^SCR("LKHPT","P","NAME","MIKUD","REF1")
$P(^VRM($P,LKH,1),"*",14)
^SCR("LKHPT","P","NAME","MIKZ")
43
^SCR("LKHPT","P","NAME","MIKZ","REF")
$P($G(^VRM($P,LKH,1)),"*",18)
^SCR("LKHPT","P","NAME","MIKZ","REF1")
$P(^VRM($P,LKH,1),"*",18)
^SCR("LKHPT","P","NAME","MIKZ1")
44
^SCR("LKHPT","P","NAME","MODEM")
41
^SCR("LKHPT","P","NAME","MODEM","REF")
$P($G(^VRM($P,LKH,1)),"*",19)
^SCR("LKHPT","P","NAME","MODEM","REF1")
$P(^VRM($P,LKH,1),"*",19)
^SCR("LKHPT","P","NAME","MZM")
63
^SCR("LKHPT","P","NAME","MZM","REF")
$P($G(^VRM($P,LKH,2)),"*",15)
^SCR("LKHPT","P","NAME","MZM","REF1")
$P(^VRM($P,LKH,2),"*",15)
^SCR("LKHPT","P","NAME","PELE")
28
^SCR("LKHPT","P","NAME","PELE","REF")
$P($G(^VRM($P,LKH,2)),"*",19)
^SCR("LKHPT","P","NAME","PELE","REF1")
$P(^VRM($P,LKH,2),"*",19)
^SCR("LKHPT","P","NAME","SHOTEF")
68
^SCR("LKHPT","P","NAME","SHOTEF","REF")
$P($G(^VRM($P,LKH,2)),"*",14)
^SCR("LKHPT","P","NAME","SHOTEF","REF1")
$P(^VRM($P,LKH,2),"*",14)
^SCR("LKHPT","P","NAME","SUGL")
45
^SCR("LKHPT","P","NAME","SUGL","REF")
$P($G(^VRM($P,LKH,2)),"*",5)
^SCR("LKHPT","P","NAME","SUGL","REF1")
$P(^VRM($P,LKH,2),"*",5)
^SCR("LKHPT","P","NAME","SUGL1")
46
^SCR("LKHPT","P","NAME","TELA")
35
^SCR("LKHPT","P","NAME","TELA","REF")
$P($G(^VRM($P,LKH,1)),"*",8)
^SCR("LKHPT","P","NAME","TELA","REF1")
$P(^VRM($P,LKH,1),"*",8)
^SCR("LKHPT","P","NAME","TELB")
30
^SCR("LKHPT","P","NAME","TELB","REF")
$P($G(^VRM($P,LKH,1)),"*",7)
^SCR("LKHPT","P","NAME","TELB","REF1")
$P(^VRM($P,LKH,1),"*",7)
^SCR("LKHPT","P","NAME","TIDK","REF")
$P($G(^VRM($P,LKH,1)),"*",11)
^SCR("LKHPT","P","NAME","TIDK","REF1")
$P(^VRM($P,LKH,1),"*",11)
^SCR("LKHPT","P","NAME","TIDK1","REF")
$P($G(^VRM($P,LKH,1)),"*",12)
^SCR("LKHPT","P","NAME","TIDK1","REF1")
$P(^VRM($P,LKH,1),"*",12)
^SCR("LKHPT","P","NAME","TLUSH")
58
^SCR("LKHPT","P","NAME","TLUSH","REF")
$P($G(^VRM($P,LKH,2)),"*",17)
^SCR("LKHPT","P","NAME","TLUSH","REF1")
$P(^VRM($P,LKH,2),"*",17)
^SCR("LKHPT","P","NAME","TRHMDL")
53
^SCR("LKHPT","P","NAME","TRHMDL","REF")
$P($G(^VRM($P,LKH,2)),"*",16)
^SCR("LKHPT","P","NAME","TRHMDL","REF1")
$P(^VRM($P,LKH,2),"*",16)
^SCR("LKHPT","P","NAME","TZ")
27
^SCR("LKHPT","P","NAME","TZ","REF")
$P($G(^VRM($P,LKH,1)),"*",2)
^SCR("LKHPT","P","NAME","TZ","REF1")
$P(^VRM($P,LKH,1),"*",2)
^SCR("LKHPT","P","NAME","VZ","REF")
$P($G(^VRM($P,LKH,2)),"*",10)
^SCR("LKHPT","P","NAME","VZ","REF1")
$P(^VRM($P,LKH,2),"*",10)
^SCR("LKHPT","P","NAME","YYMM","REF")
$P($G(^VRM($P,LKH,2)),"*",9)
^SCR("LKHPT","P","NAME","YYMM","REF1")
$P(^VRM($P,LKH,2),"*",9)
^SCR("LKHPT","P","NM",5)
LKH
^SCR("LKHPT","P","NM",10)
LKH1
^SCR("LKHPT","P","NM",11)
MAZAV
^SCR("LKHPT","P","NM",12)
HESB
^SCR("LKHPT","P","NM",15)
KTOV
^SCR("LKHPT","P","NM",20)
BAIT
^SCR("LKHPT","P","NM",21)
KOMA
^SCR("LKHPT","P","NM",22)
DIRA
^SCR("LKHPT","P","NM",23)
CNISA
^SCR("LKHPT","P","NM",24)
CMNT
^SCR("LKHPT","P","NM",25)
MIKUD
^SCR("LKHPT","P","NM",26)
IR
^SCR("LKHPT","P","NM",27)
TZ
^SCR("LKHPT","P","NM",28)
PELE
^SCR("LKHPT","P","NM",30)
TELB
^SCR("LKHPT","P","NM",35)
TELA
^SCR("LKHPT","P","NM",40)
FAX
^SCR("LKHPT","P","NM",41)
MODEM
^SCR("LKHPT","P","NM",42)
EMAIL
^SCR("LKHPT","P","NM",43)
MIKZ
^SCR("LKHPT","P","NM",44)
MIKZ1
^SCR("LKHPT","P","NM",45)
SUGL
^SCR("LKHPT","P","NM",46)
SUGL1
^SCR("LKHPT","P","NM",48)
AHUZ
^SCR("LKHPT","P","NM",49)
JOMH
^SCR("LKHPT","P","NM",50)
DATPTH
^SCR("LKHPT","P","NM",51)
JOMHBZ
^SCR("LKHPT","P","NM",52)
JOMNS
^SCR("LKHPT","P","NM",53)
TRHMDL
^SCR("LKHPT","P","NM",54)
ICH
^SCR("LKHPT","P","NM",55)
ICR
^SCR("LKHPT","P","NM",57)
IHZM
^SCR("LKHPT","P","NM",58)
TLUSH
^SCR("LKHPT","P","NM",59)
MHKV
^SCR("LKHPT","P","NM",60)
GDCR
^SCR("LKHPT","P","NM",62)
ASM
^SCR("LKHPT","P","NM",63)
MZM
^SCR("LKHPT","P","NM",65)
ITRA
^SCR("LKHPT","P","NM",68)
SHOTEF
^SCR("LKHPT","P","NM",70)
ITRAH
^SCR("LKHPT","P","RB",1)
3,3,22,77
^SCR("LKHPT","P","REF",1)
^VRM($P,LKH)
^SCR("LKHPT","P","REF",1,"RZD")
*
^SCR("LKHPT","P","REF",1,"STR")
LKH1
^SCR("LKHPT","P","REF",2)
^VRM($P,LKH,1)
^SCR("LKHPT","P","REF",2,"RZD")
*
^SCR("LKHPT","P","REF",2,"STR")
HESB*TZ*BAIT*KOMA*KTOV*DIRA*TELB*TELA*CNISA*CMNT*TIDK*TIDK1*IR*MIKUD*FAX*SUGL*JOMH*MIKZ*MODEM
^SCR("LKHPT","P","REF",3)
^VRM($P,LKH,2)
^SCR("LKHPT","P","REF",3,"RZD")
*
^SCR("LKHPT","P","REF",3,"STR")
ICH*ICR*GDCR*ITRA*SUGL*KODSK*AHUZ*IHZM*YYMM*VZ*MHKV*ASM*DATPTH*SHOTEF*MZM*TRHMDL*TLUSH*MAZAV*PELE*JOMHBZ*JOMNS*EMAIL
^SCR("LKHPT","P","REF",4)
^VRM($P,LKH,3)
^SCR("LKHPT","P","REF",4,"RZD")
*
^SCR("LKHPT","P","REF",4,"STR")
HAGAA*INTERES
^SCR("M1GETDET")
H
^SCR("M1GETDET",1)
     {05                                        } qtihlen qihxk 'qn            
^SCR("M1GETDET",2)
                                            {07    }:      PIN-CODE            
^SCR("M1GETDET",3)
                                                                         1]    
^SCR("M1GETDET",4)
                          {                      10}:       gewl my            
^SCR("M1GETDET",5)
                          {                      15}:  iy`x gewl my            
^SCR("M1GETDET",6)
                                               {16 }:           lib            
^SCR("M1GETDET",7)
                                                                               
^SCR("M1GETDET",8)
                                          {20      }:    zitqk dxzi            
^SCR("M1GETDET",9)
                                          {25      }:   zecewp dxzi            
^SCR("M1GETDET",10)
                                                                               
^SCR("M1GETDET",11)
                                                                               
^SCR("M1GETDET",12)
             [1                                                                
^SCR("M1GETDET",13)
                                                                               
^SCR("M1GETDET",14)
                                                                               
^SCR("M1GETDET",15)
      {                                                           30}: drced   
^SCR("M1GETDET",16)
                                                                               
^SCR("M1GETDET",17)
                                                                               
^SCR("M1GETDET",18)
                                                                               
^SCR("M1GETDET",19)
              {                                            35} : d`iby zrced   
^SCR("M1GETDET","A",1)
‘”‰ˆŒ…Ž‘‰ˆ˜‹'‘Ž
^SCR("M1GETDET","A",2)
:PIN-CODE
^SCR("M1GETDET","A",3)

^SCR("M1GETDET","A",4)
:‡…—Œ�™
^SCR("M1GETDET","A",5)
:‰™€˜‡…—Œ�™
^SCR("M1GETDET","A",6)
:Œ‰‚
^SCR("M1GETDET","A",7)

^SCR("M1GETDET","A",8)
:š‰”‘‹„˜š‰
^SCR("M1GETDET","A",9)
:š…ƒ…—�„˜š‰
^SCR("M1GETDET","A",10)

^SCR("M1GETDET","A",11)

^SCR("M1GETDET","A",12)

^SCR("M1GETDET","A",13)

^SCR("M1GETDET","A",14)

^SCR("M1GETDET","A",15)
:„’ƒ…„
^SCR("M1GETDET","A",16)

^SCR("M1GETDET","A",17)

^SCR("M1GETDET","A",18)

^SCR("M1GETDET","A",19)
:„€‰‚™š’ƒ…„
^SCR("M1GETDET","AV",1)
xphykunxhyrfwxn
^SCR("M1GETDET","AV",2)
:PIN-CODE
^SCR("M1GETDET","AV",3)

^SCR("M1GETDET","AV",4)
:juekoa
^SCR("M1GETDET","AV",5)
:hatrjuekoa
^SCR("M1GETDET","AV",6)
:khd
^SCR("M1GETDET","AV",7)

^SCR("M1GETDET","AV",8)
:,hpxfvr,h
^SCR("M1GETDET","AV",9)
:,usuebvr,h
^SCR("M1GETDET","AV",10)

^SCR("M1GETDET","AV",11)

^SCR("M1GETDET","AV",12)

^SCR("M1GETDET","AV",13)

^SCR("M1GETDET","AV",14)

^SCR("M1GETDET","AV",15)
:vgsuv
^SCR("M1GETDET","AV",16)

^SCR("M1GETDET","AV",17)

^SCR("M1GETDET","AV",18)

^SCR("M1GETDET","AV",19)
:vthda,gsuv
^SCR("M1GETDET","NAME")

^SCR("M1GETDET","P",5,"CRD")
1,5,E,42,0
^SCR("M1GETDET","P",5,"HELP")

^SCR("M1GETDET","P",5,"LMAX")
43
^SCR("M1GETDET","P",5,"MUMPS1")
I $D(^MCARD) S MCARD=^MCARD
^SCR("M1GETDET","P",5,"MUMPS2")
D MCARD^M1GETDET
^SCR("M1GETDET","P",5,"MUST")

^SCR("M1GETDET","P",5,"TYP")
E
^SCR("M1GETDET","P",7,"CRD")
2,44,N,7,0
^SCR("M1GETDET","P",7,"HELP")

^SCR("M1GETDET","P",7,"LMAX")
7
^SCR("M1GETDET","P",7,"MUMPS1")

^SCR("M1GETDET","P",7,"MUMPS2")
D PIN^M1GETDET
^SCR("M1GETDET","P",7,"TYP")
N
^SCR("M1GETDET","P",10,"CRD")
4,52,H,25
^SCR("M1GETDET","P",10,"HELP")

^SCR("M1GETDET","P",10,"LMAX")
25
^SCR("M1GETDET","P",10,"MUMPS1")

^SCR("M1GETDET","P",10,"MUMPS2")

^SCR("M1GETDET","P",10,"OUTPUT")

^SCR("M1GETDET","P",10,"TYP")
H
^SCR("M1GETDET","P",15,"CRD")
5,52,H,25
^SCR("M1GETDET","P",15,"HELP")

^SCR("M1GETDET","P",15,"LMAX")
25
^SCR("M1GETDET","P",15,"MUMPS1")

^SCR("M1GETDET","P",15,"MUMPS2")

^SCR("M1GETDET","P",15,"OUTPUT")

^SCR("M1GETDET","P",15,"TYP")
H
^SCR("M1GETDET","P",16,"CRD")
6,47,N,2,0
^SCR("M1GETDET","P",16,"HELP")

^SCR("M1GETDET","P",16,"LMAX")
4
^SCR("M1GETDET","P",16,"MUMPS1")

^SCR("M1GETDET","P",16,"MUMPS2")

^SCR("M1GETDET","P",16,"OUTPUT")

^SCR("M1GETDET","P",16,"TYP")
N
^SCR("M1GETDET","P",20,"CRD")
8,42,E,9,0
^SCR("M1GETDET","P",20,"HELP")

^SCR("M1GETDET","P",20,"LMAX")
9
^SCR("M1GETDET","P",20,"MUMPS1")

^SCR("M1GETDET","P",20,"MUMPS2")

^SCR("M1GETDET","P",20,"OUTPUT")

^SCR("M1GETDET","P",20,"TYP")
E
^SCR("M1GETDET","P",25,"CRD")
9,42,E,5,0
^SCR("M1GETDET","P",25,"HELP")

^SCR("M1GETDET","P",25,"LMAX")
9
^SCR("M1GETDET","P",25,"MUMPS1")

^SCR("M1GETDET","P",25,"MUMPS2")

^SCR("M1GETDET","P",25,"OUTPUT")

^SCR("M1GETDET","P",25,"TYP")
E
^SCR("M1GETDET","P",30,"CRD")
15,69,HH,60*2
^SCR("M1GETDET","P",30,"HELP")

^SCR("M1GETDET","P",30,"LMAX")
62
^SCR("M1GETDET","P",30,"MUMPS1")

^SCR("M1GETDET","P",30,"MUMPS2")

^SCR("M1GETDET","P",30,"MUST")

^SCR("M1GETDET","P",30,"OUTPUT")

^SCR("M1GETDET","P",30,"TYP")
HH
^SCR("M1GETDET","P",35,"CRD")
19,62,H,47
^SCR("M1GETDET","P",35,"HELP")

^SCR("M1GETDET","P",35,"LMAX")
47
^SCR("M1GETDET","P",35,"MUMPS1")

^SCR("M1GETDET","P",35,"MUMPS2")

^SCR("M1GETDET","P",35,"OUTPUT")

^SCR("M1GETDET","P",35,"TYP")
H
^SCR("M1GETDET","P","NAME","AGE")
16
^SCR("M1GETDET","P","NAME","BLF")
20
^SCR("M1GETDET","P","NAME","CLT")
15
^SCR("M1GETDET","P","NAME","EMP")
10
^SCR("M1GETDET","P","NAME","ERR")
35
^SCR("M1GETDET","P","NAME","MCARD")
5
^SCR("M1GETDET","P","NAME","MES")
30
^SCR("M1GETDET","P","NAME","PIN")
7
^SCR("M1GETDET","P","NAME","PIT")
25
^SCR("M1GETDET","P","NM",5)
MCARD
^SCR("M1GETDET","P","NM",7)
PIN
^SCR("M1GETDET","P","NM",10)
EMP
^SCR("M1GETDET","P","NM",15)
CLT
^SCR("M1GETDET","P","NM",16)
AGE
^SCR("M1GETDET","P","NM",20)
BLF
^SCR("M1GETDET","P","NM",25)
PIT
^SCR("M1GETDET","P","NM",30)
MES
^SCR("M1GETDET","P","NM",35)
ERR
^SCR("M1GETDET","P","RB",1)
4,14,13,75
^SCR("M1GETINF")
H
^SCR("M1GETINF",1)
     {05                                        } qtihlen qihxk 'qn            
^SCR("M1GETINF",2)
                                                                         1]    
^SCR("M1GETINF",3)
                          {                      10}:       gewl my            
^SCR("M1GETINF",4)
                          {                      15}:  iy`x gewl my            
^SCR("M1GETINF",5)
                                          {20      }:    zitqk dxzi            
^SCR("M1GETINF",6)
                                          {25      }:   zecewp dxzi            
^SCR("M1GETINF",7)
                                                                               
^SCR("M1GETINF",8)
                                                                               
^SCR("M1GETINF",9)
             [1                                                                
^SCR("M1GETINF",10)
                                                                               
^SCR("M1GETINF",11)
                                                                               
^SCR("M1GETINF",12)
      {                                                           30}: drced   
^SCR("M1GETINF",13)
                                                                               
^SCR("M1GETINF",14)
                                                                               
^SCR("M1GETINF",15)
              {                                            35} : d`iby zrced   
^SCR("M1GETINF","A",1)
‘”‰ˆŒ…Ž‘‰ˆ˜‹'‘Ž
^SCR("M1GETINF","A",2)

^SCR("M1GETINF","A",3)
:‡…—Œ�™
^SCR("M1GETINF","A",4)
:‰™€˜‡…—Œ�™
^SCR("M1GETINF","A",5)
:š‰”‘‹„˜š‰
^SCR("M1GETINF","A",6)
:š…ƒ…—�„˜š‰
^SCR("M1GETINF","A",7)

^SCR("M1GETINF","A",8)

^SCR("M1GETINF","A",9)

^SCR("M1GETINF","A",10)

^SCR("M1GETINF","A",11)

^SCR("M1GETINF","A",12)
:„’ƒ…„
^SCR("M1GETINF","A",13)

^SCR("M1GETINF","A",14)

^SCR("M1GETINF","A",15)
:„€‰‚™š’ƒ…„
^SCR("M1GETINF","AV",1)
xphykunxhyrfwxn
^SCR("M1GETINF","AV",2)

^SCR("M1GETINF","AV",3)
:juekoa
^SCR("M1GETINF","AV",4)
:hatrjuekoa
^SCR("M1GETINF","AV",5)
:,hpxfvr,h
^SCR("M1GETINF","AV",6)
:,usuebvr,h
^SCR("M1GETINF","AV",7)

^SCR("M1GETINF","AV",8)

^SCR("M1GETINF","AV",9)

^SCR("M1GETINF","AV",10)

^SCR("M1GETINF","AV",11)

^SCR("M1GETINF","AV",12)
:vgsuv
^SCR("M1GETINF","AV",13)

^SCR("M1GETINF","AV",14)

^SCR("M1GETINF","AV",15)
:vthda,gsuv
^SCR("M1GETINF","NAME")

^SCR("M1GETINF","P",5,"CRD")
1,5,E,42,0
^SCR("M1GETINF","P",5,"HELP")

^SCR("M1GETINF","P",5,"LMAX")
43
^SCR("M1GETINF","P",5,"MUMPS1")
S TSTART=$P($H,",",2)
^SCR("M1GETINF","P",5,"MUMPS2")
D MCARD^M1GETINF
^SCR("M1GETINF","P",5,"MUST")

^SCR("M1GETINF","P",5,"TYP")
E
^SCR("M1GETINF","P",10,"CRD")
3,52,H,25
^SCR("M1GETINF","P",10,"HELP")

^SCR("M1GETINF","P",10,"LMAX")
25
^SCR("M1GETINF","P",10,"MUMPS1")

^SCR("M1GETINF","P",10,"MUMPS2")

^SCR("M1GETINF","P",10,"OUTPUT")

^SCR("M1GETINF","P",10,"TYP")
H
^SCR("M1GETINF","P",15,"CRD")
4,52,H,25
^SCR("M1GETINF","P",15,"HELP")

^SCR("M1GETINF","P",15,"LMAX")
25
^SCR("M1GETINF","P",15,"MUMPS1")

^SCR("M1GETINF","P",15,"MUMPS2")

^SCR("M1GETINF","P",15,"OUTPUT")

^SCR("M1GETINF","P",15,"TYP")
H
^SCR("M1GETINF","P",20,"CRD")
5,42,E,9,0
^SCR("M1GETINF","P",20,"HELP")

^SCR("M1GETINF","P",20,"LMAX")
9
^SCR("M1GETINF","P",20,"MUMPS1")

^SCR("M1GETINF","P",20,"MUMPS2")

^SCR("M1GETINF","P",20,"OUTPUT")

^SCR("M1GETINF","P",20,"TYP")
E
^SCR("M1GETINF","P",25,"CRD")
6,42,E,5,0
^SCR("M1GETINF","P",25,"HELP")

^SCR("M1GETINF","P",25,"LMAX")
9
^SCR("M1GETINF","P",25,"MUMPS1")

^SCR("M1GETINF","P",25,"MUMPS2")

^SCR("M1GETINF","P",25,"OUTPUT")

^SCR("M1GETINF","P",25,"TYP")
E
^SCR("M1GETINF","P",30,"CRD")
12,69,H,60*2
^SCR("M1GETINF","P",30,"HELP")

^SCR("M1GETINF","P",30,"LMAX")
62
^SCR("M1GETINF","P",30,"MUMPS1")

^SCR("M1GETINF","P",30,"MUMPS2")

^SCR("M1GETINF","P",30,"OUTPUT")

^SCR("M1GETINF","P",30,"TYP")
H
^SCR("M1GETINF","P",35,"CRD")
15,62,H,47
^SCR("M1GETINF","P",35,"HELP")

^SCR("M1GETINF","P",35,"LMAX")
47
^SCR("M1GETINF","P",35,"MUMPS1")

^SCR("M1GETINF","P",35,"MUMPS2")

^SCR("M1GETINF","P",35,"OUTPUT")

^SCR("M1GETINF","P",35,"TYP")
H
^SCR("M1GETINF","P","NAME","BLF")
20
^SCR("M1GETINF","P","NAME","CLT")
15
^SCR("M1GETINF","P","NAME","EMP")
10
^SCR("M1GETINF","P","NAME","ERR")
35
^SCR("M1GETINF","P","NAME","MCARD")
5
^SCR("M1GETINF","P","NAME","MES")
30
^SCR("M1GETINF","P","NAME","PIT")
25
^SCR("M1GETINF","P","NM",5)
MCARD
^SCR("M1GETINF","P","NM",10)
EMP
^SCR("M1GETINF","P","NM",15)
CLT
^SCR("M1GETINF","P","NM",20)
BLF
^SCR("M1GETINF","P","NM",25)
PIT
^SCR("M1GETINF","P","NM",30)
MES
^SCR("M1GETINF","P","NM",35)
ERR
^SCR("M1GETINF","P","RB",1)
3,14,10,75
^SCR("M1HZMP")
H
^SCR("M1HZMP",1)
                                {                           06} {05   } :  xvln
^SCR("M1HZMP",2)
                                                                {10   } : ogley
^SCR("M1HZMP",3)
                                                                               
^SCR("M1HZMP",4)
                                                                            1$ 
^SCR("M1HZMP",5)
                      : mekq : zenk : xign :       hixt my      : hixt cew:    
^SCR("M1HZMP",6)
                                                                               
^SCR("M1HZMP",7)
                                                                               
^SCR("M1HZMP",8)
                                                                               
^SCR("M1HZMP",9)
                                                                               
^SCR("M1HZMP",10)
                                                                               
^SCR("M1HZMP",11)
                                                                               
^SCR("M1HZMP",12)
                                                                               
^SCR("M1HZMP",13)
                                                                               
^SCR("M1HZMP",14)
                                                                               
^SCR("M1HZMP",15)
                                                                               
^SCR("M1HZMP",16)
                                                                               
^SCR("M1HZMP",17)
                                                                               
^SCR("M1HZMP",18)
                                                                               
^SCR("M1HZMP",19)
                $1                                                             
^SCR("M1HZMP",20)
                                                                               
^SCR("M1HZMP",21)
                       {20    }: melyzl                                        
^SCR("M1HZMP","A",1)
:˜–ŒŽ
^SCR("M1HZMP","A",2)
:�‡Œ…™
^SCR("M1HZMP","A",3)

^SCR("M1HZMP","A",4)

^SCR("M1HZMP","A",5)
�…‹‘š…Ž‹˜‰‡Žˆ‰˜”�™ˆ‰˜”ƒ…—
^SCR("M1HZMP","A",6)
-----------------------------------------------
^SCR("M1HZMP","A",7)

^SCR("M1HZMP","A",8)

^SCR("M1HZMP","A",9)

^SCR("M1HZMP","A",10)

^SCR("M1HZMP","A",11)

^SCR("M1HZMP","A",12)

^SCR("M1HZMP","A",13)

^SCR("M1HZMP","A",14)

^SCR("M1HZMP","A",15)

^SCR("M1HZMP","A",16)

^SCR("M1HZMP","A",17)

^SCR("M1HZMP","A",18)

^SCR("M1HZMP","A",19)

^SCR("M1HZMP","A",20)

^SCR("M1HZMP","A",21)
:�…Œ™šŒ
^SCR("M1HZMP","AV",1)
:rmkn
^SCR("M1HZMP","AV",2)
:ijkua
^SCR("M1HZMP","AV",3)

^SCR("M1HZMP","AV",4)

^SCR("M1HZMP","AV",5)
oufx,unfrhjnyhrpoayhrpsue
^SCR("M1HZMP","AV",6)
-----------------------------------------------
^SCR("M1HZMP","AV",7)

^SCR("M1HZMP","AV",8)

^SCR("M1HZMP","AV",9)

^SCR("M1HZMP","AV",10)

^SCR("M1HZMP","AV",11)

^SCR("M1HZMP","AV",12)

^SCR("M1HZMP","AV",13)

^SCR("M1HZMP","AV",14)

^SCR("M1HZMP","AV",15)

^SCR("M1HZMP","AV",16)

^SCR("M1HZMP","AV",17)

^SCR("M1HZMP","AV",18)

^SCR("M1HZMP","AV",19)

^SCR("M1HZMP","AV",20)

^SCR("M1HZMP","AV",21)
:ouka,k
^SCR("M1HZMP","G",1,"CRD")
6,74,E,6,0
^SCR("M1HZMP","G",1,"HELP")

^SCR("M1HZMP","G",1,"LMAX")
9
^SCR("M1HZMP","G",1,"MUMPS1")

^SCR("M1HZMP","G",1,"MUMPS2")

^SCR("M1HZMP","G",1,"OUTPUT")

^SCR("M1HZMP","G",1,"SHEM")
 hixt cew
^SCR("M1HZMP","G",1,"TYP")
E
^SCR("M1HZMP","G",2,"CRD")
6,64,H,20,0
^SCR("M1HZMP","G",2,"HELP")

^SCR("M1HZMP","G",2,"LMAX")
20
^SCR("M1HZMP","G",2,"MUMPS1")

^SCR("M1HZMP","G",2,"MUMPS2")

^SCR("M1HZMP","G",2,"OUTPUT")

^SCR("M1HZMP","G",2,"SHEM")
       hixt my      
^SCR("M1HZMP","G",2,"TYP")
H
^SCR("M1HZMP","G",3,"CRD")
6,43,N,6,2
^SCR("M1HZMP","G",3,"HELP")

^SCR("M1HZMP","G",3,"LMAX")
6
^SCR("M1HZMP","G",3,"MUMPS1")

^SCR("M1HZMP","G",3,"MUMPS2")

^SCR("M1HZMP","G",3,"OUTPUT")

^SCR("M1HZMP","G",3,"SHEM")
 xign 
^SCR("M1HZMP","G",3,"TYP")
N
^SCR("M1HZMP","G",4,"CRD")
6,36,N,4,0
^SCR("M1HZMP","G",4,"HELP")

^SCR("M1HZMP","G",4,"LMAX")
6
^SCR("M1HZMP","G",4,"MUMPS1")

^SCR("M1HZMP","G",4,"MUMPS2")
D CA^P1HZMP
^SCR("M1HZMP","G",4,"SHEM")
 zenk 
^SCR("M1HZMP","G",4,"TYP")
N
^SCR("M1HZMP","G",5,"CRD")
6,29,N,6,2
^SCR("M1HZMP","G",5,"HELP")

^SCR("M1HZMP","G",5,"LMAX")
6
^SCR("M1HZMP","G",5,"MUMPS1")

^SCR("M1HZMP","G",5,"MUMPS2")

^SCR("M1HZMP","G",5,"OUTPUT")

^SCR("M1HZMP","G",5,"SHEM")
 mekq 
^SCR("M1HZMP","G",5,"TYP")
N
^SCR("M1HZMP","G","DEL")
Y
^SCR("M1HZMP","G","MAX")
3
^SCR("M1HZMP","G","NAME","CA")
4
^SCR("M1HZMP","G","NAME","MH")
3
^SCR("M1HZMP","G","NAME","PAR")
1
^SCR("M1HZMP","G","NAME","PAR1")
2
^SCR("M1HZMP","G","NAME","SUM")
5
^SCR("M1HZMP","G","NM",1)
PAR
^SCR("M1HZMP","G","NM",2)
PAR1
^SCR("M1HZMP","G","NM",3)
MH
^SCR("M1HZMP","G","NM",4)
CA
^SCR("M1HZMP","G","NM",5)
SUM
^SCR("M1HZMP","G","RB")
5,17,20,78
^SCR("M1HZMP","G","REF")
^THZMP(%L3MYDVN
^SCR("M1HZMP","G","RZD")
\
^SCR("M1HZMP","G","STEP")
1
^SCR("M1HZMP","G","STG")
                      : mekq : zenk : xign :       hixt my      : hixt cew:    
^SCR("M1HZMP","G","VG")
7
^SCR("M1HZMP","NAME")

^SCR("M1HZMP","P",5,"CRD")
1,64,E,5.,0
^SCR("M1HZMP","P",5,"HELP")

^SCR("M1HZMP","P",5,"LMAX")
6
^SCR("M1HZMP","P",5,"MUMPS1")

^SCR("M1HZMP","P",5,"MUMPS2")
D MLZR0^P1HZMS
^SCR("M1HZMP","P",5,"MUST")

^SCR("M1HZMP","P",5,"TYP")
E
^SCR("M1HZMP","P",6,"CRD")
1,63,H,30,0
^SCR("M1HZMP","P",6,"HELP")

^SCR("M1HZMP","P",6,"LMAX")
30
^SCR("M1HZMP","P",6,"MUMPS1")

^SCR("M1HZMP","P",6,"MUMPS2")

^SCR("M1HZMP","P",6,"OUTPUT")

^SCR("M1HZMP","P",6,"TYP")
H
^SCR("M1HZMP","P",10,"CRD")
2,64,E,3,0
^SCR("M1HZMP","P",10,"HELP")

^SCR("M1HZMP","P",10,"LMAX")
6
^SCR("M1HZMP","P",10,"MUMPS1")

^SCR("M1HZMP","P",10,"MUMPS2")

^SCR("M1HZMP","P",10,"OUTPUT")

^SCR("M1HZMP","P",10,"TYP")
E
^SCR("M1HZMP","P",20,"CRD")
21,23,N,7,2
^SCR("M1HZMP","P",20,"HELP")

^SCR("M1HZMP","P",20,"LMAX")
7
^SCR("M1HZMP","P",20,"MUMPS1")

^SCR("M1HZMP","P",20,"MUMPS2")

^SCR("M1HZMP","P",20,"OUTPUT")

^SCR("M1HZMP","P",20,"TYP")
N
^SCR("M1HZMP","P","NAME","MLZR0")
5
^SCR("M1HZMP","P","NAME","MLZR1")
6
^SCR("M1HZMP","P","NAME","SHULH")
10
^SCR("M1HZMP","P","NAME","TSHL")
20
^SCR("M1HZMP","P","NM",5)
MLZR0
^SCR("M1HZMP","P","NM",6)
MLZR1
^SCR("M1HZMP","P","NM",10)
SHULH
^SCR("M1HZMP","P","NM",20)
TSHL
^SCR("M1LKH")
H
^SCR("M1LKH",1)
             {05                                   } qtihlen qihxk 'qn         
^SCR("M1LKH",2)
                                                                         1]    
^SCR("M1LKH",3)
                              {                      10}:   gewl my            
^SCR("M1LKH",4)
                                                   { 15}: (p/f) oin            
^SCR("M1LKH",5)
                                {                    20}:      aegx            
^SCR("M1LKH",6)
                                                  {25  }:       zia            
^SCR("M1LKH",7)
                                                  {30  }:      dxic            
^SCR("M1LKH",8)
                                       {             35}:       xir            
^SCR("M1LKH",9)
                     {40                               }:     l"`ec            
^SCR("M1LKH",10)
                                                                               
^SCR("M1LKH",11)
             [1                                                                
^SCR("M1LKH","A",1)
‘”‰ˆŒ…Ž‘‰ˆ˜‹'‘Ž
^SCR("M1LKH","A",2)

^SCR("M1LKH","A",3)
:‡…—Œ�™
^SCR("M1LKH","A",4)
:(�/†)�‰Ž
^SCR("M1LKH","A",5)
:�…‡˜
^SCR("M1LKH","A",6)
:š‰�
^SCR("M1LKH","A",7)
:„˜‰ƒ
^SCR("M1LKH","A",8)
:˜‰’
^SCR("M1LKH","A",9)
:Œ"€…ƒ
^SCR("M1LKH","A",10)

^SCR("M1LKH","A",11)

^SCR("M1LKH","AV",1)
xphykunxhyrfwxn
^SCR("M1LKH","AV",2)

^SCR("M1LKH","AV",3)
:juekoa
^SCR("M1LKH","AV",4)
:(bqz)ihn
^SCR("M1LKH","AV",5)
:cujr
^SCR("M1LKH","AV",6)
:,hc
^SCR("M1LKH","AV",7)
:vrhs
^SCR("M1LKH","AV",8)
:rhg
^SCR("M1LKH","AV",9)
:k"tus
^SCR("M1LKH","AV",10)

^SCR("M1LKH","AV",11)

^SCR("M1LKH","NAME")
qihxk legz`
^SCR("M1LKH","P",5,"CRD")
1,13,N,37,0
^SCR("M1LKH","P",5,"HELP")

^SCR("M1LKH","P",5,"LMAX")
38
^SCR("M1LKH","P",5,"MUMPS1")
S TSTART=$P($H,",",2)
^SCR("M1LKH","P",5,"MUMPS2")
D MCARD^M1LKH
^SCR("M1LKH","P",5,"MUST")

^SCR("M1LKH","P",5,"TYP")
N
^SCR("M1LKH","P",10,"CRD")
3,56,H,23
^SCR("M1LKH","P",10,"HELP")

^SCR("M1LKH","P",10,"LMAX")
25
^SCR("M1LKH","P",10,"MUMPS1")

^SCR("M1LKH","P",10,"MUMPS2")

^SCR("M1LKH","P",10,"MUST")

^SCR("M1LKH","P",10,"TYP")
H
^SCR("M1LKH","P",15,"CRD")
4,56,H,1
^SCR("M1LKH","P",15,"HELP")

^SCR("M1LKH","P",15,"LMAX")
4
^SCR("M1LKH","P",15,"MUMPS1")

^SCR("M1LKH","P",15,"MUMPS2")
I MIN'="f",MIN'="p" S %SC("ER")=1
^SCR("M1LKH","P",15,"MUST")

^SCR("M1LKH","P",15,"TYP")
H
^SCR("M1LKH","P",20,"CRD")
5,56,H,23
^SCR("M1LKH","P",20,"HELP")

^SCR("M1LKH","P",20,"LMAX")
23
^SCR("M1LKH","P",20,"MUMPS1")

^SCR("M1LKH","P",20,"MUMPS2")

^SCR("M1LKH","P",20,"MUST")

^SCR("M1LKH","P",20,"TYP")
H
^SCR("M1LKH","P",25,"CRD")
6,50,E,5,0
^SCR("M1LKH","P",25,"HELP")

^SCR("M1LKH","P",25,"LMAX")
5
^SCR("M1LKH","P",25,"MUMPS1")

^SCR("M1LKH","P",25,"MUMPS2")

^SCR("M1LKH","P",25,"MUST")

^SCR("M1LKH","P",25,"TYP")
E
^SCR("M1LKH","P",30,"CRD")
7,50,E,5,0
^SCR("M1LKH","P",30,"HELP")

^SCR("M1LKH","P",30,"LMAX")
5
^SCR("M1LKH","P",30,"MUMPS1")

^SCR("M1LKH","P",30,"MUMPS2")

^SCR("M1LKH","P",30,"MUST")

^SCR("M1LKH","P",30,"TYP")
E
^SCR("M1LKH","P",35,"CRD")
8,56,H,16
^SCR("M1LKH","P",35,"HELP")

^SCR("M1LKH","P",35,"LMAX")
16
^SCR("M1LKH","P",35,"MUMPS1")

^SCR("M1LKH","P",35,"MUMPS2")

^SCR("M1LKH","P",35,"MUST")

^SCR("M1LKH","P",35,"TYP")
H
^SCR("M1LKH","P",40,"CRD")
9,21,E,34,0
^SCR("M1LKH","P",40,"HELP")

^SCR("M1LKH","P",40,"LMAX")
34
^SCR("M1LKH","P",40,"MUMPS1")

^SCR("M1LKH","P",40,"MUMPS2")
S EMAIL=$$FUNC^%UCASE(EMAIL)
^SCR("M1LKH","P",40,"TYP")
E
^SCR("M1LKH","P","NAME","BAIT")
25
^SCR("M1LKH","P","NAME","DIRA")
30
^SCR("M1LKH","P","NAME","EMAIL")
40
^SCR("M1LKH","P","NAME","IR")
35
^SCR("M1LKH","P","NAME","LKH")
10
^SCR("M1LKH","P","NAME","MCARD")
5
^SCR("M1LKH","P","NAME","MIN")
15
^SCR("M1LKH","P","NAME","STREET")
20
^SCR("M1LKH","P","NM",5)
MCARD
^SCR("M1LKH","P","NM",10)
LKH
^SCR("M1LKH","P","NM",15)
MIN
^SCR("M1LKH","P","NM",20)
STREET
^SCR("M1LKH","P","NM",25)
BAIT
^SCR("M1LKH","P","NM",30)
DIRA
^SCR("M1LKH","P","NM",35)
IR
^SCR("M1LKH","P","NM",40)
EMAIL
^SCR("M1LKH","P","RB",1)
3,14,12,75
^SCR("M1PAY")
H
^SCR("M1PAY",1)
       {06     } : dxzi  {05    }: zegpd {04      } mley  {03     } melyzl k"dq
^SCR("M1PAY",2)
                                                                               
^SCR("M1PAY",3)
                      {                                09}                     
^SCR("M1PAY",4)
                                                                               
^SCR("M1PAY",5)
                                                                             1$
^SCR("M1PAY",6)
 :dtwd: dzknq` : dxag :  dxzi : dgpd :  mley : melyzl:       qihxk 'qn       : 
^SCR("M1PAY",7)
                                                                               
^SCR("M1PAY",8)
                                                                               
^SCR("M1PAY",9)
                                                                               
^SCR("M1PAY",10)
                                                                               
^SCR("M1PAY",11)
                                                                               
^SCR("M1PAY",12)
                                                                               
^SCR("M1PAY",13)
                                                                               
^SCR("M1PAY",14)
                                                                               
^SCR("M1PAY",15)
                                                                               
^SCR("M1PAY",16)
                                                                               
^SCR("M1PAY",17)
                                                                               
^SCR("M1PAY",18)
                                                                               
^SCR("M1PAY",19)
 $1                                                                            
^SCR("M1PAY",20)
                          {25    }{20   }{15   }{10    }                       
^SCR("M1PAY",21)
                                                                               
^SCR("M1PAY","A",1)
:„˜š‰:š…‡�„�Œ…™�…Œ™šŒ‹"„‘
^SCR("M1PAY","A",2)

^SCR("M1PAY","A",3)

^SCR("M1PAY","A",4)

^SCR("M1PAY","A",5)

^SCR("M1PAY","A",6)
„”—„„š‹Ž‘€„˜�‡„˜š‰„‡�„�Œ…™�…Œ™šŒ‘‰ˆ˜‹'‘Ž
^SCR("M1PAY","A",7)
---------------------------------------------------------------------
^SCR("M1PAY","A",8)

^SCR("M1PAY","A",9)

^SCR("M1PAY","A",10)

^SCR("M1PAY","A",11)

^SCR("M1PAY","A",12)

^SCR("M1PAY","A",13)

^SCR("M1PAY","A",14)

^SCR("M1PAY","A",15)

^SCR("M1PAY","A",16)

^SCR("M1PAY","A",17)

^SCR("M1PAY","A",18)

^SCR("M1PAY","A",19)

^SCR("M1PAY","A",20)

^SCR("M1PAY","A",21)

^SCR("M1PAY","AV",1)
:vr,h:,ujbvokuaouka,kf"vx
^SCR("M1PAY","AV",2)

^SCR("M1PAY","AV",3)

^SCR("M1PAY","AV",4)

^SCR("M1PAY","AV",5)

^SCR("M1PAY","AV",6)
vpevv,fnxtvrcjvr,hvjbvokuaouka,kxhyrfwxn
^SCR("M1PAY","AV",7)
---------------------------------------------------------------------
^SCR("M1PAY","AV",8)

^SCR("M1PAY","AV",9)

^SCR("M1PAY","AV",10)

^SCR("M1PAY","AV",11)

^SCR("M1PAY","AV",12)

^SCR("M1PAY","AV",13)

^SCR("M1PAY","AV",14)

^SCR("M1PAY","AV",15)

^SCR("M1PAY","AV",16)

^SCR("M1PAY","AV",17)

^SCR("M1PAY","AV",18)

^SCR("M1PAY","AV",19)

^SCR("M1PAY","AV",20)

^SCR("M1PAY","AV",21)

^SCR("M1PAY","G",1,"CRD")
7,77,EE,20*2,0
^SCR("M1PAY","G",1,"HELP")
qihxk xiardl `p 
^SCR("M1PAY","G",1,"LMAX")
23
^SCR("M1PAY","G",1,"MUMPS1")

^SCR("M1PAY","G",1,"MUMPS2")
D MCARD^M1PAY
^SCR("M1PAY","G",1,"SHEM")
       qihxk 'qn       
^SCR("M1PAY","G",1,"TYP")
EE
^SCR("M1PAY","G",2,"CRD")
7,53,N,7,2
^SCR("M1PAY","G",2,"HELP")
<F9> - dxzid lk mlyl
^SCR("M1PAY","G",2,"LMAX")
7
^SCR("M1PAY","G",2,"MUMPS1")

^SCR("M1PAY","G",2,"MUMPS2")
D TSHMP^M1PAY
^SCR("M1PAY","G",2,"MUST")

^SCR("M1PAY","G",2,"SHEM")
 melyzl
^SCR("M1PAY","G",2,"TYP")
N
^SCR("M1PAY","G",3,"CRD")
7,45,N,6,2
^SCR("M1PAY","G",3,"HELP")

^SCR("M1PAY","G",3,"LMAX")
7
^SCR("M1PAY","G",3,"MUMPS1")

^SCR("M1PAY","G",3,"MUMPS2")

^SCR("M1PAY","G",3,"OUTPUT")

^SCR("M1PAY","G",3,"SHEM")
  mley 
^SCR("M1PAY","G",3,"TYP")
N
^SCR("M1PAY","G",4,"CRD")
7,37,N,6,2
^SCR("M1PAY","G",4,"HELP")
<F9> - mekqd lk mlyl 
^SCR("M1PAY","G",4,"LMAX")
6
^SCR("M1PAY","G",4,"MUMPS1")

^SCR("M1PAY","G",4,"MUMPS2")

^SCR("M1PAY","G",4,"OUTPUT")

^SCR("M1PAY","G",4,"SHEM")
 dgpd 
^SCR("M1PAY","G",4,"TYP")
N
^SCR("M1PAY","G",5,"CRD")
7,30,N,7,2
^SCR("M1PAY","G",5,"HELP")

^SCR("M1PAY","G",5,"LMAX")
7
^SCR("M1PAY","G",5,"MUMPS1")

^SCR("M1PAY","G",5,"MUMPS2")

^SCR("M1PAY","G",5,"OUTPUT")

^SCR("M1PAY","G",5,"SHEM")
  dxzi 
^SCR("M1PAY","G",5,"TYP")
N
^SCR("M1PAY","G",6,"CRD")
7,22,E,6,0
^SCR("M1PAY","G",6,"HELP")

^SCR("M1PAY","G",6,"LMAX")
6
^SCR("M1PAY","G",6,"MUMPS1")

^SCR("M1PAY","G",6,"MUMPS2")

^SCR("M1PAY","G",6,"OUTPUT")

^SCR("M1PAY","G",6,"SHEM")
 dxag 
^SCR("M1PAY","G",6,"TYP")
E
^SCR("M1PAY","G",7,"CRD")
7,15,E,8,0
^SCR("M1PAY","G",7,"HELP")

^SCR("M1PAY","G",7,"LMAX")
8
^SCR("M1PAY","G",7,"MUMPS1")

^SCR("M1PAY","G",7,"MUMPS2")

^SCR("M1PAY","G",7,"OUTPUT")

^SCR("M1PAY","G",7,"SHEM")
 dzknq` 
^SCR("M1PAY","G",7,"TYP")
E
^SCR("M1PAY","G",8,"CRD")
7,6,H,1,0
^SCR("M1PAY","G",8,"HELP")

^SCR("M1PAY","G",8,"LMAX")
4
^SCR("M1PAY","G",8,"MUMPS1")

^SCR("M1PAY","G",8,"MUMPS2")

^SCR("M1PAY","G",8,"OUTPUT")

^SCR("M1PAY","G",8,"SHEM")
dtwd
^SCR("M1PAY","G",8,"TYP")
H
^SCR("M1PAY","G","DEL")
Y
^SCR("M1PAY","G","MAX")
9999
^SCR("M1PAY","G","NAME","ASM")
7
^SCR("M1PAY","G","NAME","COMP")
6
^SCR("M1PAY","G","NAME","CRED")
8
^SCR("M1PAY","G","NAME","HNHMP")
4
^SCR("M1PAY","G","NAME","ITRAMP")
5
^SCR("M1PAY","G","NAME","MCARD")
1
^SCR("M1PAY","G","NAME","SHUL")
3
^SCR("M1PAY","G","NAME","TSHMP")
2
^SCR("M1PAY","G","NM",1)
MCARD
^SCR("M1PAY","G","NM",2)
TSHMP
^SCR("M1PAY","G","NM",3)
SHUL
^SCR("M1PAY","G","NM",4)
HNHMP
^SCR("M1PAY","G","NM",5)
ITRAMP
^SCR("M1PAY","G","NM",6)
COMP
^SCR("M1PAY","G","NM",7)
ASM
^SCR("M1PAY","G","NM",8)
CRED
^SCR("M1PAY","G","RB")
6,2,20,79
^SCR("M1PAY","G","REF")
^TMP(%L3MYDVN
^SCR("M1PAY","G","RZD")
\
^SCR("M1PAY","G","STEP")
2
^SCR("M1PAY","G","STG")
 :dtwd: dzknq` : dxag :  dxzi : dgpd :  mley : melyzl:       qihxk 'qn       : 
^SCR("M1PAY","G","VG")
8
^SCR("M1PAY","NAME")

^SCR("M1PAY","P",3,"CRD")
1,58,N,8,2
^SCR("M1PAY","P",3,"HELP")

^SCR("M1PAY","P",3,"LMAX")
8
^SCR("M1PAY","P",3,"MUMPS1")

^SCR("M1PAY","P",3,"MUMPS2")

^SCR("M1PAY","P",3,"OUTPUT")

^SCR("M1PAY","P",3,"TYP")
N
^SCR("M1PAY","P",4,"CRD")
1,41,N,9,2
^SCR("M1PAY","P",4,"HELP")

^SCR("M1PAY","P",4,"LMAX")
9
^SCR("M1PAY","P",4,"MUMPS1")

^SCR("M1PAY","P",4,"MUMPS2")

^SCR("M1PAY","P",4,"OUTPUT")

^SCR("M1PAY","P",4,"TYP")
N
^SCR("M1PAY","P",5,"CRD")
1,25,N,7,2
^SCR("M1PAY","P",5,"HELP")

^SCR("M1PAY","P",5,"LMAX")
7
^SCR("M1PAY","P",5,"MUMPS1")

^SCR("M1PAY","P",5,"MUMPS2")

^SCR("M1PAY","P",5,"OUTPUT")

^SCR("M1PAY","P",5,"TYP")
N
^SCR("M1PAY","P",6,"CRD")
1,7,N,8,2
^SCR("M1PAY","P",6,"HELP")

^SCR("M1PAY","P",6,"LMAX")
8
^SCR("M1PAY","P",6,"MUMPS1")

^SCR("M1PAY","P",6,"MUMPS2")

^SCR("M1PAY","P",6,"OUTPUT")

^SCR("M1PAY","P",6,"TYP")
N
^SCR("M1PAY","P",9,"CRD")
3,58,H,35!,0
^SCR("M1PAY","P",9,"HELP")

^SCR("M1PAY","P",9,"LMAX")
35
^SCR("M1PAY","P",9,"MUMPS1")

^SCR("M1PAY","P",9,"MUMPS2")

^SCR("M1PAY","P",9,"OUTPUT")

^SCR("M1PAY","P",9,"TYP")
H
^SCR("M1PAY","P",10,"CRD")
20,48,N,7,2
^SCR("M1PAY","P",10,"HELP")

^SCR("M1PAY","P",10,"LMAX")
7
^SCR("M1PAY","P",10,"MUMPS1")

^SCR("M1PAY","P",10,"MUMPS2")

^SCR("M1PAY","P",10,"OUTPUT")

^SCR("M1PAY","P",10,"TYP")
N
^SCR("M1PAY","P",15,"CRD")
20,41,N,6,2
^SCR("M1PAY","P",15,"HELP")

^SCR("M1PAY","P",15,"LMAX")
6
^SCR("M1PAY","P",15,"MUMPS1")

^SCR("M1PAY","P",15,"MUMPS2")

^SCR("M1PAY","P",15,"OUTPUT")

^SCR("M1PAY","P",15,"TYP")
N
^SCR("M1PAY","P",20,"CRD")
20,34,N,6,2
^SCR("M1PAY","P",20,"HELP")

^SCR("M1PAY","P",20,"LMAX")
6
^SCR("M1PAY","P",20,"MUMPS1")

^SCR("M1PAY","P",20,"MUMPS2")

^SCR("M1PAY","P",20,"OUTPUT")

^SCR("M1PAY","P",20,"TYP")
N
^SCR("M1PAY","P",25,"CRD")
20,26,N,7,2
^SCR("M1PAY","P",25,"HELP")

^SCR("M1PAY","P",25,"LMAX")
7
^SCR("M1PAY","P",25,"MUMPS1")

^SCR("M1PAY","P",25,"MUMPS2")

^SCR("M1PAY","P",25,"OUTPUT")

^SCR("M1PAY","P",25,"TYP")
N
^SCR("M1PAY","P","NAME","SHALAV")
9
^SCR("M1PAY","P","NAME","SHNH")
5
^SCR("M1PAY","P","NAME","SHNHMP")
20
^SCR("M1PAY","P","NAME","SITRA")
6
^SCR("M1PAY","P","NAME","SITRMP")
25
^SCR("M1PAY","P","NAME","SSHUL")
4
^SCR("M1PAY","P","NAME","SSHULMP")
15
^SCR("M1PAY","P","NAME","STSHMP")
10
^SCR("M1PAY","P","NAME","SUMT")
3
^SCR("M1PAY","P","NM",3)
SUMT
^SCR("M1PAY","P","NM",4)
SSHUL
^SCR("M1PAY","P","NM",5)
SHNH
^SCR("M1PAY","P","NM",6)
SITRA
^SCR("M1PAY","P","NM",9)
SHALAV
^SCR("M1PAY","P","NM",10)
STSHMP
^SCR("M1PAY","P","NM",15)
SSHULMP
^SCR("M1PAY","P","NM",20)
SHNHMP
^SCR("M1PAY","P","NM",25)
SITRMP
^SCR("M1SETUP")
H
^SCR("M1SETUP",1)
                                                                               
^SCR("M1SETUP",2)
                 # qtihlen zkxrnl mixhnxt #                                    
^SCR("M1SETUP",3)
                                                                               
^SCR("M1SETUP",4)
                                                                    1]         
^SCR("M1SETUP",5)
                                                                               
^SCR("M1SETUP",6)
                       {05            } :           hxy zaezk                  
^SCR("M1SETUP",7)
                                  {10 } :            uexr 'qn                  
^SCR("M1SETUP",8)
                                  {15 } :   (zeipy) dpznd onf                  
^SCR("M1SETUP",9)
                                  {20 } :           seqn xtqn                  
^SCR("M1SETUP",10)
                                              mr dcear zexyt`                  
^SCR("M1SETUP",11)
                                  {25 } :(`l-0,ok-1) ONESWIPE                  
^SCR("M1SETUP",12)
                   [1                                                          
^SCR("M1SETUP",13)
                                                                               
^SCR("M1SETUP","A",1)

^SCR("M1SETUP","A",2)
‘”‰ˆŒ…Žš‹˜’ŽŒ�‰˜ˆŽ˜”
^SCR("M1SETUP","A",3)

^SCR("M1SETUP","A",4)

^SCR("M1SETUP","A",5)

^SCR("M1SETUP","A",6)
:ˆ˜™š�…š‹
^SCR("M1SETUP","A",7)
:•…˜’'‘Ž
^SCR("M1SETUP","A",8)
:(š…‰�™)„�šŽ„�Ž†
^SCR("M1SETUP","A",9)
:“…‘Ž˜”‘Ž
^SCR("M1SETUP","A",10)
�’„ƒ…�’š…˜™”€
^SCR("M1SETUP","A",11)
:(€Œ-0,�‹-1)ONESWIPE
^SCR("M1SETUP","A",12)

^SCR("M1SETUP","A",13)

^SCR("M1SETUP","AV",1)

^SCR("M1SETUP","AV",2)
xphykun,frgnkohrynrp
^SCR("M1SETUP","AV",3)

^SCR("M1SETUP","AV",4)

^SCR("M1SETUP","AV",5)

^SCR("M1SETUP","AV",6)
:yra,cu,f
^SCR("M1SETUP","AV",7)
:•urgwxn
^SCR("M1SETUP","AV",8)
:(,uhba)vb,nvinz
^SCR("M1SETUP","AV",9)
:;uxnrpxn
^SCR("M1SETUP","AV",10)
ogvsucg,urapt
^SCR("M1SETUP","AV",11)
:(tk-0'if-1)ONESWIPE
^SCR("M1SETUP","AV",12)

^SCR("M1SETUP","AV",13)

^SCR("M1SETUP","NAME")

^SCR("M1SETUP","P",5,"CRD")
6,23,E,15,0
^SCR("M1SETUP","P",5,"HELP")

^SCR("M1SETUP","P",5,"LMAX")
15
^SCR("M1SETUP","P",5,"MUMPS1")

^SCR("M1SETUP","P",5,"MUMPS2")

^SCR("M1SETUP","P",5,"TYP")
E
^SCR("M1SETUP","P",10,"CRD")
7,34,N,4,0
^SCR("M1SETUP","P",10,"HELP")

^SCR("M1SETUP","P",10,"LMAX")
4
^SCR("M1SETUP","P",10,"MUMPS1")

^SCR("M1SETUP","P",10,"MUMPS2")

^SCR("M1SETUP","P",10,"TYP")
N
^SCR("M1SETUP","P",15,"CRD")
8,34,N,4,0
^SCR("M1SETUP","P",15,"HELP")

^SCR("M1SETUP","P",15,"LMAX")
4
^SCR("M1SETUP","P",15,"MUMPS1")

^SCR("M1SETUP","P",15,"MUMPS2")

^SCR("M1SETUP","P",15,"TYP")
N
^SCR("M1SETUP","P",20,"CRD")
9,34,N,4,0
^SCR("M1SETUP","P",20,"HELP")

^SCR("M1SETUP","P",20,"LMAX")
4
^SCR("M1SETUP","P",20,"MUMPS1")

^SCR("M1SETUP","P",20,"MUMPS2")

^SCR("M1SETUP","P",20,"MUST")

^SCR("M1SETUP","P",20,"TYP")
N
^SCR("M1SETUP","P",25,"CRD")
11,34,N,1,0
^SCR("M1SETUP","P",25,"HELP")

^SCR("M1SETUP","P",25,"LMAX")
4
^SCR("M1SETUP","P",25,"MUMPS1")

^SCR("M1SETUP","P",25,"MUMPS2")

^SCR("M1SETUP","P",25,"TYP")
N
^SCR("M1SETUP","P","NAME","IPA")
5
^SCR("M1SETUP","P","NAME","MASOF")
20
^SCR("M1SETUP","P","NAME","ONESWIPE")
25
^SCR("M1SETUP","P","NAME","PORT")
10
^SCR("M1SETUP","P","NAME","TOUT")
15
^SCR("M1SETUP","P","NM",5)
IPA
^SCR("M1SETUP","P","NM",10)
PORT
^SCR("M1SETUP","P","NM",15)
TOUT
^SCR("M1SETUP","P","NM",20)
MASOF
^SCR("M1SETUP","P","NM",25)
ONESWIPE
^SCR("M1SETUP","P","RB",1)
5,20,13,70
^SCR("MATB")
H
^SCR("MATB",1)
                                     # zerahn zlah #                           
^SCR("MATB",2)
                                                                               
^SCR("MATB",3)
                                           {05     } oexg` oekcr jix`z         
^SCR("MATB",4)
                                                                      $        
^SCR("MATB",5)
                    :rahnl oniq :   xry   :   rahn beq : rahn cew  :           
^SCR("MATB",6)
                                                                               
^SCR("MATB",7)
                                                                               
^SCR("MATB",8)
                                                                               
^SCR("MATB",9)
                                                                               
^SCR("MATB",10)
                                                                               
^SCR("MATB",11)
                                                                               
^SCR("MATB",12)
                                                                               
^SCR("MATB",13)
                                                                               
^SCR("MATB",14)
                                                                               
^SCR("MATB",15)
                                                                               
^SCR("MATB",16)
                                                                               
^SCR("MATB",17)
                                                                               
^SCR("MATB",18)
                                                                               
^SCR("MATB",19)
                                                                               
^SCR("MATB",20)
                $                                                              
^SCR("MATB",21)
                                                                               
^SCR("MATB","A",1)
š…’�ˆŽšŒ�ˆ
^SCR("MATB","A",2)

^SCR("MATB","A",3)
�…˜‡€�…‹ƒ’Š‰˜€š
^SCR("MATB","A",4)

^SCR("MATB","A",5)
’�ˆŽŒ�Ž‰‘˜’™’�ˆŽ‚…‘’�ˆŽƒ…—
^SCR("MATB","A",6)
-------------------------------------------
^SCR("MATB","A",7)

^SCR("MATB","A",8)

^SCR("MATB","A",9)

^SCR("MATB","A",10)

^SCR("MATB","A",11)

^SCR("MATB","A",12)

^SCR("MATB","A",13)

^SCR("MATB","A",14)

^SCR("MATB","A",15)

^SCR("MATB","A",16)

^SCR("MATB","A",17)

^SCR("MATB","A",18)

^SCR("MATB","A",19)

^SCR("MATB","A",20)

^SCR("MATB","A",21)

^SCR("MATB","AV",1)
,ugcyn,kcy
^SCR("MATB","AV",2)

^SCR("MATB","AV",3)
iurjtiufsglhrt,
^SCR("MATB","AV",4)

^SCR("MATB","AV",5)
gcynkinhxrgagcynduxgcynsue
^SCR("MATB","AV",6)
-------------------------------------------
^SCR("MATB","AV",7)

^SCR("MATB","AV",8)

^SCR("MATB","AV",9)

^SCR("MATB","AV",10)

^SCR("MATB","AV",11)

^SCR("MATB","AV",12)

^SCR("MATB","AV",13)

^SCR("MATB","AV",14)

^SCR("MATB","AV",15)

^SCR("MATB","AV",16)

^SCR("MATB","AV",17)

^SCR("MATB","AV",18)

^SCR("MATB","AV",19)

^SCR("MATB","AV",20)

^SCR("MATB","AV",21)

^SCR("MATB","G",1,"CRD")
6,67,N,2,0
^SCR("MATB","G",1,"HELP")
<ESC> -  d`ivi     
^SCR("MATB","G",1,"LMAX")
11
^SCR("MATB","G",1,"MUMPS1")

^SCR("MATB","G",1,"MUMPS2")

^SCR("MATB","G",1,"MUST")

^SCR("MATB","G",1,"SHEM")
 rahn cew  
^SCR("MATB","G",1,"TYP")
N
^SCR("MATB","G",2,"CRD")
6,55,H,11,0
^SCR("MATB","G",2,"HELP")

^SCR("MATB","G",2,"LMAX")
12
^SCR("MATB","G",2,"MUMPS1")

^SCR("MATB","G",2,"MUMPS2")

^SCR("MATB","G",2,"MUST")

^SCR("MATB","G",2,"SHEM")
   rahn beq 
^SCR("MATB","G",2,"TYP")
H
^SCR("MATB","G",3,"CRD")
6,42,N,8,4
^SCR("MATB","G",3,"HELP")

^SCR("MATB","G",3,"LMAX")
9
^SCR("MATB","G",3,"MUMPS1")

^SCR("MATB","G",3,"MUMPS2")

^SCR("MATB","G",3,"SHEM")
   xry   
^SCR("MATB","G",3,"TYP")
N
^SCR("MATB","G",4,"CRD")
6,32,H,4,0
^SCR("MATB","G",4,"HELP")

^SCR("MATB","G",4,"LMAX")
11
^SCR("MATB","G",4,"MUMPS1")

^SCR("MATB","G",4,"MUMPS2")

^SCR("MATB","G",4,"SHEM")
rahnl oniq 
^SCR("MATB","G",4,"TYP")
H
^SCR("MATB","G","DEL")
Y
^SCR("MATB","G","MAX")
99999
^SCR("MATB","G","NAME","MTBK")
1
^SCR("MATB","G","NAME","MTBS")
2
^SCR("MATB","G","NAME","MTBSH")
3
^SCR("MATB","G","NAME","SIMAN")
4
^SCR("MATB","G","NM",1)
MTBK
^SCR("MATB","G","NM",2)
MTBS
^SCR("MATB","G","NM",3)
MTBSH
^SCR("MATB","G","NM",4)
SIMAN
^SCR("MATB","G","RB")
5,17,21,71
^SCR("MATB","G","REF")
^TEMP($P
^SCR("MATB","G","RZD")
\
^SCR("MATB","G","STEP")
1
^SCR("MATB","G","STG")
                    :rahnl oniq :   xry   :   rahn beq : rahn cew  :           
^SCR("MATB","G","VG")
7
^SCR("MATB","NAME")

^SCR("MATB","P",5,"CRD")
3,43,D,8,0
^SCR("MATB","P",5,"HELP")

^SCR("MATB","P",5,"LMAX")
8
^SCR("MATB","P",5,"MUMPS1")

^SCR("MATB","P",5,"MUMPS2")

^SCR("MATB","P",5,"OUTPUT")

^SCR("MATB","P",5,"TYP")
D
^SCR("MATB","P","NAME","DATIDK")
5
^SCR("MATB","P","NM",5)
DATIDK
^SCR("MHKV")
H
^SCR("MHKV",1)
                                                                               
^SCR("MHKV",2)
                                                                               
^SCR("MHKV",3)
                                                                               
^SCR("MHKV",4)
                                                                               
^SCR("MHKV",5)
                                                                               
^SCR("MHKV",6)
                                                                               
^SCR("MHKV",7)
                                                                               
^SCR("MHKV",8)
                                                                               
^SCR("MHKV",9)
                                                                               
^SCR("MHKV",10)
                                                                               
^SCR("MHKV",11)
                                                                               
^SCR("MHKV",12)
                                                                               
^SCR("MHKV",13)
                                                                               
^SCR("MHKV",14)
                                                                               
^SCR("MHKV",15)
                                                                               
^SCR("MHKV",16)
                                                                               
^SCR("MHKV",17)
                                                                               
^SCR("MHKV",18)
                                                                               
^SCR("MHKV",19)
                                                                               
^SCR("MHKV",20)
                                                                               
^SCR("MHKV",21)
                                                                               
^SCR("MHKV",22)
                     {15 : minlyn  {10 :enliyy miyp` 'qn   {05 : micreq 'qn    
^SCR("MHKV","A",1)

^SCR("MHKV","A",2)

^SCR("MHKV","A",3)

^SCR("MHKV","A",4)

^SCR("MHKV","A",5)

^SCR("MHKV","A",6)

^SCR("MHKV","A",7)

^SCR("MHKV","A",8)

^SCR("MHKV","A",9)

^SCR("MHKV","A",10)

^SCR("MHKV","A",11)

^SCR("MHKV","A",12)

^SCR("MHKV","A",13)

^SCR("MHKV","A",14)

^SCR("MHKV","A",15)

^SCR("MHKV","A",16)

^SCR("MHKV","A",17)

^SCR("MHKV","A",18)

^SCR("MHKV","A",19)

^SCR("MHKV","A",20)

^SCR("MHKV","A",21)

^SCR("MHKV","A",22)
:�‰ŽŒ™Ž:…ŽŒ‰™™�‰™�€'‘Ž:�‰ƒ’…‘'‘Ž
^SCR("MHKV","AV",1)

^SCR("MHKV","AV",2)

^SCR("MHKV","AV",3)

^SCR("MHKV","AV",4)

^SCR("MHKV","AV",5)

^SCR("MHKV","AV",6)

^SCR("MHKV","AV",7)

^SCR("MHKV","AV",8)

^SCR("MHKV","AV",9)

^SCR("MHKV","AV",10)

^SCR("MHKV","AV",11)

^SCR("MHKV","AV",12)

^SCR("MHKV","AV",13)

^SCR("MHKV","AV",14)

^SCR("MHKV","AV",15)

^SCR("MHKV","AV",16)

^SCR("MHKV","AV",17)

^SCR("MHKV","AV",18)

^SCR("MHKV","AV",19)

^SCR("MHKV","AV",20)

^SCR("MHKV","AV",21)

^SCR("MHKV","AV",22)
:ohnkan:unkhaaohabtwxn:ohsguxwxn
^SCR("MHKV","NAME")
reaw xign
^SCR("MHKV","P",5,"CRD")
22,59,N,3,0
^SCR("MHKV","P",5,"HELP")

^SCR("MHKV","P",5,"LMAX")
4
^SCR("MHKV","P",5,"MUMPS1")

^SCR("MHKV","P",5,"MUMPS2")

^SCR("MHKV","P",5,"TYP")
N
^SCR("MHKV","P",10,"CRD")
22,35,N,3,0
^SCR("MHKV","P",10,"HELP")

^SCR("MHKV","P",10,"LMAX")
4
^SCR("MHKV","P",10,"MUMPS1")

^SCR("MHKV","P",10,"MUMPS2")
I SOADS>SOAD&(TSHL'<0)!(SOADS<SOAD&(TSHL<0)) S %SC("ER")=1
^SCR("MHKV","P",10,"TYP")
N
^SCR("MHKV","P",15,"CRD")
22,21,N,3,0
^SCR("MHKV","P",15,"HELP")

^SCR("MHKV","P",15,"LMAX")
4
^SCR("MHKV","P",15,"MUMPS1")
S:'$G(MSPAN) MSPAN=$S(TSHL'<0:1,1:-1) K %SCO
^SCR("MHKV","P",15,"MUMPS2")
I MSPAN+SOADS>SOAD&(TSHL'<0)!(MSPAN+SOADS<SOAD&(TSHL<0)) S %SC("ER")=1
^SCR("MHKV","P",15,"TYP")
N
^SCR("MHKV","P","NAME","MSPAN")
15
^SCR("MHKV","P","NAME","SOAD")
5
^SCR("MHKV","P","NAME","SOADS")
10
^SCR("MHKV","P","NM",5)
SOAD
^SCR("MHKV","P","NM",10)
SOADS
^SCR("MHKV","P","NM",15)
MSPAN
^SCR("MSHT")
H
^SCR("MSHT","NAME")
dxhyn
^SCR("NOMVC")
H
^SCR("NOMVC",1)
                          # rvana `ly zegewl zniyx #                           
^SCR("NOMVC",2)
                                                                               
^SCR("NOMVC",3)
                                                                    1$         
^SCR("NOMVC",4)
                         :             gewl my        : gewl 'qn :             
^SCR("NOMVC",5)
                                                                               
^SCR("NOMVC",6)
                                                                               
^SCR("NOMVC",7)
                                                                               
^SCR("NOMVC",8)
                                                                               
^SCR("NOMVC",9)
                                                                               
^SCR("NOMVC",10)
                                                                               
^SCR("NOMVC",11)
                                                                               
^SCR("NOMVC",12)
                                                                               
^SCR("NOMVC",13)
                                                                               
^SCR("NOMVC",14)
                                                                               
^SCR("NOMVC",15)
                                                                               
^SCR("NOMVC",16)
                                                                               
^SCR("NOMVC",17)
                                                                               
^SCR("NOMVC",18)
                                                                               
^SCR("NOMVC",19)
                                                                               
^SCR("NOMVC",20)
                                                                               
^SCR("NOMVC",21)
                    $                                                          
^SCR("NOMVC","A",1)
’–�Ž�€Œ™š…‡…—ŒšŽ‰™˜
^SCR("NOMVC","A",2)

^SCR("NOMVC","A",3)

^SCR("NOMVC","A",4)
‡…—Œ�™‡…—Œ'‘Ž
^SCR("NOMVC","A",5)
--------------------------------------
^SCR("NOMVC","A",6)

^SCR("NOMVC","A",7)

^SCR("NOMVC","A",8)

^SCR("NOMVC","A",9)

^SCR("NOMVC","A",10)

^SCR("NOMVC","A",11)

^SCR("NOMVC","A",12)

^SCR("NOMVC","A",13)

^SCR("NOMVC","A",14)

^SCR("NOMVC","A",15)

^SCR("NOMVC","A",16)

^SCR("NOMVC","A",17)

^SCR("NOMVC","A",18)

^SCR("NOMVC","A",19)

^SCR("NOMVC","A",20)

^SCR("NOMVC","A",21)

^SCR("NOMVC","AV",1)
gmcnctka,ujuek,nhar
^SCR("NOMVC","AV",2)

^SCR("NOMVC","AV",3)

^SCR("NOMVC","AV",4)
juekoajuekwxn
^SCR("NOMVC","AV",5)
--------------------------------------
^SCR("NOMVC","AV",6)

^SCR("NOMVC","AV",7)

^SCR("NOMVC","AV",8)

^SCR("NOMVC","AV",9)

^SCR("NOMVC","AV",10)

^SCR("NOMVC","AV",11)

^SCR("NOMVC","AV",12)

^SCR("NOMVC","AV",13)

^SCR("NOMVC","AV",14)

^SCR("NOMVC","AV",15)

^SCR("NOMVC","AV",16)

^SCR("NOMVC","AV",17)

^SCR("NOMVC","AV",18)

^SCR("NOMVC","AV",19)

^SCR("NOMVC","AV",20)

^SCR("NOMVC","AV",21)

^SCR("NOMVC","G",1,"CHECK")
Y
^SCR("NOMVC","G",1,"CRD")
5,65,E,10,0
^SCR("NOMVC","G",1,"CREAT")

^SCR("NOMVC","G",1,"FNC")

^SCR("NOMVC","G",1,"GLOB")
LKH
^SCR("NOMVC","G",1,"HELP")

^SCR("NOMVC","G",1,"LMAX")
10
^SCR("NOMVC","G",1,"MUMPS1")

^SCR("NOMVC","G",1,"MUMPS2")
I $L(LKH)<4 S %SC("ER")=1
^SCR("NOMVC","G",1,"MUST")

^SCR("NOMVC","G",1,"NLN")
20
^SCR("NOMVC","G",1,"NS")
J
^SCR("NOMVC","G",1,"RZD")
\
^SCR("NOMVC","G",1,"SHEM")
 gewl 'qn 
^SCR("NOMVC","G",1,"TOPB")
8
^SCR("NOMVC","G",1,"TYP")
E
^SCR("NOMVC","G",1,"VRB")
LKH1
^SCR("NOMVC","G",2,"CRD")
5,54,H,28,0
^SCR("NOMVC","G",2,"HELP")

^SCR("NOMVC","G",2,"LMAX")
28
^SCR("NOMVC","G",2,"MUMPS1")

^SCR("NOMVC","G",2,"MUMPS2")

^SCR("NOMVC","G",2,"OUTPUT")

^SCR("NOMVC","G",2,"SHEM")
             gewl my        
^SCR("NOMVC","G",2,"TYP")
H
^SCR("NOMVC","G","DEL")
Y
^SCR("NOMVC","G","MAX")
99999
^SCR("NOMVC","G","NAME","LKH")
1
^SCR("NOMVC","G","NAME","LKH1")
2
^SCR("NOMVC","G","NM",1)
LKH
^SCR("NOMVC","G","NM",2)
LKH1
^SCR("NOMVC","G","RB")
4,21,22,70
^SCR("NOMVC","G","REF")
^TEMP($P
^SCR("NOMVC","G","RZD")
\
^SCR("NOMVC","G","STEP")
1
^SCR("NOMVC","G","STG")
                         :             gewl my        : gewl 'qn :             
^SCR("NOMVC","G","VG")
6
^SCR("NOMVC","NAME")
rvana `ly zegewl zniyx
^SCR("P1AI")
H
^SCR("P1AI",1)
                              {05 }: zenk   {                    03} {02  }    
^SCR("P1AI",2)
                                                                         1$    
^SCR("P1AI",3)
                 :       dxrd      : zenk :       dpn xe`z      : cew :        
^SCR("P1AI",4)
                                                                               
^SCR("P1AI",5)
                                                                               
^SCR("P1AI",6)
                                                                               
^SCR("P1AI",7)
                                                                               
^SCR("P1AI",8)
                                                                               
^SCR("P1AI",9)
                                                                               
^SCR("P1AI",10)
                                                                               
^SCR("P1AI",11)
                                                                               
^SCR("P1AI",12)
                                                                               
^SCR("P1AI",13)
                                                                               
^SCR("P1AI",14)
                                                                               
^SCR("P1AI",15)
                                                                               
^SCR("P1AI",16)
                                                                               
^SCR("P1AI",17)
                                                                               
^SCR("P1AI",18)
                                                                               
^SCR("P1AI",19)
                                                                               
^SCR("P1AI",20)
             $1                                                                
^SCR("P1AI",21)
       <F8> - dveaw itl , <.> - 'qn itl, <F7> - cew itl , <F6> - my itl yetig  
^SCR("P1AI",22)
                                                                               
^SCR("P1AI","A",1)
:š…Ž‹
^SCR("P1AI","A",2)

^SCR("P1AI","A",3)
„˜’„š…Ž‹„�Ž˜…€šƒ…—
^SCR("P1AI","A",4)
-------------------------------------------------
^SCR("P1AI","A",5)

^SCR("P1AI","A",6)

^SCR("P1AI","A",7)

^SCR("P1AI","A",8)

^SCR("P1AI","A",9)

^SCR("P1AI","A",10)

^SCR("P1AI","A",11)

^SCR("P1AI","A",12)

^SCR("P1AI","A",13)

^SCR("P1AI","A",14)

^SCR("P1AI","A",15)

^SCR("P1AI","A",16)

^SCR("P1AI","A",17)

^SCR("P1AI","A",18)

^SCR("P1AI","A",19)

^SCR("P1AI","A",20)

^SCR("P1AI","A",21)
<F8>-„–…�—‰”Œ,<.>-'‘Ž‰”Œ,<F7>-ƒ…—‰”Œ,<F6>-�™‰”Œ™…”‰‡
^SCR("P1AI","A",22)

^SCR("P1AI","AV",1)
:,unf
^SCR("P1AI","AV",2)

^SCR("P1AI","AV",3)
vrgv,unfvbnrut,sue
^SCR("P1AI","AV",4)
-------------------------------------------------
^SCR("P1AI","AV",5)

^SCR("P1AI","AV",6)

^SCR("P1AI","AV",7)

^SCR("P1AI","AV",8)

^SCR("P1AI","AV",9)

^SCR("P1AI","AV",10)

^SCR("P1AI","AV",11)

^SCR("P1AI","AV",12)

^SCR("P1AI","AV",13)

^SCR("P1AI","AV",14)

^SCR("P1AI","AV",15)

^SCR("P1AI","AV",16)

^SCR("P1AI","AV",17)

^SCR("P1AI","AV",18)

^SCR("P1AI","AV",19)

^SCR("P1AI","AV",20)

^SCR("P1AI","AV",21)
<F8>-vmucehpk'</>-wxnhpk'<F7>-suehpk'<F6>-oahpkauphj
^SCR("P1AI","AV",22)

^SCR("P1AI","G",1,"CRD")
4,70,E,5,0
^SCR("P1AI","G",1,"HELP")

^SCR("P1AI","G",1,"LMAX")
5
^SCR("P1AI","G",1,"MUMPS1")
D HLP^P1HRA
^SCR("P1AI","G",1,"MUMPS2")

^SCR("P1AI","G",1,"OUTPUT")

^SCR("P1AI","G",1,"SHEM")
 cew 
^SCR("P1AI","G",1,"TYP")
E
^SCR("P1AI","G",2,"CRD")
4,64,H,20,0
^SCR("P1AI","G",2,"HELP")

^SCR("P1AI","G",2,"LMAX")
21
^SCR("P1AI","G",2,"MUMPS1")

^SCR("P1AI","G",2,"MUMPS2")

^SCR("P1AI","G",2,"OUTPUT")

^SCR("P1AI","G",2,"SHEM")
       dpn xe`z      
^SCR("P1AI","G",2,"TYP")
H
^SCR("P1AI","G",3,"CRD")
4,42,N,3,0
^SCR("P1AI","G",3,"HELP")
<SHIFT>+<TAB> - zncew dveaw , <TAB> - d`ad dveaw 
^SCR("P1AI","G",3,"LMAX")
6
^SCR("P1AI","G",3,"MUMPS1")
D CAMM0^P1AI
^SCR("P1AI","G",3,"MUMPS2")
D CAMM^P1AI
^SCR("P1AI","G",3,"SHEM")
 zenk 
^SCR("P1AI","G",3,"TYP")
N
^SCR("P1AI","G",4,"CRD")
4,35,H,17,0
^SCR("P1AI","G",4,"HELP")
<F7> - zexrd zbvd , F6 - dxrd yetig 
^SCR("P1AI","G",4,"LMAX")
17
^SCR("P1AI","G",4,"MUMPS1")
D ^P1LB("HRA") S %BE="E"
^SCR("P1AI","G",4,"MUMPS2")
D HRA^P1AI
^SCR("P1AI","G",4,"SHEM")
       dxrd      
^SCR("P1AI","G",4,"TYP")
H
^SCR("P1AI","G","MAX")
26
^SCR("P1AI","G","NAME","CAMM")
3
^SCR("P1AI","G","NAME","CODP")
1
^SCR("P1AI","G","NAME","HRA")
4
^SCR("P1AI","G","NAME","PAR1")
2
^SCR("P1AI","G","NM",1)
CODP
^SCR("P1AI","G","NM",2)
PAR1
^SCR("P1AI","G","NM",3)
CAMM
^SCR("P1AI","G","NM",4)
HRA
^SCR("P1AI","G","RB")
3,14,21,75
^SCR("P1AI","G","REF")
^TEMP($P,"AI"
^SCR("P1AI","G","RZD")
\
^SCR("P1AI","G","STEP")
1
^SCR("P1AI","G","STG")
                 :       dxrd      : zenk :       dpn xe`z      : cew :        
^SCR("P1AI","G","VG")
5
^SCR("P1AI","NAME")
ziwqr dgex`
^SCR("P1AI","P",2,"CRD")
1,69,E,5,0
^SCR("P1AI","P",2,"HELP")

^SCR("P1AI","P",2,"LMAX")
5
^SCR("P1AI","P",2,"MUMPS1")

^SCR("P1AI","P",2,"MUMPS2")

^SCR("P1AI","P",2,"OUTPUT")

^SCR("P1AI","P",2,"TYP")
E
^SCR("P1AI","P",3,"CRD")
1,68,H,23
^SCR("P1AI","P",3,"HELP")

^SCR("P1AI","P",3,"LMAX")
23
^SCR("P1AI","P",3,"MUMPS1")

^SCR("P1AI","P",3,"MUMPS2")

^SCR("P1AI","P",3,"OUTPUT")

^SCR("P1AI","P",3,"TYP")
H
^SCR("P1AI","P",5,"CRD")
1,30,N,3,0
^SCR("P1AI","P",5,"HELP")

^SCR("P1AI","P",5,"LMAX")
4
^SCR("P1AI","P",5,"MUMPS1")

^SCR("P1AI","P",5,"MUMPS2")

^SCR("P1AI","P",5,"OUTPUT")

^SCR("P1AI","P",5,"TYP")
N
^SCR("P1AI","P","NAME","CMTA")
5
^SCR("P1AI","P","NAME","CODA")
2
^SCR("P1AI","P","NAME","CODA1")
3
^SCR("P1AI","P","NM",2)
CODA
^SCR("P1AI","P","NM",3)
CODA1
^SCR("P1AI","P","NM",5)
CMTA
^SCR("P1AIN")
H
^SCR("P1AIN",1)
                                                                               
^SCR("P1AIN",2)
         {12 } : zenk   {                     10} {05   } :       dgex` 'qn    
^SCR("P1AIN",3)
                        {                     20} {15   } : hixt zpnfd hext    
^SCR("P1AIN",4)
                                                                             1$
^SCR("P1AIN",5)
  :       dxrd      :    ztqez xe`z    :ztqez:zenk:     hixt xe`z    : hixt :  
^SCR("P1AIN",6)
                                                                               
^SCR("P1AIN",7)
                                                                               
^SCR("P1AIN",8)
                                                                               
^SCR("P1AIN",9)
                                                                               
^SCR("P1AIN",10)
                                                                               
^SCR("P1AIN",11)
                                                                               
^SCR("P1AIN",12)
                                                                               
^SCR("P1AIN",13)
                                                                               
^SCR("P1AIN",14)
                                                                               
^SCR("P1AIN",15)
                                                                               
^SCR("P1AIN",16)
                                                                               
^SCR("P1AIN",17)
                                                                               
^SCR("P1AIN",18)
                                                                               
^SCR("P1AIN",19)
                                                                               
^SCR("P1AIN",20)
                                                                               
^SCR("P1AIN",21)
 $1                                                                            
^SCR("P1AIN",22)
          {30 } : oinfdl ozipy mihixt meniqwn   {25 }  : epnfedy mihixt xtqn   
^SCR("P1AIN",23)
                                                                               
^SCR("P1AIN","A",1)

^SCR("P1AIN","A",2)
:š…Ž‹:„‡…˜€'‘Ž
^SCR("P1AIN","A",3)
:ˆ‰˜”š�Ž†„ˆ…˜”
^SCR("P1AIN","A",4)

^SCR("P1AIN","A",5)
„˜’„š”‘…š˜…€šš”‘…šš…Ž‹ˆ‰˜”˜…€šˆ‰˜”
^SCR("P1AIN","A",6)
----------------------------------------------------------------------
^SCR("P1AIN","A",7)

^SCR("P1AIN","A",8)

^SCR("P1AIN","A",9)

^SCR("P1AIN","A",10)

^SCR("P1AIN","A",11)

^SCR("P1AIN","A",12)

^SCR("P1AIN","A",13)

^SCR("P1AIN","A",14)

^SCR("P1AIN","A",15)

^SCR("P1AIN","A",16)

^SCR("P1AIN","A",17)

^SCR("P1AIN","A",18)

^SCR("P1AIN","A",19)

^SCR("P1AIN","A",20)

^SCR("P1AIN","A",21)

^SCR("P1AIN","A",22)
:�‰Ž†„Œ�š‰�™�‰ˆ‰˜”�…Ž‰‘—Ž:…�Ž†…„™�‰ˆ‰˜”˜”‘Ž
^SCR("P1AIN","A",23)

^SCR("P1AIN","AV",1)

^SCR("P1AIN","AV",2)
:,unf:vjurtwxn
^SCR("P1AIN","AV",3)
:yhrp,bnzvyurp
^SCR("P1AIN","AV",4)

^SCR("P1AIN","AV",5)
vrgv,pxu,rut,,pxu,,unfyhrprut,yhrp
^SCR("P1AIN","AV",6)
----------------------------------------------------------------------
^SCR("P1AIN","AV",7)

^SCR("P1AIN","AV",8)

^SCR("P1AIN","AV",9)

^SCR("P1AIN","AV",10)

^SCR("P1AIN","AV",11)

^SCR("P1AIN","AV",12)

^SCR("P1AIN","AV",13)

^SCR("P1AIN","AV",14)

^SCR("P1AIN","AV",15)

^SCR("P1AIN","AV",16)

^SCR("P1AIN","AV",17)

^SCR("P1AIN","AV",18)

^SCR("P1AIN","AV",19)

^SCR("P1AIN","AV",20)

^SCR("P1AIN","AV",21)

^SCR("P1AIN","AV",22)
:ihnzvki,hbaohyhrpounhxen:ubnzuvaohyhrprpxn
^SCR("P1AIN","AV",23)

^SCR("P1AIN","G",1,"CRD")
6,76,E,6,0
^SCR("P1AIN","G",1,"HELP")

^SCR("P1AIN","G",1,"LMAX")
6
^SCR("P1AIN","G",1,"MUMPS1")
D PAR0^P1AIN
^SCR("P1AIN","G",1,"MUMPS2")
D PAR^P1AIN
^SCR("P1AIN","G",1,"SHEM")
 hixt 
^SCR("P1AIN","G",1,"TYP")
E
^SCR("P1AIN","G",2,"CRD")
6,69,H,18,0
^SCR("P1AIN","G",2,"HELP")

^SCR("P1AIN","G",2,"LMAX")
18
^SCR("P1AIN","G",2,"MUMPS1")

^SCR("P1AIN","G",2,"MUMPS2")

^SCR("P1AIN","G",2,"OUTPUT")

^SCR("P1AIN","G",2,"SHEM")
     hixt xe`z    
^SCR("P1AIN","G",2,"TYP")
H
^SCR("P1AIN","G",3,"CRD")
6,50,N,2,0
^SCR("P1AIN","G",3,"HELP")

^SCR("P1AIN","G",3,"LMAX")
4
^SCR("P1AIN","G",3,"MUMPS1")

^SCR("P1AIN","G",3,"MUMPS2")
D CA^P1AIN
^SCR("P1AIN","G",3,"MUST")

^SCR("P1AIN","G",3,"SHEM")
zenk
^SCR("P1AIN","G",3,"TYP")
N
^SCR("P1AIN","G",4,"CRD")
6,45,E,5,0
^SCR("P1AIN","G",4,"HELP")

^SCR("P1AIN","G",4,"LMAX")
5
^SCR("P1AIN","G",4,"MUMPS1")

^SCR("P1AIN","G",4,"MUMPS2")

^SCR("P1AIN","G",4,"OUTPUT")

^SCR("P1AIN","G",4,"SHEM")
ztqez
^SCR("P1AIN","G",4,"TYP")
E
^SCR("P1AIN","G",5,"CRD")
6,39,H,18,0
^SCR("P1AIN","G",5,"HELP")

^SCR("P1AIN","G",5,"LMAX")
18
^SCR("P1AIN","G",5,"MUMPS1")

^SCR("P1AIN","G",5,"MUMPS2")

^SCR("P1AIN","G",5,"OUTPUT")

^SCR("P1AIN","G",5,"SHEM")
    ztqez xe`z    
^SCR("P1AIN","G",5,"TYP")
H
^SCR("P1AIN","G",6,"CRD")
6,20,H,17,0
^SCR("P1AIN","G",6,"HELP")

^SCR("P1AIN","G",6,"LMAX")
17
^SCR("P1AIN","G",6,"MUMPS1")
D HRA0^P1AIN
^SCR("P1AIN","G",6,"MUMPS2")
D HRA^P1AIN 
^SCR("P1AIN","G",6,"SHEM")
       dxrd      
^SCR("P1AIN","G",6,"TYP")
H
^SCR("P1AIN","G","DEL")
Y
^SCR("P1AIN","G","MAX")
99999
^SCR("P1AIN","G","NAME","CA")
3
^SCR("P1AIN","G","NAME","HRA")
6
^SCR("P1AIN","G","NAME","PAR")
1
^SCR("P1AIN","G","NAME","PAR1")
2
^SCR("P1AIN","G","NAME","TSF")
4
^SCR("P1AIN","G","NAME","TSF1")
5
^SCR("P1AIN","G","NM",1)
PAR
^SCR("P1AIN","G","NM",2)
PAR1
^SCR("P1AIN","G","NM",3)
CA
^SCR("P1AIN","G","NM",4)
TSF
^SCR("P1AIN","G","NM",5)
TSF1
^SCR("P1AIN","G","NM",6)
HRA
^SCR("P1AIN","G","RB")
5,2,22,79
^SCR("P1AIN","G","REF")
^TEMP($P,"AIN"
^SCR("P1AIN","G","RZD")
\
^SCR("P1AIN","G","STEP")
1
^SCR("P1AIN","G","STG")
  :       dxrd      :    ztqez xe`z    :ztqez:zenk:     hixt xe`z    : hixt :  
^SCR("P1AIN","G","VG")
7
^SCR("P1AIN","NAME")
dgex` hext
^SCR("P1AIN","P",5,"CRD")
2,50,E,6,0
^SCR("P1AIN","P",5,"HELP")

^SCR("P1AIN","P",5,"LMAX")
6
^SCR("P1AIN","P",5,"MUMPS1")

^SCR("P1AIN","P",5,"MUMPS2")

^SCR("P1AIN","P",5,"OUTPUT")

^SCR("P1AIN","P",5,"TYP")
E
^SCR("P1AIN","P",10,"CRD")
2,49,H,23
^SCR("P1AIN","P",10,"HELP")

^SCR("P1AIN","P",10,"LMAX")
24
^SCR("P1AIN","P",10,"MUMPS1")

^SCR("P1AIN","P",10,"MUMPS2")

^SCR("P1AIN","P",10,"OUTPUT")

^SCR("P1AIN","P",10,"TYP")
H
^SCR("P1AIN","P",12,"CRD")
2,9,N,4,0
^SCR("P1AIN","P",12,"HELP")

^SCR("P1AIN","P",12,"LMAX")
4
^SCR("P1AIN","P",12,"MUMPS1")

^SCR("P1AIN","P",12,"MUMPS2")

^SCR("P1AIN","P",12,"OUTPUT")

^SCR("P1AIN","P",12,"TYP")
N
^SCR("P1AIN","P",15,"CRD")
3,50,E,6,0
^SCR("P1AIN","P",15,"HELP")

^SCR("P1AIN","P",15,"LMAX")
6
^SCR("P1AIN","P",15,"MUMPS1")

^SCR("P1AIN","P",15,"MUMPS2")

^SCR("P1AIN","P",15,"OUTPUT")

^SCR("P1AIN","P",15,"TYP")
E
^SCR("P1AIN","P",20,"CRD")
3,49,H,24
^SCR("P1AIN","P",20,"HELP")

^SCR("P1AIN","P",20,"LMAX")
24
^SCR("P1AIN","P",20,"MUMPS1")

^SCR("P1AIN","P",20,"MUMPS2")

^SCR("P1AIN","P",20,"OUTPUT")

^SCR("P1AIN","P",20,"TYP")
H
^SCR("P1AIN","P",25,"CRD")
22,48,N,4,0
^SCR("P1AIN","P",25,"HELP")

^SCR("P1AIN","P",25,"LMAX")
4
^SCR("P1AIN","P",25,"MUMPS1")

^SCR("P1AIN","P",25,"MUMPS2")

^SCR("P1AIN","P",25,"OUTPUT")

^SCR("P1AIN","P",25,"TYP")
N
^SCR("P1AIN","P",30,"CRD")
22,10,N,4,0
^SCR("P1AIN","P",30,"HELP")

^SCR("P1AIN","P",30,"LMAX")
4
^SCR("P1AIN","P",30,"MUMPS1")

^SCR("P1AIN","P",30,"MUMPS2")

^SCR("P1AIN","P",30,"OUTPUT")

^SCR("P1AIN","P",30,"TYP")
N
^SCR("P1AIN","P","NAME","AI")
5
^SCR("P1AIN","P","NAME","AI1")
10
^SCR("P1AIN","P","NAME","CAI")
12
^SCR("P1AIN","P","NAME","MPAR")
30
^SCR("P1AIN","P","NAME","PARI")
15
^SCR("P1AIN","P","NAME","PARI1")
20
^SCR("P1AIN","P","NAME","SPAR")
25
^SCR("P1AIN","P","NM",5)
AI
^SCR("P1AIN","P","NM",10)
AI1
^SCR("P1AIN","P","NM",12)
CAI
^SCR("P1AIN","P","NM",15)
PARI
^SCR("P1AIN","P","NM",20)
PARI1
^SCR("P1AIN","P","NM",25)
SPAR
^SCR("P1AIN","P","NM",30)
MPAR
^SCR("P1AIO")
H
^SCR("P1AIO",1)
                              {05 }: zenk   {                    03} {02  }    
^SCR("P1AIO",2)
                                                                         1$    
^SCR("P1AIO",3)
     :       dxrd     : zenk : ztqez xign :       dpn xe`z      : cew :        
^SCR("P1AIO",4)
                                                                               
^SCR("P1AIO",5)
                                                                               
^SCR("P1AIO",6)
                                                                               
^SCR("P1AIO",7)
                                                                               
^SCR("P1AIO",8)
                                                                               
^SCR("P1AIO",9)
                                                                               
^SCR("P1AIO",10)
                                                                               
^SCR("P1AIO",11)
                                                                               
^SCR("P1AIO",12)
                                                                               
^SCR("P1AIO",13)
                                                                               
^SCR("P1AIO",14)
                                                                               
^SCR("P1AIO",15)
                                                                               
^SCR("P1AIO",16)
                                                                               
^SCR("P1AIO",17)
                                                                               
^SCR("P1AIO",18)
                                                                               
^SCR("P1AIO",19)
                                                                               
^SCR("P1AIO",20)
 $1                                                                            
^SCR("P1AIO",21)
       <F8> - dveaw itl , <.> - 'qn itl, <F7> - cew itl , <F6> - my itl yetig  
^SCR("P1AIO",22)
                                                                               
^SCR("P1AIO","A",1)
:š…Ž‹
^SCR("P1AIO","A",2)

^SCR("P1AIO","A",3)
„˜’„š…Ž‹š”‘…š˜‰‡Ž„�Ž˜…€šƒ…—
^SCR("P1AIO","A",4)
------------------------------------------------------------
^SCR("P1AIO","A",5)

^SCR("P1AIO","A",6)

^SCR("P1AIO","A",7)

^SCR("P1AIO","A",8)

^SCR("P1AIO","A",9)

^SCR("P1AIO","A",10)

^SCR("P1AIO","A",11)

^SCR("P1AIO","A",12)

^SCR("P1AIO","A",13)

^SCR("P1AIO","A",14)

^SCR("P1AIO","A",15)

^SCR("P1AIO","A",16)

^SCR("P1AIO","A",17)

^SCR("P1AIO","A",18)

^SCR("P1AIO","A",19)

^SCR("P1AIO","A",20)

^SCR("P1AIO","A",21)
<F8>-„–…�—‰”Œ,<.>-'‘Ž‰”Œ,<F7>-ƒ…—‰”Œ,<F6>-�™‰”Œ™…”‰‡
^SCR("P1AIO","A",22)

^SCR("P1AIO","AV",1)
:,unf
^SCR("P1AIO","AV",2)

^SCR("P1AIO","AV",3)
vrgv,unf,pxu,rhjnvbnrut,sue
^SCR("P1AIO","AV",4)
------------------------------------------------------------
^SCR("P1AIO","AV",5)

^SCR("P1AIO","AV",6)

^SCR("P1AIO","AV",7)

^SCR("P1AIO","AV",8)

^SCR("P1AIO","AV",9)

^SCR("P1AIO","AV",10)

^SCR("P1AIO","AV",11)

^SCR("P1AIO","AV",12)

^SCR("P1AIO","AV",13)

^SCR("P1AIO","AV",14)

^SCR("P1AIO","AV",15)

^SCR("P1AIO","AV",16)

^SCR("P1AIO","AV",17)

^SCR("P1AIO","AV",18)

^SCR("P1AIO","AV",19)

^SCR("P1AIO","AV",20)

^SCR("P1AIO","AV",21)
<F8>-vmucehpk'</>-wxnhpk'<F7>-suehpk'<F6>-oahpkauphj
^SCR("P1AIO","AV",22)

^SCR("P1AIO","G",1,"CRD")
4,70,E,5,0
^SCR("P1AIO","G",1,"HELP")

^SCR("P1AIO","G",1,"LMAX")
5
^SCR("P1AIO","G",1,"MUMPS1")
D HLP^P1HRA
^SCR("P1AIO","G",1,"MUMPS2")

^SCR("P1AIO","G",1,"OUTPUT")

^SCR("P1AIO","G",1,"SHEM")
 cew 
^SCR("P1AIO","G",1,"TYP")
E
^SCR("P1AIO","G",2,"CRD")
4,64,H,20,0
^SCR("P1AIO","G",2,"HELP")

^SCR("P1AIO","G",2,"LMAX")
21
^SCR("P1AIO","G",2,"MUMPS1")

^SCR("P1AIO","G",2,"MUMPS2")

^SCR("P1AIO","G",2,"OUTPUT")

^SCR("P1AIO","G",2,"SHEM")
       dpn xe`z      
^SCR("P1AIO","G",2,"TYP")
H
^SCR("P1AIO","G",3,"CRD")
4,42,N,7,2
^SCR("P1AIO","G",3,"HELP")

^SCR("P1AIO","G",3,"LMAX")
12
^SCR("P1AIO","G",3,"MUMPS1")

^SCR("P1AIO","G",3,"MUMPS2")

^SCR("P1AIO","G",3,"OUTPUT")

^SCR("P1AIO","G",3,"SHEM")
 ztqez xign 
^SCR("P1AIO","G",3,"TYP")
N
^SCR("P1AIO","G",4,"CRD")
4,29,N,4,0
^SCR("P1AIO","G",4,"HELP")
<SHIFT>+<TAB> - zncew dveaw , <TAB> - d`ad dveaw
^SCR("P1AIO","G",4,"LMAX")
6
^SCR("P1AIO","G",4,"MUMPS1")
D CAMM0^P1AIO
^SCR("P1AIO","G",4,"MUMPS2")
D CAMM^P1AIO
^SCR("P1AIO","G",4,"SHEM")
 zenk 
^SCR("P1AIO","G",4,"TYP")
N
^SCR("P1AIO","G",5,"CRD")
4,22,H,16,0
^SCR("P1AIO","G",5,"HELP")
<F7> - zexrd zbvd , F6 - dxrd yetig 
^SCR("P1AIO","G",5,"LMAX")
16
^SCR("P1AIO","G",5,"MUMPS1")
D ^P1LB("HRA") S %BE="E"
^SCR("P1AIO","G",5,"MUMPS2")
D HRA^P1AIO
^SCR("P1AIO","G",5,"SHEM")
       dxrd     
^SCR("P1AIO","G",5,"TYP")
H
^SCR("P1AIO","G","DEL")

^SCR("P1AIO","G","MAX")
16
^SCR("P1AIO","G","NAME","CAMM")
4
^SCR("P1AIO","G","NAME","CODP")
1
^SCR("P1AIO","G","NAME","HRA")
5
^SCR("P1AIO","G","NAME","MHT")
3
^SCR("P1AIO","G","NAME","PAR1")
2
^SCR("P1AIO","G","NM",1)
CODP
^SCR("P1AIO","G","NM",2)
PAR1
^SCR("P1AIO","G","NM",3)
MHT
^SCR("P1AIO","G","NM",4)
CAMM
^SCR("P1AIO","G","NM",5)
HRA
^SCR("P1AIO","G","RB")
3,2,21,75
^SCR("P1AIO","G","REF")
^TEMP($P,"AI"
^SCR("P1AIO","G","RZD")
\
^SCR("P1AIO","G","STEP")
1
^SCR("P1AIO","G","STG")
     :       dxrd     : zenk : ztqez xign :       dpn xe`z      : cew :        
^SCR("P1AIO","G","VG")
5
^SCR("P1AIO","NAME")

^SCR("P1AIO","P",2,"CRD")
1,69,E,5,0
^SCR("P1AIO","P",2,"HELP")

^SCR("P1AIO","P",2,"LMAX")
5
^SCR("P1AIO","P",2,"MUMPS1")

^SCR("P1AIO","P",2,"MUMPS2")

^SCR("P1AIO","P",2,"OUTPUT")

^SCR("P1AIO","P",2,"TYP")
E
^SCR("P1AIO","P",3,"CRD")
1,68,H,23
^SCR("P1AIO","P",3,"HELP")

^SCR("P1AIO","P",3,"LMAX")
23
^SCR("P1AIO","P",3,"MUMPS1")

^SCR("P1AIO","P",3,"MUMPS2")

^SCR("P1AIO","P",3,"OUTPUT")

^SCR("P1AIO","P",3,"TYP")
H
^SCR("P1AIO","P",5,"CRD")
1,30,N,3,0
^SCR("P1AIO","P",5,"HELP")

^SCR("P1AIO","P",5,"LMAX")
4
^SCR("P1AIO","P",5,"MUMPS1")

^SCR("P1AIO","P",5,"MUMPS2")

^SCR("P1AIO","P",5,"OUTPUT")

^SCR("P1AIO","P",5,"TYP")
N
^SCR("P1AIO","P","NAME","CMTA")
5
^SCR("P1AIO","P","NAME","CODA")
2
^SCR("P1AIO","P","NAME","CODA1")
3
^SCR("P1AIO","P","NM",2)
CODA
^SCR("P1AIO","P","NM",3)
CODA1
^SCR("P1AIO","P","NM",5)
CMTA
^SCR("P1AIOT")
H
^SCR("P1AIOT",1)
                              {05 }: zenk   {                    03} {02  }    
^SCR("P1AIOT",2)
                                                                         1$    
^SCR("P1AIOT",3)
     :       dxrd     : zenk : ztqez xign :       dpn xe`z      : cew :        
^SCR("P1AIOT",4)
                                                                               
^SCR("P1AIOT",5)
                                                                               
^SCR("P1AIOT",6)
                                                                               
^SCR("P1AIOT",7)
                                                                               
^SCR("P1AIOT",8)
                                                                               
^SCR("P1AIOT",9)
                                                                               
^SCR("P1AIOT",10)
                                                                               
^SCR("P1AIOT",11)
                                                                               
^SCR("P1AIOT",12)
                                                                               
^SCR("P1AIOT",13)
                                                                               
^SCR("P1AIOT",14)
                                                                               
^SCR("P1AIOT",15)
                                                                               
^SCR("P1AIOT",16)
                                                                               
^SCR("P1AIOT",17)
                                                                               
^SCR("P1AIOT",18)
                                                                               
^SCR("P1AIOT",19)
                                                                               
^SCR("P1AIOT",20)
 $1                                                                            
^SCR("P1AIOT",21)
       <F8> - dveaw itl , <.> - 'qn itl, <F7> - cew itl , <F6> - my itl yetig  
^SCR("P1AIOT",22)
                                                                               
^SCR("P1AIOT","A",1)
:š…Ž‹
^SCR("P1AIOT","A",2)

^SCR("P1AIOT","A",3)
„˜’„š…Ž‹š”‘…š˜‰‡Ž„�Ž˜…€šƒ…—
^SCR("P1AIOT","A",4)
------------------------------------------------------------
^SCR("P1AIOT","A",5)

^SCR("P1AIOT","A",6)

^SCR("P1AIOT","A",7)

^SCR("P1AIOT","A",8)

^SCR("P1AIOT","A",9)

^SCR("P1AIOT","A",10)

^SCR("P1AIOT","A",11)

^SCR("P1AIOT","A",12)

^SCR("P1AIOT","A",13)

^SCR("P1AIOT","A",14)

^SCR("P1AIOT","A",15)

^SCR("P1AIOT","A",16)

^SCR("P1AIOT","A",17)

^SCR("P1AIOT","A",18)

^SCR("P1AIOT","A",19)

^SCR("P1AIOT","A",20)

^SCR("P1AIOT","A",21)
<F8>-„–…�—‰”Œ,<.>-'‘Ž‰”Œ,<F7>-ƒ…—‰”Œ,<F6>-�™‰”Œ™…”‰‡
^SCR("P1AIOT","A",22)

^SCR("P1AIOT","AV",1)
:,unf
^SCR("P1AIOT","AV",2)

^SCR("P1AIOT","AV",3)
vrgv,unf,pxu,rhjnvbnrut,sue
^SCR("P1AIOT","AV",4)
------------------------------------------------------------
^SCR("P1AIOT","AV",5)

^SCR("P1AIOT","AV",6)

^SCR("P1AIOT","AV",7)

^SCR("P1AIOT","AV",8)

^SCR("P1AIOT","AV",9)

^SCR("P1AIOT","AV",10)

^SCR("P1AIOT","AV",11)

^SCR("P1AIOT","AV",12)

^SCR("P1AIOT","AV",13)

^SCR("P1AIOT","AV",14)

^SCR("P1AIOT","AV",15)

^SCR("P1AIOT","AV",16)

^SCR("P1AIOT","AV",17)

^SCR("P1AIOT","AV",18)

^SCR("P1AIOT","AV",19)

^SCR("P1AIOT","AV",20)

^SCR("P1AIOT","AV",21)
<F8>-vmucehpk'</>-wxnhpk'<F7>-suehpk'<F6>-oahpkauphj
^SCR("P1AIOT","AV",22)

^SCR("P1AIOT","G",1,"CRD")
4,70,E,5,0
^SCR("P1AIOT","G",1,"HELP")

^SCR("P1AIOT","G",1,"LMAX")
5
^SCR("P1AIOT","G",1,"MUMPS1")
D HLP^P1HRA
^SCR("P1AIOT","G",1,"MUMPS2")

^SCR("P1AIOT","G",1,"OUTPUT")

^SCR("P1AIOT","G",1,"SHEM")
 cew 
^SCR("P1AIOT","G",1,"TYP")
E
^SCR("P1AIOT","G",2,"CRD")
4,64,H,20,0
^SCR("P1AIOT","G",2,"HELP")

^SCR("P1AIOT","G",2,"LMAX")
21
^SCR("P1AIOT","G",2,"MUMPS1")

^SCR("P1AIOT","G",2,"MUMPS2")

^SCR("P1AIOT","G",2,"OUTPUT")

^SCR("P1AIOT","G",2,"SHEM")
       dpn xe`z      
^SCR("P1AIOT","G",2,"TYP")
H
^SCR("P1AIOT","G",3,"CRD")
4,42,N,7,2
^SCR("P1AIOT","G",3,"HELP")

^SCR("P1AIOT","G",3,"LMAX")
12
^SCR("P1AIOT","G",3,"MUMPS1")

^SCR("P1AIOT","G",3,"MUMPS2")

^SCR("P1AIOT","G",3,"OUTPUT")

^SCR("P1AIOT","G",3,"SHEM")
 ztqez xign 
^SCR("P1AIOT","G",3,"TYP")
N
^SCR("P1AIOT","G",4,"CRD")
4,29,N,4,0
^SCR("P1AIOT","G",4,"HELP")
<SHIFT>+<TAB> - zncew dveaw , <TAB> - d`ad dveaw
^SCR("P1AIOT","G",4,"LMAX")
6
^SCR("P1AIOT","G",4,"MUMPS1")
D CAMM0^P1AIO
^SCR("P1AIOT","G",4,"MUMPS2")
D CAMM^P1AIO
^SCR("P1AIOT","G",4,"SHEM")
 zenk 
^SCR("P1AIOT","G",4,"TYP")
N
^SCR("P1AIOT","G",5,"CRD")
4,22,H,16,0
^SCR("P1AIOT","G",5,"HELP")
<F7> - zexrd zbvd , F6 - dxrd yetig 
^SCR("P1AIOT","G",5,"LMAX")
16
^SCR("P1AIOT","G",5,"MUMPS1")
D ^P1LB("HRA") S %BE="E"
^SCR("P1AIOT","G",5,"MUMPS2")
D HRA^P1AIO
^SCR("P1AIOT","G",5,"SHEM")
       dxrd     
^SCR("P1AIOT","G",5,"TYP")
H
^SCR("P1AIOT","G","DEL")

^SCR("P1AIOT","G","MAX")
53
^SCR("P1AIOT","G","NAME","CAMM")
4
^SCR("P1AIOT","G","NAME","CODP")
1
^SCR("P1AIOT","G","NAME","HRA")
5
^SCR("P1AIOT","G","NAME","MHT")
3
^SCR("P1AIOT","G","NAME","PAR1")
2
^SCR("P1AIOT","G","NM",1)
CODP
^SCR("P1AIOT","G","NM",2)
PAR1
^SCR("P1AIOT","G","NM",3)
MHT
^SCR("P1AIOT","G","NM",4)
CAMM
^SCR("P1AIOT","G","NM",5)
HRA
^SCR("P1AIOT","G","RB")
3,2,21,75
^SCR("P1AIOT","G","REF")
^TEMP($P,"AI"
^SCR("P1AIOT","G","RZD")
\
^SCR("P1AIOT","G","STEP")
1
^SCR("P1AIOT","G","STG")
     :       dxrd     : zenk : ztqez xign :       dpn xe`z      : cew :        
^SCR("P1AIOT","G","VG")
5
^SCR("P1AIOT","NAME")

^SCR("P1AIOT","P",2,"CRD")
1,69,E,5,0
^SCR("P1AIOT","P",2,"HELP")

^SCR("P1AIOT","P",2,"LMAX")
5
^SCR("P1AIOT","P",2,"MUMPS1")

^SCR("P1AIOT","P",2,"MUMPS2")

^SCR("P1AIOT","P",2,"OUTPUT")

^SCR("P1AIOT","P",2,"TYP")
E
^SCR("P1AIOT","P",3,"CRD")
1,68,H,23
^SCR("P1AIOT","P",3,"HELP")

^SCR("P1AIOT","P",3,"LMAX")
23
^SCR("P1AIOT","P",3,"MUMPS1")

^SCR("P1AIOT","P",3,"MUMPS2")

^SCR("P1AIOT","P",3,"OUTPUT")

^SCR("P1AIOT","P",3,"TYP")
H
^SCR("P1AIOT","P",5,"CRD")
1,30,N,3,0
^SCR("P1AIOT","P",5,"HELP")

^SCR("P1AIOT","P",5,"LMAX")
4
^SCR("P1AIOT","P",5,"MUMPS1")

^SCR("P1AIOT","P",5,"MUMPS2")

^SCR("P1AIOT","P",5,"OUTPUT")

^SCR("P1AIOT","P",5,"TYP")
N
^SCR("P1AIOT","P","NAME","CMTA")
5
^SCR("P1AIOT","P","NAME","CODA")
2
^SCR("P1AIOT","P","NAME","CODA1")
3
^SCR("P1AIOT","P","NM",2)
CODA
^SCR("P1AIOT","P","NM",3)
CODA1
^SCR("P1AIOT","P","NM",5)
CMTA
^SCR("P1AIT")
H
^SCR("P1AIT",1)
                              {05 }: zenk   {                    03} {02  }    
^SCR("P1AIT",2)
                                                                             1$
^SCR("P1AIT",3)
       :       dxrd      : zenk : xign ztqez :       dpn xe`z      : cew :     
^SCR("P1AIT",4)
                                                                               
^SCR("P1AIT",5)
                                                                               
^SCR("P1AIT",6)
                                                                               
^SCR("P1AIT",7)
                                                                               
^SCR("P1AIT",8)
                                                                               
^SCR("P1AIT",9)
                                                                               
^SCR("P1AIT",10)
                                                                               
^SCR("P1AIT",11)
                                                                               
^SCR("P1AIT",12)
                                                                               
^SCR("P1AIT",13)
                                                                               
^SCR("P1AIT",14)
                                                                               
^SCR("P1AIT",15)
                                                                               
^SCR("P1AIT",16)
                                                                               
^SCR("P1AIT",17)
                                                                               
^SCR("P1AIT",18)
                                                                               
^SCR("P1AIT",19)
                                                                               
^SCR("P1AIT",20)
                                                                               
^SCR("P1AIT",21)
    $1                                                                         
^SCR("P1AIT",22)
      <F8> - dveaw itl , <.> - 'qn itl, <F7> - cew itl , <F6> - my itl yetig   
^SCR("P1AIT","A",1)
:š…Ž‹
^SCR("P1AIT","A",2)

^SCR("P1AIT","A",3)
„˜’„š…Ž‹˜‰‡Žš”‘…š„�Ž˜…€šƒ…—
^SCR("P1AIT","A",4)
------------------------------------------------------------------
^SCR("P1AIT","A",5)

^SCR("P1AIT","A",6)

^SCR("P1AIT","A",7)

^SCR("P1AIT","A",8)

^SCR("P1AIT","A",9)

^SCR("P1AIT","A",10)

^SCR("P1AIT","A",11)

^SCR("P1AIT","A",12)

^SCR("P1AIT","A",13)

^SCR("P1AIT","A",14)

^SCR("P1AIT","A",15)

^SCR("P1AIT","A",16)

^SCR("P1AIT","A",17)

^SCR("P1AIT","A",18)

^SCR("P1AIT","A",19)

^SCR("P1AIT","A",20)

^SCR("P1AIT","A",21)

^SCR("P1AIT","A",22)
<F8>-„–…�—‰”Œ,<.>-'‘Ž‰”Œ,<F7>-ƒ…—‰”Œ,<F6>-�™‰”Œ™…”‰‡
^SCR("P1AIT","AV",1)
:,unf
^SCR("P1AIT","AV",2)

^SCR("P1AIT","AV",3)
vrgv,unfrhjn,pxu,vbnrut,sue
^SCR("P1AIT","AV",4)
------------------------------------------------------------------
^SCR("P1AIT","AV",5)

^SCR("P1AIT","AV",6)

^SCR("P1AIT","AV",7)

^SCR("P1AIT","AV",8)

^SCR("P1AIT","AV",9)

^SCR("P1AIT","AV",10)

^SCR("P1AIT","AV",11)

^SCR("P1AIT","AV",12)

^SCR("P1AIT","AV",13)

^SCR("P1AIT","AV",14)

^SCR("P1AIT","AV",15)

^SCR("P1AIT","AV",16)

^SCR("P1AIT","AV",17)

^SCR("P1AIT","AV",18)

^SCR("P1AIT","AV",19)

^SCR("P1AIT","AV",20)

^SCR("P1AIT","AV",21)

^SCR("P1AIT","AV",22)
<F8>-vmucehpk'</>-wxnhpk'<F7>-suehpk'<F6>-oahpkauphj
^SCR("P1AIT","G",1,"CRD")
4,73,E,5,0
^SCR("P1AIT","G",1,"HELP")

^SCR("P1AIT","G",1,"LMAX")
5
^SCR("P1AIT","G",1,"MUMPS1")
D HLP^P1HRA
^SCR("P1AIT","G",1,"MUMPS2")

^SCR("P1AIT","G",1,"OUTPUT")

^SCR("P1AIT","G",1,"SHEM")
 cew 
^SCR("P1AIT","G",1,"TYP")
E
^SCR("P1AIT","G",2,"CRD")
4,67,H,20,0
^SCR("P1AIT","G",2,"HELP")

^SCR("P1AIT","G",2,"LMAX")
21
^SCR("P1AIT","G",2,"MUMPS1")

^SCR("P1AIT","G",2,"MUMPS2")

^SCR("P1AIT","G",2,"OUTPUT")

^SCR("P1AIT","G",2,"SHEM")
       dpn xe`z      
^SCR("P1AIT","G",2,"TYP")
H
^SCR("P1AIT","G",3,"CRD")
4,45,N,7,2
^SCR("P1AIT","G",3,"HELP")

^SCR("P1AIT","G",3,"LMAX")
12
^SCR("P1AIT","G",3,"MUMPS1")

^SCR("P1AIT","G",3,"MUMPS2")

^SCR("P1AIT","G",3,"OUTPUT")

^SCR("P1AIT","G",3,"SHEM")
 xign ztqez 
^SCR("P1AIT","G",3,"TYP")
N
^SCR("P1AIT","G",4,"CRD")
4,32,N,5,0
^SCR("P1AIT","G",4,"HELP")
<SHIFT>+<TAB> - zncew dveaw , <TAB> - d`ad dveaw 
^SCR("P1AIT","G",4,"LMAX")
6
^SCR("P1AIT","G",4,"MUMPS1")
D CAMM0^P1AI
^SCR("P1AIT","G",4,"MUMPS2")
D CAMM^P1AI
^SCR("P1AIT","G",4,"SHEM")
 zenk 
^SCR("P1AIT","G",4,"TYP")
N
^SCR("P1AIT","G",5,"CRD")
4,25,H,17/34,0
^SCR("P1AIT","G",5,"HELP")
<F7> - zexrd zbvd , F6 - dxrd yetig 
^SCR("P1AIT","G",5,"LMAX")
17
^SCR("P1AIT","G",5,"MUMPS1")
D ^P1LB("HRA") S %BE="E"
^SCR("P1AIT","G",5,"MUMPS2")
D HRA^P1AI
^SCR("P1AIT","G",5,"SHEM")
       dxrd      
^SCR("P1AIT","G",5,"TYP")
H
^SCR("P1AIT","G","DEL")

^SCR("P1AIT","G","MAX")
9
^SCR("P1AIT","G","NAME","CAMM")
4
^SCR("P1AIT","G","NAME","CODP")
1
^SCR("P1AIT","G","NAME","HRA")
5
^SCR("P1AIT","G","NAME","MHT")
3
^SCR("P1AIT","G","NAME","PAR1")
2
^SCR("P1AIT","G","NM",1)
CODP
^SCR("P1AIT","G","NM",2)
PAR1
^SCR("P1AIT","G","NM",3)
MHT
^SCR("P1AIT","G","NM",4)
CAMM
^SCR("P1AIT","G","NM",5)
HRA
^SCR("P1AIT","G","RB")
3,5,22,79
^SCR("P1AIT","G","REF")
^TEMP($P,"AI"
^SCR("P1AIT","G","RZD")
\
^SCR("P1AIT","G","STEP")
1
^SCR("P1AIT","G","STG")
       :       dxrd      : zenk : xign ztqez :       dpn xe`z      : cew :     
^SCR("P1AIT","G","VG")
5
^SCR("P1AIT","NAME")

^SCR("P1AIT","P",2,"CRD")
1,69,E,5,0
^SCR("P1AIT","P",2,"HELP")

^SCR("P1AIT","P",2,"LMAX")
5
^SCR("P1AIT","P",2,"MUMPS1")

^SCR("P1AIT","P",2,"MUMPS2")

^SCR("P1AIT","P",2,"OUTPUT")

^SCR("P1AIT","P",2,"TYP")
E
^SCR("P1AIT","P",3,"CRD")
1,68,H,23,0
^SCR("P1AIT","P",3,"HELP")

^SCR("P1AIT","P",3,"LMAX")
23
^SCR("P1AIT","P",3,"MUMPS1")

^SCR("P1AIT","P",3,"MUMPS2")

^SCR("P1AIT","P",3,"OUTPUT")

^SCR("P1AIT","P",3,"TYP")
H
^SCR("P1AIT","P",5,"CRD")
1,30,N,3,0
^SCR("P1AIT","P",5,"HELP")

^SCR("P1AIT","P",5,"LMAX")
4
^SCR("P1AIT","P",5,"MUMPS1")

^SCR("P1AIT","P",5,"MUMPS2")

^SCR("P1AIT","P",5,"OUTPUT")

^SCR("P1AIT","P",5,"TYP")
N
^SCR("P1AIT","P","NAME","CMTA")
5
^SCR("P1AIT","P","NAME","CODA")
2
^SCR("P1AIT","P","NAME","CODA1")
3
^SCR("P1AIT","P","NM",2)
CODA
^SCR("P1AIT","P","NM",3)
CODA1
^SCR("P1AIT","P","NM",5)
CMTA
^SCR("P1AREA")
H
^SCR("P1AREA",1)
                                    # mixef` zlah #                            
^SCR("P1AREA",2)
                                                                               
^SCR("P1AREA",3)
                                                  {          05} : xir         
^SCR("P1AREA",4)
                                                                           1$  
^SCR("P1AREA",5)
                  : gelyn inc :  xef`  : 'qn cr :          aegx        :       
^SCR("P1AREA",6)
                                                                               
^SCR("P1AREA",7)
                                                                               
^SCR("P1AREA",8)
                                                                               
^SCR("P1AREA",9)
                                                                               
^SCR("P1AREA",10)
                                                                               
^SCR("P1AREA",11)
                                                                               
^SCR("P1AREA",12)
                                                                               
^SCR("P1AREA",13)
                                                                               
^SCR("P1AREA",14)
                                                                               
^SCR("P1AREA",15)
                                                                               
^SCR("P1AREA",16)
                                                                               
^SCR("P1AREA",17)
                                                                               
^SCR("P1AREA",18)
                                                                               
^SCR("P1AREA",19)
                                                                               
^SCR("P1AREA",20)
                                                                               
^SCR("P1AREA",21)
                                                                               
^SCR("P1AREA",22)
              $1                                                               
^SCR("P1AREA","A",1)
�‰˜…†€šŒ�ˆ
^SCR("P1AREA","A",2)

^SCR("P1AREA","A",3)
:˜‰’
^SCR("P1AREA","A",4)

^SCR("P1AREA","A",5)
‡…Œ™Ž‰Žƒ˜…†€'‘Žƒ’�…‡˜
^SCR("P1AREA","A",6)
-------------------------------------------------
^SCR("P1AREA","A",7)

^SCR("P1AREA","A",8)

^SCR("P1AREA","A",9)

^SCR("P1AREA","A",10)

^SCR("P1AREA","A",11)

^SCR("P1AREA","A",12)

^SCR("P1AREA","A",13)

^SCR("P1AREA","A",14)

^SCR("P1AREA","A",15)

^SCR("P1AREA","A",16)

^SCR("P1AREA","A",17)

^SCR("P1AREA","A",18)

^SCR("P1AREA","A",19)

^SCR("P1AREA","A",20)

^SCR("P1AREA","A",21)

^SCR("P1AREA","A",22)

^SCR("P1AREA","AV",1)
ohruzt,kcy
^SCR("P1AREA","AV",2)

^SCR("P1AREA","AV",3)
:rhg
^SCR("P1AREA","AV",4)

^SCR("P1AREA","AV",5)
jukanhnsruztwxnsgcujr
^SCR("P1AREA","AV",6)
-------------------------------------------------
^SCR("P1AREA","AV",7)

^SCR("P1AREA","AV",8)

^SCR("P1AREA","AV",9)

^SCR("P1AREA","AV",10)

^SCR("P1AREA","AV",11)

^SCR("P1AREA","AV",12)

^SCR("P1AREA","AV",13)

^SCR("P1AREA","AV",14)

^SCR("P1AREA","AV",15)

^SCR("P1AREA","AV",16)

^SCR("P1AREA","AV",17)

^SCR("P1AREA","AV",18)

^SCR("P1AREA","AV",19)

^SCR("P1AREA","AV",20)

^SCR("P1AREA","AV",21)

^SCR("P1AREA","AV",22)

^SCR("P1AREA","G",1,"CRD")
6,71,H,22,0
^SCR("P1AREA","G",1,"HELP")
<F3> - zncew dxeyn dwzrd 
^SCR("P1AREA","G",1,"LMAX")
22
^SCR("P1AREA","G",1,"MUMPS1")
S %ZMSF=""
^SCR("P1AREA","G",1,"MUMPS2")

^SCR("P1AREA","G",1,"SHEM")
          aegx        
^SCR("P1AREA","G",1,"TYP")
H
^SCR("P1AREA","G",2,"CRD")
6,48,E,6,0
^SCR("P1AREA","G",2,"HELP")

^SCR("P1AREA","G",2,"LMAX")
8
^SCR("P1AREA","G",2,"MUMPS1")

^SCR("P1AREA","G",2,"MUMPS2")

^SCR("P1AREA","G",2,"SHEM")
 'qn cr 
^SCR("P1AREA","G",2,"TYP")
E
^SCR("P1AREA","G",3,"CRD")
6,39,H,6,0
^SCR("P1AREA","G",3,"HELP")

^SCR("P1AREA","G",3,"LMAX")
8
^SCR("P1AREA","G",3,"MUMPS1")

^SCR("P1AREA","G",3,"MUMPS2")

^SCR("P1AREA","G",3,"MUST")

^SCR("P1AREA","G",3,"SHEM")
  xef`  
^SCR("P1AREA","G",3,"TYP")
H
^SCR("P1AREA","G",4,"CRD")
6,30,N,7,2
^SCR("P1AREA","G",4,"HELP")

^SCR("P1AREA","G",4,"LMAX")
11
^SCR("P1AREA","G",4,"MUMPS1")

^SCR("P1AREA","G",4,"MUMPS2")

^SCR("P1AREA","G",4,"SHEM")
 gelyn inc 
^SCR("P1AREA","G",4,"TYP")
N
^SCR("P1AREA","G","DEL")
Y
^SCR("P1AREA","G","MAX")
99999
^SCR("P1AREA","G","NAME","AZOR")
3
^SCR("P1AREA","G","NAME","DMSH")
4
^SCR("P1AREA","G","NAME","MSP1")
2
^SCR("P1AREA","G","NAME","RHOV")
1
^SCR("P1AREA","G","NM",1)
RHOV
^SCR("P1AREA","G","NM",2)
MSP1
^SCR("P1AREA","G","NM",3)
AZOR
^SCR("P1AREA","G","NM",4)
DMSH
^SCR("P1AREA","G","RB")
5,15,23,77
^SCR("P1AREA","G","REF")
^TEMP($P,"A"
^SCR("P1AREA","G","RZD")
^
^SCR("P1AREA","G","STEP")
1
^SCR("P1AREA","G","STG")
                  : gelyn inc :  xef`  : 'qn cr :          aegx        :       
^SCR("P1AREA","G","VG")
7
^SCR("P1AREA","NAME")
mixef`
^SCR("P1AREA","P",5,"CRD")
3,64,H,13
^SCR("P1AREA","P",5,"HELP")
<F7> - mixr zbvd 
^SCR("P1AREA","P",5,"LMAX")
13
^SCR("P1AREA","P",5,"MUMPS1")
D IR0^P1AREA         
^SCR("P1AREA","P",5,"MUMPS2")
D IR^P1AREA
^SCR("P1AREA","P",5,"MUST")

^SCR("P1AREA","P",5,"TYP")
H
^SCR("P1AREA","P","NAME","IR")
5
^SCR("P1AREA","P","NM",5)
IR
^SCR("P1ARZ")
H
^SCR("P1ARZ",1)
                        # mifxe` zlah #                                        
^SCR("P1ARZ",2)
                                                                               
^SCR("P1ARZ",3)
                                                                1$             
^SCR("P1ARZ",4)
                          :       fxe`d my      : fxe`d 'qn :                  
^SCR("P1ARZ",5)
                                                                               
^SCR("P1ARZ",6)
                                                                               
^SCR("P1ARZ",7)
                                                                               
^SCR("P1ARZ",8)
                                                                               
^SCR("P1ARZ",9)
                                                                               
^SCR("P1ARZ",10)
                                                                               
^SCR("P1ARZ",11)
                                                                               
^SCR("P1ARZ",12)
                                                                               
^SCR("P1ARZ",13)
                                                                               
^SCR("P1ARZ",14)
                                                                               
^SCR("P1ARZ",15)
                                                                               
^SCR("P1ARZ",16)
                                                                               
^SCR("P1ARZ",17)
                                                                               
^SCR("P1ARZ",18)
                                                                               
^SCR("P1ARZ",19)
                                                                               
^SCR("P1ARZ",20)
                      $1                                                       
^SCR("P1ARZ","A",1)
�‰†˜…€šŒ�ˆ
^SCR("P1ARZ","A",2)

^SCR("P1ARZ","A",3)

^SCR("P1ARZ","A",4)
†˜…€„�™†˜…€„'‘Ž
^SCR("P1ARZ","A",5)
--------------------------------
^SCR("P1ARZ","A",6)

^SCR("P1ARZ","A",7)

^SCR("P1ARZ","A",8)

^SCR("P1ARZ","A",9)

^SCR("P1ARZ","A",10)

^SCR("P1ARZ","A",11)

^SCR("P1ARZ","A",12)

^SCR("P1ARZ","A",13)

^SCR("P1ARZ","A",14)

^SCR("P1ARZ","A",15)

^SCR("P1ARZ","A",16)

^SCR("P1ARZ","A",17)

^SCR("P1ARZ","A",18)

^SCR("P1ARZ","A",19)

^SCR("P1ARZ","A",20)

^SCR("P1ARZ","AV",1)
ohzrut,kcy
^SCR("P1ARZ","AV",2)

^SCR("P1ARZ","AV",3)

^SCR("P1ARZ","AV",4)
zrutvoazrutvwxn
^SCR("P1ARZ","AV",5)
--------------------------------
^SCR("P1ARZ","AV",6)

^SCR("P1ARZ","AV",7)

^SCR("P1ARZ","AV",8)

^SCR("P1ARZ","AV",9)

^SCR("P1ARZ","AV",10)

^SCR("P1ARZ","AV",11)

^SCR("P1ARZ","AV",12)

^SCR("P1ARZ","AV",13)

^SCR("P1ARZ","AV",14)

^SCR("P1ARZ","AV",15)

^SCR("P1ARZ","AV",16)

^SCR("P1ARZ","AV",17)

^SCR("P1ARZ","AV",18)

^SCR("P1ARZ","AV",19)

^SCR("P1ARZ","AV",20)

^SCR("P1ARZ","G",1,"CRD")
5,60,N,4,0
^SCR("P1ARZ","G",1,"HELP")

^SCR("P1ARZ","G",1,"LMAX")
11
^SCR("P1ARZ","G",1,"MUMPS1")

^SCR("P1ARZ","G",1,"MUMPS2")
S SL=+SL D BDIKA^P1SPTB
^SCR("P1ARZ","G",1,"MUST")

^SCR("P1ARZ","G",1,"SHEM")
 fxe`d 'qn 
^SCR("P1ARZ","G",1,"TYP")
N
^SCR("P1ARZ","G",2,"CRD")
5,48,H,20,0
^SCR("P1ARZ","G",2,"HELP")

^SCR("P1ARZ","G",2,"LMAX")
21
^SCR("P1ARZ","G",2,"MUMPS1")

^SCR("P1ARZ","G",2,"MUMPS2")
D BDIKA1^P1SPTB
^SCR("P1ARZ","G",2,"SHEM")
       fxe`d my      
^SCR("P1ARZ","G",2,"TYP")
H
^SCR("P1ARZ","G","DEL")
Y
^SCR("P1ARZ","G","MAX")
9999
^SCR("P1ARZ","G","NAME","SL")
1
^SCR("P1ARZ","G","NAME","SL1")
2
^SCR("P1ARZ","G","NM",1)
SL
^SCR("P1ARZ","G","NM",2)
SL1
^SCR("P1ARZ","G","RB")
4,23,21,66
^SCR("P1ARZ","G","REF")
^TEMP($P,"SP"
^SCR("P1ARZ","G","RZD")
\
^SCR("P1ARZ","G","STEP")
1
^SCR("P1ARZ","G","STG")
                          :       fxe`d my      : fxe`d 'qn :                  
^SCR("P1ARZ","G","VG")
6
^SCR("P1ARZ","NAME")

^SCR("P1BARMAN")
H
^SCR("P1BARMAN",1)
                                 # mipnxa zniyx #                              
^SCR("P1BARMAN",2)
                           {03 : jqn sca iaxin zexey 'qn                       
^SCR("P1BARMAN",3)
                           {05 :         dxeya ze`qk 'qn                       
^SCR("P1BARMAN",4)
                                                          1$                   
^SCR("P1BARMAN",5)
                         :      onxa my    : onxa 'qn :                        
^SCR("P1BARMAN",6)
                                                                               
^SCR("P1BARMAN",7)
                                                                               
^SCR("P1BARMAN",8)
                                                                               
^SCR("P1BARMAN",9)
                                                                               
^SCR("P1BARMAN",10)
                                                                               
^SCR("P1BARMAN",11)
                                                                               
^SCR("P1BARMAN",12)
                                                                               
^SCR("P1BARMAN",13)
                                                                               
^SCR("P1BARMAN",14)
                                                                               
^SCR("P1BARMAN",15)
                                                                               
^SCR("P1BARMAN",16)
                                                                               
^SCR("P1BARMAN",17)
                                                                               
^SCR("P1BARMAN",18)
                                                                               
^SCR("P1BARMAN",19)
                                                                               
^SCR("P1BARMAN",20)
                   $1                                                          
^SCR("P1BARMAN",21)
                                                                               
^SCR("P1BARMAN","A",1)
�‰�Ž˜�šŽ‰™˜
^SCR("P1BARMAN","A",2)
:Š‘Ž“ƒ�‰�˜‰Žš…˜…™'‘Ž
^SCR("P1BARMAN","A",3)
:„˜…™�š…€‘‹'‘Ž
^SCR("P1BARMAN","A",4)

^SCR("P1BARMAN","A",5)
�Ž˜��™�Ž˜�'‘Ž
^SCR("P1BARMAN","A",6)
---------------------------
^SCR("P1BARMAN","A",7)

^SCR("P1BARMAN","A",8)

^SCR("P1BARMAN","A",9)

^SCR("P1BARMAN","A",10)

^SCR("P1BARMAN","A",11)

^SCR("P1BARMAN","A",12)

^SCR("P1BARMAN","A",13)

^SCR("P1BARMAN","A",14)

^SCR("P1BARMAN","A",15)

^SCR("P1BARMAN","A",16)

^SCR("P1BARMAN","A",17)

^SCR("P1BARMAN","A",18)

^SCR("P1BARMAN","A",19)

^SCR("P1BARMAN","A",20)

^SCR("P1BARMAN","A",21)

^SCR("P1BARMAN","AV",1)
ohbnrc,nhar
^SCR("P1BARMAN","AV",2)
:lxn;schcrhn,uruawxn
^SCR("P1BARMAN","AV",3)
:vruac,utxfwxn
^SCR("P1BARMAN","AV",4)

^SCR("P1BARMAN","AV",5)
inrcoainrcwxn
^SCR("P1BARMAN","AV",6)
---------------------------
^SCR("P1BARMAN","AV",7)

^SCR("P1BARMAN","AV",8)

^SCR("P1BARMAN","AV",9)

^SCR("P1BARMAN","AV",10)

^SCR("P1BARMAN","AV",11)

^SCR("P1BARMAN","AV",12)

^SCR("P1BARMAN","AV",13)

^SCR("P1BARMAN","AV",14)

^SCR("P1BARMAN","AV",15)

^SCR("P1BARMAN","AV",16)

^SCR("P1BARMAN","AV",17)

^SCR("P1BARMAN","AV",18)

^SCR("P1BARMAN","AV",19)

^SCR("P1BARMAN","AV",20)

^SCR("P1BARMAN","AV",21)

^SCR("P1BARMAN","G",1,"CHECK")
Y
^SCR("P1BARMAN","G",1,"CRD")
6,54,E,5.,0
^SCR("P1BARMAN","G",1,"FNC")

^SCR("P1BARMAN","G",1,"GLOB")
NAME
^SCR("P1BARMAN","G",1,"HELP")

^SCR("P1BARMAN","G",1,"LMAX")
10
^SCR("P1BARMAN","G",1,"MUMPS1")

^SCR("P1BARMAN","G",1,"MUMPS2")
S BARMAN1=$$^P1NAME(BARMAN)
^SCR("P1BARMAN","G",1,"MUST")

^SCR("P1BARMAN","G",1,"NLN")
20
^SCR("P1BARMAN","G",1,"RZD")
\
^SCR("P1BARMAN","G",1,"SHEM")
 onxa 'qn 
^SCR("P1BARMAN","G",1,"TOPB")
8
^SCR("P1BARMAN","G",1,"TYP")
E
^SCR("P1BARMAN","G",1,"VRB")
BARMAN1
^SCR("P1BARMAN","G",2,"CRD")
6,43,H,17,0
^SCR("P1BARMAN","G",2,"HELP")

^SCR("P1BARMAN","G",2,"LMAX")
17
^SCR("P1BARMAN","G",2,"MUMPS1")

^SCR("P1BARMAN","G",2,"MUMPS2")

^SCR("P1BARMAN","G",2,"OUTPUT")

^SCR("P1BARMAN","G",2,"SHEM")
      onxa my    
^SCR("P1BARMAN","G",2,"TYP")
H
^SCR("P1BARMAN","G","DEL")
Y
^SCR("P1BARMAN","G","MAX")
9999
^SCR("P1BARMAN","G","NAME","BARMAN")
1
^SCR("P1BARMAN","G","NAME","BARMAN1")
2
^SCR("P1BARMAN","G","NM",1)
BARMAN
^SCR("P1BARMAN","G","NM",2)
BARMAN1
^SCR("P1BARMAN","G","RB")
5,20,21,60
^SCR("P1BARMAN","G","REF")
^TEMP($P
^SCR("P1BARMAN","G","RZD")
\
^SCR("P1BARMAN","G","STEP")
1
^SCR("P1BARMAN","G","STG")
                         :      onxa my    : onxa 'qn :                        
^SCR("P1BARMAN","G","VG")
7
^SCR("P1BARMAN","NAME")
mipnxa zniyx
^SCR("P1BARMAN","P",3,"CRD")
2,27,N,2,0
^SCR("P1BARMAN","P",3,"HELP")

^SCR("P1BARMAN","P",3,"LMAX")
4
^SCR("P1BARMAN","P",3,"MUMPS1")

^SCR("P1BARMAN","P",3,"MUMPS2")
D SHURA^P1SPBMAN
^SCR("P1BARMAN","P",3,"MUST")

^SCR("P1BARMAN","P",3,"TYP")
N
^SCR("P1BARMAN","P",5,"CRD")
3,27,N,2,0
^SCR("P1BARMAN","P",5,"HELP")

^SCR("P1BARMAN","P",5,"LMAX")
4
^SCR("P1BARMAN","P",5,"MUMPS1")

^SCR("P1BARMAN","P",5,"MUMPS2")
D KISE^P1SPBMAN
^SCR("P1BARMAN","P",5,"MUST")

^SCR("P1BARMAN","P",5,"TYP")
N
^SCR("P1BARMAN","P","NAME","KISE")
5
^SCR("P1BARMAN","P","NAME","SHURA")
3
^SCR("P1BARMAN","P","NM",3)
SHURA
^SCR("P1BARMAN","P","NM",5)
KISE
^SCR("P1BARS")
H
^SCR("P1BARS",1)
                                                                               
^SCR("P1BARS",2)
                                                                               
^SCR("P1BARS",3)
                                                                               
^SCR("P1BARS",4)
                                                                               
^SCR("P1BARS",5)
                                                                               
^SCR("P1BARS",6)
                                                                               
^SCR("P1BARS",7)
                                                                               
^SCR("P1BARS",8)
                                                                               
^SCR("P1BARS",9)
                                                                               
^SCR("P1BARS",10)
                                                  1]                           
^SCR("P1BARS",11)
                               zepgleyd z` oiivl `p                            
^SCR("P1BARS",12)
                              {05 } ogleyl mikiieyn                            
^SCR("P1BARS",13)
                            [1                                                 
^SCR("P1BARS",14)
                                                 1$                            
^SCR("P1BARS",15)
                                  :  ogley  :                                  
^SCR("P1BARS",16)
                                                                               
^SCR("P1BARS",17)
                                                                               
^SCR("P1BARS",18)
                                                                               
^SCR("P1BARS",19)
                                                                               
^SCR("P1BARS",20)
                                                                               
^SCR("P1BARS",21)
                                                                               
^SCR("P1BARS",22)
                             $1                                                
^SCR("P1BARS","A",1)

^SCR("P1BARS","A",2)

^SCR("P1BARS","A",3)

^SCR("P1BARS","A",4)

^SCR("P1BARS","A",5)

^SCR("P1BARS","A",6)

^SCR("P1BARS","A",7)

^SCR("P1BARS","A",8)

^SCR("P1BARS","A",9)

^SCR("P1BARS","A",10)

^SCR("P1BARS","A",11)
š…�‡Œ…™„š€�‰‰–Œ€�
^SCR("P1BARS","A",12)
�‡Œ…™Œ�‰‹‰‰…™Ž
^SCR("P1BARS","A",13)

^SCR("P1BARS","A",14)

^SCR("P1BARS","A",15)
�‡Œ…™
^SCR("P1BARS","A",16)
---------
^SCR("P1BARS","A",17)

^SCR("P1BARS","A",18)

^SCR("P1BARS","A",19)

^SCR("P1BARS","A",20)

^SCR("P1BARS","A",21)

^SCR("P1BARS","A",22)

^SCR("P1BARS","AV",1)

^SCR("P1BARS","AV",2)

^SCR("P1BARS","AV",3)

^SCR("P1BARS","AV",4)

^SCR("P1BARS","AV",5)

^SCR("P1BARS","AV",6)

^SCR("P1BARS","AV",7)

^SCR("P1BARS","AV",8)

^SCR("P1BARS","AV",9)

^SCR("P1BARS","AV",10)

^SCR("P1BARS","AV",11)
,ubjkuav,tihhmktb
^SCR("P1BARS","AV",12)
ijkuakohfhhuan
^SCR("P1BARS","AV",13)

^SCR("P1BARS","AV",14)

^SCR("P1BARS","AV",15)
ijkua
^SCR("P1BARS","AV",16)
---------
^SCR("P1BARS","AV",17)

^SCR("P1BARS","AV",18)

^SCR("P1BARS","AV",19)

^SCR("P1BARS","AV",20)

^SCR("P1BARS","AV",21)

^SCR("P1BARS","AV",22)

^SCR("P1BARS","G",1,"CRD")
16,44,N,3,0
^SCR("P1BARS","G",1,"HELP")

^SCR("P1BARS","G",1,"LMAX")
9
^SCR("P1BARS","G",1,"MUMPS1")

^SCR("P1BARS","G",1,"MUMPS2")
D SLAVE^P1HZGBAR
^SCR("P1BARS","G",1,"MUST")

^SCR("P1BARS","G",1,"SHEM")
  ogley  
^SCR("P1BARS","G",1,"TYP")
N
^SCR("P1BARS","G","DEL")
Y
^SCR("P1BARS","G","MAX")
9
^SCR("P1BARS","G","NAME","SLAVE")
1
^SCR("P1BARS","G","NM",1)
SLAVE
^SCR("P1BARS","G","RB")
15,30,23,51
^SCR("P1BARS","G","REF")
^TEMP($P
^SCR("P1BARS","G","RZD")
\
^SCR("P1BARS","G","STEP")
1
^SCR("P1BARS","G","STG")
                                  :  ogley  :                                  
^SCR("P1BARS","G","VG")
17
^SCR("P1BARS","NAME")
xal zepgley ceg`
^SCR("P1BARS","P",5,"CRD")
12,30,N,3,0
^SCR("P1BARS","P",5,"HELP")

^SCR("P1BARS","P",5,"LMAX")
4
^SCR("P1BARS","P",5,"MUMPS1")

^SCR("P1BARS","P",5,"MUMPS2")

^SCR("P1BARS","P",5,"OUTPUT")

^SCR("P1BARS","P",5,"TYP")
N
^SCR("P1BARS","P","NAME","MAIN")
5
^SCR("P1BARS","P","NM",5)
MAIN
^SCR("P1BARS","P","RB",1)
11,29,14,52
^SCR("P1CARD")
H
^SCR("P1CARD",1)
                           #  miqihxk zniyx  #                                 
^SCR("P1CARD",2)
                                                                   1$          
^SCR("P1CARD",3)
                      :  xign  :        hixt xe`z    : hixt cew :              
^SCR("P1CARD",4)
                                                                               
^SCR("P1CARD",5)
                                                                               
^SCR("P1CARD",6)
                                                                               
^SCR("P1CARD",7)
                                                                               
^SCR("P1CARD",8)
                                                                               
^SCR("P1CARD",9)
                                                                               
^SCR("P1CARD",10)
                                                                               
^SCR("P1CARD",11)
                                                                               
^SCR("P1CARD",12)
                                                                               
^SCR("P1CARD",13)
                                                                               
^SCR("P1CARD",14)
                                                                               
^SCR("P1CARD",15)
                                                                               
^SCR("P1CARD",16)
                                                                               
^SCR("P1CARD",17)
                                                                               
^SCR("P1CARD",18)
                                                                               
^SCR("P1CARD",19)
                                                                               
^SCR("P1CARD",20)
                                                                               
^SCR("P1CARD",21)
                                                                               
^SCR("P1CARD",22)
                $1                                                             
^SCR("P1CARD","A",1)
�‰‘‰ˆ˜‹šŽ‰™˜
^SCR("P1CARD","A",2)

^SCR("P1CARD","A",3)
˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1CARD","A",4)
---------------------------------------
^SCR("P1CARD","A",5)

^SCR("P1CARD","A",6)

^SCR("P1CARD","A",7)

^SCR("P1CARD","A",8)

^SCR("P1CARD","A",9)

^SCR("P1CARD","A",10)

^SCR("P1CARD","A",11)

^SCR("P1CARD","A",12)

^SCR("P1CARD","A",13)

^SCR("P1CARD","A",14)

^SCR("P1CARD","A",15)

^SCR("P1CARD","A",16)

^SCR("P1CARD","A",17)

^SCR("P1CARD","A",18)

^SCR("P1CARD","A",19)

^SCR("P1CARD","A",20)

^SCR("P1CARD","A",21)

^SCR("P1CARD","A",22)

^SCR("P1CARD","AV",1)
ohxhyrf,nhar
^SCR("P1CARD","AV",2)

^SCR("P1CARD","AV",3)
rhjnyhrprut,yhrpsue
^SCR("P1CARD","AV",4)
---------------------------------------
^SCR("P1CARD","AV",5)

^SCR("P1CARD","AV",6)

^SCR("P1CARD","AV",7)

^SCR("P1CARD","AV",8)

^SCR("P1CARD","AV",9)

^SCR("P1CARD","AV",10)

^SCR("P1CARD","AV",11)

^SCR("P1CARD","AV",12)

^SCR("P1CARD","AV",13)

^SCR("P1CARD","AV",14)

^SCR("P1CARD","AV",15)

^SCR("P1CARD","AV",16)

^SCR("P1CARD","AV",17)

^SCR("P1CARD","AV",18)

^SCR("P1CARD","AV",19)

^SCR("P1CARD","AV",20)

^SCR("P1CARD","AV",21)

^SCR("P1CARD","AV",22)

^SCR("P1CARD","G",1,"CHECK")
Y
^SCR("P1CARD","G",1,"CRD")
4,64,E,8,0
^SCR("P1CARD","G",1,"FNC")

^SCR("P1CARD","G",1,"GLOB")
PAR
^SCR("P1CARD","G",1,"HELP")
<F9> ugl hixt qihxk zbvdl 
^SCR("P1CARD","G",1,"LMAX")
10
^SCR("P1CARD","G",1,"MUMPS1")
S %ZMSL="="
^SCR("P1CARD","G",1,"MUMPS2")
D PRT^P1CARD
^SCR("P1CARD","G",1,"MUST")

^SCR("P1CARD","G",1,"NLN")
20
^SCR("P1CARD","G",1,"RZD")
**
^SCR("P1CARD","G",1,"SHEM")
 hixt cew 
^SCR("P1CARD","G",1,"TOPB")
8
^SCR("P1CARD","G",1,"TYP")
E
^SCR("P1CARD","G",1,"VRB")
PRT1
^SCR("P1CARD","G",2,"CRD")
4,53,H,21,0
^SCR("P1CARD","G",2,"HELP")

^SCR("P1CARD","G",2,"LMAX")
21
^SCR("P1CARD","G",2,"MUMPS1")

^SCR("P1CARD","G",2,"MUMPS2")

^SCR("P1CARD","G",2,"OUTPUT")

^SCR("P1CARD","G",2,"SHEM")
        hixt xe`z    
^SCR("P1CARD","G",2,"TYP")
H
^SCR("P1CARD","G",3,"CRD")
4,31,N,8,2
^SCR("P1CARD","G",3,"HELP")

^SCR("P1CARD","G",3,"LMAX")
8
^SCR("P1CARD","G",3,"MUMPS1")

^SCR("P1CARD","G",3,"MUMPS2")

^SCR("P1CARD","G",3,"OUTPUT")

^SCR("P1CARD","G",3,"SHEM")
  xign  
^SCR("P1CARD","G",3,"TYP")
N
^SCR("P1CARD","G","DEL")
Y
^SCR("P1CARD","G","MAX")
99999
^SCR("P1CARD","G","NAME","MH")
3
^SCR("P1CARD","G","NAME","PRT")
1
^SCR("P1CARD","G","NAME","PRT1")
2
^SCR("P1CARD","G","NM",1)
PRT
^SCR("P1CARD","G","NM",2)
PRT1
^SCR("P1CARD","G","NM",3)
MH
^SCR("P1CARD","G","RB")
3,17,23,69
^SCR("P1CARD","G","REF")
^TEMP($P,"CARD"
^SCR("P1CARD","G","RZD")
\
^SCR("P1CARD","G","STEP")
1
^SCR("P1CARD","G","STG")
                      :  xign  :        hixt xe`z    : hixt cew :              
^SCR("P1CARD","G","VG")
5
^SCR("P1CARD","NAME")

^SCR("P1CAS")
H
^SCR("P1CAS",1)
                       # wtqa `"k zniyx #                                      
^SCR("P1CAS",2)
                                                                               
^SCR("P1CAS",3)
                                                       1$                      
^SCR("P1CAS",4)
                       :           `"k 'qn         :                           
^SCR("P1CAS",5)
                                                                               
^SCR("P1CAS",6)
                                                                               
^SCR("P1CAS",7)
                                                                               
^SCR("P1CAS",8)
                                                                               
^SCR("P1CAS",9)
                                                                               
^SCR("P1CAS",10)
                                                                               
^SCR("P1CAS",11)
                                                                               
^SCR("P1CAS",12)
                                                                               
^SCR("P1CAS",13)
                                                                               
^SCR("P1CAS",14)
                                                                               
^SCR("P1CAS",15)
                                                                               
^SCR("P1CAS",16)
                                                                               
^SCR("P1CAS",17)
                                                                               
^SCR("P1CAS",18)
                                                                               
^SCR("P1CAS",19)
                                                                               
^SCR("P1CAS",20)
                                                                               
^SCR("P1CAS",21)
                    $1                                                         
^SCR("P1CAS","A",1)
—”‘�€"‹šŽ‰™˜
^SCR("P1CAS","A",2)

^SCR("P1CAS","A",3)

^SCR("P1CAS","A",4)
€"‹'‘Ž
^SCR("P1CAS","A",5)
---------------------------
^SCR("P1CAS","A",6)

^SCR("P1CAS","A",7)

^SCR("P1CAS","A",8)

^SCR("P1CAS","A",9)

^SCR("P1CAS","A",10)

^SCR("P1CAS","A",11)

^SCR("P1CAS","A",12)

^SCR("P1CAS","A",13)

^SCR("P1CAS","A",14)

^SCR("P1CAS","A",15)

^SCR("P1CAS","A",16)

^SCR("P1CAS","A",17)

^SCR("P1CAS","A",18)

^SCR("P1CAS","A",19)

^SCR("P1CAS","A",20)

^SCR("P1CAS","A",21)

^SCR("P1CAS","AV",1)
epxct"f,nhar
^SCR("P1CAS","AV",2)

^SCR("P1CAS","AV",3)

^SCR("P1CAS","AV",4)
t"fwxn
^SCR("P1CAS","AV",5)
---------------------------
^SCR("P1CAS","AV",6)

^SCR("P1CAS","AV",7)

^SCR("P1CAS","AV",8)

^SCR("P1CAS","AV",9)

^SCR("P1CAS","AV",10)

^SCR("P1CAS","AV",11)

^SCR("P1CAS","AV",12)

^SCR("P1CAS","AV",13)

^SCR("P1CAS","AV",14)

^SCR("P1CAS","AV",15)

^SCR("P1CAS","AV",16)

^SCR("P1CAS","AV",17)

^SCR("P1CAS","AV",18)

^SCR("P1CAS","AV",19)

^SCR("P1CAS","AV",20)

^SCR("P1CAS","AV",21)

^SCR("P1CAS","G",1,"CRD")
5,51,E,19,0
^SCR("P1CAS","G",1,"HELP")

^SCR("P1CAS","G",1,"LMAX")
27
^SCR("P1CAS","G",1,"MUMPS1")

^SCR("P1CAS","G",1,"MUMPS2")

^SCR("P1CAS","G",1,"MUST")

^SCR("P1CAS","G",1,"SHEM")
           `"k 'qn         
^SCR("P1CAS","G",1,"TYP")
E
^SCR("P1CAS","G","DEL")
Y
^SCR("P1CAS","G","MAX")
99999
^SCR("P1CAS","G","NAME","CAS")
1
^SCR("P1CAS","G","NM",1)
CAS
^SCR("P1CAS","G","RB")
4,21,22,57
^SCR("P1CAS","G","REF")
^TEMP($P
^SCR("P1CAS","G","RZD")
\
^SCR("P1CAS","G","STEP")
1
^SCR("P1CAS","G","STG")
                       :           `"k 'qn         :                           
^SCR("P1CAS","G","VG")
6
^SCR("P1CAS","NAME")
wtqa `"k zniyx
^SCR("P1CB")
H
^SCR("P1CB",1)
                         #{                     03}#                           
^SCR("P1CB",2)
                     {10      }:jix`z cr    {05      }:jix`zn                  
^SCR("P1CB",3)
                   {13        }: gewl cr  {12        }: gewln                  
^SCR("P1CB",4)
                                                                             1$
^SCR("P1CB",5)
  :'yz beq:xewn qn:    gewld my    :  gewl 'qn :   mekq  : dlaw :  jix`z  :    
^SCR("P1CB",6)
                                                                               
^SCR("P1CB",7)
                                                                               
^SCR("P1CB",8)
                                                                               
^SCR("P1CB",9)
                                                                               
^SCR("P1CB",10)
                                                                               
^SCR("P1CB",11)
                                                                               
^SCR("P1CB",12)
                                                                               
^SCR("P1CB",13)
                                                                               
^SCR("P1CB",14)
                                                                               
^SCR("P1CB",15)
                                                                               
^SCR("P1CB",16)
                                                                               
^SCR("P1CB",17)
                                                                               
^SCR("P1CB",18)
                                                                               
^SCR("P1CB",19)
                                                                               
^SCR("P1CB",20)
 $1                                                                            
^SCR("P1CB",21)
                   {25     }:qn iekip k"dq  {20       }:k"dq  {15  }:zelaw     
^SCR("P1CB","A",1)

^SCR("P1CB","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1CB","A",3)
:‡…—Œƒ’:‡…—ŒŽ
^SCR("P1CB","A",4)

^SCR("P1CB","A",5)
'™š‚…‘˜…—Ž‘Ž‡…—Œ„�™‡…—Œ'‘Ž�…‹‘„Œ�—Š‰˜€š
^SCR("P1CB","A",6)
---------------------------------------------------------------------
^SCR("P1CB","A",7)

^SCR("P1CB","A",8)

^SCR("P1CB","A",9)

^SCR("P1CB","A",10)

^SCR("P1CB","A",11)

^SCR("P1CB","A",12)

^SCR("P1CB","A",13)

^SCR("P1CB","A",14)

^SCR("P1CB","A",15)

^SCR("P1CB","A",16)

^SCR("P1CB","A",17)

^SCR("P1CB","A",18)

^SCR("P1CB","A",19)

^SCR("P1CB","A",20)

^SCR("P1CB","A",21)
:‘Ž‰…‹‰�‹"„‘:‹"„‘:š…Œ�—
^SCR("P1CB","AV",1)

^SCR("P1CB","AV",2)
:lhrt,sg:lhrt,n
^SCR("P1CB","AV",3)
:jueksg:juekn
^SCR("P1CB","AV",4)

^SCR("P1CB","AV",5)
wa,duxruenxnjuekvoajuekwxnoufxvkcelhrt,
^SCR("P1CB","AV",6)
---------------------------------------------------------------------
^SCR("P1CB","AV",7)

^SCR("P1CB","AV",8)

^SCR("P1CB","AV",9)

^SCR("P1CB","AV",10)

^SCR("P1CB","AV",11)

^SCR("P1CB","AV",12)

^SCR("P1CB","AV",13)

^SCR("P1CB","AV",14)

^SCR("P1CB","AV",15)

^SCR("P1CB","AV",16)

^SCR("P1CB","AV",17)

^SCR("P1CB","AV",18)

^SCR("P1CB","AV",19)

^SCR("P1CB","AV",20)

^SCR("P1CB","AV",21)
:xnhufhbf"vx:f"vx:,ukce
^SCR("P1CB","G",1,"CRD")
6,74,D,8,0
^SCR("P1CB","G",1,"HELP")

^SCR("P1CB","G",1,"LMAX")
9
^SCR("P1CB","G",1,"MUMPS1")

^SCR("P1CB","G",1,"MUMPS2")

^SCR("P1CB","G",1,"OUTPUT")

^SCR("P1CB","G",1,"SHEM")
  jix`z  
^SCR("P1CB","G",1,"TYP")
D
^SCR("P1CB","G",2,"CRD")
6,64,E,6,0
^SCR("P1CB","G",2,"HELP")
<F9> - dlaw bivdl  
^SCR("P1CB","G",2,"LMAX")
6
^SCR("P1CB","G",2,"MUMPS1")

^SCR("P1CB","G",2,"MUMPS2")
D HESB^P1DCB
^SCR("P1CB","G",2,"SHEM")
 dlaw 
^SCR("P1CB","G",2,"TYP")
E
^SCR("P1CB","G",3,"CRD")
6,57,N,9,2
^SCR("P1CB","G",3,"HELP")

^SCR("P1CB","G",3,"LMAX")
9
^SCR("P1CB","G",3,"MUMPS1")

^SCR("P1CB","G",3,"MUMPS2")

^SCR("P1CB","G",3,"OUTPUT")

^SCR("P1CB","G",3,"SHEM")
   mekq  
^SCR("P1CB","G",3,"TYP")
N
^SCR("P1CB","G",4,"CRD")
6,47,E,11,0
^SCR("P1CB","G",4,"HELP")

^SCR("P1CB","G",4,"LMAX")
11
^SCR("P1CB","G",4,"MUMPS1")

^SCR("P1CB","G",4,"MUMPS2")

^SCR("P1CB","G",4,"OUTPUT")

^SCR("P1CB","G",4,"SHEM")
  gewl 'qn 
^SCR("P1CB","G",4,"TYP")
E
^SCR("P1CB","G",5,"CRD")
6,35,H,16,0
^SCR("P1CB","G",5,"HELP")

^SCR("P1CB","G",5,"LMAX")
16
^SCR("P1CB","G",5,"MUMPS1")

^SCR("P1CB","G",5,"MUMPS2")

^SCR("P1CB","G",5,"OUTPUT")

^SCR("P1CB","G",5,"SHEM")
    gewld my    
^SCR("P1CB","G",5,"TYP")
H
^SCR("P1CB","G",6,"CRD")
6,18,N,7,2
^SCR("P1CB","G",6,"HELP")
<F9> - dpnfd zbvd
^SCR("P1CB","G",6,"LMAX")
7
^SCR("P1CB","G",6,"MUMPS1")

^SCR("P1CB","G",6,"MUMPS2")

^SCR("P1CB","G",6,"OUTPUT")

^SCR("P1CB","G",6,"SHEM")
xewn qn
^SCR("P1CB","G",6,"TYP")
N
^SCR("P1CB","G",7,"CRD")
6,10,E,4,0
^SCR("P1CB","G",7,"HELP")

^SCR("P1CB","G",7,"LMAX")
7
^SCR("P1CB","G",7,"MUMPS1")

^SCR("P1CB","G",7,"MUMPS2")

^SCR("P1CB","G",7,"OUTPUT")

^SCR("P1CB","G",7,"SHEM")
'yz beq
^SCR("P1CB","G",7,"TYP")
E
^SCR("P1CB","G","DEL")

^SCR("P1CB","G","MAX")
99999
^SCR("P1CB","G","NAME","DATH")
1
^SCR("P1CB","G","NAME","HESB")
2
^SCR("P1CB","G","NAME","MASMK")
6
^SCR("P1CB","G","NAME","NAME")
5
^SCR("P1CB","G","NAME","NMB")
4
^SCR("P1CB","G","NAME","SHUM")
3
^SCR("P1CB","G","NAME","SUGT")
7
^SCR("P1CB","G","NM",1)
DATH
^SCR("P1CB","G","NM",2)
HESB
^SCR("P1CB","G","NM",3)
SHUM
^SCR("P1CB","G","NM",4)
NMB
^SCR("P1CB","G","NM",5)
NAME
^SCR("P1CB","G","NM",6)
MASMK
^SCR("P1CB","G","NM",7)
SUGT
^SCR("P1CB","G","RB")
5,2,21,79
^SCR("P1CB","G","REF")
^TEMPDH($P
^SCR("P1CB","G","RZD")
\
^SCR("P1CB","G","STEP")
1
^SCR("P1CB","G","STG")
  :'yz beq:xewn qn:    gewld my    :  gewl 'qn :   mekq  : dlaw :  jix`z  :    
^SCR("P1CB","G","VG")
7
^SCR("P1CB","NAME")
1zelaw g"ec
^SCR("P1CB","P",3,"CRD")
1,51,H,24
^SCR("P1CB","P",3,"HELP")

^SCR("P1CB","P",3,"LMAX")
24
^SCR("P1CB","P",3,"MUMPS1")

^SCR("P1CB","P",3,"MUMPS2")

^SCR("P1CB","P",3,"OUTPUT")

^SCR("P1CB","P",3,"TYP")
H
^SCR("P1CB","P",5,"CRD")
2,44,D,8,0
^SCR("P1CB","P",5,"HELP")

^SCR("P1CB","P",5,"LMAX")
9
^SCR("P1CB","P",5,"MUMPS1")
S:'$G(DATS1) DATS1=$$^%L1DC($H,1)
^SCR("P1CB","P",5,"MUMPS2")
S DATS=$$^%L1DC(DATS1,3)
^SCR("P1CB","P",5,"MUST")

^SCR("P1CB","P",5,"TYP")
D
^SCR("P1CB","P",10,"CRD")
2,21,D,8,0
^SCR("P1CB","P",10,"HELP")

^SCR("P1CB","P",10,"LMAX")
9
^SCR("P1CB","P",10,"MUMPS1")
S DATF1=DATS1
^SCR("P1CB","P",10,"MUMPS2")
S DATF=$$^%L1DC(DATF1,3) I DATF<DATS S %SC("ER")=1
^SCR("P1CB","P",10,"MUST")

^SCR("P1CB","P",10,"TYP")
D
^SCR("P1CB","P",12,"CRD")
3,42,E,11,0
^SCR("P1CB","P",12,"FNC")

^SCR("P1CB","P",12,"GLOB")
LKH
^SCR("P1CB","P",12,"HELP")

^SCR("P1CB","P",12,"LMAX")
11
^SCR("P1CB","P",12,"MUMPS1")

^SCR("P1CB","P",12,"MUMPS2")

^SCR("P1CB","P",12,"NLN")
20
^SCR("P1CB","P",12,"RZD")
\
^SCR("P1CB","P",12,"TOPB")
8
^SCR("P1CB","P",12,"TYP")
E
^SCR("P1CB","P",13,"CRD")
3,19,E,11,0
^SCR("P1CB","P",13,"HELP")

^SCR("P1CB","P",13,"LMAX")
11
^SCR("P1CB","P",13,"MUMPS1")
S:'$G(ADLKH) ADLKH=MELKH
^SCR("P1CB","P",13,"MUMPS2")
D ADLKH^P1DCB
^SCR("P1CB","P",13,"TYP")
E
^SCR("P1CB","P",15,"CRD")
21,62,N,5,0
^SCR("P1CB","P",15,"HELP")

^SCR("P1CB","P",15,"LMAX")
5
^SCR("P1CB","P",15,"MUMPS1")

^SCR("P1CB","P",15,"MUMPS2")

^SCR("P1CB","P",15,"OUTPUT")

^SCR("P1CB","P",15,"TYP")
N
^SCR("P1CB","P",20,"CRD")
21,44,N,9,2
^SCR("P1CB","P",20,"HELP")

^SCR("P1CB","P",20,"LMAX")
10
^SCR("P1CB","P",20,"MUMPS1")

^SCR("P1CB","P",20,"MUMPS2")

^SCR("P1CB","P",20,"OUTPUT")

^SCR("P1CB","P",20,"TYP")
N
^SCR("P1CB","P",25,"CRD")
21,19,N,8,2
^SCR("P1CB","P",25,"HELP")

^SCR("P1CB","P",25,"LMAX")
8
^SCR("P1CB","P",25,"MUMPS1")

^SCR("P1CB","P",25,"MUMPS2")

^SCR("P1CB","P",25,"OUTPUT")

^SCR("P1CB","P",25,"TYP")
N
^SCR("P1CB","P","NAME","ADLKH")
13
^SCR("P1CB","P","NAME","DATF1")
10
^SCR("P1CB","P","NAME","DATS1")
5
^SCR("P1CB","P","NAME","KOT")
3
^SCR("P1CB","P","NAME","MELKH")
12
^SCR("P1CB","P","NAME","SUMCB")
20
^SCR("P1CB","P","NAME","SUMH")
15
^SCR("P1CB","P","NAME","SUMMK")
25
^SCR("P1CB","P","NM",3)
KOT
^SCR("P1CB","P","NM",5)
DATS1
^SCR("P1CB","P","NM",10)
DATF1
^SCR("P1CB","P","NM",12)
MELKH
^SCR("P1CB","P","NM",13)
ADLKH
^SCR("P1CB","P","NM",15)
SUMH
^SCR("P1CB","P","NM",20)
SUMCB
^SCR("P1CB","P","NM",25)
SUMMK
^SCR("P1CH")
H
^SCR("P1CH",1)
                                                                               
^SCR("P1CH",2)
                                                                               
^SCR("P1CH",3)
                                                                               
^SCR("P1CH",4)
                                                                               
^SCR("P1CH",5)
                                                                               
^SCR("P1CH",6)
                                                                               
^SCR("P1CH",7)
                                                                               
^SCR("P1CH",8)
                                                                               
^SCR("P1CH",9)
                                                                               
^SCR("P1CH",10)
                                                                               
^SCR("P1CH",11)
                                                                               
^SCR("P1CH",12)
                                                                               
^SCR("P1CH",13)
                                                                               
^SCR("P1CH",14)
                                                                               
^SCR("P1CH",15)
                                                                               
^SCR("P1CH",16)
                                                                               
^SCR("P1CH",17)
                                                                               
^SCR("P1CH",18)
                                                                               
^SCR("P1CH",19)
                                                                               
^SCR("P1CH",20)
                                                                               
^SCR("P1CH",21)
             {60        }:oeayg {50   }:sipq+wpa {45       }:f.z {42      }:wiy
^SCR("P1CH",22)
                {62     }:oerxtl                                               
^SCR("P1CH","A",1)

^SCR("P1CH","A",2)

^SCR("P1CH","A",3)

^SCR("P1CH","A",4)

^SCR("P1CH","A",5)

^SCR("P1CH","A",6)

^SCR("P1CH","A",7)

^SCR("P1CH","A",8)

^SCR("P1CH","A",9)

^SCR("P1CH","A",10)

^SCR("P1CH","A",11)

^SCR("P1CH","A",12)

^SCR("P1CH","A",13)

^SCR("P1CH","A",14)

^SCR("P1CH","A",15)

^SCR("P1CH","A",16)

^SCR("P1CH","A",17)

^SCR("P1CH","A",18)

^SCR("P1CH","A",19)

^SCR("P1CH","A",20)

^SCR("P1CH","A",21)
:�…�™‡:“‰�‘+—��:†.š:—‰™
^SCR("P1CH","A",22)
:�…’˜”Œ
^SCR("P1CH","AV",1)

^SCR("P1CH","AV",2)

^SCR("P1CH","AV",3)

^SCR("P1CH","AV",4)

^SCR("P1CH","AV",5)

^SCR("P1CH","AV",6)

^SCR("P1CH","AV",7)

^SCR("P1CH","AV",8)

^SCR("P1CH","AV",9)

^SCR("P1CH","AV",10)

^SCR("P1CH","AV",11)

^SCR("P1CH","AV",12)

^SCR("P1CH","AV",13)

^SCR("P1CH","AV",14)

^SCR("P1CH","AV",15)

^SCR("P1CH","AV",16)

^SCR("P1CH","AV",17)

^SCR("P1CH","AV",18)

^SCR("P1CH","AV",19)

^SCR("P1CH","AV",20)

^SCR("P1CH","AV",21)
:iucaj:;hbx+ebc:z/,:eha
^SCR("P1CH","AV",22)
:iugrpk
^SCR("P1CH","NAME")

^SCR("P1CH","P",42,"CRD")
21,65,E,9,0
^SCR("P1CH","P",42,"HELP")

^SCR("P1CH","P",42,"LMAX")
9
^SCR("P1CH","P",42,"MUMPS1")

^SCR("P1CH","P",42,"MUMPS2")

^SCR("P1CH","P",42,"TYP")
E
^SCR("P1CH","P",45,"CRD")
21,49,E,10,0
^SCR("P1CH","P",45,"HELP")

^SCR("P1CH","P",45,"LMAX")
10
^SCR("P1CH","P",45,"MUMPS1")

^SCR("P1CH","P",45,"MUMPS2")
I '$$^TZ(TZ) S %GET=" 99 - xy`l . iweg epi` xtqn " D N^%L1GET I %S'=99 S %SC("ER")=1
^SCR("P1CH","P",45,"MUST")

^SCR("P1CH","P",45,"TYP")
E
^SCR("P1CH","P",50,"CRD")
21,32,E,5.,0
^SCR("P1CH","P",50,"HELP")

^SCR("P1CH","P",50,"LMAX")
6
^SCR("P1CH","P",50,"MUMPS1")

^SCR("P1CH","P",50,"MUMPS2")
I BSN<1001 S %SAY=" ! d`iby " X %XMSGV(1) S %SC("ST")=1
^SCR("P1CH","P",50,"MUST")

^SCR("P1CH","P",50,"TYP")
E
^SCR("P1CH","P",60,"CRD")
21,13,E,10,0
^SCR("P1CH","P",60,"HELP")

^SCR("P1CH","P",60,"LMAX")
11
^SCR("P1CH","P",60,"MUMPS1")

^SCR("P1CH","P",60,"MUMPS2")
I HESH'?1N.N S %SC("ER")=1
^SCR("P1CH","P",60,"MUST")

^SCR("P1CH","P",60,"TYP")
E
^SCR("P1CH","P",62,"CRD")
22,16,D,8,0
^SCR("P1CH","P",62,"HELP")

^SCR("P1CH","P",62,"LMAX")
8
^SCR("P1CH","P",62,"MUMPS1")

^SCR("P1CH","P",62,"MUMPS2")
I $$^%L1DC(DATP,3)-$H>360!($H-$$^%L1DC(DATP,3)>360) S %SC("ER")=1
^SCR("P1CH","P",62,"MUST")

^SCR("P1CH","P",62,"TYP")
D
^SCR("P1CH","P","NAME","""CH""","KEY",1)
/\CHS,NCHECK,TZ,BSN,HESH,DATP
^SCR("P1CH","P","NAME","BSN")
50
^SCR("P1CH","P","NAME","BSN","REF")
$P($G(^TEMP($P,"CH")),"*",4)
^SCR("P1CH","P","NAME","BSN","REF1")
$P(^TEMP($P,"CH"),"*",4)
^SCR("P1CH","P","NAME","CHS","REF")
$P($G(^TEMP($P,"CH")),"*",1)
^SCR("P1CH","P","NAME","CHS","REF1")
$P(^TEMP($P,"CH"),"*",1)
^SCR("P1CH","P","NAME","DATP")
62
^SCR("P1CH","P","NAME","DATP","REF")
$P($G(^TEMP($P,"CH")),"*",6)
^SCR("P1CH","P","NAME","DATP","REF1")
$P(^TEMP($P,"CH"),"*",6)
^SCR("P1CH","P","NAME","HESH")
60
^SCR("P1CH","P","NAME","HESH","REF")
$P($G(^TEMP($P,"CH")),"*",5)
^SCR("P1CH","P","NAME","HESH","REF1")
$P(^TEMP($P,"CH"),"*",5)
^SCR("P1CH","P","NAME","NCHECK")
42
^SCR("P1CH","P","NAME","NCHECK","REF")
$P($G(^TEMP($P,"CH")),"*",2)
^SCR("P1CH","P","NAME","NCHECK","REF1")
$P(^TEMP($P,"CH"),"*",2)
^SCR("P1CH","P","NAME","TZ")
45
^SCR("P1CH","P","NAME","TZ","REF")
$P($G(^TEMP($P,"CH")),"*",3)
^SCR("P1CH","P","NAME","TZ","REF1")
$P(^TEMP($P,"CH"),"*",3)
^SCR("P1CH","P","NM",42)
NCHECK
^SCR("P1CH","P","NM",45)
TZ
^SCR("P1CH","P","NM",50)
BSN
^SCR("P1CH","P","NM",60)
HESH
^SCR("P1CH","P","NM",62)
DATP
^SCR("P1CH","P","REF",1)
^TEMP($P,"CH")
^SCR("P1CH","P","REF",1,"RZD")
*
^SCR("P1CH","P","REF",1,"STR")
CHS*NCHECK*TZ*BSN*HESH*DATP
^SCR("P1CH","P","REF",3)
^TEMP($P,"CB","HRA")
^SCR("P1CH","P","REF",3,"RZD")
**
^SCR("P1CH","P","REF",3,"STR")
HRA
^SCR("P1CIBML")
H
^SCR("P1CIBML",1)
   {05     } : dxzi {04      } mley k"dq  {03     } oecren ixagl melyzl k"dq   
^SCR("P1CIBML",2)
                                                                               
^SCR("P1CIBML",3)
                  {07 : (enliy xaky dl` llek) oecren qihxka minlyn miyp` 'qn   
^SCR("P1CIBML",4)
                      {                                09}                     
^SCR("P1CIBML",5)
                                                                               
^SCR("P1CIBML",6)
                                                                             1$
^SCR("P1CIBML",7)
   :  mley  :melyz beq:melyzl dxzi:zecewpa mley:zecewp: melyzl :  qihxk 'qn :  
^SCR("P1CIBML",8)
                                                                               
^SCR("P1CIBML",9)
                                                                               
^SCR("P1CIBML",10)
                                                                               
^SCR("P1CIBML",11)
                                                                               
^SCR("P1CIBML",12)
                                                                               
^SCR("P1CIBML",13)
                                                                               
^SCR("P1CIBML",14)
                                                                               
^SCR("P1CIBML",15)
                                                                               
^SCR("P1CIBML",16)
                                                                               
^SCR("P1CIBML",17)
                                                                               
^SCR("P1CIBML",18)
                                                                               
^SCR("P1CIBML",19)
                                                                               
^SCR("P1CIBML",20)
 $1                                                                            
^SCR("P1CIBML",21)
     {25      }           {20      }   {15      }     {10       }              
^SCR("P1CIBML","A",1)
:„˜š‰�Œ…™‹"„‘�…ƒ’…Ž‰˜�‡Œ�…Œ™šŒ‹"„‘
^SCR("P1CIBML","A",2)

^SCR("P1CIBML","A",3)
:(…ŽŒ‰™˜�‹™„Œ€ŒŒ…‹)�…ƒ’…Ž‘‰ˆ˜‹��‰ŽŒ™Ž�‰™�€'‘Ž
^SCR("P1CIBML","A",4)

^SCR("P1CIBML","A",5)

^SCR("P1CIBML","A",6)

^SCR("P1CIBML","A",7)
�Œ…™�…Œ™š‚…‘�…Œ™šŒ„˜š‰š…ƒ…—���Œ…™š…ƒ…—��…Œ™šŒ‘‰ˆ˜‹'‘Ž
^SCR("P1CIBML","A",8)
--------------------------------------------------------------------
^SCR("P1CIBML","A",9)

^SCR("P1CIBML","A",10)

^SCR("P1CIBML","A",11)

^SCR("P1CIBML","A",12)

^SCR("P1CIBML","A",13)

^SCR("P1CIBML","A",14)

^SCR("P1CIBML","A",15)

^SCR("P1CIBML","A",16)

^SCR("P1CIBML","A",17)

^SCR("P1CIBML","A",18)

^SCR("P1CIBML","A",19)

^SCR("P1CIBML","A",20)

^SCR("P1CIBML","A",21)

^SCR("P1CIBML","AV",1)
:vr,hokuaf"vxiusgunhrcjkouka,kf"vx
^SCR("P1CIBML","AV",2)

^SCR("P1CIBML","AV",3)
:(unkharcfavktkkuf)iusgunxhyrfcohnkanohabtwxn
^SCR("P1CIBML","AV",4)

^SCR("P1CIBML","AV",5)

^SCR("P1CIBML","AV",6)

^SCR("P1CIBML","AV",7)
okuaouka,duxouka,kvr,h,usuebcokua,usuebouka,kxhyrfwxn
^SCR("P1CIBML","AV",8)
--------------------------------------------------------------------
^SCR("P1CIBML","AV",9)

^SCR("P1CIBML","AV",10)

^SCR("P1CIBML","AV",11)

^SCR("P1CIBML","AV",12)

^SCR("P1CIBML","AV",13)

^SCR("P1CIBML","AV",14)

^SCR("P1CIBML","AV",15)

^SCR("P1CIBML","AV",16)

^SCR("P1CIBML","AV",17)

^SCR("P1CIBML","AV",18)

^SCR("P1CIBML","AV",19)

^SCR("P1CIBML","AV",20)

^SCR("P1CIBML","AV",21)

^SCR("P1CIBML","G",1,"CRD")
8,76,E,12.,0
^SCR("P1CIBML","G",1,"HELP")
( <F1> ugl zipci dclwdl ) qihxk xiardl `p 
^SCR("P1CIBML","G",1,"LMAX")
12
^SCR("P1CIBML","G",1,"MUMPS1")
D CARDCB0^P1CIBML
^SCR("P1CIBML","G",1,"MUMPS2")
D CARDCB^P1CIBML
^SCR("P1CIBML","G",1,"MUST")

^SCR("P1CIBML","G",1,"SHEM")
  qihxk 'qn 
^SCR("P1CIBML","G",1,"TYP")
E
^SCR("P1CIBML","G",2,"CRD")
8,63,N,8,2
^SCR("P1CIBML","G",2,"HELP")

^SCR("P1CIBML","G",2,"LMAX")
8
^SCR("P1CIBML","G",2,"MUMPS1")
D TSHCB0^P1CIBML
^SCR("P1CIBML","G",2,"MUMPS2")
D TSHCB^P1CIBML
^SCR("P1CIBML","G",2,"MUST")

^SCR("P1CIBML","G",2,"SHEM")
 melyzl 
^SCR("P1CIBML","G",2,"TYP")
N
^SCR("P1CIBML","G",3,"CRD")
8,54,N,6,0
^SCR("P1CIBML","G",3,"HELP")

^SCR("P1CIBML","G",3,"LMAX")
6
^SCR("P1CIBML","G",3,"MUMPS1")

^SCR("P1CIBML","G",3,"MUMPS2")

^SCR("P1CIBML","G",3,"OUTPUT")

^SCR("P1CIBML","G",3,"SHEM")
zecewp
^SCR("P1CIBML","G",3,"TYP")
N
^SCR("P1CIBML","G",4,"CRD")
8,47,N,10,0
^SCR("P1CIBML","G",4,"HELP")
<F9> - mekqd lk mlyl 
^SCR("P1CIBML","G",4,"LMAX")
12
^SCR("P1CIBML","G",4,"MUMPS1")
D ZTER^P1CIBML
^SCR("P1CIBML","G",4,"MUMPS2")
D SHULCB^P1CIBML
^SCR("P1CIBML","G",4,"SHEM")
zecewpa mley
^SCR("P1CIBML","G",4,"TYP")
N
^SCR("P1CIBML","G",5,"CRD")
8,34,N,10,2
^SCR("P1CIBML","G",5,"HELP")

^SCR("P1CIBML","G",5,"LMAX")
11
^SCR("P1CIBML","G",5,"MUMPS1")

^SCR("P1CIBML","G",5,"MUMPS2")

^SCR("P1CIBML","G",5,"OUTPUT")

^SCR("P1CIBML","G",5,"SHEM")
melyzl dxzi
^SCR("P1CIBML","G",5,"TYP")
N
^SCR("P1CIBML","G",6,"CRD")
8,22,N,1,0
^SCR("P1CIBML","G",6,"HELP")
4 - dtwd ,3 - `"k ,2 - wiy ,1 - onefn 
^SCR("P1CIBML","G",6,"LMAX")
9
^SCR("P1CIBML","G",6,"MUMPS1")
D ZTER^P1CIBML
^SCR("P1CIBML","G",6,"MUMPS2")
D SUGT^P1CIBML
^SCR("P1CIBML","G",6,"SHEM")
melyz beq
^SCR("P1CIBML","G",6,"TYP")
N
^SCR("P1CIBML","G",7,"CRD")
8,12,N,8,2
^SCR("P1CIBML","G",7,"HELP")

^SCR("P1CIBML","G",7,"LMAX")
8
^SCR("P1CIBML","G",7,"MUMPS1")

^SCR("P1CIBML","G",7,"MUMPS2")

^SCR("P1CIBML","G",7,"OUTPUT")

^SCR("P1CIBML","G",7,"SHEM")
  mley  
^SCR("P1CIBML","G",7,"TYP")
N
^SCR("P1CIBML","G","DEL")

^SCR("P1CIBML","G","MAX")
9999
^SCR("P1CIBML","G","NAME","CARDCB")
1
^SCR("P1CIBML","G","NAME","ITRACB")
5
^SCR("P1CIBML","G","NAME","NKDCB")
3
^SCR("P1CIBML","G","NAME","SHULCB")
4
^SCR("P1CIBML","G","NAME","SHULT")
7
^SCR("P1CIBML","G","NAME","SUGT")
6
^SCR("P1CIBML","G","NAME","TSHCB")
2
^SCR("P1CIBML","G","NM",1)
CARDCB
^SCR("P1CIBML","G","NM",2)
TSHCB
^SCR("P1CIBML","G","NM",3)
NKDCB
^SCR("P1CIBML","G","NM",4)
SHULCB
^SCR("P1CIBML","G","NM",5)
ITRACB
^SCR("P1CIBML","G","NM",6)
SUGT
^SCR("P1CIBML","G","NM",7)
SHULT
^SCR("P1CIBML","G","NOZAPR")
1
^SCR("P1CIBML","G","RB")
7,2,21,79
^SCR("P1CIBML","G","REF")
^TMPCB(%L3MYDVN
^SCR("P1CIBML","G","RZD")
\
^SCR("P1CIBML","G","STEP")
1
^SCR("P1CIBML","G","STG")
   :  mley  :melyz beq:melyzl dxzi:zecewpa mley:zecewp: melyzl :  qihxk 'qn :  
^SCR("P1CIBML","G","VG")
9
^SCR("P1CIBML","NAME")
qeaiq melyzl zegewl zlah
^SCR("P1CIBML","P",3,"CRD")
1,42,N,8,2
^SCR("P1CIBML","P",3,"HELP")

^SCR("P1CIBML","P",3,"LMAX")
8
^SCR("P1CIBML","P",3,"MUMPS1")

^SCR("P1CIBML","P",3,"MUMPS2")

^SCR("P1CIBML","P",3,"OUTPUT")

^SCR("P1CIBML","P",3,"TYP")
N
^SCR("P1CIBML","P",4,"CRD")
1,20,N,9,2
^SCR("P1CIBML","P",4,"HELP")

^SCR("P1CIBML","P",4,"LMAX")
9
^SCR("P1CIBML","P",4,"MUMPS1")

^SCR("P1CIBML","P",4,"MUMPS2")

^SCR("P1CIBML","P",4,"OUTPUT")

^SCR("P1CIBML","P",4,"TYP")
N
^SCR("P1CIBML","P",5,"CRD")
1,3,N,8,2
^SCR("P1CIBML","P",5,"HELP")

^SCR("P1CIBML","P",5,"LMAX")
8
^SCR("P1CIBML","P",5,"MUMPS1")

^SCR("P1CIBML","P",5,"MUMPS2")

^SCR("P1CIBML","P",5,"OUTPUT")

^SCR("P1CIBML","P",5,"TYP")
N
^SCR("P1CIBML","P",7,"CRD")
3,18,N,3,0
^SCR("P1CIBML","P",7,"HELP")

^SCR("P1CIBML","P",7,"LMAX")
4
^SCR("P1CIBML","P",7,"MUMPS1")

^SCR("P1CIBML","P",7,"MUMPS2")
D AN^P1CIBML
^SCR("P1CIBML","P",7,"TYP")
N
^SCR("P1CIBML","P",9,"CRD")
4,58,H,35!
^SCR("P1CIBML","P",9,"HELP")

^SCR("P1CIBML","P",9,"LMAX")
35
^SCR("P1CIBML","P",9,"MUMPS1")

^SCR("P1CIBML","P",9,"MUMPS2")

^SCR("P1CIBML","P",9,"OUTPUT")

^SCR("P1CIBML","P",9,"TYP")
H
^SCR("P1CIBML","P",10,"CRD")
21,54,N,10,2
^SCR("P1CIBML","P",10,"HELP")

^SCR("P1CIBML","P",10,"LMAX")
10
^SCR("P1CIBML","P",10,"MUMPS1")

^SCR("P1CIBML","P",10,"MUMPS2")

^SCR("P1CIBML","P",10,"OUTPUT")

^SCR("P1CIBML","P",10,"TYP")
N
^SCR("P1CIBML","P",15,"CRD")
21,39,N,9,2
^SCR("P1CIBML","P",15,"HELP")

^SCR("P1CIBML","P",15,"LMAX")
9
^SCR("P1CIBML","P",15,"MUMPS1")

^SCR("P1CIBML","P",15,"MUMPS2")

^SCR("P1CIBML","P",15,"OUTPUT")

^SCR("P1CIBML","P",15,"TYP")
N
^SCR("P1CIBML","P",20,"CRD")
21,26,N,8,2
^SCR("P1CIBML","P",20,"HELP")

^SCR("P1CIBML","P",20,"LMAX")
9
^SCR("P1CIBML","P",20,"MUMPS1")

^SCR("P1CIBML","P",20,"MUMPS2")

^SCR("P1CIBML","P",20,"OUTPUT")

^SCR("P1CIBML","P",20,"TYP")
N
^SCR("P1CIBML","P",25,"CRD")
21,5,N,9,2
^SCR("P1CIBML","P",25,"HELP")

^SCR("P1CIBML","P",25,"LMAX")
9
^SCR("P1CIBML","P",25,"MUMPS1")

^SCR("P1CIBML","P",25,"MUMPS2")

^SCR("P1CIBML","P",25,"OUTPUT")

^SCR("P1CIBML","P",25,"TYP")
N
^SCR("P1CIBML","P","NAME","AN")
7
^SCR("P1CIBML","P","NAME","SHALAV")
9
^SCR("P1CIBML","P","NAME","SITRA")
5
^SCR("P1CIBML","P","NAME","SITRACB")
20
^SCR("P1CIBML","P","NAME","SSHUL")
4
^SCR("P1CIBML","P","NAME","SSHULCB")
15
^SCR("P1CIBML","P","NAME","SSHULT")
25
^SCR("P1CIBML","P","NAME","STSHCB")
10
^SCR("P1CIBML","P","NAME","SUMT")
3
^SCR("P1CIBML","P","NM",3)
SUMT
^SCR("P1CIBML","P","NM",4)
SSHUL
^SCR("P1CIBML","P","NM",5)
SITRA
^SCR("P1CIBML","P","NM",7)
AN
^SCR("P1CIBML","P","NM",9)
SHALAV
^SCR("P1CIBML","P","NM",10)
STSHCB
^SCR("P1CIBML","P","NM",15)
SSHULCB
^SCR("P1CIBML","P","NM",20)
SITRACB
^SCR("P1CIBML","P","NM",25)
SSHULT
^SCR("P1CODH")
H
^SCR("P1CODH",1)
                                 # zexrd zlah #                                
^SCR("P1CODH",2)
                                                                               
^SCR("P1CODH",3)
                                                                     1$        
^SCR("P1CODH",4)
                                :        dxrd       : dxrd 'qn  :              
^SCR("P1CODH",5)
                                                                               
^SCR("P1CODH",6)
                                                                               
^SCR("P1CODH",7)
                                                                               
^SCR("P1CODH",8)
                                                                               
^SCR("P1CODH",9)
                                                                               
^SCR("P1CODH",10)
                                                                               
^SCR("P1CODH",11)
                                                                               
^SCR("P1CODH",12)
                                                                               
^SCR("P1CODH",13)
                                                                               
^SCR("P1CODH",14)
                                                                               
^SCR("P1CODH",15)
                                                                               
^SCR("P1CODH",16)
                                                                               
^SCR("P1CODH",17)
                                                                               
^SCR("P1CODH",18)
                                                                               
^SCR("P1CODH",19)
                                                                               
^SCR("P1CODH",20)
                          $1                                                   
^SCR("P1CODH","A",1)
š…˜’„šŒ�ˆ
^SCR("P1CODH","A",2)

^SCR("P1CODH","A",3)

^SCR("P1CODH","A",4)
„˜’„„˜’„'‘Ž
^SCR("P1CODH","A",5)
------------------------------
^SCR("P1CODH","A",6)

^SCR("P1CODH","A",7)

^SCR("P1CODH","A",8)

^SCR("P1CODH","A",9)

^SCR("P1CODH","A",10)

^SCR("P1CODH","A",11)

^SCR("P1CODH","A",12)

^SCR("P1CODH","A",13)

^SCR("P1CODH","A",14)

^SCR("P1CODH","A",15)

^SCR("P1CODH","A",16)

^SCR("P1CODH","A",17)

^SCR("P1CODH","A",18)

^SCR("P1CODH","A",19)

^SCR("P1CODH","A",20)

^SCR("P1CODH","AV",1)
,urgv,kcy
^SCR("P1CODH","AV",2)

^SCR("P1CODH","AV",3)

^SCR("P1CODH","AV",4)
vrgvvrgvwxn
^SCR("P1CODH","AV",5)
------------------------------
^SCR("P1CODH","AV",6)

^SCR("P1CODH","AV",7)

^SCR("P1CODH","AV",8)

^SCR("P1CODH","AV",9)

^SCR("P1CODH","AV",10)

^SCR("P1CODH","AV",11)

^SCR("P1CODH","AV",12)

^SCR("P1CODH","AV",13)

^SCR("P1CODH","AV",14)

^SCR("P1CODH","AV",15)

^SCR("P1CODH","AV",16)

^SCR("P1CODH","AV",17)

^SCR("P1CODH","AV",18)

^SCR("P1CODH","AV",19)

^SCR("P1CODH","AV",20)

^SCR("P1CODH","G",1,"CRD")
5,64,E,4,0
^SCR("P1CODH","G",1,"HELP")

^SCR("P1CODH","G",1,"LMAX")
11
^SCR("P1CODH","G",1,"MUMPS1")

^SCR("P1CODH","G",1,"MUMPS2")
D BDIKA^P1SPTB
^SCR("P1CODH","G",1,"MUST")

^SCR("P1CODH","G",1,"SHEM")
 dxrd 'qn  
^SCR("P1CODH","G",1,"TYP")
E
^SCR("P1CODH","G",2,"CRD")
5,52,H,19,0
^SCR("P1CODH","G",2,"HELP")

^SCR("P1CODH","G",2,"LMAX")
19
^SCR("P1CODH","G",2,"MUMPS1")

^SCR("P1CODH","G",2,"MUMPS2")
D BDIKA1^P1SPTB
^SCR("P1CODH","G",2,"MUST")

^SCR("P1CODH","G",2,"SHEM")
        dxrd       
^SCR("P1CODH","G",2,"TYP")
H
^SCR("P1CODH","G","DEL")
Y
^SCR("P1CODH","G","MAX")
9999
^SCR("P1CODH","G","NAME","HRA")
1
^SCR("P1CODH","G","NAME","HRA1")
2
^SCR("P1CODH","G","NM",1)
HRA
^SCR("P1CODH","G","NM",2)
HRA1
^SCR("P1CODH","G","RB")
4,27,21,71
^SCR("P1CODH","G","REF")
^TEMP($P,"SP"
^SCR("P1CODH","G","RZD")
\
^SCR("P1CODH","G","STEP")
1
^SCR("P1CODH","G","STG")
                                :        dxrd       : dxrd 'qn  :              
^SCR("P1CODH","G","VG")
6
^SCR("P1CODH","NAME")
zexrd zlah
^SCR("P1CODHM")
H
^SCR("P1CODHM",1)
                        # migelynl zexrd zlah #                                
^SCR("P1CODHM",2)
                                                                               
^SCR("P1CODHM",3)
                                                                     1$        
^SCR("P1CODHM",4)
                                :        dxrd       : dxrd 'qn  :              
^SCR("P1CODHM",5)
                                                                               
^SCR("P1CODHM",6)
                                                                               
^SCR("P1CODHM",7)
                                                                               
^SCR("P1CODHM",8)
                                                                               
^SCR("P1CODHM",9)
                                                                               
^SCR("P1CODHM",10)
                                                                               
^SCR("P1CODHM",11)
                                                                               
^SCR("P1CODHM",12)
                                                                               
^SCR("P1CODHM",13)
                                                                               
^SCR("P1CODHM",14)
                                                                               
^SCR("P1CODHM",15)
                                                                               
^SCR("P1CODHM",16)
                                                                               
^SCR("P1CODHM",17)
                                                                               
^SCR("P1CODHM",18)
                                                                               
^SCR("P1CODHM",19)
                                                                               
^SCR("P1CODHM",20)
                          $1                                                   
^SCR("P1CODHM","A",1)
�‰‡…Œ™ŽŒš…˜’„šŒ�ˆ
^SCR("P1CODHM","A",2)

^SCR("P1CODHM","A",3)

^SCR("P1CODHM","A",4)
„˜’„„˜’„'‘Ž
^SCR("P1CODHM","A",5)
------------------------------
^SCR("P1CODHM","A",6)

^SCR("P1CODHM","A",7)

^SCR("P1CODHM","A",8)

^SCR("P1CODHM","A",9)

^SCR("P1CODHM","A",10)

^SCR("P1CODHM","A",11)

^SCR("P1CODHM","A",12)

^SCR("P1CODHM","A",13)

^SCR("P1CODHM","A",14)

^SCR("P1CODHM","A",15)

^SCR("P1CODHM","A",16)

^SCR("P1CODHM","A",17)

^SCR("P1CODHM","A",18)

^SCR("P1CODHM","A",19)

^SCR("P1CODHM","A",20)

^SCR("P1CODHM","AV",1)
ohjukank,urgv,kcy
^SCR("P1CODHM","AV",2)

^SCR("P1CODHM","AV",3)

^SCR("P1CODHM","AV",4)
vrgvvrgvwxn
^SCR("P1CODHM","AV",5)
------------------------------
^SCR("P1CODHM","AV",6)

^SCR("P1CODHM","AV",7)

^SCR("P1CODHM","AV",8)

^SCR("P1CODHM","AV",9)

^SCR("P1CODHM","AV",10)

^SCR("P1CODHM","AV",11)

^SCR("P1CODHM","AV",12)

^SCR("P1CODHM","AV",13)

^SCR("P1CODHM","AV",14)

^SCR("P1CODHM","AV",15)

^SCR("P1CODHM","AV",16)

^SCR("P1CODHM","AV",17)

^SCR("P1CODHM","AV",18)

^SCR("P1CODHM","AV",19)

^SCR("P1CODHM","AV",20)

^SCR("P1CODHM","G",1,"CRD")
5,64,E,4,0
^SCR("P1CODHM","G",1,"HELP")

^SCR("P1CODHM","G",1,"LMAX")
11
^SCR("P1CODHM","G",1,"MUMPS1")

^SCR("P1CODHM","G",1,"MUMPS2")
D BDIKA^P1SPTB
^SCR("P1CODHM","G",1,"MUST")

^SCR("P1CODHM","G",1,"SHEM")
 dxrd 'qn  
^SCR("P1CODHM","G",1,"TYP")
E
^SCR("P1CODHM","G",2,"CRD")
5,52,H,19,0
^SCR("P1CODHM","G",2,"HELP")

^SCR("P1CODHM","G",2,"LMAX")
19
^SCR("P1CODHM","G",2,"MUMPS1")

^SCR("P1CODHM","G",2,"MUMPS2")
D BDIKA1^P1SPTB
^SCR("P1CODHM","G",2,"MUST")

^SCR("P1CODHM","G",2,"SHEM")
        dxrd       
^SCR("P1CODHM","G",2,"TYP")
H
^SCR("P1CODHM","G","DEL")
Y
^SCR("P1CODHM","G","MAX")
9999
^SCR("P1CODHM","G","NAME","HRA")
1
^SCR("P1CODHM","G","NAME","HRA1")
2
^SCR("P1CODHM","G","NM",1)
HRA
^SCR("P1CODHM","G","NM",2)
HRA1
^SCR("P1CODHM","G","RB")
4,27,21,71
^SCR("P1CODHM","G","REF")
^TEMP($P,"SP"
^SCR("P1CODHM","G","RZD")
\
^SCR("P1CODHM","G","STEP")
1
^SCR("P1CODHM","G","STG")
                                :        dxrd       : dxrd 'qn  :              
^SCR("P1CODHM","G","VG")
6
^SCR("P1CODHM","NAME")

^SCR("P1CTL")
H
^SCR("P1CTL",1)
                 # dzxibq ixg` elheay zepnfd g"ec #                            
^SCR("P1CTL",2)
                         {10      }: jix`z cr  {05     }: jix`zn               
^SCR("P1CTL",3)
          {12: 3 - mlek ,2 - xefgy mr , 1 - xefgy `ll elheay zepnfd wx bivdl   
^SCR("P1CTL",4)
                                                                            1$ 
^SCR("P1CTL",5)
          :  mekq  : dpnfd 'qn :  mekq  : zpnfd qn :  mekq  : dpnfd 'qn :      
^SCR("P1CTL",6)
          :        :     zxfeg :        :    lehia :        :    zixewn :      
^SCR("P1CTL",7)
                                                                               
^SCR("P1CTL",8)
                                                                               
^SCR("P1CTL",9)
                                                                               
^SCR("P1CTL",10)
                                                                               
^SCR("P1CTL",11)
                                                                               
^SCR("P1CTL",12)
                                                                               
^SCR("P1CTL",13)
                                                                               
^SCR("P1CTL",14)
                                                                               
^SCR("P1CTL",15)
                                                                               
^SCR("P1CTL",16)
                                                                               
^SCR("P1CTL",17)
                                                                               
^SCR("P1CTL",18)
                                                                               
^SCR("P1CTL",19)
                                                                               
^SCR("P1CTL",20)
                                                                               
^SCR("P1CTL",21)
        $1                                                                     
^SCR("P1CTL",22)
          :{25    }:           :{20    }:          :{15    }:           :      
^SCR("P1CTL","A",1)
„š˜‰‚‘‰˜‡€…Œˆ…�™š…�Ž†„‡"…ƒ
^SCR("P1CTL","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1CTL","A",3)
:3-�Œ…‹,2-˜…†‡™�’,1-˜…†‡™€ŒŒ…Œˆ…�™š…�Ž†„—˜‚‰–„Œ
^SCR("P1CTL","A",4)

^SCR("P1CTL","A",5)
�…‹‘„�Ž†„'‘Ž�…‹‘š�Ž†„‘Ž�…‹‘„�Ž†„'‘Ž
^SCR("P1CTL","A",6)
š˜†…‡Œ…ˆ‰�š‰˜…—Ž
^SCR("P1CTL","A",7)
--------------------------------------------------------
^SCR("P1CTL","A",8)

^SCR("P1CTL","A",9)

^SCR("P1CTL","A",10)

^SCR("P1CTL","A",11)

^SCR("P1CTL","A",12)

^SCR("P1CTL","A",13)

^SCR("P1CTL","A",14)

^SCR("P1CTL","A",15)

^SCR("P1CTL","A",16)

^SCR("P1CTL","A",17)

^SCR("P1CTL","A",18)

^SCR("P1CTL","A",19)

^SCR("P1CTL","A",20)

^SCR("P1CTL","A",21)

^SCR("P1CTL","A",22)
:::::::
^SCR("P1CTL","AV",1)
v,rhdxhrjtukyuca,ubnzvj"us
^SCR("P1CTL","AV",2)
:lhrt,sg:lhrt,n
^SCR("P1CTL","AV",3)
:3-okuf'2-ruzjaog'1-ruzjatkkukyuca,ubnzverdhmvk
^SCR("P1CTL","AV",4)

^SCR("P1CTL","AV",5)
oufxvbnzvwxnoufx,bnzvxnoufxvbnzvwxn
^SCR("P1CTL","AV",6)
,rzujkuyhc,hruen
^SCR("P1CTL","AV",7)
--------------------------------------------------------
^SCR("P1CTL","AV",8)

^SCR("P1CTL","AV",9)

^SCR("P1CTL","AV",10)

^SCR("P1CTL","AV",11)

^SCR("P1CTL","AV",12)

^SCR("P1CTL","AV",13)

^SCR("P1CTL","AV",14)

^SCR("P1CTL","AV",15)

^SCR("P1CTL","AV",16)

^SCR("P1CTL","AV",17)

^SCR("P1CTL","AV",18)

^SCR("P1CTL","AV",19)

^SCR("P1CTL","AV",20)

^SCR("P1CTL","AV",21)

^SCR("P1CTL","AV",22)
:::::::
^SCR("P1CTL","G",1,"CRD")
6,72,E,11,0
^SCR("P1CTL","G",1,"HELP")
<F9> - dpnfd bivdl
^SCR("P1CTL","G",1,"LMAX")
11
^SCR("P1CTL","G",1,"MUMPS1")

^SCR("P1CTL","G",1,"MUMPS2")
D HZMVW^P1CTL(HZM1)
^SCR("P1CTL","G",1,"SHEM")
 dpnfd 'qn 
^SCR("P1CTL","G",1,"TYP")
E
^SCR("P1CTL","G",2,"CRD")
6,60,N,8,2
^SCR("P1CTL","G",2,"HELP")

^SCR("P1CTL","G",2,"LMAX")
8
^SCR("P1CTL","G",2,"MUMPS1")

^SCR("P1CTL","G",2,"MUMPS2")

^SCR("P1CTL","G",2,"OUTPUT")

^SCR("P1CTL","G",2,"SHEM")
  mekq  
^SCR("P1CTL","G",2,"TYP")
N
^SCR("P1CTL","G",3,"CRD")
6,51,E,10,0
^SCR("P1CTL","G",3,"HELP")
<F9> - dpnfd bivdl
^SCR("P1CTL","G",3,"LMAX")
10
^SCR("P1CTL","G",3,"MUMPS1")

^SCR("P1CTL","G",3,"MUMPS2")
D HZMVW^P1CTL(HZM2)
^SCR("P1CTL","G",3,"SHEM")
 zpnfd qn 
^SCR("P1CTL","G",3,"TYP")
E
^SCR("P1CTL","G",4,"CRD")
6,40,N,8,2
^SCR("P1CTL","G",4,"HELP")

^SCR("P1CTL","G",4,"LMAX")
8
^SCR("P1CTL","G",4,"MUMPS1")

^SCR("P1CTL","G",4,"MUMPS2")

^SCR("P1CTL","G",4,"OUTPUT")

^SCR("P1CTL","G",4,"SHEM")
  mekq  
^SCR("P1CTL","G",4,"TYP")
N
^SCR("P1CTL","G",5,"CRD")
6,31,E,11,0
^SCR("P1CTL","G",5,"HELP")
<F9> - dpnfd bivdl
^SCR("P1CTL","G",5,"LMAX")
11
^SCR("P1CTL","G",5,"MUMPS1")

^SCR("P1CTL","G",5,"MUMPS2")
D HZMVW^P1CTL(HZM3)
^SCR("P1CTL","G",5,"SHEM")
 dpnfd 'qn 
^SCR("P1CTL","G",5,"TYP")
E
^SCR("P1CTL","G",6,"CRD")
6,19,N,8,2
^SCR("P1CTL","G",6,"HELP")

^SCR("P1CTL","G",6,"LMAX")
8
^SCR("P1CTL","G",6,"MUMPS1")

^SCR("P1CTL","G",6,"MUMPS2")

^SCR("P1CTL","G",6,"OUTPUT")

^SCR("P1CTL","G",6,"SHEM")
  mekq  
^SCR("P1CTL","G",6,"TYP")
N
^SCR("P1CTL","G","DEL")

^SCR("P1CTL","G","MAX")
9999
^SCR("P1CTL","G","NAME","HZM1")
1
^SCR("P1CTL","G","NAME","HZM2")
3
^SCR("P1CTL","G","NAME","HZM3")
5
^SCR("P1CTL","G","NAME","SUM1")
2
^SCR("P1CTL","G","NAME","SUM2")
4
^SCR("P1CTL","G","NAME","SUM3")
6
^SCR("P1CTL","G","NM",1)
HZM1
^SCR("P1CTL","G","NM",2)
SUM1
^SCR("P1CTL","G","NM",3)
HZM2
^SCR("P1CTL","G","NM",4)
SUM2
^SCR("P1CTL","G","NM",5)
HZM3
^SCR("P1CTL","G","NM",6)
SUM3
^SCR("P1CTL","G","RB")
5,9,22,78
^SCR("P1CTL","G","REF")
^TEMP($P
^SCR("P1CTL","G","RZD")
\
^SCR("P1CTL","G","STEP")
1
^SCR("P1CTL","G","STG")
          :  mekq  : dpnfd 'qn :  mekq  : zpnfd qn :  mekq  : dpnfd 'qn :      
^SCR("P1CTL","G","VG")
8
^SCR("P1CTL","NAME")
dzxibq ixg` elheay zepnfd g"ec
^SCR("P1CTL","P",5,"CRD")
2,47,D,8,0
^SCR("P1CTL","P",5,"HELP")

^SCR("P1CTL","P",5,"LMAX")
8
^SCR("P1CTL","P",5,"MUMPS1")
S:'$G(METRH) METRH=$$^%L1DC(P1DZ,1)
^SCR("P1CTL","P",5,"MUMPS2")

^SCR("P1CTL","P",5,"TYP")
D
^SCR("P1CTL","P",10,"CRD")
2,25,D,8,0
^SCR("P1CTL","P",10,"HELP")

^SCR("P1CTL","P",10,"LMAX")
9
^SCR("P1CTL","P",10,"MUMPS1")
S:'$G(ADTRH) ADTRH=METRH
^SCR("P1CTL","P",10,"MUMPS2")
D ADTRH^P1CTL
^SCR("P1CTL","P",10,"TYP")
D
^SCR("P1CTL","P",12,"CRD")
3,10,N,1,0
^SCR("P1CTL","P",12,"HELP")

^SCR("P1CTL","P",12,"LMAX")
3
^SCR("P1CTL","P",12,"MUMPS1")
S:'$G(SB) SB=3
^SCR("P1CTL","P",12,"MUMPS2")
D SB^P1CTL
^SCR("P1CTL","P",12,"TYP")
N
^SCR("P1CTL","P",15,"CRD")
22,52,N,7,2
^SCR("P1CTL","P",15,"HELP")

^SCR("P1CTL","P",15,"LMAX")
7
^SCR("P1CTL","P",15,"MUMPS1")

^SCR("P1CTL","P",15,"MUMPS2")

^SCR("P1CTL","P",15,"OUTPUT")

^SCR("P1CTL","P",15,"TYP")
N
^SCR("P1CTL","P",20,"CRD")
22,32,N,7,1
^SCR("P1CTL","P",20,"HELP")

^SCR("P1CTL","P",20,"LMAX")
7
^SCR("P1CTL","P",20,"MUMPS1")

^SCR("P1CTL","P",20,"MUMPS2")

^SCR("P1CTL","P",20,"OUTPUT")

^SCR("P1CTL","P",20,"TYP")
N
^SCR("P1CTL","P",25,"CRD")
22,11,N,7,1
^SCR("P1CTL","P",25,"HELP")

^SCR("P1CTL","P",25,"LMAX")
7
^SCR("P1CTL","P",25,"MUMPS1")

^SCR("P1CTL","P",25,"MUMPS2")

^SCR("P1CTL","P",25,"OUTPUT")

^SCR("P1CTL","P",25,"TYP")
N
^SCR("P1CTL","P","NAME","ADTRH")
10
^SCR("P1CTL","P","NAME","METRH")
5
^SCR("P1CTL","P","NAME","SB")
12
^SCR("P1CTL","P","NAME","SSUM1")
15
^SCR("P1CTL","P","NAME","SSUM2")
20
^SCR("P1CTL","P","NAME","SSUM3")
25
^SCR("P1CTL","P","NM",5)
METRH
^SCR("P1CTL","P","NM",10)
ADTRH
^SCR("P1CTL","P","NM",12)
SB
^SCR("P1CTL","P","NM",15)
SSUM1
^SCR("P1CTL","P","NM",20)
SSUM2
^SCR("P1CTL","P","NM",25)
SSUM3
^SCR("P1DCIBML")
H
^SCR("P1DCIBML",1)
              # "qeaiq" zegewl oecren g"ec #                                   
^SCR("P1DCIBML",2)
                    {05      }: jix`z cr    {01      }: jix`zn                 
^SCR("P1DCIBML",3)
                                                                             1$
^SCR("P1DCIBML",4)
   :sqka mley:zecewpa mley: melyzl :zecewp:  qihxk 'qn :dpnfd 'qn:  jix`z :    
^SCR("P1DCIBML",5)
                                                                               
^SCR("P1DCIBML",6)
                                                                               
^SCR("P1DCIBML",7)
                                                                               
^SCR("P1DCIBML",8)
                                                                               
^SCR("P1DCIBML",9)
                                                                               
^SCR("P1DCIBML",10)
                                                                               
^SCR("P1DCIBML",11)
                                                                               
^SCR("P1DCIBML",12)
                                                                               
^SCR("P1DCIBML",13)
                                                                               
^SCR("P1DCIBML",14)
                                                                               
^SCR("P1DCIBML",15)
                                                                               
^SCR("P1DCIBML",16)
                                                                               
^SCR("P1DCIBML",17)
                                                                               
^SCR("P1DCIBML",18)
                                                                               
^SCR("P1DCIBML",19)
                                                                               
^SCR("P1DCIBML",20)
                                                                               
^SCR("P1DCIBML",21)
 $1                                                                            
^SCR("P1DCIBML",22)
   {25      } {15      }  {10     }                                            
^SCR("P1DCIBML","A",1)
"‘…�‰‘"š…‡…—Œ�…ƒ’…Ž‡"…ƒ
^SCR("P1DCIBML","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1DCIBML","A",3)

^SCR("P1DCIBML","A",4)
“‘‹��Œ…™š…ƒ…—���Œ…™�…Œ™šŒš…ƒ…—�‘‰ˆ˜‹'‘Ž„�Ž†„'‘ŽŠ‰˜€š
^SCR("P1DCIBML","A",5)
--------------------------------------------------------------------
^SCR("P1DCIBML","A",6)

^SCR("P1DCIBML","A",7)

^SCR("P1DCIBML","A",8)

^SCR("P1DCIBML","A",9)

^SCR("P1DCIBML","A",10)

^SCR("P1DCIBML","A",11)

^SCR("P1DCIBML","A",12)

^SCR("P1DCIBML","A",13)

^SCR("P1DCIBML","A",14)

^SCR("P1DCIBML","A",15)

^SCR("P1DCIBML","A",16)

^SCR("P1DCIBML","A",17)

^SCR("P1DCIBML","A",18)

^SCR("P1DCIBML","A",19)

^SCR("P1DCIBML","A",20)

^SCR("P1DCIBML","A",21)

^SCR("P1DCIBML","A",22)

^SCR("P1DCIBML","AV",1)
"xuchx",ujuekiusgunj"us
^SCR("P1DCIBML","AV",2)
:lhrt,sg:lhrt,n
^SCR("P1DCIBML","AV",3)

^SCR("P1DCIBML","AV",4)
;xfcokua,usuebcokuaouka,k,usuebxhyrfwxnvbnzvwxnlhrt,
^SCR("P1DCIBML","AV",5)
--------------------------------------------------------------------
^SCR("P1DCIBML","AV",6)

^SCR("P1DCIBML","AV",7)

^SCR("P1DCIBML","AV",8)

^SCR("P1DCIBML","AV",9)

^SCR("P1DCIBML","AV",10)

^SCR("P1DCIBML","AV",11)

^SCR("P1DCIBML","AV",12)

^SCR("P1DCIBML","AV",13)

^SCR("P1DCIBML","AV",14)

^SCR("P1DCIBML","AV",15)

^SCR("P1DCIBML","AV",16)

^SCR("P1DCIBML","AV",17)

^SCR("P1DCIBML","AV",18)

^SCR("P1DCIBML","AV",19)

^SCR("P1DCIBML","AV",20)

^SCR("P1DCIBML","AV",21)

^SCR("P1DCIBML","AV",22)

^SCR("P1DCIBML","G",1,"CRD")
5,74,D,8,0
^SCR("P1DCIBML","G",1,"HELP")

^SCR("P1DCIBML","G",1,"LMAX")
8
^SCR("P1DCIBML","G",1,"MUMPS1")

^SCR("P1DCIBML","G",1,"MUMPS2")

^SCR("P1DCIBML","G",1,"MUST")

^SCR("P1DCIBML","G",1,"OUTPUT")

^SCR("P1DCIBML","G",1,"SHEM")
  jix`z 
^SCR("P1DCIBML","G",1,"TYP")
D
^SCR("P1DCIBML","G",2,"CRD")
5,65,E,8,0
^SCR("P1DCIBML","G",2,"HELP")
<F9> ugl dpnfd zbvdl 
^SCR("P1DCIBML","G",2,"LMAX")
9
^SCR("P1DCIBML","G",2,"MUMPS1")

^SCR("P1DCIBML","G",2,"MUMPS2")
D HZM^P1DCIBML
^SCR("P1DCIBML","G",2,"MUST")

^SCR("P1DCIBML","G",2,"SHEM")
dpnfd 'qn
^SCR("P1DCIBML","G",2,"TYP")
E
^SCR("P1DCIBML","G",3,"CRD")
5,55,E,12,0
^SCR("P1DCIBML","G",3,"HELP")

^SCR("P1DCIBML","G",3,"LMAX")
12
^SCR("P1DCIBML","G",3,"MUMPS1")

^SCR("P1DCIBML","G",3,"MUMPS2")

^SCR("P1DCIBML","G",3,"OUTPUT")

^SCR("P1DCIBML","G",3,"SHEM")
  qihxk 'qn 
^SCR("P1DCIBML","G",3,"TYP")
E
^SCR("P1DCIBML","G",4,"CRD")
5,42,N,6,0
^SCR("P1DCIBML","G",4,"HELP")

^SCR("P1DCIBML","G",4,"LMAX")
6
^SCR("P1DCIBML","G",4,"MUMPS1")

^SCR("P1DCIBML","G",4,"MUMPS2")

^SCR("P1DCIBML","G",4,"OUTPUT")

^SCR("P1DCIBML","G",4,"SHEM")
zecewp
^SCR("P1DCIBML","G",4,"TYP")
N
^SCR("P1DCIBML","G",5,"CRD")
5,35,N,8,2
^SCR("P1DCIBML","G",5,"HELP")

^SCR("P1DCIBML","G",5,"LMAX")
8
^SCR("P1DCIBML","G",5,"MUMPS1")

^SCR("P1DCIBML","G",5,"MUMPS2")

^SCR("P1DCIBML","G",5,"OUTPUT")

^SCR("P1DCIBML","G",5,"SHEM")
 melyzl 
^SCR("P1DCIBML","G",5,"TYP")
N
^SCR("P1DCIBML","G",6,"CRD")
5,26,N,7,2
^SCR("P1DCIBML","G",6,"HELP")

^SCR("P1DCIBML","G",6,"LMAX")
12
^SCR("P1DCIBML","G",6,"MUMPS1")

^SCR("P1DCIBML","G",6,"MUMPS2")

^SCR("P1DCIBML","G",6,"OUTPUT")

^SCR("P1DCIBML","G",6,"SHEM")
zecewpa mley
^SCR("P1DCIBML","G",6,"TYP")
N
^SCR("P1DCIBML","G",7,"CRD")
5,13,N,8,2
^SCR("P1DCIBML","G",7,"HELP")

^SCR("P1DCIBML","G",7,"LMAX")
9
^SCR("P1DCIBML","G",7,"MUMPS1")

^SCR("P1DCIBML","G",7,"MUMPS2")

^SCR("P1DCIBML","G",7,"OUTPUT")

^SCR("P1DCIBML","G",7,"SHEM")
sqka mley
^SCR("P1DCIBML","G",7,"TYP")
N
^SCR("P1DCIBML","G","MAX")
9999
^SCR("P1DCIBML","G","NAME","CARD")
3
^SCR("P1DCIBML","G","NAME","HZM")
2
^SCR("P1DCIBML","G","NAME","NKDCB")
4
^SCR("P1DCIBML","G","NAME","SHULCB")
6
^SCR("P1DCIBML","G","NAME","SHULT")
7
^SCR("P1DCIBML","G","NAME","TRHCB")
1
^SCR("P1DCIBML","G","NAME","TSH")
5
^SCR("P1DCIBML","G","NM",1)
TRHCB
^SCR("P1DCIBML","G","NM",2)
HZM
^SCR("P1DCIBML","G","NM",3)
CARD
^SCR("P1DCIBML","G","NM",4)
NKDCB
^SCR("P1DCIBML","G","NM",5)
TSH
^SCR("P1DCIBML","G","NM",6)
SHULCB
^SCR("P1DCIBML","G","NM",7)
SHULT
^SCR("P1DCIBML","G","RB")
4,2,22,79
^SCR("P1DCIBML","G","REF")
^TMPCB($P
^SCR("P1DCIBML","G","RZD")
\
^SCR("P1DCIBML","G","STEP")
1
^SCR("P1DCIBML","G","STG")
   :sqka mley:zecewpa mley: melyzl :zecewp:  qihxk 'qn :dpnfd 'qn:  jix`z :    
^SCR("P1DCIBML","G","VG")
6
^SCR("P1DCIBML","NAME")

^SCR("P1DCIBML","P",1,"CRD")
2,44,D,8,0
^SCR("P1DCIBML","P",1,"HELP")

^SCR("P1DCIBML","P",1,"LMAX")
9
^SCR("P1DCIBML","P",1,"MUMPS1")
S:'$G(METRH) METRH=$$^%L1DC($H,1)
^SCR("P1DCIBML","P",1,"MUMPS2")

^SCR("P1DCIBML","P",1,"TYP")
D
^SCR("P1DCIBML","P",5,"CRD")
2,20,D,8,0
^SCR("P1DCIBML","P",5,"HELP")

^SCR("P1DCIBML","P",5,"LMAX")
9
^SCR("P1DCIBML","P",5,"MUMPS1")
S:'$G(ADTRH) ADTRH=METRH
^SCR("P1DCIBML","P",5,"MUMPS2")
D ADTRH^P1DCIBML
^SCR("P1DCIBML","P",5,"TYP")
D
^SCR("P1DCIBML","P",10,"CRD")
22,26,N,8,2
^SCR("P1DCIBML","P",10,"HELP")

^SCR("P1DCIBML","P",10,"LMAX")
8
^SCR("P1DCIBML","P",10,"MUMPS1")

^SCR("P1DCIBML","P",10,"MUMPS2")

^SCR("P1DCIBML","P",10,"OUTPUT")

^SCR("P1DCIBML","P",10,"TYP")
N
^SCR("P1DCIBML","P",15,"CRD")
22,14,N,9,2
^SCR("P1DCIBML","P",15,"HELP")

^SCR("P1DCIBML","P",15,"LMAX")
9
^SCR("P1DCIBML","P",15,"MUMPS1")

^SCR("P1DCIBML","P",15,"MUMPS2")

^SCR("P1DCIBML","P",15,"OUTPUT")

^SCR("P1DCIBML","P",15,"TYP")
N
^SCR("P1DCIBML","P",25,"CRD")
22,3,N,9,2
^SCR("P1DCIBML","P",25,"HELP")

^SCR("P1DCIBML","P",25,"LMAX")
9
^SCR("P1DCIBML","P",25,"MUMPS1")

^SCR("P1DCIBML","P",25,"MUMPS2")

^SCR("P1DCIBML","P",25,"OUTPUT")

^SCR("P1DCIBML","P",25,"TYP")
N
^SCR("P1DCIBML","P","NAME","ADTRH")
5
^SCR("P1DCIBML","P","NAME","METRH")
1
^SCR("P1DCIBML","P","NAME","SSHULCB")
15
^SCR("P1DCIBML","P","NAME","SSHULT")
25
^SCR("P1DCIBML","P","NAME","STSH")
10
^SCR("P1DCIBML","P","NM",1)
METRH
^SCR("P1DCIBML","P","NM",5)
ADTRH
^SCR("P1DCIBML","P","NM",10)
STSH
^SCR("P1DCIBML","P","NM",15)
SSHULCB
^SCR("P1DCIBML","P","NM",25)
SSHULT
^SCR("P1DELT")
H
^SCR("P1DELT",1)
                                                                               
^SCR("P1DELT",2)
       {20   }:xign {                     15}:xven xe`z  {10      }:xven cew   
^SCR("P1DELT",3)
                                                              {25 }:    zenk   
^SCR("P1DELT",4)
                                                                          1$   
^SCR("P1DELT",5)
         : x`yp : lhea : zenk :  xign  :   ztqez xe`z    : ztqez cew :         
^SCR("P1DELT",6)
                                                                               
^SCR("P1DELT",7)
                                                                               
^SCR("P1DELT",8)
                                                                               
^SCR("P1DELT",9)
                                                                               
^SCR("P1DELT",10)
                                                                               
^SCR("P1DELT",11)
                                                                               
^SCR("P1DELT",12)
                                                                               
^SCR("P1DELT",13)
                                                                               
^SCR("P1DELT",14)
                                                                               
^SCR("P1DELT",15)
                                                                               
^SCR("P1DELT",16)
                                                                               
^SCR("P1DELT",17)
                                                                               
^SCR("P1DELT",18)
                                                                               
^SCR("P1DELT",19)
        $1                                                                     
^SCR("P1DELT",20)
                                                                               
^SCR("P1DELT",21)
                                                                               
^SCR("P1DELT","A",1)

^SCR("P1DELT","A",2)
:˜‰‡Ž:˜–…Ž˜…€š:˜–…Žƒ…—
^SCR("P1DELT","A",3)
:š…Ž‹
^SCR("P1DELT","A",4)

^SCR("P1DELT","A",5)
˜€™�Œˆ…�š…Ž‹˜‰‡Žš”‘…š˜…€šš”‘…šƒ…—
^SCR("P1DELT","A",6)
------------------------------------------------------
^SCR("P1DELT","A",7)

^SCR("P1DELT","A",8)

^SCR("P1DELT","A",9)

^SCR("P1DELT","A",10)

^SCR("P1DELT","A",11)

^SCR("P1DELT","A",12)

^SCR("P1DELT","A",13)

^SCR("P1DELT","A",14)

^SCR("P1DELT","A",15)

^SCR("P1DELT","A",16)

^SCR("P1DELT","A",17)

^SCR("P1DELT","A",18)

^SCR("P1DELT","A",19)

^SCR("P1DELT","A",20)

^SCR("P1DELT","A",21)

^SCR("P1DELT","AV",1)

^SCR("P1DELT","AV",2)
:rhjn:rmunrut,:rmunsue
^SCR("P1DELT","AV",3)
:,unf
^SCR("P1DELT","AV",4)

^SCR("P1DELT","AV",5)
rtabkyuc,unfrhjn,pxu,rut,,pxu,sue
^SCR("P1DELT","AV",6)
------------------------------------------------------
^SCR("P1DELT","AV",7)

^SCR("P1DELT","AV",8)

^SCR("P1DELT","AV",9)

^SCR("P1DELT","AV",10)

^SCR("P1DELT","AV",11)

^SCR("P1DELT","AV",12)

^SCR("P1DELT","AV",13)

^SCR("P1DELT","AV",14)

^SCR("P1DELT","AV",15)

^SCR("P1DELT","AV",16)

^SCR("P1DELT","AV",17)

^SCR("P1DELT","AV",18)

^SCR("P1DELT","AV",19)

^SCR("P1DELT","AV",20)

^SCR("P1DELT","AV",21)

^SCR("P1DELT","G",1,"CRD")
6,69,E,10,0
^SCR("P1DELT","G",1,"HELP")

^SCR("P1DELT","G",1,"LMAX")
11
^SCR("P1DELT","G",1,"MUMPS1")

^SCR("P1DELT","G",1,"MUMPS2")

^SCR("P1DELT","G",1,"OUTPUT")

^SCR("P1DELT","G",1,"SHEM")
 ztqez cew 
^SCR("P1DELT","G",1,"TYP")
E
^SCR("P1DELT","G",2,"CRD")
6,57,H,16,0
^SCR("P1DELT","G",2,"HELP")

^SCR("P1DELT","G",2,"LMAX")
17
^SCR("P1DELT","G",2,"MUMPS1")

^SCR("P1DELT","G",2,"MUMPS2")

^SCR("P1DELT","G",2,"OUTPUT")

^SCR("P1DELT","G",2,"SHEM")
   ztqez xe`z    
^SCR("P1DELT","G",2,"TYP")
H
^SCR("P1DELT","G",3,"CRD")
6,39,N,8,2
^SCR("P1DELT","G",3,"HELP")

^SCR("P1DELT","G",3,"LMAX")
8
^SCR("P1DELT","G",3,"MUMPS1")

^SCR("P1DELT","G",3,"MUMPS2")

^SCR("P1DELT","G",3,"OUTPUT")

^SCR("P1DELT","G",3,"SHEM")
  xign  
^SCR("P1DELT","G",3,"TYP")
N
^SCR("P1DELT","G",4,"CRD")
6,30,N,4,0
^SCR("P1DELT","G",4,"HELP")

^SCR("P1DELT","G",4,"LMAX")
6
^SCR("P1DELT","G",4,"MUMPS1")

^SCR("P1DELT","G",4,"MUMPS2")

^SCR("P1DELT","G",4,"OUTPUT")

^SCR("P1DELT","G",4,"SHEM")
 zenk 
^SCR("P1DELT","G",4,"TYP")
N
^SCR("P1DELT","G",5,"CRD")
6,23,N,6,0
^SCR("P1DELT","G",5,"HELP")

^SCR("P1DELT","G",5,"LMAX")
6
^SCR("P1DELT","G",5,"MUMPS1")
S %ZMSL="= "
^SCR("P1DELT","G",5,"MUMPS2")
D BITT^P1DELT
^SCR("P1DELT","G",5,"SHEM")
 lhea 
^SCR("P1DELT","G",5,"TYP")
N
^SCR("P1DELT","G",6,"CRD")
6,16,N,6,0
^SCR("P1DELT","G",6,"HELP")

^SCR("P1DELT","G",6,"LMAX")
6
^SCR("P1DELT","G",6,"MUMPS1")

^SCR("P1DELT","G",6,"MUMPS2")

^SCR("P1DELT","G",6,"OUTPUT")

^SCR("P1DELT","G",6,"SHEM")
 x`yp 
^SCR("P1DELT","G",6,"TYP")
N
^SCR("P1DELT","G","MAX")
2
^SCR("P1DELT","G","NAME","BITT")
5
^SCR("P1DELT","G","NAME","CT")
4
^SCR("P1DELT","G","NAME","ITRAT")
6
^SCR("P1DELT","G","NAME","KODT")
1
^SCR("P1DELT","G","NAME","MHT")
3
^SCR("P1DELT","G","NAME","NAMET")
2
^SCR("P1DELT","G","NM",1)
KODT
^SCR("P1DELT","G","NM",2)
NAMET
^SCR("P1DELT","G","NM",3)
MHT
^SCR("P1DELT","G","NM",4)
CT
^SCR("P1DELT","G","NM",5)
BITT
^SCR("P1DELT","G","NM",6)
ITRAT
^SCR("P1DELT","G","NOZAPR")
1
^SCR("P1DELT","G","RB")
5,9,20,76
^SCR("P1DELT","G","REF")
^THZT($P
^SCR("P1DELT","G","RZD")
\
^SCR("P1DELT","G","STEP")
1
^SCR("P1DELT","G","STG")
         : x`yp : lhea : zenk :  xign  :   ztqez xe`z    : ztqez cew :         
^SCR("P1DELT","G","VG")
7
^SCR("P1DELT","NAME")

^SCR("P1DELT","P",10,"CRD")
2,57,E,8,0
^SCR("P1DELT","P",10,"HELP")

^SCR("P1DELT","P",10,"LMAX")
9
^SCR("P1DELT","P",10,"MUMPS1")

^SCR("P1DELT","P",10,"MUMPS2")

^SCR("P1DELT","P",10,"OUTPUT")

^SCR("P1DELT","P",10,"TYP")
E
^SCR("P1DELT","P",15,"CRD")
2,45,H,20
^SCR("P1DELT","P",15,"HELP")

^SCR("P1DELT","P",15,"LMAX")
24
^SCR("P1DELT","P",15,"MUMPS1")

^SCR("P1DELT","P",15,"MUMPS2")

^SCR("P1DELT","P",15,"OUTPUT")

^SCR("P1DELT","P",15,"TYP")
H
^SCR("P1DELT","P",20,"CRD")
2,7,N,6,2
^SCR("P1DELT","P",20,"HELP")

^SCR("P1DELT","P",20,"LMAX")
6
^SCR("P1DELT","P",20,"MUMPS1")

^SCR("P1DELT","P",20,"MUMPS2")

^SCR("P1DELT","P",20,"OUTPUT")

^SCR("P1DELT","P",20,"TYP")
N
^SCR("P1DELT","P",25,"CRD")
3,62,N,4,0
^SCR("P1DELT","P",25,"HELP")

^SCR("P1DELT","P",25,"LMAX")
4
^SCR("P1DELT","P",25,"MUMPS1")

^SCR("P1DELT","P",25,"MUMPS2")

^SCR("P1DELT","P",25,"OUTPUT")

^SCR("P1DELT","P",25,"TYP")
N
^SCR("P1DELT","P","NAME","CP")
25
^SCR("P1DELT","P","NAME","KODP")
10
^SCR("P1DELT","P","NAME","MHP")
20
^SCR("P1DELT","P","NAME","NAMEP")
15
^SCR("P1DELT","P","NM",10)
KODP
^SCR("P1DELT","P","NM",15)
NAMEP
^SCR("P1DELT","P","NM",20)
MHP
^SCR("P1DELT","P","NM",25)
CP
^SCR("P1DEXSL")
H
^SCR("P1DEXSL",1)
                                # migily ze`ivi g"ec #                         
^SCR("P1DEXSL",2)
                                                                               
^SCR("P1DEXSL",3)
   {              08} {07   }: gily cr   {              06} {05   } : gilyn    
^SCR("P1DEXSL",4)
                            {15       } jix`z cr    {10        } :   jix`zn    
^SCR("P1DEXSL",5)
                                                                               
^SCR("P1DEXSL",6)
                                                                             1$
^SCR("P1DEXSL",7)
 :        zaezk       :     gewl my     :  gewl 'qn  : dryl :  mekq  : dpnfd : 
^SCR("P1DEXSL",8)
                                                                               
^SCR("P1DEXSL",9)
                                                                               
^SCR("P1DEXSL",10)
                                                                               
^SCR("P1DEXSL",11)
                                                                               
^SCR("P1DEXSL",12)
                                                                               
^SCR("P1DEXSL",13)
                                                                               
^SCR("P1DEXSL",14)
                                                                               
^SCR("P1DEXSL",15)
                                                                               
^SCR("P1DEXSL",16)
                                                                               
^SCR("P1DEXSL",17)
                                                                               
^SCR("P1DEXSL",18)
                                                                               
^SCR("P1DEXSL",19)
                                                                               
^SCR("P1DEXSL",20)
                                                                               
^SCR("P1DEXSL",21)
 $1                                                                            
^SCR("P1DEXSL","A",1)
�‰‡‰Œ™š…€‰–‰‡"…ƒ
^SCR("P1DEXSL","A",2)

^SCR("P1DEXSL","A",3)
:‡‰Œ™ƒ’:‡‰Œ™Ž
^SCR("P1DEXSL","A",4)
Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1DEXSL","A",5)

^SCR("P1DEXSL","A",6)

^SCR("P1DEXSL","A",7)
š�…š‹‡…—Œ�™‡…—Œ'‘Ž„’™Œ�…‹‘„�Ž†„
^SCR("P1DEXSL","A",8)
-----------------------------------------------------------------------
^SCR("P1DEXSL","A",9)

^SCR("P1DEXSL","A",10)

^SCR("P1DEXSL","A",11)

^SCR("P1DEXSL","A",12)

^SCR("P1DEXSL","A",13)

^SCR("P1DEXSL","A",14)

^SCR("P1DEXSL","A",15)

^SCR("P1DEXSL","A",16)

^SCR("P1DEXSL","A",17)

^SCR("P1DEXSL","A",18)

^SCR("P1DEXSL","A",19)

^SCR("P1DEXSL","A",20)

^SCR("P1DEXSL","A",21)

^SCR("P1DEXSL","AV",1)
ohjhka,uthmhj"us
^SCR("P1DEXSL","AV",2)

^SCR("P1DEXSL","AV",3)
:jhkasg:jhkan
^SCR("P1DEXSL","AV",4)
lhrt,sg:lhrt,n
^SCR("P1DEXSL","AV",5)

^SCR("P1DEXSL","AV",6)

^SCR("P1DEXSL","AV",7)
,cu,fjuekoajuekwxnvgakoufxvbnzv
^SCR("P1DEXSL","AV",8)
-----------------------------------------------------------------------
^SCR("P1DEXSL","AV",9)

^SCR("P1DEXSL","AV",10)

^SCR("P1DEXSL","AV",11)

^SCR("P1DEXSL","AV",12)

^SCR("P1DEXSL","AV",13)

^SCR("P1DEXSL","AV",14)

^SCR("P1DEXSL","AV",15)

^SCR("P1DEXSL","AV",16)

^SCR("P1DEXSL","AV",17)

^SCR("P1DEXSL","AV",18)

^SCR("P1DEXSL","AV",19)

^SCR("P1DEXSL","AV",20)

^SCR("P1DEXSL","AV",21)

^SCR("P1DEXSL","G",1,"CRD")
8,77,E,7,0
^SCR("P1DEXSL","G",1,"HELP")
<F9> ugl dpfd zbvdl
^SCR("P1DEXSL","G",1,"LMAX")
7
^SCR("P1DEXSL","G",1,"MUMPS1")

^SCR("P1DEXSL","G",1,"MUMPS2")
D HZ^P1DEXSL
^SCR("P1DEXSL","G",1,"SHEM")
 dpnfd 
^SCR("P1DEXSL","G",1,"TYP")
E
^SCR("P1DEXSL","G",2,"CRD")
8,69,E,8,0
^SCR("P1DEXSL","G",2,"HELP")

^SCR("P1DEXSL","G",2,"LMAX")
8
^SCR("P1DEXSL","G",2,"MUMPS1")

^SCR("P1DEXSL","G",2,"MUMPS2")

^SCR("P1DEXSL","G",2,"OUTPUT")

^SCR("P1DEXSL","G",2,"SHEM")
  mekq  
^SCR("P1DEXSL","G",2,"TYP")
E
^SCR("P1DEXSL","G",3,"CRD")
8,60,T,5,0
^SCR("P1DEXSL","G",3,"HELP")

^SCR("P1DEXSL","G",3,"LMAX")
6
^SCR("P1DEXSL","G",3,"MUMPS1")

^SCR("P1DEXSL","G",3,"MUMPS2")

^SCR("P1DEXSL","G",3,"OUTPUT")

^SCR("P1DEXSL","G",3,"SHEM")
 dryl 
^SCR("P1DEXSL","G",3,"TYP")
T
^SCR("P1DEXSL","G",4,"CRD")
8,53,E,12,0
^SCR("P1DEXSL","G",4,"HELP")

^SCR("P1DEXSL","G",4,"LMAX")
12
^SCR("P1DEXSL","G",4,"MUMPS1")

^SCR("P1DEXSL","G",4,"MUMPS2")

^SCR("P1DEXSL","G",4,"OUTPUT")

^SCR("P1DEXSL","G",4,"SHEM")
  gewl 'qn  
^SCR("P1DEXSL","G",4,"TYP")
E
^SCR("P1DEXSL","G",5,"CRD")
8,40,H,17,0
^SCR("P1DEXSL","G",5,"HELP")

^SCR("P1DEXSL","G",5,"LMAX")
17
^SCR("P1DEXSL","G",5,"MUMPS1")

^SCR("P1DEXSL","G",5,"MUMPS2")

^SCR("P1DEXSL","G",5,"OUTPUT")

^SCR("P1DEXSL","G",5,"SHEM")
     gewl my     
^SCR("P1DEXSL","G",5,"TYP")
H
^SCR("P1DEXSL","G",6,"CRD")
8,22,H,20,0
^SCR("P1DEXSL","G",6,"HELP")

^SCR("P1DEXSL","G",6,"LMAX")
20
^SCR("P1DEXSL","G",6,"MUMPS1")

^SCR("P1DEXSL","G",6,"MUMPS2")

^SCR("P1DEXSL","G",6,"OUTPUT")

^SCR("P1DEXSL","G",6,"SHEM")
        zaezk       
^SCR("P1DEXSL","G",6,"TYP")
H
^SCR("P1DEXSL","G","MAX")
9999
^SCR("P1DEXSL","G","NAME","HZ")
1
^SCR("P1DEXSL","G","NAME","KTV")
6
^SCR("P1DEXSL","G","NAME","LK")
4
^SCR("P1DEXSL","G","NAME","LK1")
5
^SCR("P1DEXSL","G","NAME","SHAA")
3
^SCR("P1DEXSL","G","NAME","SUM")
2
^SCR("P1DEXSL","G","NM",1)
HZ
^SCR("P1DEXSL","G","NM",2)
SUM
^SCR("P1DEXSL","G","NM",3)
SHAA
^SCR("P1DEXSL","G","NM",4)
LK
^SCR("P1DEXSL","G","NM",5)
LK1
^SCR("P1DEXSL","G","NM",6)
KTV
^SCR("P1DEXSL","G","RB")
7,2,22,79
^SCR("P1DEXSL","G","REF")
^TEMP($P
^SCR("P1DEXSL","G","RZD")
\
^SCR("P1DEXSL","G","STEP")
1
^SCR("P1DEXSL","G","STG")
 :        zaezk       :     gewl my     :  gewl 'qn  : dryl :  mekq  : dpnfd : 
^SCR("P1DEXSL","G","VG")
9
^SCR("P1DEXSL","NAME")
migily z`ivi g"ec
^SCR("P1DEXSL","P",5,"CRD")
3,60,E,4,0
^SCR("P1DEXSL","P",5,"FNC")

^SCR("P1DEXSL","P",5,"GLOB")
P1SL
^SCR("P1DEXSL","P",5,"HELP")

^SCR("P1DEXSL","P",5,"LMAX")
6
^SCR("P1DEXSL","P",5,"MUMPS1")

^SCR("P1DEXSL","P",5,"MUMPS2")

^SCR("P1DEXSL","P",5,"NLN")
20
^SCR("P1DEXSL","P",5,"RZD")
\
^SCR("P1DEXSL","P",5,"TOPB")
8
^SCR("P1DEXSL","P",5,"TYP")
E
^SCR("P1DEXSL","P",5,"VRB")
MESL1
^SCR("P1DEXSL","P",6,"CRD")
3,59,H,17,0
^SCR("P1DEXSL","P",6,"HELP")

^SCR("P1DEXSL","P",6,"LMAX")
17
^SCR("P1DEXSL","P",6,"MUMPS1")

^SCR("P1DEXSL","P",6,"MUMPS2")

^SCR("P1DEXSL","P",6,"OUTPUT")

^SCR("P1DEXSL","P",6,"TYP")
H
^SCR("P1DEXSL","P",7,"CRD")
3,22,E,4,0
^SCR("P1DEXSL","P",7,"FNC")

^SCR("P1DEXSL","P",7,"GLOB")
P1SL
^SCR("P1DEXSL","P",7,"HELP")

^SCR("P1DEXSL","P",7,"LMAX")
6
^SCR("P1DEXSL","P",7,"MUMPS1")
S:'$G(ADSL) ADSL=MESL
^SCR("P1DEXSL","P",7,"MUMPS2")
I ADSL<MESL S %SC("ER")=1
^SCR("P1DEXSL","P",7,"NLN")
20
^SCR("P1DEXSL","P",7,"RZD")
\
^SCR("P1DEXSL","P",7,"TOPB")
8
^SCR("P1DEXSL","P",7,"TYP")
E
^SCR("P1DEXSL","P",7,"VRB")
ADSL1
^SCR("P1DEXSL","P",8,"CRD")
3,21,H,17
^SCR("P1DEXSL","P",8,"HELP")

^SCR("P1DEXSL","P",8,"LMAX")
17
^SCR("P1DEXSL","P",8,"MUMPS1")

^SCR("P1DEXSL","P",8,"MUMPS2")

^SCR("P1DEXSL","P",8,"OUTPUT")

^SCR("P1DEXSL","P",8,"TYP")
H
^SCR("P1DEXSL","P",10,"CRD")
4,52,D,8,0
^SCR("P1DEXSL","P",10,"HELP")

^SCR("P1DEXSL","P",10,"LMAX")
11
^SCR("P1DEXSL","P",10,"MUMPS1")
I '$G(METRH) S METRH=$$^%L1DC(P1DZ,1)
^SCR("P1DEXSL","P",10,"MUMPS2")

^SCR("P1DEXSL","P",10,"TYP")
D
^SCR("P1DEXSL","P",15,"CRD")
4,28,D,8,0
^SCR("P1DEXSL","P",15,"HELP")

^SCR("P1DEXSL","P",15,"LMAX")
10
^SCR("P1DEXSL","P",15,"MUMPS1")
S:'$G(ADTRH) ADTRH=METRH
^SCR("P1DEXSL","P",15,"MUMPS2")
D ADTRH^P1DEXSL
^SCR("P1DEXSL","P",15,"TYP")
D
^SCR("P1DEXSL","P","NAME","ADSL")
7
^SCR("P1DEXSL","P","NAME","ADSL1")
8
^SCR("P1DEXSL","P","NAME","ADTRH")
15
^SCR("P1DEXSL","P","NAME","MESL")
5
^SCR("P1DEXSL","P","NAME","MESL1")
6
^SCR("P1DEXSL","P","NAME","METRH")
10
^SCR("P1DEXSL","P","NM",5)
MESL
^SCR("P1DEXSL","P","NM",6)
MESL1
^SCR("P1DEXSL","P","NM",7)
ADSL
^SCR("P1DEXSL","P","NM",8)
ADSL1
^SCR("P1DEXSL","P","NM",10)
METRH
^SCR("P1DEXSL","P","NM",15)
ADTRH
^SCR("P1DHBL")
H
^SCR("P1DHBL",1)
                                  # zeipeayg g"ec #                            
^SCR("P1DHBL",2)
                           {10       } cr   {05      }: jix`zn                 
^SCR("P1DHBL",3)
                                                                        1$     
^SCR("P1DHBL",4)
       :   mekq  :  jix`z  : zipeayg :       gewl my      : gewl 'qn :         
^SCR("P1DHBL",5)
                                                                               
^SCR("P1DHBL",6)
                                                                               
^SCR("P1DHBL",7)
                                                                               
^SCR("P1DHBL",8)
                                                                               
^SCR("P1DHBL",9)
                                                                               
^SCR("P1DHBL",10)
                                                                               
^SCR("P1DHBL",11)
                                                                               
^SCR("P1DHBL",12)
                                                                               
^SCR("P1DHBL",13)
                                                                               
^SCR("P1DHBL",14)
                                                                               
^SCR("P1DHBL",15)
                                                                               
^SCR("P1DHBL",16)
                                                                               
^SCR("P1DHBL",17)
                                                                               
^SCR("P1DHBL",18)
                                                                               
^SCR("P1DHBL",19)
                                                                               
^SCR("P1DHBL",20)
                                                                               
^SCR("P1DHBL",21)
    $1                                                                         
^SCR("P1DHBL",22)
      {15       }: k"dq                                                        
^SCR("P1DHBL","A",1)
š…‰�…�™‡‡"…ƒ
^SCR("P1DHBL","A",2)
ƒ’:Š‰˜€šŽ
^SCR("P1DHBL","A",3)

^SCR("P1DHBL","A",4)
�…‹‘Š‰˜€šš‰�…�™‡‡…—Œ�™‡…—Œ'‘Ž
^SCR("P1DHBL","A",5)
---------------------------------------------------------
^SCR("P1DHBL","A",6)

^SCR("P1DHBL","A",7)

^SCR("P1DHBL","A",8)

^SCR("P1DHBL","A",9)

^SCR("P1DHBL","A",10)

^SCR("P1DHBL","A",11)

^SCR("P1DHBL","A",12)

^SCR("P1DHBL","A",13)

^SCR("P1DHBL","A",14)

^SCR("P1DHBL","A",15)

^SCR("P1DHBL","A",16)

^SCR("P1DHBL","A",17)

^SCR("P1DHBL","A",18)

^SCR("P1DHBL","A",19)

^SCR("P1DHBL","A",20)

^SCR("P1DHBL","A",21)

^SCR("P1DHBL","A",22)
:‹"„‘
^SCR("P1DHBL","AV",1)
,uhbucajj"us
^SCR("P1DHBL","AV",2)
sg:lhrt,n
^SCR("P1DHBL","AV",3)

^SCR("P1DHBL","AV",4)
oufxlhrt,,hbucajjuekoajuekwxn
^SCR("P1DHBL","AV",5)
---------------------------------------------------------
^SCR("P1DHBL","AV",6)

^SCR("P1DHBL","AV",7)

^SCR("P1DHBL","AV",8)

^SCR("P1DHBL","AV",9)

^SCR("P1DHBL","AV",10)

^SCR("P1DHBL","AV",11)

^SCR("P1DHBL","AV",12)

^SCR("P1DHBL","AV",13)

^SCR("P1DHBL","AV",14)

^SCR("P1DHBL","AV",15)

^SCR("P1DHBL","AV",16)

^SCR("P1DHBL","AV",17)

^SCR("P1DHBL","AV",18)

^SCR("P1DHBL","AV",19)

^SCR("P1DHBL","AV",20)

^SCR("P1DHBL","AV",21)

^SCR("P1DHBL","AV",22)
:f"vx
^SCR("P1DHBL","G",1,"CRD")
5,69,E,10,0
^SCR("P1DHBL","G",1,"HELP")

^SCR("P1DHBL","G",1,"LMAX")
10
^SCR("P1DHBL","G",1,"MUMPS1")

^SCR("P1DHBL","G",1,"MUMPS2")

^SCR("P1DHBL","G",1,"OUTPUT")

^SCR("P1DHBL","G",1,"SHEM")
 gewl 'qn 
^SCR("P1DHBL","G",1,"TYP")
E
^SCR("P1DHBL","G",2,"CRD")
5,58,H,20,0
^SCR("P1DHBL","G",2,"HELP")

^SCR("P1DHBL","G",2,"LMAX")
20
^SCR("P1DHBL","G",2,"MUMPS1")

^SCR("P1DHBL","G",2,"MUMPS2")

^SCR("P1DHBL","G",2,"OUTPUT")

^SCR("P1DHBL","G",2,"SHEM")
       gewl my      
^SCR("P1DHBL","G",2,"TYP")
H
^SCR("P1DHBL","G",3,"CRD")
5,37,E,8,0
^SCR("P1DHBL","G",3,"HELP")
<F9> ugl zipeayg zbvdl 
^SCR("P1DHBL","G",3,"LMAX")
9
^SCR("P1DHBL","G",3,"MUMPS1")

^SCR("P1DHBL","G",3,"MUMPS2")
D HSB^P1DHBL
^SCR("P1DHBL","G",3,"SHEM")
 zipeayg 
^SCR("P1DHBL","G",3,"TYP")
E
^SCR("P1DHBL","G",4,"CRD")
5,27,D,8,0
^SCR("P1DHBL","G",4,"HELP")

^SCR("P1DHBL","G",4,"LMAX")
9
^SCR("P1DHBL","G",4,"MUMPS1")

^SCR("P1DHBL","G",4,"MUMPS2")

^SCR("P1DHBL","G",4,"OUTPUT")

^SCR("P1DHBL","G",4,"SHEM")
  jix`z  
^SCR("P1DHBL","G",4,"TYP")
D
^SCR("P1DHBL","G",5,"CRD")
5,17,N,9,2
^SCR("P1DHBL","G",5,"HELP")

^SCR("P1DHBL","G",5,"LMAX")
9
^SCR("P1DHBL","G",5,"MUMPS1")

^SCR("P1DHBL","G",5,"MUMPS2")

^SCR("P1DHBL","G",5,"OUTPUT")

^SCR("P1DHBL","G",5,"SHEM")
   mekq  
^SCR("P1DHBL","G",5,"TYP")
N
^SCR("P1DHBL","G","DEL")

^SCR("P1DHBL","G","MAX")
99999
^SCR("P1DHBL","G","NAME","DTH")
4
^SCR("P1DHBL","G","NAME","HSB")
3
^SCR("P1DHBL","G","NAME","LKH")
1
^SCR("P1DHBL","G","NAME","LKH1")
2
^SCR("P1DHBL","G","NAME","SUM")
5
^SCR("P1DHBL","G","NM",1)
LKH
^SCR("P1DHBL","G","NM",2)
LKH1
^SCR("P1DHBL","G","NM",3)
HSB
^SCR("P1DHBL","G","NM",4)
DTH
^SCR("P1DHBL","G","NM",5)
SUM
^SCR("P1DHBL","G","RB")
4,5,22,74
^SCR("P1DHBL","G","REF")
^TEMP($P,"H"
^SCR("P1DHBL","G","RZD")
\
^SCR("P1DHBL","G","STEP")
1
^SCR("P1DHBL","G","STG")
       :   mekq  :  jix`z  : zipeayg :       gewl my      : gewl 'qn :         
^SCR("P1DHBL","G","VG")
6
^SCR("P1DHBL","NAME")
zeipeayg gec
^SCR("P1DHBL","P",5,"CRD")
2,44,D,8,0
^SCR("P1DHBL","P",5,"HELP")

^SCR("P1DHBL","P",5,"LMAX")
9
^SCR("P1DHBL","P",5,"MUMPS1")

^SCR("P1DHBL","P",5,"MUMPS2")

^SCR("P1DHBL","P",5,"OUTPUT")

^SCR("P1DHBL","P",5,"TYP")
D
^SCR("P1DHBL","P",10,"CRD")
2,27,D,8,0
^SCR("P1DHBL","P",10,"HELP")

^SCR("P1DHBL","P",10,"LMAX")
10
^SCR("P1DHBL","P",10,"MUMPS1")

^SCR("P1DHBL","P",10,"MUMPS2")

^SCR("P1DHBL","P",10,"OUTPUT")

^SCR("P1DHBL","P",10,"TYP")
D
^SCR("P1DHBL","P",15,"CRD")
22,6,N,10,2
^SCR("P1DHBL","P",15,"HELP")

^SCR("P1DHBL","P",15,"LMAX")
10
^SCR("P1DHBL","P",15,"MUMPS1")

^SCR("P1DHBL","P",15,"MUMPS2")

^SCR("P1DHBL","P",15,"OUTPUT")

^SCR("P1DHBL","P",15,"TYP")
N
^SCR("P1DHBL","P","NAME","DAT1")
5
^SCR("P1DHBL","P","NAME","DAT2")
10
^SCR("P1DHBL","P","NAME","SHUM")
15
^SCR("P1DHBL","P","NM",5)
DAT1
^SCR("P1DHBL","P","NM",10)
DAT2
^SCR("P1DHBL","P","NM",15)
SHUM
^SCR("P1DL")
H
^SCR("P1DL",1)
                          # zepnfd_xtqn_itl_zegewl_g"ec  #                     
^SCR("P1DL",2)
                            {10       } jix`z cr      {05       } jix`zn       
^SCR("P1DL",3)
                         {17   } zepnfd zenk cr   {15    }  zepnfd zenkn       
^SCR("P1DL",4)
                      {20      } mekq cr        {19      }         mekqn       
^SCR("P1DL",5)
                         {24   } zegewl zveaw cr   {22   } zegewl zveawn       
^SCR("P1DL",6)
                                {28        } gewl cr  {26        } gewln       
^SCR("P1DL",7)
                                                                             1$
^SCR("P1DL",8)
 :             zaezk          :   k"dq  :'nfd:      gewl my     : gewl 'qn :   
^SCR("P1DL",9)
                                                                               
^SCR("P1DL",10)
                                                                               
^SCR("P1DL",11)
                                                                               
^SCR("P1DL",12)
                                                                               
^SCR("P1DL",13)
                                                                               
^SCR("P1DL",14)
                                                                               
^SCR("P1DL",15)
                                                                               
^SCR("P1DL",16)
                                                                               
^SCR("P1DL",17)
                                                                               
^SCR("P1DL",18)
                                                                               
^SCR("P1DL",19)
                                                                               
^SCR("P1DL",20)
                                                                               
^SCR("P1DL",21)
                                                                               
^SCR("P1DL",22)
 $1                                                                            
^SCR("P1DL",23)
                             {35      } {30  }       {25    } :zegewl k"dq     
^SCR("P1DL","A",1)
š…�Ž†„_˜”‘Ž_‰”Œ_š…‡…—Œ_‡"…ƒ
^SCR("P1DL","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("P1DL","A",3)
š…�Ž†„š…Ž‹ƒ’š…�Ž†„š…Ž‹Ž
^SCR("P1DL","A",4)
�…‹‘ƒ’�…‹‘Ž
^SCR("P1DL","A",5)
š…‡…—Œš–…�—ƒ’š…‡…—Œš–…�—Ž
^SCR("P1DL","A",6)
‡…—Œƒ’‡…—ŒŽ
^SCR("P1DL","A",7)

^SCR("P1DL","A",8)
š�…š‹‹"„‘'Ž†„‡…—Œ�™‡…—Œ'‘Ž
^SCR("P1DL","A",9)
------------------------------------------------------------------------
^SCR("P1DL","A",10)

^SCR("P1DL","A",11)

^SCR("P1DL","A",12)

^SCR("P1DL","A",13)

^SCR("P1DL","A",14)

^SCR("P1DL","A",15)

^SCR("P1DL","A",16)

^SCR("P1DL","A",17)

^SCR("P1DL","A",18)

^SCR("P1DL","A",19)

^SCR("P1DL","A",20)

^SCR("P1DL","A",21)

^SCR("P1DL","A",22)

^SCR("P1DL","A",23)
:š…‡…—Œ‹"„‘
^SCR("P1DL","AV",1)
,ubnzv_rpxn_hpk_,ujuek_j"us
^SCR("P1DL","AV",2)
lhrt,sglhrt,n
^SCR("P1DL","AV",3)
,ubnzv,unfsg,ubnzv,unfn
^SCR("P1DL","AV",4)
oufxsgoufxn
^SCR("P1DL","AV",5)
,ujuek,mucesg,ujuek,mucen
^SCR("P1DL","AV",6)
jueksgjuekn
^SCR("P1DL","AV",7)

^SCR("P1DL","AV",8)
,cu,ff"vxwnzvjuekoajuekwxn
^SCR("P1DL","AV",9)
------------------------------------------------------------------------
^SCR("P1DL","AV",10)

^SCR("P1DL","AV",11)

^SCR("P1DL","AV",12)

^SCR("P1DL","AV",13)

^SCR("P1DL","AV",14)

^SCR("P1DL","AV",15)

^SCR("P1DL","AV",16)

^SCR("P1DL","AV",17)

^SCR("P1DL","AV",18)

^SCR("P1DL","AV",19)

^SCR("P1DL","AV",20)

^SCR("P1DL","AV",21)

^SCR("P1DL","AV",22)

^SCR("P1DL","AV",23)
:,ujuekf"vx
^SCR("P1DL","G",1,"CRD")
9,75,E,10,0
^SCR("P1DL","G",1,"HELP")
<F10> - gewl qihxk , <F9> - gewl ly zepnfd lk zbvd 
^SCR("P1DL","G",1,"LMAX")
10
^SCR("P1DL","G",1,"MUMPS1")

^SCR("P1DL","G",1,"MUMPS2")
D NMB^P1DL
^SCR("P1DL","G",1,"SHEM")
 gewl 'qn 
^SCR("P1DL","G",1,"TYP")
E
^SCR("P1DL","G",2,"CRD")
9,64,H,18,0
^SCR("P1DL","G",2,"HELP")

^SCR("P1DL","G",2,"LMAX")
18
^SCR("P1DL","G",2,"MUMPS1")

^SCR("P1DL","G",2,"MUMPS2")

^SCR("P1DL","G",2,"OUTPUT")

^SCR("P1DL","G",2,"SHEM")
      gewl my     
^SCR("P1DL","G",2,"TYP")
H
^SCR("P1DL","G",3,"CRD")
9,45,E,4,0
^SCR("P1DL","G",3,"HELP")

^SCR("P1DL","G",3,"LMAX")
4
^SCR("P1DL","G",3,"MUMPS1")

^SCR("P1DL","G",3,"MUMPS2")

^SCR("P1DL","G",3,"OUTPUT")

^SCR("P1DL","G",3,"SHEM")
'nfd
^SCR("P1DL","G",3,"TYP")
E
^SCR("P1DL","G",4,"CRD")
9,40,N,9,2
^SCR("P1DL","G",4,"HELP")

^SCR("P1DL","G",4,"LMAX")
9
^SCR("P1DL","G",4,"MUMPS1")

^SCR("P1DL","G",4,"MUMPS2")

^SCR("P1DL","G",4,"OUTPUT")

^SCR("P1DL","G",4,"SHEM")
   k"dq  
^SCR("P1DL","G",4,"TYP")
N
^SCR("P1DL","G",5,"CRD")
9,30,H,28,0
^SCR("P1DL","G",5,"HELP")

^SCR("P1DL","G",5,"LMAX")
28
^SCR("P1DL","G",5,"MUMPS1")

^SCR("P1DL","G",5,"MUMPS2")

^SCR("P1DL","G",5,"OUTPUT")

^SCR("P1DL","G",5,"SHEM")
             zaezk          
^SCR("P1DL","G",5,"TYP")
H
^SCR("P1DL","G","DEL")
Y
^SCR("P1DL","G","MAX")
99999
^SCR("P1DL","G","NAME","KAMH")
3
^SCR("P1DL","G","NAME","KTV")
5
^SCR("P1DL","G","NAME","NMB")
1
^SCR("P1DL","G","NAME","NMB1")
2
^SCR("P1DL","G","NAME","STS")
4
^SCR("P1DL","G","NM",1)
NMB
^SCR("P1DL","G","NM",2)
NMB1
^SCR("P1DL","G","NM",3)
KAMH
^SCR("P1DL","G","NM",4)
STS
^SCR("P1DL","G","NM",5)
KTV
^SCR("P1DL","G","RB")
8,2,23,79
^SCR("P1DL","G","REF")
^TEMPL($P
^SCR("P1DL","G","RZD")
\
^SCR("P1DL","G","STEP")
1
^SCR("P1DL","G","STG")
 :             zaezk          :   k"dq  :'nfd:      gewl my     : gewl 'qn :   
^SCR("P1DL","G","VG")
10
^SCR("P1DL","NAME")
zepnfd zenk itl zegewl gec1
^SCR("P1DL","P",5,"CRD")
2,54,D,8,0
^SCR("P1DL","P",5,"HELP")

^SCR("P1DL","P",5,"LMAX")
10
^SCR("P1DL","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("P1DL","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("P1DL","P",5,"MUST")

^SCR("P1DL","P",5,"TYP")
D
^SCR("P1DL","P",10,"CRD")
2,28,D,8,0
^SCR("P1DL","P",10,"HELP")

^SCR("P1DL","P",10,"LMAX")
10
^SCR("P1DL","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1DL","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I $E(D2)="?" S %SC("ER")=1
^SCR("P1DL","P",10,"MUST")

^SCR("P1DL","P",10,"TYP")
D
^SCR("P1DL","P",15,"CRD")
3,50,E,4,0
^SCR("P1DL","P",15,"HELP")

^SCR("P1DL","P",15,"LMAX")
7
^SCR("P1DL","P",15,"MUMPS1")
S:'$G(HZM1) HZM1=1
^SCR("P1DL","P",15,"MUMPS2")

^SCR("P1DL","P",15,"TYP")
E
^SCR("P1DL","P",17,"CRD")
3,25,N,6,0
^SCR("P1DL","P",17,"HELP")

^SCR("P1DL","P",17,"LMAX")
6
^SCR("P1DL","P",17,"MUMPS1")
S:'$G(HZM2) HZM2=99999
^SCR("P1DL","P",17,"MUMPS2")

^SCR("P1DL","P",17,"TYP")
N
^SCR("P1DL","P",19,"CRD")
4,48,N,9,2
^SCR("P1DL","P",19,"HELP")

^SCR("P1DL","P",19,"LMAX")
9
^SCR("P1DL","P",19,"MUMPS1")

^SCR("P1DL","P",19,"MUMPS2")

^SCR("P1DL","P",19,"TYP")
N
^SCR("P1DL","P",20,"CRD")
4,22,N,9,2
^SCR("P1DL","P",20,"HELP")

^SCR("P1DL","P",20,"LMAX")
9
^SCR("P1DL","P",20,"MUMPS1")
S:'$G(ADSUM) ADSUM=999999
^SCR("P1DL","P",20,"MUMPS2")

^SCR("P1DL","P",20,"TYP")
N
^SCR("P1DL","P",22,"CRD")
5,51,E,6,0
^SCR("P1DL","P",22,"FNC")

^SCR("P1DL","P",22,"GLOB")
SUGL
^SCR("P1DL","P",22,"HELP")

^SCR("P1DL","P",22,"LMAX")
6
^SCR("P1DL","P",22,"MUMPS1")

^SCR("P1DL","P",22,"MUMPS2")

^SCR("P1DL","P",22,"NLN")
20
^SCR("P1DL","P",22,"RZD")
\
^SCR("P1DL","P",22,"TOPB")
8
^SCR("P1DL","P",22,"TYP")
E
^SCR("P1DL","P",24,"CRD")
5,25,E,6,0
^SCR("P1DL","P",24,"FNC")

^SCR("P1DL","P",24,"GLOB")
SUGL
^SCR("P1DL","P",24,"HELP")

^SCR("P1DL","P",24,"LMAX")
6
^SCR("P1DL","P",24,"MUMPS1")
S:'$G(ADKVZ) ADKVZ=MEKVZ
^SCR("P1DL","P",24,"MUMPS2")

^SCR("P1DL","P",24,"NLN")
20
^SCR("P1DL","P",24,"RZD")
\
^SCR("P1DL","P",24,"TOPB")
8
^SCR("P1DL","P",24,"TYP")
E
^SCR("P1DL","P",25,"CRD")
23,53,N,7,0
^SCR("P1DL","P",25,"HELP")

^SCR("P1DL","P",25,"LMAX")
7
^SCR("P1DL","P",25,"MUMPS1")

^SCR("P1DL","P",25,"MUMPS2")

^SCR("P1DL","P",25,"OUTPUT")

^SCR("P1DL","P",25,"TYP")
N
^SCR("P1DL","P",26,"CRD")
6,54,E,11,0
^SCR("P1DL","P",26,"FNC")

^SCR("P1DL","P",26,"GLOB")
LKH
^SCR("P1DL","P",26,"HELP")

^SCR("P1DL","P",26,"LMAX")
11
^SCR("P1DL","P",26,"MUMPS1")

^SCR("P1DL","P",26,"MUMPS2")

^SCR("P1DL","P",26,"NLN")
20
^SCR("P1DL","P",26,"RZD")
\
^SCR("P1DL","P",26,"TOPB")
8
^SCR("P1DL","P",26,"TYP")
E
^SCR("P1DL","P",28,"CRD")
6,32,E,11,0
^SCR("P1DL","P",28,"FNC")

^SCR("P1DL","P",28,"GLOB")
LKH
^SCR("P1DL","P",28,"HELP")

^SCR("P1DL","P",28,"LMAX")
11
^SCR("P1DL","P",28,"MUMPS1")
S:'$G(LK2) LK2=LK1
^SCR("P1DL","P",28,"MUMPS2")
I LK2<LK1 S %SC("ER")=1
^SCR("P1DL","P",28,"NLN")
20
^SCR("P1DL","P",28,"RZD")
\
^SCR("P1DL","P",28,"TOPB")
8
^SCR("P1DL","P",28,"TYP")
E
^SCR("P1DL","P",30,"CRD")
23,40,N,5,0
^SCR("P1DL","P",30,"HELP")

^SCR("P1DL","P",30,"LMAX")
5
^SCR("P1DL","P",30,"MUMPS1")

^SCR("P1DL","P",30,"MUMPS2")

^SCR("P1DL","P",30,"OUTPUT")

^SCR("P1DL","P",30,"TYP")
N
^SCR("P1DL","P",35,"CRD")
23,29,N,9,2
^SCR("P1DL","P",35,"HELP")

^SCR("P1DL","P",35,"LMAX")
9
^SCR("P1DL","P",35,"MUMPS1")

^SCR("P1DL","P",35,"MUMPS2")

^SCR("P1DL","P",35,"OUTPUT")

^SCR("P1DL","P",35,"TYP")
N
^SCR("P1DL","P","NAME","ADKVZ")
24
^SCR("P1DL","P","NAME","ADSUM")
20
^SCR("P1DL","P","NAME","DAT1")
5
^SCR("P1DL","P","NAME","DAT2")
10
^SCR("P1DL","P","NAME","HZM1")
15
^SCR("P1DL","P","NAME","HZM2")
17
^SCR("P1DL","P","NAME","KHZ")
30
^SCR("P1DL","P","NAME","LK1")
26
^SCR("P1DL","P","NAME","LK2")
28
^SCR("P1DL","P","NAME","MEKVZ")
22
^SCR("P1DL","P","NAME","MESUM")
19
^SCR("P1DL","P","NAME","SUM")
35
^SCR("P1DL","P","NAME","SUML")
25
^SCR("P1DL","P","NM",5)
DAT1
^SCR("P1DL","P","NM",10)
DAT2
^SCR("P1DL","P","NM",15)
HZM1
^SCR("P1DL","P","NM",17)
HZM2
^SCR("P1DL","P","NM",19)
MESUM
^SCR("P1DL","P","NM",20)
ADSUM
^SCR("P1DL","P","NM",22)
MEKVZ
^SCR("P1DL","P","NM",24)
ADKVZ
^SCR("P1DL","P","NM",25)
SUML
^SCR("P1DL","P","NM",26)
LK1
^SCR("P1DL","P","NM",28)
LK2
^SCR("P1DL","P","NM",30)
KHZ
^SCR("P1DL","P","NM",35)
SUM
^SCR("P1DL1")
H
^SCR("P1DL1",1)
                                # zepnfd gec  #                                
^SCR("P1DL1",2)
                                                                               
^SCR("P1DL1",3)
                         {                   15}: {10        }: 'qn            
^SCR("P1DL1",4)
                                                                               
^SCR("P1DL1",5)
                                                                    1$         
^SCR("P1DL1",6)
                   : dpnfd mekq  :  dpnfd zlaw onf : dpnfd 'qn  :              
^SCR("P1DL1",7)
                                                                               
^SCR("P1DL1",8)
                                                                               
^SCR("P1DL1",9)
                                                                               
^SCR("P1DL1",10)
                                                                               
^SCR("P1DL1",11)
                                                                               
^SCR("P1DL1",12)
                                                                               
^SCR("P1DL1",13)
                                                                               
^SCR("P1DL1",14)
                                                                               
^SCR("P1DL1",15)
                                                                               
^SCR("P1DL1",16)
                                                                               
^SCR("P1DL1",17)
                                                                               
^SCR("P1DL1",18)
                                                                               
^SCR("P1DL1",19)
                                                                               
^SCR("P1DL1",20)
                                                                               
^SCR("P1DL1",21)
               $1                                                              
^SCR("P1DL1",22)
                     {20       }                                               
^SCR("P1DL1","A",1)
š…�Ž†„‡…ƒ
^SCR("P1DL1","A",2)

^SCR("P1DL1","A",3)
::'‘Ž
^SCR("P1DL1","A",4)

^SCR("P1DL1","A",5)

^SCR("P1DL1","A",6)
„�Ž†„�…‹‘„�Ž†„šŒ�—�Ž†„�Ž†„'‘Ž
^SCR("P1DL1","A",7)
------------------------------------------
^SCR("P1DL1","A",8)

^SCR("P1DL1","A",9)

^SCR("P1DL1","A",10)

^SCR("P1DL1","A",11)

^SCR("P1DL1","A",12)

^SCR("P1DL1","A",13)

^SCR("P1DL1","A",14)

^SCR("P1DL1","A",15)

^SCR("P1DL1","A",16)

^SCR("P1DL1","A",17)

^SCR("P1DL1","A",18)

^SCR("P1DL1","A",19)

^SCR("P1DL1","A",20)

^SCR("P1DL1","A",21)

^SCR("P1DL1","A",22)

^SCR("P1DL1","AV",1)
,ubnzvjus
^SCR("P1DL1","AV",2)

^SCR("P1DL1","AV",3)
::wxn
^SCR("P1DL1","AV",4)

^SCR("P1DL1","AV",5)

^SCR("P1DL1","AV",6)
vbnzvoufxvbnzv,kceinzvbnzvwxn
^SCR("P1DL1","AV",7)
------------------------------------------
^SCR("P1DL1","AV",8)

^SCR("P1DL1","AV",9)

^SCR("P1DL1","AV",10)

^SCR("P1DL1","AV",11)

^SCR("P1DL1","AV",12)

^SCR("P1DL1","AV",13)

^SCR("P1DL1","AV",14)

^SCR("P1DL1","AV",15)

^SCR("P1DL1","AV",16)

^SCR("P1DL1","AV",17)

^SCR("P1DL1","AV",18)

^SCR("P1DL1","AV",19)

^SCR("P1DL1","AV",20)

^SCR("P1DL1","AV",21)

^SCR("P1DL1","AV",22)

^SCR("P1DL1","G",1,"CRD")
7,64,N,7,0
^SCR("P1DL1","G",1,"HELP")
<F9> - dpnfd bivdl 
^SCR("P1DL1","G",1,"LMAX")
12
^SCR("P1DL1","G",1,"MUMPS1")
S %L1NMB("HIST")=""
^SCR("P1DL1","G",1,"MUMPS2")
I %OLDTO="F9" D ^P1HZVW(HZM) D A^%L1SC S %SC("ST")=1
^SCR("P1DL1","G",1,"SHEM")
 dpnfd 'qn  
^SCR("P1DL1","G",1,"TYP")
N
^SCR("P1DL1","G",2,"CRD")
7,51,E,17,0
^SCR("P1DL1","G",2,"HELP")

^SCR("P1DL1","G",2,"LMAX")
17
^SCR("P1DL1","G",2,"MUMPS1")

^SCR("P1DL1","G",2,"MUMPS2")

^SCR("P1DL1","G",2,"OUTPUT")

^SCR("P1DL1","G",2,"SHEM")
  dpnfd zlaw onf 
^SCR("P1DL1","G",2,"TYP")
E
^SCR("P1DL1","G",3,"CRD")
7,33,E,7,0
^SCR("P1DL1","G",3,"HELP")

^SCR("P1DL1","G",3,"LMAX")
13
^SCR("P1DL1","G",3,"MUMPS1")

^SCR("P1DL1","G",3,"MUMPS2")

^SCR("P1DL1","G",3,"OUTPUT")

^SCR("P1DL1","G",3,"SHEM")
 dpnfd mekq  
^SCR("P1DL1","G",3,"TYP")
E
^SCR("P1DL1","G","DEL")

^SCR("P1DL1","G","MAX")
99999
^SCR("P1DL1","G","NAME","HZM")
1
^SCR("P1DL1","G","NAME","SHHZ")
3
^SCR("P1DL1","G","NAME","ZMANK")
2
^SCR("P1DL1","G","NM",1)
HZM
^SCR("P1DL1","G","NM",2)
ZMANK
^SCR("P1DL1","G","NM",3)
SHHZ
^SCR("P1DL1","G","RB")
6,16,22,70
^SCR("P1DL1","G","REF")
^TEMPHL($P
^SCR("P1DL1","G","RZD")
\
^SCR("P1DL1","G","STEP")
1
^SCR("P1DL1","G","STG")
                   : dpnfd mekq  :  dpnfd zlaw onf : dpnfd 'qn  :              
^SCR("P1DL1","G","VG")
8
^SCR("P1DL1","NAME")
zegewll zepnfd gec
^SCR("P1DL1","P",10,"CRD")
3,50,E,10,0
^SCR("P1DL1","P",10,"HELP")

^SCR("P1DL1","P",10,"LMAX")
11
^SCR("P1DL1","P",10,"MUMPS1")

^SCR("P1DL1","P",10,"MUMPS2")

^SCR("P1DL1","P",10,"OUTPUT")

^SCR("P1DL1","P",10,"TYP")
E
^SCR("P1DL1","P",15,"CRD")
3,48,H,22
^SCR("P1DL1","P",15,"HELP")

^SCR("P1DL1","P",15,"LMAX")
22
^SCR("P1DL1","P",15,"MUMPS1")

^SCR("P1DL1","P",15,"MUMPS2")

^SCR("P1DL1","P",15,"OUTPUT")

^SCR("P1DL1","P",15,"TYP")
H
^SCR("P1DL1","P",20,"CRD")
22,21,N,9,2
^SCR("P1DL1","P",20,"HELP")

^SCR("P1DL1","P",20,"LMAX")
10
^SCR("P1DL1","P",20,"MUMPS1")

^SCR("P1DL1","P",20,"MUMPS2")

^SCR("P1DL1","P",20,"OUTPUT")

^SCR("P1DL1","P",20,"TYP")
N
^SCR("P1DL1","P","NAME","NAME")
15
^SCR("P1DL1","P","NAME","NMB")
10
^SCR("P1DL1","P","NAME","SUMLK")
20
^SCR("P1DL1","P","NM",10)
NMB
^SCR("P1DL1","P","NM",15)
NAME
^SCR("P1DL1","P","NM",20)
SUMLK
^SCR("P1DLML")
H
^SCR("P1DLML",1)
                   #oecren zegewl ly zepnfd g"ec#                              
^SCR("P1DLML",2)
                            {10       } jix`z cr      {05       } jix`zn       
^SCR("P1DLML",3)
                          {17   } zepnfd zenk cr   {15    } zepnfd zenkn       
^SCR("P1DLML",4)
                       {20      } mekq cr       {19       }        mekqn       
^SCR("P1DLML",5)
                       {27   } :zegewl zveaw cr   {23   }: zegewl zveawn       
^SCR("P1DLML",6)
                                {37        } gewl cr  {32        } gewln       
^SCR("P1DLML",7)
                                                                             1$
^SCR("P1DLML",8)
                     :   k"dq  :zepnfd:         gewl my      :  gewl 'qn  :    
^SCR("P1DLML",9)
                                                                               
^SCR("P1DLML",10)
                                                                               
^SCR("P1DLML",11)
                                                                               
^SCR("P1DLML",12)
                                                                               
^SCR("P1DLML",13)
                                                                               
^SCR("P1DLML",14)
                                                                               
^SCR("P1DLML",15)
                                                                               
^SCR("P1DLML",16)
                                                                               
^SCR("P1DLML",17)
                                                                               
^SCR("P1DLML",18)
                                                                               
^SCR("P1DLML",19)
                                                                               
^SCR("P1DLML",20)
                                                                               
^SCR("P1DLML",21)
                                                                               
^SCR("P1DLML",22)
                 $1                                                            
^SCR("P1DLML",23)
                     {35      } {30   }            {25      }: zegewl k"dq     
^SCR("P1DLML","A",1)
�…ƒ’…Žš…‡…—ŒŒ™š…�Ž†„‡"…ƒ
^SCR("P1DLML","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("P1DLML","A",3)
š…�Ž†„š…Ž‹ƒ’š…�Ž†„š…Ž‹Ž
^SCR("P1DLML","A",4)
�…‹‘ƒ’�…‹‘Ž
^SCR("P1DLML","A",5)
:š…‡…—Œš–…�—ƒ’:š…‡…—Œš–…�—Ž
^SCR("P1DLML","A",6)
‡…—Œƒ’‡…—ŒŽ
^SCR("P1DLML","A",7)

^SCR("P1DLML","A",8)
‹"„‘š…�Ž†„‡…—Œ�™‡…—Œ'‘Ž
^SCR("P1DLML","A",9)
-----------------------------------------------------
^SCR("P1DLML","A",10)

^SCR("P1DLML","A",11)

^SCR("P1DLML","A",12)

^SCR("P1DLML","A",13)

^SCR("P1DLML","A",14)

^SCR("P1DLML","A",15)

^SCR("P1DLML","A",16)

^SCR("P1DLML","A",17)

^SCR("P1DLML","A",18)

^SCR("P1DLML","A",19)

^SCR("P1DLML","A",20)

^SCR("P1DLML","A",21)

^SCR("P1DLML","A",22)

^SCR("P1DLML","A",23)
:š…‡…—Œ‹"„‘
^SCR("P1DLML","AV",1)
iusgun,ujuekka,ubnzvj"us
^SCR("P1DLML","AV",2)
lhrt,sglhrt,n
^SCR("P1DLML","AV",3)
,ubnzv,unfsg,ubnzv,unfn
^SCR("P1DLML","AV",4)
oufxsgoufxn
^SCR("P1DLML","AV",5)
:,ujuek,mucesg:,ujuek,mucen
^SCR("P1DLML","AV",6)
jueksgjuekn
^SCR("P1DLML","AV",7)

^SCR("P1DLML","AV",8)
f"vx,ubnzvjuekoajuekwxn
^SCR("P1DLML","AV",9)
-----------------------------------------------------
^SCR("P1DLML","AV",10)

^SCR("P1DLML","AV",11)

^SCR("P1DLML","AV",12)

^SCR("P1DLML","AV",13)

^SCR("P1DLML","AV",14)

^SCR("P1DLML","AV",15)

^SCR("P1DLML","AV",16)

^SCR("P1DLML","AV",17)

^SCR("P1DLML","AV",18)

^SCR("P1DLML","AV",19)

^SCR("P1DLML","AV",20)

^SCR("P1DLML","AV",21)

^SCR("P1DLML","AV",22)

^SCR("P1DLML","AV",23)
:,ujuekf"vx
^SCR("P1DLML","G",1,"CRD")
9,74,E,10,0
^SCR("P1DLML","G",1,"HELP")
<F10> - gewl qihxk , <F9> - gewl ly zepnfd lk zbvd 
^SCR("P1DLML","G",1,"LMAX")
12
^SCR("P1DLML","G",1,"MUMPS1")

^SCR("P1DLML","G",1,"MUMPS2")
D NMB^P1DL
^SCR("P1DLML","G",1,"SHEM")
  gewl 'qn  
^SCR("P1DLML","G",1,"TYP")
E
^SCR("P1DLML","G",2,"CRD")
9,61,H,22,0
^SCR("P1DLML","G",2,"HELP")

^SCR("P1DLML","G",2,"LMAX")
22
^SCR("P1DLML","G",2,"MUMPS1")

^SCR("P1DLML","G",2,"MUMPS2")

^SCR("P1DLML","G",2,"OUTPUT")

^SCR("P1DLML","G",2,"SHEM")
         gewl my      
^SCR("P1DLML","G",2,"TYP")
H
^SCR("P1DLML","G",3,"CRD")
9,38,E,6,0
^SCR("P1DLML","G",3,"HELP")

^SCR("P1DLML","G",3,"LMAX")
6
^SCR("P1DLML","G",3,"MUMPS1")

^SCR("P1DLML","G",3,"MUMPS2")

^SCR("P1DLML","G",3,"OUTPUT")

^SCR("P1DLML","G",3,"SHEM")
zepnfd
^SCR("P1DLML","G",3,"TYP")
E
^SCR("P1DLML","G",4,"CRD")
9,31,N,9,2
^SCR("P1DLML","G",4,"HELP")

^SCR("P1DLML","G",4,"LMAX")
9
^SCR("P1DLML","G",4,"MUMPS1")

^SCR("P1DLML","G",4,"MUMPS2")

^SCR("P1DLML","G",4,"OUTPUT")

^SCR("P1DLML","G",4,"SHEM")
   k"dq  
^SCR("P1DLML","G",4,"TYP")
N
^SCR("P1DLML","G","DEL")
Y
^SCR("P1DLML","G","MAX")
99999
^SCR("P1DLML","G","NAME","KAMH")
3
^SCR("P1DLML","G","NAME","NMB")
1
^SCR("P1DLML","G","NAME","NMB1")
2
^SCR("P1DLML","G","NAME","STS")
4
^SCR("P1DLML","G","NM",1)
NMB
^SCR("P1DLML","G","NM",2)
NMB1
^SCR("P1DLML","G","NM",3)
KAMH
^SCR("P1DLML","G","NM",4)
STS
^SCR("P1DLML","G","RB")
8,18,23,79
^SCR("P1DLML","G","REF")
^TEMPL($P
^SCR("P1DLML","G","RZD")
\
^SCR("P1DLML","G","STEP")
1
^SCR("P1DLML","G","STG")
                     :   k"dq  :zepnfd:         gewl my      :  gewl 'qn  :    
^SCR("P1DLML","G","VG")
10
^SCR("P1DLML","NAME")

^SCR("P1DLML","P",5,"CRD")
2,54,D,8,0
^SCR("P1DLML","P",5,"HELP")

^SCR("P1DLML","P",5,"LMAX")
10
^SCR("P1DLML","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("P1DLML","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("P1DLML","P",5,"MUST")

^SCR("P1DLML","P",5,"TYP")
D
^SCR("P1DLML","P",10,"CRD")
2,28,D,8,0
^SCR("P1DLML","P",10,"HELP")

^SCR("P1DLML","P",10,"LMAX")
10
^SCR("P1DLML","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1DLML","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I $E(D2)="?" S %SC("ER")=1
^SCR("P1DLML","P",10,"MUST")

^SCR("P1DLML","P",10,"TYP")
D
^SCR("P1DLML","P",15,"CRD")
3,51,E,7,0
^SCR("P1DLML","P",15,"HELP")

^SCR("P1DLML","P",15,"LMAX")
7
^SCR("P1DLML","P",15,"MUMPS1")
S:'$G(HZM1) HZM1=1
^SCR("P1DLML","P",15,"MUMPS2")

^SCR("P1DLML","P",15,"TYP")
E
^SCR("P1DLML","P",17,"CRD")
3,26,N,6,0
^SCR("P1DLML","P",17,"HELP")

^SCR("P1DLML","P",17,"LMAX")
6
^SCR("P1DLML","P",17,"MUMPS1")
S:'$G(HZM2) HZM2=99999
^SCR("P1DLML","P",17,"MUMPS2")

^SCR("P1DLML","P",17,"TYP")
N
^SCR("P1DLML","P",19,"CRD")
4,48,N,9,2
^SCR("P1DLML","P",19,"HELP")

^SCR("P1DLML","P",19,"LMAX")
10
^SCR("P1DLML","P",19,"MUMPS1")

^SCR("P1DLML","P",19,"MUMPS2")

^SCR("P1DLML","P",19,"TYP")
N
^SCR("P1DLML","P",20,"CRD")
4,23,N,9,2
^SCR("P1DLML","P",20,"HELP")

^SCR("P1DLML","P",20,"LMAX")
9
^SCR("P1DLML","P",20,"MUMPS1")
S:'$G(ADSUM) ADSUM=999999
^SCR("P1DLML","P",20,"MUMPS2")

^SCR("P1DLML","P",20,"TYP")
N
^SCR("P1DLML","P",23,"CRD")
5,50,E,6,0
^SCR("P1DLML","P",23,"FNC")

^SCR("P1DLML","P",23,"GLOB")
SUGL
^SCR("P1DLML","P",23,"HELP")

^SCR("P1DLML","P",23,"LMAX")
6
^SCR("P1DLML","P",23,"MUMPS1")

^SCR("P1DLML","P",23,"MUMPS2")

^SCR("P1DLML","P",23,"NLN")
20
^SCR("P1DLML","P",23,"RZD")
\
^SCR("P1DLML","P",23,"TOPB")
8
^SCR("P1DLML","P",23,"TYP")
E
^SCR("P1DLML","P",25,"CRD")
23,51,N,7,0
^SCR("P1DLML","P",25,"HELP")

^SCR("P1DLML","P",25,"LMAX")
9
^SCR("P1DLML","P",25,"MUMPS1")

^SCR("P1DLML","P",25,"MUMPS2")

^SCR("P1DLML","P",25,"OUTPUT")

^SCR("P1DLML","P",25,"TYP")
N
^SCR("P1DLML","P",27,"CRD")
5,23,E,6,0
^SCR("P1DLML","P",27,"FNC")

^SCR("P1DLML","P",27,"GLOB")
SUGL
^SCR("P1DLML","P",27,"HELP")

^SCR("P1DLML","P",27,"LMAX")
6
^SCR("P1DLML","P",27,"MUMPS1")
S:'$G(ADKVZ) ADKVZ=MEKVZ
^SCR("P1DLML","P",27,"MUMPS2")
I ADKVZ<MEKVZ S %SC("ER")=1
^SCR("P1DLML","P",27,"NLN")
20
^SCR("P1DLML","P",27,"RZD")
\
^SCR("P1DLML","P",27,"TOPB")
8
^SCR("P1DLML","P",27,"TYP")
E
^SCR("P1DLML","P",30,"CRD")
23,32,N,6,0
^SCR("P1DLML","P",30,"HELP")

^SCR("P1DLML","P",30,"LMAX")
6
^SCR("P1DLML","P",30,"MUMPS1")

^SCR("P1DLML","P",30,"MUMPS2")

^SCR("P1DLML","P",30,"OUTPUT")

^SCR("P1DLML","P",30,"TYP")
N
^SCR("P1DLML","P",32,"CRD")
6,54,E,11,0
^SCR("P1DLML","P",32,"FNC")

^SCR("P1DLML","P",32,"GLOB")
LKH
^SCR("P1DLML","P",32,"HELP")

^SCR("P1DLML","P",32,"LMAX")
11
^SCR("P1DLML","P",32,"MUMPS1")

^SCR("P1DLML","P",32,"MUMPS2")

^SCR("P1DLML","P",32,"NLN")
20
^SCR("P1DLML","P",32,"RZD")
\
^SCR("P1DLML","P",32,"TOPB")
8
^SCR("P1DLML","P",32,"TYP")
E
^SCR("P1DLML","P",35,"CRD")
23,21,N,9,2
^SCR("P1DLML","P",35,"HELP")

^SCR("P1DLML","P",35,"LMAX")
9
^SCR("P1DLML","P",35,"MUMPS1")

^SCR("P1DLML","P",35,"MUMPS2")

^SCR("P1DLML","P",35,"OUTPUT")

^SCR("P1DLML","P",35,"TYP")
N
^SCR("P1DLML","P",37,"CRD")
6,32,E,11,0
^SCR("P1DLML","P",37,"FNC")

^SCR("P1DLML","P",37,"GLOB")
LKH
^SCR("P1DLML","P",37,"HELP")

^SCR("P1DLML","P",37,"LMAX")
11
^SCR("P1DLML","P",37,"MUMPS1")
S:'$G(LK2) LK2=LK1
^SCR("P1DLML","P",37,"MUMPS2")
I LK2<LK1 S %SC("ER")=1
^SCR("P1DLML","P",37,"NLN")
20
^SCR("P1DLML","P",37,"RZD")
\
^SCR("P1DLML","P",37,"TOPB")
8
^SCR("P1DLML","P",37,"TYP")
E
^SCR("P1DLML","P","NAME","ADKVZ")
27
^SCR("P1DLML","P","NAME","ADSUM")
20
^SCR("P1DLML","P","NAME","DAT1")
5
^SCR("P1DLML","P","NAME","DAT2")
10
^SCR("P1DLML","P","NAME","HZM1")
15
^SCR("P1DLML","P","NAME","HZM2")
17
^SCR("P1DLML","P","NAME","KHZ")
30
^SCR("P1DLML","P","NAME","LK1")
32
^SCR("P1DLML","P","NAME","LK2")
37
^SCR("P1DLML","P","NAME","MEKVZ")
23
^SCR("P1DLML","P","NAME","MESUM")
19
^SCR("P1DLML","P","NAME","SUM")
35
^SCR("P1DLML","P","NAME","SUML")
25
^SCR("P1DLML","P","NM",5)
DAT1
^SCR("P1DLML","P","NM",10)
DAT2
^SCR("P1DLML","P","NM",15)
HZM1
^SCR("P1DLML","P","NM",17)
HZM2
^SCR("P1DLML","P","NM",19)
MESUM
^SCR("P1DLML","P","NM",20)
ADSUM
^SCR("P1DLML","P","NM",23)
MEKVZ
^SCR("P1DLML","P","NM",25)
SUML
^SCR("P1DLML","P","NM",27)
ADKVZ
^SCR("P1DLML","P","NM",30)
KHZ
^SCR("P1DLML","P","NM",32)
LK1
^SCR("P1DLML","P","NM",35)
SUM
^SCR("P1DLML","P","NM",37)
LK2
^SCR("P1DLMS")
H
^SCR("P1DLMS",1)
                                                                           1]  
^SCR("P1DLMS",2)
                          {10        }: ogleya zepnfd dixehqd                  
^SCR("P1DLMS",3)
  [1                                                                           
^SCR("P1DLMS",4)
                                                                           1$  
^SCR("P1DLMS",5)
    : dry : ogleyl : ogleyn : dpnfd mekq  :  dpnfd zlaw onf : dpnfd 'qn  :     
^SCR("P1DLMS",6)
                                                                               
^SCR("P1DLMS",7)
                                                                               
^SCR("P1DLMS",8)
                                                                               
^SCR("P1DLMS",9)
                                                                               
^SCR("P1DLMS",10)
                                                                               
^SCR("P1DLMS",11)
                                                                               
^SCR("P1DLMS",12)
                                                                               
^SCR("P1DLMS",13)
                                                                               
^SCR("P1DLMS",14)
                                                                               
^SCR("P1DLMS",15)
                                                                               
^SCR("P1DLMS",16)
                                                                               
^SCR("P1DLMS",17)
                                                                               
^SCR("P1DLMS",18)
                                                                               
^SCR("P1DLMS",19)
                                                                               
^SCR("P1DLMS",20)
                                                                               
^SCR("P1DLMS",21)
  $1                                                                           
^SCR("P1DLMS",22)
                                                                               
^SCR("P1DLMS","A",1)

^SCR("P1DLMS","A",2)
:�‡Œ…™�š…�Ž†„„‰˜…ˆ‘„
^SCR("P1DLMS","A",3)

^SCR("P1DLMS","A",4)

^SCR("P1DLMS","A",5)
„’™�‡Œ…™Œ�‡Œ…™Ž„�Ž†„�…‹‘„�Ž†„šŒ�—�Ž†„�Ž†„'‘Ž
^SCR("P1DLMS","A",6)
---------------------------------------------------------------
^SCR("P1DLMS","A",7)

^SCR("P1DLMS","A",8)

^SCR("P1DLMS","A",9)

^SCR("P1DLMS","A",10)

^SCR("P1DLMS","A",11)

^SCR("P1DLMS","A",12)

^SCR("P1DLMS","A",13)

^SCR("P1DLMS","A",14)

^SCR("P1DLMS","A",15)

^SCR("P1DLMS","A",16)

^SCR("P1DLMS","A",17)

^SCR("P1DLMS","A",18)

^SCR("P1DLMS","A",19)

^SCR("P1DLMS","A",20)

^SCR("P1DLMS","A",21)

^SCR("P1DLMS","A",22)

^SCR("P1DLMS","AV",1)

^SCR("P1DLMS","AV",2)
:ijkuac,ubnzvvhruyxv
^SCR("P1DLMS","AV",3)

^SCR("P1DLMS","AV",4)

^SCR("P1DLMS","AV",5)
vgaijkuakijkuanvbnzvoufxvbnzv,kceinzvbnzvwxn
^SCR("P1DLMS","AV",6)
---------------------------------------------------------------
^SCR("P1DLMS","AV",7)

^SCR("P1DLMS","AV",8)

^SCR("P1DLMS","AV",9)

^SCR("P1DLMS","AV",10)

^SCR("P1DLMS","AV",11)

^SCR("P1DLMS","AV",12)

^SCR("P1DLMS","AV",13)

^SCR("P1DLMS","AV",14)

^SCR("P1DLMS","AV",15)

^SCR("P1DLMS","AV",16)

^SCR("P1DLMS","AV",17)

^SCR("P1DLMS","AV",18)

^SCR("P1DLMS","AV",19)

^SCR("P1DLMS","AV",20)

^SCR("P1DLMS","AV",21)

^SCR("P1DLMS","AV",22)

^SCR("P1DLMS","G",1,"CRD")
6,73,N,7,0
^SCR("P1DLMS","G",1,"HELP")
<F9> - dpnfd bivdl 
^SCR("P1DLMS","G",1,"LMAX")
12
^SCR("P1DLMS","G",1,"MUMPS1")
S %L1NMB("HIST")=""
^SCR("P1DLMS","G",1,"MUMPS2")
I %OLDTO="F9" D ^P1HZVW(HZM) D A^%L1SC S %SC("ST")=1
^SCR("P1DLMS","G",1,"SHEM")
 dpnfd 'qn  
^SCR("P1DLMS","G",1,"TYP")
N
^SCR("P1DLMS","G",2,"CRD")
6,60,E,17,0
^SCR("P1DLMS","G",2,"HELP")

^SCR("P1DLMS","G",2,"LMAX")
17
^SCR("P1DLMS","G",2,"MUMPS1")

^SCR("P1DLMS","G",2,"MUMPS2")

^SCR("P1DLMS","G",2,"OUTPUT")

^SCR("P1DLMS","G",2,"SHEM")
  dpnfd zlaw onf 
^SCR("P1DLMS","G",2,"TYP")
E
^SCR("P1DLMS","G",3,"CRD")
6,42,E,7,0
^SCR("P1DLMS","G",3,"HELP")

^SCR("P1DLMS","G",3,"LMAX")
13
^SCR("P1DLMS","G",3,"MUMPS1")

^SCR("P1DLMS","G",3,"MUMPS2")

^SCR("P1DLMS","G",3,"OUTPUT")

^SCR("P1DLMS","G",3,"SHEM")
 dpnfd mekq  
^SCR("P1DLMS","G",3,"TYP")
E
^SCR("P1DLMS","G",4,"CRD")
6,28,E,3,0
^SCR("P1DLMS","G",4,"HELP")

^SCR("P1DLMS","G",4,"LMAX")
8
^SCR("P1DLMS","G",4,"MUMPS1")

^SCR("P1DLMS","G",4,"MUMPS2")

^SCR("P1DLMS","G",4,"OUTPUT")

^SCR("P1DLMS","G",4,"SHEM")
 ogleyn 
^SCR("P1DLMS","G",4,"TYP")
E
^SCR("P1DLMS","G",5,"CRD")
6,19,E,3,0
^SCR("P1DLMS","G",5,"HELP")

^SCR("P1DLMS","G",5,"LMAX")
8
^SCR("P1DLMS","G",5,"MUMPS1")

^SCR("P1DLMS","G",5,"MUMPS2")

^SCR("P1DLMS","G",5,"OUTPUT")

^SCR("P1DLMS","G",5,"SHEM")
 ogleyl 
^SCR("P1DLMS","G",5,"TYP")
E
^SCR("P1DLMS","G",6,"CRD")
6,10,E,5,0
^SCR("P1DLMS","G",6,"HELP")

^SCR("P1DLMS","G",6,"LMAX")
5
^SCR("P1DLMS","G",6,"MUMPS1")

^SCR("P1DLMS","G",6,"MUMPS2")

^SCR("P1DLMS","G",6,"OUTPUT")

^SCR("P1DLMS","G",6,"SHEM")
 dry 
^SCR("P1DLMS","G",6,"TYP")
E
^SCR("P1DLMS","G","MAX")
99999
^SCR("P1DLMS","G","NAME","HZM")
1
^SCR("P1DLMS","G","NAME","LESHUL")
5
^SCR("P1DLMS","G","NAME","MESHUL")
4
^SCR("P1DLMS","G","NAME","SHAAMV")
6
^SCR("P1DLMS","G","NAME","SHHZ")
3
^SCR("P1DLMS","G","NAME","ZMANK")
2
^SCR("P1DLMS","G","NM",1)
HZM
^SCR("P1DLMS","G","NM",2)
ZMANK
^SCR("P1DLMS","G","NM",3)
SHHZ
^SCR("P1DLMS","G","NM",4)
MESHUL
^SCR("P1DLMS","G","NM",5)
LESHUL
^SCR("P1DLMS","G","NM",6)
SHAAMV
^SCR("P1DLMS","G","RB")
5,3,22,77
^SCR("P1DLMS","G","REF")
^TEMPHL($P
^SCR("P1DLMS","G","RZD")
\
^SCR("P1DLMS","G","STEP")
1
^SCR("P1DLMS","G","STG")
    : dry : ogleyl : ogleyn : dpnfd mekq  :  dpnfd zlaw onf : dpnfd 'qn  :     
^SCR("P1DLMS","G","VG")
7
^SCR("P1DLMS","NAME")

^SCR("P1DLMS","P",10,"CRD")
2,26,E,10,0
^SCR("P1DLMS","P",10,"HELP")

^SCR("P1DLMS","P",10,"LMAX")
11
^SCR("P1DLMS","P",10,"MUMPS1")

^SCR("P1DLMS","P",10,"MUMPS2")

^SCR("P1DLMS","P",10,"OUTPUT")

^SCR("P1DLMS","P",10,"TYP")
E
^SCR("P1DLMS","P","NAME","NMB")
10
^SCR("P1DLMS","P","NM",10)
NMB
^SCR("P1DLMS","P","RB",1)
2,3,4,77
^SCR("P1DLZ")
H
^SCR("P1DLZ",1)
                                                                               
^SCR("P1DLZ",2)
                                                                          1]   
^SCR("P1DLZ",3)
                                                                               
^SCR("P1DLZ",4)
     {           11}{10     }:hixt cr {              06}{05     }:hixtn        
^SCR("P1DLZ",5)
                                                                               
^SCR("P1DLZ",6)
                        {20 }: dry cr          {15 }: dryn                     
^SCR("P1DLZ",7)
                                                                               
^SCR("P1DLZ",8)
                                 {           25}:      xir                     
^SCR("P1DLZ",9)
                {                            35}:    zaezk                     
^SCR("P1DLZ",10)
                                          {  37}:     xef`                     
^SCR("P1DLZ",11)
                                                                               
^SCR("P1DLZ",12)
                                           {40 }: rvan 'qn                     
^SCR("P1DLZ",13)
                                           {45  :melyz beq                     
^SCR("P1DLZ",14)
                                                                               
^SCR("P1DLZ",15)
                    {50: (0-`l,1-ok)          miycg zegewl wx bivdl m`d        
^SCR("P1DLZ",16)
                    {55: (0-`l,1-ok) cegi` zgz mi`vnpy zegewl bivdl m`d        
^SCR("P1DLZ",17)
                                                                               
^SCR("P1DLZ",18)
  [1                                                                           
^SCR("P1DLZ",19)
                                                                               
^SCR("P1DLZ",20)
                                                                               
^SCR("P1DLZ","A",1)

^SCR("P1DLZ","A",2)

^SCR("P1DLZ","A",3)

^SCR("P1DLZ","A",4)
:ˆ‰˜”ƒ’:ˆ‰˜”Ž
^SCR("P1DLZ","A",5)

^SCR("P1DLZ","A",6)
:„’™ƒ’:„’™Ž
^SCR("P1DLZ","A",7)

^SCR("P1DLZ","A",8)
:˜‰’
^SCR("P1DLZ","A",9)
:š�…š‹
^SCR("P1DLZ","A",10)
:˜…†€
^SCR("P1DLZ","A",11)

^SCR("P1DLZ","A",12)
:’–�Ž'‘Ž
^SCR("P1DLZ","A",13)
:�…Œ™š‚…‘
^SCR("P1DLZ","A",14)

^SCR("P1DLZ","A",15)
:(0-€Œ,1-�‹)�‰™ƒ‡š…‡…—Œ—˜‚‰–„Œ�€„
^SCR("P1DLZ","A",16)
:(0-€Œ,1-�‹)ƒ…‡‰€š‡š�‰€–Ž�™š…‡…—Œ‚‰–„Œ�€„
^SCR("P1DLZ","A",17)

^SCR("P1DLZ","A",18)

^SCR("P1DLZ","A",19)

^SCR("P1DLZ","A",20)

^SCR("P1DLZ","AV",1)

^SCR("P1DLZ","AV",2)

^SCR("P1DLZ","AV",3)

^SCR("P1DLZ","AV",4)
:yhrpsg:yhrpn
^SCR("P1DLZ","AV",5)

^SCR("P1DLZ","AV",6)
:vgasg:vgan
^SCR("P1DLZ","AV",7)

^SCR("P1DLZ","AV",8)
:rhg
^SCR("P1DLZ","AV",9)
:,cu,f
^SCR("P1DLZ","AV",10)
:ruzt
^SCR("P1DLZ","AV",11)

^SCR("P1DLZ","AV",12)
:gmcnwxn
^SCR("P1DLZ","AV",13)
:ouka,dux
^SCR("P1DLZ","AV",14)

^SCR("P1DLZ","AV",15)
:(0-tk'1-if)ohasj,ujuekerdhmvkotv
^SCR("P1DLZ","AV",16)
:(0-tk'1-if)sujht,j,ohtmnba,ujuekdhmvkotv
^SCR("P1DLZ","AV",17)

^SCR("P1DLZ","AV",18)

^SCR("P1DLZ","AV",19)

^SCR("P1DLZ","AV",20)

^SCR("P1DLZ","NAME")

^SCR("P1DLZ","P",5,"CRD")
4,56,E,8,0
^SCR("P1DLZ","P",5,"FNC")

^SCR("P1DLZ","P",5,"GLOB")
^PAR
^SCR("P1DLZ","P",5,"HELP")
<.> - zezli`yd lr blcl 
^SCR("P1DLZ","P",5,"LMAX")
8
^SCR("P1DLZ","P",5,"MUMPS1")

^SCR("P1DLZ","P",5,"MUMPS2")
I ZPAR1="." S ZPAR1="",%BS=2 Q
^SCR("P1DLZ","P",5,"NLN")
20
^SCR("P1DLZ","P",5,"RZD")
*
^SCR("P1DLZ","P",5,"TOPB")
8
^SCR("P1DLZ","P",5,"TYP")
E
^SCR("P1DLZ","P",5,"VRB")
PAR11
^SCR("P1DLZ","P",6,"CRD")
4,56,H,17
^SCR("P1DLZ","P",6,"HELP")

^SCR("P1DLZ","P",6,"LMAX")
17
^SCR("P1DLZ","P",6,"MUMPS1")

^SCR("P1DLZ","P",6,"MUMPS2")

^SCR("P1DLZ","P",6,"OUTPUT")

^SCR("P1DLZ","P",6,"TYP")
H
^SCR("P1DLZ","P",10,"CRD")
4,20,E,8,0
^SCR("P1DLZ","P",10,"FNC")

^SCR("P1DLZ","P",10,"GLOB")
^PAR
^SCR("P1DLZ","P",10,"HELP")

^SCR("P1DLZ","P",10,"LMAX")
8
^SCR("P1DLZ","P",10,"MUMPS1")
S:'$G(ZPAR2) ZPAR2=ZPAR1
^SCR("P1DLZ","P",10,"MUMPS2")
I ZPAR2<ZPAR1 S %SC("ER")=1
^SCR("P1DLZ","P",10,"NLN")
20
^SCR("P1DLZ","P",10,"RZD")
*
^SCR("P1DLZ","P",10,"TOPB")
8
^SCR("P1DLZ","P",10,"TYP")
E
^SCR("P1DLZ","P",10,"VRB")
PAR21
^SCR("P1DLZ","P",11,"CRD")
4,20,H,14
^SCR("P1DLZ","P",11,"HELP")

^SCR("P1DLZ","P",11,"LMAX")
14
^SCR("P1DLZ","P",11,"MUMPS1")

^SCR("P1DLZ","P",11,"MUMPS2")

^SCR("P1DLZ","P",11,"OUTPUT")

^SCR("P1DLZ","P",11,"TYP")
H
^SCR("P1DLZ","P",15,"CRD")
6,47,E,2,0
^SCR("P1DLZ","P",15,"HELP")

^SCR("P1DLZ","P",15,"LMAX")
4
^SCR("P1DLZ","P",15,"MUMPS1")

^SCR("P1DLZ","P",15,"MUMPS2")
I ZSHAA1>23 S %SC("ER")=1
^SCR("P1DLZ","P",15,"TYP")
E
^SCR("P1DLZ","P",20,"CRD")
6,24,E,2,0
^SCR("P1DLZ","P",20,"HELP")

^SCR("P1DLZ","P",20,"LMAX")
4
^SCR("P1DLZ","P",20,"MUMPS1")
S:'$G(ZSHAA2) ZSHAA2=ZSHAA1
^SCR("P1DLZ","P",20,"MUMPS2")
I ZSHAA2<ZSHAA1!(ZSHAA2>24) S %SC("ER")=1
^SCR("P1DLZ","P",20,"TYP")
E
^SCR("P1DLZ","P",25,"CRD")
8,48,H,14
^SCR("P1DLZ","P",25,"HELP")

^SCR("P1DLZ","P",25,"LMAX")
14
^SCR("P1DLZ","P",25,"MUMPS1")
D HIR^P1HZ($G(IR))
^SCR("P1DLZ","P",25,"MUMPS2")

^SCR("P1DLZ","P",25,"TYP")
H
^SCR("P1DLZ","P",35,"CRD")
9,48,H,30
^SCR("P1DLZ","P",35,"HELP")

^SCR("P1DLZ","P",35,"LMAX")
31
^SCR("P1DLZ","P",35,"MUMPS1")

^SCR("P1DLZ","P",35,"MUMPS2")

^SCR("P1DLZ","P",35,"TYP")
H
^SCR("P1DLZ","P",37,"CRD")
10,48,H,5
^SCR("P1DLZ","P",37,"HELP")

^SCR("P1DLZ","P",37,"LMAX")
5
^SCR("P1DLZ","P",37,"MUMPS1")

^SCR("P1DLZ","P",37,"MUMPS2")

^SCR("P1DLZ","P",37,"TYP")
H
^SCR("P1DLZ","P",40,"CRD")
12,43,E,1,0
^SCR("P1DLZ","P",40,"HELP")
0 e` melk - rvan `ll, 2 - itqk rvan , 1 - mihixt rvan
^SCR("P1DLZ","P",40,"LMAX")
4
^SCR("P1DLZ","P",40,"MUMPS1")

^SCR("P1DLZ","P",40,"MUMPS2")

^SCR("P1DLZ","P",40,"TYP")
E
^SCR("P1DLZ","P",45,"CRD")
13,43,N,1,0
^SCR("P1DLZ","P",45,"HELP")
melyz ibeq lk - 0 , 4 - dtwd ,3 - `"k ,2 - wiy ,1 - onefn 
^SCR("P1DLZ","P",45,"LMAX")
5
^SCR("P1DLZ","P",45,"MUMPS1")

^SCR("P1DLZ","P",45,"MUMPS2")
I ZTSH>5 S %SC("ER")=1
^SCR("P1DLZ","P",45,"TYP")
N
^SCR("P1DLZ","P",50,"CRD")
15,20,N,3,0
^SCR("P1DLZ","P",50,"HELP")

^SCR("P1DLZ","P",50,"LMAX")
3
^SCR("P1DLZ","P",50,"MUMPS1")

^SCR("P1DLZ","P",50,"MUMPS2")
D ^%L1BDO
^SCR("P1DLZ","P",50,"TYP")
N
^SCR("P1DLZ","P",55,"CRD")
16,20,N,3,0
^SCR("P1DLZ","P",55,"HELP")

^SCR("P1DLZ","P",55,"LMAX")
3
^SCR("P1DLZ","P",55,"MUMPS1")

^SCR("P1DLZ","P",55,"MUMPS2")
D ^%L1BDO
^SCR("P1DLZ","P",55,"TYP")
N
^SCR("P1DLZ","P","NAME","AZOR")
37
^SCR("P1DLZ","P","NAME","EHUD")
55
^SCR("P1DLZ","P","NAME","IR")
25
^SCR("P1DLZ","P","NAME","NEW")
50
^SCR("P1DLZ","P","NAME","PAR11")
6
^SCR("P1DLZ","P","NAME","PAR21")
11
^SCR("P1DLZ","P","NAME","ZKTV")
35
^SCR("P1DLZ","P","NAME","ZMVC")
40
^SCR("P1DLZ","P","NAME","ZPAR1")
5
^SCR("P1DLZ","P","NAME","ZPAR2")
10
^SCR("P1DLZ","P","NAME","ZSHAA1")
15
^SCR("P1DLZ","P","NAME","ZSHAA2")
20
^SCR("P1DLZ","P","NAME","ZTSH")
45
^SCR("P1DLZ","P","NM",5)
ZPAR1
^SCR("P1DLZ","P","NM",6)
PAR11
^SCR("P1DLZ","P","NM",10)
ZPAR2
^SCR("P1DLZ","P","NM",11)
PAR21
^SCR("P1DLZ","P","NM",15)
ZSHAA1
^SCR("P1DLZ","P","NM",20)
ZSHAA2
^SCR("P1DLZ","P","NM",25)
IR
^SCR("P1DLZ","P","NM",35)
ZKTV
^SCR("P1DLZ","P","NM",37)
AZOR
^SCR("P1DLZ","P","NM",40)
ZMVC
^SCR("P1DLZ","P","NM",45)
ZTSH
^SCR("P1DLZ","P","NM",50)
NEW
^SCR("P1DLZ","P","NM",55)
EHUD
^SCR("P1DLZ","P","RB",1)
3,3,19,76
^SCR("P1DLZ1")
H
^SCR("P1DLZ1",1)
                                                                               
^SCR("P1DLZ1",2)
                                                                    1]         
^SCR("P1DLZ1",3)
                                                                               
^SCR("P1DLZ1",4)
                             {20 }: dry cr        {15 }:     dryn              
^SCR("P1DLZ1",5)
                                                                               
^SCR("P1DLZ1",6)
                                                  {45  :melyz beq              
^SCR("P1DLZ1",7)
                                                                               
^SCR("P1DLZ1",8)
              {50: (0-`l,1-ok)          miycg zegewl wx bivdl m`d              
^SCR("P1DLZ1",9)
                                                                               
^SCR("P1DLZ1",10)
              {55: (0-`l,1-ok) cegi` zgz mi`vnpy zegewl bivdl m`d              
^SCR("P1DLZ1",11)
                                                                               
^SCR("P1DLZ1",12)
         [1                                                                    
^SCR("P1DLZ1",13)
                                                                               
^SCR("P1DLZ1",14)
                                                                               
^SCR("P1DLZ1","A",1)

^SCR("P1DLZ1","A",2)

^SCR("P1DLZ1","A",3)

^SCR("P1DLZ1","A",4)
:„’™ƒ’:„’™Ž
^SCR("P1DLZ1","A",5)

^SCR("P1DLZ1","A",6)
:�…Œ™š‚…‘
^SCR("P1DLZ1","A",7)

^SCR("P1DLZ1","A",8)
:(0-€Œ,1-�‹)�‰™ƒ‡š…‡…—Œ—˜‚‰–„Œ�€„
^SCR("P1DLZ1","A",9)

^SCR("P1DLZ1","A",10)
:(0-€Œ,1-�‹)ƒ…‡‰€š‡š�‰€–Ž�™š…‡…—Œ‚‰–„Œ�€„
^SCR("P1DLZ1","A",11)

^SCR("P1DLZ1","A",12)

^SCR("P1DLZ1","A",13)

^SCR("P1DLZ1","A",14)

^SCR("P1DLZ1","AV",1)

^SCR("P1DLZ1","AV",2)

^SCR("P1DLZ1","AV",3)

^SCR("P1DLZ1","AV",4)
:vgasg:vgan
^SCR("P1DLZ1","AV",5)

^SCR("P1DLZ1","AV",6)
:ouka,dux
^SCR("P1DLZ1","AV",7)

^SCR("P1DLZ1","AV",8)
:(0-tk'1-if)ohasj,ujuekerdhmvkotv
^SCR("P1DLZ1","AV",9)

^SCR("P1DLZ1","AV",10)
:(0-tk'1-if)sujht,j,ohtmnba,ujuekdhmvkotv
^SCR("P1DLZ1","AV",11)

^SCR("P1DLZ1","AV",12)

^SCR("P1DLZ1","AV",13)

^SCR("P1DLZ1","AV",14)

^SCR("P1DLZ1","NAME")

^SCR("P1DLZ1","P",15,"CRD")
4,50,E,2,0
^SCR("P1DLZ1","P",15,"HELP")

^SCR("P1DLZ1","P",15,"LMAX")
4
^SCR("P1DLZ1","P",15,"MUMPS1")

^SCR("P1DLZ1","P",15,"MUMPS2")
I ZSHAA1>23 S %SC("ER")=1
^SCR("P1DLZ1","P",15,"TYP")
E
^SCR("P1DLZ1","P",20,"CRD")
4,29,E,2,0
^SCR("P1DLZ1","P",20,"HELP")

^SCR("P1DLZ1","P",20,"LMAX")
4
^SCR("P1DLZ1","P",20,"MUMPS1")
S:'$G(ZSHAA2) ZSHAA2=ZSHAA1
^SCR("P1DLZ1","P",20,"MUMPS2")
I ZSHAA2<ZSHAA1!(ZSHAA2>24) S %SC("ER")=1
^SCR("P1DLZ1","P",20,"TYP")
E
^SCR("P1DLZ1","P",45,"CRD")
6,50,N,1,0
^SCR("P1DLZ1","P",45,"HELP")
minelyzd lk - 0 , 4 - dtwd ,3 - `"k ,2 - wiy ,1 - onefn 
^SCR("P1DLZ1","P",45,"LMAX")
5
^SCR("P1DLZ1","P",45,"MUMPS1")

^SCR("P1DLZ1","P",45,"MUMPS2")
I ZTSH>5 S %SC("ER")=1
^SCR("P1DLZ1","P",45,"TYP")
N
^SCR("P1DLZ1","P",50,"CRD")
8,14,N,3,0
^SCR("P1DLZ1","P",50,"HELP")

^SCR("P1DLZ1","P",50,"LMAX")
3
^SCR("P1DLZ1","P",50,"MUMPS1")

^SCR("P1DLZ1","P",50,"MUMPS2")
D ^%L1BDO
^SCR("P1DLZ1","P",50,"TYP")
N
^SCR("P1DLZ1","P",55,"CRD")
10,14,N,3,0
^SCR("P1DLZ1","P",55,"HELP")

^SCR("P1DLZ1","P",55,"LMAX")
3
^SCR("P1DLZ1","P",55,"MUMPS1")

^SCR("P1DLZ1","P",55,"MUMPS2")
D ^%L1BDO
^SCR("P1DLZ1","P",55,"TYP")
N
^SCR("P1DLZ1","P","NAME","EHUD")
55
^SCR("P1DLZ1","P","NAME","NEW")
50
^SCR("P1DLZ1","P","NAME","ZSHAA1")
15
^SCR("P1DLZ1","P","NAME","ZSHAA2")
20
^SCR("P1DLZ1","P","NAME","ZTSH")
45
^SCR("P1DLZ1","P","NM",15)
ZSHAA1
^SCR("P1DLZ1","P","NM",20)
ZSHAA2
^SCR("P1DLZ1","P","NM",45)
ZTSH
^SCR("P1DLZ1","P","NM",50)
NEW
^SCR("P1DLZ1","P","NM",55)
EHUD
^SCR("P1DLZ1","P","RB",1)
3,10,13,70
^SCR("P1DMSH")
H
^SCR("P1DMSH",1)
               # dcear zery itl dcrqna zexy inc #                              
^SCR("P1DMSH",2)
                                                                               
^SCR("P1DMSH",3)
         {55: 2 - il`ix onf itl ,1 - dpnfd zgizt zry itl zexy inc zgwl         
^SCR("P1DMSH",4)
                                                                             1$
^SCR("P1DMSH",5)
   : zexy inc % :ogley beq xe`z :ogley beq: mei cr : mein : dry cr : dryn :    
^SCR("P1DMSH",6)
                                                                               
^SCR("P1DMSH",7)
                                                                               
^SCR("P1DMSH",8)
                                                                               
^SCR("P1DMSH",9)
                                                                               
^SCR("P1DMSH",10)
                                                                               
^SCR("P1DMSH",11)
                                                                               
^SCR("P1DMSH",12)
                                                                               
^SCR("P1DMSH",13)
                                                                               
^SCR("P1DMSH",14)
                                                                               
^SCR("P1DMSH",15)
                                                                               
^SCR("P1DMSH",16)
                                                                               
^SCR("P1DMSH",17)
                                                                               
^SCR("P1DMSH",18)
                                                                               
^SCR("P1DMSH",19)
                                                                               
^SCR("P1DMSH",20)
 $1                                                                            
^SCR("P1DMSH",21)
                                                                               
^SCR("P1DMSH","A",1)
„ƒ…�’š…’™‰”Œ„ƒ’‘Ž�š…˜™‰Žƒ
^SCR("P1DMSH","A",2)

^SCR("P1DMSH","A",3)
:2-‰Œ€‰˜�Ž†‰”Œ,1-„�Ž†„š‡‰š”š’™‰”Œš…˜™‰Žƒš‡—Œ
^SCR("P1DMSH","A",4)

^SCR("P1DMSH","A",5)
š…˜™‰Žƒ%�‡Œ…™‚…‘˜…€š�‡Œ…™‚…‘�…‰ƒ’�…‰Ž„’™ƒ’„’™Ž
^SCR("P1DMSH","A",6)
--------------------------------------------------------------------
^SCR("P1DMSH","A",7)

^SCR("P1DMSH","A",8)

^SCR("P1DMSH","A",9)

^SCR("P1DMSH","A",10)

^SCR("P1DMSH","A",11)

^SCR("P1DMSH","A",12)

^SCR("P1DMSH","A",13)

^SCR("P1DMSH","A",14)

^SCR("P1DMSH","A",15)

^SCR("P1DMSH","A",16)

^SCR("P1DMSH","A",17)

^SCR("P1DMSH","A",18)

^SCR("P1DMSH","A",19)

^SCR("P1DMSH","A",20)

^SCR("P1DMSH","A",21)

^SCR("P1DMSH","AV",1)
vsucg,ugahpkvsgxnc,urahns
^SCR("P1DMSH","AV",2)

^SCR("P1DMSH","AV",3)
:2-hkthrinzhpk'1-vbnzv,jh,p,gahpk,urahns,jek
^SCR("P1DMSH","AV",4)

^SCR("P1DMSH","AV",5)
,urahns%ijkuaduxrut,ijkuaduxouhsgouhnvgasgvgan
^SCR("P1DMSH","AV",6)
--------------------------------------------------------------------
^SCR("P1DMSH","AV",7)

^SCR("P1DMSH","AV",8)

^SCR("P1DMSH","AV",9)

^SCR("P1DMSH","AV",10)

^SCR("P1DMSH","AV",11)

^SCR("P1DMSH","AV",12)

^SCR("P1DMSH","AV",13)

^SCR("P1DMSH","AV",14)

^SCR("P1DMSH","AV",15)

^SCR("P1DMSH","AV",16)

^SCR("P1DMSH","AV",17)

^SCR("P1DMSH","AV",18)

^SCR("P1DMSH","AV",19)

^SCR("P1DMSH","AV",20)

^SCR("P1DMSH","AV",21)

^SCR("P1DMSH","G",1,"CRD")
6,74,T,5,0
^SCR("P1DMSH","G",1,"HELP")

^SCR("P1DMSH","G",1,"LMAX")
6
^SCR("P1DMSH","G",1,"MUMPS1")

^SCR("P1DMSH","G",1,"MUMPS2")
D SHAA^P1DMSH("MESHAA")
^SCR("P1DMSH","G",1,"SHEM")
 dryn 
^SCR("P1DMSH","G",1,"TYP")
T
^SCR("P1DMSH","G",2,"CRD")
6,67,T,5,0
^SCR("P1DMSH","G",2,"HELP")

^SCR("P1DMSH","G",2,"LMAX")
8
^SCR("P1DMSH","G",2,"MUMPS1")

^SCR("P1DMSH","G",2,"MUMPS2")
D SHAA^P1DMSH("ADSHAA")
^SCR("P1DMSH","G",2,"SHEM")
 dry cr 
^SCR("P1DMSH","G",2,"TYP")
T
^SCR("P1DMSH","G",3,"CRD")
6,58,N,1,0
^SCR("P1DMSH","G",3,"HELP")

^SCR("P1DMSH","G",3,"LMAX")
6
^SCR("P1DMSH","G",3,"MUMPS1")
D JOM0^P1DMSH
^SCR("P1DMSH","G",3,"MUMPS2")
D JOM^P1DMSH("MEJOM")
^SCR("P1DMSH","G",3,"SHEM")
 mein 
^SCR("P1DMSH","G",3,"TYP")
N
^SCR("P1DMSH","G",4,"CRD")
6,51,N,1,0
^SCR("P1DMSH","G",4,"HELP")

^SCR("P1DMSH","G",4,"LMAX")
8
^SCR("P1DMSH","G",4,"MUMPS1")
D JOM0^P1DMSH
^SCR("P1DMSH","G",4,"MUMPS2")
D JOM^P1DMSH("ADJOM")
^SCR("P1DMSH","G",4,"SHEM")
 mei cr 
^SCR("P1DMSH","G",4,"TYP")
N
^SCR("P1DMSH","G",5,"CRD")
6,42,E,2,0
^SCR("P1DMSH","G",5,"FNC")

^SCR("P1DMSH","G",5,"GLOB")
SUGS
^SCR("P1DMSH","G",5,"HELP")

^SCR("P1DMSH","G",5,"LMAX")
9
^SCR("P1DMSH","G",5,"MUMPS1")

^SCR("P1DMSH","G",5,"MUMPS2")

^SCR("P1DMSH","G",5,"NLN")
20
^SCR("P1DMSH","G",5,"RZD")
\
^SCR("P1DMSH","G",5,"SHEM")
ogley beq
^SCR("P1DMSH","G",5,"TOPB")
8
^SCR("P1DMSH","G",5,"TYP")
E
^SCR("P1DMSH","G",5,"VRB")
SUGS1
^SCR("P1DMSH","G",6,"CRD")
6,32,H,12,0
^SCR("P1DMSH","G",6,"HELP")

^SCR("P1DMSH","G",6,"LMAX")
15
^SCR("P1DMSH","G",6,"MUMPS1")

^SCR("P1DMSH","G",6,"MUMPS2")

^SCR("P1DMSH","G",6,"OUTPUT")

^SCR("P1DMSH","G",6,"SHEM")
ogley beq xe`z 
^SCR("P1DMSH","G",6,"TYP")
H
^SCR("P1DMSH","G",7,"CRD")
6,16,N,5,2
^SCR("P1DMSH","G",7,"HELP")

^SCR("P1DMSH","G",7,"LMAX")
12
^SCR("P1DMSH","G",7,"MUMPS1")

^SCR("P1DMSH","G",7,"MUMPS2")

^SCR("P1DMSH","G",7,"SHEM")
 zexy inc % 
^SCR("P1DMSH","G",7,"TYP")
N
^SCR("P1DMSH","G","DEL")
Y
^SCR("P1DMSH","G","MAX")
9999
^SCR("P1DMSH","G","NAME","ADJOM")
4
^SCR("P1DMSH","G","NAME","ADSHAA")
2
^SCR("P1DMSH","G","NAME","AHDM")
7
^SCR("P1DMSH","G","NAME","MEJOM")
3
^SCR("P1DMSH","G","NAME","MESHAA")
1
^SCR("P1DMSH","G","NAME","SUGS")
5
^SCR("P1DMSH","G","NAME","SUGS1")
6
^SCR("P1DMSH","G","NM",1)
MESHAA
^SCR("P1DMSH","G","NM",2)
ADSHAA
^SCR("P1DMSH","G","NM",3)
MEJOM
^SCR("P1DMSH","G","NM",4)
ADJOM
^SCR("P1DMSH","G","NM",5)
SUGS
^SCR("P1DMSH","G","NM",6)
SUGS1
^SCR("P1DMSH","G","NM",7)
AHDM
^SCR("P1DMSH","G","RB")
5,2,21,79
^SCR("P1DMSH","G","REF")
^TEMP($P
^SCR("P1DMSH","G","RZD")
\
^SCR("P1DMSH","G","STEP")
2
^SCR("P1DMSH","G","STG")
   : zexy inc % :ogley beq xe`z :ogley beq: mei cr : mein : dry cr : dryn :    
^SCR("P1DMSH","G","VG")
7
^SCR("P1DMSH","NAME")
4
^SCR("P1DMSH","P",55,"CRD")
3,9,N,1,0
^SCR("P1DMSH","P",55,"HELP")

^SCR("P1DMSH","P",55,"LMAX")
3
^SCR("P1DMSH","P",55,"MUMPS1")
D HNHTIM0^P1DMSH
^SCR("P1DMSH","P",55,"MUMPS2")
I %S'=1,%S'=2 S %SC("ER")=1
^SCR("P1DMSH","P",55,"TYP")
N
^SCR("P1DMSH","P","NAME","HNHTIM")
55
^SCR("P1DMSH","P","NM",55)
HNHTIM
^SCR("P1DMVC")
H
^SCR("P1DMVC",1)
                            {                      10}{05    }:gewl 'qn        
^SCR("P1DMVC",2)
                                       {15    }:(itqk rvana) zeipw mekq        
^SCR("P1DMVC",3)
                                                                       1$      
^SCR("P1DMVC",4)
                  :zeipw zenk :dxey:rvan:    hixt xe`z    :hixt cew :          
^SCR("P1DMVC",5)
                                                                               
^SCR("P1DMVC",6)
                                                                               
^SCR("P1DMVC",7)
                                                                               
^SCR("P1DMVC",8)
                                                                               
^SCR("P1DMVC",9)
                                                                               
^SCR("P1DMVC",10)
                                                                               
^SCR("P1DMVC",11)
                                                                               
^SCR("P1DMVC",12)
                                                                               
^SCR("P1DMVC",13)
                                                                               
^SCR("P1DMVC",14)
                                                                               
^SCR("P1DMVC",15)
                                                                               
^SCR("P1DMVC",16)
                                                                               
^SCR("P1DMVC",17)
                                                                               
^SCR("P1DMVC",18)
                                                                               
^SCR("P1DMVC",19)
                                                                               
^SCR("P1DMVC",20)
                                                                               
^SCR("P1DMVC",21)
              $1                                                               
^SCR("P1DMVC","A",1)
:‡…—Œ'‘Ž
^SCR("P1DMVC","A",2)
:(‰”‘‹’–�Ž�)š…‰�—�…‹‘
^SCR("P1DMVC","A",3)

^SCR("P1DMVC","A",4)
š…‰�—š…Ž‹„˜…™’–�Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1DMVC","A",5)
---------------------------------------------
^SCR("P1DMVC","A",6)

^SCR("P1DMVC","A",7)

^SCR("P1DMVC","A",8)

^SCR("P1DMVC","A",9)

^SCR("P1DMVC","A",10)

^SCR("P1DMVC","A",11)

^SCR("P1DMVC","A",12)

^SCR("P1DMVC","A",13)

^SCR("P1DMVC","A",14)

^SCR("P1DMVC","A",15)

^SCR("P1DMVC","A",16)

^SCR("P1DMVC","A",17)

^SCR("P1DMVC","A",18)

^SCR("P1DMVC","A",19)

^SCR("P1DMVC","A",20)

^SCR("P1DMVC","A",21)

^SCR("P1DMVC","AV",1)
:juekwxn
^SCR("P1DMVC","AV",2)
:(hpxfgmcnc),uhbeoufx
^SCR("P1DMVC","AV",3)

^SCR("P1DMVC","AV",4)
,uhbe,unfvruagmcnyhrprut,yhrpsue
^SCR("P1DMVC","AV",5)
---------------------------------------------
^SCR("P1DMVC","AV",6)

^SCR("P1DMVC","AV",7)

^SCR("P1DMVC","AV",8)

^SCR("P1DMVC","AV",9)

^SCR("P1DMVC","AV",10)

^SCR("P1DMVC","AV",11)

^SCR("P1DMVC","AV",12)

^SCR("P1DMVC","AV",13)

^SCR("P1DMVC","AV",14)

^SCR("P1DMVC","AV",15)

^SCR("P1DMVC","AV",16)

^SCR("P1DMVC","AV",17)

^SCR("P1DMVC","AV",18)

^SCR("P1DMVC","AV",19)

^SCR("P1DMVC","AV",20)

^SCR("P1DMVC","AV",21)

^SCR("P1DMVC","G",1,"CRD")
5,68,E,6,0
^SCR("P1DMVC","G",1,"HELP")

^SCR("P1DMVC","G",1,"LMAX")
9
^SCR("P1DMVC","G",1,"MUMPS1")

^SCR("P1DMVC","G",1,"MUMPS2")

^SCR("P1DMVC","G",1,"OUTPUT")

^SCR("P1DMVC","G",1,"SHEM")
hixt cew 
^SCR("P1DMVC","G",1,"TYP")
E
^SCR("P1DMVC","G",2,"CRD")
5,58,H,17,0
^SCR("P1DMVC","G",2,"HELP")

^SCR("P1DMVC","G",2,"LMAX")
17
^SCR("P1DMVC","G",2,"MUMPS1")

^SCR("P1DMVC","G",2,"MUMPS2")

^SCR("P1DMVC","G",2,"OUTPUT")

^SCR("P1DMVC","G",2,"SHEM")
    hixt xe`z    
^SCR("P1DMVC","G",2,"TYP")
H
^SCR("P1DMVC","G",3,"CRD")
5,40,N,2,0
^SCR("P1DMVC","G",3,"HELP")

^SCR("P1DMVC","G",3,"LMAX")
4
^SCR("P1DMVC","G",3,"MUMPS1")

^SCR("P1DMVC","G",3,"MUMPS2")

^SCR("P1DMVC","G",3,"OUTPUT")

^SCR("P1DMVC","G",3,"SHEM")
rvan
^SCR("P1DMVC","G",3,"TYP")
N
^SCR("P1DMVC","G",4,"CRD")
5,35,E,3,0
^SCR("P1DMVC","G",4,"HELP")

^SCR("P1DMVC","G",4,"LMAX")
4
^SCR("P1DMVC","G",4,"MUMPS1")

^SCR("P1DMVC","G",4,"MUMPS2")

^SCR("P1DMVC","G",4,"MUST")

^SCR("P1DMVC","G",4,"OUTPUT")

^SCR("P1DMVC","G",4,"SHEM")
dxey
^SCR("P1DMVC","G",4,"TYP")
E
^SCR("P1DMVC","G",5,"CRD")
5,30,N,4,0
^SCR("P1DMVC","G",5,"HELP")
<F9> - miivan zbvd
^SCR("P1DMVC","G",5,"LMAX")
11
^SCR("P1DMVC","G",5,"MUMPS1")

^SCR("P1DMVC","G",5,"MUMPS2")
I %OLDTO="F9" D HZGMVC^P1DMVC S %SC("ST")=1 D A^%L1SC
^SCR("P1DMVC","G",5,"SHEM")
zeipw zenk 
^SCR("P1DMVC","G",5,"TYP")
N
^SCR("P1DMVC","G","MAX")
1
^SCR("P1DMVC","G","NAME","KAMK")
5
^SCR("P1DMVC","G","NAME","MVC")
3
^SCR("P1DMVC","G","NAME","PAR")
1
^SCR("P1DMVC","G","NAME","PAR1")
2
^SCR("P1DMVC","G","NAME","SHURA")
4
^SCR("P1DMVC","G","NM",1)
PAR
^SCR("P1DMVC","G","NM",2)
PAR1
^SCR("P1DMVC","G","NM",3)
MVC
^SCR("P1DMVC","G","NM",4)
SHURA
^SCR("P1DMVC","G","NM",5)
KAMK
^SCR("P1DMVC","G","RB")
4,15,22,73
^SCR("P1DMVC","G","REF")
^TEMPC($P
^SCR("P1DMVC","G","RZD")
\
^SCR("P1DMVC","G","STEP")
1
^SCR("P1DMVC","G","STG")
                  :zeipw zenk :dxey:rvan:    hixt xe`z    :hixt cew :          
^SCR("P1DMVC","G","VG")
6
^SCR("P1DMVC","NAME")
rvana zeipw lr g"ec
^SCR("P1DMVC","P",5,"CHECK")
Y
^SCR("P1DMVC","P",5,"CRD")
1,54,E,7,0
^SCR("P1DMVC","P",5,"FNC")

^SCR("P1DMVC","P",5,"GLOB")
LKH
^SCR("P1DMVC","P",5,"HELP")

^SCR("P1DMVC","P",5,"LMAX")
7
^SCR("P1DMVC","P",5,"MUMPS1")

^SCR("P1DMVC","P",5,"MUMPS2")

^SCR("P1DMVC","P",5,"MUST")

^SCR("P1DMVC","P",5,"NLN")
20
^SCR("P1DMVC","P",5,"RZD")
\
^SCR("P1DMVC","P",5,"TOPB")
8
^SCR("P1DMVC","P",5,"TYP")
E
^SCR("P1DMVC","P",5,"VRB")
LKH1
^SCR("P1DMVC","P",10,"CRD")
1,54,H,25
^SCR("P1DMVC","P",10,"HELP")

^SCR("P1DMVC","P",10,"LMAX")
25
^SCR("P1DMVC","P",10,"MUMPS1")

^SCR("P1DMVC","P",10,"MUMPS2")

^SCR("P1DMVC","P",10,"OUTPUT")

^SCR("P1DMVC","P",10,"TYP")
H
^SCR("P1DMVC","P",15,"CRD")
2,39,N,7,2
^SCR("P1DMVC","P",15,"HELP")

^SCR("P1DMVC","P",15,"LMAX")
7
^SCR("P1DMVC","P",15,"MUMPS1")

^SCR("P1DMVC","P",15,"MUMPS2")

^SCR("P1DMVC","P",15,"TYP")
N
^SCR("P1DMVC","P","NAME","LKH")
5
^SCR("P1DMVC","P","NAME","LKH1")
10
^SCR("P1DMVC","P","NAME","SHUM")
15
^SCR("P1DMVC","P","NM",5)
LKH
^SCR("P1DMVC","P","NM",10)
LKH1
^SCR("P1DMVC","P","NM",15)
SHUM
^SCR("P1DP1")
H
^SCR("P1DP1",1)
    #{                        01} mihixt g"ec #                                
^SCR("P1DP1",2)
                   {10      } jix`z cr    {05      } jix`zn                    
^SCR("P1DP1",3)
     {12: 5- rvan ihixt , 4- ccea hixt ,3- dveaw , 2- mihixtd lk , 1 - hq itl  
^SCR("P1DP1",4)
 {                 36} {35 :mihixt zveaw      {                31} {30:'qn hq  
^SCR("P1DP1",5)
     {               17}{16    }:hixt cr      {              14}{13   }:hixtn  
^SCR("P1DP1",6)
                                                                             1$
^SCR("P1DP1",7)
 :  %  :  dxrd  :oexg` xign:ehp mekq: dgpd :zenk:      hixt xe`z    :hixt cew: 
^SCR("P1DP1",8)
                                                                               
^SCR("P1DP1",9)
                                                                               
^SCR("P1DP1",10)
                                                                               
^SCR("P1DP1",11)
                                                                               
^SCR("P1DP1",12)
                                                                               
^SCR("P1DP1",13)
                                                                               
^SCR("P1DP1",14)
                                                                               
^SCR("P1DP1",15)
                                                                               
^SCR("P1DP1",16)
                                                                               
^SCR("P1DP1",17)
                                                                               
^SCR("P1DP1",18)
                                                                               
^SCR("P1DP1",19)
                                                                               
^SCR("P1DP1",20)
                                                                               
^SCR("P1DP1",21)
 $1                                                                            
^SCR("P1DP1",22)
            {20      }: mekq   {18    }:hixtl zegpd k"dq  {15     }:zenk k"dq  
^SCR("P1DP1",23)
                   {45    }: ehp zenk    {40      }: mekqa {25    }:   zeiwqr  
^SCR("P1DP1","A",1)
�‰ˆ‰˜”‡"…ƒ
^SCR("P1DP1","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("P1DP1","A",3)
:5-’–�Ž‰ˆ‰˜”,4-ƒƒ…�ˆ‰˜”,3-„–…�—,2-�‰ˆ‰˜”„Œ‹,1-ˆ‘‰”Œ
^SCR("P1DP1","A",4)
:�‰ˆ‰˜”š–…�—:'‘Žˆ‘
^SCR("P1DP1","A",5)
:ˆ‰˜”ƒ’:ˆ‰˜”Ž
^SCR("P1DP1","A",6)

^SCR("P1DP1","A",7)
%„˜’„�…˜‡€˜‰‡Ž…ˆ��…‹‘„‡�„š…Ž‹ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1DP1","A",8)
---------------------------------------------------------------------
^SCR("P1DP1","A",9)

^SCR("P1DP1","A",10)

^SCR("P1DP1","A",11)

^SCR("P1DP1","A",12)

^SCR("P1DP1","A",13)

^SCR("P1DP1","A",14)

^SCR("P1DP1","A",15)

^SCR("P1DP1","A",16)

^SCR("P1DP1","A",17)

^SCR("P1DP1","A",18)

^SCR("P1DP1","A",19)

^SCR("P1DP1","A",20)

^SCR("P1DP1","A",21)

^SCR("P1DP1","A",22)
:�…‹‘:ˆ‰˜”Œš…‡�„‹"„‘:š…Ž‹‹"„‘
^SCR("P1DP1","A",23)
:…ˆ�š…Ž‹:�…‹‘�:š…‰—‘’
^SCR("P1DP1","AV",1)
ohyhrpj"us
^SCR("P1DP1","AV",2)
lhrt,sglhrt,n
^SCR("P1DP1","AV",3)
:5-gmcnhyhrp'4-ssucyhrp'3-vmuce'2-ohyhrpvkf'1-yxhpk
^SCR("P1DP1","AV",4)
:ohyhrp,muce:wxnyx
^SCR("P1DP1","AV",5)
:yhrpsg:yhrpn
^SCR("P1DP1","AV",6)

^SCR("P1DP1","AV",7)
%vrgviurjtrhjnuyboufxvjbv,unfyhrprut,yhrpsue
^SCR("P1DP1","AV",8)
---------------------------------------------------------------------
^SCR("P1DP1","AV",9)

^SCR("P1DP1","AV",10)

^SCR("P1DP1","AV",11)

^SCR("P1DP1","AV",12)

^SCR("P1DP1","AV",13)

^SCR("P1DP1","AV",14)

^SCR("P1DP1","AV",15)

^SCR("P1DP1","AV",16)

^SCR("P1DP1","AV",17)

^SCR("P1DP1","AV",18)

^SCR("P1DP1","AV",19)

^SCR("P1DP1","AV",20)

^SCR("P1DP1","AV",21)

^SCR("P1DP1","AV",22)
:oufx:yhrpk,ujbvf"vx:,unff"vx
^SCR("P1DP1","AV",23)
:uyb,unf:oufxc:,uhexg
^SCR("P1DP1","G",1,"CHECK")
Y
^SCR("P1DP1","G",1,"CRD")
8,77,E,6,0
^SCR("P1DP1","G",1,"FNC")

^SCR("P1DP1","G",1,"GLOB")
PAR
^SCR("P1DP1","G",1,"HELP")

^SCR("P1DP1","G",1,"LMAX")
8
^SCR("P1DP1","G",1,"MUMPS1")

^SCR("P1DP1","G",1,"MUMPS2")
D PAR^P1DP1
^SCR("P1DP1","G",1,"MUST")

^SCR("P1DP1","G",1,"NLN")
20
^SCR("P1DP1","G",1,"RZD")
**
^SCR("P1DP1","G",1,"SHEM")
hixt cew
^SCR("P1DP1","G",1,"TOPB")
8
^SCR("P1DP1","G",1,"TYP")
E
^SCR("P1DP1","G",1,"VRB")
PAR1
^SCR("P1DP1","G",2,"CRD")
8,68,H,18,0
^SCR("P1DP1","G",2,"HELP")

^SCR("P1DP1","G",2,"LMAX")
19
^SCR("P1DP1","G",2,"MUMPS1")

^SCR("P1DP1","G",2,"MUMPS2")

^SCR("P1DP1","G",2,"OUTPUT")

^SCR("P1DP1","G",2,"SHEM")
      hixt xe`z    
^SCR("P1DP1","G",2,"TYP")
H
^SCR("P1DP1","G",3,"CRD")
8,48,E,4,0
^SCR("P1DP1","G",3,"HELP")

^SCR("P1DP1","G",3,"LMAX")
4
^SCR("P1DP1","G",3,"MUMPS1")

^SCR("P1DP1","G",3,"MUMPS2")

^SCR("P1DP1","G",3,"OUTPUT")

^SCR("P1DP1","G",3,"SHEM")
zenk
^SCR("P1DP1","G",3,"TYP")
E
^SCR("P1DP1","G",4,"CRD")
8,43,N,6,2
^SCR("P1DP1","G",4,"HELP")

^SCR("P1DP1","G",4,"LMAX")
6
^SCR("P1DP1","G",4,"MUMPS1")

^SCR("P1DP1","G",4,"MUMPS2")

^SCR("P1DP1","G",4,"OUTPUT")

^SCR("P1DP1","G",4,"SHEM")
 dgpd 
^SCR("P1DP1","G",4,"TYP")
N
^SCR("P1DP1","G",5,"CRD")
8,36,N,8,2
^SCR("P1DP1","G",5,"HELP")

^SCR("P1DP1","G",5,"LMAX")
8
^SCR("P1DP1","G",5,"MUMPS1")

^SCR("P1DP1","G",5,"MUMPS2")

^SCR("P1DP1","G",5,"OUTPUT")

^SCR("P1DP1","G",5,"SHEM")
ehp mekq
^SCR("P1DP1","G",5,"TYP")
N
^SCR("P1DP1","G",6,"CRD")
8,27,N,7,2
^SCR("P1DP1","G",6,"HELP")

^SCR("P1DP1","G",6,"LMAX")
10
^SCR("P1DP1","G",6,"MUMPS1")

^SCR("P1DP1","G",6,"MUMPS2")

^SCR("P1DP1","G",6,"OUTPUT")

^SCR("P1DP1","G",6,"SHEM")
oexg` xign
^SCR("P1DP1","G",6,"TYP")
N
^SCR("P1DP1","G",7,"CRD")
8,16,H,8,0
^SCR("P1DP1","G",7,"HELP")

^SCR("P1DP1","G",7,"LMAX")
8
^SCR("P1DP1","G",7,"MUMPS1")

^SCR("P1DP1","G",7,"MUMPS2")

^SCR("P1DP1","G",7,"OUTPUT")

^SCR("P1DP1","G",7,"SHEM")
  dxrd  
^SCR("P1DP1","G",7,"TYP")
H
^SCR("P1DP1","G",8,"CRD")
8,7,N,5,2
^SCR("P1DP1","G",8,"HELP")

^SCR("P1DP1","G",8,"LMAX")
5
^SCR("P1DP1","G",8,"MUMPS1")

^SCR("P1DP1","G",8,"MUMPS2")

^SCR("P1DP1","G",8,"OUTPUT")

^SCR("P1DP1","G",8,"SHEM")
  %  
^SCR("P1DP1","G",8,"TYP")
N
^SCR("P1DP1","G","DEL")
Y
^SCR("P1DP1","G","MAX")
99999
^SCR("P1DP1","G","NAME","AHUZ")
8
^SCR("P1DP1","G","NAME","HN")
4
^SCR("P1DP1","G","NAME","HRPRT")
7
^SCR("P1DP1","G","NAME","KAM")
3
^SCR("P1DP1","G","NAME","MH")
6
^SCR("P1DP1","G","NAME","PAR")
1
^SCR("P1DP1","G","NAME","PAR1")
2
^SCR("P1DP1","G","NAME","SUM")
5
^SCR("P1DP1","G","NM",1)
PAR
^SCR("P1DP1","G","NM",2)
PAR1
^SCR("P1DP1","G","NM",3)
KAM
^SCR("P1DP1","G","NM",4)
HN
^SCR("P1DP1","G","NM",5)
SUM
^SCR("P1DP1","G","NM",6)
MH
^SCR("P1DP1","G","NM",7)
HRPRT
^SCR("P1DP1","G","NM",8)
AHUZ
^SCR("P1DP1","G","RB")
7,2,22,79
^SCR("P1DP1","G","REF")
^TEMP($P
^SCR("P1DP1","G","RZD")
\
^SCR("P1DP1","G","STEP")
1
^SCR("P1DP1","G","STG")
 :  %  :  dxrd  :oexg` xign:ehp mekq: dgpd :zenk:      hixt xe`z    :hixt cew: 
^SCR("P1DP1","G","VG")
9
^SCR("P1DP1","NAME")

^SCR("P1DP1","P",1,"CRD")
1,33,H,25
^SCR("P1DP1","P",1,"HELP")

^SCR("P1DP1","P",1,"LMAX")
27
^SCR("P1DP1","P",1,"MUMPS1")

^SCR("P1DP1","P",1,"MUMPS2")

^SCR("P1DP1","P",1,"OUTPUT")

^SCR("P1DP1","P",1,"TYP")
H
^SCR("P1DP1","P",5,"CRD")
2,42,D,8,0
^SCR("P1DP1","P",5,"HELP")

^SCR("P1DP1","P",5,"LMAX")
9
^SCR("P1DP1","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($S($G(P1DZ):P1DZ,1:+$H),1) K %L1NMB("ALB")
^SCR("P1DP1","P",5,"MUMPS2")

^SCR("P1DP1","P",5,"TYP")
D
^SCR("P1DP1","P",10,"CRD")
2,19,D,8,0
^SCR("P1DP1","P",10,"HELP")

^SCR("P1DP1","P",10,"LMAX")
9
^SCR("P1DP1","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1DP1","P",10,"MUMPS2")
D TV1^P1HZGDAT(DAT1,DAT2)
^SCR("P1DP1","P",10,"TYP")
D
^SCR("P1DP1","P",12,"CRD")
3,5,E,1,0
^SCR("P1DP1","P",12,"HELP")
'g"ecl mihixt hq' divte` , ze`laha xcben zedil xen` mihixt hq  
^SCR("P1DP1","P",12,"LMAX")
3
^SCR("P1DP1","P",12,"MUMPS1")
S:'$G(SET) SET=2
^SCR("P1DP1","P",12,"MUMPS2")
I SET'=1,SET'=2,SET'=3,SET'=4,SET'=5 S %SC("ER")=1
^SCR("P1DP1","P",12,"MUST")

^SCR("P1DP1","P",12,"TYP")
E
^SCR("P1DP1","P",13,"CRD")
5,64,E,6,0
^SCR("P1DP1","P",13,"FNC")

^SCR("P1DP1","P",13,"GLOB")
PAR
^SCR("P1DP1","P",13,"HELP")

^SCR("P1DP1","P",13,"LMAX")
6
^SCR("P1DP1","P",13,"MUMPS1")

^SCR("P1DP1","P",13,"MUMPS2")

^SCR("P1DP1","P",13,"NLN")
20
^SCR("P1DP1","P",13,"RZD")
**
^SCR("P1DP1","P",13,"TOPB")
8
^SCR("P1DP1","P",13,"TYP")
E
^SCR("P1DP1","P",13,"VRB")
MEPAR1
^SCR("P1DP1","P",14,"CRD")
5,64,H,17
^SCR("P1DP1","P",14,"HELP")

^SCR("P1DP1","P",14,"LMAX")
17
^SCR("P1DP1","P",14,"MUMPS1")

^SCR("P1DP1","P",14,"MUMPS2")

^SCR("P1DP1","P",14,"OUTPUT")

^SCR("P1DP1","P",14,"TYP")
H
^SCR("P1DP1","P",15,"CRD")
22,58,N,8,1
^SCR("P1DP1","P",15,"HELP")

^SCR("P1DP1","P",15,"LMAX")
8
^SCR("P1DP1","P",15,"MUMPS1")

^SCR("P1DP1","P",15,"MUMPS2")

^SCR("P1DP1","P",15,"OUTPUT")

^SCR("P1DP1","P",15,"TYP")
N
^SCR("P1DP1","P",16,"CRD")
5,24,E,7,0
^SCR("P1DP1","P",16,"FNC")

^SCR("P1DP1","P",16,"GLOB")
PAR
^SCR("P1DP1","P",16,"HELP")

^SCR("P1DP1","P",16,"LMAX")
7
^SCR("P1DP1","P",16,"MUMPS1")

^SCR("P1DP1","P",16,"MUMPS2")

^SCR("P1DP1","P",16,"NLN")
20
^SCR("P1DP1","P",16,"RZD")
**
^SCR("P1DP1","P",16,"TOPB")
8
^SCR("P1DP1","P",16,"TYP")
E
^SCR("P1DP1","P",16,"VRB")
ADPAR1
^SCR("P1DP1","P",17,"CRD")
5,24,H,18,0
^SCR("P1DP1","P",17,"HELP")

^SCR("P1DP1","P",17,"LMAX")
18
^SCR("P1DP1","P",17,"MUMPS1")

^SCR("P1DP1","P",17,"MUMPS2")

^SCR("P1DP1","P",17,"OUTPUT")

^SCR("P1DP1","P",17,"TYP")
H
^SCR("P1DP1","P",18,"CRD")
22,31,N,7,2
^SCR("P1DP1","P",18,"HELP")

^SCR("P1DP1","P",18,"LMAX")
7
^SCR("P1DP1","P",18,"MUMPS1")

^SCR("P1DP1","P",18,"MUMPS2")

^SCR("P1DP1","P",18,"OUTPUT")

^SCR("P1DP1","P",18,"TYP")
N
^SCR("P1DP1","P",20,"CRD")
22,12,N,9,2
^SCR("P1DP1","P",20,"HELP")

^SCR("P1DP1","P",20,"LMAX")
9
^SCR("P1DP1","P",20,"MUMPS1")

^SCR("P1DP1","P",20,"MUMPS2")

^SCR("P1DP1","P",20,"OUTPUT")

^SCR("P1DP1","P",20,"TYP")
N
^SCR("P1DP1","P",25,"CRD")
23,59,N,7,0
^SCR("P1DP1","P",25,"HELP")

^SCR("P1DP1","P",25,"LMAX")
7
^SCR("P1DP1","P",25,"MUMPS1")

^SCR("P1DP1","P",25,"MUMPS2")

^SCR("P1DP1","P",25,"OUTPUT")

^SCR("P1DP1","P",25,"TYP")
N
^SCR("P1DP1","P",30,"CRD")
4,67,N,2,0
^SCR("P1DP1","P",30,"FNC")

^SCR("P1DP1","P",30,"GLOB")
P1SET
^SCR("P1DP1","P",30,"HELP")

^SCR("P1DP1","P",30,"LMAX")
3
^SCR("P1DP1","P",30,"MUMPS1")

^SCR("P1DP1","P",30,"MUMPS2")
I NS<1 S %SC("ER")=1
^SCR("P1DP1","P",30,"MUST")

^SCR("P1DP1","P",30,"NLN")
20
^SCR("P1DP1","P",30,"RZD")
\
^SCR("P1DP1","P",30,"TOPB")
8
^SCR("P1DP1","P",30,"TYP")
N
^SCR("P1DP1","P",30,"VRB")
NS1
^SCR("P1DP1","P",31,"CRD")
4,66,H,19
^SCR("P1DP1","P",31,"HELP")

^SCR("P1DP1","P",31,"LMAX")
19
^SCR("P1DP1","P",31,"MUMPS1")

^SCR("P1DP1","P",31,"MUMPS2")

^SCR("P1DP1","P",31,"OUTPUT")

^SCR("P1DP1","P",31,"TYP")
H
^SCR("P1DP1","P",35,"CRD")
4,23,N,4,0
^SCR("P1DP1","P",35,"FNC")

^SCR("P1DP1","P",35,"GLOB")
PARSUG
^SCR("P1DP1","P",35,"HELP")

^SCR("P1DP1","P",35,"LMAX")
4
^SCR("P1DP1","P",35,"MUMPS1")

^SCR("P1DP1","P",35,"MUMPS2")

^SCR("P1DP1","P",35,"MUST")

^SCR("P1DP1","P",35,"NLN")
20
^SCR("P1DP1","P",35,"RZD")
\
^SCR("P1DP1","P",35,"TOPB")
8
^SCR("P1DP1","P",35,"TYP")
N
^SCR("P1DP1","P",35,"VRB")
SUGP1
^SCR("P1DP1","P",36,"CRD")
4,22,H,20
^SCR("P1DP1","P",36,"HELP")

^SCR("P1DP1","P",36,"LMAX")
20
^SCR("P1DP1","P",36,"MUMPS1")

^SCR("P1DP1","P",36,"MUMPS2")

^SCR("P1DP1","P",36,"OUTPUT")

^SCR("P1DP1","P",36,"TYP")
H
^SCR("P1DP1","P",40,"CRD")
23,41,N,9,2
^SCR("P1DP1","P",40,"HELP")

^SCR("P1DP1","P",40,"LMAX")
9
^SCR("P1DP1","P",40,"MUMPS1")

^SCR("P1DP1","P",40,"MUMPS2")

^SCR("P1DP1","P",40,"OUTPUT")

^SCR("P1DP1","P",40,"TYP")
N
^SCR("P1DP1","P",45,"CRD")
23,19,N,7,1
^SCR("P1DP1","P",45,"HELP")

^SCR("P1DP1","P",45,"LMAX")
7
^SCR("P1DP1","P",45,"MUMPS1")

^SCR("P1DP1","P",45,"MUMPS2")

^SCR("P1DP1","P",45,"OUTPUT")

^SCR("P1DP1","P",45,"TYP")
N
^SCR("P1DP1","P","NAME","ADPAR")
16
^SCR("P1DP1","P","NAME","ADPAR1")
17
^SCR("P1DP1","P","NAME","CAI")
25
^SCR("P1DP1","P","NAME","CNT")
45
^SCR("P1DP1","P","NAME","DAT1")
5
^SCR("P1DP1","P","NAME","DAT2")
10
^SCR("P1DP1","P","NAME","MEPAR")
13
^SCR("P1DP1","P","NAME","MEPAR1")
14
^SCR("P1DP1","P","NAME","NS")
30
^SCR("P1DP1","P","NAME","NS1")
31
^SCR("P1DP1","P","NAME","SAI")
40
^SCR("P1DP1","P","NAME","SET")
12
^SCR("P1DP1","P","NAME","SHUM")
20
^SCR("P1DP1","P","NAME","SUGDOH")
1
^SCR("P1DP1","P","NAME","SUGP")
35
^SCR("P1DP1","P","NAME","SUGP1")
36
^SCR("P1DP1","P","NAME","SUMHN")
18
^SCR("P1DP1","P","NAME","SUMK")
15
^SCR("P1DP1","P","NM",1)
SUGDOH
^SCR("P1DP1","P","NM",5)
DAT1
^SCR("P1DP1","P","NM",10)
DAT2
^SCR("P1DP1","P","NM",12)
SET
^SCR("P1DP1","P","NM",13)
MEPAR
^SCR("P1DP1","P","NM",14)
MEPAR1
^SCR("P1DP1","P","NM",15)
SUMK
^SCR("P1DP1","P","NM",16)
ADPAR
^SCR("P1DP1","P","NM",17)
ADPAR1
^SCR("P1DP1","P","NM",18)
SUMHN
^SCR("P1DP1","P","NM",20)
SHUM
^SCR("P1DP1","P","NM",25)
CAI
^SCR("P1DP1","P","NM",30)
NS
^SCR("P1DP1","P","NM",31)
NS1
^SCR("P1DP1","P","NM",35)
SUGP
^SCR("P1DP1","P","NM",36)
SUGP1
^SCR("P1DP1","P","NM",40)
SAI
^SCR("P1DP1","P","NM",45)
CNT
^SCR("P1DP1T")
H
^SCR("P1DP1T",1)
    #{                        01} mihixt g"ec #                                
^SCR("P1DP1T",2)
                   {10      } jix`z cr    {05      } jix`zn                    
^SCR("P1DP1T",3)
     {12: 5- rvan ihixt , 4- ccea hixt ,3- dveaw , 2- mihixtd lk , 1 - hq itl  
^SCR("P1DP1T",4)
 {                 36} {35 :mihixt zveaw      {                31} {30:'qn hq  
^SCR("P1DP1T",5)
     {               17}{16    }:hixt cr      {              14}{13   }:hixtn  
^SCR("P1DP1T",6)
                                                                             1$
^SCR("P1DP1T",7)
 :  %  :  dxrd  :oexg` xign:ehp mekq: dgpd :zenk:      hixt xe`z    :hixt cew: 
^SCR("P1DP1T",8)
                                                                               
^SCR("P1DP1T",9)
                                                                               
^SCR("P1DP1T",10)
                                                                               
^SCR("P1DP1T",11)
                                                                               
^SCR("P1DP1T",12)
                                                                               
^SCR("P1DP1T",13)
                                                                               
^SCR("P1DP1T",14)
                                                                               
^SCR("P1DP1T",15)
                                                                               
^SCR("P1DP1T",16)
                                                                               
^SCR("P1DP1T",17)
                                                                               
^SCR("P1DP1T",18)
 $1                                                                            
^SCR("P1DP1T",19)
            {20      }: mekq   {18    }:hixtl zegpd k"dq  {15     }:zenk k"dq  
^SCR("P1DP1T",20)
                   {45    }: ehp zenk    {40      }: mekqa {25    }:   zeiwqr  
^SCR("P1DP1T","A",1)
�‰ˆ‰˜”‡"…ƒ
^SCR("P1DP1T","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("P1DP1T","A",3)
:5-’–�Ž‰ˆ‰˜”,4-ƒƒ…�ˆ‰˜”,3-„–…�—,2-�‰ˆ‰˜”„Œ‹,1-ˆ‘‰”Œ
^SCR("P1DP1T","A",4)
:�‰ˆ‰˜”š–…�—:'‘Žˆ‘
^SCR("P1DP1T","A",5)
:ˆ‰˜”ƒ’:ˆ‰˜”Ž
^SCR("P1DP1T","A",6)

^SCR("P1DP1T","A",7)
%„˜’„�…˜‡€˜‰‡Ž…ˆ��…‹‘„‡�„š…Ž‹ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1DP1T","A",8)
---------------------------------------------------------------------
^SCR("P1DP1T","A",9)

^SCR("P1DP1T","A",10)

^SCR("P1DP1T","A",11)

^SCR("P1DP1T","A",12)

^SCR("P1DP1T","A",13)

^SCR("P1DP1T","A",14)

^SCR("P1DP1T","A",15)

^SCR("P1DP1T","A",16)

^SCR("P1DP1T","A",17)

^SCR("P1DP1T","A",18)

^SCR("P1DP1T","A",19)
:�…‹‘:ˆ‰˜”Œš…‡�„‹"„‘:š…Ž‹‹"„‘
^SCR("P1DP1T","A",20)
:…ˆ�š…Ž‹:�…‹‘�:š…‰—‘’
^SCR("P1DP1T","AV",1)
ohyhrpj"us
^SCR("P1DP1T","AV",2)
lhrt,sglhrt,n
^SCR("P1DP1T","AV",3)
:5-gmcnhyhrp'4-ssucyhrp'3-vmuce'2-ohyhrpvkf'1-yxhpk
^SCR("P1DP1T","AV",4)
:ohyhrp,muce:wxnyx
^SCR("P1DP1T","AV",5)
:yhrpsg:yhrpn
^SCR("P1DP1T","AV",6)

^SCR("P1DP1T","AV",7)
%vrgviurjtrhjnuyboufxvjbv,unfyhrprut,yhrpsue
^SCR("P1DP1T","AV",8)
---------------------------------------------------------------------
^SCR("P1DP1T","AV",9)

^SCR("P1DP1T","AV",10)

^SCR("P1DP1T","AV",11)

^SCR("P1DP1T","AV",12)

^SCR("P1DP1T","AV",13)

^SCR("P1DP1T","AV",14)

^SCR("P1DP1T","AV",15)

^SCR("P1DP1T","AV",16)

^SCR("P1DP1T","AV",17)

^SCR("P1DP1T","AV",18)

^SCR("P1DP1T","AV",19)
:oufx:yhrpk,ujbvf"vx:,unff"vx
^SCR("P1DP1T","AV",20)
:uyb,unf:oufxc:,uhexg
^SCR("P1DP1T","G",1,"CHECK")
Y
^SCR("P1DP1T","G",1,"CRD")
8,77,E,6,0
^SCR("P1DP1T","G",1,"FNC")

^SCR("P1DP1T","G",1,"GLOB")
PAR
^SCR("P1DP1T","G",1,"HELP")

^SCR("P1DP1T","G",1,"LMAX")
8
^SCR("P1DP1T","G",1,"MUMPS1")

^SCR("P1DP1T","G",1,"MUMPS2")
D PAR^P1DP1
^SCR("P1DP1T","G",1,"MUST")

^SCR("P1DP1T","G",1,"NLN")
20
^SCR("P1DP1T","G",1,"RZD")
**
^SCR("P1DP1T","G",1,"SHEM")
hixt cew
^SCR("P1DP1T","G",1,"TOPB")
8
^SCR("P1DP1T","G",1,"TYP")
E
^SCR("P1DP1T","G",1,"VRB")
PAR1
^SCR("P1DP1T","G",2,"CRD")
8,68,H,18,0
^SCR("P1DP1T","G",2,"HELP")

^SCR("P1DP1T","G",2,"LMAX")
19
^SCR("P1DP1T","G",2,"MUMPS1")

^SCR("P1DP1T","G",2,"MUMPS2")

^SCR("P1DP1T","G",2,"OUTPUT")

^SCR("P1DP1T","G",2,"SHEM")
      hixt xe`z    
^SCR("P1DP1T","G",2,"TYP")
H
^SCR("P1DP1T","G",3,"CRD")
8,48,E,4,0
^SCR("P1DP1T","G",3,"HELP")

^SCR("P1DP1T","G",3,"LMAX")
4
^SCR("P1DP1T","G",3,"MUMPS1")

^SCR("P1DP1T","G",3,"MUMPS2")

^SCR("P1DP1T","G",3,"OUTPUT")

^SCR("P1DP1T","G",3,"SHEM")
zenk
^SCR("P1DP1T","G",3,"TYP")
E
^SCR("P1DP1T","G",4,"CRD")
8,43,N,6,2
^SCR("P1DP1T","G",4,"HELP")

^SCR("P1DP1T","G",4,"LMAX")
6
^SCR("P1DP1T","G",4,"MUMPS1")

^SCR("P1DP1T","G",4,"MUMPS2")

^SCR("P1DP1T","G",4,"OUTPUT")

^SCR("P1DP1T","G",4,"SHEM")
 dgpd 
^SCR("P1DP1T","G",4,"TYP")
N
^SCR("P1DP1T","G",5,"CRD")
8,36,N,8,2
^SCR("P1DP1T","G",5,"HELP")

^SCR("P1DP1T","G",5,"LMAX")
8
^SCR("P1DP1T","G",5,"MUMPS1")

^SCR("P1DP1T","G",5,"MUMPS2")

^SCR("P1DP1T","G",5,"OUTPUT")

^SCR("P1DP1T","G",5,"SHEM")
ehp mekq
^SCR("P1DP1T","G",5,"TYP")
N
^SCR("P1DP1T","G",6,"CRD")
8,27,N,7,2
^SCR("P1DP1T","G",6,"HELP")

^SCR("P1DP1T","G",6,"LMAX")
10
^SCR("P1DP1T","G",6,"MUMPS1")

^SCR("P1DP1T","G",6,"MUMPS2")

^SCR("P1DP1T","G",6,"OUTPUT")

^SCR("P1DP1T","G",6,"SHEM")
oexg` xign
^SCR("P1DP1T","G",6,"TYP")
N
^SCR("P1DP1T","G",7,"CRD")
8,16,H,8,0
^SCR("P1DP1T","G",7,"HELP")

^SCR("P1DP1T","G",7,"LMAX")
8
^SCR("P1DP1T","G",7,"MUMPS1")

^SCR("P1DP1T","G",7,"MUMPS2")

^SCR("P1DP1T","G",7,"OUTPUT")

^SCR("P1DP1T","G",7,"SHEM")
  dxrd  
^SCR("P1DP1T","G",7,"TYP")
H
^SCR("P1DP1T","G",8,"CRD")
8,7,N,5,2
^SCR("P1DP1T","G",8,"HELP")

^SCR("P1DP1T","G",8,"LMAX")
5
^SCR("P1DP1T","G",8,"MUMPS1")

^SCR("P1DP1T","G",8,"MUMPS2")

^SCR("P1DP1T","G",8,"OUTPUT")

^SCR("P1DP1T","G",8,"SHEM")
  %  
^SCR("P1DP1T","G",8,"TYP")
N
^SCR("P1DP1T","G","DEL")
Y
^SCR("P1DP1T","G","MAX")
99999
^SCR("P1DP1T","G","NAME","AHUZ")
8
^SCR("P1DP1T","G","NAME","HN")
4
^SCR("P1DP1T","G","NAME","HRPRT")
7
^SCR("P1DP1T","G","NAME","KAM")
3
^SCR("P1DP1T","G","NAME","MH")
6
^SCR("P1DP1T","G","NAME","PAR")
1
^SCR("P1DP1T","G","NAME","PAR1")
2
^SCR("P1DP1T","G","NAME","SUM")
5
^SCR("P1DP1T","G","NM",1)
PAR
^SCR("P1DP1T","G","NM",2)
PAR1
^SCR("P1DP1T","G","NM",3)
KAM
^SCR("P1DP1T","G","NM",4)
HN
^SCR("P1DP1T","G","NM",5)
SUM
^SCR("P1DP1T","G","NM",6)
MH
^SCR("P1DP1T","G","NM",7)
HRPRT
^SCR("P1DP1T","G","NM",8)
AHUZ
^SCR("P1DP1T","G","RB")
7,2,19,79
^SCR("P1DP1T","G","REF")
^TEMP($P
^SCR("P1DP1T","G","RZD")
\
^SCR("P1DP1T","G","STEP")
1
^SCR("P1DP1T","G","STG")
 :  %  :  dxrd  :oexg` xign:ehp mekq: dgpd :zenk:      hixt xe`z    :hixt cew: 
^SCR("P1DP1T","G","VG")
9
^SCR("P1DP1T","NAME")

^SCR("P1DP1T","P",1,"CRD")
1,33,H,25
^SCR("P1DP1T","P",1,"HELP")

^SCR("P1DP1T","P",1,"LMAX")
27
^SCR("P1DP1T","P",1,"MUMPS1")

^SCR("P1DP1T","P",1,"MUMPS2")

^SCR("P1DP1T","P",1,"OUTPUT")

^SCR("P1DP1T","P",1,"TYP")
H
^SCR("P1DP1T","P",5,"CRD")
2,42,D,8,0
^SCR("P1DP1T","P",5,"HELP")

^SCR("P1DP1T","P",5,"LMAX")
9
^SCR("P1DP1T","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($S($G(P1DZ):P1DZ,1:+$H),1) K %L1NMB("ALB")
^SCR("P1DP1T","P",5,"MUMPS2")

^SCR("P1DP1T","P",5,"TYP")
D
^SCR("P1DP1T","P",10,"CRD")
2,19,D,8,0
^SCR("P1DP1T","P",10,"HELP")

^SCR("P1DP1T","P",10,"LMAX")
9
^SCR("P1DP1T","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1DP1T","P",10,"MUMPS2")
D TV1^P1HZGDAT(DAT1,DAT2)
^SCR("P1DP1T","P",10,"TYP")
D
^SCR("P1DP1T","P",12,"CRD")
3,5,E,1,0
^SCR("P1DP1T","P",12,"HELP")
'g"ecl mihixt hq' divte` , ze`laha xcben zedil xen` mihixt hq  
^SCR("P1DP1T","P",12,"LMAX")
3
^SCR("P1DP1T","P",12,"MUMPS1")
S:'$G(SET) SET=2
^SCR("P1DP1T","P",12,"MUMPS2")
I SET'=1,SET'=2,SET'=3,SET'=4,SET'=5 S %SC("ER")=1
^SCR("P1DP1T","P",12,"MUST")

^SCR("P1DP1T","P",12,"TYP")
E
^SCR("P1DP1T","P",13,"CRD")
5,64,E,6,0
^SCR("P1DP1T","P",13,"FNC")

^SCR("P1DP1T","P",13,"GLOB")
PAR
^SCR("P1DP1T","P",13,"HELP")

^SCR("P1DP1T","P",13,"LMAX")
6
^SCR("P1DP1T","P",13,"MUMPS1")

^SCR("P1DP1T","P",13,"MUMPS2")

^SCR("P1DP1T","P",13,"NLN")
20
^SCR("P1DP1T","P",13,"RZD")
**
^SCR("P1DP1T","P",13,"TOPB")
8
^SCR("P1DP1T","P",13,"TYP")
E
^SCR("P1DP1T","P",13,"VRB")
MEPAR1
^SCR("P1DP1T","P",14,"CRD")
5,64,H,17
^SCR("P1DP1T","P",14,"HELP")

^SCR("P1DP1T","P",14,"LMAX")
17
^SCR("P1DP1T","P",14,"MUMPS1")

^SCR("P1DP1T","P",14,"MUMPS2")

^SCR("P1DP1T","P",14,"OUTPUT")

^SCR("P1DP1T","P",14,"TYP")
H
^SCR("P1DP1T","P",15,"CRD")
19,58,N,8,1
^SCR("P1DP1T","P",15,"HELP")

^SCR("P1DP1T","P",15,"LMAX")
8
^SCR("P1DP1T","P",15,"MUMPS1")

^SCR("P1DP1T","P",15,"MUMPS2")

^SCR("P1DP1T","P",15,"OUTPUT")

^SCR("P1DP1T","P",15,"TYP")
N
^SCR("P1DP1T","P",16,"CRD")
5,24,E,7,0
^SCR("P1DP1T","P",16,"FNC")

^SCR("P1DP1T","P",16,"GLOB")
PAR
^SCR("P1DP1T","P",16,"HELP")

^SCR("P1DP1T","P",16,"LMAX")
7
^SCR("P1DP1T","P",16,"MUMPS1")

^SCR("P1DP1T","P",16,"MUMPS2")

^SCR("P1DP1T","P",16,"NLN")
20
^SCR("P1DP1T","P",16,"RZD")
**
^SCR("P1DP1T","P",16,"TOPB")
8
^SCR("P1DP1T","P",16,"TYP")
E
^SCR("P1DP1T","P",16,"VRB")
ADPAR1
^SCR("P1DP1T","P",17,"CRD")
5,24,H,18
^SCR("P1DP1T","P",17,"HELP")

^SCR("P1DP1T","P",17,"LMAX")
18
^SCR("P1DP1T","P",17,"MUMPS1")

^SCR("P1DP1T","P",17,"MUMPS2")

^SCR("P1DP1T","P",17,"OUTPUT")

^SCR("P1DP1T","P",17,"TYP")
H
^SCR("P1DP1T","P",18,"CRD")
19,31,N,7,2
^SCR("P1DP1T","P",18,"HELP")

^SCR("P1DP1T","P",18,"LMAX")
7
^SCR("P1DP1T","P",18,"MUMPS1")

^SCR("P1DP1T","P",18,"MUMPS2")

^SCR("P1DP1T","P",18,"OUTPUT")

^SCR("P1DP1T","P",18,"TYP")
N
^SCR("P1DP1T","P",20,"CRD")
19,12,N,9,2
^SCR("P1DP1T","P",20,"HELP")

^SCR("P1DP1T","P",20,"LMAX")
9
^SCR("P1DP1T","P",20,"MUMPS1")

^SCR("P1DP1T","P",20,"MUMPS2")

^SCR("P1DP1T","P",20,"OUTPUT")

^SCR("P1DP1T","P",20,"TYP")
N
^SCR("P1DP1T","P",25,"CRD")
20,59,N,7,0
^SCR("P1DP1T","P",25,"HELP")

^SCR("P1DP1T","P",25,"LMAX")
7
^SCR("P1DP1T","P",25,"MUMPS1")

^SCR("P1DP1T","P",25,"MUMPS2")

^SCR("P1DP1T","P",25,"OUTPUT")

^SCR("P1DP1T","P",25,"TYP")
N
^SCR("P1DP1T","P",30,"CRD")
4,67,N,2,0
^SCR("P1DP1T","P",30,"FNC")

^SCR("P1DP1T","P",30,"GLOB")
P1SET
^SCR("P1DP1T","P",30,"HELP")

^SCR("P1DP1T","P",30,"LMAX")
3
^SCR("P1DP1T","P",30,"MUMPS1")

^SCR("P1DP1T","P",30,"MUMPS2")
I NS<1 S %SC("ER")=1
^SCR("P1DP1T","P",30,"MUST")

^SCR("P1DP1T","P",30,"NLN")
20
^SCR("P1DP1T","P",30,"RZD")
\
^SCR("P1DP1T","P",30,"TOPB")
8
^SCR("P1DP1T","P",30,"TYP")
N
^SCR("P1DP1T","P",30,"VRB")
NS1
^SCR("P1DP1T","P",31,"CRD")
4,66,H,19
^SCR("P1DP1T","P",31,"HELP")

^SCR("P1DP1T","P",31,"LMAX")
19
^SCR("P1DP1T","P",31,"MUMPS1")

^SCR("P1DP1T","P",31,"MUMPS2")

^SCR("P1DP1T","P",31,"OUTPUT")

^SCR("P1DP1T","P",31,"TYP")
H
^SCR("P1DP1T","P",35,"CRD")
4,23,N,4,0
^SCR("P1DP1T","P",35,"FNC")

^SCR("P1DP1T","P",35,"GLOB")
PARSUG
^SCR("P1DP1T","P",35,"HELP")

^SCR("P1DP1T","P",35,"LMAX")
4
^SCR("P1DP1T","P",35,"MUMPS1")

^SCR("P1DP1T","P",35,"MUMPS2")

^SCR("P1DP1T","P",35,"MUST")

^SCR("P1DP1T","P",35,"NLN")
20
^SCR("P1DP1T","P",35,"RZD")
\
^SCR("P1DP1T","P",35,"TOPB")
8
^SCR("P1DP1T","P",35,"TYP")
N
^SCR("P1DP1T","P",35,"VRB")
SUGP1
^SCR("P1DP1T","P",36,"CRD")
4,22,H,20
^SCR("P1DP1T","P",36,"HELP")

^SCR("P1DP1T","P",36,"LMAX")
20
^SCR("P1DP1T","P",36,"MUMPS1")

^SCR("P1DP1T","P",36,"MUMPS2")

^SCR("P1DP1T","P",36,"OUTPUT")

^SCR("P1DP1T","P",36,"TYP")
H
^SCR("P1DP1T","P",40,"CRD")
20,41,N,9,2
^SCR("P1DP1T","P",40,"HELP")

^SCR("P1DP1T","P",40,"LMAX")
9
^SCR("P1DP1T","P",40,"MUMPS1")

^SCR("P1DP1T","P",40,"MUMPS2")

^SCR("P1DP1T","P",40,"OUTPUT")

^SCR("P1DP1T","P",40,"TYP")
N
^SCR("P1DP1T","P",45,"CRD")
20,19,N,7,1
^SCR("P1DP1T","P",45,"HELP")

^SCR("P1DP1T","P",45,"LMAX")
7
^SCR("P1DP1T","P",45,"MUMPS1")

^SCR("P1DP1T","P",45,"MUMPS2")

^SCR("P1DP1T","P",45,"OUTPUT")

^SCR("P1DP1T","P",45,"TYP")
N
^SCR("P1DP1T","P","NAME","ADPAR")
16
^SCR("P1DP1T","P","NAME","ADPAR1")
17
^SCR("P1DP1T","P","NAME","CAI")
25
^SCR("P1DP1T","P","NAME","CNT")
45
^SCR("P1DP1T","P","NAME","DAT1")
5
^SCR("P1DP1T","P","NAME","DAT2")
10
^SCR("P1DP1T","P","NAME","MEPAR")
13
^SCR("P1DP1T","P","NAME","MEPAR1")
14
^SCR("P1DP1T","P","NAME","NS")
30
^SCR("P1DP1T","P","NAME","NS1")
31
^SCR("P1DP1T","P","NAME","SAI")
40
^SCR("P1DP1T","P","NAME","SET")
12
^SCR("P1DP1T","P","NAME","SHUM")
20
^SCR("P1DP1T","P","NAME","SUGDOH")
1
^SCR("P1DP1T","P","NAME","SUGP")
35
^SCR("P1DP1T","P","NAME","SUGP1")
36
^SCR("P1DP1T","P","NAME","SUMHN")
18
^SCR("P1DP1T","P","NAME","SUMK")
15
^SCR("P1DP1T","P","NM",1)
SUGDOH
^SCR("P1DP1T","P","NM",5)
DAT1
^SCR("P1DP1T","P","NM",10)
DAT2
^SCR("P1DP1T","P","NM",12)
SET
^SCR("P1DP1T","P","NM",13)
MEPAR
^SCR("P1DP1T","P","NM",14)
MEPAR1
^SCR("P1DP1T","P","NM",15)
SUMK
^SCR("P1DP1T","P","NM",16)
ADPAR
^SCR("P1DP1T","P","NM",17)
ADPAR1
^SCR("P1DP1T","P","NM",18)
SUMHN
^SCR("P1DP1T","P","NM",20)
SHUM
^SCR("P1DP1T","P","NM",25)
CAI
^SCR("P1DP1T","P","NM",30)
NS
^SCR("P1DP1T","P","NM",31)
NS1
^SCR("P1DP1T","P","NM",35)
SUGP
^SCR("P1DP1T","P","NM",36)
SUGP1
^SCR("P1DP1T","P","NM",40)
SAI
^SCR("P1DP1T","P","NM",45)
CNT
^SCR("P1DPSV")
H
^SCR("P1DPSV",1)
            # mihixt zexikn z`eeyd g"ec #                                      
^SCR("P1DPSV",2)
                                                                1]             
^SCR("P1DPSV",3)
                                                                               
^SCR("P1DPSV",4)
                  {03 yceg cr {02 ycegn {01 dpy :  zncew dtewz                 
^SCR("P1DPSV",5)
                                                                               
^SCR("P1DPSV",6)
                  {08 yceg cr {07 ycegn {06 dpy : zigkep dtewz                 
^SCR("P1DPSV",7)
                                                                               
^SCR("P1DPSV",8)
            [1                                                                 
^SCR("P1DPSV","A",1)
�‰ˆ‰˜”š…˜‰‹Žš€……™„‡"…ƒ
^SCR("P1DPSV","A",2)

^SCR("P1DPSV","A",3)

^SCR("P1DPSV","A",4)
™ƒ…‡ƒ’™ƒ…‡Ž„�™:šŽƒ…—„”…—š
^SCR("P1DPSV","A",5)

^SCR("P1DPSV","A",6)
™ƒ…‡ƒ’™ƒ…‡Ž„�™:š‰‡‹…�„”…—š
^SCR("P1DPSV","A",7)

^SCR("P1DPSV","A",8)

^SCR("P1DPSV","AV",1)
ohyhrp,urhfn,tuuavj"us
^SCR("P1DPSV","AV",2)

^SCR("P1DPSV","AV",3)

^SCR("P1DPSV","AV",4)
asujsgasujnvba:,nsuevpue,
^SCR("P1DPSV","AV",5)

^SCR("P1DPSV","AV",6)
asujsgasujnvba:,hjfubvpue,
^SCR("P1DPSV","AV",7)

^SCR("P1DPSV","AV",8)

^SCR("P1DPSV","NAME")

^SCR("P1DPSV","P",1,"CRD")
4,40,E,2,0
^SCR("P1DPSV","P",1,"HELP")

^SCR("P1DPSV","P",1,"LMAX")
4
^SCR("P1DPSV","P",1,"MUMPS1")

^SCR("P1DPSV","P",1,"MUMPS2")
I YY1'?2N S %SC("ER")=1
^SCR("P1DPSV","P",1,"MUST")

^SCR("P1DPSV","P",1,"TYP")
E
^SCR("P1DPSV","P",2,"CRD")
4,30,N,2,0
^SCR("P1DPSV","P",2,"HELP")

^SCR("P1DPSV","P",2,"LMAX")
4
^SCR("P1DPSV","P",2,"MUMPS1")

^SCR("P1DPSV","P",2,"MUMPS2")
I MM10'?1N.N!(MM10>12) S %SC("ER")=1
^SCR("P1DPSV","P",2,"MUST")

^SCR("P1DPSV","P",2,"TYP")
N
^SCR("P1DPSV","P",3,"CRD")
4,18,N,2,0
^SCR("P1DPSV","P",3,"HELP")

^SCR("P1DPSV","P",3,"LMAX")
4
^SCR("P1DPSV","P",3,"MUMPS1")

^SCR("P1DPSV","P",3,"MUMPS2")
I MM11<MM10!(MM11>12) S %SC("ER")=1
^SCR("P1DPSV","P",3,"MUST")

^SCR("P1DPSV","P",3,"TYP")
N
^SCR("P1DPSV","P",6,"CRD")
6,40,E,2,0
^SCR("P1DPSV","P",6,"HELP")

^SCR("P1DPSV","P",6,"LMAX")
4
^SCR("P1DPSV","P",6,"MUMPS1")

^SCR("P1DPSV","P",6,"MUMPS2")
D YY2^P1DPSV
^SCR("P1DPSV","P",6,"MUST")

^SCR("P1DPSV","P",6,"TYP")
E
^SCR("P1DPSV","P",7,"CRD")
6,30,N,2,0
^SCR("P1DPSV","P",7,"HELP")

^SCR("P1DPSV","P",7,"LMAX")
4
^SCR("P1DPSV","P",7,"MUMPS1")

^SCR("P1DPSV","P",7,"MUMPS2")
I MM20'?1N.N!(MM20>12) S %SC("ER")=1
^SCR("P1DPSV","P",7,"TYP")
N
^SCR("P1DPSV","P",8,"CRD")
6,18,N,2,0
^SCR("P1DPSV","P",8,"HELP")

^SCR("P1DPSV","P",8,"LMAX")
4
^SCR("P1DPSV","P",8,"MUMPS1")

^SCR("P1DPSV","P",8,"MUMPS2")
D MM21^P1DPSV
^SCR("P1DPSV","P",8,"TYP")
N
^SCR("P1DPSV","P","NAME","MM10")
2
^SCR("P1DPSV","P","NAME","MM11")
3
^SCR("P1DPSV","P","NAME","MM20")
7
^SCR("P1DPSV","P","NAME","MM21")
8
^SCR("P1DPSV","P","NAME","YY1")
1
^SCR("P1DPSV","P","NAME","YY2")
6
^SCR("P1DPSV","P","NM",1)
YY1
^SCR("P1DPSV","P","NM",2)
MM10
^SCR("P1DPSV","P","NM",3)
MM11
^SCR("P1DPSV","P","NM",6)
YY2
^SCR("P1DPSV","P","NM",7)
MM20
^SCR("P1DPSV","P","NM",8)
MM21
^SCR("P1DPSV","P","RB",1)
3,13,9,66
^SCR("P1DTLA")
H
^SCR("P1DTLA",1)
                    # i`xy` iyelz itl zegewl g"ec #                            
^SCR("P1DTLA",2)
                       {10      } jix`z cr   {05      } jix`zn                 
^SCR("P1DTLA",3)
                      {14       }  gewl cr   {12       } gewln                 
^SCR("P1DTLA",4)
                                                                             1$
^SCR("P1DTLA",5)
      :   k"dq   : miyelz xtqn : yelz ieey :     gewld my     : gewl 'qn  :    
^SCR("P1DTLA",6)
                                                                               
^SCR("P1DTLA",7)
                                                                               
^SCR("P1DTLA",8)
                                                                               
^SCR("P1DTLA",9)
                                                                               
^SCR("P1DTLA",10)
                                                                               
^SCR("P1DTLA",11)
                                                                               
^SCR("P1DTLA",12)
                                                                               
^SCR("P1DTLA",13)
                                                                               
^SCR("P1DTLA",14)
                                                                               
^SCR("P1DTLA",15)
                                                                               
^SCR("P1DTLA",16)
                                                                               
^SCR("P1DTLA",17)
                                                                               
^SCR("P1DTLA",18)
                                                                               
^SCR("P1DTLA",19)
                                                                               
^SCR("P1DTLA",20)
  $1                                                                           
^SCR("P1DTLA",21)
         {35      }   {30      }                                               
^SCR("P1DTLA","A",1)
‰€˜™€‰™…Œš‰”Œš…‡…—Œ‡"…ƒ
^SCR("P1DTLA","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("P1DTLA","A",3)
‡…—Œƒ’‡…—ŒŽ
^SCR("P1DTLA","A",4)

^SCR("P1DTLA","A",5)
‹"„‘�‰™…Œš˜”‘Ž™…Œš‰……™‡…—Œ„�™‡…—Œ'‘Ž
^SCR("P1DTLA","A",6)
-------------------------------------------------------------------
^SCR("P1DTLA","A",7)

^SCR("P1DTLA","A",8)

^SCR("P1DTLA","A",9)

^SCR("P1DTLA","A",10)

^SCR("P1DTLA","A",11)

^SCR("P1DTLA","A",12)

^SCR("P1DTLA","A",13)

^SCR("P1DTLA","A",14)

^SCR("P1DTLA","A",15)

^SCR("P1DTLA","A",16)

^SCR("P1DTLA","A",17)

^SCR("P1DTLA","A",18)

^SCR("P1DTLA","A",19)

^SCR("P1DTLA","A",20)

^SCR("P1DTLA","A",21)

^SCR("P1DTLA","AV",1)
htrathauk,hpk,ujuekj"us
^SCR("P1DTLA","AV",2)
lhrt,sglhrt,n
^SCR("P1DTLA","AV",3)
jueksgjuekn
^SCR("P1DTLA","AV",4)

^SCR("P1DTLA","AV",5)
f"vxohauk,rpxnauk,huuajuekvoajuekwxn
^SCR("P1DTLA","AV",6)
-------------------------------------------------------------------
^SCR("P1DTLA","AV",7)

^SCR("P1DTLA","AV",8)

^SCR("P1DTLA","AV",9)

^SCR("P1DTLA","AV",10)

^SCR("P1DTLA","AV",11)

^SCR("P1DTLA","AV",12)

^SCR("P1DTLA","AV",13)

^SCR("P1DTLA","AV",14)

^SCR("P1DTLA","AV",15)

^SCR("P1DTLA","AV",16)

^SCR("P1DTLA","AV",17)

^SCR("P1DTLA","AV",18)

^SCR("P1DTLA","AV",19)

^SCR("P1DTLA","AV",20)

^SCR("P1DTLA","AV",21)

^SCR("P1DTLA","G",1,"CRD")
6,74,E,10,0
^SCR("P1DTLA","G",1,"HELP")

^SCR("P1DTLA","G",1,"LMAX")
11
^SCR("P1DTLA","G",1,"MUMPS1")

^SCR("P1DTLA","G",1,"MUMPS2")
D NMB^P1DTLA
^SCR("P1DTLA","G",1,"SHEM")
 gewl 'qn  
^SCR("P1DTLA","G",1,"TYP")
E
^SCR("P1DTLA","G",2,"CRD")
6,62,H,18,0
^SCR("P1DTLA","G",2,"HELP")

^SCR("P1DTLA","G",2,"LMAX")
18
^SCR("P1DTLA","G",2,"MUMPS1")

^SCR("P1DTLA","G",2,"MUMPS2")

^SCR("P1DTLA","G",2,"OUTPUT")

^SCR("P1DTLA","G",2,"SHEM")
     gewld my     
^SCR("P1DTLA","G",2,"TYP")
H
^SCR("P1DTLA","G",3,"CRD")
6,43,N,7,2
^SCR("P1DTLA","G",3,"HELP")

^SCR("P1DTLA","G",3,"LMAX")
11
^SCR("P1DTLA","G",3,"MUMPS1")

^SCR("P1DTLA","G",3,"MUMPS2")

^SCR("P1DTLA","G",3,"OUTPUT")

^SCR("P1DTLA","G",3,"SHEM")
 yelz ieey 
^SCR("P1DTLA","G",3,"TYP")
N
^SCR("P1DTLA","G",4,"CRD")
6,31,N,6,0
^SCR("P1DTLA","G",4,"HELP")

^SCR("P1DTLA","G",4,"LMAX")
13
^SCR("P1DTLA","G",4,"MUMPS1")

^SCR("P1DTLA","G",4,"MUMPS2")

^SCR("P1DTLA","G",4,"OUTPUT")

^SCR("P1DTLA","G",4,"SHEM")
 miyelz xtqn 
^SCR("P1DTLA","G",4,"TYP")
N
^SCR("P1DTLA","G",5,"CRD")
6,17,N,10,2
^SCR("P1DTLA","G",5,"HELP")

^SCR("P1DTLA","G",5,"LMAX")
10
^SCR("P1DTLA","G",5,"MUMPS1")

^SCR("P1DTLA","G",5,"MUMPS2")

^SCR("P1DTLA","G",5,"OUTPUT")

^SCR("P1DTLA","G",5,"SHEM")
   k"dq   
^SCR("P1DTLA","G",5,"TYP")
N
^SCR("P1DTLA","G","DEL")

^SCR("P1DTLA","G","MAX")
99999
^SCR("P1DTLA","G","NAME","KMTL")
4
^SCR("P1DTLA","G","NAME","NAME")
2
^SCR("P1DTLA","G","NAME","NMB")
1
^SCR("P1DTLA","G","NAME","SUMTL")
5
^SCR("P1DTLA","G","NAME","TL")
3
^SCR("P1DTLA","G","NM",1)
NMB
^SCR("P1DTLA","G","NM",2)
NAME
^SCR("P1DTLA","G","NM",3)
TL
^SCR("P1DTLA","G","NM",4)
KMTL
^SCR("P1DTLA","G","NM",5)
SUMTL
^SCR("P1DTLA","G","RB")
5,3,21,79
^SCR("P1DTLA","G","REF")
^TEMP($P,"T"
^SCR("P1DTLA","G","RZD")
\
^SCR("P1DTLA","G","STEP")
1
^SCR("P1DTLA","G","STG")
      :   k"dq   : miyelz xtqn : yelz ieey :     gewld my     : gewl 'qn  :    
^SCR("P1DTLA","G","VG")
7
^SCR("P1DTLA","NAME")

^SCR("P1DTLA","P",5,"CRD")
2,45,D,8,0
^SCR("P1DTLA","P",5,"HELP")

^SCR("P1DTLA","P",5,"LMAX")
9
^SCR("P1DTLA","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("P1DTLA","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("P1DTLA","P",5,"MUST")

^SCR("P1DTLA","P",5,"TYP")
D
^SCR("P1DTLA","P",10,"CRD")
2,23,D,8,0
^SCR("P1DTLA","P",10,"HELP")

^SCR("P1DTLA","P",10,"LMAX")
9
^SCR("P1DTLA","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1DTLA","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) S:'D2 %SC("ER")=1
^SCR("P1DTLA","P",10,"TYP")
D
^SCR("P1DTLA","P",12,"CRD")
3,45,E,10,0
^SCR("P1DTLA","P",12,"FNC")

^SCR("P1DTLA","P",12,"GLOB")
LKH
^SCR("P1DTLA","P",12,"HELP")

^SCR("P1DTLA","P",12,"LMAX")
10
^SCR("P1DTLA","P",12,"MUMPS1")

^SCR("P1DTLA","P",12,"MUMPS2")

^SCR("P1DTLA","P",12,"NLN")
20
^SCR("P1DTLA","P",12,"RZD")
\
^SCR("P1DTLA","P",12,"TOPB")
8
^SCR("P1DTLA","P",12,"TYP")
E
^SCR("P1DTLA","P",14,"CRD")
3,22,E,10,0
^SCR("P1DTLA","P",14,"FNC")

^SCR("P1DTLA","P",14,"GLOB")
LKH
^SCR("P1DTLA","P",14,"HELP")

^SCR("P1DTLA","P",14,"LMAX")
10
^SCR("P1DTLA","P",14,"MUMPS1")
S:$G(MELKH) ADLKH=MELKH S:'$G(ADLKH) ADLKH=999999999
^SCR("P1DTLA","P",14,"MUMPS2")
D ADLKH^P1DTLA
^SCR("P1DTLA","P",14,"NLN")
20
^SCR("P1DTLA","P",14,"RZD")
\
^SCR("P1DTLA","P",14,"TOPB")
8
^SCR("P1DTLA","P",14,"TYP")
E
^SCR("P1DTLA","P",30,"CRD")
21,22,N,6,0
^SCR("P1DTLA","P",30,"HELP")

^SCR("P1DTLA","P",30,"LMAX")
9
^SCR("P1DTLA","P",30,"MUMPS1")

^SCR("P1DTLA","P",30,"MUMPS2")

^SCR("P1DTLA","P",30,"OUTPUT")

^SCR("P1DTLA","P",30,"TYP")
N
^SCR("P1DTLA","P",35,"CRD")
21,9,N,9,2
^SCR("P1DTLA","P",35,"HELP")

^SCR("P1DTLA","P",35,"LMAX")
9
^SCR("P1DTLA","P",35,"MUMPS1")

^SCR("P1DTLA","P",35,"MUMPS2")

^SCR("P1DTLA","P",35,"OUTPUT")

^SCR("P1DTLA","P",35,"TYP")
N
^SCR("P1DTLA","P","NAME","ADLKH")
14
^SCR("P1DTLA","P","NAME","DAT1")
5
^SCR("P1DTLA","P","NAME","DAT2")
10
^SCR("P1DTLA","P","NAME","MELKH")
12
^SCR("P1DTLA","P","NAME","SKMTL")
30
^SCR("P1DTLA","P","NAME","SSUMTL")
35
^SCR("P1DTLA","P","NM",5)
DAT1
^SCR("P1DTLA","P","NM",10)
DAT2
^SCR("P1DTLA","P","NM",12)
MELKH
^SCR("P1DTLA","P","NM",14)
ADLKH
^SCR("P1DTLA","P","NM",30)
SKMTL
^SCR("P1DTLA","P","NM",35)
SSUMTL
^SCR("P1DTLMTN")
H
^SCR("P1DTLMTN",1)
                 # dpzn iyelz yeniye dwtd g"ec #                               
^SCR("P1DTLMTN",2)
                                                                               
^SCR("P1DTLMTN",3)
                   {10      }: dwtd jix`z cr   {05      }: dwtd jix`zn         
^SCR("P1DTLMTN",4)
                   {20      }:melyz jix`z cr   {15      }:melyz jix`zn         
^SCR("P1DTLMTN",5)
                                                                             1$
^SCR("P1DTLMTN",6)
  :  mekq  :  jix`z : dpnfda mley : dpnfd :  mekq  : dwtd jix`z : yelz 'qn :   
^SCR("P1DTLMTN",7)
                                                                               
^SCR("P1DTLMTN",8)
                                                                               
^SCR("P1DTLMTN",9)
                                                                               
^SCR("P1DTLMTN",10)
                                                                               
^SCR("P1DTLMTN",11)
                                                                               
^SCR("P1DTLMTN",12)
                                                                               
^SCR("P1DTLMTN",13)
                                                                               
^SCR("P1DTLMTN",14)
                                                                               
^SCR("P1DTLMTN",15)
                                                                               
^SCR("P1DTLMTN",16)
                                                                               
^SCR("P1DTLMTN",17)
                                                                               
^SCR("P1DTLMTN",18)
                                                                               
^SCR("P1DTLMTN",19)
                                                                               
^SCR("P1DTLMTN",20)
                                                                               
^SCR("P1DTLMTN",21)
                                                                               
^SCR("P1DTLMTN",22)
 $1                                                                            
^SCR("P1DTLMTN",23)
  {30      }                               {25      }                          
^SCR("P1DTLMTN","A",1)
„�šŽ‰™…Œš™…Ž‰™…„—”„‡"…ƒ
^SCR("P1DTLMTN","A",2)

^SCR("P1DTLMTN","A",3)
:„—”„Š‰˜€šƒ’:„—”„Š‰˜€šŽ
^SCR("P1DTLMTN","A",4)
:�…Œ™šŠ‰˜€šƒ’:�…Œ™šŠ‰˜€šŽ
^SCR("P1DTLMTN","A",5)

^SCR("P1DTLMTN","A",6)
�…‹‘Š‰˜€š„�Ž†„��Œ…™„�Ž†„�…‹‘„—”„Š‰˜€š™…Œš'‘Ž
^SCR("P1DTLMTN","A",7)
---------------------------------------------------------------------
^SCR("P1DTLMTN","A",8)

^SCR("P1DTLMTN","A",9)

^SCR("P1DTLMTN","A",10)

^SCR("P1DTLMTN","A",11)

^SCR("P1DTLMTN","A",12)

^SCR("P1DTLMTN","A",13)

^SCR("P1DTLMTN","A",14)

^SCR("P1DTLMTN","A",15)

^SCR("P1DTLMTN","A",16)

^SCR("P1DTLMTN","A",17)

^SCR("P1DTLMTN","A",18)

^SCR("P1DTLMTN","A",19)

^SCR("P1DTLMTN","A",20)

^SCR("P1DTLMTN","A",21)

^SCR("P1DTLMTN","A",22)

^SCR("P1DTLMTN","A",23)

^SCR("P1DTLMTN","AV",1)
vb,nhauk,aunhauvepvj"us
^SCR("P1DTLMTN","AV",2)

^SCR("P1DTLMTN","AV",3)
:vepvlhrt,sg:vepvlhrt,n
^SCR("P1DTLMTN","AV",4)
:ouka,lhrt,sg:ouka,lhrt,n
^SCR("P1DTLMTN","AV",5)

^SCR("P1DTLMTN","AV",6)
oufxlhrt,vbnzvcokuavbnzvoufxvepvlhrt,auk,wxn
^SCR("P1DTLMTN","AV",7)
---------------------------------------------------------------------
^SCR("P1DTLMTN","AV",8)

^SCR("P1DTLMTN","AV",9)

^SCR("P1DTLMTN","AV",10)

^SCR("P1DTLMTN","AV",11)

^SCR("P1DTLMTN","AV",12)

^SCR("P1DTLMTN","AV",13)

^SCR("P1DTLMTN","AV",14)

^SCR("P1DTLMTN","AV",15)

^SCR("P1DTLMTN","AV",16)

^SCR("P1DTLMTN","AV",17)

^SCR("P1DTLMTN","AV",18)

^SCR("P1DTLMTN","AV",19)

^SCR("P1DTLMTN","AV",20)

^SCR("P1DTLMTN","AV",21)

^SCR("P1DTLMTN","AV",22)

^SCR("P1DTLMTN","AV",23)

^SCR("P1DTLMTN","G",1,"CRD")
7,75,E,10,0
^SCR("P1DTLMTN","G",1,"HELP")

^SCR("P1DTLMTN","G",1,"LMAX")
10
^SCR("P1DTLMTN","G",1,"MUMPS1")

^SCR("P1DTLMTN","G",1,"MUMPS2")

^SCR("P1DTLMTN","G",1,"OUTPUT")

^SCR("P1DTLMTN","G",1,"SHEM")
 yelz 'qn 
^SCR("P1DTLMTN","G",1,"TYP")
E
^SCR("P1DTLMTN","G",2,"CRD")
7,64,D,8,0
^SCR("P1DTLMTN","G",2,"HELP")

^SCR("P1DTLMTN","G",2,"LMAX")
12
^SCR("P1DTLMTN","G",2,"MUMPS1")

^SCR("P1DTLMTN","G",2,"MUMPS2")

^SCR("P1DTLMTN","G",2,"OUTPUT")

^SCR("P1DTLMTN","G",2,"SHEM")
 dwtd jix`z 
^SCR("P1DTLMTN","G",2,"TYP")
D
^SCR("P1DTLMTN","G",3,"CRD")
7,51,N,8,2
^SCR("P1DTLMTN","G",3,"HELP")

^SCR("P1DTLMTN","G",3,"LMAX")
8
^SCR("P1DTLMTN","G",3,"MUMPS1")

^SCR("P1DTLMTN","G",3,"MUMPS2")

^SCR("P1DTLMTN","G",3,"OUTPUT")

^SCR("P1DTLMTN","G",3,"SHEM")
  mekq  
^SCR("P1DTLMTN","G",3,"TYP")
N
^SCR("P1DTLMTN","G",4,"CRD")
7,42,E,7,0
^SCR("P1DTLMTN","G",4,"HELP")
<F9> - dpnfd bivdl 
^SCR("P1DTLMTN","G",4,"LMAX")
7
^SCR("P1DTLMTN","G",4,"MUMPS1")

^SCR("P1DTLMTN","G",4,"MUMPS2")
D HZMH^P1DTLMTN
^SCR("P1DTLMTN","G",4,"SHEM")
 dpnfd 
^SCR("P1DTLMTN","G",4,"TYP")
E
^SCR("P1DTLMTN","G",5,"CRD")
7,34,E,8,0
^SCR("P1DTLMTN","G",5,"HELP")
<F9> - dpnfd bivdl 
^SCR("P1DTLMTN","G",5,"LMAX")
13
^SCR("P1DTLMTN","G",5,"MUMPS1")

^SCR("P1DTLMTN","G",5,"MUMPS2")
D HZMT^P1DTLMTN
^SCR("P1DTLMTN","G",5,"SHEM")
 dpnfda mley 
^SCR("P1DTLMTN","G",5,"TYP")
E
^SCR("P1DTLMTN","G",6,"CRD")
7,20,D,8,0
^SCR("P1DTLMTN","G",6,"HELP")

^SCR("P1DTLMTN","G",6,"LMAX")
8
^SCR("P1DTLMTN","G",6,"MUMPS1")

^SCR("P1DTLMTN","G",6,"MUMPS2")

^SCR("P1DTLMTN","G",6,"OUTPUT")

^SCR("P1DTLMTN","G",6,"SHEM")
  jix`z 
^SCR("P1DTLMTN","G",6,"TYP")
D
^SCR("P1DTLMTN","G",7,"CRD")
7,11,N,8,2
^SCR("P1DTLMTN","G",7,"HELP")

^SCR("P1DTLMTN","G",7,"LMAX")
8
^SCR("P1DTLMTN","G",7,"MUMPS1")

^SCR("P1DTLMTN","G",7,"MUMPS2")

^SCR("P1DTLMTN","G",7,"OUTPUT")

^SCR("P1DTLMTN","G",7,"SHEM")
  mekq  
^SCR("P1DTLMTN","G",7,"TYP")
N
^SCR("P1DTLMTN","G","DEL")

^SCR("P1DTLMTN","G","MAX")
99999
^SCR("P1DTLMTN","G","NAME","HZMH")
4
^SCR("P1DTLMTN","G","NAME","HZMT")
5
^SCR("P1DTLMTN","G","NAME","NOMTL")
1
^SCR("P1DTLMTN","G","NAME","SUMH")
3
^SCR("P1DTLMTN","G","NAME","SUMT")
7
^SCR("P1DTLMTN","G","NAME","TRHFK")
2
^SCR("P1DTLMTN","G","NAME","TRHT")
6
^SCR("P1DTLMTN","G","NM",1)
NOMTL
^SCR("P1DTLMTN","G","NM",2)
TRHFK
^SCR("P1DTLMTN","G","NM",3)
SUMH
^SCR("P1DTLMTN","G","NM",4)
HZMH
^SCR("P1DTLMTN","G","NM",5)
HZMT
^SCR("P1DTLMTN","G","NM",6)
TRHT
^SCR("P1DTLMTN","G","NM",7)
SUMT
^SCR("P1DTLMTN","G","RB")
6,2,23,79
^SCR("P1DTLMTN","G","REF")
^TEMP($P
^SCR("P1DTLMTN","G","RZD")
\
^SCR("P1DTLMTN","G","STEP")
1
^SCR("P1DTLMTN","G","STG")
  :  mekq  :  jix`z : dpnfda mley : dpnfd :  mekq  : dwtd jix`z : yelz 'qn :   
^SCR("P1DTLMTN","G","VG")
8
^SCR("P1DTLMTN","NAME")
dpzn iyelz g"ec
^SCR("P1DTLMTN","P",5,"CRD")
3,47,D,8,0
^SCR("P1DTLMTN","P",5,"HELP")

^SCR("P1DTLMTN","P",5,"LMAX")
9
^SCR("P1DTLMTN","P",5,"MUMPS1")

^SCR("P1DTLMTN","P",5,"MUMPS2")

^SCR("P1DTLMTN","P",5,"TYP")
D
^SCR("P1DTLMTN","P",10,"CRD")
3,19,D,8,0
^SCR("P1DTLMTN","P",10,"HELP")

^SCR("P1DTLMTN","P",10,"LMAX")
9
^SCR("P1DTLMTN","P",10,"MUMPS1")
S:'$G(ADTRH) ADTRH=METRH
^SCR("P1DTLMTN","P",10,"MUMPS2")
I $$^%L1DC(ADTRH,3)<$$^%L1DC(METRH,3) S %SC("ER")=1
^SCR("P1DTLMTN","P",10,"TYP")
D
^SCR("P1DTLMTN","P",15,"CRD")
4,47,D,8,0
^SCR("P1DTLMTN","P",15,"HELP")

^SCR("P1DTLMTN","P",15,"LMAX")
9
^SCR("P1DTLMTN","P",15,"MUMPS1")

^SCR("P1DTLMTN","P",15,"MUMPS2")

^SCR("P1DTLMTN","P",15,"TYP")
D
^SCR("P1DTLMTN","P",20,"CRD")
4,19,D,8,0
^SCR("P1DTLMTN","P",20,"HELP")

^SCR("P1DTLMTN","P",20,"LMAX")
9
^SCR("P1DTLMTN","P",20,"MUMPS1")
S:'$G(ADTRHT) ADTRHT=METRHT
^SCR("P1DTLMTN","P",20,"MUMPS2")
D ADTRHT^P1DTLMTN
^SCR("P1DTLMTN","P",20,"TYP")
D
^SCR("P1DTLMTN","P",25,"CRD")
23,43,N,9,2
^SCR("P1DTLMTN","P",25,"HELP")

^SCR("P1DTLMTN","P",25,"LMAX")
9
^SCR("P1DTLMTN","P",25,"MUMPS1")

^SCR("P1DTLMTN","P",25,"MUMPS2")

^SCR("P1DTLMTN","P",25,"OUTPUT")

^SCR("P1DTLMTN","P",25,"TYP")
N
^SCR("P1DTLMTN","P",30,"CRD")
23,2,N,9,2
^SCR("P1DTLMTN","P",30,"HELP")

^SCR("P1DTLMTN","P",30,"LMAX")
9
^SCR("P1DTLMTN","P",30,"MUMPS1")

^SCR("P1DTLMTN","P",30,"MUMPS2")

^SCR("P1DTLMTN","P",30,"OUTPUT")

^SCR("P1DTLMTN","P",30,"TYP")
N
^SCR("P1DTLMTN","P","NAME","ADTRH")
10
^SCR("P1DTLMTN","P","NAME","ADTRHT")
20
^SCR("P1DTLMTN","P","NAME","METRH")
5
^SCR("P1DTLMTN","P","NAME","METRHT")
15
^SCR("P1DTLMTN","P","NAME","SSUMH")
25
^SCR("P1DTLMTN","P","NAME","SSUMT")
30
^SCR("P1DTLMTN","P","NM",5)
METRH
^SCR("P1DTLMTN","P","NM",10)
ADTRH
^SCR("P1DTLMTN","P","NM",15)
METRHT
^SCR("P1DTLMTN","P","NM",20)
ADTRHT
^SCR("P1DTLMTN","P","NM",25)
SSUMH
^SCR("P1DTLMTN","P","NM",30)
SSUMT
^SCR("P1DTZ")
H
^SCR("P1DTZ",1)
       #{                      03}#                                            
^SCR("P1DTZ",2)
                                                                               
^SCR("P1DTZ",3)
                     {10      }:jix`z cr    {05      }:jix`zn                  
^SCR("P1DTZ",4)
                                                                       1$      
^SCR("P1DTZ",5)
               :  gewld my   : gewl 'qn :  mekq : iekif 'z: jix`z  :           
^SCR("P1DTZ",6)
               :             :ogley 'qn :       :         :        :           
^SCR("P1DTZ",7)
                                                                               
^SCR("P1DTZ",8)
                                                                               
^SCR("P1DTZ",9)
                                                                               
^SCR("P1DTZ",10)
                                                                               
^SCR("P1DTZ",11)
                                                                               
^SCR("P1DTZ",12)
                                                                               
^SCR("P1DTZ",13)
                                                                               
^SCR("P1DTZ",14)
                                                                               
^SCR("P1DTZ",15)
                                                                               
^SCR("P1DTZ",16)
                                                                               
^SCR("P1DTZ",17)
                                                                               
^SCR("P1DTZ",18)
                                                                               
^SCR("P1DTZ",19)
                                                                               
^SCR("P1DTZ",20)
           $1                                                                  
^SCR("P1DTZ",21)
                                    {20       }:k"dq  {15  }:zecerz k"dq       
^SCR("P1DTZ","A",1)

^SCR("P1DTZ","A",2)

^SCR("P1DTZ","A",3)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1DTZ","A",4)

^SCR("P1DTZ","A",5)
‡…—Œ„�™‡…—Œ'‘Ž�…‹‘‰…‹‰†'šŠ‰˜€š
^SCR("P1DTZ","A",6)
�‡Œ…™'‘Ž
^SCR("P1DTZ","A",7)
-----------------------------------------------
^SCR("P1DTZ","A",8)

^SCR("P1DTZ","A",9)

^SCR("P1DTZ","A",10)

^SCR("P1DTZ","A",11)

^SCR("P1DTZ","A",12)

^SCR("P1DTZ","A",13)

^SCR("P1DTZ","A",14)

^SCR("P1DTZ","A",15)

^SCR("P1DTZ","A",16)

^SCR("P1DTZ","A",17)

^SCR("P1DTZ","A",18)

^SCR("P1DTZ","A",19)

^SCR("P1DTZ","A",20)

^SCR("P1DTZ","A",21)
:‹"„‘:š…ƒ…’š‹"„‘
^SCR("P1DTZ","AV",1)

^SCR("P1DTZ","AV",2)

^SCR("P1DTZ","AV",3)
:lhrt,sg:lhrt,n
^SCR("P1DTZ","AV",4)

^SCR("P1DTZ","AV",5)
juekvoajuekwxnoufxhufhzw,lhrt,
^SCR("P1DTZ","AV",6)
ijkuawxn
^SCR("P1DTZ","AV",7)
-----------------------------------------------
^SCR("P1DTZ","AV",8)

^SCR("P1DTZ","AV",9)

^SCR("P1DTZ","AV",10)

^SCR("P1DTZ","AV",11)

^SCR("P1DTZ","AV",12)

^SCR("P1DTZ","AV",13)

^SCR("P1DTZ","AV",14)

^SCR("P1DTZ","AV",15)

^SCR("P1DTZ","AV",16)

^SCR("P1DTZ","AV",17)

^SCR("P1DTZ","AV",18)

^SCR("P1DTZ","AV",19)

^SCR("P1DTZ","AV",20)

^SCR("P1DTZ","AV",21)
:f"vx:,usug,f"vx
^SCR("P1DTZ","G",1,"CRD")
6,67,D,8,0
^SCR("P1DTZ","G",1,"HELP")

^SCR("P1DTZ","G",1,"LMAX")
8
^SCR("P1DTZ","G",1,"MUMPS1")

^SCR("P1DTZ","G",1,"MUMPS2")

^SCR("P1DTZ","G",1,"OUTPUT")

^SCR("P1DTZ","G",1,"SHEM")
 jix`z  
^SCR("P1DTZ","G",1,"TYP")
D
^SCR("P1DTZ","G",2,"CRD")
6,58,E,7,0
^SCR("P1DTZ","G",2,"HELP")
<F9> - iekif 'z bivdl 
^SCR("P1DTZ","G",2,"LMAX")
9
^SCR("P1DTZ","G",2,"MUMPS1")

^SCR("P1DTZ","G",2,"MUMPS2")
D HZG^P1DTZ
^SCR("P1DTZ","G",2,"SHEM")
 iekif 'z
^SCR("P1DTZ","G",2,"TYP")
E
^SCR("P1DTZ","G",3,"CRD")
6,48,N,7,2
^SCR("P1DTZ","G",3,"HELP")

^SCR("P1DTZ","G",3,"LMAX")
7
^SCR("P1DTZ","G",3,"MUMPS1")

^SCR("P1DTZ","G",3,"MUMPS2")

^SCR("P1DTZ","G",3,"OUTPUT")

^SCR("P1DTZ","G",3,"SHEM")
  mekq 
^SCR("P1DTZ","G",3,"TYP")
N
^SCR("P1DTZ","G",4,"CRD")
6,40,E,10,0
^SCR("P1DTZ","G",4,"HELP")

^SCR("P1DTZ","G",4,"LMAX")
10
^SCR("P1DTZ","G",4,"MUMPS1")

^SCR("P1DTZ","G",4,"MUMPS2")

^SCR("P1DTZ","G",4,"OUTPUT")

^SCR("P1DTZ","G",4,"SHEM")
 gewl 'qn 
^SCR("P1DTZ","G",4,"TYP")
E
^SCR("P1DTZ","G",5,"CRD")
6,29,H,13,0
^SCR("P1DTZ","G",5,"HELP")

^SCR("P1DTZ","G",5,"LMAX")
13
^SCR("P1DTZ","G",5,"MUMPS1")

^SCR("P1DTZ","G",5,"MUMPS2")

^SCR("P1DTZ","G",5,"OUTPUT")

^SCR("P1DTZ","G",5,"SHEM")
  gewld my   
^SCR("P1DTZ","G",5,"TYP")
H
^SCR("P1DTZ","G","DEL")

^SCR("P1DTZ","G","MAX")
3
^SCR("P1DTZ","G","NAME","DATH")
1
^SCR("P1DTZ","G","NAME","NAME")
5
^SCR("P1DTZ","G","NAME","NMB")
4
^SCR("P1DTZ","G","NAME","SHUM")
3
^SCR("P1DTZ","G","NAME","TZK")
2
^SCR("P1DTZ","G","NM",1)
DATH
^SCR("P1DTZ","G","NM",2)
TZK
^SCR("P1DTZ","G","NM",3)
SHUM
^SCR("P1DTZ","G","NM",4)
NMB
^SCR("P1DTZ","G","NM",5)
NAME
^SCR("P1DTZ","G","RB")
5,12,21,73
^SCR("P1DTZ","G","REF")
^TEMPDH($P
^SCR("P1DTZ","G","RZD")
\
^SCR("P1DTZ","G","STEP")
1
^SCR("P1DTZ","G","STG")
               :  gewld my   : gewl 'qn :  mekq : iekif 'z: jix`z  :           
^SCR("P1DTZ","G","VG")
8
^SCR("P1DTZ","NAME")

^SCR("P1DTZ","P",3,"CRD")
1,34,H,25
^SCR("P1DTZ","P",3,"HELP")

^SCR("P1DTZ","P",3,"LMAX")
25
^SCR("P1DTZ","P",3,"MUMPS1")

^SCR("P1DTZ","P",3,"MUMPS2")

^SCR("P1DTZ","P",3,"OUTPUT")

^SCR("P1DTZ","P",3,"TYP")
H
^SCR("P1DTZ","P",5,"CRD")
3,44,D,8,0
^SCR("P1DTZ","P",5,"HELP")

^SCR("P1DTZ","P",5,"LMAX")
9
^SCR("P1DTZ","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($H,1)
^SCR("P1DTZ","P",5,"MUMPS2")
S DD1=$$^%L1DC(DAT1,3) I $E(DD1)="?" S %SC("ER")=1
^SCR("P1DTZ","P",5,"MUST")

^SCR("P1DTZ","P",5,"TYP")
D
^SCR("P1DTZ","P",10,"CRD")
3,21,D,8,0
^SCR("P1DTZ","P",10,"HELP")

^SCR("P1DTZ","P",10,"LMAX")
9
^SCR("P1DTZ","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1DTZ","P",10,"MUMPS2")
S DD2=$$^%L1DC(DAT2,3) I $E(DD2)="?" S %SC("ER")=1
^SCR("P1DTZ","P",10,"MUST")

^SCR("P1DTZ","P",10,"TYP")
D
^SCR("P1DTZ","P",15,"CRD")
21,54,N,5,0
^SCR("P1DTZ","P",15,"HELP")

^SCR("P1DTZ","P",15,"LMAX")
5
^SCR("P1DTZ","P",15,"MUMPS1")

^SCR("P1DTZ","P",15,"MUMPS2")

^SCR("P1DTZ","P",15,"OUTPUT")

^SCR("P1DTZ","P",15,"TYP")
N
^SCR("P1DTZ","P",20,"CRD")
21,36,N,8,2
^SCR("P1DTZ","P",20,"HELP")

^SCR("P1DTZ","P",20,"LMAX")
10
^SCR("P1DTZ","P",20,"MUMPS1")

^SCR("P1DTZ","P",20,"MUMPS2")

^SCR("P1DTZ","P",20,"OUTPUT")

^SCR("P1DTZ","P",20,"TYP")
N
^SCR("P1DTZ","P","NAME","DAT1")
5
^SCR("P1DTZ","P","NAME","DAT2")
10
^SCR("P1DTZ","P","NAME","KOT")
3
^SCR("P1DTZ","P","NAME","SUM")
20
^SCR("P1DTZ","P","NAME","SUMH")
15
^SCR("P1DTZ","P","NM",3)
KOT
^SCR("P1DTZ","P","NM",5)
DAT1
^SCR("P1DTZ","P","NM",10)
DAT2
^SCR("P1DTZ","P","NM",15)
SUMH
^SCR("P1DTZ","P","NM",20)
SUM
^SCR("P1DTZK")
H
^SCR("P1DTZK",1)
       #{                      03}#                                            
^SCR("P1DTZK",2)
                                                                               
^SCR("P1DTZK",3)
                     {10      }:jix`z cr    {05      }:jix`zn                  
^SCR("P1DTZK",4)
                                                                             1$
^SCR("P1DTZK",5)
  :  xvln my  : xvln :beq:  gewld my   : gewl 'qn :  mekq : iekif 'z: jix`z  : 
^SCR("P1DTZK",6)
  :  gily my  : gily :lyz:             :ogley 'qn :       :         :        : 
^SCR("P1DTZK",7)
                                                                               
^SCR("P1DTZK",8)
                                                                               
^SCR("P1DTZK",9)
                                                                               
^SCR("P1DTZK",10)
                                                                               
^SCR("P1DTZK",11)
                                                                               
^SCR("P1DTZK",12)
                                                                               
^SCR("P1DTZK",13)
                                                                               
^SCR("P1DTZK",14)
                                                                               
^SCR("P1DTZK",15)
                                                                               
^SCR("P1DTZK",16)
                                                                               
^SCR("P1DTZK",17)
                                                                               
^SCR("P1DTZK",18)
                                                                               
^SCR("P1DTZK",19)
                                                                               
^SCR("P1DTZK",20)
 $1                                                                            
^SCR("P1DTZK",21)
                                    {20       }:k"dq  {15  }:zecerz k"dq       
^SCR("P1DTZK","A",1)

^SCR("P1DTZK","A",2)

^SCR("P1DTZK","A",3)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1DTZK","A",4)

^SCR("P1DTZK","A",5)
˜–ŒŽ�™˜–ŒŽ‚…‘‡…—Œ„�™‡…—Œ'‘Ž�…‹‘‰…‹‰†'šŠ‰˜€š
^SCR("P1DTZK","A",6)
‡‰Œ™�™‡‰Œ™Œ™š�‡Œ…™'‘Ž
^SCR("P1DTZK","A",7)
--------------------------------------------------------------------
^SCR("P1DTZK","A",8)

^SCR("P1DTZK","A",9)

^SCR("P1DTZK","A",10)

^SCR("P1DTZK","A",11)

^SCR("P1DTZK","A",12)

^SCR("P1DTZK","A",13)

^SCR("P1DTZK","A",14)

^SCR("P1DTZK","A",15)

^SCR("P1DTZK","A",16)

^SCR("P1DTZK","A",17)

^SCR("P1DTZK","A",18)

^SCR("P1DTZK","A",19)

^SCR("P1DTZK","A",20)

^SCR("P1DTZK","A",21)
:‹"„‘:š…ƒ…’š‹"„‘
^SCR("P1DTZK","AV",1)

^SCR("P1DTZK","AV",2)

^SCR("P1DTZK","AV",3)
:lhrt,sg:lhrt,n
^SCR("P1DTZK","AV",4)

^SCR("P1DTZK","AV",5)
rmknoarmknduxjuekvoajuekwxnoufxhufhzw,lhrt,
^SCR("P1DTZK","AV",6)
jhkaoajhkaka,ijkuawxn
^SCR("P1DTZK","AV",7)
--------------------------------------------------------------------
^SCR("P1DTZK","AV",8)

^SCR("P1DTZK","AV",9)

^SCR("P1DTZK","AV",10)

^SCR("P1DTZK","AV",11)

^SCR("P1DTZK","AV",12)

^SCR("P1DTZK","AV",13)

^SCR("P1DTZK","AV",14)

^SCR("P1DTZK","AV",15)

^SCR("P1DTZK","AV",16)

^SCR("P1DTZK","AV",17)

^SCR("P1DTZK","AV",18)

^SCR("P1DTZK","AV",19)

^SCR("P1DTZK","AV",20)

^SCR("P1DTZK","AV",21)
:f"vx:,usug,f"vx
^SCR("P1DTZK","G",1,"CRD")
6,77,D,8,0
^SCR("P1DTZK","G",1,"HELP")

^SCR("P1DTZK","G",1,"LMAX")
8
^SCR("P1DTZK","G",1,"MUMPS1")

^SCR("P1DTZK","G",1,"MUMPS2")

^SCR("P1DTZK","G",1,"OUTPUT")

^SCR("P1DTZK","G",1,"SHEM")
 jix`z  
^SCR("P1DTZK","G",1,"TYP")
D
^SCR("P1DTZK","G",2,"CRD")
6,68,E,7,0
^SCR("P1DTZK","G",2,"HELP")
<F9> - iekif 'z bivdl 
^SCR("P1DTZK","G",2,"LMAX")
9
^SCR("P1DTZK","G",2,"MUMPS1")

^SCR("P1DTZK","G",2,"MUMPS2")
D TZK^P1DTZ
^SCR("P1DTZK","G",2,"SHEM")
 iekif 'z
^SCR("P1DTZK","G",2,"TYP")
E
^SCR("P1DTZK","G",3,"CRD")
6,58,N,7,2
^SCR("P1DTZK","G",3,"HELP")

^SCR("P1DTZK","G",3,"LMAX")
7
^SCR("P1DTZK","G",3,"MUMPS1")

^SCR("P1DTZK","G",3,"MUMPS2")

^SCR("P1DTZK","G",3,"OUTPUT")

^SCR("P1DTZK","G",3,"SHEM")
  mekq 
^SCR("P1DTZK","G",3,"TYP")
N
^SCR("P1DTZK","G",4,"CRD")
6,50,E,10,0
^SCR("P1DTZK","G",4,"HELP")

^SCR("P1DTZK","G",4,"LMAX")
10
^SCR("P1DTZK","G",4,"MUMPS1")

^SCR("P1DTZK","G",4,"MUMPS2")

^SCR("P1DTZK","G",4,"OUTPUT")

^SCR("P1DTZK","G",4,"SHEM")
 gewl 'qn 
^SCR("P1DTZK","G",4,"TYP")
E
^SCR("P1DTZK","G",5,"CRD")
6,39,H,13,0
^SCR("P1DTZK","G",5,"HELP")

^SCR("P1DTZK","G",5,"LMAX")
13
^SCR("P1DTZK","G",5,"MUMPS1")

^SCR("P1DTZK","G",5,"MUMPS2")

^SCR("P1DTZK","G",5,"OUTPUT")

^SCR("P1DTZK","G",5,"SHEM")
  gewld my   
^SCR("P1DTZK","G",5,"TYP")
H
^SCR("P1DTZK","G",6,"CRD")
6,25,E,3,0
^SCR("P1DTZK","G",6,"HELP")
<F9> iekif zcerz zbvd
^SCR("P1DTZK","G",6,"LMAX")
3
^SCR("P1DTZK","G",6,"MUMPS1")

^SCR("P1DTZK","G",6,"MUMPS2")

^SCR("P1DTZK","G",6,"OUTPUT")

^SCR("P1DTZK","G",6,"SHEM")
beq
^SCR("P1DTZK","G",6,"TYP")
E
^SCR("P1DTZK","G",7,"CRD")
6,21,E,5,0
^SCR("P1DTZK","G",7,"HELP")

^SCR("P1DTZK","G",7,"LMAX")
6
^SCR("P1DTZK","G",7,"MUMPS1")

^SCR("P1DTZK","G",7,"MUMPS2")

^SCR("P1DTZK","G",7,"OUTPUT")

^SCR("P1DTZK","G",7,"SHEM")
 xvln 
^SCR("P1DTZK","G",7,"TYP")
E
^SCR("P1DTZK","G",8,"CRD")
6,14,H,11,0
^SCR("P1DTZK","G",8,"HELP")

^SCR("P1DTZK","G",8,"LMAX")
11
^SCR("P1DTZK","G",8,"MUMPS1")

^SCR("P1DTZK","G",8,"MUMPS2")

^SCR("P1DTZK","G",8,"OUTPUT")

^SCR("P1DTZK","G",8,"SHEM")
  xvln my  
^SCR("P1DTZK","G",8,"TYP")
H
^SCR("P1DTZK","G","DEL")

^SCR("P1DTZK","G","MAX")
2
^SCR("P1DTZK","G","NAME","DATH")
1
^SCR("P1DTZK","G","NAME","MLZ")
7
^SCR("P1DTZK","G","NAME","MLZ1")
8
^SCR("P1DTZK","G","NAME","NAME")
5
^SCR("P1DTZK","G","NAME","NMB")
4
^SCR("P1DTZK","G","NAME","SHUM")
3
^SCR("P1DTZK","G","NAME","SUGT")
6
^SCR("P1DTZK","G","NAME","TZK")
2
^SCR("P1DTZK","G","NM",1)
DATH
^SCR("P1DTZK","G","NM",2)
TZK
^SCR("P1DTZK","G","NM",3)
SHUM
^SCR("P1DTZK","G","NM",4)
NMB
^SCR("P1DTZK","G","NM",5)
NAME
^SCR("P1DTZK","G","NM",6)
SUGT
^SCR("P1DTZK","G","NM",7)
MLZ
^SCR("P1DTZK","G","NM",8)
MLZ1
^SCR("P1DTZK","G","RB")
5,2,21,79
^SCR("P1DTZK","G","REF")
^TEMPDH($P
^SCR("P1DTZK","G","RZD")
\
^SCR("P1DTZK","G","STEP")
1
^SCR("P1DTZK","G","STG")
  :  xvln my  : xvln :beq:  gewld my   : gewl 'qn :  mekq : iekif 'z: jix`z  : 
^SCR("P1DTZK","G","VG")
8
^SCR("P1DTZK","NAME")

^SCR("P1DTZK","P",3,"CRD")
1,34,H,25
^SCR("P1DTZK","P",3,"HELP")

^SCR("P1DTZK","P",3,"LMAX")
25
^SCR("P1DTZK","P",3,"MUMPS1")

^SCR("P1DTZK","P",3,"MUMPS2")

^SCR("P1DTZK","P",3,"OUTPUT")

^SCR("P1DTZK","P",3,"TYP")
H
^SCR("P1DTZK","P",5,"CRD")
3,44,D,8,0
^SCR("P1DTZK","P",5,"HELP")

^SCR("P1DTZK","P",5,"LMAX")
9
^SCR("P1DTZK","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($H,1)
^SCR("P1DTZK","P",5,"MUMPS2")
S DD1=$$^%L1DC(DAT1,3) I $E(DD1)="?" S %SC("ER")=1
^SCR("P1DTZK","P",5,"MUST")

^SCR("P1DTZK","P",5,"TYP")
D
^SCR("P1DTZK","P",10,"CRD")
3,21,D,8,0
^SCR("P1DTZK","P",10,"HELP")

^SCR("P1DTZK","P",10,"LMAX")
9
^SCR("P1DTZK","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1DTZK","P",10,"MUMPS2")
S DD2=$$^%L1DC(DAT2,3) I $E(DD2)="?" S %SC("ER")=1
^SCR("P1DTZK","P",10,"MUST")

^SCR("P1DTZK","P",10,"TYP")
D
^SCR("P1DTZK","P",15,"CRD")
21,54,N,5,0
^SCR("P1DTZK","P",15,"HELP")

^SCR("P1DTZK","P",15,"LMAX")
5
^SCR("P1DTZK","P",15,"MUMPS1")

^SCR("P1DTZK","P",15,"MUMPS2")

^SCR("P1DTZK","P",15,"OUTPUT")

^SCR("P1DTZK","P",15,"TYP")
N
^SCR("P1DTZK","P",20,"CRD")
21,36,N,8,2
^SCR("P1DTZK","P",20,"HELP")

^SCR("P1DTZK","P",20,"LMAX")
10
^SCR("P1DTZK","P",20,"MUMPS1")

^SCR("P1DTZK","P",20,"MUMPS2")

^SCR("P1DTZK","P",20,"OUTPUT")

^SCR("P1DTZK","P",20,"TYP")
N
^SCR("P1DTZK","P","NAME","DAT1")
5
^SCR("P1DTZK","P","NAME","DAT2")
10
^SCR("P1DTZK","P","NAME","KOT")
3
^SCR("P1DTZK","P","NAME","SUM")
20
^SCR("P1DTZK","P","NAME","SUMH")
15
^SCR("P1DTZK","P","NM",3)
KOT
^SCR("P1DTZK","P","NM",5)
DAT1
^SCR("P1DTZK","P","NM",10)
DAT2
^SCR("P1DTZK","P","NM",15)
SUMH
^SCR("P1DTZK","P","NM",20)
SUM
^SCR("P1EZA")
H
^SCR("P1EZA",1)
                                 # dgex`l zepn hq #                            
^SCR("P1EZA",2)
                                                                               
^SCR("P1EZA",3)
                {                           06} {05    }:dgex` cew             
^SCR("P1EZA",4)
                                                    {10 :miyp` 'qn             
^SCR("P1EZA",5)
                                                                           1$  
^SCR("P1EZA",6)
     : ('wc) didyd : dxigal iaxin xtqn :       dpn xe`z      : dpn cew :       
^SCR("P1EZA",7)
                                                                               
^SCR("P1EZA",8)
                                                                               
^SCR("P1EZA",9)
                                                                               
^SCR("P1EZA",10)
                                                                               
^SCR("P1EZA",11)
                                                                               
^SCR("P1EZA",12)
                                                                               
^SCR("P1EZA",13)
                                                                               
^SCR("P1EZA",14)
                                                                               
^SCR("P1EZA",15)
                                                                               
^SCR("P1EZA",16)
                                                                               
^SCR("P1EZA",17)
                                                                               
^SCR("P1EZA",18)
                                                                               
^SCR("P1EZA",19)
                                                                               
^SCR("P1EZA",20)
                                                                               
^SCR("P1EZA",21)
 $1                                                                            
^SCR("P1EZA","A",1)
„‡…˜€Œš…�Žˆ‘
^SCR("P1EZA","A",2)

^SCR("P1EZA","A",3)
:„‡…˜€ƒ…—
^SCR("P1EZA","A",4)
:�‰™�€'‘Ž
^SCR("P1EZA","A",5)

^SCR("P1EZA","A",6)
('—ƒ)„‰„™„„˜‰‡�Œ‰�˜‰Ž˜”‘Ž„�Ž˜…€š„�Žƒ…—
^SCR("P1EZA","A",7)
--------------------------------------------------------------
^SCR("P1EZA","A",8)

^SCR("P1EZA","A",9)

^SCR("P1EZA","A",10)

^SCR("P1EZA","A",11)

^SCR("P1EZA","A",12)

^SCR("P1EZA","A",13)

^SCR("P1EZA","A",14)

^SCR("P1EZA","A",15)

^SCR("P1EZA","A",16)

^SCR("P1EZA","A",17)

^SCR("P1EZA","A",18)

^SCR("P1EZA","A",19)

^SCR("P1EZA","A",20)

^SCR("P1EZA","A",21)

^SCR("P1EZA","AV",1)
vjurtk,ubnyx
^SCR("P1EZA","AV",2)

^SCR("P1EZA","AV",3)
:vjurtsue
^SCR("P1EZA","AV",4)
:ohabtwxn
^SCR("P1EZA","AV",5)

^SCR("P1EZA","AV",6)
(wes)vhvavvrhjckhcrhnrpxnvbnrut,vbnsue
^SCR("P1EZA","AV",7)
--------------------------------------------------------------
^SCR("P1EZA","AV",8)

^SCR("P1EZA","AV",9)

^SCR("P1EZA","AV",10)

^SCR("P1EZA","AV",11)

^SCR("P1EZA","AV",12)

^SCR("P1EZA","AV",13)

^SCR("P1EZA","AV",14)

^SCR("P1EZA","AV",15)

^SCR("P1EZA","AV",16)

^SCR("P1EZA","AV",17)

^SCR("P1EZA","AV",18)

^SCR("P1EZA","AV",19)

^SCR("P1EZA","AV",20)

^SCR("P1EZA","AV",21)

^SCR("P1EZA","G",1,"CRD")
7,71,E,8,0
^SCR("P1EZA","G",1,"FNC")
F10,F9,F8
^SCR("P1EZA","G",1,"GLOB")
PAR
^SCR("P1EZA","G",1,"HELP")
F10- dgex` zbvd, F9- hq oewiz ,F8- mihq zniyx, F7- hixtz, F6- my itl yetig 
^SCR("P1EZA","G",1,"LMAX")
9
^SCR("P1EZA","G",1,"MUMPS1")

^SCR("P1EZA","G",1,"MUMPS2")
D BDIKA^P1EZA
^SCR("P1EZA","G",1,"MUST")

^SCR("P1EZA","G",1,"NLN")
20
^SCR("P1EZA","G",1,"RZD")
**
^SCR("P1EZA","G",1,"SHEM")
 dpn cew 
^SCR("P1EZA","G",1,"TOPB")
8
^SCR("P1EZA","G",1,"TYP")
E
^SCR("P1EZA","G",1,"VRB")
PAR1
^SCR("P1EZA","G",2,"CRD")
7,61,H,20,0
^SCR("P1EZA","G",2,"HELP")

^SCR("P1EZA","G",2,"LMAX")
21
^SCR("P1EZA","G",2,"MUMPS1")

^SCR("P1EZA","G",2,"MUMPS2")

^SCR("P1EZA","G",2,"OUTPUT")

^SCR("P1EZA","G",2,"SHEM")
       dpn xe`z      
^SCR("P1EZA","G",2,"TYP")
H
^SCR("P1EZA","G",3,"CRD")
7,39,H,2,0
^SCR("P1EZA","G",3,"HELP")

^SCR("P1EZA","G",3,"LMAX")
19
^SCR("P1EZA","G",3,"MUMPS1")

^SCR("P1EZA","G",3,"MUMPS2")

^SCR("P1EZA","G",3,"OUTPUT")

^SCR("P1EZA","G",3,"SHEM")
 dxigal iaxin xtqn 
^SCR("P1EZA","G",3,"TYP")
H
^SCR("P1EZA","G",4,"CRD")
7,19,N,2,0
^SCR("P1EZA","G",4,"HELP")

^SCR("P1EZA","G",4,"LMAX")
13
^SCR("P1EZA","G",4,"MUMPS1")

^SCR("P1EZA","G",4,"MUMPS2")

^SCR("P1EZA","G",4,"SHEM")
 ('wc) didyd 
^SCR("P1EZA","G",4,"TYP")
N
^SCR("P1EZA","G","DEL")
Y
^SCR("P1EZA","G","MAX")
99999
^SCR("P1EZA","G","NAME","BDCM")
3
^SCR("P1EZA","G","NAME","DELAY")
4
^SCR("P1EZA","G","NAME","PARIT")
1
^SCR("P1EZA","G","NAME","PARIT1")
2
^SCR("P1EZA","G","NM",1)
PARIT
^SCR("P1EZA","G","NM",2)
PARIT1
^SCR("P1EZA","G","NM",3)
BDCM
^SCR("P1EZA","G","NM",4)
DELAY
^SCR("P1EZA","G","RB")
6,2,22,77
^SCR("P1EZA","G","REF")
^TEMP($P,"EZ"
^SCR("P1EZA","G","RZD")
\
^SCR("P1EZA","G","STEP")
1
^SCR("P1EZA","G","STG")
     : ('wc) didyd : dxigal iaxin xtqn :       dpn xe`z      : dpn cew :       
^SCR("P1EZA","G","VG")
8
^SCR("P1EZA","NAME")

^SCR("P1EZA","P",5,"CHECK")
Y
^SCR("P1EZA","P",5,"CRD")
3,48,E,7,0
^SCR("P1EZA","P",5,"CREAT")

^SCR("P1EZA","P",5,"FNC")
F9
^SCR("P1EZA","P",5,"GLOB")
PAR
^SCR("P1EZA","P",5,"HELP")
<F9> - miqihxk zbvd , <F7> - cew itl , <F6> - my itl yetig
^SCR("P1EZA","P",5,"LMAX")
7
^SCR("P1EZA","P",5,"MUMPS1")

^SCR("P1EZA","P",5,"MUMPS2")
D REST^P1EZA
^SCR("P1EZA","P",5,"MUST")

^SCR("P1EZA","P",5,"NLN")
20
^SCR("P1EZA","P",5,"NS")
g
^SCR("P1EZA","P",5,"RZD")
**
^SCR("P1EZA","P",5,"TOPB")
8
^SCR("P1EZA","P",5,"TYP")
E
^SCR("P1EZA","P",5,"VRB")
MUZAR1
^SCR("P1EZA","P",6,"CRD")
3,47,H,30
^SCR("P1EZA","P",6,"HELP")

^SCR("P1EZA","P",6,"LMAX")
30
^SCR("P1EZA","P",6,"MUMPS1")

^SCR("P1EZA","P",6,"MUMPS2")

^SCR("P1EZA","P",6,"OUTPUT")

^SCR("P1EZA","P",6,"TYP")
H
^SCR("P1EZA","P",10,"CRD")
4,52,N,1,0
^SCR("P1EZA","P",10,"HELP")

^SCR("P1EZA","P",10,"LMAX")
4
^SCR("P1EZA","P",10,"MUMPS1")
S:'$G(MA) MA=1
^SCR("P1EZA","P",10,"MUMPS2")
S:MA<1 MA=1
^SCR("P1EZA","P",10,"MUST")

^SCR("P1EZA","P",10,"TYP")
N
^SCR("P1EZA","P","NAME","MA")
10
^SCR("P1EZA","P","NAME","MUZAR")
5
^SCR("P1EZA","P","NAME","MUZAR1")
6
^SCR("P1EZA","P","NM",5)
MUZAR
^SCR("P1EZA","P","NM",6)
MUZAR1
^SCR("P1EZA","P","NM",10)
MA
^SCR("P1EZH")
H
^SCR("P1EZH",1)
                               # hixtl zexrd zxcbd #                           
^SCR("P1EZH",2)
                                                                               
^SCR("P1EZH",3)
               {                           06} {05    } : hixt cew             
^SCR("P1EZH",4)
                                                                 1$            
^SCR("P1EZH",5)
                      :             dxrd xe`z        : dxrd 'qn :              
^SCR("P1EZH",6)
                                                                               
^SCR("P1EZH",7)
                                                                               
^SCR("P1EZH",8)
                                                                               
^SCR("P1EZH",9)
                                                                               
^SCR("P1EZH",10)
                                                                               
^SCR("P1EZH",11)
                                                                               
^SCR("P1EZH",12)
                                                                               
^SCR("P1EZH",13)
                                                                               
^SCR("P1EZH",14)
                                                                               
^SCR("P1EZH",15)
                                                                               
^SCR("P1EZH",16)
                                                                               
^SCR("P1EZH",17)
                                                                               
^SCR("P1EZH",18)
                                                                               
^SCR("P1EZH",19)
                 $1                                                            
^SCR("P1EZH","A",1)
ˆ‰˜”Œš…˜’„š˜ƒ‚„
^SCR("P1EZH","A",2)

^SCR("P1EZH","A",3)
:ˆ‰˜”ƒ…—
^SCR("P1EZH","A",4)

^SCR("P1EZH","A",5)
„˜’„˜…€š„˜’„'‘Ž
^SCR("P1EZH","A",6)
----------------------------------------
^SCR("P1EZH","A",7)

^SCR("P1EZH","A",8)

^SCR("P1EZH","A",9)

^SCR("P1EZH","A",10)

^SCR("P1EZH","A",11)

^SCR("P1EZH","A",12)

^SCR("P1EZH","A",13)

^SCR("P1EZH","A",14)

^SCR("P1EZH","A",15)

^SCR("P1EZH","A",16)

^SCR("P1EZH","A",17)

^SCR("P1EZH","A",18)

^SCR("P1EZH","A",19)

^SCR("P1EZH","AV",1)
yhrpk,urgv,rsdv
^SCR("P1EZH","AV",2)

^SCR("P1EZH","AV",3)
:yhrpsue
^SCR("P1EZH","AV",4)

^SCR("P1EZH","AV",5)
vrgvrut,vrgvwxn
^SCR("P1EZH","AV",6)
----------------------------------------
^SCR("P1EZH","AV",7)

^SCR("P1EZH","AV",8)

^SCR("P1EZH","AV",9)

^SCR("P1EZH","AV",10)

^SCR("P1EZH","AV",11)

^SCR("P1EZH","AV",12)

^SCR("P1EZH","AV",13)

^SCR("P1EZH","AV",14)

^SCR("P1EZH","AV",15)

^SCR("P1EZH","AV",16)

^SCR("P1EZH","AV",17)

^SCR("P1EZH","AV",18)

^SCR("P1EZH","AV",19)

^SCR("P1EZH","G",1,"CHECK")
Y
^SCR("P1EZH","G",1,"CRD")
6,64,E,8,0
^SCR("P1EZH","G",1,"CREAT")

^SCR("P1EZH","G",1,"FNC")

^SCR("P1EZH","G",1,"GLOB")
P1CODH
^SCR("P1EZH","G",1,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1EZH","G",1,"LMAX")
10
^SCR("P1EZH","G",1,"MUMPS1")

^SCR("P1EZH","G",1,"MUMPS2")
D UN^%L3MBG2(%SCRN,HRA)
^SCR("P1EZH","G",1,"MUST")

^SCR("P1EZH","G",1,"NLN")
20
^SCR("P1EZH","G",1,"NS")
J
^SCR("P1EZH","G",1,"RZD")
\
^SCR("P1EZH","G",1,"SHEM")
 dxrd 'qn 
^SCR("P1EZH","G",1,"TOPB")
8
^SCR("P1EZH","G",1,"TYP")
E
^SCR("P1EZH","G",1,"VRB")
HRA1
^SCR("P1EZH","G",2,"CRD")
6,53,H,20,0
^SCR("P1EZH","G",2,"HELP")

^SCR("P1EZH","G",2,"LMAX")
30
^SCR("P1EZH","G",2,"MUMPS1")

^SCR("P1EZH","G",2,"MUMPS2")

^SCR("P1EZH","G",2,"OUTPUT")

^SCR("P1EZH","G",2,"SHEM")
             dxrd xe`z        
^SCR("P1EZH","G",2,"TYP")
H
^SCR("P1EZH","G","DEL")
Y
^SCR("P1EZH","G","MAX")
99999
^SCR("P1EZH","G","NAME","HRA")
1
^SCR("P1EZH","G","NAME","HRA1")
2
^SCR("P1EZH","G","NM",1)
HRA
^SCR("P1EZH","G","NM",2)
HRA1
^SCR("P1EZH","G","RB")
5,18,20,67
^SCR("P1EZH","G","REF")
^TEMP($P,"EZH"
^SCR("P1EZH","G","RZD")
\
^SCR("P1EZH","G","STEP")
1
^SCR("P1EZH","G","STG")
                      :             dxrd xe`z        : dxrd 'qn :              
^SCR("P1EZH","G","VG")
7
^SCR("P1EZH","NAME")

^SCR("P1EZH","P",5,"CHECK")
Y
^SCR("P1EZH","P",5,"CRD")
3,47,E,7,0
^SCR("P1EZH","P",5,"CREAT")

^SCR("P1EZH","P",5,"FNC")
F9
^SCR("P1EZH","P",5,"GLOB")
PAR
^SCR("P1EZH","P",5,"HELP")
<F9> - miqihxk zbvd , <F7> - cew itl , <F6> - my itl yetig
^SCR("P1EZH","P",5,"LMAX")
7
^SCR("P1EZH","P",5,"MUMPS1")

^SCR("P1EZH","P",5,"MUMPS2")
D REST^P1EZH
^SCR("P1EZH","P",5,"MUST")

^SCR("P1EZH","P",5,"NLN")
20
^SCR("P1EZH","P",5,"NS")
g
^SCR("P1EZH","P",5,"RZD")
**
^SCR("P1EZH","P",5,"TOPB")
8
^SCR("P1EZH","P",5,"TYP")
E
^SCR("P1EZH","P",5,"VRB")
MUZAR1
^SCR("P1EZH","P",6,"CRD")
3,46,H,30,0
^SCR("P1EZH","P",6,"HELP")

^SCR("P1EZH","P",6,"LMAX")
30
^SCR("P1EZH","P",6,"MUMPS1")

^SCR("P1EZH","P",6,"MUMPS2")

^SCR("P1EZH","P",6,"OUTPUT")

^SCR("P1EZH","P",6,"TYP")
H
^SCR("P1EZH","P","NAME","MUZAR")
5
^SCR("P1EZH","P","NAME","MUZAR1")
6
^SCR("P1EZH","P","NM",5)
MUZAR
^SCR("P1EZH","P","NM",6)
MUZAR1
^SCR("P1EZHK")
H
^SCR("P1EZHK",1)
                       # mihixt zveawl zexrd zxcbd #                           
^SCR("P1EZHK",2)
                                                                               
^SCR("P1EZHK",3)
           {                           06} {05    } : mihixt zveaw             
^SCR("P1EZHK",4)
                                                                 1$            
^SCR("P1EZHK",5)
                      :             dxrd xe`z        : dxrd 'qn :              
^SCR("P1EZHK",6)
                                                                               
^SCR("P1EZHK",7)
                                                                               
^SCR("P1EZHK",8)
                                                                               
^SCR("P1EZHK",9)
                                                                               
^SCR("P1EZHK",10)
                                                                               
^SCR("P1EZHK",11)
                                                                               
^SCR("P1EZHK",12)
                                                                               
^SCR("P1EZHK",13)
                                                                               
^SCR("P1EZHK",14)
                                                                               
^SCR("P1EZHK",15)
                                                                               
^SCR("P1EZHK",16)
                                                                               
^SCR("P1EZHK",17)
                                                                               
^SCR("P1EZHK",18)
                                                                               
^SCR("P1EZHK",19)
                 $1                                                            
^SCR("P1EZHK","A",1)
�‰ˆ‰˜”š–…�—Œš…˜’„š˜ƒ‚„
^SCR("P1EZHK","A",2)

^SCR("P1EZHK","A",3)
:�‰ˆ‰˜”š–…�—
^SCR("P1EZHK","A",4)

^SCR("P1EZHK","A",5)
„˜’„˜…€š„˜’„'‘Ž
^SCR("P1EZHK","A",6)
----------------------------------------
^SCR("P1EZHK","A",7)

^SCR("P1EZHK","A",8)

^SCR("P1EZHK","A",9)

^SCR("P1EZHK","A",10)

^SCR("P1EZHK","A",11)

^SCR("P1EZHK","A",12)

^SCR("P1EZHK","A",13)

^SCR("P1EZHK","A",14)

^SCR("P1EZHK","A",15)

^SCR("P1EZHK","A",16)

^SCR("P1EZHK","A",17)

^SCR("P1EZHK","A",18)

^SCR("P1EZHK","A",19)

^SCR("P1EZHK","AV",1)
ohyhrp,mucek,urgv,rsdv
^SCR("P1EZHK","AV",2)

^SCR("P1EZHK","AV",3)
:ohyhrp,muce
^SCR("P1EZHK","AV",4)

^SCR("P1EZHK","AV",5)
vrgvrut,vrgvwxn
^SCR("P1EZHK","AV",6)
----------------------------------------
^SCR("P1EZHK","AV",7)

^SCR("P1EZHK","AV",8)

^SCR("P1EZHK","AV",9)

^SCR("P1EZHK","AV",10)

^SCR("P1EZHK","AV",11)

^SCR("P1EZHK","AV",12)

^SCR("P1EZHK","AV",13)

^SCR("P1EZHK","AV",14)

^SCR("P1EZHK","AV",15)

^SCR("P1EZHK","AV",16)

^SCR("P1EZHK","AV",17)

^SCR("P1EZHK","AV",18)

^SCR("P1EZHK","AV",19)

^SCR("P1EZHK","G",1,"CHECK")
Y
^SCR("P1EZHK","G",1,"CRD")
6,64,E,8,0
^SCR("P1EZHK","G",1,"CREAT")

^SCR("P1EZHK","G",1,"FNC")

^SCR("P1EZHK","G",1,"GLOB")
P1CODH
^SCR("P1EZHK","G",1,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1EZHK","G",1,"LMAX")
10
^SCR("P1EZHK","G",1,"MUMPS1")

^SCR("P1EZHK","G",1,"MUMPS2")
D UN^%L3MBG2(%SCRN,HRA)
^SCR("P1EZHK","G",1,"MUST")

^SCR("P1EZHK","G",1,"NLN")
20
^SCR("P1EZHK","G",1,"NS")
J
^SCR("P1EZHK","G",1,"RZD")
\
^SCR("P1EZHK","G",1,"SHEM")
 dxrd 'qn 
^SCR("P1EZHK","G",1,"TOPB")
8
^SCR("P1EZHK","G",1,"TYP")
E
^SCR("P1EZHK","G",1,"VRB")
HRA1
^SCR("P1EZHK","G",2,"CRD")
6,53,H,20,0
^SCR("P1EZHK","G",2,"HELP")

^SCR("P1EZHK","G",2,"LMAX")
30
^SCR("P1EZHK","G",2,"MUMPS1")

^SCR("P1EZHK","G",2,"MUMPS2")

^SCR("P1EZHK","G",2,"OUTPUT")

^SCR("P1EZHK","G",2,"SHEM")
             dxrd xe`z        
^SCR("P1EZHK","G",2,"TYP")
H
^SCR("P1EZHK","G","DEL")
Y
^SCR("P1EZHK","G","MAX")
99999
^SCR("P1EZHK","G","NAME","HRA")
1
^SCR("P1EZHK","G","NAME","HRA1")
2
^SCR("P1EZHK","G","NM",1)
HRA
^SCR("P1EZHK","G","NM",2)
HRA1
^SCR("P1EZHK","G","RB")
5,18,20,67
^SCR("P1EZHK","G","REF")
^TEMP($P,"EZHK"
^SCR("P1EZHK","G","RZD")
\
^SCR("P1EZHK","G","STEP")
1
^SCR("P1EZHK","G","STG")
                      :             dxrd xe`z        : dxrd 'qn :              
^SCR("P1EZHK","G","VG")
7
^SCR("P1EZHK","NAME")

^SCR("P1EZHK","P",5,"CHECK")
Y
^SCR("P1EZHK","P",5,"CRD")
3,43,E,5,0
^SCR("P1EZHK","P",5,"CREAT")

^SCR("P1EZHK","P",5,"FNC")
F9
^SCR("P1EZHK","P",5,"GLOB")
PARSUG
^SCR("P1EZHK","P",5,"HELP")
<F9> - miqihxk zbvd , <F7> - cew itl , <F6> - my itl yetig
^SCR("P1EZHK","P",5,"LMAX")
7
^SCR("P1EZHK","P",5,"MUMPS1")

^SCR("P1EZHK","P",5,"MUMPS2")
D REST^P1EZHK
^SCR("P1EZHK","P",5,"MUST")

^SCR("P1EZHK","P",5,"NLN")
20
^SCR("P1EZHK","P",5,"NS")
g
^SCR("P1EZHK","P",5,"RZD")
**
^SCR("P1EZHK","P",5,"TOPB")
8
^SCR("P1EZHK","P",5,"TYP")
E
^SCR("P1EZHK","P",5,"VRB")
SUGP1
^SCR("P1EZHK","P",6,"CRD")
3,42,H,30
^SCR("P1EZHK","P",6,"HELP")

^SCR("P1EZHK","P",6,"LMAX")
30
^SCR("P1EZHK","P",6,"MUMPS1")

^SCR("P1EZHK","P",6,"MUMPS2")

^SCR("P1EZHK","P",6,"OUTPUT")

^SCR("P1EZHK","P",6,"TYP")
H
^SCR("P1EZHK","P","NAME","SUGP")
5
^SCR("P1EZHK","P","NAME","SUGP1")
6
^SCR("P1EZHK","P","NM",5)
SUGP
^SCR("P1EZHK","P","NM",6)
SUGP1
^SCR("P1EZK")
H
^SCR("P1EZK",1)
                      # mihixt zveawl zetqez zxcbd #                           
^SCR("P1EZK",2)
                                                                               
^SCR("P1EZK",3)
       {                           06} {05    } :     mihixt zveaw             
^SCR("P1EZK",4)
                                           { 10}:(l/k) daeg zetqez             
^SCR("P1EZK",5)
                                                                 1$            
^SCR("P1EZK",6)
                    :  xign  :       ztqez xe`z     : ztqez cew :              
^SCR("P1EZK",7)
                                                                               
^SCR("P1EZK",8)
                                                                               
^SCR("P1EZK",9)
                                                                               
^SCR("P1EZK",10)
                                                                               
^SCR("P1EZK",11)
                                                                               
^SCR("P1EZK",12)
                                                                               
^SCR("P1EZK",13)
                                                                               
^SCR("P1EZK",14)
                                                                               
^SCR("P1EZK",15)
                                                                               
^SCR("P1EZK",16)
                                                                               
^SCR("P1EZK",17)
                                                                               
^SCR("P1EZK",18)
                                                                               
^SCR("P1EZK",19)
                                                                               
^SCR("P1EZK",20)
                 $1                                                            
^SCR("P1EZK",21)
                 $1                                                            
^SCR("P1EZK","A",1)
�‰ˆ‰˜”š–…�—Œš…”‘…šš˜ƒ‚„
^SCR("P1EZK","A",2)

^SCR("P1EZK","A",3)
:�‰ˆ‰˜”š–…�—
^SCR("P1EZK","A",4)
:(Œ/‹)„�…‡š…”‘…š
^SCR("P1EZK","A",5)

^SCR("P1EZK","A",6)
˜‰‡Žš”‘…š˜…€šš”‘…šƒ…—
^SCR("P1EZK","A",7)
-----------------------------------------
^SCR("P1EZK","A",8)

^SCR("P1EZK","A",9)

^SCR("P1EZK","A",10)

^SCR("P1EZK","A",11)

^SCR("P1EZK","A",12)

^SCR("P1EZK","A",13)

^SCR("P1EZK","A",14)

^SCR("P1EZK","A",15)

^SCR("P1EZK","A",16)

^SCR("P1EZK","A",17)

^SCR("P1EZK","A",18)

^SCR("P1EZK","A",19)

^SCR("P1EZK","A",20)

^SCR("P1EZK","A",21)
$1
^SCR("P1EZK","AV",1)
ohyhrp,mucek,upxu,,rsdv
^SCR("P1EZK","AV",2)

^SCR("P1EZK","AV",3)
:ohyhrp,muce
^SCR("P1EZK","AV",4)
:(kqf)vcuj,upxu,
^SCR("P1EZK","AV",5)

^SCR("P1EZK","AV",6)
rhjn,pxu,rut,,pxu,sue
^SCR("P1EZK","AV",7)
-----------------------------------------
^SCR("P1EZK","AV",8)

^SCR("P1EZK","AV",9)

^SCR("P1EZK","AV",10)

^SCR("P1EZK","AV",11)

^SCR("P1EZK","AV",12)

^SCR("P1EZK","AV",13)

^SCR("P1EZK","AV",14)

^SCR("P1EZK","AV",15)

^SCR("P1EZK","AV",16)

^SCR("P1EZK","AV",17)

^SCR("P1EZK","AV",18)

^SCR("P1EZK","AV",19)

^SCR("P1EZK","AV",20)

^SCR("P1EZK","AV",21)
$1
^SCR("P1EZK","G",1,"CHECK")
Y
^SCR("P1EZK","G",1,"CRD")
7,64,E,8,0
^SCR("P1EZK","G",1,"CREAT")

^SCR("P1EZK","G",1,"FNC")
F6,F7,F9
^SCR("P1EZK","G",1,"GLOB")
PAR
^SCR("P1EZK","G",1,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1EZK","G",1,"LMAX")
11
^SCR("P1EZK","G",1,"MUMPS1")

^SCR("P1EZK","G",1,"MUMPS2")
D BDIKA^P1EZM
^SCR("P1EZK","G",1,"MUST")

^SCR("P1EZK","G",1,"NLN")
20
^SCR("P1EZK","G",1,"NS")
J
^SCR("P1EZK","G",1,"RZD")
**
^SCR("P1EZK","G",1,"SHEM")
 ztqez cew 
^SCR("P1EZK","G",1,"TOPB")
8
^SCR("P1EZK","G",1,"TYP")
E
^SCR("P1EZK","G",1,"VRB")
PARIT1
^SCR("P1EZK","G",2,"CRD")
7,52,H,20,0
^SCR("P1EZK","G",2,"HELP")

^SCR("P1EZK","G",2,"LMAX")
22
^SCR("P1EZK","G",2,"MUMPS1")

^SCR("P1EZK","G",2,"MUMPS2")

^SCR("P1EZK","G",2,"OUTPUT")

^SCR("P1EZK","G",2,"SHEM")
       ztqez xe`z     
^SCR("P1EZK","G",2,"TYP")
H
^SCR("P1EZK","G",3,"CRD")
7,29,N,7,2
^SCR("P1EZK","G",3,"HELP")

^SCR("P1EZK","G",3,"LMAX")
8
^SCR("P1EZK","G",3,"MUMPS1")

^SCR("P1EZK","G",3,"MUMPS2")

^SCR("P1EZK","G",3,"SHEM")
  xign  
^SCR("P1EZK","G",3,"TYP")
N
^SCR("P1EZK","G","DEL")
Y
^SCR("P1EZK","G","MAX")
99999
^SCR("P1EZK","G","NAME","MH")
3
^SCR("P1EZK","G","NAME","PARIT")
1
^SCR("P1EZK","G","NAME","PARIT1")
2
^SCR("P1EZK","G","NM",1)
PARIT
^SCR("P1EZK","G","NM",2)
PARIT1
^SCR("P1EZK","G","NM",3)
MH
^SCR("P1EZK","G","RB")
6,18,21,67
^SCR("P1EZK","G","REF")
^TEMP($P,"EZ"
^SCR("P1EZK","G","RZD")
\
^SCR("P1EZK","G","STEP")
1
^SCR("P1EZK","G","STG")
                    :  xign  :       ztqez xe`z     : ztqez cew :              
^SCR("P1EZK","G","VG")
8
^SCR("P1EZK","NAME")

^SCR("P1EZK","P",5,"CHECK")
Y
^SCR("P1EZK","P",5,"CRD")
3,39,E,7,0
^SCR("P1EZK","P",5,"CREAT")

^SCR("P1EZK","P",5,"FNC")
F9
^SCR("P1EZK","P",5,"GLOB")
PARSUG
^SCR("P1EZK","P",5,"HELP")
<F9> - miqihxk zbvd , <F7> -  zeveaw zbvd, <F6> - my itl yetig
^SCR("P1EZK","P",5,"LMAX")
7
^SCR("P1EZK","P",5,"MUMPS1")

^SCR("P1EZK","P",5,"MUMPS2")
D REST^P1EZK
^SCR("P1EZK","P",5,"MUST")

^SCR("P1EZK","P",5,"NLN")
20
^SCR("P1EZK","P",5,"NS")
g
^SCR("P1EZK","P",5,"RZD")
**
^SCR("P1EZK","P",5,"TOPB")
8
^SCR("P1EZK","P",5,"TYP")
E
^SCR("P1EZK","P",5,"VRB")
MUZAR1
^SCR("P1EZK","P",6,"CRD")
3,38,H,30,0
^SCR("P1EZK","P",6,"HELP")

^SCR("P1EZK","P",6,"LMAX")
30
^SCR("P1EZK","P",6,"MUMPS1")

^SCR("P1EZK","P",6,"MUMPS2")

^SCR("P1EZK","P",6,"OUTPUT")

^SCR("P1EZK","P",6,"TYP")
H
^SCR("P1EZK","P",10,"CRD")
4,48,H,1,0
^SCR("P1EZK","P",10,"HELP")

^SCR("P1EZK","P",10,"LMAX")
4
^SCR("P1EZK","P",10,"MUMPS1")

^SCR("P1EZK","P",10,"MUMPS2")
S %MSC("TO")="PL" I $$^%L1YN("MUST")<0 S %SC("ER")=1
^SCR("P1EZK","P",10,"TYP")
H
^SCR("P1EZK","P",15,"CRD")
5,14,N,3,0
^SCR("P1EZK","P",15,"HELP")

^SCR("P1EZK","P",15,"LMAX")
4
^SCR("P1EZK","P",15,"MUMPS1")
S:'MAXT MAXT=1
^SCR("P1EZK","P",15,"MUMPS2")

^SCR("P1EZK","P",15,"TYP")
N
^SCR("P1EZK","P","NAME","MAXT")
15
^SCR("P1EZK","P","NAME","MUST")
10
^SCR("P1EZK","P","NAME","MUZAR")
5
^SCR("P1EZK","P","NAME","MUZAR1")
6
^SCR("P1EZK","P","NM",5)
MUZAR
^SCR("P1EZK","P","NM",6)
MUZAR1
^SCR("P1EZK","P","NM",10)
MUST
^SCR("P1EZK","P","NM",15)
MAXT
^SCR("P1EZL")
H
^SCR("P1EZL",1)
                                 # zegewl ur #                                 
^SCR("P1EZL",2)
                                                                               
^SCR("P1EZL",3)
             {                           06} {05          :iy`x gewl cew       
^SCR("P1EZL",4)
                                                                               
^SCR("P1EZL",5)
                                                                      1$       
^SCR("P1EZL",6)
                           :         gewl my        :  gewl 'qn  :             
^SCR("P1EZL",7)
                                                                               
^SCR("P1EZL",8)
                                                                               
^SCR("P1EZL",9)
                                                                               
^SCR("P1EZL",10)
                                                                               
^SCR("P1EZL",11)
                                                                               
^SCR("P1EZL",12)
                                                                               
^SCR("P1EZL",13)
                                                                               
^SCR("P1EZL",14)
                                                                               
^SCR("P1EZL",15)
                                                                               
^SCR("P1EZL",16)
                                                                               
^SCR("P1EZL",17)
                                                                               
^SCR("P1EZL",18)
                                                                               
^SCR("P1EZL",19)
                                                                               
^SCR("P1EZL",20)
                       $1                                                      
^SCR("P1EZL","A",1)
š…‡…—Œ•’
^SCR("P1EZL","A",2)

^SCR("P1EZL","A",3)
:‰™€˜‡…—Œƒ…—
^SCR("P1EZL","A",4)

^SCR("P1EZL","A",5)

^SCR("P1EZL","A",6)
‡…—Œ�™‡…—Œ'‘Ž
^SCR("P1EZL","A",7)
------------------------------------
^SCR("P1EZL","A",8)

^SCR("P1EZL","A",9)

^SCR("P1EZL","A",10)

^SCR("P1EZL","A",11)

^SCR("P1EZL","A",12)

^SCR("P1EZL","A",13)

^SCR("P1EZL","A",14)

^SCR("P1EZL","A",15)

^SCR("P1EZL","A",16)

^SCR("P1EZL","A",17)

^SCR("P1EZL","A",18)

^SCR("P1EZL","A",19)

^SCR("P1EZL","A",20)

^SCR("P1EZL","AV",1)
,ujuek•g
^SCR("P1EZL","AV",2)

^SCR("P1EZL","AV",3)
:hatrjueksue
^SCR("P1EZL","AV",4)

^SCR("P1EZL","AV",5)

^SCR("P1EZL","AV",6)
juekoajuekwxn
^SCR("P1EZL","AV",7)
------------------------------------
^SCR("P1EZL","AV",8)

^SCR("P1EZL","AV",9)

^SCR("P1EZL","AV",10)

^SCR("P1EZL","AV",11)

^SCR("P1EZL","AV",12)

^SCR("P1EZL","AV",13)

^SCR("P1EZL","AV",14)

^SCR("P1EZL","AV",15)

^SCR("P1EZL","AV",16)

^SCR("P1EZL","AV",17)

^SCR("P1EZL","AV",18)

^SCR("P1EZL","AV",19)

^SCR("P1EZL","AV",20)

^SCR("P1EZL","G",1,"CHECK")
Y
^SCR("P1EZL","G",1,"CRD")
7,65,E,10,0
^SCR("P1EZL","G",1,"CREAT")

^SCR("P1EZL","G",1,"FNC")

^SCR("P1EZL","G",1,"GLOB")
LKH
^SCR("P1EZL","G",1,"HELP")

^SCR("P1EZL","G",1,"LMAX")
12
^SCR("P1EZL","G",1,"MUMPS1")

^SCR("P1EZL","G",1,"MUMPS2")
D BDIKA^P1EZL
^SCR("P1EZL","G",1,"MUST")

^SCR("P1EZL","G",1,"NLN")
20
^SCR("P1EZL","G",1,"NS")
J
^SCR("P1EZL","G",1,"RZD")
*
^SCR("P1EZL","G",1,"SHEM")
  gewl 'qn  
^SCR("P1EZL","G",1,"TOPB")
8
^SCR("P1EZL","G",1,"TYP")
E
^SCR("P1EZL","G",1,"VRB")
LK21
^SCR("P1EZL","G",2,"CRD")
7,52,H,20,0
^SCR("P1EZL","G",2,"HELP")

^SCR("P1EZL","G",2,"LMAX")
24
^SCR("P1EZL","G",2,"MUMPS1")

^SCR("P1EZL","G",2,"MUMPS2")

^SCR("P1EZL","G",2,"OUTPUT")

^SCR("P1EZL","G",2,"SHEM")
         gewl my        
^SCR("P1EZL","G",2,"TYP")
H
^SCR("P1EZL","G","DEL")
Y
^SCR("P1EZL","G","MAX")
99999
^SCR("P1EZL","G","NAME","LK2")
1
^SCR("P1EZL","G","NAME","LK21")
2
^SCR("P1EZL","G","NM",1)
LK2
^SCR("P1EZL","G","NM",2)
LK21
^SCR("P1EZL","G","RB")
6,24,21,72
^SCR("P1EZL","G","REF")
^TEMP($P,"EZ"
^SCR("P1EZL","G","RZD")
\
^SCR("P1EZL","G","STEP")
1
^SCR("P1EZL","G","STG")
                           :         gewl my        :  gewl 'qn  :             
^SCR("P1EZL","G","VG")
8
^SCR("P1EZL","NAME")

^SCR("P1EZL","P",5,"CHECK")
Y
^SCR("P1EZL","P",5,"CRD")
3,45,E,10,0
^SCR("P1EZL","P",5,"CREAT")

^SCR("P1EZL","P",5,"FNC")
F8,F9
^SCR("P1EZL","P",5,"GLOB")
LKH
^SCR("P1EZL","P",5,"HELP")
<F9>- gewl qihxk ,<F8>- miy`x zegewl zniyx , <F7>- dniyx ,<F6>- my itl yetig
^SCR("P1EZL","P",5,"LMAX")
13
^SCR("P1EZL","P",5,"MUMPS1")

^SCR("P1EZL","P",5,"MUMPS2")
D REST^P1EZL
^SCR("P1EZL","P",5,"MUST")

^SCR("P1EZL","P",5,"NLN")
20
^SCR("P1EZL","P",5,"NS")
g
^SCR("P1EZL","P",5,"RZD")
*
^SCR("P1EZL","P",5,"TOPB")
8
^SCR("P1EZL","P",5,"TYP")
E
^SCR("P1EZL","P",5,"VRB")
LK11
^SCR("P1EZL","P",6,"CRD")
3,44,H,30
^SCR("P1EZL","P",6,"HELP")

^SCR("P1EZL","P",6,"LMAX")
30
^SCR("P1EZL","P",6,"MUMPS1")

^SCR("P1EZL","P",6,"MUMPS2")

^SCR("P1EZL","P",6,"OUTPUT")

^SCR("P1EZL","P",6,"TYP")
H
^SCR("P1EZL","P","NAME","LK1")
5
^SCR("P1EZL","P","NAME","LK11")
6
^SCR("P1EZL","P","NM",5)
LK1
^SCR("P1EZL","P","NM",6)
LK11
^SCR("P1EZLPR")
H
^SCR("P1EZLPR",1)
                  # zegewl ceg` lewehext #                                     
^SCR("P1EZLPR",2)
                                                                               
^SCR("P1EZLPR",3)
                    {10      : jix`z cr       {05      : jix`zn                
^SCR("P1EZLPR",4)
                                                                             1$
^SCR("P1EZLPR",5)
  : dlert :      my      : iy`x gewl:       my     : ccea gewl: dry : jix`z :  
^SCR("P1EZLPR",6)
                                                                               
^SCR("P1EZLPR",7)
                                                                               
^SCR("P1EZLPR",8)
                                                                               
^SCR("P1EZLPR",9)
                                                                               
^SCR("P1EZLPR",10)
                                                                               
^SCR("P1EZLPR",11)
                                                                               
^SCR("P1EZLPR",12)
                                                                               
^SCR("P1EZLPR",13)
                                                                               
^SCR("P1EZLPR",14)
                                                                               
^SCR("P1EZLPR",15)
                                                                               
^SCR("P1EZLPR",16)
                                                                               
^SCR("P1EZLPR",17)
                                                                               
^SCR("P1EZLPR",18)
                                                                               
^SCR("P1EZLPR",19)
                                                                               
^SCR("P1EZLPR",20)
                                                                               
^SCR("P1EZLPR",21)
 $1                                                                            
^SCR("P1EZLPR","A",1)
š…‡…—Œƒ…‡€Œ…—…ˆ…˜”
^SCR("P1EZLPR","A",2)

^SCR("P1EZLPR","A",3)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1EZLPR","A",4)

^SCR("P1EZLPR","A",5)
„Œ…’”�™‰™€˜‡…—Œ�™ƒƒ…�‡…—Œ„’™Š‰˜€š
^SCR("P1EZLPR","A",6)
---------------------------------------------------------------------
^SCR("P1EZLPR","A",7)

^SCR("P1EZLPR","A",8)

^SCR("P1EZLPR","A",9)

^SCR("P1EZLPR","A",10)

^SCR("P1EZLPR","A",11)

^SCR("P1EZLPR","A",12)

^SCR("P1EZLPR","A",13)

^SCR("P1EZLPR","A",14)

^SCR("P1EZLPR","A",15)

^SCR("P1EZLPR","A",16)

^SCR("P1EZLPR","A",17)

^SCR("P1EZLPR","A",18)

^SCR("P1EZLPR","A",19)

^SCR("P1EZLPR","A",20)

^SCR("P1EZLPR","A",21)

^SCR("P1EZLPR","AV",1)
,ujueksujtkueuyurp
^SCR("P1EZLPR","AV",2)

^SCR("P1EZLPR","AV",3)
:lhrt,sg:lhrt,n
^SCR("P1EZLPR","AV",4)

^SCR("P1EZLPR","AV",5)
vkugpoahatrjuekoassucjuekvgalhrt,
^SCR("P1EZLPR","AV",6)
---------------------------------------------------------------------
^SCR("P1EZLPR","AV",7)

^SCR("P1EZLPR","AV",8)

^SCR("P1EZLPR","AV",9)

^SCR("P1EZLPR","AV",10)

^SCR("P1EZLPR","AV",11)

^SCR("P1EZLPR","AV",12)

^SCR("P1EZLPR","AV",13)

^SCR("P1EZLPR","AV",14)

^SCR("P1EZLPR","AV",15)

^SCR("P1EZLPR","AV",16)

^SCR("P1EZLPR","AV",17)

^SCR("P1EZLPR","AV",18)

^SCR("P1EZLPR","AV",19)

^SCR("P1EZLPR","AV",20)

^SCR("P1EZLPR","AV",21)

^SCR("P1EZLPR","G",1,"CRD")
6,76,E,7,0
^SCR("P1EZLPR","G",1,"HELP")

^SCR("P1EZLPR","G",1,"LMAX")
7
^SCR("P1EZLPR","G",1,"MUMPS1")

^SCR("P1EZLPR","G",1,"MUMPS2")

^SCR("P1EZLPR","G",1,"OUTPUT")

^SCR("P1EZLPR","G",1,"SHEM")
 jix`z 
^SCR("P1EZLPR","G",1,"TYP")
E
^SCR("P1EZLPR","G",2,"CRD")
6,68,E,5,0
^SCR("P1EZLPR","G",2,"HELP")

^SCR("P1EZLPR","G",2,"LMAX")
5
^SCR("P1EZLPR","G",2,"MUMPS1")

^SCR("P1EZLPR","G",2,"MUMPS2")

^SCR("P1EZLPR","G",2,"OUTPUT")

^SCR("P1EZLPR","G",2,"SHEM")
 dry 
^SCR("P1EZLPR","G",2,"TYP")
E
^SCR("P1EZLPR","G",3,"CRD")
6,62,E,10,0
^SCR("P1EZLPR","G",3,"HELP")

^SCR("P1EZLPR","G",3,"LMAX")
10
^SCR("P1EZLPR","G",3,"MUMPS1")

^SCR("P1EZLPR","G",3,"MUMPS2")

^SCR("P1EZLPR","G",3,"OUTPUT")

^SCR("P1EZLPR","G",3,"SHEM")
 ccea gewl
^SCR("P1EZLPR","G",3,"TYP")
E
^SCR("P1EZLPR","G",4,"CRD")
6,51,H,14,0
^SCR("P1EZLPR","G",4,"HELP")

^SCR("P1EZLPR","G",4,"LMAX")
14
^SCR("P1EZLPR","G",4,"MUMPS1")

^SCR("P1EZLPR","G",4,"MUMPS2")

^SCR("P1EZLPR","G",4,"OUTPUT")

^SCR("P1EZLPR","G",4,"SHEM")
       my     
^SCR("P1EZLPR","G",4,"TYP")
H
^SCR("P1EZLPR","G",5,"CRD")
6,36,E,10,0
^SCR("P1EZLPR","G",5,"HELP")

^SCR("P1EZLPR","G",5,"LMAX")
10
^SCR("P1EZLPR","G",5,"MUMPS1")

^SCR("P1EZLPR","G",5,"MUMPS2")

^SCR("P1EZLPR","G",5,"OUTPUT")

^SCR("P1EZLPR","G",5,"SHEM")
 iy`x gewl
^SCR("P1EZLPR","G",5,"TYP")
E
^SCR("P1EZLPR","G",6,"CRD")
6,25,H,14,0
^SCR("P1EZLPR","G",6,"HELP")

^SCR("P1EZLPR","G",6,"LMAX")
14
^SCR("P1EZLPR","G",6,"MUMPS1")

^SCR("P1EZLPR","G",6,"MUMPS2")

^SCR("P1EZLPR","G",6,"OUTPUT")

^SCR("P1EZLPR","G",6,"SHEM")
      my      
^SCR("P1EZLPR","G",6,"TYP")
H
^SCR("P1EZLPR","G",7,"CRD")
6,10,H,7,0
^SCR("P1EZLPR","G",7,"HELP")

^SCR("P1EZLPR","G",7,"LMAX")
7
^SCR("P1EZLPR","G",7,"MUMPS1")

^SCR("P1EZLPR","G",7,"MUMPS2")

^SCR("P1EZLPR","G",7,"OUTPUT")

^SCR("P1EZLPR","G",7,"SHEM")
 dlert 
^SCR("P1EZLPR","G",7,"TYP")
H
^SCR("P1EZLPR","G","DEL")

^SCR("P1EZLPR","G","MAX")
99999
^SCR("P1EZLPR","G","NAME","LKHB")
3
^SCR("P1EZLPR","G","NAME","LKHB1")
4
^SCR("P1EZLPR","G","NAME","LKHR")
5
^SCR("P1EZLPR","G","NAME","LKHR1")
6
^SCR("P1EZLPR","G","NAME","PEULA")
7
^SCR("P1EZLPR","G","NAME","SHAA")
2
^SCR("P1EZLPR","G","NAME","TRH")
1
^SCR("P1EZLPR","G","NM",1)
TRH
^SCR("P1EZLPR","G","NM",2)
SHAA
^SCR("P1EZLPR","G","NM",3)
LKHB
^SCR("P1EZLPR","G","NM",4)
LKHB1
^SCR("P1EZLPR","G","NM",5)
LKHR
^SCR("P1EZLPR","G","NM",6)
LKHR1
^SCR("P1EZLPR","G","NM",7)
PEULA
^SCR("P1EZLPR","G","RB")
5,2,22,79
^SCR("P1EZLPR","G","REF")
^TEMP($P
^SCR("P1EZLPR","G","RZD")
\
^SCR("P1EZLPR","G","STEP")
1
^SCR("P1EZLPR","G","STG")
  : dlert :      my      : iy`x gewl:       my     : ccea gewl: dry : jix`z :  
^SCR("P1EZLPR","G","VG")
7
^SCR("P1EZLPR","NAME")
zegewl ceg` lewehext
^SCR("P1EZLPR","P",5,"CRD")
3,46,D,8,0
^SCR("P1EZLPR","P",5,"HELP")

^SCR("P1EZLPR","P",5,"LMAX")
9
^SCR("P1EZLPR","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($H,1)
^SCR("P1EZLPR","P",5,"MUMPS2")

^SCR("P1EZLPR","P",5,"TYP")
D
^SCR("P1EZLPR","P",10,"CRD")
3,20,D,8,0
^SCR("P1EZLPR","P",10,"HELP")

^SCR("P1EZLPR","P",10,"LMAX")
9
^SCR("P1EZLPR","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1EZLPR","P",10,"MUMPS2")
D DAT2^P1EZLPR
^SCR("P1EZLPR","P",10,"TYP")
D
^SCR("P1EZLPR","P","NAME","DAT1")
5
^SCR("P1EZLPR","P","NAME","DAT2")
10
^SCR("P1EZLPR","P","NM",5)
DAT1
^SCR("P1EZLPR","P","NM",10)
DAT2
^SCR("P1EZM")
H
^SCR("P1EZM",1)
                              # hixtl zetqez zxcbd #                           
^SCR("P1EZM",2)
                                                                               
^SCR("P1EZM",3)
               {                           06} {05    } : hixt cew             
^SCR("P1EZM",4)
                                           { 10}:(l/k) daeg zetqez             
^SCR("P1EZM",5)
                  {15 }: (lcgn zxixa)  rbn jqna dxigal zetqez xtqn             
^SCR("P1EZM",6)
                                                                        1$     
^SCR("P1EZM",7)
           : ('wc) didyd :  xign  :       ztqez xe`z     : ztqez cew :         
^SCR("P1EZM",8)
                                                                               
^SCR("P1EZM",9)
                                                                               
^SCR("P1EZM",10)
                                                                               
^SCR("P1EZM",11)
                                                                               
^SCR("P1EZM",12)
                                                                               
^SCR("P1EZM",13)
                                                                               
^SCR("P1EZM",14)
                                                                               
^SCR("P1EZM",15)
                                                                               
^SCR("P1EZM",16)
                                                                               
^SCR("P1EZM",17)
                                                                               
^SCR("P1EZM",18)
                                                                               
^SCR("P1EZM",19)
                                                                               
^SCR("P1EZM",20)
                                                                               
^SCR("P1EZM",21)
         $1                                                                    
^SCR("P1EZM","A",1)
ˆ‰˜”Œš…”‘…šš˜ƒ‚„
^SCR("P1EZM","A",2)

^SCR("P1EZM","A",3)
:ˆ‰˜”ƒ…—
^SCR("P1EZM","A",4)
:(Œ/‹)„�…‡š…”‘…š
^SCR("P1EZM","A",5)
:(Œƒ‡Žš˜‰˜�)’‚ŽŠ‘Ž�„˜‰‡�Œš…”‘…š˜”‘Ž
^SCR("P1EZM","A",6)

^SCR("P1EZM","A",7)
('—ƒ)„‰„™„˜‰‡Žš”‘…š˜…€šš”‘…šƒ…—
^SCR("P1EZM","A",8)
------------------------------------------------------
^SCR("P1EZM","A",9)

^SCR("P1EZM","A",10)

^SCR("P1EZM","A",11)

^SCR("P1EZM","A",12)

^SCR("P1EZM","A",13)

^SCR("P1EZM","A",14)

^SCR("P1EZM","A",15)

^SCR("P1EZM","A",16)

^SCR("P1EZM","A",17)

^SCR("P1EZM","A",18)

^SCR("P1EZM","A",19)

^SCR("P1EZM","A",20)

^SCR("P1EZM","A",21)

^SCR("P1EZM","AV",1)
yhrpk,upxu,,rsdv
^SCR("P1EZM","AV",2)

^SCR("P1EZM","AV",3)
:yhrpsue
^SCR("P1EZM","AV",4)
:(kqf)vcuj,upxu,
^SCR("P1EZM","AV",5)
:(ksjn,rhrc)gdnlxncvrhjck,upxu,rpxn
^SCR("P1EZM","AV",6)

^SCR("P1EZM","AV",7)
(wes)vhvavrhjn,pxu,rut,,pxu,sue
^SCR("P1EZM","AV",8)
------------------------------------------------------
^SCR("P1EZM","AV",9)

^SCR("P1EZM","AV",10)

^SCR("P1EZM","AV",11)

^SCR("P1EZM","AV",12)

^SCR("P1EZM","AV",13)

^SCR("P1EZM","AV",14)

^SCR("P1EZM","AV",15)

^SCR("P1EZM","AV",16)

^SCR("P1EZM","AV",17)

^SCR("P1EZM","AV",18)

^SCR("P1EZM","AV",19)

^SCR("P1EZM","AV",20)

^SCR("P1EZM","AV",21)

^SCR("P1EZM","G",1,"CHECK")
Y
^SCR("P1EZM","G",1,"CRD")
8,69,E,8,0
^SCR("P1EZM","G",1,"CREAT")

^SCR("P1EZM","G",1,"FNC")
F6,F7,F9
^SCR("P1EZM","G",1,"GLOB")
PAR
^SCR("P1EZM","G",1,"HELP")
<F7> - mihixt zbvd , <F6> - my itl yetig
^SCR("P1EZM","G",1,"LMAX")
11
^SCR("P1EZM","G",1,"MUMPS1")

^SCR("P1EZM","G",1,"MUMPS2")
D BDIKA^P1EZM
^SCR("P1EZM","G",1,"MUST")

^SCR("P1EZM","G",1,"NLN")
20
^SCR("P1EZM","G",1,"NS")
J
^SCR("P1EZM","G",1,"RZD")
**
^SCR("P1EZM","G",1,"SHEM")
 ztqez cew 
^SCR("P1EZM","G",1,"TOPB")
8
^SCR("P1EZM","G",1,"TYP")
E
^SCR("P1EZM","G",1,"VRB")
PARIT1
^SCR("P1EZM","G",2,"CRD")
8,57,H,20,0
^SCR("P1EZM","G",2,"HELP")

^SCR("P1EZM","G",2,"LMAX")
22
^SCR("P1EZM","G",2,"MUMPS1")

^SCR("P1EZM","G",2,"MUMPS2")

^SCR("P1EZM","G",2,"OUTPUT")

^SCR("P1EZM","G",2,"SHEM")
       ztqez xe`z     
^SCR("P1EZM","G",2,"TYP")
H
^SCR("P1EZM","G",3,"CRD")
8,34,N,7,2
^SCR("P1EZM","G",3,"HELP")

^SCR("P1EZM","G",3,"LMAX")
8
^SCR("P1EZM","G",3,"MUMPS1")

^SCR("P1EZM","G",3,"MUMPS2")

^SCR("P1EZM","G",3,"SHEM")
  xign  
^SCR("P1EZM","G",3,"TYP")
N
^SCR("P1EZM","G",4,"CRD")
8,25,N,2,0
^SCR("P1EZM","G",4,"HELP")

^SCR("P1EZM","G",4,"LMAX")
13
^SCR("P1EZM","G",4,"MUMPS1")

^SCR("P1EZM","G",4,"MUMPS2")

^SCR("P1EZM","G",4,"SHEM")
 ('wc) didyd 
^SCR("P1EZM","G",4,"TYP")
N
^SCR("P1EZM","G","DEL")
Y
^SCR("P1EZM","G","MAX")
99999
^SCR("P1EZM","G","NAME","DELAY")
4
^SCR("P1EZM","G","NAME","MH")
3
^SCR("P1EZM","G","NAME","PARIT")
1
^SCR("P1EZM","G","NAME","PARIT1")
2
^SCR("P1EZM","G","NM",1)
PARIT
^SCR("P1EZM","G","NM",2)
PARIT1
^SCR("P1EZM","G","NM",3)
MH
^SCR("P1EZM","G","NM",4)
DELAY
^SCR("P1EZM","G","RB")
7,10,22,74
^SCR("P1EZM","G","REF")
^TEMP($P,"EZ"
^SCR("P1EZM","G","RZD")
\
^SCR("P1EZM","G","STEP")
1
^SCR("P1EZM","G","STG")
           : ('wc) didyd :  xign  :       ztqez xe`z     : ztqez cew :         
^SCR("P1EZM","G","VG")
9
^SCR("P1EZM","NAME")
xven ur
^SCR("P1EZM","P",5,"CHECK")
Y
^SCR("P1EZM","P",5,"CRD")
3,47,E,7,0
^SCR("P1EZM","P",5,"CREAT")

^SCR("P1EZM","P",5,"FNC")
F9
^SCR("P1EZM","P",5,"GLOB")
PAR
^SCR("P1EZM","P",5,"HELP")
<F9> - miqihxk zbvd , <F7> - cew itl , <F6> - my itl yetig
^SCR("P1EZM","P",5,"LMAX")
7
^SCR("P1EZM","P",5,"MUMPS1")

^SCR("P1EZM","P",5,"MUMPS2")
D REST^P1EZM
^SCR("P1EZM","P",5,"MUST")

^SCR("P1EZM","P",5,"NLN")
20
^SCR("P1EZM","P",5,"NS")
g
^SCR("P1EZM","P",5,"RZD")
**
^SCR("P1EZM","P",5,"TOPB")
8
^SCR("P1EZM","P",5,"TYP")
E
^SCR("P1EZM","P",5,"VRB")
MUZAR1
^SCR("P1EZM","P",6,"CRD")
3,46,H,30
^SCR("P1EZM","P",6,"HELP")

^SCR("P1EZM","P",6,"LMAX")
30
^SCR("P1EZM","P",6,"MUMPS1")

^SCR("P1EZM","P",6,"MUMPS2")

^SCR("P1EZM","P",6,"OUTPUT")

^SCR("P1EZM","P",6,"TYP")
H
^SCR("P1EZM","P",10,"CRD")
4,48,H,1
^SCR("P1EZM","P",10,"HELP")

^SCR("P1EZM","P",10,"LMAX")
4
^SCR("P1EZM","P",10,"MUMPS1")

^SCR("P1EZM","P",10,"MUMPS2")
S %MSC("TO")="PL" I $$^%L1YN("MUST")<0 S %SC("ER")=1
^SCR("P1EZM","P",10,"TYP")
H
^SCR("P1EZM","P",15,"CRD")
5,18,N,3,0
^SCR("P1EZM","P",15,"HELP")

^SCR("P1EZM","P",15,"LMAX")
4
^SCR("P1EZM","P",15,"MUMPS1")
S:'$G(MAXT) MAXT=999
^SCR("P1EZM","P",15,"MUMPS2")

^SCR("P1EZM","P",15,"TYP")
N
^SCR("P1EZM","P","NAME","MAXT")
15
^SCR("P1EZM","P","NAME","MUST")
10
^SCR("P1EZM","P","NAME","MUZAR")
5
^SCR("P1EZM","P","NAME","MUZAR1")
6
^SCR("P1EZM","P","NM",5)
MUZAR
^SCR("P1EZM","P","NM",6)
MUZAR1
^SCR("P1EZM","P","NM",10)
MUST
^SCR("P1EZM","P","NM",15)
MAXT
^SCR("P1EZM1")
H
^SCR("P1EZM1",1)
                                                                               
^SCR("P1EZM1",2)
                                                                               
^SCR("P1EZM1",3)
          {                           06} {05          : ztqez cew             
^SCR("P1EZM1",4)
                                                                               
^SCR("P1EZM1",5)
                                                                  1$           
^SCR("P1EZM1",6)
                   :  xign  :         hixt xe`z    : hixt cew :                
^SCR("P1EZM1",7)
                                                                               
^SCR("P1EZM1",8)
                                                                               
^SCR("P1EZM1",9)
                                                                               
^SCR("P1EZM1",10)
                                                                               
^SCR("P1EZM1",11)
                                                                               
^SCR("P1EZM1",12)
                                                                               
^SCR("P1EZM1",13)
                                                                               
^SCR("P1EZM1",14)
                                                                               
^SCR("P1EZM1",15)
                                                                               
^SCR("P1EZM1",16)
                                                                               
^SCR("P1EZM1",17)
                                                                               
^SCR("P1EZM1",18)
                                                                               
^SCR("P1EZM1",19)
                                                                               
^SCR("P1EZM1",20)
                $1                                                             
^SCR("P1EZM1","A",1)

^SCR("P1EZM1","A",2)

^SCR("P1EZM1","A",3)
:š”‘…šƒ…—
^SCR("P1EZM1","A",4)

^SCR("P1EZM1","A",5)

^SCR("P1EZM1","A",6)
˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1EZM1","A",7)
----------------------------------------
^SCR("P1EZM1","A",8)

^SCR("P1EZM1","A",9)

^SCR("P1EZM1","A",10)

^SCR("P1EZM1","A",11)

^SCR("P1EZM1","A",12)

^SCR("P1EZM1","A",13)

^SCR("P1EZM1","A",14)

^SCR("P1EZM1","A",15)

^SCR("P1EZM1","A",16)

^SCR("P1EZM1","A",17)

^SCR("P1EZM1","A",18)

^SCR("P1EZM1","A",19)

^SCR("P1EZM1","A",20)

^SCR("P1EZM1","AV",1)

^SCR("P1EZM1","AV",2)

^SCR("P1EZM1","AV",3)
:,pxu,sue
^SCR("P1EZM1","AV",4)

^SCR("P1EZM1","AV",5)

^SCR("P1EZM1","AV",6)
rhjnyhrprut,yhrpsue
^SCR("P1EZM1","AV",7)
----------------------------------------
^SCR("P1EZM1","AV",8)

^SCR("P1EZM1","AV",9)

^SCR("P1EZM1","AV",10)

^SCR("P1EZM1","AV",11)

^SCR("P1EZM1","AV",12)

^SCR("P1EZM1","AV",13)

^SCR("P1EZM1","AV",14)

^SCR("P1EZM1","AV",15)

^SCR("P1EZM1","AV",16)

^SCR("P1EZM1","AV",17)

^SCR("P1EZM1","AV",18)

^SCR("P1EZM1","AV",19)

^SCR("P1EZM1","AV",20)

^SCR("P1EZM1","G",1,"CHECK")
Y
^SCR("P1EZM1","G",1,"CRD")
7,62,E,8,0
^SCR("P1EZM1","G",1,"CREAT")

^SCR("P1EZM1","G",1,"FNC")

^SCR("P1EZM1","G",1,"GLOB")
PAR
^SCR("P1EZM1","G",1,"HELP")

^SCR("P1EZM1","G",1,"LMAX")
10
^SCR("P1EZM1","G",1,"MUMPS1")

^SCR("P1EZM1","G",1,"MUMPS2")
D BDIKA^P1EZM1
^SCR("P1EZM1","G",1,"MUST")

^SCR("P1EZM1","G",1,"NLN")
20
^SCR("P1EZM1","G",1,"NS")
J
^SCR("P1EZM1","G",1,"RZD")
**
^SCR("P1EZM1","G",1,"SHEM")
 hixt cew 
^SCR("P1EZM1","G",1,"TOPB")
8
^SCR("P1EZM1","G",1,"TYP")
E
^SCR("P1EZM1","G",1,"VRB")
PARIT1
^SCR("P1EZM1","G",2,"CRD")
7,51,H,20,0
^SCR("P1EZM1","G",2,"HELP")

^SCR("P1EZM1","G",2,"LMAX")
22
^SCR("P1EZM1","G",2,"MUMPS1")

^SCR("P1EZM1","G",2,"MUMPS2")

^SCR("P1EZM1","G",2,"OUTPUT")

^SCR("P1EZM1","G",2,"SHEM")
         hixt xe`z    
^SCR("P1EZM1","G",2,"TYP")
H
^SCR("P1EZM1","G",3,"CRD")
7,28,N,7,2
^SCR("P1EZM1","G",3,"HELP")

^SCR("P1EZM1","G",3,"LMAX")
8
^SCR("P1EZM1","G",3,"MUMPS1")

^SCR("P1EZM1","G",3,"MUMPS2")

^SCR("P1EZM1","G",3,"SHEM")
  xign  
^SCR("P1EZM1","G",3,"TYP")
N
^SCR("P1EZM1","G","DEL")
Y
^SCR("P1EZM1","G","MAX")
99999
^SCR("P1EZM1","G","NAME","MH")
3
^SCR("P1EZM1","G","NAME","PARIT")
1
^SCR("P1EZM1","G","NAME","PARIT1")
2
^SCR("P1EZM1","G","NM",1)
PARIT
^SCR("P1EZM1","G","NM",2)
PARIT1
^SCR("P1EZM1","G","NM",3)
MH
^SCR("P1EZM1","G","RB")
6,17,21,68
^SCR("P1EZM1","G","REF")
^TEMP($P,"EZ"
^SCR("P1EZM1","G","RZD")
\
^SCR("P1EZM1","G","STEP")
1
^SCR("P1EZM1","G","STG")
                   :  xign  :         hixt xe`z    : hixt cew :                
^SCR("P1EZM1","G","VG")
8
^SCR("P1EZM1","NAME")
ztqez qihxk
^SCR("P1EZM1","P",5,"CHECK")
Y
^SCR("P1EZM1","P",5,"CRD")
3,42,E,8,0
^SCR("P1EZM1","P",5,"CREAT")

^SCR("P1EZM1","P",5,"FNC")
F9
^SCR("P1EZM1","P",5,"GLOB")
PAR
^SCR("P1EZM1","P",5,"HELP")
<F9> - miqihxk zbvd , <F7> - cew itl , <F6> - my itl yetig
^SCR("P1EZM1","P",5,"LMAX")
13
^SCR("P1EZM1","P",5,"MUMPS1")

^SCR("P1EZM1","P",5,"MUMPS2")
D REST^P1EZM1
^SCR("P1EZM1","P",5,"MUST")

^SCR("P1EZM1","P",5,"NLN")
20
^SCR("P1EZM1","P",5,"NS")
g
^SCR("P1EZM1","P",5,"RZD")
**
^SCR("P1EZM1","P",5,"TOPB")
8
^SCR("P1EZM1","P",5,"TYP")
E
^SCR("P1EZM1","P",5,"VRB")
TSF1
^SCR("P1EZM1","P",6,"CRD")
3,41,H,30
^SCR("P1EZM1","P",6,"HELP")

^SCR("P1EZM1","P",6,"LMAX")
30
^SCR("P1EZM1","P",6,"MUMPS1")

^SCR("P1EZM1","P",6,"MUMPS2")

^SCR("P1EZM1","P",6,"OUTPUT")

^SCR("P1EZM1","P",6,"TYP")
H
^SCR("P1EZM1","P","NAME","TSF")
5
^SCR("P1EZM1","P","NAME","TSF1")
6
^SCR("P1EZM1","P","NM",5)
TSF
^SCR("P1EZM1","P","NM",6)
TSF1
^SCR("P1EZP")
H
^SCR("P1EZP",1)
                                                                               
^SCR("P1EZP",2)
                          # zevit ibeq qihxk #                                 
^SCR("P1EZP",3)
                                                                               
^SCR("P1EZP",4)
           {                           06} {05          : dvit cew             
^SCR("P1EZP",5)
                                                                               
^SCR("P1EZP",6)
                                                                 1$            
^SCR("P1EZP",7)
                            :      dvit beq xe`z      : dvit beq :             
^SCR("P1EZP",8)
                                                                               
^SCR("P1EZP",9)
                                                                               
^SCR("P1EZP",10)
                                                                               
^SCR("P1EZP",11)
                                                                               
^SCR("P1EZP",12)
                                                                               
^SCR("P1EZP",13)
                                                                               
^SCR("P1EZP",14)
                                                                               
^SCR("P1EZP",15)
                                                                               
^SCR("P1EZP",16)
                                                                               
^SCR("P1EZP",17)
                                                                               
^SCR("P1EZP",18)
                                                                               
^SCR("P1EZP",19)
                                                                               
^SCR("P1EZP",20)
                                                                               
^SCR("P1EZP",21)
                         $1                                                    
^SCR("P1EZP","A",1)

^SCR("P1EZP","A",2)
š…–‰”‰‚…‘‘‰ˆ˜‹
^SCR("P1EZP","A",3)

^SCR("P1EZP","A",4)
:„–‰”ƒ…—
^SCR("P1EZP","A",5)

^SCR("P1EZP","A",6)

^SCR("P1EZP","A",7)
„–‰”‚…‘˜…€š„–‰”‚…‘
^SCR("P1EZP","A",8)
-----------------------------------
^SCR("P1EZP","A",9)

^SCR("P1EZP","A",10)

^SCR("P1EZP","A",11)

^SCR("P1EZP","A",12)

^SCR("P1EZP","A",13)

^SCR("P1EZP","A",14)

^SCR("P1EZP","A",15)

^SCR("P1EZP","A",16)

^SCR("P1EZP","A",17)

^SCR("P1EZP","A",18)

^SCR("P1EZP","A",19)

^SCR("P1EZP","A",20)

^SCR("P1EZP","A",21)

^SCR("P1EZP","AV",1)

^SCR("P1EZP","AV",2)
,umhphduxxhyrf
^SCR("P1EZP","AV",3)

^SCR("P1EZP","AV",4)
:vmhpsue
^SCR("P1EZP","AV",5)

^SCR("P1EZP","AV",6)

^SCR("P1EZP","AV",7)
vmhpduxrut,vmhpdux
^SCR("P1EZP","AV",8)
-----------------------------------
^SCR("P1EZP","AV",9)

^SCR("P1EZP","AV",10)

^SCR("P1EZP","AV",11)

^SCR("P1EZP","AV",12)

^SCR("P1EZP","AV",13)

^SCR("P1EZP","AV",14)

^SCR("P1EZP","AV",15)

^SCR("P1EZP","AV",16)

^SCR("P1EZP","AV",17)

^SCR("P1EZP","AV",18)

^SCR("P1EZP","AV",19)

^SCR("P1EZP","AV",20)

^SCR("P1EZP","AV",21)

^SCR("P1EZP","G",1,"CHECK")
Y
^SCR("P1EZP","G",1,"CRD")
8,65,E,8,0
^SCR("P1EZP","G",1,"CREAT")

^SCR("P1EZP","G",1,"FNC")

^SCR("P1EZP","G",1,"GLOB")
P1SUG
^SCR("P1EZP","G",1,"HELP")

^SCR("P1EZP","G",1,"LMAX")
10
^SCR("P1EZP","G",1,"MUMPS1")

^SCR("P1EZP","G",1,"MUMPS2")
D BDIKA^P1EZP
^SCR("P1EZP","G",1,"MUST")

^SCR("P1EZP","G",1,"NLN")
20
^SCR("P1EZP","G",1,"NS")
J
^SCR("P1EZP","G",1,"RZD")
**
^SCR("P1EZP","G",1,"SHEM")
 dvit beq 
^SCR("P1EZP","G",1,"TOPB")
8
^SCR("P1EZP","G",1,"TYP")
E
^SCR("P1EZP","G",1,"VRB")
PARIT1
^SCR("P1EZP","G",2,"CRD")
8,54,H,20,0
^SCR("P1EZP","G",2,"HELP")

^SCR("P1EZP","G",2,"LMAX")
25
^SCR("P1EZP","G",2,"MUMPS1")

^SCR("P1EZP","G",2,"MUMPS2")

^SCR("P1EZP","G",2,"OUTPUT")

^SCR("P1EZP","G",2,"SHEM")
      dvit beq xe`z      
^SCR("P1EZP","G",2,"TYP")
H
^SCR("P1EZP","G","DEL")
Y
^SCR("P1EZP","G","MAX")
99999
^SCR("P1EZP","G","NAME","PARIT")
1
^SCR("P1EZP","G","NAME","PARIT1")
2
^SCR("P1EZP","G","NM",1)
PARIT
^SCR("P1EZP","G","NM",2)
PARIT1
^SCR("P1EZP","G","RB")
7,26,22,67
^SCR("P1EZP","G","REF")
^TEMP($P,"EZP"
^SCR("P1EZP","G","RZD")
\
^SCR("P1EZP","G","STEP")
1
^SCR("P1EZP","G","STG")
                            :      dvit beq xe`z      : dvit beq :             
^SCR("P1EZP","G","VG")
9
^SCR("P1EZP","NAME")

^SCR("P1EZP","P",5,"CHECK")
Y
^SCR("P1EZP","P",5,"CRD")
4,43,E,8,0
^SCR("P1EZP","P",5,"CREAT")

^SCR("P1EZP","P",5,"FNC")
F9
^SCR("P1EZP","P",5,"GLOB")
PAR
^SCR("P1EZP","P",5,"HELP")
<F9> - miqihxk zbvd , <F7> - cew itl , <F6> - my itl yetig
^SCR("P1EZP","P",5,"LMAX")
13
^SCR("P1EZP","P",5,"MUMPS1")

^SCR("P1EZP","P",5,"MUMPS2")
D REST^P1EZP
^SCR("P1EZP","P",5,"MUST")

^SCR("P1EZP","P",5,"NLN")
20
^SCR("P1EZP","P",5,"NS")
g
^SCR("P1EZP","P",5,"RZD")
**
^SCR("P1EZP","P",5,"TOPB")
8
^SCR("P1EZP","P",5,"TYP")
E
^SCR("P1EZP","P",5,"VRB")
MUZAR1
^SCR("P1EZP","P",6,"CRD")
4,42,H,30,0
^SCR("P1EZP","P",6,"HELP")

^SCR("P1EZP","P",6,"LMAX")
30
^SCR("P1EZP","P",6,"MUMPS1")

^SCR("P1EZP","P",6,"MUMPS2")

^SCR("P1EZP","P",6,"OUTPUT")

^SCR("P1EZP","P",6,"TYP")
H
^SCR("P1EZP","P","NAME","MUZAR")
5
^SCR("P1EZP","P","NAME","MUZAR1")
6
^SCR("P1EZP","P","NM",5)
MUZAR
^SCR("P1EZP","P","NM",6)
MUZAR1
^SCR("P1EZR")
H
^SCR("P1EZR",1)
                           # dxixa-ax zetqez zxcbd #                           
^SCR("P1EZR",2)
                                                                               
^SCR("P1EZR",3)
               {                           06} {05    } : hixt cew             
^SCR("P1EZR",4)
                                           { 10}:(l/k) daeg zetqez             
^SCR("P1EZR",5)
                                                                 1$            
^SCR("P1EZR",6)
                             :       ztqez xe`z     : ztqez cew :              
^SCR("P1EZR",7)
                                                                               
^SCR("P1EZR",8)
                                                                               
^SCR("P1EZR",9)
                                                                               
^SCR("P1EZR",10)
                                                                               
^SCR("P1EZR",11)
                                                                               
^SCR("P1EZR",12)
                                                                               
^SCR("P1EZR",13)
                                                                               
^SCR("P1EZR",14)
                                                                               
^SCR("P1EZR",15)
                                                                               
^SCR("P1EZR",16)
                                                                               
^SCR("P1EZR",17)
                                                                               
^SCR("P1EZR",18)
                                                                               
^SCR("P1EZR",19)
                                                                               
^SCR("P1EZR",20)
                         $1                                                    
^SCR("P1EZR","A",1)
„˜‰˜�-�˜š…”‘…šš˜ƒ‚„
^SCR("P1EZR","A",2)

^SCR("P1EZR","A",3)
:ˆ‰˜”ƒ…—
^SCR("P1EZR","A",4)
:(Œ/‹)„�…‡š…”‘…š
^SCR("P1EZR","A",5)

^SCR("P1EZR","A",6)
š”‘…š˜…€šš”‘…šƒ…—
^SCR("P1EZR","A",7)
---------------------------------
^SCR("P1EZR","A",8)

^SCR("P1EZR","A",9)

^SCR("P1EZR","A",10)

^SCR("P1EZR","A",11)

^SCR("P1EZR","A",12)

^SCR("P1EZR","A",13)

^SCR("P1EZR","A",14)

^SCR("P1EZR","A",15)

^SCR("P1EZR","A",16)

^SCR("P1EZR","A",17)

^SCR("P1EZR","A",18)

^SCR("P1EZR","A",19)

^SCR("P1EZR","A",20)

^SCR("P1EZR","AV",1)
vrhrc-cr,upxu,,rsdv
^SCR("P1EZR","AV",2)

^SCR("P1EZR","AV",3)
:yhrpsue
^SCR("P1EZR","AV",4)
:(kqf)vcuj,upxu,
^SCR("P1EZR","AV",5)

^SCR("P1EZR","AV",6)
,pxu,rut,,pxu,sue
^SCR("P1EZR","AV",7)
---------------------------------
^SCR("P1EZR","AV",8)

^SCR("P1EZR","AV",9)

^SCR("P1EZR","AV",10)

^SCR("P1EZR","AV",11)

^SCR("P1EZR","AV",12)

^SCR("P1EZR","AV",13)

^SCR("P1EZR","AV",14)

^SCR("P1EZR","AV",15)

^SCR("P1EZR","AV",16)

^SCR("P1EZR","AV",17)

^SCR("P1EZR","AV",18)

^SCR("P1EZR","AV",19)

^SCR("P1EZR","AV",20)

^SCR("P1EZR","G",1,"CHECK")
Y
^SCR("P1EZR","G",1,"CRD")
7,64,E,8,0
^SCR("P1EZR","G",1,"CREAT")

^SCR("P1EZR","G",1,"FNC")
F6,F7,F9
^SCR("P1EZR","G",1,"GLOB")
PAR
^SCR("P1EZR","G",1,"HELP")
<F9> - hixt qihxk , <F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1EZR","G",1,"LMAX")
11
^SCR("P1EZR","G",1,"MUMPS1")

^SCR("P1EZR","G",1,"MUMPS2")
D BDIKA^P1EZR
^SCR("P1EZR","G",1,"MUST")

^SCR("P1EZR","G",1,"NLN")
20
^SCR("P1EZR","G",1,"NS")
J
^SCR("P1EZR","G",1,"RZD")
**
^SCR("P1EZR","G",1,"SHEM")
 ztqez cew 
^SCR("P1EZR","G",1,"TOPB")
8
^SCR("P1EZR","G",1,"TYP")
E
^SCR("P1EZR","G",1,"VRB")
PARIT1
^SCR("P1EZR","G",2,"CRD")
7,52,H,20,0
^SCR("P1EZR","G",2,"HELP")

^SCR("P1EZR","G",2,"LMAX")
22
^SCR("P1EZR","G",2,"MUMPS1")

^SCR("P1EZR","G",2,"MUMPS2")

^SCR("P1EZR","G",2,"OUTPUT")

^SCR("P1EZR","G",2,"SHEM")
       ztqez xe`z     
^SCR("P1EZR","G",2,"TYP")
H
^SCR("P1EZR","G","DEL")
Y
^SCR("P1EZR","G","MAX")
99999
^SCR("P1EZR","G","NAME","PARIT")
1
^SCR("P1EZR","G","NAME","PARIT1")
2
^SCR("P1EZR","G","NM",1)
PARIT
^SCR("P1EZR","G","NM",2)
PARIT1
^SCR("P1EZR","G","RB")
6,26,21,67
^SCR("P1EZR","G","REF")
^TEMP($P,"EZR"
^SCR("P1EZR","G","RZD")
\
^SCR("P1EZR","G","STEP")
1
^SCR("P1EZR","G","STG")
                             :       ztqez xe`z     : ztqez cew :              
^SCR("P1EZR","G","VG")
8
^SCR("P1EZR","NAME")
dxixa-ax zetqez zlah
^SCR("P1EZR","P",5,"CHECK")
Y
^SCR("P1EZR","P",5,"CRD")
3,47,E,7,0
^SCR("P1EZR","P",5,"CREAT")

^SCR("P1EZR","P",5,"FNC")
F9
^SCR("P1EZR","P",5,"GLOB")
PAR
^SCR("P1EZR","P",5,"HELP")
<F9> - miqihxk zbvd , <F7> - cew itl , <F6> - my itl yetig
^SCR("P1EZR","P",5,"LMAX")
7
^SCR("P1EZR","P",5,"MUMPS1")

^SCR("P1EZR","P",5,"MUMPS2")
D REST^P1EZR
^SCR("P1EZR","P",5,"MUST")

^SCR("P1EZR","P",5,"NLN")
20
^SCR("P1EZR","P",5,"NS")
g
^SCR("P1EZR","P",5,"RZD")
**
^SCR("P1EZR","P",5,"TOPB")
8
^SCR("P1EZR","P",5,"TYP")
E
^SCR("P1EZR","P",5,"VRB")
MUZAR1
^SCR("P1EZR","P",6,"CRD")
3,46,H,30
^SCR("P1EZR","P",6,"HELP")

^SCR("P1EZR","P",6,"LMAX")
30
^SCR("P1EZR","P",6,"MUMPS1")

^SCR("P1EZR","P",6,"MUMPS2")

^SCR("P1EZR","P",6,"OUTPUT")

^SCR("P1EZR","P",6,"TYP")
H
^SCR("P1EZR","P",10,"CRD")
4,48,H,1
^SCR("P1EZR","P",10,"HELP")

^SCR("P1EZR","P",10,"LMAX")
4
^SCR("P1EZR","P",10,"MUMPS1")

^SCR("P1EZR","P",10,"MUMPS2")
S %MSC("TO")="PL" I $$^%L1YN("MUST")<0 S %SC("ER")=1
^SCR("P1EZR","P",10,"TYP")
H
^SCR("P1EZR","P","NAME","MUST")
10
^SCR("P1EZR","P","NAME","MUZAR")
5
^SCR("P1EZR","P","NAME","MUZAR1")
6
^SCR("P1EZR","P","NM",5)
MUZAR
^SCR("P1EZR","P","NM",6)
MUZAR1
^SCR("P1EZR","P","NM",10)
MUST
^SCR("P1EZS")
H
^SCR("P1EZS",1)
                          # dxikn hql zetqez zxcbd #                           
^SCR("P1EZS",2)
                                                                               
^SCR("P1EZS",3)
              {                           06} {05    } : mihixt hq             
^SCR("P1EZS",4)
                                           { 10}:(l/k) daeg zetqez             
^SCR("P1EZS",5)
                                                                 1$            
^SCR("P1EZS",6)
                             :       ztqez xe`z     : ztqez cew :              
^SCR("P1EZS",7)
                                                                               
^SCR("P1EZS",8)
                                                                               
^SCR("P1EZS",9)
                                                                               
^SCR("P1EZS",10)
                                                                               
^SCR("P1EZS",11)
                                                                               
^SCR("P1EZS",12)
                                                                               
^SCR("P1EZS",13)
                                                                               
^SCR("P1EZS",14)
                                                                               
^SCR("P1EZS",15)
                                                                               
^SCR("P1EZS",16)
                                                                               
^SCR("P1EZS",17)
                                                                               
^SCR("P1EZS",18)
                                                                               
^SCR("P1EZS",19)
                                                                               
^SCR("P1EZS",20)
                         $1                                                    
^SCR("P1EZS","A",1)
„˜‰‹Žˆ‘Œš…”‘…šš˜ƒ‚„
^SCR("P1EZS","A",2)

^SCR("P1EZS","A",3)
:�‰ˆ‰˜”ˆ‘
^SCR("P1EZS","A",4)
:(Œ/‹)„�…‡š…”‘…š
^SCR("P1EZS","A",5)

^SCR("P1EZS","A",6)
š”‘…š˜…€šš”‘…šƒ…—
^SCR("P1EZS","A",7)
---------------------------------
^SCR("P1EZS","A",8)

^SCR("P1EZS","A",9)

^SCR("P1EZS","A",10)

^SCR("P1EZS","A",11)

^SCR("P1EZS","A",12)

^SCR("P1EZS","A",13)

^SCR("P1EZS","A",14)

^SCR("P1EZS","A",15)

^SCR("P1EZS","A",16)

^SCR("P1EZS","A",17)

^SCR("P1EZS","A",18)

^SCR("P1EZS","A",19)

^SCR("P1EZS","A",20)

^SCR("P1EZS","AV",1)
vrhfnyxk,upxu,,rsdv
^SCR("P1EZS","AV",2)

^SCR("P1EZS","AV",3)
:ohyhrpyx
^SCR("P1EZS","AV",4)
:(kqf)vcuj,upxu,
^SCR("P1EZS","AV",5)

^SCR("P1EZS","AV",6)
,pxu,rut,,pxu,sue
^SCR("P1EZS","AV",7)
---------------------------------
^SCR("P1EZS","AV",8)

^SCR("P1EZS","AV",9)

^SCR("P1EZS","AV",10)

^SCR("P1EZS","AV",11)

^SCR("P1EZS","AV",12)

^SCR("P1EZS","AV",13)

^SCR("P1EZS","AV",14)

^SCR("P1EZS","AV",15)

^SCR("P1EZS","AV",16)

^SCR("P1EZS","AV",17)

^SCR("P1EZS","AV",18)

^SCR("P1EZS","AV",19)

^SCR("P1EZS","AV",20)

^SCR("P1EZS","G",1,"CHECK")
Y
^SCR("P1EZS","G",1,"CRD")
7,64,E,8,0
^SCR("P1EZS","G",1,"CREAT")

^SCR("P1EZS","G",1,"FNC")
F6,F7,F9
^SCR("P1EZS","G",1,"GLOB")
PAR
^SCR("P1EZS","G",1,"HELP")

^SCR("P1EZS","G",1,"LMAX")
11
^SCR("P1EZS","G",1,"MUMPS1")

^SCR("P1EZS","G",1,"MUMPS2")
D BDIKA^P1EZM
^SCR("P1EZS","G",1,"MUST")

^SCR("P1EZS","G",1,"NLN")
20
^SCR("P1EZS","G",1,"NS")
J
^SCR("P1EZS","G",1,"RZD")
**
^SCR("P1EZS","G",1,"SHEM")
 ztqez cew 
^SCR("P1EZS","G",1,"TOPB")
8
^SCR("P1EZS","G",1,"TYP")
E
^SCR("P1EZS","G",1,"VRB")
PARIT1
^SCR("P1EZS","G",2,"CRD")
7,52,H,20,0
^SCR("P1EZS","G",2,"HELP")

^SCR("P1EZS","G",2,"LMAX")
22
^SCR("P1EZS","G",2,"MUMPS1")

^SCR("P1EZS","G",2,"MUMPS2")

^SCR("P1EZS","G",2,"OUTPUT")

^SCR("P1EZS","G",2,"SHEM")
       ztqez xe`z     
^SCR("P1EZS","G",2,"TYP")
H
^SCR("P1EZS","G","DEL")
Y
^SCR("P1EZS","G","MAX")
99999
^SCR("P1EZS","G","NAME","PARIT")
1
^SCR("P1EZS","G","NAME","PARIT1")
2
^SCR("P1EZS","G","NM",1)
PARIT
^SCR("P1EZS","G","NM",2)
PARIT1
^SCR("P1EZS","G","RB")
6,26,21,67
^SCR("P1EZS","G","REF")
^TEMP($P,"EZS"
^SCR("P1EZS","G","RZD")
\
^SCR("P1EZS","G","STEP")
1
^SCR("P1EZS","G","STG")
                             :       ztqez xe`z     : ztqez cew :              
^SCR("P1EZS","G","VG")
8
^SCR("P1EZS","NAME")

^SCR("P1EZS","P",5,"CRD")
3,46,E,7,0
^SCR("P1EZS","P",5,"HELP")

^SCR("P1EZS","P",5,"LMAX")
7
^SCR("P1EZS","P",5,"MUMPS1")

^SCR("P1EZS","P",5,"MUMPS2")

^SCR("P1EZS","P",5,"OUTPUT")

^SCR("P1EZS","P",5,"TYP")
E
^SCR("P1EZS","P",6,"CRD")
3,45,H,30,0
^SCR("P1EZS","P",6,"HELP")

^SCR("P1EZS","P",6,"LMAX")
30
^SCR("P1EZS","P",6,"MUMPS1")

^SCR("P1EZS","P",6,"MUMPS2")

^SCR("P1EZS","P",6,"OUTPUT")

^SCR("P1EZS","P",6,"TYP")
H
^SCR("P1EZS","P",10,"CRD")
4,48,H,1,0
^SCR("P1EZS","P",10,"HELP")

^SCR("P1EZS","P",10,"LMAX")
4
^SCR("P1EZS","P",10,"MUMPS1")

^SCR("P1EZS","P",10,"MUMPS2")
S %MSC("TO")="PL" I $$^%L1YN("MUST")<0 S %SC("ER")=1
^SCR("P1EZS","P",10,"TYP")
H
^SCR("P1EZS","P","NAME","MUST")
10
^SCR("P1EZS","P","NAME","MUZAR")
5
^SCR("P1EZS","P","NAME","MUZAR1")
6
^SCR("P1EZS","P","NM",5)
MUZAR
^SCR("P1EZS","P","NM",6)
MUZAR1
^SCR("P1EZS","P","NM",10)
MUST
^SCR("P1EZT")
H
^SCR("P1EZT",1)
                            # hixtl zetqez zeveaw #                            
^SCR("P1EZT",2)
                                                                               
^SCR("P1EZT",3)
                           {                           06} {05    }:hixt cew   
^SCR("P1EZT",4)
                                                                          1$   
^SCR("P1EZT",5)
     :('wc) didyd : dxigal iaxin xtqn :       hq xe`z      : zetqez hq :       
^SCR("P1EZT",6)
                                                                               
^SCR("P1EZT",7)
                                                                               
^SCR("P1EZT",8)
                                                                               
^SCR("P1EZT",9)
                                                                               
^SCR("P1EZT",10)
                                                                               
^SCR("P1EZT",11)
                                                                               
^SCR("P1EZT",12)
                                                                               
^SCR("P1EZT",13)
                                                                               
^SCR("P1EZT",14)
                                                                               
^SCR("P1EZT",15)
                                                                               
^SCR("P1EZT",16)
                                                                               
^SCR("P1EZT",17)
                                                                               
^SCR("P1EZT",18)
                                                                               
^SCR("P1EZT",19)
                                                                               
^SCR("P1EZT",20)
                                                                               
^SCR("P1EZT",21)
                                                                               
^SCR("P1EZT",22)
  $1                                                                           
^SCR("P1EZT","A",1)
ˆ‰˜”Œš…”‘…šš…–…�—
^SCR("P1EZT","A",2)

^SCR("P1EZT","A",3)
:ˆ‰˜”ƒ…—
^SCR("P1EZT","A",4)

^SCR("P1EZT","A",5)
('—ƒ)„‰„™„„˜‰‡�Œ‰�˜‰Ž˜”‘Žˆ‘˜…€šš…”‘…šˆ‘
^SCR("P1EZT","A",6)
--------------------------------------------------------------
^SCR("P1EZT","A",7)

^SCR("P1EZT","A",8)

^SCR("P1EZT","A",9)

^SCR("P1EZT","A",10)

^SCR("P1EZT","A",11)

^SCR("P1EZT","A",12)

^SCR("P1EZT","A",13)

^SCR("P1EZT","A",14)

^SCR("P1EZT","A",15)

^SCR("P1EZT","A",16)

^SCR("P1EZT","A",17)

^SCR("P1EZT","A",18)

^SCR("P1EZT","A",19)

^SCR("P1EZT","A",20)

^SCR("P1EZT","A",21)

^SCR("P1EZT","A",22)

^SCR("P1EZT","AV",1)
yhrpk,upxu,,umuce
^SCR("P1EZT","AV",2)

^SCR("P1EZT","AV",3)
:yhrpsue
^SCR("P1EZT","AV",4)

^SCR("P1EZT","AV",5)
(wes)vhvavvrhjckhcrhnrpxnyxrut,,upxu,yx
^SCR("P1EZT","AV",6)
--------------------------------------------------------------
^SCR("P1EZT","AV",7)

^SCR("P1EZT","AV",8)

^SCR("P1EZT","AV",9)

^SCR("P1EZT","AV",10)

^SCR("P1EZT","AV",11)

^SCR("P1EZT","AV",12)

^SCR("P1EZT","AV",13)

^SCR("P1EZT","AV",14)

^SCR("P1EZT","AV",15)

^SCR("P1EZT","AV",16)

^SCR("P1EZT","AV",17)

^SCR("P1EZT","AV",18)

^SCR("P1EZT","AV",19)

^SCR("P1EZT","AV",20)

^SCR("P1EZT","AV",21)

^SCR("P1EZT","AV",22)

^SCR("P1EZT","G",1,"CRD")
6,71,E,8,0
^SCR("P1EZT","G",1,"FNC")
F10,F9,F8
^SCR("P1EZT","G",1,"GLOB")
PAR
^SCR("P1EZT","G",1,"HELP")
F10- dgex` zbvd, F9- hq oewiz ,F8- mihq zniyx, F7- hixtz, F6- my itl yetig 
^SCR("P1EZT","G",1,"LMAX")
11
^SCR("P1EZT","G",1,"MUMPS1")

^SCR("P1EZT","G",1,"MUMPS2")
D BDIKA^P1EZA
^SCR("P1EZT","G",1,"MUST")

^SCR("P1EZT","G",1,"NLN")
20
^SCR("P1EZT","G",1,"RZD")
**
^SCR("P1EZT","G",1,"SHEM")
 zetqez hq 
^SCR("P1EZT","G",1,"TOPB")
8
^SCR("P1EZT","G",1,"TYP")
E
^SCR("P1EZT","G",1,"VRB")
PAR1
^SCR("P1EZT","G",2,"CRD")
6,59,H,20,0
^SCR("P1EZT","G",2,"HELP")

^SCR("P1EZT","G",2,"LMAX")
20
^SCR("P1EZT","G",2,"MUMPS1")

^SCR("P1EZT","G",2,"MUMPS2")

^SCR("P1EZT","G",2,"OUTPUT")

^SCR("P1EZT","G",2,"SHEM")
       hq xe`z      
^SCR("P1EZT","G",2,"TYP")
H
^SCR("P1EZT","G",3,"CRD")
6,38,H,2,0
^SCR("P1EZT","G",3,"HELP")

^SCR("P1EZT","G",3,"LMAX")
19
^SCR("P1EZT","G",3,"MUMPS1")

^SCR("P1EZT","G",3,"MUMPS2")

^SCR("P1EZT","G",3,"OUTPUT")

^SCR("P1EZT","G",3,"SHEM")
 dxigal iaxin xtqn 
^SCR("P1EZT","G",3,"TYP")
H
^SCR("P1EZT","G",4,"CRD")
6,18,N,2,0
^SCR("P1EZT","G",4,"HELP")

^SCR("P1EZT","G",4,"LMAX")
12
^SCR("P1EZT","G",4,"MUMPS1")

^SCR("P1EZT","G",4,"MUMPS2")

^SCR("P1EZT","G",4,"SHEM")
('wc) didyd 
^SCR("P1EZT","G",4,"TYP")
N
^SCR("P1EZT","G","DEL")
Y
^SCR("P1EZT","G","MAX")
99999
^SCR("P1EZT","G","NAME","BDCM")
3
^SCR("P1EZT","G","NAME","DELAY")
4
^SCR("P1EZT","G","NAME","PARIT")
1
^SCR("P1EZT","G","NAME","PARIT1")
2
^SCR("P1EZT","G","NM",1)
PARIT
^SCR("P1EZT","G","NM",2)
PARIT1
^SCR("P1EZT","G","NM",3)
BDCM
^SCR("P1EZT","G","NM",4)
DELAY
^SCR("P1EZT","G","RB")
5,3,23,76
^SCR("P1EZT","G","REF")
^TEMP($P,"EZ"
^SCR("P1EZT","G","RZD")
\
^SCR("P1EZT","G","STEP")
1
^SCR("P1EZT","G","STG")
     :('wc) didyd : dxigal iaxin xtqn :       hq xe`z      : zetqez hq :       
^SCR("P1EZT","G","VG")
7
^SCR("P1EZT","NAME")
hixtl zetqez mihq
^SCR("P1EZT","P",5,"CHECK")
Y
^SCR("P1EZT","P",5,"CRD")
3,59,E,7,0
^SCR("P1EZT","P",5,"CREAT")

^SCR("P1EZT","P",5,"FNC")
F9
^SCR("P1EZT","P",5,"GLOB")
PAR
^SCR("P1EZT","P",5,"HELP")
<F9> - miqihxk zbvd , <F7> - cew itl , <F6> - my itl yetig
^SCR("P1EZT","P",5,"LMAX")
7
^SCR("P1EZT","P",5,"MUMPS1")

^SCR("P1EZT","P",5,"MUMPS2")
D REST^P1EZA
^SCR("P1EZT","P",5,"MUST")

^SCR("P1EZT","P",5,"NLN")
20
^SCR("P1EZT","P",5,"NS")
g
^SCR("P1EZT","P",5,"RZD")
**
^SCR("P1EZT","P",5,"TOPB")
8
^SCR("P1EZT","P",5,"TYP")
E
^SCR("P1EZT","P",5,"VRB")
MUZAR1
^SCR("P1EZT","P",6,"CRD")
3,58,H,30
^SCR("P1EZT","P",6,"HELP")

^SCR("P1EZT","P",6,"LMAX")
30
^SCR("P1EZT","P",6,"MUMPS1")

^SCR("P1EZT","P",6,"MUMPS2")

^SCR("P1EZT","P",6,"OUTPUT")

^SCR("P1EZT","P",6,"TYP")
H
^SCR("P1EZT","P","NAME","MUZAR")
5
^SCR("P1EZT","P","NAME","MUZAR1")
6
^SCR("P1EZT","P","NM",5)
MUZAR
^SCR("P1EZT","P","NM",6)
MUZAR1
^SCR("P1FAST")
H
^SCR("P1FAST",1)
            # mixidn xa zepgley zlah #                                         
^SCR("P1FAST",2)
                                                                               
^SCR("P1FAST",3)
                                                1$                             
^SCR("P1FAST",4)
                                : ogley 'qn :                                  
^SCR("P1FAST",5)
                                                                               
^SCR("P1FAST",6)
                                                                               
^SCR("P1FAST",7)
                                                                               
^SCR("P1FAST",8)
                                                                               
^SCR("P1FAST",9)
                                                                               
^SCR("P1FAST",10)
                                                                               
^SCR("P1FAST",11)
                                                                               
^SCR("P1FAST",12)
                                                                               
^SCR("P1FAST",13)
                                                                               
^SCR("P1FAST",14)
                                                                               
^SCR("P1FAST",15)
                                                                               
^SCR("P1FAST",16)
                                                                               
^SCR("P1FAST",17)
                                                                               
^SCR("P1FAST",18)
                                                                               
^SCR("P1FAST",19)
                                                                               
^SCR("P1FAST",20)
                              $1                                               
^SCR("P1FAST","A",1)
�‰˜‰„Ž˜�š…�‡Œ…™šŒ�ˆ
^SCR("P1FAST","A",2)

^SCR("P1FAST","A",3)

^SCR("P1FAST","A",4)
�‡Œ…™'‘Ž
^SCR("P1FAST","A",5)
-----------
^SCR("P1FAST","A",6)

^SCR("P1FAST","A",7)

^SCR("P1FAST","A",8)

^SCR("P1FAST","A",9)

^SCR("P1FAST","A",10)

^SCR("P1FAST","A",11)

^SCR("P1FAST","A",12)

^SCR("P1FAST","A",13)

^SCR("P1FAST","A",14)

^SCR("P1FAST","A",15)

^SCR("P1FAST","A",16)

^SCR("P1FAST","A",17)

^SCR("P1FAST","A",18)

^SCR("P1FAST","A",19)

^SCR("P1FAST","A",20)

^SCR("P1FAST","AV",1)
ohrhvnrc,ubjkua,kcy
^SCR("P1FAST","AV",2)

^SCR("P1FAST","AV",3)

^SCR("P1FAST","AV",4)
ijkuawxn
^SCR("P1FAST","AV",5)
-----------
^SCR("P1FAST","AV",6)

^SCR("P1FAST","AV",7)

^SCR("P1FAST","AV",8)

^SCR("P1FAST","AV",9)

^SCR("P1FAST","AV",10)

^SCR("P1FAST","AV",11)

^SCR("P1FAST","AV",12)

^SCR("P1FAST","AV",13)

^SCR("P1FAST","AV",14)

^SCR("P1FAST","AV",15)

^SCR("P1FAST","AV",16)

^SCR("P1FAST","AV",17)

^SCR("P1FAST","AV",18)

^SCR("P1FAST","AV",19)

^SCR("P1FAST","AV",20)

^SCR("P1FAST","G",1,"CHECK")
Y
^SCR("P1FAST","G",1,"CRD")
5,44,E,3,0
^SCR("P1FAST","G",1,"FNC")

^SCR("P1FAST","G",1,"GLOB")
LKH
^SCR("P1FAST","G",1,"HELP")
<F7 > - dbvd 
^SCR("P1FAST","G",1,"LMAX")
11
^SCR("P1FAST","G",1,"MUMPS1")

^SCR("P1FAST","G",1,"MUMPS2")
D BDIKA^P1FAST
^SCR("P1FAST","G",1,"MUST")

^SCR("P1FAST","G",1,"NLN")
20
^SCR("P1FAST","G",1,"RZD")
\
^SCR("P1FAST","G",1,"SHEM")
 ogley 'qn 
^SCR("P1FAST","G",1,"TOPB")
8
^SCR("P1FAST","G",1,"TYP")
E
^SCR("P1FAST","G","DEL")
Y
^SCR("P1FAST","G","MAX")
99
^SCR("P1FAST","G","NAME","FAST")
1
^SCR("P1FAST","G","NM",1)
FAST
^SCR("P1FAST","G","RB")
4,31,21,50
^SCR("P1FAST","G","REF")
^TEMP($P,"FAST"
^SCR("P1FAST","G","RZD")
\
^SCR("P1FAST","G","STEP")
1
^SCR("P1FAST","G","STG")
                                : ogley 'qn :                                  
^SCR("P1FAST","G","VG")
6
^SCR("P1FAST","NAME")

^SCR("P1FAXPR")
H
^SCR("P1FAXPR",1)
                           # oeikx`n miqwt zniyx #                             
^SCR("P1FAXPR",2)
                    {10        } : jix`z cr    {05      } : jix`zn             
^SCR("P1FAXPR",3)
                   {15: 2 - excey `ly dl` wx , 1 - miqwtd lk bivdl             
^SCR("P1FAXPR",4)
                                                                             1$
^SCR("P1FAXPR",5)
       :  qehhq  :  drye jix`zl :       gewl my       : dpnfd :    qwt    :    
^SCR("P1FAXPR",6)
                                                                               
^SCR("P1FAXPR",7)
                                                                               
^SCR("P1FAXPR",8)
                                                                               
^SCR("P1FAXPR",9)
                                                                               
^SCR("P1FAXPR",10)
                                                                               
^SCR("P1FAXPR",11)
                                                                               
^SCR("P1FAXPR",12)
                                                                               
^SCR("P1FAXPR",13)
                                                                               
^SCR("P1FAXPR",14)
                                                                               
^SCR("P1FAXPR",15)
                                                                               
^SCR("P1FAXPR",16)
                                                                               
^SCR("P1FAXPR",17)
                                                                               
^SCR("P1FAXPR",18)
                                                                               
^SCR("P1FAXPR",19)
                                                                               
^SCR("P1FAXPR",20)
                                                                               
^SCR("P1FAXPR",21)
   $1                                                                          
^SCR("P1FAXPR",22)
                                                                               
^SCR("P1FAXPR","A",1)
�…‰‹˜€Ž�‰‘—”šŽ‰™˜
^SCR("P1FAXPR","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1FAXPR","A",3)
:2-…˜ƒ…™€Œ™„Œ€—˜,1-�‰‘—”„Œ‹‚‰–„Œ
^SCR("P1FAXPR","A",4)

^SCR("P1FAXPR","A",5)
‘…ˆˆ‘„’™…Š‰˜€šŒ‡…—Œ�™„�Ž†„‘—”
^SCR("P1FAXPR","A",6)
------------------------------------------------------------------
^SCR("P1FAXPR","A",7)

^SCR("P1FAXPR","A",8)

^SCR("P1FAXPR","A",9)

^SCR("P1FAXPR","A",10)

^SCR("P1FAXPR","A",11)

^SCR("P1FAXPR","A",12)

^SCR("P1FAXPR","A",13)

^SCR("P1FAXPR","A",14)

^SCR("P1FAXPR","A",15)

^SCR("P1FAXPR","A",16)

^SCR("P1FAXPR","A",17)

^SCR("P1FAXPR","A",18)

^SCR("P1FAXPR","A",19)

^SCR("P1FAXPR","A",20)

^SCR("P1FAXPR","A",21)

^SCR("P1FAXPR","A",22)

^SCR("P1FAXPR","AV",1)
iuhfrtnohxep,nhar
^SCR("P1FAXPR","AV",2)
:lhrt,sg:lhrt,n
^SCR("P1FAXPR","AV",3)
:2-ursuatkavkter'1-ohxepvkfdhmvk
^SCR("P1FAXPR","AV",4)

^SCR("P1FAXPR","AV",5)
xuyyxvgaulhrt,kjuekoavbnzvxep
^SCR("P1FAXPR","AV",6)
------------------------------------------------------------------
^SCR("P1FAXPR","AV",7)

^SCR("P1FAXPR","AV",8)

^SCR("P1FAXPR","AV",9)

^SCR("P1FAXPR","AV",10)

^SCR("P1FAXPR","AV",11)

^SCR("P1FAXPR","AV",12)

^SCR("P1FAXPR","AV",13)

^SCR("P1FAXPR","AV",14)

^SCR("P1FAXPR","AV",15)

^SCR("P1FAXPR","AV",16)

^SCR("P1FAXPR","AV",17)

^SCR("P1FAXPR","AV",18)

^SCR("P1FAXPR","AV",19)

^SCR("P1FAXPR","AV",20)

^SCR("P1FAXPR","AV",21)

^SCR("P1FAXPR","AV",22)

^SCR("P1FAXPR","G",1,"CRD")
6,74,E,10,0
^SCR("P1FAXPR","G",1,"HELP")

^SCR("P1FAXPR","G",1,"LMAX")
11
^SCR("P1FAXPR","G",1,"MUMPS1")

^SCR("P1FAXPR","G",1,"MUMPS2")

^SCR("P1FAXPR","G",1,"OUTPUT")

^SCR("P1FAXPR","G",1,"SHEM")
    qwt    
^SCR("P1FAXPR","G",1,"TYP")
E
^SCR("P1FAXPR","G",2,"CRD")
6,62,E,7,0
^SCR("P1FAXPR","G",2,"HELP")
<F9> - bivdl
^SCR("P1FAXPR","G",2,"LMAX")
7
^SCR("P1FAXPR","G",2,"MUMPS1")

^SCR("P1FAXPR","G",2,"MUMPS2")
D HZM^P1FAXPR
^SCR("P1FAXPR","G",2,"SHEM")
 dpnfd 
^SCR("P1FAXPR","G",2,"TYP")
E
^SCR("P1FAXPR","G",3,"CRD")
6,54,H,21,0
^SCR("P1FAXPR","G",3,"HELP")

^SCR("P1FAXPR","G",3,"LMAX")
21
^SCR("P1FAXPR","G",3,"MUMPS1")

^SCR("P1FAXPR","G",3,"MUMPS2")

^SCR("P1FAXPR","G",3,"OUTPUT")

^SCR("P1FAXPR","G",3,"SHEM")
       gewl my       
^SCR("P1FAXPR","G",3,"TYP")
H
^SCR("P1FAXPR","G",4,"CRD")
6,32,H,14,0
^SCR("P1FAXPR","G",4,"HELP")

^SCR("P1FAXPR","G",4,"LMAX")
14
^SCR("P1FAXPR","G",4,"MUMPS1")

^SCR("P1FAXPR","G",4,"MUMPS2")

^SCR("P1FAXPR","G",4,"OUTPUT")

^SCR("P1FAXPR","G",4,"SHEM")
  drye jix`zl 
^SCR("P1FAXPR","G",4,"TYP")
H
^SCR("P1FAXPR","G",5,"CRD")
6,17,H,9,0
^SCR("P1FAXPR","G",5,"HELP")

^SCR("P1FAXPR","G",5,"LMAX")
9
^SCR("P1FAXPR","G",5,"MUMPS1")

^SCR("P1FAXPR","G",5,"MUMPS2")

^SCR("P1FAXPR","G",5,"SHEM")
  qehhq  
^SCR("P1FAXPR","G",5,"TYP")
H
^SCR("P1FAXPR","G","MAX")
0
^SCR("P1FAXPR","G","NAME","FAX")
1
^SCR("P1FAXPR","G","NAME","HZM")
2
^SCR("P1FAXPR","G","NAME","LKH")
3
^SCR("P1FAXPR","G","NAME","STAT")
5
^SCR("P1FAXPR","G","NAME","ZMAN")
4
^SCR("P1FAXPR","G","NM",1)
FAX
^SCR("P1FAXPR","G","NM",2)
HZM
^SCR("P1FAXPR","G","NM",3)
LKH
^SCR("P1FAXPR","G","NM",4)
ZMAN
^SCR("P1FAXPR","G","NM",5)
STAT
^SCR("P1FAXPR","G","RB")
5,4,22,79
^SCR("P1FAXPR","G","REF")
^TEMP($P
^SCR("P1FAXPR","G","RZD")
\
^SCR("P1FAXPR","G","STEP")
1
^SCR("P1FAXPR","G","STG")
       :  qehhq  :  drye jix`zl :       gewl my       : dpnfd :    qwt    :    
^SCR("P1FAXPR","G","VG")
7
^SCR("P1FAXPR","NAME")

^SCR("P1FAXPR","P",5,"CRD")
2,47,D,8,0
^SCR("P1FAXPR","P",5,"HELP")

^SCR("P1FAXPR","P",5,"LMAX")
9
^SCR("P1FAXPR","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($H,1)
^SCR("P1FAXPR","P",5,"MUMPS2")

^SCR("P1FAXPR","P",5,"TYP")
D
^SCR("P1FAXPR","P",10,"CRD")
2,20,D,8,0
^SCR("P1FAXPR","P",10,"HELP")

^SCR("P1FAXPR","P",10,"LMAX")
11
^SCR("P1FAXPR","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1FAXPR","P",10,"MUMPS2")
D DAT2^P1FAXPR
^SCR("P1FAXPR","P",10,"MUST")

^SCR("P1FAXPR","P",10,"TYP")
D
^SCR("P1FAXPR","P",15,"CRD")
3,19,N,1,0
^SCR("P1FAXPR","P",15,"HELP")

^SCR("P1FAXPR","P",15,"LMAX")
3
^SCR("P1FAXPR","P",15,"MUMPS1")
S:'$G(OPT) OPT=2
^SCR("P1FAXPR","P",15,"MUMPS2")
D GET^P1FAXPR
^SCR("P1FAXPR","P",15,"MUST")

^SCR("P1FAXPR","P",15,"TYP")
N
^SCR("P1FAXPR","P","NAME","DAT1")
5
^SCR("P1FAXPR","P","NAME","DAT2")
10
^SCR("P1FAXPR","P","NAME","OPT")
15
^SCR("P1FAXPR","P","NM",5)
DAT1
^SCR("P1FAXPR","P","NM",10)
DAT2
^SCR("P1FAXPR","P","NM",15)
OPT
^SCR("P1HALL")
H
^SCR("P1HALL",1)
                                # zenle` zlah #                                
^SCR("P1HALL",2)
                                                                               
^SCR("P1HALL",3)
                                                                     1$        
^SCR("P1HALL",4)
                             :        mle` my       : mle` 'qn  :              
^SCR("P1HALL",5)
                                                                               
^SCR("P1HALL",6)
                                                                               
^SCR("P1HALL",7)
                                                                               
^SCR("P1HALL",8)
                                                                               
^SCR("P1HALL",9)
                                                                               
^SCR("P1HALL",10)
                                                                               
^SCR("P1HALL",11)
                                                                               
^SCR("P1HALL",12)
                                                                               
^SCR("P1HALL",13)
                                                                               
^SCR("P1HALL",14)
                                                                               
^SCR("P1HALL",15)
                                                                               
^SCR("P1HALL",16)
                                                                               
^SCR("P1HALL",17)
                                                                               
^SCR("P1HALL",18)
                                                                               
^SCR("P1HALL",19)
                                                                               
^SCR("P1HALL",20)
                          $1                                                   
^SCR("P1HALL","A",1)
š…ŽŒ…€šŒ�ˆ
^SCR("P1HALL","A",2)

^SCR("P1HALL","A",3)

^SCR("P1HALL","A",4)
�Œ…€�™�Œ…€'‘Ž
^SCR("P1HALL","A",5)
---------------------------------
^SCR("P1HALL","A",6)

^SCR("P1HALL","A",7)

^SCR("P1HALL","A",8)

^SCR("P1HALL","A",9)

^SCR("P1HALL","A",10)

^SCR("P1HALL","A",11)

^SCR("P1HALL","A",12)

^SCR("P1HALL","A",13)

^SCR("P1HALL","A",14)

^SCR("P1HALL","A",15)

^SCR("P1HALL","A",16)

^SCR("P1HALL","A",17)

^SCR("P1HALL","A",18)

^SCR("P1HALL","A",19)

^SCR("P1HALL","A",20)

^SCR("P1HALL","AV",1)
,unkut,kcy
^SCR("P1HALL","AV",2)

^SCR("P1HALL","AV",3)

^SCR("P1HALL","AV",4)
okutoaokutwxn
^SCR("P1HALL","AV",5)
---------------------------------
^SCR("P1HALL","AV",6)

^SCR("P1HALL","AV",7)

^SCR("P1HALL","AV",8)

^SCR("P1HALL","AV",9)

^SCR("P1HALL","AV",10)

^SCR("P1HALL","AV",11)

^SCR("P1HALL","AV",12)

^SCR("P1HALL","AV",13)

^SCR("P1HALL","AV",14)

^SCR("P1HALL","AV",15)

^SCR("P1HALL","AV",16)

^SCR("P1HALL","AV",17)

^SCR("P1HALL","AV",18)

^SCR("P1HALL","AV",19)

^SCR("P1HALL","AV",20)

^SCR("P1HALL","G",1,"CRD")
5,64,E,2,0
^SCR("P1HALL","G",1,"HELP")

^SCR("P1HALL","G",1,"LMAX")
11
^SCR("P1HALL","G",1,"MUMPS1")

^SCR("P1HALL","G",1,"MUMPS2")

^SCR("P1HALL","G",1,"MUST")

^SCR("P1HALL","G",1,"SHEM")
 mle` 'qn  
^SCR("P1HALL","G",1,"TYP")
E
^SCR("P1HALL","G",2,"CRD")
5,52,H,19,0
^SCR("P1HALL","G",2,"HELP")

^SCR("P1HALL","G",2,"LMAX")
22
^SCR("P1HALL","G",2,"MUMPS1")

^SCR("P1HALL","G",2,"MUMPS2")

^SCR("P1HALL","G",2,"MUST")

^SCR("P1HALL","G",2,"SHEM")
        mle` my       
^SCR("P1HALL","G",2,"TYP")
H
^SCR("P1HALL","G","DEL")
Y
^SCR("P1HALL","G","MAX")
9999
^SCR("P1HALL","G","NAME","HALL")
1
^SCR("P1HALL","G","NAME","HALL1")
2
^SCR("P1HALL","G","NM",1)
HALL
^SCR("P1HALL","G","NM",2)
HALL1
^SCR("P1HALL","G","RB")
4,27,21,71
^SCR("P1HALL","G","REF")
^TEMP($P,"SP"
^SCR("P1HALL","G","RZD")
\
^SCR("P1HALL","G","STEP")
1
^SCR("P1HALL","G","STG")
                             :        mle` my       : mle` 'qn  :              
^SCR("P1HALL","G","VG")
6
^SCR("P1HALL","NAME")

^SCR("P1HALLSH")
H
^SCR("P1HALLSH",1)
                        # "zepgley-mle`" dlah #                                
^SCR("P1HALLSH",2)
                                                                               
^SCR("P1HALLSH",3)
                              {                     06} {05   } : mle` 'qn     
^SCR("P1HALLSH",4)
                                                                               
^SCR("P1HALLSH",5)
                                                                        1$     
^SCR("P1HALLSH",6)
              : ogley beq xe`z : ogley beq :  ogley xe`z  : ogley 'qn :        
^SCR("P1HALLSH",7)
                                                                               
^SCR("P1HALLSH",8)
                                                                               
^SCR("P1HALLSH",9)
                                                                               
^SCR("P1HALLSH",10)
                                                                               
^SCR("P1HALLSH",11)
                                                                               
^SCR("P1HALLSH",12)
                                                                               
^SCR("P1HALLSH",13)
                                                                               
^SCR("P1HALLSH",14)
                                                                               
^SCR("P1HALLSH",15)
                                                                               
^SCR("P1HALLSH",16)
                                                                               
^SCR("P1HALLSH",17)
                                                                               
^SCR("P1HALLSH",18)
                                                                               
^SCR("P1HALLSH",19)
                                                                               
^SCR("P1HALLSH",20)
                                                                               
^SCR("P1HALLSH",21)
        $1                                                                     
^SCR("P1HALLSH","A",1)
"š…�‡Œ…™-�Œ…€"„Œ�ˆ
^SCR("P1HALLSH","A",2)

^SCR("P1HALLSH","A",3)
:�Œ…€'‘Ž
^SCR("P1HALLSH","A",4)

^SCR("P1HALLSH","A",5)

^SCR("P1HALLSH","A",6)
�‡Œ…™‚…‘˜…€š�‡Œ…™‚…‘�‡Œ…™˜…€š�‡Œ…™'‘Ž
^SCR("P1HALLSH","A",7)
----------------------------------------------------
^SCR("P1HALLSH","A",8)

^SCR("P1HALLSH","A",9)

^SCR("P1HALLSH","A",10)

^SCR("P1HALLSH","A",11)

^SCR("P1HALLSH","A",12)

^SCR("P1HALLSH","A",13)

^SCR("P1HALLSH","A",14)

^SCR("P1HALLSH","A",15)

^SCR("P1HALLSH","A",16)

^SCR("P1HALLSH","A",17)

^SCR("P1HALLSH","A",18)

^SCR("P1HALLSH","A",19)

^SCR("P1HALLSH","A",20)

^SCR("P1HALLSH","A",21)

^SCR("P1HALLSH","AV",1)
",ubjkua-okut"vkcy
^SCR("P1HALLSH","AV",2)

^SCR("P1HALLSH","AV",3)
:okutwxn
^SCR("P1HALLSH","AV",4)

^SCR("P1HALLSH","AV",5)

^SCR("P1HALLSH","AV",6)
ijkuaduxrut,ijkuaduxijkuarut,ijkuawxn
^SCR("P1HALLSH","AV",7)
----------------------------------------------------
^SCR("P1HALLSH","AV",8)

^SCR("P1HALLSH","AV",9)

^SCR("P1HALLSH","AV",10)

^SCR("P1HALLSH","AV",11)

^SCR("P1HALLSH","AV",12)

^SCR("P1HALLSH","AV",13)

^SCR("P1HALLSH","AV",14)

^SCR("P1HALLSH","AV",15)

^SCR("P1HALLSH","AV",16)

^SCR("P1HALLSH","AV",17)

^SCR("P1HALLSH","AV",18)

^SCR("P1HALLSH","AV",19)

^SCR("P1HALLSH","AV",20)

^SCR("P1HALLSH","AV",21)

^SCR("P1HALLSH","G",1,"CHECK")
Y
^SCR("P1HALLSH","G",1,"CRD")
7,70,E,3,0
^SCR("P1HALLSH","G",1,"FNC")

^SCR("P1HALLSH","G",1,"GLOB")
LKH
^SCR("P1HALLSH","G",1,"HELP")

^SCR("P1HALLSH","G",1,"LMAX")
11
^SCR("P1HALLSH","G",1,"MUMPS1")

^SCR("P1HALLSH","G",1,"MUMPS2")
D SHULH^P1HALLSH
^SCR("P1HALLSH","G",1,"MUST")

^SCR("P1HALLSH","G",1,"NLN")
20
^SCR("P1HALLSH","G",1,"RZD")
\
^SCR("P1HALLSH","G",1,"SHEM")
 ogley 'qn 
^SCR("P1HALLSH","G",1,"TOPB")
8
^SCR("P1HALLSH","G",1,"TYP")
E
^SCR("P1HALLSH","G",1,"VRB")
SHULH1
^SCR("P1HALLSH","G",2,"CRD")
7,58,H,14,0
^SCR("P1HALLSH","G",2,"HELP")

^SCR("P1HALLSH","G",2,"LMAX")
14
^SCR("P1HALLSH","G",2,"MUMPS1")

^SCR("P1HALLSH","G",2,"MUMPS2")

^SCR("P1HALLSH","G",2,"OUTPUT")

^SCR("P1HALLSH","G",2,"SHEM")
  ogley xe`z  
^SCR("P1HALLSH","G",2,"TYP")
H
^SCR("P1HALLSH","G",3,"CRD")
7,43,N,3,0
^SCR("P1HALLSH","G",3,"HELP")

^SCR("P1HALLSH","G",3,"LMAX")
11
^SCR("P1HALLSH","G",3,"MUMPS1")

^SCR("P1HALLSH","G",3,"MUMPS2")

^SCR("P1HALLSH","G",3,"OUTPUT")

^SCR("P1HALLSH","G",3,"SHEM")
 ogley beq 
^SCR("P1HALLSH","G",3,"TYP")
N
^SCR("P1HALLSH","G",4,"CRD")
7,31,H,16,0
^SCR("P1HALLSH","G",4,"HELP")

^SCR("P1HALLSH","G",4,"LMAX")
16
^SCR("P1HALLSH","G",4,"MUMPS1")

^SCR("P1HALLSH","G",4,"MUMPS2")

^SCR("P1HALLSH","G",4,"OUTPUT")

^SCR("P1HALLSH","G",4,"SHEM")
 ogley beq xe`z 
^SCR("P1HALLSH","G",4,"TYP")
H
^SCR("P1HALLSH","G","DEL")
Y
^SCR("P1HALLSH","G","MAX")
99999
^SCR("P1HALLSH","G","NAME","SHULH")
1
^SCR("P1HALLSH","G","NAME","SHULH1")
2
^SCR("P1HALLSH","G","NAME","SUGS")
3
^SCR("P1HALLSH","G","NAME","SUGS1")
4
^SCR("P1HALLSH","G","NM",1)
SHULH
^SCR("P1HALLSH","G","NM",2)
SHULH1
^SCR("P1HALLSH","G","NM",3)
SUGS
^SCR("P1HALLSH","G","NM",4)
SUGS1
^SCR("P1HALLSH","G","RB")
6,9,22,74
^SCR("P1HALLSH","G","REF")
^TEMP(%L3MYDVN
^SCR("P1HALLSH","G","RZD")
\
^SCR("P1HALLSH","G","STEP")
1
^SCR("P1HALLSH","G","STG")
              : ogley beq xe`z : ogley beq :  ogley xe`z  : ogley 'qn :        
^SCR("P1HALLSH","G","VG")
8
^SCR("P1HALLSH","NAME")
"zepgley - mle`" dlah
^SCR("P1HALLSH","P",5,"CRD")
3,56,N,2,0
^SCR("P1HALLSH","P",5,"FNC")

^SCR("P1HALLSH","P",5,"GLOB")
P1HALL
^SCR("P1HALLSH","P",5,"HELP")

^SCR("P1HALLSH","P",5,"LMAX")
6
^SCR("P1HALLSH","P",5,"MUMPS1")

^SCR("P1HALLSH","P",5,"MUMPS2")
D HALL^P1HALLSH
^SCR("P1HALLSH","P",5,"NLN")
20
^SCR("P1HALLSH","P",5,"RZD")
\
^SCR("P1HALLSH","P",5,"TOPB")
8
^SCR("P1HALLSH","P",5,"TYP")
N
^SCR("P1HALLSH","P",5,"VRB")
HALL1
^SCR("P1HALLSH","P",6,"CRD")
3,55,H,24,0
^SCR("P1HALLSH","P",6,"HELP")

^SCR("P1HALLSH","P",6,"LMAX")
24
^SCR("P1HALLSH","P",6,"MUMPS1")

^SCR("P1HALLSH","P",6,"MUMPS2")
I HALL1="" S %SC("ST")=1
^SCR("P1HALLSH","P",6,"OUTPUT")

^SCR("P1HALLSH","P",6,"TYP")
H
^SCR("P1HALLSH","P","NAME","HALL")
5
^SCR("P1HALLSH","P","NAME","HALL1")
6
^SCR("P1HALLSH","P","NM",5)
HALL
^SCR("P1HALLSH","P","NM",6)
HALL1
^SCR("P1HB")
H
^SCR("P1HB",1)
        #{                     03}#                                            
^SCR("P1HB",2)
                     {10      }:jix`z cr    {05      }:jix`zn                  
^SCR("P1HB",3)
                    {13       }: gewl cr  {12        }: gewln                  
^SCR("P1HB",4)
        {14 } :  3 - zeipeaygd lk ,2 - zeipci ,1 - zeihnehe` zeipeayg          
^SCR("P1HB",5)
                                                                          1$   
^SCR("P1HB",6)
    :      gewld my    :  gewl 'qn :  n"rn  :  mekq  :zipeayg: jix`z  :        
^SCR("P1HB",7)
                                                                               
^SCR("P1HB",8)
                                                                               
^SCR("P1HB",9)
                                                                               
^SCR("P1HB",10)
                                                                               
^SCR("P1HB",11)
                                                                               
^SCR("P1HB",12)
                                                                               
^SCR("P1HB",13)
                                                                               
^SCR("P1HB",14)
                                                                               
^SCR("P1HB",15)
                                                                               
^SCR("P1HB",16)
                                                                               
^SCR("P1HB",17)
                                                                               
^SCR("P1HB",18)
                                                                               
^SCR("P1HB",19)
                                                                               
^SCR("P1HB",20)
  $1                                                                           
^SCR("P1HB",21)
  {30       }: n"rn iptl  {25    }: n"rn  {20       }:k"dq  {15  }:zeipeayg    
^SCR("P1HB",22)
                                                                               
^SCR("P1HB",23)
zfkexn i`ln zipeayg - 'M' , i`lndn dxiyi zipeayg - '<' , zipci zipeayg - '+' * 
^SCR("P1HB","A",1)

^SCR("P1HB","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1HB","A",3)
:‡…—Œƒ’:‡…—ŒŽ
^SCR("P1HB","A",4)
:3-š…‰�…�™‡„Œ‹,2-š…‰�ƒ‰,1-š…‰ˆŽ…ˆ…€š…‰�…�™‡
^SCR("P1HB","A",5)

^SCR("P1HB","A",6)
‡…—Œ„�™‡…—Œ'‘ŽŽ"’Ž�…‹‘š‰�…�™‡Š‰˜€š
^SCR("P1HB","A",7)
------------------------------------------------------------
^SCR("P1HB","A",8)

^SCR("P1HB","A",9)

^SCR("P1HB","A",10)

^SCR("P1HB","A",11)

^SCR("P1HB","A",12)

^SCR("P1HB","A",13)

^SCR("P1HB","A",14)

^SCR("P1HB","A",15)

^SCR("P1HB","A",16)

^SCR("P1HB","A",17)

^SCR("P1HB","A",18)

^SCR("P1HB","A",19)

^SCR("P1HB","A",20)

^SCR("P1HB","A",21)
:Ž"’Ž‰�”Œ:Ž"’Ž:‹"„‘:š…‰�…�™‡
^SCR("P1HB","A",22)

^SCR("P1HB","A",23)
š†‹…˜Ž‰€ŒŽš‰�…�™‡-'M',‰€ŒŽ„Ž„˜‰™‰š‰�…�™‡-'<',š‰�ƒ‰š‰�…�™‡-'+'*
^SCR("P1HB","AV",1)

^SCR("P1HB","AV",2)
:lhrt,sg:lhrt,n
^SCR("P1HB","AV",3)
:jueksg:juekn
^SCR("P1HB","AV",4)
:3-,uhbucajvkf'2-,uhbsh'1-,uhynuyut,uhbucaj
^SCR("P1HB","AV",5)

^SCR("P1HB","AV",6)
juekvoajuekwxnn"gnoufx,hbucajlhrt,
^SCR("P1HB","AV",7)
------------------------------------------------------------
^SCR("P1HB","AV",8)

^SCR("P1HB","AV",9)

^SCR("P1HB","AV",10)

^SCR("P1HB","AV",11)

^SCR("P1HB","AV",12)

^SCR("P1HB","AV",13)

^SCR("P1HB","AV",14)

^SCR("P1HB","AV",15)

^SCR("P1HB","AV",16)

^SCR("P1HB","AV",17)

^SCR("P1HB","AV",18)

^SCR("P1HB","AV",19)

^SCR("P1HB","AV",20)

^SCR("P1HB","AV",21)
:n"gnhbpk:n"gn:f"vx:,uhbucaj
^SCR("P1HB","AV",22)

^SCR("P1HB","AV",23)
,zfurnhtkn,hbucaj-wMw'htknvnvrhah,hbucaj-w<w',hbsh,hbucaj-w+w*
^SCR("P1HB","G",1,"CRD")
7,70,D,8,0
^SCR("P1HB","G",1,"HELP")

^SCR("P1HB","G",1,"LMAX")
8
^SCR("P1HB","G",1,"MUMPS1")

^SCR("P1HB","G",1,"MUMPS2")

^SCR("P1HB","G",1,"OUTPUT")

^SCR("P1HB","G",1,"SHEM")
 jix`z  
^SCR("P1HB","G",1,"TYP")
D
^SCR("P1HB","G",2,"CRD")
7,61,E,7,0
^SCR("P1HB","G",2,"HELP")
<F9> ugl zipeayg zbvdl 
^SCR("P1HB","G",2,"LMAX")
7
^SCR("P1HB","G",2,"MUMPS1")

^SCR("P1HB","G",2,"MUMPS2")
D HESB^P1DHB
^SCR("P1HB","G",2,"SHEM")
zipeayg
^SCR("P1HB","G",2,"TYP")
E
^SCR("P1HB","G",3,"CRD")
7,53,N,8,2
^SCR("P1HB","G",3,"HELP")

^SCR("P1HB","G",3,"LMAX")
8
^SCR("P1HB","G",3,"MUMPS1")

^SCR("P1HB","G",3,"MUMPS2")

^SCR("P1HB","G",3,"OUTPUT")

^SCR("P1HB","G",3,"SHEM")
  mekq  
^SCR("P1HB","G",3,"TYP")
N
^SCR("P1HB","G",4,"CRD")
7,44,N,8,2
^SCR("P1HB","G",4,"HELP")

^SCR("P1HB","G",4,"LMAX")
8
^SCR("P1HB","G",4,"MUMPS1")

^SCR("P1HB","G",4,"MUMPS2")

^SCR("P1HB","G",4,"OUTPUT")

^SCR("P1HB","G",4,"SHEM")
  n"rn  
^SCR("P1HB","G",4,"TYP")
N
^SCR("P1HB","G",5,"CRD")
7,35,E,10,0
^SCR("P1HB","G",5,"HELP")

^SCR("P1HB","G",5,"LMAX")
11
^SCR("P1HB","G",5,"MUMPS1")

^SCR("P1HB","G",5,"MUMPS2")

^SCR("P1HB","G",5,"OUTPUT")

^SCR("P1HB","G",5,"SHEM")
  gewl 'qn 
^SCR("P1HB","G",5,"TYP")
E
^SCR("P1HB","G",6,"CRD")
7,23,H,16,0
^SCR("P1HB","G",6,"HELP")

^SCR("P1HB","G",6,"LMAX")
18
^SCR("P1HB","G",6,"MUMPS1")

^SCR("P1HB","G",6,"MUMPS2")

^SCR("P1HB","G",6,"OUTPUT")

^SCR("P1HB","G",6,"SHEM")
      gewld my    
^SCR("P1HB","G",6,"TYP")
H
^SCR("P1HB","G","DEL")

^SCR("P1HB","G","MAX")
99999
^SCR("P1HB","G","NAME","DATH")
1
^SCR("P1HB","G","NAME","HESB")
2
^SCR("P1HB","G","NAME","MAM")
4
^SCR("P1HB","G","NAME","NAME")
6
^SCR("P1HB","G","NAME","NMB")
5
^SCR("P1HB","G","NAME","SHUM")
3
^SCR("P1HB","G","NM",1)
DATH
^SCR("P1HB","G","NM",2)
HESB
^SCR("P1HB","G","NM",3)
SHUM
^SCR("P1HB","G","NM",4)
MAM
^SCR("P1HB","G","NM",5)
NMB
^SCR("P1HB","G","NM",6)
NAME
^SCR("P1HB","G","RB")
6,3,21,76
^SCR("P1HB","G","REF")
^TEMPDH($P
^SCR("P1HB","G","RZD")
\
^SCR("P1HB","G","STEP")
1
^SCR("P1HB","G","STG")
    :      gewld my    :  gewl 'qn :  n"rn  :  mekq  :zipeayg: jix`z  :        
^SCR("P1HB","G","VG")
8
^SCR("P1HB","NAME")
zeipeayg g"ec
^SCR("P1HB","P",3,"CRD")
1,34,H,24
^SCR("P1HB","P",3,"HELP")

^SCR("P1HB","P",3,"LMAX")
24
^SCR("P1HB","P",3,"MUMPS1")

^SCR("P1HB","P",3,"MUMPS2")

^SCR("P1HB","P",3,"OUTPUT")

^SCR("P1HB","P",3,"TYP")
H
^SCR("P1HB","P",5,"CRD")
2,44,D,8,0
^SCR("P1HB","P",5,"HELP")

^SCR("P1HB","P",5,"LMAX")
9
^SCR("P1HB","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("P1HB","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("P1HB","P",5,"MUST")

^SCR("P1HB","P",5,"TYP")
D
^SCR("P1HB","P",10,"CRD")
2,21,D,8,0
^SCR("P1HB","P",10,"HELP")

^SCR("P1HB","P",10,"LMAX")
9
^SCR("P1HB","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1HB","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I $E(D2)="?" S %SC("ER")=1
^SCR("P1HB","P",10,"MUST")

^SCR("P1HB","P",10,"TYP")
D
^SCR("P1HB","P",12,"CRD")
3,42,E,11,0
^SCR("P1HB","P",12,"FNC")

^SCR("P1HB","P",12,"GLOB")
LKH
^SCR("P1HB","P",12,"HELP")

^SCR("P1HB","P",12,"LMAX")
11
^SCR("P1HB","P",12,"MUMPS1")

^SCR("P1HB","P",12,"MUMPS2")

^SCR("P1HB","P",12,"NLN")
20
^SCR("P1HB","P",12,"RZD")
\
^SCR("P1HB","P",12,"TOPB")
8
^SCR("P1HB","P",12,"TYP")
E
^SCR("P1HB","P",13,"CRD")
3,20,E,10,0
^SCR("P1HB","P",13,"FNC")

^SCR("P1HB","P",13,"GLOB")
LKH
^SCR("P1HB","P",13,"HELP")

^SCR("P1HB","P",13,"LMAX")
10
^SCR("P1HB","P",13,"MUMPS1")
S:'$G(ADLKH) ADLKH=MELKH
^SCR("P1HB","P",13,"MUMPS2")
I ADLKH<MELKH S %SC("ER")=1
^SCR("P1HB","P",13,"NLN")
20
^SCR("P1HB","P",13,"RZD")
\
^SCR("P1HB","P",13,"TOPB")
8
^SCR("P1HB","P",13,"TYP")
E
^SCR("P1HB","P",14,"CRD")
4,8,N,4,0
^SCR("P1HB","P",14,"HELP")

^SCR("P1HB","P",14,"LMAX")
4
^SCR("P1HB","P",14,"MUMPS1")
S:'$G(VD) VD=3
^SCR("P1HB","P",14,"MUMPS2")
I VD<1!(VD>3) S %SC("ER")=1
^SCR("P1HB","P",14,"TYP")
N
^SCR("P1HB","P",15,"CRD")
21,60,N,5,0
^SCR("P1HB","P",15,"HELP")

^SCR("P1HB","P",15,"LMAX")
5
^SCR("P1HB","P",15,"MUMPS1")

^SCR("P1HB","P",15,"MUMPS2")

^SCR("P1HB","P",15,"OUTPUT")

^SCR("P1HB","P",15,"TYP")
N
^SCR("P1HB","P",20,"CRD")
21,42,N,8,2
^SCR("P1HB","P",20,"HELP")

^SCR("P1HB","P",20,"LMAX")
10
^SCR("P1HB","P",20,"MUMPS1")

^SCR("P1HB","P",20,"MUMPS2")

^SCR("P1HB","P",20,"OUTPUT")

^SCR("P1HB","P",20,"TYP")
N
^SCR("P1HB","P",25,"CRD")
21,26,N,7,2
^SCR("P1HB","P",25,"HELP")

^SCR("P1HB","P",25,"LMAX")
7
^SCR("P1HB","P",25,"MUMPS1")

^SCR("P1HB","P",25,"MUMPS2")

^SCR("P1HB","P",25,"OUTPUT")

^SCR("P1HB","P",25,"TYP")
N
^SCR("P1HB","P",30,"CRD")
21,2,N,10,2
^SCR("P1HB","P",30,"HELP")

^SCR("P1HB","P",30,"LMAX")
10
^SCR("P1HB","P",30,"MUMPS1")

^SCR("P1HB","P",30,"MUMPS2")

^SCR("P1HB","P",30,"OUTPUT")

^SCR("P1HB","P",30,"TYP")
N
^SCR("P1HB","P","NAME","ADLKH")
13
^SCR("P1HB","P","NAME","DAT1")
5
^SCR("P1HB","P","NAME","DAT2")
10
^SCR("P1HB","P","NAME","KOT")
3
^SCR("P1HB","P","NAME","MELKH")
12
^SCR("P1HB","P","NAME","SLMAM")
30
^SCR("P1HB","P","NAME","SMAM")
25
^SCR("P1HB","P","NAME","SUM")
20
^SCR("P1HB","P","NAME","SUMH")
15
^SCR("P1HB","P","NAME","VD")
14
^SCR("P1HB","P","NM",3)
KOT
^SCR("P1HB","P","NM",5)
DAT1
^SCR("P1HB","P","NM",10)
DAT2
^SCR("P1HB","P","NM",12)
MELKH
^SCR("P1HB","P","NM",13)
ADLKH
^SCR("P1HB","P","NM",14)
VD
^SCR("P1HB","P","NM",15)
SUMH
^SCR("P1HB","P","NM",20)
SUM
^SCR("P1HB","P","NM",25)
SMAM
^SCR("P1HB","P","NM",30)
SLMAM
^SCR("P1HB2")
H
^SCR("P1HB2",1)
                     {                                03}                      
^SCR("P1HB2",2)
                                                                               
^SCR("P1HB2",3)
                       {10      } jix`z cr   {05      } jix`zn                 
^SCR("P1HB2",4)
                      {14       }  gewl cr   {12       } gewln                 
^SCR("P1HB2",5)
                                                                             1$
^SCR("P1HB2",6)
  : `zknq`: dpnfd :   gewld my    : gewl 'qn :  mekq :i`xy` oeayg: jix`z  :    
^SCR("P1HB2",7)
                                                                               
^SCR("P1HB2",8)
                                                                               
^SCR("P1HB2",9)
                                                                               
^SCR("P1HB2",10)
                                                                               
^SCR("P1HB2",11)
                                                                               
^SCR("P1HB2",12)
                                                                               
^SCR("P1HB2",13)
                                                                               
^SCR("P1HB2",14)
                                                                               
^SCR("P1HB2",15)
                                                                               
^SCR("P1HB2",16)
                                                                               
^SCR("P1HB2",17)
                                                                               
^SCR("P1HB2",18)
                                                                               
^SCR("P1HB2",19)
                                                                               
^SCR("P1HB2",20)
                                                                               
^SCR("P1HB2",21)
 $1                                                                            
^SCR("P1HB2",22)
                       {25     : mitih  {20       }:k"dq  {15  }:zepeayg       
^SCR("P1HB2","A",1)

^SCR("P1HB2","A",2)

^SCR("P1HB2","A",3)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("P1HB2","A",4)
‡…—Œƒ’‡…—ŒŽ
^SCR("P1HB2","A",5)

^SCR("P1HB2","A",6)
€š‹Ž‘€„�Ž†„‡…—Œ„�™‡…—Œ'‘Ž�…‹‘‰€˜™€�…�™‡Š‰˜€š
^SCR("P1HB2","A",7)
---------------------------------------------------------------------
^SCR("P1HB2","A",8)

^SCR("P1HB2","A",9)

^SCR("P1HB2","A",10)

^SCR("P1HB2","A",11)

^SCR("P1HB2","A",12)

^SCR("P1HB2","A",13)

^SCR("P1HB2","A",14)

^SCR("P1HB2","A",15)

^SCR("P1HB2","A",16)

^SCR("P1HB2","A",17)

^SCR("P1HB2","A",18)

^SCR("P1HB2","A",19)

^SCR("P1HB2","A",20)

^SCR("P1HB2","A",21)

^SCR("P1HB2","A",22)
:�‰”‰ˆ:‹"„‘:š…�…�™‡
^SCR("P1HB2","AV",1)

^SCR("P1HB2","AV",2)

^SCR("P1HB2","AV",3)
lhrt,sglhrt,n
^SCR("P1HB2","AV",4)
jueksgjuekn
^SCR("P1HB2","AV",5)

^SCR("P1HB2","AV",6)
t,fnxtvbnzvjuekvoajuekwxnoufxhtratiucajlhrt,
^SCR("P1HB2","AV",7)
---------------------------------------------------------------------
^SCR("P1HB2","AV",8)

^SCR("P1HB2","AV",9)

^SCR("P1HB2","AV",10)

^SCR("P1HB2","AV",11)

^SCR("P1HB2","AV",12)

^SCR("P1HB2","AV",13)

^SCR("P1HB2","AV",14)

^SCR("P1HB2","AV",15)

^SCR("P1HB2","AV",16)

^SCR("P1HB2","AV",17)

^SCR("P1HB2","AV",18)

^SCR("P1HB2","AV",19)

^SCR("P1HB2","AV",20)

^SCR("P1HB2","AV",21)

^SCR("P1HB2","AV",22)
:ohphy:f"vx:,ubucaj
^SCR("P1HB2","G",1,"CRD")
7,74,D,8,0
^SCR("P1HB2","G",1,"HELP")

^SCR("P1HB2","G",1,"LMAX")
8
^SCR("P1HB2","G",1,"MUMPS1")

^SCR("P1HB2","G",1,"MUMPS2")

^SCR("P1HB2","G",1,"OUTPUT")

^SCR("P1HB2","G",1,"SHEM")
 jix`z  
^SCR("P1HB2","G",1,"TYP")
D
^SCR("P1HB2","G",2,"CRD")
7,65,E,7,0
^SCR("P1HB2","G",2,"HELP")

^SCR("P1HB2","G",2,"LMAX")
11
^SCR("P1HB2","G",2,"MUMPS1")

^SCR("P1HB2","G",2,"MUMPS2")

^SCR("P1HB2","G",2,"OUTPUT")

^SCR("P1HB2","G",2,"SHEM")
i`xy` oeayg
^SCR("P1HB2","G",2,"TYP")
E
^SCR("P1HB2","G",3,"CRD")
7,53,N,6,2
^SCR("P1HB2","G",3,"HELP")

^SCR("P1HB2","G",3,"LMAX")
7
^SCR("P1HB2","G",3,"MUMPS1")

^SCR("P1HB2","G",3,"MUMPS2")

^SCR("P1HB2","G",3,"OUTPUT")

^SCR("P1HB2","G",3,"SHEM")
  mekq 
^SCR("P1HB2","G",3,"TYP")
N
^SCR("P1HB2","G",4,"CRD")
7,45,E,10,0
^SCR("P1HB2","G",4,"HELP")

^SCR("P1HB2","G",4,"LMAX")
10
^SCR("P1HB2","G",4,"MUMPS1")

^SCR("P1HB2","G",4,"MUMPS2")

^SCR("P1HB2","G",4,"OUTPUT")

^SCR("P1HB2","G",4,"SHEM")
 gewl 'qn 
^SCR("P1HB2","G",4,"TYP")
E
^SCR("P1HB2","G",5,"CRD")
7,34,H,15,0
^SCR("P1HB2","G",5,"HELP")

^SCR("P1HB2","G",5,"LMAX")
15
^SCR("P1HB2","G",5,"MUMPS1")

^SCR("P1HB2","G",5,"MUMPS2")

^SCR("P1HB2","G",5,"OUTPUT")

^SCR("P1HB2","G",5,"SHEM")
   gewld my    
^SCR("P1HB2","G",5,"TYP")
H
^SCR("P1HB2","G",6,"CRD")
7,18,E,7,0
^SCR("P1HB2","G",6,"HELP")
<F9> - dpnfd zbvd
^SCR("P1HB2","G",6,"LMAX")
7
^SCR("P1HB2","G",6,"MUMPS1")

^SCR("P1HB2","G",6,"MUMPS2")
I %OLDTO="F9",$G(HZM) D HZG^P1S K ^TEMP($P),^TEMP1($P) N %FNAME S %SCRN="P1HB2",%FNAME="" D A^%L1SC S %SC("ST")=1
^SCR("P1HB2","G",6,"SHEM")
 dpnfd 
^SCR("P1HB2","G",6,"TYP")
E
^SCR("P1HB2","G",7,"CRD")
7,10,E,7,0
^SCR("P1HB2","G",7,"HELP")

^SCR("P1HB2","G",7,"LMAX")
7
^SCR("P1HB2","G",7,"MUMPS1")

^SCR("P1HB2","G",7,"MUMPS2")

^SCR("P1HB2","G",7,"SHEM")
 `zknq`
^SCR("P1HB2","G",7,"TYP")
E
^SCR("P1HB2","G","DEL")

^SCR("P1HB2","G","MAX")
99999
^SCR("P1HB2","G","NAME","ASM")
7
^SCR("P1HB2","G","NAME","DATH")
1
^SCR("P1HB2","G","NAME","HESB")
2
^SCR("P1HB2","G","NAME","HZM")
6
^SCR("P1HB2","G","NAME","NAME")
5
^SCR("P1HB2","G","NAME","NMB")
4
^SCR("P1HB2","G","NAME","SHUM")
3
^SCR("P1HB2","G","NM",1)
DATH
^SCR("P1HB2","G","NM",2)
HESB
^SCR("P1HB2","G","NM",3)
SHUM
^SCR("P1HB2","G","NM",4)
NMB
^SCR("P1HB2","G","NM",5)
NAME
^SCR("P1HB2","G","NM",6)
HZM
^SCR("P1HB2","G","NM",7)
ASM
^SCR("P1HB2","G","RB")
6,2,22,79
^SCR("P1HB2","G","REF")
^TEMPDH($P
^SCR("P1HB2","G","RZD")
\
^SCR("P1HB2","G","STEP")
1
^SCR("P1HB2","G","STG")
  : `zknq`: dpnfd :   gewld my    : gewl 'qn :  mekq :i`xy` oeayg: jix`z  :    
^SCR("P1HB2","G","VG")
8
^SCR("P1HB2","NAME")
i`xy` zepeayg
^SCR("P1HB2","P",3,"CRD")
1,57,H,24
^SCR("P1HB2","P",3,"HELP")

^SCR("P1HB2","P",3,"LMAX")
35
^SCR("P1HB2","P",3,"MUMPS1")

^SCR("P1HB2","P",3,"MUMPS2")

^SCR("P1HB2","P",3,"OUTPUT")

^SCR("P1HB2","P",3,"TYP")
H
^SCR("P1HB2","P",5,"CRD")
3,45,D,8,0
^SCR("P1HB2","P",5,"HELP")

^SCR("P1HB2","P",5,"LMAX")
9
^SCR("P1HB2","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("P1HB2","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("P1HB2","P",5,"MUST")

^SCR("P1HB2","P",5,"TYP")
D
^SCR("P1HB2","P",10,"CRD")
3,23,D,8,0
^SCR("P1HB2","P",10,"HELP")

^SCR("P1HB2","P",10,"LMAX")
9
^SCR("P1HB2","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1HB2","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) S:'D2 %SC("ER")=1
^SCR("P1HB2","P",10,"TYP")
D
^SCR("P1HB2","P",12,"CRD")
4,45,E,10,0
^SCR("P1HB2","P",12,"FNC")

^SCR("P1HB2","P",12,"GLOB")
LKH
^SCR("P1HB2","P",12,"HELP")

^SCR("P1HB2","P",12,"LMAX")
10
^SCR("P1HB2","P",12,"MUMPS1")

^SCR("P1HB2","P",12,"MUMPS2")

^SCR("P1HB2","P",12,"NLN")
20
^SCR("P1HB2","P",12,"RZD")
\
^SCR("P1HB2","P",12,"TOPB")
8
^SCR("P1HB2","P",12,"TYP")
E
^SCR("P1HB2","P",14,"CRD")
4,22,E,10,0
^SCR("P1HB2","P",14,"FNC")

^SCR("P1HB2","P",14,"GLOB")
LKH
^SCR("P1HB2","P",14,"HELP")

^SCR("P1HB2","P",14,"LMAX")
10
^SCR("P1HB2","P",14,"MUMPS1")
S:$G(MELKH) ADLKH=MELKH S:'$G(ADLKH) ADLKH=99999999999
^SCR("P1HB2","P",14,"MUMPS2")

^SCR("P1HB2","P",14,"NLN")
20
^SCR("P1HB2","P",14,"RZD")
\
^SCR("P1HB2","P",14,"TOPB")
8
^SCR("P1HB2","P",14,"TYP")
E
^SCR("P1HB2","P",15,"CRD")
22,58,N,5,0
^SCR("P1HB2","P",15,"HELP")

^SCR("P1HB2","P",15,"LMAX")
5
^SCR("P1HB2","P",15,"MUMPS1")

^SCR("P1HB2","P",15,"MUMPS2")

^SCR("P1HB2","P",15,"OUTPUT")

^SCR("P1HB2","P",15,"TYP")
N
^SCR("P1HB2","P",20,"CRD")
22,40,N,8,2
^SCR("P1HB2","P",20,"HELP")

^SCR("P1HB2","P",20,"LMAX")
10
^SCR("P1HB2","P",20,"MUMPS1")

^SCR("P1HB2","P",20,"MUMPS2")

^SCR("P1HB2","P",20,"OUTPUT")

^SCR("P1HB2","P",20,"TYP")
N
^SCR("P1HB2","P",25,"CRD")
22,23,N,8,2
^SCR("P1HB2","P",25,"HELP")

^SCR("P1HB2","P",25,"LMAX")
8
^SCR("P1HB2","P",25,"MUMPS1")

^SCR("P1HB2","P",25,"MUMPS2")

^SCR("P1HB2","P",25,"OUTPUT")

^SCR("P1HB2","P",25,"TYP")
N
^SCR("P1HB2","P","NAME","ADLKH")
14
^SCR("P1HB2","P","NAME","DAT1")
5
^SCR("P1HB2","P","NAME","DAT2")
10
^SCR("P1HB2","P","NAME","KOT")
3
^SCR("P1HB2","P","NAME","MELKH")
12
^SCR("P1HB2","P","NAME","SUM")
20
^SCR("P1HB2","P","NAME","SUMH")
15
^SCR("P1HB2","P","NAME","TIPAS")
25
^SCR("P1HB2","P","NM",3)
KOT
^SCR("P1HB2","P","NM",5)
DAT1
^SCR("P1HB2","P","NM",10)
DAT2
^SCR("P1HB2","P","NM",12)
MELKH
^SCR("P1HB2","P","NM",14)
ADLKH
^SCR("P1HB2","P","NM",15)
SUMH
^SCR("P1HB2","P","NM",20)
SUM
^SCR("P1HB2","P","NM",25)
TIPAS
^SCR("P1HBA")
H
^SCR("P1HBA",1)
                          # zihnehe` zipeayg zwtd #                            
^SCR("P1HBA",2)
              {                          10}:gewl my  {05         }:gewl xtqn  
^SCR("P1HBA",3)
              {                                                    15}: zaezk  
^SCR("P1HBA",4)
                                              {17      } : gewl ly zncew dxzi  
^SCR("P1HBA",5)
       {21       }:jix`zl # {24 }{20     } zipeayg #                           
^SCR("P1HBA",6)
                                                                         1$    
^SCR("P1HBA",7)
      :    mekq  :                        dxrd               :   mekq  :       
^SCR("P1HBA",8)
      :n"rn llek :                                           :n"rn `ll :       
^SCR("P1HBA",9)
                                                                               
^SCR("P1HBA",10)
                                                                               
^SCR("P1HBA",11)
                                                                               
^SCR("P1HBA",12)
                                                                               
^SCR("P1HBA",13)
                                                                               
^SCR("P1HBA",14)
                                                                               
^SCR("P1HBA",15)
                                                                               
^SCR("P1HBA",16)
                                                                               
^SCR("P1HBA",17)
                                                                               
^SCR("P1HBA",18)
                                                                               
^SCR("P1HBA",19)
   $1                                                                          
^SCR("P1HBA",20)
      {32      } mley {30      }:k"dq               {25      }:zepnfd zenk     
^SCR("P1HBA",21)
  {40      } 'qn dlaw {35      }:zipeayga melyzl x`yp                          
^SCR("P1HBA",22)
  {                                                              50}: dxrd     
^SCR("P1HBA","A",1)
š‰ˆŽ…ˆ…€š‰�…�™‡š—”„
^SCR("P1HBA","A",2)
:‡…—Œ�™:‡…—Œ˜”‘Ž
^SCR("P1HBA","A",3)
:š�…š‹
^SCR("P1HBA","A",4)
:‡…—ŒŒ™šŽƒ…—„˜š‰
^SCR("P1HBA","A",5)
:Š‰˜€šŒš‰�…�™‡
^SCR("P1HBA","A",6)

^SCR("P1HBA","A",7)
�…‹‘„˜’„�…‹‘
^SCR("P1HBA","A",8)
Ž"’ŽŒŒ…‹Ž"’Ž€ŒŒ
^SCR("P1HBA","A",9)
--------------------------------------------------------------
^SCR("P1HBA","A",10)

^SCR("P1HBA","A",11)

^SCR("P1HBA","A",12)

^SCR("P1HBA","A",13)

^SCR("P1HBA","A",14)

^SCR("P1HBA","A",15)

^SCR("P1HBA","A",16)

^SCR("P1HBA","A",17)

^SCR("P1HBA","A",18)

^SCR("P1HBA","A",19)

^SCR("P1HBA","A",20)
�Œ…™:‹"„‘:š…�Ž†„š…Ž‹
^SCR("P1HBA","A",21)
'‘Ž„Œ�—:š‰�…�™‡��…Œ™šŒ˜€™�
^SCR("P1HBA","A",22)
:„˜’„
^SCR("P1HBA","AV",1)
,hynuyut,hbucaj,epv
^SCR("P1HBA","AV",2)
:juekoa:juekrpxn
^SCR("P1HBA","AV",3)
:,cu,f
^SCR("P1HBA","AV",4)
:juekka,nsuevr,h
^SCR("P1HBA","AV",5)
:lhrt,k,hbucaj
^SCR("P1HBA","AV",6)

^SCR("P1HBA","AV",7)
oufxvrgvoufx
^SCR("P1HBA","AV",8)
n"gnkkufn"gntkk
^SCR("P1HBA","AV",9)
--------------------------------------------------------------
^SCR("P1HBA","AV",10)

^SCR("P1HBA","AV",11)

^SCR("P1HBA","AV",12)

^SCR("P1HBA","AV",13)

^SCR("P1HBA","AV",14)

^SCR("P1HBA","AV",15)

^SCR("P1HBA","AV",16)

^SCR("P1HBA","AV",17)

^SCR("P1HBA","AV",18)

^SCR("P1HBA","AV",19)

^SCR("P1HBA","AV",20)
okua:f"vx:,ubnzv,unf
^SCR("P1HBA","AV",21)
wxnvkce:,hbucajcouka,krtab
^SCR("P1HBA","AV",22)
:vrgv
^SCR("P1HBA","G",1,"CRD")
8,71,N,7,2
^SCR("P1HBA","G",1,"HELP")
<F9> - dpnfd zbvd 
^SCR("P1HBA","G",1,"LMAX")
9
^SCR("P1HBA","G",1,"MUMPS1")
I @(%REFH1_"SHOLD)")["@@" S %MBG("OU")="IN\\IN"
^SCR("P1HBA","G",1,"MUMPS2")
D SUM^P1LHB
^SCR("P1HBA","G",1,"SHEM")
   mekq  
^SCR("P1HBA","G",1,"TYP")
N
^SCR("P1HBA","G",2,"CRD")
8,61,H,43,0
^SCR("P1HBA","G",2,"HELP")
<F9> - zipeayg hext bivdl 
^SCR("P1HBA","G",2,"LMAX")
43
^SCR("P1HBA","G",2,"MUMPS1")
S %ZMSL="="
^SCR("P1HBA","G",2,"MUMPS2")
D HRA^P1LHB
^SCR("P1HBA","G",2,"SHEM")
                        dxrd               
^SCR("P1HBA","G",2,"TYP")
H
^SCR("P1HBA","G",3,"CRD")
8,17,N,8,2
^SCR("P1HBA","G",3,"HELP")

^SCR("P1HBA","G",3,"LMAX")
10
^SCR("P1HBA","G",3,"MUMPS1")

^SCR("P1HBA","G",3,"MUMPS2")
D SUMM^P1LHB
^SCR("P1HBA","G",3,"SHEM")
    mekq  
^SCR("P1HBA","G",3,"TYP")
N
^SCR("P1HBA","G","DEL")
Y
^SCR("P1HBA","G","MAX")
4
^SCR("P1HBA","G","NAME","HRA")
2
^SCR("P1HBA","G","NAME","SUM")
1
^SCR("P1HBA","G","NAME","SUMM")
3
^SCR("P1HBA","G","NM",1)
SUM
^SCR("P1HBA","G","NM",2)
HRA
^SCR("P1HBA","G","NM",3)
SUMM
^SCR("P1HBA","G","RB")
7,4,20,75
^SCR("P1HBA","G","REF")
^TEMPLH($P
^SCR("P1HBA","G","RZD")
\
^SCR("P1HBA","G","STEP")
1
^SCR("P1HBA","G","STG")
      :    mekq  :                        dxrd               :   mekq  :       
^SCR("P1HBA","G","VG")
10
^SCR("P1HBA","NAME")
ihnehe` zipeayg z`ved
^SCR("P1HBA","P",5,"CHECK")
Y
^SCR("P1HBA","P",5,"CRD")
2,54,E,10,0
^SCR("P1HBA","P",5,"FNC")
F9,F8
^SCR("P1HBA","P",5,"GLOB")
LKH
^SCR("P1HBA","P",5,"HELP")
<F9>-zipeayg yetig <F8>+gewl:ze-ayg zniyx <F7>-zegewl zlah <F6>-my itl yetig
^SCR("P1HBA","P",5,"LMAX")
12
^SCR("P1HBA","P",5,"MUMPS1")

^SCR("P1HBA","P",5,"MUMPS2")
D LKH^P1LHB
^SCR("P1HBA","P",5,"MUST")

^SCR("P1HBA","P",5,"NLN")
20
^SCR("P1HBA","P",5,"RZD")
*
^SCR("P1HBA","P",5,"TOPB")
8
^SCR("P1HBA","P",5,"TYP")
E
^SCR("P1HBA","P",5,"VRB")
LKH1
^SCR("P1HBA","P",10,"CRD")
2,44,H,25
^SCR("P1HBA","P",10,"HELP")

^SCR("P1HBA","P",10,"LMAX")
29
^SCR("P1HBA","P",10,"MUMPS1")

^SCR("P1HBA","P",10,"MUMPS2")

^SCR("P1HBA","P",10,"OUTPUT")

^SCR("P1HBA","P",10,"TYP")
H
^SCR("P1HBA","P",15,"CRD")
3,70,H,55
^SCR("P1HBA","P",15,"HELP")

^SCR("P1HBA","P",15,"LMAX")
55
^SCR("P1HBA","P",15,"MUMPS1")

^SCR("P1HBA","P",15,"MUMPS2")

^SCR("P1HBA","P",15,"OUTPUT")

^SCR("P1HBA","P",15,"TYP")
H
^SCR("P1HBA","P",17,"CRD")
4,46,N,9,2
^SCR("P1HBA","P",17,"HELP")

^SCR("P1HBA","P",17,"LMAX")
9
^SCR("P1HBA","P",17,"MUMPS1")

^SCR("P1HBA","P",17,"MUMPS2")

^SCR("P1HBA","P",17,"OUTPUT")

^SCR("P1HBA","P",17,"TYP")
N
^SCR("P1HBA","P",20,"CRD")
5,33,E,7,0
^SCR("P1HBA","P",20,"HELP")

^SCR("P1HBA","P",20,"LMAX")
8
^SCR("P1HBA","P",20,"MUMPS1")

^SCR("P1HBA","P",20,"MUMPS2")

^SCR("P1HBA","P",20,"OUTPUT")

^SCR("P1HBA","P",20,"TYP")
E
^SCR("P1HBA","P",21,"CRD")
5,7,D,8,0
^SCR("P1HBA","P",21,"HELP")

^SCR("P1HBA","P",21,"LMAX")
10
^SCR("P1HBA","P",21,"MUMPS1")
S:'$G(DATF) DATF=$$^%L1DC(P1DZ-'$D(P1LHBS),1)
^SCR("P1HBA","P",21,"MUMPS2")
D DATF^P1LHB
^SCR("P1HBA","P",21,"TYP")
D
^SCR("P1HBA","P",24,"CRD")
5,28,E,3,0
^SCR("P1HBA","P",24,"HELP")

^SCR("P1HBA","P",24,"LMAX")
4
^SCR("P1HBA","P",24,"MUMPS1")

^SCR("P1HBA","P",24,"MUMPS2")

^SCR("P1HBA","P",24,"OUTPUT")

^SCR("P1HBA","P",24,"TYP")
E
^SCR("P1HBA","P",25,"CRD")
20,52,E,5,0
^SCR("P1HBA","P",25,"HELP")

^SCR("P1HBA","P",25,"LMAX")
9
^SCR("P1HBA","P",25,"MUMPS1")

^SCR("P1HBA","P",25,"MUMPS2")

^SCR("P1HBA","P",25,"OUTPUT")

^SCR("P1HBA","P",25,"TYP")
E
^SCR("P1HBA","P",30,"CRD")
20,22,N,9,2
^SCR("P1HBA","P",30,"HELP")

^SCR("P1HBA","P",30,"LMAX")
9
^SCR("P1HBA","P",30,"MUMPS1")

^SCR("P1HBA","P",30,"MUMPS2")

^SCR("P1HBA","P",30,"OUTPUT")

^SCR("P1HBA","P",30,"TYP")
N
^SCR("P1HBA","P",32,"CRD")
20,6,N,9,2
^SCR("P1HBA","P",32,"HELP")

^SCR("P1HBA","P",32,"LMAX")
9
^SCR("P1HBA","P",32,"MUMPS1")

^SCR("P1HBA","P",32,"MUMPS2")

^SCR("P1HBA","P",32,"OUTPUT")

^SCR("P1HBA","P",32,"TYP")
N
^SCR("P1HBA","P",35,"CRD")
21,22,N,9,2
^SCR("P1HBA","P",35,"HELP")

^SCR("P1HBA","P",35,"LMAX")
9
^SCR("P1HBA","P",35,"MUMPS1")

^SCR("P1HBA","P",35,"MUMPS2")

^SCR("P1HBA","P",35,"OUTPUT")

^SCR("P1HBA","P",35,"TYP")
N
^SCR("P1HBA","P",40,"CRD")
21,2,E,7,0
^SCR("P1HBA","P",40,"HELP")

^SCR("P1HBA","P",40,"LMAX")
9
^SCR("P1HBA","P",40,"MUMPS1")

^SCR("P1HBA","P",40,"MUMPS2")

^SCR("P1HBA","P",40,"OUTPUT")

^SCR("P1HBA","P",40,"TYP")
E
^SCR("P1HBA","P",50,"CRD")
22,68,H,64
^SCR("P1HBA","P",50,"HELP")

^SCR("P1HBA","P",50,"LMAX")
65
^SCR("P1HBA","P",50,"MUMPS1")

^SCR("P1HBA","P",50,"MUMPS2")

^SCR("P1HBA","P",50,"TYP")
H
^SCR("P1HBA","P","NAME","DATF")
21
^SCR("P1HBA","P","NAME","HB")
20
^SCR("P1HBA","P","NAME","HOV")
17
^SCR("P1HBA","P","NAME","HRA1")
50
^SCR("P1HBA","P","NAME","ITR")
35
^SCR("P1HBA","P","NAME","KAMHZM")
25
^SCR("P1HBA","P","NAME","KTOVET")
15
^SCR("P1HBA","P","NAME","LKH")
5
^SCR("P1HBA","P","NAME","LKH1")
10
^SCR("P1HBA","P","NAME","NUMBER")
40
^SCR("P1HBA","P","NAME","SHUL")
32
^SCR("P1HBA","P","NAME","SHUM")
30
^SCR("P1HBA","P","NAME","SNIF")
24
^SCR("P1HBA","P","NM",5)
LKH
^SCR("P1HBA","P","NM",10)
LKH1
^SCR("P1HBA","P","NM",15)
KTOVET
^SCR("P1HBA","P","NM",17)
HOV
^SCR("P1HBA","P","NM",20)
HB
^SCR("P1HBA","P","NM",21)
DATF
^SCR("P1HBA","P","NM",24)
SNIF
^SCR("P1HBA","P","NM",25)
KAMHZM
^SCR("P1HBA","P","NM",30)
SHUM
^SCR("P1HBA","P","NM",32)
SHUL
^SCR("P1HBA","P","NM",35)
ITR
^SCR("P1HBA","P","NM",40)
NUMBER
^SCR("P1HBA","P","NM",50)
HRA1
^SCR("P1HBMK")
H
^SCR("P1HBMK",1)
        #{                     03}#                                            
^SCR("P1HBMK",2)
                     {10      }:jix`z cr    {05      }:jix`zn                  
^SCR("P1HBMK",3)
                     {14      }: mekq cr    {12      }: mekqn                  
^SCR("P1HBMK",4)
                                                                             1$
^SCR("P1HBMK",5)
    : melyz beq : dpnfd :   gewld my    : gewl 'qn :  mekq :zipeayg: jix`z  :  
^SCR("P1HBMK",6)
                                                                               
^SCR("P1HBMK",7)
                                                                               
^SCR("P1HBMK",8)
                                                                               
^SCR("P1HBMK",9)
                                                                               
^SCR("P1HBMK",10)
                                                                               
^SCR("P1HBMK",11)
                                                                               
^SCR("P1HBMK",12)
                                                                               
^SCR("P1HBMK",13)
                                                                               
^SCR("P1HBMK",14)
                                                                               
^SCR("P1HBMK",15)
                                                                               
^SCR("P1HBMK",16)
                                                                               
^SCR("P1HBMK",17)
                                                                               
^SCR("P1HBMK",18)
                                                                               
^SCR("P1HBMK",19)
                                                                               
^SCR("P1HBMK",20)
                                                                               
^SCR("P1HBMK",21)
 $1                                                                            
^SCR("P1HBMK",22)
                                       {20       }:k"dq  {19  }:zeipeayg       
^SCR("P1HBMK","A",1)

^SCR("P1HBMK","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1HBMK","A",3)
:�…‹‘ƒ’:�…‹‘Ž
^SCR("P1HBMK","A",4)

^SCR("P1HBMK","A",5)
�…Œ™š‚…‘„�Ž†„‡…—Œ„�™‡…—Œ'‘Ž�…‹‘š‰�…�™‡Š‰˜€š
^SCR("P1HBMK","A",6)
-------------------------------------------------------------------
^SCR("P1HBMK","A",7)

^SCR("P1HBMK","A",8)

^SCR("P1HBMK","A",9)

^SCR("P1HBMK","A",10)

^SCR("P1HBMK","A",11)

^SCR("P1HBMK","A",12)

^SCR("P1HBMK","A",13)

^SCR("P1HBMK","A",14)

^SCR("P1HBMK","A",15)

^SCR("P1HBMK","A",16)

^SCR("P1HBMK","A",17)

^SCR("P1HBMK","A",18)

^SCR("P1HBMK","A",19)

^SCR("P1HBMK","A",20)

^SCR("P1HBMK","A",21)

^SCR("P1HBMK","A",22)
:‹"„‘:š…‰�…�™‡
^SCR("P1HBMK","AV",1)

^SCR("P1HBMK","AV",2)
:lhrt,sg:lhrt,n
^SCR("P1HBMK","AV",3)
:oufxsg:oufxn
^SCR("P1HBMK","AV",4)

^SCR("P1HBMK","AV",5)
ouka,duxvbnzvjuekvoajuekwxnoufx,hbucajlhrt,
^SCR("P1HBMK","AV",6)
-------------------------------------------------------------------
^SCR("P1HBMK","AV",7)

^SCR("P1HBMK","AV",8)

^SCR("P1HBMK","AV",9)

^SCR("P1HBMK","AV",10)

^SCR("P1HBMK","AV",11)

^SCR("P1HBMK","AV",12)

^SCR("P1HBMK","AV",13)

^SCR("P1HBMK","AV",14)

^SCR("P1HBMK","AV",15)

^SCR("P1HBMK","AV",16)

^SCR("P1HBMK","AV",17)

^SCR("P1HBMK","AV",18)

^SCR("P1HBMK","AV",19)

^SCR("P1HBMK","AV",20)

^SCR("P1HBMK","AV",21)

^SCR("P1HBMK","AV",22)
:f"vx:,uhbucaj
^SCR("P1HBMK","G",1,"CRD")
6,76,D,8,0
^SCR("P1HBMK","G",1,"HELP")

^SCR("P1HBMK","G",1,"LMAX")
8
^SCR("P1HBMK","G",1,"MUMPS1")

^SCR("P1HBMK","G",1,"MUMPS2")

^SCR("P1HBMK","G",1,"OUTPUT")

^SCR("P1HBMK","G",1,"SHEM")
 jix`z  
^SCR("P1HBMK","G",1,"TYP")
D
^SCR("P1HBMK","G",2,"CRD")
6,67,E,7,0
^SCR("P1HBMK","G",2,"HELP")

^SCR("P1HBMK","G",2,"LMAX")
7
^SCR("P1HBMK","G",2,"MUMPS1")

^SCR("P1HBMK","G",2,"MUMPS2")

^SCR("P1HBMK","G",2,"OUTPUT")

^SCR("P1HBMK","G",2,"SHEM")
zipeayg
^SCR("P1HBMK","G",2,"TYP")
E
^SCR("P1HBMK","G",3,"CRD")
6,59,N,7,2
^SCR("P1HBMK","G",3,"HELP")

^SCR("P1HBMK","G",3,"LMAX")
7
^SCR("P1HBMK","G",3,"MUMPS1")

^SCR("P1HBMK","G",3,"MUMPS2")

^SCR("P1HBMK","G",3,"OUTPUT")

^SCR("P1HBMK","G",3,"SHEM")
  mekq 
^SCR("P1HBMK","G",3,"TYP")
N
^SCR("P1HBMK","G",4,"CRD")
6,51,E,10,0
^SCR("P1HBMK","G",4,"HELP")

^SCR("P1HBMK","G",4,"LMAX")
10
^SCR("P1HBMK","G",4,"MUMPS1")

^SCR("P1HBMK","G",4,"MUMPS2")

^SCR("P1HBMK","G",4,"OUTPUT")

^SCR("P1HBMK","G",4,"SHEM")
 gewl 'qn 
^SCR("P1HBMK","G",4,"TYP")
E
^SCR("P1HBMK","G",5,"CRD")
6,40,H,15,0
^SCR("P1HBMK","G",5,"HELP")

^SCR("P1HBMK","G",5,"LMAX")
15
^SCR("P1HBMK","G",5,"MUMPS1")

^SCR("P1HBMK","G",5,"MUMPS2")

^SCR("P1HBMK","G",5,"OUTPUT")

^SCR("P1HBMK","G",5,"SHEM")
   gewld my    
^SCR("P1HBMK","G",5,"TYP")
H
^SCR("P1HBMK","G",6,"CRD")
6,24,E,7,0
^SCR("P1HBMK","G",6,"HELP")
<F9> - dpnfd zbvd
^SCR("P1HBMK","G",6,"LMAX")
7
^SCR("P1HBMK","G",6,"MUMPS1")

^SCR("P1HBMK","G",6,"MUMPS2")
I %OLDTO="F9" D ^P1HZVW(HZM) D A^%L1SC S %SC("ST")=1
^SCR("P1HBMK","G",6,"SHEM")
 dpnfd 
^SCR("P1HBMK","G",6,"TYP")
E
^SCR("P1HBMK","G",7,"CRD")
6,16,E,6,0
^SCR("P1HBMK","G",7,"HELP")

^SCR("P1HBMK","G",7,"LMAX")
11
^SCR("P1HBMK","G",7,"MUMPS1")

^SCR("P1HBMK","G",7,"MUMPS2")

^SCR("P1HBMK","G",7,"OUTPUT")

^SCR("P1HBMK","G",7,"SHEM")
 melyz beq 
^SCR("P1HBMK","G",7,"TYP")
E
^SCR("P1HBMK","G","DEL")

^SCR("P1HBMK","G","MAX")
99999
^SCR("P1HBMK","G","NAME","DATH")
1
^SCR("P1HBMK","G","NAME","HESB")
2
^SCR("P1HBMK","G","NAME","HZM")
6
^SCR("P1HBMK","G","NAME","NAME")
5
^SCR("P1HBMK","G","NAME","NMB")
4
^SCR("P1HBMK","G","NAME","SHUM")
3
^SCR("P1HBMK","G","NAME","SUGT")
7
^SCR("P1HBMK","G","NM",1)
DATH
^SCR("P1HBMK","G","NM",2)
HESB
^SCR("P1HBMK","G","NM",3)
SHUM
^SCR("P1HBMK","G","NM",4)
NMB
^SCR("P1HBMK","G","NM",5)
NAME
^SCR("P1HBMK","G","NM",6)
HZM
^SCR("P1HBMK","G","NM",7)
SUGT
^SCR("P1HBMK","G","RB")
5,2,22,79
^SCR("P1HBMK","G","REF")
^TEMPDH($P
^SCR("P1HBMK","G","RZD")
\
^SCR("P1HBMK","G","STEP")
1
^SCR("P1HBMK","G","STG")
    : melyz beq : dpnfd :   gewld my    : gewl 'qn :  mekq :zipeayg: jix`z  :  
^SCR("P1HBMK","G","VG")
7
^SCR("P1HBMK","NAME")

^SCR("P1HBMK","P",3,"CRD")
1,34,H,24
^SCR("P1HBMK","P",3,"HELP")

^SCR("P1HBMK","P",3,"LMAX")
24
^SCR("P1HBMK","P",3,"MUMPS1")

^SCR("P1HBMK","P",3,"MUMPS2")

^SCR("P1HBMK","P",3,"OUTPUT")

^SCR("P1HBMK","P",3,"TYP")
H
^SCR("P1HBMK","P",5,"CRD")
2,44,D,8,0
^SCR("P1HBMK","P",5,"HELP")

^SCR("P1HBMK","P",5,"LMAX")
9
^SCR("P1HBMK","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("P1HBMK","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("P1HBMK","P",5,"MUST")

^SCR("P1HBMK","P",5,"TYP")
D
^SCR("P1HBMK","P",10,"CRD")
2,21,D,8,0
^SCR("P1HBMK","P",10,"HELP")

^SCR("P1HBMK","P",10,"LMAX")
9
^SCR("P1HBMK","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1HBMK","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I $E(D2)="?" S %SC("ER")=1
^SCR("P1HBMK","P",10,"MUST")

^SCR("P1HBMK","P",10,"TYP")
D
^SCR("P1HBMK","P",12,"CRD")
3,44,N,9,2
^SCR("P1HBMK","P",12,"HELP")

^SCR("P1HBMK","P",12,"LMAX")
9
^SCR("P1HBMK","P",12,"MUMPS1")

^SCR("P1HBMK","P",12,"MUMPS2")

^SCR("P1HBMK","P",12,"TYP")
N
^SCR("P1HBMK","P",14,"CRD")
3,21,N,9,2
^SCR("P1HBMK","P",14,"HELP")

^SCR("P1HBMK","P",14,"LMAX")
9
^SCR("P1HBMK","P",14,"MUMPS1")

^SCR("P1HBMK","P",14,"MUMPS2")
S:'ADSHUM ADSHUM=9999999 S:ADSHUM<MESHUM %SC("ER")=1
^SCR("P1HBMK","P",14,"TYP")
N
^SCR("P1HBMK","P",19,"CRD")
22,57,N,5,0
^SCR("P1HBMK","P",19,"HELP")

^SCR("P1HBMK","P",19,"LMAX")
5
^SCR("P1HBMK","P",19,"MUMPS1")

^SCR("P1HBMK","P",19,"MUMPS2")

^SCR("P1HBMK","P",19,"OUTPUT")

^SCR("P1HBMK","P",19,"TYP")
N
^SCR("P1HBMK","P",20,"CRD")
22,39,N,8,2
^SCR("P1HBMK","P",20,"HELP")

^SCR("P1HBMK","P",20,"LMAX")
10
^SCR("P1HBMK","P",20,"MUMPS1")

^SCR("P1HBMK","P",20,"MUMPS2")

^SCR("P1HBMK","P",20,"OUTPUT")

^SCR("P1HBMK","P",20,"TYP")
N
^SCR("P1HBMK","P","NAME","ADSHUM")
14
^SCR("P1HBMK","P","NAME","DAT1")
5
^SCR("P1HBMK","P","NAME","DAT2")
10
^SCR("P1HBMK","P","NAME","KOT")
3
^SCR("P1HBMK","P","NAME","MESHUM")
12
^SCR("P1HBMK","P","NAME","SUM")
20
^SCR("P1HBMK","P","NAME","SUMH")
19
^SCR("P1HBMK","P","NM",3)
KOT
^SCR("P1HBMK","P","NM",5)
DAT1
^SCR("P1HBMK","P","NM",10)
DAT2
^SCR("P1HBMK","P","NM",12)
MESHUM
^SCR("P1HBMK","P","NM",14)
ADSHUM
^SCR("P1HBMK","P","NM",19)
SUMH
^SCR("P1HBMK","P","NM",20)
SUM
^SCR("P1HBO")
H
^SCR("P1HBO",1)
                     # zegezt zeipeayg #                                       
^SCR("P1HBO",2)
                    {07      } :jix`z cr   {05      } :jix`zn                  
^SCR("P1HBO",3)
                   {12       } : gewl cr  {10       } : gewln                  
^SCR("P1HBO",4)
                                                                             1$
^SCR("P1HBO",5)
   :   dxzi  :  mley  :  mekq  :  jix`z  :zipeayg:     gewl my    : gewl 'qn : 
^SCR("P1HBO",6)
                                                                               
^SCR("P1HBO",7)
                                                                               
^SCR("P1HBO",8)
                                                                               
^SCR("P1HBO",9)
                                                                               
^SCR("P1HBO",10)
                                                                               
^SCR("P1HBO",11)
                                                                               
^SCR("P1HBO",12)
                                                                               
^SCR("P1HBO",13)
                                                                               
^SCR("P1HBO",14)
                                                                               
^SCR("P1HBO",15)
                                                                               
^SCR("P1HBO",16)
                                                                               
^SCR("P1HBO",17)
                                                                               
^SCR("P1HBO",18)
                                                                               
^SCR("P1HBO",19)
                                                                               
^SCR("P1HBO",20)
                                                                               
^SCR("P1HBO",21)
  $1                                                                           
^SCR("P1HBO",22)
   {25      }{20     }{15     }                                                
^SCR("P1HBO","A",1)
š…‡…š”š…‰�…�™‡
^SCR("P1HBO","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1HBO","A",3)
:‡…—Œƒ’:‡…—ŒŽ
^SCR("P1HBO","A",4)

^SCR("P1HBO","A",5)
„˜š‰�Œ…™�…‹‘Š‰˜€šš‰�…�™‡‡…—Œ�™‡…—Œ'‘Ž
^SCR("P1HBO","A",6)
--------------------------------------------------------------------
^SCR("P1HBO","A",7)

^SCR("P1HBO","A",8)

^SCR("P1HBO","A",9)

^SCR("P1HBO","A",10)

^SCR("P1HBO","A",11)

^SCR("P1HBO","A",12)

^SCR("P1HBO","A",13)

^SCR("P1HBO","A",14)

^SCR("P1HBO","A",15)

^SCR("P1HBO","A",16)

^SCR("P1HBO","A",17)

^SCR("P1HBO","A",18)

^SCR("P1HBO","A",19)

^SCR("P1HBO","A",20)

^SCR("P1HBO","A",21)

^SCR("P1HBO","A",22)

^SCR("P1HBO","AV",1)
,uju,p,uhbucaj
^SCR("P1HBO","AV",2)
:lhrt,sg:lhrt,n
^SCR("P1HBO","AV",3)
:jueksg:juekn
^SCR("P1HBO","AV",4)

^SCR("P1HBO","AV",5)
vr,hokuaoufxlhrt,,hbucajjuekoajuekwxn
^SCR("P1HBO","AV",6)
--------------------------------------------------------------------
^SCR("P1HBO","AV",7)

^SCR("P1HBO","AV",8)

^SCR("P1HBO","AV",9)

^SCR("P1HBO","AV",10)

^SCR("P1HBO","AV",11)

^SCR("P1HBO","AV",12)

^SCR("P1HBO","AV",13)

^SCR("P1HBO","AV",14)

^SCR("P1HBO","AV",15)

^SCR("P1HBO","AV",16)

^SCR("P1HBO","AV",17)

^SCR("P1HBO","AV",18)

^SCR("P1HBO","AV",19)

^SCR("P1HBO","AV",20)

^SCR("P1HBO","AV",21)

^SCR("P1HBO","AV",22)

^SCR("P1HBO","G",1,"CRD")
6,77,E,10,0
^SCR("P1HBO","G",1,"HELP")

^SCR("P1HBO","G",1,"LMAX")
10
^SCR("P1HBO","G",1,"MUMPS1")

^SCR("P1HBO","G",1,"MUMPS2")

^SCR("P1HBO","G",1,"OUTPUT")

^SCR("P1HBO","G",1,"SHEM")
 gewl 'qn 
^SCR("P1HBO","G",1,"TYP")
E
^SCR("P1HBO","G",2,"CRD")
6,66,H,16,0
^SCR("P1HBO","G",2,"HELP")

^SCR("P1HBO","G",2,"LMAX")
16
^SCR("P1HBO","G",2,"MUMPS1")

^SCR("P1HBO","G",2,"MUMPS2")

^SCR("P1HBO","G",2,"OUTPUT")

^SCR("P1HBO","G",2,"SHEM")
     gewl my    
^SCR("P1HBO","G",2,"TYP")
H
^SCR("P1HBO","G",3,"CRD")
6,49,E,7,0
^SCR("P1HBO","G",3,"HELP")
<F10> - dlaw bivdl ,<F9> - zipeayg bivdl 
^SCR("P1HBO","G",3,"LMAX")
7
^SCR("P1HBO","G",3,"MUMPS1")
D HESB0^P1DHBO
^SCR("P1HBO","G",3,"MUMPS2")
D HESB^P1DHBO
^SCR("P1HBO","G",3,"SHEM")
zipeayg
^SCR("P1HBO","G",3,"TYP")
E
^SCR("P1HBO","G",4,"CRD")
6,41,D,8,0
^SCR("P1HBO","G",4,"HELP")

^SCR("P1HBO","G",4,"LMAX")
9
^SCR("P1HBO","G",4,"MUMPS1")

^SCR("P1HBO","G",4,"MUMPS2")

^SCR("P1HBO","G",4,"OUTPUT")

^SCR("P1HBO","G",4,"SHEM")
  jix`z  
^SCR("P1HBO","G",4,"TYP")
D
^SCR("P1HBO","G",5,"CRD")
6,31,N,8,2
^SCR("P1HBO","G",5,"HELP")
<F10> - zipeayg , <F7> -  bivdl , <F9> - lkd mlyl 
^SCR("P1HBO","G",5,"LMAX")
8
^SCR("P1HBO","G",5,"MUMPS1")

^SCR("P1HBO","G",5,"MUMPS2")

^SCR("P1HBO","G",5,"OUTPUT")

^SCR("P1HBO","G",5,"SHEM")
  mekq  
^SCR("P1HBO","G",5,"TYP")
N
^SCR("P1HBO","G",6,"CRD")
6,22,N,8,2
^SCR("P1HBO","G",6,"HELP")

^SCR("P1HBO","G",6,"LMAX")
8
^SCR("P1HBO","G",6,"MUMPS1")

^SCR("P1HBO","G",6,"MUMPS2")

^SCR("P1HBO","G",6,"OUTPUT")

^SCR("P1HBO","G",6,"SHEM")
  mley  
^SCR("P1HBO","G",6,"TYP")
N
^SCR("P1HBO","G",7,"CRD")
6,13,N,8,2
^SCR("P1HBO","G",7,"HELP")

^SCR("P1HBO","G",7,"LMAX")
9
^SCR("P1HBO","G",7,"MUMPS1")

^SCR("P1HBO","G",7,"MUMPS2")

^SCR("P1HBO","G",7,"OUTPUT")

^SCR("P1HBO","G",7,"SHEM")
   dxzi  
^SCR("P1HBO","G",7,"TYP")
N
^SCR("P1HBO","G","DEL")

^SCR("P1HBO","G","MAX")
22
^SCR("P1HBO","G","NAME","DAT")
4
^SCR("P1HBO","G","NAME","HESB")
3
^SCR("P1HBO","G","NAME","ITR")
7
^SCR("P1HBO","G","NAME","NAME")
2
^SCR("P1HBO","G","NAME","NMB")
1
^SCR("P1HBO","G","NAME","SHUL")
6
^SCR("P1HBO","G","NAME","TSH")
5
^SCR("P1HBO","G","NM",1)
NMB
^SCR("P1HBO","G","NM",2)
NAME
^SCR("P1HBO","G","NM",3)
HESB
^SCR("P1HBO","G","NM",4)
DAT
^SCR("P1HBO","G","NM",5)
TSH
^SCR("P1HBO","G","NM",6)
SHUL
^SCR("P1HBO","G","NM",7)
ITR
^SCR("P1HBO","G","RB")
5,3,22,79
^SCR("P1HBO","G","REF")
^TEMPDH($P
^SCR("P1HBO","G","RZD")
\
^SCR("P1HBO","G","STEP")
1
^SCR("P1HBO","G","STG")
   :   dxzi  :  mley  :  mekq  :  jix`z  :zipeayg:     gewl my    : gewl 'qn : 
^SCR("P1HBO","G","VG")
7
^SCR("P1HBO","NAME")

^SCR("P1HBO","P",5,"CRD")
2,43,D,8,0
^SCR("P1HBO","P",5,"HELP")

^SCR("P1HBO","P",5,"LMAX")
9
^SCR("P1HBO","P",5,"MUMPS1")
S:'$G(MEDAT) MEDAT=$$^%L1DC(P1DZ,1)
^SCR("P1HBO","P",5,"MUMPS2")

^SCR("P1HBO","P",5,"TYP")
D
^SCR("P1HBO","P",7,"CRD")
2,20,D,8,0
^SCR("P1HBO","P",7,"HELP")

^SCR("P1HBO","P",7,"LMAX")
9
^SCR("P1HBO","P",7,"MUMPS1")
S:'$G(ADDAT) ADDAT=MEDAT
^SCR("P1HBO","P",7,"MUMPS2")
I $$^%L1DC(ADDAT,3)<$$^%L1DC(MEDAT,3) S %SC("ER")=1
^SCR("P1HBO","P",7,"TYP")
D
^SCR("P1HBO","P",10,"CRD")
3,42,E,10,0
^SCR("P1HBO","P",10,"FNC")

^SCR("P1HBO","P",10,"GLOB")
LKH
^SCR("P1HBO","P",10,"HELP")

^SCR("P1HBO","P",10,"LMAX")
10
^SCR("P1HBO","P",10,"MUMPS1")

^SCR("P1HBO","P",10,"MUMPS2")

^SCR("P1HBO","P",10,"NLN")
20
^SCR("P1HBO","P",10,"RZD")
\
^SCR("P1HBO","P",10,"TOPB")
8
^SCR("P1HBO","P",10,"TYP")
E
^SCR("P1HBO","P",12,"CRD")
3,19,E,10,0
^SCR("P1HBO","P",12,"FNC")

^SCR("P1HBO","P",12,"GLOB")
LKH
^SCR("P1HBO","P",12,"HELP")

^SCR("P1HBO","P",12,"LMAX")
10
^SCR("P1HBO","P",12,"MUMPS1")
S:'$G(ADLKH) ADLKH=MELKH
^SCR("P1HBO","P",12,"MUMPS2")
I ADLKH<MELKH S %SC("ER")=1
^SCR("P1HBO","P",12,"NLN")
20
^SCR("P1HBO","P",12,"RZD")
\
^SCR("P1HBO","P",12,"TOPB")
8
^SCR("P1HBO","P",12,"TYP")
E
^SCR("P1HBO","P",15,"CRD")
22,22,N,8,2
^SCR("P1HBO","P",15,"HELP")

^SCR("P1HBO","P",15,"LMAX")
8
^SCR("P1HBO","P",15,"MUMPS1")

^SCR("P1HBO","P",15,"MUMPS2")

^SCR("P1HBO","P",15,"OUTPUT")

^SCR("P1HBO","P",15,"TYP")
N
^SCR("P1HBO","P",20,"CRD")
22,13,N,8,2
^SCR("P1HBO","P",20,"HELP")

^SCR("P1HBO","P",20,"LMAX")
8
^SCR("P1HBO","P",20,"MUMPS1")

^SCR("P1HBO","P",20,"MUMPS2")

^SCR("P1HBO","P",20,"OUTPUT")

^SCR("P1HBO","P",20,"TYP")
N
^SCR("P1HBO","P",25,"CRD")
22,3,N,9,2
^SCR("P1HBO","P",25,"HELP")

^SCR("P1HBO","P",25,"LMAX")
9
^SCR("P1HBO","P",25,"MUMPS1")

^SCR("P1HBO","P",25,"MUMPS2")

^SCR("P1HBO","P",25,"OUTPUT")

^SCR("P1HBO","P",25,"TYP")
N
^SCR("P1HBO","P","NAME","ADDAT")
7
^SCR("P1HBO","P","NAME","ADLKH")
12
^SCR("P1HBO","P","NAME","MEDAT")
5
^SCR("P1HBO","P","NAME","MELKH")
10
^SCR("P1HBO","P","NAME","SITRA")
25
^SCR("P1HBO","P","NAME","SSHUL")
20
^SCR("P1HBO","P","NAME","SSHUM")
15
^SCR("P1HBO","P","NM",5)
MEDAT
^SCR("P1HBO","P","NM",7)
ADDAT
^SCR("P1HBO","P","NM",10)
MELKH
^SCR("P1HBO","P","NM",12)
ADLKH
^SCR("P1HBO","P","NM",15)
SSHUM
^SCR("P1HBO","P","NM",20)
SSHUL
^SCR("P1HBO","P","NM",25)
SITRA
^SCR("P1HBT")
H
^SCR("P1HBT",1)
                         # minelyz zifgz #                                     
^SCR("P1HBT",2)
                     {10      }:jix`z cr    {05      }:jix`zn                  
^SCR("P1HBT",3)
                   {13        }: gewl cr  {12        }: gewln                  
^SCR("P1HBT",4)
                                                                            1$ 
^SCR("P1HBT",5)
   : 'ayg jix`z :     gewld my    : gewl 'qn :  dxzi  :zipeayg:melyz jix`z:    
^SCR("P1HBT",6)
                                                                               
^SCR("P1HBT",7)
                                                                               
^SCR("P1HBT",8)
                                                                               
^SCR("P1HBT",9)
                                                                               
^SCR("P1HBT",10)
                                                                               
^SCR("P1HBT",11)
                                                                               
^SCR("P1HBT",12)
                                                                               
^SCR("P1HBT",13)
                                                                               
^SCR("P1HBT",14)
                                                                               
^SCR("P1HBT",15)
                                                                               
^SCR("P1HBT",16)
                                                                               
^SCR("P1HBT",17)
                                                                               
^SCR("P1HBT",18)
                                                                               
^SCR("P1HBT",19)
                                                                               
^SCR("P1HBT",20)
                                                                               
^SCR("P1HBT",21)
 $1                                                                            
^SCR("P1HBT",22)
                                           {20       }: k"dq                   
^SCR("P1HBT","A",1)
�‰Ž…Œ™šš‰†‡š
^SCR("P1HBT","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1HBT","A",3)
:‡…—Œƒ’:‡…—ŒŽ
^SCR("P1HBT","A",4)

^SCR("P1HBT","A",5)
'�™‡Š‰˜€š‡…—Œ„�™‡…—Œ'‘Ž„˜š‰š‰�…�™‡�…Œ™šŠ‰˜€š
^SCR("P1HBT","A",6)
-----------------------------------------------------------------
^SCR("P1HBT","A",7)

^SCR("P1HBT","A",8)

^SCR("P1HBT","A",9)

^SCR("P1HBT","A",10)

^SCR("P1HBT","A",11)

^SCR("P1HBT","A",12)

^SCR("P1HBT","A",13)

^SCR("P1HBT","A",14)

^SCR("P1HBT","A",15)

^SCR("P1HBT","A",16)

^SCR("P1HBT","A",17)

^SCR("P1HBT","A",18)

^SCR("P1HBT","A",19)

^SCR("P1HBT","A",20)

^SCR("P1HBT","A",21)

^SCR("P1HBT","A",22)
:‹"„‘
^SCR("P1HBT","AV",1)
ohnuka,,hzj,
^SCR("P1HBT","AV",2)
:lhrt,sg:lhrt,n
^SCR("P1HBT","AV",3)
:jueksg:juekn
^SCR("P1HBT","AV",4)

^SCR("P1HBT","AV",5)
wcajlhrt,juekvoajuekwxnvr,h,hbucajouka,lhrt,
^SCR("P1HBT","AV",6)
-----------------------------------------------------------------
^SCR("P1HBT","AV",7)

^SCR("P1HBT","AV",8)

^SCR("P1HBT","AV",9)

^SCR("P1HBT","AV",10)

^SCR("P1HBT","AV",11)

^SCR("P1HBT","AV",12)

^SCR("P1HBT","AV",13)

^SCR("P1HBT","AV",14)

^SCR("P1HBT","AV",15)

^SCR("P1HBT","AV",16)

^SCR("P1HBT","AV",17)

^SCR("P1HBT","AV",18)

^SCR("P1HBT","AV",19)

^SCR("P1HBT","AV",20)

^SCR("P1HBT","AV",21)

^SCR("P1HBT","AV",22)
:f"vx
^SCR("P1HBT","G",1,"CRD")
6,74,D,8,0
^SCR("P1HBT","G",1,"HELP")

^SCR("P1HBT","G",1,"LMAX")
11
^SCR("P1HBT","G",1,"MUMPS1")

^SCR("P1HBT","G",1,"MUMPS2")

^SCR("P1HBT","G",1,"OUTPUT")

^SCR("P1HBT","G",1,"SHEM")
melyz jix`z
^SCR("P1HBT","G",1,"TYP")
D
^SCR("P1HBT","G",2,"CRD")
6,62,E,7,0
^SCR("P1HBT","G",2,"HELP")
<F10> - zelaw zbvdl , <F9> ugl zipeayg zbvdl 
^SCR("P1HBT","G",2,"LMAX")
7
^SCR("P1HBT","G",2,"MUMPS1")
D HESB0^P1DHBT
^SCR("P1HBT","G",2,"MUMPS2")
D HESB^P1DHBT
^SCR("P1HBT","G",2,"SHEM")
zipeayg
^SCR("P1HBT","G",2,"TYP")
E
^SCR("P1HBT","G",3,"CRD")
6,54,N,7,2
^SCR("P1HBT","G",3,"HELP")

^SCR("P1HBT","G",3,"LMAX")
8
^SCR("P1HBT","G",3,"MUMPS1")

^SCR("P1HBT","G",3,"MUMPS2")

^SCR("P1HBT","G",3,"OUTPUT")

^SCR("P1HBT","G",3,"SHEM")
  dxzi  
^SCR("P1HBT","G",3,"TYP")
N
^SCR("P1HBT","G",4,"CRD")
6,45,E,10,0
^SCR("P1HBT","G",4,"HELP")

^SCR("P1HBT","G",4,"LMAX")
10
^SCR("P1HBT","G",4,"MUMPS1")

^SCR("P1HBT","G",4,"MUMPS2")

^SCR("P1HBT","G",4,"OUTPUT")

^SCR("P1HBT","G",4,"SHEM")
 gewl 'qn 
^SCR("P1HBT","G",4,"TYP")
E
^SCR("P1HBT","G",5,"CRD")
6,34,H,15,0
^SCR("P1HBT","G",5,"HELP")

^SCR("P1HBT","G",5,"LMAX")
17
^SCR("P1HBT","G",5,"MUMPS1")

^SCR("P1HBT","G",5,"MUMPS2")

^SCR("P1HBT","G",5,"OUTPUT")

^SCR("P1HBT","G",5,"SHEM")
     gewld my    
^SCR("P1HBT","G",5,"TYP")
H
^SCR("P1HBT","G",6,"CRD")
6,16,D,8,0
^SCR("P1HBT","G",6,"HELP")

^SCR("P1HBT","G",6,"LMAX")
12
^SCR("P1HBT","G",6,"MUMPS1")

^SCR("P1HBT","G",6,"MUMPS2")

^SCR("P1HBT","G",6,"OUTPUT")

^SCR("P1HBT","G",6,"SHEM")
 'ayg jix`z 
^SCR("P1HBT","G",6,"TYP")
D
^SCR("P1HBT","G","DEL")

^SCR("P1HBT","G","MAX")
99999
^SCR("P1HBT","G","NAME","DATH")
6
^SCR("P1HBT","G","NAME","DATT")
1
^SCR("P1HBT","G","NAME","HESB")
2
^SCR("P1HBT","G","NAME","NAME")
5
^SCR("P1HBT","G","NAME","NMB")
4
^SCR("P1HBT","G","NAME","SHUM")
3
^SCR("P1HBT","G","NM",1)
DATT
^SCR("P1HBT","G","NM",2)
HESB
^SCR("P1HBT","G","NM",3)
SHUM
^SCR("P1HBT","G","NM",4)
NMB
^SCR("P1HBT","G","NM",5)
NAME
^SCR("P1HBT","G","NM",6)
DATH
^SCR("P1HBT","G","RB")
5,2,22,78
^SCR("P1HBT","G","REF")
^TEMPDH($P
^SCR("P1HBT","G","RZD")
\
^SCR("P1HBT","G","STEP")
1
^SCR("P1HBT","G","STG")
   : 'ayg jix`z :     gewld my    : gewl 'qn :  dxzi  :zipeayg:melyz jix`z:    
^SCR("P1HBT","G","VG")
7
^SCR("P1HBT","NAME")

^SCR("P1HBT","P",5,"CRD")
2,44,D,8,0
^SCR("P1HBT","P",5,"HELP")

^SCR("P1HBT","P",5,"LMAX")
9
^SCR("P1HBT","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("P1HBT","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("P1HBT","P",5,"MUST")

^SCR("P1HBT","P",5,"TYP")
D
^SCR("P1HBT","P",10,"CRD")
2,21,D,8,0
^SCR("P1HBT","P",10,"HELP")

^SCR("P1HBT","P",10,"LMAX")
9
^SCR("P1HBT","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1HBT","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I $E(D2)="?" S %SC("ER")=1
^SCR("P1HBT","P",10,"MUST")

^SCR("P1HBT","P",10,"TYP")
D
^SCR("P1HBT","P",12,"CRD")
3,42,E,11,0
^SCR("P1HBT","P",12,"FNC")

^SCR("P1HBT","P",12,"GLOB")
LKH
^SCR("P1HBT","P",12,"HELP")

^SCR("P1HBT","P",12,"LMAX")
11
^SCR("P1HBT","P",12,"MUMPS1")

^SCR("P1HBT","P",12,"MUMPS2")

^SCR("P1HBT","P",12,"NLN")
20
^SCR("P1HBT","P",12,"RZD")
\
^SCR("P1HBT","P",12,"TOPB")
8
^SCR("P1HBT","P",12,"TYP")
E
^SCR("P1HBT","P",13,"CRD")
3,19,E,11,0
^SCR("P1HBT","P",13,"FNC")

^SCR("P1HBT","P",13,"GLOB")
LKH
^SCR("P1HBT","P",13,"HELP")

^SCR("P1HBT","P",13,"LMAX")
11
^SCR("P1HBT","P",13,"MUMPS1")
S:'$G(ADLKH) ADLKH=MELKH
^SCR("P1HBT","P",13,"MUMPS2")
I ADLKH<MELKH S %SC("ER")=1
^SCR("P1HBT","P",13,"NLN")
20
^SCR("P1HBT","P",13,"RZD")
\
^SCR("P1HBT","P",13,"TOPB")
8
^SCR("P1HBT","P",13,"TYP")
E
^SCR("P1HBT","P",20,"CRD")
22,43,N,10,2
^SCR("P1HBT","P",20,"HELP")

^SCR("P1HBT","P",20,"LMAX")
10
^SCR("P1HBT","P",20,"MUMPS1")

^SCR("P1HBT","P",20,"MUMPS2")

^SCR("P1HBT","P",20,"OUTPUT")

^SCR("P1HBT","P",20,"TYP")
N
^SCR("P1HBT","P","NAME","ADLKH")
13
^SCR("P1HBT","P","NAME","DAT1")
5
^SCR("P1HBT","P","NAME","DAT2")
10
^SCR("P1HBT","P","NAME","MELKH")
12
^SCR("P1HBT","P","NAME","SUM")
20
^SCR("P1HBT","P","NM",5)
DAT1
^SCR("P1HBT","P","NM",10)
DAT2
^SCR("P1HBT","P","NM",12)
MELKH
^SCR("P1HBT","P","NM",13)
ADLKH
^SCR("P1HBT","P","NM",20)
SUM
^SCR("P1HNH")
H
^SCR("P1HNH",1)
                                   # zegpd zlah #                              
^SCR("P1HNH",2)
                                                                               
^SCR("P1HNH",3)
                                                           1$                  
^SCR("P1HNH",4)
                             :(%) dgpd lceb  : dgpd cew :                      
^SCR("P1HNH",5)
                                                                               
^SCR("P1HNH",6)
                                                                               
^SCR("P1HNH",7)
                                                                               
^SCR("P1HNH",8)
                                                                               
^SCR("P1HNH",9)
                                                                               
^SCR("P1HNH",10)
                                                                               
^SCR("P1HNH",11)
                                                                               
^SCR("P1HNH",12)
                                                                               
^SCR("P1HNH",13)
                                                                               
^SCR("P1HNH",14)
                                                                               
^SCR("P1HNH",15)
                                                                               
^SCR("P1HNH",16)
                                                                               
^SCR("P1HNH",17)
                                                                               
^SCR("P1HNH",18)
                        $1                                                     
^SCR("P1HNH","A",1)
š…‡�„šŒ�ˆ
^SCR("P1HNH","A",2)

^SCR("P1HNH","A",3)

^SCR("P1HNH","A",4)
(%)„‡�„Œƒ…‚„‡�„ƒ…—
^SCR("P1HNH","A",5)
-------------------------
^SCR("P1HNH","A",6)

^SCR("P1HNH","A",7)

^SCR("P1HNH","A",8)

^SCR("P1HNH","A",9)

^SCR("P1HNH","A",10)

^SCR("P1HNH","A",11)

^SCR("P1HNH","A",12)

^SCR("P1HNH","A",13)

^SCR("P1HNH","A",14)

^SCR("P1HNH","A",15)

^SCR("P1HNH","A",16)

^SCR("P1HNH","A",17)

^SCR("P1HNH","A",18)

^SCR("P1HNH","AV",1)
,ujbv,kcy
^SCR("P1HNH","AV",2)

^SCR("P1HNH","AV",3)

^SCR("P1HNH","AV",4)
(%)vjbvksudvjbvsue
^SCR("P1HNH","AV",5)
-------------------------
^SCR("P1HNH","AV",6)

^SCR("P1HNH","AV",7)

^SCR("P1HNH","AV",8)

^SCR("P1HNH","AV",9)

^SCR("P1HNH","AV",10)

^SCR("P1HNH","AV",11)

^SCR("P1HNH","AV",12)

^SCR("P1HNH","AV",13)

^SCR("P1HNH","AV",14)

^SCR("P1HNH","AV",15)

^SCR("P1HNH","AV",16)

^SCR("P1HNH","AV",17)

^SCR("P1HNH","AV",18)

^SCR("P1HNH","G",1,"CRD")
5,56,E,2,0
^SCR("P1HNH","G",1,"HELP")

^SCR("P1HNH","G",1,"LMAX")
10
^SCR("P1HNH","G",1,"MUMPS1")

^SCR("P1HNH","G",1,"MUMPS2")
D BDIKA^P1HNH
^SCR("P1HNH","G",1,"SHEM")
 dgpd cew 
^SCR("P1HNH","G",1,"TYP")
E
^SCR("P1HNH","G",2,"CRD")
5,45,N,6,2
^SCR("P1HNH","G",2,"HELP")

^SCR("P1HNH","G",2,"LMAX")
15
^SCR("P1HNH","G",2,"MUMPS1")

^SCR("P1HNH","G",2,"MUMPS2")

^SCR("P1HNH","G",2,"MUST")

^SCR("P1HNH","G",2,"SHEM")
(%) dgpd lceb  
^SCR("P1HNH","G",2,"TYP")
N
^SCR("P1HNH","G","DEL")
Y
^SCR("P1HNH","G","MAX")
99
^SCR("P1HNH","G","NAME","HNH")
2
^SCR("P1HNH","G","NAME","MIS")
1
^SCR("P1HNH","G","NM",1)
MIS
^SCR("P1HNH","G","NM",2)
HNH
^SCR("P1HNH","G","RB")
4,25,19,61
^SCR("P1HNH","G","REF")
^TEMP($P,"HNH"
^SCR("P1HNH","G","RZD")
\
^SCR("P1HNH","G","STEP")
1
^SCR("P1HNH","G","STG")
                             :(%) dgpd lceb  : dgpd cew :                      
^SCR("P1HNH","G","VG")
6
^SCR("P1HNH","NAME")
zegpd zlah
^SCR("P1HNHES")
H
^SCR("P1HNHES",1)
                                       #  z e g p d  #                         
^SCR("P1HNHES",2)
                                      {10     }:oeayg k"dq {           05}:ldpn
^SCR("P1HNHES",3)
                                                                               
^SCR("P1HNHES",4)
                 {30    }={25 }:dgpd % {           20} :gewl my {15  }:gewl 'qn
^SCR("P1HNHES",5)
                 {                                                 35}:dxrd    
^SCR("P1HNHES",6)
                                                                             1$
^SCR("P1HNHES",7)
             : dgpd :dgpd%:  mekq :zenk:   hixt xe`z   :hixt cew :dpnfd zxey:  
^SCR("P1HNHES",8)
           \                               dxrd                \               
^SCR("P1HNHES",9)
                                                                               
^SCR("P1HNHES",10)
                                                                               
^SCR("P1HNHES",11)
                                                                               
^SCR("P1HNHES",12)
                                                                               
^SCR("P1HNHES",13)
                                                                               
^SCR("P1HNHES",14)
                                                                               
^SCR("P1HNHES",15)
                                                                               
^SCR("P1HNHES",16)
       $1                                                                      
^SCR("P1HNHES",17)
                                                    {36    }:mihixtl dgpd k"dq 
^SCR("P1HNHES",18)
                                                                               
^SCR("P1HNHES",19)
                              {39     }:dgpd {38 }:dgpd% {37 }:dgpd cew        
^SCR("P1HNHES",20)
                 {                                         40}:dxrd            
^SCR("P1HNHES",21)
                                                 {45    }:dgpd k"dq            
^SCR("P1HNHES",22)
                                                 {50    }:dgpd ixg` oeayg k"dq 
^SCR("P1HNHES","A",1)
š…‡�„
^SCR("P1HNHES","A",2)
:�…�™‡‹"„‘:Œ„�Ž
^SCR("P1HNHES","A",3)

^SCR("P1HNHES","A",4)
=:„‡�„%:‡…—Œ�™:‡…—Œ'‘Ž
^SCR("P1HNHES","A",5)
:„˜’„
^SCR("P1HNHES","A",6)

^SCR("P1HNHES","A",7)
„‡�„„‡�„%�…‹‘š…Ž‹ˆ‰˜”˜…€šˆ‰˜”ƒ…—„�Ž†„š˜…™
^SCR("P1HNHES","A",8)
„˜’„
^SCR("P1HNHES","A",9)

^SCR("P1HNHES","A",10)
----------------------------------------------------------
^SCR("P1HNHES","A",11)

^SCR("P1HNHES","A",12)

^SCR("P1HNHES","A",13)

^SCR("P1HNHES","A",14)

^SCR("P1HNHES","A",15)

^SCR("P1HNHES","A",16)

^SCR("P1HNHES","A",17)
:�‰ˆ‰˜”Œ„‡�„‹"„‘
^SCR("P1HNHES","A",18)

^SCR("P1HNHES","A",19)
:„‡�„:„‡�„%:„‡�„ƒ…—
^SCR("P1HNHES","A",20)
:„˜’„
^SCR("P1HNHES","A",21)
:„‡�„‹"„‘
^SCR("P1HNHES","A",22)
:„‡�„‰˜‡€�…�™‡‹"„‘
^SCR("P1HNHES","AV",1)
,ujbv
^SCR("P1HNHES","AV",2)
:iucajf"vx:kvbn
^SCR("P1HNHES","AV",3)

^SCR("P1HNHES","AV",4)
=:vjbv%:juekoa:juekwxn
^SCR("P1HNHES","AV",5)
:vrgv
^SCR("P1HNHES","AV",6)

^SCR("P1HNHES","AV",7)
vjbvvjbv%oufx,unfyhrprut,yhrpsuevbnzv,rua
^SCR("P1HNHES","AV",8)
vrgv
^SCR("P1HNHES","AV",9)

^SCR("P1HNHES","AV",10)
----------------------------------------------------------
^SCR("P1HNHES","AV",11)

^SCR("P1HNHES","AV",12)

^SCR("P1HNHES","AV",13)

^SCR("P1HNHES","AV",14)

^SCR("P1HNHES","AV",15)

^SCR("P1HNHES","AV",16)

^SCR("P1HNHES","AV",17)
:ohyhrpkvjbvf"vx
^SCR("P1HNHES","AV",18)

^SCR("P1HNHES","AV",19)
:vjbv:vjbv%:vjbvsue
^SCR("P1HNHES","AV",20)
:vrgv
^SCR("P1HNHES","AV",21)
:vjbvf"vx
^SCR("P1HNHES","AV",22)
:vjbvhrjtiucajf"vx
^SCR("P1HNHES","G",1,"CRD")
9,76,N,2,0
^SCR("P1HNHES","G",1,"HELP")
<F7> - dpnfd zbvd   
^SCR("P1HNHES","G",1,"LMAX")
10
^SCR("P1HNHES","G",1,"MUMPS1")

^SCR("P1HNHES","G",1,"MUMPS2")
D SHZ^P1HNHES
^SCR("P1HNHES","G",1,"MUST")

^SCR("P1HNHES","G",1,"SHEM")
dpnfd zxey
^SCR("P1HNHES","G",1,"TYP")
N
^SCR("P1HNHES","G",2,"CRD")
9,65,E,7,0
^SCR("P1HNHES","G",2,"HELP")

^SCR("P1HNHES","G",2,"LMAX")
9
^SCR("P1HNHES","G",2,"MUMPS1")

^SCR("P1HNHES","G",2,"MUMPS2")

^SCR("P1HNHES","G",2,"OUTPUT")

^SCR("P1HNHES","G",2,"SHEM")
hixt cew 
^SCR("P1HNHES","G",2,"TYP")
E
^SCR("P1HNHES","G",3,"CRD")
9,55,H,9,0
^SCR("P1HNHES","G",3,"HELP")

^SCR("P1HNHES","G",3,"LMAX")
15
^SCR("P1HNHES","G",3,"MUMPS1")

^SCR("P1HNHES","G",3,"MUMPS2")

^SCR("P1HNHES","G",3,"OUTPUT")

^SCR("P1HNHES","G",3,"SHEM")
   hixt xe`z   
^SCR("P1HNHES","G",3,"TYP")
H
^SCR("P1HNHES","G",4,"CRD")
9,39,N,4,0
^SCR("P1HNHES","G",4,"HELP")

^SCR("P1HNHES","G",4,"LMAX")
4
^SCR("P1HNHES","G",4,"MUMPS1")

^SCR("P1HNHES","G",4,"MUMPS2")
D KAM^P1HNHES
^SCR("P1HNHES","G",4,"MUST")

^SCR("P1HNHES","G",4,"SHEM")
zenk
^SCR("P1HNHES","G",4,"TYP")
N
^SCR("P1HNHES","G",5,"CRD")
9,34,N,7,2
^SCR("P1HNHES","G",5,"HELP")

^SCR("P1HNHES","G",5,"LMAX")
7
^SCR("P1HNHES","G",5,"MUMPS1")

^SCR("P1HNHES","G",5,"MUMPS2")

^SCR("P1HNHES","G",5,"OUTPUT")

^SCR("P1HNHES","G",5,"SHEM")
  mekq 
^SCR("P1HNHES","G",5,"TYP")
N
^SCR("P1HNHES","G",6,"CRD")
9,26,N,3,0
^SCR("P1HNHES","G",6,"HELP")

^SCR("P1HNHES","G",6,"LMAX")
5
^SCR("P1HNHES","G",6,"MUMPS1")

^SCR("P1HNHES","G",6,"MUMPS2")
D HNHPA^P1HNHES
^SCR("P1HNHES","G",6,"MUST")

^SCR("P1HNHES","G",6,"SHEM")
dgpd%
^SCR("P1HNHES","G",6,"TYP")
N
^SCR("P1HNHES","G",7,"CRD")
9,20,N,5,2
^SCR("P1HNHES","G",7,"HELP")

^SCR("P1HNHES","G",7,"LMAX")
6
^SCR("P1HNHES","G",7,"MUMPS1")

^SCR("P1HNHES","G",7,"MUMPS2")

^SCR("P1HNHES","G",7,"OUTPUT")

^SCR("P1HNHES","G",7,"SHEM")
 dgpd 
^SCR("P1HNHES","G",7,"TYP")
N
^SCR("P1HNHES","G",8,"CRD")
9,+63,H,50,0
^SCR("P1HNHES","G",8,"HELP")

^SCR("P1HNHES","G",8,"LMAX")
51
^SCR("P1HNHES","G",8,"MUMPS1")

^SCR("P1HNHES","G",8,"MUMPS2")

^SCR("P1HNHES","G",8,"SHEM")
                               dxrd                
^SCR("P1HNHES","G",8,"TYP")
H
^SCR("P1HNHES","G","DEL")
Y
^SCR("P1HNHES","G","MAX")
99
^SCR("P1HNHES","G","NAME","CODP")
2
^SCR("P1HNHES","G","NAME","HNHP")
7
^SCR("P1HNHES","G","NAME","HNHPA")
6
^SCR("P1HNHES","G","NAME","HRAP")
8
^SCR("P1HNHES","G","NAME","KAM")
4
^SCR("P1HNHES","G","NAME","PAR1")
3
^SCR("P1HNHES","G","NAME","SHZ")
1
^SCR("P1HNHES","G","NAME","SUMP")
5
^SCR("P1HNHES","G","NM",1)
SHZ
^SCR("P1HNHES","G","NM",2)
CODP
^SCR("P1HNHES","G","NM",3)
PAR1
^SCR("P1HNHES","G","NM",4)
KAM
^SCR("P1HNHES","G","NM",5)
SUMP
^SCR("P1HNHES","G","NM",6)
HNHPA
^SCR("P1HNHES","G","NM",7)
HNHP
^SCR("P1HNHES","G","NM",8)
HRAP
^SCR("P1HNHES","G","RB")
7,8,17,79
^SCR("P1HNHES","G","REF")
^THZ(%L3MYDVN,HZM,"HNH"
^SCR("P1HNHES","G","RZD")
\
^SCR("P1HNHES","G","STEP")
2
^SCR("P1HNHES","G","STG")
             : dgpd :dgpd%:  mekq :zenk:   hixt xe`z   :hixt cew :dpnfd zxey:  
^SCR("P1HNHES","G","VG")
11
^SCR("P1HNHES","NAME")
ditewq`l zegpd
^SCR("P1HNHES","P",5,"CRD")
2,74,H,14
^SCR("P1HNHES","P",5,"HELP")

^SCR("P1HNHES","P",5,"LMAX")
14
^SCR("P1HNHES","P",5,"MUMPS1")

^SCR("P1HNHES","P",5,"MUMPS2")

^SCR("P1HNHES","P",5,"OUTPUT")

^SCR("P1HNHES","P",5,"TYP")
H
^SCR("P1HNHES","P",10,"CRD")
2,38,N,7,2
^SCR("P1HNHES","P",10,"HELP")

^SCR("P1HNHES","P",10,"LMAX")
8
^SCR("P1HNHES","P",10,"MUMPS1")

^SCR("P1HNHES","P",10,"MUMPS2")

^SCR("P1HNHES","P",10,"OUTPUT")

^SCR("P1HNHES","P",10,"TYP")
N
^SCR("P1HNHES","P",15,"CHECK")
Y
^SCR("P1HNHES","P",15,"CRD")
4,64,E,5,0
^SCR("P1HNHES","P",15,"FNC")

^SCR("P1HNHES","P",15,"GLOB")
LKH
^SCR("P1HNHES","P",15,"HELP")

^SCR("P1HNHES","P",15,"LMAX")
5
^SCR("P1HNHES","P",15,"MUMPS1")

^SCR("P1HNHES","P",15,"MUMPS2")
D LKH^P1HNHES
^SCR("P1HNHES","P",15,"NLN")
20
^SCR("P1HNHES","P",15,"RZD")
\
^SCR("P1HNHES","P",15,"TOPB")
8
^SCR("P1HNHES","P",15,"TYP")
E
^SCR("P1HNHES","P",20,"CRD")
4,54,H,14
^SCR("P1HNHES","P",20,"HELP")

^SCR("P1HNHES","P",20,"LMAX")
14
^SCR("P1HNHES","P",20,"MUMPS1")

^SCR("P1HNHES","P",20,"MUMPS2")

^SCR("P1HNHES","P",20,"OUTPUT")

^SCR("P1HNHES","P",20,"TYP")
H
^SCR("P1HNHES","P",25,"CRD")
4,26,N,3,0
^SCR("P1HNHES","P",25,"HELP")

^SCR("P1HNHES","P",25,"LMAX")
4
^SCR("P1HNHES","P",25,"MUMPS1")

^SCR("P1HNHES","P",25,"MUMPS2")

^SCR("P1HNHES","P",25,"OUTPUT")

^SCR("P1HNHES","P",25,"TYP")
N
^SCR("P1HNHES","P",30,"CRD")
4,17,N,7,2
^SCR("P1HNHES","P",30,"HELP")

^SCR("P1HNHES","P",30,"LMAX")
7
^SCR("P1HNHES","P",30,"MUMPS1")

^SCR("P1HNHES","P",30,"MUMPS2")

^SCR("P1HNHES","P",30,"OUTPUT")

^SCR("P1HNHES","P",30,"TYP")
N
^SCR("P1HNHES","P",35,"CRD")
5,70,H,50
^SCR("P1HNHES","P",35,"HELP")

^SCR("P1HNHES","P",35,"LMAX")
52
^SCR("P1HNHES","P",35,"MUMPS1")

^SCR("P1HNHES","P",35,"MUMPS2")

^SCR("P1HNHES","P",35,"TYP")
H
^SCR("P1HNHES","P",36,"CRD")
17,52,N,6,2
^SCR("P1HNHES","P",36,"HELP")

^SCR("P1HNHES","P",36,"LMAX")
7
^SCR("P1HNHES","P",36,"MUMPS1")

^SCR("P1HNHES","P",36,"MUMPS2")

^SCR("P1HNHES","P",36,"OUTPUT")

^SCR("P1HNHES","P",36,"TYP")
N
^SCR("P1HNHES","P",37,"CHECK")
Y
^SCR("P1HNHES","P",37,"CRD")
19,57,N,3,0
^SCR("P1HNHES","P",37,"FNC")

^SCR("P1HNHES","P",37,"GLOB")
P1HNH
^SCR("P1HNHES","P",37,"HELP")

^SCR("P1HNHES","P",37,"LMAX")
4
^SCR("P1HNHES","P",37,"MUMPS1")

^SCR("P1HNHES","P",37,"MUMPS2")
D HNHC^P1HNHES
^SCR("P1HNHES","P",37,"MUST")

^SCR("P1HNHES","P",37,"NLN")
20
^SCR("P1HNHES","P",37,"RZD")
\
^SCR("P1HNHES","P",37,"TOPB")
8
^SCR("P1HNHES","P",37,"TYP")
N
^SCR("P1HNHES","P",37,"VRB")
HNHA
^SCR("P1HNHES","P",38,"CRD")
19,45,N,3,0
^SCR("P1HNHES","P",38,"HELP")

^SCR("P1HNHES","P",38,"LMAX")
4
^SCR("P1HNHES","P",38,"MUMPS1")

^SCR("P1HNHES","P",38,"MUMPS2")
S HNHB=SUMH-HNHL-SHNHP
^SCR("P1HNHES","P",38,"OUTPUT")

^SCR("P1HNHES","P",38,"TYP")
N
^SCR("P1HNHES","P",39,"CRD")
19,30,N,7,2
^SCR("P1HNHES","P",39,"HELP")

^SCR("P1HNHES","P",39,"LMAX")
8
^SCR("P1HNHES","P",39,"MUMPS1")

^SCR("P1HNHES","P",39,"MUMPS2")

^SCR("P1HNHES","P",39,"OUTPUT")

^SCR("P1HNHES","P",39,"TYP")
N
^SCR("P1HNHES","P",40,"CRD")
20,62,H,40
^SCR("P1HNHES","P",40,"HELP")

^SCR("P1HNHES","P",40,"LMAX")
44
^SCR("P1HNHES","P",40,"MUMPS1")

^SCR("P1HNHES","P",40,"MUMPS2")

^SCR("P1HNHES","P",40,"TYP")
H
^SCR("P1HNHES","P",45,"CRD")
21,49,N,7,2
^SCR("P1HNHES","P",45,"HELP")

^SCR("P1HNHES","P",45,"LMAX")
7
^SCR("P1HNHES","P",45,"MUMPS1")

^SCR("P1HNHES","P",45,"MUMPS2")

^SCR("P1HNHES","P",45,"OUTPUT")

^SCR("P1HNHES","P",45,"TYP")
N
^SCR("P1HNHES","P",50,"CRD")
22,49,N,7,2
^SCR("P1HNHES","P",50,"HELP")

^SCR("P1HNHES","P",50,"LMAX")
7
^SCR("P1HNHES","P",50,"MUMPS1")

^SCR("P1HNHES","P",50,"MUMPS2")

^SCR("P1HNHES","P",50,"OUTPUT")

^SCR("P1HNHES","P",50,"TYP")
N
^SCR("P1HNHES","P","NAME","""HNH""","KEY",1)
/\MNL,LKH,HNHLA,HNHL,HRAL,HNHC,HNHA,HNHB,HRAB
^SCR("P1HNHES","P","NAME","HNHA")
38
^SCR("P1HNHES","P","NAME","HNHA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HNH")),"\",7)
^SCR("P1HNHES","P","NAME","HNHA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HNH"),"\",7)
^SCR("P1HNHES","P","NAME","HNHB")
39
^SCR("P1HNHES","P","NAME","HNHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HNH")),"\",8)
^SCR("P1HNHES","P","NAME","HNHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"HNH"),"\",8)
^SCR("P1HNHES","P","NAME","HNHC")
37
^SCR("P1HNHES","P","NAME","HNHC","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HNH")),"\",6)
^SCR("P1HNHES","P","NAME","HNHC","REF1")
$P(^THZ(%L3MYDVN,HZM,"HNH"),"\",6)
^SCR("P1HNHES","P","NAME","HNHHB")
45
^SCR("P1HNHES","P","NAME","HNHL")
30
^SCR("P1HNHES","P","NAME","HNHL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HNH")),"\",4)
^SCR("P1HNHES","P","NAME","HNHL","REF1")
$P(^THZ(%L3MYDVN,HZM,"HNH"),"\",4)
^SCR("P1HNHES","P","NAME","HNHLA")
25
^SCR("P1HNHES","P","NAME","HNHLA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HNH")),"\",3)
^SCR("P1HNHES","P","NAME","HNHLA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HNH"),"\",3)
^SCR("P1HNHES","P","NAME","HNHLS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HNH")),"\",10)
^SCR("P1HNHES","P","NAME","HNHLS","REF1")
$P(^THZ(%L3MYDVN,HZM,"HNH"),"\",10)
^SCR("P1HNHES","P","NAME","HNHS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HNH")),"\",11)
^SCR("P1HNHES","P","NAME","HNHS","REF1")
$P(^THZ(%L3MYDVN,HZM,"HNH"),"\",11)
^SCR("P1HNHES","P","NAME","HRAB")
40
^SCR("P1HNHES","P","NAME","HRAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HNH")),"\",9)
^SCR("P1HNHES","P","NAME","HRAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"HNH"),"\",9)
^SCR("P1HNHES","P","NAME","HRAL")
35
^SCR("P1HNHES","P","NAME","HRAL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HNH")),"\",5)
^SCR("P1HNHES","P","NAME","HRAL","REF1")
$P(^THZ(%L3MYDVN,HZM,"HNH"),"\",5)
^SCR("P1HNHES","P","NAME","LKH")
15
^SCR("P1HNHES","P","NAME","LKH","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HNH")),"\",2)
^SCR("P1HNHES","P","NAME","LKH","REF1")
$P(^THZ(%L3MYDVN,HZM,"HNH"),"\",2)
^SCR("P1HNHES","P","NAME","LKH1")
20
^SCR("P1HNHES","P","NAME","MNL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HNH")),"\",1)
^SCR("P1HNHES","P","NAME","MNL","REF1")
$P(^THZ(%L3MYDVN,HZM,"HNH"),"\",1)
^SCR("P1HNHES","P","NAME","MNL1")
5
^SCR("P1HNHES","P","NAME","SHNHP")
36
^SCR("P1HNHES","P","NAME","SUMH")
10
^SCR("P1HNHES","P","NAME","SUMHB")
50
^SCR("P1HNHES","P","NM",5)
MNL1
^SCR("P1HNHES","P","NM",10)
SUMH
^SCR("P1HNHES","P","NM",15)
LKH
^SCR("P1HNHES","P","NM",20)
LKH1
^SCR("P1HNHES","P","NM",25)
HNHLA
^SCR("P1HNHES","P","NM",30)
HNHL
^SCR("P1HNHES","P","NM",35)
HRAL
^SCR("P1HNHES","P","NM",36)
SHNHP
^SCR("P1HNHES","P","NM",37)
HNHC
^SCR("P1HNHES","P","NM",38)
HNHA
^SCR("P1HNHES","P","NM",39)
HNHB
^SCR("P1HNHES","P","NM",40)
HRAB
^SCR("P1HNHES","P","NM",45)
HNHHB
^SCR("P1HNHES","P","NM",50)
SUMHB
^SCR("P1HNHES","P","REF",1)
^THZ(%L3MYDVN,HZM,"HNH")
^SCR("P1HNHES","P","REF",1,"RZD")
\
^SCR("P1HNHES","P","REF",1,"STR")
MNL\LKH\HNHLA\HNHL\HRAL\HNHC\HNHA\HNHB\HRAB
^SCR("P1HNS")
H
^SCR("P1HNS",1)
                           # dcear zery itl zegpd #                            
^SCR("P1HNS",2)
                                                                               
^SCR("P1HNS",3)
             {50: 2 - xigndn cin cixedl   , 1 - zcxtp dxeya dgpd bivdl         
^SCR("P1HNS",4)
             {55: 2 - il`ix onf itl ,1 - dpnfd zgizt zry itl dgpd zgwl         
^SCR("P1HNS",5)
             {60: 0 - `l , 1 - ok ------------  : zetqezn mb dgpd zgwl         
^SCR("P1HNS",6)
                                                                             1$
^SCR("P1HNS",7)
    : dgpd% : dry cr : dryn : mihixt zveaw :dveaw cr: mihixt zveaw :dveawn:    
^SCR("P1HNS",8)
     \megz\dveaw xe`z\zegewl zveaw\mei cr\mein\ogley beq xe`z\ogley beq\       
^SCR("P1HNS",9)
                                                                               
^SCR("P1HNS",10)
                                                                               
^SCR("P1HNS",11)
                                                                               
^SCR("P1HNS",12)
                                                                               
^SCR("P1HNS",13)
                                                                               
^SCR("P1HNS",14)
                                                                               
^SCR("P1HNS",15)
                                                                               
^SCR("P1HNS",16)
                                                                               
^SCR("P1HNS",17)
                                                                               
^SCR("P1HNS",18)
                                                                               
^SCR("P1HNS",19)
                                                                               
^SCR("P1HNS",20)
                                                                               
^SCR("P1HNS",21)
                                                                               
^SCR("P1HNS",22)
 $1                                                                            
^SCR("P1HNS","A",1)
„ƒ…�’š…’™‰”Œš…‡�„
^SCR("P1HNS","A",2)

^SCR("P1HNS","A",3)
:2-˜‰‡Ž„Žƒ‰Žƒ‰˜…„Œ,1-šƒ˜”�„˜…™�„‡�„‚‰–„Œ
^SCR("P1HNS","A",4)
:2-‰Œ€‰˜�Ž†‰”Œ,1-„�Ž†„š‡‰š”š’™‰”Œ„‡�„š‡—Œ
^SCR("P1HNS","A",5)
:0-€Œ,1-�‹------------:š…”‘…šŽ�‚„‡�„š‡—Œ
^SCR("P1HNS","A",6)

^SCR("P1HNS","A",7)
„‡�„%„’™ƒ’„’™Ž�‰ˆ‰˜”š–…�—„–…�—ƒ’�‰ˆ‰˜”š–…�—„–…�—Ž
^SCR("P1HNS","A",8)
�…‡š„–…�—˜…€šš…‡…—Œš–…�—�…‰ƒ’�…‰Ž�‡Œ…™‚…‘˜…€š�‡Œ…™‚…‘
^SCR("P1HNS","A",9)
-------------------------------------------------------------------
^SCR("P1HNS","A",10)

^SCR("P1HNS","A",11)

^SCR("P1HNS","A",12)

^SCR("P1HNS","A",13)

^SCR("P1HNS","A",14)

^SCR("P1HNS","A",15)

^SCR("P1HNS","A",16)

^SCR("P1HNS","A",17)

^SCR("P1HNS","A",18)

^SCR("P1HNS","A",19)

^SCR("P1HNS","A",20)

^SCR("P1HNS","A",21)

^SCR("P1HNS","A",22)

^SCR("P1HNS","AV",1)
vsucg,ugahpk,ujbv
^SCR("P1HNS","AV",2)

^SCR("P1HNS","AV",3)
:2-rhjnvnshnshruvk'1-,srpbvruacvjbvdhmvk
^SCR("P1HNS","AV",4)
:2-hkthrinzhpk'1-vbnzv,jh,p,gahpkvjbv,jek
^SCR("P1HNS","AV",5)
:0-tk'1-if------------:,upxu,nodvjbv,jek
^SCR("P1HNS","AV",6)

^SCR("P1HNS","AV",7)
vjbv%vgasgvganohyhrp,mucevmucesgohyhrp,mucevmucen
^SCR("P1HNS","AV",8)
ouj,vmucerut,,ujuek,muceouhsgouhnijkuaduxrut,ijkuadux
^SCR("P1HNS","AV",9)
-------------------------------------------------------------------
^SCR("P1HNS","AV",10)

^SCR("P1HNS","AV",11)

^SCR("P1HNS","AV",12)

^SCR("P1HNS","AV",13)

^SCR("P1HNS","AV",14)

^SCR("P1HNS","AV",15)

^SCR("P1HNS","AV",16)

^SCR("P1HNS","AV",17)

^SCR("P1HNS","AV",18)

^SCR("P1HNS","AV",19)

^SCR("P1HNS","AV",20)

^SCR("P1HNS","AV",21)

^SCR("P1HNS","AV",22)

^SCR("P1HNS","G",1,"CHECK")
Y
^SCR("P1HNS","G",1,"CRD")
9,74,E,5,0
^SCR("P1HNS","G",1,"FNC")

^SCR("P1HNS","G",1,"GLOB")
PARSUG
^SCR("P1HNS","G",1,"HELP")

^SCR("P1HNS","G",1,"LMAX")
6
^SCR("P1HNS","G",1,"MUMPS1")

^SCR("P1HNS","G",1,"MUMPS2")

^SCR("P1HNS","G",1,"NLN")
20
^SCR("P1HNS","G",1,"RZD")
\
^SCR("P1HNS","G",1,"SHEM")
dveawn
^SCR("P1HNS","G",1,"TOPB")
8
^SCR("P1HNS","G",1,"TYP")
E
^SCR("P1HNS","G",1,"VRB")
MESUGP1
^SCR("P1HNS","G",2,"CRD")
9,67,H,14,0
^SCR("P1HNS","G",2,"HELP")

^SCR("P1HNS","G",2,"LMAX")
14
^SCR("P1HNS","G",2,"MUMPS1")

^SCR("P1HNS","G",2,"MUMPS2")

^SCR("P1HNS","G",2,"OUTPUT")

^SCR("P1HNS","G",2,"SHEM")
 mihixt zveaw 
^SCR("P1HNS","G",2,"TYP")
H
^SCR("P1HNS","G",3,"CRD")
9,52,E,5,0
^SCR("P1HNS","G",3,"FNC")

^SCR("P1HNS","G",3,"GLOB")
PARSUG
^SCR("P1HNS","G",3,"HELP")

^SCR("P1HNS","G",3,"LMAX")
8
^SCR("P1HNS","G",3,"MUMPS1")

^SCR("P1HNS","G",3,"MUMPS2")
I ADSUGP<MESUGP S %SC("ER")=1
^SCR("P1HNS","G",3,"NLN")
20
^SCR("P1HNS","G",3,"RZD")
\
^SCR("P1HNS","G",3,"SHEM")
dveaw cr
^SCR("P1HNS","G",3,"TOPB")
8
^SCR("P1HNS","G",3,"TYP")
E
^SCR("P1HNS","G",3,"VRB")
ADSUGP1
^SCR("P1HNS","G",4,"CRD")
9,43,H,14,0
^SCR("P1HNS","G",4,"HELP")

^SCR("P1HNS","G",4,"LMAX")
14
^SCR("P1HNS","G",4,"MUMPS1")

^SCR("P1HNS","G",4,"MUMPS2")

^SCR("P1HNS","G",4,"OUTPUT")

^SCR("P1HNS","G",4,"SHEM")
 mihixt zveaw 
^SCR("P1HNS","G",4,"TYP")
H
^SCR("P1HNS","G",5,"CRD")
9,28,T,5,0
^SCR("P1HNS","G",5,"HELP")

^SCR("P1HNS","G",5,"LMAX")
6
^SCR("P1HNS","G",5,"MUMPS1")

^SCR("P1HNS","G",5,"MUMPS2")
S:'MESHAA MESHAA=0
^SCR("P1HNS","G",5,"SHEM")
 dryn 
^SCR("P1HNS","G",5,"TYP")
T
^SCR("P1HNS","G",6,"CRD")
9,21,T,5,0
^SCR("P1HNS","G",6,"HELP")

^SCR("P1HNS","G",6,"LMAX")
8
^SCR("P1HNS","G",6,"MUMPS1")

^SCR("P1HNS","G",6,"MUMPS2")
S:'ADSHAA ADSHAA="23:59" I ADSHAA<MESHAA S %SC("ER")=1
^SCR("P1HNS","G",6,"SHEM")
 dry cr 
^SCR("P1HNS","G",6,"TYP")
T
^SCR("P1HNS","G",7,"CRD")
9,12,N,6,2
^SCR("P1HNS","G",7,"HELP")

^SCR("P1HNS","G",7,"LMAX")
7
^SCR("P1HNS","G",7,"MUMPS1")

^SCR("P1HNS","G",7,"MUMPS2")

^SCR("P1HNS","G",7,"SHEM")
 dgpd% 
^SCR("P1HNS","G",7,"TYP")
N
^SCR("P1HNS","G",8,"CHECK")
Y
^SCR("P1HNS","G",8,"CRD")
9,+71,E,2,0
^SCR("P1HNS","G",8,"CREAT")

^SCR("P1HNS","G",8,"FNC")

^SCR("P1HNS","G",8,"GLOB")
SUGS
^SCR("P1HNS","G",8,"HELP")

^SCR("P1HNS","G",8,"LMAX")
9
^SCR("P1HNS","G",8,"MUMPS1")

^SCR("P1HNS","G",8,"MUMPS2")

^SCR("P1HNS","G",8,"NLN")
20
^SCR("P1HNS","G",8,"NS")
zepgley ibeq zlah
^SCR("P1HNS","G",8,"RZD")
\
^SCR("P1HNS","G",8,"SHEM")
ogley beq
^SCR("P1HNS","G",8,"TOPB")
8
^SCR("P1HNS","G",8,"TYP")
E
^SCR("P1HNS","G",8,"VRB")
SUGS1
^SCR("P1HNS","G",9,"CRD")
9,+61,H,12,0
^SCR("P1HNS","G",9,"HELP")

^SCR("P1HNS","G",9,"LMAX")
14
^SCR("P1HNS","G",9,"MUMPS1")

^SCR("P1HNS","G",9,"MUMPS2")

^SCR("P1HNS","G",9,"OUTPUT")

^SCR("P1HNS","G",9,"SHEM")
ogley beq xe`z
^SCR("P1HNS","G",9,"TYP")
H
^SCR("P1HNS","G",10,"CRD")
9,+46,N,1,0
^SCR("P1HNS","G",10,"HELP")
7 - y ,6 - e ,5 - d ,4 - c ,3 - b ,2 - a ,1 - `
^SCR("P1HNS","G",10,"LMAX")
4
^SCR("P1HNS","G",10,"MUMPS1")

^SCR("P1HNS","G",10,"MUMPS2")
I MEJOM>7 S %SC("ER")=1
^SCR("P1HNS","G",10,"SHEM")
mein
^SCR("P1HNS","G",10,"TYP")
N
^SCR("P1HNS","G",11,"CRD")
9,+41,N,1,0
^SCR("P1HNS","G",11,"HELP")
7 - y , 6 - e ,5 - d ,4 - c ,3 - b ,2 - a ,1 - `
^SCR("P1HNS","G",11,"LMAX")
6
^SCR("P1HNS","G",11,"MUMPS1")

^SCR("P1HNS","G",11,"MUMPS2")
I ADJOM<MEJOM!(ADJOM>7) S %SC("ER")=1
^SCR("P1HNS","G",11,"SHEM")
mei cr
^SCR("P1HNS","G",11,"TYP")
N
^SCR("P1HNS","G",12,"CHECK")
Y
^SCR("P1HNS","G",12,"CRD")
9,+34,E,4,0
^SCR("P1HNS","G",12,"CREAT")

^SCR("P1HNS","G",12,"FNC")

^SCR("P1HNS","G",12,"GLOB")
SUGL
^SCR("P1HNS","G",12,"HELP")

^SCR("P1HNS","G",12,"LMAX")
12
^SCR("P1HNS","G",12,"MUMPS1")

^SCR("P1HNS","G",12,"MUMPS2")

^SCR("P1HNS","G",12,"NLN")
20
^SCR("P1HNS","G",12,"NS")
G
^SCR("P1HNS","G",12,"RZD")
\
^SCR("P1HNS","G",12,"SHEM")
zegewl zveaw
^SCR("P1HNS","G",12,"TOPB")
8
^SCR("P1HNS","G",12,"TYP")
E
^SCR("P1HNS","G",12,"VRB")
SUGL1
^SCR("P1HNS","G",13,"CRD")
9,+21,H,10,0
^SCR("P1HNS","G",13,"HELP")

^SCR("P1HNS","G",13,"LMAX")
10
^SCR("P1HNS","G",13,"MUMPS1")

^SCR("P1HNS","G",13,"MUMPS2")

^SCR("P1HNS","G",13,"OUTPUT")

^SCR("P1HNS","G",13,"SHEM")
dveaw xe`z
^SCR("P1HNS","G",13,"TYP")
H
^SCR("P1HNS","G",14,"CRD")
9,+10,N,1,0
^SCR("P1HNS","G",14,"HELP")
0 - mdipy , 2 - migelyn , 1 - dcrqn
^SCR("P1HNS","G",14,"LMAX")
4
^SCR("P1HNS","G",14,"MUMPS1")

^SCR("P1HNS","G",14,"MUMPS2")
I THUM'=1,THUM'=0,THUM'=2 S %SC("ER")=1
^SCR("P1HNS","G",14,"SHEM")
megz
^SCR("P1HNS","G",14,"TYP")
N
^SCR("P1HNS","G","DEL")
Y
^SCR("P1HNS","G","MAX")
9999
^SCR("P1HNS","G","NAME","ADJOM")
11
^SCR("P1HNS","G","NAME","ADSHAA")
6
^SCR("P1HNS","G","NAME","ADSUGP")
3
^SCR("P1HNS","G","NAME","ADSUGP1")
4
^SCR("P1HNS","G","NAME","HN1")
7
^SCR("P1HNS","G","NAME","MEJOM")
10
^SCR("P1HNS","G","NAME","MESHAA")
5
^SCR("P1HNS","G","NAME","MESUGP")
1
^SCR("P1HNS","G","NAME","MESUGP1")
2
^SCR("P1HNS","G","NAME","SUGL")
12
^SCR("P1HNS","G","NAME","SUGL1")
13
^SCR("P1HNS","G","NAME","SUGS")
8
^SCR("P1HNS","G","NAME","SUGS1")
9
^SCR("P1HNS","G","NAME","THUM")
14
^SCR("P1HNS","G","NM",1)
MESUGP
^SCR("P1HNS","G","NM",2)
MESUGP1
^SCR("P1HNS","G","NM",3)
ADSUGP
^SCR("P1HNS","G","NM",4)
ADSUGP1
^SCR("P1HNS","G","NM",5)
MESHAA
^SCR("P1HNS","G","NM",6)
ADSHAA
^SCR("P1HNS","G","NM",7)
HN1
^SCR("P1HNS","G","NM",8)
SUGS
^SCR("P1HNS","G","NM",9)
SUGS1
^SCR("P1HNS","G","NM",10)
MEJOM
^SCR("P1HNS","G","NM",11)
ADJOM
^SCR("P1HNS","G","NM",12)
SUGL
^SCR("P1HNS","G","NM",13)
SUGL1
^SCR("P1HNS","G","NM",14)
THUM
^SCR("P1HNS","G","RB")
7,2,23,79
^SCR("P1HNS","G","REF")
^TEMP($P
^SCR("P1HNS","G","RZD")
\
^SCR("P1HNS","G","STEP")
2
^SCR("P1HNS","G","STG")
    : dgpd% : dry cr : dryn : mihixt zveaw :dveaw cr: mihixt zveaw :dveawn:    
^SCR("P1HNS","G","VG")
10
^SCR("P1HNS","NAME")
dry zgpd
^SCR("P1HNS","P",50,"CRD")
3,13,N,3,0
^SCR("P1HNS","P",50,"HELP")

^SCR("P1HNS","P",50,"LMAX")
3
^SCR("P1HNS","P",50,"MUMPS1")

^SCR("P1HNS","P",50,"MUMPS2")
D MHSHAA^P1SPHNS
^SCR("P1HNS","P",50,"TYP")
N
^SCR("P1HNS","P",55,"CRD")
4,13,N,3,0
^SCR("P1HNS","P",55,"HELP")

^SCR("P1HNS","P",55,"LMAX")
3
^SCR("P1HNS","P",55,"MUMPS1")
D HNHTIM0^P1SPHNS
^SCR("P1HNS","P",55,"MUMPS2")
D HNHTIM^P1SPHNS
^SCR("P1HNS","P",55,"TYP")
N
^SCR("P1HNS","P",60,"CRD")
5,13,N,3,0
^SCR("P1HNS","P",60,"HELP")

^SCR("P1HNS","P",60,"LMAX")
3
^SCR("P1HNS","P",60,"MUMPS1")

^SCR("P1HNS","P",60,"MUMPS2")

^SCR("P1HNS","P",60,"TYP")
N
^SCR("P1HNS","P","NAME","HNHTIM")
55
^SCR("P1HNS","P","NAME","MHSHAA")
50
^SCR("P1HNS","P","NAME","TSFMVC")
60
^SCR("P1HNS","P","NM",50)
MHSHAA
^SCR("P1HNS","P","NM",55)
HNHTIM
^SCR("P1HNS","P","NM",60)
TSFMVC
^SCR("P1HODAA")
H
^SCR("P1HODAA",1)
                                                                               
^SCR("P1HODAA",2)
                                  # drced #                                    
^SCR("P1HODAA",3)
                                                                               
^SCR("P1HODAA",4)
                {                      10} {05  }: drced xtqn                  
^SCR("P1HODAA",5)
                                                           1$                  
^SCR("P1HODAA",6)
                    :            drced hqwh           :                        
^SCR("P1HODAA",7)
                                                                               
^SCR("P1HODAA",8)
                                                                               
^SCR("P1HODAA",9)
                                                                               
^SCR("P1HODAA",10)
                                                                               
^SCR("P1HODAA",11)
                                                                               
^SCR("P1HODAA",12)
                                                                               
^SCR("P1HODAA",13)
                                                                               
^SCR("P1HODAA",14)
                                                                               
^SCR("P1HODAA",15)
                                                                               
^SCR("P1HODAA",16)
                                                                               
^SCR("P1HODAA",17)
                                                                               
^SCR("P1HODAA",18)
               $1                                                              
^SCR("P1HODAA",19)
                                                                               
^SCR("P1HODAA",20)
                   "_" oniqn dze` ligzdl yi mec` rava dxey qitcdl ick          
^SCR("P1HODAA",21)
            zeinleq jeza mze` miyl yi zelecb zeize`a milin qitcdl ick          
^SCR("P1HODAA",22)
                       dlibx ze`n letk mewn dqtcda zgwel dlecb ze` lk          
^SCR("P1HODAA","A",1)

^SCR("P1HODAA","A",2)
„’ƒ…„
^SCR("P1HODAA","A",3)

^SCR("P1HODAA","A",4)
:„’ƒ…„˜”‘Ž
^SCR("P1HODAA","A",5)

^SCR("P1HODAA","A",6)
„’ƒ…„ˆ‘—ˆ
^SCR("P1HODAA","A",7)
---------------------------------
^SCR("P1HODAA","A",8)

^SCR("P1HODAA","A",9)

^SCR("P1HODAA","A",10)

^SCR("P1HODAA","A",11)

^SCR("P1HODAA","A",12)

^SCR("P1HODAA","A",13)

^SCR("P1HODAA","A",14)

^SCR("P1HODAA","A",15)

^SCR("P1HODAA","A",16)

^SCR("P1HODAA","A",17)

^SCR("P1HODAA","A",18)

^SCR("P1HODAA","A",19)

^SCR("P1HODAA","A",20)
"_"�Ž‰‘Ž„š…€Œ‰‡š„Œ™‰�…ƒ€’�–�„˜…™‘‰”ƒ„Œ‰ƒ‹
^SCR("P1HODAA","A",21)
š…‰ŽŒ…‘Š…š��š…€�‰™Œ™‰š…Œ…ƒ‚š…‰š…€��‰Œ‰Ž‘‰”ƒ„Œ‰ƒ‹
^SCR("P1HODAA","A",22)
„Œ‰‚˜š…€ŽŒ…”‹�…—Ž„‘”ƒ„�š‡—…Œ„Œ…ƒ‚š…€Œ‹
^SCR("P1HODAA","AV",1)

^SCR("P1HODAA","AV",2)
vgsuv
^SCR("P1HODAA","AV",3)

^SCR("P1HODAA","AV",4)
:vgsuvrpxn
^SCR("P1HODAA","AV",5)

^SCR("P1HODAA","AV",6)
vgsuvyxey
^SCR("P1HODAA","AV",7)
---------------------------------
^SCR("P1HODAA","AV",8)

^SCR("P1HODAA","AV",9)

^SCR("P1HODAA","AV",10)

^SCR("P1HODAA","AV",11)

^SCR("P1HODAA","AV",12)

^SCR("P1HODAA","AV",13)

^SCR("P1HODAA","AV",14)

^SCR("P1HODAA","AV",15)

^SCR("P1HODAA","AV",16)

^SCR("P1HODAA","AV",17)

^SCR("P1HODAA","AV",18)

^SCR("P1HODAA","AV",19)

^SCR("P1HODAA","AV",20)
"_"inhxnv,utkhj,vkahoustgcmcvruaxhpsvkhsf
^SCR("P1HODAA","AV",21)
,uhnkuxlu,co,utohakah,ukusd,uh,utcohkhnxhpsvkhsf
^SCR("P1HODAA","AV",22)
vkhdr,utnkupfouenvxpsvc,jeukvkusd,utkf
^SCR("P1HODAA","G",1,"CRD")
7,54,H,32,0
^SCR("P1HODAA","G",1,"HELP")

^SCR("P1HODAA","G",1,"LMAX")
33
^SCR("P1HODAA","G",1,"MUMPS1")

^SCR("P1HODAA","G",1,"MUMPS2")
D BDIKA^P1HODAA
^SCR("P1HODAA","G",1,"SHEM")
            drced hqwh           
^SCR("P1HODAA","G",1,"TYP")
H
^SCR("P1HODAA","G","DEL")
Y
^SCR("P1HODAA","G","MAX")
25
^SCR("P1HODAA","G","NAME","HODAA")
1
^SCR("P1HODAA","G","NM",1)
HODAA
^SCR("P1HODAA","G","RB")
6,16,19,61
^SCR("P1HODAA","G","REF")
^TEMP($P,"HD"
^SCR("P1HODAA","G","RZD")
\
^SCR("P1HODAA","G","STEP")
1
^SCR("P1HODAA","G","STG")
                    :            drced hqwh           :                        
^SCR("P1HODAA","G","VG")
8
^SCR("P1HODAA","NAME")
yybmi
^SCR("P1HODAA","P",5,"CRD")
4,43,N,3,0
^SCR("P1HODAA","P",5,"FNC")

^SCR("P1HODAA","P",5,"GLOB")
P1HOD
^SCR("P1HODAA","P",5,"HELP")

^SCR("P1HODAA","P",5,"LMAX")
5
^SCR("P1HODAA","P",5,"MUMPS1")

^SCR("P1HODAA","P",5,"MUMPS2")

^SCR("P1HODAA","P",5,"MUST")

^SCR("P1HODAA","P",5,"NLN")
20
^SCR("P1HODAA","P",5,"RZD")
\
^SCR("P1HODAA","P",5,"TOPB")
8
^SCR("P1HODAA","P",5,"TYP")
N
^SCR("P1HODAA","P",5,"VRB")
MISP1
^SCR("P1HODAA","P",10,"CRD")
4,42,H,21
^SCR("P1HODAA","P",10,"HELP")

^SCR("P1HODAA","P",10,"LMAX")
25
^SCR("P1HODAA","P",10,"MUMPS1")

^SCR("P1HODAA","P",10,"MUMPS2")

^SCR("P1HODAA","P",10,"TYP")
H
^SCR("P1HODAA","P","NAME","MISP")
5
^SCR("P1HODAA","P","NAME","MISP1")
10
^SCR("P1HODAA","P","NM",5)
MISP
^SCR("P1HODAA","P","NM",10)
MISP1
^SCR("P1HRZ")
H
^SCR("P1HRZ",1)
                     # zxnyn jeza eidy zeira xe`z #                            
^SCR("P1HRZ",2)
                                                                               
^SCR("P1HRZ",3)
                                                                             1$
^SCR("P1HRZ",4)
   : dlteh in i"re ji` : dpnfd 'qn : dira cr :        dira xe`z       : dry :  
^SCR("P1HRZ",5)
                                                                               
^SCR("P1HRZ",6)
                                                                               
^SCR("P1HRZ",7)
                                                                               
^SCR("P1HRZ",8)
                                                                               
^SCR("P1HRZ",9)
                                                                               
^SCR("P1HRZ",10)
                                                                               
^SCR("P1HRZ",11)
                                                                               
^SCR("P1HRZ",12)
                                                                               
^SCR("P1HRZ",13)
                                                                               
^SCR("P1HRZ",14)
                                                                               
^SCR("P1HRZ",15)
                                                                               
^SCR("P1HRZ",16)
                                                                               
^SCR("P1HRZ",17)
                                                                               
^SCR("P1HRZ",18)
                                                                               
^SCR("P1HRZ",19)
                                                                               
^SCR("P1HRZ",20)
                                                                               
^SCR("P1HRZ",21)
 $1                                                                            
^SCR("P1HRZ",22)
                                                                               
^SCR("P1HRZ","A",1)
š˜Ž™ŽŠ…š�…‰„™š…‰’�˜…€š
^SCR("P1HRZ","A",2)

^SCR("P1HRZ","A",3)

^SCR("P1HRZ","A",4)
„Œ”…ˆ‰Ž‰"’…Š‰€„�Ž†„'‘Ž„‰’�ƒ’„‰’�˜…€š„’™
^SCR("P1HRZ","A",5)
----------------------------------------------------------------------
^SCR("P1HRZ","A",6)

^SCR("P1HRZ","A",7)

^SCR("P1HRZ","A",8)

^SCR("P1HRZ","A",9)

^SCR("P1HRZ","A",10)

^SCR("P1HRZ","A",11)

^SCR("P1HRZ","A",12)

^SCR("P1HRZ","A",13)

^SCR("P1HRZ","A",14)

^SCR("P1HRZ","A",15)

^SCR("P1HRZ","A",16)

^SCR("P1HRZ","A",17)

^SCR("P1HRZ","A",18)

^SCR("P1HRZ","A",19)

^SCR("P1HRZ","A",20)

^SCR("P1HRZ","A",21)

^SCR("P1HRZ","A",22)

^SCR("P1HRZ","AV",1)
,rnanlu,cuhva,uhgcrut,
^SCR("P1HRZ","AV",2)

^SCR("P1HRZ","AV",3)

^SCR("P1HRZ","AV",4)
vkpuyhnh"gulhtvbnzvwxnvhgcsgvhgcrut,vga
^SCR("P1HRZ","AV",5)
----------------------------------------------------------------------
^SCR("P1HRZ","AV",6)

^SCR("P1HRZ","AV",7)

^SCR("P1HRZ","AV",8)

^SCR("P1HRZ","AV",9)

^SCR("P1HRZ","AV",10)

^SCR("P1HRZ","AV",11)

^SCR("P1HRZ","AV",12)

^SCR("P1HRZ","AV",13)

^SCR("P1HRZ","AV",14)

^SCR("P1HRZ","AV",15)

^SCR("P1HRZ","AV",16)

^SCR("P1HRZ","AV",17)

^SCR("P1HRZ","AV",18)

^SCR("P1HRZ","AV",19)

^SCR("P1HRZ","AV",20)

^SCR("P1HRZ","AV",21)

^SCR("P1HRZ","AV",22)

^SCR("P1HRZ","G",1,"CRD")
5,76,T,5,0
^SCR("P1HRZ","G",1,"HELP")

^SCR("P1HRZ","G",1,"LMAX")
5
^SCR("P1HRZ","G",1,"MUMPS1")

^SCR("P1HRZ","G",1,"MUMPS2")

^SCR("P1HRZ","G",1,"SHEM")
 dry 
^SCR("P1HRZ","G",1,"TYP")
T
^SCR("P1HRZ","G",2,"CRD")
5,70,HH,24*2,0
^SCR("P1HRZ","G",2,"HELP")

^SCR("P1HRZ","G",2,"LMAX")
24
^SCR("P1HRZ","G",2,"MUMPS1")

^SCR("P1HRZ","G",2,"MUMPS2")

^SCR("P1HRZ","G",2,"SHEM")
        dira xe`z       
^SCR("P1HRZ","G",2,"TYP")
HH
^SCR("P1HRZ","G",3,"CRD")
5,45,H,9,0
^SCR("P1HRZ","G",3,"HELP")

^SCR("P1HRZ","G",3,"LMAX")
9
^SCR("P1HRZ","G",3,"MUMPS1")

^SCR("P1HRZ","G",3,"MUMPS2")

^SCR("P1HRZ","G",3,"SHEM")
 dira cr 
^SCR("P1HRZ","G",3,"TYP")
H
^SCR("P1HRZ","G",4,"CRD")
5,35,E,11,0
^SCR("P1HRZ","G",4,"HELP")

^SCR("P1HRZ","G",4,"LMAX")
11
^SCR("P1HRZ","G",4,"MUMPS1")

^SCR("P1HRZ","G",4,"MUMPS2")

^SCR("P1HRZ","G",4,"SHEM")
 dpnfd 'qn 
^SCR("P1HRZ","G",4,"TYP")
E
^SCR("P1HRZ","G",5,"CRD")
5,23,HH,19*2,0
^SCR("P1HRZ","G",5,"HELP")

^SCR("P1HRZ","G",5,"LMAX")
19
^SCR("P1HRZ","G",5,"MUMPS1")

^SCR("P1HRZ","G",5,"MUMPS2")

^SCR("P1HRZ","G",5,"SHEM")
 dlteh in i"re ji` 
^SCR("P1HRZ","G",5,"TYP")
HH
^SCR("P1HRZ","G","DEL")
Y
^SCR("P1HRZ","G","MAX")
9999
^SCR("P1HRZ","G","NAME","ED")
3
^SCR("P1HRZ","G","NAME","HZ")
4
^SCR("P1HRZ","G","NAME","TEUR")
2
^SCR("P1HRZ","G","NAME","TIPUL")
5
^SCR("P1HRZ","G","NAME","TM")
1
^SCR("P1HRZ","G","NM",1)
TM
^SCR("P1HRZ","G","NM",2)
TEUR
^SCR("P1HRZ","G","NM",3)
ED
^SCR("P1HRZ","G","NM",4)
HZ
^SCR("P1HRZ","G","NM",5)
TIPUL
^SCR("P1HRZ","G","RB")
4,2,22,79
^SCR("P1HRZ","G","REF")
^TEMP($P,"H"
^SCR("P1HRZ","G","RZD")
\
^SCR("P1HRZ","G","STEP")
2
^SCR("P1HRZ","G","STG")
   : dlteh in i"re ji` : dpnfd 'qn : dira cr :        dira xe`z       : dry :  
^SCR("P1HRZ","G","VG")
6
^SCR("P1HRZ","NAME")
mei zxibq zexrd
^SCR("P1HZ")
H
^SCR("P1HZ",1)
 {11    }:daeg {                    10}: my {07        }:ciip {05        }: 'lh
^SCR("P1HZ",2)
 {               14}:gewl lr dxrd {13  }:gewld ly zepnfd qn  {12    }:'qn dpnfd
^SCR("P1HZ",3)
 {  19} dqipk  { 18}:dnew   {  17}:dxic { 16}'qn {                    15}: aegx
^SCR("P1HZ",4)
 {    30}:`zknq` {28  }:cewin {          25}:xir {                    20}: dxrd
^SCR("P1HZ",5)
  {34  }:dryl {32     }:jix`zl {31            }:dpnfd zlaw onf {35     :dtew 'z
^SCR("P1HZ",6)
 {        39}:xef` {                        38} {37: dcrqn {        36}: oinfnd
^SCR("P1HZ",7)
                                                                             1$
^SCR("P1HZ",8)
  :        dxrd      :  mekq :zetqez:zenk: xign:     hixt xe`z    :beq: cew :  
^SCR("P1HZ",9)
                                                                               
^SCR("P1HZ",10)
                                                                               
^SCR("P1HZ",11)
                                                                               
^SCR("P1HZ",12)
                                                                               
^SCR("P1HZ",13)
                                                                               
^SCR("P1HZ",14)
                                                                               
^SCR("P1HZ",15)
                                                                               
^SCR("P1HZ",16)
                                                                               
^SCR("P1HZ",17)
 $1                                                                            
^SCR("P1HZ",18)
 {            52}:lawnd my {50  }:lawnd 'qn {45  }:gelyn inc {40          :dgpd
^SCR("P1HZ",19)
      {         55} {54:melyz zxev           {                         53}:dxrd
^SCR("P1HZ",20)
           {59     }:dxzi        {58     }:dtwd {57     }:mley {56     }:melyzl
^SCR("P1HZ",21)
  {68  }:xebiy onf  {         67} {66 }: fxe` 'qn {          65} {60 }:gily 'qn
^SCR("P1HZ",22)
  {74    }:i`xy` oeayg {73    }:oeayg {72    }:dlaw/yg 'qn   {71     }:'n'z 'qn
^SCR("P1HZ",23)
            {                                                               75}
^SCR("P1HZ","A",1)
:„�…‡:�™:ƒ‰‰�:'Œˆ
^SCR("P1HZ","A",2)
:‡…—ŒŒ’„˜’„:‡…—Œ„Œ™š…�Ž†„‘Ž:'‘Ž„�Ž†„
^SCR("P1HZ","A",3)
„‘‰�‹:„Ž…—:„˜‰ƒ'‘Ž:�…‡˜
^SCR("P1HZ","A",4)
:€š‹Ž‘€:ƒ…—‰Ž:˜‰’:„˜’„
^SCR("P1HZ","A",5)
:„’™Œ:Š‰˜€šŒ:„�Ž†„šŒ�—�Ž†:„”…—'š
^SCR("P1HZ","A",6)
:˜…†€:„ƒ’‘Ž:�‰Ž†Ž„
^SCR("P1HZ","A",7)

^SCR("P1HZ","A",8)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€š‚…‘ƒ…—
^SCR("P1HZ","A",9)
--------------------------------------------------------------------
^SCR("P1HZ","A",10)

^SCR("P1HZ","A",11)

^SCR("P1HZ","A",12)

^SCR("P1HZ","A",13)

^SCR("P1HZ","A",14)

^SCR("P1HZ","A",15)

^SCR("P1HZ","A",16)

^SCR("P1HZ","A",17)

^SCR("P1HZ","A",18)
:Œ�—Ž„�™:Œ�—Ž„'‘Ž:‡…Œ™Ž‰Žƒ:„‡�„
^SCR("P1HZ","A",19)
:�…Œ™šš˜…–:„˜’„
^SCR("P1HZ","A",20)
:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZ","A",21)
:˜…‚‰™�Ž†:†˜…€'‘Ž:‡‰Œ™'‘Ž
^SCR("P1HZ","A",22)
:‰€˜™€�…�™‡:�…�™‡:„Œ�—/™‡'‘Ž:'Ž'š'‘Ž
^SCR("P1HZ","A",23)

^SCR("P1HZ","AV",1)
:äáåç:íù:ãééð:'ìè
^SCR("P1HZ","AV",2)
:çå÷ììòäøòä:çå÷ìäìùúåðîæäñî:'ñîäðîæä
^SCR("P1HZ","AV",3)
äñéðë:äîå÷:äøéã'ñî:áåçø
^SCR("P1HZ","AV",4)
:àúëîñà:ãå÷éî:øéò:äøòä
^SCR("P1HZ","AV",5)
:äòùì:êéøàúì:äðîæäúìá÷ïîæ:äôå÷'ú
^SCR("P1HZ","AV",6)
:øåæà:äãòñî:ïéîæîä
^SCR("P1HZ","AV",7)

^SCR("P1HZ","AV",8)
äøòäíåëñúåôñåúúåîëøéçîèéøôøåàúâåñãå÷
^SCR("P1HZ","AV",9)
--------------------------------------------------------------------
^SCR("P1HZ","AV",10)

^SCR("P1HZ","AV",11)

^SCR("P1HZ","AV",12)

^SCR("P1HZ","AV",13)

^SCR("P1HZ","AV",14)

^SCR("P1HZ","AV",15)

^SCR("P1HZ","AV",16)

^SCR("P1HZ","AV",17)

^SCR("P1HZ","AV",18)
:ìá÷îäíù:ìá÷îä'ñî:çåìùîéîã:äçðä
^SCR("P1HZ","AV",19)
:íåìùúúøåö:äøòä
^SCR("P1HZ","AV",20)
:äøúé:äô÷ä:íìåù:íåìùúì
^SCR("P1HZ","AV",21)
:øåâéùïîæ:æøåà'ñî:çéìù'ñî
^SCR("P1HZ","AV",22)
:éàøùàïåáùç:ïåáùç:äìá÷/ùç'ñî:'î'ú'ñî
^SCR("P1HZ","AV",23)

^SCR("P1HZ","G",1,"CRD")
9,76,E,5,0
^SCR("P1HZ","G",1,"FNC")
F9,F10,F8,PGLN,PGRG
^SCR("P1HZ","G",1,"GLOB")
PAR
^SCR("P1HZ","G",1,"HELP")
<F2>-dpnfd zbvd,<F10>-zetqez zbvd**<F9>-zetqez;<F7>-dlah;<F6>-my
^SCR("P1HZ","G",1,"LMAX")
5
^SCR("P1HZ","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZ","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZ","G",1,"MUST")

^SCR("P1HZ","G",1,"NLN")
20
^SCR("P1HZ","G",1,"RZD")
**
^SCR("P1HZ","G",1,"SHEM")
 cew 
^SCR("P1HZ","G",1,"TOPB")
8
^SCR("P1HZ","G",1,"TYP")
E
^SCR("P1HZ","G",1,"VRB")
PAR1
^SCR("P1HZ","G",2,"CRD")
9,70,E,3,0
^SCR("P1HZ","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZ","G",2,"LMAX")
3
^SCR("P1HZ","G",2,"MUMPS1")

^SCR("P1HZ","G",2,"MUMPS2")
D SUG^P1HZ
^SCR("P1HZ","G",2,"OUTPUT")

^SCR("P1HZ","G",2,"SHEM")
beq
^SCR("P1HZ","G",2,"TYP")
E
^SCR("P1HZ","G",3,"CRD")
9,66,H,18,0
^SCR("P1HZ","G",3,"HELP")

^SCR("P1HZ","G",3,"LMAX")
18
^SCR("P1HZ","G",3,"MUMPS1")

^SCR("P1HZ","G",3,"MUMPS2")

^SCR("P1HZ","G",3,"OUTPUT")

^SCR("P1HZ","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZ","G",3,"TYP")
H
^SCR("P1HZ","G",4,"CRD")
9,47,N,5,2
^SCR("P1HZ","G",4,"HELP")

^SCR("P1HZ","G",4,"LMAX")
5
^SCR("P1HZ","G",4,"MUMPS1")

^SCR("P1HZ","G",4,"MUMPS2")
I MH<0 S %SC("ER")=1
^SCR("P1HZ","G",4,"OUTPUT")

^SCR("P1HZ","G",4,"SHEM")
 xign
^SCR("P1HZ","G",4,"TYP")
N
^SCR("P1HZ","G",5,"CRD")
9,41,N,4,0
^SCR("P1HZ","G",5,"HELP")

^SCR("P1HZ","G",5,"LMAX")
4
^SCR("P1HZ","G",5,"MUMPS1")
D KAM0^P1HZMS ;S:'$G(KAM) KAM=1
^SCR("P1HZ","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZ","G",5,"MUST")

^SCR("P1HZ","G",5,"SHEM")
zenk
^SCR("P1HZ","G",5,"TYP")
N
^SCR("P1HZ","G",6,"CRD")
9,36,N,6,2
^SCR("P1HZ","G",6,"HELP")

^SCR("P1HZ","G",6,"LMAX")
6
^SCR("P1HZ","G",6,"MUMPS1")

^SCR("P1HZ","G",6,"MUMPS2")

^SCR("P1HZ","G",6,"OUTPUT")

^SCR("P1HZ","G",6,"SHEM")
zetqez
^SCR("P1HZ","G",6,"TYP")
N
^SCR("P1HZ","G",7,"CRD")
9,29,N,7,2
^SCR("P1HZ","G",7,"HELP")

^SCR("P1HZ","G",7,"LMAX")
7
^SCR("P1HZ","G",7,"MUMPS1")

^SCR("P1HZ","G",7,"MUMPS2")

^SCR("P1HZ","G",7,"OUTPUT")

^SCR("P1HZ","G",7,"SHEM")
  mekq 
^SCR("P1HZ","G",7,"TYP")
N
^SCR("P1HZ","G",8,"CRD")
9,21,H,18/36,0
^SCR("P1HZ","G",8,"HELP")
<F10> - zetqez zbvd , <F9> - zetqez oekcr ,<F7> - zexrd zbvd
^SCR("P1HZ","G",8,"LMAX")
18
^SCR("P1HZ","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZ","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZ","G",8,"SHEM")
        dxrd      
^SCR("P1HZ","G",8,"TYP")
H
^SCR("P1HZ","G","DEL")
Y
^SCR("P1HZ","G","MAX")
9999
^SCR("P1HZ","G","NAME","HRP")
8
^SCR("P1HZ","G","NAME","KAM")
5
^SCR("P1HZ","G","NAME","MH")
4
^SCR("P1HZ","G","NAME","PAR")
1
^SCR("P1HZ","G","NAME","PAR1")
3
^SCR("P1HZ","G","NAME","SUG")
2
^SCR("P1HZ","G","NAME","SUM")
7
^SCR("P1HZ","G","NAME","TSF")
6
^SCR("P1HZ","G","NM",1)
PAR
^SCR("P1HZ","G","NM",2)
SUG
^SCR("P1HZ","G","NM",3)
PAR1
^SCR("P1HZ","G","NM",4)
MH
^SCR("P1HZ","G","NM",5)
KAM
^SCR("P1HZ","G","NM",6)
TSF
^SCR("P1HZ","G","NM",7)
SUM
^SCR("P1HZ","G","NM",8)
HRP
^SCR("P1HZ","G","RB")
8,2,18,79
^SCR("P1HZ","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZ","G","RZD")
\
^SCR("P1HZ","G","STEP")
1
^SCR("P1HZ","G","STG")
  :        dxrd      :  mekq :zetqez:zenk: xign:     hixt xe`z    :beq: cew :  
^SCR("P1HZ","G","VG")
10
^SCR("P1HZ","NAME")

^SCR("P1HZ","P",5,"CRD")
1,62,E,11,0
^SCR("P1HZ","P",5,"HELP")
<F9>-'ayg,'n'z ,dpnfd 'qn itl,<F8>-zaezk itl,<F7>-xtqn itl ,<F6>-my itl yetig
^SCR("P1HZ","P",5,"LMAX")
11
^SCR("P1HZ","P",5,"MUMPS1")
S %MSC("S")="0123456789-/"
^SCR("P1HZ","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1HZ","P",5,"TYP")
E
^SCR("P1HZ","P",7,"CRD")
1,44,E,11,0
^SCR("P1HZ","P",7,"HELP")

^SCR("P1HZ","P",7,"LMAX")
11
^SCR("P1HZ","P",7,"MUMPS1")
D PELE0^P1HZ
^SCR("P1HZ","P",7,"MUMPS2")
D PELE^P1HZ
^SCR("P1HZ","P",7,"TYP")
E
^SCR("P1HZ","P",10,"CRD")
1,39,H,23
^SCR("P1HZ","P",10,"HELP")

^SCR("P1HZ","P",10,"LMAX")
23
^SCR("P1HZ","P",10,"MUMPS1")

^SCR("P1HZ","P",10,"MUMPS2")
S NAME=$TR(NAME,"{}\*","()/X")
^SCR("P1HZ","P",10,"MUST")

^SCR("P1HZ","P",10,"TYP")
H
^SCR("P1HZ","P",11,"CRD")
1,1,N,7,2
^SCR("P1HZ","P",11,"HELP")

^SCR("P1HZ","P",11,"LMAX")
7
^SCR("P1HZ","P",11,"MUMPS1")

^SCR("P1HZ","P",11,"MUMPS2")

^SCR("P1HZ","P",11,"OUTPUT")

^SCR("P1HZ","P",11,"TYP")
N
^SCR("P1HZ","P",12,"CRD")
2,61,E,7,0
^SCR("P1HZ","P",12,"HELP")

^SCR("P1HZ","P",12,"LMAX")
7
^SCR("P1HZ","P",12,"MUMPS1")

^SCR("P1HZ","P",12,"MUMPS2")

^SCR("P1HZ","P",12,"OUTPUT")

^SCR("P1HZ","P",12,"TYP")
E
^SCR("P1HZ","P",13,"CRD")
2,34,N,4,0
^SCR("P1HZ","P",13,"HELP")

^SCR("P1HZ","P",13,"LMAX")
5
^SCR("P1HZ","P",13,"MUMPS1")

^SCR("P1HZ","P",13,"MUMPS2")

^SCR("P1HZ","P",13,"OUTPUT")

^SCR("P1HZ","P",13,"TYP")
N
^SCR("P1HZ","P",14,"CRD")
2,20,H,18!
^SCR("P1HZ","P",14,"HELP")

^SCR("P1HZ","P",14,"LMAX")
18
^SCR("P1HZ","P",14,"MUMPS1")

^SCR("P1HZ","P",14,"MUMPS2")

^SCR("P1HZ","P",14,"OUTPUT")

^SCR("P1HZ","P",14,"TYP")
H
^SCR("P1HZ","P",15,"CRD")
3,73,H,20
^SCR("P1HZ","P",15,"HELP")

^SCR("P1HZ","P",15,"LMAX")
23
^SCR("P1HZ","P",15,"MUMPS1")

^SCR("P1HZ","P",15,"MUMPS2")
S KTV=$TR(KTV,"{}\*","()/X")
^SCR("P1HZ","P",15,"MUST")

^SCR("P1HZ","P",15,"TYP")
H
^SCR("P1HZ","P",16,"CRD")
3,45,H,4,0
^SCR("P1HZ","P",16,"HELP")

^SCR("P1HZ","P",16,"LMAX")
4
^SCR("P1HZ","P",16,"MUMPS1")

^SCR("P1HZ","P",16,"MUMPS2")
S BAIT=$TR(BAIT,"\","/")
^SCR("P1HZ","P",16,"MUST")

^SCR("P1HZ","P",16,"TYP")
H
^SCR("P1HZ","P",17,"CRD")
3,34,H,4,0
^SCR("P1HZ","P",17,"HELP")

^SCR("P1HZ","P",17,"LMAX")
5
^SCR("P1HZ","P",17,"MUMPS1")

^SCR("P1HZ","P",17,"MUMPS2")
S DIRA=$TR(DIRA,"\","/")
^SCR("P1HZ","P",17,"TYP")
H
^SCR("P1HZ","P",18,"CRD")
3,20,H,4,0
^SCR("P1HZ","P",18,"HELP")

^SCR("P1HZ","P",18,"LMAX")
4
^SCR("P1HZ","P",18,"MUMPS1")

^SCR("P1HZ","P",18,"MUMPS2")

^SCR("P1HZ","P",18,"MUST")

^SCR("P1HZ","P",18,"TYP")
H
^SCR("P1HZ","P",19,"CRD")
3,7,H,5,0
^SCR("P1HZ","P",19,"HELP")

^SCR("P1HZ","P",19,"LMAX")
5
^SCR("P1HZ","P",19,"MUMPS1")

^SCR("P1HZ","P",19,"MUMPS2")

^SCR("P1HZ","P",19,"TYP")
H
^SCR("P1HZ","P",20,"CRD")
4,73,H,23!/36,0
^SCR("P1HZ","P",20,"HELP")

^SCR("P1HZ","P",20,"LMAX")
23
^SCR("P1HZ","P",20,"MUMPS1")

^SCR("P1HZ","P",20,"MUMPS2")

^SCR("P1HZ","P",20,"TYP")
H
^SCR("P1HZ","P",25,"CRD")
4,44,H,13,0
^SCR("P1HZ","P",25,"HELP")
<F7> - mixr zniyx
^SCR("P1HZ","P",25,"LMAX")
13
^SCR("P1HZ","P",25,"MUMPS1")
D IR0^P1HZ
^SCR("P1HZ","P",25,"MUMPS2")
D IR^P1HZ
^SCR("P1HZ","P",25,"TYP")
H
^SCR("P1HZ","P",28,"CRD")
4,17,E,5,0
^SCR("P1HZ","P",28,"HELP")

^SCR("P1HZ","P",28,"LMAX")
5
^SCR("P1HZ","P",28,"MUMPS1")

^SCR("P1HZ","P",28,"MUMPS2")

^SCR("P1HZ","P",28,"TYP")
E
^SCR("P1HZ","P",30,"CRD")
4,9,H,7,0
^SCR("P1HZ","P",30,"HELP")

^SCR("P1HZ","P",30,"LMAX")
7
^SCR("P1HZ","P",30,"MUMPS1")
S %SCO="TRH" S NNN1=15
^SCR("P1HZ","P",30,"MUMPS2")
I $$ASM^P1L(NMB),HZMLAK="" S %SC("ST")=1
^SCR("P1HZ","P",30,"TYP")
H
^SCR("P1HZ","P",31,"CRD")
5,31,E,15,0
^SCR("P1HZ","P",31,"HELP")

^SCR("P1HZ","P",31,"LMAX")
15
^SCR("P1HZ","P",31,"MUMPS1")
D ZMANK0^P1HZMS
^SCR("P1HZ","P",31,"MUMPS2")

^SCR("P1HZ","P",31,"OUTPUT")

^SCR("P1HZ","P",31,"TYP")
E
^SCR("P1HZ","P",32,"CRD")
5,14,D,8,0
^SCR("P1HZ","P",32,"HELP")

^SCR("P1HZ","P",32,"LMAX")
8
^SCR("P1HZ","P",32,"MUMPS1")
S TRHOLD=$G(TRH) S:$G(TRH)?.P TRH=$$^%L1DC($H,1) S %SCN="IR,MIKUD"
^SCR("P1HZ","P",32,"MUMPS2")
I $$^%L1DC(TRH,3)<$H S %SC("ER")=1
^SCR("P1HZ","P",32,"MUST")

^SCR("P1HZ","P",32,"TYP")
D
^SCR("P1HZ","P",34,"CRD")
5,2,T,5,0
^SCR("P1HZ","P",34,"HELP")
<HOME> - dycg dpnfd ligzdl , <F9> - gewl qihxk geztl  , <F8> - dxrd 
^SCR("P1HZ","P",34,"LMAX")
5
^SCR("P1HZ","P",34,"MUMPS1")
D SHAA^P1HZ
^SCR("P1HZ","P",34,"MUMPS2")
D SHAA2^P1HZ
^SCR("P1HZ","P",34,"TYP")
T
^SCR("P1HZ","P",35,"CRD")
5,63,D,8,0
^SCR("P1HZ","P",35,"HELP")

^SCR("P1HZ","P",35,"LMAX")
8
^SCR("P1HZ","P",35,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZ","P",35,"MUMPS2")

^SCR("P1HZ","P",35,"OUTPUT")

^SCR("P1HZ","P",35,"TYP")
D
^SCR("P1HZ","P",36,"CRD")
6,71,H,11
^SCR("P1HZ","P",36,"HELP")

^SCR("P1HZ","P",36,"LMAX")
11
^SCR("P1HZ","P",36,"MUMPS1")

^SCR("P1HZ","P",36,"MUMPS2")

^SCR("P1HZ","P",36,"TYP")
H
^SCR("P1HZ","P",37,"CHECK")
Y
^SCR("P1HZ","P",37,"CRD")
6,48,N,3,0
^SCR("P1HZ","P",37,"FNC")
PGLN
^SCR("P1HZ","P",37,"GLOB")
P1MSD
^SCR("P1HZ","P",37,"HELP")
<CTRL+L> - zncew dpnfdn wizrdl ,<F7> - dbvd ,<F6> - my itl yetig
^SCR("P1HZ","P",37,"LMAX")
3
^SCR("P1HZ","P",37,"MUMPS1")

^SCR("P1HZ","P",37,"MUMPS2")
D MSD^P1HZ
^SCR("P1HZ","P",37,"MUST")

^SCR("P1HZ","P",37,"NLN")
20
^SCR("P1HZ","P",37,"RZD")
\
^SCR("P1HZ","P",37,"TOPB")
8
^SCR("P1HZ","P",37,"TYP")
N
^SCR("P1HZ","P",37,"VRB")
MSD1
^SCR("P1HZ","P",38,"CRD")
6,47,H,27
^SCR("P1HZ","P",38,"HELP")

^SCR("P1HZ","P",38,"LMAX")
27
^SCR("P1HZ","P",38,"MUMPS1")

^SCR("P1HZ","P",38,"MUMPS2")

^SCR("P1HZ","P",38,"OUTPUT")

^SCR("P1HZ","P",38,"TYP")
H
^SCR("P1HZ","P",39,"CRD")
6,13,H,11
^SCR("P1HZ","P",39,"HELP")

^SCR("P1HZ","P",39,"LMAX")
11
^SCR("P1HZ","P",39,"MUMPS1")

^SCR("P1HZ","P",39,"MUMPS2")

^SCR("P1HZ","P",39,"OUTPUT")

^SCR("P1HZ","P",39,"TYP")
H
^SCR("P1HZ","P",40,"CRD")
18,61,E,13,0
^SCR("P1HZ","P",40,"HELP")

^SCR("P1HZ","P",40,"LMAX")
13
^SCR("P1HZ","P",40,"MUMPS1")

^SCR("P1HZ","P",40,"MUMPS2")
D HNHM^P1HZ
^SCR("P1HZ","P",40,"TYP")
E
^SCR("P1HZ","P",45,"CRD")
18,44,N,5,1
^SCR("P1HZ","P",45,"HELP")

^SCR("P1HZ","P",45,"LMAX")
5
^SCR("P1HZ","P",45,"MUMPS1")

^SCR("P1HZ","P",45,"MUMPS2")
D DMSH^P1HZ
^SCR("P1HZ","P",45,"TYP")
N
^SCR("P1HZ","P",50,"CHECK")
Y
^SCR("P1HZ","P",50,"CRD")
18,27,E,5.,0
^SCR("P1HZ","P",50,"FNC")

^SCR("P1HZ","P",50,"GLOB")
NAME
^SCR("P1HZ","P",50,"HELP")
<F7> - micaer zbvd
^SCR("P1HZ","P",50,"LMAX")
5
^SCR("P1HZ","P",50,"MUMPS1")
K %SCO I '$G(MKBL) S MKBL=$G(^P1PRM("MKBL",$P),$G(^P1PRM("MKBL"))) S:MKBL %L1GET=""
^SCR("P1HZ","P",50,"MUMPS2")
D MKBL^P1HZ
^SCR("P1HZ","P",50,"MUST")

^SCR("P1HZ","P",50,"NLN")
20
^SCR("P1HZ","P",50,"RZD")
\
^SCR("P1HZ","P",50,"TOPB")
8
^SCR("P1HZ","P",50,"TYP")
E
^SCR("P1HZ","P",50,"VRB")
MKBL1
^SCR("P1HZ","P",52,"CRD")
18,17,H,15
^SCR("P1HZ","P",52,"HELP")

^SCR("P1HZ","P",52,"LMAX")
15
^SCR("P1HZ","P",52,"MUMPS1")

^SCR("P1HZ","P",52,"MUMPS2")

^SCR("P1HZ","P",52,"OUTPUT")

^SCR("P1HZ","P",52,"TYP")
H
^SCR("P1HZ","P",53,"CRD")
19,74,H,28!
^SCR("P1HZ","P",53,"HELP")
<F8> - mixeviw zniyx , <F7> - zexrd zniyx , <F6> - my itl dxrd yetig
^SCR("P1HZ","P",53,"LMAX")
28
^SCR("P1HZ","P",53,"MUMPS1")

^SCR("P1HZ","P",53,"MUMPS2")
D ^P1HRA2("HRA2",%OLDTO)
^SCR("P1HZ","P",53,"OUTPUT")

^SCR("P1HZ","P",53,"TYP")
H
^SCR("P1HZ","P",54,"CHECK")
Y
^SCR("P1HZ","P",54,"CRD")
19,20,E,1,0
^SCR("P1HZ","P",54,"FNC")

^SCR("P1HZ","P",54,"GLOB")
^P1CODTS
^SCR("P1HZ","P",54,"HELP")
<F9> - gewl qihxk bivdl 
^SCR("P1HZ","P",54,"LMAX")
3
^SCR("P1HZ","P",54,"MUMPS1")
S %SCN="HRA2" I $G(CODTS) S CODTS1=$G(^P1CODTS(CODTS)) D P1^%L1SCSAY("CODTS1")
^SCR("P1HZ","P",54,"MUMPS2")
D CODTS^P1HZ
^SCR("P1HZ","P",54,"MUST")

^SCR("P1HZ","P",54,"NLN")
20
^SCR("P1HZ","P",54,"RZD")
\
^SCR("P1HZ","P",54,"TOPB")
8
^SCR("P1HZ","P",54,"TYP")
E
^SCR("P1HZ","P",54,"VRB")
CODTS1
^SCR("P1HZ","P",55,"CRD")
19,19,H,12
^SCR("P1HZ","P",55,"HELP")

^SCR("P1HZ","P",55,"LMAX")
12
^SCR("P1HZ","P",55,"MUMPS1")

^SCR("P1HZ","P",55,"MUMPS2")

^SCR("P1HZ","P",55,"OUTPUT")

^SCR("P1HZ","P",55,"TYP")
H
^SCR("P1HZ","P",56,"CRD")
20,63,N,8,2
^SCR("P1HZ","P",56,"HELP")

^SCR("P1HZ","P",56,"LMAX")
8
^SCR("P1HZ","P",56,"MUMPS1")

^SCR("P1HZ","P",56,"MUMPS2")

^SCR("P1HZ","P",56,"OUTPUT")

^SCR("P1HZ","P",56,"TYP")
N
^SCR("P1HZ","P",57,"CRD")
20,48,N,8,2
^SCR("P1HZ","P",57,"HELP")

^SCR("P1HZ","P",57,"LMAX")
8
^SCR("P1HZ","P",57,"MUMPS1")

^SCR("P1HZ","P",57,"MUMPS2")

^SCR("P1HZ","P",57,"OUTPUT")

^SCR("P1HZ","P",57,"TYP")
N
^SCR("P1HZ","P",58,"CRD")
20,33,N,8,2
^SCR("P1HZ","P",58,"HELP")

^SCR("P1HZ","P",58,"LMAX")
8
^SCR("P1HZ","P",58,"MUMPS1")

^SCR("P1HZ","P",58,"MUMPS2")

^SCR("P1HZ","P",58,"OUTPUT")

^SCR("P1HZ","P",58,"TYP")
N
^SCR("P1HZ","P",59,"CRD")
20,11,N,8,2
^SCR("P1HZ","P",59,"HELP")

^SCR("P1HZ","P",59,"LMAX")
8
^SCR("P1HZ","P",59,"MUMPS1")

^SCR("P1HZ","P",59,"MUMPS2")

^SCR("P1HZ","P",59,"OUTPUT")

^SCR("P1HZ","P",59,"TYP")
N
^SCR("P1HZ","P",60,"CHECK")
Y
^SCR("P1HZ","P",60,"CRD")
21,65,E,3,0
^SCR("P1HZ","P",60,"CREAT")

^SCR("P1HZ","P",60,"FNC")

^SCR("P1HZ","P",60,"GLOB")
P1SL
^SCR("P1HZ","P",60,"HELP")

^SCR("P1HZ","P",60,"LMAX")
4
^SCR("P1HZ","P",60,"MUMPS1")

^SCR("P1HZ","P",60,"MUMPS2")

^SCR("P1HZ","P",60,"MUST")

^SCR("P1HZ","P",60,"NLN")
20
^SCR("P1HZ","P",60,"NS")
migily zlah 
^SCR("P1HZ","P",60,"RZD")
\
^SCR("P1HZ","P",60,"TOPB")
8
^SCR("P1HZ","P",60,"TYP")
E
^SCR("P1HZ","P",60,"VRB")
PSL1
^SCR("P1HZ","P",65,"CRD")
21,64,H,13
^SCR("P1HZ","P",65,"HELP")

^SCR("P1HZ","P",65,"LMAX")
13
^SCR("P1HZ","P",65,"MUMPS1")

^SCR("P1HZ","P",65,"MUMPS2")

^SCR("P1HZ","P",65,"OUTPUT")

^SCR("P1HZ","P",65,"TYP")
H
^SCR("P1HZ","P",66,"CHECK")
Y
^SCR("P1HZ","P",66,"CRD")
21,34,E,4,0
^SCR("P1HZ","P",66,"CREAT")

^SCR("P1HZ","P",66,"FNC")

^SCR("P1HZ","P",66,"GLOB")
P1ARZ
^SCR("P1HZ","P",66,"HELP")

^SCR("P1HZ","P",66,"LMAX")
4
^SCR("P1HZ","P",66,"MUMPS1")

^SCR("P1HZ","P",66,"MUMPS2")

^SCR("P1HZ","P",66,"NLN")
20
^SCR("P1HZ","P",66,"NS")
mifxe` zlah
^SCR("P1HZ","P",66,"RZD")
\
^SCR("P1HZ","P",66,"TOPB")
8
^SCR("P1HZ","P",66,"TYP")
E
^SCR("P1HZ","P",66,"VRB")
ARZ1
^SCR("P1HZ","P",67,"CRD")
21,33,H,12
^SCR("P1HZ","P",67,"HELP")

^SCR("P1HZ","P",67,"LMAX")
12
^SCR("P1HZ","P",67,"MUMPS1")

^SCR("P1HZ","P",67,"MUMPS2")

^SCR("P1HZ","P",67,"OUTPUT")

^SCR("P1HZ","P",67,"TYP")
H
^SCR("P1HZ","P",68,"CRD")
21,2,T,5,0
^SCR("P1HZ","P",68,"HELP")

^SCR("P1HZ","P",68,"LMAX")
5
^SCR("P1HZ","P",68,"MUMPS1")
S %TIM=$ZD($H,"24:60") I '$G(ZMANS) S ZMANS=$TR($J($P(%TIM,":"),2)," ",0)_":"_$TR($J($P(%TIM,":",2),2)," ",0)
^SCR("P1HZ","P",68,"MUMPS2")

^SCR("P1HZ","P",68,"TYP")
T
^SCR("P1HZ","P",71,"CRD")
22,61,E,7,0
^SCR("P1HZ","P",71,"HELP")

^SCR("P1HZ","P",71,"LMAX")
8
^SCR("P1HZ","P",71,"MUMPS1")

^SCR("P1HZ","P",71,"MUMPS2")

^SCR("P1HZ","P",71,"OUTPUT")

^SCR("P1HZ","P",71,"TYP")
E
^SCR("P1HZ","P",72,"CRD")
22,38,E,7,0
^SCR("P1HZ","P",72,"HELP")

^SCR("P1HZ","P",72,"LMAX")
7
^SCR("P1HZ","P",72,"MUMPS1")

^SCR("P1HZ","P",72,"MUMPS2")

^SCR("P1HZ","P",72,"OUTPUT")

^SCR("P1HZ","P",72,"TYP")
E
^SCR("P1HZ","P",73,"CRD")
22,23,E,7,0
^SCR("P1HZ","P",73,"HELP")

^SCR("P1HZ","P",73,"LMAX")
7
^SCR("P1HZ","P",73,"MUMPS1")

^SCR("P1HZ","P",73,"MUMPS2")

^SCR("P1HZ","P",73,"OUTPUT")

^SCR("P1HZ","P",73,"TYP")
E
^SCR("P1HZ","P",74,"CRD")
22,2,E,7,0
^SCR("P1HZ","P",74,"HELP")

^SCR("P1HZ","P",74,"LMAX")
7
^SCR("P1HZ","P",74,"MUMPS1")

^SCR("P1HZ","P",74,"MUMPS2")

^SCR("P1HZ","P",74,"OUTPUT")

^SCR("P1HZ","P",74,"TYP")
E
^SCR("P1HZ","P",75,"CRD")
23,79,H,66
^SCR("P1HZ","P",75,"HELP")

^SCR("P1HZ","P",75,"LMAX")
66
^SCR("P1HZ","P",75,"MUMPS1")

^SCR("P1HZ","P",75,"MUMPS2")

^SCR("P1HZ","P",75,"OUTPUT")

^SCR("P1HZ","P",75,"TYP")
H
^SCR("P1HZ","P","NAME","ARZ")
66
^SCR("P1HZ","P","NAME","ARZ","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",6)
^SCR("P1HZ","P","NAME","ARZ","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",6)
^SCR("P1HZ","P","NAME","ARZ1")
67
^SCR("P1HZ","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZ","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZ","P","NAME","AZOR")
39
^SCR("P1HZ","P","NAME","BAIT")
16
^SCR("P1HZ","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZ","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZ","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZ","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZ","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZ","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZ","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZ","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZ","P","NAME","CMNT")
20
^SCR("P1HZ","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZ","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZ","P","NAME","CNISA")
19
^SCR("P1HZ","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZ","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZ","P","NAME","CODTS")
54
^SCR("P1HZ","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZ","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZ","P","NAME","CODTS1")
55
^SCR("P1HZ","P","NAME","DATK")
35
^SCR("P1HZ","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZ","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZ","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZ","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZ","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZ","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZ","P","NAME","DIRA")
17
^SCR("P1HZ","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZ","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZ","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZ","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZ","P","NAME","DMSH")
45
^SCR("P1HZ","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZ","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZ","P","NAME","EMDA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",14)
^SCR("P1HZ","P","NAME","EMDA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",14)
^SCR("P1HZ","P","NAME","HNH")
40
^SCR("P1HZ","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZ","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZ","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZ","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZ","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZ","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZ","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZ","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZ","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZ","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZ","P","NAME","HOVA")
11
^SCR("P1HZ","P","NAME","HRA2")
53
^SCR("P1HZ","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZ","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZ","P","NAME","HRAED")
75
^SCR("P1HZ","P","NAME","HRAED","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",6)
^SCR("P1HZ","P","NAME","HRAED","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",6)
^SCR("P1HZ","P","NAME","HRL")
14
^SCR("P1HZ","P","NAME","HSB")
73
^SCR("P1HZ","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZ","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZ","P","NAME","HSB2")
74
^SCR("P1HZ","P","NAME","HZM")
12
^SCR("P1HZ","P","NAME","HZM","KEY")

^SCR("P1HZ","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK,
^SCR("P1HZ","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM,ARZ
^SCR("P1HZ","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL,EMDA,TSFMHR
^SCR("P1HZ","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD,,IR,,MAZMIN,,HRAED,,PELE
^SCR("P1HZ","P","NAME","HZMLAK")
30
^SCR("P1HZ","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZ","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZ","P","NAME","IR")
25
^SCR("P1HZ","P","NAME","IR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",4)
^SCR("P1HZ","P","NAME","IR","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",4)
^SCR("P1HZ","P","NAME","ITRA")
59
^SCR("P1HZ","P","NAME","KHZ")
13
^SCR("P1HZ","P","NAME","KOMA")
18
^SCR("P1HZ","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZ","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZ","P","NAME","KTV")
15
^SCR("P1HZ","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZ","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZ","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZ","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZ","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZ","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZ","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZ","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZ","P","NAME","MAZMIN")
36
^SCR("P1HZ","P","NAME","MAZMIN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",5)
^SCR("P1HZ","P","NAME","MAZMIN","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",5)
^SCR("P1HZ","P","NAME","MIKUD")
28
^SCR("P1HZ","P","NAME","MKBL")
50
^SCR("P1HZ","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZ","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZ","P","NAME","MKBL1")
52
^SCR("P1HZ","P","NAME","MSD")
37
^SCR("P1HZ","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZ","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZ","P","NAME","MSD1")
38
^SCR("P1HZ","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZ","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZ","P","NAME","NAME")
10
^SCR("P1HZ","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZ","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZ","P","NAME","NCAB")
72
^SCR("P1HZ","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZ","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZ","P","NAME","NMB")
5
^SCR("P1HZ","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZ","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZ","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZ","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZ","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZ","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZ","P","NAME","PELE")
7
^SCR("P1HZ","P","NAME","PELE","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",7)
^SCR("P1HZ","P","NAME","PELE","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",7)
^SCR("P1HZ","P","NAME","PSL")
60
^SCR("P1HZ","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZ","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZ","P","NAME","PSL1")
65
^SCR("P1HZ","P","NAME","SHAA")
34
^SCR("P1HZ","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZ","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZ","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZ","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZ","P","NAME","SHUL")
57
^SCR("P1HZ","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZ","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZ","P","NAME","SHULA")
58
^SCR("P1HZ","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZ","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZ","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZ","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZ","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZ","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZ","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZ","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZ","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZ","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZ","P","NAME","TM")
71
^SCR("P1HZ","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZ","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZ","P","NAME","TRH")
32
^SCR("P1HZ","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZ","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZ","P","NAME","TSFMHR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",15)
^SCR("P1HZ","P","NAME","TSFMHR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",15)
^SCR("P1HZ","P","NAME","TSHL")
56
^SCR("P1HZ","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZ","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZ","P","NAME","ZMANK")
31
^SCR("P1HZ","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZ","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZ","P","NAME","ZMANS")
68
^SCR("P1HZ","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZ","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZ","P","NM",5)
NMB
^SCR("P1HZ","P","NM",7)
PELE
^SCR("P1HZ","P","NM",10)
NAME
^SCR("P1HZ","P","NM",11)
HOVA
^SCR("P1HZ","P","NM",12)
HZM
^SCR("P1HZ","P","NM",13)
KHZ
^SCR("P1HZ","P","NM",14)
HRL
^SCR("P1HZ","P","NM",15)
KTV
^SCR("P1HZ","P","NM",16)
BAIT
^SCR("P1HZ","P","NM",17)
DIRA
^SCR("P1HZ","P","NM",18)
KOMA
^SCR("P1HZ","P","NM",19)
CNISA
^SCR("P1HZ","P","NM",20)
CMNT
^SCR("P1HZ","P","NM",25)
IR
^SCR("P1HZ","P","NM",28)
MIKUD
^SCR("P1HZ","P","NM",30)
HZMLAK
^SCR("P1HZ","P","NM",31)
ZMANK
^SCR("P1HZ","P","NM",32)
TRH
^SCR("P1HZ","P","NM",34)
SHAA
^SCR("P1HZ","P","NM",35)
DATK
^SCR("P1HZ","P","NM",36)
MAZMIN
^SCR("P1HZ","P","NM",37)
MSD
^SCR("P1HZ","P","NM",38)
MSD1
^SCR("P1HZ","P","NM",39)
AZOR
^SCR("P1HZ","P","NM",40)
HNH
^SCR("P1HZ","P","NM",45)
DMSH
^SCR("P1HZ","P","NM",50)
MKBL
^SCR("P1HZ","P","NM",52)
MKBL1
^SCR("P1HZ","P","NM",53)
HRA2
^SCR("P1HZ","P","NM",54)
CODTS
^SCR("P1HZ","P","NM",55)
CODTS1
^SCR("P1HZ","P","NM",56)
TSHL
^SCR("P1HZ","P","NM",57)
SHUL
^SCR("P1HZ","P","NM",58)
SHULA
^SCR("P1HZ","P","NM",59)
ITRA
^SCR("P1HZ","P","NM",60)
PSL
^SCR("P1HZ","P","NM",65)
PSL1
^SCR("P1HZ","P","NM",66)
ARZ
^SCR("P1HZ","P","NM",67)
ARZ1
^SCR("P1HZ","P","NM",68)
ZMANS
^SCR("P1HZ","P","NM",71)
TM
^SCR("P1HZ","P","NM",72)
NCAB
^SCR("P1HZ","P","NM",73)
HSB
^SCR("P1HZ","P","NM",74)
HSB2
^SCR("P1HZ","P","NM",75)
HRAED
^SCR("P1HZ","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZ","P","REF",1,"RZD")
\
^SCR("P1HZ","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK\
^SCR("P1HZ","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZ","P","REF",2,"RZD")
\
^SCR("P1HZ","P","REF",2,"STR")
PSL\ZMANS\\\TM\ARZ
^SCR("P1HZ","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZ","P","REF",3,"RZD")
\
^SCR("P1HZ","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL\EMDA\TSFMHR
^SCR("P1HZ","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZ","P","REF",4,"RZD")
\\
^SCR("P1HZ","P","REF",4,"STR")
HRA2\\HODAA\\MSD\\IR\\MAZMIN\\HRAED\\PELE
^SCR("P1HZ0")
H
^SCR("P1HZ0",1)
 {11    }:daeg {                    10}: my {07        }:ciip {05        }: 'lh
^SCR("P1HZ0",2)
 {               14}:gewl lr dxrd {13  }:gewld ly zepnfd qn  {12    }:'qn dpnfd
^SCR("P1HZ0",3)
 {  19} dqipk  { 18}:dnew   {  17}:dxic { 16}'qn {                    15}: aegx
^SCR("P1HZ0",4)
 {    30}:`zknq` {28  }:cewin {          25}:xir {                    20}: dxrd
^SCR("P1HZ0",5)
  {34  }:dryl {32     }:jix`zl {31            }:dpnfd zlaw onf {35     :dtew 'z
^SCR("P1HZ0",6)
 {        39}:xef` {                        38} {37: dcrqn {        36}: oinfnd
^SCR("P1HZ0",7)
                                                                             1$
^SCR("P1HZ0",8)
  :        dxrd      :  mekq :zetqez:zenk: xign:     hixt xe`z    :beq: cew :  
^SCR("P1HZ0",9)
                                                                               
^SCR("P1HZ0",10)
                                                                               
^SCR("P1HZ0",11)
                                                                               
^SCR("P1HZ0",12)
                                                                               
^SCR("P1HZ0",13)
                                                                               
^SCR("P1HZ0",14)
                                                                               
^SCR("P1HZ0",15)
                                                                               
^SCR("P1HZ0",16)
                                                                               
^SCR("P1HZ0",17)
 $1                                                                            
^SCR("P1HZ0",18)
 {            52}:lawnd my {50  }:lawnd 'qn {45  }:gelyn inc {40          :dgpd
^SCR("P1HZ0",19)
      {         55} {54:melyz zxev           {                         53}:dxrd
^SCR("P1HZ0",20)
           {59     }:dxzi        {58     }:dtwd {57     }:mley {56     }:melyzl
^SCR("P1HZ0",21)
  {68  }:xebiy onf  {         67} {66 }: fxe` 'qn {          65} {60 }:gily 'qn
^SCR("P1HZ0",22)
  {74    }:i`xy` oeayg {73    }:oeayg {72    }:dlaw/yg 'qn   {71     }:'n'z 'qn
^SCR("P1HZ0",23)
            {                                                               75}
^SCR("P1HZ0","A",1)
:„�…‡:�™:ƒ‰‰�:'Œˆ
^SCR("P1HZ0","A",2)
:‡…—ŒŒ’„˜’„:‡…—Œ„Œ™š…�Ž†„‘Ž:'‘Ž„�Ž†„
^SCR("P1HZ0","A",3)
„‘‰�‹:„Ž…—:„˜‰ƒ'‘Ž:�…‡˜
^SCR("P1HZ0","A",4)
:€š‹Ž‘€:ƒ…—‰Ž:˜‰’:„˜’„
^SCR("P1HZ0","A",5)
:„’™Œ:Š‰˜€šŒ:„�Ž†„šŒ�—�Ž†:„”…—'š
^SCR("P1HZ0","A",6)
:˜…†€:„ƒ’‘Ž:�‰Ž†Ž„
^SCR("P1HZ0","A",7)

^SCR("P1HZ0","A",8)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€š‚…‘ƒ…—
^SCR("P1HZ0","A",9)
--------------------------------------------------------------------
^SCR("P1HZ0","A",10)

^SCR("P1HZ0","A",11)

^SCR("P1HZ0","A",12)

^SCR("P1HZ0","A",13)

^SCR("P1HZ0","A",14)

^SCR("P1HZ0","A",15)

^SCR("P1HZ0","A",16)

^SCR("P1HZ0","A",17)

^SCR("P1HZ0","A",18)
:Œ�—Ž„�™:Œ�—Ž„'‘Ž:‡…Œ™Ž‰Žƒ:„‡�„
^SCR("P1HZ0","A",19)
:�…Œ™šš˜…–:„˜’„
^SCR("P1HZ0","A",20)
:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZ0","A",21)
:˜…‚‰™�Ž†:†˜…€'‘Ž:‡‰Œ™'‘Ž
^SCR("P1HZ0","A",22)
:‰€˜™€�…�™‡:�…�™‡:„Œ�—/™‡'‘Ž:'Ž'š'‘Ž
^SCR("P1HZ0","A",23)

^SCR("P1HZ0","AV",1)
:vcuj:oa:shhb:wky
^SCR("P1HZ0","AV",2)
:juekkgvrgv:juekvka,ubnzvxn:wxnvbnzv
^SCR("P1HZ0","AV",3)
vxhbf:vnue:vrhswxn:cujr
^SCR("P1HZ0","AV",4)
:t,fnxt:suehn:rhg:vrgv
^SCR("P1HZ0","AV",5)
:vgak:lhrt,k:vbnzv,kceinz:vpuew,
^SCR("P1HZ0","AV",6)
:ruzt:vsgxn:ihnznv
^SCR("P1HZ0","AV",7)

^SCR("P1HZ0","AV",8)
vrgvoufx,upxu,,unfrhjnyhrprut,duxsue
^SCR("P1HZ0","AV",9)
--------------------------------------------------------------------
^SCR("P1HZ0","AV",10)

^SCR("P1HZ0","AV",11)

^SCR("P1HZ0","AV",12)

^SCR("P1HZ0","AV",13)

^SCR("P1HZ0","AV",14)

^SCR("P1HZ0","AV",15)

^SCR("P1HZ0","AV",16)

^SCR("P1HZ0","AV",17)

^SCR("P1HZ0","AV",18)
:kcenvoa:kcenvwxn:jukanhns:vjbv
^SCR("P1HZ0","AV",19)
:ouka,,rum:vrgv
^SCR("P1HZ0","AV",20)
:vr,h:vpev:okua:ouka,k
^SCR("P1HZ0","AV",21)
:rudhainz:zrutwxn:jhkawxn
^SCR("P1HZ0","AV",22)
:htratiucaj:iucaj:vkceqajwxn:wnw,wxn
^SCR("P1HZ0","AV",23)

^SCR("P1HZ0","G",1,"CRD")
9,76,E,5,0
^SCR("P1HZ0","G",1,"FNC")
F9,F10,F8,PGLN,PGRG
^SCR("P1HZ0","G",1,"GLOB")
PAR
^SCR("P1HZ0","G",1,"HELP")
<F2>-dpnfd zbvd,<F10>-zetqez zbvd**<F9>-zetqez;<F7>-dlah;<F6>-my
^SCR("P1HZ0","G",1,"LMAX")
5
^SCR("P1HZ0","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZ0","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZ0","G",1,"MUST")

^SCR("P1HZ0","G",1,"NLN")
20
^SCR("P1HZ0","G",1,"RZD")
**
^SCR("P1HZ0","G",1,"SHEM")
 cew 
^SCR("P1HZ0","G",1,"TOPB")
8
^SCR("P1HZ0","G",1,"TYP")
E
^SCR("P1HZ0","G",1,"VRB")
PAR1
^SCR("P1HZ0","G",2,"CRD")
9,70,E,3,0
^SCR("P1HZ0","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZ0","G",2,"LMAX")
3
^SCR("P1HZ0","G",2,"MUMPS1")

^SCR("P1HZ0","G",2,"MUMPS2")
D SUG^P1HZ
^SCR("P1HZ0","G",2,"OUTPUT")

^SCR("P1HZ0","G",2,"SHEM")
beq
^SCR("P1HZ0","G",2,"TYP")
E
^SCR("P1HZ0","G",3,"CRD")
9,66,H,18,0
^SCR("P1HZ0","G",3,"HELP")

^SCR("P1HZ0","G",3,"LMAX")
18
^SCR("P1HZ0","G",3,"MUMPS1")

^SCR("P1HZ0","G",3,"MUMPS2")

^SCR("P1HZ0","G",3,"OUTPUT")

^SCR("P1HZ0","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZ0","G",3,"TYP")
H
^SCR("P1HZ0","G",4,"CRD")
9,47,N,5,2
^SCR("P1HZ0","G",4,"HELP")

^SCR("P1HZ0","G",4,"LMAX")
5
^SCR("P1HZ0","G",4,"MUMPS1")

^SCR("P1HZ0","G",4,"MUMPS2")
I MH<0 S %SC("ER")=1
^SCR("P1HZ0","G",4,"OUTPUT")

^SCR("P1HZ0","G",4,"SHEM")
 xign
^SCR("P1HZ0","G",4,"TYP")
N
^SCR("P1HZ0","G",5,"CRD")
9,41,N,4,0
^SCR("P1HZ0","G",5,"HELP")

^SCR("P1HZ0","G",5,"LMAX")
4
^SCR("P1HZ0","G",5,"MUMPS1")
D KAM0^P1HZMS ;S:'$G(KAM) KAM=1
^SCR("P1HZ0","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZ0","G",5,"MUST")

^SCR("P1HZ0","G",5,"SHEM")
zenk
^SCR("P1HZ0","G",5,"TYP")
N
^SCR("P1HZ0","G",6,"CRD")
9,36,N,6,2
^SCR("P1HZ0","G",6,"HELP")

^SCR("P1HZ0","G",6,"LMAX")
6
^SCR("P1HZ0","G",6,"MUMPS1")

^SCR("P1HZ0","G",6,"MUMPS2")

^SCR("P1HZ0","G",6,"OUTPUT")

^SCR("P1HZ0","G",6,"SHEM")
zetqez
^SCR("P1HZ0","G",6,"TYP")
N
^SCR("P1HZ0","G",7,"CRD")
9,29,N,7,2
^SCR("P1HZ0","G",7,"HELP")

^SCR("P1HZ0","G",7,"LMAX")
7
^SCR("P1HZ0","G",7,"MUMPS1")

^SCR("P1HZ0","G",7,"MUMPS2")

^SCR("P1HZ0","G",7,"OUTPUT")

^SCR("P1HZ0","G",7,"SHEM")
  mekq 
^SCR("P1HZ0","G",7,"TYP")
N
^SCR("P1HZ0","G",8,"CRD")
9,21,H,18/36,0
^SCR("P1HZ0","G",8,"HELP")
<F10> - zetqez zbvd , <F9> - zetqez oekcr ,<F7> - zexrd zbvd
^SCR("P1HZ0","G",8,"LMAX")
18
^SCR("P1HZ0","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZ0","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZ0","G",8,"SHEM")
        dxrd      
^SCR("P1HZ0","G",8,"TYP")
H
^SCR("P1HZ0","G","DEL")
Y
^SCR("P1HZ0","G","MAX")
9999
^SCR("P1HZ0","G","NAME","HRP")
8
^SCR("P1HZ0","G","NAME","KAM")
5
^SCR("P1HZ0","G","NAME","MH")
4
^SCR("P1HZ0","G","NAME","PAR")
1
^SCR("P1HZ0","G","NAME","PAR1")
3
^SCR("P1HZ0","G","NAME","SUG")
2
^SCR("P1HZ0","G","NAME","SUM")
7
^SCR("P1HZ0","G","NAME","TSF")
6
^SCR("P1HZ0","G","NM",1)
PAR
^SCR("P1HZ0","G","NM",2)
SUG
^SCR("P1HZ0","G","NM",3)
PAR1
^SCR("P1HZ0","G","NM",4)
MH
^SCR("P1HZ0","G","NM",5)
KAM
^SCR("P1HZ0","G","NM",6)
TSF
^SCR("P1HZ0","G","NM",7)
SUM
^SCR("P1HZ0","G","NM",8)
HRP
^SCR("P1HZ0","G","RB")
8,2,18,79
^SCR("P1HZ0","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZ0","G","RZD")
\
^SCR("P1HZ0","G","STEP")
1
^SCR("P1HZ0","G","STG")
  :        dxrd      :  mekq :zetqez:zenk: xign:     hixt xe`z    :beq: cew :  
^SCR("P1HZ0","G","VG")
10
^SCR("P1HZ0","NAME")

^SCR("P1HZ0","P",5,"CRD")
1,62,E,11,0
^SCR("P1HZ0","P",5,"HELP")
<F9>-'ayg,'n'z ,dpnfd 'qn itl,<F8>-zaezk itl,<F7>-xtqn itl ,<F6>-my itl yetig
^SCR("P1HZ0","P",5,"LMAX")
11
^SCR("P1HZ0","P",5,"MUMPS1")
S %MSC("S")="0123456789-/"
^SCR("P1HZ0","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1HZ0","P",5,"TYP")
E
^SCR("P1HZ0","P",7,"CRD")
1,44,E,11,0
^SCR("P1HZ0","P",7,"HELP")

^SCR("P1HZ0","P",7,"LMAX")
11
^SCR("P1HZ0","P",7,"MUMPS1")
D PELE0^P1HZ
^SCR("P1HZ0","P",7,"MUMPS2")
D PELE^P1HZ
^SCR("P1HZ0","P",7,"TYP")
E
^SCR("P1HZ0","P",10,"CRD")
1,39,H,23
^SCR("P1HZ0","P",10,"HELP")

^SCR("P1HZ0","P",10,"LMAX")
23
^SCR("P1HZ0","P",10,"MUMPS1")

^SCR("P1HZ0","P",10,"MUMPS2")
S NAME=$TR(NAME,"{}\*","()/X")
^SCR("P1HZ0","P",10,"MUST")

^SCR("P1HZ0","P",10,"TYP")
H
^SCR("P1HZ0","P",11,"CRD")
1,1,N,7,2
^SCR("P1HZ0","P",11,"HELP")

^SCR("P1HZ0","P",11,"LMAX")
7
^SCR("P1HZ0","P",11,"MUMPS1")

^SCR("P1HZ0","P",11,"MUMPS2")

^SCR("P1HZ0","P",11,"OUTPUT")

^SCR("P1HZ0","P",11,"TYP")
N
^SCR("P1HZ0","P",12,"CRD")
2,61,E,7,0
^SCR("P1HZ0","P",12,"HELP")

^SCR("P1HZ0","P",12,"LMAX")
7
^SCR("P1HZ0","P",12,"MUMPS1")

^SCR("P1HZ0","P",12,"MUMPS2")

^SCR("P1HZ0","P",12,"OUTPUT")

^SCR("P1HZ0","P",12,"TYP")
E
^SCR("P1HZ0","P",13,"CRD")
2,34,N,4,0
^SCR("P1HZ0","P",13,"HELP")

^SCR("P1HZ0","P",13,"LMAX")
5
^SCR("P1HZ0","P",13,"MUMPS1")

^SCR("P1HZ0","P",13,"MUMPS2")

^SCR("P1HZ0","P",13,"OUTPUT")

^SCR("P1HZ0","P",13,"TYP")
N
^SCR("P1HZ0","P",14,"CRD")
2,20,H,18!
^SCR("P1HZ0","P",14,"HELP")

^SCR("P1HZ0","P",14,"LMAX")
18
^SCR("P1HZ0","P",14,"MUMPS1")

^SCR("P1HZ0","P",14,"MUMPS2")

^SCR("P1HZ0","P",14,"OUTPUT")

^SCR("P1HZ0","P",14,"TYP")
H
^SCR("P1HZ0","P",15,"CRD")
3,73,H,20
^SCR("P1HZ0","P",15,"HELP")

^SCR("P1HZ0","P",15,"LMAX")
23
^SCR("P1HZ0","P",15,"MUMPS1")

^SCR("P1HZ0","P",15,"MUMPS2")
S KTV=$TR(KTV,"{}\*","()/X")
^SCR("P1HZ0","P",15,"MUST")

^SCR("P1HZ0","P",15,"TYP")
H
^SCR("P1HZ0","P",16,"CRD")
3,45,H,4,0
^SCR("P1HZ0","P",16,"HELP")

^SCR("P1HZ0","P",16,"LMAX")
4
^SCR("P1HZ0","P",16,"MUMPS1")

^SCR("P1HZ0","P",16,"MUMPS2")
S BAIT=$TR(BAIT,"\","/")
^SCR("P1HZ0","P",16,"MUST")

^SCR("P1HZ0","P",16,"TYP")
H
^SCR("P1HZ0","P",17,"CRD")
3,34,H,4,0
^SCR("P1HZ0","P",17,"HELP")

^SCR("P1HZ0","P",17,"LMAX")
5
^SCR("P1HZ0","P",17,"MUMPS1")

^SCR("P1HZ0","P",17,"MUMPS2")
S DIRA=$TR(DIRA,"\","/")
^SCR("P1HZ0","P",17,"TYP")
H
^SCR("P1HZ0","P",18,"CRD")
3,20,H,4,0
^SCR("P1HZ0","P",18,"HELP")

^SCR("P1HZ0","P",18,"LMAX")
4
^SCR("P1HZ0","P",18,"MUMPS1")

^SCR("P1HZ0","P",18,"MUMPS2")

^SCR("P1HZ0","P",18,"MUST")

^SCR("P1HZ0","P",18,"TYP")
H
^SCR("P1HZ0","P",19,"CRD")
3,7,H,5,0
^SCR("P1HZ0","P",19,"HELP")

^SCR("P1HZ0","P",19,"LMAX")
5
^SCR("P1HZ0","P",19,"MUMPS1")

^SCR("P1HZ0","P",19,"MUMPS2")

^SCR("P1HZ0","P",19,"TYP")
H
^SCR("P1HZ0","P",20,"CRD")
4,73,H,23!/36,0
^SCR("P1HZ0","P",20,"HELP")

^SCR("P1HZ0","P",20,"LMAX")
23
^SCR("P1HZ0","P",20,"MUMPS1")

^SCR("P1HZ0","P",20,"MUMPS2")

^SCR("P1HZ0","P",20,"TYP")
H
^SCR("P1HZ0","P",25,"CRD")
4,44,H,13,0
^SCR("P1HZ0","P",25,"HELP")
<F7> - mixr zniyx
^SCR("P1HZ0","P",25,"LMAX")
13
^SCR("P1HZ0","P",25,"MUMPS1")
D IR0^P1HZ
^SCR("P1HZ0","P",25,"MUMPS2")
D IR^P1HZ
^SCR("P1HZ0","P",25,"TYP")
H
^SCR("P1HZ0","P",28,"CRD")
4,17,E,5,0
^SCR("P1HZ0","P",28,"HELP")

^SCR("P1HZ0","P",28,"LMAX")
5
^SCR("P1HZ0","P",28,"MUMPS1")

^SCR("P1HZ0","P",28,"MUMPS2")

^SCR("P1HZ0","P",28,"TYP")
E
^SCR("P1HZ0","P",30,"CRD")
4,9,H,7,0
^SCR("P1HZ0","P",30,"HELP")

^SCR("P1HZ0","P",30,"LMAX")
7
^SCR("P1HZ0","P",30,"MUMPS1")
S %SCO="TRH" S NNN1=15
^SCR("P1HZ0","P",30,"MUMPS2")
I $$ASM^P1L(NMB),HZMLAK="" S %SC("ST")=1
^SCR("P1HZ0","P",30,"TYP")
H
^SCR("P1HZ0","P",31,"CRD")
5,31,E,15,0
^SCR("P1HZ0","P",31,"HELP")

^SCR("P1HZ0","P",31,"LMAX")
15
^SCR("P1HZ0","P",31,"MUMPS1")
D ZMANK0^P1HZMS
^SCR("P1HZ0","P",31,"MUMPS2")

^SCR("P1HZ0","P",31,"OUTPUT")

^SCR("P1HZ0","P",31,"TYP")
E
^SCR("P1HZ0","P",32,"CRD")
5,14,D,8,0
^SCR("P1HZ0","P",32,"HELP")

^SCR("P1HZ0","P",32,"LMAX")
8
^SCR("P1HZ0","P",32,"MUMPS1")
S TRHOLD=$G(TRH) S:$G(TRH)?.P TRH=$$^%L1DC($H,1) S %SCN="IR,MIKUD"
^SCR("P1HZ0","P",32,"MUMPS2")
I $$^%L1DC(TRH,3)<$H S %SC("ER")=1
^SCR("P1HZ0","P",32,"MUST")

^SCR("P1HZ0","P",32,"TYP")
D
^SCR("P1HZ0","P",34,"CRD")
5,2,T,5,0
^SCR("P1HZ0","P",34,"HELP")
<HOME> - dycg dpnfd ligzdl , <F9> - gewl qihxk geztl  , <F8> - dxrd 
^SCR("P1HZ0","P",34,"LMAX")
5
^SCR("P1HZ0","P",34,"MUMPS1")
D SHAA^P1HZ
^SCR("P1HZ0","P",34,"MUMPS2")
D SHAA2^P1HZ
^SCR("P1HZ0","P",34,"TYP")
T
^SCR("P1HZ0","P",35,"CRD")
5,63,D,8,0
^SCR("P1HZ0","P",35,"HELP")

^SCR("P1HZ0","P",35,"LMAX")
8
^SCR("P1HZ0","P",35,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZ0","P",35,"MUMPS2")

^SCR("P1HZ0","P",35,"OUTPUT")

^SCR("P1HZ0","P",35,"TYP")
D
^SCR("P1HZ0","P",36,"CRD")
6,71,H,11
^SCR("P1HZ0","P",36,"HELP")

^SCR("P1HZ0","P",36,"LMAX")
11
^SCR("P1HZ0","P",36,"MUMPS1")

^SCR("P1HZ0","P",36,"MUMPS2")

^SCR("P1HZ0","P",36,"TYP")
H
^SCR("P1HZ0","P",37,"CHECK")
Y
^SCR("P1HZ0","P",37,"CRD")
6,48,N,3,0
^SCR("P1HZ0","P",37,"FNC")
PGLN
^SCR("P1HZ0","P",37,"GLOB")
P1MSD
^SCR("P1HZ0","P",37,"HELP")
<CTRL+L> - zncew dpnfdn wizrdl ,<F7> - dbvd ,<F6> - my itl yetig
^SCR("P1HZ0","P",37,"LMAX")
3
^SCR("P1HZ0","P",37,"MUMPS1")

^SCR("P1HZ0","P",37,"MUMPS2")
D MSD^P1HZ
^SCR("P1HZ0","P",37,"MUST")

^SCR("P1HZ0","P",37,"NLN")
20
^SCR("P1HZ0","P",37,"RZD")
\
^SCR("P1HZ0","P",37,"TOPB")
8
^SCR("P1HZ0","P",37,"TYP")
N
^SCR("P1HZ0","P",37,"VRB")
MSD1
^SCR("P1HZ0","P",38,"CRD")
6,47,H,27
^SCR("P1HZ0","P",38,"HELP")

^SCR("P1HZ0","P",38,"LMAX")
27
^SCR("P1HZ0","P",38,"MUMPS1")

^SCR("P1HZ0","P",38,"MUMPS2")

^SCR("P1HZ0","P",38,"OUTPUT")

^SCR("P1HZ0","P",38,"TYP")
H
^SCR("P1HZ0","P",39,"CRD")
6,13,H,11
^SCR("P1HZ0","P",39,"HELP")

^SCR("P1HZ0","P",39,"LMAX")
11
^SCR("P1HZ0","P",39,"MUMPS1")

^SCR("P1HZ0","P",39,"MUMPS2")

^SCR("P1HZ0","P",39,"OUTPUT")

^SCR("P1HZ0","P",39,"TYP")
H
^SCR("P1HZ0","P",40,"CRD")
18,61,E,13,0
^SCR("P1HZ0","P",40,"HELP")

^SCR("P1HZ0","P",40,"LMAX")
13
^SCR("P1HZ0","P",40,"MUMPS1")

^SCR("P1HZ0","P",40,"MUMPS2")
D HNHM^P1HZ
^SCR("P1HZ0","P",40,"TYP")
E
^SCR("P1HZ0","P",45,"CRD")
18,44,N,5,1
^SCR("P1HZ0","P",45,"HELP")

^SCR("P1HZ0","P",45,"LMAX")
5
^SCR("P1HZ0","P",45,"MUMPS1")

^SCR("P1HZ0","P",45,"MUMPS2")
D DMSH^P1HZ
^SCR("P1HZ0","P",45,"TYP")
N
^SCR("P1HZ0","P",50,"CHECK")
Y
^SCR("P1HZ0","P",50,"CRD")
18,27,E,5.,0
^SCR("P1HZ0","P",50,"FNC")

^SCR("P1HZ0","P",50,"GLOB")
NAME
^SCR("P1HZ0","P",50,"HELP")
<F7> - micaer zbvd
^SCR("P1HZ0","P",50,"LMAX")
5
^SCR("P1HZ0","P",50,"MUMPS1")
K %SCO I '$G(MKBL) S MKBL=$G(^P1PRM("MKBL",$P),$G(^P1PRM("MKBL"))) S:MKBL %L1GET=""
^SCR("P1HZ0","P",50,"MUMPS2")
D MKBL^P1HZ
^SCR("P1HZ0","P",50,"MUST")

^SCR("P1HZ0","P",50,"NLN")
20
^SCR("P1HZ0","P",50,"RZD")
\
^SCR("P1HZ0","P",50,"TOPB")
8
^SCR("P1HZ0","P",50,"TYP")
E
^SCR("P1HZ0","P",50,"VRB")
MKBL1
^SCR("P1HZ0","P",52,"CRD")
18,17,H,15
^SCR("P1HZ0","P",52,"HELP")

^SCR("P1HZ0","P",52,"LMAX")
15
^SCR("P1HZ0","P",52,"MUMPS1")

^SCR("P1HZ0","P",52,"MUMPS2")

^SCR("P1HZ0","P",52,"OUTPUT")

^SCR("P1HZ0","P",52,"TYP")
H
^SCR("P1HZ0","P",53,"CRD")
19,74,H,28!
^SCR("P1HZ0","P",53,"HELP")
<F8> - mixeviw zniyx , <F7> - zexrd zniyx , <F6> - my itl dxrd yetig
^SCR("P1HZ0","P",53,"LMAX")
28
^SCR("P1HZ0","P",53,"MUMPS1")

^SCR("P1HZ0","P",53,"MUMPS2")
D ^P1HRA2("HRA2",%OLDTO)
^SCR("P1HZ0","P",53,"OUTPUT")

^SCR("P1HZ0","P",53,"TYP")
H
^SCR("P1HZ0","P",54,"CHECK")
Y
^SCR("P1HZ0","P",54,"CRD")
19,20,E,1,0
^SCR("P1HZ0","P",54,"FNC")

^SCR("P1HZ0","P",54,"GLOB")
^P1CODTS
^SCR("P1HZ0","P",54,"HELP")
<F9> - gewl qihxk bivdl 
^SCR("P1HZ0","P",54,"LMAX")
3
^SCR("P1HZ0","P",54,"MUMPS1")
S %SCN="HRA2" I $G(CODTS) S CODTS1=$G(^P1CODTS(CODTS)) D P1^%L1SCSAY("CODTS1")
^SCR("P1HZ0","P",54,"MUMPS2")
D CODTS^P1HZ
^SCR("P1HZ0","P",54,"MUST")

^SCR("P1HZ0","P",54,"NLN")
20
^SCR("P1HZ0","P",54,"RZD")
\
^SCR("P1HZ0","P",54,"TOPB")
8
^SCR("P1HZ0","P",54,"TYP")
E
^SCR("P1HZ0","P",54,"VRB")
CODTS1
^SCR("P1HZ0","P",55,"CRD")
19,19,H,12
^SCR("P1HZ0","P",55,"HELP")

^SCR("P1HZ0","P",55,"LMAX")
12
^SCR("P1HZ0","P",55,"MUMPS1")

^SCR("P1HZ0","P",55,"MUMPS2")

^SCR("P1HZ0","P",55,"OUTPUT")

^SCR("P1HZ0","P",55,"TYP")
H
^SCR("P1HZ0","P",56,"CRD")
20,63,N,8,2
^SCR("P1HZ0","P",56,"HELP")

^SCR("P1HZ0","P",56,"LMAX")
8
^SCR("P1HZ0","P",56,"MUMPS1")

^SCR("P1HZ0","P",56,"MUMPS2")

^SCR("P1HZ0","P",56,"OUTPUT")

^SCR("P1HZ0","P",56,"TYP")
N
^SCR("P1HZ0","P",57,"CRD")
20,48,N,8,2
^SCR("P1HZ0","P",57,"HELP")

^SCR("P1HZ0","P",57,"LMAX")
8
^SCR("P1HZ0","P",57,"MUMPS1")

^SCR("P1HZ0","P",57,"MUMPS2")

^SCR("P1HZ0","P",57,"OUTPUT")

^SCR("P1HZ0","P",57,"TYP")
N
^SCR("P1HZ0","P",58,"CRD")
20,33,N,8,2
^SCR("P1HZ0","P",58,"HELP")

^SCR("P1HZ0","P",58,"LMAX")
8
^SCR("P1HZ0","P",58,"MUMPS1")

^SCR("P1HZ0","P",58,"MUMPS2")

^SCR("P1HZ0","P",58,"OUTPUT")

^SCR("P1HZ0","P",58,"TYP")
N
^SCR("P1HZ0","P",59,"CRD")
20,11,N,8,2
^SCR("P1HZ0","P",59,"HELP")

^SCR("P1HZ0","P",59,"LMAX")
8
^SCR("P1HZ0","P",59,"MUMPS1")

^SCR("P1HZ0","P",59,"MUMPS2")

^SCR("P1HZ0","P",59,"OUTPUT")

^SCR("P1HZ0","P",59,"TYP")
N
^SCR("P1HZ0","P",60,"CHECK")
Y
^SCR("P1HZ0","P",60,"CRD")
21,65,E,3,0
^SCR("P1HZ0","P",60,"CREAT")

^SCR("P1HZ0","P",60,"FNC")

^SCR("P1HZ0","P",60,"GLOB")
P1SL
^SCR("P1HZ0","P",60,"HELP")

^SCR("P1HZ0","P",60,"LMAX")
4
^SCR("P1HZ0","P",60,"MUMPS1")

^SCR("P1HZ0","P",60,"MUMPS2")

^SCR("P1HZ0","P",60,"MUST")

^SCR("P1HZ0","P",60,"NLN")
20
^SCR("P1HZ0","P",60,"NS")
migily zlah 
^SCR("P1HZ0","P",60,"RZD")
\
^SCR("P1HZ0","P",60,"TOPB")
8
^SCR("P1HZ0","P",60,"TYP")
E
^SCR("P1HZ0","P",60,"VRB")
PSL1
^SCR("P1HZ0","P",65,"CRD")
21,64,H,13
^SCR("P1HZ0","P",65,"HELP")

^SCR("P1HZ0","P",65,"LMAX")
13
^SCR("P1HZ0","P",65,"MUMPS1")

^SCR("P1HZ0","P",65,"MUMPS2")

^SCR("P1HZ0","P",65,"OUTPUT")

^SCR("P1HZ0","P",65,"TYP")
H
^SCR("P1HZ0","P",66,"CHECK")
Y
^SCR("P1HZ0","P",66,"CRD")
21,34,E,4,0
^SCR("P1HZ0","P",66,"CREAT")

^SCR("P1HZ0","P",66,"FNC")

^SCR("P1HZ0","P",66,"GLOB")
P1ARZ
^SCR("P1HZ0","P",66,"HELP")

^SCR("P1HZ0","P",66,"LMAX")
4
^SCR("P1HZ0","P",66,"MUMPS1")

^SCR("P1HZ0","P",66,"MUMPS2")

^SCR("P1HZ0","P",66,"NLN")
20
^SCR("P1HZ0","P",66,"NS")
mifxe` zlah
^SCR("P1HZ0","P",66,"RZD")
\
^SCR("P1HZ0","P",66,"TOPB")
8
^SCR("P1HZ0","P",66,"TYP")
E
^SCR("P1HZ0","P",66,"VRB")
ARZ1
^SCR("P1HZ0","P",67,"CRD")
21,33,H,12
^SCR("P1HZ0","P",67,"HELP")

^SCR("P1HZ0","P",67,"LMAX")
12
^SCR("P1HZ0","P",67,"MUMPS1")

^SCR("P1HZ0","P",67,"MUMPS2")

^SCR("P1HZ0","P",67,"OUTPUT")

^SCR("P1HZ0","P",67,"TYP")
H
^SCR("P1HZ0","P",68,"CRD")
21,2,T,5,0
^SCR("P1HZ0","P",68,"HELP")

^SCR("P1HZ0","P",68,"LMAX")
5
^SCR("P1HZ0","P",68,"MUMPS1")
S %TIM=$ZD($H,"24:60") I '$G(ZMANS) S ZMANS=$TR($J($P(%TIM,":"),2)," ",0)_":"_$TR($J($P(%TIM,":",2),2)," ",0)
^SCR("P1HZ0","P",68,"MUMPS2")

^SCR("P1HZ0","P",68,"TYP")
T
^SCR("P1HZ0","P",71,"CRD")
22,61,E,7,0
^SCR("P1HZ0","P",71,"HELP")

^SCR("P1HZ0","P",71,"LMAX")
8
^SCR("P1HZ0","P",71,"MUMPS1")

^SCR("P1HZ0","P",71,"MUMPS2")

^SCR("P1HZ0","P",71,"OUTPUT")

^SCR("P1HZ0","P",71,"TYP")
E
^SCR("P1HZ0","P",72,"CRD")
22,38,E,7,0
^SCR("P1HZ0","P",72,"HELP")

^SCR("P1HZ0","P",72,"LMAX")
7
^SCR("P1HZ0","P",72,"MUMPS1")

^SCR("P1HZ0","P",72,"MUMPS2")

^SCR("P1HZ0","P",72,"OUTPUT")

^SCR("P1HZ0","P",72,"TYP")
E
^SCR("P1HZ0","P",73,"CRD")
22,23,E,7,0
^SCR("P1HZ0","P",73,"HELP")

^SCR("P1HZ0","P",73,"LMAX")
7
^SCR("P1HZ0","P",73,"MUMPS1")

^SCR("P1HZ0","P",73,"MUMPS2")

^SCR("P1HZ0","P",73,"OUTPUT")

^SCR("P1HZ0","P",73,"TYP")
E
^SCR("P1HZ0","P",74,"CRD")
22,2,E,7,0
^SCR("P1HZ0","P",74,"HELP")

^SCR("P1HZ0","P",74,"LMAX")
7
^SCR("P1HZ0","P",74,"MUMPS1")

^SCR("P1HZ0","P",74,"MUMPS2")

^SCR("P1HZ0","P",74,"OUTPUT")

^SCR("P1HZ0","P",74,"TYP")
E
^SCR("P1HZ0","P",75,"CRD")
23,79,H,66
^SCR("P1HZ0","P",75,"HELP")

^SCR("P1HZ0","P",75,"LMAX")
66
^SCR("P1HZ0","P",75,"MUMPS1")

^SCR("P1HZ0","P",75,"MUMPS2")

^SCR("P1HZ0","P",75,"OUTPUT")

^SCR("P1HZ0","P",75,"TYP")
H
^SCR("P1HZ0","P","NAME","ARZ")
66
^SCR("P1HZ0","P","NAME","ARZ","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",6)
^SCR("P1HZ0","P","NAME","ARZ","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",6)
^SCR("P1HZ0","P","NAME","ARZ1")
67
^SCR("P1HZ0","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZ0","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZ0","P","NAME","AZOR")
39
^SCR("P1HZ0","P","NAME","BAIT")
16
^SCR("P1HZ0","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZ0","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZ0","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZ0","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZ0","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZ0","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZ0","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZ0","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZ0","P","NAME","CMNT")
20
^SCR("P1HZ0","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZ0","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZ0","P","NAME","CNISA")
19
^SCR("P1HZ0","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZ0","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZ0","P","NAME","CODTS")
54
^SCR("P1HZ0","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZ0","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZ0","P","NAME","CODTS1")
55
^SCR("P1HZ0","P","NAME","DATK")
35
^SCR("P1HZ0","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZ0","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZ0","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZ0","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZ0","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZ0","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZ0","P","NAME","DIRA")
17
^SCR("P1HZ0","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZ0","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZ0","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZ0","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZ0","P","NAME","DMSH")
45
^SCR("P1HZ0","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZ0","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZ0","P","NAME","EMDA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",14)
^SCR("P1HZ0","P","NAME","EMDA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",14)
^SCR("P1HZ0","P","NAME","HNH")
40
^SCR("P1HZ0","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZ0","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZ0","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZ0","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZ0","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZ0","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZ0","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZ0","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZ0","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZ0","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZ0","P","NAME","HOVA")
11
^SCR("P1HZ0","P","NAME","HRA2")
53
^SCR("P1HZ0","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZ0","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZ0","P","NAME","HRAED")
75
^SCR("P1HZ0","P","NAME","HRAED","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",6)
^SCR("P1HZ0","P","NAME","HRAED","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",6)
^SCR("P1HZ0","P","NAME","HRL")
14
^SCR("P1HZ0","P","NAME","HSB")
73
^SCR("P1HZ0","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZ0","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZ0","P","NAME","HSB2")
74
^SCR("P1HZ0","P","NAME","HZM")
12
^SCR("P1HZ0","P","NAME","HZM","KEY")

^SCR("P1HZ0","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK,
^SCR("P1HZ0","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM,ARZ
^SCR("P1HZ0","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL,EMDA,TSFMHR
^SCR("P1HZ0","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD,,IR,,MAZMIN,,HRAED,,PELE
^SCR("P1HZ0","P","NAME","HZMLAK")
30
^SCR("P1HZ0","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZ0","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZ0","P","NAME","IR")
25
^SCR("P1HZ0","P","NAME","IR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",4)
^SCR("P1HZ0","P","NAME","IR","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",4)
^SCR("P1HZ0","P","NAME","ITRA")
59
^SCR("P1HZ0","P","NAME","KHZ")
13
^SCR("P1HZ0","P","NAME","KOMA")
18
^SCR("P1HZ0","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZ0","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZ0","P","NAME","KTV")
15
^SCR("P1HZ0","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZ0","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZ0","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZ0","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZ0","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZ0","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZ0","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZ0","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZ0","P","NAME","MAZMIN")
36
^SCR("P1HZ0","P","NAME","MAZMIN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",5)
^SCR("P1HZ0","P","NAME","MAZMIN","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",5)
^SCR("P1HZ0","P","NAME","MIKUD")
28
^SCR("P1HZ0","P","NAME","MKBL")
50
^SCR("P1HZ0","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZ0","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZ0","P","NAME","MKBL1")
52
^SCR("P1HZ0","P","NAME","MSD")
37
^SCR("P1HZ0","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZ0","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZ0","P","NAME","MSD1")
38
^SCR("P1HZ0","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZ0","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZ0","P","NAME","NAME")
10
^SCR("P1HZ0","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZ0","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZ0","P","NAME","NCAB")
72
^SCR("P1HZ0","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZ0","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZ0","P","NAME","NMB")
5
^SCR("P1HZ0","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZ0","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZ0","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZ0","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZ0","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZ0","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZ0","P","NAME","PELE")
7
^SCR("P1HZ0","P","NAME","PELE","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",7)
^SCR("P1HZ0","P","NAME","PELE","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",7)
^SCR("P1HZ0","P","NAME","PSL")
60
^SCR("P1HZ0","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZ0","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZ0","P","NAME","PSL1")
65
^SCR("P1HZ0","P","NAME","SHAA")
34
^SCR("P1HZ0","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZ0","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZ0","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZ0","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZ0","P","NAME","SHUL")
57
^SCR("P1HZ0","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZ0","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZ0","P","NAME","SHULA")
58
^SCR("P1HZ0","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZ0","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZ0","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZ0","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZ0","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZ0","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZ0","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZ0","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZ0","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZ0","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZ0","P","NAME","TM")
71
^SCR("P1HZ0","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZ0","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZ0","P","NAME","TRH")
32
^SCR("P1HZ0","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZ0","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZ0","P","NAME","TSFMHR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",15)
^SCR("P1HZ0","P","NAME","TSFMHR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",15)
^SCR("P1HZ0","P","NAME","TSHL")
56
^SCR("P1HZ0","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZ0","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZ0","P","NAME","ZMANK")
31
^SCR("P1HZ0","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZ0","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZ0","P","NAME","ZMANS")
68
^SCR("P1HZ0","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZ0","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZ0","P","NM",5)
NMB
^SCR("P1HZ0","P","NM",7)
PELE
^SCR("P1HZ0","P","NM",10)
NAME
^SCR("P1HZ0","P","NM",11)
HOVA
^SCR("P1HZ0","P","NM",12)
HZM
^SCR("P1HZ0","P","NM",13)
KHZ
^SCR("P1HZ0","P","NM",14)
HRL
^SCR("P1HZ0","P","NM",15)
KTV
^SCR("P1HZ0","P","NM",16)
BAIT
^SCR("P1HZ0","P","NM",17)
DIRA
^SCR("P1HZ0","P","NM",18)
KOMA
^SCR("P1HZ0","P","NM",19)
CNISA
^SCR("P1HZ0","P","NM",20)
CMNT
^SCR("P1HZ0","P","NM",25)
IR
^SCR("P1HZ0","P","NM",28)
MIKUD
^SCR("P1HZ0","P","NM",30)
HZMLAK
^SCR("P1HZ0","P","NM",31)
ZMANK
^SCR("P1HZ0","P","NM",32)
TRH
^SCR("P1HZ0","P","NM",34)
SHAA
^SCR("P1HZ0","P","NM",35)
DATK
^SCR("P1HZ0","P","NM",36)
MAZMIN
^SCR("P1HZ0","P","NM",37)
MSD
^SCR("P1HZ0","P","NM",38)
MSD1
^SCR("P1HZ0","P","NM",39)
AZOR
^SCR("P1HZ0","P","NM",40)
HNH
^SCR("P1HZ0","P","NM",45)
DMSH
^SCR("P1HZ0","P","NM",50)
MKBL
^SCR("P1HZ0","P","NM",52)
MKBL1
^SCR("P1HZ0","P","NM",53)
HRA2
^SCR("P1HZ0","P","NM",54)
CODTS
^SCR("P1HZ0","P","NM",55)
CODTS1
^SCR("P1HZ0","P","NM",56)
TSHL
^SCR("P1HZ0","P","NM",57)
SHUL
^SCR("P1HZ0","P","NM",58)
SHULA
^SCR("P1HZ0","P","NM",59)
ITRA
^SCR("P1HZ0","P","NM",60)
PSL
^SCR("P1HZ0","P","NM",65)
PSL1
^SCR("P1HZ0","P","NM",66)
ARZ
^SCR("P1HZ0","P","NM",67)
ARZ1
^SCR("P1HZ0","P","NM",68)
ZMANS
^SCR("P1HZ0","P","NM",71)
TM
^SCR("P1HZ0","P","NM",72)
NCAB
^SCR("P1HZ0","P","NM",73)
HSB
^SCR("P1HZ0","P","NM",74)
HSB2
^SCR("P1HZ0","P","NM",75)
HRAED
^SCR("P1HZ0","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZ0","P","REF",1,"RZD")
\
^SCR("P1HZ0","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK\
^SCR("P1HZ0","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZ0","P","REF",2,"RZD")
\
^SCR("P1HZ0","P","REF",2,"STR")
PSL\ZMANS\\\TM\ARZ
^SCR("P1HZ0","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZ0","P","REF",3,"RZD")
\
^SCR("P1HZ0","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL\EMDA\TSFMHR
^SCR("P1HZ0","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZ0","P","REF",4,"RZD")
\\
^SCR("P1HZ0","P","REF",4,"STR")
HRA2\\HODAA\\MSD\\IR\\MAZMIN\\HRAED\\PELE
^SCR("P1HZ00")
H
^SCR("P1HZ00",1)
 {11    }:daeg {                    10}: my  {07       }:ciip {05        }: 'lh
^SCR("P1HZ00",2)
 {               14}:gewl lr dxrd {13  }:gewld ly zepnfd qn  {    12}:'qn dpnfd
^SCR("P1HZ00",3)
 {  19} dqipk  { 18}:dnew   {17  }:dxic {16 }'qn {                    15}: aegx
^SCR("P1HZ00",4)
 {30    }:`zknq` {28  }:cewin {        25}:xir {                      20}: dxrd
^SCR("P1HZ00",5)
  {34  }:dryl {32     }:jix`zl {31            }:dpnfd zlaw onf {35     :dtew 'z
^SCR("P1HZ00",6)
  {      39}:xef`  {                        38} {37: dcrqn {        36}: oinfnd
^SCR("P1HZ00",7)
                                                                             1$
^SCR("P1HZ00",8)
 :        dxrd      :  mekq :zetqez:zenk: xign:     hixt xe`z    :beq:  cew :  
^SCR("P1HZ00",9)
                                                                               
^SCR("P1HZ00",10)
                                                                               
^SCR("P1HZ00",11)
                                                                               
^SCR("P1HZ00",12)
                                                                               
^SCR("P1HZ00",13)
                                                                               
^SCR("P1HZ00",14)
                                                                               
^SCR("P1HZ00",15)
                                                                               
^SCR("P1HZ00",16)
                                                                               
^SCR("P1HZ00",17)
 $1                                                                            
^SCR("P1HZ00",18)
 {            52}:lawnd my {50  }:lawnd 'qn {45  }:gelyn inc {40          :dgpd
^SCR("P1HZ00",19)
      {         55} {54:melyz zxev           {                         53}:dxrd
^SCR("P1HZ00",20)
           {59     }:dxzi        {58     }:dtwd {57     }:mley {56     }:melyzl
^SCR("P1HZ00",21)
  {68  }:xebiy onf  {         67} {66 }: fxe` 'qn {          65} {60 }:gily 'qn
^SCR("P1HZ00",22)
  {74    }:i`xy` oeayg {73    }:oeayg {72    }:dlaw/yg 'qn   {71     }:'n'z 'qn
^SCR("P1HZ00",23)
            {                                                               75}
^SCR("P1HZ00","A",1)
:„�…‡:�™:ƒ‰‰�:'Œˆ
^SCR("P1HZ00","A",2)
:‡…—ŒŒ’„˜’„:‡…—Œ„Œ™š…�Ž†„‘Ž:'‘Ž„�Ž†„
^SCR("P1HZ00","A",3)
„‘‰�‹:„Ž…—:„˜‰ƒ'‘Ž:�…‡˜
^SCR("P1HZ00","A",4)
:€š‹Ž‘€:ƒ…—‰Ž:˜‰’:„˜’„
^SCR("P1HZ00","A",5)
:„’™Œ:Š‰˜€šŒ:„�Ž†„šŒ�—�Ž†:„”…—'š
^SCR("P1HZ00","A",6)
:˜…†€:„ƒ’‘Ž:�‰Ž†Ž„
^SCR("P1HZ00","A",7)

^SCR("P1HZ00","A",8)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€š‚…‘ƒ…—
^SCR("P1HZ00","A",9)
---------------------------------------------------------------------
^SCR("P1HZ00","A",10)

^SCR("P1HZ00","A",11)

^SCR("P1HZ00","A",12)

^SCR("P1HZ00","A",13)

^SCR("P1HZ00","A",14)

^SCR("P1HZ00","A",15)

^SCR("P1HZ00","A",16)

^SCR("P1HZ00","A",17)

^SCR("P1HZ00","A",18)
:Œ�—Ž„�™:Œ�—Ž„'‘Ž:‡…Œ™Ž‰Žƒ:„‡�„
^SCR("P1HZ00","A",19)
:�…Œ™šš˜…–:„˜’„
^SCR("P1HZ00","A",20)
:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZ00","A",21)
:˜…‚‰™�Ž†:†˜…€'‘Ž:‡‰Œ™'‘Ž
^SCR("P1HZ00","A",22)
:‰€˜™€�…�™‡:�…�™‡:„Œ�—/™‡'‘Ž:'Ž'š'‘Ž
^SCR("P1HZ00","A",23)

^SCR("P1HZ00","AV",1)
:vcuj:oa:shhb:wky
^SCR("P1HZ00","AV",2)
:juekkgvrgv:juekvka,ubnzvxn:wxnvbnzv
^SCR("P1HZ00","AV",3)
vxhbf:vnue:vrhswxn:cujr
^SCR("P1HZ00","AV",4)
:t,fnxt:suehn:rhg:vrgv
^SCR("P1HZ00","AV",5)
:vgak:lhrt,k:vbnzv,kceinz:vpuew,
^SCR("P1HZ00","AV",6)
:ruzt:vsgxn:ihnznv
^SCR("P1HZ00","AV",7)

^SCR("P1HZ00","AV",8)
vrgvoufx,upxu,,unfrhjnyhrprut,duxsue
^SCR("P1HZ00","AV",9)
---------------------------------------------------------------------
^SCR("P1HZ00","AV",10)

^SCR("P1HZ00","AV",11)

^SCR("P1HZ00","AV",12)

^SCR("P1HZ00","AV",13)

^SCR("P1HZ00","AV",14)

^SCR("P1HZ00","AV",15)

^SCR("P1HZ00","AV",16)

^SCR("P1HZ00","AV",17)

^SCR("P1HZ00","AV",18)
:kcenvoa:kcenvwxn:jukanhns:vjbv
^SCR("P1HZ00","AV",19)
:ouka,,rum:vrgv
^SCR("P1HZ00","AV",20)
:vr,h:vpev:okua:ouka,k
^SCR("P1HZ00","AV",21)
:rudhainz:zrutwxn:jhkawxn
^SCR("P1HZ00","AV",22)
:htratiucaj:iucaj:vkceqajwxn:wnw,wxn
^SCR("P1HZ00","AV",23)

^SCR("P1HZ00","G",1,"CRD")
9,76,E,6,0
^SCR("P1HZ00","G",1,"FNC")
F9,F10,F8,PGLN,PGRG
^SCR("P1HZ00","G",1,"GLOB")
PAR
^SCR("P1HZ00","G",1,"HELP")
<F2>-dpnfd zbvd,<F10>-zetqez zbvd**<F9>-zetqez;<F7>-dlah;<F6>-my
^SCR("P1HZ00","G",1,"LMAX")
6
^SCR("P1HZ00","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZ00","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZ00","G",1,"MUST")

^SCR("P1HZ00","G",1,"NLN")
20
^SCR("P1HZ00","G",1,"RZD")
**
^SCR("P1HZ00","G",1,"SHEM")
  cew 
^SCR("P1HZ00","G",1,"TOPB")
8
^SCR("P1HZ00","G",1,"TYP")
E
^SCR("P1HZ00","G",1,"VRB")
PAR1
^SCR("P1HZ00","G",2,"CRD")
9,69,E,3,0
^SCR("P1HZ00","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZ00","G",2,"LMAX")
3
^SCR("P1HZ00","G",2,"MUMPS1")

^SCR("P1HZ00","G",2,"MUMPS2")
D SUG^P1HZ
^SCR("P1HZ00","G",2,"OUTPUT")

^SCR("P1HZ00","G",2,"SHEM")
beq
^SCR("P1HZ00","G",2,"TYP")
E
^SCR("P1HZ00","G",3,"CRD")
9,65,H,18,0
^SCR("P1HZ00","G",3,"HELP")

^SCR("P1HZ00","G",3,"LMAX")
18
^SCR("P1HZ00","G",3,"MUMPS1")

^SCR("P1HZ00","G",3,"MUMPS2")

^SCR("P1HZ00","G",3,"OUTPUT")

^SCR("P1HZ00","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZ00","G",3,"TYP")
H
^SCR("P1HZ00","G",4,"CRD")
9,46,N,5,2
^SCR("P1HZ00","G",4,"HELP")

^SCR("P1HZ00","G",4,"LMAX")
5
^SCR("P1HZ00","G",4,"MUMPS1")

^SCR("P1HZ00","G",4,"MUMPS2")
I MH<0 S %SC("ER")=1
^SCR("P1HZ00","G",4,"OUTPUT")

^SCR("P1HZ00","G",4,"SHEM")
 xign
^SCR("P1HZ00","G",4,"TYP")
N
^SCR("P1HZ00","G",5,"CRD")
9,40,N,4,0
^SCR("P1HZ00","G",5,"HELP")

^SCR("P1HZ00","G",5,"LMAX")
4
^SCR("P1HZ00","G",5,"MUMPS1")
D KAM0^P1HZMS ;S:'$G(KAM) KAM=1
^SCR("P1HZ00","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZ00","G",5,"MUST")

^SCR("P1HZ00","G",5,"SHEM")
zenk
^SCR("P1HZ00","G",5,"TYP")
N
^SCR("P1HZ00","G",6,"CRD")
9,35,N,6,2
^SCR("P1HZ00","G",6,"HELP")

^SCR("P1HZ00","G",6,"LMAX")
6
^SCR("P1HZ00","G",6,"MUMPS1")

^SCR("P1HZ00","G",6,"MUMPS2")

^SCR("P1HZ00","G",6,"OUTPUT")

^SCR("P1HZ00","G",6,"SHEM")
zetqez
^SCR("P1HZ00","G",6,"TYP")
N
^SCR("P1HZ00","G",7,"CRD")
9,28,N,7,2
^SCR("P1HZ00","G",7,"HELP")

^SCR("P1HZ00","G",7,"LMAX")
7
^SCR("P1HZ00","G",7,"MUMPS1")

^SCR("P1HZ00","G",7,"MUMPS2")

^SCR("P1HZ00","G",7,"OUTPUT")

^SCR("P1HZ00","G",7,"SHEM")
  mekq 
^SCR("P1HZ00","G",7,"TYP")
N
^SCR("P1HZ00","G",8,"CRD")
9,20,H,18,0
^SCR("P1HZ00","G",8,"HELP")
<F10> - zetqez zbvd , <F9> - zetqez oekcr ,<F7> - zexrd zbvd
^SCR("P1HZ00","G",8,"LMAX")
18
^SCR("P1HZ00","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZ00","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZ00","G",8,"SHEM")
        dxrd      
^SCR("P1HZ00","G",8,"TYP")
H
^SCR("P1HZ00","G","DEL")
Y
^SCR("P1HZ00","G","MAX")
9999
^SCR("P1HZ00","G","NAME","HRP")
8
^SCR("P1HZ00","G","NAME","KAM")
5
^SCR("P1HZ00","G","NAME","MH")
4
^SCR("P1HZ00","G","NAME","PAR")
1
^SCR("P1HZ00","G","NAME","PAR1")
3
^SCR("P1HZ00","G","NAME","SUG")
2
^SCR("P1HZ00","G","NAME","SUM")
7
^SCR("P1HZ00","G","NAME","TSF")
6
^SCR("P1HZ00","G","NM",1)
PAR
^SCR("P1HZ00","G","NM",2)
SUG
^SCR("P1HZ00","G","NM",3)
PAR1
^SCR("P1HZ00","G","NM",4)
MH
^SCR("P1HZ00","G","NM",5)
KAM
^SCR("P1HZ00","G","NM",6)
TSF
^SCR("P1HZ00","G","NM",7)
SUM
^SCR("P1HZ00","G","NM",8)
HRP
^SCR("P1HZ00","G","RB")
8,2,18,79
^SCR("P1HZ00","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZ00","G","RZD")
\
^SCR("P1HZ00","G","STEP")
1
^SCR("P1HZ00","G","STG")
 :        dxrd      :  mekq :zetqez:zenk: xign:     hixt xe`z    :beq:  cew :  
^SCR("P1HZ00","G","VG")
10
^SCR("P1HZ00","NAME")

^SCR("P1HZ00","P",5,"CRD")
1,62,E,11,0
^SCR("P1HZ00","P",5,"HELP")
<F9>-'ayg,'n'z ,dpnfd 'qn itl,<F8>-zaezk itl,<F7>-xtqn itl ,<F6>-my itl yetig
^SCR("P1HZ00","P",5,"LMAX")
11
^SCR("P1HZ00","P",5,"MUMPS1")
S %MSC("S")="0123456789-/"
^SCR("P1HZ00","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1HZ00","P",5,"TYP")
E
^SCR("P1HZ00","P",7,"CRD")
1,45,E,10,0
^SCR("P1HZ00","P",7,"HELP")

^SCR("P1HZ00","P",7,"LMAX")
10
^SCR("P1HZ00","P",7,"MUMPS1")
D PELE0^P1HZ
^SCR("P1HZ00","P",7,"MUMPS2")
D PELE^P1HZ
^SCR("P1HZ00","P",7,"TYP")
E
^SCR("P1HZ00","P",10,"CRD")
1,39,H,23
^SCR("P1HZ00","P",10,"HELP")

^SCR("P1HZ00","P",10,"LMAX")
23
^SCR("P1HZ00","P",10,"MUMPS1")

^SCR("P1HZ00","P",10,"MUMPS2")
S NAME=$TR(NAME,"{}\*","()/X")
^SCR("P1HZ00","P",10,"MUST")

^SCR("P1HZ00","P",10,"TYP")
H
^SCR("P1HZ00","P",11,"CRD")
1,1,N,7,2
^SCR("P1HZ00","P",11,"HELP")

^SCR("P1HZ00","P",11,"LMAX")
7
^SCR("P1HZ00","P",11,"MUMPS1")

^SCR("P1HZ00","P",11,"MUMPS2")

^SCR("P1HZ00","P",11,"OUTPUT")

^SCR("P1HZ00","P",11,"TYP")
N
^SCR("P1HZ00","P",12,"CRD")
2,69,H,7
^SCR("P1HZ00","P",12,"HELP")

^SCR("P1HZ00","P",12,"LMAX")
7
^SCR("P1HZ00","P",12,"MUMPS1")

^SCR("P1HZ00","P",12,"MUMPS2")

^SCR("P1HZ00","P",12,"OUTPUT")

^SCR("P1HZ00","P",12,"TYP")
H
^SCR("P1HZ00","P",13,"CRD")
2,34,N,4,0
^SCR("P1HZ00","P",13,"HELP")

^SCR("P1HZ00","P",13,"LMAX")
5
^SCR("P1HZ00","P",13,"MUMPS1")

^SCR("P1HZ00","P",13,"MUMPS2")

^SCR("P1HZ00","P",13,"OUTPUT")

^SCR("P1HZ00","P",13,"TYP")
N
^SCR("P1HZ00","P",14,"CRD")
2,20,H,18!
^SCR("P1HZ00","P",14,"HELP")

^SCR("P1HZ00","P",14,"LMAX")
18
^SCR("P1HZ00","P",14,"MUMPS1")

^SCR("P1HZ00","P",14,"MUMPS2")

^SCR("P1HZ00","P",14,"OUTPUT")

^SCR("P1HZ00","P",14,"TYP")
H
^SCR("P1HZ00","P",15,"CRD")
3,73,H,20
^SCR("P1HZ00","P",15,"HELP")

^SCR("P1HZ00","P",15,"LMAX")
23
^SCR("P1HZ00","P",15,"MUMPS1")

^SCR("P1HZ00","P",15,"MUMPS2")
S KTV=$TR(KTV,"{}\*","()/X")
^SCR("P1HZ00","P",15,"MUST")

^SCR("P1HZ00","P",15,"TYP")
H
^SCR("P1HZ00","P",16,"CRD")
3,40,E,4,0
^SCR("P1HZ00","P",16,"HELP")

^SCR("P1HZ00","P",16,"LMAX")
4
^SCR("P1HZ00","P",16,"MUMPS1")

^SCR("P1HZ00","P",16,"MUMPS2")
S BAIT=$TR(BAIT,"\","/")
^SCR("P1HZ00","P",16,"MUST")

^SCR("P1HZ00","P",16,"TYP")
E
^SCR("P1HZ00","P",17,"CRD")
3,28,E,4,0
^SCR("P1HZ00","P",17,"HELP")

^SCR("P1HZ00","P",17,"LMAX")
5
^SCR("P1HZ00","P",17,"MUMPS1")

^SCR("P1HZ00","P",17,"MUMPS2")
S DIRA=$TR(DIRA,"\","/")
^SCR("P1HZ00","P",17,"TYP")
E
^SCR("P1HZ00","P",18,"CRD")
3,20,H,4
^SCR("P1HZ00","P",18,"HELP")

^SCR("P1HZ00","P",18,"LMAX")
4
^SCR("P1HZ00","P",18,"MUMPS1")

^SCR("P1HZ00","P",18,"MUMPS2")

^SCR("P1HZ00","P",18,"MUST")

^SCR("P1HZ00","P",18,"TYP")
H
^SCR("P1HZ00","P",19,"CRD")
3,7,H,5
^SCR("P1HZ00","P",19,"HELP")

^SCR("P1HZ00","P",19,"LMAX")
5
^SCR("P1HZ00","P",19,"MUMPS1")

^SCR("P1HZ00","P",19,"MUMPS2")

^SCR("P1HZ00","P",19,"TYP")
H
^SCR("P1HZ00","P",20,"CRD")
4,73,H,25!
^SCR("P1HZ00","P",20,"HELP")

^SCR("P1HZ00","P",20,"LMAX")
25
^SCR("P1HZ00","P",20,"MUMPS1")

^SCR("P1HZ00","P",20,"MUMPS2")

^SCR("P1HZ00","P",20,"TYP")
H
^SCR("P1HZ00","P",25,"CRD")
4,42,H,11
^SCR("P1HZ00","P",25,"HELP")
<F7> - mixr zniyx
^SCR("P1HZ00","P",25,"LMAX")
11
^SCR("P1HZ00","P",25,"MUMPS1")
D IR0^P1HZ
^SCR("P1HZ00","P",25,"MUMPS2")
D IR^P1HZ
^SCR("P1HZ00","P",25,"TYP")
H
^SCR("P1HZ00","P",28,"CRD")
4,17,E,5,0
^SCR("P1HZ00","P",28,"HELP")

^SCR("P1HZ00","P",28,"LMAX")
5
^SCR("P1HZ00","P",28,"MUMPS1")

^SCR("P1HZ00","P",28,"MUMPS2")

^SCR("P1HZ00","P",28,"TYP")
E
^SCR("P1HZ00","P",30,"CRD")
4,1,E,7,0
^SCR("P1HZ00","P",30,"HELP")

^SCR("P1HZ00","P",30,"LMAX")
7
^SCR("P1HZ00","P",30,"MUMPS1")
S %SCO="TRH" S NNN1=15
^SCR("P1HZ00","P",30,"MUMPS2")

^SCR("P1HZ00","P",30,"TYP")
E
^SCR("P1HZ00","P",31,"CRD")
5,31,E,15,0
^SCR("P1HZ00","P",31,"HELP")

^SCR("P1HZ00","P",31,"LMAX")
15
^SCR("P1HZ00","P",31,"MUMPS1")
I $G(ZMANK)?.P S ZMANK=$ZD($H,"DD.MM.YY  24:60")
^SCR("P1HZ00","P",31,"MUMPS2")

^SCR("P1HZ00","P",31,"OUTPUT")

^SCR("P1HZ00","P",31,"TYP")
E
^SCR("P1HZ00","P",32,"CRD")
5,14,D,8,0
^SCR("P1HZ00","P",32,"HELP")

^SCR("P1HZ00","P",32,"LMAX")
8
^SCR("P1HZ00","P",32,"MUMPS1")
S TRHOLD=$G(TRH) S:$G(TRH)?.P TRH=$$^%L1DC($H,1) S %SCN="IR,MIKUD"
^SCR("P1HZ00","P",32,"MUMPS2")
I $$^%L1DC(TRH,3)<$H S %SC("ER")=1
^SCR("P1HZ00","P",32,"MUST")

^SCR("P1HZ00","P",32,"TYP")
D
^SCR("P1HZ00","P",34,"CRD")
5,2,T,5,0
^SCR("P1HZ00","P",34,"HELP")
<HOME> - dycg dpnfd ligzdl , <F9> - gewl qihxk geztl  , <F8> - dxrd 
^SCR("P1HZ00","P",34,"LMAX")
5
^SCR("P1HZ00","P",34,"MUMPS1")
D SHAA^P1HZ
^SCR("P1HZ00","P",34,"MUMPS2")
D SHAA2^P1HZ
^SCR("P1HZ00","P",34,"TYP")
T
^SCR("P1HZ00","P",35,"CRD")
5,63,D,8,0
^SCR("P1HZ00","P",35,"HELP")

^SCR("P1HZ00","P",35,"LMAX")
8
^SCR("P1HZ00","P",35,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZ00","P",35,"MUMPS2")

^SCR("P1HZ00","P",35,"OUTPUT")

^SCR("P1HZ00","P",35,"TYP")
D
^SCR("P1HZ00","P",36,"CRD")
6,71,H,11
^SCR("P1HZ00","P",36,"HELP")

^SCR("P1HZ00","P",36,"LMAX")
11
^SCR("P1HZ00","P",36,"MUMPS1")

^SCR("P1HZ00","P",36,"MUMPS2")

^SCR("P1HZ00","P",36,"TYP")
H
^SCR("P1HZ00","P",37,"CHECK")
Y
^SCR("P1HZ00","P",37,"CRD")
6,48,N,3,0
^SCR("P1HZ00","P",37,"FNC")
PGLN
^SCR("P1HZ00","P",37,"GLOB")
P1MSD
^SCR("P1HZ00","P",37,"HELP")
<CTRL+L> - zncew dpnfdn wizrdl ,<F7> - dbvd ,<F6> - my itl yetig
^SCR("P1HZ00","P",37,"LMAX")
3
^SCR("P1HZ00","P",37,"MUMPS1")

^SCR("P1HZ00","P",37,"MUMPS2")
D MSD^P1HZ
^SCR("P1HZ00","P",37,"MUST")

^SCR("P1HZ00","P",37,"NLN")
20
^SCR("P1HZ00","P",37,"RZD")
\
^SCR("P1HZ00","P",37,"TOPB")
8
^SCR("P1HZ00","P",37,"TYP")
N
^SCR("P1HZ00","P",37,"VRB")
MSD1
^SCR("P1HZ00","P",38,"CRD")
6,47,H,27
^SCR("P1HZ00","P",38,"HELP")

^SCR("P1HZ00","P",38,"LMAX")
27
^SCR("P1HZ00","P",38,"MUMPS1")

^SCR("P1HZ00","P",38,"MUMPS2")

^SCR("P1HZ00","P",38,"OUTPUT")

^SCR("P1HZ00","P",38,"TYP")
H
^SCR("P1HZ00","P",39,"CRD")
6,12,H,9
^SCR("P1HZ00","P",39,"HELP")

^SCR("P1HZ00","P",39,"LMAX")
9
^SCR("P1HZ00","P",39,"MUMPS1")

^SCR("P1HZ00","P",39,"MUMPS2")

^SCR("P1HZ00","P",39,"OUTPUT")

^SCR("P1HZ00","P",39,"TYP")
H
^SCR("P1HZ00","P",40,"CRD")
18,61,E,13,0
^SCR("P1HZ00","P",40,"HELP")

^SCR("P1HZ00","P",40,"LMAX")
13
^SCR("P1HZ00","P",40,"MUMPS1")

^SCR("P1HZ00","P",40,"MUMPS2")
D HNH^P1HZ
^SCR("P1HZ00","P",40,"TYP")
E
^SCR("P1HZ00","P",45,"CRD")
18,44,N,5,1
^SCR("P1HZ00","P",45,"HELP")

^SCR("P1HZ00","P",45,"LMAX")
5
^SCR("P1HZ00","P",45,"MUMPS1")

^SCR("P1HZ00","P",45,"MUMPS2")
D DMSH^P1HZ
^SCR("P1HZ00","P",45,"TYP")
N
^SCR("P1HZ00","P",50,"CHECK")
Y
^SCR("P1HZ00","P",50,"CRD")
18,27,E,5.,0
^SCR("P1HZ00","P",50,"FNC")

^SCR("P1HZ00","P",50,"GLOB")
NAME
^SCR("P1HZ00","P",50,"HELP")
<F7> - micaer zbvd
^SCR("P1HZ00","P",50,"LMAX")
5
^SCR("P1HZ00","P",50,"MUMPS1")
K %SCO I '$G(MKBL) S MKBL=$G(^P1PRM("MKBL",$P),$G(^P1PRM("MKBL"))) S:MKBL %L1GET=""
^SCR("P1HZ00","P",50,"MUMPS2")
D MKBL^P1HZ
^SCR("P1HZ00","P",50,"MUST")

^SCR("P1HZ00","P",50,"NLN")
20
^SCR("P1HZ00","P",50,"RZD")
\
^SCR("P1HZ00","P",50,"TOPB")
8
^SCR("P1HZ00","P",50,"TYP")
E
^SCR("P1HZ00","P",50,"VRB")
MKBL1
^SCR("P1HZ00","P",52,"CRD")
18,17,H,15
^SCR("P1HZ00","P",52,"HELP")

^SCR("P1HZ00","P",52,"LMAX")
15
^SCR("P1HZ00","P",52,"MUMPS1")

^SCR("P1HZ00","P",52,"MUMPS2")

^SCR("P1HZ00","P",52,"OUTPUT")

^SCR("P1HZ00","P",52,"TYP")
H
^SCR("P1HZ00","P",53,"CRD")
19,74,H,28!
^SCR("P1HZ00","P",53,"HELP")
<F8> - mixeviw zniyx , <F7> - zexrd zniyx , <F6> - my itl dxrd yetig
^SCR("P1HZ00","P",53,"LMAX")
28
^SCR("P1HZ00","P",53,"MUMPS1")

^SCR("P1HZ00","P",53,"MUMPS2")
D ^P1HRA2("HRA2",%OLDTO)
^SCR("P1HZ00","P",53,"OUTPUT")

^SCR("P1HZ00","P",53,"TYP")
H
^SCR("P1HZ00","P",54,"CHECK")
Y
^SCR("P1HZ00","P",54,"CRD")
19,20,E,1,0
^SCR("P1HZ00","P",54,"FNC")

^SCR("P1HZ00","P",54,"GLOB")
^P1CODTS
^SCR("P1HZ00","P",54,"HELP")
<F9> - gewl qihxk bivdl 
^SCR("P1HZ00","P",54,"LMAX")
3
^SCR("P1HZ00","P",54,"MUMPS1")
S %SCN="HRA2" I $G(CODTS) S CODTS1=$G(^P1CODTS(CODTS)) D P1^%L1SCSAY("CODTS1")
^SCR("P1HZ00","P",54,"MUMPS2")
D CODTS^P1HZ
^SCR("P1HZ00","P",54,"MUST")

^SCR("P1HZ00","P",54,"NLN")
20
^SCR("P1HZ00","P",54,"RZD")
\
^SCR("P1HZ00","P",54,"TOPB")
8
^SCR("P1HZ00","P",54,"TYP")
E
^SCR("P1HZ00","P",54,"VRB")
CODTS1
^SCR("P1HZ00","P",55,"CRD")
19,19,H,12
^SCR("P1HZ00","P",55,"HELP")

^SCR("P1HZ00","P",55,"LMAX")
12
^SCR("P1HZ00","P",55,"MUMPS1")

^SCR("P1HZ00","P",55,"MUMPS2")

^SCR("P1HZ00","P",55,"OUTPUT")

^SCR("P1HZ00","P",55,"TYP")
H
^SCR("P1HZ00","P",56,"CRD")
20,63,N,8,2
^SCR("P1HZ00","P",56,"HELP")

^SCR("P1HZ00","P",56,"LMAX")
8
^SCR("P1HZ00","P",56,"MUMPS1")

^SCR("P1HZ00","P",56,"MUMPS2")

^SCR("P1HZ00","P",56,"OUTPUT")

^SCR("P1HZ00","P",56,"TYP")
N
^SCR("P1HZ00","P",57,"CRD")
20,48,N,8,2
^SCR("P1HZ00","P",57,"HELP")

^SCR("P1HZ00","P",57,"LMAX")
8
^SCR("P1HZ00","P",57,"MUMPS1")

^SCR("P1HZ00","P",57,"MUMPS2")

^SCR("P1HZ00","P",57,"OUTPUT")

^SCR("P1HZ00","P",57,"TYP")
N
^SCR("P1HZ00","P",58,"CRD")
20,33,N,8,2
^SCR("P1HZ00","P",58,"HELP")

^SCR("P1HZ00","P",58,"LMAX")
8
^SCR("P1HZ00","P",58,"MUMPS1")

^SCR("P1HZ00","P",58,"MUMPS2")

^SCR("P1HZ00","P",58,"OUTPUT")

^SCR("P1HZ00","P",58,"TYP")
N
^SCR("P1HZ00","P",59,"CRD")
20,11,N,8,2
^SCR("P1HZ00","P",59,"HELP")

^SCR("P1HZ00","P",59,"LMAX")
8
^SCR("P1HZ00","P",59,"MUMPS1")

^SCR("P1HZ00","P",59,"MUMPS2")

^SCR("P1HZ00","P",59,"OUTPUT")

^SCR("P1HZ00","P",59,"TYP")
N
^SCR("P1HZ00","P",60,"CHECK")
Y
^SCR("P1HZ00","P",60,"CRD")
21,65,E,3,0
^SCR("P1HZ00","P",60,"CREAT")

^SCR("P1HZ00","P",60,"FNC")

^SCR("P1HZ00","P",60,"GLOB")
P1SL
^SCR("P1HZ00","P",60,"HELP")

^SCR("P1HZ00","P",60,"LMAX")
4
^SCR("P1HZ00","P",60,"MUMPS1")

^SCR("P1HZ00","P",60,"MUMPS2")

^SCR("P1HZ00","P",60,"MUST")

^SCR("P1HZ00","P",60,"NLN")
20
^SCR("P1HZ00","P",60,"NS")
migily zlah 
^SCR("P1HZ00","P",60,"RZD")
\
^SCR("P1HZ00","P",60,"TOPB")
8
^SCR("P1HZ00","P",60,"TYP")
E
^SCR("P1HZ00","P",60,"VRB")
PSL1
^SCR("P1HZ00","P",65,"CRD")
21,64,H,13
^SCR("P1HZ00","P",65,"HELP")

^SCR("P1HZ00","P",65,"LMAX")
13
^SCR("P1HZ00","P",65,"MUMPS1")

^SCR("P1HZ00","P",65,"MUMPS2")

^SCR("P1HZ00","P",65,"OUTPUT")

^SCR("P1HZ00","P",65,"TYP")
H
^SCR("P1HZ00","P",66,"CHECK")
Y
^SCR("P1HZ00","P",66,"CRD")
21,34,E,4,0
^SCR("P1HZ00","P",66,"CREAT")

^SCR("P1HZ00","P",66,"FNC")

^SCR("P1HZ00","P",66,"GLOB")
P1ARZ
^SCR("P1HZ00","P",66,"HELP")

^SCR("P1HZ00","P",66,"LMAX")
4
^SCR("P1HZ00","P",66,"MUMPS1")

^SCR("P1HZ00","P",66,"MUMPS2")

^SCR("P1HZ00","P",66,"NLN")
20
^SCR("P1HZ00","P",66,"NS")
mifxe` zlah
^SCR("P1HZ00","P",66,"RZD")
\
^SCR("P1HZ00","P",66,"TOPB")
8
^SCR("P1HZ00","P",66,"TYP")
E
^SCR("P1HZ00","P",66,"VRB")
ARZ1
^SCR("P1HZ00","P",67,"CRD")
21,33,H,12
^SCR("P1HZ00","P",67,"HELP")

^SCR("P1HZ00","P",67,"LMAX")
12
^SCR("P1HZ00","P",67,"MUMPS1")

^SCR("P1HZ00","P",67,"MUMPS2")

^SCR("P1HZ00","P",67,"OUTPUT")

^SCR("P1HZ00","P",67,"TYP")
H
^SCR("P1HZ00","P",68,"CRD")
21,2,T,5,0
^SCR("P1HZ00","P",68,"HELP")

^SCR("P1HZ00","P",68,"LMAX")
5
^SCR("P1HZ00","P",68,"MUMPS1")
D INT^%T I '$G(ZMANS) S ZMANS=$TR($J($P(%TIM,":"),2)," ",0)_":"_$TR($J($P(%TIM,":",2),2)," ",0)
^SCR("P1HZ00","P",68,"MUMPS2")

^SCR("P1HZ00","P",68,"TYP")
T
^SCR("P1HZ00","P",71,"CRD")
22,61,E,7,0
^SCR("P1HZ00","P",71,"HELP")

^SCR("P1HZ00","P",71,"LMAX")
8
^SCR("P1HZ00","P",71,"MUMPS1")

^SCR("P1HZ00","P",71,"MUMPS2")

^SCR("P1HZ00","P",71,"OUTPUT")

^SCR("P1HZ00","P",71,"TYP")
E
^SCR("P1HZ00","P",72,"CRD")
22,38,E,7,0
^SCR("P1HZ00","P",72,"HELP")

^SCR("P1HZ00","P",72,"LMAX")
7
^SCR("P1HZ00","P",72,"MUMPS1")

^SCR("P1HZ00","P",72,"MUMPS2")

^SCR("P1HZ00","P",72,"OUTPUT")

^SCR("P1HZ00","P",72,"TYP")
E
^SCR("P1HZ00","P",73,"CRD")
22,23,E,7,0
^SCR("P1HZ00","P",73,"HELP")

^SCR("P1HZ00","P",73,"LMAX")
7
^SCR("P1HZ00","P",73,"MUMPS1")

^SCR("P1HZ00","P",73,"MUMPS2")

^SCR("P1HZ00","P",73,"OUTPUT")

^SCR("P1HZ00","P",73,"TYP")
E
^SCR("P1HZ00","P",74,"CRD")
22,2,E,7,0
^SCR("P1HZ00","P",74,"HELP")

^SCR("P1HZ00","P",74,"LMAX")
7
^SCR("P1HZ00","P",74,"MUMPS1")

^SCR("P1HZ00","P",74,"MUMPS2")

^SCR("P1HZ00","P",74,"OUTPUT")

^SCR("P1HZ00","P",74,"TYP")
E
^SCR("P1HZ00","P",75,"CRD")
23,79,H,66
^SCR("P1HZ00","P",75,"HELP")

^SCR("P1HZ00","P",75,"LMAX")
66
^SCR("P1HZ00","P",75,"MUMPS1")

^SCR("P1HZ00","P",75,"MUMPS2")

^SCR("P1HZ00","P",75,"OUTPUT")

^SCR("P1HZ00","P",75,"TYP")
H
^SCR("P1HZ00","P","NAME","ARZ")
66
^SCR("P1HZ00","P","NAME","ARZ","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",6)
^SCR("P1HZ00","P","NAME","ARZ","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",6)
^SCR("P1HZ00","P","NAME","ARZ1")
67
^SCR("P1HZ00","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZ00","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZ00","P","NAME","AZOR")
39
^SCR("P1HZ00","P","NAME","BAIT")
16
^SCR("P1HZ00","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZ00","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZ00","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZ00","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZ00","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZ00","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZ00","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZ00","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZ00","P","NAME","CMNT")
20
^SCR("P1HZ00","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZ00","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZ00","P","NAME","CNISA")
19
^SCR("P1HZ00","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZ00","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZ00","P","NAME","CODTS")
54
^SCR("P1HZ00","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZ00","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZ00","P","NAME","CODTS1")
55
^SCR("P1HZ00","P","NAME","DATK")
35
^SCR("P1HZ00","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZ00","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZ00","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZ00","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZ00","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZ00","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZ00","P","NAME","DIRA")
17
^SCR("P1HZ00","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZ00","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZ00","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZ00","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZ00","P","NAME","DMSH")
45
^SCR("P1HZ00","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZ00","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZ00","P","NAME","HNH")
40
^SCR("P1HZ00","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZ00","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZ00","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZ00","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZ00","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZ00","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZ00","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZ00","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZ00","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZ00","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZ00","P","NAME","HOVA")
11
^SCR("P1HZ00","P","NAME","HRA2")
53
^SCR("P1HZ00","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZ00","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZ00","P","NAME","HRAED")
75
^SCR("P1HZ00","P","NAME","HRAED","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",6)
^SCR("P1HZ00","P","NAME","HRAED","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",6)
^SCR("P1HZ00","P","NAME","HRL")
14
^SCR("P1HZ00","P","NAME","HSB")
73
^SCR("P1HZ00","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZ00","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZ00","P","NAME","HSB2")
74
^SCR("P1HZ00","P","NAME","HZM")
12
^SCR("P1HZ00","P","NAME","HZM","KEY")

^SCR("P1HZ00","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK,
^SCR("P1HZ00","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM,ARZ
^SCR("P1HZ00","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL
^SCR("P1HZ00","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD,,IR,,MAZMIN,,HRAED,,PELE
^SCR("P1HZ00","P","NAME","HZMLAK")
30
^SCR("P1HZ00","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZ00","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZ00","P","NAME","IR")
25
^SCR("P1HZ00","P","NAME","IR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",4)
^SCR("P1HZ00","P","NAME","IR","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",4)
^SCR("P1HZ00","P","NAME","ITRA")
59
^SCR("P1HZ00","P","NAME","KHZ")
13
^SCR("P1HZ00","P","NAME","KOMA")
18
^SCR("P1HZ00","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZ00","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZ00","P","NAME","KTV")
15
^SCR("P1HZ00","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZ00","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZ00","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZ00","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZ00","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZ00","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZ00","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZ00","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZ00","P","NAME","MAZMIN")
36
^SCR("P1HZ00","P","NAME","MAZMIN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",5)
^SCR("P1HZ00","P","NAME","MAZMIN","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",5)
^SCR("P1HZ00","P","NAME","MIKUD")
28
^SCR("P1HZ00","P","NAME","MKBL")
50
^SCR("P1HZ00","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZ00","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZ00","P","NAME","MKBL1")
52
^SCR("P1HZ00","P","NAME","MSD")
37
^SCR("P1HZ00","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZ00","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZ00","P","NAME","MSD1")
38
^SCR("P1HZ00","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZ00","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZ00","P","NAME","NAME")
10
^SCR("P1HZ00","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZ00","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZ00","P","NAME","NCAB")
72
^SCR("P1HZ00","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZ00","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZ00","P","NAME","NMB")
5
^SCR("P1HZ00","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZ00","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZ00","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZ00","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZ00","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZ00","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZ00","P","NAME","PELE")
7
^SCR("P1HZ00","P","NAME","PELE","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",7)
^SCR("P1HZ00","P","NAME","PELE","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",7)
^SCR("P1HZ00","P","NAME","PSL")
60
^SCR("P1HZ00","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZ00","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZ00","P","NAME","PSL1")
65
^SCR("P1HZ00","P","NAME","SHAA")
34
^SCR("P1HZ00","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZ00","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZ00","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZ00","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZ00","P","NAME","SHUL")
57
^SCR("P1HZ00","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZ00","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZ00","P","NAME","SHULA")
58
^SCR("P1HZ00","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZ00","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZ00","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZ00","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZ00","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZ00","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZ00","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZ00","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZ00","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZ00","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZ00","P","NAME","TM")
71
^SCR("P1HZ00","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZ00","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZ00","P","NAME","TRH")
32
^SCR("P1HZ00","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZ00","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZ00","P","NAME","TSHL")
56
^SCR("P1HZ00","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZ00","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZ00","P","NAME","ZMANK")
31
^SCR("P1HZ00","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZ00","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZ00","P","NAME","ZMANS")
68
^SCR("P1HZ00","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZ00","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZ00","P","NM",5)
NMB
^SCR("P1HZ00","P","NM",7)
PELE
^SCR("P1HZ00","P","NM",10)
NAME
^SCR("P1HZ00","P","NM",11)
HOVA
^SCR("P1HZ00","P","NM",12)
HZM
^SCR("P1HZ00","P","NM",13)
KHZ
^SCR("P1HZ00","P","NM",14)
HRL
^SCR("P1HZ00","P","NM",15)
KTV
^SCR("P1HZ00","P","NM",16)
BAIT
^SCR("P1HZ00","P","NM",17)
DIRA
^SCR("P1HZ00","P","NM",18)
KOMA
^SCR("P1HZ00","P","NM",19)
CNISA
^SCR("P1HZ00","P","NM",20)
CMNT
^SCR("P1HZ00","P","NM",25)
IR
^SCR("P1HZ00","P","NM",28)
MIKUD
^SCR("P1HZ00","P","NM",30)
HZMLAK
^SCR("P1HZ00","P","NM",31)
ZMANK
^SCR("P1HZ00","P","NM",32)
TRH
^SCR("P1HZ00","P","NM",34)
SHAA
^SCR("P1HZ00","P","NM",35)
DATK
^SCR("P1HZ00","P","NM",36)
MAZMIN
^SCR("P1HZ00","P","NM",37)
MSD
^SCR("P1HZ00","P","NM",38)
MSD1
^SCR("P1HZ00","P","NM",39)
AZOR
^SCR("P1HZ00","P","NM",40)
HNH
^SCR("P1HZ00","P","NM",45)
DMSH
^SCR("P1HZ00","P","NM",50)
MKBL
^SCR("P1HZ00","P","NM",52)
MKBL1
^SCR("P1HZ00","P","NM",53)
HRA2
^SCR("P1HZ00","P","NM",54)
CODTS
^SCR("P1HZ00","P","NM",55)
CODTS1
^SCR("P1HZ00","P","NM",56)
TSHL
^SCR("P1HZ00","P","NM",57)
SHUL
^SCR("P1HZ00","P","NM",58)
SHULA
^SCR("P1HZ00","P","NM",59)
ITRA
^SCR("P1HZ00","P","NM",60)
PSL
^SCR("P1HZ00","P","NM",65)
PSL1
^SCR("P1HZ00","P","NM",66)
ARZ
^SCR("P1HZ00","P","NM",67)
ARZ1
^SCR("P1HZ00","P","NM",68)
ZMANS
^SCR("P1HZ00","P","NM",71)
TM
^SCR("P1HZ00","P","NM",72)
NCAB
^SCR("P1HZ00","P","NM",73)
HSB
^SCR("P1HZ00","P","NM",74)
HSB2
^SCR("P1HZ00","P","NM",75)
HRAED
^SCR("P1HZ00","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZ00","P","REF",1,"RZD")
\
^SCR("P1HZ00","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK\
^SCR("P1HZ00","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZ00","P","REF",2,"RZD")
\
^SCR("P1HZ00","P","REF",2,"STR")
PSL\ZMANS\\\TM\ARZ
^SCR("P1HZ00","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZ00","P","REF",3,"RZD")
\
^SCR("P1HZ00","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL
^SCR("P1HZ00","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZ00","P","REF",4,"RZD")
\\
^SCR("P1HZ00","P","REF",4,"STR")
HRA2\\HODAA\\MSD\\IR\\MAZMIN\\HRAED\\PELE
^SCR("P1HZ3")
H
^SCR("P1HZ3",1)
 {11    }:daeg {                    10}: my {07        }:ciip {05        }: 'lh
^SCR("P1HZ3",2)
 {               14}:gewl lr dxrd {13  }:gewld ly zepnfd qn  {12    }:'qn dpnfd
^SCR("P1HZ3",3)
 {  19} dqipk  { 18}:dnew   {17  }:dxic {16 }'qn {                    15}: aegx
^SCR("P1HZ3",4)
 {30    }:`zknq` {28  }:cewin {        25}:xir {                      20}: dxrd
^SCR("P1HZ3",5)
  {34  }:dryl {32     }:jix`zl {31            }:dpnfd zlaw onf {35     :dtew 'z
^SCR("P1HZ3",6)
  {    39}:  xef`  {                        38} {37: dcrqn {        36}: oinfnd
^SCR("P1HZ3",7)
                                                                             1$
^SCR("P1HZ3",8)
 :     dxrd    :  mekq :zetqez: zenk : xign :     hixt xe`z    :  :   cew  :   
^SCR("P1HZ3",9)
                                                                               
^SCR("P1HZ3",10)
                                                                               
^SCR("P1HZ3",11)
                                                                               
^SCR("P1HZ3",12)
                                                                               
^SCR("P1HZ3",13)
                                                                               
^SCR("P1HZ3",14)
                                                                               
^SCR("P1HZ3",15)
                                                                               
^SCR("P1HZ3",16)
                                                                               
^SCR("P1HZ3",17)
 $1                                                                            
^SCR("P1HZ3",18)
 {            52}:lawnd my {50  }:lawnd 'qn {45  }:gelyn inc {40          :dgpd
^SCR("P1HZ3",19)
      {         55} {54:melyz zxev           {                         53}:dxrd
^SCR("P1HZ3",20)
           {59     }:dxzi        {58     }:dtwd {57     }:mley {56     }:melyzl
^SCR("P1HZ3",21)
              {68  }:xebiy onf {                     65}:gily my {60 }:gily 'qn
^SCR("P1HZ3",22)
  {74    }:i`xy` oeayg {73    }:oeayg {72    }:dlaw/yg 'qn   {71     }:'n'z 'qn
^SCR("P1HZ3",23)
            {                                                               75}
^SCR("P1HZ3","A",1)
:„�…‡:�™:ƒ‰‰�:'Œˆ
^SCR("P1HZ3","A",2)
:‡…—ŒŒ’„˜’„:‡…—Œ„Œ™š…�Ž†„‘Ž:'‘Ž„�Ž†„
^SCR("P1HZ3","A",3)
„‘‰�‹:„Ž…—:„˜‰ƒ'‘Ž:�…‡˜
^SCR("P1HZ3","A",4)
:€š‹Ž‘€:ƒ…—‰Ž:˜‰’:„˜’„
^SCR("P1HZ3","A",5)
:„’™Œ:Š‰˜€šŒ:„�Ž†„šŒ�—�Ž†:„”…—'š
^SCR("P1HZ3","A",6)
:˜…†€:„ƒ’‘Ž:�‰Ž†Ž„
^SCR("P1HZ3","A",7)

^SCR("P1HZ3","A",8)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1HZ3","A",9)
---------------------------------------------------------------------
^SCR("P1HZ3","A",10)

^SCR("P1HZ3","A",11)

^SCR("P1HZ3","A",12)

^SCR("P1HZ3","A",13)

^SCR("P1HZ3","A",14)

^SCR("P1HZ3","A",15)

^SCR("P1HZ3","A",16)

^SCR("P1HZ3","A",17)

^SCR("P1HZ3","A",18)
:Œ�—Ž„�™:Œ�—Ž„'‘Ž:‡…Œ™Ž‰Žƒ:„‡�„
^SCR("P1HZ3","A",19)
:�…Œ™šš˜…–:„˜’„
^SCR("P1HZ3","A",20)
:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZ3","A",21)
:˜…‚‰™�Ž†:‡‰Œ™�™:‡‰Œ™'‘Ž
^SCR("P1HZ3","A",22)
:‰€˜™€�…�™‡:�…�™‡:„Œ�—/™‡'‘Ž:'Ž'š'‘Ž
^SCR("P1HZ3","A",23)

^SCR("P1HZ3","AV",1)
:vcuj:oa:shhb:wky
^SCR("P1HZ3","AV",2)
:juekkgvrgv:juekvka,ubnzvxn:wxnvbnzv
^SCR("P1HZ3","AV",3)
vxhbf:vnue:vrhswxn:cujr
^SCR("P1HZ3","AV",4)
:t,fnxt:suehn:rhg:vrgv
^SCR("P1HZ3","AV",5)
:vgak:lhrt,k:vbnzv,kceinz:vpuew,
^SCR("P1HZ3","AV",6)
:ruzt:vsgxn:ihnznv
^SCR("P1HZ3","AV",7)

^SCR("P1HZ3","AV",8)
vrgvoufx,upxu,,unfrhjnyhrprut,sue
^SCR("P1HZ3","AV",9)
---------------------------------------------------------------------
^SCR("P1HZ3","AV",10)

^SCR("P1HZ3","AV",11)

^SCR("P1HZ3","AV",12)

^SCR("P1HZ3","AV",13)

^SCR("P1HZ3","AV",14)

^SCR("P1HZ3","AV",15)

^SCR("P1HZ3","AV",16)

^SCR("P1HZ3","AV",17)

^SCR("P1HZ3","AV",18)
:kcenvoa:kcenvwxn:jukanhns:vjbv
^SCR("P1HZ3","AV",19)
:ouka,,rum:vrgv
^SCR("P1HZ3","AV",20)
:vr,h:vpev:okua:ouka,k
^SCR("P1HZ3","AV",21)
:rudhainz:jhkaoa:jhkawxn
^SCR("P1HZ3","AV",22)
:htratiucaj:iucaj:vkceqajwxn:wnw,wxn
^SCR("P1HZ3","AV",23)

^SCR("P1HZ3","G",1,"CRD")
9,75,E,8,0
^SCR("P1HZ3","G",1,"FNC")
F9,F10,F8,PGLN,PGRG
^SCR("P1HZ3","G",1,"GLOB")
PAR
^SCR("P1HZ3","G",1,"HELP")
<F2>-dpnfd zbvd,<F10>-zetqez zbvd**<F9>-zetqez;<F7>-dlah;<F6>-my
^SCR("P1HZ3","G",1,"LMAX")
8
^SCR("P1HZ3","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZ3","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZ3","G",1,"MUST")

^SCR("P1HZ3","G",1,"NLN")
20
^SCR("P1HZ3","G",1,"RZD")
**
^SCR("P1HZ3","G",1,"SHEM")
   cew  
^SCR("P1HZ3","G",1,"TOPB")
8
^SCR("P1HZ3","G",1,"TYP")
E
^SCR("P1HZ3","G",1,"VRB")
PAR1
^SCR("P1HZ3","G",2,"CRD")
9,66,E,2,0
^SCR("P1HZ3","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZ3","G",2,"LMAX")
2
^SCR("P1HZ3","G",2,"MUMPS1")

^SCR("P1HZ3","G",2,"MUMPS2")
D SUG^P1HZ
^SCR("P1HZ3","G",2,"OUTPUT")

^SCR("P1HZ3","G",2,"SHEM")
  
^SCR("P1HZ3","G",2,"TYP")
E
^SCR("P1HZ3","G",3,"CRD")
9,63,H,18,0
^SCR("P1HZ3","G",3,"HELP")

^SCR("P1HZ3","G",3,"LMAX")
18
^SCR("P1HZ3","G",3,"MUMPS1")

^SCR("P1HZ3","G",3,"MUMPS2")

^SCR("P1HZ3","G",3,"OUTPUT")

^SCR("P1HZ3","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZ3","G",3,"TYP")
H
^SCR("P1HZ3","G",4,"CRD")
9,44,N,6,2
^SCR("P1HZ3","G",4,"HELP")

^SCR("P1HZ3","G",4,"LMAX")
6
^SCR("P1HZ3","G",4,"MUMPS1")

^SCR("P1HZ3","G",4,"MUMPS2")
I MH<0 S %SC("ER")=1
^SCR("P1HZ3","G",4,"OUTPUT")

^SCR("P1HZ3","G",4,"SHEM")
 xign 
^SCR("P1HZ3","G",4,"TYP")
N
^SCR("P1HZ3","G",5,"CRD")
9,37,N,6,3
^SCR("P1HZ3","G",5,"HELP")

^SCR("P1HZ3","G",5,"LMAX")
6
^SCR("P1HZ3","G",5,"MUMPS1")
D KAM0^P1HZMS ;S:'$G(KAM) KAM=1
^SCR("P1HZ3","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZ3","G",5,"MUST")

^SCR("P1HZ3","G",5,"SHEM")
 zenk 
^SCR("P1HZ3","G",5,"TYP")
N
^SCR("P1HZ3","G",6,"CRD")
9,30,N,6,2
^SCR("P1HZ3","G",6,"HELP")

^SCR("P1HZ3","G",6,"LMAX")
6
^SCR("P1HZ3","G",6,"MUMPS1")

^SCR("P1HZ3","G",6,"MUMPS2")

^SCR("P1HZ3","G",6,"OUTPUT")

^SCR("P1HZ3","G",6,"SHEM")
zetqez
^SCR("P1HZ3","G",6,"TYP")
N
^SCR("P1HZ3","G",7,"CRD")
9,23,N,7,2
^SCR("P1HZ3","G",7,"HELP")

^SCR("P1HZ3","G",7,"LMAX")
7
^SCR("P1HZ3","G",7,"MUMPS1")

^SCR("P1HZ3","G",7,"MUMPS2")

^SCR("P1HZ3","G",7,"OUTPUT")

^SCR("P1HZ3","G",7,"SHEM")
  mekq 
^SCR("P1HZ3","G",7,"TYP")
N
^SCR("P1HZ3","G",8,"CRD")
9,15,H,13/26,0
^SCR("P1HZ3","G",8,"HELP")
<F10> - zetqez zbvd , <F9> - zetqez oekcr ,<F7> - zexrd zbvd
^SCR("P1HZ3","G",8,"LMAX")
13
^SCR("P1HZ3","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZ3","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZ3","G",8,"SHEM")
     dxrd    
^SCR("P1HZ3","G",8,"TYP")
H
^SCR("P1HZ3","G","DEL")
Y
^SCR("P1HZ3","G","MAX")
9999
^SCR("P1HZ3","G","NAME","HRP")
8
^SCR("P1HZ3","G","NAME","KAM")
5
^SCR("P1HZ3","G","NAME","MH")
4
^SCR("P1HZ3","G","NAME","PAR")
1
^SCR("P1HZ3","G","NAME","PAR1")
3
^SCR("P1HZ3","G","NAME","SUG")
2
^SCR("P1HZ3","G","NAME","SUM")
7
^SCR("P1HZ3","G","NAME","TSF")
6
^SCR("P1HZ3","G","NM",1)
PAR
^SCR("P1HZ3","G","NM",2)
SUG
^SCR("P1HZ3","G","NM",3)
PAR1
^SCR("P1HZ3","G","NM",4)
MH
^SCR("P1HZ3","G","NM",5)
KAM
^SCR("P1HZ3","G","NM",6)
TSF
^SCR("P1HZ3","G","NM",7)
SUM
^SCR("P1HZ3","G","NM",8)
HRP
^SCR("P1HZ3","G","RB")
8,2,18,79
^SCR("P1HZ3","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZ3","G","RZD")
\
^SCR("P1HZ3","G","STEP")
1
^SCR("P1HZ3","G","STG")
 :     dxrd    :  mekq :zetqez: zenk : xign :     hixt xe`z    :  :   cew  :   
^SCR("P1HZ3","G","VG")
10
^SCR("P1HZ3","NAME")

^SCR("P1HZ3","P",5,"CRD")
1,62,E,11,0
^SCR("P1HZ3","P",5,"HELP")
<F9>-'ayg,'n'z ,dpnfd 'qn itl,<F8>-zaezk itl,<F7>-xtqn itl ,<F6>-my itl yetig
^SCR("P1HZ3","P",5,"LMAX")
11
^SCR("P1HZ3","P",5,"MUMPS1")
S %MSC("S")="0123456789-/"
^SCR("P1HZ3","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1HZ3","P",5,"TYP")
E
^SCR("P1HZ3","P",7,"CRD")
1,44,E,11,0
^SCR("P1HZ3","P",7,"HELP")

^SCR("P1HZ3","P",7,"LMAX")
11
^SCR("P1HZ3","P",7,"MUMPS1")
D PELE0^P1HZ
^SCR("P1HZ3","P",7,"MUMPS2")
D PELE^P1HZ
^SCR("P1HZ3","P",7,"TYP")
E
^SCR("P1HZ3","P",10,"CRD")
1,39,H,23
^SCR("P1HZ3","P",10,"HELP")

^SCR("P1HZ3","P",10,"LMAX")
23
^SCR("P1HZ3","P",10,"MUMPS1")

^SCR("P1HZ3","P",10,"MUMPS2")
S NAME=$TR(NAME,"{}\*","()/X")
^SCR("P1HZ3","P",10,"MUST")

^SCR("P1HZ3","P",10,"TYP")
H
^SCR("P1HZ3","P",11,"CRD")
1,1,N,7,2
^SCR("P1HZ3","P",11,"HELP")

^SCR("P1HZ3","P",11,"LMAX")
7
^SCR("P1HZ3","P",11,"MUMPS1")

^SCR("P1HZ3","P",11,"MUMPS2")

^SCR("P1HZ3","P",11,"OUTPUT")

^SCR("P1HZ3","P",11,"TYP")
N
^SCR("P1HZ3","P",12,"CRD")
2,61,E,7,0
^SCR("P1HZ3","P",12,"HELP")

^SCR("P1HZ3","P",12,"LMAX")
7
^SCR("P1HZ3","P",12,"MUMPS1")

^SCR("P1HZ3","P",12,"MUMPS2")

^SCR("P1HZ3","P",12,"OUTPUT")

^SCR("P1HZ3","P",12,"TYP")
E
^SCR("P1HZ3","P",13,"CRD")
2,34,N,4,0
^SCR("P1HZ3","P",13,"HELP")

^SCR("P1HZ3","P",13,"LMAX")
5
^SCR("P1HZ3","P",13,"MUMPS1")

^SCR("P1HZ3","P",13,"MUMPS2")

^SCR("P1HZ3","P",13,"OUTPUT")

^SCR("P1HZ3","P",13,"TYP")
N
^SCR("P1HZ3","P",14,"CRD")
2,20,H,18
^SCR("P1HZ3","P",14,"HELP")

^SCR("P1HZ3","P",14,"LMAX")
18
^SCR("P1HZ3","P",14,"MUMPS1")

^SCR("P1HZ3","P",14,"MUMPS2")

^SCR("P1HZ3","P",14,"OUTPUT")

^SCR("P1HZ3","P",14,"TYP")
H
^SCR("P1HZ3","P",15,"CRD")
3,73,H,20
^SCR("P1HZ3","P",15,"HELP")

^SCR("P1HZ3","P",15,"LMAX")
23
^SCR("P1HZ3","P",15,"MUMPS1")

^SCR("P1HZ3","P",15,"MUMPS2")
S KTV=$TR(KTV,"{}\*","()/X")
^SCR("P1HZ3","P",15,"MUST")

^SCR("P1HZ3","P",15,"TYP")
H
^SCR("P1HZ3","P",16,"CRD")
3,40,E,4,0
^SCR("P1HZ3","P",16,"HELP")

^SCR("P1HZ3","P",16,"LMAX")
4
^SCR("P1HZ3","P",16,"MUMPS1")

^SCR("P1HZ3","P",16,"MUMPS2")

^SCR("P1HZ3","P",16,"MUST")

^SCR("P1HZ3","P",16,"TYP")
E
^SCR("P1HZ3","P",17,"CRD")
3,28,E,4,0
^SCR("P1HZ3","P",17,"HELP")

^SCR("P1HZ3","P",17,"LMAX")
5
^SCR("P1HZ3","P",17,"MUMPS1")

^SCR("P1HZ3","P",17,"MUMPS2")

^SCR("P1HZ3","P",17,"TYP")
E
^SCR("P1HZ3","P",18,"CRD")
3,20,H,4
^SCR("P1HZ3","P",18,"HELP")

^SCR("P1HZ3","P",18,"LMAX")
4
^SCR("P1HZ3","P",18,"MUMPS1")

^SCR("P1HZ3","P",18,"MUMPS2")

^SCR("P1HZ3","P",18,"MUST")

^SCR("P1HZ3","P",18,"TYP")
H
^SCR("P1HZ3","P",19,"CRD")
3,7,H,5
^SCR("P1HZ3","P",19,"HELP")

^SCR("P1HZ3","P",19,"LMAX")
5
^SCR("P1HZ3","P",19,"MUMPS1")

^SCR("P1HZ3","P",19,"MUMPS2")

^SCR("P1HZ3","P",19,"TYP")
H
^SCR("P1HZ3","P",20,"CRD")
4,73,H,25!/36
^SCR("P1HZ3","P",20,"HELP")

^SCR("P1HZ3","P",20,"LMAX")
25
^SCR("P1HZ3","P",20,"MUMPS1")

^SCR("P1HZ3","P",20,"MUMPS2")

^SCR("P1HZ3","P",20,"TYP")
H
^SCR("P1HZ3","P",25,"CRD")
4,42,H,11
^SCR("P1HZ3","P",25,"HELP")
<F7> - mixr zniyx
^SCR("P1HZ3","P",25,"LMAX")
11
^SCR("P1HZ3","P",25,"MUMPS1")
D IR0^P1HZ
^SCR("P1HZ3","P",25,"MUMPS2")
D IR^P1HZ
^SCR("P1HZ3","P",25,"TYP")
H
^SCR("P1HZ3","P",28,"CRD")
4,17,E,5,0
^SCR("P1HZ3","P",28,"HELP")

^SCR("P1HZ3","P",28,"LMAX")
5
^SCR("P1HZ3","P",28,"MUMPS1")

^SCR("P1HZ3","P",28,"MUMPS2")

^SCR("P1HZ3","P",28,"TYP")
E
^SCR("P1HZ3","P",30,"CRD")
4,1,E,7,0
^SCR("P1HZ3","P",30,"HELP")

^SCR("P1HZ3","P",30,"LMAX")
7
^SCR("P1HZ3","P",30,"MUMPS1")
S %SCO="TRH" S NNN1=15
^SCR("P1HZ3","P",30,"MUMPS2")

^SCR("P1HZ3","P",30,"TYP")
E
^SCR("P1HZ3","P",31,"CRD")
5,31,E,15,0
^SCR("P1HZ3","P",31,"HELP")

^SCR("P1HZ3","P",31,"LMAX")
15
^SCR("P1HZ3","P",31,"MUMPS1")
I $G(ZMANK)?.P D INT^%T S ZMANK=$$^%L1DC($H,1)_"  "_%TIM
^SCR("P1HZ3","P",31,"MUMPS2")
D ZMANK0^P1HZMS
^SCR("P1HZ3","P",31,"OUTPUT")

^SCR("P1HZ3","P",31,"TYP")
E
^SCR("P1HZ3","P",32,"CRD")
5,14,D,8,0
^SCR("P1HZ3","P",32,"HELP")

^SCR("P1HZ3","P",32,"LMAX")
8
^SCR("P1HZ3","P",32,"MUMPS1")
S:$G(TRH)?.P TRH=$$^%L1DC($H,1) S %SCN="IR,MIKUD"
^SCR("P1HZ3","P",32,"MUMPS2")
I $$^%L1DC(TRH,3)<$H S %SC("ER")=1
^SCR("P1HZ3","P",32,"MUST")

^SCR("P1HZ3","P",32,"TYP")
D
^SCR("P1HZ3","P",34,"CRD")
5,2,T,5,0
^SCR("P1HZ3","P",34,"HELP")
<HOME> - dycg dpnfd ligzdl , <F9> - gewl qihxk geztl  , <F8> - dxrd 
^SCR("P1HZ3","P",34,"LMAX")
5
^SCR("P1HZ3","P",34,"MUMPS1")
D SHAA^P1HZ
^SCR("P1HZ3","P",34,"MUMPS2")
D SHAA2^P1HZ
^SCR("P1HZ3","P",34,"TYP")
T
^SCR("P1HZ3","P",35,"CRD")
5,63,D,8,0
^SCR("P1HZ3","P",35,"HELP")

^SCR("P1HZ3","P",35,"LMAX")
8
^SCR("P1HZ3","P",35,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZ3","P",35,"MUMPS2")

^SCR("P1HZ3","P",35,"OUTPUT")

^SCR("P1HZ3","P",35,"TYP")
D
^SCR("P1HZ3","P",36,"CRD")
6,71,H,11
^SCR("P1HZ3","P",36,"HELP")

^SCR("P1HZ3","P",36,"LMAX")
11
^SCR("P1HZ3","P",36,"MUMPS1")

^SCR("P1HZ3","P",36,"MUMPS2")

^SCR("P1HZ3","P",36,"TYP")
H
^SCR("P1HZ3","P",37,"CHECK")
Y
^SCR("P1HZ3","P",37,"CRD")
6,48,N,3,0
^SCR("P1HZ3","P",37,"FNC")
PGLN
^SCR("P1HZ3","P",37,"GLOB")
P1MSD
^SCR("P1HZ3","P",37,"HELP")
<CTRL+L> - zncew dpnfdn wizrdl ,<F7> - dbvd ,<F6> - my itl yetig
^SCR("P1HZ3","P",37,"LMAX")
3
^SCR("P1HZ3","P",37,"MUMPS1")

^SCR("P1HZ3","P",37,"MUMPS2")
D MSD^P1HZ
^SCR("P1HZ3","P",37,"MUST")

^SCR("P1HZ3","P",37,"NLN")
20
^SCR("P1HZ3","P",37,"RZD")
\
^SCR("P1HZ3","P",37,"TOPB")
8
^SCR("P1HZ3","P",37,"TYP")
N
^SCR("P1HZ3","P",37,"VRB")
MSD1
^SCR("P1HZ3","P",38,"CRD")
6,47,H,27
^SCR("P1HZ3","P",38,"HELP")

^SCR("P1HZ3","P",38,"LMAX")
27
^SCR("P1HZ3","P",38,"MUMPS1")

^SCR("P1HZ3","P",38,"MUMPS2")

^SCR("P1HZ3","P",38,"OUTPUT")

^SCR("P1HZ3","P",38,"TYP")
H
^SCR("P1HZ3","P",39,"CRD")
6,10,H,7
^SCR("P1HZ3","P",39,"HELP")

^SCR("P1HZ3","P",39,"LMAX")
7
^SCR("P1HZ3","P",39,"MUMPS1")

^SCR("P1HZ3","P",39,"MUMPS2")

^SCR("P1HZ3","P",39,"OUTPUT")

^SCR("P1HZ3","P",39,"TYP")
H
^SCR("P1HZ3","P",40,"CRD")
18,61,E,13,0
^SCR("P1HZ3","P",40,"HELP")

^SCR("P1HZ3","P",40,"LMAX")
13
^SCR("P1HZ3","P",40,"MUMPS1")

^SCR("P1HZ3","P",40,"MUMPS2")
D HNHM^P1HZ
^SCR("P1HZ3","P",40,"TYP")
E
^SCR("P1HZ3","P",45,"CRD")
18,44,N,5,1
^SCR("P1HZ3","P",45,"HELP")

^SCR("P1HZ3","P",45,"LMAX")
5
^SCR("P1HZ3","P",45,"MUMPS1")

^SCR("P1HZ3","P",45,"MUMPS2")
D DMSH^P1HZ
^SCR("P1HZ3","P",45,"TYP")
N
^SCR("P1HZ3","P",50,"CHECK")
Y
^SCR("P1HZ3","P",50,"CRD")
18,27,E,5.,0
^SCR("P1HZ3","P",50,"FNC")

^SCR("P1HZ3","P",50,"GLOB")
NAME
^SCR("P1HZ3","P",50,"HELP")
<F7> - micaer zbvd
^SCR("P1HZ3","P",50,"LMAX")
5
^SCR("P1HZ3","P",50,"MUMPS1")
K %SCO I '$G(MKBL) S MKBL=$G(^P1PRM("MKBL",$P),$G(^P1PRM("MKBL"))) S:MKBL %L1GET=""
^SCR("P1HZ3","P",50,"MUMPS2")
D MKBL^P1HZ
^SCR("P1HZ3","P",50,"MUST")

^SCR("P1HZ3","P",50,"NLN")
20
^SCR("P1HZ3","P",50,"RZD")
\
^SCR("P1HZ3","P",50,"TOPB")
8
^SCR("P1HZ3","P",50,"TYP")
E
^SCR("P1HZ3","P",50,"VRB")
MKBL1
^SCR("P1HZ3","P",52,"CRD")
18,17,H,15
^SCR("P1HZ3","P",52,"HELP")

^SCR("P1HZ3","P",52,"LMAX")
15
^SCR("P1HZ3","P",52,"MUMPS1")

^SCR("P1HZ3","P",52,"MUMPS2")

^SCR("P1HZ3","P",52,"OUTPUT")

^SCR("P1HZ3","P",52,"TYP")
H
^SCR("P1HZ3","P",53,"CRD")
19,74,H,28
^SCR("P1HZ3","P",53,"HELP")
<F8> - mixeviw zniyx , <F7> - zexrd zniyx , <F6> - my itl dxrd yetig
^SCR("P1HZ3","P",53,"LMAX")
28
^SCR("P1HZ3","P",53,"MUMPS1")

^SCR("P1HZ3","P",53,"MUMPS2")
D ^P1HRA2("HRA2",%OLDTO)
^SCR("P1HZ3","P",53,"OUTPUT")

^SCR("P1HZ3","P",53,"TYP")
H
^SCR("P1HZ3","P",54,"CHECK")
Y
^SCR("P1HZ3","P",54,"CRD")
19,20,E,1,0
^SCR("P1HZ3","P",54,"FNC")

^SCR("P1HZ3","P",54,"GLOB")
^P1CODTS
^SCR("P1HZ3","P",54,"HELP")
<F9> - gewl qihxk bivdl 
^SCR("P1HZ3","P",54,"LMAX")
3
^SCR("P1HZ3","P",54,"MUMPS1")
S %SCN="HRA2" I $G(CODTS) S CODTS1=$G(^P1CODTS(CODTS)) D P1^%L1SCSAY("CODTS1")
^SCR("P1HZ3","P",54,"MUMPS2")
D CODTS^P1HZ
^SCR("P1HZ3","P",54,"MUST")

^SCR("P1HZ3","P",54,"NLN")
20
^SCR("P1HZ3","P",54,"RZD")
\
^SCR("P1HZ3","P",54,"TOPB")
8
^SCR("P1HZ3","P",54,"TYP")
E
^SCR("P1HZ3","P",54,"VRB")
CODTS1
^SCR("P1HZ3","P",55,"CRD")
19,19,H,12
^SCR("P1HZ3","P",55,"HELP")

^SCR("P1HZ3","P",55,"LMAX")
12
^SCR("P1HZ3","P",55,"MUMPS1")

^SCR("P1HZ3","P",55,"MUMPS2")

^SCR("P1HZ3","P",55,"OUTPUT")

^SCR("P1HZ3","P",55,"TYP")
H
^SCR("P1HZ3","P",56,"CRD")
20,63,N,8,2
^SCR("P1HZ3","P",56,"HELP")

^SCR("P1HZ3","P",56,"LMAX")
8
^SCR("P1HZ3","P",56,"MUMPS1")

^SCR("P1HZ3","P",56,"MUMPS2")

^SCR("P1HZ3","P",56,"OUTPUT")

^SCR("P1HZ3","P",56,"TYP")
N
^SCR("P1HZ3","P",57,"CRD")
20,48,N,8,2
^SCR("P1HZ3","P",57,"HELP")

^SCR("P1HZ3","P",57,"LMAX")
8
^SCR("P1HZ3","P",57,"MUMPS1")

^SCR("P1HZ3","P",57,"MUMPS2")

^SCR("P1HZ3","P",57,"OUTPUT")

^SCR("P1HZ3","P",57,"TYP")
N
^SCR("P1HZ3","P",58,"CRD")
20,33,N,8,2
^SCR("P1HZ3","P",58,"HELP")

^SCR("P1HZ3","P",58,"LMAX")
8
^SCR("P1HZ3","P",58,"MUMPS1")

^SCR("P1HZ3","P",58,"MUMPS2")

^SCR("P1HZ3","P",58,"OUTPUT")

^SCR("P1HZ3","P",58,"TYP")
N
^SCR("P1HZ3","P",59,"CRD")
20,11,N,8,2
^SCR("P1HZ3","P",59,"HELP")

^SCR("P1HZ3","P",59,"LMAX")
8
^SCR("P1HZ3","P",59,"MUMPS1")

^SCR("P1HZ3","P",59,"MUMPS2")

^SCR("P1HZ3","P",59,"OUTPUT")

^SCR("P1HZ3","P",59,"TYP")
N
^SCR("P1HZ3","P",60,"CHECK")
Y
^SCR("P1HZ3","P",60,"CRD")
21,65,E,3,0
^SCR("P1HZ3","P",60,"CREAT")

^SCR("P1HZ3","P",60,"FNC")

^SCR("P1HZ3","P",60,"GLOB")
P1SL
^SCR("P1HZ3","P",60,"HELP")

^SCR("P1HZ3","P",60,"LMAX")
4
^SCR("P1HZ3","P",60,"MUMPS1")

^SCR("P1HZ3","P",60,"MUMPS2")

^SCR("P1HZ3","P",60,"MUST")

^SCR("P1HZ3","P",60,"NLN")
20
^SCR("P1HZ3","P",60,"NS")
migily zlah 
^SCR("P1HZ3","P",60,"RZD")
\
^SCR("P1HZ3","P",60,"TOPB")
8
^SCR("P1HZ3","P",60,"TYP")
E
^SCR("P1HZ3","P",60,"VRB")
PSL1
^SCR("P1HZ3","P",65,"CRD")
21,56,H,24
^SCR("P1HZ3","P",65,"HELP")

^SCR("P1HZ3","P",65,"LMAX")
24
^SCR("P1HZ3","P",65,"MUMPS1")

^SCR("P1HZ3","P",65,"MUMPS2")

^SCR("P1HZ3","P",65,"OUTPUT")

^SCR("P1HZ3","P",65,"TYP")
H
^SCR("P1HZ3","P",68,"CRD")
21,14,T,5,0
^SCR("P1HZ3","P",68,"HELP")

^SCR("P1HZ3","P",68,"LMAX")
5
^SCR("P1HZ3","P",68,"MUMPS1")
D INT^%T I '$G(ZMANS) S ZMANS=$TR($J($P(%TIM,":"),2)," ",0)_":"_$TR($J($P(%TIM,":",2),2)," ",0)
^SCR("P1HZ3","P",68,"MUMPS2")

^SCR("P1HZ3","P",68,"TYP")
T
^SCR("P1HZ3","P",71,"CRD")
22,61,E,7,0
^SCR("P1HZ3","P",71,"HELP")

^SCR("P1HZ3","P",71,"LMAX")
8
^SCR("P1HZ3","P",71,"MUMPS1")

^SCR("P1HZ3","P",71,"MUMPS2")

^SCR("P1HZ3","P",71,"OUTPUT")

^SCR("P1HZ3","P",71,"TYP")
E
^SCR("P1HZ3","P",72,"CRD")
22,38,E,7,0
^SCR("P1HZ3","P",72,"HELP")

^SCR("P1HZ3","P",72,"LMAX")
7
^SCR("P1HZ3","P",72,"MUMPS1")

^SCR("P1HZ3","P",72,"MUMPS2")

^SCR("P1HZ3","P",72,"OUTPUT")

^SCR("P1HZ3","P",72,"TYP")
E
^SCR("P1HZ3","P",73,"CRD")
22,23,E,7,0
^SCR("P1HZ3","P",73,"HELP")

^SCR("P1HZ3","P",73,"LMAX")
7
^SCR("P1HZ3","P",73,"MUMPS1")

^SCR("P1HZ3","P",73,"MUMPS2")

^SCR("P1HZ3","P",73,"OUTPUT")

^SCR("P1HZ3","P",73,"TYP")
E
^SCR("P1HZ3","P",74,"CRD")
22,2,E,7,0
^SCR("P1HZ3","P",74,"HELP")

^SCR("P1HZ3","P",74,"LMAX")
7
^SCR("P1HZ3","P",74,"MUMPS1")

^SCR("P1HZ3","P",74,"MUMPS2")

^SCR("P1HZ3","P",74,"OUTPUT")

^SCR("P1HZ3","P",74,"TYP")
E
^SCR("P1HZ3","P",75,"CRD")
23,79,H,66
^SCR("P1HZ3","P",75,"HELP")

^SCR("P1HZ3","P",75,"LMAX")
66
^SCR("P1HZ3","P",75,"MUMPS1")

^SCR("P1HZ3","P",75,"MUMPS2")

^SCR("P1HZ3","P",75,"OUTPUT")

^SCR("P1HZ3","P",75,"TYP")
H
^SCR("P1HZ3","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZ3","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZ3","P","NAME","AZOR")
39
^SCR("P1HZ3","P","NAME","BAIT")
16
^SCR("P1HZ3","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZ3","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZ3","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZ3","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZ3","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZ3","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZ3","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZ3","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZ3","P","NAME","CMNT")
20
^SCR("P1HZ3","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZ3","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZ3","P","NAME","CNISA")
19
^SCR("P1HZ3","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZ3","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZ3","P","NAME","CODTS")
54
^SCR("P1HZ3","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZ3","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZ3","P","NAME","CODTS1")
55
^SCR("P1HZ3","P","NAME","DATK")
35
^SCR("P1HZ3","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZ3","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZ3","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZ3","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZ3","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZ3","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZ3","P","NAME","DIRA")
17
^SCR("P1HZ3","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZ3","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZ3","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZ3","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZ3","P","NAME","DMSH")
45
^SCR("P1HZ3","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZ3","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZ3","P","NAME","EMDA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",14)
^SCR("P1HZ3","P","NAME","EMDA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",14)
^SCR("P1HZ3","P","NAME","HNH")
40
^SCR("P1HZ3","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZ3","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZ3","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZ3","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZ3","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZ3","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZ3","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZ3","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZ3","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZ3","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZ3","P","NAME","HOVA")
11
^SCR("P1HZ3","P","NAME","HRA2")
53
^SCR("P1HZ3","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZ3","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZ3","P","NAME","HRAED")
75
^SCR("P1HZ3","P","NAME","HRAED","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",6)
^SCR("P1HZ3","P","NAME","HRAED","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",6)
^SCR("P1HZ3","P","NAME","HRL")
14
^SCR("P1HZ3","P","NAME","HSB")
73
^SCR("P1HZ3","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZ3","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZ3","P","NAME","HSB2")
74
^SCR("P1HZ3","P","NAME","HZM")
12
^SCR("P1HZ3","P","NAME","HZM","KEY")

^SCR("P1HZ3","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK,
^SCR("P1HZ3","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZ3","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL,EMDA,TSFMHR
^SCR("P1HZ3","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD,,IR,,MAZMIN,,HRAED,,PELE
^SCR("P1HZ3","P","NAME","HZMLAK")
30
^SCR("P1HZ3","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZ3","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZ3","P","NAME","IR")
25
^SCR("P1HZ3","P","NAME","IR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",4)
^SCR("P1HZ3","P","NAME","IR","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",4)
^SCR("P1HZ3","P","NAME","ITRA")
59
^SCR("P1HZ3","P","NAME","KHZ")
13
^SCR("P1HZ3","P","NAME","KOMA")
18
^SCR("P1HZ3","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZ3","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZ3","P","NAME","KTV")
15
^SCR("P1HZ3","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZ3","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZ3","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZ3","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZ3","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZ3","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZ3","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZ3","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZ3","P","NAME","MAZMIN")
36
^SCR("P1HZ3","P","NAME","MAZMIN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",5)
^SCR("P1HZ3","P","NAME","MAZMIN","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",5)
^SCR("P1HZ3","P","NAME","MIKUD")
28
^SCR("P1HZ3","P","NAME","MKBL")
50
^SCR("P1HZ3","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZ3","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZ3","P","NAME","MKBL1")
52
^SCR("P1HZ3","P","NAME","MSD")
37
^SCR("P1HZ3","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZ3","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZ3","P","NAME","MSD1")
38
^SCR("P1HZ3","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZ3","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZ3","P","NAME","NAME")
10
^SCR("P1HZ3","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZ3","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZ3","P","NAME","NCAB")
72
^SCR("P1HZ3","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZ3","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZ3","P","NAME","NMB")
5
^SCR("P1HZ3","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZ3","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZ3","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZ3","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZ3","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZ3","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZ3","P","NAME","PELE")
7
^SCR("P1HZ3","P","NAME","PELE","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",7)
^SCR("P1HZ3","P","NAME","PELE","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",7)
^SCR("P1HZ3","P","NAME","PSL")
60
^SCR("P1HZ3","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZ3","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZ3","P","NAME","PSL1")
65
^SCR("P1HZ3","P","NAME","SHAA")
34
^SCR("P1HZ3","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZ3","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZ3","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZ3","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZ3","P","NAME","SHUL")
57
^SCR("P1HZ3","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZ3","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZ3","P","NAME","SHULA")
58
^SCR("P1HZ3","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZ3","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZ3","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZ3","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZ3","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZ3","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZ3","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZ3","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZ3","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZ3","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZ3","P","NAME","TM")
71
^SCR("P1HZ3","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZ3","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZ3","P","NAME","TRH")
32
^SCR("P1HZ3","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZ3","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZ3","P","NAME","TSFMHR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",15)
^SCR("P1HZ3","P","NAME","TSFMHR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",15)
^SCR("P1HZ3","P","NAME","TSHL")
56
^SCR("P1HZ3","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZ3","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZ3","P","NAME","ZMANK")
31
^SCR("P1HZ3","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZ3","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZ3","P","NAME","ZMANS")
68
^SCR("P1HZ3","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZ3","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZ3","P","NM",5)
NMB
^SCR("P1HZ3","P","NM",7)
PELE
^SCR("P1HZ3","P","NM",10)
NAME
^SCR("P1HZ3","P","NM",11)
HOVA
^SCR("P1HZ3","P","NM",12)
HZM
^SCR("P1HZ3","P","NM",13)
KHZ
^SCR("P1HZ3","P","NM",14)
HRL
^SCR("P1HZ3","P","NM",15)
KTV
^SCR("P1HZ3","P","NM",16)
BAIT
^SCR("P1HZ3","P","NM",17)
DIRA
^SCR("P1HZ3","P","NM",18)
KOMA
^SCR("P1HZ3","P","NM",19)
CNISA
^SCR("P1HZ3","P","NM",20)
CMNT
^SCR("P1HZ3","P","NM",25)
IR
^SCR("P1HZ3","P","NM",28)
MIKUD
^SCR("P1HZ3","P","NM",30)
HZMLAK
^SCR("P1HZ3","P","NM",31)
ZMANK
^SCR("P1HZ3","P","NM",32)
TRH
^SCR("P1HZ3","P","NM",34)
SHAA
^SCR("P1HZ3","P","NM",35)
DATK
^SCR("P1HZ3","P","NM",36)
MAZMIN
^SCR("P1HZ3","P","NM",37)
MSD
^SCR("P1HZ3","P","NM",38)
MSD1
^SCR("P1HZ3","P","NM",39)
AZOR
^SCR("P1HZ3","P","NM",40)
HNH
^SCR("P1HZ3","P","NM",45)
DMSH
^SCR("P1HZ3","P","NM",50)
MKBL
^SCR("P1HZ3","P","NM",52)
MKBL1
^SCR("P1HZ3","P","NM",53)
HRA2
^SCR("P1HZ3","P","NM",54)
CODTS
^SCR("P1HZ3","P","NM",55)
CODTS1
^SCR("P1HZ3","P","NM",56)
TSHL
^SCR("P1HZ3","P","NM",57)
SHUL
^SCR("P1HZ3","P","NM",58)
SHULA
^SCR("P1HZ3","P","NM",59)
ITRA
^SCR("P1HZ3","P","NM",60)
PSL
^SCR("P1HZ3","P","NM",65)
PSL1
^SCR("P1HZ3","P","NM",68)
ZMANS
^SCR("P1HZ3","P","NM",71)
TM
^SCR("P1HZ3","P","NM",72)
NCAB
^SCR("P1HZ3","P","NM",73)
HSB
^SCR("P1HZ3","P","NM",74)
HSB2
^SCR("P1HZ3","P","NM",75)
HRAED
^SCR("P1HZ3","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZ3","P","REF",1,"RZD")
\
^SCR("P1HZ3","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK\
^SCR("P1HZ3","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZ3","P","REF",2,"RZD")
\
^SCR("P1HZ3","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZ3","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZ3","P","REF",3,"RZD")
\
^SCR("P1HZ3","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL\EMDA\TSFMHR
^SCR("P1HZ3","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZ3","P","REF",4,"RZD")
\\
^SCR("P1HZ3","P","REF",4,"STR")
HRA2\\HODAA\\MSD\\IR\\MAZMIN\\HRAED\\PELE
^SCR("P1HZCA")
H
^SCR("P1HZCA",1)
                            # zepnfd itl `"k g"ec #                            
^SCR("P1HZCA",2)
                    {10      } jix`z cr    {05     }: jix`zn                   
^SCR("P1HZCA",3)
                    {20      } dpnfd cr    {15     }: dpnfdn                   
^SCR("P1HZCA",4)
                                                                             1$
^SCR("P1HZCA",5)
  :  mekq  : `"k beq :       `"k 'qn     :dwqr 'qn: dry :  jix`z :dpnfd 'qn:   
^SCR("P1HZCA",6)
                                                                               
^SCR("P1HZCA",7)
                                                                               
^SCR("P1HZCA",8)
                                                                               
^SCR("P1HZCA",9)
                                                                               
^SCR("P1HZCA",10)
                                                                               
^SCR("P1HZCA",11)
                                                                               
^SCR("P1HZCA",12)
                                                                               
^SCR("P1HZCA",13)
                                                                               
^SCR("P1HZCA",14)
                                                                               
^SCR("P1HZCA",15)
                                                                               
^SCR("P1HZCA",16)
                                                                               
^SCR("P1HZCA",17)
                                                                               
^SCR("P1HZCA",18)
                                                                               
^SCR("P1HZCA",19)
                                                                               
^SCR("P1HZCA",20)
                                                                               
^SCR("P1HZCA",21)
 $1                                                                            
^SCR("P1HZCA",22)
        {35      : qxpiic k"dq  {30      : dfie k"dq {25      : hxk`xyi k"dq   
^SCR("P1HZCA",23)
        {50      :    `"k k"dq  {45      : `tl` k"dq {40      :.qw` .n` k"dq   
^SCR("P1HZCA","A",1)
š…�Ž†„‰”Œ€"‹‡"…ƒ
^SCR("P1HZCA","A",2)
Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1HZCA","A",3)
„�Ž†„ƒ’:„�Ž†„Ž
^SCR("P1HZCA","A",4)

^SCR("P1HZCA","A",5)
�…‹‘€"‹‚…‘€"‹'‘Ž„—‘’'‘Ž„’™Š‰˜€š„�Ž†„'‘Ž
^SCR("P1HZCA","A",6)
---------------------------------------------------------------------
^SCR("P1HZCA","A",7)

^SCR("P1HZCA","A",8)

^SCR("P1HZCA","A",9)

^SCR("P1HZCA","A",10)

^SCR("P1HZCA","A",11)

^SCR("P1HZCA","A",12)

^SCR("P1HZCA","A",13)

^SCR("P1HZCA","A",14)

^SCR("P1HZCA","A",15)

^SCR("P1HZCA","A",16)

^SCR("P1HZCA","A",17)

^SCR("P1HZCA","A",18)

^SCR("P1HZCA","A",19)

^SCR("P1HZCA","A",20)

^SCR("P1HZCA","A",21)

^SCR("P1HZCA","A",22)
:‘˜�‰‰ƒ‹"„‘:„†‰…‹"„‘:ˆ˜‹€˜™‰‹"„‘
^SCR("P1HZCA","A",23)
:€"‹‹"„‘:€”Œ€‹"„‘:.‘—€.Ž€‹"„‘
^SCR("P1HZCA","AV",1)
,ubnzvhpkt"fj"us
^SCR("P1HZCA","AV",2)
lhrt,sg:lhrt,n
^SCR("P1HZCA","AV",3)
vbnzvsg:vbnzvn
^SCR("P1HZCA","AV",4)

^SCR("P1HZCA","AV",5)
oufxt"fduxt"fwxnvexgwxnvgalhrt,vbnzvwxn
^SCR("P1HZCA","AV",6)
---------------------------------------------------------------------
^SCR("P1HZCA","AV",7)

^SCR("P1HZCA","AV",8)

^SCR("P1HZCA","AV",9)

^SCR("P1HZCA","AV",10)

^SCR("P1HZCA","AV",11)

^SCR("P1HZCA","AV",12)

^SCR("P1HZCA","AV",13)

^SCR("P1HZCA","AV",14)

^SCR("P1HZCA","AV",15)

^SCR("P1HZCA","AV",16)

^SCR("P1HZCA","AV",17)

^SCR("P1HZCA","AV",18)

^SCR("P1HZCA","AV",19)

^SCR("P1HZCA","AV",20)

^SCR("P1HZCA","AV",21)

^SCR("P1HZCA","AV",22)
:xrbhhsf"vx:vzhuf"vx:yrftrahf"vx
^SCR("P1HZCA","AV",23)
:t"ff"vx:tpktf"vx:/xet/ntf"vx
^SCR("P1HZCA","G",1,"CRD")
6,75,E,9,0
^SCR("P1HZCA","G",1,"HELP")
<F9> - dpnfd bivdl 
^SCR("P1HZCA","G",1,"LMAX")
9
^SCR("P1HZCA","G",1,"MUMPS1")

^SCR("P1HZCA","G",1,"MUMPS2")
D HZM^P1HZCA
^SCR("P1HZCA","G",1,"SHEM")
dpnfd 'qn
^SCR("P1HZCA","G",1,"TYP")
E
^SCR("P1HZCA","G",2,"CRD")
6,65,D,8,0
^SCR("P1HZCA","G",2,"HELP")

^SCR("P1HZCA","G",2,"LMAX")
8
^SCR("P1HZCA","G",2,"MUMPS1")

^SCR("P1HZCA","G",2,"MUMPS2")

^SCR("P1HZCA","G",2,"OUTPUT")

^SCR("P1HZCA","G",2,"SHEM")
  jix`z 
^SCR("P1HZCA","G",2,"TYP")
D
^SCR("P1HZCA","G",3,"CRD")
6,56,E,5,0
^SCR("P1HZCA","G",3,"HELP")

^SCR("P1HZCA","G",3,"LMAX")
5
^SCR("P1HZCA","G",3,"MUMPS1")

^SCR("P1HZCA","G",3,"MUMPS2")

^SCR("P1HZCA","G",3,"OUTPUT")

^SCR("P1HZCA","G",3,"SHEM")
 dry 
^SCR("P1HZCA","G",3,"TYP")
E
^SCR("P1HZCA","G",4,"CRD")
6,50,E,8,0
^SCR("P1HZCA","G",4,"HELP")

^SCR("P1HZCA","G",4,"LMAX")
8
^SCR("P1HZCA","G",4,"MUMPS1")

^SCR("P1HZCA","G",4,"MUMPS2")

^SCR("P1HZCA","G",4,"OUTPUT")

^SCR("P1HZCA","G",4,"SHEM")
dwqr 'qn
^SCR("P1HZCA","G",4,"TYP")
E
^SCR("P1HZCA","G",5,"CRD")
6,41,H,19,0
^SCR("P1HZCA","G",5,"HELP")

^SCR("P1HZCA","G",5,"LMAX")
19
^SCR("P1HZCA","G",5,"MUMPS1")

^SCR("P1HZCA","G",5,"MUMPS2")

^SCR("P1HZCA","G",5,"OUTPUT")

^SCR("P1HZCA","G",5,"SHEM")
       `"k 'qn     
^SCR("P1HZCA","G",5,"TYP")
H
^SCR("P1HZCA","G",6,"CRD")
6,21,H,9,0
^SCR("P1HZCA","G",6,"HELP")

^SCR("P1HZCA","G",6,"LMAX")
9
^SCR("P1HZCA","G",6,"MUMPS1")

^SCR("P1HZCA","G",6,"MUMPS2")

^SCR("P1HZCA","G",6,"OUTPUT")

^SCR("P1HZCA","G",6,"SHEM")
 `"k beq 
^SCR("P1HZCA","G",6,"TYP")
H
^SCR("P1HZCA","G",7,"CRD")
6,11,N,8,2
^SCR("P1HZCA","G",7,"HELP")

^SCR("P1HZCA","G",7,"LMAX")
8
^SCR("P1HZCA","G",7,"MUMPS1")

^SCR("P1HZCA","G",7,"MUMPS2")

^SCR("P1HZCA","G",7,"OUTPUT")

^SCR("P1HZCA","G",7,"SHEM")
  mekq  
^SCR("P1HZCA","G",7,"TYP")
N
^SCR("P1HZCA","G","MAX")
99999
^SCR("P1HZCA","G","NAME","CA")
5
^SCR("P1HZCA","G","NAME","HZM")
1
^SCR("P1HZCA","G","NAME","ISKA")
4
^SCR("P1HZCA","G","NAME","SHAA")
3
^SCR("P1HZCA","G","NAME","SUGCA")
6
^SCR("P1HZCA","G","NAME","SUM")
7
^SCR("P1HZCA","G","NAME","TRH")
2
^SCR("P1HZCA","G","NM",1)
HZM
^SCR("P1HZCA","G","NM",2)
TRH
^SCR("P1HZCA","G","NM",3)
SHAA
^SCR("P1HZCA","G","NM",4)
ISKA
^SCR("P1HZCA","G","NM",5)
CA
^SCR("P1HZCA","G","NM",6)
SUGCA
^SCR("P1HZCA","G","NM",7)
SUM
^SCR("P1HZCA","G","RB")
5,2,22,79
^SCR("P1HZCA","G","REF")
^TEMP($P,"CA"
^SCR("P1HZCA","G","RZD")
\
^SCR("P1HZCA","G","STEP")
1
^SCR("P1HZCA","G","STG")
  :  mekq  : `"k beq :       `"k 'qn     :dwqr 'qn: dry :  jix`z :dpnfd 'qn:   
^SCR("P1HZCA","G","VG")
7
^SCR("P1HZCA","NAME")
zepnfd itl `"k
^SCR("P1HZCA","P",5,"CRD")
2,43,D,8,0
^SCR("P1HZCA","P",5,"HELP")

^SCR("P1HZCA","P",5,"LMAX")
8
^SCR("P1HZCA","P",5,"MUMPS1")
S:'$G(DAT11) DAT11=$$^%L1DC(P1DZ,1)
^SCR("P1HZCA","P",5,"MUMPS2")

^SCR("P1HZCA","P",5,"MUST")

^SCR("P1HZCA","P",5,"TYP")
D
^SCR("P1HZCA","P",10,"CRD")
2,20,D,8,0
^SCR("P1HZCA","P",10,"HELP")

^SCR("P1HZCA","P",10,"LMAX")
9
^SCR("P1HZCA","P",10,"MUMPS1")
S:'$G(DAT12) DAT12=DAT11
^SCR("P1HZCA","P",10,"MUMPS2")
I $$^%L1DC(DAT12,3)<$$^%L1DC(DAT11,3) S %SC("ER")=1
^SCR("P1HZCA","P",10,"MUST")

^SCR("P1HZCA","P",10,"TYP")
D
^SCR("P1HZCA","P",15,"CRD")
3,43,E,8,0
^SCR("P1HZCA","P",15,"HELP")

^SCR("P1HZCA","P",15,"LMAX")
8
^SCR("P1HZCA","P",15,"MUMPS1")

^SCR("P1HZCA","P",15,"MUMPS2")

^SCR("P1HZCA","P",15,"TYP")
E
^SCR("P1HZCA","P",20,"CRD")
3,20,E,9,0
^SCR("P1HZCA","P",20,"HELP")

^SCR("P1HZCA","P",20,"LMAX")
9
^SCR("P1HZCA","P",20,"MUMPS1")

^SCR("P1HZCA","P",20,"MUMPS2")
D COMP^P1HZCA
^SCR("P1HZCA","P",20,"TYP")
E
^SCR("P1HZCA","P",25,"CRD")
22,53,N,9,2
^SCR("P1HZCA","P",25,"HELP")

^SCR("P1HZCA","P",25,"LMAX")
9
^SCR("P1HZCA","P",25,"MUMPS1")

^SCR("P1HZCA","P",25,"MUMPS2")

^SCR("P1HZCA","P",25,"OUTPUT")

^SCR("P1HZCA","P",25,"TYP")
N
^SCR("P1HZCA","P",30,"CRD")
22,32,N,9,2
^SCR("P1HZCA","P",30,"HELP")

^SCR("P1HZCA","P",30,"LMAX")
9
^SCR("P1HZCA","P",30,"MUMPS1")

^SCR("P1HZCA","P",30,"MUMPS2")

^SCR("P1HZCA","P",30,"OUTPUT")

^SCR("P1HZCA","P",30,"TYP")
N
^SCR("P1HZCA","P",35,"CRD")
22,8,N,9,2
^SCR("P1HZCA","P",35,"HELP")

^SCR("P1HZCA","P",35,"LMAX")
9
^SCR("P1HZCA","P",35,"MUMPS1")

^SCR("P1HZCA","P",35,"MUMPS2")

^SCR("P1HZCA","P",35,"OUTPUT")

^SCR("P1HZCA","P",35,"TYP")
N
^SCR("P1HZCA","P",40,"CRD")
23,53,N,9,2
^SCR("P1HZCA","P",40,"HELP")

^SCR("P1HZCA","P",40,"LMAX")
9
^SCR("P1HZCA","P",40,"MUMPS1")

^SCR("P1HZCA","P",40,"MUMPS2")

^SCR("P1HZCA","P",40,"OUTPUT")

^SCR("P1HZCA","P",40,"TYP")
N
^SCR("P1HZCA","P",45,"CRD")
23,32,N,9,2
^SCR("P1HZCA","P",45,"HELP")

^SCR("P1HZCA","P",45,"LMAX")
9
^SCR("P1HZCA","P",45,"MUMPS1")

^SCR("P1HZCA","P",45,"MUMPS2")

^SCR("P1HZCA","P",45,"OUTPUT")

^SCR("P1HZCA","P",45,"TYP")
N
^SCR("P1HZCA","P",50,"CRD")
23,8,N,9,2
^SCR("P1HZCA","P",50,"HELP")

^SCR("P1HZCA","P",50,"LMAX")
9
^SCR("P1HZCA","P",50,"MUMPS1")

^SCR("P1HZCA","P",50,"MUMPS2")

^SCR("P1HZCA","P",50,"OUTPUT")

^SCR("P1HZCA","P",50,"TYP")
N
^SCR("P1HZCA","P","NAME","ADHZM")
20
^SCR("P1HZCA","P","NAME","DAT11")
5
^SCR("P1HZCA","P","NAME","DAT12")
10
^SCR("P1HZCA","P","NAME","MEHZM")
15
^SCR("P1HZCA","P","NAME","SAE")
40
^SCR("P1HZCA","P","NAME","SALP")
45
^SCR("P1HZCA","P","NAME","SCA")
50
^SCR("P1HZCA","P","NAME","SDIN")
35
^SCR("P1HZCA","P","NAME","SISR")
25
^SCR("P1HZCA","P","NAME","SVIZA")
30
^SCR("P1HZCA","P","NM",5)
DAT11
^SCR("P1HZCA","P","NM",10)
DAT12
^SCR("P1HZCA","P","NM",15)
MEHZM
^SCR("P1HZCA","P","NM",20)
ADHZM
^SCR("P1HZCA","P","NM",25)
SISR
^SCR("P1HZCA","P","NM",30)
SVIZA
^SCR("P1HZCA","P","NM",35)
SDIN
^SCR("P1HZCA","P","NM",40)
SAE
^SCR("P1HZCA","P","NM",45)
SALP
^SCR("P1HZCA","P","NM",50)
SCA
^SCR("P1HZDEL")
H
^SCR("P1HZDEL",1)
                               # lehial mihixt oiivl `p #                      
^SCR("P1HZDEL",2)
                                                   {10        : {        05}   
^SCR("P1HZDEL",3)
                                                                             1$
^SCR("P1HZDEL",4)
   :  lehia zaiq : cew :x`yp:lhea:zetqez:zenk:     hixt xe`z    :i`ln: cew:    
^SCR("P1HZDEL",5)
                                                                               
^SCR("P1HZDEL",6)
                                                                               
^SCR("P1HZDEL",7)
                                                                               
^SCR("P1HZDEL",8)
                                                                               
^SCR("P1HZDEL",9)
                                                                               
^SCR("P1HZDEL",10)
                                                                               
^SCR("P1HZDEL",11)
                                                                               
^SCR("P1HZDEL",12)
                                                                               
^SCR("P1HZDEL",13)
                                                                               
^SCR("P1HZDEL",14)
                                                                               
^SCR("P1HZDEL",15)
                                                                               
^SCR("P1HZDEL",16)
                                                                               
^SCR("P1HZDEL",17)
                                                                               
^SCR("P1HZDEL",18)
                                                                               
^SCR("P1HZDEL",19)
                                                                               
^SCR("P1HZDEL",20)
 $1                                                                            
^SCR("P1HZDEL",21)
                                                                               
^SCR("P1HZDEL","A",1)
Œ…ˆ‰�Œ�‰ˆ‰˜”�‰‰–Œ€�
^SCR("P1HZDEL","A",2)
:
^SCR("P1HZDEL","A",3)

^SCR("P1HZDEL","A",4)
Œ…ˆ‰�š�‰‘ƒ…—˜€™�Œˆ…�š…”‘…šš…Ž‹ˆ‰˜”˜…€š‰€ŒŽƒ…—
^SCR("P1HZDEL","A",5)
------------------------------------------------------------------
^SCR("P1HZDEL","A",6)

^SCR("P1HZDEL","A",7)

^SCR("P1HZDEL","A",8)

^SCR("P1HZDEL","A",9)

^SCR("P1HZDEL","A",10)

^SCR("P1HZDEL","A",11)

^SCR("P1HZDEL","A",12)

^SCR("P1HZDEL","A",13)

^SCR("P1HZDEL","A",14)

^SCR("P1HZDEL","A",15)

^SCR("P1HZDEL","A",16)

^SCR("P1HZDEL","A",17)

^SCR("P1HZDEL","A",18)

^SCR("P1HZDEL","A",19)

^SCR("P1HZDEL","A",20)

^SCR("P1HZDEL","A",21)

^SCR("P1HZDEL","AV",1)
kuyhckohyhrpihhmktb
^SCR("P1HZDEL","AV",2)
:
^SCR("P1HZDEL","AV",3)

^SCR("P1HZDEL","AV",4)
kuyhc,chxsuertabkyuc,upxu,,unfyhrprut,htknsue
^SCR("P1HZDEL","AV",5)
------------------------------------------------------------------
^SCR("P1HZDEL","AV",6)

^SCR("P1HZDEL","AV",7)

^SCR("P1HZDEL","AV",8)

^SCR("P1HZDEL","AV",9)

^SCR("P1HZDEL","AV",10)

^SCR("P1HZDEL","AV",11)

^SCR("P1HZDEL","AV",12)

^SCR("P1HZDEL","AV",13)

^SCR("P1HZDEL","AV",14)

^SCR("P1HZDEL","AV",15)

^SCR("P1HZDEL","AV",16)

^SCR("P1HZDEL","AV",17)

^SCR("P1HZDEL","AV",18)

^SCR("P1HZDEL","AV",19)

^SCR("P1HZDEL","AV",20)

^SCR("P1HZDEL","AV",21)

^SCR("P1HZDEL","G",1,"CHECK")
Y
^SCR("P1HZDEL","G",1,"CRD")
5,74,E,4,0
^SCR("P1HZDEL","G",1,"FNC")

^SCR("P1HZDEL","G",1,"GLOB")
PAR
^SCR("P1HZDEL","G",1,"HELP")

^SCR("P1HZDEL","G",1,"LMAX")
4
^SCR("P1HZDEL","G",1,"MUMPS1")

^SCR("P1HZDEL","G",1,"MUMPS2")

^SCR("P1HZDEL","G",1,"NLN")
20
^SCR("P1HZDEL","G",1,"OUTPUT")

^SCR("P1HZDEL","G",1,"RZD")
**
^SCR("P1HZDEL","G",1,"SHEM")
 cew
^SCR("P1HZDEL","G",1,"TOPB")
8
^SCR("P1HZDEL","G",1,"TYP")
E
^SCR("P1HZDEL","G",1,"VRB")
PAR1
^SCR("P1HZDEL","G",2,"CRD")
5,69,E,3,0
^SCR("P1HZDEL","G",2,"HELP")

^SCR("P1HZDEL","G",2,"LMAX")
4
^SCR("P1HZDEL","G",2,"MUMPS1")

^SCR("P1HZDEL","G",2,"MUMPS2")

^SCR("P1HZDEL","G",2,"OUTPUT")

^SCR("P1HZDEL","G",2,"SHEM")
i`ln
^SCR("P1HZDEL","G",2,"TYP")
E
^SCR("P1HZDEL","G",3,"CRD")
5,64,H,18,0
^SCR("P1HZDEL","G",3,"HELP")

^SCR("P1HZDEL","G",3,"LMAX")
18
^SCR("P1HZDEL","G",3,"MUMPS1")

^SCR("P1HZDEL","G",3,"MUMPS2")

^SCR("P1HZDEL","G",3,"OUTPUT")

^SCR("P1HZDEL","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZDEL","G",3,"TYP")
H
^SCR("P1HZDEL","G",4,"CRD")
5,45,N,4,0
^SCR("P1HZDEL","G",4,"HELP")

^SCR("P1HZDEL","G",4,"LMAX")
4
^SCR("P1HZDEL","G",4,"MUMPS1")

^SCR("P1HZDEL","G",4,"MUMPS2")

^SCR("P1HZDEL","G",4,"OUTPUT")

^SCR("P1HZDEL","G",4,"SHEM")
zenk
^SCR("P1HZDEL","G",4,"TYP")
N
^SCR("P1HZDEL","G",5,"CRD")
5,40,E,3,0
^SCR("P1HZDEL","G",5,"HELP")

^SCR("P1HZDEL","G",5,"LMAX")
6
^SCR("P1HZDEL","G",5,"MUMPS1")

^SCR("P1HZDEL","G",5,"MUMPS2")

^SCR("P1HZDEL","G",5,"OUTPUT")

^SCR("P1HZDEL","G",5,"SHEM")
zetqez
^SCR("P1HZDEL","G",5,"TYP")
E
^SCR("P1HZDEL","G",6,"CRD")
5,33,N,4,0
^SCR("P1HZDEL","G",6,"HELP")
<F2> - zetqeze mihixt bivdl ,<F10> - zetqez bivdl ,<F9> - zenkd lk lhal 
^SCR("P1HZDEL","G",6,"LMAX")
4
^SCR("P1HZDEL","G",6,"MUMPS1")
D BIT0^P1HZDEL
^SCR("P1HZDEL","G",6,"MUMPS2")
D BIT^P1HZDEL
^SCR("P1HZDEL","G",6,"SHEM")
lhea
^SCR("P1HZDEL","G",6,"TYP")
N
^SCR("P1HZDEL","G",7,"CRD")
5,28,N,4,0
^SCR("P1HZDEL","G",7,"HELP")

^SCR("P1HZDEL","G",7,"LMAX")
4
^SCR("P1HZDEL","G",7,"MUMPS1")

^SCR("P1HZDEL","G",7,"MUMPS2")

^SCR("P1HZDEL","G",7,"OUTPUT")

^SCR("P1HZDEL","G",7,"SHEM")
x`yp
^SCR("P1HZDEL","G",7,"TYP")
N
^SCR("P1HZDEL","G",8,"CRD")
5,23,E,5,0
^SCR("P1HZDEL","G",8,"FNC")

^SCR("P1HZDEL","G",8,"GLOB")
P1SBIT
^SCR("P1HZDEL","G",8,"HELP")
0 - zcgein daiq , <F7> - zeaiq zbvd ,<F6> - my itl yetig 
^SCR("P1HZDEL","G",8,"LMAX")
5
^SCR("P1HZDEL","G",8,"MUMPS1")
D SIBA^P1HZDEL S $P(%MBG("OU"),"\",8)=1
^SCR("P1HZDEL","G",8,"MUMPS2")
S %SC("TO")="PL"
^SCR("P1HZDEL","G",8,"MUST")

^SCR("P1HZDEL","G",8,"NLN")
20
^SCR("P1HZDEL","G",8,"RZD")
\
^SCR("P1HZDEL","G",8,"SHEM")
 cew 
^SCR("P1HZDEL","G",8,"TOPB")
8
^SCR("P1HZDEL","G",8,"TYP")
E
^SCR("P1HZDEL","G",9,"CRD")
5,17,H,13,0
^SCR("P1HZDEL","G",9,"HELP")

^SCR("P1HZDEL","G",9,"LMAX")
13
^SCR("P1HZDEL","G",9,"MUMPS1")

^SCR("P1HZDEL","G",9,"MUMPS2")
I SIBA1="",$G(BIT),$P(%MBG("OU"),"\",9)?.P,$G(%TO)'="END" S %SC("ST")=1
^SCR("P1HZDEL","G",9,"OUTPUT")

^SCR("P1HZDEL","G",9,"SHEM")
  lehia zaiq 
^SCR("P1HZDEL","G",9,"TYP")
H
^SCR("P1HZDEL","G","MAX")
2
^SCR("P1HZDEL","G","NAME","BIT")
6
^SCR("P1HZDEL","G","NAME","ITRB")
7
^SCR("P1HZDEL","G","NAME","KAM")
4
^SCR("P1HZDEL","G","NAME","PAR")
1
^SCR("P1HZDEL","G","NAME","PAR1")
3
^SCR("P1HZDEL","G","NAME","SIBA")
8
^SCR("P1HZDEL","G","NAME","SIBA1")
9
^SCR("P1HZDEL","G","NAME","SUG")
2
^SCR("P1HZDEL","G","NAME","TSF")
5
^SCR("P1HZDEL","G","NM",1)
PAR
^SCR("P1HZDEL","G","NM",2)
SUG
^SCR("P1HZDEL","G","NM",3)
PAR1
^SCR("P1HZDEL","G","NM",4)
KAM
^SCR("P1HZDEL","G","NM",5)
TSF
^SCR("P1HZDEL","G","NM",6)
BIT
^SCR("P1HZDEL","G","NM",7)
ITRB
^SCR("P1HZDEL","G","NM",8)
SIBA
^SCR("P1HZDEL","G","NM",9)
SIBA1
^SCR("P1HZDEL","G","NOZAPR")
1
^SCR("P1HZDEL","G","RB")
4,2,21,79
^SCR("P1HZDEL","G","REF")
^THZ3($P
^SCR("P1HZDEL","G","RZD")
\
^SCR("P1HZDEL","G","STEP")
1
^SCR("P1HZDEL","G","STG")
   :  lehia zaiq : cew :x`yp:lhea:zetqez:zenk:     hixt xe`z    :i`ln: cew:    
^SCR("P1HZDEL","G","VG")
6
^SCR("P1HZDEL","NAME")
4
^SCR("P1HZDEL","P",5,"CRD")
2,76,H,11
^SCR("P1HZDEL","P",5,"HELP")

^SCR("P1HZDEL","P",5,"LMAX")
11
^SCR("P1HZDEL","P",5,"MUMPS1")

^SCR("P1HZDEL","P",5,"MUMPS2")

^SCR("P1HZDEL","P",5,"OUTPUT")

^SCR("P1HZDEL","P",5,"TYP")
H
^SCR("P1HZDEL","P",10,"CRD")
2,51,E,11,0
^SCR("P1HZDEL","P",10,"HELP")

^SCR("P1HZDEL","P",10,"LMAX")
11
^SCR("P1HZDEL","P",10,"MUMPS1")

^SCR("P1HZDEL","P",10,"MUMPS2")

^SCR("P1HZDEL","P",10,"OUTPUT")

^SCR("P1HZDEL","P",10,"TYP")
E
^SCR("P1HZDEL","P","NAME","NAME")
5
^SCR("P1HZDEL","P","NAME","NMB")
10
^SCR("P1HZDEL","P","NM",5)
NAME
^SCR("P1HZDEL","P","NM",10)
NMB
^SCR("P1HZDEL","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZDEL","P","REF",2,"RZD")
\
^SCR("P1HZDEL","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZDEL","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZDEL","P","REF",3,"RZD")
\
^SCR("P1HZDEL","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP
^SCR("P1HZDEL","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZDEL","P","REF",4,"RZD")
\\
^SCR("P1HZDEL","P","REF",4,"STR")
HRA2\\HODAA
^SCR("P1HZH")
H
^SCR("P1HZH",1)
                                                                         1]    
^SCR("P1HZH",2)
                      {                  11} {10       }:          gewln       
^SCR("P1HZH",3)
                      {                  13} {12       }:        gewl cr       
^SCR("P1HZH",4)
                             {                15} {14  }:       gily cew       
^SCR("P1HZH",5)
                               {20       } cr {17      }:         jix`zn       
^SCR("P1HZH",6)
                           {                    23} {22 :          dcrqn       
^SCR("P1HZH",7)
                     {25 }:<ENTER> - mlek , 2- zegezt ,1 - zexebq zepnfd       
^SCR("P1HZH",8)
                            {35     } mekq cr  {30     }:          mekqn       
^SCR("P1HZH",9)
                                    {40                }:        `"k 'qn       
^SCR("P1HZH",10)
                                            {45        }:        wiy 'qn       
^SCR("P1HZH",11)
                                               {50     }: gewl ly `zknq`       
^SCR("P1HZH",12)
                                     {         71} {70 }:      melyz beq       
^SCR("P1HZH",13)
                [1                                                             
^SCR("P1HZH","A",1)

^SCR("P1HZH","A",2)
:‡…—ŒŽ
^SCR("P1HZH","A",3)
:‡…—Œƒ’
^SCR("P1HZH","A",4)
:‡‰Œ™ƒ…—
^SCR("P1HZH","A",5)
ƒ’:Š‰˜€šŽ
^SCR("P1HZH","A",6)
:„ƒ’‘Ž
^SCR("P1HZH","A",7)
:<ENTER>-�Œ…‹,2-š…‡…š”,1-š…˜…‚‘š…�Ž†„
^SCR("P1HZH","A",8)
�…‹‘ƒ’:�…‹‘Ž
^SCR("P1HZH","A",9)
:€"‹'‘Ž
^SCR("P1HZH","A",10)
:—‰™'‘Ž
^SCR("P1HZH","A",11)
:‡…—ŒŒ™€š‹Ž‘€
^SCR("P1HZH","A",12)
:�…Œ™š‚…‘
^SCR("P1HZH","A",13)

^SCR("P1HZH","AV",1)

^SCR("P1HZH","AV",2)
:juekn
^SCR("P1HZH","AV",3)
:jueksg
^SCR("P1HZH","AV",4)
:jhkasue
^SCR("P1HZH","AV",5)
sg:lhrt,n
^SCR("P1HZH","AV",6)
:vsgxn
^SCR("P1HZH","AV",7)
:<ENTER>-okuf'2-,uju,p'1-,urudx,ubnzv
^SCR("P1HZH","AV",8)
oufxsg:oufxn
^SCR("P1HZH","AV",9)
:t"fwxn
^SCR("P1HZH","AV",10)
:ehawxn
^SCR("P1HZH","AV",11)
:juekkat,fnxt
^SCR("P1HZH","AV",12)
:ouka,dux
^SCR("P1HZH","AV",13)

^SCR("P1HZH","NAME")
zepnfd zbvd
^SCR("P1HZH","P",10,"CRD")
2,45,E,10,0
^SCR("P1HZH","P",10,"FNC")

^SCR("P1HZH","P",10,"GLOB")
LKH
^SCR("P1HZH","P",10,"HELP")

^SCR("P1HZH","P",10,"LMAX")
10
^SCR("P1HZH","P",10,"MUMPS1")

^SCR("P1HZH","P",10,"MUMPS2")

^SCR("P1HZH","P",10,"NLN")
20
^SCR("P1HZH","P",10,"RZD")
\
^SCR("P1HZH","P",10,"TOPB")
8
^SCR("P1HZH","P",10,"TYP")
E
^SCR("P1HZH","P",10,"VRB")
NAME1
^SCR("P1HZH","P",11,"CRD")
2,44,H,20
^SCR("P1HZH","P",11,"HELP")

^SCR("P1HZH","P",11,"LMAX")
21
^SCR("P1HZH","P",11,"MUMPS1")

^SCR("P1HZH","P",11,"MUMPS2")

^SCR("P1HZH","P",11,"OUTPUT")

^SCR("P1HZH","P",11,"TYP")
H
^SCR("P1HZH","P",12,"CRD")
3,45,E,10,0
^SCR("P1HZH","P",12,"FNC")

^SCR("P1HZH","P",12,"GLOB")
LKH
^SCR("P1HZH","P",12,"HELP")

^SCR("P1HZH","P",12,"LMAX")
10
^SCR("P1HZH","P",12,"MUMPS1")
S:'$G(NMB2) NMB2=NMB1
^SCR("P1HZH","P",12,"MUMPS2")

^SCR("P1HZH","P",12,"NLN")
20
^SCR("P1HZH","P",12,"RZD")
\
^SCR("P1HZH","P",12,"TOPB")
8
^SCR("P1HZH","P",12,"TYP")
E
^SCR("P1HZH","P",12,"VRB")
NAME2
^SCR("P1HZH","P",13,"CRD")
3,44,H,20
^SCR("P1HZH","P",13,"HELP")

^SCR("P1HZH","P",13,"LMAX")
21
^SCR("P1HZH","P",13,"MUMPS1")

^SCR("P1HZH","P",13,"MUMPS2")

^SCR("P1HZH","P",13,"OUTPUT")

^SCR("P1HZH","P",13,"TYP")
H
^SCR("P1HZH","P",14,"CHECK")
Y
^SCR("P1HZH","P",14,"CRD")
4,50,E,3,0
^SCR("P1HZH","P",14,"FNC")

^SCR("P1HZH","P",14,"GLOB")
P1SL
^SCR("P1HZH","P",14,"HELP")

^SCR("P1HZH","P",14,"LMAX")
5
^SCR("P1HZH","P",14,"MUMPS1")

^SCR("P1HZH","P",14,"MUMPS2")

^SCR("P1HZH","P",14,"NLN")
20
^SCR("P1HZH","P",14,"RZD")
\
^SCR("P1HZH","P",14,"TOPB")
8
^SCR("P1HZH","P",14,"TYP")
E
^SCR("P1HZH","P",14,"VRB")
SLH1
^SCR("P1HZH","P",15,"CRD")
4,49,H,19
^SCR("P1HZH","P",15,"HELP")

^SCR("P1HZH","P",15,"LMAX")
19
^SCR("P1HZH","P",15,"MUMPS1")

^SCR("P1HZH","P",15,"MUMPS2")

^SCR("P1HZH","P",15,"OUTPUT")

^SCR("P1HZH","P",15,"TYP")
H
^SCR("P1HZH","P",17,"CRD")
5,46,D,8,0
^SCR("P1HZH","P",17,"HELP")

^SCR("P1HZH","P",17,"LMAX")
9
^SCR("P1HZH","P",17,"MUMPS1")

^SCR("P1HZH","P",17,"MUMPS2")

^SCR("P1HZH","P",17,"TYP")
D
^SCR("P1HZH","P",20,"CRD")
5,31,D,8,0
^SCR("P1HZH","P",20,"HELP")

^SCR("P1HZH","P",20,"LMAX")
10
^SCR("P1HZH","P",20,"MUMPS1")

^SCR("P1HZH","P",20,"MUMPS2")

^SCR("P1HZH","P",20,"TYP")
D
^SCR("P1HZH","P",22,"CRD")
6,52,E,4,0
^SCR("P1HZH","P",22,"FNC")

^SCR("P1HZH","P",22,"GLOB")
P1MSD
^SCR("P1HZH","P",22,"HELP")

^SCR("P1HZH","P",22,"LMAX")
4
^SCR("P1HZH","P",22,"MUMPS1")

^SCR("P1HZH","P",22,"MUMPS2")

^SCR("P1HZH","P",22,"NLN")
20
^SCR("P1HZH","P",22,"RZD")
\
^SCR("P1HZH","P",22,"TOPB")
8
^SCR("P1HZH","P",22,"TYP")
E
^SCR("P1HZH","P",22,"VRB")
MSD1
^SCR("P1HZH","P",23,"CRD")
6,51,H,23
^SCR("P1HZH","P",23,"HELP")

^SCR("P1HZH","P",23,"LMAX")
23
^SCR("P1HZH","P",23,"MUMPS1")

^SCR("P1HZH","P",23,"MUMPS2")

^SCR("P1HZH","P",23,"OUTPUT")

^SCR("P1HZH","P",23,"TYP")
H
^SCR("P1HZH","P",25,"CRD")
7,21,E,1,0
^SCR("P1HZH","P",25,"HELP")

^SCR("P1HZH","P",25,"LMAX")
4
^SCR("P1HZH","P",25,"MUMPS1")
S:$D(HSBZIC)&($G(HSBZIC)="") SHL=1
^SCR("P1HZH","P",25,"MUMPS2")
I "12"'[SHL S %SC("ER")=1 Q 
^SCR("P1HZH","P",25,"TYP")
E
^SCR("P1HZH","P",30,"CRD")
8,47,N,8,2
^SCR("P1HZH","P",30,"HELP")

^SCR("P1HZH","P",30,"LMAX")
8
^SCR("P1HZH","P",30,"MUMPS1")

^SCR("P1HZH","P",30,"MUMPS2")

^SCR("P1HZH","P",30,"TYP")
N
^SCR("P1HZH","P",35,"CRD")
8,28,N,8,2
^SCR("P1HZH","P",35,"HELP")

^SCR("P1HZH","P",35,"LMAX")
8
^SCR("P1HZH","P",35,"MUMPS1")

^SCR("P1HZH","P",35,"MUMPS2")
S:'$G(ADSUM) ADSUM=99999.99
^SCR("P1HZH","P",35,"TYP")
N
^SCR("P1HZH","P",40,"CRD")
9,36,E,19,0
^SCR("P1HZH","P",40,"HELP")

^SCR("P1HZH","P",40,"LMAX")
19
^SCR("P1HZH","P",40,"MUMPS1")

^SCR("P1HZH","P",40,"MUMPS2")

^SCR("P1HZH","P",40,"TYP")
E
^SCR("P1HZH","P",45,"CRD")
10,44,E,11,0
^SCR("P1HZH","P",45,"HELP")

^SCR("P1HZH","P",45,"LMAX")
11
^SCR("P1HZH","P",45,"MUMPS1")

^SCR("P1HZH","P",45,"MUMPS2")

^SCR("P1HZH","P",45,"TYP")
E
^SCR("P1HZH","P",50,"CRD")
11,47,E,8,0
^SCR("P1HZH","P",50,"HELP")

^SCR("P1HZH","P",50,"LMAX")
8
^SCR("P1HZH","P",50,"MUMPS1")

^SCR("P1HZH","P",50,"MUMPS2")

^SCR("P1HZH","P",50,"TYP")
E
^SCR("P1HZH","P",70,"CRD")
12,51,E,1,0
^SCR("P1HZH","P",70,"FNC")

^SCR("P1HZH","P",70,"GLOB")
P1CODTS
^SCR("P1HZH","P",70,"HELP")

^SCR("P1HZH","P",70,"LMAX")
4
^SCR("P1HZH","P",70,"MUMPS1")

^SCR("P1HZH","P",70,"MUMPS2")

^SCR("P1HZH","P",70,"NLN")
20
^SCR("P1HZH","P",70,"RZD")
\
^SCR("P1HZH","P",70,"TOPB")
8
^SCR("P1HZH","P",70,"TYP")
E
^SCR("P1HZH","P",70,"VRB")
SUGT1
^SCR("P1HZH","P",71,"CRD")
12,50,H,12
^SCR("P1HZH","P",71,"HELP")

^SCR("P1HZH","P",71,"LMAX")
12
^SCR("P1HZH","P",71,"MUMPS1")

^SCR("P1HZH","P",71,"MUMPS2")

^SCR("P1HZH","P",71,"OUTPUT")

^SCR("P1HZH","P",71,"TYP")
H
^SCR("P1HZH","P","NAME","ADSUM")
35
^SCR("P1HZH","P","NAME","DAT11")
17
^SCR("P1HZH","P","NAME","DAT21")
20
^SCR("P1HZH","P","NAME","MESUM")
30
^SCR("P1HZH","P","NAME","MSD")
22
^SCR("P1HZH","P","NAME","MSD1")
23
^SCR("P1HZH","P","NAME","NAME1")
11
^SCR("P1HZH","P","NAME","NAME2")
13
^SCR("P1HZH","P","NAME","NMB1")
10
^SCR("P1HZH","P","NAME","NMB2")
12
^SCR("P1HZH","P","NAME","PSASM")
50
^SCR("P1HZH","P","NAME","PSCA")
40
^SCR("P1HZH","P","NAME","PSCH")
45
^SCR("P1HZH","P","NAME","PSUGT")
70
^SCR("P1HZH","P","NAME","SHL")
25
^SCR("P1HZH","P","NAME","SLH")
14
^SCR("P1HZH","P","NAME","SLH1")
15
^SCR("P1HZH","P","NAME","SUGT1")
71
^SCR("P1HZH","P","NM",10)
NMB1
^SCR("P1HZH","P","NM",11)
NAME1
^SCR("P1HZH","P","NM",12)
NMB2
^SCR("P1HZH","P","NM",13)
NAME2
^SCR("P1HZH","P","NM",14)
SLH
^SCR("P1HZH","P","NM",15)
SLH1
^SCR("P1HZH","P","NM",17)
DAT11
^SCR("P1HZH","P","NM",20)
DAT21
^SCR("P1HZH","P","NM",22)
MSD
^SCR("P1HZH","P","NM",23)
MSD1
^SCR("P1HZH","P","NM",25)
SHL
^SCR("P1HZH","P","NM",30)
MESUM
^SCR("P1HZH","P","NM",35)
ADSUM
^SCR("P1HZH","P","NM",40)
PSCA
^SCR("P1HZH","P","NM",45)
PSCH
^SCR("P1HZH","P","NM",50)
PSASM
^SCR("P1HZH","P","NM",70)
PSUGT
^SCR("P1HZH","P","NM",71)
SUGT1
^SCR("P1HZH","P","RB",1)
2,17,14,75
^SCR("P1HZHMS")
H
^SCR("P1HZHMS",1)
                                                                         1]    
^SCR("P1HZHMS",2)
                     {                  11} {10       }:          ogleyn       
^SCR("P1HZHMS",3)
                     {                  13} {12       }:        ogley cr       
^SCR("P1HZHMS",4)
                              {20       } cr {17      }:          jix`zn       
^SCR("P1HZHMS",5)
                     {25 }:<ENTER> - mlek , 2- zegezt ,1 - zexebq zepnfd       
^SCR("P1HZHMS",6)
                          {50     }: mekq cr  {30     }:           mekqn       
^SCR("P1HZHMS",7)
                                   {55                }:         `"k 'qn       
^SCR("P1HZHMS",8)
                                           {60        }:         wiy 'qn       
^SCR("P1HZHMS",9)
                                              {65     }:  gewl ly `zknq`       
^SCR("P1HZHMS",10)
                                     {        71} {70 }:       melyz beq       
^SCR("P1HZHMS",11)
                [1                                                             
^SCR("P1HZHMS",12)
                                                                               
^SCR("P1HZHMS","A",1)

^SCR("P1HZHMS","A",2)
:�‡Œ…™Ž
^SCR("P1HZHMS","A",3)
:�‡Œ…™ƒ’
^SCR("P1HZHMS","A",4)
ƒ’:Š‰˜€šŽ
^SCR("P1HZHMS","A",5)
:<ENTER>-�Œ…‹,2-š…‡…š”,1-š…˜…‚‘š…�Ž†„
^SCR("P1HZHMS","A",6)
:�…‹‘ƒ’:�…‹‘Ž
^SCR("P1HZHMS","A",7)
:€"‹'‘Ž
^SCR("P1HZHMS","A",8)
:—‰™'‘Ž
^SCR("P1HZHMS","A",9)
:‡…—ŒŒ™€š‹Ž‘€
^SCR("P1HZHMS","A",10)
:�…Œ™š‚…‘
^SCR("P1HZHMS","A",11)

^SCR("P1HZHMS","A",12)

^SCR("P1HZHMS","AV",1)

^SCR("P1HZHMS","AV",2)
:ijkuan
^SCR("P1HZHMS","AV",3)
:ijkuasg
^SCR("P1HZHMS","AV",4)
sg:lhrt,n
^SCR("P1HZHMS","AV",5)
:<ENTER>-okuf'2-,uju,p'1-,urudx,ubnzv
^SCR("P1HZHMS","AV",6)
:oufxsg:oufxn
^SCR("P1HZHMS","AV",7)
:t"fwxn
^SCR("P1HZHMS","AV",8)
:ehawxn
^SCR("P1HZHMS","AV",9)
:juekkat,fnxt
^SCR("P1HZHMS","AV",10)
:ouka,dux
^SCR("P1HZHMS","AV",11)

^SCR("P1HZHMS","AV",12)

^SCR("P1HZHMS","NAME")

^SCR("P1HZHMS","P",10,"CRD")
2,44,E,10,0
^SCR("P1HZHMS","P",10,"FNC")

^SCR("P1HZHMS","P",10,"GLOB")
LKH
^SCR("P1HZHMS","P",10,"HELP")

^SCR("P1HZHMS","P",10,"LMAX")
10
^SCR("P1HZHMS","P",10,"MUMPS1")

^SCR("P1HZHMS","P",10,"MUMPS2")

^SCR("P1HZHMS","P",10,"NLN")
20
^SCR("P1HZHMS","P",10,"RZD")
\
^SCR("P1HZHMS","P",10,"TOPB")
8
^SCR("P1HZHMS","P",10,"TYP")
E
^SCR("P1HZHMS","P",10,"VRB")
NAME1
^SCR("P1HZHMS","P",11,"CRD")
2,43,H,20
^SCR("P1HZHMS","P",11,"HELP")

^SCR("P1HZHMS","P",11,"LMAX")
21
^SCR("P1HZHMS","P",11,"MUMPS1")

^SCR("P1HZHMS","P",11,"MUMPS2")

^SCR("P1HZHMS","P",11,"OUTPUT")

^SCR("P1HZHMS","P",11,"TYP")
H
^SCR("P1HZHMS","P",12,"CRD")
3,44,E,10,0
^SCR("P1HZHMS","P",12,"FNC")

^SCR("P1HZHMS","P",12,"GLOB")
LKH
^SCR("P1HZHMS","P",12,"HELP")

^SCR("P1HZHMS","P",12,"LMAX")
10
^SCR("P1HZHMS","P",12,"MUMPS1")
S:'$G(NMB2) NMB2=NMB1
^SCR("P1HZHMS","P",12,"MUMPS2")

^SCR("P1HZHMS","P",12,"NLN")
20
^SCR("P1HZHMS","P",12,"RZD")
\
^SCR("P1HZHMS","P",12,"TOPB")
8
^SCR("P1HZHMS","P",12,"TYP")
E
^SCR("P1HZHMS","P",12,"VRB")
NAME2
^SCR("P1HZHMS","P",13,"CRD")
3,43,H,20
^SCR("P1HZHMS","P",13,"HELP")

^SCR("P1HZHMS","P",13,"LMAX")
21
^SCR("P1HZHMS","P",13,"MUMPS1")

^SCR("P1HZHMS","P",13,"MUMPS2")

^SCR("P1HZHMS","P",13,"OUTPUT")

^SCR("P1HZHMS","P",13,"TYP")
H
^SCR("P1HZHMS","P",17,"CRD")
4,45,D,8,0
^SCR("P1HZHMS","P",17,"HELP")

^SCR("P1HZHMS","P",17,"LMAX")
9
^SCR("P1HZHMS","P",17,"MUMPS1")
I $G(DAT11)?.P S DAT11=$$^%L1DC(P1DZ,1)
^SCR("P1HZHMS","P",17,"MUMPS2")

^SCR("P1HZHMS","P",17,"TYP")
D
^SCR("P1HZHMS","P",20,"CRD")
4,30,D,8,0
^SCR("P1HZHMS","P",20,"HELP")

^SCR("P1HZHMS","P",20,"LMAX")
10
^SCR("P1HZHMS","P",20,"MUMPS1")
I $G(DAT21)?.P S DAT21=DAT11
^SCR("P1HZHMS","P",20,"MUMPS2")

^SCR("P1HZHMS","P",20,"TYP")
D
^SCR("P1HZHMS","P",25,"CRD")
5,21,E,1,0
^SCR("P1HZHMS","P",25,"HELP")

^SCR("P1HZHMS","P",25,"LMAX")
4
^SCR("P1HZHMS","P",25,"MUMPS1")
S:$D(HSBZIC) SHL=1
^SCR("P1HZHMS","P",25,"MUMPS2")
I "12"'[SHL S %SC("ER")=1 Q 
^SCR("P1HZHMS","P",25,"TYP")
E
^SCR("P1HZHMS","P",30,"CRD")
6,46,N,8,2
^SCR("P1HZHMS","P",30,"HELP")

^SCR("P1HZHMS","P",30,"LMAX")
8
^SCR("P1HZHMS","P",30,"MUMPS1")

^SCR("P1HZHMS","P",30,"MUMPS2")

^SCR("P1HZHMS","P",30,"TYP")
N
^SCR("P1HZHMS","P",50,"CRD")
6,26,N,8,2
^SCR("P1HZHMS","P",50,"HELP")

^SCR("P1HZHMS","P",50,"LMAX")
8
^SCR("P1HZHMS","P",50,"MUMPS1")
S:'$G(ADSUM) ADSUM=MESUM
^SCR("P1HZHMS","P",50,"MUMPS2")
S:'ADSUM ADSUM=99999.99
^SCR("P1HZHMS","P",50,"TYP")
N
^SCR("P1HZHMS","P",55,"CRD")
7,35,E,19,0
^SCR("P1HZHMS","P",55,"HELP")

^SCR("P1HZHMS","P",55,"LMAX")
19
^SCR("P1HZHMS","P",55,"MUMPS1")

^SCR("P1HZHMS","P",55,"MUMPS2")

^SCR("P1HZHMS","P",55,"TYP")
E
^SCR("P1HZHMS","P",60,"CRD")
8,43,E,11,0
^SCR("P1HZHMS","P",60,"HELP")

^SCR("P1HZHMS","P",60,"LMAX")
11
^SCR("P1HZHMS","P",60,"MUMPS1")

^SCR("P1HZHMS","P",60,"MUMPS2")

^SCR("P1HZHMS","P",60,"TYP")
E
^SCR("P1HZHMS","P",65,"CRD")
9,46,E,8,0
^SCR("P1HZHMS","P",65,"HELP")

^SCR("P1HZHMS","P",65,"LMAX")
8
^SCR("P1HZHMS","P",65,"MUMPS1")

^SCR("P1HZHMS","P",65,"MUMPS2")

^SCR("P1HZHMS","P",65,"TYP")
E
^SCR("P1HZHMS","P",70,"CRD")
10,50,E,1,0
^SCR("P1HZHMS","P",70,"FNC")

^SCR("P1HZHMS","P",70,"GLOB")
P1CODTS
^SCR("P1HZHMS","P",70,"HELP")

^SCR("P1HZHMS","P",70,"LMAX")
4
^SCR("P1HZHMS","P",70,"MUMPS1")

^SCR("P1HZHMS","P",70,"MUMPS2")
I $L(PSUGT),PSUGT<1!(PSUGT>5) S %SC("ER")=1
^SCR("P1HZHMS","P",70,"NLN")
20
^SCR("P1HZHMS","P",70,"RZD")
\
^SCR("P1HZHMS","P",70,"TOPB")
8
^SCR("P1HZHMS","P",70,"TYP")
E
^SCR("P1HZHMS","P",70,"VRB")
PSUGT1
^SCR("P1HZHMS","P",71,"CRD")
10,49,H,11
^SCR("P1HZHMS","P",71,"HELP")

^SCR("P1HZHMS","P",71,"LMAX")
11
^SCR("P1HZHMS","P",71,"MUMPS1")

^SCR("P1HZHMS","P",71,"MUMPS2")

^SCR("P1HZHMS","P",71,"OUTPUT")

^SCR("P1HZHMS","P",71,"TYP")
H
^SCR("P1HZHMS","P","NAME","ADSUM")
50
^SCR("P1HZHMS","P","NAME","DAT11")
17
^SCR("P1HZHMS","P","NAME","DAT21")
20
^SCR("P1HZHMS","P","NAME","MESUM")
30
^SCR("P1HZHMS","P","NAME","NAME1")
11
^SCR("P1HZHMS","P","NAME","NAME2")
13
^SCR("P1HZHMS","P","NAME","NMB1")
10
^SCR("P1HZHMS","P","NAME","NMB2")
12
^SCR("P1HZHMS","P","NAME","PSASM")
65
^SCR("P1HZHMS","P","NAME","PSCA")
55
^SCR("P1HZHMS","P","NAME","PSCH")
60
^SCR("P1HZHMS","P","NAME","PSUGT")
70
^SCR("P1HZHMS","P","NAME","PSUGT1")
71
^SCR("P1HZHMS","P","NAME","SHL")
25
^SCR("P1HZHMS","P","NM",10)
NMB1
^SCR("P1HZHMS","P","NM",11)
NAME1
^SCR("P1HZHMS","P","NM",12)
NMB2
^SCR("P1HZHMS","P","NM",13)
NAME2
^SCR("P1HZHMS","P","NM",17)
DAT11
^SCR("P1HZHMS","P","NM",20)
DAT21
^SCR("P1HZHMS","P","NM",25)
SHL
^SCR("P1HZHMS","P","NM",30)
MESUM
^SCR("P1HZHMS","P","NM",50)
ADSUM
^SCR("P1HZHMS","P","NM",55)
PSCA
^SCR("P1HZHMS","P","NM",60)
PSCH
^SCR("P1HZHMS","P","NM",65)
PSASM
^SCR("P1HZHMS","P","NM",70)
PSUGT
^SCR("P1HZHMS","P","NM",71)
PSUGT1
^SCR("P1HZHMS","P","RB",1)
2,17,12,75
^SCR("P1HZMN")
H
^SCR("P1HZMN",1)
                                     # ogley zepnfd #                          
^SCR("P1HZMN",2)
                                                                               
^SCR("P1HZMN",3)
                                         {10 } mei   {05     }: jix`z          
^SCR("P1HZMN",4)
                                                                             1$
^SCR("P1HZMN",5)
  :    zepgley   :rex`:mipyrn:  oet`lt  :   oetlh   :  oinfnd my  :creq: dry : 
^SCR("P1HZMN",6)
                    \ lawnd \                 dxrd                \            
^SCR("P1HZMN",7)
                                                                               
^SCR("P1HZMN",8)
                                                                               
^SCR("P1HZMN",9)
                                                                               
^SCR("P1HZMN",10)
                                                                               
^SCR("P1HZMN",11)
                                                                               
^SCR("P1HZMN",12)
                                                                               
^SCR("P1HZMN",13)
                                                                               
^SCR("P1HZMN",14)
                                                                               
^SCR("P1HZMN",15)
                                                                               
^SCR("P1HZMN",16)
                                                                               
^SCR("P1HZMN",17)
                                                                               
^SCR("P1HZMN",18)
                                                                               
^SCR("P1HZMN",19)
                                                                               
^SCR("P1HZMN",20)
                                                                               
^SCR("P1HZMN",21)
 $1                                                                            
^SCR("P1HZMN",22)
                                                      {20    } : micreq k"dq   
^SCR("P1HZMN","A",1)
�‡Œ…™š…�Ž†„
^SCR("P1HZMN","A",2)

^SCR("P1HZMN","A",3)
�…‰:Š‰˜€š
^SCR("P1HZMN","A",4)

^SCR("P1HZMN","A",5)
š…�‡Œ…™’…˜€�‰�™’Ž�…”€Œ”�…”Œˆ�‰Ž†Ž„�™ƒ’…‘„’™
^SCR("P1HZMN","A",6)
Œ�—Ž„„˜’„
^SCR("P1HZMN","A",7)
--------------------------------------------------------------------
^SCR("P1HZMN","A",8)

^SCR("P1HZMN","A",9)

^SCR("P1HZMN","A",10)

^SCR("P1HZMN","A",11)

^SCR("P1HZMN","A",12)

^SCR("P1HZMN","A",13)

^SCR("P1HZMN","A",14)

^SCR("P1HZMN","A",15)

^SCR("P1HZMN","A",16)

^SCR("P1HZMN","A",17)

^SCR("P1HZMN","A",18)

^SCR("P1HZMN","A",19)

^SCR("P1HZMN","A",20)

^SCR("P1HZMN","A",21)

^SCR("P1HZMN","A",22)
:�‰ƒ’…‘‹"„‘
^SCR("P1HZMN","AV",1)
ijkua,ubnzv
^SCR("P1HZMN","AV",2)

^SCR("P1HZMN","AV",3)
ouh:lhrt,
^SCR("P1HZMN","AV",4)

^SCR("P1HZMN","AV",5)
,ubjkuagurtohbagniuptkpiupkyihnznvoasguxvga
^SCR("P1HZMN","AV",6)
kcenvvrgv
^SCR("P1HZMN","AV",7)
--------------------------------------------------------------------
^SCR("P1HZMN","AV",8)

^SCR("P1HZMN","AV",9)

^SCR("P1HZMN","AV",10)

^SCR("P1HZMN","AV",11)

^SCR("P1HZMN","AV",12)

^SCR("P1HZMN","AV",13)

^SCR("P1HZMN","AV",14)

^SCR("P1HZMN","AV",15)

^SCR("P1HZMN","AV",16)

^SCR("P1HZMN","AV",17)

^SCR("P1HZMN","AV",18)

^SCR("P1HZMN","AV",19)

^SCR("P1HZMN","AV",20)

^SCR("P1HZMN","AV",21)

^SCR("P1HZMN","AV",22)
:ohsguxf"vx
^SCR("P1HZMN","G",1,"CRD")
7,77,T,5,0
^SCR("P1HZMN","G",1,"HELP")

^SCR("P1HZMN","G",1,"LMAX")
5
^SCR("P1HZMN","G",1,"MUMPS1")

^SCR("P1HZMN","G",1,"MUMPS2")

^SCR("P1HZMN","G",1,"MUST")

^SCR("P1HZMN","G",1,"SHEM")
 dry 
^SCR("P1HZMN","G",1,"TYP")
T
^SCR("P1HZMN","G",2,"CRD")
7,71,N,4,0
^SCR("P1HZMN","G",2,"HELP")

^SCR("P1HZMN","G",2,"LMAX")
4
^SCR("P1HZMN","G",2,"MUMPS1")

^SCR("P1HZMN","G",2,"MUMPS2")
D SUM^P1HZMN
^SCR("P1HZMN","G",2,"MUST")

^SCR("P1HZMN","G",2,"SHEM")
creq
^SCR("P1HZMN","G",2,"TYP")
N
^SCR("P1HZMN","G",3,"CRD")
7,66,H,13,0
^SCR("P1HZMN","G",3,"HELP")

^SCR("P1HZMN","G",3,"LMAX")
13
^SCR("P1HZMN","G",3,"MUMPS1")

^SCR("P1HZMN","G",3,"MUMPS2")

^SCR("P1HZMN","G",3,"MUST")

^SCR("P1HZMN","G",3,"SHEM")
  oinfnd my  
^SCR("P1HZMN","G",3,"TYP")
H
^SCR("P1HZMN","G",4,"CRD")
7,52,E,10,0
^SCR("P1HZMN","G",4,"HELP")

^SCR("P1HZMN","G",4,"LMAX")
11
^SCR("P1HZMN","G",4,"MUMPS1")

^SCR("P1HZMN","G",4,"MUMPS2")
I $L(TEL),$L(TEL)<6 S %SC("ER")=1
^SCR("P1HZMN","G",4,"SHEM")
   oetlh   
^SCR("P1HZMN","G",4,"TYP")
E
^SCR("P1HZMN","G",5,"CRD")
7,40,E,10,0
^SCR("P1HZMN","G",5,"HELP")

^SCR("P1HZMN","G",5,"LMAX")
10
^SCR("P1HZMN","G",5,"MUMPS1")

^SCR("P1HZMN","G",5,"MUMPS2")
I $L(PEL),$L(PEL)<6 S %SC("ER")=1
^SCR("P1HZMN","G",5,"SHEM")
  oet`lt  
^SCR("P1HZMN","G",5,"TYP")
E
^SCR("P1HZMN","G",6,"CRD")
7,29,H,1,0
^SCR("P1HZMN","G",6,"HELP")
"l" e` "k"
^SCR("P1HZMN","G",6,"LMAX")
6
^SCR("P1HZMN","G",6,"MUMPS1")

^SCR("P1HZMN","G",6,"MUMPS2")
I $$^%L1YN("MEASHN")<0 S %SC("ER")=1
^SCR("P1HZMN","G",6,"SHEM")
mipyrn
^SCR("P1HZMN","G",6,"TYP")
H
^SCR("P1HZMN","G",7,"CRD")
7,22,H,1,0
^SCR("P1HZMN","G",7,"HELP")
"l" e` "k"
^SCR("P1HZMN","G",7,"LMAX")
4
^SCR("P1HZMN","G",7,"MUMPS1")

^SCR("P1HZMN","G",7,"MUMPS2")
I $$^%L1YN("ERUA")<0 S %SC("ER")=1
^SCR("P1HZMN","G",7,"SHEM")
rex`
^SCR("P1HZMN","G",7,"TYP")
H
^SCR("P1HZMN","G",8,"CRD")
7,17,E,12,0
^SCR("P1HZMN","G",8,"HELP")
3,5,6-8 : dnbecl
^SCR("P1HZMN","G",8,"LMAX")
14
^SCR("P1HZMN","G",8,"MUMPS1")

^SCR("P1HZMN","G",8,"MUMPS2")
D BDKRS^P1HZMN
^SCR("P1HZMN","G",8,"SHEM")
    zepgley   
^SCR("P1HZMN","G",8,"TYP")
E
^SCR("P1HZMN","G",9,"CRD")
7,+66,H,30,0
^SCR("P1HZMN","G",9,"HELP")
"l" e` "k"
^SCR("P1HZMN","G",9,"LMAX")
37
^SCR("P1HZMN","G",9,"MUMPS1")

^SCR("P1HZMN","G",9,"MUMPS2")

^SCR("P1HZMN","G",9,"SHEM")
                 dxrd                
^SCR("P1HZMN","G",9,"TYP")
H
^SCR("P1HZMN","G",10,"CRD")
7,+28,H,7,0
^SCR("P1HZMN","G",10,"HELP")

^SCR("P1HZMN","G",10,"LMAX")
7
^SCR("P1HZMN","G",10,"MUMPS1")

^SCR("P1HZMN","G",10,"MUMPS2")

^SCR("P1HZMN","G",10,"SHEM")
 lawnd 
^SCR("P1HZMN","G",10,"TYP")
H
^SCR("P1HZMN","G","DEL")
Y
^SCR("P1HZMN","G","MAX")
9999
^SCR("P1HZMN","G","NAME","ERUA")
7
^SCR("P1HZMN","G","NAME","HRA")
9
^SCR("P1HZMN","G","NAME","MEASHN")
6
^SCR("P1HZMN","G","NAME","MKBL")
10
^SCR("P1HZMN","G","NAME","PEL")
5
^SCR("P1HZMN","G","NAME","SHEM")
3
^SCR("P1HZMN","G","NAME","SHULHRS")
8
^SCR("P1HZMN","G","NAME","SOAD")
2
^SCR("P1HZMN","G","NAME","TEL")
4
^SCR("P1HZMN","G","NAME","TM")
1
^SCR("P1HZMN","G","NM",1)
TM
^SCR("P1HZMN","G","NM",2)
SOAD
^SCR("P1HZMN","G","NM",3)
SHEM
^SCR("P1HZMN","G","NM",4)
TEL
^SCR("P1HZMN","G","NM",5)
PEL
^SCR("P1HZMN","G","NM",6)
MEASHN
^SCR("P1HZMN","G","NM",7)
ERUA
^SCR("P1HZMN","G","NM",8)
SHULHRS
^SCR("P1HZMN","G","NM",9)
HRA
^SCR("P1HZMN","G","NM",10)
MKBL
^SCR("P1HZMN","G","RB")
5,2,22,79
^SCR("P1HZMN","G","REF")
^TEMP($P,"H"
^SCR("P1HZMN","G","RZD")
\
^SCR("P1HZMN","G","STEP")
3
^SCR("P1HZMN","G","STG")
  :    zepgley   :rex`:mipyrn:  oet`lt  :   oetlh   :  oinfnd my  :creq: dry : 
^SCR("P1HZMN","G","VG")
8
^SCR("P1HZMN","NAME")

^SCR("P1HZMN","P",5,"CRD")
3,53,D,8,0
^SCR("P1HZMN","P",5,"HELP")

^SCR("P1HZMN","P",5,"LMAX")
8
^SCR("P1HZMN","P",5,"MUMPS1")

^SCR("P1HZMN","P",5,"MUMPS2")

^SCR("P1HZMN","P",5,"OUTPUT")

^SCR("P1HZMN","P",5,"TYP")
D
^SCR("P1HZMN","P",10,"CRD")
3,41,E,2,0
^SCR("P1HZMN","P",10,"HELP")

^SCR("P1HZMN","P",10,"LMAX")
4
^SCR("P1HZMN","P",10,"MUMPS1")

^SCR("P1HZMN","P",10,"MUMPS2")

^SCR("P1HZMN","P",10,"OUTPUT")

^SCR("P1HZMN","P",10,"TYP")
E
^SCR("P1HZMN","P",20,"CRD")
22,54,N,7,0
^SCR("P1HZMN","P",20,"HELP")

^SCR("P1HZMN","P",20,"LMAX")
7
^SCR("P1HZMN","P",20,"MUMPS1")

^SCR("P1HZMN","P",20,"MUMPS2")

^SCR("P1HZMN","P",20,"OUTPUT")

^SCR("P1HZMN","P",20,"TYP")
N
^SCR("P1HZMN","P","NAME","DAT")
5
^SCR("P1HZMN","P","NAME","JOM")
10
^SCR("P1HZMN","P","NAME","SSOAD")
20
^SCR("P1HZMN","P","NM",5)
DAT
^SCR("P1HZMN","P","NM",10)
JOM
^SCR("P1HZMN","P","NM",20)
SSOAD
^SCR("P1HZMN1")
H
^SCR("P1HZMN1",1)
                                     # ogley zepnfd #                          
^SCR("P1HZMN1",2)
                                                                               
^SCR("P1HZMN1",3)
                                         {10 } mei   {05     }: jix`z          
^SCR("P1HZMN1",4)
                                                                             1$
^SCR("P1HZMN1",5)
  :        zegley     :   oinfnd my   :  oet`lt   : oinfnd lh: micreq : dry :  
^SCR("P1HZMN1",6)
   \ lawnd \                 dxrd                      \rex`\                  
^SCR("P1HZMN1",7)
                                                                               
^SCR("P1HZMN1",8)
                                                                               
^SCR("P1HZMN1",9)
                                                                               
^SCR("P1HZMN1",10)
                                                                               
^SCR("P1HZMN1",11)
                                                                               
^SCR("P1HZMN1",12)
                                                                               
^SCR("P1HZMN1",13)
                                                                               
^SCR("P1HZMN1",14)
                                                                               
^SCR("P1HZMN1",15)
                                                                               
^SCR("P1HZMN1",16)
                                                                               
^SCR("P1HZMN1",17)
                                                                               
^SCR("P1HZMN1",18)
                                                                               
^SCR("P1HZMN1",19)
                                                                               
^SCR("P1HZMN1",20)
                                                                               
^SCR("P1HZMN1",21)
 $1                                                                            
^SCR("P1HZMN1",22)
                                                      {20    } : micreq k"dq   
^SCR("P1HZMN1","A",1)
�‡Œ…™š…�Ž†„
^SCR("P1HZMN1","A",2)

^SCR("P1HZMN1","A",3)
�…‰:Š‰˜€š
^SCR("P1HZMN1","A",4)

^SCR("P1HZMN1","A",5)
š…‡Œ…™�‰Ž†Ž„�™�…”€Œ”�‰Ž†Ž„Œˆ�‰ƒ’…‘„’™
^SCR("P1HZMN1","A",6)
Œ�—Ž„„˜’„’…˜€
^SCR("P1HZMN1","A",7)
----------------------------------------------------------------------
^SCR("P1HZMN1","A",8)

^SCR("P1HZMN1","A",9)

^SCR("P1HZMN1","A",10)

^SCR("P1HZMN1","A",11)

^SCR("P1HZMN1","A",12)

^SCR("P1HZMN1","A",13)

^SCR("P1HZMN1","A",14)

^SCR("P1HZMN1","A",15)

^SCR("P1HZMN1","A",16)

^SCR("P1HZMN1","A",17)

^SCR("P1HZMN1","A",18)

^SCR("P1HZMN1","A",19)

^SCR("P1HZMN1","A",20)

^SCR("P1HZMN1","A",21)

^SCR("P1HZMN1","A",22)
:�‰ƒ’…‘‹"„‘
^SCR("P1HZMN1","AV",1)
ijkua,ubnzv
^SCR("P1HZMN1","AV",2)

^SCR("P1HZMN1","AV",3)
ouh:lhrt,
^SCR("P1HZMN1","AV",4)

^SCR("P1HZMN1","AV",5)
,ujkuaihnznvoaiuptkpihnznvkyohsguxvga
^SCR("P1HZMN1","AV",6)
kcenvvrgvgurt
^SCR("P1HZMN1","AV",7)
----------------------------------------------------------------------
^SCR("P1HZMN1","AV",8)

^SCR("P1HZMN1","AV",9)

^SCR("P1HZMN1","AV",10)

^SCR("P1HZMN1","AV",11)

^SCR("P1HZMN1","AV",12)

^SCR("P1HZMN1","AV",13)

^SCR("P1HZMN1","AV",14)

^SCR("P1HZMN1","AV",15)

^SCR("P1HZMN1","AV",16)

^SCR("P1HZMN1","AV",17)

^SCR("P1HZMN1","AV",18)

^SCR("P1HZMN1","AV",19)

^SCR("P1HZMN1","AV",20)

^SCR("P1HZMN1","AV",21)

^SCR("P1HZMN1","AV",22)
:ohsguxf"vx
^SCR("P1HZMN1","G",1,"CRD")
7,76,T,5,0
^SCR("P1HZMN1","G",1,"HELP")

^SCR("P1HZMN1","G",1,"LMAX")
5
^SCR("P1HZMN1","G",1,"MUMPS1")
D TEL0^P1HZMN1
^SCR("P1HZMN1","G",1,"MUMPS2")
D TEL^P1HZMN1("TM")
^SCR("P1HZMN1","G",1,"MUST")

^SCR("P1HZMN1","G",1,"SHEM")
 dry 
^SCR("P1HZMN1","G",1,"TYP")
T
^SCR("P1HZMN1","G",2,"CRD")
7,70,N,3,0
^SCR("P1HZMN1","G",2,"HELP")

^SCR("P1HZMN1","G",2,"LMAX")
8
^SCR("P1HZMN1","G",2,"MUMPS1")
D TEL0^P1HZMN1
^SCR("P1HZMN1","G",2,"MUMPS2")
D TEL^P1HZMN1("SOAD")
^SCR("P1HZMN1","G",2,"MUST")

^SCR("P1HZMN1","G",2,"SHEM")
 micreq 
^SCR("P1HZMN1","G",2,"TYP")
N
^SCR("P1HZMN1","G",3,"CRD")
7,61,E,10,0
^SCR("P1HZMN1","G",3,"HELP")

^SCR("P1HZMN1","G",3,"LMAX")
10
^SCR("P1HZMN1","G",3,"MUMPS1")
D TEL0^P1HZMN1
^SCR("P1HZMN1","G",3,"MUMPS2")
D TEL^P1HZMN1("TEL")
^SCR("P1HZMN1","G",3,"MUST")

^SCR("P1HZMN1","G",3,"SHEM")
 oinfnd lh
^SCR("P1HZMN1","G",3,"TYP")
E
^SCR("P1HZMN1","G",4,"CRD")
7,50,E,10,0
^SCR("P1HZMN1","G",4,"HELP")

^SCR("P1HZMN1","G",4,"LMAX")
11
^SCR("P1HZMN1","G",4,"MUMPS1")
D TEL0^P1HZMN1
^SCR("P1HZMN1","G",4,"MUMPS2")
D TEL^P1HZMN1("PELE")
^SCR("P1HZMN1","G",4,"SHEM")
  oet`lt   
^SCR("P1HZMN1","G",4,"TYP")
E
^SCR("P1HZMN1","G",5,"CRD")
7,38,H,15,0
^SCR("P1HZMN1","G",5,"HELP")

^SCR("P1HZMN1","G",5,"LMAX")
15
^SCR("P1HZMN1","G",5,"MUMPS1")
D TEL0^P1HZMN1
^SCR("P1HZMN1","G",5,"MUMPS2")
D TEL^P1HZMN1("SHEM")
^SCR("P1HZMN1","G",5,"SHEM")
   oinfnd my   
^SCR("P1HZMN1","G",5,"TYP")
H
^SCR("P1HZMN1","G",6,"CRD")
7,22,E,19,0
^SCR("P1HZMN1","G",6,"HELP")
<F9> - mle` bivdl ; 6,8-10,12 :dnbecl
^SCR("P1HZMN1","G",6,"LMAX")
19
^SCR("P1HZMN1","G",6,"MUMPS1")

^SCR("P1HZMN1","G",6,"MUMPS2")
D BDKRS^P1HZMN1
^SCR("P1HZMN1","G",6,"SHEM")
        zegley     
^SCR("P1HZMN1","G",6,"TYP")
E
^SCR("P1HZMN1","G",7,"CRD")
7,+60,H,1,0
^SCR("P1HZMN1","G",7,"HELP")
"l" e` "k"
^SCR("P1HZMN1","G",7,"LMAX")
4
^SCR("P1HZMN1","G",7,"MUMPS1")

^SCR("P1HZMN1","G",7,"MUMPS2")
I STATUS'="",$$^%L1YN("STATUS")<0 S %SC("ER")=1
^SCR("P1HZMN1","G",7,"SHEM")
rex`
^SCR("P1HZMN1","G",7,"TYP")
H
^SCR("P1HZMN1","G",8,"CRD")
7,+55,H,40,0
^SCR("P1HZMN1","G",8,"HELP")

^SCR("P1HZMN1","G",8,"LMAX")
43
^SCR("P1HZMN1","G",8,"MUMPS1")

^SCR("P1HZMN1","G",8,"MUMPS2")

^SCR("P1HZMN1","G",8,"SHEM")
                 dxrd                      
^SCR("P1HZMN1","G",8,"TYP")
H
^SCR("P1HZMN1","G",9,"CRD")
7,+11,H,7,0
^SCR("P1HZMN1","G",9,"HELP")

^SCR("P1HZMN1","G",9,"LMAX")
7
^SCR("P1HZMN1","G",9,"MUMPS1")

^SCR("P1HZMN1","G",9,"MUMPS2")

^SCR("P1HZMN1","G",9,"MUST")

^SCR("P1HZMN1","G",9,"SHEM")
 lawnd 
^SCR("P1HZMN1","G",9,"TYP")
H
^SCR("P1HZMN1","G","DEL")
Y
^SCR("P1HZMN1","G","MAX")
9999
^SCR("P1HZMN1","G","NAME","HRA")
8
^SCR("P1HZMN1","G","NAME","MKBL")
9
^SCR("P1HZMN1","G","NAME","PELE")
4
^SCR("P1HZMN1","G","NAME","SHEM")
5
^SCR("P1HZMN1","G","NAME","SHULHRS")
6
^SCR("P1HZMN1","G","NAME","SOAD")
2
^SCR("P1HZMN1","G","NAME","STATUS")
7
^SCR("P1HZMN1","G","NAME","TEL")
3
^SCR("P1HZMN1","G","NAME","TM")
1
^SCR("P1HZMN1","G","NM",1)
TM
^SCR("P1HZMN1","G","NM",2)
SOAD
^SCR("P1HZMN1","G","NM",3)
TEL
^SCR("P1HZMN1","G","NM",4)
PELE
^SCR("P1HZMN1","G","NM",5)
SHEM
^SCR("P1HZMN1","G","NM",6)
SHULHRS
^SCR("P1HZMN1","G","NM",7)
STATUS
^SCR("P1HZMN1","G","NM",8)
HRA
^SCR("P1HZMN1","G","NM",9)
MKBL
^SCR("P1HZMN1","G","RB")
5,2,22,79
^SCR("P1HZMN1","G","REF")
^TEMP($P,"H"
^SCR("P1HZMN1","G","RZD")
\
^SCR("P1HZMN1","G","STEP")
3
^SCR("P1HZMN1","G","STG")
  :        zegley     :   oinfnd my   :  oet`lt   : oinfnd lh: micreq : dry :  
^SCR("P1HZMN1","G","VG")
8
^SCR("P1HZMN1","NAME")
cizrl zepnfd
^SCR("P1HZMN1","P",5,"CRD")
3,53,D,8,0
^SCR("P1HZMN1","P",5,"HELP")

^SCR("P1HZMN1","P",5,"LMAX")
8
^SCR("P1HZMN1","P",5,"MUMPS1")

^SCR("P1HZMN1","P",5,"MUMPS2")

^SCR("P1HZMN1","P",5,"OUTPUT")

^SCR("P1HZMN1","P",5,"TYP")
D
^SCR("P1HZMN1","P",10,"CRD")
3,41,E,2,0
^SCR("P1HZMN1","P",10,"HELP")

^SCR("P1HZMN1","P",10,"LMAX")
4
^SCR("P1HZMN1","P",10,"MUMPS1")

^SCR("P1HZMN1","P",10,"MUMPS2")

^SCR("P1HZMN1","P",10,"OUTPUT")

^SCR("P1HZMN1","P",10,"TYP")
E
^SCR("P1HZMN1","P",20,"CRD")
22,54,N,7,0
^SCR("P1HZMN1","P",20,"HELP")

^SCR("P1HZMN1","P",20,"LMAX")
7
^SCR("P1HZMN1","P",20,"MUMPS1")

^SCR("P1HZMN1","P",20,"MUMPS2")

^SCR("P1HZMN1","P",20,"OUTPUT")

^SCR("P1HZMN1","P",20,"TYP")
N
^SCR("P1HZMN1","P","NAME","DAT")
5
^SCR("P1HZMN1","P","NAME","JOM")
10
^SCR("P1HZMN1","P","NAME","SSOAD")
20
^SCR("P1HZMN1","P","NM",5)
DAT
^SCR("P1HZMN1","P","NM",10)
JOM
^SCR("P1HZMN1","P","NM",20)
SSOAD
^SCR("P1HZMN11")
H
^SCR("P1HZMN11","NAME")

^SCR("P1HZMS")
H
^SCR("P1HZMS",1)
 {08     }:dtew 'z {             34}{33       } gewl {        03} {01   }: xvln
^SCR("P1HZMS",2)
 {31             }:  dpnfd zlaw onf   {      12}: dpnfd 'qn {    06}{05 }:ogley
^SCR("P1HZMS",3)
            {37  }: oexg` oekcr onf        {35 }:micreq 'qn {              32} 
^SCR("P1HZMS",4)
                                                                             1$
^SCR("P1HZMS",5)
 :        dxrd      :  mekq :zetqez: zenk: xign :     hixt xe`z    : : cew :   
^SCR("P1HZMS",6)
                                                                               
^SCR("P1HZMS",7)
                                                                               
^SCR("P1HZMS",8)
                                                                               
^SCR("P1HZMS",9)
                                                                               
^SCR("P1HZMS",10)
                                                                               
^SCR("P1HZMS",11)
                                                                               
^SCR("P1HZMS",12)
                                                                               
^SCR("P1HZMS",13)
                                                                               
^SCR("P1HZMS",14)
                                                                               
^SCR("P1HZMS",15)
                                                                               
^SCR("P1HZMS",16)
                                                                               
^SCR("P1HZMS",17)
                                                                               
^SCR("P1HZMS",18)
                                                                               
^SCR("P1HZMS",19)
 $1                                                                            
^SCR("P1HZMS",20)
     {48           }  {46   }={45  }:(%)zexy inc     g"y {41    }={40   }dgpd %
^SCR("P1HZMS",21)
   61}{60    }scer {59     }:dxzi {58     }:dtwd {57     }:mley {56     :melyzl
^SCR("P1HZMS",22)
    {76    }  tih      {74    }:i`xy` oeayg {73    }:oeayg {72    }:zipeayg 'qn
^SCR("P1HZMS",23)
  <CTRL>+C - micreq 'qn okcrl {82   }:creql {                          80}:dxrd
^SCR("P1HZMS","A",1)
:„”…—'š‡…—Œ:˜–ŒŽ
^SCR("P1HZMS","A",2)
:„�Ž†„šŒ�—�Ž†:„�Ž†„'‘Ž:�‡Œ…™
^SCR("P1HZMS","A",3)
:�…˜‡€�…‹ƒ’�Ž†:�‰ƒ’…‘'‘Ž
^SCR("P1HZMS","A",4)

^SCR("P1HZMS","A",5)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1HZMS","A",6)
---------------------------------------------------------------------
^SCR("P1HZMS","A",7)

^SCR("P1HZMS","A",8)

^SCR("P1HZMS","A",9)

^SCR("P1HZMS","A",10)

^SCR("P1HZMS","A",11)

^SCR("P1HZMS","A",12)

^SCR("P1HZMS","A",13)

^SCR("P1HZMS","A",14)

^SCR("P1HZMS","A",15)

^SCR("P1HZMS","A",16)

^SCR("P1HZMS","A",17)

^SCR("P1HZMS","A",18)

^SCR("P1HZMS","A",19)

^SCR("P1HZMS","A",20)
=:(%)š…˜™‰Žƒ‡"™=„‡�„%
^SCR("P1HZMS","A",21)
“ƒ…’:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZMS","A",22)
”‰ˆ:‰€˜™€�…�™‡:�…�™‡:š‰�…�™‡'‘Ž
^SCR("P1HZMS","A",23)
<CTRL>+C-�‰ƒ’…‘'‘Ž�‹ƒ’Œ:ƒ’…‘Œ:„˜’„
^SCR("P1HZMS","AV",1)
:vpuew,juek:rmkn
^SCR("P1HZMS","AV",2)
:vbnzv,kceinz:vbnzvwxn:ijkua
^SCR("P1HZMS","AV",3)
:iurjtiufsginz:ohsguxwxn
^SCR("P1HZMS","AV",4)

^SCR("P1HZMS","AV",5)
vrgvoufx,upxu,,unfrhjnyhrprut,sue
^SCR("P1HZMS","AV",6)
---------------------------------------------------------------------
^SCR("P1HZMS","AV",7)

^SCR("P1HZMS","AV",8)

^SCR("P1HZMS","AV",9)

^SCR("P1HZMS","AV",10)

^SCR("P1HZMS","AV",11)

^SCR("P1HZMS","AV",12)

^SCR("P1HZMS","AV",13)

^SCR("P1HZMS","AV",14)

^SCR("P1HZMS","AV",15)

^SCR("P1HZMS","AV",16)

^SCR("P1HZMS","AV",17)

^SCR("P1HZMS","AV",18)

^SCR("P1HZMS","AV",19)

^SCR("P1HZMS","AV",20)
=:(%),urahnsj"a=vjbv%
^SCR("P1HZMS","AV",21)
;sug:vr,h:vpev:okua:ouka,k
^SCR("P1HZMS","AV",22)
phy:htratiucaj:iucaj:,hbucajwxn
^SCR("P1HZMS","AV",23)
<CTRL>+C-ohsguxwxnifsgk:sguxk:vrgv
^SCR("P1HZMS","G",1,"CRD")
6,75,E,5,0
^SCR("P1HZMS","G",1,"FNC")
F9,F10,F8,PGRG,=,F2
^SCR("P1HZMS","G",1,"GLOB")
PAR
^SCR("P1HZMS","G",1,"HELP")
<F2>-dpnfd zbvd,<F10>-zetqez zbvd,<F9>-zetqez,<F8>-zeveaw,<F7>-dlah,<F6>-my
^SCR("P1HZMS","G",1,"LMAX")
5
^SCR("P1HZMS","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZMS","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZMS","G",1,"MUST")

^SCR("P1HZMS","G",1,"NLN")
20
^SCR("P1HZMS","G",1,"RZD")
**
^SCR("P1HZMS","G",1,"SHEM")
 cew 
^SCR("P1HZMS","G",1,"TOPB")
8
^SCR("P1HZMS","G",1,"TYP")
E
^SCR("P1HZMS","G",1,"VRB")
PAR1
^SCR("P1HZMS","G",2,"CRD")
6,69,E,1,0
^SCR("P1HZMS","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZMS","G",2,"LMAX")
1
^SCR("P1HZMS","G",2,"MUMPS1")

^SCR("P1HZMS","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZMS","G",2,"OUTPUT")

^SCR("P1HZMS","G",2,"SHEM")
 
^SCR("P1HZMS","G",2,"TYP")
E
^SCR("P1HZMS","G",3,"CRD")
6,67,H,18,0
^SCR("P1HZMS","G",3,"HELP")

^SCR("P1HZMS","G",3,"LMAX")
18
^SCR("P1HZMS","G",3,"MUMPS1")

^SCR("P1HZMS","G",3,"MUMPS2")

^SCR("P1HZMS","G",3,"OUTPUT")

^SCR("P1HZMS","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZMS","G",3,"TYP")
H
^SCR("P1HZMS","G",4,"CRD")
6,48,N,6,2
^SCR("P1HZMS","G",4,"HELP")

^SCR("P1HZMS","G",4,"LMAX")
6
^SCR("P1HZMS","G",4,"MUMPS1")

^SCR("P1HZMS","G",4,"MUMPS2")
D MH^P1HZMS
^SCR("P1HZMS","G",4,"OUTPUT")

^SCR("P1HZMS","G",4,"SHEM")
 xign 
^SCR("P1HZMS","G",4,"TYP")
N
^SCR("P1HZMS","G",5,"CRD")
6,41,N,5,0
^SCR("P1HZMS","G",5,"HELP")

^SCR("P1HZMS","G",5,"LMAX")
5
^SCR("P1HZMS","G",5,"MUMPS1")
D KAM0^P1HZMS
^SCR("P1HZMS","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZMS","G",5,"MUST")

^SCR("P1HZMS","G",5,"SHEM")
 zenk
^SCR("P1HZMS","G",5,"TYP")
N
^SCR("P1HZMS","G",6,"CRD")
6,35,N,6,2
^SCR("P1HZMS","G",6,"HELP")

^SCR("P1HZMS","G",6,"LMAX")
6
^SCR("P1HZMS","G",6,"MUMPS1")

^SCR("P1HZMS","G",6,"MUMPS2")

^SCR("P1HZMS","G",6,"OUTPUT")

^SCR("P1HZMS","G",6,"SHEM")
zetqez
^SCR("P1HZMS","G",6,"TYP")
N
^SCR("P1HZMS","G",7,"CRD")
6,28,N,7,2
^SCR("P1HZMS","G",7,"HELP")

^SCR("P1HZMS","G",7,"LMAX")
7
^SCR("P1HZMS","G",7,"MUMPS1")

^SCR("P1HZMS","G",7,"MUMPS2")

^SCR("P1HZMS","G",7,"OUTPUT")

^SCR("P1HZMS","G",7,"SHEM")
  mekq 
^SCR("P1HZMS","G",7,"TYP")
N
^SCR("P1HZMS","G",8,"CRD")
6,20,H,18,0
^SCR("P1HZMS","G",8,"HELP")

^SCR("P1HZMS","G",8,"LMAX")
18
^SCR("P1HZMS","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZMS","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZMS","G",8,"SHEM")
        dxrd      
^SCR("P1HZMS","G",8,"TYP")
H
^SCR("P1HZMS","G","DEL")
Y
^SCR("P1HZMS","G","MAX")
9999
^SCR("P1HZMS","G","NAME","HRP")
8
^SCR("P1HZMS","G","NAME","KAM")
5
^SCR("P1HZMS","G","NAME","MH")
4
^SCR("P1HZMS","G","NAME","PAR")
1
^SCR("P1HZMS","G","NAME","PAR1")
3
^SCR("P1HZMS","G","NAME","SUG")
2
^SCR("P1HZMS","G","NAME","SUM")
7
^SCR("P1HZMS","G","NAME","TSF")
6
^SCR("P1HZMS","G","NM",1)
PAR
^SCR("P1HZMS","G","NM",2)
SUG
^SCR("P1HZMS","G","NM",3)
PAR1
^SCR("P1HZMS","G","NM",4)
MH
^SCR("P1HZMS","G","NM",5)
KAM
^SCR("P1HZMS","G","NM",6)
TSF
^SCR("P1HZMS","G","NM",7)
SUM
^SCR("P1HZMS","G","NM",8)
HRP
^SCR("P1HZMS","G","RB")
5,2,20,79
^SCR("P1HZMS","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZMS","G","RZD")
\
^SCR("P1HZMS","G","STEP")
1
^SCR("P1HZMS","G","STG")
 :        dxrd      :  mekq :zetqez: zenk: xign :     hixt xe`z    : : cew :   
^SCR("P1HZMS","G","VG")
7
^SCR("P1HZMS","NAME")
dcqinl dpnfd
^SCR("P1HZMS","P",1,"CRD")
1,66,E,5.,0
^SCR("P1HZMS","P",1,"HELP")
<F7> - mixvln zbvd 
^SCR("P1HZMS","P",1,"LMAX")
6
^SCR("P1HZMS","P",1,"MUMPS1")
D MLZR01^P1HZMS
^SCR("P1HZMS","P",1,"MUMPS2")
D MLZR0^P1HZMS
^SCR("P1HZMS","P",1,"MUST")

^SCR("P1HZMS","P",1,"TYP")
E
^SCR("P1HZMS","P",3,"CRD")
1,65,H,11
^SCR("P1HZMS","P",3,"HELP")

^SCR("P1HZMS","P",3,"LMAX")
11
^SCR("P1HZMS","P",3,"MUMPS1")

^SCR("P1HZMS","P",3,"MUMPS2")

^SCR("P1HZMS","P",3,"OUTPUT")

^SCR("P1HZMS","P",3,"TYP")
H
^SCR("P1HZMS","P",5,"CRD")
2,68,E,4,0
^SCR("P1HZMS","P",5,"HELP")
<F1> dxfr ,<F5>+ogley 'qn - dixehqid,<F9> dpnfd yetig,<F7> migezt zepgley
^SCR("P1HZMS","P",5,"LMAX")
4
^SCR("P1HZMS","P",5,"MUMPS1")

^SCR("P1HZMS","P",5,"MUMPS2")
D NMB^P1HZNM I $G(HZM) S NMB=$$^P3NMB(HZM)
^SCR("P1HZMS","P",5,"MUST")

^SCR("P1HZMS","P",5,"TYP")
E
^SCR("P1HZMS","P",6,"CRD")
2,68,H,7
^SCR("P1HZMS","P",6,"HELP")

^SCR("P1HZMS","P",6,"LMAX")
7
^SCR("P1HZMS","P",6,"MUMPS1")

^SCR("P1HZMS","P",6,"MUMPS2")

^SCR("P1HZMS","P",6,"OUTPUT")

^SCR("P1HZMS","P",6,"TYP")
H
^SCR("P1HZMS","P",8,"CRD")
1,1,D,8,0
^SCR("P1HZMS","P",8,"HELP")

^SCR("P1HZMS","P",8,"LMAX")
8
^SCR("P1HZMS","P",8,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZMS","P",8,"MUMPS2")

^SCR("P1HZMS","P",8,"OUTPUT")

^SCR("P1HZMS","P",8,"TYP")
D
^SCR("P1HZMS","P",12,"CRD")
2,48,H,7
^SCR("P1HZMS","P",12,"HELP")

^SCR("P1HZMS","P",12,"LMAX")
9
^SCR("P1HZMS","P",12,"MUMPS1")

^SCR("P1HZMS","P",12,"MUMPS2")

^SCR("P1HZMS","P",12,"OUTPUT")

^SCR("P1HZMS","P",12,"TYP")
H
^SCR("P1HZMS","P",31,"CRD")
2,1,E,16,0
^SCR("P1HZMS","P",31,"HELP")

^SCR("P1HZMS","P",31,"LMAX")
16
^SCR("P1HZMS","P",31,"MUMPS1")
D ZMANK0^P1HZMS
^SCR("P1HZMS","P",31,"MUMPS2")

^SCR("P1HZMS","P",31,"OUTPUT")

^SCR("P1HZMS","P",31,"TYP")
E
^SCR("P1HZMS","P",32,"CRD")
3,78,H,17
^SCR("P1HZMS","P",32,"HELP")

^SCR("P1HZMS","P",32,"LMAX")
17
^SCR("P1HZMS","P",32,"MUMPS1")

^SCR("P1HZMS","P",32,"MUMPS2")

^SCR("P1HZMS","P",32,"OUTPUT")

^SCR("P1HZMS","P",32,"TYP")
H
^SCR("P1HZMS","P",33,"CRD")
1,36,E,10,0
^SCR("P1HZMS","P",33,"FNC")

^SCR("P1HZMS","P",33,"GLOB")
LKH
^SCR("P1HZMS","P",33,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1HZMS","P",33,"LMAX")
10
^SCR("P1HZMS","P",33,"MUMPS1")
D LKHN0^P1HZMS
^SCR("P1HZMS","P",33,"MUMPS2")
D LKHN^P1HZMS
^SCR("P1HZMS","P",33,"NLN")
20
^SCR("P1HZMS","P",33,"RZD")
\
^SCR("P1HZMS","P",33,"TOPB")
8
^SCR("P1HZMS","P",33,"TYP")
E
^SCR("P1HZMS","P",33,"VRB")
LKHN1
^SCR("P1HZMS","P",34,"CRD")
1,36,H,16
^SCR("P1HZMS","P",34,"HELP")

^SCR("P1HZMS","P",34,"LMAX")
16
^SCR("P1HZMS","P",34,"MUMPS1")

^SCR("P1HZMS","P",34,"MUMPS2")

^SCR("P1HZMS","P",34,"OUTPUT")

^SCR("P1HZMS","P",34,"TYP")
H
^SCR("P1HZMS","P",35,"CRD")
3,43,E,3,0
^SCR("P1HZMS","P",35,"HELP")

^SCR("P1HZMS","P",35,"LMAX")
4
^SCR("P1HZMS","P",35,"MUMPS1")
D SOAD0^P1HZMS
^SCR("P1HZMS","P",35,"MUMPS2")
D SOAD^P1HZMS
^SCR("P1HZMS","P",35,"MUST")

^SCR("P1HZMS","P",35,"TYP")
E
^SCR("P1HZMS","P",37,"CRD")
3,12,E,5,0
^SCR("P1HZMS","P",37,"HELP")

^SCR("P1HZMS","P",37,"LMAX")
5
^SCR("P1HZMS","P",37,"MUMPS1")

^SCR("P1HZMS","P",37,"MUMPS2")

^SCR("P1HZMS","P",37,"OUTPUT")

^SCR("P1HZMS","P",37,"TYP")
E
^SCR("P1HZMS","P",40,"CRD")
20,66,E,6,0
^SCR("P1HZMS","P",40,"HELP")

^SCR("P1HZMS","P",40,"LMAX")
6
^SCR("P1HZMS","P",40,"MUMPS1")
D HNH00^P1HZMS
^SCR("P1HZMS","P",40,"MUMPS2")
D HNH0^P1HZMS
^SCR("P1HZMS","P",40,"TYP")
E
^SCR("P1HZMS","P",41,"CRD")
20,57,N,7,2
^SCR("P1HZMS","P",41,"HELP")

^SCR("P1HZMS","P",41,"LMAX")
7
^SCR("P1HZMS","P",41,"MUMPS1")

^SCR("P1HZMS","P",41,"MUMPS2")

^SCR("P1HZMS","P",41,"OUTPUT")

^SCR("P1HZMS","P",41,"TYP")
N
^SCR("P1HZMS","P",45,"CRD")
20,30,E,5,0
^SCR("P1HZMS","P",45,"HELP")

^SCR("P1HZMS","P",45,"LMAX")
5
^SCR("P1HZMS","P",45,"MUMPS1")

^SCR("P1HZMS","P",45,"MUMPS2")
D DMSAH^P1HZMS
^SCR("P1HZMS","P",45,"TYP")
E
^SCR("P1HZMS","P",46,"CRD")
20,22,N,6,2
^SCR("P1HZMS","P",46,"HELP")

^SCR("P1HZMS","P",46,"LMAX")
6
^SCR("P1HZMS","P",46,"MUMPS1")

^SCR("P1HZMS","P",46,"MUMPS2")

^SCR("P1HZMS","P",46,"OUTPUT")

^SCR("P1HZMS","P",46,"TYP")
N
^SCR("P1HZMS","P",48,"CRD")
20,5,E,14,0
^SCR("P1HZMS","P",48,"HELP")

^SCR("P1HZMS","P",48,"LMAX")
14
^SCR("P1HZMS","P",48,"MUMPS1")

^SCR("P1HZMS","P",48,"MUMPS2")

^SCR("P1HZMS","P",48,"OUTPUT")

^SCR("P1HZMS","P",48,"TYP")
E
^SCR("P1HZMS","P",56,"CRD")
21,64,E,8,0
^SCR("P1HZMS","P",56,"HELP")

^SCR("P1HZMS","P",56,"LMAX")
8
^SCR("P1HZMS","P",56,"MUMPS1")

^SCR("P1HZMS","P",56,"MUMPS2")

^SCR("P1HZMS","P",56,"OUTPUT")

^SCR("P1HZMS","P",56,"TYP")
E
^SCR("P1HZMS","P",57,"CRD")
21,49,N,8,2
^SCR("P1HZMS","P",57,"HELP")

^SCR("P1HZMS","P",57,"LMAX")
8
^SCR("P1HZMS","P",57,"MUMPS1")

^SCR("P1HZMS","P",57,"MUMPS2")

^SCR("P1HZMS","P",57,"OUTPUT")

^SCR("P1HZMS","P",57,"TYP")
N
^SCR("P1HZMS","P",58,"CRD")
21,34,N,8,2
^SCR("P1HZMS","P",58,"HELP")

^SCR("P1HZMS","P",58,"LMAX")
8
^SCR("P1HZMS","P",58,"MUMPS1")

^SCR("P1HZMS","P",58,"MUMPS2")

^SCR("P1HZMS","P",58,"OUTPUT")

^SCR("P1HZMS","P",58,"TYP")
N
^SCR("P1HZMS","P",59,"CRD")
21,19,N,8,2
^SCR("P1HZMS","P",59,"HELP")

^SCR("P1HZMS","P",59,"LMAX")
8
^SCR("P1HZMS","P",59,"MUMPS1")

^SCR("P1HZMS","P",59,"MUMPS2")

^SCR("P1HZMS","P",59,"OUTPUT")

^SCR("P1HZMS","P",59,"TYP")
N
^SCR("P1HZMS","P",60,"CRD")
21,6,N,7,2
^SCR("P1HZMS","P",60,"HELP")

^SCR("P1HZMS","P",60,"LMAX")
7
^SCR("P1HZMS","P",60,"MUMPS1")

^SCR("P1HZMS","P",60,"MUMPS2")

^SCR("P1HZMS","P",60,"OUTPUT")

^SCR("P1HZMS","P",60,"TYP")
N
^SCR("P1HZMS","P",61,"CRD")
21,6,H,4
^SCR("P1HZMS","P",61,"HELP")

^SCR("P1HZMS","P",61,"LMAX")
6
^SCR("P1HZMS","P",61,"MUMPS1")

^SCR("P1HZMS","P",61,"MUMPS2")

^SCR("P1HZMS","P",61,"OUTPUT")

^SCR("P1HZMS","P",61,"TYP")
H
^SCR("P1HZMS","P",72,"CRD")
22,59,E,7,0
^SCR("P1HZMS","P",72,"HELP")

^SCR("P1HZMS","P",72,"LMAX")
7
^SCR("P1HZMS","P",72,"MUMPS1")

^SCR("P1HZMS","P",72,"MUMPS2")

^SCR("P1HZMS","P",72,"OUTPUT")

^SCR("P1HZMS","P",72,"TYP")
E
^SCR("P1HZMS","P",73,"CRD")
22,44,E,7,0
^SCR("P1HZMS","P",73,"HELP")

^SCR("P1HZMS","P",73,"LMAX")
7
^SCR("P1HZMS","P",73,"MUMPS1")

^SCR("P1HZMS","P",73,"MUMPS2")

^SCR("P1HZMS","P",73,"OUTPUT")

^SCR("P1HZMS","P",73,"TYP")
E
^SCR("P1HZMS","P",74,"CRD")
22,23,E,7,0
^SCR("P1HZMS","P",74,"HELP")

^SCR("P1HZMS","P",74,"LMAX")
7
^SCR("P1HZMS","P",74,"MUMPS1")

^SCR("P1HZMS","P",74,"MUMPS2")

^SCR("P1HZMS","P",74,"OUTPUT")

^SCR("P1HZMS","P",74,"TYP")
E
^SCR("P1HZMS","P",76,"CRD")
22,4,N,7,2
^SCR("P1HZMS","P",76,"HELP")

^SCR("P1HZMS","P",76,"LMAX")
7
^SCR("P1HZMS","P",76,"MUMPS1")

^SCR("P1HZMS","P",76,"MUMPS2")

^SCR("P1HZMS","P",76,"OUTPUT")

^SCR("P1HZMS","P",76,"TYP")
N
^SCR("P1HZMS","P",80,"CRD")
23,74,H,29,0
^SCR("P1HZMS","P",80,"HELP")

^SCR("P1HZMS","P",80,"LMAX")
29
^SCR("P1HZMS","P",80,"MUMPS1")
D HRA20^P1HZMS
^SCR("P1HZMS","P",80,"MUMPS2")

^SCR("P1HZMS","P",80,"TYP")
H
^SCR("P1HZMS","P",82,"CRD")
23,30,N,6,2
^SCR("P1HZMS","P",82,"HELP")

^SCR("P1HZMS","P",82,"LMAX")
6
^SCR("P1HZMS","P",82,"MUMPS1")

^SCR("P1HZMS","P",82,"MUMPS2")

^SCR("P1HZMS","P",82,"OUTPUT")

^SCR("P1HZMS","P",82,"TYP")
N
^SCR("P1HZMS","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZMS","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZMS","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZMS","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZMS","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZMS","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZMS","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZMS","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZMS","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZMS","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZMS","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZMS","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZMS","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZMS","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZMS","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZMS","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZMS","P","NAME","DATK")
8
^SCR("P1HZMS","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZMS","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZMS","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZMS","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZMS","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZMS","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZMS","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZMS","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZMS","P","NAME","DMSAH")
45
^SCR("P1HZMS","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZMS","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZMS","P","NAME","DMSH")
46
^SCR("P1HZMS","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZMS","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZMS","P","NAME","FIRE")
48
^SCR("P1HZMS","P","NAME","FIRE","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",4)
^SCR("P1HZMS","P","NAME","FIRE","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",4)
^SCR("P1HZMS","P","NAME","HNH")
41
^SCR("P1HZMS","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZMS","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZMS","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZMS","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZMS","P","NAME","HNHAH")
40
^SCR("P1HZMS","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZMS","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZMS","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZMS","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZMS","P","NAME","HODAA")
32
^SCR("P1HZMS","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZMS","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZMS","P","NAME","HRA2")
80
^SCR("P1HZMS","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZMS","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZMS","P","NAME","HSB")
73
^SCR("P1HZMS","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZMS","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZMS","P","NAME","HSB2")
74
^SCR("P1HZMS","P","NAME","HZM")
12
^SCR("P1HZMS","P","NAME","HZM","KEY")

^SCR("P1HZMS","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK
^SCR("P1HZMS","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZMS","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL
^SCR("P1HZMS","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD,,FIRE
^SCR("P1HZMS","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZMS","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZMS","P","NAME","ITRA")
59
^SCR("P1HZMS","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZMS","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZMS","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZMS","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZMS","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZMS","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZMS","P","NAME","LKHN")
33
^SCR("P1HZMS","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZMS","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZMS","P","NAME","LKHN1")
34
^SCR("P1HZMS","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZMS","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZMS","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZMS","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZMS","P","NAME","MLZR0")
1
^SCR("P1HZMS","P","NAME","MLZR1")
3
^SCR("P1HZMS","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZMS","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZMS","P","NAME","MSOAD")
82
^SCR("P1HZMS","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZMS","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZMS","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZMS","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZMS","P","NAME","NCAB")
72
^SCR("P1HZMS","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZMS","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZMS","P","NAME","NMB")
5
^SCR("P1HZMS","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZMS","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZMS","P","NAME","NMB1")
6
^SCR("P1HZMS","P","NAME","ODEF")
60
^SCR("P1HZMS","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZMS","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZMS","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZMS","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZMS","P","NAME","OTL")
61
^SCR("P1HZMS","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZMS","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZMS","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZMS","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZMS","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZMS","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZMS","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZMS","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZMS","P","NAME","SHUL1")
57
^SCR("P1HZMS","P","NAME","SHULA")
58
^SCR("P1HZMS","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZMS","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZMS","P","NAME","SOAD")
35
^SCR("P1HZMS","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZMS","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZMS","P","NAME","TIP")
76
^SCR("P1HZMS","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZMS","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZMS","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZMS","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZMS","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZMS","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZMS","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZMS","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZMS","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZMS","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZMS","P","NAME","TSHL")
56
^SCR("P1HZMS","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZMS","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZMS","P","NAME","ZMANI")
37
^SCR("P1HZMS","P","NAME","ZMANK")
31
^SCR("P1HZMS","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZMS","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZMS","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZMS","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZMS","P","NM",1)
MLZR0
^SCR("P1HZMS","P","NM",3)
MLZR1
^SCR("P1HZMS","P","NM",5)
NMB
^SCR("P1HZMS","P","NM",6)
NMB1
^SCR("P1HZMS","P","NM",8)
DATK
^SCR("P1HZMS","P","NM",12)
HZM
^SCR("P1HZMS","P","NM",31)
ZMANK
^SCR("P1HZMS","P","NM",32)
HODAA
^SCR("P1HZMS","P","NM",33)
LKHN
^SCR("P1HZMS","P","NM",34)
LKHN1
^SCR("P1HZMS","P","NM",35)
SOAD
^SCR("P1HZMS","P","NM",37)
ZMANI
^SCR("P1HZMS","P","NM",40)
HNHAH
^SCR("P1HZMS","P","NM",41)
HNH
^SCR("P1HZMS","P","NM",45)
DMSAH
^SCR("P1HZMS","P","NM",46)
DMSH
^SCR("P1HZMS","P","NM",48)
FIRE
^SCR("P1HZMS","P","NM",56)
TSHL
^SCR("P1HZMS","P","NM",57)
SHUL1
^SCR("P1HZMS","P","NM",58)
SHULA
^SCR("P1HZMS","P","NM",59)
ITRA
^SCR("P1HZMS","P","NM",60)
ODEF
^SCR("P1HZMS","P","NM",61)
OTL
^SCR("P1HZMS","P","NM",72)
NCAB
^SCR("P1HZMS","P","NM",73)
HSB
^SCR("P1HZMS","P","NM",74)
HSB2
^SCR("P1HZMS","P","NM",76)
TIP
^SCR("P1HZMS","P","NM",80)
HRA2
^SCR("P1HZMS","P","NM",82)
MSOAD
^SCR("P1HZMS","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZMS","P","REF",1,"RZD")
\
^SCR("P1HZMS","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK
^SCR("P1HZMS","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZMS","P","REF",2,"RZD")
\
^SCR("P1HZMS","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZMS","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZMS","P","REF",3,"RZD")
\
^SCR("P1HZMS","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL
^SCR("P1HZMS","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZMS","P","REF",4,"RZD")
\\
^SCR("P1HZMS","P","REF",4,"STR")
HRA2\\HODAA\\MSD\\FIRE
^SCR("P1HZMS0")
H
^SCR("P1HZMS0",1)
 {08     }:dtew 'z {             34}{33       } gewl {        03} {01   }: xvln
^SCR("P1HZMS0",2)
 {31             }:  dpnfd zlaw onf   {      12}: dpnfd 'qn {    06}{05 }:ogley
^SCR("P1HZMS0",3)
            {37  }: oexg` oekcr onf        {35 }:micreq 'qn {              32} 
^SCR("P1HZMS0",4)
                                                                             1$
^SCR("P1HZMS0",5)
 :        dxrd      :  mekq :zetqez: zenk: xign :     hixt xe`z    : : cew :   
^SCR("P1HZMS0",6)
                                                                               
^SCR("P1HZMS0",7)
                                                                               
^SCR("P1HZMS0",8)
                                                                               
^SCR("P1HZMS0",9)
                                                                               
^SCR("P1HZMS0",10)
                                                                               
^SCR("P1HZMS0",11)
                                                                               
^SCR("P1HZMS0",12)
                                                                               
^SCR("P1HZMS0",13)
                                                                               
^SCR("P1HZMS0",14)
                                                                               
^SCR("P1HZMS0",15)
                                                                               
^SCR("P1HZMS0",16)
                                                                               
^SCR("P1HZMS0",17)
                                                                               
^SCR("P1HZMS0",18)
                                                                               
^SCR("P1HZMS0",19)
 $1                                                                            
^SCR("P1HZMS0",20)
     {48           }  {46   }={45  }:(%)zexy inc     g"y {41    }={40   }dgpd %
^SCR("P1HZMS0",21)
   61}{60    }scer {59     }:dxzi {58     }:dtwd {57     }:mley {56     :melyzl
^SCR("P1HZMS0",22)
    {76    }  tih      {74    }:i`xy` oeayg {73    }:oeayg {72    }:zipeayg 'qn
^SCR("P1HZMS0",23)
  <CTRL>+C - micreq 'qn okcrl {82   }:creql {                          80}:dxrd
^SCR("P1HZMS0","A",1)
:„”…—'š‡…—Œ:˜–ŒŽ
^SCR("P1HZMS0","A",2)
:„�Ž†„šŒ�—�Ž†:„�Ž†„'‘Ž:�‡Œ…™
^SCR("P1HZMS0","A",3)
:�…˜‡€�…‹ƒ’�Ž†:�‰ƒ’…‘'‘Ž
^SCR("P1HZMS0","A",4)

^SCR("P1HZMS0","A",5)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1HZMS0","A",6)
---------------------------------------------------------------------
^SCR("P1HZMS0","A",7)

^SCR("P1HZMS0","A",8)

^SCR("P1HZMS0","A",9)

^SCR("P1HZMS0","A",10)

^SCR("P1HZMS0","A",11)

^SCR("P1HZMS0","A",12)

^SCR("P1HZMS0","A",13)

^SCR("P1HZMS0","A",14)

^SCR("P1HZMS0","A",15)

^SCR("P1HZMS0","A",16)

^SCR("P1HZMS0","A",17)

^SCR("P1HZMS0","A",18)

^SCR("P1HZMS0","A",19)

^SCR("P1HZMS0","A",20)
=:(%)š…˜™‰Žƒ‡"™=„‡�„%
^SCR("P1HZMS0","A",21)
“ƒ…’:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZMS0","A",22)
”‰ˆ:‰€˜™€�…�™‡:�…�™‡:š‰�…�™‡'‘Ž
^SCR("P1HZMS0","A",23)
<CTRL>+C-�‰ƒ’…‘'‘Ž�‹ƒ’Œ:ƒ’…‘Œ:„˜’„
^SCR("P1HZMS0","AV",1)
:vpuew,juek:rmkn
^SCR("P1HZMS0","AV",2)
:vbnzv,kceinz:vbnzvwxn:ijkua
^SCR("P1HZMS0","AV",3)
:iurjtiufsginz:ohsguxwxn
^SCR("P1HZMS0","AV",4)

^SCR("P1HZMS0","AV",5)
vrgvoufx,upxu,,unfrhjnyhrprut,sue
^SCR("P1HZMS0","AV",6)
---------------------------------------------------------------------
^SCR("P1HZMS0","AV",7)

^SCR("P1HZMS0","AV",8)

^SCR("P1HZMS0","AV",9)

^SCR("P1HZMS0","AV",10)

^SCR("P1HZMS0","AV",11)

^SCR("P1HZMS0","AV",12)

^SCR("P1HZMS0","AV",13)

^SCR("P1HZMS0","AV",14)

^SCR("P1HZMS0","AV",15)

^SCR("P1HZMS0","AV",16)

^SCR("P1HZMS0","AV",17)

^SCR("P1HZMS0","AV",18)

^SCR("P1HZMS0","AV",19)

^SCR("P1HZMS0","AV",20)
=:(%),urahnsj"a=vjbv%
^SCR("P1HZMS0","AV",21)
;sug:vr,h:vpev:okua:ouka,k
^SCR("P1HZMS0","AV",22)
phy:htratiucaj:iucaj:,hbucajwxn
^SCR("P1HZMS0","AV",23)
<CTRL>+C-ohsguxwxnifsgk:sguxk:vrgv
^SCR("P1HZMS0","G",1,"CRD")
6,75,E,5,0
^SCR("P1HZMS0","G",1,"FNC")
F9,F10,F8,PGRG,=,F2
^SCR("P1HZMS0","G",1,"GLOB")
PAR
^SCR("P1HZMS0","G",1,"HELP")
<F2>-dpnfd zbvd,<F10>-zetqez zbvd,<F9>-zetqez,<F8>-zeveaw,<F7>-dlah,<F6>-my
^SCR("P1HZMS0","G",1,"LMAX")
5
^SCR("P1HZMS0","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZMS0","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZMS0","G",1,"MUST")

^SCR("P1HZMS0","G",1,"NLN")
20
^SCR("P1HZMS0","G",1,"RZD")
**
^SCR("P1HZMS0","G",1,"SHEM")
 cew 
^SCR("P1HZMS0","G",1,"TOPB")
8
^SCR("P1HZMS0","G",1,"TYP")
E
^SCR("P1HZMS0","G",1,"VRB")
PAR1
^SCR("P1HZMS0","G",2,"CRD")
6,69,E,1,0
^SCR("P1HZMS0","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZMS0","G",2,"LMAX")
1
^SCR("P1HZMS0","G",2,"MUMPS1")

^SCR("P1HZMS0","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZMS0","G",2,"OUTPUT")

^SCR("P1HZMS0","G",2,"SHEM")
 
^SCR("P1HZMS0","G",2,"TYP")
E
^SCR("P1HZMS0","G",3,"CRD")
6,67,H,18,0
^SCR("P1HZMS0","G",3,"HELP")

^SCR("P1HZMS0","G",3,"LMAX")
18
^SCR("P1HZMS0","G",3,"MUMPS1")

^SCR("P1HZMS0","G",3,"MUMPS2")

^SCR("P1HZMS0","G",3,"OUTPUT")

^SCR("P1HZMS0","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZMS0","G",3,"TYP")
H
^SCR("P1HZMS0","G",4,"CRD")
6,48,N,6,2
^SCR("P1HZMS0","G",4,"HELP")

^SCR("P1HZMS0","G",4,"LMAX")
6
^SCR("P1HZMS0","G",4,"MUMPS1")

^SCR("P1HZMS0","G",4,"MUMPS2")
D MH^P1HZMS
^SCR("P1HZMS0","G",4,"OUTPUT")

^SCR("P1HZMS0","G",4,"SHEM")
 xign 
^SCR("P1HZMS0","G",4,"TYP")
N
^SCR("P1HZMS0","G",5,"CRD")
6,41,N,5,0
^SCR("P1HZMS0","G",5,"HELP")

^SCR("P1HZMS0","G",5,"LMAX")
5
^SCR("P1HZMS0","G",5,"MUMPS1")
D KAM0^P1HZMS
^SCR("P1HZMS0","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZMS0","G",5,"MUST")

^SCR("P1HZMS0","G",5,"SHEM")
 zenk
^SCR("P1HZMS0","G",5,"TYP")
N
^SCR("P1HZMS0","G",6,"CRD")
6,35,N,6,2
^SCR("P1HZMS0","G",6,"HELP")

^SCR("P1HZMS0","G",6,"LMAX")
6
^SCR("P1HZMS0","G",6,"MUMPS1")

^SCR("P1HZMS0","G",6,"MUMPS2")

^SCR("P1HZMS0","G",6,"OUTPUT")

^SCR("P1HZMS0","G",6,"SHEM")
zetqez
^SCR("P1HZMS0","G",6,"TYP")
N
^SCR("P1HZMS0","G",7,"CRD")
6,28,N,7,2
^SCR("P1HZMS0","G",7,"HELP")

^SCR("P1HZMS0","G",7,"LMAX")
7
^SCR("P1HZMS0","G",7,"MUMPS1")

^SCR("P1HZMS0","G",7,"MUMPS2")

^SCR("P1HZMS0","G",7,"OUTPUT")

^SCR("P1HZMS0","G",7,"SHEM")
  mekq 
^SCR("P1HZMS0","G",7,"TYP")
N
^SCR("P1HZMS0","G",8,"CRD")
6,20,H,18,0
^SCR("P1HZMS0","G",8,"HELP")

^SCR("P1HZMS0","G",8,"LMAX")
18
^SCR("P1HZMS0","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZMS0","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZMS0","G",8,"SHEM")
        dxrd      
^SCR("P1HZMS0","G",8,"TYP")
H
^SCR("P1HZMS0","G","DEL")
Y
^SCR("P1HZMS0","G","MAX")
9999
^SCR("P1HZMS0","G","NAME","HRP")
8
^SCR("P1HZMS0","G","NAME","KAM")
5
^SCR("P1HZMS0","G","NAME","MH")
4
^SCR("P1HZMS0","G","NAME","PAR")
1
^SCR("P1HZMS0","G","NAME","PAR1")
3
^SCR("P1HZMS0","G","NAME","SUG")
2
^SCR("P1HZMS0","G","NAME","SUM")
7
^SCR("P1HZMS0","G","NAME","TSF")
6
^SCR("P1HZMS0","G","NM",1)
PAR
^SCR("P1HZMS0","G","NM",2)
SUG
^SCR("P1HZMS0","G","NM",3)
PAR1
^SCR("P1HZMS0","G","NM",4)
MH
^SCR("P1HZMS0","G","NM",5)
KAM
^SCR("P1HZMS0","G","NM",6)
TSF
^SCR("P1HZMS0","G","NM",7)
SUM
^SCR("P1HZMS0","G","NM",8)
HRP
^SCR("P1HZMS0","G","RB")
5,2,20,79
^SCR("P1HZMS0","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZMS0","G","RZD")
\
^SCR("P1HZMS0","G","STEP")
1
^SCR("P1HZMS0","G","STG")
 :        dxrd      :  mekq :zetqez: zenk: xign :     hixt xe`z    : : cew :   
^SCR("P1HZMS0","G","VG")
7
^SCR("P1HZMS0","NAME")
dcqinl dpnfd
^SCR("P1HZMS0","P",1,"CRD")
1,66,E,5.,0
^SCR("P1HZMS0","P",1,"HELP")
<F7> - mixvln zbvd 
^SCR("P1HZMS0","P",1,"LMAX")
6
^SCR("P1HZMS0","P",1,"MUMPS1")
D MLZR01^P1HZMS
^SCR("P1HZMS0","P",1,"MUMPS2")
D MLZR0^P1HZMS
^SCR("P1HZMS0","P",1,"MUST")

^SCR("P1HZMS0","P",1,"TYP")
E
^SCR("P1HZMS0","P",3,"CRD")
1,65,H,11
^SCR("P1HZMS0","P",3,"HELP")

^SCR("P1HZMS0","P",3,"LMAX")
11
^SCR("P1HZMS0","P",3,"MUMPS1")

^SCR("P1HZMS0","P",3,"MUMPS2")

^SCR("P1HZMS0","P",3,"OUTPUT")

^SCR("P1HZMS0","P",3,"TYP")
H
^SCR("P1HZMS0","P",5,"CRD")
2,68,E,4,0
^SCR("P1HZMS0","P",5,"HELP")
<F1> dxfr ,<F5>+ogley 'qn - dixehqid,<F9> dpnfd yetig,<F7> migezt zepgley
^SCR("P1HZMS0","P",5,"LMAX")
4
^SCR("P1HZMS0","P",5,"MUMPS1")

^SCR("P1HZMS0","P",5,"MUMPS2")
D NMB^P1HZNM I $G(HZM) S NMB=$$^P3NMB(HZM)
^SCR("P1HZMS0","P",5,"MUST")

^SCR("P1HZMS0","P",5,"TYP")
E
^SCR("P1HZMS0","P",6,"CRD")
2,68,H,7
^SCR("P1HZMS0","P",6,"HELP")

^SCR("P1HZMS0","P",6,"LMAX")
7
^SCR("P1HZMS0","P",6,"MUMPS1")

^SCR("P1HZMS0","P",6,"MUMPS2")

^SCR("P1HZMS0","P",6,"OUTPUT")

^SCR("P1HZMS0","P",6,"TYP")
H
^SCR("P1HZMS0","P",8,"CRD")
1,1,D,8,0
^SCR("P1HZMS0","P",8,"HELP")

^SCR("P1HZMS0","P",8,"LMAX")
8
^SCR("P1HZMS0","P",8,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZMS0","P",8,"MUMPS2")

^SCR("P1HZMS0","P",8,"OUTPUT")

^SCR("P1HZMS0","P",8,"TYP")
D
^SCR("P1HZMS0","P",12,"CRD")
2,48,H,7
^SCR("P1HZMS0","P",12,"HELP")

^SCR("P1HZMS0","P",12,"LMAX")
9
^SCR("P1HZMS0","P",12,"MUMPS1")

^SCR("P1HZMS0","P",12,"MUMPS2")

^SCR("P1HZMS0","P",12,"OUTPUT")

^SCR("P1HZMS0","P",12,"TYP")
H
^SCR("P1HZMS0","P",31,"CRD")
2,1,E,16,0
^SCR("P1HZMS0","P",31,"HELP")

^SCR("P1HZMS0","P",31,"LMAX")
16
^SCR("P1HZMS0","P",31,"MUMPS1")
D ZMANK0^P1HZMS
^SCR("P1HZMS0","P",31,"MUMPS2")

^SCR("P1HZMS0","P",31,"OUTPUT")

^SCR("P1HZMS0","P",31,"TYP")
E
^SCR("P1HZMS0","P",32,"CRD")
3,78,H,17
^SCR("P1HZMS0","P",32,"HELP")

^SCR("P1HZMS0","P",32,"LMAX")
17
^SCR("P1HZMS0","P",32,"MUMPS1")

^SCR("P1HZMS0","P",32,"MUMPS2")

^SCR("P1HZMS0","P",32,"OUTPUT")

^SCR("P1HZMS0","P",32,"TYP")
H
^SCR("P1HZMS0","P",33,"CRD")
1,36,E,10,0
^SCR("P1HZMS0","P",33,"FNC")

^SCR("P1HZMS0","P",33,"GLOB")
LKH
^SCR("P1HZMS0","P",33,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1HZMS0","P",33,"LMAX")
10
^SCR("P1HZMS0","P",33,"MUMPS1")
D LKHN0^P1HZMS
^SCR("P1HZMS0","P",33,"MUMPS2")
D LKHN^P1HZMS
^SCR("P1HZMS0","P",33,"NLN")
20
^SCR("P1HZMS0","P",33,"RZD")
\
^SCR("P1HZMS0","P",33,"TOPB")
8
^SCR("P1HZMS0","P",33,"TYP")
E
^SCR("P1HZMS0","P",33,"VRB")
LKHN1
^SCR("P1HZMS0","P",34,"CRD")
1,36,H,16
^SCR("P1HZMS0","P",34,"HELP")

^SCR("P1HZMS0","P",34,"LMAX")
16
^SCR("P1HZMS0","P",34,"MUMPS1")

^SCR("P1HZMS0","P",34,"MUMPS2")

^SCR("P1HZMS0","P",34,"OUTPUT")

^SCR("P1HZMS0","P",34,"TYP")
H
^SCR("P1HZMS0","P",35,"CRD")
3,43,E,3,0
^SCR("P1HZMS0","P",35,"HELP")

^SCR("P1HZMS0","P",35,"LMAX")
4
^SCR("P1HZMS0","P",35,"MUMPS1")
D SOAD0^P1HZMS
^SCR("P1HZMS0","P",35,"MUMPS2")
D SOAD^P1HZMS
^SCR("P1HZMS0","P",35,"MUST")

^SCR("P1HZMS0","P",35,"TYP")
E
^SCR("P1HZMS0","P",37,"CRD")
3,12,E,5,0
^SCR("P1HZMS0","P",37,"HELP")

^SCR("P1HZMS0","P",37,"LMAX")
5
^SCR("P1HZMS0","P",37,"MUMPS1")

^SCR("P1HZMS0","P",37,"MUMPS2")

^SCR("P1HZMS0","P",37,"OUTPUT")

^SCR("P1HZMS0","P",37,"TYP")
E
^SCR("P1HZMS0","P",40,"CRD")
20,66,E,6,0
^SCR("P1HZMS0","P",40,"HELP")

^SCR("P1HZMS0","P",40,"LMAX")
6
^SCR("P1HZMS0","P",40,"MUMPS1")
D HNH00^P1HZMS
^SCR("P1HZMS0","P",40,"MUMPS2")
D HNH0^P1HZMS
^SCR("P1HZMS0","P",40,"TYP")
E
^SCR("P1HZMS0","P",41,"CRD")
20,57,N,7,2
^SCR("P1HZMS0","P",41,"HELP")

^SCR("P1HZMS0","P",41,"LMAX")
7
^SCR("P1HZMS0","P",41,"MUMPS1")

^SCR("P1HZMS0","P",41,"MUMPS2")

^SCR("P1HZMS0","P",41,"OUTPUT")

^SCR("P1HZMS0","P",41,"TYP")
N
^SCR("P1HZMS0","P",45,"CRD")
20,30,E,5,0
^SCR("P1HZMS0","P",45,"HELP")

^SCR("P1HZMS0","P",45,"LMAX")
5
^SCR("P1HZMS0","P",45,"MUMPS1")

^SCR("P1HZMS0","P",45,"MUMPS2")
D DMSAH^P1HZMS
^SCR("P1HZMS0","P",45,"TYP")
E
^SCR("P1HZMS0","P",46,"CRD")
20,22,N,6,2
^SCR("P1HZMS0","P",46,"HELP")

^SCR("P1HZMS0","P",46,"LMAX")
6
^SCR("P1HZMS0","P",46,"MUMPS1")

^SCR("P1HZMS0","P",46,"MUMPS2")

^SCR("P1HZMS0","P",46,"OUTPUT")

^SCR("P1HZMS0","P",46,"TYP")
N
^SCR("P1HZMS0","P",48,"CRD")
20,5,E,14,0
^SCR("P1HZMS0","P",48,"HELP")

^SCR("P1HZMS0","P",48,"LMAX")
14
^SCR("P1HZMS0","P",48,"MUMPS1")

^SCR("P1HZMS0","P",48,"MUMPS2")

^SCR("P1HZMS0","P",48,"OUTPUT")

^SCR("P1HZMS0","P",48,"TYP")
E
^SCR("P1HZMS0","P",56,"CRD")
21,64,E,8,0
^SCR("P1HZMS0","P",56,"HELP")

^SCR("P1HZMS0","P",56,"LMAX")
8
^SCR("P1HZMS0","P",56,"MUMPS1")

^SCR("P1HZMS0","P",56,"MUMPS2")

^SCR("P1HZMS0","P",56,"OUTPUT")

^SCR("P1HZMS0","P",56,"TYP")
E
^SCR("P1HZMS0","P",57,"CRD")
21,49,N,8,2
^SCR("P1HZMS0","P",57,"HELP")

^SCR("P1HZMS0","P",57,"LMAX")
8
^SCR("P1HZMS0","P",57,"MUMPS1")

^SCR("P1HZMS0","P",57,"MUMPS2")

^SCR("P1HZMS0","P",57,"OUTPUT")

^SCR("P1HZMS0","P",57,"TYP")
N
^SCR("P1HZMS0","P",58,"CRD")
21,34,N,8,2
^SCR("P1HZMS0","P",58,"HELP")

^SCR("P1HZMS0","P",58,"LMAX")
8
^SCR("P1HZMS0","P",58,"MUMPS1")

^SCR("P1HZMS0","P",58,"MUMPS2")

^SCR("P1HZMS0","P",58,"OUTPUT")

^SCR("P1HZMS0","P",58,"TYP")
N
^SCR("P1HZMS0","P",59,"CRD")
21,19,N,8,2
^SCR("P1HZMS0","P",59,"HELP")

^SCR("P1HZMS0","P",59,"LMAX")
8
^SCR("P1HZMS0","P",59,"MUMPS1")

^SCR("P1HZMS0","P",59,"MUMPS2")

^SCR("P1HZMS0","P",59,"OUTPUT")

^SCR("P1HZMS0","P",59,"TYP")
N
^SCR("P1HZMS0","P",60,"CRD")
21,6,N,7,2
^SCR("P1HZMS0","P",60,"HELP")

^SCR("P1HZMS0","P",60,"LMAX")
7
^SCR("P1HZMS0","P",60,"MUMPS1")

^SCR("P1HZMS0","P",60,"MUMPS2")

^SCR("P1HZMS0","P",60,"OUTPUT")

^SCR("P1HZMS0","P",60,"TYP")
N
^SCR("P1HZMS0","P",61,"CRD")
21,6,H,4
^SCR("P1HZMS0","P",61,"HELP")

^SCR("P1HZMS0","P",61,"LMAX")
6
^SCR("P1HZMS0","P",61,"MUMPS1")

^SCR("P1HZMS0","P",61,"MUMPS2")

^SCR("P1HZMS0","P",61,"OUTPUT")

^SCR("P1HZMS0","P",61,"TYP")
H
^SCR("P1HZMS0","P",72,"CRD")
22,59,E,7,0
^SCR("P1HZMS0","P",72,"HELP")

^SCR("P1HZMS0","P",72,"LMAX")
7
^SCR("P1HZMS0","P",72,"MUMPS1")

^SCR("P1HZMS0","P",72,"MUMPS2")

^SCR("P1HZMS0","P",72,"OUTPUT")

^SCR("P1HZMS0","P",72,"TYP")
E
^SCR("P1HZMS0","P",73,"CRD")
22,44,E,7,0
^SCR("P1HZMS0","P",73,"HELP")

^SCR("P1HZMS0","P",73,"LMAX")
7
^SCR("P1HZMS0","P",73,"MUMPS1")

^SCR("P1HZMS0","P",73,"MUMPS2")

^SCR("P1HZMS0","P",73,"OUTPUT")

^SCR("P1HZMS0","P",73,"TYP")
E
^SCR("P1HZMS0","P",74,"CRD")
22,23,E,7,0
^SCR("P1HZMS0","P",74,"HELP")

^SCR("P1HZMS0","P",74,"LMAX")
7
^SCR("P1HZMS0","P",74,"MUMPS1")

^SCR("P1HZMS0","P",74,"MUMPS2")

^SCR("P1HZMS0","P",74,"OUTPUT")

^SCR("P1HZMS0","P",74,"TYP")
E
^SCR("P1HZMS0","P",76,"CRD")
22,4,N,7,2
^SCR("P1HZMS0","P",76,"HELP")

^SCR("P1HZMS0","P",76,"LMAX")
7
^SCR("P1HZMS0","P",76,"MUMPS1")

^SCR("P1HZMS0","P",76,"MUMPS2")

^SCR("P1HZMS0","P",76,"OUTPUT")

^SCR("P1HZMS0","P",76,"TYP")
N
^SCR("P1HZMS0","P",80,"CRD")
23,74,H,29,0
^SCR("P1HZMS0","P",80,"HELP")

^SCR("P1HZMS0","P",80,"LMAX")
29
^SCR("P1HZMS0","P",80,"MUMPS1")
D HRA20^P1HZMS
^SCR("P1HZMS0","P",80,"MUMPS2")

^SCR("P1HZMS0","P",80,"TYP")
H
^SCR("P1HZMS0","P",82,"CRD")
23,30,N,6,2
^SCR("P1HZMS0","P",82,"HELP")

^SCR("P1HZMS0","P",82,"LMAX")
6
^SCR("P1HZMS0","P",82,"MUMPS1")

^SCR("P1HZMS0","P",82,"MUMPS2")

^SCR("P1HZMS0","P",82,"OUTPUT")

^SCR("P1HZMS0","P",82,"TYP")
N
^SCR("P1HZMS0","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZMS0","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZMS0","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZMS0","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZMS0","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZMS0","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZMS0","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZMS0","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZMS0","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZMS0","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZMS0","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZMS0","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZMS0","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZMS0","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZMS0","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZMS0","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZMS0","P","NAME","DATK")
8
^SCR("P1HZMS0","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZMS0","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZMS0","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZMS0","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZMS0","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZMS0","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZMS0","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZMS0","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZMS0","P","NAME","DMSAH")
45
^SCR("P1HZMS0","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZMS0","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZMS0","P","NAME","DMSH")
46
^SCR("P1HZMS0","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZMS0","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZMS0","P","NAME","FIRE")
48
^SCR("P1HZMS0","P","NAME","FIRE","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",4)
^SCR("P1HZMS0","P","NAME","FIRE","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",4)
^SCR("P1HZMS0","P","NAME","HNH")
41
^SCR("P1HZMS0","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZMS0","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZMS0","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZMS0","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZMS0","P","NAME","HNHAH")
40
^SCR("P1HZMS0","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZMS0","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZMS0","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZMS0","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZMS0","P","NAME","HODAA")
32
^SCR("P1HZMS0","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZMS0","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZMS0","P","NAME","HRA2")
80
^SCR("P1HZMS0","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZMS0","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZMS0","P","NAME","HSB")
73
^SCR("P1HZMS0","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZMS0","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZMS0","P","NAME","HSB2")
74
^SCR("P1HZMS0","P","NAME","HZM")
12
^SCR("P1HZMS0","P","NAME","HZM","KEY")

^SCR("P1HZMS0","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK
^SCR("P1HZMS0","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZMS0","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL
^SCR("P1HZMS0","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD,,FIRE
^SCR("P1HZMS0","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZMS0","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZMS0","P","NAME","ITRA")
59
^SCR("P1HZMS0","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZMS0","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZMS0","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZMS0","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZMS0","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZMS0","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZMS0","P","NAME","LKHN")
33
^SCR("P1HZMS0","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZMS0","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZMS0","P","NAME","LKHN1")
34
^SCR("P1HZMS0","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZMS0","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZMS0","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZMS0","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZMS0","P","NAME","MLZR0")
1
^SCR("P1HZMS0","P","NAME","MLZR1")
3
^SCR("P1HZMS0","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZMS0","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZMS0","P","NAME","MSOAD")
82
^SCR("P1HZMS0","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZMS0","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZMS0","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZMS0","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZMS0","P","NAME","NCAB")
72
^SCR("P1HZMS0","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZMS0","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZMS0","P","NAME","NMB")
5
^SCR("P1HZMS0","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZMS0","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZMS0","P","NAME","NMB1")
6
^SCR("P1HZMS0","P","NAME","ODEF")
60
^SCR("P1HZMS0","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZMS0","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZMS0","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZMS0","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZMS0","P","NAME","OTL")
61
^SCR("P1HZMS0","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZMS0","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZMS0","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZMS0","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZMS0","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZMS0","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZMS0","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZMS0","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZMS0","P","NAME","SHUL1")
57
^SCR("P1HZMS0","P","NAME","SHULA")
58
^SCR("P1HZMS0","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZMS0","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZMS0","P","NAME","SOAD")
35
^SCR("P1HZMS0","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZMS0","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZMS0","P","NAME","TIP")
76
^SCR("P1HZMS0","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZMS0","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZMS0","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZMS0","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZMS0","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZMS0","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZMS0","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZMS0","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZMS0","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZMS0","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZMS0","P","NAME","TSHL")
56
^SCR("P1HZMS0","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZMS0","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZMS0","P","NAME","ZMANI")
37
^SCR("P1HZMS0","P","NAME","ZMANK")
31
^SCR("P1HZMS0","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZMS0","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZMS0","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZMS0","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZMS0","P","NM",1)
MLZR0
^SCR("P1HZMS0","P","NM",3)
MLZR1
^SCR("P1HZMS0","P","NM",5)
NMB
^SCR("P1HZMS0","P","NM",6)
NMB1
^SCR("P1HZMS0","P","NM",8)
DATK
^SCR("P1HZMS0","P","NM",12)
HZM
^SCR("P1HZMS0","P","NM",31)
ZMANK
^SCR("P1HZMS0","P","NM",32)
HODAA
^SCR("P1HZMS0","P","NM",33)
LKHN
^SCR("P1HZMS0","P","NM",34)
LKHN1
^SCR("P1HZMS0","P","NM",35)
SOAD
^SCR("P1HZMS0","P","NM",37)
ZMANI
^SCR("P1HZMS0","P","NM",40)
HNHAH
^SCR("P1HZMS0","P","NM",41)
HNH
^SCR("P1HZMS0","P","NM",45)
DMSAH
^SCR("P1HZMS0","P","NM",46)
DMSH
^SCR("P1HZMS0","P","NM",48)
FIRE
^SCR("P1HZMS0","P","NM",56)
TSHL
^SCR("P1HZMS0","P","NM",57)
SHUL1
^SCR("P1HZMS0","P","NM",58)
SHULA
^SCR("P1HZMS0","P","NM",59)
ITRA
^SCR("P1HZMS0","P","NM",60)
ODEF
^SCR("P1HZMS0","P","NM",61)
OTL
^SCR("P1HZMS0","P","NM",72)
NCAB
^SCR("P1HZMS0","P","NM",73)
HSB
^SCR("P1HZMS0","P","NM",74)
HSB2
^SCR("P1HZMS0","P","NM",76)
TIP
^SCR("P1HZMS0","P","NM",80)
HRA2
^SCR("P1HZMS0","P","NM",82)
MSOAD
^SCR("P1HZMS0","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZMS0","P","REF",1,"RZD")
\
^SCR("P1HZMS0","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK
^SCR("P1HZMS0","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZMS0","P","REF",2,"RZD")
\
^SCR("P1HZMS0","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZMS0","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZMS0","P","REF",3,"RZD")
\
^SCR("P1HZMS0","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL
^SCR("P1HZMS0","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZMS0","P","REF",4,"RZD")
\\
^SCR("P1HZMS0","P","REF",4,"STR")
HRA2\\HODAA\\MSD\\FIRE
^SCR("P1HZMS1")
H
^SCR("P1HZMS1",1)
  {08     : dtew 'z {           34} {33       } gewl {        03} {01  }: xvln 
^SCR("P1HZMS1",2)
  {31               }: dpnfd  zlaw onf  {12     } dpnfd 'qn        {05 }:ogley 
^SCR("P1HZMS1",3)
               {37  }: oexg` oekcr onf     {35 }:micreq 'qn {              32} 
^SCR("P1HZMS1",4)
                                                                             1$
^SCR("P1HZMS1",5)
 :        dxrd      :  mekq :zetqez:zenk: xign:     hixt xe`z    :onq: cew :   
^SCR("P1HZMS1",6)
                \                            micreq zniyx                \     
^SCR("P1HZMS1",7)
                                                                               
^SCR("P1HZMS1",8)
                                                                               
^SCR("P1HZMS1",9)
                                                                               
^SCR("P1HZMS1",10)
                                                                               
^SCR("P1HZMS1",11)
                                                                               
^SCR("P1HZMS1",12)
                                                                               
^SCR("P1HZMS1",13)
                                                                               
^SCR("P1HZMS1",14)
                                                                               
^SCR("P1HZMS1",15)
                                                                               
^SCR("P1HZMS1",16)
                                                                               
^SCR("P1HZMS1",17)
                                                                               
^SCR("P1HZMS1",18)
 $1                                                                            
^SCR("P1HZMS1",19)
  FIRE:{48              } {46   }={45  }:(%)zexy inc g"y {41    }={40   }dgpd %
^SCR("P1HZMS1",20)
   61}{60   } scer {59     }:dxzi {58     }:dtwd {57     }:mley {56     :melyzl
^SCR("P1HZMS1",21)
    {76    }  tih      {74    }:i`xy` oeayg {73    }:oeayg {72    }:zipeayg 'qn
^SCR("P1HZMS1",22)
    <CTRL>+C - micreq 'qn okcrl        {                               80}:dxrd
^SCR("P1HZMS1","A",1)
:„”…—'š‡…—Œ:˜–ŒŽ
^SCR("P1HZMS1","A",2)
:„�Ž†„šŒ�—�Ž†„�Ž†„'‘Ž:�‡Œ…™
^SCR("P1HZMS1","A",3)
:�…˜‡€�…‹ƒ’�Ž†:�‰ƒ’…‘'‘Ž
^SCR("P1HZMS1","A",4)

^SCR("P1HZMS1","A",5)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€š�Ž‘ƒ…—
^SCR("P1HZMS1","A",6)
�‰ƒ’…‘šŽ‰™˜
^SCR("P1HZMS1","A",7)
---------------------------------------------------------------------
^SCR("P1HZMS1","A",8)

^SCR("P1HZMS1","A",9)

^SCR("P1HZMS1","A",10)

^SCR("P1HZMS1","A",11)

^SCR("P1HZMS1","A",12)

^SCR("P1HZMS1","A",13)

^SCR("P1HZMS1","A",14)

^SCR("P1HZMS1","A",15)

^SCR("P1HZMS1","A",16)

^SCR("P1HZMS1","A",17)

^SCR("P1HZMS1","A",18)

^SCR("P1HZMS1","A",19)
FIRE:=:(%)š…˜™‰Žƒ‡"™=„‡�„%
^SCR("P1HZMS1","A",20)
“ƒ…’:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZMS1","A",21)
”‰ˆ:‰€˜™€�…�™‡:�…�™‡:š‰�…�™‡'‘Ž
^SCR("P1HZMS1","A",22)
<CTRL>+C-�‰ƒ’…‘'‘Ž�‹ƒ’Œ:„˜’„
^SCR("P1HZMS1","AV",1)
:vpuew,juek:rmkn
^SCR("P1HZMS1","AV",2)
:vbnzv,kceinzvbnzvwxn:ijkua
^SCR("P1HZMS1","AV",3)
:iurjtiufsginz:ohsguxwxn
^SCR("P1HZMS1","AV",4)

^SCR("P1HZMS1","AV",5)
vrgvoufx,upxu,,unfrhjnyhrprut,inxsue
^SCR("P1HZMS1","AV",6)
ohsgux,nhar
^SCR("P1HZMS1","AV",7)
---------------------------------------------------------------------
^SCR("P1HZMS1","AV",8)

^SCR("P1HZMS1","AV",9)

^SCR("P1HZMS1","AV",10)

^SCR("P1HZMS1","AV",11)

^SCR("P1HZMS1","AV",12)

^SCR("P1HZMS1","AV",13)

^SCR("P1HZMS1","AV",14)

^SCR("P1HZMS1","AV",15)

^SCR("P1HZMS1","AV",16)

^SCR("P1HZMS1","AV",17)

^SCR("P1HZMS1","AV",18)

^SCR("P1HZMS1","AV",19)
FIRE:=:(%),urahnsj"a=vjbv%
^SCR("P1HZMS1","AV",20)
;sug:vr,h:vpev:okua:ouka,k
^SCR("P1HZMS1","AV",21)
phy:htratiucaj:iucaj:,hbucajwxn
^SCR("P1HZMS1","AV",22)
<CTRL>+C-ohsguxwxnifsgk:vrgv
^SCR("P1HZMS1","G",1,"CRD")
7,75,E,5,0
^SCR("P1HZMS1","G",1,"FNC")
F9,F10,F8,PGRG,=,F2
^SCR("P1HZMS1","G",1,"GLOB")
PAR
^SCR("P1HZMS1","G",1,"HELP")
<F2>-dpnfd,<F10>-zetqez zbvd;<F9>-zetqez,<F8>-zeveaw,<F7>-dlah;<F6>-my
^SCR("P1HZMS1","G",1,"LMAX")
5
^SCR("P1HZMS1","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZMS1","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZMS1","G",1,"MUST")

^SCR("P1HZMS1","G",1,"NLN")
20
^SCR("P1HZMS1","G",1,"RZD")
**
^SCR("P1HZMS1","G",1,"SHEM")
 cew 
^SCR("P1HZMS1","G",1,"TOPB")
8
^SCR("P1HZMS1","G",1,"TYP")
E
^SCR("P1HZMS1","G",1,"VRB")
PAR1
^SCR("P1HZMS1","G",2,"CRD")
7,69,E,3,0
^SCR("P1HZMS1","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZMS1","G",2,"LMAX")
3
^SCR("P1HZMS1","G",2,"MUMPS1")

^SCR("P1HZMS1","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZMS1","G",2,"OUTPUT")

^SCR("P1HZMS1","G",2,"SHEM")
onq
^SCR("P1HZMS1","G",2,"TYP")
E
^SCR("P1HZMS1","G",3,"CRD")
7,65,H,18,0
^SCR("P1HZMS1","G",3,"HELP")

^SCR("P1HZMS1","G",3,"LMAX")
18
^SCR("P1HZMS1","G",3,"MUMPS1")

^SCR("P1HZMS1","G",3,"MUMPS2")

^SCR("P1HZMS1","G",3,"OUTPUT")

^SCR("P1HZMS1","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZMS1","G",3,"TYP")
H
^SCR("P1HZMS1","G",4,"CRD")
7,46,N,5,2
^SCR("P1HZMS1","G",4,"HELP")

^SCR("P1HZMS1","G",4,"LMAX")
5
^SCR("P1HZMS1","G",4,"MUMPS1")

^SCR("P1HZMS1","G",4,"MUMPS2")
D MH^P1HZMS
^SCR("P1HZMS1","G",4,"OUTPUT")

^SCR("P1HZMS1","G",4,"SHEM")
 xign
^SCR("P1HZMS1","G",4,"TYP")
N
^SCR("P1HZMS1","G",5,"CRD")
7,40,N,4,0
^SCR("P1HZMS1","G",5,"HELP")

^SCR("P1HZMS1","G",5,"LMAX")
4
^SCR("P1HZMS1","G",5,"MUMPS1")
D KAM0^P1HZMS
^SCR("P1HZMS1","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZMS1","G",5,"MUST")

^SCR("P1HZMS1","G",5,"SHEM")
zenk
^SCR("P1HZMS1","G",5,"TYP")
N
^SCR("P1HZMS1","G",6,"CRD")
7,35,N,6,2
^SCR("P1HZMS1","G",6,"HELP")

^SCR("P1HZMS1","G",6,"LMAX")
6
^SCR("P1HZMS1","G",6,"MUMPS1")

^SCR("P1HZMS1","G",6,"MUMPS2")

^SCR("P1HZMS1","G",6,"OUTPUT")

^SCR("P1HZMS1","G",6,"SHEM")
zetqez
^SCR("P1HZMS1","G",6,"TYP")
N
^SCR("P1HZMS1","G",7,"CRD")
7,28,N,7,2
^SCR("P1HZMS1","G",7,"HELP")

^SCR("P1HZMS1","G",7,"LMAX")
7
^SCR("P1HZMS1","G",7,"MUMPS1")

^SCR("P1HZMS1","G",7,"MUMPS2")

^SCR("P1HZMS1","G",7,"OUTPUT")

^SCR("P1HZMS1","G",7,"SHEM")
  mekq 
^SCR("P1HZMS1","G",7,"TYP")
N
^SCR("P1HZMS1","G",8,"CRD")
7,20,H,18/36,0
^SCR("P1HZMS1","G",8,"HELP")

^SCR("P1HZMS1","G",8,"LMAX")
18
^SCR("P1HZMS1","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZMS1","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZMS1","G",8,"SHEM")
        dxrd      
^SCR("P1HZMS1","G",8,"TYP")
H
^SCR("P1HZMS1","G",9,"CRD")
7,+73,E,18,0
^SCR("P1HZMS1","G",9,"HELP")
micreqd lkl * e` (2-6 e` 1.3.4 lynl)  dpn zcrein inl ,creq 'qn cilwdl `p
^SCR("P1HZMS1","G",9,"LMAX")
56
^SCR("P1HZMS1","G",9,"MUMPS1")

^SCR("P1HZMS1","G",9,"MUMPS2")
S HRSD=$TR(HRSD,".z",",,") D ^P1BDRSD(HRSD,SOAD) I $D(SDER)>9 S %SC("ST")=1
^SCR("P1HZMS1","G",9,"SHEM")
                            micreq zniyx                
^SCR("P1HZMS1","G",9,"TYP")
E
^SCR("P1HZMS1","G","DEL")
Y
^SCR("P1HZMS1","G","MAX")
9999
^SCR("P1HZMS1","G","NAME","HRP")
8
^SCR("P1HZMS1","G","NAME","HRSD")
9
^SCR("P1HZMS1","G","NAME","KAM")
5
^SCR("P1HZMS1","G","NAME","MH")
4
^SCR("P1HZMS1","G","NAME","PAR")
1
^SCR("P1HZMS1","G","NAME","PAR1")
3
^SCR("P1HZMS1","G","NAME","SUG")
2
^SCR("P1HZMS1","G","NAME","SUM")
7
^SCR("P1HZMS1","G","NAME","TSF")
6
^SCR("P1HZMS1","G","NM",1)
PAR
^SCR("P1HZMS1","G","NM",2)
SUG
^SCR("P1HZMS1","G","NM",3)
PAR1
^SCR("P1HZMS1","G","NM",4)
MH
^SCR("P1HZMS1","G","NM",5)
KAM
^SCR("P1HZMS1","G","NM",6)
TSF
^SCR("P1HZMS1","G","NM",7)
SUM
^SCR("P1HZMS1","G","NM",8)
HRP
^SCR("P1HZMS1","G","NM",9)
HRSD
^SCR("P1HZMS1","G","RB")
5,2,19,79
^SCR("P1HZMS1","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZMS1","G","RZD")
\
^SCR("P1HZMS1","G","STEP")
2
^SCR("P1HZMS1","G","STG")
 :        dxrd      :  mekq :zetqez:zenk: xign:     hixt xe`z    :onq: cew :   
^SCR("P1HZMS1","G","VG")
8
^SCR("P1HZMS1","NAME")

^SCR("P1HZMS1","P",1,"CRD")
1,66,E,5.,0
^SCR("P1HZMS1","P",1,"HELP")
<F7> - mixvln zbvd 
^SCR("P1HZMS1","P",1,"LMAX")
5
^SCR("P1HZMS1","P",1,"MUMPS1")
D MLZR01^P1HZMS
^SCR("P1HZMS1","P",1,"MUMPS2")
D MLZR0^P1HZMS
^SCR("P1HZMS1","P",1,"MUST")

^SCR("P1HZMS1","P",1,"TYP")
E
^SCR("P1HZMS1","P",3,"CRD")
1,65,H,11
^SCR("P1HZMS1","P",3,"HELP")

^SCR("P1HZMS1","P",3,"LMAX")
11
^SCR("P1HZMS1","P",3,"MUMPS1")

^SCR("P1HZMS1","P",3,"MUMPS2")

^SCR("P1HZMS1","P",3,"OUTPUT")

^SCR("P1HZMS1","P",3,"TYP")
H
^SCR("P1HZMS1","P",5,"CRD")
2,67,E,3,0
^SCR("P1HZMS1","P",5,"HELP")
<F5>+ogley 'qn - ogley ly dixehqid ,<F9>-dpnfd yetig ,<F7>- migezt zepgley
^SCR("P1HZMS1","P",5,"LMAX")
4
^SCR("P1HZMS1","P",5,"MUMPS1")
D NMB0^P1HZMS
^SCR("P1HZMS1","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1HZMS1","P",5,"MUST")

^SCR("P1HZMS1","P",5,"TYP")
E
^SCR("P1HZMS1","P",8,"CRD")
1,2,D,8,0
^SCR("P1HZMS1","P",8,"HELP")

^SCR("P1HZMS1","P",8,"LMAX")
8
^SCR("P1HZMS1","P",8,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZMS1","P",8,"MUMPS2")

^SCR("P1HZMS1","P",8,"OUTPUT")

^SCR("P1HZMS1","P",8,"TYP")
D
^SCR("P1HZMS1","P",12,"CRD")
2,40,E,7,0
^SCR("P1HZMS1","P",12,"HELP")

^SCR("P1HZMS1","P",12,"LMAX")
8
^SCR("P1HZMS1","P",12,"MUMPS1")

^SCR("P1HZMS1","P",12,"MUMPS2")

^SCR("P1HZMS1","P",12,"OUTPUT")

^SCR("P1HZMS1","P",12,"TYP")
E
^SCR("P1HZMS1","P",31,"CRD")
2,2,E,18,0
^SCR("P1HZMS1","P",31,"HELP")

^SCR("P1HZMS1","P",31,"LMAX")
18
^SCR("P1HZMS1","P",31,"MUMPS1")
D ZMANK0^P1HZMS
^SCR("P1HZMS1","P",31,"MUMPS2")

^SCR("P1HZMS1","P",31,"OUTPUT")

^SCR("P1HZMS1","P",31,"TYP")
E
^SCR("P1HZMS1","P",32,"CRD")
3,78,H,17
^SCR("P1HZMS1","P",32,"HELP")

^SCR("P1HZMS1","P",32,"LMAX")
17
^SCR("P1HZMS1","P",32,"MUMPS1")

^SCR("P1HZMS1","P",32,"MUMPS2")

^SCR("P1HZMS1","P",32,"OUTPUT")

^SCR("P1HZMS1","P",32,"TYP")
H
^SCR("P1HZMS1","P",33,"CHECK")
Y
^SCR("P1HZMS1","P",33,"CRD")
1,36,E,10,0
^SCR("P1HZMS1","P",33,"FNC")

^SCR("P1HZMS1","P",33,"GLOB")
LKH
^SCR("P1HZMS1","P",33,"HELP")

^SCR("P1HZMS1","P",33,"LMAX")
10
^SCR("P1HZMS1","P",33,"MUMPS1")
D LKHN0^P1HZMS
^SCR("P1HZMS1","P",33,"MUMPS2")
D LKHN^P1HZMS
^SCR("P1HZMS1","P",33,"NLN")
20
^SCR("P1HZMS1","P",33,"RZD")
\
^SCR("P1HZMS1","P",33,"TOPB")
8
^SCR("P1HZMS1","P",33,"TYP")
E
^SCR("P1HZMS1","P",33,"VRB")
LKHN1
^SCR("P1HZMS1","P",34,"CRD")
1,35,H,14
^SCR("P1HZMS1","P",34,"HELP")

^SCR("P1HZMS1","P",34,"LMAX")
14
^SCR("P1HZMS1","P",34,"MUMPS1")

^SCR("P1HZMS1","P",34,"MUMPS2")

^SCR("P1HZMS1","P",34,"OUTPUT")

^SCR("P1HZMS1","P",34,"TYP")
H
^SCR("P1HZMS1","P",35,"CRD")
3,43,N,3,0
^SCR("P1HZMS1","P",35,"HELP")

^SCR("P1HZMS1","P",35,"LMAX")
4
^SCR("P1HZMS1","P",35,"MUMPS1")
D SOAD0^P1HZMS
^SCR("P1HZMS1","P",35,"MUMPS2")
D SOAD^P1HZMS
^SCR("P1HZMS1","P",35,"MUST")

^SCR("P1HZMS1","P",35,"TYP")
N
^SCR("P1HZMS1","P",37,"CRD")
3,15,E,5,0
^SCR("P1HZMS1","P",37,"HELP")

^SCR("P1HZMS1","P",37,"LMAX")
5
^SCR("P1HZMS1","P",37,"MUMPS1")

^SCR("P1HZMS1","P",37,"MUMPS2")

^SCR("P1HZMS1","P",37,"OUTPUT")

^SCR("P1HZMS1","P",37,"TYP")
E
^SCR("P1HZMS1","P",40,"CRD")
19,66,E,6,0
^SCR("P1HZMS1","P",40,"HELP")

^SCR("P1HZMS1","P",40,"LMAX")
6
^SCR("P1HZMS1","P",40,"MUMPS1")
D HNH00^P1HZMS
^SCR("P1HZMS1","P",40,"MUMPS2")
D HNH0^P1HZMS
^SCR("P1HZMS1","P",40,"TYP")
E
^SCR("P1HZMS1","P",41,"CRD")
19,57,N,7,2
^SCR("P1HZMS1","P",41,"HELP")

^SCR("P1HZMS1","P",41,"LMAX")
7
^SCR("P1HZMS1","P",41,"MUMPS1")

^SCR("P1HZMS1","P",41,"MUMPS2")

^SCR("P1HZMS1","P",41,"OUTPUT")

^SCR("P1HZMS1","P",41,"TYP")
N
^SCR("P1HZMS1","P",45,"CRD")
19,34,E,5,0
^SCR("P1HZMS1","P",45,"HELP")

^SCR("P1HZMS1","P",45,"LMAX")
5
^SCR("P1HZMS1","P",45,"MUMPS1")

^SCR("P1HZMS1","P",45,"MUMPS2")
D DMSAH^P1HZMS
^SCR("P1HZMS1","P",45,"TYP")
E
^SCR("P1HZMS1","P",46,"CRD")
19,26,N,6,2
^SCR("P1HZMS1","P",46,"HELP")

^SCR("P1HZMS1","P",46,"LMAX")
6
^SCR("P1HZMS1","P",46,"MUMPS1")

^SCR("P1HZMS1","P",46,"MUMPS2")

^SCR("P1HZMS1","P",46,"OUTPUT")

^SCR("P1HZMS1","P",46,"TYP")
N
^SCR("P1HZMS1","P",48,"CRD")
19,7,E,17,0
^SCR("P1HZMS1","P",48,"HELP")

^SCR("P1HZMS1","P",48,"LMAX")
17
^SCR("P1HZMS1","P",48,"MUMPS1")

^SCR("P1HZMS1","P",48,"MUMPS2")

^SCR("P1HZMS1","P",48,"OUTPUT")

^SCR("P1HZMS1","P",48,"TYP")
E
^SCR("P1HZMS1","P",56,"CRD")
20,64,E,8,0
^SCR("P1HZMS1","P",56,"HELP")

^SCR("P1HZMS1","P",56,"LMAX")
8
^SCR("P1HZMS1","P",56,"MUMPS1")

^SCR("P1HZMS1","P",56,"MUMPS2")

^SCR("P1HZMS1","P",56,"OUTPUT")

^SCR("P1HZMS1","P",56,"TYP")
E
^SCR("P1HZMS1","P",57,"CRD")
20,49,N,8,2
^SCR("P1HZMS1","P",57,"HELP")

^SCR("P1HZMS1","P",57,"LMAX")
8
^SCR("P1HZMS1","P",57,"MUMPS1")

^SCR("P1HZMS1","P",57,"MUMPS2")

^SCR("P1HZMS1","P",57,"OUTPUT")

^SCR("P1HZMS1","P",57,"TYP")
N
^SCR("P1HZMS1","P",58,"CRD")
20,34,N,8,2
^SCR("P1HZMS1","P",58,"HELP")

^SCR("P1HZMS1","P",58,"LMAX")
8
^SCR("P1HZMS1","P",58,"MUMPS1")

^SCR("P1HZMS1","P",58,"MUMPS2")

^SCR("P1HZMS1","P",58,"OUTPUT")

^SCR("P1HZMS1","P",58,"TYP")
N
^SCR("P1HZMS1","P",59,"CRD")
20,19,N,8,2
^SCR("P1HZMS1","P",59,"HELP")

^SCR("P1HZMS1","P",59,"LMAX")
8
^SCR("P1HZMS1","P",59,"MUMPS1")

^SCR("P1HZMS1","P",59,"MUMPS2")

^SCR("P1HZMS1","P",59,"OUTPUT")

^SCR("P1HZMS1","P",59,"TYP")
N
^SCR("P1HZMS1","P",60,"CRD")
20,6,N,6,2
^SCR("P1HZMS1","P",60,"HELP")

^SCR("P1HZMS1","P",60,"LMAX")
6
^SCR("P1HZMS1","P",60,"MUMPS1")

^SCR("P1HZMS1","P",60,"MUMPS2")

^SCR("P1HZMS1","P",60,"OUTPUT")

^SCR("P1HZMS1","P",60,"TYP")
N
^SCR("P1HZMS1","P",61,"CRD")
20,6,H,4
^SCR("P1HZMS1","P",61,"HELP")

^SCR("P1HZMS1","P",61,"LMAX")
6
^SCR("P1HZMS1","P",61,"MUMPS1")

^SCR("P1HZMS1","P",61,"MUMPS2")

^SCR("P1HZMS1","P",61,"OUTPUT")

^SCR("P1HZMS1","P",61,"TYP")
H
^SCR("P1HZMS1","P",72,"CRD")
21,59,E,7,0
^SCR("P1HZMS1","P",72,"HELP")

^SCR("P1HZMS1","P",72,"LMAX")
7
^SCR("P1HZMS1","P",72,"MUMPS1")

^SCR("P1HZMS1","P",72,"MUMPS2")

^SCR("P1HZMS1","P",72,"OUTPUT")

^SCR("P1HZMS1","P",72,"TYP")
E
^SCR("P1HZMS1","P",73,"CRD")
21,44,E,7,0
^SCR("P1HZMS1","P",73,"HELP")

^SCR("P1HZMS1","P",73,"LMAX")
7
^SCR("P1HZMS1","P",73,"MUMPS1")

^SCR("P1HZMS1","P",73,"MUMPS2")

^SCR("P1HZMS1","P",73,"OUTPUT")

^SCR("P1HZMS1","P",73,"TYP")
E
^SCR("P1HZMS1","P",74,"CRD")
21,23,E,7,0
^SCR("P1HZMS1","P",74,"HELP")

^SCR("P1HZMS1","P",74,"LMAX")
7
^SCR("P1HZMS1","P",74,"MUMPS1")

^SCR("P1HZMS1","P",74,"MUMPS2")

^SCR("P1HZMS1","P",74,"OUTPUT")

^SCR("P1HZMS1","P",74,"TYP")
E
^SCR("P1HZMS1","P",76,"CRD")
21,4,N,7,2
^SCR("P1HZMS1","P",76,"HELP")

^SCR("P1HZMS1","P",76,"LMAX")
7
^SCR("P1HZMS1","P",76,"MUMPS1")

^SCR("P1HZMS1","P",76,"MUMPS2")

^SCR("P1HZMS1","P",76,"OUTPUT")

^SCR("P1HZMS1","P",76,"TYP")
N
^SCR("P1HZMS1","P",80,"CRD")
22,74,H,30
^SCR("P1HZMS1","P",80,"HELP")

^SCR("P1HZMS1","P",80,"LMAX")
34
^SCR("P1HZMS1","P",80,"MUMPS1")
D HRA20^P1HZMS
^SCR("P1HZMS1","P",80,"MUMPS2")

^SCR("P1HZMS1","P",80,"TYP")
H
^SCR("P1HZMS1","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZMS1","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZMS1","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZMS1","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZMS1","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZMS1","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZMS1","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZMS1","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZMS1","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZMS1","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZMS1","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZMS1","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZMS1","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZMS1","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZMS1","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZMS1","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZMS1","P","NAME","DATK")
8
^SCR("P1HZMS1","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZMS1","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZMS1","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZMS1","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZMS1","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZMS1","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZMS1","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZMS1","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZMS1","P","NAME","DMSAH")
45
^SCR("P1HZMS1","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZMS1","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZMS1","P","NAME","DMSH")
46
^SCR("P1HZMS1","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZMS1","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZMS1","P","NAME","EMDA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",14)
^SCR("P1HZMS1","P","NAME","EMDA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",14)
^SCR("P1HZMS1","P","NAME","FIRE")
48
^SCR("P1HZMS1","P","NAME","FIRE","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",4)
^SCR("P1HZMS1","P","NAME","FIRE","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",4)
^SCR("P1HZMS1","P","NAME","HNH")
41
^SCR("P1HZMS1","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZMS1","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZMS1","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZMS1","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZMS1","P","NAME","HNHAH")
40
^SCR("P1HZMS1","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZMS1","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZMS1","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZMS1","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZMS1","P","NAME","HODAA")
32
^SCR("P1HZMS1","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZMS1","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZMS1","P","NAME","HRA2")
80
^SCR("P1HZMS1","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZMS1","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZMS1","P","NAME","HSB")
73
^SCR("P1HZMS1","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZMS1","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZMS1","P","NAME","HSB2")
74
^SCR("P1HZMS1","P","NAME","HZM")
12
^SCR("P1HZMS1","P","NAME","HZM","KEY")

^SCR("P1HZMS1","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK
^SCR("P1HZMS1","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZMS1","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL,EMDA
^SCR("P1HZMS1","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD,,FIRE
^SCR("P1HZMS1","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZMS1","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZMS1","P","NAME","ITRA")
59
^SCR("P1HZMS1","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZMS1","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZMS1","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZMS1","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZMS1","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZMS1","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZMS1","P","NAME","LKHN")
33
^SCR("P1HZMS1","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZMS1","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZMS1","P","NAME","LKHN1")
34
^SCR("P1HZMS1","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZMS1","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZMS1","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZMS1","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZMS1","P","NAME","MLZR0")
1
^SCR("P1HZMS1","P","NAME","MLZR1")
3
^SCR("P1HZMS1","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZMS1","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZMS1","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZMS1","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZMS1","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZMS1","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZMS1","P","NAME","NCAB")
72
^SCR("P1HZMS1","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZMS1","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZMS1","P","NAME","NMB")
5
^SCR("P1HZMS1","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZMS1","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZMS1","P","NAME","ODEF")
60
^SCR("P1HZMS1","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZMS1","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZMS1","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZMS1","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZMS1","P","NAME","OTL")
61
^SCR("P1HZMS1","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZMS1","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZMS1","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZMS1","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZMS1","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZMS1","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZMS1","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZMS1","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZMS1","P","NAME","SHUL1")
57
^SCR("P1HZMS1","P","NAME","SHULA")
58
^SCR("P1HZMS1","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZMS1","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZMS1","P","NAME","SOAD")
35
^SCR("P1HZMS1","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZMS1","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZMS1","P","NAME","TIP")
76
^SCR("P1HZMS1","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZMS1","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZMS1","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZMS1","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZMS1","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZMS1","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZMS1","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZMS1","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZMS1","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZMS1","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZMS1","P","NAME","TSHL")
56
^SCR("P1HZMS1","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZMS1","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZMS1","P","NAME","ZMANI")
37
^SCR("P1HZMS1","P","NAME","ZMANK")
31
^SCR("P1HZMS1","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZMS1","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZMS1","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZMS1","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZMS1","P","NM",1)
MLZR0
^SCR("P1HZMS1","P","NM",3)
MLZR1
^SCR("P1HZMS1","P","NM",5)
NMB
^SCR("P1HZMS1","P","NM",8)
DATK
^SCR("P1HZMS1","P","NM",12)
HZM
^SCR("P1HZMS1","P","NM",31)
ZMANK
^SCR("P1HZMS1","P","NM",32)
HODAA
^SCR("P1HZMS1","P","NM",33)
LKHN
^SCR("P1HZMS1","P","NM",34)
LKHN1
^SCR("P1HZMS1","P","NM",35)
SOAD
^SCR("P1HZMS1","P","NM",37)
ZMANI
^SCR("P1HZMS1","P","NM",40)
HNHAH
^SCR("P1HZMS1","P","NM",41)
HNH
^SCR("P1HZMS1","P","NM",45)
DMSAH
^SCR("P1HZMS1","P","NM",46)
DMSH
^SCR("P1HZMS1","P","NM",48)
FIRE
^SCR("P1HZMS1","P","NM",56)
TSHL
^SCR("P1HZMS1","P","NM",57)
SHUL1
^SCR("P1HZMS1","P","NM",58)
SHULA
^SCR("P1HZMS1","P","NM",59)
ITRA
^SCR("P1HZMS1","P","NM",60)
ODEF
^SCR("P1HZMS1","P","NM",61)
OTL
^SCR("P1HZMS1","P","NM",72)
NCAB
^SCR("P1HZMS1","P","NM",73)
HSB
^SCR("P1HZMS1","P","NM",74)
HSB2
^SCR("P1HZMS1","P","NM",76)
TIP
^SCR("P1HZMS1","P","NM",80)
HRA2
^SCR("P1HZMS1","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZMS1","P","REF",1,"RZD")
\
^SCR("P1HZMS1","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK
^SCR("P1HZMS1","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZMS1","P","REF",2,"RZD")
\
^SCR("P1HZMS1","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZMS1","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZMS1","P","REF",3,"RZD")
\
^SCR("P1HZMS1","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL\EMDA
^SCR("P1HZMS1","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZMS1","P","REF",4,"RZD")
\\
^SCR("P1HZMS1","P","REF",4,"STR")
HRA2\\HODAA\\MSD\\FIRE
^SCR("P1HZMS3")
H
^SCR("P1HZMS3",1)
 {08     }:dtew 'z {             34}{33       } gewl {        03} {01   }: xvln
^SCR("P1HZMS3",2)
 {31               }: dpnfd  zlaw onf  {      12} dpnfd 'qn         {05 }:ogley
^SCR("P1HZMS3",3)
               {37  }: oexg` oekcr onf     {35 }:micreq 'qn {              32} 
^SCR("P1HZMS3",4)
                                                                             1$
^SCR("P1HZMS3",5)
 :    dxrd    :  mekq :zetqez: zenk :  xign :     hixt xe`z    :  :   cew  :   
^SCR("P1HZMS3",6)
                                                                               
^SCR("P1HZMS3",7)
                                                                               
^SCR("P1HZMS3",8)
                                                                               
^SCR("P1HZMS3",9)
                                                                               
^SCR("P1HZMS3",10)
                                                                               
^SCR("P1HZMS3",11)
                                                                               
^SCR("P1HZMS3",12)
                                                                               
^SCR("P1HZMS3",13)
                                                                               
^SCR("P1HZMS3",14)
                                                                               
^SCR("P1HZMS3",15)
                                                                               
^SCR("P1HZMS3",16)
                                                                               
^SCR("P1HZMS3",17)
                                                                               
^SCR("P1HZMS3",18)
 $1                                                                            
^SCR("P1HZMS3",19)
   {48           }  {46   }={45  }:(%)zexy inc     g"y {41    }={40   }dgpd cew
^SCR("P1HZMS3",20)
   61}{60    }scer {59     }:dxzi {58     }:dtwd {57     }:mley {56     :melyzl
^SCR("P1HZMS3",21)
    {76    }  tih      {74    }:i`xy` oeayg {73    }:oeayg {72    }:zipeayg 'qn
^SCR("P1HZMS3",22)
 <CTRL>+C - micreq 'qn okcrl {82   } creql {                           80}:dxrd
^SCR("P1HZMS3",23)
                                                                               
^SCR("P1HZMS3","A",1)
:„”…—'š‡…—Œ:˜–ŒŽ
^SCR("P1HZMS3","A",2)
:„�Ž†„šŒ�—�Ž†„�Ž†„'‘Ž:�‡Œ…™
^SCR("P1HZMS3","A",3)
:�…˜‡€�…‹ƒ’�Ž†:�‰ƒ’…‘'‘Ž
^SCR("P1HZMS3","A",4)

^SCR("P1HZMS3","A",5)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1HZMS3","A",6)
---------------------------------------------------------------------
^SCR("P1HZMS3","A",7)

^SCR("P1HZMS3","A",8)

^SCR("P1HZMS3","A",9)

^SCR("P1HZMS3","A",10)

^SCR("P1HZMS3","A",11)

^SCR("P1HZMS3","A",12)

^SCR("P1HZMS3","A",13)

^SCR("P1HZMS3","A",14)

^SCR("P1HZMS3","A",15)

^SCR("P1HZMS3","A",16)

^SCR("P1HZMS3","A",17)

^SCR("P1HZMS3","A",18)

^SCR("P1HZMS3","A",19)
=:(%)š…˜™‰Žƒ‡"™=„‡�„ƒ…—
^SCR("P1HZMS3","A",20)
“ƒ…’:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZMS3","A",21)
”‰ˆ:‰€˜™€�…�™‡:�…�™‡:š‰�…�™‡'‘Ž
^SCR("P1HZMS3","A",22)
<CTRL>+C-�‰ƒ’…‘'‘Ž�‹ƒ’Œƒ’…‘Œ:„˜’„
^SCR("P1HZMS3","A",23)

^SCR("P1HZMS3","AV",1)
:vpuew,juek:rmkn
^SCR("P1HZMS3","AV",2)
:vbnzv,kceinzvbnzvwxn:ijkua
^SCR("P1HZMS3","AV",3)
:iurjtiufsginz:ohsguxwxn
^SCR("P1HZMS3","AV",4)

^SCR("P1HZMS3","AV",5)
vrgvoufx,upxu,,unfrhjnyhrprut,sue
^SCR("P1HZMS3","AV",6)
---------------------------------------------------------------------
^SCR("P1HZMS3","AV",7)

^SCR("P1HZMS3","AV",8)

^SCR("P1HZMS3","AV",9)

^SCR("P1HZMS3","AV",10)

^SCR("P1HZMS3","AV",11)

^SCR("P1HZMS3","AV",12)

^SCR("P1HZMS3","AV",13)

^SCR("P1HZMS3","AV",14)

^SCR("P1HZMS3","AV",15)

^SCR("P1HZMS3","AV",16)

^SCR("P1HZMS3","AV",17)

^SCR("P1HZMS3","AV",18)

^SCR("P1HZMS3","AV",19)
=:(%),urahnsj"a=vjbvsue
^SCR("P1HZMS3","AV",20)
;sug:vr,h:vpev:okua:ouka,k
^SCR("P1HZMS3","AV",21)
phy:htratiucaj:iucaj:,hbucajwxn
^SCR("P1HZMS3","AV",22)
<CTRL>+C-ohsguxwxnifsgksguxk:vrgv
^SCR("P1HZMS3","AV",23)

^SCR("P1HZMS3","G",1,"CRD")
6,75,E,8,0
^SCR("P1HZMS3","G",1,"FNC")
F9,F10,F8,PGRG,=,F2
^SCR("P1HZMS3","G",1,"GLOB")
PAR
^SCR("P1HZMS3","G",1,"HELP")
<F2>-dpnfd zbvd,<F10>-zetqez zbvd;<F9>-zetqez,<F8>-zeveaw,<F7>-dlah,<F6>-my
^SCR("P1HZMS3","G",1,"LMAX")
8
^SCR("P1HZMS3","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZMS3","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZMS3","G",1,"MUST")

^SCR("P1HZMS3","G",1,"NLN")
20
^SCR("P1HZMS3","G",1,"RZD")
**
^SCR("P1HZMS3","G",1,"SHEM")
   cew  
^SCR("P1HZMS3","G",1,"TOPB")
8
^SCR("P1HZMS3","G",1,"TYP")
E
^SCR("P1HZMS3","G",1,"VRB")
PAR1
^SCR("P1HZMS3","G",2,"CRD")
6,66,E,2,0
^SCR("P1HZMS3","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZMS3","G",2,"LMAX")
2
^SCR("P1HZMS3","G",2,"MUMPS1")

^SCR("P1HZMS3","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZMS3","G",2,"OUTPUT")

^SCR("P1HZMS3","G",2,"SHEM")
  
^SCR("P1HZMS3","G",2,"TYP")
E
^SCR("P1HZMS3","G",3,"CRD")
6,63,H,18,0
^SCR("P1HZMS3","G",3,"HELP")

^SCR("P1HZMS3","G",3,"LMAX")
18
^SCR("P1HZMS3","G",3,"MUMPS1")

^SCR("P1HZMS3","G",3,"MUMPS2")

^SCR("P1HZMS3","G",3,"OUTPUT")

^SCR("P1HZMS3","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZMS3","G",3,"TYP")
H
^SCR("P1HZMS3","G",4,"CRD")
6,44,N,7,2
^SCR("P1HZMS3","G",4,"HELP")

^SCR("P1HZMS3","G",4,"LMAX")
7
^SCR("P1HZMS3","G",4,"MUMPS1")

^SCR("P1HZMS3","G",4,"MUMPS2")
D MH^P1HZMS
^SCR("P1HZMS3","G",4,"OUTPUT")

^SCR("P1HZMS3","G",4,"SHEM")
  xign 
^SCR("P1HZMS3","G",4,"TYP")
N
^SCR("P1HZMS3","G",5,"CRD")
6,36,N,6,3
^SCR("P1HZMS3","G",5,"HELP")

^SCR("P1HZMS3","G",5,"LMAX")
6
^SCR("P1HZMS3","G",5,"MUMPS1")
D KAM0^P1HZMS
^SCR("P1HZMS3","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZMS3","G",5,"MUST")

^SCR("P1HZMS3","G",5,"SHEM")
 zenk 
^SCR("P1HZMS3","G",5,"TYP")
N
^SCR("P1HZMS3","G",6,"CRD")
6,29,N,6,2
^SCR("P1HZMS3","G",6,"HELP")

^SCR("P1HZMS3","G",6,"LMAX")
6
^SCR("P1HZMS3","G",6,"MUMPS1")

^SCR("P1HZMS3","G",6,"MUMPS2")

^SCR("P1HZMS3","G",6,"OUTPUT")

^SCR("P1HZMS3","G",6,"SHEM")
zetqez
^SCR("P1HZMS3","G",6,"TYP")
N
^SCR("P1HZMS3","G",7,"CRD")
6,22,N,7,2
^SCR("P1HZMS3","G",7,"HELP")

^SCR("P1HZMS3","G",7,"LMAX")
7
^SCR("P1HZMS3","G",7,"MUMPS1")

^SCR("P1HZMS3","G",7,"MUMPS2")

^SCR("P1HZMS3","G",7,"OUTPUT")

^SCR("P1HZMS3","G",7,"SHEM")
  mekq 
^SCR("P1HZMS3","G",7,"TYP")
N
^SCR("P1HZMS3","G",8,"CRD")
6,14,H,12/24,0
^SCR("P1HZMS3","G",8,"HELP")

^SCR("P1HZMS3","G",8,"LMAX")
12
^SCR("P1HZMS3","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZMS3","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZMS3","G",8,"SHEM")
    dxrd    
^SCR("P1HZMS3","G",8,"TYP")
H
^SCR("P1HZMS3","G","DEL")
Y
^SCR("P1HZMS3","G","MAX")
9999
^SCR("P1HZMS3","G","NAME","HRP")
8
^SCR("P1HZMS3","G","NAME","KAM")
5
^SCR("P1HZMS3","G","NAME","MH")
4
^SCR("P1HZMS3","G","NAME","PAR")
1
^SCR("P1HZMS3","G","NAME","PAR1")
3
^SCR("P1HZMS3","G","NAME","SUG")
2
^SCR("P1HZMS3","G","NAME","SUM")
7
^SCR("P1HZMS3","G","NAME","TSF")
6
^SCR("P1HZMS3","G","NM",1)
PAR
^SCR("P1HZMS3","G","NM",2)
SUG
^SCR("P1HZMS3","G","NM",3)
PAR1
^SCR("P1HZMS3","G","NM",4)
MH
^SCR("P1HZMS3","G","NM",5)
KAM
^SCR("P1HZMS3","G","NM",6)
TSF
^SCR("P1HZMS3","G","NM",7)
SUM
^SCR("P1HZMS3","G","NM",8)
HRP
^SCR("P1HZMS3","G","RB")
5,2,19,79
^SCR("P1HZMS3","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZMS3","G","RZD")
\
^SCR("P1HZMS3","G","STEP")
1
^SCR("P1HZMS3","G","STG")
 :    dxrd    :  mekq :zetqez: zenk :  xign :     hixt xe`z    :  :   cew  :   
^SCR("P1HZMS3","G","VG")
7
^SCR("P1HZMS3","NAME")

^SCR("P1HZMS3","P",1,"CRD")
1,66,E,5.,0
^SCR("P1HZMS3","P",1,"HELP")
<F7> - mixvln zbvd 
^SCR("P1HZMS3","P",1,"LMAX")
6
^SCR("P1HZMS3","P",1,"MUMPS1")
D MLZR01^P1HZMS
^SCR("P1HZMS3","P",1,"MUMPS2")
D MLZR0^P1HZMS
^SCR("P1HZMS3","P",1,"MUST")

^SCR("P1HZMS3","P",1,"TYP")
E
^SCR("P1HZMS3","P",3,"CRD")
1,65,H,11
^SCR("P1HZMS3","P",3,"HELP")

^SCR("P1HZMS3","P",3,"LMAX")
11
^SCR("P1HZMS3","P",3,"MUMPS1")

^SCR("P1HZMS3","P",3,"MUMPS2")

^SCR("P1HZMS3","P",3,"OUTPUT")

^SCR("P1HZMS3","P",3,"TYP")
H
^SCR("P1HZMS3","P",5,"CRD")
2,68,E,4,0
^SCR("P1HZMS3","P",5,"HELP")
<F5>+ogley 'qn - ogley ly dixehqid ,<F9>-dpnfd yetig ,<F7>- migezt zepgley
^SCR("P1HZMS3","P",5,"LMAX")
4
^SCR("P1HZMS3","P",5,"MUMPS1")

^SCR("P1HZMS3","P",5,"MUMPS2")
D NMB^P1HZNM I $G(HZM) S NMB=$$^P3NMB(HZM)
^SCR("P1HZMS3","P",5,"MUST")

^SCR("P1HZMS3","P",5,"TYP")
E
^SCR("P1HZMS3","P",8,"CRD")
1,1,D,8,0
^SCR("P1HZMS3","P",8,"HELP")

^SCR("P1HZMS3","P",8,"LMAX")
8
^SCR("P1HZMS3","P",8,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZMS3","P",8,"MUMPS2")

^SCR("P1HZMS3","P",8,"OUTPUT")

^SCR("P1HZMS3","P",8,"TYP")
D
^SCR("P1HZMS3","P",12,"CRD")
2,49,H,7
^SCR("P1HZMS3","P",12,"HELP")

^SCR("P1HZMS3","P",12,"LMAX")
9
^SCR("P1HZMS3","P",12,"MUMPS1")

^SCR("P1HZMS3","P",12,"MUMPS2")

^SCR("P1HZMS3","P",12,"OUTPUT")

^SCR("P1HZMS3","P",12,"TYP")
H
^SCR("P1HZMS3","P",31,"CRD")
2,1,E,18,0
^SCR("P1HZMS3","P",31,"HELP")

^SCR("P1HZMS3","P",31,"LMAX")
18
^SCR("P1HZMS3","P",31,"MUMPS1")
D ZMANK0^P1HZMS
^SCR("P1HZMS3","P",31,"MUMPS2")

^SCR("P1HZMS3","P",31,"OUTPUT")

^SCR("P1HZMS3","P",31,"TYP")
E
^SCR("P1HZMS3","P",32,"CRD")
3,78,H,17
^SCR("P1HZMS3","P",32,"HELP")

^SCR("P1HZMS3","P",32,"LMAX")
17
^SCR("P1HZMS3","P",32,"MUMPS1")

^SCR("P1HZMS3","P",32,"MUMPS2")

^SCR("P1HZMS3","P",32,"OUTPUT")

^SCR("P1HZMS3","P",32,"TYP")
H
^SCR("P1HZMS3","P",33,"CRD")
1,36,E,10,0
^SCR("P1HZMS3","P",33,"FNC")

^SCR("P1HZMS3","P",33,"GLOB")
LKH
^SCR("P1HZMS3","P",33,"HELP")

^SCR("P1HZMS3","P",33,"LMAX")
10
^SCR("P1HZMS3","P",33,"MUMPS1")
D LKHN0^P1HZMS
^SCR("P1HZMS3","P",33,"MUMPS2")
D LKHN^P1HZMS
^SCR("P1HZMS3","P",33,"NLN")
20
^SCR("P1HZMS3","P",33,"RZD")
\
^SCR("P1HZMS3","P",33,"TOPB")
8
^SCR("P1HZMS3","P",33,"TYP")
E
^SCR("P1HZMS3","P",33,"VRB")
LKHN1
^SCR("P1HZMS3","P",34,"CRD")
1,36,H,16
^SCR("P1HZMS3","P",34,"HELP")

^SCR("P1HZMS3","P",34,"LMAX")
16
^SCR("P1HZMS3","P",34,"MUMPS1")

^SCR("P1HZMS3","P",34,"MUMPS2")

^SCR("P1HZMS3","P",34,"OUTPUT")

^SCR("P1HZMS3","P",34,"TYP")
H
^SCR("P1HZMS3","P",35,"CRD")
3,43,E,3,0
^SCR("P1HZMS3","P",35,"HELP")

^SCR("P1HZMS3","P",35,"LMAX")
4
^SCR("P1HZMS3","P",35,"MUMPS1")
D SOAD0^P1HZMS
^SCR("P1HZMS3","P",35,"MUMPS2")
D SOAD^P1HZMS
^SCR("P1HZMS3","P",35,"MUST")

^SCR("P1HZMS3","P",35,"TYP")
E
^SCR("P1HZMS3","P",37,"CRD")
3,15,E,5,0
^SCR("P1HZMS3","P",37,"HELP")

^SCR("P1HZMS3","P",37,"LMAX")
5
^SCR("P1HZMS3","P",37,"MUMPS1")

^SCR("P1HZMS3","P",37,"MUMPS2")

^SCR("P1HZMS3","P",37,"OUTPUT")

^SCR("P1HZMS3","P",37,"TYP")
E
^SCR("P1HZMS3","P",40,"CRD")
19,64,E,6,0
^SCR("P1HZMS3","P",40,"HELP")

^SCR("P1HZMS3","P",40,"LMAX")
6
^SCR("P1HZMS3","P",40,"MUMPS1")
D HNH00^P1HZMS
^SCR("P1HZMS3","P",40,"MUMPS2")
D HNH0^P1HZMS
^SCR("P1HZMS3","P",40,"TYP")
E
^SCR("P1HZMS3","P",41,"CRD")
19,55,N,7,2
^SCR("P1HZMS3","P",41,"HELP")

^SCR("P1HZMS3","P",41,"LMAX")
7
^SCR("P1HZMS3","P",41,"MUMPS1")

^SCR("P1HZMS3","P",41,"MUMPS2")

^SCR("P1HZMS3","P",41,"OUTPUT")

^SCR("P1HZMS3","P",41,"TYP")
N
^SCR("P1HZMS3","P",45,"CRD")
19,28,E,5,0
^SCR("P1HZMS3","P",45,"HELP")

^SCR("P1HZMS3","P",45,"LMAX")
5
^SCR("P1HZMS3","P",45,"MUMPS1")

^SCR("P1HZMS3","P",45,"MUMPS2")
D DMSAH^P1HZMS
^SCR("P1HZMS3","P",45,"TYP")
E
^SCR("P1HZMS3","P",46,"CRD")
19,20,N,6,2
^SCR("P1HZMS3","P",46,"HELP")

^SCR("P1HZMS3","P",46,"LMAX")
6
^SCR("P1HZMS3","P",46,"MUMPS1")

^SCR("P1HZMS3","P",46,"MUMPS2")

^SCR("P1HZMS3","P",46,"OUTPUT")

^SCR("P1HZMS3","P",46,"TYP")
N
^SCR("P1HZMS3","P",48,"CRD")
19,3,E,14,0
^SCR("P1HZMS3","P",48,"HELP")

^SCR("P1HZMS3","P",48,"LMAX")
14
^SCR("P1HZMS3","P",48,"MUMPS1")

^SCR("P1HZMS3","P",48,"MUMPS2")

^SCR("P1HZMS3","P",48,"OUTPUT")

^SCR("P1HZMS3","P",48,"TYP")
E
^SCR("P1HZMS3","P",56,"CRD")
20,64,E,8,0
^SCR("P1HZMS3","P",56,"HELP")

^SCR("P1HZMS3","P",56,"LMAX")
8
^SCR("P1HZMS3","P",56,"MUMPS1")

^SCR("P1HZMS3","P",56,"MUMPS2")

^SCR("P1HZMS3","P",56,"OUTPUT")

^SCR("P1HZMS3","P",56,"TYP")
E
^SCR("P1HZMS3","P",57,"CRD")
20,49,N,8,2
^SCR("P1HZMS3","P",57,"HELP")

^SCR("P1HZMS3","P",57,"LMAX")
8
^SCR("P1HZMS3","P",57,"MUMPS1")

^SCR("P1HZMS3","P",57,"MUMPS2")

^SCR("P1HZMS3","P",57,"OUTPUT")

^SCR("P1HZMS3","P",57,"TYP")
N
^SCR("P1HZMS3","P",58,"CRD")
20,34,N,8,2
^SCR("P1HZMS3","P",58,"HELP")

^SCR("P1HZMS3","P",58,"LMAX")
8
^SCR("P1HZMS3","P",58,"MUMPS1")

^SCR("P1HZMS3","P",58,"MUMPS2")

^SCR("P1HZMS3","P",58,"OUTPUT")

^SCR("P1HZMS3","P",58,"TYP")
N
^SCR("P1HZMS3","P",59,"CRD")
20,19,N,8,2
^SCR("P1HZMS3","P",59,"HELP")

^SCR("P1HZMS3","P",59,"LMAX")
8
^SCR("P1HZMS3","P",59,"MUMPS1")

^SCR("P1HZMS3","P",59,"MUMPS2")

^SCR("P1HZMS3","P",59,"OUTPUT")

^SCR("P1HZMS3","P",59,"TYP")
N
^SCR("P1HZMS3","P",60,"CRD")
20,6,N,7,2
^SCR("P1HZMS3","P",60,"HELP")

^SCR("P1HZMS3","P",60,"LMAX")
7
^SCR("P1HZMS3","P",60,"MUMPS1")

^SCR("P1HZMS3","P",60,"MUMPS2")

^SCR("P1HZMS3","P",60,"OUTPUT")

^SCR("P1HZMS3","P",60,"TYP")
N
^SCR("P1HZMS3","P",61,"CRD")
20,6,H,4
^SCR("P1HZMS3","P",61,"HELP")

^SCR("P1HZMS3","P",61,"LMAX")
6
^SCR("P1HZMS3","P",61,"MUMPS1")

^SCR("P1HZMS3","P",61,"MUMPS2")

^SCR("P1HZMS3","P",61,"OUTPUT")

^SCR("P1HZMS3","P",61,"TYP")
H
^SCR("P1HZMS3","P",72,"CRD")
21,59,E,7,0
^SCR("P1HZMS3","P",72,"HELP")

^SCR("P1HZMS3","P",72,"LMAX")
7
^SCR("P1HZMS3","P",72,"MUMPS1")

^SCR("P1HZMS3","P",72,"MUMPS2")

^SCR("P1HZMS3","P",72,"OUTPUT")

^SCR("P1HZMS3","P",72,"TYP")
E
^SCR("P1HZMS3","P",73,"CRD")
21,44,E,7,0
^SCR("P1HZMS3","P",73,"HELP")

^SCR("P1HZMS3","P",73,"LMAX")
7
^SCR("P1HZMS3","P",73,"MUMPS1")

^SCR("P1HZMS3","P",73,"MUMPS2")

^SCR("P1HZMS3","P",73,"OUTPUT")

^SCR("P1HZMS3","P",73,"TYP")
E
^SCR("P1HZMS3","P",74,"CRD")
21,23,E,7,0
^SCR("P1HZMS3","P",74,"HELP")

^SCR("P1HZMS3","P",74,"LMAX")
7
^SCR("P1HZMS3","P",74,"MUMPS1")

^SCR("P1HZMS3","P",74,"MUMPS2")

^SCR("P1HZMS3","P",74,"OUTPUT")

^SCR("P1HZMS3","P",74,"TYP")
E
^SCR("P1HZMS3","P",76,"CRD")
21,4,N,7,2
^SCR("P1HZMS3","P",76,"HELP")

^SCR("P1HZMS3","P",76,"LMAX")
7
^SCR("P1HZMS3","P",76,"MUMPS1")

^SCR("P1HZMS3","P",76,"MUMPS2")

^SCR("P1HZMS3","P",76,"OUTPUT")

^SCR("P1HZMS3","P",76,"TYP")
N
^SCR("P1HZMS3","P",80,"CRD")
22,74,H,30
^SCR("P1HZMS3","P",80,"HELP")

^SCR("P1HZMS3","P",80,"LMAX")
30
^SCR("P1HZMS3","P",80,"MUMPS1")
D HRA20^P1HZMS
^SCR("P1HZMS3","P",80,"MUMPS2")

^SCR("P1HZMS3","P",80,"TYP")
H
^SCR("P1HZMS3","P",82,"CRD")
22,29,N,6,2
^SCR("P1HZMS3","P",82,"HELP")

^SCR("P1HZMS3","P",82,"LMAX")
6
^SCR("P1HZMS3","P",82,"MUMPS1")

^SCR("P1HZMS3","P",82,"MUMPS2")

^SCR("P1HZMS3","P",82,"OUTPUT")

^SCR("P1HZMS3","P",82,"TYP")
N
^SCR("P1HZMS3","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZMS3","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZMS3","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZMS3","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZMS3","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZMS3","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZMS3","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZMS3","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZMS3","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZMS3","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZMS3","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZMS3","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZMS3","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZMS3","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZMS3","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZMS3","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZMS3","P","NAME","DATK")
8
^SCR("P1HZMS3","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZMS3","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZMS3","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZMS3","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZMS3","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZMS3","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZMS3","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZMS3","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZMS3","P","NAME","DMSAH")
45
^SCR("P1HZMS3","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZMS3","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZMS3","P","NAME","DMSH")
46
^SCR("P1HZMS3","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZMS3","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZMS3","P","NAME","EMDA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",14)
^SCR("P1HZMS3","P","NAME","EMDA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",14)
^SCR("P1HZMS3","P","NAME","FIRE")
48
^SCR("P1HZMS3","P","NAME","FIRE","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",4)
^SCR("P1HZMS3","P","NAME","FIRE","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",4)
^SCR("P1HZMS3","P","NAME","HNH")
41
^SCR("P1HZMS3","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZMS3","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZMS3","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZMS3","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZMS3","P","NAME","HNHAH")
40
^SCR("P1HZMS3","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZMS3","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZMS3","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZMS3","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZMS3","P","NAME","HODAA")
32
^SCR("P1HZMS3","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZMS3","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZMS3","P","NAME","HRA2")
80
^SCR("P1HZMS3","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZMS3","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZMS3","P","NAME","HSB")
73
^SCR("P1HZMS3","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZMS3","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZMS3","P","NAME","HSB2")
74
^SCR("P1HZMS3","P","NAME","HZM")
12
^SCR("P1HZMS3","P","NAME","HZM","KEY")

^SCR("P1HZMS3","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK
^SCR("P1HZMS3","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZMS3","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL,EMDA
^SCR("P1HZMS3","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD,,FIRE
^SCR("P1HZMS3","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZMS3","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZMS3","P","NAME","ITRA")
59
^SCR("P1HZMS3","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZMS3","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZMS3","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZMS3","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZMS3","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZMS3","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZMS3","P","NAME","LKHN")
33
^SCR("P1HZMS3","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZMS3","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZMS3","P","NAME","LKHN1")
34
^SCR("P1HZMS3","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZMS3","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZMS3","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZMS3","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZMS3","P","NAME","MLZR0")
1
^SCR("P1HZMS3","P","NAME","MLZR1")
3
^SCR("P1HZMS3","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZMS3","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZMS3","P","NAME","MSOAD")
82
^SCR("P1HZMS3","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZMS3","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZMS3","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZMS3","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZMS3","P","NAME","NCAB")
72
^SCR("P1HZMS3","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZMS3","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZMS3","P","NAME","NMB")
5
^SCR("P1HZMS3","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZMS3","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZMS3","P","NAME","ODEF")
60
^SCR("P1HZMS3","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZMS3","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZMS3","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZMS3","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZMS3","P","NAME","OTL")
61
^SCR("P1HZMS3","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZMS3","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZMS3","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZMS3","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZMS3","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZMS3","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZMS3","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZMS3","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZMS3","P","NAME","SHUL1")
57
^SCR("P1HZMS3","P","NAME","SHULA")
58
^SCR("P1HZMS3","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZMS3","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZMS3","P","NAME","SOAD")
35
^SCR("P1HZMS3","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZMS3","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZMS3","P","NAME","TIP")
76
^SCR("P1HZMS3","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZMS3","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZMS3","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZMS3","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZMS3","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZMS3","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZMS3","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZMS3","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZMS3","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZMS3","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZMS3","P","NAME","TSHL")
56
^SCR("P1HZMS3","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZMS3","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZMS3","P","NAME","ZMANI")
37
^SCR("P1HZMS3","P","NAME","ZMANK")
31
^SCR("P1HZMS3","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZMS3","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZMS3","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZMS3","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZMS3","P","NM",1)
MLZR0
^SCR("P1HZMS3","P","NM",3)
MLZR1
^SCR("P1HZMS3","P","NM",5)
NMB
^SCR("P1HZMS3","P","NM",8)
DATK
^SCR("P1HZMS3","P","NM",12)
HZM
^SCR("P1HZMS3","P","NM",31)
ZMANK
^SCR("P1HZMS3","P","NM",32)
HODAA
^SCR("P1HZMS3","P","NM",33)
LKHN
^SCR("P1HZMS3","P","NM",34)
LKHN1
^SCR("P1HZMS3","P","NM",35)
SOAD
^SCR("P1HZMS3","P","NM",37)
ZMANI
^SCR("P1HZMS3","P","NM",40)
HNHAH
^SCR("P1HZMS3","P","NM",41)
HNH
^SCR("P1HZMS3","P","NM",45)
DMSAH
^SCR("P1HZMS3","P","NM",46)
DMSH
^SCR("P1HZMS3","P","NM",48)
FIRE
^SCR("P1HZMS3","P","NM",56)
TSHL
^SCR("P1HZMS3","P","NM",57)
SHUL1
^SCR("P1HZMS3","P","NM",58)
SHULA
^SCR("P1HZMS3","P","NM",59)
ITRA
^SCR("P1HZMS3","P","NM",60)
ODEF
^SCR("P1HZMS3","P","NM",61)
OTL
^SCR("P1HZMS3","P","NM",72)
NCAB
^SCR("P1HZMS3","P","NM",73)
HSB
^SCR("P1HZMS3","P","NM",74)
HSB2
^SCR("P1HZMS3","P","NM",76)
TIP
^SCR("P1HZMS3","P","NM",80)
HRA2
^SCR("P1HZMS3","P","NM",82)
MSOAD
^SCR("P1HZMS3","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZMS3","P","REF",1,"RZD")
\
^SCR("P1HZMS3","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK
^SCR("P1HZMS3","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZMS3","P","REF",2,"RZD")
\
^SCR("P1HZMS3","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZMS3","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZMS3","P","REF",3,"RZD")
\
^SCR("P1HZMS3","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL\EMDA
^SCR("P1HZMS3","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZMS3","P","REF",4,"RZD")
\\
^SCR("P1HZMS3","P","REF",4,"STR")
HRA2\\HODAA\\MSD\\FIRE
^SCR("P1HZMS4")
H
^SCR("P1HZMS4",1)
 {08     }:dtew 'z {             34}{33       } gewl {        03} {01   }: xvln
^SCR("P1HZMS4",2)
 {31               }: dpnfd  zlaw onf  {      12} dpnfd 'qn         {05 }:ogley
^SCR("P1HZMS4",3)
 {37               }: oexg` oekcr onf      {35 }:micreq 'qn {              32} 
^SCR("P1HZMS4",4)
                                                                             1$
^SCR("P1HZMS4",5)
 :        dxrd      :  mekq :zetqez: zenk: xign :     hixt xe`z    : : cew :   
^SCR("P1HZMS4",6)
                                                                               
^SCR("P1HZMS4",7)
                                                                               
^SCR("P1HZMS4",8)
                                                                               
^SCR("P1HZMS4",9)
                                                                               
^SCR("P1HZMS4",10)
                                                                               
^SCR("P1HZMS4",11)
                                                                               
^SCR("P1HZMS4",12)
                                                                               
^SCR("P1HZMS4",13)
                                                                               
^SCR("P1HZMS4",14)
                                                                               
^SCR("P1HZMS4",15)
                                                                               
^SCR("P1HZMS4",16)
 $1                                                                            
^SCR("P1HZMS4",17)
     {48           }  {46   }={45  }:(%)zexy inc     g"y {41    }={40   }dgpd %
^SCR("P1HZMS4",18)
   61}{60    }scer {59     }:dxzi {58     }:dtwd {57     }:mley {56     :melyzl
^SCR("P1HZMS4",19)
    {76    }  tih      {74    }:i`xy` oeayg {73    }:oeayg {72    }:zipeayg 'qn
^SCR("P1HZMS4",20)
  <CTRL>+C - micreq 'qn okcrl {82   }:creql {                          80}:dxrd
^SCR("P1HZMS4",21)
                                                                               
^SCR("P1HZMS4","A",1)
:„”…—'š‡…—Œ:˜–ŒŽ
^SCR("P1HZMS4","A",2)
:„�Ž†„šŒ�—�Ž†„�Ž†„'‘Ž:�‡Œ…™
^SCR("P1HZMS4","A",3)
:�…˜‡€�…‹ƒ’�Ž†:�‰ƒ’…‘'‘Ž
^SCR("P1HZMS4","A",4)

^SCR("P1HZMS4","A",5)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1HZMS4","A",6)
---------------------------------------------------------------------
^SCR("P1HZMS4","A",7)

^SCR("P1HZMS4","A",8)

^SCR("P1HZMS4","A",9)

^SCR("P1HZMS4","A",10)

^SCR("P1HZMS4","A",11)

^SCR("P1HZMS4","A",12)

^SCR("P1HZMS4","A",13)

^SCR("P1HZMS4","A",14)

^SCR("P1HZMS4","A",15)

^SCR("P1HZMS4","A",16)

^SCR("P1HZMS4","A",17)
=:(%)š…˜™‰Žƒ‡"™=„‡�„%
^SCR("P1HZMS4","A",18)
“ƒ…’:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZMS4","A",19)
”‰ˆ:‰€˜™€�…�™‡:�…�™‡:š‰�…�™‡'‘Ž
^SCR("P1HZMS4","A",20)
<CTRL>+C-�‰ƒ’…‘'‘Ž�‹ƒ’Œ:ƒ’…‘Œ:„˜’„
^SCR("P1HZMS4","A",21)

^SCR("P1HZMS4","AV",1)
:vpuew,juek:rmkn
^SCR("P1HZMS4","AV",2)
:vbnzv,kceinzvbnzvwxn:ijkua
^SCR("P1HZMS4","AV",3)
:iurjtiufsginz:ohsguxwxn
^SCR("P1HZMS4","AV",4)

^SCR("P1HZMS4","AV",5)
vrgvoufx,upxu,,unfrhjnyhrprut,sue
^SCR("P1HZMS4","AV",6)
---------------------------------------------------------------------
^SCR("P1HZMS4","AV",7)

^SCR("P1HZMS4","AV",8)

^SCR("P1HZMS4","AV",9)

^SCR("P1HZMS4","AV",10)

^SCR("P1HZMS4","AV",11)

^SCR("P1HZMS4","AV",12)

^SCR("P1HZMS4","AV",13)

^SCR("P1HZMS4","AV",14)

^SCR("P1HZMS4","AV",15)

^SCR("P1HZMS4","AV",16)

^SCR("P1HZMS4","AV",17)
=:(%),urahnsj"a=vjbv%
^SCR("P1HZMS4","AV",18)
;sug:vr,h:vpev:okua:ouka,k
^SCR("P1HZMS4","AV",19)
phy:htratiucaj:iucaj:,hbucajwxn
^SCR("P1HZMS4","AV",20)
<CTRL>+C-ohsguxwxnifsgk:sguxk:vrgv
^SCR("P1HZMS4","AV",21)

^SCR("P1HZMS4","G",1,"CRD")
6,75,E,5,0
^SCR("P1HZMS4","G",1,"FNC")
F9,F10,F8,PGRG,=,F2
^SCR("P1HZMS4","G",1,"GLOB")
PAR
^SCR("P1HZMS4","G",1,"HELP")
<F2>-dpnfd zbvd,<F10>-zetqez zbvd,<F9>-zetqez,<F8>-zeveaw,<F7>-dlah,<F6>-my
^SCR("P1HZMS4","G",1,"LMAX")
5
^SCR("P1HZMS4","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZMS4","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZMS4","G",1,"MUST")

^SCR("P1HZMS4","G",1,"NLN")
20
^SCR("P1HZMS4","G",1,"RZD")
**
^SCR("P1HZMS4","G",1,"SHEM")
 cew 
^SCR("P1HZMS4","G",1,"TOPB")
8
^SCR("P1HZMS4","G",1,"TYP")
E
^SCR("P1HZMS4","G",1,"VRB")
PAR1
^SCR("P1HZMS4","G",2,"CRD")
6,69,E,1,0
^SCR("P1HZMS4","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZMS4","G",2,"LMAX")
1
^SCR("P1HZMS4","G",2,"MUMPS1")

^SCR("P1HZMS4","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZMS4","G",2,"OUTPUT")

^SCR("P1HZMS4","G",2,"SHEM")
 
^SCR("P1HZMS4","G",2,"TYP")
E
^SCR("P1HZMS4","G",3,"CRD")
6,67,H,18,0
^SCR("P1HZMS4","G",3,"HELP")

^SCR("P1HZMS4","G",3,"LMAX")
18
^SCR("P1HZMS4","G",3,"MUMPS1")

^SCR("P1HZMS4","G",3,"MUMPS2")

^SCR("P1HZMS4","G",3,"OUTPUT")

^SCR("P1HZMS4","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZMS4","G",3,"TYP")
H
^SCR("P1HZMS4","G",4,"CRD")
6,48,N,6,2
^SCR("P1HZMS4","G",4,"HELP")

^SCR("P1HZMS4","G",4,"LMAX")
6
^SCR("P1HZMS4","G",4,"MUMPS1")

^SCR("P1HZMS4","G",4,"MUMPS2")
I MH<0 S %SC("ER")=1
^SCR("P1HZMS4","G",4,"OUTPUT")

^SCR("P1HZMS4","G",4,"SHEM")
 xign 
^SCR("P1HZMS4","G",4,"TYP")
N
^SCR("P1HZMS4","G",5,"CRD")
6,41,N,5,0
^SCR("P1HZMS4","G",5,"HELP")

^SCR("P1HZMS4","G",5,"LMAX")
5
^SCR("P1HZMS4","G",5,"MUMPS1")
D KAM0^P1HZMS
^SCR("P1HZMS4","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZMS4","G",5,"MUST")

^SCR("P1HZMS4","G",5,"SHEM")
 zenk
^SCR("P1HZMS4","G",5,"TYP")
N
^SCR("P1HZMS4","G",6,"CRD")
6,35,N,6,2
^SCR("P1HZMS4","G",6,"HELP")

^SCR("P1HZMS4","G",6,"LMAX")
6
^SCR("P1HZMS4","G",6,"MUMPS1")

^SCR("P1HZMS4","G",6,"MUMPS2")

^SCR("P1HZMS4","G",6,"OUTPUT")

^SCR("P1HZMS4","G",6,"SHEM")
zetqez
^SCR("P1HZMS4","G",6,"TYP")
N
^SCR("P1HZMS4","G",7,"CRD")
6,28,N,7,2
^SCR("P1HZMS4","G",7,"HELP")

^SCR("P1HZMS4","G",7,"LMAX")
7
^SCR("P1HZMS4","G",7,"MUMPS1")

^SCR("P1HZMS4","G",7,"MUMPS2")

^SCR("P1HZMS4","G",7,"OUTPUT")

^SCR("P1HZMS4","G",7,"SHEM")
  mekq 
^SCR("P1HZMS4","G",7,"TYP")
N
^SCR("P1HZMS4","G",8,"CRD")
6,20,H,18/36,0
^SCR("P1HZMS4","G",8,"HELP")

^SCR("P1HZMS4","G",8,"LMAX")
18
^SCR("P1HZMS4","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZMS4","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZMS4","G",8,"SHEM")
        dxrd      
^SCR("P1HZMS4","G",8,"TYP")
H
^SCR("P1HZMS4","G","DEL")
Y
^SCR("P1HZMS4","G","MAX")
9999
^SCR("P1HZMS4","G","NAME","HRP")
8
^SCR("P1HZMS4","G","NAME","KAM")
5
^SCR("P1HZMS4","G","NAME","MH")
4
^SCR("P1HZMS4","G","NAME","PAR")
1
^SCR("P1HZMS4","G","NAME","PAR1")
3
^SCR("P1HZMS4","G","NAME","SUG")
2
^SCR("P1HZMS4","G","NAME","SUM")
7
^SCR("P1HZMS4","G","NAME","TSF")
6
^SCR("P1HZMS4","G","NM",1)
PAR
^SCR("P1HZMS4","G","NM",2)
SUG
^SCR("P1HZMS4","G","NM",3)
PAR1
^SCR("P1HZMS4","G","NM",4)
MH
^SCR("P1HZMS4","G","NM",5)
KAM
^SCR("P1HZMS4","G","NM",6)
TSF
^SCR("P1HZMS4","G","NM",7)
SUM
^SCR("P1HZMS4","G","NM",8)
HRP
^SCR("P1HZMS4","G","RB")
5,2,17,79
^SCR("P1HZMS4","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZMS4","G","RZD")
\
^SCR("P1HZMS4","G","STEP")
1
^SCR("P1HZMS4","G","STG")
 :        dxrd      :  mekq :zetqez: zenk: xign :     hixt xe`z    : : cew :   
^SCR("P1HZMS4","G","VG")
7
^SCR("P1HZMS4","NAME")

^SCR("P1HZMS4","P",1,"CRD")
1,66,E,5.,0
^SCR("P1HZMS4","P",1,"HELP")
<F7> - mixvln zbvd 
^SCR("P1HZMS4","P",1,"LMAX")
6
^SCR("P1HZMS4","P",1,"MUMPS1")
D MLZR01^P1HZMS
^SCR("P1HZMS4","P",1,"MUMPS2")
D MLZR0^P1HZMS
^SCR("P1HZMS4","P",1,"MUST")

^SCR("P1HZMS4","P",1,"TYP")
E
^SCR("P1HZMS4","P",3,"CRD")
1,65,H,11
^SCR("P1HZMS4","P",3,"HELP")

^SCR("P1HZMS4","P",3,"LMAX")
11
^SCR("P1HZMS4","P",3,"MUMPS1")

^SCR("P1HZMS4","P",3,"MUMPS2")

^SCR("P1HZMS4","P",3,"OUTPUT")

^SCR("P1HZMS4","P",3,"TYP")
H
^SCR("P1HZMS4","P",5,"CRD")
2,68,E,3,0
^SCR("P1HZMS4","P",5,"HELP")
<F1> dxfr ,<F5>+ogley 'qn - dixehqid,<F9> dpnfd yetig,<F7> migezt zepgley
^SCR("P1HZMS4","P",5,"LMAX")
4
^SCR("P1HZMS4","P",5,"MUMPS1")
D NMB0^P1HZMS
^SCR("P1HZMS4","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1HZMS4","P",5,"MUST")

^SCR("P1HZMS4","P",5,"TYP")
E
^SCR("P1HZMS4","P",8,"CRD")
1,1,D,8,0
^SCR("P1HZMS4","P",8,"HELP")

^SCR("P1HZMS4","P",8,"LMAX")
8
^SCR("P1HZMS4","P",8,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZMS4","P",8,"MUMPS2")

^SCR("P1HZMS4","P",8,"OUTPUT")

^SCR("P1HZMS4","P",8,"TYP")
D
^SCR("P1HZMS4","P",12,"CRD")
2,49,H,7
^SCR("P1HZMS4","P",12,"HELP")

^SCR("P1HZMS4","P",12,"LMAX")
9
^SCR("P1HZMS4","P",12,"MUMPS1")

^SCR("P1HZMS4","P",12,"MUMPS2")

^SCR("P1HZMS4","P",12,"OUTPUT")

^SCR("P1HZMS4","P",12,"TYP")
H
^SCR("P1HZMS4","P",31,"CRD")
2,1,E,18,0
^SCR("P1HZMS4","P",31,"HELP")

^SCR("P1HZMS4","P",31,"LMAX")
18
^SCR("P1HZMS4","P",31,"MUMPS1")
D ZMANK0^P1HZMS
^SCR("P1HZMS4","P",31,"MUMPS2")

^SCR("P1HZMS4","P",31,"OUTPUT")

^SCR("P1HZMS4","P",31,"TYP")
E
^SCR("P1HZMS4","P",32,"CRD")
3,78,H,17
^SCR("P1HZMS4","P",32,"HELP")

^SCR("P1HZMS4","P",32,"LMAX")
17
^SCR("P1HZMS4","P",32,"MUMPS1")

^SCR("P1HZMS4","P",32,"MUMPS2")

^SCR("P1HZMS4","P",32,"OUTPUT")

^SCR("P1HZMS4","P",32,"TYP")
H
^SCR("P1HZMS4","P",33,"CRD")
1,36,E,10,0
^SCR("P1HZMS4","P",33,"FNC")

^SCR("P1HZMS4","P",33,"GLOB")
LKH
^SCR("P1HZMS4","P",33,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1HZMS4","P",33,"LMAX")
10
^SCR("P1HZMS4","P",33,"MUMPS1")
D LKHN0^P1HZMS
^SCR("P1HZMS4","P",33,"MUMPS2")
D LKHN^P1HZMS
^SCR("P1HZMS4","P",33,"NLN")
20
^SCR("P1HZMS4","P",33,"RZD")
\
^SCR("P1HZMS4","P",33,"TOPB")
8
^SCR("P1HZMS4","P",33,"TYP")
E
^SCR("P1HZMS4","P",33,"VRB")
LKHN1
^SCR("P1HZMS4","P",34,"CRD")
1,36,H,16
^SCR("P1HZMS4","P",34,"HELP")

^SCR("P1HZMS4","P",34,"LMAX")
16
^SCR("P1HZMS4","P",34,"MUMPS1")

^SCR("P1HZMS4","P",34,"MUMPS2")

^SCR("P1HZMS4","P",34,"OUTPUT")

^SCR("P1HZMS4","P",34,"TYP")
H
^SCR("P1HZMS4","P",35,"CRD")
3,43,E,3,0
^SCR("P1HZMS4","P",35,"HELP")

^SCR("P1HZMS4","P",35,"LMAX")
4
^SCR("P1HZMS4","P",35,"MUMPS1")
D SOAD0^P1HZMS
^SCR("P1HZMS4","P",35,"MUMPS2")
D SOAD^P1HZMS
^SCR("P1HZMS4","P",35,"MUST")

^SCR("P1HZMS4","P",35,"TYP")
E
^SCR("P1HZMS4","P",37,"CRD")
3,1,E,15,0
^SCR("P1HZMS4","P",37,"HELP")

^SCR("P1HZMS4","P",37,"LMAX")
18
^SCR("P1HZMS4","P",37,"MUMPS1")

^SCR("P1HZMS4","P",37,"MUMPS2")

^SCR("P1HZMS4","P",37,"OUTPUT")

^SCR("P1HZMS4","P",37,"TYP")
E
^SCR("P1HZMS4","P",40,"CRD")
17,66,E,6,0
^SCR("P1HZMS4","P",40,"HELP")

^SCR("P1HZMS4","P",40,"LMAX")
6
^SCR("P1HZMS4","P",40,"MUMPS1")
D HNH00^P1HZMS
^SCR("P1HZMS4","P",40,"MUMPS2")
D HNH0^P1HZMS
^SCR("P1HZMS4","P",40,"TYP")
E
^SCR("P1HZMS4","P",41,"CRD")
17,57,N,7,2
^SCR("P1HZMS4","P",41,"HELP")

^SCR("P1HZMS4","P",41,"LMAX")
7
^SCR("P1HZMS4","P",41,"MUMPS1")

^SCR("P1HZMS4","P",41,"MUMPS2")

^SCR("P1HZMS4","P",41,"OUTPUT")

^SCR("P1HZMS4","P",41,"TYP")
N
^SCR("P1HZMS4","P",45,"CRD")
17,30,E,5,0
^SCR("P1HZMS4","P",45,"HELP")

^SCR("P1HZMS4","P",45,"LMAX")
5
^SCR("P1HZMS4","P",45,"MUMPS1")

^SCR("P1HZMS4","P",45,"MUMPS2")
D DMSAH^P1HZMS
^SCR("P1HZMS4","P",45,"TYP")
E
^SCR("P1HZMS4","P",46,"CRD")
17,22,N,6,2
^SCR("P1HZMS4","P",46,"HELP")

^SCR("P1HZMS4","P",46,"LMAX")
6
^SCR("P1HZMS4","P",46,"MUMPS1")

^SCR("P1HZMS4","P",46,"MUMPS2")

^SCR("P1HZMS4","P",46,"OUTPUT")

^SCR("P1HZMS4","P",46,"TYP")
N
^SCR("P1HZMS4","P",48,"CRD")
17,5,E,14,0
^SCR("P1HZMS4","P",48,"HELP")

^SCR("P1HZMS4","P",48,"LMAX")
14
^SCR("P1HZMS4","P",48,"MUMPS1")

^SCR("P1HZMS4","P",48,"MUMPS2")

^SCR("P1HZMS4","P",48,"OUTPUT")

^SCR("P1HZMS4","P",48,"TYP")
E
^SCR("P1HZMS4","P",56,"CRD")
18,64,E,8,0
^SCR("P1HZMS4","P",56,"HELP")

^SCR("P1HZMS4","P",56,"LMAX")
8
^SCR("P1HZMS4","P",56,"MUMPS1")

^SCR("P1HZMS4","P",56,"MUMPS2")

^SCR("P1HZMS4","P",56,"OUTPUT")

^SCR("P1HZMS4","P",56,"TYP")
E
^SCR("P1HZMS4","P",57,"CRD")
18,49,N,8,2
^SCR("P1HZMS4","P",57,"HELP")

^SCR("P1HZMS4","P",57,"LMAX")
8
^SCR("P1HZMS4","P",57,"MUMPS1")

^SCR("P1HZMS4","P",57,"MUMPS2")

^SCR("P1HZMS4","P",57,"OUTPUT")

^SCR("P1HZMS4","P",57,"TYP")
N
^SCR("P1HZMS4","P",58,"CRD")
18,34,N,8,2
^SCR("P1HZMS4","P",58,"HELP")

^SCR("P1HZMS4","P",58,"LMAX")
8
^SCR("P1HZMS4","P",58,"MUMPS1")

^SCR("P1HZMS4","P",58,"MUMPS2")

^SCR("P1HZMS4","P",58,"OUTPUT")

^SCR("P1HZMS4","P",58,"TYP")
N
^SCR("P1HZMS4","P",59,"CRD")
18,19,N,8,2
^SCR("P1HZMS4","P",59,"HELP")

^SCR("P1HZMS4","P",59,"LMAX")
8
^SCR("P1HZMS4","P",59,"MUMPS1")

^SCR("P1HZMS4","P",59,"MUMPS2")

^SCR("P1HZMS4","P",59,"OUTPUT")

^SCR("P1HZMS4","P",59,"TYP")
N
^SCR("P1HZMS4","P",60,"CRD")
18,6,N,7,2
^SCR("P1HZMS4","P",60,"HELP")

^SCR("P1HZMS4","P",60,"LMAX")
7
^SCR("P1HZMS4","P",60,"MUMPS1")

^SCR("P1HZMS4","P",60,"MUMPS2")

^SCR("P1HZMS4","P",60,"OUTPUT")

^SCR("P1HZMS4","P",60,"TYP")
N
^SCR("P1HZMS4","P",61,"CRD")
18,6,H,4
^SCR("P1HZMS4","P",61,"HELP")

^SCR("P1HZMS4","P",61,"LMAX")
6
^SCR("P1HZMS4","P",61,"MUMPS1")

^SCR("P1HZMS4","P",61,"MUMPS2")

^SCR("P1HZMS4","P",61,"OUTPUT")

^SCR("P1HZMS4","P",61,"TYP")
H
^SCR("P1HZMS4","P",72,"CRD")
19,59,E,7,0
^SCR("P1HZMS4","P",72,"HELP")

^SCR("P1HZMS4","P",72,"LMAX")
7
^SCR("P1HZMS4","P",72,"MUMPS1")

^SCR("P1HZMS4","P",72,"MUMPS2")

^SCR("P1HZMS4","P",72,"OUTPUT")

^SCR("P1HZMS4","P",72,"TYP")
E
^SCR("P1HZMS4","P",73,"CRD")
19,44,E,7,0
^SCR("P1HZMS4","P",73,"HELP")

^SCR("P1HZMS4","P",73,"LMAX")
7
^SCR("P1HZMS4","P",73,"MUMPS1")

^SCR("P1HZMS4","P",73,"MUMPS2")

^SCR("P1HZMS4","P",73,"OUTPUT")

^SCR("P1HZMS4","P",73,"TYP")
E
^SCR("P1HZMS4","P",74,"CRD")
19,23,E,7,0
^SCR("P1HZMS4","P",74,"HELP")

^SCR("P1HZMS4","P",74,"LMAX")
7
^SCR("P1HZMS4","P",74,"MUMPS1")

^SCR("P1HZMS4","P",74,"MUMPS2")

^SCR("P1HZMS4","P",74,"OUTPUT")

^SCR("P1HZMS4","P",74,"TYP")
E
^SCR("P1HZMS4","P",76,"CRD")
19,4,N,7,2
^SCR("P1HZMS4","P",76,"HELP")

^SCR("P1HZMS4","P",76,"LMAX")
7
^SCR("P1HZMS4","P",76,"MUMPS1")

^SCR("P1HZMS4","P",76,"MUMPS2")

^SCR("P1HZMS4","P",76,"OUTPUT")

^SCR("P1HZMS4","P",76,"TYP")
N
^SCR("P1HZMS4","P",80,"CRD")
20,74,H,29
^SCR("P1HZMS4","P",80,"HELP")

^SCR("P1HZMS4","P",80,"LMAX")
29
^SCR("P1HZMS4","P",80,"MUMPS1")
D HRA20^P1HZMS
^SCR("P1HZMS4","P",80,"MUMPS2")

^SCR("P1HZMS4","P",80,"TYP")
H
^SCR("P1HZMS4","P",82,"CRD")
20,30,N,6,2
^SCR("P1HZMS4","P",82,"HELP")

^SCR("P1HZMS4","P",82,"LMAX")
6
^SCR("P1HZMS4","P",82,"MUMPS1")

^SCR("P1HZMS4","P",82,"MUMPS2")

^SCR("P1HZMS4","P",82,"OUTPUT")

^SCR("P1HZMS4","P",82,"TYP")
N
^SCR("P1HZMS4","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZMS4","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZMS4","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZMS4","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZMS4","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZMS4","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZMS4","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZMS4","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZMS4","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZMS4","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZMS4","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZMS4","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZMS4","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZMS4","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZMS4","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZMS4","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZMS4","P","NAME","DATK")
8
^SCR("P1HZMS4","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZMS4","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZMS4","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZMS4","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZMS4","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZMS4","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZMS4","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZMS4","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZMS4","P","NAME","DMSAH")
45
^SCR("P1HZMS4","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZMS4","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZMS4","P","NAME","DMSH")
46
^SCR("P1HZMS4","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZMS4","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZMS4","P","NAME","EMDA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",14)
^SCR("P1HZMS4","P","NAME","EMDA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",14)
^SCR("P1HZMS4","P","NAME","FIRE")
48
^SCR("P1HZMS4","P","NAME","FIRE","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",4)
^SCR("P1HZMS4","P","NAME","FIRE","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",4)
^SCR("P1HZMS4","P","NAME","HNH")
41
^SCR("P1HZMS4","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZMS4","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZMS4","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZMS4","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZMS4","P","NAME","HNHAH")
40
^SCR("P1HZMS4","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZMS4","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZMS4","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZMS4","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZMS4","P","NAME","HODAA")
32
^SCR("P1HZMS4","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZMS4","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZMS4","P","NAME","HRA2")
80
^SCR("P1HZMS4","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZMS4","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZMS4","P","NAME","HSB")
73
^SCR("P1HZMS4","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZMS4","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZMS4","P","NAME","HSB2")
74
^SCR("P1HZMS4","P","NAME","HZM")
12
^SCR("P1HZMS4","P","NAME","HZM","KEY")

^SCR("P1HZMS4","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK
^SCR("P1HZMS4","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZMS4","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL,EMDA
^SCR("P1HZMS4","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD,,FIRE
^SCR("P1HZMS4","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZMS4","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZMS4","P","NAME","ITRA")
59
^SCR("P1HZMS4","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZMS4","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZMS4","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZMS4","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZMS4","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZMS4","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZMS4","P","NAME","LKHN")
33
^SCR("P1HZMS4","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZMS4","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZMS4","P","NAME","LKHN1")
34
^SCR("P1HZMS4","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZMS4","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZMS4","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZMS4","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZMS4","P","NAME","MLZR0")
1
^SCR("P1HZMS4","P","NAME","MLZR1")
3
^SCR("P1HZMS4","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZMS4","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZMS4","P","NAME","MSOAD")
82
^SCR("P1HZMS4","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZMS4","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZMS4","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZMS4","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZMS4","P","NAME","NCAB")
72
^SCR("P1HZMS4","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZMS4","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZMS4","P","NAME","NMB")
5
^SCR("P1HZMS4","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZMS4","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZMS4","P","NAME","ODEF")
60
^SCR("P1HZMS4","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZMS4","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZMS4","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZMS4","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZMS4","P","NAME","OTL")
61
^SCR("P1HZMS4","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZMS4","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZMS4","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZMS4","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZMS4","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZMS4","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZMS4","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZMS4","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZMS4","P","NAME","SHUL1")
57
^SCR("P1HZMS4","P","NAME","SHULA")
58
^SCR("P1HZMS4","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZMS4","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZMS4","P","NAME","SOAD")
35
^SCR("P1HZMS4","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZMS4","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZMS4","P","NAME","TIP")
76
^SCR("P1HZMS4","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZMS4","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZMS4","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZMS4","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZMS4","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZMS4","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZMS4","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZMS4","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZMS4","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZMS4","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZMS4","P","NAME","TSHL")
56
^SCR("P1HZMS4","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZMS4","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZMS4","P","NAME","ZMANI")
37
^SCR("P1HZMS4","P","NAME","ZMANK")
31
^SCR("P1HZMS4","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZMS4","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZMS4","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZMS4","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZMS4","P","NM",1)
MLZR0
^SCR("P1HZMS4","P","NM",3)
MLZR1
^SCR("P1HZMS4","P","NM",5)
NMB
^SCR("P1HZMS4","P","NM",8)
DATK
^SCR("P1HZMS4","P","NM",12)
HZM
^SCR("P1HZMS4","P","NM",31)
ZMANK
^SCR("P1HZMS4","P","NM",32)
HODAA
^SCR("P1HZMS4","P","NM",33)
LKHN
^SCR("P1HZMS4","P","NM",34)
LKHN1
^SCR("P1HZMS4","P","NM",35)
SOAD
^SCR("P1HZMS4","P","NM",37)
ZMANI
^SCR("P1HZMS4","P","NM",40)
HNHAH
^SCR("P1HZMS4","P","NM",41)
HNH
^SCR("P1HZMS4","P","NM",45)
DMSAH
^SCR("P1HZMS4","P","NM",46)
DMSH
^SCR("P1HZMS4","P","NM",48)
FIRE
^SCR("P1HZMS4","P","NM",56)
TSHL
^SCR("P1HZMS4","P","NM",57)
SHUL1
^SCR("P1HZMS4","P","NM",58)
SHULA
^SCR("P1HZMS4","P","NM",59)
ITRA
^SCR("P1HZMS4","P","NM",60)
ODEF
^SCR("P1HZMS4","P","NM",61)
OTL
^SCR("P1HZMS4","P","NM",72)
NCAB
^SCR("P1HZMS4","P","NM",73)
HSB
^SCR("P1HZMS4","P","NM",74)
HSB2
^SCR("P1HZMS4","P","NM",76)
TIP
^SCR("P1HZMS4","P","NM",80)
HRA2
^SCR("P1HZMS4","P","NM",82)
MSOAD
^SCR("P1HZMS4","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZMS4","P","REF",1,"RZD")
\
^SCR("P1HZMS4","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK
^SCR("P1HZMS4","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZMS4","P","REF",2,"RZD")
\
^SCR("P1HZMS4","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZMS4","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZMS4","P","REF",3,"RZD")
\
^SCR("P1HZMS4","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL\EMDA
^SCR("P1HZMS4","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZMS4","P","REF",4,"RZD")
\\
^SCR("P1HZMS4","P","REF",4,"STR")
HRA2\\HODAA\\MSD\\FIRE
^SCR("P1HZMS40")
H
^SCR("P1HZMS40",1)
 {08     }:dtew 'z {             34}{33       } gewl {        03} {01   }: xvln
^SCR("P1HZMS40",2)
 {31               }: dpnfd  zlaw onf  {      12} dpnfd 'qn         {05 }:ogley
^SCR("P1HZMS40",3)
 {37               }: oexg` oekcr onf      {35 }:micreq 'qn {              32} 
^SCR("P1HZMS40",4)
                                                                             1$
^SCR("P1HZMS40",5)
 :        dxrd      :  mekq :zetqez: zenk: xign :     hixt xe`z    : : cew :   
^SCR("P1HZMS40",6)
                                                                               
^SCR("P1HZMS40",7)
                                                                               
^SCR("P1HZMS40",8)
                                                                               
^SCR("P1HZMS40",9)
                                                                               
^SCR("P1HZMS40",10)
                                                                               
^SCR("P1HZMS40",11)
                                                                               
^SCR("P1HZMS40",12)
                                                                               
^SCR("P1HZMS40",13)
                                                                               
^SCR("P1HZMS40",14)
                                                                               
^SCR("P1HZMS40",15)
                                                                               
^SCR("P1HZMS40",16)
 $1                                                                            
^SCR("P1HZMS40",17)
     {48           }  {46   }={45  }:(%)zexy inc     g"y {41    }={40   }dgpd %
^SCR("P1HZMS40",18)
   61}{60    }scer {59     }:dxzi {58     }:dtwd {57     }:mley {56     :melyzl
^SCR("P1HZMS40",19)
    {76    }  tih      {74    }:i`xy` oeayg {73    }:oeayg {72    }:zipeayg 'qn
^SCR("P1HZMS40",20)
  <CTRL>+C - micreq 'qn okcrl {82   }:creql {                          80}:dxrd
^SCR("P1HZMS40",21)
                                                                               
^SCR("P1HZMS40","A",1)
:„”…—'š‡…—Œ:˜–ŒŽ
^SCR("P1HZMS40","A",2)
:„�Ž†„šŒ�—�Ž†„�Ž†„'‘Ž:�‡Œ…™
^SCR("P1HZMS40","A",3)
:�…˜‡€�…‹ƒ’�Ž†:�‰ƒ’…‘'‘Ž
^SCR("P1HZMS40","A",4)

^SCR("P1HZMS40","A",5)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1HZMS40","A",6)
---------------------------------------------------------------------
^SCR("P1HZMS40","A",7)

^SCR("P1HZMS40","A",8)

^SCR("P1HZMS40","A",9)

^SCR("P1HZMS40","A",10)

^SCR("P1HZMS40","A",11)

^SCR("P1HZMS40","A",12)

^SCR("P1HZMS40","A",13)

^SCR("P1HZMS40","A",14)

^SCR("P1HZMS40","A",15)

^SCR("P1HZMS40","A",16)

^SCR("P1HZMS40","A",17)
=:(%)š…˜™‰Žƒ‡"™=„‡�„%
^SCR("P1HZMS40","A",18)
“ƒ…’:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZMS40","A",19)
”‰ˆ:‰€˜™€�…�™‡:�…�™‡:š‰�…�™‡'‘Ž
^SCR("P1HZMS40","A",20)
<CTRL>+C-�‰ƒ’…‘'‘Ž�‹ƒ’Œ:ƒ’…‘Œ:„˜’„
^SCR("P1HZMS40","A",21)

^SCR("P1HZMS40","AV",1)
:vpuew,juek:rmkn
^SCR("P1HZMS40","AV",2)
:vbnzv,kceinzvbnzvwxn:ijkua
^SCR("P1HZMS40","AV",3)
:iurjtiufsginz:ohsguxwxn
^SCR("P1HZMS40","AV",4)

^SCR("P1HZMS40","AV",5)
vrgvoufx,upxu,,unfrhjnyhrprut,sue
^SCR("P1HZMS40","AV",6)
---------------------------------------------------------------------
^SCR("P1HZMS40","AV",7)

^SCR("P1HZMS40","AV",8)

^SCR("P1HZMS40","AV",9)

^SCR("P1HZMS40","AV",10)

^SCR("P1HZMS40","AV",11)

^SCR("P1HZMS40","AV",12)

^SCR("P1HZMS40","AV",13)

^SCR("P1HZMS40","AV",14)

^SCR("P1HZMS40","AV",15)

^SCR("P1HZMS40","AV",16)

^SCR("P1HZMS40","AV",17)
=:(%),urahnsj"a=vjbv%
^SCR("P1HZMS40","AV",18)
;sug:vr,h:vpev:okua:ouka,k
^SCR("P1HZMS40","AV",19)
phy:htratiucaj:iucaj:,hbucajwxn
^SCR("P1HZMS40","AV",20)
<CTRL>+C-ohsguxwxnifsgk:sguxk:vrgv
^SCR("P1HZMS40","AV",21)

^SCR("P1HZMS40","G",1,"CRD")
6,75,E,5,0
^SCR("P1HZMS40","G",1,"FNC")
F9,F10,F8,PGRG,=,F2
^SCR("P1HZMS40","G",1,"GLOB")
PAR
^SCR("P1HZMS40","G",1,"HELP")
<F2>-dpnfd zbvd,<F10>-zetqez zbvd,<F9>-zetqez,<F8>-zeveaw,<F7>-dlah,<F6>-my
^SCR("P1HZMS40","G",1,"LMAX")
5
^SCR("P1HZMS40","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZMS40","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZMS40","G",1,"MUST")

^SCR("P1HZMS40","G",1,"NLN")
20
^SCR("P1HZMS40","G",1,"RZD")
**
^SCR("P1HZMS40","G",1,"SHEM")
 cew 
^SCR("P1HZMS40","G",1,"TOPB")
8
^SCR("P1HZMS40","G",1,"TYP")
E
^SCR("P1HZMS40","G",1,"VRB")
PAR1
^SCR("P1HZMS40","G",2,"CRD")
6,69,E,1,0
^SCR("P1HZMS40","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZMS40","G",2,"LMAX")
1
^SCR("P1HZMS40","G",2,"MUMPS1")

^SCR("P1HZMS40","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZMS40","G",2,"OUTPUT")

^SCR("P1HZMS40","G",2,"SHEM")
 
^SCR("P1HZMS40","G",2,"TYP")
E
^SCR("P1HZMS40","G",3,"CRD")
6,67,H,18,0
^SCR("P1HZMS40","G",3,"HELP")

^SCR("P1HZMS40","G",3,"LMAX")
18
^SCR("P1HZMS40","G",3,"MUMPS1")

^SCR("P1HZMS40","G",3,"MUMPS2")

^SCR("P1HZMS40","G",3,"OUTPUT")

^SCR("P1HZMS40","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZMS40","G",3,"TYP")
H
^SCR("P1HZMS40","G",4,"CRD")
6,48,N,6,2
^SCR("P1HZMS40","G",4,"HELP")

^SCR("P1HZMS40","G",4,"LMAX")
6
^SCR("P1HZMS40","G",4,"MUMPS1")

^SCR("P1HZMS40","G",4,"MUMPS2")
I MH<0 S %SC("ER")=1
^SCR("P1HZMS40","G",4,"OUTPUT")

^SCR("P1HZMS40","G",4,"SHEM")
 xign 
^SCR("P1HZMS40","G",4,"TYP")
N
^SCR("P1HZMS40","G",5,"CRD")
6,41,N,5,0
^SCR("P1HZMS40","G",5,"HELP")

^SCR("P1HZMS40","G",5,"LMAX")
5
^SCR("P1HZMS40","G",5,"MUMPS1")
D KAM0^P1HZMS
^SCR("P1HZMS40","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZMS40","G",5,"MUST")

^SCR("P1HZMS40","G",5,"SHEM")
 zenk
^SCR("P1HZMS40","G",5,"TYP")
N
^SCR("P1HZMS40","G",6,"CRD")
6,35,N,6,2
^SCR("P1HZMS40","G",6,"HELP")

^SCR("P1HZMS40","G",6,"LMAX")
6
^SCR("P1HZMS40","G",6,"MUMPS1")

^SCR("P1HZMS40","G",6,"MUMPS2")

^SCR("P1HZMS40","G",6,"OUTPUT")

^SCR("P1HZMS40","G",6,"SHEM")
zetqez
^SCR("P1HZMS40","G",6,"TYP")
N
^SCR("P1HZMS40","G",7,"CRD")
6,28,N,7,2
^SCR("P1HZMS40","G",7,"HELP")

^SCR("P1HZMS40","G",7,"LMAX")
7
^SCR("P1HZMS40","G",7,"MUMPS1")

^SCR("P1HZMS40","G",7,"MUMPS2")

^SCR("P1HZMS40","G",7,"OUTPUT")

^SCR("P1HZMS40","G",7,"SHEM")
  mekq 
^SCR("P1HZMS40","G",7,"TYP")
N
^SCR("P1HZMS40","G",8,"CRD")
6,20,H,18/36,0
^SCR("P1HZMS40","G",8,"HELP")

^SCR("P1HZMS40","G",8,"LMAX")
18
^SCR("P1HZMS40","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZMS40","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZMS40","G",8,"SHEM")
        dxrd      
^SCR("P1HZMS40","G",8,"TYP")
H
^SCR("P1HZMS40","G","DEL")
Y
^SCR("P1HZMS40","G","MAX")
9999
^SCR("P1HZMS40","G","NAME","HRP")
8
^SCR("P1HZMS40","G","NAME","KAM")
5
^SCR("P1HZMS40","G","NAME","MH")
4
^SCR("P1HZMS40","G","NAME","PAR")
1
^SCR("P1HZMS40","G","NAME","PAR1")
3
^SCR("P1HZMS40","G","NAME","SUG")
2
^SCR("P1HZMS40","G","NAME","SUM")
7
^SCR("P1HZMS40","G","NAME","TSF")
6
^SCR("P1HZMS40","G","NM",1)
PAR
^SCR("P1HZMS40","G","NM",2)
SUG
^SCR("P1HZMS40","G","NM",3)
PAR1
^SCR("P1HZMS40","G","NM",4)
MH
^SCR("P1HZMS40","G","NM",5)
KAM
^SCR("P1HZMS40","G","NM",6)
TSF
^SCR("P1HZMS40","G","NM",7)
SUM
^SCR("P1HZMS40","G","NM",8)
HRP
^SCR("P1HZMS40","G","RB")
5,2,17,79
^SCR("P1HZMS40","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZMS40","G","RZD")
\
^SCR("P1HZMS40","G","STEP")
1
^SCR("P1HZMS40","G","STG")
 :        dxrd      :  mekq :zetqez: zenk: xign :     hixt xe`z    : : cew :   
^SCR("P1HZMS40","G","VG")
7
^SCR("P1HZMS40","NAME")

^SCR("P1HZMS40","P",1,"CRD")
1,66,E,5.,0
^SCR("P1HZMS40","P",1,"HELP")
<F7> - mixvln zbvd 
^SCR("P1HZMS40","P",1,"LMAX")
6
^SCR("P1HZMS40","P",1,"MUMPS1")
D MLZR01^P1HZMS
^SCR("P1HZMS40","P",1,"MUMPS2")
D MLZR0^P1HZMS
^SCR("P1HZMS40","P",1,"MUST")

^SCR("P1HZMS40","P",1,"TYP")
E
^SCR("P1HZMS40","P",3,"CRD")
1,65,H,11
^SCR("P1HZMS40","P",3,"HELP")

^SCR("P1HZMS40","P",3,"LMAX")
11
^SCR("P1HZMS40","P",3,"MUMPS1")

^SCR("P1HZMS40","P",3,"MUMPS2")

^SCR("P1HZMS40","P",3,"OUTPUT")

^SCR("P1HZMS40","P",3,"TYP")
H
^SCR("P1HZMS40","P",5,"CRD")
2,68,E,3,0
^SCR("P1HZMS40","P",5,"HELP")
<F1> dxfr ,<F5>+ogley 'qn - dixehqid,<F9> dpnfd yetig,<F7> migezt zepgley
^SCR("P1HZMS40","P",5,"LMAX")
4
^SCR("P1HZMS40","P",5,"MUMPS1")
D NMB0^P1HZMS
^SCR("P1HZMS40","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1HZMS40","P",5,"MUST")

^SCR("P1HZMS40","P",5,"TYP")
E
^SCR("P1HZMS40","P",8,"CRD")
1,1,D,8,0
^SCR("P1HZMS40","P",8,"HELP")

^SCR("P1HZMS40","P",8,"LMAX")
8
^SCR("P1HZMS40","P",8,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZMS40","P",8,"MUMPS2")

^SCR("P1HZMS40","P",8,"OUTPUT")

^SCR("P1HZMS40","P",8,"TYP")
D
^SCR("P1HZMS40","P",12,"CRD")
2,49,H,7
^SCR("P1HZMS40","P",12,"HELP")

^SCR("P1HZMS40","P",12,"LMAX")
9
^SCR("P1HZMS40","P",12,"MUMPS1")

^SCR("P1HZMS40","P",12,"MUMPS2")

^SCR("P1HZMS40","P",12,"OUTPUT")

^SCR("P1HZMS40","P",12,"TYP")
H
^SCR("P1HZMS40","P",31,"CRD")
2,1,E,18,0
^SCR("P1HZMS40","P",31,"HELP")

^SCR("P1HZMS40","P",31,"LMAX")
18
^SCR("P1HZMS40","P",31,"MUMPS1")
D ZMANK0^P1HZMS
^SCR("P1HZMS40","P",31,"MUMPS2")

^SCR("P1HZMS40","P",31,"OUTPUT")

^SCR("P1HZMS40","P",31,"TYP")
E
^SCR("P1HZMS40","P",32,"CRD")
3,78,H,17
^SCR("P1HZMS40","P",32,"HELP")

^SCR("P1HZMS40","P",32,"LMAX")
17
^SCR("P1HZMS40","P",32,"MUMPS1")

^SCR("P1HZMS40","P",32,"MUMPS2")

^SCR("P1HZMS40","P",32,"OUTPUT")

^SCR("P1HZMS40","P",32,"TYP")
H
^SCR("P1HZMS40","P",33,"CRD")
1,36,E,10,0
^SCR("P1HZMS40","P",33,"FNC")

^SCR("P1HZMS40","P",33,"GLOB")
LKH
^SCR("P1HZMS40","P",33,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1HZMS40","P",33,"LMAX")
10
^SCR("P1HZMS40","P",33,"MUMPS1")
D LKHN0^P1HZMS
^SCR("P1HZMS40","P",33,"MUMPS2")
D LKHN^P1HZMS
^SCR("P1HZMS40","P",33,"NLN")
20
^SCR("P1HZMS40","P",33,"RZD")
\
^SCR("P1HZMS40","P",33,"TOPB")
8
^SCR("P1HZMS40","P",33,"TYP")
E
^SCR("P1HZMS40","P",33,"VRB")
LKHN1
^SCR("P1HZMS40","P",34,"CRD")
1,36,H,16
^SCR("P1HZMS40","P",34,"HELP")

^SCR("P1HZMS40","P",34,"LMAX")
16
^SCR("P1HZMS40","P",34,"MUMPS1")

^SCR("P1HZMS40","P",34,"MUMPS2")

^SCR("P1HZMS40","P",34,"OUTPUT")

^SCR("P1HZMS40","P",34,"TYP")
H
^SCR("P1HZMS40","P",35,"CRD")
3,43,E,3,0
^SCR("P1HZMS40","P",35,"HELP")

^SCR("P1HZMS40","P",35,"LMAX")
4
^SCR("P1HZMS40","P",35,"MUMPS1")
D SOAD0^P1HZMS
^SCR("P1HZMS40","P",35,"MUMPS2")
D SOAD^P1HZMS
^SCR("P1HZMS40","P",35,"MUST")

^SCR("P1HZMS40","P",35,"TYP")
E
^SCR("P1HZMS40","P",37,"CRD")
3,1,E,15,0
^SCR("P1HZMS40","P",37,"HELP")

^SCR("P1HZMS40","P",37,"LMAX")
18
^SCR("P1HZMS40","P",37,"MUMPS1")

^SCR("P1HZMS40","P",37,"MUMPS2")

^SCR("P1HZMS40","P",37,"OUTPUT")

^SCR("P1HZMS40","P",37,"TYP")
E
^SCR("P1HZMS40","P",40,"CRD")
17,66,E,6,0
^SCR("P1HZMS40","P",40,"HELP")

^SCR("P1HZMS40","P",40,"LMAX")
6
^SCR("P1HZMS40","P",40,"MUMPS1")
D HNH00^P1HZMS
^SCR("P1HZMS40","P",40,"MUMPS2")
D HNH0^P1HZMS
^SCR("P1HZMS40","P",40,"TYP")
E
^SCR("P1HZMS40","P",41,"CRD")
17,57,N,7,2
^SCR("P1HZMS40","P",41,"HELP")

^SCR("P1HZMS40","P",41,"LMAX")
7
^SCR("P1HZMS40","P",41,"MUMPS1")

^SCR("P1HZMS40","P",41,"MUMPS2")

^SCR("P1HZMS40","P",41,"OUTPUT")

^SCR("P1HZMS40","P",41,"TYP")
N
^SCR("P1HZMS40","P",45,"CRD")
17,30,E,5,0
^SCR("P1HZMS40","P",45,"HELP")

^SCR("P1HZMS40","P",45,"LMAX")
5
^SCR("P1HZMS40","P",45,"MUMPS1")

^SCR("P1HZMS40","P",45,"MUMPS2")
D DMSAH^P1HZMS
^SCR("P1HZMS40","P",45,"TYP")
E
^SCR("P1HZMS40","P",46,"CRD")
17,22,N,6,2
^SCR("P1HZMS40","P",46,"HELP")

^SCR("P1HZMS40","P",46,"LMAX")
6
^SCR("P1HZMS40","P",46,"MUMPS1")

^SCR("P1HZMS40","P",46,"MUMPS2")

^SCR("P1HZMS40","P",46,"OUTPUT")

^SCR("P1HZMS40","P",46,"TYP")
N
^SCR("P1HZMS40","P",48,"CRD")
17,5,E,14,0
^SCR("P1HZMS40","P",48,"HELP")

^SCR("P1HZMS40","P",48,"LMAX")
14
^SCR("P1HZMS40","P",48,"MUMPS1")

^SCR("P1HZMS40","P",48,"MUMPS2")

^SCR("P1HZMS40","P",48,"OUTPUT")

^SCR("P1HZMS40","P",48,"TYP")
E
^SCR("P1HZMS40","P",56,"CRD")
18,64,E,8,0
^SCR("P1HZMS40","P",56,"HELP")

^SCR("P1HZMS40","P",56,"LMAX")
8
^SCR("P1HZMS40","P",56,"MUMPS1")

^SCR("P1HZMS40","P",56,"MUMPS2")

^SCR("P1HZMS40","P",56,"OUTPUT")

^SCR("P1HZMS40","P",56,"TYP")
E
^SCR("P1HZMS40","P",57,"CRD")
18,49,N,8,2
^SCR("P1HZMS40","P",57,"HELP")

^SCR("P1HZMS40","P",57,"LMAX")
8
^SCR("P1HZMS40","P",57,"MUMPS1")

^SCR("P1HZMS40","P",57,"MUMPS2")

^SCR("P1HZMS40","P",57,"OUTPUT")

^SCR("P1HZMS40","P",57,"TYP")
N
^SCR("P1HZMS40","P",58,"CRD")
18,34,N,8,2
^SCR("P1HZMS40","P",58,"HELP")

^SCR("P1HZMS40","P",58,"LMAX")
8
^SCR("P1HZMS40","P",58,"MUMPS1")

^SCR("P1HZMS40","P",58,"MUMPS2")

^SCR("P1HZMS40","P",58,"OUTPUT")

^SCR("P1HZMS40","P",58,"TYP")
N
^SCR("P1HZMS40","P",59,"CRD")
18,19,N,8,2
^SCR("P1HZMS40","P",59,"HELP")

^SCR("P1HZMS40","P",59,"LMAX")
8
^SCR("P1HZMS40","P",59,"MUMPS1")

^SCR("P1HZMS40","P",59,"MUMPS2")

^SCR("P1HZMS40","P",59,"OUTPUT")

^SCR("P1HZMS40","P",59,"TYP")
N
^SCR("P1HZMS40","P",60,"CRD")
18,6,N,7,2
^SCR("P1HZMS40","P",60,"HELP")

^SCR("P1HZMS40","P",60,"LMAX")
7
^SCR("P1HZMS40","P",60,"MUMPS1")

^SCR("P1HZMS40","P",60,"MUMPS2")

^SCR("P1HZMS40","P",60,"OUTPUT")

^SCR("P1HZMS40","P",60,"TYP")
N
^SCR("P1HZMS40","P",61,"CRD")
18,6,H,4
^SCR("P1HZMS40","P",61,"HELP")

^SCR("P1HZMS40","P",61,"LMAX")
6
^SCR("P1HZMS40","P",61,"MUMPS1")

^SCR("P1HZMS40","P",61,"MUMPS2")

^SCR("P1HZMS40","P",61,"OUTPUT")

^SCR("P1HZMS40","P",61,"TYP")
H
^SCR("P1HZMS40","P",72,"CRD")
19,59,E,7,0
^SCR("P1HZMS40","P",72,"HELP")

^SCR("P1HZMS40","P",72,"LMAX")
7
^SCR("P1HZMS40","P",72,"MUMPS1")

^SCR("P1HZMS40","P",72,"MUMPS2")

^SCR("P1HZMS40","P",72,"OUTPUT")

^SCR("P1HZMS40","P",72,"TYP")
E
^SCR("P1HZMS40","P",73,"CRD")
19,44,E,7,0
^SCR("P1HZMS40","P",73,"HELP")

^SCR("P1HZMS40","P",73,"LMAX")
7
^SCR("P1HZMS40","P",73,"MUMPS1")

^SCR("P1HZMS40","P",73,"MUMPS2")

^SCR("P1HZMS40","P",73,"OUTPUT")

^SCR("P1HZMS40","P",73,"TYP")
E
^SCR("P1HZMS40","P",74,"CRD")
19,23,E,7,0
^SCR("P1HZMS40","P",74,"HELP")

^SCR("P1HZMS40","P",74,"LMAX")
7
^SCR("P1HZMS40","P",74,"MUMPS1")

^SCR("P1HZMS40","P",74,"MUMPS2")

^SCR("P1HZMS40","P",74,"OUTPUT")

^SCR("P1HZMS40","P",74,"TYP")
E
^SCR("P1HZMS40","P",76,"CRD")
19,4,N,7,2
^SCR("P1HZMS40","P",76,"HELP")

^SCR("P1HZMS40","P",76,"LMAX")
7
^SCR("P1HZMS40","P",76,"MUMPS1")

^SCR("P1HZMS40","P",76,"MUMPS2")

^SCR("P1HZMS40","P",76,"OUTPUT")

^SCR("P1HZMS40","P",76,"TYP")
N
^SCR("P1HZMS40","P",80,"CRD")
20,74,H,29
^SCR("P1HZMS40","P",80,"HELP")

^SCR("P1HZMS40","P",80,"LMAX")
29
^SCR("P1HZMS40","P",80,"MUMPS1")
D HRA20^P1HZMS
^SCR("P1HZMS40","P",80,"MUMPS2")

^SCR("P1HZMS40","P",80,"TYP")
H
^SCR("P1HZMS40","P",82,"CRD")
20,30,N,6,2
^SCR("P1HZMS40","P",82,"HELP")

^SCR("P1HZMS40","P",82,"LMAX")
6
^SCR("P1HZMS40","P",82,"MUMPS1")

^SCR("P1HZMS40","P",82,"MUMPS2")

^SCR("P1HZMS40","P",82,"OUTPUT")

^SCR("P1HZMS40","P",82,"TYP")
N
^SCR("P1HZMS40","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZMS40","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZMS40","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZMS40","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZMS40","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZMS40","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZMS40","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZMS40","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZMS40","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZMS40","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZMS40","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZMS40","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZMS40","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZMS40","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZMS40","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZMS40","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZMS40","P","NAME","DATK")
8
^SCR("P1HZMS40","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZMS40","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZMS40","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZMS40","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZMS40","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZMS40","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZMS40","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZMS40","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZMS40","P","NAME","DMSAH")
45
^SCR("P1HZMS40","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZMS40","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZMS40","P","NAME","DMSH")
46
^SCR("P1HZMS40","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZMS40","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZMS40","P","NAME","EMDA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",14)
^SCR("P1HZMS40","P","NAME","EMDA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",14)
^SCR("P1HZMS40","P","NAME","FIRE")
48
^SCR("P1HZMS40","P","NAME","FIRE","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",4)
^SCR("P1HZMS40","P","NAME","FIRE","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",4)
^SCR("P1HZMS40","P","NAME","HNH")
41
^SCR("P1HZMS40","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZMS40","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZMS40","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZMS40","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZMS40","P","NAME","HNHAH")
40
^SCR("P1HZMS40","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZMS40","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZMS40","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZMS40","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZMS40","P","NAME","HODAA")
32
^SCR("P1HZMS40","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZMS40","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZMS40","P","NAME","HRA2")
80
^SCR("P1HZMS40","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZMS40","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZMS40","P","NAME","HSB")
73
^SCR("P1HZMS40","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZMS40","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZMS40","P","NAME","HSB2")
74
^SCR("P1HZMS40","P","NAME","HZM")
12
^SCR("P1HZMS40","P","NAME","HZM","KEY")

^SCR("P1HZMS40","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK
^SCR("P1HZMS40","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZMS40","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL,EMDA
^SCR("P1HZMS40","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD,,FIRE
^SCR("P1HZMS40","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZMS40","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZMS40","P","NAME","ITRA")
59
^SCR("P1HZMS40","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZMS40","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZMS40","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZMS40","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZMS40","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZMS40","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZMS40","P","NAME","LKHN")
33
^SCR("P1HZMS40","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZMS40","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZMS40","P","NAME","LKHN1")
34
^SCR("P1HZMS40","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZMS40","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZMS40","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZMS40","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZMS40","P","NAME","MLZR0")
1
^SCR("P1HZMS40","P","NAME","MLZR1")
3
^SCR("P1HZMS40","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZMS40","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZMS40","P","NAME","MSOAD")
82
^SCR("P1HZMS40","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZMS40","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZMS40","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZMS40","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZMS40","P","NAME","NCAB")
72
^SCR("P1HZMS40","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZMS40","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZMS40","P","NAME","NMB")
5
^SCR("P1HZMS40","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZMS40","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZMS40","P","NAME","ODEF")
60
^SCR("P1HZMS40","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZMS40","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZMS40","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZMS40","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZMS40","P","NAME","OTL")
61
^SCR("P1HZMS40","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZMS40","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZMS40","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZMS40","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZMS40","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZMS40","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZMS40","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZMS40","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZMS40","P","NAME","SHUL1")
57
^SCR("P1HZMS40","P","NAME","SHULA")
58
^SCR("P1HZMS40","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZMS40","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZMS40","P","NAME","SOAD")
35
^SCR("P1HZMS40","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZMS40","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZMS40","P","NAME","TIP")
76
^SCR("P1HZMS40","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZMS40","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZMS40","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZMS40","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZMS40","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZMS40","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZMS40","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZMS40","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZMS40","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZMS40","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZMS40","P","NAME","TSHL")
56
^SCR("P1HZMS40","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZMS40","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZMS40","P","NAME","ZMANI")
37
^SCR("P1HZMS40","P","NAME","ZMANK")
31
^SCR("P1HZMS40","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZMS40","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZMS40","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZMS40","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZMS40","P","NM",1)
MLZR0
^SCR("P1HZMS40","P","NM",3)
MLZR1
^SCR("P1HZMS40","P","NM",5)
NMB
^SCR("P1HZMS40","P","NM",8)
DATK
^SCR("P1HZMS40","P","NM",12)
HZM
^SCR("P1HZMS40","P","NM",31)
ZMANK
^SCR("P1HZMS40","P","NM",32)
HODAA
^SCR("P1HZMS40","P","NM",33)
LKHN
^SCR("P1HZMS40","P","NM",34)
LKHN1
^SCR("P1HZMS40","P","NM",35)
SOAD
^SCR("P1HZMS40","P","NM",37)
ZMANI
^SCR("P1HZMS40","P","NM",40)
HNHAH
^SCR("P1HZMS40","P","NM",41)
HNH
^SCR("P1HZMS40","P","NM",45)
DMSAH
^SCR("P1HZMS40","P","NM",46)
DMSH
^SCR("P1HZMS40","P","NM",48)
FIRE
^SCR("P1HZMS40","P","NM",56)
TSHL
^SCR("P1HZMS40","P","NM",57)
SHUL1
^SCR("P1HZMS40","P","NM",58)
SHULA
^SCR("P1HZMS40","P","NM",59)
ITRA
^SCR("P1HZMS40","P","NM",60)
ODEF
^SCR("P1HZMS40","P","NM",61)
OTL
^SCR("P1HZMS40","P","NM",72)
NCAB
^SCR("P1HZMS40","P","NM",73)
HSB
^SCR("P1HZMS40","P","NM",74)
HSB2
^SCR("P1HZMS40","P","NM",76)
TIP
^SCR("P1HZMS40","P","NM",80)
HRA2
^SCR("P1HZMS40","P","NM",82)
MSOAD
^SCR("P1HZMS40","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZMS40","P","REF",1,"RZD")
\
^SCR("P1HZMS40","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK
^SCR("P1HZMS40","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZMS40","P","REF",2,"RZD")
\
^SCR("P1HZMS40","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZMS40","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZMS40","P","REF",3,"RZD")
\
^SCR("P1HZMS40","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL\EMDA
^SCR("P1HZMS40","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZMS40","P","REF",4,"RZD")
\\
^SCR("P1HZMS40","P","REF",4,"STR")
HRA2\\HODAA\\MSD\\FIRE
^SCR("P1HZMS43")
H
^SCR("P1HZMS43",1)
 {08     }:dtew 'z {             34}{33       } gewl {        03} {01   }: xvln
^SCR("P1HZMS43",2)
 {31               }: dpnfd  zlaw onf  {      12} dpnfd 'qn         {05 }:ogley
^SCR("P1HZMS43",3)
 {37               }: oexg` oekcr onf      {35 }:micreq 'qn {              32} 
^SCR("P1HZMS43",4)
                                                                             1$
^SCR("P1HZMS43",5)
 :      dxrd     :  mekq :zetqez: zenk : xign :     hixt xe`z    : :  cew   :  
^SCR("P1HZMS43",6)
                                                                               
^SCR("P1HZMS43",7)
                                                                               
^SCR("P1HZMS43",8)
                                                                               
^SCR("P1HZMS43",9)
                                                                               
^SCR("P1HZMS43",10)
                                                                               
^SCR("P1HZMS43",11)
                                                                               
^SCR("P1HZMS43",12)
                                                                               
^SCR("P1HZMS43",13)
                                                                               
^SCR("P1HZMS43",14)
                                                                               
^SCR("P1HZMS43",15)
                                                                               
^SCR("P1HZMS43",16)
 $1                                                                            
^SCR("P1HZMS43",17)
       {48           }  {46   }={45  }:(%)zexy inc   g"y {41    }={40   }dgpd %
^SCR("P1HZMS43",18)
   61}{60    }scer {59     }:dxzi {58     }:dtwd {57     }:mley {56     :melyzl
^SCR("P1HZMS43",19)
    {76    }  tih      {74    }:i`xy` oeayg {73    }:oeayg {72    }:zipeayg 'qn
^SCR("P1HZMS43",20)
  <CTRL>+C - micreq 'qn okcrl {82   }:creql {                          80}:dxrd
^SCR("P1HZMS43",21)
                                                                               
^SCR("P1HZMS43","A",1)
:„”…—'š‡…—Œ:˜–ŒŽ
^SCR("P1HZMS43","A",2)
:„�Ž†„šŒ�—�Ž†„�Ž†„'‘Ž:�‡Œ…™
^SCR("P1HZMS43","A",3)
:�…˜‡€�…‹ƒ’�Ž†:�‰ƒ’…‘'‘Ž
^SCR("P1HZMS43","A",4)

^SCR("P1HZMS43","A",5)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1HZMS43","A",6)
---------------------------------------------------------------------
^SCR("P1HZMS43","A",7)

^SCR("P1HZMS43","A",8)

^SCR("P1HZMS43","A",9)

^SCR("P1HZMS43","A",10)

^SCR("P1HZMS43","A",11)

^SCR("P1HZMS43","A",12)

^SCR("P1HZMS43","A",13)

^SCR("P1HZMS43","A",14)

^SCR("P1HZMS43","A",15)

^SCR("P1HZMS43","A",16)

^SCR("P1HZMS43","A",17)
=:(%)š…˜™‰Žƒ‡"™=„‡�„%
^SCR("P1HZMS43","A",18)
“ƒ…’:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZMS43","A",19)
”‰ˆ:‰€˜™€�…�™‡:�…�™‡:š‰�…�™‡'‘Ž
^SCR("P1HZMS43","A",20)
<CTRL>+C-�‰ƒ’…‘'‘Ž�‹ƒ’Œ:ƒ’…‘Œ:„˜’„
^SCR("P1HZMS43","A",21)

^SCR("P1HZMS43","AV",1)
:vpuew,juek:rmkn
^SCR("P1HZMS43","AV",2)
:vbnzv,kceinzvbnzvwxn:ijkua
^SCR("P1HZMS43","AV",3)
:iurjtiufsginz:ohsguxwxn
^SCR("P1HZMS43","AV",4)

^SCR("P1HZMS43","AV",5)
vrgvoufx,upxu,,unfrhjnyhrprut,sue
^SCR("P1HZMS43","AV",6)
---------------------------------------------------------------------
^SCR("P1HZMS43","AV",7)

^SCR("P1HZMS43","AV",8)

^SCR("P1HZMS43","AV",9)

^SCR("P1HZMS43","AV",10)

^SCR("P1HZMS43","AV",11)

^SCR("P1HZMS43","AV",12)

^SCR("P1HZMS43","AV",13)

^SCR("P1HZMS43","AV",14)

^SCR("P1HZMS43","AV",15)

^SCR("P1HZMS43","AV",16)

^SCR("P1HZMS43","AV",17)
=:(%),urahnsj"a=vjbv%
^SCR("P1HZMS43","AV",18)
;sug:vr,h:vpev:okua:ouka,k
^SCR("P1HZMS43","AV",19)
phy:htratiucaj:iucaj:,hbucajwxn
^SCR("P1HZMS43","AV",20)
<CTRL>+C-ohsguxwxnifsgk:sguxk:vrgv
^SCR("P1HZMS43","AV",21)

^SCR("P1HZMS43","G",1,"CRD")
6,76,E,8,0
^SCR("P1HZMS43","G",1,"FNC")
F9,F10,F8,PGRG,=,F2
^SCR("P1HZMS43","G",1,"GLOB")
PAR
^SCR("P1HZMS43","G",1,"HELP")
<F2>-dpnfd zbvd,<F10>-zetqez zbvd,<F9>-zetqez,<F8>-zeveaw,<F7>-dlah,<F6>-my
^SCR("P1HZMS43","G",1,"LMAX")
8
^SCR("P1HZMS43","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZMS43","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZMS43","G",1,"MUST")

^SCR("P1HZMS43","G",1,"NLN")
20
^SCR("P1HZMS43","G",1,"RZD")
**
^SCR("P1HZMS43","G",1,"SHEM")
  cew   
^SCR("P1HZMS43","G",1,"TOPB")
8
^SCR("P1HZMS43","G",1,"TYP")
E
^SCR("P1HZMS43","G",1,"VRB")
PAR1
^SCR("P1HZMS43","G",2,"CRD")
6,67,E,1,0
^SCR("P1HZMS43","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZMS43","G",2,"LMAX")
1
^SCR("P1HZMS43","G",2,"MUMPS1")

^SCR("P1HZMS43","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZMS43","G",2,"OUTPUT")

^SCR("P1HZMS43","G",2,"SHEM")
 
^SCR("P1HZMS43","G",2,"TYP")
E
^SCR("P1HZMS43","G",3,"CRD")
6,65,H,18,0
^SCR("P1HZMS43","G",3,"HELP")

^SCR("P1HZMS43","G",3,"LMAX")
18
^SCR("P1HZMS43","G",3,"MUMPS1")

^SCR("P1HZMS43","G",3,"MUMPS2")

^SCR("P1HZMS43","G",3,"OUTPUT")

^SCR("P1HZMS43","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZMS43","G",3,"TYP")
H
^SCR("P1HZMS43","G",4,"CRD")
6,46,N,6,2
^SCR("P1HZMS43","G",4,"HELP")

^SCR("P1HZMS43","G",4,"LMAX")
6
^SCR("P1HZMS43","G",4,"MUMPS1")

^SCR("P1HZMS43","G",4,"MUMPS2")
I MH<0 S %SC("ER")=1
^SCR("P1HZMS43","G",4,"OUTPUT")

^SCR("P1HZMS43","G",4,"SHEM")
 xign 
^SCR("P1HZMS43","G",4,"TYP")
N
^SCR("P1HZMS43","G",5,"CRD")
6,39,N,6,3
^SCR("P1HZMS43","G",5,"HELP")

^SCR("P1HZMS43","G",5,"LMAX")
6
^SCR("P1HZMS43","G",5,"MUMPS1")
D KAM0^P1HZMS
^SCR("P1HZMS43","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZMS43","G",5,"MUST")

^SCR("P1HZMS43","G",5,"SHEM")
 zenk 
^SCR("P1HZMS43","G",5,"TYP")
N
^SCR("P1HZMS43","G",6,"CRD")
6,32,N,6,2
^SCR("P1HZMS43","G",6,"HELP")

^SCR("P1HZMS43","G",6,"LMAX")
6
^SCR("P1HZMS43","G",6,"MUMPS1")

^SCR("P1HZMS43","G",6,"MUMPS2")

^SCR("P1HZMS43","G",6,"OUTPUT")

^SCR("P1HZMS43","G",6,"SHEM")
zetqez
^SCR("P1HZMS43","G",6,"TYP")
N
^SCR("P1HZMS43","G",7,"CRD")
6,25,N,7,2
^SCR("P1HZMS43","G",7,"HELP")

^SCR("P1HZMS43","G",7,"LMAX")
7
^SCR("P1HZMS43","G",7,"MUMPS1")

^SCR("P1HZMS43","G",7,"MUMPS2")

^SCR("P1HZMS43","G",7,"OUTPUT")

^SCR("P1HZMS43","G",7,"SHEM")
  mekq 
^SCR("P1HZMS43","G",7,"TYP")
N
^SCR("P1HZMS43","G",8,"CRD")
6,17,H,15/30,0
^SCR("P1HZMS43","G",8,"HELP")

^SCR("P1HZMS43","G",8,"LMAX")
15
^SCR("P1HZMS43","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZMS43","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZMS43","G",8,"SHEM")
      dxrd     
^SCR("P1HZMS43","G",8,"TYP")
H
^SCR("P1HZMS43","G","DEL")
Y
^SCR("P1HZMS43","G","MAX")
9999
^SCR("P1HZMS43","G","NAME","HRP")
8
^SCR("P1HZMS43","G","NAME","KAM")
5
^SCR("P1HZMS43","G","NAME","MH")
4
^SCR("P1HZMS43","G","NAME","PAR")
1
^SCR("P1HZMS43","G","NAME","PAR1")
3
^SCR("P1HZMS43","G","NAME","SUG")
2
^SCR("P1HZMS43","G","NAME","SUM")
7
^SCR("P1HZMS43","G","NAME","TSF")
6
^SCR("P1HZMS43","G","NM",1)
PAR
^SCR("P1HZMS43","G","NM",2)
SUG
^SCR("P1HZMS43","G","NM",3)
PAR1
^SCR("P1HZMS43","G","NM",4)
MH
^SCR("P1HZMS43","G","NM",5)
KAM
^SCR("P1HZMS43","G","NM",6)
TSF
^SCR("P1HZMS43","G","NM",7)
SUM
^SCR("P1HZMS43","G","NM",8)
HRP
^SCR("P1HZMS43","G","RB")
5,2,17,79
^SCR("P1HZMS43","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZMS43","G","RZD")
\
^SCR("P1HZMS43","G","STEP")
1
^SCR("P1HZMS43","G","STG")
 :      dxrd     :  mekq :zetqez: zenk : xign :     hixt xe`z    : :  cew   :  
^SCR("P1HZMS43","G","VG")
7
^SCR("P1HZMS43","NAME")

^SCR("P1HZMS43","P",1,"CRD")
1,66,E,5.,0
^SCR("P1HZMS43","P",1,"HELP")
<F7> - mixvln zbvd 
^SCR("P1HZMS43","P",1,"LMAX")
6
^SCR("P1HZMS43","P",1,"MUMPS1")
D MLZR01^P1HZMS
^SCR("P1HZMS43","P",1,"MUMPS2")
D MLZR0^P1HZMS
^SCR("P1HZMS43","P",1,"MUST")

^SCR("P1HZMS43","P",1,"TYP")
E
^SCR("P1HZMS43","P",3,"CRD")
1,65,H,11
^SCR("P1HZMS43","P",3,"HELP")

^SCR("P1HZMS43","P",3,"LMAX")
11
^SCR("P1HZMS43","P",3,"MUMPS1")

^SCR("P1HZMS43","P",3,"MUMPS2")

^SCR("P1HZMS43","P",3,"OUTPUT")

^SCR("P1HZMS43","P",3,"TYP")
H
^SCR("P1HZMS43","P",5,"CRD")
2,68,E,3,0
^SCR("P1HZMS43","P",5,"HELP")
<F1> dxfr ,<F5>+ogley 'qn - dixehqid,<F9> dpnfd yetig,<F7> migezt zepgley
^SCR("P1HZMS43","P",5,"LMAX")
4
^SCR("P1HZMS43","P",5,"MUMPS1")
D NMB0^P1HZMS
^SCR("P1HZMS43","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1HZMS43","P",5,"MUST")

^SCR("P1HZMS43","P",5,"TYP")
E
^SCR("P1HZMS43","P",8,"CRD")
1,1,D,8,0
^SCR("P1HZMS43","P",8,"HELP")

^SCR("P1HZMS43","P",8,"LMAX")
8
^SCR("P1HZMS43","P",8,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZMS43","P",8,"MUMPS2")

^SCR("P1HZMS43","P",8,"OUTPUT")

^SCR("P1HZMS43","P",8,"TYP")
D
^SCR("P1HZMS43","P",12,"CRD")
2,49,H,7
^SCR("P1HZMS43","P",12,"HELP")

^SCR("P1HZMS43","P",12,"LMAX")
9
^SCR("P1HZMS43","P",12,"MUMPS1")

^SCR("P1HZMS43","P",12,"MUMPS2")

^SCR("P1HZMS43","P",12,"OUTPUT")

^SCR("P1HZMS43","P",12,"TYP")
H
^SCR("P1HZMS43","P",31,"CRD")
2,1,E,18,0
^SCR("P1HZMS43","P",31,"HELP")

^SCR("P1HZMS43","P",31,"LMAX")
18
^SCR("P1HZMS43","P",31,"MUMPS1")
D ZMANK0^P1HZMS
^SCR("P1HZMS43","P",31,"MUMPS2")

^SCR("P1HZMS43","P",31,"OUTPUT")

^SCR("P1HZMS43","P",31,"TYP")
E
^SCR("P1HZMS43","P",32,"CRD")
3,78,H,17
^SCR("P1HZMS43","P",32,"HELP")

^SCR("P1HZMS43","P",32,"LMAX")
17
^SCR("P1HZMS43","P",32,"MUMPS1")

^SCR("P1HZMS43","P",32,"MUMPS2")

^SCR("P1HZMS43","P",32,"OUTPUT")

^SCR("P1HZMS43","P",32,"TYP")
H
^SCR("P1HZMS43","P",33,"CRD")
1,36,E,10,0
^SCR("P1HZMS43","P",33,"FNC")

^SCR("P1HZMS43","P",33,"GLOB")
LKH
^SCR("P1HZMS43","P",33,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1HZMS43","P",33,"LMAX")
10
^SCR("P1HZMS43","P",33,"MUMPS1")
D LKHN0^P1HZMS
^SCR("P1HZMS43","P",33,"MUMPS2")
D LKHN^P1HZMS
^SCR("P1HZMS43","P",33,"NLN")
20
^SCR("P1HZMS43","P",33,"RZD")
\
^SCR("P1HZMS43","P",33,"TOPB")
8
^SCR("P1HZMS43","P",33,"TYP")
E
^SCR("P1HZMS43","P",33,"VRB")
LKHN1
^SCR("P1HZMS43","P",34,"CRD")
1,36,H,16
^SCR("P1HZMS43","P",34,"HELP")

^SCR("P1HZMS43","P",34,"LMAX")
16
^SCR("P1HZMS43","P",34,"MUMPS1")

^SCR("P1HZMS43","P",34,"MUMPS2")

^SCR("P1HZMS43","P",34,"OUTPUT")

^SCR("P1HZMS43","P",34,"TYP")
H
^SCR("P1HZMS43","P",35,"CRD")
3,43,E,3,0
^SCR("P1HZMS43","P",35,"HELP")

^SCR("P1HZMS43","P",35,"LMAX")
4
^SCR("P1HZMS43","P",35,"MUMPS1")
D SOAD0^P1HZMS
^SCR("P1HZMS43","P",35,"MUMPS2")
D SOAD^P1HZMS
^SCR("P1HZMS43","P",35,"MUST")

^SCR("P1HZMS43","P",35,"TYP")
E
^SCR("P1HZMS43","P",37,"CRD")
3,1,E,15,0
^SCR("P1HZMS43","P",37,"HELP")

^SCR("P1HZMS43","P",37,"LMAX")
18
^SCR("P1HZMS43","P",37,"MUMPS1")

^SCR("P1HZMS43","P",37,"MUMPS2")

^SCR("P1HZMS43","P",37,"OUTPUT")

^SCR("P1HZMS43","P",37,"TYP")
E
^SCR("P1HZMS43","P",40,"CRD")
17,66,E,6,0
^SCR("P1HZMS43","P",40,"HELP")

^SCR("P1HZMS43","P",40,"LMAX")
6
^SCR("P1HZMS43","P",40,"MUMPS1")
D HNH00^P1HZMS
^SCR("P1HZMS43","P",40,"MUMPS2")
D HNH0^P1HZMS
^SCR("P1HZMS43","P",40,"TYP")
E
^SCR("P1HZMS43","P",41,"CRD")
17,57,N,7,2
^SCR("P1HZMS43","P",41,"HELP")

^SCR("P1HZMS43","P",41,"LMAX")
7
^SCR("P1HZMS43","P",41,"MUMPS1")

^SCR("P1HZMS43","P",41,"MUMPS2")

^SCR("P1HZMS43","P",41,"OUTPUT")

^SCR("P1HZMS43","P",41,"TYP")
N
^SCR("P1HZMS43","P",45,"CRD")
17,32,E,5,0
^SCR("P1HZMS43","P",45,"HELP")

^SCR("P1HZMS43","P",45,"LMAX")
5
^SCR("P1HZMS43","P",45,"MUMPS1")

^SCR("P1HZMS43","P",45,"MUMPS2")
D DMSAH^P1HZMS
^SCR("P1HZMS43","P",45,"TYP")
E
^SCR("P1HZMS43","P",46,"CRD")
17,24,N,6,2
^SCR("P1HZMS43","P",46,"HELP")

^SCR("P1HZMS43","P",46,"LMAX")
6
^SCR("P1HZMS43","P",46,"MUMPS1")

^SCR("P1HZMS43","P",46,"MUMPS2")

^SCR("P1HZMS43","P",46,"OUTPUT")

^SCR("P1HZMS43","P",46,"TYP")
N
^SCR("P1HZMS43","P",48,"CRD")
17,7,E,14,0
^SCR("P1HZMS43","P",48,"HELP")

^SCR("P1HZMS43","P",48,"LMAX")
14
^SCR("P1HZMS43","P",48,"MUMPS1")

^SCR("P1HZMS43","P",48,"MUMPS2")

^SCR("P1HZMS43","P",48,"OUTPUT")

^SCR("P1HZMS43","P",48,"TYP")
E
^SCR("P1HZMS43","P",56,"CRD")
18,64,E,8,0
^SCR("P1HZMS43","P",56,"HELP")

^SCR("P1HZMS43","P",56,"LMAX")
8
^SCR("P1HZMS43","P",56,"MUMPS1")

^SCR("P1HZMS43","P",56,"MUMPS2")

^SCR("P1HZMS43","P",56,"OUTPUT")

^SCR("P1HZMS43","P",56,"TYP")
E
^SCR("P1HZMS43","P",57,"CRD")
18,49,N,8,2
^SCR("P1HZMS43","P",57,"HELP")

^SCR("P1HZMS43","P",57,"LMAX")
8
^SCR("P1HZMS43","P",57,"MUMPS1")

^SCR("P1HZMS43","P",57,"MUMPS2")

^SCR("P1HZMS43","P",57,"OUTPUT")

^SCR("P1HZMS43","P",57,"TYP")
N
^SCR("P1HZMS43","P",58,"CRD")
18,34,N,8,2
^SCR("P1HZMS43","P",58,"HELP")

^SCR("P1HZMS43","P",58,"LMAX")
8
^SCR("P1HZMS43","P",58,"MUMPS1")

^SCR("P1HZMS43","P",58,"MUMPS2")

^SCR("P1HZMS43","P",58,"OUTPUT")

^SCR("P1HZMS43","P",58,"TYP")
N
^SCR("P1HZMS43","P",59,"CRD")
18,19,N,8,2
^SCR("P1HZMS43","P",59,"HELP")

^SCR("P1HZMS43","P",59,"LMAX")
8
^SCR("P1HZMS43","P",59,"MUMPS1")

^SCR("P1HZMS43","P",59,"MUMPS2")

^SCR("P1HZMS43","P",59,"OUTPUT")

^SCR("P1HZMS43","P",59,"TYP")
N
^SCR("P1HZMS43","P",60,"CRD")
18,6,N,7,2
^SCR("P1HZMS43","P",60,"HELP")

^SCR("P1HZMS43","P",60,"LMAX")
7
^SCR("P1HZMS43","P",60,"MUMPS1")

^SCR("P1HZMS43","P",60,"MUMPS2")

^SCR("P1HZMS43","P",60,"OUTPUT")

^SCR("P1HZMS43","P",60,"TYP")
N
^SCR("P1HZMS43","P",61,"CRD")
18,6,H,4
^SCR("P1HZMS43","P",61,"HELP")

^SCR("P1HZMS43","P",61,"LMAX")
6
^SCR("P1HZMS43","P",61,"MUMPS1")

^SCR("P1HZMS43","P",61,"MUMPS2")

^SCR("P1HZMS43","P",61,"OUTPUT")

^SCR("P1HZMS43","P",61,"TYP")
H
^SCR("P1HZMS43","P",72,"CRD")
19,59,E,7,0
^SCR("P1HZMS43","P",72,"HELP")

^SCR("P1HZMS43","P",72,"LMAX")
7
^SCR("P1HZMS43","P",72,"MUMPS1")

^SCR("P1HZMS43","P",72,"MUMPS2")

^SCR("P1HZMS43","P",72,"OUTPUT")

^SCR("P1HZMS43","P",72,"TYP")
E
^SCR("P1HZMS43","P",73,"CRD")
19,44,E,7,0
^SCR("P1HZMS43","P",73,"HELP")

^SCR("P1HZMS43","P",73,"LMAX")
7
^SCR("P1HZMS43","P",73,"MUMPS1")

^SCR("P1HZMS43","P",73,"MUMPS2")

^SCR("P1HZMS43","P",73,"OUTPUT")

^SCR("P1HZMS43","P",73,"TYP")
E
^SCR("P1HZMS43","P",74,"CRD")
19,23,E,7,0
^SCR("P1HZMS43","P",74,"HELP")

^SCR("P1HZMS43","P",74,"LMAX")
7
^SCR("P1HZMS43","P",74,"MUMPS1")

^SCR("P1HZMS43","P",74,"MUMPS2")

^SCR("P1HZMS43","P",74,"OUTPUT")

^SCR("P1HZMS43","P",74,"TYP")
E
^SCR("P1HZMS43","P",76,"CRD")
19,4,N,7,2
^SCR("P1HZMS43","P",76,"HELP")

^SCR("P1HZMS43","P",76,"LMAX")
7
^SCR("P1HZMS43","P",76,"MUMPS1")

^SCR("P1HZMS43","P",76,"MUMPS2")

^SCR("P1HZMS43","P",76,"OUTPUT")

^SCR("P1HZMS43","P",76,"TYP")
N
^SCR("P1HZMS43","P",80,"CRD")
20,74,H,29
^SCR("P1HZMS43","P",80,"HELP")

^SCR("P1HZMS43","P",80,"LMAX")
29
^SCR("P1HZMS43","P",80,"MUMPS1")
D HRA20^P1HZMS
^SCR("P1HZMS43","P",80,"MUMPS2")

^SCR("P1HZMS43","P",80,"TYP")
H
^SCR("P1HZMS43","P",82,"CRD")
20,30,N,6,2
^SCR("P1HZMS43","P",82,"HELP")

^SCR("P1HZMS43","P",82,"LMAX")
6
^SCR("P1HZMS43","P",82,"MUMPS1")

^SCR("P1HZMS43","P",82,"MUMPS2")

^SCR("P1HZMS43","P",82,"OUTPUT")

^SCR("P1HZMS43","P",82,"TYP")
N
^SCR("P1HZMS43","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZMS43","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZMS43","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZMS43","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZMS43","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZMS43","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZMS43","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZMS43","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZMS43","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZMS43","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZMS43","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZMS43","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZMS43","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZMS43","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZMS43","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZMS43","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZMS43","P","NAME","DATK")
8
^SCR("P1HZMS43","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZMS43","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZMS43","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZMS43","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZMS43","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZMS43","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZMS43","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZMS43","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZMS43","P","NAME","DMSAH")
45
^SCR("P1HZMS43","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZMS43","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZMS43","P","NAME","DMSH")
46
^SCR("P1HZMS43","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZMS43","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZMS43","P","NAME","EMDA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",14)
^SCR("P1HZMS43","P","NAME","EMDA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",14)
^SCR("P1HZMS43","P","NAME","FIRE")
48
^SCR("P1HZMS43","P","NAME","FIRE","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",4)
^SCR("P1HZMS43","P","NAME","FIRE","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",4)
^SCR("P1HZMS43","P","NAME","HNH")
41
^SCR("P1HZMS43","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZMS43","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZMS43","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZMS43","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZMS43","P","NAME","HNHAH")
40
^SCR("P1HZMS43","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZMS43","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZMS43","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZMS43","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZMS43","P","NAME","HODAA")
32
^SCR("P1HZMS43","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZMS43","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZMS43","P","NAME","HRA2")
80
^SCR("P1HZMS43","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZMS43","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZMS43","P","NAME","HSB")
73
^SCR("P1HZMS43","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZMS43","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZMS43","P","NAME","HSB2")
74
^SCR("P1HZMS43","P","NAME","HZM")
12
^SCR("P1HZMS43","P","NAME","HZM","KEY")

^SCR("P1HZMS43","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK
^SCR("P1HZMS43","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZMS43","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL,EMDA
^SCR("P1HZMS43","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD,,FIRE
^SCR("P1HZMS43","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZMS43","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZMS43","P","NAME","ITRA")
59
^SCR("P1HZMS43","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZMS43","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZMS43","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZMS43","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZMS43","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZMS43","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZMS43","P","NAME","LKHN")
33
^SCR("P1HZMS43","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZMS43","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZMS43","P","NAME","LKHN1")
34
^SCR("P1HZMS43","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZMS43","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZMS43","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZMS43","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZMS43","P","NAME","MLZR0")
1
^SCR("P1HZMS43","P","NAME","MLZR1")
3
^SCR("P1HZMS43","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZMS43","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZMS43","P","NAME","MSOAD")
82
^SCR("P1HZMS43","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZMS43","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZMS43","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZMS43","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZMS43","P","NAME","NCAB")
72
^SCR("P1HZMS43","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZMS43","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZMS43","P","NAME","NMB")
5
^SCR("P1HZMS43","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZMS43","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZMS43","P","NAME","ODEF")
60
^SCR("P1HZMS43","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZMS43","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZMS43","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZMS43","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZMS43","P","NAME","OTL")
61
^SCR("P1HZMS43","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZMS43","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZMS43","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZMS43","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZMS43","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZMS43","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZMS43","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZMS43","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZMS43","P","NAME","SHUL1")
57
^SCR("P1HZMS43","P","NAME","SHULA")
58
^SCR("P1HZMS43","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZMS43","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZMS43","P","NAME","SOAD")
35
^SCR("P1HZMS43","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZMS43","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZMS43","P","NAME","TIP")
76
^SCR("P1HZMS43","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZMS43","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZMS43","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZMS43","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZMS43","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZMS43","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZMS43","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZMS43","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZMS43","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZMS43","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZMS43","P","NAME","TSHL")
56
^SCR("P1HZMS43","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZMS43","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZMS43","P","NAME","ZMANI")
37
^SCR("P1HZMS43","P","NAME","ZMANK")
31
^SCR("P1HZMS43","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZMS43","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZMS43","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZMS43","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZMS43","P","NM",1)
MLZR0
^SCR("P1HZMS43","P","NM",3)
MLZR1
^SCR("P1HZMS43","P","NM",5)
NMB
^SCR("P1HZMS43","P","NM",8)
DATK
^SCR("P1HZMS43","P","NM",12)
HZM
^SCR("P1HZMS43","P","NM",31)
ZMANK
^SCR("P1HZMS43","P","NM",32)
HODAA
^SCR("P1HZMS43","P","NM",33)
LKHN
^SCR("P1HZMS43","P","NM",34)
LKHN1
^SCR("P1HZMS43","P","NM",35)
SOAD
^SCR("P1HZMS43","P","NM",37)
ZMANI
^SCR("P1HZMS43","P","NM",40)
HNHAH
^SCR("P1HZMS43","P","NM",41)
HNH
^SCR("P1HZMS43","P","NM",45)
DMSAH
^SCR("P1HZMS43","P","NM",46)
DMSH
^SCR("P1HZMS43","P","NM",48)
FIRE
^SCR("P1HZMS43","P","NM",56)
TSHL
^SCR("P1HZMS43","P","NM",57)
SHUL1
^SCR("P1HZMS43","P","NM",58)
SHULA
^SCR("P1HZMS43","P","NM",59)
ITRA
^SCR("P1HZMS43","P","NM",60)
ODEF
^SCR("P1HZMS43","P","NM",61)
OTL
^SCR("P1HZMS43","P","NM",72)
NCAB
^SCR("P1HZMS43","P","NM",73)
HSB
^SCR("P1HZMS43","P","NM",74)
HSB2
^SCR("P1HZMS43","P","NM",76)
TIP
^SCR("P1HZMS43","P","NM",80)
HRA2
^SCR("P1HZMS43","P","NM",82)
MSOAD
^SCR("P1HZMS43","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZMS43","P","REF",1,"RZD")
\
^SCR("P1HZMS43","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK
^SCR("P1HZMS43","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZMS43","P","REF",2,"RZD")
\
^SCR("P1HZMS43","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZMS43","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZMS43","P","REF",3,"RZD")
\
^SCR("P1HZMS43","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL\EMDA
^SCR("P1HZMS43","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZMS43","P","REF",4,"RZD")
\\
^SCR("P1HZMS43","P","REF",4,"STR")
HRA2\\HODAA\\MSD\\FIRE
^SCR("P1HZMS44")
H
^SCR("P1HZMS44",1)
 {08     }:dtew 'z {             34}{33       } gewl {        03} {01   }: xvln
^SCR("P1HZMS44",2)
 {31               }: dpnfd  zlaw onf  {      12} dpnfd 'qn         {05 }:ogley
^SCR("P1HZMS44",3)
               {37  }: oexg` oekcr onf     {35 }:micreq 'qn {              32} 
^SCR("P1HZMS44",4)
                                                                             1$
^SCR("P1HZMS44",5)
 :    dxrd    :  mekq :zetqez: zenk :  xign :     hixt xe`z    :  :   cew  :   
^SCR("P1HZMS44",6)
                                                                               
^SCR("P1HZMS44",7)
                                                                               
^SCR("P1HZMS44",8)
                                                                               
^SCR("P1HZMS44",9)
                                                                               
^SCR("P1HZMS44",10)
                                                                               
^SCR("P1HZMS44",11)
                                                                               
^SCR("P1HZMS44",12)
                                                                               
^SCR("P1HZMS44",13)
                                                                               
^SCR("P1HZMS44",14)
                                                                               
^SCR("P1HZMS44",15)
                                                                               
^SCR("P1HZMS44",16)
 $1                                                                            
^SCR("P1HZMS44",17)
     {48           }  {46   }={45  }:(%)zexy inc     g"y {41    }={40 }dgpd cew
^SCR("P1HZMS44",18)
   61}{60    }scer {59     }:dxzi {58     }:dtwd {57     }:mley {56     :melyzl
^SCR("P1HZMS44",19)
    {76    }  tih      {74    }:i`xy` oeayg {73    }:oeayg {72    }:zipeayg 'qn
^SCR("P1HZMS44",20)
 <CTRL>+C - micreq 'qn okcrl {82   } creql {                           80}:dxrd
^SCR("P1HZMS44",21)
                                                                               
^SCR("P1HZMS44","A",1)
:„”…—'š‡…—Œ:˜–ŒŽ
^SCR("P1HZMS44","A",2)
:„�Ž†„šŒ�—�Ž†„�Ž†„'‘Ž:�‡Œ…™
^SCR("P1HZMS44","A",3)
:�…˜‡€�…‹ƒ’�Ž†:�‰ƒ’…‘'‘Ž
^SCR("P1HZMS44","A",4)

^SCR("P1HZMS44","A",5)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1HZMS44","A",6)
---------------------------------------------------------------------
^SCR("P1HZMS44","A",7)

^SCR("P1HZMS44","A",8)

^SCR("P1HZMS44","A",9)

^SCR("P1HZMS44","A",10)

^SCR("P1HZMS44","A",11)

^SCR("P1HZMS44","A",12)

^SCR("P1HZMS44","A",13)

^SCR("P1HZMS44","A",14)

^SCR("P1HZMS44","A",15)

^SCR("P1HZMS44","A",16)

^SCR("P1HZMS44","A",17)
=:(%)š…˜™‰Žƒ‡"™=„‡�„ƒ…—
^SCR("P1HZMS44","A",18)
“ƒ…’:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZMS44","A",19)
”‰ˆ:‰€˜™€�…�™‡:�…�™‡:š‰�…�™‡'‘Ž
^SCR("P1HZMS44","A",20)
<CTRL>+C-�‰ƒ’…‘'‘Ž�‹ƒ’Œƒ’…‘Œ:„˜’„
^SCR("P1HZMS44","A",21)

^SCR("P1HZMS44","AV",1)
:vpuew,juek:rmkn
^SCR("P1HZMS44","AV",2)
:vbnzv,kceinzvbnzvwxn:ijkua
^SCR("P1HZMS44","AV",3)
:iurjtiufsginz:ohsguxwxn
^SCR("P1HZMS44","AV",4)

^SCR("P1HZMS44","AV",5)
vrgvoufx,upxu,,unfrhjnyhrprut,sue
^SCR("P1HZMS44","AV",6)
---------------------------------------------------------------------
^SCR("P1HZMS44","AV",7)

^SCR("P1HZMS44","AV",8)

^SCR("P1HZMS44","AV",9)

^SCR("P1HZMS44","AV",10)

^SCR("P1HZMS44","AV",11)

^SCR("P1HZMS44","AV",12)

^SCR("P1HZMS44","AV",13)

^SCR("P1HZMS44","AV",14)

^SCR("P1HZMS44","AV",15)

^SCR("P1HZMS44","AV",16)

^SCR("P1HZMS44","AV",17)
=:(%),urahnsj"a=vjbvsue
^SCR("P1HZMS44","AV",18)
;sug:vr,h:vpev:okua:ouka,k
^SCR("P1HZMS44","AV",19)
phy:htratiucaj:iucaj:,hbucajwxn
^SCR("P1HZMS44","AV",20)
<CTRL>+C-ohsguxwxnifsgksguxk:vrgv
^SCR("P1HZMS44","AV",21)

^SCR("P1HZMS44","G",1,"CRD")
6,75,E,8,0
^SCR("P1HZMS44","G",1,"FNC")
F9,F10,F8,PGRG,=,F2
^SCR("P1HZMS44","G",1,"GLOB")
PAR
^SCR("P1HZMS44","G",1,"HELP")
<F2>-dpnfd zbvd,<F10>-zetqez zbvd;<F9>-zetqez,<F8>-zeveaw,<F7>-dlah,<F6>-my
^SCR("P1HZMS44","G",1,"LMAX")
8
^SCR("P1HZMS44","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZMS44","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZMS44","G",1,"MUST")

^SCR("P1HZMS44","G",1,"NLN")
20
^SCR("P1HZMS44","G",1,"RZD")
**
^SCR("P1HZMS44","G",1,"SHEM")
   cew  
^SCR("P1HZMS44","G",1,"TOPB")
8
^SCR("P1HZMS44","G",1,"TYP")
E
^SCR("P1HZMS44","G",1,"VRB")
PAR1
^SCR("P1HZMS44","G",2,"CRD")
6,66,E,2,0
^SCR("P1HZMS44","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZMS44","G",2,"LMAX")
2
^SCR("P1HZMS44","G",2,"MUMPS1")

^SCR("P1HZMS44","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZMS44","G",2,"OUTPUT")

^SCR("P1HZMS44","G",2,"SHEM")
  
^SCR("P1HZMS44","G",2,"TYP")
E
^SCR("P1HZMS44","G",3,"CRD")
6,63,H,18,0
^SCR("P1HZMS44","G",3,"HELP")

^SCR("P1HZMS44","G",3,"LMAX")
18
^SCR("P1HZMS44","G",3,"MUMPS1")

^SCR("P1HZMS44","G",3,"MUMPS2")

^SCR("P1HZMS44","G",3,"OUTPUT")

^SCR("P1HZMS44","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZMS44","G",3,"TYP")
H
^SCR("P1HZMS44","G",4,"CRD")
6,44,N,7,2
^SCR("P1HZMS44","G",4,"HELP")

^SCR("P1HZMS44","G",4,"LMAX")
7
^SCR("P1HZMS44","G",4,"MUMPS1")

^SCR("P1HZMS44","G",4,"MUMPS2")
I MH<0 S %SC("ER")=1
^SCR("P1HZMS44","G",4,"OUTPUT")

^SCR("P1HZMS44","G",4,"SHEM")
  xign 
^SCR("P1HZMS44","G",4,"TYP")
N
^SCR("P1HZMS44","G",5,"CRD")
6,36,N,6,3
^SCR("P1HZMS44","G",5,"HELP")

^SCR("P1HZMS44","G",5,"LMAX")
6
^SCR("P1HZMS44","G",5,"MUMPS1")
D KAM0^P1HZMS
^SCR("P1HZMS44","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZMS44","G",5,"MUST")

^SCR("P1HZMS44","G",5,"SHEM")
 zenk 
^SCR("P1HZMS44","G",5,"TYP")
N
^SCR("P1HZMS44","G",6,"CRD")
6,29,N,6,2
^SCR("P1HZMS44","G",6,"HELP")

^SCR("P1HZMS44","G",6,"LMAX")
6
^SCR("P1HZMS44","G",6,"MUMPS1")

^SCR("P1HZMS44","G",6,"MUMPS2")

^SCR("P1HZMS44","G",6,"OUTPUT")

^SCR("P1HZMS44","G",6,"SHEM")
zetqez
^SCR("P1HZMS44","G",6,"TYP")
N
^SCR("P1HZMS44","G",7,"CRD")
6,22,N,7,2
^SCR("P1HZMS44","G",7,"HELP")

^SCR("P1HZMS44","G",7,"LMAX")
7
^SCR("P1HZMS44","G",7,"MUMPS1")

^SCR("P1HZMS44","G",7,"MUMPS2")

^SCR("P1HZMS44","G",7,"OUTPUT")

^SCR("P1HZMS44","G",7,"SHEM")
  mekq 
^SCR("P1HZMS44","G",7,"TYP")
N
^SCR("P1HZMS44","G",8,"CRD")
6,14,H,12,0
^SCR("P1HZMS44","G",8,"HELP")

^SCR("P1HZMS44","G",8,"LMAX")
12
^SCR("P1HZMS44","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZMS44","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZMS44","G",8,"SHEM")
    dxrd    
^SCR("P1HZMS44","G",8,"TYP")
H
^SCR("P1HZMS44","G","DEL")
Y
^SCR("P1HZMS44","G","MAX")
9999
^SCR("P1HZMS44","G","NAME","HRP")
8
^SCR("P1HZMS44","G","NAME","KAM")
5
^SCR("P1HZMS44","G","NAME","MH")
4
^SCR("P1HZMS44","G","NAME","PAR")
1
^SCR("P1HZMS44","G","NAME","PAR1")
3
^SCR("P1HZMS44","G","NAME","SUG")
2
^SCR("P1HZMS44","G","NAME","SUM")
7
^SCR("P1HZMS44","G","NAME","TSF")
6
^SCR("P1HZMS44","G","NM",1)
PAR
^SCR("P1HZMS44","G","NM",2)
SUG
^SCR("P1HZMS44","G","NM",3)
PAR1
^SCR("P1HZMS44","G","NM",4)
MH
^SCR("P1HZMS44","G","NM",5)
KAM
^SCR("P1HZMS44","G","NM",6)
TSF
^SCR("P1HZMS44","G","NM",7)
SUM
^SCR("P1HZMS44","G","NM",8)
HRP
^SCR("P1HZMS44","G","RB")
5,2,17,79
^SCR("P1HZMS44","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZMS44","G","RZD")
\
^SCR("P1HZMS44","G","STEP")
1
^SCR("P1HZMS44","G","STG")
 :    dxrd    :  mekq :zetqez: zenk :  xign :     hixt xe`z    :  :   cew  :   
^SCR("P1HZMS44","G","VG")
7
^SCR("P1HZMS44","NAME")

^SCR("P1HZMS44","P",1,"CRD")
1,66,E,5.,0
^SCR("P1HZMS44","P",1,"HELP")
<F7> - mixvln zbvd 
^SCR("P1HZMS44","P",1,"LMAX")
6
^SCR("P1HZMS44","P",1,"MUMPS1")
D MLZR01^P1HZMS
^SCR("P1HZMS44","P",1,"MUMPS2")
D MLZR0^P1HZMS
^SCR("P1HZMS44","P",1,"MUST")

^SCR("P1HZMS44","P",1,"TYP")
E
^SCR("P1HZMS44","P",3,"CRD")
1,65,H,11
^SCR("P1HZMS44","P",3,"HELP")

^SCR("P1HZMS44","P",3,"LMAX")
11
^SCR("P1HZMS44","P",3,"MUMPS1")

^SCR("P1HZMS44","P",3,"MUMPS2")

^SCR("P1HZMS44","P",3,"OUTPUT")

^SCR("P1HZMS44","P",3,"TYP")
H
^SCR("P1HZMS44","P",5,"CRD")
2,68,E,4,0
^SCR("P1HZMS44","P",5,"HELP")
<F5>+ogley 'qn - ogley ly dixehqid ,<F9>-dpnfd yetig ,<F7>- migezt zepgley
^SCR("P1HZMS44","P",5,"LMAX")
4
^SCR("P1HZMS44","P",5,"MUMPS1")

^SCR("P1HZMS44","P",5,"MUMPS2")
D NMB^P1HZNM I $G(HZM) S NMB=$$^P3NMB(HZM)
^SCR("P1HZMS44","P",5,"MUST")

^SCR("P1HZMS44","P",5,"TYP")
E
^SCR("P1HZMS44","P",8,"CRD")
1,1,D,8,0
^SCR("P1HZMS44","P",8,"HELP")

^SCR("P1HZMS44","P",8,"LMAX")
8
^SCR("P1HZMS44","P",8,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZMS44","P",8,"MUMPS2")

^SCR("P1HZMS44","P",8,"OUTPUT")

^SCR("P1HZMS44","P",8,"TYP")
D
^SCR("P1HZMS44","P",12,"CRD")
2,49,H,7
^SCR("P1HZMS44","P",12,"HELP")

^SCR("P1HZMS44","P",12,"LMAX")
9
^SCR("P1HZMS44","P",12,"MUMPS1")

^SCR("P1HZMS44","P",12,"MUMPS2")

^SCR("P1HZMS44","P",12,"OUTPUT")

^SCR("P1HZMS44","P",12,"TYP")
H
^SCR("P1HZMS44","P",31,"CRD")
2,1,E,18,0
^SCR("P1HZMS44","P",31,"HELP")

^SCR("P1HZMS44","P",31,"LMAX")
18
^SCR("P1HZMS44","P",31,"MUMPS1")
D ZMANK0^P1HZMS
^SCR("P1HZMS44","P",31,"MUMPS2")

^SCR("P1HZMS44","P",31,"OUTPUT")

^SCR("P1HZMS44","P",31,"TYP")
E
^SCR("P1HZMS44","P",32,"CRD")
3,78,H,17
^SCR("P1HZMS44","P",32,"HELP")

^SCR("P1HZMS44","P",32,"LMAX")
17
^SCR("P1HZMS44","P",32,"MUMPS1")

^SCR("P1HZMS44","P",32,"MUMPS2")

^SCR("P1HZMS44","P",32,"OUTPUT")

^SCR("P1HZMS44","P",32,"TYP")
H
^SCR("P1HZMS44","P",33,"CRD")
1,36,E,10,0
^SCR("P1HZMS44","P",33,"FNC")

^SCR("P1HZMS44","P",33,"GLOB")
LKH
^SCR("P1HZMS44","P",33,"HELP")

^SCR("P1HZMS44","P",33,"LMAX")
10
^SCR("P1HZMS44","P",33,"MUMPS1")
D LKHN0^P1HZMS
^SCR("P1HZMS44","P",33,"MUMPS2")
D LKHN^P1HZMS
^SCR("P1HZMS44","P",33,"NLN")
20
^SCR("P1HZMS44","P",33,"RZD")
\
^SCR("P1HZMS44","P",33,"TOPB")
8
^SCR("P1HZMS44","P",33,"TYP")
E
^SCR("P1HZMS44","P",33,"VRB")
LKHN1
^SCR("P1HZMS44","P",34,"CRD")
1,36,H,16
^SCR("P1HZMS44","P",34,"HELP")

^SCR("P1HZMS44","P",34,"LMAX")
16
^SCR("P1HZMS44","P",34,"MUMPS1")

^SCR("P1HZMS44","P",34,"MUMPS2")

^SCR("P1HZMS44","P",34,"OUTPUT")

^SCR("P1HZMS44","P",34,"TYP")
H
^SCR("P1HZMS44","P",35,"CRD")
3,43,E,3,0
^SCR("P1HZMS44","P",35,"HELP")

^SCR("P1HZMS44","P",35,"LMAX")
4
^SCR("P1HZMS44","P",35,"MUMPS1")
D SOAD0^P1HZMS
^SCR("P1HZMS44","P",35,"MUMPS2")
D SOAD^P1HZMS
^SCR("P1HZMS44","P",35,"MUST")

^SCR("P1HZMS44","P",35,"TYP")
E
^SCR("P1HZMS44","P",37,"CRD")
3,15,E,5,0
^SCR("P1HZMS44","P",37,"HELP")

^SCR("P1HZMS44","P",37,"LMAX")
5
^SCR("P1HZMS44","P",37,"MUMPS1")

^SCR("P1HZMS44","P",37,"MUMPS2")

^SCR("P1HZMS44","P",37,"OUTPUT")

^SCR("P1HZMS44","P",37,"TYP")
E
^SCR("P1HZMS44","P",40,"CRD")
17,66,E,4,0
^SCR("P1HZMS44","P",40,"HELP")

^SCR("P1HZMS44","P",40,"LMAX")
4
^SCR("P1HZMS44","P",40,"MUMPS1")
D HNH00^P1HZMS
^SCR("P1HZMS44","P",40,"MUMPS2")
D HNH0^P1HZMS
^SCR("P1HZMS44","P",40,"TYP")
E
^SCR("P1HZMS44","P",41,"CRD")
17,57,N,7,2
^SCR("P1HZMS44","P",41,"HELP")

^SCR("P1HZMS44","P",41,"LMAX")
7
^SCR("P1HZMS44","P",41,"MUMPS1")

^SCR("P1HZMS44","P",41,"MUMPS2")

^SCR("P1HZMS44","P",41,"OUTPUT")

^SCR("P1HZMS44","P",41,"TYP")
N
^SCR("P1HZMS44","P",45,"CRD")
17,30,E,5,0
^SCR("P1HZMS44","P",45,"HELP")

^SCR("P1HZMS44","P",45,"LMAX")
5
^SCR("P1HZMS44","P",45,"MUMPS1")

^SCR("P1HZMS44","P",45,"MUMPS2")
D DMSAH^P1HZMS
^SCR("P1HZMS44","P",45,"TYP")
E
^SCR("P1HZMS44","P",46,"CRD")
17,22,N,6,2
^SCR("P1HZMS44","P",46,"HELP")

^SCR("P1HZMS44","P",46,"LMAX")
6
^SCR("P1HZMS44","P",46,"MUMPS1")

^SCR("P1HZMS44","P",46,"MUMPS2")

^SCR("P1HZMS44","P",46,"OUTPUT")

^SCR("P1HZMS44","P",46,"TYP")
N
^SCR("P1HZMS44","P",48,"CRD")
17,5,E,14,0
^SCR("P1HZMS44","P",48,"HELP")

^SCR("P1HZMS44","P",48,"LMAX")
14
^SCR("P1HZMS44","P",48,"MUMPS1")

^SCR("P1HZMS44","P",48,"MUMPS2")

^SCR("P1HZMS44","P",48,"OUTPUT")

^SCR("P1HZMS44","P",48,"TYP")
E
^SCR("P1HZMS44","P",56,"CRD")
18,64,E,8,0
^SCR("P1HZMS44","P",56,"HELP")

^SCR("P1HZMS44","P",56,"LMAX")
8
^SCR("P1HZMS44","P",56,"MUMPS1")

^SCR("P1HZMS44","P",56,"MUMPS2")

^SCR("P1HZMS44","P",56,"OUTPUT")

^SCR("P1HZMS44","P",56,"TYP")
E
^SCR("P1HZMS44","P",57,"CRD")
18,49,N,8,2
^SCR("P1HZMS44","P",57,"HELP")

^SCR("P1HZMS44","P",57,"LMAX")
8
^SCR("P1HZMS44","P",57,"MUMPS1")

^SCR("P1HZMS44","P",57,"MUMPS2")

^SCR("P1HZMS44","P",57,"OUTPUT")

^SCR("P1HZMS44","P",57,"TYP")
N
^SCR("P1HZMS44","P",58,"CRD")
18,34,N,8,2
^SCR("P1HZMS44","P",58,"HELP")

^SCR("P1HZMS44","P",58,"LMAX")
8
^SCR("P1HZMS44","P",58,"MUMPS1")

^SCR("P1HZMS44","P",58,"MUMPS2")

^SCR("P1HZMS44","P",58,"OUTPUT")

^SCR("P1HZMS44","P",58,"TYP")
N
^SCR("P1HZMS44","P",59,"CRD")
18,19,N,8,2
^SCR("P1HZMS44","P",59,"HELP")

^SCR("P1HZMS44","P",59,"LMAX")
8
^SCR("P1HZMS44","P",59,"MUMPS1")

^SCR("P1HZMS44","P",59,"MUMPS2")

^SCR("P1HZMS44","P",59,"OUTPUT")

^SCR("P1HZMS44","P",59,"TYP")
N
^SCR("P1HZMS44","P",60,"CRD")
18,6,N,7,2
^SCR("P1HZMS44","P",60,"HELP")

^SCR("P1HZMS44","P",60,"LMAX")
7
^SCR("P1HZMS44","P",60,"MUMPS1")

^SCR("P1HZMS44","P",60,"MUMPS2")

^SCR("P1HZMS44","P",60,"OUTPUT")

^SCR("P1HZMS44","P",60,"TYP")
N
^SCR("P1HZMS44","P",61,"CRD")
18,6,H,4
^SCR("P1HZMS44","P",61,"HELP")

^SCR("P1HZMS44","P",61,"LMAX")
6
^SCR("P1HZMS44","P",61,"MUMPS1")

^SCR("P1HZMS44","P",61,"MUMPS2")

^SCR("P1HZMS44","P",61,"OUTPUT")

^SCR("P1HZMS44","P",61,"TYP")
H
^SCR("P1HZMS44","P",72,"CRD")
19,59,E,7,0
^SCR("P1HZMS44","P",72,"HELP")

^SCR("P1HZMS44","P",72,"LMAX")
7
^SCR("P1HZMS44","P",72,"MUMPS1")

^SCR("P1HZMS44","P",72,"MUMPS2")

^SCR("P1HZMS44","P",72,"OUTPUT")

^SCR("P1HZMS44","P",72,"TYP")
E
^SCR("P1HZMS44","P",73,"CRD")
19,44,E,7,0
^SCR("P1HZMS44","P",73,"HELP")

^SCR("P1HZMS44","P",73,"LMAX")
7
^SCR("P1HZMS44","P",73,"MUMPS1")

^SCR("P1HZMS44","P",73,"MUMPS2")

^SCR("P1HZMS44","P",73,"OUTPUT")

^SCR("P1HZMS44","P",73,"TYP")
E
^SCR("P1HZMS44","P",74,"CRD")
19,23,E,7,0
^SCR("P1HZMS44","P",74,"HELP")

^SCR("P1HZMS44","P",74,"LMAX")
7
^SCR("P1HZMS44","P",74,"MUMPS1")

^SCR("P1HZMS44","P",74,"MUMPS2")

^SCR("P1HZMS44","P",74,"OUTPUT")

^SCR("P1HZMS44","P",74,"TYP")
E
^SCR("P1HZMS44","P",76,"CRD")
19,4,N,7,2
^SCR("P1HZMS44","P",76,"HELP")

^SCR("P1HZMS44","P",76,"LMAX")
7
^SCR("P1HZMS44","P",76,"MUMPS1")

^SCR("P1HZMS44","P",76,"MUMPS2")

^SCR("P1HZMS44","P",76,"OUTPUT")

^SCR("P1HZMS44","P",76,"TYP")
N
^SCR("P1HZMS44","P",80,"CRD")
20,74,H,30
^SCR("P1HZMS44","P",80,"HELP")

^SCR("P1HZMS44","P",80,"LMAX")
30
^SCR("P1HZMS44","P",80,"MUMPS1")
D HRA20^P1HZMS
^SCR("P1HZMS44","P",80,"MUMPS2")

^SCR("P1HZMS44","P",80,"TYP")
H
^SCR("P1HZMS44","P",82,"CRD")
20,29,N,6,2
^SCR("P1HZMS44","P",82,"HELP")

^SCR("P1HZMS44","P",82,"LMAX")
6
^SCR("P1HZMS44","P",82,"MUMPS1")

^SCR("P1HZMS44","P",82,"MUMPS2")

^SCR("P1HZMS44","P",82,"OUTPUT")

^SCR("P1HZMS44","P",82,"TYP")
N
^SCR("P1HZMS44","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZMS44","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZMS44","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZMS44","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZMS44","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZMS44","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZMS44","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZMS44","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZMS44","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZMS44","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZMS44","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZMS44","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZMS44","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZMS44","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZMS44","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZMS44","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZMS44","P","NAME","DATK")
8
^SCR("P1HZMS44","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZMS44","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZMS44","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZMS44","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZMS44","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZMS44","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZMS44","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZMS44","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZMS44","P","NAME","DMSAH")
45
^SCR("P1HZMS44","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZMS44","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZMS44","P","NAME","DMSH")
46
^SCR("P1HZMS44","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZMS44","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZMS44","P","NAME","FIRE")
48
^SCR("P1HZMS44","P","NAME","FIRE","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",4)
^SCR("P1HZMS44","P","NAME","FIRE","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",4)
^SCR("P1HZMS44","P","NAME","HNH")
41
^SCR("P1HZMS44","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZMS44","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZMS44","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZMS44","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZMS44","P","NAME","HNHAH")
40
^SCR("P1HZMS44","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZMS44","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZMS44","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZMS44","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZMS44","P","NAME","HODAA")
32
^SCR("P1HZMS44","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZMS44","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZMS44","P","NAME","HRA2")
80
^SCR("P1HZMS44","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZMS44","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZMS44","P","NAME","HSB")
73
^SCR("P1HZMS44","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZMS44","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZMS44","P","NAME","HSB2")
74
^SCR("P1HZMS44","P","NAME","HZM")
12
^SCR("P1HZMS44","P","NAME","HZM","KEY")

^SCR("P1HZMS44","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK
^SCR("P1HZMS44","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZMS44","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL
^SCR("P1HZMS44","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD,,FIRE
^SCR("P1HZMS44","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZMS44","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZMS44","P","NAME","ITRA")
59
^SCR("P1HZMS44","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZMS44","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZMS44","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZMS44","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZMS44","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZMS44","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZMS44","P","NAME","LKHN")
33
^SCR("P1HZMS44","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZMS44","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZMS44","P","NAME","LKHN1")
34
^SCR("P1HZMS44","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZMS44","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZMS44","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZMS44","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZMS44","P","NAME","MLZR0")
1
^SCR("P1HZMS44","P","NAME","MLZR1")
3
^SCR("P1HZMS44","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZMS44","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZMS44","P","NAME","MSOAD")
82
^SCR("P1HZMS44","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZMS44","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZMS44","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZMS44","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZMS44","P","NAME","NCAB")
72
^SCR("P1HZMS44","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZMS44","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZMS44","P","NAME","NMB")
5
^SCR("P1HZMS44","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZMS44","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZMS44","P","NAME","ODEF")
60
^SCR("P1HZMS44","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZMS44","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZMS44","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZMS44","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZMS44","P","NAME","OTL")
61
^SCR("P1HZMS44","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZMS44","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZMS44","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZMS44","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZMS44","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZMS44","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZMS44","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZMS44","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZMS44","P","NAME","SHUL1")
57
^SCR("P1HZMS44","P","NAME","SHULA")
58
^SCR("P1HZMS44","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZMS44","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZMS44","P","NAME","SOAD")
35
^SCR("P1HZMS44","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZMS44","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZMS44","P","NAME","TIP")
76
^SCR("P1HZMS44","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZMS44","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZMS44","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZMS44","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZMS44","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZMS44","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZMS44","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZMS44","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZMS44","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZMS44","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZMS44","P","NAME","TSHL")
56
^SCR("P1HZMS44","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZMS44","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZMS44","P","NAME","ZMANI")
37
^SCR("P1HZMS44","P","NAME","ZMANK")
31
^SCR("P1HZMS44","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZMS44","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZMS44","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZMS44","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZMS44","P","NM",1)
MLZR0
^SCR("P1HZMS44","P","NM",3)
MLZR1
^SCR("P1HZMS44","P","NM",5)
NMB
^SCR("P1HZMS44","P","NM",8)
DATK
^SCR("P1HZMS44","P","NM",12)
HZM
^SCR("P1HZMS44","P","NM",31)
ZMANK
^SCR("P1HZMS44","P","NM",32)
HODAA
^SCR("P1HZMS44","P","NM",33)
LKHN
^SCR("P1HZMS44","P","NM",34)
LKHN1
^SCR("P1HZMS44","P","NM",35)
SOAD
^SCR("P1HZMS44","P","NM",37)
ZMANI
^SCR("P1HZMS44","P","NM",40)
HNHAH
^SCR("P1HZMS44","P","NM",41)
HNH
^SCR("P1HZMS44","P","NM",45)
DMSAH
^SCR("P1HZMS44","P","NM",46)
DMSH
^SCR("P1HZMS44","P","NM",48)
FIRE
^SCR("P1HZMS44","P","NM",56)
TSHL
^SCR("P1HZMS44","P","NM",57)
SHUL1
^SCR("P1HZMS44","P","NM",58)
SHULA
^SCR("P1HZMS44","P","NM",59)
ITRA
^SCR("P1HZMS44","P","NM",60)
ODEF
^SCR("P1HZMS44","P","NM",61)
OTL
^SCR("P1HZMS44","P","NM",72)
NCAB
^SCR("P1HZMS44","P","NM",73)
HSB
^SCR("P1HZMS44","P","NM",74)
HSB2
^SCR("P1HZMS44","P","NM",76)
TIP
^SCR("P1HZMS44","P","NM",80)
HRA2
^SCR("P1HZMS44","P","NM",82)
MSOAD
^SCR("P1HZMS44","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZMS44","P","REF",1,"RZD")
\
^SCR("P1HZMS44","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK
^SCR("P1HZMS44","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZMS44","P","REF",2,"RZD")
\
^SCR("P1HZMS44","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZMS44","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZMS44","P","REF",3,"RZD")
\
^SCR("P1HZMS44","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL
^SCR("P1HZMS44","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZMS44","P","REF",4,"RZD")
\\
^SCR("P1HZMS44","P","REF",4,"STR")
HRA2\\HODAA\\MSD\\FIRE
^SCR("P1HZT0")
H
^SCR("P1HZT0",1)
         {08       }: dtew jix`z    {                 03}:my  {01   }:(z)i`tew 
^SCR("P1HZT0",2)
 {31               }: dpnfd zlaw onf   {12    } dpnfd 'qn       {05 }:   ogley 
^SCR("P1HZT0",3)
        {                        36} {35        :gewl 'qn {                32} 
^SCR("P1HZT0",4)
                                                                             1$
^SCR("P1HZT0",5)
 :        dxrd      :  mekq :zetqez:zenk: xign:     hixt xe`z    :beq: cew :   
^SCR("P1HZT0",6)
                                                                               
^SCR("P1HZT0",7)
                                                                               
^SCR("P1HZT0",8)
                                                                               
^SCR("P1HZT0",9)
                                                                               
^SCR("P1HZT0",10)
                                                                               
^SCR("P1HZT0",11)
                                                                               
^SCR("P1HZT0",12)
                                                                               
^SCR("P1HZT0",13)
                                                                               
^SCR("P1HZT0",14)
                                                                               
^SCR("P1HZT0",15)
                                                                               
^SCR("P1HZT0",16)
                                                                               
^SCR("P1HZT0",17)
                                                                               
^SCR("P1HZT0",18)
 $1                                                                            
^SCR("P1HZT0",19)
                      {46   }={45  }:(%)zexy inc     g"y {41    }={40 }dgpd cew
^SCR("P1HZT0",20)
   {60    } scer {59     }:dxzi  {58     }:dtwd {57     }:mley {56     }:melyzl
^SCR("P1HZT0",21)
                       {74    }:i`xy` oeayg {73    }:oeayg {72    }:zipeayg 'qn
^SCR("P1HZT0",22)
                                      {                                80}:dxrd
^SCR("P1HZT0","A",1)
:„”…—Š‰˜€š:�™:(š)‰€”…—
^SCR("P1HZT0","A",2)
:„�Ž†„šŒ�—�Ž†„�Ž†„'‘Ž:�‡Œ…™
^SCR("P1HZT0","A",3)
:‡…—Œ'‘Ž
^SCR("P1HZT0","A",4)

^SCR("P1HZT0","A",5)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€š‚…‘ƒ…—
^SCR("P1HZT0","A",6)
---------------------------------------------------------------------
^SCR("P1HZT0","A",7)

^SCR("P1HZT0","A",8)

^SCR("P1HZT0","A",9)

^SCR("P1HZT0","A",10)

^SCR("P1HZT0","A",11)

^SCR("P1HZT0","A",12)

^SCR("P1HZT0","A",13)

^SCR("P1HZT0","A",14)

^SCR("P1HZT0","A",15)

^SCR("P1HZT0","A",16)

^SCR("P1HZT0","A",17)

^SCR("P1HZT0","A",18)

^SCR("P1HZT0","A",19)
=:(%)š…˜™‰Žƒ‡"™=„‡�„ƒ…—
^SCR("P1HZT0","A",20)
“ƒ…’:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZT0","A",21)
:‰€˜™€�…�™‡:�…�™‡:š‰�…�™‡'‘Ž
^SCR("P1HZT0","A",22)
:„˜’„
^SCR("P1HZT0","AV",1)
:vpuelhrt,:oa:(,)htpue
^SCR("P1HZT0","AV",2)
:vbnzv,kceinzvbnzvwxn:ijkua
^SCR("P1HZT0","AV",3)
:juekwxn
^SCR("P1HZT0","AV",4)

^SCR("P1HZT0","AV",5)
vrgvoufx,upxu,,unfrhjnyhrprut,duxsue
^SCR("P1HZT0","AV",6)
---------------------------------------------------------------------
^SCR("P1HZT0","AV",7)

^SCR("P1HZT0","AV",8)

^SCR("P1HZT0","AV",9)

^SCR("P1HZT0","AV",10)

^SCR("P1HZT0","AV",11)

^SCR("P1HZT0","AV",12)

^SCR("P1HZT0","AV",13)

^SCR("P1HZT0","AV",14)

^SCR("P1HZT0","AV",15)

^SCR("P1HZT0","AV",16)

^SCR("P1HZT0","AV",17)

^SCR("P1HZT0","AV",18)

^SCR("P1HZT0","AV",19)
=:(%),urahnsj"a=vjbvsue
^SCR("P1HZT0","AV",20)
;sug:vr,h:vpev:okua:ouka,k
^SCR("P1HZT0","AV",21)
:htratiucaj:iucaj:,hbucajwxn
^SCR("P1HZT0","AV",22)
:vrgv
^SCR("P1HZT0","G",1,"CHECK")
Y
^SCR("P1HZT0","G",1,"CRD")
6,75,E,5,0
^SCR("P1HZT0","G",1,"FNC")
F9,F10,F8,PGRG,F5,=
^SCR("P1HZT0","G",1,"GLOB")
PAR
^SCR("P1HZT0","G",1,"HELP")
<CTR+V>-dpnfd,<F10>-zetqez zbvd;<F9>-zetqez,<F8>-zeveaw,<F7>-dlah;<F6>-my
^SCR("P1HZT0","G",1,"LMAX")
5
^SCR("P1HZT0","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZT0","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZT0","G",1,"MUST")

^SCR("P1HZT0","G",1,"NLN")
20
^SCR("P1HZT0","G",1,"RZD")
**
^SCR("P1HZT0","G",1,"SHEM")
 cew 
^SCR("P1HZT0","G",1,"TOPB")
8
^SCR("P1HZT0","G",1,"TYP")
E
^SCR("P1HZT0","G",1,"VRB")
PAR1
^SCR("P1HZT0","G",2,"CRD")
6,69,E,3,0
^SCR("P1HZT0","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZT0","G",2,"LMAX")
3
^SCR("P1HZT0","G",2,"MUMPS1")

^SCR("P1HZT0","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZT0","G",2,"OUTPUT")

^SCR("P1HZT0","G",2,"SHEM")
beq
^SCR("P1HZT0","G",2,"TYP")
E
^SCR("P1HZT0","G",3,"CRD")
6,65,H,18,0
^SCR("P1HZT0","G",3,"HELP")

^SCR("P1HZT0","G",3,"LMAX")
18
^SCR("P1HZT0","G",3,"MUMPS1")

^SCR("P1HZT0","G",3,"MUMPS2")

^SCR("P1HZT0","G",3,"OUTPUT")

^SCR("P1HZT0","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZT0","G",3,"TYP")
H
^SCR("P1HZT0","G",4,"CRD")
6,46,N,5,2
^SCR("P1HZT0","G",4,"HELP")

^SCR("P1HZT0","G",4,"LMAX")
5
^SCR("P1HZT0","G",4,"MUMPS1")

^SCR("P1HZT0","G",4,"MUMPS2")
I MH<0 S %SC("ER")=1
^SCR("P1HZT0","G",4,"OUTPUT")

^SCR("P1HZT0","G",4,"SHEM")
 xign
^SCR("P1HZT0","G",4,"TYP")
N
^SCR("P1HZT0","G",5,"CRD")
6,40,N,4,0
^SCR("P1HZT0","G",5,"HELP")

^SCR("P1HZT0","G",5,"LMAX")
4
^SCR("P1HZT0","G",5,"MUMPS1")
S:'$G(KAM) KAM=1
^SCR("P1HZT0","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZT0","G",5,"MUST")

^SCR("P1HZT0","G",5,"SHEM")
zenk
^SCR("P1HZT0","G",5,"TYP")
N
^SCR("P1HZT0","G",6,"CRD")
6,35,N,6,2
^SCR("P1HZT0","G",6,"HELP")

^SCR("P1HZT0","G",6,"LMAX")
6
^SCR("P1HZT0","G",6,"MUMPS1")

^SCR("P1HZT0","G",6,"MUMPS2")

^SCR("P1HZT0","G",6,"OUTPUT")

^SCR("P1HZT0","G",6,"SHEM")
zetqez
^SCR("P1HZT0","G",6,"TYP")
N
^SCR("P1HZT0","G",7,"CRD")
6,28,N,7,2
^SCR("P1HZT0","G",7,"HELP")

^SCR("P1HZT0","G",7,"LMAX")
7
^SCR("P1HZT0","G",7,"MUMPS1")

^SCR("P1HZT0","G",7,"MUMPS2")

^SCR("P1HZT0","G",7,"OUTPUT")

^SCR("P1HZT0","G",7,"SHEM")
  mekq 
^SCR("P1HZT0","G",7,"TYP")
N
^SCR("P1HZT0","G",8,"CRD")
6,20,H,18,0
^SCR("P1HZT0","G",8,"HELP")
<F10> - zetqez zbvd ,<F9>- zetqez ztqed ,<F7>- zexrd zbvd ,<F6>- dxrd yetig
^SCR("P1HZT0","G",8,"LMAX")
18
^SCR("P1HZT0","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZT0","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZT0","G",8,"SHEM")
        dxrd      
^SCR("P1HZT0","G",8,"TYP")
H
^SCR("P1HZT0","G","DEL")
Y
^SCR("P1HZT0","G","MAX")
9999
^SCR("P1HZT0","G","NAME","HRP")
8
^SCR("P1HZT0","G","NAME","KAM")
5
^SCR("P1HZT0","G","NAME","MH")
4
^SCR("P1HZT0","G","NAME","PAR")
1
^SCR("P1HZT0","G","NAME","PAR1")
3
^SCR("P1HZT0","G","NAME","SUG")
2
^SCR("P1HZT0","G","NAME","SUM")
7
^SCR("P1HZT0","G","NAME","TSF")
6
^SCR("P1HZT0","G","NM",1)
PAR
^SCR("P1HZT0","G","NM",2)
SUG
^SCR("P1HZT0","G","NM",3)
PAR1
^SCR("P1HZT0","G","NM",4)
MH
^SCR("P1HZT0","G","NM",5)
KAM
^SCR("P1HZT0","G","NM",6)
TSF
^SCR("P1HZT0","G","NM",7)
SUM
^SCR("P1HZT0","G","NM",8)
HRP
^SCR("P1HZT0","G","RB")
5,2,19,79
^SCR("P1HZT0","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZT0","G","RZD")
\
^SCR("P1HZT0","G","STEP")
1
^SCR("P1HZT0","G","STG")
 :        dxrd      :  mekq :zetqez:zenk: xign:     hixt xe`z    :beq: cew :   
^SCR("P1HZT0","G","VG")
7
^SCR("P1HZT0","NAME")

^SCR("P1HZT0","P",1,"CRD")
1,62,E,5.,0
^SCR("P1HZT0","P",1,"HELP")
<F7> - mixvln zbvd 
^SCR("P1HZT0","P",1,"LMAX")
6
^SCR("P1HZT0","P",1,"MUMPS1")

^SCR("P1HZT0","P",1,"MUMPS2")
D MLZR0^P1HZMS
^SCR("P1HZT0","P",1,"MUST")

^SCR("P1HZT0","P",1,"TYP")
E
^SCR("P1HZT0","P",3,"CRD")
1,57,H,19
^SCR("P1HZT0","P",3,"HELP")

^SCR("P1HZT0","P",3,"LMAX")
20
^SCR("P1HZT0","P",3,"MUMPS1")

^SCR("P1HZT0","P",3,"MUMPS2")

^SCR("P1HZT0","P",3,"OUTPUT")

^SCR("P1HZT0","P",3,"TYP")
H
^SCR("P1HZT0","P",5,"CRD")
2,64,E,3,0
^SCR("P1HZT0","P",5,"HELP")
CT/V+'qn-ogly dixehqid ,<F9>-dpnfd 'qn itl yetig ,<F7>- migezt zepgley zniyx
^SCR("P1HZT0","P",5,"LMAX")
4
^SCR("P1HZT0","P",5,"MUMPS1")

^SCR("P1HZT0","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1HZT0","P",5,"MUST")

^SCR("P1HZT0","P",5,"TYP")
E
^SCR("P1HZT0","P",8,"CRD")
1,9,D,8,0
^SCR("P1HZT0","P",8,"HELP")

^SCR("P1HZT0","P",8,"LMAX")
10
^SCR("P1HZT0","P",8,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZT0","P",8,"MUMPS2")

^SCR("P1HZT0","P",8,"OUTPUT")

^SCR("P1HZT0","P",8,"TYP")
D
^SCR("P1HZT0","P",12,"CRD")
2,39,E,7,0
^SCR("P1HZT0","P",12,"HELP")

^SCR("P1HZT0","P",12,"LMAX")
7
^SCR("P1HZT0","P",12,"MUMPS1")

^SCR("P1HZT0","P",12,"MUMPS2")

^SCR("P1HZT0","P",12,"OUTPUT")

^SCR("P1HZT0","P",12,"TYP")
E
^SCR("P1HZT0","P",31,"CRD")
2,1,E,18,0
^SCR("P1HZT0","P",31,"HELP")

^SCR("P1HZT0","P",31,"LMAX")
18
^SCR("P1HZT0","P",31,"MUMPS1")
D ZMANK0^P1HZMS
^SCR("P1HZT0","P",31,"MUMPS2")

^SCR("P1HZT0","P",31,"OUTPUT")

^SCR("P1HZT0","P",31,"TYP")
E
^SCR("P1HZT0","P",32,"CRD")
3,78,H,19
^SCR("P1HZT0","P",32,"HELP")

^SCR("P1HZT0","P",32,"LMAX")
19
^SCR("P1HZT0","P",32,"MUMPS1")

^SCR("P1HZT0","P",32,"MUMPS2")

^SCR("P1HZT0","P",32,"OUTPUT")

^SCR("P1HZT0","P",32,"TYP")
H
^SCR("P1HZT0","P",35,"CRD")
3,37,E,10,0
^SCR("P1HZT0","P",35,"CREAT")

^SCR("P1HZT0","P",35,"FNC")

^SCR("P1HZT0","P",35,"GLOB")
LKH
^SCR("P1HZT0","P",35,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1HZT0","P",35,"LMAX")
11
^SCR("P1HZT0","P",35,"MUMPS1")
D LKHN0^P1HZMS
^SCR("P1HZT0","P",35,"MUMPS2")
D LKHN^P1HZMS
^SCR("P1HZT0","P",35,"NLN")
20
^SCR("P1HZT0","P",35,"NS")
l
^SCR("P1HZT0","P",35,"RZD")
\
^SCR("P1HZT0","P",35,"TOPB")
8
^SCR("P1HZT0","P",35,"TYP")
E
^SCR("P1HZT0","P",35,"VRB")
LKHN1
^SCR("P1HZT0","P",36,"CRD")
3,36,H,27
^SCR("P1HZT0","P",36,"HELP")

^SCR("P1HZT0","P",36,"LMAX")
27
^SCR("P1HZT0","P",36,"MUMPS1")

^SCR("P1HZT0","P",36,"MUMPS2")

^SCR("P1HZT0","P",36,"OUTPUT")

^SCR("P1HZT0","P",36,"TYP")
H
^SCR("P1HZT0","P",40,"CRD")
19,66,E,4,0
^SCR("P1HZT0","P",40,"HELP")
<F7> - zegpd zniyx 
^SCR("P1HZT0","P",40,"LMAX")
4
^SCR("P1HZT0","P",40,"MUMPS1")
D HNH00^P1HZMS
^SCR("P1HZT0","P",40,"MUMPS2")
D HNH0^P1HZMS
^SCR("P1HZT0","P",40,"TYP")
E
^SCR("P1HZT0","P",41,"CRD")
19,57,N,7,2
^SCR("P1HZT0","P",41,"HELP")

^SCR("P1HZT0","P",41,"LMAX")
7
^SCR("P1HZT0","P",41,"MUMPS1")

^SCR("P1HZT0","P",41,"MUMPS2")

^SCR("P1HZT0","P",41,"OUTPUT")

^SCR("P1HZT0","P",41,"TYP")
N
^SCR("P1HZT0","P",45,"CRD")
19,30,N,5,2
^SCR("P1HZT0","P",45,"HELP")

^SCR("P1HZT0","P",45,"LMAX")
5
^SCR("P1HZT0","P",45,"MUMPS1")

^SCR("P1HZT0","P",45,"MUMPS2")
D DMSAH^P1HZMS
^SCR("P1HZT0","P",45,"OUTPUT")

^SCR("P1HZT0","P",45,"TYP")
N
^SCR("P1HZT0","P",46,"CRD")
19,22,N,6,2
^SCR("P1HZT0","P",46,"HELP")

^SCR("P1HZT0","P",46,"LMAX")
6
^SCR("P1HZT0","P",46,"MUMPS1")

^SCR("P1HZT0","P",46,"MUMPS2")

^SCR("P1HZT0","P",46,"OUTPUT")

^SCR("P1HZT0","P",46,"TYP")
N
^SCR("P1HZT0","P",56,"CRD")
20,63,E,8,0
^SCR("P1HZT0","P",56,"HELP")

^SCR("P1HZT0","P",56,"LMAX")
8
^SCR("P1HZT0","P",56,"MUMPS1")

^SCR("P1HZT0","P",56,"MUMPS2")

^SCR("P1HZT0","P",56,"OUTPUT")

^SCR("P1HZT0","P",56,"TYP")
E
^SCR("P1HZT0","P",57,"CRD")
20,48,N,8,2
^SCR("P1HZT0","P",57,"HELP")

^SCR("P1HZT0","P",57,"LMAX")
8
^SCR("P1HZT0","P",57,"MUMPS1")

^SCR("P1HZT0","P",57,"MUMPS2")

^SCR("P1HZT0","P",57,"OUTPUT")

^SCR("P1HZT0","P",57,"TYP")
N
^SCR("P1HZT0","P",58,"CRD")
20,33,N,8,2
^SCR("P1HZT0","P",58,"HELP")

^SCR("P1HZT0","P",58,"LMAX")
8
^SCR("P1HZT0","P",58,"MUMPS1")

^SCR("P1HZT0","P",58,"MUMPS2")

^SCR("P1HZT0","P",58,"OUTPUT")

^SCR("P1HZT0","P",58,"TYP")
N
^SCR("P1HZT0","P",59,"CRD")
20,17,N,8,2
^SCR("P1HZT0","P",59,"HELP")

^SCR("P1HZT0","P",59,"LMAX")
8
^SCR("P1HZT0","P",59,"MUMPS1")

^SCR("P1HZT0","P",59,"MUMPS2")

^SCR("P1HZT0","P",59,"OUTPUT")

^SCR("P1HZT0","P",59,"TYP")
N
^SCR("P1HZT0","P",60,"CRD")
20,3,N,7,2
^SCR("P1HZT0","P",60,"HELP")

^SCR("P1HZT0","P",60,"LMAX")
7
^SCR("P1HZT0","P",60,"MUMPS1")

^SCR("P1HZT0","P",60,"MUMPS2")

^SCR("P1HZT0","P",60,"OUTPUT")

^SCR("P1HZT0","P",60,"TYP")
N
^SCR("P1HZT0","P",72,"CRD")
21,59,E,7,0
^SCR("P1HZT0","P",72,"HELP")

^SCR("P1HZT0","P",72,"LMAX")
7
^SCR("P1HZT0","P",72,"MUMPS1")

^SCR("P1HZT0","P",72,"MUMPS2")

^SCR("P1HZT0","P",72,"OUTPUT")

^SCR("P1HZT0","P",72,"TYP")
E
^SCR("P1HZT0","P",73,"CRD")
21,44,E,7,0
^SCR("P1HZT0","P",73,"HELP")

^SCR("P1HZT0","P",73,"LMAX")
7
^SCR("P1HZT0","P",73,"MUMPS1")

^SCR("P1HZT0","P",73,"MUMPS2")

^SCR("P1HZT0","P",73,"OUTPUT")

^SCR("P1HZT0","P",73,"TYP")
E
^SCR("P1HZT0","P",74,"CRD")
21,23,E,7,0
^SCR("P1HZT0","P",74,"HELP")

^SCR("P1HZT0","P",74,"LMAX")
7
^SCR("P1HZT0","P",74,"MUMPS1")

^SCR("P1HZT0","P",74,"MUMPS2")

^SCR("P1HZT0","P",74,"OUTPUT")

^SCR("P1HZT0","P",74,"TYP")
E
^SCR("P1HZT0","P",80,"CRD")
22,74,H,35,0
^SCR("P1HZT0","P",80,"HELP")

^SCR("P1HZT0","P",80,"LMAX")
35
^SCR("P1HZT0","P",80,"MUMPS1")
D HRA20^P1HZMS
^SCR("P1HZT0","P",80,"MUMPS2")

^SCR("P1HZT0","P",80,"TYP")
H
^SCR("P1HZT0","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZT0","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZT0","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZT0","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZT0","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZT0","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZT0","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZT0","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZT0","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZT0","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZT0","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZT0","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZT0","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZT0","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZT0","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZT0","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZT0","P","NAME","DATK")
8
^SCR("P1HZT0","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZT0","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZT0","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZT0","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZT0","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZT0","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZT0","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZT0","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZT0","P","NAME","DMSAH")
45
^SCR("P1HZT0","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZT0","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZT0","P","NAME","DMSH")
46
^SCR("P1HZT0","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZT0","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZT0","P","NAME","HNH")
41
^SCR("P1HZT0","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZT0","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZT0","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZT0","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZT0","P","NAME","HNHAH")
40
^SCR("P1HZT0","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZT0","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZT0","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZT0","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZT0","P","NAME","HODAA")
32
^SCR("P1HZT0","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZT0","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZT0","P","NAME","HRA2")
80
^SCR("P1HZT0","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZT0","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZT0","P","NAME","HSB")
73
^SCR("P1HZT0","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZT0","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZT0","P","NAME","HSB2")
74
^SCR("P1HZT0","P","NAME","HZM")
12
^SCR("P1HZT0","P","NAME","HZM","KEY")

^SCR("P1HZT0","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK
^SCR("P1HZT0","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZT0","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL
^SCR("P1HZT0","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD
^SCR("P1HZT0","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZT0","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZT0","P","NAME","ITRA")
59
^SCR("P1HZT0","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZT0","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZT0","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZT0","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZT0","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZT0","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZT0","P","NAME","LKHN")
35
^SCR("P1HZT0","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZT0","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZT0","P","NAME","LKHN1")
36
^SCR("P1HZT0","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZT0","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZT0","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZT0","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZT0","P","NAME","MLZR0")
1
^SCR("P1HZT0","P","NAME","MLZR1")
3
^SCR("P1HZT0","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZT0","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZT0","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZT0","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZT0","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZT0","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZT0","P","NAME","NCAB")
72
^SCR("P1HZT0","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZT0","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZT0","P","NAME","NMB")
5
^SCR("P1HZT0","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZT0","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZT0","P","NAME","ODEF")
60
^SCR("P1HZT0","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZT0","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZT0","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZT0","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZT0","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZT0","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZT0","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZT0","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZT0","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZT0","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZT0","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZT0","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZT0","P","NAME","SHUL1")
57
^SCR("P1HZT0","P","NAME","SHULA")
58
^SCR("P1HZT0","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZT0","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZT0","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZT0","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZT0","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZT0","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZT0","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZT0","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZT0","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZT0","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZT0","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZT0","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZT0","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZT0","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZT0","P","NAME","TSHL")
56
^SCR("P1HZT0","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZT0","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZT0","P","NAME","ZMANK")
31
^SCR("P1HZT0","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZT0","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZT0","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZT0","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZT0","P","NM",1)
MLZR0
^SCR("P1HZT0","P","NM",3)
MLZR1
^SCR("P1HZT0","P","NM",5)
NMB
^SCR("P1HZT0","P","NM",8)
DATK
^SCR("P1HZT0","P","NM",12)
HZM
^SCR("P1HZT0","P","NM",31)
ZMANK
^SCR("P1HZT0","P","NM",32)
HODAA
^SCR("P1HZT0","P","NM",35)
LKHN
^SCR("P1HZT0","P","NM",36)
LKHN1
^SCR("P1HZT0","P","NM",40)
HNHAH
^SCR("P1HZT0","P","NM",41)
HNH
^SCR("P1HZT0","P","NM",45)
DMSAH
^SCR("P1HZT0","P","NM",46)
DMSH
^SCR("P1HZT0","P","NM",56)
TSHL
^SCR("P1HZT0","P","NM",57)
SHUL1
^SCR("P1HZT0","P","NM",58)
SHULA
^SCR("P1HZT0","P","NM",59)
ITRA
^SCR("P1HZT0","P","NM",60)
ODEF
^SCR("P1HZT0","P","NM",72)
NCAB
^SCR("P1HZT0","P","NM",73)
HSB
^SCR("P1HZT0","P","NM",74)
HSB2
^SCR("P1HZT0","P","NM",80)
HRA2
^SCR("P1HZT0","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZT0","P","REF",1,"RZD")
\
^SCR("P1HZT0","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK
^SCR("P1HZT0","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZT0","P","REF",2,"RZD")
\
^SCR("P1HZT0","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZT0","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZT0","P","REF",3,"RZD")
\
^SCR("P1HZT0","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL
^SCR("P1HZT0","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZT0","P","REF",4,"RZD")
\\
^SCR("P1HZT0","P","REF",4,"STR")
HRA2\\HODAA\\MSD
^SCR("P1HZT1")
H
^SCR("P1HZT1",1)
         {08       }: dtew jix`z    {                 03}:my  {01   }:(z)i`tew 
^SCR("P1HZT1",2)
 {31               }: dpnfd zlaw onf   {12    } dpnfd 'qn       {05 }:   ogley 
^SCR("P1HZT1",3)
                             {                        36} {35        :gewl 'qn 
^SCR("P1HZT1",4)
                                                                             1$
^SCR("P1HZT1",5)
            :   mekq  :zetqez: zenk : xign :     hixt xe`z    :beq:   cew  :   
^SCR("P1HZT1",6)
    \       dxrd       \                                                       
^SCR("P1HZT1",7)
                                                                               
^SCR("P1HZT1",8)
                                                                               
^SCR("P1HZT1",9)
                                                                               
^SCR("P1HZT1",10)
                                                                               
^SCR("P1HZT1",11)
                                                                               
^SCR("P1HZT1",12)
                                                                               
^SCR("P1HZT1",13)
                                                                               
^SCR("P1HZT1",14)
                                                                               
^SCR("P1HZT1",15)
                                                                               
^SCR("P1HZT1",16)
                                                                               
^SCR("P1HZT1",17)
                                                                               
^SCR("P1HZT1",18)
 $1                                                                            
^SCR("P1HZT1",19)
                      {46   }={45  }:(%)zexy inc     g"y {41    }={40 }dgpd cew
^SCR("P1HZT1",20)
   {60    } scer {59     }:dxzi  {58     }:dtwd {57     }:mley {56     }:melyzl
^SCR("P1HZT1",21)
                       {74    }:i`xy` oeayg {73    }:oeayg {72    }:zipeayg 'qn
^SCR("P1HZT1",22)
                                      {                                80}:dxrd
^SCR("P1HZT1","A",1)
:„”…—Š‰˜€š:�™:(š)‰€”…—
^SCR("P1HZT1","A",2)
:„�Ž†„šŒ�—�Ž†„�Ž†„'‘Ž:�‡Œ…™
^SCR("P1HZT1","A",3)
:‡…—Œ'‘Ž
^SCR("P1HZT1","A",4)

^SCR("P1HZT1","A",5)
�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€š‚…‘ƒ…—
^SCR("P1HZT1","A",6)
„˜’„
^SCR("P1HZT1","A",7)
-----------------------------------------------------------
^SCR("P1HZT1","A",8)

^SCR("P1HZT1","A",9)

^SCR("P1HZT1","A",10)

^SCR("P1HZT1","A",11)

^SCR("P1HZT1","A",12)

^SCR("P1HZT1","A",13)

^SCR("P1HZT1","A",14)

^SCR("P1HZT1","A",15)

^SCR("P1HZT1","A",16)

^SCR("P1HZT1","A",17)

^SCR("P1HZT1","A",18)

^SCR("P1HZT1","A",19)
=:(%)š…˜™‰Žƒ‡"™=„‡�„ƒ…—
^SCR("P1HZT1","A",20)
“ƒ…’:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZT1","A",21)
:‰€˜™€�…�™‡:�…�™‡:š‰�…�™‡'‘Ž
^SCR("P1HZT1","A",22)
:„˜’„
^SCR("P1HZT1","AV",1)
:vpuelhrt,:oa:(,)htpue
^SCR("P1HZT1","AV",2)
:vbnzv,kceinzvbnzvwxn:ijkua
^SCR("P1HZT1","AV",3)
:juekwxn
^SCR("P1HZT1","AV",4)

^SCR("P1HZT1","AV",5)
oufx,upxu,,unfrhjnyhrprut,duxsue
^SCR("P1HZT1","AV",6)
vrgv
^SCR("P1HZT1","AV",7)
-----------------------------------------------------------
^SCR("P1HZT1","AV",8)

^SCR("P1HZT1","AV",9)

^SCR("P1HZT1","AV",10)

^SCR("P1HZT1","AV",11)

^SCR("P1HZT1","AV",12)

^SCR("P1HZT1","AV",13)

^SCR("P1HZT1","AV",14)

^SCR("P1HZT1","AV",15)

^SCR("P1HZT1","AV",16)

^SCR("P1HZT1","AV",17)

^SCR("P1HZT1","AV",18)

^SCR("P1HZT1","AV",19)
=:(%),urahnsj"a=vjbvsue
^SCR("P1HZT1","AV",20)
;sug:vr,h:vpev:okua:ouka,k
^SCR("P1HZT1","AV",21)
:htratiucaj:iucaj:,hbucajwxn
^SCR("P1HZT1","AV",22)
:vrgv
^SCR("P1HZT1","G",1,"CHECK")
Y
^SCR("P1HZT1","G",1,"CRD")
7,75,E,8,0
^SCR("P1HZT1","G",1,"FNC")
F9,F10,F8,PGRG,F5,=
^SCR("P1HZT1","G",1,"GLOB")
PAR
^SCR("P1HZT1","G",1,"HELP")
<CTR+V>-dpnfd,<F10>-zetqez zbvd;<F9>-zetqez,<F8>-zeveaw,<F7>-dlah;<F6>-my
^SCR("P1HZT1","G",1,"LMAX")
8
^SCR("P1HZT1","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZT1","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZT1","G",1,"MUST")

^SCR("P1HZT1","G",1,"NLN")
20
^SCR("P1HZT1","G",1,"RZD")
**
^SCR("P1HZT1","G",1,"SHEM")
   cew  
^SCR("P1HZT1","G",1,"TOPB")
8
^SCR("P1HZT1","G",1,"TYP")
E
^SCR("P1HZT1","G",1,"VRB")
PAR1
^SCR("P1HZT1","G",2,"CRD")
7,66,E,3,0
^SCR("P1HZT1","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZT1","G",2,"LMAX")
3
^SCR("P1HZT1","G",2,"MUMPS1")

^SCR("P1HZT1","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZT1","G",2,"OUTPUT")

^SCR("P1HZT1","G",2,"SHEM")
beq
^SCR("P1HZT1","G",2,"TYP")
E
^SCR("P1HZT1","G",3,"CRD")
7,62,H,18,0
^SCR("P1HZT1","G",3,"HELP")

^SCR("P1HZT1","G",3,"LMAX")
18
^SCR("P1HZT1","G",3,"MUMPS1")

^SCR("P1HZT1","G",3,"MUMPS2")

^SCR("P1HZT1","G",3,"OUTPUT")

^SCR("P1HZT1","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZT1","G",3,"TYP")
H
^SCR("P1HZT1","G",4,"CRD")
7,43,N,6,2
^SCR("P1HZT1","G",4,"HELP")

^SCR("P1HZT1","G",4,"LMAX")
6
^SCR("P1HZT1","G",4,"MUMPS1")

^SCR("P1HZT1","G",4,"MUMPS2")
I MH<0 S %SC("ER")=1
^SCR("P1HZT1","G",4,"OUTPUT")

^SCR("P1HZT1","G",4,"SHEM")
 xign 
^SCR("P1HZT1","G",4,"TYP")
N
^SCR("P1HZT1","G",5,"CRD")
7,36,N,6,3
^SCR("P1HZT1","G",5,"HELP")

^SCR("P1HZT1","G",5,"LMAX")
6
^SCR("P1HZT1","G",5,"MUMPS1")
D KAM0^P1HZMS
^SCR("P1HZT1","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZT1","G",5,"MUST")

^SCR("P1HZT1","G",5,"SHEM")
 zenk 
^SCR("P1HZT1","G",5,"TYP")
N
^SCR("P1HZT1","G",6,"CRD")
7,29,N,6,2
^SCR("P1HZT1","G",6,"HELP")

^SCR("P1HZT1","G",6,"LMAX")
6
^SCR("P1HZT1","G",6,"MUMPS1")

^SCR("P1HZT1","G",6,"MUMPS2")

^SCR("P1HZT1","G",6,"OUTPUT")

^SCR("P1HZT1","G",6,"SHEM")
zetqez
^SCR("P1HZT1","G",6,"TYP")
N
^SCR("P1HZT1","G",7,"CRD")
7,22,N,8,2
^SCR("P1HZT1","G",7,"HELP")

^SCR("P1HZT1","G",7,"LMAX")
9
^SCR("P1HZT1","G",7,"MUMPS1")

^SCR("P1HZT1","G",7,"MUMPS2")

^SCR("P1HZT1","G",7,"OUTPUT")

^SCR("P1HZT1","G",7,"SHEM")
   mekq  
^SCR("P1HZT1","G",7,"TYP")
N
^SCR("P1HZT1","G",8,"CRD")
7,+23,H,18,0
^SCR("P1HZT1","G",8,"HELP")
<F10> - zetqez zbvd ,<F9>- zetqez ztqed ,<F7>- zexrd zbvd ,<F6>- dxrd yetig
^SCR("P1HZT1","G",8,"LMAX")
18
^SCR("P1HZT1","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZT1","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZT1","G",8,"SHEM")
       dxrd       
^SCR("P1HZT1","G",8,"TYP")
H
^SCR("P1HZT1","G","DEL")
Y
^SCR("P1HZT1","G","MAX")
9999
^SCR("P1HZT1","G","NAME","HRP")
8
^SCR("P1HZT1","G","NAME","KAM")
5
^SCR("P1HZT1","G","NAME","MH")
4
^SCR("P1HZT1","G","NAME","PAR")
1
^SCR("P1HZT1","G","NAME","PAR1")
3
^SCR("P1HZT1","G","NAME","SUG")
2
^SCR("P1HZT1","G","NAME","SUM")
7
^SCR("P1HZT1","G","NAME","TSF")
6
^SCR("P1HZT1","G","NM",1)
PAR
^SCR("P1HZT1","G","NM",2)
SUG
^SCR("P1HZT1","G","NM",3)
PAR1
^SCR("P1HZT1","G","NM",4)
MH
^SCR("P1HZT1","G","NM",5)
KAM
^SCR("P1HZT1","G","NM",6)
TSF
^SCR("P1HZT1","G","NM",7)
SUM
^SCR("P1HZT1","G","NM",8)
HRP
^SCR("P1HZT1","G","RB")
5,2,19,79
^SCR("P1HZT1","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZT1","G","RZD")
\
^SCR("P1HZT1","G","STEP")
2
^SCR("P1HZT1","G","STG")
            :   mekq  :zetqez: zenk : xign :     hixt xe`z    :beq:   cew  :   
^SCR("P1HZT1","G","VG")
8
^SCR("P1HZT1","NAME")

^SCR("P1HZT1","P",1,"CRD")
1,62,E,5.,0
^SCR("P1HZT1","P",1,"HELP")
<F7> - mixvln zbvd 
^SCR("P1HZT1","P",1,"LMAX")
6
^SCR("P1HZT1","P",1,"MUMPS1")
D MLZR01^P1HZMS
^SCR("P1HZT1","P",1,"MUMPS2")
D MLZR0^P1HZMS
^SCR("P1HZT1","P",1,"MUST")

^SCR("P1HZT1","P",1,"TYP")
E
^SCR("P1HZT1","P",3,"CRD")
1,57,H,19
^SCR("P1HZT1","P",3,"HELP")

^SCR("P1HZT1","P",3,"LMAX")
20
^SCR("P1HZT1","P",3,"MUMPS1")

^SCR("P1HZT1","P",3,"MUMPS2")

^SCR("P1HZT1","P",3,"OUTPUT")

^SCR("P1HZT1","P",3,"TYP")
H
^SCR("P1HZT1","P",5,"CRD")
2,64,E,3,0
^SCR("P1HZT1","P",5,"HELP")
CT/V+'qn-ogly dixehqid ,<F9>-dpnfd 'qn itl yetig ,<F7>- migezt zepgley zniyx
^SCR("P1HZT1","P",5,"LMAX")
4
^SCR("P1HZT1","P",5,"MUMPS1")

^SCR("P1HZT1","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1HZT1","P",5,"MUST")

^SCR("P1HZT1","P",5,"TYP")
E
^SCR("P1HZT1","P",8,"CRD")
1,9,D,8,0
^SCR("P1HZT1","P",8,"HELP")

^SCR("P1HZT1","P",8,"LMAX")
10
^SCR("P1HZT1","P",8,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZT1","P",8,"MUMPS2")

^SCR("P1HZT1","P",8,"OUTPUT")

^SCR("P1HZT1","P",8,"TYP")
D
^SCR("P1HZT1","P",12,"CRD")
2,39,E,7,0
^SCR("P1HZT1","P",12,"HELP")

^SCR("P1HZT1","P",12,"LMAX")
7
^SCR("P1HZT1","P",12,"MUMPS1")

^SCR("P1HZT1","P",12,"MUMPS2")

^SCR("P1HZT1","P",12,"OUTPUT")

^SCR("P1HZT1","P",12,"TYP")
E
^SCR("P1HZT1","P",31,"CRD")
2,1,E,18,0
^SCR("P1HZT1","P",31,"HELP")

^SCR("P1HZT1","P",31,"LMAX")
18
^SCR("P1HZT1","P",31,"MUMPS1")
D ZMANK0^P1HZMS
^SCR("P1HZT1","P",31,"MUMPS2")

^SCR("P1HZT1","P",31,"OUTPUT")

^SCR("P1HZT1","P",31,"TYP")
E
^SCR("P1HZT1","P",35,"CHECK")
Y
^SCR("P1HZT1","P",35,"CRD")
3,58,E,10,0
^SCR("P1HZT1","P",35,"CREAT")

^SCR("P1HZT1","P",35,"FNC")

^SCR("P1HZT1","P",35,"GLOB")
LKH
^SCR("P1HZT1","P",35,"HELP")

^SCR("P1HZT1","P",35,"LMAX")
11
^SCR("P1HZT1","P",35,"MUMPS1")

^SCR("P1HZT1","P",35,"MUMPS2")
D LKHN^P1HZMS
^SCR("P1HZT1","P",35,"NLN")
20
^SCR("P1HZT1","P",35,"NS")
l
^SCR("P1HZT1","P",35,"RZD")
\
^SCR("P1HZT1","P",35,"TOPB")
8
^SCR("P1HZT1","P",35,"TYP")
E
^SCR("P1HZT1","P",35,"VRB")
LKHN1
^SCR("P1HZT1","P",36,"CRD")
3,57,H,27
^SCR("P1HZT1","P",36,"HELP")

^SCR("P1HZT1","P",36,"LMAX")
27
^SCR("P1HZT1","P",36,"MUMPS1")

^SCR("P1HZT1","P",36,"MUMPS2")

^SCR("P1HZT1","P",36,"OUTPUT")

^SCR("P1HZT1","P",36,"TYP")
H
^SCR("P1HZT1","P",40,"CRD")
19,66,E,4,0
^SCR("P1HZT1","P",40,"HELP")
<F7> - zegpd zniyx 
^SCR("P1HZT1","P",40,"LMAX")
4
^SCR("P1HZT1","P",40,"MUMPS1")
D HNH00^P1HZMS
^SCR("P1HZT1","P",40,"MUMPS2")
D HNH0^P1HZMS
^SCR("P1HZT1","P",40,"TYP")
E
^SCR("P1HZT1","P",41,"CRD")
19,57,N,7,2
^SCR("P1HZT1","P",41,"HELP")

^SCR("P1HZT1","P",41,"LMAX")
7
^SCR("P1HZT1","P",41,"MUMPS1")

^SCR("P1HZT1","P",41,"MUMPS2")

^SCR("P1HZT1","P",41,"OUTPUT")

^SCR("P1HZT1","P",41,"TYP")
N
^SCR("P1HZT1","P",45,"CRD")
19,30,N,5,2
^SCR("P1HZT1","P",45,"HELP")

^SCR("P1HZT1","P",45,"LMAX")
5
^SCR("P1HZT1","P",45,"MUMPS1")

^SCR("P1HZT1","P",45,"MUMPS2")
D DMSAH^P1HZMS
^SCR("P1HZT1","P",45,"OUTPUT")

^SCR("P1HZT1","P",45,"TYP")
N
^SCR("P1HZT1","P",46,"CRD")
19,22,N,6,2
^SCR("P1HZT1","P",46,"HELP")

^SCR("P1HZT1","P",46,"LMAX")
6
^SCR("P1HZT1","P",46,"MUMPS1")

^SCR("P1HZT1","P",46,"MUMPS2")

^SCR("P1HZT1","P",46,"OUTPUT")

^SCR("P1HZT1","P",46,"TYP")
N
^SCR("P1HZT1","P",56,"CRD")
20,63,E,8,0
^SCR("P1HZT1","P",56,"HELP")

^SCR("P1HZT1","P",56,"LMAX")
8
^SCR("P1HZT1","P",56,"MUMPS1")

^SCR("P1HZT1","P",56,"MUMPS2")

^SCR("P1HZT1","P",56,"OUTPUT")

^SCR("P1HZT1","P",56,"TYP")
E
^SCR("P1HZT1","P",57,"CRD")
20,48,N,8,2
^SCR("P1HZT1","P",57,"HELP")

^SCR("P1HZT1","P",57,"LMAX")
8
^SCR("P1HZT1","P",57,"MUMPS1")

^SCR("P1HZT1","P",57,"MUMPS2")

^SCR("P1HZT1","P",57,"OUTPUT")

^SCR("P1HZT1","P",57,"TYP")
N
^SCR("P1HZT1","P",58,"CRD")
20,33,N,8,2
^SCR("P1HZT1","P",58,"HELP")

^SCR("P1HZT1","P",58,"LMAX")
8
^SCR("P1HZT1","P",58,"MUMPS1")

^SCR("P1HZT1","P",58,"MUMPS2")

^SCR("P1HZT1","P",58,"OUTPUT")

^SCR("P1HZT1","P",58,"TYP")
N
^SCR("P1HZT1","P",59,"CRD")
20,17,N,8,2
^SCR("P1HZT1","P",59,"HELP")

^SCR("P1HZT1","P",59,"LMAX")
8
^SCR("P1HZT1","P",59,"MUMPS1")

^SCR("P1HZT1","P",59,"MUMPS2")

^SCR("P1HZT1","P",59,"OUTPUT")

^SCR("P1HZT1","P",59,"TYP")
N
^SCR("P1HZT1","P",60,"CRD")
20,3,N,7,2
^SCR("P1HZT1","P",60,"HELP")

^SCR("P1HZT1","P",60,"LMAX")
7
^SCR("P1HZT1","P",60,"MUMPS1")

^SCR("P1HZT1","P",60,"MUMPS2")

^SCR("P1HZT1","P",60,"OUTPUT")

^SCR("P1HZT1","P",60,"TYP")
N
^SCR("P1HZT1","P",72,"CRD")
21,59,E,7,0
^SCR("P1HZT1","P",72,"HELP")

^SCR("P1HZT1","P",72,"LMAX")
7
^SCR("P1HZT1","P",72,"MUMPS1")

^SCR("P1HZT1","P",72,"MUMPS2")

^SCR("P1HZT1","P",72,"OUTPUT")

^SCR("P1HZT1","P",72,"TYP")
E
^SCR("P1HZT1","P",73,"CRD")
21,44,E,7,0
^SCR("P1HZT1","P",73,"HELP")

^SCR("P1HZT1","P",73,"LMAX")
7
^SCR("P1HZT1","P",73,"MUMPS1")

^SCR("P1HZT1","P",73,"MUMPS2")

^SCR("P1HZT1","P",73,"OUTPUT")

^SCR("P1HZT1","P",73,"TYP")
E
^SCR("P1HZT1","P",74,"CRD")
21,23,E,7,0
^SCR("P1HZT1","P",74,"HELP")

^SCR("P1HZT1","P",74,"LMAX")
7
^SCR("P1HZT1","P",74,"MUMPS1")

^SCR("P1HZT1","P",74,"MUMPS2")

^SCR("P1HZT1","P",74,"OUTPUT")

^SCR("P1HZT1","P",74,"TYP")
E
^SCR("P1HZT1","P",80,"CRD")
22,74,H,35,0
^SCR("P1HZT1","P",80,"HELP")

^SCR("P1HZT1","P",80,"LMAX")
35
^SCR("P1HZT1","P",80,"MUMPS1")
D HRA20^P1HZMS
^SCR("P1HZT1","P",80,"MUMPS2")

^SCR("P1HZT1","P",80,"TYP")
H
^SCR("P1HZT1","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZT1","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZT1","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZT1","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZT1","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZT1","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZT1","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZT1","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZT1","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZT1","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZT1","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZT1","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZT1","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZT1","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZT1","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZT1","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZT1","P","NAME","DATK")
8
^SCR("P1HZT1","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZT1","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZT1","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZT1","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZT1","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZT1","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZT1","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZT1","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZT1","P","NAME","DMSAH")
45
^SCR("P1HZT1","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZT1","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZT1","P","NAME","DMSH")
46
^SCR("P1HZT1","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZT1","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZT1","P","NAME","HNH")
41
^SCR("P1HZT1","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZT1","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZT1","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZT1","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZT1","P","NAME","HNHAH")
40
^SCR("P1HZT1","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZT1","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZT1","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZT1","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZT1","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZT1","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZT1","P","NAME","HRA2")
80
^SCR("P1HZT1","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZT1","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZT1","P","NAME","HSB")
73
^SCR("P1HZT1","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZT1","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZT1","P","NAME","HSB2")
74
^SCR("P1HZT1","P","NAME","HZM")
12
^SCR("P1HZT1","P","NAME","HZM","KEY")

^SCR("P1HZT1","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK
^SCR("P1HZT1","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZT1","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL
^SCR("P1HZT1","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD
^SCR("P1HZT1","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZT1","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZT1","P","NAME","ITRA")
59
^SCR("P1HZT1","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZT1","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZT1","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZT1","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZT1","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZT1","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZT1","P","NAME","LKHN")
35
^SCR("P1HZT1","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZT1","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZT1","P","NAME","LKHN1")
36
^SCR("P1HZT1","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZT1","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZT1","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZT1","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZT1","P","NAME","MLZR0")
1
^SCR("P1HZT1","P","NAME","MLZR1")
3
^SCR("P1HZT1","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZT1","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZT1","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZT1","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZT1","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZT1","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZT1","P","NAME","NCAB")
72
^SCR("P1HZT1","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZT1","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZT1","P","NAME","NMB")
5
^SCR("P1HZT1","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZT1","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZT1","P","NAME","ODEF")
60
^SCR("P1HZT1","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZT1","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZT1","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZT1","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZT1","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZT1","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZT1","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZT1","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZT1","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZT1","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZT1","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZT1","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZT1","P","NAME","SHUL1")
57
^SCR("P1HZT1","P","NAME","SHULA")
58
^SCR("P1HZT1","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZT1","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZT1","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZT1","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZT1","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZT1","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZT1","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZT1","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZT1","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZT1","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZT1","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZT1","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZT1","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZT1","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZT1","P","NAME","TSHL")
56
^SCR("P1HZT1","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZT1","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZT1","P","NAME","ZMANK")
31
^SCR("P1HZT1","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZT1","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZT1","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZT1","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZT1","P","NM",1)
MLZR0
^SCR("P1HZT1","P","NM",3)
MLZR1
^SCR("P1HZT1","P","NM",5)
NMB
^SCR("P1HZT1","P","NM",8)
DATK
^SCR("P1HZT1","P","NM",12)
HZM
^SCR("P1HZT1","P","NM",31)
ZMANK
^SCR("P1HZT1","P","NM",35)
LKHN
^SCR("P1HZT1","P","NM",36)
LKHN1
^SCR("P1HZT1","P","NM",40)
HNHAH
^SCR("P1HZT1","P","NM",41)
HNH
^SCR("P1HZT1","P","NM",45)
DMSAH
^SCR("P1HZT1","P","NM",46)
DMSH
^SCR("P1HZT1","P","NM",56)
TSHL
^SCR("P1HZT1","P","NM",57)
SHUL1
^SCR("P1HZT1","P","NM",58)
SHULA
^SCR("P1HZT1","P","NM",59)
ITRA
^SCR("P1HZT1","P","NM",60)
ODEF
^SCR("P1HZT1","P","NM",72)
NCAB
^SCR("P1HZT1","P","NM",73)
HSB
^SCR("P1HZT1","P","NM",74)
HSB2
^SCR("P1HZT1","P","NM",80)
HRA2
^SCR("P1HZT1","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZT1","P","REF",1,"RZD")
\
^SCR("P1HZT1","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK
^SCR("P1HZT1","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZT1","P","REF",2,"RZD")
\
^SCR("P1HZT1","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZT1","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZT1","P","REF",3,"RZD")
\
^SCR("P1HZT1","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL
^SCR("P1HZT1","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZT1","P","REF",4,"RZD")
\\
^SCR("P1HZT1","P","REF",4,"STR")
HRA2\\HODAA\\MSD
^SCR("P1HZT3")
H
^SCR("P1HZT3",1)
            {08       }: dtew jix`z {                 03}:my  {01   }:(z)i`tew 
^SCR("P1HZT3",2)
 {31               }: dpnfd zlaw onf   {12    } dpnfd 'qn       {05 }:   ogley 
^SCR("P1HZT3",3)
                             {                        36} {35        :gewl 'qn 
^SCR("P1HZT3",4)
                                                                             1$
^SCR("P1HZT3",5)
 :    dxrd   :   mekq  :zetqez: zenk : xign :     hixt xe`z    :  :   cew  :   
^SCR("P1HZT3",6)
                                                                               
^SCR("P1HZT3",7)
                                                                               
^SCR("P1HZT3",8)
                                                                               
^SCR("P1HZT3",9)
                                                                               
^SCR("P1HZT3",10)
                                                                               
^SCR("P1HZT3",11)
                                                                               
^SCR("P1HZT3",12)
                                                                               
^SCR("P1HZT3",13)
                                                                               
^SCR("P1HZT3",14)
                                                                               
^SCR("P1HZT3",15)
                                                                               
^SCR("P1HZT3",16)
                                                                               
^SCR("P1HZT3",17)
 $1                                                                            
^SCR("P1HZT3",18)
                      {46   }={45  }:(%)zexy inc     g"y {41    }={40 }dgpd cew
^SCR("P1HZT3",19)
   {60    } scer {59     }:dxzi  {58     }:dtwd {57     }:mley {56     }:melyzl
^SCR("P1HZT3",20)
                       {74    }:i`xy` oeayg {73    }:oeayg {72    }:zipeayg 'qn
^SCR("P1HZT3",21)
                                      {                                80}:dxrd
^SCR("P1HZT3","A",1)
:„”…—Š‰˜€š:�™:(š)‰€”…—
^SCR("P1HZT3","A",2)
:„�Ž†„šŒ�—�Ž†„�Ž†„'‘Ž:�‡Œ…™
^SCR("P1HZT3","A",3)
:‡…—Œ'‘Ž
^SCR("P1HZT3","A",4)

^SCR("P1HZT3","A",5)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1HZT3","A",6)
---------------------------------------------------------------------
^SCR("P1HZT3","A",7)

^SCR("P1HZT3","A",8)

^SCR("P1HZT3","A",9)

^SCR("P1HZT3","A",10)

^SCR("P1HZT3","A",11)

^SCR("P1HZT3","A",12)

^SCR("P1HZT3","A",13)

^SCR("P1HZT3","A",14)

^SCR("P1HZT3","A",15)

^SCR("P1HZT3","A",16)

^SCR("P1HZT3","A",17)

^SCR("P1HZT3","A",18)
=:(%)š…˜™‰Žƒ‡"™=„‡�„ƒ…—
^SCR("P1HZT3","A",19)
“ƒ…’:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZT3","A",20)
:‰€˜™€�…�™‡:�…�™‡:š‰�…�™‡'‘Ž
^SCR("P1HZT3","A",21)
:„˜’„
^SCR("P1HZT3","AV",1)
:vpuelhrt,:oa:(,)htpue
^SCR("P1HZT3","AV",2)
:vbnzv,kceinzvbnzvwxn:ijkua
^SCR("P1HZT3","AV",3)
:juekwxn
^SCR("P1HZT3","AV",4)

^SCR("P1HZT3","AV",5)
vrgvoufx,upxu,,unfrhjnyhrprut,sue
^SCR("P1HZT3","AV",6)
---------------------------------------------------------------------
^SCR("P1HZT3","AV",7)

^SCR("P1HZT3","AV",8)

^SCR("P1HZT3","AV",9)

^SCR("P1HZT3","AV",10)

^SCR("P1HZT3","AV",11)

^SCR("P1HZT3","AV",12)

^SCR("P1HZT3","AV",13)

^SCR("P1HZT3","AV",14)

^SCR("P1HZT3","AV",15)

^SCR("P1HZT3","AV",16)

^SCR("P1HZT3","AV",17)

^SCR("P1HZT3","AV",18)
=:(%),urahnsj"a=vjbvsue
^SCR("P1HZT3","AV",19)
;sug:vr,h:vpev:okua:ouka,k
^SCR("P1HZT3","AV",20)
:htratiucaj:iucaj:,hbucajwxn
^SCR("P1HZT3","AV",21)
:vrgv
^SCR("P1HZT3","G",1,"CRD")
6,75,E,8,0
^SCR("P1HZT3","G",1,"FNC")
F9,F10,F8,PGRG,F5,=
^SCR("P1HZT3","G",1,"GLOB")
PAR
^SCR("P1HZT3","G",1,"HELP")
<CTR+V>-dpnfd,<F10>-zetqez zbvd;<F9>-zetqez,<F8>-zeveaw,<F7>-dlah;<F6>-my
^SCR("P1HZT3","G",1,"LMAX")
8
^SCR("P1HZT3","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZT3","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZT3","G",1,"MUST")

^SCR("P1HZT3","G",1,"NLN")
20
^SCR("P1HZT3","G",1,"RZD")
**
^SCR("P1HZT3","G",1,"SHEM")
   cew  
^SCR("P1HZT3","G",1,"TOPB")
8
^SCR("P1HZT3","G",1,"TYP")
E
^SCR("P1HZT3","G",1,"VRB")
PAR1
^SCR("P1HZT3","G",2,"CRD")
6,66,E,2,0
^SCR("P1HZT3","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZT3","G",2,"LMAX")
2
^SCR("P1HZT3","G",2,"MUMPS1")

^SCR("P1HZT3","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZT3","G",2,"OUTPUT")

^SCR("P1HZT3","G",2,"SHEM")
  
^SCR("P1HZT3","G",2,"TYP")
E
^SCR("P1HZT3","G",3,"CRD")
6,63,H,18,0
^SCR("P1HZT3","G",3,"HELP")

^SCR("P1HZT3","G",3,"LMAX")
18
^SCR("P1HZT3","G",3,"MUMPS1")

^SCR("P1HZT3","G",3,"MUMPS2")

^SCR("P1HZT3","G",3,"OUTPUT")

^SCR("P1HZT3","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZT3","G",3,"TYP")
H
^SCR("P1HZT3","G",4,"CRD")
6,44,N,6,2
^SCR("P1HZT3","G",4,"HELP")

^SCR("P1HZT3","G",4,"LMAX")
6
^SCR("P1HZT3","G",4,"MUMPS1")

^SCR("P1HZT3","G",4,"MUMPS2")
I MH<0 S %SC("ER")=1
^SCR("P1HZT3","G",4,"OUTPUT")

^SCR("P1HZT3","G",4,"SHEM")
 xign 
^SCR("P1HZT3","G",4,"TYP")
N
^SCR("P1HZT3","G",5,"CRD")
6,37,N,6,3
^SCR("P1HZT3","G",5,"HELP")

^SCR("P1HZT3","G",5,"LMAX")
6
^SCR("P1HZT3","G",5,"MUMPS1")
D KAM0^P1HZMS
^SCR("P1HZT3","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZT3","G",5,"MUST")

^SCR("P1HZT3","G",5,"SHEM")
 zenk 
^SCR("P1HZT3","G",5,"TYP")
N
^SCR("P1HZT3","G",6,"CRD")
6,30,N,6,2
^SCR("P1HZT3","G",6,"HELP")

^SCR("P1HZT3","G",6,"LMAX")
6
^SCR("P1HZT3","G",6,"MUMPS1")

^SCR("P1HZT3","G",6,"MUMPS2")

^SCR("P1HZT3","G",6,"OUTPUT")

^SCR("P1HZT3","G",6,"SHEM")
zetqez
^SCR("P1HZT3","G",6,"TYP")
N
^SCR("P1HZT3","G",7,"CRD")
6,23,N,8,2
^SCR("P1HZT3","G",7,"HELP")

^SCR("P1HZT3","G",7,"LMAX")
9
^SCR("P1HZT3","G",7,"MUMPS1")

^SCR("P1HZT3","G",7,"MUMPS2")

^SCR("P1HZT3","G",7,"OUTPUT")

^SCR("P1HZT3","G",7,"SHEM")
   mekq  
^SCR("P1HZT3","G",7,"TYP")
N
^SCR("P1HZT3","G",8,"CRD")
6,13,H,11,0
^SCR("P1HZT3","G",8,"HELP")
<F10> - zetqez zbvd ,<F9>- zetqez ztqed ,<F7>- zexrd zbvd ,<F6>- dxrd yetig
^SCR("P1HZT3","G",8,"LMAX")
11
^SCR("P1HZT3","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZT3","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZT3","G",8,"SHEM")
    dxrd   
^SCR("P1HZT3","G",8,"TYP")
H
^SCR("P1HZT3","G","DEL")
Y
^SCR("P1HZT3","G","MAX")
9999
^SCR("P1HZT3","G","NAME","HRP")
8
^SCR("P1HZT3","G","NAME","KAM")
5
^SCR("P1HZT3","G","NAME","MH")
4
^SCR("P1HZT3","G","NAME","PAR")
1
^SCR("P1HZT3","G","NAME","PAR1")
3
^SCR("P1HZT3","G","NAME","SUG")
2
^SCR("P1HZT3","G","NAME","SUM")
7
^SCR("P1HZT3","G","NAME","TSF")
6
^SCR("P1HZT3","G","NM",1)
PAR
^SCR("P1HZT3","G","NM",2)
SUG
^SCR("P1HZT3","G","NM",3)
PAR1
^SCR("P1HZT3","G","NM",4)
MH
^SCR("P1HZT3","G","NM",5)
KAM
^SCR("P1HZT3","G","NM",6)
TSF
^SCR("P1HZT3","G","NM",7)
SUM
^SCR("P1HZT3","G","NM",8)
HRP
^SCR("P1HZT3","G","RB")
5,2,18,79
^SCR("P1HZT3","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZT3","G","RZD")
\
^SCR("P1HZT3","G","STEP")
1
^SCR("P1HZT3","G","STG")
 :    dxrd   :   mekq  :zetqez: zenk : xign :     hixt xe`z    :  :   cew  :   
^SCR("P1HZT3","G","VG")
7
^SCR("P1HZT3","NAME")

^SCR("P1HZT3","P",1,"CRD")
1,62,E,5.,0
^SCR("P1HZT3","P",1,"HELP")
<F7> - mixvln zbvd 
^SCR("P1HZT3","P",1,"LMAX")
6
^SCR("P1HZT3","P",1,"MUMPS1")
D MLZR01^P1HZMS
^SCR("P1HZT3","P",1,"MUMPS2")
D MLZR0^P1HZMS
^SCR("P1HZT3","P",1,"MUST")

^SCR("P1HZT3","P",1,"TYP")
E
^SCR("P1HZT3","P",3,"CRD")
1,57,H,19
^SCR("P1HZT3","P",3,"HELP")

^SCR("P1HZT3","P",3,"LMAX")
20
^SCR("P1HZT3","P",3,"MUMPS1")

^SCR("P1HZT3","P",3,"MUMPS2")

^SCR("P1HZT3","P",3,"OUTPUT")

^SCR("P1HZT3","P",3,"TYP")
H
^SCR("P1HZT3","P",5,"CRD")
2,64,E,3,0
^SCR("P1HZT3","P",5,"HELP")
CT/V+'qn-ogly dixehqid ,<F9>-dpnfd 'qn itl yetig ,<F7>- migezt zepgley zniyx
^SCR("P1HZT3","P",5,"LMAX")
4
^SCR("P1HZT3","P",5,"MUMPS1")

^SCR("P1HZT3","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1HZT3","P",5,"MUST")

^SCR("P1HZT3","P",5,"TYP")
E
^SCR("P1HZT3","P",8,"CRD")
1,12,D,8,0
^SCR("P1HZT3","P",8,"HELP")

^SCR("P1HZT3","P",8,"LMAX")
10
^SCR("P1HZT3","P",8,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZT3","P",8,"MUMPS2")

^SCR("P1HZT3","P",8,"OUTPUT")

^SCR("P1HZT3","P",8,"TYP")
D
^SCR("P1HZT3","P",12,"CRD")
2,39,E,7,0
^SCR("P1HZT3","P",12,"HELP")

^SCR("P1HZT3","P",12,"LMAX")
7
^SCR("P1HZT3","P",12,"MUMPS1")

^SCR("P1HZT3","P",12,"MUMPS2")

^SCR("P1HZT3","P",12,"OUTPUT")

^SCR("P1HZT3","P",12,"TYP")
E
^SCR("P1HZT3","P",31,"CRD")
2,1,E,18,0
^SCR("P1HZT3","P",31,"HELP")

^SCR("P1HZT3","P",31,"LMAX")
18
^SCR("P1HZT3","P",31,"MUMPS1")
D ZMANK0^P1HZMS
^SCR("P1HZT3","P",31,"MUMPS2")

^SCR("P1HZT3","P",31,"OUTPUT")

^SCR("P1HZT3","P",31,"TYP")
E
^SCR("P1HZT3","P",35,"CHECK")
Y
^SCR("P1HZT3","P",35,"CRD")
3,58,E,10,0
^SCR("P1HZT3","P",35,"CREAT")

^SCR("P1HZT3","P",35,"FNC")

^SCR("P1HZT3","P",35,"GLOB")
LKH
^SCR("P1HZT3","P",35,"HELP")

^SCR("P1HZT3","P",35,"LMAX")
11
^SCR("P1HZT3","P",35,"MUMPS1")

^SCR("P1HZT3","P",35,"MUMPS2")
D LKHN^P1HZMS
^SCR("P1HZT3","P",35,"NLN")
20
^SCR("P1HZT3","P",35,"NS")
l
^SCR("P1HZT3","P",35,"RZD")
\
^SCR("P1HZT3","P",35,"TOPB")
8
^SCR("P1HZT3","P",35,"TYP")
E
^SCR("P1HZT3","P",35,"VRB")
LKHN1
^SCR("P1HZT3","P",36,"CRD")
3,57,H,27
^SCR("P1HZT3","P",36,"HELP")

^SCR("P1HZT3","P",36,"LMAX")
27
^SCR("P1HZT3","P",36,"MUMPS1")

^SCR("P1HZT3","P",36,"MUMPS2")

^SCR("P1HZT3","P",36,"OUTPUT")

^SCR("P1HZT3","P",36,"TYP")
H
^SCR("P1HZT3","P",40,"CRD")
18,66,E,4,0
^SCR("P1HZT3","P",40,"HELP")
<F7> - zegpd zniyx 
^SCR("P1HZT3","P",40,"LMAX")
4
^SCR("P1HZT3","P",40,"MUMPS1")
D HNH00^P1HZMS
^SCR("P1HZT3","P",40,"MUMPS2")
D HNH0^P1HZMS
^SCR("P1HZT3","P",40,"TYP")
E
^SCR("P1HZT3","P",41,"CRD")
18,57,N,7,2
^SCR("P1HZT3","P",41,"HELP")

^SCR("P1HZT3","P",41,"LMAX")
7
^SCR("P1HZT3","P",41,"MUMPS1")

^SCR("P1HZT3","P",41,"MUMPS2")

^SCR("P1HZT3","P",41,"OUTPUT")

^SCR("P1HZT3","P",41,"TYP")
N
^SCR("P1HZT3","P",45,"CRD")
18,30,N,5,2
^SCR("P1HZT3","P",45,"HELP")

^SCR("P1HZT3","P",45,"LMAX")
5
^SCR("P1HZT3","P",45,"MUMPS1")

^SCR("P1HZT3","P",45,"MUMPS2")
D DMSAH^P1HZMS
^SCR("P1HZT3","P",45,"OUTPUT")

^SCR("P1HZT3","P",45,"TYP")
N
^SCR("P1HZT3","P",46,"CRD")
18,22,N,6,2
^SCR("P1HZT3","P",46,"HELP")

^SCR("P1HZT3","P",46,"LMAX")
6
^SCR("P1HZT3","P",46,"MUMPS1")

^SCR("P1HZT3","P",46,"MUMPS2")

^SCR("P1HZT3","P",46,"OUTPUT")

^SCR("P1HZT3","P",46,"TYP")
N
^SCR("P1HZT3","P",56,"CRD")
19,63,E,8,0
^SCR("P1HZT3","P",56,"HELP")

^SCR("P1HZT3","P",56,"LMAX")
8
^SCR("P1HZT3","P",56,"MUMPS1")

^SCR("P1HZT3","P",56,"MUMPS2")

^SCR("P1HZT3","P",56,"OUTPUT")

^SCR("P1HZT3","P",56,"TYP")
E
^SCR("P1HZT3","P",57,"CRD")
19,48,N,8,2
^SCR("P1HZT3","P",57,"HELP")

^SCR("P1HZT3","P",57,"LMAX")
8
^SCR("P1HZT3","P",57,"MUMPS1")

^SCR("P1HZT3","P",57,"MUMPS2")

^SCR("P1HZT3","P",57,"OUTPUT")

^SCR("P1HZT3","P",57,"TYP")
N
^SCR("P1HZT3","P",58,"CRD")
19,33,N,8,2
^SCR("P1HZT3","P",58,"HELP")

^SCR("P1HZT3","P",58,"LMAX")
8
^SCR("P1HZT3","P",58,"MUMPS1")

^SCR("P1HZT3","P",58,"MUMPS2")

^SCR("P1HZT3","P",58,"OUTPUT")

^SCR("P1HZT3","P",58,"TYP")
N
^SCR("P1HZT3","P",59,"CRD")
19,17,N,8,2
^SCR("P1HZT3","P",59,"HELP")

^SCR("P1HZT3","P",59,"LMAX")
8
^SCR("P1HZT3","P",59,"MUMPS1")

^SCR("P1HZT3","P",59,"MUMPS2")

^SCR("P1HZT3","P",59,"OUTPUT")

^SCR("P1HZT3","P",59,"TYP")
N
^SCR("P1HZT3","P",60,"CRD")
19,3,N,7,2
^SCR("P1HZT3","P",60,"HELP")

^SCR("P1HZT3","P",60,"LMAX")
7
^SCR("P1HZT3","P",60,"MUMPS1")

^SCR("P1HZT3","P",60,"MUMPS2")

^SCR("P1HZT3","P",60,"OUTPUT")

^SCR("P1HZT3","P",60,"TYP")
N
^SCR("P1HZT3","P",72,"CRD")
20,59,E,7,0
^SCR("P1HZT3","P",72,"HELP")

^SCR("P1HZT3","P",72,"LMAX")
7
^SCR("P1HZT3","P",72,"MUMPS1")

^SCR("P1HZT3","P",72,"MUMPS2")

^SCR("P1HZT3","P",72,"OUTPUT")

^SCR("P1HZT3","P",72,"TYP")
E
^SCR("P1HZT3","P",73,"CRD")
20,44,E,7,0
^SCR("P1HZT3","P",73,"HELP")

^SCR("P1HZT3","P",73,"LMAX")
7
^SCR("P1HZT3","P",73,"MUMPS1")

^SCR("P1HZT3","P",73,"MUMPS2")

^SCR("P1HZT3","P",73,"OUTPUT")

^SCR("P1HZT3","P",73,"TYP")
E
^SCR("P1HZT3","P",74,"CRD")
20,23,E,7,0
^SCR("P1HZT3","P",74,"HELP")

^SCR("P1HZT3","P",74,"LMAX")
7
^SCR("P1HZT3","P",74,"MUMPS1")

^SCR("P1HZT3","P",74,"MUMPS2")

^SCR("P1HZT3","P",74,"OUTPUT")

^SCR("P1HZT3","P",74,"TYP")
E
^SCR("P1HZT3","P",80,"CRD")
21,74,H,35,0
^SCR("P1HZT3","P",80,"HELP")

^SCR("P1HZT3","P",80,"LMAX")
35
^SCR("P1HZT3","P",80,"MUMPS1")
D HRA20^P1HZMS
^SCR("P1HZT3","P",80,"MUMPS2")

^SCR("P1HZT3","P",80,"TYP")
H
^SCR("P1HZT3","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZT3","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZT3","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZT3","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZT3","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZT3","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZT3","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZT3","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZT3","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZT3","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZT3","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZT3","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZT3","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZT3","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZT3","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZT3","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZT3","P","NAME","DATK")
8
^SCR("P1HZT3","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZT3","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZT3","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZT3","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZT3","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZT3","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZT3","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZT3","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZT3","P","NAME","DMSAH")
45
^SCR("P1HZT3","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZT3","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZT3","P","NAME","DMSH")
46
^SCR("P1HZT3","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZT3","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZT3","P","NAME","HNH")
41
^SCR("P1HZT3","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZT3","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZT3","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZT3","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZT3","P","NAME","HNHAH")
40
^SCR("P1HZT3","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZT3","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZT3","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZT3","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZT3","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZT3","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZT3","P","NAME","HRA2")
80
^SCR("P1HZT3","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZT3","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZT3","P","NAME","HSB")
73
^SCR("P1HZT3","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZT3","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZT3","P","NAME","HSB2")
74
^SCR("P1HZT3","P","NAME","HZM")
12
^SCR("P1HZT3","P","NAME","HZM","KEY")

^SCR("P1HZT3","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK
^SCR("P1HZT3","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZT3","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL
^SCR("P1HZT3","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD
^SCR("P1HZT3","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZT3","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZT3","P","NAME","ITRA")
59
^SCR("P1HZT3","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZT3","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZT3","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZT3","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZT3","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZT3","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZT3","P","NAME","LKHN")
35
^SCR("P1HZT3","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZT3","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZT3","P","NAME","LKHN1")
36
^SCR("P1HZT3","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZT3","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZT3","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZT3","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZT3","P","NAME","MLZR0")
1
^SCR("P1HZT3","P","NAME","MLZR1")
3
^SCR("P1HZT3","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZT3","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZT3","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZT3","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZT3","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZT3","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZT3","P","NAME","NCAB")
72
^SCR("P1HZT3","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZT3","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZT3","P","NAME","NMB")
5
^SCR("P1HZT3","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZT3","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZT3","P","NAME","ODEF")
60
^SCR("P1HZT3","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZT3","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZT3","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZT3","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZT3","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZT3","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZT3","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZT3","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZT3","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZT3","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZT3","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZT3","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZT3","P","NAME","SHUL1")
57
^SCR("P1HZT3","P","NAME","SHULA")
58
^SCR("P1HZT3","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZT3","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZT3","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZT3","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZT3","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZT3","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZT3","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZT3","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZT3","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZT3","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZT3","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZT3","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZT3","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZT3","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZT3","P","NAME","TSHL")
56
^SCR("P1HZT3","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZT3","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZT3","P","NAME","ZMANK")
31
^SCR("P1HZT3","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZT3","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZT3","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZT3","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZT3","P","NM",1)
MLZR0
^SCR("P1HZT3","P","NM",3)
MLZR1
^SCR("P1HZT3","P","NM",5)
NMB
^SCR("P1HZT3","P","NM",8)
DATK
^SCR("P1HZT3","P","NM",12)
HZM
^SCR("P1HZT3","P","NM",31)
ZMANK
^SCR("P1HZT3","P","NM",35)
LKHN
^SCR("P1HZT3","P","NM",36)
LKHN1
^SCR("P1HZT3","P","NM",40)
HNHAH
^SCR("P1HZT3","P","NM",41)
HNH
^SCR("P1HZT3","P","NM",45)
DMSAH
^SCR("P1HZT3","P","NM",46)
DMSH
^SCR("P1HZT3","P","NM",56)
TSHL
^SCR("P1HZT3","P","NM",57)
SHUL1
^SCR("P1HZT3","P","NM",58)
SHULA
^SCR("P1HZT3","P","NM",59)
ITRA
^SCR("P1HZT3","P","NM",60)
ODEF
^SCR("P1HZT3","P","NM",72)
NCAB
^SCR("P1HZT3","P","NM",73)
HSB
^SCR("P1HZT3","P","NM",74)
HSB2
^SCR("P1HZT3","P","NM",80)
HRA2
^SCR("P1HZT3","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZT3","P","REF",1,"RZD")
\
^SCR("P1HZT3","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK
^SCR("P1HZT3","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZT3","P","REF",2,"RZD")
\
^SCR("P1HZT3","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZT3","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZT3","P","REF",3,"RZD")
\
^SCR("P1HZT3","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL
^SCR("P1HZT3","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZT3","P","REF",4,"RZD")
\\
^SCR("P1HZT3","P","REF",4,"STR")
HRA2\\HODAA\\MSD
^SCR("P1HZTA")
H
^SCR("P1HZTA",1)
            {08       }: dtew jix`z {                 03}:my  {01   }:(z)i`tew 
^SCR("P1HZTA",2)
 {31               }: dpnfd zlaw onf   {12    } dpnfd 'qn       {05 }:   ogley 
^SCR("P1HZTA",3)
        {                        36} {35        :gewl 'qn {                32} 
^SCR("P1HZTA",4)
                                                                             1$
^SCR("P1HZTA",5)
  :        dxrd      :  mekq :zetqez: zenk: xign:     hixt xe`z    : : cew :   
^SCR("P1HZTA",6)
                                                                               
^SCR("P1HZTA",7)
                                                                               
^SCR("P1HZTA",8)
                                                                               
^SCR("P1HZTA",9)
                                                                               
^SCR("P1HZTA",10)
                                                                               
^SCR("P1HZTA",11)
                                                                               
^SCR("P1HZTA",12)
                                                                               
^SCR("P1HZTA",13)
                                                                               
^SCR("P1HZTA",14)
                                                                               
^SCR("P1HZTA",15)
                                                                               
^SCR("P1HZTA",16)
                                                                               
^SCR("P1HZTA",17)
                                                                               
^SCR("P1HZTA",18)
 $1                                                                            
^SCR("P1HZTA",19)
                      {46   }={45  }:(%)zexy inc     g"y {41    }={40 }dgpd cew
^SCR("P1HZTA",20)
   {60    } scer {59     }:dxzi  {58     }:dtwd {57     }:mley {56     }:melyzl
^SCR("P1HZTA",21)
                       {74    }:i`xy` oeayg {73    }:oeayg {72    }:zipeayg 'qn
^SCR("P1HZTA",22)
                                      {                                80}:dxrd
^SCR("P1HZTA","A",1)
:„”…—Š‰˜€š:�™:(š)‰€”…—
^SCR("P1HZTA","A",2)
:„�Ž†„šŒ�—�Ž†„�Ž†„'‘Ž:�‡Œ…™
^SCR("P1HZTA","A",3)
:‡…—Œ'‘Ž
^SCR("P1HZTA","A",4)

^SCR("P1HZTA","A",5)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1HZTA","A",6)
--------------------------------------------------------------------
^SCR("P1HZTA","A",7)

^SCR("P1HZTA","A",8)

^SCR("P1HZTA","A",9)

^SCR("P1HZTA","A",10)

^SCR("P1HZTA","A",11)

^SCR("P1HZTA","A",12)

^SCR("P1HZTA","A",13)

^SCR("P1HZTA","A",14)

^SCR("P1HZTA","A",15)

^SCR("P1HZTA","A",16)

^SCR("P1HZTA","A",17)

^SCR("P1HZTA","A",18)

^SCR("P1HZTA","A",19)
=:(%)š…˜™‰Žƒ‡"™=„‡�„ƒ…—
^SCR("P1HZTA","A",20)
“ƒ…’:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZTA","A",21)
:‰€˜™€�…�™‡:�…�™‡:š‰�…�™‡'‘Ž
^SCR("P1HZTA","A",22)
:„˜’„
^SCR("P1HZTA","AV",1)
:vpuelhrt,:oa:(,)htpue
^SCR("P1HZTA","AV",2)
:vbnzv,kceinzvbnzvwxn:ijkua
^SCR("P1HZTA","AV",3)
:juekwxn
^SCR("P1HZTA","AV",4)

^SCR("P1HZTA","AV",5)
vrgvoufx,upxu,,unfrhjnyhrprut,sue
^SCR("P1HZTA","AV",6)
--------------------------------------------------------------------
^SCR("P1HZTA","AV",7)

^SCR("P1HZTA","AV",8)

^SCR("P1HZTA","AV",9)

^SCR("P1HZTA","AV",10)

^SCR("P1HZTA","AV",11)

^SCR("P1HZTA","AV",12)

^SCR("P1HZTA","AV",13)

^SCR("P1HZTA","AV",14)

^SCR("P1HZTA","AV",15)

^SCR("P1HZTA","AV",16)

^SCR("P1HZTA","AV",17)

^SCR("P1HZTA","AV",18)

^SCR("P1HZTA","AV",19)
=:(%),urahnsj"a=vjbvsue
^SCR("P1HZTA","AV",20)
;sug:vr,h:vpev:okua:ouka,k
^SCR("P1HZTA","AV",21)
:htratiucaj:iucaj:,hbucajwxn
^SCR("P1HZTA","AV",22)
:vrgv
^SCR("P1HZTA","G",1,"CRD")
6,75,E,5,0
^SCR("P1HZTA","G",1,"FNC")
F9,F10,F8,PGRG,F5,=
^SCR("P1HZTA","G",1,"GLOB")
PAR
^SCR("P1HZTA","G",1,"HELP")
<CTR+V>-dpnfd,<F10>-zetqez zbvd;<F9>-zetqez,<F8>-zeveaw,<F7>-dlah;<F6>-my
^SCR("P1HZTA","G",1,"LMAX")
5
^SCR("P1HZTA","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZTA","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZTA","G",1,"MUST")

^SCR("P1HZTA","G",1,"NLN")
20
^SCR("P1HZTA","G",1,"RZD")
**
^SCR("P1HZTA","G",1,"SHEM")
 cew 
^SCR("P1HZTA","G",1,"TOPB")
8
^SCR("P1HZTA","G",1,"TYP")
E
^SCR("P1HZTA","G",1,"VRB")
PAR1
^SCR("P1HZTA","G",2,"CRD")
6,69,E,1,0
^SCR("P1HZTA","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZTA","G",2,"LMAX")
1
^SCR("P1HZTA","G",2,"MUMPS1")

^SCR("P1HZTA","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZTA","G",2,"OUTPUT")

^SCR("P1HZTA","G",2,"SHEM")
 
^SCR("P1HZTA","G",2,"TYP")
E
^SCR("P1HZTA","G",3,"CRD")
6,67,H,18,0
^SCR("P1HZTA","G",3,"HELP")

^SCR("P1HZTA","G",3,"LMAX")
18
^SCR("P1HZTA","G",3,"MUMPS1")

^SCR("P1HZTA","G",3,"MUMPS2")

^SCR("P1HZTA","G",3,"OUTPUT")

^SCR("P1HZTA","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZTA","G",3,"TYP")
H
^SCR("P1HZTA","G",4,"CRD")
6,48,N,5,2
^SCR("P1HZTA","G",4,"HELP")

^SCR("P1HZTA","G",4,"LMAX")
5
^SCR("P1HZTA","G",4,"MUMPS1")

^SCR("P1HZTA","G",4,"MUMPS2")
D MH^P1HZMS
^SCR("P1HZTA","G",4,"OUTPUT")

^SCR("P1HZTA","G",4,"SHEM")
 xign
^SCR("P1HZTA","G",4,"TYP")
N
^SCR("P1HZTA","G",5,"CRD")
6,42,N,5,0
^SCR("P1HZTA","G",5,"HELP")

^SCR("P1HZTA","G",5,"LMAX")
5
^SCR("P1HZTA","G",5,"MUMPS1")
D KAM0^P1HZMS
^SCR("P1HZTA","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZTA","G",5,"MUST")

^SCR("P1HZTA","G",5,"SHEM")
 zenk
^SCR("P1HZTA","G",5,"TYP")
N
^SCR("P1HZTA","G",6,"CRD")
6,36,N,6,2
^SCR("P1HZTA","G",6,"HELP")

^SCR("P1HZTA","G",6,"LMAX")
6
^SCR("P1HZTA","G",6,"MUMPS1")

^SCR("P1HZTA","G",6,"MUMPS2")

^SCR("P1HZTA","G",6,"OUTPUT")

^SCR("P1HZTA","G",6,"SHEM")
zetqez
^SCR("P1HZTA","G",6,"TYP")
N
^SCR("P1HZTA","G",7,"CRD")
6,29,N,7,2
^SCR("P1HZTA","G",7,"HELP")

^SCR("P1HZTA","G",7,"LMAX")
7
^SCR("P1HZTA","G",7,"MUMPS1")

^SCR("P1HZTA","G",7,"MUMPS2")

^SCR("P1HZTA","G",7,"OUTPUT")

^SCR("P1HZTA","G",7,"SHEM")
  mekq 
^SCR("P1HZTA","G",7,"TYP")
N
^SCR("P1HZTA","G",8,"CRD")
6,21,H,18,0
^SCR("P1HZTA","G",8,"HELP")
<F10> - zetqez zbvd ,<F9>- zetqez ztqed ,<F7>- zexrd zbvd ,<F6>- dxrd yetig
^SCR("P1HZTA","G",8,"LMAX")
18
^SCR("P1HZTA","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZTA","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZTA","G",8,"SHEM")
        dxrd      
^SCR("P1HZTA","G",8,"TYP")
H
^SCR("P1HZTA","G","DEL")
Y
^SCR("P1HZTA","G","MAX")
9999
^SCR("P1HZTA","G","NAME","HRP")
8
^SCR("P1HZTA","G","NAME","KAM")
5
^SCR("P1HZTA","G","NAME","MH")
4
^SCR("P1HZTA","G","NAME","PAR")
1
^SCR("P1HZTA","G","NAME","PAR1")
3
^SCR("P1HZTA","G","NAME","SUG")
2
^SCR("P1HZTA","G","NAME","SUM")
7
^SCR("P1HZTA","G","NAME","TSF")
6
^SCR("P1HZTA","G","NM",1)
PAR
^SCR("P1HZTA","G","NM",2)
SUG
^SCR("P1HZTA","G","NM",3)
PAR1
^SCR("P1HZTA","G","NM",4)
MH
^SCR("P1HZTA","G","NM",5)
KAM
^SCR("P1HZTA","G","NM",6)
TSF
^SCR("P1HZTA","G","NM",7)
SUM
^SCR("P1HZTA","G","NM",8)
HRP
^SCR("P1HZTA","G","RB")
5,2,19,79
^SCR("P1HZTA","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZTA","G","RZD")
\
^SCR("P1HZTA","G","STEP")
1
^SCR("P1HZTA","G","STG")
  :        dxrd      :  mekq :zetqez: zenk: xign:     hixt xe`z    : : cew :   
^SCR("P1HZTA","G","VG")
7
^SCR("P1HZTA","NAME")

^SCR("P1HZTA","P",1,"CRD")
1,62,E,5.,0
^SCR("P1HZTA","P",1,"HELP")
<F7> - mixvln zbvd 
^SCR("P1HZTA","P",1,"LMAX")
6
^SCR("P1HZTA","P",1,"MUMPS1")

^SCR("P1HZTA","P",1,"MUMPS2")
D MLZR0^P1HZMS
^SCR("P1HZTA","P",1,"MUST")

^SCR("P1HZTA","P",1,"TYP")
E
^SCR("P1HZTA","P",3,"CRD")
1,57,H,19
^SCR("P1HZTA","P",3,"HELP")

^SCR("P1HZTA","P",3,"LMAX")
20
^SCR("P1HZTA","P",3,"MUMPS1")

^SCR("P1HZTA","P",3,"MUMPS2")

^SCR("P1HZTA","P",3,"OUTPUT")

^SCR("P1HZTA","P",3,"TYP")
H
^SCR("P1HZTA","P",5,"CRD")
2,64,E,3,0
^SCR("P1HZTA","P",5,"HELP")
CT/V+'qn-ogly dixehqid ,<F9>-dpnfd 'qn itl yetig ,<F7>- migezt zepgley zniyx
^SCR("P1HZTA","P",5,"LMAX")
4
^SCR("P1HZTA","P",5,"MUMPS1")

^SCR("P1HZTA","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1HZTA","P",5,"MUST")

^SCR("P1HZTA","P",5,"TYP")
E
^SCR("P1HZTA","P",8,"CRD")
1,12,D,8,0
^SCR("P1HZTA","P",8,"HELP")

^SCR("P1HZTA","P",8,"LMAX")
10
^SCR("P1HZTA","P",8,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZTA","P",8,"MUMPS2")

^SCR("P1HZTA","P",8,"OUTPUT")

^SCR("P1HZTA","P",8,"TYP")
D
^SCR("P1HZTA","P",12,"CRD")
2,39,E,7,0
^SCR("P1HZTA","P",12,"HELP")

^SCR("P1HZTA","P",12,"LMAX")
7
^SCR("P1HZTA","P",12,"MUMPS1")

^SCR("P1HZTA","P",12,"MUMPS2")

^SCR("P1HZTA","P",12,"OUTPUT")

^SCR("P1HZTA","P",12,"TYP")
E
^SCR("P1HZTA","P",31,"CRD")
2,1,E,18,0
^SCR("P1HZTA","P",31,"HELP")

^SCR("P1HZTA","P",31,"LMAX")
18
^SCR("P1HZTA","P",31,"MUMPS1")
I $G(ZMANK)?.P D INT^%T S ZMANK=$$^%L1DC($H,1)_"  "_%TIM
^SCR("P1HZTA","P",31,"MUMPS2")

^SCR("P1HZTA","P",31,"OUTPUT")

^SCR("P1HZTA","P",31,"TYP")
E
^SCR("P1HZTA","P",32,"CRD")
3,78,H,19
^SCR("P1HZTA","P",32,"HELP")

^SCR("P1HZTA","P",32,"LMAX")
19
^SCR("P1HZTA","P",32,"MUMPS1")

^SCR("P1HZTA","P",32,"MUMPS2")

^SCR("P1HZTA","P",32,"OUTPUT")

^SCR("P1HZTA","P",32,"TYP")
H
^SCR("P1HZTA","P",35,"CRD")
3,37,E,10,0
^SCR("P1HZTA","P",35,"CREAT")

^SCR("P1HZTA","P",35,"FNC")

^SCR("P1HZTA","P",35,"GLOB")
LKH
^SCR("P1HZTA","P",35,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1HZTA","P",35,"LMAX")
11
^SCR("P1HZTA","P",35,"MUMPS1")
D LKHN0^P1HZMS
^SCR("P1HZTA","P",35,"MUMPS2")
D LKHN^P1HZMS
^SCR("P1HZTA","P",35,"NLN")
20
^SCR("P1HZTA","P",35,"NS")
l
^SCR("P1HZTA","P",35,"RZD")
\
^SCR("P1HZTA","P",35,"TOPB")
8
^SCR("P1HZTA","P",35,"TYP")
E
^SCR("P1HZTA","P",35,"VRB")
LKHN1
^SCR("P1HZTA","P",36,"CRD")
3,36,H,27
^SCR("P1HZTA","P",36,"HELP")

^SCR("P1HZTA","P",36,"LMAX")
27
^SCR("P1HZTA","P",36,"MUMPS1")

^SCR("P1HZTA","P",36,"MUMPS2")

^SCR("P1HZTA","P",36,"OUTPUT")

^SCR("P1HZTA","P",36,"TYP")
H
^SCR("P1HZTA","P",40,"CRD")
19,66,E,4,0
^SCR("P1HZTA","P",40,"HELP")
<F7> - zegpd zniyx 
^SCR("P1HZTA","P",40,"LMAX")
4
^SCR("P1HZTA","P",40,"MUMPS1")
D HNH00^P1HZMS
^SCR("P1HZTA","P",40,"MUMPS2")
D HNH0^P1HZMS
^SCR("P1HZTA","P",40,"TYP")
E
^SCR("P1HZTA","P",41,"CRD")
19,57,N,7,2
^SCR("P1HZTA","P",41,"HELP")

^SCR("P1HZTA","P",41,"LMAX")
7
^SCR("P1HZTA","P",41,"MUMPS1")

^SCR("P1HZTA","P",41,"MUMPS2")

^SCR("P1HZTA","P",41,"OUTPUT")

^SCR("P1HZTA","P",41,"TYP")
N
^SCR("P1HZTA","P",45,"CRD")
19,30,N,5,2
^SCR("P1HZTA","P",45,"HELP")

^SCR("P1HZTA","P",45,"LMAX")
5
^SCR("P1HZTA","P",45,"MUMPS1")

^SCR("P1HZTA","P",45,"MUMPS2")
D DMSAH^P1HZMS
^SCR("P1HZTA","P",45,"OUTPUT")

^SCR("P1HZTA","P",45,"TYP")
N
^SCR("P1HZTA","P",46,"CRD")
19,22,N,6,2
^SCR("P1HZTA","P",46,"HELP")

^SCR("P1HZTA","P",46,"LMAX")
6
^SCR("P1HZTA","P",46,"MUMPS1")

^SCR("P1HZTA","P",46,"MUMPS2")

^SCR("P1HZTA","P",46,"OUTPUT")

^SCR("P1HZTA","P",46,"TYP")
N
^SCR("P1HZTA","P",56,"CRD")
20,63,E,8,0
^SCR("P1HZTA","P",56,"HELP")

^SCR("P1HZTA","P",56,"LMAX")
8
^SCR("P1HZTA","P",56,"MUMPS1")

^SCR("P1HZTA","P",56,"MUMPS2")

^SCR("P1HZTA","P",56,"OUTPUT")

^SCR("P1HZTA","P",56,"TYP")
E
^SCR("P1HZTA","P",57,"CRD")
20,48,N,8,2
^SCR("P1HZTA","P",57,"HELP")

^SCR("P1HZTA","P",57,"LMAX")
8
^SCR("P1HZTA","P",57,"MUMPS1")

^SCR("P1HZTA","P",57,"MUMPS2")

^SCR("P1HZTA","P",57,"OUTPUT")

^SCR("P1HZTA","P",57,"TYP")
N
^SCR("P1HZTA","P",58,"CRD")
20,33,N,8,2
^SCR("P1HZTA","P",58,"HELP")

^SCR("P1HZTA","P",58,"LMAX")
8
^SCR("P1HZTA","P",58,"MUMPS1")

^SCR("P1HZTA","P",58,"MUMPS2")

^SCR("P1HZTA","P",58,"OUTPUT")

^SCR("P1HZTA","P",58,"TYP")
N
^SCR("P1HZTA","P",59,"CRD")
20,17,N,8,2
^SCR("P1HZTA","P",59,"HELP")

^SCR("P1HZTA","P",59,"LMAX")
8
^SCR("P1HZTA","P",59,"MUMPS1")

^SCR("P1HZTA","P",59,"MUMPS2")

^SCR("P1HZTA","P",59,"OUTPUT")

^SCR("P1HZTA","P",59,"TYP")
N
^SCR("P1HZTA","P",60,"CRD")
20,3,N,7,2
^SCR("P1HZTA","P",60,"HELP")

^SCR("P1HZTA","P",60,"LMAX")
7
^SCR("P1HZTA","P",60,"MUMPS1")

^SCR("P1HZTA","P",60,"MUMPS2")

^SCR("P1HZTA","P",60,"OUTPUT")

^SCR("P1HZTA","P",60,"TYP")
N
^SCR("P1HZTA","P",72,"CRD")
21,59,E,7,0
^SCR("P1HZTA","P",72,"HELP")

^SCR("P1HZTA","P",72,"LMAX")
7
^SCR("P1HZTA","P",72,"MUMPS1")

^SCR("P1HZTA","P",72,"MUMPS2")

^SCR("P1HZTA","P",72,"OUTPUT")

^SCR("P1HZTA","P",72,"TYP")
E
^SCR("P1HZTA","P",73,"CRD")
21,44,E,7,0
^SCR("P1HZTA","P",73,"HELP")

^SCR("P1HZTA","P",73,"LMAX")
7
^SCR("P1HZTA","P",73,"MUMPS1")

^SCR("P1HZTA","P",73,"MUMPS2")

^SCR("P1HZTA","P",73,"OUTPUT")

^SCR("P1HZTA","P",73,"TYP")
E
^SCR("P1HZTA","P",74,"CRD")
21,23,E,7,0
^SCR("P1HZTA","P",74,"HELP")

^SCR("P1HZTA","P",74,"LMAX")
7
^SCR("P1HZTA","P",74,"MUMPS1")

^SCR("P1HZTA","P",74,"MUMPS2")

^SCR("P1HZTA","P",74,"OUTPUT")

^SCR("P1HZTA","P",74,"TYP")
E
^SCR("P1HZTA","P",80,"CRD")
22,74,H,35
^SCR("P1HZTA","P",80,"HELP")

^SCR("P1HZTA","P",80,"LMAX")
35
^SCR("P1HZTA","P",80,"MUMPS1")

^SCR("P1HZTA","P",80,"MUMPS2")

^SCR("P1HZTA","P",80,"TYP")
H
^SCR("P1HZTA","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZTA","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZTA","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZTA","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZTA","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZTA","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZTA","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZTA","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZTA","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZTA","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZTA","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZTA","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZTA","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZTA","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZTA","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZTA","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZTA","P","NAME","DATK")
8
^SCR("P1HZTA","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZTA","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZTA","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZTA","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZTA","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZTA","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZTA","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZTA","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZTA","P","NAME","DMSAH")
45
^SCR("P1HZTA","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZTA","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZTA","P","NAME","DMSH")
46
^SCR("P1HZTA","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZTA","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZTA","P","NAME","HNH")
41
^SCR("P1HZTA","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZTA","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZTA","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZTA","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZTA","P","NAME","HNHAH")
40
^SCR("P1HZTA","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZTA","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZTA","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZTA","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZTA","P","NAME","HODAA")
32
^SCR("P1HZTA","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZTA","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZTA","P","NAME","HRA2")
80
^SCR("P1HZTA","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZTA","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZTA","P","NAME","HSB")
73
^SCR("P1HZTA","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZTA","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZTA","P","NAME","HSB2")
74
^SCR("P1HZTA","P","NAME","HZM")
12
^SCR("P1HZTA","P","NAME","HZM","KEY")

^SCR("P1HZTA","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK
^SCR("P1HZTA","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZTA","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL
^SCR("P1HZTA","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD
^SCR("P1HZTA","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZTA","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZTA","P","NAME","ITRA")
59
^SCR("P1HZTA","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZTA","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZTA","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZTA","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZTA","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZTA","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZTA","P","NAME","LKHN")
35
^SCR("P1HZTA","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZTA","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZTA","P","NAME","LKHN1")
36
^SCR("P1HZTA","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZTA","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZTA","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZTA","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZTA","P","NAME","MLZR0")
1
^SCR("P1HZTA","P","NAME","MLZR1")
3
^SCR("P1HZTA","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZTA","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZTA","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZTA","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZTA","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZTA","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZTA","P","NAME","NCAB")
72
^SCR("P1HZTA","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZTA","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZTA","P","NAME","NMB")
5
^SCR("P1HZTA","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZTA","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZTA","P","NAME","ODEF")
60
^SCR("P1HZTA","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZTA","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZTA","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZTA","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZTA","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZTA","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZTA","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZTA","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZTA","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZTA","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZTA","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZTA","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZTA","P","NAME","SHUL1")
57
^SCR("P1HZTA","P","NAME","SHULA")
58
^SCR("P1HZTA","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZTA","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZTA","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZTA","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZTA","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZTA","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZTA","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZTA","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZTA","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZTA","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZTA","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZTA","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZTA","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZTA","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZTA","P","NAME","TSHL")
56
^SCR("P1HZTA","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZTA","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZTA","P","NAME","ZMANK")
31
^SCR("P1HZTA","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZTA","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZTA","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZTA","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZTA","P","NM",1)
MLZR0
^SCR("P1HZTA","P","NM",3)
MLZR1
^SCR("P1HZTA","P","NM",5)
NMB
^SCR("P1HZTA","P","NM",8)
DATK
^SCR("P1HZTA","P","NM",12)
HZM
^SCR("P1HZTA","P","NM",31)
ZMANK
^SCR("P1HZTA","P","NM",32)
HODAA
^SCR("P1HZTA","P","NM",35)
LKHN
^SCR("P1HZTA","P","NM",36)
LKHN1
^SCR("P1HZTA","P","NM",40)
HNHAH
^SCR("P1HZTA","P","NM",41)
HNH
^SCR("P1HZTA","P","NM",45)
DMSAH
^SCR("P1HZTA","P","NM",46)
DMSH
^SCR("P1HZTA","P","NM",56)
TSHL
^SCR("P1HZTA","P","NM",57)
SHUL1
^SCR("P1HZTA","P","NM",58)
SHULA
^SCR("P1HZTA","P","NM",59)
ITRA
^SCR("P1HZTA","P","NM",60)
ODEF
^SCR("P1HZTA","P","NM",72)
NCAB
^SCR("P1HZTA","P","NM",73)
HSB
^SCR("P1HZTA","P","NM",74)
HSB2
^SCR("P1HZTA","P","NM",80)
HRA2
^SCR("P1HZTA","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZTA","P","REF",1,"RZD")
\
^SCR("P1HZTA","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK
^SCR("P1HZTA","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZTA","P","REF",2,"RZD")
\
^SCR("P1HZTA","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZTA","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZTA","P","REF",3,"RZD")
\
^SCR("P1HZTA","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL
^SCR("P1HZTA","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZTA","P","REF",4,"RZD")
\\
^SCR("P1HZTA","P","REF",4,"STR")
HRA2\\HODAA\\MSD
^SCR("P1HZTA0")
H
^SCR("P1HZTA0",1)
            {08       }: dtew jix`z {                 03}:my  {01   }:(z)i`tew 
^SCR("P1HZTA0",2)
 {31               }: dpnfd zlaw onf   {12    } dpnfd 'qn       {05 }:   ogley 
^SCR("P1HZTA0",3)
        {                        36} {35        :gewl 'qn {                32} 
^SCR("P1HZTA0",4)
                                                                             1$
^SCR("P1HZTA0",5)
  :        dxrd      :  mekq :zetqez: zenk: xign:     hixt xe`z    : : cew :   
^SCR("P1HZTA0",6)
                                                                               
^SCR("P1HZTA0",7)
                                                                               
^SCR("P1HZTA0",8)
                                                                               
^SCR("P1HZTA0",9)
                                                                               
^SCR("P1HZTA0",10)
                                                                               
^SCR("P1HZTA0",11)
                                                                               
^SCR("P1HZTA0",12)
                                                                               
^SCR("P1HZTA0",13)
                                                                               
^SCR("P1HZTA0",14)
                                                                               
^SCR("P1HZTA0",15)
                                                                               
^SCR("P1HZTA0",16)
                                                                               
^SCR("P1HZTA0",17)
                                                                               
^SCR("P1HZTA0",18)
 $1                                                                            
^SCR("P1HZTA0",19)
                      {46   }={45  }:(%)zexy inc     g"y {41    }={40 }dgpd cew
^SCR("P1HZTA0",20)
   {60    } scer {59     }:dxzi  {58     }:dtwd {57     }:mley {56     }:melyzl
^SCR("P1HZTA0",21)
                       {74    }:i`xy` oeayg {73    }:oeayg {72    }:zipeayg 'qn
^SCR("P1HZTA0",22)
                                      {                                80}:dxrd
^SCR("P1HZTA0","A",1)
:„”…—Š‰˜€š:�™:(š)‰€”…—
^SCR("P1HZTA0","A",2)
:„�Ž†„šŒ�—�Ž†„�Ž†„'‘Ž:�‡Œ…™
^SCR("P1HZTA0","A",3)
:‡…—Œ'‘Ž
^SCR("P1HZTA0","A",4)

^SCR("P1HZTA0","A",5)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1HZTA0","A",6)
--------------------------------------------------------------------
^SCR("P1HZTA0","A",7)

^SCR("P1HZTA0","A",8)

^SCR("P1HZTA0","A",9)

^SCR("P1HZTA0","A",10)

^SCR("P1HZTA0","A",11)

^SCR("P1HZTA0","A",12)

^SCR("P1HZTA0","A",13)

^SCR("P1HZTA0","A",14)

^SCR("P1HZTA0","A",15)

^SCR("P1HZTA0","A",16)

^SCR("P1HZTA0","A",17)

^SCR("P1HZTA0","A",18)

^SCR("P1HZTA0","A",19)
=:(%)š…˜™‰Žƒ‡"™=„‡�„ƒ…—
^SCR("P1HZTA0","A",20)
“ƒ…’:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1HZTA0","A",21)
:‰€˜™€�…�™‡:�…�™‡:š‰�…�™‡'‘Ž
^SCR("P1HZTA0","A",22)
:„˜’„
^SCR("P1HZTA0","AV",1)
:vpuelhrt,:oa:(,)htpue
^SCR("P1HZTA0","AV",2)
:vbnzv,kceinzvbnzvwxn:ijkua
^SCR("P1HZTA0","AV",3)
:juekwxn
^SCR("P1HZTA0","AV",4)

^SCR("P1HZTA0","AV",5)
vrgvoufx,upxu,,unfrhjnyhrprut,sue
^SCR("P1HZTA0","AV",6)
--------------------------------------------------------------------
^SCR("P1HZTA0","AV",7)

^SCR("P1HZTA0","AV",8)

^SCR("P1HZTA0","AV",9)

^SCR("P1HZTA0","AV",10)

^SCR("P1HZTA0","AV",11)

^SCR("P1HZTA0","AV",12)

^SCR("P1HZTA0","AV",13)

^SCR("P1HZTA0","AV",14)

^SCR("P1HZTA0","AV",15)

^SCR("P1HZTA0","AV",16)

^SCR("P1HZTA0","AV",17)

^SCR("P1HZTA0","AV",18)

^SCR("P1HZTA0","AV",19)
=:(%),urahnsj"a=vjbvsue
^SCR("P1HZTA0","AV",20)
;sug:vr,h:vpev:okua:ouka,k
^SCR("P1HZTA0","AV",21)
:htratiucaj:iucaj:,hbucajwxn
^SCR("P1HZTA0","AV",22)
:vrgv
^SCR("P1HZTA0","G",1,"CRD")
6,75,E,5,0
^SCR("P1HZTA0","G",1,"FNC")
F9,F10,F8,PGRG,F5,=
^SCR("P1HZTA0","G",1,"GLOB")
PAR
^SCR("P1HZTA0","G",1,"HELP")
<CTR+V>-dpnfd,<F10>-zetqez zbvd;<F9>-zetqez,<F8>-zeveaw,<F7>-dlah;<F6>-my
^SCR("P1HZTA0","G",1,"LMAX")
5
^SCR("P1HZTA0","G",1,"MUMPS1")
D PARTAW^P1HZMS
^SCR("P1HZTA0","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZTA0","G",1,"MUST")

^SCR("P1HZTA0","G",1,"NLN")
20
^SCR("P1HZTA0","G",1,"RZD")
**
^SCR("P1HZTA0","G",1,"SHEM")
 cew 
^SCR("P1HZTA0","G",1,"TOPB")
8
^SCR("P1HZTA0","G",1,"TYP")
E
^SCR("P1HZTA0","G",1,"VRB")
PAR1
^SCR("P1HZTA0","G",2,"CRD")
6,69,E,1,0
^SCR("P1HZTA0","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZTA0","G",2,"LMAX")
1
^SCR("P1HZTA0","G",2,"MUMPS1")

^SCR("P1HZTA0","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZTA0","G",2,"OUTPUT")

^SCR("P1HZTA0","G",2,"SHEM")
 
^SCR("P1HZTA0","G",2,"TYP")
E
^SCR("P1HZTA0","G",3,"CRD")
6,67,H,18,0
^SCR("P1HZTA0","G",3,"HELP")

^SCR("P1HZTA0","G",3,"LMAX")
18
^SCR("P1HZTA0","G",3,"MUMPS1")

^SCR("P1HZTA0","G",3,"MUMPS2")

^SCR("P1HZTA0","G",3,"OUTPUT")

^SCR("P1HZTA0","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZTA0","G",3,"TYP")
H
^SCR("P1HZTA0","G",4,"CRD")
6,48,N,5,2
^SCR("P1HZTA0","G",4,"HELP")

^SCR("P1HZTA0","G",4,"LMAX")
5
^SCR("P1HZTA0","G",4,"MUMPS1")

^SCR("P1HZTA0","G",4,"MUMPS2")
D MH^P1HZMS
^SCR("P1HZTA0","G",4,"OUTPUT")

^SCR("P1HZTA0","G",4,"SHEM")
 xign
^SCR("P1HZTA0","G",4,"TYP")
N
^SCR("P1HZTA0","G",5,"CRD")
6,42,N,5,0
^SCR("P1HZTA0","G",5,"HELP")

^SCR("P1HZTA0","G",5,"LMAX")
5
^SCR("P1HZTA0","G",5,"MUMPS1")
D KAM0^P1HZMS
^SCR("P1HZTA0","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZTA0","G",5,"MUST")

^SCR("P1HZTA0","G",5,"SHEM")
 zenk
^SCR("P1HZTA0","G",5,"TYP")
N
^SCR("P1HZTA0","G",6,"CRD")
6,36,N,6,2
^SCR("P1HZTA0","G",6,"HELP")

^SCR("P1HZTA0","G",6,"LMAX")
6
^SCR("P1HZTA0","G",6,"MUMPS1")

^SCR("P1HZTA0","G",6,"MUMPS2")

^SCR("P1HZTA0","G",6,"OUTPUT")

^SCR("P1HZTA0","G",6,"SHEM")
zetqez
^SCR("P1HZTA0","G",6,"TYP")
N
^SCR("P1HZTA0","G",7,"CRD")
6,29,N,7,2
^SCR("P1HZTA0","G",7,"HELP")

^SCR("P1HZTA0","G",7,"LMAX")
7
^SCR("P1HZTA0","G",7,"MUMPS1")

^SCR("P1HZTA0","G",7,"MUMPS2")

^SCR("P1HZTA0","G",7,"OUTPUT")

^SCR("P1HZTA0","G",7,"SHEM")
  mekq 
^SCR("P1HZTA0","G",7,"TYP")
N
^SCR("P1HZTA0","G",8,"CRD")
6,21,H,18,0
^SCR("P1HZTA0","G",8,"HELP")
<F10> - zetqez zbvd ,<F9>- zetqez ztqed ,<F7>- zexrd zbvd ,<F6>- dxrd yetig
^SCR("P1HZTA0","G",8,"LMAX")
18
^SCR("P1HZTA0","G",8,"MUMPS1")
D HRP0^P1HZMS
^SCR("P1HZTA0","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZTA0","G",8,"SHEM")
        dxrd      
^SCR("P1HZTA0","G",8,"TYP")
H
^SCR("P1HZTA0","G","DEL")
Y
^SCR("P1HZTA0","G","MAX")
9999
^SCR("P1HZTA0","G","NAME","HRP")
8
^SCR("P1HZTA0","G","NAME","KAM")
5
^SCR("P1HZTA0","G","NAME","MH")
4
^SCR("P1HZTA0","G","NAME","PAR")
1
^SCR("P1HZTA0","G","NAME","PAR1")
3
^SCR("P1HZTA0","G","NAME","SUG")
2
^SCR("P1HZTA0","G","NAME","SUM")
7
^SCR("P1HZTA0","G","NAME","TSF")
6
^SCR("P1HZTA0","G","NM",1)
PAR
^SCR("P1HZTA0","G","NM",2)
SUG
^SCR("P1HZTA0","G","NM",3)
PAR1
^SCR("P1HZTA0","G","NM",4)
MH
^SCR("P1HZTA0","G","NM",5)
KAM
^SCR("P1HZTA0","G","NM",6)
TSF
^SCR("P1HZTA0","G","NM",7)
SUM
^SCR("P1HZTA0","G","NM",8)
HRP
^SCR("P1HZTA0","G","RB")
5,2,19,79
^SCR("P1HZTA0","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZTA0","G","RZD")
\
^SCR("P1HZTA0","G","STEP")
1
^SCR("P1HZTA0","G","STG")
  :        dxrd      :  mekq :zetqez: zenk: xign:     hixt xe`z    : : cew :   
^SCR("P1HZTA0","G","VG")
7
^SCR("P1HZTA0","NAME")

^SCR("P1HZTA0","P",1,"CRD")
1,62,E,5.,0
^SCR("P1HZTA0","P",1,"HELP")
<F7> - mixvln zbvd 
^SCR("P1HZTA0","P",1,"LMAX")
6
^SCR("P1HZTA0","P",1,"MUMPS1")

^SCR("P1HZTA0","P",1,"MUMPS2")
D MLZR0^P1HZMS
^SCR("P1HZTA0","P",1,"MUST")

^SCR("P1HZTA0","P",1,"TYP")
E
^SCR("P1HZTA0","P",3,"CRD")
1,57,H,19
^SCR("P1HZTA0","P",3,"HELP")

^SCR("P1HZTA0","P",3,"LMAX")
20
^SCR("P1HZTA0","P",3,"MUMPS1")

^SCR("P1HZTA0","P",3,"MUMPS2")

^SCR("P1HZTA0","P",3,"OUTPUT")

^SCR("P1HZTA0","P",3,"TYP")
H
^SCR("P1HZTA0","P",5,"CRD")
2,64,E,3,0
^SCR("P1HZTA0","P",5,"HELP")
CT/V+'qn-ogly dixehqid ,<F9>-dpnfd 'qn itl yetig ,<F7>- migezt zepgley zniyx
^SCR("P1HZTA0","P",5,"LMAX")
4
^SCR("P1HZTA0","P",5,"MUMPS1")

^SCR("P1HZTA0","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1HZTA0","P",5,"MUST")

^SCR("P1HZTA0","P",5,"TYP")
E
^SCR("P1HZTA0","P",8,"CRD")
1,12,D,8,0
^SCR("P1HZTA0","P",8,"HELP")

^SCR("P1HZTA0","P",8,"LMAX")
10
^SCR("P1HZTA0","P",8,"MUMPS1")
S:'$G(DATK) DATK=$$^%L1DC(P1DZ,1)
^SCR("P1HZTA0","P",8,"MUMPS2")

^SCR("P1HZTA0","P",8,"OUTPUT")

^SCR("P1HZTA0","P",8,"TYP")
D
^SCR("P1HZTA0","P",12,"CRD")
2,39,E,7,0
^SCR("P1HZTA0","P",12,"HELP")

^SCR("P1HZTA0","P",12,"LMAX")
7
^SCR("P1HZTA0","P",12,"MUMPS1")

^SCR("P1HZTA0","P",12,"MUMPS2")

^SCR("P1HZTA0","P",12,"OUTPUT")

^SCR("P1HZTA0","P",12,"TYP")
E
^SCR("P1HZTA0","P",31,"CRD")
2,1,E,18,0
^SCR("P1HZTA0","P",31,"HELP")

^SCR("P1HZTA0","P",31,"LMAX")
18
^SCR("P1HZTA0","P",31,"MUMPS1")
I $G(ZMANK)?.P D INT^%T S ZMANK=$$^%L1DC($H,1)_"  "_%TIM
^SCR("P1HZTA0","P",31,"MUMPS2")

^SCR("P1HZTA0","P",31,"OUTPUT")

^SCR("P1HZTA0","P",31,"TYP")
E
^SCR("P1HZTA0","P",32,"CRD")
3,78,H,19
^SCR("P1HZTA0","P",32,"HELP")

^SCR("P1HZTA0","P",32,"LMAX")
19
^SCR("P1HZTA0","P",32,"MUMPS1")

^SCR("P1HZTA0","P",32,"MUMPS2")

^SCR("P1HZTA0","P",32,"OUTPUT")

^SCR("P1HZTA0","P",32,"TYP")
H
^SCR("P1HZTA0","P",35,"CRD")
3,37,E,10,0
^SCR("P1HZTA0","P",35,"CREAT")

^SCR("P1HZTA0","P",35,"FNC")

^SCR("P1HZTA0","P",35,"GLOB")
LKH
^SCR("P1HZTA0","P",35,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1HZTA0","P",35,"LMAX")
11
^SCR("P1HZTA0","P",35,"MUMPS1")
D LKHN0^P1HZMS
^SCR("P1HZTA0","P",35,"MUMPS2")
D LKHN^P1HZMS
^SCR("P1HZTA0","P",35,"NLN")
20
^SCR("P1HZTA0","P",35,"NS")
l
^SCR("P1HZTA0","P",35,"RZD")
\
^SCR("P1HZTA0","P",35,"TOPB")
8
^SCR("P1HZTA0","P",35,"TYP")
E
^SCR("P1HZTA0","P",35,"VRB")
LKHN1
^SCR("P1HZTA0","P",36,"CRD")
3,36,H,27
^SCR("P1HZTA0","P",36,"HELP")

^SCR("P1HZTA0","P",36,"LMAX")
27
^SCR("P1HZTA0","P",36,"MUMPS1")

^SCR("P1HZTA0","P",36,"MUMPS2")

^SCR("P1HZTA0","P",36,"OUTPUT")

^SCR("P1HZTA0","P",36,"TYP")
H
^SCR("P1HZTA0","P",40,"CRD")
19,66,E,4,0
^SCR("P1HZTA0","P",40,"HELP")
<F7> - zegpd zniyx 
^SCR("P1HZTA0","P",40,"LMAX")
4
^SCR("P1HZTA0","P",40,"MUMPS1")
D HNH00^P1HZMS
^SCR("P1HZTA0","P",40,"MUMPS2")
D HNH0^P1HZMS
^SCR("P1HZTA0","P",40,"TYP")
E
^SCR("P1HZTA0","P",41,"CRD")
19,57,N,7,2
^SCR("P1HZTA0","P",41,"HELP")

^SCR("P1HZTA0","P",41,"LMAX")
7
^SCR("P1HZTA0","P",41,"MUMPS1")

^SCR("P1HZTA0","P",41,"MUMPS2")

^SCR("P1HZTA0","P",41,"OUTPUT")

^SCR("P1HZTA0","P",41,"TYP")
N
^SCR("P1HZTA0","P",45,"CRD")
19,30,N,5,2
^SCR("P1HZTA0","P",45,"HELP")

^SCR("P1HZTA0","P",45,"LMAX")
5
^SCR("P1HZTA0","P",45,"MUMPS1")

^SCR("P1HZTA0","P",45,"MUMPS2")
D DMSAH^P1HZMS
^SCR("P1HZTA0","P",45,"OUTPUT")

^SCR("P1HZTA0","P",45,"TYP")
N
^SCR("P1HZTA0","P",46,"CRD")
19,22,N,6,2
^SCR("P1HZTA0","P",46,"HELP")

^SCR("P1HZTA0","P",46,"LMAX")
6
^SCR("P1HZTA0","P",46,"MUMPS1")

^SCR("P1HZTA0","P",46,"MUMPS2")

^SCR("P1HZTA0","P",46,"OUTPUT")

^SCR("P1HZTA0","P",46,"TYP")
N
^SCR("P1HZTA0","P",56,"CRD")
20,63,E,8,0
^SCR("P1HZTA0","P",56,"HELP")

^SCR("P1HZTA0","P",56,"LMAX")
8
^SCR("P1HZTA0","P",56,"MUMPS1")

^SCR("P1HZTA0","P",56,"MUMPS2")

^SCR("P1HZTA0","P",56,"OUTPUT")

^SCR("P1HZTA0","P",56,"TYP")
E
^SCR("P1HZTA0","P",57,"CRD")
20,48,N,8,2
^SCR("P1HZTA0","P",57,"HELP")

^SCR("P1HZTA0","P",57,"LMAX")
8
^SCR("P1HZTA0","P",57,"MUMPS1")

^SCR("P1HZTA0","P",57,"MUMPS2")

^SCR("P1HZTA0","P",57,"OUTPUT")

^SCR("P1HZTA0","P",57,"TYP")
N
^SCR("P1HZTA0","P",58,"CRD")
20,33,N,8,2
^SCR("P1HZTA0","P",58,"HELP")

^SCR("P1HZTA0","P",58,"LMAX")
8
^SCR("P1HZTA0","P",58,"MUMPS1")

^SCR("P1HZTA0","P",58,"MUMPS2")

^SCR("P1HZTA0","P",58,"OUTPUT")

^SCR("P1HZTA0","P",58,"TYP")
N
^SCR("P1HZTA0","P",59,"CRD")
20,17,N,8,2
^SCR("P1HZTA0","P",59,"HELP")

^SCR("P1HZTA0","P",59,"LMAX")
8
^SCR("P1HZTA0","P",59,"MUMPS1")

^SCR("P1HZTA0","P",59,"MUMPS2")

^SCR("P1HZTA0","P",59,"OUTPUT")

^SCR("P1HZTA0","P",59,"TYP")
N
^SCR("P1HZTA0","P",60,"CRD")
20,3,N,7,2
^SCR("P1HZTA0","P",60,"HELP")

^SCR("P1HZTA0","P",60,"LMAX")
7
^SCR("P1HZTA0","P",60,"MUMPS1")

^SCR("P1HZTA0","P",60,"MUMPS2")

^SCR("P1HZTA0","P",60,"OUTPUT")

^SCR("P1HZTA0","P",60,"TYP")
N
^SCR("P1HZTA0","P",72,"CRD")
21,59,E,7,0
^SCR("P1HZTA0","P",72,"HELP")

^SCR("P1HZTA0","P",72,"LMAX")
7
^SCR("P1HZTA0","P",72,"MUMPS1")

^SCR("P1HZTA0","P",72,"MUMPS2")

^SCR("P1HZTA0","P",72,"OUTPUT")

^SCR("P1HZTA0","P",72,"TYP")
E
^SCR("P1HZTA0","P",73,"CRD")
21,44,E,7,0
^SCR("P1HZTA0","P",73,"HELP")

^SCR("P1HZTA0","P",73,"LMAX")
7
^SCR("P1HZTA0","P",73,"MUMPS1")

^SCR("P1HZTA0","P",73,"MUMPS2")

^SCR("P1HZTA0","P",73,"OUTPUT")

^SCR("P1HZTA0","P",73,"TYP")
E
^SCR("P1HZTA0","P",74,"CRD")
21,23,E,7,0
^SCR("P1HZTA0","P",74,"HELP")

^SCR("P1HZTA0","P",74,"LMAX")
7
^SCR("P1HZTA0","P",74,"MUMPS1")

^SCR("P1HZTA0","P",74,"MUMPS2")

^SCR("P1HZTA0","P",74,"OUTPUT")

^SCR("P1HZTA0","P",74,"TYP")
E
^SCR("P1HZTA0","P",80,"CRD")
22,74,H,35
^SCR("P1HZTA0","P",80,"HELP")

^SCR("P1HZTA0","P",80,"LMAX")
35
^SCR("P1HZTA0","P",80,"MUMPS1")

^SCR("P1HZTA0","P",80,"MUMPS2")

^SCR("P1HZTA0","P",80,"TYP")
H
^SCR("P1HZTA0","P","NAME","ASR","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",5)
^SCR("P1HZTA0","P","NAME","ASR","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",5)
^SCR("P1HZTA0","P","NAME","BAIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",15)
^SCR("P1HZTA0","P","NAME","BAIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",15)
^SCR("P1HZTA0","P","NAME","BIT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",28)
^SCR("P1HZTA0","P","NAME","BIT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",28)
^SCR("P1HZTA0","P","NAME","CA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",4)
^SCR("P1HZTA0","P","NAME","CA","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",4)
^SCR("P1HZTA0","P","NAME","CHK","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",3)
^SCR("P1HZTA0","P","NAME","CHK","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",3)
^SCR("P1HZTA0","P","NAME","CMNT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",7)
^SCR("P1HZTA0","P","NAME","CMNT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",7)
^SCR("P1HZTA0","P","NAME","CNISA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",16)
^SCR("P1HZTA0","P","NAME","CNISA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",16)
^SCR("P1HZTA0","P","NAME","CODTS","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",21)
^SCR("P1HZTA0","P","NAME","CODTS","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",21)
^SCR("P1HZTA0","P","NAME","DATK")
8
^SCR("P1HZTA0","P","NAME","DATK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",29)
^SCR("P1HZTA0","P","NAME","DATK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",29)
^SCR("P1HZTA0","P","NAME","DHB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",6)
^SCR("P1HZTA0","P","NAME","DHB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",6)
^SCR("P1HZTA0","P","NAME","DHB1","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",7)
^SCR("P1HZTA0","P","NAME","DHB1","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",7)
^SCR("P1HZTA0","P","NAME","DIRA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",14)
^SCR("P1HZTA0","P","NAME","DIRA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",14)
^SCR("P1HZTA0","P","NAME","DMSAH")
45
^SCR("P1HZTA0","P","NAME","DMSAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",23)
^SCR("P1HZTA0","P","NAME","DMSAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",23)
^SCR("P1HZTA0","P","NAME","DMSH")
46
^SCR("P1HZTA0","P","NAME","DMSH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",9)
^SCR("P1HZTA0","P","NAME","DMSH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",9)
^SCR("P1HZTA0","P","NAME","HNH")
41
^SCR("P1HZTA0","P","NAME","HNH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",8)
^SCR("P1HZTA0","P","NAME","HNH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",8)
^SCR("P1HZTA0","P","NAME","HNH2","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",19)
^SCR("P1HZTA0","P","NAME","HNH2","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",19)
^SCR("P1HZTA0","P","NAME","HNHAH")
40
^SCR("P1HZTA0","P","NAME","HNHAH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",22)
^SCR("P1HZTA0","P","NAME","HNHAH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",22)
^SCR("P1HZTA0","P","NAME","HNHTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",13)
^SCR("P1HZTA0","P","NAME","HNHTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",13)
^SCR("P1HZTA0","P","NAME","HODAA")
32
^SCR("P1HZTA0","P","NAME","HODAA","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",2)
^SCR("P1HZTA0","P","NAME","HODAA","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",2)
^SCR("P1HZTA0","P","NAME","HRA2")
80
^SCR("P1HZTA0","P","NAME","HRA2","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",1)
^SCR("P1HZTA0","P","NAME","HRA2","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",1)
^SCR("P1HZTA0","P","NAME","HSB")
73
^SCR("P1HZTA0","P","NAME","HSB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",20)
^SCR("P1HZTA0","P","NAME","HSB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",20)
^SCR("P1HZTA0","P","NAME","HSB2")
74
^SCR("P1HZTA0","P","NAME","HZM")
12
^SCR("P1HZTA0","P","NAME","HZM","KEY")

^SCR("P1HZTA0","P","NAME","HZM","KEY",1)
HZM/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL,HNH2,HSB,CODTS,HNHAH,DMSAH,SOAD,SHAAT,LASTU,LKHN,BIT,DATK,HZMLAK
^SCR("P1HZTA0","P","NAME","HZM","KEY",2)
HZM/\PSL,ZMANS,,,TM
^SCR("P1HZTA0","P","NAME","HZM","KEY",3)
HZM/\NCAB,MZM,CHK,CA,ASR,DHB,DHB1,ODEF,TL,TIP,ODEFTL,TLN,HNHTL
^SCR("P1HZTA0","P","NAME","HZM","KEY",4)
HZM/\HRA2,,HODAA,,MSD
^SCR("P1HZTA0","P","NAME","HZMLAK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",30)
^SCR("P1HZTA0","P","NAME","HZMLAK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",30)
^SCR("P1HZTA0","P","NAME","ITRA")
59
^SCR("P1HZTA0","P","NAME","KOMA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",13)
^SCR("P1HZTA0","P","NAME","KOMA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",13)
^SCR("P1HZTA0","P","NAME","KTV","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",3)
^SCR("P1HZTA0","P","NAME","KTV","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",3)
^SCR("P1HZTA0","P","NAME","LASTU","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",26)
^SCR("P1HZTA0","P","NAME","LASTU","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",26)
^SCR("P1HZTA0","P","NAME","LKHN")
35
^SCR("P1HZTA0","P","NAME","LKHN","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",27)
^SCR("P1HZTA0","P","NAME","LKHN","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",27)
^SCR("P1HZTA0","P","NAME","LKHN1")
36
^SCR("P1HZTA0","P","NAME","MAM","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",10)
^SCR("P1HZTA0","P","NAME","MAM","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",10)
^SCR("P1HZTA0","P","NAME","MKBL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",18)
^SCR("P1HZTA0","P","NAME","MKBL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",18)
^SCR("P1HZTA0","P","NAME","MLZR0")
1
^SCR("P1HZTA0","P","NAME","MLZR1")
3
^SCR("P1HZTA0","P","NAME","MSD","REF")
$P($G(^THZ(%L3MYDVN,HZM,"HR2")),"\\",3)
^SCR("P1HZTA0","P","NAME","MSD","REF1")
$P(^THZ(%L3MYDVN,HZM,"HR2"),"\\",3)
^SCR("P1HZTA0","P","NAME","MZM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",2)
^SCR("P1HZTA0","P","NAME","MZM","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",2)
^SCR("P1HZTA0","P","NAME","NAME","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",2)
^SCR("P1HZTA0","P","NAME","NAME","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",2)
^SCR("P1HZTA0","P","NAME","NCAB")
72
^SCR("P1HZTA0","P","NAME","NCAB","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",1)
^SCR("P1HZTA0","P","NAME","NCAB","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",1)
^SCR("P1HZTA0","P","NAME","NMB")
5
^SCR("P1HZTA0","P","NAME","NMB","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",1)
^SCR("P1HZTA0","P","NAME","NMB","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",1)
^SCR("P1HZTA0","P","NAME","ODEF")
60
^SCR("P1HZTA0","P","NAME","ODEF","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",8)
^SCR("P1HZTA0","P","NAME","ODEF","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",8)
^SCR("P1HZTA0","P","NAME","ODEFTL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",11)
^SCR("P1HZTA0","P","NAME","ODEFTL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",11)
^SCR("P1HZTA0","P","NAME","PSL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",1)
^SCR("P1HZTA0","P","NAME","PSL","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",1)
^SCR("P1HZTA0","P","NAME","SHAA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",6)
^SCR("P1HZTA0","P","NAME","SHAA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",6)
^SCR("P1HZTA0","P","NAME","SHAAT","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",25)
^SCR("P1HZTA0","P","NAME","SHAAT","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",25)
^SCR("P1HZTA0","P","NAME","SHUL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",12)
^SCR("P1HZTA0","P","NAME","SHUL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",12)
^SCR("P1HZTA0","P","NAME","SHUL1")
57
^SCR("P1HZTA0","P","NAME","SHULA")
58
^SCR("P1HZTA0","P","NAME","SHULA","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",17)
^SCR("P1HZTA0","P","NAME","SHULA","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",17)
^SCR("P1HZTA0","P","NAME","SOAD","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",24)
^SCR("P1HZTA0","P","NAME","SOAD","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",24)
^SCR("P1HZTA0","P","NAME","TIP","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",10)
^SCR("P1HZTA0","P","NAME","TIP","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",10)
^SCR("P1HZTA0","P","NAME","TL","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",9)
^SCR("P1HZTA0","P","NAME","TL","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",9)
^SCR("P1HZTA0","P","NAME","TLN","REF")
$P($G(^THZ(%L3MYDVN,HZM,"CB")),"\",12)
^SCR("P1HZTA0","P","NAME","TLN","REF1")
$P(^THZ(%L3MYDVN,HZM,"CB"),"\",12)
^SCR("P1HZTA0","P","NAME","TM","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",5)
^SCR("P1HZTA0","P","NAME","TM","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",5)
^SCR("P1HZTA0","P","NAME","TRH","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",5)
^SCR("P1HZTA0","P","NAME","TRH","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",5)
^SCR("P1HZTA0","P","NAME","TSHL")
56
^SCR("P1HZTA0","P","NAME","TSHL","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",11)
^SCR("P1HZTA0","P","NAME","TSHL","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",11)
^SCR("P1HZTA0","P","NAME","ZMANK")
31
^SCR("P1HZTA0","P","NAME","ZMANK","REF")
$P($G(^THZ(%L3MYDVN,HZM)),"\",4)
^SCR("P1HZTA0","P","NAME","ZMANK","REF1")
$P(^THZ(%L3MYDVN,HZM),"\",4)
^SCR("P1HZTA0","P","NAME","ZMANS","REF")
$P($G(^THZ(%L3MYDVN,HZM,"TM")),"\",2)
^SCR("P1HZTA0","P","NAME","ZMANS","REF1")
$P(^THZ(%L3MYDVN,HZM,"TM"),"\",2)
^SCR("P1HZTA0","P","NM",1)
MLZR0
^SCR("P1HZTA0","P","NM",3)
MLZR1
^SCR("P1HZTA0","P","NM",5)
NMB
^SCR("P1HZTA0","P","NM",8)
DATK
^SCR("P1HZTA0","P","NM",12)
HZM
^SCR("P1HZTA0","P","NM",31)
ZMANK
^SCR("P1HZTA0","P","NM",32)
HODAA
^SCR("P1HZTA0","P","NM",35)
LKHN
^SCR("P1HZTA0","P","NM",36)
LKHN1
^SCR("P1HZTA0","P","NM",40)
HNHAH
^SCR("P1HZTA0","P","NM",41)
HNH
^SCR("P1HZTA0","P","NM",45)
DMSAH
^SCR("P1HZTA0","P","NM",46)
DMSH
^SCR("P1HZTA0","P","NM",56)
TSHL
^SCR("P1HZTA0","P","NM",57)
SHUL1
^SCR("P1HZTA0","P","NM",58)
SHULA
^SCR("P1HZTA0","P","NM",59)
ITRA
^SCR("P1HZTA0","P","NM",60)
ODEF
^SCR("P1HZTA0","P","NM",72)
NCAB
^SCR("P1HZTA0","P","NM",73)
HSB
^SCR("P1HZTA0","P","NM",74)
HSB2
^SCR("P1HZTA0","P","NM",80)
HRA2
^SCR("P1HZTA0","P","REF",1)
^THZ(%L3MYDVN,HZM)
^SCR("P1HZTA0","P","REF",1,"RZD")
\
^SCR("P1HZTA0","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL\HNH2\HSB\CODTS\HNHAH\DMSAH\SOAD\SHAAT\LASTU\LKHN\BIT\DATK\HZMLAK
^SCR("P1HZTA0","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZTA0","P","REF",2,"RZD")
\
^SCR("P1HZTA0","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZTA0","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZTA0","P","REF",3,"RZD")
\
^SCR("P1HZTA0","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP\ODEFTL\TLN\HNHTL
^SCR("P1HZTA0","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZTA0","P","REF",4,"RZD")
\\
^SCR("P1HZTA0","P","REF",4,"STR")
HRA2\\HODAA\\MSD
^SCR("P1HZTF")
H
^SCR("P1HZTF",1)
                                                                             1$
^SCR("P1HZTF",2)
 :        dxrd      :  mekq :zetqez:zenk: xign:     hixt xe`z    :beq: cew:    
^SCR("P1HZTF",3)
                                                                               
^SCR("P1HZTF",4)
                                                                               
^SCR("P1HZTF",5)
                                                                               
^SCR("P1HZTF",6)
 $1                                                                            
^SCR("P1HZTF","A",1)

^SCR("P1HZTF","A",2)
„˜’„�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€š‚…‘ƒ…—
^SCR("P1HZTF","A",3)
---------------------------------------------------------------------
^SCR("P1HZTF","A",4)

^SCR("P1HZTF","A",5)

^SCR("P1HZTF","A",6)

^SCR("P1HZTF","AV",1)

^SCR("P1HZTF","AV",2)
vrgvoufx,upxu,,unfrhjnyhrprut,duxsue
^SCR("P1HZTF","AV",3)
---------------------------------------------------------------------
^SCR("P1HZTF","AV",4)

^SCR("P1HZTF","AV",5)

^SCR("P1HZTF","AV",6)

^SCR("P1HZTF","G",1,"CHECK")
Y
^SCR("P1HZTF","G",1,"CRD")
3,74,E,4,0
^SCR("P1HZTF","G",1,"FNC")
F9,F10,F8,PGRG
^SCR("P1HZTF","G",1,"GLOB")
PAR
^SCR("P1HZTF","G",1,"HELP")
<CTR+V>-dpnfd,<F10>-zetqez zbvd;<F9>-zetqez,<F8>-zeveaw,<F7>-dlah;<F6>-my
^SCR("P1HZTF","G",1,"LMAX")
4
^SCR("P1HZTF","G",1,"MUMPS1")
B 1 B:$G(%MODIF) 0
^SCR("P1HZTF","G",1,"MUMPS2")
D PAR^P1HZMS
^SCR("P1HZTF","G",1,"MUST")

^SCR("P1HZTF","G",1,"NLN")
20
^SCR("P1HZTF","G",1,"RZD")
**
^SCR("P1HZTF","G",1,"SHEM")
 cew
^SCR("P1HZTF","G",1,"TOPB")
8
^SCR("P1HZTF","G",1,"TYP")
E
^SCR("P1HZTF","G",1,"VRB")
PAR1
^SCR("P1HZTF","G",2,"CRD")
3,69,E,3,0
^SCR("P1HZTF","G",2,"HELP")
<F7> - dbvd 
^SCR("P1HZTF","G",2,"LMAX")
3
^SCR("P1HZTF","G",2,"MUMPS1")

^SCR("P1HZTF","G",2,"MUMPS2")
D SUG^P1HZMS
^SCR("P1HZTF","G",2,"OUTPUT")

^SCR("P1HZTF","G",2,"SHEM")
beq
^SCR("P1HZTF","G",2,"TYP")
E
^SCR("P1HZTF","G",3,"CRD")
3,65,H,18,0
^SCR("P1HZTF","G",3,"HELP")

^SCR("P1HZTF","G",3,"LMAX")
18
^SCR("P1HZTF","G",3,"MUMPS1")

^SCR("P1HZTF","G",3,"MUMPS2")

^SCR("P1HZTF","G",3,"OUTPUT")

^SCR("P1HZTF","G",3,"SHEM")
     hixt xe`z    
^SCR("P1HZTF","G",3,"TYP")
H
^SCR("P1HZTF","G",4,"CRD")
3,46,N,5,2
^SCR("P1HZTF","G",4,"HELP")

^SCR("P1HZTF","G",4,"LMAX")
5
^SCR("P1HZTF","G",4,"MUMPS1")

^SCR("P1HZTF","G",4,"MUMPS2")

^SCR("P1HZTF","G",4,"OUTPUT")

^SCR("P1HZTF","G",4,"SHEM")
 xign
^SCR("P1HZTF","G",4,"TYP")
N
^SCR("P1HZTF","G",5,"CRD")
3,40,N,4,0
^SCR("P1HZTF","G",5,"HELP")

^SCR("P1HZTF","G",5,"LMAX")
4
^SCR("P1HZTF","G",5,"MUMPS1")
S:'$G(KAM) KAM=1 U $P:(NOCENABLE)
^SCR("P1HZTF","G",5,"MUMPS2")
D KAM^P1HZMS
^SCR("P1HZTF","G",5,"MUST")

^SCR("P1HZTF","G",5,"SHEM")
zenk
^SCR("P1HZTF","G",5,"TYP")
N
^SCR("P1HZTF","G",6,"CRD")
3,35,N,6,2
^SCR("P1HZTF","G",6,"HELP")

^SCR("P1HZTF","G",6,"LMAX")
6
^SCR("P1HZTF","G",6,"MUMPS1")

^SCR("P1HZTF","G",6,"MUMPS2")

^SCR("P1HZTF","G",6,"OUTPUT")

^SCR("P1HZTF","G",6,"SHEM")
zetqez
^SCR("P1HZTF","G",6,"TYP")
N
^SCR("P1HZTF","G",7,"CRD")
3,28,N,7,2
^SCR("P1HZTF","G",7,"HELP")

^SCR("P1HZTF","G",7,"LMAX")
7
^SCR("P1HZTF","G",7,"MUMPS1")

^SCR("P1HZTF","G",7,"MUMPS2")

^SCR("P1HZTF","G",7,"OUTPUT")

^SCR("P1HZTF","G",7,"SHEM")
  mekq 
^SCR("P1HZTF","G",7,"TYP")
N
^SCR("P1HZTF","G",8,"CRD")
3,20,H,18,0
^SCR("P1HZTF","G",8,"HELP")
<F10> - zetqez zbvd ,<F9>- zetqez ztqed ,<F7>- zexrd zbvd ,<F6>- dxrd yetig
^SCR("P1HZTF","G",8,"LMAX")
18
^SCR("P1HZTF","G",8,"MUMPS1")
B 1 B:$G(%MODIF) 0 S $P(%MBG("OU"),"\",5)=""
^SCR("P1HZTF","G",8,"MUMPS2")
D TSF^P1HZMS
^SCR("P1HZTF","G",8,"SHEM")
        dxrd      
^SCR("P1HZTF","G",8,"TYP")
H
^SCR("P1HZTF","G","DEL")
Y
^SCR("P1HZTF","G","MAX")
9999
^SCR("P1HZTF","G","NAME","HRP")
8
^SCR("P1HZTF","G","NAME","KAM")
5
^SCR("P1HZTF","G","NAME","MH")
4
^SCR("P1HZTF","G","NAME","PAR")
1
^SCR("P1HZTF","G","NAME","PAR1")
3
^SCR("P1HZTF","G","NAME","SUG")
2
^SCR("P1HZTF","G","NAME","SUM")
7
^SCR("P1HZTF","G","NAME","TSF")
6
^SCR("P1HZTF","G","NM",1)
PAR
^SCR("P1HZTF","G","NM",2)
SUG
^SCR("P1HZTF","G","NM",3)
PAR1
^SCR("P1HZTF","G","NM",4)
MH
^SCR("P1HZTF","G","NM",5)
KAM
^SCR("P1HZTF","G","NM",6)
TSF
^SCR("P1HZTF","G","NM",7)
SUM
^SCR("P1HZTF","G","NM",8)
HRP
^SCR("P1HZTF","G","RB")
2,2,7,79
^SCR("P1HZTF","G","REF")
^THZ1(%L3MYDVN
^SCR("P1HZTF","G","RZD")
\
^SCR("P1HZTF","G","STEP")
1
^SCR("P1HZTF","G","STG")
 :        dxrd      :  mekq :zetqez:zenk: xign:     hixt xe`z    :beq: cew:    
^SCR("P1HZTF","G","VG")
4
^SCR("P1HZTF","NAME")

^SCR("P1HZTF","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1HZTF","P","REF",2,"RZD")
\
^SCR("P1HZTF","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1HZTF","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1HZTF","P","REF",3,"RZD")
\
^SCR("P1HZTF","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP
^SCR("P1HZTF","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1HZTF","P","REF",4,"RZD")
\\
^SCR("P1HZTF","P","REF",4,"STR")
HRA2\\HODAA
^SCR("P1IR")
H
^SCR("P1IR",1)
                                      #mixr zlah#                              
^SCR("P1IR",2)
                                                                               
^SCR("P1IR",3)
                                                                             1$
^SCR("P1IR",4)
                : IP zaezk : lhan mekq : dlaed onf :    xir my    :xir 'qn :   
^SCR("P1IR",5)
                :          : gelyn inc :                                       
^SCR("P1IR",6)
                                                                               
^SCR("P1IR",7)
                                                                               
^SCR("P1IR",8)
                                                                               
^SCR("P1IR",9)
                                                                               
^SCR("P1IR",10)
                                                                               
^SCR("P1IR",11)
                                                                               
^SCR("P1IR",12)
                                                                               
^SCR("P1IR",13)
                                                                               
^SCR("P1IR",14)
                                                                               
^SCR("P1IR",15)
                                                                               
^SCR("P1IR",16)
                                                                               
^SCR("P1IR",17)
                                                                               
^SCR("P1IR",18)
                                                                               
^SCR("P1IR",19)
                                                                               
^SCR("P1IR",20)
                                                                               
^SCR("P1IR",21)
                                                                               
^SCR("P1IR",22)
             $1                                                                
^SCR("P1IR","A",1)
�‰˜’šŒ�ˆ
^SCR("P1IR","A",2)

^SCR("P1IR","A",3)

^SCR("P1IR","A",4)
IPš�…š‹Œˆ�Ž�…‹‘„Œ�…„�Ž†˜‰’�™˜‰’'‘Ž
^SCR("P1IR","A",5)
‡…Œ™Ž‰Žƒ
^SCR("P1IR","A",6)
---------------------------------------------------------
^SCR("P1IR","A",7)

^SCR("P1IR","A",8)

^SCR("P1IR","A",9)

^SCR("P1IR","A",10)

^SCR("P1IR","A",11)

^SCR("P1IR","A",12)

^SCR("P1IR","A",13)

^SCR("P1IR","A",14)

^SCR("P1IR","A",15)

^SCR("P1IR","A",16)

^SCR("P1IR","A",17)

^SCR("P1IR","A",18)

^SCR("P1IR","A",19)

^SCR("P1IR","A",20)

^SCR("P1IR","A",21)

^SCR("P1IR","A",22)

^SCR("P1IR","AV",1)
ohrg,kcy
^SCR("P1IR","AV",2)

^SCR("P1IR","AV",3)

^SCR("P1IR","AV",4)
IP,cu,fkycnoufxvkcuvinzrhgoarhgwxn
^SCR("P1IR","AV",5)
jukanhns
^SCR("P1IR","AV",6)
---------------------------------------------------------
^SCR("P1IR","AV",7)

^SCR("P1IR","AV",8)

^SCR("P1IR","AV",9)

^SCR("P1IR","AV",10)

^SCR("P1IR","AV",11)

^SCR("P1IR","AV",12)

^SCR("P1IR","AV",13)

^SCR("P1IR","AV",14)

^SCR("P1IR","AV",15)

^SCR("P1IR","AV",16)

^SCR("P1IR","AV",17)

^SCR("P1IR","AV",18)

^SCR("P1IR","AV",19)

^SCR("P1IR","AV",20)

^SCR("P1IR","AV",21)

^SCR("P1IR","AV",22)

^SCR("P1IR","G",1,"CRD")
5,75,N,3,0
^SCR("P1IR","G",1,"HELP")

^SCR("P1IR","G",1,"LMAX")
8
^SCR("P1IR","G",1,"MUMPS1")

^SCR("P1IR","G",1,"MUMPS2")

^SCR("P1IR","G",1,"SHEM")
xir 'qn 
^SCR("P1IR","G",1,"TYP")
N
^SCR("P1IR","G",2,"CRD")
5,66,H,14,0
^SCR("P1IR","G",2,"HELP")

^SCR("P1IR","G",2,"LMAX")
14
^SCR("P1IR","G",2,"MUMPS1")

^SCR("P1IR","G",2,"MUMPS2")

^SCR("P1IR","G",2,"SHEM")
    xir my    
^SCR("P1IR","G",2,"TYP")
H
^SCR("P1IR","G",3,"CRD")
5,51,T,5,0
^SCR("P1IR","G",3,"HELP")

^SCR("P1IR","G",3,"LMAX")
11
^SCR("P1IR","G",3,"MUMPS1")

^SCR("P1IR","G",3,"MUMPS2")

^SCR("P1IR","G",3,"SHEM")
 dlaed onf 
^SCR("P1IR","G",3,"TYP")
T
^SCR("P1IR","G",4,"CRD")
5,39,N,8,2
^SCR("P1IR","G",4,"HELP")

^SCR("P1IR","G",4,"LMAX")
11
^SCR("P1IR","G",4,"MUMPS1")

^SCR("P1IR","G",4,"MUMPS2")

^SCR("P1IR","G",4,"SHEM")
 lhan mekq 
^SCR("P1IR","G",4,"TYP")
N
^SCR("P1IR","G",5,"CRD")
5,27,E,10,0
^SCR("P1IR","G",5,"HELP")

^SCR("P1IR","G",5,"LMAX")
10
^SCR("P1IR","G",5,"MUMPS1")

^SCR("P1IR","G",5,"MUMPS2")

^SCR("P1IR","G",5,"SHEM")
 IP zaezk 
^SCR("P1IR","G",5,"TYP")
E
^SCR("P1IR","G","DEL")
Y
^SCR("P1IR","G","MAX")
999
^SCR("P1IR","G","NAME","IP")
5
^SCR("P1IR","G","NAME","MSPIR")
1
^SCR("P1IR","G","NAME","SHEMIR")
2
^SCR("P1IR","G","NAME","SHUMIR")
4
^SCR("P1IR","G","NAME","ZMANIR")
3
^SCR("P1IR","G","NM",1)
MSPIR
^SCR("P1IR","G","NM",2)
SHEMIR
^SCR("P1IR","G","NM",3)
ZMANIR
^SCR("P1IR","G","NM",4)
SHUMIR
^SCR("P1IR","G","NM",5)
IP
^SCR("P1IR","G","RB")
4,14,23,79
^SCR("P1IR","G","REF")
^TEMP($P
^SCR("P1IR","G","RZD")
\
^SCR("P1IR","G","STEP")
1
^SCR("P1IR","G","STG")
                : IP zaezk : lhan mekq : dlaed onf :    xir my    :xir 'qn :   
^SCR("P1IR","G","VG")
7
^SCR("P1IR","NAME")
mixr zlah
^SCR("P1JRN")
H
^SCR("P1JRN",1)
                             # mei jez elvlivy zegewl zniyx #                  
^SCR("P1JRN",2)
                                                                               
^SCR("P1JRN",3)
                                                            {01      }:jix`z   
^SCR("P1JRN",4)
                                                                               
^SCR("P1JRN",5)
 {                      10}: my {05        }:(oetlh) gewl 'qn {03  }:ixeciq 'qn
^SCR("P1JRN",6)
 { 19} dqipk {18 }:dxic {17 }:dnew {16  }'qn {                        15}:zaezk
^SCR("P1JRN",7)
                                   {                                  20}: dxrd
^SCR("P1JRN",8)
        {34      }:dryl {32      }:jix`zl {31               }:dpnfd zlaw onf   
^SCR("P1JRN",9)
                                                                               
^SCR("P1JRN","A",1)
�…‰Š…š…Œ–Œ‰–™š…‡…—ŒšŽ‰™˜
^SCR("P1JRN","A",2)

^SCR("P1JRN","A",3)
:Š‰˜€š
^SCR("P1JRN","A",4)

^SCR("P1JRN","A",5)
:�™:(�…”Œˆ)‡…—Œ'‘Ž:‰˜…ƒ‰‘'‘Ž
^SCR("P1JRN","A",6)
„‘‰�‹:„˜‰ƒ:„Ž…—'‘Ž:š�…š‹
^SCR("P1JRN","A",7)
:„˜’„
^SCR("P1JRN","A",8)
:„’™Œ:Š‰˜€šŒ:„�Ž†„šŒ�—�Ž†
^SCR("P1JRN","A",9)

^SCR("P1JRN","AV",1)
ouhlu,ukmkhma,ujuek,nhar
^SCR("P1JRN","AV",2)

^SCR("P1JRN","AV",3)
:lhrt,
^SCR("P1JRN","AV",4)

^SCR("P1JRN","AV",5)
:oa:(iupky)juekwxn:hrushxwxn
^SCR("P1JRN","AV",6)
vxhbf:vrhs:vnuewxn:,cu,f
^SCR("P1JRN","AV",7)
:vrgv
^SCR("P1JRN","AV",8)
:vgak:lhrt,k:vbnzv,kceinz
^SCR("P1JRN","AV",9)

^SCR("P1JRN","NAME")

^SCR("P1JRN","P",1,"CRD")
3,60,D,8,0
^SCR("P1JRN","P",1,"HELP")

^SCR("P1JRN","P",1,"LMAX")
9
^SCR("P1JRN","P",1,"MUMPS1")
S DATJ=$$^%L1DC(P1DZ,1)
^SCR("P1JRN","P",1,"MUMPS2")
S D=$$^%L1DC(DATJ,3)
^SCR("P1JRN","P",1,"MUST")

^SCR("P1JRN","P",1,"TYP")
D
^SCR("P1JRN","P",3,"CRD")
5,62,N,5,0
^SCR("P1JRN","P",3,"HELP")
<PGDN> - `ad gewl mihxt , <PGUP> - mcewd gewl mihxt 
^SCR("P1JRN","P",3,"LMAX")
5
^SCR("P1JRN","P",3,"MUMPS1")
I '$G(NSD) S NSD=$ZP(^P1JRN(D,99999))
^SCR("P1JRN","P",3,"MUMPS2")
D NSD^P1JRN
^SCR("P1JRN","P",3,"MUST")

^SCR("P1JRN","P",3,"TYP")
N
^SCR("P1JRN","P",5,"CRD")
5,32,E,11,0
^SCR("P1JRN","P",5,"HELP")
<F9>-'ayg,'n'z ,dpnfd 'qn itl,<F8>-zaezk itl,<F7>-xtqn itl ,<F6>-my itl yetig
^SCR("P1JRN","P",5,"LMAX")
11
^SCR("P1JRN","P",5,"MUMPS1")

^SCR("P1JRN","P",5,"MUMPS2")
D NMB^P1HZNM
^SCR("P1JRN","P",5,"OUTPUT")

^SCR("P1JRN","P",5,"TYP")
E
^SCR("P1JRN","P",10,"CRD")
5,27,H,20
^SCR("P1JRN","P",10,"HELP")

^SCR("P1JRN","P",10,"LMAX")
25
^SCR("P1JRN","P",10,"MUMPS1")

^SCR("P1JRN","P",10,"MUMPS2")

^SCR("P1JRN","P",10,"MUST")

^SCR("P1JRN","P",10,"OUTPUT")

^SCR("P1JRN","P",10,"TYP")
H
^SCR("P1JRN","P",15,"CRD")
6,73,H,27
^SCR("P1JRN","P",15,"HELP")

^SCR("P1JRN","P",15,"LMAX")
27
^SCR("P1JRN","P",15,"MUMPS1")

^SCR("P1JRN","P",15,"MUMPS2")
D KTV^P1HZ
^SCR("P1JRN","P",15,"MUST")

^SCR("P1JRN","P",15,"OUTPUT")

^SCR("P1JRN","P",15,"TYP")
H
^SCR("P1JRN","P",16,"CRD")
6,35,E,4,0
^SCR("P1JRN","P",16,"HELP")

^SCR("P1JRN","P",16,"LMAX")
5
^SCR("P1JRN","P",16,"MUMPS1")

^SCR("P1JRN","P",16,"MUMPS2")

^SCR("P1JRN","P",16,"OUTPUT")

^SCR("P1JRN","P",16,"TYP")
E
^SCR("P1JRN","P",17,"CRD")
6,24,E,3,0
^SCR("P1JRN","P",17,"HELP")

^SCR("P1JRN","P",17,"LMAX")
4
^SCR("P1JRN","P",17,"MUMPS1")

^SCR("P1JRN","P",17,"MUMPS2")

^SCR("P1JRN","P",17,"OUTPUT")

^SCR("P1JRN","P",17,"TYP")
E
^SCR("P1JRN","P",18,"CRD")
6,13,E,4,0
^SCR("P1JRN","P",18,"HELP")

^SCR("P1JRN","P",18,"LMAX")
4
^SCR("P1JRN","P",18,"MUMPS1")

^SCR("P1JRN","P",18,"MUMPS2")

^SCR("P1JRN","P",18,"OUTPUT")

^SCR("P1JRN","P",18,"TYP")
E
^SCR("P1JRN","P",19,"CRD")
6,6,H,3
^SCR("P1JRN","P",19,"HELP")

^SCR("P1JRN","P",19,"LMAX")
4
^SCR("P1JRN","P",19,"MUMPS1")

^SCR("P1JRN","P",19,"MUMPS2")

^SCR("P1JRN","P",19,"OUTPUT")

^SCR("P1JRN","P",19,"TYP")
H
^SCR("P1JRN","P",20,"CRD")
7,73,H,37
^SCR("P1JRN","P",20,"HELP")

^SCR("P1JRN","P",20,"LMAX")
37
^SCR("P1JRN","P",20,"MUMPS1")

^SCR("P1JRN","P",20,"MUMPS2")

^SCR("P1JRN","P",20,"OUTPUT")

^SCR("P1JRN","P",20,"TYP")
H
^SCR("P1JRN","P",31,"CRD")
8,42,E,18,0
^SCR("P1JRN","P",31,"HELP")

^SCR("P1JRN","P",31,"LMAX")
18
^SCR("P1JRN","P",31,"MUMPS1")
I $G(ZMANK)?.P D INT^%T S ZMANK=$$^%L1DC($H,1)_"  "_%TIM
^SCR("P1JRN","P",31,"MUMPS2")

^SCR("P1JRN","P",31,"OUTPUT")

^SCR("P1JRN","P",31,"TYP")
E
^SCR("P1JRN","P",32,"CRD")
8,24,D,8,0
^SCR("P1JRN","P",32,"HELP")

^SCR("P1JRN","P",32,"LMAX")
9
^SCR("P1JRN","P",32,"MUMPS1")
S:$G(TRH)?.P TRH=$$^%L1DC($H,1) S %SCN="IR,MIKUD"
^SCR("P1JRN","P",32,"MUMPS2")

^SCR("P1JRN","P",32,"OUTPUT")

^SCR("P1JRN","P",32,"TYP")
D
^SCR("P1JRN","P",34,"CRD")
8,8,T,8,0
^SCR("P1JRN","P",34,"HELP")

^SCR("P1JRN","P",34,"LMAX")
9
^SCR("P1JRN","P",34,"MUMPS1")
D SHAA^P1HZ
^SCR("P1JRN","P",34,"MUMPS2")

^SCR("P1JRN","P",34,"OUTPUT")

^SCR("P1JRN","P",34,"TYP")
T
^SCR("P1JRN","P","NAME","BAIT")
16
^SCR("P1JRN","P","NAME","BAIT","REF")
$P($G(^TEMP($P,NSD)),"\",15)
^SCR("P1JRN","P","NAME","BAIT","REF1")
$P(^TEMP($P,NSD),"\",15)
^SCR("P1JRN","P","NAME","CMNT")
20
^SCR("P1JRN","P","NAME","CMNT","REF")
$P($G(^TEMP($P,NSD)),"\",7)
^SCR("P1JRN","P","NAME","CMNT","REF1")
$P(^TEMP($P,NSD),"\",7)
^SCR("P1JRN","P","NAME","CNISA")
19
^SCR("P1JRN","P","NAME","CNISA","REF")
$P($G(^TEMP($P,NSD)),"\",16)
^SCR("P1JRN","P","NAME","CNISA","REF1")
$P(^TEMP($P,NSD),"\",16)
^SCR("P1JRN","P","NAME","DATJ")
1
^SCR("P1JRN","P","NAME","DIRA")
18
^SCR("P1JRN","P","NAME","DIRA","REF")
$P($G(^TEMP($P,NSD)),"\",14)
^SCR("P1JRN","P","NAME","DIRA","REF1")
$P(^TEMP($P,NSD),"\",14)
^SCR("P1JRN","P","NAME","DMSH","REF")
$P($G(^TEMP($P,NSD)),"\",9)
^SCR("P1JRN","P","NAME","DMSH","REF1")
$P(^TEMP($P,NSD),"\",9)
^SCR("P1JRN","P","NAME","HNH","REF")
$P($G(^TEMP($P,NSD)),"\",8)
^SCR("P1JRN","P","NAME","HNH","REF1")
$P(^TEMP($P,NSD),"\",8)
^SCR("P1JRN","P","NAME","KOMA")
17
^SCR("P1JRN","P","NAME","KOMA","REF")
$P($G(^TEMP($P,NSD)),"\",13)
^SCR("P1JRN","P","NAME","KOMA","REF1")
$P(^TEMP($P,NSD),"\",13)
^SCR("P1JRN","P","NAME","KTV")
15
^SCR("P1JRN","P","NAME","KTV","REF")
$P($G(^TEMP($P,NSD)),"\",3)
^SCR("P1JRN","P","NAME","KTV","REF1")
$P(^TEMP($P,NSD),"\",3)
^SCR("P1JRN","P","NAME","MAM","REF")
$P($G(^TEMP($P,NSD)),"\",10)
^SCR("P1JRN","P","NAME","MAM","REF1")
$P(^TEMP($P,NSD),"\",10)
^SCR("P1JRN","P","NAME","MKBL","REF")
$P($G(^TEMP($P,NSD)),"\",18)
^SCR("P1JRN","P","NAME","MKBL","REF1")
$P(^TEMP($P,NSD),"\",18)
^SCR("P1JRN","P","NAME","NAME")
10
^SCR("P1JRN","P","NAME","NAME","REF")
$P($G(^TEMP($P,NSD)),"\",2)
^SCR("P1JRN","P","NAME","NAME","REF1")
$P(^TEMP($P,NSD),"\",2)
^SCR("P1JRN","P","NAME","NMB")
5
^SCR("P1JRN","P","NAME","NMB","REF")
$P($G(^TEMP($P,NSD)),"\",1)
^SCR("P1JRN","P","NAME","NMB","REF1")
$P(^TEMP($P,NSD),"\",1)
^SCR("P1JRN","P","NAME","NSD")
3
^SCR("P1JRN","P","NAME","NSD","KEY")

^SCR("P1JRN","P","NAME","NSD","KEY",1)
NSD/\NMB,NAME,KTV,ZMANK,TRH,SHAA,CMNT,HNH,DMSH,MAM,TSHL,SHUL,KOMA,DIRA,BAIT,CNISA,SHULA,MKBL
^SCR("P1JRN","P","NAME","SHAA")
34
^SCR("P1JRN","P","NAME","SHAA","REF")
$P($G(^TEMP($P,NSD)),"\",6)
^SCR("P1JRN","P","NAME","SHAA","REF1")
$P(^TEMP($P,NSD),"\",6)
^SCR("P1JRN","P","NAME","SHUL","REF")
$P($G(^TEMP($P,NSD)),"\",12)
^SCR("P1JRN","P","NAME","SHUL","REF1")
$P(^TEMP($P,NSD),"\",12)
^SCR("P1JRN","P","NAME","SHULA","REF")
$P($G(^TEMP($P,NSD)),"\",17)
^SCR("P1JRN","P","NAME","SHULA","REF1")
$P(^TEMP($P,NSD),"\",17)
^SCR("P1JRN","P","NAME","TRH")
32
^SCR("P1JRN","P","NAME","TRH","REF")
$P($G(^TEMP($P,NSD)),"\",5)
^SCR("P1JRN","P","NAME","TRH","REF1")
$P(^TEMP($P,NSD),"\",5)
^SCR("P1JRN","P","NAME","TSHL","REF")
$P($G(^TEMP($P,NSD)),"\",11)
^SCR("P1JRN","P","NAME","TSHL","REF1")
$P(^TEMP($P,NSD),"\",11)
^SCR("P1JRN","P","NAME","ZMANK")
31
^SCR("P1JRN","P","NAME","ZMANK","REF")
$P($G(^TEMP($P,NSD)),"\",4)
^SCR("P1JRN","P","NAME","ZMANK","REF1")
$P(^TEMP($P,NSD),"\",4)
^SCR("P1JRN","P","NM",1)
DATJ
^SCR("P1JRN","P","NM",3)
NSD
^SCR("P1JRN","P","NM",5)
NMB
^SCR("P1JRN","P","NM",10)
NAME
^SCR("P1JRN","P","NM",15)
KTV
^SCR("P1JRN","P","NM",16)
BAIT
^SCR("P1JRN","P","NM",17)
KOMA
^SCR("P1JRN","P","NM",18)
DIRA
^SCR("P1JRN","P","NM",19)
CNISA
^SCR("P1JRN","P","NM",20)
CMNT
^SCR("P1JRN","P","NM",31)
ZMANK
^SCR("P1JRN","P","NM",32)
TRH
^SCR("P1JRN","P","NM",34)
SHAA
^SCR("P1JRN","P","REF",1)
^TEMP($P,NSD)
^SCR("P1JRN","P","REF",1,"RZD")
\
^SCR("P1JRN","P","REF",1,"STR")
NMB\NAME\KTV\ZMANK\TRH\SHAA\CMNT\HNH\DMSH\MAM\TSHL\SHUL\KOMA\DIRA\BAIT\CNISA\SHULA\MKBL
^SCR("P1JRN","P","REF",3)
^TEMP($P,HZM,"CB")
^SCR("P1JRN","P","REF",3,"RZD")
\
^SCR("P1JRN","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1
^SCR("P1JRN","P","REF",4)
^TEMP($P,HZM,"HR2")
^SCR("P1JRN","P","REF",4,"RZD")
\\
^SCR("P1JRN","P","REF",4,"STR")
HRA2
^SCR("P1KEY")
H
^SCR("P1KEY",1)
                                                                               
^SCR("P1KEY",2)
                                                                          1]   
^SCR("P1KEY",3)
                                                                               
^SCR("P1KEY",4)
                                                          { 05}:  ywn cew      
^SCR("P1KEY",5)
                                                                               
^SCR("P1KEY",6)
                        {                            11} {10  }: hixt cew      
^SCR("P1KEY",7)
                                                                               
^SCR("P1KEY",8)
      [1                                                                       
^SCR("P1KEY",9)
                                                                               
^SCR("P1KEY",10)
                                                                               
^SCR("P1KEY",11)
                                                                               
^SCR("P1KEY","A",1)

^SCR("P1KEY","A",2)

^SCR("P1KEY","A",3)

^SCR("P1KEY","A",4)
:™—Žƒ…—
^SCR("P1KEY","A",5)

^SCR("P1KEY","A",6)
:ˆ‰˜”ƒ…—
^SCR("P1KEY","A",7)

^SCR("P1KEY","A",8)

^SCR("P1KEY","A",9)

^SCR("P1KEY","A",10)

^SCR("P1KEY","A",11)

^SCR("P1KEY","AV",1)

^SCR("P1KEY","AV",2)

^SCR("P1KEY","AV",3)

^SCR("P1KEY","AV",4)
:aensue
^SCR("P1KEY","AV",5)

^SCR("P1KEY","AV",6)
:yhrpsue
^SCR("P1KEY","AV",7)

^SCR("P1KEY","AV",8)

^SCR("P1KEY","AV",9)

^SCR("P1KEY","AV",10)

^SCR("P1KEY","AV",11)

^SCR("P1KEY","NAME")
mixidn miywn zlah
^SCR("P1KEY","P",5,"CRD")
4,63,H,1,0
^SCR("P1KEY","P",5,"FNC")

^SCR("P1KEY","P",5,"GLOB")
P1KEY
^SCR("P1KEY","P",5,"HELP")

^SCR("P1KEY","P",5,"LMAX")
4
^SCR("P1KEY","P",5,"MUMPS1")
S %HBRY=""
^SCR("P1KEY","P",5,"MUMPS2")
D MKS^P1KEY
^SCR("P1KEY","P",5,"MUST")

^SCR("P1KEY","P",5,"NLN")
20
^SCR("P1KEY","P",5,"RZD")
\
^SCR("P1KEY","P",5,"TOPB")
8
^SCR("P1KEY","P",5,"TYP")
H
^SCR("P1KEY","P",5,"VRB")
PAR
^SCR("P1KEY","P",10,"CHECK")
Y
^SCR("P1KEY","P",10,"CRD")
6,57,E,5,0
^SCR("P1KEY","P",10,"FNC")

^SCR("P1KEY","P",10,"GLOB")
PAR
^SCR("P1KEY","P",10,"HELP")
<CTRL+E> - lhal ,<F7> - bivdl ,<F6> - ytgl 
^SCR("P1KEY","P",10,"LMAX")
5
^SCR("P1KEY","P",10,"MUMPS1")

^SCR("P1KEY","P",10,"MUMPS2")
D PAR^P1KEY
^SCR("P1KEY","P",10,"MUST")

^SCR("P1KEY","P",10,"NLN")
20
^SCR("P1KEY","P",10,"RZD")
**
^SCR("P1KEY","P",10,"TOPB")
8
^SCR("P1KEY","P",10,"TYP")
E
^SCR("P1KEY","P",10,"VRB")
PAR1
^SCR("P1KEY","P",11,"CRD")
6,56,H,30
^SCR("P1KEY","P",11,"HELP")

^SCR("P1KEY","P",11,"LMAX")
31
^SCR("P1KEY","P",11,"MUMPS1")

^SCR("P1KEY","P",11,"MUMPS2")

^SCR("P1KEY","P",11,"OUTPUT")

^SCR("P1KEY","P",11,"TYP")
H
^SCR("P1KEY","P","NAME","MKS")
5
^SCR("P1KEY","P","NAME","PAR")
10
^SCR("P1KEY","P","NAME","PAR1")
11
^SCR("P1KEY","P","NM",5)
MKS
^SCR("P1KEY","P","NM",10)
PAR
^SCR("P1KEY","P","NM",11)
PAR1
^SCR("P1KEY","P","RB",1)
3,7,9,76
^SCR("P1KUP")
H
^SCR("P1KUP",1)
                           # (zei) mi`tew zniyx #                              
^SCR("P1KUP",2)
                                                              1$               
^SCR("P1KUP",3)
                    :      (z)i`tew my    : (z)i`tew 'qn :                     
^SCR("P1KUP",4)
                                                                               
^SCR("P1KUP",5)
                                                                               
^SCR("P1KUP",6)
                                                                               
^SCR("P1KUP",7)
                                                                               
^SCR("P1KUP",8)
                                                                               
^SCR("P1KUP",9)
                                                                               
^SCR("P1KUP",10)
                                                                               
^SCR("P1KUP",11)
                                                                               
^SCR("P1KUP",12)
                                                                               
^SCR("P1KUP",13)
                                                                               
^SCR("P1KUP",14)
                                                                               
^SCR("P1KUP",15)
                                                                               
^SCR("P1KUP",16)
                                                                               
^SCR("P1KUP",17)
                                                                               
^SCR("P1KUP",18)
                                                                               
^SCR("P1KUP",19)
                $1                                                             
^SCR("P1KUP",20)
                                                                               
^SCR("P1KUP","A",1)
(š…‰)�‰€”…—šŽ‰™˜
^SCR("P1KUP","A",2)

^SCR("P1KUP","A",3)
(š)‰€”…—�™(š)‰€”…—'‘Ž
^SCR("P1KUP","A",4)
-----------------------------------
^SCR("P1KUP","A",5)

^SCR("P1KUP","A",6)

^SCR("P1KUP","A",7)

^SCR("P1KUP","A",8)

^SCR("P1KUP","A",9)

^SCR("P1KUP","A",10)

^SCR("P1KUP","A",11)

^SCR("P1KUP","A",12)

^SCR("P1KUP","A",13)

^SCR("P1KUP","A",14)

^SCR("P1KUP","A",15)

^SCR("P1KUP","A",16)

^SCR("P1KUP","A",17)

^SCR("P1KUP","A",18)

^SCR("P1KUP","A",19)

^SCR("P1KUP","A",20)

^SCR("P1KUP","AV",1)
(,uh)ohtpue,nhar
^SCR("P1KUP","AV",2)

^SCR("P1KUP","AV",3)
(,)htpueoa(,)htpuewxn
^SCR("P1KUP","AV",4)
-----------------------------------
^SCR("P1KUP","AV",5)

^SCR("P1KUP","AV",6)

^SCR("P1KUP","AV",7)

^SCR("P1KUP","AV",8)

^SCR("P1KUP","AV",9)

^SCR("P1KUP","AV",10)

^SCR("P1KUP","AV",11)

^SCR("P1KUP","AV",12)

^SCR("P1KUP","AV",13)

^SCR("P1KUP","AV",14)

^SCR("P1KUP","AV",15)

^SCR("P1KUP","AV",16)

^SCR("P1KUP","AV",17)

^SCR("P1KUP","AV",18)

^SCR("P1KUP","AV",19)

^SCR("P1KUP","AV",20)

^SCR("P1KUP","G",1,"CHECK")
Y
^SCR("P1KUP","G",1,"CRD")
4,57,E,5.,0
^SCR("P1KUP","G",1,"FNC")

^SCR("P1KUP","G",1,"GLOB")
NAME
^SCR("P1KUP","G",1,"HELP")

^SCR("P1KUP","G",1,"LMAX")
14
^SCR("P1KUP","G",1,"MUMPS1")

^SCR("P1KUP","G",1,"MUMPS2")
S KUPAI1=$$^P1NAME(KUPAI)
^SCR("P1KUP","G",1,"MUST")

^SCR("P1KUP","G",1,"NLN")
20
^SCR("P1KUP","G",1,"RZD")
\
^SCR("P1KUP","G",1,"SHEM")
 (z)i`tew 'qn 
^SCR("P1KUP","G",1,"TOPB")
8
^SCR("P1KUP","G",1,"TYP")
E
^SCR("P1KUP","G",1,"VRB")
KUPAI1
^SCR("P1KUP","G",2,"CRD")
4,42,H,17,0
^SCR("P1KUP","G",2,"HELP")

^SCR("P1KUP","G",2,"LMAX")
21
^SCR("P1KUP","G",2,"MUMPS1")

^SCR("P1KUP","G",2,"MUMPS2")

^SCR("P1KUP","G",2,"OUTPUT")

^SCR("P1KUP","G",2,"SHEM")
      (z)i`tew my    
^SCR("P1KUP","G",2,"TYP")
H
^SCR("P1KUP","G","DEL")
Y
^SCR("P1KUP","G","MAX")
9999
^SCR("P1KUP","G","NAME","KUPAI")
1
^SCR("P1KUP","G","NAME","KUPAI1")
2
^SCR("P1KUP","G","NM",1)
KUPAI
^SCR("P1KUP","G","NM",2)
KUPAI1
^SCR("P1KUP","G","RB")
3,17,20,64
^SCR("P1KUP","G","REF")
^TEMP($P
^SCR("P1KUP","G","RZD")
\
^SCR("P1KUP","G","STEP")
1
^SCR("P1KUP","G","STG")
                    :      (z)i`tew my    : (z)i`tew 'qn :                     
^SCR("P1KUP","G","VG")
5
^SCR("P1KUP","NAME")

^SCR("P1KVZSID")
H
^SCR("P1KVZSID",1)
                              # mihixt zeveaw xeciq #                          
^SCR("P1KVZSID",2)
                                                                               
^SCR("P1KVZSID",3)
                                                                      1$       
^SCR("P1KVZSID",4)
                                :  mihixt zveaw xe`z   : dveaw cew :           
^SCR("P1KVZSID",5)
                                                                               
^SCR("P1KVZSID",6)
                                                                               
^SCR("P1KVZSID",7)
                                                                               
^SCR("P1KVZSID",8)
                                                                               
^SCR("P1KVZSID",9)
                                                                               
^SCR("P1KVZSID",10)
                                                                               
^SCR("P1KVZSID",11)
                                                                               
^SCR("P1KVZSID",12)
                                                                               
^SCR("P1KVZSID",13)
                                                                               
^SCR("P1KVZSID",14)
                                                                               
^SCR("P1KVZSID",15)
                                                                               
^SCR("P1KVZSID",16)
                                                                               
^SCR("P1KVZSID",17)
                                                                               
^SCR("P1KVZSID",18)
                                                                               
^SCR("P1KVZSID",19)
                                                                               
^SCR("P1KVZSID",20)
                                                                               
^SCR("P1KVZSID",21)
                          $1                                                   
^SCR("P1KVZSID","A",1)
�‰ˆ‰˜”š…–…�—˜…ƒ‰‘
^SCR("P1KVZSID","A",2)

^SCR("P1KVZSID","A",3)

^SCR("P1KVZSID","A",4)
�‰ˆ‰˜”š–…�—˜…€š„–…�—ƒ…—
^SCR("P1KVZSID","A",5)
---------------------------------
^SCR("P1KVZSID","A",6)

^SCR("P1KVZSID","A",7)

^SCR("P1KVZSID","A",8)

^SCR("P1KVZSID","A",9)

^SCR("P1KVZSID","A",10)

^SCR("P1KVZSID","A",11)

^SCR("P1KVZSID","A",12)

^SCR("P1KVZSID","A",13)

^SCR("P1KVZSID","A",14)

^SCR("P1KVZSID","A",15)

^SCR("P1KVZSID","A",16)

^SCR("P1KVZSID","A",17)

^SCR("P1KVZSID","A",18)

^SCR("P1KVZSID","A",19)

^SCR("P1KVZSID","A",20)

^SCR("P1KVZSID","A",21)

^SCR("P1KVZSID","AV",1)
ohyhrp,umucerushx
^SCR("P1KVZSID","AV",2)

^SCR("P1KVZSID","AV",3)

^SCR("P1KVZSID","AV",4)
ohyhrp,mucerut,vmucesue
^SCR("P1KVZSID","AV",5)
---------------------------------
^SCR("P1KVZSID","AV",6)

^SCR("P1KVZSID","AV",7)

^SCR("P1KVZSID","AV",8)

^SCR("P1KVZSID","AV",9)

^SCR("P1KVZSID","AV",10)

^SCR("P1KVZSID","AV",11)

^SCR("P1KVZSID","AV",12)

^SCR("P1KVZSID","AV",13)

^SCR("P1KVZSID","AV",14)

^SCR("P1KVZSID","AV",15)

^SCR("P1KVZSID","AV",16)

^SCR("P1KVZSID","AV",17)

^SCR("P1KVZSID","AV",18)

^SCR("P1KVZSID","AV",19)

^SCR("P1KVZSID","AV",20)

^SCR("P1KVZSID","AV",21)

^SCR("P1KVZSID","G",1,"CRD")
5,67,E,5,0
^SCR("P1KVZSID","G",1,"HELP")

^SCR("P1KVZSID","G",1,"LMAX")
11
^SCR("P1KVZSID","G",1,"MUMPS1")

^SCR("P1KVZSID","G",1,"MUMPS2")
I KVZ'=%MOLD S %SC("ER")=1
^SCR("P1KVZSID","G",1,"SHEM")
 dveaw cew 
^SCR("P1KVZSID","G",1,"TYP")
E
^SCR("P1KVZSID","G",2,"CRD")
5,55,H,22,0
^SCR("P1KVZSID","G",2,"HELP")

^SCR("P1KVZSID","G",2,"LMAX")
22
^SCR("P1KVZSID","G",2,"MUMPS1")

^SCR("P1KVZSID","G",2,"MUMPS2")

^SCR("P1KVZSID","G",2,"OUTPUT")

^SCR("P1KVZSID","G",2,"SHEM")
  mihixt zveaw xe`z   
^SCR("P1KVZSID","G",2,"TYP")
H
^SCR("P1KVZSID","G","MAX")
9999
^SCR("P1KVZSID","G","NAME","KVZ")
1
^SCR("P1KVZSID","G","NAME","KVZ1")
2
^SCR("P1KVZSID","G","NM",1)
KVZ
^SCR("P1KVZSID","G","NM",2)
KVZ1
^SCR("P1KVZSID","G","RB")
4,27,22,72
^SCR("P1KVZSID","G","REF")
^TEMP($P
^SCR("P1KVZSID","G","RZD")
\
^SCR("P1KVZSID","G","STEP")
1
^SCR("P1KVZSID","G","STG")
                                :  mihixt zveaw xe`z   : dveaw cew :           
^SCR("P1KVZSID","G","VG")
6
^SCR("P1KVZSID","NAME")
mihixt zeveaw xeciq zlah
^SCR("P1LHB")
H
^SCR("P1LHB",1)
                                   # zipeayg hext #                            
^SCR("P1LHB",2)
              {                          10}:gewl my  {05         }:gewl xtqn  
^SCR("P1LHB",3)
              {                                                    15}: zaezk  
^SCR("P1LHB",4)
                               #{20      } zipeayg #                           
^SCR("P1LHB",5)
                                                                             1$
^SCR("P1LHB",6)
 : `zknq`:  mekq  : dryl: jix`zl :       gewl my     :  gewl 'qn :   dpnfd   : 
^SCR("P1LHB",7)
                                                                               
^SCR("P1LHB",8)
                                                                               
^SCR("P1LHB",9)
                                                                               
^SCR("P1LHB",10)
                                                                               
^SCR("P1LHB",11)
                                                                               
^SCR("P1LHB",12)
                                                                               
^SCR("P1LHB",13)
                                                                               
^SCR("P1LHB",14)
                                                                               
^SCR("P1LHB",15)
                                                                               
^SCR("P1LHB",16)
                                                                               
^SCR("P1LHB",17)
                                                                               
^SCR("P1LHB",18)
                                                                               
^SCR("P1LHB",19)
                                                                               
^SCR("P1LHB",20)
 $1                                                                            
^SCR("P1LHB",21)
          {30      }:k"dq            {25      }:zepnfd zenk                    
^SCR("P1LHB",22)
                                                                               
^SCR("P1LHB","A",1)
š‰�…�™‡ˆ…˜”
^SCR("P1LHB","A",2)
:‡…—Œ�™:‡…—Œ˜”‘Ž
^SCR("P1LHB","A",3)
:š�…š‹
^SCR("P1LHB","A",4)
š‰�…�™‡
^SCR("P1LHB","A",5)

^SCR("P1LHB","A",6)
€š‹Ž‘€�…‹‘„’™ŒŠ‰˜€šŒ‡…—Œ�™‡…—Œ'‘Ž„�Ž†„
^SCR("P1LHB","A",7)
----------------------------------------------------------------------
^SCR("P1LHB","A",8)

^SCR("P1LHB","A",9)

^SCR("P1LHB","A",10)

^SCR("P1LHB","A",11)

^SCR("P1LHB","A",12)

^SCR("P1LHB","A",13)

^SCR("P1LHB","A",14)

^SCR("P1LHB","A",15)

^SCR("P1LHB","A",16)

^SCR("P1LHB","A",17)

^SCR("P1LHB","A",18)

^SCR("P1LHB","A",19)

^SCR("P1LHB","A",20)

^SCR("P1LHB","A",21)
:‹"„‘:š…�Ž†„š…Ž‹
^SCR("P1LHB","A",22)

^SCR("P1LHB","AV",1)
,hbucajyurp
^SCR("P1LHB","AV",2)
:juekoa:juekrpxn
^SCR("P1LHB","AV",3)
:,cu,f
^SCR("P1LHB","AV",4)
,hbucaj
^SCR("P1LHB","AV",5)

^SCR("P1LHB","AV",6)
t,fnxtoufxvgaklhrt,kjuekoajuekwxnvbnzv
^SCR("P1LHB","AV",7)
----------------------------------------------------------------------
^SCR("P1LHB","AV",8)

^SCR("P1LHB","AV",9)

^SCR("P1LHB","AV",10)

^SCR("P1LHB","AV",11)

^SCR("P1LHB","AV",12)

^SCR("P1LHB","AV",13)

^SCR("P1LHB","AV",14)

^SCR("P1LHB","AV",15)

^SCR("P1LHB","AV",16)

^SCR("P1LHB","AV",17)

^SCR("P1LHB","AV",18)

^SCR("P1LHB","AV",19)

^SCR("P1LHB","AV",20)

^SCR("P1LHB","AV",21)
:f"vx:,ubnzv,unf
^SCR("P1LHB","AV",22)

^SCR("P1LHB","G",1,"CRD")
7,77,E,11,0
^SCR("P1LHB","G",1,"HELP")
<F9> - dpnfd zbvd 
^SCR("P1LHB","G",1,"LMAX")
11
^SCR("P1LHB","G",1,"MUMPS1")

^SCR("P1LHB","G",1,"MUMPS2")
D HZM^P1LHB
^SCR("P1LHB","G",1,"SHEM")
   dpnfd   
^SCR("P1LHB","G",1,"TYP")
E
^SCR("P1LHB","G",2,"CRD")
7,65,E,11,0
^SCR("P1LHB","G",2,"HELP")

^SCR("P1LHB","G",2,"LMAX")
11
^SCR("P1LHB","G",2,"MUMPS1")

^SCR("P1LHB","G",2,"MUMPS2")

^SCR("P1LHB","G",2,"OUTPUT")

^SCR("P1LHB","G",2,"SHEM")
  gewl 'qn 
^SCR("P1LHB","G",2,"TYP")
E
^SCR("P1LHB","G",3,"CRD")
7,53,H,19,0
^SCR("P1LHB","G",3,"HELP")

^SCR("P1LHB","G",3,"LMAX")
19
^SCR("P1LHB","G",3,"MUMPS1")

^SCR("P1LHB","G",3,"MUMPS2")

^SCR("P1LHB","G",3,"OUTPUT")

^SCR("P1LHB","G",3,"SHEM")
       gewl my     
^SCR("P1LHB","G",3,"TYP")
H
^SCR("P1LHB","G",4,"CRD")
7,33,D,8,0
^SCR("P1LHB","G",4,"HELP")

^SCR("P1LHB","G",4,"LMAX")
8
^SCR("P1LHB","G",4,"MUMPS1")

^SCR("P1LHB","G",4,"MUMPS2")

^SCR("P1LHB","G",4,"OUTPUT")

^SCR("P1LHB","G",4,"SHEM")
 jix`zl 
^SCR("P1LHB","G",4,"TYP")
D
^SCR("P1LHB","G",5,"CRD")
7,24,E,5,0
^SCR("P1LHB","G",5,"HELP")

^SCR("P1LHB","G",5,"LMAX")
5
^SCR("P1LHB","G",5,"MUMPS1")

^SCR("P1LHB","G",5,"MUMPS2")

^SCR("P1LHB","G",5,"OUTPUT")

^SCR("P1LHB","G",5,"SHEM")
 dryl
^SCR("P1LHB","G",5,"TYP")
E
^SCR("P1LHB","G",6,"CRD")
7,18,N,7,2
^SCR("P1LHB","G",6,"HELP")

^SCR("P1LHB","G",6,"LMAX")
8
^SCR("P1LHB","G",6,"MUMPS1")

^SCR("P1LHB","G",6,"MUMPS2")

^SCR("P1LHB","G",6,"OUTPUT")

^SCR("P1LHB","G",6,"SHEM")
  mekq  
^SCR("P1LHB","G",6,"TYP")
N
^SCR("P1LHB","G",7,"CRD")
7,9,H,7,0
^SCR("P1LHB","G",7,"HELP")

^SCR("P1LHB","G",7,"LMAX")
7
^SCR("P1LHB","G",7,"MUMPS1")

^SCR("P1LHB","G",7,"MUMPS2")

^SCR("P1LHB","G",7,"OUTPUT")

^SCR("P1LHB","G",7,"SHEM")
 `zknq`
^SCR("P1LHB","G",7,"TYP")
H
^SCR("P1LHB","G","DEL")

^SCR("P1LHB","G","MAX")
3
^SCR("P1LHB","G","NAME","ASM")
7
^SCR("P1LHB","G","NAME","HZM")
1
^SCR("P1LHB","G","NAME","LK")
2
^SCR("P1LHB","G","NAME","LK1")
3
^SCR("P1LHB","G","NAME","SHAA")
5
^SCR("P1LHB","G","NAME","SUM")
6
^SCR("P1LHB","G","NAME","TRH")
4
^SCR("P1LHB","G","NM",1)
HZM
^SCR("P1LHB","G","NM",2)
LK
^SCR("P1LHB","G","NM",3)
LK1
^SCR("P1LHB","G","NM",4)
TRH
^SCR("P1LHB","G","NM",5)
SHAA
^SCR("P1LHB","G","NM",6)
SUM
^SCR("P1LHB","G","NM",7)
ASM
^SCR("P1LHB","G","RB")
6,2,21,79
^SCR("P1LHB","G","REF")
^TEMPL($P
^SCR("P1LHB","G","RZD")
\
^SCR("P1LHB","G","STEP")
1
^SCR("P1LHB","G","STG")
 : `zknq`:  mekq  : dryl: jix`zl :       gewl my     :  gewl 'qn :   dpnfd   : 
^SCR("P1LHB","G","VG")
8
^SCR("P1LHB","NAME")
gewll zipeayg z`ved
^SCR("P1LHB","P",5,"CHECK")
Y
^SCR("P1LHB","P",5,"CRD")
2,54,E,11,0
^SCR("P1LHB","P",5,"FNC")
F9,F8
^SCR("P1LHB","P",5,"GLOB")
LKH
^SCR("P1LHB","P",5,"HELP")
<F9>-zipeayg yetig <F8>+gewl:ze-ayg zniyx <F7>-zegewl zlah <F6>-my itl yetig
^SCR("P1LHB","P",5,"LMAX")
12
^SCR("P1LHB","P",5,"MUMPS1")

^SCR("P1LHB","P",5,"MUMPS2")
D LKH^P1LHB
^SCR("P1LHB","P",5,"MUST")

^SCR("P1LHB","P",5,"NLN")
20
^SCR("P1LHB","P",5,"RZD")
*
^SCR("P1LHB","P",5,"TOPB")
8
^SCR("P1LHB","P",5,"TYP")
E
^SCR("P1LHB","P",5,"VRB")
LKH1
^SCR("P1LHB","P",10,"CRD")
2,44,H,28
^SCR("P1LHB","P",10,"HELP")

^SCR("P1LHB","P",10,"LMAX")
29
^SCR("P1LHB","P",10,"MUMPS1")

^SCR("P1LHB","P",10,"MUMPS2")

^SCR("P1LHB","P",10,"OUTPUT")

^SCR("P1LHB","P",10,"TYP")
H
^SCR("P1LHB","P",15,"CRD")
3,70,H,55
^SCR("P1LHB","P",15,"HELP")

^SCR("P1LHB","P",15,"LMAX")
55
^SCR("P1LHB","P",15,"MUMPS1")

^SCR("P1LHB","P",15,"MUMPS2")

^SCR("P1LHB","P",15,"OUTPUT")

^SCR("P1LHB","P",15,"TYP")
H
^SCR("P1LHB","P",20,"CRD")
4,32,E,7,0
^SCR("P1LHB","P",20,"HELP")

^SCR("P1LHB","P",20,"LMAX")
9
^SCR("P1LHB","P",20,"MUMPS1")

^SCR("P1LHB","P",20,"MUMPS2")

^SCR("P1LHB","P",20,"OUTPUT")

^SCR("P1LHB","P",20,"TYP")
E
^SCR("P1LHB","P",25,"CRD")
21,37,E,6,0
^SCR("P1LHB","P",25,"HELP")

^SCR("P1LHB","P",25,"LMAX")
9
^SCR("P1LHB","P",25,"MUMPS1")

^SCR("P1LHB","P",25,"MUMPS2")

^SCR("P1LHB","P",25,"OUTPUT")

^SCR("P1LHB","P",25,"TYP")
E
^SCR("P1LHB","P",30,"CRD")
21,10,N,9,2
^SCR("P1LHB","P",30,"HELP")

^SCR("P1LHB","P",30,"LMAX")
9
^SCR("P1LHB","P",30,"MUMPS1")

^SCR("P1LHB","P",30,"MUMPS2")

^SCR("P1LHB","P",30,"OUTPUT")

^SCR("P1LHB","P",30,"TYP")
N
^SCR("P1LHB","P","NAME","HB")
20
^SCR("P1LHB","P","NAME","KAMHZM")
25
^SCR("P1LHB","P","NAME","KTOVET")
15
^SCR("P1LHB","P","NAME","LKH")
5
^SCR("P1LHB","P","NAME","LKH1")
10
^SCR("P1LHB","P","NAME","SUMH")
30
^SCR("P1LHB","P","NM",5)
LKH
^SCR("P1LHB","P","NM",10)
LKH1
^SCR("P1LHB","P","NM",15)
KTOVET
^SCR("P1LHB","P","NM",20)
HB
^SCR("P1LHB","P","NM",25)
KAMHZM
^SCR("P1LHB","P","NM",30)
SUMH
^SCR("P1LHB1")
H
^SCR("P1LHB1",1)
                                                        {05        }:gewl xtqn 
^SCR("P1LHB1",2)
                                         {                         10}:gewl my 
^SCR("P1LHB1",3)
                                         {                         15}:  zaezk 
^SCR("P1LHB1",4)
                                           #{20      } zipeayg #               
^SCR("P1LHB1",5)
                                                                             1$
^SCR("P1LHB1",6)
                                           :  mekq  : dryl : jix`zl : dpnfd :  
^SCR("P1LHB1",7)
                                                                               
^SCR("P1LHB1",8)
                                                                               
^SCR("P1LHB1",9)
                                                                               
^SCR("P1LHB1",10)
                                                                               
^SCR("P1LHB1",11)
                                                                               
^SCR("P1LHB1",12)
                                        $1                                     
^SCR("P1LHB1",13)
                                                        {25      }:zepnfd zenk 
^SCR("P1LHB1",14)
                                               {32      } mley {30      }:k"dq 
^SCR("P1LHB1",15)
                                           {40      } 'qn dlaw {35      }:dxzi 
^SCR("P1LHB1",16)
                                                                               
^SCR("P1LHB1","A",1)
:‡…—Œ˜”‘Ž
^SCR("P1LHB1","A",2)
:‡…—Œ�™
^SCR("P1LHB1","A",3)
:š�…š‹
^SCR("P1LHB1","A",4)
š‰�…�™‡
^SCR("P1LHB1","A",5)

^SCR("P1LHB1","A",6)
�…‹‘„’™ŒŠ‰˜€šŒ„�Ž†„
^SCR("P1LHB1","A",7)
-------------------------------
^SCR("P1LHB1","A",8)

^SCR("P1LHB1","A",9)

^SCR("P1LHB1","A",10)

^SCR("P1LHB1","A",11)

^SCR("P1LHB1","A",12)

^SCR("P1LHB1","A",13)
:š…�Ž†„š…Ž‹
^SCR("P1LHB1","A",14)
�Œ…™:‹"„‘
^SCR("P1LHB1","A",15)
'‘Ž„Œ�—:„˜š‰
^SCR("P1LHB1","A",16)

^SCR("P1LHB1","AV",1)
:juekrpxn
^SCR("P1LHB1","AV",2)
:juekoa
^SCR("P1LHB1","AV",3)
:,cu,f
^SCR("P1LHB1","AV",4)
,hbucaj
^SCR("P1LHB1","AV",5)

^SCR("P1LHB1","AV",6)
oufxvgaklhrt,kvbnzv
^SCR("P1LHB1","AV",7)
-------------------------------
^SCR("P1LHB1","AV",8)

^SCR("P1LHB1","AV",9)

^SCR("P1LHB1","AV",10)

^SCR("P1LHB1","AV",11)

^SCR("P1LHB1","AV",12)

^SCR("P1LHB1","AV",13)
:,ubnzv,unf
^SCR("P1LHB1","AV",14)
okua:f"vx
^SCR("P1LHB1","AV",15)
wxnvkce:vr,h
^SCR("P1LHB1","AV",16)

^SCR("P1LHB1","G",1,"CRD")
7,76,E,7,0
^SCR("P1LHB1","G",1,"HELP")
<F9> - dpnfd zbvd 
^SCR("P1LHB1","G",1,"LMAX")
7
^SCR("P1LHB1","G",1,"MUMPS1")

^SCR("P1LHB1","G",1,"MUMPS2")
D HZM^P1LHB
^SCR("P1LHB1","G",1,"SHEM")
 dpnfd 
^SCR("P1LHB1","G",1,"TYP")
E
^SCR("P1LHB1","G",2,"CRD")
7,68,D,8,0
^SCR("P1LHB1","G",2,"HELP")

^SCR("P1LHB1","G",2,"LMAX")
8
^SCR("P1LHB1","G",2,"MUMPS1")

^SCR("P1LHB1","G",2,"MUMPS2")

^SCR("P1LHB1","G",2,"OUTPUT")

^SCR("P1LHB1","G",2,"SHEM")
 jix`zl 
^SCR("P1LHB1","G",2,"TYP")
D
^SCR("P1LHB1","G",3,"CRD")
7,59,E,6,0
^SCR("P1LHB1","G",3,"HELP")

^SCR("P1LHB1","G",3,"LMAX")
6
^SCR("P1LHB1","G",3,"MUMPS1")

^SCR("P1LHB1","G",3,"MUMPS2")

^SCR("P1LHB1","G",3,"OUTPUT")

^SCR("P1LHB1","G",3,"SHEM")
 dryl 
^SCR("P1LHB1","G",3,"TYP")
E
^SCR("P1LHB1","G",4,"CRD")
7,52,N,7,2
^SCR("P1LHB1","G",4,"HELP")

^SCR("P1LHB1","G",4,"LMAX")
8
^SCR("P1LHB1","G",4,"MUMPS1")

^SCR("P1LHB1","G",4,"MUMPS2")

^SCR("P1LHB1","G",4,"OUTPUT")

^SCR("P1LHB1","G",4,"SHEM")
  mekq  
^SCR("P1LHB1","G",4,"TYP")
N
^SCR("P1LHB1","G","DEL")

^SCR("P1LHB1","G","MAX")
5
^SCR("P1LHB1","G","NAME","HZM")
1
^SCR("P1LHB1","G","NAME","SHAA")
3
^SCR("P1LHB1","G","NAME","SUM")
4
^SCR("P1LHB1","G","NAME","TRH")
2
^SCR("P1LHB1","G","NM",1)
HZM
^SCR("P1LHB1","G","NM",2)
TRH
^SCR("P1LHB1","G","NM",3)
SHAA
^SCR("P1LHB1","G","NM",4)
SUM
^SCR("P1LHB1","G","RB")
6,41,13,79
^SCR("P1LHB1","G","REF")
^TEMPL($P
^SCR("P1LHB1","G","RZD")
\
^SCR("P1LHB1","G","STEP")
1
^SCR("P1LHB1","G","STG")
                                           :  mekq  : dryl : jix`zl : dpnfd :  
^SCR("P1LHB1","G","VG")
8
^SCR("P1LHB1","NAME")

^SCR("P1LHB1","P",5,"CHECK")
Y
^SCR("P1LHB1","P",5,"CRD")
1,56,E,10,0
^SCR("P1LHB1","P",5,"FNC")
F9,F8
^SCR("P1LHB1","P",5,"GLOB")
LKH
^SCR("P1LHB1","P",5,"HELP")
<F9>-zipeayg yetig <F8>+gewl:ze-ayg zniyx <F7>-zegewl zlah <F6>-my itl yetig
^SCR("P1LHB1","P",5,"LMAX")
11
^SCR("P1LHB1","P",5,"MUMPS1")

^SCR("P1LHB1","P",5,"MUMPS2")
D LKH^P1LHB
^SCR("P1LHB1","P",5,"MUST")

^SCR("P1LHB1","P",5,"NLN")
20
^SCR("P1LHB1","P",5,"RZD")
*
^SCR("P1LHB1","P",5,"TOPB")
8
^SCR("P1LHB1","P",5,"TYP")
E
^SCR("P1LHB1","P",5,"VRB")
LKH1
^SCR("P1LHB1","P",10,"CRD")
2,70,H,25
^SCR("P1LHB1","P",10,"HELP")

^SCR("P1LHB1","P",10,"LMAX")
28
^SCR("P1LHB1","P",10,"MUMPS1")

^SCR("P1LHB1","P",10,"MUMPS2")

^SCR("P1LHB1","P",10,"OUTPUT")

^SCR("P1LHB1","P",10,"TYP")
H
^SCR("P1LHB1","P",15,"CRD")
3,70,H,28
^SCR("P1LHB1","P",15,"HELP")

^SCR("P1LHB1","P",15,"LMAX")
28
^SCR("P1LHB1","P",15,"MUMPS1")

^SCR("P1LHB1","P",15,"MUMPS2")

^SCR("P1LHB1","P",15,"OUTPUT")

^SCR("P1LHB1","P",15,"TYP")
H
^SCR("P1LHB1","P",20,"CRD")
4,44,E,7,0
^SCR("P1LHB1","P",20,"HELP")

^SCR("P1LHB1","P",20,"LMAX")
9
^SCR("P1LHB1","P",20,"MUMPS1")

^SCR("P1LHB1","P",20,"MUMPS2")

^SCR("P1LHB1","P",20,"OUTPUT")

^SCR("P1LHB1","P",20,"TYP")
E
^SCR("P1LHB1","P",25,"CRD")
13,56,E,5,0
^SCR("P1LHB1","P",25,"HELP")

^SCR("P1LHB1","P",25,"LMAX")
9
^SCR("P1LHB1","P",25,"MUMPS1")

^SCR("P1LHB1","P",25,"MUMPS2")

^SCR("P1LHB1","P",25,"OUTPUT")

^SCR("P1LHB1","P",25,"TYP")
E
^SCR("P1LHB1","P",30,"CRD")
14,63,N,9,2
^SCR("P1LHB1","P",30,"HELP")

^SCR("P1LHB1","P",30,"LMAX")
9
^SCR("P1LHB1","P",30,"MUMPS1")

^SCR("P1LHB1","P",30,"MUMPS2")

^SCR("P1LHB1","P",30,"OUTPUT")

^SCR("P1LHB1","P",30,"TYP")
N
^SCR("P1LHB1","P",32,"CRD")
14,47,N,8,2
^SCR("P1LHB1","P",32,"HELP")

^SCR("P1LHB1","P",32,"LMAX")
9
^SCR("P1LHB1","P",32,"MUMPS1")

^SCR("P1LHB1","P",32,"MUMPS2")

^SCR("P1LHB1","P",32,"OUTPUT")

^SCR("P1LHB1","P",32,"TYP")
N
^SCR("P1LHB1","P",35,"CRD")
15,63,N,8,2
^SCR("P1LHB1","P",35,"HELP")

^SCR("P1LHB1","P",35,"LMAX")
9
^SCR("P1LHB1","P",35,"MUMPS1")

^SCR("P1LHB1","P",35,"MUMPS2")

^SCR("P1LHB1","P",35,"OUTPUT")

^SCR("P1LHB1","P",35,"TYP")
N
^SCR("P1LHB1","P",40,"CRD")
15,43,E,7,0
^SCR("P1LHB1","P",40,"HELP")

^SCR("P1LHB1","P",40,"LMAX")
9
^SCR("P1LHB1","P",40,"MUMPS1")

^SCR("P1LHB1","P",40,"MUMPS2")

^SCR("P1LHB1","P",40,"OUTPUT")

^SCR("P1LHB1","P",40,"TYP")
E
^SCR("P1LHB1","P","NAME","HB")
20
^SCR("P1LHB1","P","NAME","ITR")
35
^SCR("P1LHB1","P","NAME","KAMHZM")
25
^SCR("P1LHB1","P","NAME","KTOVET")
15
^SCR("P1LHB1","P","NAME","LKH")
5
^SCR("P1LHB1","P","NAME","LKH1")
10
^SCR("P1LHB1","P","NAME","NUMBER")
40
^SCR("P1LHB1","P","NAME","SHUL")
32
^SCR("P1LHB1","P","NAME","SHUM")
30
^SCR("P1LHB1","P","NM",5)
LKH
^SCR("P1LHB1","P","NM",10)
LKH1
^SCR("P1LHB1","P","NM",15)
KTOVET
^SCR("P1LHB1","P","NM",20)
HB
^SCR("P1LHB1","P","NM",25)
KAMHZM
^SCR("P1LHB1","P","NM",30)
SHUM
^SCR("P1LHB1","P","NM",32)
SHUL
^SCR("P1LHB1","P","NM",35)
ITR
^SCR("P1LHB1","P","NM",40)
NUMBER
^SCR("P1LHBM")
H
^SCR("P1LHBM",1)
                                   # zipeayg hext #                            
^SCR("P1LHBM",2)
              {                          10}:gewl my  {05         }:gewl xtqn  
^SCR("P1LHBM",3)
              {                                                    15}: zaezk  
^SCR("P1LHBM",4)
                               #{20      } zipeayg #                           
^SCR("P1LHBM",5)
                                                                             1$
^SCR("P1LHBM",6)
      :   mekq  :  jix`z :       gewl my     :  gewl 'qn  :    gelyn 'z    :   
^SCR("P1LHBM",7)
                                                                               
^SCR("P1LHBM",8)
                                                                               
^SCR("P1LHBM",9)
                                                                               
^SCR("P1LHBM",10)
                                                                               
^SCR("P1LHBM",11)
                                                                               
^SCR("P1LHBM",12)
                                                                               
^SCR("P1LHBM",13)
                                                                               
^SCR("P1LHBM",14)
                                                                               
^SCR("P1LHBM",15)
                                                                               
^SCR("P1LHBM",16)
                                                                               
^SCR("P1LHBM",17)
                                                                               
^SCR("P1LHBM",18)
                                                                               
^SCR("P1LHBM",19)
                                                                               
^SCR("P1LHBM",20)
  $1                                                                           
^SCR("P1LHBM",21)
            {30      }:k"dq          {25      }:zepnfd xtqn                    
^SCR("P1LHBM",22)
                                                                               
^SCR("P1LHBM","A",1)
š‰�…�™‡ˆ…˜”
^SCR("P1LHBM","A",2)
:‡…—Œ�™:‡…—Œ˜”‘Ž
^SCR("P1LHBM","A",3)
:š�…š‹
^SCR("P1LHBM","A",4)
š‰�…�™‡
^SCR("P1LHBM","A",5)

^SCR("P1LHBM","A",6)
�…‹‘Š‰˜€š‡…—Œ�™‡…—Œ'‘Ž‡…Œ™Ž'š
^SCR("P1LHBM","A",7)
-------------------------------------------------------------------
^SCR("P1LHBM","A",8)

^SCR("P1LHBM","A",9)

^SCR("P1LHBM","A",10)

^SCR("P1LHBM","A",11)

^SCR("P1LHBM","A",12)

^SCR("P1LHBM","A",13)

^SCR("P1LHBM","A",14)

^SCR("P1LHBM","A",15)

^SCR("P1LHBM","A",16)

^SCR("P1LHBM","A",17)

^SCR("P1LHBM","A",18)

^SCR("P1LHBM","A",19)

^SCR("P1LHBM","A",20)

^SCR("P1LHBM","A",21)
:‹"„‘:š…�Ž†„˜”‘Ž
^SCR("P1LHBM","A",22)

^SCR("P1LHBM","AV",1)
,hbucajyurp
^SCR("P1LHBM","AV",2)
:juekoa:juekrpxn
^SCR("P1LHBM","AV",3)
:,cu,f
^SCR("P1LHBM","AV",4)
,hbucaj
^SCR("P1LHBM","AV",5)

^SCR("P1LHBM","AV",6)
oufxlhrt,juekoajuekwxnjukanw,
^SCR("P1LHBM","AV",7)
-------------------------------------------------------------------
^SCR("P1LHBM","AV",8)

^SCR("P1LHBM","AV",9)

^SCR("P1LHBM","AV",10)

^SCR("P1LHBM","AV",11)

^SCR("P1LHBM","AV",12)

^SCR("P1LHBM","AV",13)

^SCR("P1LHBM","AV",14)

^SCR("P1LHBM","AV",15)

^SCR("P1LHBM","AV",16)

^SCR("P1LHBM","AV",17)

^SCR("P1LHBM","AV",18)

^SCR("P1LHBM","AV",19)

^SCR("P1LHBM","AV",20)

^SCR("P1LHBM","AV",21)
:f"vx:,ubnzvrpxn
^SCR("P1LHBM","AV",22)

^SCR("P1LHBM","G",1,"CRD")
7,75,E,15,0
^SCR("P1LHBM","G",1,"HELP")

^SCR("P1LHBM","G",1,"LMAX")
16
^SCR("P1LHBM","G",1,"MUMPS1")

^SCR("P1LHBM","G",1,"MUMPS2")
D HZM^P1LHBM
^SCR("P1LHBM","G",1,"SHEM")
    gelyn 'z    
^SCR("P1LHBM","G",1,"TYP")
E
^SCR("P1LHBM","G",2,"CRD")
7,58,E,11,0
^SCR("P1LHBM","G",2,"HELP")

^SCR("P1LHBM","G",2,"LMAX")
12
^SCR("P1LHBM","G",2,"MUMPS1")

^SCR("P1LHBM","G",2,"MUMPS2")

^SCR("P1LHBM","G",2,"OUTPUT")

^SCR("P1LHBM","G",2,"SHEM")
  gewl 'qn  
^SCR("P1LHBM","G",2,"TYP")
E
^SCR("P1LHBM","G",3,"CRD")
7,45,H,19,0
^SCR("P1LHBM","G",3,"HELP")

^SCR("P1LHBM","G",3,"LMAX")
19
^SCR("P1LHBM","G",3,"MUMPS1")

^SCR("P1LHBM","G",3,"MUMPS2")

^SCR("P1LHBM","G",3,"OUTPUT")

^SCR("P1LHBM","G",3,"SHEM")
       gewl my     
^SCR("P1LHBM","G",3,"TYP")
H
^SCR("P1LHBM","G",4,"CRD")
7,25,D,8,0
^SCR("P1LHBM","G",4,"HELP")

^SCR("P1LHBM","G",4,"LMAX")
8
^SCR("P1LHBM","G",4,"MUMPS1")

^SCR("P1LHBM","G",4,"MUMPS2")

^SCR("P1LHBM","G",4,"OUTPUT")

^SCR("P1LHBM","G",4,"SHEM")
  jix`z 
^SCR("P1LHBM","G",4,"TYP")
D
^SCR("P1LHBM","G",5,"CRD")
7,16,N,9,2
^SCR("P1LHBM","G",5,"HELP")

^SCR("P1LHBM","G",5,"LMAX")
9
^SCR("P1LHBM","G",5,"MUMPS1")

^SCR("P1LHBM","G",5,"MUMPS2")

^SCR("P1LHBM","G",5,"OUTPUT")

^SCR("P1LHBM","G",5,"SHEM")
   mekq  
^SCR("P1LHBM","G",5,"TYP")
N
^SCR("P1LHBM","G","DEL")

^SCR("P1LHBM","G","MAX")
2
^SCR("P1LHBM","G","NAME","HZM")
1
^SCR("P1LHBM","G","NAME","LK")
2
^SCR("P1LHBM","G","NAME","LK1")
3
^SCR("P1LHBM","G","NAME","SUM")
5
^SCR("P1LHBM","G","NAME","TRH")
4
^SCR("P1LHBM","G","NM",1)
HZM
^SCR("P1LHBM","G","NM",2)
LK
^SCR("P1LHBM","G","NM",3)
LK1
^SCR("P1LHBM","G","NM",4)
TRH
^SCR("P1LHBM","G","NM",5)
SUM
^SCR("P1LHBM","G","RB")
6,3,21,79
^SCR("P1LHBM","G","REF")
^TEMPL($P
^SCR("P1LHBM","G","RZD")
\
^SCR("P1LHBM","G","STEP")
1
^SCR("P1LHBM","G","STG")
      :   mekq  :  jix`z :       gewl my     :  gewl 'qn  :    gelyn 'z    :   
^SCR("P1LHBM","G","VG")
8
^SCR("P1LHBM","NAME")

^SCR("P1LHBM","P",5,"CHECK")
Y
^SCR("P1LHBM","P",5,"CRD")
2,54,E,10,0
^SCR("P1LHBM","P",5,"FNC")
F9,F8
^SCR("P1LHBM","P",5,"GLOB")
LKH
^SCR("P1LHBM","P",5,"HELP")
<F9>-zipeayg yetig <F8>+gewl:ze-ayg zniyx <F7>-zegewl zlah <F6>-my itl yetig
^SCR("P1LHBM","P",5,"LMAX")
12
^SCR("P1LHBM","P",5,"MUMPS1")

^SCR("P1LHBM","P",5,"MUMPS2")
D LKH^P1LHB
^SCR("P1LHBM","P",5,"MUST")

^SCR("P1LHBM","P",5,"NLN")
20
^SCR("P1LHBM","P",5,"RZD")
*
^SCR("P1LHBM","P",5,"TOPB")
8
^SCR("P1LHBM","P",5,"TYP")
E
^SCR("P1LHBM","P",5,"VRB")
LKH1
^SCR("P1LHBM","P",10,"CRD")
2,44,H,25
^SCR("P1LHBM","P",10,"HELP")

^SCR("P1LHBM","P",10,"LMAX")
29
^SCR("P1LHBM","P",10,"MUMPS1")

^SCR("P1LHBM","P",10,"MUMPS2")

^SCR("P1LHBM","P",10,"OUTPUT")

^SCR("P1LHBM","P",10,"TYP")
H
^SCR("P1LHBM","P",15,"CRD")
3,70,H,55
^SCR("P1LHBM","P",15,"HELP")

^SCR("P1LHBM","P",15,"LMAX")
55
^SCR("P1LHBM","P",15,"MUMPS1")

^SCR("P1LHBM","P",15,"MUMPS2")

^SCR("P1LHBM","P",15,"OUTPUT")

^SCR("P1LHBM","P",15,"TYP")
H
^SCR("P1LHBM","P",20,"CRD")
4,32,E,7,0
^SCR("P1LHBM","P",20,"HELP")

^SCR("P1LHBM","P",20,"LMAX")
9
^SCR("P1LHBM","P",20,"MUMPS1")

^SCR("P1LHBM","P",20,"MUMPS2")

^SCR("P1LHBM","P",20,"OUTPUT")

^SCR("P1LHBM","P",20,"TYP")
E
^SCR("P1LHBM","P",25,"CRD")
21,37,E,5,0
^SCR("P1LHBM","P",25,"HELP")

^SCR("P1LHBM","P",25,"LMAX")
9
^SCR("P1LHBM","P",25,"MUMPS1")

^SCR("P1LHBM","P",25,"MUMPS2")

^SCR("P1LHBM","P",25,"OUTPUT")

^SCR("P1LHBM","P",25,"TYP")
E
^SCR("P1LHBM","P",30,"CRD")
21,12,N,9,2
^SCR("P1LHBM","P",30,"HELP")

^SCR("P1LHBM","P",30,"LMAX")
9
^SCR("P1LHBM","P",30,"MUMPS1")

^SCR("P1LHBM","P",30,"MUMPS2")

^SCR("P1LHBM","P",30,"OUTPUT")

^SCR("P1LHBM","P",30,"TYP")
N
^SCR("P1LHBM","P","NAME","HB")
20
^SCR("P1LHBM","P","NAME","KAMHZM")
25
^SCR("P1LHBM","P","NAME","KTOVET")
15
^SCR("P1LHBM","P","NAME","LKH")
5
^SCR("P1LHBM","P","NAME","LKH1")
10
^SCR("P1LHBM","P","NAME","SUMH")
30
^SCR("P1LHBM","P","NM",5)
LKH
^SCR("P1LHBM","P","NM",10)
LKH1
^SCR("P1LHBM","P","NM",15)
KTOVET
^SCR("P1LHBM","P","NM",20)
HB
^SCR("P1LHBM","P","NM",25)
KAMHZM
^SCR("P1LHBM","P","NM",30)
SUMH
^SCR("P1LKDM")
H
^SCR("P1LKDM",1)
                           # gelyn incn mixeht zegewl zniyx #                  
^SCR("P1LKDM",2)
                                                                      1$       
^SCR("P1LKDM",3)
                         :             gewl my       :  gewl 'qn  :            
^SCR("P1LKDM",4)
                                                                               
^SCR("P1LKDM",5)
                                                                               
^SCR("P1LKDM",6)
                                                                               
^SCR("P1LKDM",7)
                                                                               
^SCR("P1LKDM",8)
                                                                               
^SCR("P1LKDM",9)
                                                                               
^SCR("P1LKDM",10)
                                                                               
^SCR("P1LKDM",11)
                                                                               
^SCR("P1LKDM",12)
                                                                               
^SCR("P1LKDM",13)
                                                                               
^SCR("P1LKDM",14)
                                                                               
^SCR("P1LKDM",15)
                                                                               
^SCR("P1LKDM",16)
                                                                               
^SCR("P1LKDM",17)
                                                                               
^SCR("P1LKDM",18)
                                                                               
^SCR("P1LKDM",19)
                                                                               
^SCR("P1LKDM",20)
                    $1                                                         
^SCR("P1LKDM","A",1)
‡…Œ™Ž‰ŽƒŽ�‰˜…ˆ”š…‡…—ŒšŽ‰™˜
^SCR("P1LKDM","A",2)

^SCR("P1LKDM","A",3)
‡…—Œ�™‡…—Œ'‘Ž
^SCR("P1LKDM","A",4)
---------------------------------------
^SCR("P1LKDM","A",5)

^SCR("P1LKDM","A",6)

^SCR("P1LKDM","A",7)

^SCR("P1LKDM","A",8)

^SCR("P1LKDM","A",9)

^SCR("P1LKDM","A",10)

^SCR("P1LKDM","A",11)

^SCR("P1LKDM","A",12)

^SCR("P1LKDM","A",13)

^SCR("P1LKDM","A",14)

^SCR("P1LKDM","A",15)

^SCR("P1LKDM","A",16)

^SCR("P1LKDM","A",17)

^SCR("P1LKDM","A",18)

^SCR("P1LKDM","A",19)

^SCR("P1LKDM","A",20)

^SCR("P1LKDM","AV",1)
jukanhnsnohruyp,ujuek,nhar
^SCR("P1LKDM","AV",2)

^SCR("P1LKDM","AV",3)
juekoajuekwxn
^SCR("P1LKDM","AV",4)
---------------------------------------
^SCR("P1LKDM","AV",5)

^SCR("P1LKDM","AV",6)

^SCR("P1LKDM","AV",7)

^SCR("P1LKDM","AV",8)

^SCR("P1LKDM","AV",9)

^SCR("P1LKDM","AV",10)

^SCR("P1LKDM","AV",11)

^SCR("P1LKDM","AV",12)

^SCR("P1LKDM","AV",13)

^SCR("P1LKDM","AV",14)

^SCR("P1LKDM","AV",15)

^SCR("P1LKDM","AV",16)

^SCR("P1LKDM","AV",17)

^SCR("P1LKDM","AV",18)

^SCR("P1LKDM","AV",19)

^SCR("P1LKDM","AV",20)

^SCR("P1LKDM","G",1,"CHECK")
Y
^SCR("P1LKDM","G",1,"CRD")
4,66,E,10,0
^SCR("P1LKDM","G",1,"CREAT")

^SCR("P1LKDM","G",1,"FNC")

^SCR("P1LKDM","G",1,"GLOB")
LKH
^SCR("P1LKDM","G",1,"HELP")

^SCR("P1LKDM","G",1,"LMAX")
12
^SCR("P1LKDM","G",1,"MUMPS1")

^SCR("P1LKDM","G",1,"MUMPS2")

^SCR("P1LKDM","G",1,"MUST")

^SCR("P1LKDM","G",1,"NLN")
20
^SCR("P1LKDM","G",1,"NS")
K
^SCR("P1LKDM","G",1,"RZD")
\
^SCR("P1LKDM","G",1,"SHEM")
  gewl 'qn  
^SCR("P1LKDM","G",1,"TOPB")
8
^SCR("P1LKDM","G",1,"TYP")
E
^SCR("P1LKDM","G",1,"VRB")
LKH1
^SCR("P1LKDM","G",2,"CRD")
4,53,H,27,0
^SCR("P1LKDM","G",2,"HELP")

^SCR("P1LKDM","G",2,"LMAX")
27
^SCR("P1LKDM","G",2,"MUMPS1")

^SCR("P1LKDM","G",2,"MUMPS2")

^SCR("P1LKDM","G",2,"OUTPUT")

^SCR("P1LKDM","G",2,"SHEM")
             gewl my       
^SCR("P1LKDM","G",2,"TYP")
H
^SCR("P1LKDM","G","DEL")
Y
^SCR("P1LKDM","G","MAX")
99999
^SCR("P1LKDM","G","NAME","LKH")
1
^SCR("P1LKDM","G","NAME","LKH1")
2
^SCR("P1LKDM","G","NM",1)
LKH
^SCR("P1LKDM","G","NM",2)
LKH1
^SCR("P1LKDM","G","RB")
3,21,21,72
^SCR("P1LKDM","G","REF")
^TEMP($P
^SCR("P1LKDM","G","RZD")
\
^SCR("P1LKDM","G","STEP")
1
^SCR("P1LKDM","G","STG")
                         :             gewl my       :  gewl 'qn  :            
^SCR("P1LKDM","G","VG")
5
^SCR("P1LKDM","NAME")
gelyn incn mixeht zegewl zniyx
^SCR("P1LKHM")
H
^SCR("P1LKHM",1)
                     # zegewl ixtqn iiepiy dixehqid #                          
^SCR("P1LKHM",2)
                                                                               
^SCR("P1LKHM",3)
                                                                      $        
^SCR("P1LKHM",4)
        :  jix`z  :  ycg xtqn :             gewl  my   :  oyi xtqn  :          
^SCR("P1LKHM",5)
                                                                               
^SCR("P1LKHM",6)
                                                                               
^SCR("P1LKHM",7)
                                                                               
^SCR("P1LKHM",8)
                                                                               
^SCR("P1LKHM",9)
                                                                               
^SCR("P1LKHM",10)
                                                                               
^SCR("P1LKHM",11)
                                                                               
^SCR("P1LKHM",12)
                                                                               
^SCR("P1LKHM",13)
                                                                               
^SCR("P1LKHM",14)
                                                                               
^SCR("P1LKHM",15)
                                                                               
^SCR("P1LKHM",16)
                                                                               
^SCR("P1LKHM",17)
                                                                               
^SCR("P1LKHM",18)
                                                                               
^SCR("P1LKHM",19)
                                                                               
^SCR("P1LKHM",20)
                                                                               
^SCR("P1LKHM",21)
     $                                                                         
^SCR("P1LKHM","A",1)
š…‡…—Œ‰˜”‘Ž‰‰…�‰™„‰˜…ˆ‘‰„
^SCR("P1LKHM","A",2)

^SCR("P1LKHM","A",3)

^SCR("P1LKHM","A",4)
Š‰˜€š™ƒ‡˜”‘Ž‡…—Œ�™�™‰˜”‘Ž
^SCR("P1LKHM","A",5)
--------------------------------------------------------
^SCR("P1LKHM","A",6)

^SCR("P1LKHM","A",7)

^SCR("P1LKHM","A",8)

^SCR("P1LKHM","A",9)

^SCR("P1LKHM","A",10)

^SCR("P1LKHM","A",11)

^SCR("P1LKHM","A",12)

^SCR("P1LKHM","A",13)

^SCR("P1LKHM","A",14)

^SCR("P1LKHM","A",15)

^SCR("P1LKHM","A",16)

^SCR("P1LKHM","A",17)

^SCR("P1LKHM","A",18)

^SCR("P1LKHM","A",19)

^SCR("P1LKHM","A",20)

^SCR("P1LKHM","A",21)

^SCR("P1LKHM","AV",1)
,ujuekhrpxnhhubhavhruyxhv
^SCR("P1LKHM","AV",2)

^SCR("P1LKHM","AV",3)

^SCR("P1LKHM","AV",4)
lhrt,asjrpxnjuekoaiahrpxn
^SCR("P1LKHM","AV",5)
--------------------------------------------------------
^SCR("P1LKHM","AV",6)

^SCR("P1LKHM","AV",7)

^SCR("P1LKHM","AV",8)

^SCR("P1LKHM","AV",9)

^SCR("P1LKHM","AV",10)

^SCR("P1LKHM","AV",11)

^SCR("P1LKHM","AV",12)

^SCR("P1LKHM","AV",13)

^SCR("P1LKHM","AV",14)

^SCR("P1LKHM","AV",15)

^SCR("P1LKHM","AV",16)

^SCR("P1LKHM","AV",17)

^SCR("P1LKHM","AV",18)

^SCR("P1LKHM","AV",19)

^SCR("P1LKHM","AV",20)

^SCR("P1LKHM","AV",21)

^SCR("P1LKHM","G",1,"CRD")
5,68,E,10,0
^SCR("P1LKHM","G",1,"HELP")

^SCR("P1LKHM","G",1,"LMAX")
12
^SCR("P1LKHM","G",1,"MUMPS1")

^SCR("P1LKHM","G",1,"MUMPS2")

^SCR("P1LKHM","G",1,"OUTPUT")

^SCR("P1LKHM","G",1,"SHEM")
  oyi xtqn  
^SCR("P1LKHM","G",1,"TYP")
E
^SCR("P1LKHM","G",2,"CRD")
5,55,H,24,0
^SCR("P1LKHM","G",2,"HELP")

^SCR("P1LKHM","G",2,"LMAX")
24
^SCR("P1LKHM","G",2,"MUMPS1")

^SCR("P1LKHM","G",2,"MUMPS2")

^SCR("P1LKHM","G",2,"OUTPUT")

^SCR("P1LKHM","G",2,"SHEM")
             gewl  my   
^SCR("P1LKHM","G",2,"TYP")
H
^SCR("P1LKHM","G",3,"CRD")
5,30,E,10,0
^SCR("P1LKHM","G",3,"HELP")

^SCR("P1LKHM","G",3,"LMAX")
11
^SCR("P1LKHM","G",3,"MUMPS1")

^SCR("P1LKHM","G",3,"MUMPS2")

^SCR("P1LKHM","G",3,"OUTPUT")

^SCR("P1LKHM","G",3,"SHEM")
  ycg xtqn 
^SCR("P1LKHM","G",3,"TYP")
E
^SCR("P1LKHM","G",4,"CRD")
5,18,D,8,0
^SCR("P1LKHM","G",4,"HELP")

^SCR("P1LKHM","G",4,"LMAX")
9
^SCR("P1LKHM","G",4,"MUMPS1")

^SCR("P1LKHM","G",4,"MUMPS2")

^SCR("P1LKHM","G",4,"OUTPUT")

^SCR("P1LKHM","G",4,"SHEM")
  jix`z  
^SCR("P1LKHM","G",4,"TYP")
D
^SCR("P1LKHM","G","DEL")

^SCR("P1LKHM","G","MAX")
99999
^SCR("P1LKHM","G","NAME","DATM")
4
^SCR("P1LKHM","G","NAME","NMBN")
3
^SCR("P1LKHM","G","NAME","NMBO")
1
^SCR("P1LKHM","G","NAME","SHEM")
2
^SCR("P1LKHM","G","NM",1)
NMBO
^SCR("P1LKHM","G","NM",2)
SHEM
^SCR("P1LKHM","G","NM",3)
NMBN
^SCR("P1LKHM","G","NM",4)
DATM
^SCR("P1LKHM","G","RB")
4,6,22,71
^SCR("P1LKHM","G","REF")
^TEMP($P
^SCR("P1LKHM","G","RZD")
\
^SCR("P1LKHM","G","STEP")
1
^SCR("P1LKHM","G","STG")
        :  jix`z  :  ycg xtqn :             gewl  my   :  oyi xtqn  :          
^SCR("P1LKHM","G","VG")
6
^SCR("P1LKHM","NAME")
gewl xtqn iepiy dixehqd
^SCR("P1LKHMDB")
H
^SCR("P1LKHMDB",1)
                         # 'zewacn - zegewl' zlah #                            
^SCR("P1LKHMDB",2)
                                                                               
^SCR("P1LKHMDB",3)
                                                                          1$   
^SCR("P1LKHMDB",4)
                  : zewacn zqtcd :           gewl my       :  gewl 'qn  :      
^SCR("P1LKHMDB",5)
                                                                               
^SCR("P1LKHMDB",6)
                                                                               
^SCR("P1LKHMDB",7)
                                                                               
^SCR("P1LKHMDB",8)
                                                                               
^SCR("P1LKHMDB",9)
                                                                               
^SCR("P1LKHMDB",10)
                                                                               
^SCR("P1LKHMDB",11)
                                                                               
^SCR("P1LKHMDB",12)
                                                                               
^SCR("P1LKHMDB",13)
                                                                               
^SCR("P1LKHMDB",14)
                                                                               
^SCR("P1LKHMDB",15)
                                                                               
^SCR("P1LKHMDB",16)
                                                                               
^SCR("P1LKHMDB",17)
                                                                               
^SCR("P1LKHMDB",18)
                                                                               
^SCR("P1LKHMDB",19)
                                                                               
^SCR("P1LKHMDB",20)
                                                                               
^SCR("P1LKHMDB",21)
              $1                                                               
^SCR("P1LKHMDB","A",1)
'š…—�ƒŽ-š…‡…—Œ'šŒ�ˆ
^SCR("P1LKHMDB","A",2)

^SCR("P1LKHMDB","A",3)

^SCR("P1LKHMDB","A",4)
š…—�ƒŽš‘”ƒ„‡…—Œ�™‡…—Œ'‘Ž
^SCR("P1LKHMDB","A",5)
---------------------------------------------------
^SCR("P1LKHMDB","A",6)

^SCR("P1LKHMDB","A",7)

^SCR("P1LKHMDB","A",8)

^SCR("P1LKHMDB","A",9)

^SCR("P1LKHMDB","A",10)

^SCR("P1LKHMDB","A",11)

^SCR("P1LKHMDB","A",12)

^SCR("P1LKHMDB","A",13)

^SCR("P1LKHMDB","A",14)

^SCR("P1LKHMDB","A",15)

^SCR("P1LKHMDB","A",16)

^SCR("P1LKHMDB","A",17)

^SCR("P1LKHMDB","A",18)

^SCR("P1LKHMDB","A",19)

^SCR("P1LKHMDB","A",20)

^SCR("P1LKHMDB","A",21)

^SCR("P1LKHMDB","AV",1)
w,uecsn-,ujuekw,kcy
^SCR("P1LKHMDB","AV",2)

^SCR("P1LKHMDB","AV",3)

^SCR("P1LKHMDB","AV",4)
,uecsn,xpsvjuekoajuekwxn
^SCR("P1LKHMDB","AV",5)
---------------------------------------------------
^SCR("P1LKHMDB","AV",6)

^SCR("P1LKHMDB","AV",7)

^SCR("P1LKHMDB","AV",8)

^SCR("P1LKHMDB","AV",9)

^SCR("P1LKHMDB","AV",10)

^SCR("P1LKHMDB","AV",11)

^SCR("P1LKHMDB","AV",12)

^SCR("P1LKHMDB","AV",13)

^SCR("P1LKHMDB","AV",14)

^SCR("P1LKHMDB","AV",15)

^SCR("P1LKHMDB","AV",16)

^SCR("P1LKHMDB","AV",17)

^SCR("P1LKHMDB","AV",18)

^SCR("P1LKHMDB","AV",19)

^SCR("P1LKHMDB","AV",20)

^SCR("P1LKHMDB","AV",21)

^SCR("P1LKHMDB","G",1,"CRD")
5,72,E,12,0
^SCR("P1LKHMDB","G",1,"HELP")

^SCR("P1LKHMDB","G",1,"LMAX")
12
^SCR("P1LKHMDB","G",1,"MUMPS1")

^SCR("P1LKHMDB","G",1,"MUMPS2")

^SCR("P1LKHMDB","G",1,"OUTPUT")

^SCR("P1LKHMDB","G",1,"SHEM")
  gewl 'qn  
^SCR("P1LKHMDB","G",1,"TYP")
E
^SCR("P1LKHMDB","G",2,"CRD")
5,59,H,25,0
^SCR("P1LKHMDB","G",2,"HELP")

^SCR("P1LKHMDB","G",2,"LMAX")
25
^SCR("P1LKHMDB","G",2,"MUMPS1")

^SCR("P1LKHMDB","G",2,"MUMPS2")

^SCR("P1LKHMDB","G",2,"OUTPUT")

^SCR("P1LKHMDB","G",2,"SHEM")
           gewl my       
^SCR("P1LKHMDB","G",2,"TYP")
H
^SCR("P1LKHMDB","G",3,"CRD")
5,33,N,1,0
^SCR("P1LKHMDB","G",3,"HELP")

^SCR("P1LKHMDB","G",3,"LMAX")
14
^SCR("P1LKHMDB","G",3,"MUMPS1")

^SCR("P1LKHMDB","G",3,"MUMPS2")

^SCR("P1LKHMDB","G",3,"MUST")

^SCR("P1LKHMDB","G",3,"SHEM")
 zewacn zqtcd 
^SCR("P1LKHMDB","G",3,"TYP")
N
^SCR("P1LKHMDB","G","DEL")

^SCR("P1LKHMDB","G","MAX")
67
^SCR("P1LKHMDB","G","NAME","LKH")
1
^SCR("P1LKHMDB","G","NAME","LKH1")
2
^SCR("P1LKHMDB","G","NAME","MDB")
3
^SCR("P1LKHMDB","G","NM",1)
LKH
^SCR("P1LKHMDB","G","NM",2)
LKH1
^SCR("P1LKHMDB","G","NM",3)
MDB
^SCR("P1LKHMDB","G","RB")
4,15,22,76
^SCR("P1LKHMDB","G","REF")
^TEMP($P,"SP"
^SCR("P1LKHMDB","G","RZD")
\
^SCR("P1LKHMDB","G","STEP")
1
^SCR("P1LKHMDB","G","STG")
                  : zewacn zqtcd :           gewl my       :  gewl 'qn  :      
^SCR("P1LKHMDB","G","VG")
6
^SCR("P1LKHMDB","NAME")
"zewacn - zegewl" dlah
^SCR("P1LKHZ")
H
^SCR("P1LKHZ",1)
                                                                               
^SCR("P1LKHZ",2)
                     {05      } jix`zl dtwda zegewl g"ec                       
^SCR("P1LKHZ",3)
                                                                               
^SCR("P1LKHZ",4)
                                                                          1$   
^SCR("P1LKHZ",5)
     : miyelz zenk : yelz jxr :   dpw  :       gewl my      : gewl 'qn :       
^SCR("P1LKHZ",6)
                                                                               
^SCR("P1LKHZ",7)
                                                                               
^SCR("P1LKHZ",8)
                                                                               
^SCR("P1LKHZ",9)
                                                                               
^SCR("P1LKHZ",10)
                                                                               
^SCR("P1LKHZ",11)
                                                                               
^SCR("P1LKHZ",12)
                                                                               
^SCR("P1LKHZ",13)
                                                                               
^SCR("P1LKHZ",14)
                                                                               
^SCR("P1LKHZ",15)
                                                                               
^SCR("P1LKHZ",16)
                                                                               
^SCR("P1LKHZ",17)
                                                                               
^SCR("P1LKHZ",18)
                                                                               
^SCR("P1LKHZ",19)
                                                                               
^SCR("P1LKHZ",20)
  $1                                                                           
^SCR("P1LKHZ","A",1)

^SCR("P1LKHZ","A",2)
Š‰˜€šŒ„”—„�š…‡…—Œ‡"…ƒ
^SCR("P1LKHZ","A",3)

^SCR("P1LKHZ","A",4)

^SCR("P1LKHZ","A",5)
�‰™…Œšš…Ž‹™…ŒšŠ˜’„�—‡…—Œ�™‡…—Œ'‘Ž
^SCR("P1LKHZ","A",6)
-------------------------------------------------------------
^SCR("P1LKHZ","A",7)

^SCR("P1LKHZ","A",8)

^SCR("P1LKHZ","A",9)

^SCR("P1LKHZ","A",10)

^SCR("P1LKHZ","A",11)

^SCR("P1LKHZ","A",12)

^SCR("P1LKHZ","A",13)

^SCR("P1LKHZ","A",14)

^SCR("P1LKHZ","A",15)

^SCR("P1LKHZ","A",16)

^SCR("P1LKHZ","A",17)

^SCR("P1LKHZ","A",18)

^SCR("P1LKHZ","A",19)

^SCR("P1LKHZ","A",20)

^SCR("P1LKHZ","AV",1)

^SCR("P1LKHZ","AV",2)
lhrt,kvpevc,ujuekj"us
^SCR("P1LKHZ","AV",3)

^SCR("P1LKHZ","AV",4)

^SCR("P1LKHZ","AV",5)
ohauk,,unfauk,lrgvbejuekoajuekwxn
^SCR("P1LKHZ","AV",6)
-------------------------------------------------------------
^SCR("P1LKHZ","AV",7)

^SCR("P1LKHZ","AV",8)

^SCR("P1LKHZ","AV",9)

^SCR("P1LKHZ","AV",10)

^SCR("P1LKHZ","AV",11)

^SCR("P1LKHZ","AV",12)

^SCR("P1LKHZ","AV",13)

^SCR("P1LKHZ","AV",14)

^SCR("P1LKHZ","AV",15)

^SCR("P1LKHZ","AV",16)

^SCR("P1LKHZ","AV",17)

^SCR("P1LKHZ","AV",18)

^SCR("P1LKHZ","AV",19)

^SCR("P1LKHZ","AV",20)

^SCR("P1LKHZ","G",1,"CRD")
6,71,E,10,0
^SCR("P1LKHZ","G",1,"HELP")

^SCR("P1LKHZ","G",1,"LMAX")
10
^SCR("P1LKHZ","G",1,"MUMPS1")

^SCR("P1LKHZ","G",1,"MUMPS2")

^SCR("P1LKHZ","G",1,"OUTPUT")

^SCR("P1LKHZ","G",1,"SHEM")
 gewl 'qn 
^SCR("P1LKHZ","G",1,"TYP")
E
^SCR("P1LKHZ","G",2,"CRD")
6,60,H,20,0
^SCR("P1LKHZ","G",2,"HELP")

^SCR("P1LKHZ","G",2,"LMAX")
20
^SCR("P1LKHZ","G",2,"MUMPS1")

^SCR("P1LKHZ","G",2,"MUMPS2")

^SCR("P1LKHZ","G",2,"OUTPUT")

^SCR("P1LKHZ","G",2,"SHEM")
       gewl my      
^SCR("P1LKHZ","G",2,"TYP")
H
^SCR("P1LKHZ","G",3,"CRD")
6,39,N,8,2
^SCR("P1LKHZ","G",3,"HELP")

^SCR("P1LKHZ","G",3,"LMAX")
8
^SCR("P1LKHZ","G",3,"MUMPS1")

^SCR("P1LKHZ","G",3,"MUMPS2")

^SCR("P1LKHZ","G",3,"OUTPUT")

^SCR("P1LKHZ","G",3,"SHEM")
   dpw  
^SCR("P1LKHZ","G",3,"TYP")
N
^SCR("P1LKHZ","G",4,"CRD")
6,30,N,9,2
^SCR("P1LKHZ","G",4,"HELP")

^SCR("P1LKHZ","G",4,"LMAX")
10
^SCR("P1LKHZ","G",4,"MUMPS1")

^SCR("P1LKHZ","G",4,"MUMPS2")

^SCR("P1LKHZ","G",4,"OUTPUT")

^SCR("P1LKHZ","G",4,"SHEM")
 yelz jxr 
^SCR("P1LKHZ","G",4,"TYP")
N
^SCR("P1LKHZ","G",5,"CRD")
6,19,E,5,0
^SCR("P1LKHZ","G",5,"HELP")

^SCR("P1LKHZ","G",5,"LMAX")
13
^SCR("P1LKHZ","G",5,"MUMPS1")

^SCR("P1LKHZ","G",5,"MUMPS2")

^SCR("P1LKHZ","G",5,"SHEM")
 miyelz zenk 
^SCR("P1LKHZ","G",5,"TYP")
E
^SCR("P1LKHZ","G","DEL")

^SCR("P1LKHZ","G","MAX")
99999
^SCR("P1LKHZ","G","NAME","KANA")
3
^SCR("P1LKHZ","G","NAME","KMTL")
5
^SCR("P1LKHZ","G","NAME","LKH")
1
^SCR("P1LKHZ","G","NAME","LKH1")
2
^SCR("P1LKHZ","G","NAME","TL")
4
^SCR("P1LKHZ","G","NM",1)
LKH
^SCR("P1LKHZ","G","NM",2)
LKH1
^SCR("P1LKHZ","G","NM",3)
KANA
^SCR("P1LKHZ","G","NM",4)
TL
^SCR("P1LKHZ","G","NM",5)
KMTL
^SCR("P1LKHZ","G","RB")
5,3,21,76
^SCR("P1LKHZ","G","REF")
^TEMP($P,"L"
^SCR("P1LKHZ","G","RZD")
\
^SCR("P1LKHZ","G","STEP")
1
^SCR("P1LKHZ","G","STG")
     : miyelz zenk : yelz jxr :   dpw  :       gewl my      : gewl 'qn :       
^SCR("P1LKHZ","G","VG")
7
^SCR("P1LKHZ","NAME")
(X,Z) zegewll zexikn g"ec
^SCR("P1LKHZ","P",5,"CRD")
2,21,D,8,0
^SCR("P1LKHZ","P",5,"HELP")

^SCR("P1LKHZ","P",5,"LMAX")
9
^SCR("P1LKHZ","P",5,"MUMPS1")

^SCR("P1LKHZ","P",5,"MUMPS2")

^SCR("P1LKHZ","P",5,"OUTPUT")

^SCR("P1LKHZ","P",5,"TYP")
D
^SCR("P1LKHZ","P","NAME","DAT1")
5
^SCR("P1LKHZ","P","NM",5)
DAT1
^SCR("P1LKWK")
H
^SCR("P1LKWK",1)
               # reay ini itl zepnfd milawny zegewl zlah #                     
^SCR("P1LKWK",2)
                                                                               
^SCR("P1LKWK",3)
                                                                      1$       
^SCR("P1LKWK",4)
                           :         gewl my        :  gewl 'qn  :             
^SCR("P1LKWK",5)
                                                                               
^SCR("P1LKWK",6)
                                                                               
^SCR("P1LKWK",7)
                                                                               
^SCR("P1LKWK",8)
                                                                               
^SCR("P1LKWK",9)
                                                                               
^SCR("P1LKWK",10)
                                                                               
^SCR("P1LKWK",11)
                                                                               
^SCR("P1LKWK",12)
                                                                               
^SCR("P1LKWK",13)
                                                                               
^SCR("P1LKWK",14)
                                                                               
^SCR("P1LKWK",15)
                                                                               
^SCR("P1LKWK",16)
                                                                               
^SCR("P1LKWK",17)
                                                                               
^SCR("P1LKWK",18)
                                                                               
^SCR("P1LKWK",19)
                                                                               
^SCR("P1LKWK",20)
                                                                               
^SCR("P1LKWK",21)
                       $1                                                      
^SCR("P1LKWK","A",1)
’…�™‰Ž‰‰”Œš…�Ž†„�‰Œ�—Ž™š…‡…—ŒšŒ�ˆ
^SCR("P1LKWK","A",2)

^SCR("P1LKWK","A",3)

^SCR("P1LKWK","A",4)
‡…—Œ�™‡…—Œ'‘Ž
^SCR("P1LKWK","A",5)
------------------------------------
^SCR("P1LKWK","A",6)

^SCR("P1LKWK","A",7)

^SCR("P1LKWK","A",8)

^SCR("P1LKWK","A",9)

^SCR("P1LKWK","A",10)

^SCR("P1LKWK","A",11)

^SCR("P1LKWK","A",12)

^SCR("P1LKWK","A",13)

^SCR("P1LKWK","A",14)

^SCR("P1LKWK","A",15)

^SCR("P1LKWK","A",16)

^SCR("P1LKWK","A",17)

^SCR("P1LKWK","A",18)

^SCR("P1LKWK","A",19)

^SCR("P1LKWK","A",20)

^SCR("P1LKWK","A",21)

^SCR("P1LKWK","AV",1)
gucahnhhpk,ubnzvohkcena,ujuek,kcy
^SCR("P1LKWK","AV",2)

^SCR("P1LKWK","AV",3)

^SCR("P1LKWK","AV",4)
juekoajuekwxn
^SCR("P1LKWK","AV",5)
------------------------------------
^SCR("P1LKWK","AV",6)

^SCR("P1LKWK","AV",7)

^SCR("P1LKWK","AV",8)

^SCR("P1LKWK","AV",9)

^SCR("P1LKWK","AV",10)

^SCR("P1LKWK","AV",11)

^SCR("P1LKWK","AV",12)

^SCR("P1LKWK","AV",13)

^SCR("P1LKWK","AV",14)

^SCR("P1LKWK","AV",15)

^SCR("P1LKWK","AV",16)

^SCR("P1LKWK","AV",17)

^SCR("P1LKWK","AV",18)

^SCR("P1LKWK","AV",19)

^SCR("P1LKWK","AV",20)

^SCR("P1LKWK","AV",21)

^SCR("P1LKWK","G",1,"CHECK")
Y
^SCR("P1LKWK","G",1,"CRD")
5,65,E,10,0
^SCR("P1LKWK","G",1,"CREAT")

^SCR("P1LKWK","G",1,"FNC")

^SCR("P1LKWK","G",1,"GLOB")
LKH
^SCR("P1LKWK","G",1,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1LKWK","G",1,"LMAX")
12
^SCR("P1LKWK","G",1,"MUMPS1")

^SCR("P1LKWK","G",1,"MUMPS2")

^SCR("P1LKWK","G",1,"MUST")

^SCR("P1LKWK","G",1,"NLN")
20
^SCR("P1LKWK","G",1,"NS")
J
^SCR("P1LKWK","G",1,"RZD")
*
^SCR("P1LKWK","G",1,"SHEM")
  gewl 'qn  
^SCR("P1LKWK","G",1,"TOPB")
8
^SCR("P1LKWK","G",1,"TYP")
E
^SCR("P1LKWK","G",1,"VRB")
LK1
^SCR("P1LKWK","G",2,"CRD")
5,52,H,20,0
^SCR("P1LKWK","G",2,"HELP")

^SCR("P1LKWK","G",2,"LMAX")
24
^SCR("P1LKWK","G",2,"MUMPS1")

^SCR("P1LKWK","G",2,"MUMPS2")

^SCR("P1LKWK","G",2,"OUTPUT")

^SCR("P1LKWK","G",2,"SHEM")
         gewl my        
^SCR("P1LKWK","G",2,"TYP")
H
^SCR("P1LKWK","G","DEL")
Y
^SCR("P1LKWK","G","MAX")
99999
^SCR("P1LKWK","G","NAME","LK1")
2
^SCR("P1LKWK","G","NAME","LK2")
1
^SCR("P1LKWK","G","NM",1)
LK2
^SCR("P1LKWK","G","NM",2)
LK1
^SCR("P1LKWK","G","RB")
4,24,22,72
^SCR("P1LKWK","G","REF")
^TEMP($P,"WK"
^SCR("P1LKWK","G","RZD")
\
^SCR("P1LKWK","G","STEP")
1
^SCR("P1LKWK","G","STG")
                           :         gewl my        :  gewl 'qn  :             
^SCR("P1LKWK","G","VG")
6
^SCR("P1LKWK","NAME")

^SCR("P1MAM")
H
^SCR("P1MAM",1)
                         # n"rn ly dixehqd zlah #                              
^SCR("P1MAM",2)
                                                                               
^SCR("P1MAM",3)
                                                           1$                  
^SCR("P1MAM",4)
                               :  n"rn daeb  : jix`z cr :                      
^SCR("P1MAM",5)
                                                                               
^SCR("P1MAM",6)
                                                                               
^SCR("P1MAM",7)
                                                                               
^SCR("P1MAM",8)
                                                                               
^SCR("P1MAM",9)
                                                                               
^SCR("P1MAM",10)
                                                                               
^SCR("P1MAM",11)
                                                                               
^SCR("P1MAM",12)
                                                                               
^SCR("P1MAM",13)
                                                                               
^SCR("P1MAM",14)
                                                                               
^SCR("P1MAM",15)
                                                                               
^SCR("P1MAM",16)
                                                                               
^SCR("P1MAM",17)
                                                                               
^SCR("P1MAM",18)
                                                                               
^SCR("P1MAM",19)
                                                                               
^SCR("P1MAM",20)
                                                                               
^SCR("P1MAM",21)
                                                                               
^SCR("P1MAM",22)
                          $1                                                   
^SCR("P1MAM","A",1)
Ž"’ŽŒ™„‰˜…ˆ‘„šŒ�ˆ
^SCR("P1MAM","A",2)

^SCR("P1MAM","A",3)

^SCR("P1MAM","A",4)
Ž"’Ž„�…‚Š‰˜€šƒ’
^SCR("P1MAM","A",5)
-----------------------
^SCR("P1MAM","A",6)

^SCR("P1MAM","A",7)

^SCR("P1MAM","A",8)

^SCR("P1MAM","A",9)

^SCR("P1MAM","A",10)

^SCR("P1MAM","A",11)

^SCR("P1MAM","A",12)

^SCR("P1MAM","A",13)

^SCR("P1MAM","A",14)

^SCR("P1MAM","A",15)

^SCR("P1MAM","A",16)

^SCR("P1MAM","A",17)

^SCR("P1MAM","A",18)

^SCR("P1MAM","A",19)

^SCR("P1MAM","A",20)

^SCR("P1MAM","A",21)

^SCR("P1MAM","A",22)

^SCR("P1MAM","AV",1)
n"gnkavhruyxv,kcy
^SCR("P1MAM","AV",2)

^SCR("P1MAM","AV",3)

^SCR("P1MAM","AV",4)
n"gnvcudlhrt,sg
^SCR("P1MAM","AV",5)
-----------------------
^SCR("P1MAM","AV",6)

^SCR("P1MAM","AV",7)

^SCR("P1MAM","AV",8)

^SCR("P1MAM","AV",9)

^SCR("P1MAM","AV",10)

^SCR("P1MAM","AV",11)

^SCR("P1MAM","AV",12)

^SCR("P1MAM","AV",13)

^SCR("P1MAM","AV",14)

^SCR("P1MAM","AV",15)

^SCR("P1MAM","AV",16)

^SCR("P1MAM","AV",17)

^SCR("P1MAM","AV",18)

^SCR("P1MAM","AV",19)

^SCR("P1MAM","AV",20)

^SCR("P1MAM","AV",21)

^SCR("P1MAM","AV",22)

^SCR("P1MAM","G",1,"CRD")
5,56,D,8,0
^SCR("P1MAM","G",1,"HELP")

^SCR("P1MAM","G",1,"LMAX")
10
^SCR("P1MAM","G",1,"MUMPS1")

^SCR("P1MAM","G",1,"MUMPS2")

^SCR("P1MAM","G",1,"MUST")

^SCR("P1MAM","G",1,"SHEM")
 jix`z cr 
^SCR("P1MAM","G",1,"TYP")
D
^SCR("P1MAM","G",2,"CRD")
5,45,N,5,2
^SCR("P1MAM","G",2,"HELP")

^SCR("P1MAM","G",2,"LMAX")
13
^SCR("P1MAM","G",2,"MUMPS1")

^SCR("P1MAM","G",2,"MUMPS2")

^SCR("P1MAM","G",2,"SHEM")
  n"rn daeb  
^SCR("P1MAM","G",2,"TYP")
N
^SCR("P1MAM","G","DEL")
Y
^SCR("P1MAM","G","MAX")
999
^SCR("P1MAM","G","NAME","MAM")
2
^SCR("P1MAM","G","NAME","TRH")
1
^SCR("P1MAM","G","NM",1)
TRH
^SCR("P1MAM","G","NM",2)
MAM
^SCR("P1MAM","G","RB")
4,27,23,61
^SCR("P1MAM","G","REF")
^TEMP($P
^SCR("P1MAM","G","RZD")
\
^SCR("P1MAM","G","STEP")
1
^SCR("P1MAM","G","STG")
                               :  n"rn daeb  : jix`z cr :                      
^SCR("P1MAM","G","VG")
6
^SCR("P1MAM","NAME")

^SCR("P1MDP")
H
^SCR("P1MDP",1)
                                 # gahn zeqtcn ly zexbcd #                     
^SCR("P1MDP",2)
                                                                               
^SCR("P1MDP",3)
                                                                           1$  
^SCR("P1MDP",4)
        : wzrd : sevtiv :     dxrd     : hxet 'qn :   zqtcn mbc   :beq: 'qn    
^SCR("P1MDP",5)
                                                                               
^SCR("P1MDP",6)
                                                                               
^SCR("P1MDP",7)
                                                                               
^SCR("P1MDP",8)
                                                                               
^SCR("P1MDP",9)
                                                                               
^SCR("P1MDP",10)
                                                                               
^SCR("P1MDP",11)
                                                                               
^SCR("P1MDP",12)
                                                                               
^SCR("P1MDP",13)
                                                                               
^SCR("P1MDP",14)
                                                                               
^SCR("P1MDP",15)
                                                                               
^SCR("P1MDP",16)
                                                                               
^SCR("P1MDP",17)
  $1                                                                           
^SCR("P1MDP","A",1)
‡�ˆŽš…‘”ƒŽŒ™š…˜‚ƒ„
^SCR("P1MDP","A",2)

^SCR("P1MDP","A",3)

^SCR("P1MDP","A",4)
—š’„“…–”‰–„˜’„ˆ˜…”'‘Žš‘”ƒŽ�‚ƒ‚…‘'‘Ž
^SCR("P1MDP","A",5)
--------------------------------------------------------
^SCR("P1MDP","A",6)

^SCR("P1MDP","A",7)

^SCR("P1MDP","A",8)

^SCR("P1MDP","A",9)

^SCR("P1MDP","A",10)

^SCR("P1MDP","A",11)

^SCR("P1MDP","A",12)

^SCR("P1MDP","A",13)

^SCR("P1MDP","A",14)

^SCR("P1MDP","A",15)

^SCR("P1MDP","A",16)

^SCR("P1MDP","A",17)

^SCR("P1MDP","AV",1)
jcyn,uxpsnka,urdsv
^SCR("P1MDP","AV",2)

^SCR("P1MDP","AV",3)

^SCR("P1MDP","AV",4)
e,gv;umphmvrgvyrupwxn,xpsnodsduxwxn
^SCR("P1MDP","AV",5)
--------------------------------------------------------
^SCR("P1MDP","AV",6)

^SCR("P1MDP","AV",7)

^SCR("P1MDP","AV",8)

^SCR("P1MDP","AV",9)

^SCR("P1MDP","AV",10)

^SCR("P1MDP","AV",11)

^SCR("P1MDP","AV",12)

^SCR("P1MDP","AV",13)

^SCR("P1MDP","AV",14)

^SCR("P1MDP","AV",15)

^SCR("P1MDP","AV",16)

^SCR("P1MDP","AV",17)

^SCR("P1MDP","G",1,"CHECK")
Y
^SCR("P1MDP","G",1,"CRD")
5,70,E,2,0
^SCR("P1MDP","G",1,"CREAT")

^SCR("P1MDP","G",1,"FNC")

^SCR("P1MDP","G",1,"GLOB")
P1MDPS
^SCR("P1MDP","G",1,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1MDP","G",1,"LMAX")
3
^SCR("P1MDP","G",1,"MUMPS1")

^SCR("P1MDP","G",1,"MUMPS2")
I MDPS'=6 S $P(%MBG("OU"),"\",5,6)="1\1"
^SCR("P1MDP","G",1,"MUST")

^SCR("P1MDP","G",1,"NLN")
20
^SCR("P1MDP","G",1,"NS")
zeqtcn ibeq zlah
^SCR("P1MDP","G",1,"RZD")
\
^SCR("P1MDP","G",1,"SHEM")
beq
^SCR("P1MDP","G",1,"TOPB")
8
^SCR("P1MDP","G",1,"TYP")
E
^SCR("P1MDP","G",1,"VRB")
MDPN
^SCR("P1MDP","G",2,"CRD")
5,66,E,12,0
^SCR("P1MDP","G",2,"HELP")

^SCR("P1MDP","G",2,"LMAX")
15
^SCR("P1MDP","G",2,"MUMPS1")

^SCR("P1MDP","G",2,"MUMPS2")

^SCR("P1MDP","G",2,"OUTPUT")

^SCR("P1MDP","G",2,"SHEM")
   zqtcn mbc   
^SCR("P1MDP","G",2,"TYP")
E
^SCR("P1MDP","G",3,"CRD")
5,50,E,4,0
^SCR("P1MDP","G",3,"HELP")

^SCR("P1MDP","G",3,"LMAX")
10
^SCR("P1MDP","G",3,"MUMPS1")

^SCR("P1MDP","G",3,"MUMPS2")

^SCR("P1MDP","G",3,"SHEM")
 hxet 'qn 
^SCR("P1MDP","G",3,"TYP")
E
^SCR("P1MDP","G",4,"CRD")
5,39,H,14,0
^SCR("P1MDP","G",4,"HELP")

^SCR("P1MDP","G",4,"LMAX")
14
^SCR("P1MDP","G",4,"MUMPS1")

^SCR("P1MDP","G",4,"MUMPS2")

^SCR("P1MDP","G",4,"MUST")

^SCR("P1MDP","G",4,"SHEM")
     dxrd     
^SCR("P1MDP","G",4,"TYP")
H
^SCR("P1MDP","G",5,"CRD")
5,24,H,1,0
^SCR("P1MDP","G",5,"HELP")
0 - `l , 1 - ok 
^SCR("P1MDP","G",5,"LMAX")
8
^SCR("P1MDP","G",5,"MUMPS1")

^SCR("P1MDP","G",5,"MUMPS2")
N %FNAME S %FNAME="BEEP" D ^%L1BDO
^SCR("P1MDP","G",5,"SHEM")
 sevtiv 
^SCR("P1MDP","G",5,"TYP")
H
^SCR("P1MDP","G",6,"CRD")
5,15,H,1,0
^SCR("P1MDP","G",6,"HELP")
0 - `l , 1 - ok 
^SCR("P1MDP","G",6,"LMAX")
6
^SCR("P1MDP","G",6,"MUMPS1")

^SCR("P1MDP","G",6,"MUMPS2")
N %FNAME S %FNAME="ETEK" D ^%L1BDO
^SCR("P1MDP","G",6,"SHEM")
 wzrd 
^SCR("P1MDP","G",6,"TYP")
H
^SCR("P1MDP","G","DEL")
Y
^SCR("P1MDP","G","MAX")
99999
^SCR("P1MDP","G","NAME","BEEP")
5
^SCR("P1MDP","G","NAME","ETEK")
6
^SCR("P1MDP","G","NAME","HRA")
4
^SCR("P1MDP","G","NAME","MDPN")
2
^SCR("P1MDP","G","NAME","MDPS")
1
^SCR("P1MDP","G","NAME","PORT")
3
^SCR("P1MDP","G","NM",1)
MDPS
^SCR("P1MDP","G","NM",2)
MDPN
^SCR("P1MDP","G","NM",3)
PORT
^SCR("P1MDP","G","NM",4)
HRA
^SCR("P1MDP","G","NM",5)
BEEP
^SCR("P1MDP","G","NM",6)
ETEK
^SCR("P1MDP","G","RB")
4,3,18,77
^SCR("P1MDP","G","REF")
^TEMP($P
^SCR("P1MDP","G","RZD")
\
^SCR("P1MDP","G","STEP")
1
^SCR("P1MDP","G","STG")
        : wzrd : sevtiv :     dxrd     : hxet 'qn :   zqtcn mbc   :beq: 'qn    
^SCR("P1MDP","G","VG")
6
^SCR("P1MDP","NAME")
gahn zeqtcn ly zexcbcd
^SCR("P1MDPRMI")
H
^SCR("P1MDPRMI",1)
                       # xg` aygndn dqtcd zxard #                              
^SCR("P1MDPRMI",2)
                                                                               
^SCR("P1MDPRMI",3)
                                      {10 : xg` aygndn mipezp zxardl hxet 'qn  
^SCR("P1MDPRMI",4)
                                                                           1$  
^SCR("P1MDPRMI",5)
    :xg` aygna hxet 'qn:     dxrd     : hxet 'qn :   zqtcn mbc   :beq: 'qn     
^SCR("P1MDPRMI",6)
                                                                               
^SCR("P1MDPRMI",7)
                                                                               
^SCR("P1MDPRMI",8)
                                                                               
^SCR("P1MDPRMI",9)
                                                                               
^SCR("P1MDPRMI",10)
                                                                               
^SCR("P1MDPRMI",11)
                                                                               
^SCR("P1MDPRMI",12)
                                                                               
^SCR("P1MDPRMI",13)
                                                                               
^SCR("P1MDPRMI",14)
                                                                               
^SCR("P1MDPRMI",15)
                                                                               
^SCR("P1MDPRMI",16)
                                                                               
^SCR("P1MDPRMI",17)
                                                                               
^SCR("P1MDPRMI",18)
                                                                               
^SCR("P1MDPRMI",19)
  $1                                                                           
^SCR("P1MDPRMI","A",1)
˜‡€�™‡Ž„Ž„‘”ƒ„š˜�’„
^SCR("P1MDPRMI","A",2)

^SCR("P1MDPRMI","A",3)
:˜‡€�™‡Ž„Ž�‰�…š�š˜�’„Œˆ˜…”'‘Ž
^SCR("P1MDPRMI","A",4)

^SCR("P1MDPRMI","A",5)
˜‡€�™‡Ž�ˆ˜…”'‘Ž„˜’„ˆ˜…”'‘Žš‘”ƒŽ�‚ƒ‚…‘'‘Ž
^SCR("P1MDPRMI","A",6)
------------------------------------------------------------
^SCR("P1MDPRMI","A",7)

^SCR("P1MDPRMI","A",8)

^SCR("P1MDPRMI","A",9)

^SCR("P1MDPRMI","A",10)

^SCR("P1MDPRMI","A",11)

^SCR("P1MDPRMI","A",12)

^SCR("P1MDPRMI","A",13)

^SCR("P1MDPRMI","A",14)

^SCR("P1MDPRMI","A",15)

^SCR("P1MDPRMI","A",16)

^SCR("P1MDPRMI","A",17)

^SCR("P1MDPRMI","A",18)

^SCR("P1MDPRMI","A",19)

^SCR("P1MDPRMI","AV",1)
rjtcajnvnvxpsv,rcgv
^SCR("P1MDPRMI","AV",2)

^SCR("P1MDPRMI","AV",3)
:rjtcajnvnohbu,b,rcgvkyrupwxn
^SCR("P1MDPRMI","AV",4)

^SCR("P1MDPRMI","AV",5)
rjtcajncyrupwxnvrgvyrupwxn,xpsnodsduxwxn
^SCR("P1MDPRMI","AV",6)
------------------------------------------------------------
^SCR("P1MDPRMI","AV",7)

^SCR("P1MDPRMI","AV",8)

^SCR("P1MDPRMI","AV",9)

^SCR("P1MDPRMI","AV",10)

^SCR("P1MDPRMI","AV",11)

^SCR("P1MDPRMI","AV",12)

^SCR("P1MDPRMI","AV",13)

^SCR("P1MDPRMI","AV",14)

^SCR("P1MDPRMI","AV",15)

^SCR("P1MDPRMI","AV",16)

^SCR("P1MDPRMI","AV",17)

^SCR("P1MDPRMI","AV",18)

^SCR("P1MDPRMI","AV",19)

^SCR("P1MDPRMI","G",1,"CRD")
6,69,E,2,0
^SCR("P1MDPRMI","G",1,"HELP")

^SCR("P1MDPRMI","G",1,"LMAX")
3
^SCR("P1MDPRMI","G",1,"MUMPS1")

^SCR("P1MDPRMI","G",1,"MUMPS2")

^SCR("P1MDPRMI","G",1,"OUTPUT")

^SCR("P1MDPRMI","G",1,"SHEM")
beq
^SCR("P1MDPRMI","G",1,"TYP")
E
^SCR("P1MDPRMI","G",2,"CRD")
6,65,E,14,0
^SCR("P1MDPRMI","G",2,"HELP")

^SCR("P1MDPRMI","G",2,"LMAX")
15
^SCR("P1MDPRMI","G",2,"MUMPS1")

^SCR("P1MDPRMI","G",2,"MUMPS2")

^SCR("P1MDPRMI","G",2,"OUTPUT")

^SCR("P1MDPRMI","G",2,"SHEM")
   zqtcn mbc   
^SCR("P1MDPRMI","G",2,"TYP")
E
^SCR("P1MDPRMI","G",3,"CRD")
6,49,E,2,0
^SCR("P1MDPRMI","G",3,"HELP")

^SCR("P1MDPRMI","G",3,"LMAX")
10
^SCR("P1MDPRMI","G",3,"MUMPS1")

^SCR("P1MDPRMI","G",3,"MUMPS2")

^SCR("P1MDPRMI","G",3,"OUTPUT")

^SCR("P1MDPRMI","G",3,"SHEM")
 hxet 'qn 
^SCR("P1MDPRMI","G",3,"TYP")
E
^SCR("P1MDPRMI","G",4,"CRD")
6,38,H,14,0
^SCR("P1MDPRMI","G",4,"HELP")

^SCR("P1MDPRMI","G",4,"LMAX")
14
^SCR("P1MDPRMI","G",4,"MUMPS1")

^SCR("P1MDPRMI","G",4,"MUMPS2")

^SCR("P1MDPRMI","G",4,"OUTPUT")

^SCR("P1MDPRMI","G",4,"SHEM")
     dxrd     
^SCR("P1MDPRMI","G",4,"TYP")
H
^SCR("P1MDPRMI","G",5,"CRD")
6,23,N,2,0
^SCR("P1MDPRMI","G",5,"HELP")

^SCR("P1MDPRMI","G",5,"LMAX")
18
^SCR("P1MDPRMI","G",5,"MUMPS1")

^SCR("P1MDPRMI","G",5,"MUMPS2")

^SCR("P1MDPRMI","G",5,"SHEM")
xg` aygna hxet 'qn
^SCR("P1MDPRMI","G",5,"TYP")
N
^SCR("P1MDPRMI","G","DEL")
Y
^SCR("P1MDPRMI","G","MAX")
1
^SCR("P1MDPRMI","G","NAME","HRA")
4
^SCR("P1MDPRMI","G","NAME","MDPN")
2
^SCR("P1MDPRMI","G","NAME","MDPS")
1
^SCR("P1MDPRMI","G","NAME","PORT")
3
^SCR("P1MDPRMI","G","NAME","PORTA")
5
^SCR("P1MDPRMI","G","NM",1)
MDPS
^SCR("P1MDPRMI","G","NM",2)
MDPN
^SCR("P1MDPRMI","G","NM",3)
PORT
^SCR("P1MDPRMI","G","NM",4)
HRA
^SCR("P1MDPRMI","G","NM",5)
PORTA
^SCR("P1MDPRMI","G","RB")
5,3,20,77
^SCR("P1MDPRMI","G","REF")
^TEMP($P
^SCR("P1MDPRMI","G","RZD")
\
^SCR("P1MDPRMI","G","STEP")
1
^SCR("P1MDPRMI","G","STG")
    :xg` aygna hxet 'qn:     dxrd     : hxet 'qn :   zqtcn mbc   :beq: 'qn     
^SCR("P1MDPRMI","G","VG")
7
^SCR("P1MDPRMI","NAME")

^SCR("P1MDPRMI","P",10,"CRD")
3,38,N,2,0
^SCR("P1MDPRMI","P",10,"HELP")

^SCR("P1MDPRMI","P",10,"LMAX")
4
^SCR("P1MDPRMI","P",10,"MUMPS1")

^SCR("P1MDPRMI","P",10,"MUMPS2")

^SCR("P1MDPRMI","P",10,"MUST")

^SCR("P1MDPRMI","P",10,"TYP")
N
^SCR("P1MDPRMI","P","NAME","PORTIN")
10
^SCR("P1MDPRMI","P","NM",10)
PORTIN
^SCR("P1MDPRMO")
H
^SCR("P1MDPRMO",1)
                        # xg` aygnl dqtcd zxard #                              
^SCR("P1MDPRMO",2)
                                                                               
^SCR("P1MDPRMO",3)
                                       {10 : xg` aygnl mipezp zxardl hxet 'qn  
^SCR("P1MDPRMO",4)
                                                                           1$  
^SCR("P1MDPRMO",5)
             :xg` aygnl:     dxrd     : hxet 'qn :   zqtcn mbc   :beq: 'qn     
^SCR("P1MDPRMO",6)
                                                                               
^SCR("P1MDPRMO",7)
                                                                               
^SCR("P1MDPRMO",8)
                                                                               
^SCR("P1MDPRMO",9)
                                                                               
^SCR("P1MDPRMO",10)
                                                                               
^SCR("P1MDPRMO",11)
                                                                               
^SCR("P1MDPRMO",12)
                                                                               
^SCR("P1MDPRMO",13)
                                                                               
^SCR("P1MDPRMO",14)
                                                                               
^SCR("P1MDPRMO",15)
                                                                               
^SCR("P1MDPRMO",16)
                                                                               
^SCR("P1MDPRMO",17)
                                                                               
^SCR("P1MDPRMO",18)
                                                                               
^SCR("P1MDPRMO",19)
  $1                                                                           
^SCR("P1MDPRMO","A",1)
˜‡€�™‡ŽŒ„‘”ƒ„š˜�’„
^SCR("P1MDPRMO","A",2)

^SCR("P1MDPRMO","A",3)
:˜‡€�™‡ŽŒ�‰�…š�š˜�’„Œˆ˜…”'‘Ž
^SCR("P1MDPRMO","A",4)

^SCR("P1MDPRMO","A",5)
˜‡€�™‡ŽŒ„˜’„ˆ˜…”'‘Žš‘”ƒŽ�‚ƒ‚…‘'‘Ž
^SCR("P1MDPRMO","A",6)
---------------------------------------------------
^SCR("P1MDPRMO","A",7)

^SCR("P1MDPRMO","A",8)

^SCR("P1MDPRMO","A",9)

^SCR("P1MDPRMO","A",10)

^SCR("P1MDPRMO","A",11)

^SCR("P1MDPRMO","A",12)

^SCR("P1MDPRMO","A",13)

^SCR("P1MDPRMO","A",14)

^SCR("P1MDPRMO","A",15)

^SCR("P1MDPRMO","A",16)

^SCR("P1MDPRMO","A",17)

^SCR("P1MDPRMO","A",18)

^SCR("P1MDPRMO","A",19)

^SCR("P1MDPRMO","AV",1)
rjtcajnkvxpsv,rcgv
^SCR("P1MDPRMO","AV",2)

^SCR("P1MDPRMO","AV",3)
:rjtcajnkohbu,b,rcgvkyrupwxn
^SCR("P1MDPRMO","AV",4)

^SCR("P1MDPRMO","AV",5)
rjtcajnkvrgvyrupwxn,xpsnodsduxwxn
^SCR("P1MDPRMO","AV",6)
---------------------------------------------------
^SCR("P1MDPRMO","AV",7)

^SCR("P1MDPRMO","AV",8)

^SCR("P1MDPRMO","AV",9)

^SCR("P1MDPRMO","AV",10)

^SCR("P1MDPRMO","AV",11)

^SCR("P1MDPRMO","AV",12)

^SCR("P1MDPRMO","AV",13)

^SCR("P1MDPRMO","AV",14)

^SCR("P1MDPRMO","AV",15)

^SCR("P1MDPRMO","AV",16)

^SCR("P1MDPRMO","AV",17)

^SCR("P1MDPRMO","AV",18)

^SCR("P1MDPRMO","AV",19)

^SCR("P1MDPRMO","G",1,"CRD")
6,69,E,2,0
^SCR("P1MDPRMO","G",1,"HELP")

^SCR("P1MDPRMO","G",1,"LMAX")
3
^SCR("P1MDPRMO","G",1,"MUMPS1")

^SCR("P1MDPRMO","G",1,"MUMPS2")

^SCR("P1MDPRMO","G",1,"OUTPUT")

^SCR("P1MDPRMO","G",1,"SHEM")
beq
^SCR("P1MDPRMO","G",1,"TYP")
E
^SCR("P1MDPRMO","G",2,"CRD")
6,65,E,14,0
^SCR("P1MDPRMO","G",2,"HELP")

^SCR("P1MDPRMO","G",2,"LMAX")
15
^SCR("P1MDPRMO","G",2,"MUMPS1")

^SCR("P1MDPRMO","G",2,"MUMPS2")

^SCR("P1MDPRMO","G",2,"OUTPUT")

^SCR("P1MDPRMO","G",2,"SHEM")
   zqtcn mbc   
^SCR("P1MDPRMO","G",2,"TYP")
E
^SCR("P1MDPRMO","G",3,"CRD")
6,49,E,2,0
^SCR("P1MDPRMO","G",3,"HELP")

^SCR("P1MDPRMO","G",3,"LMAX")
10
^SCR("P1MDPRMO","G",3,"MUMPS1")

^SCR("P1MDPRMO","G",3,"MUMPS2")

^SCR("P1MDPRMO","G",3,"OUTPUT")

^SCR("P1MDPRMO","G",3,"SHEM")
 hxet 'qn 
^SCR("P1MDPRMO","G",3,"TYP")
E
^SCR("P1MDPRMO","G",4,"CRD")
6,38,H,14,0
^SCR("P1MDPRMO","G",4,"HELP")

^SCR("P1MDPRMO","G",4,"LMAX")
14
^SCR("P1MDPRMO","G",4,"MUMPS1")

^SCR("P1MDPRMO","G",4,"MUMPS2")

^SCR("P1MDPRMO","G",4,"OUTPUT")

^SCR("P1MDPRMO","G",4,"SHEM")
     dxrd     
^SCR("P1MDPRMO","G",4,"TYP")
H
^SCR("P1MDPRMO","G",5,"CRD")
6,23,E,1,0
^SCR("P1MDPRMO","G",5,"HELP")
<F9> - onql 
^SCR("P1MDPRMO","G",5,"LMAX")
9
^SCR("P1MDPRMO","G",5,"MUMPS1")

^SCR("P1MDPRMO","G",5,"MUMPS2")
D SIMAN^P1MDPRMO
^SCR("P1MDPRMO","G",5,"SHEM")
xg` aygnl
^SCR("P1MDPRMO","G",5,"TYP")
E
^SCR("P1MDPRMO","G","DEL")
Y
^SCR("P1MDPRMO","G","MAX")
1
^SCR("P1MDPRMO","G","NAME","HRA")
4
^SCR("P1MDPRMO","G","NAME","MDPN")
2
^SCR("P1MDPRMO","G","NAME","MDPS")
1
^SCR("P1MDPRMO","G","NAME","PORT")
3
^SCR("P1MDPRMO","G","NAME","SIMAN")
5
^SCR("P1MDPRMO","G","NM",1)
MDPS
^SCR("P1MDPRMO","G","NM",2)
MDPN
^SCR("P1MDPRMO","G","NM",3)
PORT
^SCR("P1MDPRMO","G","NM",4)
HRA
^SCR("P1MDPRMO","G","NM",5)
SIMAN
^SCR("P1MDPRMO","G","RB")
5,3,20,77
^SCR("P1MDPRMO","G","REF")
^TEMP($P
^SCR("P1MDPRMO","G","RZD")
\
^SCR("P1MDPRMO","G","STEP")
1
^SCR("P1MDPRMO","G","STG")
             :xg` aygnl:     dxrd     : hxet 'qn :   zqtcn mbc   :beq: 'qn     
^SCR("P1MDPRMO","G","VG")
7
^SCR("P1MDPRMO","NAME")

^SCR("P1MDPRMO","P",10,"CRD")
3,39,N,2,0
^SCR("P1MDPRMO","P",10,"HELP")

^SCR("P1MDPRMO","P",10,"LMAX")
4
^SCR("P1MDPRMO","P",10,"MUMPS1")

^SCR("P1MDPRMO","P",10,"MUMPS2")

^SCR("P1MDPRMO","P",10,"MUST")

^SCR("P1MDPRMO","P",10,"TYP")
N
^SCR("P1MDPRMO","P","NAME","PORTOUT")
10
^SCR("P1MDPRMO","P","NM",10)
PORTOUT
^SCR("P1MHT")
H
^SCR("P1MHT",1)
                          {                       10} {05   } : xven cew       
^SCR("P1MHT",2)
                                                                               
^SCR("P1MHT",3)
                                                                      1$       
^SCR("P1MHT",4)
      : zetqez aygl : xign ztqez :        hixt  xe`z      :hixt cew:           
^SCR("P1MHT",5)
                                                                               
^SCR("P1MHT",6)
                                                                               
^SCR("P1MHT",7)
                                                                               
^SCR("P1MHT",8)
                                                                               
^SCR("P1MHT",9)
                                                                               
^SCR("P1MHT",10)
                                                                               
^SCR("P1MHT",11)
                                                                               
^SCR("P1MHT",12)
                                                                               
^SCR("P1MHT",13)
                                                                               
^SCR("P1MHT",14)
                                                                               
^SCR("P1MHT",15)
                                                                               
^SCR("P1MHT",16)
                                                                               
^SCR("P1MHT",17)
                                                                               
^SCR("P1MHT",18)
                                                                               
^SCR("P1MHT",19)
                                                                               
^SCR("P1MHT",20)
                                                                               
^SCR("P1MHT",21)
                                                                               
^SCR("P1MHT",22)
  $1                                                                           
^SCR("P1MHT","A",1)
:˜–…Žƒ…—
^SCR("P1MHT","A",2)

^SCR("P1MHT","A",3)

^SCR("P1MHT","A",4)
š…”‘…š�™‡Œ˜‰‡Žš”‘…šˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1MHT","A",5)
---------------------------------------------------------
^SCR("P1MHT","A",6)

^SCR("P1MHT","A",7)

^SCR("P1MHT","A",8)

^SCR("P1MHT","A",9)

^SCR("P1MHT","A",10)

^SCR("P1MHT","A",11)

^SCR("P1MHT","A",12)

^SCR("P1MHT","A",13)

^SCR("P1MHT","A",14)

^SCR("P1MHT","A",15)

^SCR("P1MHT","A",16)

^SCR("P1MHT","A",17)

^SCR("P1MHT","A",18)

^SCR("P1MHT","A",19)

^SCR("P1MHT","A",20)

^SCR("P1MHT","A",21)

^SCR("P1MHT","A",22)

^SCR("P1MHT","AV",1)
:rmunsue
^SCR("P1MHT","AV",2)

^SCR("P1MHT","AV",3)

^SCR("P1MHT","AV",4)
,upxu,cajkrhjn,pxu,yhrprut,yhrpsue
^SCR("P1MHT","AV",5)
---------------------------------------------------------
^SCR("P1MHT","AV",6)

^SCR("P1MHT","AV",7)

^SCR("P1MHT","AV",8)

^SCR("P1MHT","AV",9)

^SCR("P1MHT","AV",10)

^SCR("P1MHT","AV",11)

^SCR("P1MHT","AV",12)

^SCR("P1MHT","AV",13)

^SCR("P1MHT","AV",14)

^SCR("P1MHT","AV",15)

^SCR("P1MHT","AV",16)

^SCR("P1MHT","AV",17)

^SCR("P1MHT","AV",18)

^SCR("P1MHT","AV",19)

^SCR("P1MHT","AV",20)

^SCR("P1MHT","AV",21)

^SCR("P1MHT","AV",22)

^SCR("P1MHT","G",1,"CRD")
5,67,E,8,0
^SCR("P1MHT","G",1,"HELP")

^SCR("P1MHT","G",1,"LMAX")
8
^SCR("P1MHT","G",1,"MUMPS1")

^SCR("P1MHT","G",1,"MUMPS2")

^SCR("P1MHT","G",1,"OUTPUT")

^SCR("P1MHT","G",1,"SHEM")
hixt cew
^SCR("P1MHT","G",1,"TYP")
E
^SCR("P1MHT","G",2,"CRD")
5,58,H,24,0
^SCR("P1MHT","G",2,"HELP")

^SCR("P1MHT","G",2,"LMAX")
24
^SCR("P1MHT","G",2,"MUMPS1")

^SCR("P1MHT","G",2,"MUMPS2")

^SCR("P1MHT","G",2,"OUTPUT")

^SCR("P1MHT","G",2,"SHEM")
        hixt  xe`z      
^SCR("P1MHT","G",2,"TYP")
H
^SCR("P1MHT","G",3,"CRD")
5,33,N,7,2
^SCR("P1MHT","G",3,"HELP")

^SCR("P1MHT","G",3,"LMAX")
12
^SCR("P1MHT","G",3,"MUMPS1")

^SCR("P1MHT","G",3,"MUMPS2")

^SCR("P1MHT","G",3,"SHEM")
 xign ztqez 
^SCR("P1MHT","G",3,"TYP")
N
^SCR("P1MHT","G",4,"CRD")
5,20,N,1,0
^SCR("P1MHT","G",4,"HELP")

^SCR("P1MHT","G",4,"LMAX")
13
^SCR("P1MHT","G",4,"MUMPS1")
S:'$G(MHTSF) MHTSF=0
^SCR("P1MHT","G",4,"MUMPS2")
I MHTSF'=1,MHTSF'=0 S %SC("ER")=1
^SCR("P1MHT","G",4,"SHEM")
 zetqez aygl 
^SCR("P1MHT","G",4,"TYP")
N
^SCR("P1MHT","G","MAX")
999
^SCR("P1MHT","G","NAME","MH")
3
^SCR("P1MHT","G","NAME","MHTSF")
4
^SCR("P1MHT","G","NAME","PAR")
1
^SCR("P1MHT","G","NAME","PAR1")
2
^SCR("P1MHT","G","NM",1)
PAR
^SCR("P1MHT","G","NM",2)
PAR1
^SCR("P1MHT","G","NM",3)
MH
^SCR("P1MHT","G","NM",4)
MHTSF
^SCR("P1MHT","G","RB")
4,3,23,72
^SCR("P1MHT","G","REF")
^TMP($P
^SCR("P1MHT","G","RZD")
\
^SCR("P1MHT","G","STEP")
1
^SCR("P1MHT","G","STG")
      : zetqez aygl : xign ztqez :        hixt  xe`z      :hixt cew:           
^SCR("P1MHT","G","VG")
6
^SCR("P1MHT","NAME")
zetqez zveaw mr hixtl oexign
^SCR("P1MHT","P",5,"CHECK")
Y
^SCR("P1MHT","P",5,"CRD")
1,54,E,6,0
^SCR("P1MHT","P",5,"FNC")
F6,F7,F8
^SCR("P1MHT","P",5,"GLOB")
PAR
^SCR("P1MHT","P",5,"HELP")
<F8> mipexign ,<F7> zetqez zveaw mr mihixt dbvd 
^SCR("P1MHT","P",5,"LMAX")
6
^SCR("P1MHT","P",5,"MUMPS1")

^SCR("P1MHT","P",5,"MUMPS2")
D MUZAR^P1MHT
^SCR("P1MHT","P",5,"MUST")

^SCR("P1MHT","P",5,"NLN")
20
^SCR("P1MHT","P",5,"RZD")
\
^SCR("P1MHT","P",5,"TOPB")
8
^SCR("P1MHT","P",5,"TYP")
E
^SCR("P1MHT","P",5,"VRB")
MUZAR1
^SCR("P1MHT","P",10,"CRD")
1,53,H,26
^SCR("P1MHT","P",10,"HELP")

^SCR("P1MHT","P",10,"LMAX")
26
^SCR("P1MHT","P",10,"MUMPS1")

^SCR("P1MHT","P",10,"MUMPS2")

^SCR("P1MHT","P",10,"OUTPUT")

^SCR("P1MHT","P",10,"TYP")
H
^SCR("P1MHT","P","NAME","MUZAR")
5
^SCR("P1MHT","P","NAME","MUZAR1")
10
^SCR("P1MHT","P","NM",5)
MUZAR
^SCR("P1MHT","P","NM",10)
MUZAR1
^SCR("P1MK")
H
^SCR("P1MK",1)
                              # zepnfd icilwn g"ec #                           
^SCR("P1MK",2)
                                                                               
^SCR("P1MK",3)
                     {10      }:jixrz cr    {05      }:jix`zn                  
^SCR("P1MK",4)
                                                                     1$        
^SCR("P1MK",5)
     :         gewld my     : gewl 'qn : mekq :zipeayg 'qn: jix`z  :           
^SCR("P1MK",6)
                                                                               
^SCR("P1MK",7)
                                                                               
^SCR("P1MK",8)
                                                                               
^SCR("P1MK",9)
                                                                               
^SCR("P1MK",10)
                                                                               
^SCR("P1MK",11)
                                                                               
^SCR("P1MK",12)
                                                                               
^SCR("P1MK",13)
                                                                               
^SCR("P1MK",14)
                                                                               
^SCR("P1MK",15)
                                                                               
^SCR("P1MK",16)
                                                                               
^SCR("P1MK",17)
                                                                               
^SCR("P1MK",18)
                                                                               
^SCR("P1MK",19)
                                                                               
^SCR("P1MK",20)
   $1                                                                          
^SCR("P1MK",21)
                               {20       }: mley  {15  }:zeipeayg k"dq         
^SCR("P1MK","A",1)
š…�Ž†„‰ƒ‰Œ—Ž‡"…ƒ
^SCR("P1MK","A",2)

^SCR("P1MK","A",3)
:Š‰˜’šƒ’:Š‰˜€šŽ
^SCR("P1MK","A",4)

^SCR("P1MK","A",5)
‡…—Œ„�™‡…—Œ'‘Ž�…‹‘š‰�…�™‡'‘ŽŠ‰˜€š
^SCR("P1MK","A",6)
---------------------------------------------------------
^SCR("P1MK","A",7)

^SCR("P1MK","A",8)

^SCR("P1MK","A",9)

^SCR("P1MK","A",10)

^SCR("P1MK","A",11)

^SCR("P1MK","A",12)

^SCR("P1MK","A",13)

^SCR("P1MK","A",14)

^SCR("P1MK","A",15)

^SCR("P1MK","A",16)

^SCR("P1MK","A",17)

^SCR("P1MK","A",18)

^SCR("P1MK","A",19)

^SCR("P1MK","A",20)

^SCR("P1MK","A",21)
:�Œ…™:š…‰�…�™‡‹"„‘
^SCR("P1MK","AV",1)
,ubnzvhshkenj"us
^SCR("P1MK","AV",2)

^SCR("P1MK","AV",3)
:lhrg,sg:lhrt,n
^SCR("P1MK","AV",4)

^SCR("P1MK","AV",5)
juekvoajuekwxnoufx,hbucajwxnlhrt,
^SCR("P1MK","AV",6)
---------------------------------------------------------
^SCR("P1MK","AV",7)

^SCR("P1MK","AV",8)

^SCR("P1MK","AV",9)

^SCR("P1MK","AV",10)

^SCR("P1MK","AV",11)

^SCR("P1MK","AV",12)

^SCR("P1MK","AV",13)

^SCR("P1MK","AV",14)

^SCR("P1MK","AV",15)

^SCR("P1MK","AV",16)

^SCR("P1MK","AV",17)

^SCR("P1MK","AV",18)

^SCR("P1MK","AV",19)

^SCR("P1MK","AV",20)

^SCR("P1MK","AV",21)
:okua:,uhbucajf"vx
^SCR("P1MK","G",1,"CRD")
6,67,D,8,0
^SCR("P1MK","G",1,"HELP")

^SCR("P1MK","G",1,"LMAX")
8
^SCR("P1MK","G",1,"MUMPS1")

^SCR("P1MK","G",1,"MUMPS2")

^SCR("P1MK","G",1,"OUTPUT")

^SCR("P1MK","G",1,"SHEM")
 jix`z  
^SCR("P1MK","G",1,"TYP")
D
^SCR("P1MK","G",2,"CRD")
6,58,E,11,0
^SCR("P1MK","G",2,"HELP")

^SCR("P1MK","G",2,"LMAX")
11
^SCR("P1MK","G",2,"MUMPS1")

^SCR("P1MK","G",2,"MUMPS2")

^SCR("P1MK","G",2,"OUTPUT")

^SCR("P1MK","G",2,"SHEM")
zipeayg 'qn
^SCR("P1MK","G",2,"TYP")
E
^SCR("P1MK","G",3,"CRD")
6,46,N,6,2
^SCR("P1MK","G",3,"HELP")

^SCR("P1MK","G",3,"LMAX")
6
^SCR("P1MK","G",3,"MUMPS1")

^SCR("P1MK","G",3,"MUMPS2")

^SCR("P1MK","G",3,"SHEM")
 mekq 
^SCR("P1MK","G",3,"TYP")
N
^SCR("P1MK","G",4,"CRD")
6,39,E,10,0
^SCR("P1MK","G",4,"HELP")

^SCR("P1MK","G",4,"LMAX")
10
^SCR("P1MK","G",4,"MUMPS1")

^SCR("P1MK","G",4,"MUMPS2")

^SCR("P1MK","G",4,"OUTPUT")

^SCR("P1MK","G",4,"SHEM")
 gewl 'qn 
^SCR("P1MK","G",4,"TYP")
E
^SCR("P1MK","G",5,"CRD")
6,28,H,20,0
^SCR("P1MK","G",5,"HELP")

^SCR("P1MK","G",5,"LMAX")
22
^SCR("P1MK","G",5,"MUMPS1")

^SCR("P1MK","G",5,"MUMPS2")

^SCR("P1MK","G",5,"OUTPUT")

^SCR("P1MK","G",5,"SHEM")
         gewld my     
^SCR("P1MK","G",5,"TYP")
H
^SCR("P1MK","G","DEL")

^SCR("P1MK","G","MAX")
99999
^SCR("P1MK","G","NAME","DATH")
1
^SCR("P1MK","G","NAME","HESB")
2
^SCR("P1MK","G","NAME","NAME")
5
^SCR("P1MK","G","NAME","NMB")
4
^SCR("P1MK","G","NAME","SHUM")
3
^SCR("P1MK","G","NM",1)
DATH
^SCR("P1MK","G","NM",2)
HESB
^SCR("P1MK","G","NM",3)
SHUM
^SCR("P1MK","G","NM",4)
NMB
^SCR("P1MK","G","NM",5)
NAME
^SCR("P1MK","G","RB")
5,4,21,71
^SCR("P1MK","G","REF")
^TEMP($P
^SCR("P1MK","G","RZD")
\
^SCR("P1MK","G","STEP")
1
^SCR("P1MK","G","STG")
     :         gewld my     : gewl 'qn : mekq :zipeayg 'qn: jix`z  :           
^SCR("P1MK","G","VG")
7
^SCR("P1MK","NAME")
micilwn gec
^SCR("P1MK","P",5,"CRD")
3,44,D,8,0
^SCR("P1MK","P",5,"HELP")

^SCR("P1MK","P",5,"LMAX")
9
^SCR("P1MK","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($H,1)
^SCR("P1MK","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("P1MK","P",5,"MUST")

^SCR("P1MK","P",5,"TYP")
D
^SCR("P1MK","P",10,"CRD")
3,21,D,8,0
^SCR("P1MK","P",10,"HELP")

^SCR("P1MK","P",10,"LMAX")
9
^SCR("P1MK","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1MK","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I $E(D2)="?" S %SC("ER")=1
^SCR("P1MK","P",10,"MUST")

^SCR("P1MK","P",10,"TYP")
D
^SCR("P1MK","P",15,"CRD")
21,50,N,5,0
^SCR("P1MK","P",15,"HELP")

^SCR("P1MK","P",15,"LMAX")
5
^SCR("P1MK","P",15,"MUMPS1")

^SCR("P1MK","P",15,"MUMPS2")

^SCR("P1MK","P",15,"OUTPUT")

^SCR("P1MK","P",15,"TYP")
N
^SCR("P1MK","P",20,"CRD")
21,31,N,8,2
^SCR("P1MK","P",20,"HELP")

^SCR("P1MK","P",20,"LMAX")
10
^SCR("P1MK","P",20,"MUMPS1")

^SCR("P1MK","P",20,"MUMPS2")

^SCR("P1MK","P",20,"OUTPUT")

^SCR("P1MK","P",20,"TYP")
N
^SCR("P1MK","P","NAME","DAT1")
5
^SCR("P1MK","P","NAME","DAT2")
10
^SCR("P1MK","P","NAME","SUM")
20
^SCR("P1MK","P","NAME","SUMH")
15
^SCR("P1MK","P","NM",5)
DAT1
^SCR("P1MK","P","NM",10)
DAT2
^SCR("P1MK","P","NM",15)
SUMH
^SCR("P1MK","P","NM",20)
SUM
^SCR("P1MKB")
H
^SCR("P1MKB",1)
                       #  zepnfd ilawn g"ec  #                                 
^SCR("P1MKB",2)
                        {10      } jix`z cr    {05      } jix`zn               
^SCR("P1MKB",3)
                              {15  } dry cr        {12  }   dryn               
^SCR("P1MKB",4)
                                                                             1$
^SCR("P1MKB",5)
   : iekif :  tih :zepnfd: zegpd :milehia: zexy :  oeict  :   lawn my  : 'qn : 
^SCR("P1MKB",6)
                                                                               
^SCR("P1MKB",7)
                                                                               
^SCR("P1MKB",8)
                                                                               
^SCR("P1MKB",9)
                                                                               
^SCR("P1MKB",10)
                                                                               
^SCR("P1MKB",11)
                                                                               
^SCR("P1MKB",12)
                                                                               
^SCR("P1MKB",13)
                                                                               
^SCR("P1MKB",14)
                                                                               
^SCR("P1MKB",15)
                                                                               
^SCR("P1MKB",16)
                                                                               
^SCR("P1MKB",17)
                                                                               
^SCR("P1MKB",18)
                                                                               
^SCR("P1MKB",19)
                                                                               
^SCR("P1MKB",20)
                                                                               
^SCR("P1MKB",21)
 $1                                                                            
^SCR("P1MKB",22)
  {50    }{47    }{42    }{35    }{30    }{25    }{20       }                  
^SCR("P1MKB","A",1)
š…�Ž†„‰Œ�—Ž‡"…ƒ
^SCR("P1MKB","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("P1MKB","A",3)
„’™ƒ’„’™Ž
^SCR("P1MKB","A",4)

^SCR("P1MKB","A",5)
‰…‹‰†”‰ˆš…�Ž†„š…‡�„�‰Œ…ˆ‰�š…˜™�…‰ƒ”Œ�—Ž�™'‘Ž
^SCR("P1MKB","A",6)
------------------------------------------------------------------
^SCR("P1MKB","A",7)

^SCR("P1MKB","A",8)

^SCR("P1MKB","A",9)

^SCR("P1MKB","A",10)

^SCR("P1MKB","A",11)

^SCR("P1MKB","A",12)

^SCR("P1MKB","A",13)

^SCR("P1MKB","A",14)

^SCR("P1MKB","A",15)

^SCR("P1MKB","A",16)

^SCR("P1MKB","A",17)

^SCR("P1MKB","A",18)

^SCR("P1MKB","A",19)

^SCR("P1MKB","A",20)

^SCR("P1MKB","A",21)

^SCR("P1MKB","A",22)

^SCR("P1MKB","AV",1)
,ubnzvhkcenj"us
^SCR("P1MKB","AV",2)
lhrt,sglhrt,n
^SCR("P1MKB","AV",3)
vgasgvgan
^SCR("P1MKB","AV",4)

^SCR("P1MKB","AV",5)
hufhzphy,ubnzv,ujbvohkuyhc,uraiuhspkcenoawxn
^SCR("P1MKB","AV",6)
------------------------------------------------------------------
^SCR("P1MKB","AV",7)

^SCR("P1MKB","AV",8)

^SCR("P1MKB","AV",9)

^SCR("P1MKB","AV",10)

^SCR("P1MKB","AV",11)

^SCR("P1MKB","AV",12)

^SCR("P1MKB","AV",13)

^SCR("P1MKB","AV",14)

^SCR("P1MKB","AV",15)

^SCR("P1MKB","AV",16)

^SCR("P1MKB","AV",17)

^SCR("P1MKB","AV",18)

^SCR("P1MKB","AV",19)

^SCR("P1MKB","AV",20)

^SCR("P1MKB","AV",21)

^SCR("P1MKB","AV",22)

^SCR("P1MKB","G",1,"CRD")
6,77,E,5,0
^SCR("P1MKB","G",1,"HELP")

^SCR("P1MKB","G",1,"LMAX")
5
^SCR("P1MKB","G",1,"MUMPS1")

^SCR("P1MKB","G",1,"MUMPS2")

^SCR("P1MKB","G",1,"OUTPUT")

^SCR("P1MKB","G",1,"SHEM")
 'qn 
^SCR("P1MKB","G",1,"TYP")
E
^SCR("P1MKB","G",2,"CRD")
6,71,H,12,0
^SCR("P1MKB","G",2,"HELP")

^SCR("P1MKB","G",2,"LMAX")
12
^SCR("P1MKB","G",2,"MUMPS1")

^SCR("P1MKB","G",2,"MUMPS2")

^SCR("P1MKB","G",2,"OUTPUT")

^SCR("P1MKB","G",2,"SHEM")
   lawn my  
^SCR("P1MKB","G",2,"TYP")
H
^SCR("P1MKB","G",3,"CRD")
6,58,N,9,1
^SCR("P1MKB","G",3,"HELP")

^SCR("P1MKB","G",3,"LMAX")
9
^SCR("P1MKB","G",3,"MUMPS1")

^SCR("P1MKB","G",3,"MUMPS2")

^SCR("P1MKB","G",3,"OUTPUT")

^SCR("P1MKB","G",3,"SHEM")
  oeict  
^SCR("P1MKB","G",3,"TYP")
N
^SCR("P1MKB","G",4,"CRD")
6,48,N,6,1
^SCR("P1MKB","G",4,"HELP")

^SCR("P1MKB","G",4,"LMAX")
6
^SCR("P1MKB","G",4,"MUMPS1")

^SCR("P1MKB","G",4,"MUMPS2")

^SCR("P1MKB","G",4,"OUTPUT")

^SCR("P1MKB","G",4,"SHEM")
 zexy 
^SCR("P1MKB","G",4,"TYP")
N
^SCR("P1MKB","G",5,"CRD")
6,41,N,6,1
^SCR("P1MKB","G",5,"HELP")

^SCR("P1MKB","G",5,"LMAX")
7
^SCR("P1MKB","G",5,"MUMPS1")

^SCR("P1MKB","G",5,"MUMPS2")

^SCR("P1MKB","G",5,"OUTPUT")

^SCR("P1MKB","G",5,"SHEM")
milehia
^SCR("P1MKB","G",5,"TYP")
N
^SCR("P1MKB","G",6,"CRD")
6,33,N,7,1
^SCR("P1MKB","G",6,"HELP")

^SCR("P1MKB","G",6,"LMAX")
7
^SCR("P1MKB","G",6,"MUMPS1")

^SCR("P1MKB","G",6,"MUMPS2")

^SCR("P1MKB","G",6,"OUTPUT")

^SCR("P1MKB","G",6,"SHEM")
 zegpd 
^SCR("P1MKB","G",6,"TYP")
N
^SCR("P1MKB","G",7,"CRD")
6,25,N,5,0
^SCR("P1MKB","G",7,"HELP")
<F9> - zepnfd bivdl 
^SCR("P1MKB","G",7,"LMAX")
6
^SCR("P1MKB","G",7,"MUMPS1")

^SCR("P1MKB","G",7,"MUMPS2")
D HZM^P1MSH
^SCR("P1MKB","G",7,"SHEM")
zepnfd
^SCR("P1MKB","G",7,"TYP")
N
^SCR("P1MKB","G",8,"CRD")
6,18,N,6,1
^SCR("P1MKB","G",8,"HELP")

^SCR("P1MKB","G",8,"LMAX")
6
^SCR("P1MKB","G",8,"MUMPS1")

^SCR("P1MKB","G",8,"MUMPS2")

^SCR("P1MKB","G",8,"OUTPUT")

^SCR("P1MKB","G",8,"SHEM")
  tih 
^SCR("P1MKB","G",8,"TYP")
N
^SCR("P1MKB","G",9,"CRD")
6,11,N,7,1
^SCR("P1MKB","G",9,"HELP")
<F9> - miekif bivdl
^SCR("P1MKB","G",9,"LMAX")
7
^SCR("P1MKB","G",9,"MUMPS1")

^SCR("P1MKB","G",9,"MUMPS2")
D TZ^P1MSH
^SCR("P1MKB","G",9,"SHEM")
 iekif 
^SCR("P1MKB","G",9,"TYP")
N
^SCR("P1MKB","G","DEL")

^SCR("P1MKB","G","MAX")
99999
^SCR("P1MKB","G","NAME","BTL")
5
^SCR("P1MKB","G","NAME","HNH")
6
^SCR("P1MKB","G","NAME","HZM")
7
^SCR("P1MKB","G","NAME","MSP")
1
^SCR("P1MKB","G","NAME","MSP1")
2
^SCR("P1MKB","G","NAME","PDN")
3
^SCR("P1MKB","G","NAME","SHER")
4
^SCR("P1MKB","G","NAME","TIP")
8
^SCR("P1MKB","G","NAME","ZIC")
9
^SCR("P1MKB","G","NM",1)
MSP
^SCR("P1MKB","G","NM",2)
MSP1
^SCR("P1MKB","G","NM",3)
PDN
^SCR("P1MKB","G","NM",4)
SHER
^SCR("P1MKB","G","NM",5)
BTL
^SCR("P1MKB","G","NM",6)
HNH
^SCR("P1MKB","G","NM",7)
HZM
^SCR("P1MKB","G","NM",8)
TIP
^SCR("P1MKB","G","NM",9)
ZIC
^SCR("P1MKB","G","RB")
5,2,22,79
^SCR("P1MKB","G","REF")
^TEMP($P
^SCR("P1MKB","G","RZD")
\
^SCR("P1MKB","G","STEP")
1
^SCR("P1MKB","G","STG")
   : iekif :  tih :zepnfd: zegpd :milehia: zexy :  oeict  :   lawn my  : 'qn : 
^SCR("P1MKB","G","VG")
7
^SCR("P1MKB","NAME")
dpnfd ilawn itl g"ec
^SCR("P1MKB","P",5,"CRD")
2,47,D,8,0
^SCR("P1MKB","P",5,"HELP")

^SCR("P1MKB","P",5,"LMAX")
9
^SCR("P1MKB","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("P1MKB","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I 'D1 S %SC("ER")=1
^SCR("P1MKB","P",5,"MUST")

^SCR("P1MKB","P",5,"TYP")
D
^SCR("P1MKB","P",10,"CRD")
2,24,D,8,0
^SCR("P1MKB","P",10,"HELP")

^SCR("P1MKB","P",10,"LMAX")
9
^SCR("P1MKB","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1MKB","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I 'D2 S %SC("ER")=1
^SCR("P1MKB","P",10,"MUST")

^SCR("P1MKB","P",10,"TYP")
D
^SCR("P1MKB","P",12,"CRD")
3,51,E,2,0
^SCR("P1MKB","P",12,"HELP")

^SCR("P1MKB","P",12,"LMAX")
5
^SCR("P1MKB","P",12,"MUMPS1")

^SCR("P1MKB","P",12,"MUMPS2")

^SCR("P1MKB","P",12,"TYP")
E
^SCR("P1MKB","P",15,"CRD")
3,30,E,2,0
^SCR("P1MKB","P",15,"HELP")

^SCR("P1MKB","P",15,"LMAX")
5
^SCR("P1MKB","P",15,"MUMPS1")

^SCR("P1MKB","P",15,"MUMPS2")
S:ADSHAA<MESHAA ADSHAA=ADSHAA+24
^SCR("P1MKB","P",15,"TYP")
E
^SCR("P1MKB","P",20,"CRD")
22,50,N,9,1
^SCR("P1MKB","P",20,"HELP")

^SCR("P1MKB","P",20,"LMAX")
10
^SCR("P1MKB","P",20,"MUMPS1")

^SCR("P1MKB","P",20,"MUMPS2")

^SCR("P1MKB","P",20,"OUTPUT")

^SCR("P1MKB","P",20,"TYP")
N
^SCR("P1MKB","P",25,"CRD")
22,42,N,6,1
^SCR("P1MKB","P",25,"HELP")

^SCR("P1MKB","P",25,"LMAX")
7
^SCR("P1MKB","P",25,"MUMPS1")

^SCR("P1MKB","P",25,"MUMPS2")

^SCR("P1MKB","P",25,"OUTPUT")

^SCR("P1MKB","P",25,"TYP")
N
^SCR("P1MKB","P",30,"CRD")
22,34,N,7,1
^SCR("P1MKB","P",30,"HELP")

^SCR("P1MKB","P",30,"LMAX")
7
^SCR("P1MKB","P",30,"MUMPS1")

^SCR("P1MKB","P",30,"MUMPS2")

^SCR("P1MKB","P",30,"OUTPUT")

^SCR("P1MKB","P",30,"TYP")
N
^SCR("P1MKB","P",35,"CRD")
22,26,N,6,1
^SCR("P1MKB","P",35,"HELP")

^SCR("P1MKB","P",35,"LMAX")
7
^SCR("P1MKB","P",35,"MUMPS1")

^SCR("P1MKB","P",35,"MUMPS2")

^SCR("P1MKB","P",35,"OUTPUT")

^SCR("P1MKB","P",35,"TYP")
N
^SCR("P1MKB","P",42,"CRD")
22,18,N,5,0
^SCR("P1MKB","P",42,"HELP")

^SCR("P1MKB","P",42,"LMAX")
7
^SCR("P1MKB","P",42,"MUMPS1")

^SCR("P1MKB","P",42,"MUMPS2")

^SCR("P1MKB","P",42,"OUTPUT")

^SCR("P1MKB","P",42,"TYP")
N
^SCR("P1MKB","P",47,"CRD")
22,10,N,7,1
^SCR("P1MKB","P",47,"HELP")

^SCR("P1MKB","P",47,"LMAX")
7
^SCR("P1MKB","P",47,"MUMPS1")

^SCR("P1MKB","P",47,"MUMPS2")

^SCR("P1MKB","P",47,"OUTPUT")

^SCR("P1MKB","P",47,"TYP")
N
^SCR("P1MKB","P",50,"CRD")
22,2,N,7,1
^SCR("P1MKB","P",50,"HELP")

^SCR("P1MKB","P",50,"LMAX")
7
^SCR("P1MKB","P",50,"MUMPS1")

^SCR("P1MKB","P",50,"MUMPS2")

^SCR("P1MKB","P",50,"OUTPUT")

^SCR("P1MKB","P",50,"TYP")
N
^SCR("P1MKB","P","NAME","ADSHAA")
15
^SCR("P1MKB","P","NAME","DAT1")
5
^SCR("P1MKB","P","NAME","DAT2")
10
^SCR("P1MKB","P","NAME","MESHAA")
12
^SCR("P1MKB","P","NAME","SUMB2")
30
^SCR("P1MKB","P","NAME","SUMHN2")
35
^SCR("P1MKB","P","NAME","SUMHZ2")
42
^SCR("P1MKB","P","NAME","SUMS2")
25
^SCR("P1MKB","P","NAME","SUMT2")
20
^SCR("P1MKB","P","NAME","SUMTP")
47
^SCR("P1MKB","P","NAME","SZIC")
50
^SCR("P1MKB","P","NM",5)
DAT1
^SCR("P1MKB","P","NM",10)
DAT2
^SCR("P1MKB","P","NM",12)
MESHAA
^SCR("P1MKB","P","NM",15)
ADSHAA
^SCR("P1MKB","P","NM",20)
SUMT2
^SCR("P1MKB","P","NM",25)
SUMS2
^SCR("P1MKB","P","NM",30)
SUMB2
^SCR("P1MKB","P","NM",35)
SUMHN2
^SCR("P1MKB","P","NM",42)
SUMHZ2
^SCR("P1MKB","P","NM",47)
SUMTP
^SCR("P1MKB","P","NM",50)
SZIC
^SCR("P1MKBL")
H
^SCR("P1MKBL",1)
                            # (lcgn_zxixa) zepnfd ilawn zlah #                 
^SCR("P1MKBL",2)
                                                                       1$      
^SCR("P1MKBL",3)
                        :       caer my     : caer 'qn : seqn 'qn :            
^SCR("P1MKBL",4)
                                                                               
^SCR("P1MKBL",5)
                                                                               
^SCR("P1MKBL",6)
                                                                               
^SCR("P1MKBL",7)
                                                                               
^SCR("P1MKBL",8)
                                                                               
^SCR("P1MKBL",9)
                                                                               
^SCR("P1MKBL",10)
                                                                               
^SCR("P1MKBL",11)
                                                                               
^SCR("P1MKBL",12)
                                                                               
^SCR("P1MKBL",13)
                                                                               
^SCR("P1MKBL",14)
                                                                               
^SCR("P1MKBL",15)
                                                                               
^SCR("P1MKBL",16)
                                                                               
^SCR("P1MKBL",17)
                                                                               
^SCR("P1MKBL",18)
                                                                               
^SCR("P1MKBL",19)
                                                                               
^SCR("P1MKBL",20)
                                                                               
^SCR("P1MKBL",21)
                   $1                                                          
^SCR("P1MKBL","A",1)
(Œƒ‡Ž_š˜‰˜�)š…�Ž†„‰Œ�—ŽšŒ�ˆ
^SCR("P1MKBL","A",2)

^SCR("P1MKBL","A",3)
ƒ�…’�™ƒ�…’'‘Ž“…‘Ž'‘Ž
^SCR("P1MKBL","A",4)
---------------------------------------
^SCR("P1MKBL","A",5)

^SCR("P1MKBL","A",6)

^SCR("P1MKBL","A",7)

^SCR("P1MKBL","A",8)

^SCR("P1MKBL","A",9)

^SCR("P1MKBL","A",10)

^SCR("P1MKBL","A",11)

^SCR("P1MKBL","A",12)

^SCR("P1MKBL","A",13)

^SCR("P1MKBL","A",14)

^SCR("P1MKBL","A",15)

^SCR("P1MKBL","A",16)

^SCR("P1MKBL","A",17)

^SCR("P1MKBL","A",18)

^SCR("P1MKBL","A",19)

^SCR("P1MKBL","A",20)

^SCR("P1MKBL","A",21)

^SCR("P1MKBL","AV",1)
(ksjn_,rhrc),ubnzvhkcen,kcy
^SCR("P1MKBL","AV",2)

^SCR("P1MKBL","AV",3)
scugoascugwxn;uxnwxn
^SCR("P1MKBL","AV",4)
---------------------------------------
^SCR("P1MKBL","AV",5)

^SCR("P1MKBL","AV",6)

^SCR("P1MKBL","AV",7)

^SCR("P1MKBL","AV",8)

^SCR("P1MKBL","AV",9)

^SCR("P1MKBL","AV",10)

^SCR("P1MKBL","AV",11)

^SCR("P1MKBL","AV",12)

^SCR("P1MKBL","AV",13)

^SCR("P1MKBL","AV",14)

^SCR("P1MKBL","AV",15)

^SCR("P1MKBL","AV",16)

^SCR("P1MKBL","AV",17)

^SCR("P1MKBL","AV",18)

^SCR("P1MKBL","AV",19)

^SCR("P1MKBL","AV",20)

^SCR("P1MKBL","AV",21)

^SCR("P1MKBL","G",1,"CRD")
4,66,N,2,0
^SCR("P1MKBL","G",1,"HELP")

^SCR("P1MKBL","G",1,"LMAX")
10
^SCR("P1MKBL","G",1,"MUMPS1")

^SCR("P1MKBL","G",1,"MUMPS2")

^SCR("P1MKBL","G",1,"OUTPUT")

^SCR("P1MKBL","G",1,"SHEM")
 seqn 'qn 
^SCR("P1MKBL","G",1,"TYP")
N
^SCR("P1MKBL","G",2,"CHECK")
Y
^SCR("P1MKBL","G",2,"CRD")
4,55,E,5.,0
^SCR("P1MKBL","G",2,"CREAT")

^SCR("P1MKBL","G",2,"FNC")

^SCR("P1MKBL","G",2,"GLOB")
NAME
^SCR("P1MKBL","G",2,"HELP")

^SCR("P1MKBL","G",2,"LMAX")
10
^SCR("P1MKBL","G",2,"MUMPS1")

^SCR("P1MKBL","G",2,"MUMPS2")
S MKBL1=$$^P1NAME(MKBL)
^SCR("P1MKBL","G",2,"NLN")
20
^SCR("P1MKBL","G",2,"NS")
H
^SCR("P1MKBL","G",2,"RZD")
\
^SCR("P1MKBL","G",2,"SHEM")
 caer 'qn 
^SCR("P1MKBL","G",2,"TOPB")
8
^SCR("P1MKBL","G",2,"TYP")
E
^SCR("P1MKBL","G",2,"VRB")
MKBL1
^SCR("P1MKBL","G",3,"CRD")
4,44,H,19,0
^SCR("P1MKBL","G",3,"HELP")

^SCR("P1MKBL","G",3,"LMAX")
19
^SCR("P1MKBL","G",3,"MUMPS1")

^SCR("P1MKBL","G",3,"MUMPS2")

^SCR("P1MKBL","G",3,"OUTPUT")

^SCR("P1MKBL","G",3,"SHEM")
       caer my     
^SCR("P1MKBL","G",3,"TYP")
H
^SCR("P1MKBL","G","DEL")

^SCR("P1MKBL","G","MAX")
1
^SCR("P1MKBL","G","NAME","MKBL")
2
^SCR("P1MKBL","G","NAME","MKBL1")
3
^SCR("P1MKBL","G","NAME","PORT")
1
^SCR("P1MKBL","G","NM",1)
PORT
^SCR("P1MKBL","G","NM",2)
MKBL
^SCR("P1MKBL","G","NM",3)
MKBL1
^SCR("P1MKBL","G","RB")
3,20,22,73
^SCR("P1MKBL","G","REF")
^TEMP($P
^SCR("P1MKBL","G","RZD")
\
^SCR("P1MKBL","G","STEP")
1
^SCR("P1MKBL","G","STG")
                        :       caer my     : caer 'qn : seqn 'qn :            
^SCR("P1MKBL","G","VG")
5
^SCR("P1MKBL","NAME")
(migelyn) zepnfd ilawn zlah
^SCR("P1ML1")
H
^SCR("P1ML1",1)
                            # oecrenn zegewl g"ec #                            
^SCR("P1ML1",2)
                                                                               
^SCR("P1ML1",3)
                  {10       } : gewl cr    {05       } : gewln                 
^SCR("P1ML1",4)
                   {20      } :jix`z cr     {15      } :jix`zn                 
^SCR("P1ML1",5)
                                                                             1$
^SCR("P1ML1",6)
    : rvenn:ixg` k"dq: zegpd :zepnfd:   oetlh  :     gewl my    : gewl 'qn :   
^SCR("P1ML1",7)
    :dpnfdl:    zegpd:       :      :          :                :          :   
^SCR("P1ML1",8)
                                                                               
^SCR("P1ML1",9)
                                                                               
^SCR("P1ML1",10)
                                                                               
^SCR("P1ML1",11)
                                                                               
^SCR("P1ML1",12)
                                                                               
^SCR("P1ML1",13)
                                                                               
^SCR("P1ML1",14)
                                                                               
^SCR("P1ML1",15)
                                                                               
^SCR("P1ML1",16)
                                                                               
^SCR("P1ML1",17)
                                                                               
^SCR("P1ML1",18)
                                                                               
^SCR("P1ML1",19)
                                                                               
^SCR("P1ML1",20)
                                                                               
^SCR("P1ML1",21)
 $1                                                                            
^SCR("P1ML1",22)
    {50    }{40     }{35    }{25   }: k"dq                                     
^SCR("P1ML1","A",1)
�…ƒ’…ŽŽš…‡…—Œ‡"…ƒ
^SCR("P1ML1","A",2)

^SCR("P1ML1","A",3)
:‡…—Œƒ’:‡…—ŒŽ
^SCR("P1ML1","A",4)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1ML1","A",5)

^SCR("P1ML1","A",6)
’–…ŽŽ‰˜‡€‹"„‘š…‡�„š…�Ž†„�…”Œˆ‡…—Œ�™‡…—Œ'‘Ž
^SCR("P1ML1","A",7)
„�Ž†„Œš…‡�„
^SCR("P1ML1","A",8)
-------------------------------------------------------------------
^SCR("P1ML1","A",9)

^SCR("P1ML1","A",10)

^SCR("P1ML1","A",11)

^SCR("P1ML1","A",12)

^SCR("P1ML1","A",13)

^SCR("P1ML1","A",14)

^SCR("P1ML1","A",15)

^SCR("P1ML1","A",16)

^SCR("P1ML1","A",17)

^SCR("P1ML1","A",18)

^SCR("P1ML1","A",19)

^SCR("P1ML1","A",20)

^SCR("P1ML1","A",21)

^SCR("P1ML1","A",22)
:‹"„‘
^SCR("P1ML1","AV",1)
iusgunn,ujuekj"us
^SCR("P1ML1","AV",2)

^SCR("P1ML1","AV",3)
:jueksg:juekn
^SCR("P1ML1","AV",4)
:lhrt,sg:lhrt,n
^SCR("P1ML1","AV",5)

^SCR("P1ML1","AV",6)
gmunnhrjtf"vx,ujbv,ubnzviupkyjuekoajuekwxn
^SCR("P1ML1","AV",7)
vbnzvk,ujbv
^SCR("P1ML1","AV",8)
-------------------------------------------------------------------
^SCR("P1ML1","AV",9)

^SCR("P1ML1","AV",10)

^SCR("P1ML1","AV",11)

^SCR("P1ML1","AV",12)

^SCR("P1ML1","AV",13)

^SCR("P1ML1","AV",14)

^SCR("P1ML1","AV",15)

^SCR("P1ML1","AV",16)

^SCR("P1ML1","AV",17)

^SCR("P1ML1","AV",18)

^SCR("P1ML1","AV",19)

^SCR("P1ML1","AV",20)

^SCR("P1ML1","AV",21)

^SCR("P1ML1","AV",22)
:f"vx
^SCR("P1ML1","G",1,"CRD")
7,75,E,10,0
^SCR("P1ML1","G",1,"HELP")

^SCR("P1ML1","G",1,"LMAX")
10
^SCR("P1ML1","G",1,"MUMPS1")

^SCR("P1ML1","G",1,"MUMPS2")

^SCR("P1ML1","G",1,"OUTPUT")

^SCR("P1ML1","G",1,"SHEM")
 gewl 'qn 
^SCR("P1ML1","G",1,"TYP")
E
^SCR("P1ML1","G",2,"CRD")
7,64,H,16,0
^SCR("P1ML1","G",2,"HELP")

^SCR("P1ML1","G",2,"LMAX")
16
^SCR("P1ML1","G",2,"MUMPS1")

^SCR("P1ML1","G",2,"MUMPS2")

^SCR("P1ML1","G",2,"OUTPUT")

^SCR("P1ML1","G",2,"SHEM")
     gewl my    
^SCR("P1ML1","G",2,"TYP")
H
^SCR("P1ML1","G",3,"CRD")
7,47,E,10,0
^SCR("P1ML1","G",3,"HELP")

^SCR("P1ML1","G",3,"LMAX")
10
^SCR("P1ML1","G",3,"MUMPS1")

^SCR("P1ML1","G",3,"MUMPS2")

^SCR("P1ML1","G",3,"OUTPUT")

^SCR("P1ML1","G",3,"SHEM")
   oetlh  
^SCR("P1ML1","G",3,"TYP")
E
^SCR("P1ML1","G",4,"CRD")
7,36,N,6,0
^SCR("P1ML1","G",4,"HELP")

^SCR("P1ML1","G",4,"LMAX")
6
^SCR("P1ML1","G",4,"MUMPS1")

^SCR("P1ML1","G",4,"MUMPS2")

^SCR("P1ML1","G",4,"OUTPUT")

^SCR("P1ML1","G",4,"SHEM")
zepnfd
^SCR("P1ML1","G",4,"TYP")
N
^SCR("P1ML1","G",5,"CRD")
7,29,N,7,2
^SCR("P1ML1","G",5,"HELP")

^SCR("P1ML1","G",5,"LMAX")
7
^SCR("P1ML1","G",5,"MUMPS1")

^SCR("P1ML1","G",5,"MUMPS2")

^SCR("P1ML1","G",5,"OUTPUT")

^SCR("P1ML1","G",5,"SHEM")
 zegpd 
^SCR("P1ML1","G",5,"TYP")
N
^SCR("P1ML1","G",6,"CRD")
7,21,N,9,2
^SCR("P1ML1","G",6,"HELP")

^SCR("P1ML1","G",6,"LMAX")
9
^SCR("P1ML1","G",6,"MUMPS1")

^SCR("P1ML1","G",6,"MUMPS2")

^SCR("P1ML1","G",6,"OUTPUT")

^SCR("P1ML1","G",6,"SHEM")
ixg` k"dq
^SCR("P1ML1","G",6,"TYP")
N
^SCR("P1ML1","G",7,"CRD")
7,11,N,6,2
^SCR("P1ML1","G",7,"HELP")

^SCR("P1ML1","G",7,"LMAX")
6
^SCR("P1ML1","G",7,"MUMPS1")

^SCR("P1ML1","G",7,"MUMPS2")

^SCR("P1ML1","G",7,"OUTPUT")

^SCR("P1ML1","G",7,"SHEM")
 rvenn
^SCR("P1ML1","G",7,"TYP")
N
^SCR("P1ML1","G","DEL")

^SCR("P1ML1","G","MAX")
99999
^SCR("P1ML1","G","NAME","AVR")
7
^SCR("P1ML1","G","NAME","HNH")
5
^SCR("P1ML1","G","NAME","LAK")
1
^SCR("P1ML1","G","NAME","LAK1")
2
^SCR("P1ML1","G","NAME","NETO")
6
^SCR("P1ML1","G","NAME","NHZM")
4
^SCR("P1ML1","G","NAME","TEL")
3
^SCR("P1ML1","G","NM",1)
LAK
^SCR("P1ML1","G","NM",2)
LAK1
^SCR("P1ML1","G","NM",3)
TEL
^SCR("P1ML1","G","NM",4)
NHZM
^SCR("P1ML1","G","NM",5)
HNH
^SCR("P1ML1","G","NM",6)
NETO
^SCR("P1ML1","G","NM",7)
AVR
^SCR("P1ML1","G","RB")
6,2,22,79
^SCR("P1ML1","G","REF")
^TEMP($P,"ML1"
^SCR("P1ML1","G","RZD")
\
^SCR("P1ML1","G","STEP")
1
^SCR("P1ML1","G","STG")
    : rvenn:ixg` k"dq: zegpd :zepnfd:   oetlh  :     gewl my    : gewl 'qn :   
^SCR("P1ML1","G","VG")
9
^SCR("P1ML1","NAME")
zegewl g"ec -  zegewl oecren
^SCR("P1ML1","P",5,"CRD")
3,43,E,10,0
^SCR("P1ML1","P",5,"FNC")

^SCR("P1ML1","P",5,"GLOB")
LKH
^SCR("P1ML1","P",5,"HELP")

^SCR("P1ML1","P",5,"LMAX")
10
^SCR("P1ML1","P",5,"MUMPS1")

^SCR("P1ML1","P",5,"MUMPS2")

^SCR("P1ML1","P",5,"NLN")
20
^SCR("P1ML1","P",5,"RZD")
\
^SCR("P1ML1","P",5,"TOPB")
8
^SCR("P1ML1","P",5,"TYP")
E
^SCR("P1ML1","P",10,"CRD")
3,18,E,10,0
^SCR("P1ML1","P",10,"FNC")

^SCR("P1ML1","P",10,"GLOB")
LKH
^SCR("P1ML1","P",10,"HELP")

^SCR("P1ML1","P",10,"LMAX")
10
^SCR("P1ML1","P",10,"MUMPS1")
S:MELAK&'$G(ADLAK) ADLAK=MELAK
^SCR("P1ML1","P",10,"MUMPS2")
S:ADLAK<MELAK %SC("ER")=1
^SCR("P1ML1","P",10,"NLN")
20
^SCR("P1ML1","P",10,"RZD")
\
^SCR("P1ML1","P",10,"TOPB")
8
^SCR("P1ML1","P",10,"TYP")
E
^SCR("P1ML1","P",15,"CRD")
4,44,D,8,0
^SCR("P1ML1","P",15,"HELP")

^SCR("P1ML1","P",15,"LMAX")
9
^SCR("P1ML1","P",15,"MUMPS1")
S:'$G(METRH) METRH=$$^%L1DC($H,1)
^SCR("P1ML1","P",15,"MUMPS2")

^SCR("P1ML1","P",15,"MUST")

^SCR("P1ML1","P",15,"TYP")
D
^SCR("P1ML1","P",20,"CRD")
4,19,D,8,0
^SCR("P1ML1","P",20,"HELP")

^SCR("P1ML1","P",20,"LMAX")
9
^SCR("P1ML1","P",20,"MUMPS1")
S:'$G(ADTRH)&METRH ADTRH=METRH
^SCR("P1ML1","P",20,"MUMPS2")
D ADTRH^P1ML1
^SCR("P1ML1","P",20,"MUST")

^SCR("P1ML1","P",20,"TYP")
D
^SCR("P1ML1","P",25,"CRD")
22,29,N,6,0
^SCR("P1ML1","P",25,"HELP")

^SCR("P1ML1","P",25,"LMAX")
6
^SCR("P1ML1","P",25,"MUMPS1")

^SCR("P1ML1","P",25,"MUMPS2")

^SCR("P1ML1","P",25,"OUTPUT")

^SCR("P1ML1","P",25,"TYP")
N
^SCR("P1ML1","P",35,"CRD")
22,21,N,7,2
^SCR("P1ML1","P",35,"HELP")

^SCR("P1ML1","P",35,"LMAX")
7
^SCR("P1ML1","P",35,"MUMPS1")

^SCR("P1ML1","P",35,"MUMPS2")

^SCR("P1ML1","P",35,"OUTPUT")

^SCR("P1ML1","P",35,"TYP")
N
^SCR("P1ML1","P",40,"CRD")
22,12,N,8,2
^SCR("P1ML1","P",40,"HELP")

^SCR("P1ML1","P",40,"LMAX")
8
^SCR("P1ML1","P",40,"MUMPS1")

^SCR("P1ML1","P",40,"MUMPS2")

^SCR("P1ML1","P",40,"OUTPUT")

^SCR("P1ML1","P",40,"TYP")
N
^SCR("P1ML1","P",50,"CRD")
22,4,N,7,2
^SCR("P1ML1","P",50,"HELP")

^SCR("P1ML1","P",50,"LMAX")
7
^SCR("P1ML1","P",50,"MUMPS1")

^SCR("P1ML1","P",50,"MUMPS2")

^SCR("P1ML1","P",50,"OUTPUT")

^SCR("P1ML1","P",50,"TYP")
N
^SCR("P1ML1","P","NAME","ADLAK")
10
^SCR("P1ML1","P","NAME","ADTRH")
20
^SCR("P1ML1","P","NAME","MELAK")
5
^SCR("P1ML1","P","NAME","METRH")
15
^SCR("P1ML1","P","NAME","SAVR")
50
^SCR("P1ML1","P","NAME","SHNH")
35
^SCR("P1ML1","P","NAME","SHZM")
25
^SCR("P1ML1","P","NAME","SNETO")
40
^SCR("P1ML1","P","NM",5)
MELAK
^SCR("P1ML1","P","NM",10)
ADLAK
^SCR("P1ML1","P","NM",15)
METRH
^SCR("P1ML1","P","NM",20)
ADTRH
^SCR("P1ML1","P","NM",25)
SHZM
^SCR("P1ML1","P","NM",35)
SHNH
^SCR("P1ML1","P","NM",40)
SNETO
^SCR("P1ML1","P","NM",50)
SAVR
^SCR("P1ML2")
H
^SCR("P1ML2",1)
                                 # zcled mei g"ec #                            
^SCR("P1ML2",2)
    {03: 3 - mieyip mei ,2 - bef za/oa ly ,1 - oecren xag ly zcled mei         
^SCR("P1ML2",3)
       {22 : dpy  {20 yceg {15 mei cr      {12 } dpy {10 yceg {05 mein         
^SCR("P1ML2",4)
                                                                             1$
^SCR("P1ML2",5)
  :  jix`z : revwn :  oetlh   :          zaezk        :    gewl my   :'wl 'qn: 
^SCR("P1ML2",6)
                                                                               
^SCR("P1ML2",7)
                                                                               
^SCR("P1ML2",8)
                                                                               
^SCR("P1ML2",9)
                                                                               
^SCR("P1ML2",10)
                                                                               
^SCR("P1ML2",11)
                                                                               
^SCR("P1ML2",12)
                                                                               
^SCR("P1ML2",13)
                                                                               
^SCR("P1ML2",14)
                                                                               
^SCR("P1ML2",15)
                                                                               
^SCR("P1ML2",16)
                                                                               
^SCR("P1ML2",17)
                                                                               
^SCR("P1ML2",18)
                                                                               
^SCR("P1ML2",19)
                                                                               
^SCR("P1ML2",20)
                                                                               
^SCR("P1ML2",21)
                                                                               
^SCR("P1ML2",22)
$1                                                                             
^SCR("P1ML2","A",1)
šƒŒ…„�…‰‡"…ƒ
^SCR("P1ML2","A",2)
:3-�‰…™‰��…‰,2-‚…†š�/��Œ™,1-�…ƒ’…Ž˜�‡Œ™šƒŒ…„�…‰
^SCR("P1ML2","A",3)
:„�™™ƒ…‡�…‰ƒ’„�™™ƒ…‡�…‰Ž
^SCR("P1ML2","A",4)

^SCR("P1ML2","A",5)
Š‰˜€š’…–—Ž�…”Œˆš�…š‹‡…—Œ�™'—Œ'‘Ž
^SCR("P1ML2","A",6)
----------------------------------------------------------------------
^SCR("P1ML2","A",7)

^SCR("P1ML2","A",8)

^SCR("P1ML2","A",9)

^SCR("P1ML2","A",10)

^SCR("P1ML2","A",11)

^SCR("P1ML2","A",12)

^SCR("P1ML2","A",13)

^SCR("P1ML2","A",14)

^SCR("P1ML2","A",15)

^SCR("P1ML2","A",16)

^SCR("P1ML2","A",17)

^SCR("P1ML2","A",18)

^SCR("P1ML2","A",19)

^SCR("P1ML2","A",20)

^SCR("P1ML2","A",21)

^SCR("P1ML2","A",22)

^SCR("P1ML2","AV",1)
,skuvouhj"us
^SCR("P1ML2","AV",2)
:3-ohuahbouh'2-duz,cqicka'1-iusgunrcjka,skuvouh
^SCR("P1ML2","AV",3)
:vbaasujouhsgvbaasujouhn
^SCR("P1ML2","AV",4)

^SCR("P1ML2","AV",5)
lhrt,gumeniupky,cu,fjuekoawekwxn
^SCR("P1ML2","AV",6)
----------------------------------------------------------------------
^SCR("P1ML2","AV",7)

^SCR("P1ML2","AV",8)

^SCR("P1ML2","AV",9)

^SCR("P1ML2","AV",10)

^SCR("P1ML2","AV",11)

^SCR("P1ML2","AV",12)

^SCR("P1ML2","AV",13)

^SCR("P1ML2","AV",14)

^SCR("P1ML2","AV",15)

^SCR("P1ML2","AV",16)

^SCR("P1ML2","AV",17)

^SCR("P1ML2","AV",18)

^SCR("P1ML2","AV",19)

^SCR("P1ML2","AV",20)

^SCR("P1ML2","AV",21)

^SCR("P1ML2","AV",22)

^SCR("P1ML2","G",1,"CRD")
6,77,E,7,0
^SCR("P1ML2","G",1,"HELP")

^SCR("P1ML2","G",1,"LMAX")
7
^SCR("P1ML2","G",1,"MUMPS1")

^SCR("P1ML2","G",1,"MUMPS2")

^SCR("P1ML2","G",1,"OUTPUT")

^SCR("P1ML2","G",1,"SHEM")
'wl 'qn
^SCR("P1ML2","G",1,"TYP")
E
^SCR("P1ML2","G",2,"CRD")
6,69,H,14,0
^SCR("P1ML2","G",2,"HELP")

^SCR("P1ML2","G",2,"LMAX")
14
^SCR("P1ML2","G",2,"MUMPS1")

^SCR("P1ML2","G",2,"MUMPS2")

^SCR("P1ML2","G",2,"OUTPUT")

^SCR("P1ML2","G",2,"SHEM")
    gewl my   
^SCR("P1ML2","G",2,"TYP")
H
^SCR("P1ML2","G",3,"CRD")
6,54,H,23,0
^SCR("P1ML2","G",3,"HELP")

^SCR("P1ML2","G",3,"LMAX")
23
^SCR("P1ML2","G",3,"MUMPS1")

^SCR("P1ML2","G",3,"MUMPS2")

^SCR("P1ML2","G",3,"OUTPUT")

^SCR("P1ML2","G",3,"SHEM")
          zaezk        
^SCR("P1ML2","G",3,"TYP")
H
^SCR("P1ML2","G",4,"CRD")
6,30,E,10,0
^SCR("P1ML2","G",4,"HELP")

^SCR("P1ML2","G",4,"LMAX")
10
^SCR("P1ML2","G",4,"MUMPS1")

^SCR("P1ML2","G",4,"MUMPS2")

^SCR("P1ML2","G",4,"OUTPUT")

^SCR("P1ML2","G",4,"SHEM")
  oetlh   
^SCR("P1ML2","G",4,"TYP")
E
^SCR("P1ML2","G",5,"CRD")
6,19,H,7,0
^SCR("P1ML2","G",5,"HELP")

^SCR("P1ML2","G",5,"LMAX")
7
^SCR("P1ML2","G",5,"MUMPS1")

^SCR("P1ML2","G",5,"MUMPS2")

^SCR("P1ML2","G",5,"OUTPUT")

^SCR("P1ML2","G",5,"SHEM")
 revwn 
^SCR("P1ML2","G",5,"TYP")
H
^SCR("P1ML2","G",6,"CRD")
6,11,D,8,0
^SCR("P1ML2","G",6,"HELP")

^SCR("P1ML2","G",6,"LMAX")
8
^SCR("P1ML2","G",6,"MUMPS1")

^SCR("P1ML2","G",6,"MUMPS2")

^SCR("P1ML2","G",6,"OUTPUT")

^SCR("P1ML2","G",6,"SHEM")
  jix`z 
^SCR("P1ML2","G",6,"TYP")
D
^SCR("P1ML2","G","DEL")

^SCR("P1ML2","G","MAX")
9999
^SCR("P1ML2","G","NAME","JOMH")
6
^SCR("P1ML2","G","NAME","KTV")
3
^SCR("P1ML2","G","NAME","LKH")
1
^SCR("P1ML2","G","NAME","LKH1")
2
^SCR("P1ML2","G","NAME","MIKZ")
5
^SCR("P1ML2","G","NAME","TEL")
4
^SCR("P1ML2","G","NM",1)
LKH
^SCR("P1ML2","G","NM",2)
LKH1
^SCR("P1ML2","G","NM",3)
KTV
^SCR("P1ML2","G","NM",4)
TEL
^SCR("P1ML2","G","NM",5)
MIKZ
^SCR("P1ML2","G","NM",6)
JOMH
^SCR("P1ML2","G","RB")
5,1,23,79
^SCR("P1ML2","G","REF")
^TEMP($P,"ML2"
^SCR("P1ML2","G","RZD")
\
^SCR("P1ML2","G","STEP")
1
^SCR("P1ML2","G","STG")
  :  jix`z : revwn :  oetlh   :          zaezk        :    gewl my   :'wl 'qn: 
^SCR("P1ML2","G","VG")
7
^SCR("P1ML2","NAME")
HULEDET JOM DOCH
^SCR("P1ML2","P",3,"CRD")
2,4,N,1,0
^SCR("P1ML2","P",3,"HELP")

^SCR("P1ML2","P",3,"LMAX")
3
^SCR("P1ML2","P",3,"MUMPS1")

^SCR("P1ML2","P",3,"MUMPS2")
I "123"'[VD S %SC("ER")=1
^SCR("P1ML2","P",3,"TYP")
N
^SCR("P1ML2","P",5,"CRD")
3,62,N,2,0
^SCR("P1ML2","P",5,"HELP")

^SCR("P1ML2","P",5,"LMAX")
4
^SCR("P1ML2","P",5,"MUMPS1")

^SCR("P1ML2","P",5,"MUMPS2")
I DD1>31 S %SC("ER")=1
^SCR("P1ML2","P",5,"TYP")
N
^SCR("P1ML2","P",10,"CRD")
3,53,N,2,0
^SCR("P1ML2","P",10,"HELP")

^SCR("P1ML2","P",10,"LMAX")
4
^SCR("P1ML2","P",10,"MUMPS1")

^SCR("P1ML2","P",10,"MUMPS2")
S:MM1>12 %SC("ER")=1
^SCR("P1ML2","P",10,"TYP")
N
^SCR("P1ML2","P",12,"CRD")
3,43,N,2,0
^SCR("P1ML2","P",12,"HELP")

^SCR("P1ML2","P",12,"LMAX")
4
^SCR("P1ML2","P",12,"MUMPS1")

^SCR("P1ML2","P",12,"MUMPS2")

^SCR("P1ML2","P",12,"TYP")
N
^SCR("P1ML2","P",15,"CRD")
3,27,E,2,0
^SCR("P1ML2","P",15,"HELP")

^SCR("P1ML2","P",15,"LMAX")
4
^SCR("P1ML2","P",15,"MUMPS1")

^SCR("P1ML2","P",15,"MUMPS2")
S:DD2>31 %SC("ER")=1
^SCR("P1ML2","P",15,"TYP")
E
^SCR("P1ML2","P",20,"CRD")
3,18,N,2,0
^SCR("P1ML2","P",20,"HELP")

^SCR("P1ML2","P",20,"LMAX")
4
^SCR("P1ML2","P",20,"MUMPS1")

^SCR("P1ML2","P",20,"MUMPS2")
D MM2^P1ML2
^SCR("P1ML2","P",20,"TYP")
N
^SCR("P1ML2","P",22,"CRD")
3,7,N,2,0
^SCR("P1ML2","P",22,"HELP")

^SCR("P1ML2","P",22,"LMAX")
4
^SCR("P1ML2","P",22,"MUMPS1")

^SCR("P1ML2","P",22,"MUMPS2")
D GG2^P1ML2                                 
^SCR("P1ML2","P",22,"TYP")
N
^SCR("P1ML2","P","NAME","DD1")
5
^SCR("P1ML2","P","NAME","DD2")
15
^SCR("P1ML2","P","NAME","GG1")
12
^SCR("P1ML2","P","NAME","GG2")
22
^SCR("P1ML2","P","NAME","MM1")
10
^SCR("P1ML2","P","NAME","MM2")
20
^SCR("P1ML2","P","NAME","VD")
3
^SCR("P1ML2","P","NM",3)
VD
^SCR("P1ML2","P","NM",5)
DD1
^SCR("P1ML2","P","NM",10)
MM1
^SCR("P1ML2","P","NM",12)
GG1
^SCR("P1ML2","P","NM",15)
DD2
^SCR("P1ML2","P","NM",20)
MM2
^SCR("P1ML2","P","NM",22)
GG2
^SCR("P1MLZ")
H
^SCR("P1MLZ",1)
                             #  mixvln g"ec  #                                 
^SCR("P1MLZ",2)
                        {10      } jix`z cr    {05      } jix`zn               
^SCR("P1MLZ",3)
                                                                             1$
^SCR("P1MLZ",4)
   :'nfd:creq: oeict  : mitih : miekif: zegpd :milehia: zexy : xvln my : 'qn : 
^SCR("P1MLZ",5)
                                                                               
^SCR("P1MLZ",6)
                                                                               
^SCR("P1MLZ",7)
                                                                               
^SCR("P1MLZ",8)
                                                                               
^SCR("P1MLZ",9)
                                                                               
^SCR("P1MLZ",10)
                                                                               
^SCR("P1MLZ",11)
                                                                               
^SCR("P1MLZ",12)
                                                                               
^SCR("P1MLZ",13)
                                                                               
^SCR("P1MLZ",14)
                                                                               
^SCR("P1MLZ",15)
                                                                               
^SCR("P1MLZ",16)
                                                                               
^SCR("P1MLZ",17)
                                                                               
^SCR("P1MLZ",18)
                                                                               
^SCR("P1MLZ",19)
                                                                               
^SCR("P1MLZ",20)
 $1                                                                            
^SCR("P1MLZ",21)
 {47 }{45  }{20     }{42     }{40   }{35    }{30     }{25    }                 
^SCR("P1MLZ","A",1)
�‰˜–ŒŽ‡"…ƒ
^SCR("P1MLZ","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("P1MLZ","A",3)

^SCR("P1MLZ","A",4)
'Ž†„ƒ’…‘�…‰ƒ”�‰”‰ˆ�‰…‹‰†š…‡�„�‰Œ…ˆ‰�š…˜™˜–ŒŽ�™'‘Ž
^SCR("P1MLZ","A",5)
-----------------------------------------------------------------
^SCR("P1MLZ","A",6)

^SCR("P1MLZ","A",7)

^SCR("P1MLZ","A",8)

^SCR("P1MLZ","A",9)

^SCR("P1MLZ","A",10)

^SCR("P1MLZ","A",11)

^SCR("P1MLZ","A",12)

^SCR("P1MLZ","A",13)

^SCR("P1MLZ","A",14)

^SCR("P1MLZ","A",15)

^SCR("P1MLZ","A",16)

^SCR("P1MLZ","A",17)

^SCR("P1MLZ","A",18)

^SCR("P1MLZ","A",19)

^SCR("P1MLZ","A",20)

^SCR("P1MLZ","A",21)

^SCR("P1MLZ","AV",1)
ohrmknj"us
^SCR("P1MLZ","AV",2)
lhrt,sglhrt,n
^SCR("P1MLZ","AV",3)

^SCR("P1MLZ","AV",4)
wnzvsguxiuhspohphyohufhz,ujbvohkuyhc,urarmknoawxn
^SCR("P1MLZ","AV",5)
-----------------------------------------------------------------
^SCR("P1MLZ","AV",6)

^SCR("P1MLZ","AV",7)

^SCR("P1MLZ","AV",8)

^SCR("P1MLZ","AV",9)

^SCR("P1MLZ","AV",10)

^SCR("P1MLZ","AV",11)

^SCR("P1MLZ","AV",12)

^SCR("P1MLZ","AV",13)

^SCR("P1MLZ","AV",14)

^SCR("P1MLZ","AV",15)

^SCR("P1MLZ","AV",16)

^SCR("P1MLZ","AV",17)

^SCR("P1MLZ","AV",18)

^SCR("P1MLZ","AV",19)

^SCR("P1MLZ","AV",20)

^SCR("P1MLZ","AV",21)

^SCR("P1MLZ","G",1,"CRD")
5,77,E,5,0
^SCR("P1MLZ","G",1,"HELP")

^SCR("P1MLZ","G",1,"LMAX")
5
^SCR("P1MLZ","G",1,"MUMPS1")
D MSP0^P1MLZ
^SCR("P1MLZ","G",1,"MUMPS2")

^SCR("P1MLZ","G",1,"SHEM")
 'qn 
^SCR("P1MLZ","G",1,"TYP")
E
^SCR("P1MLZ","G",2,"CRD")
5,71,H,9,0
^SCR("P1MLZ","G",2,"HELP")

^SCR("P1MLZ","G",2,"LMAX")
9
^SCR("P1MLZ","G",2,"MUMPS1")

^SCR("P1MLZ","G",2,"MUMPS2")

^SCR("P1MLZ","G",2,"OUTPUT")

^SCR("P1MLZ","G",2,"SHEM")
 xvln my 
^SCR("P1MLZ","G",2,"TYP")
H
^SCR("P1MLZ","G",3,"CRD")
5,61,N,6,1
^SCR("P1MLZ","G",3,"HELP")

^SCR("P1MLZ","G",3,"LMAX")
6
^SCR("P1MLZ","G",3,"MUMPS1")

^SCR("P1MLZ","G",3,"MUMPS2")

^SCR("P1MLZ","G",3,"OUTPUT")

^SCR("P1MLZ","G",3,"SHEM")
 zexy 
^SCR("P1MLZ","G",3,"TYP")
N
^SCR("P1MLZ","G",4,"CRD")
5,54,N,7,1
^SCR("P1MLZ","G",4,"HELP")

^SCR("P1MLZ","G",4,"LMAX")
7
^SCR("P1MLZ","G",4,"MUMPS1")

^SCR("P1MLZ","G",4,"MUMPS2")

^SCR("P1MLZ","G",4,"OUTPUT")

^SCR("P1MLZ","G",4,"SHEM")
milehia
^SCR("P1MLZ","G",4,"TYP")
N
^SCR("P1MLZ","G",5,"CRD")
5,46,N,7,1
^SCR("P1MLZ","G",5,"HELP")

^SCR("P1MLZ","G",5,"LMAX")
7
^SCR("P1MLZ","G",5,"MUMPS1")

^SCR("P1MLZ","G",5,"MUMPS2")

^SCR("P1MLZ","G",5,"OUTPUT")

^SCR("P1MLZ","G",5,"SHEM")
 zegpd 
^SCR("P1MLZ","G",5,"TYP")
N
^SCR("P1MLZ","G",6,"CRD")
5,38,N,7,1
^SCR("P1MLZ","G",6,"HELP")

^SCR("P1MLZ","G",6,"LMAX")
7
^SCR("P1MLZ","G",6,"MUMPS1")

^SCR("P1MLZ","G",6,"MUMPS2")

^SCR("P1MLZ","G",6,"OUTPUT")

^SCR("P1MLZ","G",6,"SHEM")
 miekif
^SCR("P1MLZ","G",6,"TYP")
N
^SCR("P1MLZ","G",7,"CRD")
5,30,N,7,1
^SCR("P1MLZ","G",7,"HELP")

^SCR("P1MLZ","G",7,"LMAX")
7
^SCR("P1MLZ","G",7,"MUMPS1")

^SCR("P1MLZ","G",7,"MUMPS2")

^SCR("P1MLZ","G",7,"OUTPUT")

^SCR("P1MLZ","G",7,"SHEM")
 mitih 
^SCR("P1MLZ","G",7,"TYP")
N
^SCR("P1MLZ","G",8,"CRD")
5,22,N,8,1
^SCR("P1MLZ","G",8,"HELP")

^SCR("P1MLZ","G",8,"LMAX")
8
^SCR("P1MLZ","G",8,"MUMPS1")

^SCR("P1MLZ","G",8,"MUMPS2")

^SCR("P1MLZ","G",8,"OUTPUT")

^SCR("P1MLZ","G",8,"SHEM")
 oeict  
^SCR("P1MLZ","G",8,"TYP")
N
^SCR("P1MLZ","G",9,"CRD")
5,13,N,4,0
^SCR("P1MLZ","G",9,"HELP")

^SCR("P1MLZ","G",9,"LMAX")
4
^SCR("P1MLZ","G",9,"MUMPS1")

^SCR("P1MLZ","G",9,"MUMPS2")

^SCR("P1MLZ","G",9,"OUTPUT")

^SCR("P1MLZ","G",9,"SHEM")
creq
^SCR("P1MLZ","G",9,"TYP")
N
^SCR("P1MLZ","G",10,"CRD")
5,8,N,4,0
^SCR("P1MLZ","G",10,"HELP")

^SCR("P1MLZ","G",10,"LMAX")
4
^SCR("P1MLZ","G",10,"MUMPS1")

^SCR("P1MLZ","G",10,"MUMPS2")

^SCR("P1MLZ","G",10,"OUTPUT")

^SCR("P1MLZ","G",10,"SHEM")
'nfd
^SCR("P1MLZ","G",10,"TYP")
N
^SCR("P1MLZ","G","MAX")
5
^SCR("P1MLZ","G","NAME","BTL")
4
^SCR("P1MLZ","G","NAME","HNH")
5
^SCR("P1MLZ","G","NAME","HZM")
10
^SCR("P1MLZ","G","NAME","MSP")
1
^SCR("P1MLZ","G","NAME","MSP1")
2
^SCR("P1MLZ","G","NAME","PDN")
8
^SCR("P1MLZ","G","NAME","SHER")
3
^SCR("P1MLZ","G","NAME","SOAD")
9
^SCR("P1MLZ","G","NAME","TP")
7
^SCR("P1MLZ","G","NAME","ZIC")
6
^SCR("P1MLZ","G","NM",1)
MSP
^SCR("P1MLZ","G","NM",2)
MSP1
^SCR("P1MLZ","G","NM",3)
SHER
^SCR("P1MLZ","G","NM",4)
BTL
^SCR("P1MLZ","G","NM",5)
HNH
^SCR("P1MLZ","G","NM",6)
ZIC
^SCR("P1MLZ","G","NM",7)
TP
^SCR("P1MLZ","G","NM",8)
PDN
^SCR("P1MLZ","G","NM",9)
SOAD
^SCR("P1MLZ","G","NM",10)
HZM
^SCR("P1MLZ","G","RB")
4,2,21,79
^SCR("P1MLZ","G","REF")
^TEMP($P
^SCR("P1MLZ","G","RZD")
\
^SCR("P1MLZ","G","STEP")
1
^SCR("P1MLZ","G","STG")
   :'nfd:creq: oeict  : mitih : miekif: zegpd :milehia: zexy : xvln my : 'qn : 
^SCR("P1MLZ","G","VG")
6
^SCR("P1MLZ","NAME")
mixvln g"ec
^SCR("P1MLZ","P",5,"CRD")
2,47,D,8,0
^SCR("P1MLZ","P",5,"HELP")

^SCR("P1MLZ","P",5,"LMAX")
9
^SCR("P1MLZ","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("P1MLZ","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I 'D1 S %SC("ER")=1
^SCR("P1MLZ","P",5,"MUST")

^SCR("P1MLZ","P",5,"TYP")
D
^SCR("P1MLZ","P",10,"CRD")
2,24,D,8,0
^SCR("P1MLZ","P",10,"HELP")

^SCR("P1MLZ","P",10,"LMAX")
9
^SCR("P1MLZ","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1MLZ","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I 'D2 S %SC("ER")=1
^SCR("P1MLZ","P",10,"MUST")

^SCR("P1MLZ","P",10,"TYP")
D
^SCR("P1MLZ","P",20,"CRD")
21,12,N,8,1
^SCR("P1MLZ","P",20,"HELP")

^SCR("P1MLZ","P",20,"LMAX")
8
^SCR("P1MLZ","P",20,"MUMPS1")

^SCR("P1MLZ","P",20,"MUMPS2")

^SCR("P1MLZ","P",20,"OUTPUT")

^SCR("P1MLZ","P",20,"TYP")
N
^SCR("P1MLZ","P",25,"CRD")
21,54,N,6,1
^SCR("P1MLZ","P",25,"HELP")

^SCR("P1MLZ","P",25,"LMAX")
7
^SCR("P1MLZ","P",25,"MUMPS1")

^SCR("P1MLZ","P",25,"MUMPS2")

^SCR("P1MLZ","P",25,"OUTPUT")

^SCR("P1MLZ","P",25,"TYP")
N
^SCR("P1MLZ","P",30,"CRD")
21,45,N,7,1
^SCR("P1MLZ","P",30,"HELP")

^SCR("P1MLZ","P",30,"LMAX")
8
^SCR("P1MLZ","P",30,"MUMPS1")

^SCR("P1MLZ","P",30,"MUMPS2")

^SCR("P1MLZ","P",30,"OUTPUT")

^SCR("P1MLZ","P",30,"TYP")
N
^SCR("P1MLZ","P",35,"CRD")
21,37,N,6,1
^SCR("P1MLZ","P",35,"HELP")

^SCR("P1MLZ","P",35,"LMAX")
7
^SCR("P1MLZ","P",35,"MUMPS1")

^SCR("P1MLZ","P",35,"MUMPS2")

^SCR("P1MLZ","P",35,"OUTPUT")

^SCR("P1MLZ","P",35,"TYP")
N
^SCR("P1MLZ","P",40,"CRD")
21,30,N,6,1
^SCR("P1MLZ","P",40,"HELP")

^SCR("P1MLZ","P",40,"LMAX")
6
^SCR("P1MLZ","P",40,"MUMPS1")

^SCR("P1MLZ","P",40,"MUMPS2")

^SCR("P1MLZ","P",40,"OUTPUT")

^SCR("P1MLZ","P",40,"TYP")
N
^SCR("P1MLZ","P",42,"CRD")
21,21,N,7,1
^SCR("P1MLZ","P",42,"HELP")

^SCR("P1MLZ","P",42,"LMAX")
8
^SCR("P1MLZ","P",42,"MUMPS1")

^SCR("P1MLZ","P",42,"MUMPS2")

^SCR("P1MLZ","P",42,"OUTPUT")

^SCR("P1MLZ","P",42,"TYP")
N
^SCR("P1MLZ","P",45,"CRD")
21,6,N,5,0
^SCR("P1MLZ","P",45,"HELP")

^SCR("P1MLZ","P",45,"LMAX")
5
^SCR("P1MLZ","P",45,"MUMPS1")

^SCR("P1MLZ","P",45,"MUMPS2")

^SCR("P1MLZ","P",45,"OUTPUT")

^SCR("P1MLZ","P",45,"TYP")
N
^SCR("P1MLZ","P",47,"CRD")
21,1,N,4,0
^SCR("P1MLZ","P",47,"HELP")

^SCR("P1MLZ","P",47,"LMAX")
4
^SCR("P1MLZ","P",47,"MUMPS1")

^SCR("P1MLZ","P",47,"MUMPS2")

^SCR("P1MLZ","P",47,"OUTPUT")

^SCR("P1MLZ","P",47,"TYP")
N
^SCR("P1MLZ","P","NAME","DAT1")
5
^SCR("P1MLZ","P","NAME","DAT2")
10
^SCR("P1MLZ","P","NAME","SUMB2")
30
^SCR("P1MLZ","P","NAME","SUMHN2")
35
^SCR("P1MLZ","P","NAME","SUMHZ2")
47
^SCR("P1MLZ","P","NAME","SUMS2")
25
^SCR("P1MLZ","P","NAME","SUMSD2")
45
^SCR("P1MLZ","P","NAME","SUMT2")
20
^SCR("P1MLZ","P","NAME","SUMTP")
42
^SCR("P1MLZ","P","NAME","SUMZC2")
40
^SCR("P1MLZ","P","NM",5)
DAT1
^SCR("P1MLZ","P","NM",10)
DAT2
^SCR("P1MLZ","P","NM",20)
SUMT2
^SCR("P1MLZ","P","NM",25)
SUMS2
^SCR("P1MLZ","P","NM",30)
SUMB2
^SCR("P1MLZ","P","NM",35)
SUMHN2
^SCR("P1MLZ","P","NM",40)
SUMZC2
^SCR("P1MLZ","P","NM",42)
SUMTP
^SCR("P1MLZ","P","NM",45)
SUMSD2
^SCR("P1MLZ","P","NM",47)
SUMHZ2
^SCR("P1MLZSH")
H
^SCR("P1MLZSH",1)
                                                                               
^SCR("P1MLZSH",2)
                                     # xvln qihxk #                            
^SCR("P1MLZSH",3)
                                                                               
^SCR("P1MLZSH",4)
                        {                   06} {05    }: xvln 'qn             
^SCR("P1MLZSH",5)
                                                                               
^SCR("P1MLZSH",6)
                                                         1$                    
^SCR("P1MLZSH",7)
                                     :  ogley qn   :                           
^SCR("P1MLZSH",8)
                                                                               
^SCR("P1MLZSH",9)
                                                                               
^SCR("P1MLZSH",10)
                                                                               
^SCR("P1MLZSH",11)
                                                                               
^SCR("P1MLZSH",12)
                                                                               
^SCR("P1MLZSH",13)
                                                                               
^SCR("P1MLZSH",14)
                                                                               
^SCR("P1MLZSH",15)
                                                                               
^SCR("P1MLZSH",16)
                                                                               
^SCR("P1MLZSH",17)
                                                                               
^SCR("P1MLZSH",18)
                                                                               
^SCR("P1MLZSH",19)
                                                                               
^SCR("P1MLZSH",20)
                                                                               
^SCR("P1MLZSH",21)
                                $1                                             
^SCR("P1MLZSH",22)
                                                                               
^SCR("P1MLZSH","A",1)

^SCR("P1MLZSH","A",2)
˜–ŒŽ‘‰ˆ˜‹
^SCR("P1MLZSH","A",3)

^SCR("P1MLZSH","A",4)
:˜–ŒŽ'‘Ž
^SCR("P1MLZSH","A",5)

^SCR("P1MLZSH","A",6)

^SCR("P1MLZSH","A",7)
�‡Œ…™‘Ž
^SCR("P1MLZSH","A",8)
-------------
^SCR("P1MLZSH","A",9)

^SCR("P1MLZSH","A",10)

^SCR("P1MLZSH","A",11)

^SCR("P1MLZSH","A",12)

^SCR("P1MLZSH","A",13)

^SCR("P1MLZSH","A",14)

^SCR("P1MLZSH","A",15)

^SCR("P1MLZSH","A",16)

^SCR("P1MLZSH","A",17)

^SCR("P1MLZSH","A",18)

^SCR("P1MLZSH","A",19)

^SCR("P1MLZSH","A",20)

^SCR("P1MLZSH","A",21)

^SCR("P1MLZSH","A",22)

^SCR("P1MLZSH","AV",1)

^SCR("P1MLZSH","AV",2)
rmknxhyrf
^SCR("P1MLZSH","AV",3)

^SCR("P1MLZSH","AV",4)
:rmknwxn
^SCR("P1MLZSH","AV",5)

^SCR("P1MLZSH","AV",6)

^SCR("P1MLZSH","AV",7)
ijkuaxn
^SCR("P1MLZSH","AV",8)
-------------
^SCR("P1MLZSH","AV",9)

^SCR("P1MLZSH","AV",10)

^SCR("P1MLZSH","AV",11)

^SCR("P1MLZSH","AV",12)

^SCR("P1MLZSH","AV",13)

^SCR("P1MLZSH","AV",14)

^SCR("P1MLZSH","AV",15)

^SCR("P1MLZSH","AV",16)

^SCR("P1MLZSH","AV",17)

^SCR("P1MLZSH","AV",18)

^SCR("P1MLZSH","AV",19)

^SCR("P1MLZSH","AV",20)

^SCR("P1MLZSH","AV",21)

^SCR("P1MLZSH","AV",22)

^SCR("P1MLZSH","G",1,"CHECK")
Y
^SCR("P1MLZSH","G",1,"CRD")
8,51,E,3,0
^SCR("P1MLZSH","G",1,"CREAT")

^SCR("P1MLZSH","G",1,"FNC")

^SCR("P1MLZSH","G",1,"GLOB")
LKH
^SCR("P1MLZSH","G",1,"HELP")

^SCR("P1MLZSH","G",1,"LMAX")
13
^SCR("P1MLZSH","G",1,"MUMPS1")

^SCR("P1MLZSH","G",1,"MUMPS2")
D BDIKA^P1MLZSH
^SCR("P1MLZSH","G",1,"MUST")

^SCR("P1MLZSH","G",1,"NLN")
20
^SCR("P1MLZSH","G",1,"NS")
J
^SCR("P1MLZSH","G",1,"RZD")
**
^SCR("P1MLZSH","G",1,"SHEM")
  ogley qn   
^SCR("P1MLZSH","G",1,"TOPB")
8
^SCR("P1MLZSH","G",1,"TYP")
E
^SCR("P1MLZSH","G","DEL")
Y
^SCR("P1MLZSH","G","MAX")
99999
^SCR("P1MLZSH","G","NAME","SHULHAN")
1
^SCR("P1MLZSH","G","NM",1)
SHULHAN
^SCR("P1MLZSH","G","RB")
7,33,22,59
^SCR("P1MLZSH","G","REF")
^TEMP($P,"MLZ"
^SCR("P1MLZSH","G","RZD")
\
^SCR("P1MLZSH","G","STEP")
1
^SCR("P1MLZSH","G","STG")
                                     :  ogley qn   :                           
^SCR("P1MLZSH","G","VG")
9
^SCR("P1MLZSH","NAME")

^SCR("P1MLZSH","P",5,"CRD")
4,48,E,5.,0
^SCR("P1MLZSH","P",5,"FNC")

^SCR("P1MLZSH","P",5,"GLOB")
NAME
^SCR("P1MLZSH","P",5,"HELP")
<F9> - miqihxk zbvd , <F7> - cew itl , <F6> - my itl yetig
^SCR("P1MLZSH","P",5,"LMAX")
7
^SCR("P1MLZSH","P",5,"MUMPS1")

^SCR("P1MLZSH","P",5,"MUMPS2")
S:'$D(^NAME(MELZAR,1)) %SC("ER")=1 Q:$D(%SC("ER"))  S MELZAR1=$G(^NAME(MELZAR,1)) D REST^P1MLZSH
^SCR("P1MLZSH","P",5,"MUST")

^SCR("P1MLZSH","P",5,"NLN")
20
^SCR("P1MLZSH","P",5,"RZD")
\
^SCR("P1MLZSH","P",5,"TOPB")
8
^SCR("P1MLZSH","P",5,"TYP")
E
^SCR("P1MLZSH","P",6,"CRD")
4,47,H,22,0
^SCR("P1MLZSH","P",6,"HELP")

^SCR("P1MLZSH","P",6,"LMAX")
22
^SCR("P1MLZSH","P",6,"MUMPS1")

^SCR("P1MLZSH","P",6,"MUMPS2")

^SCR("P1MLZSH","P",6,"OUTPUT")

^SCR("P1MLZSH","P",6,"TYP")
H
^SCR("P1MLZSH","P","NAME","MELZAR")
5
^SCR("P1MLZSH","P","NAME","MELZAR1")
6
^SCR("P1MLZSH","P","NM",5)
MELZAR
^SCR("P1MLZSH","P","NM",6)
MELZAR1
^SCR("P1MMMHZ")
H
^SCR("P1MMMHZ",1)
                                                                          1]   
^SCR("P1MMMHZ",2)
                                                                               
^SCR("P1MMMHZ",3)
                                             {             05} :    aeyi       
^SCR("P1MMMHZ",4)
                                                                               
^SCR("P1MMMHZ",5)
                                    {                      10} :    aegx       
^SCR("P1MMMHZ",6)
                                                                               
^SCR("P1MMMHZ",7)
                                                         {15 } : zia 'qn       
^SCR("P1MMMHZ",8)
                                                                               
^SCR("P1MMMHZ",9)
                                                        {20  } :   cewin       
^SCR("P1MMMHZ",10)
                                                                               
^SCR("P1MMMHZ",11)
                                [1                                             
^SCR("P1MMMHZ","A",1)

^SCR("P1MMMHZ","A",2)

^SCR("P1MMMHZ","A",3)
:�…™‰
^SCR("P1MMMHZ","A",4)

^SCR("P1MMMHZ","A",5)
:�…‡˜
^SCR("P1MMMHZ","A",6)

^SCR("P1MMMHZ","A",7)
:š‰�'‘Ž
^SCR("P1MMMHZ","A",8)

^SCR("P1MMMHZ","A",9)
:ƒ…—‰Ž
^SCR("P1MMMHZ","A",10)

^SCR("P1MMMHZ","A",11)

^SCR("P1MMMHZ","AV",1)

^SCR("P1MMMHZ","AV",2)

^SCR("P1MMMHZ","AV",3)
:cuah
^SCR("P1MMMHZ","AV",4)

^SCR("P1MMMHZ","AV",5)
:cujr
^SCR("P1MMMHZ","AV",6)

^SCR("P1MMMHZ","AV",7)
:,hcwxn
^SCR("P1MMMHZ","AV",8)

^SCR("P1MMMHZ","AV",9)
:suehn
^SCR("P1MMMHZ","AV",10)

^SCR("P1MMMHZ","AV",11)

^SCR("P1MMMHZ","NAME")
dpnfd zlaw
^SCR("P1MMMHZ","P",5,"CRD")
3,62,H,16,0
^SCR("P1MMMHZ","P",5,"FNC")

^SCR("P1MMMHZ","P",5,"GLOB")
P1IR
^SCR("P1MMMHZ","P",5,"HELP")

^SCR("P1MMMHZ","P",5,"LMAX")
16
^SCR("P1MMMHZ","P",5,"MUMPS1")
D IR0^P1MMMHZ
^SCR("P1MMMHZ","P",5,"MUMPS2")
D IR^P1MMMHZ
^SCR("P1MMMHZ","P",5,"NLN")
20
^SCR("P1MMMHZ","P",5,"RZD")
\
^SCR("P1MMMHZ","P",5,"TOPB")
8
^SCR("P1MMMHZ","P",5,"TYP")
H
^SCR("P1MMMHZ","P",5,"VRB")
IR
^SCR("P1MMMHZ","P",10,"CRD")
5,62,H,25,0
^SCR("P1MMMHZ","P",10,"HELP")

^SCR("P1MMMHZ","P",10,"LMAX")
25
^SCR("P1MMMHZ","P",10,"MUMPS1")
D KTV0^P1MMMHZ
^SCR("P1MMMHZ","P",10,"MUMPS2")
D KTV^P1MMMHZ
^SCR("P1MMMHZ","P",10,"TYP")
H
^SCR("P1MMMHZ","P",15,"CRD")
7,57,E,4,0
^SCR("P1MMMHZ","P",15,"HELP")

^SCR("P1MMMHZ","P",15,"LMAX")
4
^SCR("P1MMMHZ","P",15,"MUMPS1")

^SCR("P1MMMHZ","P",15,"MUMPS2")
D BAIT^P1MMMHZ
^SCR("P1MMMHZ","P",15,"MUST")

^SCR("P1MMMHZ","P",15,"TYP")
E
^SCR("P1MMMHZ","P",20,"CRD")
9,56,E,5,0
^SCR("P1MMMHZ","P",20,"HELP")

^SCR("P1MMMHZ","P",20,"LMAX")
5
^SCR("P1MMMHZ","P",20,"MUMPS1")

^SCR("P1MMMHZ","P",20,"MUMPS2")

^SCR("P1MMMHZ","P",20,"OUTPUT")

^SCR("P1MMMHZ","P",20,"TYP")
E
^SCR("P1MMMHZ","P","NAME","BAIT")
15
^SCR("P1MMMHZ","P","NAME","IR")
5
^SCR("P1MMMHZ","P","NAME","KTV")
10
^SCR("P1MMMHZ","P","NAME","MIKUD")
20
^SCR("P1MMMHZ","P","NM",5)
IR
^SCR("P1MMMHZ","P","NM",10)
KTV
^SCR("P1MMMHZ","P","NM",15)
BAIT
^SCR("P1MMMHZ","P","NM",20)
MIKUD
^SCR("P1MMMHZ","P","RB",1)
2,33,12,76
^SCR("P1MMMID")
H
^SCR("P1MMMID",1)
                                                                               
^SCR("P1MMMID",2)
                                                                             1$
^SCR("P1MMMID",3)
   : ID aygn :   oetlh  :    sipq my    :sipq 'qn:cewin:     xir    :xir 'qn:  
^SCR("P1MMMID",4)
                                                                               
^SCR("P1MMMID",5)
                                                                               
^SCR("P1MMMID",6)
                                                                               
^SCR("P1MMMID",7)
                                                                               
^SCR("P1MMMID",8)
                                                                               
^SCR("P1MMMID",9)
                                                                               
^SCR("P1MMMID",10)
                                                                               
^SCR("P1MMMID",11)
                                                                               
^SCR("P1MMMID",12)
                                                                               
^SCR("P1MMMID",13)
                                                                               
^SCR("P1MMMID",14)
                                                                               
^SCR("P1MMMID",15)
                                                                               
^SCR("P1MMMID",16)
                                                                               
^SCR("P1MMMID",17)
                                                                               
^SCR("P1MMMID",18)
                                                                               
^SCR("P1MMMID",19)
                                                                               
^SCR("P1MMMID",20)
  $1                                                                           
^SCR("P1MMMID","A",1)

^SCR("P1MMMID","A",2)

^SCR("P1MMMID","A",3)
ID�™‡Ž�…”Œˆ“‰�‘�™“‰�‘'‘Žƒ…—‰Ž˜‰’˜‰’'‘Ž
^SCR("P1MMMID","A",4)
--------------------------------------------------------------------
^SCR("P1MMMID","A",5)

^SCR("P1MMMID","A",6)

^SCR("P1MMMID","A",7)

^SCR("P1MMMID","A",8)

^SCR("P1MMMID","A",9)

^SCR("P1MMMID","A",10)

^SCR("P1MMMID","A",11)

^SCR("P1MMMID","A",12)

^SCR("P1MMMID","A",13)

^SCR("P1MMMID","A",14)

^SCR("P1MMMID","A",15)

^SCR("P1MMMID","A",16)

^SCR("P1MMMID","A",17)

^SCR("P1MMMID","A",18)

^SCR("P1MMMID","A",19)

^SCR("P1MMMID","A",20)

^SCR("P1MMMID","AV",1)

^SCR("P1MMMID","AV",2)

^SCR("P1MMMID","AV",3)
IDcajniupky;hbxoa;hbxwxnsuehnrhgrhgwxn
^SCR("P1MMMID","AV",4)
--------------------------------------------------------------------
^SCR("P1MMMID","AV",5)

^SCR("P1MMMID","AV",6)

^SCR("P1MMMID","AV",7)

^SCR("P1MMMID","AV",8)

^SCR("P1MMMID","AV",9)

^SCR("P1MMMID","AV",10)

^SCR("P1MMMID","AV",11)

^SCR("P1MMMID","AV",12)

^SCR("P1MMMID","AV",13)

^SCR("P1MMMID","AV",14)

^SCR("P1MMMID","AV",15)

^SCR("P1MMMID","AV",16)

^SCR("P1MMMID","AV",17)

^SCR("P1MMMID","AV",18)

^SCR("P1MMMID","AV",19)

^SCR("P1MMMID","AV",20)

^SCR("P1MMMID","G",1,"CHECK")
Y
^SCR("P1MMMID","G",1,"CRD")
4,76,E,4,0
^SCR("P1MMMID","G",1,"CREAT")

^SCR("P1MMMID","G",1,"FNC")

^SCR("P1MMMID","G",1,"GLOB")
P1IR
^SCR("P1MMMID","G",1,"HELP")

^SCR("P1MMMID","G",1,"LMAX")
7
^SCR("P1MMMID","G",1,"MUMPS1")

^SCR("P1MMMID","G",1,"MUMPS2")

^SCR("P1MMMID","G",1,"MUST")

^SCR("P1MMMID","G",1,"NLN")
20
^SCR("P1MMMID","G",1,"NS")
xir
^SCR("P1MMMID","G",1,"RZD")
\
^SCR("P1MMMID","G",1,"SHEM")
xir 'qn
^SCR("P1MMMID","G",1,"TOPB")
8
^SCR("P1MMMID","G",1,"TYP")
E
^SCR("P1MMMID","G",1,"VRB")
IR
^SCR("P1MMMID","G",2,"CRD")
4,68,H,12,0
^SCR("P1MMMID","G",2,"HELP")

^SCR("P1MMMID","G",2,"LMAX")
12
^SCR("P1MMMID","G",2,"MUMPS1")

^SCR("P1MMMID","G",2,"MUMPS2")

^SCR("P1MMMID","G",2,"OUTPUT")

^SCR("P1MMMID","G",2,"SHEM")
     xir    
^SCR("P1MMMID","G",2,"TYP")
H
^SCR("P1MMMID","G",3,"CRD")
4,55,E,5,0
^SCR("P1MMMID","G",3,"HELP")

^SCR("P1MMMID","G",3,"LMAX")
5
^SCR("P1MMMID","G",3,"MUMPS1")

^SCR("P1MMMID","G",3,"MUMPS2")
D MIKUD^P1MMM
^SCR("P1MMMID","G",3,"SHEM")
cewin
^SCR("P1MMMID","G",3,"TYP")
E
^SCR("P1MMMID","G",4,"CHECK")
Y
^SCR("P1MMMID","G",4,"CRD")
4,49,N,4,0
^SCR("P1MMMID","G",4,"FNC")

^SCR("P1MMMID","G",4,"GLOB")
MRKZ
^SCR("P1MMMID","G",4,"HELP")

^SCR("P1MMMID","G",4,"LMAX")
8
^SCR("P1MMMID","G",4,"MUMPS1")

^SCR("P1MMMID","G",4,"MUMPS2")

^SCR("P1MMMID","G",4,"MUST")

^SCR("P1MMMID","G",4,"NLN")
20
^SCR("P1MMMID","G",4,"RZD")
\
^SCR("P1MMMID","G",4,"SHEM")
sipq 'qn
^SCR("P1MMMID","G",4,"TOPB")
8
^SCR("P1MMMID","G",4,"TYP")
N
^SCR("P1MMMID","G",4,"VRB")
MRKZ1
^SCR("P1MMMID","G",5,"CRD")
4,40,H,14,0
^SCR("P1MMMID","G",5,"HELP")

^SCR("P1MMMID","G",5,"LMAX")
15
^SCR("P1MMMID","G",5,"MUMPS1")

^SCR("P1MMMID","G",5,"MUMPS2")

^SCR("P1MMMID","G",5,"OUTPUT")

^SCR("P1MMMID","G",5,"SHEM")
    sipq my    
^SCR("P1MMMID","G",5,"TYP")
H
^SCR("P1MMMID","G",6,"CRD")
4,24,E,10,0
^SCR("P1MMMID","G",6,"HELP")

^SCR("P1MMMID","G",6,"LMAX")
10
^SCR("P1MMMID","G",6,"MUMPS1")

^SCR("P1MMMID","G",6,"MUMPS2")

^SCR("P1MMMID","G",6,"SHEM")
   oetlh  
^SCR("P1MMMID","G",6,"TYP")
E
^SCR("P1MMMID","G",7,"CRD")
4,13,E,7,0
^SCR("P1MMMID","G",7,"HELP")

^SCR("P1MMMID","G",7,"LMAX")
9
^SCR("P1MMMID","G",7,"MUMPS1")

^SCR("P1MMMID","G",7,"MUMPS2")

^SCR("P1MMMID","G",7,"MUST")

^SCR("P1MMMID","G",7,"SHEM")
 ID aygn 
^SCR("P1MMMID","G",7,"TYP")
E
^SCR("P1MMMID","G","DEL")
Y
^SCR("P1MMMID","G","MAX")
999
^SCR("P1MMMID","G","NAME","IDC")
7
^SCR("P1MMMID","G","NAME","IR")
2
^SCR("P1MMMID","G","NAME","MIKUD")
3
^SCR("P1MMMID","G","NAME","MIR")
1
^SCR("P1MMMID","G","NAME","MRKZ1")
5
^SCR("P1MMMID","G","NAME","SNIF")
4
^SCR("P1MMMID","G","NAME","TEL")
6
^SCR("P1MMMID","G","NM",1)
MIR
^SCR("P1MMMID","G","NM",2)
IR
^SCR("P1MMMID","G","NM",3)
MIKUD
^SCR("P1MMMID","G","NM",4)
SNIF
^SCR("P1MMMID","G","NM",5)
MRKZ1
^SCR("P1MMMID","G","NM",6)
TEL
^SCR("P1MMMID","G","NM",7)
IDC
^SCR("P1MMMID","G","RB")
3,3,21,79
^SCR("P1MMMID","G","REF")
^TEMP($P
^SCR("P1MMMID","G","RZD")
\
^SCR("P1MMMID","G","STEP")
1
^SCR("P1MMMID","G","STG")
   : ID aygn :   oetlh  :    sipq my    :sipq 'qn:cewin:     xir    :xir 'qn:  
^SCR("P1MMMID","G","VG")
5
^SCR("P1MMMID","NAME")

^SCR("P1MNSIS")
H
^SCR("P1MNSIS",1)
                            # iy`x hixtzl ze`nqiq zebxc #                      
^SCR("P1MNSIS",2)
                                                           1]                  
^SCR("P1MNSIS",3)
                         {05 :          zxnyn zxardl dbxc                      
^SCR("P1MNSIS",4)
                         {10 :            mei zxibql dbxc                      
^SCR("P1MNSIS",5)
                         {15 :       zegece zezli`yl dbxc                      
^SCR("P1MNSIS",6)
                         {20 :                mitxbl dbxc                      
^SCR("P1MNSIS",7)
                         {25 :         `ay mr dcearl dbxc                      
^SCR("P1MNSIS",8)
                         {30 :         zegewl zkxrnl dbxc                      
^SCR("P1MNSIS",9)
                         {35 :         mihixt zkxrnl dbxc                      
^SCR("P1MNSIS",10)
                         {40 :      ze`lah mr dcearl dbxc                      
^SCR("P1MNSIS",11)
                         {45 :        'miwiy' zkxrnl dbxc                      
^SCR("P1MNSIS",12)
                         {50 :      mirvan mr dcearl dbxc                      
^SCR("P1MNSIS",13)
                         {55 :        zexiy zeipkezl dbxc                      
^SCR("P1MNSIS",14)
                         {60 : zegkep oery mr dcearl dbxc                      
^SCR("P1MNSIS",15)
                         {65 :                iekifl dbxc                      
^SCR("P1MNSIS",16)
                         {70 :        zayaygl dxardl dbxc                      
^SCR("P1MNSIS",17)
                      [1                                                       
^SCR("P1MNSIS","A",1)
‰™€˜ˆ‰˜”šŒš…€Ž‘‰‘š…‚˜ƒ
^SCR("P1MNSIS","A",2)

^SCR("P1MNSIS","A",3)
:š˜Ž™Žš˜�’„Œ„‚˜ƒ
^SCR("P1MNSIS","A",4)
:�…‰š˜‰‚‘Œ„‚˜ƒ
^SCR("P1MNSIS","A",5)
:š…‡…ƒ…š…šŒ‰€™Œ„‚˜ƒ
^SCR("P1MNSIS","A",6)
:�‰”˜‚Œ„‚˜ƒ
^SCR("P1MNSIS","A",7)
:€�™�’„ƒ…�’Œ„‚˜ƒ
^SCR("P1MNSIS","A",8)
:š…‡…—Œš‹˜’ŽŒ„‚˜ƒ
^SCR("P1MNSIS","A",9)
:�‰ˆ‰˜”š‹˜’ŽŒ„‚˜ƒ
^SCR("P1MNSIS","A",10)
:š…€Œ�ˆ�’„ƒ…�’Œ„‚˜ƒ
^SCR("P1MNSIS","A",11)
:'�‰—‰™'š‹˜’ŽŒ„‚˜ƒ
^SCR("P1MNSIS","A",12)
:�‰’–�Ž�’„ƒ…�’Œ„‚˜ƒ
^SCR("P1MNSIS","A",13)
:š…˜‰™š…‰�‹…šŒ„‚˜ƒ
^SCR("P1MNSIS","A",14)
:š…‡‹…��…’™�’„ƒ…�’Œ„‚˜ƒ
^SCR("P1MNSIS","A",15)
:‰…‹‰†Œ„‚˜ƒ
^SCR("P1MNSIS","A",16)
:š�™�™‡Œ„˜�’„Œ„‚˜ƒ
^SCR("P1MNSIS","A",17)

^SCR("P1MNSIS","AV",1)
hatryhrp,k,utnxhx,udrs
^SCR("P1MNSIS","AV",2)

^SCR("P1MNSIS","AV",3)
:,rnan,rcgvkvdrs
^SCR("P1MNSIS","AV",4)
:ouh,rhdxkvdrs
^SCR("P1MNSIS","AV",5)
:,ujusu,u,khtakvdrs
^SCR("P1MNSIS","AV",6)
:ohprdkvdrs
^SCR("P1MNSIS","AV",7)
:tcaogvsucgkvdrs
^SCR("P1MNSIS","AV",8)
:,ujuek,frgnkvdrs
^SCR("P1MNSIS","AV",9)
:ohyhrp,frgnkvdrs
^SCR("P1MNSIS","AV",10)
:,utkcyogvsucgkvdrs
^SCR("P1MNSIS","AV",11)
:wohehaw,frgnkvdrs
^SCR("P1MNSIS","AV",12)
:ohgmcnogvsucgkvdrs
^SCR("P1MNSIS","AV",13)
:,urha,uhbfu,kvdrs
^SCR("P1MNSIS","AV",14)
:,ujfubiugaogvsucgkvdrs
^SCR("P1MNSIS","AV",15)
:hufhzkvdrs
^SCR("P1MNSIS","AV",16)
:,cacajkvrcgvkvdrs
^SCR("P1MNSIS","AV",17)

^SCR("P1MNSIS","NAME")
iy`x hixtzl ze`nqiq zebxc
^SCR("P1MNSIS","P",5,"CRD")
3,25,N,2,0
^SCR("P1MNSIS","P",5,"HELP")

^SCR("P1MNSIS","P",5,"LMAX")
4
^SCR("P1MNSIS","P",5,"MUMPS1")

^SCR("P1MNSIS","P",5,"MUMPS2")

^SCR("P1MNSIS","P",5,"TYP")
N
^SCR("P1MNSIS","P",10,"CRD")
4,25,N,2,0
^SCR("P1MNSIS","P",10,"HELP")

^SCR("P1MNSIS","P",10,"LMAX")
4
^SCR("P1MNSIS","P",10,"MUMPS1")

^SCR("P1MNSIS","P",10,"MUMPS2")

^SCR("P1MNSIS","P",10,"TYP")
N
^SCR("P1MNSIS","P",15,"CRD")
5,25,N,2,0
^SCR("P1MNSIS","P",15,"HELP")

^SCR("P1MNSIS","P",15,"LMAX")
4
^SCR("P1MNSIS","P",15,"MUMPS1")

^SCR("P1MNSIS","P",15,"MUMPS2")

^SCR("P1MNSIS","P",15,"TYP")
N
^SCR("P1MNSIS","P",20,"CRD")
6,25,N,2,0
^SCR("P1MNSIS","P",20,"HELP")

^SCR("P1MNSIS","P",20,"LMAX")
4
^SCR("P1MNSIS","P",20,"MUMPS1")

^SCR("P1MNSIS","P",20,"MUMPS2")

^SCR("P1MNSIS","P",20,"TYP")
N
^SCR("P1MNSIS","P",25,"CRD")
7,25,N,2,0
^SCR("P1MNSIS","P",25,"HELP")

^SCR("P1MNSIS","P",25,"LMAX")
4
^SCR("P1MNSIS","P",25,"MUMPS1")

^SCR("P1MNSIS","P",25,"MUMPS2")

^SCR("P1MNSIS","P",25,"TYP")
N
^SCR("P1MNSIS","P",30,"CRD")
8,25,N,2,0
^SCR("P1MNSIS","P",30,"HELP")

^SCR("P1MNSIS","P",30,"LMAX")
4
^SCR("P1MNSIS","P",30,"MUMPS1")

^SCR("P1MNSIS","P",30,"MUMPS2")

^SCR("P1MNSIS","P",30,"TYP")
N
^SCR("P1MNSIS","P",35,"CRD")
9,25,N,2,0
^SCR("P1MNSIS","P",35,"HELP")

^SCR("P1MNSIS","P",35,"LMAX")
4
^SCR("P1MNSIS","P",35,"MUMPS1")

^SCR("P1MNSIS","P",35,"MUMPS2")

^SCR("P1MNSIS","P",35,"TYP")
N
^SCR("P1MNSIS","P",40,"CRD")
10,25,N,2,0
^SCR("P1MNSIS","P",40,"HELP")

^SCR("P1MNSIS","P",40,"LMAX")
4
^SCR("P1MNSIS","P",40,"MUMPS1")

^SCR("P1MNSIS","P",40,"MUMPS2")

^SCR("P1MNSIS","P",40,"TYP")
N
^SCR("P1MNSIS","P",45,"CRD")
11,25,N,2,0
^SCR("P1MNSIS","P",45,"HELP")

^SCR("P1MNSIS","P",45,"LMAX")
4
^SCR("P1MNSIS","P",45,"MUMPS1")

^SCR("P1MNSIS","P",45,"MUMPS2")

^SCR("P1MNSIS","P",45,"TYP")
N
^SCR("P1MNSIS","P",50,"CRD")
12,25,N,2,0
^SCR("P1MNSIS","P",50,"HELP")

^SCR("P1MNSIS","P",50,"LMAX")
4
^SCR("P1MNSIS","P",50,"MUMPS1")

^SCR("P1MNSIS","P",50,"MUMPS2")

^SCR("P1MNSIS","P",50,"TYP")
N
^SCR("P1MNSIS","P",55,"CRD")
13,25,N,2,0
^SCR("P1MNSIS","P",55,"HELP")

^SCR("P1MNSIS","P",55,"LMAX")
4
^SCR("P1MNSIS","P",55,"MUMPS1")

^SCR("P1MNSIS","P",55,"MUMPS2")

^SCR("P1MNSIS","P",55,"TYP")
N
^SCR("P1MNSIS","P",60,"CRD")
14,25,N,2,0
^SCR("P1MNSIS","P",60,"HELP")

^SCR("P1MNSIS","P",60,"LMAX")
4
^SCR("P1MNSIS","P",60,"MUMPS1")

^SCR("P1MNSIS","P",60,"MUMPS2")

^SCR("P1MNSIS","P",60,"TYP")
N
^SCR("P1MNSIS","P",65,"CRD")
15,25,N,2,0
^SCR("P1MNSIS","P",65,"HELP")

^SCR("P1MNSIS","P",65,"LMAX")
4
^SCR("P1MNSIS","P",65,"MUMPS1")

^SCR("P1MNSIS","P",65,"MUMPS2")

^SCR("P1MNSIS","P",65,"TYP")
N
^SCR("P1MNSIS","P",70,"CRD")
16,25,N,2,0
^SCR("P1MNSIS","P",70,"HELP")

^SCR("P1MNSIS","P",70,"LMAX")
4
^SCR("P1MNSIS","P",70,"MUMPS1")

^SCR("P1MNSIS","P",70,"MUMPS2")

^SCR("P1MNSIS","P",70,"TYP")
N
^SCR("P1MNSIS","P","NAME","CHK")
45
^SCR("P1MNSIS","P","NAME","GRAPH")
20
^SCR("P1MNSIS","P","NAME","HSV")
70
^SCR("P1MNSIS","P","NAME","LKH")
30
^SCR("P1MNSIS","P","NAME","MVC")
50
^SCR("P1MNSIS","P","NAME","PAR")
35
^SCR("P1MNSIS","P","NAME","SHAON")
60
^SCR("P1MNSIS","P","NAME","SHIFT")
5
^SCR("P1MNSIS","P","NAME","SHVA")
25
^SCR("P1MNSIS","P","NAME","SRV")
55
^SCR("P1MNSIS","P","NAME","TBL")
40
^SCR("P1MNSIS","P","NAME","TOT")
15
^SCR("P1MNSIS","P","NAME","Z")
10
^SCR("P1MNSIS","P","NAME","ZICUJ")
65
^SCR("P1MNSIS","P","NM",5)
SHIFT
^SCR("P1MNSIS","P","NM",10)
Z
^SCR("P1MNSIS","P","NM",15)
TOT
^SCR("P1MNSIS","P","NM",20)
GRAPH
^SCR("P1MNSIS","P","NM",25)
SHVA
^SCR("P1MNSIS","P","NM",30)
LKH
^SCR("P1MNSIS","P","NM",35)
PAR
^SCR("P1MNSIS","P","NM",40)
TBL
^SCR("P1MNSIS","P","NM",45)
CHK
^SCR("P1MNSIS","P","NM",50)
MVC
^SCR("P1MNSIS","P","NM",55)
SRV
^SCR("P1MNSIS","P","NM",60)
SHAON
^SCR("P1MNSIS","P","NM",65)
ZICUJ
^SCR("P1MNSIS","P","NM",70)
HSV
^SCR("P1MNSIS","P","RB",1)
3,23,18,61
^SCR("P1MOVP")
H
^SCR("P1MOVP",1)
                         # dxardl mihixt oiivl `p #                            
^SCR("P1MOVP",2)
                                                                               
^SCR("P1MOVP",3)
                                                                             1$
^SCR("P1MOVP",4)
      : x`yp : xar :  mekq  :zetqez:zenk: xign :     hixt xe`z    :onq: cew:   
^SCR("P1MOVP",5)
                                                                               
^SCR("P1MOVP",6)
                                                                               
^SCR("P1MOVP",7)
                                                                               
^SCR("P1MOVP",8)
                                                                               
^SCR("P1MOVP",9)
                                                                               
^SCR("P1MOVP",10)
                                                                               
^SCR("P1MOVP",11)
                                                                               
^SCR("P1MOVP",12)
                                                                               
^SCR("P1MOVP",13)
                                                                               
^SCR("P1MOVP",14)
                                                                               
^SCR("P1MOVP",15)
                                                                               
^SCR("P1MOVP",16)
                                                                               
^SCR("P1MOVP",17)
                                                                               
^SCR("P1MOVP",18)
                                                                               
^SCR("P1MOVP",19)
                                                                               
^SCR("P1MOVP",20)
 $1                                                                            
^SCR("P1MOVP",21)
                                                                               
^SCR("P1MOVP","A",1)
„˜�’„Œ�‰ˆ‰˜”�‰‰–Œ€�
^SCR("P1MOVP","A",2)

^SCR("P1MOVP","A",3)

^SCR("P1MOVP","A",4)
˜€™�˜�’�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€š�Ž‘ƒ…—
^SCR("P1MOVP","A",5)
---------------------------------------------------------------
^SCR("P1MOVP","A",6)

^SCR("P1MOVP","A",7)

^SCR("P1MOVP","A",8)

^SCR("P1MOVP","A",9)

^SCR("P1MOVP","A",10)

^SCR("P1MOVP","A",11)

^SCR("P1MOVP","A",12)

^SCR("P1MOVP","A",13)

^SCR("P1MOVP","A",14)

^SCR("P1MOVP","A",15)

^SCR("P1MOVP","A",16)

^SCR("P1MOVP","A",17)

^SCR("P1MOVP","A",18)

^SCR("P1MOVP","A",19)

^SCR("P1MOVP","A",20)

^SCR("P1MOVP","A",21)

^SCR("P1MOVP","AV",1)
vrcgvkohyhrpihhmktb
^SCR("P1MOVP","AV",2)

^SCR("P1MOVP","AV",3)

^SCR("P1MOVP","AV",4)
rtabrcgoufx,upxu,,unfrhjnyhrprut,inxsue
^SCR("P1MOVP","AV",5)
---------------------------------------------------------------
^SCR("P1MOVP","AV",6)

^SCR("P1MOVP","AV",7)

^SCR("P1MOVP","AV",8)

^SCR("P1MOVP","AV",9)

^SCR("P1MOVP","AV",10)

^SCR("P1MOVP","AV",11)

^SCR("P1MOVP","AV",12)

^SCR("P1MOVP","AV",13)

^SCR("P1MOVP","AV",14)

^SCR("P1MOVP","AV",15)

^SCR("P1MOVP","AV",16)

^SCR("P1MOVP","AV",17)

^SCR("P1MOVP","AV",18)

^SCR("P1MOVP","AV",19)

^SCR("P1MOVP","AV",20)

^SCR("P1MOVP","AV",21)

^SCR("P1MOVP","G",1,"CRD")
5,75,E,4,0
^SCR("P1MOVP","G",1,"HELP")

^SCR("P1MOVP","G",1,"LMAX")
4
^SCR("P1MOVP","G",1,"MUMPS1")

^SCR("P1MOVP","G",1,"MUMPS2")

^SCR("P1MOVP","G",1,"OUTPUT")

^SCR("P1MOVP","G",1,"SHEM")
 cew
^SCR("P1MOVP","G",1,"TYP")
E
^SCR("P1MOVP","G",2,"CRD")
5,70,E,3,0
^SCR("P1MOVP","G",2,"HELP")

^SCR("P1MOVP","G",2,"LMAX")
3
^SCR("P1MOVP","G",2,"MUMPS1")

^SCR("P1MOVP","G",2,"MUMPS2")

^SCR("P1MOVP","G",2,"OUTPUT")

^SCR("P1MOVP","G",2,"SHEM")
onq
^SCR("P1MOVP","G",2,"TYP")
E
^SCR("P1MOVP","G",3,"CRD")
5,66,H,18,0
^SCR("P1MOVP","G",3,"HELP")

^SCR("P1MOVP","G",3,"LMAX")
18
^SCR("P1MOVP","G",3,"MUMPS1")

^SCR("P1MOVP","G",3,"MUMPS2")

^SCR("P1MOVP","G",3,"OUTPUT")

^SCR("P1MOVP","G",3,"SHEM")
     hixt xe`z    
^SCR("P1MOVP","G",3,"TYP")
H
^SCR("P1MOVP","G",4,"CRD")
5,47,N,6,2
^SCR("P1MOVP","G",4,"HELP")

^SCR("P1MOVP","G",4,"LMAX")
6
^SCR("P1MOVP","G",4,"MUMPS1")

^SCR("P1MOVP","G",4,"MUMPS2")

^SCR("P1MOVP","G",4,"OUTPUT")

^SCR("P1MOVP","G",4,"SHEM")
 xign 
^SCR("P1MOVP","G",4,"TYP")
N
^SCR("P1MOVP","G",5,"CRD")
5,40,N,4,0
^SCR("P1MOVP","G",5,"HELP")

^SCR("P1MOVP","G",5,"LMAX")
4
^SCR("P1MOVP","G",5,"MUMPS1")

^SCR("P1MOVP","G",5,"MUMPS2")

^SCR("P1MOVP","G",5,"OUTPUT")

^SCR("P1MOVP","G",5,"SHEM")
zenk
^SCR("P1MOVP","G",5,"TYP")
N
^SCR("P1MOVP","G",6,"CRD")
5,35,N,6,2
^SCR("P1MOVP","G",6,"HELP")

^SCR("P1MOVP","G",6,"LMAX")
6
^SCR("P1MOVP","G",6,"MUMPS1")

^SCR("P1MOVP","G",6,"MUMPS2")

^SCR("P1MOVP","G",6,"OUTPUT")

^SCR("P1MOVP","G",6,"SHEM")
zetqez
^SCR("P1MOVP","G",6,"TYP")
N
^SCR("P1MOVP","G",7,"CRD")
5,28,N,7,2
^SCR("P1MOVP","G",7,"HELP")

^SCR("P1MOVP","G",7,"LMAX")
8
^SCR("P1MOVP","G",7,"MUMPS1")

^SCR("P1MOVP","G",7,"MUMPS2")

^SCR("P1MOVP","G",7,"OUTPUT")

^SCR("P1MOVP","G",7,"SHEM")
  mekq  
^SCR("P1MOVP","G",7,"TYP")
N
^SCR("P1MOVP","G",8,"CRD")
5,19,N,4,0
^SCR("P1MOVP","G",8,"HELP")
<F2> - zetqeze mihixt bivdl ,<F10> - zetqez bivdl ,<F9> - zenkd lk xiardl 
^SCR("P1MOVP","G",8,"LMAX")
5
^SCR("P1MOVP","G",8,"MUMPS1")

^SCR("P1MOVP","G",8,"MUMPS2")
D AVAR^P1HZOP
^SCR("P1MOVP","G",8,"SHEM")
 xar 
^SCR("P1MOVP","G",8,"TYP")
N
^SCR("P1MOVP","G",9,"CRD")
5,13,N,4,0
^SCR("P1MOVP","G",9,"HELP")

^SCR("P1MOVP","G",9,"LMAX")
6
^SCR("P1MOVP","G",9,"MUMPS1")

^SCR("P1MOVP","G",9,"MUMPS2")

^SCR("P1MOVP","G",9,"OUTPUT")

^SCR("P1MOVP","G",9,"SHEM")
 x`yp 
^SCR("P1MOVP","G",9,"TYP")
N
^SCR("P1MOVP","G","MAX")
3
^SCR("P1MOVP","G","NAME","BIT")
8
^SCR("P1MOVP","G","NAME","ITRB")
9
^SCR("P1MOVP","G","NAME","KAM")
5
^SCR("P1MOVP","G","NAME","MH")
4
^SCR("P1MOVP","G","NAME","PAR")
1
^SCR("P1MOVP","G","NAME","PAR1")
3
^SCR("P1MOVP","G","NAME","SUG")
2
^SCR("P1MOVP","G","NAME","SUM")
7
^SCR("P1MOVP","G","NAME","TSF")
6
^SCR("P1MOVP","G","NM",1)
PAR
^SCR("P1MOVP","G","NM",2)
SUG
^SCR("P1MOVP","G","NM",3)
PAR1
^SCR("P1MOVP","G","NM",4)
MH
^SCR("P1MOVP","G","NM",5)
KAM
^SCR("P1MOVP","G","NM",6)
TSF
^SCR("P1MOVP","G","NM",7)
SUM
^SCR("P1MOVP","G","NM",8)
BIT
^SCR("P1MOVP","G","NM",9)
ITRB
^SCR("P1MOVP","G","RB")
4,2,21,79
^SCR("P1MOVP","G","REF")
^THZ3($P
^SCR("P1MOVP","G","RZD")
\
^SCR("P1MOVP","G","STEP")
1
^SCR("P1MOVP","G","STG")
      : x`yp : xar :  mekq  :zetqez:zenk: xign :     hixt xe`z    :onq: cew:   
^SCR("P1MOVP","G","VG")
6
^SCR("P1MOVP","NAME")
xg` ogleyl mihixt zxard
^SCR("P1MOVP","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1MOVP","P","REF",2,"RZD")
\
^SCR("P1MOVP","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1MOVP","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1MOVP","P","REF",3,"RZD")
\
^SCR("P1MOVP","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP
^SCR("P1MOVP","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1MOVP","P","REF",4,"RZD")
\\
^SCR("P1MOVP","P","REF",4,"STR")
HRA2\\HODAA
^SCR("P1MOVPRT")
H
^SCR("P1MOVPRT",1)
                               # dxardl mihixt oiivl `p #                      
^SCR("P1MOVPRT",2)
                                                              {05  : ogley     
^SCR("P1MOVPRT",3)
                                                                             1$
^SCR("P1MOVPRT",4)
  :     dxrd     :oniq:  mekq :zetqez:zenk: xign:     hixt xe`z    :beq: cew:  
^SCR("P1MOVPRT",5)
                                                                               
^SCR("P1MOVPRT",6)
                                                                               
^SCR("P1MOVPRT",7)
                                                                               
^SCR("P1MOVPRT",8)
                                                                               
^SCR("P1MOVPRT",9)
                                                                               
^SCR("P1MOVPRT",10)
                                                                               
^SCR("P1MOVPRT",11)
                                                                               
^SCR("P1MOVPRT",12)
                                                                               
^SCR("P1MOVPRT",13)
                                                                               
^SCR("P1MOVPRT",14)
                                                                               
^SCR("P1MOVPRT",15)
                                                                               
^SCR("P1MOVPRT",16)
                                                                               
^SCR("P1MOVPRT",17)
                                                                               
^SCR("P1MOVPRT",18)
                                                                               
^SCR("P1MOVPRT",19)
                                                                               
^SCR("P1MOVPRT",20)
                                                                               
^SCR("P1MOVPRT",21)
 $1                                                                            
^SCR("P1MOVPRT",22)
                                                                               
^SCR("P1MOVPRT","A",1)
„˜�’„Œ�‰ˆ‰˜”�‰‰–Œ€�
^SCR("P1MOVPRT","A",2)
:�‡Œ…™
^SCR("P1MOVPRT","A",3)

^SCR("P1MOVPRT","A",4)
„˜’„�Ž‰‘�…‹‘š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€š‚…‘ƒ…—
^SCR("P1MOVPRT","A",5)
-------------------------------------------------------------------
^SCR("P1MOVPRT","A",6)

^SCR("P1MOVPRT","A",7)

^SCR("P1MOVPRT","A",8)

^SCR("P1MOVPRT","A",9)

^SCR("P1MOVPRT","A",10)

^SCR("P1MOVPRT","A",11)

^SCR("P1MOVPRT","A",12)

^SCR("P1MOVPRT","A",13)

^SCR("P1MOVPRT","A",14)

^SCR("P1MOVPRT","A",15)

^SCR("P1MOVPRT","A",16)

^SCR("P1MOVPRT","A",17)

^SCR("P1MOVPRT","A",18)

^SCR("P1MOVPRT","A",19)

^SCR("P1MOVPRT","A",20)

^SCR("P1MOVPRT","A",21)

^SCR("P1MOVPRT","A",22)

^SCR("P1MOVPRT","AV",1)
vrcgvkohyhrpihhmktb
^SCR("P1MOVPRT","AV",2)
:ijkua
^SCR("P1MOVPRT","AV",3)

^SCR("P1MOVPRT","AV",4)
vrgvinhxoufx,upxu,,unfrhjnyhrprut,duxsue
^SCR("P1MOVPRT","AV",5)
-------------------------------------------------------------------
^SCR("P1MOVPRT","AV",6)

^SCR("P1MOVPRT","AV",7)

^SCR("P1MOVPRT","AV",8)

^SCR("P1MOVPRT","AV",9)

^SCR("P1MOVPRT","AV",10)

^SCR("P1MOVPRT","AV",11)

^SCR("P1MOVPRT","AV",12)

^SCR("P1MOVPRT","AV",13)

^SCR("P1MOVPRT","AV",14)

^SCR("P1MOVPRT","AV",15)

^SCR("P1MOVPRT","AV",16)

^SCR("P1MOVPRT","AV",17)

^SCR("P1MOVPRT","AV",18)

^SCR("P1MOVPRT","AV",19)

^SCR("P1MOVPRT","AV",20)

^SCR("P1MOVPRT","AV",21)

^SCR("P1MOVPRT","AV",22)

^SCR("P1MOVPRT","G",1,"CHECK")
Y
^SCR("P1MOVPRT","G",1,"CRD")
5,76,E,4,0
^SCR("P1MOVPRT","G",1,"FNC")

^SCR("P1MOVPRT","G",1,"GLOB")
PAR
^SCR("P1MOVPRT","G",1,"HELP")
<F2>-dpnfd,<F10>-zetqez zbvd;<F9>-zetqez,<F8>-zeveaw,<F7>-dlah;<F6>-my
^SCR("P1MOVPRT","G",1,"LMAX")
4
^SCR("P1MOVPRT","G",1,"MUMPS1")

^SCR("P1MOVPRT","G",1,"MUMPS2")

^SCR("P1MOVPRT","G",1,"NLN")
20
^SCR("P1MOVPRT","G",1,"OUTPUT")

^SCR("P1MOVPRT","G",1,"RZD")
**
^SCR("P1MOVPRT","G",1,"SHEM")
 cew
^SCR("P1MOVPRT","G",1,"TOPB")
8
^SCR("P1MOVPRT","G",1,"TYP")
E
^SCR("P1MOVPRT","G",1,"VRB")
PAR1
^SCR("P1MOVPRT","G",2,"CRD")
5,71,E,3,0
^SCR("P1MOVPRT","G",2,"HELP")
<F7> - dbvd 
^SCR("P1MOVPRT","G",2,"LMAX")
3
^SCR("P1MOVPRT","G",2,"MUMPS1")

^SCR("P1MOVPRT","G",2,"MUMPS2")

^SCR("P1MOVPRT","G",2,"OUTPUT")

^SCR("P1MOVPRT","G",2,"SHEM")
beq
^SCR("P1MOVPRT","G",2,"TYP")
E
^SCR("P1MOVPRT","G",3,"CRD")
5,67,H,18,0
^SCR("P1MOVPRT","G",3,"HELP")

^SCR("P1MOVPRT","G",3,"LMAX")
18
^SCR("P1MOVPRT","G",3,"MUMPS1")

^SCR("P1MOVPRT","G",3,"MUMPS2")

^SCR("P1MOVPRT","G",3,"OUTPUT")

^SCR("P1MOVPRT","G",3,"SHEM")
     hixt xe`z    
^SCR("P1MOVPRT","G",3,"TYP")
H
^SCR("P1MOVPRT","G",4,"CRD")
5,48,N,5,2
^SCR("P1MOVPRT","G",4,"HELP")

^SCR("P1MOVPRT","G",4,"LMAX")
5
^SCR("P1MOVPRT","G",4,"MUMPS1")

^SCR("P1MOVPRT","G",4,"MUMPS2")

^SCR("P1MOVPRT","G",4,"OUTPUT")

^SCR("P1MOVPRT","G",4,"SHEM")
 xign
^SCR("P1MOVPRT","G",4,"TYP")
N
^SCR("P1MOVPRT","G",5,"CRD")
5,42,N,4,0
^SCR("P1MOVPRT","G",5,"HELP")
zenk zepyl e` <F9> - hixt oiivl 
^SCR("P1MOVPRT","G",5,"LMAX")
4
^SCR("P1MOVPRT","G",5,"MUMPS1")

^SCR("P1MOVPRT","G",5,"MUMPS2")
D KAM^P1HZOP
^SCR("P1MOVPRT","G",5,"MUST")

^SCR("P1MOVPRT","G",5,"SHEM")
zenk
^SCR("P1MOVPRT","G",5,"TYP")
N
^SCR("P1MOVPRT","G",6,"CRD")
5,37,N,6,2
^SCR("P1MOVPRT","G",6,"HELP")

^SCR("P1MOVPRT","G",6,"LMAX")
6
^SCR("P1MOVPRT","G",6,"MUMPS1")

^SCR("P1MOVPRT","G",6,"MUMPS2")

^SCR("P1MOVPRT","G",6,"OUTPUT")

^SCR("P1MOVPRT","G",6,"SHEM")
zetqez
^SCR("P1MOVPRT","G",6,"TYP")
N
^SCR("P1MOVPRT","G",7,"CRD")
5,30,N,7,2
^SCR("P1MOVPRT","G",7,"HELP")

^SCR("P1MOVPRT","G",7,"LMAX")
7
^SCR("P1MOVPRT","G",7,"MUMPS1")

^SCR("P1MOVPRT","G",7,"MUMPS2")

^SCR("P1MOVPRT","G",7,"OUTPUT")

^SCR("P1MOVPRT","G",7,"SHEM")
  mekq 
^SCR("P1MOVPRT","G",7,"TYP")
N
^SCR("P1MOVPRT","G",8,"CRD")
5,22,H,4,0
^SCR("P1MOVPRT","G",8,"HELP")

^SCR("P1MOVPRT","G",8,"LMAX")
4
^SCR("P1MOVPRT","G",8,"MUMPS1")

^SCR("P1MOVPRT","G",8,"MUMPS2")

^SCR("P1MOVPRT","G",8,"OUTPUT")

^SCR("P1MOVPRT","G",8,"SHEM")
oniq
^SCR("P1MOVPRT","G",8,"TYP")
H
^SCR("P1MOVPRT","G",9,"CRD")
5,17,H,14,0
^SCR("P1MOVPRT","G",9,"HELP")

^SCR("P1MOVPRT","G",9,"LMAX")
14
^SCR("P1MOVPRT","G",9,"MUMPS1")

^SCR("P1MOVPRT","G",9,"MUMPS2")

^SCR("P1MOVPRT","G",9,"OUTPUT")

^SCR("P1MOVPRT","G",9,"SHEM")
     dxrd     
^SCR("P1MOVPRT","G",9,"TYP")
H
^SCR("P1MOVPRT","G","DEL")
Y
^SCR("P1MOVPRT","G","MAX")
1
^SCR("P1MOVPRT","G","NAME","HRM")
9
^SCR("P1MOVPRT","G","NAME","KAM")
5
^SCR("P1MOVPRT","G","NAME","MH")
4
^SCR("P1MOVPRT","G","NAME","PAR")
1
^SCR("P1MOVPRT","G","NAME","PAR1")
3
^SCR("P1MOVPRT","G","NAME","SIMAN")
8
^SCR("P1MOVPRT","G","NAME","SUG")
2
^SCR("P1MOVPRT","G","NAME","SUM")
7
^SCR("P1MOVPRT","G","NAME","TSF")
6
^SCR("P1MOVPRT","G","NM",1)
PAR
^SCR("P1MOVPRT","G","NM",2)
SUG
^SCR("P1MOVPRT","G","NM",3)
PAR1
^SCR("P1MOVPRT","G","NM",4)
MH
^SCR("P1MOVPRT","G","NM",5)
KAM
^SCR("P1MOVPRT","G","NM",6)
TSF
^SCR("P1MOVPRT","G","NM",7)
SUM
^SCR("P1MOVPRT","G","NM",8)
SIMAN
^SCR("P1MOVPRT","G","NM",9)
HRM
^SCR("P1MOVPRT","G","RB")
4,2,22,79
^SCR("P1MOVPRT","G","REF")
^THZ3($P
^SCR("P1MOVPRT","G","RZD")
\
^SCR("P1MOVPRT","G","STEP")
1
^SCR("P1MOVPRT","G","STG")
  :     dxrd     :oniq:  mekq :zetqez:zenk: xign:     hixt xe`z    :beq: cew:  
^SCR("P1MOVPRT","G","VG")
6
^SCR("P1MOVPRT","NAME")

^SCR("P1MOVPRT","P",5,"CRD")
2,62,E,3,0
^SCR("P1MOVPRT","P",5,"HELP")

^SCR("P1MOVPRT","P",5,"LMAX")
5
^SCR("P1MOVPRT","P",5,"MUMPS1")

^SCR("P1MOVPRT","P",5,"MUMPS2")

^SCR("P1MOVPRT","P",5,"OUTPUT")

^SCR("P1MOVPRT","P",5,"TYP")
E
^SCR("P1MOVPRT","P","NAME","NMB")
5
^SCR("P1MOVPRT","P","NM",5)
NMB
^SCR("P1MOVPRT","P","REF",2)
^THZ(%L3MYDVN,HZM,"TM")
^SCR("P1MOVPRT","P","REF",2,"RZD")
\
^SCR("P1MOVPRT","P","REF",2,"STR")
PSL\ZMANS\\\TM
^SCR("P1MOVPRT","P","REF",3)
^THZ(%L3MYDVN,HZM,"CB")
^SCR("P1MOVPRT","P","REF",3,"RZD")
\
^SCR("P1MOVPRT","P","REF",3,"STR")
NCAB\MZM\CHK\CA\ASR\DHB\DHB1\ODEF\TL\TIP
^SCR("P1MOVPRT","P","REF",4)
^THZ(%L3MYDVN,HZM,"HR2")
^SCR("P1MOVPRT","P","REF",4,"RZD")
\\
^SCR("P1MOVPRT","P","REF",4,"STR")
HRA2\\HODAA
^SCR("P1MOVT")
H
^SCR("P1MOVT",1)
                                                                               
^SCR("P1MOVT",2)
       {20   }:xign {                     15}:xven xe`z  {10      }:xven cew   
^SCR("P1MOVT",3)
                                                              {25 }:    zenk   
^SCR("P1MOVT",4)
                                                                          1$   
^SCR("P1MOVT",5)
                  :oniq: zenk :  xign  :   ztqez xe`z    : ztqez cew :         
^SCR("P1MOVT",6)
                                                                               
^SCR("P1MOVT",7)
                                                                               
^SCR("P1MOVT",8)
                                                                               
^SCR("P1MOVT",9)
                                                                               
^SCR("P1MOVT",10)
                                                                               
^SCR("P1MOVT",11)
                                                                               
^SCR("P1MOVT",12)
                                                                               
^SCR("P1MOVT",13)
                                                                               
^SCR("P1MOVT",14)
                                                                               
^SCR("P1MOVT",15)
                                                                               
^SCR("P1MOVT",16)
                                                                               
^SCR("P1MOVT",17)
                                                                               
^SCR("P1MOVT",18)
                                                                               
^SCR("P1MOVT",19)
               $1                                                              
^SCR("P1MOVT",20)
                      g"y {30     } : zetqez k"dq                              
^SCR("P1MOVT",21)
                      g"y {35     } : zetqez + hixt k"dq                       
^SCR("P1MOVT",22)
                                                                               
^SCR("P1MOVT","A",1)

^SCR("P1MOVT","A",2)
:˜‰‡Ž:˜–…Ž˜…€š:˜–…Žƒ…—
^SCR("P1MOVT","A",3)
:š…Ž‹
^SCR("P1MOVT","A",4)

^SCR("P1MOVT","A",5)
�Ž‰‘š…Ž‹˜‰‡Žš”‘…š˜…€šš”‘…šƒ…—
^SCR("P1MOVT","A",6)
----------------------------------------------
^SCR("P1MOVT","A",7)

^SCR("P1MOVT","A",8)

^SCR("P1MOVT","A",9)

^SCR("P1MOVT","A",10)

^SCR("P1MOVT","A",11)

^SCR("P1MOVT","A",12)

^SCR("P1MOVT","A",13)

^SCR("P1MOVT","A",14)

^SCR("P1MOVT","A",15)

^SCR("P1MOVT","A",16)

^SCR("P1MOVT","A",17)

^SCR("P1MOVT","A",18)

^SCR("P1MOVT","A",19)

^SCR("P1MOVT","A",20)
‡"™:š…”‘…š‹"„‘
^SCR("P1MOVT","A",21)
‡"™:š…”‘…š+ˆ‰˜”‹"„‘
^SCR("P1MOVT","A",22)

^SCR("P1MOVT","AV",1)

^SCR("P1MOVT","AV",2)
:rhjn:rmunrut,:rmunsue
^SCR("P1MOVT","AV",3)
:,unf
^SCR("P1MOVT","AV",4)

^SCR("P1MOVT","AV",5)
inhx,unfrhjn,pxu,rut,,pxu,sue
^SCR("P1MOVT","AV",6)
----------------------------------------------
^SCR("P1MOVT","AV",7)

^SCR("P1MOVT","AV",8)

^SCR("P1MOVT","AV",9)

^SCR("P1MOVT","AV",10)

^SCR("P1MOVT","AV",11)

^SCR("P1MOVT","AV",12)

^SCR("P1MOVT","AV",13)

^SCR("P1MOVT","AV",14)

^SCR("P1MOVT","AV",15)

^SCR("P1MOVT","AV",16)

^SCR("P1MOVT","AV",17)

^SCR("P1MOVT","AV",18)

^SCR("P1MOVT","AV",19)

^SCR("P1MOVT","AV",20)
j"a:,upxu,f"vx
^SCR("P1MOVT","AV",21)
j"a:,upxu,+yhrpf"vx
^SCR("P1MOVT","AV",22)

^SCR("P1MOVT","G",1,"CRD")
6,69,E,8,0
^SCR("P1MOVT","G",1,"HELP")

^SCR("P1MOVT","G",1,"LMAX")
11
^SCR("P1MOVT","G",1,"MUMPS1")

^SCR("P1MOVT","G",1,"MUMPS2")

^SCR("P1MOVT","G",1,"OUTPUT")

^SCR("P1MOVT","G",1,"SHEM")
 ztqez cew 
^SCR("P1MOVT","G",1,"TYP")
E
^SCR("P1MOVT","G",2,"CRD")
6,57,H,16,0
^SCR("P1MOVT","G",2,"HELP")

^SCR("P1MOVT","G",2,"LMAX")
17
^SCR("P1MOVT","G",2,"MUMPS1")

^SCR("P1MOVT","G",2,"MUMPS2")

^SCR("P1MOVT","G",2,"OUTPUT")

^SCR("P1MOVT","G",2,"SHEM")
   ztqez xe`z    
^SCR("P1MOVT","G",2,"TYP")
H
^SCR("P1MOVT","G",3,"CRD")
6,39,N,8,2
^SCR("P1MOVT","G",3,"HELP")

^SCR("P1MOVT","G",3,"LMAX")
8
^SCR("P1MOVT","G",3,"MUMPS1")

^SCR("P1MOVT","G",3,"MUMPS2")

^SCR("P1MOVT","G",3,"OUTPUT")

^SCR("P1MOVT","G",3,"SHEM")
  xign  
^SCR("P1MOVT","G",3,"TYP")
N
^SCR("P1MOVT","G",4,"CRD")
6,30,N,4,0
^SCR("P1MOVT","G",4,"HELP")
<F9> - onql 
^SCR("P1MOVT","G",4,"LMAX")
6
^SCR("P1MOVT","G",4,"MUMPS1")

^SCR("P1MOVT","G",4,"MUMPS2")
D CT^P1MOVT
^SCR("P1MOVT","G",4,"SHEM")
 zenk 
^SCR("P1MOVT","G",4,"TYP")
N
^SCR("P1MOVT","G",5,"CRD")
6,23,E,1,0
^SCR("P1MOVT","G",5,"HELP")

^SCR("P1MOVT","G",5,"LMAX")
4
^SCR("P1MOVT","G",5,"MUMPS1")

^SCR("P1MOVT","G",5,"MUMPS2")

^SCR("P1MOVT","G",5,"OUTPUT")

^SCR("P1MOVT","G",5,"SHEM")
oniq
^SCR("P1MOVT","G",5,"TYP")
E
^SCR("P1MOVT","G","MAX")
2
^SCR("P1MOVT","G","NAME","CT")
4
^SCR("P1MOVT","G","NAME","KODT")
1
^SCR("P1MOVT","G","NAME","MHT")
3
^SCR("P1MOVT","G","NAME","NAMET")
2
^SCR("P1MOVT","G","NAME","SIMAN")
5
^SCR("P1MOVT","G","NM",1)
KODT
^SCR("P1MOVT","G","NM",2)
NAMET
^SCR("P1MOVT","G","NM",3)
MHT
^SCR("P1MOVT","G","NM",4)
CT
^SCR("P1MOVT","G","NM",5)
SIMAN
^SCR("P1MOVT","G","RB")
5,16,20,76
^SCR("P1MOVT","G","REF")
^THZT($P
^SCR("P1MOVT","G","RZD")
\
^SCR("P1MOVT","G","STEP")
1
^SCR("P1MOVT","G","STG")
                  :oniq: zenk :  xign  :   ztqez xe`z    : ztqez cew :         
^SCR("P1MOVT","G","VG")
7
^SCR("P1MOVT","NAME")

^SCR("P1MOVT","P",10,"CRD")
2,57,E,8,0
^SCR("P1MOVT","P",10,"HELP")

^SCR("P1MOVT","P",10,"LMAX")
9
^SCR("P1MOVT","P",10,"MUMPS1")

^SCR("P1MOVT","P",10,"MUMPS2")

^SCR("P1MOVT","P",10,"OUTPUT")

^SCR("P1MOVT","P",10,"TYP")
E
^SCR("P1MOVT","P",15,"CRD")
2,45,H,20
^SCR("P1MOVT","P",15,"HELP")

^SCR("P1MOVT","P",15,"LMAX")
24
^SCR("P1MOVT","P",15,"MUMPS1")

^SCR("P1MOVT","P",15,"MUMPS2")

^SCR("P1MOVT","P",15,"OUTPUT")

^SCR("P1MOVT","P",15,"TYP")
H
^SCR("P1MOVT","P",20,"CRD")
2,7,N,6,2
^SCR("P1MOVT","P",20,"HELP")

^SCR("P1MOVT","P",20,"LMAX")
6
^SCR("P1MOVT","P",20,"MUMPS1")

^SCR("P1MOVT","P",20,"MUMPS2")

^SCR("P1MOVT","P",20,"OUTPUT")

^SCR("P1MOVT","P",20,"TYP")
N
^SCR("P1MOVT","P",25,"CRD")
3,62,N,4,0
^SCR("P1MOVT","P",25,"HELP")

^SCR("P1MOVT","P",25,"LMAX")
4
^SCR("P1MOVT","P",25,"MUMPS1")

^SCR("P1MOVT","P",25,"MUMPS2")

^SCR("P1MOVT","P",25,"OUTPUT")

^SCR("P1MOVT","P",25,"TYP")
N
^SCR("P1MOVT","P",30,"CRD")
20,26,N,8,2
^SCR("P1MOVT","P",30,"HELP")

^SCR("P1MOVT","P",30,"LMAX")
8
^SCR("P1MOVT","P",30,"MUMPS1")

^SCR("P1MOVT","P",30,"MUMPS2")

^SCR("P1MOVT","P",30,"OUTPUT")

^SCR("P1MOVT","P",30,"TYP")
N
^SCR("P1MOVT","P",35,"CRD")
21,26,N,8,2
^SCR("P1MOVT","P",35,"HELP")

^SCR("P1MOVT","P",35,"LMAX")
8
^SCR("P1MOVT","P",35,"MUMPS1")

^SCR("P1MOVT","P",35,"MUMPS2")

^SCR("P1MOVT","P",35,"OUTPUT")

^SCR("P1MOVT","P",35,"TYP")
N
^SCR("P1MOVT","P","NAME","CP")
25
^SCR("P1MOVT","P","NAME","KODP")
10
^SCR("P1MOVT","P","NAME","MHP")
20
^SCR("P1MOVT","P","NAME","NAMEP")
15
^SCR("P1MOVT","P","NAME","SHUMP")
35
^SCR("P1MOVT","P","NAME","SHUMT")
30
^SCR("P1MOVT","P","NM",10)
KODP
^SCR("P1MOVT","P","NM",15)
NAMEP
^SCR("P1MOVT","P","NM",20)
MHP
^SCR("P1MOVT","P","NM",25)
CP
^SCR("P1MOVT","P","NM",30)
SHUMT
^SCR("P1MOVT","P","NM",35)
SHUMP
^SCR("P1MSH")
H
^SCR("P1MSH",1)
                             #  migily g"ec  #                                 
^SCR("P1MSH",2)
                        {10      } jix`z cr    {05      } jix`zn               
^SCR("P1MSH",3)
                              {15  } dry cr        {12  }   dryn               
^SCR("P1MSH",4)
                                                                             1$
^SCR("P1MSH",5)
   : iekif :  tih :zepnfd: zegpd :milehia: zexy :  oeict  :   gily my  : 'qn : 
^SCR("P1MSH",6)
                                                                               
^SCR("P1MSH",7)
                                                                               
^SCR("P1MSH",8)
                                                                               
^SCR("P1MSH",9)
                                                                               
^SCR("P1MSH",10)
                                                                               
^SCR("P1MSH",11)
                                                                               
^SCR("P1MSH",12)
                                                                               
^SCR("P1MSH",13)
                                                                               
^SCR("P1MSH",14)
                                                                               
^SCR("P1MSH",15)
                                                                               
^SCR("P1MSH",16)
                                                                               
^SCR("P1MSH",17)
                                                                               
^SCR("P1MSH",18)
                                                                               
^SCR("P1MSH",19)
                                                                               
^SCR("P1MSH",20)
                                                                               
^SCR("P1MSH",21)
 $1                                                                            
^SCR("P1MSH",22)
  {50    }{47    }{42    }{35    }{30    }{25    }{20       }                  
^SCR("P1MSH","A",1)
�‰‡‰Œ™‡"…ƒ
^SCR("P1MSH","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("P1MSH","A",3)
„’™ƒ’„’™Ž
^SCR("P1MSH","A",4)

^SCR("P1MSH","A",5)
‰…‹‰†”‰ˆš…�Ž†„š…‡�„�‰Œ…ˆ‰�š…˜™�…‰ƒ”‡‰Œ™�™'‘Ž
^SCR("P1MSH","A",6)
------------------------------------------------------------------
^SCR("P1MSH","A",7)

^SCR("P1MSH","A",8)

^SCR("P1MSH","A",9)

^SCR("P1MSH","A",10)

^SCR("P1MSH","A",11)

^SCR("P1MSH","A",12)

^SCR("P1MSH","A",13)

^SCR("P1MSH","A",14)

^SCR("P1MSH","A",15)

^SCR("P1MSH","A",16)

^SCR("P1MSH","A",17)

^SCR("P1MSH","A",18)

^SCR("P1MSH","A",19)

^SCR("P1MSH","A",20)

^SCR("P1MSH","A",21)

^SCR("P1MSH","A",22)

^SCR("P1MSH","AV",1)
ohjhkaj"us
^SCR("P1MSH","AV",2)
lhrt,sglhrt,n
^SCR("P1MSH","AV",3)
vgasgvgan
^SCR("P1MSH","AV",4)

^SCR("P1MSH","AV",5)
hufhzphy,ubnzv,ujbvohkuyhc,uraiuhspjhkaoawxn
^SCR("P1MSH","AV",6)
------------------------------------------------------------------
^SCR("P1MSH","AV",7)

^SCR("P1MSH","AV",8)

^SCR("P1MSH","AV",9)

^SCR("P1MSH","AV",10)

^SCR("P1MSH","AV",11)

^SCR("P1MSH","AV",12)

^SCR("P1MSH","AV",13)

^SCR("P1MSH","AV",14)

^SCR("P1MSH","AV",15)

^SCR("P1MSH","AV",16)

^SCR("P1MSH","AV",17)

^SCR("P1MSH","AV",18)

^SCR("P1MSH","AV",19)

^SCR("P1MSH","AV",20)

^SCR("P1MSH","AV",21)

^SCR("P1MSH","AV",22)

^SCR("P1MSH","G",1,"CRD")
6,77,E,5,0
^SCR("P1MSH","G",1,"HELP")

^SCR("P1MSH","G",1,"LMAX")
5
^SCR("P1MSH","G",1,"MUMPS1")

^SCR("P1MSH","G",1,"MUMPS2")

^SCR("P1MSH","G",1,"OUTPUT")

^SCR("P1MSH","G",1,"SHEM")
 'qn 
^SCR("P1MSH","G",1,"TYP")
E
^SCR("P1MSH","G",2,"CRD")
6,71,H,12,0
^SCR("P1MSH","G",2,"HELP")

^SCR("P1MSH","G",2,"LMAX")
12
^SCR("P1MSH","G",2,"MUMPS1")

^SCR("P1MSH","G",2,"MUMPS2")

^SCR("P1MSH","G",2,"OUTPUT")

^SCR("P1MSH","G",2,"SHEM")
   gily my  
^SCR("P1MSH","G",2,"TYP")
H
^SCR("P1MSH","G",3,"CRD")
6,58,N,9,1
^SCR("P1MSH","G",3,"HELP")

^SCR("P1MSH","G",3,"LMAX")
9
^SCR("P1MSH","G",3,"MUMPS1")

^SCR("P1MSH","G",3,"MUMPS2")

^SCR("P1MSH","G",3,"OUTPUT")

^SCR("P1MSH","G",3,"SHEM")
  oeict  
^SCR("P1MSH","G",3,"TYP")
N
^SCR("P1MSH","G",4,"CRD")
6,48,N,6,1
^SCR("P1MSH","G",4,"HELP")

^SCR("P1MSH","G",4,"LMAX")
6
^SCR("P1MSH","G",4,"MUMPS1")

^SCR("P1MSH","G",4,"MUMPS2")

^SCR("P1MSH","G",4,"OUTPUT")

^SCR("P1MSH","G",4,"SHEM")
 zexy 
^SCR("P1MSH","G",4,"TYP")
N
^SCR("P1MSH","G",5,"CRD")
6,41,N,6,1
^SCR("P1MSH","G",5,"HELP")

^SCR("P1MSH","G",5,"LMAX")
7
^SCR("P1MSH","G",5,"MUMPS1")

^SCR("P1MSH","G",5,"MUMPS2")

^SCR("P1MSH","G",5,"OUTPUT")

^SCR("P1MSH","G",5,"SHEM")
milehia
^SCR("P1MSH","G",5,"TYP")
N
^SCR("P1MSH","G",6,"CRD")
6,33,N,7,1
^SCR("P1MSH","G",6,"HELP")

^SCR("P1MSH","G",6,"LMAX")
7
^SCR("P1MSH","G",6,"MUMPS1")

^SCR("P1MSH","G",6,"MUMPS2")

^SCR("P1MSH","G",6,"OUTPUT")

^SCR("P1MSH","G",6,"SHEM")
 zegpd 
^SCR("P1MSH","G",6,"TYP")
N
^SCR("P1MSH","G",7,"CRD")
6,25,N,5,0
^SCR("P1MSH","G",7,"HELP")
<F9> - zepnfd bivdl 
^SCR("P1MSH","G",7,"LMAX")
6
^SCR("P1MSH","G",7,"MUMPS1")

^SCR("P1MSH","G",7,"MUMPS2")
D HZM^P1MSH
^SCR("P1MSH","G",7,"SHEM")
zepnfd
^SCR("P1MSH","G",7,"TYP")
N
^SCR("P1MSH","G",8,"CRD")
6,18,N,6,1
^SCR("P1MSH","G",8,"HELP")

^SCR("P1MSH","G",8,"LMAX")
6
^SCR("P1MSH","G",8,"MUMPS1")

^SCR("P1MSH","G",8,"MUMPS2")

^SCR("P1MSH","G",8,"OUTPUT")

^SCR("P1MSH","G",8,"SHEM")
  tih 
^SCR("P1MSH","G",8,"TYP")
N
^SCR("P1MSH","G",9,"CRD")
6,11,N,7,1
^SCR("P1MSH","G",9,"HELP")
<F9> - miekif bivdl
^SCR("P1MSH","G",9,"LMAX")
7
^SCR("P1MSH","G",9,"MUMPS1")

^SCR("P1MSH","G",9,"MUMPS2")
D TZ^P1MSH
^SCR("P1MSH","G",9,"SHEM")
 iekif 
^SCR("P1MSH","G",9,"TYP")
N
^SCR("P1MSH","G","MAX")
99999
^SCR("P1MSH","G","NAME","BTL")
5
^SCR("P1MSH","G","NAME","HNH")
6
^SCR("P1MSH","G","NAME","HZM")
7
^SCR("P1MSH","G","NAME","MSP")
1
^SCR("P1MSH","G","NAME","MSP1")
2
^SCR("P1MSH","G","NAME","PDN")
3
^SCR("P1MSH","G","NAME","SHER")
4
^SCR("P1MSH","G","NAME","TIP")
8
^SCR("P1MSH","G","NAME","ZIC")
9
^SCR("P1MSH","G","NM",1)
MSP
^SCR("P1MSH","G","NM",2)
MSP1
^SCR("P1MSH","G","NM",3)
PDN
^SCR("P1MSH","G","NM",4)
SHER
^SCR("P1MSH","G","NM",5)
BTL
^SCR("P1MSH","G","NM",6)
HNH
^SCR("P1MSH","G","NM",7)
HZM
^SCR("P1MSH","G","NM",8)
TIP
^SCR("P1MSH","G","NM",9)
ZIC
^SCR("P1MSH","G","RB")
5,2,22,79
^SCR("P1MSH","G","REF")
^TEMP($P
^SCR("P1MSH","G","RZD")
\
^SCR("P1MSH","G","STEP")
1
^SCR("P1MSH","G","STG")
   : iekif :  tih :zepnfd: zegpd :milehia: zexy :  oeict  :   gily my  : 'qn : 
^SCR("P1MSH","G","VG")
7
^SCR("P1MSH","NAME")
migily g"ec
^SCR("P1MSH","P",5,"CRD")
2,47,D,8,0
^SCR("P1MSH","P",5,"HELP")

^SCR("P1MSH","P",5,"LMAX")
9
^SCR("P1MSH","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("P1MSH","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I 'D1 S %SC("ER")=1
^SCR("P1MSH","P",5,"MUST")

^SCR("P1MSH","P",5,"TYP")
D
^SCR("P1MSH","P",10,"CRD")
2,24,D,8,0
^SCR("P1MSH","P",10,"HELP")

^SCR("P1MSH","P",10,"LMAX")
9
^SCR("P1MSH","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1MSH","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I 'D2 S %SC("ER")=1
^SCR("P1MSH","P",10,"MUST")

^SCR("P1MSH","P",10,"TYP")
D
^SCR("P1MSH","P",12,"CRD")
3,51,E,2,0
^SCR("P1MSH","P",12,"HELP")

^SCR("P1MSH","P",12,"LMAX")
5
^SCR("P1MSH","P",12,"MUMPS1")

^SCR("P1MSH","P",12,"MUMPS2")

^SCR("P1MSH","P",12,"TYP")
E
^SCR("P1MSH","P",15,"CRD")
3,30,E,2,0
^SCR("P1MSH","P",15,"HELP")

^SCR("P1MSH","P",15,"LMAX")
5
^SCR("P1MSH","P",15,"MUMPS1")

^SCR("P1MSH","P",15,"MUMPS2")
S:ADSHAA<MESHAA ADSHAA=ADSHAA+24
^SCR("P1MSH","P",15,"TYP")
E
^SCR("P1MSH","P",20,"CRD")
22,50,N,9,1
^SCR("P1MSH","P",20,"HELP")

^SCR("P1MSH","P",20,"LMAX")
10
^SCR("P1MSH","P",20,"MUMPS1")

^SCR("P1MSH","P",20,"MUMPS2")

^SCR("P1MSH","P",20,"OUTPUT")

^SCR("P1MSH","P",20,"TYP")
N
^SCR("P1MSH","P",25,"CRD")
22,42,N,6,1
^SCR("P1MSH","P",25,"HELP")

^SCR("P1MSH","P",25,"LMAX")
7
^SCR("P1MSH","P",25,"MUMPS1")

^SCR("P1MSH","P",25,"MUMPS2")

^SCR("P1MSH","P",25,"OUTPUT")

^SCR("P1MSH","P",25,"TYP")
N
^SCR("P1MSH","P",30,"CRD")
22,34,N,7,1
^SCR("P1MSH","P",30,"HELP")

^SCR("P1MSH","P",30,"LMAX")
7
^SCR("P1MSH","P",30,"MUMPS1")

^SCR("P1MSH","P",30,"MUMPS2")

^SCR("P1MSH","P",30,"OUTPUT")

^SCR("P1MSH","P",30,"TYP")
N
^SCR("P1MSH","P",35,"CRD")
22,26,N,6,1
^SCR("P1MSH","P",35,"HELP")

^SCR("P1MSH","P",35,"LMAX")
7
^SCR("P1MSH","P",35,"MUMPS1")

^SCR("P1MSH","P",35,"MUMPS2")

^SCR("P1MSH","P",35,"OUTPUT")

^SCR("P1MSH","P",35,"TYP")
N
^SCR("P1MSH","P",42,"CRD")
22,18,N,5,0
^SCR("P1MSH","P",42,"HELP")

^SCR("P1MSH","P",42,"LMAX")
7
^SCR("P1MSH","P",42,"MUMPS1")

^SCR("P1MSH","P",42,"MUMPS2")

^SCR("P1MSH","P",42,"OUTPUT")

^SCR("P1MSH","P",42,"TYP")
N
^SCR("P1MSH","P",47,"CRD")
22,10,N,7,1
^SCR("P1MSH","P",47,"HELP")

^SCR("P1MSH","P",47,"LMAX")
7
^SCR("P1MSH","P",47,"MUMPS1")

^SCR("P1MSH","P",47,"MUMPS2")

^SCR("P1MSH","P",47,"OUTPUT")

^SCR("P1MSH","P",47,"TYP")
N
^SCR("P1MSH","P",50,"CRD")
22,2,N,7,1
^SCR("P1MSH","P",50,"HELP")

^SCR("P1MSH","P",50,"LMAX")
7
^SCR("P1MSH","P",50,"MUMPS1")

^SCR("P1MSH","P",50,"MUMPS2")

^SCR("P1MSH","P",50,"OUTPUT")

^SCR("P1MSH","P",50,"TYP")
N
^SCR("P1MSH","P","NAME","ADSHAA")
15
^SCR("P1MSH","P","NAME","DAT1")
5
^SCR("P1MSH","P","NAME","DAT2")
10
^SCR("P1MSH","P","NAME","MESHAA")
12
^SCR("P1MSH","P","NAME","SUMB2")
30
^SCR("P1MSH","P","NAME","SUMHN2")
35
^SCR("P1MSH","P","NAME","SUMHZ2")
42
^SCR("P1MSH","P","NAME","SUMS2")
25
^SCR("P1MSH","P","NAME","SUMT2")
20
^SCR("P1MSH","P","NAME","SUMTP")
47
^SCR("P1MSH","P","NAME","SZIC")
50
^SCR("P1MSH","P","NM",5)
DAT1
^SCR("P1MSH","P","NM",10)
DAT2
^SCR("P1MSH","P","NM",12)
MESHAA
^SCR("P1MSH","P","NM",15)
ADSHAA
^SCR("P1MSH","P","NM",20)
SUMT2
^SCR("P1MSH","P","NM",25)
SUMS2
^SCR("P1MSH","P","NM",30)
SUMB2
^SCR("P1MSH","P","NM",35)
SUMHN2
^SCR("P1MSH","P","NM",42)
SUMHZ2
^SCR("P1MSH","P","NM",47)
SUMTP
^SCR("P1MSH","P","NM",50)
SZIC
^SCR("P1MSHHV")
H
^SCR("P1MSHHV",1)
                       {             06} {05  : gilyn zepnfd xiardl            
^SCR("P1MSHHV",2)
                                                                             1$
^SCR("P1MSHHV",3)
   :    my    :gilyl: dry : jix`zl : mekq : dpnfd :    gewl my   :    gewl   : 
^SCR("P1MSHHV",4)
                                                                               
^SCR("P1MSHHV",5)
                                                                               
^SCR("P1MSHHV",6)
                                                                               
^SCR("P1MSHHV",7)
                                                                               
^SCR("P1MSHHV",8)
                                                                               
^SCR("P1MSHHV",9)
                                                                               
^SCR("P1MSHHV",10)
                                                                               
^SCR("P1MSHHV",11)
                                                                               
^SCR("P1MSHHV",12)
                                                                               
^SCR("P1MSHHV",13)
                                                                               
^SCR("P1MSHHV",14)
                                                                               
^SCR("P1MSHHV",15)
                                                                               
^SCR("P1MSHHV",16)
                                                                               
^SCR("P1MSHHV",17)
                                                                               
^SCR("P1MSHHV",18)
                                                                               
^SCR("P1MSHHV",19)
                                                                               
^SCR("P1MSHHV",20)
 $1                                                                            
^SCR("P1MSHHV","A",1)
:‡‰Œ™Žš…�Ž†„˜‰�’„Œ
^SCR("P1MSHHV","A",2)

^SCR("P1MSHHV","A",3)
�™‡‰Œ™Œ„’™Š‰˜€šŒ�…‹‘„�Ž†„‡…—Œ�™‡…—Œ
^SCR("P1MSHHV","A",4)
-------------------------------------------------------------------
^SCR("P1MSHHV","A",5)

^SCR("P1MSHHV","A",6)

^SCR("P1MSHHV","A",7)

^SCR("P1MSHHV","A",8)

^SCR("P1MSHHV","A",9)

^SCR("P1MSHHV","A",10)

^SCR("P1MSHHV","A",11)

^SCR("P1MSHHV","A",12)

^SCR("P1MSHHV","A",13)

^SCR("P1MSHHV","A",14)

^SCR("P1MSHHV","A",15)

^SCR("P1MSHHV","A",16)

^SCR("P1MSHHV","A",17)

^SCR("P1MSHHV","A",18)

^SCR("P1MSHHV","A",19)

^SCR("P1MSHHV","A",20)

^SCR("P1MSHHV","AV",1)
:jhkan,ubnzvrhcgvk
^SCR("P1MSHHV","AV",2)

^SCR("P1MSHHV","AV",3)
oajhkakvgalhrt,koufxvbnzvjuekoajuek
^SCR("P1MSHHV","AV",4)
-------------------------------------------------------------------
^SCR("P1MSHHV","AV",5)

^SCR("P1MSHHV","AV",6)

^SCR("P1MSHHV","AV",7)

^SCR("P1MSHHV","AV",8)

^SCR("P1MSHHV","AV",9)

^SCR("P1MSHHV","AV",10)

^SCR("P1MSHHV","AV",11)

^SCR("P1MSHHV","AV",12)

^SCR("P1MSHHV","AV",13)

^SCR("P1MSHHV","AV",14)

^SCR("P1MSHHV","AV",15)

^SCR("P1MSHHV","AV",16)

^SCR("P1MSHHV","AV",17)

^SCR("P1MSHHV","AV",18)

^SCR("P1MSHHV","AV",19)

^SCR("P1MSHHV","AV",20)

^SCR("P1MSHHV","G",1,"CRD")
4,77,E,10,0
^SCR("P1MSHHV","G",1,"HELP")

^SCR("P1MSHHV","G",1,"LMAX")
11
^SCR("P1MSHHV","G",1,"MUMPS1")

^SCR("P1MSHHV","G",1,"MUMPS2")

^SCR("P1MSHHV","G",1,"OUTPUT")

^SCR("P1MSHHV","G",1,"SHEM")
    gewl   
^SCR("P1MSHHV","G",1,"TYP")
E
^SCR("P1MSHHV","G",2,"CRD")
4,65,H,14,0
^SCR("P1MSHHV","G",2,"HELP")

^SCR("P1MSHHV","G",2,"LMAX")
14
^SCR("P1MSHHV","G",2,"MUMPS1")

^SCR("P1MSHHV","G",2,"MUMPS2")

^SCR("P1MSHHV","G",2,"OUTPUT")

^SCR("P1MSHHV","G",2,"SHEM")
    gewl my   
^SCR("P1MSHHV","G",2,"TYP")
H
^SCR("P1MSHHV","G",3,"CRD")
4,50,E,7,0
^SCR("P1MSHHV","G",3,"HELP")
<F9> - dpnfd bivdl
^SCR("P1MSHHV","G",3,"LMAX")
7
^SCR("P1MSHHV","G",3,"MUMPS1")

^SCR("P1MSHHV","G",3,"MUMPS2")

^SCR("P1MSHHV","G",3,"OUTPUT")

^SCR("P1MSHHV","G",3,"SHEM")
 dpnfd 
^SCR("P1MSHHV","G",3,"TYP")
E
^SCR("P1MSHHV","G",4,"CRD")
4,42,N,6,2
^SCR("P1MSHHV","G",4,"HELP")

^SCR("P1MSHHV","G",4,"LMAX")
6
^SCR("P1MSHHV","G",4,"MUMPS1")

^SCR("P1MSHHV","G",4,"MUMPS2")

^SCR("P1MSHHV","G",4,"OUTPUT")

^SCR("P1MSHHV","G",4,"SHEM")
 mekq 
^SCR("P1MSHHV","G",4,"TYP")
N
^SCR("P1MSHHV","G",5,"CRD")
4,35,D,8,0
^SCR("P1MSHHV","G",5,"HELP")

^SCR("P1MSHHV","G",5,"LMAX")
8
^SCR("P1MSHHV","G",5,"MUMPS1")

^SCR("P1MSHHV","G",5,"MUMPS2")

^SCR("P1MSHHV","G",5,"OUTPUT")

^SCR("P1MSHHV","G",5,"SHEM")
 jix`zl 
^SCR("P1MSHHV","G",5,"TYP")
D
^SCR("P1MSHHV","G",6,"CRD")
4,26,E,5,0
^SCR("P1MSHHV","G",6,"HELP")

^SCR("P1MSHHV","G",6,"LMAX")
5
^SCR("P1MSHHV","G",6,"MUMPS1")

^SCR("P1MSHHV","G",6,"MUMPS2")

^SCR("P1MSHHV","G",6,"OUTPUT")

^SCR("P1MSHHV","G",6,"SHEM")
 dry 
^SCR("P1MSHHV","G",6,"TYP")
E
^SCR("P1MSHHV","G",7,"CHECK")
Y
^SCR("P1MSHHV","G",7,"CRD")
4,20,E,5,0
^SCR("P1MSHHV","G",7,"FNC")

^SCR("P1MSHHV","G",7,"GLOB")
P1SL
^SCR("P1MSHHV","G",7,"HELP")
<F9> - dpnfd zbvd , <F7> - migily zniyx ,<F6> - my itl ytgl 
^SCR("P1MSHHV","G",7,"LMAX")
5
^SCR("P1MSHHV","G",7,"MUMPS1")
D HZGKTV^P1MSHHV(HZM)
^SCR("P1MSHHV","G",7,"MUMPS2")
D PSLN^P1MSHHV
^SCR("P1MSHHV","G",7,"NLN")
20
^SCR("P1MSHHV","G",7,"RZD")
\
^SCR("P1MSHHV","G",7,"SHEM")
gilyl
^SCR("P1MSHHV","G",7,"TOPB")
8
^SCR("P1MSHHV","G",7,"TYP")
E
^SCR("P1MSHHV","G",7,"VRB")
PSLN1
^SCR("P1MSHHV","G",8,"CRD")
4,14,H,10,0
^SCR("P1MSHHV","G",8,"HELP")

^SCR("P1MSHHV","G",8,"LMAX")
10
^SCR("P1MSHHV","G",8,"MUMPS1")

^SCR("P1MSHHV","G",8,"MUMPS2")

^SCR("P1MSHHV","G",8,"MUST")

^SCR("P1MSHHV","G",8,"OUTPUT")

^SCR("P1MSHHV","G",8,"SHEM")
    my    
^SCR("P1MSHHV","G",8,"TYP")
H
^SCR("P1MSHHV","G","MAX")
1
^SCR("P1MSHHV","G","NAME","HZM")
3
^SCR("P1MSHHV","G","NAME","LKH")
1
^SCR("P1MSHHV","G","NAME","LKH1")
2
^SCR("P1MSHHV","G","NAME","PSLN")
7
^SCR("P1MSHHV","G","NAME","PSLN1")
8
^SCR("P1MSHHV","G","NAME","SHAA")
6
^SCR("P1MSHHV","G","NAME","SUM")
4
^SCR("P1MSHHV","G","NAME","TRH")
5
^SCR("P1MSHHV","G","NM",1)
LKH
^SCR("P1MSHHV","G","NM",2)
LKH1
^SCR("P1MSHHV","G","NM",3)
HZM
^SCR("P1MSHHV","G","NM",4)
SUM
^SCR("P1MSHHV","G","NM",5)
TRH
^SCR("P1MSHHV","G","NM",6)
SHAA
^SCR("P1MSHHV","G","NM",7)
PSLN
^SCR("P1MSHHV","G","NM",8)
PSLN1
^SCR("P1MSHHV","G","RB")
3,2,21,79
^SCR("P1MSHHV","G","REF")
^TEMP($P,"MSHV"
^SCR("P1MSHHV","G","RZD")
\
^SCR("P1MSHHV","G","STEP")
1
^SCR("P1MSHHV","G","STG")
   :    my    :gilyl: dry : jix`zl : mekq : dpnfd :    gewl my   :    gewl   : 
^SCR("P1MSHHV","G","VG")
5
^SCR("P1MSHHV","NAME")
xg` gilyl zepnfd zxard
^SCR("P1MSHHV","P",5,"CHECK")
Y
^SCR("P1MSHHV","P",5,"CRD")
1,41,E,4,0
^SCR("P1MSHHV","P",5,"CREAT")

^SCR("P1MSHHV","P",5,"FNC")

^SCR("P1MSHHV","P",5,"GLOB")
P1SL
^SCR("P1MSHHV","P",5,"HELP")

^SCR("P1MSHHV","P",5,"LMAX")
5
^SCR("P1MSHHV","P",5,"MUMPS1")

^SCR("P1MSHHV","P",5,"MUMPS2")
D PSLO^P1MSHHV
^SCR("P1MSHHV","P",5,"MUST")

^SCR("P1MSHHV","P",5,"NLN")
20
^SCR("P1MSHHV","P",5,"NS")
G
^SCR("P1MSHHV","P",5,"RZD")
\
^SCR("P1MSHHV","P",5,"TOPB")
8
^SCR("P1MSHHV","P",5,"TYP")
E
^SCR("P1MSHHV","P",5,"VRB")
PSLO1
^SCR("P1MSHHV","P",6,"CRD")
1,40,H,16
^SCR("P1MSHHV","P",6,"HELP")

^SCR("P1MSHHV","P",6,"LMAX")
16
^SCR("P1MSHHV","P",6,"MUMPS1")

^SCR("P1MSHHV","P",6,"MUMPS2")

^SCR("P1MSHHV","P",6,"OUTPUT")

^SCR("P1MSHHV","P",6,"TYP")
H
^SCR("P1MSHHV","P","NAME","PSLO")
5
^SCR("P1MSHHV","P","NAME","PSLO1")
6
^SCR("P1MSHHV","P","NM",5)
PSLO
^SCR("P1MSHHV","P","NM",6)
PSLO1
^SCR("P1MSHV")
H
^SCR("P1MSHV",1)
                                 # zxnyn zxard #                               
^SCR("P1MSHV",2)
                                                                               
^SCR("P1MSHV",3)
                                                                            1$ 
^SCR("P1MSHV",4)
   :      my    :xvlnl:     my     :xvlnn:  mekq  :dlaw onf: dpnfd :ogley:     
^SCR("P1MSHV",5)
                                                                               
^SCR("P1MSHV",6)
                                                                               
^SCR("P1MSHV",7)
                                                                               
^SCR("P1MSHV",8)
                                                                               
^SCR("P1MSHV",9)
                                                                               
^SCR("P1MSHV",10)
                                                                               
^SCR("P1MSHV",11)
                                                                               
^SCR("P1MSHV",12)
                                                                               
^SCR("P1MSHV",13)
                                                                               
^SCR("P1MSHV",14)
                                                                               
^SCR("P1MSHV",15)
                                                                               
^SCR("P1MSHV",16)
                                                                               
^SCR("P1MSHV",17)
                                                                               
^SCR("P1MSHV",18)
                                                                               
^SCR("P1MSHV",19)
  $1                                                                           
^SCR("P1MSHV","A",1)
š˜Ž™Žš˜�’„
^SCR("P1MSHV","A",2)

^SCR("P1MSHV","A",3)

^SCR("P1MSHV","A",4)
�™˜–ŒŽŒ�™˜–ŒŽŽ�…‹‘„Œ�—�Ž†„�Ž†„�‡Œ…™
^SCR("P1MSHV","A",5)
--------------------------------------------------------------
^SCR("P1MSHV","A",6)

^SCR("P1MSHV","A",7)

^SCR("P1MSHV","A",8)

^SCR("P1MSHV","A",9)

^SCR("P1MSHV","A",10)

^SCR("P1MSHV","A",11)

^SCR("P1MSHV","A",12)

^SCR("P1MSHV","A",13)

^SCR("P1MSHV","A",14)

^SCR("P1MSHV","A",15)

^SCR("P1MSHV","A",16)

^SCR("P1MSHV","A",17)

^SCR("P1MSHV","A",18)

^SCR("P1MSHV","A",19)

^SCR("P1MSHV","AV",1)
,rnan,rcgv
^SCR("P1MSHV","AV",2)

^SCR("P1MSHV","AV",3)

^SCR("P1MSHV","AV",4)
oarmknkoarmknnoufxvkceinzvbnzvijkua
^SCR("P1MSHV","AV",5)
--------------------------------------------------------------
^SCR("P1MSHV","AV",6)

^SCR("P1MSHV","AV",7)

^SCR("P1MSHV","AV",8)

^SCR("P1MSHV","AV",9)

^SCR("P1MSHV","AV",10)

^SCR("P1MSHV","AV",11)

^SCR("P1MSHV","AV",12)

^SCR("P1MSHV","AV",13)

^SCR("P1MSHV","AV",14)

^SCR("P1MSHV","AV",15)

^SCR("P1MSHV","AV",16)

^SCR("P1MSHV","AV",17)

^SCR("P1MSHV","AV",18)

^SCR("P1MSHV","AV",19)

^SCR("P1MSHV","G",1,"CRD")
5,73,E,3,0
^SCR("P1MSHV","G",1,"HELP")

^SCR("P1MSHV","G",1,"LMAX")
5
^SCR("P1MSHV","G",1,"MUMPS1")

^SCR("P1MSHV","G",1,"MUMPS2")

^SCR("P1MSHV","G",1,"OUTPUT")

^SCR("P1MSHV","G",1,"SHEM")
ogley
^SCR("P1MSHV","G",1,"TYP")
E
^SCR("P1MSHV","G",2,"CRD")
5,67,E,7,0
^SCR("P1MSHV","G",2,"HELP")

^SCR("P1MSHV","G",2,"LMAX")
7
^SCR("P1MSHV","G",2,"MUMPS1")

^SCR("P1MSHV","G",2,"MUMPS2")

^SCR("P1MSHV","G",2,"OUTPUT")

^SCR("P1MSHV","G",2,"SHEM")
 dpnfd 
^SCR("P1MSHV","G",2,"TYP")
E
^SCR("P1MSHV","G",3,"CRD")
5,59,E,8,0
^SCR("P1MSHV","G",3,"HELP")

^SCR("P1MSHV","G",3,"LMAX")
8
^SCR("P1MSHV","G",3,"MUMPS1")

^SCR("P1MSHV","G",3,"MUMPS2")

^SCR("P1MSHV","G",3,"OUTPUT")

^SCR("P1MSHV","G",3,"SHEM")
dlaw onf
^SCR("P1MSHV","G",3,"TYP")
E
^SCR("P1MSHV","G",4,"CRD")
5,50,N,8,2
^SCR("P1MSHV","G",4,"HELP")

^SCR("P1MSHV","G",4,"LMAX")
8
^SCR("P1MSHV","G",4,"MUMPS1")

^SCR("P1MSHV","G",4,"MUMPS2")

^SCR("P1MSHV","G",4,"OUTPUT")

^SCR("P1MSHV","G",4,"SHEM")
  mekq  
^SCR("P1MSHV","G",4,"TYP")
N
^SCR("P1MSHV","G",5,"CRD")
5,41,E,5,0
^SCR("P1MSHV","G",5,"HELP")

^SCR("P1MSHV","G",5,"LMAX")
5
^SCR("P1MSHV","G",5,"MUMPS1")

^SCR("P1MSHV","G",5,"MUMPS2")

^SCR("P1MSHV","G",5,"OUTPUT")

^SCR("P1MSHV","G",5,"SHEM")
xvlnn
^SCR("P1MSHV","G",5,"TYP")
E
^SCR("P1MSHV","G",6,"CRD")
5,35,H,12,0
^SCR("P1MSHV","G",6,"HELP")

^SCR("P1MSHV","G",6,"LMAX")
12
^SCR("P1MSHV","G",6,"MUMPS1")

^SCR("P1MSHV","G",6,"MUMPS2")

^SCR("P1MSHV","G",6,"OUTPUT")

^SCR("P1MSHV","G",6,"SHEM")
     my     
^SCR("P1MSHV","G",6,"TYP")
H
^SCR("P1MSHV","G",7,"CHECK")
Y
^SCR("P1MSHV","G",7,"CRD")
5,22,E,5.,0
^SCR("P1MSHV","G",7,"FNC")
F9
^SCR("P1MSHV","G",7,"GLOB")
NAME
^SCR("P1MSHV","G",7,"HELP")
<F9> - dpnfd zbvd ,<F7> - micaer zniyx , <F6> - my itl yetig
^SCR("P1MSHV","G",7,"LMAX")
5
^SCR("P1MSHV","G",7,"MUMPS1")
S:'$G(MZ2) MZ2=MZ1
^SCR("P1MSHV","G",7,"MUMPS2")
D MZ2^P1MSHV
^SCR("P1MSHV","G",7,"MUST")

^SCR("P1MSHV","G",7,"NLN")
20
^SCR("P1MSHV","G",7,"RZD")
\
^SCR("P1MSHV","G",7,"SHEM")
xvlnl
^SCR("P1MSHV","G",7,"TOPB")
8
^SCR("P1MSHV","G",7,"TYP")
E
^SCR("P1MSHV","G",7,"VRB")
MZ21
^SCR("P1MSHV","G",8,"CRD")
5,16,H,12,0
^SCR("P1MSHV","G",8,"HELP")

^SCR("P1MSHV","G",8,"LMAX")
12
^SCR("P1MSHV","G",8,"MUMPS1")

^SCR("P1MSHV","G",8,"MUMPS2")

^SCR("P1MSHV","G",8,"OUTPUT")

^SCR("P1MSHV","G",8,"SHEM")
      my    
^SCR("P1MSHV","G",8,"TYP")
H
^SCR("P1MSHV","G","DEL")

^SCR("P1MSHV","G","MAX")
4
^SCR("P1MSHV","G","NAME","HZM")
2
^SCR("P1MSHV","G","NAME","MZ1")
5
^SCR("P1MSHV","G","NAME","MZ11")
6
^SCR("P1MSHV","G","NAME","MZ2")
7
^SCR("P1MSHV","G","NAME","MZ21")
8
^SCR("P1MSHV","G","NAME","SHUL")
1
^SCR("P1MSHV","G","NAME","SUM")
4
^SCR("P1MSHV","G","NAME","ZMANK")
3
^SCR("P1MSHV","G","NM",1)
SHUL
^SCR("P1MSHV","G","NM",2)
HZM
^SCR("P1MSHV","G","NM",3)
ZMANK
^SCR("P1MSHV","G","NM",4)
SUM
^SCR("P1MSHV","G","NM",5)
MZ1
^SCR("P1MSHV","G","NM",6)
MZ11
^SCR("P1MSHV","G","NM",7)
MZ2
^SCR("P1MSHV","G","NM",8)
MZ21
^SCR("P1MSHV","G","RB")
4,3,20,78
^SCR("P1MSHV","G","REF")
^TEMP($P,"MHV"
^SCR("P1MSHV","G","RZD")
\
^SCR("P1MSHV","G","STEP")
1
^SCR("P1MSHV","G","STG")
   :      my    :xvlnl:     my     :xvlnn:  mekq  :dlaw onf: dpnfd :ogley:     
^SCR("P1MSHV","G","VG")
6
^SCR("P1MSHV","NAME")
zxnyn zxard
^SCR("P1MTK")
H
^SCR("P1MTK",1)
                    {                             06} {05   }: xven 'qn        
^SCR("P1MTK",2)
                                                                     1$        
^SCR("P1MTK",3)
            :                        oekznd xe`z                   :           
^SCR("P1MTK",4)
                                                                               
^SCR("P1MTK",5)
                                                                               
^SCR("P1MTK",6)
                                                                               
^SCR("P1MTK",7)
                                                                               
^SCR("P1MTK",8)
                                                                               
^SCR("P1MTK",9)
                                                                               
^SCR("P1MTK",10)
                                                                               
^SCR("P1MTK",11)
                                                                               
^SCR("P1MTK",12)
                                                                               
^SCR("P1MTK",13)
                                                                               
^SCR("P1MTK",14)
                                                                               
^SCR("P1MTK",15)
                                                                               
^SCR("P1MTK",16)
                                                                               
^SCR("P1MTK",17)
                                                                               
^SCR("P1MTK",18)
                                                                               
^SCR("P1MTK",19)
                                                                               
^SCR("P1MTK",20)
         $1                                                                    
^SCR("P1MTK","A",1)
:˜–…Ž'‘Ž
^SCR("P1MTK","A",2)

^SCR("P1MTK","A",3)
�…‹šŽ„˜…€š
^SCR("P1MTK","A",4)
------------------------------------------------------
^SCR("P1MTK","A",5)

^SCR("P1MTK","A",6)

^SCR("P1MTK","A",7)

^SCR("P1MTK","A",8)

^SCR("P1MTK","A",9)

^SCR("P1MTK","A",10)

^SCR("P1MTK","A",11)

^SCR("P1MTK","A",12)

^SCR("P1MTK","A",13)

^SCR("P1MTK","A",14)

^SCR("P1MTK","A",15)

^SCR("P1MTK","A",16)

^SCR("P1MTK","A",17)

^SCR("P1MTK","A",18)

^SCR("P1MTK","A",19)

^SCR("P1MTK","A",20)

^SCR("P1MTK","AV",1)
:rmunwxn
^SCR("P1MTK","AV",2)

^SCR("P1MTK","AV",3)
iuf,nvrut,
^SCR("P1MTK","AV",4)
------------------------------------------------------
^SCR("P1MTK","AV",5)

^SCR("P1MTK","AV",6)

^SCR("P1MTK","AV",7)

^SCR("P1MTK","AV",8)

^SCR("P1MTK","AV",9)

^SCR("P1MTK","AV",10)

^SCR("P1MTK","AV",11)

^SCR("P1MTK","AV",12)

^SCR("P1MTK","AV",13)

^SCR("P1MTK","AV",14)

^SCR("P1MTK","AV",15)

^SCR("P1MTK","AV",16)

^SCR("P1MTK","AV",17)

^SCR("P1MTK","AV",18)

^SCR("P1MTK","AV",19)

^SCR("P1MTK","AV",20)

^SCR("P1MTK","G",1,"CRD")
4,67,H,54,0
^SCR("P1MTK","G",1,"HELP")

^SCR("P1MTK","G",1,"LMAX")
54
^SCR("P1MTK","G",1,"MUMPS1")

^SCR("P1MTK","G",1,"MUMPS2")

^SCR("P1MTK","G",1,"SHEM")
                        oekznd xe`z                   
^SCR("P1MTK","G",1,"TYP")
H
^SCR("P1MTK","G","MAX")
18
^SCR("P1MTK","G","NAME","TEUR")
1
^SCR("P1MTK","G","NM",1)
TEUR
^SCR("P1MTK","G","RB")
3,10,21,71
^SCR("P1MTK","G","REF")
^TEMP($P
^SCR("P1MTK","G","RZD")
\
^SCR("P1MTK","G","STEP")
1
^SCR("P1MTK","G","STG")
            :                        oekznd xe`z                   :           
^SCR("P1MTK","G","VG")
5
^SCR("P1MTK","NAME")
mipekzn
^SCR("P1MTK","P",5,"CRD")
1,54,E,6,0
^SCR("P1MTK","P",5,"HELP")

^SCR("P1MTK","P",5,"LMAX")
6
^SCR("P1MTK","P",5,"MUMPS1")

^SCR("P1MTK","P",5,"MUMPS2")

^SCR("P1MTK","P",5,"OUTPUT")

^SCR("P1MTK","P",5,"TYP")
E
^SCR("P1MTK","P",6,"CRD")
1,53,H,32,0
^SCR("P1MTK","P",6,"HELP")

^SCR("P1MTK","P",6,"LMAX")
32
^SCR("P1MTK","P",6,"MUMPS1")

^SCR("P1MTK","P",6,"MUMPS2")

^SCR("P1MTK","P",6,"OUTPUT")

^SCR("P1MTK","P",6,"TYP")
H
^SCR("P1MTK","P","NAME","MZR")
5
^SCR("P1MTK","P","NAME","MZR1")
6
^SCR("P1MTK","P","NM",5)
MZR
^SCR("P1MTK","P","NM",6)
MZR1
^SCR("P1MTN")
H
^SCR("P1MTN",1)
                           # dpzn yelz zwtd #                                  
^SCR("P1MTN",2)
                                                                               
^SCR("P1MTN",3)
                                                                     1]        
^SCR("P1MTN",4)
                                                                               
^SCR("P1MTN",5)
                          {                           10} : ceakl              
^SCR("P1MTN",6)
                                                                               
^SCR("P1MTN",7)
                                              {15       } :  mekq              
^SCR("P1MTN",8)
                                                                               
^SCR("P1MTN",9)
                  [10                                                          
^SCR("P1MTN","A",1)
„�šŽ™…Œšš—”„
^SCR("P1MTN","A",2)

^SCR("P1MTN","A",3)

^SCR("P1MTN","A",4)

^SCR("P1MTN","A",5)
:ƒ…�‹Œ
^SCR("P1MTN","A",6)

^SCR("P1MTN","A",7)
:�…‹‘
^SCR("P1MTN","A",8)

^SCR("P1MTN","A",9)

^SCR("P1MTN","AV",1)
vb,nauk,,epv
^SCR("P1MTN","AV",2)

^SCR("P1MTN","AV",3)

^SCR("P1MTN","AV",4)

^SCR("P1MTN","AV",5)
:sucfk
^SCR("P1MTN","AV",6)

^SCR("P1MTN","AV",7)
:oufx
^SCR("P1MTN","AV",8)

^SCR("P1MTN","AV",9)

^SCR("P1MTN","NAME")
dpzn yelz
^SCR("P1MTN","P",10,"CRD")
5,57,H,30
^SCR("P1MTN","P",10,"HELP")

^SCR("P1MTN","P",10,"LMAX")
30
^SCR("P1MTN","P",10,"MUMPS1")

^SCR("P1MTN","P",10,"MUMPS2")

^SCR("P1MTN","P",10,"TYP")
H
^SCR("P1MTN","P",15,"CRD")
7,46,N,10,2
^SCR("P1MTN","P",15,"HELP")

^SCR("P1MTN","P",15,"LMAX")
10
^SCR("P1MTN","P",15,"MUMPS1")

^SCR("P1MTN","P",15,"MUMPS2")

^SCR("P1MTN","P",15,"MUST")

^SCR("P1MTN","P",15,"TYP")
N
^SCR("P1MTN","P","NAME","NAME")
10
^SCR("P1MTN","P","NAME","SUM")
15
^SCR("P1MTN","P","NM",10)
NAME
^SCR("P1MTN","P","NM",15)
SUM
^SCR("P1MTN","P","RB",1)
4,19,10,71
^SCR("P1MVC")
H
^SCR("P1MVC",1)
                         # mihixt itl mirvan zlah #                            
^SCR("P1MVC",2)
                                                                               
^SCR("P1MVC",3)
                       {10      }:jix`z cr  {05      }:jix`zn                  
^SCR("P1MVC",4)
                                                                             1$
^SCR("P1MVC",5)
    :zenk: xign :     dpznd xe`z  :  dpzn  :zenk:     hixt xe`z   :hixt cew:   
^SCR("P1MVC",6)
       \ ozip \megz\ogley\beq\zccea 'nfd\dry cr\dryn\mei cr\mein\'wl beq\      
^SCR("P1MVC",7)
                                                                               
^SCR("P1MVC",8)
                                                                               
^SCR("P1MVC",9)
                                                                               
^SCR("P1MVC",10)
                                                                               
^SCR("P1MVC",11)
                                                                               
^SCR("P1MVC",12)
                                                                               
^SCR("P1MVC",13)
                                                                               
^SCR("P1MVC",14)
                                                                               
^SCR("P1MVC",15)
                                                                               
^SCR("P1MVC",16)
                                                                               
^SCR("P1MVC",17)
                                                                               
^SCR("P1MVC",18)
                                                                               
^SCR("P1MVC",19)
                                                                               
^SCR("P1MVC",20)
                                                                               
^SCR("P1MVC",21)
 $1                                                                            
^SCR("P1MVC","A",1)
�‰ˆ‰˜”‰”Œ�‰’–�ŽšŒ�ˆ
^SCR("P1MVC","A",2)

^SCR("P1MVC","A",3)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1MVC","A",4)

^SCR("P1MVC","A",5)
š…Ž‹˜‰‡Ž„�šŽ„˜…€š„�šŽš…Ž‹ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1MVC","A",6)
�š‰��…‡š�‡Œ…™‚…‘šƒƒ…�'Ž†„„’™ƒ’„’™Ž�…‰ƒ’�…‰Ž'—Œ‚…‘
^SCR("P1MVC","A",7)
-------------------------------------------------------------------
^SCR("P1MVC","A",8)

^SCR("P1MVC","A",9)

^SCR("P1MVC","A",10)

^SCR("P1MVC","A",11)

^SCR("P1MVC","A",12)

^SCR("P1MVC","A",13)

^SCR("P1MVC","A",14)

^SCR("P1MVC","A",15)

^SCR("P1MVC","A",16)

^SCR("P1MVC","A",17)

^SCR("P1MVC","A",18)

^SCR("P1MVC","A",19)

^SCR("P1MVC","A",20)

^SCR("P1MVC","A",21)

^SCR("P1MVC","AV",1)
ohyhrphpkohgmcn,kcy
^SCR("P1MVC","AV",2)

^SCR("P1MVC","AV",3)
:lhrt,sg:lhrt,n
^SCR("P1MVC","AV",4)

^SCR("P1MVC","AV",5)
,unfrhjnvb,nvrut,vb,n,unfyhrprut,yhrpsue
^SCR("P1MVC","AV",6)
i,hbouj,ijkuadux,ssucwnzvvgasgvganouhsgouhnwekdux
^SCR("P1MVC","AV",7)
-------------------------------------------------------------------
^SCR("P1MVC","AV",8)

^SCR("P1MVC","AV",9)

^SCR("P1MVC","AV",10)

^SCR("P1MVC","AV",11)

^SCR("P1MVC","AV",12)

^SCR("P1MVC","AV",13)

^SCR("P1MVC","AV",14)

^SCR("P1MVC","AV",15)

^SCR("P1MVC","AV",16)

^SCR("P1MVC","AV",17)

^SCR("P1MVC","AV",18)

^SCR("P1MVC","AV",19)

^SCR("P1MVC","AV",20)

^SCR("P1MVC","AV",21)

^SCR("P1MVC","G",1,"CRD")
7,75,E,5,0
^SCR("P1MVC","G",1,"FNC")
F9
^SCR("P1MVC","G",1,"GLOB")
PAR
^SCR("P1MVC","G",1,"HELP")
<F9> - mihq zbvd , <F7> - cew itl , <F6> - my itl yetig 
^SCR("P1MVC","G",1,"LMAX")
8
^SCR("P1MVC","G",1,"MUMPS1")

^SCR("P1MVC","G",1,"MUMPS2")
D PRT^P1MVC
^SCR("P1MVC","G",1,"MUST")

^SCR("P1MVC","G",1,"NLN")
20
^SCR("P1MVC","G",1,"RZD")
**
^SCR("P1MVC","G",1,"SHEM")
hixt cew
^SCR("P1MVC","G",1,"TOPB")
8
^SCR("P1MVC","G",1,"TYP")
E
^SCR("P1MVC","G",1,"VRB")
PRT1
^SCR("P1MVC","G",2,"CRD")
7,66,H,17,0
^SCR("P1MVC","G",2,"HELP")

^SCR("P1MVC","G",2,"LMAX")
17
^SCR("P1MVC","G",2,"MUMPS1")

^SCR("P1MVC","G",2,"MUMPS2")

^SCR("P1MVC","G",2,"OUTPUT")

^SCR("P1MVC","G",2,"SHEM")
     hixt xe`z   
^SCR("P1MVC","G",2,"TYP")
H
^SCR("P1MVC","G",3,"CRD")
7,48,N,3,0
^SCR("P1MVC","G",3,"HELP")

^SCR("P1MVC","G",3,"LMAX")
4
^SCR("P1MVC","G",3,"MUMPS1")

^SCR("P1MVC","G",3,"MUMPS2")

^SCR("P1MVC","G",3,"MUST")

^SCR("P1MVC","G",3,"SHEM")
zenk
^SCR("P1MVC","G",3,"TYP")
N
^SCR("P1MVC","G",4,"CRD")
7,43,E,5,0
^SCR("P1MVC","G",4,"FNC")
F9
^SCR("P1MVC","G",4,"GLOB")
PAR
^SCR("P1MVC","G",4,"HELP")

^SCR("P1MVC","G",4,"LMAX")
8
^SCR("P1MVC","G",4,"MUMPS1")

^SCR("P1MVC","G",4,"MUMPS2")
D MTN^P1MVC
^SCR("P1MVC","G",4,"MUST")

^SCR("P1MVC","G",4,"NLN")
20
^SCR("P1MVC","G",4,"RZD")
**
^SCR("P1MVC","G",4,"SHEM")
  dpzn  
^SCR("P1MVC","G",4,"TOPB")
8
^SCR("P1MVC","G",4,"TYP")
E
^SCR("P1MVC","G",4,"VRB")
MTN1
^SCR("P1MVC","G",5,"CRD")
7,34,H,17,0
^SCR("P1MVC","G",5,"HELP")

^SCR("P1MVC","G",5,"LMAX")
17
^SCR("P1MVC","G",5,"MUMPS1")

^SCR("P1MVC","G",5,"MUMPS2")

^SCR("P1MVC","G",5,"OUTPUT")

^SCR("P1MVC","G",5,"SHEM")
     dpznd xe`z  
^SCR("P1MVC","G",5,"TYP")
H
^SCR("P1MVC","G",6,"CRD")
7,16,N,5,2
^SCR("P1MVC","G",6,"HELP")

^SCR("P1MVC","G",6,"LMAX")
6
^SCR("P1MVC","G",6,"MUMPS1")

^SCR("P1MVC","G",6,"MUMPS2")

^SCR("P1MVC","G",6,"SHEM")
 xign 
^SCR("P1MVC","G",6,"TYP")
N
^SCR("P1MVC","G",7,"CRD")
7,9,E,4,0
^SCR("P1MVC","G",7,"HELP")

^SCR("P1MVC","G",7,"LMAX")
4
^SCR("P1MVC","G",7,"MUMPS1")

^SCR("P1MVC","G",7,"MUMPS2")
D KAM1^P1MVC
^SCR("P1MVC","G",7,"MUST")

^SCR("P1MVC","G",7,"SHEM")
zenk
^SCR("P1MVC","G",7,"TYP")
E
^SCR("P1MVC","G",8,"CHECK")
Y
^SCR("P1MVC","G",8,"CRD")
7,+72,E,4,0
^SCR("P1MVC","G",8,"CREAT")

^SCR("P1MVC","G",8,"FNC")

^SCR("P1MVC","G",8,"GLOB")
SUGL
^SCR("P1MVC","G",8,"HELP")

^SCR("P1MVC","G",8,"LMAX")
7
^SCR("P1MVC","G",8,"MUMPS1")

^SCR("P1MVC","G",8,"MUMPS2")

^SCR("P1MVC","G",8,"NLN")
20
^SCR("P1MVC","G",8,"NS")
q
^SCR("P1MVC","G",8,"RZD")
\
^SCR("P1MVC","G",8,"SHEM")
'wl beq
^SCR("P1MVC","G",8,"TOPB")
8
^SCR("P1MVC","G",8,"TYP")
E
^SCR("P1MVC","G",9,"CRD")
7,+64,N,1,0
^SCR("P1MVC","G",9,"HELP")
7 - y , 6 - e , 5 - d , 4 - c , 3 - b , 2 - a ,1 - `
^SCR("P1MVC","G",9,"LMAX")
4
^SCR("P1MVC","G",9,"MUMPS1")

^SCR("P1MVC","G",9,"MUMPS2")
I MEJOM,MEJOM<1!(MEJOM>7) S %SC("ER")=1
^SCR("P1MVC","G",9,"SHEM")
mein
^SCR("P1MVC","G",9,"TYP")
N
^SCR("P1MVC","G",10,"CRD")
7,+59,N,2,0
^SCR("P1MVC","G",10,"HELP")
7 - y , 6 - e , 5 - d , 4 - c , 3 - b , 2 - a ,1 - `
^SCR("P1MVC","G",10,"LMAX")
6
^SCR("P1MVC","G",10,"MUMPS1")

^SCR("P1MVC","G",10,"MUMPS2")
I ADJOM,ADJOM<1!(ADJOM>7) S %SC("ER")=1
^SCR("P1MVC","G",10,"SHEM")
mei cr
^SCR("P1MVC","G",10,"TYP")
N
^SCR("P1MVC","G",11,"CRD")
7,+52,E,2,0
^SCR("P1MVC","G",11,"HELP")

^SCR("P1MVC","G",11,"LMAX")
4
^SCR("P1MVC","G",11,"MUMPS1")

^SCR("P1MVC","G",11,"MUMPS2")
I MESHAA<0!(MESHAA>24) S %SC("ER")=1
^SCR("P1MVC","G",11,"SHEM")
dryn
^SCR("P1MVC","G",11,"TYP")
E
^SCR("P1MVC","G",12,"CRD")
7,+47,E,2,0
^SCR("P1MVC","G",12,"HELP")

^SCR("P1MVC","G",12,"LMAX")
6
^SCR("P1MVC","G",12,"MUMPS1")

^SCR("P1MVC","G",12,"MUMPS2")
I ADSHAA,ADSHAA<0!(ADSHAA>24)!(ADSHAA<MESHAA) S %SC("ER")=1
^SCR("P1MVC","G",12,"SHEM")
dry cr
^SCR("P1MVC","G",12,"TYP")
E
^SCR("P1MVC","G",13,"CRD")
7,+40,N,1,0
^SCR("P1MVC","G",13,"HELP")
0 - zepnfd sexiva , 1 - zg` dpnfda lirt rvand m` 
^SCR("P1MVC","G",13,"LMAX")
10
^SCR("P1MVC","G",13,"MUMPS1")
S:'$D(BODED) BODED=1
^SCR("P1MVC","G",13,"MUMPS2")
S:"10 "'[BODED %SC("ER")=1 D BODED^P1MVC
^SCR("P1MVC","G",13,"MUST")

^SCR("P1MVC","G",13,"SHEM")
zccea 'nfd
^SCR("P1MVC","G",13,"TYP")
N
^SCR("P1MVC","G",14,"CHECK")
Y
^SCR("P1MVC","G",14,"CRD")
7,+29,E,3,0
^SCR("P1MVC","G",14,"CREAT")

^SCR("P1MVC","G",14,"FNC")

^SCR("P1MVC","G",14,"GLOB")
SUGS
^SCR("P1MVC","G",14,"HELP")

^SCR("P1MVC","G",14,"LMAX")
3
^SCR("P1MVC","G",14,"MUMPS1")

^SCR("P1MVC","G",14,"MUMPS2")

^SCR("P1MVC","G",14,"NLN")
20
^SCR("P1MVC","G",14,"NS")
J
^SCR("P1MVC","G",14,"RZD")
\
^SCR("P1MVC","G",14,"SHEM")
beq
^SCR("P1MVC","G",14,"TOPB")
8
^SCR("P1MVC","G",14,"TYP")
E
^SCR("P1MVC","G",14,"VRB")
SUGS1
^SCR("P1MVC","G",15,"CRD")
7,+25,H,3,0
^SCR("P1MVC","G",15,"HELP")

^SCR("P1MVC","G",15,"LMAX")
5
^SCR("P1MVC","G",15,"MUMPS1")

^SCR("P1MVC","G",15,"MUMPS2")

^SCR("P1MVC","G",15,"OUTPUT")

^SCR("P1MVC","G",15,"SHEM")
ogley
^SCR("P1MVC","G",15,"TYP")
H
^SCR("P1MVC","G",16,"CRD")
7,+19,N,1,0
^SCR("P1MVC","G",16,"HELP")
0 - mdipy , 2 - migelyn , 1 - dcrqn 
^SCR("P1MVC","G",16,"LMAX")
4
^SCR("P1MVC","G",16,"MUMPS1")

^SCR("P1MVC","G",16,"MUMPS2")
I "012"'[THUM S %SC("ER")=1
^SCR("P1MVC","G",16,"SHEM")
megz
^SCR("P1MVC","G",16,"TYP")
N
^SCR("P1MVC","G",17,"CRD")
7,+14,E,5,0
^SCR("P1MVC","G",17,"HELP")

^SCR("P1MVC","G",17,"LMAX")
6
^SCR("P1MVC","G",17,"MUMPS1")

^SCR("P1MVC","G",17,"MUMPS2")

^SCR("P1MVC","G",17,"OUTPUT")

^SCR("P1MVC","G",17,"SHEM")
 ozip 
^SCR("P1MVC","G",17,"TYP")
E
^SCR("P1MVC","G","DEL")

^SCR("P1MVC","G","MAX")
99999
^SCR("P1MVC","G","NAME","ADJOM")
10
^SCR("P1MVC","G","NAME","ADSHAA")
12
^SCR("P1MVC","G","NAME","BODED")
13
^SCR("P1MVC","G","NAME","KAM1")
7
^SCR("P1MVC","G","NAME","KP")
3
^SCR("P1MVC","G","NAME","MEJOM")
9
^SCR("P1MVC","G","NAME","MESHAA")
11
^SCR("P1MVC","G","NAME","MHMTN")
6
^SCR("P1MVC","G","NAME","MTN")
4
^SCR("P1MVC","G","NAME","MTN1")
5
^SCR("P1MVC","G","NAME","NMTN")
17
^SCR("P1MVC","G","NAME","PRT")
1
^SCR("P1MVC","G","NAME","PRT1")
2
^SCR("P1MVC","G","NAME","SUGLKH")
8
^SCR("P1MVC","G","NAME","SUGS")
14
^SCR("P1MVC","G","NAME","SUGS1")
15
^SCR("P1MVC","G","NAME","THUM")
16
^SCR("P1MVC","G","NM",1)
PRT
^SCR("P1MVC","G","NM",2)
PRT1
^SCR("P1MVC","G","NM",3)
KP
^SCR("P1MVC","G","NM",4)
MTN
^SCR("P1MVC","G","NM",5)
MTN1
^SCR("P1MVC","G","NM",6)
MHMTN
^SCR("P1MVC","G","NM",7)
KAM1
^SCR("P1MVC","G","NM",8)
SUGLKH
^SCR("P1MVC","G","NM",9)
MEJOM
^SCR("P1MVC","G","NM",10)
ADJOM
^SCR("P1MVC","G","NM",11)
MESHAA
^SCR("P1MVC","G","NM",12)
ADSHAA
^SCR("P1MVC","G","NM",13)
BODED
^SCR("P1MVC","G","NM",14)
SUGS
^SCR("P1MVC","G","NM",15)
SUGS1
^SCR("P1MVC","G","NM",16)
THUM
^SCR("P1MVC","G","NM",17)
NMTN
^SCR("P1MVC","G","RB")
5,2,22,79
^SCR("P1MVC","G","REF")
^TEMP($P
^SCR("P1MVC","G","RZD")
\
^SCR("P1MVC","G","STEP")
2
^SCR("P1MVC","G","STG")
    :zenk: xign :     dpznd xe`z  :  dpzn  :zenk:     hixt xe`z   :hixt cew:   
^SCR("P1MVC","G","VG")
8
^SCR("P1MVC","NAME")
4mirvan zlah
^SCR("P1MVC","P",5,"CRD")
3,44,D,8,0
^SCR("P1MVC","P",5,"HELP")

^SCR("P1MVC","P",5,"LMAX")
9
^SCR("P1MVC","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($H,1)
^SCR("P1MVC","P",5,"MUMPS2")

^SCR("P1MVC","P",5,"MUST")

^SCR("P1MVC","P",5,"TYP")
D
^SCR("P1MVC","P",10,"CRD")
3,23,D,8,0
^SCR("P1MVC","P",10,"HELP")

^SCR("P1MVC","P",10,"LMAX")
9
^SCR("P1MVC","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1MVC","P",10,"MUMPS2")
I $$^%L1DC(DAT2,3)<$$^%L1DC(DAT1,3) S %SC("ER")=1
^SCR("P1MVC","P",10,"TYP")
D
^SCR("P1MVC","P","NAME","DAT1")
5
^SCR("P1MVC","P","NAME","DAT2")
10
^SCR("P1MVC","P","NM",5)
DAT1
^SCR("P1MVC","P","NM",10)
DAT2
^SCR("P1MVC2")
H
^SCR("P1MVC2",1)
                        #  zeipw mekq itl mirvan zlah  #                       
^SCR("P1MVC2",2)
                                                                               
^SCR("P1MVC2",3)
                       {10      }:jix`z cr  {05      }:jix`zn                  
^SCR("P1MVC2",4)
                                                                            1$ 
^SCR("P1MVC2",5)
                       :zenk: xign :       dpznd xe`z   : dpzn cew : mekqn :   
^SCR("P1MVC2",6)
   \rvana ozip\megz\ogley\beq\zccea 'nfd\dry cr\dryn\mei cr\mein\'wl beq\      
^SCR("P1MVC2",7)
                                                                               
^SCR("P1MVC2",8)
                                                                               
^SCR("P1MVC2",9)
                                                                               
^SCR("P1MVC2",10)
                                                                               
^SCR("P1MVC2",11)
                                                                               
^SCR("P1MVC2",12)
                                                                               
^SCR("P1MVC2",13)
                                                                               
^SCR("P1MVC2",14)
                                                                               
^SCR("P1MVC2",15)
                                                                               
^SCR("P1MVC2",16)
                                                                               
^SCR("P1MVC2",17)
                                                                               
^SCR("P1MVC2",18)
                                                                               
^SCR("P1MVC2",19)
                                                                               
^SCR("P1MVC2",20)
                                                                               
^SCR("P1MVC2",21)
 $1                                                                            
^SCR("P1MVC2","A",1)
š…‰�—�…‹‘‰”Œ�‰’–�ŽšŒ�ˆ
^SCR("P1MVC2","A",2)

^SCR("P1MVC2","A",3)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1MVC2","A",4)

^SCR("P1MVC2","A",5)
š…Ž‹˜‰‡Ž„�šŽ„˜…€š„�šŽƒ…—�…‹‘Ž
^SCR("P1MVC2","A",6)
’–�Ž��š‰��…‡š�‡Œ…™‚…‘šƒƒ…�'Ž†„„’™ƒ’„’™Ž�…‰ƒ’�…‰Ž'—Œ‚…‘
^SCR("P1MVC2","A",7)
-----------------------------------------------
^SCR("P1MVC2","A",8)

^SCR("P1MVC2","A",9)

^SCR("P1MVC2","A",10)

^SCR("P1MVC2","A",11)

^SCR("P1MVC2","A",12)

^SCR("P1MVC2","A",13)

^SCR("P1MVC2","A",14)

^SCR("P1MVC2","A",15)

^SCR("P1MVC2","A",16)

^SCR("P1MVC2","A",17)

^SCR("P1MVC2","A",18)

^SCR("P1MVC2","A",19)

^SCR("P1MVC2","A",20)

^SCR("P1MVC2","A",21)

^SCR("P1MVC2","AV",1)
,uhbeoufxhpkohgmcn,kcy
^SCR("P1MVC2","AV",2)

^SCR("P1MVC2","AV",3)
:lhrt,sg:lhrt,n
^SCR("P1MVC2","AV",4)

^SCR("P1MVC2","AV",5)
,unfrhjnvb,nvrut,vb,nsueoufxn
^SCR("P1MVC2","AV",6)
gmcnci,hbouj,ijkuadux,ssucwnzvvgasgvganouhsgouhnwekdux
^SCR("P1MVC2","AV",7)
-----------------------------------------------
^SCR("P1MVC2","AV",8)

^SCR("P1MVC2","AV",9)

^SCR("P1MVC2","AV",10)

^SCR("P1MVC2","AV",11)

^SCR("P1MVC2","AV",12)

^SCR("P1MVC2","AV",13)

^SCR("P1MVC2","AV",14)

^SCR("P1MVC2","AV",15)

^SCR("P1MVC2","AV",16)

^SCR("P1MVC2","AV",17)

^SCR("P1MVC2","AV",18)

^SCR("P1MVC2","AV",19)

^SCR("P1MVC2","AV",20)

^SCR("P1MVC2","AV",21)

^SCR("P1MVC2","G",1,"CRD")
7,75,N,6,2
^SCR("P1MVC2","G",1,"HELP")

^SCR("P1MVC2","G",1,"LMAX")
7
^SCR("P1MVC2","G",1,"MUMPS1")

^SCR("P1MVC2","G",1,"MUMPS2")
D SP^P1MVC
^SCR("P1MVC2","G",1,"MUST")

^SCR("P1MVC2","G",1,"SHEM")
 mekqn 
^SCR("P1MVC2","G",1,"TYP")
N
^SCR("P1MVC2","G",2,"CRD")
7,67,E,6,0
^SCR("P1MVC2","G",2,"FNC")
F9
^SCR("P1MVC2","G",2,"GLOB")
PAR
^SCR("P1MVC2","G",2,"HELP")

^SCR("P1MVC2","G",2,"LMAX")
10
^SCR("P1MVC2","G",2,"MUMPS1")

^SCR("P1MVC2","G",2,"MUMPS2")
D MTN^P1MVC
^SCR("P1MVC2","G",2,"MUST")

^SCR("P1MVC2","G",2,"NLN")
20
^SCR("P1MVC2","G",2,"RZD")
**
^SCR("P1MVC2","G",2,"SHEM")
 dpzn cew 
^SCR("P1MVC2","G",2,"TOPB")
8
^SCR("P1MVC2","G",2,"TYP")
E
^SCR("P1MVC2","G",2,"VRB")
MTN1
^SCR("P1MVC2","G",3,"CRD")
7,56,H,20,0
^SCR("P1MVC2","G",3,"HELP")

^SCR("P1MVC2","G",3,"LMAX")
20
^SCR("P1MVC2","G",3,"MUMPS1")

^SCR("P1MVC2","G",3,"MUMPS2")

^SCR("P1MVC2","G",3,"OUTPUT")

^SCR("P1MVC2","G",3,"SHEM")
       dpznd xe`z   
^SCR("P1MVC2","G",3,"TYP")
H
^SCR("P1MVC2","G",4,"CRD")
7,35,N,5,2
^SCR("P1MVC2","G",4,"HELP")

^SCR("P1MVC2","G",4,"LMAX")
6
^SCR("P1MVC2","G",4,"MUMPS1")

^SCR("P1MVC2","G",4,"MUMPS2")

^SCR("P1MVC2","G",4,"SHEM")
 xign 
^SCR("P1MVC2","G",4,"TYP")
N
^SCR("P1MVC2","G",5,"CRD")
7,28,N,3,0
^SCR("P1MVC2","G",5,"HELP")

^SCR("P1MVC2","G",5,"LMAX")
4
^SCR("P1MVC2","G",5,"MUMPS1")

^SCR("P1MVC2","G",5,"MUMPS2")

^SCR("P1MVC2","G",5,"MUST")

^SCR("P1MVC2","G",5,"SHEM")
zenk
^SCR("P1MVC2","G",5,"TYP")
N
^SCR("P1MVC2","G",6,"CHECK")
Y
^SCR("P1MVC2","G",6,"CRD")
7,+72,E,4,0
^SCR("P1MVC2","G",6,"FNC")

^SCR("P1MVC2","G",6,"GLOB")
SUGL
^SCR("P1MVC2","G",6,"HELP")

^SCR("P1MVC2","G",6,"LMAX")
7
^SCR("P1MVC2","G",6,"MUMPS1")

^SCR("P1MVC2","G",6,"MUMPS2")

^SCR("P1MVC2","G",6,"NLN")
20
^SCR("P1MVC2","G",6,"RZD")
\
^SCR("P1MVC2","G",6,"SHEM")
'wl beq
^SCR("P1MVC2","G",6,"TOPB")
8
^SCR("P1MVC2","G",6,"TYP")
E
^SCR("P1MVC2","G",7,"CRD")
7,+64,N,1,0
^SCR("P1MVC2","G",7,"HELP")
7 - y , 6 - e , 5 - d , 4 - c , 3 - b , 2 - a ,1 - `
^SCR("P1MVC2","G",7,"LMAX")
4
^SCR("P1MVC2","G",7,"MUMPS1")

^SCR("P1MVC2","G",7,"MUMPS2")
I MEJOM,MEJOM<1!(MEJOM>7) S %SC("ER")=1
^SCR("P1MVC2","G",7,"SHEM")
mein
^SCR("P1MVC2","G",7,"TYP")
N
^SCR("P1MVC2","G",8,"CRD")
7,+59,N,2,0
^SCR("P1MVC2","G",8,"HELP")
7-y ,6-e ,5-d ,4-c ,3-b ,2-a ,1-`
^SCR("P1MVC2","G",8,"LMAX")
6
^SCR("P1MVC2","G",8,"MUMPS1")

^SCR("P1MVC2","G",8,"MUMPS2")
I ADJOM,ADJOM<1!(ADJOM>7) S %SC("ER")=1
^SCR("P1MVC2","G",8,"SHEM")
mei cr
^SCR("P1MVC2","G",8,"TYP")
N
^SCR("P1MVC2","G",9,"CRD")
7,+52,E,2,0
^SCR("P1MVC2","G",9,"HELP")

^SCR("P1MVC2","G",9,"LMAX")
4
^SCR("P1MVC2","G",9,"MUMPS1")

^SCR("P1MVC2","G",9,"MUMPS2")
I MESHAA<0!(MESHAA>24) S %SC("ER")=1
^SCR("P1MVC2","G",9,"SHEM")
dryn
^SCR("P1MVC2","G",9,"TYP")
E
^SCR("P1MVC2","G",10,"CRD")
7,+47,N,2,0
^SCR("P1MVC2","G",10,"HELP")

^SCR("P1MVC2","G",10,"LMAX")
6
^SCR("P1MVC2","G",10,"MUMPS1")

^SCR("P1MVC2","G",10,"MUMPS2")
I ADSHAA<0!(ADSHAA>24)!(ADSHAA<MESHAA) S %SC("ER")=1
^SCR("P1MVC2","G",10,"SHEM")
dry cr
^SCR("P1MVC2","G",10,"TYP")
N
^SCR("P1MVC2","G",11,"CRD")
7,+40,E,2,0
^SCR("P1MVC2","G",11,"HELP")
0 - zxg` , 1 yiwdl `p zccea dpnfd - rvand megz m`
^SCR("P1MVC2","G",11,"LMAX")
10
^SCR("P1MVC2","G",11,"MUMPS1")

^SCR("P1MVC2","G",11,"MUMPS2")
D ^%L1BDO
^SCR("P1MVC2","G",11,"MUST")

^SCR("P1MVC2","G",11,"SHEM")
zccea 'nfd
^SCR("P1MVC2","G",11,"TYP")
E
^SCR("P1MVC2","G",12,"CHECK")
Y
^SCR("P1MVC2","G",12,"CRD")
7,+29,E,3,0
^SCR("P1MVC2","G",12,"CREAT")

^SCR("P1MVC2","G",12,"FNC")

^SCR("P1MVC2","G",12,"GLOB")
SUGS
^SCR("P1MVC2","G",12,"HELP")

^SCR("P1MVC2","G",12,"LMAX")
3
^SCR("P1MVC2","G",12,"MUMPS1")

^SCR("P1MVC2","G",12,"MUMPS2")

^SCR("P1MVC2","G",12,"NLN")
20
^SCR("P1MVC2","G",12,"NS")
J
^SCR("P1MVC2","G",12,"RZD")
\
^SCR("P1MVC2","G",12,"SHEM")
beq
^SCR("P1MVC2","G",12,"TOPB")
8
^SCR("P1MVC2","G",12,"TYP")
E
^SCR("P1MVC2","G",12,"VRB")
SUGS1
^SCR("P1MVC2","G",13,"CRD")
7,+25,H,3,0
^SCR("P1MVC2","G",13,"HELP")

^SCR("P1MVC2","G",13,"LMAX")
5
^SCR("P1MVC2","G",13,"MUMPS1")

^SCR("P1MVC2","G",13,"MUMPS2")

^SCR("P1MVC2","G",13,"OUTPUT")

^SCR("P1MVC2","G",13,"SHEM")
ogley
^SCR("P1MVC2","G",13,"TYP")
H
^SCR("P1MVC2","G",14,"CRD")
7,+19,N,1,0
^SCR("P1MVC2","G",14,"HELP")
0 - mdipy, 2 - migelyn ,1 - dcrqn
^SCR("P1MVC2","G",14,"LMAX")
4
^SCR("P1MVC2","G",14,"MUMPS1")

^SCR("P1MVC2","G",14,"MUMPS2")
I "012"'[THUM S %SC("ER")=1
^SCR("P1MVC2","G",14,"SHEM")
megz
^SCR("P1MVC2","G",14,"TYP")
N
^SCR("P1MVC2","G",15,"CRD")
7,+14,N,4,0
^SCR("P1MVC2","G",15,"HELP")

^SCR("P1MVC2","G",15,"LMAX")
10
^SCR("P1MVC2","G",15,"MUMPS1")

^SCR("P1MVC2","G",15,"MUMPS2")

^SCR("P1MVC2","G",15,"OUTPUT")

^SCR("P1MVC2","G",15,"SHEM")
rvana ozip
^SCR("P1MVC2","G",15,"TYP")
N
^SCR("P1MVC2","G","DEL")

^SCR("P1MVC2","G","MAX")
99999
^SCR("P1MVC2","G","NAME","ADJOM")
8
^SCR("P1MVC2","G","NAME","ADSHAA")
10
^SCR("P1MVC2","G","NAME","BODED")
11
^SCR("P1MVC2","G","NAME","KAM1")
5
^SCR("P1MVC2","G","NAME","MEJOM")
7
^SCR("P1MVC2","G","NAME","MESHAA")
9
^SCR("P1MVC2","G","NAME","MHMTN")
4
^SCR("P1MVC2","G","NAME","MTN")
2
^SCR("P1MVC2","G","NAME","MTN1")
3
^SCR("P1MVC2","G","NAME","NMTN")
15
^SCR("P1MVC2","G","NAME","SP")
1
^SCR("P1MVC2","G","NAME","SUGLKH")
6
^SCR("P1MVC2","G","NAME","SUGS")
12
^SCR("P1MVC2","G","NAME","SUGS1")
13
^SCR("P1MVC2","G","NAME","THUM")
14
^SCR("P1MVC2","G","NM",1)
SP
^SCR("P1MVC2","G","NM",2)
MTN
^SCR("P1MVC2","G","NM",3)
MTN1
^SCR("P1MVC2","G","NM",4)
MHMTN
^SCR("P1MVC2","G","NM",5)
KAM1
^SCR("P1MVC2","G","NM",6)
SUGLKH
^SCR("P1MVC2","G","NM",7)
MEJOM
^SCR("P1MVC2","G","NM",8)
ADJOM
^SCR("P1MVC2","G","NM",9)
MESHAA
^SCR("P1MVC2","G","NM",10)
ADSHAA
^SCR("P1MVC2","G","NM",11)
BODED
^SCR("P1MVC2","G","NM",12)
SUGS
^SCR("P1MVC2","G","NM",13)
SUGS1
^SCR("P1MVC2","G","NM",14)
THUM
^SCR("P1MVC2","G","NM",15)
NMTN
^SCR("P1MVC2","G","RB")
5,2,22,78
^SCR("P1MVC2","G","REF")
^TEMP($P
^SCR("P1MVC2","G","RZD")
\
^SCR("P1MVC2","G","STEP")
2
^SCR("P1MVC2","G","STG")
                       :zenk: xign :       dpznd xe`z   : dpzn cew : mekqn :   
^SCR("P1MVC2","G","VG")
8
^SCR("P1MVC2","NAME")

^SCR("P1MVC2","P",5,"CRD")
3,44,D,8,0
^SCR("P1MVC2","P",5,"HELP")

^SCR("P1MVC2","P",5,"LMAX")
9
^SCR("P1MVC2","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($H,1)
^SCR("P1MVC2","P",5,"MUMPS2")

^SCR("P1MVC2","P",5,"MUST")

^SCR("P1MVC2","P",5,"TYP")
D
^SCR("P1MVC2","P",10,"CRD")
3,23,D,8,0
^SCR("P1MVC2","P",10,"HELP")

^SCR("P1MVC2","P",10,"LMAX")
9
^SCR("P1MVC2","P",10,"MUMPS1")

^SCR("P1MVC2","P",10,"MUMPS2")

^SCR("P1MVC2","P",10,"TYP")
D
^SCR("P1MVC2","P","NAME","DAT1")
5
^SCR("P1MVC2","P","NAME","DAT2")
10
^SCR("P1MVC2","P","NM",5)
DAT1
^SCR("P1MVC2","P","NM",10)
DAT2
^SCR("P1MVC3")
H
^SCR("P1MVC3",1)
                            # mihixt itl mirvan zlah   #                       
^SCR("P1MVC3",2)
                                                                               
^SCR("P1MVC3",3)
                       {10      }:jix`z cr  {05      }:jix`zn                  
^SCR("P1MVC3",4)
                                                                            1$ 
^SCR("P1MVC3",5)
              :zenk:       dpznd xe`z     :dpzn cew   : dry cr : dryn :mei:    
^SCR("P1MVC3",6)
                                                                               
^SCR("P1MVC3",7)
                                                                               
^SCR("P1MVC3",8)
                                                                               
^SCR("P1MVC3",9)
                                                                               
^SCR("P1MVC3",10)
                                                                               
^SCR("P1MVC3",11)
                                                                               
^SCR("P1MVC3",12)
                                                                               
^SCR("P1MVC3",13)
                                                                               
^SCR("P1MVC3",14)
                                                                               
^SCR("P1MVC3",15)
                                                                               
^SCR("P1MVC3",16)
                                                                               
^SCR("P1MVC3",17)
                                                                               
^SCR("P1MVC3",18)
                                                                               
^SCR("P1MVC3",19)
                                                                               
^SCR("P1MVC3",20)
                                                                               
^SCR("P1MVC3",21)
          $1                                                                   
^SCR("P1MVC3","A",1)
�‰ˆ‰˜”‰”Œ�‰’–�ŽšŒ�ˆ
^SCR("P1MVC3","A",2)

^SCR("P1MVC3","A",3)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1MVC3","A",4)

^SCR("P1MVC3","A",5)
š…Ž‹„�šŽ„˜…€š„�šŽƒ…—„’™ƒ’„’™Ž�…‰
^SCR("P1MVC3","A",6)
------------------------------------------------------
^SCR("P1MVC3","A",7)

^SCR("P1MVC3","A",8)

^SCR("P1MVC3","A",9)

^SCR("P1MVC3","A",10)

^SCR("P1MVC3","A",11)

^SCR("P1MVC3","A",12)

^SCR("P1MVC3","A",13)

^SCR("P1MVC3","A",14)

^SCR("P1MVC3","A",15)

^SCR("P1MVC3","A",16)

^SCR("P1MVC3","A",17)

^SCR("P1MVC3","A",18)

^SCR("P1MVC3","A",19)

^SCR("P1MVC3","A",20)

^SCR("P1MVC3","A",21)

^SCR("P1MVC3","AV",1)
ohyhrphpkohgmcn,kcy
^SCR("P1MVC3","AV",2)

^SCR("P1MVC3","AV",3)
:lhrt,sg:lhrt,n
^SCR("P1MVC3","AV",4)

^SCR("P1MVC3","AV",5)
,unfvb,nvrut,vb,nsuevgasgvganouh
^SCR("P1MVC3","AV",6)
------------------------------------------------------
^SCR("P1MVC3","AV",7)

^SCR("P1MVC3","AV",8)

^SCR("P1MVC3","AV",9)

^SCR("P1MVC3","AV",10)

^SCR("P1MVC3","AV",11)

^SCR("P1MVC3","AV",12)

^SCR("P1MVC3","AV",13)

^SCR("P1MVC3","AV",14)

^SCR("P1MVC3","AV",15)

^SCR("P1MVC3","AV",16)

^SCR("P1MVC3","AV",17)

^SCR("P1MVC3","AV",18)

^SCR("P1MVC3","AV",19)

^SCR("P1MVC3","AV",20)

^SCR("P1MVC3","AV",21)

^SCR("P1MVC3","G",1,"CRD")
6,74,N,1,0
^SCR("P1MVC3","G",1,"HELP")
7 - zay , 6 - e , 5 - d, 4 - c , 3 - b , 2 - a ,1 - ` mei
^SCR("P1MVC3","G",1,"LMAX")
3
^SCR("P1MVC3","G",1,"MUMPS1")

^SCR("P1MVC3","G",1,"MUMPS2")
I JOM<1!(JOM>7) S %ST("ER")=1
^SCR("P1MVC3","G",1,"MUST")

^SCR("P1MVC3","G",1,"SHEM")
mei
^SCR("P1MVC3","G",1,"TYP")
N
^SCR("P1MVC3","G",2,"CRD")
6,70,N,2,0
^SCR("P1MVC3","G",2,"HELP")

^SCR("P1MVC3","G",2,"LMAX")
6
^SCR("P1MVC3","G",2,"MUMPS1")

^SCR("P1MVC3","G",2,"MUMPS2")
I MESHAA<0!(MESHAA>24) S %SC("ER")=1
^SCR("P1MVC3","G",2,"MUST")

^SCR("P1MVC3","G",2,"SHEM")
 dryn 
^SCR("P1MVC3","G",2,"TYP")
N
^SCR("P1MVC3","G",3,"CRD")
6,63,N,2,0
^SCR("P1MVC3","G",3,"HELP")

^SCR("P1MVC3","G",3,"LMAX")
8
^SCR("P1MVC3","G",3,"MUMPS1")

^SCR("P1MVC3","G",3,"MUMPS2")
I ADSHAA<0!(ADSHAA>24) S %SC("ER")=1
^SCR("P1MVC3","G",3,"MUST")

^SCR("P1MVC3","G",3,"SHEM")
 dry cr 
^SCR("P1MVC3","G",3,"TYP")
N
^SCR("P1MVC3","G",4,"CRD")
6,54,E,5,0
^SCR("P1MVC3","G",4,"FNC")
F9
^SCR("P1MVC3","G",4,"GLOB")
PAR
^SCR("P1MVC3","G",4,"HELP")

^SCR("P1MVC3","G",4,"LMAX")
11
^SCR("P1MVC3","G",4,"MUMPS1")

^SCR("P1MVC3","G",4,"MUMPS2")
D MTN^P1MVC
^SCR("P1MVC3","G",4,"MUST")

^SCR("P1MVC3","G",4,"NLN")
20
^SCR("P1MVC3","G",4,"RZD")
**
^SCR("P1MVC3","G",4,"SHEM")
dpzn cew   
^SCR("P1MVC3","G",4,"TOPB")
8
^SCR("P1MVC3","G",4,"TYP")
E
^SCR("P1MVC3","G",4,"VRB")
MTN1
^SCR("P1MVC3","G",5,"CRD")
6,42,H,18,0
^SCR("P1MVC3","G",5,"HELP")

^SCR("P1MVC3","G",5,"LMAX")
22
^SCR("P1MVC3","G",5,"MUMPS1")

^SCR("P1MVC3","G",5,"MUMPS2")

^SCR("P1MVC3","G",5,"OUTPUT")

^SCR("P1MVC3","G",5,"SHEM")
       dpznd xe`z     
^SCR("P1MVC3","G",5,"TYP")
H
^SCR("P1MVC3","G",6,"CRD")
6,19,N,3,0
^SCR("P1MVC3","G",6,"HELP")

^SCR("P1MVC3","G",6,"LMAX")
4
^SCR("P1MVC3","G",6,"MUMPS1")

^SCR("P1MVC3","G",6,"MUMPS2")

^SCR("P1MVC3","G",6,"MUST")

^SCR("P1MVC3","G",6,"SHEM")
zenk
^SCR("P1MVC3","G",6,"TYP")
N
^SCR("P1MVC3","G","DEL")
Y
^SCR("P1MVC3","G","MAX")
99999
^SCR("P1MVC3","G","NAME","ADSHAA")
3
^SCR("P1MVC3","G","NAME","JOM")
1
^SCR("P1MVC3","G","NAME","KAM1")
6
^SCR("P1MVC3","G","NAME","MESHAA")
2
^SCR("P1MVC3","G","NAME","MTN")
4
^SCR("P1MVC3","G","NAME","MTN1")
5
^SCR("P1MVC3","G","NM",1)
JOM
^SCR("P1MVC3","G","NM",2)
MESHAA
^SCR("P1MVC3","G","NM",3)
ADSHAA
^SCR("P1MVC3","G","NM",4)
MTN
^SCR("P1MVC3","G","NM",5)
MTN1
^SCR("P1MVC3","G","NM",6)
KAM1
^SCR("P1MVC3","G","RB")
5,11,22,78
^SCR("P1MVC3","G","REF")
^TEMP($P,MVC
^SCR("P1MVC3","G","RZD")
\
^SCR("P1MVC3","G","STEP")
1
^SCR("P1MVC3","G","STG")
              :zenk:       dpznd xe`z     :dpzn cew   : dry cr : dryn :mei:    
^SCR("P1MVC3","G","VG")
7
^SCR("P1MVC3","NAME")

^SCR("P1MVC3","P",5,"CRD")
3,44,D,8,0
^SCR("P1MVC3","P",5,"HELP")

^SCR("P1MVC3","P",5,"LMAX")
9
^SCR("P1MVC3","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($H,1)
^SCR("P1MVC3","P",5,"MUMPS2")

^SCR("P1MVC3","P",5,"MUST")

^SCR("P1MVC3","P",5,"TYP")
D
^SCR("P1MVC3","P",10,"CRD")
3,23,D,8,0
^SCR("P1MVC3","P",10,"HELP")

^SCR("P1MVC3","P",10,"LMAX")
9
^SCR("P1MVC3","P",10,"MUMPS1")

^SCR("P1MVC3","P",10,"MUMPS2")

^SCR("P1MVC3","P",10,"TYP")
D
^SCR("P1MVC3","P","NAME","DAT1")
5
^SCR("P1MVC3","P","NAME","DAT1","REF")
$P($G(^TEMP($P,MVC)),"\",1)
^SCR("P1MVC3","P","NAME","DAT1","REF1")
$P(^TEMP($P,MVC),"\",1)
^SCR("P1MVC3","P","NAME","DAT2")
10
^SCR("P1MVC3","P","NAME","DAT2","REF")
$P($G(^TEMP($P,MVC)),"\",2)
^SCR("P1MVC3","P","NAME","DAT2","REF1")
$P(^TEMP($P,MVC),"\",2)
^SCR("P1MVC3","P","NAME","MVC","KEY",1)
/\DAT1,DAT2
^SCR("P1MVC3","P","NM",5)
DAT1
^SCR("P1MVC3","P","NM",10)
DAT2
^SCR("P1MVC3","P","REF",1)
^TEMP($P,MVC)
^SCR("P1MVC3","P","REF",1,"RZD")
\
^SCR("P1MVC3","P","REF",1,"STR")
DAT1\DAT2
^SCR("P1MVCH")
H
^SCR("P1MVCH",1)
         ( zepey zepzn - exaevy mihixt xtqna ielz ) dxiav itl mirvan zlah      
^SCR("P1MVCH",2)
                                                                               
^SCR("P1MVCH",3)
                       {10      }:jix`z cr  {05      }:jix`zn                  
^SCR("P1MVCH",4)
                                                                             1$
^SCR("P1MVCH",5)
    :zenk: xign :     dpznd xe`z   : dpzn :zenk:      hixt xe`z   :hixt cew:   
^SCR("P1MVCH",6)
      \ ozip \megz\ogley\beq\zccea 'nfd\dry cr\dryn\mei cr\mein\'wl beq\       
^SCR("P1MVCH",7)
                                                                               
^SCR("P1MVCH",8)
                                                                               
^SCR("P1MVCH",9)
                                                                               
^SCR("P1MVCH",10)
                                                                               
^SCR("P1MVCH",11)
                                                                               
^SCR("P1MVCH",12)
                                                                               
^SCR("P1MVCH",13)
                                                                               
^SCR("P1MVCH",14)
                                                                               
^SCR("P1MVCH",15)
                                                                               
^SCR("P1MVCH",16)
                                                                               
^SCR("P1MVCH",17)
                                                                               
^SCR("P1MVCH",18)
                                                                               
^SCR("P1MVCH",19)
                                                                               
^SCR("P1MVCH",20)
                                                                               
^SCR("P1MVCH",21)
 $1                                                                            
^SCR("P1MVCH",22)
                                                                               
^SCR("P1MVCH","A",1)
(š…�…™š…�šŽ-…˜�…–™�‰ˆ‰˜”˜”‘Ž�‰…Œš)„˜‰�–‰”Œ�‰’–�ŽšŒ�ˆ
^SCR("P1MVCH","A",2)

^SCR("P1MVCH","A",3)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1MVCH","A",4)

^SCR("P1MVCH","A",5)
š…Ž‹˜‰‡Ž„�šŽ„˜…€š„�šŽš…Ž‹ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1MVCH","A",6)
�š‰��…‡š�‡Œ…™‚…‘šƒƒ…�'Ž†„„’™ƒ’„’™Ž�…‰ƒ’�…‰Ž'—Œ‚…‘
^SCR("P1MVCH","A",7)
-------------------------------------------------------------------
^SCR("P1MVCH","A",8)

^SCR("P1MVCH","A",9)

^SCR("P1MVCH","A",10)

^SCR("P1MVCH","A",11)

^SCR("P1MVCH","A",12)

^SCR("P1MVCH","A",13)

^SCR("P1MVCH","A",14)

^SCR("P1MVCH","A",15)

^SCR("P1MVCH","A",16)

^SCR("P1MVCH","A",17)

^SCR("P1MVCH","A",18)

^SCR("P1MVCH","A",19)

^SCR("P1MVCH","A",20)

^SCR("P1MVCH","A",21)

^SCR("P1MVCH","A",22)

^SCR("P1MVCH","AV",1)
(,ubua,ub,n-urcumaohyhrprpxnchuk,)vrhcmhpkohgmcn,kcy
^SCR("P1MVCH","AV",2)

^SCR("P1MVCH","AV",3)
:lhrt,sg:lhrt,n
^SCR("P1MVCH","AV",4)

^SCR("P1MVCH","AV",5)
,unfrhjnvb,nvrut,vb,n,unfyhrprut,yhrpsue
^SCR("P1MVCH","AV",6)
i,hbouj,ijkuadux,ssucwnzvvgasgvganouhsgouhnwekdux
^SCR("P1MVCH","AV",7)
-------------------------------------------------------------------
^SCR("P1MVCH","AV",8)

^SCR("P1MVCH","AV",9)

^SCR("P1MVCH","AV",10)

^SCR("P1MVCH","AV",11)

^SCR("P1MVCH","AV",12)

^SCR("P1MVCH","AV",13)

^SCR("P1MVCH","AV",14)

^SCR("P1MVCH","AV",15)

^SCR("P1MVCH","AV",16)

^SCR("P1MVCH","AV",17)

^SCR("P1MVCH","AV",18)

^SCR("P1MVCH","AV",19)

^SCR("P1MVCH","AV",20)

^SCR("P1MVCH","AV",21)

^SCR("P1MVCH","AV",22)

^SCR("P1MVCH","G",1,"CRD")
7,75,E,5,0
^SCR("P1MVCH","G",1,"FNC")
F9
^SCR("P1MVCH","G",1,"GLOB")
PAR
^SCR("P1MVCH","G",1,"HELP")
<F9> - mihq zbvd , <F7> - cew itl , <F6> - my itl yetig 
^SCR("P1MVCH","G",1,"LMAX")
8
^SCR("P1MVCH","G",1,"MUMPS1")

^SCR("P1MVCH","G",1,"MUMPS2")
D PRT^P1MVC
^SCR("P1MVCH","G",1,"MUST")

^SCR("P1MVCH","G",1,"NLN")
20
^SCR("P1MVCH","G",1,"RZD")
**
^SCR("P1MVCH","G",1,"SHEM")
hixt cew
^SCR("P1MVCH","G",1,"TOPB")
8
^SCR("P1MVCH","G",1,"TYP")
E
^SCR("P1MVCH","G",1,"VRB")
PRT1
^SCR("P1MVCH","G",2,"CRD")
7,66,H,18,0
^SCR("P1MVCH","G",2,"HELP")

^SCR("P1MVCH","G",2,"LMAX")
18
^SCR("P1MVCH","G",2,"MUMPS1")

^SCR("P1MVCH","G",2,"MUMPS2")

^SCR("P1MVCH","G",2,"OUTPUT")

^SCR("P1MVCH","G",2,"SHEM")
      hixt xe`z   
^SCR("P1MVCH","G",2,"TYP")
H
^SCR("P1MVCH","G",3,"CRD")
7,47,N,3,0
^SCR("P1MVCH","G",3,"HELP")

^SCR("P1MVCH","G",3,"LMAX")
4
^SCR("P1MVCH","G",3,"MUMPS1")

^SCR("P1MVCH","G",3,"MUMPS2")

^SCR("P1MVCH","G",3,"MUST")

^SCR("P1MVCH","G",3,"SHEM")
zenk
^SCR("P1MVCH","G",3,"TYP")
N
^SCR("P1MVCH","G",4,"CRD")
7,42,E,5,0
^SCR("P1MVCH","G",4,"FNC")
F9
^SCR("P1MVCH","G",4,"GLOB")
PAR
^SCR("P1MVCH","G",4,"HELP")

^SCR("P1MVCH","G",4,"LMAX")
6
^SCR("P1MVCH","G",4,"MUMPS1")

^SCR("P1MVCH","G",4,"MUMPS2")
D MTN^P1MVC
^SCR("P1MVCH","G",4,"MUST")

^SCR("P1MVCH","G",4,"NLN")
20
^SCR("P1MVCH","G",4,"RZD")
**
^SCR("P1MVCH","G",4,"SHEM")
 dpzn 
^SCR("P1MVCH","G",4,"TOPB")
8
^SCR("P1MVCH","G",4,"TYP")
E
^SCR("P1MVCH","G",4,"VRB")
MTN1
^SCR("P1MVCH","G",5,"CRD")
7,35,H,18,0
^SCR("P1MVCH","G",5,"HELP")

^SCR("P1MVCH","G",5,"LMAX")
18
^SCR("P1MVCH","G",5,"MUMPS1")

^SCR("P1MVCH","G",5,"MUMPS2")

^SCR("P1MVCH","G",5,"OUTPUT")

^SCR("P1MVCH","G",5,"SHEM")
     dpznd xe`z   
^SCR("P1MVCH","G",5,"TYP")
H
^SCR("P1MVCH","G",6,"CRD")
7,16,N,5,2
^SCR("P1MVCH","G",6,"HELP")

^SCR("P1MVCH","G",6,"LMAX")
6
^SCR("P1MVCH","G",6,"MUMPS1")

^SCR("P1MVCH","G",6,"MUMPS2")

^SCR("P1MVCH","G",6,"SHEM")
 xign 
^SCR("P1MVCH","G",6,"TYP")
N
^SCR("P1MVCH","G",7,"CRD")
7,9,N,3,0
^SCR("P1MVCH","G",7,"HELP")

^SCR("P1MVCH","G",7,"LMAX")
4
^SCR("P1MVCH","G",7,"MUMPS1")

^SCR("P1MVCH","G",7,"MUMPS2")

^SCR("P1MVCH","G",7,"MUST")

^SCR("P1MVCH","G",7,"SHEM")
zenk
^SCR("P1MVCH","G",7,"TYP")
N
^SCR("P1MVCH","G",8,"CRD")
7,+71,E,4,0
^SCR("P1MVCH","G",8,"CREAT")

^SCR("P1MVCH","G",8,"FNC")

^SCR("P1MVCH","G",8,"GLOB")
SUGL
^SCR("P1MVCH","G",8,"HELP")

^SCR("P1MVCH","G",8,"LMAX")
7
^SCR("P1MVCH","G",8,"MUMPS1")

^SCR("P1MVCH","G",8,"MUMPS2")

^SCR("P1MVCH","G",8,"NLN")
20
^SCR("P1MVCH","G",8,"NS")
S
^SCR("P1MVCH","G",8,"RZD")
\
^SCR("P1MVCH","G",8,"SHEM")
'wl beq
^SCR("P1MVCH","G",8,"TOPB")
8
^SCR("P1MVCH","G",8,"TYP")
E
^SCR("P1MVCH","G",9,"CRD")
7,+63,N,1,0
^SCR("P1MVCH","G",9,"HELP")
7 - y , 6 - e , 5 - d , 4 - c , 3 - b , 2 - a ,1 - `
^SCR("P1MVCH","G",9,"LMAX")
4
^SCR("P1MVCH","G",9,"MUMPS1")

^SCR("P1MVCH","G",9,"MUMPS2")
I MEJOM,MEJOM<1!(MEJOM>7) S %SC("ER")=1
^SCR("P1MVCH","G",9,"SHEM")
mein
^SCR("P1MVCH","G",9,"TYP")
N
^SCR("P1MVCH","G",10,"CRD")
7,+58,N,2,0
^SCR("P1MVCH","G",10,"HELP")
7 - y , 6 - e , 5 - d , 4 - c , 3 - b , 2 - a ,1 - `
^SCR("P1MVCH","G",10,"LMAX")
6
^SCR("P1MVCH","G",10,"MUMPS1")

^SCR("P1MVCH","G",10,"MUMPS2")
I ADJOM,ADJOM<1!(ADJOM>7) S %SC("ER")=1
^SCR("P1MVCH","G",10,"SHEM")
mei cr
^SCR("P1MVCH","G",10,"TYP")
N
^SCR("P1MVCH","G",11,"CRD")
7,+51,E,2,0
^SCR("P1MVCH","G",11,"HELP")

^SCR("P1MVCH","G",11,"LMAX")
4
^SCR("P1MVCH","G",11,"MUMPS1")

^SCR("P1MVCH","G",11,"MUMPS2")
I MESHAA<0!(MESHAA>24) S %SC("ER")=1
^SCR("P1MVCH","G",11,"SHEM")
dryn
^SCR("P1MVCH","G",11,"TYP")
E
^SCR("P1MVCH","G",12,"CRD")
7,+46,E,2,0
^SCR("P1MVCH","G",12,"HELP")

^SCR("P1MVCH","G",12,"LMAX")
6
^SCR("P1MVCH","G",12,"MUMPS1")

^SCR("P1MVCH","G",12,"MUMPS2")
I ADSHAA,ADSHAA<0!(ADSHAA>24)!(ADSHAA<MESHAA) S %SC("ER")=1
^SCR("P1MVCH","G",12,"SHEM")
dry cr
^SCR("P1MVCH","G",12,"TYP")
E
^SCR("P1MVCH","G",13,"CRD")
7,+39,N,1,0
^SCR("P1MVCH","G",13,"HELP")
0 - zepnfd sexvl ,1 - zccea dpnfdl lirt rvan m`
^SCR("P1MVCH","G",13,"LMAX")
10
^SCR("P1MVCH","G",13,"MUMPS1")
S:'$D(BODED) BODED=1
^SCR("P1MVCH","G",13,"MUMPS2")
S:"10 "'[BODED %SC("ER")=1 Q:$G(%SC("ER"))=1  D BODED^P1MVC
^SCR("P1MVCH","G",13,"MUST")

^SCR("P1MVCH","G",13,"SHEM")
zccea 'nfd
^SCR("P1MVCH","G",13,"TYP")
N
^SCR("P1MVCH","G",14,"CHECK")
Y
^SCR("P1MVCH","G",14,"CRD")
7,+28,E,3,0
^SCR("P1MVCH","G",14,"CREAT")

^SCR("P1MVCH","G",14,"FNC")

^SCR("P1MVCH","G",14,"GLOB")
SUGS
^SCR("P1MVCH","G",14,"HELP")

^SCR("P1MVCH","G",14,"LMAX")
3
^SCR("P1MVCH","G",14,"MUMPS1")

^SCR("P1MVCH","G",14,"MUMPS2")

^SCR("P1MVCH","G",14,"NLN")
20
^SCR("P1MVCH","G",14,"NS")
J
^SCR("P1MVCH","G",14,"RZD")
\
^SCR("P1MVCH","G",14,"SHEM")
beq
^SCR("P1MVCH","G",14,"TOPB")
8
^SCR("P1MVCH","G",14,"TYP")
E
^SCR("P1MVCH","G",14,"VRB")
SUGS1
^SCR("P1MVCH","G",15,"CRD")
7,+24,H,3,0
^SCR("P1MVCH","G",15,"HELP")

^SCR("P1MVCH","G",15,"LMAX")
5
^SCR("P1MVCH","G",15,"MUMPS1")

^SCR("P1MVCH","G",15,"MUMPS2")

^SCR("P1MVCH","G",15,"OUTPUT")

^SCR("P1MVCH","G",15,"SHEM")
ogley
^SCR("P1MVCH","G",15,"TYP")
H
^SCR("P1MVCH","G",16,"CRD")
7,+18,N,1,0
^SCR("P1MVCH","G",16,"HELP")
0 - mdipy , 2 - migelyn , 1 - dcrqn 
^SCR("P1MVCH","G",16,"LMAX")
4
^SCR("P1MVCH","G",16,"MUMPS1")

^SCR("P1MVCH","G",16,"MUMPS2")
I "012"'[THUM S %SC("ER")=1
^SCR("P1MVCH","G",16,"SHEM")
megz
^SCR("P1MVCH","G",16,"TYP")
N
^SCR("P1MVCH","G",17,"CRD")
7,+13,E,5,0
^SCR("P1MVCH","G",17,"HELP")

^SCR("P1MVCH","G",17,"LMAX")
6
^SCR("P1MVCH","G",17,"MUMPS1")

^SCR("P1MVCH","G",17,"MUMPS2")

^SCR("P1MVCH","G",17,"SHEM")
 ozip 
^SCR("P1MVCH","G",17,"TYP")
E
^SCR("P1MVCH","G","DEL")

^SCR("P1MVCH","G","MAX")
99999
^SCR("P1MVCH","G","NAME","ADJOM")
10
^SCR("P1MVCH","G","NAME","ADSHAA")
12
^SCR("P1MVCH","G","NAME","BODED")
13
^SCR("P1MVCH","G","NAME","KAM1")
7
^SCR("P1MVCH","G","NAME","KP")
3
^SCR("P1MVCH","G","NAME","MEJOM")
9
^SCR("P1MVCH","G","NAME","MESHAA")
11
^SCR("P1MVCH","G","NAME","MHMTN")
6
^SCR("P1MVCH","G","NAME","MTN")
4
^SCR("P1MVCH","G","NAME","MTN1")
5
^SCR("P1MVCH","G","NAME","NMTN")
17
^SCR("P1MVCH","G","NAME","PRT")
1
^SCR("P1MVCH","G","NAME","PRT1")
2
^SCR("P1MVCH","G","NAME","SUGLKH")
8
^SCR("P1MVCH","G","NAME","SUGS")
14
^SCR("P1MVCH","G","NAME","SUGS1")
15
^SCR("P1MVCH","G","NAME","THUM")
16
^SCR("P1MVCH","G","NM",1)
PRT
^SCR("P1MVCH","G","NM",2)
PRT1
^SCR("P1MVCH","G","NM",3)
KP
^SCR("P1MVCH","G","NM",4)
MTN
^SCR("P1MVCH","G","NM",5)
MTN1
^SCR("P1MVCH","G","NM",6)
MHMTN
^SCR("P1MVCH","G","NM",7)
KAM1
^SCR("P1MVCH","G","NM",8)
SUGLKH
^SCR("P1MVCH","G","NM",9)
MEJOM
^SCR("P1MVCH","G","NM",10)
ADJOM
^SCR("P1MVCH","G","NM",11)
MESHAA
^SCR("P1MVCH","G","NM",12)
ADSHAA
^SCR("P1MVCH","G","NM",13)
BODED
^SCR("P1MVCH","G","NM",14)
SUGS
^SCR("P1MVCH","G","NM",15)
SUGS1
^SCR("P1MVCH","G","NM",16)
THUM
^SCR("P1MVCH","G","NM",17)
NMTN
^SCR("P1MVCH","G","RB")
5,2,22,79
^SCR("P1MVCH","G","REF")
^TEMP($P
^SCR("P1MVCH","G","RZD")
\
^SCR("P1MVCH","G","STEP")
2
^SCR("P1MVCH","G","STG")
    :zenk: xign :     dpznd xe`z   : dpzn :zenk:      hixt xe`z   :hixt cew:   
^SCR("P1MVCH","G","VG")
8
^SCR("P1MVCH","NAME")
dxiava rvan
^SCR("P1MVCH","P",5,"CRD")
3,44,D,8,0
^SCR("P1MVCH","P",5,"HELP")

^SCR("P1MVCH","P",5,"LMAX")
9
^SCR("P1MVCH","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($H,1)
^SCR("P1MVCH","P",5,"MUMPS2")

^SCR("P1MVCH","P",5,"MUST")

^SCR("P1MVCH","P",5,"TYP")
D
^SCR("P1MVCH","P",10,"CRD")
3,23,D,8,0
^SCR("P1MVCH","P",10,"HELP")

^SCR("P1MVCH","P",10,"LMAX")
9
^SCR("P1MVCH","P",10,"MUMPS1")

^SCR("P1MVCH","P",10,"MUMPS2")

^SCR("P1MVCH","P",10,"TYP")
D
^SCR("P1MVCH","P","NAME","DAT1")
5
^SCR("P1MVCH","P","NAME","DAT2")
10
^SCR("P1MVCH","P","NM",5)
DAT1
^SCR("P1MVCH","P","NM",10)
DAT2
^SCR("P1MVCHL")
H
^SCR("P1MVCHL",1)
                                                                               
^SCR("P1MVCHL",2)
                     {                      06} {05        }:    gewl 'qn      
^SCR("P1MVCHL",3)
                                                   {20     }:     cr swez      
^SCR("P1MVCHL",4)
                        {                               25} :        dxrd      
^SCR("P1MVCHL",5)
                                                                               
^SCR("P1MVCHL",6)
                                                                       1$      
^SCR("P1MVCHL",7)
                                : zenk :      hixt my   : hixt 'qn :           
^SCR("P1MVCHL",8)
                                                                               
^SCR("P1MVCHL",9)
                                                                               
^SCR("P1MVCHL",10)
                                                                               
^SCR("P1MVCHL",11)
                                                                               
^SCR("P1MVCHL",12)
                                                                               
^SCR("P1MVCHL",13)
                                                                               
^SCR("P1MVCHL",14)
                                                                               
^SCR("P1MVCHL",15)
                                                                               
^SCR("P1MVCHL",16)
                                                                               
^SCR("P1MVCHL",17)
                                                                               
^SCR("P1MVCHL",18)
                             $1                                                
^SCR("P1MVCHL",19)
                                                                               
^SCR("P1MVCHL",20)
                                                                               
^SCR("P1MVCHL","A",1)

^SCR("P1MVCHL","A",2)
:‡…—Œ'‘Ž
^SCR("P1MVCHL","A",3)
:ƒ’“—…š
^SCR("P1MVCHL","A",4)
:„˜’„
^SCR("P1MVCHL","A",5)

^SCR("P1MVCHL","A",6)

^SCR("P1MVCHL","A",7)
š…Ž‹ˆ‰˜”�™ˆ‰˜”'‘Ž
^SCR("P1MVCHL","A",8)
--------------------------------
^SCR("P1MVCHL","A",9)

^SCR("P1MVCHL","A",10)

^SCR("P1MVCHL","A",11)

^SCR("P1MVCHL","A",12)

^SCR("P1MVCHL","A",13)

^SCR("P1MVCHL","A",14)

^SCR("P1MVCHL","A",15)

^SCR("P1MVCHL","A",16)

^SCR("P1MVCHL","A",17)

^SCR("P1MVCHL","A",18)

^SCR("P1MVCHL","A",19)

^SCR("P1MVCHL","A",20)

^SCR("P1MVCHL","AV",1)

^SCR("P1MVCHL","AV",2)
:juekwxn
^SCR("P1MVCHL","AV",3)
:sg;eu,
^SCR("P1MVCHL","AV",4)
:vrgv
^SCR("P1MVCHL","AV",5)

^SCR("P1MVCHL","AV",6)

^SCR("P1MVCHL","AV",7)
,unfyhrpoayhrpwxn
^SCR("P1MVCHL","AV",8)
--------------------------------
^SCR("P1MVCHL","AV",9)

^SCR("P1MVCHL","AV",10)

^SCR("P1MVCHL","AV",11)

^SCR("P1MVCHL","AV",12)

^SCR("P1MVCHL","AV",13)

^SCR("P1MVCHL","AV",14)

^SCR("P1MVCHL","AV",15)

^SCR("P1MVCHL","AV",16)

^SCR("P1MVCHL","AV",17)

^SCR("P1MVCHL","AV",18)

^SCR("P1MVCHL","AV",19)

^SCR("P1MVCHL","AV",20)

^SCR("P1MVCHL","G",1,"CRD")
8,67,E,8,0
^SCR("P1MVCHL","G",1,"FNC")

^SCR("P1MVCHL","G",1,"GLOB")
PAR
^SCR("P1MVCHL","G",1,"HELP")

^SCR("P1MVCHL","G",1,"LMAX")
10
^SCR("P1MVCHL","G",1,"MUMPS1")

^SCR("P1MVCHL","G",1,"MUMPS2")
D HOV^P1MVCHL
^SCR("P1MVCHL","G",1,"MUST")

^SCR("P1MVCHL","G",1,"NLN")
20
^SCR("P1MVCHL","G",1,"RZD")
**
^SCR("P1MVCHL","G",1,"SHEM")
 hixt 'qn 
^SCR("P1MVCHL","G",1,"TOPB")
8
^SCR("P1MVCHL","G",1,"TYP")
E
^SCR("P1MVCHL","G",1,"VRB")
HOV1
^SCR("P1MVCHL","G",2,"CRD")
8,56,H,16,0
^SCR("P1MVCHL","G",2,"HELP")

^SCR("P1MVCHL","G",2,"LMAX")
16
^SCR("P1MVCHL","G",2,"MUMPS1")

^SCR("P1MVCHL","G",2,"MUMPS2")

^SCR("P1MVCHL","G",2,"OUTPUT")

^SCR("P1MVCHL","G",2,"SHEM")
      hixt my   
^SCR("P1MVCHL","G",2,"TYP")
H
^SCR("P1MVCHL","G",3,"CRD")
8,39,N,4,0
^SCR("P1MVCHL","G",3,"HELP")

^SCR("P1MVCHL","G",3,"LMAX")
6
^SCR("P1MVCHL","G",3,"MUMPS1")

^SCR("P1MVCHL","G",3,"MUMPS2")

^SCR("P1MVCHL","G",3,"MUST")

^SCR("P1MVCHL","G",3,"SHEM")
 zenk 
^SCR("P1MVCHL","G",3,"TYP")
N
^SCR("P1MVCHL","G","DEL")
Y
^SCR("P1MVCHL","G","MAX")
999
^SCR("P1MVCHL","G","NAME","CMT")
3
^SCR("P1MVCHL","G","NAME","HOV")
1
^SCR("P1MVCHL","G","NAME","HOV1")
2
^SCR("P1MVCHL","G","NM",1)
HOV
^SCR("P1MVCHL","G","NM",2)
HOV1
^SCR("P1MVCHL","G","NM",3)
CMT
^SCR("P1MVCHL","G","RB")
7,30,19,73
^SCR("P1MVCHL","G","REF")
^TEMP($P
^SCR("P1MVCHL","G","RZD")
\
^SCR("P1MVCHL","G","STEP")
1
^SCR("P1MVCHL","G","STG")
                                : zenk :      hixt my   : hixt 'qn :           
^SCR("P1MVCHL","G","VG")
9
^SCR("P1MVCHL","NAME")

^SCR("P1MVCHL","P",5,"CHECK")
Y
^SCR("P1MVCHL","P",5,"CRD")
2,48,E,11,0
^SCR("P1MVCHL","P",5,"FNC")
F8,F9
^SCR("P1MVCHL","P",5,"GLOB")
LKH
^SCR("P1MVCHL","P",5,"HELP")
<F9>+gewl 'qn- dixehqd ,<F8> zeaeg zniyx, <F7> zegewl zniyx, <F6> gewl yetig
^SCR("P1MVCHL","P",5,"LMAX")
11
^SCR("P1MVCHL","P",5,"MUMPS1")

^SCR("P1MVCHL","P",5,"MUMPS2")
D LKH^P1MVCHL
^SCR("P1MVCHL","P",5,"MUST")

^SCR("P1MVCHL","P",5,"NLN")
20
^SCR("P1MVCHL","P",5,"RZD")
\
^SCR("P1MVCHL","P",5,"TOPB")
8
^SCR("P1MVCHL","P",5,"TYP")
E
^SCR("P1MVCHL","P",5,"VRB")
LKH1
^SCR("P1MVCHL","P",6,"CRD")
2,47,H,25
^SCR("P1MVCHL","P",6,"HELP")

^SCR("P1MVCHL","P",6,"LMAX")
25
^SCR("P1MVCHL","P",6,"MUMPS1")

^SCR("P1MVCHL","P",6,"MUMPS2")

^SCR("P1MVCHL","P",6,"OUTPUT")

^SCR("P1MVCHL","P",6,"TYP")
H
^SCR("P1MVCHL","P",20,"CRD")
3,51,D,8,0
^SCR("P1MVCHL","P",20,"HELP")

^SCR("P1MVCHL","P",20,"LMAX")
8
^SCR("P1MVCHL","P",20,"MUMPS1")

^SCR("P1MVCHL","P",20,"MUMPS2")
D TKF^P1MVCHL
^SCR("P1MVCHL","P",20,"TYP")
D
^SCR("P1MVCHL","P",25,"CRD")
4,59,H,34
^SCR("P1MVCHL","P",25,"HELP")

^SCR("P1MVCHL","P",25,"LMAX")
34
^SCR("P1MVCHL","P",25,"MUMPS1")

^SCR("P1MVCHL","P",25,"MUMPS2")

^SCR("P1MVCHL","P",25,"TYP")
H
^SCR("P1MVCHL","P","NAME","HRA")
25
^SCR("P1MVCHL","P","NAME","LKH")
5
^SCR("P1MVCHL","P","NAME","LKH1")
6
^SCR("P1MVCHL","P","NAME","TKF")
20
^SCR("P1MVCHL","P","NM",5)
LKH
^SCR("P1MVCHL","P","NM",6)
LKH1
^SCR("P1MVCHL","P","NM",20)
TKF
^SCR("P1MVCHL","P","NM",25)
HRA
^SCR("P1MVCL")
H
^SCR("P1MVCL",1)
                             # minieqn zegewll rvan #                          
^SCR("P1MVCL",2)
                                                                               
^SCR("P1MVCL",3)
                 {                           10} {05        }:gewl 'qn         
^SCR("P1MVCL",4)
                                                                               
^SCR("P1MVCL",5)
                      {                                  15}:rvan okez         
^SCR("P1MVCL","A",1)
�‰Ž‰…‘Žš…‡…—ŒŒ’–�Ž
^SCR("P1MVCL","A",2)

^SCR("P1MVCL","A",3)
:‡…—Œ'‘Ž
^SCR("P1MVCL","A",4)

^SCR("P1MVCL","A",5)
:’–�Ž�‹…š
^SCR("P1MVCL","AV",1)
ohnhuxn,ujuekkgmcn
^SCR("P1MVCL","AV",2)

^SCR("P1MVCL","AV",3)
:juekwxn
^SCR("P1MVCL","AV",4)

^SCR("P1MVCL","AV",5)
:gmcnifu,
^SCR("P1MVCL","NAME")
zegewll rvan
^SCR("P1MVCL","P",5,"CHECK")
Y
^SCR("P1MVCL","P",5,"CRD")
3,49,E,10,0
^SCR("P1MVCL","P",5,"CREAT")

^SCR("P1MVCL","P",5,"FNC")
F9
^SCR("P1MVCL","P",5,"GLOB")
LKH
^SCR("P1MVCL","P",5,"HELP")
<F9> - rvana zegewl zbvd , <F7> - dbvd , <F6>- my itl yetig 
^SCR("P1MVCL","P",5,"LMAX")
11
^SCR("P1MVCL","P",5,"MUMPS1")

^SCR("P1MVCL","P",5,"MUMPS2")
D LKH^P1MVC
^SCR("P1MVCL","P",5,"MUST")

^SCR("P1MVCL","P",5,"NLN")
20
^SCR("P1MVCL","P",5,"NS")
J
^SCR("P1MVCL","P",5,"RZD")
\
^SCR("P1MVCL","P",5,"TOPB")
8
^SCR("P1MVCL","P",5,"TYP")
E
^SCR("P1MVCL","P",5,"VRB")
LKH1
^SCR("P1MVCL","P",10,"CRD")
3,48,H,30
^SCR("P1MVCL","P",10,"HELP")

^SCR("P1MVCL","P",10,"LMAX")
30
^SCR("P1MVCL","P",10,"MUMPS1")

^SCR("P1MVCL","P",10,"MUMPS2")

^SCR("P1MVCL","P",10,"OUTPUT")

^SCR("P1MVCL","P",10,"TYP")
H
^SCR("P1MVCL","P",15,"CRD")
5,60,H,37
^SCR("P1MVCL","P",15,"HELP")

^SCR("P1MVCL","P",15,"LMAX")
37
^SCR("P1MVCL","P",15,"MUMPS1")

^SCR("P1MVCL","P",15,"MUMPS2")
D TOHEN^P1MVC
^SCR("P1MVCL","P",15,"TYP")
H
^SCR("P1MVCL","P","NAME","LKH")
5
^SCR("P1MVCL","P","NAME","LKH","KEY")

^SCR("P1MVCL","P","NAME","LKH","KEY",1)
LKH/\TOHEN
^SCR("P1MVCL","P","NAME","LKH1")
10
^SCR("P1MVCL","P","NAME","TOHEN")
15
^SCR("P1MVCL","P","NAME","TOHEN","REF")
$P($G(^P1MVCLK(LKH)),"\",1)
^SCR("P1MVCL","P","NAME","TOHEN","REF1")
$P(^P1MVCLK(LKH),"\",1)
^SCR("P1MVCL","P","NM",5)
LKH
^SCR("P1MVCL","P","NM",10)
LKH1
^SCR("P1MVCL","P","NM",15)
TOHEN
^SCR("P1MVCL","P","REF",1)
^P1MVCLK(LKH)
^SCR("P1MVCL","P","REF",1,"RZD")
\
^SCR("P1MVCL","P","REF",1,"STR")
TOHEN
^SCR("P1MVCP")
H
^SCR("P1MVCP",1)
                     #  inrt-cg rvan  #                                        
^SCR("P1MVCP",2)
                                                                               
^SCR("P1MVCP",3)
                           {10      }:jix`z cr  {05      }:jix`zn              
^SCR("P1MVCP",4)
                                                                            1$ 
^SCR("P1MVCP",5)
   :  gewl cr  :   gewln   : gewl beq :zenk:       dpznd xe`z   : dpzn cew :   
^SCR("P1MVCP",6)
                                                                               
^SCR("P1MVCP",7)
                                                                               
^SCR("P1MVCP",8)
                                                                               
^SCR("P1MVCP",9)
                                                                               
^SCR("P1MVCP",10)
                                                                               
^SCR("P1MVCP",11)
                                                                               
^SCR("P1MVCP",12)
                                                                               
^SCR("P1MVCP",13)
                                                                               
^SCR("P1MVCP",14)
                                                                               
^SCR("P1MVCP",15)
                                                                               
^SCR("P1MVCP",16)
                                                                               
^SCR("P1MVCP",17)
                                                                               
^SCR("P1MVCP",18)
                                                                               
^SCR("P1MVCP",19)
                                                                               
^SCR("P1MVCP",20)
  $1                                                                           
^SCR("P1MVCP",21)
                                                                               
^SCR("P1MVCP","A",1)
‰Ž’”-ƒ‡’–�Ž
^SCR("P1MVCP","A",2)

^SCR("P1MVCP","A",3)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1MVCP","A",4)

^SCR("P1MVCP","A",5)
‡…—Œƒ’‡…—ŒŽ‡…—Œ‚…‘š…Ž‹„�šŽ„˜…€š„�šŽƒ…—
^SCR("P1MVCP","A",6)
------------------------------------------------------------------
^SCR("P1MVCP","A",7)

^SCR("P1MVCP","A",8)

^SCR("P1MVCP","A",9)

^SCR("P1MVCP","A",10)

^SCR("P1MVCP","A",11)

^SCR("P1MVCP","A",12)

^SCR("P1MVCP","A",13)

^SCR("P1MVCP","A",14)

^SCR("P1MVCP","A",15)

^SCR("P1MVCP","A",16)

^SCR("P1MVCP","A",17)

^SCR("P1MVCP","A",18)

^SCR("P1MVCP","A",19)

^SCR("P1MVCP","A",20)

^SCR("P1MVCP","A",21)

^SCR("P1MVCP","AV",1)
hngp-sjgmcn
^SCR("P1MVCP","AV",2)

^SCR("P1MVCP","AV",3)
:lhrt,sg:lhrt,n
^SCR("P1MVCP","AV",4)

^SCR("P1MVCP","AV",5)
jueksgjueknjuekdux,unfvb,nvrut,vb,nsue
^SCR("P1MVCP","AV",6)
------------------------------------------------------------------
^SCR("P1MVCP","AV",7)

^SCR("P1MVCP","AV",8)

^SCR("P1MVCP","AV",9)

^SCR("P1MVCP","AV",10)

^SCR("P1MVCP","AV",11)

^SCR("P1MVCP","AV",12)

^SCR("P1MVCP","AV",13)

^SCR("P1MVCP","AV",14)

^SCR("P1MVCP","AV",15)

^SCR("P1MVCP","AV",16)

^SCR("P1MVCP","AV",17)

^SCR("P1MVCP","AV",18)

^SCR("P1MVCP","AV",19)

^SCR("P1MVCP","AV",20)

^SCR("P1MVCP","AV",21)

^SCR("P1MVCP","G",1,"CRD")
6,75,E,6,0
^SCR("P1MVCP","G",1,"FNC")
F9
^SCR("P1MVCP","G",1,"GLOB")
PAR
^SCR("P1MVCP","G",1,"HELP")

^SCR("P1MVCP","G",1,"LMAX")
10
^SCR("P1MVCP","G",1,"MUMPS1")

^SCR("P1MVCP","G",1,"MUMPS2")
D MTN^P1MVC
^SCR("P1MVCP","G",1,"MUST")

^SCR("P1MVCP","G",1,"NLN")
20
^SCR("P1MVCP","G",1,"RZD")
**
^SCR("P1MVCP","G",1,"SHEM")
 dpzn cew 
^SCR("P1MVCP","G",1,"TOPB")
8
^SCR("P1MVCP","G",1,"TYP")
E
^SCR("P1MVCP","G",1,"VRB")
MTN1
^SCR("P1MVCP","G",2,"CRD")
6,64,H,20,0
^SCR("P1MVCP","G",2,"HELP")

^SCR("P1MVCP","G",2,"LMAX")
20
^SCR("P1MVCP","G",2,"MUMPS1")

^SCR("P1MVCP","G",2,"MUMPS2")

^SCR("P1MVCP","G",2,"OUTPUT")

^SCR("P1MVCP","G",2,"SHEM")
       dpznd xe`z   
^SCR("P1MVCP","G",2,"TYP")
H
^SCR("P1MVCP","G",3,"CRD")
6,43,N,3,0
^SCR("P1MVCP","G",3,"HELP")

^SCR("P1MVCP","G",3,"LMAX")
4
^SCR("P1MVCP","G",3,"MUMPS1")

^SCR("P1MVCP","G",3,"MUMPS2")

^SCR("P1MVCP","G",3,"MUST")

^SCR("P1MVCP","G",3,"SHEM")
zenk
^SCR("P1MVCP","G",3,"TYP")
N
^SCR("P1MVCP","G",4,"CHECK")
Y
^SCR("P1MVCP","G",4,"CRD")
6,38,N,5,0
^SCR("P1MVCP","G",4,"CREAT")

^SCR("P1MVCP","G",4,"FNC")

^SCR("P1MVCP","G",4,"GLOB")
SUGL
^SCR("P1MVCP","G",4,"HELP")

^SCR("P1MVCP","G",4,"LMAX")
10
^SCR("P1MVCP","G",4,"MUMPS1")

^SCR("P1MVCP","G",4,"MUMPS2")

^SCR("P1MVCP","G",4,"NLN")
20
^SCR("P1MVCP","G",4,"NS")
S
^SCR("P1MVCP","G",4,"RZD")
\
^SCR("P1MVCP","G",4,"SHEM")
 gewl beq 
^SCR("P1MVCP","G",4,"TOPB")
8
^SCR("P1MVCP","G",4,"TYP")
N
^SCR("P1MVCP","G",5,"CRD")
6,27,E,10,0
^SCR("P1MVCP","G",5,"FNC")

^SCR("P1MVCP","G",5,"GLOB")
LKH
^SCR("P1MVCP","G",5,"HELP")

^SCR("P1MVCP","G",5,"LMAX")
11
^SCR("P1MVCP","G",5,"MUMPS1")

^SCR("P1MVCP","G",5,"MUMPS2")

^SCR("P1MVCP","G",5,"NLN")
20
^SCR("P1MVCP","G",5,"RZD")
\
^SCR("P1MVCP","G",5,"SHEM")
   gewln   
^SCR("P1MVCP","G",5,"TOPB")
8
^SCR("P1MVCP","G",5,"TYP")
E
^SCR("P1MVCP","G",6,"CRD")
6,15,E,10,0
^SCR("P1MVCP","G",6,"FNC")

^SCR("P1MVCP","G",6,"GLOB")
LKH
^SCR("P1MVCP","G",6,"HELP")

^SCR("P1MVCP","G",6,"LMAX")
11
^SCR("P1MVCP","G",6,"MUMPS1")
S:'$G(ADLKH) ADLKH=MELKH
^SCR("P1MVCP","G",6,"MUMPS2")

^SCR("P1MVCP","G",6,"NLN")
20
^SCR("P1MVCP","G",6,"RZD")
\
^SCR("P1MVCP","G",6,"SHEM")
  gewl cr  
^SCR("P1MVCP","G",6,"TOPB")
8
^SCR("P1MVCP","G",6,"TYP")
E
^SCR("P1MVCP","G","DEL")

^SCR("P1MVCP","G","MAX")
99999
^SCR("P1MVCP","G","NAME","ADLKH")
6
^SCR("P1MVCP","G","NAME","KAM1")
3
^SCR("P1MVCP","G","NAME","MELKH")
5
^SCR("P1MVCP","G","NAME","MTN")
1
^SCR("P1MVCP","G","NAME","MTN1")
2
^SCR("P1MVCP","G","NAME","SUGLKH")
4
^SCR("P1MVCP","G","NM",1)
MTN
^SCR("P1MVCP","G","NM",2)
MTN1
^SCR("P1MVCP","G","NM",3)
KAM1
^SCR("P1MVCP","G","NM",4)
SUGLKH
^SCR("P1MVCP","G","NM",5)
MELKH
^SCR("P1MVCP","G","NM",6)
ADLKH
^SCR("P1MVCP","G","RB")
5,3,21,78
^SCR("P1MVCP","G","REF")
^TEMP($P
^SCR("P1MVCP","G","RZD")
\
^SCR("P1MVCP","G","STEP")
2
^SCR("P1MVCP","G","STG")
   :  gewl cr  :   gewln   : gewl beq :zenk:       dpznd xe`z   : dpzn cew :   
^SCR("P1MVCP","G","VG")
7
^SCR("P1MVCP","NAME")

^SCR("P1MVCP","P",5,"CRD")
3,48,D,8,0
^SCR("P1MVCP","P",5,"HELP")

^SCR("P1MVCP","P",5,"LMAX")
9
^SCR("P1MVCP","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($H,1)
^SCR("P1MVCP","P",5,"MUMPS2")

^SCR("P1MVCP","P",5,"MUST")

^SCR("P1MVCP","P",5,"TYP")
D
^SCR("P1MVCP","P",10,"CRD")
3,27,D,8,0
^SCR("P1MVCP","P",10,"HELP")

^SCR("P1MVCP","P",10,"LMAX")
9
^SCR("P1MVCP","P",10,"MUMPS1")
I '$G(DAT2) S DAT2=DAT1
^SCR("P1MVCP","P",10,"MUMPS2")
I $$^%L1DC(DAT2,3)<$$^%L1DC(DAT1,3) S %SC("ER")=1 Q
^SCR("P1MVCP","P",10,"TYP")
D
^SCR("P1MVCP","P","NAME","DAT1")
5
^SCR("P1MVCP","P","NAME","DAT2")
10
^SCR("P1MVCP","P","NM",5)
DAT1
^SCR("P1MVCP","P","NM",10)
DAT2
^SCR("P1NEW")
H
^SCR("P1NEW",1)
                       # izveaw iepiyl micew zpkd #                            
^SCR("P1NEW",2)
                                                                               
^SCR("P1NEW",3)
                                                                     1$        
^SCR("P1NEW",4)
                   : ycg cew :        hixt xe`z       : hixt cew :             
^SCR("P1NEW",5)
                                                                               
^SCR("P1NEW",6)
                                                                               
^SCR("P1NEW",7)
                                                                               
^SCR("P1NEW",8)
                                                                               
^SCR("P1NEW",9)
                                                                               
^SCR("P1NEW",10)
                                                                               
^SCR("P1NEW",11)
                                                                               
^SCR("P1NEW",12)
                                                                               
^SCR("P1NEW",13)
                                                                               
^SCR("P1NEW",14)
                                                                               
^SCR("P1NEW",15)
                                                                               
^SCR("P1NEW",16)
                                                                               
^SCR("P1NEW",17)
                                                                               
^SCR("P1NEW",18)
                                                                               
^SCR("P1NEW",19)
                                                                               
^SCR("P1NEW",20)
                $1                                                             
^SCR("P1NEW","A",1)
‰š–…�—‰…�‰™Œ�‰ƒ…—š�‹„
^SCR("P1NEW","A",2)

^SCR("P1NEW","A",3)

^SCR("P1NEW","A",4)
™ƒ‡ƒ…—ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1NEW","A",5)
-------------------------------------------
^SCR("P1NEW","A",6)

^SCR("P1NEW","A",7)

^SCR("P1NEW","A",8)

^SCR("P1NEW","A",9)

^SCR("P1NEW","A",10)

^SCR("P1NEW","A",11)

^SCR("P1NEW","A",12)

^SCR("P1NEW","A",13)

^SCR("P1NEW","A",14)

^SCR("P1NEW","A",15)

^SCR("P1NEW","A",16)

^SCR("P1NEW","A",17)

^SCR("P1NEW","A",18)

^SCR("P1NEW","A",19)

^SCR("P1NEW","A",20)

^SCR("P1NEW","AV",1)
h,mucehubhakohsue,bfv
^SCR("P1NEW","AV",2)

^SCR("P1NEW","AV",3)

^SCR("P1NEW","AV",4)
asjsueyhrprut,yhrpsue
^SCR("P1NEW","AV",5)
-------------------------------------------
^SCR("P1NEW","AV",6)

^SCR("P1NEW","AV",7)

^SCR("P1NEW","AV",8)

^SCR("P1NEW","AV",9)

^SCR("P1NEW","AV",10)

^SCR("P1NEW","AV",11)

^SCR("P1NEW","AV",12)

^SCR("P1NEW","AV",13)

^SCR("P1NEW","AV",14)

^SCR("P1NEW","AV",15)

^SCR("P1NEW","AV",16)

^SCR("P1NEW","AV",17)

^SCR("P1NEW","AV",18)

^SCR("P1NEW","AV",19)

^SCR("P1NEW","AV",20)

^SCR("P1NEW","G",1,"CRD")
5,65,E,8,0
^SCR("P1NEW","G",1,"FNC")

^SCR("P1NEW","G",1,"GLOB")
PAR
^SCR("P1NEW","G",1,"HELP")
<F9> - hixt qihxk bivdl 
^SCR("P1NEW","G",1,"LMAX")
10
^SCR("P1NEW","G",1,"MUMPS1")

^SCR("P1NEW","G",1,"MUMPS2")
D PAR^P1PARNEW
^SCR("P1NEW","G",1,"NLN")
20
^SCR("P1NEW","G",1,"RZD")
**
^SCR("P1NEW","G",1,"SHEM")
 hixt cew 
^SCR("P1NEW","G",1,"TOPB")
8
^SCR("P1NEW","G",1,"TYP")
E
^SCR("P1NEW","G",1,"VRB")
PAR1
^SCR("P1NEW","G",2,"CRD")
5,54,H,24,0
^SCR("P1NEW","G",2,"HELP")

^SCR("P1NEW","G",2,"LMAX")
24
^SCR("P1NEW","G",2,"MUMPS1")

^SCR("P1NEW","G",2,"MUMPS2")

^SCR("P1NEW","G",2,"OUTPUT")

^SCR("P1NEW","G",2,"SHEM")
        hixt xe`z       
^SCR("P1NEW","G",2,"TYP")
H
^SCR("P1NEW","G",3,"CRD")
5,29,E,8,0
^SCR("P1NEW","G",3,"HELP")

^SCR("P1NEW","G",3,"LMAX")
9
^SCR("P1NEW","G",3,"MUMPS1")

^SCR("P1NEW","G",3,"MUMPS2")

^SCR("P1NEW","G",3,"SHEM")
 ycg cew 
^SCR("P1NEW","G",3,"TYP")
E
^SCR("P1NEW","G","DEL")
Y
^SCR("P1NEW","G","MAX")
99999
^SCR("P1NEW","G","NAME","PAR")
1
^SCR("P1NEW","G","NAME","PAR1")
2
^SCR("P1NEW","G","NAME","PARN")
3
^SCR("P1NEW","G","NM",1)
PAR
^SCR("P1NEW","G","NM",2)
PAR1
^SCR("P1NEW","G","NM",3)
PARN
^SCR("P1NEW","G","RB")
4,17,21,71
^SCR("P1NEW","G","REF")
^TEMP($P
^SCR("P1NEW","G","RZD")
\
^SCR("P1NEW","G","STEP")
1
^SCR("P1NEW","G","STG")
                   : ycg cew :        hixt xe`z       : hixt cew :             
^SCR("P1NEW","G","VG")
6
^SCR("P1NEW","NAME")
iepiyl micew zpkd
^SCR("P1PAR")
H
^SCR("P1PAR",1)
                        # (zevitn ueg) mihixt zlah #                           
^SCR("P1PAR",2)
                                                                               
^SCR("P1PAR",3)
                                                              1$               
^SCR("P1PAR",4)
                   :  xign  :        hixt xe`z      :   cew  :                 
^SCR("P1PAR",5)
                                                                               
^SCR("P1PAR",6)
                                                                               
^SCR("P1PAR",7)
                                                                               
^SCR("P1PAR",8)
                                                                               
^SCR("P1PAR",9)
                                                                               
^SCR("P1PAR",10)
                                                                               
^SCR("P1PAR",11)
                                                                               
^SCR("P1PAR",12)
                                                                               
^SCR("P1PAR",13)
                                                                               
^SCR("P1PAR",14)
                                                                               
^SCR("P1PAR",15)
                                                                               
^SCR("P1PAR",16)
                                                                               
^SCR("P1PAR",17)
                                                                               
^SCR("P1PAR",18)
                                                                               
^SCR("P1PAR",19)
                                                                               
^SCR("P1PAR",20)
               $1                                                              
^SCR("P1PAR",21)
                                                                               
^SCR("P1PAR","A",1)
(š…–‰”Ž•…‡)�‰ˆ‰˜”šŒ�ˆ
^SCR("P1PAR","A",2)

^SCR("P1PAR","A",3)

^SCR("P1PAR","A",4)
˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1PAR","A",5)
---------------------------------------
^SCR("P1PAR","A",6)

^SCR("P1PAR","A",7)

^SCR("P1PAR","A",8)

^SCR("P1PAR","A",9)

^SCR("P1PAR","A",10)

^SCR("P1PAR","A",11)

^SCR("P1PAR","A",12)

^SCR("P1PAR","A",13)

^SCR("P1PAR","A",14)

^SCR("P1PAR","A",15)

^SCR("P1PAR","A",16)

^SCR("P1PAR","A",17)

^SCR("P1PAR","A",18)

^SCR("P1PAR","A",19)

^SCR("P1PAR","A",20)

^SCR("P1PAR","A",21)

^SCR("P1PAR","AV",1)
(,umhpn•uj)ohyhrp,kcy
^SCR("P1PAR","AV",2)

^SCR("P1PAR","AV",3)

^SCR("P1PAR","AV",4)
rhjnyhrprut,sue
^SCR("P1PAR","AV",5)
---------------------------------------
^SCR("P1PAR","AV",6)

^SCR("P1PAR","AV",7)

^SCR("P1PAR","AV",8)

^SCR("P1PAR","AV",9)

^SCR("P1PAR","AV",10)

^SCR("P1PAR","AV",11)

^SCR("P1PAR","AV",12)

^SCR("P1PAR","AV",13)

^SCR("P1PAR","AV",14)

^SCR("P1PAR","AV",15)

^SCR("P1PAR","AV",16)

^SCR("P1PAR","AV",17)

^SCR("P1PAR","AV",18)

^SCR("P1PAR","AV",19)

^SCR("P1PAR","AV",20)

^SCR("P1PAR","AV",21)

^SCR("P1PAR","G",1,"CRD")
5,61,E,8,0
^SCR("P1PAR","G",1,"HELP")

^SCR("P1PAR","G",1,"LMAX")
8
^SCR("P1PAR","G",1,"MUMPS1")

^SCR("P1PAR","G",1,"MUMPS2")
I PAR>99 S %SAY=" 99-n xzei `l " X %XMSGV(1) S %SC("ST")=1
^SCR("P1PAR","G",1,"MUST")

^SCR("P1PAR","G",1,"SHEM")
   cew  
^SCR("P1PAR","G",1,"TYP")
E
^SCR("P1PAR","G",2,"CRD")
5,52,H,20,0
^SCR("P1PAR","G",2,"HELP")

^SCR("P1PAR","G",2,"LMAX")
23
^SCR("P1PAR","G",2,"MUMPS1")

^SCR("P1PAR","G",2,"MUMPS2")

^SCR("P1PAR","G",2,"MUST")

^SCR("P1PAR","G",2,"SHEM")
        hixt xe`z      
^SCR("P1PAR","G",2,"TYP")
H
^SCR("P1PAR","G",3,"CRD")
5,28,N,8,2
^SCR("P1PAR","G",3,"HELP")

^SCR("P1PAR","G",3,"LMAX")
8
^SCR("P1PAR","G",3,"MUMPS1")

^SCR("P1PAR","G",3,"MUMPS2")

^SCR("P1PAR","G",3,"MUST")

^SCR("P1PAR","G",3,"SHEM")
  xign  
^SCR("P1PAR","G",3,"TYP")
N
^SCR("P1PAR","G","DEL")
Y
^SCR("P1PAR","G","MAX")
99999
^SCR("P1PAR","G","NAME","MH")
3
^SCR("P1PAR","G","NAME","PAR")
1
^SCR("P1PAR","G","NAME","SHEM")
2
^SCR("P1PAR","G","NM",1)
PAR
^SCR("P1PAR","G","NM",2)
SHEM
^SCR("P1PAR","G","NM",3)
MH
^SCR("P1PAR","G","RB")
4,16,21,64
^SCR("P1PAR","G","REF")
^TEMP1($P
^SCR("P1PAR","G","RZD")
**
^SCR("P1PAR","G","STEP")
1
^SCR("P1PAR","G","STG")
                   :  xign  :        hixt xe`z      :   cew  :                 
^SCR("P1PAR","G","VG")
6
^SCR("P1PAR","NAME")
pdvitl mihixt zlah
^SCR("P1PARG")
H
^SCR("P1PARG",1)
                       # dxidn mihixt znwd #                                   
^SCR("P1PARG",2)
                                                                               
^SCR("P1PARG",3)
                                                                             1$
^SCR("P1PARG",4)
  : 'tcn xe`z :  'tcn  : dveaw xe`z :dveaw: xign :      hixt xe`z    : cew :   
^SCR("P1PARG",5)
                                                                               
^SCR("P1PARG",6)
                                                                               
^SCR("P1PARG",7)
                                                                               
^SCR("P1PARG",8)
                                                                               
^SCR("P1PARG",9)
                                                                               
^SCR("P1PARG",10)
                                                                               
^SCR("P1PARG",11)
                                                                               
^SCR("P1PARG",12)
                                                                               
^SCR("P1PARG",13)
                                                                               
^SCR("P1PARG",14)
                                                                               
^SCR("P1PARG",15)
                                                                               
^SCR("P1PARG",16)
                                                                               
^SCR("P1PARG",17)
                                                                               
^SCR("P1PARG",18)
                                                                               
^SCR("P1PARG",19)
                                                                               
^SCR("P1PARG",20)
                                                                               
^SCR("P1PARG",21)
 $1                                                                            
^SCR("P1PARG",22)
                        <F3> - zncew dxeydn mihixt wizrdl                      
^SCR("P1PARG","A",1)
„˜‰„Ž�‰ˆ‰˜”šŽ—„
^SCR("P1PARG","A",2)

^SCR("P1PARG","A",3)

^SCR("P1PARG","A",4)
'”ƒŽ˜…€š'”ƒŽ„–…�—˜…€š„–…�—˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1PARG","A",5)
---------------------------------------------------------------------
^SCR("P1PARG","A",6)

^SCR("P1PARG","A",7)

^SCR("P1PARG","A",8)

^SCR("P1PARG","A",9)

^SCR("P1PARG","A",10)

^SCR("P1PARG","A",11)

^SCR("P1PARG","A",12)

^SCR("P1PARG","A",13)

^SCR("P1PARG","A",14)

^SCR("P1PARG","A",15)

^SCR("P1PARG","A",16)

^SCR("P1PARG","A",17)

^SCR("P1PARG","A",18)

^SCR("P1PARG","A",19)

^SCR("P1PARG","A",20)

^SCR("P1PARG","A",21)

^SCR("P1PARG","A",22)
<F3>-šŽƒ…—„˜…™„Ž�‰ˆ‰˜”—‰š’„Œ
^SCR("P1PARG","AV",1)
vrhvnohyhrp,nev
^SCR("P1PARG","AV",2)

^SCR("P1PARG","AV",3)

^SCR("P1PARG","AV",4)
wpsnrut,wpsnvmucerut,vmucerhjnyhrprut,sue
^SCR("P1PARG","AV",5)
---------------------------------------------------------------------
^SCR("P1PARG","AV",6)

^SCR("P1PARG","AV",7)

^SCR("P1PARG","AV",8)

^SCR("P1PARG","AV",9)

^SCR("P1PARG","AV",10)

^SCR("P1PARG","AV",11)

^SCR("P1PARG","AV",12)

^SCR("P1PARG","AV",13)

^SCR("P1PARG","AV",14)

^SCR("P1PARG","AV",15)

^SCR("P1PARG","AV",16)

^SCR("P1PARG","AV",17)

^SCR("P1PARG","AV",18)

^SCR("P1PARG","AV",19)

^SCR("P1PARG","AV",20)

^SCR("P1PARG","AV",21)

^SCR("P1PARG","AV",22)
<F3>-,nsuevruavnohyhrpeh,gvk
^SCR("P1PARG","G",1,"CRD")
5,75,E,5,0
^SCR("P1PARG","G",1,"FNC")

^SCR("P1PARG","G",1,"GLOB")
PAR
^SCR("P1PARG","G",1,"HELP")
<F10> - xeywl , <F9> - hixt qihxk , <F7> - mihixt zbvd , <F6> - my itl yetig 
^SCR("P1PARG","G",1,"LMAX")
5
^SCR("P1PARG","G",1,"MUMPS1")
D HZGLNK^P1PARG
^SCR("P1PARG","G",1,"MUMPS2")
D PAR^P1PARG
^SCR("P1PARG","G",1,"MUST")

^SCR("P1PARG","G",1,"NLN")
20
^SCR("P1PARG","G",1,"RZD")
**
^SCR("P1PARG","G",1,"SHEM")
 cew 
^SCR("P1PARG","G",1,"TOPB")
8
^SCR("P1PARG","G",1,"TYP")
E
^SCR("P1PARG","G",2,"CRD")
5,69,H,19,0
^SCR("P1PARG","G",2,"HELP")
<F10> - mixg` mihixt mr xyw 
^SCR("P1PARG","G",2,"LMAX")
19
^SCR("P1PARG","G",2,"MUMPS1")
D HZGLNK^P1PARG
^SCR("P1PARG","G",2,"MUMPS2")
D PAR1^P1PARG
^SCR("P1PARG","G",2,"MUST")

^SCR("P1PARG","G",2,"SHEM")
      hixt xe`z    
^SCR("P1PARG","G",2,"TYP")
H
^SCR("P1PARG","G",3,"CRD")
5,49,N,6,2
^SCR("P1PARG","G",3,"HELP")
<F3> - zncew dxeydn xign wizrdl
^SCR("P1PARG","G",3,"LMAX")
6
^SCR("P1PARG","G",3,"MUMPS1")

^SCR("P1PARG","G",3,"MUMPS2")

^SCR("P1PARG","G",3,"MUST")

^SCR("P1PARG","G",3,"SHEM")
 xign 
^SCR("P1PARG","G",3,"TYP")
N
^SCR("P1PARG","G",4,"CHECK")
Y
^SCR("P1PARG","G",4,"CRD")
5,42,E,5,0
^SCR("P1PARG","G",4,"CREAT")

^SCR("P1PARG","G",4,"FNC")
F9
^SCR("P1PARG","G",4,"GLOB")
PARSUG
^SCR("P1PARG","G",4,"HELP")

^SCR("P1PARG","G",4,"LMAX")
5
^SCR("P1PARG","G",4,"MUMPS1")

^SCR("P1PARG","G",4,"MUMPS2")

^SCR("P1PARG","G",4,"MUST")

^SCR("P1PARG","G",4,"NLN")
20
^SCR("P1PARG","G",4,"NS")
mihixt zeveaw zlah
^SCR("P1PARG","G",4,"RZD")
\
^SCR("P1PARG","G",4,"SHEM")
dveaw
^SCR("P1PARG","G",4,"TOPB")
8
^SCR("P1PARG","G",4,"TYP")
E
^SCR("P1PARG","G",4,"VRB")
KVZ1
^SCR("P1PARG","G",5,"CRD")
5,36,H,12,0
^SCR("P1PARG","G",5,"HELP")

^SCR("P1PARG","G",5,"LMAX")
12
^SCR("P1PARG","G",5,"MUMPS1")

^SCR("P1PARG","G",5,"MUMPS2")

^SCR("P1PARG","G",5,"OUTPUT")

^SCR("P1PARG","G",5,"SHEM")
 dveaw xe`z 
^SCR("P1PARG","G",5,"TYP")
H
^SCR("P1PARG","G",6,"CRD")
5,23,E,8,0
^SCR("P1PARG","G",6,"HELP")
<F7> - zeqtcn zniyx 
^SCR("P1PARG","G",6,"LMAX")
8
^SCR("P1PARG","G",6,"MUMPS1")

^SCR("P1PARG","G",6,"MUMPS2")
D MDP^P1PARG
^SCR("P1PARG","G",6,"MUST")

^SCR("P1PARG","G",6,"SHEM")
  'tcn  
^SCR("P1PARG","G",6,"TYP")
E
^SCR("P1PARG","G",7,"CRD")
5,14,H,11,0
^SCR("P1PARG","G",7,"HELP")

^SCR("P1PARG","G",7,"LMAX")
11
^SCR("P1PARG","G",7,"MUMPS1")

^SCR("P1PARG","G",7,"MUMPS2")

^SCR("P1PARG","G",7,"OUTPUT")

^SCR("P1PARG","G",7,"SHEM")
 'tcn xe`z 
^SCR("P1PARG","G",7,"TYP")
H
^SCR("P1PARG","G","DEL")
Y
^SCR("P1PARG","G","MAX")
99999
^SCR("P1PARG","G","NAME","KVZ")
4
^SCR("P1PARG","G","NAME","KVZ1")
5
^SCR("P1PARG","G","NAME","MDP")
6
^SCR("P1PARG","G","NAME","MDP1")
7
^SCR("P1PARG","G","NAME","MH")
3
^SCR("P1PARG","G","NAME","PAR")
1
^SCR("P1PARG","G","NAME","PAR1")
2
^SCR("P1PARG","G","NM",1)
PAR
^SCR("P1PARG","G","NM",2)
PAR1
^SCR("P1PARG","G","NM",3)
MH
^SCR("P1PARG","G","NM",4)
KVZ
^SCR("P1PARG","G","NM",5)
KVZ1
^SCR("P1PARG","G","NM",6)
MDP
^SCR("P1PARG","G","NM",7)
MDP1
^SCR("P1PARG","G","RB")
4,2,22,79
^SCR("P1PARG","G","REF")
^TEMP($P
^SCR("P1PARG","G","RZD")
\
^SCR("P1PARG","G","STEP")
1
^SCR("P1PARG","G","STG")
  : 'tcn xe`z :  'tcn  : dveaw xe`z :dveaw: xign :      hixt xe`z    : cew :   
^SCR("P1PARG","G","VG")
6
^SCR("P1PARG","NAME")
dxidn mihixt znwd
^SCR("P1PARI")
H
^SCR("P1PARI",1)
                                                                               
^SCR("P1PARI",2)
                            # hixt  ipezp  oekcr #                             
^SCR("P1PARI",3)
                                                                               
^SCR("P1PARI",4)
     {                          20} : hixtd xe`z   {10         }: hixt cew     
^SCR("P1PARI",5)
     {28                          } :zifrela hixtd xe`z                        
^SCR("P1PARI",6)
                                                               2]              
^SCR("P1PARI",7)
                     dpy zligzn : yceg zligzn : {24     }: xknp                
^SCR("P1PARI",8)
                    --------------------------------------------               
^SCR("P1PARI",9)
                     {23      } :   {22    }  :  {21   } : zenk                
^SCR("P1PARI",10)
                     {27      } : {26      }  : {25    } : mekq                
^SCR("P1PARI",11)
                [2                                                             
^SCR("P1PARI",12)
                                                                               
^SCR("P1PARI",13)
                                                                        1]     
^SCR("P1PARI",14)
                                            {29      }:     okxvl xign         
^SCR("P1PARI",15)
                      {                     51} {50  }:   mihixt zveaw         
^SCR("P1PARI",16)
                      {                     55} {54  }:          dwlgn         
^SCR("P1PARI",17)
                     { 75}: lwyn   {               70}:     dreaw dxrd         
^SCR("P1PARI",18)
     {                 87} {85                 }:dqtcdl gahn zqtcn 'qn         
^SCR("P1PARI",19)
                                                          {    86}:rav         
^SCR("P1PARI",20)
   [1                                                                          
^SCR("P1PARI","A",1)

^SCR("P1PARI","A",2)
ˆ‰˜”‰�…š��…‹ƒ’
^SCR("P1PARI","A",3)

^SCR("P1PARI","A",4)
:ˆ‰˜”„˜…€š:ˆ‰˜”ƒ…—
^SCR("P1PARI","A",5)
:š‰†’…Œ�ˆ‰˜”„˜…€š
^SCR("P1PARI","A",6)

^SCR("P1PARI","A",7)
„�™šŒ‰‡šŽ:™ƒ…‡šŒ‰‡šŽ::˜‹Ž�
^SCR("P1PARI","A",8)
--------------------------------------------
^SCR("P1PARI","A",9)
:::š…Ž‹
^SCR("P1PARI","A",10)
:::�…‹‘
^SCR("P1PARI","A",11)

^SCR("P1PARI","A",12)

^SCR("P1PARI","A",13)

^SCR("P1PARI","A",14)
:�‹˜–Œ˜‰‡Ž
^SCR("P1PARI","A",15)
:�‰ˆ‰˜”š–…�—
^SCR("P1PARI","A",16)
:„—Œ‡Ž
^SCR("P1PARI","A",17)
:Œ—™Ž:„’…�—„˜’„
^SCR("P1PARI","A",18)
:„‘”ƒ„Œ‡�ˆŽš‘”ƒŽ'‘Ž
^SCR("P1PARI","A",19)
:’�–
^SCR("P1PARI","A",20)

^SCR("P1PARI","AV",1)

^SCR("P1PARI","AV",2)
yhrphbu,biufsg
^SCR("P1PARI","AV",3)

^SCR("P1PARI","AV",4)
:yhrpvrut,:yhrpsue
^SCR("P1PARI","AV",5)
:,hzgukcyhrpvrut,
^SCR("P1PARI","AV",6)

^SCR("P1PARI","AV",7)
vba,khj,n:asuj,khj,n::rfnb
^SCR("P1PARI","AV",8)
--------------------------------------------
^SCR("P1PARI","AV",9)
:::,unf
^SCR("P1PARI","AV",10)
:::oufx
^SCR("P1PARI","AV",11)

^SCR("P1PARI","AV",12)

^SCR("P1PARI","AV",13)

^SCR("P1PARI","AV",14)
:ifrmkrhjn
^SCR("P1PARI","AV",15)
:ohyhrp,muce
^SCR("P1PARI","AV",16)
:vekjn
^SCR("P1PARI","AV",17)
:kean:vgucevrgv
^SCR("P1PARI","AV",18)
:vxpsvkjcyn,xpsnwxn
^SCR("P1PARI","AV",19)
:gcm
^SCR("P1PARI","AV",20)

^SCR("P1PARI","NAME")
2
^SCR("P1PARI","P",10,"CRD")
4,51,E,8,0
^SCR("P1PARI","P",10,"FNC")
PGUP,PGDW,F8,FF
^SCR("P1PARI","P",10,"GLOB")
PAR
^SCR("P1PARI","P",10,"HELP")
<ESC> - d`ivi, <F8> - iept xtqn ,<F7 > - dbvd , <F6> hixt my zlgzd itl yetig 
^SCR("P1PARI","P",10,"LMAX")
12
^SCR("P1PARI","P",10,"MUMPS1")
S %ZMSL("bf")="&<>SC"
^SCR("P1PARI","P",10,"MUMPS2")
D SET^P1PARI
^SCR("P1PARI","P",10,"MUST")

^SCR("P1PARI","P",10,"NLN")
20
^SCR("P1PARI","P",10,"RZD")
**
^SCR("P1PARI","P",10,"TOPB")
8
^SCR("P1PARI","P",10,"TYP")
E
^SCR("P1PARI","P",10,"VRB")
SHEM
^SCR("P1PARI","P",20,"CRD")
4,35,H,22
^SCR("P1PARI","P",20,"HELP")

^SCR("P1PARI","P",20,"LMAX")
29
^SCR("P1PARI","P",20,"MUMPS1")

^SCR("P1PARI","P",20,"MUMPS2")
S SHEM=$TR(SHEM,"*/\","X||")
^SCR("P1PARI","P",20,"TYP")
H
^SCR("P1PARI","P",21,"CRD")
9,49,N,6,0
^SCR("P1PARI","P",21,"HELP")

^SCR("P1PARI","P",21,"LMAX")
6
^SCR("P1PARI","P",21,"MUMPS1")

^SCR("P1PARI","P",21,"MUMPS2")

^SCR("P1PARI","P",21,"OUTPUT")

^SCR("P1PARI","P",21,"TYP")
N
^SCR("P1PARI","P",22,"CRD")
9,36,N,7,0
^SCR("P1PARI","P",22,"HELP")

^SCR("P1PARI","P",22,"LMAX")
7
^SCR("P1PARI","P",22,"MUMPS1")

^SCR("P1PARI","P",22,"MUMPS2")

^SCR("P1PARI","P",22,"OUTPUT")

^SCR("P1PARI","P",22,"TYP")
N
^SCR("P1PARI","P",23,"CRD")
9,21,N,9,0
^SCR("P1PARI","P",23,"HELP")

^SCR("P1PARI","P",23,"LMAX")
9
^SCR("P1PARI","P",23,"MUMPS1")

^SCR("P1PARI","P",23,"MUMPS2")

^SCR("P1PARI","P",23,"OUTPUT")

^SCR("P1PARI","P",23,"TYP")
N
^SCR("P1PARI","P",24,"CRD")
7,48,E,8,0
^SCR("P1PARI","P",24,"HELP")

^SCR("P1PARI","P",24,"LMAX")
8
^SCR("P1PARI","P",24,"MUMPS1")

^SCR("P1PARI","P",24,"MUMPS2")

^SCR("P1PARI","P",24,"OUTPUT")

^SCR("P1PARI","P",24,"TYP")
E
^SCR("P1PARI","P",25,"CRD")
10,48,N,7,2
^SCR("P1PARI","P",25,"HELP")

^SCR("P1PARI","P",25,"LMAX")
7
^SCR("P1PARI","P",25,"MUMPS1")

^SCR("P1PARI","P",25,"MUMPS2")

^SCR("P1PARI","P",25,"OUTPUT")

^SCR("P1PARI","P",25,"TYP")
N
^SCR("P1PARI","P",26,"CRD")
10,34,N,9,2
^SCR("P1PARI","P",26,"HELP")

^SCR("P1PARI","P",26,"LMAX")
9
^SCR("P1PARI","P",26,"MUMPS1")

^SCR("P1PARI","P",26,"MUMPS2")

^SCR("P1PARI","P",26,"OUTPUT")

^SCR("P1PARI","P",26,"TYP")
N
^SCR("P1PARI","P",27,"CRD")
10,21,N,9,2
^SCR("P1PARI","P",27,"HELP")

^SCR("P1PARI","P",27,"LMAX")
9
^SCR("P1PARI","P",27,"MUMPS1")

^SCR("P1PARI","P",27,"MUMPS2")

^SCR("P1PARI","P",27,"OUTPUT")

^SCR("P1PARI","P",27,"TYP")
N
^SCR("P1PARI","P",28,"CRD")
5,5,E,26,0
^SCR("P1PARI","P",28,"HELP")

^SCR("P1PARI","P",28,"LMAX")
29
^SCR("P1PARI","P",28,"MUMPS1")

^SCR("P1PARI","P",28,"MUMPS2")

^SCR("P1PARI","P",28,"TYP")
E
^SCR("P1PARI","P",29,"CRD")
14,44,N,8,2
^SCR("P1PARI","P",29,"HELP")

^SCR("P1PARI","P",29,"LMAX")
9
^SCR("P1PARI","P",29,"MUMPS1")

^SCR("P1PARI","P",29,"MUMPS2")

^SCR("P1PARI","P",29,"MUST")

^SCR("P1PARI","P",29,"TYP")
N
^SCR("P1PARI","P",50,"CHECK")
Y
^SCR("P1PARI","P",50,"CRD")
15,48,E,5,0
^SCR("P1PARI","P",50,"CREAT")

^SCR("P1PARI","P",50,"FNC")

^SCR("P1PARI","P",50,"GLOB")
PARSUG
^SCR("P1PARI","P",50,"HELP")

^SCR("P1PARI","P",50,"LMAX")
5
^SCR("P1PARI","P",50,"MUMPS1")

^SCR("P1PARI","P",50,"MUMPS2")
D SUG^P1PARI
^SCR("P1PARI","P",50,"MUST")

^SCR("P1PARI","P",50,"NLN")
24
^SCR("P1PARI","P",50,"NS")
mihixt ibeq zlah
^SCR("P1PARI","P",50,"RZD")
\
^SCR("P1PARI","P",50,"TOPB")
8
^SCR("P1PARI","P",50,"TYP")
E
^SCR("P1PARI","P",50,"VRB")
SUGNA
^SCR("P1PARI","P",51,"CRD")
15,47,H,24
^SCR("P1PARI","P",51,"HELP")

^SCR("P1PARI","P",51,"LMAX")
24
^SCR("P1PARI","P",51,"MUMPS1")

^SCR("P1PARI","P",51,"MUMPS2")

^SCR("P1PARI","P",51,"OUTPUT")

^SCR("P1PARI","P",51,"TYP")
H
^SCR("P1PARI","P",54,"CRD")
16,48,N,5,0
^SCR("P1PARI","P",54,"HELP")

^SCR("P1PARI","P",54,"LMAX")
5
^SCR("P1PARI","P",54,"MUMPS1")

^SCR("P1PARI","P",54,"MUMPS2")

^SCR("P1PARI","P",54,"OUTPUT")

^SCR("P1PARI","P",54,"TYP")
N
^SCR("P1PARI","P",55,"CRD")
16,47,H,24
^SCR("P1PARI","P",55,"HELP")

^SCR("P1PARI","P",55,"LMAX")
24
^SCR("P1PARI","P",55,"MUMPS1")

^SCR("P1PARI","P",55,"MUMPS2")

^SCR("P1PARI","P",55,"OUTPUT")

^SCR("P1PARI","P",55,"TYP")
H
^SCR("P1PARI","P",70,"CRD")
17,54,H,18
^SCR("P1PARI","P",70,"HELP")

^SCR("P1PARI","P",70,"LMAX")
18
^SCR("P1PARI","P",70,"MUMPS1")

^SCR("P1PARI","P",70,"MUMPS2")

^SCR("P1PARI","P",70,"TYP")
H
^SCR("P1PARI","P",75,"CRD")
17,26,H,1
^SCR("P1PARI","P",75,"HELP")

^SCR("P1PARI","P",75,"LMAX")
4
^SCR("P1PARI","P",75,"MUMPS1")
S:$G(MSK)="" MSK="l"
^SCR("P1PARI","P",75,"MUMPS2")
I $$^%L1YN("MSK")<0 S %SC("ER")=1
^SCR("P1PARI","P",75,"TYP")
H
^SCR("P1PARI","P",85,"CRD")
18,27,E,20,0
^SCR("P1PARI","P",85,"HELP")
1>2: zewacn qitcdl ,1&2: 2-e 1 zeqtcnl qitcdl ,<F7> - zeqtcn zniyx
^SCR("P1PARI","P",85,"LMAX")
20
^SCR("P1PARI","P",85,"MUMPS1")

^SCR("P1PARI","P",85,"MUMPS2")
D MDPS^P1PARI
^SCR("P1PARI","P",85,"TYP")
E
^SCR("P1PARI","P",86,"CRD")
19,66,H,7
^SCR("P1PARI","P",86,"HELP")

^SCR("P1PARI","P",86,"LMAX")
7
^SCR("P1PARI","P",86,"MUMPS1")
S CEVA=$S($E(CEVA,$L(CEVA))="`":"mec`",1:"legk")
^SCR("P1PARI","P",86,"MUMPS2")
S CEVA=$S($E(CEVA,$L(CEVA))="`":"mec`",1:"legk")
^SCR("P1PARI","P",86,"TYP")
H
^SCR("P1PARI","P",87,"CRD")
18,26,H,14
^SCR("P1PARI","P",87,"HELP")

^SCR("P1PARI","P",87,"LMAX")
20
^SCR("P1PARI","P",87,"MUMPS1")

^SCR("P1PARI","P",87,"MUMPS2")

^SCR("P1PARI","P",87,"OUTPUT")

^SCR("P1PARI","P",87,"TYP")
H
^SCR("P1PARI","P","NAME","CEVA")
86
^SCR("P1PARI","P","NAME","DATE")
24
^SCR("P1PARI","P","NAME","DEP")
54
^SCR("P1PARI","P","NAME","DEP1")
55
^SCR("P1PARI","P","NAME","HRA")
70
^SCR("P1PARI","P","NAME","KAMA1")
21
^SCR("P1PARI","P","NAME","KAMA2")
22
^SCR("P1PARI","P","NAME","KAMA3")
23
^SCR("P1PARI","P","NAME","MAHIR")
29
^SCR("P1PARI","P","NAME","MDP1")
87
^SCR("P1PARI","P","NAME","MDPS")
85
^SCR("P1PARI","P","NAME","MSK")
75
^SCR("P1PARI","P","NAME","PAR")
10
^SCR("P1PARI","P","NAME","SHEM")
20
^SCR("P1PARI","P","NAME","SHEML")
28
^SCR("P1PARI","P","NAME","SUG")
50
^SCR("P1PARI","P","NAME","SUGNA")
51
^SCR("P1PARI","P","NAME","SUMD")
25
^SCR("P1PARI","P","NAME","SUMM")
26
^SCR("P1PARI","P","NAME","SUMY")
27
^SCR("P1PARI","P","NM",10)
PAR
^SCR("P1PARI","P","NM",20)
SHEM
^SCR("P1PARI","P","NM",21)
KAMA1
^SCR("P1PARI","P","NM",22)
KAMA2
^SCR("P1PARI","P","NM",23)
KAMA3
^SCR("P1PARI","P","NM",24)
DATE
^SCR("P1PARI","P","NM",25)
SUMD
^SCR("P1PARI","P","NM",26)
SUMM
^SCR("P1PARI","P","NM",27)
SUMY
^SCR("P1PARI","P","NM",28)
SHEML
^SCR("P1PARI","P","NM",29)
MAHIR
^SCR("P1PARI","P","NM",50)
SUG
^SCR("P1PARI","P","NM",51)
SUGNA
^SCR("P1PARI","P","NM",54)
DEP
^SCR("P1PARI","P","NM",55)
DEP1
^SCR("P1PARI","P","NM",70)
HRA
^SCR("P1PARI","P","NM",75)
MSK
^SCR("P1PARI","P","NM",85)
MDPS
^SCR("P1PARI","P","NM",86)
CEVA
^SCR("P1PARI","P","NM",87)
MDP1
^SCR("P1PARI","P","RB",1)
14,4,21,74
^SCR("P1PARI","P","RB",2)
7,17,12,65
^SCR("P1PARLKH")
H
^SCR("P1PARLKH",1)
                               # gewl oexign #                                 
^SCR("P1PARLKH",2)
                                                                               
^SCR("P1PARLKH",3)
                  {                        06} {05       }: gewl 'qn           
^SCR("P1PARLKH",4)
                                                                      1$       
^SCR("P1PARLKH",5)
          : gewll xign : libx xign :      hixt xe`z     : hixt cew :           
^SCR("P1PARLKH",6)
                                                                               
^SCR("P1PARLKH",7)
                                                                               
^SCR("P1PARLKH",8)
                                                                               
^SCR("P1PARLKH",9)
                                                                               
^SCR("P1PARLKH",10)
                                                                               
^SCR("P1PARLKH",11)
                                                                               
^SCR("P1PARLKH",12)
                                                                               
^SCR("P1PARLKH",13)
                                                                               
^SCR("P1PARLKH",14)
                                                                               
^SCR("P1PARLKH",15)
                                                                               
^SCR("P1PARLKH",16)
                                                                               
^SCR("P1PARLKH",17)
                                                                               
^SCR("P1PARLKH",18)
                                                                               
^SCR("P1PARLKH",19)
                                                                               
^SCR("P1PARLKH",20)
                                                                               
^SCR("P1PARLKH",21)
      $1                                                                       
^SCR("P1PARLKH","A",1)
‡…—Œ�…˜‰‡Ž
^SCR("P1PARLKH","A",2)

^SCR("P1PARLKH","A",3)
:‡…—Œ'‘Ž
^SCR("P1PARLKH","A",4)

^SCR("P1PARLKH","A",5)
‡…—ŒŒ˜‰‡ŽŒ‰‚˜˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1PARLKH","A",6)
-----------------------------------------------------
^SCR("P1PARLKH","A",7)

^SCR("P1PARLKH","A",8)

^SCR("P1PARLKH","A",9)

^SCR("P1PARLKH","A",10)

^SCR("P1PARLKH","A",11)

^SCR("P1PARLKH","A",12)

^SCR("P1PARLKH","A",13)

^SCR("P1PARLKH","A",14)

^SCR("P1PARLKH","A",15)

^SCR("P1PARLKH","A",16)

^SCR("P1PARLKH","A",17)

^SCR("P1PARLKH","A",18)

^SCR("P1PARLKH","A",19)

^SCR("P1PARLKH","A",20)

^SCR("P1PARLKH","A",21)

^SCR("P1PARLKH","AV",1)
juekiurhjn
^SCR("P1PARLKH","AV",2)

^SCR("P1PARLKH","AV",3)
:juekwxn
^SCR("P1PARLKH","AV",4)

^SCR("P1PARLKH","AV",5)
juekkrhjnkhdrrhjnyhrprut,yhrpsue
^SCR("P1PARLKH","AV",6)
-----------------------------------------------------
^SCR("P1PARLKH","AV",7)

^SCR("P1PARLKH","AV",8)

^SCR("P1PARLKH","AV",9)

^SCR("P1PARLKH","AV",10)

^SCR("P1PARLKH","AV",11)

^SCR("P1PARLKH","AV",12)

^SCR("P1PARLKH","AV",13)

^SCR("P1PARLKH","AV",14)

^SCR("P1PARLKH","AV",15)

^SCR("P1PARLKH","AV",16)

^SCR("P1PARLKH","AV",17)

^SCR("P1PARLKH","AV",18)

^SCR("P1PARLKH","AV",19)

^SCR("P1PARLKH","AV",20)

^SCR("P1PARLKH","AV",21)

^SCR("P1PARLKH","G",1,"CHECK")
Y
^SCR("P1PARLKH","G",1,"CRD")
6,67,E,10,0
^SCR("P1PARLKH","G",1,"CREAT")

^SCR("P1PARLKH","G",1,"FNC")
F9,F6,F7
^SCR("P1PARLKH","G",1,"GLOB")
PAR
^SCR("P1PARLKH","G",1,"HELP")

^SCR("P1PARLKH","G",1,"LMAX")
10
^SCR("P1PARLKH","G",1,"MUMPS1")
D PAR0^P1PARLKH
^SCR("P1PARLKH","G",1,"MUMPS2")
D PAR^P1PARLKH
^SCR("P1PARLKH","G",1,"NLN")
20
^SCR("P1PARLKH","G",1,"NS")
P
^SCR("P1PARLKH","G",1,"RZD")
**
^SCR("P1PARLKH","G",1,"SHEM")
 hixt cew 
^SCR("P1PARLKH","G",1,"TOPB")
8
^SCR("P1PARLKH","G",1,"TYP")
E
^SCR("P1PARLKH","G",1,"VRB")
PAR1
^SCR("P1PARLKH","G",2,"CRD")
6,56,H,20,0
^SCR("P1PARLKH","G",2,"HELP")

^SCR("P1PARLKH","G",2,"LMAX")
20
^SCR("P1PARLKH","G",2,"MUMPS1")

^SCR("P1PARLKH","G",2,"MUMPS2")

^SCR("P1PARLKH","G",2,"OUTPUT")

^SCR("P1PARLKH","G",2,"SHEM")
      hixt xe`z     
^SCR("P1PARLKH","G",2,"TYP")
H
^SCR("P1PARLKH","G",3,"CRD")
6,35,N,8,2
^SCR("P1PARLKH","G",3,"HELP")

^SCR("P1PARLKH","G",3,"LMAX")
11
^SCR("P1PARLKH","G",3,"MUMPS1")

^SCR("P1PARLKH","G",3,"MUMPS2")

^SCR("P1PARLKH","G",3,"OUTPUT")

^SCR("P1PARLKH","G",3,"SHEM")
 libx xign 
^SCR("P1PARLKH","G",3,"TYP")
N
^SCR("P1PARLKH","G",4,"CRD")
6,23,E,8,0
^SCR("P1PARLKH","G",4,"HELP")
<F9> - hixt qihxk , <F7> - cew itl ,F6 - my itl yetig 
^SCR("P1PARLKH","G",4,"LMAX")
12
^SCR("P1PARLKH","G",4,"MUMPS1")

^SCR("P1PARLKH","G",4,"MUMPS2")
D MHLK^P1PARLKH
^SCR("P1PARLKH","G",4,"SHEM")
 gewll xign 
^SCR("P1PARLKH","G",4,"TYP")
E
^SCR("P1PARLKH","G","DEL")

^SCR("P1PARLKH","G","MAX")
99999
^SCR("P1PARLKH","G","NAME","MH")
3
^SCR("P1PARLKH","G","NAME","MHLK")
4
^SCR("P1PARLKH","G","NAME","PAR")
1
^SCR("P1PARLKH","G","NAME","PAR1")
2
^SCR("P1PARLKH","G","NM",1)
PAR
^SCR("P1PARLKH","G","NM",2)
PAR1
^SCR("P1PARLKH","G","NM",3)
MH
^SCR("P1PARLKH","G","NM",4)
MHLK
^SCR("P1PARLKH","G","RB")
5,7,22,72
^SCR("P1PARLKH","G","REF")
^TEMP($P,"L"
^SCR("P1PARLKH","G","RZD")
\
^SCR("P1PARLKH","G","STEP")
1
^SCR("P1PARLKH","G","STG")
          : gewll xign : libx xign :      hixt xe`z     : hixt cew :           
^SCR("P1PARLKH","G","VG")
7
^SCR("P1PARLKH","NAME")
gewl oexign
^SCR("P1PARLKH","P",5,"CHECK")
Y
^SCR("P1PARLKH","P",5,"CRD")
3,47,E,10,0
^SCR("P1PARLKH","P",5,"FNC")
F8,F9
^SCR("P1PARLKH","P",5,"GLOB")
LKH
^SCR("P1PARLKH","P",5,"HELP")
F9 - gewl qihxk ,F8 - mipexign zniyx ,F7 - zegewl zniyx ,F6 - my itl yetig 
^SCR("P1PARLKH","P",5,"LMAX")
10
^SCR("P1PARLKH","P",5,"MUMPS1")

^SCR("P1PARLKH","P",5,"MUMPS2")
D LKH^P1PARLKH
^SCR("P1PARLKH","P",5,"MUST")

^SCR("P1PARLKH","P",5,"NLN")
20
^SCR("P1PARLKH","P",5,"RZD")
\
^SCR("P1PARLKH","P",5,"TOPB")
8
^SCR("P1PARLKH","P",5,"TYP")
E
^SCR("P1PARLKH","P",5,"VRB")
LKH1
^SCR("P1PARLKH","P",6,"CRD")
3,46,H,27
^SCR("P1PARLKH","P",6,"HELP")

^SCR("P1PARLKH","P",6,"LMAX")
27
^SCR("P1PARLKH","P",6,"MUMPS1")

^SCR("P1PARLKH","P",6,"MUMPS2")

^SCR("P1PARLKH","P",6,"OUTPUT")

^SCR("P1PARLKH","P",6,"TYP")
H
^SCR("P1PARLKH","P","NAME","LKH")
5
^SCR("P1PARLKH","P","NAME","LKH1")
6
^SCR("P1PARLKH","P","NM",5)
LKH
^SCR("P1PARLKH","P","NM",6)
LKH1
^SCR("P1PARM")
H
^SCR("P1PARM",1)
                                    # xign oekcr #                             
^SCR("P1PARM",2)
                                                                               
^SCR("P1PARM",3)
                                                                           1$  
^SCR("P1PARM",4)
                  : ycg xign : xign  :    hixt xe`z         :   hixt cew  :    
^SCR("P1PARM",5)
                                                                               
^SCR("P1PARM",6)
                                                                               
^SCR("P1PARM",7)
                                                                               
^SCR("P1PARM",8)
                                                                               
^SCR("P1PARM",9)
                                                                               
^SCR("P1PARM",10)
                                                                               
^SCR("P1PARM",11)
                                                                               
^SCR("P1PARM",12)
                                                                               
^SCR("P1PARM",13)
                                                                               
^SCR("P1PARM",14)
                                                                               
^SCR("P1PARM",15)
                                                                               
^SCR("P1PARM",16)
                                                                               
^SCR("P1PARM",17)
                                                                               
^SCR("P1PARM",18)
                                                                               
^SCR("P1PARM",19)
                                                                               
^SCR("P1PARM",20)
             $2                                                                
^SCR("P1PARM","A",1)
˜‰‡Ž�…‹ƒ’
^SCR("P1PARM","A",2)

^SCR("P1PARM","A",3)

^SCR("P1PARM","A",4)
™ƒ‡˜‰‡Ž˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1PARM","A",5)
----------------------------------------------------
^SCR("P1PARM","A",6)

^SCR("P1PARM","A",7)

^SCR("P1PARM","A",8)

^SCR("P1PARM","A",9)

^SCR("P1PARM","A",10)

^SCR("P1PARM","A",11)

^SCR("P1PARM","A",12)

^SCR("P1PARM","A",13)

^SCR("P1PARM","A",14)

^SCR("P1PARM","A",15)

^SCR("P1PARM","A",16)

^SCR("P1PARM","A",17)

^SCR("P1PARM","A",18)

^SCR("P1PARM","A",19)

^SCR("P1PARM","A",20)

^SCR("P1PARM","AV",1)
rhjniufsg
^SCR("P1PARM","AV",2)

^SCR("P1PARM","AV",3)

^SCR("P1PARM","AV",4)
asjrhjnrhjnyhrprut,yhrpsue
^SCR("P1PARM","AV",5)
----------------------------------------------------
^SCR("P1PARM","AV",6)

^SCR("P1PARM","AV",7)

^SCR("P1PARM","AV",8)

^SCR("P1PARM","AV",9)

^SCR("P1PARM","AV",10)

^SCR("P1PARM","AV",11)

^SCR("P1PARM","AV",12)

^SCR("P1PARM","AV",13)

^SCR("P1PARM","AV",14)

^SCR("P1PARM","AV",15)

^SCR("P1PARM","AV",16)

^SCR("P1PARM","AV",17)

^SCR("P1PARM","AV",18)

^SCR("P1PARM","AV",19)

^SCR("P1PARM","AV",20)

^SCR("P1PARM","G",1,"CHECK")
Y
^SCR("P1PARM","G",1,"CRD")
5,74,E,8,0
^SCR("P1PARM","G",1,"CREAT")

^SCR("P1PARM","G",1,"FNC")
F9
^SCR("P1PARM","G",1,"GLOB")
^PAR
^SCR("P1PARM","G",1,"HELP")
<F9> - hixt qihxk , <F7> - mihixt zbvd , <F6> - my itl yetig 
^SCR("P1PARM","G",1,"LMAX")
13
^SCR("P1PARM","G",1,"MUMPS1")

^SCR("P1PARM","G",1,"MUMPS2")
D UST^P1PARI
^SCR("P1PARM","G",1,"MUST")

^SCR("P1PARM","G",1,"NLN")
20
^SCR("P1PARM","G",1,"NS")
J
^SCR("P1PARM","G",1,"RZD")
**
^SCR("P1PARM","G",1,"SHEM")
   hixt cew  
^SCR("P1PARM","G",1,"TOPB")
8
^SCR("P1PARM","G",1,"TYP")
E
^SCR("P1PARM","G",1,"VRB")
SHEM
^SCR("P1PARM","G",2,"CRD")
5,60,H,20,0
^SCR("P1PARM","G",2,"HELP")

^SCR("P1PARM","G",2,"LMAX")
22
^SCR("P1PARM","G",2,"MUMPS1")

^SCR("P1PARM","G",2,"MUMPS2")

^SCR("P1PARM","G",2,"OUTPUT")

^SCR("P1PARM","G",2,"SHEM")
    hixt xe`z         
^SCR("P1PARM","G",2,"TYP")
H
^SCR("P1PARM","G",3,"CRD")
5,37,N,7,2
^SCR("P1PARM","G",3,"HELP")

^SCR("P1PARM","G",3,"LMAX")
7
^SCR("P1PARM","G",3,"MUMPS1")

^SCR("P1PARM","G",3,"MUMPS2")

^SCR("P1PARM","G",3,"OUTPUT")

^SCR("P1PARM","G",3,"SHEM")
 xign  
^SCR("P1PARM","G",3,"TYP")
N
^SCR("P1PARM","G",4,"CRD")
5,29,N,10,2
^SCR("P1PARM","G",4,"HELP")

^SCR("P1PARM","G",4,"LMAX")
10
^SCR("P1PARM","G",4,"MUMPS1")

^SCR("P1PARM","G",4,"MUMPS2")

^SCR("P1PARM","G",4,"SHEM")
 ycg xign 
^SCR("P1PARM","G",4,"TYP")
N
^SCR("P1PARM","G","DEL")
Y
^SCR("P1PARM","G","MAX")
99999
^SCR("P1PARM","G","NAME","MAHIR")
3
^SCR("P1PARM","G","NAME","MAHIRN")
4
^SCR("P1PARM","G","NAME","PAR")
1
^SCR("P1PARM","G","NAME","SHEM")
2
^SCR("P1PARM","G","NM",1)
PAR
^SCR("P1PARM","G","NM",2)
SHEM
^SCR("P1PARM","G","NM",3)
MAHIR
^SCR("P1PARM","G","NM",4)
MAHIRN
^SCR("P1PARM","G","RB")
4,14,21,77
^SCR("P1PARM","G","REF")
^TEMP($P
^SCR("P1PARM","G","RZD")
**
^SCR("P1PARM","G","STEP")
1
^SCR("P1PARM","G","STG")
                  : ycg xign : xign  :    hixt xe`z         :   hixt cew  :    
^SCR("P1PARM","G","VG")
6
^SCR("P1PARM","NAME")

^SCR("P1PARMS")
H
^SCR("P1PARMS",1)
                     # migelyn ihixtl oexign #                                 
^SCR("P1PARMS",2)
                                                                               
^SCR("P1PARMS",3)
                                                                           1$  
^SCR("P1PARMS",4)
         : gelynl hixt xign : libx xign :      hixt xe`z     : hixt cew :      
^SCR("P1PARMS",5)
                                                                               
^SCR("P1PARMS",6)
                                                                               
^SCR("P1PARMS",7)
                                                                               
^SCR("P1PARMS",8)
                                                                               
^SCR("P1PARMS",9)
                                                                               
^SCR("P1PARMS",10)
                                                                               
^SCR("P1PARMS",11)
                                                                               
^SCR("P1PARMS",12)
                                                                               
^SCR("P1PARMS",13)
                                                                               
^SCR("P1PARMS",14)
                                                                               
^SCR("P1PARMS",15)
                                                                               
^SCR("P1PARMS",16)
                                                                               
^SCR("P1PARMS",17)
                                                                               
^SCR("P1PARMS",18)
                                                                               
^SCR("P1PARMS",19)
                                                                               
^SCR("P1PARMS",20)
      $1                                                                       
^SCR("P1PARMS","A",1)
�‰‡…Œ™Ž‰ˆ‰˜”Œ�…˜‰‡Ž
^SCR("P1PARMS","A",2)

^SCR("P1PARMS","A",3)

^SCR("P1PARMS","A",4)
‡…Œ™ŽŒˆ‰˜”˜‰‡ŽŒ‰‚˜˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1PARMS","A",5)
-----------------------------------------------------------
^SCR("P1PARMS","A",6)

^SCR("P1PARMS","A",7)

^SCR("P1PARMS","A",8)

^SCR("P1PARMS","A",9)

^SCR("P1PARMS","A",10)

^SCR("P1PARMS","A",11)

^SCR("P1PARMS","A",12)

^SCR("P1PARMS","A",13)

^SCR("P1PARMS","A",14)

^SCR("P1PARMS","A",15)

^SCR("P1PARMS","A",16)

^SCR("P1PARMS","A",17)

^SCR("P1PARMS","A",18)

^SCR("P1PARMS","A",19)

^SCR("P1PARMS","A",20)

^SCR("P1PARMS","AV",1)
ohjukanhyhrpkiurhjn
^SCR("P1PARMS","AV",2)

^SCR("P1PARMS","AV",3)

^SCR("P1PARMS","AV",4)
jukankyhrprhjnkhdrrhjnyhrprut,yhrpsue
^SCR("P1PARMS","AV",5)
-----------------------------------------------------------
^SCR("P1PARMS","AV",6)

^SCR("P1PARMS","AV",7)

^SCR("P1PARMS","AV",8)

^SCR("P1PARMS","AV",9)

^SCR("P1PARMS","AV",10)

^SCR("P1PARMS","AV",11)

^SCR("P1PARMS","AV",12)

^SCR("P1PARMS","AV",13)

^SCR("P1PARMS","AV",14)

^SCR("P1PARMS","AV",15)

^SCR("P1PARMS","AV",16)

^SCR("P1PARMS","AV",17)

^SCR("P1PARMS","AV",18)

^SCR("P1PARMS","AV",19)

^SCR("P1PARMS","AV",20)

^SCR("P1PARMS","G",1,"CHECK")
Y
^SCR("P1PARMS","G",1,"CRD")
5,72,E,10,0
^SCR("P1PARMS","G",1,"CREAT")

^SCR("P1PARMS","G",1,"FNC")
F9,F6,F7
^SCR("P1PARMS","G",1,"GLOB")
PAR
^SCR("P1PARMS","G",1,"HELP")

^SCR("P1PARMS","G",1,"LMAX")
10
^SCR("P1PARMS","G",1,"MUMPS1")
D PAR0^P1PARTA
^SCR("P1PARMS","G",1,"MUMPS2")
D PAR^P1PARTA
^SCR("P1PARMS","G",1,"NLN")
20
^SCR("P1PARMS","G",1,"NS")
P
^SCR("P1PARMS","G",1,"RZD")
**
^SCR("P1PARMS","G",1,"SHEM")
 hixt cew 
^SCR("P1PARMS","G",1,"TOPB")
8
^SCR("P1PARMS","G",1,"TYP")
E
^SCR("P1PARMS","G",1,"VRB")
PAR1
^SCR("P1PARMS","G",2,"CRD")
5,61,H,20,0
^SCR("P1PARMS","G",2,"HELP")

^SCR("P1PARMS","G",2,"LMAX")
20
^SCR("P1PARMS","G",2,"MUMPS1")

^SCR("P1PARMS","G",2,"MUMPS2")

^SCR("P1PARMS","G",2,"OUTPUT")

^SCR("P1PARMS","G",2,"SHEM")
      hixt xe`z     
^SCR("P1PARMS","G",2,"TYP")
H
^SCR("P1PARMS","G",3,"CRD")
5,40,N,8,2
^SCR("P1PARMS","G",3,"HELP")

^SCR("P1PARMS","G",3,"LMAX")
11
^SCR("P1PARMS","G",3,"MUMPS1")

^SCR("P1PARMS","G",3,"MUMPS2")

^SCR("P1PARMS","G",3,"OUTPUT")

^SCR("P1PARMS","G",3,"SHEM")
 libx xign 
^SCR("P1PARMS","G",3,"TYP")
N
^SCR("P1PARMS","G",4,"CRD")
5,28,E,8,0
^SCR("P1PARMS","G",4,"HELP")
<F9> - hixt qihxk , <F7> - cew itl ,F6 - my itl yetig 
^SCR("P1PARMS","G",4,"LMAX")
18
^SCR("P1PARMS","G",4,"MUMPS1")

^SCR("P1PARMS","G",4,"MUMPS2")
D MHLK^P1PARTA
^SCR("P1PARMS","G",4,"SHEM")
 gelynl hixt xign 
^SCR("P1PARMS","G",4,"TYP")
E
^SCR("P1PARMS","G","DEL")

^SCR("P1PARMS","G","MAX")
99999
^SCR("P1PARMS","G","NAME","MH")
3
^SCR("P1PARMS","G","NAME","MHLK")
4
^SCR("P1PARMS","G","NAME","PAR")
1
^SCR("P1PARMS","G","NAME","PAR1")
2
^SCR("P1PARMS","G","NM",1)
PAR
^SCR("P1PARMS","G","NM",2)
PAR1
^SCR("P1PARMS","G","NM",3)
MH
^SCR("P1PARMS","G","NM",4)
MHLK
^SCR("P1PARMS","G","RB")
4,7,21,77
^SCR("P1PARMS","G","REF")
^TEMP($P,"TA"
^SCR("P1PARMS","G","RZD")
\
^SCR("P1PARMS","G","STEP")
1
^SCR("P1PARMS","G","STG")
         : gelynl hixt xign : libx xign :      hixt xe`z     : hixt cew :      
^SCR("P1PARMS","G","VG")
6
^SCR("P1PARMS","NAME")

^SCR("P1PARMSL")
H
^SCR("P1PARMSL",1)
                      # migelynl mihixt zeveaw zniyx #                         
^SCR("P1PARMSL",2)
                                                                               
^SCR("P1PARMSL",3)
                                                              1$               
^SCR("P1PARMSL",4)
                        :       dveaw xtqn     : dveaw cew :                   
^SCR("P1PARMSL",5)
                                                                               
^SCR("P1PARMSL",6)
                                                                               
^SCR("P1PARMSL",7)
                                                                               
^SCR("P1PARMSL",8)
                                                                               
^SCR("P1PARMSL",9)
                                                                               
^SCR("P1PARMSL",10)
                                                                               
^SCR("P1PARMSL",11)
                                                                               
^SCR("P1PARMSL",12)
                                                                               
^SCR("P1PARMSL",13)
                                                                               
^SCR("P1PARMSL",14)
                                                                               
^SCR("P1PARMSL",15)
                                                                               
^SCR("P1PARMSL",16)
                                                                               
^SCR("P1PARMSL",17)
                                                                               
^SCR("P1PARMSL",18)
                                                                               
^SCR("P1PARMSL",19)
                                                                               
^SCR("P1PARMSL",20)
                     $1                                                        
^SCR("P1PARMSL","A",1)
�‰‡…Œ™ŽŒ�‰ˆ‰˜”š…–…�—šŽ‰™˜
^SCR("P1PARMSL","A",2)

^SCR("P1PARMSL","A",3)

^SCR("P1PARMSL","A",4)
„–…�—˜”‘Ž„–…�—ƒ…—
^SCR("P1PARMSL","A",5)
---------------------------------
^SCR("P1PARMSL","A",6)

^SCR("P1PARMSL","A",7)

^SCR("P1PARMSL","A",8)

^SCR("P1PARMSL","A",9)

^SCR("P1PARMSL","A",10)

^SCR("P1PARMSL","A",11)

^SCR("P1PARMSL","A",12)

^SCR("P1PARMSL","A",13)

^SCR("P1PARMSL","A",14)

^SCR("P1PARMSL","A",15)

^SCR("P1PARMSL","A",16)

^SCR("P1PARMSL","A",17)

^SCR("P1PARMSL","A",18)

^SCR("P1PARMSL","A",19)

^SCR("P1PARMSL","A",20)

^SCR("P1PARMSL","AV",1)
ohjukankohyhrp,umuce,nhar
^SCR("P1PARMSL","AV",2)

^SCR("P1PARMSL","AV",3)

^SCR("P1PARMSL","AV",4)
vmucerpxnvmucesue
^SCR("P1PARMSL","AV",5)
---------------------------------
^SCR("P1PARMSL","AV",6)

^SCR("P1PARMSL","AV",7)

^SCR("P1PARMSL","AV",8)

^SCR("P1PARMSL","AV",9)

^SCR("P1PARMSL","AV",10)

^SCR("P1PARMSL","AV",11)

^SCR("P1PARMSL","AV",12)

^SCR("P1PARMSL","AV",13)

^SCR("P1PARMSL","AV",14)

^SCR("P1PARMSL","AV",15)

^SCR("P1PARMSL","AV",16)

^SCR("P1PARMSL","AV",17)

^SCR("P1PARMSL","AV",18)

^SCR("P1PARMSL","AV",19)

^SCR("P1PARMSL","AV",20)

^SCR("P1PARMSL","G",1,"CHECK")
Y
^SCR("P1PARMSL","G",1,"CRD")
5,59,E,8,0
^SCR("P1PARMSL","G",1,"CREAT")

^SCR("P1PARMSL","G",1,"FNC")

^SCR("P1PARMSL","G",1,"GLOB")
PARSUG
^SCR("P1PARMSL","G",1,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1PARMSL","G",1,"LMAX")
11
^SCR("P1PARMSL","G",1,"MUMPS1")

^SCR("P1PARMSL","G",1,"MUMPS2")
D BDIKA^P1PARTAW
^SCR("P1PARMSL","G",1,"MUST")

^SCR("P1PARMSL","G",1,"NLN")
20
^SCR("P1PARMSL","G",1,"NS")
JJ
^SCR("P1PARMSL","G",1,"RZD")
**
^SCR("P1PARMSL","G",1,"SHEM")
 dveaw cew 
^SCR("P1PARMSL","G",1,"TOPB")
8
^SCR("P1PARMSL","G",1,"TYP")
E
^SCR("P1PARMSL","G",1,"VRB")
KVZ1
^SCR("P1PARMSL","G",2,"CRD")
5,47,H,20,0
^SCR("P1PARMSL","G",2,"HELP")

^SCR("P1PARMSL","G",2,"LMAX")
22
^SCR("P1PARMSL","G",2,"MUMPS1")

^SCR("P1PARMSL","G",2,"MUMPS2")

^SCR("P1PARMSL","G",2,"OUTPUT")

^SCR("P1PARMSL","G",2,"SHEM")
       dveaw xtqn     
^SCR("P1PARMSL","G",2,"TYP")
H
^SCR("P1PARMSL","G","DEL")
Y
^SCR("P1PARMSL","G","MAX")
99999
^SCR("P1PARMSL","G","NAME","KVZ")
1
^SCR("P1PARMSL","G","NAME","KVZ1")
2
^SCR("P1PARMSL","G","NM",1)
KVZ
^SCR("P1PARMSL","G","NM",2)
KVZ1
^SCR("P1PARMSL","G","RB")
4,22,21,64
^SCR("P1PARMSL","G","REF")
^TEMP($P,"TAW"
^SCR("P1PARMSL","G","RZD")
\
^SCR("P1PARMSL","G","STEP")
1
^SCR("P1PARMSL","G","STG")
                        :       dveaw xtqn     : dveaw cew :                   
^SCR("P1PARMSL","G","VG")
6
^SCR("P1PARMSL","NAME")

^SCR("P1PARNL")
H
^SCR("P1PARNL",1)
              # zery itl mihixt zlirp #                                        
^SCR("P1PARNL",2)
                   {                      04} {03 : 'qn dlah                   
^SCR("P1PARNL",3)
                     {10  : dry cr {05   :   dryn sweza dlah                   
^SCR("P1PARNL",4)
                      {20 : mei cr   {15 : mein                                
^SCR("P1PARNL",5)
                                                           1$                  
^SCR("P1PARNL",6)
                   :         hixt xe`z       : hixt cew :                      
^SCR("P1PARNL",7)
                                                                               
^SCR("P1PARNL",8)
                                                                               
^SCR("P1PARNL",9)
                                                                               
^SCR("P1PARNL",10)
                                                                               
^SCR("P1PARNL",11)
                                                                               
^SCR("P1PARNL",12)
                                                                               
^SCR("P1PARNL",13)
                                                                               
^SCR("P1PARNL",14)
                                                                               
^SCR("P1PARNL",15)
                                                                               
^SCR("P1PARNL",16)
                                                                               
^SCR("P1PARNL",17)
                                                                               
^SCR("P1PARNL",18)
                                                                               
^SCR("P1PARNL",19)
                                                                               
^SCR("P1PARNL",20)
                                                                               
^SCR("P1PARNL",21)
                                                                               
^SCR("P1PARNL",22)
               $1                                                              
^SCR("P1PARNL","A",1)
š…’™‰”Œ�‰ˆ‰˜”šŒ‰’�
^SCR("P1PARNL","A",2)
:'‘Ž„Œ�ˆ
^SCR("P1PARNL","A",3)
:„’™ƒ’:„’™Ž“—…š�„Œ�ˆ
^SCR("P1PARNL","A",4)
:�…‰ƒ’:�…‰Ž
^SCR("P1PARNL","A",5)

^SCR("P1PARNL","A",6)
ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1PARNL","A",7)
-----------------------------------
^SCR("P1PARNL","A",8)

^SCR("P1PARNL","A",9)

^SCR("P1PARNL","A",10)

^SCR("P1PARNL","A",11)

^SCR("P1PARNL","A",12)

^SCR("P1PARNL","A",13)

^SCR("P1PARNL","A",14)

^SCR("P1PARNL","A",15)

^SCR("P1PARNL","A",16)

^SCR("P1PARNL","A",17)

^SCR("P1PARNL","A",18)

^SCR("P1PARNL","A",19)

^SCR("P1PARNL","A",20)

^SCR("P1PARNL","A",21)

^SCR("P1PARNL","A",22)

^SCR("P1PARNL","AV",1)
,ugahpkohyhrp,khgb
^SCR("P1PARNL","AV",2)
:wxnvkcy
^SCR("P1PARNL","AV",3)
:vgasg:vgan;eu,cvkcy
^SCR("P1PARNL","AV",4)
:ouhsg:ouhn
^SCR("P1PARNL","AV",5)

^SCR("P1PARNL","AV",6)
yhrprut,yhrpsue
^SCR("P1PARNL","AV",7)
-----------------------------------
^SCR("P1PARNL","AV",8)

^SCR("P1PARNL","AV",9)

^SCR("P1PARNL","AV",10)

^SCR("P1PARNL","AV",11)

^SCR("P1PARNL","AV",12)

^SCR("P1PARNL","AV",13)

^SCR("P1PARNL","AV",14)

^SCR("P1PARNL","AV",15)

^SCR("P1PARNL","AV",16)

^SCR("P1PARNL","AV",17)

^SCR("P1PARNL","AV",18)

^SCR("P1PARNL","AV",19)

^SCR("P1PARNL","AV",20)

^SCR("P1PARNL","AV",21)

^SCR("P1PARNL","AV",22)

^SCR("P1PARNL","G",1,"CHECK")
Y
^SCR("P1PARNL","G",1,"CRD")
7,56,E,10,0
^SCR("P1PARNL","G",1,"FNC")
F6,F7,F9
^SCR("P1PARNL","G",1,"GLOB")
PAR
^SCR("P1PARNL","G",1,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1PARNL","G",1,"LMAX")
10
^SCR("P1PARNL","G",1,"MUMPS1")

^SCR("P1PARNL","G",1,"MUMPS2")
D PAR^P1PARNL
^SCR("P1PARNL","G",1,"NLN")
20
^SCR("P1PARNL","G",1,"RZD")
**
^SCR("P1PARNL","G",1,"SHEM")
 hixt cew 
^SCR("P1PARNL","G",1,"TOPB")
8
^SCR("P1PARNL","G",1,"TYP")
E
^SCR("P1PARNL","G",1,"VRB")
PAR1
^SCR("P1PARNL","G",2,"CRD")
7,45,H,20,0
^SCR("P1PARNL","G",2,"HELP")

^SCR("P1PARNL","G",2,"LMAX")
25
^SCR("P1PARNL","G",2,"MUMPS1")

^SCR("P1PARNL","G",2,"MUMPS2")

^SCR("P1PARNL","G",2,"OUTPUT")

^SCR("P1PARNL","G",2,"SHEM")
         hixt xe`z       
^SCR("P1PARNL","G",2,"TYP")
H
^SCR("P1PARNL","G","DEL")

^SCR("P1PARNL","G","MAX")
99999
^SCR("P1PARNL","G","NAME","PAR")
1
^SCR("P1PARNL","G","NAME","PAR1")
2
^SCR("P1PARNL","G","NM",1)
PAR
^SCR("P1PARNL","G","NM",2)
PAR1
^SCR("P1PARNL","G","RB")
6,16,23,61
^SCR("P1PARNL","G","REF")
^TEMP($P,"S"
^SCR("P1PARNL","G","RZD")
\
^SCR("P1PARNL","G","STEP")
1
^SCR("P1PARNL","G","STG")
                   :         hixt xe`z       : hixt cew :                      
^SCR("P1PARNL","G","VG")
8
^SCR("P1PARNL","NAME")

^SCR("P1PARNL","P",3,"CRD")
2,46,N,3,0
^SCR("P1PARNL","P",3,"FNC")

^SCR("P1PARNL","P",3,"GLOB")
PARNL
^SCR("P1PARNL","P",3,"HELP")
<F7> - ze`lah zbvd 
^SCR("P1PARNL","P",3,"LMAX")
4
^SCR("P1PARNL","P",3,"MUMPS1")

^SCR("P1PARNL","P",3,"MUMPS2")
D NMH^P1PARNL
^SCR("P1PARNL","P",3,"MUST")

^SCR("P1PARNL","P",3,"NLN")
20
^SCR("P1PARNL","P",3,"RZD")
\
^SCR("P1PARNL","P",3,"TOPB")
8
^SCR("P1PARNL","P",3,"TYP")
N
^SCR("P1PARNL","P",3,"VRB")
NMH1
^SCR("P1PARNL","P",4,"CRD")
2,45,H,25
^SCR("P1PARNL","P",4,"HELP")

^SCR("P1PARNL","P",4,"LMAX")
25
^SCR("P1PARNL","P",4,"MUMPS1")

^SCR("P1PARNL","P",4,"MUMPS2")

^SCR("P1PARNL","P",4,"TYP")
H
^SCR("P1PARNL","P",5,"CRD")
3,35,T,5,0
^SCR("P1PARNL","P",5,"HELP")
<F8> - zeniiw ze`lah bivdl
^SCR("P1PARNL","P",5,"LMAX")
6
^SCR("P1PARNL","P",5,"MUMPS1")

^SCR("P1PARNL","P",5,"MUMPS2")

^SCR("P1PARNL","P",5,"MUST")

^SCR("P1PARNL","P",5,"TYP")
T
^SCR("P1PARNL","P",10,"CRD")
3,21,T,5,0
^SCR("P1PARNL","P",10,"HELP")

^SCR("P1PARNL","P",10,"LMAX")
5
^SCR("P1PARNL","P",10,"MUMPS1")

^SCR("P1PARNL","P",10,"MUMPS2")

^SCR("P1PARNL","P",10,"TYP")
T
^SCR("P1PARNL","P",15,"CRD")
4,37,N,1,0
^SCR("P1PARNL","P",15,"HELP")
7 - y ,6- e ,5 - d ,4 - c , 3 - b ,2 - a ,1 - `
^SCR("P1PARNL","P",15,"LMAX")
4
^SCR("P1PARNL","P",15,"MUMPS1")

^SCR("P1PARNL","P",15,"MUMPS2")
I MEJOM<1!(MEJOM>7) S %SC("ER")=1
^SCR("P1PARNL","P",15,"TYP")
N
^SCR("P1PARNL","P",20,"CRD")
4,22,N,1,0
^SCR("P1PARNL","P",20,"HELP")
7 - y ,6- e ,5 - d ,4 - c , 3 - b ,2 - a ,1 - `
^SCR("P1PARNL","P",20,"LMAX")
4
^SCR("P1PARNL","P",20,"MUMPS1")

^SCR("P1PARNL","P",20,"MUMPS2")
D ADJOM^P1PARNL
^SCR("P1PARNL","P",20,"TYP")
N
^SCR("P1PARNL","P","NAME","ADJOM")
20
^SCR("P1PARNL","P","NAME","ADSHA")
10
^SCR("P1PARNL","P","NAME","MEJOM")
15
^SCR("P1PARNL","P","NAME","MESHA")
5
^SCR("P1PARNL","P","NAME","NMH")
3
^SCR("P1PARNL","P","NAME","NMH1")
4
^SCR("P1PARNL","P","NM",3)
NMH
^SCR("P1PARNL","P","NM",4)
NMH1
^SCR("P1PARNL","P","NM",5)
MESHA
^SCR("P1PARNL","P","NM",10)
ADSHA
^SCR("P1PARNL","P","NM",15)
MEJOM
^SCR("P1PARNL","P","NM",20)
ADJOM
^SCR("P1PARPOS")
H
^SCR("P1PARPOS",1)
                           # dcnr 'qn itl mihixt hixtz #                       
^SCR("P1PARPOS",2)
                                                                             1$
^SCR("P1PARPOS",3)
  :dcnr:dcnr:dcnr:dcnr:dcnr:dcnr:dcnr: xign :       hixt xe`z      :hixt cew:  
^SCR("P1PARPOS",4)
                                                                               
^SCR("P1PARPOS",5)
                                                                               
^SCR("P1PARPOS",6)
                                                                               
^SCR("P1PARPOS",7)
                                                                               
^SCR("P1PARPOS",8)
                                                                               
^SCR("P1PARPOS",9)
                                                                               
^SCR("P1PARPOS",10)
                                                                               
^SCR("P1PARPOS",11)
                                                                               
^SCR("P1PARPOS",12)
                                                                               
^SCR("P1PARPOS",13)
                                                                               
^SCR("P1PARPOS",14)
                                                                               
^SCR("P1PARPOS",15)
                                                                               
^SCR("P1PARPOS",16)
                                                                               
^SCR("P1PARPOS",17)
                                                                               
^SCR("P1PARPOS",18)
                                                                               
^SCR("P1PARPOS",19)
                                                                               
^SCR("P1PARPOS",20)
                                                                               
^SCR("P1PARPOS",21)
                                                                               
^SCR("P1PARPOS",22)
 $1                                                                            
^SCR("P1PARPOS","A",1)
„ƒŽ’'‘Ž‰”Œ�‰ˆ‰˜”ˆ‰˜”š
^SCR("P1PARPOS","A",2)

^SCR("P1PARPOS","A",3)
„ƒŽ’„ƒŽ’„ƒŽ’„ƒŽ’„ƒŽ’„ƒŽ’„ƒŽ’˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1PARPOS","A",4)
------------------------------------------------------------------
^SCR("P1PARPOS","A",5)

^SCR("P1PARPOS","A",6)

^SCR("P1PARPOS","A",7)

^SCR("P1PARPOS","A",8)

^SCR("P1PARPOS","A",9)

^SCR("P1PARPOS","A",10)

^SCR("P1PARPOS","A",11)

^SCR("P1PARPOS","A",12)

^SCR("P1PARPOS","A",13)

^SCR("P1PARPOS","A",14)

^SCR("P1PARPOS","A",15)

^SCR("P1PARPOS","A",16)

^SCR("P1PARPOS","A",17)

^SCR("P1PARPOS","A",18)

^SCR("P1PARPOS","A",19)

^SCR("P1PARPOS","A",20)

^SCR("P1PARPOS","A",21)

^SCR("P1PARPOS","A",22)

^SCR("P1PARPOS","AV",1)
vsngwxnhpkohyhrpyhrp,
^SCR("P1PARPOS","AV",2)

^SCR("P1PARPOS","AV",3)
vsngvsngvsngvsngvsngvsngvsngrhjnyhrprut,yhrpsue
^SCR("P1PARPOS","AV",4)
------------------------------------------------------------------
^SCR("P1PARPOS","AV",5)

^SCR("P1PARPOS","AV",6)

^SCR("P1PARPOS","AV",7)

^SCR("P1PARPOS","AV",8)

^SCR("P1PARPOS","AV",9)

^SCR("P1PARPOS","AV",10)

^SCR("P1PARPOS","AV",11)

^SCR("P1PARPOS","AV",12)

^SCR("P1PARPOS","AV",13)

^SCR("P1PARPOS","AV",14)

^SCR("P1PARPOS","AV",15)

^SCR("P1PARPOS","AV",16)

^SCR("P1PARPOS","AV",17)

^SCR("P1PARPOS","AV",18)

^SCR("P1PARPOS","AV",19)

^SCR("P1PARPOS","AV",20)

^SCR("P1PARPOS","AV",21)

^SCR("P1PARPOS","AV",22)

^SCR("P1PARPOS","G",1,"CRD")
4,76,E,8,0
^SCR("P1PARPOS","G",1,"HELP")

^SCR("P1PARPOS","G",1,"LMAX")
8
^SCR("P1PARPOS","G",1,"MUMPS1")

^SCR("P1PARPOS","G",1,"MUMPS2")

^SCR("P1PARPOS","G",1,"OUTPUT")

^SCR("P1PARPOS","G",1,"SHEM")
hixt cew
^SCR("P1PARPOS","G",1,"TYP")
E
^SCR("P1PARPOS","G",2,"CRD")
4,67,H,22,0
^SCR("P1PARPOS","G",2,"HELP")

^SCR("P1PARPOS","G",2,"LMAX")
22
^SCR("P1PARPOS","G",2,"MUMPS1")

^SCR("P1PARPOS","G",2,"MUMPS2")

^SCR("P1PARPOS","G",2,"OUTPUT")

^SCR("P1PARPOS","G",2,"SHEM")
       hixt xe`z      
^SCR("P1PARPOS","G",2,"TYP")
H
^SCR("P1PARPOS","G",3,"CRD")
4,44,N,6,2
^SCR("P1PARPOS","G",3,"HELP")

^SCR("P1PARPOS","G",3,"LMAX")
6
^SCR("P1PARPOS","G",3,"MUMPS1")

^SCR("P1PARPOS","G",3,"MUMPS2")

^SCR("P1PARPOS","G",3,"OUTPUT")

^SCR("P1PARPOS","G",3,"SHEM")
 xign 
^SCR("P1PARPOS","G",3,"TYP")
N
^SCR("P1PARPOS","G",4,"CRD")
4,37,E,2,0
^SCR("P1PARPOS","G",4,"HELP")

^SCR("P1PARPOS","G",4,"LMAX")
4
^SCR("P1PARPOS","G",4,"MUMPS1")

^SCR("P1PARPOS","G",4,"MUMPS2")

^SCR("P1PARPOS","G",4,"SHEM")
dcnr
^SCR("P1PARPOS","G",4,"TYP")
E
^SCR("P1PARPOS","G",5,"CRD")
4,32,E,2,0
^SCR("P1PARPOS","G",5,"HELP")

^SCR("P1PARPOS","G",5,"LMAX")
4
^SCR("P1PARPOS","G",5,"MUMPS1")

^SCR("P1PARPOS","G",5,"MUMPS2")

^SCR("P1PARPOS","G",5,"SHEM")
dcnr
^SCR("P1PARPOS","G",5,"TYP")
E
^SCR("P1PARPOS","G",6,"CRD")
4,27,E,2,0
^SCR("P1PARPOS","G",6,"HELP")

^SCR("P1PARPOS","G",6,"LMAX")
4
^SCR("P1PARPOS","G",6,"MUMPS1")

^SCR("P1PARPOS","G",6,"MUMPS2")

^SCR("P1PARPOS","G",6,"SHEM")
dcnr
^SCR("P1PARPOS","G",6,"TYP")
E
^SCR("P1PARPOS","G",7,"CRD")
4,22,E,2,0
^SCR("P1PARPOS","G",7,"HELP")

^SCR("P1PARPOS","G",7,"LMAX")
4
^SCR("P1PARPOS","G",7,"MUMPS1")

^SCR("P1PARPOS","G",7,"MUMPS2")

^SCR("P1PARPOS","G",7,"SHEM")
dcnr
^SCR("P1PARPOS","G",7,"TYP")
E
^SCR("P1PARPOS","G",8,"CRD")
4,17,E,2,0
^SCR("P1PARPOS","G",8,"HELP")

^SCR("P1PARPOS","G",8,"LMAX")
4
^SCR("P1PARPOS","G",8,"MUMPS1")

^SCR("P1PARPOS","G",8,"MUMPS2")

^SCR("P1PARPOS","G",8,"SHEM")
dcnr
^SCR("P1PARPOS","G",8,"TYP")
E
^SCR("P1PARPOS","G",9,"CRD")
4,12,E,2,0
^SCR("P1PARPOS","G",9,"HELP")

^SCR("P1PARPOS","G",9,"LMAX")
4
^SCR("P1PARPOS","G",9,"MUMPS1")

^SCR("P1PARPOS","G",9,"MUMPS2")

^SCR("P1PARPOS","G",9,"SHEM")
dcnr
^SCR("P1PARPOS","G",9,"TYP")
E
^SCR("P1PARPOS","G",10,"CRD")
4,7,E,2,0
^SCR("P1PARPOS","G",10,"HELP")

^SCR("P1PARPOS","G",10,"LMAX")
4
^SCR("P1PARPOS","G",10,"MUMPS1")

^SCR("P1PARPOS","G",10,"MUMPS2")

^SCR("P1PARPOS","G",10,"SHEM")
dcnr
^SCR("P1PARPOS","G",10,"TYP")
E
^SCR("P1PARPOS","G","DEL")

^SCR("P1PARPOS","G","MAX")
99999
^SCR("P1PARPOS","G","NAME","CODP")
1
^SCR("P1PARPOS","G","NAME","CODP1")
2
^SCR("P1PARPOS","G","NAME","MH")
3
^SCR("P1PARPOS","G","NAME","POS1")
4
^SCR("P1PARPOS","G","NAME","POS2")
5
^SCR("P1PARPOS","G","NAME","POS3")
6
^SCR("P1PARPOS","G","NAME","POS4")
7
^SCR("P1PARPOS","G","NAME","POS5")
8
^SCR("P1PARPOS","G","NAME","POS6")
9
^SCR("P1PARPOS","G","NAME","POS7")
10
^SCR("P1PARPOS","G","NM",1)
CODP
^SCR("P1PARPOS","G","NM",2)
CODP1
^SCR("P1PARPOS","G","NM",3)
MH
^SCR("P1PARPOS","G","NM",4)
POS1
^SCR("P1PARPOS","G","NM",5)
POS2
^SCR("P1PARPOS","G","NM",6)
POS3
^SCR("P1PARPOS","G","NM",7)
POS4
^SCR("P1PARPOS","G","NM",8)
POS5
^SCR("P1PARPOS","G","NM",9)
POS6
^SCR("P1PARPOS","G","NM",10)
POS7
^SCR("P1PARPOS","G","RB")
3,2,23,79
^SCR("P1PARPOS","G","REF")
^TEMP($P
^SCR("P1PARPOS","G","RZD")
\
^SCR("P1PARPOS","G","STEP")
1
^SCR("P1PARPOS","G","STG")
  :dcnr:dcnr:dcnr:dcnr:dcnr:dcnr:dcnr: xign :       hixt xe`z      :hixt cew:  
^SCR("P1PARPOS","G","VG")
5
^SCR("P1PARPOS","NAME")
dcnrl mihixt zniyx
^SCR("P1PARSHA")
H
^SCR("P1PARSHA",1)
          #zepnfd zlaw zery itl oexign#                                        
^SCR("P1PARSHA",2)
                 {                      04} {03 : 'qn oexign                   
^SCR("P1PARSHA",3)
                     {10  : dry cr {05   : dryn sweza oexign                   
^SCR("P1PARSHA",4)
                      {20 : mei cr   {15 : mein                                
^SCR("P1PARSHA",5)
                                                                      1$       
^SCR("P1PARSHA",6)
        : dry itl xign : libx xign :      hixt xe`z     : hixt cew :           
^SCR("P1PARSHA",7)
                                                                               
^SCR("P1PARSHA",8)
                                                                               
^SCR("P1PARSHA",9)
                                                                               
^SCR("P1PARSHA",10)
                                                                               
^SCR("P1PARSHA",11)
                                                                               
^SCR("P1PARSHA",12)
                                                                               
^SCR("P1PARSHA",13)
                                                                               
^SCR("P1PARSHA",14)
                                                                               
^SCR("P1PARSHA",15)
                                                                               
^SCR("P1PARSHA",16)
                                                                               
^SCR("P1PARSHA",17)
                                                                               
^SCR("P1PARSHA",18)
                                                                               
^SCR("P1PARSHA",19)
                                                                               
^SCR("P1PARSHA",20)
                                                                               
^SCR("P1PARSHA",21)
                                                                               
^SCR("P1PARSHA",22)
     $1                                                                        
^SCR("P1PARSHA","A",1)
š…�Ž†„šŒ�—š…’™‰”Œ�…˜‰‡Ž
^SCR("P1PARSHA","A",2)
:'‘Ž�…˜‰‡Ž
^SCR("P1PARSHA","A",3)
:„’™ƒ’:„’™Ž“—…š��…˜‰‡Ž
^SCR("P1PARSHA","A",4)
:�…‰ƒ’:�…‰Ž
^SCR("P1PARSHA","A",5)

^SCR("P1PARSHA","A",6)
„’™‰”Œ˜‰‡ŽŒ‰‚˜˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1PARSHA","A",7)
-------------------------------------------------------
^SCR("P1PARSHA","A",8)

^SCR("P1PARSHA","A",9)

^SCR("P1PARSHA","A",10)

^SCR("P1PARSHA","A",11)

^SCR("P1PARSHA","A",12)

^SCR("P1PARSHA","A",13)

^SCR("P1PARSHA","A",14)

^SCR("P1PARSHA","A",15)

^SCR("P1PARSHA","A",16)

^SCR("P1PARSHA","A",17)

^SCR("P1PARSHA","A",18)

^SCR("P1PARSHA","A",19)

^SCR("P1PARSHA","A",20)

^SCR("P1PARSHA","A",21)

^SCR("P1PARSHA","A",22)

^SCR("P1PARSHA","AV",1)
,ubnzv,kce,ugahpkiurhjn
^SCR("P1PARSHA","AV",2)
:wxniurhjn
^SCR("P1PARSHA","AV",3)
:vgasg:vgan;eu,ciurhjn
^SCR("P1PARSHA","AV",4)
:ouhsg:ouhn
^SCR("P1PARSHA","AV",5)

^SCR("P1PARSHA","AV",6)
vgahpkrhjnkhdrrhjnyhrprut,yhrpsue
^SCR("P1PARSHA","AV",7)
-------------------------------------------------------
^SCR("P1PARSHA","AV",8)

^SCR("P1PARSHA","AV",9)

^SCR("P1PARSHA","AV",10)

^SCR("P1PARSHA","AV",11)

^SCR("P1PARSHA","AV",12)

^SCR("P1PARSHA","AV",13)

^SCR("P1PARSHA","AV",14)

^SCR("P1PARSHA","AV",15)

^SCR("P1PARSHA","AV",16)

^SCR("P1PARSHA","AV",17)

^SCR("P1PARSHA","AV",18)

^SCR("P1PARSHA","AV",19)

^SCR("P1PARSHA","AV",20)

^SCR("P1PARSHA","AV",21)

^SCR("P1PARSHA","AV",22)

^SCR("P1PARSHA","G",1,"CHECK")
Y
^SCR("P1PARSHA","G",1,"CRD")
7,67,E,10,0
^SCR("P1PARSHA","G",1,"CREAT")

^SCR("P1PARSHA","G",1,"FNC")
F6,F7
^SCR("P1PARSHA","G",1,"GLOB")
PAR
^SCR("P1PARSHA","G",1,"HELP")

^SCR("P1PARSHA","G",1,"LMAX")
10
^SCR("P1PARSHA","G",1,"MUMPS1")
D PAR0^P1PARSHA
^SCR("P1PARSHA","G",1,"MUMPS2")
D PAR^P1PARSHA
^SCR("P1PARSHA","G",1,"NLN")
20
^SCR("P1PARSHA","G",1,"NS")
i
^SCR("P1PARSHA","G",1,"RZD")
**
^SCR("P1PARSHA","G",1,"SHEM")
 hixt cew 
^SCR("P1PARSHA","G",1,"TOPB")
8
^SCR("P1PARSHA","G",1,"TYP")
E
^SCR("P1PARSHA","G",1,"VRB")
PAR1
^SCR("P1PARSHA","G",2,"CRD")
7,56,H,20,0
^SCR("P1PARSHA","G",2,"HELP")

^SCR("P1PARSHA","G",2,"LMAX")
20
^SCR("P1PARSHA","G",2,"MUMPS1")

^SCR("P1PARSHA","G",2,"MUMPS2")

^SCR("P1PARSHA","G",2,"OUTPUT")

^SCR("P1PARSHA","G",2,"SHEM")
      hixt xe`z     
^SCR("P1PARSHA","G",2,"TYP")
H
^SCR("P1PARSHA","G",3,"CRD")
7,35,N,8,2
^SCR("P1PARSHA","G",3,"HELP")

^SCR("P1PARSHA","G",3,"LMAX")
11
^SCR("P1PARSHA","G",3,"MUMPS1")

^SCR("P1PARSHA","G",3,"MUMPS2")

^SCR("P1PARSHA","G",3,"OUTPUT")

^SCR("P1PARSHA","G",3,"SHEM")
 libx xign 
^SCR("P1PARSHA","G",3,"TYP")
N
^SCR("P1PARSHA","G",4,"CRD")
7,23,E,8,0
^SCR("P1PARSHA","G",4,"HELP")
<F9> - hixt qihxk , <F7> - cew itl ,F6 - my itl yetig 
^SCR("P1PARSHA","G",4,"LMAX")
14
^SCR("P1PARSHA","G",4,"MUMPS1")

^SCR("P1PARSHA","G",4,"MUMPS2")
D MHSH^P1PARSHA   
^SCR("P1PARSHA","G",4,"SHEM")
 dry itl xign 
^SCR("P1PARSHA","G",4,"TYP")
E
^SCR("P1PARSHA","G","DEL")

^SCR("P1PARSHA","G","MAX")
99999
^SCR("P1PARSHA","G","NAME","MH")
3
^SCR("P1PARSHA","G","NAME","MHSH")
4
^SCR("P1PARSHA","G","NAME","PAR")
1
^SCR("P1PARSHA","G","NAME","PAR1")
2
^SCR("P1PARSHA","G","NM",1)
PAR
^SCR("P1PARSHA","G","NM",2)
PAR1
^SCR("P1PARSHA","G","NM",3)
MH
^SCR("P1PARSHA","G","NM",4)
MHSH
^SCR("P1PARSHA","G","RB")
6,6,23,72
^SCR("P1PARSHA","G","REF")
^TEMP($P,"S"
^SCR("P1PARSHA","G","RZD")
\
^SCR("P1PARSHA","G","STEP")
1
^SCR("P1PARSHA","G","STG")
        : dry itl xign : libx xign :      hixt xe`z     : hixt cew :           
^SCR("P1PARSHA","G","VG")
8
^SCR("P1PARSHA","NAME")

^SCR("P1PARSHA","P",3,"CRD")
2,44,N,3,0
^SCR("P1PARSHA","P",3,"FNC")

^SCR("P1PARSHA","P",3,"GLOB")
PARSHA
^SCR("P1PARSHA","P",3,"HELP")
<F7> - mipexign zbvd 
^SCR("P1PARSHA","P",3,"LMAX")
4
^SCR("P1PARSHA","P",3,"MUMPS1")

^SCR("P1PARSHA","P",3,"MUMPS2")
D NMH^P1PARSHA
^SCR("P1PARSHA","P",3,"MUST")

^SCR("P1PARSHA","P",3,"NLN")
20
^SCR("P1PARSHA","P",3,"RZD")
\
^SCR("P1PARSHA","P",3,"TOPB")
8
^SCR("P1PARSHA","P",3,"TYP")
N
^SCR("P1PARSHA","P",4,"CRD")
2,43,H,25
^SCR("P1PARSHA","P",4,"HELP")

^SCR("P1PARSHA","P",4,"LMAX")
25
^SCR("P1PARSHA","P",4,"MUMPS1")

^SCR("P1PARSHA","P",4,"MUMPS2")

^SCR("P1PARSHA","P",4,"TYP")
H
^SCR("P1PARSHA","P",5,"CRD")
3,35,T,5,0
^SCR("P1PARSHA","P",5,"HELP")
<F8> - miniiw mipexign bivdl
^SCR("P1PARSHA","P",5,"LMAX")
6
^SCR("P1PARSHA","P",5,"MUMPS1")

^SCR("P1PARSHA","P",5,"MUMPS2")

^SCR("P1PARSHA","P",5,"MUST")

^SCR("P1PARSHA","P",5,"TYP")
T
^SCR("P1PARSHA","P",10,"CRD")
3,21,T,5,0
^SCR("P1PARSHA","P",10,"HELP")

^SCR("P1PARSHA","P",10,"LMAX")
5
^SCR("P1PARSHA","P",10,"MUMPS1")

^SCR("P1PARSHA","P",10,"MUMPS2")

^SCR("P1PARSHA","P",10,"TYP")
T
^SCR("P1PARSHA","P",15,"CRD")
4,37,N,1,0
^SCR("P1PARSHA","P",15,"HELP")
7 - y ,6- e ,5 - d ,4 - c , 3 - b ,2 - a ,1 - `
^SCR("P1PARSHA","P",15,"LMAX")
4
^SCR("P1PARSHA","P",15,"MUMPS1")

^SCR("P1PARSHA","P",15,"MUMPS2")
I MEJOM<1!(MEJOM>7) S %SC("ER")=1
^SCR("P1PARSHA","P",15,"TYP")
N
^SCR("P1PARSHA","P",20,"CRD")
4,22,N,1,0
^SCR("P1PARSHA","P",20,"HELP")
7 - y ,6- e ,5 - d ,4 - c , 3 - b ,2 - a ,1 - `
^SCR("P1PARSHA","P",20,"LMAX")
4
^SCR("P1PARSHA","P",20,"MUMPS1")

^SCR("P1PARSHA","P",20,"MUMPS2")
D ADJOM^P1PARSHA
^SCR("P1PARSHA","P",20,"TYP")
N
^SCR("P1PARSHA","P","NAME","ADJOM")
20
^SCR("P1PARSHA","P","NAME","ADSHA")
10
^SCR("P1PARSHA","P","NAME","MEJOM")
15
^SCR("P1PARSHA","P","NAME","MESHA")
5
^SCR("P1PARSHA","P","NAME","NMH")
3
^SCR("P1PARSHA","P","NAME","NMH1")
4
^SCR("P1PARSHA","P","NM",3)
NMH
^SCR("P1PARSHA","P","NM",4)
NMH1
^SCR("P1PARSHA","P","NM",5)
MESHA
^SCR("P1PARSHA","P","NM",10)
ADSHA
^SCR("P1PARSHA","P","NM",15)
MEJOM
^SCR("P1PARSHA","P","NM",20)
ADJOM
^SCR("P1PARSID")
H
^SCR("P1PARSID",1)
                               # dbvda mihixt xeciq #                          
^SCR("P1PARSID",2)
                                                                               
^SCR("P1PARSID",3)
                  {                         06} {05   }: dveaw cew             
^SCR("P1PARSID",4)
                                                                               
^SCR("P1PARSID",5)
                                                                      1$       
^SCR("P1PARSID",6)
                           :          ihixt xe`z        : hixt cew :           
^SCR("P1PARSID",7)
                                                                               
^SCR("P1PARSID",8)
                                                                               
^SCR("P1PARSID",9)
                                                                               
^SCR("P1PARSID",10)
                                                                               
^SCR("P1PARSID",11)
                                                                               
^SCR("P1PARSID",12)
                                                                               
^SCR("P1PARSID",13)
                                                                               
^SCR("P1PARSID",14)
                                                                               
^SCR("P1PARSID",15)
                                                                               
^SCR("P1PARSID",16)
                                                                               
^SCR("P1PARSID",17)
                                                                               
^SCR("P1PARSID",18)
                                                                               
^SCR("P1PARSID",19)
                                                                               
^SCR("P1PARSID",20)
                                                                               
^SCR("P1PARSID",21)
                                                                               
^SCR("P1PARSID",22)
                          $1                                                   
^SCR("P1PARSID","A",1)
„‚–„��‰ˆ‰˜”˜…ƒ‰‘
^SCR("P1PARSID","A",2)

^SCR("P1PARSID","A",3)
:„–…�—ƒ…—
^SCR("P1PARSID","A",4)

^SCR("P1PARSID","A",5)

^SCR("P1PARSID","A",6)
‰ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1PARSID","A",7)
--------------------------------------
^SCR("P1PARSID","A",8)

^SCR("P1PARSID","A",9)

^SCR("P1PARSID","A",10)

^SCR("P1PARSID","A",11)

^SCR("P1PARSID","A",12)

^SCR("P1PARSID","A",13)

^SCR("P1PARSID","A",14)

^SCR("P1PARSID","A",15)

^SCR("P1PARSID","A",16)

^SCR("P1PARSID","A",17)

^SCR("P1PARSID","A",18)

^SCR("P1PARSID","A",19)

^SCR("P1PARSID","A",20)

^SCR("P1PARSID","A",21)

^SCR("P1PARSID","A",22)

^SCR("P1PARSID","AV",1)
vdmvcohyhrprushx
^SCR("P1PARSID","AV",2)

^SCR("P1PARSID","AV",3)
:vmucesue
^SCR("P1PARSID","AV",4)

^SCR("P1PARSID","AV",5)

^SCR("P1PARSID","AV",6)
hyhrprut,yhrpsue
^SCR("P1PARSID","AV",7)
--------------------------------------
^SCR("P1PARSID","AV",8)

^SCR("P1PARSID","AV",9)

^SCR("P1PARSID","AV",10)

^SCR("P1PARSID","AV",11)

^SCR("P1PARSID","AV",12)

^SCR("P1PARSID","AV",13)

^SCR("P1PARSID","AV",14)

^SCR("P1PARSID","AV",15)

^SCR("P1PARSID","AV",16)

^SCR("P1PARSID","AV",17)

^SCR("P1PARSID","AV",18)

^SCR("P1PARSID","AV",19)

^SCR("P1PARSID","AV",20)

^SCR("P1PARSID","AV",21)

^SCR("P1PARSID","AV",22)

^SCR("P1PARSID","G",1,"CRD")
7,67,E,8,0
^SCR("P1PARSID","G",1,"FNC")

^SCR("P1PARSID","G",1,"GLOB")
PAR
^SCR("P1PARSID","G",1,"HELP")

^SCR("P1PARSID","G",1,"LMAX")
10
^SCR("P1PARSID","G",1,"MUMPS1")

^SCR("P1PARSID","G",1,"MUMPS2")
I PAR'=%MOLD S %SC("ER")=1
^SCR("P1PARSID","G",1,"NLN")
20
^SCR("P1PARSID","G",1,"RZD")
\
^SCR("P1PARSID","G",1,"SHEM")
 hixt cew 
^SCR("P1PARSID","G",1,"TOPB")
8
^SCR("P1PARSID","G",1,"TYP")
E
^SCR("P1PARSID","G",1,"VRB")
PAR1
^SCR("P1PARSID","G",2,"CRD")
7,56,H,22,0
^SCR("P1PARSID","G",2,"HELP")

^SCR("P1PARSID","G",2,"LMAX")
28
^SCR("P1PARSID","G",2,"MUMPS1")

^SCR("P1PARSID","G",2,"MUMPS2")

^SCR("P1PARSID","G",2,"OUTPUT")

^SCR("P1PARSID","G",2,"SHEM")
          ihixt xe`z        
^SCR("P1PARSID","G",2,"TYP")
H
^SCR("P1PARSID","G","DEL")

^SCR("P1PARSID","G","MAX")
9999
^SCR("P1PARSID","G","NAME","PAR")
1
^SCR("P1PARSID","G","NAME","PAR1")
2
^SCR("P1PARSID","G","NM",1)
PAR
^SCR("P1PARSID","G","NM",2)
PAR1
^SCR("P1PARSID","G","RB")
6,27,23,72
^SCR("P1PARSID","G","REF")
^TEMP($P
^SCR("P1PARSID","G","RZD")
\
^SCR("P1PARSID","G","STEP")
1
^SCR("P1PARSID","G","STG")
                           :          ihixt xe`z        : hixt cew :           
^SCR("P1PARSID","G","VG")
8
^SCR("P1PARSID","NAME")

^SCR("P1PARSID","P",5,"CHECK")
Y
^SCR("P1PARSID","P",5,"CRD")
3,48,E,6,0
^SCR("P1PARSID","P",5,"CREAT")

^SCR("P1PARSID","P",5,"FNC")

^SCR("P1PARSID","P",5,"GLOB")
PARSUG
^SCR("P1PARSID","P",5,"HELP")

^SCR("P1PARSID","P",5,"LMAX")
6
^SCR("P1PARSID","P",5,"MUMPS1")

^SCR("P1PARSID","P",5,"MUMPS2")
D GET^P1PARSID
^SCR("P1PARSID","P",5,"NLN")
20
^SCR("P1PARSID","P",5,"NS")
YYY
^SCR("P1PARSID","P",5,"RZD")
\
^SCR("P1PARSID","P",5,"TOPB")
8
^SCR("P1PARSID","P",5,"TYP")
E
^SCR("P1PARSID","P",5,"VRB")
KVZ1
^SCR("P1PARSID","P",6,"CRD")
3,47,H,28,0
^SCR("P1PARSID","P",6,"HELP")

^SCR("P1PARSID","P",6,"LMAX")
28
^SCR("P1PARSID","P",6,"MUMPS1")

^SCR("P1PARSID","P",6,"MUMPS2")

^SCR("P1PARSID","P",6,"OUTPUT")

^SCR("P1PARSID","P",6,"TYP")
H
^SCR("P1PARSID","P","NAME","KVZ")
5
^SCR("P1PARSID","P","NAME","KVZ1")
6
^SCR("P1PARSID","P","NM",5)
KVZ
^SCR("P1PARSID","P","NM",6)
KVZ1
^SCR("P1PARSLK")
H
^SCR("P1PARSLK",1)
                   # zegewl zveaw itl oexign #                                 
^SCR("P1PARSLK",2)
                                                                               
^SCR("P1PARSLK",3)
                {                        06} {05   }: zegewl zveaw             
^SCR("P1PARSLK",4)
                                                                      1$       
^SCR("P1PARSLK",5)
          : gewll xign : libx xign :      hixt xe`z     : hixt cew :           
^SCR("P1PARSLK",6)
                                                                               
^SCR("P1PARSLK",7)
                                                                               
^SCR("P1PARSLK",8)
                                                                               
^SCR("P1PARSLK",9)
                                                                               
^SCR("P1PARSLK",10)
                                                                               
^SCR("P1PARSLK",11)
                                                                               
^SCR("P1PARSLK",12)
                                                                               
^SCR("P1PARSLK",13)
                                                                               
^SCR("P1PARSLK",14)
                                                                               
^SCR("P1PARSLK",15)
                                                                               
^SCR("P1PARSLK",16)
                                                                               
^SCR("P1PARSLK",17)
                                                                               
^SCR("P1PARSLK",18)
                                                                               
^SCR("P1PARSLK",19)
                                                                               
^SCR("P1PARSLK",20)
                                                                               
^SCR("P1PARSLK",21)
      $1                                                                       
^SCR("P1PARSLK","A",1)
š…‡…—Œš–…�—‰”Œ�…˜‰‡Ž
^SCR("P1PARSLK","A",2)

^SCR("P1PARSLK","A",3)
:š…‡…—Œš–…�—
^SCR("P1PARSLK","A",4)

^SCR("P1PARSLK","A",5)
‡…—ŒŒ˜‰‡ŽŒ‰‚˜˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1PARSLK","A",6)
-----------------------------------------------------
^SCR("P1PARSLK","A",7)

^SCR("P1PARSLK","A",8)

^SCR("P1PARSLK","A",9)

^SCR("P1PARSLK","A",10)

^SCR("P1PARSLK","A",11)

^SCR("P1PARSLK","A",12)

^SCR("P1PARSLK","A",13)

^SCR("P1PARSLK","A",14)

^SCR("P1PARSLK","A",15)

^SCR("P1PARSLK","A",16)

^SCR("P1PARSLK","A",17)

^SCR("P1PARSLK","A",18)

^SCR("P1PARSLK","A",19)

^SCR("P1PARSLK","A",20)

^SCR("P1PARSLK","A",21)

^SCR("P1PARSLK","AV",1)
,ujuek,mucehpkiurhjn
^SCR("P1PARSLK","AV",2)

^SCR("P1PARSLK","AV",3)
:,ujuek,muce
^SCR("P1PARSLK","AV",4)

^SCR("P1PARSLK","AV",5)
juekkrhjnkhdrrhjnyhrprut,yhrpsue
^SCR("P1PARSLK","AV",6)
-----------------------------------------------------
^SCR("P1PARSLK","AV",7)

^SCR("P1PARSLK","AV",8)

^SCR("P1PARSLK","AV",9)

^SCR("P1PARSLK","AV",10)

^SCR("P1PARSLK","AV",11)

^SCR("P1PARSLK","AV",12)

^SCR("P1PARSLK","AV",13)

^SCR("P1PARSLK","AV",14)

^SCR("P1PARSLK","AV",15)

^SCR("P1PARSLK","AV",16)

^SCR("P1PARSLK","AV",17)

^SCR("P1PARSLK","AV",18)

^SCR("P1PARSLK","AV",19)

^SCR("P1PARSLK","AV",20)

^SCR("P1PARSLK","AV",21)

^SCR("P1PARSLK","G",1,"CHECK")
Y
^SCR("P1PARSLK","G",1,"CRD")
6,67,E,10,0
^SCR("P1PARSLK","G",1,"CREAT")

^SCR("P1PARSLK","G",1,"FNC")
F9,F6,F7
^SCR("P1PARSLK","G",1,"GLOB")
PAR
^SCR("P1PARSLK","G",1,"HELP")

^SCR("P1PARSLK","G",1,"LMAX")
10
^SCR("P1PARSLK","G",1,"MUMPS1")
D PAR0^P1PARSLK
^SCR("P1PARSLK","G",1,"MUMPS2")
D PAR^P1PARSLK
^SCR("P1PARSLK","G",1,"NLN")
20
^SCR("P1PARSLK","G",1,"NS")
P
^SCR("P1PARSLK","G",1,"RZD")
**
^SCR("P1PARSLK","G",1,"SHEM")
 hixt cew 
^SCR("P1PARSLK","G",1,"TOPB")
8
^SCR("P1PARSLK","G",1,"TYP")
E
^SCR("P1PARSLK","G",1,"VRB")
PAR1
^SCR("P1PARSLK","G",2,"CRD")
6,56,H,20,0
^SCR("P1PARSLK","G",2,"HELP")

^SCR("P1PARSLK","G",2,"LMAX")
20
^SCR("P1PARSLK","G",2,"MUMPS1")

^SCR("P1PARSLK","G",2,"MUMPS2")

^SCR("P1PARSLK","G",2,"OUTPUT")

^SCR("P1PARSLK","G",2,"SHEM")
      hixt xe`z     
^SCR("P1PARSLK","G",2,"TYP")
H
^SCR("P1PARSLK","G",3,"CRD")
6,35,N,8,2
^SCR("P1PARSLK","G",3,"HELP")

^SCR("P1PARSLK","G",3,"LMAX")
11
^SCR("P1PARSLK","G",3,"MUMPS1")

^SCR("P1PARSLK","G",3,"MUMPS2")

^SCR("P1PARSLK","G",3,"OUTPUT")

^SCR("P1PARSLK","G",3,"SHEM")
 libx xign 
^SCR("P1PARSLK","G",3,"TYP")
N
^SCR("P1PARSLK","G",4,"CRD")
6,23,N,8,2
^SCR("P1PARSLK","G",4,"HELP")
<F9> - hixt qihxk , <F7> - cew itl ,F6 - my itl yetig 
^SCR("P1PARSLK","G",4,"LMAX")
12
^SCR("P1PARSLK","G",4,"MUMPS1")

^SCR("P1PARSLK","G",4,"MUMPS2")
D MHLK^P1PARSLK
^SCR("P1PARSLK","G",4,"SHEM")
 gewll xign 
^SCR("P1PARSLK","G",4,"TYP")
N
^SCR("P1PARSLK","G","DEL")

^SCR("P1PARSLK","G","MAX")
99999
^SCR("P1PARSLK","G","NAME","MH")
3
^SCR("P1PARSLK","G","NAME","MHLK")
4
^SCR("P1PARSLK","G","NAME","PAR")
1
^SCR("P1PARSLK","G","NAME","PAR1")
2
^SCR("P1PARSLK","G","NM",1)
PAR
^SCR("P1PARSLK","G","NM",2)
PAR1
^SCR("P1PARSLK","G","NM",3)
MH
^SCR("P1PARSLK","G","NM",4)
MHLK
^SCR("P1PARSLK","G","RB")
5,7,22,72
^SCR("P1PARSLK","G","REF")
^TEMP($P,"L"
^SCR("P1PARSLK","G","RZD")
\
^SCR("P1PARSLK","G","STEP")
1
^SCR("P1PARSLK","G","STG")
          : gewll xign : libx xign :      hixt xe`z     : hixt cew :           
^SCR("P1PARSLK","G","VG")
7
^SCR("P1PARSLK","NAME")

^SCR("P1PARSLK","P",5,"CHECK")
Y
^SCR("P1PARSLK","P",5,"CRD")
3,45,E,5,0
^SCR("P1PARSLK","P",5,"CREAT")

^SCR("P1PARSLK","P",5,"FNC")
F8,F9
^SCR("P1PARSLK","P",5,"GLOB")
SUGL
^SCR("P1PARSLK","P",5,"HELP")
<F8> - miniiwd mipxign zbvd , <F7> - zegewl zeveaw zbvd
^SCR("P1PARSLK","P",5,"LMAX")
6
^SCR("P1PARSLK","P",5,"MUMPS1")

^SCR("P1PARSLK","P",5,"MUMPS2")
D SUGL^P1PARSLK
^SCR("P1PARSLK","P",5,"MUST")

^SCR("P1PARSLK","P",5,"NLN")
20
^SCR("P1PARSLK","P",5,"NS")
K
^SCR("P1PARSLK","P",5,"RZD")
\
^SCR("P1PARSLK","P",5,"TOPB")
8
^SCR("P1PARSLK","P",5,"TYP")
E
^SCR("P1PARSLK","P",5,"VRB")
SUGL1
^SCR("P1PARSLK","P",6,"CRD")
3,44,H,27
^SCR("P1PARSLK","P",6,"HELP")

^SCR("P1PARSLK","P",6,"LMAX")
27
^SCR("P1PARSLK","P",6,"MUMPS1")

^SCR("P1PARSLK","P",6,"MUMPS2")

^SCR("P1PARSLK","P",6,"OUTPUT")

^SCR("P1PARSLK","P",6,"TYP")
H
^SCR("P1PARSLK","P","NAME","SUGL")
5
^SCR("P1PARSLK","P","NAME","SUGL1")
6
^SCR("P1PARSLK","P","NM",5)
SUGL
^SCR("P1PARSLK","P","NM",6)
SUGL1
^SCR("P1PARTA")
H
^SCR("P1PARTA",1)
                         # TAW ihixtl oexign #                                 
^SCR("P1PARTA",2)
                                                                               
^SCR("P1PARTA",3)
                                                                           1$  
^SCR("P1PARTA",4)
            : TAW hixt xign : libx xign :      hixt xe`z     : hixt cew :      
^SCR("P1PARTA",5)
                                                                               
^SCR("P1PARTA",6)
                                                                               
^SCR("P1PARTA",7)
                                                                               
^SCR("P1PARTA",8)
                                                                               
^SCR("P1PARTA",9)
                                                                               
^SCR("P1PARTA",10)
                                                                               
^SCR("P1PARTA",11)
                                                                               
^SCR("P1PARTA",12)
                                                                               
^SCR("P1PARTA",13)
                                                                               
^SCR("P1PARTA",14)
                                                                               
^SCR("P1PARTA",15)
                                                                               
^SCR("P1PARTA",16)
                                                                               
^SCR("P1PARTA",17)
                                                                               
^SCR("P1PARTA",18)
                                                                               
^SCR("P1PARTA",19)
                                                                               
^SCR("P1PARTA",20)
      $1                                                                       
^SCR("P1PARTA","A",1)
TAW‰ˆ‰˜”Œ�…˜‰‡Ž
^SCR("P1PARTA","A",2)

^SCR("P1PARTA","A",3)

^SCR("P1PARTA","A",4)
TAWˆ‰˜”˜‰‡ŽŒ‰‚˜˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1PARTA","A",5)
--------------------------------------------------------
^SCR("P1PARTA","A",6)

^SCR("P1PARTA","A",7)

^SCR("P1PARTA","A",8)

^SCR("P1PARTA","A",9)

^SCR("P1PARTA","A",10)

^SCR("P1PARTA","A",11)

^SCR("P1PARTA","A",12)

^SCR("P1PARTA","A",13)

^SCR("P1PARTA","A",14)

^SCR("P1PARTA","A",15)

^SCR("P1PARTA","A",16)

^SCR("P1PARTA","A",17)

^SCR("P1PARTA","A",18)

^SCR("P1PARTA","A",19)

^SCR("P1PARTA","A",20)

^SCR("P1PARTA","AV",1)
TAWhyhrpkiurhjn
^SCR("P1PARTA","AV",2)

^SCR("P1PARTA","AV",3)

^SCR("P1PARTA","AV",4)
TAWyhrprhjnkhdrrhjnyhrprut,yhrpsue
^SCR("P1PARTA","AV",5)
--------------------------------------------------------
^SCR("P1PARTA","AV",6)

^SCR("P1PARTA","AV",7)

^SCR("P1PARTA","AV",8)

^SCR("P1PARTA","AV",9)

^SCR("P1PARTA","AV",10)

^SCR("P1PARTA","AV",11)

^SCR("P1PARTA","AV",12)

^SCR("P1PARTA","AV",13)

^SCR("P1PARTA","AV",14)

^SCR("P1PARTA","AV",15)

^SCR("P1PARTA","AV",16)

^SCR("P1PARTA","AV",17)

^SCR("P1PARTA","AV",18)

^SCR("P1PARTA","AV",19)

^SCR("P1PARTA","AV",20)

^SCR("P1PARTA","G",1,"CHECK")
Y
^SCR("P1PARTA","G",1,"CRD")
5,72,E,10,0
^SCR("P1PARTA","G",1,"CREAT")

^SCR("P1PARTA","G",1,"FNC")
F9,F6,F7
^SCR("P1PARTA","G",1,"GLOB")
PAR
^SCR("P1PARTA","G",1,"HELP")

^SCR("P1PARTA","G",1,"LMAX")
10
^SCR("P1PARTA","G",1,"MUMPS1")
D PAR0^P1PARTA
^SCR("P1PARTA","G",1,"MUMPS2")
D PAR^P1PARTA
^SCR("P1PARTA","G",1,"NLN")
20
^SCR("P1PARTA","G",1,"NS")
P
^SCR("P1PARTA","G",1,"OUTPUT")

^SCR("P1PARTA","G",1,"RZD")
**
^SCR("P1PARTA","G",1,"SHEM")
 hixt cew 
^SCR("P1PARTA","G",1,"TOPB")
8
^SCR("P1PARTA","G",1,"TYP")
E
^SCR("P1PARTA","G",1,"VRB")
PAR1
^SCR("P1PARTA","G",2,"CRD")
5,61,H,20,0
^SCR("P1PARTA","G",2,"HELP")

^SCR("P1PARTA","G",2,"LMAX")
20
^SCR("P1PARTA","G",2,"MUMPS1")

^SCR("P1PARTA","G",2,"MUMPS2")

^SCR("P1PARTA","G",2,"OUTPUT")

^SCR("P1PARTA","G",2,"SHEM")
      hixt xe`z     
^SCR("P1PARTA","G",2,"TYP")
H
^SCR("P1PARTA","G",3,"CRD")
5,40,N,8,2
^SCR("P1PARTA","G",3,"HELP")

^SCR("P1PARTA","G",3,"LMAX")
11
^SCR("P1PARTA","G",3,"MUMPS1")

^SCR("P1PARTA","G",3,"MUMPS2")

^SCR("P1PARTA","G",3,"OUTPUT")

^SCR("P1PARTA","G",3,"SHEM")
 libx xign 
^SCR("P1PARTA","G",3,"TYP")
N
^SCR("P1PARTA","G",4,"CRD")
5,28,E,8,0
^SCR("P1PARTA","G",4,"HELP")
<F9> - hixt qihxk , <F7> - cew itl ,F6 - my itl yetig 
^SCR("P1PARTA","G",4,"LMAX")
15
^SCR("P1PARTA","G",4,"MUMPS1")

^SCR("P1PARTA","G",4,"MUMPS2")
D MHLK^P1PARTA
^SCR("P1PARTA","G",4,"SHEM")
 TAW hixt xign 
^SCR("P1PARTA","G",4,"TYP")
E
^SCR("P1PARTA","G","DEL")

^SCR("P1PARTA","G","MAX")
99999
^SCR("P1PARTA","G","NAME","MH")
3
^SCR("P1PARTA","G","NAME","MHLK")
4
^SCR("P1PARTA","G","NAME","PAR")
1
^SCR("P1PARTA","G","NAME","PAR1")
2
^SCR("P1PARTA","G","NM",1)
PAR
^SCR("P1PARTA","G","NM",2)
PAR1
^SCR("P1PARTA","G","NM",3)
MH
^SCR("P1PARTA","G","NM",4)
MHLK
^SCR("P1PARTA","G","RB")
4,7,21,77
^SCR("P1PARTA","G","REF")
^TEMP($P,"TA"
^SCR("P1PARTA","G","RZD")
\
^SCR("P1PARTA","G","STEP")
1
^SCR("P1PARTA","G","STG")
            : TAW hixt xign : libx xign :      hixt xe`z     : hixt cew :      
^SCR("P1PARTA","G","VG")
6
^SCR("P1PARTA","NAME")

^SCR("P1PARTAW")
H
^SCR("P1PARTAW",1)
            # xidn ogleya dxiknl mihixt zeveaw zniyx #                         
^SCR("P1PARTAW",2)
                                                                               
^SCR("P1PARTAW",3)
                                                              1$               
^SCR("P1PARTAW",4)
                        :       dveaw xtqn     : dveaw cew :                   
^SCR("P1PARTAW",5)
                                                                               
^SCR("P1PARTAW",6)
                                                                               
^SCR("P1PARTAW",7)
                                                                               
^SCR("P1PARTAW",8)
                                                                               
^SCR("P1PARTAW",9)
                                                                               
^SCR("P1PARTAW",10)
                                                                               
^SCR("P1PARTAW",11)
                                                                               
^SCR("P1PARTAW",12)
                                                                               
^SCR("P1PARTAW",13)
                                                                               
^SCR("P1PARTAW",14)
                                                                               
^SCR("P1PARTAW",15)
                                                                               
^SCR("P1PARTAW",16)
                                                                               
^SCR("P1PARTAW",17)
                                                                               
^SCR("P1PARTAW",18)
                                                                               
^SCR("P1PARTAW",19)
                                                                               
^SCR("P1PARTAW",20)
                     $1                                                        
^SCR("P1PARTAW","A",1)
˜‰„Ž�‡Œ…™�„˜‰‹ŽŒ�‰ˆ‰˜”š…–…�—šŽ‰™˜
^SCR("P1PARTAW","A",2)

^SCR("P1PARTAW","A",3)

^SCR("P1PARTAW","A",4)
„–…�—˜”‘Ž„–…�—ƒ…—
^SCR("P1PARTAW","A",5)
---------------------------------
^SCR("P1PARTAW","A",6)

^SCR("P1PARTAW","A",7)

^SCR("P1PARTAW","A",8)

^SCR("P1PARTAW","A",9)

^SCR("P1PARTAW","A",10)

^SCR("P1PARTAW","A",11)

^SCR("P1PARTAW","A",12)

^SCR("P1PARTAW","A",13)

^SCR("P1PARTAW","A",14)

^SCR("P1PARTAW","A",15)

^SCR("P1PARTAW","A",16)

^SCR("P1PARTAW","A",17)

^SCR("P1PARTAW","A",18)

^SCR("P1PARTAW","A",19)

^SCR("P1PARTAW","A",20)

^SCR("P1PARTAW","AV",1)
rhvnijkuacvrhfnkohyhrp,umuce,nhar
^SCR("P1PARTAW","AV",2)

^SCR("P1PARTAW","AV",3)

^SCR("P1PARTAW","AV",4)
vmucerpxnvmucesue
^SCR("P1PARTAW","AV",5)
---------------------------------
^SCR("P1PARTAW","AV",6)

^SCR("P1PARTAW","AV",7)

^SCR("P1PARTAW","AV",8)

^SCR("P1PARTAW","AV",9)

^SCR("P1PARTAW","AV",10)

^SCR("P1PARTAW","AV",11)

^SCR("P1PARTAW","AV",12)

^SCR("P1PARTAW","AV",13)

^SCR("P1PARTAW","AV",14)

^SCR("P1PARTAW","AV",15)

^SCR("P1PARTAW","AV",16)

^SCR("P1PARTAW","AV",17)

^SCR("P1PARTAW","AV",18)

^SCR("P1PARTAW","AV",19)

^SCR("P1PARTAW","AV",20)

^SCR("P1PARTAW","G",1,"CHECK")
Y
^SCR("P1PARTAW","G",1,"CRD")
5,59,E,8,0
^SCR("P1PARTAW","G",1,"CREAT")

^SCR("P1PARTAW","G",1,"FNC")

^SCR("P1PARTAW","G",1,"GLOB")
PARSUG
^SCR("P1PARTAW","G",1,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1PARTAW","G",1,"LMAX")
11
^SCR("P1PARTAW","G",1,"MUMPS1")

^SCR("P1PARTAW","G",1,"MUMPS2")
D BDIKA^P1PARTAW
^SCR("P1PARTAW","G",1,"MUST")

^SCR("P1PARTAW","G",1,"NLN")
20
^SCR("P1PARTAW","G",1,"NS")
JJ
^SCR("P1PARTAW","G",1,"RZD")
**
^SCR("P1PARTAW","G",1,"SHEM")
 dveaw cew 
^SCR("P1PARTAW","G",1,"TOPB")
8
^SCR("P1PARTAW","G",1,"TYP")
E
^SCR("P1PARTAW","G",1,"VRB")
KVZ1
^SCR("P1PARTAW","G",2,"CRD")
5,47,H,20,0
^SCR("P1PARTAW","G",2,"HELP")

^SCR("P1PARTAW","G",2,"LMAX")
22
^SCR("P1PARTAW","G",2,"MUMPS1")

^SCR("P1PARTAW","G",2,"MUMPS2")

^SCR("P1PARTAW","G",2,"OUTPUT")

^SCR("P1PARTAW","G",2,"SHEM")
       dveaw xtqn     
^SCR("P1PARTAW","G",2,"TYP")
H
^SCR("P1PARTAW","G","DEL")
Y
^SCR("P1PARTAW","G","MAX")
99999
^SCR("P1PARTAW","G","NAME","KVZ")
1
^SCR("P1PARTAW","G","NAME","KVZ1")
2
^SCR("P1PARTAW","G","NM",1)
KVZ
^SCR("P1PARTAW","G","NM",2)
KVZ1
^SCR("P1PARTAW","G","RB")
4,22,21,64
^SCR("P1PARTAW","G","REF")
^TEMP($P,"TAW"
^SCR("P1PARTAW","G","RZD")
\
^SCR("P1PARTAW","G","STEP")
1
^SCR("P1PARTAW","G","STG")
                        :       dveaw xtqn     : dveaw cew :                   
^SCR("P1PARTAW","G","VG")
6
^SCR("P1PARTAW","NAME")

^SCR("P1PMDP")
H
^SCR("P1PMDP",1)
                               # mihixtl zeqtcn zlah #                         
^SCR("P1PMDP",2)
                                                                               
^SCR("P1PMDP",3)
                                                                             1$
^SCR("P1PMDP",4)
    :rav:   zqtcn xe`z  :      zqtcn 'qn      :     hixt xe`z    :hixt cew:    
^SCR("P1PMDP",5)
                                                                               
^SCR("P1PMDP",6)
                                                                               
^SCR("P1PMDP",7)
                                                                               
^SCR("P1PMDP",8)
                                                                               
^SCR("P1PMDP",9)
                                                                               
^SCR("P1PMDP",10)
                                                                               
^SCR("P1PMDP",11)
                                                                               
^SCR("P1PMDP",12)
                                                                               
^SCR("P1PMDP",13)
                                                                               
^SCR("P1PMDP",14)
                                                                               
^SCR("P1PMDP",15)
                                                                               
^SCR("P1PMDP",16)
                                                                               
^SCR("P1PMDP",17)
                                                                               
^SCR("P1PMDP",18)
                                                                               
^SCR("P1PMDP",19)
                                                                               
^SCR("P1PMDP",20)
                                                                               
^SCR("P1PMDP",21)
                                                                               
^SCR("P1PMDP",22)
   $1                                                                          
^SCR("P1PMDP","A",1)
�‰ˆ‰˜”Œš…‘”ƒŽšŒ�ˆ
^SCR("P1PMDP","A",2)

^SCR("P1PMDP","A",3)

^SCR("P1PMDP","A",4)
’�–š‘”ƒŽ˜…€šš‘”ƒŽ'‘Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1PMDP","A",5)
---------------------------------------------------------------------
^SCR("P1PMDP","A",6)

^SCR("P1PMDP","A",7)

^SCR("P1PMDP","A",8)

^SCR("P1PMDP","A",9)

^SCR("P1PMDP","A",10)

^SCR("P1PMDP","A",11)

^SCR("P1PMDP","A",12)

^SCR("P1PMDP","A",13)

^SCR("P1PMDP","A",14)

^SCR("P1PMDP","A",15)

^SCR("P1PMDP","A",16)

^SCR("P1PMDP","A",17)

^SCR("P1PMDP","A",18)

^SCR("P1PMDP","A",19)

^SCR("P1PMDP","A",20)

^SCR("P1PMDP","A",21)

^SCR("P1PMDP","A",22)

^SCR("P1PMDP","AV",1)
ohyhrpk,uxpsn,kcy
^SCR("P1PMDP","AV",2)

^SCR("P1PMDP","AV",3)

^SCR("P1PMDP","AV",4)
gcm,xpsnrut,,xpsnwxnyhrprut,yhrpsue
^SCR("P1PMDP","AV",5)
---------------------------------------------------------------------
^SCR("P1PMDP","AV",6)

^SCR("P1PMDP","AV",7)

^SCR("P1PMDP","AV",8)

^SCR("P1PMDP","AV",9)

^SCR("P1PMDP","AV",10)

^SCR("P1PMDP","AV",11)

^SCR("P1PMDP","AV",12)

^SCR("P1PMDP","AV",13)

^SCR("P1PMDP","AV",14)

^SCR("P1PMDP","AV",15)

^SCR("P1PMDP","AV",16)

^SCR("P1PMDP","AV",17)

^SCR("P1PMDP","AV",18)

^SCR("P1PMDP","AV",19)

^SCR("P1PMDP","AV",20)

^SCR("P1PMDP","AV",21)

^SCR("P1PMDP","AV",22)

^SCR("P1PMDP","G",1,"CRD")
5,74,E,8,0
^SCR("P1PMDP","G",1,"HELP")

^SCR("P1PMDP","G",1,"LMAX")
8
^SCR("P1PMDP","G",1,"MUMPS1")

^SCR("P1PMDP","G",1,"MUMPS2")

^SCR("P1PMDP","G",1,"OUTPUT")

^SCR("P1PMDP","G",1,"SHEM")
hixt cew
^SCR("P1PMDP","G",1,"TYP")
E
^SCR("P1PMDP","G",2,"CRD")
5,65,H,18,0
^SCR("P1PMDP","G",2,"HELP")

^SCR("P1PMDP","G",2,"LMAX")
18
^SCR("P1PMDP","G",2,"MUMPS1")

^SCR("P1PMDP","G",2,"MUMPS2")

^SCR("P1PMDP","G",2,"OUTPUT")

^SCR("P1PMDP","G",2,"SHEM")
     hixt xe`z    
^SCR("P1PMDP","G",2,"TYP")
H
^SCR("P1PMDP","G",3,"CRD")
5,46,E,20,0
^SCR("P1PMDP","G",3,"HELP")
<F9> - hixt qihxk , <F6> - my itl hixt yetig , <F7> - zeqtcn zbvd 
^SCR("P1PMDP","G",3,"LMAX")
21
^SCR("P1PMDP","G",3,"MUMPS1")
S %ZMSL="="
^SCR("P1PMDP","G",3,"MUMPS2")
D MDP^P1PMDP
^SCR("P1PMDP","G",3,"SHEM")
      zqtcn 'qn      
^SCR("P1PMDP","G",3,"TYP")
E
^SCR("P1PMDP","G",4,"CRD")
5,24,H,14,0
^SCR("P1PMDP","G",4,"HELP")

^SCR("P1PMDP","G",4,"LMAX")
15
^SCR("P1PMDP","G",4,"MUMPS1")

^SCR("P1PMDP","G",4,"MUMPS2")

^SCR("P1PMDP","G",4,"OUTPUT")

^SCR("P1PMDP","G",4,"SHEM")
   zqtcn xe`z  
^SCR("P1PMDP","G",4,"TYP")
H
^SCR("P1PMDP","G",5,"CRD")
5,8,H,1,0
^SCR("P1PMDP","G",5,"HELP")
mec` - ` , legk - k
^SCR("P1PMDP","G",5,"LMAX")
3
^SCR("P1PMDP","G",5,"MUMPS1")

^SCR("P1PMDP","G",5,"MUMPS2")
I CEVA'="`",CEVA'="k" S %SC("ER")=1
^SCR("P1PMDP","G",5,"SHEM")
rav
^SCR("P1PMDP","G",5,"TYP")
H
^SCR("P1PMDP","G","DEL")

^SCR("P1PMDP","G","MAX")
1366
^SCR("P1PMDP","G","NAME","CEVA")
5
^SCR("P1PMDP","G","NAME","MDP")
3
^SCR("P1PMDP","G","NAME","MDP1")
4
^SCR("P1PMDP","G","NAME","PAR")
1
^SCR("P1PMDP","G","NAME","PAR1")
2
^SCR("P1PMDP","G","NM",1)
PAR
^SCR("P1PMDP","G","NM",2)
PAR1
^SCR("P1PMDP","G","NM",3)
MDP
^SCR("P1PMDP","G","NM",4)
MDP1
^SCR("P1PMDP","G","NM",5)
CEVA
^SCR("P1PMDP","G","RB")
4,4,23,79
^SCR("P1PMDP","G","REF")
^TEMP($P
^SCR("P1PMDP","G","RZD")
\
^SCR("P1PMDP","G","STEP")
1
^SCR("P1PMDP","G","STG")
    :rav:   zqtcn xe`z  :      zqtcn 'qn      :     hixt xe`z    :hixt cew:    
^SCR("P1PMDP","G","VG")
6
^SCR("P1PMDP","NAME")
mihixtl zeqtcn zlah
^SCR("P1PRM1")
H
^SCR("P1PRM1",1)
                                  # (2 sc ) zkxrn mixhnxt #                    
^SCR("P1PRM1",2)
                                                                          1]   
^SCR("P1PRM1",3)
                                                   : Z-e X-a mixvln g"ec       
^SCR("P1PRM1",4)
                {07:Z    {05:X   (`l - 0 , ok - 1)           zepnfd g"ec       
^SCR("P1PRM1",5)
                {12:Z    {10:X   (`l - 0 , ok - 1)         zeipeayg g"ec       
^SCR("P1PRM1",6)
                {17:Z    {15:X   (`l - 0 , ok - 1)  melyz irvn` itl g"ec       
^SCR("P1PRM1",7)
                                                                               
^SCR("P1PRM1",8)
                    {19: (`l - 0 , ok - 1) zxvewn dxeva itqk g"ec `ivedl       
^SCR("P1PRM1",9)
          [1                                                                   
^SCR("P1PRM1",10)
                                                                          2]   
^SCR("P1PRM1",11)
                     {20: (`l - 0 ,ok - 1)       dpkez zlrtda mcen zprhd       
^SCR("P1PRM1",12)
                     {22: (`l - 0 ,ok - 1)          miycg mikqn mr dcear       
^SCR("P1PRM1",13)
                     {25: (`l - 0 ,ok - 1) F6-a yetig ixg` hixt cew zbvd       
^SCR("P1PRM1",14)
                     {27: (`l - 0 ,ok - 1)         xa ogleya dgpd `zli`y       
^SCR("P1PRM1",15)
                     {28: (`l - 0 ,ok - 1)       lcgn zxxak onefna melyz       
^SCR("P1PRM1",16)
                     {29: (`l - 0 ,ok - 1)               xa zepnfd zqtcd       
^SCR("P1PRM1",17)
                     {31: (`l - 0 ,ok - 1)          zepn itl dpnfd zqtcd       
^SCR("P1PRM1",18)
                     {32: (`l - 0 ,ok - 1)     gewl ly `zknq` 'qn `zli`y       
^SCR("P1PRM1",19)
                     {33: (`l - 0 ,ok - 1)               oeict jeza dtwd       
^SCR("P1PRM1",20)
                                  {  34}:                'tih'-l sqep my       
^SCR("P1PRM1",21)
                  {40   : ixg`    {35   :d`ixw iptl miqihxk `xewa mipniq       
^SCR("P1PRM1",22)
                                    {45 :         XON/XOFF -l mcen zcewt       
^SCR("P1PRM1",23)
         [2                                                                    
^SCR("P1PRM1","A",1)
(2“ƒ)š‹˜’Ž�‰˜ˆŽ˜”
^SCR("P1PRM1","A",2)

^SCR("P1PRM1","A",3)
:Z-…X-��‰˜–ŒŽ‡"…ƒ
^SCR("P1PRM1","A",4)
:Z:X(€Œ-0,�‹-1)š…�Ž†„‡"…ƒ
^SCR("P1PRM1","A",5)
:Z:X(€Œ-0,�‹-1)š…‰�…�™‡‡"…ƒ
^SCR("P1PRM1","A",6)
:Z:X(€Œ-0,�‹-1)�…Œ™š‰’–Ž€‰”Œ‡"…ƒ
^SCR("P1PRM1","A",7)

^SCR("P1PRM1","A",8)
:(€Œ-0,�‹-1)š˜–…—Ž„˜…–�‰”‘‹‡"…ƒ€‰–…„Œ
^SCR("P1PRM1","A",9)

^SCR("P1PRM1","A",10)

^SCR("P1PRM1","A",11)
:(€Œ-0,�‹-1)„�‹…ššŒ’”„��ƒ…Žš�’ˆ„
^SCR("P1PRM1","A",12)
:(€Œ-0,�‹-1)�‰™ƒ‡�‰‹‘Ž�’„ƒ…�’
^SCR("P1PRM1","A",13)
:(€Œ-0,�‹-1)F6-�™…”‰‡‰˜‡€ˆ‰˜”ƒ…—š‚–„
^SCR("P1PRM1","A",14)
:(€Œ-0,�‹-1)˜��‡Œ…™�„‡�„€šŒ‰€™
^SCR("P1PRM1","A",15)
:(€Œ-0,�‹-1)Œƒ‡Žš˜˜�‹�Ž…†Ž��…Œ™š
^SCR("P1PRM1","A",16)
:(€Œ-0,�‹-1)˜�š…�Ž†„š‘”ƒ„
^SCR("P1PRM1","A",17)
:(€Œ-0,�‹-1)š…�Ž‰”Œ„�Ž†„š‘”ƒ„
^SCR("P1PRM1","A",18)
:(€Œ-0,�‹-1)‡…—ŒŒ™€š‹Ž‘€'‘Ž€šŒ‰€™
^SCR("P1PRM1","A",19)
:(€Œ-0,�‹-1)�…‰ƒ”Š…š�„”—„
^SCR("P1PRM1","A",20)
:'”‰ˆ'-Œ“‘…��™
^SCR("P1PRM1","A",21)
:‰˜‡€:„€‰˜—‰�”Œ�‰‘‰ˆ˜‹€˜…—��‰�Ž‰‘
^SCR("P1PRM1","A",22)
:XON/XOFF-Œ�ƒ…Žšƒ…—”
^SCR("P1PRM1","A",23)

^SCR("P1PRM1","AV",1)
(2;s),frgnohrynrp
^SCR("P1PRM1","AV",2)

^SCR("P1PRM1","AV",3)
:Z-uX-cohrmknj"us
^SCR("P1PRM1","AV",4)
:Z:X(tk-0'if-1),ubnzvj"us
^SCR("P1PRM1","AV",5)
:Z:X(tk-0'if-1),uhbucajj"us
^SCR("P1PRM1","AV",6)
:Z:X(tk-0'if-1)ouka,hgmnthpkj"us
^SCR("P1PRM1","AV",7)

^SCR("P1PRM1","AV",8)
:(tk-0'if-1),rmuenvrumchpxfj"usthmuvk
^SCR("P1PRM1","AV",9)

^SCR("P1PRM1","AV",10)

^SCR("P1PRM1","AV",11)
:(tk-0'if-1)vbfu,,kgpvcosun,bgyv
^SCR("P1PRM1","AV",12)
:(tk-0'if-1)ohasjohfxnogvsucg
^SCR("P1PRM1","AV",13)
:(tk-0'if-1)F6-cauphjhrjtyhrpsue,dmv
^SCR("P1PRM1","AV",14)
:(tk-0'if-1)rcijkuacvjbvt,khta
^SCR("P1PRM1","AV",15)
:(tk-0'if-1)ksjn,rrcfinuzncouka,
^SCR("P1PRM1","AV",16)
:(tk-0'if-1)rc,ubnzv,xpsv
^SCR("P1PRM1","AV",17)
:(tk-0'if-1),ubnhpkvbnzv,xpsv
^SCR("P1PRM1","AV",18)
:(tk-0'if-1)juekkat,fnxtwxnt,khta
^SCR("P1PRM1","AV",19)
:(tk-0'if-1)iuhsplu,cvpev
^SCR("P1PRM1","AV",20)
:wphyw-k;xuboa
^SCR("P1PRM1","AV",21)
:hrjt:vthrehbpkohxhyrftruecohbnhx
^SCR("P1PRM1","AV",22)
:XONqXOFF-kosun,suep
^SCR("P1PRM1","AV",23)

^SCR("P1PRM1","NAME")
mixhnxt jynd
^SCR("P1PRM1","P",5,"CRD")
4,25,N,1,0
^SCR("P1PRM1","P",5,"HELP")

^SCR("P1PRM1","P",5,"LMAX")
3
^SCR("P1PRM1","P",5,"MUMPS1")

^SCR("P1PRM1","P",5,"MUMPS2")

^SCR("P1PRM1","P",5,"TYP")
N
^SCR("P1PRM1","P",7,"CRD")
4,16,N,1,0
^SCR("P1PRM1","P",7,"HELP")

^SCR("P1PRM1","P",7,"LMAX")
3
^SCR("P1PRM1","P",7,"MUMPS1")

^SCR("P1PRM1","P",7,"MUMPS2")

^SCR("P1PRM1","P",7,"TYP")
N
^SCR("P1PRM1","P",10,"CRD")
5,25,N,1,0
^SCR("P1PRM1","P",10,"HELP")

^SCR("P1PRM1","P",10,"LMAX")
3
^SCR("P1PRM1","P",10,"MUMPS1")

^SCR("P1PRM1","P",10,"MUMPS2")

^SCR("P1PRM1","P",10,"TYP")
N
^SCR("P1PRM1","P",12,"CRD")
5,16,N,1,0
^SCR("P1PRM1","P",12,"HELP")

^SCR("P1PRM1","P",12,"LMAX")
3
^SCR("P1PRM1","P",12,"MUMPS1")

^SCR("P1PRM1","P",12,"MUMPS2")

^SCR("P1PRM1","P",12,"TYP")
N
^SCR("P1PRM1","P",15,"CRD")
6,25,N,1,0
^SCR("P1PRM1","P",15,"HELP")

^SCR("P1PRM1","P",15,"LMAX")
3
^SCR("P1PRM1","P",15,"MUMPS1")

^SCR("P1PRM1","P",15,"MUMPS2")

^SCR("P1PRM1","P",15,"TYP")
N
^SCR("P1PRM1","P",17,"CRD")
6,16,N,1,0
^SCR("P1PRM1","P",17,"HELP")

^SCR("P1PRM1","P",17,"LMAX")
3
^SCR("P1PRM1","P",17,"MUMPS1")

^SCR("P1PRM1","P",17,"MUMPS2")

^SCR("P1PRM1","P",17,"TYP")
N
^SCR("P1PRM1","P",19,"CRD")
8,20,N,1,0
^SCR("P1PRM1","P",19,"HELP")

^SCR("P1PRM1","P",19,"LMAX")
3
^SCR("P1PRM1","P",19,"MUMPS1")

^SCR("P1PRM1","P",19,"MUMPS2")
I KZR'=0,KZR'=1 S %SC("ER")=1
^SCR("P1PRM1","P",19,"MUST")

^SCR("P1PRM1","P",19,"TYP")
N
^SCR("P1PRM1","P",20,"CRD")
11,21,N,1,0
^SCR("P1PRM1","P",20,"HELP")

^SCR("P1PRM1","P",20,"LMAX")
3
^SCR("P1PRM1","P",20,"MUMPS1")

^SCR("P1PRM1","P",20,"MUMPS2")

^SCR("P1PRM1","P",20,"TYP")
N
^SCR("P1PRM1","P",22,"CRD")
12,21,N,1,0
^SCR("P1PRM1","P",22,"HELP")

^SCR("P1PRM1","P",22,"LMAX")
3
^SCR("P1PRM1","P",22,"MUMPS1")

^SCR("P1PRM1","P",22,"MUMPS2")

^SCR("P1PRM1","P",22,"MUST")

^SCR("P1PRM1","P",22,"TYP")
N
^SCR("P1PRM1","P",25,"CRD")
13,21,N,1,0
^SCR("P1PRM1","P",25,"HELP")

^SCR("P1PRM1","P",25,"LMAX")
3
^SCR("P1PRM1","P",25,"MUMPS1")

^SCR("P1PRM1","P",25,"MUMPS2")

^SCR("P1PRM1","P",25,"TYP")
N
^SCR("P1PRM1","P",27,"CRD")
14,21,N,1,0
^SCR("P1PRM1","P",27,"HELP")

^SCR("P1PRM1","P",27,"LMAX")
3
^SCR("P1PRM1","P",27,"MUMPS1")

^SCR("P1PRM1","P",27,"MUMPS2")

^SCR("P1PRM1","P",27,"TYP")
N
^SCR("P1PRM1","P",28,"CRD")
15,21,N,1,0
^SCR("P1PRM1","P",28,"HELP")

^SCR("P1PRM1","P",28,"LMAX")
3
^SCR("P1PRM1","P",28,"MUMPS1")

^SCR("P1PRM1","P",28,"MUMPS2")

^SCR("P1PRM1","P",28,"TYP")
N
^SCR("P1PRM1","P",29,"CRD")
16,21,N,1,0
^SCR("P1PRM1","P",29,"HELP")

^SCR("P1PRM1","P",29,"LMAX")
3
^SCR("P1PRM1","P",29,"MUMPS1")

^SCR("P1PRM1","P",29,"MUMPS2")

^SCR("P1PRM1","P",29,"TYP")
N
^SCR("P1PRM1","P",31,"CRD")
17,21,N,1,0
^SCR("P1PRM1","P",31,"HELP")

^SCR("P1PRM1","P",31,"LMAX")
3
^SCR("P1PRM1","P",31,"MUMPS1")

^SCR("P1PRM1","P",31,"MUMPS2")

^SCR("P1PRM1","P",31,"MUST")

^SCR("P1PRM1","P",31,"TYP")
N
^SCR("P1PRM1","P",32,"CRD")
18,21,N,1,0
^SCR("P1PRM1","P",32,"HELP")

^SCR("P1PRM1","P",32,"LMAX")
3
^SCR("P1PRM1","P",32,"MUMPS1")
S:'HZMLK HZMLK=1
^SCR("P1PRM1","P",32,"MUMPS2")
I HZMLK'=1,HZMLK'=0 S %SC("ER")=1
^SCR("P1PRM1","P",32,"TYP")
N
^SCR("P1PRM1","P",33,"CRD")
19,21,N,1,0
^SCR("P1PRM1","P",33,"HELP")

^SCR("P1PRM1","P",33,"LMAX")
3
^SCR("P1PRM1","P",33,"MUMPS1")

^SCR("P1PRM1","P",33,"MUMPS2")

^SCR("P1PRM1","P",33,"MUST")

^SCR("P1PRM1","P",33,"TYP")
N
^SCR("P1PRM1","P",34,"CRD")
20,40,H,5,0
^SCR("P1PRM1","P",34,"HELP")

^SCR("P1PRM1","P",34,"LMAX")
5
^SCR("P1PRM1","P",34,"MUMPS1")

^SCR("P1PRM1","P",34,"MUMPS2")

^SCR("P1PRM1","P",34,"TYP")
H
^SCR("P1PRM1","P",35,"CRD")
21,34,E,6,0
^SCR("P1PRM1","P",35,"HELP")

^SCR("P1PRM1","P",35,"LMAX")
6
^SCR("P1PRM1","P",35,"MUMPS1")

^SCR("P1PRM1","P",35,"MUMPS2")

^SCR("P1PRM1","P",35,"TYP")
E
^SCR("P1PRM1","P",40,"CRD")
21,18,E,6,0
^SCR("P1PRM1","P",40,"HELP")

^SCR("P1PRM1","P",40,"LMAX")
6
^SCR("P1PRM1","P",40,"MUMPS1")

^SCR("P1PRM1","P",40,"MUMPS2")

^SCR("P1PRM1","P",40,"TYP")
E
^SCR("P1PRM1","P",45,"CRD")
22,36,E,4,0
^SCR("P1PRM1","P",45,"HELP")

^SCR("P1PRM1","P",45,"LMAX")
4
^SCR("P1PRM1","P",45,"MUMPS1")

^SCR("P1PRM1","P",45,"MUMPS2")

^SCR("P1PRM1","P",45,"TYP")
E
^SCR("P1PRM1","P","NAME","BF1")
35
^SCR("P1PRM1","P","NAME","BF2")
40
^SCR("P1PRM1","P","NAME","CODF6")
25
^SCR("P1PRM1","P","NAME","HNHBAR")
27
^SCR("P1PRM1","P","NAME","HZMBAR")
29
^SCR("P1PRM1","P","NAME","HZMLK")
32
^SCR("P1PRM1","P","NAME","INMD")
20
^SCR("P1PRM1","P","NAME","KZR")
19
^SCR("P1PRM1","P","NAME","MANA")
31
^SCR("P1PRM1","P","NAME","MZMDF")
28
^SCR("P1PRM1","P","NAME","NEW")
22
^SCR("P1PRM1","P","NAME","TIPPS")
34
^SCR("P1PRM1","P","NAME","TOTA")
33
^SCR("P1PRM1","P","NAME","XHSB")
10
^SCR("P1PRM1","P","NAME","XHZM")
5
^SCR("P1PRM1","P","NAME","XON")
45
^SCR("P1PRM1","P","NAME","XTSH")
15
^SCR("P1PRM1","P","NAME","ZHSB")
12
^SCR("P1PRM1","P","NAME","ZHZM")
7
^SCR("P1PRM1","P","NAME","ZTSH")
17
^SCR("P1PRM1","P","NM",5)
XHZM
^SCR("P1PRM1","P","NM",7)
ZHZM
^SCR("P1PRM1","P","NM",10)
XHSB
^SCR("P1PRM1","P","NM",12)
ZHSB
^SCR("P1PRM1","P","NM",15)
XTSH
^SCR("P1PRM1","P","NM",17)
ZTSH
^SCR("P1PRM1","P","NM",19)
KZR
^SCR("P1PRM1","P","NM",20)
INMD
^SCR("P1PRM1","P","NM",22)
NEW
^SCR("P1PRM1","P","NM",25)
CODF6
^SCR("P1PRM1","P","NM",27)
HNHBAR
^SCR("P1PRM1","P","NM",28)
MZMDF
^SCR("P1PRM1","P","NM",29)
HZMBAR
^SCR("P1PRM1","P","NM",31)
MANA
^SCR("P1PRM1","P","NM",32)
HZMLK
^SCR("P1PRM1","P","NM",33)
TOTA
^SCR("P1PRM1","P","NM",34)
TIPPS
^SCR("P1PRM1","P","NM",35)
BF1
^SCR("P1PRM1","P","NM",40)
BF2
^SCR("P1PRM1","P","NM",45)
XON
^SCR("P1PRM1","P","RB",1)
3,11,10,76
^SCR("P1PRM1","P","RB",2)
11,10,24,76
^SCR("P1PRMC")
H
^SCR("P1PRMC",1)
                                                                         1]    
^SCR("P1PRMC",2)
                        {01 : (`l - 0 , ok - 1)   dcrqn zkxrn zniiw m`d        
^SCR("P1PRMC",3)
                        {03 : (`l - 0 , ok - 1)     TAW zkxrn zniiw m`d        
^SCR("P1PRMC",4)
         {04 : (`l - 0 ,zecrqn-ax - 2 , ok - 1) migelyn zkxrn zniiw m`d        
^SCR("P1PRMC",5)
                        {05 : (`l - 0 , ok - 1)    i`ln zkxrn zniiw m`d        
^SCR("P1PRMC",6)
                        {10 : (`l - 0 , ok - 1)  zegewl zkxrn zniiw m`d        
^SCR("P1PRMC",7)
                        {15 : (`l - 0 , ok - 1)  zegewl oecren miiw m`d        
^SCR("P1PRMC",8)
                        {20 : (`l - 0 , ok - 1)   miwiy zkxrn zniiw m`d        
^SCR("P1PRMC",9)
                        {25 : (`l - 0 , ok - 1)    zegkep oery miiw m`d        
^SCR("P1PRMC",10)
                                                                               
^SCR("P1PRMC",11)
               {27 : (`l - 0 , ok - 1)      mitih aeyig zkxrn zniiw m`d        
^SCR("P1PRMC",12)
               {30 : (`l - 0 , ok - 1)  zitxb dxeva mle` zbvd zniiw m`d        
^SCR("P1PRMC",13)
                                                                               
^SCR("P1PRMC",14)
                        {35 : (`l - 0,ok-1) g"hna minelyz lawl xyt` m`d        
^SCR("P1PRMC",15)
     [1                                                                        
^SCR("P1PRMC",16)
                                                                               
^SCR("P1PRMC",17)
                                                                               
^SCR("P1PRMC","A",1)

^SCR("P1PRMC","A",2)
:(€Œ-0,�‹-1)„ƒ’‘Žš‹˜’ŽšŽ‰‰—�€„
^SCR("P1PRMC","A",3)
:(€Œ-0,�‹-1)TAWš‹˜’ŽšŽ‰‰—�€„
^SCR("P1PRMC","A",4)
:(€Œ-0,š…ƒ’‘Ž-�˜-2,�‹-1)�‰‡…Œ™Žš‹˜’ŽšŽ‰‰—�€„
^SCR("P1PRMC","A",5)
:(€Œ-0,�‹-1)‰€ŒŽš‹˜’ŽšŽ‰‰—�€„
^SCR("P1PRMC","A",6)
:(€Œ-0,�‹-1)š…‡…—Œš‹˜’ŽšŽ‰‰—�€„
^SCR("P1PRMC","A",7)
:(€Œ-0,�‹-1)š…‡…—Œ�…ƒ’…Ž�‰‰—�€„
^SCR("P1PRMC","A",8)
:(€Œ-0,�‹-1)�‰—‰™š‹˜’ŽšŽ‰‰—�€„
^SCR("P1PRMC","A",9)
:(€Œ-0,�‹-1)š…‡‹…��…’™�‰‰—�€„
^SCR("P1PRMC","A",10)

^SCR("P1PRMC","A",11)
:(€Œ-0,�‹-1)�‰”‰ˆ�…™‰‡š‹˜’ŽšŽ‰‰—�€„
^SCR("P1PRMC","A",12)
:(€Œ-0,�‹-1)š‰”˜‚„˜…–��Œ…€š‚–„šŽ‰‰—�€„
^SCR("P1PRMC","A",13)

^SCR("P1PRMC","A",14)
:(€Œ-0,�‹-1)‡"ˆŽ��‰Ž…Œ™šŒ�—Œ˜™”€�€„
^SCR("P1PRMC","A",15)

^SCR("P1PRMC","A",16)

^SCR("P1PRMC","A",17)

^SCR("P1PRMC","AV",1)

^SCR("P1PRMC","AV",2)
:(tk-0'if-1)vsgxn,frgn,nhheotv
^SCR("P1PRMC","AV",3)
:(tk-0'if-1)TAW,frgn,nhheotv
^SCR("P1PRMC","AV",4)
:(tk-0',usgxn-cr-2'if-1)ohjukan,frgn,nhheotv
^SCR("P1PRMC","AV",5)
:(tk-0'if-1)htkn,frgn,nhheotv
^SCR("P1PRMC","AV",6)
:(tk-0'if-1),ujuek,frgn,nhheotv
^SCR("P1PRMC","AV",7)
:(tk-0'if-1),ujuekiusgunohheotv
^SCR("P1PRMC","AV",8)
:(tk-0'if-1)oheha,frgn,nhheotv
^SCR("P1PRMC","AV",9)
:(tk-0'if-1),ujfubiugaohheotv
^SCR("P1PRMC","AV",10)

^SCR("P1PRMC","AV",11)
:(tk-0'if-1)ohphycuahj,frgn,nhheotv
^SCR("P1PRMC","AV",12)
:(tk-0'if-1),hprdvrumcokut,dmv,nhheotv
^SCR("P1PRMC","AV",13)

^SCR("P1PRMC","AV",14)
:(tk-0'if-1)j"yncohnuka,kcekraptotv
^SCR("P1PRMC","AV",15)

^SCR("P1PRMC","AV",16)

^SCR("P1PRMC","AV",17)

^SCR("P1PRMC","NAME")
miillk mixhnxt
^SCR("P1PRMC","P",1,"CRD")
2,24,N,1,0
^SCR("P1PRMC","P",1,"HELP")

^SCR("P1PRMC","P",1,"LMAX")
4
^SCR("P1PRMC","P",1,"MUMPS1")

^SCR("P1PRMC","P",1,"MUMPS2")
I MSD'=0,MSD'=1 S %SC("ER")=1
^SCR("P1PRMC","P",1,"MUST")

^SCR("P1PRMC","P",1,"TYP")
N
^SCR("P1PRMC","P",3,"CRD")
3,24,N,1,0
^SCR("P1PRMC","P",3,"HELP")

^SCR("P1PRMC","P",3,"LMAX")
4
^SCR("P1PRMC","P",3,"MUMPS1")

^SCR("P1PRMC","P",3,"MUMPS2")
D MTAW^P1PRMC
^SCR("P1PRMC","P",3,"MUST")

^SCR("P1PRMC","P",3,"TYP")
N
^SCR("P1PRMC","P",4,"CRD")
4,9,N,1,0
^SCR("P1PRMC","P",4,"HELP")

^SCR("P1PRMC","P",4,"LMAX")
4
^SCR("P1PRMC","P",4,"MUMPS1")

^SCR("P1PRMC","P",4,"MUMPS2")
D MSL^P1PRMC
^SCR("P1PRMC","P",4,"MUST")

^SCR("P1PRMC","P",4,"TYP")
N
^SCR("P1PRMC","P",5,"CRD")
5,24,N,1,0
^SCR("P1PRMC","P",5,"HELP")

^SCR("P1PRMC","P",5,"LMAX")
4
^SCR("P1PRMC","P",5,"MUMPS1")

^SCR("P1PRMC","P",5,"MUMPS2")
I MLY'=1,MLY'=0 S %SC("ER")=1
^SCR("P1PRMC","P",5,"MUST")

^SCR("P1PRMC","P",5,"TYP")
N
^SCR("P1PRMC","P",10,"CRD")
6,24,N,1,0
^SCR("P1PRMC","P",10,"HELP")

^SCR("P1PRMC","P",10,"LMAX")
4
^SCR("P1PRMC","P",10,"MUMPS1")

^SCR("P1PRMC","P",10,"MUMPS2")
I LKH'=1,LKH'=0 S %SC("ER")=1
^SCR("P1PRMC","P",10,"MUST")

^SCR("P1PRMC","P",10,"TYP")
N
^SCR("P1PRMC","P",15,"CRD")
7,24,N,1,0
^SCR("P1PRMC","P",15,"HELP")

^SCR("P1PRMC","P",15,"LMAX")
4
^SCR("P1PRMC","P",15,"MUMPS1")

^SCR("P1PRMC","P",15,"MUMPS2")
I MOADL'=1,MOADL'=0 S %SC("ER")=1
^SCR("P1PRMC","P",15,"MUST")

^SCR("P1PRMC","P",15,"TYP")
N
^SCR("P1PRMC","P",20,"CRD")
8,24,N,1,0
^SCR("P1PRMC","P",20,"HELP")

^SCR("P1PRMC","P",20,"LMAX")
4
^SCR("P1PRMC","P",20,"MUMPS1")

^SCR("P1PRMC","P",20,"MUMPS2")
I CHECK'=1,CHECK'=0 S %SC("ER")=1
^SCR("P1PRMC","P",20,"MUST")

^SCR("P1PRMC","P",20,"TYP")
N
^SCR("P1PRMC","P",25,"CRD")
9,24,N,1,0
^SCR("P1PRMC","P",25,"HELP")

^SCR("P1PRMC","P",25,"LMAX")
4
^SCR("P1PRMC","P",25,"MUMPS1")

^SCR("P1PRMC","P",25,"MUMPS2")
I SHAON'=1,SHAON'=0 S %SC("ER")=1
^SCR("P1PRMC","P",25,"MUST")

^SCR("P1PRMC","P",25,"TYP")
N
^SCR("P1PRMC","P",27,"CRD")
11,15,N,1,0
^SCR("P1PRMC","P",27,"HELP")

^SCR("P1PRMC","P",27,"LMAX")
4
^SCR("P1PRMC","P",27,"MUMPS1")

^SCR("P1PRMC","P",27,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMC","P",27,"MUST")

^SCR("P1PRMC","P",27,"TYP")
N
^SCR("P1PRMC","P",30,"CRD")
12,15,N,1,0
^SCR("P1PRMC","P",30,"HELP")

^SCR("P1PRMC","P",30,"LMAX")
4
^SCR("P1PRMC","P",30,"MUMPS1")

^SCR("P1PRMC","P",30,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMC","P",30,"TYP")
N
^SCR("P1PRMC","P",35,"CRD")
14,24,N,1,0
^SCR("P1PRMC","P",35,"HELP")

^SCR("P1PRMC","P",35,"LMAX")
4
^SCR("P1PRMC","P",35,"MUMPS1")

^SCR("P1PRMC","P",35,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMC","P",35,"MUST")

^SCR("P1PRMC","P",35,"TYP")
N
^SCR("P1PRMC","P","NAME","CHECK")
20
^SCR("P1PRMC","P","NAME","HZMNEW")
30
^SCR("P1PRMC","P","NAME","LKH")
10
^SCR("P1PRMC","P","NAME","MATB")
35
^SCR("P1PRMC","P","NAME","MLY")
5
^SCR("P1PRMC","P","NAME","MOADL")
15
^SCR("P1PRMC","P","NAME","MSD")
1
^SCR("P1PRMC","P","NAME","MSL")
4
^SCR("P1PRMC","P","NAME","MTAW")
3
^SCR("P1PRMC","P","NAME","SHAON")
25
^SCR("P1PRMC","P","NAME","TIP")
27
^SCR("P1PRMC","P","NM",1)
MSD
^SCR("P1PRMC","P","NM",3)
MTAW
^SCR("P1PRMC","P","NM",4)
MSL
^SCR("P1PRMC","P","NM",5)
MLY
^SCR("P1PRMC","P","NM",10)
LKH
^SCR("P1PRMC","P","NM",15)
MOADL
^SCR("P1PRMC","P","NM",20)
CHECK
^SCR("P1PRMC","P","NM",25)
SHAON
^SCR("P1PRMC","P","NM",27)
TIP
^SCR("P1PRMC","P","NM",30)
HZMNEW
^SCR("P1PRMC","P","NM",35)
MATB
^SCR("P1PRMC","P","RB",1)
2,6,16,75
^SCR("P1PRMCIB")
H
^SCR("P1PRMCIB",1)
                                                                               
^SCR("P1PRMCIB",2)
                     # qeaiq zegewl zkxrnl mixhnxt #                           
^SCR("P1PRMCIB",3)
                                                                               
^SCR("P1PRMCIB",4)
                                                                      1]       
^SCR("P1PRMCIB",5)
                                                                               
^SCR("P1PRMCIB",6)
            {05      :                             'qeaiq' gewl 'qn            
^SCR("P1PRMCIB",7)
                                                                               
^SCR("P1PRMCIB",8)
                  {10:  (0-`l,1-ok) ipci qihxk cilwdl zexyt` yi m`d            
^SCR("P1PRMCIB",9)
                                                                               
^SCR("P1PRMCIB",10)
                  {15:  (0-`l,1-ok)    qeaiq zegewl oecren miiw m`d            
^SCR("P1PRMCIB",11)
                                                                               
^SCR("P1PRMCIB",12)
               {20   :                   oecren ixag iqihxkl zneciw            
^SCR("P1PRMCIB",13)
                                                                               
^SCR("P1PRMCIB",14)
                {25  :                          oecren ixagl dgpd %            
^SCR("P1PRMCIB",15)
                                                                               
^SCR("P1PRMCIB",16)
           {30       :                                    dxag ly ID           
^SCR("P1PRMCIB",17)
                                                                               
^SCR("P1PRMCIB",18)
       [1                                                                      
^SCR("P1PRMCIB","A",1)

^SCR("P1PRMCIB","A",2)
‘…�‰‘š…‡…—Œš‹˜’ŽŒ�‰˜ˆŽ˜”
^SCR("P1PRMCIB","A",3)

^SCR("P1PRMCIB","A",4)

^SCR("P1PRMCIB","A",5)

^SCR("P1PRMCIB","A",6)
:'‘…�‰‘'‡…—Œ'‘Ž
^SCR("P1PRMCIB","A",7)

^SCR("P1PRMCIB","A",8)
:(0-€Œ,1-�‹)‰�ƒ‰‘‰ˆ˜‹ƒ‰Œ—„Œš…˜™”€™‰�€„
^SCR("P1PRMCIB","A",9)

^SCR("P1PRMCIB","A",10)
:(0-€Œ,1-�‹)‘…�‰‘š…‡…—Œ�…ƒ’…Ž�‰‰—�€„
^SCR("P1PRMCIB","A",11)

^SCR("P1PRMCIB","A",12)
:�…ƒ’…Ž‰˜�‡‰‘‰ˆ˜‹ŒšŽ…ƒ‰—
^SCR("P1PRMCIB","A",13)

^SCR("P1PRMCIB","A",14)
:�…ƒ’…Ž‰˜�‡Œ„‡�„%
^SCR("P1PRMCIB","A",15)

^SCR("P1PRMCIB","A",16)
:„˜�‡Œ™ID
^SCR("P1PRMCIB","A",17)

^SCR("P1PRMCIB","A",18)

^SCR("P1PRMCIB","AV",1)

^SCR("P1PRMCIB","AV",2)
xuchx,ujuek,frgnkohrynrp
^SCR("P1PRMCIB","AV",3)

^SCR("P1PRMCIB","AV",4)

^SCR("P1PRMCIB","AV",5)

^SCR("P1PRMCIB","AV",6)
:wxuchxwjuekwxn
^SCR("P1PRMCIB","AV",7)

^SCR("P1PRMCIB","AV",8)
:(0-tk'1-if)hbshxhyrfshkevk,uraptahotv
^SCR("P1PRMCIB","AV",9)

^SCR("P1PRMCIB","AV",10)
:(0-tk'1-if)xuchx,ujuekiusgunohheotv
^SCR("P1PRMCIB","AV",11)

^SCR("P1PRMCIB","AV",12)
:iusgunhrcjhxhyrfk,nushe
^SCR("P1PRMCIB","AV",13)

^SCR("P1PRMCIB","AV",14)
:iusgunhrcjkvjbv%
^SCR("P1PRMCIB","AV",15)

^SCR("P1PRMCIB","AV",16)
:vrcjkaID
^SCR("P1PRMCIB","AV",17)

^SCR("P1PRMCIB","AV",18)

^SCR("P1PRMCIB","NAME")
qeaiq zegewl oecren
^SCR("P1PRMCIB","P",5,"CRD")
6,12,E,9,0
^SCR("P1PRMCIB","P",5,"HELP")

^SCR("P1PRMCIB","P",5,"LMAX")
9
^SCR("P1PRMCIB","P",5,"MUMPS1")

^SCR("P1PRMCIB","P",5,"MUMPS2")

^SCR("P1PRMCIB","P",5,"MUST")

^SCR("P1PRMCIB","P",5,"TYP")
E
^SCR("P1PRMCIB","P",10,"CRD")
8,18,N,3,0
^SCR("P1PRMCIB","P",10,"HELP")

^SCR("P1PRMCIB","P",10,"LMAX")
3
^SCR("P1PRMCIB","P",10,"MUMPS1")

^SCR("P1PRMCIB","P",10,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMCIB","P",10,"TYP")
N
^SCR("P1PRMCIB","P",15,"CRD")
10,18,N,3,0
^SCR("P1PRMCIB","P",15,"HELP")

^SCR("P1PRMCIB","P",15,"LMAX")
3
^SCR("P1PRMCIB","P",15,"MUMPS1")

^SCR("P1PRMCIB","P",15,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMCIB","P",15,"TYP")
N
^SCR("P1PRMCIB","P",20,"CRD")
12,15,N,6,0
^SCR("P1PRMCIB","P",20,"HELP")

^SCR("P1PRMCIB","P",20,"LMAX")
6
^SCR("P1PRMCIB","P",20,"MUMPS1")

^SCR("P1PRMCIB","P",20,"MUMPS2")

^SCR("P1PRMCIB","P",20,"TYP")
N
^SCR("P1PRMCIB","P",25,"CRD")
14,16,N,5,2
^SCR("P1PRMCIB","P",25,"HELP")

^SCR("P1PRMCIB","P",25,"LMAX")
5
^SCR("P1PRMCIB","P",25,"MUMPS1")

^SCR("P1PRMCIB","P",25,"MUMPS2")

^SCR("P1PRMCIB","P",25,"TYP")
N
^SCR("P1PRMCIB","P",30,"CRD")
16,11,E,10,0
^SCR("P1PRMCIB","P",30,"HELP")

^SCR("P1PRMCIB","P",30,"LMAX")
10
^SCR("P1PRMCIB","P",30,"MUMPS1")

^SCR("P1PRMCIB","P",30,"MUMPS2")

^SCR("P1PRMCIB","P",30,"TYP")
E
^SCR("P1PRMCIB","P","NAME","AH")
25
^SCR("P1PRMCIB","P","NAME","ARM")
10
^SCR("P1PRMCIB","P","NAME","CIBLKH")
5
^SCR("P1PRMCIB","P","NAME","CID")
30
^SCR("P1PRMCIB","P","NAME","KDM")
20
^SCR("P1PRMCIB","P","NAME","MOADL")
15
^SCR("P1PRMCIB","P","NM",5)
CIBLKH
^SCR("P1PRMCIB","P","NM",10)
ARM
^SCR("P1PRMCIB","P","NM",15)
MOADL
^SCR("P1PRMCIB","P","NM",20)
KDM
^SCR("P1PRMCIB","P","NM",25)
AH
^SCR("P1PRMCIB","P","NM",30)
CID
^SCR("P1PRMCIB","P","RB",1)
5,8,19,72
^SCR("P1PRMCN")
H
^SCR("P1PRMCN",1)
                                                                               
^SCR("P1PRMCN",2)
                       # "wihtqpew" zkxrnl mixhnxt #                           
^SCR("P1PRMCN",3)
                                                                               
^SCR("P1PRMCN",4)
                                                                 1]            
^SCR("P1PRMCN",5)
                                            {05  }:   hxet 'qn                 
^SCR("P1PRMCN",6)
                                                                               
^SCR("P1PRMCN",7)
                                  {10            }:   IP zaezk                 
^SCR("P1PRMCN",8)
                                                                               
^SCR("P1PRMCN",9)
                            [1                                                 
^SCR("P1PRMCN",10)
                                                                               
^SCR("P1PRMCN",11)
                                                                               
^SCR("P1PRMCN","A",1)

^SCR("P1PRMCN","A",2)
"—‰ˆ”‘�…—"š‹˜’ŽŒ�‰˜ˆŽ˜”
^SCR("P1PRMCN","A",3)

^SCR("P1PRMCN","A",4)

^SCR("P1PRMCN","A",5)
:ˆ˜…”'‘Ž
^SCR("P1PRMCN","A",6)

^SCR("P1PRMCN","A",7)
:IPš�…š‹
^SCR("P1PRMCN","A",8)

^SCR("P1PRMCN","A",9)

^SCR("P1PRMCN","A",10)

^SCR("P1PRMCN","A",11)

^SCR("P1PRMCN","AV",1)

^SCR("P1PRMCN","AV",2)
"ehypxbue",frgnkohrynrp
^SCR("P1PRMCN","AV",3)

^SCR("P1PRMCN","AV",4)

^SCR("P1PRMCN","AV",5)
:yrupwxn
^SCR("P1PRMCN","AV",6)

^SCR("P1PRMCN","AV",7)
:IP,cu,f
^SCR("P1PRMCN","AV",8)

^SCR("P1PRMCN","AV",9)

^SCR("P1PRMCN","AV",10)

^SCR("P1PRMCN","AV",11)

^SCR("P1PRMCN","NAME")

^SCR("P1PRMCN","P",5,"CRD")
5,44,N,4,0
^SCR("P1PRMCN","P",5,"HELP")

^SCR("P1PRMCN","P",5,"LMAX")
5
^SCR("P1PRMCN","P",5,"MUMPS1")

^SCR("P1PRMCN","P",5,"MUMPS2")

^SCR("P1PRMCN","P",5,"MUST")

^SCR("P1PRMCN","P",5,"TYP")
N
^SCR("P1PRMCN","P",10,"CRD")
7,34,E,15,0
^SCR("P1PRMCN","P",10,"HELP")

^SCR("P1PRMCN","P",10,"LMAX")
15
^SCR("P1PRMCN","P",10,"MUMPS1")

^SCR("P1PRMCN","P",10,"MUMPS2")

^SCR("P1PRMCN","P",10,"MUST")

^SCR("P1PRMCN","P",10,"TYP")
E
^SCR("P1PRMCN","P","NAME","IP")
10
^SCR("P1PRMCN","P","NAME","PORT")
5
^SCR("P1PRMCN","P","NM",5)
PORT
^SCR("P1PRMCN","P","NM",10)
IP
^SCR("P1PRMCN","P","RB",1)
5,29,10,67
^SCR("P1PRMD")
H
^SCR("P1PRMD",1)
                     # (miitqk zegec) zkxrn mixhnxt #                          
^SCR("P1PRMD",2)
                                                                          1]   
^SCR("P1PRMD",3)
                                          : Z-e X-a  migily \mixvln g"ec       
^SCR("P1PRMD",4)
                {07:Z    {05:X   (`l - 0 , ok - 1)           zepnfd g"ec       
^SCR("P1PRMD",5)
                {12:Z    {10:X   (`l - 0 , ok - 1)         zeipeayg g"ec       
^SCR("P1PRMD",6)
                {14:Z    {13:X   (`l - 0 , ok - 1)     dtwda zegewl g"ec       
^SCR("P1PRMD",7)
                {17:Z    {15:X   (`l - 0 , ok - 1)  melyz irvn` itl g"ec       
^SCR("P1PRMD",8)
                                                                               
^SCR("P1PRMD",9)
                {19:  (`l - 0 ,ok - 1) zxvewn dxeva itqk g"ec `ivedl m`d       
^SCR("P1PRMD",10)
                {20:  (`l - 0 ,ok - 1)       dtwda zeipw g"ec `ivedl m`d       
^SCR("P1PRMD",11)
   {22 : hq 'qn {21:  (`l -0,hq itl-2,ok-1) mihixt zxikn g"ec `ivedl m`d       
^SCR("P1PRMD",12)
                {23:  (`l - 0, ok - 1)         zxnyn zeira g"ec `lnl m`d       
^SCR("P1PRMD",13)
                {24:  (`l - 0, ok - 1)                xahvn Z qitcdl m`d       
^SCR("P1PRMD",14)
             {  25}:                                     'tih'-l sqep my       
^SCR("P1PRMD",15)
                {30:         (`l - 0 , ok - 1)    tih llek ehp oeict m`d       
^SCR("P1PRMD",16)
                {35:         (`l - 0 , ok - 1)      g"eca tih ze`xdl m`d       
^SCR("P1PRMD",17)
                {36:                                    Y g"ec witdl m`d       
^SCR("P1PRMD",18)
                {37:     (`l - 0 ,ok - 1) zeg"ec zqtcnl Z-e X qitcdl m`d       
^SCR("P1PRMD",19)
                {38:     (`l - 0,ok-1) elheay zepnfd ilehia wx bivdl m`d       
^SCR("P1PRMD",20)
                {40:         (`l - 0 , ok - 1)   ehexa jeza zexy inc m`d       
^SCR("P1PRMD",21)
  [1                                                                           
^SCR("P1PRMD","A",1)
(�‰‰”‘‹š…‡…ƒ)š‹˜’Ž�‰˜ˆŽ˜”
^SCR("P1PRMD","A",2)

^SCR("P1PRMD","A",3)
:Z-…X-��‰‡‰Œ™\�‰˜–ŒŽ‡"…ƒ
^SCR("P1PRMD","A",4)
:Z:X(€Œ-0,�‹-1)š…�Ž†„‡"…ƒ
^SCR("P1PRMD","A",5)
:Z:X(€Œ-0,�‹-1)š…‰�…�™‡‡"…ƒ
^SCR("P1PRMD","A",6)
:Z:X(€Œ-0,�‹-1)„”—„�š…‡…—Œ‡"…ƒ
^SCR("P1PRMD","A",7)
:Z:X(€Œ-0,�‹-1)�…Œ™š‰’–Ž€‰”Œ‡"…ƒ
^SCR("P1PRMD","A",8)

^SCR("P1PRMD","A",9)
:(€Œ-0,�‹-1)š˜–…—Ž„˜…–�‰”‘‹‡"…ƒ€‰–…„Œ�€„
^SCR("P1PRMD","A",10)
:(€Œ-0,�‹-1)„”—„�š…‰�—‡"…ƒ€‰–…„Œ�€„
^SCR("P1PRMD","A",11)
:ˆ‘'‘Ž:(€Œ-0,ˆ‘‰”Œ-2,�‹-1)�‰ˆ‰˜”š˜‰‹Ž‡"…ƒ€‰–…„Œ�€„
^SCR("P1PRMD","A",12)
:(€Œ-0,�‹-1)š˜Ž™Žš…‰’�‡"…ƒ€ŒŽŒ�€„
^SCR("P1PRMD","A",13)
:(€Œ-0,�‹-1)˜�ˆ–ŽZ‘‰”ƒ„Œ�€„
^SCR("P1PRMD","A",14)
:'”‰ˆ'-Œ“‘…��™
^SCR("P1PRMD","A",15)
:(€Œ-0,�‹-1)”‰ˆŒŒ…‹…ˆ��…‰ƒ”�€„
^SCR("P1PRMD","A",16)
:(€Œ-0,�‹-1)‡"…ƒ�”‰ˆš…€˜„Œ�€„
^SCR("P1PRMD","A",17)
:Y‡"…ƒ—‰”„Œ�€„
^SCR("P1PRMD","A",18)
:(€Œ-0,�‹-1)š…‡"…ƒš‘”ƒŽŒZ-…X‘‰”ƒ„Œ�€„
^SCR("P1PRMD","A",19)
:(€Œ-0,�‹-1)…Œˆ…�™š…�Ž†„‰Œ…ˆ‰�—˜‚‰–„Œ�€„
^SCR("P1PRMD","A",20)
:(€Œ-0,�‹-1)…ˆ…˜�Š…š�š…˜™‰Žƒ�€„
^SCR("P1PRMD","A",21)

^SCR("P1PRMD","AV",1)
(ohhpxf,ujus),frgnohrynrp
^SCR("P1PRMD","AV",2)

^SCR("P1PRMD","AV",3)
:Z-uX-cohjhka\ohrmknj"us
^SCR("P1PRMD","AV",4)
:Z:X(tk-0'if-1),ubnzvj"us
^SCR("P1PRMD","AV",5)
:Z:X(tk-0'if-1),uhbucajj"us
^SCR("P1PRMD","AV",6)
:Z:X(tk-0'if-1)vpevc,ujuekj"us
^SCR("P1PRMD","AV",7)
:Z:X(tk-0'if-1)ouka,hgmnthpkj"us
^SCR("P1PRMD","AV",8)

^SCR("P1PRMD","AV",9)
:(tk-0'if-1),rmuenvrumchpxfj"usthmuvkotv
^SCR("P1PRMD","AV",10)
:(tk-0'if-1)vpevc,uhbej"usthmuvkotv
^SCR("P1PRMD","AV",11)
:yxwxn:(tk-0'yxhpk-2'if-1)ohyhrp,rhfnj"usthmuvkotv
^SCR("P1PRMD","AV",12)
:(tk-0'if-1),rnan,uhgcj"ustknkotv
^SCR("P1PRMD","AV",13)
:(tk-0'if-1)rcymnZxhpsvkotv
^SCR("P1PRMD","AV",14)
:wphyw-k;xuboa
^SCR("P1PRMD","AV",15)
:(tk-0'if-1)phykkufuybiuhspotv
^SCR("P1PRMD","AV",16)
:(tk-0'if-1)j"uscphy,utrvkotv
^SCR("P1PRMD","AV",17)
:Yj"usehpvkotv
^SCR("P1PRMD","AV",18)
:(tk-0'if-1),uj"us,xpsnkZ-uXxhpsvkotv
^SCR("P1PRMD","AV",19)
:(tk-0'if-1)ukyuca,ubnzvhkuyhcerdhmvkotv
^SCR("P1PRMD","AV",20)
:(tk-0'if-1)uyurclu,c,urahnsotv
^SCR("P1PRMD","AV",21)

^SCR("P1PRMD","NAME")

^SCR("P1PRMD","P",5,"CRD")
4,25,N,1,0
^SCR("P1PRMD","P",5,"HELP")

^SCR("P1PRMD","P",5,"LMAX")
3
^SCR("P1PRMD","P",5,"MUMPS1")

^SCR("P1PRMD","P",5,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",5,"TYP")
N
^SCR("P1PRMD","P",7,"CRD")
4,16,N,1,0
^SCR("P1PRMD","P",7,"HELP")

^SCR("P1PRMD","P",7,"LMAX")
3
^SCR("P1PRMD","P",7,"MUMPS1")

^SCR("P1PRMD","P",7,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",7,"TYP")
N
^SCR("P1PRMD","P",10,"CRD")
5,25,N,1,0
^SCR("P1PRMD","P",10,"HELP")

^SCR("P1PRMD","P",10,"LMAX")
3
^SCR("P1PRMD","P",10,"MUMPS1")

^SCR("P1PRMD","P",10,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",10,"TYP")
N
^SCR("P1PRMD","P",12,"CRD")
5,16,N,1,0
^SCR("P1PRMD","P",12,"HELP")

^SCR("P1PRMD","P",12,"LMAX")
3
^SCR("P1PRMD","P",12,"MUMPS1")

^SCR("P1PRMD","P",12,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",12,"TYP")
N
^SCR("P1PRMD","P",13,"CRD")
6,25,N,1,0
^SCR("P1PRMD","P",13,"HELP")

^SCR("P1PRMD","P",13,"LMAX")
3
^SCR("P1PRMD","P",13,"MUMPS1")

^SCR("P1PRMD","P",13,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",13,"TYP")
N
^SCR("P1PRMD","P",14,"CRD")
6,16,N,1,0
^SCR("P1PRMD","P",14,"HELP")

^SCR("P1PRMD","P",14,"LMAX")
3
^SCR("P1PRMD","P",14,"MUMPS1")

^SCR("P1PRMD","P",14,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",14,"TYP")
N
^SCR("P1PRMD","P",15,"CRD")
7,25,N,1,0
^SCR("P1PRMD","P",15,"HELP")

^SCR("P1PRMD","P",15,"LMAX")
3
^SCR("P1PRMD","P",15,"MUMPS1")

^SCR("P1PRMD","P",15,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",15,"TYP")
N
^SCR("P1PRMD","P",17,"CRD")
7,16,N,1,0
^SCR("P1PRMD","P",17,"HELP")

^SCR("P1PRMD","P",17,"LMAX")
3
^SCR("P1PRMD","P",17,"MUMPS1")

^SCR("P1PRMD","P",17,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",17,"TYP")
N
^SCR("P1PRMD","P",19,"CRD")
9,16,N,1,0
^SCR("P1PRMD","P",19,"HELP")

^SCR("P1PRMD","P",19,"LMAX")
3
^SCR("P1PRMD","P",19,"MUMPS1")

^SCR("P1PRMD","P",19,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",19,"MUST")

^SCR("P1PRMD","P",19,"TYP")
N
^SCR("P1PRMD","P",20,"CRD")
10,16,N,1,0
^SCR("P1PRMD","P",20,"HELP")

^SCR("P1PRMD","P",20,"LMAX")
3
^SCR("P1PRMD","P",20,"MUMPS1")

^SCR("P1PRMD","P",20,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",20,"MUST")

^SCR("P1PRMD","P",20,"TYP")
N
^SCR("P1PRMD","P",21,"CRD")
11,16,N,1,0
^SCR("P1PRMD","P",21,"HELP")

^SCR("P1PRMD","P",21,"LMAX")
3
^SCR("P1PRMD","P",21,"MUMPS1")

^SCR("P1PRMD","P",21,"MUMPS2")
D DOCHP^P1PRMD
^SCR("P1PRMD","P",21,"MUST")

^SCR("P1PRMD","P",21,"TYP")
N
^SCR("P1PRMD","P",22,"CRD")
11,3,E,2,0
^SCR("P1PRMD","P",22,"FNC")

^SCR("P1PRMD","P",22,"GLOB")
P1SET
^SCR("P1PRMD","P",22,"HELP")

^SCR("P1PRMD","P",22,"LMAX")
4
^SCR("P1PRMD","P",22,"MUMPS1")

^SCR("P1PRMD","P",22,"MUMPS2")
I NSET,'$D(^P1SET(NSET)) S %SC("ER")=1
^SCR("P1PRMD","P",22,"NLN")
20
^SCR("P1PRMD","P",22,"RZD")
\
^SCR("P1PRMD","P",22,"TOPB")
8
^SCR("P1PRMD","P",22,"TYP")
E
^SCR("P1PRMD","P",23,"CRD")
12,16,N,1,0
^SCR("P1PRMD","P",23,"HELP")

^SCR("P1PRMD","P",23,"LMAX")
3
^SCR("P1PRMD","P",23,"MUMPS1")

^SCR("P1PRMD","P",23,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",23,"MUST")

^SCR("P1PRMD","P",23,"TYP")
N
^SCR("P1PRMD","P",24,"CRD")
13,16,N,1,0
^SCR("P1PRMD","P",24,"HELP")

^SCR("P1PRMD","P",24,"LMAX")
3
^SCR("P1PRMD","P",24,"MUMPS1")

^SCR("P1PRMD","P",24,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",24,"MUST")

^SCR("P1PRMD","P",24,"TYP")
N
^SCR("P1PRMD","P",25,"CRD")
14,19,H,5
^SCR("P1PRMD","P",25,"HELP")

^SCR("P1PRMD","P",25,"LMAX")
5
^SCR("P1PRMD","P",25,"MUMPS1")

^SCR("P1PRMD","P",25,"MUMPS2")

^SCR("P1PRMD","P",25,"TYP")
H
^SCR("P1PRMD","P",30,"CRD")
15,16,N,1,0
^SCR("P1PRMD","P",30,"HELP")

^SCR("P1PRMD","P",30,"LMAX")
3
^SCR("P1PRMD","P",30,"MUMPS1")

^SCR("P1PRMD","P",30,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",30,"MUST")

^SCR("P1PRMD","P",30,"TYP")
N
^SCR("P1PRMD","P",35,"CRD")
16,16,N,1,0
^SCR("P1PRMD","P",35,"HELP")

^SCR("P1PRMD","P",35,"LMAX")
3
^SCR("P1PRMD","P",35,"MUMPS1")

^SCR("P1PRMD","P",35,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",35,"MUST")

^SCR("P1PRMD","P",35,"TYP")
N
^SCR("P1PRMD","P",36,"CRD")
17,16,N,1,0
^SCR("P1PRMD","P",36,"HELP")

^SCR("P1PRMD","P",36,"LMAX")
3
^SCR("P1PRMD","P",36,"MUMPS1")

^SCR("P1PRMD","P",36,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",36,"MUST")

^SCR("P1PRMD","P",36,"TYP")
N
^SCR("P1PRMD","P",37,"CRD")
18,16,N,1,0
^SCR("P1PRMD","P",37,"HELP")

^SCR("P1PRMD","P",37,"LMAX")
3
^SCR("P1PRMD","P",37,"MUMPS1")

^SCR("P1PRMD","P",37,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",37,"MUST")

^SCR("P1PRMD","P",37,"TYP")
N
^SCR("P1PRMD","P",38,"CRD")
19,16,N,1,0
^SCR("P1PRMD","P",38,"HELP")

^SCR("P1PRMD","P",38,"LMAX")
3
^SCR("P1PRMD","P",38,"MUMPS1")

^SCR("P1PRMD","P",38,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",38,"MUST")

^SCR("P1PRMD","P",38,"TYP")
N
^SCR("P1PRMD","P",40,"CRD")
20,16,N,1,0
^SCR("P1PRMD","P",40,"HELP")

^SCR("P1PRMD","P",40,"LMAX")
3
^SCR("P1PRMD","P",40,"MUMPS1")

^SCR("P1PRMD","P",40,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMD","P",40,"MUST")

^SCR("P1PRMD","P",40,"TYP")
N
^SCR("P1PRMD","P","NAME","BITA")
38
^SCR("P1PRMD","P","NAME","BRTDM")
40
^SCR("P1PRMD","P","NAME","DOCHL")
20
^SCR("P1PRMD","P","NAME","DOCHP")
21
^SCR("P1PRMD","P","NAME","DOCHY")
36
^SCR("P1PRMD","P","NAME","HRZ")
23
^SCR("P1PRMD","P","NAME","KZR")
19
^SCR("P1PRMD","P","NAME","NSET")
22
^SCR("P1PRMD","P","NAME","TIPD")
35
^SCR("P1PRMD","P","NAME","TIPNT")
30
^SCR("P1PRMD","P","NAME","TIPPS")
25
^SCR("P1PRMD","P","NAME","XHSB")
10
^SCR("P1PRMD","P","NAME","XHZM")
5
^SCR("P1PRMD","P","NAME","XLKH")
13
^SCR("P1PRMD","P","NAME","XTSH")
15
^SCR("P1PRMD","P","NAME","ZDOCH")
37
^SCR("P1PRMD","P","NAME","ZHSB")
12
^SCR("P1PRMD","P","NAME","ZHZM")
7
^SCR("P1PRMD","P","NAME","ZLKH")
14
^SCR("P1PRMD","P","NAME","ZM")
24
^SCR("P1PRMD","P","NAME","ZTSH")
17
^SCR("P1PRMD","P","NM",5)
XHZM
^SCR("P1PRMD","P","NM",7)
ZHZM
^SCR("P1PRMD","P","NM",10)
XHSB
^SCR("P1PRMD","P","NM",12)
ZHSB
^SCR("P1PRMD","P","NM",13)
XLKH
^SCR("P1PRMD","P","NM",14)
ZLKH
^SCR("P1PRMD","P","NM",15)
XTSH
^SCR("P1PRMD","P","NM",17)
ZTSH
^SCR("P1PRMD","P","NM",19)
KZR
^SCR("P1PRMD","P","NM",20)
DOCHL
^SCR("P1PRMD","P","NM",21)
DOCHP
^SCR("P1PRMD","P","NM",22)
NSET
^SCR("P1PRMD","P","NM",23)
HRZ
^SCR("P1PRMD","P","NM",24)
ZM
^SCR("P1PRMD","P","NM",25)
TIPPS
^SCR("P1PRMD","P","NM",30)
TIPNT
^SCR("P1PRMD","P","NM",35)
TIPD
^SCR("P1PRMD","P","NM",36)
DOCHY
^SCR("P1PRMD","P","NM",37)
ZDOCH
^SCR("P1PRMD","P","NM",38)
BITA
^SCR("P1PRMD","P","NM",40)
BRTDM
^SCR("P1PRMD","P","RB",1)
3,3,22,76
^SCR("P1PRMH1")
H
^SCR("P1PRMH1",1)
                                                                            1] 
^SCR("P1PRMH1",2)
              {07:3- mihixt micew , 2- zeveaw micew,1- a"` itl zepelga xcq     
^SCR("P1PRMH1",3)
                           {12 :        dpnfd zxey jeza mihixt ziaxin zenk     
^SCR("P1PRMH1",4)
                           {17 : (0,1) hixtzay zetqez wx bivdl inei hixtza     
^SCR("P1PRMH1",5)
                           {18 : (0,1)ziwqr dgex`a zeveawd lkn dxiga wecal     
^SCR("P1PRMH1",6)
                           {25 : (0-`l,1-ok)             ldpn cew i"r dpbd     
^SCR("P1PRMH1",7)
                                          {     40} {35 : ihnehe` dgpd cew     
^SCR("P1PRMH1",8)
   {58 :(4- 50 cr ,3- 5 cr ,2-'b` 10 cr,1-lwyd cr ,0-lebir `ll) xign lebir     
^SCR("P1PRMH1",9)
                           {90 : (0-`l,1-ok)             yelza dxikn xyt`l     
^SCR("P1PRMH1",10)
                    {97 : (0-`l,1-ok) dtwda  {96 : `"ka dxikna dxibn geztl     
^SCR("P1PRMH1",11)
                           {98 :      caer i"r dxibn zgiztl dnqiq ywal m`d     
^SCR("P1PRMH1",12)
                           {99 :0 - zeipeayg itl ,1 - zepnfd itl dxzi aygl     
^SCR("P1PRMH1",13)
                                                                               
^SCR("P1PRMH1",14)
 [1                                                                            
^SCR("P1PRMH1","A",1)

^SCR("P1PRMH1","A",2)
:3-�‰ˆ‰˜”�‰ƒ…—,2-š…–…�—�‰ƒ…—,1-�"€‰”Œš…�…Œ‡�˜ƒ‘
^SCR("P1PRMH1","A",3)
:„�Ž†„š˜…™Š…š��‰ˆ‰˜”š‰�˜‰Žš…Ž‹
^SCR("P1PRMH1","A",4)
:(0,1)ˆ‰˜”š�™š…”‘…š—˜‚‰–„Œ‰Ž…‰ˆ‰˜”š�
^SCR("P1PRMH1","A",5)
:(0,1)š‰—‘’„‡…˜€�š…–…�—„Œ‹Ž„˜‰‡�—…ƒ�Œ
^SCR("P1PRMH1","A",6)
:(0-€Œ,1-�‹)Œ„�Žƒ…—‰"’„�‚„
^SCR("P1PRMH1","A",7)
:‰ˆŽ…ˆ…€„‡�„ƒ…—
^SCR("P1PRMH1","A",8)
:(4-50ƒ’,3-5ƒ’,2-'‚€10ƒ’,1-Œ—™„ƒ’,0-Œ…‚‰’€ŒŒ)˜‰‡ŽŒ…‚‰’
^SCR("P1PRMH1","A",9)
:(0-€Œ,1-�‹)™…Œš�„˜‰‹Ž˜™”€Œ
^SCR("P1PRMH1","A",10)
:(0-€Œ,1-�‹)„”—„�:€"‹�„˜‰‹Ž�„˜‰‚Ž‡…š”Œ
^SCR("P1PRMH1","A",11)
:ƒ�…’‰"’„˜‰‚Žš‡‰š”Œ„Ž‘‰‘™—�Œ�€„
^SCR("P1PRMH1","A",12)
:0-š…‰�…�™‡‰”Œ,1-š…�Ž†„‰”Œ„˜š‰�™‡Œ
^SCR("P1PRMH1","A",13)

^SCR("P1PRMH1","A",14)

^SCR("P1PRMH1","AV",1)

^SCR("P1PRMH1","AV",2)
:3-ohyhrpohsue'2-,umuceohsue'1-c"thpk,ubukjcrsx
^SCR("P1PRMH1","AV",3)
:vbnzv,rualu,cohyhrp,hcrhn,unf
^SCR("P1PRMH1","AV",4)
:(0'1)yhrp,ca,upxu,erdhmvkhnuhyhrp,c
^SCR("P1PRMH1","AV",5)
:(0'1),hexgvjurtc,umucevkfnvrhjceusck
^SCR("P1PRMH1","AV",6)
:(0-tk'1-if)kvbnsueh"gvbdv
^SCR("P1PRMH1","AV",7)
:hynuyutvjbvsue
^SCR("P1PRMH1","AV",8)
:(4-50sg'3-5sg'2-wdt10sg'1-keavsg'0-kudhgtkk)rhjnkudhg
^SCR("P1PRMH1","AV",9)
:(0-tk'1-if)auk,cvrhfnraptk
^SCR("P1PRMH1","AV",10)
:(0-tk'1-if)vpevc:t"fcvrhfncvrhdnju,pk
^SCR("P1PRMH1","AV",11)
:scugh"gvrhdn,jh,pkvnxhxaeckotv
^SCR("P1PRMH1","AV",12)
:0-,uhbucajhpk'1-,ubnzvhpkvr,hcajk
^SCR("P1PRMH1","AV",13)

^SCR("P1PRMH1","AV",14)

^SCR("P1PRMH1","NAME")
miillk mixhnxt
^SCR("P1PRMH1","P",7,"CRD")
2,14,N,1,0
^SCR("P1PRMH1","P",7,"HELP")

^SCR("P1PRMH1","P",7,"LMAX")
3
^SCR("P1PRMH1","P",7,"MUMPS1")

^SCR("P1PRMH1","P",7,"MUMPS2")
I HFNUM<1,HFNUM>3 S %SC("ER")=1
^SCR("P1PRMH1","P",7,"TYP")
N
^SCR("P1PRMH1","P",12,"CRD")
3,27,N,3,0
^SCR("P1PRMH1","P",12,"HELP")

^SCR("P1PRMH1","P",12,"LMAX")
4
^SCR("P1PRMH1","P",12,"MUMPS1")

^SCR("P1PRMH1","P",12,"MUMPS2")

^SCR("P1PRMH1","P",12,"TYP")
N
^SCR("P1PRMH1","P",17,"CRD")
4,27,N,3,0
^SCR("P1PRMH1","P",17,"HELP")

^SCR("P1PRMH1","P",17,"LMAX")
4
^SCR("P1PRMH1","P",17,"MUMPS1")

^SCR("P1PRMH1","P",17,"MUMPS2")

^SCR("P1PRMH1","P",17,"TYP")
N
^SCR("P1PRMH1","P",18,"CRD")
5,27,N,3,0
^SCR("P1PRMH1","P",18,"HELP")

^SCR("P1PRMH1","P",18,"LMAX")
4
^SCR("P1PRMH1","P",18,"MUMPS1")

^SCR("P1PRMH1","P",18,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH1","P",18,"MUST")

^SCR("P1PRMH1","P",18,"TYP")
N
^SCR("P1PRMH1","P",25,"CRD")
6,27,N,3,0
^SCR("P1PRMH1","P",25,"HELP")

^SCR("P1PRMH1","P",25,"LMAX")
4
^SCR("P1PRMH1","P",25,"MUMPS1")

^SCR("P1PRMH1","P",25,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH1","P",25,"TYP")
N
^SCR("P1PRMH1","P",35,"CHECK")
Y
^SCR("P1PRMH1","P",35,"CRD")
7,52,N,3,0
^SCR("P1PRMH1","P",35,"CREAT")

^SCR("P1PRMH1","P",35,"FNC")

^SCR("P1PRMH1","P",35,"GLOB")
P1HNH
^SCR("P1PRMH1","P",35,"HELP")

^SCR("P1PRMH1","P",35,"LMAX")
4
^SCR("P1PRMH1","P",35,"MUMPS1")

^SCR("P1PRMH1","P",35,"MUMPS2")

^SCR("P1PRMH1","P",35,"NLN")
20
^SCR("P1PRMH1","P",35,"NS")
H
^SCR("P1PRMH1","P",35,"RZD")
\
^SCR("P1PRMH1","P",35,"TOPB")
8
^SCR("P1PRMH1","P",35,"TYP")
N
^SCR("P1PRMH1","P",35,"VRB")
HNHAU1
^SCR("P1PRMH1","P",40,"CRD")
7,51,H,8
^SCR("P1PRMH1","P",40,"HELP")

^SCR("P1PRMH1","P",40,"LMAX")
8
^SCR("P1PRMH1","P",40,"MUMPS1")
I $G(HNHAU1)["%" S HNHAU1="%"_$G(HNHAU1)
^SCR("P1PRMH1","P",40,"MUMPS2")

^SCR("P1PRMH1","P",40,"OUTPUT")

^SCR("P1PRMH1","P",40,"TYP")
H
^SCR("P1PRMH1","P",58,"CRD")
8,3,N,3,0
^SCR("P1PRMH1","P",58,"HELP")

^SCR("P1PRMH1","P",58,"LMAX")
4
^SCR("P1PRMH1","P",58,"MUMPS1")

^SCR("P1PRMH1","P",58,"MUMPS2")
I IGUL'?1N!(IGUL>4) S %SC("ER")=1
^SCR("P1PRMH1","P",58,"MUST")

^SCR("P1PRMH1","P",58,"TYP")
N
^SCR("P1PRMH1","P",90,"CRD")
9,27,N,3,0
^SCR("P1PRMH1","P",90,"HELP")

^SCR("P1PRMH1","P",90,"LMAX")
4
^SCR("P1PRMH1","P",90,"MUMPS1")

^SCR("P1PRMH1","P",90,"MUMPS2")

^SCR("P1PRMH1","P",90,"MUST")

^SCR("P1PRMH1","P",90,"TYP")
N
^SCR("P1PRMH1","P",96,"CRD")
10,45,N,3,0
^SCR("P1PRMH1","P",96,"HELP")
0 - `l , 2 - tih yi m` wx ,1 - ok
^SCR("P1PRMH1","P",96,"LMAX")
4
^SCR("P1PRMH1","P",96,"MUMPS1")

^SCR("P1PRMH1","P",96,"MUMPS2")
I %S'=1,%S'=2,%S'=0 S %SC("ER")=1
^SCR("P1PRMH1","P",96,"TYP")
N
^SCR("P1PRMH1","P",97,"CRD")
10,20,N,3,0
^SCR("P1PRMH1","P",97,"HELP")

^SCR("P1PRMH1","P",97,"LMAX")
4
^SCR("P1PRMH1","P",97,"MUMPS1")

^SCR("P1PRMH1","P",97,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH1","P",97,"MUST")

^SCR("P1PRMH1","P",97,"TYP")
N
^SCR("P1PRMH1","P",98,"CRD")
11,27,N,1,0
^SCR("P1PRMH1","P",98,"HELP")

^SCR("P1PRMH1","P",98,"LMAX")
4
^SCR("P1PRMH1","P",98,"MUMPS1")

^SCR("P1PRMH1","P",98,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH1","P",98,"MUST")

^SCR("P1PRMH1","P",98,"TYP")
N
^SCR("P1PRMH1","P",99,"CRD")
12,27,N,1,0
^SCR("P1PRMH1","P",99,"HELP")

^SCR("P1PRMH1","P",99,"LMAX")
4
^SCR("P1PRMH1","P",99,"MUMPS1")

^SCR("P1PRMH1","P",99,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH1","P",99,"TYP")
N
^SCR("P1PRMH1","P","NAME","AI")
18
^SCR("P1PRMH1","P","NAME","HFNUM")
7
^SCR("P1PRMH1","P","NAME","HNHAU")
35
^SCR("P1PRMH1","P","NAME","HNHAU1")
40
^SCR("P1PRMH1","P","NAME","IGUL")
58
^SCR("P1PRMH1","P","NAME","ITRAHZ")
99
^SCR("P1PRMH1","P","NAME","KOLMAX")
12
^SCR("P1PRMH1","P","NAME","MNL")
25
^SCR("P1PRMH1","P","NAME","NOPTASR")
97
^SCR("P1PRMH1","P","NAME","NOPTCA")
96
^SCR("P1PRMH1","P","NAME","PTM")
98
^SCR("P1PRMH1","P","NAME","TL")
90
^SCR("P1PRMH1","P","NAME","TSFTFR")
17
^SCR("P1PRMH1","P","NM",7)
HFNUM
^SCR("P1PRMH1","P","NM",12)
KOLMAX
^SCR("P1PRMH1","P","NM",17)
TSFTFR
^SCR("P1PRMH1","P","NM",18)
AI
^SCR("P1PRMH1","P","NM",25)
MNL
^SCR("P1PRMH1","P","NM",35)
HNHAU
^SCR("P1PRMH1","P","NM",40)
HNHAU1
^SCR("P1PRMH1","P","NM",58)
IGUL
^SCR("P1PRMH1","P","NM",90)
TL
^SCR("P1PRMH1","P","NM",96)
NOPTCA
^SCR("P1PRMH1","P","NM",97)
NOPTASR
^SCR("P1PRMH1","P","NM",98)
PTM
^SCR("P1PRMH1","P","NM",99)
ITRAHZ
^SCR("P1PRMH1","P","RB",1)
2,2,15,78
^SCR("P1PRMH2")
H
^SCR("P1PRMH2",1)
                               # zepnfd zqtcdl mixhnxt #                       
^SCR("P1PRMH2",2)
     {05: (0 -`l ,2- mpiga mihixt llek,1-ok)                fkexn oeayg z`ved  
^SCR("P1PRMH2",3)
                         {07 : (0 -`l ,1-ok)           zifrela hixt my qitcdl  
^SCR("P1PRMH2",4)
                         {09 : (0 -`l ,1-ok)      zifrela oeayg qitcdl zexyt`  
^SCR("P1PRMH2",5)
          {10 : (0 -`l , 3 -zetqez wx ,1-ok)            zepn itl dpnfd qitcdl  
^SCR("P1PRMH2",6)
                         {12 : (0 -`l ,1-ok)      mihixtd oia dcxtd ew qitcdl  
^SCR("P1PRMH2",7)
                         {16 : (0 -`l ,1-ok)        lecba ogley 'qn wx qitcdl  
^SCR("P1PRMH2",8)
                         {17 : (0 -`l ,1-ok)             zetqezl zxzek qitcdl  
^SCR("P1PRMH2",9)
    {18:     (0 -`l, 2- ixewn 'tcna wx,1-ok)  hixty zqtcn eze`a zetqez qitcdl  
^SCR("P1PRMH2",10)
                         {20 : (0 -`l ,1-ok)           dpnfda hixt cew qitcdl  
^SCR("P1PRMH2",11)
    {21: 0 - ohwa lkd,2-lecba hixt my wx,1-zelecb zeize`a zetqeze hixt qitcdl  
^SCR("P1PRMH2",12)
             {22: (dyixc itl-2 ,0 -`l ,1-ok)             gahna milehia qitcdl  
^SCR("P1PRMH2",13)
             {23: (dyixc itl-2 ,0 -`l ,1-ok)             gahna 'dxard' qitcdl  
^SCR("P1PRMH2",14)
    {24:  (0 -`l ,2 -mixgaen mihixt wx,1-ok)        wzrd mr cgia dpnfd qitcdl  
^SCR("P1PRMH2",15)
                         {25 : (0 -`l ,1-ok)                 xa zepnfd qitcdl  
^SCR("P1PRMH2",16)
  {32: 1- zxzeka,0- dxey lka TAW-l dxrd  {30: (0 -`l ,1-ok) TAW zepnfd qitcdl  
^SCR("P1PRMH2",17)
  {37:(0,1)gtqd lr oinfnd my qitcdl {35 : (0-`l ,1-ok) xidn ogleyl gtq qitcdl  
^SCR("P1PRMH2",18)
              {40 : (0 -`l ,3-TAW,2-dcrqn+,1-migelyn)       glynl jnqn qitcdl  
^SCR("P1PRMH2",19)
  {43: (0-`l ,1-ok) lehia yelz qitcdl  {42 : (0- `l ,1-ok) oeayga dxrd qitcdl  
^SCR("P1PRMH2",20)
  {45:  0 - qitcdl `l, 2- zipeayge oeayg, 1- oeayga SERVIS NOT INCLUDE qitcdl  
^SCR("P1PRMH2",21)
                         {47 :(0 -`l ,1-ok)  i`xy` yelz mewna gelyn 'z qitcdl  
^SCR("P1PRMH2",22)
                         {50 :       (-1: qitcdl `l) i`xy` yelz ly miwzrd 'qn  
^SCR("P1PRMH2",23)
  {60: zcled mei mdl yiy zegewl qitcdl {55 :     i`xy` yelza gewl zxzi qitcdl  
^SCR("P1PRMH2","A",1)
š…�Ž†„š‘”ƒ„Œ�‰˜ˆŽ˜”
^SCR("P1PRMH2","A",2)
:(0-€Œ,2-��‰‡��‰ˆ‰˜”ŒŒ…‹,1-�‹)†‹…˜Ž�…�™‡š€–…„
^SCR("P1PRMH2","A",3)
:(0-€Œ,1-�‹)š‰†’…Œ�ˆ‰˜”�™‘‰”ƒ„Œ
^SCR("P1PRMH2","A",4)
:(0-€Œ,1-�‹)š‰†’…Œ��…�™‡‘‰”ƒ„Œš…˜™”€
^SCR("P1PRMH2","A",5)
:(0-€Œ,3-š…”‘…š—˜,1-�‹)š…�Ž‰”Œ„�Ž†„‘‰”ƒ„Œ
^SCR("P1PRMH2","A",6)
:(0-€Œ,1-�‹)�‰ˆ‰˜”„�‰�„ƒ˜”„…—‘‰”ƒ„Œ
^SCR("P1PRMH2","A",7)
:(0-€Œ,1-�‹)Œ…ƒ‚��‡Œ…™'‘Ž—˜‘‰”ƒ„Œ
^SCR("P1PRMH2","A",8)
:(0-€Œ,1-�‹)š…”‘…šŒš˜š…‹‘‰”ƒ„Œ
^SCR("P1PRMH2","A",9)
:(0-€Œ,2-‰˜…—Ž'”ƒŽ�—˜,1-�‹)ˆ‰˜”™š‘”ƒŽ…š…€�š…”‘…š‘‰”ƒ„Œ
^SCR("P1PRMH2","A",10)
:(0-€Œ,1-�‹)„�Ž†„�ˆ‰˜”ƒ…—‘‰”ƒ„Œ
^SCR("P1PRMH2","A",11)
:0-�ˆ—�Œ‹„,2-Œ…ƒ‚�ˆ‰˜”�™—˜,1-š…Œ…ƒ‚š…‰š…€�š…”‘…š…ˆ‰˜”‘‰”ƒ„Œ
^SCR("P1PRMH2","A",12)
:(„™‰˜ƒ‰”Œ-2,0-€Œ,1-�‹)‡�ˆŽ��‰Œ…ˆ‰�‘‰”ƒ„Œ
^SCR("P1PRMH2","A",13)
:(„™‰˜ƒ‰”Œ-2,0-€Œ,1-�‹)‡�ˆŽ�'„˜�’„'‘‰”ƒ„Œ
^SCR("P1PRMH2","A",14)
:(0-€Œ,2-�‰˜‡�…Ž�‰ˆ‰˜”—˜,1-�‹)—š’„�’ƒ‡‰�„�Ž†„‘‰”ƒ„Œ
^SCR("P1PRMH2","A",15)
:(0-€Œ,1-�‹)˜�š…�Ž†„‘‰”ƒ„Œ
^SCR("P1PRMH2","A",16)
:1-š˜š…‹�,0-„˜…™Œ‹�TAW-Œ„˜’„:(0-€Œ,1-�‹)TAWš…�Ž†„‘‰”ƒ„Œ
^SCR("P1PRMH2","A",17)
:(0,1)‡”‘„Œ’�‰Ž†Ž„�™‘‰”ƒ„Œ:(0-€Œ,1-�‹)˜‰„Ž�‡Œ…™Œ‡”‘‘‰”ƒ„Œ
^SCR("P1PRMH2","A",18)
:(0-€Œ,3-TAW,2-„ƒ’‘Ž+,1-�‰‡…Œ™Ž)‡Œ™ŽŒŠŽ‘Ž‘‰”ƒ„Œ
^SCR("P1PRMH2","A",19)
:(0-€Œ,1-�‹)Œ…ˆ‰�™…Œš‘‰”ƒ„Œ:(0-€Œ,1-�‹)�…�™‡�„˜’„‘‰”ƒ„Œ
^SCR("P1PRMH2","A",20)
:0-‘‰”ƒ„Œ€Œ,2-š‰�…�™‡…�…�™‡,1-�…�™‡�SERVISNOTINCLUDE‘‰”ƒ„Œ
^SCR("P1PRMH2","A",21)
:(0-€Œ,1-�‹)‰€˜™€™…Œš�…—Ž�‡…Œ™Ž'š‘‰”ƒ„Œ
^SCR("P1PRMH2","A",22)
:(-1:‘‰”ƒ„Œ€Œ)‰€˜™€™…ŒšŒ™�‰—š’„'‘Ž
^SCR("P1PRMH2","A",23)
:šƒŒ…„�…‰�„Œ™‰™š…‡…—Œ‘‰”ƒ„Œ:‰€˜™€™…Œš�‡…—Œš˜š‰‘‰”ƒ„Œ
^SCR("P1PRMH2","AV",1)
,ubnzv,xpsvkohrynrp
^SCR("P1PRMH2","AV",2)
:(0-tk'2-obhjcohyhrpkkuf'1-if)zfurniucaj,tmuv
^SCR("P1PRMH2","AV",3)
:(0-tk'1-if),hzgukcyhrpoaxhpsvk
^SCR("P1PRMH2","AV",4)
:(0-tk'1-if),hzgukciucajxhpsvk,urapt
^SCR("P1PRMH2","AV",5)
:(0-tk'3-,upxu,er'1-if),ubnhpkvbnzvxhpsvk
^SCR("P1PRMH2","AV",6)
:(0-tk'1-if)ohyhrpvihcvsrpvuexhpsvk
^SCR("P1PRMH2","AV",7)
:(0-tk'1-if)kusdcijkuawxnerxhpsvk
^SCR("P1PRMH2","AV",8)
:(0-tk'1-if),upxu,k,r,ufxhpsvk
^SCR("P1PRMH2","AV",9)
:(0-tk'2-hruenwpsncer'1-if)yhrpa,xpsnu,utc,upxu,xhpsvk
^SCR("P1PRMH2","AV",10)
:(0-tk'1-if)vbnzvcyhrpsuexhpsvk
^SCR("P1PRMH2","AV",11)
:0-iyeckfv'2-kusdcyhrpoaer'1-,ukusd,uh,utc,upxu,uyhrpxhpsvk
^SCR("P1PRMH2","AV",12)
:(vahrshpk-2'0-tk'1-if)jcyncohkuyhcxhpsvk
^SCR("P1PRMH2","AV",13)
:(vahrshpk-2'0-tk'1-if)jcyncwvrcgvwxhpsvk
^SCR("P1PRMH2","AV",14)
:(0-tk'2-ohrjcunohyhrper'1-if)e,gvogsjhcvbnzvxhpsvk
^SCR("P1PRMH2","AV",15)
:(0-tk'1-if)rc,ubnzvxhpsvk
^SCR("P1PRMH2","AV",16)
:1-,r,ufc'0-vruakfcTAW-kvrgv:(0-tk'1-if)TAW,ubnzvxhpsvk
^SCR("P1PRMH2","AV",17)
:(0'1)jpxvkgihnznvoaxhpsvk:(0-tk'1-if)rhvnijkuakjpxxhpsvk
^SCR("P1PRMH2","AV",18)
:(0-tk'3-TAW'2-vsgxn+'1-ohjukan)jkanklnxnxhpsvk
^SCR("P1PRMH2","AV",19)
:(0-tk'1-if)kuyhcauk,xhpsvk:(0-tk'1-if)iucajcvrgvxhpsvk
^SCR("P1PRMH2","AV",20)
:0-xhpsvktk'2-,hbucajuiucaj'1-iucajcSERVISNOTINCLUDExhpsvk
^SCR("P1PRMH2","AV",21)
:(0-tk'1-if)htratauk,ouencjukanw,xhpsvk
^SCR("P1PRMH2","AV",22)
:(-1:xhpsvktk)htratauk,kaohe,gvwxn
^SCR("P1PRMH2","AV",23)
:,skuvouhovkaha,ujuekxhpsvk:htratauk,cjuek,r,hxhpsvk
^SCR("P1PRMH2","NAME")
zepnfd zqtcdl mixhnxt
^SCR("P1PRMH2","P",5,"CRD")
2,5,N,1,0
^SCR("P1PRMH2","P",5,"HELP")

^SCR("P1PRMH2","P",5,"LMAX")
3
^SCR("P1PRMH2","P",5,"MUMPS1")

^SCR("P1PRMH2","P",5,"MUMPS2")
I HSBRKZ'=1,HSBRKZ'=2,HSBRKZ'=0 S %SC("ER")=1
^SCR("P1PRMH2","P",5,"TYP")
N
^SCR("P1PRMH2","P",7,"CRD")
3,25,N,1,0
^SCR("P1PRMH2","P",7,"HELP")

^SCR("P1PRMH2","P",7,"LMAX")
4
^SCR("P1PRMH2","P",7,"MUMPS1")

^SCR("P1PRMH2","P",7,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",7,"MUST")

^SCR("P1PRMH2","P",7,"TYP")
N
^SCR("P1PRMH2","P",9,"CRD")
4,25,N,1,0
^SCR("P1PRMH2","P",9,"HELP")

^SCR("P1PRMH2","P",9,"LMAX")
4
^SCR("P1PRMH2","P",9,"MUMPS1")

^SCR("P1PRMH2","P",9,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",9,"MUST")

^SCR("P1PRMH2","P",9,"TYP")
N
^SCR("P1PRMH2","P",10,"CRD")
5,10,N,1,0
^SCR("P1PRMH2","P",10,"HELP")

^SCR("P1PRMH2","P",10,"LMAX")
4
^SCR("P1PRMH2","P",10,"MUMPS1")

^SCR("P1PRMH2","P",10,"MUMPS2")
I MANA'=0,MANA'=1,MANA'=3 S %SC("ER")=1
^SCR("P1PRMH2","P",10,"MUST")

^SCR("P1PRMH2","P",10,"TYP")
N
^SCR("P1PRMH2","P",12,"CRD")
6,25,N,1,0
^SCR("P1PRMH2","P",12,"HELP")

^SCR("P1PRMH2","P",12,"LMAX")
4
^SCR("P1PRMH2","P",12,"MUMPS1")

^SCR("P1PRMH2","P",12,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",12,"TYP")
N
^SCR("P1PRMH2","P",16,"CRD")
7,25,N,1,0
^SCR("P1PRMH2","P",16,"HELP")

^SCR("P1PRMH2","P",16,"LMAX")
4
^SCR("P1PRMH2","P",16,"MUMPS1")

^SCR("P1PRMH2","P",16,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",16,"MUST")

^SCR("P1PRMH2","P",16,"TYP")
N
^SCR("P1PRMH2","P",17,"CRD")
8,25,N,1,0
^SCR("P1PRMH2","P",17,"HELP")

^SCR("P1PRMH2","P",17,"LMAX")
4
^SCR("P1PRMH2","P",17,"MUMPS1")

^SCR("P1PRMH2","P",17,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",17,"MUST")

^SCR("P1PRMH2","P",17,"TYP")
N
^SCR("P1PRMH2","P",18,"CRD")
9,4,N,1,0
^SCR("P1PRMH2","P",18,"HELP")

^SCR("P1PRMH2","P",18,"LMAX")
3
^SCR("P1PRMH2","P",18,"MUMPS1")

^SCR("P1PRMH2","P",18,"MUMPS2")
I TSFTIED>2 S %SC("ER")=1
^SCR("P1PRMH2","P",18,"TYP")
N
^SCR("P1PRMH2","P",20,"CRD")
10,25,N,1,0
^SCR("P1PRMH2","P",20,"HELP")

^SCR("P1PRMH2","P",20,"LMAX")
4
^SCR("P1PRMH2","P",20,"MUMPS1")

^SCR("P1PRMH2","P",20,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",20,"MUST")

^SCR("P1PRMH2","P",20,"TYP")
N
^SCR("P1PRMH2","P",21,"CRD")
11,4,N,1,0
^SCR("P1PRMH2","P",21,"HELP")

^SCR("P1PRMH2","P",21,"LMAX")
3
^SCR("P1PRMH2","P",21,"MUMPS1")

^SCR("P1PRMH2","P",21,"MUMPS2")
I BIGNAME'=1,BIGNAME'=2,BIGNAME'=0 S %SC("ER")=1
^SCR("P1PRMH2","P",21,"MUST")

^SCR("P1PRMH2","P",21,"TYP")
N
^SCR("P1PRMH2","P",22,"CRD")
12,13,N,1,0
^SCR("P1PRMH2","P",22,"HELP")

^SCR("P1PRMH2","P",22,"LMAX")
3
^SCR("P1PRMH2","P",22,"MUMPS1")

^SCR("P1PRMH2","P",22,"MUMPS2")
I HZMBIT'=0,HZMBIT'=1,HZMBIT'=2 S %SC("ER")=1
^SCR("P1PRMH2","P",22,"MUST")

^SCR("P1PRMH2","P",22,"TYP")
N
^SCR("P1PRMH2","P",23,"CRD")
13,13,N,1,0
^SCR("P1PRMH2","P",23,"HELP")

^SCR("P1PRMH2","P",23,"LMAX")
3
^SCR("P1PRMH2","P",23,"MUMPS1")

^SCR("P1PRMH2","P",23,"MUMPS2")
I HZMHV'=0,HZMHV'=1,HZMHV'=2 S %SC("ER")=1
^SCR("P1PRMH2","P",23,"MUST")

^SCR("P1PRMH2","P",23,"TYP")
N
^SCR("P1PRMH2","P",24,"CRD")
14,4,N,1,0
^SCR("P1PRMH2","P",24,"HELP")

^SCR("P1PRMH2","P",24,"LMAX")
3
^SCR("P1PRMH2","P",24,"MUMPS1")

^SCR("P1PRMH2","P",24,"MUMPS2")
I HZMDBL'=1,HZMDBL'=2,HZMDBL'=0 S %SC("ER")=1
^SCR("P1PRMH2","P",24,"TYP")
N
^SCR("P1PRMH2","P",25,"CRD")
15,25,N,1,0
^SCR("P1PRMH2","P",25,"HELP")

^SCR("P1PRMH2","P",25,"LMAX")
4
^SCR("P1PRMH2","P",25,"MUMPS1")

^SCR("P1PRMH2","P",25,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",25,"TYP")
N
^SCR("P1PRMH2","P",30,"CRD")
16,41,N,1,0
^SCR("P1PRMH2","P",30,"HELP")

^SCR("P1PRMH2","P",30,"LMAX")
3
^SCR("P1PRMH2","P",30,"MUMPS1")

^SCR("P1PRMH2","P",30,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",30,"MUST")

^SCR("P1PRMH2","P",30,"TYP")
N
^SCR("P1PRMH2","P",32,"CRD")
16,2,N,1,0
^SCR("P1PRMH2","P",32,"HELP")

^SCR("P1PRMH2","P",32,"LMAX")
3
^SCR("P1PRMH2","P",32,"MUMPS1")

^SCR("P1PRMH2","P",32,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",32,"TYP")
N
^SCR("P1PRMH2","P",35,"CRD")
17,36,N,1,0
^SCR("P1PRMH2","P",35,"HELP")

^SCR("P1PRMH2","P",35,"LMAX")
4
^SCR("P1PRMH2","P",35,"MUMPS1")

^SCR("P1PRMH2","P",35,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",35,"MUST")

^SCR("P1PRMH2","P",35,"TYP")
N
^SCR("P1PRMH2","P",37,"CRD")
17,2,N,1,0
^SCR("P1PRMH2","P",37,"HELP")

^SCR("P1PRMH2","P",37,"LMAX")
3
^SCR("P1PRMH2","P",37,"MUMPS1")

^SCR("P1PRMH2","P",37,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",37,"MUST")

^SCR("P1PRMH2","P",37,"TYP")
N
^SCR("P1PRMH2","P",40,"CRD")
18,14,N,1,0
^SCR("P1PRMH2","P",40,"HELP")

^SCR("P1PRMH2","P",40,"LMAX")
4
^SCR("P1PRMH2","P",40,"MUMPS1")

^SCR("P1PRMH2","P",40,"MUMPS2")
I HZMMSL>3 S %SC("ER")=1
^SCR("P1PRMH2","P",40,"MUST")

^SCR("P1PRMH2","P",40,"TYP")
N
^SCR("P1PRMH2","P",42,"CRD")
19,39,N,1,0
^SCR("P1PRMH2","P",42,"HELP")

^SCR("P1PRMH2","P",42,"LMAX")
4
^SCR("P1PRMH2","P",42,"MUMPS1")

^SCR("P1PRMH2","P",42,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",42,"TYP")
N
^SCR("P1PRMH2","P",43,"CRD")
19,2,N,1,0
^SCR("P1PRMH2","P",43,"HELP")

^SCR("P1PRMH2","P",43,"LMAX")
3
^SCR("P1PRMH2","P",43,"MUMPS1")

^SCR("P1PRMH2","P",43,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",43,"MUST")

^SCR("P1PRMH2","P",43,"TYP")
N
^SCR("P1PRMH2","P",45,"CRD")
20,2,N,1,0
^SCR("P1PRMH2","P",45,"HELP")

^SCR("P1PRMH2","P",45,"LMAX")
3
^SCR("P1PRMH2","P",45,"MUMPS1")

^SCR("P1PRMH2","P",45,"MUMPS2")
I BOTHB<0!(BOTHB>2)!(BOTHB'?1N) S %SC("ER")=1
^SCR("P1PRMH2","P",45,"MUST")

^SCR("P1PRMH2","P",45,"TYP")
N
^SCR("P1PRMH2","P",47,"CRD")
21,25,N,1,0
^SCR("P1PRMH2","P",47,"HELP")

^SCR("P1PRMH2","P",47,"LMAX")
4
^SCR("P1PRMH2","P",47,"MUMPS1")

^SCR("P1PRMH2","P",47,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",47,"MUST")

^SCR("P1PRMH2","P",47,"TYP")
N
^SCR("P1PRMH2","P",50,"CRD")
22,25,N,2,0
^SCR("P1PRMH2","P",50,"HELP")

^SCR("P1PRMH2","P",50,"LMAX")
4
^SCR("P1PRMH2","P",50,"MUMPS1")

^SCR("P1PRMH2","P",50,"MUMPS2")

^SCR("P1PRMH2","P",50,"MUST")

^SCR("P1PRMH2","P",50,"TYP")
N
^SCR("P1PRMH2","P",55,"CRD")
23,39,N,1,0
^SCR("P1PRMH2","P",55,"HELP")

^SCR("P1PRMH2","P",55,"LMAX")
4
^SCR("P1PRMH2","P",55,"MUMPS1")

^SCR("P1PRMH2","P",55,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",55,"MUST")

^SCR("P1PRMH2","P",55,"TYP")
N
^SCR("P1PRMH2","P",60,"CRD")
23,2,N,1,0
^SCR("P1PRMH2","P",60,"HELP")

^SCR("P1PRMH2","P",60,"LMAX")
3
^SCR("P1PRMH2","P",60,"MUMPS1")

^SCR("P1PRMH2","P",60,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH2","P",60,"TYP")
N
^SCR("P1PRMH2","P","NAME","ASR")
50
^SCR("P1PRMH2","P","NAME","ASRITRA")
55
^SCR("P1PRMH2","P","NAME","BIGNAME")
21
^SCR("P1PRMH2","P","NAME","BOTHB")
45
^SCR("P1PRMH2","P","NAME","HEADSH")
16
^SCR("P1PRMH2","P","NAME","HRA2")
42
^SCR("P1PRMH2","P","NAME","HSBENG")
9
^SCR("P1PRMH2","P","NAME","HSBRKZ")
5
^SCR("P1PRMH2","P","NAME","HZMBAR")
25
^SCR("P1PRMH2","P","NAME","HZMBIT")
22
^SCR("P1PRMH2","P","NAME","HZMDBL")
24
^SCR("P1PRMH2","P","NAME","HZMHV")
23
^SCR("P1PRMH2","P","NAME","HZMMSL")
40
^SCR("P1PRMH2","P","NAME","JOMHL")
60
^SCR("P1PRMH2","P","NAME","LINE")
12
^SCR("P1PRMH2","P","NAME","MANA")
10
^SCR("P1PRMH2","P","NAME","NOHZMPAR")
20
^SCR("P1PRMH2","P","NAME","NOKOTTSF")
17
^SCR("P1PRMH2","P","NAME","SEFAHNM")
37
^SCR("P1PRMH2","P","NAME","SHEML")
7
^SCR("P1PRMH2","P","NAME","TAWHRKOT")
32
^SCR("P1PRMH2","P","NAME","TAWHZ")
30
^SCR("P1PRMH2","P","NAME","TAWS")
35
^SCR("P1PRMH2","P","NAME","TLBIT")
43
^SCR("P1PRMH2","P","NAME","TMASR")
47
^SCR("P1PRMH2","P","NAME","TSFTIED")
18
^SCR("P1PRMH2","P","NM",5)
HSBRKZ
^SCR("P1PRMH2","P","NM",7)
SHEML
^SCR("P1PRMH2","P","NM",9)
HSBENG
^SCR("P1PRMH2","P","NM",10)
MANA
^SCR("P1PRMH2","P","NM",12)
LINE
^SCR("P1PRMH2","P","NM",16)
HEADSH
^SCR("P1PRMH2","P","NM",17)
NOKOTTSF
^SCR("P1PRMH2","P","NM",18)
TSFTIED
^SCR("P1PRMH2","P","NM",20)
NOHZMPAR
^SCR("P1PRMH2","P","NM",21)
BIGNAME
^SCR("P1PRMH2","P","NM",22)
HZMBIT
^SCR("P1PRMH2","P","NM",23)
HZMHV
^SCR("P1PRMH2","P","NM",24)
HZMDBL
^SCR("P1PRMH2","P","NM",25)
HZMBAR
^SCR("P1PRMH2","P","NM",30)
TAWHZ
^SCR("P1PRMH2","P","NM",32)
TAWHRKOT
^SCR("P1PRMH2","P","NM",35)
TAWS
^SCR("P1PRMH2","P","NM",37)
SEFAHNM
^SCR("P1PRMH2","P","NM",40)
HZMMSL
^SCR("P1PRMH2","P","NM",42)
HRA2
^SCR("P1PRMH2","P","NM",43)
TLBIT
^SCR("P1PRMH2","P","NM",45)
BOTHB
^SCR("P1PRMH2","P","NM",47)
TMASR
^SCR("P1PRMH2","P","NM",50)
ASR
^SCR("P1PRMH2","P","NM",55)
ASRITRA
^SCR("P1PRMH2","P","NM",60)
JOMHL
^SCR("P1PRMH3")
H
^SCR("P1PRMH3",1)
                             # dcrqnl dpnfd mixhnxt zxcbd #                    
^SCR("P1PRMH3",2)
                                                                           1]  
^SCR("P1PRMH3",3)
                     {15 :   (0-`l,1-ok)          xg` xvlnn dpnfd zpbd         
^SCR("P1PRMH3",4)
                     {17 :0- xbqy in ,1- dpnfd ligzdy in itl sqk zxitq         
^SCR("P1PRMH3",5)
                     {20 :              cala qihxk i"r xvln zqipk oniq         
^SCR("P1PRMH3",6)
                     {25 : (0-`l, 2-ldpn mb,1-ok) xvln ly zegkep wecal         
^SCR("P1PRMH3",7)
                  {45    : xa ogleyl {40    : libx ogleyl menipin xign         
^SCR("P1PRMH3",8)
                     {55 : (%) xa zexy inc      {50 : xa ogleyl dgpd %         
^SCR("P1PRMH3",9)
                     {60 :                        (xa) xidn ogley xtqn         
^SCR("P1PRMH3",10)
                     {61 : (0-`l,1-ok) oeayg zligza gewl 'qn le`yl m`d         
^SCR("P1PRMH3",11)
                     {63 : 2- dpey ,0- 0 ,1- 1:xidn ogleya micreq xtqn         
^SCR("P1PRMH3",12)
                           dcyl xefgl oeayg zxibq ixg` xidn ogleya m`d         
^SCR("P1PRMH3",13)
                     {64 :  2 - xvln 'qn ,1 - ogley xtqn ,0 - hixt cew         
^SCR("P1PRMH3",14)
                     {65 :   (0-`l,1-ok)       xidn ogleya dgpd `zli`y         
^SCR("P1PRMH3",15)
              {72 : (0-`l,1-ok) xidn ogleya melyz seqa dxrdl qpkdl m`d         
^SCR("P1PRMH3",16)
              {80 :    TAKE AWAY-l dgpd%  {75 : TAKE AWAY-l ogley xtqn         
^SCR("P1PRMH3",17)
                       {                81}: TAW ogleyl reaw dxrd hqwh         
^SCR("P1PRMH3",18)
                                         {82    }:"oinfnd my" hixt 'qn         
^SCR("P1PRMH3",19)
                     {83 :(0-`l,1-ok) TAW zkxrna zetqez oelg geztl m`d         
^SCR("P1PRMH3",20)
                     {87 :       "FIRE" drcedl dpnfd zlaw oia zewc 'qn         
^SCR("P1PRMH3",21)
                     {88 :0 -zxnyn seqa,1 -dceard jldna onefna mitih zclwd     
^SCR("P1PRMH3",22)
  {95  }:dry cr {92  }:dryn {                 90} {89   : "dgha`" hixt 'qn     
^SCR("P1PRMH3",23)
 [1                                                                            
^SCR("P1PRMH3","A",1)
„ƒ’‘ŽŒ„�Ž†„�‰˜ˆŽ˜”š˜ƒ‚„
^SCR("P1PRMH3","A",2)

^SCR("P1PRMH3","A",3)
:(0-€Œ,1-�‹)˜‡€˜–ŒŽŽ„�Ž†„š�‚„
^SCR("P1PRMH3","A",4)
:0-˜‚‘™‰Ž,1-„�Ž†„Œ‰‡š„™‰Ž‰”Œ“‘‹š˜‰”‘
^SCR("P1PRMH3","A",5)
:ƒ�Œ�‘‰ˆ˜‹‰"’˜–ŒŽš‘‰�‹�Ž‰‘
^SCR("P1PRMH3","A",6)
:(0-€Œ,2-Œ„�Ž�‚,1-�‹)˜–ŒŽŒ™š…‡‹…�—…ƒ�Œ
^SCR("P1PRMH3","A",7)
:˜��‡Œ…™Œ:Œ‰‚˜�‡Œ…™Œ�…Ž‰�‰Ž˜‰‡Ž
^SCR("P1PRMH3","A",8)
:(%)˜�š…˜™‰Žƒ:˜��‡Œ…™Œ„‡�„%
^SCR("P1PRMH3","A",9)
:(˜�)˜‰„Ž�‡Œ…™˜”‘Ž
^SCR("P1PRMH3","A",10)
:(0-€Œ,1-�‹)�…�™‡šŒ‰‡š�‡…—Œ'‘ŽŒ…€™Œ�€„
^SCR("P1PRMH3","A",11)
:2-„�…™,0-0,1-1:˜‰„Ž�‡Œ…™��‰ƒ’…‘˜”‘Ž
^SCR("P1PRMH3","A",12)
„ƒ™Œ˜…†‡Œ�…�™‡š˜‰‚‘‰˜‡€˜‰„Ž�‡Œ…™��€„
^SCR("P1PRMH3","A",13)
:2-˜–ŒŽ'‘Ž,1-�‡Œ…™˜”‘Ž,0-ˆ‰˜”ƒ…—
^SCR("P1PRMH3","A",14)
:(0-€Œ,1-�‹)˜‰„Ž�‡Œ…™�„‡�„€šŒ‰€™
^SCR("P1PRMH3","A",15)
:(0-€Œ,1-�‹)˜‰„Ž�‡Œ…™��…Œ™š“…‘�„˜’„Œ‘�‹„Œ�€„
^SCR("P1PRMH3","A",16)
:TAKEAWAY-Œ„‡�„%:TAKEAWAY-Œ�‡Œ…™˜”‘Ž
^SCR("P1PRMH3","A",17)
:TAW�‡Œ…™Œ’…�—„˜’„ˆ‘—ˆ
^SCR("P1PRMH3","A",18)
:"�‰Ž†Ž„�™"ˆ‰˜”'‘Ž
^SCR("P1PRMH3","A",19)
:(0-€Œ,1-�‹)TAWš‹˜’Ž�š…”‘…š�…Œ‡‡…š”Œ�€„
^SCR("P1PRMH3","A",20)
:"FIRE"„’ƒ…„Œ„�Ž†„šŒ�—�‰�š…—ƒ'‘Ž
^SCR("P1PRMH3","A",21)
:0-š˜Ž™Ž“…‘�,1-„ƒ…�’„ŠŒ„Ž��Ž…†Ž��‰”‰ˆšƒŒ—„
^SCR("P1PRMH3","A",22)
:„’™ƒ’:„’™Ž:"„‡ˆ�€"ˆ‰˜”'‘Ž
^SCR("P1PRMH3","A",23)

^SCR("P1PRMH3","AV",1)
vsgxnkvbnzvohrynrp,rsdv
^SCR("P1PRMH3","AV",2)

^SCR("P1PRMH3","AV",3)
:(0-tk'1-if)rjtrmknnvbnzv,bdv
^SCR("P1PRMH3","AV",4)
:0-rdxahn'1-vbnzvkhj,vahnhpk;xf,rhpx
^SCR("P1PRMH3","AV",5)
:sckcxhyrfh"grmkn,xhbfinhx
^SCR("P1PRMH3","AV",6)
:(0-tk'2-kvbnod'1-if)rmknka,ujfubeusck
^SCR("P1PRMH3","AV",7)
:rcijkuak:khdrijkuakounhbhnrhjn
^SCR("P1PRMH3","AV",8)
:(%)rc,urahns:rcijkuakvjbv%
^SCR("P1PRMH3","AV",9)
:(rc)rhvnijkuarpxn
^SCR("P1PRMH3","AV",10)
:(0-tk'1-if)iucaj,khj,cjuekwxnkutakotv
^SCR("P1PRMH3","AV",11)
:2-vbua'0-0'1-1:rhvnijkuacohsguxrpxn
^SCR("P1PRMH3","AV",12)
vsakruzjkiucaj,rhdxhrjtrhvnijkuacotv
^SCR("P1PRMH3","AV",13)
:2-rmknwxn'1-ijkuarpxn'0-yhrpsue
^SCR("P1PRMH3","AV",14)
:(0-tk'1-if)rhvnijkuacvjbvt,khta
^SCR("P1PRMH3","AV",15)
:(0-tk'1-if)rhvnijkuacouka,;uxcvrgvkxbfvkotv
^SCR("P1PRMH3","AV",16)
:TAKEAWAY-kvjbv%:TAKEAWAY-kijkuarpxn
^SCR("P1PRMH3","AV",17)
:TAWijkuakgucevrgvyxey
^SCR("P1PRMH3","AV",18)
:"ihnznvoa"yhrpwxn
^SCR("P1PRMH3","AV",19)
:(0-tk'1-if)TAW,frgnc,upxu,iukjju,pkotv
^SCR("P1PRMH3","AV",20)
:"FIRE"vgsuvkvbnzv,kceihc,ueswxn
^SCR("P1PRMH3","AV",21)
:0-,rnan;uxc'1-vsucgvlkvncinuzncohphy,skev
^SCR("P1PRMH3","AV",22)
:vgasg:vgan:"vjyct"yhrpwxn
^SCR("P1PRMH3","AV",23)

^SCR("P1PRMH3","NAME")
dcrqnl mixhnxt
^SCR("P1PRMH3","P",15,"CRD")
3,21,N,3,0
^SCR("P1PRMH3","P",15,"HELP")

^SCR("P1PRMH3","P",15,"LMAX")
4
^SCR("P1PRMH3","P",15,"MUMPS1")

^SCR("P1PRMH3","P",15,"MUMPS2")
D MLZ^P1PRMH
^SCR("P1PRMH3","P",15,"MUST")

^SCR("P1PRMH3","P",15,"TYP")
N
^SCR("P1PRMH3","P",17,"CRD")
4,21,N,3,0
^SCR("P1PRMH3","P",17,"HELP")

^SCR("P1PRMH3","P",17,"LMAX")
4
^SCR("P1PRMH3","P",17,"MUMPS1")

^SCR("P1PRMH3","P",17,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH3","P",17,"TYP")
N
^SCR("P1PRMH3","P",20,"CRD")
5,21,E,1,0
^SCR("P1PRMH3","P",20,"HELP")
qihxk ly ihpbn qta oey`x oniq cilwdl `p
^SCR("P1PRMH3","P",20,"LMAX")
4
^SCR("P1PRMH3","P",20,"MUMPS1")

^SCR("P1PRMH3","P",20,"MUMPS2")
I MLZCARD?1N S %SC("ER")=1
^SCR("P1PRMH3","P",20,"TYP")
E
^SCR("P1PRMH3","P",25,"CRD")
6,21,N,3,0
^SCR("P1PRMH3","P",25,"HELP")

^SCR("P1PRMH3","P",25,"LMAX")
4
^SCR("P1PRMH3","P",25,"MUMPS1")

^SCR("P1PRMH3","P",25,"MUMPS2")
I BDNOCH'=1,BDNOCH'=2,BDNOCH'=0 S %SC("ER")=1
^SCR("P1PRMH3","P",25,"MUST")

^SCR("P1PRMH3","P",25,"TYP")
N
^SCR("P1PRMH3","P",40,"CRD")
7,37,N,7,2
^SCR("P1PRMH3","P",40,"HELP")

^SCR("P1PRMH3","P",40,"LMAX")
7
^SCR("P1PRMH3","P",40,"MUMPS1")

^SCR("P1PRMH3","P",40,"MUMPS2")

^SCR("P1PRMH3","P",40,"TYP")
N
^SCR("P1PRMH3","P",45,"CRD")
7,18,N,7,2
^SCR("P1PRMH3","P",45,"HELP")

^SCR("P1PRMH3","P",45,"LMAX")
7
^SCR("P1PRMH3","P",45,"MUMPS1")

^SCR("P1PRMH3","P",45,"MUMPS2")

^SCR("P1PRMH3","P",45,"TYP")
N
^SCR("P1PRMH3","P",50,"CRD")
8,48,N,3,0
^SCR("P1PRMH3","P",50,"HELP")

^SCR("P1PRMH3","P",50,"LMAX")
4
^SCR("P1PRMH3","P",50,"MUMPS1")

^SCR("P1PRMH3","P",50,"MUMPS2")

^SCR("P1PRMH3","P",50,"TYP")
N
^SCR("P1PRMH3","P",55,"CRD")
8,21,N,4,1
^SCR("P1PRMH3","P",55,"HELP")

^SCR("P1PRMH3","P",55,"LMAX")
4
^SCR("P1PRMH3","P",55,"MUMPS1")

^SCR("P1PRMH3","P",55,"MUMPS2")

^SCR("P1PRMH3","P",55,"TYP")
N
^SCR("P1PRMH3","P",60,"CRD")
9,21,N,3,0
^SCR("P1PRMH3","P",60,"HELP")

^SCR("P1PRMH3","P",60,"LMAX")
4
^SCR("P1PRMH3","P",60,"MUMPS1")

^SCR("P1PRMH3","P",60,"MUMPS2")

^SCR("P1PRMH3","P",60,"TYP")
N
^SCR("P1PRMH3","P",61,"CRD")
10,21,N,3,0
^SCR("P1PRMH3","P",61,"HELP")

^SCR("P1PRMH3","P",61,"LMAX")
4
^SCR("P1PRMH3","P",61,"MUMPS1")

^SCR("P1PRMH3","P",61,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH3","P",61,"MUST")

^SCR("P1PRMH3","P",61,"TYP")
N
^SCR("P1PRMH3","P",63,"CRD")
11,21,N,3,0
^SCR("P1PRMH3","P",63,"HELP")

^SCR("P1PRMH3","P",63,"LMAX")
4
^SCR("P1PRMH3","P",63,"MUMPS1")

^SCR("P1PRMH3","P",63,"MUMPS2")
I MSPSD'=0,MSPSD'=1,MSPSD'=2 S %SC("ER")=1
^SCR("P1PRMH3","P",63,"TYP")
N
^SCR("P1PRMH3","P",64,"CRD")
13,21,N,3,0
^SCR("P1PRMH3","P",64,"HELP")

^SCR("P1PRMH3","P",64,"LMAX")
4
^SCR("P1PRMH3","P",64,"MUMPS1")

^SCR("P1PRMH3","P",64,"MUMPS2")
I "012"'[SHSH!($L(SHSH)'=1) S %SC("ER")=1
^SCR("P1PRMH3","P",64,"MUST")

^SCR("P1PRMH3","P",64,"TYP")
N
^SCR("P1PRMH3","P",65,"CRD")
14,21,N,3,0
^SCR("P1PRMH3","P",65,"HELP")

^SCR("P1PRMH3","P",65,"LMAX")
4
^SCR("P1PRMH3","P",65,"MUMPS1")

^SCR("P1PRMH3","P",65,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH3","P",65,"TYP")
N
^SCR("P1PRMH3","P",72,"CRD")
15,14,N,3,0
^SCR("P1PRMH3","P",72,"HELP")

^SCR("P1PRMH3","P",72,"LMAX")
4
^SCR("P1PRMH3","P",72,"MUMPS1")

^SCR("P1PRMH3","P",72,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH3","P",72,"TYP")
N
^SCR("P1PRMH3","P",75,"CRD")
16,42,N,3,0
^SCR("P1PRMH3","P",75,"HELP")

^SCR("P1PRMH3","P",75,"LMAX")
4
^SCR("P1PRMH3","P",75,"MUMPS1")

^SCR("P1PRMH3","P",75,"MUMPS2")

^SCR("P1PRMH3","P",75,"MUST")

^SCR("P1PRMH3","P",75,"TYP")
N
^SCR("P1PRMH3","P",80,"CRD")
16,14,N,2,0
^SCR("P1PRMH3","P",80,"HELP")

^SCR("P1PRMH3","P",80,"LMAX")
4
^SCR("P1PRMH3","P",80,"MUMPS1")

^SCR("P1PRMH3","P",80,"MUMPS2")

^SCR("P1PRMH3","P",80,"TYP")
N
^SCR("P1PRMH3","P",81,"CRD")
17,43,H,19
^SCR("P1PRMH3","P",81,"HELP")

^SCR("P1PRMH3","P",81,"LMAX")
19
^SCR("P1PRMH3","P",81,"MUMPS1")

^SCR("P1PRMH3","P",81,"MUMPS2")

^SCR("P1PRMH3","P",81,"TYP")
H
^SCR("P1PRMH3","P",82,"CRD")
18,41,E,7,0
^SCR("P1PRMH3","P",82,"FNC")

^SCR("P1PRMH3","P",82,"GLOB")
^PAR
^SCR("P1PRMH3","P",82,"HELP")

^SCR("P1PRMH3","P",82,"LMAX")
7
^SCR("P1PRMH3","P",82,"MUMPS1")

^SCR("P1PRMH3","P",82,"MUMPS2")

^SCR("P1PRMH3","P",82,"NLN")
20
^SCR("P1PRMH3","P",82,"RZD")
**
^SCR("P1PRMH3","P",82,"TOPB")
8
^SCR("P1PRMH3","P",82,"TYP")
E
^SCR("P1PRMH3","P",83,"CRD")
19,21,N,3,0
^SCR("P1PRMH3","P",83,"HELP")

^SCR("P1PRMH3","P",83,"LMAX")
4
^SCR("P1PRMH3","P",83,"MUMPS1")

^SCR("P1PRMH3","P",83,"MUMPS2")

^SCR("P1PRMH3","P",83,"TYP")
N
^SCR("P1PRMH3","P",87,"CRD")
20,21,N,3,0
^SCR("P1PRMH3","P",87,"HELP")

^SCR("P1PRMH3","P",87,"LMAX")
4
^SCR("P1PRMH3","P",87,"MUMPS1")

^SCR("P1PRMH3","P",87,"MUMPS2")

^SCR("P1PRMH3","P",87,"MUST")

^SCR("P1PRMH3","P",87,"TYP")
N
^SCR("P1PRMH3","P",88,"CRD")
21,21,N,3,0
^SCR("P1PRMH3","P",88,"HELP")

^SCR("P1PRMH3","P",88,"LMAX")
4
^SCR("P1PRMH3","P",88,"MUMPS1")

^SCR("P1PRMH3","P",88,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH3","P",88,"MUST")

^SCR("P1PRMH3","P",88,"TYP")
N
^SCR("P1PRMH3","P",89,"CHECK")
Y
^SCR("P1PRMH3","P",89,"CRD")
22,50,E,6,0
^SCR("P1PRMH3","P",89,"FNC")

^SCR("P1PRMH3","P",89,"GLOB")
PAR
^SCR("P1PRMH3","P",89,"HELP")

^SCR("P1PRMH3","P",89,"LMAX")
6
^SCR("P1PRMH3","P",89,"MUMPS1")

^SCR("P1PRMH3","P",89,"MUMPS2")

^SCR("P1PRMH3","P",89,"NLN")
20
^SCR("P1PRMH3","P",89,"RZD")
**
^SCR("P1PRMH3","P",89,"TOPB")
8
^SCR("P1PRMH3","P",89,"TYP")
E
^SCR("P1PRMH3","P",89,"VRB")
HAVT1
^SCR("P1PRMH3","P",90,"CRD")
22,49,H,20
^SCR("P1PRMH3","P",90,"HELP")

^SCR("P1PRMH3","P",90,"LMAX")
20
^SCR("P1PRMH3","P",90,"MUMPS1")

^SCR("P1PRMH3","P",90,"MUMPS2")

^SCR("P1PRMH3","P",90,"TYP")
H
^SCR("P1PRMH3","P",92,"CRD")
22,16,T,5,0
^SCR("P1PRMH3","P",92,"HELP")

^SCR("P1PRMH3","P",92,"LMAX")
5
^SCR("P1PRMH3","P",92,"MUMPS1")

^SCR("P1PRMH3","P",92,"MUMPS2")

^SCR("P1PRMH3","P",92,"TYP")
T
^SCR("P1PRMH3","P",95,"CRD")
22,2,T,5,0
^SCR("P1PRMH3","P",95,"HELP")

^SCR("P1PRMH3","P",95,"LMAX")
5
^SCR("P1PRMH3","P",95,"MUMPS1")

^SCR("P1PRMH3","P",95,"MUMPS2")

^SCR("P1PRMH3","P",95,"TYP")
T
^SCR("P1PRMH3","P","NAME","ADSHVT")
95
^SCR("P1PRMH3","P","NAME","BAR")
60
^SCR("P1PRMH3","P","NAME","BARHNH")
50
^SCR("P1PRMH3","P","NAME","BDNOCH")
25
^SCR("P1PRMH3","P","NAME","DMSBAR")
55
^SCR("P1PRMH3","P","NAME","FIRE")
87
^SCR("P1PRMH3","P","NAME","HAVT")
89
^SCR("P1PRMH3","P","NAME","HAVT1")
90
^SCR("P1PRMH3","P","NAME","HNHBAR")
65
^SCR("P1PRMH3","P","NAME","LAST")
17
^SCR("P1PRMH3","P","NAME","LKHN")
61
^SCR("P1PRMH3","P","NAME","MESHVT")
92
^SCR("P1PRMH3","P","NAME","MINMH")
40
^SCR("P1PRMH3","P","NAME","MINMHB")
45
^SCR("P1PRMH3","P","NAME","MLZ")
15
^SCR("P1PRMH3","P","NAME","MLZCARD")
20
^SCR("P1PRMH3","P","NAME","MSPSD")
63
^SCR("P1PRMH3","P","NAME","SHEMMZ")
82
^SCR("P1PRMH3","P","NAME","SHSH")
64
^SCR("P1PRMH3","P","NAME","TAW")
75
^SCR("P1PRMH3","P","NAME","TAWH")
80
^SCR("P1PRMH3","P","NAME","TAWHR")
81
^SCR("P1PRMH3","P","NAME","TAWTSF")
83
^SCR("P1PRMH3","P","NAME","TIPMZM")
88
^SCR("P1PRMH3","P","NAME","ZHRA")
72
^SCR("P1PRMH3","P","NM",15)
MLZ
^SCR("P1PRMH3","P","NM",17)
LAST
^SCR("P1PRMH3","P","NM",20)
MLZCARD
^SCR("P1PRMH3","P","NM",25)
BDNOCH
^SCR("P1PRMH3","P","NM",40)
MINMH
^SCR("P1PRMH3","P","NM",45)
MINMHB
^SCR("P1PRMH3","P","NM",50)
BARHNH
^SCR("P1PRMH3","P","NM",55)
DMSBAR
^SCR("P1PRMH3","P","NM",60)
BAR
^SCR("P1PRMH3","P","NM",61)
LKHN
^SCR("P1PRMH3","P","NM",63)
MSPSD
^SCR("P1PRMH3","P","NM",64)
SHSH
^SCR("P1PRMH3","P","NM",65)
HNHBAR
^SCR("P1PRMH3","P","NM",72)
ZHRA
^SCR("P1PRMH3","P","NM",75)
TAW
^SCR("P1PRMH3","P","NM",80)
TAWH
^SCR("P1PRMH3","P","NM",81)
TAWHR
^SCR("P1PRMH3","P","NM",82)
SHEMMZ
^SCR("P1PRMH3","P","NM",83)
TAWTSF
^SCR("P1PRMH3","P","NM",87)
FIRE
^SCR("P1PRMH3","P","NM",88)
TIPMZM
^SCR("P1PRMH3","P","NM",89)
HAVT
^SCR("P1PRMH3","P","NM",90)
HAVT1
^SCR("P1PRMH3","P","NM",92)
MESHVT
^SCR("P1PRMH3","P","NM",95)
ADSHVT
^SCR("P1PRMH3","P","RB",1)
3,2,24,77
^SCR("P1PRMH30")
H
^SCR("P1PRMH30",1)
                             # dcrqnl dpnfd mixhnxt zxcbd #                    
^SCR("P1PRMH30",2)
                     {15 :   (0-`l,1-ok)          xg` xvlnn dpnfd zpbd         
^SCR("P1PRMH30",3)
                     {17 :0- xbqy in ,1- dpnfd ligzdy in itl sqk zxitq         
^SCR("P1PRMH30",4)
                     {20 :              cala qihxk i"r xvln zqipk oniq         
^SCR("P1PRMH30",5)
                     {25 :   (0-`l,1-ok)          xvln ly zegkep wecal         
^SCR("P1PRMH30",6)
                     {30 :   (0-`l,1-ok)                   zakxen dgpd         
^SCR("P1PRMH30",7)
                  {45    : xa ogleyl {40    : libx ogleyl menipin xign         
^SCR("P1PRMH30",8)
                     {55 : (%) xa zexy inc      {50 : xa ogleyl dgpd %         
^SCR("P1PRMH30",9)
                     {60 :                        (xa) xidn ogley xtqn         
^SCR("P1PRMH30",10)
                     {61 : (0-`l,1-ok) oeayg zligza gewl 'qn le`yl m`d         
^SCR("P1PRMH30",11)
                     {63 : 2- dpey ,0- 0 ,1- 1:xidn ogleya micreq xtqn         
^SCR("P1PRMH30",12)
                           dcyl xefgl oeayg zxibq ixg` xidn ogleya m`d         
^SCR("P1PRMH30",13)
                     {64 :  2 - xvln 'qn ,1 - ogley xtqn ,0 - hixt cew         
^SCR("P1PRMH30",14)
                     {65 :   (0-`l,1-ok)       xidn ogleya dgpd `zli`y         
^SCR("P1PRMH30",15)
              {70 : (0-`l,1-ok) xidn ogleya   dxey lka dxrdl qpkdl m`d         
^SCR("P1PRMH30",16)
              {72 : (0-`l,1-ok) xidn ogleya melyz seqa dxrdl qpkdl m`d         
^SCR("P1PRMH30",17)
              {90 :    TAKE AWAY-l dgpd%  {75 : TAKE AWAY-l ogley xtqn         
^SCR("P1PRMH30",18)
     {                91}:                   TAW ogleyl reaw dxrd hqwh         
^SCR("P1PRMH30",19)
                     {93 :(0-`l,1-ok) TAW zkxrna zetqez oelg geztl m`d         
^SCR("P1PRMH30",20)
                     {95 :(0-`l,1-ok)     dpnfda micreq zniyx `lnl m`d         
^SCR("P1PRMH30",21)
                     {97 :       "FIRE" drcedl dpnfd zlaw oia zewc 'qn         
^SCR("P1PRMH30",22)
                     {98 :0 -zxnyn seqa,1 -dceard jldna onefna mitih zclwd     
^SCR("P1PRMH30",23)
 {95  } dry cr {92   } dryn {                 80} {99   : "dgha`" hixt 'qn     
^SCR("P1PRMH30","A",1)
„ƒ’‘ŽŒ„�Ž†„�‰˜ˆŽ˜”š˜ƒ‚„
^SCR("P1PRMH30","A",2)
:(0-€Œ,1-�‹)˜‡€˜–ŒŽŽ„�Ž†„š�‚„
^SCR("P1PRMH30","A",3)
:0-˜‚‘™‰Ž,1-„�Ž†„Œ‰‡š„™‰Ž‰”Œ“‘‹š˜‰”‘
^SCR("P1PRMH30","A",4)
:ƒ�Œ�‘‰ˆ˜‹‰"’˜–ŒŽš‘‰�‹�Ž‰‘
^SCR("P1PRMH30","A",5)
:(0-€Œ,1-�‹)˜–ŒŽŒ™š…‡‹…�—…ƒ�Œ
^SCR("P1PRMH30","A",6)
:(0-€Œ,1-�‹)š�‹˜…Ž„‡�„
^SCR("P1PRMH30","A",7)
:˜��‡Œ…™Œ:Œ‰‚˜�‡Œ…™Œ�…Ž‰�‰Ž˜‰‡Ž
^SCR("P1PRMH30","A",8)
:(%)˜�š…˜™‰Žƒ:˜��‡Œ…™Œ„‡�„%
^SCR("P1PRMH30","A",9)
:(˜�)˜‰„Ž�‡Œ…™˜”‘Ž
^SCR("P1PRMH30","A",10)
:(0-€Œ,1-�‹)�…�™‡šŒ‰‡š�‡…—Œ'‘ŽŒ…€™Œ�€„
^SCR("P1PRMH30","A",11)
:2-„�…™,0-0,1-1:˜‰„Ž�‡Œ…™��‰ƒ’…‘˜”‘Ž
^SCR("P1PRMH30","A",12)
„ƒ™Œ˜…†‡Œ�…�™‡š˜‰‚‘‰˜‡€˜‰„Ž�‡Œ…™��€„
^SCR("P1PRMH30","A",13)
:2-˜–ŒŽ'‘Ž,1-�‡Œ…™˜”‘Ž,0-ˆ‰˜”ƒ…—
^SCR("P1PRMH30","A",14)
:(0-€Œ,1-�‹)˜‰„Ž�‡Œ…™�„‡�„€šŒ‰€™
^SCR("P1PRMH30","A",15)
:(0-€Œ,1-�‹)˜‰„Ž�‡Œ…™�„˜…™Œ‹�„˜’„Œ‘�‹„Œ�€„
^SCR("P1PRMH30","A",16)
:(0-€Œ,1-�‹)˜‰„Ž�‡Œ…™��…Œ™š“…‘�„˜’„Œ‘�‹„Œ�€„
^SCR("P1PRMH30","A",17)
:TAKEAWAY-Œ„‡�„%:TAKEAWAY-Œ�‡Œ…™˜”‘Ž
^SCR("P1PRMH30","A",18)
:TAW�‡Œ…™Œ’…�—„˜’„ˆ‘—ˆ
^SCR("P1PRMH30","A",19)
:(0-€Œ,1-�‹)TAWš‹˜’Ž�š…”‘…š�…Œ‡‡…š”Œ�€„
^SCR("P1PRMH30","A",20)
:(0-€Œ,1-�‹)„�Ž†„��‰ƒ’…‘šŽ‰™˜€ŒŽŒ�€„
^SCR("P1PRMH30","A",21)
:"FIRE"„’ƒ…„Œ„�Ž†„šŒ�—�‰�š…—ƒ'‘Ž
^SCR("P1PRMH30","A",22)
:0-š˜Ž™Ž“…‘�,1-„ƒ…�’„ŠŒ„Ž��Ž…†Ž��‰”‰ˆšƒŒ—„
^SCR("P1PRMH30","A",23)
„’™ƒ’„’™Ž:"„‡ˆ�€"ˆ‰˜”'‘Ž
^SCR("P1PRMH30","AV",1)
vsgxnkvbnzvohrynrp,rsdv
^SCR("P1PRMH30","AV",2)
:(0-tk'1-if)rjtrmknnvbnzv,bdv
^SCR("P1PRMH30","AV",3)
:0-rdxahn'1-vbnzvkhj,vahnhpk;xf,rhpx
^SCR("P1PRMH30","AV",4)
:sckcxhyrfh"grmkn,xhbfinhx
^SCR("P1PRMH30","AV",5)
:(0-tk'1-if)rmknka,ujfubeusck
^SCR("P1PRMH30","AV",6)
:(0-tk'1-if),cfrunvjbv
^SCR("P1PRMH30","AV",7)
:rcijkuak:khdrijkuakounhbhnrhjn
^SCR("P1PRMH30","AV",8)
:(%)rc,urahns:rcijkuakvjbv%
^SCR("P1PRMH30","AV",9)
:(rc)rhvnijkuarpxn
^SCR("P1PRMH30","AV",10)
:(0-tk'1-if)iucaj,khj,cjuekwxnkutakotv
^SCR("P1PRMH30","AV",11)
:2-vbua'0-0'1-1:rhvnijkuacohsguxrpxn
^SCR("P1PRMH30","AV",12)
vsakruzjkiucaj,rhdxhrjtrhvnijkuacotv
^SCR("P1PRMH30","AV",13)
:2-rmknwxn'1-ijkuarpxn'0-yhrpsue
^SCR("P1PRMH30","AV",14)
:(0-tk'1-if)rhvnijkuacvjbvt,khta
^SCR("P1PRMH30","AV",15)
:(0-tk'1-if)rhvnijkuacvruakfcvrgvkxbfvkotv
^SCR("P1PRMH30","AV",16)
:(0-tk'1-if)rhvnijkuacouka,;uxcvrgvkxbfvkotv
^SCR("P1PRMH30","AV",17)
:TAKEAWAY-kvjbv%:TAKEAWAY-kijkuarpxn
^SCR("P1PRMH30","AV",18)
:TAWijkuakgucevrgvyxey
^SCR("P1PRMH30","AV",19)
:(0-tk'1-if)TAW,frgnc,upxu,iukjju,pkotv
^SCR("P1PRMH30","AV",20)
:(0-tk'1-if)vbnzvcohsgux,nhartknkotv
^SCR("P1PRMH30","AV",21)
:"FIRE"vgsuvkvbnzv,kceihc,ueswxn
^SCR("P1PRMH30","AV",22)
:0-,rnan;uxc'1-vsucgvlkvncinuzncohphy,skev
^SCR("P1PRMH30","AV",23)
vgasgvgan:"vjyct"yhrpwxn
^SCR("P1PRMH30","NAME")
dcrqnl mixhnxt
^SCR("P1PRMH30","P",15,"CRD")
2,21,N,3,0
^SCR("P1PRMH30","P",15,"HELP")

^SCR("P1PRMH30","P",15,"LMAX")
4
^SCR("P1PRMH30","P",15,"MUMPS1")

^SCR("P1PRMH30","P",15,"MUMPS2")
D MLZ^P1PRMH
^SCR("P1PRMH30","P",15,"MUST")

^SCR("P1PRMH30","P",15,"TYP")
N
^SCR("P1PRMH30","P",17,"CRD")
3,21,N,3,0
^SCR("P1PRMH30","P",17,"HELP")

^SCR("P1PRMH30","P",17,"LMAX")
4
^SCR("P1PRMH30","P",17,"MUMPS1")

^SCR("P1PRMH30","P",17,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH30","P",17,"TYP")
N
^SCR("P1PRMH30","P",20,"CRD")
4,21,E,1,0
^SCR("P1PRMH30","P",20,"HELP")
qihxk ly ihpbn qta oey`x oniq cilwdl `p
^SCR("P1PRMH30","P",20,"LMAX")
4
^SCR("P1PRMH30","P",20,"MUMPS1")

^SCR("P1PRMH30","P",20,"MUMPS2")
I MLZCARD?1N S %SC("ER")=1
^SCR("P1PRMH30","P",20,"TYP")
E
^SCR("P1PRMH30","P",25,"CRD")
5,21,N,3,0
^SCR("P1PRMH30","P",25,"HELP")

^SCR("P1PRMH30","P",25,"LMAX")
4
^SCR("P1PRMH30","P",25,"MUMPS1")

^SCR("P1PRMH30","P",25,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH30","P",25,"MUST")

^SCR("P1PRMH30","P",25,"TYP")
N
^SCR("P1PRMH30","P",30,"CRD")
6,21,N,3,0
^SCR("P1PRMH30","P",30,"HELP")

^SCR("P1PRMH30","P",30,"LMAX")
4
^SCR("P1PRMH30","P",30,"MUMPS1")

^SCR("P1PRMH30","P",30,"MUMPS2")
D BDHNH^P1PRMH
^SCR("P1PRMH30","P",30,"TYP")
N
^SCR("P1PRMH30","P",40,"CRD")
7,37,N,7,2
^SCR("P1PRMH30","P",40,"HELP")

^SCR("P1PRMH30","P",40,"LMAX")
7
^SCR("P1PRMH30","P",40,"MUMPS1")

^SCR("P1PRMH30","P",40,"MUMPS2")

^SCR("P1PRMH30","P",40,"TYP")
N
^SCR("P1PRMH30","P",45,"CRD")
7,18,N,7,2
^SCR("P1PRMH30","P",45,"HELP")

^SCR("P1PRMH30","P",45,"LMAX")
7
^SCR("P1PRMH30","P",45,"MUMPS1")

^SCR("P1PRMH30","P",45,"MUMPS2")

^SCR("P1PRMH30","P",45,"TYP")
N
^SCR("P1PRMH30","P",50,"CRD")
8,48,N,3,0
^SCR("P1PRMH30","P",50,"HELP")

^SCR("P1PRMH30","P",50,"LMAX")
4
^SCR("P1PRMH30","P",50,"MUMPS1")

^SCR("P1PRMH30","P",50,"MUMPS2")

^SCR("P1PRMH30","P",50,"TYP")
N
^SCR("P1PRMH30","P",55,"CRD")
8,21,N,4,1
^SCR("P1PRMH30","P",55,"HELP")

^SCR("P1PRMH30","P",55,"LMAX")
4
^SCR("P1PRMH30","P",55,"MUMPS1")

^SCR("P1PRMH30","P",55,"MUMPS2")

^SCR("P1PRMH30","P",55,"TYP")
N
^SCR("P1PRMH30","P",60,"CRD")
9,21,N,3,0
^SCR("P1PRMH30","P",60,"HELP")

^SCR("P1PRMH30","P",60,"LMAX")
4
^SCR("P1PRMH30","P",60,"MUMPS1")

^SCR("P1PRMH30","P",60,"MUMPS2")

^SCR("P1PRMH30","P",60,"TYP")
N
^SCR("P1PRMH30","P",61,"CRD")
10,21,N,3,0
^SCR("P1PRMH30","P",61,"HELP")

^SCR("P1PRMH30","P",61,"LMAX")
4
^SCR("P1PRMH30","P",61,"MUMPS1")

^SCR("P1PRMH30","P",61,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH30","P",61,"MUST")

^SCR("P1PRMH30","P",61,"TYP")
N
^SCR("P1PRMH30","P",63,"CRD")
11,21,N,3,0
^SCR("P1PRMH30","P",63,"HELP")

^SCR("P1PRMH30","P",63,"LMAX")
4
^SCR("P1PRMH30","P",63,"MUMPS1")

^SCR("P1PRMH30","P",63,"MUMPS2")
I MSPSD'=0,MSPSD'=1,MSPSD'=2 S %SC("ER")=1
^SCR("P1PRMH30","P",63,"TYP")
N
^SCR("P1PRMH30","P",64,"CRD")
13,21,N,3,0
^SCR("P1PRMH30","P",64,"HELP")

^SCR("P1PRMH30","P",64,"LMAX")
4
^SCR("P1PRMH30","P",64,"MUMPS1")

^SCR("P1PRMH30","P",64,"MUMPS2")
I "012"'[SHSH!($L(SHSH)'=1) S %SC("ER")=1
^SCR("P1PRMH30","P",64,"MUST")

^SCR("P1PRMH30","P",64,"TYP")
N
^SCR("P1PRMH30","P",65,"CRD")
14,21,N,3,0
^SCR("P1PRMH30","P",65,"HELP")

^SCR("P1PRMH30","P",65,"LMAX")
4
^SCR("P1PRMH30","P",65,"MUMPS1")

^SCR("P1PRMH30","P",65,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH30","P",65,"TYP")
N
^SCR("P1PRMH30","P",70,"CRD")
15,14,N,3,0
^SCR("P1PRMH30","P",70,"HELP")

^SCR("P1PRMH30","P",70,"LMAX")
4
^SCR("P1PRMH30","P",70,"MUMPS1")

^SCR("P1PRMH30","P",70,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH30","P",70,"MUST")

^SCR("P1PRMH30","P",70,"TYP")
N
^SCR("P1PRMH30","P",72,"CRD")
16,14,N,3,0
^SCR("P1PRMH30","P",72,"HELP")

^SCR("P1PRMH30","P",72,"LMAX")
4
^SCR("P1PRMH30","P",72,"MUMPS1")

^SCR("P1PRMH30","P",72,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH30","P",72,"TYP")
N
^SCR("P1PRMH30","P",75,"CRD")
17,42,N,3,0
^SCR("P1PRMH30","P",75,"HELP")

^SCR("P1PRMH30","P",75,"LMAX")
4
^SCR("P1PRMH30","P",75,"MUMPS1")

^SCR("P1PRMH30","P",75,"MUMPS2")

^SCR("P1PRMH30","P",75,"MUST")

^SCR("P1PRMH30","P",75,"TYP")
N
^SCR("P1PRMH30","P",80,"CRD")
23,49,H,20
^SCR("P1PRMH30","P",80,"HELP")

^SCR("P1PRMH30","P",80,"LMAX")
20
^SCR("P1PRMH30","P",80,"MUMPS1")

^SCR("P1PRMH30","P",80,"MUMPS2")

^SCR("P1PRMH30","P",80,"OUTPUT")

^SCR("P1PRMH30","P",80,"TYP")
H
^SCR("P1PRMH30","P",90,"CRD")
17,14,N,2,0
^SCR("P1PRMH30","P",90,"HELP")

^SCR("P1PRMH30","P",90,"LMAX")
4
^SCR("P1PRMH30","P",90,"MUMPS1")

^SCR("P1PRMH30","P",90,"MUMPS2")

^SCR("P1PRMH30","P",90,"TYP")
N
^SCR("P1PRMH30","P",91,"CRD")
18,25,H,18
^SCR("P1PRMH30","P",91,"HELP")

^SCR("P1PRMH30","P",91,"LMAX")
19
^SCR("P1PRMH30","P",91,"MUMPS1")

^SCR("P1PRMH30","P",91,"MUMPS2")

^SCR("P1PRMH30","P",91,"TYP")
H
^SCR("P1PRMH30","P",92,"CRD")
23,15,E,5,0
^SCR("P1PRMH30","P",92,"HELP")

^SCR("P1PRMH30","P",92,"LMAX")
6
^SCR("P1PRMH30","P",92,"MUMPS1")

^SCR("P1PRMH30","P",92,"MUMPS2")

^SCR("P1PRMH30","P",92,"TYP")
E
^SCR("P1PRMH30","P",93,"CRD")
19,21,N,3,0
^SCR("P1PRMH30","P",93,"HELP")

^SCR("P1PRMH30","P",93,"LMAX")
4
^SCR("P1PRMH30","P",93,"MUMPS1")

^SCR("P1PRMH30","P",93,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH30","P",93,"TYP")
N
^SCR("P1PRMH30","P",95,"CRD")
23,1,N,3,0
^SCR("P1PRMH30","P",95,"HELP")

^SCR("P1PRMH30","P",95,"LMAX")
5
^SCR("P1PRMH30","P",95,"MUMPS1")

^SCR("P1PRMH30","P",95,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH30","P",95,"MUST")

^SCR("P1PRMH30","P",95,"TYP")
N
^SCR("P1PRMH30","P",97,"CRD")
21,21,N,3,0
^SCR("P1PRMH30","P",97,"HELP")

^SCR("P1PRMH30","P",97,"LMAX")
4
^SCR("P1PRMH30","P",97,"MUMPS1")

^SCR("P1PRMH30","P",97,"MUMPS2")

^SCR("P1PRMH30","P",97,"TYP")
N
^SCR("P1PRMH30","P",98,"CRD")
22,21,N,3,0
^SCR("P1PRMH30","P",98,"HELP")

^SCR("P1PRMH30","P",98,"LMAX")
4
^SCR("P1PRMH30","P",98,"MUMPS1")

^SCR("P1PRMH30","P",98,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH30","P",98,"MUST")

^SCR("P1PRMH30","P",98,"TYP")
N
^SCR("P1PRMH30","P",99,"CRD")
23,50,E,6,0
^SCR("P1PRMH30","P",99,"CREAT")

^SCR("P1PRMH30","P",99,"FNC")

^SCR("P1PRMH30","P",99,"GLOB")
PAR
^SCR("P1PRMH30","P",99,"HELP")

^SCR("P1PRMH30","P",99,"LMAX")
6
^SCR("P1PRMH30","P",99,"MUMPS1")

^SCR("P1PRMH30","P",99,"MUMPS2")
D P1^%L1SCSAY("HAVT1")
^SCR("P1PRMH30","P",99,"NLN")
20
^SCR("P1PRMH30","P",99,"NS")
J
^SCR("P1PRMH30","P",99,"RZD")
**
^SCR("P1PRMH30","P",99,"TOPB")
8
^SCR("P1PRMH30","P",99,"TYP")
E
^SCR("P1PRMH30","P",99,"VRB")
HAVT1
^SCR("P1PRMH30","P","NAME","BAR")
60
^SCR("P1PRMH30","P","NAME","BARHNH")
50
^SCR("P1PRMH30","P","NAME","BDNOCH")
25
^SCR("P1PRMH30","P","NAME","DMSBAR")
55
^SCR("P1PRMH30","P","NAME","FIRE")
97
^SCR("P1PRMH30","P","NAME","HAVT")
99
^SCR("P1PRMH30","P","NAME","HAVT1")
80
^SCR("P1PRMH30","P","NAME","HNH")
30
^SCR("P1PRMH30","P","NAME","HNHBAR")
65
^SCR("P1PRMH30","P","NAME","LAST")
17
^SCR("P1PRMH30","P","NAME","LKHN")
61
^SCR("P1PRMH30","P","NAME","MESHVT")
92
^SCR("P1PRMH30","P","NAME","MINMH")
40
^SCR("P1PRMH30","P","NAME","MINMHB")
45
^SCR("P1PRMH30","P","NAME","MLZ")
15
^SCR("P1PRMH30","P","NAME","MLZCARD")
20
^SCR("P1PRMH30","P","NAME","MSPSD")
63
^SCR("P1PRMH30","P","NAME","SD")
95
^SCR("P1PRMH30","P","NAME","SHSH")
64
^SCR("P1PRMH30","P","NAME","TAW")
75
^SCR("P1PRMH30","P","NAME","TAWH")
90
^SCR("P1PRMH30","P","NAME","TAWHR")
91
^SCR("P1PRMH30","P","NAME","TAWHRA")
70
^SCR("P1PRMH30","P","NAME","TAWTSF")
93
^SCR("P1PRMH30","P","NAME","TIPMZM")
98
^SCR("P1PRMH30","P","NAME","ZHRA")
72
^SCR("P1PRMH30","P","NM",15)
MLZ
^SCR("P1PRMH30","P","NM",17)
LAST
^SCR("P1PRMH30","P","NM",20)
MLZCARD
^SCR("P1PRMH30","P","NM",25)
BDNOCH
^SCR("P1PRMH30","P","NM",30)
HNH
^SCR("P1PRMH30","P","NM",40)
MINMH
^SCR("P1PRMH30","P","NM",45)
MINMHB
^SCR("P1PRMH30","P","NM",50)
BARHNH
^SCR("P1PRMH30","P","NM",55)
DMSBAR
^SCR("P1PRMH30","P","NM",60)
BAR
^SCR("P1PRMH30","P","NM",61)
LKHN
^SCR("P1PRMH30","P","NM",63)
MSPSD
^SCR("P1PRMH30","P","NM",64)
SHSH
^SCR("P1PRMH30","P","NM",65)
HNHBAR
^SCR("P1PRMH30","P","NM",70)
TAWHRA
^SCR("P1PRMH30","P","NM",72)
ZHRA
^SCR("P1PRMH30","P","NM",75)
TAW
^SCR("P1PRMH30","P","NM",80)
HAVT1
^SCR("P1PRMH30","P","NM",90)
TAWH
^SCR("P1PRMH30","P","NM",91)
TAWHR
^SCR("P1PRMH30","P","NM",92)
MESHVT
^SCR("P1PRMH30","P","NM",93)
TAWTSF
^SCR("P1PRMH30","P","NM",95)
SD
^SCR("P1PRMH30","P","NM",97)
FIRE
^SCR("P1PRMH30","P","NM",98)
TIPMZM
^SCR("P1PRMH30","P","NM",99)
HAVT
^SCR("P1PRMH4")
H
^SCR("P1PRMH4",1)
                               # migelynl dpnfd mixhnxt zxcbd #                
^SCR("P1PRMH4",2)
                                                                             1]
^SCR("P1PRMH4",3)
                         g"y {54  :        lrn gelyn inc lhany melyzl mekq     
^SCR("P1PRMH4",4)
                       {55        :                          TAW  gewl 'qn     
^SCR("P1PRMH4",5)
                            {60   :                          TAW  hixt cew     
^SCR("P1PRMH4",6)
                         % {65    :                   (%) TAW -l      dgpd     
^SCR("P1PRMH4",7)
                              {67 :    (0-`l,1-ok) ipci gahnl zepnfd xebiy     
^SCR("P1PRMH4",8)
                              {70 :    (0-`l,1-ok)  `adl gewl ly `"k xenyl     
^SCR("P1PRMH4",9)
               {        73} {72   :                  "oinfnd my" hixt xtqn     
^SCR("P1PRMH4",10)
                              {75 :    0,1- 'n'z mewna dlaw qn 'ayg qitcdl     
^SCR("P1PRMH4",11)
                              {76 :0,1-zecrqn ax zkxrna 'n'z & 'ayg qitcdl     
^SCR("P1PRMH4",12)
                              {80 :(0-`l,1-ok)         iy`x gewl 'qn le`yl     
^SCR("P1PRMH4",13)
                           {82    :                    ilnipin mihixt mekq     
^SCR("P1PRMH4",14)
                              {85 :         dgilyl dpnfd zlaw oia zewc 'qn     
^SCR("P1PRMH4",15)
                              {88 :     dgilyl gelyn 'z z`ved oia zewc 'qn     
^SCR("P1PRMH4",16)
                {              90}:                       (lcgn zxixa) xir     
^SCR("P1PRMH4",17)
           {            93} {92   :                  "xign zrvd" hixt xtqn     
^SCR("P1PRMH4",18)
        [1                                                                     
^SCR("P1PRMH4",19)
                                                                               
^SCR("P1PRMH4","A",1)
�‰‡…Œ™ŽŒ„�Ž†„�‰˜ˆŽ˜”š˜ƒ‚„
^SCR("P1PRMH4","A",2)

^SCR("P1PRMH4","A",3)
‡"™:Œ’Ž‡…Œ™Ž‰ŽƒŒˆ�Ž™�…Œ™šŒ�…‹‘
^SCR("P1PRMH4","A",4)
:TAW‡…—Œ'‘Ž
^SCR("P1PRMH4","A",5)
:TAWˆ‰˜”ƒ…—
^SCR("P1PRMH4","A",6)
%:(%)TAW-Œ„‡�„
^SCR("P1PRMH4","A",7)
:(0-€Œ,1-�‹)‰�ƒ‰‡�ˆŽŒš…�Ž†„˜…‚‰™
^SCR("P1PRMH4","A",8)
:(0-€Œ,1-�‹)€�„Œ‡…—ŒŒ™€"‹˜…Ž™Œ
^SCR("P1PRMH4","A",9)
:"�‰Ž†Ž„�™"ˆ‰˜”˜”‘Ž
^SCR("P1PRMH4","A",10)
:0,1-'Ž'š�…—Ž�„Œ�—‘Ž'�™‡‘‰”ƒ„Œ
^SCR("P1PRMH4","A",11)
:0,1-š…ƒ’‘Ž�˜š‹˜’Ž�'Ž'š&'�™‡‘‰”ƒ„Œ
^SCR("P1PRMH4","A",12)
:(0-€Œ,1-�‹)‰™€˜‡…—Œ'‘ŽŒ…€™Œ
^SCR("P1PRMH4","A",13)
:‰ŒŽ‰�‰Ž�‰ˆ‰˜”�…‹‘
^SCR("P1PRMH4","A",14)
:„‡‰Œ™Œ„�Ž†„šŒ�—�‰�š…—ƒ'‘Ž
^SCR("P1PRMH4","A",15)
:„‡‰Œ™Œ‡…Œ™Ž'šš€–…„�‰�š…—ƒ'‘Ž
^SCR("P1PRMH4","A",16)
:(Œƒ‡Žš˜‰˜�)˜‰’
^SCR("P1PRMH4","A",17)
:"˜‰‡Žš’–„"ˆ‰˜”˜”‘Ž
^SCR("P1PRMH4","A",18)

^SCR("P1PRMH4","A",19)

^SCR("P1PRMH4","AV",1)
ohjukankvbnzvohrynrp,rsdv
^SCR("P1PRMH4","AV",2)

^SCR("P1PRMH4","AV",3)
j"a:kgnjukanhnskycnaouka,koufx
^SCR("P1PRMH4","AV",4)
:TAWjuekwxn
^SCR("P1PRMH4","AV",5)
:TAWyhrpsue
^SCR("P1PRMH4","AV",6)
%:(%)TAW-kvjbv
^SCR("P1PRMH4","AV",7)
:(0-tk'1-if)hbshjcynk,ubnzvrudha
^SCR("P1PRMH4","AV",8)
:(0-tk'1-if)tcvkjuekkat"frunak
^SCR("P1PRMH4","AV",9)
:"ihnznvoa"yhrprpxn
^SCR("P1PRMH4","AV",10)
:0'1-wnw,ouencvkcexnwcajxhpsvk
^SCR("P1PRMH4","AV",11)
:0'1-,usgxncr,frgncwnw,&wcajxhpsvk
^SCR("P1PRMH4","AV",12)
:(0-tk'1-if)hatrjuekwxnkutak
^SCR("P1PRMH4","AV",13)
:hknhbhnohyhrpoufx
^SCR("P1PRMH4","AV",14)
:vjhkakvbnzv,kceihc,ueswxn
^SCR("P1PRMH4","AV",15)
:vjhkakjukanw,,tmuvihc,ueswxn
^SCR("P1PRMH4","AV",16)
:(ksjn,rhrc)rhg
^SCR("P1PRMH4","AV",17)
:"rhjn,gmv"yhrprpxn
^SCR("P1PRMH4","AV",18)

^SCR("P1PRMH4","AV",19)

^SCR("P1PRMH4","NAME")
migelynl mixhnxt
^SCR("P1PRMH4","P",54,"CRD")
3,29,N,5,1
^SCR("P1PRMH4","P",54,"HELP")

^SCR("P1PRMH4","P",54,"LMAX")
5
^SCR("P1PRMH4","P",54,"MUMPS1")

^SCR("P1PRMH4","P",54,"MUMPS2")

^SCR("P1PRMH4","P",54,"TYP")
N
^SCR("P1PRMH4","P",55,"CRD")
4,23,E,10,0
^SCR("P1PRMH4","P",55,"HELP")

^SCR("P1PRMH4","P",55,"LMAX")
11
^SCR("P1PRMH4","P",55,"MUMPS1")

^SCR("P1PRMH4","P",55,"MUMPS2")

^SCR("P1PRMH4","P",55,"TYP")
E
^SCR("P1PRMH4","P",60,"CRD")
5,28,E,5,0
^SCR("P1PRMH4","P",60,"HELP")

^SCR("P1PRMH4","P",60,"LMAX")
6
^SCR("P1PRMH4","P",60,"MUMPS1")

^SCR("P1PRMH4","P",60,"MUMPS2")

^SCR("P1PRMH4","P",60,"TYP")
E
^SCR("P1PRMH4","P",65,"CRD")
6,27,N,6,2
^SCR("P1PRMH4","P",65,"HELP")

^SCR("P1PRMH4","P",65,"LMAX")
7
^SCR("P1PRMH4","P",65,"MUMPS1")

^SCR("P1PRMH4","P",65,"MUMPS2")

^SCR("P1PRMH4","P",65,"TYP")
N
^SCR("P1PRMH4","P",67,"CRD")
7,30,N,3,0
^SCR("P1PRMH4","P",67,"HELP")

^SCR("P1PRMH4","P",67,"LMAX")
4
^SCR("P1PRMH4","P",67,"MUMPS1")

^SCR("P1PRMH4","P",67,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH4","P",67,"TYP")
N
^SCR("P1PRMH4","P",70,"CRD")
8,30,N,3,0
^SCR("P1PRMH4","P",70,"HELP")

^SCR("P1PRMH4","P",70,"LMAX")
4
^SCR("P1PRMH4","P",70,"MUMPS1")

^SCR("P1PRMH4","P",70,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH4","P",70,"MUST")

^SCR("P1PRMH4","P",70,"TYP")
N
^SCR("P1PRMH4","P",72,"CHECK")
Y
^SCR("P1PRMH4","P",72,"CRD")
9,28,E,6,0
^SCR("P1PRMH4","P",72,"FNC")

^SCR("P1PRMH4","P",72,"GLOB")
PAR
^SCR("P1PRMH4","P",72,"HELP")

^SCR("P1PRMH4","P",72,"LMAX")
6
^SCR("P1PRMH4","P",72,"MUMPS1")

^SCR("P1PRMH4","P",72,"MUMPS2")

^SCR("P1PRMH4","P",72,"NLN")
20
^SCR("P1PRMH4","P",72,"RZD")
**
^SCR("P1PRMH4","P",72,"TOPB")
8
^SCR("P1PRMH4","P",72,"TYP")
E
^SCR("P1PRMH4","P",72,"VRB")
SHEMZ1
^SCR("P1PRMH4","P",73,"CRD")
9,27,H,11
^SCR("P1PRMH4","P",73,"HELP")

^SCR("P1PRMH4","P",73,"LMAX")
11
^SCR("P1PRMH4","P",73,"MUMPS1")

^SCR("P1PRMH4","P",73,"MUMPS2")

^SCR("P1PRMH4","P",73,"OUTPUT")

^SCR("P1PRMH4","P",73,"TYP")
H
^SCR("P1PRMH4","P",75,"CRD")
10,30,N,3,0
^SCR("P1PRMH4","P",75,"HELP")

^SCR("P1PRMH4","P",75,"LMAX")
4
^SCR("P1PRMH4","P",75,"MUMPS1")

^SCR("P1PRMH4","P",75,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH4","P",75,"MUST")

^SCR("P1PRMH4","P",75,"TYP")
N
^SCR("P1PRMH4","P",76,"CRD")
11,30,N,3,0
^SCR("P1PRMH4","P",76,"HELP")

^SCR("P1PRMH4","P",76,"LMAX")
4
^SCR("P1PRMH4","P",76,"MUMPS1")

^SCR("P1PRMH4","P",76,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH4","P",76,"TYP")
N
^SCR("P1PRMH4","P",80,"CRD")
12,30,N,4,0
^SCR("P1PRMH4","P",80,"HELP")

^SCR("P1PRMH4","P",80,"LMAX")
4
^SCR("P1PRMH4","P",80,"MUMPS1")

^SCR("P1PRMH4","P",80,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMH4","P",80,"TYP")
N
^SCR("P1PRMH4","P",82,"CRD")
13,27,N,6,2
^SCR("P1PRMH4","P",82,"HELP")

^SCR("P1PRMH4","P",82,"LMAX")
7
^SCR("P1PRMH4","P",82,"MUMPS1")

^SCR("P1PRMH4","P",82,"MUMPS2")

^SCR("P1PRMH4","P",82,"TYP")
N
^SCR("P1PRMH4","P",85,"CRD")
14,30,N,4,0
^SCR("P1PRMH4","P",85,"HELP")

^SCR("P1PRMH4","P",85,"LMAX")
4
^SCR("P1PRMH4","P",85,"MUMPS1")

^SCR("P1PRMH4","P",85,"MUMPS2")

^SCR("P1PRMH4","P",85,"MUST")

^SCR("P1PRMH4","P",85,"TYP")
N
^SCR("P1PRMH4","P",88,"CRD")
15,30,N,4,0
^SCR("P1PRMH4","P",88,"HELP")

^SCR("P1PRMH4","P",88,"LMAX")
4
^SCR("P1PRMH4","P",88,"MUMPS1")

^SCR("P1PRMH4","P",88,"MUMPS2")

^SCR("P1PRMH4","P",88,"TYP")
N
^SCR("P1PRMH4","P",90,"CRD")
16,34,H,17
^SCR("P1PRMH4","P",90,"HELP")

^SCR("P1PRMH4","P",90,"LMAX")
17
^SCR("P1PRMH4","P",90,"MUMPS1")

^SCR("P1PRMH4","P",90,"MUMPS2")

^SCR("P1PRMH4","P",90,"TYP")
H
^SCR("P1PRMH4","P",92,"CHECK")
Y
^SCR("P1PRMH4","P",92,"CRD")
17,28,E,6,0
^SCR("P1PRMH4","P",92,"FNC")

^SCR("P1PRMH4","P",92,"GLOB")
PAR
^SCR("P1PRMH4","P",92,"HELP")

^SCR("P1PRMH4","P",92,"LMAX")
6
^SCR("P1PRMH4","P",92,"MUMPS1")

^SCR("P1PRMH4","P",92,"MUMPS2")

^SCR("P1PRMH4","P",92,"NLN")
20
^SCR("P1PRMH4","P",92,"RZD")
**
^SCR("P1PRMH4","P",92,"TOPB")
8
^SCR("P1PRMH4","P",92,"TYP")
E
^SCR("P1PRMH4","P",92,"VRB")
HZMH1
^SCR("P1PRMH4","P",93,"CRD")
17,27,H,15
^SCR("P1PRMH4","P",93,"HELP")

^SCR("P1PRMH4","P",93,"LMAX")
15
^SCR("P1PRMH4","P",93,"MUMPS1")

^SCR("P1PRMH4","P",93,"MUMPS2")

^SCR("P1PRMH4","P",93,"OUTPUT")

^SCR("P1PRMH4","P",93,"TYP")
H
^SCR("P1PRMH4","P","NAME","EZLA")
80
^SCR("P1PRMH4","P","NAME","HZJAD")
67
^SCR("P1PRMH4","P","NAME","HZMH")
92
^SCR("P1PRMH4","P","NAME","HZMH1")
93
^SCR("P1PRMH4","P","NAME","IR")
90
^SCR("P1PRMH4","P","NAME","MMTM")
76
^SCR("P1PRMH4","P","NAME","MSLMHMIN")
82
^SCR("P1PRMH4","P","NAME","NOTM")
75
^SCR("P1PRMH4","P","NAME","SHEMZ")
72
^SCR("P1PRMH4","P","NAME","SHEMZ1")
73
^SCR("P1PRMH4","P","NAME","TAWMSL")
55
^SCR("P1PRMH4","P","NAME","TAWMSLH")
65
^SCR("P1PRMH4","P","NAME","TAWMSLP")
60
^SCR("P1PRMH4","P","NAME","TIMEHZ")
85
^SCR("P1PRMH4","P","NAME","TIMETM")
88
^SCR("P1PRMH4","P","NAME","TSHLDM")
54
^SCR("P1PRMH4","P","NAME","VIZSVNO")
70
^SCR("P1PRMH4","P","NM",54)
TSHLDM
^SCR("P1PRMH4","P","NM",55)
TAWMSL
^SCR("P1PRMH4","P","NM",60)
TAWMSLP
^SCR("P1PRMH4","P","NM",65)
TAWMSLH
^SCR("P1PRMH4","P","NM",67)
HZJAD
^SCR("P1PRMH4","P","NM",70)
VIZSVNO
^SCR("P1PRMH4","P","NM",72)
SHEMZ
^SCR("P1PRMH4","P","NM",73)
SHEMZ1
^SCR("P1PRMH4","P","NM",75)
NOTM
^SCR("P1PRMH4","P","NM",76)
MMTM
^SCR("P1PRMH4","P","NM",80)
EZLA
^SCR("P1PRMH4","P","NM",82)
MSLMHMIN
^SCR("P1PRMH4","P","NM",85)
TIMEHZ
^SCR("P1PRMH4","P","NM",88)
TIMETM
^SCR("P1PRMH4","P","NM",90)
IR
^SCR("P1PRMH4","P","NM",92)
HZMH
^SCR("P1PRMH4","P","NM",93)
HZMH1
^SCR("P1PRMH4","P","RB",1)
3,9,19,79
^SCR("P1PRMMD")
H
^SCR("P1PRMMD",1)
                              # miqihxk `xew & mcen mixhnxt #                  
^SCR("P1PRMMD",2)
                                                                               
^SCR("P1PRMMD",3)
                                                                       1]      
^SCR("P1PRMMD",4)
                            {05: (0-`l,1-ok) dcear zligza mcen zprhd           
^SCR("P1PRMMD",5)
                                                 seqn beq xicbdl m`d           
^SCR("P1PRMMD",6)
                            {07:(0-`l,1-ok) zxeywz znwd ixg` zqtcne            
^SCR("P1PRMMD",7)
                            {10:                      mcenl hxet 'qn           
^SCR("P1PRMMD",8)
                {15            :              XON/XOFF -l mcen zcewt           
^SCR("P1PRMMD",9)
                            {18:(0-`l,1-ok)       mcen ly lew jinpdl           
^SCR("P1PRMMD",10)
                            {19:        dpri mceny iptl milevliv 'qn           
^SCR("P1PRMMD",11)
                                                                               
^SCR("P1PRMMD",12)
                            {20:                 SMS xiyknl hxet 'qn           
^SCR("P1PRMMD",13)
                                                                               
^SCR("P1PRMMD",14)
                {25:ixg`    {22:     d`ixw iptl miqihxk `xewa mipniq           
^SCR("P1PRMMD",15)
                   {30         :                           didyd 'qn           
^SCR("P1PRMMD",16)
            [1                                                                 
^SCR("P1PRMMD","A",1)
�‰‘‰ˆ˜‹€˜…—&�ƒ…Ž�‰˜ˆŽ˜”
^SCR("P1PRMMD","A",2)

^SCR("P1PRMMD","A",3)

^SCR("P1PRMMD","A",4)
:(0-€Œ,1-�‹)„ƒ…�’šŒ‰‡š��ƒ…Žš�’ˆ„
^SCR("P1PRMMD","A",5)
“…‘Ž‚…‘˜‰ƒ‚„Œ�€„
^SCR("P1PRMMD","A",6)
:(0-€Œ,1-�‹)š˜…™—ššŽ—„‰˜‡€š‘”ƒŽ…
^SCR("P1PRMMD","A",7)
:�ƒ…ŽŒˆ˜…”'‘Ž
^SCR("P1PRMMD","A",8)
:XON/XOFF-Œ�ƒ…Žšƒ…—”
^SCR("P1PRMMD","A",9)
:(0-€Œ,1-�‹)�ƒ…ŽŒ™Œ…—Š‰Ž�„Œ
^SCR("P1PRMMD","A",10)
:„�’‰�ƒ…Ž™‰�”Œ�‰Œ…–Œ‰–'‘Ž
^SCR("P1PRMMD","A",11)

^SCR("P1PRMMD","A",12)
:SMS˜‰™‹ŽŒˆ˜…”'‘Ž
^SCR("P1PRMMD","A",13)

^SCR("P1PRMMD","A",14)
:‰˜‡€:„€‰˜—‰�”Œ�‰‘‰ˆ˜‹€˜…—��‰�Ž‰‘
^SCR("P1PRMMD","A",15)
:„‰„™„'‘Ž
^SCR("P1PRMMD","A",16)

^SCR("P1PRMMD","AV",1)
ohxhyrftrue&osunohrynrp
^SCR("P1PRMMD","AV",2)

^SCR("P1PRMMD","AV",3)

^SCR("P1PRMMD","AV",4)
:(0-tk'1-if)vsucg,khj,cosun,bgyv
^SCR("P1PRMMD","AV",5)
;uxnduxrhsdvkotv
^SCR("P1PRMMD","AV",6)
:(0-tk'1-if),ruae,,nevhrjt,xpsnu
^SCR("P1PRMMD","AV",7)
:osunkyrupwxn
^SCR("P1PRMMD","AV",8)
:XONqXOFF-kosun,suep
^SCR("P1PRMMD","AV",9)
:(0-tk'1-if)osunkakuelhnbvk
^SCR("P1PRMMD","AV",10)
:vbghosunahbpkohkumkhmwxn
^SCR("P1PRMMD","AV",11)

^SCR("P1PRMMD","AV",12)
:SMSrhafnkyrupwxn
^SCR("P1PRMMD","AV",13)

^SCR("P1PRMMD","AV",14)
:hrjt:vthrehbpkohxhyrftruecohbnhx
^SCR("P1PRMMD","AV",15)
:vhvavwxn
^SCR("P1PRMMD","AV",16)

^SCR("P1PRMMD","NAME")
miqihxk `xew & mcen mixhnxt1
^SCR("P1PRMMD","P",5,"CRD")
4,28,N,1,0
^SCR("P1PRMMD","P",5,"HELP")

^SCR("P1PRMMD","P",5,"LMAX")
3
^SCR("P1PRMMD","P",5,"MUMPS1")

^SCR("P1PRMMD","P",5,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMMD","P",5,"TYP")
N
^SCR("P1PRMMD","P",7,"CRD")
6,28,N,1,0
^SCR("P1PRMMD","P",7,"HELP")

^SCR("P1PRMMD","P",7,"LMAX")
3
^SCR("P1PRMMD","P",7,"MUMPS1")

^SCR("P1PRMMD","P",7,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMMD","P",7,"MUST")

^SCR("P1PRMMD","P",7,"TYP")
N
^SCR("P1PRMMD","P",10,"CRD")
7,28,N,2,0
^SCR("P1PRMMD","P",10,"HELP")

^SCR("P1PRMMD","P",10,"LMAX")
3
^SCR("P1PRMMD","P",10,"MUMPS1")

^SCR("P1PRMMD","P",10,"MUMPS2")

^SCR("P1PRMMD","P",10,"TYP")
N
^SCR("P1PRMMD","P",15,"CRD")
8,16,E,12,0
^SCR("P1PRMMD","P",15,"HELP")

^SCR("P1PRMMD","P",15,"LMAX")
15
^SCR("P1PRMMD","P",15,"MUMPS1")

^SCR("P1PRMMD","P",15,"MUMPS2")

^SCR("P1PRMMD","P",15,"TYP")
E
^SCR("P1PRMMD","P",18,"CRD")
9,28,N,1,0
^SCR("P1PRMMD","P",18,"HELP")

^SCR("P1PRMMD","P",18,"LMAX")
3
^SCR("P1PRMMD","P",18,"MUMPS1")

^SCR("P1PRMMD","P",18,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMMD","P",18,"TYP")
N
^SCR("P1PRMMD","P",19,"CRD")
10,28,N,1,0
^SCR("P1PRMMD","P",19,"HELP")

^SCR("P1PRMMD","P",19,"LMAX")
3
^SCR("P1PRMMD","P",19,"MUMPS1")
S:'$G(MDRING) MDRING=1
^SCR("P1PRMMD","P",19,"MUMPS2")

^SCR("P1PRMMD","P",19,"TYP")
N
^SCR("P1PRMMD","P",20,"CRD")
12,28,N,2,0
^SCR("P1PRMMD","P",20,"HELP")

^SCR("P1PRMMD","P",20,"LMAX")
3
^SCR("P1PRMMD","P",20,"MUMPS1")

^SCR("P1PRMMD","P",20,"MUMPS2")

^SCR("P1PRMMD","P",20,"TYP")
N
^SCR("P1PRMMD","P",22,"CRD")
14,28,E,3,0
^SCR("P1PRMMD","P",22,"HELP")

^SCR("P1PRMMD","P",22,"LMAX")
3
^SCR("P1PRMMD","P",22,"MUMPS1")

^SCR("P1PRMMD","P",22,"MUMPS2")

^SCR("P1PRMMD","P",22,"TYP")
E
^SCR("P1PRMMD","P",25,"CRD")
14,16,E,3,0
^SCR("P1PRMMD","P",25,"HELP")

^SCR("P1PRMMD","P",25,"LMAX")
3
^SCR("P1PRMMD","P",25,"MUMPS1")

^SCR("P1PRMMD","P",25,"MUMPS2")

^SCR("P1PRMMD","P",25,"TYP")
E
^SCR("P1PRMMD","P",30,"CRD")
15,19,N,12,0
^SCR("P1PRMMD","P",30,"HELP")

^SCR("P1PRMMD","P",30,"LMAX")
12
^SCR("P1PRMMD","P",30,"MUMPS1")

^SCR("P1PRMMD","P",30,"MUMPS2")

^SCR("P1PRMMD","P",30,"TYP")
N
^SCR("P1PRMMD","P","NAME","BF1")
22
^SCR("P1PRMMD","P","NAME","BF2")
25
^SCR("P1PRMMD","P","NAME","DELAY")
30
^SCR("P1PRMMD","P","NAME","INMD")
5
^SCR("P1PRMMD","P","NAME","MDLOW")
18
^SCR("P1PRMMD","P","NAME","MDPORT")
10
^SCR("P1PRMMD","P","NAME","MDPSNS")
20
^SCR("P1PRMMD","P","NAME","MDRING")
19
^SCR("P1PRMMD","P","NAME","MDXON")
15
^SCR("P1PRMMD","P","NAME","P1PRMT")
7
^SCR("P1PRMMD","P","NM",5)
INMD
^SCR("P1PRMMD","P","NM",7)
P1PRMT
^SCR("P1PRMMD","P","NM",10)
MDPORT
^SCR("P1PRMMD","P","NM",15)
MDXON
^SCR("P1PRMMD","P","NM",18)
MDLOW
^SCR("P1PRMMD","P","NM",19)
MDRING
^SCR("P1PRMMD","P","NM",20)
MDPSNS
^SCR("P1PRMMD","P","NM",22)
BF1
^SCR("P1PRMMD","P","NM",25)
BF2
^SCR("P1PRMMD","P","NM",30)
DELAY
^SCR("P1PRMMD","P","RB",1)
4,13,17,73
^SCR("P1PRMML")
H
^SCR("P1PRMML",1)
                         # zegewl oecrenl mixhnxt #                            
^SCR("P1PRMML",2)
                                                                        1]     
^SCR("P1PRMML",3)
               {                06} {05   :   oecren qihxk - hixt 'qn          
^SCR("P1PRMML",4)
                                                                               
^SCR("P1PRMML",5)
                         {15: dry cr   {10: dryn lreta `l oecren zgpd          
^SCR("P1PRMML",6)
                                                                               
^SCR("P1PRMML",7)
                         {25: mei cr   {20: mein lreta `l oecren zgpd          
^SCR("P1PRMML",8)
             [1                                                                
^SCR("P1PRMML","A",1)
š…‡…—Œ�…ƒ’…ŽŒ�‰˜ˆŽ˜”
^SCR("P1PRMML","A",2)

^SCR("P1PRMML","A",3)
:�…ƒ’…Ž‘‰ˆ˜‹-ˆ‰˜”'‘Ž
^SCR("P1PRMML","A",4)

^SCR("P1PRMML","A",5)
:„’™ƒ’:„’™ŽŒ’…”�€Œ�…ƒ’…Žš‡�„
^SCR("P1PRMML","A",6)

^SCR("P1PRMML","A",7)
:�…‰ƒ’:�…‰ŽŒ’…”�€Œ�…ƒ’…Žš‡�„
^SCR("P1PRMML","A",8)

^SCR("P1PRMML","AV",1)
,ujuekiusgunkohrynrp
^SCR("P1PRMML","AV",2)

^SCR("P1PRMML","AV",3)
:iusgunxhyrf-yhrpwxn
^SCR("P1PRMML","AV",4)

^SCR("P1PRMML","AV",5)
:vgasg:vgankgupctkiusgun,jbv
^SCR("P1PRMML","AV",6)

^SCR("P1PRMML","AV",7)
:ouhsg:ouhnkgupctkiusgun,jbv
^SCR("P1PRMML","AV",8)

^SCR("P1PRMML","NAME")
zegewl oecrenl mixhnxt
^SCR("P1PRMML","P",5,"CHECK")
Y
^SCR("P1PRMML","P",5,"CRD")
3,36,E,6,0
^SCR("P1PRMML","P",5,"CREAT")

^SCR("P1PRMML","P",5,"FNC")

^SCR("P1PRMML","P",5,"GLOB")
PAR
^SCR("P1PRMML","P",5,"HELP")

^SCR("P1PRMML","P",5,"LMAX")
6
^SCR("P1PRMML","P",5,"MUMPS1")

^SCR("P1PRMML","P",5,"MUMPS2")

^SCR("P1PRMML","P",5,"NLN")
20
^SCR("P1PRMML","P",5,"NS")
J
^SCR("P1PRMML","P",5,"RZD")
**
^SCR("P1PRMML","P",5,"TOPB")
8
^SCR("P1PRMML","P",5,"TYP")
E
^SCR("P1PRMML","P",5,"VRB")
PAR1
^SCR("P1PRMML","P",6,"CRD")
3,35,H,19
^SCR("P1PRMML","P",6,"HELP")

^SCR("P1PRMML","P",6,"LMAX")
19
^SCR("P1PRMML","P",6,"MUMPS1")

^SCR("P1PRMML","P",6,"MUMPS2")

^SCR("P1PRMML","P",6,"OUTPUT")

^SCR("P1PRMML","P",6,"TYP")
H
^SCR("P1PRMML","P",10,"CRD")
5,39,E,2,0
^SCR("P1PRMML","P",10,"HELP")

^SCR("P1PRMML","P",10,"LMAX")
3
^SCR("P1PRMML","P",10,"MUMPS1")

^SCR("P1PRMML","P",10,"MUMPS2")
I MESHAA'="",MESHAA'?1N.N S %SC("ER")=1
^SCR("P1PRMML","P",10,"TYP")
E
^SCR("P1PRMML","P",15,"CRD")
5,25,E,2,0
^SCR("P1PRMML","P",15,"HELP")

^SCR("P1PRMML","P",15,"LMAX")
3
^SCR("P1PRMML","P",15,"MUMPS1")

^SCR("P1PRMML","P",15,"MUMPS2")
D ADSHAA^P1PRMML
^SCR("P1PRMML","P",15,"TYP")
E
^SCR("P1PRMML","P",20,"CRD")
7,39,N,1,0
^SCR("P1PRMML","P",20,"HELP")
7 -y ,6 - e ,5 - d ,4 - c ,3 - b ,2 - a , 1 - `
^SCR("P1PRMML","P",20,"LMAX")
3
^SCR("P1PRMML","P",20,"MUMPS1")

^SCR("P1PRMML","P",20,"MUMPS2")

^SCR("P1PRMML","P",20,"TYP")
N
^SCR("P1PRMML","P",25,"CRD")
7,25,N,1,0
^SCR("P1PRMML","P",25,"HELP")
7 - y ,6- e ,5 - d ,4 - c ,3 - b ,2 - a ,1 -`
^SCR("P1PRMML","P",25,"LMAX")
3
^SCR("P1PRMML","P",25,"MUMPS1")

^SCR("P1PRMML","P",25,"MUMPS2")
D ADJOM^P1PRMML
^SCR("P1PRMML","P",25,"TYP")
N
^SCR("P1PRMML","P","NAME","ADJOM")
25
^SCR("P1PRMML","P","NAME","ADSHAA")
15
^SCR("P1PRMML","P","NAME","CARD")
5
^SCR("P1PRMML","P","NAME","MEJOM")
20
^SCR("P1PRMML","P","NAME","MESHAA")
10
^SCR("P1PRMML","P","NAME","PAR1")
6
^SCR("P1PRMML","P","NM",5)
CARD
^SCR("P1PRMML","P","NM",6)
PAR1
^SCR("P1PRMML","P","NM",10)
MESHAA
^SCR("P1PRMML","P","NM",15)
ADSHAA
^SCR("P1PRMML","P","NM",20)
MEJOM
^SCR("P1PRMML","P","NM",25)
ADJOM
^SCR("P1PRMML","P","RB",1)
3,14,9,74
^SCR("P1PRMRS")
H
^SCR("P1PRMRS",1)
                                                                               
^SCR("P1PRMRS",2)
                        # "o`xehqx" zkxrnl mixhnxt #                           
^SCR("P1PRMRS",3)
                                                                               
^SCR("P1PRMRS",4)
                                                                 1]            
^SCR("P1PRMRS",5)
                                            {05  }:   hxet 'qn                 
^SCR("P1PRMRS",6)
                                                                               
^SCR("P1PRMRS",7)
                                  {10            }:   IP zaezk                 
^SCR("P1PRMRS",8)
                                                                               
^SCR("P1PRMRS",9)
                            [1                                                 
^SCR("P1PRMRS",10)
                                                                               
^SCR("P1PRMRS",11)
                                                                               
^SCR("P1PRMRS","A",1)

^SCR("P1PRMRS","A",2)
"�€˜…ˆ‘˜"š‹˜’ŽŒ�‰˜ˆŽ˜”
^SCR("P1PRMRS","A",3)

^SCR("P1PRMRS","A",4)

^SCR("P1PRMRS","A",5)
:ˆ˜…”'‘Ž
^SCR("P1PRMRS","A",6)

^SCR("P1PRMRS","A",7)
:IPš�…š‹
^SCR("P1PRMRS","A",8)

^SCR("P1PRMRS","A",9)

^SCR("P1PRMRS","A",10)

^SCR("P1PRMRS","A",11)

^SCR("P1PRMRS","AV",1)

^SCR("P1PRMRS","AV",2)
"itruyxr",frgnkohrynrp
^SCR("P1PRMRS","AV",3)

^SCR("P1PRMRS","AV",4)

^SCR("P1PRMRS","AV",5)
:yrupwxn
^SCR("P1PRMRS","AV",6)

^SCR("P1PRMRS","AV",7)
:IP,cu,f
^SCR("P1PRMRS","AV",8)

^SCR("P1PRMRS","AV",9)

^SCR("P1PRMRS","AV",10)

^SCR("P1PRMRS","AV",11)

^SCR("P1PRMRS","NAME")

^SCR("P1PRMRS","P",5,"CRD")
5,44,N,4,0
^SCR("P1PRMRS","P",5,"HELP")

^SCR("P1PRMRS","P",5,"LMAX")
5
^SCR("P1PRMRS","P",5,"MUMPS1")

^SCR("P1PRMRS","P",5,"MUMPS2")

^SCR("P1PRMRS","P",5,"MUST")

^SCR("P1PRMRS","P",5,"TYP")
N
^SCR("P1PRMRS","P",10,"CRD")
7,34,E,15,0
^SCR("P1PRMRS","P",10,"HELP")

^SCR("P1PRMRS","P",10,"LMAX")
15
^SCR("P1PRMRS","P",10,"MUMPS1")

^SCR("P1PRMRS","P",10,"MUMPS2")

^SCR("P1PRMRS","P",10,"MUST")

^SCR("P1PRMRS","P",10,"TYP")
E
^SCR("P1PRMRS","P","NAME","IP")
10
^SCR("P1PRMRS","P","NAME","PORT")
5
^SCR("P1PRMRS","P","NM",5)
PORT
^SCR("P1PRMRS","P","NM",10)
IP
^SCR("P1PRMRS","P","RB",1)
5,29,10,67
^SCR("P1PRMSHV")
H
^SCR("P1PRMSHV",1)
                                # `ay mixhnxt #                                
^SCR("P1PRMSHV",2)
                                                                               
^SCR("P1PRMSHV",3)
                                                                           1]  
^SCR("P1PRMSHV",4)
                                                                               
^SCR("P1PRMSHV",5)
               {05:  ( `l - 0 ,ok - 1 )  mixleca `"k lawl zexyt` zniiw m`d     
^SCR("P1PRMSHV",6)
               {10:  ( `l - 0 ,ok - 1 ) miakeka dgpd lawl zexyt` zniiw m`d     
^SCR("P1PRMSHV",7)
               {15:  ( `l - 0 ,ok - 1 )    oecren ze`wqrl zexyt` zniiw m`d     
^SCR("P1PRMSHV",8)
               {21:  ( `l - 0, ok - 1 )                   xeciy g"ec zqtcd     
^SCR("P1PRMSHV",9)
             {25  :                                      ihnehe` xeciy onf     
^SCR("P1PRMSHV",10)
               {30:  (`l-0,dyixc itl-2,ok-1) `"k zwical ihnehe` xywzdl m`d     
^SCR("P1PRMSHV",11)
               {35:      0 - zxg` , 2 - MUMPS-n ,1 - xg` aygnn `ayl dzli`y     
^SCR("P1PRMSHV",12)
      {38         :   mcenl XON zcewt                {37 :  mcenl hxet 'qn     
^SCR("P1PRMSHV",13)
                                               {39 :(`l - 0,ok - 1) difkxn     
^SCR("P1PRMSHV",14)
            {50   :                                    ilniqwn iekifd mekq     
^SCR("P1PRMSHV",15)
                                                                               
^SCR("P1PRMSHV",16)
               {55:(0,1)cg` mekqk ine`le l`k mixeciy fekix g"eca bivdl m`d     
^SCR("P1PRMSHV",17)
     [1                                                                        
^SCR("P1PRMSHV","A",1)
€�™�‰˜ˆŽ˜”
^SCR("P1PRMSHV","A",2)

^SCR("P1PRMSHV","A",3)

^SCR("P1PRMSHV","A",4)

^SCR("P1PRMSHV","A",5)
:(€Œ-0,�‹-1)�‰˜Œ…ƒ�€"‹Œ�—Œš…˜™”€šŽ‰‰—�€„
^SCR("P1PRMSHV","A",6)
:(€Œ-0,�‹-1)�‰�‹…‹�„‡�„Œ�—Œš…˜™”€šŽ‰‰—�€„
^SCR("P1PRMSHV","A",7)
:(€Œ-0,�‹-1)�…ƒ’…Žš…€—‘’Œš…˜™”€šŽ‰‰—�€„
^SCR("P1PRMSHV","A",8)
:(€Œ-0,�‹-1)˜…ƒ‰™‡"…ƒš‘”ƒ„
^SCR("P1PRMSHV","A",9)
:‰ˆŽ…ˆ…€˜…ƒ‰™�Ž†
^SCR("P1PRMSHV","A",10)
:(€Œ-0,„™‰˜ƒ‰”Œ-2,�‹-1)€"‹š—‰ƒ�Œ‰ˆŽ…ˆ…€˜™—š„Œ�€„
^SCR("P1PRMSHV","A",11)
:0-š˜‡€,2-MUMPS-Ž,1-˜‡€�™‡ŽŽ€�™Œ„šŒ‰€™
^SCR("P1PRMSHV","A",12)
:�ƒ…ŽŒXONšƒ…—”:�ƒ…ŽŒˆ˜…”'‘Ž
^SCR("P1PRMSHV","A",13)
:(€Œ-0,�‹-1)„‰†‹˜Ž
^SCR("P1PRMSHV","A",14)
:‰ŒŽ‰‘—Ž‰…‹‰†„�…‹‘
^SCR("P1PRMSHV","A",15)

^SCR("P1PRMSHV","A",16)
:(0,1)ƒ‡€�…‹‘‹‰Ž…€Œ…Œ€‹�‰˜…ƒ‰™†…‹‰˜‡"…ƒ�‚‰–„Œ�€„
^SCR("P1PRMSHV","A",17)

^SCR("P1PRMSHV","AV",1)
tcaohrynrp
^SCR("P1PRMSHV","AV",2)

^SCR("P1PRMSHV","AV",3)

^SCR("P1PRMSHV","AV",4)

^SCR("P1PRMSHV","AV",5)
:(tk-0'if-1)ohrkusct"fkcek,urapt,nhheotv
^SCR("P1PRMSHV","AV",6)
:(tk-0'if-1)ohcfufcvjbvkcek,urapt,nhheotv
^SCR("P1PRMSHV","AV",7)
:(tk-0'if-1)iusgun,utexgk,urapt,nhheotv
^SCR("P1PRMSHV","AV",8)
:(tk-0'if-1)rushaj"us,xpsv
^SCR("P1PRMSHV","AV",9)
:hynuyutrushainz
^SCR("P1PRMSHV","AV",10)
:(tk-0'vahrshpk-2'if-1)t"f,ehsckhynuyutrae,vkotv
^SCR("P1PRMSHV","AV",11)
:0-,rjt'2-MUMPS-n'1-rjtcajnntcakv,khta
^SCR("P1PRMSHV","AV",12)
:osunkXON,suep:osunkyrupwxn
^SCR("P1PRMSHV","AV",13)
:(tk-0'if-1)vhzfrn
^SCR("P1PRMSHV","AV",14)
:hknhxenhufhzvoufx
^SCR("P1PRMSHV","AV",15)

^SCR("P1PRMSHV","AV",16)
:(0'1)sjtoufxfhnutkuktfohrushazufhrj"uscdhmvkotv
^SCR("P1PRMSHV","AV",17)

^SCR("P1PRMSHV","NAME")
`ay mixhn`xt
^SCR("P1PRMSHV","P",5,"CRD")
5,15,N,1,0
^SCR("P1PRMSHV","P",5,"HELP")

^SCR("P1PRMSHV","P",5,"LMAX")
3
^SCR("P1PRMSHV","P",5,"MUMPS1")

^SCR("P1PRMSHV","P",5,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMSHV","P",5,"TYP")
N
^SCR("P1PRMSHV","P",10,"CRD")
6,15,N,1,0
^SCR("P1PRMSHV","P",10,"HELP")

^SCR("P1PRMSHV","P",10,"LMAX")
3
^SCR("P1PRMSHV","P",10,"MUMPS1")

^SCR("P1PRMSHV","P",10,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMSHV","P",10,"TYP")
N
^SCR("P1PRMSHV","P",15,"CRD")
7,15,N,1,0
^SCR("P1PRMSHV","P",15,"HELP")

^SCR("P1PRMSHV","P",15,"LMAX")
3
^SCR("P1PRMSHV","P",15,"MUMPS1")

^SCR("P1PRMSHV","P",15,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMSHV","P",15,"MUST")

^SCR("P1PRMSHV","P",15,"TYP")
N
^SCR("P1PRMSHV","P",21,"CRD")
8,15,N,1,0
^SCR("P1PRMSHV","P",21,"HELP")

^SCR("P1PRMSHV","P",21,"LMAX")
3
^SCR("P1PRMSHV","P",21,"MUMPS1")

^SCR("P1PRMSHV","P",21,"MUMPS2")
D PCASH^P1PRMSHV
^SCR("P1PRMSHV","P",21,"MUST")

^SCR("P1PRMSHV","P",21,"TYP")
N
^SCR("P1PRMSHV","P",25,"CRD")
9,13,T,5,0
^SCR("P1PRMSHV","P",25,"HELP")

^SCR("P1PRMSHV","P",25,"LMAX")
5
^SCR("P1PRMSHV","P",25,"MUMPS1")

^SCR("P1PRMSHV","P",25,"MUMPS2")

^SCR("P1PRMSHV","P",25,"TYP")
T
^SCR("P1PRMSHV","P",30,"CRD")
10,15,N,1,0
^SCR("P1PRMSHV","P",30,"HELP")

^SCR("P1PRMSHV","P",30,"LMAX")
3
^SCR("P1PRMSHV","P",30,"MUMPS1")

^SCR("P1PRMSHV","P",30,"MUMPS2")
D J^P1PRMSHV
^SCR("P1PRMSHV","P",30,"TYP")
N
^SCR("P1PRMSHV","P",35,"CRD")
11,15,N,1,0
^SCR("P1PRMSHV","P",35,"HELP")

^SCR("P1PRMSHV","P",35,"LMAX")
3
^SCR("P1PRMSHV","P",35,"MUMPS1")

^SCR("P1PRMSHV","P",35,"MUMPS2")
D TRDDP^P1PRMSHV
^SCR("P1PRMSHV","P",35,"TYP")
N
^SCR("P1PRMSHV","P",37,"CRD")
12,53,N,2,0
^SCR("P1PRMSHV","P",37,"HELP")

^SCR("P1PRMSHV","P",37,"LMAX")
4
^SCR("P1PRMSHV","P",37,"MUMPS1")

^SCR("P1PRMSHV","P",37,"MUMPS2")
I MDPORTS<4 S %SC("ER")=1
^SCR("P1PRMSHV","P",37,"MUST")

^SCR("P1PRMSHV","P",37,"TYP")
N
^SCR("P1PRMSHV","P",38,"CRD")
12,6,E,12,0
^SCR("P1PRMSHV","P",38,"HELP")

^SCR("P1PRMSHV","P",38,"LMAX")
12
^SCR("P1PRMSHV","P",38,"MUMPS1")

^SCR("P1PRMSHV","P",38,"MUMPS2")

^SCR("P1PRMSHV","P",38,"TYP")
E
^SCR("P1PRMSHV","P",39,"CRD")
13,47,N,1,0
^SCR("P1PRMSHV","P",39,"HELP")

^SCR("P1PRMSHV","P",39,"LMAX")
4
^SCR("P1PRMSHV","P",39,"MUMPS1")

^SCR("P1PRMSHV","P",39,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMSHV","P",39,"MUST")

^SCR("P1PRMSHV","P",39,"TYP")
N
^SCR("P1PRMSHV","P",50,"CRD")
14,12,N,6,1
^SCR("P1PRMSHV","P",50,"HELP")

^SCR("P1PRMSHV","P",50,"LMAX")
6
^SCR("P1PRMSHV","P",50,"MUMPS1")

^SCR("P1PRMSHV","P",50,"MUMPS2")

^SCR("P1PRMSHV","P",50,"TYP")
N
^SCR("P1PRMSHV","P",55,"CRD")
16,15,N,1,0
^SCR("P1PRMSHV","P",55,"HELP")

^SCR("P1PRMSHV","P",55,"LMAX")
3
^SCR("P1PRMSHV","P",55,"MUMPS1")

^SCR("P1PRMSHV","P",55,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMSHV","P",55,"TYP")
N
^SCR("P1PRMSHV","P","NAME","GWULZ")
50
^SCR("P1PRMSHV","P","NAME","J")
30
^SCR("P1PRMSHV","P","NAME","KOHAV")
10
^SCR("P1PRMSHV","P","NAME","MDMRKS")
39
^SCR("P1PRMSHV","P","NAME","MDPORTS")
37
^SCR("P1PRMSHV","P","NAME","MDXONS")
38
^SCR("P1PRMSHV","P","NAME","PCASH")
21
^SCR("P1PRMSHV","P","NAME","Q")
15
^SCR("P1PRMSHV","P","NAME","SHVMTB")
5
^SCR("P1PRMSHV","P","NAME","TIME")
25
^SCR("P1PRMSHV","P","NAME","TRDDP")
35
^SCR("P1PRMSHV","P","NAME","VISA")
55
^SCR("P1PRMSHV","P","NM",5)
SHVMTB
^SCR("P1PRMSHV","P","NM",10)
KOHAV
^SCR("P1PRMSHV","P","NM",15)
Q
^SCR("P1PRMSHV","P","NM",21)
PCASH
^SCR("P1PRMSHV","P","NM",25)
TIME
^SCR("P1PRMSHV","P","NM",30)
J
^SCR("P1PRMSHV","P","NM",35)
TRDDP
^SCR("P1PRMSHV","P","NM",37)
MDPORTS
^SCR("P1PRMSHV","P","NM",38)
MDXONS
^SCR("P1PRMSHV","P","NM",39)
MDMRKS
^SCR("P1PRMSHV","P","NM",50)
GWULZ
^SCR("P1PRMSHV","P","NM",55)
VISA
^SCR("P1PRMSHV","P","RB",1)
4,6,18,77
^SCR("P1PRMT")
H
^SCR("P1PRMT",1)
                                                                               
^SCR("P1PRMT",2)
                                                                          1]   
^SCR("P1PRMT",3)
                                                                               
^SCR("P1PRMT",4)
      {05:     3 - iy`x aygnn , 2 - seqnn ,1 - POWER TERM jxc zxywzd m`d       
^SCR("P1PRMT",5)
                                                                               
^SCR("P1PRMT",6)
      {10:(7 - HP ,5 - CITIZEN,EPSON,IBM) dcnrl zxaegny zegec zqtcnd beq       
^SCR("P1PRMT",7)
                                                                               
^SCR("P1PRMT",8)
    [1                                                                         
^SCR("P1PRMT","A",1)

^SCR("P1PRMT","A",2)

^SCR("P1PRMT","A",3)

^SCR("P1PRMT","A",4)
:3-‰™€˜�™‡ŽŽ,2-“…‘ŽŽ,1-POWERTERMŠ˜ƒš˜™—š„�€„
^SCR("P1PRMT","A",5)

^SCR("P1PRMT","A",6)
:(7-HP,5-CITIZEN,EPSON,IBM)„ƒŽ’Œš˜�…‡Ž™š…‡…ƒš‘”ƒŽ„‚…‘
^SCR("P1PRMT","A",7)

^SCR("P1PRMT","A",8)

^SCR("P1PRMT","AV",1)

^SCR("P1PRMT","AV",2)

^SCR("P1PRMT","AV",3)

^SCR("P1PRMT","AV",4)
:3-hatrcajnn'2-;uxnn'1-POWERTERMlrs,rae,votv
^SCR("P1PRMT","AV",5)

^SCR("P1PRMT","AV",6)
:(7-HP'5-CITIZEN'EPSON'IBM)vsngk,rcujna,ujus,xpsnvdux
^SCR("P1PRMT","AV",7)

^SCR("P1PRMT","AV",8)

^SCR("P1PRMT","NAME")
zxeywza zqtcne seqn mixznxt
^SCR("P1PRMT","P",5,"CRD")
4,6,N,2,0
^SCR("P1PRMT","P",5,"HELP")

^SCR("P1PRMT","P",5,"LMAX")
3
^SCR("P1PRMT","P",5,"MUMPS1")

^SCR("P1PRMT","P",5,"MUMPS2")
D VT^P1PRMT
^SCR("P1PRMT","P",5,"MUST")

^SCR("P1PRMT","P",5,"TYP")
N
^SCR("P1PRMT","P",10,"CRD")
6,6,E,2,0
^SCR("P1PRMT","P",10,"HELP")

^SCR("P1PRMT","P",10,"LMAX")
3
^SCR("P1PRMT","P",10,"MUMPS1")

^SCR("P1PRMT","P",10,"MUMPS2")
D MDP^P1PRMT
^SCR("P1PRMT","P",10,"TYP")
E
^SCR("P1PRMT","P","NAME","MDP")
10
^SCR("P1PRMT","P","NAME","VT")
5
^SCR("P1PRMT","P","NM",5)
VT
^SCR("P1PRMT","P","NM",10)
MDP
^SCR("P1PRMT","P","RB",1)
3,5,9,76
^SCR("P1PRMTCH")
H
^SCR("P1PRMTCH",1)
                       # 'u`h zecnrl mixhnxt #                                 
^SCR("P1PRMTCH",2)
                                                                               
^SCR("P1PRMTCH",3)
                                                                             1$
^SCR("P1PRMTCH",4)
  : jqn lceb : qwn Y :'pin Y : qwn X : 'pin X :zclwn:'u`h hxet 'qn:dcnr 'qn:   
^SCR("P1PRMTCH",5)
                                                                               
^SCR("P1PRMTCH",6)
                                                                               
^SCR("P1PRMTCH",7)
                                                                               
^SCR("P1PRMTCH",8)
                                                                               
^SCR("P1PRMTCH",9)
                                                                               
^SCR("P1PRMTCH",10)
                                                                               
^SCR("P1PRMTCH",11)
                                                                               
^SCR("P1PRMTCH",12)
                                                                               
^SCR("P1PRMTCH",13)
                                                                               
^SCR("P1PRMTCH",14)
                                                                               
^SCR("P1PRMTCH",15)
                                                                               
^SCR("P1PRMTCH",16)
                                                                               
^SCR("P1PRMTCH",17)
                                                                               
^SCR("P1PRMTCH",18)
                                                                               
^SCR("P1PRMTCH",19)
 $1                                                                            
^SCR("P1PRMTCH","A",1)
'•€ˆš…ƒŽ’Œ�‰˜ˆŽ˜”
^SCR("P1PRMTCH","A",2)

^SCR("P1PRMTCH","A",3)

^SCR("P1PRMTCH","A",4)
Š‘ŽŒƒ…‚‘—ŽY'�‰ŽY‘—ŽX'�‰ŽXšƒŒ—Ž'•€ˆˆ˜…”'‘Ž„ƒŽ’'‘Ž
^SCR("P1PRMTCH","A",5)
--------------------------------------------------------------------
^SCR("P1PRMTCH","A",6)

^SCR("P1PRMTCH","A",7)

^SCR("P1PRMTCH","A",8)

^SCR("P1PRMTCH","A",9)

^SCR("P1PRMTCH","A",10)

^SCR("P1PRMTCH","A",11)

^SCR("P1PRMTCH","A",12)

^SCR("P1PRMTCH","A",13)

^SCR("P1PRMTCH","A",14)

^SCR("P1PRMTCH","A",15)

^SCR("P1PRMTCH","A",16)

^SCR("P1PRMTCH","A",17)

^SCR("P1PRMTCH","A",18)

^SCR("P1PRMTCH","A",19)

^SCR("P1PRMTCH","AV",1)
w•ty,usngkohrynrp
^SCR("P1PRMTCH","AV",2)

^SCR("P1PRMTCH","AV",3)

^SCR("P1PRMTCH","AV",4)
lxnksudxenYwbhnYxenXwbhnX,skenw•tyyrupwxnvsngwxn
^SCR("P1PRMTCH","AV",5)
--------------------------------------------------------------------
^SCR("P1PRMTCH","AV",6)

^SCR("P1PRMTCH","AV",7)

^SCR("P1PRMTCH","AV",8)

^SCR("P1PRMTCH","AV",9)

^SCR("P1PRMTCH","AV",10)

^SCR("P1PRMTCH","AV",11)

^SCR("P1PRMTCH","AV",12)

^SCR("P1PRMTCH","AV",13)

^SCR("P1PRMTCH","AV",14)

^SCR("P1PRMTCH","AV",15)

^SCR("P1PRMTCH","AV",16)

^SCR("P1PRMTCH","AV",17)

^SCR("P1PRMTCH","AV",18)

^SCR("P1PRMTCH","AV",19)

^SCR("P1PRMTCH","G",1,"CRD")
5,75,N,2,0
^SCR("P1PRMTCH","G",1,"FNC")

^SCR("P1PRMTCH","G",1,"GLOB")
^dev
^SCR("P1PRMTCH","G",1,"HELP")

^SCR("P1PRMTCH","G",1,"LMAX")
8
^SCR("P1PRMTCH","G",1,"MUMPS1")
D HZGDEV^P1PRMTCH(EMDA,77)
^SCR("P1PRMTCH","G",1,"MUMPS2")
D HZGDEV^P1PRMTCH(EMDA,77)
^SCR("P1PRMTCH","G",1,"NLN")
20
^SCR("P1PRMTCH","G",1,"RZD")
\
^SCR("P1PRMTCH","G",1,"SHEM")
dcnr 'qn
^SCR("P1PRMTCH","G",1,"TOPB")
8
^SCR("P1PRMTCH","G",1,"TYP")
N
^SCR("P1PRMTCH","G",2,"CRD")
5,66,N,2,0
^SCR("P1PRMTCH","G",2,"FNC")

^SCR("P1PRMTCH","G",2,"GLOB")
dev
^SCR("P1PRMTCH","G",2,"HELP")
0 - 'u`h `ll 
^SCR("P1PRMTCH","G",2,"LMAX")
13
^SCR("P1PRMTCH","G",2,"MUMPS1")
D HZGDEV^P1PRMTCH(PORTCH,55)
^SCR("P1PRMTCH","G",2,"MUMPS2")
D HZGDEV^P1PRMTCH(PORTCH,55)
^SCR("P1PRMTCH","G",2,"NLN")
20
^SCR("P1PRMTCH","G",2,"RZD")
\
^SCR("P1PRMTCH","G",2,"SHEM")
'u`h hxet 'qn
^SCR("P1PRMTCH","G",2,"TOPB")
8
^SCR("P1PRMTCH","G",2,"TYP")
N
^SCR("P1PRMTCH","G",3,"CRD")
5,52,N,1,0
^SCR("P1PRMTCH","G",3,"HELP")
0 - zclwn `ll , 1 - zclwn mr dcnr 
^SCR("P1PRMTCH","G",3,"LMAX")
5
^SCR("P1PRMTCH","G",3,"MUMPS1")

^SCR("P1PRMTCH","G",3,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMTCH","G",3,"SHEM")
zclwn
^SCR("P1PRMTCH","G",3,"TYP")
N
^SCR("P1PRMTCH","G",4,"CRD")
5,46,N,4,0
^SCR("P1PRMTCH","G",4,"HELP")

^SCR("P1PRMTCH","G",4,"LMAX")
8
^SCR("P1PRMTCH","G",4,"MUMPS1")

^SCR("P1PRMTCH","G",4,"MUMPS2")

^SCR("P1PRMTCH","G",4,"SHEM")
 'pin X 
^SCR("P1PRMTCH","G",4,"TYP")
N
^SCR("P1PRMTCH","G",5,"CRD")
5,37,N,4,0
^SCR("P1PRMTCH","G",5,"HELP")

^SCR("P1PRMTCH","G",5,"LMAX")
7
^SCR("P1PRMTCH","G",5,"MUMPS1")

^SCR("P1PRMTCH","G",5,"MUMPS2")

^SCR("P1PRMTCH","G",5,"SHEM")
 qwn X 
^SCR("P1PRMTCH","G",5,"TYP")
N
^SCR("P1PRMTCH","G",6,"CRD")
5,29,N,4,0
^SCR("P1PRMTCH","G",6,"HELP")

^SCR("P1PRMTCH","G",6,"LMAX")
7
^SCR("P1PRMTCH","G",6,"MUMPS1")

^SCR("P1PRMTCH","G",6,"MUMPS2")

^SCR("P1PRMTCH","G",6,"SHEM")
'pin Y 
^SCR("P1PRMTCH","G",6,"TYP")
N
^SCR("P1PRMTCH","G",7,"CRD")
5,21,N,4,0
^SCR("P1PRMTCH","G",7,"HELP")

^SCR("P1PRMTCH","G",7,"LMAX")
7
^SCR("P1PRMTCH","G",7,"MUMPS1")

^SCR("P1PRMTCH","G",7,"MUMPS2")

^SCR("P1PRMTCH","G",7,"SHEM")
 qwn Y 
^SCR("P1PRMTCH","G",7,"TYP")
N
^SCR("P1PRMTCH","G",8,"CRD")
5,13,N,2,0
^SCR("P1PRMTCH","G",8,"HELP")
1 - 'upi 15  , 0 - 'upi 14 jqn
^SCR("P1PRMTCH","G",8,"LMAX")
10
^SCR("P1PRMTCH","G",8,"MUMPS1")

^SCR("P1PRMTCH","G",8,"MUMPS2")

^SCR("P1PRMTCH","G",8,"SHEM")
 jqn lceb 
^SCR("P1PRMTCH","G",8,"TYP")
N
^SCR("P1PRMTCH","G","DEL")

^SCR("P1PRMTCH","G","MAX")
999
^SCR("P1PRMTCH","G","NAME","EMDA")
1
^SCR("P1PRMTCH","G","NAME","KB")
3
^SCR("P1PRMTCH","G","NAME","PORTCH")
2
^SCR("P1PRMTCH","G","NAME","SIZE")
8
^SCR("P1PRMTCH","G","NAME","XMAX")
5
^SCR("P1PRMTCH","G","NAME","XMIN")
4
^SCR("P1PRMTCH","G","NAME","YMAX")
7
^SCR("P1PRMTCH","G","NAME","YMIN")
6
^SCR("P1PRMTCH","G","NM",1)
EMDA
^SCR("P1PRMTCH","G","NM",2)
PORTCH
^SCR("P1PRMTCH","G","NM",3)
KB
^SCR("P1PRMTCH","G","NM",4)
XMIN
^SCR("P1PRMTCH","G","NM",5)
XMAX
^SCR("P1PRMTCH","G","NM",6)
YMIN
^SCR("P1PRMTCH","G","NM",7)
YMAX
^SCR("P1PRMTCH","G","NM",8)
SIZE
^SCR("P1PRMTCH","G","RB")
4,2,20,79
^SCR("P1PRMTCH","G","REF")
^TEMP($P,"TCH"
^SCR("P1PRMTCH","G","RZD")
\
^SCR("P1PRMTCH","G","STEP")
1
^SCR("P1PRMTCH","G","STG")
  : jqn lceb : qwn Y :'pin Y : qwn X : 'pin X :zclwn:'u`h hxet 'qn:dcnr 'qn:   
^SCR("P1PRMTCH","G","VG")
6
^SCR("P1PRMTCH","NAME")
'u`h zecnrl mixhnxt 
^SCR("P1PRMTD")
H
^SCR("P1PRMTD",1)
                           # mitih aeyigl mixhnxt #                            
^SCR("P1PRMTD",2)
                                                                               
^SCR("P1PRMTD",3)
                                                                     1]        
^SCR("P1PRMTD",4)
                            {02  }  cr {01  } - n : 1 zxnyn ly zery            
^SCR("P1PRMTD",5)
                            {04  }  cr {03  } - n : 2 zxnyn ly zery            
^SCR("P1PRMTD",6)
                                                                               
^SCR("P1PRMTD",7)
               {05 :(0-`l,1-ok) zegkep oery itl ihnehe` mitih aeyig            
^SCR("P1PRMTD",8)
               {08 :(0-`l,1-ok)    zxnyna micaerd lk oia mitih wlgl            
^SCR("P1PRMTD",9)
             {10   :                                 mitihn dcxed %            
^SCR("P1PRMTD",10)
             {15   :                              zexy incn dcxed %            
^SCR("P1PRMTD",11)
               {20 :(0-`l,1-ok)          zizveaw micaer zxibq xyt`l            
^SCR("P1PRMTD",12)
               {22 :(0-`l,1-ok)   mei zxibqa mitih aeyig zlah bivdl            
^SCR("P1PRMTD",13)
                                                                               
^SCR("P1PRMTD",14)
             {25   :                                    dryl zxekyn            
^SCR("P1PRMTD",15)
           [1                                                                  
^SCR("P1PRMTD","A",1)
�‰”‰ˆ�…™‰‡Œ�‰˜ˆŽ˜”
^SCR("P1PRMTD","A",2)

^SCR("P1PRMTD","A",3)

^SCR("P1PRMTD","A",4)
ƒ’-Ž:1š˜Ž™ŽŒ™š…’™
^SCR("P1PRMTD","A",5)
ƒ’-Ž:2š˜Ž™ŽŒ™š…’™
^SCR("P1PRMTD","A",6)

^SCR("P1PRMTD","A",7)
:(0-€Œ,1-�‹)š…‡‹…��…’™‰”Œ‰ˆŽ…ˆ…€�‰”‰ˆ�…™‰‡
^SCR("P1PRMTD","A",8)
:(0-€Œ,1-�‹)š˜Ž™Ž��‰ƒ�…’„Œ‹�‰��‰”‰ˆ—Œ‡Œ
^SCR("P1PRMTD","A",9)
:�‰”‰ˆŽ„ƒ˜…„%
^SCR("P1PRMTD","A",10)
:š…˜™‰ŽƒŽ„ƒ˜…„%
^SCR("P1PRMTD","A",11)
:(0-€Œ,1-�‹)š‰š–…�—�‰ƒ�…’š˜‰‚‘˜™”€Œ
^SCR("P1PRMTD","A",12)
:(0-€Œ,1-�‹)�…‰š˜‰‚‘��‰”‰ˆ�…™‰‡šŒ�ˆ‚‰–„Œ
^SCR("P1PRMTD","A",13)

^SCR("P1PRMTD","A",14)
:„’™Œš˜…‹™Ž
^SCR("P1PRMTD","A",15)

^SCR("P1PRMTD","AV",1)
ohphycuahjkohrynrp
^SCR("P1PRMTD","AV",2)

^SCR("P1PRMTD","AV",3)

^SCR("P1PRMTD","AV",4)
sg-n:1,rnanka,uga
^SCR("P1PRMTD","AV",5)
sg-n:2,rnanka,uga
^SCR("P1PRMTD","AV",6)

^SCR("P1PRMTD","AV",7)
:(0-tk'1-if),ujfubiugahpkhynuyutohphycuahj
^SCR("P1PRMTD","AV",8)
:(0-tk'1-if),rnancohscugvkfihcohphyekjk
^SCR("P1PRMTD","AV",9)
:ohphynvsruv%
^SCR("P1PRMTD","AV",10)
:,urahnsnvsruv%
^SCR("P1PRMTD","AV",11)
:(0-tk'1-if),h,muceohscug,rhdxraptk
^SCR("P1PRMTD","AV",12)
:(0-tk'1-if)ouh,rhdxcohphycuahj,kcydhmvk
^SCR("P1PRMTD","AV",13)

^SCR("P1PRMTD","AV",14)
:vgak,rufan
^SCR("P1PRMTD","AV",15)

^SCR("P1PRMTD","NAME")
mitih aeyigl mixhnxt
^SCR("P1PRMTD","P",1,"CRD")
4,39,T,5,0
^SCR("P1PRMTD","P",1,"HELP")

^SCR("P1PRMTD","P",1,"LMAX")
5
^SCR("P1PRMTD","P",1,"MUMPS1")

^SCR("P1PRMTD","P",1,"MUMPS2")

^SCR("P1PRMTD","P",1,"TYP")
T
^SCR("P1PRMTD","P",2,"CRD")
4,28,T,5,0
^SCR("P1PRMTD","P",2,"HELP")

^SCR("P1PRMTD","P",2,"LMAX")
5
^SCR("P1PRMTD","P",2,"MUMPS1")

^SCR("P1PRMTD","P",2,"MUMPS2")

^SCR("P1PRMTD","P",2,"TYP")
T
^SCR("P1PRMTD","P",3,"CRD")
5,39,T,4,0
^SCR("P1PRMTD","P",3,"HELP")

^SCR("P1PRMTD","P",3,"LMAX")
5
^SCR("P1PRMTD","P",3,"MUMPS1")

^SCR("P1PRMTD","P",3,"MUMPS2")

^SCR("P1PRMTD","P",3,"TYP")
T
^SCR("P1PRMTD","P",4,"CRD")
5,28,T,5,0
^SCR("P1PRMTD","P",4,"HELP")

^SCR("P1PRMTD","P",4,"LMAX")
5
^SCR("P1PRMTD","P",4,"MUMPS1")

^SCR("P1PRMTD","P",4,"MUMPS2")

^SCR("P1PRMTD","P",4,"TYP")
T
^SCR("P1PRMTD","P",5,"CRD")
7,15,N,3,0
^SCR("P1PRMTD","P",5,"HELP")

^SCR("P1PRMTD","P",5,"LMAX")
4
^SCR("P1PRMTD","P",5,"MUMPS1")

^SCR("P1PRMTD","P",5,"MUMPS2")
D AUTO^P1PRMTD
^SCR("P1PRMTD","P",5,"TYP")
N
^SCR("P1PRMTD","P",8,"CRD")
8,15,N,3,0
^SCR("P1PRMTD","P",8,"HELP")

^SCR("P1PRMTD","P",8,"LMAX")
4
^SCR("P1PRMTD","P",8,"MUMPS1")

^SCR("P1PRMTD","P",8,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMTD","P",8,"TYP")
N
^SCR("P1PRMTD","P",10,"CRD")
9,13,N,5,2
^SCR("P1PRMTD","P",10,"HELP")

^SCR("P1PRMTD","P",10,"LMAX")
6
^SCR("P1PRMTD","P",10,"MUMPS1")

^SCR("P1PRMTD","P",10,"MUMPS2")

^SCR("P1PRMTD","P",10,"TYP")
N
^SCR("P1PRMTD","P",15,"CRD")
10,13,N,5,2
^SCR("P1PRMTD","P",15,"HELP")

^SCR("P1PRMTD","P",15,"LMAX")
6
^SCR("P1PRMTD","P",15,"MUMPS1")

^SCR("P1PRMTD","P",15,"MUMPS2")

^SCR("P1PRMTD","P",15,"TYP")
N
^SCR("P1PRMTD","P",20,"CRD")
11,15,N,3,0
^SCR("P1PRMTD","P",20,"HELP")

^SCR("P1PRMTD","P",20,"LMAX")
4
^SCR("P1PRMTD","P",20,"MUMPS1")

^SCR("P1PRMTD","P",20,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMTD","P",20,"TYP")
N
^SCR("P1PRMTD","P",22,"CRD")
12,15,N,3,0
^SCR("P1PRMTD","P",22,"HELP")

^SCR("P1PRMTD","P",22,"LMAX")
4
^SCR("P1PRMTD","P",22,"MUMPS1")

^SCR("P1PRMTD","P",22,"MUMPS2")
D ^%L1BDO
^SCR("P1PRMTD","P",22,"TYP")
N
^SCR("P1PRMTD","P",25,"CRD")
14,13,N,5,2
^SCR("P1PRMTD","P",25,"HELP")

^SCR("P1PRMTD","P",25,"LMAX")
6
^SCR("P1PRMTD","P",25,"MUMPS1")
 ;I AUTO S %L1GET=""
^SCR("P1PRMTD","P",25,"MUMPS2")

^SCR("P1PRMTD","P",25,"TYP")
N
^SCR("P1PRMTD","P","NAME","ADSHAA1")
2
^SCR("P1PRMTD","P","NAME","ADSHAA2")
4
^SCR("P1PRMTD","P","NAME","AHDS")
15
^SCR("P1PRMTD","P","NAME","AHTIP")
10
^SCR("P1PRMTD","P","NAME","AUTO")
5
^SCR("P1PRMTD","P","NAME","HILUK")
8
^SCR("P1PRMTD","P","NAME","MESHAA1")
1
^SCR("P1PRMTD","P","NAME","MESHAA2")
3
^SCR("P1PRMTD","P","NAME","MSHA")
25
^SCR("P1PRMTD","P","NAME","SGIRA")
22
^SCR("P1PRMTD","P","NAME","SGKVZ")
20
^SCR("P1PRMTD","P","NM",1)
MESHAA1
^SCR("P1PRMTD","P","NM",2)
ADSHAA1
^SCR("P1PRMTD","P","NM",3)
MESHAA2
^SCR("P1PRMTD","P","NM",4)
ADSHAA2
^SCR("P1PRMTD","P","NM",5)
AUTO
^SCR("P1PRMTD","P","NM",8)
HILUK
^SCR("P1PRMTD","P","NM",10)
AHTIP
^SCR("P1PRMTD","P","NM",15)
AHDS
^SCR("P1PRMTD","P","NM",20)
SGKVZ
^SCR("P1PRMTD","P","NM",22)
SGIRA
^SCR("P1PRMTD","P","NM",25)
MSHA
^SCR("P1PRMTD","P","RB",1)
4,12,16,71
^SCR("P1PRMVD")
H
^SCR("P1PRMVD",1)
                                                                               
^SCR("P1PRMVD",2)
                          # "e`cie" zkxrnl mixhnxt #                           
^SCR("P1PRMVD",3)
                                                                               
^SCR("P1PRMVD",4)
                                                                      1]       
^SCR("P1PRMVD",5)
                                                                               
^SCR("P1PRMVD",6)
                                        {05:  dtew zelert meyix beq            
^SCR("P1PRMVD",7)
                                                                               
^SCR("P1PRMVD",8)
                                        {10:        xeciyl hxet 'qn            
^SCR("P1PRMVD",9)
                                                                               
^SCR("P1PRMVD",10)
           {15                            }:   uaew zxinyl dvign my            
^SCR("P1PRMVD",11)
                                                                               
^SCR("P1PRMVD",12)
       [1                                                                      
^SCR("P1PRMVD","A",1)

^SCR("P1PRMVD","A",2)
"…€ƒ‰…"š‹˜’ŽŒ�‰˜ˆŽ˜”
^SCR("P1PRMVD","A",3)

^SCR("P1PRMVD","A",4)

^SCR("P1PRMVD","A",5)

^SCR("P1PRMVD","A",6)
:„”…—š…Œ…’”�…™‰˜‚…‘
^SCR("P1PRMVD","A",7)

^SCR("P1PRMVD","A",8)
:˜…ƒ‰™Œˆ˜…”'‘Ž
^SCR("P1PRMVD","A",9)

^SCR("P1PRMVD","A",10)
:•�…—š˜‰Ž™Œ„–‰‡Ž�™
^SCR("P1PRMVD","A",11)

^SCR("P1PRMVD","A",12)

^SCR("P1PRMVD","AV",1)

^SCR("P1PRMVD","AV",2)
"utshu",frgnkohrynrp
^SCR("P1PRMVD","AV",3)

^SCR("P1PRMVD","AV",4)

^SCR("P1PRMVD","AV",5)

^SCR("P1PRMVD","AV",6)
:vpue,ukugpouahrdux
^SCR("P1PRMVD","AV",7)

^SCR("P1PRMVD","AV",8)
:rushakyrupwxn
^SCR("P1PRMVD","AV",9)

^SCR("P1PRMVD","AV",10)
:•cue,rhnakvmhjnoa
^SCR("P1PRMVD","AV",11)

^SCR("P1PRMVD","AV",12)

^SCR("P1PRMVD","NAME")

^SCR("P1PRMVD","P",5,"CRD")
6,40,N,1,0
^SCR("P1PRMVD","P",5,"HELP")
0 - meyix `ll ,2 - dpnfd dpan itl ,1 - dtew hxq ly dxeva meyix 
^SCR("P1PRMVD","P",5,"LMAX")
3
^SCR("P1PRMVD","P",5,"MUMPS1")

^SCR("P1PRMVD","P",5,"MUMPS2")

^SCR("P1PRMVD","P",5,"TYP")
N
^SCR("P1PRMVD","P",10,"CRD")
8,40,N,2,0
^SCR("P1PRMVD","P",10,"HELP")
uaewa exnyi zelert 51-54 hxet 'qn m`
^SCR("P1PRMVD","P",10,"LMAX")
3
^SCR("P1PRMVD","P",10,"MUMPS1")

^SCR("P1PRMVD","P",10,"MUMPS2")

^SCR("P1PRMVD","P",10,"TYP")
N
^SCR("P1PRMVD","P",15,"CRD")
10,11,E,30,0
^SCR("P1PRMVD","P",15,"HELP")

^SCR("P1PRMVD","P",15,"LMAX")
31
^SCR("P1PRMVD","P",15,"MUMPS1")

^SCR("P1PRMVD","P",15,"MUMPS2")

^SCR("P1PRMVD","P",15,"TYP")
E
^SCR("P1PRMVD","P","NAME","DIR")
15
^SCR("P1PRMVD","P","NAME","PORT")
10
^SCR("P1PRMVD","P","NAME","VIDEO")
5
^SCR("P1PRMVD","P","NM",5)
VIDEO
^SCR("P1PRMVD","P","NM",10)
PORT
^SCR("P1PRMVD","P","NM",15)
DIR
^SCR("P1PRMVD","P","RB",1)
5,8,13,72
^SCR("P1PRNEW")
H
^SCR("P1PRNEW",1)
                # mihixt ly micew iiepiy lewehext #                            
^SCR("P1PRNEW",2)
                                                                               
^SCR("P1PRNEW",3)
                    {10  : dry    {05      }: iepiy jix`z                      
^SCR("P1PRNEW",4)
                                                              1$               
^SCR("P1PRNEW",5)
                :       hixt my        : ycg cew : oyi cew :                   
^SCR("P1PRNEW",6)
                                                                               
^SCR("P1PRNEW",7)
                                                                               
^SCR("P1PRNEW",8)
                                                                               
^SCR("P1PRNEW",9)
                                                                               
^SCR("P1PRNEW",10)
                                                                               
^SCR("P1PRNEW",11)
                                                                               
^SCR("P1PRNEW",12)
                                                                               
^SCR("P1PRNEW",13)
                                                                               
^SCR("P1PRNEW",14)
                                                                               
^SCR("P1PRNEW",15)
                                                                               
^SCR("P1PRNEW",16)
                                                                               
^SCR("P1PRNEW",17)
                                                                               
^SCR("P1PRNEW",18)
                                                                               
^SCR("P1PRNEW",19)
                                                                               
^SCR("P1PRNEW",20)
                                                                               
^SCR("P1PRNEW",21)
            $1                                                                 
^SCR("P1PRNEW","A",1)
�‰ˆ‰˜”Œ™�‰ƒ…—‰‰…�‰™Œ…—…ˆ…˜”
^SCR("P1PRNEW","A",2)

^SCR("P1PRNEW","A",3)
:„’™:‰…�‰™Š‰˜€š
^SCR("P1PRNEW","A",4)

^SCR("P1PRNEW","A",5)
ˆ‰˜”�™™ƒ‡ƒ…—�™‰ƒ…—
^SCR("P1PRNEW","A",6)
----------------------------------------
^SCR("P1PRNEW","A",7)

^SCR("P1PRNEW","A",8)

^SCR("P1PRNEW","A",9)

^SCR("P1PRNEW","A",10)

^SCR("P1PRNEW","A",11)

^SCR("P1PRNEW","A",12)

^SCR("P1PRNEW","A",13)

^SCR("P1PRNEW","A",14)

^SCR("P1PRNEW","A",15)

^SCR("P1PRNEW","A",16)

^SCR("P1PRNEW","A",17)

^SCR("P1PRNEW","A",18)

^SCR("P1PRNEW","A",19)

^SCR("P1PRNEW","A",20)

^SCR("P1PRNEW","A",21)

^SCR("P1PRNEW","AV",1)
ohyhrpkaohsuehhubhakueuyurp
^SCR("P1PRNEW","AV",2)

^SCR("P1PRNEW","AV",3)
:vga:hubhalhrt,
^SCR("P1PRNEW","AV",4)

^SCR("P1PRNEW","AV",5)
yhrpoaasjsueiahsue
^SCR("P1PRNEW","AV",6)
----------------------------------------
^SCR("P1PRNEW","AV",7)

^SCR("P1PRNEW","AV",8)

^SCR("P1PRNEW","AV",9)

^SCR("P1PRNEW","AV",10)

^SCR("P1PRNEW","AV",11)

^SCR("P1PRNEW","AV",12)

^SCR("P1PRNEW","AV",13)

^SCR("P1PRNEW","AV",14)

^SCR("P1PRNEW","AV",15)

^SCR("P1PRNEW","AV",16)

^SCR("P1PRNEW","AV",17)

^SCR("P1PRNEW","AV",18)

^SCR("P1PRNEW","AV",19)

^SCR("P1PRNEW","AV",20)

^SCR("P1PRNEW","AV",21)

^SCR("P1PRNEW","G",1,"CRD")
6,59,E,6,0
^SCR("P1PRNEW","G",1,"HELP")

^SCR("P1PRNEW","G",1,"LMAX")
9
^SCR("P1PRNEW","G",1,"MUMPS1")

^SCR("P1PRNEW","G",1,"MUMPS2")

^SCR("P1PRNEW","G",1,"OUTPUT")

^SCR("P1PRNEW","G",1,"SHEM")
 oyi cew 
^SCR("P1PRNEW","G",1,"TYP")
E
^SCR("P1PRNEW","G",2,"CRD")
6,49,E,6,0
^SCR("P1PRNEW","G",2,"HELP")

^SCR("P1PRNEW","G",2,"LMAX")
9
^SCR("P1PRNEW","G",2,"MUMPS1")

^SCR("P1PRNEW","G",2,"MUMPS2")

^SCR("P1PRNEW","G",2,"OUTPUT")

^SCR("P1PRNEW","G",2,"SHEM")
 ycg cew 
^SCR("P1PRNEW","G",2,"TYP")
E
^SCR("P1PRNEW","G",3,"CRD")
6,39,H,22,0
^SCR("P1PRNEW","G",3,"HELP")

^SCR("P1PRNEW","G",3,"LMAX")
22
^SCR("P1PRNEW","G",3,"MUMPS1")

^SCR("P1PRNEW","G",3,"MUMPS2")

^SCR("P1PRNEW","G",3,"OUTPUT")

^SCR("P1PRNEW","G",3,"SHEM")
       hixt my        
^SCR("P1PRNEW","G",3,"TYP")
H
^SCR("P1PRNEW","G","MAX")
99999
^SCR("P1PRNEW","G","NAME","CODN")
2
^SCR("P1PRNEW","G","NAME","CODO")
1
^SCR("P1PRNEW","G","NAME","SHEMP")
3
^SCR("P1PRNEW","G","NM",1)
CODO
^SCR("P1PRNEW","G","NM",2)
CODN
^SCR("P1PRNEW","G","NM",3)
SHEMP
^SCR("P1PRNEW","G","RB")
5,13,22,64
^SCR("P1PRNEW","G","REF")
^TEMP($P
^SCR("P1PRNEW","G","RZD")
\
^SCR("P1PRNEW","G","STEP")
1
^SCR("P1PRNEW","G","STG")
                :       hixt my        : ycg cew : oyi cew :                   
^SCR("P1PRNEW","G","VG")
7
^SCR("P1PRNEW","NAME")
mihixt iepiy lwehext
^SCR("P1PRNEW","P",5,"CRD")
3,34,D,8,0
^SCR("P1PRNEW","P",5,"HELP")

^SCR("P1PRNEW","P",5,"LMAX")
9
^SCR("P1PRNEW","P",5,"MUMPS1")

^SCR("P1PRNEW","P",5,"MUMPS2")

^SCR("P1PRNEW","P",5,"OUTPUT")

^SCR("P1PRNEW","P",5,"TYP")
D
^SCR("P1PRNEW","P",10,"CRD")
3,20,E,5,0
^SCR("P1PRNEW","P",10,"HELP")

^SCR("P1PRNEW","P",10,"LMAX")
5
^SCR("P1PRNEW","P",10,"MUMPS1")

^SCR("P1PRNEW","P",10,"MUMPS2")

^SCR("P1PRNEW","P",10,"OUTPUT")

^SCR("P1PRNEW","P",10,"TYP")
E
^SCR("P1PRNEW","P","NAME","DATS")
5
^SCR("P1PRNEW","P","NAME","SHAAS")
10
^SCR("P1PRNEW","P","NM",5)
DATS
^SCR("P1PRNEW","P","NM",10)
SHAAS
^SCR("P1PRT")
H
^SCR("P1PRT",1)
                               # mihixt zlah #                                 
^SCR("P1PRT",2)
                                                                               
^SCR("P1PRT",3)
                                                                          1]   
^SCR("P1PRT",4)
                   {                            06}   {05    }: hixt cew       
^SCR("P1PRT",5)
                                                                               
^SCR("P1PRT",6)
                                      {11               }{10 }: hixt beq       
^SCR("P1PRT",7)
                                                                               
^SCR("P1PRT",8)
                                                 {20        }:okxvl xign       
^SCR("P1PRT",9)
                                                                               
^SCR("P1PRT",10)
                                       {25         }: gelyl zeqtcn dfi`l       
^SCR("P1PRT",11)
                                                                               
^SCR("P1PRT",12)
                                             {   30}:   qitcdl rav dfi`a       
^SCR("P1PRT",13)
                                                                               
^SCR("P1PRT",14)
           [1                                                                  
^SCR("P1PRT","A",1)
�‰ˆ‰˜”šŒ�ˆ
^SCR("P1PRT","A",2)

^SCR("P1PRT","A",3)

^SCR("P1PRT","A",4)
:ˆ‰˜”ƒ…—
^SCR("P1PRT","A",5)

^SCR("P1PRT","A",6)
:ˆ‰˜”‚…‘
^SCR("P1PRT","A",7)

^SCR("P1PRT","A",8)
:�‹˜–Œ˜‰‡Ž
^SCR("P1PRT","A",9)

^SCR("P1PRT","A",10)
:‡…Œ™Œš…‘”ƒŽ„†‰€Œ
^SCR("P1PRT","A",11)

^SCR("P1PRT","A",12)
:‘‰”ƒ„Œ’�–„†‰€�
^SCR("P1PRT","A",13)

^SCR("P1PRT","A",14)

^SCR("P1PRT","AV",1)
ohyhrp,kcy
^SCR("P1PRT","AV",2)

^SCR("P1PRT","AV",3)

^SCR("P1PRT","AV",4)
:yhrpsue
^SCR("P1PRT","AV",5)

^SCR("P1PRT","AV",6)
:yhrpdux
^SCR("P1PRT","AV",7)

^SCR("P1PRT","AV",8)
:ifrmkrhjn
^SCR("P1PRT","AV",9)

^SCR("P1PRT","AV",10)
:jukak,uxpsnvzhtk
^SCR("P1PRT","AV",11)

^SCR("P1PRT","AV",12)
:xhpsvkgcmvzhtc
^SCR("P1PRT","AV",13)

^SCR("P1PRT","AV",14)

^SCR("P1PRT","NAME")
dvitl mihixt zlah
^SCR("P1PRT","P",5,"CRD")
4,54,E,7,0
^SCR("P1PRT","P",5,"FNC")

^SCR("P1PRT","P",5,"GLOB")
PAR
^SCR("P1PRT","P",5,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1PRT","P",5,"LMAX")
7
^SCR("P1PRT","P",5,"MUMPS1")

^SCR("P1PRT","P",5,"MUMPS2")

^SCR("P1PRT","P",5,"MUST")

^SCR("P1PRT","P",5,"NLN")
20
^SCR("P1PRT","P",5,"RZD")
\
^SCR("P1PRT","P",5,"TOPB")
8
^SCR("P1PRT","P",5,"TYP")
E
^SCR("P1PRT","P",5,"VRB")
PAR1
^SCR("P1PRT","P",6,"CRD")
4,51,H,30,0
^SCR("P1PRT","P",6,"HELP")

^SCR("P1PRT","P",6,"LMAX")
31
^SCR("P1PRT","P",6,"MUMPS1")

^SCR("P1PRT","P",6,"MUMPS2")

^SCR("P1PRT","P",6,"OUTPUT")

^SCR("P1PRT","P",6,"TYP")
H
^SCR("P1PRT","P",10,"CRD")
6,57,E,4,0
^SCR("P1PRT","P",10,"FNC")

^SCR("P1PRT","P",10,"GLOB")
P1SPRT
^SCR("P1PRT","P",10,"HELP")

^SCR("P1PRT","P",10,"LMAX")
4
^SCR("P1PRT","P",10,"MUMPS1")

^SCR("P1PRT","P",10,"MUMPS2")

^SCR("P1PRT","P",10,"NLN")
20
^SCR("P1PRT","P",10,"RZD")
\
^SCR("P1PRT","P",10,"TOPB")
8
^SCR("P1PRT","P",10,"TYP")
E
^SCR("P1PRT","P",10,"VRB")
SUGP1
^SCR("P1PRT","P",11,"CRD")
6,38,E,18,0
^SCR("P1PRT","P",11,"HELP")

^SCR("P1PRT","P",11,"LMAX")
18
^SCR("P1PRT","P",11,"MUMPS1")

^SCR("P1PRT","P",11,"MUMPS2")

^SCR("P1PRT","P",11,"OUTPUT")

^SCR("P1PRT","P",11,"TYP")
E
^SCR("P1PRT","P",20,"CRD")
8,49,N,8,2
^SCR("P1PRT","P",20,"HELP")

^SCR("P1PRT","P",20,"LMAX")
11
^SCR("P1PRT","P",20,"MUMPS1")

^SCR("P1PRT","P",20,"MUMPS2")

^SCR("P1PRT","P",20,"TYP")
N
^SCR("P1PRT","P",25,"CRD")
10,39,E,8,0
^SCR("P1PRT","P",25,"HELP")

^SCR("P1PRT","P",25,"LMAX")
12
^SCR("P1PRT","P",25,"MUMPS1")

^SCR("P1PRT","P",25,"MUMPS2")

^SCR("P1PRT","P",25,"TYP")
E
^SCR("P1PRT","P",30,"CRD")
12,52,H,6,0
^SCR("P1PRT","P",30,"HELP")

^SCR("P1PRT","P",30,"LMAX")
6
^SCR("P1PRT","P",30,"MUMPS1")

^SCR("P1PRT","P",30,"MUMPS2")
D CEVA^P1PRT
^SCR("P1PRT","P",30,"TYP")
H
^SCR("P1PRT","P","NAME","CEVA")
30
^SCR("P1PRT","P","NAME","CEVA","REF")
$P($G(^TEMPP($P,PAR,1)),"**",1)
^SCR("P1PRT","P","NAME","CEVA","REF1")
$P(^TEMPP($P,PAR,1),"**",1)
^SCR("P1PRT","P","NAME","MDPS")
25
^SCR("P1PRT","P","NAME","MDPS","REF")
$P($G(^TEMPP($P,PAR,1)),"**",2)
^SCR("P1PRT","P","NAME","MDPS","REF1")
$P(^TEMPP($P,PAR,1),"**",2)
^SCR("P1PRT","P","NAME","MH")
20
^SCR("P1PRT","P","NAME","MH","REF")
$P($G(^TEMPP($P,PAR)),"**",2)
^SCR("P1PRT","P","NAME","MH","REF1")
$P(^TEMPP($P,PAR),"**",2)
^SCR("P1PRT","P","NAME","PAR")
5
^SCR("P1PRT","P","NAME","PAR","KEY")

^SCR("P1PRT","P","NAME","PAR","KEY",1)
PAR/\PAR1,,MH,,,,,,SUG
^SCR("P1PRT","P","NAME","PAR","KEY",2)
PAR/\CEVA,,MDPS
^SCR("P1PRT","P","NAME","PAR1")
6
^SCR("P1PRT","P","NAME","PAR1","REF")
$P($G(^TEMPP($P,PAR)),"**",1)
^SCR("P1PRT","P","NAME","PAR1","REF1")
$P(^TEMPP($P,PAR),"**",1)
^SCR("P1PRT","P","NAME","SUG","REF")
$P($G(^TEMPP($P,PAR)),"**",5)
^SCR("P1PRT","P","NAME","SUG","REF1")
$P(^TEMPP($P,PAR),"**",5)
^SCR("P1PRT","P","NAME","SUGP")
10
^SCR("P1PRT","P","NAME","SUGP1")
11
^SCR("P1PRT","P","NM",5)
PAR
^SCR("P1PRT","P","NM",6)
PAR1
^SCR("P1PRT","P","NM",10)
SUGP
^SCR("P1PRT","P","NM",11)
SUGP1
^SCR("P1PRT","P","NM",20)
MH
^SCR("P1PRT","P","NM",25)
MDPS
^SCR("P1PRT","P","NM",30)
CEVA
^SCR("P1PRT","P","RB",1)
4,12,15,76
^SCR("P1PRT","P","REF",1)
^TEMPP($P,PAR)
^SCR("P1PRT","P","REF",1,"RZD")
**
^SCR("P1PRT","P","REF",1,"STR")
PAR1**MH******SUG
^SCR("P1PRT","P","REF",2)
^TEMPP($P,PAR,1)
^SCR("P1PRT","P","REF",2,"RZD")
**
^SCR("P1PRT","P","REF",2,"STR")
CEVA**MDPS
^SCR("P1PSET")
H
^SCR("P1PSET",1)
                                                                               
^SCR("P1PSET",2)
                     {                     15}: hq xe`z  {10      }:  hq 'qn   
^SCR("P1PSET",3)
                                                                             1$
^SCR("P1PSET",4)
  :        dxrd      ::zetqez: zenk:  xign  :    hixt xe`z      ::hixt cew:    
^SCR("P1PSET",5)
                                                                               
^SCR("P1PSET",6)
                                                                               
^SCR("P1PSET",7)
                                                                               
^SCR("P1PSET",8)
                                                                               
^SCR("P1PSET",9)
                                                                               
^SCR("P1PSET",10)
                                                                               
^SCR("P1PSET",11)
                                                                               
^SCR("P1PSET",12)
                                                                               
^SCR("P1PSET",13)
                                                                               
^SCR("P1PSET",14)
                                                                               
^SCR("P1PSET",15)
                                                                               
^SCR("P1PSET",16)
                                                                               
^SCR("P1PSET",17)
                                                                               
^SCR("P1PSET",18)
 $1                                                                            
^SCR("P1PSET",19)
                                                                               
^SCR("P1PSET",20)
        xtqnd iptl (.) dcewp cilwdl `p dxey 'qn e` cew itl hixtd z` xz`l ick   
^SCR("P1PSET","A",1)

^SCR("P1PSET","A",2)
:ˆ‘˜…€š:ˆ‘'‘Ž
^SCR("P1PSET","A",3)

^SCR("P1PSET","A",4)
„˜’„š…”‘…šš…Ž‹˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1PSET","A",5)
--------------------------------------------------------------------
^SCR("P1PSET","A",6)

^SCR("P1PSET","A",7)

^SCR("P1PSET","A",8)

^SCR("P1PSET","A",9)

^SCR("P1PSET","A",10)

^SCR("P1PSET","A",11)

^SCR("P1PSET","A",12)

^SCR("P1PSET","A",13)

^SCR("P1PSET","A",14)

^SCR("P1PSET","A",15)

^SCR("P1PSET","A",16)

^SCR("P1PSET","A",17)

^SCR("P1PSET","A",18)

^SCR("P1PSET","A",19)

^SCR("P1PSET","A",20)
˜”‘Ž„‰�”Œ(.)„ƒ…—�ƒ‰Œ—„Œ€�„˜…™'‘Ž…€ƒ…—‰”Œˆ‰˜”„š€˜š€Œ‰ƒ‹
^SCR("P1PSET","AV",1)

^SCR("P1PSET","AV",2)
:yxrut,:yxwxn
^SCR("P1PSET","AV",3)

^SCR("P1PSET","AV",4)
vrgv,upxu,,unfrhjnyhrprut,yhrpsue
^SCR("P1PSET","AV",5)
--------------------------------------------------------------------
^SCR("P1PSET","AV",6)

^SCR("P1PSET","AV",7)

^SCR("P1PSET","AV",8)

^SCR("P1PSET","AV",9)

^SCR("P1PSET","AV",10)

^SCR("P1PSET","AV",11)

^SCR("P1PSET","AV",12)

^SCR("P1PSET","AV",13)

^SCR("P1PSET","AV",14)

^SCR("P1PSET","AV",15)

^SCR("P1PSET","AV",16)

^SCR("P1PSET","AV",17)

^SCR("P1PSET","AV",18)

^SCR("P1PSET","AV",19)

^SCR("P1PSET","AV",20)
rpxnvhbpk(/)vsuebshkevktbvruawxnutsuehpkyhrpv,tr,tkhsf
^SCR("P1PSET","G",1,"CRD")
5,74,E,8,0
^SCR("P1PSET","G",1,"HELP")

^SCR("P1PSET","G",1,"LMAX")
8
^SCR("P1PSET","G",1,"MUMPS1")
S %ZMSL="= "
^SCR("P1PSET","G",1,"MUMPS2")

^SCR("P1PSET","G",1,"OUTPUT")

^SCR("P1PSET","G",1,"SHEM")
hixt cew
^SCR("P1PSET","G",1,"TYP")
E
^SCR("P1PSET","G",2,"CRD")
5,65,H,0,0
^SCR("P1PSET","G",2,"HELP")

^SCR("P1PSET","G",2,"LMAX")
0
^SCR("P1PSET","G",2,"MUMPS1")

^SCR("P1PSET","G",2,"MUMPS2")

^SCR("P1PSET","G",2,"OUTPUT")

^SCR("P1PSET","G",2,"SHEM")

^SCR("P1PSET","G",2,"TYP")
H
^SCR("P1PSET","G",3,"CRD")
5,64,H,19,0
^SCR("P1PSET","G",3,"HELP")

^SCR("P1PSET","G",3,"LMAX")
19
^SCR("P1PSET","G",3,"MUMPS1")

^SCR("P1PSET","G",3,"MUMPS2")

^SCR("P1PSET","G",3,"OUTPUT")

^SCR("P1PSET","G",3,"SHEM")
    hixt xe`z      
^SCR("P1PSET","G",3,"TYP")
H
^SCR("P1PSET","G",4,"CRD")
5,44,N,8,2
^SCR("P1PSET","G",4,"HELP")

^SCR("P1PSET","G",4,"LMAX")
8
^SCR("P1PSET","G",4,"MUMPS1")

^SCR("P1PSET","G",4,"MUMPS2")

^SCR("P1PSET","G",4,"OUTPUT")

^SCR("P1PSET","G",4,"SHEM")
  xign  
^SCR("P1PSET","G",4,"TYP")
N
^SCR("P1PSET","G",5,"CRD")
5,35,N,4,0
^SCR("P1PSET","G",5,"HELP")
dxrdl mirbn <F9> zvigl ixg` ; <F9> e` "geex" ywna ynzydl xyt` 1=zenk zxigal 
^SCR("P1PSET","G",5,"LMAX")
5
^SCR("P1PSET","G",5,"MUMPS1")
S %ZMSL=".u "
^SCR("P1PSET","G",5,"MUMPS2")
D CT^P1PSET
^SCR("P1PSET","G",5,"SHEM")
 zenk
^SCR("P1PSET","G",5,"TYP")
N
^SCR("P1PSET","G",6,"CRD")
5,29,N,6,2
^SCR("P1PSET","G",6,"HELP")

^SCR("P1PSET","G",6,"LMAX")
6
^SCR("P1PSET","G",6,"MUMPS1")

^SCR("P1PSET","G",6,"MUMPS2")

^SCR("P1PSET","G",6,"OUTPUT")

^SCR("P1PSET","G",6,"SHEM")
zetqez
^SCR("P1PSET","G",6,"TYP")
N
^SCR("P1PSET","G",7,"CRD")
5,22,E,0,0
^SCR("P1PSET","G",7,"HELP")

^SCR("P1PSET","G",7,"LMAX")
0
^SCR("P1PSET","G",7,"MUMPS1")

^SCR("P1PSET","G",7,"MUMPS2")

^SCR("P1PSET","G",7,"OUTPUT")

^SCR("P1PSET","G",7,"SHEM")

^SCR("P1PSET","G",7,"TYP")
E
^SCR("P1PSET","G",8,"CRD")
5,21,H,18,0
^SCR("P1PSET","G",8,"HELP")
<F9> - zetqez zbvd ,<F7> - zexrd zbvd , <F6> - dxrd yetig 
^SCR("P1PSET","G",8,"LMAX")
18
^SCR("P1PSET","G",8,"MUMPS1")

^SCR("P1PSET","G",8,"MUMPS2")
D HRA^P1PSET
^SCR("P1PSET","G",8,"SHEM")
        dxrd      
^SCR("P1PSET","G",8,"TYP")
H
^SCR("P1PSET","G","DEL")
Y
^SCR("P1PSET","G","MAX")
1
^SCR("P1PSET","G","NAME","CT")
5
^SCR("P1PSET","G","NAME","HRA")
8
^SCR("P1PSET","G","NAME","KODT")
1
^SCR("P1PSET","G","NAME","MHT")
4
^SCR("P1PSET","G","NAME","NAMET")
3
^SCR("P1PSET","G","NAME","SUG")
2
^SCR("P1PSET","G","NAME","SUM")
7
^SCR("P1PSET","G","NAME","TSF")
6
^SCR("P1PSET","G","NM",1)
KODT
^SCR("P1PSET","G","NM",2)
SUG
^SCR("P1PSET","G","NM",3)
NAMET
^SCR("P1PSET","G","NM",4)
MHT
^SCR("P1PSET","G","NM",5)
CT
^SCR("P1PSET","G","NM",6)
TSF
^SCR("P1PSET","G","NM",7)
SUM
^SCR("P1PSET","G","NM",8)
HRA
^SCR("P1PSET","G","RB")
4,2,19,79
^SCR("P1PSET","G","REF")
^THZP($P
^SCR("P1PSET","G","RZD")
\
^SCR("P1PSET","G","STEP")
1
^SCR("P1PSET","G","STG")
  :        dxrd      ::zetqez: zenk:  xign  :    hixt xe`z      ::hixt cew:    
^SCR("P1PSET","G","VG")
6
^SCR("P1PSET","NAME")

^SCR("P1PSET","P",10,"CRD")
2,57,E,8,0
^SCR("P1PSET","P",10,"HELP")

^SCR("P1PSET","P",10,"LMAX")
9
^SCR("P1PSET","P",10,"MUMPS1")

^SCR("P1PSET","P",10,"MUMPS2")

^SCR("P1PSET","P",10,"OUTPUT")

^SCR("P1PSET","P",10,"TYP")
E
^SCR("P1PSET","P",15,"CRD")
2,46,H,20
^SCR("P1PSET","P",15,"HELP")

^SCR("P1PSET","P",15,"LMAX")
24
^SCR("P1PSET","P",15,"MUMPS1")

^SCR("P1PSET","P",15,"MUMPS2")

^SCR("P1PSET","P",15,"OUTPUT")

^SCR("P1PSET","P",15,"TYP")
H
^SCR("P1PSET","P","NAME","KODP")
10
^SCR("P1PSET","P","NAME","NAMEP")
15
^SCR("P1PSET","P","NM",10)
KODP
^SCR("P1PSET","P","NM",15)
NAMEP
^SCR("P1PSUG")
H
^SCR("P1PSUG",1)
                           # 'hixt beq <- hixt' dlah #                         
^SCR("P1PSUG",2)
                                                                               
^SCR("P1PSUG",3)
                                                                             1$
^SCR("P1PSUG",4)
            :     beq xe`z    :hixt beq:       hixt xe`z        :hixt cew:     
^SCR("P1PSUG",5)
                                                                               
^SCR("P1PSUG",6)
                                                                               
^SCR("P1PSUG",7)
                                                                               
^SCR("P1PSUG",8)
                                                                               
^SCR("P1PSUG",9)
                                                                               
^SCR("P1PSUG",10)
                                                                               
^SCR("P1PSUG",11)
                                                                               
^SCR("P1PSUG",12)
                                                                               
^SCR("P1PSUG",13)
                                                                               
^SCR("P1PSUG",14)
                                                                               
^SCR("P1PSUG",15)
                                                                               
^SCR("P1PSUG",16)
                                                                               
^SCR("P1PSUG",17)
                                                                               
^SCR("P1PSUG",18)
                                                                               
^SCR("P1PSUG",19)
                                                                               
^SCR("P1PSUG",20)
         $1                                                                    
^SCR("P1PSUG","A",1)
'ˆ‰˜”‚…‘<-ˆ‰˜”'„Œ�ˆ
^SCR("P1PSUG","A",2)

^SCR("P1PSUG","A",3)

^SCR("P1PSUG","A",4)
‚…‘˜…€šˆ‰˜”‚…‘ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1PSUG","A",5)
--------------------------------------------------------------
^SCR("P1PSUG","A",6)

^SCR("P1PSUG","A",7)

^SCR("P1PSUG","A",8)

^SCR("P1PSUG","A",9)

^SCR("P1PSUG","A",10)

^SCR("P1PSUG","A",11)

^SCR("P1PSUG","A",12)

^SCR("P1PSUG","A",13)

^SCR("P1PSUG","A",14)

^SCR("P1PSUG","A",15)

^SCR("P1PSUG","A",16)

^SCR("P1PSUG","A",17)

^SCR("P1PSUG","A",18)

^SCR("P1PSUG","A",19)

^SCR("P1PSUG","A",20)

^SCR("P1PSUG","AV",1)
wyhrpdux<-yhrpwvkcy
^SCR("P1PSUG","AV",2)

^SCR("P1PSUG","AV",3)

^SCR("P1PSUG","AV",4)
duxrut,yhrpduxyhrprut,yhrpsue
^SCR("P1PSUG","AV",5)
--------------------------------------------------------------
^SCR("P1PSUG","AV",6)

^SCR("P1PSUG","AV",7)

^SCR("P1PSUG","AV",8)

^SCR("P1PSUG","AV",9)

^SCR("P1PSUG","AV",10)

^SCR("P1PSUG","AV",11)

^SCR("P1PSUG","AV",12)

^SCR("P1PSUG","AV",13)

^SCR("P1PSUG","AV",14)

^SCR("P1PSUG","AV",15)

^SCR("P1PSUG","AV",16)

^SCR("P1PSUG","AV",17)

^SCR("P1PSUG","AV",18)

^SCR("P1PSUG","AV",19)

^SCR("P1PSUG","AV",20)

^SCR("P1PSUG","G",1,"CRD")
5,73,E,8,0
^SCR("P1PSUG","G",1,"HELP")

^SCR("P1PSUG","G",1,"LMAX")
8
^SCR("P1PSUG","G",1,"MUMPS1")

^SCR("P1PSUG","G",1,"MUMPS2")

^SCR("P1PSUG","G",1,"OUTPUT")

^SCR("P1PSUG","G",1,"SHEM")
hixt cew
^SCR("P1PSUG","G",1,"TYP")
E
^SCR("P1PSUG","G",2,"CRD")
5,64,H,24,0
^SCR("P1PSUG","G",2,"HELP")

^SCR("P1PSUG","G",2,"LMAX")
24
^SCR("P1PSUG","G",2,"MUMPS1")

^SCR("P1PSUG","G",2,"MUMPS2")

^SCR("P1PSUG","G",2,"OUTPUT")

^SCR("P1PSUG","G",2,"SHEM")
       hixt xe`z        
^SCR("P1PSUG","G",2,"TYP")
H
^SCR("P1PSUG","G",3,"CHECK")
Y
^SCR("P1PSUG","G",3,"CRD")
5,39,N,4,0
^SCR("P1PSUG","G",3,"CREAT")

^SCR("P1PSUG","G",3,"FNC")

^SCR("P1PSUG","G",3,"GLOB")
PARSUG
^SCR("P1PSUG","G",3,"HELP")
<F10> - mihixt ibeq zlah ,<F9> - hixt qihxk , <F7> - dbvd ,<F6> - yetig
^SCR("P1PSUG","G",3,"LMAX")
8
^SCR("P1PSUG","G",3,"MUMPS1")
S %ZMSL="="
^SCR("P1PSUG","G",3,"MUMPS2")
D SUG^P1PSUG
^SCR("P1PSUG","G",3,"MUST")

^SCR("P1PSUG","G",3,"NLN")
20
^SCR("P1PSUG","G",3,"NS")
mihixt ibeq zlah
^SCR("P1PSUG","G",3,"RZD")
\
^SCR("P1PSUG","G",3,"SHEM")
hixt beq
^SCR("P1PSUG","G",3,"TOPB")
8
^SCR("P1PSUG","G",3,"TYP")
N
^SCR("P1PSUG","G",3,"VRB")
SUG1
^SCR("P1PSUG","G",4,"CRD")
5,30,H,16,0
^SCR("P1PSUG","G",4,"HELP")

^SCR("P1PSUG","G",4,"LMAX")
17
^SCR("P1PSUG","G",4,"MUMPS1")

^SCR("P1PSUG","G",4,"MUMPS2")

^SCR("P1PSUG","G",4,"OUTPUT")

^SCR("P1PSUG","G",4,"SHEM")
     beq xe`z    
^SCR("P1PSUG","G",4,"TYP")
H
^SCR("P1PSUG","G","MAX")
643
^SCR("P1PSUG","G","NAME","PAR")
1
^SCR("P1PSUG","G","NAME","PAR1")
2
^SCR("P1PSUG","G","NAME","SUG")
3
^SCR("P1PSUG","G","NAME","SUG1")
4
^SCR("P1PSUG","G","NM",1)
PAR
^SCR("P1PSUG","G","NM",2)
PAR1
^SCR("P1PSUG","G","NM",3)
SUG
^SCR("P1PSUG","G","NM",4)
SUG1
^SCR("P1PSUG","G","RB")
4,10,21,79
^SCR("P1PSUG","G","REF")
^TEMP($P
^SCR("P1PSUG","G","RZD")
\
^SCR("P1PSUG","G","STEP")
1
^SCR("P1PSUG","G","STG")
            :     beq xe`z    :hixt beq:       hixt xe`z        :hixt cew:     
^SCR("P1PSUG","G","VG")
6
^SCR("P1PSUG","NAME")

^SCR("P1RCVPAR")
H
^SCR("P1RCVPAR",1)
                                                                               
^SCR("P1RCVPAR",2)
                                                                             1$
^SCR("P1RCVPAR",3)
   : xy`l :ycg xign:       ycg my     :oyi xign:      oyi my     :hixt cew:    
^SCR("P1RCVPAR",4)
                                                                               
^SCR("P1RCVPAR",5)
                                                                               
^SCR("P1RCVPAR",6)
                                                                               
^SCR("P1RCVPAR",7)
                                                                               
^SCR("P1RCVPAR",8)
                                                                               
^SCR("P1RCVPAR",9)
                                                                               
^SCR("P1RCVPAR",10)
                                                                               
^SCR("P1RCVPAR",11)
                                                                               
^SCR("P1RCVPAR",12)
                                                                               
^SCR("P1RCVPAR",13)
                                                                               
^SCR("P1RCVPAR",14)
                                                                               
^SCR("P1RCVPAR",15)
                                                                               
^SCR("P1RCVPAR",16)
                                                                               
^SCR("P1RCVPAR",17)
                                                                               
^SCR("P1RCVPAR",18)
                                                                               
^SCR("P1RCVPAR",19)
                                                                               
^SCR("P1RCVPAR",20)
                                                                               
^SCR("P1RCVPAR",21)
                                                                               
^SCR("P1RCVPAR",22)
 $1                                                                            
^SCR("P1RCVPAR","A",1)

^SCR("P1RCVPAR","A",2)

^SCR("P1RCVPAR","A",3)
˜™€Œ™ƒ‡˜‰‡Ž™ƒ‡�™�™‰˜‰‡Ž�™‰�™ˆ‰˜”ƒ…—
^SCR("P1RCVPAR","A",4)
---------------------------------------------------------------------
^SCR("P1RCVPAR","A",5)

^SCR("P1RCVPAR","A",6)

^SCR("P1RCVPAR","A",7)

^SCR("P1RCVPAR","A",8)

^SCR("P1RCVPAR","A",9)

^SCR("P1RCVPAR","A",10)

^SCR("P1RCVPAR","A",11)

^SCR("P1RCVPAR","A",12)

^SCR("P1RCVPAR","A",13)

^SCR("P1RCVPAR","A",14)

^SCR("P1RCVPAR","A",15)

^SCR("P1RCVPAR","A",16)

^SCR("P1RCVPAR","A",17)

^SCR("P1RCVPAR","A",18)

^SCR("P1RCVPAR","A",19)

^SCR("P1RCVPAR","A",20)

^SCR("P1RCVPAR","A",21)

^SCR("P1RCVPAR","A",22)

^SCR("P1RCVPAR","AV",1)

^SCR("P1RCVPAR","AV",2)

^SCR("P1RCVPAR","AV",3)
ratkasjrhjnasjoaiahrhjniahoayhrpsue
^SCR("P1RCVPAR","AV",4)
---------------------------------------------------------------------
^SCR("P1RCVPAR","AV",5)

^SCR("P1RCVPAR","AV",6)

^SCR("P1RCVPAR","AV",7)

^SCR("P1RCVPAR","AV",8)

^SCR("P1RCVPAR","AV",9)

^SCR("P1RCVPAR","AV",10)

^SCR("P1RCVPAR","AV",11)

^SCR("P1RCVPAR","AV",12)

^SCR("P1RCVPAR","AV",13)

^SCR("P1RCVPAR","AV",14)

^SCR("P1RCVPAR","AV",15)

^SCR("P1RCVPAR","AV",16)

^SCR("P1RCVPAR","AV",17)

^SCR("P1RCVPAR","AV",18)

^SCR("P1RCVPAR","AV",19)

^SCR("P1RCVPAR","AV",20)

^SCR("P1RCVPAR","AV",21)

^SCR("P1RCVPAR","AV",22)

^SCR("P1RCVPAR","G",1,"CRD")
4,74,E,8,0
^SCR("P1RCVPAR","G",1,"HELP")

^SCR("P1RCVPAR","G",1,"LMAX")
8
^SCR("P1RCVPAR","G",1,"MUMPS1")

^SCR("P1RCVPAR","G",1,"MUMPS2")

^SCR("P1RCVPAR","G",1,"OUTPUT")

^SCR("P1RCVPAR","G",1,"SHEM")
hixt cew
^SCR("P1RCVPAR","G",1,"TYP")
E
^SCR("P1RCVPAR","G",2,"CRD")
4,65,H,17,0
^SCR("P1RCVPAR","G",2,"HELP")

^SCR("P1RCVPAR","G",2,"LMAX")
17
^SCR("P1RCVPAR","G",2,"MUMPS1")

^SCR("P1RCVPAR","G",2,"MUMPS2")

^SCR("P1RCVPAR","G",2,"OUTPUT")

^SCR("P1RCVPAR","G",2,"SHEM")
      oyi my     
^SCR("P1RCVPAR","G",2,"TYP")
H
^SCR("P1RCVPAR","G",3,"CRD")
4,47,N,8,2
^SCR("P1RCVPAR","G",3,"HELP")

^SCR("P1RCVPAR","G",3,"LMAX")
8
^SCR("P1RCVPAR","G",3,"MUMPS1")

^SCR("P1RCVPAR","G",3,"MUMPS2")

^SCR("P1RCVPAR","G",3,"OUTPUT")

^SCR("P1RCVPAR","G",3,"SHEM")
oyi xign
^SCR("P1RCVPAR","G",3,"TYP")
N
^SCR("P1RCVPAR","G",4,"CRD")
4,38,H,18,0
^SCR("P1RCVPAR","G",4,"HELP")

^SCR("P1RCVPAR","G",4,"LMAX")
18
^SCR("P1RCVPAR","G",4,"MUMPS1")

^SCR("P1RCVPAR","G",4,"MUMPS2")

^SCR("P1RCVPAR","G",4,"OUTPUT")

^SCR("P1RCVPAR","G",4,"SHEM")
       ycg my     
^SCR("P1RCVPAR","G",4,"TYP")
H
^SCR("P1RCVPAR","G",5,"CRD")
4,19,N,8,2
^SCR("P1RCVPAR","G",5,"HELP")

^SCR("P1RCVPAR","G",5,"LMAX")
8
^SCR("P1RCVPAR","G",5,"MUMPS1")

^SCR("P1RCVPAR","G",5,"MUMPS2")

^SCR("P1RCVPAR","G",5,"OUTPUT")

^SCR("P1RCVPAR","G",5,"SHEM")
ycg xign
^SCR("P1RCVPAR","G",5,"TYP")
N
^SCR("P1RCVPAR","G",6,"CRD")
4,10,E,1,0
^SCR("P1RCVPAR","G",6,"HELP")
"-" - oekcr lhal , 0 - silgdl `l , 1 - silgdl 
^SCR("P1RCVPAR","G",6,"LMAX")
6
^SCR("P1RCVPAR","G",6,"MUMPS1")

^SCR("P1RCVPAR","G",6,"MUMPS2")
I IS'=1,IS'=0,IS'="-" S %SC("ER")=1
^SCR("P1RCVPAR","G",6,"MUST")

^SCR("P1RCVPAR","G",6,"SHEM")
 xy`l 
^SCR("P1RCVPAR","G",6,"TYP")
E
^SCR("P1RCVPAR","G","MAX")
99999
^SCR("P1RCVPAR","G","NAME","CODP")
1
^SCR("P1RCVPAR","G","NAME","IS")
6
^SCR("P1RCVPAR","G","NAME","MHN")
5
^SCR("P1RCVPAR","G","NAME","MHO")
3
^SCR("P1RCVPAR","G","NAME","SHEMN")
4
^SCR("P1RCVPAR","G","NAME","SHEMO")
2
^SCR("P1RCVPAR","G","NM",1)
CODP
^SCR("P1RCVPAR","G","NM",2)
SHEMO
^SCR("P1RCVPAR","G","NM",3)
MHO
^SCR("P1RCVPAR","G","NM",4)
SHEMN
^SCR("P1RCVPAR","G","NM",5)
MHN
^SCR("P1RCVPAR","G","NM",6)
IS
^SCR("P1RCVPAR","G","RB")
3,2,23,79
^SCR("P1RCVPAR","G","REF")
^TEMP($P
^SCR("P1RCVPAR","G","RZD")
\
^SCR("P1RCVPAR","G","STEP")
1
^SCR("P1RCVPAR","G","STG")
   : xy`l :ycg xign:       ycg my     :oyi xign:      oyi my     :hixt cew:    
^SCR("P1RCVPAR","G","VG")
5
^SCR("P1RCVPAR","NAME")

^SCR("P1REPTL")
H
^SCR("P1REPTL",1)
                          # dpzn iyelz gec #                                   
^SCR("P1REPTL",2)
               {02 }: 2 - melyz jix`z itl ,1 - dxikn jix`z itl                 
^SCR("P1REPTL",3)
                     {10      } jix`z cr  {05     } jix`zn                     
^SCR("P1REPTL",4)
                                                                               
^SCR("P1REPTL",5)
                                                                             1$
^SCR("P1REPTL",6)
  :'yz mekq:dnleyy dpnfd:melyz jix`z:  mekq  :yelz 'qn:dpnfd 'qn:dxikn jix`z:  
^SCR("P1REPTL",7)
                                                                               
^SCR("P1REPTL",8)
                                                                               
^SCR("P1REPTL",9)
                                                                               
^SCR("P1REPTL",10)
                                                                               
^SCR("P1REPTL",11)
                                                                               
^SCR("P1REPTL",12)
                                                                               
^SCR("P1REPTL",13)
                                                                               
^SCR("P1REPTL",14)
                                                                               
^SCR("P1REPTL",15)
                                                                               
^SCR("P1REPTL",16)
                                                                               
^SCR("P1REPTL",17)
                                                                               
^SCR("P1REPTL",18)
                                                                               
^SCR("P1REPTL",19)
                                                                               
^SCR("P1REPTL",20)
                                                                               
^SCR("P1REPTL",21)
 $1                                                                            
^SCR("P1REPTL",22)
  {25     }                         {20     }                                  
^SCR("P1REPTL","A",1)
„�šŽ‰™…Œš‡…ƒ
^SCR("P1REPTL","A",2)
:2-�…Œ™šŠ‰˜€š‰”Œ,1-„˜‰‹ŽŠ‰˜€š‰”Œ
^SCR("P1REPTL","A",3)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("P1REPTL","A",4)

^SCR("P1REPTL","A",5)

^SCR("P1REPTL","A",6)
'™š�…‹‘„ŽŒ…™™„�Ž†„�…Œ™šŠ‰˜€š�…‹‘™…Œš'‘Ž„�Ž†„'‘Ž„˜‰‹ŽŠ‰˜€š
^SCR("P1REPTL","A",7)
---------------------------------------------------------------------
^SCR("P1REPTL","A",8)

^SCR("P1REPTL","A",9)

^SCR("P1REPTL","A",10)

^SCR("P1REPTL","A",11)

^SCR("P1REPTL","A",12)

^SCR("P1REPTL","A",13)

^SCR("P1REPTL","A",14)

^SCR("P1REPTL","A",15)

^SCR("P1REPTL","A",16)

^SCR("P1REPTL","A",17)

^SCR("P1REPTL","A",18)

^SCR("P1REPTL","A",19)

^SCR("P1REPTL","A",20)

^SCR("P1REPTL","A",21)

^SCR("P1REPTL","A",22)

^SCR("P1REPTL","AV",1)
vb,nhauk,jus
^SCR("P1REPTL","AV",2)
:2-ouka,lhrt,hpk'1-vrhfnlhrt,hpk
^SCR("P1REPTL","AV",3)
lhrt,sglhrt,n
^SCR("P1REPTL","AV",4)

^SCR("P1REPTL","AV",5)

^SCR("P1REPTL","AV",6)
wa,oufxvnkuaavbnzvouka,lhrt,oufxauk,wxnvbnzvwxnvrhfnlhrt,
^SCR("P1REPTL","AV",7)
---------------------------------------------------------------------
^SCR("P1REPTL","AV",8)

^SCR("P1REPTL","AV",9)

^SCR("P1REPTL","AV",10)

^SCR("P1REPTL","AV",11)

^SCR("P1REPTL","AV",12)

^SCR("P1REPTL","AV",13)

^SCR("P1REPTL","AV",14)

^SCR("P1REPTL","AV",15)

^SCR("P1REPTL","AV",16)

^SCR("P1REPTL","AV",17)

^SCR("P1REPTL","AV",18)

^SCR("P1REPTL","AV",19)

^SCR("P1REPTL","AV",20)

^SCR("P1REPTL","AV",21)

^SCR("P1REPTL","AV",22)

^SCR("P1REPTL","G",1,"CRD")
7,76,D,8,0
^SCR("P1REPTL","G",1,"HELP")

^SCR("P1REPTL","G",1,"LMAX")
11
^SCR("P1REPTL","G",1,"MUMPS1")

^SCR("P1REPTL","G",1,"MUMPS2")

^SCR("P1REPTL","G",1,"OUTPUT")

^SCR("P1REPTL","G",1,"SHEM")
dxikn jix`z
^SCR("P1REPTL","G",1,"TYP")
D
^SCR("P1REPTL","G",2,"CRD")
7,64,E,8,0
^SCR("P1REPTL","G",2,"HELP")

^SCR("P1REPTL","G",2,"LMAX")
9
^SCR("P1REPTL","G",2,"MUMPS1")

^SCR("P1REPTL","G",2,"MUMPS2")
D HZMMH^P1REPTL
^SCR("P1REPTL","G",2,"SHEM")
dpnfd 'qn
^SCR("P1REPTL","G",2,"TYP")
E
^SCR("P1REPTL","G",3,"CRD")
7,54,E,8,0
^SCR("P1REPTL","G",3,"HELP")

^SCR("P1REPTL","G",3,"LMAX")
8
^SCR("P1REPTL","G",3,"MUMPS1")

^SCR("P1REPTL","G",3,"MUMPS2")

^SCR("P1REPTL","G",3,"OUTPUT")

^SCR("P1REPTL","G",3,"SHEM")
yelz 'qn
^SCR("P1REPTL","G",3,"TYP")
E
^SCR("P1REPTL","G",4,"CRD")
7,45,N,8,2
^SCR("P1REPTL","G",4,"HELP")

^SCR("P1REPTL","G",4,"LMAX")
8
^SCR("P1REPTL","G",4,"MUMPS1")

^SCR("P1REPTL","G",4,"MUMPS2")

^SCR("P1REPTL","G",4,"OUTPUT")

^SCR("P1REPTL","G",4,"SHEM")
  mekq  
^SCR("P1REPTL","G",4,"TYP")
N
^SCR("P1REPTL","G",5,"CRD")
7,36,D,8,0
^SCR("P1REPTL","G",5,"HELP")

^SCR("P1REPTL","G",5,"LMAX")
11
^SCR("P1REPTL","G",5,"MUMPS1")

^SCR("P1REPTL","G",5,"MUMPS2")

^SCR("P1REPTL","G",5,"OUTPUT")

^SCR("P1REPTL","G",5,"SHEM")
melyz jix`z
^SCR("P1REPTL","G",5,"TYP")
D
^SCR("P1REPTL","G",6,"CRD")
7,24,E,8,0
^SCR("P1REPTL","G",6,"HELP")

^SCR("P1REPTL","G",6,"LMAX")
12
^SCR("P1REPTL","G",6,"MUMPS1")

^SCR("P1REPTL","G",6,"MUMPS2")
D HZMTS^P1REPTL
^SCR("P1REPTL","G",6,"SHEM")
dnleyy dpnfd
^SCR("P1REPTL","G",6,"TYP")
E
^SCR("P1REPTL","G",7,"CRD")
7,11,N,8,2
^SCR("P1REPTL","G",7,"HELP")

^SCR("P1REPTL","G",7,"LMAX")
8
^SCR("P1REPTL","G",7,"MUMPS1")

^SCR("P1REPTL","G",7,"MUMPS2")

^SCR("P1REPTL","G",7,"OUTPUT")

^SCR("P1REPTL","G",7,"SHEM")
'yz mekq
^SCR("P1REPTL","G",7,"TYP")
N
^SCR("P1REPTL","G","MAX")
0
^SCR("P1REPTL","G","NAME","DATMH")
1
^SCR("P1REPTL","G","NAME","DATTS")
5
^SCR("P1REPTL","G","NAME","HZMMH")
2
^SCR("P1REPTL","G","NAME","HZMTS")
6
^SCR("P1REPTL","G","NAME","SUMTL")
4
^SCR("P1REPTL","G","NAME","SUMTS")
7
^SCR("P1REPTL","G","NAME","TL")
3
^SCR("P1REPTL","G","NM",1)
DATMH
^SCR("P1REPTL","G","NM",2)
HZMMH
^SCR("P1REPTL","G","NM",3)
TL
^SCR("P1REPTL","G","NM",4)
SUMTL
^SCR("P1REPTL","G","NM",5)
DATTS
^SCR("P1REPTL","G","NM",6)
HZMTS
^SCR("P1REPTL","G","NM",7)
SUMTS
^SCR("P1REPTL","G","RB")
6,2,22,79
^SCR("P1REPTL","G","REF")
^TMP($P
^SCR("P1REPTL","G","RZD")
\
^SCR("P1REPTL","G","STEP")
1
^SCR("P1REPTL","G","STG")
  :'yz mekq:dnleyy dpnfd:melyz jix`z:  mekq  :yelz 'qn:dpnfd 'qn:dxikn jix`z:  
^SCR("P1REPTL","G","VG")
8
^SCR("P1REPTL","NAME")

^SCR("P1REPTL","P",2,"CRD")
2,15,N,1,0
^SCR("P1REPTL","P",2,"HELP")

^SCR("P1REPTL","P",2,"LMAX")
4
^SCR("P1REPTL","P",2,"MUMPS1")
S:'$G(VD) VD=1
^SCR("P1REPTL","P",2,"MUMPS2")
I VD'=1,VD'=2 S %SC("ER")=1
^SCR("P1REPTL","P",2,"MUST")

^SCR("P1REPTL","P",2,"TYP")
N
^SCR("P1REPTL","P",5,"CRD")
3,42,D,8,0
^SCR("P1REPTL","P",5,"HELP")

^SCR("P1REPTL","P",5,"LMAX")
8
^SCR("P1REPTL","P",5,"MUMPS1")
S METRH=$ZD($H,"DD.MM.YY")
^SCR("P1REPTL","P",5,"MUMPS2")

^SCR("P1REPTL","P",5,"TYP")
D
^SCR("P1REPTL","P",10,"CRD")
3,21,D,8,0
^SCR("P1REPTL","P",10,"HELP")

^SCR("P1REPTL","P",10,"LMAX")
9
^SCR("P1REPTL","P",10,"MUMPS1")
S:'$G(ADTRH) ADTRH=METRH
^SCR("P1REPTL","P",10,"MUMPS2")
D ADTRH^P1REPTL
^SCR("P1REPTL","P",10,"TYP")
D
^SCR("P1REPTL","P",20,"CRD")
22,36,N,8,2
^SCR("P1REPTL","P",20,"HELP")

^SCR("P1REPTL","P",20,"LMAX")
8
^SCR("P1REPTL","P",20,"MUMPS1")

^SCR("P1REPTL","P",20,"MUMPS2")

^SCR("P1REPTL","P",20,"OUTPUT")

^SCR("P1REPTL","P",20,"TYP")
N
^SCR("P1REPTL","P",25,"CRD")
22,2,N,8,2
^SCR("P1REPTL","P",25,"HELP")

^SCR("P1REPTL","P",25,"LMAX")
8
^SCR("P1REPTL","P",25,"MUMPS1")

^SCR("P1REPTL","P",25,"MUMPS2")

^SCR("P1REPTL","P",25,"OUTPUT")

^SCR("P1REPTL","P",25,"TYP")
N
^SCR("P1REPTL","P","NAME","ADTRH")
10
^SCR("P1REPTL","P","NAME","METRH")
5
^SCR("P1REPTL","P","NAME","SSUMTL")
20
^SCR("P1REPTL","P","NAME","SSUMTS")
25
^SCR("P1REPTL","P","NAME","VD")
2
^SCR("P1REPTL","P","NM",2)
VD
^SCR("P1REPTL","P","NM",5)
METRH
^SCR("P1REPTL","P","NM",10)
ADTRH
^SCR("P1REPTL","P","NM",20)
SSUMTL
^SCR("P1REPTL","P","NM",25)
SSUMTS
^SCR("P1RESTCA")
H
^SCR("P1RESTCA",1)
                        xeciyl zepnfd uaew oia miqihxk z`eeyd                  
^SCR("P1RESTCA",2)
                                                                           1$  
^SCR("P1RESTCA",3)
   :  yxtd  :   mekq :   mekq :dpnfd 'qn:           qihxk        : dwqr :      
^SCR("P1RESTCA",4)
   :        : xeciya : dpnfda :         :                        :      :      
^SCR("P1RESTCA",5)
                                                                               
^SCR("P1RESTCA",6)
                                                                               
^SCR("P1RESTCA",7)
                                                                               
^SCR("P1RESTCA",8)
                                                                               
^SCR("P1RESTCA",9)
                                                                               
^SCR("P1RESTCA",10)
                                                                               
^SCR("P1RESTCA",11)
                                                                               
^SCR("P1RESTCA",12)
                                                                               
^SCR("P1RESTCA",13)
                                                                               
^SCR("P1RESTCA",14)
                                                                               
^SCR("P1RESTCA",15)
                                                                               
^SCR("P1RESTCA",16)
                                                                               
^SCR("P1RESTCA",17)
                                                                               
^SCR("P1RESTCA",18)
                                                                               
^SCR("P1RESTCA",19)
                                                                               
^SCR("P1RESTCA",20)
                                                                               
^SCR("P1RESTCA",21)
 $1                                                                            
^SCR("P1RESTCA",22)
                                                                               
^SCR("P1RESTCA","A",1)
˜…ƒ‰™Œš…�Ž†„•�…—�‰��‰‘‰ˆ˜‹š€……™„
^SCR("P1RESTCA","A",2)

^SCR("P1RESTCA","A",3)
™˜”„�…‹‘�…‹‘„�Ž†„'‘Ž‘‰ˆ˜‹„—‘’
^SCR("P1RESTCA","A",4)
˜…ƒ‰™�„�Ž†„�
^SCR("P1RESTCA","A",5)
---------------------------------------------------------------
^SCR("P1RESTCA","A",6)

^SCR("P1RESTCA","A",7)

^SCR("P1RESTCA","A",8)

^SCR("P1RESTCA","A",9)

^SCR("P1RESTCA","A",10)

^SCR("P1RESTCA","A",11)

^SCR("P1RESTCA","A",12)

^SCR("P1RESTCA","A",13)

^SCR("P1RESTCA","A",14)

^SCR("P1RESTCA","A",15)

^SCR("P1RESTCA","A",16)

^SCR("P1RESTCA","A",17)

^SCR("P1RESTCA","A",18)

^SCR("P1RESTCA","A",19)

^SCR("P1RESTCA","A",20)

^SCR("P1RESTCA","A",21)

^SCR("P1RESTCA","A",22)

^SCR("P1RESTCA","AV",1)
rushak,ubnzv•cueihcohxhyrf,tuuav
^SCR("P1RESTCA","AV",2)

^SCR("P1RESTCA","AV",3)
arpvoufxoufxvbnzvwxnxhyrfvexg
^SCR("P1RESTCA","AV",4)
rushacvbnzvc
^SCR("P1RESTCA","AV",5)
---------------------------------------------------------------
^SCR("P1RESTCA","AV",6)

^SCR("P1RESTCA","AV",7)

^SCR("P1RESTCA","AV",8)

^SCR("P1RESTCA","AV",9)

^SCR("P1RESTCA","AV",10)

^SCR("P1RESTCA","AV",11)

^SCR("P1RESTCA","AV",12)

^SCR("P1RESTCA","AV",13)

^SCR("P1RESTCA","AV",14)

^SCR("P1RESTCA","AV",15)

^SCR("P1RESTCA","AV",16)

^SCR("P1RESTCA","AV",17)

^SCR("P1RESTCA","AV",18)

^SCR("P1RESTCA","AV",19)

^SCR("P1RESTCA","AV",20)

^SCR("P1RESTCA","AV",21)

^SCR("P1RESTCA","AV",22)

^SCR("P1RESTCA","G",1,"CRD")
4,72,E,6,0
^SCR("P1RESTCA","G",1,"HELP")

^SCR("P1RESTCA","G",1,"LMAX")
6
^SCR("P1RESTCA","G",1,"MUMPS1")

^SCR("P1RESTCA","G",1,"MUMPS2")

^SCR("P1RESTCA","G",1,"OUTPUT")

^SCR("P1RESTCA","G",1,"SHEM")
 dwqr 
^SCR("P1RESTCA","G",1,"TYP")
E
^SCR("P1RESTCA","G",2,"CRD")
4,65,E,24,0
^SCR("P1RESTCA","G",2,"HELP")

^SCR("P1RESTCA","G",2,"LMAX")
24
^SCR("P1RESTCA","G",2,"MUMPS1")

^SCR("P1RESTCA","G",2,"MUMPS2")

^SCR("P1RESTCA","G",2,"OUTPUT")

^SCR("P1RESTCA","G",2,"SHEM")
           qihxk        
^SCR("P1RESTCA","G",2,"TYP")
E
^SCR("P1RESTCA","G",3,"CRD")
4,40,E,7,0
^SCR("P1RESTCA","G",3,"HELP")

^SCR("P1RESTCA","G",3,"LMAX")
9
^SCR("P1RESTCA","G",3,"MUMPS1")

^SCR("P1RESTCA","G",3,"MUMPS2")
I HZ,$G(%OLDTO)="F9" D ^%L1CALL("P1HZVW(HZ)",%SCRN,"HZ") S %SC("ST")=1
^SCR("P1RESTCA","G",3,"SHEM")
dpnfd 'qn
^SCR("P1RESTCA","G",3,"TYP")
E
^SCR("P1RESTCA","G",4,"CRD")
4,30,N,8,2
^SCR("P1RESTCA","G",4,"HELP")

^SCR("P1RESTCA","G",4,"LMAX")
8
^SCR("P1RESTCA","G",4,"MUMPS1")

^SCR("P1RESTCA","G",4,"MUMPS2")

^SCR("P1RESTCA","G",4,"OUTPUT")

^SCR("P1RESTCA","G",4,"SHEM")
   mekq 
^SCR("P1RESTCA","G",4,"TYP")
N
^SCR("P1RESTCA","G",5,"CRD")
4,21,N,8,2
^SCR("P1RESTCA","G",5,"HELP")

^SCR("P1RESTCA","G",5,"LMAX")
8
^SCR("P1RESTCA","G",5,"MUMPS1")

^SCR("P1RESTCA","G",5,"MUMPS2")

^SCR("P1RESTCA","G",5,"OUTPUT")

^SCR("P1RESTCA","G",5,"SHEM")
   mekq 
^SCR("P1RESTCA","G",5,"TYP")
N
^SCR("P1RESTCA","G",6,"CRD")
4,12,N,8,2
^SCR("P1RESTCA","G",6,"HELP")

^SCR("P1RESTCA","G",6,"LMAX")
8
^SCR("P1RESTCA","G",6,"MUMPS1")

^SCR("P1RESTCA","G",6,"MUMPS2")

^SCR("P1RESTCA","G",6,"OUTPUT")

^SCR("P1RESTCA","G",6,"SHEM")
  yxtd  
^SCR("P1RESTCA","G",6,"TYP")
N
^SCR("P1RESTCA","G","DEL")

^SCR("P1RESTCA","G","MAX")
99999
^SCR("P1RESTCA","G","NAME","CARD")
2
^SCR("P1RESTCA","G","NAME","HFR")
6
^SCR("P1RESTCA","G","NAME","HZ")
3
^SCR("P1RESTCA","G","NAME","ISKA")
1
^SCR("P1RESTCA","G","NAME","SUM1")
4
^SCR("P1RESTCA","G","NAME","SUM2")
5
^SCR("P1RESTCA","G","NM",1)
ISKA
^SCR("P1RESTCA","G","NM",2)
CARD
^SCR("P1RESTCA","G","NM",3)
HZ
^SCR("P1RESTCA","G","NM",4)
SUM1
^SCR("P1RESTCA","G","NM",5)
SUM2
^SCR("P1RESTCA","G","NM",6)
HFR
^SCR("P1RESTCA","G","RB")
3,2,22,77
^SCR("P1RESTCA","G","REF")
^TEMP1($P
^SCR("P1RESTCA","G","RZD")
\
^SCR("P1RESTCA","G","STEP")
1
^SCR("P1RESTCA","G","STG")
   :  yxtd  :   mekq :   mekq :dpnfd 'qn:           qihxk        : dwqr :      
^SCR("P1RESTCA","G","VG")
6
^SCR("P1RESTCA","NAME")
miqihxk z`eeyd
^SCR("P1S")
H
^SCR("P1S",1)
                              # zepnfd zxibq #                                 
^SCR("P1S",2)
                                                                               
^SCR("P1S",3)
      {                        15}:gily my {10 }:gily 'qn {05      } jix`z     
^SCR("P1S",4)
                                                                             1$
^SCR("P1S",5)
  :melyz 'z:     gewl my   : melyz:z beq: dxzi : dtwd : mley :melyzl: dpnfd :  
^SCR("P1S",6)
                                                                               
^SCR("P1S",7)
                                                                               
^SCR("P1S",8)
                                                                               
^SCR("P1S",9)
                                                                               
^SCR("P1S",10)
                                                                               
^SCR("P1S",11)
                                                                               
^SCR("P1S",12)
                                                                               
^SCR("P1S",13)
                                                                               
^SCR("P1S",14)
                                                                               
^SCR("P1S",15)
                                                                               
^SCR("P1S",16)
                                                                               
^SCR("P1S",17)
                                                                               
^SCR("P1S",18)
 $1                                                                            
^SCR("P1S",19)
 {50     } dtwd {45    } yelz {40     } `"k {35     } wiy {30     } onefn 'lyzl
^SCR("P1S",20)
 {80     } dtwd {75    } yelz {70     } `"k {65     } wiy {60     } onefn  mley
^SCR("P1S",21)
 {90     } dtwd {88    } yelz {86     } `"k {84     } wiy {82     } onefn iekif
^SCR("P1S",22)
 {97  }:tih {98     }:dxzi {96     }:iekif {94     }:mley {92     }:melyzl k"dq
^SCR("P1S","A",1)
š…�Ž†„š˜‰‚‘
^SCR("P1S","A",2)

^SCR("P1S","A",3)
:‡‰Œ™�™:‡‰Œ™'‘ŽŠ‰˜€š
^SCR("P1S","A",4)

^SCR("P1S","A",5)
�…Œ™š'š‡…—Œ�™�…Œ™šš‚…‘„˜š‰„”—„�Œ…™�…Œ™šŒ„�Ž†„
^SCR("P1S","A",6)
-------------------------------------------------------------------
^SCR("P1S","A",7)

^SCR("P1S","A",8)

^SCR("P1S","A",9)

^SCR("P1S","A",10)

^SCR("P1S","A",11)

^SCR("P1S","A",12)

^SCR("P1S","A",13)

^SCR("P1S","A",14)

^SCR("P1S","A",15)

^SCR("P1S","A",16)

^SCR("P1S","A",17)

^SCR("P1S","A",18)

^SCR("P1S","A",19)
„”—„™…Œš€"‹—‰™�Ž…†Ž'Œ™šŒ
^SCR("P1S","A",20)
„”—„™…Œš€"‹—‰™�Ž…†Ž�Œ…™
^SCR("P1S","A",21)
„”—„™…Œš€"‹—‰™�Ž…†Ž‰…‹‰†
^SCR("P1S","A",22)
:”‰ˆ:„˜š‰:‰…‹‰†:�Œ…™:�…Œ™šŒ‹"„‘
^SCR("P1S","AV",1)
,ubnzv,rhdx
^SCR("P1S","AV",2)

^SCR("P1S","AV",3)
:jhkaoa:jhkawxnlhrt,
^SCR("P1S","AV",4)

^SCR("P1S","AV",5)
ouka,w,juekoaouka,,duxvr,hvpevokuaouka,kvbnzv
^SCR("P1S","AV",6)
-------------------------------------------------------------------
^SCR("P1S","AV",7)

^SCR("P1S","AV",8)

^SCR("P1S","AV",9)

^SCR("P1S","AV",10)

^SCR("P1S","AV",11)

^SCR("P1S","AV",12)

^SCR("P1S","AV",13)

^SCR("P1S","AV",14)

^SCR("P1S","AV",15)

^SCR("P1S","AV",16)

^SCR("P1S","AV",17)

^SCR("P1S","AV",18)

^SCR("P1S","AV",19)
vpevauk,t"fehainuznwka,k
^SCR("P1S","AV",20)
vpevauk,t"fehainuznokua
^SCR("P1S","AV",21)
vpevauk,t"fehainuznhufhz
^SCR("P1S","AV",22)
:phy:vr,h:hufhz:okua:ouka,kf"vx
^SCR("P1S","G",1,"CRD")
6,76,E,7,0
^SCR("P1S","G",1,"HELP")

^SCR("P1S","G",1,"LMAX")
7
^SCR("P1S","G",1,"MUMPS1")

^SCR("P1S","G",1,"MUMPS2")

^SCR("P1S","G",1,"OUTPUT")

^SCR("P1S","G",1,"SHEM")
 dpnfd 
^SCR("P1S","G",1,"TYP")
E
^SCR("P1S","G",2,"CRD")
6,68,N,6,2
^SCR("P1S","G",2,"HELP")

^SCR("P1S","G",2,"LMAX")
6
^SCR("P1S","G",2,"MUMPS1")

^SCR("P1S","G",2,"MUMPS2")

^SCR("P1S","G",2,"OUTPUT")

^SCR("P1S","G",2,"SHEM")
melyzl
^SCR("P1S","G",2,"TYP")
N
^SCR("P1S","G",3,"CRD")
6,61,N,6,2
^SCR("P1S","G",3,"HELP")

^SCR("P1S","G",3,"LMAX")
6
^SCR("P1S","G",3,"MUMPS1")

^SCR("P1S","G",3,"MUMPS2")

^SCR("P1S","G",3,"OUTPUT")

^SCR("P1S","G",3,"SHEM")
 mley 
^SCR("P1S","G",3,"TYP")
N
^SCR("P1S","G",4,"CRD")
6,54,N,6,2
^SCR("P1S","G",4,"HELP")

^SCR("P1S","G",4,"LMAX")
6
^SCR("P1S","G",4,"MUMPS1")

^SCR("P1S","G",4,"MUMPS2")

^SCR("P1S","G",4,"OUTPUT")

^SCR("P1S","G",4,"SHEM")
 dtwd 
^SCR("P1S","G",4,"TYP")
N
^SCR("P1S","G",5,"CRD")
6,47,N,6,2
^SCR("P1S","G",5,"HELP")

^SCR("P1S","G",5,"LMAX")
6
^SCR("P1S","G",5,"MUMPS1")

^SCR("P1S","G",5,"MUMPS2")

^SCR("P1S","G",5,"OUTPUT")

^SCR("P1S","G",5,"SHEM")
 dxzi 
^SCR("P1S","G",5,"TYP")
N
^SCR("P1S","G",6,"CRD")
6,40,E,4,0
^SCR("P1S","G",6,"HELP")
<F9> -oeebn melyze dpnfd zbvdl, 5- yelz, 4- dtwd, 2 - wiy , 1 - onefn 
^SCR("P1S","G",6,"LMAX")
5
^SCR("P1S","G",6,"MUMPS1")
D SUGT0^P1S
^SCR("P1S","G",6,"MUMPS2")
D SUGT^P1S
^SCR("P1S","G",6,"SHEM")
z beq
^SCR("P1S","G",6,"TYP")
E
^SCR("P1S","G",7,"CRD")
6,34,N,6,2
^SCR("P1S","G",7,"HELP")

^SCR("P1S","G",7,"LMAX")
6
^SCR("P1S","G",7,"MUMPS1")

^SCR("P1S","G",7,"MUMPS2")

^SCR("P1S","G",7,"OUTPUT")

^SCR("P1S","G",7,"SHEM")
 melyz
^SCR("P1S","G",7,"TYP")
N
^SCR("P1S","G",8,"CRD")
6,27,H,15,0
^SCR("P1S","G",8,"HELP")

^SCR("P1S","G",8,"LMAX")
15
^SCR("P1S","G",8,"MUMPS1")

^SCR("P1S","G",8,"MUMPS2")

^SCR("P1S","G",8,"OUTPUT")

^SCR("P1S","G",8,"SHEM")
     gewl my   
^SCR("P1S","G",8,"TYP")
H
^SCR("P1S","G",9,"CRD")
6,11,D,8,0
^SCR("P1S","G",9,"HELP")

^SCR("P1S","G",9,"LMAX")
8
^SCR("P1S","G",9,"MUMPS1")

^SCR("P1S","G",9,"MUMPS2")

^SCR("P1S","G",9,"OUTPUT")

^SCR("P1S","G",9,"SHEM")
melyz 'z
^SCR("P1S","G",9,"TYP")
D
^SCR("P1S","G","DEL")

^SCR("P1S","G","MAX")
2
^SCR("P1S","G","NAME","ASR")
4
^SCR("P1S","G","NAME","DATT")
9
^SCR("P1S","G","NAME","HZM")
1
^SCR("P1S","G","NAME","ITRA")
5
^SCR("P1S","G","NAME","LKH1")
8
^SCR("P1S","G","NAME","SHUL")
3
^SCR("P1S","G","NAME","SUGT")
6
^SCR("P1S","G","NAME","TSL")
2
^SCR("P1S","G","NAME","TT")
7
^SCR("P1S","G","NM",1)
HZM
^SCR("P1S","G","NM",2)
TSL
^SCR("P1S","G","NM",3)
SHUL
^SCR("P1S","G","NM",4)
ASR
^SCR("P1S","G","NM",5)
ITRA
^SCR("P1S","G","NM",6)
SUGT
^SCR("P1S","G","NM",7)
TT
^SCR("P1S","G","NM",8)
LKH1
^SCR("P1S","G","NM",9)
DATT
^SCR("P1S","G","RB")
5,2,19,79
^SCR("P1S","G","REF")
^TEMPS($P
^SCR("P1S","G","RZD")
\
^SCR("P1S","G","STEP")
1
^SCR("P1S","G","STG")
  :melyz 'z:     gewl my   : melyz:z beq: dxzi : dtwd : mley :melyzl: dpnfd :  
^SCR("P1S","G","VG")
7
^SCR("P1S","NAME")
dpnfd zxibq
^SCR("P1S","P",5,"CRD")
3,58,D,8,0
^SCR("P1S","P",5,"HELP")

^SCR("P1S","P",5,"LMAX")
9
^SCR("P1S","P",5,"MUMPS1")

^SCR("P1S","P",5,"MUMPS2")

^SCR("P1S","P",5,"OUTPUT")

^SCR("P1S","P",5,"TYP")
D
^SCR("P1S","P",10,"CRD")
3,43,E,4,0
^SCR("P1S","P",10,"HELP")

^SCR("P1S","P",10,"LMAX")
4
^SCR("P1S","P",10,"MUMPS1")

^SCR("P1S","P",10,"MUMPS2")

^SCR("P1S","P",10,"OUTPUT")

^SCR("P1S","P",10,"TYP")
E
^SCR("P1S","P",15,"CRD")
3,34,H,20
^SCR("P1S","P",15,"HELP")

^SCR("P1S","P",15,"LMAX")
27
^SCR("P1S","P",15,"MUMPS1")

^SCR("P1S","P",15,"MUMPS2")

^SCR("P1S","P",15,"OUTPUT")

^SCR("P1S","P",15,"TYP")
H
^SCR("P1S","P",30,"CRD")
19,58,N,8,2
^SCR("P1S","P",30,"HELP")

^SCR("P1S","P",30,"LMAX")
8
^SCR("P1S","P",30,"MUMPS1")

^SCR("P1S","P",30,"MUMPS2")

^SCR("P1S","P",30,"OUTPUT")

^SCR("P1S","P",30,"TYP")
N
^SCR("P1S","P",35,"CRD")
19,44,N,8,2
^SCR("P1S","P",35,"HELP")

^SCR("P1S","P",35,"LMAX")
8
^SCR("P1S","P",35,"MUMPS1")

^SCR("P1S","P",35,"MUMPS2")

^SCR("P1S","P",35,"OUTPUT")

^SCR("P1S","P",35,"TYP")
N
^SCR("P1S","P",40,"CRD")
19,30,N,8,2
^SCR("P1S","P",40,"HELP")

^SCR("P1S","P",40,"LMAX")
8
^SCR("P1S","P",40,"MUMPS1")

^SCR("P1S","P",40,"MUMPS2")

^SCR("P1S","P",40,"OUTPUT")

^SCR("P1S","P",40,"TYP")
N
^SCR("P1S","P",45,"CRD")
19,16,N,7,2
^SCR("P1S","P",45,"HELP")

^SCR("P1S","P",45,"LMAX")
7
^SCR("P1S","P",45,"MUMPS1")

^SCR("P1S","P",45,"MUMPS2")

^SCR("P1S","P",45,"OUTPUT")

^SCR("P1S","P",45,"TYP")
N
^SCR("P1S","P",50,"CRD")
19,1,N,8,2
^SCR("P1S","P",50,"HELP")

^SCR("P1S","P",50,"LMAX")
8
^SCR("P1S","P",50,"MUMPS1")

^SCR("P1S","P",50,"MUMPS2")

^SCR("P1S","P",50,"OUTPUT")

^SCR("P1S","P",50,"TYP")
N
^SCR("P1S","P",60,"CRD")
20,58,N,8,2
^SCR("P1S","P",60,"HELP")

^SCR("P1S","P",60,"LMAX")
8
^SCR("P1S","P",60,"MUMPS1")

^SCR("P1S","P",60,"MUMPS2")

^SCR("P1S","P",60,"OUTPUT")

^SCR("P1S","P",60,"TYP")
N
^SCR("P1S","P",65,"CRD")
20,44,N,8,2
^SCR("P1S","P",65,"HELP")

^SCR("P1S","P",65,"LMAX")
8
^SCR("P1S","P",65,"MUMPS1")

^SCR("P1S","P",65,"MUMPS2")

^SCR("P1S","P",65,"OUTPUT")

^SCR("P1S","P",65,"TYP")
N
^SCR("P1S","P",70,"CRD")
20,30,N,8,2
^SCR("P1S","P",70,"HELP")

^SCR("P1S","P",70,"LMAX")
8
^SCR("P1S","P",70,"MUMPS1")

^SCR("P1S","P",70,"MUMPS2")

^SCR("P1S","P",70,"OUTPUT")

^SCR("P1S","P",70,"TYP")
N
^SCR("P1S","P",75,"CRD")
20,16,N,7,2
^SCR("P1S","P",75,"HELP")

^SCR("P1S","P",75,"LMAX")
7
^SCR("P1S","P",75,"MUMPS1")

^SCR("P1S","P",75,"MUMPS2")

^SCR("P1S","P",75,"OUTPUT")

^SCR("P1S","P",75,"TYP")
N
^SCR("P1S","P",80,"CRD")
20,1,N,8,2
^SCR("P1S","P",80,"HELP")

^SCR("P1S","P",80,"LMAX")
8
^SCR("P1S","P",80,"MUMPS1")

^SCR("P1S","P",80,"MUMPS2")

^SCR("P1S","P",80,"OUTPUT")

^SCR("P1S","P",80,"TYP")
N
^SCR("P1S","P",82,"CRD")
21,58,N,8,2
^SCR("P1S","P",82,"HELP")

^SCR("P1S","P",82,"LMAX")
8
^SCR("P1S","P",82,"MUMPS1")

^SCR("P1S","P",82,"MUMPS2")

^SCR("P1S","P",82,"OUTPUT")

^SCR("P1S","P",82,"TYP")
N
^SCR("P1S","P",84,"CRD")
21,44,N,8,2
^SCR("P1S","P",84,"HELP")

^SCR("P1S","P",84,"LMAX")
8
^SCR("P1S","P",84,"MUMPS1")

^SCR("P1S","P",84,"MUMPS2")

^SCR("P1S","P",84,"OUTPUT")

^SCR("P1S","P",84,"TYP")
N
^SCR("P1S","P",86,"CRD")
21,30,N,8,2
^SCR("P1S","P",86,"HELP")

^SCR("P1S","P",86,"LMAX")
8
^SCR("P1S","P",86,"MUMPS1")

^SCR("P1S","P",86,"MUMPS2")

^SCR("P1S","P",86,"OUTPUT")

^SCR("P1S","P",86,"TYP")
N
^SCR("P1S","P",88,"CRD")
21,16,N,7,2
^SCR("P1S","P",88,"HELP")

^SCR("P1S","P",88,"LMAX")
7
^SCR("P1S","P",88,"MUMPS1")

^SCR("P1S","P",88,"MUMPS2")

^SCR("P1S","P",88,"OUTPUT")

^SCR("P1S","P",88,"TYP")
N
^SCR("P1S","P",90,"CRD")
21,1,N,8,2
^SCR("P1S","P",90,"HELP")

^SCR("P1S","P",90,"LMAX")
8
^SCR("P1S","P",90,"MUMPS1")

^SCR("P1S","P",90,"MUMPS2")

^SCR("P1S","P",90,"OUTPUT")

^SCR("P1S","P",90,"TYP")
N
^SCR("P1S","P",92,"CRD")
22,58,N,8,2
^SCR("P1S","P",92,"HELP")

^SCR("P1S","P",92,"LMAX")
8
^SCR("P1S","P",92,"MUMPS1")

^SCR("P1S","P",92,"MUMPS2")

^SCR("P1S","P",92,"OUTPUT")

^SCR("P1S","P",92,"TYP")
N
^SCR("P1S","P",94,"CRD")
22,43,N,8,2
^SCR("P1S","P",94,"HELP")

^SCR("P1S","P",94,"LMAX")
8
^SCR("P1S","P",94,"MUMPS1")

^SCR("P1S","P",94,"MUMPS2")

^SCR("P1S","P",94,"OUTPUT")

^SCR("P1S","P",94,"TYP")
N
^SCR("P1S","P",96,"CRD")
22,27,N,8,2
^SCR("P1S","P",96,"HELP")

^SCR("P1S","P",96,"LMAX")
8
^SCR("P1S","P",96,"MUMPS1")

^SCR("P1S","P",96,"MUMPS2")

^SCR("P1S","P",96,"OUTPUT")

^SCR("P1S","P",96,"TYP")
N
^SCR("P1S","P",97,"CRD")
22,1,N,5,1
^SCR("P1S","P",97,"HELP")

^SCR("P1S","P",97,"LMAX")
5
^SCR("P1S","P",97,"MUMPS1")

^SCR("P1S","P",97,"MUMPS2")

^SCR("P1S","P",97,"OUTPUT")

^SCR("P1S","P",97,"TYP")
N
^SCR("P1S","P",98,"CRD")
22,12,E,8,0
^SCR("P1S","P",98,"HELP")

^SCR("P1S","P",98,"LMAX")
8
^SCR("P1S","P",98,"MUMPS1")

^SCR("P1S","P",98,"MUMPS2")

^SCR("P1S","P",98,"OUTPUT")

^SCR("P1S","P",98,"TYP")
E
^SCR("P1S","P","NAME","ASRS")
80
^SCR("P1S","P","NAME","ASRT")
50
^SCR("P1S","P","NAME","ASRZ")
90
^SCR("P1S","P","NAME","CAS")
70
^SCR("P1S","P","NAME","CAT")
40
^SCR("P1S","P","NAME","CAZ")
86
^SCR("P1S","P","NAME","CHKZ")
84
^SCR("P1S","P","NAME","CHS")
65
^SCR("P1S","P","NAME","CHT")
35
^SCR("P1S","P","NAME","DAT1")
5
^SCR("P1S","P","NAME","MZMS")
60
^SCR("P1S","P","NAME","MZMT")
30
^SCR("P1S","P","NAME","MZMZ")
82
^SCR("P1S","P","NAME","PSL")
10
^SCR("P1S","P","NAME","PSL1")
15
^SCR("P1S","P","NAME","SHL")
94
^SCR("P1S","P","NAME","SITRA")
98
^SCR("P1S","P","NAME","STIP")
97
^SCR("P1S","P","NAME","TLS")
75
^SCR("P1S","P","NAME","TLT")
45
^SCR("P1S","P","NAME","TLZ")
88
^SCR("P1S","P","NAME","TSH")
92
^SCR("P1S","P","NAME","ZIC")
96
^SCR("P1S","P","NM",5)
DAT1
^SCR("P1S","P","NM",10)
PSL
^SCR("P1S","P","NM",15)
PSL1
^SCR("P1S","P","NM",30)
MZMT
^SCR("P1S","P","NM",35)
CHT
^SCR("P1S","P","NM",40)
CAT
^SCR("P1S","P","NM",45)
TLT
^SCR("P1S","P","NM",50)
ASRT
^SCR("P1S","P","NM",60)
MZMS
^SCR("P1S","P","NM",65)
CHS
^SCR("P1S","P","NM",70)
CAS
^SCR("P1S","P","NM",75)
TLS
^SCR("P1S","P","NM",80)
ASRS
^SCR("P1S","P","NM",82)
MZMZ
^SCR("P1S","P","NM",84)
CHKZ
^SCR("P1S","P","NM",86)
CAZ
^SCR("P1S","P","NM",88)
TLZ
^SCR("P1S","P","NM",90)
ASRZ
^SCR("P1S","P","NM",92)
TSH
^SCR("P1S","P","NM",94)
SHL
^SCR("P1S","P","NM",96)
ZIC
^SCR("P1S","P","NM",97)
STIP
^SCR("P1S","P","NM",98)
SITRA
^SCR("P1SBIT")
H
^SCR("P1SBIT",1)
                           # milehia zeaiq zlah #                              
^SCR("P1SBIT",2)
                                                                               
^SCR("P1SBIT",3)
                                                           1$                  
^SCR("P1SBIT",4)
                         :  lehia zaiq xe`z  : daiq cew :                      
^SCR("P1SBIT",5)
                                                                               
^SCR("P1SBIT",6)
                                                                               
^SCR("P1SBIT",7)
                                                                               
^SCR("P1SBIT",8)
                                                                               
^SCR("P1SBIT",9)
                                                                               
^SCR("P1SBIT",10)
                                                                               
^SCR("P1SBIT",11)
                                                                               
^SCR("P1SBIT",12)
                                                                               
^SCR("P1SBIT",13)
                                                                               
^SCR("P1SBIT",14)
                                                                               
^SCR("P1SBIT",15)
                                                                               
^SCR("P1SBIT",16)
                                                                               
^SCR("P1SBIT",17)
                                                                               
^SCR("P1SBIT",18)
                                                                               
^SCR("P1SBIT",19)
                                                                               
^SCR("P1SBIT",20)
                                                                               
^SCR("P1SBIT",21)
                                                                               
^SCR("P1SBIT",22)
                     $1                                                        
^SCR("P1SBIT","A",1)
�‰Œ…ˆ‰�š…�‰‘šŒ�ˆ
^SCR("P1SBIT","A",2)

^SCR("P1SBIT","A",3)

^SCR("P1SBIT","A",4)
Œ…ˆ‰�š�‰‘˜…€š„�‰‘ƒ…—
^SCR("P1SBIT","A",5)
-----------------------------
^SCR("P1SBIT","A",6)

^SCR("P1SBIT","A",7)

^SCR("P1SBIT","A",8)

^SCR("P1SBIT","A",9)

^SCR("P1SBIT","A",10)

^SCR("P1SBIT","A",11)

^SCR("P1SBIT","A",12)

^SCR("P1SBIT","A",13)

^SCR("P1SBIT","A",14)

^SCR("P1SBIT","A",15)

^SCR("P1SBIT","A",16)

^SCR("P1SBIT","A",17)

^SCR("P1SBIT","A",18)

^SCR("P1SBIT","A",19)

^SCR("P1SBIT","A",20)

^SCR("P1SBIT","A",21)

^SCR("P1SBIT","A",22)

^SCR("P1SBIT","AV",1)
ohkuyhc,uchx,kcy
^SCR("P1SBIT","AV",2)

^SCR("P1SBIT","AV",3)

^SCR("P1SBIT","AV",4)
kuyhc,chxrut,vchxsue
^SCR("P1SBIT","AV",5)
-----------------------------
^SCR("P1SBIT","AV",6)

^SCR("P1SBIT","AV",7)

^SCR("P1SBIT","AV",8)

^SCR("P1SBIT","AV",9)

^SCR("P1SBIT","AV",10)

^SCR("P1SBIT","AV",11)

^SCR("P1SBIT","AV",12)

^SCR("P1SBIT","AV",13)

^SCR("P1SBIT","AV",14)

^SCR("P1SBIT","AV",15)

^SCR("P1SBIT","AV",16)

^SCR("P1SBIT","AV",17)

^SCR("P1SBIT","AV",18)

^SCR("P1SBIT","AV",19)

^SCR("P1SBIT","AV",20)

^SCR("P1SBIT","AV",21)

^SCR("P1SBIT","AV",22)

^SCR("P1SBIT","G",1,"CRD")
5,56,E,3,0
^SCR("P1SBIT","G",1,"HELP")

^SCR("P1SBIT","G",1,"LMAX")
10
^SCR("P1SBIT","G",1,"MUMPS1")

^SCR("P1SBIT","G",1,"MUMPS2")
D BDIKA^P1SBIT
^SCR("P1SBIT","G",1,"MUST")

^SCR("P1SBIT","G",1,"SHEM")
 daiq cew 
^SCR("P1SBIT","G",1,"TYP")
E
^SCR("P1SBIT","G",2,"CRD")
5,45,H,18,0
^SCR("P1SBIT","G",2,"HELP")

^SCR("P1SBIT","G",2,"LMAX")
19
^SCR("P1SBIT","G",2,"MUMPS1")

^SCR("P1SBIT","G",2,"MUMPS2")

^SCR("P1SBIT","G",2,"MUST")

^SCR("P1SBIT","G",2,"SHEM")
  lehia zaiq xe`z  
^SCR("P1SBIT","G",2,"TYP")
H
^SCR("P1SBIT","G","DEL")
Y
^SCR("P1SBIT","G","MAX")
999
^SCR("P1SBIT","G","NAME","MIS")
1
^SCR("P1SBIT","G","NAME","SBIT")
2
^SCR("P1SBIT","G","NM",1)
MIS
^SCR("P1SBIT","G","NM",2)
SBIT
^SCR("P1SBIT","G","RB")
4,22,23,61
^SCR("P1SBIT","G","REF")
^TEMP($P,"BIT"
^SCR("P1SBIT","G","RZD")
\
^SCR("P1SBIT","G","STEP")
1
^SCR("P1SBIT","G","STG")
                         :  lehia zaiq xe`z  : daiq cew :                      
^SCR("P1SBIT","G","VG")
6
^SCR("P1SBIT","NAME")

^SCR("P1SBR")
H
^SCR("P1SBR",1)
                                   # zexixa zlah #                             
^SCR("P1SBR",2)
                                                                               
^SCR("P1SBR",3)
                                                               1$              
^SCR("P1SBR",4)
                                      :      dxixa xe`z    :                   
^SCR("P1SBR",5)
                                                                               
^SCR("P1SBR",6)
                                                                               
^SCR("P1SBR",7)
                                                                               
^SCR("P1SBR",8)
                                                                               
^SCR("P1SBR",9)
                                                                               
^SCR("P1SBR",10)
                                                                               
^SCR("P1SBR",11)
                                                                               
^SCR("P1SBR",12)
                                                                               
^SCR("P1SBR",13)
                                                                               
^SCR("P1SBR",14)
                                                                               
^SCR("P1SBR",15)
                                                                               
^SCR("P1SBR",16)
                                                                               
^SCR("P1SBR",17)
                                 $1                                            
^SCR("P1SBR","A",1)
š…˜‰˜�šŒ�ˆ
^SCR("P1SBR","A",2)

^SCR("P1SBR","A",3)

^SCR("P1SBR","A",4)
„˜‰˜�˜…€š
^SCR("P1SBR","A",5)
--------------------
^SCR("P1SBR","A",6)

^SCR("P1SBR","A",7)

^SCR("P1SBR","A",8)

^SCR("P1SBR","A",9)

^SCR("P1SBR","A",10)

^SCR("P1SBR","A",11)

^SCR("P1SBR","A",12)

^SCR("P1SBR","A",13)

^SCR("P1SBR","A",14)

^SCR("P1SBR","A",15)

^SCR("P1SBR","A",16)

^SCR("P1SBR","A",17)

^SCR("P1SBR","AV",1)
,urhrc,kcy
^SCR("P1SBR","AV",2)

^SCR("P1SBR","AV",3)

^SCR("P1SBR","AV",4)
vrhrcrut,
^SCR("P1SBR","AV",5)
--------------------
^SCR("P1SBR","AV",6)

^SCR("P1SBR","AV",7)

^SCR("P1SBR","AV",8)

^SCR("P1SBR","AV",9)

^SCR("P1SBR","AV",10)

^SCR("P1SBR","AV",11)

^SCR("P1SBR","AV",12)

^SCR("P1SBR","AV",13)

^SCR("P1SBR","AV",14)

^SCR("P1SBR","AV",15)

^SCR("P1SBR","AV",16)

^SCR("P1SBR","AV",17)

^SCR("P1SBR","G",1,"CRD")
5,59,H,20,0
^SCR("P1SBR","G",1,"HELP")

^SCR("P1SBR","G",1,"LMAX")
20
^SCR("P1SBR","G",1,"MUMPS1")

^SCR("P1SBR","G",1,"MUMPS2")

^SCR("P1SBR","G",1,"MUST")

^SCR("P1SBR","G",1,"SHEM")
      dxixa xe`z    
^SCR("P1SBR","G",1,"TYP")
H
^SCR("P1SBR","G","DEL")
Y
^SCR("P1SBR","G","MAX")
99
^SCR("P1SBR","G","NAME","BR")
1
^SCR("P1SBR","G","NM",1)
BR
^SCR("P1SBR","G","RB")
4,34,18,65
^SCR("P1SBR","G","REF")
^TEMP($P,"BR"
^SCR("P1SBR","G","RZD")
\
^SCR("P1SBR","G","STEP")
1
^SCR("P1SBR","G","STG")
                                      :      dxixa xe`z    :                   
^SCR("P1SBR","G","VG")
6
^SCR("P1SBR","NAME")
zexixa zlah
^SCR("P1SEND")
H
^SCR("P1SEND",1)
                     # xeciyl mihixt zxiga #                                   
^SCR("P1SEND",2)
                                                                               
^SCR("P1SEND",3)
                                                               1$              
^SCR("P1SEND",4)
                   : xign :        hixt xe`z       :  cew  :                   
^SCR("P1SEND",5)
                                                                               
^SCR("P1SEND",6)
                                                                               
^SCR("P1SEND",7)
                                                                               
^SCR("P1SEND",8)
                                                                               
^SCR("P1SEND",9)
                                                                               
^SCR("P1SEND",10)
                                                                               
^SCR("P1SEND",11)
                                                                               
^SCR("P1SEND",12)
                                                                               
^SCR("P1SEND",13)
                                                                               
^SCR("P1SEND",14)
                                                                               
^SCR("P1SEND",15)
                                                                               
^SCR("P1SEND",16)
                                                                               
^SCR("P1SEND",17)
                                                                               
^SCR("P1SEND",18)
                                                                               
^SCR("P1SEND",19)
                                                                               
^SCR("P1SEND",20)
               $1                                                              
^SCR("P1SEND",21)
                                                                               
^SCR("P1SEND","A",1)
˜…ƒ‰™Œ�‰ˆ‰˜”š˜‰‡�
^SCR("P1SEND","A",2)

^SCR("P1SEND","A",3)

^SCR("P1SEND","A",4)
˜‰‡Žˆ‰˜”˜…€šƒ…—
^SCR("P1SEND","A",5)
-------------------------------------
^SCR("P1SEND","A",6)

^SCR("P1SEND","A",7)

^SCR("P1SEND","A",8)

^SCR("P1SEND","A",9)

^SCR("P1SEND","A",10)

^SCR("P1SEND","A",11)

^SCR("P1SEND","A",12)

^SCR("P1SEND","A",13)

^SCR("P1SEND","A",14)

^SCR("P1SEND","A",15)

^SCR("P1SEND","A",16)

^SCR("P1SEND","A",17)

^SCR("P1SEND","A",18)

^SCR("P1SEND","A",19)

^SCR("P1SEND","A",20)

^SCR("P1SEND","A",21)

^SCR("P1SEND","AV",1)
rushakohyhrp,rhjc
^SCR("P1SEND","AV",2)

^SCR("P1SEND","AV",3)

^SCR("P1SEND","AV",4)
rhjnyhrprut,sue
^SCR("P1SEND","AV",5)
-------------------------------------
^SCR("P1SEND","AV",6)

^SCR("P1SEND","AV",7)

^SCR("P1SEND","AV",8)

^SCR("P1SEND","AV",9)

^SCR("P1SEND","AV",10)

^SCR("P1SEND","AV",11)

^SCR("P1SEND","AV",12)

^SCR("P1SEND","AV",13)

^SCR("P1SEND","AV",14)

^SCR("P1SEND","AV",15)

^SCR("P1SEND","AV",16)

^SCR("P1SEND","AV",17)

^SCR("P1SEND","AV",18)

^SCR("P1SEND","AV",19)

^SCR("P1SEND","AV",20)

^SCR("P1SEND","AV",21)

^SCR("P1SEND","G",1,"CRD")
5,59,E,7,0
^SCR("P1SEND","G",1,"FNC")
F6,F7
^SCR("P1SEND","G",1,"GLOB")
PAR
^SCR("P1SEND","G",1,"HELP")
<F10> - mixyw , <F9> - hixt qihxk , <F7> - mihixt zbvd , <F6> - my itl yetig 
^SCR("P1SEND","G",1,"LMAX")
7
^SCR("P1SEND","G",1,"MUMPS1")
D HZGLNK^P1PARG
^SCR("P1SEND","G",1,"MUMPS2")
D PAR^P1SEND
^SCR("P1SEND","G",1,"MUST")

^SCR("P1SEND","G",1,"NLN")
20
^SCR("P1SEND","G",1,"RZD")
**
^SCR("P1SEND","G",1,"SHEM")
  cew  
^SCR("P1SEND","G",1,"TOPB")
8
^SCR("P1SEND","G",1,"TYP")
E
^SCR("P1SEND","G",2,"CRD")
5,51,H,19,0
^SCR("P1SEND","G",2,"HELP")
<F10> - mixg` mihixt mr xyw 
^SCR("P1SEND","G",2,"LMAX")
24
^SCR("P1SEND","G",2,"MUMPS1")

^SCR("P1SEND","G",2,"MUMPS2")

^SCR("P1SEND","G",2,"OUTPUT")

^SCR("P1SEND","G",2,"SHEM")
        hixt xe`z       
^SCR("P1SEND","G",2,"TYP")
H
^SCR("P1SEND","G",3,"CRD")
5,26,N,6,2
^SCR("P1SEND","G",3,"HELP")

^SCR("P1SEND","G",3,"LMAX")
6
^SCR("P1SEND","G",3,"MUMPS1")

^SCR("P1SEND","G",3,"MUMPS2")

^SCR("P1SEND","G",3,"OUTPUT")

^SCR("P1SEND","G",3,"SHEM")
 xign 
^SCR("P1SEND","G",3,"TYP")
N
^SCR("P1SEND","G","DEL")
Y
^SCR("P1SEND","G","MAX")
99999
^SCR("P1SEND","G","NAME","MH")
3
^SCR("P1SEND","G","NAME","PAR")
1
^SCR("P1SEND","G","NAME","PAR1")
2
^SCR("P1SEND","G","NM",1)
PAR
^SCR("P1SEND","G","NM",2)
PAR1
^SCR("P1SEND","G","NM",3)
MH
^SCR("P1SEND","G","RB")
4,16,21,65
^SCR("P1SEND","G","REF")
^TEMP($P
^SCR("P1SEND","G","RZD")
\
^SCR("P1SEND","G","STEP")
1
^SCR("P1SEND","G","STG")
                   : xign :        hixt xe`z       :  cew  :                   
^SCR("P1SEND","G","VG")
6
^SCR("P1SEND","NAME")

^SCR("P1SENDL")
H
^SCR("P1SENDL",1)
                     # xeciyl zegewl zxiga #                                   
^SCR("P1SENDL",2)
                                                                               
^SCR("P1SENDL",3)
                                                                     1$        
^SCR("P1SENDL",4)
                       :            gewl my          :  gewl 'qn  :            
^SCR("P1SENDL",5)
                                                                               
^SCR("P1SENDL",6)
                                                                               
^SCR("P1SENDL",7)
                                                                               
^SCR("P1SENDL",8)
                                                                               
^SCR("P1SENDL",9)
                                                                               
^SCR("P1SENDL",10)
                                                                               
^SCR("P1SENDL",11)
                                                                               
^SCR("P1SENDL",12)
                                                                               
^SCR("P1SENDL",13)
                                                                               
^SCR("P1SENDL",14)
                                                                               
^SCR("P1SENDL",15)
                                                                               
^SCR("P1SENDL",16)
                                                                               
^SCR("P1SENDL",17)
                                                                               
^SCR("P1SENDL",18)
                                                                               
^SCR("P1SENDL",19)
                                                                               
^SCR("P1SENDL",20)
                   $1                                                          
^SCR("P1SENDL",21)
                                                                               
^SCR("P1SENDL","A",1)
˜…ƒ‰™Œš…‡…—Œš˜‰‡�
^SCR("P1SENDL","A",2)

^SCR("P1SENDL","A",3)

^SCR("P1SENDL","A",4)
‡…—Œ�™‡…—Œ'‘Ž
^SCR("P1SENDL","A",5)
-----------------------------------------
^SCR("P1SENDL","A",6)

^SCR("P1SENDL","A",7)

^SCR("P1SENDL","A",8)

^SCR("P1SENDL","A",9)

^SCR("P1SENDL","A",10)

^SCR("P1SENDL","A",11)

^SCR("P1SENDL","A",12)

^SCR("P1SENDL","A",13)

^SCR("P1SENDL","A",14)

^SCR("P1SENDL","A",15)

^SCR("P1SENDL","A",16)

^SCR("P1SENDL","A",17)

^SCR("P1SENDL","A",18)

^SCR("P1SENDL","A",19)

^SCR("P1SENDL","A",20)

^SCR("P1SENDL","A",21)

^SCR("P1SENDL","AV",1)
rushak,ujuek,rhjc
^SCR("P1SENDL","AV",2)

^SCR("P1SENDL","AV",3)

^SCR("P1SENDL","AV",4)
juekoajuekwxn
^SCR("P1SENDL","AV",5)
-----------------------------------------
^SCR("P1SENDL","AV",6)

^SCR("P1SENDL","AV",7)

^SCR("P1SENDL","AV",8)

^SCR("P1SENDL","AV",9)

^SCR("P1SENDL","AV",10)

^SCR("P1SENDL","AV",11)

^SCR("P1SENDL","AV",12)

^SCR("P1SENDL","AV",13)

^SCR("P1SENDL","AV",14)

^SCR("P1SENDL","AV",15)

^SCR("P1SENDL","AV",16)

^SCR("P1SENDL","AV",17)

^SCR("P1SENDL","AV",18)

^SCR("P1SENDL","AV",19)

^SCR("P1SENDL","AV",20)

^SCR("P1SENDL","AV",21)

^SCR("P1SENDL","G",1,"CRD")
5,66,E,10,0
^SCR("P1SENDL","G",1,"FNC")

^SCR("P1SENDL","G",1,"GLOB")
LKH
^SCR("P1SENDL","G",1,"HELP")

^SCR("P1SENDL","G",1,"LMAX")
12
^SCR("P1SENDL","G",1,"MUMPS1")

^SCR("P1SENDL","G",1,"MUMPS2")

^SCR("P1SENDL","G",1,"MUST")

^SCR("P1SENDL","G",1,"NLN")
20
^SCR("P1SENDL","G",1,"RZD")
**
^SCR("P1SENDL","G",1,"SHEM")
  gewl 'qn  
^SCR("P1SENDL","G",1,"TOPB")
8
^SCR("P1SENDL","G",1,"TYP")
E
^SCR("P1SENDL","G",1,"VRB")
LKH1
^SCR("P1SENDL","G",2,"CRD")
5,53,H,28,0
^SCR("P1SENDL","G",2,"HELP")

^SCR("P1SENDL","G",2,"LMAX")
29
^SCR("P1SENDL","G",2,"MUMPS1")

^SCR("P1SENDL","G",2,"MUMPS2")

^SCR("P1SENDL","G",2,"OUTPUT")

^SCR("P1SENDL","G",2,"SHEM")
            gewl my          
^SCR("P1SENDL","G",2,"TYP")
H
^SCR("P1SENDL","G","DEL")
Y
^SCR("P1SENDL","G","MAX")
99999
^SCR("P1SENDL","G","NAME","LKH")
1
^SCR("P1SENDL","G","NAME","LKH1")
2
^SCR("P1SENDL","G","NM",1)
LKH
^SCR("P1SENDL","G","NM",2)
LKH1
^SCR("P1SENDL","G","RB")
4,20,21,71
^SCR("P1SENDL","G","REF")
^TEMP($P
^SCR("P1SENDL","G","RZD")
\
^SCR("P1SENDL","G","STEP")
1
^SCR("P1SENDL","G","STG")
                       :            gewl my          :  gewl 'qn  :            
^SCR("P1SENDL","G","VG")
6
^SCR("P1SENDL","NAME")

^SCR("P1SENDM")
H
^SCR("P1SENDM",1)
                     # xeciyl zerced zxiga #                                   
^SCR("P1SENDM",2)
                                                                               
^SCR("P1SENDM",3)
                                                                          1$   
^SCR("P1SENDM",4)
         : oexg` oekcr onf :            drced xe`z           :   cew   :       
^SCR("P1SENDM",5)
                                                                               
^SCR("P1SENDM",6)
                                                                               
^SCR("P1SENDM",7)
                                                                               
^SCR("P1SENDM",8)
                                                                               
^SCR("P1SENDM",9)
                                                                               
^SCR("P1SENDM",10)
                                                                               
^SCR("P1SENDM",11)
                                                                               
^SCR("P1SENDM",12)
                                                                               
^SCR("P1SENDM",13)
                                                                               
^SCR("P1SENDM",14)
                                                                               
^SCR("P1SENDM",15)
                                                                               
^SCR("P1SENDM",16)
                                                                               
^SCR("P1SENDM",17)
                                                                               
^SCR("P1SENDM",18)
                                                                               
^SCR("P1SENDM",19)
                                                                               
^SCR("P1SENDM",20)
                                                                               
^SCR("P1SENDM",21)
    $1                                                                         
^SCR("P1SENDM",22)
                                                                               
^SCR("P1SENDM","A",1)
˜…ƒ‰™Œš…’ƒ…„š˜‰‡�
^SCR("P1SENDM","A",2)

^SCR("P1SENDM","A",3)

^SCR("P1SENDM","A",4)
�…˜‡€�…‹ƒ’�Ž†„’ƒ…„˜…€šƒ…—
^SCR("P1SENDM","A",5)
-----------------------------------------------------------
^SCR("P1SENDM","A",6)

^SCR("P1SENDM","A",7)

^SCR("P1SENDM","A",8)

^SCR("P1SENDM","A",9)

^SCR("P1SENDM","A",10)

^SCR("P1SENDM","A",11)

^SCR("P1SENDM","A",12)

^SCR("P1SENDM","A",13)

^SCR("P1SENDM","A",14)

^SCR("P1SENDM","A",15)

^SCR("P1SENDM","A",16)

^SCR("P1SENDM","A",17)

^SCR("P1SENDM","A",18)

^SCR("P1SENDM","A",19)

^SCR("P1SENDM","A",20)

^SCR("P1SENDM","A",21)

^SCR("P1SENDM","A",22)

^SCR("P1SENDM","AV",1)
rushak,ugsuv,rhjc
^SCR("P1SENDM","AV",2)

^SCR("P1SENDM","AV",3)

^SCR("P1SENDM","AV",4)
iurjtiufsginzvgsuvrut,sue
^SCR("P1SENDM","AV",5)
-----------------------------------------------------------
^SCR("P1SENDM","AV",6)

^SCR("P1SENDM","AV",7)

^SCR("P1SENDM","AV",8)

^SCR("P1SENDM","AV",9)

^SCR("P1SENDM","AV",10)

^SCR("P1SENDM","AV",11)

^SCR("P1SENDM","AV",12)

^SCR("P1SENDM","AV",13)

^SCR("P1SENDM","AV",14)

^SCR("P1SENDM","AV",15)

^SCR("P1SENDM","AV",16)

^SCR("P1SENDM","AV",17)

^SCR("P1SENDM","AV",18)

^SCR("P1SENDM","AV",19)

^SCR("P1SENDM","AV",20)

^SCR("P1SENDM","AV",21)

^SCR("P1SENDM","AV",22)

^SCR("P1SENDM","G",1,"CRD")
5,71,E,9,0
^SCR("P1SENDM","G",1,"HELP")
<F9> - drced okez bivdl 
^SCR("P1SENDM","G",1,"LMAX")
9
^SCR("P1SENDM","G",1,"MUMPS1")

^SCR("P1SENDM","G",1,"MUMPS2")
D MSG^P1SENDM
^SCR("P1SENDM","G",1,"MUST")

^SCR("P1SENDM","G",1,"SHEM")
   cew   
^SCR("P1SENDM","G",1,"TYP")
E
^SCR("P1SENDM","G",2,"CRD")
5,61,H,19,0
^SCR("P1SENDM","G",2,"HELP")
<F10> - mixg` mihixt mr xyw 
^SCR("P1SENDM","G",2,"LMAX")
33
^SCR("P1SENDM","G",2,"MUMPS1")

^SCR("P1SENDM","G",2,"MUMPS2")

^SCR("P1SENDM","G",2,"OUTPUT")

^SCR("P1SENDM","G",2,"SHEM")
            drced xe`z           
^SCR("P1SENDM","G",2,"TYP")
H
^SCR("P1SENDM","G",3,"CRD")
5,27,N,15,2
^SCR("P1SENDM","G",3,"HELP")

^SCR("P1SENDM","G",3,"LMAX")
17
^SCR("P1SENDM","G",3,"MUMPS1")

^SCR("P1SENDM","G",3,"MUMPS2")

^SCR("P1SENDM","G",3,"OUTPUT")

^SCR("P1SENDM","G",3,"SHEM")
 oexg` oekcr onf 
^SCR("P1SENDM","G",3,"TYP")
N
^SCR("P1SENDM","G","DEL")
Y
^SCR("P1SENDM","G","MAX")
1
^SCR("P1SENDM","G","NAME","MSG")
1
^SCR("P1SENDM","G","NAME","MSG1")
2
^SCR("P1SENDM","G","NAME","ZMAN")
3
^SCR("P1SENDM","G","NM",1)
MSG
^SCR("P1SENDM","G","NM",2)
MSG1
^SCR("P1SENDM","G","NM",3)
ZMAN
^SCR("P1SENDM","G","RB")
4,5,22,76
^SCR("P1SENDM","G","REF")
^TEMP($P
^SCR("P1SENDM","G","RZD")
\
^SCR("P1SENDM","G","STEP")
1
^SCR("P1SENDM","G","STG")
         : oexg` oekcr onf :            drced xe`z           :   cew   :       
^SCR("P1SENDM","G","VG")
6
^SCR("P1SENDM","NAME")

^SCR("P1SET")
H
^SCR("P1SET",1)
                                 # g"ecl mihixt hq  #                          
^SCR("P1SET",2)
                                                                               
^SCR("P1SET",3)
                               {                    10} {05 : hq 'qn           
^SCR("P1SET",4)
                                                                   1$          
^SCR("P1SET",5)
                         :         hixt xe`z       : hixt cew  :               
^SCR("P1SET",6)
                                                                               
^SCR("P1SET",7)
                                                                               
^SCR("P1SET",8)
                                                                               
^SCR("P1SET",9)
                                                                               
^SCR("P1SET",10)
                                                                               
^SCR("P1SET",11)
                                                                               
^SCR("P1SET",12)
                                                                               
^SCR("P1SET",13)
                                                                               
^SCR("P1SET",14)
                                                                               
^SCR("P1SET",15)
                                                                               
^SCR("P1SET",16)
                                                                               
^SCR("P1SET",17)
                                                                               
^SCR("P1SET",18)
                                                                               
^SCR("P1SET",19)
                                                                               
^SCR("P1SET",20)
                                                                               
^SCR("P1SET",21)
                     $1                                                        
^SCR("P1SET","A",1)
‡"…ƒŒ�‰ˆ‰˜”ˆ‘
^SCR("P1SET","A",2)

^SCR("P1SET","A",3)
:ˆ‘'‘Ž
^SCR("P1SET","A",4)

^SCR("P1SET","A",5)
ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1SET","A",6)
------------------------------------
^SCR("P1SET","A",7)

^SCR("P1SET","A",8)

^SCR("P1SET","A",9)

^SCR("P1SET","A",10)

^SCR("P1SET","A",11)

^SCR("P1SET","A",12)

^SCR("P1SET","A",13)

^SCR("P1SET","A",14)

^SCR("P1SET","A",15)

^SCR("P1SET","A",16)

^SCR("P1SET","A",17)

^SCR("P1SET","A",18)

^SCR("P1SET","A",19)

^SCR("P1SET","A",20)

^SCR("P1SET","A",21)

^SCR("P1SET","AV",1)
j"uskohyhrpyx
^SCR("P1SET","AV",2)

^SCR("P1SET","AV",3)
:yxwxn
^SCR("P1SET","AV",4)

^SCR("P1SET","AV",5)
yhrprut,yhrpsue
^SCR("P1SET","AV",6)
------------------------------------
^SCR("P1SET","AV",7)

^SCR("P1SET","AV",8)

^SCR("P1SET","AV",9)

^SCR("P1SET","AV",10)

^SCR("P1SET","AV",11)

^SCR("P1SET","AV",12)

^SCR("P1SET","AV",13)

^SCR("P1SET","AV",14)

^SCR("P1SET","AV",15)

^SCR("P1SET","AV",16)

^SCR("P1SET","AV",17)

^SCR("P1SET","AV",18)

^SCR("P1SET","AV",19)

^SCR("P1SET","AV",20)

^SCR("P1SET","AV",21)

^SCR("P1SET","G",1,"CHECK")
Y
^SCR("P1SET","G",1,"CRD")
6,63,E,6,0
^SCR("P1SET","G",1,"CREAT")

^SCR("P1SET","G",1,"FNC")
F6,F7,F9
^SCR("P1SET","G",1,"GLOB")
PAR
^SCR("P1SET","G",1,"HELP")

^SCR("P1SET","G",1,"LMAX")
11
^SCR("P1SET","G",1,"MUMPS1")

^SCR("P1SET","G",1,"MUMPS2")
D BDIKA^P1SET
^SCR("P1SET","G",1,"MUST")

^SCR("P1SET","G",1,"NLN")
20
^SCR("P1SET","G",1,"NS")
J
^SCR("P1SET","G",1,"RZD")
**
^SCR("P1SET","G",1,"SHEM")
 hixt cew  
^SCR("P1SET","G",1,"TOPB")
8
^SCR("P1SET","G",1,"TYP")
E
^SCR("P1SET","G",1,"VRB")
PAR1
^SCR("P1SET","G",2,"CRD")
6,51,H,25,0
^SCR("P1SET","G",2,"HELP")

^SCR("P1SET","G",2,"LMAX")
25
^SCR("P1SET","G",2,"MUMPS1")

^SCR("P1SET","G",2,"MUMPS2")

^SCR("P1SET","G",2,"OUTPUT")

^SCR("P1SET","G",2,"SHEM")
         hixt xe`z       
^SCR("P1SET","G",2,"TYP")
H
^SCR("P1SET","G","DEL")
Y
^SCR("P1SET","G","MAX")
99999
^SCR("P1SET","G","NAME","PAR")
1
^SCR("P1SET","G","NAME","PAR1")
2
^SCR("P1SET","G","NM",1)
PAR
^SCR("P1SET","G","NM",2)
PAR1
^SCR("P1SET","G","RB")
5,22,22,69
^SCR("P1SET","G","REF")
^TEMP($P
^SCR("P1SET","G","RZD")
\
^SCR("P1SET","G","STEP")
1
^SCR("P1SET","G","STG")
                         :         hixt xe`z       : hixt cew  :               
^SCR("P1SET","G","VG")
7
^SCR("P1SET","NAME")
g"ecl mihixt hq
^SCR("P1SET","P",5,"CRD")
3,56,E,3,0
^SCR("P1SET","P",5,"FNC")

^SCR("P1SET","P",5,"GLOB")
P1SET
^SCR("P1SET","P",5,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1SET","P",5,"LMAX")
4
^SCR("P1SET","P",5,"MUMPS1")

^SCR("P1SET","P",5,"MUMPS2")
D GET^P1SET
^SCR("P1SET","P",5,"MUST")

^SCR("P1SET","P",5,"NLN")
20
^SCR("P1SET","P",5,"RZD")
\
^SCR("P1SET","P",5,"TOPB")
8
^SCR("P1SET","P",5,"TYP")
E
^SCR("P1SET","P",5,"VRB")
NS1
^SCR("P1SET","P",10,"CRD")
3,55,H,23,0
^SCR("P1SET","P",10,"HELP")

^SCR("P1SET","P",10,"LMAX")
23
^SCR("P1SET","P",10,"MUMPS1")

^SCR("P1SET","P",10,"MUMPS2")

^SCR("P1SET","P",10,"TYP")
H
^SCR("P1SET","P","NAME","NS")
5
^SCR("P1SET","P","NAME","NS1")
10
^SCR("P1SET","P","NM",5)
NS
^SCR("P1SET","P","NM",10)
NS1
^SCR("P1SETA")
H
^SCR("P1SETA",1)
                            # dpnl mihixt hq  #                                
^SCR("P1SETA",2)
                                                                               
^SCR("P1SETA",3)
                  {                        10} {05  } : hq xtqn                
^SCR("P1SETA",4)
                           {15 }:  dpn zxigaa iaxin mihixt xtqn                
^SCR("P1SETA",5)
                                                                  1$           
^SCR("P1SETA",6)
                    :           hixt xe`z         : hixt cew  :                
^SCR("P1SETA",7)
                                                                               
^SCR("P1SETA",8)
                                                                               
^SCR("P1SETA",9)
                                                                               
^SCR("P1SETA",10)
                                                                               
^SCR("P1SETA",11)
                                                                               
^SCR("P1SETA",12)
                                                                               
^SCR("P1SETA",13)
                                                                               
^SCR("P1SETA",14)
                                                                               
^SCR("P1SETA",15)
                                                                               
^SCR("P1SETA",16)
                                                                               
^SCR("P1SETA",17)
                                                                               
^SCR("P1SETA",18)
                                                                               
^SCR("P1SETA",19)
                                                                               
^SCR("P1SETA",20)
                                                                               
^SCR("P1SETA",21)
                                                                               
^SCR("P1SETA",22)
               $1                                                              
^SCR("P1SETA","A",1)
„�ŽŒ�‰ˆ‰˜”ˆ‘
^SCR("P1SETA","A",2)

^SCR("P1SETA","A",3)
:ˆ‘˜”‘Ž
^SCR("P1SETA","A",4)
:„�Žš˜‰‡��‰�˜‰Ž�‰ˆ‰˜”˜”‘Ž
^SCR("P1SETA","A",5)

^SCR("P1SETA","A",6)
ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1SETA","A",7)
----------------------------------------
^SCR("P1SETA","A",8)

^SCR("P1SETA","A",9)

^SCR("P1SETA","A",10)

^SCR("P1SETA","A",11)

^SCR("P1SETA","A",12)

^SCR("P1SETA","A",13)

^SCR("P1SETA","A",14)

^SCR("P1SETA","A",15)

^SCR("P1SETA","A",16)

^SCR("P1SETA","A",17)

^SCR("P1SETA","A",18)

^SCR("P1SETA","A",19)

^SCR("P1SETA","A",20)

^SCR("P1SETA","A",21)

^SCR("P1SETA","A",22)

^SCR("P1SETA","AV",1)
vbnkohyhrpyx
^SCR("P1SETA","AV",2)

^SCR("P1SETA","AV",3)
:yxrpxn
^SCR("P1SETA","AV",4)
:vbn,rhjcchcrhnohyhrprpxn
^SCR("P1SETA","AV",5)

^SCR("P1SETA","AV",6)
yhrprut,yhrpsue
^SCR("P1SETA","AV",7)
----------------------------------------
^SCR("P1SETA","AV",8)

^SCR("P1SETA","AV",9)

^SCR("P1SETA","AV",10)

^SCR("P1SETA","AV",11)

^SCR("P1SETA","AV",12)

^SCR("P1SETA","AV",13)

^SCR("P1SETA","AV",14)

^SCR("P1SETA","AV",15)

^SCR("P1SETA","AV",16)

^SCR("P1SETA","AV",17)

^SCR("P1SETA","AV",18)

^SCR("P1SETA","AV",19)

^SCR("P1SETA","AV",20)

^SCR("P1SETA","AV",21)

^SCR("P1SETA","AV",22)

^SCR("P1SETA","G",1,"CHECK")
Y
^SCR("P1SETA","G",1,"CRD")
7,62,E,6,0
^SCR("P1SETA","G",1,"CREAT")

^SCR("P1SETA","G",1,"FNC")
F6,F7,F9
^SCR("P1SETA","G",1,"GLOB")
PAR
^SCR("P1SETA","G",1,"HELP")
<F9> - hixt qihxk , <F7> - mihixt zniyx , <F6> - my itl hixt yetig
^SCR("P1SETA","G",1,"LMAX")
11
^SCR("P1SETA","G",1,"MUMPS1")

^SCR("P1SETA","G",1,"MUMPS2")
D PAR^P1SETA
^SCR("P1SETA","G",1,"MUST")

^SCR("P1SETA","G",1,"NLN")
20
^SCR("P1SETA","G",1,"NS")
J
^SCR("P1SETA","G",1,"RZD")
**
^SCR("P1SETA","G",1,"SHEM")
 hixt cew  
^SCR("P1SETA","G",1,"TOPB")
8
^SCR("P1SETA","G",1,"TYP")
E
^SCR("P1SETA","G",1,"VRB")
PAR1
^SCR("P1SETA","G",2,"CRD")
7,50,H,25,0
^SCR("P1SETA","G",2,"HELP")

^SCR("P1SETA","G",2,"LMAX")
29
^SCR("P1SETA","G",2,"MUMPS1")

^SCR("P1SETA","G",2,"MUMPS2")

^SCR("P1SETA","G",2,"OUTPUT")

^SCR("P1SETA","G",2,"SHEM")
           hixt xe`z         
^SCR("P1SETA","G",2,"TYP")
H
^SCR("P1SETA","G","DEL")
Y
^SCR("P1SETA","G","MAX")
99999
^SCR("P1SETA","G","NAME","PAR")
1
^SCR("P1SETA","G","NAME","PAR1")
2
^SCR("P1SETA","G","NM",1)
PAR
^SCR("P1SETA","G","NM",2)
PAR1
^SCR("P1SETA","G","RB")
6,16,23,68
^SCR("P1SETA","G","REF")
^TEMPS($P
^SCR("P1SETA","G","RZD")
\
^SCR("P1SETA","G","STEP")
1
^SCR("P1SETA","G","STG")
                    :           hixt xe`z         : hixt cew  :                
^SCR("P1SETA","G","VG")
8
^SCR("P1SETA","NAME")

^SCR("P1SETA","P",5,"CRD")
3,47,E,3,0
^SCR("P1SETA","P",5,"FNC")

^SCR("P1SETA","P",5,"GLOB")
P1SETA
^SCR("P1SETA","P",5,"HELP")
<F7> - mihq zbvd 
^SCR("P1SETA","P",5,"LMAX")
5
^SCR("P1SETA","P",5,"MUMPS1")

^SCR("P1SETA","P",5,"MUMPS2")

^SCR("P1SETA","P",5,"MUST")

^SCR("P1SETA","P",5,"NLN")
20
^SCR("P1SETA","P",5,"RZD")
\
^SCR("P1SETA","P",5,"TOPB")
8
^SCR("P1SETA","P",5,"TYP")
E
^SCR("P1SETA","P",5,"VRB")
NSET1
^SCR("P1SETA","P",10,"CRD")
3,46,H,25
^SCR("P1SETA","P",10,"HELP")

^SCR("P1SETA","P",10,"LMAX")
27
^SCR("P1SETA","P",10,"MUMPS1")

^SCR("P1SETA","P",10,"MUMPS2")

^SCR("P1SETA","P",10,"TYP")
H
^SCR("P1SETA","P",15,"CRD")
4,27,E,3,0
^SCR("P1SETA","P",15,"HELP")

^SCR("P1SETA","P",15,"LMAX")
4
^SCR("P1SETA","P",15,"MUMPS1")
S:$G(TSF)="" TSF=1
^SCR("P1SETA","P",15,"MUMPS2")

^SCR("P1SETA","P",15,"MUST")

^SCR("P1SETA","P",15,"TYP")
E
^SCR("P1SETA","P","NAME","NSET")
5
^SCR("P1SETA","P","NAME","NSET1")
10
^SCR("P1SETA","P","NAME","TSF")
15
^SCR("P1SETA","P","NM",5)
NSET
^SCR("P1SETA","P","NM",10)
NSET1
^SCR("P1SETA","P","NM",15)
TSF
^SCR("P1SETM")
H
^SCR("P1SETM",1)
                                 # rvanl mihixt hq  #                          
^SCR("P1SETM",2)
                                                                               
^SCR("P1SETM",3)
                    {                        10} {05  }:hq xtqn                
^SCR("P1SETM",4)
                                                                         1$    
^SCR("P1SETM",5)
        :zenk: rvan xign :  xign  :         hixt xe`z       : hixt cew  :      
^SCR("P1SETM",6)
                                                                               
^SCR("P1SETM",7)
                                                                               
^SCR("P1SETM",8)
                                                                               
^SCR("P1SETM",9)
                                                                               
^SCR("P1SETM",10)
                                                                               
^SCR("P1SETM",11)
                                                                               
^SCR("P1SETM",12)
                                                                               
^SCR("P1SETM",13)
                                                                               
^SCR("P1SETM",14)
                                                                               
^SCR("P1SETM",15)
                                                                               
^SCR("P1SETM",16)
                                                                               
^SCR("P1SETM",17)
                                                                               
^SCR("P1SETM",18)
                                                                               
^SCR("P1SETM",19)
                                                                               
^SCR("P1SETM",20)
                                                                               
^SCR("P1SETM",21)
    $1                                                                         
^SCR("P1SETM","A",1)
’–�ŽŒ�‰ˆ‰˜”ˆ‘
^SCR("P1SETM","A",2)

^SCR("P1SETM","A",3)
:ˆ‘˜”‘Ž
^SCR("P1SETM","A",4)

^SCR("P1SETM","A",5)
š…Ž‹’–�Ž˜‰‡Ž˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1SETM","A",6)
-----------------------------------------------------------
^SCR("P1SETM","A",7)

^SCR("P1SETM","A",8)

^SCR("P1SETM","A",9)

^SCR("P1SETM","A",10)

^SCR("P1SETM","A",11)

^SCR("P1SETM","A",12)

^SCR("P1SETM","A",13)

^SCR("P1SETM","A",14)

^SCR("P1SETM","A",15)

^SCR("P1SETM","A",16)

^SCR("P1SETM","A",17)

^SCR("P1SETM","A",18)

^SCR("P1SETM","A",19)

^SCR("P1SETM","A",20)

^SCR("P1SETM","A",21)

^SCR("P1SETM","AV",1)
gmcnkohyhrpyx
^SCR("P1SETM","AV",2)

^SCR("P1SETM","AV",3)
:yxrpxn
^SCR("P1SETM","AV",4)

^SCR("P1SETM","AV",5)
,unfgmcnrhjnrhjnyhrprut,yhrpsue
^SCR("P1SETM","AV",6)
-----------------------------------------------------------
^SCR("P1SETM","AV",7)

^SCR("P1SETM","AV",8)

^SCR("P1SETM","AV",9)

^SCR("P1SETM","AV",10)

^SCR("P1SETM","AV",11)

^SCR("P1SETM","AV",12)

^SCR("P1SETM","AV",13)

^SCR("P1SETM","AV",14)

^SCR("P1SETM","AV",15)

^SCR("P1SETM","AV",16)

^SCR("P1SETM","AV",17)

^SCR("P1SETM","AV",18)

^SCR("P1SETM","AV",19)

^SCR("P1SETM","AV",20)

^SCR("P1SETM","AV",21)

^SCR("P1SETM","G",1,"CHECK")
Y
^SCR("P1SETM","G",1,"CRD")
6,72,E,6,0
^SCR("P1SETM","G",1,"CREAT")

^SCR("P1SETM","G",1,"FNC")

^SCR("P1SETM","G",1,"GLOB")
PAR
^SCR("P1SETM","G",1,"HELP")

^SCR("P1SETM","G",1,"LMAX")
11
^SCR("P1SETM","G",1,"MUMPS1")

^SCR("P1SETM","G",1,"MUMPS2")
S MH=$$MH^P1P(PAR)
^SCR("P1SETM","G",1,"MUST")

^SCR("P1SETM","G",1,"NLN")
20
^SCR("P1SETM","G",1,"NS")
J
^SCR("P1SETM","G",1,"RZD")
**
^SCR("P1SETM","G",1,"SHEM")
 hixt cew  
^SCR("P1SETM","G",1,"TOPB")
8
^SCR("P1SETM","G",1,"TYP")
E
^SCR("P1SETM","G",1,"VRB")
PAR1
^SCR("P1SETM","G",2,"CRD")
6,60,H,25,0
^SCR("P1SETM","G",2,"HELP")

^SCR("P1SETM","G",2,"LMAX")
25
^SCR("P1SETM","G",2,"MUMPS1")

^SCR("P1SETM","G",2,"MUMPS2")

^SCR("P1SETM","G",2,"OUTPUT")

^SCR("P1SETM","G",2,"SHEM")
         hixt xe`z       
^SCR("P1SETM","G",2,"TYP")
H
^SCR("P1SETM","G",3,"CRD")
6,34,N,7,2
^SCR("P1SETM","G",3,"HELP")

^SCR("P1SETM","G",3,"LMAX")
8
^SCR("P1SETM","G",3,"MUMPS1")

^SCR("P1SETM","G",3,"MUMPS2")

^SCR("P1SETM","G",3,"OUTPUT")

^SCR("P1SETM","G",3,"SHEM")
  xign  
^SCR("P1SETM","G",3,"TYP")
N
^SCR("P1SETM","G",4,"CRD")
6,25,N,7,2
^SCR("P1SETM","G",4,"HELP")

^SCR("P1SETM","G",4,"LMAX")
11
^SCR("P1SETM","G",4,"MUMPS1")

^SCR("P1SETM","G",4,"MUMPS2")

^SCR("P1SETM","G",4,"SHEM")
 rvan xign 
^SCR("P1SETM","G",4,"TYP")
N
^SCR("P1SETM","G",5,"CRD")
6,13,N,3,0
^SCR("P1SETM","G",5,"HELP")

^SCR("P1SETM","G",5,"LMAX")
4
^SCR("P1SETM","G",5,"MUMPS1")
S:'$G(KAMS) KAMS=1
^SCR("P1SETM","G",5,"MUMPS2")

^SCR("P1SETM","G",5,"SHEM")
zenk
^SCR("P1SETM","G",5,"TYP")
N
^SCR("P1SETM","G","DEL")
Y
^SCR("P1SETM","G","MAX")
99999
^SCR("P1SETM","G","NAME","KAMS")
5
^SCR("P1SETM","G","NAME","MH")
3
^SCR("P1SETM","G","NAME","MHM")
4
^SCR("P1SETM","G","NAME","PAR")
1
^SCR("P1SETM","G","NAME","PAR1")
2
^SCR("P1SETM","G","NM",1)
PAR
^SCR("P1SETM","G","NM",2)
PAR1
^SCR("P1SETM","G","NM",3)
MH
^SCR("P1SETM","G","NM",4)
MHM
^SCR("P1SETM","G","NM",5)
KAMS
^SCR("P1SETM","G","RB")
5,5,22,75
^SCR("P1SETM","G","REF")
^TEMPS($P
^SCR("P1SETM","G","RZD")
\
^SCR("P1SETM","G","STEP")
1
^SCR("P1SETM","G","STG")
        :zenk: rvan xign :  xign  :         hixt xe`z       : hixt cew  :      
^SCR("P1SETM","G","VG")
7
^SCR("P1SETM","NAME")
rvanl hq
^SCR("P1SETM","P",5,"CRD")
3,49,N,2,0
^SCR("P1SETM","P",5,"HELP")
<F7> - mihq zbvd 
^SCR("P1SETM","P",5,"LMAX")
5
^SCR("P1SETM","P",5,"MUMPS1")

^SCR("P1SETM","P",5,"MUMPS2")

^SCR("P1SETM","P",5,"MUST")

^SCR("P1SETM","P",5,"TYP")
N
^SCR("P1SETM","P",10,"CRD")
3,48,H,25
^SCR("P1SETM","P",10,"HELP")

^SCR("P1SETM","P",10,"LMAX")
27
^SCR("P1SETM","P",10,"MUMPS1")

^SCR("P1SETM","P",10,"MUMPS2")

^SCR("P1SETM","P",10,"TYP")
H
^SCR("P1SETM","P","NAME","NSET")
5
^SCR("P1SETM","P","NAME","NSET1")
10
^SCR("P1SETM","P","NM",5)
NSET
^SCR("P1SETM","P","NM",10)
NSET1
^SCR("P1SETP")
H
^SCR("P1SETP",1)
                      # dxiknl mihixt hq  #                                    
^SCR("P1SETP",2)
                                                                               
^SCR("P1SETP",3)
                         {                        10} {05  } :      hq xtqn    
^SCR("P1SETP",4)
                    {                       16} {15        } :iy`x gewl 'qn    
^SCR("P1SETP",5)
                                                                          1$   
^SCR("P1SETP",6)
               : okxvl xign :           hixt xe`z         : hixt cew  :        
^SCR("P1SETP",7)
                                                                               
^SCR("P1SETP",8)
                                                                               
^SCR("P1SETP",9)
                                                                               
^SCR("P1SETP",10)
                                                                               
^SCR("P1SETP",11)
                                                                               
^SCR("P1SETP",12)
                                                                               
^SCR("P1SETP",13)
                                                                               
^SCR("P1SETP",14)
                                                                               
^SCR("P1SETP",15)
                                                                               
^SCR("P1SETP",16)
                                                                               
^SCR("P1SETP",17)
                                                                               
^SCR("P1SETP",18)
                                                                               
^SCR("P1SETP",19)
                                                                               
^SCR("P1SETP",20)
                                                                               
^SCR("P1SETP",21)
                                                                               
^SCR("P1SETP",22)
            $1                                                                 
^SCR("P1SETP","A",1)
„˜‰‹ŽŒ�‰ˆ‰˜”ˆ‘
^SCR("P1SETP","A",2)

^SCR("P1SETP","A",3)
:ˆ‘˜”‘Ž
^SCR("P1SETP","A",4)
:‰™€˜‡…—Œ'‘Ž
^SCR("P1SETP","A",5)

^SCR("P1SETP","A",6)
�‹˜–Œ˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1SETP","A",7)
----------------------------------------------------
^SCR("P1SETP","A",8)

^SCR("P1SETP","A",9)

^SCR("P1SETP","A",10)

^SCR("P1SETP","A",11)

^SCR("P1SETP","A",12)

^SCR("P1SETP","A",13)

^SCR("P1SETP","A",14)

^SCR("P1SETP","A",15)

^SCR("P1SETP","A",16)

^SCR("P1SETP","A",17)

^SCR("P1SETP","A",18)

^SCR("P1SETP","A",19)

^SCR("P1SETP","A",20)

^SCR("P1SETP","A",21)

^SCR("P1SETP","A",22)

^SCR("P1SETP","AV",1)
vrhfnkohyhrpyx
^SCR("P1SETP","AV",2)

^SCR("P1SETP","AV",3)
:yxrpxn
^SCR("P1SETP","AV",4)
:hatrjuekwxn
^SCR("P1SETP","AV",5)

^SCR("P1SETP","AV",6)
ifrmkrhjnyhrprut,yhrpsue
^SCR("P1SETP","AV",7)
----------------------------------------------------
^SCR("P1SETP","AV",8)

^SCR("P1SETP","AV",9)

^SCR("P1SETP","AV",10)

^SCR("P1SETP","AV",11)

^SCR("P1SETP","AV",12)

^SCR("P1SETP","AV",13)

^SCR("P1SETP","AV",14)

^SCR("P1SETP","AV",15)

^SCR("P1SETP","AV",16)

^SCR("P1SETP","AV",17)

^SCR("P1SETP","AV",18)

^SCR("P1SETP","AV",19)

^SCR("P1SETP","AV",20)

^SCR("P1SETP","AV",21)

^SCR("P1SETP","AV",22)

^SCR("P1SETP","G",1,"CHECK")
Y
^SCR("P1SETP","G",1,"CRD")
7,70,E,6,0
^SCR("P1SETP","G",1,"CREAT")

^SCR("P1SETP","G",1,"FNC")
F6,F7,F9
^SCR("P1SETP","G",1,"GLOB")
PAR
^SCR("P1SETP","G",1,"HELP")
<F9> - hixt qihxk , <F7> - mihixt zniyx , <F6> - my itl hixt yetig
^SCR("P1SETP","G",1,"LMAX")
11
^SCR("P1SETP","G",1,"MUMPS1")

^SCR("P1SETP","G",1,"MUMPS2")
D PAR^P1SETA
^SCR("P1SETP","G",1,"MUST")

^SCR("P1SETP","G",1,"NLN")
20
^SCR("P1SETP","G",1,"NS")
J
^SCR("P1SETP","G",1,"RZD")
**
^SCR("P1SETP","G",1,"SHEM")
 hixt cew  
^SCR("P1SETP","G",1,"TOPB")
8
^SCR("P1SETP","G",1,"TYP")
E
^SCR("P1SETP","G",1,"VRB")
PAR1
^SCR("P1SETP","G",2,"CRD")
7,58,H,25,0
^SCR("P1SETP","G",2,"HELP")

^SCR("P1SETP","G",2,"LMAX")
29
^SCR("P1SETP","G",2,"MUMPS1")

^SCR("P1SETP","G",2,"MUMPS2")

^SCR("P1SETP","G",2,"OUTPUT")

^SCR("P1SETP","G",2,"SHEM")
           hixt xe`z         
^SCR("P1SETP","G",2,"TYP")
H
^SCR("P1SETP","G",3,"CRD")
7,28,N,8,2
^SCR("P1SETP","G",3,"HELP")

^SCR("P1SETP","G",3,"LMAX")
12
^SCR("P1SETP","G",3,"MUMPS1")

^SCR("P1SETP","G",3,"MUMPS2")

^SCR("P1SETP","G",3,"OUTPUT")

^SCR("P1SETP","G",3,"SHEM")
 okxvl xign 
^SCR("P1SETP","G",3,"TYP")
N
^SCR("P1SETP","G","DEL")
Y
^SCR("P1SETP","G","MAX")
99999
^SCR("P1SETP","G","NAME","MH")
3
^SCR("P1SETP","G","NAME","PAR")
1
^SCR("P1SETP","G","NAME","PAR1")
2
^SCR("P1SETP","G","NM",1)
PAR
^SCR("P1SETP","G","NM",2)
PAR1
^SCR("P1SETP","G","NM",3)
MH
^SCR("P1SETP","G","RB")
6,13,23,76
^SCR("P1SETP","G","REF")
^TEMPS($P
^SCR("P1SETP","G","RZD")
\
^SCR("P1SETP","G","STEP")
1
^SCR("P1SETP","G","STG")
               : okxvl xign :           hixt xe`z         : hixt cew  :        
^SCR("P1SETP","G","VG")
8
^SCR("P1SETP","NAME")
dxiknl mihixt hq
^SCR("P1SETP","P",5,"CRD")
3,54,E,3,0
^SCR("P1SETP","P",5,"FNC")

^SCR("P1SETP","P",5,"GLOB")
P1SETP
^SCR("P1SETP","P",5,"HELP")
<F7> - mihq zbvd 
^SCR("P1SETP","P",5,"LMAX")
5
^SCR("P1SETP","P",5,"MUMPS1")

^SCR("P1SETP","P",5,"MUMPS2")

^SCR("P1SETP","P",5,"MUST")

^SCR("P1SETP","P",5,"NLN")
20
^SCR("P1SETP","P",5,"RZD")
\
^SCR("P1SETP","P",5,"TOPB")
8
^SCR("P1SETP","P",5,"TYP")
E
^SCR("P1SETP","P",5,"VRB")
NSET1
^SCR("P1SETP","P",10,"CRD")
3,53,H,25,0
^SCR("P1SETP","P",10,"HELP")

^SCR("P1SETP","P",10,"LMAX")
27
^SCR("P1SETP","P",10,"MUMPS1")

^SCR("P1SETP","P",10,"MUMPS2")

^SCR("P1SETP","P",10,"MUST")

^SCR("P1SETP","P",10,"TYP")
H
^SCR("P1SETP","P",15,"CHECK")
Y
^SCR("P1SETP","P",15,"CRD")
4,48,E,11,0
^SCR("P1SETP","P",15,"FNC")

^SCR("P1SETP","P",15,"GLOB")
LKH
^SCR("P1SETP","P",15,"HELP")

^SCR("P1SETP","P",15,"LMAX")
11
^SCR("P1SETP","P",15,"MUMPS1")

^SCR("P1SETP","P",15,"MUMPS2")

^SCR("P1SETP","P",15,"NLN")
20
^SCR("P1SETP","P",15,"RZD")
\
^SCR("P1SETP","P",15,"TOPB")
8
^SCR("P1SETP","P",15,"TYP")
E
^SCR("P1SETP","P",15,"VRB")
LKH1
^SCR("P1SETP","P",16,"CRD")
4,47,H,26,0
^SCR("P1SETP","P",16,"HELP")

^SCR("P1SETP","P",16,"LMAX")
26
^SCR("P1SETP","P",16,"MUMPS1")

^SCR("P1SETP","P",16,"MUMPS2")

^SCR("P1SETP","P",16,"OUTPUT")

^SCR("P1SETP","P",16,"TYP")
H
^SCR("P1SETP","P","NAME","LKH")
15
^SCR("P1SETP","P","NAME","LKH1")
16
^SCR("P1SETP","P","NAME","NSET")
5
^SCR("P1SETP","P","NAME","NSET1")
10
^SCR("P1SETP","P","NM",5)
NSET
^SCR("P1SETP","P","NM",10)
NSET1
^SCR("P1SETP","P","NM",15)
LKH
^SCR("P1SETP","P","NM",16)
LKH1
^SCR("P1SHB")
H
^SCR("P1SHB",1)
                                 # zeipeayg zxibq #                            
^SCR("P1SHB",2)
                              {                    04} {03    }:gewl xtqn      
^SCR("P1SHB",3)
     {15      }:zeipeayg lr mley k"dq  {10     } mekq  {05    }:dlaw xtqn      
^SCR("P1SHB",4)
     {20      }:dxzi                                  {17     }:    jix`z      
^SCR("P1SHB",5)
                                                                            1$ 
^SCR("P1SHB",6)
   :  dxzi : k"dq mley :dlawa mley : mcew mley :  mekq :  jix`z  : zipeayg :   
^SCR("P1SHB",7)
                                                                               
^SCR("P1SHB",8)
                                                                               
^SCR("P1SHB",9)
                                                                               
^SCR("P1SHB",10)
                                                                               
^SCR("P1SHB",11)
                                                                               
^SCR("P1SHB",12)
                                                                               
^SCR("P1SHB",13)
                                                                               
^SCR("P1SHB",14)
                                                                               
^SCR("P1SHB",15)
                                                                               
^SCR("P1SHB",16)
                                                                               
^SCR("P1SHB",17)
                                                                               
^SCR("P1SHB",18)
                                                                               
^SCR("P1SHB",19)
                                                                               
^SCR("P1SHB",20)
  $1                                                                           
^SCR("P1SHB",21)
  zfkexn i`ln zipeayg - 'M' , i`lndn dxiyi zipeayg - '<' , zipci zipeayg - '+' 
^SCR("P1SHB","A",1)
š…‰�…�™‡š˜‰‚‘
^SCR("P1SHB","A",2)
:‡…—Œ˜”‘Ž
^SCR("P1SHB","A",3)
:š…‰�…�™‡Œ’�Œ…™‹"„‘�…‹‘:„Œ�—˜”‘Ž
^SCR("P1SHB","A",4)
:„˜š‰:Š‰˜€š
^SCR("P1SHB","A",5)

^SCR("P1SHB","A",6)
„˜š‰‹"„‘�Œ…™„Œ�—��Œ…™�ƒ…—�Œ…™�…‹‘Š‰˜€šš‰�…�™‡
^SCR("P1SHB","A",7)
-----------------------------------------------------------------
^SCR("P1SHB","A",8)

^SCR("P1SHB","A",9)

^SCR("P1SHB","A",10)

^SCR("P1SHB","A",11)

^SCR("P1SHB","A",12)

^SCR("P1SHB","A",13)

^SCR("P1SHB","A",14)

^SCR("P1SHB","A",15)

^SCR("P1SHB","A",16)

^SCR("P1SHB","A",17)

^SCR("P1SHB","A",18)

^SCR("P1SHB","A",19)

^SCR("P1SHB","A",20)

^SCR("P1SHB","A",21)
š†‹…˜Ž‰€ŒŽš‰�…�™‡-'M',‰€ŒŽ„Ž„˜‰™‰š‰�…�™‡-'<',š‰�ƒ‰š‰�…�™‡-'+'
^SCR("P1SHB","AV",1)
,uhbucaj,rhdx
^SCR("P1SHB","AV",2)
:juekrpxn
^SCR("P1SHB","AV",3)
:,uhbucajkgokuaf"vxoufx:vkcerpxn
^SCR("P1SHB","AV",4)
:vr,h:lhrt,
^SCR("P1SHB","AV",5)

^SCR("P1SHB","AV",6)
vr,hf"vxokuavkcecokuaosueokuaoufxlhrt,,hbucaj
^SCR("P1SHB","AV",7)
-----------------------------------------------------------------
^SCR("P1SHB","AV",8)

^SCR("P1SHB","AV",9)

^SCR("P1SHB","AV",10)

^SCR("P1SHB","AV",11)

^SCR("P1SHB","AV",12)

^SCR("P1SHB","AV",13)

^SCR("P1SHB","AV",14)

^SCR("P1SHB","AV",15)

^SCR("P1SHB","AV",16)

^SCR("P1SHB","AV",17)

^SCR("P1SHB","AV",18)

^SCR("P1SHB","AV",19)

^SCR("P1SHB","AV",20)

^SCR("P1SHB","AV",21)
,zfurnhtkn,hbucaj-wMw'htknvnvrhah,hbucaj-w<w',hbsh,hbucaj-w+w
^SCR("P1SHB","G",1,"CRD")
7,75,E,7,0
^SCR("P1SHB","G",1,"HELP")

^SCR("P1SHB","G",1,"LMAX")
9
^SCR("P1SHB","G",1,"MUMPS1")

^SCR("P1SHB","G",1,"MUMPS2")

^SCR("P1SHB","G",1,"OUTPUT")

^SCR("P1SHB","G",1,"SHEM")
 zipeayg 
^SCR("P1SHB","G",1,"TYP")
E
^SCR("P1SHB","G",2,"CRD")
7,65,D,8,0
^SCR("P1SHB","G",2,"HELP")

^SCR("P1SHB","G",2,"LMAX")
9
^SCR("P1SHB","G",2,"MUMPS1")

^SCR("P1SHB","G",2,"MUMPS2")

^SCR("P1SHB","G",2,"OUTPUT")

^SCR("P1SHB","G",2,"SHEM")
  jix`z  
^SCR("P1SHB","G",2,"TYP")
D
^SCR("P1SHB","G",3,"CRD")
7,55,N,7,2
^SCR("P1SHB","G",3,"HELP")

^SCR("P1SHB","G",3,"LMAX")
7
^SCR("P1SHB","G",3,"MUMPS1")

^SCR("P1SHB","G",3,"MUMPS2")

^SCR("P1SHB","G",3,"OUTPUT")

^SCR("P1SHB","G",3,"SHEM")
  mekq 
^SCR("P1SHB","G",3,"TYP")
N
^SCR("P1SHB","G",4,"CRD")
7,47,N,8,2
^SCR("P1SHB","G",4,"HELP")

^SCR("P1SHB","G",4,"LMAX")
11
^SCR("P1SHB","G",4,"MUMPS1")

^SCR("P1SHB","G",4,"MUMPS2")

^SCR("P1SHB","G",4,"OUTPUT")

^SCR("P1SHB","G",4,"SHEM")
 mcew mley 
^SCR("P1SHB","G",4,"TYP")
N
^SCR("P1SHB","G",5,"CRD")
7,35,N,9,2
^SCR("P1SHB","G",5,"HELP")
<F10> - zipeayg bivdl , <F9> - lkd mlyl 
^SCR("P1SHB","G",5,"LMAX")
11
^SCR("P1SHB","G",5,"MUMPS1")

^SCR("P1SHB","G",5,"MUMPS2")
D TSH^P1SHB
^SCR("P1SHB","G",5,"SHEM")
dlawa mley 
^SCR("P1SHB","G",5,"TYP")
N
^SCR("P1SHB","G",6,"CRD")
7,23,N,9,2
^SCR("P1SHB","G",6,"HELP")

^SCR("P1SHB","G",6,"LMAX")
11
^SCR("P1SHB","G",6,"MUMPS1")

^SCR("P1SHB","G",6,"MUMPS2")

^SCR("P1SHB","G",6,"OUTPUT")

^SCR("P1SHB","G",6,"SHEM")
 k"dq mley 
^SCR("P1SHB","G",6,"TYP")
N
^SCR("P1SHB","G",7,"CRD")
7,11,N,7,2
^SCR("P1SHB","G",7,"HELP")

^SCR("P1SHB","G",7,"LMAX")
7
^SCR("P1SHB","G",7,"MUMPS1")

^SCR("P1SHB","G",7,"MUMPS2")

^SCR("P1SHB","G",7,"OUTPUT")

^SCR("P1SHB","G",7,"SHEM")
  dxzi 
^SCR("P1SHB","G",7,"TYP")
N
^SCR("P1SHB","G","DEL")

^SCR("P1SHB","G","MAX")
0
^SCR("P1SHB","G","NAME","DATHB")
2
^SCR("P1SHB","G","NAME","HB")
1
^SCR("P1SHB","G","NAME","ITR")
7
^SCR("P1SHB","G","NAME","SHUL")
6
^SCR("P1SHB","G","NAME","SHUL0")
4
^SCR("P1SHB","G","NAME","SUM")
3
^SCR("P1SHB","G","NAME","TSH")
5
^SCR("P1SHB","G","NM",1)
HB
^SCR("P1SHB","G","NM",2)
DATHB
^SCR("P1SHB","G","NM",3)
SUM
^SCR("P1SHB","G","NM",4)
SHUL0
^SCR("P1SHB","G","NM",5)
TSH
^SCR("P1SHB","G","NM",6)
SHUL
^SCR("P1SHB","G","NM",7)
ITR
^SCR("P1SHB","G","RB")
6,3,21,78
^SCR("P1SHB","G","REF")
^TEMPH($P
^SCR("P1SHB","G","RZD")
\
^SCR("P1SHB","G","STEP")
1
^SCR("P1SHB","G","STG")
   :  dxzi : k"dq mley :dlawa mley : mcew mley :  mekq :  jix`z  : zipeayg :   
^SCR("P1SHB","G","VG")
8
^SCR("P1SHB","NAME")
( i`xy` ) zeipeayg zxibq
^SCR("P1SHB","P",3,"CHECK")
Y
^SCR("P1SHB","P",3,"CRD")
2,55,E,7,0
^SCR("P1SHB","P",3,"FNC")

^SCR("P1SHB","P",3,"GLOB")
LKH
^SCR("P1SHB","P",3,"HELP")

^SCR("P1SHB","P",3,"LMAX")
7
^SCR("P1SHB","P",3,"MUMPS1")

^SCR("P1SHB","P",3,"MUMPS2")

^SCR("P1SHB","P",3,"NLN")
20
^SCR("P1SHB","P",3,"OUTPUT")

^SCR("P1SHB","P",3,"RZD")
\
^SCR("P1SHB","P",3,"TOPB")
8
^SCR("P1SHB","P",3,"TYP")
E
^SCR("P1SHB","P",3,"VRB")
LKH1
^SCR("P1SHB","P",4,"CRD")
2,54,H,23
^SCR("P1SHB","P",4,"HELP")

^SCR("P1SHB","P",4,"LMAX")
23
^SCR("P1SHB","P",4,"MUMPS1")

^SCR("P1SHB","P",4,"MUMPS2")

^SCR("P1SHB","P",4,"OUTPUT")

^SCR("P1SHB","P",4,"TYP")
H
^SCR("P1SHB","P",5,"CRD")
3,55,E,7,0
^SCR("P1SHB","P",5,"HELP")

^SCR("P1SHB","P",5,"LMAX")
7
^SCR("P1SHB","P",5,"MUMPS1")

^SCR("P1SHB","P",5,"MUMPS2")

^SCR("P1SHB","P",5,"OUTPUT")

^SCR("P1SHB","P",5,"TYP")
E
^SCR("P1SHB","P",10,"CRD")
3,39,N,8,2
^SCR("P1SHB","P",10,"HELP")

^SCR("P1SHB","P",10,"LMAX")
8
^SCR("P1SHB","P",10,"MUMPS1")

^SCR("P1SHB","P",10,"MUMPS2")

^SCR("P1SHB","P",10,"OUTPUT")

^SCR("P1SHB","P",10,"TYP")
N
^SCR("P1SHB","P",15,"CRD")
3,5,N,8,2
^SCR("P1SHB","P",15,"HELP")

^SCR("P1SHB","P",15,"LMAX")
9
^SCR("P1SHB","P",15,"MUMPS1")

^SCR("P1SHB","P",15,"MUMPS2")

^SCR("P1SHB","P",15,"OUTPUT")

^SCR("P1SHB","P",15,"TYP")
N
^SCR("P1SHB","P",17,"CRD")
4,54,D,8,0
^SCR("P1SHB","P",17,"HELP")

^SCR("P1SHB","P",17,"LMAX")
8
^SCR("P1SHB","P",17,"MUMPS1")

^SCR("P1SHB","P",17,"MUMPS2")

^SCR("P1SHB","P",17,"OUTPUT")

^SCR("P1SHB","P",17,"TYP")
D
^SCR("P1SHB","P",20,"CRD")
4,5,N,8,2
^SCR("P1SHB","P",20,"HELP")

^SCR("P1SHB","P",20,"LMAX")
9
^SCR("P1SHB","P",20,"MUMPS1")

^SCR("P1SHB","P",20,"MUMPS2")

^SCR("P1SHB","P",20,"OUTPUT")

^SCR("P1SHB","P",20,"TYP")
N
^SCR("P1SHB","P","NAME","DAT21")
17
^SCR("P1SHB","P","NAME","ITRA")
20
^SCR("P1SHB","P","NAME","LKH")
3
^SCR("P1SHB","P","NAME","LKH1")
4
^SCR("P1SHB","P","NAME","NUMBER")
5
^SCR("P1SHB","P","NAME","SHUM")
10
^SCR("P1SHB","P","NAME","SHUMS")
15
^SCR("P1SHB","P","NM",3)
LKH
^SCR("P1SHB","P","NM",4)
LKH1
^SCR("P1SHB","P","NM",5)
NUMBER
^SCR("P1SHB","P","NM",10)
SHUM
^SCR("P1SHB","P","NM",15)
SHUMS
^SCR("P1SHB","P","NM",17)
DAT21
^SCR("P1SHB","P","NM",20)
ITRA
^SCR("P1SHLKP")
H
^SCR("P1SHLKP",1)
                      # dtewa migilydn mitqk zlaw #                            
^SCR("P1SHLKP",2)
                                                         {10     } : jix`z     
^SCR("P1SHLKP",3)
                                                                        1$     
^SCR("P1SHLKP",4)
          :  yxtd  :dtewa cwted: onefn  :      gily my       :gily 'qn:        
^SCR("P1SHLKP",5)
                                                                               
^SCR("P1SHLKP",6)
                                                                               
^SCR("P1SHLKP",7)
                                                                               
^SCR("P1SHLKP",8)
                                                                               
^SCR("P1SHLKP",9)
                                                                               
^SCR("P1SHLKP",10)
                                                                               
^SCR("P1SHLKP",11)
                                                                               
^SCR("P1SHLKP",12)
                                                                               
^SCR("P1SHLKP",13)
                                                                               
^SCR("P1SHLKP",14)
                                                                               
^SCR("P1SHLKP",15)
                                                                               
^SCR("P1SHLKP",16)
                                                                               
^SCR("P1SHLKP",17)
                                                                               
^SCR("P1SHLKP",18)
                                                                               
^SCR("P1SHLKP",19)
                                                                               
^SCR("P1SHLKP",20)
      $1                                                                       
^SCR("P1SHLKP",21)
         {35     }    {30     } {25     }: k"dq                                
^SCR("P1SHLKP","A",1)
„”…—��‰‡‰Œ™„Ž�‰”‘‹šŒ�—
^SCR("P1SHLKP","A",2)
:Š‰˜€š
^SCR("P1SHLKP","A",3)

^SCR("P1SHLKP","A",4)
™˜”„„”…—�ƒ—”…„�Ž…†Ž‡‰Œ™�™‡‰Œ™'‘Ž
^SCR("P1SHLKP","A",5)
-------------------------------------------------------
^SCR("P1SHLKP","A",6)

^SCR("P1SHLKP","A",7)

^SCR("P1SHLKP","A",8)

^SCR("P1SHLKP","A",9)

^SCR("P1SHLKP","A",10)

^SCR("P1SHLKP","A",11)

^SCR("P1SHLKP","A",12)

^SCR("P1SHLKP","A",13)

^SCR("P1SHLKP","A",14)

^SCR("P1SHLKP","A",15)

^SCR("P1SHLKP","A",16)

^SCR("P1SHLKP","A",17)

^SCR("P1SHLKP","A",18)

^SCR("P1SHLKP","A",19)

^SCR("P1SHLKP","A",20)

^SCR("P1SHLKP","A",21)
:‹"„‘
^SCR("P1SHLKP","AV",1)
vpuecohjhkavnohpxf,kce
^SCR("P1SHLKP","AV",2)
:lhrt,
^SCR("P1SHLKP","AV",3)

^SCR("P1SHLKP","AV",4)
arpvvpuecsepuvinuznjhkaoajhkawxn
^SCR("P1SHLKP","AV",5)
-------------------------------------------------------
^SCR("P1SHLKP","AV",6)

^SCR("P1SHLKP","AV",7)

^SCR("P1SHLKP","AV",8)

^SCR("P1SHLKP","AV",9)

^SCR("P1SHLKP","AV",10)

^SCR("P1SHLKP","AV",11)

^SCR("P1SHLKP","AV",12)

^SCR("P1SHLKP","AV",13)

^SCR("P1SHLKP","AV",14)

^SCR("P1SHLKP","AV",15)

^SCR("P1SHLKP","AV",16)

^SCR("P1SHLKP","AV",17)

^SCR("P1SHLKP","AV",18)

^SCR("P1SHLKP","AV",19)

^SCR("P1SHLKP","AV",20)

^SCR("P1SHLKP","AV",21)
:f"vx
^SCR("P1SHLKP","G",1,"CRD")
5,70,E,4,0
^SCR("P1SHLKP","G",1,"HELP")

^SCR("P1SHLKP","G",1,"LMAX")
8
^SCR("P1SHLKP","G",1,"MUMPS1")

^SCR("P1SHLKP","G",1,"MUMPS2")

^SCR("P1SHLKP","G",1,"OUTPUT")

^SCR("P1SHLKP","G",1,"SHEM")
gily 'qn
^SCR("P1SHLKP","G",1,"TYP")
E
^SCR("P1SHLKP","G",2,"CRD")
5,61,H,18,0
^SCR("P1SHLKP","G",2,"HELP")

^SCR("P1SHLKP","G",2,"LMAX")
20
^SCR("P1SHLKP","G",2,"MUMPS1")

^SCR("P1SHLKP","G",2,"MUMPS2")

^SCR("P1SHLKP","G",2,"OUTPUT")

^SCR("P1SHLKP","G",2,"SHEM")
      gily my       
^SCR("P1SHLKP","G",2,"TYP")
H
^SCR("P1SHLKP","G",3,"CRD")
5,40,N,8,2
^SCR("P1SHLKP","G",3,"HELP")

^SCR("P1SHLKP","G",3,"LMAX")
8
^SCR("P1SHLKP","G",3,"MUMPS1")

^SCR("P1SHLKP","G",3,"MUMPS2")

^SCR("P1SHLKP","G",3,"OUTPUT")

^SCR("P1SHLKP","G",3,"SHEM")
 onefn  
^SCR("P1SHLKP","G",3,"TYP")
N
^SCR("P1SHLKP","G",4,"CRD")
5,31,N,8,2
^SCR("P1SHLKP","G",4,"HELP")
<F9> - onefna mekqd lk ciwtdl 
^SCR("P1SHLKP","G",4,"LMAX")
11
^SCR("P1SHLKP","G",4,"MUMPS1")

^SCR("P1SHLKP","G",4,"MUMPS2")
D HFK^P1SHLKP     
^SCR("P1SHLKP","G",4,"SHEM")
dtewa cwted
^SCR("P1SHLKP","G",4,"TYP")
N
^SCR("P1SHLKP","G",5,"CRD")
5,19,N,8,2
^SCR("P1SHLKP","G",5,"HELP")

^SCR("P1SHLKP","G",5,"LMAX")
8
^SCR("P1SHLKP","G",5,"MUMPS1")

^SCR("P1SHLKP","G",5,"MUMPS2")

^SCR("P1SHLKP","G",5,"OUTPUT")

^SCR("P1SHLKP","G",5,"SHEM")
  yxtd  
^SCR("P1SHLKP","G",5,"TYP")
N
^SCR("P1SHLKP","G","DEL")

^SCR("P1SHLKP","G","MAX")
1
^SCR("P1SHLKP","G","NAME","HFK")
4
^SCR("P1SHLKP","G","NAME","HFR")
5
^SCR("P1SHLKP","G","NAME","MZM")
3
^SCR("P1SHLKP","G","NAME","SHL")
1
^SCR("P1SHLKP","G","NAME","SHL1")
2
^SCR("P1SHLKP","G","NM",1)
SHL
^SCR("P1SHLKP","G","NM",2)
SHL1
^SCR("P1SHLKP","G","NM",3)
MZM
^SCR("P1SHLKP","G","NM",4)
HFK
^SCR("P1SHLKP","G","NM",5)
HFR
^SCR("P1SHLKP","G","RB")
4,7,21,74
^SCR("P1SHLKP","G","REF")
^TEMP($P,"K"
^SCR("P1SHLKP","G","RZD")
\
^SCR("P1SHLKP","G","STEP")
1
^SCR("P1SHLKP","G","STG")
          :  yxtd  :dtewa cwted: onefn  :      gily my       :gily 'qn:        
^SCR("P1SHLKP","G","VG")
6
^SCR("P1SHLKP","NAME")

^SCR("P1SHLKP","P",10,"CRD")
2,57,D,8,0
^SCR("P1SHLKP","P",10,"HELP")

^SCR("P1SHLKP","P",10,"LMAX")
8
^SCR("P1SHLKP","P",10,"MUMPS1")
S:'$G(TRH) TRH=$$^%L1DC(P1DZ,1)
^SCR("P1SHLKP","P",10,"MUMPS2")
D TRH^P1SHLKP
^SCR("P1SHLKP","P",10,"TYP")
D
^SCR("P1SHLKP","P",25,"CRD")
21,32,N,8,2
^SCR("P1SHLKP","P",25,"HELP")

^SCR("P1SHLKP","P",25,"LMAX")
8
^SCR("P1SHLKP","P",25,"MUMPS1")

^SCR("P1SHLKP","P",25,"MUMPS2")

^SCR("P1SHLKP","P",25,"OUTPUT")

^SCR("P1SHLKP","P",25,"TYP")
N
^SCR("P1SHLKP","P",30,"CRD")
21,22,N,8,2
^SCR("P1SHLKP","P",30,"HELP")

^SCR("P1SHLKP","P",30,"LMAX")
8
^SCR("P1SHLKP","P",30,"MUMPS1")

^SCR("P1SHLKP","P",30,"MUMPS2")

^SCR("P1SHLKP","P",30,"OUTPUT")

^SCR("P1SHLKP","P",30,"TYP")
N
^SCR("P1SHLKP","P",35,"CRD")
21,9,N,8,2
^SCR("P1SHLKP","P",35,"HELP")

^SCR("P1SHLKP","P",35,"LMAX")
8
^SCR("P1SHLKP","P",35,"MUMPS1")

^SCR("P1SHLKP","P",35,"MUMPS2")

^SCR("P1SHLKP","P",35,"OUTPUT")

^SCR("P1SHLKP","P",35,"TYP")
N
^SCR("P1SHLKP","P","NAME","SHFK")
30
^SCR("P1SHLKP","P","NAME","SHFR")
35
^SCR("P1SHLKP","P","NAME","SMZM")
25
^SCR("P1SHLKP","P","NAME","TRH")
10
^SCR("P1SHLKP","P","NM",10)
TRH
^SCR("P1SHLKP","P","NM",25)
SMZM
^SCR("P1SHLKP","P","NM",30)
SHFK
^SCR("P1SHLKP","P","NM",35)
SHFR
^SCR("P1SHNH")
H
^SCR("P1SHNH",1)
                             # zegpd zeaiq zlah #                              
^SCR("P1SHNH",2)
                                                                               
^SCR("P1SHNH",3)
                                                           1$                  
^SCR("P1SHNH",4)
                          :  dgpd zaiq xe`z  : daiq cew :                      
^SCR("P1SHNH",5)
                                                                               
^SCR("P1SHNH",6)
                                                                               
^SCR("P1SHNH",7)
                                                                               
^SCR("P1SHNH",8)
                                                                               
^SCR("P1SHNH",9)
                                                                               
^SCR("P1SHNH",10)
                                                                               
^SCR("P1SHNH",11)
                                                                               
^SCR("P1SHNH",12)
                                                                               
^SCR("P1SHNH",13)
                                                                               
^SCR("P1SHNH",14)
                                                                               
^SCR("P1SHNH",15)
                                                                               
^SCR("P1SHNH",16)
                                                                               
^SCR("P1SHNH",17)
                                                                               
^SCR("P1SHNH",18)
                                                                               
^SCR("P1SHNH",19)
                                                                               
^SCR("P1SHNH",20)
                                                                               
^SCR("P1SHNH",21)
                                                                               
^SCR("P1SHNH",22)
                     $1                                                        
^SCR("P1SHNH","A",1)
š…‡�„š…�‰‘šŒ�ˆ
^SCR("P1SHNH","A",2)

^SCR("P1SHNH","A",3)

^SCR("P1SHNH","A",4)
„‡�„š�‰‘˜…€š„�‰‘ƒ…—
^SCR("P1SHNH","A",5)
----------------------------
^SCR("P1SHNH","A",6)

^SCR("P1SHNH","A",7)

^SCR("P1SHNH","A",8)

^SCR("P1SHNH","A",9)

^SCR("P1SHNH","A",10)

^SCR("P1SHNH","A",11)

^SCR("P1SHNH","A",12)

^SCR("P1SHNH","A",13)

^SCR("P1SHNH","A",14)

^SCR("P1SHNH","A",15)

^SCR("P1SHNH","A",16)

^SCR("P1SHNH","A",17)

^SCR("P1SHNH","A",18)

^SCR("P1SHNH","A",19)

^SCR("P1SHNH","A",20)

^SCR("P1SHNH","A",21)

^SCR("P1SHNH","A",22)

^SCR("P1SHNH","AV",1)
,ujbv,uchx,kcy
^SCR("P1SHNH","AV",2)

^SCR("P1SHNH","AV",3)

^SCR("P1SHNH","AV",4)
vjbv,chxrut,vchxsue
^SCR("P1SHNH","AV",5)
----------------------------
^SCR("P1SHNH","AV",6)

^SCR("P1SHNH","AV",7)

^SCR("P1SHNH","AV",8)

^SCR("P1SHNH","AV",9)

^SCR("P1SHNH","AV",10)

^SCR("P1SHNH","AV",11)

^SCR("P1SHNH","AV",12)

^SCR("P1SHNH","AV",13)

^SCR("P1SHNH","AV",14)

^SCR("P1SHNH","AV",15)

^SCR("P1SHNH","AV",16)

^SCR("P1SHNH","AV",17)

^SCR("P1SHNH","AV",18)

^SCR("P1SHNH","AV",19)

^SCR("P1SHNH","AV",20)

^SCR("P1SHNH","AV",21)

^SCR("P1SHNH","AV",22)

^SCR("P1SHNH","G",1,"CRD")
5,56,E,3,0
^SCR("P1SHNH","G",1,"HELP")

^SCR("P1SHNH","G",1,"LMAX")
10
^SCR("P1SHNH","G",1,"MUMPS1")

^SCR("P1SHNH","G",1,"MUMPS2")
D BDIKA^P1SBIT
^SCR("P1SHNH","G",1,"MUST")

^SCR("P1SHNH","G",1,"SHEM")
 daiq cew 
^SCR("P1SHNH","G",1,"TYP")
E
^SCR("P1SHNH","G",2,"CRD")
5,45,H,18,0
^SCR("P1SHNH","G",2,"HELP")

^SCR("P1SHNH","G",2,"LMAX")
18
^SCR("P1SHNH","G",2,"MUMPS1")

^SCR("P1SHNH","G",2,"MUMPS2")

^SCR("P1SHNH","G",2,"MUST")

^SCR("P1SHNH","G",2,"SHEM")
  dgpd zaiq xe`z  
^SCR("P1SHNH","G",2,"TYP")
H
^SCR("P1SHNH","G","DEL")
Y
^SCR("P1SHNH","G","MAX")
999
^SCR("P1SHNH","G","NAME","MIS")
1
^SCR("P1SHNH","G","NAME","SBIT")
2
^SCR("P1SHNH","G","NM",1)
MIS
^SCR("P1SHNH","G","NM",2)
SBIT
^SCR("P1SHNH","G","RB")
4,22,23,61
^SCR("P1SHNH","G","REF")
^TEMP($P,"BIT"
^SCR("P1SHNH","G","RZD")
\
^SCR("P1SHNH","G","STEP")
1
^SCR("P1SHNH","G","STG")
                          :  dgpd zaiq xe`z  : daiq cew :                      
^SCR("P1SHNH","G","VG")
6
^SCR("P1SHNH","NAME")

^SCR("P1SISDEF")
H
^SCR("P1SISDEF",1)
                                      # ze`nqiq zxcbd #                        
^SCR("P1SISDEF",2)
                                                              1]               
^SCR("P1SISDEF",3)
                                                                               
^SCR("P1SISDEF",4)
                                {05        }:        1 `nqiq                   
^SCR("P1SISDEF",5)
                                                                               
^SCR("P1SISDEF",6)
                                {10        }:        2 `nqiq                   
^SCR("P1SISDEF",7)
                                                                               
^SCR("P1SISDEF",8)
                                {12        }:        3 `nqiq                   
^SCR("P1SISDEF",9)
                                                                               
^SCR("P1SISDEF",10)
                                {15        }: milehial `nqiq                   
^SCR("P1SISDEF",11)
                                                                               
^SCR("P1SISDEF",12)
                                {20        }:   zegpdl `nqiq                   
^SCR("P1SISDEF",13)
                                                                               
^SCR("P1SISDEF",14)
                                                dclwdl `nqiq                   
^SCR("P1SISDEF",15)
                                {25        }:      `"k zipci                   
^SCR("P1SISDEF",16)
                                                                               
^SCR("P1SISDEF",17)
                                {30        }:   zxardl `nqiq                   
^SCR("P1SISDEF",18)
                                                      mihixt                   
^SCR("P1SISDEF",19)
                                                                               
^SCR("P1SISDEF",20)
                                {35        }:   zgiztl `nqiq                   
^SCR("P1SISDEF",21)
                                                       dxibn                   
^SCR("P1SISDEF",22)
                           [1                                                  
^SCR("P1SISDEF",23)
                                                                               
^SCR("P1SISDEF","A",1)
š…€Ž‘‰‘š˜ƒ‚„
^SCR("P1SISDEF","A",2)

^SCR("P1SISDEF","A",3)

^SCR("P1SISDEF","A",4)
:1€Ž‘‰‘
^SCR("P1SISDEF","A",5)

^SCR("P1SISDEF","A",6)
:2€Ž‘‰‘
^SCR("P1SISDEF","A",7)

^SCR("P1SISDEF","A",8)
:3€Ž‘‰‘
^SCR("P1SISDEF","A",9)

^SCR("P1SISDEF","A",10)
:�‰Œ…ˆ‰�Œ€Ž‘‰‘
^SCR("P1SISDEF","A",11)

^SCR("P1SISDEF","A",12)
:š…‡�„Œ€Ž‘‰‘
^SCR("P1SISDEF","A",13)

^SCR("P1SISDEF","A",14)
„ƒŒ—„Œ€Ž‘‰‘
^SCR("P1SISDEF","A",15)
:€"‹š‰�ƒ‰
^SCR("P1SISDEF","A",16)

^SCR("P1SISDEF","A",17)
:š˜�’„Œ€Ž‘‰‘
^SCR("P1SISDEF","A",18)
�‰ˆ‰˜”
^SCR("P1SISDEF","A",19)

^SCR("P1SISDEF","A",20)
:š‡‰š”Œ€Ž‘‰‘
^SCR("P1SISDEF","A",21)
„˜‰‚Ž
^SCR("P1SISDEF","A",22)

^SCR("P1SISDEF","A",23)

^SCR("P1SISDEF","AV",1)
,utnxhx,rsdv
^SCR("P1SISDEF","AV",2)

^SCR("P1SISDEF","AV",3)

^SCR("P1SISDEF","AV",4)
:1tnxhx
^SCR("P1SISDEF","AV",5)

^SCR("P1SISDEF","AV",6)
:2tnxhx
^SCR("P1SISDEF","AV",7)

^SCR("P1SISDEF","AV",8)
:3tnxhx
^SCR("P1SISDEF","AV",9)

^SCR("P1SISDEF","AV",10)
:ohkuyhcktnxhx
^SCR("P1SISDEF","AV",11)

^SCR("P1SISDEF","AV",12)
:,ujbvktnxhx
^SCR("P1SISDEF","AV",13)

^SCR("P1SISDEF","AV",14)
vskevktnxhx
^SCR("P1SISDEF","AV",15)
:t"f,hbsh
^SCR("P1SISDEF","AV",16)

^SCR("P1SISDEF","AV",17)
:,rcgvktnxhx
^SCR("P1SISDEF","AV",18)
ohyhrp
^SCR("P1SISDEF","AV",19)

^SCR("P1SISDEF","AV",20)
:,jh,pktnxhx
^SCR("P1SISDEF","AV",21)
vrhdn
^SCR("P1SISDEF","AV",22)

^SCR("P1SISDEF","AV",23)

^SCR("P1SISDEF","NAME")
ze`nqq zxcbd
^SCR("P1SISDEF","P",5,"CRD")
4,32,E,10,0
^SCR("P1SISDEF","P",5,"HELP")

^SCR("P1SISDEF","P",5,"LMAX")
11
^SCR("P1SISDEF","P",5,"MUMPS1")
S:'$D(^P1PRM("PSW")) PSW=999
^SCR("P1SISDEF","P",5,"MUMPS2")

^SCR("P1SISDEF","P",5,"TYP")
E
^SCR("P1SISDEF","P",10,"CRD")
6,32,E,10,0
^SCR("P1SISDEF","P",10,"HELP")

^SCR("P1SISDEF","P",10,"LMAX")
11
^SCR("P1SISDEF","P",10,"MUMPS1")
S:'$D(^P1PRM("PSW2")) PSW2=PSW+10
^SCR("P1SISDEF","P",10,"MUMPS2")

^SCR("P1SISDEF","P",10,"TYP")
E
^SCR("P1SISDEF","P",12,"CRD")
8,32,E,10,0
^SCR("P1SISDEF","P",12,"HELP")

^SCR("P1SISDEF","P",12,"LMAX")
11
^SCR("P1SISDEF","P",12,"MUMPS1")
S:'$D(^P1PRM("PSW3")) PSW3=PSW+100
^SCR("P1SISDEF","P",12,"MUMPS2")

^SCR("P1SISDEF","P",12,"TYP")
E
^SCR("P1SISDEF","P",15,"CRD")
10,32,E,10,0
^SCR("P1SISDEF","P",15,"HELP")

^SCR("P1SISDEF","P",15,"LMAX")
11
^SCR("P1SISDEF","P",15,"MUMPS1")
S:'$D(^P1PRM("PSWBIT")) PSWBIT=PSW
^SCR("P1SISDEF","P",15,"MUMPS2")

^SCR("P1SISDEF","P",15,"TYP")
E
^SCR("P1SISDEF","P",20,"CRD")
12,32,E,10,0
^SCR("P1SISDEF","P",20,"HELP")

^SCR("P1SISDEF","P",20,"LMAX")
11
^SCR("P1SISDEF","P",20,"MUMPS1")
S:'$D(^P1PRM("PSWHNH")) PSWHNH=PSW2
^SCR("P1SISDEF","P",20,"MUMPS2")

^SCR("P1SISDEF","P",20,"TYP")
E
^SCR("P1SISDEF","P",25,"CRD")
15,32,E,11,0
^SCR("P1SISDEF","P",25,"HELP")

^SCR("P1SISDEF","P",25,"LMAX")
11
^SCR("P1SISDEF","P",25,"MUMPS1")

^SCR("P1SISDEF","P",25,"MUMPS2")

^SCR("P1SISDEF","P",25,"TYP")
E
^SCR("P1SISDEF","P",30,"CRD")
17,32,E,10,0
^SCR("P1SISDEF","P",30,"HELP")

^SCR("P1SISDEF","P",30,"LMAX")
11
^SCR("P1SISDEF","P",30,"MUMPS1")

^SCR("P1SISDEF","P",30,"MUMPS2")

^SCR("P1SISDEF","P",30,"TYP")
E
^SCR("P1SISDEF","P",35,"CRD")
20,32,E,10,0
^SCR("P1SISDEF","P",35,"HELP")

^SCR("P1SISDEF","P",35,"LMAX")
11
^SCR("P1SISDEF","P",35,"MUMPS1")

^SCR("P1SISDEF","P",35,"MUMPS2")

^SCR("P1SISDEF","P",35,"TYP")
E
^SCR("P1SISDEF","P","NAME","PSW")
5
^SCR("P1SISDEF","P","NAME","PSW2")
10
^SCR("P1SISDEF","P","NAME","PSW3")
12
^SCR("P1SISDEF","P","NAME","PSWBIT")
15
^SCR("P1SISDEF","P","NAME","PSWCA")
25
^SCR("P1SISDEF","P","NAME","PSWHNH")
20
^SCR("P1SISDEF","P","NAME","PSWHV")
30
^SCR("P1SISDEF","P","NAME","PSWPM")
35
^SCR("P1SISDEF","P","NM",5)
PSW
^SCR("P1SISDEF","P","NM",10)
PSW2
^SCR("P1SISDEF","P","NM",12)
PSW3
^SCR("P1SISDEF","P","NM",15)
PSWBIT
^SCR("P1SISDEF","P","NM",20)
PSWHNH
^SCR("P1SISDEF","P","NM",25)
PSWCA
^SCR("P1SISDEF","P","NM",30)
PSWHV
^SCR("P1SISDEF","P","NM",35)
PSWPM
^SCR("P1SISDEF","P","RB",1)
3,28,23,64
^SCR("P1SL")
H
^SCR("P1SL",1)
                                    # migily zlah #                            
^SCR("P1SL",2)
                                                                               
^SCR("P1SL",3)
                                                                1$             
^SCR("P1SL",4)
                           :       gily  my      : gily 'qn :                  
^SCR("P1SL",5)
                                                                               
^SCR("P1SL",6)
                                                                               
^SCR("P1SL",7)
                                                                               
^SCR("P1SL",8)
                                                                               
^SCR("P1SL",9)
                                                                               
^SCR("P1SL",10)
                                                                               
^SCR("P1SL",11)
                                                                               
^SCR("P1SL",12)
                                                                               
^SCR("P1SL",13)
                                                                               
^SCR("P1SL",14)
                                                                               
^SCR("P1SL",15)
                                                                               
^SCR("P1SL",16)
                                                                               
^SCR("P1SL",17)
                                                                               
^SCR("P1SL",18)
                                                                               
^SCR("P1SL",19)
                                                                               
^SCR("P1SL",20)
                      $1                                                       
^SCR("P1SL","A",1)
�‰‡‰Œ™šŒ�ˆ
^SCR("P1SL","A",2)

^SCR("P1SL","A",3)

^SCR("P1SL","A",4)
‡‰Œ™�™‡‰Œ™'‘Ž
^SCR("P1SL","A",5)
-------------------------------
^SCR("P1SL","A",6)

^SCR("P1SL","A",7)

^SCR("P1SL","A",8)

^SCR("P1SL","A",9)

^SCR("P1SL","A",10)

^SCR("P1SL","A",11)

^SCR("P1SL","A",12)

^SCR("P1SL","A",13)

^SCR("P1SL","A",14)

^SCR("P1SL","A",15)

^SCR("P1SL","A",16)

^SCR("P1SL","A",17)

^SCR("P1SL","A",18)

^SCR("P1SL","A",19)

^SCR("P1SL","A",20)

^SCR("P1SL","AV",1)
ohjhka,kcy
^SCR("P1SL","AV",2)

^SCR("P1SL","AV",3)

^SCR("P1SL","AV",4)
jhkaoajhkawxn
^SCR("P1SL","AV",5)
-------------------------------
^SCR("P1SL","AV",6)

^SCR("P1SL","AV",7)

^SCR("P1SL","AV",8)

^SCR("P1SL","AV",9)

^SCR("P1SL","AV",10)

^SCR("P1SL","AV",11)

^SCR("P1SL","AV",12)

^SCR("P1SL","AV",13)

^SCR("P1SL","AV",14)

^SCR("P1SL","AV",15)

^SCR("P1SL","AV",16)

^SCR("P1SL","AV",17)

^SCR("P1SL","AV",18)

^SCR("P1SL","AV",19)

^SCR("P1SL","AV",20)

^SCR("P1SL","G",1,"CRD")
5,60,N,4,0
^SCR("P1SL","G",1,"HELP")

^SCR("P1SL","G",1,"LMAX")
10
^SCR("P1SL","G",1,"MUMPS1")

^SCR("P1SL","G",1,"MUMPS2")
S SL=+SL D BDIKA^P1SPTB
^SCR("P1SL","G",1,"MUST")

^SCR("P1SL","G",1,"SHEM")
 gily 'qn 
^SCR("P1SL","G",1,"TYP")
N
^SCR("P1SL","G",2,"CRD")
5,49,H,21,0
^SCR("P1SL","G",2,"HELP")

^SCR("P1SL","G",2,"LMAX")
21
^SCR("P1SL","G",2,"MUMPS1")

^SCR("P1SL","G",2,"MUMPS2")
D BDIKA1^P1SPTB
^SCR("P1SL","G",2,"SHEM")
       gily  my      
^SCR("P1SL","G",2,"TYP")
H
^SCR("P1SL","G","DEL")
Y
^SCR("P1SL","G","MAX")
9999
^SCR("P1SL","G","NAME","SL")
1
^SCR("P1SL","G","NAME","SL1")
2
^SCR("P1SL","G","NM",1)
SL
^SCR("P1SL","G","NM",2)
SL1
^SCR("P1SL","G","RB")
4,23,21,66
^SCR("P1SL","G","REF")
^TEMP($P,"SP"
^SCR("P1SL","G","RZD")
\
^SCR("P1SL","G","STEP")
1
^SCR("P1SL","G","STG")
                           :       gily  my      : gily 'qn :                  
^SCR("P1SL","G","VG")
6
^SCR("P1SL","NAME")
migily zlah
^SCR("P1SLSP1")
H
^SCR("P1SLSP1","NAME")
migily g"ec
^SCR("P1SMS")
H
^SCR("P1SMS",1)
                              # zepnfd zxibq #                                 
^SCR("P1SMS",2)
                                                                               
^SCR("P1SMS",3)
         {                        15}:xvln my {10   :xvln 'qn {05      } jix`z 
^SCR("P1SMS",4)
                                                                             1$
^SCR("P1SMS",5)
                 :ogley 'qn: melyz:z beq: dxzi : dtwd : mley :melyzl: dpnfd :  
^SCR("P1SMS",6)
                                                                               
^SCR("P1SMS",7)
                                                                               
^SCR("P1SMS",8)
                                                                               
^SCR("P1SMS",9)
                                                                               
^SCR("P1SMS",10)
                                                                               
^SCR("P1SMS",11)
                                                                               
^SCR("P1SMS",12)
                                                                               
^SCR("P1SMS",13)
                                                                               
^SCR("P1SMS",14)
                                                                               
^SCR("P1SMS",15)
                                                                               
^SCR("P1SMS",16)
                                                                               
^SCR("P1SMS",17)
                                                                               
^SCR("P1SMS",18)
                                                                               
^SCR("P1SMS",19)
                                                                               
^SCR("P1SMS",20)
            $1                                                                 
^SCR("P1SMS",21)
                                                                               
^SCR("P1SMS",22)
            {25      }:minelyz k"dq  {20      }:dxzi k"dq                      
^SCR("P1SMS","A",1)
š…�Ž†„š˜‰‚‘
^SCR("P1SMS","A",2)

^SCR("P1SMS","A",3)
:˜–ŒŽ�™:˜–ŒŽ'‘ŽŠ‰˜€š
^SCR("P1SMS","A",4)

^SCR("P1SMS","A",5)
�‡Œ…™'‘Ž�…Œ™šš‚…‘„˜š‰„”—„�Œ…™�…Œ™šŒ„�Ž†„
^SCR("P1SMS","A",6)
-----------------------------------------------------
^SCR("P1SMS","A",7)

^SCR("P1SMS","A",8)

^SCR("P1SMS","A",9)

^SCR("P1SMS","A",10)

^SCR("P1SMS","A",11)

^SCR("P1SMS","A",12)

^SCR("P1SMS","A",13)

^SCR("P1SMS","A",14)

^SCR("P1SMS","A",15)

^SCR("P1SMS","A",16)

^SCR("P1SMS","A",17)

^SCR("P1SMS","A",18)

^SCR("P1SMS","A",19)

^SCR("P1SMS","A",20)

^SCR("P1SMS","A",21)

^SCR("P1SMS","A",22)
:�‰Ž…Œ™š‹"„‘:„˜š‰‹"„‘
^SCR("P1SMS","AV",1)
,ubnzv,rhdx
^SCR("P1SMS","AV",2)

^SCR("P1SMS","AV",3)
:rmknoa:rmknwxnlhrt,
^SCR("P1SMS","AV",4)

^SCR("P1SMS","AV",5)
ijkuawxnouka,,duxvr,hvpevokuaouka,kvbnzv
^SCR("P1SMS","AV",6)
-----------------------------------------------------
^SCR("P1SMS","AV",7)

^SCR("P1SMS","AV",8)

^SCR("P1SMS","AV",9)

^SCR("P1SMS","AV",10)

^SCR("P1SMS","AV",11)

^SCR("P1SMS","AV",12)

^SCR("P1SMS","AV",13)

^SCR("P1SMS","AV",14)

^SCR("P1SMS","AV",15)

^SCR("P1SMS","AV",16)

^SCR("P1SMS","AV",17)

^SCR("P1SMS","AV",18)

^SCR("P1SMS","AV",19)

^SCR("P1SMS","AV",20)

^SCR("P1SMS","AV",21)

^SCR("P1SMS","AV",22)
:ohnuka,f"vx:vr,hf"vx
^SCR("P1SMS","G",1,"CRD")
6,76,E,7,0
^SCR("P1SMS","G",1,"HELP")

^SCR("P1SMS","G",1,"LMAX")
7
^SCR("P1SMS","G",1,"MUMPS1")

^SCR("P1SMS","G",1,"MUMPS2")

^SCR("P1SMS","G",1,"OUTPUT")

^SCR("P1SMS","G",1,"SHEM")
 dpnfd 
^SCR("P1SMS","G",1,"TYP")
E
^SCR("P1SMS","G",2,"CRD")
6,68,N,6,2
^SCR("P1SMS","G",2,"HELP")

^SCR("P1SMS","G",2,"LMAX")
6
^SCR("P1SMS","G",2,"MUMPS1")

^SCR("P1SMS","G",2,"MUMPS2")

^SCR("P1SMS","G",2,"OUTPUT")

^SCR("P1SMS","G",2,"SHEM")
melyzl
^SCR("P1SMS","G",2,"TYP")
N
^SCR("P1SMS","G",3,"CRD")
6,61,N,6,2
^SCR("P1SMS","G",3,"HELP")

^SCR("P1SMS","G",3,"LMAX")
6
^SCR("P1SMS","G",3,"MUMPS1")

^SCR("P1SMS","G",3,"MUMPS2")

^SCR("P1SMS","G",3,"OUTPUT")

^SCR("P1SMS","G",3,"SHEM")
 mley 
^SCR("P1SMS","G",3,"TYP")
N
^SCR("P1SMS","G",4,"CRD")
6,54,N,6,2
^SCR("P1SMS","G",4,"HELP")

^SCR("P1SMS","G",4,"LMAX")
6
^SCR("P1SMS","G",4,"MUMPS1")

^SCR("P1SMS","G",4,"MUMPS2")

^SCR("P1SMS","G",4,"OUTPUT")

^SCR("P1SMS","G",4,"SHEM")
 dtwd 
^SCR("P1SMS","G",4,"TYP")
N
^SCR("P1SMS","G",5,"CRD")
6,47,N,6,2
^SCR("P1SMS","G",5,"HELP")

^SCR("P1SMS","G",5,"LMAX")
6
^SCR("P1SMS","G",5,"MUMPS1")

^SCR("P1SMS","G",5,"MUMPS2")

^SCR("P1SMS","G",5,"OUTPUT")

^SCR("P1SMS","G",5,"SHEM")
 dxzi 
^SCR("P1SMS","G",5,"TYP")
N
^SCR("P1SMS","G",6,"CRD")
6,40,E,4,0
^SCR("P1SMS","G",6,"HELP")
<F9> - dpnfd zbvd , 4- dtwd, 2 - wiy , 1 - onefn 
^SCR("P1SMS","G",6,"LMAX")
5
^SCR("P1SMS","G",6,"MUMPS1")

^SCR("P1SMS","G",6,"MUMPS2")
D SUGT^P1S
^SCR("P1SMS","G",6,"SHEM")
z beq
^SCR("P1SMS","G",6,"TYP")
E
^SCR("P1SMS","G",7,"CRD")
6,34,N,6,2
^SCR("P1SMS","G",7,"HELP")

^SCR("P1SMS","G",7,"LMAX")
6
^SCR("P1SMS","G",7,"MUMPS1")

^SCR("P1SMS","G",7,"MUMPS2")

^SCR("P1SMS","G",7,"OUTPUT")

^SCR("P1SMS","G",7,"SHEM")
 melyz
^SCR("P1SMS","G",7,"TYP")
N
^SCR("P1SMS","G",8,"CRD")
6,27,H,9,0
^SCR("P1SMS","G",8,"HELP")

^SCR("P1SMS","G",8,"LMAX")
9
^SCR("P1SMS","G",8,"MUMPS1")

^SCR("P1SMS","G",8,"MUMPS2")

^SCR("P1SMS","G",8,"OUTPUT")

^SCR("P1SMS","G",8,"SHEM")
ogley 'qn
^SCR("P1SMS","G",8,"TYP")
H
^SCR("P1SMS","G","DEL")

^SCR("P1SMS","G","MAX")
1
^SCR("P1SMS","G","NAME","ASR")
4
^SCR("P1SMS","G","NAME","HZM")
1
^SCR("P1SMS","G","NAME","ITRA")
5
^SCR("P1SMS","G","NAME","LKH1")
8
^SCR("P1SMS","G","NAME","SHUL")
3
^SCR("P1SMS","G","NAME","SUGT")
6
^SCR("P1SMS","G","NAME","TSL")
2
^SCR("P1SMS","G","NAME","TT")
7
^SCR("P1SMS","G","NM",1)
HZM
^SCR("P1SMS","G","NM",2)
TSL
^SCR("P1SMS","G","NM",3)
SHUL
^SCR("P1SMS","G","NM",4)
ASR
^SCR("P1SMS","G","NM",5)
ITRA
^SCR("P1SMS","G","NM",6)
SUGT
^SCR("P1SMS","G","NM",7)
TT
^SCR("P1SMS","G","NM",8)
LKH1
^SCR("P1SMS","G","RB")
5,13,21,79
^SCR("P1SMS","G","REF")
^TEMPS($P
^SCR("P1SMS","G","RZD")
\
^SCR("P1SMS","G","STEP")
1
^SCR("P1SMS","G","STG")
                 :ogley 'qn: melyz:z beq: dxzi : dtwd : mley :melyzl: dpnfd :  
^SCR("P1SMS","G","VG")
7
^SCR("P1SMS","NAME")

^SCR("P1SMS","P",5,"CRD")
3,62,D,8,0
^SCR("P1SMS","P",5,"HELP")

^SCR("P1SMS","P",5,"LMAX")
9
^SCR("P1SMS","P",5,"MUMPS1")

^SCR("P1SMS","P",5,"MUMPS2")

^SCR("P1SMS","P",5,"OUTPUT")

^SCR("P1SMS","P",5,"TYP")
D
^SCR("P1SMS","P",10,"CRD")
3,46,E,5,0
^SCR("P1SMS","P",10,"HELP")

^SCR("P1SMS","P",10,"LMAX")
6
^SCR("P1SMS","P",10,"MUMPS1")

^SCR("P1SMS","P",10,"MUMPS2")

^SCR("P1SMS","P",10,"OUTPUT")

^SCR("P1SMS","P",10,"TYP")
E
^SCR("P1SMS","P",15,"CRD")
3,37,H,20,0
^SCR("P1SMS","P",15,"HELP")

^SCR("P1SMS","P",15,"LMAX")
27
^SCR("P1SMS","P",15,"MUMPS1")

^SCR("P1SMS","P",15,"MUMPS2")

^SCR("P1SMS","P",15,"OUTPUT")

^SCR("P1SMS","P",15,"TYP")
H
^SCR("P1SMS","P",20,"CRD")
22,37,N,8,2
^SCR("P1SMS","P",20,"HELP")

^SCR("P1SMS","P",20,"LMAX")
9
^SCR("P1SMS","P",20,"MUMPS1")

^SCR("P1SMS","P",20,"MUMPS2")

^SCR("P1SMS","P",20,"OUTPUT")

^SCR("P1SMS","P",20,"TYP")
N
^SCR("P1SMS","P",25,"CRD")
22,12,N,8,2
^SCR("P1SMS","P",25,"HELP")

^SCR("P1SMS","P",25,"LMAX")
9
^SCR("P1SMS","P",25,"MUMPS1")

^SCR("P1SMS","P",25,"MUMPS2")

^SCR("P1SMS","P",25,"OUTPUT")

^SCR("P1SMS","P",25,"TYP")
N
^SCR("P1SMS","P","NAME","DAT1")
5
^SCR("P1SMS","P","NAME","PSL0")
10
^SCR("P1SMS","P","NAME","PSL1")
15
^SCR("P1SMS","P","NAME","SUMI")
20
^SCR("P1SMS","P","NAME","SUMT")
25
^SCR("P1SMS","P","NM",5)
DAT1
^SCR("P1SMS","P","NM",10)
PSL0
^SCR("P1SMS","P","NM",15)
PSL1
^SCR("P1SMS","P","NM",20)
SUMI
^SCR("P1SMS","P","NM",25)
SUMT
^SCR("P1SPDOP")
H
^SCR("P1SPDOP",1)
                        micreq 'qn itl dpnfdl mitiqeny mihixt zniyx            
^SCR("P1SPDOP",2)
                                                                               
^SCR("P1SPDOP",3)
                                                                     1$        
^SCR("P1SPDOP",4)
                     :  xign  :         hixt my      : hixt 'qn :              
^SCR("P1SPDOP",5)
                                                                               
^SCR("P1SPDOP",6)
                                                                               
^SCR("P1SPDOP",7)
                                                                               
^SCR("P1SPDOP",8)
                                                                               
^SCR("P1SPDOP",9)
                                                                               
^SCR("P1SPDOP",10)
                                                                               
^SCR("P1SPDOP",11)
                                                                               
^SCR("P1SPDOP",12)
                                                                               
^SCR("P1SPDOP",13)
                                                                               
^SCR("P1SPDOP",14)
                                                                               
^SCR("P1SPDOP",15)
                                                                               
^SCR("P1SPDOP",16)
                                                                               
^SCR("P1SPDOP",17)
                                                                               
^SCR("P1SPDOP",18)
                                                                               
^SCR("P1SPDOP",19)
                                                                               
^SCR("P1SPDOP",20)
                                                                               
^SCR("P1SPDOP",21)
                 $1                                                            
^SCR("P1SPDOP","A",1)
�‰ƒ’…‘'‘Ž‰”Œ„�Ž†„Œ�‰”‰‘…Ž™�‰ˆ‰˜”šŽ‰™˜
^SCR("P1SPDOP","A",2)

^SCR("P1SPDOP","A",3)

^SCR("P1SPDOP","A",4)
˜‰‡Žˆ‰˜”�™ˆ‰˜”'‘Ž
^SCR("P1SPDOP","A",5)
----------------------------------------
^SCR("P1SPDOP","A",6)

^SCR("P1SPDOP","A",7)

^SCR("P1SPDOP","A",8)

^SCR("P1SPDOP","A",9)

^SCR("P1SPDOP","A",10)

^SCR("P1SPDOP","A",11)

^SCR("P1SPDOP","A",12)

^SCR("P1SPDOP","A",13)

^SCR("P1SPDOP","A",14)

^SCR("P1SPDOP","A",15)

^SCR("P1SPDOP","A",16)

^SCR("P1SPDOP","A",17)

^SCR("P1SPDOP","A",18)

^SCR("P1SPDOP","A",19)

^SCR("P1SPDOP","A",20)

^SCR("P1SPDOP","A",21)

^SCR("P1SPDOP","AV",1)
ohsguxwxnhpkvbnzvkohphxunaohyhrp,nhar
^SCR("P1SPDOP","AV",2)

^SCR("P1SPDOP","AV",3)

^SCR("P1SPDOP","AV",4)
rhjnyhrpoayhrpwxn
^SCR("P1SPDOP","AV",5)
----------------------------------------
^SCR("P1SPDOP","AV",6)

^SCR("P1SPDOP","AV",7)

^SCR("P1SPDOP","AV",8)

^SCR("P1SPDOP","AV",9)

^SCR("P1SPDOP","AV",10)

^SCR("P1SPDOP","AV",11)

^SCR("P1SPDOP","AV",12)

^SCR("P1SPDOP","AV",13)

^SCR("P1SPDOP","AV",14)

^SCR("P1SPDOP","AV",15)

^SCR("P1SPDOP","AV",16)

^SCR("P1SPDOP","AV",17)

^SCR("P1SPDOP","AV",18)

^SCR("P1SPDOP","AV",19)

^SCR("P1SPDOP","AV",20)

^SCR("P1SPDOP","AV",21)

^SCR("P1SPDOP","G",1,"CHECK")
Y
^SCR("P1SPDOP","G",1,"CRD")
5,64,E,7,0
^SCR("P1SPDOP","G",1,"FNC")

^SCR("P1SPDOP","G",1,"GLOB")
PAR
^SCR("P1SPDOP","G",1,"HELP")

^SCR("P1SPDOP","G",1,"LMAX")
10
^SCR("P1SPDOP","G",1,"MUMPS1")

^SCR("P1SPDOP","G",1,"MUMPS2")
D PAR^P1SPDOP
^SCR("P1SPDOP","G",1,"MUST")

^SCR("P1SPDOP","G",1,"NLN")
20
^SCR("P1SPDOP","G",1,"RZD")
**
^SCR("P1SPDOP","G",1,"SHEM")
 hixt 'qn 
^SCR("P1SPDOP","G",1,"TOPB")
8
^SCR("P1SPDOP","G",1,"TYP")
E
^SCR("P1SPDOP","G",1,"VRB")
PAR1
^SCR("P1SPDOP","G",2,"CRD")
5,53,H,22,0
^SCR("P1SPDOP","G",2,"HELP")

^SCR("P1SPDOP","G",2,"LMAX")
22
^SCR("P1SPDOP","G",2,"MUMPS1")

^SCR("P1SPDOP","G",2,"MUMPS2")

^SCR("P1SPDOP","G",2,"MUST")

^SCR("P1SPDOP","G",2,"OUTPUT")

^SCR("P1SPDOP","G",2,"SHEM")
         hixt my      
^SCR("P1SPDOP","G",2,"TYP")
H
^SCR("P1SPDOP","G",3,"CRD")
5,30,N,8,2
^SCR("P1SPDOP","G",3,"HELP")

^SCR("P1SPDOP","G",3,"LMAX")
8
^SCR("P1SPDOP","G",3,"MUMPS1")

^SCR("P1SPDOP","G",3,"MUMPS2")

^SCR("P1SPDOP","G",3,"OUTPUT")

^SCR("P1SPDOP","G",3,"SHEM")
  xign  
^SCR("P1SPDOP","G",3,"TYP")
N
^SCR("P1SPDOP","G","DEL")
Y
^SCR("P1SPDOP","G","MAX")
99999
^SCR("P1SPDOP","G","NAME","MH")
3
^SCR("P1SPDOP","G","NAME","PAR")
1
^SCR("P1SPDOP","G","NAME","PAR1")
2
^SCR("P1SPDOP","G","NM",1)
PAR
^SCR("P1SPDOP","G","NM",2)
PAR1
^SCR("P1SPDOP","G","NM",3)
MH
^SCR("P1SPDOP","G","RB")
4,18,22,71
^SCR("P1SPDOP","G","REF")
^TEMP($P,"W"
^SCR("P1SPDOP","G","RZD")
\
^SCR("P1SPDOP","G","STEP")
1
^SCR("P1SPDOP","G","STG")
                     :  xign  :         hixt my      : hixt 'qn :              
^SCR("P1SPDOP","G","VG")
6
^SCR("P1SPDOP","NAME")

^SCR("P1SPMLM")
H
^SCR("P1SPMLM",1)
                    # mixidn mixvln zlah #                                     
^SCR("P1SPMLM",2)
                                                                       1$      
^SCR("P1SPMLM",3)
                : ogley 'qn :     xvln my      : xvln 'qn : "F" ywn :          
^SCR("P1SPMLM",4)
                                                                               
^SCR("P1SPMLM",5)
                                                                               
^SCR("P1SPMLM",6)
                                                                               
^SCR("P1SPMLM",7)
                                                                               
^SCR("P1SPMLM",8)
                                                                               
^SCR("P1SPMLM",9)
                                                                               
^SCR("P1SPMLM",10)
             $1                                                                
^SCR("P1SPMLM",11)
                                                                               
^SCR("P1SPMLM",12)
                                                                               
^SCR("P1SPMLM",13)
                                                                               
^SCR("P1SPMLM",14)
                                                                               
^SCR("P1SPMLM",15)
                                                                               
^SCR("P1SPMLM",16)
                                                                               
^SCR("P1SPMLM",17)
                                                                               
^SCR("P1SPMLM",18)
                                                                               
^SCR("P1SPMLM","A",1)
�‰˜‰„Ž�‰˜–ŒŽšŒ�ˆ
^SCR("P1SPMLM","A",2)

^SCR("P1SPMLM","A",3)
�‡Œ…™'‘Ž˜–ŒŽ�™˜–ŒŽ'‘Ž"F"™—Ž
^SCR("P1SPMLM","A",4)
------------------------------------------------
^SCR("P1SPMLM","A",5)

^SCR("P1SPMLM","A",6)

^SCR("P1SPMLM","A",7)

^SCR("P1SPMLM","A",8)

^SCR("P1SPMLM","A",9)

^SCR("P1SPMLM","A",10)

^SCR("P1SPMLM","A",11)

^SCR("P1SPMLM","A",12)

^SCR("P1SPMLM","A",13)

^SCR("P1SPMLM","A",14)

^SCR("P1SPMLM","A",15)

^SCR("P1SPMLM","A",16)

^SCR("P1SPMLM","A",17)

^SCR("P1SPMLM","A",18)

^SCR("P1SPMLM","AV",1)
ohrhvnohrmkn,kcy
^SCR("P1SPMLM","AV",2)

^SCR("P1SPMLM","AV",3)
ijkuawxnrmknoarmknwxn"F"aen
^SCR("P1SPMLM","AV",4)
------------------------------------------------
^SCR("P1SPMLM","AV",5)

^SCR("P1SPMLM","AV",6)

^SCR("P1SPMLM","AV",7)

^SCR("P1SPMLM","AV",8)

^SCR("P1SPMLM","AV",9)

^SCR("P1SPMLM","AV",10)

^SCR("P1SPMLM","AV",11)

^SCR("P1SPMLM","AV",12)

^SCR("P1SPMLM","AV",13)

^SCR("P1SPMLM","AV",14)

^SCR("P1SPMLM","AV",15)

^SCR("P1SPMLM","AV",16)

^SCR("P1SPMLM","AV",17)

^SCR("P1SPMLM","AV",18)

^SCR("P1SPMLM","G",1,"CRD")
4,68,N,1,0
^SCR("P1SPMLM","G",1,"HELP")

^SCR("P1SPMLM","G",1,"LMAX")
9
^SCR("P1SPMLM","G",1,"MUMPS1")

^SCR("P1SPMLM","G",1,"MUMPS2")
D MK^P1SPMLM
^SCR("P1SPMLM","G",1,"MUST")

^SCR("P1SPMLM","G",1,"SHEM")
 "F" ywn 
^SCR("P1SPMLM","G",1,"TYP")
N
^SCR("P1SPMLM","G",2,"CHECK")
Y
^SCR("P1SPMLM","G",2,"CRD")
4,58,E,5.,0
^SCR("P1SPMLM","G",2,"FNC")

^SCR("P1SPMLM","G",2,"GLOB")
NAME
^SCR("P1SPMLM","G",2,"HELP")

^SCR("P1SPMLM","G",2,"LMAX")
10
^SCR("P1SPMLM","G",2,"MUMPS1")

^SCR("P1SPMLM","G",2,"MUMPS2")
D MLZ^P1SPMLM
^SCR("P1SPMLM","G",2,"MUST")

^SCR("P1SPMLM","G",2,"NLN")
20
^SCR("P1SPMLM","G",2,"RZD")
\
^SCR("P1SPMLM","G",2,"SHEM")
 xvln 'qn 
^SCR("P1SPMLM","G",2,"TOPB")
8
^SCR("P1SPMLM","G",2,"TYP")
E
^SCR("P1SPMLM","G",3,"CRD")
4,47,H,18,0
^SCR("P1SPMLM","G",3,"HELP")

^SCR("P1SPMLM","G",3,"LMAX")
18
^SCR("P1SPMLM","G",3,"MUMPS1")

^SCR("P1SPMLM","G",3,"MUMPS2")

^SCR("P1SPMLM","G",3,"OUTPUT")

^SCR("P1SPMLM","G",3,"SHEM")
     xvln my      
^SCR("P1SPMLM","G",3,"TYP")
H
^SCR("P1SPMLM","G",4,"CRD")
4,28,E,3,0
^SCR("P1SPMLM","G",4,"HELP")

^SCR("P1SPMLM","G",4,"LMAX")
11
^SCR("P1SPMLM","G",4,"MUMPS1")

^SCR("P1SPMLM","G",4,"MUMPS2")
D SHUL^P1SPMLM
^SCR("P1SPMLM","G",4,"SHEM")
 ogley 'qn 
^SCR("P1SPMLM","G",4,"TYP")
E
^SCR("P1SPMLM","G","DEL")
Y
^SCR("P1SPMLM","G","MAX")
5
^SCR("P1SPMLM","G","NAME","MK")
1
^SCR("P1SPMLM","G","NAME","MLZ")
2
^SCR("P1SPMLM","G","NAME","MLZ1")
3
^SCR("P1SPMLM","G","NAME","SHUL")
4
^SCR("P1SPMLM","G","NM",1)
MK
^SCR("P1SPMLM","G","NM",2)
MLZ
^SCR("P1SPMLM","G","NM",3)
MLZ1
^SCR("P1SPMLM","G","NM",4)
SHUL
^SCR("P1SPMLM","G","RB")
3,14,11,73
^SCR("P1SPMLM","G","REF")
^TEMP($P,"SP"
^SCR("P1SPMLM","G","RZD")
\
^SCR("P1SPMLM","G","STEP")
1
^SCR("P1SPMLM","G","STG")
                : ogley 'qn :     xvln my      : xvln 'qn : "F" ywn :          
^SCR("P1SPMLM","G","VG")
5
^SCR("P1SPMLM","NAME")
mixidn mixvln zlah
^SCR("P1SPTLH")
H
^SCR("P1SPTLH",1)
                                 # miyelzl zegpd zlah #                        
^SCR("P1SPTLH",2)
                                                                       1$      
^SCR("P1SPTLH",3)
                   : dgpd :  xign  :      hixt xe`z     : hixt cew :           
^SCR("P1SPTLH",4)
                                                                               
^SCR("P1SPTLH",5)
                                                                               
^SCR("P1SPTLH",6)
                                                                               
^SCR("P1SPTLH",7)
                                                                               
^SCR("P1SPTLH",8)
                                                                               
^SCR("P1SPTLH",9)
                                                                               
^SCR("P1SPTLH",10)
                                                                               
^SCR("P1SPTLH",11)
                                                                               
^SCR("P1SPTLH",12)
                                                                               
^SCR("P1SPTLH",13)
                                                                               
^SCR("P1SPTLH",14)
                                                                               
^SCR("P1SPTLH",15)
                                                                               
^SCR("P1SPTLH",16)
                                                                               
^SCR("P1SPTLH",17)
                                                                               
^SCR("P1SPTLH",18)
                                                                               
^SCR("P1SPTLH",19)
             $1                                                                
^SCR("P1SPTLH","A",1)
�‰™…ŒšŒš…‡�„šŒ�ˆ
^SCR("P1SPTLH","A",2)

^SCR("P1SPTLH","A",3)
„‡�„˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1SPTLH","A",4)
--------------------------------------------
^SCR("P1SPTLH","A",5)

^SCR("P1SPTLH","A",6)

^SCR("P1SPTLH","A",7)

^SCR("P1SPTLH","A",8)

^SCR("P1SPTLH","A",9)

^SCR("P1SPTLH","A",10)

^SCR("P1SPTLH","A",11)

^SCR("P1SPTLH","A",12)

^SCR("P1SPTLH","A",13)

^SCR("P1SPTLH","A",14)

^SCR("P1SPTLH","A",15)

^SCR("P1SPTLH","A",16)

^SCR("P1SPTLH","A",17)

^SCR("P1SPTLH","A",18)

^SCR("P1SPTLH","A",19)

^SCR("P1SPTLH","AV",1)
ohauk,k,ujbv,kcy
^SCR("P1SPTLH","AV",2)

^SCR("P1SPTLH","AV",3)
vjbvrhjnyhrprut,yhrpsue
^SCR("P1SPTLH","AV",4)
--------------------------------------------
^SCR("P1SPTLH","AV",5)

^SCR("P1SPTLH","AV",6)

^SCR("P1SPTLH","AV",7)

^SCR("P1SPTLH","AV",8)

^SCR("P1SPTLH","AV",9)

^SCR("P1SPTLH","AV",10)

^SCR("P1SPTLH","AV",11)

^SCR("P1SPTLH","AV",12)

^SCR("P1SPTLH","AV",13)

^SCR("P1SPTLH","AV",14)

^SCR("P1SPTLH","AV",15)

^SCR("P1SPTLH","AV",16)

^SCR("P1SPTLH","AV",17)

^SCR("P1SPTLH","AV",18)

^SCR("P1SPTLH","AV",19)

^SCR("P1SPTLH","G",1,"CHECK")
Y
^SCR("P1SPTLH","G",1,"CRD")
4,67,E,8,0
^SCR("P1SPTLH","G",1,"CREAT")

^SCR("P1SPTLH","G",1,"FNC")

^SCR("P1SPTLH","G",1,"GLOB")
PAR
^SCR("P1SPTLH","G",1,"HELP")

^SCR("P1SPTLH","G",1,"LMAX")
10
^SCR("P1SPTLH","G",1,"MUMPS1")

^SCR("P1SPTLH","G",1,"MUMPS2")
D PAR^P1SPTLH
^SCR("P1SPTLH","G",1,"MUST")

^SCR("P1SPTLH","G",1,"NLN")
20
^SCR("P1SPTLH","G",1,"NS")
H
^SCR("P1SPTLH","G",1,"RZD")
**
^SCR("P1SPTLH","G",1,"SHEM")
 hixt cew 
^SCR("P1SPTLH","G",1,"TOPB")
8
^SCR("P1SPTLH","G",1,"TYP")
E
^SCR("P1SPTLH","G",1,"VRB")
PAR1
^SCR("P1SPTLH","G",2,"CRD")
4,56,H,20,0
^SCR("P1SPTLH","G",2,"HELP")

^SCR("P1SPTLH","G",2,"LMAX")
20
^SCR("P1SPTLH","G",2,"MUMPS1")

^SCR("P1SPTLH","G",2,"MUMPS2")

^SCR("P1SPTLH","G",2,"OUTPUT")

^SCR("P1SPTLH","G",2,"SHEM")
      hixt xe`z     
^SCR("P1SPTLH","G",2,"TYP")
H
^SCR("P1SPTLH","G",3,"CRD")
4,35,N,8,2
^SCR("P1SPTLH","G",3,"HELP")

^SCR("P1SPTLH","G",3,"LMAX")
8
^SCR("P1SPTLH","G",3,"MUMPS1")

^SCR("P1SPTLH","G",3,"MUMPS2")

^SCR("P1SPTLH","G",3,"OUTPUT")

^SCR("P1SPTLH","G",3,"SHEM")
  xign  
^SCR("P1SPTLH","G",3,"TYP")
N
^SCR("P1SPTLH","G",4,"CRD")
4,26,N,6,2
^SCR("P1SPTLH","G",4,"HELP")

^SCR("P1SPTLH","G",4,"LMAX")
6
^SCR("P1SPTLH","G",4,"MUMPS1")

^SCR("P1SPTLH","G",4,"MUMPS2")

^SCR("P1SPTLH","G",4,"SHEM")
 dgpd 
^SCR("P1SPTLH","G",4,"TYP")
N
^SCR("P1SPTLH","G","DEL")
Y
^SCR("P1SPTLH","G","MAX")
9999
^SCR("P1SPTLH","G","NAME","HNH")
4
^SCR("P1SPTLH","G","NAME","MH")
3
^SCR("P1SPTLH","G","NAME","PAR")
1
^SCR("P1SPTLH","G","NAME","PAR1")
2
^SCR("P1SPTLH","G","NM",1)
PAR
^SCR("P1SPTLH","G","NM",2)
PAR1
^SCR("P1SPTLH","G","NM",3)
MH
^SCR("P1SPTLH","G","NM",4)
HNH
^SCR("P1SPTLH","G","RB")
3,14,20,73
^SCR("P1SPTLH","G","REF")
^TEMP($P,"HNH"
^SCR("P1SPTLH","G","RZD")
\
^SCR("P1SPTLH","G","STEP")
1
^SCR("P1SPTLH","G","STG")
                   : dgpd :  xign  :      hixt xe`z     : hixt cew :           
^SCR("P1SPTLH","G","VG")
5
^SCR("P1SPTLH","NAME")
miyelzl zegpd zlah
^SCR("P1SUGS")
H
^SCR("P1SUGS",1)
                                # zepgley ibeq zlah #                          
^SCR("P1SUGS",2)
                                                                               
^SCR("P1SUGS",3)
                                                               1$              
^SCR("P1SUGS",4)
                          :    ogley beq xe`z   : ogley beq :                  
^SCR("P1SUGS",5)
                                                                               
^SCR("P1SUGS",6)
                                                                               
^SCR("P1SUGS",7)
                                                                               
^SCR("P1SUGS",8)
                                                                               
^SCR("P1SUGS",9)
                                                                               
^SCR("P1SUGS",10)
                                                                               
^SCR("P1SUGS",11)
                                                                               
^SCR("P1SUGS",12)
                                                                               
^SCR("P1SUGS",13)
                                                                               
^SCR("P1SUGS",14)
                                                                               
^SCR("P1SUGS",15)
                                                                               
^SCR("P1SUGS",16)
                                                                               
^SCR("P1SUGS",17)
                                                                               
^SCR("P1SUGS",18)
                                                                               
^SCR("P1SUGS",19)
                                                                               
^SCR("P1SUGS",20)
                                                                               
^SCR("P1SUGS",21)
                    $1                                                         
^SCR("P1SUGS","A",1)
š…�‡Œ…™‰‚…‘šŒ�ˆ
^SCR("P1SUGS","A",2)

^SCR("P1SUGS","A",3)

^SCR("P1SUGS","A",4)
�‡Œ…™‚…‘˜…€š�‡Œ…™‚…‘
^SCR("P1SUGS","A",5)
--------------------------------
^SCR("P1SUGS","A",6)

^SCR("P1SUGS","A",7)

^SCR("P1SUGS","A",8)

^SCR("P1SUGS","A",9)

^SCR("P1SUGS","A",10)

^SCR("P1SUGS","A",11)

^SCR("P1SUGS","A",12)

^SCR("P1SUGS","A",13)

^SCR("P1SUGS","A",14)

^SCR("P1SUGS","A",15)

^SCR("P1SUGS","A",16)

^SCR("P1SUGS","A",17)

^SCR("P1SUGS","A",18)

^SCR("P1SUGS","A",19)

^SCR("P1SUGS","A",20)

^SCR("P1SUGS","A",21)

^SCR("P1SUGS","AV",1)
,ubjkuahdux,kcy
^SCR("P1SUGS","AV",2)

^SCR("P1SUGS","AV",3)

^SCR("P1SUGS","AV",4)
ijkuaduxrut,ijkuadux
^SCR("P1SUGS","AV",5)
--------------------------------
^SCR("P1SUGS","AV",6)

^SCR("P1SUGS","AV",7)

^SCR("P1SUGS","AV",8)

^SCR("P1SUGS","AV",9)

^SCR("P1SUGS","AV",10)

^SCR("P1SUGS","AV",11)

^SCR("P1SUGS","AV",12)

^SCR("P1SUGS","AV",13)

^SCR("P1SUGS","AV",14)

^SCR("P1SUGS","AV",15)

^SCR("P1SUGS","AV",16)

^SCR("P1SUGS","AV",17)

^SCR("P1SUGS","AV",18)

^SCR("P1SUGS","AV",19)

^SCR("P1SUGS","AV",20)

^SCR("P1SUGS","AV",21)

^SCR("P1SUGS","G",1,"CRD")
5,60,E,1,0
^SCR("P1SUGS","G",1,"HELP")

^SCR("P1SUGS","G",1,"LMAX")
11
^SCR("P1SUGS","G",1,"MUMPS1")

^SCR("P1SUGS","G",1,"MUMPS2")

^SCR("P1SUGS","G",1,"SHEM")
 ogley beq 
^SCR("P1SUGS","G",1,"TYP")
E
^SCR("P1SUGS","G",2,"CRD")
5,48,H,21,0
^SCR("P1SUGS","G",2,"HELP")

^SCR("P1SUGS","G",2,"LMAX")
21
^SCR("P1SUGS","G",2,"MUMPS1")

^SCR("P1SUGS","G",2,"MUMPS2")

^SCR("P1SUGS","G",2,"SHEM")
    ogley beq xe`z   
^SCR("P1SUGS","G",2,"TYP")
H
^SCR("P1SUGS","G","DEL")
Y
^SCR("P1SUGS","G","MAX")
999
^SCR("P1SUGS","G","NAME","SUGS")
1
^SCR("P1SUGS","G","NAME","SUGS1")
2
^SCR("P1SUGS","G","NM",1)
SUGS
^SCR("P1SUGS","G","NM",2)
SUGS1
^SCR("P1SUGS","G","RB")
4,21,22,65
^SCR("P1SUGS","G","REF")
^TEMP($P,"SP"
^SCR("P1SUGS","G","RZD")
\
^SCR("P1SUGS","G","STEP")
1
^SCR("P1SUGS","G","STG")
                          :    ogley beq xe`z   : ogley beq :                  
^SCR("P1SUGS","G","VG")
6
^SCR("P1SUGS","NAME")
egley ibeq zlah
^SCR("P1T")
H
^SCR("P1T",1)
                              {03       }: 'qn dpnfd        {01   }:qn zipeayg 
^SCR("P1T",2)
              {                     10} {05        }:   (lh) gewl 'qn e` ogley 
^SCR("P1T",3)
                                                                               
^SCR("P1T",4)
                                   {22     }: zegpd k"dq  {20     }: dgpd iptl 
^SCR("P1T",5)
                                                                             1]
^SCR("P1T",6)
            {34    }:dxzi  {30      }:dtwd  {33     }:mley  {32     }: melyzl  
^SCR("P1T",7)
       [1                                                                      
^SCR("P1T",8)
                                                        {50      }: ztqep dgpd 
^SCR("P1T",9)
                                                                               
^SCR("P1T",10)
                       g"y {47     }: scer  {37     } + {35      }:onefna mley 
^SCR("P1T",11)
                                       {48{46       }{45{44      }{43        } 
^SCR("P1T",12)
                                            {41     } + {40      }:  wiya mley 
^SCR("P1T",13)
                                                                               
^SCR("P1T",14)
                            {60     }: tih  {73     } + {72      }: `""ka mley 
^SCR("P1T",15)
                                                                              
^SCR("P1T",16)
       {90    }: yelza scer {85     } xtqn  {75     } + {74      }: yelza mley 
^SCR("P1T",17)
                                                                               
^SCR("P1T",18)
              {                                   92} {91        }:  iy`x gewl 
^SCR("P1T",19)
   {81    }: gewl ly dpnfd  {                     77} {76        }:  gewl xtqn 
^SCR("P1T",20)
                       {87    } :reaw xign {84     }:i`xy` lceb {83    }: dxzi 
^SCR("P1T",21)
 {89      }: dgpd ixg` {78      } :  dgpd iptl   {82     } = {79 }:gewll dgpd% 
^SCR("P1T",22)
    {                                                         80}:       dxrd  
^SCR("P1T","A",1)
:'‘Ž„�Ž†„:‘Žš‰�…�™‡
^SCR("P1T","A",2)
:(Œˆ)‡…—Œ'‘Ž…€�‡Œ…™
^SCR("P1T","A",3)

^SCR("P1T","A",4)
:š…‡�„‹"„‘:„‡�„‰�”Œ
^SCR("P1T","A",5)

^SCR("P1T","A",6)
:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1T","A",7)

^SCR("P1T","A",8)
:š”‘…�„‡�„
^SCR("P1T","A",9)

^SCR("P1T","A",10)
‡"™:“ƒ…’+:�Ž…†Ž��Œ…™
^SCR("P1T","A",11)

^SCR("P1T","A",12)
+:—‰™��Œ…™
^SCR("P1T","A",13)

^SCR("P1T","A",14)
:”‰ˆ+:€""‹��Œ…™
^SCR("P1T","A",15)

^SCR("P1T","A",16)
:™…Œš�“ƒ…’˜”‘Ž+:™…Œš��Œ…™
^SCR("P1T","A",17)

^SCR("P1T","A",18)
:‰™€˜‡…—Œ
^SCR("P1T","A",19)
:‡…—ŒŒ™„�Ž†„:‡…—Œ˜”‘Ž
^SCR("P1T","A",20)
:’…�—˜‰‡Ž:‰€˜™€Œƒ…‚:„˜š‰
^SCR("P1T","A",21)
:„‡�„‰˜‡€:„‡�„‰�”Œ=:‡…—ŒŒ„‡�„%
^SCR("P1T","A",22)
:„˜’„
^SCR("P1T","AV",1)
:wxnvbnzv:xn,hbucaj
^SCR("P1T","AV",2)
:(ky)juekwxnutijkua
^SCR("P1T","AV",3)

^SCR("P1T","AV",4)
:,ujbvf"vx:vjbvhbpk
^SCR("P1T","AV",5)

^SCR("P1T","AV",6)
:vr,h:vpev:okua:ouka,k
^SCR("P1T","AV",7)

^SCR("P1T","AV",8)
:,pxubvjbv
^SCR("P1T","AV",9)

^SCR("P1T","AV",10)
j"a:;sug+:inuzncokua
^SCR("P1T","AV",11)

^SCR("P1T","AV",12)
+:ehacokua
^SCR("P1T","AV",13)

^SCR("P1T","AV",14)
:phy+:t""fcokua
^SCR("P1T","AV",15)

^SCR("P1T","AV",16)
:auk,c;sugrpxn+:auk,cokua
^SCR("P1T","AV",17)

^SCR("P1T","AV",18)
:hatrjuek
^SCR("P1T","AV",19)
:juekkavbnzv:juekrpxn
^SCR("P1T","AV",20)
:gucerhjn:htratksud:vr,h
^SCR("P1T","AV",21)
:vjbvhrjt:vjbvhbpk=:juekkvjbv%
^SCR("P1T","AV",22)
:vrgv
^SCR("P1T","NAME")

^SCR("P1T","P",1,"CRD")
1,60,E,6,0
^SCR("P1T","P",1,"HELP")

^SCR("P1T","P",1,"LMAX")
6
^SCR("P1T","P",1,"MUMPS1")

^SCR("P1T","P",1,"MUMPS2")

^SCR("P1T","P",1,"OUTPUT")

^SCR("P1T","P",1,"TYP")
E
^SCR("P1T","P",3,"CRD")
1,30,E,10,0
^SCR("P1T","P",3,"HELP")

^SCR("P1T","P",3,"LMAX")
10
^SCR("P1T","P",3,"MUMPS1")

^SCR("P1T","P",3,"MUMPS2")

^SCR("P1T","P",3,"OUTPUT")

^SCR("P1T","P",3,"TYP")
E
^SCR("P1T","P",5,"CRD")
2,40,E,11,0
^SCR("P1T","P",5,"HELP")

^SCR("P1T","P",5,"LMAX")
11
^SCR("P1T","P",5,"MUMPS1")

^SCR("P1T","P",5,"MUMPS2")

^SCR("P1T","P",5,"OUTPUT")

^SCR("P1T","P",5,"TYP")
E
^SCR("P1T","P",10,"CRD")
2,39,H,20
^SCR("P1T","P",10,"HELP")

^SCR("P1T","P",10,"LMAX")
24
^SCR("P1T","P",10,"MUMPS1")

^SCR("P1T","P",10,"MUMPS2")

^SCR("P1T","P",10,"OUTPUT")

^SCR("P1T","P",10,"TYP")
H
^SCR("P1T","P",20,"CRD")
4,58,N,8,2
^SCR("P1T","P",20,"HELP")

^SCR("P1T","P",20,"LMAX")
8
^SCR("P1T","P",20,"MUMPS1")

^SCR("P1T","P",20,"MUMPS2")

^SCR("P1T","P",20,"OUTPUT")

^SCR("P1T","P",20,"TYP")
N
^SCR("P1T","P",22,"CRD")
4,35,N,8,2
^SCR("P1T","P",22,"HELP")

^SCR("P1T","P",22,"LMAX")
8
^SCR("P1T","P",22,"MUMPS1")

^SCR("P1T","P",22,"MUMPS2")

^SCR("P1T","P",22,"OUTPUT")

^SCR("P1T","P",22,"TYP")
N
^SCR("P1T","P",30,"CRD")
6,27,N,9,2
^SCR("P1T","P",30,"HELP")

^SCR("P1T","P",30,"LMAX")
9
^SCR("P1T","P",30,"MUMPS1")

^SCR("P1T","P",30,"MUMPS2")

^SCR("P1T","P",30,"OUTPUT")

^SCR("P1T","P",30,"TYP")
N
^SCR("P1T","P",32,"CRD")
6,60,N,8,2
^SCR("P1T","P",32,"HELP")

^SCR("P1T","P",32,"LMAX")
8
^SCR("P1T","P",32,"MUMPS1")

^SCR("P1T","P",32,"MUMPS2")

^SCR("P1T","P",32,"OUTPUT")

^SCR("P1T","P",32,"TYP")
N
^SCR("P1T","P",33,"CRD")
6,44,N,8,2
^SCR("P1T","P",33,"HELP")

^SCR("P1T","P",33,"LMAX")
8
^SCR("P1T","P",33,"MUMPS1")

^SCR("P1T","P",33,"MUMPS2")

^SCR("P1T","P",33,"OUTPUT")

^SCR("P1T","P",33,"TYP")
N
^SCR("P1T","P",34,"CRD")
6,12,N,7,2
^SCR("P1T","P",34,"HELP")

^SCR("P1T","P",34,"LMAX")
7
^SCR("P1T","P",34,"MUMPS1")

^SCR("P1T","P",34,"MUMPS2")

^SCR("P1T","P",34,"OUTPUT")

^SCR("P1T","P",34,"TYP")
N
^SCR("P1T","P",35,"CRD")
10,56,N,8,2
^SCR("P1T","P",35,"HELP")
CTRL+X - oeaygn  , <F5> - 2-l wlgl, <F1> - wegnl
^SCR("P1T","P",35,"LMAX")
9
^SCR("P1T","P",35,"MUMPS1")

^SCR("P1T","P",35,"MUMPS2")
I %TO="F5" S MZM=$J(MZM/2,2,2)
^SCR("P1T","P",35,"TYP")
N
^SCR("P1T","P",37,"CRD")
10,44,N,8,2
^SCR("P1T","P",37,"HELP")

^SCR("P1T","P",37,"LMAX")
8
^SCR("P1T","P",37,"MUMPS1")

^SCR("P1T","P",37,"MUMPS2")

^SCR("P1T","P",37,"TYP")
N
^SCR("P1T","P",40,"CRD")
12,56,N,8,2
^SCR("P1T","P",40,"HELP")

^SCR("P1T","P",40,"LMAX")
9
^SCR("P1T","P",40,"MUMPS1")

^SCR("P1T","P",40,"MUMPS2")

^SCR("P1T","P",40,"TYP")
N
^SCR("P1T","P",41,"CRD")
12,44,N,8,2
^SCR("P1T","P",41,"HELP")
<F7> - miwiy zbvdl 
^SCR("P1T","P",41,"LMAX")
8
^SCR("P1T","P",41,"MUMPS1")

^SCR("P1T","P",41,"MUMPS2")
D CHK1^P1T
^SCR("P1T","P",41,"TYP")
N
^SCR("P1T","P",43,"CRD")
11,66,E,11,0
^SCR("P1T","P",43,"HELP")

^SCR("P1T","P",43,"LMAX")
11
^SCR("P1T","P",43,"MUMPS1")

^SCR("P1T","P",43,"MUMPS2")

^SCR("P1T","P",43,"OUTPUT")

^SCR("P1T","P",43,"TYP")
E
^SCR("P1T","P",44,"CRD")
11,56,N,9,2
^SCR("P1T","P",44,"HELP")

^SCR("P1T","P",44,"LMAX")
9
^SCR("P1T","P",44,"MUMPS1")

^SCR("P1T","P",44,"MUMPS2")
D MZMTB^P1T
^SCR("P1T","P",44,"TYP")
N
^SCR("P1T","P",45,"CRD")
11,53,E,2,0
^SCR("P1T","P",45,"HELP")

^SCR("P1T","P",45,"LMAX")
3
^SCR("P1T","P",45,"MUMPS1")

^SCR("P1T","P",45,"MUMPS2")

^SCR("P1T","P",45,"OUTPUT")

^SCR("P1T","P",45,"TYP")
E
^SCR("P1T","P",46,"CRD")
11,42,N,10,2
^SCR("P1T","P",46,"HELP")

^SCR("P1T","P",46,"LMAX")
10
^SCR("P1T","P",46,"MUMPS1")

^SCR("P1T","P",46,"MUMPS2")
D MZMTB^P1T
^SCR("P1T","P",46,"TYP")
N
^SCR("P1T","P",47,"CRD")
10,27,N,3,2
^SCR("P1T","P",47,"HELP")

^SCR("P1T","P",47,"LMAX")
8
^SCR("P1T","P",47,"MUMPS1")

^SCR("P1T","P",47,"MUMPS2")

^SCR("P1T","P",47,"OUTPUT")

^SCR("P1T","P",47,"TYP")
N
^SCR("P1T","P",48,"CRD")
11,39,E,2,0
^SCR("P1T","P",48,"HELP")

^SCR("P1T","P",48,"LMAX")
3
^SCR("P1T","P",48,"MUMPS1")

^SCR("P1T","P",48,"MUMPS2")

^SCR("P1T","P",48,"OUTPUT")

^SCR("P1T","P",48,"TYP")
E
^SCR("P1T","P",50,"CRD")
8,56,N,8,2
^SCR("P1T","P",50,"HELP")

^SCR("P1T","P",50,"LMAX")
9
^SCR("P1T","P",50,"MUMPS1")

^SCR("P1T","P",50,"MUMPS2")

^SCR("P1T","P",50,"TYP")
N
^SCR("P1T","P",60,"CRD")
14,28,N,7,2
^SCR("P1T","P",60,"HELP")

^SCR("P1T","P",60,"LMAX")
8
^SCR("P1T","P",60,"MUMPS1")

^SCR("P1T","P",60,"MUMPS2")

^SCR("P1T","P",60,"OUTPUT")

^SCR("P1T","P",60,"TYP")
N
^SCR("P1T","P",72,"CRD")
14,56,N,8,2
^SCR("P1T","P",72,"HELP")
<F5> - mieey miwlgl miqihxkd oiia wlgl ,<F3> - minelyz 
^SCR("P1T","P",72,"LMAX")
9
^SCR("P1T","P",72,"MUMPS1")

^SCR("P1T","P",72,"MUMPS2")

^SCR("P1T","P",72,"TYP")
N
^SCR("P1T","P",73,"CRD")
14,44,N,8,2
^SCR("P1T","P",73,"HELP")
<F7> - `"k zbvd ,<F5> - mieey miwlgl miqihxkd oia wlgl , <F3> - minelyz  
^SCR("P1T","P",73,"LMAX")
8
^SCR("P1T","P",73,"MUMPS1")

^SCR("P1T","P",73,"MUMPS2")
D CA1^P1T
^SCR("P1T","P",73,"TYP")
N
^SCR("P1T","P",74,"CRD")
16,56,N,8,2
^SCR("P1T","P",74,"HELP")

^SCR("P1T","P",74,"LMAX")
9
^SCR("P1T","P",74,"MUMPS1")

^SCR("P1T","P",74,"MUMPS2")

^SCR("P1T","P",74,"TYP")
N
^SCR("P1T","P",75,"CRD")
16,44,N,8,2
^SCR("P1T","P",75,"HELP")

^SCR("P1T","P",75,"LMAX")
8
^SCR("P1T","P",75,"MUMPS1")

^SCR("P1T","P",75,"MUMPS2")

^SCR("P1T","P",75,"TYP")
N
^SCR("P1T","P",76,"CRD")
19,54,E,10,0
^SCR("P1T","P",76,"FNC")
F9
^SCR("P1T","P",76,"GLOB")
LKH
^SCR("P1T","P",76,"HELP")
<F9>- gewl qihxk,<F8>-minelyz zniyx ,<F7>- zegewl zniyx ,<F6>- my itl yetig
^SCR("P1T","P",76,"LMAX")
11
^SCR("P1T","P",76,"MUMPS1")
D LKHN0^P1T
^SCR("P1T","P",76,"MUMPS2")
D LKHN^P1T
^SCR("P1T","P",76,"NLN")
20
^SCR("P1T","P",76,"RZD")
\
^SCR("P1T","P",76,"TOPB")
8
^SCR("P1T","P",76,"TYP")
E
^SCR("P1T","P",76,"VRB")
LKHN1
^SCR("P1T","P",77,"CRD")
19,53,H,22
^SCR("P1T","P",77,"HELP")

^SCR("P1T","P",77,"LMAX")
24
^SCR("P1T","P",77,"MUMPS1")

^SCR("P1T","P",77,"MUMPS2")

^SCR("P1T","P",77,"OUTPUT")

^SCR("P1T","P",77,"TYP")
H
^SCR("P1T","P",78,"CRD")
21,23,N,8,2
^SCR("P1T","P",78,"HELP")
<F8> - dtwda minelyz zniyx 
^SCR("P1T","P",78,"LMAX")
9
^SCR("P1T","P",78,"MUMPS1")
D ASRL0^P1T
^SCR("P1T","P",78,"MUMPS2")
D AS^P1T
^SCR("P1T","P",78,"TYP")
N
^SCR("P1T","P",79,"CRD")
21,61,N,4,1
^SCR("P1T","P",79,"HELP")

^SCR("P1T","P",79,"LMAX")
4
^SCR("P1T","P",79,"MUMPS1")

^SCR("P1T","P",79,"MUMPS2")
D LKAH^P1T
^SCR("P1T","P",79,"OUTPUT")

^SCR("P1T","P",79,"TYP")
N
^SCR("P1T","P",80,"CRD")
22,65,H,60
^SCR("P1T","P",80,"HELP")

^SCR("P1T","P",80,"LMAX")
60
^SCR("P1T","P",80,"MUMPS1")

^SCR("P1T","P",80,"MUMPS2")

^SCR("P1T","P",80,"TYP")
H
^SCR("P1T","P",81,"CRD")
19,3,E,7,0
^SCR("P1T","P",81,"HELP")

^SCR("P1T","P",81,"LMAX")
7
^SCR("P1T","P",81,"MUMPS1")

^SCR("P1T","P",81,"MUMPS2")

^SCR("P1T","P",81,"TYP")
E
^SCR("P1T","P",82,"CRD")
21,49,N,6,2
^SCR("P1T","P",82,"HELP")

^SCR("P1T","P",82,"LMAX")
8
^SCR("P1T","P",82,"MUMPS1")

^SCR("P1T","P",82,"MUMPS2")

^SCR("P1T","P",82,"TYP")
N
^SCR("P1T","P",83,"CRD")
20,64,N,7,2
^SCR("P1T","P",83,"HELP")

^SCR("P1T","P",83,"LMAX")
7
^SCR("P1T","P",83,"MUMPS1")

^SCR("P1T","P",83,"MUMPS2")

^SCR("P1T","P",83,"OUTPUT")

^SCR("P1T","P",83,"TYP")
N
^SCR("P1T","P",84,"CRD")
20,43,N,8,2
^SCR("P1T","P",84,"HELP")

^SCR("P1T","P",84,"LMAX")
8
^SCR("P1T","P",84,"MUMPS1")

^SCR("P1T","P",84,"MUMPS2")

^SCR("P1T","P",84,"OUTPUT")

^SCR("P1T","P",84,"TYP")
N
^SCR("P1T","P",85,"CRD")
16,28,N,7,0
^SCR("P1T","P",85,"HELP")

^SCR("P1T","P",85,"LMAX")
8
^SCR("P1T","P",85,"MUMPS1")

^SCR("P1T","P",85,"MUMPS2")

^SCR("P1T","P",85,"TYP")
N
^SCR("P1T","P",87,"CRD")
20,23,N,7,2
^SCR("P1T","P",87,"HELP")

^SCR("P1T","P",87,"LMAX")
7
^SCR("P1T","P",87,"MUMPS1")

^SCR("P1T","P",87,"MUMPS2")

^SCR("P1T","P",87,"OUTPUT")

^SCR("P1T","P",87,"TYP")
N
^SCR("P1T","P",89,"CRD")
21,1,N,9,2
^SCR("P1T","P",89,"HELP")

^SCR("P1T","P",89,"LMAX")
9
^SCR("P1T","P",89,"MUMPS1")

^SCR("P1T","P",89,"MUMPS2")

^SCR("P1T","P",89,"OUTPUT")

^SCR("P1T","P",89,"TYP")
N
^SCR("P1T","P",90,"CRD")
16,7,N,7,2
^SCR("P1T","P",90,"HELP")

^SCR("P1T","P",90,"LMAX")
7
^SCR("P1T","P",90,"MUMPS1")

^SCR("P1T","P",90,"MUMPS2")

^SCR("P1T","P",90,"OUTPUT")

^SCR("P1T","P",90,"TYP")
N
^SCR("P1T","P",91,"CRD")
18,54,E,10,0
^SCR("P1T","P",91,"HELP")

^SCR("P1T","P",91,"LMAX")
11
^SCR("P1T","P",91,"MUMPS1")

^SCR("P1T","P",91,"MUMPS2")

^SCR("P1T","P",91,"OUTPUT")

^SCR("P1T","P",91,"TYP")
E
^SCR("P1T","P",92,"CRD")
18,53,H,38
^SCR("P1T","P",92,"HELP")

^SCR("P1T","P",92,"LMAX")
38
^SCR("P1T","P",92,"MUMPS1")

^SCR("P1T","P",92,"MUMPS2")

^SCR("P1T","P",92,"OUTPUT")

^SCR("P1T","P",92,"TYP")
H
^SCR("P1T","P","NAME","ASR")
89
^SCR("P1T","P","NAME","ASRL")
78
^SCR("P1T","P","NAME","CA")
72
^SCR("P1T","P","NAME","CA1")
73
^SCR("P1T","P","NAME","CHK")
40
^SCR("P1T","P","NAME","CHK1")
41
^SCR("P1T","P","NAME","GODAS")
84
^SCR("P1T","P","NAME","HNH1")
50
^SCR("P1T","P","NAME","HNHS")
22
^SCR("P1T","P","NAME","HRA")
80
^SCR("P1T","P","NAME","HZM")
3
^SCR("P1T","P","NAME","HZMLK")
81
^SCR("P1T","P","NAME","ITRAS")
83
^SCR("P1T","P","NAME","LKAH")
79
^SCR("P1T","P","NAME","LKHN")
76
^SCR("P1T","P","NAME","LKHN1")
77
^SCR("P1T","P","NAME","LKHNH")
82
^SCR("P1T","P","NAME","LKHR")
91
^SCR("P1T","P","NAME","LKHR1")
92
^SCR("P1T","P","NAME","MHKV")
87
^SCR("P1T","P","NAME","MSPTL")
85
^SCR("P1T","P","NAME","MZM")
35
^SCR("P1T","P","NAME","MZM1")
37
^SCR("P1T","P","NAME","MZMTB")
44
^SCR("P1T","P","NAME","MZMTB1")
46
^SCR("P1T","P","NAME","NAME")
10
^SCR("P1T","P","NAME","NCAB")
1
^SCR("P1T","P","NAME","NMB")
5
^SCR("P1T","P","NAME","ODEF")
47
^SCR("P1T","P","NAME","ODEFTL")
90
^SCR("P1T","P","NAME","RZN")
34
^SCR("P1T","P","NAME","SHAAR")
43
^SCR("P1T","P","NAME","SHUL")
33
^SCR("P1T","P","NAME","SHULA")
30
^SCR("P1T","P","NAME","TIP")
60
^SCR("P1T","P","NAME","TL")
74
^SCR("P1T","P","NAME","TL1")
75
^SCR("P1T","P","NAME","TSHL")
32
^SCR("P1T","P","NAME","TSHL0")
20
^SCR("P1T","P","NAME","ZN")
45
^SCR("P1T","P","NAME","ZN1")
48
^SCR("P1T","P","NM",1)
NCAB
^SCR("P1T","P","NM",3)
HZM
^SCR("P1T","P","NM",5)
NMB
^SCR("P1T","P","NM",10)
NAME
^SCR("P1T","P","NM",20)
TSHL0
^SCR("P1T","P","NM",22)
HNHS
^SCR("P1T","P","NM",30)
SHULA
^SCR("P1T","P","NM",32)
TSHL
^SCR("P1T","P","NM",33)
SHUL
^SCR("P1T","P","NM",34)
RZN
^SCR("P1T","P","NM",35)
MZM
^SCR("P1T","P","NM",37)
MZM1
^SCR("P1T","P","NM",40)
CHK
^SCR("P1T","P","NM",41)
CHK1
^SCR("P1T","P","NM",43)
SHAAR
^SCR("P1T","P","NM",44)
MZMTB
^SCR("P1T","P","NM",45)
ZN
^SCR("P1T","P","NM",46)
MZMTB1
^SCR("P1T","P","NM",47)
ODEF
^SCR("P1T","P","NM",48)
ZN1
^SCR("P1T","P","NM",50)
HNH1
^SCR("P1T","P","NM",60)
TIP
^SCR("P1T","P","NM",72)
CA
^SCR("P1T","P","NM",73)
CA1
^SCR("P1T","P","NM",74)
TL
^SCR("P1T","P","NM",75)
TL1
^SCR("P1T","P","NM",76)
LKHN
^SCR("P1T","P","NM",77)
LKHN1
^SCR("P1T","P","NM",78)
ASRL
^SCR("P1T","P","NM",79)
LKAH
^SCR("P1T","P","NM",80)
HRA
^SCR("P1T","P","NM",81)
HZMLK
^SCR("P1T","P","NM",82)
LKHNH
^SCR("P1T","P","NM",83)
ITRAS
^SCR("P1T","P","NM",84)
GODAS
^SCR("P1T","P","NM",85)
MSPTL
^SCR("P1T","P","NM",87)
MHKV
^SCR("P1T","P","NM",89)
ASR
^SCR("P1T","P","NM",90)
ODEFTL
^SCR("P1T","P","NM",91)
LKHR
^SCR("P1T","P","NM",92)
LKHR1
^SCR("P1T","P","RB",1)
6,8,8,79
^SCR("P1T","P","REF",2)
^THZ(%L3MYDVN,"CB","CH")
^SCR("P1T","P","REF",2,"RZD")
*
^SCR("P1T","P","REF",2,"STR")
CHK*NCHECK*TZ*BSN*HESH*DATP
^SCR("P1T","P","REF",3)
^THZ(%L3MYDVN,"CB","HRA")
^SCR("P1T","P","REF",3,"RZD")
**
^SCR("P1T","P","REF",3,"STR")
HRA
^SCR("P1T","P","REF",4)
^THZ(%L3MYDVN,"CB","ASR")
^SCR("P1T","P","REF",4,"RZD")
*
^SCR("P1T","P","REF",4,"STR")
LKHN*LKAH*LKHNH
^SCR("P1T1")
H
^SCR("P1T1",1)
                              {03       }: 'qn dpnfd        {01   }:qn zipeayg 
^SCR("P1T1",2)
              {                     10} {05        }:   (lh) gewl 'qn e` ogley 
^SCR("P1T1",3)
                                                                               
^SCR("P1T1",4)
                                   {22     }: zegpd k"dq  {20     }: dgpd iptl 
^SCR("P1T1",5)
                                                                             1]
^SCR("P1T1",6)
            {34    }:dxzi  {30      }:dtwd  {33     }:mley  {32     }: melyzl  
^SCR("P1T1",7)
       [1                                                                      
^SCR("P1T1",8)
                                                        {50      }: ztqep dgpd 
^SCR("P1T1",9)
                                                                               
^SCR("P1T1",10)
                       g"y {47     }: scer  {37     } + {35      }:onefna mley 
^SCR("P1T1",11)
                                       {48{46       }{45{44      }{43        } 
^SCR("P1T1",12)
                                            {41     } + {40      }:  wiya mley 
^SCR("P1T1",13)
                            {60     }: tih  {73     } + {72      }: `""ka mley 
^SCR("P1T1",14)
       {90    }: yelza scer {85     } dgpd  {75     } + {74      }: yelza mley 
^SCR("P1T1",15)
                                                                               
^SCR("P1T1",16)
              {                                   92} {91        }:  iy`x gewl 
^SCR("P1T1",17)
   {81    }: gewl ly dpnfd  {                     77} {76        }:  gewl xtqn 
^SCR("P1T1",18)
                       {87    } :reaw xign {84     }:i`xy` lceb {83    }: dxzi 
^SCR("P1T1",19)
 {89      }: dgpd ixg` {78      } :  dgpd iptl   {82     } = {79 }:gewll dgpd% 
^SCR("P1T1",20)
    {                                                         80}:       dxrd  
^SCR("P1T1","A",1)
:'‘Ž„�Ž†„:‘Žš‰�…�™‡
^SCR("P1T1","A",2)
:(Œˆ)‡…—Œ'‘Ž…€�‡Œ…™
^SCR("P1T1","A",3)

^SCR("P1T1","A",4)
:š…‡�„‹"„‘:„‡�„‰�”Œ
^SCR("P1T1","A",5)

^SCR("P1T1","A",6)
:„˜š‰:„”—„:�Œ…™:�…Œ™šŒ
^SCR("P1T1","A",7)

^SCR("P1T1","A",8)
:š”‘…�„‡�„
^SCR("P1T1","A",9)

^SCR("P1T1","A",10)
‡"™:“ƒ…’+:�Ž…†Ž��Œ…™
^SCR("P1T1","A",11)

^SCR("P1T1","A",12)
+:—‰™��Œ…™
^SCR("P1T1","A",13)
:”‰ˆ+:€""‹��Œ…™
^SCR("P1T1","A",14)
:™…Œš�“ƒ…’„‡�„+:™…Œš��Œ…™
^SCR("P1T1","A",15)

^SCR("P1T1","A",16)
:‰™€˜‡…—Œ
^SCR("P1T1","A",17)
:‡…—ŒŒ™„�Ž†„:‡…—Œ˜”‘Ž
^SCR("P1T1","A",18)
:’…�—˜‰‡Ž:‰€˜™€Œƒ…‚:„˜š‰
^SCR("P1T1","A",19)
:„‡�„‰˜‡€:„‡�„‰�”Œ=:‡…—ŒŒ„‡�„%
^SCR("P1T1","A",20)
:„˜’„
^SCR("P1T1","AV",1)
:wxnvbnzv:xn,hbucaj
^SCR("P1T1","AV",2)
:(ky)juekwxnutijkua
^SCR("P1T1","AV",3)

^SCR("P1T1","AV",4)
:,ujbvf"vx:vjbvhbpk
^SCR("P1T1","AV",5)

^SCR("P1T1","AV",6)
:vr,h:vpev:okua:ouka,k
^SCR("P1T1","AV",7)

^SCR("P1T1","AV",8)
:,pxubvjbv
^SCR("P1T1","AV",9)

^SCR("P1T1","AV",10)
j"a:;sug+:inuzncokua
^SCR("P1T1","AV",11)

^SCR("P1T1","AV",12)
+:ehacokua
^SCR("P1T1","AV",13)
:phy+:t""fcokua
^SCR("P1T1","AV",14)
:auk,c;sugvjbv+:auk,cokua
^SCR("P1T1","AV",15)

^SCR("P1T1","AV",16)
:hatrjuek
^SCR("P1T1","AV",17)
:juekkavbnzv:juekrpxn
^SCR("P1T1","AV",18)
:gucerhjn:htratksud:vr,h
^SCR("P1T1","AV",19)
:vjbvhrjt:vjbvhbpk=:juekkvjbv%
^SCR("P1T1","AV",20)
:vrgv
^SCR("P1T1","NAME")

^SCR("P1T1","P",1,"CRD")
1,60,E,6,0
^SCR("P1T1","P",1,"HELP")

^SCR("P1T1","P",1,"LMAX")
6
^SCR("P1T1","P",1,"MUMPS1")

^SCR("P1T1","P",1,"MUMPS2")

^SCR("P1T1","P",1,"OUTPUT")

^SCR("P1T1","P",1,"TYP")
E
^SCR("P1T1","P",3,"CRD")
1,30,E,10,0
^SCR("P1T1","P",3,"HELP")

^SCR("P1T1","P",3,"LMAX")
10
^SCR("P1T1","P",3,"MUMPS1")

^SCR("P1T1","P",3,"MUMPS2")

^SCR("P1T1","P",3,"OUTPUT")

^SCR("P1T1","P",3,"TYP")
E
^SCR("P1T1","P",5,"CRD")
2,40,E,11,0
^SCR("P1T1","P",5,"HELP")

^SCR("P1T1","P",5,"LMAX")
11
^SCR("P1T1","P",5,"MUMPS1")

^SCR("P1T1","P",5,"MUMPS2")

^SCR("P1T1","P",5,"OUTPUT")

^SCR("P1T1","P",5,"TYP")
E
^SCR("P1T1","P",10,"CRD")
2,39,H,20
^SCR("P1T1","P",10,"HELP")

^SCR("P1T1","P",10,"LMAX")
24
^SCR("P1T1","P",10,"MUMPS1")

^SCR("P1T1","P",10,"MUMPS2")

^SCR("P1T1","P",10,"OUTPUT")

^SCR("P1T1","P",10,"TYP")
H
^SCR("P1T1","P",20,"CRD")
4,58,N,8,2
^SCR("P1T1","P",20,"HELP")

^SCR("P1T1","P",20,"LMAX")
8
^SCR("P1T1","P",20,"MUMPS1")

^SCR("P1T1","P",20,"MUMPS2")

^SCR("P1T1","P",20,"OUTPUT")

^SCR("P1T1","P",20,"TYP")
N
^SCR("P1T1","P",22,"CRD")
4,35,N,8,2
^SCR("P1T1","P",22,"HELP")

^SCR("P1T1","P",22,"LMAX")
8
^SCR("P1T1","P",22,"MUMPS1")

^SCR("P1T1","P",22,"MUMPS2")

^SCR("P1T1","P",22,"OUTPUT")

^SCR("P1T1","P",22,"TYP")
N
^SCR("P1T1","P",30,"CRD")
6,27,N,9,2
^SCR("P1T1","P",30,"HELP")

^SCR("P1T1","P",30,"LMAX")
9
^SCR("P1T1","P",30,"MUMPS1")

^SCR("P1T1","P",30,"MUMPS2")

^SCR("P1T1","P",30,"OUTPUT")

^SCR("P1T1","P",30,"TYP")
N
^SCR("P1T1","P",32,"CRD")
6,60,N,8,2
^SCR("P1T1","P",32,"HELP")

^SCR("P1T1","P",32,"LMAX")
8
^SCR("P1T1","P",32,"MUMPS1")

^SCR("P1T1","P",32,"MUMPS2")

^SCR("P1T1","P",32,"OUTPUT")

^SCR("P1T1","P",32,"TYP")
N
^SCR("P1T1","P",33,"CRD")
6,44,N,8,2
^SCR("P1T1","P",33,"HELP")

^SCR("P1T1","P",33,"LMAX")
8
^SCR("P1T1","P",33,"MUMPS1")

^SCR("P1T1","P",33,"MUMPS2")

^SCR("P1T1","P",33,"OUTPUT")

^SCR("P1T1","P",33,"TYP")
N
^SCR("P1T1","P",34,"CRD")
6,12,N,7,2
^SCR("P1T1","P",34,"HELP")

^SCR("P1T1","P",34,"LMAX")
7
^SCR("P1T1","P",34,"MUMPS1")

^SCR("P1T1","P",34,"MUMPS2")

^SCR("P1T1","P",34,"OUTPUT")

^SCR("P1T1","P",34,"TYP")
N
^SCR("P1T1","P",35,"CRD")
10,56,N,8,2
^SCR("P1T1","P",35,"HELP")
CTRL+X - oeaygn  , <F5> - 2-l wlgl, <F1> - wegnl
^SCR("P1T1","P",35,"LMAX")
9
^SCR("P1T1","P",35,"MUMPS1")

^SCR("P1T1","P",35,"MUMPS2")
I %TO="F5" S MZM=$J(MZM/2,2,2)
^SCR("P1T1","P",35,"TYP")
N
^SCR("P1T1","P",37,"CRD")
10,44,N,8,2
^SCR("P1T1","P",37,"HELP")

^SCR("P1T1","P",37,"LMAX")
8
^SCR("P1T1","P",37,"MUMPS1")

^SCR("P1T1","P",37,"MUMPS2")

^SCR("P1T1","P",37,"TYP")
N
^SCR("P1T1","P",40,"CRD")
12,56,N,8,2
^SCR("P1T1","P",40,"HELP")

^SCR("P1T1","P",40,"LMAX")
9
^SCR("P1T1","P",40,"MUMPS1")

^SCR("P1T1","P",40,"MUMPS2")

^SCR("P1T1","P",40,"TYP")
N
^SCR("P1T1","P",41,"CRD")
12,44,N,8,2
^SCR("P1T1","P",41,"HELP")
<F7> - miwiy zbvdl 
^SCR("P1T1","P",41,"LMAX")
8
^SCR("P1T1","P",41,"MUMPS1")

^SCR("P1T1","P",41,"MUMPS2")
D CHK1^P1T
^SCR("P1T1","P",41,"TYP")
N
^SCR("P1T1","P",43,"CRD")
11,66,E,11,0
^SCR("P1T1","P",43,"HELP")

^SCR("P1T1","P",43,"LMAX")
11
^SCR("P1T1","P",43,"MUMPS1")

^SCR("P1T1","P",43,"MUMPS2")

^SCR("P1T1","P",43,"OUTPUT")

^SCR("P1T1","P",43,"TYP")
E
^SCR("P1T1","P",44,"CRD")
11,56,N,9,2
^SCR("P1T1","P",44,"HELP")

^SCR("P1T1","P",44,"LMAX")
9
^SCR("P1T1","P",44,"MUMPS1")

^SCR("P1T1","P",44,"MUMPS2")
D MZMTB^P1T
^SCR("P1T1","P",44,"TYP")
N
^SCR("P1T1","P",45,"CRD")
11,53,E,2,0
^SCR("P1T1","P",45,"HELP")

^SCR("P1T1","P",45,"LMAX")
3
^SCR("P1T1","P",45,"MUMPS1")

^SCR("P1T1","P",45,"MUMPS2")

^SCR("P1T1","P",45,"OUTPUT")

^SCR("P1T1","P",45,"TYP")
E
^SCR("P1T1","P",46,"CRD")
11,42,N,10,2
^SCR("P1T1","P",46,"HELP")

^SCR("P1T1","P",46,"LMAX")
10
^SCR("P1T1","P",46,"MUMPS1")

^SCR("P1T1","P",46,"MUMPS2")
D MZMTB^P1T
^SCR("P1T1","P",46,"TYP")
N
^SCR("P1T1","P",47,"CRD")
10,27,N,3,2
^SCR("P1T1","P",47,"HELP")

^SCR("P1T1","P",47,"LMAX")
8
^SCR("P1T1","P",47,"MUMPS1")

^SCR("P1T1","P",47,"MUMPS2")

^SCR("P1T1","P",47,"OUTPUT")

^SCR("P1T1","P",47,"TYP")
N
^SCR("P1T1","P",48,"CRD")
11,39,E,2,0
^SCR("P1T1","P",48,"HELP")

^SCR("P1T1","P",48,"LMAX")
3
^SCR("P1T1","P",48,"MUMPS1")

^SCR("P1T1","P",48,"MUMPS2")

^SCR("P1T1","P",48,"OUTPUT")

^SCR("P1T1","P",48,"TYP")
E
^SCR("P1T1","P",50,"CRD")
8,56,N,8,2
^SCR("P1T1","P",50,"HELP")

^SCR("P1T1","P",50,"LMAX")
9
^SCR("P1T1","P",50,"MUMPS1")

^SCR("P1T1","P",50,"MUMPS2")

^SCR("P1T1","P",50,"TYP")
N
^SCR("P1T1","P",60,"CRD")
13,28,N,7,2
^SCR("P1T1","P",60,"HELP")

^SCR("P1T1","P",60,"LMAX")
8
^SCR("P1T1","P",60,"MUMPS1")

^SCR("P1T1","P",60,"MUMPS2")

^SCR("P1T1","P",60,"OUTPUT")

^SCR("P1T1","P",60,"TYP")
N
^SCR("P1T1","P",72,"CRD")
13,56,N,8,2
^SCR("P1T1","P",72,"HELP")
<F5> - mieey miwlgl miqihxkd oiia wlgl ,<F3> - minelyz 
^SCR("P1T1","P",72,"LMAX")
9
^SCR("P1T1","P",72,"MUMPS1")

^SCR("P1T1","P",72,"MUMPS2")

^SCR("P1T1","P",72,"TYP")
N
^SCR("P1T1","P",73,"CRD")
13,44,N,8,2
^SCR("P1T1","P",73,"HELP")
<F7> - `"k zbvd ,<F5> - mieey miwlgl miqihxkd oia wlgl , <F3> - minelyz  
^SCR("P1T1","P",73,"LMAX")
8
^SCR("P1T1","P",73,"MUMPS1")

^SCR("P1T1","P",73,"MUMPS2")
D CA1^P1T
^SCR("P1T1","P",73,"TYP")
N
^SCR("P1T1","P",74,"CRD")
14,56,N,8,2
^SCR("P1T1","P",74,"HELP")

^SCR("P1T1","P",74,"LMAX")
9
^SCR("P1T1","P",74,"MUMPS1")

^SCR("P1T1","P",74,"MUMPS2")

^SCR("P1T1","P",74,"TYP")
N
^SCR("P1T1","P",75,"CRD")
14,44,N,8,2
^SCR("P1T1","P",75,"HELP")

^SCR("P1T1","P",75,"LMAX")
8
^SCR("P1T1","P",75,"MUMPS1")

^SCR("P1T1","P",75,"MUMPS2")

^SCR("P1T1","P",75,"TYP")
N
^SCR("P1T1","P",76,"CRD")
17,54,E,10,0
^SCR("P1T1","P",76,"FNC")
F9
^SCR("P1T1","P",76,"GLOB")
LKH
^SCR("P1T1","P",76,"HELP")
<F9>- gewl qihxk,<F8>-minelyz zniyx ,<F7>- zegewl zniyx ,<F6>- my itl yetig
^SCR("P1T1","P",76,"LMAX")
11
^SCR("P1T1","P",76,"MUMPS1")
D LKHN0^P1T
^SCR("P1T1","P",76,"MUMPS2")
D LKHN^P1T
^SCR("P1T1","P",76,"NLN")
20
^SCR("P1T1","P",76,"RZD")
\
^SCR("P1T1","P",76,"TOPB")
8
^SCR("P1T1","P",76,"TYP")
E
^SCR("P1T1","P",76,"VRB")
LKHN1
^SCR("P1T1","P",77,"CRD")
17,53,H,22
^SCR("P1T1","P",77,"HELP")

^SCR("P1T1","P",77,"LMAX")
24
^SCR("P1T1","P",77,"MUMPS1")

^SCR("P1T1","P",77,"MUMPS2")

^SCR("P1T1","P",77,"OUTPUT")

^SCR("P1T1","P",77,"TYP")
H
^SCR("P1T1","P",78,"CRD")
19,23,N,8,2
^SCR("P1T1","P",78,"HELP")
<F8> - dtwda minelyz zniyx 
^SCR("P1T1","P",78,"LMAX")
9
^SCR("P1T1","P",78,"MUMPS1")
D ASRL0^P1T
^SCR("P1T1","P",78,"MUMPS2")
D AS^P1T
^SCR("P1T1","P",78,"TYP")
N
^SCR("P1T1","P",79,"CRD")
19,61,N,4,1
^SCR("P1T1","P",79,"HELP")

^SCR("P1T1","P",79,"LMAX")
4
^SCR("P1T1","P",79,"MUMPS1")

^SCR("P1T1","P",79,"MUMPS2")
D LKAH^P1T
^SCR("P1T1","P",79,"OUTPUT")

^SCR("P1T1","P",79,"TYP")
N
^SCR("P1T1","P",80,"CRD")
20,65,H,60
^SCR("P1T1","P",80,"HELP")

^SCR("P1T1","P",80,"LMAX")
60
^SCR("P1T1","P",80,"MUMPS1")

^SCR("P1T1","P",80,"MUMPS2")

^SCR("P1T1","P",80,"TYP")
H
^SCR("P1T1","P",81,"CRD")
17,3,E,7,0
^SCR("P1T1","P",81,"HELP")

^SCR("P1T1","P",81,"LMAX")
7
^SCR("P1T1","P",81,"MUMPS1")

^SCR("P1T1","P",81,"MUMPS2")

^SCR("P1T1","P",81,"TYP")
E
^SCR("P1T1","P",82,"CRD")
19,49,N,6,2
^SCR("P1T1","P",82,"HELP")

^SCR("P1T1","P",82,"LMAX")
8
^SCR("P1T1","P",82,"MUMPS1")

^SCR("P1T1","P",82,"MUMPS2")

^SCR("P1T1","P",82,"TYP")
N
^SCR("P1T1","P",83,"CRD")
18,64,N,7,2
^SCR("P1T1","P",83,"HELP")

^SCR("P1T1","P",83,"LMAX")
7
^SCR("P1T1","P",83,"MUMPS1")

^SCR("P1T1","P",83,"MUMPS2")

^SCR("P1T1","P",83,"OUTPUT")

^SCR("P1T1","P",83,"TYP")
N
^SCR("P1T1","P",84,"CRD")
18,43,N,8,2
^SCR("P1T1","P",84,"HELP")

^SCR("P1T1","P",84,"LMAX")
8
^SCR("P1T1","P",84,"MUMPS1")

^SCR("P1T1","P",84,"MUMPS2")

^SCR("P1T1","P",84,"OUTPUT")

^SCR("P1T1","P",84,"TYP")
N
^SCR("P1T1","P",85,"CRD")
14,28,N,7,2
^SCR("P1T1","P",85,"HELP")

^SCR("P1T1","P",85,"LMAX")
8
^SCR("P1T1","P",85,"MUMPS1")

^SCR("P1T1","P",85,"MUMPS2")

^SCR("P1T1","P",85,"OUTPUT")

^SCR("P1T1","P",85,"TYP")
N
^SCR("P1T1","P",87,"CRD")
18,23,N,7,2
^SCR("P1T1","P",87,"HELP")

^SCR("P1T1","P",87,"LMAX")
7
^SCR("P1T1","P",87,"MUMPS1")

^SCR("P1T1","P",87,"MUMPS2")

^SCR("P1T1","P",87,"OUTPUT")

^SCR("P1T1","P",87,"TYP")
N
^SCR("P1T1","P",89,"CRD")
19,1,N,9,2
^SCR("P1T1","P",89,"HELP")

^SCR("P1T1","P",89,"LMAX")
9
^SCR("P1T1","P",89,"MUMPS1")

^SCR("P1T1","P",89,"MUMPS2")

^SCR("P1T1","P",89,"OUTPUT")

^SCR("P1T1","P",89,"TYP")
N
^SCR("P1T1","P",90,"CRD")
14,7,N,7,2
^SCR("P1T1","P",90,"HELP")

^SCR("P1T1","P",90,"LMAX")
7
^SCR("P1T1","P",90,"MUMPS1")

^SCR("P1T1","P",90,"MUMPS2")

^SCR("P1T1","P",90,"OUTPUT")

^SCR("P1T1","P",90,"TYP")
N
^SCR("P1T1","P",91,"CRD")
16,54,E,10,0
^SCR("P1T1","P",91,"HELP")

^SCR("P1T1","P",91,"LMAX")
11
^SCR("P1T1","P",91,"MUMPS1")

^SCR("P1T1","P",91,"MUMPS2")

^SCR("P1T1","P",91,"OUTPUT")

^SCR("P1T1","P",91,"TYP")
E
^SCR("P1T1","P",92,"CRD")
16,53,H,38
^SCR("P1T1","P",92,"HELP")

^SCR("P1T1","P",92,"LMAX")
38
^SCR("P1T1","P",92,"MUMPS1")

^SCR("P1T1","P",92,"MUMPS2")

^SCR("P1T1","P",92,"OUTPUT")

^SCR("P1T1","P",92,"TYP")
H
^SCR("P1T1","P","NAME","ASR")
89
^SCR("P1T1","P","NAME","ASRL")
78
^SCR("P1T1","P","NAME","CA")
72
^SCR("P1T1","P","NAME","CA1")
73
^SCR("P1T1","P","NAME","CHK")
40
^SCR("P1T1","P","NAME","CHK1")
41
^SCR("P1T1","P","NAME","GODAS")
84
^SCR("P1T1","P","NAME","HNH1")
50
^SCR("P1T1","P","NAME","HNHS")
22
^SCR("P1T1","P","NAME","HNHTL")
85
^SCR("P1T1","P","NAME","HRA")
80
^SCR("P1T1","P","NAME","HZM")
3
^SCR("P1T1","P","NAME","HZMLK")
81
^SCR("P1T1","P","NAME","ITRAS")
83
^SCR("P1T1","P","NAME","LKAH")
79
^SCR("P1T1","P","NAME","LKHN")
76
^SCR("P1T1","P","NAME","LKHN1")
77
^SCR("P1T1","P","NAME","LKHNH")
82
^SCR("P1T1","P","NAME","LKHR")
91
^SCR("P1T1","P","NAME","LKHR1")
92
^SCR("P1T1","P","NAME","MHKV")
87
^SCR("P1T1","P","NAME","MZM")
35
^SCR("P1T1","P","NAME","MZM1")
37
^SCR("P1T1","P","NAME","MZMTB")
44
^SCR("P1T1","P","NAME","MZMTB1")
46
^SCR("P1T1","P","NAME","NAME")
10
^SCR("P1T1","P","NAME","NCAB")
1
^SCR("P1T1","P","NAME","NMB")
5
^SCR("P1T1","P","NAME","ODEF")
47
^SCR("P1T1","P","NAME","ODEFTL")
90
^SCR("P1T1","P","NAME","RZN")
34
^SCR("P1T1","P","NAME","SHAAR")
43
^SCR("P1T1","P","NAME","SHUL")
33
^SCR("P1T1","P","NAME","SHULA")
30
^SCR("P1T1","P","NAME","TIP")
60
^SCR("P1T1","P","NAME","TL")
74
^SCR("P1T1","P","NAME","TL1")
75
^SCR("P1T1","P","NAME","TSHL")
32
^SCR("P1T1","P","NAME","TSHL0")
20
^SCR("P1T1","P","NAME","ZN")
45
^SCR("P1T1","P","NAME","ZN1")
48
^SCR("P1T1","P","NM",1)
NCAB
^SCR("P1T1","P","NM",3)
HZM
^SCR("P1T1","P","NM",5)
NMB
^SCR("P1T1","P","NM",10)
NAME
^SCR("P1T1","P","NM",20)
TSHL0
^SCR("P1T1","P","NM",22)
HNHS
^SCR("P1T1","P","NM",30)
SHULA
^SCR("P1T1","P","NM",32)
TSHL
^SCR("P1T1","P","NM",33)
SHUL
^SCR("P1T1","P","NM",34)
RZN
^SCR("P1T1","P","NM",35)
MZM
^SCR("P1T1","P","NM",37)
MZM1
^SCR("P1T1","P","NM",40)
CHK
^SCR("P1T1","P","NM",41)
CHK1
^SCR("P1T1","P","NM",43)
SHAAR
^SCR("P1T1","P","NM",44)
MZMTB
^SCR("P1T1","P","NM",45)
ZN
^SCR("P1T1","P","NM",46)
MZMTB1
^SCR("P1T1","P","NM",47)
ODEF
^SCR("P1T1","P","NM",48)
ZN1
^SCR("P1T1","P","NM",50)
HNH1
^SCR("P1T1","P","NM",60)
TIP
^SCR("P1T1","P","NM",72)
CA
^SCR("P1T1","P","NM",73)
CA1
^SCR("P1T1","P","NM",74)
TL
^SCR("P1T1","P","NM",75)
TL1
^SCR("P1T1","P","NM",76)
LKHN
^SCR("P1T1","P","NM",77)
LKHN1
^SCR("P1T1","P","NM",78)
ASRL
^SCR("P1T1","P","NM",79)
LKAH
^SCR("P1T1","P","NM",80)
HRA
^SCR("P1T1","P","NM",81)
HZMLK
^SCR("P1T1","P","NM",82)
LKHNH
^SCR("P1T1","P","NM",83)
ITRAS
^SCR("P1T1","P","NM",84)
GODAS
^SCR("P1T1","P","NM",85)
HNHTL
^SCR("P1T1","P","NM",87)
MHKV
^SCR("P1T1","P","NM",89)
ASR
^SCR("P1T1","P","NM",90)
ODEFTL
^SCR("P1T1","P","NM",91)
LKHR
^SCR("P1T1","P","NM",92)
LKHR1
^SCR("P1T1","P","RB",1)
6,8,8,79
^SCR("P1T1","P","REF",2)
^THZ(%L3MYDVN,"CB","CH")
^SCR("P1T1","P","REF",2,"RZD")
*
^SCR("P1T1","P","REF",2,"STR")
CHK*NCHECK*TZ*BSN*HESH*DATP
^SCR("P1T1","P","REF",3)
^THZ(%L3MYDVN,"CB","HRA")
^SCR("P1T1","P","REF",3,"RZD")
**
^SCR("P1T1","P","REF",3,"STR")
HRA
^SCR("P1T1","P","REF",4)
^THZ(%L3MYDVN,"CB","ASR")
^SCR("P1T1","P","REF",4,"RZD")
*
^SCR("P1T1","P","REF",4,"STR")
LKHN*LKAH*LKHNH
^SCR("P1TAVD")
H
^SCR("P1TAVD",1)
                                  # dcear zipkez #                             
^SCR("P1TAVD",2)
                                                                               
^SCR("P1TAVD",3)
                                         {10 } mei   {05     }: jix`z          
^SCR("P1TAVD",4)
                                                                             1$
^SCR("P1TAVD",5)
           :       dxrd     : dry cr : dryn :        caer my      :caer 'qn:   
^SCR("P1TAVD",6)
                                                                               
^SCR("P1TAVD",7)
                                                                               
^SCR("P1TAVD",8)
                                                                               
^SCR("P1TAVD",9)
                                                                               
^SCR("P1TAVD",10)
                                                                               
^SCR("P1TAVD",11)
                                                                               
^SCR("P1TAVD",12)
                                                                               
^SCR("P1TAVD",13)
                                                                               
^SCR("P1TAVD",14)
                                                                               
^SCR("P1TAVD",15)
                                                                               
^SCR("P1TAVD",16)
                                                                               
^SCR("P1TAVD",17)
                                                                               
^SCR("P1TAVD",18)
                                                                               
^SCR("P1TAVD",19)
       $1                                                                      
^SCR("P1TAVD",20)
                                                                               
^SCR("P1TAVD","A",1)
„ƒ…�’š‰�‹…š
^SCR("P1TAVD","A",2)

^SCR("P1TAVD","A",3)
�…‰:Š‰˜€š
^SCR("P1TAVD","A",4)

^SCR("P1TAVD","A",5)
„˜’„„’™ƒ’„’™Žƒ�…’�™ƒ�…’'‘Ž
^SCR("P1TAVD","A",6)
--------------------------------------------------------------
^SCR("P1TAVD","A",7)

^SCR("P1TAVD","A",8)

^SCR("P1TAVD","A",9)

^SCR("P1TAVD","A",10)

^SCR("P1TAVD","A",11)

^SCR("P1TAVD","A",12)

^SCR("P1TAVD","A",13)

^SCR("P1TAVD","A",14)

^SCR("P1TAVD","A",15)

^SCR("P1TAVD","A",16)

^SCR("P1TAVD","A",17)

^SCR("P1TAVD","A",18)

^SCR("P1TAVD","A",19)

^SCR("P1TAVD","A",20)

^SCR("P1TAVD","AV",1)
vsucg,hbfu,
^SCR("P1TAVD","AV",2)

^SCR("P1TAVD","AV",3)
ouh:lhrt,
^SCR("P1TAVD","AV",4)

^SCR("P1TAVD","AV",5)
vrgvvgasgvganscugoascugwxn
^SCR("P1TAVD","AV",6)
--------------------------------------------------------------
^SCR("P1TAVD","AV",7)

^SCR("P1TAVD","AV",8)

^SCR("P1TAVD","AV",9)

^SCR("P1TAVD","AV",10)

^SCR("P1TAVD","AV",11)

^SCR("P1TAVD","AV",12)

^SCR("P1TAVD","AV",13)

^SCR("P1TAVD","AV",14)

^SCR("P1TAVD","AV",15)

^SCR("P1TAVD","AV",16)

^SCR("P1TAVD","AV",17)

^SCR("P1TAVD","AV",18)

^SCR("P1TAVD","AV",19)

^SCR("P1TAVD","AV",20)

^SCR("P1TAVD","G",1,"CHECK")
Y
^SCR("P1TAVD","G",1,"CRD")
6,75,N,5.,0
^SCR("P1TAVD","G",1,"FNC")

^SCR("P1TAVD","G",1,"GLOB")
NAME
^SCR("P1TAVD","G",1,"HELP")

^SCR("P1TAVD","G",1,"LMAX")
8
^SCR("P1TAVD","G",1,"MUMPS1")

^SCR("P1TAVD","G",1,"MUMPS2")
D OVED^P1TAVD
^SCR("P1TAVD","G",1,"MUST")

^SCR("P1TAVD","G",1,"NLN")
20
^SCR("P1TAVD","G",1,"RZD")
\
^SCR("P1TAVD","G",1,"SHEM")
caer 'qn
^SCR("P1TAVD","G",1,"TOPB")
8
^SCR("P1TAVD","G",1,"TYP")
N
^SCR("P1TAVD","G",2,"CRD")
6,66,H,20,0
^SCR("P1TAVD","G",2,"HELP")

^SCR("P1TAVD","G",2,"LMAX")
21
^SCR("P1TAVD","G",2,"MUMPS1")

^SCR("P1TAVD","G",2,"MUMPS2")

^SCR("P1TAVD","G",2,"OUTPUT")

^SCR("P1TAVD","G",2,"SHEM")
        caer my      
^SCR("P1TAVD","G",2,"TYP")
H
^SCR("P1TAVD","G",3,"CRD")
6,44,T,5,0
^SCR("P1TAVD","G",3,"HELP")

^SCR("P1TAVD","G",3,"LMAX")
6
^SCR("P1TAVD","G",3,"MUMPS1")

^SCR("P1TAVD","G",3,"MUMPS2")

^SCR("P1TAVD","G",3,"MUST")

^SCR("P1TAVD","G",3,"SHEM")
 dryn 
^SCR("P1TAVD","G",3,"TYP")
T
^SCR("P1TAVD","G",4,"CRD")
6,37,T,5,0
^SCR("P1TAVD","G",4,"HELP")

^SCR("P1TAVD","G",4,"LMAX")
8
^SCR("P1TAVD","G",4,"MUMPS1")

^SCR("P1TAVD","G",4,"MUMPS2")

^SCR("P1TAVD","G",4,"MUST")

^SCR("P1TAVD","G",4,"SHEM")
 dry cr 
^SCR("P1TAVD","G",4,"TYP")
T
^SCR("P1TAVD","G",5,"CRD")
6,28,H,16,0
^SCR("P1TAVD","G",5,"HELP")

^SCR("P1TAVD","G",5,"LMAX")
16
^SCR("P1TAVD","G",5,"MUMPS1")

^SCR("P1TAVD","G",5,"MUMPS2")

^SCR("P1TAVD","G",5,"SHEM")
       dxrd     
^SCR("P1TAVD","G",5,"TYP")
H
^SCR("P1TAVD","G","DEL")
Y
^SCR("P1TAVD","G","MAX")
9999
^SCR("P1TAVD","G","NAME","ADSHAA")
4
^SCR("P1TAVD","G","NAME","HRA")
5
^SCR("P1TAVD","G","NAME","MESHAA")
3
^SCR("P1TAVD","G","NAME","OVED")
1
^SCR("P1TAVD","G","NAME","OVED1")
2
^SCR("P1TAVD","G","NM",1)
OVED
^SCR("P1TAVD","G","NM",2)
OVED1
^SCR("P1TAVD","G","NM",3)
MESHAA
^SCR("P1TAVD","G","NM",4)
ADSHAA
^SCR("P1TAVD","G","NM",5)
HRA
^SCR("P1TAVD","G","RB")
5,8,20,79
^SCR("P1TAVD","G","REF")
^TEMP($P,"T"
^SCR("P1TAVD","G","RZD")
\
^SCR("P1TAVD","G","STEP")
1
^SCR("P1TAVD","G","STG")
           :       dxrd     : dry cr : dryn :        caer my      :caer 'qn:   
^SCR("P1TAVD","G","VG")
7
^SCR("P1TAVD","NAME")

^SCR("P1TAVD","P",5,"CRD")
3,53,D,8,0
^SCR("P1TAVD","P",5,"HELP")

^SCR("P1TAVD","P",5,"LMAX")
8
^SCR("P1TAVD","P",5,"MUMPS1")

^SCR("P1TAVD","P",5,"MUMPS2")

^SCR("P1TAVD","P",5,"OUTPUT")

^SCR("P1TAVD","P",5,"TYP")
D
^SCR("P1TAVD","P",10,"CRD")
3,41,E,2,0
^SCR("P1TAVD","P",10,"HELP")

^SCR("P1TAVD","P",10,"LMAX")
4
^SCR("P1TAVD","P",10,"MUMPS1")

^SCR("P1TAVD","P",10,"MUMPS2")

^SCR("P1TAVD","P",10,"OUTPUT")

^SCR("P1TAVD","P",10,"TYP")
E
^SCR("P1TAVD","P","NAME","DAT")
5
^SCR("P1TAVD","P","NAME","JOM")
10
^SCR("P1TAVD","P","NM",5)
DAT
^SCR("P1TAVD","P","NM",10)
JOM
^SCR("P1TFR")
H
^SCR("P1TFR",1)
                                      # hixtz zxcbd #                          
^SCR("P1TFR",2)
                                                                               
^SCR("P1TFR",3)
                            {                    06} {05   } : mihixt zveaw    
^SCR("P1TFR",4)
                                               {10      }:oexg` oekcr jix`z    
^SCR("P1TFR",5)
                                                                          1$   
^SCR("P1TFR",6)
         :'tcn xe`z :'tcn 'qn  :  xign  :       hixt xe`z   : hixt cew :       
^SCR("P1TFR",7)
                                                                               
^SCR("P1TFR",8)
                                                                               
^SCR("P1TFR",9)
                                                                               
^SCR("P1TFR",10)
                                                                               
^SCR("P1TFR",11)
                                                                               
^SCR("P1TFR",12)
                                                                               
^SCR("P1TFR",13)
                                                                               
^SCR("P1TFR",14)
                                                                               
^SCR("P1TFR",15)
                                                                               
^SCR("P1TFR",16)
                                                                               
^SCR("P1TFR",17)
                                                                               
^SCR("P1TFR",18)
                                                                               
^SCR("P1TFR",19)
                                                                               
^SCR("P1TFR",20)
     $1                                                                        
^SCR("P1TFR",21)
                                                                               
^SCR("P1TFR",22)
     {                                                               15}: dxrd 
^SCR("P1TFR","A",1)
ˆ‰˜”šš˜ƒ‚„
^SCR("P1TFR","A",2)

^SCR("P1TFR","A",3)
:�‰ˆ‰˜”š–…�—
^SCR("P1TFR","A",4)
:�…˜‡€�…‹ƒ’Š‰˜€š
^SCR("P1TFR","A",5)

^SCR("P1TFR","A",6)
'”ƒŽ˜…€š'”ƒŽ'‘Ž˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1TFR","A",7)
---------------------------------------------------------
^SCR("P1TFR","A",8)

^SCR("P1TFR","A",9)

^SCR("P1TFR","A",10)

^SCR("P1TFR","A",11)

^SCR("P1TFR","A",12)

^SCR("P1TFR","A",13)

^SCR("P1TFR","A",14)

^SCR("P1TFR","A",15)

^SCR("P1TFR","A",16)

^SCR("P1TFR","A",17)

^SCR("P1TFR","A",18)

^SCR("P1TFR","A",19)

^SCR("P1TFR","A",20)

^SCR("P1TFR","A",21)

^SCR("P1TFR","A",22)
:„˜’„
^SCR("P1TFR","AV",1)
yhrp,,rsdv
^SCR("P1TFR","AV",2)

^SCR("P1TFR","AV",3)
:ohyhrp,muce
^SCR("P1TFR","AV",4)
:iurjtiufsglhrt,
^SCR("P1TFR","AV",5)

^SCR("P1TFR","AV",6)
wpsnrut,wpsnwxnrhjnyhrprut,yhrpsue
^SCR("P1TFR","AV",7)
---------------------------------------------------------
^SCR("P1TFR","AV",8)

^SCR("P1TFR","AV",9)

^SCR("P1TFR","AV",10)

^SCR("P1TFR","AV",11)

^SCR("P1TFR","AV",12)

^SCR("P1TFR","AV",13)

^SCR("P1TFR","AV",14)

^SCR("P1TFR","AV",15)

^SCR("P1TFR","AV",16)

^SCR("P1TFR","AV",17)

^SCR("P1TFR","AV",18)

^SCR("P1TFR","AV",19)

^SCR("P1TFR","AV",20)

^SCR("P1TFR","AV",21)

^SCR("P1TFR","AV",22)
:vrgv
^SCR("P1TFR","G",1,"CRD")
7,71,E,8,0
^SCR("P1TFR","G",1,"FNC")
F9,F7
^SCR("P1TFR","G",1,"GLOB")
PAR
^SCR("P1TFR","G",1,"HELP")
<F9> - hixt qihxk <F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("P1TFR","G",1,"LMAX")
10
^SCR("P1TFR","G",1,"MUMPS1")

^SCR("P1TFR","G",1,"MUMPS2")
D PAR^P1TFR
^SCR("P1TFR","G",1,"MUST")

^SCR("P1TFR","G",1,"NLN")
20
^SCR("P1TFR","G",1,"RZD")
**
^SCR("P1TFR","G",1,"SHEM")
 hixt cew 
^SCR("P1TFR","G",1,"TOPB")
8
^SCR("P1TFR","G",1,"TYP")
E
^SCR("P1TFR","G",1,"VRB")
PAR1
^SCR("P1TFR","G",2,"CRD")
7,60,H,19,0
^SCR("P1TFR","G",2,"HELP")

^SCR("P1TFR","G",2,"LMAX")
19
^SCR("P1TFR","G",2,"MUMPS1")

^SCR("P1TFR","G",2,"MUMPS2")

^SCR("P1TFR","G",2,"OUTPUT")

^SCR("P1TFR","G",2,"SHEM")
       hixt xe`z   
^SCR("P1TFR","G",2,"TYP")
H
^SCR("P1TFR","G",3,"CRD")
7,40,N,7,2
^SCR("P1TFR","G",3,"HELP")

^SCR("P1TFR","G",3,"LMAX")
8
^SCR("P1TFR","G",3,"MUMPS1")

^SCR("P1TFR","G",3,"MUMPS2")

^SCR("P1TFR","G",3,"OUTPUT")

^SCR("P1TFR","G",3,"SHEM")
  xign  
^SCR("P1TFR","G",3,"TYP")
N
^SCR("P1TFR","G",4,"CRD")
7,31,N,2,0
^SCR("P1TFR","G",4,"HELP")

^SCR("P1TFR","G",4,"LMAX")
10
^SCR("P1TFR","G",4,"MUMPS1")

^SCR("P1TFR","G",4,"MUMPS2")

^SCR("P1TFR","G",4,"OUTPUT")

^SCR("P1TFR","G",4,"SHEM")
'tcn 'qn  
^SCR("P1TFR","G",4,"TYP")
N
^SCR("P1TFR","G",5,"CRD")
7,20,H,10,0
^SCR("P1TFR","G",5,"HELP")

^SCR("P1TFR","G",5,"LMAX")
10
^SCR("P1TFR","G",5,"MUMPS1")

^SCR("P1TFR","G",5,"MUMPS2")

^SCR("P1TFR","G",5,"OUTPUT")

^SCR("P1TFR","G",5,"SHEM")
'tcn xe`z 
^SCR("P1TFR","G",5,"TYP")
H
^SCR("P1TFR","G","DEL")
Y
^SCR("P1TFR","G","MAX")
9999
^SCR("P1TFR","G","NAME","MDP")
4
^SCR("P1TFR","G","NAME","MDP1")
5
^SCR("P1TFR","G","NAME","MH")
3
^SCR("P1TFR","G","NAME","PAR")
1
^SCR("P1TFR","G","NAME","PAR1")
2
^SCR("P1TFR","G","NM",1)
PAR
^SCR("P1TFR","G","NM",2)
PAR1
^SCR("P1TFR","G","NM",3)
MH
^SCR("P1TFR","G","NM",4)
MDP
^SCR("P1TFR","G","NM",5)
MDP1
^SCR("P1TFR","G","RB")
6,6,21,76
^SCR("P1TFR","G","REF")
^TMPT($P
^SCR("P1TFR","G","RZD")
\
^SCR("P1TFR","G","STEP")
1
^SCR("P1TFR","G","STG")
         :'tcn xe`z :'tcn 'qn  :  xign  :       hixt xe`z   : hixt cew :       
^SCR("P1TFR","G","VG")
8
^SCR("P1TFR","NAME")
hixtz zxcbd
^SCR("P1TFR","P",5,"CHECK")
Y
^SCR("P1TFR","P",5,"CRD")
3,53,E,5,0
^SCR("P1TFR","P",5,"CREAT")

^SCR("P1TFR","P",5,"FNC")

^SCR("P1TFR","P",5,"GLOB")
PARSUG
^SCR("P1TFR","P",5,"HELP")

^SCR("P1TFR","P",5,"LMAX")
6
^SCR("P1TFR","P",5,"MUMPS1")

^SCR("P1TFR","P",5,"MUMPS2")

^SCR("P1TFR","P",5,"MUST")

^SCR("P1TFR","P",5,"NLN")
20
^SCR("P1TFR","P",5,"NS")
H
^SCR("P1TFR","P",5,"OUTPUT")

^SCR("P1TFR","P",5,"RZD")
\
^SCR("P1TFR","P",5,"TOPB")
8
^SCR("P1TFR","P",5,"TYP")
E
^SCR("P1TFR","P",5,"VRB")
SUGP1
^SCR("P1TFR","P",6,"CRD")
3,52,H,23
^SCR("P1TFR","P",6,"HELP")

^SCR("P1TFR","P",6,"LMAX")
23
^SCR("P1TFR","P",6,"MUMPS1")

^SCR("P1TFR","P",6,"MUMPS2")

^SCR("P1TFR","P",6,"OUTPUT")

^SCR("P1TFR","P",6,"TYP")
H
^SCR("P1TFR","P",10,"CRD")
4,47,D,8,0
^SCR("P1TFR","P",10,"HELP")

^SCR("P1TFR","P",10,"LMAX")
9
^SCR("P1TFR","P",10,"MUMPS1")
S:'$G(DATT) DATT=$$^%L1DC($H,1)
^SCR("P1TFR","P",10,"MUMPS2")

^SCR("P1TFR","P",10,"OUTPUT")

^SCR("P1TFR","P",10,"TYP")
D
^SCR("P1TFR","P",15,"CRD")
22,72,H,60
^SCR("P1TFR","P",15,"HELP")

^SCR("P1TFR","P",15,"LMAX")
66
^SCR("P1TFR","P",15,"MUMPS1")

^SCR("P1TFR","P",15,"MUMPS2")

^SCR("P1TFR","P",15,"TYP")
H
^SCR("P1TFR","P","NAME","$P","KEY",1)
/\DATT,HRA
^SCR("P1TFR","P","NAME","DATT")
10
^SCR("P1TFR","P","NAME","DATT","REF")
$P($G(^TMPT($P)),"\",1)
^SCR("P1TFR","P","NAME","DATT","REF1")
$P(^TMPT($P),"\",1)
^SCR("P1TFR","P","NAME","HRA")
15
^SCR("P1TFR","P","NAME","HRA","REF")
$P($G(^TMPT($P)),"\",2)
^SCR("P1TFR","P","NAME","HRA","REF1")
$P(^TMPT($P),"\",2)
^SCR("P1TFR","P","NAME","SUGP")
5
^SCR("P1TFR","P","NAME","SUGP1")
6
^SCR("P1TFR","P","NM",5)
SUGP
^SCR("P1TFR","P","NM",6)
SUGP1
^SCR("P1TFR","P","NM",10)
DATT
^SCR("P1TFR","P","NM",15)
HRA
^SCR("P1TFR","P","REF",1)
^TMPT($P)
^SCR("P1TFR","P","REF",1,"RZD")
\
^SCR("P1TFR","P","REF",1,"STR")
DATT\HRA
^SCR("P1THUM")
H
^SCR("P1THUM",1)
      #migelynae dcrqna mihixt ly yeniy zlah#                                  
^SCR("P1THUM",2)
                                                               1$              
^SCR("P1THUM",3)
           :  yeniy : xign :       hixt my      : hixt cew :                   
^SCR("P1THUM",4)
                                                                               
^SCR("P1THUM",5)
                                                                               
^SCR("P1THUM",6)
                                                                               
^SCR("P1THUM",7)
                                                                               
^SCR("P1THUM",8)
                                                                               
^SCR("P1THUM",9)
                                                                               
^SCR("P1THUM",10)
                                                                               
^SCR("P1THUM",11)
                                                                               
^SCR("P1THUM",12)
                                                                               
^SCR("P1THUM",13)
                                                                               
^SCR("P1THUM",14)
                                                                               
^SCR("P1THUM",15)
                                                                               
^SCR("P1THUM",16)
                                                                               
^SCR("P1THUM",17)
                                                                               
^SCR("P1THUM",18)
                                                                               
^SCR("P1THUM",19)
                                                                               
^SCR("P1THUM",20)
                                                                               
^SCR("P1THUM",21)
        $1                                                                     
^SCR("P1THUM","A",1)
�‰‡…Œ™Ž�…„ƒ’‘Ž��‰ˆ‰˜”Œ™™…Ž‰™šŒ�ˆ
^SCR("P1THUM","A",2)

^SCR("P1THUM","A",3)
™…Ž‰™˜‰‡Žˆ‰˜”�™ˆ‰˜”ƒ…—
^SCR("P1THUM","A",4)
--------------------------------------------
^SCR("P1THUM","A",5)

^SCR("P1THUM","A",6)

^SCR("P1THUM","A",7)

^SCR("P1THUM","A",8)

^SCR("P1THUM","A",9)

^SCR("P1THUM","A",10)

^SCR("P1THUM","A",11)

^SCR("P1THUM","A",12)

^SCR("P1THUM","A",13)

^SCR("P1THUM","A",14)

^SCR("P1THUM","A",15)

^SCR("P1THUM","A",16)

^SCR("P1THUM","A",17)

^SCR("P1THUM","A",18)

^SCR("P1THUM","A",19)

^SCR("P1THUM","A",20)

^SCR("P1THUM","A",21)

^SCR("P1THUM","AV",1)
ohjukancuvsgxncohyhrpkaaunha,kcy
^SCR("P1THUM","AV",2)

^SCR("P1THUM","AV",3)
aunharhjnyhrpoayhrpsue
^SCR("P1THUM","AV",4)
--------------------------------------------
^SCR("P1THUM","AV",5)

^SCR("P1THUM","AV",6)

^SCR("P1THUM","AV",7)

^SCR("P1THUM","AV",8)

^SCR("P1THUM","AV",9)

^SCR("P1THUM","AV",10)

^SCR("P1THUM","AV",11)

^SCR("P1THUM","AV",12)

^SCR("P1THUM","AV",13)

^SCR("P1THUM","AV",14)

^SCR("P1THUM","AV",15)

^SCR("P1THUM","AV",16)

^SCR("P1THUM","AV",17)

^SCR("P1THUM","AV",18)

^SCR("P1THUM","AV",19)

^SCR("P1THUM","AV",20)

^SCR("P1THUM","AV",21)

^SCR("P1THUM","G",1,"CRD")
4,59,E,6,0
^SCR("P1THUM","G",1,"HELP")

^SCR("P1THUM","G",1,"LMAX")
10
^SCR("P1THUM","G",1,"MUMPS1")

^SCR("P1THUM","G",1,"MUMPS2")

^SCR("P1THUM","G",1,"OUTPUT")

^SCR("P1THUM","G",1,"SHEM")
 hixt cew 
^SCR("P1THUM","G",1,"TYP")
E
^SCR("P1THUM","G",2,"CRD")
4,48,H,20,0
^SCR("P1THUM","G",2,"HELP")

^SCR("P1THUM","G",2,"LMAX")
20
^SCR("P1THUM","G",2,"MUMPS1")

^SCR("P1THUM","G",2,"MUMPS2")

^SCR("P1THUM","G",2,"OUTPUT")

^SCR("P1THUM","G",2,"SHEM")
       hixt my      
^SCR("P1THUM","G",2,"TYP")
H
^SCR("P1THUM","G",3,"CRD")
4,27,N,6,2
^SCR("P1THUM","G",3,"HELP")

^SCR("P1THUM","G",3,"LMAX")
6
^SCR("P1THUM","G",3,"MUMPS1")

^SCR("P1THUM","G",3,"MUMPS2")

^SCR("P1THUM","G",3,"OUTPUT")

^SCR("P1THUM","G",3,"SHEM")
 xign 
^SCR("P1THUM","G",3,"TYP")
N
^SCR("P1THUM","G",4,"CRD")
4,20,N,1,0
^SCR("P1THUM","G",4,"HELP")
F9- hixt qihxk ,F7- cew itl ,F6- my itl yetig ,0- mdipy ,2- migelyn ,1- dcrqn
^SCR("P1THUM","G",4,"LMAX")
8
^SCR("P1THUM","G",4,"MUMPS1")

^SCR("P1THUM","G",4,"MUMPS2")
D THUM^P1THUM
^SCR("P1THUM","G",4,"SHEM")
  yeniy 
^SCR("P1THUM","G",4,"TYP")
N
^SCR("P1THUM","G","DEL")

^SCR("P1THUM","G","MAX")
99999
^SCR("P1THUM","G","NAME","MH")
3
^SCR("P1THUM","G","NAME","PAR")
1
^SCR("P1THUM","G","NAME","PAR1")
2
^SCR("P1THUM","G","NAME","THUM")
4
^SCR("P1THUM","G","NM",1)
PAR
^SCR("P1THUM","G","NM",2)
PAR1
^SCR("P1THUM","G","NM",3)
MH
^SCR("P1THUM","G","NM",4)
THUM
^SCR("P1THUM","G","RB")
3,9,22,65
^SCR("P1THUM","G","REF")
^TEMP($P,"TH"
^SCR("P1THUM","G","RZD")
\
^SCR("P1THUM","G","STEP")
1
^SCR("P1THUM","G","STG")
           :  yeniy : xign :       hixt my      : hixt cew :                   
^SCR("P1THUM","G","VG")
5
^SCR("P1THUM","NAME")

^SCR("P1TIPDAY")
H
^SCR("P1TIPDAY",1)
                                                                               
^SCR("P1TIPDAY",2)
    {15   :revia zry  {10      : revia jix`z  { 07} mei {5      }: dtew jix`z  
^SCR("P1TIPDAY",3)
                         {25   : dry cr   {20   :dryn       {17 }:  'qn zxnyn  
^SCR("P1TIPDAY",4)
 {38      :dryl zxekyn    {35  : zexy incdn dcxed %    {30  : mitihdn dcxed %  
^SCR("P1TIPDAY",5)
                                                                             1$
^SCR("P1TIPDAY",6)
 : cwted : dnlyd :  zxekyn: ehp tih: zery :zexy inc:  tih  :  caer my  :  'qn: 
^SCR("P1TIPDAY",7)
 : dtewa :       :zery itl:zery itl:dcear :        :       :           : caer: 
^SCR("P1TIPDAY",8)
                                                                               
^SCR("P1TIPDAY",9)
                                                                               
^SCR("P1TIPDAY",10)
                                                                               
^SCR("P1TIPDAY",11)
                                                                               
^SCR("P1TIPDAY",12)
                                                                               
^SCR("P1TIPDAY",13)
                                                                               
^SCR("P1TIPDAY",14)
                                                                               
^SCR("P1TIPDAY",15)
                                                                               
^SCR("P1TIPDAY",16)
                                                                               
^SCR("P1TIPDAY",17)
                                                                               
^SCR("P1TIPDAY",18)
                                                                               
^SCR("P1TIPDAY",19)
                                                                               
^SCR("P1TIPDAY",20)
                                                                               
^SCR("P1TIPDAY",21)
 $1                                                                            
^SCR("P1TIPDAY",22)
 {65   } {60    } {55    } {50    }{45   }{43    }{40    }                     
^SCR("P1TIPDAY","A",1)

^SCR("P1TIPDAY","A",2)
:’…–‰�š’™:’…–‰�Š‰˜€š�…‰:„”…—Š‰˜€š
^SCR("P1TIPDAY","A",3)
:„’™ƒ’:„’™Ž:'‘Žš˜Ž™Ž
^SCR("P1TIPDAY","A",4)
:„’™Œš˜…‹™Ž:š…˜™‰Žƒ„Ž„ƒ˜…„%:�‰”‰ˆ„Ž„ƒ˜…„%
^SCR("P1TIPDAY","A",5)

^SCR("P1TIPDAY","A",6)
ƒ—”…„„ŽŒ™„š˜…‹™Ž…ˆ�”‰ˆš…’™š…˜™‰Žƒ”‰ˆƒ�…’�™'‘Ž
^SCR("P1TIPDAY","A",7)
„”…—�š…’™‰”Œš…’™‰”Œ„ƒ…�’ƒ�…’
^SCR("P1TIPDAY","A",8)
--------------------------------------------------------------------
^SCR("P1TIPDAY","A",9)

^SCR("P1TIPDAY","A",10)

^SCR("P1TIPDAY","A",11)

^SCR("P1TIPDAY","A",12)

^SCR("P1TIPDAY","A",13)

^SCR("P1TIPDAY","A",14)

^SCR("P1TIPDAY","A",15)

^SCR("P1TIPDAY","A",16)

^SCR("P1TIPDAY","A",17)

^SCR("P1TIPDAY","A",18)

^SCR("P1TIPDAY","A",19)

^SCR("P1TIPDAY","A",20)

^SCR("P1TIPDAY","A",21)

^SCR("P1TIPDAY","A",22)

^SCR("P1TIPDAY","AV",1)

^SCR("P1TIPDAY","AV",2)
:gumhc,ga:gumhclhrt,ouh:vpuelhrt,
^SCR("P1TIPDAY","AV",3)
:vgasg:vgan:wxn,rnan
^SCR("P1TIPDAY","AV",4)
:vgak,rufan:,urahnsvnvsruv%:ohphyvnvsruv%
^SCR("P1TIPDAY","AV",5)

^SCR("P1TIPDAY","AV",6)
sepuvvnkav,rufanuybphy,uga,urahnsphyscugoawxn
^SCR("P1TIPDAY","AV",7)
vpuec,ugahpk,ugahpkvsucgscug
^SCR("P1TIPDAY","AV",8)
--------------------------------------------------------------------
^SCR("P1TIPDAY","AV",9)

^SCR("P1TIPDAY","AV",10)

^SCR("P1TIPDAY","AV",11)

^SCR("P1TIPDAY","AV",12)

^SCR("P1TIPDAY","AV",13)

^SCR("P1TIPDAY","AV",14)

^SCR("P1TIPDAY","AV",15)

^SCR("P1TIPDAY","AV",16)

^SCR("P1TIPDAY","AV",17)

^SCR("P1TIPDAY","AV",18)

^SCR("P1TIPDAY","AV",19)

^SCR("P1TIPDAY","AV",20)

^SCR("P1TIPDAY","AV",21)

^SCR("P1TIPDAY","AV",22)

^SCR("P1TIPDAY","G",1,"CRD")
7,77,E,5.,0
^SCR("P1TIPDAY","G",1,"HELP")

^SCR("P1TIPDAY","G",1,"LMAX")
5
^SCR("P1TIPDAY","G",1,"MUMPS1")

^SCR("P1TIPDAY","G",1,"MUMPS2")

^SCR("P1TIPDAY","G",1,"OUTPUT")

^SCR("P1TIPDAY","G",1,"SHEM")
  'qn
^SCR("P1TIPDAY","G",1,"TYP")
E
^SCR("P1TIPDAY","G",2,"CRD")
7,71,H,11,0
^SCR("P1TIPDAY","G",2,"HELP")

^SCR("P1TIPDAY","G",2,"LMAX")
11
^SCR("P1TIPDAY","G",2,"MUMPS1")

^SCR("P1TIPDAY","G",2,"MUMPS2")

^SCR("P1TIPDAY","G",2,"OUTPUT")

^SCR("P1TIPDAY","G",2,"SHEM")
  caer my  
^SCR("P1TIPDAY","G",2,"TYP")
H
^SCR("P1TIPDAY","G",3,"CRD")
7,59,N,7,2
^SCR("P1TIPDAY","G",3,"HELP")

^SCR("P1TIPDAY","G",3,"LMAX")
7
^SCR("P1TIPDAY","G",3,"MUMPS1")

^SCR("P1TIPDAY","G",3,"MUMPS2")

^SCR("P1TIPDAY","G",3,"OUTPUT")

^SCR("P1TIPDAY","G",3,"SHEM")
  tih  
^SCR("P1TIPDAY","G",3,"TYP")
N
^SCR("P1TIPDAY","G",4,"CRD")
7,51,N,7,2
^SCR("P1TIPDAY","G",4,"HELP")

^SCR("P1TIPDAY","G",4,"LMAX")
8
^SCR("P1TIPDAY","G",4,"MUMPS1")

^SCR("P1TIPDAY","G",4,"MUMPS2")

^SCR("P1TIPDAY","G",4,"OUTPUT")

^SCR("P1TIPDAY","G",4,"SHEM")
zexy inc
^SCR("P1TIPDAY","G",4,"TYP")
N
^SCR("P1TIPDAY","G",5,"CRD")
7,42,E,6,0
^SCR("P1TIPDAY","G",5,"HELP")
<F10> - zepnfd zbvd , <F9> - zegkep oery itl zery hext 
^SCR("P1TIPDAY","G",5,"LMAX")
6
^SCR("P1TIPDAY","G",5,"MUMPS1")

^SCR("P1TIPDAY","G",5,"MUMPS2")
D SHAOT^P1TIPDAY
^SCR("P1TIPDAY","G",5,"SHEM")
 zery 
^SCR("P1TIPDAY","G",5,"TYP")
E
^SCR("P1TIPDAY","G",6,"CRD")
7,35,N,7,2
^SCR("P1TIPDAY","G",6,"HELP")

^SCR("P1TIPDAY","G",6,"LMAX")
8
^SCR("P1TIPDAY","G",6,"MUMPS1")

^SCR("P1TIPDAY","G",6,"MUMPS2")

^SCR("P1TIPDAY","G",6,"OUTPUT")

^SCR("P1TIPDAY","G",6,"SHEM")
 ehp tih
^SCR("P1TIPDAY","G",6,"TYP")
N
^SCR("P1TIPDAY","G",7,"CRD")
7,26,N,8,2
^SCR("P1TIPDAY","G",7,"HELP")

^SCR("P1TIPDAY","G",7,"LMAX")
8
^SCR("P1TIPDAY","G",7,"MUMPS1")

^SCR("P1TIPDAY","G",7,"MUMPS2")

^SCR("P1TIPDAY","G",7,"OUTPUT")

^SCR("P1TIPDAY","G",7,"SHEM")
  zxekyn
^SCR("P1TIPDAY","G",7,"TYP")
N
^SCR("P1TIPDAY","G",8,"CRD")
7,17,N,7,2
^SCR("P1TIPDAY","G",8,"HELP")

^SCR("P1TIPDAY","G",8,"LMAX")
7
^SCR("P1TIPDAY","G",8,"MUMPS1")

^SCR("P1TIPDAY","G",8,"MUMPS2")

^SCR("P1TIPDAY","G",8,"OUTPUT")

^SCR("P1TIPDAY","G",8,"SHEM")
 dnlyd 
^SCR("P1TIPDAY","G",8,"TYP")
N
^SCR("P1TIPDAY","G",9,"CRD")
7,9,N,7,2
^SCR("P1TIPDAY","G",9,"HELP")
<F9> - "dnlyd" dcenrn mekq wizrdl 
^SCR("P1TIPDAY","G",9,"LMAX")
7
^SCR("P1TIPDAY","G",9,"MUMPS1")
D TMZM0^P1TIPDAY
^SCR("P1TIPDAY","G",9,"MUMPS2")
D TMZM^P1TIPDAY
^SCR("P1TIPDAY","G",9,"SHEM")
 cwted 
^SCR("P1TIPDAY","G",9,"TYP")
N
^SCR("P1TIPDAY","G","DEL")

^SCR("P1TIPDAY","G","MAX")
5
^SCR("P1TIPDAY","G","NAME","DM")
4
^SCR("P1TIPDAY","G","NAME","DOP")
8
^SCR("P1TIPDAY","G","NAME","MASC")
7
^SCR("P1TIPDAY","G","NAME","OVED")
1
^SCR("P1TIPDAY","G","NAME","OVED1")
2
^SCR("P1TIPDAY","G","NAME","SHAOT")
5
^SCR("P1TIPDAY","G","NAME","TIP")
3
^SCR("P1TIPDAY","G","NAME","TIPS")
6
^SCR("P1TIPDAY","G","NAME","TMZM")
9
^SCR("P1TIPDAY","G","NM",1)
OVED
^SCR("P1TIPDAY","G","NM",2)
OVED1
^SCR("P1TIPDAY","G","NM",3)
TIP
^SCR("P1TIPDAY","G","NM",4)
DM
^SCR("P1TIPDAY","G","NM",5)
SHAOT
^SCR("P1TIPDAY","G","NM",6)
TIPS
^SCR("P1TIPDAY","G","NM",7)
MASC
^SCR("P1TIPDAY","G","NM",8)
DOP
^SCR("P1TIPDAY","G","NM",9)
TMZM
^SCR("P1TIPDAY","G","RB")
6,2,22,79
^SCR("P1TIPDAY","G","REF")
^TEMP($P
^SCR("P1TIPDAY","G","RZD")
\
^SCR("P1TIPDAY","G","STEP")
1
^SCR("P1TIPDAY","G","STG")
 : cwted : dnlyd :  zxekyn: ehp tih: zery :zexy inc:  tih  :  caer my  :  'qn: 
^SCR("P1TIPDAY","G","VG")
9
^SCR("P1TIPDAY","NAME")
mitih zwelg
^SCR("P1TIPDAY","P",5,"CRD")
2,56,D,8,0
^SCR("P1TIPDAY","P",5,"HELP")

^SCR("P1TIPDAY","P",5,"LMAX")
8
^SCR("P1TIPDAY","P",5,"MUMPS1")
D TKUP0^P1TIPDAY
^SCR("P1TIPDAY","P",5,"MUMPS2")
D TKUP^P1TIPDAY
^SCR("P1TIPDAY","P",5,"TYP")
D
^SCR("P1TIPDAY","P",7,"CRD")
2,51,H,1
^SCR("P1TIPDAY","P",7,"HELP")

^SCR("P1TIPDAY","P",7,"LMAX")
4
^SCR("P1TIPDAY","P",7,"MUMPS1")

^SCR("P1TIPDAY","P",7,"MUMPS2")

^SCR("P1TIPDAY","P",7,"OUTPUT")

^SCR("P1TIPDAY","P",7,"TYP")
H
^SCR("P1TIPDAY","P",10,"CRD")
2,22,D,8,0
^SCR("P1TIPDAY","P",10,"HELP")

^SCR("P1TIPDAY","P",10,"LMAX")
9
^SCR("P1TIPDAY","P",10,"MUMPS1")

^SCR("P1TIPDAY","P",10,"MUMPS2")

^SCR("P1TIPDAY","P",10,"OUTPUT")

^SCR("P1TIPDAY","P",10,"TYP")
D
^SCR("P1TIPDAY","P",15,"CRD")
2,4,T,5,0
^SCR("P1TIPDAY","P",15,"HELP")

^SCR("P1TIPDAY","P",15,"LMAX")
6
^SCR("P1TIPDAY","P",15,"MUMPS1")

^SCR("P1TIPDAY","P",15,"MUMPS2")

^SCR("P1TIPDAY","P",15,"OUTPUT")

^SCR("P1TIPDAY","P",15,"TYP")
T
^SCR("P1TIPDAY","P",17,"CRD")
3,60,N,1,0
^SCR("P1TIPDAY","P",17,"HELP")

^SCR("P1TIPDAY","P",17,"LMAX")
4
^SCR("P1TIPDAY","P",17,"MUMPS1")

^SCR("P1TIPDAY","P",17,"MUMPS2")
D MISHM^P1TIPDAY
^SCR("P1TIPDAY","P",17,"TYP")
N
^SCR("P1TIPDAY","P",20,"CRD")
3,42,T,5,0
^SCR("P1TIPDAY","P",20,"HELP")

^SCR("P1TIPDAY","P",20,"LMAX")
6
^SCR("P1TIPDAY","P",20,"MUMPS1")

^SCR("P1TIPDAY","P",20,"MUMPS2")

^SCR("P1TIPDAY","P",20,"OUTPUT")

^SCR("P1TIPDAY","P",20,"TYP")
T
^SCR("P1TIPDAY","P",25,"CRD")
3,25,T,5,0
^SCR("P1TIPDAY","P",25,"HELP")

^SCR("P1TIPDAY","P",25,"LMAX")
6
^SCR("P1TIPDAY","P",25,"MUMPS1")

^SCR("P1TIPDAY","P",25,"MUMPS2")

^SCR("P1TIPDAY","P",25,"OUTPUT")

^SCR("P1TIPDAY","P",25,"TYP")
T
^SCR("P1TIPDAY","P",30,"CRD")
4,55,N,5,2
^SCR("P1TIPDAY","P",30,"HELP")

^SCR("P1TIPDAY","P",30,"LMAX")
5
^SCR("P1TIPDAY","P",30,"MUMPS1")

^SCR("P1TIPDAY","P",30,"MUMPS2")

^SCR("P1TIPDAY","P",30,"OUTPUT")

^SCR("P1TIPDAY","P",30,"TYP")
N
^SCR("P1TIPDAY","P",35,"CRD")
4,26,N,5,2
^SCR("P1TIPDAY","P",35,"HELP")

^SCR("P1TIPDAY","P",35,"LMAX")
5
^SCR("P1TIPDAY","P",35,"MUMPS1")

^SCR("P1TIPDAY","P",35,"MUMPS2")

^SCR("P1TIPDAY","P",35,"OUTPUT")

^SCR("P1TIPDAY","P",35,"TYP")
N
^SCR("P1TIPDAY","P",38,"CRD")
4,1,E,9,0
^SCR("P1TIPDAY","P",38,"HELP")

^SCR("P1TIPDAY","P",38,"LMAX")
9
^SCR("P1TIPDAY","P",38,"MUMPS1")

^SCR("P1TIPDAY","P",38,"MUMPS2")

^SCR("P1TIPDAY","P",38,"OUTPUT")

^SCR("P1TIPDAY","P",38,"TYP")
E
^SCR("P1TIPDAY","P",40,"CRD")
22,50,N,7,2
^SCR("P1TIPDAY","P",40,"HELP")

^SCR("P1TIPDAY","P",40,"LMAX")
7
^SCR("P1TIPDAY","P",40,"MUMPS1")

^SCR("P1TIPDAY","P",40,"MUMPS2")

^SCR("P1TIPDAY","P",40,"OUTPUT")

^SCR("P1TIPDAY","P",40,"TYP")
N
^SCR("P1TIPDAY","P",43,"CRD")
22,42,N,7,2
^SCR("P1TIPDAY","P",43,"HELP")

^SCR("P1TIPDAY","P",43,"LMAX")
7
^SCR("P1TIPDAY","P",43,"MUMPS1")

^SCR("P1TIPDAY","P",43,"MUMPS2")

^SCR("P1TIPDAY","P",43,"OUTPUT")

^SCR("P1TIPDAY","P",43,"TYP")
N
^SCR("P1TIPDAY","P",45,"CRD")
22,35,N,6,2
^SCR("P1TIPDAY","P",45,"HELP")

^SCR("P1TIPDAY","P",45,"LMAX")
6
^SCR("P1TIPDAY","P",45,"MUMPS1")

^SCR("P1TIPDAY","P",45,"MUMPS2")

^SCR("P1TIPDAY","P",45,"OUTPUT")

^SCR("P1TIPDAY","P",45,"TYP")
N
^SCR("P1TIPDAY","P",50,"CRD")
22,27,N,7,2
^SCR("P1TIPDAY","P",50,"HELP")

^SCR("P1TIPDAY","P",50,"LMAX")
7
^SCR("P1TIPDAY","P",50,"MUMPS1")

^SCR("P1TIPDAY","P",50,"MUMPS2")

^SCR("P1TIPDAY","P",50,"OUTPUT")

^SCR("P1TIPDAY","P",50,"TYP")
N
^SCR("P1TIPDAY","P",55,"CRD")
22,18,N,7,2
^SCR("P1TIPDAY","P",55,"HELP")

^SCR("P1TIPDAY","P",55,"LMAX")
7
^SCR("P1TIPDAY","P",55,"MUMPS1")

^SCR("P1TIPDAY","P",55,"MUMPS2")

^SCR("P1TIPDAY","P",55,"OUTPUT")

^SCR("P1TIPDAY","P",55,"TYP")
N
^SCR("P1TIPDAY","P",60,"CRD")
22,9,N,7,2
^SCR("P1TIPDAY","P",60,"HELP")

^SCR("P1TIPDAY","P",60,"LMAX")
7
^SCR("P1TIPDAY","P",60,"MUMPS1")

^SCR("P1TIPDAY","P",60,"MUMPS2")

^SCR("P1TIPDAY","P",60,"OUTPUT")

^SCR("P1TIPDAY","P",60,"TYP")
N
^SCR("P1TIPDAY","P",65,"CRD")
22,1,N,6,2
^SCR("P1TIPDAY","P",65,"HELP")

^SCR("P1TIPDAY","P",65,"LMAX")
6
^SCR("P1TIPDAY","P",65,"MUMPS1")

^SCR("P1TIPDAY","P",65,"MUMPS2")

^SCR("P1TIPDAY","P",65,"OUTPUT")

^SCR("P1TIPDAY","P",65,"TYP")
N
^SCR("P1TIPDAY","P","NAME","ADSHAA")
25
^SCR("P1TIPDAY","P","NAME","AHDS")
35
^SCR("P1TIPDAY","P","NAME","AHTIP")
30
^SCR("P1TIPDAY","P","NAME","JOM")
7
^SCR("P1TIPDAY","P","NAME","MESHAA")
20
^SCR("P1TIPDAY","P","NAME","MISHM")
17
^SCR("P1TIPDAY","P","NAME","MSHA")
38
^SCR("P1TIPDAY","P","NAME","SBIC")
15
^SCR("P1TIPDAY","P","NAME","SDOP")
60
^SCR("P1TIPDAY","P","NAME","SDS")
43
^SCR("P1TIPDAY","P","NAME","SMASC")
55
^SCR("P1TIPDAY","P","NAME","SSHAOT")
45
^SCR("P1TIPDAY","P","NAME","STIP")
40
^SCR("P1TIPDAY","P","NAME","STIPS")
50
^SCR("P1TIPDAY","P","NAME","STMZM")
65
^SCR("P1TIPDAY","P","NAME","TBIC")
10
^SCR("P1TIPDAY","P","NAME","TKUP")
5
^SCR("P1TIPDAY","P","NM",5)
TKUP
^SCR("P1TIPDAY","P","NM",7)
JOM
^SCR("P1TIPDAY","P","NM",10)
TBIC
^SCR("P1TIPDAY","P","NM",15)
SBIC
^SCR("P1TIPDAY","P","NM",17)
MISHM
^SCR("P1TIPDAY","P","NM",20)
MESHAA
^SCR("P1TIPDAY","P","NM",25)
ADSHAA
^SCR("P1TIPDAY","P","NM",30)
AHTIP
^SCR("P1TIPDAY","P","NM",35)
AHDS
^SCR("P1TIPDAY","P","NM",38)
MSHA
^SCR("P1TIPDAY","P","NM",40)
STIP
^SCR("P1TIPDAY","P","NM",43)
SDS
^SCR("P1TIPDAY","P","NM",45)
SSHAOT
^SCR("P1TIPDAY","P","NM",50)
STIPS
^SCR("P1TIPDAY","P","NM",55)
SMASC
^SCR("P1TIPDAY","P","NM",60)
SDOP
^SCR("P1TIPDAY","P","NM",65)
STMZM
^SCR("P1TIPDOH")
H
^SCR("P1TIPDOH",1)
                                                                               
^SCR("P1TIPDOH",2)
                                       {10      : jix`z cr  {5      }: jix`zn  
^SCR("P1TIPDOH",3)
         {25  : dry cr    {20  : dryn      {12 : ( zexnynd lk - 0 ) zxnyn 'qn  
^SCR("P1TIPDOH",4)
 {38      :dryl zxekyn    {35  : zexy incdn dcxed %    {30  : mitihdn dcxed %  
^SCR("P1TIPDOH",5)
                                                                             1$
^SCR("P1TIPDOH",6)
  : cwted: dnlyd :  zxekyn:itl dqpkd: zery:zexy inc:  tih  :  caer my  :  'qn: 
^SCR("P1TIPDOH",7)
  : dtewa:       :zery itl: ehp zery:dcear:        :       :           : caer: 
^SCR("P1TIPDOH",8)
                                                                               
^SCR("P1TIPDOH",9)
                                                                               
^SCR("P1TIPDOH",10)
                                                                               
^SCR("P1TIPDOH",11)
                                                                               
^SCR("P1TIPDOH",12)
                                                                               
^SCR("P1TIPDOH",13)
                                                                               
^SCR("P1TIPDOH",14)
                                                                               
^SCR("P1TIPDOH",15)
                                                                               
^SCR("P1TIPDOH",16)
                                                                               
^SCR("P1TIPDOH",17)
                                                                               
^SCR("P1TIPDOH",18)
                                                                               
^SCR("P1TIPDOH",19)
                                                                               
^SCR("P1TIPDOH",20)
                                                                               
^SCR("P1TIPDOH",21)
 $1                                                                            
^SCR("P1TIPDOH",22)
 {65   } {60    } {55    } {50    }{45   }{43    }{40    }                     
^SCR("P1TIPDOH","A",1)

^SCR("P1TIPDOH","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1TIPDOH","A",3)
:„’™ƒ’:„’™Ž:(š…˜Ž™Ž„Œ‹-0)š˜Ž™Ž'‘Ž
^SCR("P1TIPDOH","A",4)
:„’™Œš˜…‹™Ž:š…˜™‰Žƒ„Ž„ƒ˜…„%:�‰”‰ˆ„Ž„ƒ˜…„%
^SCR("P1TIPDOH","A",5)

^SCR("P1TIPDOH","A",6)
ƒ—”…„„ŽŒ™„š˜…‹™Ž‰”Œ„‘�‹„š…’™š…˜™‰Žƒ”‰ˆƒ�…’�™'‘Ž
^SCR("P1TIPDOH","A",7)
„”…—�š…’™‰”Œ…ˆ�š…’™„ƒ…�’ƒ�…’
^SCR("P1TIPDOH","A",8)
-------------------------------------------------------------------
^SCR("P1TIPDOH","A",9)

^SCR("P1TIPDOH","A",10)

^SCR("P1TIPDOH","A",11)

^SCR("P1TIPDOH","A",12)

^SCR("P1TIPDOH","A",13)

^SCR("P1TIPDOH","A",14)

^SCR("P1TIPDOH","A",15)

^SCR("P1TIPDOH","A",16)

^SCR("P1TIPDOH","A",17)

^SCR("P1TIPDOH","A",18)

^SCR("P1TIPDOH","A",19)

^SCR("P1TIPDOH","A",20)

^SCR("P1TIPDOH","A",21)

^SCR("P1TIPDOH","A",22)

^SCR("P1TIPDOH","AV",1)

^SCR("P1TIPDOH","AV",2)
:lhrt,sg:lhrt,n
^SCR("P1TIPDOH","AV",3)
:vgasg:vgan:(,urnanvkf-0),rnanwxn
^SCR("P1TIPDOH","AV",4)
:vgak,rufan:,urahnsvnvsruv%:ohphyvnvsruv%
^SCR("P1TIPDOH","AV",5)

^SCR("P1TIPDOH","AV",6)
sepuvvnkav,rufanhpkvxbfv,uga,urahnsphyscugoawxn
^SCR("P1TIPDOH","AV",7)
vpuec,ugahpkuyb,ugavsucgscug
^SCR("P1TIPDOH","AV",8)
-------------------------------------------------------------------
^SCR("P1TIPDOH","AV",9)

^SCR("P1TIPDOH","AV",10)

^SCR("P1TIPDOH","AV",11)

^SCR("P1TIPDOH","AV",12)

^SCR("P1TIPDOH","AV",13)

^SCR("P1TIPDOH","AV",14)

^SCR("P1TIPDOH","AV",15)

^SCR("P1TIPDOH","AV",16)

^SCR("P1TIPDOH","AV",17)

^SCR("P1TIPDOH","AV",18)

^SCR("P1TIPDOH","AV",19)

^SCR("P1TIPDOH","AV",20)

^SCR("P1TIPDOH","AV",21)

^SCR("P1TIPDOH","AV",22)

^SCR("P1TIPDOH","G",1,"CRD")
7,77,E,5.,0
^SCR("P1TIPDOH","G",1,"HELP")

^SCR("P1TIPDOH","G",1,"LMAX")
5
^SCR("P1TIPDOH","G",1,"MUMPS1")

^SCR("P1TIPDOH","G",1,"MUMPS2")

^SCR("P1TIPDOH","G",1,"OUTPUT")

^SCR("P1TIPDOH","G",1,"SHEM")
  'qn
^SCR("P1TIPDOH","G",1,"TYP")
E
^SCR("P1TIPDOH","G",2,"CRD")
7,71,H,11,0
^SCR("P1TIPDOH","G",2,"HELP")

^SCR("P1TIPDOH","G",2,"LMAX")
11
^SCR("P1TIPDOH","G",2,"MUMPS1")

^SCR("P1TIPDOH","G",2,"MUMPS2")

^SCR("P1TIPDOH","G",2,"OUTPUT")

^SCR("P1TIPDOH","G",2,"SHEM")
  caer my  
^SCR("P1TIPDOH","G",2,"TYP")
H
^SCR("P1TIPDOH","G",3,"CRD")
7,59,N,7,2
^SCR("P1TIPDOH","G",3,"HELP")

^SCR("P1TIPDOH","G",3,"LMAX")
7
^SCR("P1TIPDOH","G",3,"MUMPS1")

^SCR("P1TIPDOH","G",3,"MUMPS2")

^SCR("P1TIPDOH","G",3,"OUTPUT")

^SCR("P1TIPDOH","G",3,"SHEM")
  tih  
^SCR("P1TIPDOH","G",3,"TYP")
N
^SCR("P1TIPDOH","G",4,"CRD")
7,51,N,7,2
^SCR("P1TIPDOH","G",4,"HELP")

^SCR("P1TIPDOH","G",4,"LMAX")
8
^SCR("P1TIPDOH","G",4,"MUMPS1")

^SCR("P1TIPDOH","G",4,"MUMPS2")

^SCR("P1TIPDOH","G",4,"OUTPUT")

^SCR("P1TIPDOH","G",4,"SHEM")
zexy inc
^SCR("P1TIPDOH","G",4,"TYP")
N
^SCR("P1TIPDOH","G",5,"CRD")
7,42,N,5,2
^SCR("P1TIPDOH","G",5,"HELP")
<F9> - zegkep oery itl caer ly zery bivdl 
^SCR("P1TIPDOH","G",5,"LMAX")
5
^SCR("P1TIPDOH","G",5,"MUMPS1")

^SCR("P1TIPDOH","G",5,"MUMPS2")
D SHAOT^P1TIPDAY
^SCR("P1TIPDOH","G",5,"SHEM")
 zery
^SCR("P1TIPDOH","G",5,"TYP")
N
^SCR("P1TIPDOH","G",6,"CRD")
7,36,N,7,2
^SCR("P1TIPDOH","G",6,"HELP")

^SCR("P1TIPDOH","G",6,"LMAX")
9
^SCR("P1TIPDOH","G",6,"MUMPS1")

^SCR("P1TIPDOH","G",6,"MUMPS2")

^SCR("P1TIPDOH","G",6,"OUTPUT")

^SCR("P1TIPDOH","G",6,"SHEM")
itl dqpkd
^SCR("P1TIPDOH","G",6,"TYP")
N
^SCR("P1TIPDOH","G",7,"CRD")
7,26,N,8,2
^SCR("P1TIPDOH","G",7,"HELP")

^SCR("P1TIPDOH","G",7,"LMAX")
8
^SCR("P1TIPDOH","G",7,"MUMPS1")

^SCR("P1TIPDOH","G",7,"MUMPS2")

^SCR("P1TIPDOH","G",7,"OUTPUT")

^SCR("P1TIPDOH","G",7,"SHEM")
  zxekyn
^SCR("P1TIPDOH","G",7,"TYP")
N
^SCR("P1TIPDOH","G",8,"CRD")
7,17,N,7,2
^SCR("P1TIPDOH","G",8,"HELP")

^SCR("P1TIPDOH","G",8,"LMAX")
7
^SCR("P1TIPDOH","G",8,"MUMPS1")

^SCR("P1TIPDOH","G",8,"MUMPS2")

^SCR("P1TIPDOH","G",8,"OUTPUT")

^SCR("P1TIPDOH","G",8,"SHEM")
 dnlyd 
^SCR("P1TIPDOH","G",8,"TYP")
N
^SCR("P1TIPDOH","G",9,"CRD")
7,9,N,6,2
^SCR("P1TIPDOH","G",9,"HELP")
<F9> - "dnlyd" dcenrn mekq wizrdl 
^SCR("P1TIPDOH","G",9,"LMAX")
6
^SCR("P1TIPDOH","G",9,"MUMPS1")
D TMZM0^P1TIPDAY
^SCR("P1TIPDOH","G",9,"MUMPS2")
D TMZM^P1TIPDAY
^SCR("P1TIPDOH","G",9,"SHEM")
 cwted
^SCR("P1TIPDOH","G",9,"TYP")
N
^SCR("P1TIPDOH","G","DEL")

^SCR("P1TIPDOH","G","MAX")
730
^SCR("P1TIPDOH","G","NAME","DM")
4
^SCR("P1TIPDOH","G","NAME","DOP")
8
^SCR("P1TIPDOH","G","NAME","MASC")
7
^SCR("P1TIPDOH","G","NAME","OVED")
1
^SCR("P1TIPDOH","G","NAME","OVED1")
2
^SCR("P1TIPDOH","G","NAME","SHAOT")
5
^SCR("P1TIPDOH","G","NAME","TIP")
3
^SCR("P1TIPDOH","G","NAME","TIPS")
6
^SCR("P1TIPDOH","G","NAME","TMZM")
9
^SCR("P1TIPDOH","G","NM",1)
OVED
^SCR("P1TIPDOH","G","NM",2)
OVED1
^SCR("P1TIPDOH","G","NM",3)
TIP
^SCR("P1TIPDOH","G","NM",4)
DM
^SCR("P1TIPDOH","G","NM",5)
SHAOT
^SCR("P1TIPDOH","G","NM",6)
TIPS
^SCR("P1TIPDOH","G","NM",7)
MASC
^SCR("P1TIPDOH","G","NM",8)
DOP
^SCR("P1TIPDOH","G","NM",9)
TMZM
^SCR("P1TIPDOH","G","RB")
6,2,22,79
^SCR("P1TIPDOH","G","REF")
^TEMP($P
^SCR("P1TIPDOH","G","RZD")
\
^SCR("P1TIPDOH","G","STEP")
1
^SCR("P1TIPDOH","G","STG")
  : cwted: dnlyd :  zxekyn:itl dqpkd: zery:zexy inc:  tih  :  caer my  :  'qn: 
^SCR("P1TIPDOH","G","VG")
9
^SCR("P1TIPDOH","NAME")

^SCR("P1TIPDOH","P",5,"CRD")
2,60,D,8,0
^SCR("P1TIPDOH","P",5,"HELP")

^SCR("P1TIPDOH","P",5,"LMAX")
8
^SCR("P1TIPDOH","P",5,"MUMPS1")
S:'$G(MEDAT) MEDAT=$$^%L1DC(P1DZ,1)
^SCR("P1TIPDOH","P",5,"MUMPS2")

^SCR("P1TIPDOH","P",5,"TYP")
D
^SCR("P1TIPDOH","P",10,"CRD")
2,39,D,8,0
^SCR("P1TIPDOH","P",10,"HELP")

^SCR("P1TIPDOH","P",10,"LMAX")
9
^SCR("P1TIPDOH","P",10,"MUMPS1")
S:'$G(ADDAT) ADDAT=MEDAT
^SCR("P1TIPDOH","P",10,"MUMPS2")
D ADDAT^P1TIPDAY
^SCR("P1TIPDOH","P",10,"TYP")
D
^SCR("P1TIPDOH","P",12,"CRD")
3,43,N,1,0
^SCR("P1TIPDOH","P",12,"HELP")

^SCR("P1TIPDOH","P",12,"LMAX")
4
^SCR("P1TIPDOH","P",12,"MUMPS1")

^SCR("P1TIPDOH","P",12,"MUMPS2")

^SCR("P1TIPDOH","P",12,"TYP")
N
^SCR("P1TIPDOH","P",20,"CRD")
3,26,T,5,0
^SCR("P1TIPDOH","P",20,"HELP")

^SCR("P1TIPDOH","P",20,"LMAX")
5
^SCR("P1TIPDOH","P",20,"MUMPS1")

^SCR("P1TIPDOH","P",20,"MUMPS2")

^SCR("P1TIPDOH","P",20,"OUTPUT")

^SCR("P1TIPDOH","P",20,"TYP")
T
^SCR("P1TIPDOH","P",25,"CRD")
3,9,T,5,0
^SCR("P1TIPDOH","P",25,"HELP")

^SCR("P1TIPDOH","P",25,"LMAX")
5
^SCR("P1TIPDOH","P",25,"MUMPS1")

^SCR("P1TIPDOH","P",25,"MUMPS2")

^SCR("P1TIPDOH","P",25,"OUTPUT")

^SCR("P1TIPDOH","P",25,"TYP")
T
^SCR("P1TIPDOH","P",30,"CRD")
4,55,N,5,2
^SCR("P1TIPDOH","P",30,"HELP")

^SCR("P1TIPDOH","P",30,"LMAX")
5
^SCR("P1TIPDOH","P",30,"MUMPS1")

^SCR("P1TIPDOH","P",30,"MUMPS2")

^SCR("P1TIPDOH","P",30,"OUTPUT")

^SCR("P1TIPDOH","P",30,"TYP")
N
^SCR("P1TIPDOH","P",35,"CRD")
4,26,N,5,2
^SCR("P1TIPDOH","P",35,"HELP")

^SCR("P1TIPDOH","P",35,"LMAX")
5
^SCR("P1TIPDOH","P",35,"MUMPS1")

^SCR("P1TIPDOH","P",35,"MUMPS2")

^SCR("P1TIPDOH","P",35,"OUTPUT")

^SCR("P1TIPDOH","P",35,"TYP")
N
^SCR("P1TIPDOH","P",38,"CRD")
4,1,E,9,0
^SCR("P1TIPDOH","P",38,"HELP")

^SCR("P1TIPDOH","P",38,"LMAX")
9
^SCR("P1TIPDOH","P",38,"MUMPS1")

^SCR("P1TIPDOH","P",38,"MUMPS2")

^SCR("P1TIPDOH","P",38,"OUTPUT")

^SCR("P1TIPDOH","P",38,"TYP")
E
^SCR("P1TIPDOH","P",40,"CRD")
22,50,N,7,2
^SCR("P1TIPDOH","P",40,"HELP")

^SCR("P1TIPDOH","P",40,"LMAX")
7
^SCR("P1TIPDOH","P",40,"MUMPS1")

^SCR("P1TIPDOH","P",40,"MUMPS2")

^SCR("P1TIPDOH","P",40,"OUTPUT")

^SCR("P1TIPDOH","P",40,"TYP")
N
^SCR("P1TIPDOH","P",43,"CRD")
22,42,N,7,2
^SCR("P1TIPDOH","P",43,"HELP")

^SCR("P1TIPDOH","P",43,"LMAX")
7
^SCR("P1TIPDOH","P",43,"MUMPS1")

^SCR("P1TIPDOH","P",43,"MUMPS2")

^SCR("P1TIPDOH","P",43,"OUTPUT")

^SCR("P1TIPDOH","P",43,"TYP")
N
^SCR("P1TIPDOH","P",45,"CRD")
22,35,N,6,2
^SCR("P1TIPDOH","P",45,"HELP")

^SCR("P1TIPDOH","P",45,"LMAX")
6
^SCR("P1TIPDOH","P",45,"MUMPS1")

^SCR("P1TIPDOH","P",45,"MUMPS2")

^SCR("P1TIPDOH","P",45,"OUTPUT")

^SCR("P1TIPDOH","P",45,"TYP")
N
^SCR("P1TIPDOH","P",50,"CRD")
22,27,N,7,2
^SCR("P1TIPDOH","P",50,"HELP")

^SCR("P1TIPDOH","P",50,"LMAX")
7
^SCR("P1TIPDOH","P",50,"MUMPS1")

^SCR("P1TIPDOH","P",50,"MUMPS2")

^SCR("P1TIPDOH","P",50,"OUTPUT")

^SCR("P1TIPDOH","P",50,"TYP")
N
^SCR("P1TIPDOH","P",55,"CRD")
22,18,N,7,2
^SCR("P1TIPDOH","P",55,"HELP")

^SCR("P1TIPDOH","P",55,"LMAX")
7
^SCR("P1TIPDOH","P",55,"MUMPS1")

^SCR("P1TIPDOH","P",55,"MUMPS2")

^SCR("P1TIPDOH","P",55,"OUTPUT")

^SCR("P1TIPDOH","P",55,"TYP")
N
^SCR("P1TIPDOH","P",60,"CRD")
22,9,N,7,2
^SCR("P1TIPDOH","P",60,"HELP")

^SCR("P1TIPDOH","P",60,"LMAX")
7
^SCR("P1TIPDOH","P",60,"MUMPS1")

^SCR("P1TIPDOH","P",60,"MUMPS2")

^SCR("P1TIPDOH","P",60,"OUTPUT")

^SCR("P1TIPDOH","P",60,"TYP")
N
^SCR("P1TIPDOH","P",65,"CRD")
22,1,N,6,2
^SCR("P1TIPDOH","P",65,"HELP")

^SCR("P1TIPDOH","P",65,"LMAX")
6
^SCR("P1TIPDOH","P",65,"MUMPS1")

^SCR("P1TIPDOH","P",65,"MUMPS2")

^SCR("P1TIPDOH","P",65,"OUTPUT")

^SCR("P1TIPDOH","P",65,"TYP")
N
^SCR("P1TIPDOH","P","NAME","ADDAT")
10
^SCR("P1TIPDOH","P","NAME","ADSHAA")
25
^SCR("P1TIPDOH","P","NAME","AHDS")
35
^SCR("P1TIPDOH","P","NAME","AHTIP")
30
^SCR("P1TIPDOH","P","NAME","MEDAT")
5
^SCR("P1TIPDOH","P","NAME","MESHAA")
20
^SCR("P1TIPDOH","P","NAME","MISHM")
12
^SCR("P1TIPDOH","P","NAME","MSHA")
38
^SCR("P1TIPDOH","P","NAME","SDOP")
60
^SCR("P1TIPDOH","P","NAME","SDS")
43
^SCR("P1TIPDOH","P","NAME","SMASC")
55
^SCR("P1TIPDOH","P","NAME","SSHAOT")
45
^SCR("P1TIPDOH","P","NAME","STIP")
40
^SCR("P1TIPDOH","P","NAME","STIPS")
50
^SCR("P1TIPDOH","P","NAME","STMZM")
65
^SCR("P1TIPDOH","P","NM",5)
MEDAT
^SCR("P1TIPDOH","P","NM",10)
ADDAT
^SCR("P1TIPDOH","P","NM",12)
MISHM
^SCR("P1TIPDOH","P","NM",20)
MESHAA
^SCR("P1TIPDOH","P","NM",25)
ADSHAA
^SCR("P1TIPDOH","P","NM",30)
AHTIP
^SCR("P1TIPDOH","P","NM",35)
AHDS
^SCR("P1TIPDOH","P","NM",38)
MSHA
^SCR("P1TIPDOH","P","NM",40)
STIP
^SCR("P1TIPDOH","P","NM",43)
SDS
^SCR("P1TIPDOH","P","NM",45)
SSHAOT
^SCR("P1TIPDOH","P","NM",50)
STIPS
^SCR("P1TIPDOH","P","NM",55)
SMASC
^SCR("P1TIPDOH","P","NM",60)
SDOP
^SCR("P1TIPDOH","P","NM",65)
STMZM
^SCR("P1TIPM")
H
^SCR("P1TIPM",1)
                            # mixvlnl mitih zclwd #                            
^SCR("P1TIPM",2)
                                                                               
^SCR("P1TIPM",3)
                                                {05      } : jix`z             
^SCR("P1TIPM",4)
                                                                          1$   
^SCR("P1TIPM",5)
     :   k"dq  : i`xy`a tih :   xky   :      xvln  my       : xvln 'qn :       
^SCR("P1TIPM",6)
                                                                               
^SCR("P1TIPM",7)
                                                                               
^SCR("P1TIPM",8)
                                                                               
^SCR("P1TIPM",9)
                                                                               
^SCR("P1TIPM",10)
                                                                               
^SCR("P1TIPM",11)
                                                                               
^SCR("P1TIPM",12)
                                                                               
^SCR("P1TIPM",13)
                                                                               
^SCR("P1TIPM",14)
                                                                               
^SCR("P1TIPM",15)
                                                                               
^SCR("P1TIPM",16)
                                                                               
^SCR("P1TIPM",17)
                                                                               
^SCR("P1TIPM",18)
                                                                               
^SCR("P1TIPM",19)
                                                                               
^SCR("P1TIPM",20)
                                                                               
^SCR("P1TIPM",21)
   $1                                                                          
^SCR("P1TIPM",22)
    {10       }:  k"dq                                                         
^SCR("P1TIPM","A",1)
�‰˜–ŒŽŒ�‰”‰ˆšƒŒ—„
^SCR("P1TIPM","A",2)

^SCR("P1TIPM","A",3)
:Š‰˜€š
^SCR("P1TIPM","A",4)

^SCR("P1TIPM","A",5)
‹"„‘‰€˜™€�”‰ˆ˜‹™˜–ŒŽ�™˜–ŒŽ'‘Ž
^SCR("P1TIPM","A",6)
-------------------------------------------------------------
^SCR("P1TIPM","A",7)

^SCR("P1TIPM","A",8)

^SCR("P1TIPM","A",9)

^SCR("P1TIPM","A",10)

^SCR("P1TIPM","A",11)

^SCR("P1TIPM","A",12)

^SCR("P1TIPM","A",13)

^SCR("P1TIPM","A",14)

^SCR("P1TIPM","A",15)

^SCR("P1TIPM","A",16)

^SCR("P1TIPM","A",17)

^SCR("P1TIPM","A",18)

^SCR("P1TIPM","A",19)

^SCR("P1TIPM","A",20)

^SCR("P1TIPM","A",21)

^SCR("P1TIPM","A",22)
:‹"„‘
^SCR("P1TIPM","AV",1)
ohrmknkohphy,skev
^SCR("P1TIPM","AV",2)

^SCR("P1TIPM","AV",3)
:lhrt,
^SCR("P1TIPM","AV",4)

^SCR("P1TIPM","AV",5)
f"vxhtratcphyrfarmknoarmknwxn
^SCR("P1TIPM","AV",6)
-------------------------------------------------------------
^SCR("P1TIPM","AV",7)

^SCR("P1TIPM","AV",8)

^SCR("P1TIPM","AV",9)

^SCR("P1TIPM","AV",10)

^SCR("P1TIPM","AV",11)

^SCR("P1TIPM","AV",12)

^SCR("P1TIPM","AV",13)

^SCR("P1TIPM","AV",14)

^SCR("P1TIPM","AV",15)

^SCR("P1TIPM","AV",16)

^SCR("P1TIPM","AV",17)

^SCR("P1TIPM","AV",18)

^SCR("P1TIPM","AV",19)

^SCR("P1TIPM","AV",20)

^SCR("P1TIPM","AV",21)

^SCR("P1TIPM","AV",22)
:f"vx
^SCR("P1TIPM","G",1,"CHECK")
Y
^SCR("P1TIPM","G",1,"CRD")
6,71,E,5.,0
^SCR("P1TIPM","G",1,"FNC")

^SCR("P1TIPM","G",1,"GLOB")
NAME
^SCR("P1TIPM","G",1,"HELP")

^SCR("P1TIPM","G",1,"LMAX")
10
^SCR("P1TIPM","G",1,"MUMPS1")

^SCR("P1TIPM","G",1,"MUMPS2")
D MLZ^P1TIPM
^SCR("P1TIPM","G",1,"MUST")

^SCR("P1TIPM","G",1,"NLN")
20
^SCR("P1TIPM","G",1,"RZD")
\
^SCR("P1TIPM","G",1,"SHEM")
 xvln 'qn 
^SCR("P1TIPM","G",1,"TOPB")
8
^SCR("P1TIPM","G",1,"TYP")
E
^SCR("P1TIPM","G",1,"VRB")
MLZ1
^SCR("P1TIPM","G",2,"CRD")
6,60,H,21,0
^SCR("P1TIPM","G",2,"HELP")

^SCR("P1TIPM","G",2,"LMAX")
21
^SCR("P1TIPM","G",2,"MUMPS1")

^SCR("P1TIPM","G",2,"MUMPS2")

^SCR("P1TIPM","G",2,"OUTPUT")

^SCR("P1TIPM","G",2,"SHEM")
      xvln  my       
^SCR("P1TIPM","G",2,"TYP")
H
^SCR("P1TIPM","G",3,"CRD")
6,38,N,9,2
^SCR("P1TIPM","G",3,"HELP")

^SCR("P1TIPM","G",3,"LMAX")
9
^SCR("P1TIPM","G",3,"MUMPS1")

^SCR("P1TIPM","G",3,"MUMPS2")
D TIP^P1TIPM
^SCR("P1TIPM","G",3,"SHEM")
   xky   
^SCR("P1TIPM","G",3,"TYP")
N
^SCR("P1TIPM","G",4,"CRD")
6,28,N,10,2
^SCR("P1TIPM","G",4,"HELP")

^SCR("P1TIPM","G",4,"LMAX")
12
^SCR("P1TIPM","G",4,"MUMPS1")

^SCR("P1TIPM","G",4,"MUMPS2")
D TIP^P1TIPM
^SCR("P1TIPM","G",4,"SHEM")
 i`xy`a tih 
^SCR("P1TIPM","G",4,"TYP")
N
^SCR("P1TIPM","G",5,"CRD")
6,15,N,9,2
^SCR("P1TIPM","G",5,"HELP")

^SCR("P1TIPM","G",5,"LMAX")
9
^SCR("P1TIPM","G",5,"MUMPS1")

^SCR("P1TIPM","G",5,"MUMPS2")

^SCR("P1TIPM","G",5,"OUTPUT")

^SCR("P1TIPM","G",5,"SHEM")
   k"dq  
^SCR("P1TIPM","G",5,"TYP")
N
^SCR("P1TIPM","G","DEL")
Y
^SCR("P1TIPM","G","MAX")
999
^SCR("P1TIPM","G","NAME","MLZ")
1
^SCR("P1TIPM","G","NAME","MLZ1")
2
^SCR("P1TIPM","G","NAME","TIP")
5
^SCR("P1TIPM","G","NAME","TIPCA")
4
^SCR("P1TIPM","G","NAME","TIPMZ")
3
^SCR("P1TIPM","G","NM",1)
MLZ
^SCR("P1TIPM","G","NM",2)
MLZ1
^SCR("P1TIPM","G","NM",3)
TIPMZ
^SCR("P1TIPM","G","NM",4)
TIPCA
^SCR("P1TIPM","G","NM",5)
TIP
^SCR("P1TIPM","G","RB")
5,4,22,76
^SCR("P1TIPM","G","REF")
^TEMP($P
^SCR("P1TIPM","G","RZD")
\
^SCR("P1TIPM","G","STEP")
1
^SCR("P1TIPM","G","STG")
     :   k"dq  : i`xy`a tih :   xky   :      xvln  my       : xvln 'qn :       
^SCR("P1TIPM","G","VG")
7
^SCR("P1TIPM","NAME")
ixhpnl mitih
^SCR("P1TIPM","P",5,"CRD")
3,48,D,8,0
^SCR("P1TIPM","P",5,"HELP")

^SCR("P1TIPM","P",5,"LMAX")
9
^SCR("P1TIPM","P",5,"MUMPS1")
S:'$G(TRH) TRH=$$^%L1DC(P1DZ,1)
^SCR("P1TIPM","P",5,"MUMPS2")
D TRH^P1TIPM
^SCR("P1TIPM","P",5,"TYP")
D
^SCR("P1TIPM","P",10,"CRD")
22,4,N,10,2
^SCR("P1TIPM","P",10,"HELP")

^SCR("P1TIPM","P",10,"LMAX")
10
^SCR("P1TIPM","P",10,"MUMPS1")

^SCR("P1TIPM","P",10,"MUMPS2")

^SCR("P1TIPM","P",10,"OUTPUT")

^SCR("P1TIPM","P",10,"TYP")
N
^SCR("P1TIPM","P","NAME","SAH")
10
^SCR("P1TIPM","P","NAME","TRH")
5
^SCR("P1TIPM","P","NM",5)
TRH
^SCR("P1TIPM","P","NM",10)
SAH
^SCR("P1TIPMZ")
H
^SCR("P1TIPMZ",1)
                              #  mixvlnl mitih  #                              
^SCR("P1TIPMZ",2)
                                                {05      } jix`z               
^SCR("P1TIPMZ",3)
                                                                             1$
^SCR("P1TIPMZ",4)
   :mitih k"dq :onefna mitih:onefna `l m'tih: zexy : oeict :  xvln my  : 'qn : 
^SCR("P1TIPMZ",5)
                                                                               
^SCR("P1TIPMZ",6)
                                                                               
^SCR("P1TIPMZ",7)
                                                                               
^SCR("P1TIPMZ",8)
                                                                               
^SCR("P1TIPMZ",9)
                                                                               
^SCR("P1TIPMZ",10)
                                                                               
^SCR("P1TIPMZ",11)
                                                                               
^SCR("P1TIPMZ",12)
                                                                               
^SCR("P1TIPMZ",13)
                                                                               
^SCR("P1TIPMZ",14)
                                                                               
^SCR("P1TIPMZ",15)
                                                                               
^SCR("P1TIPMZ",16)
                                                                               
^SCR("P1TIPMZ",17)
                                                                               
^SCR("P1TIPMZ",18)
                                                                               
^SCR("P1TIPMZ",19)
                                                                               
^SCR("P1TIPMZ",20)
 $1                                                                            
^SCR("P1TIPMZ",21)
      {47     }    {40     }      {35     }  {25   } {20    }                  
^SCR("P1TIPMZ",22)
                                                                               
^SCR("P1TIPMZ","A",1)
�‰˜–ŒŽŒ�‰”‰ˆ
^SCR("P1TIPMZ","A",2)
Š‰˜€š
^SCR("P1TIPMZ","A",3)

^SCR("P1TIPMZ","A",4)
�‰”‰ˆ‹"„‘�Ž…†Ž��‰”‰ˆ�Ž…†Ž�€Œ�'”‰ˆš…˜™�…‰ƒ”˜–ŒŽ�™'‘Ž
^SCR("P1TIPMZ","A",5)
--------------------------------------------------------------------
^SCR("P1TIPMZ","A",6)

^SCR("P1TIPMZ","A",7)

^SCR("P1TIPMZ","A",8)

^SCR("P1TIPMZ","A",9)

^SCR("P1TIPMZ","A",10)

^SCR("P1TIPMZ","A",11)

^SCR("P1TIPMZ","A",12)

^SCR("P1TIPMZ","A",13)

^SCR("P1TIPMZ","A",14)

^SCR("P1TIPMZ","A",15)

^SCR("P1TIPMZ","A",16)

^SCR("P1TIPMZ","A",17)

^SCR("P1TIPMZ","A",18)

^SCR("P1TIPMZ","A",19)

^SCR("P1TIPMZ","A",20)

^SCR("P1TIPMZ","A",21)

^SCR("P1TIPMZ","A",22)

^SCR("P1TIPMZ","AV",1)
ohrmknkohphy
^SCR("P1TIPMZ","AV",2)
lhrt,
^SCR("P1TIPMZ","AV",3)

^SCR("P1TIPMZ","AV",4)
ohphyf"vxinuzncohphyinuznctkowphy,uraiuhsprmknoawxn
^SCR("P1TIPMZ","AV",5)
--------------------------------------------------------------------
^SCR("P1TIPMZ","AV",6)

^SCR("P1TIPMZ","AV",7)

^SCR("P1TIPMZ","AV",8)

^SCR("P1TIPMZ","AV",9)

^SCR("P1TIPMZ","AV",10)

^SCR("P1TIPMZ","AV",11)

^SCR("P1TIPMZ","AV",12)

^SCR("P1TIPMZ","AV",13)

^SCR("P1TIPMZ","AV",14)

^SCR("P1TIPMZ","AV",15)

^SCR("P1TIPMZ","AV",16)

^SCR("P1TIPMZ","AV",17)

^SCR("P1TIPMZ","AV",18)

^SCR("P1TIPMZ","AV",19)

^SCR("P1TIPMZ","AV",20)

^SCR("P1TIPMZ","AV",21)

^SCR("P1TIPMZ","AV",22)

^SCR("P1TIPMZ","G",1,"CRD")
5,77,E,5,0
^SCR("P1TIPMZ","G",1,"HELP")

^SCR("P1TIPMZ","G",1,"LMAX")
5
^SCR("P1TIPMZ","G",1,"MUMPS1")

^SCR("P1TIPMZ","G",1,"MUMPS2")

^SCR("P1TIPMZ","G",1,"OUTPUT")

^SCR("P1TIPMZ","G",1,"SHEM")
 'qn 
^SCR("P1TIPMZ","G",1,"TYP")
E
^SCR("P1TIPMZ","G",2,"CRD")
5,71,H,11,0
^SCR("P1TIPMZ","G",2,"HELP")

^SCR("P1TIPMZ","G",2,"LMAX")
11
^SCR("P1TIPMZ","G",2,"MUMPS1")

^SCR("P1TIPMZ","G",2,"MUMPS2")

^SCR("P1TIPMZ","G",2,"OUTPUT")

^SCR("P1TIPMZ","G",2,"SHEM")
  xvln my  
^SCR("P1TIPMZ","G",2,"TYP")
H
^SCR("P1TIPMZ","G",3,"CRD")
5,59,N,7,2
^SCR("P1TIPMZ","G",3,"HELP")

^SCR("P1TIPMZ","G",3,"LMAX")
7
^SCR("P1TIPMZ","G",3,"MUMPS1")

^SCR("P1TIPMZ","G",3,"MUMPS2")

^SCR("P1TIPMZ","G",3,"OUTPUT")

^SCR("P1TIPMZ","G",3,"SHEM")
 oeict 
^SCR("P1TIPMZ","G",3,"TYP")
N
^SCR("P1TIPMZ","G",4,"CRD")
5,51,N,6,2
^SCR("P1TIPMZ","G",4,"HELP")

^SCR("P1TIPMZ","G",4,"LMAX")
6
^SCR("P1TIPMZ","G",4,"MUMPS1")

^SCR("P1TIPMZ","G",4,"MUMPS2")

^SCR("P1TIPMZ","G",4,"OUTPUT")

^SCR("P1TIPMZ","G",4,"SHEM")
 zexy 
^SCR("P1TIPMZ","G",4,"TYP")
N
^SCR("P1TIPMZ","G",5,"CRD")
5,44,N,8,2
^SCR("P1TIPMZ","G",5,"HELP")

^SCR("P1TIPMZ","G",5,"LMAX")
15
^SCR("P1TIPMZ","G",5,"MUMPS1")

^SCR("P1TIPMZ","G",5,"MUMPS2")

^SCR("P1TIPMZ","G",5,"OUTPUT")

^SCR("P1TIPMZ","G",5,"SHEM")
onefna `l m'tih
^SCR("P1TIPMZ","G",5,"TYP")
N
^SCR("P1TIPMZ","G",6,"CRD")
5,28,N,8,2
^SCR("P1TIPMZ","G",6,"HELP")

^SCR("P1TIPMZ","G",6,"LMAX")
12
^SCR("P1TIPMZ","G",6,"MUMPS1")
I $G(^P1PRM("TIPMZM")) S %SAY=" <F9> - mitih hext " X %XMSGN
^SCR("P1TIPMZ","G",6,"MUMPS2")
D TIPMZ^P1TIPMZ
^SCR("P1TIPMZ","G",6,"SHEM")
onefna mitih
^SCR("P1TIPMZ","G",6,"TYP")
N
^SCR("P1TIPMZ","G",7,"CRD")
5,15,N,8,2
^SCR("P1TIPMZ","G",7,"HELP")

^SCR("P1TIPMZ","G",7,"LMAX")
11
^SCR("P1TIPMZ","G",7,"MUMPS1")

^SCR("P1TIPMZ","G",7,"MUMPS2")

^SCR("P1TIPMZ","G",7,"OUTPUT")

^SCR("P1TIPMZ","G",7,"SHEM")
mitih k"dq 
^SCR("P1TIPMZ","G",7,"TYP")
N
^SCR("P1TIPMZ","G","MAX")
1
^SCR("P1TIPMZ","G","NAME","MSP")
1
^SCR("P1TIPMZ","G","NAME","MSP1")
2
^SCR("P1TIPMZ","G","NAME","PDN")
3
^SCR("P1TIPMZ","G","NAME","SHER")
4
^SCR("P1TIPMZ","G","NAME","TIPMZ")
6
^SCR("P1TIPMZ","G","NAME","TIPN")
5
^SCR("P1TIPMZ","G","NAME","TIPS")
7
^SCR("P1TIPMZ","G","NM",1)
MSP
^SCR("P1TIPMZ","G","NM",2)
MSP1
^SCR("P1TIPMZ","G","NM",3)
PDN
^SCR("P1TIPMZ","G","NM",4)
SHER
^SCR("P1TIPMZ","G","NM",5)
TIPN
^SCR("P1TIPMZ","G","NM",6)
TIPMZ
^SCR("P1TIPMZ","G","NM",7)
TIPS
^SCR("P1TIPMZ","G","RB")
4,2,21,79
^SCR("P1TIPMZ","G","REF")
^TEMP($P
^SCR("P1TIPMZ","G","RZD")
\
^SCR("P1TIPMZ","G","STEP")
1
^SCR("P1TIPMZ","G","STG")
   :mitih k"dq :onefna mitih:onefna `l m'tih: zexy : oeict :  xvln my  : 'qn : 
^SCR("P1TIPMZ","G","VG")
6
^SCR("P1TIPMZ","NAME")

^SCR("P1TIPMZ","P",5,"CRD")
2,48,D,8,0
^SCR("P1TIPMZ","P",5,"HELP")

^SCR("P1TIPMZ","P",5,"LMAX")
9
^SCR("P1TIPMZ","P",5,"MUMPS1")

^SCR("P1TIPMZ","P",5,"MUMPS2")

^SCR("P1TIPMZ","P",5,"OUTPUT")

^SCR("P1TIPMZ","P",5,"TYP")
D
^SCR("P1TIPMZ","P",20,"CRD")
21,53,N,7,2
^SCR("P1TIPMZ","P",20,"HELP")

^SCR("P1TIPMZ","P",20,"LMAX")
7
^SCR("P1TIPMZ","P",20,"MUMPS1")

^SCR("P1TIPMZ","P",20,"MUMPS2")

^SCR("P1TIPMZ","P",20,"OUTPUT")

^SCR("P1TIPMZ","P",20,"TYP")
N
^SCR("P1TIPMZ","P",25,"CRD")
21,45,N,6,2
^SCR("P1TIPMZ","P",25,"HELP")

^SCR("P1TIPMZ","P",25,"LMAX")
6
^SCR("P1TIPMZ","P",25,"MUMPS1")

^SCR("P1TIPMZ","P",25,"MUMPS2")

^SCR("P1TIPMZ","P",25,"OUTPUT")

^SCR("P1TIPMZ","P",25,"TYP")
N
^SCR("P1TIPMZ","P",35,"CRD")
21,34,N,7,2
^SCR("P1TIPMZ","P",35,"HELP")

^SCR("P1TIPMZ","P",35,"LMAX")
8
^SCR("P1TIPMZ","P",35,"MUMPS1")

^SCR("P1TIPMZ","P",35,"MUMPS2")

^SCR("P1TIPMZ","P",35,"OUTPUT")

^SCR("P1TIPMZ","P",35,"TYP")
N
^SCR("P1TIPMZ","P",40,"CRD")
21,19,N,8,2
^SCR("P1TIPMZ","P",40,"HELP")

^SCR("P1TIPMZ","P",40,"LMAX")
8
^SCR("P1TIPMZ","P",40,"MUMPS1")

^SCR("P1TIPMZ","P",40,"MUMPS2")

^SCR("P1TIPMZ","P",40,"OUTPUT")

^SCR("P1TIPMZ","P",40,"TYP")
N
^SCR("P1TIPMZ","P",47,"CRD")
21,6,N,8,2
^SCR("P1TIPMZ","P",47,"HELP")

^SCR("P1TIPMZ","P",47,"LMAX")
8
^SCR("P1TIPMZ","P",47,"MUMPS1")

^SCR("P1TIPMZ","P",47,"MUMPS2")

^SCR("P1TIPMZ","P",47,"OUTPUT")

^SCR("P1TIPMZ","P",47,"TYP")
N
^SCR("P1TIPMZ","P","NAME","DAT1")
5
^SCR("P1TIPMZ","P","NAME","SUMPD")
20
^SCR("P1TIPMZ","P","NAME","SUMSR")
25
^SCR("P1TIPMZ","P","NAME","SUMTP")
47
^SCR("P1TIPMZ","P","NAME","SUMTPM")
40
^SCR("P1TIPMZ","P","NAME","SUMTPN")
35
^SCR("P1TIPMZ","P","NM",5)
DAT1
^SCR("P1TIPMZ","P","NM",20)
SUMPD
^SCR("P1TIPMZ","P","NM",25)
SUMSR
^SCR("P1TIPMZ","P","NM",35)
SUMTPN
^SCR("P1TIPMZ","P","NM",40)
SUMTPM
^SCR("P1TIPMZ","P","NM",47)
SUMTP
^SCR("P1TIPMZ1")
H
^SCR("P1TIPMZ1",1)
                                                                               
^SCR("P1TIPMZ1",2)
                                                                               
^SCR("P1TIPMZ1",3)
                                   {05     } : jix`z                           
^SCR("P1TIPMZ1",4)
                                                             1$                
^SCR("P1TIPMZ1",5)
                      : onefna mitih  :   xvln my   : xvln :                   
^SCR("P1TIPMZ1",6)
                                                                               
^SCR("P1TIPMZ1",7)
                                                                               
^SCR("P1TIPMZ1",8)
                                                                               
^SCR("P1TIPMZ1",9)
                                                                               
^SCR("P1TIPMZ1",10)
                                                                               
^SCR("P1TIPMZ1",11)
                                                                               
^SCR("P1TIPMZ1",12)
                                                                               
^SCR("P1TIPMZ1",13)
                                                                               
^SCR("P1TIPMZ1",14)
                                                                               
^SCR("P1TIPMZ1",15)
                                                                               
^SCR("P1TIPMZ1",16)
                                                                               
^SCR("P1TIPMZ1",17)
                                                                               
^SCR("P1TIPMZ1",18)
                                                                               
^SCR("P1TIPMZ1",19)
                                                                               
^SCR("P1TIPMZ1",20)
                 $1                                                            
^SCR("P1TIPMZ1","A",1)

^SCR("P1TIPMZ1","A",2)

^SCR("P1TIPMZ1","A",3)
:Š‰˜€š
^SCR("P1TIPMZ1","A",4)

^SCR("P1TIPMZ1","A",5)
�Ž…†Ž��‰”‰ˆ˜–ŒŽ�™˜–ŒŽ
^SCR("P1TIPMZ1","A",6)
----------------------------------
^SCR("P1TIPMZ1","A",7)

^SCR("P1TIPMZ1","A",8)

^SCR("P1TIPMZ1","A",9)

^SCR("P1TIPMZ1","A",10)

^SCR("P1TIPMZ1","A",11)

^SCR("P1TIPMZ1","A",12)

^SCR("P1TIPMZ1","A",13)

^SCR("P1TIPMZ1","A",14)

^SCR("P1TIPMZ1","A",15)

^SCR("P1TIPMZ1","A",16)

^SCR("P1TIPMZ1","A",17)

^SCR("P1TIPMZ1","A",18)

^SCR("P1TIPMZ1","A",19)

^SCR("P1TIPMZ1","A",20)

^SCR("P1TIPMZ1","AV",1)

^SCR("P1TIPMZ1","AV",2)

^SCR("P1TIPMZ1","AV",3)
:lhrt,
^SCR("P1TIPMZ1","AV",4)

^SCR("P1TIPMZ1","AV",5)
inuzncohphyrmknoarmkn
^SCR("P1TIPMZ1","AV",6)
----------------------------------
^SCR("P1TIPMZ1","AV",7)

^SCR("P1TIPMZ1","AV",8)

^SCR("P1TIPMZ1","AV",9)

^SCR("P1TIPMZ1","AV",10)

^SCR("P1TIPMZ1","AV",11)

^SCR("P1TIPMZ1","AV",12)

^SCR("P1TIPMZ1","AV",13)

^SCR("P1TIPMZ1","AV",14)

^SCR("P1TIPMZ1","AV",15)

^SCR("P1TIPMZ1","AV",16)

^SCR("P1TIPMZ1","AV",17)

^SCR("P1TIPMZ1","AV",18)

^SCR("P1TIPMZ1","AV",19)

^SCR("P1TIPMZ1","AV",20)

^SCR("P1TIPMZ1","G",1,"CRD")
6,59,E,6,0
^SCR("P1TIPMZ1","G",1,"HELP")

^SCR("P1TIPMZ1","G",1,"LMAX")
6
^SCR("P1TIPMZ1","G",1,"MUMPS1")

^SCR("P1TIPMZ1","G",1,"MUMPS2")

^SCR("P1TIPMZ1","G",1,"OUTPUT")

^SCR("P1TIPMZ1","G",1,"SHEM")
 xvln 
^SCR("P1TIPMZ1","G",1,"TYP")
E
^SCR("P1TIPMZ1","G",2,"CRD")
6,52,H,13,0
^SCR("P1TIPMZ1","G",2,"HELP")

^SCR("P1TIPMZ1","G",2,"LMAX")
13
^SCR("P1TIPMZ1","G",2,"MUMPS1")

^SCR("P1TIPMZ1","G",2,"MUMPS2")

^SCR("P1TIPMZ1","G",2,"OUTPUT")

^SCR("P1TIPMZ1","G",2,"SHEM")
   xvln my   
^SCR("P1TIPMZ1","G",2,"TYP")
H
^SCR("P1TIPMZ1","G",3,"CRD")
6,38,N,8,2
^SCR("P1TIPMZ1","G",3,"HELP")

^SCR("P1TIPMZ1","G",3,"LMAX")
15
^SCR("P1TIPMZ1","G",3,"MUMPS1")

^SCR("P1TIPMZ1","G",3,"MUMPS2")

^SCR("P1TIPMZ1","G",3,"OUTPUT")

^SCR("P1TIPMZ1","G",3,"SHEM")
 onefna mitih  
^SCR("P1TIPMZ1","G",3,"TYP")
N
^SCR("P1TIPMZ1","G","MAX")
1
^SCR("P1TIPMZ1","G","NAME","MLZ")
1
^SCR("P1TIPMZ1","G","NAME","MLZ1")
2
^SCR("P1TIPMZ1","G","NAME","TIPMZ")
3
^SCR("P1TIPMZ1","G","NM",1)
MLZ
^SCR("P1TIPMZ1","G","NM",2)
MLZ1
^SCR("P1TIPMZ1","G","NM",3)
TIPMZ
^SCR("P1TIPMZ1","G","RB")
5,18,21,63
^SCR("P1TIPMZ1","G","REF")
^TEMP($P
^SCR("P1TIPMZ1","G","RZD")
\
^SCR("P1TIPMZ1","G","STEP")
1
^SCR("P1TIPMZ1","G","STG")
                      : onefna mitih  :   xvln my   : xvln :                   
^SCR("P1TIPMZ1","G","VG")
7
^SCR("P1TIPMZ1","NAME")
(xvewn) 'fna mitih
^SCR("P1TIPMZ1","P",5,"CRD")
3,35,D,8,0
^SCR("P1TIPMZ1","P",5,"HELP")

^SCR("P1TIPMZ1","P",5,"LMAX")
8
^SCR("P1TIPMZ1","P",5,"MUMPS1")

^SCR("P1TIPMZ1","P",5,"MUMPS2")

^SCR("P1TIPMZ1","P",5,"OUTPUT")

^SCR("P1TIPMZ1","P",5,"TYP")
D
^SCR("P1TIPMZ1","P","NAME","DAT1")
5
^SCR("P1TIPMZ1","P","NM",5)
DAT1
^SCR("P1TIPMZM")
H
^SCR("P1TIPMZM",1)
                                # xvlnl mitih #                                
^SCR("P1TIPMZM",2)
                                              {05     : jix`z                  
^SCR("P1TIPMZM",3)
                          {                11} {10    :  xvln                  
^SCR("P1TIPMZM",4)
                                                                               
^SCR("P1TIPMZM",5)
                                                                   1$          
^SCR("P1TIPMZM",6)
            :          dxrd        :  dry  :    tih   : ogley :                
^SCR("P1TIPMZM",7)
                                                                               
^SCR("P1TIPMZM",8)
                                                                               
^SCR("P1TIPMZM",9)
                                                                               
^SCR("P1TIPMZM",10)
                                                                               
^SCR("P1TIPMZM",11)
                                                                               
^SCR("P1TIPMZM",12)
                                                                               
^SCR("P1TIPMZM",13)
                                                                               
^SCR("P1TIPMZM",14)
                                                                               
^SCR("P1TIPMZM",15)
                                                                               
^SCR("P1TIPMZM",16)
                                                                               
^SCR("P1TIPMZM",17)
                                                                               
^SCR("P1TIPMZM",18)
                                                                               
^SCR("P1TIPMZM",19)
        $1                                                                     
^SCR("P1TIPMZM",20)
                                         g"y {15      : k"dq                   
^SCR("P1TIPMZM","A",1)
˜–ŒŽŒ�‰”‰ˆ
^SCR("P1TIPMZM","A",2)
:Š‰˜€š
^SCR("P1TIPMZM","A",3)
:˜–ŒŽ
^SCR("P1TIPMZM","A",4)

^SCR("P1TIPMZM","A",5)

^SCR("P1TIPMZM","A",6)
„˜’„„’™”‰ˆ�‡Œ…™
^SCR("P1TIPMZM","A",7)
----------------------------------------------
^SCR("P1TIPMZM","A",8)

^SCR("P1TIPMZM","A",9)

^SCR("P1TIPMZM","A",10)

^SCR("P1TIPMZM","A",11)

^SCR("P1TIPMZM","A",12)

^SCR("P1TIPMZM","A",13)

^SCR("P1TIPMZM","A",14)

^SCR("P1TIPMZM","A",15)

^SCR("P1TIPMZM","A",16)

^SCR("P1TIPMZM","A",17)

^SCR("P1TIPMZM","A",18)

^SCR("P1TIPMZM","A",19)

^SCR("P1TIPMZM","A",20)
‡"™:‹"„‘
^SCR("P1TIPMZM","AV",1)
rmknkohphy
^SCR("P1TIPMZM","AV",2)
:lhrt,
^SCR("P1TIPMZM","AV",3)
:rmkn
^SCR("P1TIPMZM","AV",4)

^SCR("P1TIPMZM","AV",5)

^SCR("P1TIPMZM","AV",6)
vrgvvgaphyijkua
^SCR("P1TIPMZM","AV",7)
----------------------------------------------
^SCR("P1TIPMZM","AV",8)

^SCR("P1TIPMZM","AV",9)

^SCR("P1TIPMZM","AV",10)

^SCR("P1TIPMZM","AV",11)

^SCR("P1TIPMZM","AV",12)

^SCR("P1TIPMZM","AV",13)

^SCR("P1TIPMZM","AV",14)

^SCR("P1TIPMZM","AV",15)

^SCR("P1TIPMZM","AV",16)

^SCR("P1TIPMZM","AV",17)

^SCR("P1TIPMZM","AV",18)

^SCR("P1TIPMZM","AV",19)

^SCR("P1TIPMZM","AV",20)
j"a:f"vx
^SCR("P1TIPMZM","G",1,"CRD")
7,62,N,3,0
^SCR("P1TIPMZM","G",1,"HELP")

^SCR("P1TIPMZM","G",1,"LMAX")
7
^SCR("P1TIPMZM","G",1,"MUMPS1")

^SCR("P1TIPMZM","G",1,"MUMPS2")

^SCR("P1TIPMZM","G",1,"MUST")

^SCR("P1TIPMZM","G",1,"SHEM")
 ogley 
^SCR("P1TIPMZM","G",1,"TYP")
N
^SCR("P1TIPMZM","G",2,"CRD")
7,54,N,8,2
^SCR("P1TIPMZM","G",2,"HELP")

^SCR("P1TIPMZM","G",2,"LMAX")
10
^SCR("P1TIPMZM","G",2,"MUMPS1")

^SCR("P1TIPMZM","G",2,"MUMPS2")
D TIP^P1TIPMZM
^SCR("P1TIPMZM","G",2,"SHEM")
    tih   
^SCR("P1TIPMZM","G",2,"TYP")
N
^SCR("P1TIPMZM","G",3,"CRD")
7,43,E,5,0
^SCR("P1TIPMZM","G",3,"HELP")

^SCR("P1TIPMZM","G",3,"LMAX")
7
^SCR("P1TIPMZM","G",3,"MUMPS1")

^SCR("P1TIPMZM","G",3,"MUMPS2")

^SCR("P1TIPMZM","G",3,"OUTPUT")

^SCR("P1TIPMZM","G",3,"SHEM")
  dry  
^SCR("P1TIPMZM","G",3,"TYP")
E
^SCR("P1TIPMZM","G",4,"CRD")
7,35,H,22,0
^SCR("P1TIPMZM","G",4,"HELP")

^SCR("P1TIPMZM","G",4,"LMAX")
22
^SCR("P1TIPMZM","G",4,"MUMPS1")

^SCR("P1TIPMZM","G",4,"MUMPS2")

^SCR("P1TIPMZM","G",4,"SHEM")
          dxrd        
^SCR("P1TIPMZM","G",4,"TYP")
H
^SCR("P1TIPMZM","G","DEL")

^SCR("P1TIPMZM","G","MAX")
99999
^SCR("P1TIPMZM","G","NAME","HRA")
4
^SCR("P1TIPMZM","G","NAME","SHAA")
3
^SCR("P1TIPMZM","G","NAME","SHULH")
1
^SCR("P1TIPMZM","G","NAME","TIP")
2
^SCR("P1TIPMZM","G","NM",1)
SHULH
^SCR("P1TIPMZM","G","NM",2)
TIP
^SCR("P1TIPMZM","G","NM",3)
SHAA
^SCR("P1TIPMZM","G","NM",4)
HRA
^SCR("P1TIPMZM","G","RB")
6,9,20,69
^SCR("P1TIPMZM","G","REF")
^TEMP($P,"T"
^SCR("P1TIPMZM","G","RZD")
\
^SCR("P1TIPMZM","G","STEP")
1
^SCR("P1TIPMZM","G","STG")
            :          dxrd        :  dry  :    tih   : ogley :                
^SCR("P1TIPMZM","G","VG")
8
^SCR("P1TIPMZM","NAME")

^SCR("P1TIPMZM","P",5,"CRD")
2,46,D,8,0
^SCR("P1TIPMZM","P",5,"HELP")

^SCR("P1TIPMZM","P",5,"LMAX")
8
^SCR("P1TIPMZM","P",5,"MUMPS1")

^SCR("P1TIPMZM","P",5,"MUMPS2")

^SCR("P1TIPMZM","P",5,"OUTPUT")

^SCR("P1TIPMZM","P",5,"TYP")
D
^SCR("P1TIPMZM","P",10,"CHECK")
Y
^SCR("P1TIPMZM","P",10,"CRD")
3,47,E,5.,0
^SCR("P1TIPMZM","P",10,"FNC")

^SCR("P1TIPMZM","P",10,"GLOB")
NAME
^SCR("P1TIPMZM","P",10,"HELP")

^SCR("P1TIPMZM","P",10,"LMAX")
7
^SCR("P1TIPMZM","P",10,"MUMPS1")

^SCR("P1TIPMZM","P",10,"MUMPS2")
D MLZ^P1TIPMZM
^SCR("P1TIPMZM","P",10,"MUST")

^SCR("P1TIPMZM","P",10,"NLN")
20
^SCR("P1TIPMZM","P",10,"RZD")
\
^SCR("P1TIPMZM","P",10,"TOPB")
8
^SCR("P1TIPMZM","P",10,"TYP")
E
^SCR("P1TIPMZM","P",10,"VRB")
MLZ1
^SCR("P1TIPMZM","P",11,"CRD")
3,46,H,19
^SCR("P1TIPMZM","P",11,"HELP")

^SCR("P1TIPMZM","P",11,"LMAX")
19
^SCR("P1TIPMZM","P",11,"MUMPS1")

^SCR("P1TIPMZM","P",11,"MUMPS2")

^SCR("P1TIPMZM","P",11,"OUTPUT")

^SCR("P1TIPMZM","P",11,"TYP")
H
^SCR("P1TIPMZM","P",15,"CRD")
20,45,N,9,2
^SCR("P1TIPMZM","P",15,"HELP")

^SCR("P1TIPMZM","P",15,"LMAX")
9
^SCR("P1TIPMZM","P",15,"MUMPS1")

^SCR("P1TIPMZM","P",15,"MUMPS2")

^SCR("P1TIPMZM","P",15,"OUTPUT")

^SCR("P1TIPMZM","P",15,"TYP")
N
^SCR("P1TIPMZM","P","NAME","MLZ")
10
^SCR("P1TIPMZM","P","NAME","MLZ1")
11
^SCR("P1TIPMZM","P","NAME","SAH")
15
^SCR("P1TIPMZM","P","NAME","TRH")
5
^SCR("P1TIPMZM","P","NM",5)
TRH
^SCR("P1TIPMZM","P","NM",10)
MLZ
^SCR("P1TIPMZM","P","NM",11)
MLZ1
^SCR("P1TIPMZM","P","NM",15)
SAH
^SCR("P1TM")
H
^SCR("P1TM",1)
        #{                     03}#                                            
^SCR("P1TM",2)
                     {10      }:jix`z cr    {05      }:jix`zn                  
^SCR("P1TM",3)
                    {13       }: gewl cr   {11       }: gewln                  
^SCR("P1TM",4)
                                                                             1$
^SCR("P1TM",5)
 :    dlaw onf   : dpnfd :   gewld my    : gewl 'qn : mley :gelyn 'z: jix`z  : 
^SCR("P1TM",6)
                                                                               
^SCR("P1TM",7)
                                                                               
^SCR("P1TM",8)
                                                                               
^SCR("P1TM",9)
                                                                               
^SCR("P1TM",10)
                                                                               
^SCR("P1TM",11)
                                                                               
^SCR("P1TM",12)
                                                                               
^SCR("P1TM",13)
                                                                               
^SCR("P1TM",14)
                                                                               
^SCR("P1TM",15)
                                                                               
^SCR("P1TM",16)
                                                                               
^SCR("P1TM",17)
                                                                               
^SCR("P1TM",18)
                                                                               
^SCR("P1TM",19)
                                                                               
^SCR("P1TM",20)
                                                                               
^SCR("P1TM",21)
 $1                                                                            
^SCR("P1TM",22)
                                       {20       }:k"dq  {15  }: migelyn       
^SCR("P1TM","A",1)

^SCR("P1TM","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1TM","A",3)
:‡…—Œƒ’:‡…—ŒŽ
^SCR("P1TM","A",4)

^SCR("P1TM","A",5)
„Œ�—�Ž†„�Ž†„‡…—Œ„�™‡…—Œ'‘Ž�Œ…™‡…Œ™Ž'šŠ‰˜€š
^SCR("P1TM","A",6)
----------------------------------------------------------------------
^SCR("P1TM","A",7)

^SCR("P1TM","A",8)

^SCR("P1TM","A",9)

^SCR("P1TM","A",10)

^SCR("P1TM","A",11)

^SCR("P1TM","A",12)

^SCR("P1TM","A",13)

^SCR("P1TM","A",14)

^SCR("P1TM","A",15)

^SCR("P1TM","A",16)

^SCR("P1TM","A",17)

^SCR("P1TM","A",18)

^SCR("P1TM","A",19)

^SCR("P1TM","A",20)

^SCR("P1TM","A",21)

^SCR("P1TM","A",22)
:‹"„‘:�‰‡…Œ™Ž
^SCR("P1TM","AV",1)

^SCR("P1TM","AV",2)
:lhrt,sg:lhrt,n
^SCR("P1TM","AV",3)
:jueksg:juekn
^SCR("P1TM","AV",4)

^SCR("P1TM","AV",5)
vkceinzvbnzvjuekvoajuekwxnokuajukanw,lhrt,
^SCR("P1TM","AV",6)
----------------------------------------------------------------------
^SCR("P1TM","AV",7)

^SCR("P1TM","AV",8)

^SCR("P1TM","AV",9)

^SCR("P1TM","AV",10)

^SCR("P1TM","AV",11)

^SCR("P1TM","AV",12)

^SCR("P1TM","AV",13)

^SCR("P1TM","AV",14)

^SCR("P1TM","AV",15)

^SCR("P1TM","AV",16)

^SCR("P1TM","AV",17)

^SCR("P1TM","AV",18)

^SCR("P1TM","AV",19)

^SCR("P1TM","AV",20)

^SCR("P1TM","AV",21)

^SCR("P1TM","AV",22)
:f"vx:ohjukan
^SCR("P1TM","G",1,"CRD")
6,77,D,8,0
^SCR("P1TM","G",1,"HELP")

^SCR("P1TM","G",1,"LMAX")
8
^SCR("P1TM","G",1,"MUMPS1")

^SCR("P1TM","G",1,"MUMPS2")

^SCR("P1TM","G",1,"OUTPUT")

^SCR("P1TM","G",1,"SHEM")
 jix`z  
^SCR("P1TM","G",1,"TYP")
D
^SCR("P1TM","G",2,"CRD")
6,68,E,7,0
^SCR("P1TM","G",2,"HELP")

^SCR("P1TM","G",2,"LMAX")
8
^SCR("P1TM","G",2,"MUMPS1")

^SCR("P1TM","G",2,"MUMPS2")

^SCR("P1TM","G",2,"OUTPUT")

^SCR("P1TM","G",2,"SHEM")
gelyn 'z
^SCR("P1TM","G",2,"TYP")
E
^SCR("P1TM","G",3,"CRD")
6,59,N,6,2
^SCR("P1TM","G",3,"HELP")

^SCR("P1TM","G",3,"LMAX")
6
^SCR("P1TM","G",3,"MUMPS1")

^SCR("P1TM","G",3,"MUMPS2")

^SCR("P1TM","G",3,"OUTPUT")

^SCR("P1TM","G",3,"SHEM")
 mley 
^SCR("P1TM","G",3,"TYP")
N
^SCR("P1TM","G",4,"CRD")
6,52,E,10,0
^SCR("P1TM","G",4,"HELP")

^SCR("P1TM","G",4,"LMAX")
10
^SCR("P1TM","G",4,"MUMPS1")

^SCR("P1TM","G",4,"MUMPS2")

^SCR("P1TM","G",4,"OUTPUT")

^SCR("P1TM","G",4,"SHEM")
 gewl 'qn 
^SCR("P1TM","G",4,"TYP")
E
^SCR("P1TM","G",5,"CRD")
6,41,H,15,0
^SCR("P1TM","G",5,"HELP")

^SCR("P1TM","G",5,"LMAX")
15
^SCR("P1TM","G",5,"MUMPS1")

^SCR("P1TM","G",5,"MUMPS2")

^SCR("P1TM","G",5,"OUTPUT")

^SCR("P1TM","G",5,"SHEM")
   gewld my    
^SCR("P1TM","G",5,"TYP")
H
^SCR("P1TM","G",6,"CRD")
6,25,E,7,0
^SCR("P1TM","G",6,"HELP")
<F9> - dpnfd zbvd
^SCR("P1TM","G",6,"LMAX")
7
^SCR("P1TM","G",6,"MUMPS1")

^SCR("P1TM","G",6,"MUMPS2")
I %OLDTO="F9",$G(HZM) D HZG^P1S K ^TEMP($P),^TEMP1($P) N %FNAME S %SCRN="P1TM",%FNAME="" D A^%L1SC S %SC("ST")=1
^SCR("P1TM","G",6,"SHEM")
 dpnfd 
^SCR("P1TM","G",6,"TYP")
E
^SCR("P1TM","G",7,"CRD")
6,17,E,15,0
^SCR("P1TM","G",7,"HELP")

^SCR("P1TM","G",7,"LMAX")
15
^SCR("P1TM","G",7,"MUMPS1")

^SCR("P1TM","G",7,"MUMPS2")

^SCR("P1TM","G",7,"OUTPUT")

^SCR("P1TM","G",7,"SHEM")
    dlaw onf   
^SCR("P1TM","G",7,"TYP")
E
^SCR("P1TM","G","DEL")

^SCR("P1TM","G","MAX")
99999
^SCR("P1TM","G","NAME","DATH")
1
^SCR("P1TM","G","NAME","HESB")
2
^SCR("P1TM","G","NAME","HZM")
6
^SCR("P1TM","G","NAME","NAME")
5
^SCR("P1TM","G","NAME","NMB")
4
^SCR("P1TM","G","NAME","SHUM")
3
^SCR("P1TM","G","NAME","ZMANK")
7
^SCR("P1TM","G","NM",1)
DATH
^SCR("P1TM","G","NM",2)
HESB
^SCR("P1TM","G","NM",3)
SHUM
^SCR("P1TM","G","NM",4)
NMB
^SCR("P1TM","G","NM",5)
NAME
^SCR("P1TM","G","NM",6)
HZM
^SCR("P1TM","G","NM",7)
ZMANK
^SCR("P1TM","G","RB")
5,2,22,79
^SCR("P1TM","G","REF")
^TEMPDT($P
^SCR("P1TM","G","RZD")
\
^SCR("P1TM","G","STEP")
1
^SCR("P1TM","G","STG")
 :    dlaw onf   : dpnfd :   gewld my    : gewl 'qn : mley :gelyn 'z: jix`z  : 
^SCR("P1TM","G","VG")
7
^SCR("P1TM","NAME")

^SCR("P1TM","P",3,"CRD")
1,34,H,24
^SCR("P1TM","P",3,"HELP")

^SCR("P1TM","P",3,"LMAX")
24
^SCR("P1TM","P",3,"MUMPS1")

^SCR("P1TM","P",3,"MUMPS2")

^SCR("P1TM","P",3,"OUTPUT")

^SCR("P1TM","P",3,"TYP")
H
^SCR("P1TM","P",5,"CRD")
2,44,D,8,0
^SCR("P1TM","P",5,"HELP")

^SCR("P1TM","P",5,"LMAX")
9
^SCR("P1TM","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("P1TM","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("P1TM","P",5,"MUST")

^SCR("P1TM","P",5,"TYP")
D
^SCR("P1TM","P",10,"CRD")
2,21,D,8,0
^SCR("P1TM","P",10,"HELP")

^SCR("P1TM","P",10,"LMAX")
9
^SCR("P1TM","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1TM","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I $E(D2)="?" S %SC("ER")=1
^SCR("P1TM","P",10,"MUST")

^SCR("P1TM","P",10,"TYP")
D
^SCR("P1TM","P",11,"CRD")
3,43,E,10,0
^SCR("P1TM","P",11,"FNC")

^SCR("P1TM","P",11,"GLOB")
LKH
^SCR("P1TM","P",11,"HELP")

^SCR("P1TM","P",11,"LMAX")
10
^SCR("P1TM","P",11,"MUMPS1")

^SCR("P1TM","P",11,"MUMPS2")

^SCR("P1TM","P",11,"NLN")
20
^SCR("P1TM","P",11,"RZD")
\
^SCR("P1TM","P",11,"TOPB")
8
^SCR("P1TM","P",11,"TYP")
E
^SCR("P1TM","P",13,"CRD")
3,20,E,10,0
^SCR("P1TM","P",13,"FNC")

^SCR("P1TM","P",13,"GLOB")
LKH
^SCR("P1TM","P",13,"HELP")

^SCR("P1TM","P",13,"LMAX")
10
^SCR("P1TM","P",13,"MUMPS1")
S:'$G(ADLK) ADLK=MELK
^SCR("P1TM","P",13,"MUMPS2")
D ADLK^P1DTM
^SCR("P1TM","P",13,"NLN")
20
^SCR("P1TM","P",13,"RZD")
\
^SCR("P1TM","P",13,"TOPB")
8
^SCR("P1TM","P",13,"TYP")
E
^SCR("P1TM","P",15,"CRD")
22,57,N,5,0
^SCR("P1TM","P",15,"HELP")

^SCR("P1TM","P",15,"LMAX")
5
^SCR("P1TM","P",15,"MUMPS1")

^SCR("P1TM","P",15,"MUMPS2")

^SCR("P1TM","P",15,"OUTPUT")

^SCR("P1TM","P",15,"TYP")
N
^SCR("P1TM","P",20,"CRD")
22,39,N,9,2
^SCR("P1TM","P",20,"HELP")

^SCR("P1TM","P",20,"LMAX")
10
^SCR("P1TM","P",20,"MUMPS1")

^SCR("P1TM","P",20,"MUMPS2")

^SCR("P1TM","P",20,"OUTPUT")

^SCR("P1TM","P",20,"TYP")
N
^SCR("P1TM","P","NAME","ADLK")
13
^SCR("P1TM","P","NAME","DAT1")
5
^SCR("P1TM","P","NAME","DAT2")
10
^SCR("P1TM","P","NAME","KOT")
3
^SCR("P1TM","P","NAME","MELK")
11
^SCR("P1TM","P","NAME","SUM")
20
^SCR("P1TM","P","NAME","SUMH")
15
^SCR("P1TM","P","NM",3)
KOT
^SCR("P1TM","P","NM",5)
DAT1
^SCR("P1TM","P","NM",10)
DAT2
^SCR("P1TM","P","NM",11)
MELK
^SCR("P1TM","P","NM",13)
ADLK
^SCR("P1TM","P","NM",15)
SUMH
^SCR("P1TM","P","NM",20)
SUM
^SCR("P1TOT")
H
^SCR("P1TOT",1)
                          #melyz irvn` itl itqk g"ec#                          
^SCR("P1TOT",2)
                       {02     }:jix`z cr  {01      }:jix`zn                   
^SCR("P1TOT",3)
              ---------------------------------------------------              
^SCR("P1TOT",4)
              |  dxibn  |      l a w z d  |  x k n p  |    beq  |              
^SCR("P1TOT",5)
              ---------------------------------------------------              
^SCR("P1TOT",6)
              {58      }|   {55        }  |  {05     }|   onefn                
^SCR("P1TOT",7)
              {65      }|   {60        }  |  {10     }| wiy d`gnd              
^SCR("P1TOT",8)
              {67      }|   {61        }  |  {11     }| 'fn d`gnd              
^SCR("P1TOT",9)
              {72      }|   {70        }  |  {15     }| hxk`xyi                
^SCR("P1TOT",10)
              {78      }|   {75        }  |  {20     }|    dfie                
^SCR("P1TOT",11)
              {82      }|   {80        }  |  {25     }|  qxpiic                
^SCR("P1TOT",12)
              {84      }|   {83        }  |  {26     }|     AEX                
^SCR("P1TOT",13)
              {85      }|                 |  {28      |{     30}               
^SCR("P1TOT",14)
                        |                 |  {12     }|     dtwd               
^SCR("P1TOT",15)
              ----------------------------------------------------             
^SCR("P1TOT",16)
              {97      }|   {90        }  | {35      }| ehp k"dq               
^SCR("P1TOT",17)
             {95       }| `"k k"dq          {49      }|     n"rn               
^SCR("P1TOT",18)
              {74      }|   {73        }  | {13      }|     yelz               
^SCR("P1TOT",19)
                     {45     } :   miekif   {40      }: mildpn zegpd           
^SCR("P1TOT",20)
             {92      }: migelyn ehp k"dq   {91      }:dcrqn ehp k"dq          
^SCR("P1TOT",21)
                     {47     } : zexy inc   {42      }: mihixt zexikn          
^SCR("P1TOT",22)
                     {54     } :      53}   {50      }: milehia                
^SCR("P1TOT",23)
     (zexy inc-miiekif+'hia+zegpd+yelz+ehp) {52      }: ehexa k"dq             
^SCR("P1TOT","A",1)
�…Œ™š‰’–Ž€‰”Œ‰”‘‹‡"…ƒ
^SCR("P1TOT","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1TOT","A",3)
---------------------------------------------------
^SCR("P1TOT","A",4)
|„˜‰‚Ž|Œ�—š„|˜‹Ž�|‚…‘|
^SCR("P1TOT","A",5)
---------------------------------------------------
^SCR("P1TOT","A",6)
|||�Ž…†Ž
^SCR("P1TOT","A",7)
|||—‰™„€‡Ž„
^SCR("P1TOT","A",8)
|||'†Ž„€‡Ž„
^SCR("P1TOT","A",9)
|||ˆ˜‹€˜™‰
^SCR("P1TOT","A",10)
|||„†‰…
^SCR("P1TOT","A",11)
|||‘˜�‰‰ƒ
^SCR("P1TOT","A",12)
|||AEX
^SCR("P1TOT","A",13)
|||
^SCR("P1TOT","A",14)
|||„”—„
^SCR("P1TOT","A",15)
----------------------------------------------------
^SCR("P1TOT","A",16)
|||…ˆ�‹"„‘
^SCR("P1TOT","A",17)
|€"‹‹"„‘|Ž"’Ž
^SCR("P1TOT","A",18)
|||™…Œš
^SCR("P1TOT","A",19)
:�‰…‹‰†:�‰Œ„�Žš…‡�„
^SCR("P1TOT","A",20)
:�‰‡…Œ™Ž…ˆ�‹"„‘:„ƒ’‘Ž…ˆ�‹"„‘
^SCR("P1TOT","A",21)
:š…˜™‰Žƒ:�‰ˆ‰˜”š…˜‰‹Ž
^SCR("P1TOT","A",22)
::�‰Œ…ˆ‰�
^SCR("P1TOT","A",23)
(š…˜™‰Žƒ-�‰‰…‹‰†+'ˆ‰�+š…‡�„+™…Œš+…ˆ�):…ˆ…˜�‹"„‘
^SCR("P1TOT","AV",1)
ouka,hgmnthpkhpxfj"us
^SCR("P1TOT","AV",2)
:lhrt,sg:lhrt,n
^SCR("P1TOT","AV",3)
---------------------------------------------------
^SCR("P1TOT","AV",4)
|vrhdn|kce,v|rfnb|dux|
^SCR("P1TOT","AV",5)
---------------------------------------------------
^SCR("P1TOT","AV",6)
|||inuzn
^SCR("P1TOT","AV",7)
|||ehavtjnv
^SCR("P1TOT","AV",8)
|||wznvtjnv
^SCR("P1TOT","AV",9)
|||yrftrah
^SCR("P1TOT","AV",10)
|||vzhu
^SCR("P1TOT","AV",11)
|||xrbhhs
^SCR("P1TOT","AV",12)
|||AEX
^SCR("P1TOT","AV",13)
|||
^SCR("P1TOT","AV",14)
|||vpev
^SCR("P1TOT","AV",15)
----------------------------------------------------
^SCR("P1TOT","AV",16)
|||uybf"vx
^SCR("P1TOT","AV",17)
|t"ff"vx|n"gn
^SCR("P1TOT","AV",18)
|||auk,
^SCR("P1TOT","AV",19)
:ohufhz:ohkvbn,ujbv
^SCR("P1TOT","AV",20)
:ohjukanuybf"vx:vsgxnuybf"vx
^SCR("P1TOT","AV",21)
:,urahns:ohyhrp,urhfn
^SCR("P1TOT","AV",22)
::ohkuyhc
^SCR("P1TOT","AV",23)
(,urahns-ohhufhz+wyhc+,ujbv+auk,+uyb):uyurcf"vx
^SCR("P1TOT","NAME")
dvit inekiq
^SCR("P1TOT","P",1,"CRD")
2,43,D,8,0
^SCR("P1TOT","P",1,"HELP")

^SCR("P1TOT","P",1,"LMAX")
9
^SCR("P1TOT","P",1,"MUMPS1")

^SCR("P1TOT","P",1,"MUMPS2")

^SCR("P1TOT","P",1,"MUST")

^SCR("P1TOT","P",1,"TYP")
D
^SCR("P1TOT","P",2,"CRD")
2,23,D,8,0
^SCR("P1TOT","P",2,"HELP")

^SCR("P1TOT","P",2,"LMAX")
8
^SCR("P1TOT","P",2,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("P1TOT","P",2,"MUMPS2")
D DAT2^P1TOT
^SCR("P1TOT","P",2,"MUST")

^SCR("P1TOT","P",2,"TYP")
D
^SCR("P1TOT","P",5,"CRD")
6,45,N,8,2
^SCR("P1TOT","P",5,"HELP")

^SCR("P1TOT","P",5,"LMAX")
8
^SCR("P1TOT","P",5,"MUMPS1")

^SCR("P1TOT","P",5,"MUMPS2")

^SCR("P1TOT","P",5,"OUTPUT")

^SCR("P1TOT","P",5,"TYP")
N
^SCR("P1TOT","P",10,"CRD")
7,45,N,8,2
^SCR("P1TOT","P",10,"HELP")

^SCR("P1TOT","P",10,"LMAX")
8
^SCR("P1TOT","P",10,"MUMPS1")

^SCR("P1TOT","P",10,"MUMPS2")

^SCR("P1TOT","P",10,"OUTPUT")

^SCR("P1TOT","P",10,"TYP")
N
^SCR("P1TOT","P",11,"CRD")
8,45,N,8,2
^SCR("P1TOT","P",11,"HELP")

^SCR("P1TOT","P",11,"LMAX")
8
^SCR("P1TOT","P",11,"MUMPS1")

^SCR("P1TOT","P",11,"MUMPS2")

^SCR("P1TOT","P",11,"OUTPUT")

^SCR("P1TOT","P",11,"TYP")
N
^SCR("P1TOT","P",12,"CRD")
14,45,N,8,2
^SCR("P1TOT","P",12,"HELP")

^SCR("P1TOT","P",12,"LMAX")
8
^SCR("P1TOT","P",12,"MUMPS1")

^SCR("P1TOT","P",12,"MUMPS2")

^SCR("P1TOT","P",12,"OUTPUT")

^SCR("P1TOT","P",12,"TYP")
N
^SCR("P1TOT","P",13,"CRD")
18,44,N,8,2
^SCR("P1TOT","P",13,"HELP")

^SCR("P1TOT","P",13,"LMAX")
9
^SCR("P1TOT","P",13,"MUMPS1")

^SCR("P1TOT","P",13,"MUMPS2")

^SCR("P1TOT","P",13,"OUTPUT")

^SCR("P1TOT","P",13,"TYP")
N
^SCR("P1TOT","P",15,"CRD")
9,45,N,8,2
^SCR("P1TOT","P",15,"HELP")

^SCR("P1TOT","P",15,"LMAX")
8
^SCR("P1TOT","P",15,"MUMPS1")

^SCR("P1TOT","P",15,"MUMPS2")

^SCR("P1TOT","P",15,"OUTPUT")

^SCR("P1TOT","P",15,"TYP")
N
^SCR("P1TOT","P",20,"CRD")
10,45,N,8,2
^SCR("P1TOT","P",20,"HELP")

^SCR("P1TOT","P",20,"LMAX")
8
^SCR("P1TOT","P",20,"MUMPS1")

^SCR("P1TOT","P",20,"MUMPS2")

^SCR("P1TOT","P",20,"OUTPUT")

^SCR("P1TOT","P",20,"TYP")
N
^SCR("P1TOT","P",25,"CRD")
11,45,N,8,2
^SCR("P1TOT","P",25,"HELP")

^SCR("P1TOT","P",25,"LMAX")
8
^SCR("P1TOT","P",25,"MUMPS1")

^SCR("P1TOT","P",25,"MUMPS2")

^SCR("P1TOT","P",25,"OUTPUT")

^SCR("P1TOT","P",25,"TYP")
N
^SCR("P1TOT","P",26,"CRD")
12,45,N,8,2
^SCR("P1TOT","P",26,"HELP")

^SCR("P1TOT","P",26,"LMAX")
8
^SCR("P1TOT","P",26,"MUMPS1")

^SCR("P1TOT","P",26,"MUMPS2")

^SCR("P1TOT","P",26,"OUTPUT")

^SCR("P1TOT","P",26,"TYP")
N
^SCR("P1TOT","P",28,"CRD")
13,45,N,8,2
^SCR("P1TOT","P",28,"HELP")

^SCR("P1TOT","P",28,"LMAX")
9
^SCR("P1TOT","P",28,"MUMPS1")

^SCR("P1TOT","P",28,"MUMPS2")

^SCR("P1TOT","P",28,"TYP")
N
^SCR("P1TOT","P",30,"CRD")
13,64,H,4
^SCR("P1TOT","P",30,"HELP")

^SCR("P1TOT","P",30,"LMAX")
8
^SCR("P1TOT","P",30,"MUMPS1")

^SCR("P1TOT","P",30,"MUMPS2")

^SCR("P1TOT","P",30,"OUTPUT")

^SCR("P1TOT","P",30,"TYP")
H
^SCR("P1TOT","P",35,"CRD")
16,44,N,9,2
^SCR("P1TOT","P",35,"HELP")

^SCR("P1TOT","P",35,"LMAX")
9
^SCR("P1TOT","P",35,"MUMPS1")

^SCR("P1TOT","P",35,"MUMPS2")

^SCR("P1TOT","P",35,"OUTPUT")

^SCR("P1TOT","P",35,"TYP")
N
^SCR("P1TOT","P",40,"CRD")
19,44,N,8,2
^SCR("P1TOT","P",40,"HELP")

^SCR("P1TOT","P",40,"LMAX")
9
^SCR("P1TOT","P",40,"MUMPS1")

^SCR("P1TOT","P",40,"MUMPS2")

^SCR("P1TOT","P",40,"OUTPUT")

^SCR("P1TOT","P",40,"TYP")
N
^SCR("P1TOT","P",42,"CRD")
21,44,N,8,2
^SCR("P1TOT","P",42,"HELP")

^SCR("P1TOT","P",42,"LMAX")
9
^SCR("P1TOT","P",42,"MUMPS1")

^SCR("P1TOT","P",42,"MUMPS2")

^SCR("P1TOT","P",42,"OUTPUT")

^SCR("P1TOT","P",42,"TYP")
N
^SCR("P1TOT","P",45,"CRD")
19,21,N,8,2
^SCR("P1TOT","P",45,"HELP")

^SCR("P1TOT","P",45,"LMAX")
8
^SCR("P1TOT","P",45,"MUMPS1")

^SCR("P1TOT","P",45,"MUMPS2")

^SCR("P1TOT","P",45,"OUTPUT")

^SCR("P1TOT","P",45,"TYP")
N
^SCR("P1TOT","P",47,"CRD")
21,21,N,8,2
^SCR("P1TOT","P",47,"HELP")

^SCR("P1TOT","P",47,"LMAX")
8
^SCR("P1TOT","P",47,"MUMPS1")

^SCR("P1TOT","P",47,"MUMPS2")

^SCR("P1TOT","P",47,"OUTPUT")

^SCR("P1TOT","P",47,"TYP")
N
^SCR("P1TOT","P",49,"CRD")
17,44,N,8,2
^SCR("P1TOT","P",49,"HELP")

^SCR("P1TOT","P",49,"LMAX")
9
^SCR("P1TOT","P",49,"MUMPS1")

^SCR("P1TOT","P",49,"MUMPS2")

^SCR("P1TOT","P",49,"OUTPUT")

^SCR("P1TOT","P",49,"TYP")
N
^SCR("P1TOT","P",50,"CRD")
22,44,N,8,2
^SCR("P1TOT","P",50,"HELP")

^SCR("P1TOT","P",50,"LMAX")
9
^SCR("P1TOT","P",50,"MUMPS1")

^SCR("P1TOT","P",50,"MUMPS2")

^SCR("P1TOT","P",50,"OUTPUT")

^SCR("P1TOT","P",50,"TYP")
N
^SCR("P1TOT","P",52,"CRD")
23,44,N,8,2
^SCR("P1TOT","P",52,"HELP")

^SCR("P1TOT","P",52,"LMAX")
9
^SCR("P1TOT","P",52,"MUMPS1")

^SCR("P1TOT","P",52,"MUMPS2")

^SCR("P1TOT","P",52,"OUTPUT")

^SCR("P1TOT","P",52,"TYP")
N
^SCR("P1TOT","P",53,"CRD")
22,41,H,9
^SCR("P1TOT","P",53,"HELP")

^SCR("P1TOT","P",53,"LMAX")
9
^SCR("P1TOT","P",53,"MUMPS1")

^SCR("P1TOT","P",53,"MUMPS2")

^SCR("P1TOT","P",53,"OUTPUT")

^SCR("P1TOT","P",53,"TYP")
H
^SCR("P1TOT","P",54,"CRD")
22,21,N,8,2
^SCR("P1TOT","P",54,"HELP")

^SCR("P1TOT","P",54,"LMAX")
8
^SCR("P1TOT","P",54,"MUMPS1")

^SCR("P1TOT","P",54,"MUMPS2")

^SCR("P1TOT","P",54,"OUTPUT")

^SCR("P1TOT","P",54,"TYP")
N
^SCR("P1TOT","P",55,"CRD")
6,28,N,8,2
^SCR("P1TOT","P",55,"HELP")

^SCR("P1TOT","P",55,"LMAX")
11
^SCR("P1TOT","P",55,"MUMPS1")

^SCR("P1TOT","P",55,"MUMPS2")

^SCR("P1TOT","P",55,"OUTPUT")

^SCR("P1TOT","P",55,"TYP")
N
^SCR("P1TOT","P",58,"CRD")
6,14,N,9,2
^SCR("P1TOT","P",58,"HELP")

^SCR("P1TOT","P",58,"LMAX")
9
^SCR("P1TOT","P",58,"MUMPS1")

^SCR("P1TOT","P",58,"MUMPS2")

^SCR("P1TOT","P",58,"OUTPUT")

^SCR("P1TOT","P",58,"TYP")
N
^SCR("P1TOT","P",60,"CRD")
7,28,N,8,2
^SCR("P1TOT","P",60,"HELP")

^SCR("P1TOT","P",60,"LMAX")
11
^SCR("P1TOT","P",60,"MUMPS1")

^SCR("P1TOT","P",60,"MUMPS2")

^SCR("P1TOT","P",60,"OUTPUT")

^SCR("P1TOT","P",60,"TYP")
N
^SCR("P1TOT","P",61,"CRD")
8,28,N,8,2
^SCR("P1TOT","P",61,"HELP")

^SCR("P1TOT","P",61,"LMAX")
11
^SCR("P1TOT","P",61,"MUMPS1")

^SCR("P1TOT","P",61,"MUMPS2")

^SCR("P1TOT","P",61,"OUTPUT")

^SCR("P1TOT","P",61,"TYP")
N
^SCR("P1TOT","P",65,"CRD")
7,14,N,9,2
^SCR("P1TOT","P",65,"HELP")

^SCR("P1TOT","P",65,"LMAX")
9
^SCR("P1TOT","P",65,"MUMPS1")

^SCR("P1TOT","P",65,"MUMPS2")

^SCR("P1TOT","P",65,"OUTPUT")

^SCR("P1TOT","P",65,"TYP")
N
^SCR("P1TOT","P",67,"CRD")
8,14,N,9,2
^SCR("P1TOT","P",67,"HELP")

^SCR("P1TOT","P",67,"LMAX")
9
^SCR("P1TOT","P",67,"MUMPS1")

^SCR("P1TOT","P",67,"MUMPS2")

^SCR("P1TOT","P",67,"TYP")
N
^SCR("P1TOT","P",70,"CRD")
9,28,N,8,2
^SCR("P1TOT","P",70,"HELP")

^SCR("P1TOT","P",70,"LMAX")
11
^SCR("P1TOT","P",70,"MUMPS1")

^SCR("P1TOT","P",70,"MUMPS2")

^SCR("P1TOT","P",70,"OUTPUT")

^SCR("P1TOT","P",70,"TYP")
N
^SCR("P1TOT","P",72,"CRD")
9,14,N,9,2
^SCR("P1TOT","P",72,"HELP")

^SCR("P1TOT","P",72,"LMAX")
9
^SCR("P1TOT","P",72,"MUMPS1")

^SCR("P1TOT","P",72,"MUMPS2")

^SCR("P1TOT","P",72,"OUTPUT")

^SCR("P1TOT","P",72,"TYP")
N
^SCR("P1TOT","P",73,"CRD")
18,28,N,8,2
^SCR("P1TOT","P",73,"HELP")

^SCR("P1TOT","P",73,"LMAX")
11
^SCR("P1TOT","P",73,"MUMPS1")

^SCR("P1TOT","P",73,"MUMPS2")

^SCR("P1TOT","P",73,"OUTPUT")

^SCR("P1TOT","P",73,"TYP")
N
^SCR("P1TOT","P",74,"CRD")
18,14,N,9,2
^SCR("P1TOT","P",74,"HELP")

^SCR("P1TOT","P",74,"LMAX")
9
^SCR("P1TOT","P",74,"MUMPS1")

^SCR("P1TOT","P",74,"MUMPS2")

^SCR("P1TOT","P",74,"OUTPUT")

^SCR("P1TOT","P",74,"TYP")
N
^SCR("P1TOT","P",75,"CRD")
10,28,N,8,2
^SCR("P1TOT","P",75,"HELP")

^SCR("P1TOT","P",75,"LMAX")
11
^SCR("P1TOT","P",75,"MUMPS1")

^SCR("P1TOT","P",75,"MUMPS2")

^SCR("P1TOT","P",75,"OUTPUT")

^SCR("P1TOT","P",75,"TYP")
N
^SCR("P1TOT","P",78,"CRD")
10,14,N,9,2
^SCR("P1TOT","P",78,"HELP")

^SCR("P1TOT","P",78,"LMAX")
9
^SCR("P1TOT","P",78,"MUMPS1")

^SCR("P1TOT","P",78,"MUMPS2")

^SCR("P1TOT","P",78,"OUTPUT")

^SCR("P1TOT","P",78,"TYP")
N
^SCR("P1TOT","P",80,"CRD")
11,28,N,8,2
^SCR("P1TOT","P",80,"HELP")

^SCR("P1TOT","P",80,"LMAX")
11
^SCR("P1TOT","P",80,"MUMPS1")

^SCR("P1TOT","P",80,"MUMPS2")

^SCR("P1TOT","P",80,"OUTPUT")

^SCR("P1TOT","P",80,"TYP")
N
^SCR("P1TOT","P",82,"CRD")
11,14,N,9,2
^SCR("P1TOT","P",82,"HELP")

^SCR("P1TOT","P",82,"LMAX")
9
^SCR("P1TOT","P",82,"MUMPS1")

^SCR("P1TOT","P",82,"MUMPS2")

^SCR("P1TOT","P",82,"OUTPUT")

^SCR("P1TOT","P",82,"TYP")
N
^SCR("P1TOT","P",83,"CRD")
12,28,N,8,2
^SCR("P1TOT","P",83,"HELP")

^SCR("P1TOT","P",83,"LMAX")
11
^SCR("P1TOT","P",83,"MUMPS1")

^SCR("P1TOT","P",83,"MUMPS2")

^SCR("P1TOT","P",83,"OUTPUT")

^SCR("P1TOT","P",83,"TYP")
N
^SCR("P1TOT","P",84,"CRD")
12,14,N,9,2
^SCR("P1TOT","P",84,"HELP")

^SCR("P1TOT","P",84,"LMAX")
9
^SCR("P1TOT","P",84,"MUMPS1")

^SCR("P1TOT","P",84,"MUMPS2")

^SCR("P1TOT","P",84,"OUTPUT")

^SCR("P1TOT","P",84,"TYP")
N
^SCR("P1TOT","P",85,"CRD")
13,14,N,9,2
^SCR("P1TOT","P",85,"HELP")

^SCR("P1TOT","P",85,"LMAX")
9
^SCR("P1TOT","P",85,"MUMPS1")

^SCR("P1TOT","P",85,"MUMPS2")

^SCR("P1TOT","P",85,"OUTPUT")

^SCR("P1TOT","P",85,"TYP")
N
^SCR("P1TOT","P",90,"CRD")
16,28,N,8,2
^SCR("P1TOT","P",90,"HELP")

^SCR("P1TOT","P",90,"LMAX")
11
^SCR("P1TOT","P",90,"MUMPS1")

^SCR("P1TOT","P",90,"MUMPS2")

^SCR("P1TOT","P",90,"OUTPUT")

^SCR("P1TOT","P",90,"TYP")
N
^SCR("P1TOT","P",91,"CRD")
20,44,N,9,2
^SCR("P1TOT","P",91,"HELP")

^SCR("P1TOT","P",91,"LMAX")
9
^SCR("P1TOT","P",91,"MUMPS1")

^SCR("P1TOT","P",91,"MUMPS2")

^SCR("P1TOT","P",91,"OUTPUT")

^SCR("P1TOT","P",91,"TYP")
N
^SCR("P1TOT","P",92,"CRD")
20,13,N,9,2
^SCR("P1TOT","P",92,"HELP")

^SCR("P1TOT","P",92,"LMAX")
9
^SCR("P1TOT","P",92,"MUMPS1")

^SCR("P1TOT","P",92,"MUMPS2")

^SCR("P1TOT","P",92,"OUTPUT")

^SCR("P1TOT","P",92,"TYP")
N
^SCR("P1TOT","P",95,"CRD")
17,13,N,10,2
^SCR("P1TOT","P",95,"HELP")

^SCR("P1TOT","P",95,"LMAX")
10
^SCR("P1TOT","P",95,"MUMPS1")

^SCR("P1TOT","P",95,"MUMPS2")

^SCR("P1TOT","P",95,"OUTPUT")

^SCR("P1TOT","P",95,"TYP")
N
^SCR("P1TOT","P",97,"CRD")
16,14,N,9,2
^SCR("P1TOT","P",97,"HELP")

^SCR("P1TOT","P",97,"LMAX")
9
^SCR("P1TOT","P",97,"MUMPS1")

^SCR("P1TOT","P",97,"MUMPS2")

^SCR("P1TOT","P",97,"OUTPUT")

^SCR("P1TOT","P",97,"TYP")
N
^SCR("P1TOT","P","NAME","AEX")
26
^SCR("P1TOT","P","NAME","AEXS")
84
^SCR("P1TOT","P","NAME","ASR")
12
^SCR("P1TOT","P","NAME","BIT")
50
^SCR("P1TOT","P","NAME","CAS")
95
^SCR("P1TOT","P","NAME","CHKM")
11
^SCR("P1TOT","P","NAME","CHKMS")
67
^SCR("P1TOT","P","NAME","CHKO")
10
^SCR("P1TOT","P","NAME","CHKS")
65
^SCR("P1TOT","P","NAME","DAT1")
1
^SCR("P1TOT","P","NAME","DAT2")
2
^SCR("P1TOT","P","NAME","DMSHS")
47
^SCR("P1TOT","P","NAME","DNR")
25
^SCR("P1TOT","P","NAME","DNRS")
82
^SCR("P1TOT","P","NAME","HAEX")
83
^SCR("P1TOT","P","NAME","HCHKM")
61
^SCR("P1TOT","P","NAME","HCHKO")
60
^SCR("P1TOT","P","NAME","HDNR")
80
^SCR("P1TOT","P","NAME","HISR")
70
^SCR("P1TOT","P","NAME","HMZM")
55
^SCR("P1TOT","P","NAME","HNHS")
40
^SCR("P1TOT","P","NAME","HSHUM")
90
^SCR("P1TOT","P","NAME","HTL")
73
^SCR("P1TOT","P","NAME","HVIZ")
75
^SCR("P1TOT","P","NAME","ISR")
15
^SCR("P1TOT","P","NAME","ISRS")
72
^SCR("P1TOT","P","NAME","MAMS")
49
^SCR("P1TOT","P","NAME","MIN3")
45
^SCR("P1TOT","P","NAME","MZM")
5
^SCR("P1TOT","P","NAME","MZMS")
58
^SCR("P1TOT","P","NAME","SHUM")
35
^SCR("P1TOT","P","NAME","SHUMS")
97
^SCR("P1TOT","P","NAME","SUMB")
52
^SCR("P1TOT","P","NAME","SUMMSD")
91
^SCR("P1TOT","P","NAME","SUMMSL")
92
^SCR("P1TOT","P","NAME","SUMP")
42
^SCR("P1TOT","P","NAME","TIP")
28
^SCR("P1TOT","P","NAME","TIP1")
54
^SCR("P1TOT","P","NAME","TIPPS")
30
^SCR("P1TOT","P","NAME","TIPPS1")
53
^SCR("P1TOT","P","NAME","TIPS")
85
^SCR("P1TOT","P","NAME","TL")
13
^SCR("P1TOT","P","NAME","TLS")
74
^SCR("P1TOT","P","NAME","VIZ")
20
^SCR("P1TOT","P","NAME","VIZS")
78
^SCR("P1TOT","P","NM",1)
DAT1
^SCR("P1TOT","P","NM",2)
DAT2
^SCR("P1TOT","P","NM",5)
MZM
^SCR("P1TOT","P","NM",10)
CHKO
^SCR("P1TOT","P","NM",11)
CHKM
^SCR("P1TOT","P","NM",12)
ASR
^SCR("P1TOT","P","NM",13)
TL
^SCR("P1TOT","P","NM",15)
ISR
^SCR("P1TOT","P","NM",20)
VIZ
^SCR("P1TOT","P","NM",25)
DNR
^SCR("P1TOT","P","NM",26)
AEX
^SCR("P1TOT","P","NM",28)
TIP
^SCR("P1TOT","P","NM",30)
TIPPS
^SCR("P1TOT","P","NM",35)
SHUM
^SCR("P1TOT","P","NM",40)
HNHS
^SCR("P1TOT","P","NM",42)
SUMP
^SCR("P1TOT","P","NM",45)
MIN3
^SCR("P1TOT","P","NM",47)
DMSHS
^SCR("P1TOT","P","NM",49)
MAMS
^SCR("P1TOT","P","NM",50)
BIT
^SCR("P1TOT","P","NM",52)
SUMB
^SCR("P1TOT","P","NM",53)
TIPPS1
^SCR("P1TOT","P","NM",54)
TIP1
^SCR("P1TOT","P","NM",55)
HMZM
^SCR("P1TOT","P","NM",58)
MZMS
^SCR("P1TOT","P","NM",60)
HCHKO
^SCR("P1TOT","P","NM",61)
HCHKM
^SCR("P1TOT","P","NM",65)
CHKS
^SCR("P1TOT","P","NM",67)
CHKMS
^SCR("P1TOT","P","NM",70)
HISR
^SCR("P1TOT","P","NM",72)
ISRS
^SCR("P1TOT","P","NM",73)
HTL
^SCR("P1TOT","P","NM",74)
TLS
^SCR("P1TOT","P","NM",75)
HVIZ
^SCR("P1TOT","P","NM",78)
VIZS
^SCR("P1TOT","P","NM",80)
HDNR
^SCR("P1TOT","P","NM",82)
DNRS
^SCR("P1TOT","P","NM",83)
HAEX
^SCR("P1TOT","P","NM",84)
AEXS
^SCR("P1TOT","P","NM",85)
TIPS
^SCR("P1TOT","P","NM",90)
HSHUM
^SCR("P1TOT","P","NM",91)
SUMMSD
^SCR("P1TOT","P","NM",92)
SUMMSL
^SCR("P1TOT","P","NM",95)
CAS
^SCR("P1TOT","P","NM",97)
SHUMS
^SCR("P1TOTMT")
H
^SCR("P1TOTMT",1)
       {02     }:jix`z cr  {01      }:jix`zn                                   
^SCR("P1TOTMT",2)
 ----------------------------------------------  ------------------------------
^SCR("P1TOTMT",3)
 |   k"dq  |  l a w z d |  x k n p  |    beq  |  |          zerahn itl onefn  |
^SCR("P1TOTMT",4)
 ----------------------------------------------  ------------------------------
^SCR("P1TOTMT",5)
 {58      }|{55        }|  {05     }|     onefn   {08                   } { 07}
^SCR("P1TOTMT",6)
 {65      }|{60        }|  {10     }| wiy d`gnd   {14                   } { 09}
^SCR("P1TOTMT",7)
 {72      }|{70        }|  {15     }|   hxk`xyi   {18                   } { 16}
^SCR("P1TOTMT",8)
 {78      }|{75        }|  {20     }|      dfie   {21                   } { 19}
^SCR("P1TOTMT",9)
 {82      }|{80        }|  {25     }|    qxpiic   -----------------------------
^SCR("P1TOTMT",10)
 {84      }|{83        }|  {26     }|       AEX   {23       }           k"dq   
^SCR("P1TOTMT",11)
 {33      }|{32        }|  {31     }|       JCB                                
^SCR("P1TOTMT",12)
 {37      }|{36        }|  {34     }|      `tl`                                
^SCR("P1TOTMT",13)
 {85      }|            |  {28     }|  {     30}                               
^SCR("P1TOTMT",14)
 ----------------------------------------------                                
^SCR("P1TOTMT",15)
 {97      }|{90        }| {35      }| ehp oeict                                
^SCR("P1TOTMT",16)
 {95      }| `"k k"dq      {49     }|      n"rn                                
^SCR("P1TOTMT",17)
 {44      }: zexikn k"dq  {12      }:dtwda zepnfd  {13     }: yelz             
^SCR("P1TOTMT",18)
 {                                                               91}           
^SCR("P1TOTMT",19)
     {45     } :   miekif  {43     }: 'qeaiq' zegpd   {40     }: zegpd         
^SCR("P1TOTMT",20)
    {47     } : zexy inc   {42     }: mihixt zexikn                            
^SCR("P1TOTMT",21)
    {54     } :{     53}   {50     }: milehia                                  
^SCR("P1TOTMT",22)
    {98     } : dgha`      {93     }: micreq 'qn                               
^SCR("P1TOTMT","A",1)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1TOTMT","A",2)
----------------------------------------------------------------------------
^SCR("P1TOTMT","A",3)
|‹"„‘|Œ�—š„|˜‹Ž�|‚…‘||š…’�ˆŽ‰”Œ�Ž…†Ž|
^SCR("P1TOTMT","A",4)
----------------------------------------------------------------------------
^SCR("P1TOTMT","A",5)
|||�Ž…†Ž
^SCR("P1TOTMT","A",6)
|||—‰™„€‡Ž„
^SCR("P1TOTMT","A",7)
|||ˆ˜‹€˜™‰
^SCR("P1TOTMT","A",8)
|||„†‰…
^SCR("P1TOTMT","A",9)
|||‘˜�‰‰ƒ-----------------------------
^SCR("P1TOTMT","A",10)
|||AEX‹"„‘
^SCR("P1TOTMT","A",11)
|||JCB
^SCR("P1TOTMT","A",12)
|||€”Œ€
^SCR("P1TOTMT","A",13)
|||
^SCR("P1TOTMT","A",14)
----------------------------------------------
^SCR("P1TOTMT","A",15)
|||…ˆ��…‰ƒ”
^SCR("P1TOTMT","A",16)
|€"‹‹"„‘|Ž"’Ž
^SCR("P1TOTMT","A",17)
:š…˜‰‹Ž‹"„‘:„”—„�š…�Ž†„:™…Œš
^SCR("P1TOTMT","A",18)

^SCR("P1TOTMT","A",19)
:�‰…‹‰†:'‘…�‰‘'š…‡�„:š…‡�„
^SCR("P1TOTMT","A",20)
:š…˜™‰Žƒ:�‰ˆ‰˜”š…˜‰‹Ž
^SCR("P1TOTMT","A",21)
::�‰Œ…ˆ‰�
^SCR("P1TOTMT","A",22)
:„‡ˆ�€:�‰ƒ’…‘'‘Ž
^SCR("P1TOTMT","AV",1)
:lhrt,sg:lhrt,n
^SCR("P1TOTMT","AV",2)
----------------------------------------------------------------------------
^SCR("P1TOTMT","AV",3)
|f"vx|kce,v|rfnb|dux||,ugcynhpkinuzn|
^SCR("P1TOTMT","AV",4)
----------------------------------------------------------------------------
^SCR("P1TOTMT","AV",5)
|||inuzn
^SCR("P1TOTMT","AV",6)
|||ehavtjnv
^SCR("P1TOTMT","AV",7)
|||yrftrah
^SCR("P1TOTMT","AV",8)
|||vzhu
^SCR("P1TOTMT","AV",9)
|||xrbhhs-----------------------------
^SCR("P1TOTMT","AV",10)
|||AEXf"vx
^SCR("P1TOTMT","AV",11)
|||JCB
^SCR("P1TOTMT","AV",12)
|||tpkt
^SCR("P1TOTMT","AV",13)
|||
^SCR("P1TOTMT","AV",14)
----------------------------------------------
^SCR("P1TOTMT","AV",15)
|||uybiuhsp
^SCR("P1TOTMT","AV",16)
|t"ff"vx|n"gn
^SCR("P1TOTMT","AV",17)
:,urhfnf"vx:vpevc,ubnzv:auk,
^SCR("P1TOTMT","AV",18)

^SCR("P1TOTMT","AV",19)
:ohufhz:wxuchxw,ujbv:,ujbv
^SCR("P1TOTMT","AV",20)
:,urahns:ohyhrp,urhfn
^SCR("P1TOTMT","AV",21)
::ohkuyhc
^SCR("P1TOTMT","AV",22)
:vjyct:ohsguxwxn
^SCR("P1TOTMT","NAME")
zerahn itl itqk g"ec
^SCR("P1TOTMT","P",1,"CRD")
1,27,D,8,0
^SCR("P1TOTMT","P",1,"HELP")

^SCR("P1TOTMT","P",1,"LMAX")
9
^SCR("P1TOTMT","P",1,"MUMPS1")

^SCR("P1TOTMT","P",1,"MUMPS2")

^SCR("P1TOTMT","P",1,"MUST")

^SCR("P1TOTMT","P",1,"TYP")
D
^SCR("P1TOTMT","P",2,"CRD")
1,7,D,8,0
^SCR("P1TOTMT","P",2,"HELP")

^SCR("P1TOTMT","P",2,"LMAX")
8
^SCR("P1TOTMT","P",2,"MUMPS1")
I $G(DAT2)?.P S DAT2=DAT1
^SCR("P1TOTMT","P",2,"MUMPS2")

^SCR("P1TOTMT","P",2,"MUST")

^SCR("P1TOTMT","P",2,"TYP")
D
^SCR("P1TOTMT","P",5,"CRD")
5,27,N,8,2
^SCR("P1TOTMT","P",5,"HELP")

^SCR("P1TOTMT","P",5,"LMAX")
8
^SCR("P1TOTMT","P",5,"MUMPS1")

^SCR("P1TOTMT","P",5,"MUMPS2")

^SCR("P1TOTMT","P",5,"OUTPUT")

^SCR("P1TOTMT","P",5,"TYP")
N
^SCR("P1TOTMT","P",7,"CRD")
5,79,H,4
^SCR("P1TOTMT","P",7,"HELP")

^SCR("P1TOTMT","P",7,"LMAX")
4
^SCR("P1TOTMT","P",7,"MUMPS1")

^SCR("P1TOTMT","P",7,"MUMPS2")

^SCR("P1TOTMT","P",7,"OUTPUT")

^SCR("P1TOTMT","P",7,"TYP")
H
^SCR("P1TOTMT","P",8,"CRD")
5,50,E,22,0
^SCR("P1TOTMT","P",8,"HELP")

^SCR("P1TOTMT","P",8,"LMAX")
22
^SCR("P1TOTMT","P",8,"MUMPS1")

^SCR("P1TOTMT","P",8,"MUMPS2")

^SCR("P1TOTMT","P",8,"OUTPUT")

^SCR("P1TOTMT","P",8,"TYP")
E
^SCR("P1TOTMT","P",9,"CRD")
6,79,H,4
^SCR("P1TOTMT","P",9,"HELP")

^SCR("P1TOTMT","P",9,"LMAX")
4
^SCR("P1TOTMT","P",9,"MUMPS1")

^SCR("P1TOTMT","P",9,"MUMPS2")

^SCR("P1TOTMT","P",9,"OUTPUT")

^SCR("P1TOTMT","P",9,"TYP")
H
^SCR("P1TOTMT","P",10,"CRD")
6,27,N,8,2
^SCR("P1TOTMT","P",10,"HELP")

^SCR("P1TOTMT","P",10,"LMAX")
8
^SCR("P1TOTMT","P",10,"MUMPS1")

^SCR("P1TOTMT","P",10,"MUMPS2")

^SCR("P1TOTMT","P",10,"OUTPUT")

^SCR("P1TOTMT","P",10,"TYP")
N
^SCR("P1TOTMT","P",12,"CRD")
17,26,N,9,2
^SCR("P1TOTMT","P",12,"HELP")

^SCR("P1TOTMT","P",12,"LMAX")
9
^SCR("P1TOTMT","P",12,"MUMPS1")

^SCR("P1TOTMT","P",12,"MUMPS2")

^SCR("P1TOTMT","P",12,"OUTPUT")

^SCR("P1TOTMT","P",12,"TYP")
N
^SCR("P1TOTMT","P",13,"CRD")
17,51,N,8,2
^SCR("P1TOTMT","P",13,"HELP")

^SCR("P1TOTMT","P",13,"LMAX")
8
^SCR("P1TOTMT","P",13,"MUMPS1")

^SCR("P1TOTMT","P",13,"MUMPS2")

^SCR("P1TOTMT","P",13,"OUTPUT")

^SCR("P1TOTMT","P",13,"TYP")
N
^SCR("P1TOTMT","P",14,"CRD")
6,50,E,10,0
^SCR("P1TOTMT","P",14,"HELP")

^SCR("P1TOTMT","P",14,"LMAX")
22
^SCR("P1TOTMT","P",14,"MUMPS1")

^SCR("P1TOTMT","P",14,"MUMPS2")

^SCR("P1TOTMT","P",14,"OUTPUT")

^SCR("P1TOTMT","P",14,"TYP")
E
^SCR("P1TOTMT","P",15,"CRD")
7,27,N,8,2
^SCR("P1TOTMT","P",15,"HELP")

^SCR("P1TOTMT","P",15,"LMAX")
8
^SCR("P1TOTMT","P",15,"MUMPS1")

^SCR("P1TOTMT","P",15,"MUMPS2")

^SCR("P1TOTMT","P",15,"OUTPUT")

^SCR("P1TOTMT","P",15,"TYP")
N
^SCR("P1TOTMT","P",16,"CRD")
7,79,H,4
^SCR("P1TOTMT","P",16,"HELP")

^SCR("P1TOTMT","P",16,"LMAX")
4
^SCR("P1TOTMT","P",16,"MUMPS1")

^SCR("P1TOTMT","P",16,"MUMPS2")

^SCR("P1TOTMT","P",16,"OUTPUT")

^SCR("P1TOTMT","P",16,"TYP")
H
^SCR("P1TOTMT","P",18,"CRD")
7,50,E,22,0
^SCR("P1TOTMT","P",18,"HELP")

^SCR("P1TOTMT","P",18,"LMAX")
22
^SCR("P1TOTMT","P",18,"MUMPS1")

^SCR("P1TOTMT","P",18,"MUMPS2")

^SCR("P1TOTMT","P",18,"OUTPUT")

^SCR("P1TOTMT","P",18,"TYP")
E
^SCR("P1TOTMT","P",19,"CRD")
8,79,H,4
^SCR("P1TOTMT","P",19,"HELP")

^SCR("P1TOTMT","P",19,"LMAX")
4
^SCR("P1TOTMT","P",19,"MUMPS1")

^SCR("P1TOTMT","P",19,"MUMPS2")

^SCR("P1TOTMT","P",19,"OUTPUT")

^SCR("P1TOTMT","P",19,"TYP")
H
^SCR("P1TOTMT","P",20,"CRD")
8,27,N,8,2
^SCR("P1TOTMT","P",20,"HELP")

^SCR("P1TOTMT","P",20,"LMAX")
8
^SCR("P1TOTMT","P",20,"MUMPS1")

^SCR("P1TOTMT","P",20,"MUMPS2")

^SCR("P1TOTMT","P",20,"OUTPUT")

^SCR("P1TOTMT","P",20,"TYP")
N
^SCR("P1TOTMT","P",21,"CRD")
8,50,E,22,0
^SCR("P1TOTMT","P",21,"HELP")

^SCR("P1TOTMT","P",21,"LMAX")
22
^SCR("P1TOTMT","P",21,"MUMPS1")

^SCR("P1TOTMT","P",21,"MUMPS2")

^SCR("P1TOTMT","P",21,"OUTPUT")

^SCR("P1TOTMT","P",21,"TYP")
E
^SCR("P1TOTMT","P",23,"CRD")
10,50,N,9,2
^SCR("P1TOTMT","P",23,"HELP")

^SCR("P1TOTMT","P",23,"LMAX")
10
^SCR("P1TOTMT","P",23,"MUMPS1")

^SCR("P1TOTMT","P",23,"MUMPS2")

^SCR("P1TOTMT","P",23,"OUTPUT")

^SCR("P1TOTMT","P",23,"TYP")
N
^SCR("P1TOTMT","P",25,"CRD")
9,27,N,8,2
^SCR("P1TOTMT","P",25,"HELP")

^SCR("P1TOTMT","P",25,"LMAX")
8
^SCR("P1TOTMT","P",25,"MUMPS1")

^SCR("P1TOTMT","P",25,"MUMPS2")

^SCR("P1TOTMT","P",25,"OUTPUT")

^SCR("P1TOTMT","P",25,"TYP")
N
^SCR("P1TOTMT","P",26,"CRD")
10,27,N,8,2
^SCR("P1TOTMT","P",26,"HELP")

^SCR("P1TOTMT","P",26,"LMAX")
8
^SCR("P1TOTMT","P",26,"MUMPS1")

^SCR("P1TOTMT","P",26,"MUMPS2")

^SCR("P1TOTMT","P",26,"OUTPUT")

^SCR("P1TOTMT","P",26,"TYP")
N
^SCR("P1TOTMT","P",28,"CRD")
13,27,N,8,2
^SCR("P1TOTMT","P",28,"HELP")

^SCR("P1TOTMT","P",28,"LMAX")
8
^SCR("P1TOTMT","P",28,"MUMPS1")

^SCR("P1TOTMT","P",28,"MUMPS2")

^SCR("P1TOTMT","P",28,"TYP")
N
^SCR("P1TOTMT","P",30,"CRD")
13,48,H,4
^SCR("P1TOTMT","P",30,"HELP")

^SCR("P1TOTMT","P",30,"LMAX")
8
^SCR("P1TOTMT","P",30,"MUMPS1")

^SCR("P1TOTMT","P",30,"MUMPS2")

^SCR("P1TOTMT","P",30,"OUTPUT")

^SCR("P1TOTMT","P",30,"TYP")
H
^SCR("P1TOTMT","P",31,"CRD")
11,27,N,8,2
^SCR("P1TOTMT","P",31,"HELP")

^SCR("P1TOTMT","P",31,"LMAX")
8
^SCR("P1TOTMT","P",31,"MUMPS1")

^SCR("P1TOTMT","P",31,"MUMPS2")

^SCR("P1TOTMT","P",31,"OUTPUT")

^SCR("P1TOTMT","P",31,"TYP")
N
^SCR("P1TOTMT","P",32,"CRD")
11,12,N,9,2
^SCR("P1TOTMT","P",32,"HELP")

^SCR("P1TOTMT","P",32,"LMAX")
11
^SCR("P1TOTMT","P",32,"MUMPS1")

^SCR("P1TOTMT","P",32,"MUMPS2")

^SCR("P1TOTMT","P",32,"OUTPUT")

^SCR("P1TOTMT","P",32,"TYP")
N
^SCR("P1TOTMT","P",33,"CRD")
11,1,N,9,2
^SCR("P1TOTMT","P",33,"HELP")

^SCR("P1TOTMT","P",33,"LMAX")
9
^SCR("P1TOTMT","P",33,"MUMPS1")

^SCR("P1TOTMT","P",33,"MUMPS2")

^SCR("P1TOTMT","P",33,"OUTPUT")

^SCR("P1TOTMT","P",33,"TYP")
N
^SCR("P1TOTMT","P",34,"CRD")
12,27,N,8,2
^SCR("P1TOTMT","P",34,"HELP")

^SCR("P1TOTMT","P",34,"LMAX")
8
^SCR("P1TOTMT","P",34,"MUMPS1")

^SCR("P1TOTMT","P",34,"MUMPS2")

^SCR("P1TOTMT","P",34,"OUTPUT")

^SCR("P1TOTMT","P",34,"TYP")
N
^SCR("P1TOTMT","P",35,"CRD")
15,26,N,9,2
^SCR("P1TOTMT","P",35,"HELP")

^SCR("P1TOTMT","P",35,"LMAX")
9
^SCR("P1TOTMT","P",35,"MUMPS1")

^SCR("P1TOTMT","P",35,"MUMPS2")

^SCR("P1TOTMT","P",35,"OUTPUT")

^SCR("P1TOTMT","P",35,"TYP")
N
^SCR("P1TOTMT","P",36,"CRD")
12,12,N,9,2
^SCR("P1TOTMT","P",36,"HELP")

^SCR("P1TOTMT","P",36,"LMAX")
11
^SCR("P1TOTMT","P",36,"MUMPS1")

^SCR("P1TOTMT","P",36,"MUMPS2")

^SCR("P1TOTMT","P",36,"OUTPUT")

^SCR("P1TOTMT","P",36,"TYP")
N
^SCR("P1TOTMT","P",37,"CRD")
12,1,N,9,2
^SCR("P1TOTMT","P",37,"HELP")

^SCR("P1TOTMT","P",37,"LMAX")
9
^SCR("P1TOTMT","P",37,"MUMPS1")

^SCR("P1TOTMT","P",37,"MUMPS2")

^SCR("P1TOTMT","P",37,"OUTPUT")

^SCR("P1TOTMT","P",37,"TYP")
N
^SCR("P1TOTMT","P",40,"CRD")
19,54,N,8,2
^SCR("P1TOTMT","P",40,"HELP")

^SCR("P1TOTMT","P",40,"LMAX")
8
^SCR("P1TOTMT","P",40,"MUMPS1")

^SCR("P1TOTMT","P",40,"MUMPS2")

^SCR("P1TOTMT","P",40,"OUTPUT")

^SCR("P1TOTMT","P",40,"TYP")
N
^SCR("P1TOTMT","P",42,"CRD")
20,27,N,8,2
^SCR("P1TOTMT","P",42,"HELP")

^SCR("P1TOTMT","P",42,"LMAX")
8
^SCR("P1TOTMT","P",42,"MUMPS1")

^SCR("P1TOTMT","P",42,"MUMPS2")

^SCR("P1TOTMT","P",42,"OUTPUT")

^SCR("P1TOTMT","P",42,"TYP")
N
^SCR("P1TOTMT","P",43,"CRD")
19,27,N,8,2
^SCR("P1TOTMT","P",43,"HELP")

^SCR("P1TOTMT","P",43,"LMAX")
8
^SCR("P1TOTMT","P",43,"MUMPS1")

^SCR("P1TOTMT","P",43,"MUMPS2")

^SCR("P1TOTMT","P",43,"OUTPUT")

^SCR("P1TOTMT","P",43,"TYP")
N
^SCR("P1TOTMT","P",44,"CRD")
17,1,N,9,2
^SCR("P1TOTMT","P",44,"HELP")

^SCR("P1TOTMT","P",44,"LMAX")
9
^SCR("P1TOTMT","P",44,"MUMPS1")

^SCR("P1TOTMT","P",44,"MUMPS2")

^SCR("P1TOTMT","P",44,"OUTPUT")

^SCR("P1TOTMT","P",44,"TYP")
N
^SCR("P1TOTMT","P",45,"CRD")
19,5,N,8,2
^SCR("P1TOTMT","P",45,"HELP")

^SCR("P1TOTMT","P",45,"LMAX")
8
^SCR("P1TOTMT","P",45,"MUMPS1")

^SCR("P1TOTMT","P",45,"MUMPS2")

^SCR("P1TOTMT","P",45,"OUTPUT")

^SCR("P1TOTMT","P",45,"TYP")
N
^SCR("P1TOTMT","P",47,"CRD")
20,4,N,8,2
^SCR("P1TOTMT","P",47,"HELP")

^SCR("P1TOTMT","P",47,"LMAX")
8
^SCR("P1TOTMT","P",47,"MUMPS1")

^SCR("P1TOTMT","P",47,"MUMPS2")

^SCR("P1TOTMT","P",47,"OUTPUT")

^SCR("P1TOTMT","P",47,"TYP")
N
^SCR("P1TOTMT","P",49,"CRD")
16,27,N,8,2
^SCR("P1TOTMT","P",49,"HELP")

^SCR("P1TOTMT","P",49,"LMAX")
8
^SCR("P1TOTMT","P",49,"MUMPS1")

^SCR("P1TOTMT","P",49,"MUMPS2")

^SCR("P1TOTMT","P",49,"OUTPUT")

^SCR("P1TOTMT","P",49,"TYP")
N
^SCR("P1TOTMT","P",50,"CRD")
21,27,N,8,2
^SCR("P1TOTMT","P",50,"HELP")

^SCR("P1TOTMT","P",50,"LMAX")
8
^SCR("P1TOTMT","P",50,"MUMPS1")

^SCR("P1TOTMT","P",50,"MUMPS2")

^SCR("P1TOTMT","P",50,"OUTPUT")

^SCR("P1TOTMT","P",50,"TYP")
N
^SCR("P1TOTMT","P",53,"CRD")
21,24,H,8
^SCR("P1TOTMT","P",53,"HELP")

^SCR("P1TOTMT","P",53,"LMAX")
8
^SCR("P1TOTMT","P",53,"MUMPS1")

^SCR("P1TOTMT","P",53,"MUMPS2")

^SCR("P1TOTMT","P",53,"OUTPUT")

^SCR("P1TOTMT","P",53,"TYP")
H
^SCR("P1TOTMT","P",54,"CRD")
21,4,N,8,2
^SCR("P1TOTMT","P",54,"HELP")

^SCR("P1TOTMT","P",54,"LMAX")
8
^SCR("P1TOTMT","P",54,"MUMPS1")

^SCR("P1TOTMT","P",54,"MUMPS2")

^SCR("P1TOTMT","P",54,"OUTPUT")

^SCR("P1TOTMT","P",54,"TYP")
N
^SCR("P1TOTMT","P",55,"CRD")
5,12,N,8,2
^SCR("P1TOTMT","P",55,"HELP")

^SCR("P1TOTMT","P",55,"LMAX")
11
^SCR("P1TOTMT","P",55,"MUMPS1")

^SCR("P1TOTMT","P",55,"MUMPS2")

^SCR("P1TOTMT","P",55,"OUTPUT")

^SCR("P1TOTMT","P",55,"TYP")
N
^SCR("P1TOTMT","P",58,"CRD")
5,1,N,9,2
^SCR("P1TOTMT","P",58,"HELP")

^SCR("P1TOTMT","P",58,"LMAX")
9
^SCR("P1TOTMT","P",58,"MUMPS1")

^SCR("P1TOTMT","P",58,"MUMPS2")

^SCR("P1TOTMT","P",58,"OUTPUT")

^SCR("P1TOTMT","P",58,"TYP")
N
^SCR("P1TOTMT","P",60,"CRD")
6,12,N,8,2
^SCR("P1TOTMT","P",60,"HELP")

^SCR("P1TOTMT","P",60,"LMAX")
11
^SCR("P1TOTMT","P",60,"MUMPS1")

^SCR("P1TOTMT","P",60,"MUMPS2")

^SCR("P1TOTMT","P",60,"OUTPUT")

^SCR("P1TOTMT","P",60,"TYP")
N
^SCR("P1TOTMT","P",65,"CRD")
6,1,N,9,2
^SCR("P1TOTMT","P",65,"HELP")

^SCR("P1TOTMT","P",65,"LMAX")
9
^SCR("P1TOTMT","P",65,"MUMPS1")

^SCR("P1TOTMT","P",65,"MUMPS2")

^SCR("P1TOTMT","P",65,"OUTPUT")

^SCR("P1TOTMT","P",65,"TYP")
N
^SCR("P1TOTMT","P",70,"CRD")
7,12,N,8,2
^SCR("P1TOTMT","P",70,"HELP")

^SCR("P1TOTMT","P",70,"LMAX")
11
^SCR("P1TOTMT","P",70,"MUMPS1")

^SCR("P1TOTMT","P",70,"MUMPS2")

^SCR("P1TOTMT","P",70,"OUTPUT")

^SCR("P1TOTMT","P",70,"TYP")
N
^SCR("P1TOTMT","P",72,"CRD")
7,1,N,9,2
^SCR("P1TOTMT","P",72,"HELP")

^SCR("P1TOTMT","P",72,"LMAX")
9
^SCR("P1TOTMT","P",72,"MUMPS1")

^SCR("P1TOTMT","P",72,"MUMPS2")

^SCR("P1TOTMT","P",72,"OUTPUT")

^SCR("P1TOTMT","P",72,"TYP")
N
^SCR("P1TOTMT","P",75,"CRD")
8,12,N,8,2
^SCR("P1TOTMT","P",75,"HELP")

^SCR("P1TOTMT","P",75,"LMAX")
11
^SCR("P1TOTMT","P",75,"MUMPS1")

^SCR("P1TOTMT","P",75,"MUMPS2")

^SCR("P1TOTMT","P",75,"OUTPUT")

^SCR("P1TOTMT","P",75,"TYP")
N
^SCR("P1TOTMT","P",78,"CRD")
8,1,N,9,2
^SCR("P1TOTMT","P",78,"HELP")

^SCR("P1TOTMT","P",78,"LMAX")
9
^SCR("P1TOTMT","P",78,"MUMPS1")

^SCR("P1TOTMT","P",78,"MUMPS2")

^SCR("P1TOTMT","P",78,"OUTPUT")

^SCR("P1TOTMT","P",78,"TYP")
N
^SCR("P1TOTMT","P",80,"CRD")
9,12,N,8,2
^SCR("P1TOTMT","P",80,"HELP")

^SCR("P1TOTMT","P",80,"LMAX")
11
^SCR("P1TOTMT","P",80,"MUMPS1")

^SCR("P1TOTMT","P",80,"MUMPS2")

^SCR("P1TOTMT","P",80,"OUTPUT")

^SCR("P1TOTMT","P",80,"TYP")
N
^SCR("P1TOTMT","P",82,"CRD")
9,1,N,9,2
^SCR("P1TOTMT","P",82,"HELP")

^SCR("P1TOTMT","P",82,"LMAX")
9
^SCR("P1TOTMT","P",82,"MUMPS1")

^SCR("P1TOTMT","P",82,"MUMPS2")

^SCR("P1TOTMT","P",82,"OUTPUT")

^SCR("P1TOTMT","P",82,"TYP")
N
^SCR("P1TOTMT","P",83,"CRD")
10,12,N,8,2
^SCR("P1TOTMT","P",83,"HELP")

^SCR("P1TOTMT","P",83,"LMAX")
11
^SCR("P1TOTMT","P",83,"MUMPS1")

^SCR("P1TOTMT","P",83,"MUMPS2")

^SCR("P1TOTMT","P",83,"OUTPUT")

^SCR("P1TOTMT","P",83,"TYP")
N
^SCR("P1TOTMT","P",84,"CRD")
10,1,N,9,2
^SCR("P1TOTMT","P",84,"HELP")

^SCR("P1TOTMT","P",84,"LMAX")
9
^SCR("P1TOTMT","P",84,"MUMPS1")

^SCR("P1TOTMT","P",84,"MUMPS2")

^SCR("P1TOTMT","P",84,"OUTPUT")

^SCR("P1TOTMT","P",84,"TYP")
N
^SCR("P1TOTMT","P",85,"CRD")
13,1,N,9,2
^SCR("P1TOTMT","P",85,"HELP")

^SCR("P1TOTMT","P",85,"LMAX")
9
^SCR("P1TOTMT","P",85,"MUMPS1")

^SCR("P1TOTMT","P",85,"MUMPS2")

^SCR("P1TOTMT","P",85,"OUTPUT")

^SCR("P1TOTMT","P",85,"TYP")
N
^SCR("P1TOTMT","P",90,"CRD")
15,12,N,8,2
^SCR("P1TOTMT","P",90,"HELP")

^SCR("P1TOTMT","P",90,"LMAX")
11
^SCR("P1TOTMT","P",90,"MUMPS1")

^SCR("P1TOTMT","P",90,"MUMPS2")

^SCR("P1TOTMT","P",90,"OUTPUT")

^SCR("P1TOTMT","P",90,"TYP")
N
^SCR("P1TOTMT","P",91,"CRD")
18,68,H,65
^SCR("P1TOTMT","P",91,"HELP")

^SCR("P1TOTMT","P",91,"LMAX")
66
^SCR("P1TOTMT","P",91,"MUMPS1")

^SCR("P1TOTMT","P",91,"MUMPS2")

^SCR("P1TOTMT","P",91,"OUTPUT")

^SCR("P1TOTMT","P",91,"TYP")
H
^SCR("P1TOTMT","P",93,"CRD")
22,27,N,8,0
^SCR("P1TOTMT","P",93,"HELP")

^SCR("P1TOTMT","P",93,"LMAX")
8
^SCR("P1TOTMT","P",93,"MUMPS1")

^SCR("P1TOTMT","P",93,"MUMPS2")

^SCR("P1TOTMT","P",93,"OUTPUT")

^SCR("P1TOTMT","P",93,"TYP")
N
^SCR("P1TOTMT","P",95,"CRD")
16,1,N,9,2
^SCR("P1TOTMT","P",95,"HELP")

^SCR("P1TOTMT","P",95,"LMAX")
9
^SCR("P1TOTMT","P",95,"MUMPS1")

^SCR("P1TOTMT","P",95,"MUMPS2")

^SCR("P1TOTMT","P",95,"OUTPUT")

^SCR("P1TOTMT","P",95,"TYP")
N
^SCR("P1TOTMT","P",97,"CRD")
15,1,N,9,2
^SCR("P1TOTMT","P",97,"HELP")

^SCR("P1TOTMT","P",97,"LMAX")
9
^SCR("P1TOTMT","P",97,"MUMPS1")

^SCR("P1TOTMT","P",97,"MUMPS2")

^SCR("P1TOTMT","P",97,"OUTPUT")

^SCR("P1TOTMT","P",97,"TYP")
N
^SCR("P1TOTMT","P",98,"CRD")
22,4,N,8,2
^SCR("P1TOTMT","P",98,"HELP")

^SCR("P1TOTMT","P",98,"LMAX")
8
^SCR("P1TOTMT","P",98,"MUMPS1")

^SCR("P1TOTMT","P",98,"MUMPS2")

^SCR("P1TOTMT","P",98,"OUTPUT")

^SCR("P1TOTMT","P",98,"TYP")
N
^SCR("P1TOTMT","P","NAME","AEX")
26
^SCR("P1TOTMT","P","NAME","AEXS")
84
^SCR("P1TOTMT","P","NAME","ALPHA")
34
^SCR("P1TOTMT","P","NAME","ASR")
12
^SCR("P1TOTMT","P","NAME","BIT")
50
^SCR("P1TOTMT","P","NAME","CAS")
95
^SCR("P1TOTMT","P","NAME","CHKO")
10
^SCR("P1TOTMT","P","NAME","CHKS")
65
^SCR("P1TOTMT","P","NAME","DAT1")
1
^SCR("P1TOTMT","P","NAME","DAT2")
2
^SCR("P1TOTMT","P","NAME","DMSHS")
47
^SCR("P1TOTMT","P","NAME","DNR")
25
^SCR("P1TOTMT","P","NAME","DNRS")
82
^SCR("P1TOTMT","P","NAME","HAEX")
83
^SCR("P1TOTMT","P","NAME","HALPHA")
36
^SCR("P1TOTMT","P","NAME","HAVT")
98
^SCR("P1TOTMT","P","NAME","HCHKO")
60
^SCR("P1TOTMT","P","NAME","HDNR")
80
^SCR("P1TOTMT","P","NAME","HISR")
70
^SCR("P1TOTMT","P","NAME","HJCB")
33
^SCR("P1TOTMT","P","NAME","HMZM")
55
^SCR("P1TOTMT","P","NAME","HNHCIB")
43
^SCR("P1TOTMT","P","NAME","HNHS")
40
^SCR("P1TOTMT","P","NAME","HSHUM")
90
^SCR("P1TOTMT","P","NAME","HVIZ")
75
^SCR("P1TOTMT","P","NAME","ISR")
15
^SCR("P1TOTMT","P","NAME","ISRS")
72
^SCR("P1TOTMT","P","NAME","JCB")
31
^SCR("P1TOTMT","P","NAME","JCBX")
32
^SCR("P1TOTMT","P","NAME","MAMS")
49
^SCR("P1TOTMT","P","NAME","MIN3")
45
^SCR("P1TOTMT","P","NAME","MSDMSL")
91
^SCR("P1TOTMT","P","NAME","MTB01")
7
^SCR("P1TOTMT","P","NAME","MTB02")
9
^SCR("P1TOTMT","P","NAME","MTB03")
16
^SCR("P1TOTMT","P","NAME","MTB04")
19
^SCR("P1TOTMT","P","NAME","MTB1")
8
^SCR("P1TOTMT","P","NAME","MTB2")
14
^SCR("P1TOTMT","P","NAME","MTB3")
18
^SCR("P1TOTMT","P","NAME","MTB4")
21
^SCR("P1TOTMT","P","NAME","MZM")
5
^SCR("P1TOTMT","P","NAME","MZMS")
58
^SCR("P1TOTMT","P","NAME","SALPHA")
37
^SCR("P1TOTMT","P","NAME","SHUM")
35
^SCR("P1TOTMT","P","NAME","SHUMS")
97
^SCR("P1TOTMT","P","NAME","SMHIRA")
44
^SCR("P1TOTMT","P","NAME","SMTB")
23
^SCR("P1TOTMT","P","NAME","SSOAD")
93
^SCR("P1TOTMT","P","NAME","SUMP")
42
^SCR("P1TOTMT","P","NAME","TIP")
28
^SCR("P1TOTMT","P","NAME","TIP1")
54
^SCR("P1TOTMT","P","NAME","TIPPS")
30
^SCR("P1TOTMT","P","NAME","TIPPS1")
53
^SCR("P1TOTMT","P","NAME","TIPS")
85
^SCR("P1TOTMT","P","NAME","TL")
13
^SCR("P1TOTMT","P","NAME","VIZ")
20
^SCR("P1TOTMT","P","NAME","VIZS")
78
^SCR("P1TOTMT","P","NM",1)
DAT1
^SCR("P1TOTMT","P","NM",2)
DAT2
^SCR("P1TOTMT","P","NM",5)
MZM
^SCR("P1TOTMT","P","NM",7)
MTB01
^SCR("P1TOTMT","P","NM",8)
MTB1
^SCR("P1TOTMT","P","NM",9)
MTB02
^SCR("P1TOTMT","P","NM",10)
CHKO
^SCR("P1TOTMT","P","NM",12)
ASR
^SCR("P1TOTMT","P","NM",13)
TL
^SCR("P1TOTMT","P","NM",14)
MTB2
^SCR("P1TOTMT","P","NM",15)
ISR
^SCR("P1TOTMT","P","NM",16)
MTB03
^SCR("P1TOTMT","P","NM",18)
MTB3
^SCR("P1TOTMT","P","NM",19)
MTB04
^SCR("P1TOTMT","P","NM",20)
VIZ
^SCR("P1TOTMT","P","NM",21)
MTB4
^SCR("P1TOTMT","P","NM",23)
SMTB
^SCR("P1TOTMT","P","NM",25)
DNR
^SCR("P1TOTMT","P","NM",26)
AEX
^SCR("P1TOTMT","P","NM",28)
TIP
^SCR("P1TOTMT","P","NM",30)
TIPPS
^SCR("P1TOTMT","P","NM",31)
JCB
^SCR("P1TOTMT","P","NM",32)
JCBX
^SCR("P1TOTMT","P","NM",33)
HJCB
^SCR("P1TOTMT","P","NM",34)
ALPHA
^SCR("P1TOTMT","P","NM",35)
SHUM
^SCR("P1TOTMT","P","NM",36)
HALPHA
^SCR("P1TOTMT","P","NM",37)
SALPHA
^SCR("P1TOTMT","P","NM",40)
HNHS
^SCR("P1TOTMT","P","NM",42)
SUMP
^SCR("P1TOTMT","P","NM",43)
HNHCIB
^SCR("P1TOTMT","P","NM",44)
SMHIRA
^SCR("P1TOTMT","P","NM",45)
MIN3
^SCR("P1TOTMT","P","NM",47)
DMSHS
^SCR("P1TOTMT","P","NM",49)
MAMS
^SCR("P1TOTMT","P","NM",50)
BIT
^SCR("P1TOTMT","P","NM",53)
TIPPS1
^SCR("P1TOTMT","P","NM",54)
TIP1
^SCR("P1TOTMT","P","NM",55)
HMZM
^SCR("P1TOTMT","P","NM",58)
MZMS
^SCR("P1TOTMT","P","NM",60)
HCHKO
^SCR("P1TOTMT","P","NM",65)
CHKS
^SCR("P1TOTMT","P","NM",70)
HISR
^SCR("P1TOTMT","P","NM",72)
ISRS
^SCR("P1TOTMT","P","NM",75)
HVIZ
^SCR("P1TOTMT","P","NM",78)
VIZS
^SCR("P1TOTMT","P","NM",80)
HDNR
^SCR("P1TOTMT","P","NM",82)
DNRS
^SCR("P1TOTMT","P","NM",83)
HAEX
^SCR("P1TOTMT","P","NM",84)
AEXS
^SCR("P1TOTMT","P","NM",85)
TIPS
^SCR("P1TOTMT","P","NM",90)
HSHUM
^SCR("P1TOTMT","P","NM",91)
MSDMSL
^SCR("P1TOTMT","P","NM",93)
SSOAD
^SCR("P1TOTMT","P","NM",95)
CAS
^SCR("P1TOTMT","P","NM",97)
SHUMS
^SCR("P1TOTMT","P","NM",98)
HAVT
^SCR("P1TOTNA")
H
^SCR("P1TOTNA",1)
                       {02     }:jix`z cr  {01      }:jix`zn                   
^SCR("P1TOTNA",2)
              ---------------------------------------------------              
^SCR("P1TOTNA",3)
              |   k"dq  |      l a w z d  |  x k n p  |    beq  |              
^SCR("P1TOTNA",4)
              ---------------------------------------------------              
^SCR("P1TOTNA",5)
              {58      }|   {55        }  |  {05     }|     onefn              
^SCR("P1TOTNA",6)
              {65      }|   {60        }  |  {10     }| wiy d`gnd              
^SCR("P1TOTNA",7)
              {67      }|   {61        }  |  {11     }| 'fn d`gnd              
^SCR("P1TOTNA",8)
              {72      }|   {70        }  |  {15     }|   hxk`xyi              
^SCR("P1TOTNA",9)
              {78      }|   {75        }  |  {20     }|      dfie              
^SCR("P1TOTNA",10)
              {82      }|   {80        }  |  {25     }|    qxpiic              
^SCR("P1TOTNA",11)
              {84      }|   {83        }  |  {26     }|       AEX              
^SCR("P1TOTNA",12)
              {33      }|   {32        }  |  {31     }|       JCB              
^SCR("P1TOTNA",13)
              {37      }|   {36        }  |  {34     }|cx`w ine`l              
^SCR("P1TOTNA",14)
              {85      }|                 |  {28     }| {     30}              
^SCR("P1TOTNA",15)
              ----------------------------------------------------             
^SCR("P1TOTNA",16)
  : `"k xcey  {97      }|   {90        }  | {35      }| ehp oeict              
^SCR("P1TOTNA",17)
 {87       } {95       }| `"k k"dq           {49     }|      n"rn              
^SCR("P1TOTNA",18)
 {14        : zexiknd k"dq  {13      } :yelz {12     }: dtwda zepnfd           
^SCR("P1TOTNA",19)
 {                                                               91}           
^SCR("P1TOTNA",20)
 {                                                               92}           
^SCR("P1TOTNA",21)
  {93  } micreq 'qn  {45     } :miekif {43     }: qeaiq zegpd  {40     }: zegpd
^SCR("P1TOTNA",22)
  {              96}  {47     } : zexy inc   {42     }: mihixt zexikn          
^SCR("P1TOTNA",23)
       {98       } : dgha`  {54     } :{     53}   {50     }: milehia          
^SCR("P1TOTNA","A",1)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1TOTNA","A",2)
---------------------------------------------------
^SCR("P1TOTNA","A",3)
|‹"„‘|Œ�—š„|˜‹Ž�|‚…‘|
^SCR("P1TOTNA","A",4)
---------------------------------------------------
^SCR("P1TOTNA","A",5)
|||�Ž…†Ž
^SCR("P1TOTNA","A",6)
|||—‰™„€‡Ž„
^SCR("P1TOTNA","A",7)
|||'†Ž„€‡Ž„
^SCR("P1TOTNA","A",8)
|||ˆ˜‹€˜™‰
^SCR("P1TOTNA","A",9)
|||„†‰…
^SCR("P1TOTNA","A",10)
|||‘˜�‰‰ƒ
^SCR("P1TOTNA","A",11)
|||AEX
^SCR("P1TOTNA","A",12)
|||JCB
^SCR("P1TOTNA","A",13)
|||ƒ˜€—‰Ž…€Œ
^SCR("P1TOTNA","A",14)
|||
^SCR("P1TOTNA","A",15)
----------------------------------------------------
^SCR("P1TOTNA","A",16)
:€"‹˜ƒ…™|||…ˆ��…‰ƒ”
^SCR("P1TOTNA","A",17)
|€"‹‹"„‘|Ž"’Ž
^SCR("P1TOTNA","A",18)
:š…˜‰‹Ž„‹"„‘:™…Œš:„”—„�š…�Ž†„
^SCR("P1TOTNA","A",19)

^SCR("P1TOTNA","A",20)

^SCR("P1TOTNA","A",21)
�‰ƒ’…‘'‘Ž:�‰…‹‰†:‘…�‰‘š…‡�„:š…‡�„
^SCR("P1TOTNA","A",22)
:š…˜™‰Žƒ:�‰ˆ‰˜”š…˜‰‹Ž
^SCR("P1TOTNA","A",23)
:„‡ˆ�€::�‰Œ…ˆ‰�
^SCR("P1TOTNA","AV",1)
:lhrt,sg:lhrt,n
^SCR("P1TOTNA","AV",2)
---------------------------------------------------
^SCR("P1TOTNA","AV",3)
|f"vx|kce,v|rfnb|dux|
^SCR("P1TOTNA","AV",4)
---------------------------------------------------
^SCR("P1TOTNA","AV",5)
|||inuzn
^SCR("P1TOTNA","AV",6)
|||ehavtjnv
^SCR("P1TOTNA","AV",7)
|||wznvtjnv
^SCR("P1TOTNA","AV",8)
|||yrftrah
^SCR("P1TOTNA","AV",9)
|||vzhu
^SCR("P1TOTNA","AV",10)
|||xrbhhs
^SCR("P1TOTNA","AV",11)
|||AEX
^SCR("P1TOTNA","AV",12)
|||JCB
^SCR("P1TOTNA","AV",13)
|||srtehnutk
^SCR("P1TOTNA","AV",14)
|||
^SCR("P1TOTNA","AV",15)
----------------------------------------------------
^SCR("P1TOTNA","AV",16)
:t"frsua|||uybiuhsp
^SCR("P1TOTNA","AV",17)
|t"ff"vx|n"gn
^SCR("P1TOTNA","AV",18)
:,urhfnvf"vx:auk,:vpevc,ubnzv
^SCR("P1TOTNA","AV",19)

^SCR("P1TOTNA","AV",20)

^SCR("P1TOTNA","AV",21)
ohsguxwxn:ohufhz:xuchx,ujbv:,ujbv
^SCR("P1TOTNA","AV",22)
:,urahns:ohyhrp,urhfn
^SCR("P1TOTNA","AV",23)
:vjyct::ohkuyhc
^SCR("P1TOTNA","NAME")
itqk g"ec
^SCR("P1TOTNA","P",1,"CRD")
1,43,D,8,0
^SCR("P1TOTNA","P",1,"HELP")

^SCR("P1TOTNA","P",1,"LMAX")
9
^SCR("P1TOTNA","P",1,"MUMPS1")

^SCR("P1TOTNA","P",1,"MUMPS2")

^SCR("P1TOTNA","P",1,"MUST")

^SCR("P1TOTNA","P",1,"TYP")
D
^SCR("P1TOTNA","P",2,"CRD")
1,23,D,8,0
^SCR("P1TOTNA","P",2,"HELP")

^SCR("P1TOTNA","P",2,"LMAX")
8
^SCR("P1TOTNA","P",2,"MUMPS1")
I $G(DAT2)?.P S DAT2=DAT1
^SCR("P1TOTNA","P",2,"MUMPS2")
I $$^%L1DC(DAT2,3)<$$^%L1DC(DAT1,3) S %SC("ER")=1
^SCR("P1TOTNA","P",2,"MUST")

^SCR("P1TOTNA","P",2,"TYP")
D
^SCR("P1TOTNA","P",5,"CRD")
5,45,N,8,2
^SCR("P1TOTNA","P",5,"HELP")

^SCR("P1TOTNA","P",5,"LMAX")
8
^SCR("P1TOTNA","P",5,"MUMPS1")

^SCR("P1TOTNA","P",5,"MUMPS2")

^SCR("P1TOTNA","P",5,"OUTPUT")

^SCR("P1TOTNA","P",5,"TYP")
N
^SCR("P1TOTNA","P",10,"CRD")
6,45,N,8,2
^SCR("P1TOTNA","P",10,"HELP")

^SCR("P1TOTNA","P",10,"LMAX")
8
^SCR("P1TOTNA","P",10,"MUMPS1")

^SCR("P1TOTNA","P",10,"MUMPS2")

^SCR("P1TOTNA","P",10,"OUTPUT")

^SCR("P1TOTNA","P",10,"TYP")
N
^SCR("P1TOTNA","P",11,"CRD")
7,45,N,8,2
^SCR("P1TOTNA","P",11,"HELP")

^SCR("P1TOTNA","P",11,"LMAX")
8
^SCR("P1TOTNA","P",11,"MUMPS1")

^SCR("P1TOTNA","P",11,"MUMPS2")

^SCR("P1TOTNA","P",11,"OUTPUT")

^SCR("P1TOTNA","P",11,"TYP")
N
^SCR("P1TOTNA","P",12,"CRD")
18,45,N,8,2
^SCR("P1TOTNA","P",12,"HELP")

^SCR("P1TOTNA","P",12,"LMAX")
8
^SCR("P1TOTNA","P",12,"MUMPS1")

^SCR("P1TOTNA","P",12,"MUMPS2")

^SCR("P1TOTNA","P",12,"OUTPUT")

^SCR("P1TOTNA","P",12,"TYP")
N
^SCR("P1TOTNA","P",13,"CRD")
18,28,N,8,2
^SCR("P1TOTNA","P",13,"HELP")

^SCR("P1TOTNA","P",13,"LMAX")
9
^SCR("P1TOTNA","P",13,"MUMPS1")

^SCR("P1TOTNA","P",13,"MUMPS2")

^SCR("P1TOTNA","P",13,"OUTPUT")

^SCR("P1TOTNA","P",13,"TYP")
N
^SCR("P1TOTNA","P",14,"CRD")
18,1,N,10,2
^SCR("P1TOTNA","P",14,"HELP")

^SCR("P1TOTNA","P",14,"LMAX")
11
^SCR("P1TOTNA","P",14,"MUMPS1")

^SCR("P1TOTNA","P",14,"MUMPS2")

^SCR("P1TOTNA","P",14,"OUTPUT")

^SCR("P1TOTNA","P",14,"TYP")
N
^SCR("P1TOTNA","P",15,"CRD")
8,45,N,8,2
^SCR("P1TOTNA","P",15,"HELP")

^SCR("P1TOTNA","P",15,"LMAX")
8
^SCR("P1TOTNA","P",15,"MUMPS1")

^SCR("P1TOTNA","P",15,"MUMPS2")

^SCR("P1TOTNA","P",15,"OUTPUT")

^SCR("P1TOTNA","P",15,"TYP")
N
^SCR("P1TOTNA","P",20,"CRD")
9,45,N,8,2
^SCR("P1TOTNA","P",20,"HELP")

^SCR("P1TOTNA","P",20,"LMAX")
8
^SCR("P1TOTNA","P",20,"MUMPS1")

^SCR("P1TOTNA","P",20,"MUMPS2")

^SCR("P1TOTNA","P",20,"OUTPUT")

^SCR("P1TOTNA","P",20,"TYP")
N
^SCR("P1TOTNA","P",25,"CRD")
10,45,N,8,2
^SCR("P1TOTNA","P",25,"HELP")

^SCR("P1TOTNA","P",25,"LMAX")
8
^SCR("P1TOTNA","P",25,"MUMPS1")

^SCR("P1TOTNA","P",25,"MUMPS2")

^SCR("P1TOTNA","P",25,"OUTPUT")

^SCR("P1TOTNA","P",25,"TYP")
N
^SCR("P1TOTNA","P",26,"CRD")
11,45,N,8,2
^SCR("P1TOTNA","P",26,"HELP")

^SCR("P1TOTNA","P",26,"LMAX")
8
^SCR("P1TOTNA","P",26,"MUMPS1")

^SCR("P1TOTNA","P",26,"MUMPS2")

^SCR("P1TOTNA","P",26,"OUTPUT")

^SCR("P1TOTNA","P",26,"TYP")
N
^SCR("P1TOTNA","P",28,"CRD")
14,45,N,8,2
^SCR("P1TOTNA","P",28,"HELP")

^SCR("P1TOTNA","P",28,"LMAX")
8
^SCR("P1TOTNA","P",28,"MUMPS1")

^SCR("P1TOTNA","P",28,"MUMPS2")

^SCR("P1TOTNA","P",28,"TYP")
N
^SCR("P1TOTNA","P",30,"CRD")
14,65,H,4
^SCR("P1TOTNA","P",30,"HELP")

^SCR("P1TOTNA","P",30,"LMAX")
8
^SCR("P1TOTNA","P",30,"MUMPS1")

^SCR("P1TOTNA","P",30,"MUMPS2")

^SCR("P1TOTNA","P",30,"OUTPUT")

^SCR("P1TOTNA","P",30,"TYP")
H
^SCR("P1TOTNA","P",31,"CRD")
12,45,N,8,2
^SCR("P1TOTNA","P",31,"HELP")

^SCR("P1TOTNA","P",31,"LMAX")
8
^SCR("P1TOTNA","P",31,"MUMPS1")

^SCR("P1TOTNA","P",31,"MUMPS2")

^SCR("P1TOTNA","P",31,"OUTPUT")

^SCR("P1TOTNA","P",31,"TYP")
N
^SCR("P1TOTNA","P",32,"CRD")
12,28,N,8,2
^SCR("P1TOTNA","P",32,"HELP")

^SCR("P1TOTNA","P",32,"LMAX")
11
^SCR("P1TOTNA","P",32,"MUMPS1")

^SCR("P1TOTNA","P",32,"MUMPS2")

^SCR("P1TOTNA","P",32,"OUTPUT")

^SCR("P1TOTNA","P",32,"TYP")
N
^SCR("P1TOTNA","P",33,"CRD")
12,14,N,9,2
^SCR("P1TOTNA","P",33,"HELP")

^SCR("P1TOTNA","P",33,"LMAX")
9
^SCR("P1TOTNA","P",33,"MUMPS1")

^SCR("P1TOTNA","P",33,"MUMPS2")

^SCR("P1TOTNA","P",33,"OUTPUT")

^SCR("P1TOTNA","P",33,"TYP")
N
^SCR("P1TOTNA","P",34,"CRD")
13,45,N,8,2
^SCR("P1TOTNA","P",34,"HELP")

^SCR("P1TOTNA","P",34,"LMAX")
8
^SCR("P1TOTNA","P",34,"MUMPS1")

^SCR("P1TOTNA","P",34,"MUMPS2")

^SCR("P1TOTNA","P",34,"OUTPUT")

^SCR("P1TOTNA","P",34,"TYP")
N
^SCR("P1TOTNA","P",35,"CRD")
16,44,N,9,2
^SCR("P1TOTNA","P",35,"HELP")

^SCR("P1TOTNA","P",35,"LMAX")
9
^SCR("P1TOTNA","P",35,"MUMPS1")

^SCR("P1TOTNA","P",35,"MUMPS2")

^SCR("P1TOTNA","P",35,"OUTPUT")

^SCR("P1TOTNA","P",35,"TYP")
N
^SCR("P1TOTNA","P",36,"CRD")
13,28,N,9,2
^SCR("P1TOTNA","P",36,"HELP")

^SCR("P1TOTNA","P",36,"LMAX")
11
^SCR("P1TOTNA","P",36,"MUMPS1")

^SCR("P1TOTNA","P",36,"MUMPS2")

^SCR("P1TOTNA","P",36,"OUTPUT")

^SCR("P1TOTNA","P",36,"TYP")
N
^SCR("P1TOTNA","P",37,"CRD")
13,14,N,9,2
^SCR("P1TOTNA","P",37,"HELP")

^SCR("P1TOTNA","P",37,"LMAX")
9
^SCR("P1TOTNA","P",37,"MUMPS1")

^SCR("P1TOTNA","P",37,"MUMPS2")

^SCR("P1TOTNA","P",37,"OUTPUT")

^SCR("P1TOTNA","P",37,"TYP")
N
^SCR("P1TOTNA","P",40,"CRD")
21,63,N,8,2
^SCR("P1TOTNA","P",40,"HELP")

^SCR("P1TOTNA","P",40,"LMAX")
8
^SCR("P1TOTNA","P",40,"MUMPS1")

^SCR("P1TOTNA","P",40,"MUMPS2")

^SCR("P1TOTNA","P",40,"OUTPUT")

^SCR("P1TOTNA","P",40,"TYP")
N
^SCR("P1TOTNA","P",42,"CRD")
22,45,N,8,2
^SCR("P1TOTNA","P",42,"HELP")

^SCR("P1TOTNA","P",42,"LMAX")
8
^SCR("P1TOTNA","P",42,"MUMPS1")

^SCR("P1TOTNA","P",42,"MUMPS2")

^SCR("P1TOTNA","P",42,"OUTPUT")

^SCR("P1TOTNA","P",42,"TYP")
N
^SCR("P1TOTNA","P",43,"CRD")
21,39,N,8,2
^SCR("P1TOTNA","P",43,"HELP")

^SCR("P1TOTNA","P",43,"LMAX")
8
^SCR("P1TOTNA","P",43,"MUMPS1")

^SCR("P1TOTNA","P",43,"MUMPS2")

^SCR("P1TOTNA","P",43,"OUTPUT")

^SCR("P1TOTNA","P",43,"TYP")
N
^SCR("P1TOTNA","P",45,"CRD")
21,21,N,8,2
^SCR("P1TOTNA","P",45,"HELP")

^SCR("P1TOTNA","P",45,"LMAX")
8
^SCR("P1TOTNA","P",45,"MUMPS1")

^SCR("P1TOTNA","P",45,"MUMPS2")

^SCR("P1TOTNA","P",45,"OUTPUT")

^SCR("P1TOTNA","P",45,"TYP")
N
^SCR("P1TOTNA","P",47,"CRD")
22,22,N,8,2
^SCR("P1TOTNA","P",47,"HELP")

^SCR("P1TOTNA","P",47,"LMAX")
8
^SCR("P1TOTNA","P",47,"MUMPS1")

^SCR("P1TOTNA","P",47,"MUMPS2")

^SCR("P1TOTNA","P",47,"OUTPUT")

^SCR("P1TOTNA","P",47,"TYP")
N
^SCR("P1TOTNA","P",49,"CRD")
17,45,N,8,2
^SCR("P1TOTNA","P",49,"HELP")

^SCR("P1TOTNA","P",49,"LMAX")
8
^SCR("P1TOTNA","P",49,"MUMPS1")

^SCR("P1TOTNA","P",49,"MUMPS2")

^SCR("P1TOTNA","P",49,"OUTPUT")

^SCR("P1TOTNA","P",49,"TYP")
N
^SCR("P1TOTNA","P",50,"CRD")
23,51,N,8,2
^SCR("P1TOTNA","P",50,"HELP")

^SCR("P1TOTNA","P",50,"LMAX")
8
^SCR("P1TOTNA","P",50,"MUMPS1")

^SCR("P1TOTNA","P",50,"MUMPS2")

^SCR("P1TOTNA","P",50,"OUTPUT")

^SCR("P1TOTNA","P",50,"TYP")
N
^SCR("P1TOTNA","P",53,"CRD")
23,48,H,8
^SCR("P1TOTNA","P",53,"HELP")

^SCR("P1TOTNA","P",53,"LMAX")
8
^SCR("P1TOTNA","P",53,"MUMPS1")

^SCR("P1TOTNA","P",53,"MUMPS2")

^SCR("P1TOTNA","P",53,"OUTPUT")

^SCR("P1TOTNA","P",53,"TYP")
H
^SCR("P1TOTNA","P",54,"CRD")
23,28,N,8,2
^SCR("P1TOTNA","P",54,"HELP")

^SCR("P1TOTNA","P",54,"LMAX")
8
^SCR("P1TOTNA","P",54,"MUMPS1")

^SCR("P1TOTNA","P",54,"MUMPS2")

^SCR("P1TOTNA","P",54,"OUTPUT")

^SCR("P1TOTNA","P",54,"TYP")
N
^SCR("P1TOTNA","P",55,"CRD")
5,28,N,8,2
^SCR("P1TOTNA","P",55,"HELP")

^SCR("P1TOTNA","P",55,"LMAX")
11
^SCR("P1TOTNA","P",55,"MUMPS1")

^SCR("P1TOTNA","P",55,"MUMPS2")

^SCR("P1TOTNA","P",55,"OUTPUT")

^SCR("P1TOTNA","P",55,"TYP")
N
^SCR("P1TOTNA","P",58,"CRD")
5,14,N,9,2
^SCR("P1TOTNA","P",58,"HELP")

^SCR("P1TOTNA","P",58,"LMAX")
9
^SCR("P1TOTNA","P",58,"MUMPS1")

^SCR("P1TOTNA","P",58,"MUMPS2")

^SCR("P1TOTNA","P",58,"OUTPUT")

^SCR("P1TOTNA","P",58,"TYP")
N
^SCR("P1TOTNA","P",60,"CRD")
6,28,N,8,2
^SCR("P1TOTNA","P",60,"HELP")

^SCR("P1TOTNA","P",60,"LMAX")
11
^SCR("P1TOTNA","P",60,"MUMPS1")

^SCR("P1TOTNA","P",60,"MUMPS2")

^SCR("P1TOTNA","P",60,"OUTPUT")

^SCR("P1TOTNA","P",60,"TYP")
N
^SCR("P1TOTNA","P",61,"CRD")
7,28,N,8,2
^SCR("P1TOTNA","P",61,"HELP")

^SCR("P1TOTNA","P",61,"LMAX")
11
^SCR("P1TOTNA","P",61,"MUMPS1")

^SCR("P1TOTNA","P",61,"MUMPS2")

^SCR("P1TOTNA","P",61,"OUTPUT")

^SCR("P1TOTNA","P",61,"TYP")
N
^SCR("P1TOTNA","P",65,"CRD")
6,14,N,9,2
^SCR("P1TOTNA","P",65,"HELP")

^SCR("P1TOTNA","P",65,"LMAX")
9
^SCR("P1TOTNA","P",65,"MUMPS1")

^SCR("P1TOTNA","P",65,"MUMPS2")

^SCR("P1TOTNA","P",65,"OUTPUT")

^SCR("P1TOTNA","P",65,"TYP")
N
^SCR("P1TOTNA","P",67,"CRD")
7,14,N,9,2
^SCR("P1TOTNA","P",67,"HELP")

^SCR("P1TOTNA","P",67,"LMAX")
9
^SCR("P1TOTNA","P",67,"MUMPS1")

^SCR("P1TOTNA","P",67,"MUMPS2")

^SCR("P1TOTNA","P",67,"TYP")
N
^SCR("P1TOTNA","P",70,"CRD")
8,28,N,8,2
^SCR("P1TOTNA","P",70,"HELP")

^SCR("P1TOTNA","P",70,"LMAX")
11
^SCR("P1TOTNA","P",70,"MUMPS1")

^SCR("P1TOTNA","P",70,"MUMPS2")

^SCR("P1TOTNA","P",70,"OUTPUT")

^SCR("P1TOTNA","P",70,"TYP")
N
^SCR("P1TOTNA","P",72,"CRD")
8,14,N,9,2
^SCR("P1TOTNA","P",72,"HELP")

^SCR("P1TOTNA","P",72,"LMAX")
9
^SCR("P1TOTNA","P",72,"MUMPS1")

^SCR("P1TOTNA","P",72,"MUMPS2")

^SCR("P1TOTNA","P",72,"OUTPUT")

^SCR("P1TOTNA","P",72,"TYP")
N
^SCR("P1TOTNA","P",75,"CRD")
9,28,N,8,2
^SCR("P1TOTNA","P",75,"HELP")

^SCR("P1TOTNA","P",75,"LMAX")
11
^SCR("P1TOTNA","P",75,"MUMPS1")

^SCR("P1TOTNA","P",75,"MUMPS2")

^SCR("P1TOTNA","P",75,"OUTPUT")

^SCR("P1TOTNA","P",75,"TYP")
N
^SCR("P1TOTNA","P",78,"CRD")
9,14,N,9,2
^SCR("P1TOTNA","P",78,"HELP")

^SCR("P1TOTNA","P",78,"LMAX")
9
^SCR("P1TOTNA","P",78,"MUMPS1")

^SCR("P1TOTNA","P",78,"MUMPS2")

^SCR("P1TOTNA","P",78,"OUTPUT")

^SCR("P1TOTNA","P",78,"TYP")
N
^SCR("P1TOTNA","P",80,"CRD")
10,28,N,8,2
^SCR("P1TOTNA","P",80,"HELP")

^SCR("P1TOTNA","P",80,"LMAX")
11
^SCR("P1TOTNA","P",80,"MUMPS1")

^SCR("P1TOTNA","P",80,"MUMPS2")

^SCR("P1TOTNA","P",80,"OUTPUT")

^SCR("P1TOTNA","P",80,"TYP")
N
^SCR("P1TOTNA","P",82,"CRD")
10,14,N,9,2
^SCR("P1TOTNA","P",82,"HELP")

^SCR("P1TOTNA","P",82,"LMAX")
9
^SCR("P1TOTNA","P",82,"MUMPS1")

^SCR("P1TOTNA","P",82,"MUMPS2")

^SCR("P1TOTNA","P",82,"OUTPUT")

^SCR("P1TOTNA","P",82,"TYP")
N
^SCR("P1TOTNA","P",83,"CRD")
11,28,N,8,2
^SCR("P1TOTNA","P",83,"HELP")

^SCR("P1TOTNA","P",83,"LMAX")
11
^SCR("P1TOTNA","P",83,"MUMPS1")

^SCR("P1TOTNA","P",83,"MUMPS2")

^SCR("P1TOTNA","P",83,"OUTPUT")

^SCR("P1TOTNA","P",83,"TYP")
N
^SCR("P1TOTNA","P",84,"CRD")
11,14,N,9,2
^SCR("P1TOTNA","P",84,"HELP")

^SCR("P1TOTNA","P",84,"LMAX")
9
^SCR("P1TOTNA","P",84,"MUMPS1")

^SCR("P1TOTNA","P",84,"MUMPS2")

^SCR("P1TOTNA","P",84,"OUTPUT")

^SCR("P1TOTNA","P",84,"TYP")
N
^SCR("P1TOTNA","P",85,"CRD")
14,14,N,9,2
^SCR("P1TOTNA","P",85,"HELP")

^SCR("P1TOTNA","P",85,"LMAX")
9
^SCR("P1TOTNA","P",85,"MUMPS1")

^SCR("P1TOTNA","P",85,"MUMPS2")

^SCR("P1TOTNA","P",85,"OUTPUT")

^SCR("P1TOTNA","P",85,"TYP")
N
^SCR("P1TOTNA","P",87,"CRD")
17,1,N,10,2
^SCR("P1TOTNA","P",87,"HELP")

^SCR("P1TOTNA","P",87,"LMAX")
10
^SCR("P1TOTNA","P",87,"MUMPS1")

^SCR("P1TOTNA","P",87,"MUMPS2")

^SCR("P1TOTNA","P",87,"OUTPUT")

^SCR("P1TOTNA","P",87,"TYP")
N
^SCR("P1TOTNA","P",90,"CRD")
16,28,N,8,2
^SCR("P1TOTNA","P",90,"HELP")

^SCR("P1TOTNA","P",90,"LMAX")
11
^SCR("P1TOTNA","P",90,"MUMPS1")

^SCR("P1TOTNA","P",90,"MUMPS2")

^SCR("P1TOTNA","P",90,"OUTPUT")

^SCR("P1TOTNA","P",90,"TYP")
N
^SCR("P1TOTNA","P",91,"CRD")
19,68,H,65
^SCR("P1TOTNA","P",91,"HELP")

^SCR("P1TOTNA","P",91,"LMAX")
66
^SCR("P1TOTNA","P",91,"MUMPS1")

^SCR("P1TOTNA","P",91,"MUMPS2")

^SCR("P1TOTNA","P",91,"OUTPUT")

^SCR("P1TOTNA","P",91,"TYP")
H
^SCR("P1TOTNA","P",92,"CRD")
20,68,H,66
^SCR("P1TOTNA","P",92,"HELP")

^SCR("P1TOTNA","P",92,"LMAX")
66
^SCR("P1TOTNA","P",92,"MUMPS1")

^SCR("P1TOTNA","P",92,"MUMPS2")

^SCR("P1TOTNA","P",92,"OUTPUT")

^SCR("P1TOTNA","P",92,"TYP")
H
^SCR("P1TOTNA","P",93,"CRD")
21,2,N,5,0
^SCR("P1TOTNA","P",93,"HELP")

^SCR("P1TOTNA","P",93,"LMAX")
5
^SCR("P1TOTNA","P",93,"MUMPS1")

^SCR("P1TOTNA","P",93,"MUMPS2")

^SCR("P1TOTNA","P",93,"OUTPUT")

^SCR("P1TOTNA","P",93,"TYP")
N
^SCR("P1TOTNA","P",95,"CRD")
17,13,N,10,2
^SCR("P1TOTNA","P",95,"HELP")

^SCR("P1TOTNA","P",95,"LMAX")
10
^SCR("P1TOTNA","P",95,"MUMPS1")

^SCR("P1TOTNA","P",95,"MUMPS2")

^SCR("P1TOTNA","P",95,"OUTPUT")

^SCR("P1TOTNA","P",95,"TYP")
N
^SCR("P1TOTNA","P",96,"CRD")
22,20,H,17
^SCR("P1TOTNA","P",96,"HELP")

^SCR("P1TOTNA","P",96,"LMAX")
17
^SCR("P1TOTNA","P",96,"MUMPS1")

^SCR("P1TOTNA","P",96,"MUMPS2")

^SCR("P1TOTNA","P",96,"OUTPUT")

^SCR("P1TOTNA","P",96,"TYP")
H
^SCR("P1TOTNA","P",97,"CRD")
16,14,N,9,2
^SCR("P1TOTNA","P",97,"HELP")

^SCR("P1TOTNA","P",97,"LMAX")
9
^SCR("P1TOTNA","P",97,"MUMPS1")

^SCR("P1TOTNA","P",97,"MUMPS2")

^SCR("P1TOTNA","P",97,"OUTPUT")

^SCR("P1TOTNA","P",97,"TYP")
N
^SCR("P1TOTNA","P",98,"CRD")
23,7,N,10,2
^SCR("P1TOTNA","P",98,"HELP")

^SCR("P1TOTNA","P",98,"LMAX")
10
^SCR("P1TOTNA","P",98,"MUMPS1")

^SCR("P1TOTNA","P",98,"MUMPS2")

^SCR("P1TOTNA","P",98,"OUTPUT")

^SCR("P1TOTNA","P",98,"TYP")
N
^SCR("P1TOTNA","P","NAME","AEX")
26
^SCR("P1TOTNA","P","NAME","AEXS")
84
^SCR("P1TOTNA","P","NAME","ALPHA")
34
^SCR("P1TOTNA","P","NAME","ALPHAS")
37
^SCR("P1TOTNA","P","NAME","ASR")
12
^SCR("P1TOTNA","P","NAME","BIT")
50
^SCR("P1TOTNA","P","NAME","CAS")
95
^SCR("P1TOTNA","P","NAME","CASHD")
87
^SCR("P1TOTNA","P","NAME","CHKM")
11
^SCR("P1TOTNA","P","NAME","CHKMS")
67
^SCR("P1TOTNA","P","NAME","CHKO")
10
^SCR("P1TOTNA","P","NAME","CHKS")
65
^SCR("P1TOTNA","P","NAME","DAT1")
1
^SCR("P1TOTNA","P","NAME","DAT2")
2
^SCR("P1TOTNA","P","NAME","DMSHS")
47
^SCR("P1TOTNA","P","NAME","DNR")
25
^SCR("P1TOTNA","P","NAME","DNRS")
82
^SCR("P1TOTNA","P","NAME","HAEX")
83
^SCR("P1TOTNA","P","NAME","HALPHA")
36
^SCR("P1TOTNA","P","NAME","HAVT")
98
^SCR("P1TOTNA","P","NAME","HCHKM")
61
^SCR("P1TOTNA","P","NAME","HCHKO")
60
^SCR("P1TOTNA","P","NAME","HDNR")
80
^SCR("P1TOTNA","P","NAME","HISR")
70
^SCR("P1TOTNA","P","NAME","HJCB")
32
^SCR("P1TOTNA","P","NAME","HMZM")
55
^SCR("P1TOTNA","P","NAME","HNHCIB")
43
^SCR("P1TOTNA","P","NAME","HNHS")
40
^SCR("P1TOTNA","P","NAME","HSHUM")
90
^SCR("P1TOTNA","P","NAME","HVIZ")
75
^SCR("P1TOTNA","P","NAME","ISR")
15
^SCR("P1TOTNA","P","NAME","ISRS")
72
^SCR("P1TOTNA","P","NAME","JCB")
31
^SCR("P1TOTNA","P","NAME","JCBS")
33
^SCR("P1TOTNA","P","NAME","MAMS")
49
^SCR("P1TOTNA","P","NAME","MIN3")
45
^SCR("P1TOTNA","P","NAME","MSDAMSL")
92
^SCR("P1TOTNA","P","NAME","MSDMSL")
91
^SCR("P1TOTNA","P","NAME","MZM")
5
^SCR("P1TOTNA","P","NAME","MZMS")
58
^SCR("P1TOTNA","P","NAME","SHUM")
35
^SCR("P1TOTNA","P","NAME","SHUMS")
97
^SCR("P1TOTNA","P","NAME","SMHIRA")
14
^SCR("P1TOTNA","P","NAME","SMSL")
96
^SCR("P1TOTNA","P","NAME","SSOAD")
93
^SCR("P1TOTNA","P","NAME","SUMP")
42
^SCR("P1TOTNA","P","NAME","TIP")
28
^SCR("P1TOTNA","P","NAME","TIP1")
54
^SCR("P1TOTNA","P","NAME","TIPPS")
30
^SCR("P1TOTNA","P","NAME","TIPPS1")
53
^SCR("P1TOTNA","P","NAME","TIPS")
85
^SCR("P1TOTNA","P","NAME","TL")
13
^SCR("P1TOTNA","P","NAME","VIZ")
20
^SCR("P1TOTNA","P","NAME","VIZS")
78
^SCR("P1TOTNA","P","NM",1)
DAT1
^SCR("P1TOTNA","P","NM",2)
DAT2
^SCR("P1TOTNA","P","NM",5)
MZM
^SCR("P1TOTNA","P","NM",10)
CHKO
^SCR("P1TOTNA","P","NM",11)
CHKM
^SCR("P1TOTNA","P","NM",12)
ASR
^SCR("P1TOTNA","P","NM",13)
TL
^SCR("P1TOTNA","P","NM",14)
SMHIRA
^SCR("P1TOTNA","P","NM",15)
ISR
^SCR("P1TOTNA","P","NM",20)
VIZ
^SCR("P1TOTNA","P","NM",25)
DNR
^SCR("P1TOTNA","P","NM",26)
AEX
^SCR("P1TOTNA","P","NM",28)
TIP
^SCR("P1TOTNA","P","NM",30)
TIPPS
^SCR("P1TOTNA","P","NM",31)
JCB
^SCR("P1TOTNA","P","NM",32)
HJCB
^SCR("P1TOTNA","P","NM",33)
JCBS
^SCR("P1TOTNA","P","NM",34)
ALPHA
^SCR("P1TOTNA","P","NM",35)
SHUM
^SCR("P1TOTNA","P","NM",36)
HALPHA
^SCR("P1TOTNA","P","NM",37)
ALPHAS
^SCR("P1TOTNA","P","NM",40)
HNHS
^SCR("P1TOTNA","P","NM",42)
SUMP
^SCR("P1TOTNA","P","NM",43)
HNHCIB
^SCR("P1TOTNA","P","NM",45)
MIN3
^SCR("P1TOTNA","P","NM",47)
DMSHS
^SCR("P1TOTNA","P","NM",49)
MAMS
^SCR("P1TOTNA","P","NM",50)
BIT
^SCR("P1TOTNA","P","NM",53)
TIPPS1
^SCR("P1TOTNA","P","NM",54)
TIP1
^SCR("P1TOTNA","P","NM",55)
HMZM
^SCR("P1TOTNA","P","NM",58)
MZMS
^SCR("P1TOTNA","P","NM",60)
HCHKO
^SCR("P1TOTNA","P","NM",61)
HCHKM
^SCR("P1TOTNA","P","NM",65)
CHKS
^SCR("P1TOTNA","P","NM",67)
CHKMS
^SCR("P1TOTNA","P","NM",70)
HISR
^SCR("P1TOTNA","P","NM",72)
ISRS
^SCR("P1TOTNA","P","NM",75)
HVIZ
^SCR("P1TOTNA","P","NM",78)
VIZS
^SCR("P1TOTNA","P","NM",80)
HDNR
^SCR("P1TOTNA","P","NM",82)
DNRS
^SCR("P1TOTNA","P","NM",83)
HAEX
^SCR("P1TOTNA","P","NM",84)
AEXS
^SCR("P1TOTNA","P","NM",85)
TIPS
^SCR("P1TOTNA","P","NM",87)
CASHD
^SCR("P1TOTNA","P","NM",90)
HSHUM
^SCR("P1TOTNA","P","NM",91)
MSDMSL
^SCR("P1TOTNA","P","NM",92)
MSDAMSL
^SCR("P1TOTNA","P","NM",93)
SSOAD
^SCR("P1TOTNA","P","NM",95)
CAS
^SCR("P1TOTNA","P","NM",96)
SMSL
^SCR("P1TOTNA","P","NM",97)
SHUMS
^SCR("P1TOTNA","P","NM",98)
HAVT
^SCR("P1TOTSV")
H
^SCR("P1TOTSV",1)
              # itqk zexikn z`eeyd g"ec #                                      
^SCR("P1TOTSV",2)
                 {03 yceg cr {02 ycegn {01: dpy :  zncew dtewz                 
^SCR("P1TOTSV",3)
                 {08 yceg cr {07 ycegn {06: dpy : zigkep dtewz                 
^SCR("P1TOTSV",4)
         -------------------------------------------------------------         
^SCR("P1TOTSV",5)
         | -a yxtd |   yxtd   | dtewza xknp |  dtewza xknp |    beq  |         
^SCR("P1TOTSV",6)
         |     %   |          |      zigkep |        zncew |  melyz  |         
^SCR("P1TOTSV",7)
         -------------------------------------------------------------         
^SCR("P1TOTSV",8)
          {31     }|{58      }| {55       } |  {09       } |     onefn         
^SCR("P1TOTSV",9)
          {34     }|{65      }| {60       } |  {10       } | wiy d`gnd         
^SCR("P1TOTSV",10)
          {36     }|{67      }| {61       } |  {11       } | 'fn d`gnd         
^SCR("P1TOTSV",11)
          {39     }|{72      }| {70       } |  {15       } |   hxk`xyi         
^SCR("P1TOTSV",12)
          {43     }|{78      }| {75       } |  {20       } |      dfie         
^SCR("P1TOTSV",13)
          {46     }|{82      }| {80       } |  {25       } |    qxpiic         
^SCR("P1TOTSV",14)
          {49     }|{84      }| {83       } |  {26       } |       AEX         
^SCR("P1TOTSV",15)
          {19     }|{18      }| {16       } |  {27       } |       JCB         
^SCR("P1TOTSV",16)
          {47     }|{44      }| {40       } |  {29       } |      `tl`         
^SCR("P1TOTSV",17)
          {62     }|{85      }| {86       } |  {28       } |  {     30}        
^SCR("P1TOTSV",18)
          {66     }|{95      }| {91       } |  {12       } |      dtwd         
^SCR("P1TOTSV",19)
         --------------------------------------------------------------        
^SCR("P1TOTSV",20)
          {73     }|{93      }| {87        }|  {32        }| zexikn k"dq       
^SCR("P1TOTSV",21)
          {77     }|{97      }| {90        }|  {35        }| ehp k"dq          
^SCR("P1TOTSV",22)
          {96     }|{94      }| {92        }|  {38        }| `"k k"dq          
^SCR("P1TOTSV","A",1)
‰”‘‹š…˜‰‹Žš€……™„‡"…ƒ
^SCR("P1TOTSV","A",2)
™ƒ…‡ƒ’™ƒ…‡Ž:„�™:šŽƒ…—„”…—š
^SCR("P1TOTSV","A",3)
™ƒ…‡ƒ’™ƒ…‡Ž:„�™:š‰‡‹…�„”…—š
^SCR("P1TOTSV","A",4)
-------------------------------------------------------------
^SCR("P1TOTSV","A",5)
|-�™˜”„|™˜”„|„”…—š�˜‹Ž�|„”…—š�˜‹Ž�|‚…‘|
^SCR("P1TOTSV","A",6)
|%||š‰‡‹…�|šŽƒ…—|�…Œ™š|
^SCR("P1TOTSV","A",7)
-------------------------------------------------------------
^SCR("P1TOTSV","A",8)
||||�Ž…†Ž
^SCR("P1TOTSV","A",9)
||||—‰™„€‡Ž„
^SCR("P1TOTSV","A",10)
||||'†Ž„€‡Ž„
^SCR("P1TOTSV","A",11)
||||ˆ˜‹€˜™‰
^SCR("P1TOTSV","A",12)
||||„†‰…
^SCR("P1TOTSV","A",13)
||||‘˜�‰‰ƒ
^SCR("P1TOTSV","A",14)
||||AEX
^SCR("P1TOTSV","A",15)
||||JCB
^SCR("P1TOTSV","A",16)
||||€”Œ€
^SCR("P1TOTSV","A",17)
||||
^SCR("P1TOTSV","A",18)
||||„”—„
^SCR("P1TOTSV","A",19)
--------------------------------------------------------------
^SCR("P1TOTSV","A",20)
||||š…˜‰‹Ž‹"„‘
^SCR("P1TOTSV","A",21)
||||…ˆ�‹"„‘
^SCR("P1TOTSV","A",22)
||||€"‹‹"„‘
^SCR("P1TOTSV","AV",1)
hpxf,urhfn,tuuavj"us
^SCR("P1TOTSV","AV",2)
asujsgasujn:vba:,nsuevpue,
^SCR("P1TOTSV","AV",3)
asujsgasujn:vba:,hjfubvpue,
^SCR("P1TOTSV","AV",4)
-------------------------------------------------------------
^SCR("P1TOTSV","AV",5)
|-carpv|arpv|vpue,crfnb|vpue,crfnb|dux|
^SCR("P1TOTSV","AV",6)
|%||,hjfub|,nsue|ouka,|
^SCR("P1TOTSV","AV",7)
-------------------------------------------------------------
^SCR("P1TOTSV","AV",8)
||||inuzn
^SCR("P1TOTSV","AV",9)
||||ehavtjnv
^SCR("P1TOTSV","AV",10)
||||wznvtjnv
^SCR("P1TOTSV","AV",11)
||||yrftrah
^SCR("P1TOTSV","AV",12)
||||vzhu
^SCR("P1TOTSV","AV",13)
||||xrbhhs
^SCR("P1TOTSV","AV",14)
||||AEX
^SCR("P1TOTSV","AV",15)
||||JCB
^SCR("P1TOTSV","AV",16)
||||tpkt
^SCR("P1TOTSV","AV",17)
||||
^SCR("P1TOTSV","AV",18)
||||vpev
^SCR("P1TOTSV","AV",19)
--------------------------------------------------------------
^SCR("P1TOTSV","AV",20)
||||,urhfnf"vx
^SCR("P1TOTSV","AV",21)
||||uybf"vx
^SCR("P1TOTSV","AV",22)
||||t"ff"vx
^SCR("P1TOTSV","NAME")

^SCR("P1TOTSV","P",1,"CRD")
2,39,E,2,0
^SCR("P1TOTSV","P",1,"HELP")

^SCR("P1TOTSV","P",1,"LMAX")
3
^SCR("P1TOTSV","P",1,"MUMPS1")

^SCR("P1TOTSV","P",1,"MUMPS2")
I YY1'?2N S %SC("ER")=1
^SCR("P1TOTSV","P",1,"MUST")

^SCR("P1TOTSV","P",1,"TYP")
E
^SCR("P1TOTSV","P",2,"CRD")
2,29,N,2,0
^SCR("P1TOTSV","P",2,"HELP")

^SCR("P1TOTSV","P",2,"LMAX")
4
^SCR("P1TOTSV","P",2,"MUMPS1")

^SCR("P1TOTSV","P",2,"MUMPS2")
I MM10'?1N.N!(MM10>12) S %SC("ER")=1
^SCR("P1TOTSV","P",2,"MUST")

^SCR("P1TOTSV","P",2,"TYP")
N
^SCR("P1TOTSV","P",3,"CRD")
2,17,N,2,0
^SCR("P1TOTSV","P",3,"HELP")

^SCR("P1TOTSV","P",3,"LMAX")
4
^SCR("P1TOTSV","P",3,"MUMPS1")

^SCR("P1TOTSV","P",3,"MUMPS2")
I MM11<MM10!(MM11>12) S %SC("ER")=1
^SCR("P1TOTSV","P",3,"MUST")

^SCR("P1TOTSV","P",3,"TYP")
N
^SCR("P1TOTSV","P",6,"CRD")
3,39,E,2,0
^SCR("P1TOTSV","P",6,"HELP")

^SCR("P1TOTSV","P",6,"LMAX")
3
^SCR("P1TOTSV","P",6,"MUMPS1")

^SCR("P1TOTSV","P",6,"MUMPS2")
D YY2^P1TOTSV
^SCR("P1TOTSV","P",6,"MUST")

^SCR("P1TOTSV","P",6,"TYP")
E
^SCR("P1TOTSV","P",7,"CRD")
3,29,N,2,0
^SCR("P1TOTSV","P",7,"HELP")

^SCR("P1TOTSV","P",7,"LMAX")
4
^SCR("P1TOTSV","P",7,"MUMPS1")

^SCR("P1TOTSV","P",7,"MUMPS2")
I MM20'?1N.N!(MM20>12) S %SC("ER")=1
^SCR("P1TOTSV","P",7,"TYP")
N
^SCR("P1TOTSV","P",8,"CRD")
3,17,N,2,0
^SCR("P1TOTSV","P",8,"HELP")

^SCR("P1TOTSV","P",8,"LMAX")
4
^SCR("P1TOTSV","P",8,"MUMPS1")

^SCR("P1TOTSV","P",8,"MUMPS2")
D MM21^P1TOTSV
^SCR("P1TOTSV","P",8,"TYP")
N
^SCR("P1TOTSV","P",9,"CRD")
8,47,N,10,2
^SCR("P1TOTSV","P",9,"HELP")

^SCR("P1TOTSV","P",9,"LMAX")
10
^SCR("P1TOTSV","P",9,"MUMPS1")

^SCR("P1TOTSV","P",9,"MUMPS2")

^SCR("P1TOTSV","P",9,"OUTPUT")

^SCR("P1TOTSV","P",9,"TYP")
N
^SCR("P1TOTSV","P",10,"CRD")
9,47,N,10,2
^SCR("P1TOTSV","P",10,"HELP")

^SCR("P1TOTSV","P",10,"LMAX")
10
^SCR("P1TOTSV","P",10,"MUMPS1")

^SCR("P1TOTSV","P",10,"MUMPS2")

^SCR("P1TOTSV","P",10,"OUTPUT")

^SCR("P1TOTSV","P",10,"TYP")
N
^SCR("P1TOTSV","P",11,"CRD")
10,47,N,10,2
^SCR("P1TOTSV","P",11,"HELP")

^SCR("P1TOTSV","P",11,"LMAX")
10
^SCR("P1TOTSV","P",11,"MUMPS1")

^SCR("P1TOTSV","P",11,"MUMPS2")

^SCR("P1TOTSV","P",11,"OUTPUT")

^SCR("P1TOTSV","P",11,"TYP")
N
^SCR("P1TOTSV","P",12,"CRD")
18,47,N,10,2
^SCR("P1TOTSV","P",12,"HELP")

^SCR("P1TOTSV","P",12,"LMAX")
10
^SCR("P1TOTSV","P",12,"MUMPS1")

^SCR("P1TOTSV","P",12,"MUMPS2")

^SCR("P1TOTSV","P",12,"OUTPUT")

^SCR("P1TOTSV","P",12,"TYP")
N
^SCR("P1TOTSV","P",15,"CRD")
11,47,N,10,2
^SCR("P1TOTSV","P",15,"HELP")

^SCR("P1TOTSV","P",15,"LMAX")
10
^SCR("P1TOTSV","P",15,"MUMPS1")

^SCR("P1TOTSV","P",15,"MUMPS2")

^SCR("P1TOTSV","P",15,"OUTPUT")

^SCR("P1TOTSV","P",15,"TYP")
N
^SCR("P1TOTSV","P",16,"CRD")
15,32,N,10,2
^SCR("P1TOTSV","P",16,"HELP")

^SCR("P1TOTSV","P",16,"LMAX")
10
^SCR("P1TOTSV","P",16,"MUMPS1")

^SCR("P1TOTSV","P",16,"MUMPS2")

^SCR("P1TOTSV","P",16,"OUTPUT")

^SCR("P1TOTSV","P",16,"TYP")
N
^SCR("P1TOTSV","P",18,"CRD")
15,20,E,9,0
^SCR("P1TOTSV","P",18,"HELP")

^SCR("P1TOTSV","P",18,"LMAX")
9
^SCR("P1TOTSV","P",18,"MUMPS1")

^SCR("P1TOTSV","P",18,"MUMPS2")

^SCR("P1TOTSV","P",18,"OUTPUT")

^SCR("P1TOTSV","P",18,"TYP")
E
^SCR("P1TOTSV","P",19,"CRD")
15,10,E,8,0
^SCR("P1TOTSV","P",19,"HELP")

^SCR("P1TOTSV","P",19,"LMAX")
8
^SCR("P1TOTSV","P",19,"MUMPS1")

^SCR("P1TOTSV","P",19,"MUMPS2")

^SCR("P1TOTSV","P",19,"OUTPUT")

^SCR("P1TOTSV","P",19,"TYP")
E
^SCR("P1TOTSV","P",20,"CRD")
12,47,N,10,2
^SCR("P1TOTSV","P",20,"HELP")

^SCR("P1TOTSV","P",20,"LMAX")
10
^SCR("P1TOTSV","P",20,"MUMPS1")

^SCR("P1TOTSV","P",20,"MUMPS2")

^SCR("P1TOTSV","P",20,"OUTPUT")

^SCR("P1TOTSV","P",20,"TYP")
N
^SCR("P1TOTSV","P",25,"CRD")
13,47,N,10,2
^SCR("P1TOTSV","P",25,"HELP")

^SCR("P1TOTSV","P",25,"LMAX")
10
^SCR("P1TOTSV","P",25,"MUMPS1")

^SCR("P1TOTSV","P",25,"MUMPS2")

^SCR("P1TOTSV","P",25,"OUTPUT")

^SCR("P1TOTSV","P",25,"TYP")
N
^SCR("P1TOTSV","P",26,"CRD")
14,47,N,10,2
^SCR("P1TOTSV","P",26,"HELP")

^SCR("P1TOTSV","P",26,"LMAX")
10
^SCR("P1TOTSV","P",26,"MUMPS1")

^SCR("P1TOTSV","P",26,"MUMPS2")

^SCR("P1TOTSV","P",26,"OUTPUT")

^SCR("P1TOTSV","P",26,"TYP")
N
^SCR("P1TOTSV","P",27,"CRD")
15,47,N,10,2
^SCR("P1TOTSV","P",27,"HELP")

^SCR("P1TOTSV","P",27,"LMAX")
10
^SCR("P1TOTSV","P",27,"MUMPS1")

^SCR("P1TOTSV","P",27,"MUMPS2")

^SCR("P1TOTSV","P",27,"OUTPUT")

^SCR("P1TOTSV","P",27,"TYP")
N
^SCR("P1TOTSV","P",28,"CRD")
17,47,N,10,2
^SCR("P1TOTSV","P",28,"HELP")

^SCR("P1TOTSV","P",28,"LMAX")
10
^SCR("P1TOTSV","P",28,"MUMPS1")

^SCR("P1TOTSV","P",28,"MUMPS2")

^SCR("P1TOTSV","P",28,"OUTPUT")

^SCR("P1TOTSV","P",28,"TYP")
N
^SCR("P1TOTSV","P",29,"CRD")
16,47,N,10,2
^SCR("P1TOTSV","P",29,"HELP")

^SCR("P1TOTSV","P",29,"LMAX")
10
^SCR("P1TOTSV","P",29,"MUMPS1")

^SCR("P1TOTSV","P",29,"MUMPS2")

^SCR("P1TOTSV","P",29,"OUTPUT")

^SCR("P1TOTSV","P",29,"TYP")
N
^SCR("P1TOTSV","P",30,"CRD")
17,71,H,8
^SCR("P1TOTSV","P",30,"HELP")

^SCR("P1TOTSV","P",30,"LMAX")
8
^SCR("P1TOTSV","P",30,"MUMPS1")

^SCR("P1TOTSV","P",30,"MUMPS2")

^SCR("P1TOTSV","P",30,"OUTPUT")

^SCR("P1TOTSV","P",30,"TYP")
H
^SCR("P1TOTSV","P",31,"CRD")
8,10,E,8,0
^SCR("P1TOTSV","P",31,"HELP")

^SCR("P1TOTSV","P",31,"LMAX")
8
^SCR("P1TOTSV","P",31,"MUMPS1")

^SCR("P1TOTSV","P",31,"MUMPS2")

^SCR("P1TOTSV","P",31,"OUTPUT")

^SCR("P1TOTSV","P",31,"TYP")
E
^SCR("P1TOTSV","P",32,"CRD")
20,47,N,10,2
^SCR("P1TOTSV","P",32,"HELP")

^SCR("P1TOTSV","P",32,"LMAX")
11
^SCR("P1TOTSV","P",32,"MUMPS1")

^SCR("P1TOTSV","P",32,"MUMPS2")

^SCR("P1TOTSV","P",32,"OUTPUT")

^SCR("P1TOTSV","P",32,"TYP")
N
^SCR("P1TOTSV","P",34,"CRD")
9,10,E,8,0
^SCR("P1TOTSV","P",34,"HELP")

^SCR("P1TOTSV","P",34,"LMAX")
8
^SCR("P1TOTSV","P",34,"MUMPS1")

^SCR("P1TOTSV","P",34,"MUMPS2")

^SCR("P1TOTSV","P",34,"OUTPUT")

^SCR("P1TOTSV","P",34,"TYP")
E
^SCR("P1TOTSV","P",35,"CRD")
21,47,N,10,2
^SCR("P1TOTSV","P",35,"HELP")

^SCR("P1TOTSV","P",35,"LMAX")
11
^SCR("P1TOTSV","P",35,"MUMPS1")

^SCR("P1TOTSV","P",35,"MUMPS2")

^SCR("P1TOTSV","P",35,"OUTPUT")

^SCR("P1TOTSV","P",35,"TYP")
N
^SCR("P1TOTSV","P",36,"CRD")
10,10,E,8,0
^SCR("P1TOTSV","P",36,"HELP")

^SCR("P1TOTSV","P",36,"LMAX")
8
^SCR("P1TOTSV","P",36,"MUMPS1")

^SCR("P1TOTSV","P",36,"MUMPS2")

^SCR("P1TOTSV","P",36,"OUTPUT")

^SCR("P1TOTSV","P",36,"TYP")
E
^SCR("P1TOTSV","P",38,"CRD")
22,47,N,10,2
^SCR("P1TOTSV","P",38,"HELP")

^SCR("P1TOTSV","P",38,"LMAX")
11
^SCR("P1TOTSV","P",38,"MUMPS1")

^SCR("P1TOTSV","P",38,"MUMPS2")

^SCR("P1TOTSV","P",38,"OUTPUT")

^SCR("P1TOTSV","P",38,"TYP")
N
^SCR("P1TOTSV","P",39,"CRD")
11,10,E,8,0
^SCR("P1TOTSV","P",39,"HELP")

^SCR("P1TOTSV","P",39,"LMAX")
8
^SCR("P1TOTSV","P",39,"MUMPS1")

^SCR("P1TOTSV","P",39,"MUMPS2")

^SCR("P1TOTSV","P",39,"OUTPUT")

^SCR("P1TOTSV","P",39,"TYP")
E
^SCR("P1TOTSV","P",40,"CRD")
16,32,N,10,2
^SCR("P1TOTSV","P",40,"HELP")

^SCR("P1TOTSV","P",40,"LMAX")
10
^SCR("P1TOTSV","P",40,"MUMPS1")

^SCR("P1TOTSV","P",40,"MUMPS2")

^SCR("P1TOTSV","P",40,"OUTPUT")

^SCR("P1TOTSV","P",40,"TYP")
N
^SCR("P1TOTSV","P",43,"CRD")
12,10,E,8,0
^SCR("P1TOTSV","P",43,"HELP")

^SCR("P1TOTSV","P",43,"LMAX")
8
^SCR("P1TOTSV","P",43,"MUMPS1")

^SCR("P1TOTSV","P",43,"MUMPS2")

^SCR("P1TOTSV","P",43,"OUTPUT")

^SCR("P1TOTSV","P",43,"TYP")
E
^SCR("P1TOTSV","P",44,"CRD")
16,20,E,9,0
^SCR("P1TOTSV","P",44,"HELP")

^SCR("P1TOTSV","P",44,"LMAX")
9
^SCR("P1TOTSV","P",44,"MUMPS1")

^SCR("P1TOTSV","P",44,"MUMPS2")

^SCR("P1TOTSV","P",44,"OUTPUT")

^SCR("P1TOTSV","P",44,"TYP")
E
^SCR("P1TOTSV","P",46,"CRD")
13,10,E,8,0
^SCR("P1TOTSV","P",46,"HELP")

^SCR("P1TOTSV","P",46,"LMAX")
8
^SCR("P1TOTSV","P",46,"MUMPS1")

^SCR("P1TOTSV","P",46,"MUMPS2")

^SCR("P1TOTSV","P",46,"OUTPUT")

^SCR("P1TOTSV","P",46,"TYP")
E
^SCR("P1TOTSV","P",47,"CRD")
16,10,E,8,0
^SCR("P1TOTSV","P",47,"HELP")

^SCR("P1TOTSV","P",47,"LMAX")
8
^SCR("P1TOTSV","P",47,"MUMPS1")

^SCR("P1TOTSV","P",47,"MUMPS2")

^SCR("P1TOTSV","P",47,"OUTPUT")

^SCR("P1TOTSV","P",47,"TYP")
E
^SCR("P1TOTSV","P",49,"CRD")
14,10,E,8,0
^SCR("P1TOTSV","P",49,"HELP")

^SCR("P1TOTSV","P",49,"LMAX")
8
^SCR("P1TOTSV","P",49,"MUMPS1")

^SCR("P1TOTSV","P",49,"MUMPS2")

^SCR("P1TOTSV","P",49,"OUTPUT")

^SCR("P1TOTSV","P",49,"TYP")
E
^SCR("P1TOTSV","P",55,"CRD")
8,32,N,10,2
^SCR("P1TOTSV","P",55,"HELP")

^SCR("P1TOTSV","P",55,"LMAX")
10
^SCR("P1TOTSV","P",55,"MUMPS1")

^SCR("P1TOTSV","P",55,"MUMPS2")

^SCR("P1TOTSV","P",55,"OUTPUT")

^SCR("P1TOTSV","P",55,"TYP")
N
^SCR("P1TOTSV","P",58,"CRD")
8,20,E,9,0
^SCR("P1TOTSV","P",58,"HELP")

^SCR("P1TOTSV","P",58,"LMAX")
9
^SCR("P1TOTSV","P",58,"MUMPS1")

^SCR("P1TOTSV","P",58,"MUMPS2")

^SCR("P1TOTSV","P",58,"OUTPUT")

^SCR("P1TOTSV","P",58,"TYP")
E
^SCR("P1TOTSV","P",60,"CRD")
9,32,N,10,2
^SCR("P1TOTSV","P",60,"HELP")

^SCR("P1TOTSV","P",60,"LMAX")
10
^SCR("P1TOTSV","P",60,"MUMPS1")

^SCR("P1TOTSV","P",60,"MUMPS2")

^SCR("P1TOTSV","P",60,"OUTPUT")

^SCR("P1TOTSV","P",60,"TYP")
N
^SCR("P1TOTSV","P",61,"CRD")
10,32,N,10,2
^SCR("P1TOTSV","P",61,"HELP")

^SCR("P1TOTSV","P",61,"LMAX")
10
^SCR("P1TOTSV","P",61,"MUMPS1")

^SCR("P1TOTSV","P",61,"MUMPS2")

^SCR("P1TOTSV","P",61,"OUTPUT")

^SCR("P1TOTSV","P",61,"TYP")
N
^SCR("P1TOTSV","P",62,"CRD")
17,10,E,8,0
^SCR("P1TOTSV","P",62,"HELP")

^SCR("P1TOTSV","P",62,"LMAX")
8
^SCR("P1TOTSV","P",62,"MUMPS1")

^SCR("P1TOTSV","P",62,"MUMPS2")

^SCR("P1TOTSV","P",62,"OUTPUT")

^SCR("P1TOTSV","P",62,"TYP")
E
^SCR("P1TOTSV","P",65,"CRD")
9,20,E,9,0
^SCR("P1TOTSV","P",65,"HELP")

^SCR("P1TOTSV","P",65,"LMAX")
9
^SCR("P1TOTSV","P",65,"MUMPS1")

^SCR("P1TOTSV","P",65,"MUMPS2")

^SCR("P1TOTSV","P",65,"OUTPUT")

^SCR("P1TOTSV","P",65,"TYP")
E
^SCR("P1TOTSV","P",66,"CRD")
18,10,E,8,0
^SCR("P1TOTSV","P",66,"HELP")

^SCR("P1TOTSV","P",66,"LMAX")
8
^SCR("P1TOTSV","P",66,"MUMPS1")

^SCR("P1TOTSV","P",66,"MUMPS2")

^SCR("P1TOTSV","P",66,"OUTPUT")

^SCR("P1TOTSV","P",66,"TYP")
E
^SCR("P1TOTSV","P",67,"CRD")
10,20,E,9,0
^SCR("P1TOTSV","P",67,"HELP")

^SCR("P1TOTSV","P",67,"LMAX")
9
^SCR("P1TOTSV","P",67,"MUMPS1")

^SCR("P1TOTSV","P",67,"MUMPS2")

^SCR("P1TOTSV","P",67,"OUTPUT")

^SCR("P1TOTSV","P",67,"TYP")
E
^SCR("P1TOTSV","P",70,"CRD")
11,32,N,10,2
^SCR("P1TOTSV","P",70,"HELP")

^SCR("P1TOTSV","P",70,"LMAX")
10
^SCR("P1TOTSV","P",70,"MUMPS1")

^SCR("P1TOTSV","P",70,"MUMPS2")

^SCR("P1TOTSV","P",70,"OUTPUT")

^SCR("P1TOTSV","P",70,"TYP")
N
^SCR("P1TOTSV","P",72,"CRD")
11,20,E,9,0
^SCR("P1TOTSV","P",72,"HELP")

^SCR("P1TOTSV","P",72,"LMAX")
9
^SCR("P1TOTSV","P",72,"MUMPS1")

^SCR("P1TOTSV","P",72,"MUMPS2")

^SCR("P1TOTSV","P",72,"OUTPUT")

^SCR("P1TOTSV","P",72,"TYP")
E
^SCR("P1TOTSV","P",73,"CRD")
20,10,E,8,0
^SCR("P1TOTSV","P",73,"HELP")

^SCR("P1TOTSV","P",73,"LMAX")
8
^SCR("P1TOTSV","P",73,"MUMPS1")

^SCR("P1TOTSV","P",73,"MUMPS2")

^SCR("P1TOTSV","P",73,"OUTPUT")

^SCR("P1TOTSV","P",73,"TYP")
E
^SCR("P1TOTSV","P",75,"CRD")
12,32,N,10,2
^SCR("P1TOTSV","P",75,"HELP")

^SCR("P1TOTSV","P",75,"LMAX")
10
^SCR("P1TOTSV","P",75,"MUMPS1")

^SCR("P1TOTSV","P",75,"MUMPS2")

^SCR("P1TOTSV","P",75,"OUTPUT")

^SCR("P1TOTSV","P",75,"TYP")
N
^SCR("P1TOTSV","P",77,"CRD")
21,10,E,8,0
^SCR("P1TOTSV","P",77,"HELP")

^SCR("P1TOTSV","P",77,"LMAX")
8
^SCR("P1TOTSV","P",77,"MUMPS1")

^SCR("P1TOTSV","P",77,"MUMPS2")

^SCR("P1TOTSV","P",77,"OUTPUT")

^SCR("P1TOTSV","P",77,"TYP")
E
^SCR("P1TOTSV","P",78,"CRD")
12,20,E,9,0
^SCR("P1TOTSV","P",78,"HELP")

^SCR("P1TOTSV","P",78,"LMAX")
9
^SCR("P1TOTSV","P",78,"MUMPS1")

^SCR("P1TOTSV","P",78,"MUMPS2")

^SCR("P1TOTSV","P",78,"OUTPUT")

^SCR("P1TOTSV","P",78,"TYP")
E
^SCR("P1TOTSV","P",80,"CRD")
13,32,N,10,2
^SCR("P1TOTSV","P",80,"HELP")

^SCR("P1TOTSV","P",80,"LMAX")
10
^SCR("P1TOTSV","P",80,"MUMPS1")

^SCR("P1TOTSV","P",80,"MUMPS2")

^SCR("P1TOTSV","P",80,"OUTPUT")

^SCR("P1TOTSV","P",80,"TYP")
N
^SCR("P1TOTSV","P",82,"CRD")
13,20,E,9,0
^SCR("P1TOTSV","P",82,"HELP")

^SCR("P1TOTSV","P",82,"LMAX")
9
^SCR("P1TOTSV","P",82,"MUMPS1")

^SCR("P1TOTSV","P",82,"MUMPS2")

^SCR("P1TOTSV","P",82,"OUTPUT")

^SCR("P1TOTSV","P",82,"TYP")
E
^SCR("P1TOTSV","P",83,"CRD")
14,32,N,10,2
^SCR("P1TOTSV","P",83,"HELP")

^SCR("P1TOTSV","P",83,"LMAX")
10
^SCR("P1TOTSV","P",83,"MUMPS1")

^SCR("P1TOTSV","P",83,"MUMPS2")

^SCR("P1TOTSV","P",83,"OUTPUT")

^SCR("P1TOTSV","P",83,"TYP")
N
^SCR("P1TOTSV","P",84,"CRD")
14,20,E,9,0
^SCR("P1TOTSV","P",84,"HELP")

^SCR("P1TOTSV","P",84,"LMAX")
9
^SCR("P1TOTSV","P",84,"MUMPS1")

^SCR("P1TOTSV","P",84,"MUMPS2")

^SCR("P1TOTSV","P",84,"OUTPUT")

^SCR("P1TOTSV","P",84,"TYP")
E
^SCR("P1TOTSV","P",85,"CRD")
17,20,E,9,0
^SCR("P1TOTSV","P",85,"HELP")

^SCR("P1TOTSV","P",85,"LMAX")
9
^SCR("P1TOTSV","P",85,"MUMPS1")

^SCR("P1TOTSV","P",85,"MUMPS2")

^SCR("P1TOTSV","P",85,"OUTPUT")

^SCR("P1TOTSV","P",85,"TYP")
E
^SCR("P1TOTSV","P",86,"CRD")
17,32,N,10,2
^SCR("P1TOTSV","P",86,"HELP")

^SCR("P1TOTSV","P",86,"LMAX")
10
^SCR("P1TOTSV","P",86,"MUMPS1")

^SCR("P1TOTSV","P",86,"MUMPS2")

^SCR("P1TOTSV","P",86,"OUTPUT")

^SCR("P1TOTSV","P",86,"TYP")
N
^SCR("P1TOTSV","P",87,"CRD")
20,32,N,10,2
^SCR("P1TOTSV","P",87,"HELP")

^SCR("P1TOTSV","P",87,"LMAX")
11
^SCR("P1TOTSV","P",87,"MUMPS1")

^SCR("P1TOTSV","P",87,"MUMPS2")

^SCR("P1TOTSV","P",87,"OUTPUT")

^SCR("P1TOTSV","P",87,"TYP")
N
^SCR("P1TOTSV","P",90,"CRD")
21,32,N,10,2
^SCR("P1TOTSV","P",90,"HELP")

^SCR("P1TOTSV","P",90,"LMAX")
11
^SCR("P1TOTSV","P",90,"MUMPS1")

^SCR("P1TOTSV","P",90,"MUMPS2")

^SCR("P1TOTSV","P",90,"OUTPUT")

^SCR("P1TOTSV","P",90,"TYP")
N
^SCR("P1TOTSV","P",91,"CRD")
18,32,N,10,2
^SCR("P1TOTSV","P",91,"HELP")

^SCR("P1TOTSV","P",91,"LMAX")
10
^SCR("P1TOTSV","P",91,"MUMPS1")

^SCR("P1TOTSV","P",91,"MUMPS2")

^SCR("P1TOTSV","P",91,"OUTPUT")

^SCR("P1TOTSV","P",91,"TYP")
N
^SCR("P1TOTSV","P",92,"CRD")
22,32,N,10,2
^SCR("P1TOTSV","P",92,"HELP")

^SCR("P1TOTSV","P",92,"LMAX")
11
^SCR("P1TOTSV","P",92,"MUMPS1")

^SCR("P1TOTSV","P",92,"MUMPS2")

^SCR("P1TOTSV","P",92,"OUTPUT")

^SCR("P1TOTSV","P",92,"TYP")
N
^SCR("P1TOTSV","P",93,"CRD")
20,20,E,9,0
^SCR("P1TOTSV","P",93,"HELP")

^SCR("P1TOTSV","P",93,"LMAX")
9
^SCR("P1TOTSV","P",93,"MUMPS1")

^SCR("P1TOTSV","P",93,"MUMPS2")

^SCR("P1TOTSV","P",93,"OUTPUT")

^SCR("P1TOTSV","P",93,"TYP")
E
^SCR("P1TOTSV","P",94,"CRD")
22,20,E,9,0
^SCR("P1TOTSV","P",94,"HELP")

^SCR("P1TOTSV","P",94,"LMAX")
9
^SCR("P1TOTSV","P",94,"MUMPS1")

^SCR("P1TOTSV","P",94,"MUMPS2")

^SCR("P1TOTSV","P",94,"OUTPUT")

^SCR("P1TOTSV","P",94,"TYP")
E
^SCR("P1TOTSV","P",95,"CRD")
18,20,E,9,0
^SCR("P1TOTSV","P",95,"HELP")

^SCR("P1TOTSV","P",95,"LMAX")
9
^SCR("P1TOTSV","P",95,"MUMPS1")

^SCR("P1TOTSV","P",95,"MUMPS2")

^SCR("P1TOTSV","P",95,"OUTPUT")

^SCR("P1TOTSV","P",95,"TYP")
E
^SCR("P1TOTSV","P",96,"CRD")
22,10,E,8,0
^SCR("P1TOTSV","P",96,"HELP")

^SCR("P1TOTSV","P",96,"LMAX")
8
^SCR("P1TOTSV","P",96,"MUMPS1")

^SCR("P1TOTSV","P",96,"MUMPS2")

^SCR("P1TOTSV","P",96,"OUTPUT")

^SCR("P1TOTSV","P",96,"TYP")
E
^SCR("P1TOTSV","P",97,"CRD")
21,20,E,9,0
^SCR("P1TOTSV","P",97,"HELP")

^SCR("P1TOTSV","P",97,"LMAX")
9
^SCR("P1TOTSV","P",97,"MUMPS1")

^SCR("P1TOTSV","P",97,"MUMPS2")

^SCR("P1TOTSV","P",97,"OUTPUT")

^SCR("P1TOTSV","P",97,"TYP")
E
^SCR("P1TOTSV","P","NAME","AEX")
26
^SCR("P1TOTSV","P","NAME","AEXA")
49
^SCR("P1TOTSV","P","NAME","AEXS")
84
^SCR("P1TOTSV","P","NAME","ALPHA")
29
^SCR("P1TOTSV","P","NAME","ALPHAA")
47
^SCR("P1TOTSV","P","NAME","ALPHAS")
44
^SCR("P1TOTSV","P","NAME","ASR")
12
^SCR("P1TOTSV","P","NAME","ASRA")
66
^SCR("P1TOTSV","P","NAME","ASRS")
95
^SCR("P1TOTSV","P","NAME","CAS")
38
^SCR("P1TOTSV","P","NAME","CASA")
96
^SCR("P1TOTSV","P","NAME","CASS")
94
^SCR("P1TOTSV","P","NAME","CHKM")
11
^SCR("P1TOTSV","P","NAME","CHKMA")
36
^SCR("P1TOTSV","P","NAME","CHKMS")
67
^SCR("P1TOTSV","P","NAME","CHKO")
10
^SCR("P1TOTSV","P","NAME","CHKOA")
34
^SCR("P1TOTSV","P","NAME","CHKOS")
65
^SCR("P1TOTSV","P","NAME","DNR")
25
^SCR("P1TOTSV","P","NAME","DNRA")
46
^SCR("P1TOTSV","P","NAME","DNRS")
82
^SCR("P1TOTSV","P","NAME","HAEX")
83
^SCR("P1TOTSV","P","NAME","HALPHA")
40
^SCR("P1TOTSV","P","NAME","HASR")
91
^SCR("P1TOTSV","P","NAME","HCAS")
92
^SCR("P1TOTSV","P","NAME","HCHKM")
61
^SCR("P1TOTSV","P","NAME","HCHKO")
60
^SCR("P1TOTSV","P","NAME","HDNR")
80
^SCR("P1TOTSV","P","NAME","HISR")
70
^SCR("P1TOTSV","P","NAME","HJCB")
16
^SCR("P1TOTSV","P","NAME","HMZM")
55
^SCR("P1TOTSV","P","NAME","HSAH")
87
^SCR("P1TOTSV","P","NAME","HSHUM")
90
^SCR("P1TOTSV","P","NAME","HTIP")
86
^SCR("P1TOTSV","P","NAME","HVIZ")
75
^SCR("P1TOTSV","P","NAME","ISR")
15
^SCR("P1TOTSV","P","NAME","ISRA")
39
^SCR("P1TOTSV","P","NAME","ISRS")
72
^SCR("P1TOTSV","P","NAME","JCB")
27
^SCR("P1TOTSV","P","NAME","JCBA")
19
^SCR("P1TOTSV","P","NAME","JCBS")
18
^SCR("P1TOTSV","P","NAME","MM10")
2
^SCR("P1TOTSV","P","NAME","MM11")
3
^SCR("P1TOTSV","P","NAME","MM20")
7
^SCR("P1TOTSV","P","NAME","MM21")
8
^SCR("P1TOTSV","P","NAME","MZM")
9
^SCR("P1TOTSV","P","NAME","MZMA")
31
^SCR("P1TOTSV","P","NAME","MZMS")
58
^SCR("P1TOTSV","P","NAME","SAH")
32
^SCR("P1TOTSV","P","NAME","SAHA")
73
^SCR("P1TOTSV","P","NAME","SAHS")
93
^SCR("P1TOTSV","P","NAME","SHUM")
35
^SCR("P1TOTSV","P","NAME","SHUMA")
77
^SCR("P1TOTSV","P","NAME","SHUMS")
97
^SCR("P1TOTSV","P","NAME","TIP")
28
^SCR("P1TOTSV","P","NAME","TIPA")
62
^SCR("P1TOTSV","P","NAME","TIPPS")
30
^SCR("P1TOTSV","P","NAME","TIPS")
85
^SCR("P1TOTSV","P","NAME","VIZ")
20
^SCR("P1TOTSV","P","NAME","VIZA")
43
^SCR("P1TOTSV","P","NAME","VIZS")
78
^SCR("P1TOTSV","P","NAME","YY1")
1
^SCR("P1TOTSV","P","NAME","YY2")
6
^SCR("P1TOTSV","P","NM",1)
YY1
^SCR("P1TOTSV","P","NM",2)
MM10
^SCR("P1TOTSV","P","NM",3)
MM11
^SCR("P1TOTSV","P","NM",6)
YY2
^SCR("P1TOTSV","P","NM",7)
MM20
^SCR("P1TOTSV","P","NM",8)
MM21
^SCR("P1TOTSV","P","NM",9)
MZM
^SCR("P1TOTSV","P","NM",10)
CHKO
^SCR("P1TOTSV","P","NM",11)
CHKM
^SCR("P1TOTSV","P","NM",12)
ASR
^SCR("P1TOTSV","P","NM",15)
ISR
^SCR("P1TOTSV","P","NM",16)
HJCB
^SCR("P1TOTSV","P","NM",18)
JCBS
^SCR("P1TOTSV","P","NM",19)
JCBA
^SCR("P1TOTSV","P","NM",20)
VIZ
^SCR("P1TOTSV","P","NM",25)
DNR
^SCR("P1TOTSV","P","NM",26)
AEX
^SCR("P1TOTSV","P","NM",27)
JCB
^SCR("P1TOTSV","P","NM",28)
TIP
^SCR("P1TOTSV","P","NM",29)
ALPHA
^SCR("P1TOTSV","P","NM",30)
TIPPS
^SCR("P1TOTSV","P","NM",31)
MZMA
^SCR("P1TOTSV","P","NM",32)
SAH
^SCR("P1TOTSV","P","NM",34)
CHKOA
^SCR("P1TOTSV","P","NM",35)
SHUM
^SCR("P1TOTSV","P","NM",36)
CHKMA
^SCR("P1TOTSV","P","NM",38)
CAS
^SCR("P1TOTSV","P","NM",39)
ISRA
^SCR("P1TOTSV","P","NM",40)
HALPHA
^SCR("P1TOTSV","P","NM",43)
VIZA
^SCR("P1TOTSV","P","NM",44)
ALPHAS
^SCR("P1TOTSV","P","NM",46)
DNRA
^SCR("P1TOTSV","P","NM",47)
ALPHAA
^SCR("P1TOTSV","P","NM",49)
AEXA
^SCR("P1TOTSV","P","NM",55)
HMZM
^SCR("P1TOTSV","P","NM",58)
MZMS
^SCR("P1TOTSV","P","NM",60)
HCHKO
^SCR("P1TOTSV","P","NM",61)
HCHKM
^SCR("P1TOTSV","P","NM",62)
TIPA
^SCR("P1TOTSV","P","NM",65)
CHKOS
^SCR("P1TOTSV","P","NM",66)
ASRA
^SCR("P1TOTSV","P","NM",67)
CHKMS
^SCR("P1TOTSV","P","NM",70)
HISR
^SCR("P1TOTSV","P","NM",72)
ISRS
^SCR("P1TOTSV","P","NM",73)
SAHA
^SCR("P1TOTSV","P","NM",75)
HVIZ
^SCR("P1TOTSV","P","NM",77)
SHUMA
^SCR("P1TOTSV","P","NM",78)
VIZS
^SCR("P1TOTSV","P","NM",80)
HDNR
^SCR("P1TOTSV","P","NM",82)
DNRS
^SCR("P1TOTSV","P","NM",83)
HAEX
^SCR("P1TOTSV","P","NM",84)
AEXS
^SCR("P1TOTSV","P","NM",85)
TIPS
^SCR("P1TOTSV","P","NM",86)
HTIP
^SCR("P1TOTSV","P","NM",87)
HSAH
^SCR("P1TOTSV","P","NM",90)
HSHUM
^SCR("P1TOTSV","P","NM",91)
HASR
^SCR("P1TOTSV","P","NM",92)
HCAS
^SCR("P1TOTSV","P","NM",93)
SAHS
^SCR("P1TOTSV","P","NM",94)
CASS
^SCR("P1TOTSV","P","NM",95)
ASRS
^SCR("P1TOTSV","P","NM",96)
CASA
^SCR("P1TOTSV","P","NM",97)
SHUMS
^SCR("P1TOTW")
H
^SCR("P1TOTW",1)
                       {02     }:jix`z cr  {01      }:jix`zn                   
^SCR("P1TOTW",2)
              ---------------------------------------------------              
^SCR("P1TOTW",3)
              |   k"dq  |      l a w z d  |  x k n p  |    beq  |              
^SCR("P1TOTW",4)
              ---------------------------------------------------              
^SCR("P1TOTW",5)
              {58      }|   {55        }  |  {05     }|     onefn              
^SCR("P1TOTW",6)
              {65      }|   {60        }  |  {10     }| wiy d`gnd              
^SCR("P1TOTW",7)
              {67      }|   {61        }  |  {11     }| 'fn d`gnd              
^SCR("P1TOTW",8)
              {72      }|   {70        }  |  {15     }|   hxk`xyi              
^SCR("P1TOTW",9)
              {78      }|   {75        }  |  {20     }|      dfie              
^SCR("P1TOTW",10)
              {82      }|   {80        }  |  {25     }|    qxpiic              
^SCR("P1TOTW",11)
              {84      }|   {83        }  |  {26     }|       AEX              
^SCR("P1TOTW",12)
              {33      }|   {32        }  |  {31     }|       JCB              
^SCR("P1TOTW",13)
              {37      }|   {36        }  |  {34     }|cx`w ine`l              
^SCR("P1TOTW",14)
              {85      }|                 |  {28     }| {     30}              
^SCR("P1TOTW",15)
              ----------------------------------------------------             
^SCR("P1TOTW",16)
  : `"k xcey  {97      }|   {90        }  | {35      }| ehp oeict              
^SCR("P1TOTW",17)
 {87       } {95       }| `"k k"dq           {49     }|      n"rn              
^SCR("P1TOTW",18)
 {14        : zexiknd k"dq  {13      } :yelz {12     }: dtwda zepnfd           
^SCR("P1TOTW",19)
 {                                                               91}           
^SCR("P1TOTW",20)
 {                                                               92}           
^SCR("P1TOTW",21)
  {93  } micreq 'qn  {45     } :miekif {43     }: qeaiq zegpd  {40     }: zegpd
^SCR("P1TOTW",22)
  {              96}  {47     } : zexy inc   {42     }: mihixt zexikn          
^SCR("P1TOTW",23)
       {98       } : dgha`  {54     } :{     53}   {50     }: milehia          
^SCR("P1TOTW","A",1)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("P1TOTW","A",2)
---------------------------------------------------
^SCR("P1TOTW","A",3)
|‹"„‘|Œ�—š„|˜‹Ž�|‚…‘|
^SCR("P1TOTW","A",4)
---------------------------------------------------
^SCR("P1TOTW","A",5)
|||�Ž…†Ž
^SCR("P1TOTW","A",6)
|||—‰™„€‡Ž„
^SCR("P1TOTW","A",7)
|||'†Ž„€‡Ž„
^SCR("P1TOTW","A",8)
|||ˆ˜‹€˜™‰
^SCR("P1TOTW","A",9)
|||„†‰…
^SCR("P1TOTW","A",10)
|||‘˜�‰‰ƒ
^SCR("P1TOTW","A",11)
|||AEX
^SCR("P1TOTW","A",12)
|||JCB
^SCR("P1TOTW","A",13)
|||ƒ˜€—‰Ž…€Œ
^SCR("P1TOTW","A",14)
|||
^SCR("P1TOTW","A",15)
----------------------------------------------------
^SCR("P1TOTW","A",16)
:€"‹˜ƒ…™|||…ˆ��…‰ƒ”
^SCR("P1TOTW","A",17)
|€"‹‹"„‘|Ž"’Ž
^SCR("P1TOTW","A",18)
:š…˜‰‹Ž„‹"„‘:™…Œš:„”—„�š…�Ž†„
^SCR("P1TOTW","A",19)

^SCR("P1TOTW","A",20)

^SCR("P1TOTW","A",21)
�‰ƒ’…‘'‘Ž:�‰…‹‰†:‘…�‰‘š…‡�„:š…‡�„
^SCR("P1TOTW","A",22)
:š…˜™‰Žƒ:�‰ˆ‰˜”š…˜‰‹Ž
^SCR("P1TOTW","A",23)
:„‡ˆ�€::�‰Œ…ˆ‰�
^SCR("P1TOTW","AV",1)
:lhrt,sg:lhrt,n
^SCR("P1TOTW","AV",2)
---------------------------------------------------
^SCR("P1TOTW","AV",3)
|f"vx|kce,v|rfnb|dux|
^SCR("P1TOTW","AV",4)
---------------------------------------------------
^SCR("P1TOTW","AV",5)
|||inuzn
^SCR("P1TOTW","AV",6)
|||ehavtjnv
^SCR("P1TOTW","AV",7)
|||wznvtjnv
^SCR("P1TOTW","AV",8)
|||yrftrah
^SCR("P1TOTW","AV",9)
|||vzhu
^SCR("P1TOTW","AV",10)
|||xrbhhs
^SCR("P1TOTW","AV",11)
|||AEX
^SCR("P1TOTW","AV",12)
|||JCB
^SCR("P1TOTW","AV",13)
|||srtehnutk
^SCR("P1TOTW","AV",14)
|||
^SCR("P1TOTW","AV",15)
----------------------------------------------------
^SCR("P1TOTW","AV",16)
:t"frsua|||uybiuhsp
^SCR("P1TOTW","AV",17)
|t"ff"vx|n"gn
^SCR("P1TOTW","AV",18)
:,urhfnvf"vx:auk,:vpevc,ubnzv
^SCR("P1TOTW","AV",19)

^SCR("P1TOTW","AV",20)

^SCR("P1TOTW","AV",21)
ohsguxwxn:ohufhz:xuchx,ujbv:,ujbv
^SCR("P1TOTW","AV",22)
:,urahns:ohyhrp,urhfn
^SCR("P1TOTW","AV",23)
:vjyct::ohkuyhc
^SCR("P1TOTW","NAME")

^SCR("P1TOTW","P",1,"CRD")
1,43,D,8,0
^SCR("P1TOTW","P",1,"HELP")

^SCR("P1TOTW","P",1,"LMAX")
9
^SCR("P1TOTW","P",1,"MUMPS1")

^SCR("P1TOTW","P",1,"MUMPS2")

^SCR("P1TOTW","P",1,"MUST")

^SCR("P1TOTW","P",1,"TYP")
D
^SCR("P1TOTW","P",2,"CRD")
1,23,D,8,0
^SCR("P1TOTW","P",2,"HELP")

^SCR("P1TOTW","P",2,"LMAX")
8
^SCR("P1TOTW","P",2,"MUMPS1")
I $G(DAT2)?.P S DAT2=DAT1
^SCR("P1TOTW","P",2,"MUMPS2")
I $$^%L1DC(DAT2,3)<$$^%L1DC(DAT1,3) S %SC("ER")=1
^SCR("P1TOTW","P",2,"MUST")

^SCR("P1TOTW","P",2,"TYP")
D
^SCR("P1TOTW","P",5,"CRD")
5,45,N,8,2
^SCR("P1TOTW","P",5,"HELP")

^SCR("P1TOTW","P",5,"LMAX")
8
^SCR("P1TOTW","P",5,"MUMPS1")

^SCR("P1TOTW","P",5,"MUMPS2")

^SCR("P1TOTW","P",5,"OUTPUT")

^SCR("P1TOTW","P",5,"TYP")
N
^SCR("P1TOTW","P",10,"CRD")
6,45,N,8,2
^SCR("P1TOTW","P",10,"HELP")

^SCR("P1TOTW","P",10,"LMAX")
8
^SCR("P1TOTW","P",10,"MUMPS1")

^SCR("P1TOTW","P",10,"MUMPS2")

^SCR("P1TOTW","P",10,"OUTPUT")

^SCR("P1TOTW","P",10,"TYP")
N
^SCR("P1TOTW","P",11,"CRD")
7,45,N,8,2
^SCR("P1TOTW","P",11,"HELP")

^SCR("P1TOTW","P",11,"LMAX")
8
^SCR("P1TOTW","P",11,"MUMPS1")

^SCR("P1TOTW","P",11,"MUMPS2")

^SCR("P1TOTW","P",11,"OUTPUT")

^SCR("P1TOTW","P",11,"TYP")
N
^SCR("P1TOTW","P",12,"CRD")
18,45,N,8,2
^SCR("P1TOTW","P",12,"HELP")

^SCR("P1TOTW","P",12,"LMAX")
8
^SCR("P1TOTW","P",12,"MUMPS1")

^SCR("P1TOTW","P",12,"MUMPS2")

^SCR("P1TOTW","P",12,"OUTPUT")

^SCR("P1TOTW","P",12,"TYP")
N
^SCR("P1TOTW","P",13,"CRD")
18,28,N,8,2
^SCR("P1TOTW","P",13,"HELP")

^SCR("P1TOTW","P",13,"LMAX")
9
^SCR("P1TOTW","P",13,"MUMPS1")

^SCR("P1TOTW","P",13,"MUMPS2")

^SCR("P1TOTW","P",13,"OUTPUT")

^SCR("P1TOTW","P",13,"TYP")
N
^SCR("P1TOTW","P",14,"CRD")
18,1,N,10,2
^SCR("P1TOTW","P",14,"HELP")

^SCR("P1TOTW","P",14,"LMAX")
11
^SCR("P1TOTW","P",14,"MUMPS1")

^SCR("P1TOTW","P",14,"MUMPS2")

^SCR("P1TOTW","P",14,"OUTPUT")

^SCR("P1TOTW","P",14,"TYP")
N
^SCR("P1TOTW","P",15,"CRD")
8,45,N,8,2
^SCR("P1TOTW","P",15,"HELP")

^SCR("P1TOTW","P",15,"LMAX")
8
^SCR("P1TOTW","P",15,"MUMPS1")

^SCR("P1TOTW","P",15,"MUMPS2")

^SCR("P1TOTW","P",15,"OUTPUT")

^SCR("P1TOTW","P",15,"TYP")
N
^SCR("P1TOTW","P",20,"CRD")
9,45,N,8,2
^SCR("P1TOTW","P",20,"HELP")

^SCR("P1TOTW","P",20,"LMAX")
8
^SCR("P1TOTW","P",20,"MUMPS1")

^SCR("P1TOTW","P",20,"MUMPS2")

^SCR("P1TOTW","P",20,"OUTPUT")

^SCR("P1TOTW","P",20,"TYP")
N
^SCR("P1TOTW","P",25,"CRD")
10,45,N,8,2
^SCR("P1TOTW","P",25,"HELP")

^SCR("P1TOTW","P",25,"LMAX")
8
^SCR("P1TOTW","P",25,"MUMPS1")

^SCR("P1TOTW","P",25,"MUMPS2")

^SCR("P1TOTW","P",25,"OUTPUT")

^SCR("P1TOTW","P",25,"TYP")
N
^SCR("P1TOTW","P",26,"CRD")
11,45,N,8,2
^SCR("P1TOTW","P",26,"HELP")

^SCR("P1TOTW","P",26,"LMAX")
8
^SCR("P1TOTW","P",26,"MUMPS1")

^SCR("P1TOTW","P",26,"MUMPS2")

^SCR("P1TOTW","P",26,"OUTPUT")

^SCR("P1TOTW","P",26,"TYP")
N
^SCR("P1TOTW","P",28,"CRD")
14,45,N,8,2
^SCR("P1TOTW","P",28,"HELP")

^SCR("P1TOTW","P",28,"LMAX")
8
^SCR("P1TOTW","P",28,"MUMPS1")

^SCR("P1TOTW","P",28,"MUMPS2")

^SCR("P1TOTW","P",28,"TYP")
N
^SCR("P1TOTW","P",30,"CRD")
14,65,H,4
^SCR("P1TOTW","P",30,"HELP")

^SCR("P1TOTW","P",30,"LMAX")
8
^SCR("P1TOTW","P",30,"MUMPS1")

^SCR("P1TOTW","P",30,"MUMPS2")

^SCR("P1TOTW","P",30,"OUTPUT")

^SCR("P1TOTW","P",30,"TYP")
H
^SCR("P1TOTW","P",31,"CRD")
12,45,N,8,2
^SCR("P1TOTW","P",31,"HELP")

^SCR("P1TOTW","P",31,"LMAX")
8
^SCR("P1TOTW","P",31,"MUMPS1")

^SCR("P1TOTW","P",31,"MUMPS2")

^SCR("P1TOTW","P",31,"OUTPUT")

^SCR("P1TOTW","P",31,"TYP")
N
^SCR("P1TOTW","P",32,"CRD")
12,28,N,8,2
^SCR("P1TOTW","P",32,"HELP")

^SCR("P1TOTW","P",32,"LMAX")
11
^SCR("P1TOTW","P",32,"MUMPS1")

^SCR("P1TOTW","P",32,"MUMPS2")

^SCR("P1TOTW","P",32,"OUTPUT")

^SCR("P1TOTW","P",32,"TYP")
N
^SCR("P1TOTW","P",33,"CRD")
12,14,N,9,2
^SCR("P1TOTW","P",33,"HELP")

^SCR("P1TOTW","P",33,"LMAX")
9
^SCR("P1TOTW","P",33,"MUMPS1")

^SCR("P1TOTW","P",33,"MUMPS2")

^SCR("P1TOTW","P",33,"OUTPUT")

^SCR("P1TOTW","P",33,"TYP")
N
^SCR("P1TOTW","P",34,"CRD")
13,45,N,8,2
^SCR("P1TOTW","P",34,"HELP")

^SCR("P1TOTW","P",34,"LMAX")
8
^SCR("P1TOTW","P",34,"MUMPS1")

^SCR("P1TOTW","P",34,"MUMPS2")

^SCR("P1TOTW","P",34,"OUTPUT")

^SCR("P1TOTW","P",34,"TYP")
N
^SCR("P1TOTW","P",35,"CRD")
16,44,N,9,2
^SCR("P1TOTW","P",35,"HELP")

^SCR("P1TOTW","P",35,"LMAX")
9
^SCR("P1TOTW","P",35,"MUMPS1")

^SCR("P1TOTW","P",35,"MUMPS2")

^SCR("P1TOTW","P",35,"OUTPUT")

^SCR("P1TOTW","P",35,"TYP")
N
^SCR("P1TOTW","P",36,"CRD")
13,28,N,9,2
^SCR("P1TOTW","P",36,"HELP")

^SCR("P1TOTW","P",36,"LMAX")
11
^SCR("P1TOTW","P",36,"MUMPS1")

^SCR("P1TOTW","P",36,"MUMPS2")

^SCR("P1TOTW","P",36,"OUTPUT")

^SCR("P1TOTW","P",36,"TYP")
N
^SCR("P1TOTW","P",37,"CRD")
13,14,N,9,2
^SCR("P1TOTW","P",37,"HELP")

^SCR("P1TOTW","P",37,"LMAX")
9
^SCR("P1TOTW","P",37,"MUMPS1")

^SCR("P1TOTW","P",37,"MUMPS2")

^SCR("P1TOTW","P",37,"OUTPUT")

^SCR("P1TOTW","P",37,"TYP")
N
^SCR("P1TOTW","P",40,"CRD")
21,63,N,8,2
^SCR("P1TOTW","P",40,"HELP")

^SCR("P1TOTW","P",40,"LMAX")
8
^SCR("P1TOTW","P",40,"MUMPS1")

^SCR("P1TOTW","P",40,"MUMPS2")

^SCR("P1TOTW","P",40,"OUTPUT")

^SCR("P1TOTW","P",40,"TYP")
N
^SCR("P1TOTW","P",42,"CRD")
22,45,N,8,2
^SCR("P1TOTW","P",42,"HELP")

^SCR("P1TOTW","P",42,"LMAX")
8
^SCR("P1TOTW","P",42,"MUMPS1")

^SCR("P1TOTW","P",42,"MUMPS2")

^SCR("P1TOTW","P",42,"OUTPUT")

^SCR("P1TOTW","P",42,"TYP")
N
^SCR("P1TOTW","P",43,"CRD")
21,39,N,8,2
^SCR("P1TOTW","P",43,"HELP")

^SCR("P1TOTW","P",43,"LMAX")
8
^SCR("P1TOTW","P",43,"MUMPS1")

^SCR("P1TOTW","P",43,"MUMPS2")

^SCR("P1TOTW","P",43,"OUTPUT")

^SCR("P1TOTW","P",43,"TYP")
N
^SCR("P1TOTW","P",45,"CRD")
21,21,N,8,2
^SCR("P1TOTW","P",45,"HELP")

^SCR("P1TOTW","P",45,"LMAX")
8
^SCR("P1TOTW","P",45,"MUMPS1")

^SCR("P1TOTW","P",45,"MUMPS2")

^SCR("P1TOTW","P",45,"OUTPUT")

^SCR("P1TOTW","P",45,"TYP")
N
^SCR("P1TOTW","P",47,"CRD")
22,22,N,8,2
^SCR("P1TOTW","P",47,"HELP")

^SCR("P1TOTW","P",47,"LMAX")
8
^SCR("P1TOTW","P",47,"MUMPS1")

^SCR("P1TOTW","P",47,"MUMPS2")

^SCR("P1TOTW","P",47,"OUTPUT")

^SCR("P1TOTW","P",47,"TYP")
N
^SCR("P1TOTW","P",49,"CRD")
17,45,N,8,2
^SCR("P1TOTW","P",49,"HELP")

^SCR("P1TOTW","P",49,"LMAX")
8
^SCR("P1TOTW","P",49,"MUMPS1")

^SCR("P1TOTW","P",49,"MUMPS2")

^SCR("P1TOTW","P",49,"OUTPUT")

^SCR("P1TOTW","P",49,"TYP")
N
^SCR("P1TOTW","P",50,"CRD")
23,51,N,8,2
^SCR("P1TOTW","P",50,"HELP")

^SCR("P1TOTW","P",50,"LMAX")
8
^SCR("P1TOTW","P",50,"MUMPS1")

^SCR("P1TOTW","P",50,"MUMPS2")

^SCR("P1TOTW","P",50,"OUTPUT")

^SCR("P1TOTW","P",50,"TYP")
N
^SCR("P1TOTW","P",53,"CRD")
23,48,H,8
^SCR("P1TOTW","P",53,"HELP")

^SCR("P1TOTW","P",53,"LMAX")
8
^SCR("P1TOTW","P",53,"MUMPS1")

^SCR("P1TOTW","P",53,"MUMPS2")

^SCR("P1TOTW","P",53,"OUTPUT")

^SCR("P1TOTW","P",53,"TYP")
H
^SCR("P1TOTW","P",54,"CRD")
23,28,N,8,2
^SCR("P1TOTW","P",54,"HELP")

^SCR("P1TOTW","P",54,"LMAX")
8
^SCR("P1TOTW","P",54,"MUMPS1")

^SCR("P1TOTW","P",54,"MUMPS2")

^SCR("P1TOTW","P",54,"OUTPUT")

^SCR("P1TOTW","P",54,"TYP")
N
^SCR("P1TOTW","P",55,"CRD")
5,28,N,8,2
^SCR("P1TOTW","P",55,"HELP")

^SCR("P1TOTW","P",55,"LMAX")
11
^SCR("P1TOTW","P",55,"MUMPS1")

^SCR("P1TOTW","P",55,"MUMPS2")

^SCR("P1TOTW","P",55,"OUTPUT")

^SCR("P1TOTW","P",55,"TYP")
N
^SCR("P1TOTW","P",58,"CRD")
5,14,N,9,2
^SCR("P1TOTW","P",58,"HELP")

^SCR("P1TOTW","P",58,"LMAX")
9
^SCR("P1TOTW","P",58,"MUMPS1")

^SCR("P1TOTW","P",58,"MUMPS2")

^SCR("P1TOTW","P",58,"OUTPUT")

^SCR("P1TOTW","P",58,"TYP")
N
^SCR("P1TOTW","P",60,"CRD")
6,28,N,8,2
^SCR("P1TOTW","P",60,"HELP")

^SCR("P1TOTW","P",60,"LMAX")
11
^SCR("P1TOTW","P",60,"MUMPS1")

^SCR("P1TOTW","P",60,"MUMPS2")

^SCR("P1TOTW","P",60,"OUTPUT")

^SCR("P1TOTW","P",60,"TYP")
N
^SCR("P1TOTW","P",61,"CRD")
7,28,N,8,2
^SCR("P1TOTW","P",61,"HELP")

^SCR("P1TOTW","P",61,"LMAX")
11
^SCR("P1TOTW","P",61,"MUMPS1")

^SCR("P1TOTW","P",61,"MUMPS2")

^SCR("P1TOTW","P",61,"OUTPUT")

^SCR("P1TOTW","P",61,"TYP")
N
^SCR("P1TOTW","P",65,"CRD")
6,14,N,9,2
^SCR("P1TOTW","P",65,"HELP")

^SCR("P1TOTW","P",65,"LMAX")
9
^SCR("P1TOTW","P",65,"MUMPS1")

^SCR("P1TOTW","P",65,"MUMPS2")

^SCR("P1TOTW","P",65,"OUTPUT")

^SCR("P1TOTW","P",65,"TYP")
N
^SCR("P1TOTW","P",67,"CRD")
7,14,N,9,2
^SCR("P1TOTW","P",67,"HELP")

^SCR("P1TOTW","P",67,"LMAX")
9
^SCR("P1TOTW","P",67,"MUMPS1")

^SCR("P1TOTW","P",67,"MUMPS2")

^SCR("P1TOTW","P",67,"TYP")
N
^SCR("P1TOTW","P",70,"CRD")
8,28,N,8,2
^SCR("P1TOTW","P",70,"HELP")

^SCR("P1TOTW","P",70,"LMAX")
11
^SCR("P1TOTW","P",70,"MUMPS1")

^SCR("P1TOTW","P",70,"MUMPS2")

^SCR("P1TOTW","P",70,"OUTPUT")

^SCR("P1TOTW","P",70,"TYP")
N
^SCR("P1TOTW","P",72,"CRD")
8,14,N,9,2
^SCR("P1TOTW","P",72,"HELP")

^SCR("P1TOTW","P",72,"LMAX")
9
^SCR("P1TOTW","P",72,"MUMPS1")

^SCR("P1TOTW","P",72,"MUMPS2")

^SCR("P1TOTW","P",72,"OUTPUT")

^SCR("P1TOTW","P",72,"TYP")
N
^SCR("P1TOTW","P",75,"CRD")
9,28,N,8,2
^SCR("P1TOTW","P",75,"HELP")

^SCR("P1TOTW","P",75,"LMAX")
11
^SCR("P1TOTW","P",75,"MUMPS1")

^SCR("P1TOTW","P",75,"MUMPS2")

^SCR("P1TOTW","P",75,"OUTPUT")

^SCR("P1TOTW","P",75,"TYP")
N
^SCR("P1TOTW","P",78,"CRD")
9,14,N,9,2
^SCR("P1TOTW","P",78,"HELP")

^SCR("P1TOTW","P",78,"LMAX")
9
^SCR("P1TOTW","P",78,"MUMPS1")

^SCR("P1TOTW","P",78,"MUMPS2")

^SCR("P1TOTW","P",78,"OUTPUT")

^SCR("P1TOTW","P",78,"TYP")
N
^SCR("P1TOTW","P",80,"CRD")
10,28,N,8,2
^SCR("P1TOTW","P",80,"HELP")

^SCR("P1TOTW","P",80,"LMAX")
11
^SCR("P1TOTW","P",80,"MUMPS1")

^SCR("P1TOTW","P",80,"MUMPS2")

^SCR("P1TOTW","P",80,"OUTPUT")

^SCR("P1TOTW","P",80,"TYP")
N
^SCR("P1TOTW","P",82,"CRD")
10,14,N,9,2
^SCR("P1TOTW","P",82,"HELP")

^SCR("P1TOTW","P",82,"LMAX")
9
^SCR("P1TOTW","P",82,"MUMPS1")

^SCR("P1TOTW","P",82,"MUMPS2")

^SCR("P1TOTW","P",82,"OUTPUT")

^SCR("P1TOTW","P",82,"TYP")
N
^SCR("P1TOTW","P",83,"CRD")
11,28,N,8,2
^SCR("P1TOTW","P",83,"HELP")

^SCR("P1TOTW","P",83,"LMAX")
11
^SCR("P1TOTW","P",83,"MUMPS1")

^SCR("P1TOTW","P",83,"MUMPS2")

^SCR("P1TOTW","P",83,"OUTPUT")

^SCR("P1TOTW","P",83,"TYP")
N
^SCR("P1TOTW","P",84,"CRD")
11,14,N,9,2
^SCR("P1TOTW","P",84,"HELP")

^SCR("P1TOTW","P",84,"LMAX")
9
^SCR("P1TOTW","P",84,"MUMPS1")

^SCR("P1TOTW","P",84,"MUMPS2")

^SCR("P1TOTW","P",84,"OUTPUT")

^SCR("P1TOTW","P",84,"TYP")
N
^SCR("P1TOTW","P",85,"CRD")
14,14,N,9,2
^SCR("P1TOTW","P",85,"HELP")

^SCR("P1TOTW","P",85,"LMAX")
9
^SCR("P1TOTW","P",85,"MUMPS1")

^SCR("P1TOTW","P",85,"MUMPS2")

^SCR("P1TOTW","P",85,"OUTPUT")

^SCR("P1TOTW","P",85,"TYP")
N
^SCR("P1TOTW","P",87,"CRD")
17,1,N,10,2
^SCR("P1TOTW","P",87,"HELP")

^SCR("P1TOTW","P",87,"LMAX")
10
^SCR("P1TOTW","P",87,"MUMPS1")

^SCR("P1TOTW","P",87,"MUMPS2")

^SCR("P1TOTW","P",87,"OUTPUT")

^SCR("P1TOTW","P",87,"TYP")
N
^SCR("P1TOTW","P",90,"CRD")
16,28,N,8,2
^SCR("P1TOTW","P",90,"HELP")

^SCR("P1TOTW","P",90,"LMAX")
11
^SCR("P1TOTW","P",90,"MUMPS1")

^SCR("P1TOTW","P",90,"MUMPS2")

^SCR("P1TOTW","P",90,"OUTPUT")

^SCR("P1TOTW","P",90,"TYP")
N
^SCR("P1TOTW","P",91,"CRD")
19,68,H,65
^SCR("P1TOTW","P",91,"HELP")

^SCR("P1TOTW","P",91,"LMAX")
66
^SCR("P1TOTW","P",91,"MUMPS1")

^SCR("P1TOTW","P",91,"MUMPS2")

^SCR("P1TOTW","P",91,"OUTPUT")

^SCR("P1TOTW","P",91,"TYP")
H
^SCR("P1TOTW","P",92,"CRD")
20,68,H,66
^SCR("P1TOTW","P",92,"HELP")

^SCR("P1TOTW","P",92,"LMAX")
66
^SCR("P1TOTW","P",92,"MUMPS1")

^SCR("P1TOTW","P",92,"MUMPS2")

^SCR("P1TOTW","P",92,"OUTPUT")

^SCR("P1TOTW","P",92,"TYP")
H
^SCR("P1TOTW","P",93,"CRD")
21,2,N,5,0
^SCR("P1TOTW","P",93,"HELP")

^SCR("P1TOTW","P",93,"LMAX")
5
^SCR("P1TOTW","P",93,"MUMPS1")

^SCR("P1TOTW","P",93,"MUMPS2")

^SCR("P1TOTW","P",93,"OUTPUT")

^SCR("P1TOTW","P",93,"TYP")
N
^SCR("P1TOTW","P",95,"CRD")
17,13,N,10,2
^SCR("P1TOTW","P",95,"HELP")

^SCR("P1TOTW","P",95,"LMAX")
10
^SCR("P1TOTW","P",95,"MUMPS1")

^SCR("P1TOTW","P",95,"MUMPS2")

^SCR("P1TOTW","P",95,"OUTPUT")

^SCR("P1TOTW","P",95,"TYP")
N
^SCR("P1TOTW","P",96,"CRD")
22,20,H,17
^SCR("P1TOTW","P",96,"HELP")

^SCR("P1TOTW","P",96,"LMAX")
17
^SCR("P1TOTW","P",96,"MUMPS1")

^SCR("P1TOTW","P",96,"MUMPS2")

^SCR("P1TOTW","P",96,"OUTPUT")

^SCR("P1TOTW","P",96,"TYP")
H
^SCR("P1TOTW","P",97,"CRD")
16,14,N,9,2
^SCR("P1TOTW","P",97,"HELP")

^SCR("P1TOTW","P",97,"LMAX")
9
^SCR("P1TOTW","P",97,"MUMPS1")

^SCR("P1TOTW","P",97,"MUMPS2")

^SCR("P1TOTW","P",97,"OUTPUT")

^SCR("P1TOTW","P",97,"TYP")
N
^SCR("P1TOTW","P",98,"CRD")
23,7,N,10,2
^SCR("P1TOTW","P",98,"HELP")

^SCR("P1TOTW","P",98,"LMAX")
10
^SCR("P1TOTW","P",98,"MUMPS1")

^SCR("P1TOTW","P",98,"MUMPS2")

^SCR("P1TOTW","P",98,"OUTPUT")

^SCR("P1TOTW","P",98,"TYP")
N
^SCR("P1TOTW","P","NAME","AEX")
26
^SCR("P1TOTW","P","NAME","AEXS")
84
^SCR("P1TOTW","P","NAME","ALPHA")
34
^SCR("P1TOTW","P","NAME","ALPHAS")
37
^SCR("P1TOTW","P","NAME","ASR")
12
^SCR("P1TOTW","P","NAME","BIT")
50
^SCR("P1TOTW","P","NAME","CAS")
95
^SCR("P1TOTW","P","NAME","CASHD")
87
^SCR("P1TOTW","P","NAME","CHKM")
11
^SCR("P1TOTW","P","NAME","CHKMS")
67
^SCR("P1TOTW","P","NAME","CHKO")
10
^SCR("P1TOTW","P","NAME","CHKS")
65
^SCR("P1TOTW","P","NAME","DAT1")
1
^SCR("P1TOTW","P","NAME","DAT2")
2
^SCR("P1TOTW","P","NAME","DMSHS")
47
^SCR("P1TOTW","P","NAME","DNR")
25
^SCR("P1TOTW","P","NAME","DNRS")
82
^SCR("P1TOTW","P","NAME","HAEX")
83
^SCR("P1TOTW","P","NAME","HALPHA")
36
^SCR("P1TOTW","P","NAME","HAVT")
98
^SCR("P1TOTW","P","NAME","HCHKM")
61
^SCR("P1TOTW","P","NAME","HCHKO")
60
^SCR("P1TOTW","P","NAME","HDNR")
80
^SCR("P1TOTW","P","NAME","HISR")
70
^SCR("P1TOTW","P","NAME","HJCB")
32
^SCR("P1TOTW","P","NAME","HMZM")
55
^SCR("P1TOTW","P","NAME","HNHCIB")
43
^SCR("P1TOTW","P","NAME","HNHS")
40
^SCR("P1TOTW","P","NAME","HSHUM")
90
^SCR("P1TOTW","P","NAME","HVIZ")
75
^SCR("P1TOTW","P","NAME","ISR")
15
^SCR("P1TOTW","P","NAME","ISRS")
72
^SCR("P1TOTW","P","NAME","JCB")
31
^SCR("P1TOTW","P","NAME","JCBS")
33
^SCR("P1TOTW","P","NAME","MAMS")
49
^SCR("P1TOTW","P","NAME","MIN3")
45
^SCR("P1TOTW","P","NAME","MSDAMSL")
92
^SCR("P1TOTW","P","NAME","MSDMSL")
91
^SCR("P1TOTW","P","NAME","MZM")
5
^SCR("P1TOTW","P","NAME","MZMS")
58
^SCR("P1TOTW","P","NAME","SHUM")
35
^SCR("P1TOTW","P","NAME","SHUMS")
97
^SCR("P1TOTW","P","NAME","SMHIRA")
14
^SCR("P1TOTW","P","NAME","SMSL")
96
^SCR("P1TOTW","P","NAME","SSOAD")
93
^SCR("P1TOTW","P","NAME","SUMP")
42
^SCR("P1TOTW","P","NAME","TIP")
28
^SCR("P1TOTW","P","NAME","TIP1")
54
^SCR("P1TOTW","P","NAME","TIPPS")
30
^SCR("P1TOTW","P","NAME","TIPPS1")
53
^SCR("P1TOTW","P","NAME","TIPS")
85
^SCR("P1TOTW","P","NAME","TL")
13
^SCR("P1TOTW","P","NAME","VIZ")
20
^SCR("P1TOTW","P","NAME","VIZS")
78
^SCR("P1TOTW","P","NM",1)
DAT1
^SCR("P1TOTW","P","NM",2)
DAT2
^SCR("P1TOTW","P","NM",5)
MZM
^SCR("P1TOTW","P","NM",10)
CHKO
^SCR("P1TOTW","P","NM",11)
CHKM
^SCR("P1TOTW","P","NM",12)
ASR
^SCR("P1TOTW","P","NM",13)
TL
^SCR("P1TOTW","P","NM",14)
SMHIRA
^SCR("P1TOTW","P","NM",15)
ISR
^SCR("P1TOTW","P","NM",20)
VIZ
^SCR("P1TOTW","P","NM",25)
DNR
^SCR("P1TOTW","P","NM",26)
AEX
^SCR("P1TOTW","P","NM",28)
TIP
^SCR("P1TOTW","P","NM",30)
TIPPS
^SCR("P1TOTW","P","NM",31)
JCB
^SCR("P1TOTW","P","NM",32)
HJCB
^SCR("P1TOTW","P","NM",33)
JCBS
^SCR("P1TOTW","P","NM",34)
ALPHA
^SCR("P1TOTW","P","NM",35)
SHUM
^SCR("P1TOTW","P","NM",36)
HALPHA
^SCR("P1TOTW","P","NM",37)
ALPHAS
^SCR("P1TOTW","P","NM",40)
HNHS
^SCR("P1TOTW","P","NM",42)
SUMP
^SCR("P1TOTW","P","NM",43)
HNHCIB
^SCR("P1TOTW","P","NM",45)
MIN3
^SCR("P1TOTW","P","NM",47)
DMSHS
^SCR("P1TOTW","P","NM",49)
MAMS
^SCR("P1TOTW","P","NM",50)
BIT
^SCR("P1TOTW","P","NM",53)
TIPPS1
^SCR("P1TOTW","P","NM",54)
TIP1
^SCR("P1TOTW","P","NM",55)
HMZM
^SCR("P1TOTW","P","NM",58)
MZMS
^SCR("P1TOTW","P","NM",60)
HCHKO
^SCR("P1TOTW","P","NM",61)
HCHKM
^SCR("P1TOTW","P","NM",65)
CHKS
^SCR("P1TOTW","P","NM",67)
CHKMS
^SCR("P1TOTW","P","NM",70)
HISR
^SCR("P1TOTW","P","NM",72)
ISRS
^SCR("P1TOTW","P","NM",75)
HVIZ
^SCR("P1TOTW","P","NM",78)
VIZS
^SCR("P1TOTW","P","NM",80)
HDNR
^SCR("P1TOTW","P","NM",82)
DNRS
^SCR("P1TOTW","P","NM",83)
HAEX
^SCR("P1TOTW","P","NM",84)
AEXS
^SCR("P1TOTW","P","NM",85)
TIPS
^SCR("P1TOTW","P","NM",87)
CASHD
^SCR("P1TOTW","P","NM",90)
HSHUM
^SCR("P1TOTW","P","NM",91)
MSDMSL
^SCR("P1TOTW","P","NM",92)
MSDAMSL
^SCR("P1TOTW","P","NM",93)
SSOAD
^SCR("P1TOTW","P","NM",95)
CAS
^SCR("P1TOTW","P","NM",96)
SMSL
^SCR("P1TOTW","P","NM",97)
SHUMS
^SCR("P1TOTW","P","NM",98)
HAVT
^SCR("P1TR2L")
H
^SCR("P1TR2L",1)
               # zegewl zlahl xeciydn zegewl zxard #                           
^SCR("P1TR2L",2)
                                                                   1$          
^SCR("P1TR2L",3)
                    :            gewl my           :  gewl 'qn  :              
^SCR("P1TR2L",4)
                                                                               
^SCR("P1TR2L",5)
                                                                               
^SCR("P1TR2L",6)
                                                                               
^SCR("P1TR2L",7)
                                                                               
^SCR("P1TR2L",8)
                                                                               
^SCR("P1TR2L",9)
                                                                               
^SCR("P1TR2L",10)
                                                                               
^SCR("P1TR2L",11)
                                                                               
^SCR("P1TR2L",12)
                                                                               
^SCR("P1TR2L",13)
                                                                               
^SCR("P1TR2L",14)
                                                                               
^SCR("P1TR2L",15)
                                                                               
^SCR("P1TR2L",16)
                                                                               
^SCR("P1TR2L",17)
                                                                               
^SCR("P1TR2L",18)
                                                                               
^SCR("P1TR2L",19)
                                                                               
^SCR("P1TR2L",20)
                                                                               
^SCR("P1TR2L",21)
              $1                                                               
^SCR("P1TR2L","A",1)
š…‡…—ŒšŒ�ˆŒ˜…ƒ‰™„Žš…‡…—Œš˜�’„
^SCR("P1TR2L","A",2)

^SCR("P1TR2L","A",3)
‡…—Œ�™‡…—Œ'‘Ž
^SCR("P1TR2L","A",4)
------------------------------------------
^SCR("P1TR2L","A",5)

^SCR("P1TR2L","A",6)

^SCR("P1TR2L","A",7)

^SCR("P1TR2L","A",8)

^SCR("P1TR2L","A",9)

^SCR("P1TR2L","A",10)

^SCR("P1TR2L","A",11)

^SCR("P1TR2L","A",12)

^SCR("P1TR2L","A",13)

^SCR("P1TR2L","A",14)

^SCR("P1TR2L","A",15)

^SCR("P1TR2L","A",16)

^SCR("P1TR2L","A",17)

^SCR("P1TR2L","A",18)

^SCR("P1TR2L","A",19)

^SCR("P1TR2L","A",20)

^SCR("P1TR2L","A",21)

^SCR("P1TR2L","AV",1)
,ujuek,kcykrushavn,ujuek,rcgv
^SCR("P1TR2L","AV",2)

^SCR("P1TR2L","AV",3)
juekoajuekwxn
^SCR("P1TR2L","AV",4)
------------------------------------------
^SCR("P1TR2L","AV",5)

^SCR("P1TR2L","AV",6)

^SCR("P1TR2L","AV",7)

^SCR("P1TR2L","AV",8)

^SCR("P1TR2L","AV",9)

^SCR("P1TR2L","AV",10)

^SCR("P1TR2L","AV",11)

^SCR("P1TR2L","AV",12)

^SCR("P1TR2L","AV",13)

^SCR("P1TR2L","AV",14)

^SCR("P1TR2L","AV",15)

^SCR("P1TR2L","AV",16)

^SCR("P1TR2L","AV",17)

^SCR("P1TR2L","AV",18)

^SCR("P1TR2L","AV",19)

^SCR("P1TR2L","AV",20)

^SCR("P1TR2L","AV",21)

^SCR("P1TR2L","G",1,"CRD")
4,64,E,10,0
^SCR("P1TR2L","G",1,"HELP")

^SCR("P1TR2L","G",1,"LMAX")
12
^SCR("P1TR2L","G",1,"MUMPS1")

^SCR("P1TR2L","G",1,"MUMPS2")

^SCR("P1TR2L","G",1,"OUTPUT")

^SCR("P1TR2L","G",1,"SHEM")
  gewl 'qn  
^SCR("P1TR2L","G",1,"TYP")
E
^SCR("P1TR2L","G",2,"CRD")
4,51,H,30,0
^SCR("P1TR2L","G",2,"HELP")

^SCR("P1TR2L","G",2,"LMAX")
30
^SCR("P1TR2L","G",2,"MUMPS1")

^SCR("P1TR2L","G",2,"MUMPS2")

^SCR("P1TR2L","G",2,"OUTPUT")

^SCR("P1TR2L","G",2,"SHEM")
            gewl my           
^SCR("P1TR2L","G",2,"TYP")
H
^SCR("P1TR2L","G","DEL")

^SCR("P1TR2L","G","MAX")
41
^SCR("P1TR2L","G","NAME","LKH")
1
^SCR("P1TR2L","G","NAME","LKH1")
2
^SCR("P1TR2L","G","NM",1)
LKH
^SCR("P1TR2L","G","NM",2)
LKH1
^SCR("P1TR2L","G","RB")
3,15,22,69
^SCR("P1TR2L","G","REF")
^TEMP($P
^SCR("P1TR2L","G","RZD")
\
^SCR("P1TR2L","G","STEP")
1
^SCR("P1TR2L","G","STG")
                    :            gewl my           :  gewl 'qn  :              
^SCR("P1TR2L","G","VG")
5
^SCR("P1TR2L","NAME")

^SCR("P1TR2M")
H
^SCR("P1TR2M",1)
                     # eqpkpy miknqn zniyx #                                   
^SCR("P1TR2M",2)
                                                                               
^SCR("P1TR2M",3)
                                                                             1$
^SCR("P1TR2M",4)
                 : oniq :  jix`z :          drced xe`z          :drced cew:    
^SCR("P1TR2M",5)
                 :lehia :  drced :                              :         :    
^SCR("P1TR2M",6)
                                                                               
^SCR("P1TR2M",7)
                                                                               
^SCR("P1TR2M",8)
                                                                               
^SCR("P1TR2M",9)
                                                                               
^SCR("P1TR2M",10)
                                                                               
^SCR("P1TR2M",11)
                                                                               
^SCR("P1TR2M",12)
                                                                               
^SCR("P1TR2M",13)
                                                                               
^SCR("P1TR2M",14)
                                                                               
^SCR("P1TR2M",15)
                                                                               
^SCR("P1TR2M",16)
                                                                               
^SCR("P1TR2M",17)
                                                                               
^SCR("P1TR2M",18)
                                                                               
^SCR("P1TR2M",19)
                                                                               
^SCR("P1TR2M",20)
                                                                               
^SCR("P1TR2M",21)
            $1                                                                 
^SCR("P1TR2M",22)
                                                                               
^SCR("P1TR2M","A",1)
…‘�‹�™�‰‹Ž‘ŽšŽ‰™˜
^SCR("P1TR2M","A",2)

^SCR("P1TR2M","A",3)

^SCR("P1TR2M","A",4)
�Ž‰‘Š‰˜€š„’ƒ…„˜…€š„’ƒ…„ƒ…—
^SCR("P1TR2M","A",5)
Œ…ˆ‰�„’ƒ…„
^SCR("P1TR2M","A",6)
---------------------------------------------------------
^SCR("P1TR2M","A",7)

^SCR("P1TR2M","A",8)

^SCR("P1TR2M","A",9)

^SCR("P1TR2M","A",10)

^SCR("P1TR2M","A",11)

^SCR("P1TR2M","A",12)

^SCR("P1TR2M","A",13)

^SCR("P1TR2M","A",14)

^SCR("P1TR2M","A",15)

^SCR("P1TR2M","A",16)

^SCR("P1TR2M","A",17)

^SCR("P1TR2M","A",18)

^SCR("P1TR2M","A",19)

^SCR("P1TR2M","A",20)

^SCR("P1TR2M","A",21)

^SCR("P1TR2M","A",22)

^SCR("P1TR2M","AV",1)
uxbfbaohfnxn,nhar
^SCR("P1TR2M","AV",2)

^SCR("P1TR2M","AV",3)

^SCR("P1TR2M","AV",4)
inhxlhrt,vgsuvrut,vgsuvsue
^SCR("P1TR2M","AV",5)
kuyhcvgsuv
^SCR("P1TR2M","AV",6)
---------------------------------------------------------
^SCR("P1TR2M","AV",7)

^SCR("P1TR2M","AV",8)

^SCR("P1TR2M","AV",9)

^SCR("P1TR2M","AV",10)

^SCR("P1TR2M","AV",11)

^SCR("P1TR2M","AV",12)

^SCR("P1TR2M","AV",13)

^SCR("P1TR2M","AV",14)

^SCR("P1TR2M","AV",15)

^SCR("P1TR2M","AV",16)

^SCR("P1TR2M","AV",17)

^SCR("P1TR2M","AV",18)

^SCR("P1TR2M","AV",19)

^SCR("P1TR2M","AV",20)

^SCR("P1TR2M","AV",21)

^SCR("P1TR2M","AV",22)

^SCR("P1TR2M","G",1,"CRD")
5,74,E,9,0
^SCR("P1TR2M","G",1,"HELP")
<F9> - drced okez bivdl 
^SCR("P1TR2M","G",1,"LMAX")
9
^SCR("P1TR2M","G",1,"MUMPS1")

^SCR("P1TR2M","G",1,"MUMPS2")
D MSG^P1SENDM
^SCR("P1TR2M","G",1,"OUTPUT")

^SCR("P1TR2M","G",1,"SHEM")
drced cew
^SCR("P1TR2M","G",1,"TYP")
E
^SCR("P1TR2M","G",2,"CRD")
5,64,H,30,0
^SCR("P1TR2M","G",2,"HELP")
<F10> - mixg` mihixt mr xyw 
^SCR("P1TR2M","G",2,"LMAX")
30
^SCR("P1TR2M","G",2,"MUMPS1")

^SCR("P1TR2M","G",2,"MUMPS2")

^SCR("P1TR2M","G",2,"OUTPUT")

^SCR("P1TR2M","G",2,"SHEM")
          drced xe`z          
^SCR("P1TR2M","G",2,"TYP")
H
^SCR("P1TR2M","G",3,"CRD")
5,33,D,8,0
^SCR("P1TR2M","G",3,"HELP")

^SCR("P1TR2M","G",3,"LMAX")
8
^SCR("P1TR2M","G",3,"MUMPS1")

^SCR("P1TR2M","G",3,"MUMPS2")

^SCR("P1TR2M","G",3,"OUTPUT")

^SCR("P1TR2M","G",3,"SHEM")
  jix`z 
^SCR("P1TR2M","G",3,"TYP")
D
^SCR("P1TR2M","G",4,"CRD")
5,24,E,1,0
^SCR("P1TR2M","G",4,"HELP")
<-> - lhal ,<F9> - jnqn bivdl
^SCR("P1TR2M","G",4,"LMAX")
6
^SCR("P1TR2M","G",4,"MUMPS1")

^SCR("P1TR2M","G",4,"MUMPS2")
D SIMAN^P1TR2M
^SCR("P1TR2M","G",4,"SHEM")
 oniq 
^SCR("P1TR2M","G",4,"TYP")
E
^SCR("P1TR2M","G","DEL")

^SCR("P1TR2M","G","MAX")
0
^SCR("P1TR2M","G","NAME","DATM")
3
^SCR("P1TR2M","G","NAME","MSG")
1
^SCR("P1TR2M","G","NAME","MSG1")
2
^SCR("P1TR2M","G","NAME","SIMAN")
4
^SCR("P1TR2M","G","NM",1)
MSG
^SCR("P1TR2M","G","NM",2)
MSG1
^SCR("P1TR2M","G","NM",3)
DATM
^SCR("P1TR2M","G","NM",4)
SIMAN
^SCR("P1TR2M","G","RB")
4,13,22,79
^SCR("P1TR2M","G","REF")
^TEMP($P
^SCR("P1TR2M","G","RZD")
\
^SCR("P1TR2M","G","STEP")
1
^SCR("P1TR2M","G","STG")
                 : oniq :  jix`z :          drced xe`z          :drced cew:    
^SCR("P1TR2M","G","VG")
7
^SCR("P1TR2M","NAME")
zerced uaewl E-MAIL dxard
^SCR("P1TR2P")
H
^SCR("P1TR2P",1)
          # mihixt zlahl xeciydn mihixt zxard #                                
^SCR("P1TR2P",2)
                                                                   1$          
^SCR("P1TR2P",3)
         : zqtcn xe`z : zqtcn : xign :   hixt xe`z  : hixt cew :               
^SCR("P1TR2P",4)
                                                                               
^SCR("P1TR2P",5)
                                                                               
^SCR("P1TR2P",6)
                                                                               
^SCR("P1TR2P",7)
                                                                               
^SCR("P1TR2P",8)
                                                                               
^SCR("P1TR2P",9)
                                                                               
^SCR("P1TR2P",10)
                                                                               
^SCR("P1TR2P",11)
                                                                               
^SCR("P1TR2P",12)
                                                                               
^SCR("P1TR2P",13)
                                                                               
^SCR("P1TR2P",14)
                                                                               
^SCR("P1TR2P",15)
                                                                               
^SCR("P1TR2P",16)
                                                                               
^SCR("P1TR2P",17)
                                                                               
^SCR("P1TR2P",18)
                                                                               
^SCR("P1TR2P",19)
                                                                               
^SCR("P1TR2P",20)
                                                                               
^SCR("P1TR2P",21)
      $1                                                                       
^SCR("P1TR2P","A",1)
�‰ˆ‰˜”šŒ�ˆŒ˜…ƒ‰™„Ž�‰ˆ‰˜”š˜�’„
^SCR("P1TR2P","A",2)

^SCR("P1TR2P","A",3)
š‘”ƒŽ˜…€šš‘”ƒŽ˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("P1TR2P","A",4)
-------------------------------------------------
^SCR("P1TR2P","A",5)

^SCR("P1TR2P","A",6)

^SCR("P1TR2P","A",7)

^SCR("P1TR2P","A",8)

^SCR("P1TR2P","A",9)

^SCR("P1TR2P","A",10)

^SCR("P1TR2P","A",11)

^SCR("P1TR2P","A",12)

^SCR("P1TR2P","A",13)

^SCR("P1TR2P","A",14)

^SCR("P1TR2P","A",15)

^SCR("P1TR2P","A",16)

^SCR("P1TR2P","A",17)

^SCR("P1TR2P","A",18)

^SCR("P1TR2P","A",19)

^SCR("P1TR2P","A",20)

^SCR("P1TR2P","A",21)

^SCR("P1TR2P","AV",1)
ohyhrp,kcykrushavnohyhrp,rcgv
^SCR("P1TR2P","AV",2)

^SCR("P1TR2P","AV",3)
,xpsnrut,,xpsnrhjnyhrprut,yhrpsue
^SCR("P1TR2P","AV",4)
-------------------------------------------------
^SCR("P1TR2P","AV",5)

^SCR("P1TR2P","AV",6)

^SCR("P1TR2P","AV",7)

^SCR("P1TR2P","AV",8)

^SCR("P1TR2P","AV",9)

^SCR("P1TR2P","AV",10)

^SCR("P1TR2P","AV",11)

^SCR("P1TR2P","AV",12)

^SCR("P1TR2P","AV",13)

^SCR("P1TR2P","AV",14)

^SCR("P1TR2P","AV",15)

^SCR("P1TR2P","AV",16)

^SCR("P1TR2P","AV",17)

^SCR("P1TR2P","AV",18)

^SCR("P1TR2P","AV",19)

^SCR("P1TR2P","AV",20)

^SCR("P1TR2P","AV",21)

^SCR("P1TR2P","G",1,"CRD")
4,63,E,10,0
^SCR("P1TR2P","G",1,"HELP")

^SCR("P1TR2P","G",1,"LMAX")
10
^SCR("P1TR2P","G",1,"MUMPS1")

^SCR("P1TR2P","G",1,"MUMPS2")

^SCR("P1TR2P","G",1,"OUTPUT")

^SCR("P1TR2P","G",1,"SHEM")
 hixt cew 
^SCR("P1TR2P","G",1,"TYP")
E
^SCR("P1TR2P","G",2,"CRD")
4,52,H,14,0
^SCR("P1TR2P","G",2,"HELP")

^SCR("P1TR2P","G",2,"LMAX")
14
^SCR("P1TR2P","G",2,"MUMPS1")

^SCR("P1TR2P","G",2,"MUMPS2")

^SCR("P1TR2P","G",2,"OUTPUT")

^SCR("P1TR2P","G",2,"SHEM")
   hixt xe`z  
^SCR("P1TR2P","G",2,"TYP")
H
^SCR("P1TR2P","G",3,"CRD")
4,37,N,6,2
^SCR("P1TR2P","G",3,"HELP")

^SCR("P1TR2P","G",3,"LMAX")
6
^SCR("P1TR2P","G",3,"MUMPS1")

^SCR("P1TR2P","G",3,"MUMPS2")

^SCR("P1TR2P","G",3,"OUTPUT")

^SCR("P1TR2P","G",3,"SHEM")
 xign 
^SCR("P1TR2P","G",3,"TYP")
N
^SCR("P1TR2P","G",4,"CRD")
4,30,E,7,0
^SCR("P1TR2P","G",4,"HELP")

^SCR("P1TR2P","G",4,"LMAX")
7
^SCR("P1TR2P","G",4,"MUMPS1")

^SCR("P1TR2P","G",4,"MUMPS2")
D MDP^P1TR2P
^SCR("P1TR2P","G",4,"SHEM")
 zqtcn 
^SCR("P1TR2P","G",4,"TYP")
E
^SCR("P1TR2P","G",5,"CRD")
4,22,H,12,0
^SCR("P1TR2P","G",5,"HELP")

^SCR("P1TR2P","G",5,"LMAX")
12
^SCR("P1TR2P","G",5,"MUMPS1")

^SCR("P1TR2P","G",5,"MUMPS2")

^SCR("P1TR2P","G",5,"OUTPUT")

^SCR("P1TR2P","G",5,"SHEM")
 zqtcn xe`z 
^SCR("P1TR2P","G",5,"TYP")
H
^SCR("P1TR2P","G","MAX")
2
^SCR("P1TR2P","G","NAME","MDP")
4
^SCR("P1TR2P","G","NAME","MDP1")
5
^SCR("P1TR2P","G","NAME","MH")
3
^SCR("P1TR2P","G","NAME","PAR")
1
^SCR("P1TR2P","G","NAME","PAR1")
2
^SCR("P1TR2P","G","NM",1)
PAR
^SCR("P1TR2P","G","NM",2)
PAR1
^SCR("P1TR2P","G","NM",3)
MH
^SCR("P1TR2P","G","NM",4)
MDP
^SCR("P1TR2P","G","NM",5)
MDP1
^SCR("P1TR2P","G","RB")
3,7,22,69
^SCR("P1TR2P","G","REF")
^TEMP1($P
^SCR("P1TR2P","G","RZD")
\
^SCR("P1TR2P","G","STEP")
1
^SCR("P1TR2P","G","STG")
         : zqtcn xe`z : zqtcn : xign :   hixt xe`z  : hixt cew :               
^SCR("P1TR2P","G","VG")
5
^SCR("P1TR2P","NAME")
xeciydn mihixt zxard
^SCR("P1TSF")
H
^SCR("P1TSF",1)
                                                                               
^SCR("P1TSF",2)
         {20   }:xign {                     15}:dvit my  {10      }:dvit cew   
^SCR("P1TSF",3)
                                                                               
^SCR("P1TSF",4)
                                                                          1$   
^SCR("P1TSF",5)
          : mekq :-4-:-3-:-2-:-1-:raxl xign:   ztqez xe`z    : ztqez cew :     
^SCR("P1TSF",6)
                                                                               
^SCR("P1TSF",7)
                                                                               
^SCR("P1TSF",8)
                                                                               
^SCR("P1TSF",9)
                                                                               
^SCR("P1TSF",10)
                                                                               
^SCR("P1TSF",11)
                                                                               
^SCR("P1TSF",12)
                                                                               
^SCR("P1TSF",13)
                                                                               
^SCR("P1TSF",14)
                                                                               
^SCR("P1TSF",15)
                                                                               
^SCR("P1TSF",16)
                                                                               
^SCR("P1TSF",17)
                                                                               
^SCR("P1TSF",18)
                                                                               
^SCR("P1TSF",19)
       $1                                                                      
^SCR("P1TSF",20)
         {30     }:zetqez k"dq                                                 
^SCR("P1TSF",21)
         {35     }:  dvit k"dq                                                 
^SCR("P1TSF","A",1)

^SCR("P1TSF","A",2)
:˜‰‡Ž:„–‰”�™:„–‰”ƒ…—
^SCR("P1TSF","A",3)

^SCR("P1TSF","A",4)

^SCR("P1TSF","A",5)
�…‹‘-4--3--2--1-’�˜Œ˜‰‡Žš”‘…š˜…€šš”‘…šƒ…—
^SCR("P1TSF","A",6)
-------------------------------------------------------
^SCR("P1TSF","A",7)

^SCR("P1TSF","A",8)

^SCR("P1TSF","A",9)

^SCR("P1TSF","A",10)

^SCR("P1TSF","A",11)

^SCR("P1TSF","A",12)

^SCR("P1TSF","A",13)

^SCR("P1TSF","A",14)

^SCR("P1TSF","A",15)

^SCR("P1TSF","A",16)

^SCR("P1TSF","A",17)

^SCR("P1TSF","A",18)

^SCR("P1TSF","A",19)

^SCR("P1TSF","A",20)
:š…”‘…š‹"„‘
^SCR("P1TSF","A",21)
:„–‰”‹"„‘
^SCR("P1TSF","AV",1)

^SCR("P1TSF","AV",2)
:rhjn:vmhpoa:vmhpsue
^SCR("P1TSF","AV",3)

^SCR("P1TSF","AV",4)

^SCR("P1TSF","AV",5)
oufx-4--3--2--1-gcrkrhjn,pxu,rut,,pxu,sue
^SCR("P1TSF","AV",6)
-------------------------------------------------------
^SCR("P1TSF","AV",7)

^SCR("P1TSF","AV",8)

^SCR("P1TSF","AV",9)

^SCR("P1TSF","AV",10)

^SCR("P1TSF","AV",11)

^SCR("P1TSF","AV",12)

^SCR("P1TSF","AV",13)

^SCR("P1TSF","AV",14)

^SCR("P1TSF","AV",15)

^SCR("P1TSF","AV",16)

^SCR("P1TSF","AV",17)

^SCR("P1TSF","AV",18)

^SCR("P1TSF","AV",19)

^SCR("P1TSF","AV",20)
:,upxu,f"vx
^SCR("P1TSF","AV",21)
:vmhpf"vx
^SCR("P1TSF","G",1,"CRD")
6,73,E,8,0
^SCR("P1TSF","G",1,"HELP")
<F7> - zetqez zbvd
^SCR("P1TSF","G",1,"LMAX")
11
^SCR("P1TSF","G",1,"MUMPS1")

^SCR("P1TSF","G",1,"MUMPS2")
D PAR^P1TSF
^SCR("P1TSF","G",1,"MUST")

^SCR("P1TSF","G",1,"SHEM")
 ztqez cew 
^SCR("P1TSF","G",1,"TYP")
E
^SCR("P1TSF","G",2,"CRD")
6,61,H,16,0
^SCR("P1TSF","G",2,"HELP")

^SCR("P1TSF","G",2,"LMAX")
17
^SCR("P1TSF","G",2,"MUMPS1")

^SCR("P1TSF","G",2,"MUMPS2")

^SCR("P1TSF","G",2,"OUTPUT")

^SCR("P1TSF","G",2,"SHEM")
   ztqez xe`z    
^SCR("P1TSF","G",2,"TYP")
H
^SCR("P1TSF","G",3,"CRD")
6,43,N,7,2
^SCR("P1TSF","G",3,"HELP")

^SCR("P1TSF","G",3,"LMAX")
9
^SCR("P1TSF","G",3,"MUMPS1")

^SCR("P1TSF","G",3,"MUMPS2")

^SCR("P1TSF","G",3,"OUTPUT")

^SCR("P1TSF","G",3,"SHEM")
raxl xign
^SCR("P1TSF","G",3,"TYP")
N
^SCR("P1TSF","G",4,"CRD")
6,33,E,1,0
^SCR("P1TSF","G",4,"HELP")

^SCR("P1TSF","G",4,"LMAX")
3
^SCR("P1TSF","G",4,"MUMPS1")
D TSF0^P1TSF
^SCR("P1TSF","G",4,"MUMPS2")
D TSF^P1TSF
^SCR("P1TSF","G",4,"SHEM")
-1-
^SCR("P1TSF","G",4,"TYP")
E
^SCR("P1TSF","G",5,"CRD")
6,29,E,1,0
^SCR("P1TSF","G",5,"HELP")

^SCR("P1TSF","G",5,"LMAX")
3
^SCR("P1TSF","G",5,"MUMPS1")
D TSF0^P1TSF
^SCR("P1TSF","G",5,"MUMPS2")
D TSF^P1TSF
^SCR("P1TSF","G",5,"SHEM")
-2-
^SCR("P1TSF","G",5,"TYP")
E
^SCR("P1TSF","G",6,"CRD")
6,25,E,1,0
^SCR("P1TSF","G",6,"HELP")

^SCR("P1TSF","G",6,"LMAX")
3
^SCR("P1TSF","G",6,"MUMPS1")
D TSF0^P1TSF
^SCR("P1TSF","G",6,"MUMPS2")
D TSF^P1TSF
^SCR("P1TSF","G",6,"SHEM")
-3-
^SCR("P1TSF","G",6,"TYP")
E
^SCR("P1TSF","G",7,"CRD")
6,21,E,1,0
^SCR("P1TSF","G",7,"HELP")

^SCR("P1TSF","G",7,"LMAX")
3
^SCR("P1TSF","G",7,"MUMPS1")
D TSF0^P1TSF
^SCR("P1TSF","G",7,"MUMPS2")
D TSF^P1TSF
^SCR("P1TSF","G",7,"SHEM")
-4-
^SCR("P1TSF","G",7,"TYP")
E
^SCR("P1TSF","G",8,"CRD")
6,17,N,6,2
^SCR("P1TSF","G",8,"HELP")

^SCR("P1TSF","G",8,"LMAX")
6
^SCR("P1TSF","G",8,"MUMPS1")

^SCR("P1TSF","G",8,"MUMPS2")

^SCR("P1TSF","G",8,"OUTPUT")

^SCR("P1TSF","G",8,"SHEM")
 mekq 
^SCR("P1TSF","G",8,"TYP")
N
^SCR("P1TSF","G","DEL")
Y
^SCR("P1TSF","G","MAX")
5
^SCR("P1TSF","G","NAME","KODT")
1
^SCR("P1TSF","G","NAME","MHT")
3
^SCR("P1TSF","G","NAME","NAMET")
2
^SCR("P1TSF","G","NAME","SUMT")
8
^SCR("P1TSF","G","NAME","T1")
4
^SCR("P1TSF","G","NAME","T2")
5
^SCR("P1TSF","G","NAME","T3")
6
^SCR("P1TSF","G","NAME","T4")
7
^SCR("P1TSF","G","NM",1)
KODT
^SCR("P1TSF","G","NM",2)
NAMET
^SCR("P1TSF","G","NM",3)
MHT
^SCR("P1TSF","G","NM",4)
T1
^SCR("P1TSF","G","NM",5)
T2
^SCR("P1TSF","G","NM",6)
T3
^SCR("P1TSF","G","NM",7)
T4
^SCR("P1TSF","G","NM",8)
SUMT
^SCR("P1TSF","G","NOZAPR")

^SCR("P1TSF","G","RB")
5,8,20,76
^SCR("P1TSF","G","REF")
^THZT($P
^SCR("P1TSF","G","RZD")
\
^SCR("P1TSF","G","STEP")
1
^SCR("P1TSF","G","STG")
          : mekq :-4-:-3-:-2-:-1-:raxl xign:   ztqez xe`z    : ztqez cew :     
^SCR("P1TSF","G","VG")
7
^SCR("P1TSF","NAME")
dixvitl zetqez
^SCR("P1TSF","P",10,"CRD")
2,57,E,8,0
^SCR("P1TSF","P",10,"HELP")

^SCR("P1TSF","P",10,"LMAX")
9
^SCR("P1TSF","P",10,"MUMPS1")

^SCR("P1TSF","P",10,"MUMPS2")

^SCR("P1TSF","P",10,"OUTPUT")

^SCR("P1TSF","P",10,"TYP")
E
^SCR("P1TSF","P",15,"CRD")
2,47,H,20
^SCR("P1TSF","P",15,"HELP")

^SCR("P1TSF","P",15,"LMAX")
24
^SCR("P1TSF","P",15,"MUMPS1")

^SCR("P1TSF","P",15,"MUMPS2")

^SCR("P1TSF","P",15,"OUTPUT")

^SCR("P1TSF","P",15,"TYP")
H
^SCR("P1TSF","P",20,"CRD")
2,9,N,6,2
^SCR("P1TSF","P",20,"HELP")

^SCR("P1TSF","P",20,"LMAX")
6
^SCR("P1TSF","P",20,"MUMPS1")

^SCR("P1TSF","P",20,"MUMPS2")

^SCR("P1TSF","P",20,"OUTPUT")

^SCR("P1TSF","P",20,"TYP")
N
^SCR("P1TSF","P",30,"CRD")
20,9,N,8,2
^SCR("P1TSF","P",30,"HELP")

^SCR("P1TSF","P",30,"LMAX")
8
^SCR("P1TSF","P",30,"MUMPS1")

^SCR("P1TSF","P",30,"MUMPS2")

^SCR("P1TSF","P",30,"OUTPUT")

^SCR("P1TSF","P",30,"TYP")
N
^SCR("P1TSF","P",35,"CRD")
21,9,N,8,2
^SCR("P1TSF","P",35,"HELP")

^SCR("P1TSF","P",35,"LMAX")
8
^SCR("P1TSF","P",35,"MUMPS1")

^SCR("P1TSF","P",35,"MUMPS2")

^SCR("P1TSF","P",35,"OUTPUT")

^SCR("P1TSF","P",35,"TYP")
N
^SCR("P1TSF","P","NAME","KODP")
10
^SCR("P1TSF","P","NAME","MHP")
20
^SCR("P1TSF","P","NAME","NAMEP")
15
^SCR("P1TSF","P","NAME","SHUMP")
35
^SCR("P1TSF","P","NAME","SHUMT")
30
^SCR("P1TSF","P","NM",10)
KODP
^SCR("P1TSF","P","NM",15)
NAMEP
^SCR("P1TSF","P","NM",20)
MHP
^SCR("P1TSF","P","NM",30)
SHUMT
^SCR("P1TSF","P","NM",35)
SHUMP
^SCR("P1TSF0")
H
^SCR("P1TSF0",1)
                                                                               
^SCR("P1TSF0",2)
         {20   }:xign {                     15}:dvit my  {10      }:dvit cew   
^SCR("P1TSF0",3)
                                                                               
^SCR("P1TSF0",4)
                                                                          1$   
^SCR("P1TSF0",5)
          : mekq :-4-:-3-:-2-:-1-:raxl xign:   ztqez xe`z    : ztqez cew :     
^SCR("P1TSF0",6)
                                                                               
^SCR("P1TSF0",7)
                                                                               
^SCR("P1TSF0",8)
                                                                               
^SCR("P1TSF0",9)
                                                                               
^SCR("P1TSF0",10)
                                                                               
^SCR("P1TSF0",11)
                                                                               
^SCR("P1TSF0",12)
                                                                               
^SCR("P1TSF0",13)
                                                                               
^SCR("P1TSF0",14)
                                                                               
^SCR("P1TSF0",15)
                                                                               
^SCR("P1TSF0",16)
                                                                               
^SCR("P1TSF0",17)
                                                                               
^SCR("P1TSF0",18)
                                                                               
^SCR("P1TSF0",19)
       $1                                                                      
^SCR("P1TSF0",20)
         {30     }:zetqez k"dq                                                 
^SCR("P1TSF0",21)
         {35     }:  dvit k"dq                                                 
^SCR("P1TSF0","A",1)

^SCR("P1TSF0","A",2)
:˜‰‡Ž:„–‰”�™:„–‰”ƒ…—
^SCR("P1TSF0","A",3)

^SCR("P1TSF0","A",4)

^SCR("P1TSF0","A",5)
�…‹‘-4--3--2--1-’�˜Œ˜‰‡Žš”‘…š˜…€šš”‘…šƒ…—
^SCR("P1TSF0","A",6)
-------------------------------------------------------
^SCR("P1TSF0","A",7)

^SCR("P1TSF0","A",8)

^SCR("P1TSF0","A",9)

^SCR("P1TSF0","A",10)

^SCR("P1TSF0","A",11)

^SCR("P1TSF0","A",12)

^SCR("P1TSF0","A",13)

^SCR("P1TSF0","A",14)

^SCR("P1TSF0","A",15)

^SCR("P1TSF0","A",16)

^SCR("P1TSF0","A",17)

^SCR("P1TSF0","A",18)

^SCR("P1TSF0","A",19)

^SCR("P1TSF0","A",20)
:š…”‘…š‹"„‘
^SCR("P1TSF0","A",21)
:„–‰”‹"„‘
^SCR("P1TSF0","AV",1)

^SCR("P1TSF0","AV",2)
:rhjn:vmhpoa:vmhpsue
^SCR("P1TSF0","AV",3)

^SCR("P1TSF0","AV",4)

^SCR("P1TSF0","AV",5)
oufx-4--3--2--1-gcrkrhjn,pxu,rut,,pxu,sue
^SCR("P1TSF0","AV",6)
-------------------------------------------------------
^SCR("P1TSF0","AV",7)

^SCR("P1TSF0","AV",8)

^SCR("P1TSF0","AV",9)

^SCR("P1TSF0","AV",10)

^SCR("P1TSF0","AV",11)

^SCR("P1TSF0","AV",12)

^SCR("P1TSF0","AV",13)

^SCR("P1TSF0","AV",14)

^SCR("P1TSF0","AV",15)

^SCR("P1TSF0","AV",16)

^SCR("P1TSF0","AV",17)

^SCR("P1TSF0","AV",18)

^SCR("P1TSF0","AV",19)

^SCR("P1TSF0","AV",20)
:,upxu,f"vx
^SCR("P1TSF0","AV",21)
:vmhpf"vx
^SCR("P1TSF0","G",1,"CRD")
6,73,E,8.,0
^SCR("P1TSF0","G",1,"HELP")

^SCR("P1TSF0","G",1,"LMAX")
11
^SCR("P1TSF0","G",1,"MUMPS1")

^SCR("P1TSF0","G",1,"MUMPS2")

^SCR("P1TSF0","G",1,"OUTPUT")

^SCR("P1TSF0","G",1,"SHEM")
 ztqez cew 
^SCR("P1TSF0","G",1,"TYP")
E
^SCR("P1TSF0","G",2,"CRD")
6,61,H,16,0
^SCR("P1TSF0","G",2,"HELP")

^SCR("P1TSF0","G",2,"LMAX")
17
^SCR("P1TSF0","G",2,"MUMPS1")

^SCR("P1TSF0","G",2,"MUMPS2")

^SCR("P1TSF0","G",2,"OUTPUT")

^SCR("P1TSF0","G",2,"SHEM")
   ztqez xe`z    
^SCR("P1TSF0","G",2,"TYP")
H
^SCR("P1TSF0","G",3,"CRD")
6,43,N,7,2
^SCR("P1TSF0","G",3,"HELP")

^SCR("P1TSF0","G",3,"LMAX")
9
^SCR("P1TSF0","G",3,"MUMPS1")

^SCR("P1TSF0","G",3,"MUMPS2")

^SCR("P1TSF0","G",3,"OUTPUT")

^SCR("P1TSF0","G",3,"SHEM")
raxl xign
^SCR("P1TSF0","G",3,"TYP")
N
^SCR("P1TSF0","G",4,"CRD")
6,33,E,1,0
^SCR("P1TSF0","G",4,"HELP")

^SCR("P1TSF0","G",4,"LMAX")
3
^SCR("P1TSF0","G",4,"MUMPS1")
D TSF0^P1TSF
^SCR("P1TSF0","G",4,"MUMPS2")
D TSF^P1TSF
^SCR("P1TSF0","G",4,"SHEM")
-1-
^SCR("P1TSF0","G",4,"TYP")
E
^SCR("P1TSF0","G",5,"CRD")
6,29,E,1,0
^SCR("P1TSF0","G",5,"HELP")

^SCR("P1TSF0","G",5,"LMAX")
3
^SCR("P1TSF0","G",5,"MUMPS1")
D TSF0^P1TSF
^SCR("P1TSF0","G",5,"MUMPS2")
D TSF^P1TSF
^SCR("P1TSF0","G",5,"SHEM")
-2-
^SCR("P1TSF0","G",5,"TYP")
E
^SCR("P1TSF0","G",6,"CRD")
6,25,E,1,0
^SCR("P1TSF0","G",6,"HELP")

^SCR("P1TSF0","G",6,"LMAX")
3
^SCR("P1TSF0","G",6,"MUMPS1")
D TSF0^P1TSF
^SCR("P1TSF0","G",6,"MUMPS2")
D TSF^P1TSF
^SCR("P1TSF0","G",6,"SHEM")
-3-
^SCR("P1TSF0","G",6,"TYP")
E
^SCR("P1TSF0","G",7,"CRD")
6,21,E,1,0
^SCR("P1TSF0","G",7,"HELP")

^SCR("P1TSF0","G",7,"LMAX")
3
^SCR("P1TSF0","G",7,"MUMPS1")
D TSF0^P1TSF
^SCR("P1TSF0","G",7,"MUMPS2")
D TSF^P1TSF
^SCR("P1TSF0","G",7,"SHEM")
-4-
^SCR("P1TSF0","G",7,"TYP")
E
^SCR("P1TSF0","G",8,"CRD")
6,17,N,6,2
^SCR("P1TSF0","G",8,"HELP")

^SCR("P1TSF0","G",8,"LMAX")
6
^SCR("P1TSF0","G",8,"MUMPS1")

^SCR("P1TSF0","G",8,"MUMPS2")

^SCR("P1TSF0","G",8,"OUTPUT")

^SCR("P1TSF0","G",8,"SHEM")
 mekq 
^SCR("P1TSF0","G",8,"TYP")
N
^SCR("P1TSF0","G","DEL")

^SCR("P1TSF0","G","MAX")
17
^SCR("P1TSF0","G","NAME","KODT")
1
^SCR("P1TSF0","G","NAME","MHT")
3
^SCR("P1TSF0","G","NAME","NAMET")
2
^SCR("P1TSF0","G","NAME","SUMT")
8
^SCR("P1TSF0","G","NAME","T1")
4
^SCR("P1TSF0","G","NAME","T2")
5
^SCR("P1TSF0","G","NAME","T3")
6
^SCR("P1TSF0","G","NAME","T4")
7
^SCR("P1TSF0","G","NM",1)
KODT
^SCR("P1TSF0","G","NM",2)
NAMET
^SCR("P1TSF0","G","NM",3)
MHT
^SCR("P1TSF0","G","NM",4)
T1
^SCR("P1TSF0","G","NM",5)
T2
^SCR("P1TSF0","G","NM",6)
T3
^SCR("P1TSF0","G","NM",7)
T4
^SCR("P1TSF0","G","NM",8)
SUMT
^SCR("P1TSF0","G","RB")
5,8,20,76
^SCR("P1TSF0","G","REF")
^TEMP3($P
^SCR("P1TSF0","G","RZD")
\
^SCR("P1TSF0","G","STEP")
1
^SCR("P1TSF0","G","STG")
          : mekq :-4-:-3-:-2-:-1-:raxl xign:   ztqez xe`z    : ztqez cew :     
^SCR("P1TSF0","G","VG")
7
^SCR("P1TSF0","NAME")

^SCR("P1TSF0","P",10,"CRD")
2,57,E,8,0
^SCR("P1TSF0","P",10,"HELP")

^SCR("P1TSF0","P",10,"LMAX")
9
^SCR("P1TSF0","P",10,"MUMPS1")

^SCR("P1TSF0","P",10,"MUMPS2")

^SCR("P1TSF0","P",10,"OUTPUT")

^SCR("P1TSF0","P",10,"TYP")
E
^SCR("P1TSF0","P",15,"CRD")
2,47,H,20
^SCR("P1TSF0","P",15,"HELP")

^SCR("P1TSF0","P",15,"LMAX")
24
^SCR("P1TSF0","P",15,"MUMPS1")

^SCR("P1TSF0","P",15,"MUMPS2")

^SCR("P1TSF0","P",15,"OUTPUT")

^SCR("P1TSF0","P",15,"TYP")
H
^SCR("P1TSF0","P",20,"CRD")
2,9,N,6,2
^SCR("P1TSF0","P",20,"HELP")

^SCR("P1TSF0","P",20,"LMAX")
6
^SCR("P1TSF0","P",20,"MUMPS1")

^SCR("P1TSF0","P",20,"MUMPS2")

^SCR("P1TSF0","P",20,"OUTPUT")

^SCR("P1TSF0","P",20,"TYP")
N
^SCR("P1TSF0","P",30,"CRD")
20,9,N,8,2
^SCR("P1TSF0","P",30,"HELP")

^SCR("P1TSF0","P",30,"LMAX")
8
^SCR("P1TSF0","P",30,"MUMPS1")

^SCR("P1TSF0","P",30,"MUMPS2")

^SCR("P1TSF0","P",30,"OUTPUT")

^SCR("P1TSF0","P",30,"TYP")
N
^SCR("P1TSF0","P",35,"CRD")
21,9,N,8,2
^SCR("P1TSF0","P",35,"HELP")

^SCR("P1TSF0","P",35,"LMAX")
8
^SCR("P1TSF0","P",35,"MUMPS1")

^SCR("P1TSF0","P",35,"MUMPS2")

^SCR("P1TSF0","P",35,"OUTPUT")

^SCR("P1TSF0","P",35,"TYP")
N
^SCR("P1TSF0","P","NAME","KODP")
10
^SCR("P1TSF0","P","NAME","MHP")
20
^SCR("P1TSF0","P","NAME","NAMEP")
15
^SCR("P1TSF0","P","NAME","SHUMP")
35
^SCR("P1TSF0","P","NAME","SHUMT")
30
^SCR("P1TSF0","P","NM",10)
KODP
^SCR("P1TSF0","P","NM",15)
NAMEP
^SCR("P1TSF0","P","NM",20)
MHP
^SCR("P1TSF0","P","NM",30)
SHUMT
^SCR("P1TSF0","P","NM",35)
SHUMP
^SCR("P1TSF1")
H
^SCR("P1TSF1",1)
                                                                               
^SCR("P1TSF1",2)
       {20   }:xign {                     15}:xven xe`z  {10      }:xven cew   
^SCR("P1TSF1",3)
                                                                               
^SCR("P1TSF1",4)
                                                                          1$   
^SCR("P1TSF1",5)
                              :  xign  :   ztqez xe`z    : ztqez cew :         
^SCR("P1TSF1",6)
                                                                               
^SCR("P1TSF1",7)
                                                                               
^SCR("P1TSF1",8)
                                                                               
^SCR("P1TSF1",9)
                                                                               
^SCR("P1TSF1",10)
                                                                               
^SCR("P1TSF1",11)
                                                                               
^SCR("P1TSF1",12)
                                                                               
^SCR("P1TSF1",13)
                                                                               
^SCR("P1TSF1",14)
                                                                               
^SCR("P1TSF1",15)
                                                                               
^SCR("P1TSF1",16)
                                                                               
^SCR("P1TSF1",17)
                                                                               
^SCR("P1TSF1",18)
                                                                               
^SCR("P1TSF1",19)
                          $1                                                   
^SCR("P1TSF1",20)
                           {30     }:zetqez k"dq                               
^SCR("P1TSF1",21)
                           {35     }:zetqez + hixt k"dq                        
^SCR("P1TSF1","A",1)

^SCR("P1TSF1","A",2)
:˜‰‡Ž:˜–…Ž˜…€š:˜–…Žƒ…—
^SCR("P1TSF1","A",3)

^SCR("P1TSF1","A",4)

^SCR("P1TSF1","A",5)
˜‰‡Žš”‘…š˜…€šš”‘…šƒ…—
^SCR("P1TSF1","A",6)
------------------------------------
^SCR("P1TSF1","A",7)

^SCR("P1TSF1","A",8)

^SCR("P1TSF1","A",9)

^SCR("P1TSF1","A",10)

^SCR("P1TSF1","A",11)

^SCR("P1TSF1","A",12)

^SCR("P1TSF1","A",13)

^SCR("P1TSF1","A",14)

^SCR("P1TSF1","A",15)

^SCR("P1TSF1","A",16)

^SCR("P1TSF1","A",17)

^SCR("P1TSF1","A",18)

^SCR("P1TSF1","A",19)

^SCR("P1TSF1","A",20)
:š…”‘…š‹"„‘
^SCR("P1TSF1","A",21)
:š…”‘…š+ˆ‰˜”‹"„‘
^SCR("P1TSF1","AV",1)

^SCR("P1TSF1","AV",2)
:rhjn:rmunrut,:rmunsue
^SCR("P1TSF1","AV",3)

^SCR("P1TSF1","AV",4)

^SCR("P1TSF1","AV",5)
rhjn,pxu,rut,,pxu,sue
^SCR("P1TSF1","AV",6)
------------------------------------
^SCR("P1TSF1","AV",7)

^SCR("P1TSF1","AV",8)

^SCR("P1TSF1","AV",9)

^SCR("P1TSF1","AV",10)

^SCR("P1TSF1","AV",11)

^SCR("P1TSF1","AV",12)

^SCR("P1TSF1","AV",13)

^SCR("P1TSF1","AV",14)

^SCR("P1TSF1","AV",15)

^SCR("P1TSF1","AV",16)

^SCR("P1TSF1","AV",17)

^SCR("P1TSF1","AV",18)

^SCR("P1TSF1","AV",19)

^SCR("P1TSF1","AV",20)
:,upxu,f"vx
^SCR("P1TSF1","AV",21)
:,upxu,+yhrpf"vx
^SCR("P1TSF1","G",1,"CRD")
6,69,E,8,0
^SCR("P1TSF1","G",1,"HELP")
<F7> - zetqez zbvd
^SCR("P1TSF1","G",1,"LMAX")
11
^SCR("P1TSF1","G",1,"MUMPS1")
S %ZMSL="="
^SCR("P1TSF1","G",1,"MUMPS2")
D PAR^P1TSF
^SCR("P1TSF1","G",1,"MUST")

^SCR("P1TSF1","G",1,"SHEM")
 ztqez cew 
^SCR("P1TSF1","G",1,"TYP")
E
^SCR("P1TSF1","G",2,"CRD")
6,57,H,16,0
^SCR("P1TSF1","G",2,"HELP")

^SCR("P1TSF1","G",2,"LMAX")
17
^SCR("P1TSF1","G",2,"MUMPS1")

^SCR("P1TSF1","G",2,"MUMPS2")

^SCR("P1TSF1","G",2,"OUTPUT")

^SCR("P1TSF1","G",2,"SHEM")
   ztqez xe`z    
^SCR("P1TSF1","G",2,"TYP")
H
^SCR("P1TSF1","G",3,"CRD")
6,39,N,8,2
^SCR("P1TSF1","G",3,"HELP")

^SCR("P1TSF1","G",3,"LMAX")
8
^SCR("P1TSF1","G",3,"MUMPS1")

^SCR("P1TSF1","G",3,"MUMPS2")

^SCR("P1TSF1","G",3,"OUTPUT")

^SCR("P1TSF1","G",3,"SHEM")
  xign  
^SCR("P1TSF1","G",3,"TYP")
N
^SCR("P1TSF1","G","DEL")
Y
^SCR("P1TSF1","G","MAX")
99999
^SCR("P1TSF1","G","NAME","KODT")
1
^SCR("P1TSF1","G","NAME","MHT")
3
^SCR("P1TSF1","G","NAME","NAMET")
2
^SCR("P1TSF1","G","NM",1)
KODT
^SCR("P1TSF1","G","NM",2)
NAMET
^SCR("P1TSF1","G","NM",3)
MHT
^SCR("P1TSF1","G","RB")
5,27,20,76
^SCR("P1TSF1","G","REF")
^THZ3($P
^SCR("P1TSF1","G","RZD")
\
^SCR("P1TSF1","G","STEP")
1
^SCR("P1TSF1","G","STG")
                              :  xign  :   ztqez xe`z    : ztqez cew :         
^SCR("P1TSF1","G","VG")
7
^SCR("P1TSF1","NAME")

^SCR("P1TSF1","P",10,"CRD")
2,57,E,8,0
^SCR("P1TSF1","P",10,"HELP")

^SCR("P1TSF1","P",10,"LMAX")
9
^SCR("P1TSF1","P",10,"MUMPS1")

^SCR("P1TSF1","P",10,"MUMPS2")

^SCR("P1TSF1","P",10,"OUTPUT")

^SCR("P1TSF1","P",10,"TYP")
E
^SCR("P1TSF1","P",15,"CRD")
2,45,H,20
^SCR("P1TSF1","P",15,"HELP")

^SCR("P1TSF1","P",15,"LMAX")
24
^SCR("P1TSF1","P",15,"MUMPS1")

^SCR("P1TSF1","P",15,"MUMPS2")

^SCR("P1TSF1","P",15,"OUTPUT")

^SCR("P1TSF1","P",15,"TYP")
H
^SCR("P1TSF1","P",20,"CRD")
2,7,N,6,2
^SCR("P1TSF1","P",20,"HELP")

^SCR("P1TSF1","P",20,"LMAX")
6
^SCR("P1TSF1","P",20,"MUMPS1")

^SCR("P1TSF1","P",20,"MUMPS2")

^SCR("P1TSF1","P",20,"OUTPUT")

^SCR("P1TSF1","P",20,"TYP")
N
^SCR("P1TSF1","P",30,"CRD")
20,27,N,8,2
^SCR("P1TSF1","P",30,"HELP")

^SCR("P1TSF1","P",30,"LMAX")
8
^SCR("P1TSF1","P",30,"MUMPS1")

^SCR("P1TSF1","P",30,"MUMPS2")

^SCR("P1TSF1","P",30,"OUTPUT")

^SCR("P1TSF1","P",30,"TYP")
N
^SCR("P1TSF1","P",35,"CRD")
21,27,N,8,2
^SCR("P1TSF1","P",35,"HELP")

^SCR("P1TSF1","P",35,"LMAX")
8
^SCR("P1TSF1","P",35,"MUMPS1")

^SCR("P1TSF1","P",35,"MUMPS2")

^SCR("P1TSF1","P",35,"OUTPUT")

^SCR("P1TSF1","P",35,"TYP")
N
^SCR("P1TSF1","P","NAME","KODP")
10
^SCR("P1TSF1","P","NAME","MHP")
20
^SCR("P1TSF1","P","NAME","NAMEP")
15
^SCR("P1TSF1","P","NAME","SHUMP")
35
^SCR("P1TSF1","P","NAME","SHUMT")
30
^SCR("P1TSF1","P","NM",10)
KODP
^SCR("P1TSF1","P","NM",15)
NAMEP
^SCR("P1TSF1","P","NM",20)
MHP
^SCR("P1TSF1","P","NM",30)
SHUMT
^SCR("P1TSF1","P","NM",35)
SHUMP
^SCR("P1TSFDET")
H
^SCR("P1TSFDET",1)
                                                                               
^SCR("P1TSFDET",2)
                                                                             1$
^SCR("P1TSFDET",3)
  :        dxrd      :    ztqez xe`z    :ztqez:zenk:      hixt xe`z    :hixt:  
^SCR("P1TSFDET",4)
                                                                               
^SCR("P1TSFDET",5)
                                                                               
^SCR("P1TSFDET",6)
                                                                               
^SCR("P1TSFDET",7)
                                                                               
^SCR("P1TSFDET",8)
                                                                               
^SCR("P1TSFDET",9)
                                                                               
^SCR("P1TSFDET",10)
                                                                               
^SCR("P1TSFDET",11)
                                                                               
^SCR("P1TSFDET",12)
                                                                               
^SCR("P1TSFDET",13)
                                                                               
^SCR("P1TSFDET",14)
                                                                               
^SCR("P1TSFDET",15)
                                                                               
^SCR("P1TSFDET",16)
                                                                               
^SCR("P1TSFDET",17)
                                                                               
^SCR("P1TSFDET",18)
                                                                               
^SCR("P1TSFDET",19)
                                                                               
^SCR("P1TSFDET",20)
                                                                               
^SCR("P1TSFDET",21)
 $1                                                                            
^SCR("P1TSFDET",22)
                                                                               
^SCR("P1TSFDET","A",1)

^SCR("P1TSFDET","A",2)

^SCR("P1TSFDET","A",3)
„˜’„š”‘…š˜…€šš”‘…šš…Ž‹ˆ‰˜”˜…€šˆ‰˜”
^SCR("P1TSFDET","A",4)
----------------------------------------------------------------------
^SCR("P1TSFDET","A",5)

^SCR("P1TSFDET","A",6)

^SCR("P1TSFDET","A",7)

^SCR("P1TSFDET","A",8)

^SCR("P1TSFDET","A",9)

^SCR("P1TSFDET","A",10)

^SCR("P1TSFDET","A",11)

^SCR("P1TSFDET","A",12)

^SCR("P1TSFDET","A",13)

^SCR("P1TSFDET","A",14)

^SCR("P1TSFDET","A",15)

^SCR("P1TSFDET","A",16)

^SCR("P1TSFDET","A",17)

^SCR("P1TSFDET","A",18)

^SCR("P1TSFDET","A",19)

^SCR("P1TSFDET","A",20)

^SCR("P1TSFDET","A",21)

^SCR("P1TSFDET","A",22)

^SCR("P1TSFDET","AV",1)

^SCR("P1TSFDET","AV",2)

^SCR("P1TSFDET","AV",3)
vrgv,pxu,rut,,pxu,,unfyhrprut,yhrp
^SCR("P1TSFDET","AV",4)
----------------------------------------------------------------------
^SCR("P1TSFDET","AV",5)

^SCR("P1TSFDET","AV",6)

^SCR("P1TSFDET","AV",7)

^SCR("P1TSFDET","AV",8)

^SCR("P1TSFDET","AV",9)

^SCR("P1TSFDET","AV",10)

^SCR("P1TSFDET","AV",11)

^SCR("P1TSFDET","AV",12)

^SCR("P1TSFDET","AV",13)

^SCR("P1TSFDET","AV",14)

^SCR("P1TSFDET","AV",15)

^SCR("P1TSFDET","AV",16)

^SCR("P1TSFDET","AV",17)

^SCR("P1TSFDET","AV",18)

^SCR("P1TSFDET","AV",19)

^SCR("P1TSFDET","AV",20)

^SCR("P1TSFDET","AV",21)

^SCR("P1TSFDET","AV",22)

^SCR("P1TSFDET","G",1,"CRD")
4,76,E,4,0
^SCR("P1TSFDET","G",1,"HELP")

^SCR("P1TSFDET","G",1,"LMAX")
4
^SCR("P1TSFDET","G",1,"MUMPS1")
D PAR0^P1AIN
^SCR("P1TSFDET","G",1,"MUMPS2")
D PAR^P1AIN
^SCR("P1TSFDET","G",1,"SHEM")
hixt
^SCR("P1TSFDET","G",1,"TYP")
E
^SCR("P1TSFDET","G",2,"CRD")
4,71,H,19,0
^SCR("P1TSFDET","G",2,"HELP")

^SCR("P1TSFDET","G",2,"LMAX")
19
^SCR("P1TSFDET","G",2,"MUMPS1")

^SCR("P1TSFDET","G",2,"MUMPS2")

^SCR("P1TSFDET","G",2,"OUTPUT")

^SCR("P1TSFDET","G",2,"SHEM")
      hixt xe`z    
^SCR("P1TSFDET","G",2,"TYP")
H
^SCR("P1TSFDET","G",3,"CRD")
4,51,N,2,0
^SCR("P1TSFDET","G",3,"HELP")

^SCR("P1TSFDET","G",3,"LMAX")
4
^SCR("P1TSFDET","G",3,"MUMPS1")

^SCR("P1TSFDET","G",3,"MUMPS2")

^SCR("P1TSFDET","G",3,"MUST")

^SCR("P1TSFDET","G",3,"SHEM")
zenk
^SCR("P1TSFDET","G",3,"TYP")
N
^SCR("P1TSFDET","G",4,"CRD")
4,46,E,5,0
^SCR("P1TSFDET","G",4,"HELP")

^SCR("P1TSFDET","G",4,"LMAX")
5
^SCR("P1TSFDET","G",4,"MUMPS1")

^SCR("P1TSFDET","G",4,"MUMPS2")

^SCR("P1TSFDET","G",4,"OUTPUT")

^SCR("P1TSFDET","G",4,"SHEM")
ztqez
^SCR("P1TSFDET","G",4,"TYP")
E
^SCR("P1TSFDET","G",5,"CRD")
4,40,H,18,0
^SCR("P1TSFDET","G",5,"HELP")

^SCR("P1TSFDET","G",5,"LMAX")
18
^SCR("P1TSFDET","G",5,"MUMPS1")

^SCR("P1TSFDET","G",5,"MUMPS2")

^SCR("P1TSFDET","G",5,"OUTPUT")

^SCR("P1TSFDET","G",5,"SHEM")
    ztqez xe`z    
^SCR("P1TSFDET","G",5,"TYP")
H
^SCR("P1TSFDET","G",6,"CRD")
4,21,H,18,0
^SCR("P1TSFDET","G",6,"HELP")

^SCR("P1TSFDET","G",6,"LMAX")
18
^SCR("P1TSFDET","G",6,"MUMPS1")
D HLP^P1HRA
^SCR("P1TSFDET","G",6,"MUMPS2")
D HRA^P1AIN
^SCR("P1TSFDET","G",6,"SHEM")
        dxrd      
^SCR("P1TSFDET","G",6,"TYP")
H
^SCR("P1TSFDET","G","DEL")
Y
^SCR("P1TSFDET","G","MAX")
99999
^SCR("P1TSFDET","G","NAME","CA")
3
^SCR("P1TSFDET","G","NAME","HRA")
6
^SCR("P1TSFDET","G","NAME","PAR")
1
^SCR("P1TSFDET","G","NAME","PAR1")
2
^SCR("P1TSFDET","G","NAME","TSF")
4
^SCR("P1TSFDET","G","NAME","TSF1")
5
^SCR("P1TSFDET","G","NM",1)
PAR
^SCR("P1TSFDET","G","NM",2)
PAR1
^SCR("P1TSFDET","G","NM",3)
CA
^SCR("P1TSFDET","G","NM",4)
TSF
^SCR("P1TSFDET","G","NM",5)
TSF1
^SCR("P1TSFDET","G","NM",6)
HRA
^SCR("P1TSFDET","G","RB")
3,2,22,79
^SCR("P1TSFDET","G","REF")
^TEMP($P,"AIN"
^SCR("P1TSFDET","G","RZD")
\
^SCR("P1TSFDET","G","STEP")
1
^SCR("P1TSFDET","G","STG")
  :        dxrd      :    ztqez xe`z    :ztqez:zenk:      hixt xe`z    :hixt:  
^SCR("P1TSFDET","G","VG")
5
^SCR("P1TSFDET","NAME")

^SCR("P1TSFN")
H
^SCR("P1TSFN",1)
                                                                               
^SCR("P1TSFN",2)
                             # zetqez zxcbd #                                  
^SCR("P1TSFN",3)
                                                                       1]      
^SCR("P1TSFN",4)
            {                     15}:xven xe`z  {10      }:xven cew           
^SCR("P1TSFN",5)
                                {25 }:     zenk   {20     }:    xign           
^SCR("P1TSFN",6)
     [1                                                                        
^SCR("P1TSFN",7)
                                                                       1$      
^SCR("P1TSFN",8)
        :     dxrd    : zenk :  xign  :   ztqez xe`z    : ztqez cew :          
^SCR("P1TSFN",9)
                                                                               
^SCR("P1TSFN",10)
                                                                               
^SCR("P1TSFN",11)
                                                                               
^SCR("P1TSFN",12)
                                                                               
^SCR("P1TSFN",13)
                                                                               
^SCR("P1TSFN",14)
                                                                               
^SCR("P1TSFN",15)
                                                                               
^SCR("P1TSFN",16)
                                                                               
^SCR("P1TSFN",17)
                                                                               
^SCR("P1TSFN",18)
     $1                                                                        
^SCR("P1TSFN",19)
          g"y {30     } : zetqez k"dq                                          
^SCR("P1TSFN",20)
          g"y {35     } : zetqez + hixt k"dq                                   
^SCR("P1TSFN",21)
                                                                               
^SCR("P1TSFN",22)
        {                                                             45}      
^SCR("P1TSFN","A",1)

^SCR("P1TSFN","A",2)
š…”‘…šš˜ƒ‚„
^SCR("P1TSFN","A",3)

^SCR("P1TSFN","A",4)
:˜–…Ž˜…€š:˜–…Žƒ…—
^SCR("P1TSFN","A",5)
:š…Ž‹:˜‰‡Ž
^SCR("P1TSFN","A",6)

^SCR("P1TSFN","A",7)

^SCR("P1TSFN","A",8)
„˜’„š…Ž‹˜‰‡Žš”‘…š˜…€šš”‘…šƒ…—
^SCR("P1TSFN","A",9)
-------------------------------------------------------
^SCR("P1TSFN","A",10)

^SCR("P1TSFN","A",11)

^SCR("P1TSFN","A",12)

^SCR("P1TSFN","A",13)

^SCR("P1TSFN","A",14)

^SCR("P1TSFN","A",15)

^SCR("P1TSFN","A",16)

^SCR("P1TSFN","A",17)

^SCR("P1TSFN","A",18)

^SCR("P1TSFN","A",19)
‡"™:š…”‘…š‹"„‘
^SCR("P1TSFN","A",20)
‡"™:š…”‘…š+ˆ‰˜”‹"„‘
^SCR("P1TSFN","A",21)

^SCR("P1TSFN","A",22)

^SCR("P1TSFN","AV",1)

^SCR("P1TSFN","AV",2)
,upxu,,rsdv
^SCR("P1TSFN","AV",3)

^SCR("P1TSFN","AV",4)
:rmunrut,:rmunsue
^SCR("P1TSFN","AV",5)
:,unf:rhjn
^SCR("P1TSFN","AV",6)

^SCR("P1TSFN","AV",7)

^SCR("P1TSFN","AV",8)
vrgv,unfrhjn,pxu,rut,,pxu,sue
^SCR("P1TSFN","AV",9)
-------------------------------------------------------
^SCR("P1TSFN","AV",10)

^SCR("P1TSFN","AV",11)

^SCR("P1TSFN","AV",12)

^SCR("P1TSFN","AV",13)

^SCR("P1TSFN","AV",14)

^SCR("P1TSFN","AV",15)

^SCR("P1TSFN","AV",16)

^SCR("P1TSFN","AV",17)

^SCR("P1TSFN","AV",18)

^SCR("P1TSFN","AV",19)
j"a:,upxu,f"vx
^SCR("P1TSFN","AV",20)
j"a:,upxu,+yhrpf"vx
^SCR("P1TSFN","AV",21)

^SCR("P1TSFN","AV",22)

^SCR("P1TSFN","G",1,"CRD")
9,68,E,8,0
^SCR("P1TSFN","G",1,"HELP")

^SCR("P1TSFN","G",1,"LMAX")
11
^SCR("P1TSFN","G",1,"MUMPS1")
S %ZMSL=".u "
^SCR("P1TSFN","G",1,"MUMPS2")

^SCR("P1TSFN","G",1,"OUTPUT")

^SCR("P1TSFN","G",1,"SHEM")
 ztqez cew 
^SCR("P1TSFN","G",1,"TYP")
E
^SCR("P1TSFN","G",2,"CRD")
9,56,H,16,0
^SCR("P1TSFN","G",2,"HELP")

^SCR("P1TSFN","G",2,"LMAX")
17
^SCR("P1TSFN","G",2,"MUMPS1")

^SCR("P1TSFN","G",2,"MUMPS2")

^SCR("P1TSFN","G",2,"OUTPUT")

^SCR("P1TSFN","G",2,"SHEM")
   ztqez xe`z    
^SCR("P1TSFN","G",2,"TYP")
H
^SCR("P1TSFN","G",3,"CRD")
9,38,N,8,2
^SCR("P1TSFN","G",3,"HELP")

^SCR("P1TSFN","G",3,"LMAX")
8
^SCR("P1TSFN","G",3,"MUMPS1")

^SCR("P1TSFN","G",3,"MUMPS2")

^SCR("P1TSFN","G",3,"OUTPUT")

^SCR("P1TSFN","G",3,"SHEM")
  xign  
^SCR("P1TSFN","G",3,"TYP")
N
^SCR("P1TSFN","G",4,"CRD")
9,29,N,4,0
^SCR("P1TSFN","G",4,"HELP")
dxrdl miribn <F9> ywn zxfra ; <F9> e` "geex" ywna ynzydl xyt` 1=zenk zxixal 
^SCR("P1TSFN","G",4,"LMAX")
6
^SCR("P1TSFN","G",4,"MUMPS1")
D CT0^P1TSFN             
^SCR("P1TSFN","G",4,"MUMPS2")
D CT^P1TSFN
^SCR("P1TSFN","G",4,"SHEM")
 zenk 
^SCR("P1TSFN","G",4,"TYP")
N
^SCR("P1TSFN","G",5,"CRD")
9,22,H,13,0
^SCR("P1TSFN","G",5,"HELP")

^SCR("P1TSFN","G",5,"LMAX")
13
^SCR("P1TSFN","G",5,"MUMPS1")
D ^P1LB("KODT") S %BE="E"
^SCR("P1TSFN","G",5,"MUMPS2")
D HRA^P1TSFN
^SCR("P1TSFN","G",5,"SHEM")
     dxrd    
^SCR("P1TSFN","G",5,"TYP")
H
^SCR("P1TSFN","G","DEL")

^SCR("P1TSFN","G","MAX")
7
^SCR("P1TSFN","G","NAME","CT")
4
^SCR("P1TSFN","G","NAME","HRA")
5
^SCR("P1TSFN","G","NAME","KODT")
1
^SCR("P1TSFN","G","NAME","MHT")
3
^SCR("P1TSFN","G","NAME","NAMET")
2
^SCR("P1TSFN","G","NM",1)
KODT
^SCR("P1TSFN","G","NM",2)
NAMET
^SCR("P1TSFN","G","NM",3)
MHT
^SCR("P1TSFN","G","NM",4)
CT
^SCR("P1TSFN","G","NM",5)
HRA
^SCR("P1TSFN","G","NOZAPR")
7
^SCR("P1TSFN","G","RB")
8,6,19,73
^SCR("P1TSFN","G","REF")
^THZT($P
^SCR("P1TSFN","G","RZD")
\
^SCR("P1TSFN","G","STEP")
1
^SCR("P1TSFN","G","STG")
        :     dxrd    : zenk :  xign  :   ztqez xe`z    : ztqez cew :          
^SCR("P1TSFN","G","VG")
10
^SCR("P1TSFN","NAME")

^SCR("P1TSFN","P",10,"CRD")
4,49,E,8,0
^SCR("P1TSFN","P",10,"HELP")

^SCR("P1TSFN","P",10,"LMAX")
9
^SCR("P1TSFN","P",10,"MUMPS1")

^SCR("P1TSFN","P",10,"MUMPS2")

^SCR("P1TSFN","P",10,"OUTPUT")

^SCR("P1TSFN","P",10,"TYP")
E
^SCR("P1TSFN","P",15,"CRD")
4,37,H,20
^SCR("P1TSFN","P",15,"HELP")

^SCR("P1TSFN","P",15,"LMAX")
24
^SCR("P1TSFN","P",15,"MUMPS1")

^SCR("P1TSFN","P",15,"MUMPS2")

^SCR("P1TSFN","P",15,"OUTPUT")

^SCR("P1TSFN","P",15,"TYP")
H
^SCR("P1TSFN","P",20,"CRD")
5,50,N,6,2
^SCR("P1TSFN","P",20,"HELP")

^SCR("P1TSFN","P",20,"LMAX")
8
^SCR("P1TSFN","P",20,"MUMPS1")

^SCR("P1TSFN","P",20,"MUMPS2")

^SCR("P1TSFN","P",20,"OUTPUT")

^SCR("P1TSFN","P",20,"TYP")
N
^SCR("P1TSFN","P",25,"CRD")
5,32,N,4,0
^SCR("P1TSFN","P",25,"HELP")

^SCR("P1TSFN","P",25,"LMAX")
4
^SCR("P1TSFN","P",25,"MUMPS1")

^SCR("P1TSFN","P",25,"MUMPS2")

^SCR("P1TSFN","P",25,"OUTPUT")

^SCR("P1TSFN","P",25,"TYP")
N
^SCR("P1TSFN","P",30,"CRD")
19,14,N,8,2
^SCR("P1TSFN","P",30,"HELP")

^SCR("P1TSFN","P",30,"LMAX")
8
^SCR("P1TSFN","P",30,"MUMPS1")

^SCR("P1TSFN","P",30,"MUMPS2")

^SCR("P1TSFN","P",30,"OUTPUT")

^SCR("P1TSFN","P",30,"TYP")
N
^SCR("P1TSFN","P",35,"CRD")
20,14,N,8,2
^SCR("P1TSFN","P",35,"HELP")

^SCR("P1TSFN","P",35,"LMAX")
8
^SCR("P1TSFN","P",35,"MUMPS1")

^SCR("P1TSFN","P",35,"MUMPS2")

^SCR("P1TSFN","P",35,"OUTPUT")

^SCR("P1TSFN","P",35,"TYP")
N
^SCR("P1TSFN","P",45,"CRD")
22,73,H,64
^SCR("P1TSFN","P",45,"HELP")

^SCR("P1TSFN","P",45,"LMAX")
64
^SCR("P1TSFN","P",45,"MUMPS1")

^SCR("P1TSFN","P",45,"MUMPS2")

^SCR("P1TSFN","P",45,"OUTPUT")

^SCR("P1TSFN","P",45,"TYP")
H
^SCR("P1TSFN","P","NAME","CP")
25
^SCR("P1TSFN","P","NAME","HEARA")
45
^SCR("P1TSFN","P","NAME","KODP")
10
^SCR("P1TSFN","P","NAME","MHP")
20
^SCR("P1TSFN","P","NAME","NAMEP")
15
^SCR("P1TSFN","P","NAME","SHUMP")
35
^SCR("P1TSFN","P","NAME","SHUMT")
30
^SCR("P1TSFN","P","NM",10)
KODP
^SCR("P1TSFN","P","NM",15)
NAMEP
^SCR("P1TSFN","P","NM",20)
MHP
^SCR("P1TSFN","P","NM",25)
CP
^SCR("P1TSFN","P","NM",30)
SHUMT
^SCR("P1TSFN","P","NM",35)
SHUMP
^SCR("P1TSFN","P","NM",45)
HEARA
^SCR("P1TSFN","P","RB",1)
4,6,7,73
^SCR("P1TSFR")
H
^SCR("P1TSFR",1)
                                # dxixa-ax zetqez #                            
^SCR("P1TSFR",2)
                             {                        06} {05    : hixt        
^SCR("P1TSFR",3)
                                                                     1$        
^SCR("P1TSFR",4)
              : dxixa xe`z :dxixa 'qn:    ztqez xe`z   :ztqez cew:             
^SCR("P1TSFR",5)
                                                                               
^SCR("P1TSFR",6)
                                                                               
^SCR("P1TSFR",7)
                                                                               
^SCR("P1TSFR",8)
                                                                               
^SCR("P1TSFR",9)
                                                                               
^SCR("P1TSFR",10)
                                                                               
^SCR("P1TSFR",11)
                                                                               
^SCR("P1TSFR",12)
                                                                               
^SCR("P1TSFR",13)
                                                                               
^SCR("P1TSFR",14)
                                                                               
^SCR("P1TSFR",15)
                                                                               
^SCR("P1TSFR",16)
                                                                               
^SCR("P1TSFR",17)
                                                                               
^SCR("P1TSFR",18)
                                                                               
^SCR("P1TSFR",19)
                                                                               
^SCR("P1TSFR",20)
           $1                                                                  
^SCR("P1TSFR","A",1)
„˜‰˜�-�˜š…”‘…š
^SCR("P1TSFR","A",2)
:ˆ‰˜”
^SCR("P1TSFR","A",3)

^SCR("P1TSFR","A",4)
„˜‰˜�˜…€š„˜‰˜�'‘Žš”‘…š˜…€šš”‘…šƒ…—
^SCR("P1TSFR","A",5)
-----------------------------------------------
^SCR("P1TSFR","A",6)

^SCR("P1TSFR","A",7)

^SCR("P1TSFR","A",8)

^SCR("P1TSFR","A",9)

^SCR("P1TSFR","A",10)

^SCR("P1TSFR","A",11)

^SCR("P1TSFR","A",12)

^SCR("P1TSFR","A",13)

^SCR("P1TSFR","A",14)

^SCR("P1TSFR","A",15)

^SCR("P1TSFR","A",16)

^SCR("P1TSFR","A",17)

^SCR("P1TSFR","A",18)

^SCR("P1TSFR","A",19)

^SCR("P1TSFR","A",20)

^SCR("P1TSFR","AV",1)
vrhrc-cr,upxu,
^SCR("P1TSFR","AV",2)
:yhrp
^SCR("P1TSFR","AV",3)

^SCR("P1TSFR","AV",4)
vrhrcrut,vrhrcwxn,pxu,rut,,pxu,sue
^SCR("P1TSFR","AV",5)
-----------------------------------------------
^SCR("P1TSFR","AV",6)

^SCR("P1TSFR","AV",7)

^SCR("P1TSFR","AV",8)

^SCR("P1TSFR","AV",9)

^SCR("P1TSFR","AV",10)

^SCR("P1TSFR","AV",11)

^SCR("P1TSFR","AV",12)

^SCR("P1TSFR","AV",13)

^SCR("P1TSFR","AV",14)

^SCR("P1TSFR","AV",15)

^SCR("P1TSFR","AV",16)

^SCR("P1TSFR","AV",17)

^SCR("P1TSFR","AV",18)

^SCR("P1TSFR","AV",19)

^SCR("P1TSFR","AV",20)

^SCR("P1TSFR","G",1,"CRD")
5,65,E,6,0
^SCR("P1TSFR","G",1,"HELP")

^SCR("P1TSFR","G",1,"LMAX")
9
^SCR("P1TSFR","G",1,"MUMPS1")

^SCR("P1TSFR","G",1,"MUMPS2")

^SCR("P1TSFR","G",1,"OUTPUT")

^SCR("P1TSFR","G",1,"SHEM")
ztqez cew
^SCR("P1TSFR","G",1,"TYP")
E
^SCR("P1TSFR","G",2,"CRD")
5,55,H,17,0
^SCR("P1TSFR","G",2,"HELP")

^SCR("P1TSFR","G",2,"LMAX")
17
^SCR("P1TSFR","G",2,"MUMPS1")

^SCR("P1TSFR","G",2,"MUMPS2")

^SCR("P1TSFR","G",2,"OUTPUT")

^SCR("P1TSFR","G",2,"SHEM")
    ztqez xe`z   
^SCR("P1TSFR","G",2,"TYP")
H
^SCR("P1TSFR","G",3,"CRD")
5,37,N,1,0
^SCR("P1TSFR","G",3,"HELP")
<F7> - zeiexyt` zbvd 
^SCR("P1TSFR","G",3,"LMAX")
9
^SCR("P1TSFR","G",3,"MUMPS1")
S %ZMSF="",%ZMSL=" ="
^SCR("P1TSFR","G",3,"MUMPS2")
D BR^P1TSFR
^SCR("P1TSFR","G",3,"SHEM")
dxixa 'qn
^SCR("P1TSFR","G",3,"TYP")
N
^SCR("P1TSFR","G",4,"CRD")
5,27,H,12,0
^SCR("P1TSFR","G",4,"HELP")

^SCR("P1TSFR","G",4,"LMAX")
12
^SCR("P1TSFR","G",4,"MUMPS1")

^SCR("P1TSFR","G",4,"MUMPS2")

^SCR("P1TSFR","G",4,"OUTPUT")

^SCR("P1TSFR","G",4,"SHEM")
 dxixa xe`z 
^SCR("P1TSFR","G",4,"TYP")
H
^SCR("P1TSFR","G","MAX")
5
^SCR("P1TSFR","G","NAME","BR")
3
^SCR("P1TSFR","G","NAME","BR1")
4
^SCR("P1TSFR","G","NAME","TSF")
1
^SCR("P1TSFR","G","NAME","TSF1")
2
^SCR("P1TSFR","G","NM",1)
TSF
^SCR("P1TSFR","G","NM",2)
TSF1
^SCR("P1TSFR","G","NM",3)
BR
^SCR("P1TSFR","G","NM",4)
BR1
^SCR("P1TSFR","G","RB")
4,12,21,71
^SCR("P1TSFR","G","REF")
^TEMP($P,"B"
^SCR("P1TSFR","G","RZD")
\
^SCR("P1TSFR","G","STEP")
1
^SCR("P1TSFR","G","STG")
              : dxixa xe`z :dxixa 'qn:    ztqez xe`z   :ztqez cew:             
^SCR("P1TSFR","G","VG")
6
^SCR("P1TSFR","NAME")
dxixa-ax zetqez zxiga
^SCR("P1TSFR","P",5,"CRD")
2,58,E,7,0
^SCR("P1TSFR","P",5,"HELP")

^SCR("P1TSFR","P",5,"LMAX")
7
^SCR("P1TSFR","P",5,"MUMPS1")

^SCR("P1TSFR","P",5,"MUMPS2")

^SCR("P1TSFR","P",5,"OUTPUT")

^SCR("P1TSFR","P",5,"TYP")
E
^SCR("P1TSFR","P",6,"CRD")
2,57,H,27,0
^SCR("P1TSFR","P",6,"HELP")

^SCR("P1TSFR","P",6,"LMAX")
27
^SCR("P1TSFR","P",6,"MUMPS1")

^SCR("P1TSFR","P",6,"MUMPS2")

^SCR("P1TSFR","P",6,"OUTPUT")

^SCR("P1TSFR","P",6,"TYP")
H
^SCR("P1TSFR","P","NAME","MZR")
5
^SCR("P1TSFR","P","NAME","MZR1")
6
^SCR("P1TSFR","P","NM",5)
MZR
^SCR("P1TSFR","P","NM",6)
MZR1
^SCR("P1TZ")
H
^SCR("P1TZ",1)
                                # iekif zcerz #                                
^SCR("P1TZ",2)
                                                                               
^SCR("P1TZ",3)
                  {04     }:dry   {03      }:jix`z    {01   }:iekif zcerz      
^SCR("P1TZ",4)
   {                      10}: my {05        }:ogley 'qn e` (lh) gewl 'qn      
^SCR("P1TZ",5)
                            {                    13} {12     } : xvln 'qn      
^SCR("P1TZ",6)
                            {                       16} {15  } : gily 'qn      
^SCR("P1TZ",7)
                            {                       21} {20  } :dcrqn 'qn      
^SCR("P1TZ",8)
                                                                       1]      
^SCR("P1TZ",9)
              {34    }:dxzi  {33     }: mley         {32     }: iekifl         
^SCR("P1TZ",10)
       [1                                                                      
^SCR("P1TZ",11)
                                                        {35      }:onefna mley 
^SCR("P1TZ",12)
                                                                               
^SCR("P1TZ",13)
                                                                               
^SCR("P1TZ",14)
 {50    }:sipq+wpa  {45       }: .f.z {42      } wiy 'qn {40      }: wiya mley 
^SCR("P1TZ",15)
                       {62     } oerxtl {60        }:oeayg qn                  
^SCR("P1TZ",16)
                                                                               
^SCR("P1TZ",17)
              {75     }: dwqr qn  {72      }:mley {70               }: `"k 'qn 
^SCR("P1TZ",18)
                                                                              
^SCR("P1TZ",19)
                                                          {78       }:    dtwd 
^SCR("P1TZ",20)
                                                                               
^SCR("P1TZ",21)
         {                                                            80}:dxrd 
^SCR("P1TZ","A",1)
‰…‹‰†šƒ…’š
^SCR("P1TZ","A",2)

^SCR("P1TZ","A",3)
:„’™:Š‰˜€š:‰…‹‰†šƒ…’š
^SCR("P1TZ","A",4)
:�™:�‡Œ…™'‘Ž…€(Œˆ)‡…—Œ'‘Ž
^SCR("P1TZ","A",5)
:˜–ŒŽ'‘Ž
^SCR("P1TZ","A",6)
:‡‰Œ™'‘Ž
^SCR("P1TZ","A",7)
:„ƒ’‘Ž'‘Ž
^SCR("P1TZ","A",8)

^SCR("P1TZ","A",9)
:„˜š‰:�Œ…™:‰…‹‰†Œ
^SCR("P1TZ","A",10)

^SCR("P1TZ","A",11)
:�Ž…†Ž��Œ…™
^SCR("P1TZ","A",12)

^SCR("P1TZ","A",13)

^SCR("P1TZ","A",14)
:“‰�‘+—��:.†.š—‰™'‘Ž:—‰™��Œ…™
^SCR("P1TZ","A",15)
�…’˜”Œ:�…�™‡‘Ž
^SCR("P1TZ","A",16)

^SCR("P1TZ","A",17)
:„—‘’‘Ž:�Œ…™:€"‹'‘Ž
^SCR("P1TZ","A",18)

^SCR("P1TZ","A",19)
:„”—„
^SCR("P1TZ","A",20)

^SCR("P1TZ","A",21)
:„˜’„
^SCR("P1TZ","AV",1)
hufhz,sug,
^SCR("P1TZ","AV",2)

^SCR("P1TZ","AV",3)
:vga:lhrt,:hufhz,sug,
^SCR("P1TZ","AV",4)
:oa:ijkuawxnut(ky)juekwxn
^SCR("P1TZ","AV",5)
:rmknwxn
^SCR("P1TZ","AV",6)
:jhkawxn
^SCR("P1TZ","AV",7)
:vsgxnwxn
^SCR("P1TZ","AV",8)

^SCR("P1TZ","AV",9)
:vr,h:okua:hufhzk
^SCR("P1TZ","AV",10)

^SCR("P1TZ","AV",11)
:inuzncokua
^SCR("P1TZ","AV",12)

^SCR("P1TZ","AV",13)

^SCR("P1TZ","AV",14)
:;hbx+ebc:/z/,ehawxn:ehacokua
^SCR("P1TZ","AV",15)
iugrpk:iucajxn
^SCR("P1TZ","AV",16)

^SCR("P1TZ","AV",17)
:vexgxn:okua:t"fwxn
^SCR("P1TZ","AV",18)

^SCR("P1TZ","AV",19)
:vpev
^SCR("P1TZ","AV",20)

^SCR("P1TZ","AV",21)
:vrgv
^SCR("P1TZ","NAME")

^SCR("P1TZ","P",1,"CRD")
3,54,E,6,0
^SCR("P1TZ","P",1,"HELP")
<PGDN> - `ad jnqn , <PGUP> - mcew jnqn 
^SCR("P1TZ","P",1,"LMAX")
6
^SCR("P1TZ","P",1,"MUMPS1")
S:'$G(TZK) TZK=$ZP(^P1TZ(999999))+1
^SCR("P1TZ","P",1,"MUMPS2")
D TZK^P1TZ
^SCR("P1TZ","P",1,"MUST")

^SCR("P1TZ","P",1,"TYP")
E
^SCR("P1TZ","P",3,"CRD")
3,34,D,8,0
^SCR("P1TZ","P",3,"HELP")

^SCR("P1TZ","P",3,"LMAX")
9
^SCR("P1TZ","P",3,"MUMPS1")

^SCR("P1TZ","P",3,"MUMPS2")

^SCR("P1TZ","P",3,"OUTPUT")

^SCR("P1TZ","P",3,"TYP")
D
^SCR("P1TZ","P",4,"CRD")
3,18,T,8,0
^SCR("P1TZ","P",4,"HELP")

^SCR("P1TZ","P",4,"LMAX")
8
^SCR("P1TZ","P",4,"MUMPS1")

^SCR("P1TZ","P",4,"MUMPS2")

^SCR("P1TZ","P",4,"OUTPUT")

^SCR("P1TZ","P",4,"TYP")
T
^SCR("P1TZ","P",5,"CHECK")
Y
^SCR("P1TZ","P",5,"CRD")
4,34,E,11,0
^SCR("P1TZ","P",5,"FNC")

^SCR("P1TZ","P",5,"GLOB")
LKH
^SCR("P1TZ","P",5,"HELP")

^SCR("P1TZ","P",5,"LMAX")
11
^SCR("P1TZ","P",5,"MUMPS1")

^SCR("P1TZ","P",5,"MUMPS2")

^SCR("P1TZ","P",5,"MUST")

^SCR("P1TZ","P",5,"NLN")
20
^SCR("P1TZ","P",5,"RZD")
\
^SCR("P1TZ","P",5,"TOPB")
8
^SCR("P1TZ","P",5,"TYP")
E
^SCR("P1TZ","P",5,"VRB")
NAME
^SCR("P1TZ","P",10,"CRD")
4,29,H,20
^SCR("P1TZ","P",10,"HELP")

^SCR("P1TZ","P",10,"LMAX")
25
^SCR("P1TZ","P",10,"MUMPS1")

^SCR("P1TZ","P",10,"MUMPS2")

^SCR("P1TZ","P",10,"OUTPUT")

^SCR("P1TZ","P",10,"TYP")
H
^SCR("P1TZ","P",12,"CRD")
5,53,E,5.,0
^SCR("P1TZ","P",12,"FNC")

^SCR("P1TZ","P",12,"GLOB")
NAME
^SCR("P1TZ","P",12,"HELP")

^SCR("P1TZ","P",12,"LMAX")
8
^SCR("P1TZ","P",12,"MUMPS1")

^SCR("P1TZ","P",12,"MUMPS2")
S MLZ1=$$^P1NAME(MLZ)
^SCR("P1TZ","P",12,"MUST")

^SCR("P1TZ","P",12,"NLN")
20
^SCR("P1TZ","P",12,"RZD")
\
^SCR("P1TZ","P",12,"TOPB")
8
^SCR("P1TZ","P",12,"TYP")
E
^SCR("P1TZ","P",12,"VRB")
MLZ1
^SCR("P1TZ","P",13,"CRD")
5,52,H,23
^SCR("P1TZ","P",13,"HELP")

^SCR("P1TZ","P",13,"LMAX")
23
^SCR("P1TZ","P",13,"MUMPS1")

^SCR("P1TZ","P",13,"MUMPS2")

^SCR("P1TZ","P",13,"OUTPUT")

^SCR("P1TZ","P",13,"TYP")
H
^SCR("P1TZ","P",15,"CHECK")
Y
^SCR("P1TZ","P",15,"CRD")
6,56,E,4,0
^SCR("P1TZ","P",15,"FNC")

^SCR("P1TZ","P",15,"GLOB")
P1SL
^SCR("P1TZ","P",15,"HELP")

^SCR("P1TZ","P",15,"LMAX")
5
^SCR("P1TZ","P",15,"MUMPS1")

^SCR("P1TZ","P",15,"MUMPS2")

^SCR("P1TZ","P",15,"NLN")
20
^SCR("P1TZ","P",15,"RZD")
\
^SCR("P1TZ","P",15,"TOPB")
8
^SCR("P1TZ","P",15,"TYP")
E
^SCR("P1TZ","P",15,"VRB")
PSL1
^SCR("P1TZ","P",16,"CRD")
6,55,H,26
^SCR("P1TZ","P",16,"HELP")

^SCR("P1TZ","P",16,"LMAX")
26
^SCR("P1TZ","P",16,"MUMPS1")

^SCR("P1TZ","P",16,"MUMPS2")

^SCR("P1TZ","P",16,"OUTPUT")

^SCR("P1TZ","P",16,"TYP")
H
^SCR("P1TZ","P",20,"CHECK")
Y
^SCR("P1TZ","P",20,"CRD")
7,56,E,3,0
^SCR("P1TZ","P",20,"FNC")

^SCR("P1TZ","P",20,"GLOB")
P1MSD
^SCR("P1TZ","P",20,"HELP")

^SCR("P1TZ","P",20,"LMAX")
5
^SCR("P1TZ","P",20,"MUMPS1")

^SCR("P1TZ","P",20,"MUMPS2")

^SCR("P1TZ","P",20,"MUST")

^SCR("P1TZ","P",20,"NLN")
20
^SCR("P1TZ","P",20,"RZD")
\
^SCR("P1TZ","P",20,"TOPB")
8
^SCR("P1TZ","P",20,"TYP")
E
^SCR("P1TZ","P",20,"VRB")
MSD1
^SCR("P1TZ","P",21,"CRD")
7,55,H,26,0
^SCR("P1TZ","P",21,"HELP")

^SCR("P1TZ","P",21,"LMAX")
26
^SCR("P1TZ","P",21,"MUMPS1")

^SCR("P1TZ","P",21,"MUMPS2")

^SCR("P1TZ","P",21,"OUTPUT")

^SCR("P1TZ","P",21,"TYP")
H
^SCR("P1TZ","P",32,"CRD")
9,53,N,8,2
^SCR("P1TZ","P",32,"HELP")

^SCR("P1TZ","P",32,"LMAX")
8
^SCR("P1TZ","P",32,"MUMPS1")

^SCR("P1TZ","P",32,"MUMPS2")

^SCR("P1TZ","P",32,"TYP")
N
^SCR("P1TZ","P",33,"CRD")
9,29,N,8,2
^SCR("P1TZ","P",33,"HELP")

^SCR("P1TZ","P",33,"LMAX")
8
^SCR("P1TZ","P",33,"MUMPS1")

^SCR("P1TZ","P",33,"MUMPS2")

^SCR("P1TZ","P",33,"OUTPUT")

^SCR("P1TZ","P",33,"TYP")
N
^SCR("P1TZ","P",34,"CRD")
9,14,N,7,2
^SCR("P1TZ","P",34,"HELP")

^SCR("P1TZ","P",34,"LMAX")
7
^SCR("P1TZ","P",34,"MUMPS1")

^SCR("P1TZ","P",34,"MUMPS2")

^SCR("P1TZ","P",34,"OUTPUT")

^SCR("P1TZ","P",34,"TYP")
N
^SCR("P1TZ","P",35,"CRD")
11,56,N,8,2
^SCR("P1TZ","P",35,"HELP")
<F1> - wegnl
^SCR("P1TZ","P",35,"LMAX")
9
^SCR("P1TZ","P",35,"MUMPS1")

^SCR("P1TZ","P",35,"MUMPS2")

^SCR("P1TZ","P",35,"TYP")
N
^SCR("P1TZ","P",40,"CRD")
14,57,N,8,2
^SCR("P1TZ","P",40,"HELP")

^SCR("P1TZ","P",40,"LMAX")
9
^SCR("P1TZ","P",40,"MUMPS1")

^SCR("P1TZ","P",40,"MUMPS2")

^SCR("P1TZ","P",40,"TYP")
N
^SCR("P1TZ","P",42,"CRD")
14,38,E,9,0
^SCR("P1TZ","P",42,"HELP")

^SCR("P1TZ","P",42,"LMAX")
9
^SCR("P1TZ","P",42,"MUMPS1")

^SCR("P1TZ","P",42,"MUMPS2")

^SCR("P1TZ","P",42,"TYP")
E
^SCR("P1TZ","P",45,"CRD")
14,20,E,10,0
^SCR("P1TZ","P",45,"HELP")

^SCR("P1TZ","P",45,"LMAX")
10
^SCR("P1TZ","P",45,"MUMPS1")

^SCR("P1TZ","P",45,"MUMPS2")
I '$$^TZ(TZ) S %GET=" 99 - xey`l . iweg epi` xtqn " D N^%L1GET I %S'=99 S %SC("ER")=1
^SCR("P1TZ","P",45,"MUST")

^SCR("P1TZ","P",45,"TYP")
E
^SCR("P1TZ","P",50,"CRD")
14,1,E,5,0
^SCR("P1TZ","P",50,"HELP")

^SCR("P1TZ","P",50,"LMAX")
7
^SCR("P1TZ","P",50,"MUMPS1")

^SCR("P1TZ","P",50,"MUMPS2")
I BSN<10000 S %SAY=" zextq 5 lra `ed xtqn " X %XMSGV(1) S %SC("ER")=1
^SCR("P1TZ","P",50,"MUST")

^SCR("P1TZ","P",50,"TYP")
E
^SCR("P1TZ","P",60,"CRD")
15,40,E,11,0
^SCR("P1TZ","P",60,"HELP")

^SCR("P1TZ","P",60,"LMAX")
11
^SCR("P1TZ","P",60,"MUMPS1")

^SCR("P1TZ","P",60,"MUMPS2")
I HESH'?1N.N S %SC("ER")=1
^SCR("P1TZ","P",60,"MUST")

^SCR("P1TZ","P",60,"TYP")
E
^SCR("P1TZ","P",62,"CRD")
15,23,D,8,0
^SCR("P1TZ","P",62,"HELP")

^SCR("P1TZ","P",62,"LMAX")
8
^SCR("P1TZ","P",62,"MUMPS1")

^SCR("P1TZ","P",62,"MUMPS2")
I $$^%L1DC(DATP,3)-$H>60!($H-$$^%L1DC(DATP,3)>60) S %SC("ER")=1
^SCR("P1TZ","P",62,"MUST")

^SCR("P1TZ","P",62,"TYP")
D
^SCR("P1TZ","P",70,"CRD")
17,50,E,16,0
^SCR("P1TZ","P",70,"HELP")

^SCR("P1TZ","P",70,"LMAX")
18
^SCR("P1TZ","P",70,"MUMPS1")

^SCR("P1TZ","P",70,"MUMPS2")

^SCR("P1TZ","P",70,"TYP")
E
^SCR("P1TZ","P",72,"CRD")
17,34,N,8,2
^SCR("P1TZ","P",72,"HELP")

^SCR("P1TZ","P",72,"LMAX")
9
^SCR("P1TZ","P",72,"MUMPS1")

^SCR("P1TZ","P",72,"MUMPS2")

^SCR("P1TZ","P",72,"OUTPUT")

^SCR("P1TZ","P",72,"TYP")
N
^SCR("P1TZ","P",75,"CRD")
17,14,E,8,0
^SCR("P1TZ","P",75,"HELP")

^SCR("P1TZ","P",75,"LMAX")
8
^SCR("P1TZ","P",75,"MUMPS1")

^SCR("P1TZ","P",75,"MUMPS2")

^SCR("P1TZ","P",75,"OUTPUT")

^SCR("P1TZ","P",75,"TYP")
E
^SCR("P1TZ","P",78,"CRD")
19,58,N,8,2
^SCR("P1TZ","P",78,"HELP")

^SCR("P1TZ","P",78,"LMAX")
10
^SCR("P1TZ","P",78,"MUMPS1")

^SCR("P1TZ","P",78,"MUMPS2")

^SCR("P1TZ","P",78,"OUTPUT")

^SCR("P1TZ","P",78,"TYP")
N
^SCR("P1TZ","P",80,"CRD")
21,73,H,60,0
^SCR("P1TZ","P",80,"HELP")

^SCR("P1TZ","P",80,"LMAX")
63
^SCR("P1TZ","P",80,"MUMPS1")

^SCR("P1TZ","P",80,"MUMPS2")

^SCR("P1TZ","P",80,"MUST")

^SCR("P1TZ","P",80,"TYP")
H
^SCR("P1TZ","P","NAME","ASR")
78
^SCR("P1TZ","P","NAME","ASR","REF")
$P($G(^TEMP($P,TZK)),"\",11)
^SCR("P1TZ","P","NAME","ASR","REF1")
$P(^TEMP($P,TZK),"\",11)
^SCR("P1TZ","P","NAME","BSN")
50
^SCR("P1TZ","P","NAME","BSN","REF")
$P($G(^TEMP($P,TZK,"CH")),"*",4)
^SCR("P1TZ","P","NAME","BSN","REF1")
$P(^TEMP($P,TZK,"CH"),"*",4)
^SCR("P1TZ","P","NAME","CA")
72
^SCR("P1TZ","P","NAME","CA","REF")
$P($G(^TEMP($P,TZK,"V")),"*",7)
^SCR("P1TZ","P","NAME","CA","REF1")
$P(^TEMP($P,TZK,"V"),"*",7)
^SCR("P1TZ","P","NAME","CHK")
40
^SCR("P1TZ","P","NAME","CHK","REF")
$P($G(^TEMP($P,TZK,"CH")),"*",1)
^SCR("P1TZ","P","NAME","CHK","REF1")
$P(^TEMP($P,TZK,"CH"),"*",1)
^SCR("P1TZ","P","NAME","DATP")
62
^SCR("P1TZ","P","NAME","DATP","REF")
$P($G(^TEMP($P,TZK,"CH")),"*",6)
^SCR("P1TZ","P","NAME","DATP","REF1")
$P(^TEMP($P,TZK,"CH"),"*",6)
^SCR("P1TZ","P","NAME","DZ","REF")
$P($G(^TEMP($P,TZK)),"\",8)
^SCR("P1TZ","P","NAME","DZ","REF1")
$P(^TEMP($P,TZK),"\",8)
^SCR("P1TZ","P","NAME","HESH")
60
^SCR("P1TZ","P","NAME","HESH","REF")
$P($G(^TEMP($P,TZK,"CH")),"*",5)
^SCR("P1TZ","P","NAME","HESH","REF1")
$P(^TEMP($P,TZK,"CH"),"*",5)
^SCR("P1TZ","P","NAME","HRA")
80
^SCR("P1TZ","P","NAME","HRA","REF")
$P($G(^TEMP($P,TZK)),"\",7)
^SCR("P1TZ","P","NAME","HRA","REF1")
$P(^TEMP($P,TZK),"\",7)
^SCR("P1TZ","P","NAME","MLZ")
12
^SCR("P1TZ","P","NAME","MLZ","REF")
$P($G(^TEMP($P,TZK)),"\",9)
^SCR("P1TZ","P","NAME","MLZ","REF1")
$P(^TEMP($P,TZK),"\",9)
^SCR("P1TZ","P","NAME","MLZ1")
13
^SCR("P1TZ","P","NAME","MSD")
20
^SCR("P1TZ","P","NAME","MSD","REF")
$P($G(^TEMP($P,TZK)),"\",12)
^SCR("P1TZ","P","NAME","MSD","REF1")
$P(^TEMP($P,TZK),"\",12)
^SCR("P1TZ","P","NAME","MSD1")
21
^SCR("P1TZ","P","NAME","MZM")
35
^SCR("P1TZ","P","NAME","MZM","REF")
$P($G(^TEMP($P,TZK)),"\",2)
^SCR("P1TZ","P","NAME","MZM","REF1")
$P(^TEMP($P,TZK),"\",2)
^SCR("P1TZ","P","NAME","NAME")
10
^SCR("P1TZ","P","NAME","NCA")
70
^SCR("P1TZ","P","NAME","NCA","REF")
$P($G(^TEMP($P,TZK,"V")),"*",2)
^SCR("P1TZ","P","NAME","NCA","REF1")
$P(^TEMP($P,TZK,"V"),"*",2)
^SCR("P1TZ","P","NAME","NCHECK")
42
^SCR("P1TZ","P","NAME","NCHECK","REF")
$P($G(^TEMP($P,TZK,"CH")),"*",2)
^SCR("P1TZ","P","NAME","NCHECK","REF1")
$P(^TEMP($P,TZK,"CH"),"*",2)
^SCR("P1TZ","P","NAME","NISKA")
75
^SCR("P1TZ","P","NAME","NISKA","REF")
$P($G(^TEMP($P,TZK,"V")),"*",3)
^SCR("P1TZ","P","NAME","NISKA","REF1")
$P(^TEMP($P,TZK,"V"),"*",3)
^SCR("P1TZ","P","NAME","NMB")
5
^SCR("P1TZ","P","NAME","NMB","REF")
$P($G(^TEMP($P,TZK)),"\",1)
^SCR("P1TZ","P","NAME","NMB","REF1")
$P(^TEMP($P,TZK),"\",1)
^SCR("P1TZ","P","NAME","P1","REF")
$P($G(^TEMP($P,TZK,"V")),"*",8)
^SCR("P1TZ","P","NAME","P1","REF1")
$P(^TEMP($P,TZK,"V"),"*",8)
^SCR("P1TZ","P","NAME","PART","REF")
$P($G(^TEMP($P,TZK)),"\",13)
^SCR("P1TZ","P","NAME","PART","REF1")
$P(^TEMP($P,TZK),"\",13)
^SCR("P1TZ","P","NAME","PC","REF")
$P($G(^TEMP($P,TZK,"V")),"*",10)
^SCR("P1TZ","P","NAME","PC","REF1")
$P(^TEMP($P,TZK,"V"),"*",10)
^SCR("P1TZ","P","NAME","PN","REF")
$P($G(^TEMP($P,TZK,"V")),"*",9)
^SCR("P1TZ","P","NAME","PN","REF1")
$P(^TEMP($P,TZK,"V"),"*",9)
^SCR("P1TZ","P","NAME","PSL")
15
^SCR("P1TZ","P","NAME","PSL","REF")
$P($G(^TEMP($P,TZK)),"\",10)
^SCR("P1TZ","P","NAME","PSL","REF1")
$P(^TEMP($P,TZK),"\",10)
^SCR("P1TZ","P","NAME","PSL1")
16
^SCR("P1TZ","P","NAME","RZN")
34
^SCR("P1TZ","P","NAME","SHTZ")
4
^SCR("P1TZ","P","NAME","SHTZ","REF")
$P($G(^TEMP($P,TZK)),"\",6)
^SCR("P1TZ","P","NAME","SHTZ","REF1")
$P(^TEMP($P,TZK),"\",6)
^SCR("P1TZ","P","NAME","SHUL")
33
^SCR("P1TZ","P","NAME","SUG1","REF")
$P($G(^TEMP($P,TZK,"V")),"*",5)
^SCR("P1TZ","P","NAME","SUG1","REF1")
$P(^TEMP($P,TZK,"V"),"*",5)
^SCR("P1TZ","P","NAME","SUG21","REF")
$P($G(^TEMP($P,TZK,"V")),"*",4)
^SCR("P1TZ","P","NAME","SUG21","REF1")
$P(^TEMP($P,TZK,"V"),"*",4)
^SCR("P1TZ","P","NAME","TRTZ")
3
^SCR("P1TZ","P","NAME","TRTZ","REF")
$P($G(^TEMP($P,TZK)),"\",5)
^SCR("P1TZ","P","NAME","TRTZ","REF1")
$P(^TEMP($P,TZK),"\",5)
^SCR("P1TZ","P","NAME","TSHL")
32
^SCR("P1TZ","P","NAME","TZ")
45
^SCR("P1TZ","P","NAME","TZ","REF")
$P($G(^TEMP($P,TZK,"CH")),"*",3)
^SCR("P1TZ","P","NAME","TZ","REF1")
$P(^TEMP($P,TZK,"CH"),"*",3)
^SCR("P1TZ","P","NAME","TZK")
1
^SCR("P1TZ","P","NAME","TZK","KEY")

^SCR("P1TZ","P","NAME","TZK","KEY",1)
TZK/\NMB,MZM,CHK,CA,TRTZ,SHTZ,HRA,DZ,MLZ,PSL,ASR,MSD,PART
^SCR("P1TZ","P","NAME","TZK","KEY",2)
TZK/\VTS,NCA,NISKA,SUG21,SUG1,CA,CA,P1,PN,PC
^SCR("P1TZ","P","NAME","TZK","KEY",3)
TZK/\CHK,NCHECK,TZ,BSN,HESH,DATP
^SCR("P1TZ","P","NAME","VTS","REF")
$P($G(^TEMP($P,TZK,"V")),"*",1)
^SCR("P1TZ","P","NAME","VTS","REF1")
$P(^TEMP($P,TZK,"V"),"*",1)
^SCR("P1TZ","P","NM",1)
TZK
^SCR("P1TZ","P","NM",3)
TRTZ
^SCR("P1TZ","P","NM",4)
SHTZ
^SCR("P1TZ","P","NM",5)
NMB
^SCR("P1TZ","P","NM",10)
NAME
^SCR("P1TZ","P","NM",12)
MLZ
^SCR("P1TZ","P","NM",13)
MLZ1
^SCR("P1TZ","P","NM",15)
PSL
^SCR("P1TZ","P","NM",16)
PSL1
^SCR("P1TZ","P","NM",20)
MSD
^SCR("P1TZ","P","NM",21)
MSD1
^SCR("P1TZ","P","NM",32)
TSHL
^SCR("P1TZ","P","NM",33)
SHUL
^SCR("P1TZ","P","NM",34)
RZN
^SCR("P1TZ","P","NM",35)
MZM
^SCR("P1TZ","P","NM",40)
CHK
^SCR("P1TZ","P","NM",42)
NCHECK
^SCR("P1TZ","P","NM",45)
TZ
^SCR("P1TZ","P","NM",50)
BSN
^SCR("P1TZ","P","NM",60)
HESH
^SCR("P1TZ","P","NM",62)
DATP
^SCR("P1TZ","P","NM",70)
NCA
^SCR("P1TZ","P","NM",72)
CA
^SCR("P1TZ","P","NM",75)
NISKA
^SCR("P1TZ","P","NM",78)
ASR
^SCR("P1TZ","P","NM",80)
HRA
^SCR("P1TZ","P","RB",1)
9,8,11,73
^SCR("P1TZ","P","REF",1)
^TEMP($P,TZK)
^SCR("P1TZ","P","REF",1,"RZD")
\
^SCR("P1TZ","P","REF",1,"STR")
NMB\MZM\CHK\CA\TRTZ\SHTZ\HRA\DZ\MLZ\PSL\ASR\MSD\PART
^SCR("P1TZ","P","REF",2)
^TEMP($P,TZK,"V")
^SCR("P1TZ","P","REF",2,"RZD")
*
^SCR("P1TZ","P","REF",2,"STR")
VTS*NCA*NISKA*SUG21*SUG1*CA*CA*P1*PN*PC
^SCR("P1TZ","P","REF",3)
^TEMP($P,TZK,"CH")
^SCR("P1TZ","P","REF",3,"RZD")
*
^SCR("P1TZ","P","REF",3,"STR")
CHK*NCHECK*TZ*BSN*HESH*DATP
^SCR("P1ULDR")
H
^SCR("P1ULDR","NAME")
GUI-l ogley xeiv
^SCR("P1W")
H
^SCR("P1W",1)
                                  # mixeviw oelin #                            
^SCR("P1W",2)
                                                                               
^SCR("P1W",3)
                                                                     1$        
^SCR("P1W",4)
                            :            iehia          : xeviw :              
^SCR("P1W",5)
                                                                               
^SCR("P1W",6)
                                                                               
^SCR("P1W",7)
                                                                               
^SCR("P1W",8)
                                                                               
^SCR("P1W",9)
                                                                               
^SCR("P1W",10)
                                                                               
^SCR("P1W",11)
                                                                               
^SCR("P1W",12)
                                                                               
^SCR("P1W",13)
                                                                               
^SCR("P1W",14)
                                                                               
^SCR("P1W",15)
                                                                               
^SCR("P1W",16)
                                                                               
^SCR("P1W",17)
                                                                               
^SCR("P1W",18)
                                                                               
^SCR("P1W",19)
                                                                               
^SCR("P1W",20)
                                                                               
^SCR("P1W",21)
                     $1                                                        
^SCR("P1W","A",1)
�‰˜…–‰—�…Œ‰Ž
^SCR("P1W","A",2)

^SCR("P1W","A",3)

^SCR("P1W","A",4)
‰…ˆ‰�˜…–‰—
^SCR("P1W","A",5)
----------------------------------
^SCR("P1W","A",6)

^SCR("P1W","A",7)

^SCR("P1W","A",8)

^SCR("P1W","A",9)

^SCR("P1W","A",10)

^SCR("P1W","A",11)

^SCR("P1W","A",12)

^SCR("P1W","A",13)

^SCR("P1W","A",14)

^SCR("P1W","A",15)

^SCR("P1W","A",16)

^SCR("P1W","A",17)

^SCR("P1W","A",18)

^SCR("P1W","A",19)

^SCR("P1W","A",20)

^SCR("P1W","A",21)

^SCR("P1W","AV",1)
ohrumheiukhn
^SCR("P1W","AV",2)

^SCR("P1W","AV",3)

^SCR("P1W","AV",4)
huyhcrumhe
^SCR("P1W","AV",5)
----------------------------------
^SCR("P1W","AV",6)

^SCR("P1W","AV",7)

^SCR("P1W","AV",8)

^SCR("P1W","AV",9)

^SCR("P1W","AV",10)

^SCR("P1W","AV",11)

^SCR("P1W","AV",12)

^SCR("P1W","AV",13)

^SCR("P1W","AV",14)

^SCR("P1W","AV",15)

^SCR("P1W","AV",16)

^SCR("P1W","AV",17)

^SCR("P1W","AV",18)

^SCR("P1W","AV",19)

^SCR("P1W","AV",20)

^SCR("P1W","AV",21)

^SCR("P1W","G",1,"CRD")
5,64,H,7,0
^SCR("P1W","G",1,"HELP")

^SCR("P1W","G",1,"LMAX")
7
^SCR("P1W","G",1,"MUMPS1")
S %ZMSF=""
^SCR("P1W","G",1,"MUMPS2")
D BDIKA^P1W
^SCR("P1W","G",1,"MUST")

^SCR("P1W","G",1,"SHEM")
 xeviw 
^SCR("P1W","G",1,"TYP")
H
^SCR("P1W","G",2,"CRD")
5,56,H,27,0
^SCR("P1W","G",2,"HELP")

^SCR("P1W","G",2,"LMAX")
27
^SCR("P1W","G",2,"MUMPS1")

^SCR("P1W","G",2,"MUMPS2")

^SCR("P1W","G",2,"MUST")

^SCR("P1W","G",2,"SHEM")
            iehia          
^SCR("P1W","G",2,"TYP")
H
^SCR("P1W","G","DEL")
Y
^SCR("P1W","G","MAX")
99999
^SCR("P1W","G","NAME","W")
1
^SCR("P1W","G","NAME","W1")
2
^SCR("P1W","G","NM",1)
W
^SCR("P1W","G","NM",2)
W1
^SCR("P1W","G","RB")
4,22,22,71
^SCR("P1W","G","REF")
^TEMP($P,"W"
^SCR("P1W","G","RZD")
\
^SCR("P1W","G","STEP")
1
^SCR("P1W","G","STG")
                            :            iehia          : xeviw :              
^SCR("P1W","G","VG")
6
^SCR("P1W","NAME")
mixeviw oelin
^SCR("PARHIP")
H
^SCR("PARHIP",1)
                                         # hixt yetig #                        
^SCR("PARHIP",2)
                                                                               
^SCR("PARHIP",3)
                                                                           1]  
^SCR("PARHIP",4)
                                                                               
^SCR("PARHIP",5)
                     {                     02} {01      }:  oekcrl dcy cew     
^SCR("PARHIP",6)
                                                                               
^SCR("PARHIP",7)
                      {04       }: hixt cew cr      {03       }: hixt cewn     
^SCR("PARHIP",8)
                     {06:yetig oniq   {                    05} :   hixt my     
^SCR("PARHIP",9)
                                                                               
^SCR("PARHIP",10)
   {               11}{10   }: (<-> - dwlgn `ll,<ENTER>- zewlgnd lk) dwlgn     
^SCR("PARHIP",11)
    {              15}{14   }:beq cr {               13}{12   }: hixt beqn     
^SCR("PARHIP",12)
                                                                               
^SCR("PARHIP",13)
               {40      }:    dxikn xign cr    {35      }:     dxikn xignn     
^SCR("PARHIP",14)
                                                    { 53}:      (l/k) lwyn     
^SCR("PARHIP",15)
                                                                               
^SCR("PARHIP",16)
                                                 {60     :       zqtcn 'qn     
^SCR("PARHIP",17)
  [1                                                                           
^SCR("PARHIP",18)
                     dcy mewna "-" `lnl `p mieqn dcy `ll mihixt xegal ick      
^SCR("PARHIP",19)
                                                                               
^SCR("PARHIP","A",1)
ˆ‰˜”™…”‰‡
^SCR("PARHIP","A",2)

^SCR("PARHIP","A",3)

^SCR("PARHIP","A",4)

^SCR("PARHIP","A",5)
:�…‹ƒ’Œ„ƒ™ƒ…—
^SCR("PARHIP","A",6)

^SCR("PARHIP","A",7)
:ˆ‰˜”ƒ…—ƒ’:ˆ‰˜”ƒ…—Ž
^SCR("PARHIP","A",8)
:™…”‰‡�Ž‰‘:ˆ‰˜”�™
^SCR("PARHIP","A",9)

^SCR("PARHIP","A",10)
:(<->-„—Œ‡Ž€ŒŒ,<ENTER>-š…—Œ‡Ž„Œ‹)„—Œ‡Ž
^SCR("PARHIP","A",11)
:‚…‘ƒ’:ˆ‰˜”‚…‘Ž
^SCR("PARHIP","A",12)

^SCR("PARHIP","A",13)
:„˜‰‹Ž˜‰‡Žƒ’:„˜‰‹Ž˜‰‡ŽŽ
^SCR("PARHIP","A",14)
:(Œ/‹)Œ—™Ž
^SCR("PARHIP","A",15)

^SCR("PARHIP","A",16)
:š‘”ƒŽ'‘Ž
^SCR("PARHIP","A",17)

^SCR("PARHIP","A",18)
„ƒ™�…—Ž�"-"€ŒŽŒ€��‰…‘Ž„ƒ™€ŒŒ�‰ˆ‰˜”˜…‡�Œ‰ƒ‹
^SCR("PARHIP","A",19)

^SCR("PARHIP","AV",1)
yhrpauphj
^SCR("PARHIP","AV",2)

^SCR("PARHIP","AV",3)

^SCR("PARHIP","AV",4)

^SCR("PARHIP","AV",5)
:iufsgkvsasue
^SCR("PARHIP","AV",6)

^SCR("PARHIP","AV",7)
:yhrpsuesg:yhrpsuen
^SCR("PARHIP","AV",8)
:auphjinhx:yhrpoa
^SCR("PARHIP","AV",9)

^SCR("PARHIP","AV",10)
:(<->-vekjntkk'<ENTER>-,uekjnvkf)vekjn
^SCR("PARHIP","AV",11)
:duxsg:yhrpduxn
^SCR("PARHIP","AV",12)

^SCR("PARHIP","AV",13)
:vrhfnrhjnsg:vrhfnrhjnn
^SCR("PARHIP","AV",14)
:(kqf)kean
^SCR("PARHIP","AV",15)

^SCR("PARHIP","AV",16)
:,xpsnwxn
^SCR("PARHIP","AV",17)

^SCR("PARHIP","AV",18)
vsaouenc"-"tknktbohuxnvsatkkohyhrprujckhsf
^SCR("PARHIP","AV",19)

^SCR("PARHIP","NAME")
akxen zixt yetig
^SCR("PARHIP","P",1,"CRD")
5,47,E,8,0
^SCR("PARHIP","P",1,"HELP")
<F7> - micew zbvd 
^SCR("PARHIP","P",1,"LMAX")
9
^SCR("PARHIP","P",1,"MUMPS1")

^SCR("PARHIP","P",1,"MUMPS2")
D FLD^P1PARHIP
^SCR("PARHIP","P",1,"TYP")
E
^SCR("PARHIP","P",2,"CRD")
5,46,H,20,0
^SCR("PARHIP","P",2,"HELP")

^SCR("PARHIP","P",2,"LMAX")
24
^SCR("PARHIP","P",2,"MUMPS1")

^SCR("PARHIP","P",2,"MUMPS2")

^SCR("PARHIP","P",2,"OUTPUT")

^SCR("PARHIP","P",2,"TYP")
H
^SCR("PARHIP","P",3,"CRD")
7,52,E,8,0
^SCR("PARHIP","P",3,"FNC")

^SCR("PARHIP","P",3,"GLOB")
PAR
^SCR("PARHIP","P",3,"HELP")

^SCR("PARHIP","P",3,"LMAX")
10
^SCR("PARHIP","P",3,"MUMPS1")

^SCR("PARHIP","P",3,"MUMPS2")

^SCR("PARHIP","P",3,"NLN")
20
^SCR("PARHIP","P",3,"RZD")
\
^SCR("PARHIP","P",3,"TOPB")
8
^SCR("PARHIP","P",3,"TYP")
E
^SCR("PARHIP","P",4,"CRD")
7,22,E,8,0
^SCR("PARHIP","P",4,"FNC")

^SCR("PARHIP","P",4,"GLOB")
PAR
^SCR("PARHIP","P",4,"HELP")

^SCR("PARHIP","P",4,"LMAX")
10
^SCR("PARHIP","P",4,"MUMPS1")

^SCR("PARHIP","P",4,"MUMPS2")
I ADPAR<MEPAR S %SC("ER")=1
^SCR("PARHIP","P",4,"NLN")
20
^SCR("PARHIP","P",4,"RZD")
\
^SCR("PARHIP","P",4,"TOPB")
8
^SCR("PARHIP","P",4,"TYP")
E
^SCR("PARHIP","P",5,"CRD")
8,62,H,23,0
^SCR("PARHIP","P",5,"HELP")

^SCR("PARHIP","P",5,"LMAX")
23
^SCR("PARHIP","P",5,"MUMPS1")

^SCR("PARHIP","P",5,"MUMPS2")
S %SCO="",PRHIP="" I '$L(SHEMP) S %SCO="PRHIP"
^SCR("PARHIP","P",5,"TYP")
H
^SCR("PARHIP","P",6,"CRD")
8,21,N,1,0
^SCR("PARHIP","P",6,"HELP")
4 - ihpet yetig ,3 - milin sqe` , 2 - mewn lka ,1 - dxey zligza hqwh
^SCR("PARHIP","P",6,"LMAX")
3
^SCR("PARHIP","P",6,"MUMPS1")
S:'$G(PRHIP)&$L(SHEMP) PRHIP=3
^SCR("PARHIP","P",6,"MUMPS2")

^SCR("PARHIP","P",6,"TYP")
N
^SCR("PARHIP","P",10,"CRD")
10,22,E,5,0
^SCR("PARHIP","P",10,"FNC")

^SCR("PARHIP","P",10,"GLOB")
DEP
^SCR("PARHIP","P",10,"HELP")

^SCR("PARHIP","P",10,"LMAX")
6
^SCR("PARHIP","P",10,"MUMPS1")

^SCR("PARHIP","P",10,"MUMPS2")

^SCR("PARHIP","P",10,"NLN")
20
^SCR("PARHIP","P",10,"RZD")
\
^SCR("PARHIP","P",10,"TOPB")
8
^SCR("PARHIP","P",10,"TYP")
E
^SCR("PARHIP","P",10,"VRB")
DEP1
^SCR("PARHIP","P",11,"CRD")
10,22,H,18,0
^SCR("PARHIP","P",11,"HELP")

^SCR("PARHIP","P",11,"LMAX")
18
^SCR("PARHIP","P",11,"MUMPS1")

^SCR("PARHIP","P",11,"MUMPS2")

^SCR("PARHIP","P",11,"OUTPUT")

^SCR("PARHIP","P",11,"TYP")
H
^SCR("PARHIP","P",12,"CRD")
11,56,E,5,0
^SCR("PARHIP","P",12,"FNC")

^SCR("PARHIP","P",12,"GLOB")
PARSUG
^SCR("PARHIP","P",12,"HELP")

^SCR("PARHIP","P",12,"LMAX")
6
^SCR("PARHIP","P",12,"MUMPS1")

^SCR("PARHIP","P",12,"MUMPS2")

^SCR("PARHIP","P",12,"NLN")
20
^SCR("PARHIP","P",12,"RZD")
\
^SCR("PARHIP","P",12,"TOPB")
8
^SCR("PARHIP","P",12,"TYP")
E
^SCR("PARHIP","P",12,"VRB")
MESUGP1
^SCR("PARHIP","P",13,"CRD")
11,56,H,18,0
^SCR("PARHIP","P",13,"HELP")

^SCR("PARHIP","P",13,"LMAX")
18
^SCR("PARHIP","P",13,"MUMPS1")

^SCR("PARHIP","P",13,"MUMPS2")

^SCR("PARHIP","P",13,"OUTPUT")

^SCR("PARHIP","P",13,"TYP")
H
^SCR("PARHIP","P",14,"CRD")
11,22,E,6,0
^SCR("PARHIP","P",14,"FNC")

^SCR("PARHIP","P",14,"GLOB")
PARSUG
^SCR("PARHIP","P",14,"HELP")

^SCR("PARHIP","P",14,"LMAX")
6
^SCR("PARHIP","P",14,"MUMPS1")
S:MESUGP&'ADSUGP ADSUGP=MESUGP
^SCR("PARHIP","P",14,"MUMPS2")

^SCR("PARHIP","P",14,"NLN")
20
^SCR("PARHIP","P",14,"RZD")
\
^SCR("PARHIP","P",14,"TOPB")
8
^SCR("PARHIP","P",14,"TYP")
E
^SCR("PARHIP","P",14,"VRB")
ADSUGP1
^SCR("PARHIP","P",15,"CRD")
11,22,H,16,0
^SCR("PARHIP","P",15,"HELP")

^SCR("PARHIP","P",15,"LMAX")
17
^SCR("PARHIP","P",15,"MUMPS1")

^SCR("PARHIP","P",15,"MUMPS2")
D ADSUGP1^P1PARHIP
^SCR("PARHIP","P",15,"OUTPUT")

^SCR("PARHIP","P",15,"TYP")
H
^SCR("PARHIP","P",35,"CRD")
13,47,N,8,2
^SCR("PARHIP","P",35,"HELP")

^SCR("PARHIP","P",35,"LMAX")
9
^SCR("PARHIP","P",35,"MUMPS1")

^SCR("PARHIP","P",35,"MUMPS2")

^SCR("PARHIP","P",35,"TYP")
N
^SCR("PARHIP","P",40,"CRD")
13,15,N,8,2
^SCR("PARHIP","P",40,"HELP")

^SCR("PARHIP","P",40,"LMAX")
9
^SCR("PARHIP","P",40,"MUMPS1")
S:MEMH&'ADMH ADMH=MEMH S:'ADMH ADMH=99999.99
^SCR("PARHIP","P",40,"MUMPS2")

^SCR("PARHIP","P",40,"TYP")
N
^SCR("PARHIP","P",53,"CRD")
14,57,H,1,0
^SCR("PARHIP","P",53,"HELP")

^SCR("PARHIP","P",53,"LMAX")
4
^SCR("PARHIP","P",53,"MUMPS1")

^SCR("PARHIP","P",53,"MUMPS2")
D MSHK^P1PARHIP  
^SCR("PARHIP","P",53,"TYP")
H
^SCR("PARHIP","P",60,"CRD")
16,49,E,8,0
^SCR("PARHIP","P",60,"HELP")

^SCR("PARHIP","P",60,"LMAX")
8
^SCR("PARHIP","P",60,"MUMPS1")

^SCR("PARHIP","P",60,"MUMPS2")

^SCR("PARHIP","P",60,"TYP")
E
^SCR("PARHIP","P","NAME","ADMH")
40
^SCR("PARHIP","P","NAME","ADPAR")
4
^SCR("PARHIP","P","NAME","ADSUGP")
14
^SCR("PARHIP","P","NAME","ADSUGP1")
15
^SCR("PARHIP","P","NAME","DEP")
10
^SCR("PARHIP","P","NAME","DEP1")
11
^SCR("PARHIP","P","NAME","FLD")
1
^SCR("PARHIP","P","NAME","FLD1")
2
^SCR("PARHIP","P","NAME","MDP")
60
^SCR("PARHIP","P","NAME","MEMH")
35
^SCR("PARHIP","P","NAME","MEPAR")
3
^SCR("PARHIP","P","NAME","MESUGP")
12
^SCR("PARHIP","P","NAME","MESUGP1")
13
^SCR("PARHIP","P","NAME","MSHK")
53
^SCR("PARHIP","P","NAME","PRHIP")
6
^SCR("PARHIP","P","NAME","SHEMP")
5
^SCR("PARHIP","P","NM",1)
FLD
^SCR("PARHIP","P","NM",2)
FLD1
^SCR("PARHIP","P","NM",3)
MEPAR
^SCR("PARHIP","P","NM",4)
ADPAR
^SCR("PARHIP","P","NM",5)
SHEMP
^SCR("PARHIP","P","NM",6)
PRHIP
^SCR("PARHIP","P","NM",10)
DEP
^SCR("PARHIP","P","NM",11)
DEP1
^SCR("PARHIP","P","NM",12)
MESUGP
^SCR("PARHIP","P","NM",13)
MESUGP1
^SCR("PARHIP","P","NM",14)
ADSUGP
^SCR("PARHIP","P","NM",15)
ADSUGP1
^SCR("PARHIP","P","NM",35)
MEMH
^SCR("PARHIP","P","NM",40)
ADMH
^SCR("PARHIP","P","NM",53)
MSHK
^SCR("PARHIP","P","NM",60)
MDP
^SCR("PARHIP","P","RB",1)
4,3,18,77
^SCR("PARHIP1")
H
^SCR("PARHIP1",1)
                                                                               
^SCR("PARHIP1",2)
            #{                  10}# dcy oekcr                                 
^SCR("PARHIP1",3)
                                                                             1$
^SCR("PARHIP1",4)
   :            :  ycg   :            :   oyi  :     hixt xe`z    :hixt cew:   
^SCR("PARHIP1",5)
                                                                               
^SCR("PARHIP1",6)
                                                                               
^SCR("PARHIP1",7)
                                                                               
^SCR("PARHIP1",8)
                                                                               
^SCR("PARHIP1",9)
                                                                               
^SCR("PARHIP1",10)
                                                                               
^SCR("PARHIP1",11)
                                                                               
^SCR("PARHIP1",12)
                                                                               
^SCR("PARHIP1",13)
                                                                               
^SCR("PARHIP1",14)
                                                                               
^SCR("PARHIP1",15)
                                                                               
^SCR("PARHIP1",16)
                                                                               
^SCR("PARHIP1",17)
                                                                               
^SCR("PARHIP1",18)
                                                                               
^SCR("PARHIP1",19)
                                                                               
^SCR("PARHIP1",20)
                                                                               
^SCR("PARHIP1",21)
                                                                               
^SCR("PARHIP1",22)
 $1                                                                            
^SCR("PARHIP1","A",1)

^SCR("PARHIP1","A",2)
„ƒ™�…‹ƒ’
^SCR("PARHIP1","A",3)

^SCR("PARHIP1","A",4)
™ƒ‡�™‰ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("PARHIP1","A",5)
---------------------------------------------------------------------
^SCR("PARHIP1","A",6)

^SCR("PARHIP1","A",7)

^SCR("PARHIP1","A",8)

^SCR("PARHIP1","A",9)

^SCR("PARHIP1","A",10)

^SCR("PARHIP1","A",11)

^SCR("PARHIP1","A",12)

^SCR("PARHIP1","A",13)

^SCR("PARHIP1","A",14)

^SCR("PARHIP1","A",15)

^SCR("PARHIP1","A",16)

^SCR("PARHIP1","A",17)

^SCR("PARHIP1","A",18)

^SCR("PARHIP1","A",19)

^SCR("PARHIP1","A",20)

^SCR("PARHIP1","A",21)

^SCR("PARHIP1","A",22)

^SCR("PARHIP1","AV",1)

^SCR("PARHIP1","AV",2)
vsaiufsg
^SCR("PARHIP1","AV",3)

^SCR("PARHIP1","AV",4)
asjiahyhrprut,yhrpsue
^SCR("PARHIP1","AV",5)
---------------------------------------------------------------------
^SCR("PARHIP1","AV",6)

^SCR("PARHIP1","AV",7)

^SCR("PARHIP1","AV",8)

^SCR("PARHIP1","AV",9)

^SCR("PARHIP1","AV",10)

^SCR("PARHIP1","AV",11)

^SCR("PARHIP1","AV",12)

^SCR("PARHIP1","AV",13)

^SCR("PARHIP1","AV",14)

^SCR("PARHIP1","AV",15)

^SCR("PARHIP1","AV",16)

^SCR("PARHIP1","AV",17)

^SCR("PARHIP1","AV",18)

^SCR("PARHIP1","AV",19)

^SCR("PARHIP1","AV",20)

^SCR("PARHIP1","AV",21)

^SCR("PARHIP1","AV",22)

^SCR("PARHIP1","G",1,"CRD")
5,75,E,8,0
^SCR("PARHIP1","G",1,"HELP")

^SCR("PARHIP1","G",1,"LMAX")
8
^SCR("PARHIP1","G",1,"MUMPS1")

^SCR("PARHIP1","G",1,"MUMPS2")

^SCR("PARHIP1","G",1,"OUTPUT")

^SCR("PARHIP1","G",1,"SHEM")
hixt cew
^SCR("PARHIP1","G",1,"TYP")
E
^SCR("PARHIP1","G",2,"CRD")
5,66,H,18,0
^SCR("PARHIP1","G",2,"HELP")

^SCR("PARHIP1","G",2,"LMAX")
18
^SCR("PARHIP1","G",2,"MUMPS1")

^SCR("PARHIP1","G",2,"MUMPS2")

^SCR("PARHIP1","G",2,"OUTPUT")

^SCR("PARHIP1","G",2,"SHEM")
     hixt xe`z    
^SCR("PARHIP1","G",2,"TYP")
H
^SCR("PARHIP1","G",3,"CRD")
5,47,E,8,0
^SCR("PARHIP1","G",3,"HELP")

^SCR("PARHIP1","G",3,"LMAX")
8
^SCR("PARHIP1","G",3,"MUMPS1")

^SCR("PARHIP1","G",3,"MUMPS2")

^SCR("PARHIP1","G",3,"OUTPUT")

^SCR("PARHIP1","G",3,"SHEM")
   oyi  
^SCR("PARHIP1","G",3,"TYP")
E
^SCR("PARHIP1","G",4,"CRD")
5,38,H,12,0
^SCR("PARHIP1","G",4,"HELP")

^SCR("PARHIP1","G",4,"LMAX")
12
^SCR("PARHIP1","G",4,"MUMPS1")

^SCR("PARHIP1","G",4,"MUMPS2")

^SCR("PARHIP1","G",4,"OUTPUT")

^SCR("PARHIP1","G",4,"SHEM")
            
^SCR("PARHIP1","G",4,"TYP")
H
^SCR("PARHIP1","G",5,"CRD")
5,25,H,1,0
^SCR("PARHIP1","G",5,"FNC")
F9
^SCR("PARHIP1","G",5,"GLOB")

^SCR("PARHIP1","G",5,"HELP")
<F10> - (zigkep dxeyn) izveaw iepiy , <F9> - hixt qihxk 
^SCR("PARHIP1","G",5,"LMAX")
8
^SCR("PARHIP1","G",5,"MUMPS1")

^SCR("PARHIP1","G",5,"MUMPS2")
D VNEW^P1PARHIP
^SCR("PARHIP1","G",5,"SHEM")
  ycg   
^SCR("PARHIP1","G",5,"TYP")
H
^SCR("PARHIP1","G",5,"VRB")
VNEW1
^SCR("PARHIP1","G",6,"CRD")
5,16,H,12,0
^SCR("PARHIP1","G",6,"HELP")

^SCR("PARHIP1","G",6,"LMAX")
12
^SCR("PARHIP1","G",6,"MUMPS1")

^SCR("PARHIP1","G",6,"MUMPS2")

^SCR("PARHIP1","G",6,"OUTPUT")

^SCR("PARHIP1","G",6,"SHEM")
            
^SCR("PARHIP1","G",6,"TYP")
H
^SCR("PARHIP1","G","DEL")
Y
^SCR("PARHIP1","G","MAX")
57
^SCR("PARHIP1","G","NAME","PAR")
1
^SCR("PARHIP1","G","NAME","PAR1")
2
^SCR("PARHIP1","G","NAME","VNEW")
5
^SCR("PARHIP1","G","NAME","VNEW1")
6
^SCR("PARHIP1","G","NAME","VOLD")
3
^SCR("PARHIP1","G","NAME","VOLD1")
4
^SCR("PARHIP1","G","NM",1)
PAR
^SCR("PARHIP1","G","NM",2)
PAR1
^SCR("PARHIP1","G","NM",3)
VOLD
^SCR("PARHIP1","G","NM",4)
VOLD1
^SCR("PARHIP1","G","NM",5)
VNEW
^SCR("PARHIP1","G","NM",6)
VNEW1
^SCR("PARHIP1","G","RB")
4,2,23,79
^SCR("PARHIP1","G","REF")
^TEMPHP($P
^SCR("PARHIP1","G","RZD")
\
^SCR("PARHIP1","G","STEP")
1
^SCR("PARHIP1","G","STG")
   :            :  ycg   :            :   oyi  :     hixt xe`z    :hixt cew:   
^SCR("PARHIP1","G","VG")
6
^SCR("PARHIP1","NAME")
mihixt zlaha dcy oekcr
^SCR("PARHIP1","P",10,"CRD")
2,35,H,20
^SCR("PARHIP1","P",10,"HELP")

^SCR("PARHIP1","P",10,"LMAX")
21
^SCR("PARHIP1","P",10,"MUMPS1")

^SCR("PARHIP1","P",10,"MUMPS2")

^SCR("PARHIP1","P",10,"OUTPUT")

^SCR("PARHIP1","P",10,"TYP")
H
^SCR("PARHIP1","P","NAME","FLD1")
10
^SCR("PARHIP1","P","NM",10)
FLD1
^SCR("PARPROT")
H
^SCR("PARPROT",1)
                              # mixign iepiy lewehext #                        
^SCR("PARPROT",2)
                                                                             1]
^SCR("PARPROT",3)
                                  {10      } jix`z cr      {05      } jix`zn   
^SCR("PARPROT",4)
     {               21}{20    }  hixt cr   {             16}{15    }  hixtn   
^SCR("PARPROT",5)
  [1                                                                           
^SCR("PARPROT",6)
                                                                             1$
^SCR("PARPROT",7)
     :   i`xg`  :ycg xign:oyi xign:     hixt xe`z    : cew : dry :  jix`z :    
^SCR("PARPROT",8)
                                                                               
^SCR("PARPROT",9)
                                                                               
^SCR("PARPROT",10)
                                                                               
^SCR("PARPROT",11)
                                                                               
^SCR("PARPROT",12)
                                                                               
^SCR("PARPROT",13)
                                                                               
^SCR("PARPROT",14)
                                                                               
^SCR("PARPROT",15)
                                                                               
^SCR("PARPROT",16)
                                                                               
^SCR("PARPROT",17)
                                                                               
^SCR("PARPROT",18)
                                                                               
^SCR("PARPROT",19)
                                                                               
^SCR("PARPROT",20)
                                                                               
^SCR("PARPROT",21)
  $1                                                                           
^SCR("PARPROT","A",1)
�‰˜‰‡Ž‰…�‰™Œ…—…ˆ…˜”
^SCR("PARPROT","A",2)

^SCR("PARPROT","A",3)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("PARPROT","A",4)
ˆ‰˜”ƒ’ˆ‰˜”Ž
^SCR("PARPROT","A",5)

^SCR("PARPROT","A",6)

^SCR("PARPROT","A",7)
‰€˜‡€™ƒ‡˜‰‡Ž�™‰˜‰‡Žˆ‰˜”˜…€šƒ…—„’™Š‰˜€š
^SCR("PARPROT","A",8)
------------------------------------------------------------------
^SCR("PARPROT","A",9)

^SCR("PARPROT","A",10)

^SCR("PARPROT","A",11)

^SCR("PARPROT","A",12)

^SCR("PARPROT","A",13)

^SCR("PARPROT","A",14)

^SCR("PARPROT","A",15)

^SCR("PARPROT","A",16)

^SCR("PARPROT","A",17)

^SCR("PARPROT","A",18)

^SCR("PARPROT","A",19)

^SCR("PARPROT","A",20)

^SCR("PARPROT","A",21)

^SCR("PARPROT","AV",1)
ohrhjnhubhakueuyurp
^SCR("PARPROT","AV",2)

^SCR("PARPROT","AV",3)
lhrt,sglhrt,n
^SCR("PARPROT","AV",4)
yhrpsgyhrpn
^SCR("PARPROT","AV",5)

^SCR("PARPROT","AV",6)

^SCR("PARPROT","AV",7)
htrjtasjrhjniahrhjnyhrprut,suevgalhrt,
^SCR("PARPROT","AV",8)
------------------------------------------------------------------
^SCR("PARPROT","AV",9)

^SCR("PARPROT","AV",10)

^SCR("PARPROT","AV",11)

^SCR("PARPROT","AV",12)

^SCR("PARPROT","AV",13)

^SCR("PARPROT","AV",14)

^SCR("PARPROT","AV",15)

^SCR("PARPROT","AV",16)

^SCR("PARPROT","AV",17)

^SCR("PARPROT","AV",18)

^SCR("PARPROT","AV",19)

^SCR("PARPROT","AV",20)

^SCR("PARPROT","AV",21)

^SCR("PARPROT","G",1,"CRD")
8,74,D,8,0
^SCR("PARPROT","G",1,"HELP")

^SCR("PARPROT","G",1,"LMAX")
8
^SCR("PARPROT","G",1,"MUMPS1")

^SCR("PARPROT","G",1,"MUMPS2")

^SCR("PARPROT","G",1,"OUTPUT")

^SCR("PARPROT","G",1,"SHEM")
  jix`z 
^SCR("PARPROT","G",1,"TYP")
D
^SCR("PARPROT","G",2,"CRD")
8,65,E,5,0
^SCR("PARPROT","G",2,"HELP")

^SCR("PARPROT","G",2,"LMAX")
5
^SCR("PARPROT","G",2,"MUMPS1")

^SCR("PARPROT","G",2,"MUMPS2")

^SCR("PARPROT","G",2,"OUTPUT")

^SCR("PARPROT","G",2,"SHEM")
 dry 
^SCR("PARPROT","G",2,"TYP")
E
^SCR("PARPROT","G",3,"CRD")
8,59,E,5,0
^SCR("PARPROT","G",3,"HELP")

^SCR("PARPROT","G",3,"LMAX")
5
^SCR("PARPROT","G",3,"MUMPS1")

^SCR("PARPROT","G",3,"MUMPS2")

^SCR("PARPROT","G",3,"OUTPUT")

^SCR("PARPROT","G",3,"SHEM")
 cew 
^SCR("PARPROT","G",3,"TYP")
E
^SCR("PARPROT","G",4,"CRD")
8,53,H,18,0
^SCR("PARPROT","G",4,"HELP")

^SCR("PARPROT","G",4,"LMAX")
18
^SCR("PARPROT","G",4,"MUMPS1")

^SCR("PARPROT","G",4,"MUMPS2")

^SCR("PARPROT","G",4,"OUTPUT")

^SCR("PARPROT","G",4,"SHEM")
     hixt xe`z    
^SCR("PARPROT","G",4,"TYP")
H
^SCR("PARPROT","G",5,"CRD")
8,34,N,8,2
^SCR("PARPROT","G",5,"HELP")

^SCR("PARPROT","G",5,"LMAX")
8
^SCR("PARPROT","G",5,"MUMPS1")

^SCR("PARPROT","G",5,"MUMPS2")

^SCR("PARPROT","G",5,"OUTPUT")

^SCR("PARPROT","G",5,"SHEM")
oyi xign
^SCR("PARPROT","G",5,"TYP")
N
^SCR("PARPROT","G",6,"CRD")
8,25,N,8,2
^SCR("PARPROT","G",6,"HELP")

^SCR("PARPROT","G",6,"LMAX")
8
^SCR("PARPROT","G",6,"MUMPS1")

^SCR("PARPROT","G",6,"MUMPS2")

^SCR("PARPROT","G",6,"OUTPUT")

^SCR("PARPROT","G",6,"SHEM")
ycg xign
^SCR("PARPROT","G",6,"TYP")
N
^SCR("PARPROT","G",7,"CRD")
8,16,H,10,0
^SCR("PARPROT","G",7,"HELP")

^SCR("PARPROT","G",7,"LMAX")
10
^SCR("PARPROT","G",7,"MUMPS1")

^SCR("PARPROT","G",7,"MUMPS2")

^SCR("PARPROT","G",7,"OUTPUT")

^SCR("PARPROT","G",7,"SHEM")
   i`xg`  
^SCR("PARPROT","G",7,"TYP")
H
^SCR("PARPROT","G","DEL")

^SCR("PARPROT","G","MAX")
99999
^SCR("PARPROT","G","NAME","CODP")
3
^SCR("PARPROT","G","NAME","MHNEW")
6
^SCR("PARPROT","G","NAME","MHOLD")
5
^SCR("PARPROT","G","NAME","MNL")
7
^SCR("PARPROT","G","NAME","PAR1")
4
^SCR("PARPROT","G","NAME","SHAA")
2
^SCR("PARPROT","G","NAME","TRH")
1
^SCR("PARPROT","G","NM",1)
TRH
^SCR("PARPROT","G","NM",2)
SHAA
^SCR("PARPROT","G","NM",3)
CODP
^SCR("PARPROT","G","NM",4)
PAR1
^SCR("PARPROT","G","NM",5)
MHOLD
^SCR("PARPROT","G","NM",6)
MHNEW
^SCR("PARPROT","G","NM",7)
MNL
^SCR("PARPROT","G","RB")
7,3,22,79
^SCR("PARPROT","G","REF")
^TEMP($P
^SCR("PARPROT","G","RZD")
\
^SCR("PARPROT","G","STEP")
1
^SCR("PARPROT","G","STG")
     :   i`xg`  :ycg xign:oyi xign:     hixt xe`z    : cew : dry :  jix`z :    
^SCR("PARPROT","G","VG")
9
^SCR("PARPROT","NAME")
xign iepiy lewehext
^SCR("PARPROT","P",5,"CRD")
3,59,D,8,0
^SCR("PARPROT","P",5,"HELP")

^SCR("PARPROT","P",5,"LMAX")
9
^SCR("PARPROT","P",5,"MUMPS1")

^SCR("PARPROT","P",5,"MUMPS2")

^SCR("PARPROT","P",5,"TYP")
D
^SCR("PARPROT","P",10,"CRD")
3,34,D,8,0
^SCR("PARPROT","P",10,"HELP")

^SCR("PARPROT","P",10,"LMAX")
9
^SCR("PARPROT","P",10,"MUMPS1")

^SCR("PARPROT","P",10,"MUMPS2")

^SCR("PARPROT","P",10,"TYP")
D
^SCR("PARPROT","P",15,"CRD")
4,61,E,7,0
^SCR("PARPROT","P",15,"FNC")

^SCR("PARPROT","P",15,"GLOB")
PAR
^SCR("PARPROT","P",15,"HELP")

^SCR("PARPROT","P",15,"LMAX")
7
^SCR("PARPROT","P",15,"MUMPS1")

^SCR("PARPROT","P",15,"MUMPS2")

^SCR("PARPROT","P",15,"NLN")
20
^SCR("PARPROT","P",15,"RZD")
**
^SCR("PARPROT","P",15,"TOPB")
8
^SCR("PARPROT","P",15,"TYP")
E
^SCR("PARPROT","P",15,"VRB")
MEPAR1
^SCR("PARPROT","P",16,"CRD")
4,61,H,16
^SCR("PARPROT","P",16,"HELP")

^SCR("PARPROT","P",16,"LMAX")
16
^SCR("PARPROT","P",16,"MUMPS1")

^SCR("PARPROT","P",16,"MUMPS2")

^SCR("PARPROT","P",16,"OUTPUT")

^SCR("PARPROT","P",16,"TYP")
H
^SCR("PARPROT","P",20,"CRD")
4,24,E,7,0
^SCR("PARPROT","P",20,"FNC")

^SCR("PARPROT","P",20,"GLOB")
PAR
^SCR("PARPROT","P",20,"HELP")

^SCR("PARPROT","P",20,"LMAX")
7
^SCR("PARPROT","P",20,"MUMPS1")

^SCR("PARPROT","P",20,"MUMPS2")

^SCR("PARPROT","P",20,"NLN")
20
^SCR("PARPROT","P",20,"RZD")
**
^SCR("PARPROT","P",20,"TOPB")
8
^SCR("PARPROT","P",20,"TYP")
E
^SCR("PARPROT","P",20,"VRB")
ADPAR1
^SCR("PARPROT","P",21,"CRD")
4,24,H,18
^SCR("PARPROT","P",21,"HELP")

^SCR("PARPROT","P",21,"LMAX")
18
^SCR("PARPROT","P",21,"MUMPS1")

^SCR("PARPROT","P",21,"MUMPS2")

^SCR("PARPROT","P",21,"OUTPUT")

^SCR("PARPROT","P",21,"TYP")
H
^SCR("PARPROT","P","NAME","ADDAT")
10
^SCR("PARPROT","P","NAME","ADPAR")
20
^SCR("PARPROT","P","NAME","ADPAR1")
21
^SCR("PARPROT","P","NAME","MEDAT")
5
^SCR("PARPROT","P","NAME","MEPAR")
15
^SCR("PARPROT","P","NAME","MEPAR1")
16
^SCR("PARPROT","P","NM",5)
MEDAT
^SCR("PARPROT","P","NM",10)
ADDAT
^SCR("PARPROT","P","NM",15)
MEPAR
^SCR("PARPROT","P","NM",16)
MEPAR1
^SCR("PARPROT","P","NM",20)
ADPAR
^SCR("PARPROT","P","NM",21)
ADPAR1
^SCR("PARPROT","P","RB",1)
3,3,6,79
^SCR("PARSUG")
H
^SCR("PARSUG",1)
                               # mihixt zeveaw zlah #                          
^SCR("PARSUG",2)
                                                                               
^SCR("PARSUG",3)
                                                                             1$
^SCR("PARSUG",4)
  : dwlgn xe`z :dwlgn:      GUI-a rav cew    :xtqn:    dveaw xe`z   : zveaw:   
^SCR("PARSUG",5)
  :            :     :                       : rav:                 :mihixt:   
^SCR("PARSUG",6)
                                                                               
^SCR("PARSUG",7)
                                                                               
^SCR("PARSUG",8)
                                                                               
^SCR("PARSUG",9)
                                                                               
^SCR("PARSUG",10)
                                                                               
^SCR("PARSUG",11)
                                                                               
^SCR("PARSUG",12)
                                                                               
^SCR("PARSUG",13)
                                                                               
^SCR("PARSUG",14)
                                                                               
^SCR("PARSUG",15)
                                                                               
^SCR("PARSUG",16)
                                                                               
^SCR("PARSUG",17)
                                                                               
^SCR("PARSUG",18)
 $1                                                                            
^SCR("PARSUG",19)
                                                                               
^SCR("PARSUG","A",1)
�‰ˆ‰˜”š…–…�—šŒ�ˆ
^SCR("PARSUG","A",2)

^SCR("PARSUG","A",3)

^SCR("PARSUG","A",4)
„—Œ‡Ž˜…€š„—Œ‡ŽGUI-�’�–ƒ…—˜”‘Ž„–…�—˜…€šš–…�—
^SCR("PARSUG","A",5)
’�–�‰ˆ‰˜”
^SCR("PARSUG","A",6)
----------------------------------------------------------------------
^SCR("PARSUG","A",7)

^SCR("PARSUG","A",8)

^SCR("PARSUG","A",9)

^SCR("PARSUG","A",10)

^SCR("PARSUG","A",11)

^SCR("PARSUG","A",12)

^SCR("PARSUG","A",13)

^SCR("PARSUG","A",14)

^SCR("PARSUG","A",15)

^SCR("PARSUG","A",16)

^SCR("PARSUG","A",17)

^SCR("PARSUG","A",18)

^SCR("PARSUG","A",19)

^SCR("PARSUG","AV",1)
ohyhrp,umuce,kcy
^SCR("PARSUG","AV",2)

^SCR("PARSUG","AV",3)

^SCR("PARSUG","AV",4)
vekjnrut,vekjnGUI-cgcmsuerpxnvmucerut,,muce
^SCR("PARSUG","AV",5)
gcmohyhrp
^SCR("PARSUG","AV",6)
----------------------------------------------------------------------
^SCR("PARSUG","AV",7)

^SCR("PARSUG","AV",8)

^SCR("PARSUG","AV",9)

^SCR("PARSUG","AV",10)

^SCR("PARSUG","AV",11)

^SCR("PARSUG","AV",12)

^SCR("PARSUG","AV",13)

^SCR("PARSUG","AV",14)

^SCR("PARSUG","AV",15)

^SCR("PARSUG","AV",16)

^SCR("PARSUG","AV",17)

^SCR("PARSUG","AV",18)

^SCR("PARSUG","AV",19)

^SCR("PARSUG","G",1,"CRD")
5,75,E,5,0
^SCR("PARSUG","G",1,"HELP")

^SCR("PARSUG","G",1,"LMAX")
6
^SCR("PARSUG","G",1,"MUMPS1")

^SCR("PARSUG","G",1,"MUMPS2")
D BDIKA^P1SPTB
^SCR("PARSUG","G",1,"SHEM")
 zveaw
^SCR("PARSUG","G",1,"TYP")
E
^SCR("PARSUG","G",2,"CRD")
5,68,H,17,0
^SCR("PARSUG","G",2,"HELP")

^SCR("PARSUG","G",2,"LMAX")
17
^SCR("PARSUG","G",2,"MUMPS1")

^SCR("PARSUG","G",2,"MUMPS2")

^SCR("PARSUG","G",2,"SHEM")
    dveaw xe`z   
^SCR("PARSUG","G",2,"TYP")
H
^SCR("PARSUG","G",3,"CRD")
5,50,N,1,0
^SCR("PARSUG","G",3,"HELP")

^SCR("PARSUG","G",3,"LMAX")
4
^SCR("PARSUG","G",3,"MUMPS1")
D CEVA0^P1SPTB
^SCR("PARSUG","G",3,"MUMPS2")
D CEVA^P1SPTB
^SCR("PARSUG","G",3,"SHEM")
xtqn
^SCR("PARSUG","G",3,"TYP")
N
^SCR("PARSUG","G",4,"CRD")
5,45,E,18,0
^SCR("PARSUG","G",4,"HELP")

^SCR("PARSUG","G",4,"LMAX")
23
^SCR("PARSUG","G",4,"MUMPS1")

^SCR("PARSUG","G",4,"MUMPS2")

^SCR("PARSUG","G",4,"OUTPUT")

^SCR("PARSUG","G",4,"SHEM")
      GUI-a rav cew    
^SCR("PARSUG","G",4,"TYP")
E
^SCR("PARSUG","G",5,"CRD")
5,21,E,3,0
^SCR("PARSUG","G",5,"FNC")

^SCR("PARSUG","G",5,"GLOB")
DEP
^SCR("PARSUG","G",5,"HELP")

^SCR("PARSUG","G",5,"LMAX")
5
^SCR("PARSUG","G",5,"MUMPS1")

^SCR("PARSUG","G",5,"MUMPS2")

^SCR("PARSUG","G",5,"MUST")

^SCR("PARSUG","G",5,"NLN")
20
^SCR("PARSUG","G",5,"RZD")
\
^SCR("PARSUG","G",5,"SHEM")
dwlgn
^SCR("PARSUG","G",5,"TOPB")
8
^SCR("PARSUG","G",5,"TYP")
E
^SCR("PARSUG","G",5,"VRB")
DEP1
^SCR("PARSUG","G",6,"CRD")
5,15,H,12,0
^SCR("PARSUG","G",6,"HELP")

^SCR("PARSUG","G",6,"LMAX")
12
^SCR("PARSUG","G",6,"MUMPS1")

^SCR("PARSUG","G",6,"MUMPS2")

^SCR("PARSUG","G",6,"OUTPUT")

^SCR("PARSUG","G",6,"SHEM")
 dwlgn xe`z 
^SCR("PARSUG","G",6,"TYP")
H
^SCR("PARSUG","G","DEL")
Y
^SCR("PARSUG","G","MAX")
999
^SCR("PARSUG","G","NAME","CEVA")
3
^SCR("PARSUG","G","NAME","DEP")
5
^SCR("PARSUG","G","NAME","DEP1")
6
^SCR("PARSUG","G","NAME","GUI")
4
^SCR("PARSUG","G","NAME","PARSUG")
1
^SCR("PARSUG","G","NAME","PARSUG1")
2
^SCR("PARSUG","G","NM",1)
PARSUG
^SCR("PARSUG","G","NM",2)
PARSUG1
^SCR("PARSUG","G","NM",3)
CEVA
^SCR("PARSUG","G","NM",4)
GUI
^SCR("PARSUG","G","NM",5)
DEP
^SCR("PARSUG","G","NM",6)
DEP1
^SCR("PARSUG","G","RB")
4,2,19,79
^SCR("PARSUG","G","REF")
^TEMP($P,"SP"
^SCR("PARSUG","G","RZD")
\
^SCR("PARSUG","G","STEP")
1
^SCR("PARSUG","G","STG")
  : dwlgn xe`z :dwlgn:      GUI-a rav cew    :xtqn:    dveaw xe`z   : zveaw:   
^SCR("PARSUG","G","VG")
7
^SCR("PARSUG","NAME")

^SCR("PLCHINP")
H
^SCR("PLCHINP",1)
                      # miwiy zhilw #                                          
^SCR("PLCHINP",2)
                                                                               
^SCR("PLCHINP",3)
                                                                               
^SCR("PLCHINP",4)
                                                   1]                          
^SCR("PLCHINP",5)
                            {10      : oerxtl jix`z                            
^SCR("PLCHINP",6)
                                  {20:      wpa 'qn                            
^SCR("PLCHINP",7)
                                 {30 :     sipq 'qn                            
^SCR("PLCHINP",8)
                         {40         :     wiyd 'qn                            
^SCR("PLCHINP",9)
                         {50         :   oeaygd 'qn                            
^SCR("PLCHINP",10)
                            {60      :    g"y  mekq                            
^SCR("PLCHINP",11)
                            {70      :   dlaw jix`z                            
^SCR("PLCHINP",12)
                          {80        :     f''z 'qn                            
^SCR("PLCHINP",13)
                       [1                                                      
^SCR("PLCHINP","A",1)
�‰—‰™šˆ‰Œ—
^SCR("PLCHINP","A",2)

^SCR("PLCHINP","A",3)

^SCR("PLCHINP","A",4)

^SCR("PLCHINP","A",5)
:�…’˜”ŒŠ‰˜€š
^SCR("PLCHINP","A",6)
:—��'‘Ž
^SCR("PLCHINP","A",7)
:“‰�‘'‘Ž
^SCR("PLCHINP","A",8)
:—‰™„'‘Ž
^SCR("PLCHINP","A",9)
:�…�™‡„'‘Ž
^SCR("PLCHINP","A",10)
:‡"™�…‹‘
^SCR("PLCHINP","A",11)
:„Œ�—Š‰˜€š
^SCR("PLCHINP","A",12)
:†''š'‘Ž
^SCR("PLCHINP","A",13)

^SCR("PLCHINP","AV",1)
oheha,yhke
^SCR("PLCHINP","AV",2)

^SCR("PLCHINP","AV",3)

^SCR("PLCHINP","AV",4)

^SCR("PLCHINP","AV",5)
:iugrpklhrt,
^SCR("PLCHINP","AV",6)
:ebcwxn
^SCR("PLCHINP","AV",7)
:;hbxwxn
^SCR("PLCHINP","AV",8)
:ehavwxn
^SCR("PLCHINP","AV",9)
:iucajvwxn
^SCR("PLCHINP","AV",10)
:j"aoufx
^SCR("PLCHINP","AV",11)
:vkcelhrt,
^SCR("PLCHINP","AV",12)
:zww,wxn
^SCR("PLCHINP","AV",13)

^SCR("PLCHINP","NAME")

^SCR("PLCHINP","P",10,"CRD")
5,28,D,8,0
^SCR("PLCHINP","P",10,"HELP")

^SCR("PLCHINP","P",10,"LMAX")
9
^SCR("PLCHINP","P",10,"MUMPS1")

^SCR("PLCHINP","P",10,"MUMPS2")

^SCR("PLCHINP","P",10,"MUST")

^SCR("PLCHINP","P",10,"TYP")
D
^SCR("PLCHINP","P",20,"CRD")
6,34,E,2.,0
^SCR("PLCHINP","P",20,"HELP")

^SCR("PLCHINP","P",20,"LMAX")
3
^SCR("PLCHINP","P",20,"MUMPS1")

^SCR("PLCHINP","P",20,"MUMPS2")

^SCR("PLCHINP","P",20,"MUST")

^SCR("PLCHINP","P",20,"TYP")
E
^SCR("PLCHINP","P",30,"CRD")
7,33,E,3.,0
^SCR("PLCHINP","P",30,"HELP")

^SCR("PLCHINP","P",30,"LMAX")
4
^SCR("PLCHINP","P",30,"MUMPS1")

^SCR("PLCHINP","P",30,"MUMPS2")

^SCR("PLCHINP","P",30,"MUST")

^SCR("PLCHINP","P",30,"TYP")
E
^SCR("PLCHINP","P",40,"CRD")
8,25,E,11,0
^SCR("PLCHINP","P",40,"HELP")

^SCR("PLCHINP","P",40,"LMAX")
12
^SCR("PLCHINP","P",40,"MUMPS1")

^SCR("PLCHINP","P",40,"MUMPS2")
D CHEK^PLCHINP
^SCR("PLCHINP","P",40,"MUST")

^SCR("PLCHINP","P",40,"TYP")
E
^SCR("PLCHINP","P",50,"CRD")
9,25,E,11,0
^SCR("PLCHINP","P",50,"HELP")

^SCR("PLCHINP","P",50,"LMAX")
12
^SCR("PLCHINP","P",50,"MUMPS1")

^SCR("PLCHINP","P",50,"MUMPS2")

^SCR("PLCHINP","P",50,"TYP")
E
^SCR("PLCHINP","P",60,"CRD")
10,28,N,9,2
^SCR("PLCHINP","P",60,"HELP")

^SCR("PLCHINP","P",60,"LMAX")
9
^SCR("PLCHINP","P",60,"MUMPS1")

^SCR("PLCHINP","P",60,"MUMPS2")

^SCR("PLCHINP","P",60,"TYP")
N
^SCR("PLCHINP","P",70,"CRD")
11,28,D,8,0
^SCR("PLCHINP","P",70,"HELP")

^SCR("PLCHINP","P",70,"LMAX")
9
^SCR("PLCHINP","P",70,"MUMPS1")
S:'$G(DAT) DAT=$$^%L1DC($H,1)
^SCR("PLCHINP","P",70,"MUMPS2")

^SCR("PLCHINP","P",70,"TYP")
D
^SCR("PLCHINP","P",80,"CRD")
12,26,E,9,0
^SCR("PLCHINP","P",80,"HELP")

^SCR("PLCHINP","P",80,"LMAX")
11
^SCR("PLCHINP","P",80,"MUMPS1")

^SCR("PLCHINP","P",80,"MUMPS2")
D TZ^PLCHINP
^SCR("PLCHINP","P",80,"TYP")
E
^SCR("PLCHINP","P","NAME","BANK")
20
^SCR("PLCHINP","P","NAME","CHEK")
40
^SCR("PLCHINP","P","NAME","DAT")
70
^SCR("PLCHINP","P","NAME","HESH")
50
^SCR("PLCHINP","P","NAME","LPR")
10
^SCR("PLCHINP","P","NAME","SNIF")
30
^SCR("PLCHINP","P","NAME","SUM")
60
^SCR("PLCHINP","P","NAME","TZ")
80
^SCR("PLCHINP","P","NM",10)
LPR
^SCR("PLCHINP","P","NM",20)
BANK
^SCR("PLCHINP","P","NM",30)
SNIF
^SCR("PLCHINP","P","NM",40)
CHEK
^SCR("PLCHINP","P","NM",50)
HESH
^SCR("PLCHINP","P","NM",60)
SUM
^SCR("PLCHINP","P","NM",70)
DAT
^SCR("PLCHINP","P","NM",80)
TZ
^SCR("PLCHINP","P","RB",1)
5,24,14,53
^SCR("PLCHINP1")
H
^SCR("PLCHINP1",1)
                               # miwiy zhilw #                                 
^SCR("PLCHINP1",2)
                                                                               
^SCR("PLCHINP1",3)
                        ycg           oyi         mipezp                       
^SCR("PLCHINP1",4)
                                                           1]                  
^SCR("PLCHINP1",5)
                     {81            {10      : oerxtl jix`z                    
^SCR("PLCHINP1",6)
                          {82            {20 :      wpa 'qn                    
^SCR("PLCHINP1",7)
                          {83            {30 :     sipq 'qn                    
^SCR("PLCHINP1",8)
                  {84             {40        :     wiyd 'qn                    
^SCR("PLCHINP1",9)
                  {85            {50         :   oeaygd 'qn                    
^SCR("PLCHINP1",10)
                      {86            {60     :   g''y  mekq                    
^SCR("PLCHINP1",11)
                     {87            {70      :   zlaw jix`z                    
^SCR("PLCHINP1",12)
                   {88            {80        :     f''z 'qn                    
^SCR("PLCHINP1",13)
                 [1                                                            
^SCR("PLCHINP1","A",1)
�‰—‰™šˆ‰Œ—
^SCR("PLCHINP1","A",2)

^SCR("PLCHINP1","A",3)
™ƒ‡�™‰�‰�…š�
^SCR("PLCHINP1","A",4)

^SCR("PLCHINP1","A",5)
:�…’˜”ŒŠ‰˜€š
^SCR("PLCHINP1","A",6)
:—��'‘Ž
^SCR("PLCHINP1","A",7)
:“‰�‘'‘Ž
^SCR("PLCHINP1","A",8)
:—‰™„'‘Ž
^SCR("PLCHINP1","A",9)
:�…�™‡„'‘Ž
^SCR("PLCHINP1","A",10)
:‡''™�…‹‘
^SCR("PLCHINP1","A",11)
:šŒ�—Š‰˜€š
^SCR("PLCHINP1","A",12)
:†''š'‘Ž
^SCR("PLCHINP1","A",13)

^SCR("PLCHINP1","AV",1)
oheha,yhke
^SCR("PLCHINP1","AV",2)

^SCR("PLCHINP1","AV",3)
asjiahohbu,b
^SCR("PLCHINP1","AV",4)

^SCR("PLCHINP1","AV",5)
:iugrpklhrt,
^SCR("PLCHINP1","AV",6)
:ebcwxn
^SCR("PLCHINP1","AV",7)
:;hbxwxn
^SCR("PLCHINP1","AV",8)
:ehavwxn
^SCR("PLCHINP1","AV",9)
:iucajvwxn
^SCR("PLCHINP1","AV",10)
:jwwaoufx
^SCR("PLCHINP1","AV",11)
:,kcelhrt,
^SCR("PLCHINP1","AV",12)
:zww,wxn
^SCR("PLCHINP1","AV",13)

^SCR("PLCHINP1","NAME")

^SCR("PLCHINP1","P",10,"CRD")
5,36,D,8,0
^SCR("PLCHINP1","P",10,"HELP")

^SCR("PLCHINP1","P",10,"LMAX")
9
^SCR("PLCHINP1","P",10,"MUMPS1")

^SCR("PLCHINP1","P",10,"MUMPS2")

^SCR("PLCHINP1","P",10,"OUTPUT")

^SCR("PLCHINP1","P",10,"TYP")
D
^SCR("PLCHINP1","P",20,"CRD")
6,41,E,2.,0
^SCR("PLCHINP1","P",20,"HELP")

^SCR("PLCHINP1","P",20,"LMAX")
4
^SCR("PLCHINP1","P",20,"MUMPS1")

^SCR("PLCHINP1","P",20,"MUMPS2")

^SCR("PLCHINP1","P",20,"OUTPUT")

^SCR("PLCHINP1","P",20,"TYP")
E
^SCR("PLCHINP1","P",30,"CRD")
7,41,E,3.,0
^SCR("PLCHINP1","P",30,"HELP")

^SCR("PLCHINP1","P",30,"LMAX")
4
^SCR("PLCHINP1","P",30,"MUMPS1")

^SCR("PLCHINP1","P",30,"MUMPS2")

^SCR("PLCHINP1","P",30,"OUTPUT")

^SCR("PLCHINP1","P",30,"TYP")
E
^SCR("PLCHINP1","P",40,"CRD")
8,34,E,11,0
^SCR("PLCHINP1","P",40,"HELP")

^SCR("PLCHINP1","P",40,"LMAX")
11
^SCR("PLCHINP1","P",40,"MUMPS1")

^SCR("PLCHINP1","P",40,"MUMPS2")

^SCR("PLCHINP1","P",40,"OUTPUT")

^SCR("PLCHINP1","P",40,"TYP")
E
^SCR("PLCHINP1","P",50,"CRD")
9,33,E,11,0
^SCR("PLCHINP1","P",50,"HELP")

^SCR("PLCHINP1","P",50,"LMAX")
12
^SCR("PLCHINP1","P",50,"MUMPS1")

^SCR("PLCHINP1","P",50,"MUMPS2")

^SCR("PLCHINP1","P",50,"OUTPUT")

^SCR("PLCHINP1","P",50,"TYP")
E
^SCR("PLCHINP1","P",60,"CRD")
10,37,N,7,2
^SCR("PLCHINP1","P",60,"HELP")

^SCR("PLCHINP1","P",60,"LMAX")
8
^SCR("PLCHINP1","P",60,"MUMPS1")

^SCR("PLCHINP1","P",60,"MUMPS2")

^SCR("PLCHINP1","P",60,"OUTPUT")

^SCR("PLCHINP1","P",60,"TYP")
N
^SCR("PLCHINP1","P",70,"CRD")
11,36,D,8,0
^SCR("PLCHINP1","P",70,"HELP")

^SCR("PLCHINP1","P",70,"LMAX")
9
^SCR("PLCHINP1","P",70,"MUMPS1")

^SCR("PLCHINP1","P",70,"MUMPS2")

^SCR("PLCHINP1","P",70,"OUTPUT")

^SCR("PLCHINP1","P",70,"TYP")
D
^SCR("PLCHINP1","P",80,"CRD")
12,34,E,10,0
^SCR("PLCHINP1","P",80,"HELP")

^SCR("PLCHINP1","P",80,"LMAX")
11
^SCR("PLCHINP1","P",80,"MUMPS1")

^SCR("PLCHINP1","P",80,"MUMPS2")

^SCR("PLCHINP1","P",80,"OUTPUT")

^SCR("PLCHINP1","P",80,"TYP")
E
^SCR("PLCHINP1","P",81,"CRD")
5,21,D,8,0
^SCR("PLCHINP1","P",81,"HELP")

^SCR("PLCHINP1","P",81,"LMAX")
15
^SCR("PLCHINP1","P",81,"MUMPS1")

^SCR("PLCHINP1","P",81,"MUMPS2")

^SCR("PLCHINP1","P",81,"MUST")

^SCR("PLCHINP1","P",81,"TYP")
D
^SCR("PLCHINP1","P",82,"CRD")
6,26,E,2.,0
^SCR("PLCHINP1","P",82,"HELP")

^SCR("PLCHINP1","P",82,"LMAX")
15
^SCR("PLCHINP1","P",82,"MUMPS1")

^SCR("PLCHINP1","P",82,"MUMPS2")

^SCR("PLCHINP1","P",82,"MUST")

^SCR("PLCHINP1","P",82,"TYP")
E
^SCR("PLCHINP1","P",83,"CRD")
7,26,E,3.,0
^SCR("PLCHINP1","P",83,"HELP")

^SCR("PLCHINP1","P",83,"LMAX")
15
^SCR("PLCHINP1","P",83,"MUMPS1")

^SCR("PLCHINP1","P",83,"MUMPS2")

^SCR("PLCHINP1","P",83,"MUST")

^SCR("PLCHINP1","P",83,"TYP")
E
^SCR("PLCHINP1","P",84,"CRD")
8,18,E,11,0
^SCR("PLCHINP1","P",84,"HELP")

^SCR("PLCHINP1","P",84,"LMAX")
16
^SCR("PLCHINP1","P",84,"MUMPS1")

^SCR("PLCHINP1","P",84,"MUMPS2")

^SCR("PLCHINP1","P",84,"MUST")

^SCR("PLCHINP1","P",84,"TYP")
E
^SCR("PLCHINP1","P",85,"CRD")
9,18,E,11,0
^SCR("PLCHINP1","P",85,"HELP")

^SCR("PLCHINP1","P",85,"LMAX")
15
^SCR("PLCHINP1","P",85,"MUMPS1")

^SCR("PLCHINP1","P",85,"MUMPS2")

^SCR("PLCHINP1","P",85,"TYP")
E
^SCR("PLCHINP1","P",86,"CRD")
10,22,N,8,2
^SCR("PLCHINP1","P",86,"HELP")

^SCR("PLCHINP1","P",86,"LMAX")
15
^SCR("PLCHINP1","P",86,"MUMPS1")

^SCR("PLCHINP1","P",86,"MUMPS2")

^SCR("PLCHINP1","P",86,"TYP")
N
^SCR("PLCHINP1","P",87,"CRD")
11,21,D,8,0
^SCR("PLCHINP1","P",87,"HELP")

^SCR("PLCHINP1","P",87,"LMAX")
15
^SCR("PLCHINP1","P",87,"MUMPS1")

^SCR("PLCHINP1","P",87,"MUMPS2")

^SCR("PLCHINP1","P",87,"TYP")
D
^SCR("PLCHINP1","P",88,"CRD")
12,19,E,10,0
^SCR("PLCHINP1","P",88,"HELP")

^SCR("PLCHINP1","P",88,"LMAX")
15
^SCR("PLCHINP1","P",88,"MUMPS1")

^SCR("PLCHINP1","P",88,"MUMPS2")
N TZ S TZ=TZN D TZ^PLCHINP
^SCR("PLCHINP1","P",88,"TYP")
E
^SCR("PLCHINP1","P","NAME","BANK")
20
^SCR("PLCHINP1","P","NAME","BANKN")
82
^SCR("PLCHINP1","P","NAME","CHEK")
40
^SCR("PLCHINP1","P","NAME","CHEKN")
84
^SCR("PLCHINP1","P","NAME","DAT")
70
^SCR("PLCHINP1","P","NAME","DATN")
87
^SCR("PLCHINP1","P","NAME","HESH")
50
^SCR("PLCHINP1","P","NAME","HESHN")
85
^SCR("PLCHINP1","P","NAME","LPR")
10
^SCR("PLCHINP1","P","NAME","LPRN")
81
^SCR("PLCHINP1","P","NAME","SNIF")
30
^SCR("PLCHINP1","P","NAME","SNIFN")
83
^SCR("PLCHINP1","P","NAME","SUM")
60
^SCR("PLCHINP1","P","NAME","SUMN")
86
^SCR("PLCHINP1","P","NAME","TZ")
80
^SCR("PLCHINP1","P","NAME","TZN")
88
^SCR("PLCHINP1","P","NM",10)
LPR
^SCR("PLCHINP1","P","NM",20)
BANK
^SCR("PLCHINP1","P","NM",30)
SNIF
^SCR("PLCHINP1","P","NM",40)
CHEK
^SCR("PLCHINP1","P","NM",50)
HESH
^SCR("PLCHINP1","P","NM",60)
SUM
^SCR("PLCHINP1","P","NM",70)
DAT
^SCR("PLCHINP1","P","NM",80)
TZ
^SCR("PLCHINP1","P","NM",81)
LPRN
^SCR("PLCHINP1","P","NM",82)
BANKN
^SCR("PLCHINP1","P","NM",83)
SNIFN
^SCR("PLCHINP1","P","NM",84)
CHEKN
^SCR("PLCHINP1","P","NM",85)
HESHN
^SCR("PLCHINP1","P","NM",86)
SUMN
^SCR("PLCHINP1","P","NM",87)
DATN
^SCR("PLCHINP1","P","NM",88)
TZN
^SCR("PLCHINP1","P","RB",1)
5,18,14,61
^SCR("PRNEW")
H
^SCR("PRNEW",1)
                # hixt cew ly miepiy dixehqid #                                
^SCR("PRNEW",2)
                                                                               
^SCR("PRNEW",3)
                   {                      06} {05     : igkepd cew             
^SCR("PRNEW",4)
                                                                               
^SCR("PRNEW",5)
                                                                  1$           
^SCR("PRNEW",6)
                    : dry : iepiyd jix`z : ycg cew  : mcew cew :               
^SCR("PRNEW",7)
                                                                               
^SCR("PRNEW",8)
                                                                               
^SCR("PRNEW",9)
                                                                               
^SCR("PRNEW",10)
                                                                               
^SCR("PRNEW",11)
                                                                               
^SCR("PRNEW",12)
                                                                               
^SCR("PRNEW",13)
                                                                               
^SCR("PRNEW",14)
                                                                               
^SCR("PRNEW",15)
                                                                               
^SCR("PRNEW",16)
                                                                               
^SCR("PRNEW",17)
                                                                               
^SCR("PRNEW",18)
                                                                               
^SCR("PRNEW",19)
                                                                               
^SCR("PRNEW",20)
                                                                               
^SCR("PRNEW",21)
                $1                                                             
^SCR("PRNEW","A",1)
ˆ‰˜”ƒ…—Œ™�‰…�‰™„‰˜…ˆ‘‰„
^SCR("PRNEW","A",2)

^SCR("PRNEW","A",3)
:‰‡‹…�„ƒ…—
^SCR("PRNEW","A",4)

^SCR("PRNEW","A",5)

^SCR("PRNEW","A",6)
„’™‰…�‰™„Š‰˜€š™ƒ‡ƒ…—�ƒ…—ƒ…—
^SCR("PRNEW","A",7)
---------------------------------------
^SCR("PRNEW","A",8)

^SCR("PRNEW","A",9)

^SCR("PRNEW","A",10)

^SCR("PRNEW","A",11)

^SCR("PRNEW","A",12)

^SCR("PRNEW","A",13)

^SCR("PRNEW","A",14)

^SCR("PRNEW","A",15)

^SCR("PRNEW","A",16)

^SCR("PRNEW","A",17)

^SCR("PRNEW","A",18)

^SCR("PRNEW","A",19)

^SCR("PRNEW","A",20)

^SCR("PRNEW","A",21)

^SCR("PRNEW","AV",1)
yhrpsuekaohubhavhruyxhv
^SCR("PRNEW","AV",2)

^SCR("PRNEW","AV",3)
:hjfubvsue
^SCR("PRNEW","AV",4)

^SCR("PRNEW","AV",5)

^SCR("PRNEW","AV",6)
vgahubhavlhrt,asjsueosuesue
^SCR("PRNEW","AV",7)
---------------------------------------
^SCR("PRNEW","AV",8)

^SCR("PRNEW","AV",9)

^SCR("PRNEW","AV",10)

^SCR("PRNEW","AV",11)

^SCR("PRNEW","AV",12)

^SCR("PRNEW","AV",13)

^SCR("PRNEW","AV",14)

^SCR("PRNEW","AV",15)

^SCR("PRNEW","AV",16)

^SCR("PRNEW","AV",17)

^SCR("PRNEW","AV",18)

^SCR("PRNEW","AV",19)

^SCR("PRNEW","AV",20)

^SCR("PRNEW","AV",21)

^SCR("PRNEW","G",1,"CRD")
7,63,E,8,0
^SCR("PRNEW","G",1,"HELP")

^SCR("PRNEW","G",1,"LMAX")
10
^SCR("PRNEW","G",1,"MUMPS1")

^SCR("PRNEW","G",1,"MUMPS2")

^SCR("PRNEW","G",1,"OUTPUT")

^SCR("PRNEW","G",1,"SHEM")
 mcew cew 
^SCR("PRNEW","G",1,"TYP")
E
^SCR("PRNEW","G",2,"CRD")
7,52,E,8,0
^SCR("PRNEW","G",2,"HELP")

^SCR("PRNEW","G",2,"LMAX")
10
^SCR("PRNEW","G",2,"MUMPS1")

^SCR("PRNEW","G",2,"MUMPS2")

^SCR("PRNEW","G",2,"OUTPUT")

^SCR("PRNEW","G",2,"SHEM")
 ycg cew  
^SCR("PRNEW","G",2,"TYP")
E
^SCR("PRNEW","G",3,"CRD")
7,41,E,14,0
^SCR("PRNEW","G",3,"HELP")

^SCR("PRNEW","G",3,"LMAX")
14
^SCR("PRNEW","G",3,"MUMPS1")

^SCR("PRNEW","G",3,"MUMPS2")

^SCR("PRNEW","G",3,"OUTPUT")

^SCR("PRNEW","G",3,"SHEM")
 iepiyd jix`z 
^SCR("PRNEW","G",3,"TYP")
E
^SCR("PRNEW","G",4,"CRD")
7,26,E,5,0
^SCR("PRNEW","G",4,"HELP")

^SCR("PRNEW","G",4,"LMAX")
5
^SCR("PRNEW","G",4,"MUMPS1")

^SCR("PRNEW","G",4,"MUMPS2")

^SCR("PRNEW","G",4,"OUTPUT")

^SCR("PRNEW","G",4,"SHEM")
 dry 
^SCR("PRNEW","G",4,"TYP")
E
^SCR("PRNEW","G","DEL")

^SCR("PRNEW","G","MAX")
99999
^SCR("PRNEW","G","NAME","CODN")
2
^SCR("PRNEW","G","NAME","CODO")
1
^SCR("PRNEW","G","NAME","DATS")
3
^SCR("PRNEW","G","NAME","SHAAS")
4
^SCR("PRNEW","G","NM",1)
CODO
^SCR("PRNEW","G","NM",2)
CODN
^SCR("PRNEW","G","NM",3)
DATS
^SCR("PRNEW","G","NM",4)
SHAAS
^SCR("PRNEW","G","RB")
6,17,22,68
^SCR("PRNEW","G","REF")
^TEMP($P
^SCR("PRNEW","G","RZD")
\
^SCR("PRNEW","G","STEP")
1
^SCR("PRNEW","G","STG")
                    : dry : iepiyd jix`z : ycg cew  : mcew cew :               
^SCR("PRNEW","G","VG")
8
^SCR("PRNEW","NAME")
hixt cew ly dixehqid
^SCR("PRNEW","P",5,"CRD")
3,46,E,8,0
^SCR("PRNEW","P",5,"HELP")

^SCR("PRNEW","P",5,"LMAX")
8
^SCR("PRNEW","P",5,"MUMPS1")

^SCR("PRNEW","P",5,"MUMPS2")

^SCR("PRNEW","P",5,"OUTPUT")

^SCR("PRNEW","P",5,"TYP")
E
^SCR("PRNEW","P",6,"CRD")
3,45,H,25
^SCR("PRNEW","P",6,"HELP")

^SCR("PRNEW","P",6,"LMAX")
25
^SCR("PRNEW","P",6,"MUMPS1")

^SCR("PRNEW","P",6,"MUMPS2")

^SCR("PRNEW","P",6,"OUTPUT")

^SCR("PRNEW","P",6,"TYP")
H
^SCR("PRNEW","P","NAME","PAR")
5
^SCR("PRNEW","P","NAME","PAR1")
6
^SCR("PRNEW","P","NM",5)
PAR
^SCR("PRNEW","P","NM",6)
PAR1
^SCR("PRTBH")
H
^SCR("PRTBH",1)
                     # dgpd `ll mihixt zniyx #                                 
^SCR("PRTBH",2)
                                                               1$              
^SCR("PRTBH",3)
                   : xign :        hixt xe`z    : hixt cew :                   
^SCR("PRTBH",4)
                                                                               
^SCR("PRTBH",5)
                                                                               
^SCR("PRTBH",6)
                                                                               
^SCR("PRTBH",7)
                                                                               
^SCR("PRTBH",8)
                                                                               
^SCR("PRTBH",9)
                                                                               
^SCR("PRTBH",10)
                                                                               
^SCR("PRTBH",11)
                                                                               
^SCR("PRTBH",12)
                                                                               
^SCR("PRTBH",13)
                                                                               
^SCR("PRTBH",14)
                                                                               
^SCR("PRTBH",15)
                                                                               
^SCR("PRTBH",16)
                                                                               
^SCR("PRTBH",17)
                                                                               
^SCR("PRTBH",18)
                                                                               
^SCR("PRTBH",19)
                                                                               
^SCR("PRTBH",20)
             $1                                                                
^SCR("PRTBH","A",1)
„‡�„€ŒŒ�‰ˆ‰˜”šŽ‰™˜
^SCR("PRTBH","A",2)

^SCR("PRTBH","A",3)
˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("PRTBH","A",4)
-------------------------------------
^SCR("PRTBH","A",5)

^SCR("PRTBH","A",6)

^SCR("PRTBH","A",7)

^SCR("PRTBH","A",8)

^SCR("PRTBH","A",9)

^SCR("PRTBH","A",10)

^SCR("PRTBH","A",11)

^SCR("PRTBH","A",12)

^SCR("PRTBH","A",13)

^SCR("PRTBH","A",14)

^SCR("PRTBH","A",15)

^SCR("PRTBH","A",16)

^SCR("PRTBH","A",17)

^SCR("PRTBH","A",18)

^SCR("PRTBH","A",19)

^SCR("PRTBH","A",20)

^SCR("PRTBH","AV",1)
vjbvtkkohyhrp,nhar
^SCR("PRTBH","AV",2)

^SCR("PRTBH","AV",3)
rhjnyhrprut,yhrpsue
^SCR("PRTBH","AV",4)
-------------------------------------
^SCR("PRTBH","AV",5)

^SCR("PRTBH","AV",6)

^SCR("PRTBH","AV",7)

^SCR("PRTBH","AV",8)

^SCR("PRTBH","AV",9)

^SCR("PRTBH","AV",10)

^SCR("PRTBH","AV",11)

^SCR("PRTBH","AV",12)

^SCR("PRTBH","AV",13)

^SCR("PRTBH","AV",14)

^SCR("PRTBH","AV",15)

^SCR("PRTBH","AV",16)

^SCR("PRTBH","AV",17)

^SCR("PRTBH","AV",18)

^SCR("PRTBH","AV",19)

^SCR("PRTBH","AV",20)

^SCR("PRTBH","G",1,"CHECK")
Y
^SCR("PRTBH","G",1,"CRD")
4,59,E,8,0
^SCR("PRTBH","G",1,"FNC")
F6,F7,F9
^SCR("PRTBH","G",1,"GLOB")
PAR
^SCR("PRTBH","G",1,"HELP")
<F9> - hixt qihxk , <F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("PRTBH","G",1,"LMAX")
10
^SCR("PRTBH","G",1,"MUMPS1")
S %ZMSL="="
^SCR("PRTBH","G",1,"MUMPS2")
D PRT^P1PRTBH
^SCR("PRTBH","G",1,"MUST")

^SCR("PRTBH","G",1,"NLN")
20
^SCR("PRTBH","G",1,"RZD")
**
^SCR("PRTBH","G",1,"SHEM")
 hixt cew 
^SCR("PRTBH","G",1,"TOPB")
8
^SCR("PRTBH","G",1,"TYP")
E
^SCR("PRTBH","G",1,"VRB")
PRT1
^SCR("PRTBH","G",2,"CRD")
4,48,H,21,0
^SCR("PRTBH","G",2,"HELP")

^SCR("PRTBH","G",2,"LMAX")
21
^SCR("PRTBH","G",2,"MUMPS1")

^SCR("PRTBH","G",2,"MUMPS2")

^SCR("PRTBH","G",2,"OUTPUT")

^SCR("PRTBH","G",2,"SHEM")
        hixt xe`z    
^SCR("PRTBH","G",2,"TYP")
H
^SCR("PRTBH","G",3,"CRD")
4,26,N,6,2
^SCR("PRTBH","G",3,"HELP")

^SCR("PRTBH","G",3,"LMAX")
6
^SCR("PRTBH","G",3,"MUMPS1")

^SCR("PRTBH","G",3,"MUMPS2")

^SCR("PRTBH","G",3,"OUTPUT")

^SCR("PRTBH","G",3,"SHEM")
 xign 
^SCR("PRTBH","G",3,"TYP")
N
^SCR("PRTBH","G","DEL")
Y
^SCR("PRTBH","G","MAX")
99999
^SCR("PRTBH","G","NAME","MH")
3
^SCR("PRTBH","G","NAME","PRT")
1
^SCR("PRTBH","G","NAME","PRT1")
2
^SCR("PRTBH","G","NM",1)
PRT
^SCR("PRTBH","G","NM",2)
PRT1
^SCR("PRTBH","G","NM",3)
MH
^SCR("PRTBH","G","RB")
3,14,21,65
^SCR("PRTBH","G","REF")
^TEMP($P,"PRTBH"
^SCR("PRTBH","G","RZD")
\
^SCR("PRTBH","G","STEP")
1
^SCR("PRTBH","G","STG")
                   : xign :        hixt xe`z    : hixt cew :                   
^SCR("PRTBH","G","VG")
5
^SCR("PRTBH","NAME")

^SCR("PRTEND")
H
^SCR("PRTEND",1)
                             # xnbdl micnery mihixt zniyx #                    
^SCR("PRTEND",2)
                                                                 1$            
^SCR("PRTEND",3)
                     : x`yp :       hixt xe`z     : hixt cew :                 
^SCR("PRTEND",4)
                                                                               
^SCR("PRTEND",5)
                                                                               
^SCR("PRTEND",6)
                                                                               
^SCR("PRTEND",7)
                                                                               
^SCR("PRTEND",8)
                                                                               
^SCR("PRTEND",9)
                                                                               
^SCR("PRTEND",10)
                                                                               
^SCR("PRTEND",11)
                                                                               
^SCR("PRTEND",12)
                                                                               
^SCR("PRTEND",13)
                                                                               
^SCR("PRTEND",14)
                                                                               
^SCR("PRTEND",15)
                                                                               
^SCR("PRTEND",16)
                                                                               
^SCR("PRTEND",17)
                                                                               
^SCR("PRTEND",18)
                                                                               
^SCR("PRTEND",19)
                                                                               
^SCR("PRTEND",20)
                                                                               
^SCR("PRTEND",21)
                  $1                                                           
^SCR("PRTEND",22)
                                                                               
^SCR("PRTEND","A",1)
˜Ž‚„Œ�‰ƒŽ…’™�‰ˆ‰˜”šŽ‰™˜
^SCR("PRTEND","A",2)

^SCR("PRTEND","A",3)
˜€™�ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("PRTEND","A",4)
-------------------------------------
^SCR("PRTEND","A",5)

^SCR("PRTEND","A",6)

^SCR("PRTEND","A",7)

^SCR("PRTEND","A",8)

^SCR("PRTEND","A",9)

^SCR("PRTEND","A",10)

^SCR("PRTEND","A",11)

^SCR("PRTEND","A",12)

^SCR("PRTEND","A",13)

^SCR("PRTEND","A",14)

^SCR("PRTEND","A",15)

^SCR("PRTEND","A",16)

^SCR("PRTEND","A",17)

^SCR("PRTEND","A",18)

^SCR("PRTEND","A",19)

^SCR("PRTEND","A",20)

^SCR("PRTEND","A",21)

^SCR("PRTEND","A",22)

^SCR("PRTEND","AV",1)
rndvkohsnugaohyhrp,nhar
^SCR("PRTEND","AV",2)

^SCR("PRTEND","AV",3)
rtabyhrprut,yhrpsue
^SCR("PRTEND","AV",4)
-------------------------------------
^SCR("PRTEND","AV",5)

^SCR("PRTEND","AV",6)

^SCR("PRTEND","AV",7)

^SCR("PRTEND","AV",8)

^SCR("PRTEND","AV",9)

^SCR("PRTEND","AV",10)

^SCR("PRTEND","AV",11)

^SCR("PRTEND","AV",12)

^SCR("PRTEND","AV",13)

^SCR("PRTEND","AV",14)

^SCR("PRTEND","AV",15)

^SCR("PRTEND","AV",16)

^SCR("PRTEND","AV",17)

^SCR("PRTEND","AV",18)

^SCR("PRTEND","AV",19)

^SCR("PRTEND","AV",20)

^SCR("PRTEND","AV",21)

^SCR("PRTEND","AV",22)

^SCR("PRTEND","G",1,"CRD")
4,61,E,8,0
^SCR("PRTEND","G",1,"FNC")
F9,F8
^SCR("PRTEND","G",1,"GLOB")
PAR
^SCR("PRTEND","G",1,"HELP")
<F9> - hixt qihxk , <F8> - mihq , <F7> - dbvd , <F6> - my zlgzd itl yetig 
^SCR("PRTEND","G",1,"LMAX")
10
^SCR("PRTEND","G",1,"MUMPS1")

^SCR("PRTEND","G",1,"MUMPS2")
D PAR^P1PRTEND
^SCR("PRTEND","G",1,"MUST")

^SCR("PRTEND","G",1,"NLN")
20
^SCR("PRTEND","G",1,"RZD")
**
^SCR("PRTEND","G",1,"SHEM")
 hixt cew 
^SCR("PRTEND","G",1,"TOPB")
8
^SCR("PRTEND","G",1,"TYP")
E
^SCR("PRTEND","G",1,"VRB")
PAR1
^SCR("PRTEND","G",2,"CRD")
4,50,H,21,0
^SCR("PRTEND","G",2,"HELP")

^SCR("PRTEND","G",2,"LMAX")
21
^SCR("PRTEND","G",2,"MUMPS1")

^SCR("PRTEND","G",2,"MUMPS2")

^SCR("PRTEND","G",2,"OUTPUT")

^SCR("PRTEND","G",2,"SHEM")
       hixt xe`z     
^SCR("PRTEND","G",2,"TYP")
H
^SCR("PRTEND","G",3,"CRD")
4,28,N,4,0
^SCR("PRTEND","G",3,"HELP")

^SCR("PRTEND","G",3,"LMAX")
6
^SCR("PRTEND","G",3,"MUMPS1")

^SCR("PRTEND","G",3,"MUMPS2")

^SCR("PRTEND","G",3,"MUST")

^SCR("PRTEND","G",3,"SHEM")
 x`yp 
^SCR("PRTEND","G",3,"TYP")
N
^SCR("PRTEND","G","DEL")
Y
^SCR("PRTEND","G","MAX")
9999
^SCR("PRTEND","G","NAME","KAM")
3
^SCR("PRTEND","G","NAME","PAR")
1
^SCR("PRTEND","G","NAME","PAR1")
2
^SCR("PRTEND","G","NM",1)
PAR
^SCR("PRTEND","G","NM",2)
PAR1
^SCR("PRTEND","G","NM",3)
KAM
^SCR("PRTEND","G","RB")
3,19,22,67
^SCR("PRTEND","G","REF")
^TEMP($P
^SCR("PRTEND","G","RZD")
\
^SCR("PRTEND","G","STEP")
1
^SCR("PRTEND","G","STG")
                     : x`yp :       hixt xe`z     : hixt cew :                 
^SCR("PRTEND","G","VG")
5
^SCR("PRTEND","NAME")
xnbdl mixen`y mihixt zniyx
^SCR("PRTMB")
H
^SCR("PRTMB",1)
                         {                         05}                         
^SCR("PRTMB",2)
                                                               1$              
^SCR("PRTMB",3)
                   : xign :        hixt xe`z    : hixt cew :                   
^SCR("PRTMB",4)
                                                                               
^SCR("PRTMB",5)
                                                                               
^SCR("PRTMB",6)
                                                                               
^SCR("PRTMB",7)
                                                                               
^SCR("PRTMB",8)
                                                                               
^SCR("PRTMB",9)
                                                                               
^SCR("PRTMB",10)
                                                                               
^SCR("PRTMB",11)
                                                                               
^SCR("PRTMB",12)
                                                                               
^SCR("PRTMB",13)
                                                                               
^SCR("PRTMB",14)
                                                                               
^SCR("PRTMB",15)
                                                                               
^SCR("PRTMB",16)
                                                                               
^SCR("PRTMB",17)
                                                                               
^SCR("PRTMB",18)
                                                                               
^SCR("PRTMB",19)
                                                                               
^SCR("PRTMB",20)
             $1                                                                
^SCR("PRTMB","A",1)

^SCR("PRTMB","A",2)

^SCR("PRTMB","A",3)
˜‰‡Žˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("PRTMB","A",4)
-------------------------------------
^SCR("PRTMB","A",5)

^SCR("PRTMB","A",6)

^SCR("PRTMB","A",7)

^SCR("PRTMB","A",8)

^SCR("PRTMB","A",9)

^SCR("PRTMB","A",10)

^SCR("PRTMB","A",11)

^SCR("PRTMB","A",12)

^SCR("PRTMB","A",13)

^SCR("PRTMB","A",14)

^SCR("PRTMB","A",15)

^SCR("PRTMB","A",16)

^SCR("PRTMB","A",17)

^SCR("PRTMB","A",18)

^SCR("PRTMB","A",19)

^SCR("PRTMB","A",20)

^SCR("PRTMB","AV",1)

^SCR("PRTMB","AV",2)

^SCR("PRTMB","AV",3)
rhjnyhrprut,yhrpsue
^SCR("PRTMB","AV",4)
-------------------------------------
^SCR("PRTMB","AV",5)

^SCR("PRTMB","AV",6)

^SCR("PRTMB","AV",7)

^SCR("PRTMB","AV",8)

^SCR("PRTMB","AV",9)

^SCR("PRTMB","AV",10)

^SCR("PRTMB","AV",11)

^SCR("PRTMB","AV",12)

^SCR("PRTMB","AV",13)

^SCR("PRTMB","AV",14)

^SCR("PRTMB","AV",15)

^SCR("PRTMB","AV",16)

^SCR("PRTMB","AV",17)

^SCR("PRTMB","AV",18)

^SCR("PRTMB","AV",19)

^SCR("PRTMB","AV",20)

^SCR("PRTMB","G",1,"CHECK")
Y
^SCR("PRTMB","G",1,"CRD")
4,59,E,8,0
^SCR("PRTMB","G",1,"FNC")
F6,F7,F9
^SCR("PRTMB","G",1,"GLOB")
PAR
^SCR("PRTMB","G",1,"HELP")
<F9> - hixt qihxk , <F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("PRTMB","G",1,"LMAX")
10
^SCR("PRTMB","G",1,"MUMPS1")
S %ZMSL="="
^SCR("PRTMB","G",1,"MUMPS2")
D PRT^P1PRTMB
^SCR("PRTMB","G",1,"MUST")

^SCR("PRTMB","G",1,"NLN")
20
^SCR("PRTMB","G",1,"RZD")
**
^SCR("PRTMB","G",1,"SHEM")
 hixt cew 
^SCR("PRTMB","G",1,"TOPB")
8
^SCR("PRTMB","G",1,"TYP")
E
^SCR("PRTMB","G",1,"VRB")
PRT1
^SCR("PRTMB","G",2,"CRD")
4,48,H,21,0
^SCR("PRTMB","G",2,"HELP")

^SCR("PRTMB","G",2,"LMAX")
21
^SCR("PRTMB","G",2,"MUMPS1")

^SCR("PRTMB","G",2,"MUMPS2")

^SCR("PRTMB","G",2,"OUTPUT")

^SCR("PRTMB","G",2,"SHEM")
        hixt xe`z    
^SCR("PRTMB","G",2,"TYP")
H
^SCR("PRTMB","G",3,"CRD")
4,26,N,6,2
^SCR("PRTMB","G",3,"HELP")

^SCR("PRTMB","G",3,"LMAX")
6
^SCR("PRTMB","G",3,"MUMPS1")

^SCR("PRTMB","G",3,"MUMPS2")

^SCR("PRTMB","G",3,"OUTPUT")

^SCR("PRTMB","G",3,"SHEM")
 xign 
^SCR("PRTMB","G",3,"TYP")
N
^SCR("PRTMB","G","DEL")
Y
^SCR("PRTMB","G","MAX")
99999
^SCR("PRTMB","G","NAME","MH")
3
^SCR("PRTMB","G","NAME","PRT")
1
^SCR("PRTMB","G","NAME","PRT1")
2
^SCR("PRTMB","G","NM",1)
PRT
^SCR("PRTMB","G","NM",2)
PRT1
^SCR("PRTMB","G","NM",3)
MH
^SCR("PRTMB","G","RB")
3,14,21,65
^SCR("PRTMB","G","REF")
^TEMP($P,"PRTMB"
^SCR("PRTMB","G","RZD")
\
^SCR("PRTMB","G","STEP")
1
^SCR("PRTMB","G","STG")
                   : xign :        hixt xe`z    : hixt cew :                   
^SCR("PRTMB","G","VG")
5
^SCR("PRTMB","NAME")

^SCR("PRTMB","P",5,"CRD")
1,54,H,27,0
^SCR("PRTMB","P",5,"HELP")

^SCR("PRTMB","P",5,"LMAX")
28
^SCR("PRTMB","P",5,"MUMPS1")

^SCR("PRTMB","P",5,"MUMPS2")

^SCR("PRTMB","P",5,"OUTPUT")

^SCR("PRTMB","P",5,"TYP")
H
^SCR("PRTMB","P","NAME","KOT")
5
^SCR("PRTMB","P","NM",5)
KOT
^SCR("PRTNO")
H
^SCR("PRTNO",1)
                            #  mihixt zlirp  #                                 
^SCR("PRTNO",2)
                      {05: 1 - oeikx`n mihixt , 0 - exnbpy mihixt              
^SCR("PRTNO",3)
                                                               1$              
^SCR("PRTNO",4)
                          :        hixt xe`z    : hixt cew :                   
^SCR("PRTNO",5)
                                                                               
^SCR("PRTNO",6)
                                                                               
^SCR("PRTNO",7)
                                                                               
^SCR("PRTNO",8)
                                                                               
^SCR("PRTNO",9)
                                                                               
^SCR("PRTNO",10)
                                                                               
^SCR("PRTNO",11)
                                                                               
^SCR("PRTNO",12)
                                                                               
^SCR("PRTNO",13)
                                                                               
^SCR("PRTNO",14)
                                                                               
^SCR("PRTNO",15)
                                                                               
^SCR("PRTNO",16)
                                                                               
^SCR("PRTNO",17)
                                                                               
^SCR("PRTNO",18)
                                                                               
^SCR("PRTNO",19)
                                                                               
^SCR("PRTNO",20)
                                                                               
^SCR("PRTNO",21)
                      $1                                                       
^SCR("PRTNO","A",1)
�‰ˆ‰˜”šŒ‰’�
^SCR("PRTNO","A",2)
:1-�…‰‹˜€Ž�‰ˆ‰˜”,0-…˜Ž‚�™�‰ˆ‰˜”
^SCR("PRTNO","A",3)

^SCR("PRTNO","A",4)
ˆ‰˜”˜…€šˆ‰˜”ƒ…—
^SCR("PRTNO","A",5)
-------------------------------
^SCR("PRTNO","A",6)

^SCR("PRTNO","A",7)

^SCR("PRTNO","A",8)

^SCR("PRTNO","A",9)

^SCR("PRTNO","A",10)

^SCR("PRTNO","A",11)

^SCR("PRTNO","A",12)

^SCR("PRTNO","A",13)

^SCR("PRTNO","A",14)

^SCR("PRTNO","A",15)

^SCR("PRTNO","A",16)

^SCR("PRTNO","A",17)

^SCR("PRTNO","A",18)

^SCR("PRTNO","A",19)

^SCR("PRTNO","A",20)

^SCR("PRTNO","A",21)

^SCR("PRTNO","AV",1)
ohyhrp,khgb
^SCR("PRTNO","AV",2)
:1-iuhfrtnohyhrp'0-urndbaohyhrp
^SCR("PRTNO","AV",3)

^SCR("PRTNO","AV",4)
yhrprut,yhrpsue
^SCR("PRTNO","AV",5)
-------------------------------
^SCR("PRTNO","AV",6)

^SCR("PRTNO","AV",7)

^SCR("PRTNO","AV",8)

^SCR("PRTNO","AV",9)

^SCR("PRTNO","AV",10)

^SCR("PRTNO","AV",11)

^SCR("PRTNO","AV",12)

^SCR("PRTNO","AV",13)

^SCR("PRTNO","AV",14)

^SCR("PRTNO","AV",15)

^SCR("PRTNO","AV",16)

^SCR("PRTNO","AV",17)

^SCR("PRTNO","AV",18)

^SCR("PRTNO","AV",19)

^SCR("PRTNO","AV",20)

^SCR("PRTNO","AV",21)

^SCR("PRTNO","G",1,"CHECK")
Y
^SCR("PRTNO","G",1,"CRD")
5,59,E,8,0
^SCR("PRTNO","G",1,"FNC")

^SCR("PRTNO","G",1,"GLOB")
PAR
^SCR("PRTNO","G",1,"HELP")

^SCR("PRTNO","G",1,"LMAX")
10
^SCR("PRTNO","G",1,"MUMPS1")
S %ZMSL="="
^SCR("PRTNO","G",1,"MUMPS2")

^SCR("PRTNO","G",1,"MUST")

^SCR("PRTNO","G",1,"NLN")
20
^SCR("PRTNO","G",1,"RZD")
**
^SCR("PRTNO","G",1,"SHEM")
 hixt cew 
^SCR("PRTNO","G",1,"TOPB")
8
^SCR("PRTNO","G",1,"TYP")
E
^SCR("PRTNO","G",1,"VRB")
PRT1
^SCR("PRTNO","G",2,"CRD")
5,48,H,21,0
^SCR("PRTNO","G",2,"HELP")

^SCR("PRTNO","G",2,"LMAX")
21
^SCR("PRTNO","G",2,"MUMPS1")

^SCR("PRTNO","G",2,"MUMPS2")

^SCR("PRTNO","G",2,"OUTPUT")

^SCR("PRTNO","G",2,"SHEM")
        hixt xe`z    
^SCR("PRTNO","G",2,"TYP")
H
^SCR("PRTNO","G","DEL")
Y
^SCR("PRTNO","G","MAX")
99999
^SCR("PRTNO","G","NAME","PRT")
1
^SCR("PRTNO","G","NAME","PRT1")
2
^SCR("PRTNO","G","NM",1)
PRT
^SCR("PRTNO","G","NM",2)
PRT1
^SCR("PRTNO","G","RB")
4,23,22,65
^SCR("PRTNO","G","REF")
^TEMP($P,"PRTNO"
^SCR("PRTNO","G","RZD")
\
^SCR("PRTNO","G","STEP")
1
^SCR("PRTNO","G","STG")
                          :        hixt xe`z    : hixt cew :                   
^SCR("PRTNO","G","VG")
6
^SCR("PRTNO","NAME")
mihixt zlirp
^SCR("PRTNO","P",5,"CRD")
2,22,N,1,0
^SCR("PRTNO","P",5,"HELP")

^SCR("PRTNO","P",5,"LMAX")
3
^SCR("PRTNO","P",5,"MUMPS1")
S:'$G(ARX) ARX=0
^SCR("PRTNO","P",5,"MUMPS2")
D ^%L1BDO
^SCR("PRTNO","P",5,"MUST")

^SCR("PRTNO","P",5,"TYP")
N
^SCR("PRTNO","P","NAME","ARX")
5
^SCR("PRTNO","P","NM",5)
ARX
^SCR("S1ER")
H
^SCR("S1ER",1)
                                                                               
^SCR("S1ER",2)
                                                                            1$ 
^SCR("S1ER",3)
     :revia 'z:             d`iby xe`z            :   dlib in   :  jix`z :     
^SCR("S1ER",4)
                                                                               
^SCR("S1ER",5)
                                                                               
^SCR("S1ER",6)
                                                                               
^SCR("S1ER",7)
                                                                               
^SCR("S1ER",8)
                                                                               
^SCR("S1ER",9)
                                                                               
^SCR("S1ER",10)
                                                                               
^SCR("S1ER",11)
                                                                               
^SCR("S1ER",12)
                                                                               
^SCR("S1ER",13)
                                                                               
^SCR("S1ER",14)
                                                                               
^SCR("S1ER",15)
                                                                               
^SCR("S1ER",16)
                                                                               
^SCR("S1ER",17)
                                                                               
^SCR("S1ER",18)
                                                                               
^SCR("S1ER",19)
                                                                               
^SCR("S1ER",20)
                                                                               
^SCR("S1ER",21)
 $1                                                                            
^SCR("S1ER","A",1)

^SCR("S1ER","A",2)

^SCR("S1ER","A",3)
’…–‰�'š„€‰‚™˜…€š„Œ‰‚‰ŽŠ‰˜€š
^SCR("S1ER","A",4)
----------------------------------------------------------------
^SCR("S1ER","A",5)

^SCR("S1ER","A",6)

^SCR("S1ER","A",7)

^SCR("S1ER","A",8)

^SCR("S1ER","A",9)

^SCR("S1ER","A",10)

^SCR("S1ER","A",11)

^SCR("S1ER","A",12)

^SCR("S1ER","A",13)

^SCR("S1ER","A",14)

^SCR("S1ER","A",15)

^SCR("S1ER","A",16)

^SCR("S1ER","A",17)

^SCR("S1ER","A",18)

^SCR("S1ER","A",19)

^SCR("S1ER","A",20)

^SCR("S1ER","A",21)

^SCR("S1ER","AV",1)

^SCR("S1ER","AV",2)

^SCR("S1ER","AV",3)
gumhcw,vthdarut,vkhdhnlhrt,
^SCR("S1ER","AV",4)
----------------------------------------------------------------
^SCR("S1ER","AV",5)

^SCR("S1ER","AV",6)

^SCR("S1ER","AV",7)

^SCR("S1ER","AV",8)

^SCR("S1ER","AV",9)

^SCR("S1ER","AV",10)

^SCR("S1ER","AV",11)

^SCR("S1ER","AV",12)

^SCR("S1ER","AV",13)

^SCR("S1ER","AV",14)

^SCR("S1ER","AV",15)

^SCR("S1ER","AV",16)

^SCR("S1ER","AV",17)

^SCR("S1ER","AV",18)

^SCR("S1ER","AV",19)

^SCR("S1ER","AV",20)

^SCR("S1ER","AV",21)

^SCR("S1ER","G",1,"CRD")
4,73,D,8,0
^SCR("S1ER","G",1,"HELP")

^SCR("S1ER","G",1,"LMAX")
8
^SCR("S1ER","G",1,"MUMPS1")
S:'$G(TRH) TRH=$$^%L1DC($H,1)
^SCR("S1ER","G",1,"MUMPS2")

^SCR("S1ER","G",1,"SHEM")
  jix`z 
^SCR("S1ER","G",1,"TYP")
D
^SCR("S1ER","G",2,"CRD")
4,64,H,13,0
^SCR("S1ER","G",2,"HELP")

^SCR("S1ER","G",2,"LMAX")
13
^SCR("S1ER","G",2,"MUMPS1")

^SCR("S1ER","G",2,"MUMPS2")

^SCR("S1ER","G",2,"SHEM")
   dlib in   
^SCR("S1ER","G",2,"TYP")
H
^SCR("S1ER","G",3,"CRD")
4,50,H,35,0
^SCR("S1ER","G",3,"HELP")

^SCR("S1ER","G",3,"LMAX")
35
^SCR("S1ER","G",3,"MUMPS1")

^SCR("S1ER","G",3,"MUMPS2")

^SCR("S1ER","G",3,"SHEM")
             d`iby xe`z            
^SCR("S1ER","G",3,"TYP")
H
^SCR("S1ER","G",4,"CRD")
4,14,D,8,0
^SCR("S1ER","G",4,"HELP")

^SCR("S1ER","G",4,"LMAX")
8
^SCR("S1ER","G",4,"MUMPS1")

^SCR("S1ER","G",4,"MUMPS2")

^SCR("S1ER","G",4,"SHEM")
revia 'z
^SCR("S1ER","G",4,"TYP")
D
^SCR("S1ER","G","DEL")
Y
^SCR("S1ER","G","MAX")
99999
^SCR("S1ER","G","NAME","MI")
2
^SCR("S1ER","G","NAME","TOHEN")
3
^SCR("S1ER","G","NAME","TRH")
1
^SCR("S1ER","G","NAME","TRHB")
4
^SCR("S1ER","G","NM",1)
TRH
^SCR("S1ER","G","NM",2)
MI
^SCR("S1ER","G","NM",3)
TOHEN
^SCR("S1ER","G","NM",4)
TRHB
^SCR("S1ER","G","RB")
3,2,22,78
^SCR("S1ER","G","REF")
^TEMP($P
^SCR("S1ER","G","RZD")
\
^SCR("S1ER","G","STEP")
1
^SCR("S1ER","G","STG")
     :revia 'z:             d`iby xe`z            :   dlib in   :  jix`z :     
^SCR("S1ER","G","VG")
5
^SCR("S1ER","NAME")

^SCR("S1TEL")
H
^SCR("S1TEL",1)
                                                                               
^SCR("S1TEL",2)
                                                                             1$
^SCR("S1TEL",3)
 : dvea :          dira xe`z       :   oetlh  :   lvliv in   : dry :  jix`z :  
^SCR("S1TEL",4)
                                                                               
^SCR("S1TEL",5)
                                                                               
^SCR("S1TEL",6)
                                                                               
^SCR("S1TEL",7)
                                                                               
^SCR("S1TEL",8)
                                                                               
^SCR("S1TEL",9)
                                                                               
^SCR("S1TEL",10)
                                                                               
^SCR("S1TEL",11)
                                                                               
^SCR("S1TEL",12)
                                                                               
^SCR("S1TEL",13)
                                                                               
^SCR("S1TEL",14)
                                                                               
^SCR("S1TEL",15)
                                                                               
^SCR("S1TEL",16)
                                                                               
^SCR("S1TEL",17)
                                                                               
^SCR("S1TEL",18)
                                                                               
^SCR("S1TEL",19)
                                                                               
^SCR("S1TEL",20)
                                                                               
^SCR("S1TEL",21)
 $1                                                                            
^SCR("S1TEL","A",1)

^SCR("S1TEL","A",2)

^SCR("S1TEL","A",3)
„–…�„‰’�˜…€š�…”ŒˆŒ–Œ‰–‰Ž„’™Š‰˜€š
^SCR("S1TEL","A",4)
-----------------------------------------------------------------------
^SCR("S1TEL","A",5)

^SCR("S1TEL","A",6)

^SCR("S1TEL","A",7)

^SCR("S1TEL","A",8)

^SCR("S1TEL","A",9)

^SCR("S1TEL","A",10)

^SCR("S1TEL","A",11)

^SCR("S1TEL","A",12)

^SCR("S1TEL","A",13)

^SCR("S1TEL","A",14)

^SCR("S1TEL","A",15)

^SCR("S1TEL","A",16)

^SCR("S1TEL","A",17)

^SCR("S1TEL","A",18)

^SCR("S1TEL","A",19)

^SCR("S1TEL","A",20)

^SCR("S1TEL","A",21)

^SCR("S1TEL","AV",1)

^SCR("S1TEL","AV",2)

^SCR("S1TEL","AV",3)
vmucvhgcrut,iupkykmkhmhnvgalhrt,
^SCR("S1TEL","AV",4)
-----------------------------------------------------------------------
^SCR("S1TEL","AV",5)

^SCR("S1TEL","AV",6)

^SCR("S1TEL","AV",7)

^SCR("S1TEL","AV",8)

^SCR("S1TEL","AV",9)

^SCR("S1TEL","AV",10)

^SCR("S1TEL","AV",11)

^SCR("S1TEL","AV",12)

^SCR("S1TEL","AV",13)

^SCR("S1TEL","AV",14)

^SCR("S1TEL","AV",15)

^SCR("S1TEL","AV",16)

^SCR("S1TEL","AV",17)

^SCR("S1TEL","AV",18)

^SCR("S1TEL","AV",19)

^SCR("S1TEL","AV",20)

^SCR("S1TEL","AV",21)

^SCR("S1TEL","G",1,"CRD")
4,76,D,8,0
^SCR("S1TEL","G",1,"HELP")

^SCR("S1TEL","G",1,"LMAX")
8
^SCR("S1TEL","G",1,"MUMPS1")
S:'$G(TRH) TRH=$$^%L1DC($H,1)
^SCR("S1TEL","G",1,"MUMPS2")

^SCR("S1TEL","G",1,"SHEM")
  jix`z 
^SCR("S1TEL","G",1,"TYP")
D
^SCR("S1TEL","G",2,"CRD")
4,67,T,5,0
^SCR("S1TEL","G",2,"HELP")

^SCR("S1TEL","G",2,"LMAX")
5
^SCR("S1TEL","G",2,"MUMPS1")
S:'$G(SHAA) SHAA=$$T^%L1TIME($H)
^SCR("S1TEL","G",2,"MUMPS2")

^SCR("S1TEL","G",2,"SHEM")
 dry 
^SCR("S1TEL","G",2,"TYP")
T
^SCR("S1TEL","G",3,"CRD")
4,61,H,14,0
^SCR("S1TEL","G",3,"HELP")

^SCR("S1TEL","G",3,"LMAX")
14
^SCR("S1TEL","G",3,"MUMPS1")

^SCR("S1TEL","G",3,"MUMPS2")

^SCR("S1TEL","G",3,"SHEM")
   lvliv in   
^SCR("S1TEL","G",3,"TYP")
H
^SCR("S1TEL","G",4,"CRD")
4,46,E,10,0
^SCR("S1TEL","G",4,"HELP")

^SCR("S1TEL","G",4,"LMAX")
10
^SCR("S1TEL","G",4,"MUMPS1")

^SCR("S1TEL","G",4,"MUMPS2")

^SCR("S1TEL","G",4,"SHEM")
   oetlh  
^SCR("S1TEL","G",4,"TYP")
E
^SCR("S1TEL","G",5,"CRD")
4,35,H,26,0
^SCR("S1TEL","G",5,"HELP")

^SCR("S1TEL","G",5,"LMAX")
26
^SCR("S1TEL","G",5,"MUMPS1")

^SCR("S1TEL","G",5,"MUMPS2")

^SCR("S1TEL","G",5,"SHEM")
          dira xe`z       
^SCR("S1TEL","G",5,"TYP")
H
^SCR("S1TEL","G",6,"CRD")
4,8,T,5,0
^SCR("S1TEL","G",6,"HELP")

^SCR("S1TEL","G",6,"LMAX")
6
^SCR("S1TEL","G",6,"MUMPS1")

^SCR("S1TEL","G",6,"MUMPS2")

^SCR("S1TEL","G",6,"SHEM")
 dvea 
^SCR("S1TEL","G",6,"TYP")
T
^SCR("S1TEL","G","DEL")
Y
^SCR("S1TEL","G","MAX")
99999
^SCR("S1TEL","G","NAME","MI")
3
^SCR("S1TEL","G","NAME","PROBL")
5
^SCR("S1TEL","G","NAME","SHAA")
2
^SCR("S1TEL","G","NAME","SHAAB")
6
^SCR("S1TEL","G","NAME","TEL")
4
^SCR("S1TEL","G","NAME","TRH")
1
^SCR("S1TEL","G","NM",1)
TRH
^SCR("S1TEL","G","NM",2)
SHAA
^SCR("S1TEL","G","NM",3)
MI
^SCR("S1TEL","G","NM",4)
TEL
^SCR("S1TEL","G","NM",5)
PROBL
^SCR("S1TEL","G","NM",6)
SHAAB
^SCR("S1TEL","G","RB")
3,2,22,79
^SCR("S1TEL","G","REF")
^TEMP($P
^SCR("S1TEL","G","RZD")
\
^SCR("S1TEL","G","STEP")
1
^SCR("S1TEL","G","STG")
 : dvea :          dira xe`z       :   oetlh  :   lvliv in   : dry :  jix`z :  
^SCR("S1TEL","G","VG")
5
^SCR("S1TEL","NAME")

^SCR("S1ZI")
H
^SCR("S1ZI",1)
                                                                               
^SCR("S1ZI",2)
                                                                            1$ 
^SCR("S1ZI",3)
   :revia 'z:             oeirx okez              :   ywia in   :  jix`z :     
^SCR("S1ZI",4)
                                                                               
^SCR("S1ZI",5)
                                                                               
^SCR("S1ZI",6)
                                                                               
^SCR("S1ZI",7)
                                                                               
^SCR("S1ZI",8)
                                                                               
^SCR("S1ZI",9)
                                                                               
^SCR("S1ZI",10)
                                                                               
^SCR("S1ZI",11)
                                                                               
^SCR("S1ZI",12)
                                                                               
^SCR("S1ZI",13)
                                                                               
^SCR("S1ZI",14)
                                                                               
^SCR("S1ZI",15)
                                                                               
^SCR("S1ZI",16)
                                                                               
^SCR("S1ZI",17)
                                                                               
^SCR("S1ZI",18)
                                                                               
^SCR("S1ZI",19)
                                                                               
^SCR("S1ZI",20)
                                                                               
^SCR("S1ZI",21)
 $1                                                                            
^SCR("S1ZI","A",1)

^SCR("S1ZI","A",2)

^SCR("S1ZI","A",3)
’…–‰�'š�…‰’˜�‹…š™—‰�‰ŽŠ‰˜€š
^SCR("S1ZI","A",4)
------------------------------------------------------------------
^SCR("S1ZI","A",5)

^SCR("S1ZI","A",6)

^SCR("S1ZI","A",7)

^SCR("S1ZI","A",8)

^SCR("S1ZI","A",9)

^SCR("S1ZI","A",10)

^SCR("S1ZI","A",11)

^SCR("S1ZI","A",12)

^SCR("S1ZI","A",13)

^SCR("S1ZI","A",14)

^SCR("S1ZI","A",15)

^SCR("S1ZI","A",16)

^SCR("S1ZI","A",17)

^SCR("S1ZI","A",18)

^SCR("S1ZI","A",19)

^SCR("S1ZI","A",20)

^SCR("S1ZI","A",21)

^SCR("S1ZI","AV",1)

^SCR("S1ZI","AV",2)

^SCR("S1ZI","AV",3)
gumhcw,iuhgrifu,aehchnlhrt,
^SCR("S1ZI","AV",4)
------------------------------------------------------------------
^SCR("S1ZI","AV",5)

^SCR("S1ZI","AV",6)

^SCR("S1ZI","AV",7)

^SCR("S1ZI","AV",8)

^SCR("S1ZI","AV",9)

^SCR("S1ZI","AV",10)

^SCR("S1ZI","AV",11)

^SCR("S1ZI","AV",12)

^SCR("S1ZI","AV",13)

^SCR("S1ZI","AV",14)

^SCR("S1ZI","AV",15)

^SCR("S1ZI","AV",16)

^SCR("S1ZI","AV",17)

^SCR("S1ZI","AV",18)

^SCR("S1ZI","AV",19)

^SCR("S1ZI","AV",20)

^SCR("S1ZI","AV",21)

^SCR("S1ZI","G",1,"CRD")
4,73,D,8,0
^SCR("S1ZI","G",1,"HELP")

^SCR("S1ZI","G",1,"LMAX")
8
^SCR("S1ZI","G",1,"MUMPS1")
S:'$G(TRH) TRH=$$^%L1DC($H,1)
^SCR("S1ZI","G",1,"MUMPS2")

^SCR("S1ZI","G",1,"SHEM")
  jix`z 
^SCR("S1ZI","G",1,"TYP")
D
^SCR("S1ZI","G",2,"CRD")
4,64,H,13,0
^SCR("S1ZI","G",2,"HELP")

^SCR("S1ZI","G",2,"LMAX")
13
^SCR("S1ZI","G",2,"MUMPS1")

^SCR("S1ZI","G",2,"MUMPS2")

^SCR("S1ZI","G",2,"SHEM")
   ywia in   
^SCR("S1ZI","G",2,"TYP")
H
^SCR("S1ZI","G",3,"CRD")
4,50,H,37,0
^SCR("S1ZI","G",3,"HELP")

^SCR("S1ZI","G",3,"LMAX")
37
^SCR("S1ZI","G",3,"MUMPS1")

^SCR("S1ZI","G",3,"MUMPS2")

^SCR("S1ZI","G",3,"SHEM")
             oeirx okez              
^SCR("S1ZI","G",3,"TYP")
H
^SCR("S1ZI","G",4,"CRD")
4,12,D,8,0
^SCR("S1ZI","G",4,"HELP")

^SCR("S1ZI","G",4,"LMAX")
8
^SCR("S1ZI","G",4,"MUMPS1")

^SCR("S1ZI","G",4,"MUMPS2")

^SCR("S1ZI","G",4,"SHEM")
revia 'z
^SCR("S1ZI","G",4,"TYP")
D
^SCR("S1ZI","G","DEL")
Y
^SCR("S1ZI","G","MAX")
99999
^SCR("S1ZI","G","NAME","MI")
2
^SCR("S1ZI","G","NAME","TOHEN")
3
^SCR("S1ZI","G","NAME","TRH")
1
^SCR("S1ZI","G","NAME","TRHB")
4
^SCR("S1ZI","G","NM",1)
TRH
^SCR("S1ZI","G","NM",2)
MI
^SCR("S1ZI","G","NM",3)
TOHEN
^SCR("S1ZI","G","NM",4)
TRHB
^SCR("S1ZI","G","RB")
3,2,22,78
^SCR("S1ZI","G","REF")
^TEMP($P
^SCR("S1ZI","G","RZD")
\
^SCR("S1ZI","G","STEP")
1
^SCR("S1ZI","G","STG")
   :revia 'z:             oeirx okez              :   ywia in   :  jix`z :     
^SCR("S1ZI","G","VG")
5
^SCR("S1ZI","NAME")
zepeirxZ 
^SCR("SHULHAN")
H
^SCR("SHULHAN",1)
                                 #  zepgley zlah  #                            
^SCR("SHULHAN",2)
                                                                               
^SCR("SHULHAN",3)
                                                                          1$   
^SCR("SHULHAN",4)
              : dgpd :      ogley beq xe`z    : ogley beq : ogley 'qn :        
^SCR("SHULHAN",5)
                                                                               
^SCR("SHULHAN",6)
                                                                               
^SCR("SHULHAN",7)
                                                                               
^SCR("SHULHAN",8)
                                                                               
^SCR("SHULHAN",9)
                                                                               
^SCR("SHULHAN",10)
                                                                               
^SCR("SHULHAN",11)
                                                                               
^SCR("SHULHAN",12)
                                                                               
^SCR("SHULHAN",13)
                                                                               
^SCR("SHULHAN",14)
                                                                               
^SCR("SHULHAN",15)
                                                                               
^SCR("SHULHAN",16)
                                                                               
^SCR("SHULHAN",17)
                                                                               
^SCR("SHULHAN",18)
                                                                               
^SCR("SHULHAN",19)
                                                                               
^SCR("SHULHAN",20)
                                                                               
^SCR("SHULHAN",21)
                                                                               
^SCR("SHULHAN",22)
         $1                                                                    
^SCR("SHULHAN","A",1)
š…�‡Œ…™šŒ�ˆ
^SCR("SHULHAN","A",2)

^SCR("SHULHAN","A",3)

^SCR("SHULHAN","A",4)
„‡�„�‡Œ…™‚…‘˜…€š�‡Œ…™‚…‘�‡Œ…™'‘Ž
^SCR("SHULHAN","A",5)
----------------------------------------------------
^SCR("SHULHAN","A",6)

^SCR("SHULHAN","A",7)

^SCR("SHULHAN","A",8)

^SCR("SHULHAN","A",9)

^SCR("SHULHAN","A",10)

^SCR("SHULHAN","A",11)

^SCR("SHULHAN","A",12)

^SCR("SHULHAN","A",13)

^SCR("SHULHAN","A",14)

^SCR("SHULHAN","A",15)

^SCR("SHULHAN","A",16)

^SCR("SHULHAN","A",17)

^SCR("SHULHAN","A",18)

^SCR("SHULHAN","A",19)

^SCR("SHULHAN","A",20)

^SCR("SHULHAN","A",21)

^SCR("SHULHAN","A",22)

^SCR("SHULHAN","AV",1)
,ubjkua,kcy
^SCR("SHULHAN","AV",2)

^SCR("SHULHAN","AV",3)

^SCR("SHULHAN","AV",4)
vjbvijkuaduxrut,ijkuaduxijkuawxn
^SCR("SHULHAN","AV",5)
----------------------------------------------------
^SCR("SHULHAN","AV",6)

^SCR("SHULHAN","AV",7)

^SCR("SHULHAN","AV",8)

^SCR("SHULHAN","AV",9)

^SCR("SHULHAN","AV",10)

^SCR("SHULHAN","AV",11)

^SCR("SHULHAN","AV",12)

^SCR("SHULHAN","AV",13)

^SCR("SHULHAN","AV",14)

^SCR("SHULHAN","AV",15)

^SCR("SHULHAN","AV",16)

^SCR("SHULHAN","AV",17)

^SCR("SHULHAN","AV",18)

^SCR("SHULHAN","AV",19)

^SCR("SHULHAN","AV",20)

^SCR("SHULHAN","AV",21)

^SCR("SHULHAN","AV",22)

^SCR("SHULHAN","G",1,"CRD")
5,70,N,3,0
^SCR("SHULHAN","G",1,"HELP")
999 cr 1-n xtqn
^SCR("SHULHAN","G",1,"LMAX")
11
^SCR("SHULHAN","G",1,"MUMPS1")

^SCR("SHULHAN","G",1,"MUMPS2")
D BDIKA^P1SHULH
^SCR("SHULHAN","G",1,"MUST")

^SCR("SHULHAN","G",1,"SHEM")
 ogley 'qn 
^SCR("SHULHAN","G",1,"TYP")
N
^SCR("SHULHAN","G",2,"CHECK")
Y
^SCR("SHULHAN","G",2,"CRD")
5,58,N,2,0
^SCR("SHULHAN","G",2,"CREAT")

^SCR("SHULHAN","G",2,"FNC")

^SCR("SHULHAN","G",2,"GLOB")
SUGS
^SCR("SHULHAN","G",2,"HELP")
<F9> - ogley beq oekcr , <F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("SHULHAN","G",2,"LMAX")
11
^SCR("SHULHAN","G",2,"MUMPS1")
S:'$G(SUGS) SUGS=1
^SCR("SHULHAN","G",2,"MUMPS2")
D SUGS^P1SHULH
^SCR("SHULHAN","G",2,"MUST")

^SCR("SHULHAN","G",2,"NLN")
20
^SCR("SHULHAN","G",2,"NS")
J
^SCR("SHULHAN","G",2,"RZD")
\
^SCR("SHULHAN","G",2,"SHEM")
 ogley beq 
^SCR("SHULHAN","G",2,"TOPB")
8
^SCR("SHULHAN","G",2,"TYP")
N
^SCR("SHULHAN","G",2,"VRB")
SUGS1
^SCR("SHULHAN","G",3,"CRD")
5,46,H,24,0
^SCR("SHULHAN","G",3,"HELP")

^SCR("SHULHAN","G",3,"LMAX")
24
^SCR("SHULHAN","G",3,"MUMPS1")

^SCR("SHULHAN","G",3,"MUMPS2")

^SCR("SHULHAN","G",3,"OUTPUT")

^SCR("SHULHAN","G",3,"SHEM")
      ogley beq xe`z    
^SCR("SHULHAN","G",3,"TYP")
H
^SCR("SHULHAN","G",4,"CRD")
5,21,N,6,2
^SCR("SHULHAN","G",4,"HELP")

^SCR("SHULHAN","G",4,"LMAX")
6
^SCR("SHULHAN","G",4,"MUMPS1")

^SCR("SHULHAN","G",4,"MUMPS2")

^SCR("SHULHAN","G",4,"SHEM")
 dgpd 
^SCR("SHULHAN","G",4,"TYP")
N
^SCR("SHULHAN","G","DEL")
Y
^SCR("SHULHAN","G","MAX")
999
^SCR("SHULHAN","G","NAME","HNH")
4
^SCR("SHULHAN","G","NAME","MIS")
1
^SCR("SHULHAN","G","NAME","SUGS")
2
^SCR("SHULHAN","G","NAME","SUGS1")
3
^SCR("SHULHAN","G","NM",1)
MIS
^SCR("SHULHAN","G","NM",2)
SUGS
^SCR("SHULHAN","G","NM",3)
SUGS1
^SCR("SHULHAN","G","NM",4)
HNH
^SCR("SHULHAN","G","RB")
4,10,23,76
^SCR("SHULHAN","G","REF")
^TEMP($P,"SHLH"
^SCR("SHULHAN","G","RZD")
\
^SCR("SHULHAN","G","STEP")
1
^SCR("SHULHAN","G","STG")
              : dgpd :      ogley beq xe`z    : ogley beq : ogley 'qn :        
^SCR("SHULHAN","G","VG")
6
^SCR("SHULHAN","NAME")
zepgley zlah
^SCR("SHVA")
H
^SCR("SHVA",1)
             {15            } xeciy onf  {10      }: `zknq`  {05       }: uaew 
^SCR("SHVA",2)
                                                                             1$
^SCR("SHVA",3)
 : 2 mekq: 1 nekq :yz:y`:  dwqir :  akek :  ehexa :ag:      qihxk     : xceq : 
^SCR("SHVA",4)
                                                                               
^SCR("SHVA",5)
                                                                               
^SCR("SHVA",6)
                                                                               
^SCR("SHVA",7)
                                                                               
^SCR("SHVA",8)
                                                                               
^SCR("SHVA",9)
                                                                               
^SCR("SHVA",10)
                                                                               
^SCR("SHVA",11)
                                                                               
^SCR("SHVA",12)
                                                                               
^SCR("SHVA",13)
                                                                               
^SCR("SHVA",14)
                                                                               
^SCR("SHVA",15)
                                                                               
^SCR("SHVA",16)
                                                                               
^SCR("SHVA",17)
                                                                               
^SCR("SHVA",18)
                                                                               
^SCR("SHVA",19)
 $1                                                                            
^SCR("SHVA",20)
           zipetlh- lh , cala dnizg - ag , zvle`n - ln , zxye`n - yn :     dwqr
^SCR("SHVA",21)
       oecren - 4 ; iciin - 3 ;30+'e,sicr dfie,xw`xyi - 2 ; libx - 1 :i`xy` beq
^SCR("SHVA",22)
     'lyz oecren - 9 ; minelyz - 8 ;hicxw qxpiic,dfie - 6 ; `tl` - 5           
^SCR("SHVA",23)
                                                                               
^SCR("SHVA","A",1)
˜…ƒ‰™�Ž†:€š‹Ž‘€:•�…—
^SCR("SHVA","A",2)

^SCR("SHVA","A",3)
2�…‹‘1Ž…‹‘™š™€„—‘‰’�‹…‹…ˆ…˜��‡‘‰ˆ˜‹˜ƒ…‘
^SCR("SHVA","A",4)
-------------------------------------------------------------------
^SCR("SHVA","A",5)

^SCR("SHVA","A",6)

^SCR("SHVA","A",7)

^SCR("SHVA","A",8)

^SCR("SHVA","A",9)

^SCR("SHVA","A",10)

^SCR("SHVA","A",11)

^SCR("SHVA","A",12)

^SCR("SHVA","A",13)

^SCR("SHVA","A",14)

^SCR("SHVA","A",15)

^SCR("SHVA","A",16)

^SCR("SHVA","A",17)

^SCR("SHVA","A",18)

^SCR("SHVA","A",19)

^SCR("SHVA","A",20)
š‰�…”Œˆ-Œˆ,ƒ�Œ�„Ž‰š‡-�‡,š–Œ…€Ž-ŒŽ,š˜™…€Ž-™Ž:„—‘’
^SCR("SHVA","A",21)
�…ƒ’…Ž-4“‰ƒ‰‰Ž-3“30+'…,“‰ƒ’„†‰…,˜—€˜™‰-2“Œ‰‚˜-1:‰€˜™€‚…‘
^SCR("SHVA","A",22)
'Œ™š�…ƒ’…Ž-9“�‰Ž…Œ™š-8“ˆ‰ƒ˜—‘˜�‰‰ƒ,„†‰…-6“€”Œ€-5
^SCR("SHVA","A",23)

^SCR("SHVA","AV",1)
rushainz:t,fnxt:•cue
^SCR("SHVA","AV",2)

^SCR("SHVA","AV",3)
2oufx1nufxa,atvexhgcfufuyurccjxhyrfrsux
^SCR("SHVA","AV",4)
-------------------------------------------------------------------
^SCR("SHVA","AV",5)

^SCR("SHVA","AV",6)

^SCR("SHVA","AV",7)

^SCR("SHVA","AV",8)

^SCR("SHVA","AV",9)

^SCR("SHVA","AV",10)

^SCR("SHVA","AV",11)

^SCR("SHVA","AV",12)

^SCR("SHVA","AV",13)

^SCR("SHVA","AV",14)

^SCR("SHVA","AV",15)

^SCR("SHVA","AV",16)

^SCR("SHVA","AV",17)

^SCR("SHVA","AV",18)

^SCR("SHVA","AV",19)

^SCR("SHVA","AV",20)
,hbupky-ky'sckcvnh,j-cj',mkutn-kn',rautn-an:vexg
^SCR("SHVA","AV",21)
iusgun-4;hshhn-3;30+wu';hsgvzhu'retrah-2;khdr-1:htratdux
^SCR("SHVA","AV",22)
wka,iusgun-9;ohnuka,-8;yhsrexrbhhs'vzhu-6;tpkt-5
^SCR("SHVA","AV",23)

^SCR("SHVA","G",1,"CRD")
4,77,E,6,0
^SCR("SHVA","G",1,"HELP")

^SCR("SHVA","G",1,"LMAX")
6
^SCR("SHVA","G",1,"MUMPS1")

^SCR("SHVA","G",1,"MUMPS2")

^SCR("SHVA","G",1,"OUTPUT")

^SCR("SHVA","G",1,"SHEM")
 xceq 
^SCR("SHVA","G",1,"TYP")
E
^SCR("SHVA","G",2,"CRD")
4,70,E,16,0
^SCR("SHVA","G",2,"HELP")

^SCR("SHVA","G",2,"LMAX")
16
^SCR("SHVA","G",2,"MUMPS1")

^SCR("SHVA","G",2,"MUMPS2")
D CARD^A2HZGT
^SCR("SHVA","G",2,"SHEM")
      qihxk     
^SCR("SHVA","G",2,"TYP")
E
^SCR("SHVA","G",3,"CRD")
4,53,H,2,0
^SCR("SHVA","G",3,"HELP")

^SCR("SHVA","G",3,"LMAX")
2
^SCR("SHVA","G",3,"MUMPS1")

^SCR("SHVA","G",3,"MUMPS2")

^SCR("SHVA","G",3,"OUTPUT")

^SCR("SHVA","G",3,"SHEM")
ag
^SCR("SHVA","G",3,"TYP")
H
^SCR("SHVA","G",4,"CRD")
4,50,N,8,2
^SCR("SHVA","G",4,"HELP")

^SCR("SHVA","G",4,"LMAX")
8
^SCR("SHVA","G",4,"MUMPS1")

^SCR("SHVA","G",4,"MUMPS2")

^SCR("SHVA","G",4,"OUTPUT")

^SCR("SHVA","G",4,"SHEM")
  ehexa 
^SCR("SHVA","G",4,"TYP")
N
^SCR("SHVA","G",5,"CRD")
4,41,N,7,2
^SCR("SHVA","G",5,"HELP")

^SCR("SHVA","G",5,"LMAX")
7
^SCR("SHVA","G",5,"MUMPS1")

^SCR("SHVA","G",5,"MUMPS2")

^SCR("SHVA","G",5,"OUTPUT")

^SCR("SHVA","G",5,"SHEM")
  akek 
^SCR("SHVA","G",5,"TYP")
N
^SCR("SHVA","G",6,"CRD")
4,33,H,8,0
^SCR("SHVA","G",6,"HELP")

^SCR("SHVA","G",6,"LMAX")
8
^SCR("SHVA","G",6,"MUMPS1")

^SCR("SHVA","G",6,"MUMPS2")

^SCR("SHVA","G",6,"OUTPUT")

^SCR("SHVA","G",6,"SHEM")
  dwqir 
^SCR("SHVA","G",6,"TYP")
H
^SCR("SHVA","G",7,"CRD")
4,24,E,2,0
^SCR("SHVA","G",7,"HELP")

^SCR("SHVA","G",7,"LMAX")
2
^SCR("SHVA","G",7,"MUMPS1")

^SCR("SHVA","G",7,"MUMPS2")

^SCR("SHVA","G",7,"OUTPUT")

^SCR("SHVA","G",7,"SHEM")
y`
^SCR("SHVA","G",7,"TYP")
E
^SCR("SHVA","G",8,"CRD")
4,21,E,2,0
^SCR("SHVA","G",8,"HELP")

^SCR("SHVA","G",8,"LMAX")
2
^SCR("SHVA","G",8,"MUMPS1")

^SCR("SHVA","G",8,"MUMPS2")

^SCR("SHVA","G",8,"OUTPUT")

^SCR("SHVA","G",8,"SHEM")
yz
^SCR("SHVA","G",8,"TYP")
E
^SCR("SHVA","G",9,"CRD")
4,18,N,8,2
^SCR("SHVA","G",9,"HELP")

^SCR("SHVA","G",9,"LMAX")
8
^SCR("SHVA","G",9,"MUMPS1")

^SCR("SHVA","G",9,"MUMPS2")

^SCR("SHVA","G",9,"OUTPUT")

^SCR("SHVA","G",9,"SHEM")
 1 nekq 
^SCR("SHVA","G",9,"TYP")
N
^SCR("SHVA","G",10,"CRD")
4,9,N,7,2
^SCR("SHVA","G",10,"HELP")

^SCR("SHVA","G",10,"LMAX")
7
^SCR("SHVA","G",10,"MUMPS1")

^SCR("SHVA","G",10,"MUMPS2")

^SCR("SHVA","G",10,"OUTPUT")

^SCR("SHVA","G",10,"SHEM")
 2 mekq
^SCR("SHVA","G",10,"TYP")
N
^SCR("SHVA","G","MAX")
99999
^SCR("SHVA","G","NAME","ASR")
7
^SCR("SHVA","G","NAME","CARD")
2
^SCR("SHVA","G","NAME","HEV")
3
^SCR("SHVA","G","NAME","ISKA")
6
^SCR("SHVA","G","NAME","KOHAV")
5
^SCR("SHVA","G","NAME","SID")
1
^SCR("SHVA","G","NAME","SUM")
4
^SCR("SHVA","G","NAME","SUM1")
9
^SCR("SHVA","G","NAME","SUM2")
10
^SCR("SHVA","G","NAME","TSL")
8
^SCR("SHVA","G","NM",1)
SID
^SCR("SHVA","G","NM",2)
CARD
^SCR("SHVA","G","NM",3)
HEV
^SCR("SHVA","G","NM",4)
SUM
^SCR("SHVA","G","NM",5)
KOHAV
^SCR("SHVA","G","NM",6)
ISKA
^SCR("SHVA","G","NM",7)
ASR
^SCR("SHVA","G","NM",8)
TSL
^SCR("SHVA","G","NM",9)
SUM1
^SCR("SHVA","G","NM",10)
SUM2
^SCR("SHVA","G","NOZAPR")
1
^SCR("SHVA","G","RB")
3,2,20,79
^SCR("SHVA","G","REF")
^TEMP($P,"S"
^SCR("SHVA","G","RZD")
\
^SCR("SHVA","G","STEP")
1
^SCR("SHVA","G","STG")
 : 2 mekq: 1 nekq :yz:y`:  dwqir :  akek :  ehexa :ag:      qihxk     : xceq : 
^SCR("SHVA","G","VG")
5
^SCR("SHVA","NAME")
`ay zerepz zbvd
^SCR("SHVA","P",5,"CRD")
1,61,E,10,0
^SCR("SHVA","P",5,"HELP")

^SCR("SHVA","P",5,"LMAX")
10
^SCR("SHVA","P",5,"MUMPS1")

^SCR("SHVA","P",5,"MUMPS2")

^SCR("SHVA","P",5,"OUTPUT")

^SCR("SHVA","P",5,"TYP")
E
^SCR("SHVA","P",10,"CRD")
1,41,E,9,0
^SCR("SHVA","P",10,"HELP")

^SCR("SHVA","P",10,"LMAX")
9
^SCR("SHVA","P",10,"MUMPS1")

^SCR("SHVA","P",10,"MUMPS2")

^SCR("SHVA","P",10,"OUTPUT")

^SCR("SHVA","P",10,"TYP")
E
^SCR("SHVA","P",15,"CRD")
1,13,E,15,0
^SCR("SHVA","P",15,"HELP")

^SCR("SHVA","P",15,"LMAX")
15
^SCR("SHVA","P",15,"MUMPS1")

^SCR("SHVA","P",15,"MUMPS2")

^SCR("SHVA","P",15,"OUTPUT")

^SCR("SHVA","P",15,"TYP")
E
^SCR("SHVA","P","NAME","ASM")
10
^SCR("SHVA","P","NAME","KVZ")
5
^SCR("SHVA","P","NAME","ZMAN")
15
^SCR("SHVA","P","NM",5)
KVZ
^SCR("SHVA","P","NM",10)
ASM
^SCR("SHVA","P","NM",15)
ZMAN
^SCR("SHVA1")
H
^SCR("SHVA1",1)
                                                                               
^SCR("SHVA1",2)
                  {10       }:  ehexa zekf k"dq   {05      } :  ehexa daeg k"dq
^SCR("SHVA1",3)
                  {20       }: miakek zekf k"dq   {15      } : miakek daeg k"dq
^SCR("SHVA1",4)
                                                                               
^SCR("SHVA1",5)
    {27      }: ehexa zekf hxk`xyi k"dq     {25      }: ehexa daeg hxk`xyi k"dq
^SCR("SHVA1",6)
    {32      }:miakek zekf hxk`xyi k"dq     {30      }:miakek daeg hxk`xyi k"dq
^SCR("SHVA1",7)
                                                                               
^SCR("SHVA1",8)
    {37      }: ehexa zekf    dfie k"dq     {35      }: ehexa daeg    dfie k"dq
^SCR("SHVA1",9)
    {42      }:miakek zekf    dfie k"dq     {40      }:miakek daeg    dfie k"dq
^SCR("SHVA1",10)
                                                                               
^SCR("SHVA1",11)
    {47      }: ehexa zekf  qxpiic k"dq     {45      }: ehexa daeg  qxpiic k"dq
^SCR("SHVA1",12)
    {52      }:miakek zekf  qxpiic k"dq     {50      }:miakek daeg  qxpiic k"dq
^SCR("SHVA1",13)
                                                                               
^SCR("SHVA1",14)
    {57      }: ehexa zekf .qw`.n` k"dq     {55      }: ehexa daeg .qw`.n` k"dq
^SCR("SHVA1",15)
    {62      }:miakek zekf .qw`.n` k"dq     {60      }:miakek daeg .qw`.n` k"dq
^SCR("SHVA1",16)
                                                                               
^SCR("SHVA1",17)
    {67      }: ehexa zekf     JCB k"dq     {65      }: ehexa daeg     JCB k"dq
^SCR("SHVA1",18)
    {72      }:miakek zekf     JCB k"dq     {70      }:miakek daeg     JCB k"dq
^SCR("SHVA1",19)
                                                                               
^SCR("SHVA1",20)
    {77      }: ehexa zekf    `tl` k"dq     {75      }: ehexa daeg    `tl` k"dq
^SCR("SHVA1",21)
    {82      }:miakek zekf    `tl` k"dq     {80      }:miakek daeg    `tl` k"dq
^SCR("SHVA1",22)
                                                                               
^SCR("SHVA1",23)
                                                                               
^SCR("SHVA1","A",1)

^SCR("SHVA1","A",2)
:…ˆ…˜�š…‹†‹"„‘:…ˆ…˜�„�…‡‹"„‘
^SCR("SHVA1","A",3)
:�‰�‹…‹š…‹†‹"„‘:�‰�‹…‹„�…‡‹"„‘
^SCR("SHVA1","A",4)

^SCR("SHVA1","A",5)
:…ˆ…˜�š…‹†ˆ˜‹€˜™‰‹"„‘:…ˆ…˜�„�…‡ˆ˜‹€˜™‰‹"„‘
^SCR("SHVA1","A",6)
:�‰�‹…‹š…‹†ˆ˜‹€˜™‰‹"„‘:�‰�‹…‹„�…‡ˆ˜‹€˜™‰‹"„‘
^SCR("SHVA1","A",7)

^SCR("SHVA1","A",8)
:…ˆ…˜�š…‹†„†‰…‹"„‘:…ˆ…˜�„�…‡„†‰…‹"„‘
^SCR("SHVA1","A",9)
:�‰�‹…‹š…‹†„†‰…‹"„‘:�‰�‹…‹„�…‡„†‰…‹"„‘
^SCR("SHVA1","A",10)

^SCR("SHVA1","A",11)
:…ˆ…˜�š…‹†‘˜�‰‰ƒ‹"„‘:…ˆ…˜�„�…‡‘˜�‰‰ƒ‹"„‘
^SCR("SHVA1","A",12)
:�‰�‹…‹š…‹†‘˜�‰‰ƒ‹"„‘:�‰�‹…‹„�…‡‘˜�‰‰ƒ‹"„‘
^SCR("SHVA1","A",13)

^SCR("SHVA1","A",14)
:…ˆ…˜�š…‹†.‘—€.Ž€‹"„‘:…ˆ…˜�„�…‡.‘—€.Ž€‹"„‘
^SCR("SHVA1","A",15)
:�‰�‹…‹š…‹†.‘—€.Ž€‹"„‘:�‰�‹…‹„�…‡.‘—€.Ž€‹"„‘
^SCR("SHVA1","A",16)

^SCR("SHVA1","A",17)
:…ˆ…˜�š…‹†JCB‹"„‘:…ˆ…˜�„�…‡JCB‹"„‘
^SCR("SHVA1","A",18)
:�‰�‹…‹š…‹†JCB‹"„‘:�‰�‹…‹„�…‡JCB‹"„‘
^SCR("SHVA1","A",19)

^SCR("SHVA1","A",20)
:…ˆ…˜�š…‹†€”Œ€‹"„‘:…ˆ…˜�„�…‡€”Œ€‹"„‘
^SCR("SHVA1","A",21)
:�‰�‹…‹š…‹†€”Œ€‹"„‘:�‰�‹…‹„�…‡€”Œ€‹"„‘
^SCR("SHVA1","A",22)

^SCR("SHVA1","A",23)

^SCR("SHVA1","AV",1)

^SCR("SHVA1","AV",2)
:uyurc,ufzf"vx:uyurcvcujf"vx
^SCR("SHVA1","AV",3)
:ohcfuf,ufzf"vx:ohcfufvcujf"vx
^SCR("SHVA1","AV",4)

^SCR("SHVA1","AV",5)
:uyurc,ufzyrftrahf"vx:uyurcvcujyrftrahf"vx
^SCR("SHVA1","AV",6)
:ohcfuf,ufzyrftrahf"vx:ohcfufvcujyrftrahf"vx
^SCR("SHVA1","AV",7)

^SCR("SHVA1","AV",8)
:uyurc,ufzvzhuf"vx:uyurcvcujvzhuf"vx
^SCR("SHVA1","AV",9)
:ohcfuf,ufzvzhuf"vx:ohcfufvcujvzhuf"vx
^SCR("SHVA1","AV",10)

^SCR("SHVA1","AV",11)
:uyurc,ufzxrbhhsf"vx:uyurcvcujxrbhhsf"vx
^SCR("SHVA1","AV",12)
:ohcfuf,ufzxrbhhsf"vx:ohcfufvcujxrbhhsf"vx
^SCR("SHVA1","AV",13)

^SCR("SHVA1","AV",14)
:uyurc,ufz/xet/ntf"vx:uyurcvcuj/xet/ntf"vx
^SCR("SHVA1","AV",15)
:ohcfuf,ufz/xet/ntf"vx:ohcfufvcuj/xet/ntf"vx
^SCR("SHVA1","AV",16)

^SCR("SHVA1","AV",17)
:uyurc,ufzJCBf"vx:uyurcvcujJCBf"vx
^SCR("SHVA1","AV",18)
:ohcfuf,ufzJCBf"vx:ohcfufvcujJCBf"vx
^SCR("SHVA1","AV",19)

^SCR("SHVA1","AV",20)
:uyurc,ufztpktf"vx:uyurcvcujtpktf"vx
^SCR("SHVA1","AV",21)
:ohcfuf,ufztpktf"vx:ohcfufvcujtpktf"vx
^SCR("SHVA1","AV",22)

^SCR("SHVA1","AV",23)

^SCR("SHVA1","NAME")
`ay inekiq
^SCR("SHVA1","P",5,"CRD")
2,50,N,9,2
^SCR("SHVA1","P",5,"HELP")

^SCR("SHVA1","P",5,"LMAX")
9
^SCR("SHVA1","P",5,"MUMPS1")

^SCR("SHVA1","P",5,"MUMPS2")

^SCR("SHVA1","P",5,"OUTPUT")

^SCR("SHVA1","P",5,"TYP")
N
^SCR("SHVA1","P",10,"CRD")
2,18,N,9,2
^SCR("SHVA1","P",10,"HELP")

^SCR("SHVA1","P",10,"LMAX")
10
^SCR("SHVA1","P",10,"MUMPS1")

^SCR("SHVA1","P",10,"MUMPS2")

^SCR("SHVA1","P",10,"OUTPUT")

^SCR("SHVA1","P",10,"TYP")
N
^SCR("SHVA1","P",15,"CRD")
3,50,N,9,2
^SCR("SHVA1","P",15,"HELP")

^SCR("SHVA1","P",15,"LMAX")
9
^SCR("SHVA1","P",15,"MUMPS1")

^SCR("SHVA1","P",15,"MUMPS2")

^SCR("SHVA1","P",15,"OUTPUT")

^SCR("SHVA1","P",15,"TYP")
N
^SCR("SHVA1","P",20,"CRD")
3,18,N,9,2
^SCR("SHVA1","P",20,"HELP")

^SCR("SHVA1","P",20,"LMAX")
10
^SCR("SHVA1","P",20,"MUMPS1")

^SCR("SHVA1","P",20,"MUMPS2")

^SCR("SHVA1","P",20,"OUTPUT")

^SCR("SHVA1","P",20,"TYP")
N
^SCR("SHVA1","P",25,"CRD")
5,44,N,9,2
^SCR("SHVA1","P",25,"HELP")

^SCR("SHVA1","P",25,"LMAX")
9
^SCR("SHVA1","P",25,"MUMPS1")

^SCR("SHVA1","P",25,"MUMPS2")

^SCR("SHVA1","P",25,"OUTPUT")

^SCR("SHVA1","P",25,"TYP")
N
^SCR("SHVA1","P",27,"CRD")
5,4,N,9,2
^SCR("SHVA1","P",27,"HELP")

^SCR("SHVA1","P",27,"LMAX")
9
^SCR("SHVA1","P",27,"MUMPS1")

^SCR("SHVA1","P",27,"MUMPS2")

^SCR("SHVA1","P",27,"OUTPUT")

^SCR("SHVA1","P",27,"TYP")
N
^SCR("SHVA1","P",30,"CRD")
6,44,N,9,2
^SCR("SHVA1","P",30,"HELP")

^SCR("SHVA1","P",30,"LMAX")
9
^SCR("SHVA1","P",30,"MUMPS1")

^SCR("SHVA1","P",30,"MUMPS2")

^SCR("SHVA1","P",30,"OUTPUT")

^SCR("SHVA1","P",30,"TYP")
N
^SCR("SHVA1","P",32,"CRD")
6,4,N,9,2
^SCR("SHVA1","P",32,"HELP")

^SCR("SHVA1","P",32,"LMAX")
9
^SCR("SHVA1","P",32,"MUMPS1")

^SCR("SHVA1","P",32,"MUMPS2")

^SCR("SHVA1","P",32,"OUTPUT")

^SCR("SHVA1","P",32,"TYP")
N
^SCR("SHVA1","P",35,"CRD")
8,44,N,9,2
^SCR("SHVA1","P",35,"HELP")

^SCR("SHVA1","P",35,"LMAX")
9
^SCR("SHVA1","P",35,"MUMPS1")

^SCR("SHVA1","P",35,"MUMPS2")

^SCR("SHVA1","P",35,"OUTPUT")

^SCR("SHVA1","P",35,"TYP")
N
^SCR("SHVA1","P",37,"CRD")
8,4,N,9,2
^SCR("SHVA1","P",37,"HELP")

^SCR("SHVA1","P",37,"LMAX")
9
^SCR("SHVA1","P",37,"MUMPS1")

^SCR("SHVA1","P",37,"MUMPS2")

^SCR("SHVA1","P",37,"OUTPUT")

^SCR("SHVA1","P",37,"TYP")
N
^SCR("SHVA1","P",40,"CRD")
9,44,N,9,2
^SCR("SHVA1","P",40,"HELP")

^SCR("SHVA1","P",40,"LMAX")
9
^SCR("SHVA1","P",40,"MUMPS1")

^SCR("SHVA1","P",40,"MUMPS2")

^SCR("SHVA1","P",40,"OUTPUT")

^SCR("SHVA1","P",40,"TYP")
N
^SCR("SHVA1","P",42,"CRD")
9,4,N,9,2
^SCR("SHVA1","P",42,"HELP")

^SCR("SHVA1","P",42,"LMAX")
9
^SCR("SHVA1","P",42,"MUMPS1")

^SCR("SHVA1","P",42,"MUMPS2")

^SCR("SHVA1","P",42,"OUTPUT")

^SCR("SHVA1","P",42,"TYP")
N
^SCR("SHVA1","P",45,"CRD")
11,44,N,9,2
^SCR("SHVA1","P",45,"HELP")

^SCR("SHVA1","P",45,"LMAX")
9
^SCR("SHVA1","P",45,"MUMPS1")

^SCR("SHVA1","P",45,"MUMPS2")

^SCR("SHVA1","P",45,"OUTPUT")

^SCR("SHVA1","P",45,"TYP")
N
^SCR("SHVA1","P",47,"CRD")
11,4,N,9,2
^SCR("SHVA1","P",47,"HELP")

^SCR("SHVA1","P",47,"LMAX")
9
^SCR("SHVA1","P",47,"MUMPS1")

^SCR("SHVA1","P",47,"MUMPS2")

^SCR("SHVA1","P",47,"OUTPUT")

^SCR("SHVA1","P",47,"TYP")
N
^SCR("SHVA1","P",50,"CRD")
12,44,N,9,2
^SCR("SHVA1","P",50,"HELP")

^SCR("SHVA1","P",50,"LMAX")
9
^SCR("SHVA1","P",50,"MUMPS1")

^SCR("SHVA1","P",50,"MUMPS2")

^SCR("SHVA1","P",50,"OUTPUT")

^SCR("SHVA1","P",50,"TYP")
N
^SCR("SHVA1","P",52,"CRD")
12,4,N,9,2
^SCR("SHVA1","P",52,"HELP")

^SCR("SHVA1","P",52,"LMAX")
9
^SCR("SHVA1","P",52,"MUMPS1")

^SCR("SHVA1","P",52,"MUMPS2")

^SCR("SHVA1","P",52,"OUTPUT")

^SCR("SHVA1","P",52,"TYP")
N
^SCR("SHVA1","P",55,"CRD")
14,44,N,9,2
^SCR("SHVA1","P",55,"HELP")

^SCR("SHVA1","P",55,"LMAX")
9
^SCR("SHVA1","P",55,"MUMPS1")

^SCR("SHVA1","P",55,"MUMPS2")

^SCR("SHVA1","P",55,"OUTPUT")

^SCR("SHVA1","P",55,"TYP")
N
^SCR("SHVA1","P",57,"CRD")
14,4,N,9,2
^SCR("SHVA1","P",57,"HELP")

^SCR("SHVA1","P",57,"LMAX")
9
^SCR("SHVA1","P",57,"MUMPS1")

^SCR("SHVA1","P",57,"MUMPS2")

^SCR("SHVA1","P",57,"OUTPUT")

^SCR("SHVA1","P",57,"TYP")
N
^SCR("SHVA1","P",60,"CRD")
15,44,N,9,2
^SCR("SHVA1","P",60,"HELP")

^SCR("SHVA1","P",60,"LMAX")
9
^SCR("SHVA1","P",60,"MUMPS1")

^SCR("SHVA1","P",60,"MUMPS2")

^SCR("SHVA1","P",60,"OUTPUT")

^SCR("SHVA1","P",60,"TYP")
N
^SCR("SHVA1","P",62,"CRD")
15,4,N,9,2
^SCR("SHVA1","P",62,"HELP")

^SCR("SHVA1","P",62,"LMAX")
9
^SCR("SHVA1","P",62,"MUMPS1")

^SCR("SHVA1","P",62,"MUMPS2")

^SCR("SHVA1","P",62,"OUTPUT")

^SCR("SHVA1","P",62,"TYP")
N
^SCR("SHVA1","P",65,"CRD")
17,44,N,9,2
^SCR("SHVA1","P",65,"HELP")

^SCR("SHVA1","P",65,"LMAX")
9
^SCR("SHVA1","P",65,"MUMPS1")

^SCR("SHVA1","P",65,"MUMPS2")

^SCR("SHVA1","P",65,"OUTPUT")

^SCR("SHVA1","P",65,"TYP")
N
^SCR("SHVA1","P",67,"CRD")
17,4,N,9,2
^SCR("SHVA1","P",67,"HELP")

^SCR("SHVA1","P",67,"LMAX")
9
^SCR("SHVA1","P",67,"MUMPS1")

^SCR("SHVA1","P",67,"MUMPS2")

^SCR("SHVA1","P",67,"OUTPUT")

^SCR("SHVA1","P",67,"TYP")
N
^SCR("SHVA1","P",70,"CRD")
18,44,N,9,2
^SCR("SHVA1","P",70,"HELP")

^SCR("SHVA1","P",70,"LMAX")
9
^SCR("SHVA1","P",70,"MUMPS1")

^SCR("SHVA1","P",70,"MUMPS2")

^SCR("SHVA1","P",70,"OUTPUT")

^SCR("SHVA1","P",70,"TYP")
N
^SCR("SHVA1","P",72,"CRD")
18,4,N,9,2
^SCR("SHVA1","P",72,"HELP")

^SCR("SHVA1","P",72,"LMAX")
9
^SCR("SHVA1","P",72,"MUMPS1")

^SCR("SHVA1","P",72,"MUMPS2")

^SCR("SHVA1","P",72,"OUTPUT")

^SCR("SHVA1","P",72,"TYP")
N
^SCR("SHVA1","P",75,"CRD")
20,44,N,9,2
^SCR("SHVA1","P",75,"HELP")

^SCR("SHVA1","P",75,"LMAX")
9
^SCR("SHVA1","P",75,"MUMPS1")

^SCR("SHVA1","P",75,"MUMPS2")

^SCR("SHVA1","P",75,"OUTPUT")

^SCR("SHVA1","P",75,"TYP")
N
^SCR("SHVA1","P",77,"CRD")
20,4,N,9,2
^SCR("SHVA1","P",77,"HELP")

^SCR("SHVA1","P",77,"LMAX")
9
^SCR("SHVA1","P",77,"MUMPS1")

^SCR("SHVA1","P",77,"MUMPS2")

^SCR("SHVA1","P",77,"OUTPUT")

^SCR("SHVA1","P",77,"TYP")
N
^SCR("SHVA1","P",80,"CRD")
21,44,N,9,2
^SCR("SHVA1","P",80,"HELP")

^SCR("SHVA1","P",80,"LMAX")
9
^SCR("SHVA1","P",80,"MUMPS1")

^SCR("SHVA1","P",80,"MUMPS2")

^SCR("SHVA1","P",80,"OUTPUT")

^SCR("SHVA1","P",80,"TYP")
N
^SCR("SHVA1","P",82,"CRD")
21,4,N,9,2
^SCR("SHVA1","P",82,"HELP")

^SCR("SHVA1","P",82,"LMAX")
9
^SCR("SHVA1","P",82,"MUMPS1")

^SCR("SHVA1","P",82,"MUMPS2")

^SCR("SHVA1","P",82,"OUTPUT")

^SCR("SHVA1","P",82,"TYP")
N
^SCR("SHVA1","P","NAME","SAHB")
55
^SCR("SHVA1","P","NAME","SAHK")
60
^SCR("SHVA1","P","NAME","SAZB")
57
^SCR("SHVA1","P","NAME","SAZK")
62
^SCR("SHVA1","P","NAME","SDHB")
45
^SCR("SHVA1","P","NAME","SDHK")
50
^SCR("SHVA1","P","NAME","SDZB")
47
^SCR("SHVA1","P","NAME","SDZK")
52
^SCR("SHVA1","P","NAME","SHHB")
5
^SCR("SHVA1","P","NAME","SHHK")
15
^SCR("SHVA1","P","NAME","SHZB")
10
^SCR("SHVA1","P","NAME","SHZK")
20
^SCR("SHVA1","P","NAME","SIHB")
25
^SCR("SHVA1","P","NAME","SIHK")
30
^SCR("SHVA1","P","NAME","SIZB")
27
^SCR("SHVA1","P","NAME","SIZK")
32
^SCR("SHVA1","P","NAME","SJHB")
65
^SCR("SHVA1","P","NAME","SJHK")
70
^SCR("SHVA1","P","NAME","SJZB")
67
^SCR("SHVA1","P","NAME","SJZK")
72
^SCR("SHVA1","P","NAME","SLHB")
75
^SCR("SHVA1","P","NAME","SLHK")
80
^SCR("SHVA1","P","NAME","SLZB")
77
^SCR("SHVA1","P","NAME","SLZK")
82
^SCR("SHVA1","P","NAME","SVHB")
35
^SCR("SHVA1","P","NAME","SVHK")
40
^SCR("SHVA1","P","NAME","SVZB")
37
^SCR("SHVA1","P","NAME","SVZK")
42
^SCR("SHVA1","P","NM",5)
SHHB
^SCR("SHVA1","P","NM",10)
SHZB
^SCR("SHVA1","P","NM",15)
SHHK
^SCR("SHVA1","P","NM",20)
SHZK
^SCR("SHVA1","P","NM",25)
SIHB
^SCR("SHVA1","P","NM",27)
SIZB
^SCR("SHVA1","P","NM",30)
SIHK
^SCR("SHVA1","P","NM",32)
SIZK
^SCR("SHVA1","P","NM",35)
SVHB
^SCR("SHVA1","P","NM",37)
SVZB
^SCR("SHVA1","P","NM",40)
SVHK
^SCR("SHVA1","P","NM",42)
SVZK
^SCR("SHVA1","P","NM",45)
SDHB
^SCR("SHVA1","P","NM",47)
SDZB
^SCR("SHVA1","P","NM",50)
SDHK
^SCR("SHVA1","P","NM",52)
SDZK
^SCR("SHVA1","P","NM",55)
SAHB
^SCR("SHVA1","P","NM",57)
SAZB
^SCR("SHVA1","P","NM",60)
SAHK
^SCR("SHVA1","P","NM",62)
SAZK
^SCR("SHVA1","P","NM",65)
SJHB
^SCR("SHVA1","P","NM",67)
SJZB
^SCR("SHVA1","P","NM",70)
SJHK
^SCR("SHVA1","P","NM",72)
SJZK
^SCR("SHVA1","P","NM",75)
SLHB
^SCR("SHVA1","P","NM",77)
SLZB
^SCR("SHVA1","P","NM",80)
SLHK
^SCR("SHVA1","P","NM",82)
SLZK
^SCR("SISMA")
H
^SCR("SISMA",1)
                                 #  ze`nqiq  #                                 
^SCR("SISMA",2)
                                                                               
^SCR("SISMA",3)
                                                                        1$     
^SCR("SISMA",4)
            : dnqiq : dbxc :dbxc 'qn:         caer my       :caer 'qn:         
^SCR("SISMA",5)
                                                                               
^SCR("SISMA",6)
                                                                               
^SCR("SISMA",7)
                                                                               
^SCR("SISMA",8)
                                                                               
^SCR("SISMA",9)
                                                                               
^SCR("SISMA",10)
                                                                               
^SCR("SISMA",11)
                                                                               
^SCR("SISMA",12)
                                                                               
^SCR("SISMA",13)
                                                                               
^SCR("SISMA",14)
                                                                               
^SCR("SISMA",15)
                                                                               
^SCR("SISMA",16)
                                                                               
^SCR("SISMA",17)
                                                                               
^SCR("SISMA",18)
                                                                               
^SCR("SISMA",19)
                                                                               
^SCR("SISMA",20)
        $1                                                                     
^SCR("SISMA","A",1)
š…€Ž‘‰‘
^SCR("SISMA","A",2)

^SCR("SISMA","A",3)

^SCR("SISMA","A",4)
„Ž‘‰‘„‚˜ƒ„‚˜ƒ'‘Žƒ�…’�™ƒ�…’'‘Ž
^SCR("SISMA","A",5)
----------------------------------------------------
^SCR("SISMA","A",6)

^SCR("SISMA","A",7)

^SCR("SISMA","A",8)

^SCR("SISMA","A",9)

^SCR("SISMA","A",10)

^SCR("SISMA","A",11)

^SCR("SISMA","A",12)

^SCR("SISMA","A",13)

^SCR("SISMA","A",14)

^SCR("SISMA","A",15)

^SCR("SISMA","A",16)

^SCR("SISMA","A",17)

^SCR("SISMA","A",18)

^SCR("SISMA","A",19)

^SCR("SISMA","A",20)

^SCR("SISMA","AV",1)
,utnxhx
^SCR("SISMA","AV",2)

^SCR("SISMA","AV",3)

^SCR("SISMA","AV",4)
vnxhxvdrsvdrswxnscugoascugwxn
^SCR("SISMA","AV",5)
----------------------------------------------------
^SCR("SISMA","AV",6)

^SCR("SISMA","AV",7)

^SCR("SISMA","AV",8)

^SCR("SISMA","AV",9)

^SCR("SISMA","AV",10)

^SCR("SISMA","AV",11)

^SCR("SISMA","AV",12)

^SCR("SISMA","AV",13)

^SCR("SISMA","AV",14)

^SCR("SISMA","AV",15)

^SCR("SISMA","AV",16)

^SCR("SISMA","AV",17)

^SCR("SISMA","AV",18)

^SCR("SISMA","AV",19)

^SCR("SISMA","AV",20)

^SCR("SISMA","G",1,"CRD")
5,69,E,5,0
^SCR("SISMA","G",1,"HELP")

^SCR("SISMA","G",1,"LMAX")
8
^SCR("SISMA","G",1,"MUMPS1")

^SCR("SISMA","G",1,"MUMPS2")

^SCR("SISMA","G",1,"OUTPUT")

^SCR("SISMA","G",1,"SHEM")
caer 'qn
^SCR("SISMA","G",1,"TYP")
E
^SCR("SISMA","G",2,"CRD")
5,60,H,20,0
^SCR("SISMA","G",2,"HELP")

^SCR("SISMA","G",2,"LMAX")
23
^SCR("SISMA","G",2,"MUMPS1")

^SCR("SISMA","G",2,"MUMPS2")

^SCR("SISMA","G",2,"OUTPUT")

^SCR("SISMA","G",2,"SHEM")
         caer my       
^SCR("SISMA","G",2,"TYP")
H
^SCR("SISMA","G",3,"CHECK")
Y
^SCR("SISMA","G",3,"CRD")
5,36,E,2,0
^SCR("SISMA","G",3,"CREAT")

^SCR("SISMA","G",3,"FNC")

^SCR("SISMA","G",3,"GLOB")
DARGA
^SCR("SISMA","G",3,"HELP")

^SCR("SISMA","G",3,"LMAX")
8
^SCR("SISMA","G",3,"MUMPS1")

^SCR("SISMA","G",3,"MUMPS2")

^SCR("SISMA","G",3,"MUST")

^SCR("SISMA","G",3,"NLN")
20
^SCR("SISMA","G",3,"NS")
ze`bxc 
^SCR("SISMA","G",3,"RZD")
\
^SCR("SISMA","G",3,"SHEM")
dbxc 'qn
^SCR("SISMA","G",3,"TOPB")
8
^SCR("SISMA","G",3,"TYP")
E
^SCR("SISMA","G",3,"VRB")
DARGA1
^SCR("SISMA","G",4,"CRD")
5,27,H,6,0
^SCR("SISMA","G",4,"HELP")

^SCR("SISMA","G",4,"LMAX")
6
^SCR("SISMA","G",4,"MUMPS1")

^SCR("SISMA","G",4,"MUMPS2")

^SCR("SISMA","G",4,"OUTPUT")

^SCR("SISMA","G",4,"SHEM")
 dbxc 
^SCR("SISMA","G",4,"TYP")
H
^SCR("SISMA","G",5,"CRD")
5,20,E,5,0
^SCR("SISMA","G",5,"HELP")

^SCR("SISMA","G",5,"LMAX")
7
^SCR("SISMA","G",5,"MUMPS1")

^SCR("SISMA","G",5,"MUMPS2")

^SCR("SISMA","G",5,"SHEM")
 dnqiq 
^SCR("SISMA","G",5,"TYP")
E
^SCR("SISMA","G","DEL")
Y
^SCR("SISMA","G","MAX")
2
^SCR("SISMA","G","NAME","DARGA")
3
^SCR("SISMA","G","NAME","DARGA1")
4
^SCR("SISMA","G","NAME","MIS")
1
^SCR("SISMA","G","NAME","SHEM")
2
^SCR("SISMA","G","NAME","SISMA")
5
^SCR("SISMA","G","NM",1)
MIS
^SCR("SISMA","G","NM",2)
SHEM
^SCR("SISMA","G","NM",3)
DARGA
^SCR("SISMA","G","NM",4)
DARGA1
^SCR("SISMA","G","NM",5)
SISMA
^SCR("SISMA","G","RB")
4,9,21,74
^SCR("SISMA","G","REF")
^TEMP($P,"SISMA"
^SCR("SISMA","G","RZD")
\
^SCR("SISMA","G","STEP")
1
^SCR("SISMA","G","STG")
            : dnqiq : dbxc :dbxc 'qn:         caer my       :caer 'qn:         
^SCR("SISMA","G","VG")
6
^SCR("SISMA","NAME")
ze`nqiq uaew
^SCR("SND2DLV")
H
^SCR("SND2DLV",1)
                                                                               
^SCR("SND2DLV",2)
                                                                       ]       
^SCR("SND2DLV",3)
                                               {05        } :   dwlgnn         
^SCR("SND2DLV",4)
                                               {10        } : dwlgn cr         
^SCR("SND2DLV",5)
                                                                               
^SCR("SND2DLV",6)
                        {                  12} {11  }:   mihixt zveawn         
^SCR("SND2DLV",7)
                        {                  14} {13  }: mihixt zveaw cr         
^SCR("SND2DLV",8)
                                                                               
^SCR("SND2DLV",9)
                          {                16} {15        } :    hixtn         
^SCR("SND2DLV",10)
                          {                21} {20        } :  hixt cr         
^SCR("SND2DLV",11)
                                                                               
^SCR("SND2DLV",12)
     [                                                                         
^SCR("SND2DLV","A",1)

^SCR("SND2DLV","A",2)

^SCR("SND2DLV","A",3)
:„—Œ‡ŽŽ
^SCR("SND2DLV","A",4)
:„—Œ‡Žƒ’
^SCR("SND2DLV","A",5)

^SCR("SND2DLV","A",6)
:�‰ˆ‰˜”š–…�—Ž
^SCR("SND2DLV","A",7)
:�‰ˆ‰˜”š–…�—ƒ’
^SCR("SND2DLV","A",8)

^SCR("SND2DLV","A",9)
:ˆ‰˜”Ž
^SCR("SND2DLV","A",10)
:ˆ‰˜”ƒ’
^SCR("SND2DLV","A",11)

^SCR("SND2DLV","A",12)

^SCR("SND2DLV","AV",1)

^SCR("SND2DLV","AV",2)

^SCR("SND2DLV","AV",3)
:vekjnn
^SCR("SND2DLV","AV",4)
:vekjnsg
^SCR("SND2DLV","AV",5)

^SCR("SND2DLV","AV",6)
:ohyhrp,mucen
^SCR("SND2DLV","AV",7)
:ohyhrp,mucesg
^SCR("SND2DLV","AV",8)

^SCR("SND2DLV","AV",9)
:yhrpn
^SCR("SND2DLV","AV",10)
:yhrpsg
^SCR("SND2DLV","AV",11)

^SCR("SND2DLV","AV",12)

^SCR("SND2DLV","NAME")
migelyn xz`l hixtz zxard
^SCR("SND2DLV","P",5,"CRD")
3,47,E,7,0
^SCR("SND2DLV","P",5,"FNC")

^SCR("SND2DLV","P",5,"GLOB")
DEP
^SCR("SND2DLV","P",5,"HELP")

^SCR("SND2DLV","P",5,"LMAX")
11
^SCR("SND2DLV","P",5,"MUMPS1")

^SCR("SND2DLV","P",5,"MUMPS2")

^SCR("SND2DLV","P",5,"MUST")

^SCR("SND2DLV","P",5,"NLN")
20
^SCR("SND2DLV","P",5,"RZD")
\
^SCR("SND2DLV","P",5,"TOPB")
8
^SCR("SND2DLV","P",5,"TYP")
E
^SCR("SND2DLV","P",10,"CRD")
4,47,E,7,0
^SCR("SND2DLV","P",10,"FNC")

^SCR("SND2DLV","P",10,"GLOB")
^DEP
^SCR("SND2DLV","P",10,"HELP")

^SCR("SND2DLV","P",10,"LMAX")
11
^SCR("SND2DLV","P",10,"MUMPS1")

^SCR("SND2DLV","P",10,"MUMPS2")

^SCR("SND2DLV","P",10,"NLN")
20
^SCR("SND2DLV","P",10,"RZD")
\
^SCR("SND2DLV","P",10,"TOPB")
8
^SCR("SND2DLV","P",10,"TYP")
E
^SCR("SND2DLV","P",11,"CRD")
6,47,E,5,0
^SCR("SND2DLV","P",11,"FNC")

^SCR("SND2DLV","P",11,"GLOB")
^PARSUG
^SCR("SND2DLV","P",11,"HELP")

^SCR("SND2DLV","P",11,"LMAX")
5
^SCR("SND2DLV","P",11,"MUMPS1")

^SCR("SND2DLV","P",11,"MUMPS2")

^SCR("SND2DLV","P",11,"NLN")
20
^SCR("SND2DLV","P",11,"RZD")
\
^SCR("SND2DLV","P",11,"TOPB")
8
^SCR("SND2DLV","P",11,"TYP")
E
^SCR("SND2DLV","P",11,"VRB")
MEKVZ1
^SCR("SND2DLV","P",12,"CRD")
6,46,H,21
^SCR("SND2DLV","P",12,"HELP")

^SCR("SND2DLV","P",12,"LMAX")
21
^SCR("SND2DLV","P",12,"MUMPS1")

^SCR("SND2DLV","P",12,"MUMPS2")

^SCR("SND2DLV","P",12,"OUTPUT")

^SCR("SND2DLV","P",12,"TYP")
H
^SCR("SND2DLV","P",13,"CRD")
7,47,E,5,0
^SCR("SND2DLV","P",13,"FNC")

^SCR("SND2DLV","P",13,"GLOB")
^PARSUG
^SCR("SND2DLV","P",13,"HELP")

^SCR("SND2DLV","P",13,"LMAX")
5
^SCR("SND2DLV","P",13,"MUMPS1")

^SCR("SND2DLV","P",13,"MUMPS2")

^SCR("SND2DLV","P",13,"NLN")
20
^SCR("SND2DLV","P",13,"RZD")
\
^SCR("SND2DLV","P",13,"TOPB")
8
^SCR("SND2DLV","P",13,"TYP")
E
^SCR("SND2DLV","P",13,"VRB")
ADKVZ1
^SCR("SND2DLV","P",14,"CRD")
7,46,H,21
^SCR("SND2DLV","P",14,"HELP")

^SCR("SND2DLV","P",14,"LMAX")
21
^SCR("SND2DLV","P",14,"MUMPS1")

^SCR("SND2DLV","P",14,"MUMPS2")

^SCR("SND2DLV","P",14,"OUTPUT")

^SCR("SND2DLV","P",14,"TYP")
H
^SCR("SND2DLV","P",15,"CRD")
9,47,E,8,0
^SCR("SND2DLV","P",15,"FNC")

^SCR("SND2DLV","P",15,"GLOB")
^PAR
^SCR("SND2DLV","P",15,"HELP")

^SCR("SND2DLV","P",15,"LMAX")
11
^SCR("SND2DLV","P",15,"MUMPS1")

^SCR("SND2DLV","P",15,"MUMPS2")

^SCR("SND2DLV","P",15,"NLN")
20
^SCR("SND2DLV","P",15,"RZD")
\
^SCR("SND2DLV","P",15,"TOPB")
8
^SCR("SND2DLV","P",15,"TYP")
E
^SCR("SND2DLV","P",15,"VRB")
MEPAR1
^SCR("SND2DLV","P",16,"CRD")
9,46,H,19
^SCR("SND2DLV","P",16,"HELP")

^SCR("SND2DLV","P",16,"LMAX")
19
^SCR("SND2DLV","P",16,"MUMPS1")

^SCR("SND2DLV","P",16,"MUMPS2")

^SCR("SND2DLV","P",16,"OUTPUT")

^SCR("SND2DLV","P",16,"TYP")
H
^SCR("SND2DLV","P",20,"CRD")
10,47,E,8,0
^SCR("SND2DLV","P",20,"FNC")

^SCR("SND2DLV","P",20,"GLOB")
PAR
^SCR("SND2DLV","P",20,"HELP")

^SCR("SND2DLV","P",20,"LMAX")
11
^SCR("SND2DLV","P",20,"MUMPS1")

^SCR("SND2DLV","P",20,"MUMPS2")

^SCR("SND2DLV","P",20,"NLN")
20
^SCR("SND2DLV","P",20,"RZD")
\
^SCR("SND2DLV","P",20,"TOPB")
8
^SCR("SND2DLV","P",20,"TYP")
E
^SCR("SND2DLV","P",20,"VRB")
ADPAR1
^SCR("SND2DLV","P",21,"CRD")
10,46,H,19
^SCR("SND2DLV","P",21,"HELP")

^SCR("SND2DLV","P",21,"LMAX")
19
^SCR("SND2DLV","P",21,"MUMPS1")

^SCR("SND2DLV","P",21,"MUMPS2")

^SCR("SND2DLV","P",21,"OUTPUT")

^SCR("SND2DLV","P",21,"TYP")
H
^SCR("SND2DLV","P","NAME","ADDEP")
10
^SCR("SND2DLV","P","NAME","ADKVZ")
13
^SCR("SND2DLV","P","NAME","ADKVZ1")
14
^SCR("SND2DLV","P","NAME","ADPAR")
20
^SCR("SND2DLV","P","NAME","ADPAR1")
21
^SCR("SND2DLV","P","NAME","MEDEP")
5
^SCR("SND2DLV","P","NAME","MEKVZ")
11
^SCR("SND2DLV","P","NAME","MEKVZ1")
12
^SCR("SND2DLV","P","NAME","MEPAR")
15
^SCR("SND2DLV","P","NAME","MEPAR1")
16
^SCR("SND2DLV","P","NM",5)
MEDEP
^SCR("SND2DLV","P","NM",10)
ADDEP
^SCR("SND2DLV","P","NM",11)
MEKVZ
^SCR("SND2DLV","P","NM",12)
MEKVZ1
^SCR("SND2DLV","P","NM",13)
ADKVZ
^SCR("SND2DLV","P","NM",14)
ADKVZ1
^SCR("SND2DLV","P","NM",15)
MEPAR
^SCR("SND2DLV","P","NM",16)
MEPAR1
^SCR("SND2DLV","P","NM",20)
ADPAR
^SCR("SND2DLV","P","NM",21)
ADPAR1
^SCR("SS")
E
^SCR("SS",1)
SDFSDFSDFS {05    }                                                            
^SCR("SS",2)
$1
^SCR("SS",3)
   :   222   :   333  :   444   :   RRR   :                                    
^SCR("SS",4)
                                                                               
^SCR("SS",5)
                                                                               
^SCR("SS",6)
                                                                               
^SCR("SS",7)
                                                                               
^SCR("SS",8)
                                              1$                               
^SCR("SS",9)

^SCR("SS","A",1)
SDFSDFSDFS
^SCR("SS","A",2)

^SCR("SS","A",3)
222333444RRR
^SCR("SS","A",4)
-----------------------------------
^SCR("SS","A",5)

^SCR("SS","A",6)

^SCR("SS","A",7)

^SCR("SS","A",8)

^SCR("SS","A",9)

^SCR("SS","AV",1)
SDFSDFSDFS
^SCR("SS","AV",2)

^SCR("SS","AV",3)
222333444RRR
^SCR("SS","AV",4)
-----------------------------------
^SCR("SS","AV",5)

^SCR("SS","AV",6)

^SCR("SS","AV",7)

^SCR("SS","AV",8)

^SCR("SS","AV",9)

^SCR("SS","G",1,"CRD")
4,13,H,9,0
^SCR("SS","G",1,"FNC")

^SCR("SS","G",1,"GLOB")
B
^SCR("SS","G",1,"HELP")

^SCR("SS","G",1,"LMAX")
9
^SCR("SS","G",1,"MUMPS1")

^SCR("SS","G",1,"MUMPS2")

^SCR("SS","G",1,"NLN")
20
^SCR("SS","G",1,"RZD")
\
^SCR("SS","G",1,"SHEM")
   222   
^SCR("SS","G",1,"TOPB")
8
^SCR("SS","G",1,"TYP")
H
^SCR("SS","G",2,"CRD")
4,22,H,8,0
^SCR("SS","G",2,"HELP")

^SCR("SS","G",2,"LMAX")
8
^SCR("SS","G",2,"MUMPS1")

^SCR("SS","G",2,"MUMPS2")

^SCR("SS","G",2,"SHEM")
   333  
^SCR("SS","G",2,"TYP")
H
^SCR("SS","G",3,"CRD")
4,32,H,9,0
^SCR("SS","G",3,"HELP")

^SCR("SS","G",3,"LMAX")
9
^SCR("SS","G",3,"MUMPS1")

^SCR("SS","G",3,"MUMPS2")

^SCR("SS","G",3,"SHEM")
   444   
^SCR("SS","G",3,"TYP")
H
^SCR("SS","G",4,"CRD")
4,42,H,9,0
^SCR("SS","G",4,"HELP")

^SCR("SS","G",4,"LMAX")
9
^SCR("SS","G",4,"MUMPS1")

^SCR("SS","G",4,"MUMPS2")

^SCR("SS","G",4,"SHEM")
   RRR   
^SCR("SS","G",4,"TYP")
H
^SCR("SS","G","DEL")
Y
^SCR("SS","G","MAX")
999
^SCR("SS","G","NAME","T2")
1
^SCR("SS","G","NAME","T3")
2
^SCR("SS","G","NAME","T4")
3
^SCR("SS","G","NAME","T5")
4
^SCR("SS","G","NM",1)
T2
^SCR("SS","G","NM",2)
T3
^SCR("SS","G","NM",3)
T4
^SCR("SS","G","NM",4)
T5
^SCR("SS","G","RB")
3,1,9,49
^SCR("SS","G","REF")
^TEMP($P
^SCR("SS","G","RZD")
\
^SCR("SS","G","STEP")
1
^SCR("SS","G","STG")
   :   222   :   333  :   444   :   RRR   :                                    
^SCR("SS","G","VG")
5
^SCR("SS","NAME")
STAM
^SCR("SS","P",5,"CRD")
1,11,E,7,0
^SCR("SS","P",5,"FNC")

^SCR("SS","P",5,"GLOB")
A
^SCR("SS","P",5,"HELP")

^SCR("SS","P",5,"LMAX")
7
^SCR("SS","P",5,"MUMPS1")

^SCR("SS","P",5,"MUMPS2")

^SCR("SS","P",5,"NLN")
20
^SCR("SS","P",5,"RZD")
\
^SCR("SS","P",5,"TOPB")
8
^SCR("SS","P",5,"TYP")
E
^SCR("SS","P","NAME","A")
5
^SCR("SS","P","NM",5)
A
^SCR("SUG")
H
^SCR("SUG",1)
                                     # mihixt zeveaw zlah #                    
^SCR("SUG",2)
                                                                      1]       
^SCR("SUG",3)
                                                                               
^SCR("SUG",4)
                          {                   06} {05 : mihixt zveaw           
^SCR("SUG",5)
                                                                               
^SCR("SUG",6)
                          {                   11} {10 :        dwlgn           
^SCR("SUG",7)
                                                                               
^SCR("SUG",8)
                      [1                                                       
^SCR("SUG",9)
                                                                               
^SCR("SUG","A",1)
�‰ˆ‰˜”š…–…�—šŒ�ˆ
^SCR("SUG","A",2)

^SCR("SUG","A",3)

^SCR("SUG","A",4)
:�‰ˆ‰˜”š–…�—
^SCR("SUG","A",5)

^SCR("SUG","A",6)
:„—Œ‡Ž
^SCR("SUG","A",7)

^SCR("SUG","A",8)

^SCR("SUG","A",9)

^SCR("SUG","AV",1)
ohyhrp,umuce,kcy
^SCR("SUG","AV",2)

^SCR("SUG","AV",3)

^SCR("SUG","AV",4)
:ohyhrp,muce
^SCR("SUG","AV",5)

^SCR("SUG","AV",6)
:vekjn
^SCR("SUG","AV",7)

^SCR("SUG","AV",8)

^SCR("SUG","AV",9)

^SCR("SUG","NAME")
hixt beq zlah
^SCR("SUG","P",5,"CRD")
4,50,E,4,0
^SCR("SUG","P",5,"FNC")

^SCR("SUG","P",5,"GLOB")
PARSUG
^SCR("SUG","P",5,"HELP")

^SCR("SUG","P",5,"LMAX")
4
^SCR("SUG","P",5,"MUMPS1")

^SCR("SUG","P",5,"MUMPS2")
D SUGP^L2SUG 
^SCR("SUG","P",5,"NLN")
20
^SCR("SUG","P",5,"RZD")
\
^SCR("SUG","P",5,"TOPB")
8
^SCR("SUG","P",5,"TYP")
E
^SCR("SUG","P",5,"VRB")
SUGP1
^SCR("SUG","P",6,"CRD")
4,49,H,22,0
^SCR("SUG","P",6,"HELP")

^SCR("SUG","P",6,"LMAX")
22
^SCR("SUG","P",6,"MUMPS1")

^SCR("SUG","P",6,"MUMPS2")

^SCR("SUG","P",6,"MUST")

^SCR("SUG","P",6,"TYP")
H
^SCR("SUG","P",10,"CHECK")
Y
^SCR("SUG","P",10,"CRD")
6,50,E,4,0
^SCR("SUG","P",10,"CREAT")

^SCR("SUG","P",10,"FNC")

^SCR("SUG","P",10,"GLOB")
DEP
^SCR("SUG","P",10,"HELP")

^SCR("SUG","P",10,"LMAX")
4
^SCR("SUG","P",10,"MUMPS1")

^SCR("SUG","P",10,"MUMPS2")

^SCR("SUG","P",10,"MUST")

^SCR("SUG","P",10,"NLN")
20
^SCR("SUG","P",10,"NS")
zewlgn zlah
^SCR("SUG","P",10,"RZD")
\
^SCR("SUG","P",10,"TOPB")
8
^SCR("SUG","P",10,"TYP")
E
^SCR("SUG","P",10,"VRB")
DEP1
^SCR("SUG","P",11,"CRD")
6,49,H,22
^SCR("SUG","P",11,"HELP")

^SCR("SUG","P",11,"LMAX")
22
^SCR("SUG","P",11,"MUMPS1")

^SCR("SUG","P",11,"MUMPS2")

^SCR("SUG","P",11,"OUTPUT")

^SCR("SUG","P",11,"TYP")
H
^SCR("SUG","P","NAME","DEP")
10
^SCR("SUG","P","NAME","DEP1")
11
^SCR("SUG","P","NAME","SUGP")
5
^SCR("SUG","P","NAME","SUGP1")
6
^SCR("SUG","P","NM",5)
SUGP
^SCR("SUG","P","NM",6)
SUGP1
^SCR("SUG","P","NM",10)
DEP
^SCR("SUG","P","NM",11)
DEP1
^SCR("SUG","P","RB",1)
3,23,9,72
^SCR("SUGARZ")
H
^SCR("SUGARZ",1)
                      # "dfix` - himixt zveaw" zlah #                          
^SCR("SUGARZ",2)
                                                                               
^SCR("SUGARZ",3)
                                                                           1$  
^SCR("SUGARZ",4)
       :      dfix` xe`z    : dfix` cew :   dveaw xe`z   : mihixt zveaw :      
^SCR("SUGARZ",5)
                                                                               
^SCR("SUGARZ",6)
                                                                               
^SCR("SUGARZ",7)
                                                                               
^SCR("SUGARZ",8)
                                                                               
^SCR("SUGARZ",9)
                                                                               
^SCR("SUGARZ",10)
                                                                               
^SCR("SUGARZ",11)
                                                                               
^SCR("SUGARZ",12)
                                                                               
^SCR("SUGARZ",13)
                                                                               
^SCR("SUGARZ",14)
                                                                               
^SCR("SUGARZ",15)
                                                                               
^SCR("SUGARZ",16)
                                                                               
^SCR("SUGARZ",17)
                                                                               
^SCR("SUGARZ",18)
                                                                               
^SCR("SUGARZ",19)
                                                                               
^SCR("SUGARZ",20)
                                                                               
^SCR("SUGARZ",21)
           $1                                                                  
^SCR("SUGARZ","A",1)
"„†‰˜€-ˆ‰�‰˜”š–…�—"šŒ�ˆ
^SCR("SUGARZ","A",2)

^SCR("SUGARZ","A",3)

^SCR("SUGARZ","A",4)
:„†‰˜€˜…€š„†‰˜€ƒ…—„–…�—˜…€š�‰ˆ‰˜”š–…�—
^SCR("SUGARZ","A",5)
----------------------------------------------------------
^SCR("SUGARZ","A",6)

^SCR("SUGARZ","A",7)

^SCR("SUGARZ","A",8)

^SCR("SUGARZ","A",9)

^SCR("SUGARZ","A",10)

^SCR("SUGARZ","A",11)

^SCR("SUGARZ","A",12)

^SCR("SUGARZ","A",13)

^SCR("SUGARZ","A",14)

^SCR("SUGARZ","A",15)

^SCR("SUGARZ","A",16)

^SCR("SUGARZ","A",17)

^SCR("SUGARZ","A",18)

^SCR("SUGARZ","A",19)

^SCR("SUGARZ","A",20)

^SCR("SUGARZ","A",21)

^SCR("SUGARZ","AV",1)
"vzhrt-yhohrp,muce",kcy
^SCR("SUGARZ","AV",2)

^SCR("SUGARZ","AV",3)

^SCR("SUGARZ","AV",4)
:vzhrtrut,vzhrtsuevmucerut,ohyhrp,muce
^SCR("SUGARZ","AV",5)
----------------------------------------------------------
^SCR("SUGARZ","AV",6)

^SCR("SUGARZ","AV",7)

^SCR("SUGARZ","AV",8)

^SCR("SUGARZ","AV",9)

^SCR("SUGARZ","AV",10)

^SCR("SUGARZ","AV",11)

^SCR("SUGARZ","AV",12)

^SCR("SUGARZ","AV",13)

^SCR("SUGARZ","AV",14)

^SCR("SUGARZ","AV",15)

^SCR("SUGARZ","AV",16)

^SCR("SUGARZ","AV",17)

^SCR("SUGARZ","AV",18)

^SCR("SUGARZ","AV",19)

^SCR("SUGARZ","AV",20)

^SCR("SUGARZ","AV",21)

^SCR("SUGARZ","G",1,"CRD")
5,72,E,5,0
^SCR("SUGARZ","G",1,"HELP")

^SCR("SUGARZ","G",1,"LMAX")
14
^SCR("SUGARZ","G",1,"MUMPS1")

^SCR("SUGARZ","G",1,"MUMPS2")

^SCR("SUGARZ","G",1,"OUTPUT")

^SCR("SUGARZ","G",1,"SHEM")
 mihixt zveaw 
^SCR("SUGARZ","G",1,"TYP")
E
^SCR("SUGARZ","G",2,"CRD")
5,57,H,15,0
^SCR("SUGARZ","G",2,"HELP")

^SCR("SUGARZ","G",2,"LMAX")
16
^SCR("SUGARZ","G",2,"MUMPS1")

^SCR("SUGARZ","G",2,"MUMPS2")

^SCR("SUGARZ","G",2,"OUTPUT")

^SCR("SUGARZ","G",2,"SHEM")
   dveaw xe`z   
^SCR("SUGARZ","G",2,"TYP")
H
^SCR("SUGARZ","G",3,"CHECK")
Y
^SCR("SUGARZ","G",3,"CRD")
5,40,E,8,0
^SCR("SUGARZ","G",3,"CREAT")

^SCR("SUGARZ","G",3,"FNC")
F6,F7,F9
^SCR("SUGARZ","G",3,"GLOB")
PAR
^SCR("SUGARZ","G",3,"HELP")
<F7> - mihixt zbvd , <F7> - my itl qetig
^SCR("SUGARZ","G",3,"LMAX")
11
^SCR("SUGARZ","G",3,"MUMPS1")

^SCR("SUGARZ","G",3,"MUMPS2")
D ARZ^P1SUGARZ
^SCR("SUGARZ","G",3,"MUST")

^SCR("SUGARZ","G",3,"NLN")
20
^SCR("SUGARZ","G",3,"NS")
J
^SCR("SUGARZ","G",3,"RZD")
**
^SCR("SUGARZ","G",3,"SHEM")
 dfix` cew 
^SCR("SUGARZ","G",3,"TOPB")
8
^SCR("SUGARZ","G",3,"TYP")
E
^SCR("SUGARZ","G",3,"VRB")
ARZ1
^SCR("SUGARZ","G",4,"CRD")
5,28,H,20,0
^SCR("SUGARZ","G",4,"HELP")

^SCR("SUGARZ","G",4,"LMAX")
20
^SCR("SUGARZ","G",4,"MUMPS1")

^SCR("SUGARZ","G",4,"MUMPS2")

^SCR("SUGARZ","G",4,"OUTPUT")

^SCR("SUGARZ","G",4,"SHEM")
      dfix` xe`z    
^SCR("SUGARZ","G",4,"TYP")
H
^SCR("SUGARZ","G","DEL")
Y
^SCR("SUGARZ","G","MAX")
13
^SCR("SUGARZ","G","NAME","ARZ")
3
^SCR("SUGARZ","G","NAME","ARZ1")
4
^SCR("SUGARZ","G","NAME","SUGP")
1
^SCR("SUGARZ","G","NAME","SUGP1")
2
^SCR("SUGARZ","G","NM",1)
SUGP
^SCR("SUGARZ","G","NM",2)
SUGP1
^SCR("SUGARZ","G","NM",3)
ARZ
^SCR("SUGARZ","G","NM",4)
ARZ1
^SCR("SUGARZ","G","RB")
4,12,22,77
^SCR("SUGARZ","G","REF")
^TEMP($P
^SCR("SUGARZ","G","RZD")
\
^SCR("SUGARZ","G","STEP")
1
^SCR("SUGARZ","G","STG")
       :      dfix` xe`z    : dfix` cew :   dveaw xe`z   : mihixt zveaw :      
^SCR("SUGARZ","G","VG")
6
^SCR("SUGARZ","NAME")

^SCR("SUGDEP")
H
^SCR("SUGDEP",1)
                      # "dwlgn - himixt zveaw" zlah #                          
^SCR("SUGDEP",2)
                                                                               
^SCR("SUGDEP",3)
                                                                           1$  
^SCR("SUGDEP",4)
              :    dwlgn xe`z   : dwlgn :   dveaw xe`z   : mihixt zveaw :      
^SCR("SUGDEP",5)
                                                                               
^SCR("SUGDEP",6)
                                                                               
^SCR("SUGDEP",7)
                                                                               
^SCR("SUGDEP",8)
                                                                               
^SCR("SUGDEP",9)
                                                                               
^SCR("SUGDEP",10)
                                                                               
^SCR("SUGDEP",11)
                                                                               
^SCR("SUGDEP",12)
                                                                               
^SCR("SUGDEP",13)
                                                                               
^SCR("SUGDEP",14)
                                                                               
^SCR("SUGDEP",15)
                                                                               
^SCR("SUGDEP",16)
                                                                               
^SCR("SUGDEP",17)
                                                                               
^SCR("SUGDEP",18)
                                                                               
^SCR("SUGDEP",19)
                                                                               
^SCR("SUGDEP",20)
                                                                               
^SCR("SUGDEP",21)
           $1                                                                  
^SCR("SUGDEP","A",1)
"„—Œ‡Ž-ˆ‰�‰˜”š–…�—"šŒ�ˆ
^SCR("SUGDEP","A",2)

^SCR("SUGDEP","A",3)

^SCR("SUGDEP","A",4)
„—Œ‡Ž˜…€š„—Œ‡Ž„–…�—˜…€š�‰ˆ‰˜”š–…�—
^SCR("SUGDEP","A",5)
------------------------------------------------------
^SCR("SUGDEP","A",6)

^SCR("SUGDEP","A",7)

^SCR("SUGDEP","A",8)

^SCR("SUGDEP","A",9)

^SCR("SUGDEP","A",10)

^SCR("SUGDEP","A",11)

^SCR("SUGDEP","A",12)

^SCR("SUGDEP","A",13)

^SCR("SUGDEP","A",14)

^SCR("SUGDEP","A",15)

^SCR("SUGDEP","A",16)

^SCR("SUGDEP","A",17)

^SCR("SUGDEP","A",18)

^SCR("SUGDEP","A",19)

^SCR("SUGDEP","A",20)

^SCR("SUGDEP","A",21)

^SCR("SUGDEP","AV",1)
"vekjn-yhohrp,muce",kcy
^SCR("SUGDEP","AV",2)

^SCR("SUGDEP","AV",3)

^SCR("SUGDEP","AV",4)
vekjnrut,vekjnvmucerut,ohyhrp,muce
^SCR("SUGDEP","AV",5)
------------------------------------------------------
^SCR("SUGDEP","AV",6)

^SCR("SUGDEP","AV",7)

^SCR("SUGDEP","AV",8)

^SCR("SUGDEP","AV",9)

^SCR("SUGDEP","AV",10)

^SCR("SUGDEP","AV",11)

^SCR("SUGDEP","AV",12)

^SCR("SUGDEP","AV",13)

^SCR("SUGDEP","AV",14)

^SCR("SUGDEP","AV",15)

^SCR("SUGDEP","AV",16)

^SCR("SUGDEP","AV",17)

^SCR("SUGDEP","AV",18)

^SCR("SUGDEP","AV",19)

^SCR("SUGDEP","AV",20)

^SCR("SUGDEP","AV",21)

^SCR("SUGDEP","G",1,"CRD")
5,72,E,5,0
^SCR("SUGDEP","G",1,"HELP")

^SCR("SUGDEP","G",1,"LMAX")
14
^SCR("SUGDEP","G",1,"MUMPS1")

^SCR("SUGDEP","G",1,"MUMPS2")

^SCR("SUGDEP","G",1,"OUTPUT")

^SCR("SUGDEP","G",1,"SHEM")
 mihixt zveaw 
^SCR("SUGDEP","G",1,"TYP")
E
^SCR("SUGDEP","G",2,"CRD")
5,57,H,15,0
^SCR("SUGDEP","G",2,"HELP")

^SCR("SUGDEP","G",2,"LMAX")
16
^SCR("SUGDEP","G",2,"MUMPS1")

^SCR("SUGDEP","G",2,"MUMPS2")

^SCR("SUGDEP","G",2,"OUTPUT")

^SCR("SUGDEP","G",2,"SHEM")
   dveaw xe`z   
^SCR("SUGDEP","G",2,"TYP")
H
^SCR("SUGDEP","G",3,"CHECK")
Y
^SCR("SUGDEP","G",3,"CRD")
5,40,E,5,0
^SCR("SUGDEP","G",3,"CREAT")

^SCR("SUGDEP","G",3,"FNC")

^SCR("SUGDEP","G",3,"GLOB")
DEP
^SCR("SUGDEP","G",3,"HELP")

^SCR("SUGDEP","G",3,"LMAX")
7
^SCR("SUGDEP","G",3,"MUMPS1")

^SCR("SUGDEP","G",3,"MUMPS2")

^SCR("SUGDEP","G",3,"MUST")

^SCR("SUGDEP","G",3,"NLN")
20
^SCR("SUGDEP","G",3,"NS")
zewlgn zlah
^SCR("SUGDEP","G",3,"RZD")
\
^SCR("SUGDEP","G",3,"SHEM")
 dwlgn 
^SCR("SUGDEP","G",3,"TOPB")
8
^SCR("SUGDEP","G",3,"TYP")
E
^SCR("SUGDEP","G",3,"VRB")
DEP1
^SCR("SUGDEP","G",4,"CRD")
5,32,H,17,0
^SCR("SUGDEP","G",4,"HELP")

^SCR("SUGDEP","G",4,"LMAX")
17
^SCR("SUGDEP","G",4,"MUMPS1")

^SCR("SUGDEP","G",4,"MUMPS2")

^SCR("SUGDEP","G",4,"OUTPUT")

^SCR("SUGDEP","G",4,"SHEM")
    dwlgn xe`z   
^SCR("SUGDEP","G",4,"TYP")
H
^SCR("SUGDEP","G","DEL")

^SCR("SUGDEP","G","MAX")
13
^SCR("SUGDEP","G","NAME","DEP")
3
^SCR("SUGDEP","G","NAME","DEP1")
4
^SCR("SUGDEP","G","NAME","SUGP")
1
^SCR("SUGDEP","G","NAME","SUGP1")
2
^SCR("SUGDEP","G","NM",1)
SUGP
^SCR("SUGDEP","G","NM",2)
SUGP1
^SCR("SUGDEP","G","NM",3)
DEP
^SCR("SUGDEP","G","NM",4)
DEP1
^SCR("SUGDEP","G","RB")
4,12,22,77
^SCR("SUGDEP","G","REF")
^TEMP($P
^SCR("SUGDEP","G","RZD")
\
^SCR("SUGDEP","G","STEP")
1
^SCR("SUGDEP","G","STG")
              :    dwlgn xe`z   : dwlgn :   dveaw xe`z   : mihixt zveaw :      
^SCR("SUGDEP","G","VG")
6
^SCR("SUGDEP","NAME")
dwlgn <- hixt beq
^SCR("SUGS")
H
^SCR("SUGS",1)
                                # zepgley ibeq zlah #                          
^SCR("SUGS",2)
                                                                               
^SCR("SUGS",3)
                                                                             1$
^SCR("SUGS",4)
    :  le`yl :dgpd %:      GUI-a rav cew     :xtqn:  ogley beq xe`z  : beq :   
^SCR("SUGS",5)
    : micreq :      :                        : rav:                  :ogley:   
^SCR("SUGS",6)
                                                                               
^SCR("SUGS",7)
                                                                               
^SCR("SUGS",8)
                                                                               
^SCR("SUGS",9)
                                                                               
^SCR("SUGS",10)
                                                                               
^SCR("SUGS",11)
                                                                               
^SCR("SUGS",12)
                                                                               
^SCR("SUGS",13)
                                                                               
^SCR("SUGS",14)
                                                                               
^SCR("SUGS",15)
                                                                               
^SCR("SUGS",16)
                                                                               
^SCR("SUGS",17)
                                                                               
^SCR("SUGS",18)
 $1                                                                            
^SCR("SUGS",19)
                                                                               
^SCR("SUGS","A",1)
š…�‡Œ…™‰‚…‘šŒ�ˆ
^SCR("SUGS","A",2)

^SCR("SUGS","A",3)

^SCR("SUGS","A",4)
Œ…€™Œ„‡�„%GUI-�’�–ƒ…—˜”‘Ž�‡Œ…™‚…‘˜…€š‚…‘
^SCR("SUGS","A",5)
�‰ƒ’…‘’�–�‡Œ…™
^SCR("SUGS","A",6)
--------------------------------------------------------------------
^SCR("SUGS","A",7)

^SCR("SUGS","A",8)

^SCR("SUGS","A",9)

^SCR("SUGS","A",10)

^SCR("SUGS","A",11)

^SCR("SUGS","A",12)

^SCR("SUGS","A",13)

^SCR("SUGS","A",14)

^SCR("SUGS","A",15)

^SCR("SUGS","A",16)

^SCR("SUGS","A",17)

^SCR("SUGS","A",18)

^SCR("SUGS","A",19)

^SCR("SUGS","AV",1)
,ubjkuahdux,kcy
^SCR("SUGS","AV",2)

^SCR("SUGS","AV",3)

^SCR("SUGS","AV",4)
kutakvjbv%GUI-cgcmsuerpxnijkuaduxrut,dux
^SCR("SUGS","AV",5)
ohsguxgcmijkua
^SCR("SUGS","AV",6)
--------------------------------------------------------------------
^SCR("SUGS","AV",7)

^SCR("SUGS","AV",8)

^SCR("SUGS","AV",9)

^SCR("SUGS","AV",10)

^SCR("SUGS","AV",11)

^SCR("SUGS","AV",12)

^SCR("SUGS","AV",13)

^SCR("SUGS","AV",14)

^SCR("SUGS","AV",15)

^SCR("SUGS","AV",16)

^SCR("SUGS","AV",17)

^SCR("SUGS","AV",18)

^SCR("SUGS","AV",19)

^SCR("SUGS","G",1,"CRD")
5,75,E,1,0
^SCR("SUGS","G",1,"HELP")

^SCR("SUGS","G",1,"LMAX")
5
^SCR("SUGS","G",1,"MUMPS1")

^SCR("SUGS","G",1,"MUMPS2")
D BDIKA^P1SPTB
^SCR("SUGS","G",1,"SHEM")
 beq 
^SCR("SUGS","G",1,"TYP")
E
^SCR("SUGS","G",2,"CRD")
5,69,H,18,0
^SCR("SUGS","G",2,"HELP")

^SCR("SUGS","G",2,"LMAX")
18
^SCR("SUGS","G",2,"MUMPS1")

^SCR("SUGS","G",2,"MUMPS2")

^SCR("SUGS","G",2,"SHEM")
  ogley beq xe`z  
^SCR("SUGS","G",2,"TYP")
H
^SCR("SUGS","G",3,"CRD")
5,50,N,1,0
^SCR("SUGS","G",3,"HELP")

^SCR("SUGS","G",3,"LMAX")
4
^SCR("SUGS","G",3,"MUMPS1")
D CEVA0^P1SPTB
^SCR("SUGS","G",3,"MUMPS2")
D CEVA^P1SPTB
^SCR("SUGS","G",3,"SHEM")
xtqn
^SCR("SUGS","G",3,"TYP")
N
^SCR("SUGS","G",4,"CRD")
5,45,E,18,0
^SCR("SUGS","G",4,"HELP")

^SCR("SUGS","G",4,"LMAX")
24
^SCR("SUGS","G",4,"MUMPS1")

^SCR("SUGS","G",4,"MUMPS2")

^SCR("SUGS","G",4,"OUTPUT")

^SCR("SUGS","G",4,"SHEM")
      GUI-a rav cew     
^SCR("SUGS","G",4,"TYP")
E
^SCR("SUGS","G",5,"CRD")
5,20,N,6,2
^SCR("SUGS","G",5,"HELP")

^SCR("SUGS","G",5,"LMAX")
6
^SCR("SUGS","G",5,"MUMPS1")

^SCR("SUGS","G",5,"MUMPS2")

^SCR("SUGS","G",5,"OUTPUT")

^SCR("SUGS","G",5,"SHEM")
dgpd %
^SCR("SUGS","G",5,"TYP")
N
^SCR("SUGS","G",6,"CRD")
5,13,N,1,0
^SCR("SUGS","G",6,"HELP")

^SCR("SUGS","G",6,"LMAX")
8
^SCR("SUGS","G",6,"MUMPS1")

^SCR("SUGS","G",6,"MUMPS2")

^SCR("SUGS","G",6,"OUTPUT")

^SCR("SUGS","G",6,"SHEM")
  le`yl 
^SCR("SUGS","G",6,"TYP")
N
^SCR("SUGS","G","DEL")
Y
^SCR("SUGS","G","MAX")
999
^SCR("SUGS","G","NAME","CEVA")
3
^SCR("SUGS","G","NAME","GUI")
4
^SCR("SUGS","G","NAME","HNHAH")
5
^SCR("SUGS","G","NAME","SHEIL")
6
^SCR("SUGS","G","NAME","SUGS")
1
^SCR("SUGS","G","NAME","SUGS1")
2
^SCR("SUGS","G","NM",1)
SUGS
^SCR("SUGS","G","NM",2)
SUGS1
^SCR("SUGS","G","NM",3)
CEVA
^SCR("SUGS","G","NM",4)
GUI
^SCR("SUGS","G","NM",5)
HNHAH
^SCR("SUGS","G","NM",6)
SHEIL
^SCR("SUGS","G","RB")
4,2,19,79
^SCR("SUGS","G","REF")
^TEMP($P,"SP"
^SCR("SUGS","G","RZD")
\
^SCR("SUGS","G","STEP")
1
^SCR("SUGS","G","STG")
    :  le`yl :dgpd %:      GUI-a rav cew     :xtqn:  ogley beq xe`z  : beq :   
^SCR("SUGS","G","VG")
7
^SCR("SUGS","NAME")

^SCR("T1PARM")
H
^SCR("T1PARM",1)
                                                                               
^SCR("T1PARM",2)
                                                                    1]         
^SCR("T1PARM",3)
                   {                               05} : xcynd my              
^SCR("T1PARM",4)
                                           {10       } :xcynd qwt              
^SCR("T1PARM",5)
                                           {12       } :    didyd              
^SCR("T1PARM",6)
                                          {15        } :    `nqiq              
^SCR("T1PARM",7)
              [1                                                               
^SCR("T1PARM",8)
                                                                               
^SCR("T1PARM",9)
                                                                               
^SCR("T1PARM",10)
                                                                               
^SCR("T1PARM",11)
                                                                               
^SCR("T1PARM",12)
                                                                               
^SCR("T1PARM",13)
                                                                               
^SCR("T1PARM",14)
                                                                               
^SCR("T1PARM",15)
                                                                               
^SCR("T1PARM","A",1)

^SCR("T1PARM","A",2)

^SCR("T1PARM","A",3)
:˜ƒ™Ž„�™
^SCR("T1PARM","A",4)
:˜ƒ™Ž„‘—”
^SCR("T1PARM","A",5)
:„‰„™„
^SCR("T1PARM","A",6)
:€Ž‘‰‘
^SCR("T1PARM","A",7)

^SCR("T1PARM","A",8)

^SCR("T1PARM","A",9)

^SCR("T1PARM","A",10)

^SCR("T1PARM","A",11)

^SCR("T1PARM","A",12)

^SCR("T1PARM","A",13)

^SCR("T1PARM","A",14)

^SCR("T1PARM","A",15)

^SCR("T1PARM","AV",1)

^SCR("T1PARM","AV",2)

^SCR("T1PARM","AV",3)
:rsanvoa
^SCR("T1PARM","AV",4)
:rsanvxep
^SCR("T1PARM","AV",5)
:vhvav
^SCR("T1PARM","AV",6)
:tnxhx
^SCR("T1PARM","AV",7)

^SCR("T1PARM","AV",8)

^SCR("T1PARM","AV",9)

^SCR("T1PARM","AV",10)

^SCR("T1PARM","AV",11)

^SCR("T1PARM","AV",12)

^SCR("T1PARM","AV",13)

^SCR("T1PARM","AV",14)

^SCR("T1PARM","AV",15)

^SCR("T1PARM","NAME")

^SCR("T1PARM","P",5,"CRD")
3,54,H,34
^SCR("T1PARM","P",5,"HELP")

^SCR("T1PARM","P",5,"LMAX")
34
^SCR("T1PARM","P",5,"MUMPS1")

^SCR("T1PARM","P",5,"MUMPS2")

^SCR("T1PARM","P",5,"TYP")
H
^SCR("T1PARM","P",10,"CRD")
4,43,E,10,0
^SCR("T1PARM","P",10,"HELP")

^SCR("T1PARM","P",10,"LMAX")
10
^SCR("T1PARM","P",10,"MUMPS1")

^SCR("T1PARM","P",10,"MUMPS2")

^SCR("T1PARM","P",10,"TYP")
E
^SCR("T1PARM","P",12,"CRD")
5,43,N,10,0
^SCR("T1PARM","P",12,"HELP")

^SCR("T1PARM","P",12,"LMAX")
10
^SCR("T1PARM","P",12,"MUMPS1")

^SCR("T1PARM","P",12,"MUMPS2")

^SCR("T1PARM","P",12,"TYP")
N
^SCR("T1PARM","P",15,"CRD")
6,42,E,11,0
^SCR("T1PARM","P",15,"HELP")

^SCR("T1PARM","P",15,"LMAX")
11
^SCR("T1PARM","P",15,"MUMPS1")

^SCR("T1PARM","P",15,"MUMPS2")

^SCR("T1PARM","P",15,"TYP")
E
^SCR("T1PARM","P","NAME","DELAY")
12
^SCR("T1PARM","P","NAME","FAX")
10
^SCR("T1PARM","P","NAME","SHEM")
5
^SCR("T1PARM","P","NAME","SISMA")
15
^SCR("T1PARM","P","NM",5)
SHEM
^SCR("T1PARM","P","NM",10)
FAX
^SCR("T1PARM","P","NM",12)
DELAY
^SCR("T1PARM","P","NM",15)
SISMA
^SCR("T1PARM","P","RB",1)
3,15,8,70
^SCR("T1SHER")
H
^SCR("T1SHER",1)
                           # oeikx`n miqwt zniyx #                             
^SCR("T1SHER",2)
                    {10        } : jix`z cr    {05      } : jix`zn             
^SCR("T1SHER",3)
                   {15: 2 - excey `ly dl` wx , 1 - miqwtd lk bivdl             
^SCR("T1SHER",4)
                                                                             1$
^SCR("T1SHER",5)
      :  qehhq  :  drye jix`zl :  gewl my  : dpnfd :    qwt   :  dcrqnd my  :  
^SCR("T1SHER",6)
                                                                               
^SCR("T1SHER",7)
                                                                               
^SCR("T1SHER",8)
                                                                               
^SCR("T1SHER",9)
                                                                               
^SCR("T1SHER",10)
                                                                               
^SCR("T1SHER",11)
                                                                               
^SCR("T1SHER",12)
                                                                               
^SCR("T1SHER",13)
                                                                               
^SCR("T1SHER",14)
                                                                               
^SCR("T1SHER",15)
                                                                               
^SCR("T1SHER",16)
                                                                               
^SCR("T1SHER",17)
                                                                               
^SCR("T1SHER",18)
                                                                               
^SCR("T1SHER",19)
                                                                               
^SCR("T1SHER",20)
                                                                               
^SCR("T1SHER",21)
 $1                                                                            
^SCR("T1SHER",22)
                                                                               
^SCR("T1SHER","A",1)
�…‰‹˜€Ž�‰‘—”šŽ‰™˜
^SCR("T1SHER","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("T1SHER","A",3)
:2-…˜ƒ…™€Œ™„Œ€—˜,1-�‰‘—”„Œ‹‚‰–„Œ
^SCR("T1SHER","A",4)

^SCR("T1SHER","A",5)
‘…ˆˆ‘„’™…Š‰˜€šŒ‡…—Œ�™„�Ž†„‘—”„ƒ’‘Ž„�™
^SCR("T1SHER","A",6)
------------------------------------------------------------------
^SCR("T1SHER","A",7)

^SCR("T1SHER","A",8)

^SCR("T1SHER","A",9)

^SCR("T1SHER","A",10)

^SCR("T1SHER","A",11)

^SCR("T1SHER","A",12)

^SCR("T1SHER","A",13)

^SCR("T1SHER","A",14)

^SCR("T1SHER","A",15)

^SCR("T1SHER","A",16)

^SCR("T1SHER","A",17)

^SCR("T1SHER","A",18)

^SCR("T1SHER","A",19)

^SCR("T1SHER","A",20)

^SCR("T1SHER","A",21)

^SCR("T1SHER","A",22)

^SCR("T1SHER","AV",1)
iuhfrtnohxep,nhar
^SCR("T1SHER","AV",2)
:lhrt,sg:lhrt,n
^SCR("T1SHER","AV",3)
:2-ursuatkavkter'1-ohxepvkfdhmvk
^SCR("T1SHER","AV",4)

^SCR("T1SHER","AV",5)
xuyyxvgaulhrt,kjuekoavbnzvxepvsgxnvoa
^SCR("T1SHER","AV",6)
------------------------------------------------------------------
^SCR("T1SHER","AV",7)

^SCR("T1SHER","AV",8)

^SCR("T1SHER","AV",9)

^SCR("T1SHER","AV",10)

^SCR("T1SHER","AV",11)

^SCR("T1SHER","AV",12)

^SCR("T1SHER","AV",13)

^SCR("T1SHER","AV",14)

^SCR("T1SHER","AV",15)

^SCR("T1SHER","AV",16)

^SCR("T1SHER","AV",17)

^SCR("T1SHER","AV",18)

^SCR("T1SHER","AV",19)

^SCR("T1SHER","AV",20)

^SCR("T1SHER","AV",21)

^SCR("T1SHER","AV",22)

^SCR("T1SHER","G",1,"CRD")
6,76,H,13,0
^SCR("T1SHER","G",1,"HELP")

^SCR("T1SHER","G",1,"LMAX")
13
^SCR("T1SHER","G",1,"MUMPS1")

^SCR("T1SHER","G",1,"MUMPS2")

^SCR("T1SHER","G",1,"OUTPUT")

^SCR("T1SHER","G",1,"SHEM")
  dcrqnd my  
^SCR("T1SHER","G",1,"TYP")
H
^SCR("T1SHER","G",2,"CRD")
6,62,E,10,0
^SCR("T1SHER","G",2,"HELP")

^SCR("T1SHER","G",2,"LMAX")
10
^SCR("T1SHER","G",2,"MUMPS1")

^SCR("T1SHER","G",2,"MUMPS2")

^SCR("T1SHER","G",2,"OUTPUT")

^SCR("T1SHER","G",2,"SHEM")
    qwt   
^SCR("T1SHER","G",2,"TYP")
E
^SCR("T1SHER","G",3,"CRD")
6,51,E,7,0
^SCR("T1SHER","G",3,"HELP")
CANCEL - <F5> , <F10> - aey xcyl , <F9> - bivdl
^SCR("T1SHER","G",3,"LMAX")
7
^SCR("T1SHER","G",3,"MUMPS1")
D HZMA0^T1WND1
^SCR("T1SHER","G",3,"MUMPS2")
D HZMA^T1WND1
^SCR("T1SHER","G",3,"SHEM")
 dpnfd 
^SCR("T1SHER","G",3,"TYP")
E
^SCR("T1SHER","G",4,"CRD")
6,43,H,11,0
^SCR("T1SHER","G",4,"HELP")

^SCR("T1SHER","G",4,"LMAX")
11
^SCR("T1SHER","G",4,"MUMPS1")

^SCR("T1SHER","G",4,"MUMPS2")

^SCR("T1SHER","G",4,"OUTPUT")

^SCR("T1SHER","G",4,"SHEM")
  gewl my  
^SCR("T1SHER","G",4,"TYP")
H
^SCR("T1SHER","G",5,"CRD")
6,31,H,14,0
^SCR("T1SHER","G",5,"HELP")

^SCR("T1SHER","G",5,"LMAX")
14
^SCR("T1SHER","G",5,"MUMPS1")

^SCR("T1SHER","G",5,"MUMPS2")

^SCR("T1SHER","G",5,"OUTPUT")

^SCR("T1SHER","G",5,"SHEM")
  drye jix`zl 
^SCR("T1SHER","G",5,"TYP")
H
^SCR("T1SHER","G",6,"CRD")
6,16,H,9,0
^SCR("T1SHER","G",6,"HELP")

^SCR("T1SHER","G",6,"LMAX")
9
^SCR("T1SHER","G",6,"MUMPS1")

^SCR("T1SHER","G",6,"MUMPS2")

^SCR("T1SHER","G",6,"OUTPUT")

^SCR("T1SHER","G",6,"SHEM")
  qehhq  
^SCR("T1SHER","G",6,"TYP")
H
^SCR("T1SHER","G","DEL")

^SCR("T1SHER","G","MAX")
1
^SCR("T1SHER","G","NAME","FAX")
2
^SCR("T1SHER","G","NAME","HZM")
3
^SCR("T1SHER","G","NAME","LKH")
4
^SCR("T1SHER","G","NAME","SHEMM")
1
^SCR("T1SHER","G","NAME","STATUS")
6
^SCR("T1SHER","G","NAME","ZMAN")
5
^SCR("T1SHER","G","NM",1)
SHEMM
^SCR("T1SHER","G","NM",2)
FAX
^SCR("T1SHER","G","NM",3)
HZM
^SCR("T1SHER","G","NM",4)
LKH
^SCR("T1SHER","G","NM",5)
ZMAN
^SCR("T1SHER","G","NM",6)
STATUS
^SCR("T1SHER","G","RB")
5,2,22,79
^SCR("T1SHER","G","REF")
^TEMP($P
^SCR("T1SHER","G","RZD")
\
^SCR("T1SHER","G","STEP")
1
^SCR("T1SHER","G","STG")
      :  qehhq  :  drye jix`zl :  gewl my  : dpnfd :    qwt   :  dcrqnd my  :  
^SCR("T1SHER","G","VG")
7
^SCR("T1SHER","NAME")
oeikx` jqn
^SCR("T1SHER","P",5,"CRD")
2,47,D,8,0
^SCR("T1SHER","P",5,"HELP")

^SCR("T1SHER","P",5,"LMAX")
9
^SCR("T1SHER","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($H,1)
^SCR("T1SHER","P",5,"MUMPS2")

^SCR("T1SHER","P",5,"TYP")
D
^SCR("T1SHER","P",10,"CRD")
2,20,D,8,0
^SCR("T1SHER","P",10,"HELP")

^SCR("T1SHER","P",10,"LMAX")
11
^SCR("T1SHER","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("T1SHER","P",10,"MUMPS2")
D DAT2^T1WND1
^SCR("T1SHER","P",10,"MUST")

^SCR("T1SHER","P",10,"TYP")
D
^SCR("T1SHER","P",15,"CRD")
3,19,N,1,0
^SCR("T1SHER","P",15,"HELP")

^SCR("T1SHER","P",15,"LMAX")
3
^SCR("T1SHER","P",15,"MUMPS1")
S:'$G(OPT) OPT=2
^SCR("T1SHER","P",15,"MUMPS2")
D GET^T1WND1
^SCR("T1SHER","P",15,"MUST")

^SCR("T1SHER","P",15,"TYP")
N
^SCR("T1SHER","P","NAME","DAT1")
5
^SCR("T1SHER","P","NAME","DAT2")
10
^SCR("T1SHER","P","NAME","OPT")
15
^SCR("T1SHER","P","NM",5)
DAT1
^SCR("T1SHER","P","NM",10)
DAT2
^SCR("T1SHER","P","NM",15)
OPT
^SCR("TABL")
H
^SCR("TABL",1)
                                                                               
^SCR("TABL",2)
               {                           03}:dlah my   {01      } :MUMPS uaew
^SCR("TABL",3)
                                                                               
^SCR("TABL",4)
    {08}: beq             {06}:gztn jxe`  {                  05} : gztnl dzli`y
^SCR("TABL",5)
         {13}: beq {11}:oezp jxe` {                          10} : oezpl dzli`y
^SCR("TABL",6)
       {20             }: dwica zpkez                             {15} :xhinilc
^SCR("TABL",7)
                                                                               
^SCR("TABL",8)
                                                                              $
^SCR("TABL",9)
      : lcgn zxixa : daeg dcy :   uaew   : beq : jxe` :     sqep oezp my     : 
^SCR("TABL",10)
                                                                               
^SCR("TABL",11)
                                                                               
^SCR("TABL",12)
                                                                               
^SCR("TABL",13)
                                                                               
^SCR("TABL",14)
                                                                               
^SCR("TABL",15)
                                                                               
^SCR("TABL",16)
                                                                               
^SCR("TABL",17)
                                                                               
^SCR("TABL",18)
                                                                               
^SCR("TABL",19)
                                                                               
^SCR("TABL",20)
                                                                               
^SCR("TABL",21)
                                                                               
^SCR("TABL",22)
   $                                                                           
^SCR("TABL","AV",1)

^SCR("TABL","AV",2)
:äìáèíù:MUMPSõáå÷
^SCR("TABL","AV",3)

^SCR("TABL","AV",4)
:âåñ:çúôîêøåà:çúôîìäúìéàù
^SCR("TABL","AV",5)
:âåñ:ïåúðêøåà:ïåúðìäúìéàù
^SCR("TABL","AV",6)
:ä÷éãáúðëåú:øèéîéìã
^SCR("TABL","AV",7)

^SCR("TABL","AV",8)

^SCR("TABL","AV",9)
ìãçîúøéøáäáåçäãùõáå÷âåñêøåàóñåðïåúðíù
^SCR("TABL","AV",10)
------------------------------------------------------------------
^SCR("TABL","AV",11)

^SCR("TABL","AV",12)

^SCR("TABL","AV",13)

^SCR("TABL","AV",14)

^SCR("TABL","AV",15)

^SCR("TABL","AV",16)

^SCR("TABL","AV",17)

^SCR("TABL","AV",18)

^SCR("TABL","AV",19)

^SCR("TABL","AV",20)

^SCR("TABL","AV",21)

^SCR("TABL","AV",22)

^SCR("TABL","G",1,"CRD")
10,77,H,22,0
^SCR("TABL","G",1,"HELP")

^SCR("TABL","G",1,"LMAX")
22
^SCR("TABL","G",1,"MUMPS1")

^SCR("TABL","G",1,"MUMPS2")

^SCR("TABL","G",1,"MUST")

^SCR("TABL","G",1,"SHEM")
     sqep oezp my     
^SCR("TABL","G",1,"TYP")
H
^SCR("TABL","G",2,"CRD")
10,54,E,5,0
^SCR("TABL","G",2,"HELP")

^SCR("TABL","G",2,"LMAX")
6
^SCR("TABL","G",2,"MUMPS1")

^SCR("TABL","G",2,"MUMPS2")
I LNAME1>80!(LNAME1'?1N.N."*".N) S %SC("ER")=1
^SCR("TABL","G",2,"MUST")

^SCR("TABL","G",2,"SHEM")
 jxe` 
^SCR("TABL","G",2,"TYP")
E
^SCR("TABL","G",3,"CRD")
10,47,E,2,0
^SCR("TABL","G",3,"HELP")
'ze` rav-CF,rwx rav-CB,ix`pia-B,onf-T,mei-DY,jix`z-D,xtqin-N,zilbp`-E,zixar-H
^SCR("TABL","G",3,"LMAX")
5
^SCR("TABL","G",3,"MUMPS1")

^SCR("TABL","G",3,"MUMPS2")
D TYP1^%L1TABL
^SCR("TABL","G",3,"MUST")

^SCR("TABL","G",3,"SHEM")
 beq 
^SCR("TABL","G",3,"TYP")
E
^SCR("TABL","G",4,"CRD")
10,41,E,9,0
^SCR("TABL","G",4,"HELP")

^SCR("TABL","G",4,"LMAX")
10
^SCR("TABL","G",4,"MUMPS1")

^SCR("TABL","G",4,"MUMPS2")

^SCR("TABL","G",4,"SHEM")
   uaew   
^SCR("TABL","G",4,"TYP")
E
^SCR("TABL","G",5,"CRD")
10,30,H,1,0
^SCR("TABL","G",5,"HELP")

^SCR("TABL","G",5,"LMAX")
10
^SCR("TABL","G",5,"MUMPS1")
S:$G(MUST)="" MUST="N"
^SCR("TABL","G",5,"MUMPS2")
I "YN10kl"'[MUST S %SC("ER")=1
^SCR("TABL","G",5,"SHEM")
 daeg dcy 
^SCR("TABL","G",5,"TYP")
H
^SCR("TABL","G",6,"CRD")
10,19,H,12,0
^SCR("TABL","G",6,"HELP")

^SCR("TABL","G",6,"LMAX")
12
^SCR("TABL","G",6,"MUMPS1")

^SCR("TABL","G",6,"MUMPS2")

^SCR("TABL","G",6,"SHEM")
 lcgn zxixa 
^SCR("TABL","G",6,"TYP")
H
^SCR("TABL","G","DEL")
Y
^SCR("TABL","G","MAX")
16
^SCR("TABL","G","NAME","DFLT")
6
^SCR("TABL","G","NAME","GLOB1")
4
^SCR("TABL","G","NAME","LNAME1")
2
^SCR("TABL","G","NAME","MUST")
5
^SCR("TABL","G","NAME","NAME1")
1
^SCR("TABL","G","NAME","TYP1")
3
^SCR("TABL","G","NM",1)
NAME1
^SCR("TABL","G","NM",2)
LNAME1
^SCR("TABL","G","NM",3)
TYP1
^SCR("TABL","G","NM",4)
GLOB1
^SCR("TABL","G","NM",5)
MUST
^SCR("TABL","G","NM",6)
DFLT
^SCR("TABL","G","RB")
9,4,23,79
^SCR("TABL","G","REF")
^TEMP0($P
^SCR("TABL","G","RZD")
\
^SCR("TABL","G","STEP")
1
^SCR("TABL","G","STG")
      : lcgn zxixa : daeg dcy :   uaew   : beq : jxe` :     sqep oezp my     : 
^SCR("TABL","G","VG")
11
^SCR("TABL","NAME")
ze`lah llegnl
^SCR("TABL","P",1,"CRD")
2,57,E,9,0
^SCR("TABL","P",1,"FNC")

^SCR("TABL","P",1,"GLOB")
TABLs
^SCR("TABL","P",1,"HELP")

^SCR("TABL","P",1,"LMAX")
9
^SCR("TABL","P",1,"MUMPS1")

^SCR("TABL","P",1,"MUMPS2")
D GLOB^%L1TABL
^SCR("TABL","P",1,"MUST")

^SCR("TABL","P",1,"NLN")
20
^SCR("TABL","P",1,"RZD")
\
^SCR("TABL","P",1,"TOPB")
8
^SCR("TABL","P",1,"TYP")
E
^SCR("TABL","P",1,"VRB")
SHTBL
^SCR("TABL","P",3,"CRD")
2,46,H,30
^SCR("TABL","P",3,"HELP")

^SCR("TABL","P",3,"LMAX")
30
^SCR("TABL","P",3,"MUMPS1")

^SCR("TABL","P",3,"MUMPS2")

^SCR("TABL","P",3,"MUST")

^SCR("TABL","P",3,"TYP")
H
^SCR("TABL","P",5,"CRD")
4,64,H,20
^SCR("TABL","P",5,"HELP")

^SCR("TABL","P",5,"LMAX")
21
^SCR("TABL","P",5,"MUMPS1")

^SCR("TABL","P",5,"MUMPS2")

^SCR("TABL","P",5,"MUST")

^SCR("TABL","P",5,"TYP")
H
^SCR("TABL","P",6,"CRD")
4,26,N,2,0
^SCR("TABL","P",6,"HELP")

^SCR("TABL","P",6,"LMAX")
3
^SCR("TABL","P",6,"MUMPS1")

^SCR("TABL","P",6,"MUMPS2")
I LKEY>20 S %SC("ER")=1
^SCR("TABL","P",6,"MUST")

^SCR("TABL","P",6,"TYP")
N
^SCR("TABL","P",8,"CRD")
4,4,E,1,0
^SCR("TABL","P",8,"HELP")
E,H,D,T
^SCR("TABL","P",8,"LMAX")
3
^SCR("TABL","P",8,"MUMPS1")
S:$G(SUGK)="" SUGK="E"
^SCR("TABL","P",8,"MUMPS2")
I SUGK'="E",SUGK'="H",SUGK'="D",SUGK'="T" S %SC("ER")=1
^SCR("TABL","P",8,"TYP")
E
^SCR("TABL","P",10,"CRD")
5,64,H,28
^SCR("TABL","P",10,"HELP")

^SCR("TABL","P",10,"LMAX")
29
^SCR("TABL","P",10,"MUMPS1")

^SCR("TABL","P",10,"MUMPS2")

^SCR("TABL","P",10,"MUST")

^SCR("TABL","P",10,"TYP")
H
^SCR("TABL","P",11,"CRD")
5,19,N,2,0
^SCR("TABL","P",11,"HELP")

^SCR("TABL","P",11,"LMAX")
3
^SCR("TABL","P",11,"MUMPS1")

^SCR("TABL","P",11,"MUMPS2")
I LNAME>50 S %SC("ER")=1
^SCR("TABL","P",11,"TYP")
N
^SCR("TABL","P",13,"CRD")
5,9,E,1,0
^SCR("TABL","P",13,"HELP")
H,E,D,T,B
^SCR("TABL","P",13,"LMAX")
3
^SCR("TABL","P",13,"MUMPS1")
S:$G(SUGN)="" SUGN="H"
^SCR("TABL","P",13,"MUMPS2")
I SUGN'="H",SUGN'="E",SUGN'="D",SUGN'="T",SUGN'="B" S %SC("ER")=1
^SCR("TABL","P",13,"TYP")
E
^SCR("TABL","P",15,"CRD")
6,66,E,2,0
^SCR("TABL","P",15,"HELP")

^SCR("TABL","P",15,"LMAX")
3
^SCR("TABL","P",15,"MUMPS1")

^SCR("TABL","P",15,"MUMPS2")
S SUM1=0
^SCR("TABL","P",15,"MUST")

^SCR("TABL","P",15,"TYP")
E
^SCR("TABL","P",20,"CRD")
6,7,E,16,0
^SCR("TABL","P",20,"HELP")

^SCR("TABL","P",20,"LMAX")
16
^SCR("TABL","P",20,"MUMPS1")

^SCR("TABL","P",20,"MUMPS2")

^SCR("TABL","P",20,"TYP")
E
^SCR("TABL","P","NAME","""RZD""","KEY",1)
/\RZD
^SCR("TABL","P","NAME","$P","KEY",1)
/\TBL,ZKEY,LKEY,NAME,LNAME,,SUGK,SUGN,VLD
^SCR("TABL","P","NAME","GLOB")
1
^SCR("TABL","P","NAME","LKEY")
6
^SCR("TABL","P","NAME","LKEY","REF")
$P($G(^TEMP0($P)),"\",3)
^SCR("TABL","P","NAME","LKEY","REF1")
$P(^TEMP0($P),"\",3)
^SCR("TABL","P","NAME","LNAME")
11
^SCR("TABL","P","NAME","LNAME","REF")
$P($G(^TEMP0($P)),"\",5)
^SCR("TABL","P","NAME","LNAME","REF1")
$P(^TEMP0($P),"\",5)
^SCR("TABL","P","NAME","NAME")
10
^SCR("TABL","P","NAME","NAME","REF")
$P($G(^TEMP0($P)),"\",4)
^SCR("TABL","P","NAME","NAME","REF1")
$P(^TEMP0($P),"\",4)
^SCR("TABL","P","NAME","RZD")
15
^SCR("TABL","P","NAME","RZD","REF")
$P($G(^TEMP0($P,"RZD")),"--",1)
^SCR("TABL","P","NAME","RZD","REF1")
$P(^TEMP0($P,"RZD"),"--",1)
^SCR("TABL","P","NAME","SHTBL")
3
^SCR("TABL","P","NAME","SUGK")
8
^SCR("TABL","P","NAME","SUGK","REF")
$P($G(^TEMP0($P)),"\",7)
^SCR("TABL","P","NAME","SUGK","REF1")
$P(^TEMP0($P),"\",7)
^SCR("TABL","P","NAME","SUGN")
13
^SCR("TABL","P","NAME","SUGN","REF")
$P($G(^TEMP0($P)),"\",8)
^SCR("TABL","P","NAME","SUGN","REF1")
$P(^TEMP0($P),"\",8)
^SCR("TABL","P","NAME","TBL","REF")
$P($G(^TEMP0($P)),"\",1)
^SCR("TABL","P","NAME","TBL","REF1")
$P(^TEMP0($P),"\",1)
^SCR("TABL","P","NAME","VLD")
20
^SCR("TABL","P","NAME","VLD","REF")
$P($G(^TEMP0($P)),"\",9)
^SCR("TABL","P","NAME","VLD","REF1")
$P(^TEMP0($P),"\",9)
^SCR("TABL","P","NAME","ZKEY")
5
^SCR("TABL","P","NAME","ZKEY","REF")
$P($G(^TEMP0($P)),"\",2)
^SCR("TABL","P","NAME","ZKEY","REF1")
$P(^TEMP0($P),"\",2)
^SCR("TABL","P","NM",1)
GLOB
^SCR("TABL","P","NM",3)
SHTBL
^SCR("TABL","P","NM",5)
ZKEY
^SCR("TABL","P","NM",6)
LKEY
^SCR("TABL","P","NM",8)
SUGK
^SCR("TABL","P","NM",10)
NAME
^SCR("TABL","P","NM",11)
LNAME
^SCR("TABL","P","NM",13)
SUGN
^SCR("TABL","P","NM",15)
RZD
^SCR("TABL","P","NM",20)
VLD
^SCR("TABL","P","REF",1)
^TEMP0($P)
^SCR("TABL","P","REF",1,"RZD")
\
^SCR("TABL","P","REF",1,"STR")
TBL\ZKEY\LKEY\NAME\LNAME\\SUGK\SUGN\VLD
^SCR("TABL","P","REF",2)
^TEMP0($P,"RZD")
^SCR("TABL","P","REF",2,"RZD")
--
^SCR("TABL","P","REF",2,"STR")
RZD
^SCR("TABL0")
H
^SCR("TABL0",1)
                 {                           03}:dlah my   {01    } :MUMPS uaew        
^SCR("TABL0",2)
                                                                               
^SCR("TABL0",3)
 {08}: beq              {06}:gztn jxe`    {                  05} : gztnl dzli`y
^SCR("TABL0",4)
 {13}: beq {11}:oezp jxe` {                          10} :gztn itl oezpl dzli`y
^SCR("TABL0",5)
       {20             }: dwica zpkez                             {15} :xhinilc
^SCR("TABL0",6)
                                                                               
^SCR("TABL0",7)
                                                                              $
^SCR("TABL0",8)
      : lcgn zxixa : daeg dcy :   uaew   : beq : jxe` :     sqep oezp my     : 
^SCR("TABL0",9)
                                                                               
^SCR("TABL0",10)
                                                                               
^SCR("TABL0",11)
                                                                               
^SCR("TABL0",12)
                                                                               
^SCR("TABL0",13)
                                                                               
^SCR("TABL0",14)
                                                                               
^SCR("TABL0",15)
                                                                               
^SCR("TABL0",16)
                                                                               
^SCR("TABL0",17)
                                                                               
^SCR("TABL0",18)
                                                                               
^SCR("TABL0",19)
                                                                               
^SCR("TABL0",20)
                                                                               
^SCR("TABL0",21)
   $                                                                           
^SCR("TABL0","AV",1)
:äìáèíù:MUMPSõáå÷
^SCR("TABL0","AV",2)

^SCR("TABL0","AV",3)
:âåñ:çúôîêøåà:çúôîìäúìéàù
^SCR("TABL0","AV",4)
:âåñ:ïåúðêøåà:çúôîéôìïåúðìäúìéàù
^SCR("TABL0","AV",5)
:ä÷éãáúðëåú:øèéîéìã
^SCR("TABL0","AV",6)

^SCR("TABL0","AV",7)

^SCR("TABL0","AV",8)
ìãçîúøéøáäáåçäãùõáå÷âåñêøåàóñåðïåúðíù
^SCR("TABL0","AV",9)
------------------------------------------------------------------
^SCR("TABL0","AV",10)

^SCR("TABL0","AV",11)

^SCR("TABL0","AV",12)

^SCR("TABL0","AV",13)

^SCR("TABL0","AV",14)

^SCR("TABL0","AV",15)

^SCR("TABL0","AV",16)

^SCR("TABL0","AV",17)

^SCR("TABL0","AV",18)

^SCR("TABL0","AV",19)

^SCR("TABL0","AV",20)

^SCR("TABL0","AV",21)

^SCR("TABL0","G",1,"CRD")
9,77,H,22,0
^SCR("TABL0","G",1,"HELP")

^SCR("TABL0","G",1,"LMAX")
22
^SCR("TABL0","G",1,"MUMPS1")

^SCR("TABL0","G",1,"MUMPS2")

^SCR("TABL0","G",1,"MUST")

^SCR("TABL0","G",1,"SHEM")
     sqep oezp my     
^SCR("TABL0","G",1,"TYP")
H
^SCR("TABL0","G",2,"CRD")
9,54,E,5,0
^SCR("TABL0","G",2,"HELP")

^SCR("TABL0","G",2,"LMAX")
6
^SCR("TABL0","G",2,"MUMPS1")

^SCR("TABL0","G",2,"MUMPS2")
I LNAME1>80!(LNAME1'?1N.N."*".N) S %SC("ER")=1
^SCR("TABL0","G",2,"MUST")

^SCR("TABL0","G",2,"SHEM")
 jxe` 
^SCR("TABL0","G",2,"TYP")
E
^SCR("TABL0","G",3,"CRD")
9,47,E,2,0
^SCR("TABL0","G",3,"HELP")
'ze` rav-CF,rwx rav-CB,ix`pia-B,onf-T,mei-DY,jix`z-D,xtqin-N,zilbp`-E,zixar-H
^SCR("TABL0","G",3,"LMAX")
5
^SCR("TABL0","G",3,"MUMPS1")

^SCR("TABL0","G",3,"MUMPS2")
D TYP1^%L1TABL
^SCR("TABL0","G",3,"MUST")

^SCR("TABL0","G",3,"SHEM")
 beq 
^SCR("TABL0","G",3,"TYP")
E
^SCR("TABL0","G",4,"CRD")
9,41,E,9,0
^SCR("TABL0","G",4,"HELP")

^SCR("TABL0","G",4,"LMAX")
10
^SCR("TABL0","G",4,"MUMPS1")

^SCR("TABL0","G",4,"MUMPS2")

^SCR("TABL0","G",4,"SHEM")
   uaew   
^SCR("TABL0","G",4,"TYP")
E
^SCR("TABL0","G",5,"CRD")
9,30,H,1,0
^SCR("TABL0","G",5,"HELP")

^SCR("TABL0","G",5,"LMAX")
10
^SCR("TABL0","G",5,"MUMPS1")
S:$G(MUST)="" MUST="N"
^SCR("TABL0","G",5,"MUMPS2")
I "YN10kl"'[MUST S %SC("ER")=1
^SCR("TABL0","G",5,"SHEM")
 daeg dcy 
^SCR("TABL0","G",5,"TYP")
H
^SCR("TABL0","G",6,"CRD")
9,19,H,12,0
^SCR("TABL0","G",6,"HELP")

^SCR("TABL0","G",6,"LMAX")
12
^SCR("TABL0","G",6,"MUMPS1")

^SCR("TABL0","G",6,"MUMPS2")

^SCR("TABL0","G",6,"SHEM")
 lcgn zxixa 
^SCR("TABL0","G",6,"TYP")
H
^SCR("TABL0","G","DEL")
Y
^SCR("TABL0","G","MAX")
16
^SCR("TABL0","G","NAME","DFLT")
6
^SCR("TABL0","G","NAME","GLOB1")
4
^SCR("TABL0","G","NAME","LNAME1")
2
^SCR("TABL0","G","NAME","MUST")
5
^SCR("TABL0","G","NAME","NAME1")
1
^SCR("TABL0","G","NAME","TYP1")
3
^SCR("TABL0","G","NM",1)
NAME1
^SCR("TABL0","G","NM",2)
LNAME1
^SCR("TABL0","G","NM",3)
TYP1
^SCR("TABL0","G","NM",4)
GLOB1
^SCR("TABL0","G","NM",5)
MUST
^SCR("TABL0","G","NM",6)
DFLT
^SCR("TABL0","G","RB")
8,4,22,79
^SCR("TABL0","G","REF")
^TEMP0($P
^SCR("TABL0","G","RZD")
\
^SCR("TABL0","G","STEP")
1
^SCR("TABL0","G","STG")
      : lcgn zxixa : daeg dcy :   uaew   : beq : jxe` :     sqep oezp my     : 
^SCR("TABL0","G","VG")
10
^SCR("TABL0","NAME")
ze`lah llegnl
^SCR("TABL0","P",1,"CRD")
1,59,E,7,0
^SCR("TABL0","P",1,"FNC")

^SCR("TABL0","P",1,"GLOB")
TABLs
^SCR("TABL0","P",1,"HELP")

^SCR("TABL0","P",1,"LMAX")
7
^SCR("TABL0","P",1,"MUMPS1")

^SCR("TABL0","P",1,"MUMPS2")
D GLOB^%L1TABL
^SCR("TABL0","P",1,"MUST")

^SCR("TABL0","P",1,"NLN")
20
^SCR("TABL0","P",1,"RZD")
\
^SCR("TABL0","P",1,"TOPB")
8
^SCR("TABL0","P",1,"TYP")
E
^SCR("TABL0","P",1,"VRB")
SHTBL
^SCR("TABL0","P",3,"CRD")
1,48,H,30,0
^SCR("TABL0","P",3,"HELP")

^SCR("TABL0","P",3,"LMAX")
30
^SCR("TABL0","P",3,"MUMPS1")

^SCR("TABL0","P",3,"MUMPS2")

^SCR("TABL0","P",3,"MUST")

^SCR("TABL0","P",3,"TYP")
H
^SCR("TABL0","P",5,"CRD")
3,64,H,20,0
^SCR("TABL0","P",5,"HELP")

^SCR("TABL0","P",5,"LMAX")
21
^SCR("TABL0","P",5,"MUMPS1")

^SCR("TABL0","P",5,"MUMPS2")

^SCR("TABL0","P",5,"MUST")

^SCR("TABL0","P",5,"TYP")
H
^SCR("TABL0","P",6,"CRD")
3,24,N,2,0
^SCR("TABL0","P",6,"HELP")

^SCR("TABL0","P",6,"LMAX")
3
^SCR("TABL0","P",6,"MUMPS1")

^SCR("TABL0","P",6,"MUMPS2")
I LKEY>20 S %SC("ER")=1
^SCR("TABL0","P",6,"MUST")

^SCR("TABL0","P",6,"TYP")
N
^SCR("TABL0","P",8,"CRD")
3,1,E,1,0
^SCR("TABL0","P",8,"HELP")
E,H,D,T
^SCR("TABL0","P",8,"LMAX")
3
^SCR("TABL0","P",8,"MUMPS1")
S:$G(SUGK)="" SUGK="E"
^SCR("TABL0","P",8,"MUMPS2")
I SUGK'="E",SUGK'="H",SUGK'="D",SUGK'="T" S %SC("ER")=1
^SCR("TABL0","P",8,"TYP")
E
^SCR("TABL0","P",10,"CRD")
4,56,H,28,0
^SCR("TABL0","P",10,"HELP")

^SCR("TABL0","P",10,"LMAX")
29
^SCR("TABL0","P",10,"MUMPS1")

^SCR("TABL0","P",10,"MUMPS2")

^SCR("TABL0","P",10,"MUST")

^SCR("TABL0","P",10,"TYP")
H
^SCR("TABL0","P",11,"CRD")
4,11,N,2,0
^SCR("TABL0","P",11,"HELP")

^SCR("TABL0","P",11,"LMAX")
3
^SCR("TABL0","P",11,"MUMPS1")

^SCR("TABL0","P",11,"MUMPS2")
I LNAME>30 S %SC("ER")=1
^SCR("TABL0","P",11,"TYP")
N
^SCR("TABL0","P",13,"CRD")
4,1,E,1,0
^SCR("TABL0","P",13,"HELP")
H,E,D,T,B
^SCR("TABL0","P",13,"LMAX")
3
^SCR("TABL0","P",13,"MUMPS1")
S:$G(SUGN)="" SUGN="H"
^SCR("TABL0","P",13,"MUMPS2")
I SUGN'="H",SUGN'="E",SUGN'="D",SUGN'="T",SUGN'="B" S %SC("ER")=1
^SCR("TABL0","P",13,"TYP")
E
^SCR("TABL0","P",15,"CRD")
5,66,E,2,0
^SCR("TABL0","P",15,"HELP")

^SCR("TABL0","P",15,"LMAX")
3
^SCR("TABL0","P",15,"MUMPS1")

^SCR("TABL0","P",15,"MUMPS2")
S SUM1=0
^SCR("TABL0","P",15,"MUST")

^SCR("TABL0","P",15,"TYP")
E
^SCR("TABL0","P",20,"CRD")
5,7,E,16,0
^SCR("TABL0","P",20,"HELP")

^SCR("TABL0","P",20,"LMAX")
16
^SCR("TABL0","P",20,"MUMPS1")

^SCR("TABL0","P",20,"MUMPS2")

^SCR("TABL0","P",20,"TYP")
E
^SCR("TABL0","P","NAME","""RZD""","KEY",1)
/\RZD
^SCR("TABL0","P","NAME","$P","KEY",1)
/\TBL,ZKEY,LKEY,NAME,LNAME,,SUGK,SUGN,VLD
^SCR("TABL0","P","NAME","GLOB")
1
^SCR("TABL0","P","NAME","LKEY")
6
^SCR("TABL0","P","NAME","LKEY","REF")
$P($G(^TEMP0($P)),"\",3)
^SCR("TABL0","P","NAME","LKEY","REF1")
$P(^TEMP0($P),"\",3)
^SCR("TABL0","P","NAME","LNAME")
11
^SCR("TABL0","P","NAME","LNAME","REF")
$P($G(^TEMP0($P)),"\",5)
^SCR("TABL0","P","NAME","LNAME","REF1")
$P(^TEMP0($P),"\",5)
^SCR("TABL0","P","NAME","NAME")
10
^SCR("TABL0","P","NAME","NAME","REF")
$P($G(^TEMP0($P)),"\",4)
^SCR("TABL0","P","NAME","NAME","REF1")
$P(^TEMP0($P),"\",4)
^SCR("TABL0","P","NAME","RZD")
15
^SCR("TABL0","P","NAME","RZD","REF")
$P($G(^TEMP0($P,"RZD")),"--",1)
^SCR("TABL0","P","NAME","RZD","REF1")
$P(^TEMP0($P,"RZD"),"--",1)
^SCR("TABL0","P","NAME","SHTBL")
3
^SCR("TABL0","P","NAME","SUGK")
8
^SCR("TABL0","P","NAME","SUGK","REF")
$P($G(^TEMP0($P)),"\",7)
^SCR("TABL0","P","NAME","SUGK","REF1")
$P(^TEMP0($P),"\",7)
^SCR("TABL0","P","NAME","SUGN")
13
^SCR("TABL0","P","NAME","SUGN","REF")
$P($G(^TEMP0($P)),"\",8)
^SCR("TABL0","P","NAME","SUGN","REF1")
$P(^TEMP0($P),"\",8)
^SCR("TABL0","P","NAME","TBL","REF")
$P($G(^TEMP0($P)),"\",1)
^SCR("TABL0","P","NAME","TBL","REF1")
$P(^TEMP0($P),"\",1)
^SCR("TABL0","P","NAME","VLD")
20
^SCR("TABL0","P","NAME","VLD","REF")
$P($G(^TEMP0($P)),"\",9)
^SCR("TABL0","P","NAME","VLD","REF1")
$P(^TEMP0($P),"\",9)
^SCR("TABL0","P","NAME","ZKEY")
5
^SCR("TABL0","P","NAME","ZKEY","REF")
$P($G(^TEMP0($P)),"\",2)
^SCR("TABL0","P","NAME","ZKEY","REF1")
$P(^TEMP0($P),"\",2)
^SCR("TABL0","P","NM",1)
GLOB
^SCR("TABL0","P","NM",3)
SHTBL
^SCR("TABL0","P","NM",5)
ZKEY
^SCR("TABL0","P","NM",6)
LKEY
^SCR("TABL0","P","NM",8)
SUGK
^SCR("TABL0","P","NM",10)
NAME
^SCR("TABL0","P","NM",11)
LNAME
^SCR("TABL0","P","NM",13)
SUGN
^SCR("TABL0","P","NM",15)
RZD
^SCR("TABL0","P","NM",20)
VLD
^SCR("TABL0","P","REF",1)
^TEMP0($P)
^SCR("TABL0","P","REF",1,"RZD")
\
^SCR("TABL0","P","REF",1,"STR")
TBL\ZKEY\LKEY\NAME\LNAME\\SUGK\SUGN\VLD
^SCR("TABL0","P","REF",2)
^TEMP0($P,"RZD")
^SCR("TABL0","P","REF",2,"RZD")
--
^SCR("TABL0","P","REF",2,"STR")
RZD
^SCR("TBNOSF")
H
^SCR("TBNOSF",1)
               08.17 ixehwt 'uieecpqa zexqegy qia oz zepnfd zniyx              
^SCR("TBNOSF",2)
                                                                               
^SCR("TBNOSF",3)
                                              1$                               
^SCR("TBNOSF",4)
                                : 10B zpnfd :                                  
^SCR("TBNOSF",5)
                           $1                                                  
^SCR("TBNOSF","A",1)
08.17‰˜…ˆ—”'•‰……ƒ�‘�š…˜‘…‡™‘‰��šš…�Ž†„šŽ‰™˜
^SCR("TBNOSF","A",2)

^SCR("TBNOSF","A",3)

^SCR("TBNOSF","A",4)
10Bš�Ž†„
^SCR("TBNOSF","A",5)
-----------
^SCR("TBNOSF","AV",1)
08/17hruyepw•huusbxc,urxujaxhci,,ubnzv,nhar
^SCR("TBNOSF","AV",2)

^SCR("TBNOSF","AV",3)

^SCR("TBNOSF","AV",4)
10B,bnzv
^SCR("TBNOSF","AV",5)
-----------
^SCR("TBNOSF","G",1,"CRD")
5,44,E,8,0
^SCR("TBNOSF","G",1,"HELP")

^SCR("TBNOSF","G",1,"LMAX")
11
^SCR("TBNOSF","G",1,"MUMPS1")

^SCR("TBNOSF","G",1,"MUMPS2")

^SCR("TBNOSF","G",1,"OUTPUT")

^SCR("TBNOSF","G",1,"SHEM")
 10B zpnfd 
^SCR("TBNOSF","G",1,"TYP")
E
^SCR("TBNOSF","G","DEL")
Y
^SCR("TBNOSF","G","MAX")
99999
^SCR("TBNOSF","G","NAME","TBORD")
1
^SCR("TBNOSF","G","NM",1)
TBORD
^SCR("TBNOSF","G","RB")
4,28,6,48
^SCR("TBNOSF","G","REF")
^TMP($J
^SCR("TBNOSF","G","RZD")
\
^SCR("TBNOSF","G","STEP")
1
^SCR("TBNOSF","G","STG")
                                : 10B zpnfd :                                  
^SCR("TBNOSF","G","VG")
6
^SCR("TBNOSF","NAME")

^SCR("TBNOTB")
H
^SCR("TBNOTB",1)
                       08.17 qia oz geca oi`y qia oz zepnfd zniyx              
^SCR("TBNOTB",2)
                                                                               
^SCR("TBNOTB",3)
                                                                             1$
^SCR("TBNOTB",4)
    : 'lyn .nc :  mekq  : dryl : jix`zl : -a dlawzd : t-q zpnfd : 10B zpnfd :  
^SCR("TBNOTB",5)
                                                                               
^SCR("TBNOTB",6)
                                                                               
^SCR("TBNOTB",7)
                                                                               
^SCR("TBNOTB",8)
                                                                               
^SCR("TBNOTB",9)
                                                                               
^SCR("TBNOTB",10)
                                                                               
^SCR("TBNOTB",11)
                                                                               
^SCR("TBNOTB",12)
                                                                               
^SCR("TBNOTB",13)
                                                                               
^SCR("TBNOTB",14)
                                                                               
^SCR("TBNOTB",15)
                                                                               
^SCR("TBNOTB",16)
                                                                               
^SCR("TBNOTB",17)
                                                                               
^SCR("TBNOTB",18)
                                                                               
^SCR("TBNOTB",19)
                                                                               
^SCR("TBNOTB",20)
                                                                               
^SCR("TBNOTB",21)
                                                                               
^SCR("TBNOTB",22)
 $1                                                                            
^SCR("TBNOTB",23)
                                                                               
^SCR("TBNOTB","A",1)
08.17‘‰��š‡…ƒ��‰€™‘‰��šš…�Ž†„šŽ‰™˜
^SCR("TBNOTB","A",2)

^SCR("TBNOTB","A",3)

^SCR("TBNOTB","A",4)
'Œ™Ž.Žƒ�…‹‘„’™ŒŠ‰˜€šŒ-�„Œ�—š„”-‘š�Ž†„10Bš�Ž†„
^SCR("TBNOTB","A",5)
-------------------------------------------------------------------
^SCR("TBNOTB","A",6)

^SCR("TBNOTB","A",7)

^SCR("TBNOTB","A",8)

^SCR("TBNOTB","A",9)

^SCR("TBNOTB","A",10)

^SCR("TBNOTB","A",11)

^SCR("TBNOTB","A",12)

^SCR("TBNOTB","A",13)

^SCR("TBNOTB","A",14)

^SCR("TBNOTB","A",15)

^SCR("TBNOTB","A",16)

^SCR("TBNOTB","A",17)

^SCR("TBNOTB","A",18)

^SCR("TBNOTB","A",19)

^SCR("TBNOTB","A",20)

^SCR("TBNOTB","A",21)

^SCR("TBNOTB","A",22)

^SCR("TBNOTB","A",23)

^SCR("TBNOTB","AV",1)
08/17xhci,juscihtaxhci,,ubnzv,nhar
^SCR("TBNOTB","AV",2)

^SCR("TBNOTB","AV",3)

^SCR("TBNOTB","AV",4)
wkan/nsoufxvgaklhrt,k-cvkce,vp-x,bnzv10B,bnzv
^SCR("TBNOTB","AV",5)
-------------------------------------------------------------------
^SCR("TBNOTB","AV",6)

^SCR("TBNOTB","AV",7)

^SCR("TBNOTB","AV",8)

^SCR("TBNOTB","AV",9)

^SCR("TBNOTB","AV",10)

^SCR("TBNOTB","AV",11)

^SCR("TBNOTB","AV",12)

^SCR("TBNOTB","AV",13)

^SCR("TBNOTB","AV",14)

^SCR("TBNOTB","AV",15)

^SCR("TBNOTB","AV",16)

^SCR("TBNOTB","AV",17)

^SCR("TBNOTB","AV",18)

^SCR("TBNOTB","AV",19)

^SCR("TBNOTB","AV",20)

^SCR("TBNOTB","AV",21)

^SCR("TBNOTB","AV",22)

^SCR("TBNOTB","AV",23)

^SCR("TBNOTB","G",1,"CRD")
5,76,E,8,0
^SCR("TBNOTB","G",1,"HELP")

^SCR("TBNOTB","G",1,"LMAX")
11
^SCR("TBNOTB","G",1,"MUMPS1")

^SCR("TBNOTB","G",1,"MUMPS2")

^SCR("TBNOTB","G",1,"OUTPUT")

^SCR("TBNOTB","G",1,"SHEM")
 10B zpnfd 
^SCR("TBNOTB","G",1,"TYP")
E
^SCR("TBNOTB","G",2,"CRD")
5,64,E,11,0
^SCR("TBNOTB","G",2,"HELP")

^SCR("TBNOTB","G",2,"LMAX")
11
^SCR("TBNOTB","G",2,"MUMPS1")

^SCR("TBNOTB","G",2,"MUMPS2")

^SCR("TBNOTB","G",2,"SHEM")
 t-q zpnfd 
^SCR("TBNOTB","G",2,"TYP")
E
^SCR("TBNOTB","G",3,"CRD")
5,52,E,11,0
^SCR("TBNOTB","G",3,"HELP")

^SCR("TBNOTB","G",3,"LMAX")
11
^SCR("TBNOTB","G",3,"MUMPS1")

^SCR("TBNOTB","G",3,"MUMPS2")

^SCR("TBNOTB","G",3,"SHEM")
 -a dlawzd 
^SCR("TBNOTB","G",3,"TYP")
E
^SCR("TBNOTB","G",4,"CRD")
5,40,D,8,0
^SCR("TBNOTB","G",4,"HELP")

^SCR("TBNOTB","G",4,"LMAX")
8
^SCR("TBNOTB","G",4,"MUMPS1")

^SCR("TBNOTB","G",4,"MUMPS2")

^SCR("TBNOTB","G",4,"SHEM")
 jix`zl 
^SCR("TBNOTB","G",4,"TYP")
D
^SCR("TBNOTB","G",5,"CRD")
5,31,E,5,0
^SCR("TBNOTB","G",5,"HELP")

^SCR("TBNOTB","G",5,"LMAX")
6
^SCR("TBNOTB","G",5,"MUMPS1")

^SCR("TBNOTB","G",5,"MUMPS2")

^SCR("TBNOTB","G",5,"SHEM")
 dryl 
^SCR("TBNOTB","G",5,"TYP")
E
^SCR("TBNOTB","G",6,"CRD")
5,24,N,8,2
^SCR("TBNOTB","G",6,"HELP")

^SCR("TBNOTB","G",6,"LMAX")
8
^SCR("TBNOTB","G",6,"MUMPS1")

^SCR("TBNOTB","G",6,"MUMPS2")

^SCR("TBNOTB","G",6,"SHEM")
  mekq  
^SCR("TBNOTB","G",6,"TYP")
N
^SCR("TBNOTB","G",7,"CRD")
5,15,N,7,2
^SCR("TBNOTB","G",7,"HELP")

^SCR("TBNOTB","G",7,"LMAX")
10
^SCR("TBNOTB","G",7,"MUMPS1")

^SCR("TBNOTB","G",7,"MUMPS2")

^SCR("TBNOTB","G",7,"SHEM")
 'lyn .nc 
^SCR("TBNOTB","G",7,"TYP")
N
^SCR("TBNOTB","G","MAX")
99999
^SCR("TBNOTB","G","NAME","DAT")
4
^SCR("TBNOTB","G","NAME","DATCB")
3
^SCR("TBNOTB","G","NAME","DMSH")
7
^SCR("TBNOTB","G","NAME","ORD")
2
^SCR("TBNOTB","G","NAME","SHAA")
5
^SCR("TBNOTB","G","NAME","SUM")
6
^SCR("TBNOTB","G","NAME","TBORD")
1
^SCR("TBNOTB","G","NM",1)
TBORD
^SCR("TBNOTB","G","NM",2)
ORD
^SCR("TBNOTB","G","NM",3)
DATCB
^SCR("TBNOTB","G","NM",4)
DAT
^SCR("TBNOTB","G","NM",5)
SHAA
^SCR("TBNOTB","G","NM",6)
SUM
^SCR("TBNOTB","G","NM",7)
DMSH
^SCR("TBNOTB","G","RB")
4,2,23,79
^SCR("TBNOTB","G","REF")
^TMP($J
^SCR("TBNOTB","G","RZD")
\
^SCR("TBNOTB","G","STEP")
1
^SCR("TBNOTB","G","STG")
    : 'lyn .nc :  mekq  : dryl : jix`zl : -a dlawzd : t-q zpnfd : 10B zpnfd :  
^SCR("TBNOTB","G","VG")
6
^SCR("TBNOTB","NAME")
a-za oi`y qia oz zepnfd zniyx
^SCR("THV")
H
^SCR("THV",1)
                                    # dxard zcerz #                            
^SCR("THV",2)
                                                                               
^SCR("THV",3)
                                                 {01     }: 'qn dcerz          
^SCR("THV",4)
                                                 {02     }:     jix`z          
^SCR("THV",5)
                                                                               
^SCR("THV",6)
                 {                             06} {05       }: gewln          
^SCR("THV",7)
                 {                             11} {10       }: gewll          
^SCR("THV",8)
                                                                               
^SCR("THV",9)
                                              {20      } :dxardl mekq          
^SCR("THV",10)
                                                                               
^SCR("THV",11)
                {                                           25}: dxrd          
^SCR("THV","A",1)
„˜�’„šƒ…’š
^SCR("THV","A",2)

^SCR("THV","A",3)
:'‘Ž„ƒ…’š
^SCR("THV","A",4)
:Š‰˜€š
^SCR("THV","A",5)

^SCR("THV","A",6)
:‡…—ŒŽ
^SCR("THV","A",7)
:‡…—ŒŒ
^SCR("THV","A",8)

^SCR("THV","A",9)
:„˜�’„Œ�…‹‘
^SCR("THV","A",10)

^SCR("THV","A",11)
:„˜’„
^SCR("THV","AV",1)
vrcgv,sug,
^SCR("THV","AV",2)

^SCR("THV","AV",3)
:wxnvsug,
^SCR("THV","AV",4)
:lhrt,
^SCR("THV","AV",5)

^SCR("THV","AV",6)
:juekn
^SCR("THV","AV",7)
:juekk
^SCR("THV","AV",8)

^SCR("THV","AV",9)
:vrcgvkoufx
^SCR("THV","AV",10)

^SCR("THV","AV",11)
:vrgv
^SCR("THV","NAME")
dxard 'z
^SCR("THV","P",1,"CRD")
3,49,N,8,0
^SCR("THV","P",1,"HELP")

^SCR("THV","P",1,"LMAX")
8
^SCR("THV","P",1,"MUMPS1")
S:'$G(MSP) MSP=$O(^THV(99999),-1)+1
^SCR("THV","P",1,"MUMPS2")

^SCR("THV","P",1,"TYP")
N
^SCR("THV","P",2,"CRD")
4,49,D,8,0
^SCR("THV","P",2,"HELP")

^SCR("THV","P",2,"LMAX")
8
^SCR("THV","P",2,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($H,1)
^SCR("THV","P",2,"MUMPS2")

^SCR("THV","P",2,"TYP")
D
^SCR("THV","P",5,"CHECK")
Y
^SCR("THV","P",5,"CRD")
6,51,E,10,0
^SCR("THV","P",5,"FNC")

^SCR("THV","P",5,"GLOB")
LKH
^SCR("THV","P",5,"HELP")

^SCR("THV","P",5,"LMAX")
10
^SCR("THV","P",5,"MUMPS1")

^SCR("THV","P",5,"MUMPS2")
I '$$^P1BDEZL(LKH1) S %SC("ER")=1
^SCR("THV","P",5,"MUST")

^SCR("THV","P",5,"NLN")
20
^SCR("THV","P",5,"RZD")
\
^SCR("THV","P",5,"TOPB")
8
^SCR("THV","P",5,"TYP")
E
^SCR("THV","P",5,"VRB")
LKH11
^SCR("THV","P",6,"CRD")
6,50,H,32
^SCR("THV","P",6,"HELP")

^SCR("THV","P",6,"LMAX")
32
^SCR("THV","P",6,"MUMPS1")

^SCR("THV","P",6,"MUMPS2")

^SCR("THV","P",6,"OUTPUT")

^SCR("THV","P",6,"TYP")
H
^SCR("THV","P",10,"CHECK")
Y
^SCR("THV","P",10,"CRD")
7,51,E,10,0
^SCR("THV","P",10,"FNC")

^SCR("THV","P",10,"GLOB")
LKH
^SCR("THV","P",10,"HELP")

^SCR("THV","P",10,"LMAX")
10
^SCR("THV","P",10,"MUMPS1")

^SCR("THV","P",10,"MUMPS2")
I '$$^P1BDEZL(LKH2) S %SC("ER")=1
^SCR("THV","P",10,"MUST")

^SCR("THV","P",10,"NLN")
20
^SCR("THV","P",10,"RZD")
\
^SCR("THV","P",10,"TOPB")
8
^SCR("THV","P",10,"TYP")
E
^SCR("THV","P",10,"VRB")
LKH21
^SCR("THV","P",11,"CRD")
7,50,H,32
^SCR("THV","P",11,"HELP")

^SCR("THV","P",11,"LMAX")
32
^SCR("THV","P",11,"MUMPS1")

^SCR("THV","P",11,"MUMPS2")

^SCR("THV","P",11,"OUTPUT")

^SCR("THV","P",11,"TYP")
H
^SCR("THV","P",20,"CRD")
9,46,N,9,2
^SCR("THV","P",20,"HELP")

^SCR("THV","P",20,"LMAX")
9
^SCR("THV","P",20,"MUMPS1")

^SCR("THV","P",20,"MUMPS2")
I 'SUM S %SC("ST")=1
^SCR("THV","P",20,"TYP")
N
^SCR("THV","P",25,"CRD")
11,63,H,46
^SCR("THV","P",25,"HELP")

^SCR("THV","P",25,"LMAX")
46
^SCR("THV","P",25,"MUMPS1")

^SCR("THV","P",25,"MUMPS2")

^SCR("THV","P",25,"TYP")
H
^SCR("THV","P","NAME","DAT1")
2
^SCR("THV","P","NAME","HRA")
25
^SCR("THV","P","NAME","LKH1")
5
^SCR("THV","P","NAME","LKH11")
6
^SCR("THV","P","NAME","LKH2")
10
^SCR("THV","P","NAME","LKH21")
11
^SCR("THV","P","NAME","MSP")
1
^SCR("THV","P","NAME","SUM")
20
^SCR("THV","P","NM",1)
MSP
^SCR("THV","P","NM",2)
DAT1
^SCR("THV","P","NM",5)
LKH1
^SCR("THV","P","NM",6)
LKH11
^SCR("THV","P","NM",10)
LKH2
^SCR("THV","P","NM",11)
LKH21
^SCR("THV","P","NM",20)
SUM
^SCR("THV","P","NM",25)
HRA
^SCR("TKPARM")
H
^SCR("TKPARM",1)
                                                                               
^SCR("TKPARM",2)
                                                                    1]         
^SCR("TKPARM",3)
                   {                               05} : xcynd my              
^SCR("TKPARM",4)
                                           {10       } :xcynd qwt              
^SCR("TKPARM",5)
                                                                               
^SCR("TKPARM",6)
                                          {15        } :    `nqiq              
^SCR("TKPARM",7)
              [1                                                               
^SCR("TKPARM",8)
                                                                               
^SCR("TKPARM",9)
                                                                               
^SCR("TKPARM",10)
                                                                               
^SCR("TKPARM",11)
                                                                               
^SCR("TKPARM",12)
                                                                               
^SCR("TKPARM",13)
                                                                               
^SCR("TKPARM",14)
                                                                               
^SCR("TKPARM",15)
                                                                               
^SCR("TKPARM","A",1)

^SCR("TKPARM","A",2)

^SCR("TKPARM","A",3)
:˜ƒ™Ž„�™
^SCR("TKPARM","A",4)
:˜ƒ™Ž„‘—”
^SCR("TKPARM","A",5)

^SCR("TKPARM","A",6)
:€Ž‘‰‘
^SCR("TKPARM","A",7)

^SCR("TKPARM","A",8)

^SCR("TKPARM","A",9)

^SCR("TKPARM","A",10)

^SCR("TKPARM","A",11)

^SCR("TKPARM","A",12)

^SCR("TKPARM","A",13)

^SCR("TKPARM","A",14)

^SCR("TKPARM","A",15)

^SCR("TKPARM","AV",1)

^SCR("TKPARM","AV",2)

^SCR("TKPARM","AV",3)
:rsanvoa
^SCR("TKPARM","AV",4)
:rsanvxep
^SCR("TKPARM","AV",5)

^SCR("TKPARM","AV",6)
:tnxhx
^SCR("TKPARM","AV",7)

^SCR("TKPARM","AV",8)

^SCR("TKPARM","AV",9)

^SCR("TKPARM","AV",10)

^SCR("TKPARM","AV",11)

^SCR("TKPARM","AV",12)

^SCR("TKPARM","AV",13)

^SCR("TKPARM","AV",14)

^SCR("TKPARM","AV",15)

^SCR("TKPARM","NAME")
'qwt' zipkezl mixhnxt
^SCR("TKPARM","P",5,"CRD")
3,54,H,34
^SCR("TKPARM","P",5,"HELP")

^SCR("TKPARM","P",5,"LMAX")
34
^SCR("TKPARM","P",5,"MUMPS1")

^SCR("TKPARM","P",5,"MUMPS2")

^SCR("TKPARM","P",5,"TYP")
H
^SCR("TKPARM","P",10,"CRD")
4,43,E,10,0
^SCR("TKPARM","P",10,"HELP")

^SCR("TKPARM","P",10,"LMAX")
10
^SCR("TKPARM","P",10,"MUMPS1")

^SCR("TKPARM","P",10,"MUMPS2")

^SCR("TKPARM","P",10,"TYP")
E
^SCR("TKPARM","P",15,"CRD")
6,42,E,11,0
^SCR("TKPARM","P",15,"HELP")

^SCR("TKPARM","P",15,"LMAX")
11
^SCR("TKPARM","P",15,"MUMPS1")

^SCR("TKPARM","P",15,"MUMPS2")

^SCR("TKPARM","P",15,"TYP")
E
^SCR("TKPARM","P","NAME","FAX")
10
^SCR("TKPARM","P","NAME","SHEM")
5
^SCR("TKPARM","P","NAME","SISMA")
15
^SCR("TKPARM","P","NM",5)
SHEM
^SCR("TKPARM","P","NM",10)
FAX
^SCR("TKPARM","P","NM",15)
SISMA
^SCR("TKPARM","P","RB",1)
3,15,8,70
^SCR("TLAS")
H
^SCR("TLAS",1)
                                                                               
^SCR("TLAS",2)
                                                                               
^SCR("TLAS",3)
                                                                               
^SCR("TLAS",4)
                                                                               
^SCR("TLAS",5)
                                                                               
^SCR("TLAS",6)
                                                                               
^SCR("TLAS",7)
                                                                               
^SCR("TLAS",8)
                                                                               
^SCR("TLAS",9)
                                                                               
^SCR("TLAS",10)
                                                                               
^SCR("TLAS",11)
                                                                               
^SCR("TLAS",12)
                                                                               
^SCR("TLAS",13)
                                                                               
^SCR("TLAS",14)
                                                                               
^SCR("TLAS",15)
                                                                               
^SCR("TLAS",16)
                                                                               
^SCR("TLAS",17)
                                                                               
^SCR("TLAS",18)
                                                                               
^SCR("TLAS",19)
                                                                               
^SCR("TLAS",20)
                                                                               
^SCR("TLAS",21)
                                                                               
^SCR("TLAS",22)
    {20     :lreta  {15    :yelz itl mley  {10 : zenk  {05          : yelz ieey
^SCR("TLAS",23)
                                                                               
^SCR("TLAS","A",1)

^SCR("TLAS","A",2)

^SCR("TLAS","A",3)

^SCR("TLAS","A",4)

^SCR("TLAS","A",5)

^SCR("TLAS","A",6)

^SCR("TLAS","A",7)

^SCR("TLAS","A",8)

^SCR("TLAS","A",9)

^SCR("TLAS","A",10)

^SCR("TLAS","A",11)

^SCR("TLAS","A",12)

^SCR("TLAS","A",13)

^SCR("TLAS","A",14)

^SCR("TLAS","A",15)

^SCR("TLAS","A",16)

^SCR("TLAS","A",17)

^SCR("TLAS","A",18)

^SCR("TLAS","A",19)

^SCR("TLAS","A",20)

^SCR("TLAS","A",21)

^SCR("TLAS","A",22)
:Œ’…”�:™…Œš‰”Œ�Œ…™:š…Ž‹:™…Œš‰……™
^SCR("TLAS","A",23)

^SCR("TLAS","AV",1)

^SCR("TLAS","AV",2)

^SCR("TLAS","AV",3)

^SCR("TLAS","AV",4)

^SCR("TLAS","AV",5)

^SCR("TLAS","AV",6)

^SCR("TLAS","AV",7)

^SCR("TLAS","AV",8)

^SCR("TLAS","AV",9)

^SCR("TLAS","AV",10)

^SCR("TLAS","AV",11)

^SCR("TLAS","AV",12)

^SCR("TLAS","AV",13)

^SCR("TLAS","AV",14)

^SCR("TLAS","AV",15)

^SCR("TLAS","AV",16)

^SCR("TLAS","AV",17)

^SCR("TLAS","AV",18)

^SCR("TLAS","AV",19)

^SCR("TLAS","AV",20)

^SCR("TLAS","AV",21)

^SCR("TLAS","AV",22)
:kgupc:auk,hpkokua:,unf:auk,huua
^SCR("TLAS","AV",23)

^SCR("TLAS","NAME")
i`xy` yelza melyz
^SCR("TLAS","P",5,"CRD")
22,55,E,13,0
^SCR("TLAS","P",5,"HELP")

^SCR("TLAS","P",5,"LMAX")
13
^SCR("TLAS","P",5,"MUMPS1")

^SCR("TLAS","P",5,"MUMPS2")
S TLAL=TLUSH
^SCR("TLAS","P",5,"TYP")
E
^SCR("TLAS","P",10,"CRD")
22,43,N,4,0
^SCR("TLAS","P",10,"HELP")

^SCR("TLAS","P",10,"LMAX")
4
^SCR("TLAS","P",10,"MUMPS1")
K %SCO D KMTL^P1T
^SCR("TLAS","P",10,"MUMPS2")
D KMTL2^P1T
^SCR("TLAS","P",10,"TYP")
N
^SCR("TLAS","P",15,"CRD")
22,20,N,7,2
^SCR("TLAS","P",15,"HELP")

^SCR("TLAS","P",15,"LMAX")
7
^SCR("TLAS","P",15,"MUMPS1")

^SCR("TLAS","P",15,"MUMPS2")

^SCR("TLAS","P",15,"OUTPUT")

^SCR("TLAS","P",15,"TYP")
N
^SCR("TLAS","P",20,"CRD")
22,4,N,8,2
^SCR("TLAS","P",20,"HELP")

^SCR("TLAS","P",20,"LMAX")
8
^SCR("TLAS","P",20,"MUMPS1")

^SCR("TLAS","P",20,"MUMPS2")

^SCR("TLAS","P",20,"OUTPUT")

^SCR("TLAS","P",20,"TYP")
N
^SCR("TLAS","P","NAME","KMTL")
10
^SCR("TLAS","P","NAME","SHTL")
15
^SCR("TLAS","P","NAME","SHTLAL")
20
^SCR("TLAS","P","NAME","TLUSH")
5
^SCR("TLAS","P","NM",5)
TLUSH
^SCR("TLAS","P","NM",10)
KMTL
^SCR("TLAS","P","NM",15)
SHTL
^SCR("TLAS","P","NM",20)
SHTLAL
^SCR("TSTCH")
H
^SCR("TSTCH","NAME")

^SCR("TZK")
H
^SCR("TZK",1)
                                                                               
^SCR("TZK",2)
                             {24{03    } {01       }                           
^SCR("TZK",3)
                                                                               
^SCR("TZK",4)
                                 {07           :gewl 'qn  {05        : jix`zl  
^SCR("TZK",5)
                    {                       08}: gewl my                       
^SCR("TZK",6)
                                                {10     }: zncew dxzi          
^SCR("TZK",7)
                                                                               
^SCR("TZK",8)
                                                                        1$     
^SCR("TZK",9)
    :  mekq  :                       x  e  `  z               :  mekq  :       
^SCR("TZK",10)
    :nrn llek:                                                :nrn `ll :       
^SCR("TZK",11)
                                                                               
^SCR("TZK",12)
                                                                               
^SCR("TZK",13)
                                                                               
^SCR("TZK",14)
                                                                               
^SCR("TZK",15)
                                                                               
^SCR("TZK",16)
                                                                               
^SCR("TZK",17)
   $1                                                                          
^SCR("TZK",18)
                                                     {15       }:    k"dq      
^SCR("TZK",19)
                                                     {18       }:     nrn      
^SCR("TZK",20)
                         {17      } : dxzi           {19       }:nrn llek      
^SCR("TZK",21)
         {                                                   20}:   drced      
^SCR("TZK","A",1)

^SCR("TZK","A",2)

^SCR("TZK","A",3)

^SCR("TZK","A",4)
:‡…—Œ'‘Ž:Š‰˜€šŒ
^SCR("TZK","A",5)
:‡…—Œ�™
^SCR("TZK","A",6)
:šŽƒ…—„˜š‰
^SCR("TZK","A",7)

^SCR("TZK","A",8)

^SCR("TZK","A",9)
�…‹‘˜…€š�…‹‘
^SCR("TZK","A",10)
Ž’ŽŒŒ…‹Ž’Ž€ŒŒ
^SCR("TZK","A",11)
----------------------------------------------------------------
^SCR("TZK","A",12)

^SCR("TZK","A",13)

^SCR("TZK","A",14)

^SCR("TZK","A",15)

^SCR("TZK","A",16)

^SCR("TZK","A",17)

^SCR("TZK","A",18)
:‹"„‘
^SCR("TZK","A",19)
:Ž’Ž
^SCR("TZK","A",20)
:„˜š‰:Ž’ŽŒŒ…‹
^SCR("TZK","A",21)
:„’ƒ…„
^SCR("TZK","AV",1)

^SCR("TZK","AV",2)

^SCR("TZK","AV",3)

^SCR("TZK","AV",4)
:juekwxn:lhrt,k
^SCR("TZK","AV",5)
:juekoa
^SCR("TZK","AV",6)
:,nsuevr,h
^SCR("TZK","AV",7)

^SCR("TZK","AV",8)

^SCR("TZK","AV",9)
oufxrut,oufx
^SCR("TZK","AV",10)
ngnkkufngntkk
^SCR("TZK","AV",11)
----------------------------------------------------------------
^SCR("TZK","AV",12)

^SCR("TZK","AV",13)

^SCR("TZK","AV",14)

^SCR("TZK","AV",15)

^SCR("TZK","AV",16)

^SCR("TZK","AV",17)

^SCR("TZK","AV",18)
:f"vx
^SCR("TZK","AV",19)
:ngn
^SCR("TZK","AV",20)
:vr,h:ngnkkuf
^SCR("TZK","AV",21)
:vgsuv
^SCR("TZK","G",1,"CRD")
10,71,E,8,0
^SCR("TZK","G",1,"HELP")

^SCR("TZK","G",1,"LMAX")
8
^SCR("TZK","G",1,"MUMPS1")

^SCR("TZK","G",1,"MUMPS2")
D SUM^KLTZ
^SCR("TZK","G",1,"SHEM")
  mekq  
^SCR("TZK","G",1,"TYP")
E
^SCR("TZK","G",2,"CRD")
10,62,H,47,0
^SCR("TZK","G",2,"HELP")

^SCR("TZK","G",2,"LMAX")
48
^SCR("TZK","G",2,"MUMPS1")

^SCR("TZK","G",2,"MUMPS2")

^SCR("TZK","G",2,"SHEM")
                       x  e  `  z               
^SCR("TZK","G",2,"TYP")
H
^SCR("TZK","G",3,"CRD")
10,13,E,8,0
^SCR("TZK","G",3,"HELP")

^SCR("TZK","G",3,"LMAX")
8
^SCR("TZK","G",3,"MUMPS1")

^SCR("TZK","G",3,"MUMPS2")
D SUMM^KLTZ
^SCR("TZK","G",3,"SHEM")
  mekq  
^SCR("TZK","G",3,"TYP")
E
^SCR("TZK","G","DEL")
Y
^SCR("TZK","G","MAX")
99999
^SCR("TZK","G","NAME","SUM")
1
^SCR("TZK","G","NAME","SUMM")
3
^SCR("TZK","G","NAME","T")
2
^SCR("TZK","G","NM",1)
SUM
^SCR("TZK","G","NM",2)
T
^SCR("TZK","G","NM",3)
SUMM
^SCR("TZK","G","RB")
9,4,18,74
^SCR("TZK","G","REF")
^MBG($P
^SCR("TZK","G","RZD")
\
^SCR("TZK","G","STEP")
1
^SCR("TZK","G","STG")
    :  mekq  :                       x  e  `  z               :  mekq  :       
^SCR("TZK","G","VG")
12
^SCR("TZK","NAME")
iekif zcerz
^SCR("TZK","P",1,"CRD")
2,41,E,10,0
^SCR("TZK","P",1,"HELP")

^SCR("TZK","P",1,"LMAX")
10
^SCR("TZK","P",1,"MUMPS1")

^SCR("TZK","P",1,"MUMPS2")

^SCR("TZK","P",1,"OUTPUT")

^SCR("TZK","P",1,"TYP")
E
^SCR("TZK","P",3,"CRD")
2,32,E,7,0
^SCR("TZK","P",3,"HELP")
<F7> - zencew zecerz zbvd , 0 - dycg zipeayg zwtdl   
^SCR("TZK","P",3,"LMAX")
7
^SCR("TZK","P",3,"MUMPS1")
S:'$G(NUMBER) NUMBER=0
^SCR("TZK","P",3,"MUMPS2")
D NUMBER^KLTZ
^SCR("TZK","P",3,"MUST")

^SCR("TZK","P",3,"TYP")
E
^SCR("TZK","P",5,"CRD")
4,58,D,8,0
^SCR("TZK","P",5,"HELP")

^SCR("TZK","P",5,"LMAX")
11
^SCR("TZK","P",5,"MUMPS1")
I '$G(DAT21) S DAT21=$$^%L1DC($H-1,1)
^SCR("TZK","P",5,"MUMPS2")
D DAT21^KLTZ
^SCR("TZK","P",5,"MUST")

^SCR("TZK","P",5,"TYP")
D
^SCR("TZK","P",7,"CHECK")
Y
^SCR("TZK","P",7,"CRD")
4,33,E,14,0
^SCR("TZK","P",7,"FNC")

^SCR("TZK","P",7,"GLOB")
LKH
^SCR("TZK","P",7,"HELP")

^SCR("TZK","P",7,"LMAX")
14
^SCR("TZK","P",7,"MUMPS1")

^SCR("TZK","P",7,"MUMPS2")
D STRING^KLTZ
^SCR("TZK","P",7,"MUST")

^SCR("TZK","P",7,"NLN")
20
^SCR("TZK","P",7,"RZD")
\
^SCR("TZK","P",7,"TOPB")
8
^SCR("TZK","P",7,"TYP")
E
^SCR("TZK","P",7,"VRB")
LKH1
^SCR("TZK","P",8,"CRD")
5,47,H,20
^SCR("TZK","P",8,"HELP")

^SCR("TZK","P",8,"LMAX")
26
^SCR("TZK","P",8,"MUMPS1")

^SCR("TZK","P",8,"MUMPS2")

^SCR("TZK","P",8,"OUTPUT")

^SCR("TZK","P",8,"TYP")
H
^SCR("TZK","P",10,"CRD")
6,48,N,8,2
^SCR("TZK","P",10,"HELP")

^SCR("TZK","P",10,"LMAX")
8
^SCR("TZK","P",10,"MUMPS1")

^SCR("TZK","P",10,"MUMPS2")

^SCR("TZK","P",10,"OUTPUT")

^SCR("TZK","P",10,"TYP")
N
^SCR("TZK","P",15,"CRD")
18,53,N,9,2
^SCR("TZK","P",15,"HELP")

^SCR("TZK","P",15,"LMAX")
10
^SCR("TZK","P",15,"MUMPS1")

^SCR("TZK","P",15,"MUMPS2")

^SCR("TZK","P",15,"OUTPUT")

^SCR("TZK","P",15,"TYP")
N
^SCR("TZK","P",17,"CRD")
20,25,N,9,2
^SCR("TZK","P",17,"HELP")

^SCR("TZK","P",17,"LMAX")
9
^SCR("TZK","P",17,"MUMPS1")

^SCR("TZK","P",17,"MUMPS2")

^SCR("TZK","P",17,"OUTPUT")

^SCR("TZK","P",17,"TYP")
N
^SCR("TZK","P",18,"CRD")
19,53,N,9,2
^SCR("TZK","P",18,"HELP")

^SCR("TZK","P",18,"LMAX")
10
^SCR("TZK","P",18,"MUMPS1")

^SCR("TZK","P",18,"MUMPS2")

^SCR("TZK","P",18,"OUTPUT")

^SCR("TZK","P",18,"TYP")
N
^SCR("TZK","P",19,"CRD")
20,53,N,9,2
^SCR("TZK","P",19,"HELP")

^SCR("TZK","P",19,"LMAX")
10
^SCR("TZK","P",19,"MUMPS1")

^SCR("TZK","P",19,"MUMPS2")

^SCR("TZK","P",19,"OUTPUT")

^SCR("TZK","P",19,"TYP")
N
^SCR("TZK","P",20,"CRD")
21,64,HH,50*2
^SCR("TZK","P",20,"HELP")

^SCR("TZK","P",20,"LMAX")
54
^SCR("TZK","P",20,"MUMPS1")

^SCR("TZK","P",20,"MUMPS2")

^SCR("TZK","P",20,"TYP")
HH
^SCR("TZK","P",24,"CRD")
2,29,E,3,0
^SCR("TZK","P",24,"HELP")

^SCR("TZK","P",24,"LMAX")
3
^SCR("TZK","P",24,"MUMPS1")

^SCR("TZK","P",24,"MUMPS2")

^SCR("TZK","P",24,"OUTPUT")

^SCR("TZK","P",24,"TYP")
E
^SCR("TZK","P","NAME","DAT21")
5
^SCR("TZK","P","NAME","ITRA")
17
^SCR("TZK","P","NAME","ITRA1")
10
^SCR("TZK","P","NAME","LKH1")
8
^SCR("TZK","P","NAME","MAM")
18
^SCR("TZK","P","NAME","NAMEDOC")
1
^SCR("TZK","P","NAME","NUMBER")
3
^SCR("TZK","P","NAME","PRATIM")
20
^SCR("TZK","P","NAME","SNIF")
24
^SCR("TZK","P","NAME","STRING")
7
^SCR("TZK","P","NAME","SUMTZ")
19
^SCR("TZK","P","NAME","SUMTZ1")
15
^SCR("TZK","P","NM",1)
NAMEDOC
^SCR("TZK","P","NM",3)
NUMBER
^SCR("TZK","P","NM",5)
DAT21
^SCR("TZK","P","NM",7)
STRING
^SCR("TZK","P","NM",8)
LKH1
^SCR("TZK","P","NM",10)
ITRA1
^SCR("TZK","P","NM",15)
SUMTZ1
^SCR("TZK","P","NM",17)
ITRA
^SCR("TZK","P","NM",18)
MAM
^SCR("TZK","P","NM",19)
SUMTZ
^SCR("TZK","P","NM",20)
PRATIM
^SCR("TZK","P","NM",24)
SNIF
^SCR("W3AZOR")
H
^SCR("W3AZOR",1)
                                                                               
^SCR("W3AZOR",2)
                                                  1$                           
^SCR("W3AZOR",3)
                             :       xef`      :                               
^SCR("W3AZOR",4)
                                                                               
^SCR("W3AZOR",5)
                                                                               
^SCR("W3AZOR",6)
                                                                               
^SCR("W3AZOR",7)
                                                                               
^SCR("W3AZOR",8)
                                                                               
^SCR("W3AZOR",9)
                                                                               
^SCR("W3AZOR",10)
                                                                               
^SCR("W3AZOR",11)
                                                                               
^SCR("W3AZOR",12)
                                                                               
^SCR("W3AZOR",13)
                                                                               
^SCR("W3AZOR",14)
                                                                               
^SCR("W3AZOR",15)
                                                                               
^SCR("W3AZOR",16)
                                                                               
^SCR("W3AZOR",17)
                                                                               
^SCR("W3AZOR",18)
                                                                               
^SCR("W3AZOR",19)
                                                                               
^SCR("W3AZOR",20)
                                                                               
^SCR("W3AZOR",21)
                                                                               
^SCR("W3AZOR",22)
                        $1                                                     
^SCR("W3AZOR","A",1)

^SCR("W3AZOR","A",2)

^SCR("W3AZOR","A",3)
˜…†€
^SCR("W3AZOR","A",4)
-----------------
^SCR("W3AZOR","A",5)

^SCR("W3AZOR","A",6)

^SCR("W3AZOR","A",7)

^SCR("W3AZOR","A",8)

^SCR("W3AZOR","A",9)

^SCR("W3AZOR","A",10)

^SCR("W3AZOR","A",11)

^SCR("W3AZOR","A",12)

^SCR("W3AZOR","A",13)

^SCR("W3AZOR","A",14)

^SCR("W3AZOR","A",15)

^SCR("W3AZOR","A",16)

^SCR("W3AZOR","A",17)

^SCR("W3AZOR","A",18)

^SCR("W3AZOR","A",19)

^SCR("W3AZOR","A",20)

^SCR("W3AZOR","A",21)

^SCR("W3AZOR","A",22)

^SCR("W3AZOR","AV",1)

^SCR("W3AZOR","AV",2)

^SCR("W3AZOR","AV",3)
ruzt
^SCR("W3AZOR","AV",4)
-----------------
^SCR("W3AZOR","AV",5)

^SCR("W3AZOR","AV",6)

^SCR("W3AZOR","AV",7)

^SCR("W3AZOR","AV",8)

^SCR("W3AZOR","AV",9)

^SCR("W3AZOR","AV",10)

^SCR("W3AZOR","AV",11)

^SCR("W3AZOR","AV",12)

^SCR("W3AZOR","AV",13)

^SCR("W3AZOR","AV",14)

^SCR("W3AZOR","AV",15)

^SCR("W3AZOR","AV",16)

^SCR("W3AZOR","AV",17)

^SCR("W3AZOR","AV",18)

^SCR("W3AZOR","AV",19)

^SCR("W3AZOR","AV",20)

^SCR("W3AZOR","AV",21)

^SCR("W3AZOR","AV",22)

^SCR("W3AZOR","G",1,"CRD")
4,47,H,16,0
^SCR("W3AZOR","G",1,"HELP")

^SCR("W3AZOR","G",1,"LMAX")
17
^SCR("W3AZOR","G",1,"MUMPS1")

^SCR("W3AZOR","G",1,"MUMPS2")

^SCR("W3AZOR","G",1,"SHEM")
       xef`      
^SCR("W3AZOR","G",1,"TYP")
H
^SCR("W3AZOR","G","DEL")
Y
^SCR("W3AZOR","G","MAX")
9999
^SCR("W3AZOR","G","NAME","AZOR")
1
^SCR("W3AZOR","G","NM",1)
AZOR
^SCR("W3AZOR","G","RB")
3,25,23,52
^SCR("W3AZOR","G","REF")
^TEMP(%L3MYDVN
^SCR("W3AZOR","G","RZD")
\
^SCR("W3AZOR","G","STEP")
1
^SCR("W3AZOR","G","STG")
                             :       xef`      :                               
^SCR("W3AZOR","G","VG")
5
^SCR("W3AZOR","NAME")

^SCR("W3CNTRY")
H
^SCR("W3CNTRY",1)
                                                                               
^SCR("W3CNTRY",2)
                                                  1$                           
^SCR("W3CNTRY",3)
                             :       xef`      :                               
^SCR("W3CNTRY",4)
                                                                               
^SCR("W3CNTRY",5)
                                                                               
^SCR("W3CNTRY",6)
                                                                               
^SCR("W3CNTRY",7)
                                                                               
^SCR("W3CNTRY",8)
                                                                               
^SCR("W3CNTRY",9)
                                                                               
^SCR("W3CNTRY",10)
                                                                               
^SCR("W3CNTRY",11)
                                                                               
^SCR("W3CNTRY",12)
                                                                               
^SCR("W3CNTRY",13)
                                                                               
^SCR("W3CNTRY",14)
                                                                               
^SCR("W3CNTRY",15)
                                                                               
^SCR("W3CNTRY",16)
                                                                               
^SCR("W3CNTRY",17)
                                                                               
^SCR("W3CNTRY",18)
                                                                               
^SCR("W3CNTRY",19)
                                                                               
^SCR("W3CNTRY",20)
                                                                               
^SCR("W3CNTRY",21)
                                                                               
^SCR("W3CNTRY",22)
                        $1                                                     
^SCR("W3CNTRY","A",1)

^SCR("W3CNTRY","A",2)

^SCR("W3CNTRY","A",3)
˜…†€
^SCR("W3CNTRY","A",4)
-----------------
^SCR("W3CNTRY","A",5)

^SCR("W3CNTRY","A",6)

^SCR("W3CNTRY","A",7)

^SCR("W3CNTRY","A",8)

^SCR("W3CNTRY","A",9)

^SCR("W3CNTRY","A",10)

^SCR("W3CNTRY","A",11)

^SCR("W3CNTRY","A",12)

^SCR("W3CNTRY","A",13)

^SCR("W3CNTRY","A",14)

^SCR("W3CNTRY","A",15)

^SCR("W3CNTRY","A",16)

^SCR("W3CNTRY","A",17)

^SCR("W3CNTRY","A",18)

^SCR("W3CNTRY","A",19)

^SCR("W3CNTRY","A",20)

^SCR("W3CNTRY","A",21)

^SCR("W3CNTRY","A",22)

^SCR("W3CNTRY","AV",1)

^SCR("W3CNTRY","AV",2)

^SCR("W3CNTRY","AV",3)
ruzt
^SCR("W3CNTRY","AV",4)
-----------------
^SCR("W3CNTRY","AV",5)

^SCR("W3CNTRY","AV",6)

^SCR("W3CNTRY","AV",7)

^SCR("W3CNTRY","AV",8)

^SCR("W3CNTRY","AV",9)

^SCR("W3CNTRY","AV",10)

^SCR("W3CNTRY","AV",11)

^SCR("W3CNTRY","AV",12)

^SCR("W3CNTRY","AV",13)

^SCR("W3CNTRY","AV",14)

^SCR("W3CNTRY","AV",15)

^SCR("W3CNTRY","AV",16)

^SCR("W3CNTRY","AV",17)

^SCR("W3CNTRY","AV",18)

^SCR("W3CNTRY","AV",19)

^SCR("W3CNTRY","AV",20)

^SCR("W3CNTRY","AV",21)

^SCR("W3CNTRY","AV",22)

^SCR("W3CNTRY","G",1,"CRD")
4,47,H,16,0
^SCR("W3CNTRY","G",1,"HELP")

^SCR("W3CNTRY","G",1,"LMAX")
17
^SCR("W3CNTRY","G",1,"MUMPS1")

^SCR("W3CNTRY","G",1,"MUMPS2")

^SCR("W3CNTRY","G",1,"SHEM")
       xef`      
^SCR("W3CNTRY","G",1,"TYP")
H
^SCR("W3CNTRY","G","DEL")
Y
^SCR("W3CNTRY","G","MAX")
9999
^SCR("W3CNTRY","G","NAME","AZOR")
1
^SCR("W3CNTRY","G","NM",1)
AZOR
^SCR("W3CNTRY","G","RB")
3,25,23,52
^SCR("W3CNTRY","G","REF")
^TEMP(%L3MYDVN
^SCR("W3CNTRY","G","RZD")
\
^SCR("W3CNTRY","G","STEP")
1
^SCR("W3CNTRY","G","STG")
                             :       xef`      :                               
^SCR("W3CNTRY","G","VG")
5
^SCR("W3CNTRY","NAME")

^SCR("W3COLOR")
H
^SCR("W3COLOR",1)
                           {                            03} {02 } : aevir cew  
^SCR("W3COLOR",2)
       {04                                             }: ( mitcd lka ) hpet   
^SCR("W3COLOR",3)
                                      {05 }:(`l-2,ok- 1) miniixtd oia zeleab   
^SCR("W3COLOR",4)
                            {10              }:             oeil` wlg ly rwx   
^SCR("W3COLOR",5)
                            {17              }:(mikqnd lk) INPUT zecy ly rwx   
^SCR("W3COLOR",6)
                     {18              }:(mikqnd lk) INPUT zecy ly zeize` rav   
^SCR("W3COLOR",7)
                       {20              }:  'ynzyn cew' dl`y ly dpenz e` rav   
^SCR("W3COLOR",8)
                       {22              }:      'dnqiq' dl`y ly dpenz e` rav   
^SCR("W3COLOR",9)
                            {25              }:       'dnqiq izgky' hqwh rav   
^SCR("W3COLOR",10)
                            {27              }:'ize` xekf' dpenz e` hqwh rav   
^SCR("W3COLOR",11)
                            {29              }:         dcrqn my ly hqwh rav   
^SCR("W3COLOR",12)
                            {30              }: 'hixt ytg' dpenz e` hqwh rav   
^SCR("W3COLOR",13)
                            {35              }: '`ad jexa' dpenz e` hqwh rav   
^SCR("W3COLOR",14)
                            {40              }: 'o`k ugl meyx gewl' hqwh rav   
^SCR("W3COLOR",15)
                            {45              }:       oetlh 'qn dpenz e` rav   
^SCR("W3COLOR",16)
                                       {50 }:(1-xegy, 0-oal) oetlh zpenz rav   
^SCR("W3COLOR",17)
                          {60              }:               'xy`' ywnl dpenz   
^SCR("W3COLOR",18)
                          {62              }:             'myxdl' ywnl dpenz   
^SCR("W3COLOR",19)
                            {65              }:             'ytg' ywnl dpenz   
^SCR("W3COLOR",20)
                            {70              }:                  ebell dpenz   
^SCR("W3COLOR","AV",1)
:cumhgsue
^SCR("W3COLOR","AV",2)
:(ohpsvkfc)ybup
^SCR("W3COLOR","AV",3)
:(tk-2'if-1)ohnhhrpvihc,ukucd
^SCR("W3COLOR","AV",4)
:iuhktekjkager
^SCR("W3COLOR","AV",5)
:(ohfxnvkf)INPUT,usakager
^SCR("W3COLOR","AV",6)
:(ohfxnvkf)INPUT,usaka,uh,utgcm
^SCR("W3COLOR","AV",7)
:wan,ansuewvktakavbun,utgcm
^SCR("W3COLOR","AV",8)
:wvnxhxwvktakavbun,utgcm
^SCR("W3COLOR","AV",9)
:wvnxhxh,jfawyxeygcm
^SCR("W3COLOR","AV",10)
:wh,utrufzwvbun,utyxeygcm
^SCR("W3COLOR","AV",11)
:vsgxnoakayxeygcm
^SCR("W3COLOR","AV",12)
:wyhrpapjwvbun,utyxeygcm
^SCR("W3COLOR","AV",13)
:wtcvlurcwvbun,utyxeygcm
^SCR("W3COLOR","AV",14)
:witf•jkouarjuekwyxeygcm
^SCR("W3COLOR","AV",15)
:iupkywxnvbun,utgcm
^SCR("W3COLOR","AV",16)
:(1-ruja'0-ick)iupky,bun,gcm
^SCR("W3COLOR","AV",17)
:wratwaenkvbun,
^SCR("W3COLOR","AV",18)
:woarvkwaenkvbun,
^SCR("W3COLOR","AV",19)
:wapjwaenkvbun,
^SCR("W3COLOR","AV",20)
:udukkvbun,
^SCR("W3COLOR","NAME")

^SCR("W3COLOR","P",2,"CRD")
1,60,E,4,0
^SCR("W3COLOR","P",2,"FNC")

^SCR("W3COLOR","P",2,"GLOB")
^W3COLOR
^SCR("W3COLOR","P",2,"HELP")

^SCR("W3COLOR","P",2,"LMAX")
4
^SCR("W3COLOR","P",2,"MUMPS1")

^SCR("W3COLOR","P",2,"MUMPS2")

^SCR("W3COLOR","P",2,"MUST")

^SCR("W3COLOR","P",2,"NLN")
20
^SCR("W3COLOR","P",2,"RZD")
\
^SCR("W3COLOR","P",2,"TOPB")
8
^SCR("W3COLOR","P",2,"TYP")
E
^SCR("W3COLOR","P",2,"VRB")
CL1
^SCR("W3COLOR","P",3,"CRD")
1,59,H,31
^SCR("W3COLOR","P",3,"HELP")

^SCR("W3COLOR","P",3,"LMAX")
31
^SCR("W3COLOR","P",3,"MUMPS1")

^SCR("W3COLOR","P",3,"MUMPS2")

^SCR("W3COLOR","P",3,"TYP")
H
^SCR("W3COLOR","P",4,"CRD")
2,7,E,48,0
^SCR("W3COLOR","P",4,"HELP")

^SCR("W3COLOR","P",4,"LMAX")
48
^SCR("W3COLOR","P",4,"MUMPS1")

^SCR("W3COLOR","P",4,"MUMPS2")

^SCR("W3COLOR","P",4,"TYP")
E
^SCR("W3COLOR","P",5,"CRD")
3,38,B,1,0
^SCR("W3COLOR","P",5,"HELP")

^SCR("W3COLOR","P",5,"LMAX")
4
^SCR("W3COLOR","P",5,"MUMPS1")

^SCR("W3COLOR","P",5,"MUMPS2")

^SCR("W3COLOR","P",5,"MUST")

^SCR("W3COLOR","P",5,"TYP")
B
^SCR("W3COLOR","P",10,"CRD")
4,28,E,17,0
^SCR("W3COLOR","P",10,"HELP")

^SCR("W3COLOR","P",10,"LMAX")
17
^SCR("W3COLOR","P",10,"MUMPS1")

^SCR("W3COLOR","P",10,"MUMPS2")

^SCR("W3COLOR","P",10,"TYP")
E
^SCR("W3COLOR","P",17,"CRD")
5,28,E,17,0
^SCR("W3COLOR","P",17,"HELP")

^SCR("W3COLOR","P",17,"LMAX")
17
^SCR("W3COLOR","P",17,"MUMPS1")

^SCR("W3COLOR","P",17,"MUMPS2")

^SCR("W3COLOR","P",17,"TYP")
E
^SCR("W3COLOR","P",18,"CRD")
6,21,E,17,0
^SCR("W3COLOR","P",18,"HELP")

^SCR("W3COLOR","P",18,"LMAX")
17
^SCR("W3COLOR","P",18,"MUMPS1")

^SCR("W3COLOR","P",18,"MUMPS2")

^SCR("W3COLOR","P",18,"TYP")
E
^SCR("W3COLOR","P",20,"CRD")
7,23,E,17,0
^SCR("W3COLOR","P",20,"HELP")

^SCR("W3COLOR","P",20,"LMAX")
17
^SCR("W3COLOR","P",20,"MUMPS1")

^SCR("W3COLOR","P",20,"MUMPS2")

^SCR("W3COLOR","P",20,"TYP")
E
^SCR("W3COLOR","P",22,"CRD")
8,23,E,17,0
^SCR("W3COLOR","P",22,"HELP")

^SCR("W3COLOR","P",22,"LMAX")
17
^SCR("W3COLOR","P",22,"MUMPS1")

^SCR("W3COLOR","P",22,"MUMPS2")

^SCR("W3COLOR","P",22,"TYP")
E
^SCR("W3COLOR","P",25,"CRD")
9,28,E,17,0
^SCR("W3COLOR","P",25,"HELP")

^SCR("W3COLOR","P",25,"LMAX")
17
^SCR("W3COLOR","P",25,"MUMPS1")

^SCR("W3COLOR","P",25,"MUMPS2")

^SCR("W3COLOR","P",25,"TYP")
E
^SCR("W3COLOR","P",27,"CRD")
10,28,E,17,0
^SCR("W3COLOR","P",27,"HELP")

^SCR("W3COLOR","P",27,"LMAX")
17
^SCR("W3COLOR","P",27,"MUMPS1")

^SCR("W3COLOR","P",27,"MUMPS2")

^SCR("W3COLOR","P",27,"TYP")
E
^SCR("W3COLOR","P",29,"CRD")
11,28,E,17,0
^SCR("W3COLOR","P",29,"HELP")

^SCR("W3COLOR","P",29,"LMAX")
17
^SCR("W3COLOR","P",29,"MUMPS1")

^SCR("W3COLOR","P",29,"MUMPS2")

^SCR("W3COLOR","P",29,"TYP")
E
^SCR("W3COLOR","P",30,"CRD")
12,28,E,17,0
^SCR("W3COLOR","P",30,"HELP")

^SCR("W3COLOR","P",30,"LMAX")
17
^SCR("W3COLOR","P",30,"MUMPS1")

^SCR("W3COLOR","P",30,"MUMPS2")

^SCR("W3COLOR","P",30,"TYP")
E
^SCR("W3COLOR","P",35,"CRD")
13,28,E,17,0
^SCR("W3COLOR","P",35,"HELP")

^SCR("W3COLOR","P",35,"LMAX")
17
^SCR("W3COLOR","P",35,"MUMPS1")

^SCR("W3COLOR","P",35,"MUMPS2")

^SCR("W3COLOR","P",35,"TYP")
E
^SCR("W3COLOR","P",40,"CRD")
14,28,E,17,0
^SCR("W3COLOR","P",40,"HELP")

^SCR("W3COLOR","P",40,"LMAX")
17
^SCR("W3COLOR","P",40,"MUMPS1")

^SCR("W3COLOR","P",40,"MUMPS2")

^SCR("W3COLOR","P",40,"TYP")
E
^SCR("W3COLOR","P",45,"CRD")
15,28,E,17,0
^SCR("W3COLOR","P",45,"HELP")

^SCR("W3COLOR","P",45,"LMAX")
17
^SCR("W3COLOR","P",45,"MUMPS1")

^SCR("W3COLOR","P",45,"MUMPS2")

^SCR("W3COLOR","P",45,"TYP")
E
^SCR("W3COLOR","P",50,"CRD")
16,39,N,1,0
^SCR("W3COLOR","P",50,"HELP")

^SCR("W3COLOR","P",50,"LMAX")
4
^SCR("W3COLOR","P",50,"MUMPS1")

^SCR("W3COLOR","P",50,"MUMPS2")

^SCR("W3COLOR","P",50,"TYP")
N
^SCR("W3COLOR","P",60,"CRD")
17,26,E,17,0
^SCR("W3COLOR","P",60,"HELP")

^SCR("W3COLOR","P",60,"LMAX")
17
^SCR("W3COLOR","P",60,"MUMPS1")

^SCR("W3COLOR","P",60,"MUMPS2")

^SCR("W3COLOR","P",60,"TYP")
E
^SCR("W3COLOR","P",62,"CRD")
18,26,E,17,0
^SCR("W3COLOR","P",62,"HELP")

^SCR("W3COLOR","P",62,"LMAX")
17
^SCR("W3COLOR","P",62,"MUMPS1")

^SCR("W3COLOR","P",62,"MUMPS2")

^SCR("W3COLOR","P",62,"TYP")
E
^SCR("W3COLOR","P",65,"CRD")
19,28,E,17,0
^SCR("W3COLOR","P",65,"HELP")

^SCR("W3COLOR","P",65,"LMAX")
17
^SCR("W3COLOR","P",65,"MUMPS1")

^SCR("W3COLOR","P",65,"MUMPS2")

^SCR("W3COLOR","P",65,"TYP")
E
^SCR("W3COLOR","P",70,"CRD")
20,28,E,17,0
^SCR("W3COLOR","P",70,"HELP")

^SCR("W3COLOR","P",70,"LMAX")
17
^SCR("W3COLOR","P",70,"MUMPS1")

^SCR("W3COLOR","P",70,"MUMPS2")

^SCR("W3COLOR","P",70,"TYP")
E
^SCR("W3COLOR","P","NAME","BGHDORD")
10
^SCR("W3COLOR","P","NAME","BGINP")
17
^SCR("W3COLOR","P","NAME","BORD")
5
^SCR("W3COLOR","P","NAME","CL")
2
^SCR("W3COLOR","P","NAME","CL1")
3
^SCR("W3COLOR","P","NAME","FGNAME")
29
^SCR("W3COLOR","P","NAME","FGPHONE")
45
^SCR("W3COLOR","P","NAME","FGSC")
30
^SCR("W3COLOR","P","NAME","FONTFM")
4
^SCR("W3COLOR","P","NAME","FORGPSW")
25
^SCR("W3COLOR","P","NAME","FRINP")
18
^SCR("W3COLOR","P","NAME","LOGO")
70
^SCR("W3COLOR","P","NAME","MEMBHERE")
40
^SCR("W3COLOR","P","NAME","PHONEIMG")
50
^SCR("W3COLOR","P","NAME","PSWCOLOR")
22
^SCR("W3COLOR","P","NAME","RMBME")
27
^SCR("W3COLOR","P","NAME","SIGNBTN")
62
^SCR("W3COLOR","P","NAME","SRCHBTN")
65
^SCR("W3COLOR","P","NAME","SUBMBTN")
60
^SCR("W3COLOR","P","NAME","USRCOLOR")
20
^SCR("W3COLOR","P","NAME","WELCOME")
35
^SCR("W3COLOR","P","NM",2)
CL
^SCR("W3COLOR","P","NM",3)
CL1
^SCR("W3COLOR","P","NM",4)
FONTFM
^SCR("W3COLOR","P","NM",5)
BORD
^SCR("W3COLOR","P","NM",10)
BGHDORD
^SCR("W3COLOR","P","NM",17)
BGINP
^SCR("W3COLOR","P","NM",18)
FRINP
^SCR("W3COLOR","P","NM",20)
USRCOLOR
^SCR("W3COLOR","P","NM",22)
PSWCOLOR
^SCR("W3COLOR","P","NM",25)
FORGPSW
^SCR("W3COLOR","P","NM",27)
RMBME
^SCR("W3COLOR","P","NM",29)
FGNAME
^SCR("W3COLOR","P","NM",30)
FGSC
^SCR("W3COLOR","P","NM",35)
WELCOME
^SCR("W3COLOR","P","NM",40)
MEMBHERE
^SCR("W3COLOR","P","NM",45)
FGPHONE
^SCR("W3COLOR","P","NM",50)
PHONEIMG
^SCR("W3COLOR","P","NM",60)
SUBMBTN
^SCR("W3COLOR","P","NM",62)
SIGNBTN
^SCR("W3COLOR","P","NM",65)
SRCHBTN
^SCR("W3COLOR","P","NM",70)
LOGO
^SCR("W3COLORA")
H
^SCR("W3COLORA",1)
                           {                            03} {02 } : aevir cew  
^SCR("W3COLORA",2)
                                                                               
^SCR("W3COLORA",3)
                            {10              }:                zetqez ly rwx   
^SCR("W3COLORA",4)
                            {15              }:                zetqez ly rav   
^SCR("W3COLORA",5)
                            {20              }:            zexgap zetqez rav   
^SCR("W3COLORA",6)
                            {21              }:      BOLD-a zetqez bivdl m`d   
^SCR("W3COLORA",7)
                            {22              }:   'hixtl zetqez' hqwh ly rav   
^SCR("W3COLORA",8)
                            {24              }:             iy`x hixt ly rwx   
^SCR("W3COLORA",9)
                            {26              }:             iy`x hixt ly rav   
^SCR("W3COLORA",10)
                            {30              }:           mihq zexzek ly rav   
^SCR("W3COLORA",11)
                            {45              }:            ztqez xign ly rav   
^SCR("W3COLORA",12)
                            {47              }:        'mibeq X cr' hqwh rav   
^SCR("W3COLORA",13)
                            {48              }:              zetqez k"dq rav   
^SCR("W3COLORA",14)
                            {50              }:                 '+' oniq rav   
^SCR("W3COLORA",15)
                            {52              }:                 '-' oniq rav   
^SCR("W3COLORA",16)
                            {55              }:     hixt jqn mr dcxtd ew rav   
^SCR("W3COLORA",17)
                                                                               
^SCR("W3COLORA","A",1)
:�…–‰’ƒ…—
^SCR("W3COLORA","A",2)

^SCR("W3COLORA","A",3)
:š…”‘…šŒ™’—˜
^SCR("W3COLORA","A",4)
:š…”‘…šŒ™’�–
^SCR("W3COLORA","A",5)
:š…˜‡��š…”‘…š’�–
^SCR("W3COLORA","A",6)
:BOLD-�š…”‘…š‚‰–„Œ�€„
^SCR("W3COLORA","A",7)
:'ˆ‰˜”Œš…”‘…š'ˆ‘—ˆŒ™’�–
^SCR("W3COLORA","A",8)
:‰™€˜ˆ‰˜”Œ™’—˜
^SCR("W3COLORA","A",9)
:‰™€˜ˆ‰˜”Œ™’�–
^SCR("W3COLORA","A",10)
:�‰ˆ‘š…˜š…‹Œ™’�–
^SCR("W3COLORA","A",11)
:š”‘…š˜‰‡ŽŒ™’�–
^SCR("W3COLORA","A",12)
:'�‰‚…‘Xƒ’'ˆ‘—ˆ’�–
^SCR("W3COLORA","A",13)
:š…”‘…š‹"„‘’�–
^SCR("W3COLORA","A",14)
:'+'�Ž‰‘’�–
^SCR("W3COLORA","A",15)
:'-'�Ž‰‘’�–
^SCR("W3COLORA","A",16)
:ˆ‰˜”Š‘Ž�’„ƒ˜”„…—’�–
^SCR("W3COLORA","A",17)

^SCR("W3COLORA","AV",1)
:cumhgsue
^SCR("W3COLORA","AV",2)

^SCR("W3COLORA","AV",3)
:,upxu,kager
^SCR("W3COLORA","AV",4)
:,upxu,kagcm
^SCR("W3COLORA","AV",5)
:,urjcb,upxu,gcm
^SCR("W3COLORA","AV",6)
:BOLD-c,upxu,dhmvkotv
^SCR("W3COLORA","AV",7)
:wyhrpk,upxu,wyxeykagcm
^SCR("W3COLORA","AV",8)
:hatryhrpkager
^SCR("W3COLORA","AV",9)
:hatryhrpkagcm
^SCR("W3COLORA","AV",10)
:ohyx,ur,ufkagcm
^SCR("W3COLORA","AV",11)
:,pxu,rhjnkagcm
^SCR("W3COLORA","AV",12)
:wohduxXsgwyxeygcm
^SCR("W3COLORA","AV",13)
:,upxu,f"vxgcm
^SCR("W3COLORA","AV",14)
:w+winhxgcm
^SCR("W3COLORA","AV",15)
:w-winhxgcm
^SCR("W3COLORA","AV",16)
:yhrplxnogvsrpvuegcm
^SCR("W3COLORA","AV",17)

^SCR("W3COLORA","NAME")

^SCR("W3COLORA","P",2,"CRD")
1,60,E,3,0
^SCR("W3COLORA","P",2,"FNC")

^SCR("W3COLORA","P",2,"GLOB")
^W3COLOR
^SCR("W3COLORA","P",2,"HELP")

^SCR("W3COLORA","P",2,"LMAX")
4
^SCR("W3COLORA","P",2,"MUMPS1")

^SCR("W3COLORA","P",2,"MUMPS2")

^SCR("W3COLORA","P",2,"MUST")

^SCR("W3COLORA","P",2,"NLN")
20
^SCR("W3COLORA","P",2,"RZD")
\
^SCR("W3COLORA","P",2,"TOPB")
8
^SCR("W3COLORA","P",2,"TYP")
E
^SCR("W3COLORA","P",2,"VRB")
CL1
^SCR("W3COLORA","P",3,"CRD")
1,59,H,31
^SCR("W3COLORA","P",3,"HELP")

^SCR("W3COLORA","P",3,"LMAX")
31
^SCR("W3COLORA","P",3,"MUMPS1")

^SCR("W3COLORA","P",3,"MUMPS2")

^SCR("W3COLORA","P",3,"TYP")
H
^SCR("W3COLORA","P",10,"CRD")
3,28,E,17,0
^SCR("W3COLORA","P",10,"HELP")

^SCR("W3COLORA","P",10,"LMAX")
17
^SCR("W3COLORA","P",10,"MUMPS1")

^SCR("W3COLORA","P",10,"MUMPS2")

^SCR("W3COLORA","P",10,"TYP")
E
^SCR("W3COLORA","P",15,"CRD")
4,28,E,17,0
^SCR("W3COLORA","P",15,"HELP")

^SCR("W3COLORA","P",15,"LMAX")
17
^SCR("W3COLORA","P",15,"MUMPS1")

^SCR("W3COLORA","P",15,"MUMPS2")

^SCR("W3COLORA","P",15,"TYP")
E
^SCR("W3COLORA","P",20,"CRD")
5,28,E,17,0
^SCR("W3COLORA","P",20,"HELP")

^SCR("W3COLORA","P",20,"LMAX")
17
^SCR("W3COLORA","P",20,"MUMPS1")

^SCR("W3COLORA","P",20,"MUMPS2")

^SCR("W3COLORA","P",20,"TYP")
E
^SCR("W3COLORA","P",21,"CRD")
6,28,B,1,0
^SCR("W3COLORA","P",21,"HELP")

^SCR("W3COLORA","P",21,"LMAX")
17
^SCR("W3COLORA","P",21,"MUMPS1")

^SCR("W3COLORA","P",21,"MUMPS2")

^SCR("W3COLORA","P",21,"TYP")
B
^SCR("W3COLORA","P",22,"CRD")
7,28,E,17,0
^SCR("W3COLORA","P",22,"HELP")

^SCR("W3COLORA","P",22,"LMAX")
17
^SCR("W3COLORA","P",22,"MUMPS1")

^SCR("W3COLORA","P",22,"MUMPS2")

^SCR("W3COLORA","P",22,"TYP")
E
^SCR("W3COLORA","P",24,"CRD")
8,28,E,17,0
^SCR("W3COLORA","P",24,"HELP")

^SCR("W3COLORA","P",24,"LMAX")
17
^SCR("W3COLORA","P",24,"MUMPS1")

^SCR("W3COLORA","P",24,"MUMPS2")

^SCR("W3COLORA","P",24,"TYP")
E
^SCR("W3COLORA","P",26,"CRD")
9,28,E,17,0
^SCR("W3COLORA","P",26,"HELP")

^SCR("W3COLORA","P",26,"LMAX")
17
^SCR("W3COLORA","P",26,"MUMPS1")

^SCR("W3COLORA","P",26,"MUMPS2")

^SCR("W3COLORA","P",26,"TYP")
E
^SCR("W3COLORA","P",30,"CRD")
10,28,E,17,0
^SCR("W3COLORA","P",30,"HELP")

^SCR("W3COLORA","P",30,"LMAX")
17
^SCR("W3COLORA","P",30,"MUMPS1")

^SCR("W3COLORA","P",30,"MUMPS2")

^SCR("W3COLORA","P",30,"TYP")
E
^SCR("W3COLORA","P",45,"CRD")
11,28,E,17,0
^SCR("W3COLORA","P",45,"HELP")

^SCR("W3COLORA","P",45,"LMAX")
17
^SCR("W3COLORA","P",45,"MUMPS1")

^SCR("W3COLORA","P",45,"MUMPS2")

^SCR("W3COLORA","P",45,"TYP")
E
^SCR("W3COLORA","P",47,"CRD")
12,28,E,17,0
^SCR("W3COLORA","P",47,"HELP")

^SCR("W3COLORA","P",47,"LMAX")
17
^SCR("W3COLORA","P",47,"MUMPS1")

^SCR("W3COLORA","P",47,"MUMPS2")

^SCR("W3COLORA","P",47,"TYP")
E
^SCR("W3COLORA","P",48,"CRD")
13,28,E,17,0
^SCR("W3COLORA","P",48,"HELP")

^SCR("W3COLORA","P",48,"LMAX")
17
^SCR("W3COLORA","P",48,"MUMPS1")

^SCR("W3COLORA","P",48,"MUMPS2")

^SCR("W3COLORA","P",48,"TYP")
E
^SCR("W3COLORA","P",50,"CRD")
14,28,E,17,0
^SCR("W3COLORA","P",50,"HELP")

^SCR("W3COLORA","P",50,"LMAX")
17
^SCR("W3COLORA","P",50,"MUMPS1")

^SCR("W3COLORA","P",50,"MUMPS2")

^SCR("W3COLORA","P",50,"TYP")
E
^SCR("W3COLORA","P",52,"CRD")
15,28,E,17,0
^SCR("W3COLORA","P",52,"HELP")

^SCR("W3COLORA","P",52,"LMAX")
17
^SCR("W3COLORA","P",52,"MUMPS1")

^SCR("W3COLORA","P",52,"MUMPS2")

^SCR("W3COLORA","P",52,"TYP")
E
^SCR("W3COLORA","P",55,"CRD")
16,28,E,17,0
^SCR("W3COLORA","P",55,"HELP")

^SCR("W3COLORA","P",55,"LMAX")
17
^SCR("W3COLORA","P",55,"MUMPS1")

^SCR("W3COLORA","P",55,"MUMPS2")

^SCR("W3COLORA","P",55,"TYP")
E
^SCR("W3COLORA","P","NAME","ADDBOLD")
21
^SCR("W3COLORA","P","NAME","BGADD")
10
^SCR("W3COLORA","P","NAME","BGADDIT")
24
^SCR("W3COLORA","P","NAME","CL")
2
^SCR("W3COLORA","P","NAME","CL1")
3
^SCR("W3COLORA","P","NAME","CLKAVADD")
55
^SCR("W3COLORA","P","NAME","FGADD")
15
^SCR("W3COLORA","P","NAME","FGADDCHS")
20
^SCR("W3COLORA","P","NAME","FGADDIT")
26
^SCR("W3COLORA","P","NAME","FGADDTO")
22
^SCR("W3COLORA","P","NAME","FGHDADD")
30
^SCR("W3COLORA","P","NAME","FGMAXADD")
47
^SCR("W3COLORA","P","NAME","FGMHADD")
45
^SCR("W3COLORA","P","NAME","FGMIN")
52
^SCR("W3COLORA","P","NAME","FGPLUS")
50
^SCR("W3COLORA","P","NAME","FGTOTADD")
48
^SCR("W3COLORA","P","NM",2)
CL
^SCR("W3COLORA","P","NM",3)
CL1
^SCR("W3COLORA","P","NM",10)
BGADD
^SCR("W3COLORA","P","NM",15)
FGADD
^SCR("W3COLORA","P","NM",20)
FGADDCHS
^SCR("W3COLORA","P","NM",21)
ADDBOLD
^SCR("W3COLORA","P","NM",22)
FGADDTO
^SCR("W3COLORA","P","NM",24)
BGADDIT
^SCR("W3COLORA","P","NM",26)
FGADDIT
^SCR("W3COLORA","P","NM",30)
FGHDADD
^SCR("W3COLORA","P","NM",45)
FGMHADD
^SCR("W3COLORA","P","NM",47)
FGMAXADD
^SCR("W3COLORA","P","NM",48)
FGTOTADD
^SCR("W3COLORA","P","NM",50)
FGPLUS
^SCR("W3COLORA","P","NM",52)
FGMIN
^SCR("W3COLORA","P","NM",55)
CLKAVADD
^SCR("W3COLORB")
H
^SCR("W3COLORB",1)
                           {                            03} {02 } : aevir cew  
^SCR("W3COLORB",2)
                                                                               
^SCR("W3COLORB",3)
                            {10              }:             oezgz wlg ly rwx   
^SCR("W3COLORB",4)
                            {15              }:     oezgz wlga zeize` ly rav   
^SCR("W3COLORB",5)
                            {20              }: 'iy`x scl' dpenz e` hqwh rav   
^SCR("W3COLORB",6)
                            {25              }:'gelyn inc' dpenz e` hqwh rav   
^SCR("W3COLORB",7)
                            {30              }:     'dgpd' dpenz e` hqwh rav   
^SCR("W3COLORB",8)
                            {35              }:   'melyzl' dpenz e` hqwh rav   
^SCR("W3COLORB",9)
                            {40              }:        'dpnfd jynd' -l dpenz   
^SCR("W3COLORB","A",1)
:�…–‰’ƒ…—
^SCR("W3COLORB","A",2)

^SCR("W3COLORB","A",3)
:�…š‡š—Œ‡Œ™’—˜
^SCR("W3COLORB","A",4)
:�…š‡š—Œ‡�š…‰š…€Œ™’�–
^SCR("W3COLORB","A",5)
:'‰™€˜“ƒŒ'„�…Žš…€ˆ‘—ˆ’�–
^SCR("W3COLORB","A",6)
:'‡…Œ™Ž‰Žƒ'„�…Žš…€ˆ‘—ˆ’�–
^SCR("W3COLORB","A",7)
:'„‡�„'„�…Žš…€ˆ‘—ˆ’�–
^SCR("W3COLORB","A",8)
:'�…Œ™šŒ'„�…Žš…€ˆ‘—ˆ’�–
^SCR("W3COLORB","A",9)
:'„�Ž†„Š™Ž„'-Œ„�…Žš
^SCR("W3COLORB","AV",1)
:cumhgsue
^SCR("W3COLORB","AV",2)

^SCR("W3COLORB","AV",3)
:iu,j,ekjkager
^SCR("W3COLORB","AV",4)
:iu,j,ekjc,uh,utkagcm
^SCR("W3COLORB","AV",5)
:whatr;skwvbun,utyxeygcm
^SCR("W3COLORB","AV",6)
:wjukanhnswvbun,utyxeygcm
^SCR("W3COLORB","AV",7)
:wvjbvwvbun,utyxeygcm
^SCR("W3COLORB","AV",8)
:wouka,kwvbun,utyxeygcm
^SCR("W3COLORB","AV",9)
:wvbnzvlanvw-kvbun,
^SCR("W3COLORB","NAME")

^SCR("W3COLORB","P",2,"CRD")
1,60,E,3,0
^SCR("W3COLORB","P",2,"FNC")

^SCR("W3COLORB","P",2,"GLOB")
^W3COLOR
^SCR("W3COLORB","P",2,"HELP")

^SCR("W3COLORB","P",2,"LMAX")
4
^SCR("W3COLORB","P",2,"MUMPS1")

^SCR("W3COLORB","P",2,"MUMPS2")

^SCR("W3COLORB","P",2,"MUST")

^SCR("W3COLORB","P",2,"NLN")
20
^SCR("W3COLORB","P",2,"RZD")
\
^SCR("W3COLORB","P",2,"TOPB")
8
^SCR("W3COLORB","P",2,"TYP")
E
^SCR("W3COLORB","P",2,"VRB")
CL1
^SCR("W3COLORB","P",3,"CRD")
1,59,H,31
^SCR("W3COLORB","P",3,"HELP")

^SCR("W3COLORB","P",3,"LMAX")
31
^SCR("W3COLORB","P",3,"MUMPS1")

^SCR("W3COLORB","P",3,"MUMPS2")

^SCR("W3COLORB","P",3,"TYP")
H
^SCR("W3COLORB","P",10,"CRD")
3,28,E,17,0
^SCR("W3COLORB","P",10,"HELP")

^SCR("W3COLORB","P",10,"LMAX")
17
^SCR("W3COLORB","P",10,"MUMPS1")

^SCR("W3COLORB","P",10,"MUMPS2")

^SCR("W3COLORB","P",10,"TYP")
E
^SCR("W3COLORB","P",15,"CRD")
4,28,E,17,0
^SCR("W3COLORB","P",15,"HELP")

^SCR("W3COLORB","P",15,"LMAX")
17
^SCR("W3COLORB","P",15,"MUMPS1")

^SCR("W3COLORB","P",15,"MUMPS2")

^SCR("W3COLORB","P",15,"TYP")
E
^SCR("W3COLORB","P",20,"CRD")
5,28,E,17,0
^SCR("W3COLORB","P",20,"HELP")

^SCR("W3COLORB","P",20,"LMAX")
17
^SCR("W3COLORB","P",20,"MUMPS1")

^SCR("W3COLORB","P",20,"MUMPS2")

^SCR("W3COLORB","P",20,"TYP")
E
^SCR("W3COLORB","P",25,"CRD")
6,28,E,17,0
^SCR("W3COLORB","P",25,"HELP")

^SCR("W3COLORB","P",25,"LMAX")
17
^SCR("W3COLORB","P",25,"MUMPS1")

^SCR("W3COLORB","P",25,"MUMPS2")

^SCR("W3COLORB","P",25,"TYP")
E
^SCR("W3COLORB","P",30,"CRD")
7,28,E,17,0
^SCR("W3COLORB","P",30,"HELP")

^SCR("W3COLORB","P",30,"LMAX")
17
^SCR("W3COLORB","P",30,"MUMPS1")

^SCR("W3COLORB","P",30,"MUMPS2")

^SCR("W3COLORB","P",30,"TYP")
E
^SCR("W3COLORB","P",35,"CRD")
8,28,E,17,0
^SCR("W3COLORB","P",35,"HELP")

^SCR("W3COLORB","P",35,"LMAX")
17
^SCR("W3COLORB","P",35,"MUMPS1")

^SCR("W3COLORB","P",35,"MUMPS2")

^SCR("W3COLORB","P",35,"TYP")
E
^SCR("W3COLORB","P",40,"CRD")
9,28,E,17,0
^SCR("W3COLORB","P",40,"HELP")

^SCR("W3COLORB","P",40,"LMAX")
17
^SCR("W3COLORB","P",40,"MUMPS1")

^SCR("W3COLORB","P",40,"MUMPS2")

^SCR("W3COLORB","P",40,"TYP")
E
^SCR("W3COLORB","P","NAME","BACK2ENT")
20
^SCR("W3COLORB","P","NAME","BGORDB")
10
^SCR("W3COLORB","P","NAME","CL")
2
^SCR("W3COLORB","P","NAME","CL1")
3
^SCR("W3COLORB","P","NAME","FG2PAY")
35
^SCR("W3COLORB","P","NAME","FGBOT")
15
^SCR("W3COLORB","P","NAME","FGDISC")
30
^SCR("W3COLORB","P","NAME","FGDLVPAY")
25
^SCR("W3COLORB","P","NAME","TERMORD")
40
^SCR("W3COLORB","P","NM",2)
CL
^SCR("W3COLORB","P","NM",3)
CL1
^SCR("W3COLORB","P","NM",10)
BGORDB
^SCR("W3COLORB","P","NM",15)
FGBOT
^SCR("W3COLORB","P","NM",20)
BACK2ENT
^SCR("W3COLORB","P","NM",25)
FGDLVPAY
^SCR("W3COLORB","P","NM",30)
FGDISC
^SCR("W3COLORB","P","NM",35)
FG2PAY
^SCR("W3COLORB","P","NM",40)
TERMORD
^SCR("W3COLORG")
H
^SCR("W3COLORG",1)
                           {                            03} {02 } : aevir cew  
^SCR("W3COLORG",2)
                                                                               
^SCR("W3COLORG",3)
                                                                            1] 
^SCR("W3COLORG",4)
       {05                                   }:            zeveaw wlg ly rwx   
^SCR("W3COLORG",5)
       {10                                   }:              zeveaw zxey rwx   
^SCR("W3COLORG",6)
                          {15                }:         zeveaw ly zeize` rav   
^SCR("W3COLORG",7)
       {17                                   }:           zigkep dxey ly rwx   
^SCR("W3COLORG",8)
                          {22                }:               zigkp dxey rav   
^SCR("W3COLORG",9)
                                        {24  }:              PX dxey ly daeb   
^SCR("W3COLORG",10)
                          {25                }:             'hixtz' hqwh rav   
^SCR("W3COLORG",11)
                          {30                }:    'hixtz qtcd/bvd' hqwh rav   
^SCR("W3COLORG",12)
                                                                               
^SCR("W3COLORG",13)
     [1                                                                        
^SCR("W3COLORG",14)
                                                                               
^SCR("W3COLORG",15)
                                                                               
^SCR("W3COLORG","A",1)
:�…–‰’ƒ…—
^SCR("W3COLORG","A",2)

^SCR("W3COLORG","A",3)

^SCR("W3COLORG","A",4)
:š…–…�——Œ‡Œ™’—˜
^SCR("W3COLORG","A",5)
:š…–…�—š˜…™’—˜
^SCR("W3COLORG","A",6)
:š…–…�—Œ™š…‰š…€’�–
^SCR("W3COLORG","A",7)
:š‰‡‹…�„˜…™Œ™’—˜
^SCR("W3COLORG","A",8)
:š‰‡‹�„˜…™’�–
^SCR("W3COLORG","A",9)
:PX„˜…™Œ™„�…‚
^SCR("W3COLORG","A",10)
:'ˆ‰˜”š'ˆ‘—ˆ’�–
^SCR("W3COLORG","A",11)
:'ˆ‰˜”š‘”ƒ„/‚–„'ˆ‘—ˆ’�–
^SCR("W3COLORG","A",12)

^SCR("W3COLORG","A",13)

^SCR("W3COLORG","A",14)

^SCR("W3COLORG","A",15)

^SCR("W3COLORG","AV",1)
:cumhgsue
^SCR("W3COLORG","AV",2)

^SCR("W3COLORG","AV",3)

^SCR("W3COLORG","AV",4)
:,umuceekjkager
^SCR("W3COLORG","AV",5)
:,umuce,ruager
^SCR("W3COLORG","AV",6)
:,umuceka,uh,utgcm
^SCR("W3COLORG","AV",7)
:,hjfubvruakager
^SCR("W3COLORG","AV",8)
:,hjfbvruagcm
^SCR("W3COLORG","AV",9)
:PXvruakavcud
^SCR("W3COLORG","AV",10)
:wyhrp,wyxeygcm
^SCR("W3COLORG","AV",11)
:wyhrp,xpsvqdmvwyxeygcm
^SCR("W3COLORG","AV",12)

^SCR("W3COLORG","AV",13)

^SCR("W3COLORG","AV",14)

^SCR("W3COLORG","AV",15)

^SCR("W3COLORG","NAME")

^SCR("W3COLORG","P",2,"CRD")
1,60,E,4,0
^SCR("W3COLORG","P",2,"FNC")

^SCR("W3COLORG","P",2,"GLOB")
^W3COLOR
^SCR("W3COLORG","P",2,"HELP")

^SCR("W3COLORG","P",2,"LMAX")
4
^SCR("W3COLORG","P",2,"MUMPS1")

^SCR("W3COLORG","P",2,"MUMPS2")

^SCR("W3COLORG","P",2,"MUST")

^SCR("W3COLORG","P",2,"NLN")
20
^SCR("W3COLORG","P",2,"RZD")
\
^SCR("W3COLORG","P",2,"TOPB")
8
^SCR("W3COLORG","P",2,"TYP")
E
^SCR("W3COLORG","P",2,"VRB")
CL1
^SCR("W3COLORG","P",3,"CRD")
1,59,H,31,0
^SCR("W3COLORG","P",3,"HELP")

^SCR("W3COLORG","P",3,"LMAX")
31
^SCR("W3COLORG","P",3,"MUMPS1")

^SCR("W3COLORG","P",3,"MUMPS2")

^SCR("W3COLORG","P",3,"TYP")
H
^SCR("W3COLORG","P",5,"CRD")
4,7,E,38,0
^SCR("W3COLORG","P",5,"HELP")

^SCR("W3COLORG","P",5,"LMAX")
38
^SCR("W3COLORG","P",5,"MUMPS1")

^SCR("W3COLORG","P",5,"MUMPS2")

^SCR("W3COLORG","P",5,"TYP")
E
^SCR("W3COLORG","P",10,"CRD")
5,7,E,38,0
^SCR("W3COLORG","P",10,"HELP")

^SCR("W3COLORG","P",10,"LMAX")
38
^SCR("W3COLORG","P",10,"MUMPS1")

^SCR("W3COLORG","P",10,"MUMPS2")

^SCR("W3COLORG","P",10,"TYP")
E
^SCR("W3COLORG","P",15,"CRD")
6,26,E,19,0
^SCR("W3COLORG","P",15,"HELP")

^SCR("W3COLORG","P",15,"LMAX")
19
^SCR("W3COLORG","P",15,"MUMPS1")

^SCR("W3COLORG","P",15,"MUMPS2")

^SCR("W3COLORG","P",15,"TYP")
E
^SCR("W3COLORG","P",17,"CRD")
7,7,E,38,0
^SCR("W3COLORG","P",17,"HELP")

^SCR("W3COLORG","P",17,"LMAX")
38
^SCR("W3COLORG","P",17,"MUMPS1")

^SCR("W3COLORG","P",17,"MUMPS2")

^SCR("W3COLORG","P",17,"TYP")
E
^SCR("W3COLORG","P",22,"CRD")
8,26,E,19,0
^SCR("W3COLORG","P",22,"HELP")

^SCR("W3COLORG","P",22,"LMAX")
19
^SCR("W3COLORG","P",22,"MUMPS1")

^SCR("W3COLORG","P",22,"MUMPS2")

^SCR("W3COLORG","P",22,"TYP")
E
^SCR("W3COLORG","P",24,"CRD")
9,40,N,3,0
^SCR("W3COLORG","P",24,"HELP")

^SCR("W3COLORG","P",24,"LMAX")
5
^SCR("W3COLORG","P",24,"MUMPS1")
S:'$G(HGTRGR) HGTRGR=20
^SCR("W3COLORG","P",24,"MUMPS2")

^SCR("W3COLORG","P",24,"TYP")
N
^SCR("W3COLORG","P",25,"CRD")
10,26,E,19,0
^SCR("W3COLORG","P",25,"HELP")

^SCR("W3COLORG","P",25,"LMAX")
19
^SCR("W3COLORG","P",25,"MUMPS1")

^SCR("W3COLORG","P",25,"MUMPS2")

^SCR("W3COLORG","P",25,"TYP")
E
^SCR("W3COLORG","P",30,"CRD")
11,26,E,19,0
^SCR("W3COLORG","P",30,"HELP")

^SCR("W3COLORG","P",30,"LMAX")
19
^SCR("W3COLORG","P",30,"MUMPS1")

^SCR("W3COLORG","P",30,"MUMPS2")

^SCR("W3COLORG","P",30,"TYP")
E
^SCR("W3COLORG","P","NAME","BCURGR")
17
^SCR("W3COLORG","P","NAME","BGGROUP")
5
^SCR("W3COLORG","P","NAME","BGTRGR")
10
^SCR("W3COLORG","P","NAME","CL")
2
^SCR("W3COLORG","P","NAME","CL1")
3
^SCR("W3COLORG","P","NAME","FGCURGR")
22
^SCR("W3COLORG","P","NAME","FGGROUP")
15
^SCR("W3COLORG","P","NAME","FGMENU")
25
^SCR("W3COLORG","P","NAME","FGPRINT")
30
^SCR("W3COLORG","P","NAME","HGTRGR")
24
^SCR("W3COLORG","P","NM",2)
CL
^SCR("W3COLORG","P","NM",3)
CL1
^SCR("W3COLORG","P","NM",5)
BGGROUP
^SCR("W3COLORG","P","NM",10)
BGTRGR
^SCR("W3COLORG","P","NM",15)
FGGROUP
^SCR("W3COLORG","P","NM",17)
BCURGR
^SCR("W3COLORG","P","NM",22)
FGCURGR
^SCR("W3COLORG","P","NM",24)
HGTRGR
^SCR("W3COLORG","P","NM",25)
FGMENU
^SCR("W3COLORG","P","NM",30)
FGPRINT
^SCR("W3COLORG","P","RB",1)
4,6,14,78
^SCR("W3COLORI")
H
^SCR("W3COLORI",1)
                           {                            03} {02 } : aevir cew  
^SCR("W3COLORI",2)
                            {05              }:            mihixt wlg ly rwx   
^SCR("W3COLORI",3)
    {10 }: (`l - 0 ,mihixt zniyxe dpnfda - 2 ,dpnfda - 1) hixt cew bivdl m`d   
^SCR("W3COLORI",4)
    {12 }:       (`l - 0 ,mihixt zveawl - 2 ,ok - 1) hixt ly dpenz bivdl m`d   
^SCR("W3COLORI",5)
                            {15              }:              dveaw my ly rwx   
^SCR("W3COLORI",6)
                            {20              }:              dveaw my ly rav   
^SCR("W3COLORI",7)
                            {25              }:         LEV ON LINE hqwh rav   
^SCR("W3COLORI",8)
                            {30              }:       'dxigal wilw' hqwh rav   
^SCR("W3COLORI",9)
                            {35              }:                    ew ly rav   
^SCR("W3COLORI",10)
                            {40              }:              hixt cew ly rav   
^SCR("W3COLORI",11)
                            {45              }:               hixt my ly rav   
^SCR("W3COLORI",12)
                            {50              }:             hixt xign ly rav   
^SCR("W3COLORI",13)
                            {55              }:                 hexit ly rav   
^SCR("W3COLORI",14)
                            {60              }:             xgap hixt ly rwx   
^SCR("W3COLORI",15)
                                        {62  }: zepnfd jqn mr dcxtd ew bivdl   
^SCR("W3COLORI",16)
                            {65              }:        hixt cew ly hpet lceb   
^SCR("W3COLORI",17)
                            {70              }:            hixt ly hpet lceb   
^SCR("W3COLORI",18)
                            {72              }:            xign ly hpet lceb   
^SCR("W3COLORI",19)
                            {75              }:           hexit ly hpet lceb   
^SCR("W3COLORI",20)
                            {80              }:        zixt zxiga jqn ly rwx   
^SCR("W3COLORI",21)
                            {85              }:zixt zxiga jqna zeize` ly rav   
^SCR("W3COLORI",22)
                            {87              }: zixt zxiga jqna hexit ly rav   
^SCR("W3COLORI",23)
                            {90        }:zixt zxiga jqna zexzek ly hpet lceb   
^SCR("W3COLORI","A",1)
:�…–‰’ƒ…—
^SCR("W3COLORI","A",2)
:�‰ˆ‰˜”—Œ‡Œ™’—˜
^SCR("W3COLORI","A",3)
:(€Œ-0,�‰ˆ‰˜”šŽ‰™˜…„�Ž†„�-2,„�Ž†„�-1)ˆ‰˜”ƒ…—‚‰–„Œ�€„
^SCR("W3COLORI","A",4)
:(€Œ-0,�‰ˆ‰˜”š–…�—Œ-2,�‹-1)ˆ‰˜”Œ™„�…Žš‚‰–„Œ�€„
^SCR("W3COLORI","A",5)
:„–…�—�™Œ™’—˜
^SCR("W3COLORI","A",6)
:„–…�—�™Œ™’�–
^SCR("W3COLORI","A",7)
:LEVONLINEˆ‘—ˆ’�–
^SCR("W3COLORI","A",8)
:'„˜‰‡�Œ—‰Œ—'ˆ‘—ˆ’�–
^SCR("W3COLORI","A",9)
:…—Œ™’�–
^SCR("W3COLORI","A",10)
:ˆ‰˜”ƒ…—Œ™’�–
^SCR("W3COLORI","A",11)
:ˆ‰˜”�™Œ™’�–
^SCR("W3COLORI","A",12)
:ˆ‰˜”˜‰‡ŽŒ™’�–
^SCR("W3COLORI","A",13)
:ˆ…˜‰”Œ™’�–
^SCR("W3COLORI","A",14)
:˜‡��ˆ‰˜”Œ™’—˜
^SCR("W3COLORI","A",15)
:š…�Ž†„Š‘Ž�’„ƒ˜”„…—‚‰–„Œ
^SCR("W3COLORI","A",16)
:ˆ‰˜”ƒ…—Œ™ˆ�…”Œƒ…‚
^SCR("W3COLORI","A",17)
:ˆ‰˜”Œ™ˆ�…”Œƒ…‚
^SCR("W3COLORI","A",18)
:˜‰‡ŽŒ™ˆ�…”Œƒ…‚
^SCR("W3COLORI","A",19)
:ˆ…˜‰”Œ™ˆ�…”Œƒ…‚
^SCR("W3COLORI","A",20)
:š‰˜”š˜‰‡�Š‘ŽŒ™’—˜
^SCR("W3COLORI","A",21)
:š‰˜”š˜‰‡�Š‘Ž�š…‰š…€Œ™’�–
^SCR("W3COLORI","A",22)
:š‰˜”š˜‰‡�Š‘Ž�ˆ…˜‰”Œ™’�–
^SCR("W3COLORI","A",23)
:š‰˜”š˜‰‡�Š‘Ž�š…˜š…‹Œ™ˆ�…”Œƒ…‚
^SCR("W3COLORI","AV",1)
:cumhgsue
^SCR("W3COLORI","AV",2)
:ohyhrpekjkager
^SCR("W3COLORI","AV",3)
:(tk-0'ohyhrp,nharuvbnzvc-2'vbnzvc-1)yhrpsuedhmvkotv
^SCR("W3COLORI","AV",4)
:(tk-0'ohyhrp,mucek-2'if-1)yhrpkavbun,dhmvkotv
^SCR("W3COLORI","AV",5)
:vmuceoakager
^SCR("W3COLORI","AV",6)
:vmuceoakagcm
^SCR("W3COLORI","AV",7)
:LEVONLINEyxeygcm
^SCR("W3COLORI","AV",8)
:wvrhjckehkewyxeygcm
^SCR("W3COLORI","AV",9)
:uekagcm
^SCR("W3COLORI","AV",10)
:yhrpsuekagcm
^SCR("W3COLORI","AV",11)
:yhrpoakagcm
^SCR("W3COLORI","AV",12)
:yhrprhjnkagcm
^SCR("W3COLORI","AV",13)
:yurhpkagcm
^SCR("W3COLORI","AV",14)
:rjcbyhrpkager
^SCR("W3COLORI","AV",15)
:,ubnzvlxnogvsrpvuedhmvk
^SCR("W3COLORI","AV",16)
:yhrpsuekaybupksud
^SCR("W3COLORI","AV",17)
:yhrpkaybupksud
^SCR("W3COLORI","AV",18)
:rhjnkaybupksud
^SCR("W3COLORI","AV",19)
:yurhpkaybupksud
^SCR("W3COLORI","AV",20)
:,hrp,rhjclxnkager
^SCR("W3COLORI","AV",21)
:,hrp,rhjclxnc,uh,utkagcm
^SCR("W3COLORI","AV",22)
:,hrp,rhjclxncyurhpkagcm
^SCR("W3COLORI","AV",23)
:,hrp,rhjclxnc,ur,ufkaybupksud
^SCR("W3COLORI","NAME")

^SCR("W3COLORI","P",2,"CRD")
1,60,E,4,0
^SCR("W3COLORI","P",2,"FNC")

^SCR("W3COLORI","P",2,"GLOB")
^W3COLOR
^SCR("W3COLORI","P",2,"HELP")

^SCR("W3COLORI","P",2,"LMAX")
4
^SCR("W3COLORI","P",2,"MUMPS1")

^SCR("W3COLORI","P",2,"MUMPS2")

^SCR("W3COLORI","P",2,"MUST")

^SCR("W3COLORI","P",2,"NLN")
20
^SCR("W3COLORI","P",2,"RZD")
\
^SCR("W3COLORI","P",2,"TOPB")
8
^SCR("W3COLORI","P",2,"TYP")
E
^SCR("W3COLORI","P",2,"VRB")
CL1
^SCR("W3COLORI","P",3,"CRD")
1,59,H,31
^SCR("W3COLORI","P",3,"HELP")

^SCR("W3COLORI","P",3,"LMAX")
31
^SCR("W3COLORI","P",3,"MUMPS1")

^SCR("W3COLORI","P",3,"MUMPS2")

^SCR("W3COLORI","P",3,"TYP")
H
^SCR("W3COLORI","P",5,"CRD")
2,28,E,17,0
^SCR("W3COLORI","P",5,"HELP")

^SCR("W3COLORI","P",5,"LMAX")
17
^SCR("W3COLORI","P",5,"MUMPS1")

^SCR("W3COLORI","P",5,"MUMPS2")

^SCR("W3COLORI","P",5,"TYP")
E
^SCR("W3COLORI","P",10,"CRD")
3,4,N,1,0
^SCR("W3COLORI","P",10,"HELP")

^SCR("W3COLORI","P",10,"LMAX")
4
^SCR("W3COLORI","P",10,"MUMPS1")

^SCR("W3COLORI","P",10,"MUMPS2")
I CODE<0!(CODE>2) S %SC("ER")=1
^SCR("W3COLORI","P",10,"TYP")
N
^SCR("W3COLORI","P",12,"CRD")
4,4,N,1,0
^SCR("W3COLORI","P",12,"HELP")

^SCR("W3COLORI","P",12,"LMAX")
4
^SCR("W3COLORI","P",12,"MUMPS1")

^SCR("W3COLORI","P",12,"MUMPS2")
I PICTURE<0!(PICTURE>2) S %SC("ER")=1
^SCR("W3COLORI","P",12,"TYP")
N
^SCR("W3COLORI","P",15,"CRD")
5,28,E,17,0
^SCR("W3COLORI","P",15,"HELP")

^SCR("W3COLORI","P",15,"LMAX")
17
^SCR("W3COLORI","P",15,"MUMPS1")

^SCR("W3COLORI","P",15,"MUMPS2")

^SCR("W3COLORI","P",15,"TYP")
E
^SCR("W3COLORI","P",20,"CRD")
6,28,E,17,0
^SCR("W3COLORI","P",20,"HELP")

^SCR("W3COLORI","P",20,"LMAX")
17
^SCR("W3COLORI","P",20,"MUMPS1")

^SCR("W3COLORI","P",20,"MUMPS2")

^SCR("W3COLORI","P",20,"TYP")
E
^SCR("W3COLORI","P",25,"CRD")
7,28,E,17,0
^SCR("W3COLORI","P",25,"HELP")

^SCR("W3COLORI","P",25,"LMAX")
17
^SCR("W3COLORI","P",25,"MUMPS1")

^SCR("W3COLORI","P",25,"MUMPS2")

^SCR("W3COLORI","P",25,"TYP")
E
^SCR("W3COLORI","P",30,"CRD")
8,28,E,17,0
^SCR("W3COLORI","P",30,"HELP")

^SCR("W3COLORI","P",30,"LMAX")
17
^SCR("W3COLORI","P",30,"MUMPS1")

^SCR("W3COLORI","P",30,"MUMPS2")

^SCR("W3COLORI","P",30,"TYP")
E
^SCR("W3COLORI","P",35,"CRD")
9,28,E,17,0
^SCR("W3COLORI","P",35,"HELP")

^SCR("W3COLORI","P",35,"LMAX")
17
^SCR("W3COLORI","P",35,"MUMPS1")

^SCR("W3COLORI","P",35,"MUMPS2")

^SCR("W3COLORI","P",35,"TYP")
E
^SCR("W3COLORI","P",40,"CRD")
10,28,E,17,0
^SCR("W3COLORI","P",40,"HELP")

^SCR("W3COLORI","P",40,"LMAX")
17
^SCR("W3COLORI","P",40,"MUMPS1")

^SCR("W3COLORI","P",40,"MUMPS2")

^SCR("W3COLORI","P",40,"TYP")
E
^SCR("W3COLORI","P",45,"CRD")
11,28,E,17,0
^SCR("W3COLORI","P",45,"HELP")

^SCR("W3COLORI","P",45,"LMAX")
17
^SCR("W3COLORI","P",45,"MUMPS1")

^SCR("W3COLORI","P",45,"MUMPS2")

^SCR("W3COLORI","P",45,"TYP")
E
^SCR("W3COLORI","P",50,"CRD")
12,28,E,17,0
^SCR("W3COLORI","P",50,"HELP")

^SCR("W3COLORI","P",50,"LMAX")
17
^SCR("W3COLORI","P",50,"MUMPS1")

^SCR("W3COLORI","P",50,"MUMPS2")

^SCR("W3COLORI","P",50,"TYP")
E
^SCR("W3COLORI","P",55,"CRD")
13,28,E,17,0
^SCR("W3COLORI","P",55,"HELP")

^SCR("W3COLORI","P",55,"LMAX")
17
^SCR("W3COLORI","P",55,"MUMPS1")

^SCR("W3COLORI","P",55,"MUMPS2")

^SCR("W3COLORI","P",55,"TYP")
E
^SCR("W3COLORI","P",60,"CRD")
14,28,E,17,0
^SCR("W3COLORI","P",60,"HELP")

^SCR("W3COLORI","P",60,"LMAX")
17
^SCR("W3COLORI","P",60,"MUMPS1")

^SCR("W3COLORI","P",60,"MUMPS2")

^SCR("W3COLORI","P",60,"TYP")
E
^SCR("W3COLORI","P",62,"CRD")
15,40,B,1,0
^SCR("W3COLORI","P",62,"HELP")

^SCR("W3COLORI","P",62,"LMAX")
5
^SCR("W3COLORI","P",62,"MUMPS1")

^SCR("W3COLORI","P",62,"MUMPS2")

^SCR("W3COLORI","P",62,"TYP")
B
^SCR("W3COLORI","P",65,"CRD")
16,28,N,6,0
^SCR("W3COLORI","P",65,"HELP")

^SCR("W3COLORI","P",65,"LMAX")
17
^SCR("W3COLORI","P",65,"MUMPS1")

^SCR("W3COLORI","P",65,"MUMPS2")

^SCR("W3COLORI","P",65,"TYP")
N
^SCR("W3COLORI","P",70,"CRD")
17,28,N,6,0
^SCR("W3COLORI","P",70,"HELP")

^SCR("W3COLORI","P",70,"LMAX")
17
^SCR("W3COLORI","P",70,"MUMPS1")

^SCR("W3COLORI","P",70,"MUMPS2")

^SCR("W3COLORI","P",70,"TYP")
N
^SCR("W3COLORI","P",72,"CRD")
18,28,N,6,0
^SCR("W3COLORI","P",72,"HELP")

^SCR("W3COLORI","P",72,"LMAX")
17
^SCR("W3COLORI","P",72,"MUMPS1")

^SCR("W3COLORI","P",72,"MUMPS2")

^SCR("W3COLORI","P",72,"TYP")
N
^SCR("W3COLORI","P",75,"CRD")
19,28,N,6,0
^SCR("W3COLORI","P",75,"HELP")

^SCR("W3COLORI","P",75,"LMAX")
17
^SCR("W3COLORI","P",75,"MUMPS1")

^SCR("W3COLORI","P",75,"MUMPS2")

^SCR("W3COLORI","P",75,"TYP")
N
^SCR("W3COLORI","P",80,"CRD")
20,28,E,17,0
^SCR("W3COLORI","P",80,"HELP")

^SCR("W3COLORI","P",80,"LMAX")
17
^SCR("W3COLORI","P",80,"MUMPS1")

^SCR("W3COLORI","P",80,"MUMPS2")

^SCR("W3COLORI","P",80,"TYP")
E
^SCR("W3COLORI","P",85,"CRD")
21,28,E,17,0
^SCR("W3COLORI","P",85,"HELP")

^SCR("W3COLORI","P",85,"LMAX")
17
^SCR("W3COLORI","P",85,"MUMPS1")

^SCR("W3COLORI","P",85,"MUMPS2")

^SCR("W3COLORI","P",85,"TYP")
E
^SCR("W3COLORI","P",87,"CRD")
22,28,E,17,0
^SCR("W3COLORI","P",87,"HELP")

^SCR("W3COLORI","P",87,"LMAX")
17
^SCR("W3COLORI","P",87,"MUMPS1")

^SCR("W3COLORI","P",87,"MUMPS2")

^SCR("W3COLORI","P",87,"TYP")
E
^SCR("W3COLORI","P",90,"CRD")
23,28,N,6,0
^SCR("W3COLORI","P",90,"HELP")

^SCR("W3COLORI","P",90,"LMAX")
11
^SCR("W3COLORI","P",90,"MUMPS1")

^SCR("W3COLORI","P",90,"MUMPS2")

^SCR("W3COLORI","P",90,"TYP")
N
^SCR("W3COLORI","P","NAME","BGCHOOS")
60
^SCR("W3COLORI","P","NAME","BGGRIT")
15
^SCR("W3COLORI","P","NAME","BGITEMS")
5
^SCR("W3COLORI","P","NAME","BGITSHOW")
80
^SCR("W3COLORI","P","NAME","CL")
2
^SCR("W3COLORI","P","NAME","CL1")
3
^SCR("W3COLORI","P","NAME","CODE")
10
^SCR("W3COLORI","P","NAME","FGCD")
40
^SCR("W3COLORI","P","NAME","FGDET")
55
^SCR("W3COLORI","P","NAME","FGDETITS")
87
^SCR("W3COLORI","P","NAME","FGGRIT")
20
^SCR("W3COLORI","P","NAME","FGHDITS")
85
^SCR("W3COLORI","P","NAME","FGITEMS")
45
^SCR("W3COLORI","P","NAME","FGLEV")
25
^SCR("W3COLORI","P","NAME","FGLINE")
35
^SCR("W3COLORI","P","NAME","FGMH")
50
^SCR("W3COLORI","P","NAME","FGPRESS")
30
^SCR("W3COLORI","P","NAME","FONTCD")
65
^SCR("W3COLORI","P","NAME","FONTDET")
75
^SCR("W3COLORI","P","NAME","FONTHITS")
90
^SCR("W3COLORI","P","NAME","FONTIT")
70
^SCR("W3COLORI","P","NAME","FONTMH")
72
^SCR("W3COLORI","P","NAME","ITORDBRD")
62
^SCR("W3COLORI","P","NAME","PICTURE")
12
^SCR("W3COLORI","P","NM",2)
CL
^SCR("W3COLORI","P","NM",3)
CL1
^SCR("W3COLORI","P","NM",5)
BGITEMS
^SCR("W3COLORI","P","NM",10)
CODE
^SCR("W3COLORI","P","NM",12)
PICTURE
^SCR("W3COLORI","P","NM",15)
BGGRIT
^SCR("W3COLORI","P","NM",20)
FGGRIT
^SCR("W3COLORI","P","NM",25)
FGLEV
^SCR("W3COLORI","P","NM",30)
FGPRESS
^SCR("W3COLORI","P","NM",35)
FGLINE
^SCR("W3COLORI","P","NM",40)
FGCD
^SCR("W3COLORI","P","NM",45)
FGITEMS
^SCR("W3COLORI","P","NM",50)
FGMH
^SCR("W3COLORI","P","NM",55)
FGDET
^SCR("W3COLORI","P","NM",60)
BGCHOOS
^SCR("W3COLORI","P","NM",62)
ITORDBRD
^SCR("W3COLORI","P","NM",65)
FONTCD
^SCR("W3COLORI","P","NM",70)
FONTIT
^SCR("W3COLORI","P","NM",72)
FONTMH
^SCR("W3COLORI","P","NM",75)
FONTDET
^SCR("W3COLORI","P","NM",80)
BGITSHOW
^SCR("W3COLORI","P","NM",85)
FGHDITS
^SCR("W3COLORI","P","NM",87)
FGDETITS
^SCR("W3COLORI","P","NM",90)
FONTHITS
^SCR("W3COLORO")
H
^SCR("W3COLORO",1)
                           {                            03} {02 } : aevir cew  
^SCR("W3COLORO",2)
                                                                               
^SCR("W3COLORO",3)
 {10                }:( mdpiia "-" mr aezkl yi mirav 2 m` ) dpnfd wlg ly rwx   
^SCR("W3COLORO",4)
                            {15              }:          dpnfda mieew ly rwx   
^SCR("W3COLORO",5)
                            {20              }:                 zxzek ly rwx   
^SCR("W3COLORO",6)
                            {25              }:           zxzek ly zeiz` rav   
^SCR("W3COLORO",7)
                            {30              }:           dpnfd zexey ly rwx   
^SCR("W3COLORO",8)
                            {35              }:         dpnfda mihixt ly rav   
^SCR("W3COLORO",9)
                            {40              }:             hixt xign ly rav   
^SCR("W3COLORO",10)
                            {45              }:                zetqez ly rav   
^SCR("W3COLORO",11)
                            {50              }:                 zexrd ly rav   
^SCR("W3COLORO",12)
                                                                               
^SCR("W3COLORO",13)
                                                                               
^SCR("W3COLORO","AV",1)
:cumhgsue
^SCR("W3COLORO","AV",2)

^SCR("W3COLORO","AV",3)
:(ovbhhc"-"ogcu,fkahohgcm2ot)vbnzvekjkager
^SCR("W3COLORO","AV",4)
:vbnzvcohuuekager
^SCR("W3COLORO","AV",5)
:,r,ufkager
^SCR("W3COLORO","AV",6)
:,r,ufka,uh,tgcm
^SCR("W3COLORO","AV",7)
:vbnzv,uruakager
^SCR("W3COLORO","AV",8)
:vbnzvcohyhrpkagcm
^SCR("W3COLORO","AV",9)
:yhrprhjnkagcm
^SCR("W3COLORO","AV",10)
:,upxu,kagcm
^SCR("W3COLORO","AV",11)
:,urgvkagcm
^SCR("W3COLORO","AV",12)

^SCR("W3COLORO","AV",13)

^SCR("W3COLORO","NAME")

^SCR("W3COLORO","P",2,"CRD")
1,60,E,3,0
^SCR("W3COLORO","P",2,"FNC")

^SCR("W3COLORO","P",2,"GLOB")
^W3COLOR
^SCR("W3COLORO","P",2,"HELP")

^SCR("W3COLORO","P",2,"LMAX")
4
^SCR("W3COLORO","P",2,"MUMPS1")

^SCR("W3COLORO","P",2,"MUMPS2")

^SCR("W3COLORO","P",2,"MUST")

^SCR("W3COLORO","P",2,"NLN")
20
^SCR("W3COLORO","P",2,"RZD")
\
^SCR("W3COLORO","P",2,"TOPB")
8
^SCR("W3COLORO","P",2,"TYP")
E
^SCR("W3COLORO","P",2,"VRB")
CL1
^SCR("W3COLORO","P",3,"CRD")
1,59,H,31
^SCR("W3COLORO","P",3,"HELP")

^SCR("W3COLORO","P",3,"LMAX")
31
^SCR("W3COLORO","P",3,"MUMPS1")

^SCR("W3COLORO","P",3,"MUMPS2")

^SCR("W3COLORO","P",3,"TYP")
H
^SCR("W3COLORO","P",10,"CRD")
3,1,E,17,0
^SCR("W3COLORO","P",10,"HELP")

^SCR("W3COLORO","P",10,"LMAX")
19
^SCR("W3COLORO","P",10,"MUMPS1")

^SCR("W3COLORO","P",10,"MUMPS2")

^SCR("W3COLORO","P",10,"TYP")
E
^SCR("W3COLORO","P",15,"CRD")
4,28,E,17,0
^SCR("W3COLORO","P",15,"HELP")

^SCR("W3COLORO","P",15,"LMAX")
17
^SCR("W3COLORO","P",15,"MUMPS1")

^SCR("W3COLORO","P",15,"MUMPS2")

^SCR("W3COLORO","P",15,"TYP")
E
^SCR("W3COLORO","P",20,"CRD")
5,28,E,17,0
^SCR("W3COLORO","P",20,"HELP")

^SCR("W3COLORO","P",20,"LMAX")
17
^SCR("W3COLORO","P",20,"MUMPS1")

^SCR("W3COLORO","P",20,"MUMPS2")

^SCR("W3COLORO","P",20,"TYP")
E
^SCR("W3COLORO","P",25,"CRD")
6,28,E,17,0
^SCR("W3COLORO","P",25,"HELP")

^SCR("W3COLORO","P",25,"LMAX")
17
^SCR("W3COLORO","P",25,"MUMPS1")

^SCR("W3COLORO","P",25,"MUMPS2")

^SCR("W3COLORO","P",25,"TYP")
E
^SCR("W3COLORO","P",30,"CRD")
7,28,E,17,0
^SCR("W3COLORO","P",30,"HELP")

^SCR("W3COLORO","P",30,"LMAX")
17
^SCR("W3COLORO","P",30,"MUMPS1")

^SCR("W3COLORO","P",30,"MUMPS2")

^SCR("W3COLORO","P",30,"TYP")
E
^SCR("W3COLORO","P",35,"CRD")
8,28,E,17,0
^SCR("W3COLORO","P",35,"HELP")

^SCR("W3COLORO","P",35,"LMAX")
17
^SCR("W3COLORO","P",35,"MUMPS1")

^SCR("W3COLORO","P",35,"MUMPS2")

^SCR("W3COLORO","P",35,"TYP")
E
^SCR("W3COLORO","P",40,"CRD")
9,28,E,17,0
^SCR("W3COLORO","P",40,"HELP")

^SCR("W3COLORO","P",40,"LMAX")
17
^SCR("W3COLORO","P",40,"MUMPS1")

^SCR("W3COLORO","P",40,"MUMPS2")

^SCR("W3COLORO","P",40,"TYP")
E
^SCR("W3COLORO","P",45,"CRD")
10,28,E,17,0
^SCR("W3COLORO","P",45,"HELP")

^SCR("W3COLORO","P",45,"LMAX")
17
^SCR("W3COLORO","P",45,"MUMPS1")

^SCR("W3COLORO","P",45,"MUMPS2")

^SCR("W3COLORO","P",45,"TYP")
E
^SCR("W3COLORO","P",50,"CRD")
11,28,E,17,0
^SCR("W3COLORO","P",50,"HELP")

^SCR("W3COLORO","P",50,"LMAX")
17
^SCR("W3COLORO","P",50,"MUMPS1")

^SCR("W3COLORO","P",50,"MUMPS2")

^SCR("W3COLORO","P",50,"TYP")
E
^SCR("W3COLORO","P","NAME","BGBDORD")
10
^SCR("W3COLORO","P","NAME","BGORDHD")
20
^SCR("W3COLORO","P","NAME","BGTBLORD")
15
^SCR("W3COLORO","P","NAME","BGTDORD")
30
^SCR("W3COLORO","P","NAME","CL")
2
^SCR("W3COLORO","P","NAME","CL1")
3
^SCR("W3COLORO","P","NAME","FGORDADD")
45
^SCR("W3COLORO","P","NAME","FGORDCMN")
50
^SCR("W3COLORO","P","NAME","FGORDHD")
25
^SCR("W3COLORO","P","NAME","FGORDIT")
35
^SCR("W3COLORO","P","NAME","FGORDMH")
40
^SCR("W3COLORO","P","NM",2)
CL
^SCR("W3COLORO","P","NM",3)
CL1
^SCR("W3COLORO","P","NM",10)
BGBDORD
^SCR("W3COLORO","P","NM",15)
BGTBLORD
^SCR("W3COLORO","P","NM",20)
BGORDHD
^SCR("W3COLORO","P","NM",25)
FGORDHD
^SCR("W3COLORO","P","NM",30)
BGTDORD
^SCR("W3COLORO","P","NM",35)
FGORDIT
^SCR("W3COLORO","P","NM",40)
FGORDMH
^SCR("W3COLORO","P","NM",45)
FGORDADD
^SCR("W3COLORO","P","NM",50)
FGORDCMN
^SCR("W3COLORV")
H
^SCR("W3COLORV",1)
                           {                            03} {02 } : aevir cew  
^SCR("W3COLORV",2)
                   {04                    }:       dpnfd znlyd itcl illk rwx   
^SCR("W3COLORV",3)
                   {05                    }:                 sc ly zxzek rwx   
^SCR("W3COLORV",4)
                         {07              }:            sc zxzeka zeize` rav   
^SCR("W3COLORV",5)
                         {08              }:           dcrqn ihxt zeize` rav   
^SCR("W3COLORV",6)
                         {10              }:      "ycg-meyx gewl" zexzek rav   
^SCR("W3COLORV",7)
                         {14              }:      "dpnfd ihxt `ln" zxzek rav   
^SCR("W3COLORV",8)
                         {15              }:     "  •dpnfd menipin" zxzek rav  
^SCR("W3COLORV",9)
                         {16              }:      zecy ly zexzeka zeize` rav   
^SCR("W3COLORV",10)
                   {17 }: ( libx - 0 , dar - 1 )  zecy ly zxzeka zeize` iaer   
^SCR("W3COLORV",11)
                         {18              }:              zecy ly zeize` rav   
^SCR("W3COLORV",12)
                          {19 }: ( libx - 0 , dar - 1 )  zecy ly zeize` iaer   
^SCR("W3COLORV",13)
                         {20              }:        minelyz sca dpnfd ly rwx   
^SCR("W3COLORV",14)
                         {25              }:                dlaha mihixt rav   
^SCR("W3COLORV",15)
                         {30              }:                dlaha zetqez rav   
^SCR("W3COLORV",16)
                         {35              }:                dlaha  zexrd rav   
^SCR("W3COLORV",17)
                         {36              }:             dlaha gelyn inc rav   
^SCR("W3COLORV",18)
                         {37              }:            dlaha dpnfd k"dq rav   
^SCR("W3COLORV",19)
                         {38              }: " melyz beq xegal `p" drced rav   
^SCR("W3COLORV",20)
                         {40              }:    " melyzd ipezp lk" drced rav   
^SCR("W3COLORV",21)
                   {45                    }:       ( BO llek) mikqnd x`y rwx   
^SCR("W3COLORV",22)
                         {50              }:(BO llek) mikqnd x`ya zeize` rav   
^SCR("W3COLORV",23)
                         {55              }:               BO iy`x hixtz rav   
^SCR("W3COLORV","A",1)
:�…–‰’ƒ…—
^SCR("W3COLORV","A",2)
:„�Ž†„šŽŒ™„‰”ƒŒ‰ŒŒ‹’—˜
^SCR("W3COLORV","A",3)
:“ƒŒ™š˜š…‹’—˜
^SCR("W3COLORV","A",4)
:“ƒš˜š…‹�š…‰š…€’�–
^SCR("W3COLORV","A",5)
:„ƒ’‘Ž‰ˆ˜”š…‰š…€’�–
^SCR("W3COLORV","A",6)
:"™ƒ‡-�…™˜‡…—Œ"š…˜š…‹’�–
^SCR("W3COLORV","A",7)
:"„�Ž†„‰ˆ˜”€ŒŽ"š˜š…‹’�–
^SCR("W3COLORV","A",8)
:"•„�Ž†„�…Ž‰�‰Ž"š˜š…‹’�–
^SCR("W3COLORV","A",9)
:š…ƒ™Œ™š…˜š…‹�š…‰š…€’�–
^SCR("W3COLORV","A",10)
:(Œ‰‚˜-0,„�’-1)š…ƒ™Œ™š˜š…‹�š…‰š…€‰�…’
^SCR("W3COLORV","A",11)
:š…ƒ™Œ™š…‰š…€’�–
^SCR("W3COLORV","A",12)
:(Œ‰‚˜-0,„�’-1)š…ƒ™Œ™š…‰š…€‰�…’
^SCR("W3COLORV","A",13)
:�‰Ž…Œ™š“ƒ�„�Ž†„Œ™’—˜
^SCR("W3COLORV","A",14)
:„Œ�ˆ��‰ˆ‰˜”’�–
^SCR("W3COLORV","A",15)
:„Œ�ˆ�š…”‘…š’�–
^SCR("W3COLORV","A",16)
:„Œ�ˆ�š…˜’„’�–
^SCR("W3COLORV","A",17)
:„Œ�ˆ�‡…Œ™Ž‰Žƒ’�–
^SCR("W3COLORV","A",18)
:„Œ�ˆ�„�Ž†„‹"„‘’�–
^SCR("W3COLORV","A",19)
:"�…Œ™š‚…‘˜…‡�Œ€�"„’ƒ…„’�–
^SCR("W3COLORV","A",20)
:"�…Œ™š„‰�…š�Œ‹"„’ƒ…„’�–
^SCR("W3COLORV","A",21)
:(BOŒŒ…‹)�‰‹‘Ž„˜€™’—˜
^SCR("W3COLORV","A",22)
:(BOŒŒ…‹)�‰‹‘Ž„˜€™�š…‰š…€’�–
^SCR("W3COLORV","A",23)
:BO‰™€˜ˆ‰˜”š’�–
^SCR("W3COLORV","AV",1)
:cumhgsue
^SCR("W3COLORV","AV",2)
:vbnzv,nkavhpskhkkfger
^SCR("W3COLORV","AV",3)
:;ska,r,ufger
^SCR("W3COLORV","AV",4)
:;s,r,ufc,uh,utgcm
^SCR("W3COLORV","AV",5)
:vsgxnhyrp,uh,utgcm
^SCR("W3COLORV","AV",6)
:"asj-ouarjuek",ur,ufgcm
^SCR("W3COLORV","AV",7)
:"vbnzvhyrptkn",r,ufgcm
^SCR("W3COLORV","AV",8)
:"•vbnzvounhbhn",r,ufgcm
^SCR("W3COLORV","AV",9)
:,usaka,ur,ufc,uh,utgcm
^SCR("W3COLORV","AV",10)
:(khdr-0'vcg-1),usaka,r,ufc,uh,uthcug
^SCR("W3COLORV","AV",11)
:,usaka,uh,utgcm
^SCR("W3COLORV","AV",12)
:(khdr-0'vcg-1),usaka,uh,uthcug
^SCR("W3COLORV","AV",13)
:ohnuka,;scvbnzvkager
^SCR("W3COLORV","AV",14)
:vkcycohyhrpgcm
^SCR("W3COLORV","AV",15)
:vkcyc,upxu,gcm
^SCR("W3COLORV","AV",16)
:vkcyc,urgvgcm
^SCR("W3COLORV","AV",17)
:vkcycjukanhnsgcm
^SCR("W3COLORV","AV",18)
:vkcycvbnzvf"vxgcm
^SCR("W3COLORV","AV",19)
:"ouka,duxrujcktb"vgsuvgcm
^SCR("W3COLORV","AV",20)
:"ouka,vhbu,bkf"vgsuvgcm
^SCR("W3COLORV","AV",21)
:(BOkkuf)ohfxnvrtager
^SCR("W3COLORV","AV",22)
:(BOkkuf)ohfxnvrtac,uh,utgcm
^SCR("W3COLORV","AV",23)
:BOhatryhrp,gcm
^SCR("W3COLORV","NAME")

^SCR("W3COLORV","P",2,"CRD")
1,60,E,4,0
^SCR("W3COLORV","P",2,"FNC")

^SCR("W3COLORV","P",2,"GLOB")
^W3COLOR
^SCR("W3COLORV","P",2,"HELP")

^SCR("W3COLORV","P",2,"LMAX")
4
^SCR("W3COLORV","P",2,"MUMPS1")

^SCR("W3COLORV","P",2,"MUMPS2")

^SCR("W3COLORV","P",2,"MUST")

^SCR("W3COLORV","P",2,"NLN")
20
^SCR("W3COLORV","P",2,"RZD")
\
^SCR("W3COLORV","P",2,"TOPB")
8
^SCR("W3COLORV","P",2,"TYP")
E
^SCR("W3COLORV","P",2,"VRB")
CL1
^SCR("W3COLORV","P",3,"CRD")
1,59,H,30
^SCR("W3COLORV","P",3,"HELP")

^SCR("W3COLORV","P",3,"LMAX")
31
^SCR("W3COLORV","P",3,"MUMPS1")

^SCR("W3COLORV","P",3,"MUMPS2")

^SCR("W3COLORV","P",3,"TYP")
H
^SCR("W3COLORV","P",4,"CRD")
2,19,E,23,0
^SCR("W3COLORV","P",4,"HELP")

^SCR("W3COLORV","P",4,"LMAX")
23
^SCR("W3COLORV","P",4,"MUMPS1")

^SCR("W3COLORV","P",4,"MUMPS2")

^SCR("W3COLORV","P",4,"TYP")
E
^SCR("W3COLORV","P",5,"CRD")
3,19,E,17,0
^SCR("W3COLORV","P",5,"HELP")

^SCR("W3COLORV","P",5,"LMAX")
23
^SCR("W3COLORV","P",5,"MUMPS1")

^SCR("W3COLORV","P",5,"MUMPS2")

^SCR("W3COLORV","P",5,"TYP")
E
^SCR("W3COLORV","P",7,"CRD")
4,25,E,17,0
^SCR("W3COLORV","P",7,"HELP")

^SCR("W3COLORV","P",7,"LMAX")
17
^SCR("W3COLORV","P",7,"MUMPS1")

^SCR("W3COLORV","P",7,"MUMPS2")

^SCR("W3COLORV","P",7,"TYP")
E
^SCR("W3COLORV","P",8,"CRD")
5,25,E,17,0
^SCR("W3COLORV","P",8,"HELP")

^SCR("W3COLORV","P",8,"LMAX")
17
^SCR("W3COLORV","P",8,"MUMPS1")

^SCR("W3COLORV","P",8,"MUMPS2")

^SCR("W3COLORV","P",8,"TYP")
E
^SCR("W3COLORV","P",10,"CRD")
6,25,E,17,0
^SCR("W3COLORV","P",10,"HELP")

^SCR("W3COLORV","P",10,"LMAX")
17
^SCR("W3COLORV","P",10,"MUMPS1")

^SCR("W3COLORV","P",10,"MUMPS2")

^SCR("W3COLORV","P",10,"TYP")
E
^SCR("W3COLORV","P",14,"CRD")
7,25,E,17,0
^SCR("W3COLORV","P",14,"HELP")

^SCR("W3COLORV","P",14,"LMAX")
17
^SCR("W3COLORV","P",14,"MUMPS1")

^SCR("W3COLORV","P",14,"MUMPS2")

^SCR("W3COLORV","P",14,"TYP")
E
^SCR("W3COLORV","P",15,"CRD")
8,25,E,17,0
^SCR("W3COLORV","P",15,"HELP")

^SCR("W3COLORV","P",15,"LMAX")
17
^SCR("W3COLORV","P",15,"MUMPS1")

^SCR("W3COLORV","P",15,"MUMPS2")

^SCR("W3COLORV","P",15,"TYP")
E
^SCR("W3COLORV","P",16,"CRD")
9,25,E,17,0
^SCR("W3COLORV","P",16,"HELP")

^SCR("W3COLORV","P",16,"LMAX")
17
^SCR("W3COLORV","P",16,"MUMPS1")

^SCR("W3COLORV","P",16,"MUMPS2")

^SCR("W3COLORV","P",16,"TYP")
E
^SCR("W3COLORV","P",17,"CRD")
10,19,E,1,0
^SCR("W3COLORV","P",17,"HELP")

^SCR("W3COLORV","P",17,"LMAX")
4
^SCR("W3COLORV","P",17,"MUMPS1")

^SCR("W3COLORV","P",17,"MUMPS2")

^SCR("W3COLORV","P",17,"TYP")
E
^SCR("W3COLORV","P",18,"CRD")
11,25,E,17,0
^SCR("W3COLORV","P",18,"HELP")

^SCR("W3COLORV","P",18,"LMAX")
17
^SCR("W3COLORV","P",18,"MUMPS1")

^SCR("W3COLORV","P",18,"MUMPS2")

^SCR("W3COLORV","P",18,"TYP")
E
^SCR("W3COLORV","P",19,"CRD")
12,26,E,4,0
^SCR("W3COLORV","P",19,"HELP")

^SCR("W3COLORV","P",19,"LMAX")
4
^SCR("W3COLORV","P",19,"MUMPS1")

^SCR("W3COLORV","P",19,"MUMPS2")

^SCR("W3COLORV","P",19,"TYP")
E
^SCR("W3COLORV","P",20,"CRD")
13,25,E,17,0
^SCR("W3COLORV","P",20,"HELP")

^SCR("W3COLORV","P",20,"LMAX")
17
^SCR("W3COLORV","P",20,"MUMPS1")

^SCR("W3COLORV","P",20,"MUMPS2")

^SCR("W3COLORV","P",20,"TYP")
E
^SCR("W3COLORV","P",25,"CRD")
14,25,E,17,0
^SCR("W3COLORV","P",25,"HELP")

^SCR("W3COLORV","P",25,"LMAX")
17
^SCR("W3COLORV","P",25,"MUMPS1")

^SCR("W3COLORV","P",25,"MUMPS2")

^SCR("W3COLORV","P",25,"TYP")
E
^SCR("W3COLORV","P",30,"CRD")
15,25,E,17,0
^SCR("W3COLORV","P",30,"HELP")

^SCR("W3COLORV","P",30,"LMAX")
17
^SCR("W3COLORV","P",30,"MUMPS1")

^SCR("W3COLORV","P",30,"MUMPS2")

^SCR("W3COLORV","P",30,"TYP")
E
^SCR("W3COLORV","P",35,"CRD")
16,25,E,17,0
^SCR("W3COLORV","P",35,"HELP")

^SCR("W3COLORV","P",35,"LMAX")
17
^SCR("W3COLORV","P",35,"MUMPS1")

^SCR("W3COLORV","P",35,"MUMPS2")

^SCR("W3COLORV","P",35,"TYP")
E
^SCR("W3COLORV","P",36,"CRD")
17,25,E,17,0
^SCR("W3COLORV","P",36,"HELP")

^SCR("W3COLORV","P",36,"LMAX")
17
^SCR("W3COLORV","P",36,"MUMPS1")

^SCR("W3COLORV","P",36,"MUMPS2")

^SCR("W3COLORV","P",36,"TYP")
E
^SCR("W3COLORV","P",37,"CRD")
18,25,E,17,0
^SCR("W3COLORV","P",37,"HELP")

^SCR("W3COLORV","P",37,"LMAX")
17
^SCR("W3COLORV","P",37,"MUMPS1")

^SCR("W3COLORV","P",37,"MUMPS2")

^SCR("W3COLORV","P",37,"TYP")
E
^SCR("W3COLORV","P",38,"CRD")
19,25,E,17,0
^SCR("W3COLORV","P",38,"HELP")

^SCR("W3COLORV","P",38,"LMAX")
17
^SCR("W3COLORV","P",38,"MUMPS1")

^SCR("W3COLORV","P",38,"MUMPS2")

^SCR("W3COLORV","P",38,"TYP")
E
^SCR("W3COLORV","P",40,"CRD")
20,25,E,17,0
^SCR("W3COLORV","P",40,"HELP")

^SCR("W3COLORV","P",40,"LMAX")
17
^SCR("W3COLORV","P",40,"MUMPS1")

^SCR("W3COLORV","P",40,"MUMPS2")

^SCR("W3COLORV","P",40,"TYP")
E
^SCR("W3COLORV","P",45,"CRD")
21,19,E,23,0
^SCR("W3COLORV","P",45,"HELP")

^SCR("W3COLORV","P",45,"LMAX")
23
^SCR("W3COLORV","P",45,"MUMPS1")

^SCR("W3COLORV","P",45,"MUMPS2")

^SCR("W3COLORV","P",45,"TYP")
E
^SCR("W3COLORV","P",50,"CRD")
22,25,E,17,0
^SCR("W3COLORV","P",50,"HELP")

^SCR("W3COLORV","P",50,"LMAX")
17
^SCR("W3COLORV","P",50,"MUMPS1")

^SCR("W3COLORV","P",50,"MUMPS2")

^SCR("W3COLORV","P",50,"TYP")
E
^SCR("W3COLORV","P",55,"CRD")
23,25,E,17,0
^SCR("W3COLORV","P",55,"HELP")

^SCR("W3COLORV","P",55,"LMAX")
17
^SCR("W3COLORV","P",55,"MUMPS1")

^SCR("W3COLORV","P",55,"MUMPS2")

^SCR("W3COLORV","P",55,"TYP")
E
^SCR("W3COLORV","P","NAME","BGBODY")
45
^SCR("W3COLORV","P","NAME","BGHD")
5
^SCR("W3COLORV","P","NAME","BGNEXT")
4
^SCR("W3COLORV","P","NAME","BGTB")
20
^SCR("W3COLORV","P","NAME","CL")
2
^SCR("W3COLORV","P","NAME","CL1")
3
^SCR("W3COLORV","P","NAME","FGADDVW")
30
^SCR("W3COLORV","P","NAME","FGBODY")
50
^SCR("W3COLORV","P","NAME","FGCMNTVW")
35
^SCR("W3COLORV","P","NAME","FGDLVPAY")
36
^SCR("W3COLORV","P","NAME","FGENCR")
40
^SCR("W3COLORV","P","NAME","FGFLD")
18
^SCR("W3COLORV","P","NAME","FGHDMSD")
8
^SCR("W3COLORV","P","NAME","FGHDUS")
10
^SCR("W3COLORV","P","NAME","FGITVW")
25
^SCR("W3COLORV","P","NAME","FGODHD1")
14
^SCR("W3COLORV","P","NAME","FGODHD2")
15
^SCR("W3COLORV","P","NAME","FGSUGT")
38
^SCR("W3COLORV","P","NAME","FGTOT")
37
^SCR("W3COLORV","P","NAME","FRHD")
7
^SCR("W3COLORV","P","NAME","FRHDFLD")
16
^SCR("W3COLORV","P","NAME","MENUBO")
55
^SCR("W3COLORV","P","NAME","WGFLD")
19
^SCR("W3COLORV","P","NAME","WGHDFLD")
17
^SCR("W3COLORV","P","NM",2)
CL
^SCR("W3COLORV","P","NM",3)
CL1
^SCR("W3COLORV","P","NM",4)
BGNEXT
^SCR("W3COLORV","P","NM",5)
BGHD
^SCR("W3COLORV","P","NM",7)
FRHD
^SCR("W3COLORV","P","NM",8)
FGHDMSD
^SCR("W3COLORV","P","NM",10)
FGHDUS
^SCR("W3COLORV","P","NM",14)
FGODHD1
^SCR("W3COLORV","P","NM",15)
FGODHD2
^SCR("W3COLORV","P","NM",16)
FRHDFLD
^SCR("W3COLORV","P","NM",17)
WGHDFLD
^SCR("W3COLORV","P","NM",18)
FGFLD
^SCR("W3COLORV","P","NM",19)
WGFLD
^SCR("W3COLORV","P","NM",20)
BGTB
^SCR("W3COLORV","P","NM",25)
FGITVW
^SCR("W3COLORV","P","NM",30)
FGADDVW
^SCR("W3COLORV","P","NM",35)
FGCMNTVW
^SCR("W3COLORV","P","NM",36)
FGDLVPAY
^SCR("W3COLORV","P","NM",37)
FGTOT
^SCR("W3COLORV","P","NM",38)
FGSUGT
^SCR("W3COLORV","P","NM",40)
FGENCR
^SCR("W3COLORV","P","NM",45)
BGBODY
^SCR("W3COLORV","P","NM",50)
FGBODY
^SCR("W3COLORV","P","NM",55)
MENUBO
^SCR("W3COND")
H
^SCR("W3COND",1)
                                                                               
^SCR("W3COND",2)
                                                  1$                           
^SCR("W3COND",3)
                             :      mi`pz      :                               
^SCR("W3COND",4)
                                                                               
^SCR("W3COND",5)
                                                                               
^SCR("W3COND",6)
                                                                               
^SCR("W3COND",7)
                                                                               
^SCR("W3COND",8)
                                                                               
^SCR("W3COND",9)
                                                                               
^SCR("W3COND",10)
                                                                               
^SCR("W3COND",11)
                                                                               
^SCR("W3COND",12)
                                                                               
^SCR("W3COND",13)
                                                                               
^SCR("W3COND",14)
                                                                               
^SCR("W3COND",15)
                                                                               
^SCR("W3COND",16)
                                                                               
^SCR("W3COND",17)
                                                                               
^SCR("W3COND",18)
                                                                               
^SCR("W3COND",19)
                                                                               
^SCR("W3COND",20)
                                                                               
^SCR("W3COND",21)
                                                                               
^SCR("W3COND",22)
                         $1                                                    
^SCR("W3COND","A",1)

^SCR("W3COND","A",2)

^SCR("W3COND","A",3)
�‰€�š
^SCR("W3COND","A",4)
-----------------
^SCR("W3COND","A",5)

^SCR("W3COND","A",6)

^SCR("W3COND","A",7)

^SCR("W3COND","A",8)

^SCR("W3COND","A",9)

^SCR("W3COND","A",10)

^SCR("W3COND","A",11)

^SCR("W3COND","A",12)

^SCR("W3COND","A",13)

^SCR("W3COND","A",14)

^SCR("W3COND","A",15)

^SCR("W3COND","A",16)

^SCR("W3COND","A",17)

^SCR("W3COND","A",18)

^SCR("W3COND","A",19)

^SCR("W3COND","A",20)

^SCR("W3COND","A",21)

^SCR("W3COND","A",22)

^SCR("W3COND","AV",1)

^SCR("W3COND","AV",2)

^SCR("W3COND","AV",3)
ohtb,
^SCR("W3COND","AV",4)
-----------------
^SCR("W3COND","AV",5)

^SCR("W3COND","AV",6)

^SCR("W3COND","AV",7)

^SCR("W3COND","AV",8)

^SCR("W3COND","AV",9)

^SCR("W3COND","AV",10)

^SCR("W3COND","AV",11)

^SCR("W3COND","AV",12)

^SCR("W3COND","AV",13)

^SCR("W3COND","AV",14)

^SCR("W3COND","AV",15)

^SCR("W3COND","AV",16)

^SCR("W3COND","AV",17)

^SCR("W3COND","AV",18)

^SCR("W3COND","AV",19)

^SCR("W3COND","AV",20)

^SCR("W3COND","AV",21)

^SCR("W3COND","AV",22)

^SCR("W3COND","G",1,"CRD")
4,47,H,16,0
^SCR("W3COND","G",1,"HELP")

^SCR("W3COND","G",1,"LMAX")
17
^SCR("W3COND","G",1,"MUMPS1")

^SCR("W3COND","G",1,"MUMPS2")

^SCR("W3COND","G",1,"SHEM")
      mi`pz      
^SCR("W3COND","G",1,"TYP")
H
^SCR("W3COND","G","DEL")
Y
^SCR("W3COND","G","MAX")
9999
^SCR("W3COND","G","NAME","COND")
1
^SCR("W3COND","G","NM",1)
COND
^SCR("W3COND","G","RB")
3,26,23,52
^SCR("W3COND","G","REF")
^TEMP(%L3MYDVN
^SCR("W3COND","G","RZD")
\
^SCR("W3COND","G","STEP")
1
^SCR("W3COND","G","STG")
                             :      mi`pz      :                               
^SCR("W3COND","G","VG")
5
^SCR("W3COND","NAME")

^SCR("W3KASHER")
H
^SCR("W3KASHER",1)
                                                                               
^SCR("W3KASHER",2)
                                                  1$                           
^SCR("W3KASHER",3)
                          :      zexyk beq     :                               
^SCR("W3KASHER",4)
                                                                               
^SCR("W3KASHER",5)
                                                                               
^SCR("W3KASHER",6)
                                                                               
^SCR("W3KASHER",7)
                                                                               
^SCR("W3KASHER",8)
                                                                               
^SCR("W3KASHER",9)
                                                                               
^SCR("W3KASHER",10)
                                                                               
^SCR("W3KASHER",11)
                                                                               
^SCR("W3KASHER",12)
                                                                               
^SCR("W3KASHER",13)
                                                                               
^SCR("W3KASHER",14)
                                                                               
^SCR("W3KASHER",15)
                                                                               
^SCR("W3KASHER",16)
                                                                               
^SCR("W3KASHER",17)
                                                                               
^SCR("W3KASHER",18)
                                                                               
^SCR("W3KASHER",19)
                                                                               
^SCR("W3KASHER",20)
                                                                               
^SCR("W3KASHER",21)
                                                                               
^SCR("W3KASHER",22)
                     $1                                                        
^SCR("W3KASHER","A",1)

^SCR("W3KASHER","A",2)

^SCR("W3KASHER","A",3)
š…˜™‹‚…‘
^SCR("W3KASHER","A",4)
--------------------
^SCR("W3KASHER","A",5)

^SCR("W3KASHER","A",6)

^SCR("W3KASHER","A",7)

^SCR("W3KASHER","A",8)

^SCR("W3KASHER","A",9)

^SCR("W3KASHER","A",10)

^SCR("W3KASHER","A",11)

^SCR("W3KASHER","A",12)

^SCR("W3KASHER","A",13)

^SCR("W3KASHER","A",14)

^SCR("W3KASHER","A",15)

^SCR("W3KASHER","A",16)

^SCR("W3KASHER","A",17)

^SCR("W3KASHER","A",18)

^SCR("W3KASHER","A",19)

^SCR("W3KASHER","A",20)

^SCR("W3KASHER","A",21)

^SCR("W3KASHER","A",22)

^SCR("W3KASHER","AV",1)

^SCR("W3KASHER","AV",2)

^SCR("W3KASHER","AV",3)
,urafdux
^SCR("W3KASHER","AV",4)
--------------------
^SCR("W3KASHER","AV",5)

^SCR("W3KASHER","AV",6)

^SCR("W3KASHER","AV",7)

^SCR("W3KASHER","AV",8)

^SCR("W3KASHER","AV",9)

^SCR("W3KASHER","AV",10)

^SCR("W3KASHER","AV",11)

^SCR("W3KASHER","AV",12)

^SCR("W3KASHER","AV",13)

^SCR("W3KASHER","AV",14)

^SCR("W3KASHER","AV",15)

^SCR("W3KASHER","AV",16)

^SCR("W3KASHER","AV",17)

^SCR("W3KASHER","AV",18)

^SCR("W3KASHER","AV",19)

^SCR("W3KASHER","AV",20)

^SCR("W3KASHER","AV",21)

^SCR("W3KASHER","AV",22)

^SCR("W3KASHER","G",1,"CRD")
4,47,H,16,0
^SCR("W3KASHER","G",1,"HELP")

^SCR("W3KASHER","G",1,"LMAX")
20
^SCR("W3KASHER","G",1,"MUMPS1")

^SCR("W3KASHER","G",1,"MUMPS2")

^SCR("W3KASHER","G",1,"SHEM")
      zexyk beq     
^SCR("W3KASHER","G",1,"TYP")
H
^SCR("W3KASHER","G","DEL")
Y
^SCR("W3KASHER","G","MAX")
9999
^SCR("W3KASHER","G","NAME","KASHER")
1
^SCR("W3KASHER","G","NM",1)
KASHER
^SCR("W3KASHER","G","RB")
3,22,23,52
^SCR("W3KASHER","G","REF")
^TEMP(%L3MYDVN
^SCR("W3KASHER","G","RZD")
\
^SCR("W3KASHER","G","STEP")
1
^SCR("W3KASHER","G","STG")
                          :      zexyk beq     :                               
^SCR("W3KASHER","G","VG")
5
^SCR("W3KASHER","NAME")

^SCR("W3KKIND")
H
^SCR("W3KKIND",1)
                                                                               
^SCR("W3KKIND",2)
                                                  1$                           
^SCR("W3KKIND",3)
                               :   gahn beq   :                                
^SCR("W3KKIND",4)
                                                                               
^SCR("W3KKIND",5)
                                                                               
^SCR("W3KKIND",6)
                                                                               
^SCR("W3KKIND",7)
                                                                               
^SCR("W3KKIND",8)
                                                                               
^SCR("W3KKIND",9)
                                                                               
^SCR("W3KKIND",10)
                                                                               
^SCR("W3KKIND",11)
                                                                               
^SCR("W3KKIND",12)
                                                                               
^SCR("W3KKIND",13)
                                                                               
^SCR("W3KKIND",14)
                                                                               
^SCR("W3KKIND",15)
                                                                               
^SCR("W3KKIND",16)
                                                                               
^SCR("W3KKIND",17)
                                                                               
^SCR("W3KKIND",18)
                                                                               
^SCR("W3KKIND",19)
                                                                               
^SCR("W3KKIND",20)
                                                                               
^SCR("W3KKIND",21)
                                                                               
^SCR("W3KKIND",22)
                          $1                                                   
^SCR("W3KKIND","A",1)

^SCR("W3KKIND","A",2)

^SCR("W3KKIND","A",3)
‡�ˆŽ‚…‘
^SCR("W3KKIND","A",4)
--------------
^SCR("W3KKIND","A",5)

^SCR("W3KKIND","A",6)

^SCR("W3KKIND","A",7)

^SCR("W3KKIND","A",8)

^SCR("W3KKIND","A",9)

^SCR("W3KKIND","A",10)

^SCR("W3KKIND","A",11)

^SCR("W3KKIND","A",12)

^SCR("W3KKIND","A",13)

^SCR("W3KKIND","A",14)

^SCR("W3KKIND","A",15)

^SCR("W3KKIND","A",16)

^SCR("W3KKIND","A",17)

^SCR("W3KKIND","A",18)

^SCR("W3KKIND","A",19)

^SCR("W3KKIND","A",20)

^SCR("W3KKIND","A",21)

^SCR("W3KKIND","A",22)

^SCR("W3KKIND","AV",1)

^SCR("W3KKIND","AV",2)

^SCR("W3KKIND","AV",3)
jcyndux
^SCR("W3KKIND","AV",4)
--------------
^SCR("W3KKIND","AV",5)

^SCR("W3KKIND","AV",6)

^SCR("W3KKIND","AV",7)

^SCR("W3KKIND","AV",8)

^SCR("W3KKIND","AV",9)

^SCR("W3KKIND","AV",10)

^SCR("W3KKIND","AV",11)

^SCR("W3KKIND","AV",12)

^SCR("W3KKIND","AV",13)

^SCR("W3KKIND","AV",14)

^SCR("W3KKIND","AV",15)

^SCR("W3KKIND","AV",16)

^SCR("W3KKIND","AV",17)

^SCR("W3KKIND","AV",18)

^SCR("W3KKIND","AV",19)

^SCR("W3KKIND","AV",20)

^SCR("W3KKIND","AV",21)

^SCR("W3KKIND","AV",22)

^SCR("W3KKIND","G",1,"CRD")
4,46,H,14,0
^SCR("W3KKIND","G",1,"HELP")

^SCR("W3KKIND","G",1,"LMAX")
14
^SCR("W3KKIND","G",1,"MUMPS1")

^SCR("W3KKIND","G",1,"MUMPS2")

^SCR("W3KKIND","G",1,"SHEM")
   gahn beq   
^SCR("W3KKIND","G",1,"TYP")
H
^SCR("W3KKIND","G","DEL")
Y
^SCR("W3KKIND","G","MAX")
9999
^SCR("W3KKIND","G","NAME","KKIND")
1
^SCR("W3KKIND","G","NM",1)
KKIND
^SCR("W3KKIND","G","RB")
3,27,23,52
^SCR("W3KKIND","G","REF")
^TEMP(%L3MYDVN
^SCR("W3KKIND","G","RZD")
\
^SCR("W3KKIND","G","STEP")
1
^SCR("W3KKIND","G","STG")
                               :   gahn beq   :                                
^SCR("W3KKIND","G","VG")
5
^SCR("W3KKIND","NAME")
dniknehctik
^SCR("W3PRICE")
H
^SCR("W3PRICE",1)
                                                                               
^SCR("W3PRICE",2)
                                {05    } : rahn cew                            
^SCR("W3PRICE",3)
                                                  1$                           
^SCR("W3PRICE",4)
                            :     rvenn xign   :                               
^SCR("W3PRICE",5)
                                                                               
^SCR("W3PRICE",6)
                                                                               
^SCR("W3PRICE",7)
                                                                               
^SCR("W3PRICE",8)
                                                                               
^SCR("W3PRICE",9)
                                                                               
^SCR("W3PRICE",10)
                                                                               
^SCR("W3PRICE",11)
                                                                               
^SCR("W3PRICE",12)
                                                                               
^SCR("W3PRICE",13)
                                                                               
^SCR("W3PRICE",14)
                                                                               
^SCR("W3PRICE",15)
                                                                               
^SCR("W3PRICE",16)
                                                                               
^SCR("W3PRICE",17)
                                                                               
^SCR("W3PRICE",18)
                                                                               
^SCR("W3PRICE",19)
                                                                               
^SCR("W3PRICE",20)
                                                                               
^SCR("W3PRICE",21)
                                                                               
^SCR("W3PRICE",22)
                                                                               
^SCR("W3PRICE",23)
                         $1                                                    
^SCR("W3PRICE","A",1)

^SCR("W3PRICE","A",2)
:’�ˆŽƒ…—
^SCR("W3PRICE","A",3)

^SCR("W3PRICE","A",4)
’–…ŽŽ˜‰‡Ž
^SCR("W3PRICE","A",5)
------------------
^SCR("W3PRICE","A",6)

^SCR("W3PRICE","A",7)

^SCR("W3PRICE","A",8)

^SCR("W3PRICE","A",9)

^SCR("W3PRICE","A",10)

^SCR("W3PRICE","A",11)

^SCR("W3PRICE","A",12)

^SCR("W3PRICE","A",13)

^SCR("W3PRICE","A",14)

^SCR("W3PRICE","A",15)

^SCR("W3PRICE","A",16)

^SCR("W3PRICE","A",17)

^SCR("W3PRICE","A",18)

^SCR("W3PRICE","A",19)

^SCR("W3PRICE","A",20)

^SCR("W3PRICE","A",21)

^SCR("W3PRICE","A",22)

^SCR("W3PRICE","A",23)

^SCR("W3PRICE","AV",1)

^SCR("W3PRICE","AV",2)
:gcynsue
^SCR("W3PRICE","AV",3)

^SCR("W3PRICE","AV",4)
gmunnrhjn
^SCR("W3PRICE","AV",5)
------------------
^SCR("W3PRICE","AV",6)

^SCR("W3PRICE","AV",7)

^SCR("W3PRICE","AV",8)

^SCR("W3PRICE","AV",9)

^SCR("W3PRICE","AV",10)

^SCR("W3PRICE","AV",11)

^SCR("W3PRICE","AV",12)

^SCR("W3PRICE","AV",13)

^SCR("W3PRICE","AV",14)

^SCR("W3PRICE","AV",15)

^SCR("W3PRICE","AV",16)

^SCR("W3PRICE","AV",17)

^SCR("W3PRICE","AV",18)

^SCR("W3PRICE","AV",19)

^SCR("W3PRICE","AV",20)

^SCR("W3PRICE","AV",21)

^SCR("W3PRICE","AV",22)

^SCR("W3PRICE","AV",23)

^SCR("W3PRICE","G",1,"CRD")
5,47,H,12,0
^SCR("W3PRICE","G",1,"HELP")

^SCR("W3PRICE","G",1,"LMAX")
18
^SCR("W3PRICE","G",1,"MUMPS1")

^SCR("W3PRICE","G",1,"MUMPS2")

^SCR("W3PRICE","G",1,"SHEM")
     rvenn xign   
^SCR("W3PRICE","G",1,"TYP")
H
^SCR("W3PRICE","G","DEL")
Y
^SCR("W3PRICE","G","MAX")
9999
^SCR("W3PRICE","G","NAME","PRICE")
1
^SCR("W3PRICE","G","NM",1)
PRICE
^SCR("W3PRICE","G","RB")
4,26,24,52
^SCR("W3PRICE","G","REF")
^TEMP(%L3MYDVN
^SCR("W3PRICE","G","RZD")
\
^SCR("W3PRICE","G","STEP")
1
^SCR("W3PRICE","G","STG")
                            :     rvenn xign   :                               
^SCR("W3PRICE","G","VG")
6
^SCR("W3PRICE","NAME")

^SCR("W3PRICE","P",5,"CRD")
2,32,E,7,0
^SCR("W3PRICE","P",5,"HELP")

^SCR("W3PRICE","P",5,"LMAX")
7
^SCR("W3PRICE","P",5,"MUMPS1")

^SCR("W3PRICE","P",5,"MUMPS2")

^SCR("W3PRICE","P",5,"OUTPUT")

^SCR("W3PRICE","P",5,"TYP")
E
^SCR("W3PRICE","P","NAME","MTB")
5
^SCR("W3PRICE","P","NM",5)
MTB
^SCR("W4ADDPAY")
H
^SCR("W4ADDPAY",1)
                             #  micaer g"ec  #                                 
^SCR("W4ADDPAY",2)
                                                        {05      }  jix`z      
^SCR("W4ADDPAY",3)
  {            31}{30 }  dveaw cr     {           26}{25 }  micaer zveawn      
^SCR("W4ADDPAY",4)
 {            41}{40  } caer 'qn cr      {           36}{35  }  caer 'qnn      
^SCR("W4ADDPAY",5)
                                                   {         50} rvand my      
^SCR("W4ADDPAY","A",1)
�‰ƒ�…’‡"…ƒ
^SCR("W4ADDPAY","A",2)
Š‰˜€š
^SCR("W4ADDPAY","A",3)
„–…�—ƒ’�‰ƒ�…’š–…�—Ž
^SCR("W4ADDPAY","A",4)
ƒ�…’'‘Žƒ’ƒ�…’'‘ŽŽ
^SCR("W4ADDPAY","A",5)
’–�Ž„�™
^SCR("W4ADDPAY","AV",1)
ohscugj"us
^SCR("W4ADDPAY","AV",2)
lhrt,
^SCR("W4ADDPAY","AV",3)
vmucesgohscug,mucen
^SCR("W4ADDPAY","AV",4)
scugwxnsgscugwxnn
^SCR("W4ADDPAY","AV",5)
gmcnvoa
^SCR("W4ADDPAY","NAME")

^SCR("W4ADDPAY","P",5,"CRD")
2,56,D,8,0
^SCR("W4ADDPAY","P",5,"HELP")

^SCR("W4ADDPAY","P",5,"LMAX")
9
^SCR("W4ADDPAY","P",5,"MUMPS1")
S:'$G(DAT) DAT=$ZD($H,"DD.MM.YY")
^SCR("W4ADDPAY","P",5,"MUMPS2")

^SCR("W4ADDPAY","P",5,"MUST")

^SCR("W4ADDPAY","P",5,"TYP")
D
^SCR("W4ADDPAY","P",25,"CHECK")
Y
^SCR("W4ADDPAY","P",25,"CRD")
3,53,E,4,0
^SCR("W4ADDPAY","P",25,"FNC")

^SCR("W4ADDPAY","P",25,"GLOB")
LEVKVZ
^SCR("W4ADDPAY","P",25,"HELP")

^SCR("W4ADDPAY","P",25,"LMAX")
4
^SCR("W4ADDPAY","P",25,"MUMPS1")

^SCR("W4ADDPAY","P",25,"MUMPS2")

^SCR("W4ADDPAY","P",25,"NLN")
20
^SCR("W4ADDPAY","P",25,"RZD")
\
^SCR("W4ADDPAY","P",25,"TOPB")
8
^SCR("W4ADDPAY","P",25,"TYP")
E
^SCR("W4ADDPAY","P",25,"VRB")
MESUG1
^SCR("W4ADDPAY","P",26,"CRD")
3,53,H,14
^SCR("W4ADDPAY","P",26,"HELP")

^SCR("W4ADDPAY","P",26,"LMAX")
14
^SCR("W4ADDPAY","P",26,"MUMPS1")

^SCR("W4ADDPAY","P",26,"MUMPS2")

^SCR("W4ADDPAY","P",26,"OUTPUT")

^SCR("W4ADDPAY","P",26,"TYP")
H
^SCR("W4ADDPAY","P",30,"CRD")
3,18,E,4,0
^SCR("W4ADDPAY","P",30,"FNC")

^SCR("W4ADDPAY","P",30,"GLOB")
^LEVKVZ
^SCR("W4ADDPAY","P",30,"HELP")

^SCR("W4ADDPAY","P",30,"LMAX")
4
^SCR("W4ADDPAY","P",30,"MUMPS1")

^SCR("W4ADDPAY","P",30,"MUMPS2")

^SCR("W4ADDPAY","P",30,"NLN")
20
^SCR("W4ADDPAY","P",30,"RZD")
\
^SCR("W4ADDPAY","P",30,"TOPB")
8
^SCR("W4ADDPAY","P",30,"TYP")
E
^SCR("W4ADDPAY","P",30,"VRB")
ADSUG1
^SCR("W4ADDPAY","P",31,"CRD")
3,18,H,15
^SCR("W4ADDPAY","P",31,"HELP")

^SCR("W4ADDPAY","P",31,"LMAX")
15
^SCR("W4ADDPAY","P",31,"MUMPS1")

^SCR("W4ADDPAY","P",31,"MUMPS2")

^SCR("W4ADDPAY","P",31,"OUTPUT")

^SCR("W4ADDPAY","P",31,"TYP")
H
^SCR("W4ADDPAY","P",35,"CRD")
4,56,E,5,0
^SCR("W4ADDPAY","P",35,"FNC")

^SCR("W4ADDPAY","P",35,"GLOB")
^NAME
^SCR("W4ADDPAY","P",35,"HELP")

^SCR("W4ADDPAY","P",35,"LMAX")
5
^SCR("W4ADDPAY","P",35,"MUMPS1")

^SCR("W4ADDPAY","P",35,"MUMPS2")

^SCR("W4ADDPAY","P",35,"NLN")
20
^SCR("W4ADDPAY","P",35,"RZD")
\
^SCR("W4ADDPAY","P",35,"TOPB")
8
^SCR("W4ADDPAY","P",35,"TYP")
E
^SCR("W4ADDPAY","P",35,"VRB")
MESTR1
^SCR("W4ADDPAY","P",36,"CRD")
4,56,H,14
^SCR("W4ADDPAY","P",36,"HELP")

^SCR("W4ADDPAY","P",36,"LMAX")
14
^SCR("W4ADDPAY","P",36,"MUMPS1")

^SCR("W4ADDPAY","P",36,"MUMPS2")

^SCR("W4ADDPAY","P",36,"OUTPUT")

^SCR("W4ADDPAY","P",36,"TYP")
H
^SCR("W4ADDPAY","P",40,"CRD")
4,17,E,5,0
^SCR("W4ADDPAY","P",40,"FNC")

^SCR("W4ADDPAY","P",40,"GLOB")
NAME
^SCR("W4ADDPAY","P",40,"HELP")

^SCR("W4ADDPAY","P",40,"LMAX")
5
^SCR("W4ADDPAY","P",40,"MUMPS1")

^SCR("W4ADDPAY","P",40,"MUMPS2")

^SCR("W4ADDPAY","P",40,"NLN")
20
^SCR("W4ADDPAY","P",40,"RZD")
\
^SCR("W4ADDPAY","P",40,"TOPB")
8
^SCR("W4ADDPAY","P",40,"TYP")
E
^SCR("W4ADDPAY","P",40,"VRB")
ADSTR1
^SCR("W4ADDPAY","P",41,"CRD")
4,17,H,15
^SCR("W4ADDPAY","P",41,"HELP")

^SCR("W4ADDPAY","P",41,"LMAX")
15
^SCR("W4ADDPAY","P",41,"MUMPS1")

^SCR("W4ADDPAY","P",41,"MUMPS2")

^SCR("W4ADDPAY","P",41,"OUTPUT")

^SCR("W4ADDPAY","P",41,"TYP")
H
^SCR("W4ADDPAY","P",50,"CRD")
5,64,H,12,0
^SCR("W4ADDPAY","P",50,"HELP")

^SCR("W4ADDPAY","P",50,"LMAX")
12
^SCR("W4ADDPAY","P",50,"MUMPS1")

^SCR("W4ADDPAY","P",50,"MUMPS2")

^SCR("W4ADDPAY","P",50,"TYP")
H
^SCR("W4ADDPAY","P","NAME","ADSTR1")
41
^SCR("W4ADDPAY","P","NAME","ADSTRING")
40
^SCR("W4ADDPAY","P","NAME","ADSUG")
30
^SCR("W4ADDPAY","P","NAME","ADSUG1")
31
^SCR("W4ADDPAY","P","NAME","DAT")
5
^SCR("W4ADDPAY","P","NAME","DONAME")
50
^SCR("W4ADDPAY","P","NAME","MESTR1")
36
^SCR("W4ADDPAY","P","NAME","MESTRING")
35
^SCR("W4ADDPAY","P","NAME","MESUG")
25
^SCR("W4ADDPAY","P","NAME","MESUG1")
26
^SCR("W4ADDPAY","P","NM",5)
DAT
^SCR("W4ADDPAY","P","NM",25)
MESUG
^SCR("W4ADDPAY","P","NM",26)
MESUG1
^SCR("W4ADDPAY","P","NM",30)
ADSUG
^SCR("W4ADDPAY","P","NM",31)
ADSUG1
^SCR("W4ADDPAY","P","NM",35)
MESTRING
^SCR("W4ADDPAY","P","NM",36)
MESTR1
^SCR("W4ADDPAY","P","NM",40)
ADSTRING
^SCR("W4ADDPAY","P","NM",41)
ADSTR1
^SCR("W4ADDPAY","P","NM",50)
DONAME
^SCR("W4ASHMGR")
H
^SCR("W4ASHMGR",1)
                             {                                    5}: wqrd my  
^SCR("W4ASHMGR",2)
                                                {20         }:dyxen wqer xtqn  
^SCR("W4ASHMGR",3)
                                                                              
^SCR("W4ASHMGR","A",1)
:—‘’„�™
^SCR("W4ASHMGR","A",2)
:„™˜…Ž—‘…’˜”‘Ž
^SCR("W4ASHMGR","A",3)

^SCR("W4ASHMGR","AV",1)
:exgvoa
^SCR("W4ASHMGR","AV",2)
:varunexugrpxn
^SCR("W4ASHMGR","AV",3)

^SCR("W4ASHMGR","NAME")

^SCR("W4ASHMGR","P",5,"CRD")
1,68,H,36
^SCR("W4ASHMGR","P",5,"HELP")

^SCR("W4ASHMGR","P",5,"LMAX")
38
^SCR("W4ASHMGR","P",5,"MUMPS1")

^SCR("W4ASHMGR","P",5,"MUMPS2")

^SCR("W4ASHMGR","P",5,"MUST")

^SCR("W4ASHMGR","P",5,"TYP")
H
^SCR("W4ASHMGR","P",20,"CRD")
2,48,E,9,0
^SCR("W4ASHMGR","P",20,"HELP")

^SCR("W4ASHMGR","P",20,"LMAX")
12
^SCR("W4ASHMGR","P",20,"MUMPS1")

^SCR("W4ASHMGR","P",20,"MUMPS2")

^SCR("W4ASHMGR","P",20,"MUST")

^SCR("W4ASHMGR","P",20,"TYP")
E
^SCR("W4ASHMGR","P","NAME","MURSH")
20
^SCR("W4ASHMGR","P","NAME","NAME")
5
^SCR("W4ASHMGR","P","NM",5)
NAME
^SCR("W4ASHMGR","P","NM",20)
MURSH
^SCR("W4CASHC")
H
^SCR("W4CASHC",1)
                                                                               
^SCR("W4CASHC",2)
                                                                     1$        
^SCR("W4CASHC",3)
                                 g"y {06     } {05  } : 200 ly zexhy           
^SCR("W4CASHC",4)
                                 g"y {11     } {10  } : 100 ly zexhy           
^SCR("W4CASHC",5)
                                 g"y {16     } {15  } :  50 ly zexzy           
^SCR("W4CASHC",6)
                                 g"y {21     } {20  } :  20 ly zexzy           
^SCR("W4CASHC",7)
                                 g"y {26     } {25  } : 10 ly zerahn           
^SCR("W4CASHC",8)
                                 g"y {31     } {30  } :  5 ly zerahn           
^SCR("W4CASHC",9)
                                 g"y {36     } {35  } :  2 ly zerahn           
^SCR("W4CASHC",10)
                                 g"y {41     } {40  } :  1 ly zerahn           
^SCR("W4CASHC",11)
                              $1                                               
^SCR("W4CASHC",12)
                                                                               
^SCR("W4CASHC",13)
                                               g"y {50      } : k"dq           
^SCR("W4CASHC","A",1)

^SCR("W4CASHC","A",2)

^SCR("W4CASHC","A",3)
‡"™200Œ™š…˜ˆ™
^SCR("W4CASHC","A",4)
‡"™100Œ™š…˜ˆ™
^SCR("W4CASHC","A",5)
g"y{06}{05}
^SCR("W4CASHC","A",6)
‡"™20Œ™š…˜š™
^SCR("W4CASHC","A",7)
‡"™10Œ™š…’�ˆŽ
^SCR("W4CASHC","A",8)
‡"™5Œ™š…’�ˆŽ
^SCR("W4CASHC","A",9)
‡"™2Œ™š…’�ˆŽ
^SCR("W4CASHC","A",10)
‡"™1Œ™š…’�ˆŽ
^SCR("W4CASHC","A",11)

^SCR("W4CASHC","A",12)

^SCR("W4CASHC","A",13)
‡"™:‹"„‘
^SCR("W4CASHC","AV",1)

^SCR("W4CASHC","AV",2)

^SCR("W4CASHC","AV",3)
j"a200ka,urya
^SCR("W4CASHC","AV",4)
j"a100ka,urya
^SCR("W4CASHC","AV",5)
g"y{06}{05}
^SCR("W4CASHC","AV",6)
j"a20ka,ur,a
^SCR("W4CASHC","AV",7)
j"a10ka,ugcyn
^SCR("W4CASHC","AV",8)
j"a5ka,ugcyn
^SCR("W4CASHC","AV",9)
j"a2ka,ugcyn
^SCR("W4CASHC","AV",10)
j"a1ka,ugcyn
^SCR("W4CASHC","AV",11)

^SCR("W4CASHC","AV",12)

^SCR("W4CASHC","AV",13)
j"a:f"vx
^SCR("W4CASHC","G","DEL")

^SCR("W4CASHC","G","MAX")

^SCR("W4CASHC","G","RB")
3,31,12,71
^SCR("W4CASHC","G","REF")

^SCR("W4CASHC","G","RZD")

^SCR("W4CASHC","G","STEP")

^SCR("W4CASHC","G","STG")
                                 g"y {06     } {05  } : 200 ly zexhy           
^SCR("W4CASHC","G","VG")
6
^SCR("W4CASHC","NAME")
onefn zxitq
^SCR("W4CASHC","P",5,"CRD")
3,47,N,4,0
^SCR("W4CASHC","P",5,"HELP")

^SCR("W4CASHC","P",5,"LMAX")
5
^SCR("W4CASHC","P",5,"MUMPS1")

^SCR("W4CASHC","P",5,"MUMPS2")

^SCR("W4CASHC","P",5,"TYP")
N
^SCR("W4CASHC","P",6,"CRD")
3,37,N,8,2
^SCR("W4CASHC","P",6,"HELP")

^SCR("W4CASHC","P",6,"LMAX")
8
^SCR("W4CASHC","P",6,"MUMPS1")

^SCR("W4CASHC","P",6,"MUMPS2")

^SCR("W4CASHC","P",6,"TYP")
N
^SCR("W4CASHC","P",10,"CRD")
4,47,N,4,0
^SCR("W4CASHC","P",10,"HELP")

^SCR("W4CASHC","P",10,"LMAX")
5
^SCR("W4CASHC","P",10,"MUMPS1")

^SCR("W4CASHC","P",10,"MUMPS2")

^SCR("W4CASHC","P",10,"TYP")
N
^SCR("W4CASHC","P",11,"CRD")
4,37,N,8,2
^SCR("W4CASHC","P",11,"HELP")

^SCR("W4CASHC","P",11,"LMAX")
8
^SCR("W4CASHC","P",11,"MUMPS1")

^SCR("W4CASHC","P",11,"MUMPS2")

^SCR("W4CASHC","P",11,"OUTPUT")

^SCR("W4CASHC","P",11,"TYP")
N
^SCR("W4CASHC","P",15,"CRD")
5,47,N,4,0
^SCR("W4CASHC","P",15,"HELP")

^SCR("W4CASHC","P",15,"LMAX")
5
^SCR("W4CASHC","P",15,"MUMPS1")

^SCR("W4CASHC","P",15,"MUMPS2")

^SCR("W4CASHC","P",15,"TYP")
N
^SCR("W4CASHC","P",16,"CRD")
5,37,N,8,2
^SCR("W4CASHC","P",16,"HELP")

^SCR("W4CASHC","P",16,"LMAX")
8
^SCR("W4CASHC","P",16,"MUMPS1")

^SCR("W4CASHC","P",16,"MUMPS2")

^SCR("W4CASHC","P",16,"OUTPUT")

^SCR("W4CASHC","P",16,"TYP")
N
^SCR("W4CASHC","P",20,"CRD")
6,47,N,4,0
^SCR("W4CASHC","P",20,"HELP")

^SCR("W4CASHC","P",20,"LMAX")
5
^SCR("W4CASHC","P",20,"MUMPS1")

^SCR("W4CASHC","P",20,"MUMPS2")

^SCR("W4CASHC","P",20,"TYP")
N
^SCR("W4CASHC","P",21,"CRD")
6,37,N,8,2
^SCR("W4CASHC","P",21,"HELP")

^SCR("W4CASHC","P",21,"LMAX")
8
^SCR("W4CASHC","P",21,"MUMPS1")

^SCR("W4CASHC","P",21,"MUMPS2")

^SCR("W4CASHC","P",21,"OUTPUT")

^SCR("W4CASHC","P",21,"TYP")
N
^SCR("W4CASHC","P",25,"CRD")
7,47,N,4,0
^SCR("W4CASHC","P",25,"HELP")

^SCR("W4CASHC","P",25,"LMAX")
5
^SCR("W4CASHC","P",25,"MUMPS1")

^SCR("W4CASHC","P",25,"MUMPS2")

^SCR("W4CASHC","P",25,"TYP")
N
^SCR("W4CASHC","P",26,"CRD")
7,37,N,6,2
^SCR("W4CASHC","P",26,"HELP")

^SCR("W4CASHC","P",26,"LMAX")
8
^SCR("W4CASHC","P",26,"MUMPS1")

^SCR("W4CASHC","P",26,"MUMPS2")

^SCR("W4CASHC","P",26,"OUTPUT")

^SCR("W4CASHC","P",26,"TYP")
N
^SCR("W4CASHC","P",30,"CRD")
8,47,N,4,0
^SCR("W4CASHC","P",30,"HELP")

^SCR("W4CASHC","P",30,"LMAX")
5
^SCR("W4CASHC","P",30,"MUMPS1")

^SCR("W4CASHC","P",30,"MUMPS2")

^SCR("W4CASHC","P",30,"TYP")
N
^SCR("W4CASHC","P",31,"CRD")
8,37,N,8,2
^SCR("W4CASHC","P",31,"HELP")

^SCR("W4CASHC","P",31,"LMAX")
8
^SCR("W4CASHC","P",31,"MUMPS1")

^SCR("W4CASHC","P",31,"MUMPS2")

^SCR("W4CASHC","P",31,"OUTPUT")

^SCR("W4CASHC","P",31,"TYP")
N
^SCR("W4CASHC","P",35,"CRD")
9,47,N,4,0
^SCR("W4CASHC","P",35,"HELP")

^SCR("W4CASHC","P",35,"LMAX")
5
^SCR("W4CASHC","P",35,"MUMPS1")

^SCR("W4CASHC","P",35,"MUMPS2")

^SCR("W4CASHC","P",35,"TYP")
N
^SCR("W4CASHC","P",36,"CRD")
9,37,N,8,2
^SCR("W4CASHC","P",36,"HELP")

^SCR("W4CASHC","P",36,"LMAX")
8
^SCR("W4CASHC","P",36,"MUMPS1")

^SCR("W4CASHC","P",36,"MUMPS2")

^SCR("W4CASHC","P",36,"OUTPUT")

^SCR("W4CASHC","P",36,"TYP")
N
^SCR("W4CASHC","P",40,"CRD")
10,47,N,4,0
^SCR("W4CASHC","P",40,"HELP")

^SCR("W4CASHC","P",40,"LMAX")
5
^SCR("W4CASHC","P",40,"MUMPS1")

^SCR("W4CASHC","P",40,"MUMPS2")

^SCR("W4CASHC","P",40,"TYP")
N
^SCR("W4CASHC","P",41,"CRD")
10,37,N,8,2
^SCR("W4CASHC","P",41,"HELP")

^SCR("W4CASHC","P",41,"LMAX")
8
^SCR("W4CASHC","P",41,"MUMPS1")

^SCR("W4CASHC","P",41,"MUMPS2")

^SCR("W4CASHC","P",41,"OUTPUT")

^SCR("W4CASHC","P",41,"TYP")
N
^SCR("W4CASHC","P",50,"CRD")
13,51,N,9,2
^SCR("W4CASHC","P",50,"HELP")

^SCR("W4CASHC","P",50,"LMAX")
9
^SCR("W4CASHC","P",50,"MUMPS1")

^SCR("W4CASHC","P",50,"MUMPS2")

^SCR("W4CASHC","P",50,"OUTPUT")

^SCR("W4CASHC","P",50,"TYP")
N
^SCR("W4CASHC","P","NAME","M1")
40
^SCR("W4CASHC","P","NAME","M10")
25
^SCR("W4CASHC","P","NAME","M10S")
26
^SCR("W4CASHC","P","NAME","M1S")
41
^SCR("W4CASHC","P","NAME","M2")
35
^SCR("W4CASHC","P","NAME","M2S")
36
^SCR("W4CASHC","P","NAME","M5")
30
^SCR("W4CASHC","P","NAME","M5S")
31
^SCR("W4CASHC","P","NAME","S100")
10
^SCR("W4CASHC","P","NAME","S100S")
11
^SCR("W4CASHC","P","NAME","S20")
20
^SCR("W4CASHC","P","NAME","S200")
5
^SCR("W4CASHC","P","NAME","S200S")
6
^SCR("W4CASHC","P","NAME","S20S")
21
^SCR("W4CASHC","P","NAME","S50")
15
^SCR("W4CASHC","P","NAME","S50S")
16
^SCR("W4CASHC","P","NAME","TOT")
50
^SCR("W4CASHC","P","NM",5)
S200
^SCR("W4CASHC","P","NM",6)
S200S
^SCR("W4CASHC","P","NM",10)
S100
^SCR("W4CASHC","P","NM",11)
S100S
^SCR("W4CASHC","P","NM",15)
S50
^SCR("W4CASHC","P","NM",16)
S50S
^SCR("W4CASHC","P","NM",20)
S20
^SCR("W4CASHC","P","NM",21)
S20S
^SCR("W4CASHC","P","NM",25)
M10
^SCR("W4CASHC","P","NM",26)
M10S
^SCR("W4CASHC","P","NM",30)
M5
^SCR("W4CASHC","P","NM",31)
M5S
^SCR("W4CASHC","P","NM",35)
M2
^SCR("W4CASHC","P","NM",36)
M2S
^SCR("W4CASHC","P","NM",40)
M1
^SCR("W4CASHC","P","NM",41)
M1S
^SCR("W4CASHC","P","NM",50)
TOT
^SCR("W4CLKTO1")
H
^SCR("W4CLKTO1",1)
                               # micaer g"ec #                                 
^SCR("W4CLKTO1",2)
                   {10     } :    jix`z cr    {05      } :    jix`zn           
^SCR("W4CLKTO1",3)
  {               14} {13  } : dveaw cr    {              12} {11 } : dveawn   
^SCR("W4CLKTO1",4)
                     {20   } :caer xtqn cr       {15   } :caer xtqnn           
^SCR("W4CLKTO1",5)
                                                                             1$
^SCR("W4CLKTO1",6)
 : zxekyn:dncwn:yteg: k"dq :zery : zery : zery : zery :ini:     my     :  'qn :
^SCR("W4CLKTO1",7)
 :       : (-) :    : zery : zay :2'qep :1'qep :zelibx:'ar:    caer    : caer :
^SCR("W4CLKTO1",8)
                                                                               
^SCR("W4CLKTO1",9)
                                                                               
^SCR("W4CLKTO1",10)
                                                                               
^SCR("W4CLKTO1",11)
                                                                               
^SCR("W4CLKTO1",12)
                                                                               
^SCR("W4CLKTO1",13)
                                                                               
^SCR("W4CLKTO1",14)
                                                                               
^SCR("W4CLKTO1",15)
                                                                               
^SCR("W4CLKTO1",16)
                                                                               
^SCR("W4CLKTO1",17)
                                                                               
^SCR("W4CLKTO1",18)
                                                                               
^SCR("W4CLKTO1",19)
                                                                               
^SCR("W4CLKTO1",20)
                                                                               
^SCR("W4CLKTO1",21)
 $1                                                                            
^SCR("W4CLKTO1",22)
 {60    }{55   }{53  }{52   }{50   }{45  }{40  }{35   }{30   }                 
^SCR("W4CLKTO1",23)
                                                                               
^SCR("W4CLKTO1","A",1)
�‰ƒ�…’‡"…ƒ
^SCR("W4CLKTO1","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("W4CLKTO1","A",3)
:„–…�—ƒ’:„–…�—Ž
^SCR("W4CLKTO1","A",4)
:ƒ�…’˜”‘Žƒ’:ƒ�…’˜”‘ŽŽ
^SCR("W4CLKTO1","A",5)

^SCR("W4CLKTO1","A",6)
š˜…‹™Ž„Žƒ—Ž™”…‡‹"„‘š…’™š…’™š…’™š…’™‰Ž‰�™'‘Ž
^SCR("W4CLKTO1","A",7)
(-)š…’™š�™2'‘…�1'‘…�š…Œ‰‚˜'�’ƒ�…’ƒ�…’
^SCR("W4CLKTO1","A",8)
------------------------------------------------------------------
^SCR("W4CLKTO1","A",9)

^SCR("W4CLKTO1","A",10)

^SCR("W4CLKTO1","A",11)

^SCR("W4CLKTO1","A",12)

^SCR("W4CLKTO1","A",13)

^SCR("W4CLKTO1","A",14)

^SCR("W4CLKTO1","A",15)

^SCR("W4CLKTO1","A",16)

^SCR("W4CLKTO1","A",17)

^SCR("W4CLKTO1","A",18)

^SCR("W4CLKTO1","A",19)

^SCR("W4CLKTO1","A",20)

^SCR("W4CLKTO1","A",21)

^SCR("W4CLKTO1","A",22)

^SCR("W4CLKTO1","A",23)

^SCR("W4CLKTO1","AV",1)
ohscugj"us
^SCR("W4CLKTO1","AV",2)
:lhrt,sg:lhrt,n
^SCR("W4CLKTO1","AV",3)
:vmucesg:vmucen
^SCR("W4CLKTO1","AV",4)
:scugrpxnsg:scugrpxnn
^SCR("W4CLKTO1","AV",5)

^SCR("W4CLKTO1","AV",6)
,rufanvnsenapujf"vx,uga,uga,uga,ugahnhoawxn
^SCR("W4CLKTO1","AV",7)
(-),uga,ca2wxub1wxub,ukhdrwcgscugscug
^SCR("W4CLKTO1","AV",8)
------------------------------------------------------------------
^SCR("W4CLKTO1","AV",9)

^SCR("W4CLKTO1","AV",10)

^SCR("W4CLKTO1","AV",11)

^SCR("W4CLKTO1","AV",12)

^SCR("W4CLKTO1","AV",13)

^SCR("W4CLKTO1","AV",14)

^SCR("W4CLKTO1","AV",15)

^SCR("W4CLKTO1","AV",16)

^SCR("W4CLKTO1","AV",17)

^SCR("W4CLKTO1","AV",18)

^SCR("W4CLKTO1","AV",19)

^SCR("W4CLKTO1","AV",20)

^SCR("W4CLKTO1","AV",21)

^SCR("W4CLKTO1","AV",22)

^SCR("W4CLKTO1","AV",23)

^SCR("W4CLKTO1","G",1,"CRD")
7,78,E,6,0
^SCR("W4CLKTO1","G",1,"HELP")

^SCR("W4CLKTO1","G",1,"LMAX")
6
^SCR("W4CLKTO1","G",1,"MUMPS1")

^SCR("W4CLKTO1","G",1,"MUMPS2")

^SCR("W4CLKTO1","G",1,"SHEM")
  'qn 
^SCR("W4CLKTO1","G",1,"TYP")
E
^SCR("W4CLKTO1","G",2,"CRD")
7,71,H,12,0
^SCR("W4CLKTO1","G",2,"HELP")

^SCR("W4CLKTO1","G",2,"LMAX")
12
^SCR("W4CLKTO1","G",2,"MUMPS1")

^SCR("W4CLKTO1","G",2,"MUMPS2")

^SCR("W4CLKTO1","G",2,"OUTPUT")

^SCR("W4CLKTO1","G",2,"SHEM")
     my     
^SCR("W4CLKTO1","G",2,"TYP")
H
^SCR("W4CLKTO1","G",3,"CRD")
7,58,N,3,0
^SCR("W4CLKTO1","G",3,"HELP")

^SCR("W4CLKTO1","G",3,"LMAX")
3
^SCR("W4CLKTO1","G",3,"MUMPS1")

^SCR("W4CLKTO1","G",3,"MUMPS2")

^SCR("W4CLKTO1","G",3,"OUTPUT")

^SCR("W4CLKTO1","G",3,"SHEM")
ini
^SCR("W4CLKTO1","G",3,"TYP")
N
^SCR("W4CLKTO1","G",4,"CRD")
7,54,E,5,0
^SCR("W4CLKTO1","G",4,"HELP")

^SCR("W4CLKTO1","G",4,"LMAX")
6
^SCR("W4CLKTO1","G",4,"MUMPS1")

^SCR("W4CLKTO1","G",4,"MUMPS2")

^SCR("W4CLKTO1","G",4,"OUTPUT")

^SCR("W4CLKTO1","G",4,"SHEM")
 zery 
^SCR("W4CLKTO1","G",4,"TYP")
E
^SCR("W4CLKTO1","G",5,"CRD")
7,47,E,6,0
^SCR("W4CLKTO1","G",5,"HELP")

^SCR("W4CLKTO1","G",5,"LMAX")
6
^SCR("W4CLKTO1","G",5,"MUMPS1")

^SCR("W4CLKTO1","G",5,"MUMPS2")

^SCR("W4CLKTO1","G",5,"SHEM")
 zery 
^SCR("W4CLKTO1","G",5,"TYP")
E
^SCR("W4CLKTO1","G",6,"CRD")
7,40,E,6,0
^SCR("W4CLKTO1","G",6,"HELP")

^SCR("W4CLKTO1","G",6,"LMAX")
6
^SCR("W4CLKTO1","G",6,"MUMPS1")

^SCR("W4CLKTO1","G",6,"MUMPS2")

^SCR("W4CLKTO1","G",6,"SHEM")
 zery 
^SCR("W4CLKTO1","G",6,"TYP")
E
^SCR("W4CLKTO1","G",7,"CRD")
7,33,E,5,0
^SCR("W4CLKTO1","G",7,"HELP")

^SCR("W4CLKTO1","G",7,"LMAX")
5
^SCR("W4CLKTO1","G",7,"MUMPS1")

^SCR("W4CLKTO1","G",7,"MUMPS2")

^SCR("W4CLKTO1","G",7,"SHEM")
zery 
^SCR("W4CLKTO1","G",7,"TYP")
E
^SCR("W4CLKTO1","G",8,"CRD")
7,27,E,6,0
^SCR("W4CLKTO1","G",8,"HELP")

^SCR("W4CLKTO1","G",8,"LMAX")
6
^SCR("W4CLKTO1","G",8,"MUMPS1")

^SCR("W4CLKTO1","G",8,"MUMPS2")

^SCR("W4CLKTO1","G",8,"OUTPUT")

^SCR("W4CLKTO1","G",8,"SHEM")
 k"dq 
^SCR("W4CLKTO1","G",8,"TYP")
E
^SCR("W4CLKTO1","G",9,"CRD")
7,20,E,4,0
^SCR("W4CLKTO1","G",9,"HELP")

^SCR("W4CLKTO1","G",9,"LMAX")
4
^SCR("W4CLKTO1","G",9,"MUMPS1")

^SCR("W4CLKTO1","G",9,"MUMPS2")

^SCR("W4CLKTO1","G",9,"OUTPUT")

^SCR("W4CLKTO1","G",9,"SHEM")
yteg
^SCR("W4CLKTO1","G",9,"TYP")
E
^SCR("W4CLKTO1","G",10,"CRD")
7,15,N,4,1
^SCR("W4CLKTO1","G",10,"HELP")

^SCR("W4CLKTO1","G",10,"LMAX")
5
^SCR("W4CLKTO1","G",10,"MUMPS1")

^SCR("W4CLKTO1","G",10,"MUMPS2")

^SCR("W4CLKTO1","G",10,"OUTPUT")

^SCR("W4CLKTO1","G",10,"SHEM")
dncwn
^SCR("W4CLKTO1","G",10,"TYP")
N
^SCR("W4CLKTO1","G",11,"CRD")
7,9,N,7,1
^SCR("W4CLKTO1","G",11,"HELP")

^SCR("W4CLKTO1","G",11,"LMAX")
7
^SCR("W4CLKTO1","G",11,"MUMPS1")

^SCR("W4CLKTO1","G",11,"MUMPS2")

^SCR("W4CLKTO1","G",11,"OUTPUT")

^SCR("W4CLKTO1","G",11,"SHEM")
 zxekyn
^SCR("W4CLKTO1","G",11,"TYP")
N
^SCR("W4CLKTO1","G","DEL")

^SCR("W4CLKTO1","G","MAX")
99999
^SCR("W4CLKTO1","G","NAME","AV")
3
^SCR("W4CLKTO1","G","NAME","HF")
9
^SCR("W4CLKTO1","G","NAME","MKDM")
10
^SCR("W4CLKTO1","G","NAME","MSP")
1
^SCR("W4CLKTO1","G","NAME","NAME")
2
^SCR("W4CLKTO1","G","NAME","SHAOT")
4
^SCR("W4CLKTO1","G","NAME","SHAOT1")
5
^SCR("W4CLKTO1","G","NAME","SHAOT2")
6
^SCR("W4CLKTO1","G","NAME","SHAOTA")
8
^SCR("W4CLKTO1","G","NAME","SHAOTS")
7
^SCR("W4CLKTO1","G","NAME","SLR")
11
^SCR("W4CLKTO1","G","NM",1)
MSP
^SCR("W4CLKTO1","G","NM",2)
NAME
^SCR("W4CLKTO1","G","NM",3)
AV
^SCR("W4CLKTO1","G","NM",4)
SHAOT
^SCR("W4CLKTO1","G","NM",5)
SHAOT1
^SCR("W4CLKTO1","G","NM",6)
SHAOT2
^SCR("W4CLKTO1","G","NM",7)
SHAOTS
^SCR("W4CLKTO1","G","NM",8)
SHAOTA
^SCR("W4CLKTO1","G","NM",9)
HF
^SCR("W4CLKTO1","G","NM",10)
MKDM
^SCR("W4CLKTO1","G","NM",11)
SLR
^SCR("W4CLKTO1","G","RB")
6,2,22,79
^SCR("W4CLKTO1","G","REF")
^TEMP($P
^SCR("W4CLKTO1","G","RZD")
\
^SCR("W4CLKTO1","G","STEP")
1
^SCR("W4CLKTO1","G","STG")
 : zxekyn:dncwn:yteg: k"dq :zery : zery : zery : zery :ini:     my     :  'qn :
^SCR("W4CLKTO1","G","VG")
9
^SCR("W4CLKTO1","NAME")

^SCR("W4CLKTO1","P",5,"CRD")
2,46,D,8,0
^SCR("W4CLKTO1","P",5,"HELP")

^SCR("W4CLKTO1","P",5,"LMAX")
9
^SCR("W4CLKTO1","P",5,"MUMPS1")
S:'$G(DAT11) DAT11=$ZD($H,"DD.MM.YY")
^SCR("W4CLKTO1","P",5,"MUMPS2")
S DAT1=$$^%L1DC(DAT11,2)
^SCR("W4CLKTO1","P",5,"TYP")
D
^SCR("W4CLKTO1","P",10,"CRD")
2,19,D,8,0
^SCR("W4CLKTO1","P",10,"HELP")

^SCR("W4CLKTO1","P",10,"LMAX")
8
^SCR("W4CLKTO1","P",10,"MUMPS1")
S:'$G(DAT21) DAT21=DAT11 
^SCR("W4CLKTO1","P",10,"MUMPS2")
S DAT2=$$^%L1DC(DAT21,2)
^SCR("W4CLKTO1","P",10,"TYP")
D
^SCR("W4CLKTO1","P",11,"CRD")
3,62,E,4,0
^SCR("W4CLKTO1","P",11,"FNC")

^SCR("W4CLKTO1","P",11,"GLOB")
LEVKVZ
^SCR("W4CLKTO1","P",11,"HELP")

^SCR("W4CLKTO1","P",11,"LMAX")
4
^SCR("W4CLKTO1","P",11,"MUMPS1")

^SCR("W4CLKTO1","P",11,"MUMPS2")

^SCR("W4CLKTO1","P",11,"NLN")
20
^SCR("W4CLKTO1","P",11,"RZD")
\
^SCR("W4CLKTO1","P",11,"TOPB")
8
^SCR("W4CLKTO1","P",11,"TYP")
E
^SCR("W4CLKTO1","P",11,"VRB")
MESUG1
^SCR("W4CLKTO1","P",12,"CRD")
3,61,H,16
^SCR("W4CLKTO1","P",12,"HELP")

^SCR("W4CLKTO1","P",12,"LMAX")
17
^SCR("W4CLKTO1","P",12,"MUMPS1")

^SCR("W4CLKTO1","P",12,"MUMPS2")

^SCR("W4CLKTO1","P",12,"OUTPUT")

^SCR("W4CLKTO1","P",12,"TYP")
H
^SCR("W4CLKTO1","P",13,"CRD")
3,22,E,5,0
^SCR("W4CLKTO1","P",13,"FNC")

^SCR("W4CLKTO1","P",13,"GLOB")
LEVKVZ
^SCR("W4CLKTO1","P",13,"HELP")

^SCR("W4CLKTO1","P",13,"LMAX")
5
^SCR("W4CLKTO1","P",13,"MUMPS1")
S:'$G(ADSUG) ADSUG=MESUG
^SCR("W4CLKTO1","P",13,"MUMPS2")
I ADSUG<MESUG S %SC("ER")=1
^SCR("W4CLKTO1","P",13,"NLN")
20
^SCR("W4CLKTO1","P",13,"RZD")
\
^SCR("W4CLKTO1","P",13,"TOPB")
8
^SCR("W4CLKTO1","P",13,"TYP")
E
^SCR("W4CLKTO1","P",13,"VRB")
ADSUG1
^SCR("W4CLKTO1","P",14,"CRD")
3,21,H,16
^SCR("W4CLKTO1","P",14,"HELP")

^SCR("W4CLKTO1","P",14,"LMAX")
18
^SCR("W4CLKTO1","P",14,"MUMPS1")

^SCR("W4CLKTO1","P",14,"MUMPS2")

^SCR("W4CLKTO1","P",14,"OUTPUT")

^SCR("W4CLKTO1","P",14,"TYP")
H
^SCR("W4CLKTO1","P",15,"CRD")
4,49,N,5.,0
^SCR("W4CLKTO1","P",15,"FNC")

^SCR("W4CLKTO1","P",15,"GLOB")
NAME
^SCR("W4CLKTO1","P",15,"HELP")

^SCR("W4CLKTO1","P",15,"LMAX")
6
^SCR("W4CLKTO1","P",15,"MUMPS1")

^SCR("W4CLKTO1","P",15,"MUMPS2")

^SCR("W4CLKTO1","P",15,"NLN")
20
^SCR("W4CLKTO1","P",15,"RZD")
\
^SCR("W4CLKTO1","P",15,"TOPB")
8
^SCR("W4CLKTO1","P",15,"TYP")
N
^SCR("W4CLKTO1","P",20,"CRD")
4,21,N,5.,0
^SCR("W4CLKTO1","P",20,"FNC")

^SCR("W4CLKTO1","P",20,"GLOB")
NAME
^SCR("W4CLKTO1","P",20,"HELP")

^SCR("W4CLKTO1","P",20,"LMAX")
6
^SCR("W4CLKTO1","P",20,"MUMPS1")
S:'$G(STRING2) STRING2=90000
^SCR("W4CLKTO1","P",20,"MUMPS2")
S:STRING2<STRING1 %SC("ER")=1 Q:$D(%SC("ER"))  D GET^W4CLKTOT
^SCR("W4CLKTO1","P",20,"NLN")
20
^SCR("W4CLKTO1","P",20,"RZD")
\
^SCR("W4CLKTO1","P",20,"TOPB")
8
^SCR("W4CLKTO1","P",20,"TYP")
N
^SCR("W4CLKTO1","P",30,"CRD")
22,55,E,6,0
^SCR("W4CLKTO1","P",30,"HELP")

^SCR("W4CLKTO1","P",30,"LMAX")
6
^SCR("W4CLKTO1","P",30,"MUMPS1")

^SCR("W4CLKTO1","P",30,"MUMPS2")

^SCR("W4CLKTO1","P",30,"OUTPUT")

^SCR("W4CLKTO1","P",30,"TYP")
E
^SCR("W4CLKTO1","P",35,"CRD")
22,48,E,6,0
^SCR("W4CLKTO1","P",35,"HELP")

^SCR("W4CLKTO1","P",35,"LMAX")
6
^SCR("W4CLKTO1","P",35,"MUMPS1")

^SCR("W4CLKTO1","P",35,"MUMPS2")

^SCR("W4CLKTO1","P",35,"OUTPUT")

^SCR("W4CLKTO1","P",35,"TYP")
E
^SCR("W4CLKTO1","P",40,"CRD")
22,42,E,5,0
^SCR("W4CLKTO1","P",40,"HELP")

^SCR("W4CLKTO1","P",40,"LMAX")
5
^SCR("W4CLKTO1","P",40,"MUMPS1")

^SCR("W4CLKTO1","P",40,"MUMPS2")

^SCR("W4CLKTO1","P",40,"OUTPUT")

^SCR("W4CLKTO1","P",40,"TYP")
E
^SCR("W4CLKTO1","P",45,"CRD")
22,36,E,5,0
^SCR("W4CLKTO1","P",45,"HELP")

^SCR("W4CLKTO1","P",45,"LMAX")
5
^SCR("W4CLKTO1","P",45,"MUMPS1")

^SCR("W4CLKTO1","P",45,"MUMPS2")

^SCR("W4CLKTO1","P",45,"OUTPUT")

^SCR("W4CLKTO1","P",45,"TYP")
E
^SCR("W4CLKTO1","P",50,"CRD")
22,29,E,6,0
^SCR("W4CLKTO1","P",50,"HELP")

^SCR("W4CLKTO1","P",50,"LMAX")
6
^SCR("W4CLKTO1","P",50,"MUMPS1")

^SCR("W4CLKTO1","P",50,"MUMPS2")

^SCR("W4CLKTO1","P",50,"OUTPUT")

^SCR("W4CLKTO1","P",50,"TYP")
E
^SCR("W4CLKTO1","P",52,"CRD")
22,22,E,6,0
^SCR("W4CLKTO1","P",52,"HELP")

^SCR("W4CLKTO1","P",52,"LMAX")
6
^SCR("W4CLKTO1","P",52,"MUMPS1")

^SCR("W4CLKTO1","P",52,"MUMPS2")

^SCR("W4CLKTO1","P",52,"OUTPUT")

^SCR("W4CLKTO1","P",52,"TYP")
E
^SCR("W4CLKTO1","P",53,"CRD")
22,16,N,5,0
^SCR("W4CLKTO1","P",53,"HELP")

^SCR("W4CLKTO1","P",53,"LMAX")
5
^SCR("W4CLKTO1","P",53,"MUMPS1")

^SCR("W4CLKTO1","P",53,"MUMPS2")

^SCR("W4CLKTO1","P",53,"OUTPUT")

^SCR("W4CLKTO1","P",53,"TYP")
N
^SCR("W4CLKTO1","P",55,"CRD")
22,9,N,6,1
^SCR("W4CLKTO1","P",55,"HELP")

^SCR("W4CLKTO1","P",55,"LMAX")
6
^SCR("W4CLKTO1","P",55,"MUMPS1")

^SCR("W4CLKTO1","P",55,"MUMPS2")

^SCR("W4CLKTO1","P",55,"OUTPUT")

^SCR("W4CLKTO1","P",55,"TYP")
N
^SCR("W4CLKTO1","P",60,"CRD")
22,1,N,6,1
^SCR("W4CLKTO1","P",60,"HELP")

^SCR("W4CLKTO1","P",60,"LMAX")
7
^SCR("W4CLKTO1","P",60,"MUMPS1")

^SCR("W4CLKTO1","P",60,"MUMPS2")

^SCR("W4CLKTO1","P",60,"OUTPUT")

^SCR("W4CLKTO1","P",60,"TYP")
N
^SCR("W4CLKTO1","P","NAME","ADSUG")
13
^SCR("W4CLKTO1","P","NAME","ADSUG1")
14
^SCR("W4CLKTO1","P","NAME","DAT11")
5
^SCR("W4CLKTO1","P","NAME","DAT21")
10
^SCR("W4CLKTO1","P","NAME","MESUG")
11
^SCR("W4CLKTO1","P","NAME","MESUG1")
12
^SCR("W4CLKTO1","P","NAME","SLR")
60
^SCR("W4CLKTO1","P","NAME","STRING1")
15
^SCR("W4CLKTO1","P","NAME","STRING2")
20
^SCR("W4CLKTO1","P","NAME","SUMAV")
30
^SCR("W4CLKTO1","P","NAME","SUMHF")
53
^SCR("W4CLKTO1","P","NAME","SUMMKD")
55
^SCR("W4CLKTO1","P","NAME","SUMSH")
35
^SCR("W4CLKTO1","P","NAME","SUMSH1")
40
^SCR("W4CLKTO1","P","NAME","SUMSH2")
45
^SCR("W4CLKTO1","P","NAME","SUMSHA")
52
^SCR("W4CLKTO1","P","NAME","SUMSHS")
50
^SCR("W4CLKTO1","P","NM",5)
DAT11
^SCR("W4CLKTO1","P","NM",10)
DAT21
^SCR("W4CLKTO1","P","NM",11)
MESUG
^SCR("W4CLKTO1","P","NM",12)
MESUG1
^SCR("W4CLKTO1","P","NM",13)
ADSUG
^SCR("W4CLKTO1","P","NM",14)
ADSUG1
^SCR("W4CLKTO1","P","NM",15)
STRING1
^SCR("W4CLKTO1","P","NM",20)
STRING2
^SCR("W4CLKTO1","P","NM",30)
SUMAV
^SCR("W4CLKTO1","P","NM",35)
SUMSH
^SCR("W4CLKTO1","P","NM",40)
SUMSH1
^SCR("W4CLKTO1","P","NM",45)
SUMSH2
^SCR("W4CLKTO1","P","NM",50)
SUMSHS
^SCR("W4CLKTO1","P","NM",52)
SUMSHA
^SCR("W4CLKTO1","P","NM",53)
SUMHF
^SCR("W4CLKTO1","P","NM",55)
SUMMKD
^SCR("W4CLKTO1","P","NM",60)
SLR
^SCR("W4CLKTOT")
H
^SCR("W4CLKTOT",1)
                               # micaer g"ec #                                 
^SCR("W4CLKTOT",2)
                      {10     }     jix`z cr    {05      }    jix`zn           
^SCR("W4CLKTOT",3)
  {               14} {13  } : dveaw cr    {              12} {11 } : dveawn   
^SCR("W4CLKTOT",4)
                     {20   } :caer xtqn cr       {15   } :caer xtqnn           
^SCR("W4CLKTOT",5)
                                                   {22} zxekyn bivdl           
^SCR("W4CLKTOT",6)
               {24 } : ( 1 - dxv zqtcn , 2- dagx zqtcn ) qitcdl o`il           
^SCR("W4CLKTOT",7)
                                                                             1$
^SCR("W4CLKTOT",8)
 : zxekyn : dncwn : qepea : yteg: 'lin: dlgn: ini : zery :     my     :  'qn : 
^SCR("W4CLKTOT",9)
 :        : ( - ) :       :     :     :     :dcear:dcear :    caer    : caer : 
^SCR("W4CLKTOT",10)
                                                                               
^SCR("W4CLKTOT",11)
                                                                               
^SCR("W4CLKTOT",12)
                                                                               
^SCR("W4CLKTOT",13)
                                                                               
^SCR("W4CLKTOT",14)
                                                                               
^SCR("W4CLKTOT",15)
                                                                               
^SCR("W4CLKTOT",16)
                                                                               
^SCR("W4CLKTOT",17)
                                                                               
^SCR("W4CLKTOT",18)
                                                                               
^SCR("W4CLKTOT",19)
                                                                               
^SCR("W4CLKTOT",20)
                                                                               
^SCR("W4CLKTOT",21)
                                                                               
^SCR("W4CLKTOT",22)
                                                                               
^SCR("W4CLKTOT",23)
 $1                                                                            
^SCR("W4CLKTOT",24)
 {60     }{55    }{52    }{50  }{45  }{40  }{35  }{30   }                      
^SCR("W4CLKTOT","A",1)
�‰ƒ�…’‡"…ƒ
^SCR("W4CLKTOT","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("W4CLKTOT","A",3)
:„–…�—ƒ’:„–…�—Ž
^SCR("W4CLKTOT","A",4)
:ƒ�…’˜”‘Žƒ’:ƒ�…’˜”‘ŽŽ
^SCR("W4CLKTOT","A",5)
š˜…‹™Ž‚‰–„Œ
^SCR("W4CLKTOT","A",6)
:(1-„˜–š‘”ƒŽ,2-„�‡˜š‘”ƒŽ)‘‰”ƒ„Œ�€‰Œ
^SCR("W4CLKTOT","A",7)

^SCR("W4CLKTOT","A",8)
š˜…‹™Ž„Žƒ—Ž‘…�…�™”…‡'Œ‰Ž„Œ‡Ž‰Ž‰š…’™�™'‘Ž
^SCR("W4CLKTOT","A",9)
(-)„ƒ…�’„ƒ…�’ƒ�…’ƒ�…’
^SCR("W4CLKTOT","A",10)
-------------------------------------------------------------------
^SCR("W4CLKTOT","A",11)

^SCR("W4CLKTOT","A",12)

^SCR("W4CLKTOT","A",13)

^SCR("W4CLKTOT","A",14)

^SCR("W4CLKTOT","A",15)

^SCR("W4CLKTOT","A",16)

^SCR("W4CLKTOT","A",17)

^SCR("W4CLKTOT","A",18)

^SCR("W4CLKTOT","A",19)

^SCR("W4CLKTOT","A",20)

^SCR("W4CLKTOT","A",21)

^SCR("W4CLKTOT","A",22)

^SCR("W4CLKTOT","A",23)

^SCR("W4CLKTOT","A",24)

^SCR("W4CLKTOT","AV",1)
ohscugj"us
^SCR("W4CLKTOT","AV",2)
lhrt,sglhrt,n
^SCR("W4CLKTOT","AV",3)
:vmucesg:vmucen
^SCR("W4CLKTOT","AV",4)
:scugrpxnsg:scugrpxnn
^SCR("W4CLKTOT","AV",5)
,rufandhmvk
^SCR("W4CLKTOT","AV",6)
:(1-vrm,xpsn'2-vcjr,xpsn)xhpsvkithk
^SCR("W4CLKTOT","AV",7)

^SCR("W4CLKTOT","AV",8)
,rufanvnsenxubucapujwkhnvkjnhnh,ugaoawxn
^SCR("W4CLKTOT","AV",9)
(-)vsucgvsucgscugscug
^SCR("W4CLKTOT","AV",10)
-------------------------------------------------------------------
^SCR("W4CLKTOT","AV",11)

^SCR("W4CLKTOT","AV",12)

^SCR("W4CLKTOT","AV",13)

^SCR("W4CLKTOT","AV",14)

^SCR("W4CLKTOT","AV",15)

^SCR("W4CLKTOT","AV",16)

^SCR("W4CLKTOT","AV",17)

^SCR("W4CLKTOT","AV",18)

^SCR("W4CLKTOT","AV",19)

^SCR("W4CLKTOT","AV",20)

^SCR("W4CLKTOT","AV",21)

^SCR("W4CLKTOT","AV",22)

^SCR("W4CLKTOT","AV",23)

^SCR("W4CLKTOT","AV",24)

^SCR("W4CLKTOT","G",1,"CRD")
9,77,E,6,0
^SCR("W4CLKTOT","G",1,"HELP")

^SCR("W4CLKTOT","G",1,"LMAX")
6
^SCR("W4CLKTOT","G",1,"MUMPS1")

^SCR("W4CLKTOT","G",1,"MUMPS2")

^SCR("W4CLKTOT","G",1,"SHEM")
  'qn 
^SCR("W4CLKTOT","G",1,"TYP")
E
^SCR("W4CLKTOT","G",2,"CRD")
9,70,H,12,0
^SCR("W4CLKTOT","G",2,"HELP")

^SCR("W4CLKTOT","G",2,"LMAX")
12
^SCR("W4CLKTOT","G",2,"MUMPS1")

^SCR("W4CLKTOT","G",2,"MUMPS2")

^SCR("W4CLKTOT","G",2,"OUTPUT")

^SCR("W4CLKTOT","G",2,"SHEM")
     my     
^SCR("W4CLKTOT","G",2,"TYP")
H
^SCR("W4CLKTOT","G",3,"CRD")
9,57,E,6,0
^SCR("W4CLKTOT","G",3,"HELP")

^SCR("W4CLKTOT","G",3,"LMAX")
6
^SCR("W4CLKTOT","G",3,"MUMPS1")

^SCR("W4CLKTOT","G",3,"MUMPS2")

^SCR("W4CLKTOT","G",3,"OUTPUT")

^SCR("W4CLKTOT","G",3,"SHEM")
 zery 
^SCR("W4CLKTOT","G",3,"TYP")
E
^SCR("W4CLKTOT","G",4,"CRD")
9,50,N,4,0
^SCR("W4CLKTOT","G",4,"HELP")

^SCR("W4CLKTOT","G",4,"LMAX")
5
^SCR("W4CLKTOT","G",4,"MUMPS1")

^SCR("W4CLKTOT","G",4,"MUMPS2")

^SCR("W4CLKTOT","G",4,"OUTPUT")

^SCR("W4CLKTOT","G",4,"SHEM")
 ini 
^SCR("W4CLKTOT","G",4,"TYP")
N
^SCR("W4CLKTOT","G",5,"CRD")
9,44,E,5,0
^SCR("W4CLKTOT","G",5,"HELP")

^SCR("W4CLKTOT","G",5,"LMAX")
5
^SCR("W4CLKTOT","G",5,"MUMPS1")

^SCR("W4CLKTOT","G",5,"MUMPS2")

^SCR("W4CLKTOT","G",5,"OUTPUT")

^SCR("W4CLKTOT","G",5,"SHEM")
 dlgn
^SCR("W4CLKTOT","G",5,"TYP")
E
^SCR("W4CLKTOT","G",6,"CRD")
9,38,E,5,0
^SCR("W4CLKTOT","G",6,"HELP")

^SCR("W4CLKTOT","G",6,"LMAX")
5
^SCR("W4CLKTOT","G",6,"MUMPS1")

^SCR("W4CLKTOT","G",6,"MUMPS2")

^SCR("W4CLKTOT","G",6,"OUTPUT")

^SCR("W4CLKTOT","G",6,"SHEM")
 'lin
^SCR("W4CLKTOT","G",6,"TYP")
E
^SCR("W4CLKTOT","G",7,"CRD")
9,32,E,5,0
^SCR("W4CLKTOT","G",7,"HELP")

^SCR("W4CLKTOT","G",7,"LMAX")
5
^SCR("W4CLKTOT","G",7,"MUMPS1")

^SCR("W4CLKTOT","G",7,"MUMPS2")

^SCR("W4CLKTOT","G",7,"OUTPUT")

^SCR("W4CLKTOT","G",7,"SHEM")
 yteg
^SCR("W4CLKTOT","G",7,"TYP")
E
^SCR("W4CLKTOT","G",8,"CRD")
9,26,N,7,1
^SCR("W4CLKTOT","G",8,"HELP")

^SCR("W4CLKTOT","G",8,"LMAX")
7
^SCR("W4CLKTOT","G",8,"MUMPS1")

^SCR("W4CLKTOT","G",8,"MUMPS2")

^SCR("W4CLKTOT","G",8,"OUTPUT")

^SCR("W4CLKTOT","G",8,"SHEM")
 qepea 
^SCR("W4CLKTOT","G",8,"TYP")
N
^SCR("W4CLKTOT","G",9,"CRD")
9,18,N,7,2
^SCR("W4CLKTOT","G",9,"HELP")

^SCR("W4CLKTOT","G",9,"LMAX")
7
^SCR("W4CLKTOT","G",9,"MUMPS1")

^SCR("W4CLKTOT","G",9,"MUMPS2")

^SCR("W4CLKTOT","G",9,"OUTPUT")

^SCR("W4CLKTOT","G",9,"SHEM")
 dncwn 
^SCR("W4CLKTOT","G",9,"TYP")
N
^SCR("W4CLKTOT","G",10,"CRD")
9,10,N,8,2
^SCR("W4CLKTOT","G",10,"HELP")

^SCR("W4CLKTOT","G",10,"LMAX")
8
^SCR("W4CLKTOT","G",10,"MUMPS1")

^SCR("W4CLKTOT","G",10,"MUMPS2")

^SCR("W4CLKTOT","G",10,"OUTPUT")

^SCR("W4CLKTOT","G",10,"SHEM")
 zxekyn 
^SCR("W4CLKTOT","G",10,"TYP")
N
^SCR("W4CLKTOT","G","DEL")

^SCR("W4CLKTOT","G","MAX")
99999
^SCR("W4CLKTOT","G","NAME","AVJ")
4
^SCR("W4CLKTOT","G","NAME","AVS")
3
^SCR("W4CLKTOT","G","NAME","BONUS")
9
^SCR("W4CLKTOT","G","NAME","HF")
7
^SCR("W4CLKTOT","G","NAME","MHL")
5
^SCR("W4CLKTOT","G","NAME","MKDM")
8
^SCR("W4CLKTOT","G","NAME","ML")
6
^SCR("W4CLKTOT","G","NAME","MSP")
1
^SCR("W4CLKTOT","G","NAME","NAME")
2
^SCR("W4CLKTOT","G","NAME","SLR1")
10
^SCR("W4CLKTOT","G","NM",1)
MSP
^SCR("W4CLKTOT","G","NM",2)
NAME
^SCR("W4CLKTOT","G","NM",3)
AVS
^SCR("W4CLKTOT","G","NM",4)
AVJ
^SCR("W4CLKTOT","G","NM",5)
MHL
^SCR("W4CLKTOT","G","NM",6)
ML
^SCR("W4CLKTOT","G","NM",7)
HF
^SCR("W4CLKTOT","G","NM",8)
MKDM
^SCR("W4CLKTOT","G","NM",9)
BONUS
^SCR("W4CLKTOT","G","NM",10)
SLR1
^SCR("W4CLKTOT","G","RB")
8,2,24,79
^SCR("W4CLKTOT","G","REF")
^TEMP($P
^SCR("W4CLKTOT","G","RZD")
\
^SCR("W4CLKTOT","G","STEP")
1
^SCR("W4CLKTOT","G","STG")
 : zxekyn : dncwn : qepea : yteg: 'lin: dlgn: ini : zery :     my     :  'qn : 
^SCR("W4CLKTOT","G","VG")
11
^SCR("W4CLKTOT","NAME")

^SCR("W4CLKTOT","P",5,"CRD")
2,48,D,8,0
^SCR("W4CLKTOT","P",5,"HELP")

^SCR("W4CLKTOT","P",5,"LMAX")
9
^SCR("W4CLKTOT","P",5,"MUMPS1")
S:'$G(DAT11) DAT11=$ZD($H,"DD.MM.YY")
^SCR("W4CLKTOT","P",5,"MUMPS2")
S DAT1=$$^%L1DC(DAT11,2)
^SCR("W4CLKTOT","P",5,"TYP")
D
^SCR("W4CLKTOT","P",10,"CRD")
2,22,D,8,0
^SCR("W4CLKTOT","P",10,"HELP")

^SCR("W4CLKTOT","P",10,"LMAX")
8
^SCR("W4CLKTOT","P",10,"MUMPS1")
S:'$G(DAT21) DAT21=DAT11 
^SCR("W4CLKTOT","P",10,"MUMPS2")
S DAT2=$$^%L1DC(DAT21,2)
^SCR("W4CLKTOT","P",10,"TYP")
D
^SCR("W4CLKTOT","P",11,"CRD")
3,62,E,4,0
^SCR("W4CLKTOT","P",11,"FNC")

^SCR("W4CLKTOT","P",11,"GLOB")
LEVKVZ
^SCR("W4CLKTOT","P",11,"HELP")

^SCR("W4CLKTOT","P",11,"LMAX")
4
^SCR("W4CLKTOT","P",11,"MUMPS1")

^SCR("W4CLKTOT","P",11,"MUMPS2")

^SCR("W4CLKTOT","P",11,"NLN")
20
^SCR("W4CLKTOT","P",11,"RZD")
\
^SCR("W4CLKTOT","P",11,"TOPB")
8
^SCR("W4CLKTOT","P",11,"TYP")
E
^SCR("W4CLKTOT","P",11,"VRB")
MESUG1
^SCR("W4CLKTOT","P",12,"CRD")
3,61,H,16
^SCR("W4CLKTOT","P",12,"HELP")

^SCR("W4CLKTOT","P",12,"LMAX")
17
^SCR("W4CLKTOT","P",12,"MUMPS1")

^SCR("W4CLKTOT","P",12,"MUMPS2")

^SCR("W4CLKTOT","P",12,"OUTPUT")

^SCR("W4CLKTOT","P",12,"TYP")
H
^SCR("W4CLKTOT","P",13,"CRD")
3,22,E,5,0
^SCR("W4CLKTOT","P",13,"FNC")

^SCR("W4CLKTOT","P",13,"GLOB")
LEVKVZ
^SCR("W4CLKTOT","P",13,"HELP")

^SCR("W4CLKTOT","P",13,"LMAX")
5
^SCR("W4CLKTOT","P",13,"MUMPS1")
S:'$G(ADSUG) ADSUG=MESUG
^SCR("W4CLKTOT","P",13,"MUMPS2")
I ADSUG<MESUG S %SC("ER")=1
^SCR("W4CLKTOT","P",13,"NLN")
20
^SCR("W4CLKTOT","P",13,"RZD")
\
^SCR("W4CLKTOT","P",13,"TOPB")
8
^SCR("W4CLKTOT","P",13,"TYP")
E
^SCR("W4CLKTOT","P",13,"VRB")
ADSUG1
^SCR("W4CLKTOT","P",14,"CRD")
3,21,H,16
^SCR("W4CLKTOT","P",14,"HELP")

^SCR("W4CLKTOT","P",14,"LMAX")
18
^SCR("W4CLKTOT","P",14,"MUMPS1")

^SCR("W4CLKTOT","P",14,"MUMPS2")

^SCR("W4CLKTOT","P",14,"OUTPUT")

^SCR("W4CLKTOT","P",14,"TYP")
H
^SCR("W4CLKTOT","P",15,"CRD")
4,49,N,5.,0
^SCR("W4CLKTOT","P",15,"FNC")

^SCR("W4CLKTOT","P",15,"GLOB")
NAME
^SCR("W4CLKTOT","P",15,"HELP")

^SCR("W4CLKTOT","P",15,"LMAX")
6
^SCR("W4CLKTOT","P",15,"MUMPS1")

^SCR("W4CLKTOT","P",15,"MUMPS2")

^SCR("W4CLKTOT","P",15,"NLN")
20
^SCR("W4CLKTOT","P",15,"RZD")
\
^SCR("W4CLKTOT","P",15,"TOPB")
8
^SCR("W4CLKTOT","P",15,"TYP")
N
^SCR("W4CLKTOT","P",20,"CRD")
4,21,N,5.,0
^SCR("W4CLKTOT","P",20,"FNC")

^SCR("W4CLKTOT","P",20,"GLOB")
NAME
^SCR("W4CLKTOT","P",20,"HELP")

^SCR("W4CLKTOT","P",20,"LMAX")
6
^SCR("W4CLKTOT","P",20,"MUMPS1")
S:'$G(STRING2) STRING2=90000
^SCR("W4CLKTOT","P",20,"MUMPS2")
S:STRING2<STRING1 %SC("ER")=1 Q:$D(%SC("ER"))  D GET^W4CLKTOT
^SCR("W4CLKTOT","P",20,"NLN")
20
^SCR("W4CLKTOT","P",20,"RZD")
\
^SCR("W4CLKTOT","P",20,"TOPB")
8
^SCR("W4CLKTOT","P",20,"TYP")
N
^SCR("W4CLKTOT","P",22,"CRD")
5,51,B,1,0
^SCR("W4CLKTOT","P",22,"HELP")

^SCR("W4CLKTOT","P",22,"LMAX")
3
^SCR("W4CLKTOT","P",22,"MUMPS1")

^SCR("W4CLKTOT","P",22,"MUMPS2")

^SCR("W4CLKTOT","P",22,"TYP")
B
^SCR("W4CLKTOT","P",24,"CRD")
6,15,N,1,0
^SCR("W4CLKTOT","P",24,"HELP")

^SCR("W4CLKTOT","P",24,"LMAX")
4
^SCR("W4CLKTOT","P",24,"MUMPS1")

^SCR("W4CLKTOT","P",24,"MUMPS2")
I MDP'=1,MDP'=2 S %SC("ER")=1
^SCR("W4CLKTOT","P",24,"MUST")

^SCR("W4CLKTOT","P",24,"TYP")
N
^SCR("W4CLKTOT","P",30,"CRD")
24,50,E,6,0
^SCR("W4CLKTOT","P",30,"HELP")

^SCR("W4CLKTOT","P",30,"LMAX")
6
^SCR("W4CLKTOT","P",30,"MUMPS1")

^SCR("W4CLKTOT","P",30,"MUMPS2")

^SCR("W4CLKTOT","P",30,"OUTPUT")

^SCR("W4CLKTOT","P",30,"TYP")
E
^SCR("W4CLKTOT","P",35,"CRD")
24,44,N,5,0
^SCR("W4CLKTOT","P",35,"HELP")

^SCR("W4CLKTOT","P",35,"LMAX")
5
^SCR("W4CLKTOT","P",35,"MUMPS1")

^SCR("W4CLKTOT","P",35,"MUMPS2")

^SCR("W4CLKTOT","P",35,"OUTPUT")

^SCR("W4CLKTOT","P",35,"TYP")
N
^SCR("W4CLKTOT","P",40,"CRD")
24,38,N,4,0
^SCR("W4CLKTOT","P",40,"HELP")

^SCR("W4CLKTOT","P",40,"LMAX")
5
^SCR("W4CLKTOT","P",40,"MUMPS1")

^SCR("W4CLKTOT","P",40,"MUMPS2")

^SCR("W4CLKTOT","P",40,"OUTPUT")

^SCR("W4CLKTOT","P",40,"TYP")
N
^SCR("W4CLKTOT","P",45,"CRD")
24,32,N,4,0
^SCR("W4CLKTOT","P",45,"HELP")

^SCR("W4CLKTOT","P",45,"LMAX")
5
^SCR("W4CLKTOT","P",45,"MUMPS1")

^SCR("W4CLKTOT","P",45,"MUMPS2")

^SCR("W4CLKTOT","P",45,"OUTPUT")

^SCR("W4CLKTOT","P",45,"TYP")
N
^SCR("W4CLKTOT","P",50,"CRD")
24,26,N,4,0
^SCR("W4CLKTOT","P",50,"HELP")

^SCR("W4CLKTOT","P",50,"LMAX")
5
^SCR("W4CLKTOT","P",50,"MUMPS1")

^SCR("W4CLKTOT","P",50,"MUMPS2")

^SCR("W4CLKTOT","P",50,"OUTPUT")

^SCR("W4CLKTOT","P",50,"TYP")
N
^SCR("W4CLKTOT","P",52,"CRD")
24,18,N,7,2
^SCR("W4CLKTOT","P",52,"HELP")

^SCR("W4CLKTOT","P",52,"LMAX")
7
^SCR("W4CLKTOT","P",52,"MUMPS1")

^SCR("W4CLKTOT","P",52,"MUMPS2")

^SCR("W4CLKTOT","P",52,"OUTPUT")

^SCR("W4CLKTOT","P",52,"TYP")
N
^SCR("W4CLKTOT","P",55,"CRD")
24,10,N,7,2
^SCR("W4CLKTOT","P",55,"HELP")

^SCR("W4CLKTOT","P",55,"LMAX")
7
^SCR("W4CLKTOT","P",55,"MUMPS1")

^SCR("W4CLKTOT","P",55,"MUMPS2")

^SCR("W4CLKTOT","P",55,"OUTPUT")

^SCR("W4CLKTOT","P",55,"TYP")
N
^SCR("W4CLKTOT","P",60,"CRD")
24,1,N,8,2
^SCR("W4CLKTOT","P",60,"HELP")

^SCR("W4CLKTOT","P",60,"LMAX")
8
^SCR("W4CLKTOT","P",60,"MUMPS1")

^SCR("W4CLKTOT","P",60,"MUMPS2")

^SCR("W4CLKTOT","P",60,"OUTPUT")

^SCR("W4CLKTOT","P",60,"TYP")
N
^SCR("W4CLKTOT","P","NAME","ADSUG")
13
^SCR("W4CLKTOT","P","NAME","ADSUG1")
14
^SCR("W4CLKTOT","P","NAME","DAT11")
5
^SCR("W4CLKTOT","P","NAME","DAT21")
10
^SCR("W4CLKTOT","P","NAME","FLSLR")
22
^SCR("W4CLKTOT","P","NAME","MDP")
24
^SCR("W4CLKTOT","P","NAME","MESUG")
11
^SCR("W4CLKTOT","P","NAME","MESUG1")
12
^SCR("W4CLKTOT","P","NAME","SLR")
60
^SCR("W4CLKTOT","P","NAME","STRING1")
15
^SCR("W4CLKTOT","P","NAME","STRING2")
20
^SCR("W4CLKTOT","P","NAME","SUMAV")
35
^SCR("W4CLKTOT","P","NAME","SUMBON")
52
^SCR("W4CLKTOT","P","NAME","SUMHF")
50
^SCR("W4CLKTOT","P","NAME","SUMMH")
40
^SCR("W4CLKTOT","P","NAME","SUMMKD")
55
^SCR("W4CLKTOT","P","NAME","SUMML")
45
^SCR("W4CLKTOT","P","NAME","SUMS")
30
^SCR("W4CLKTOT","P","NM",5)
DAT11
^SCR("W4CLKTOT","P","NM",10)
DAT21
^SCR("W4CLKTOT","P","NM",11)
MESUG
^SCR("W4CLKTOT","P","NM",12)
MESUG1
^SCR("W4CLKTOT","P","NM",13)
ADSUG
^SCR("W4CLKTOT","P","NM",14)
ADSUG1
^SCR("W4CLKTOT","P","NM",15)
STRING1
^SCR("W4CLKTOT","P","NM",20)
STRING2
^SCR("W4CLKTOT","P","NM",22)
FLSLR
^SCR("W4CLKTOT","P","NM",24)
MDP
^SCR("W4CLKTOT","P","NM",30)
SUMS
^SCR("W4CLKTOT","P","NM",35)
SUMAV
^SCR("W4CLKTOT","P","NM",40)
SUMMH
^SCR("W4CLKTOT","P","NM",45)
SUMML
^SCR("W4CLKTOT","P","NM",50)
SUMHF
^SCR("W4CLKTOT","P","NM",52)
SUMBON
^SCR("W4CLKTOT","P","NM",55)
SUMMKD
^SCR("W4CLKTOT","P","NM",60)
SLR
^SCR("W4COUPPH")
H
^SCR("W4COUPPH",1)
                                                                               
^SCR("W4COUPPH",2)
                         # oetpetew zkxrnl mixhnxt #                           
^SCR("W4COUPPH",3)
                                                                               
^SCR("W4COUPPH",4)
                                                                       1]      
^SCR("W4COUPPH",5)
                                                                               
^SCR("W4COUPPH",6)
                                         {20   } :       dcrqn xtqn            
^SCR("W4COUPPH",7)
                                     {22       } :      lpinxh xtqn            
^SCR("W4COUPPH",8)
              {                36} {35         } :oetpetew gewl 'qn            
^SCR("W4COUPPH",9)
                                                                               
^SCR("W4COUPPH",10)
         [1                                                                    
^SCR("W4COUPPH",11)
                                                                               
^SCR("W4COUPPH","A",1)

^SCR("W4COUPPH","A",2)
�…”�…”…—š‹˜’ŽŒ�‰˜ˆŽ˜”
^SCR("W4COUPPH","A",3)

^SCR("W4COUPPH","A",4)

^SCR("W4COUPPH","A",5)

^SCR("W4COUPPH","A",6)
:„ƒ’‘Ž˜”‘Ž
^SCR("W4COUPPH","A",7)
:Œ�‰Ž˜ˆ˜”‘Ž
^SCR("W4COUPPH","A",8)
:�…”�…”…—‡…—Œ'‘Ž
^SCR("W4COUPPH","A",9)

^SCR("W4COUPPH","A",10)

^SCR("W4COUPPH","A",11)

^SCR("W4COUPPH","AV",1)

^SCR("W4COUPPH","AV",2)
iupbupue,frgnkohrynrp
^SCR("W4COUPPH","AV",3)

^SCR("W4COUPPH","AV",4)

^SCR("W4COUPPH","AV",5)

^SCR("W4COUPPH","AV",6)
:vsgxnrpxn
^SCR("W4COUPPH","AV",7)
:kbhnryrpxn
^SCR("W4COUPPH","AV",8)
:iupbupuejuekwxn
^SCR("W4COUPPH","AV",9)

^SCR("W4COUPPH","AV",10)

^SCR("W4COUPPH","AV",11)

^SCR("W4COUPPH","NAME")

^SCR("W4COUPPH","P",20,"CRD")
6,41,N,5,0
^SCR("W4COUPPH","P",20,"HELP")

^SCR("W4COUPPH","P",20,"LMAX")
6
^SCR("W4COUPPH","P",20,"MUMPS1")

^SCR("W4COUPPH","P",20,"MUMPS2")

^SCR("W4COUPPH","P",20,"MUST")

^SCR("W4COUPPH","P",20,"TYP")
N
^SCR("W4COUPPH","P",22,"CRD")
7,37,E,10,0
^SCR("W4COUPPH","P",22,"HELP")

^SCR("W4COUPPH","P",22,"LMAX")
10
^SCR("W4COUPPH","P",22,"MUMPS1")

^SCR("W4COUPPH","P",22,"MUMPS2")

^SCR("W4COUPPH","P",22,"TYP")
E
^SCR("W4COUPPH","P",35,"CRD")
8,35,E,12,0
^SCR("W4COUPPH","P",35,"FNC")

^SCR("W4COUPPH","P",35,"GLOB")
^LKH
^SCR("W4COUPPH","P",35,"HELP")

^SCR("W4COUPPH","P",35,"LMAX")
12
^SCR("W4COUPPH","P",35,"MUMPS1")

^SCR("W4COUPPH","P",35,"MUMPS2")

^SCR("W4COUPPH","P",35,"MUST")

^SCR("W4COUPPH","P",35,"NLN")
20
^SCR("W4COUPPH","P",35,"RZD")
\
^SCR("W4COUPPH","P",35,"TOPB")
8
^SCR("W4COUPPH","P",35,"TYP")
E
^SCR("W4COUPPH","P",35,"VRB")
LKH1
^SCR("W4COUPPH","P",36,"CRD")
8,34,H,19,0
^SCR("W4COUPPH","P",36,"HELP")

^SCR("W4COUPPH","P",36,"LMAX")
19
^SCR("W4COUPPH","P",36,"MUMPS1")

^SCR("W4COUPPH","P",36,"MUMPS2")

^SCR("W4COUPPH","P",36,"OUTPUT")

^SCR("W4COUPPH","P",36,"TYP")
H
^SCR("W4COUPPH","P","NAME","LKH")
35
^SCR("W4COUPPH","P","NAME","LKH1")
36
^SCR("W4COUPPH","P","NAME","REST")
20
^SCR("W4COUPPH","P","NAME","TERM")
22
^SCR("W4COUPPH","P","NM",20)
REST
^SCR("W4COUPPH","P","NM",22)
TERM
^SCR("W4COUPPH","P","NM",35)
LKH
^SCR("W4COUPPH","P","NM",36)
LKH1
^SCR("W4COUPPH","P","RB",1)
5,10,11,73
^SCR("W4CPREP")
H
^SCR("W4CPREP",1)
                               {10      }   jix`z cr    {05      }  jix`zn     
^SCR("W4CPREP",2)
             {15 } : ( 2 - migelyn, 1 - dcrqn ,0 - zepnfdd lk ) zepnfd beq     
^SCR("W4CPREP",3)
                                                                             1
^SCR("W4CPREP","AV",1)
êéøàúãòêéøàúî
^SCR("W4CPREP","AV",2)
:(2-íéçåìùî,1-äãòñî,0-úåðîæääìë)úåðîæäâåñ
^SCR("W4CPREP","AV",3)
1
^SCR("W4CPREP","NAME")

^SCR("W4CPREP","P",5,"CRD")
1,56,D,8,0
^SCR("W4CPREP","P",5,"HELP")

^SCR("W4CPREP","P",5,"LMAX")
9
^SCR("W4CPREP","P",5,"MUMPS1")
D ^W4IN S:'$G(DAT1) DAT1=$$^%L1DC($$^W4DZ,1)
^SCR("W4CPREP","P",5,"MUMPS2")

^SCR("W4CPREP","P",5,"MUST")

^SCR("W4CPREP","P",5,"TYP")
D
^SCR("W4CPREP","P",10,"CRD")
1,31,D,8,0
^SCR("W4CPREP","P",10,"HELP")

^SCR("W4CPREP","P",10,"LMAX")
9
^SCR("W4CPREP","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("W4CPREP","P",10,"MUMPS2")

^SCR("W4CPREP","P",10,"MUST")

^SCR("W4CPREP","P",10,"TYP")
D
^SCR("W4CPREP","P",15,"CRD")
2,13,E,1,0
^SCR("W4CPREP","P",15,"HELP")

^SCR("W4CPREP","P",15,"LMAX")
4
^SCR("W4CPREP","P",15,"MUMPS1")

^SCR("W4CPREP","P",15,"MUMPS2")

^SCR("W4CPREP","P",15,"TYP")
E
^SCR("W4CPREP","P","NAME","DAT1")
5
^SCR("W4CPREP","P","NAME","DAT2")
10
^SCR("W4CPREP","P","NAME","VT")
15
^SCR("W4CPREP","P","NM",5)
DAT1
^SCR("W4CPREP","P","NM",10)
DAT2
^SCR("W4CPREP","P","NM",15)
VT
^SCR("W4CSRPRM")
H
^SCR("W4CSRPRM",1)
                                 # dtew ly mixhnxt #                           
^SCR("W4CSRPRM",2)
                                                                               
^SCR("W4CSRPRM",3)
                                                                             1]
^SCR("W4CSRPRM",4)
            {10 } : dtew zqtcnl zhxetn 'ayge gelyn zecerz ,dlaw/qn 'ayg zqtcd  
^SCR("W4CSRPRM",5)
                                                                               
^SCR("W4CSRPRM",6)
                           {15           } : dlaw/qn zeipeaygl oncfn gewl 'qn  
^SCR("W4CSRPRM",7)
                                                                               
^SCR("W4CSRPRM",8)
         [1                                                                    
^SCR("W4CSRPRM","A",1)
„”…—Œ™�‰˜ˆŽ˜”
^SCR("W4CSRPRM","A",2)

^SCR("W4CSRPRM","A",3)

^SCR("W4CSRPRM","A",4)
:„”…—š‘”ƒŽŒšˆ˜…”Ž'�™‡…‡…Œ™Žš…ƒ…’š,„Œ�—/‘Ž'�™‡š‘”ƒ„
^SCR("W4CSRPRM","A",5)

^SCR("W4CSRPRM","A",6)
:„Œ�—/‘Žš…‰�…�™‡Œ�Žƒ†Ž‡…—Œ'‘Ž
^SCR("W4CSRPRM","A",7)

^SCR("W4CSRPRM","A",8)

^SCR("W4CSRPRM","AV",1)
vpuekaohrynrp
^SCR("W4CSRPRM","AV",2)

^SCR("W4CSRPRM","AV",3)

^SCR("W4CSRPRM","AV",4)
:vpue,xpsnk,yrupnwcajujukan,usug,'vkceqxnwcaj,xpsv
^SCR("W4CSRPRM","AV",5)

^SCR("W4CSRPRM","AV",6)
:vkceqxn,uhbucajkinsznjuekwxn
^SCR("W4CSRPRM","AV",7)

^SCR("W4CSRPRM","AV",8)

^SCR("W4CSRPRM","NAME")

^SCR("W4CSRPRM","P",10,"CRD")
4,12,B,1,0
^SCR("W4CSRPRM","P",10,"HELP")

^SCR("W4CSRPRM","P",10,"LMAX")
4
^SCR("W4CSRPRM","P",10,"MUMPS1")

^SCR("W4CSRPRM","P",10,"MUMPS2")

^SCR("W4CSRPRM","P",10,"TYP")
B
^SCR("W4CSRPRM","P",15,"CRD")
6,27,E,11,0
^SCR("W4CSRPRM","P",15,"HELP")

^SCR("W4CSRPRM","P",15,"LMAX")
14
^SCR("W4CSRPRM","P",15,"MUMPS1")

^SCR("W4CSRPRM","P",15,"MUMPS2")

^SCR("W4CSRPRM","P",15,"TYP")
E
^SCR("W4CSRPRM","P","NAME","DOCCSR")
10
^SCR("W4CSRPRM","P","NAME","LKHDFLT")
15
^SCR("W4CSRPRM","P","NM",10)
DOCCSR
^SCR("W4CSRPRM","P","NM",15)
LKHDFLT
^SCR("W4CSRPRM","P","RB",1)
4,10,9,79
^SCR("W4DCB")
H
^SCR("W4DCB",1)
                                                                               
^SCR("W4DCB",2)
                     {10      }:jix`z cr    {05      }:jix`zn                  
^SCR("W4DCB",3)
 {           15} {14  }: zegewl zveaw cr {            13}  {12  }:zegewl zveawn
^SCR("W4DCB",4)
                   {21        }: gewl cr  {20        }: gewln                  
^SCR("W4DCB",5)
                                                                             1$
^SCR("W4DCB",6)
   :iekip:  `"k  : wiy:onefn: k"dq :  gewld my  :gewl 'qn:jix`z: dlaw :  izx  :
^SCR("W4DCB",7)
                                                                               
^SCR("W4DCB",8)
                                                                               
^SCR("W4DCB",9)
                                                                               
^SCR("W4DCB",10)
                                                                               
^SCR("W4DCB",11)
                                                                               
^SCR("W4DCB",12)
                                                                               
^SCR("W4DCB",13)
                                                                               
^SCR("W4DCB",14)
                                                                               
^SCR("W4DCB",15)
                                                                               
^SCR("W4DCB",16)
                                                                               
^SCR("W4DCB",17)
                                                                               
^SCR("W4DCB",18)
                                                                               
^SCR("W4DCB",19)
                                                                               
^SCR("W4DCB",20)
                                                                               
^SCR("W4DCB",21)
                                                                               
^SCR("W4DCB",22)
 $1                                                                            
^SCR("W4DCB",23)
 {60   }{55    }{47    }{45   }{40    } k"dq           {25  }: zelaw           
^SCR("W4DCB",24)
                                                                               
^SCR("W4DCB","AV",1)

^SCR("W4DCB","AV",2)
:êéøàúãò:êéøàúî
^SCR("W4DCB","AV",3)
:úåçå÷ìúöåá÷ãò:úåçå÷ìúöåá÷î
^SCR("W4DCB","AV",4)
:çå÷ìãò:çå÷ìî
^SCR("W4DCB","AV",5)

^SCR("W4DCB","AV",6)
éåëéðà"ë÷éùïîåæîë"äñçå÷ìäíùçå÷ì'ñîêéøàúäìá÷éúø
^SCR("W4DCB","AV",7)
-----------------------------------------------------------------
^SCR("W4DCB","AV",8)

^SCR("W4DCB","AV",9)

^SCR("W4DCB","AV",10)

^SCR("W4DCB","AV",11)

^SCR("W4DCB","AV",12)

^SCR("W4DCB","AV",13)

^SCR("W4DCB","AV",14)

^SCR("W4DCB","AV",15)

^SCR("W4DCB","AV",16)

^SCR("W4DCB","AV",17)

^SCR("W4DCB","AV",18)

^SCR("W4DCB","AV",19)

^SCR("W4DCB","AV",20)

^SCR("W4DCB","AV",21)

^SCR("W4DCB","AV",22)

^SCR("W4DCB","AV",23)
ë"äñ:úåìá÷
^SCR("W4DCB","AV",24)

^SCR("W4DCB","G",1,"CRD")
7,78,E,6,0
^SCR("W4DCB","G",1,"HELP")

^SCR("W4DCB","G",1,"LMAX")
7
^SCR("W4DCB","G",1,"MUMPS1")

^SCR("W4DCB","G",1,"MUMPS2")

^SCR("W4DCB","G",1,"OUTPUT")

^SCR("W4DCB","G",1,"SHEM")
  izx  
^SCR("W4DCB","G",1,"TYP")
E
^SCR("W4DCB","G",2,"CRD")
7,70,D,5,0
^SCR("W4DCB","G",2,"HELP")
<F9> ugl zipeayg zbvdl 
^SCR("W4DCB","G",2,"LMAX")
6
^SCR("W4DCB","G",2,"MUMPS1")

^SCR("W4DCB","G",2,"MUMPS2")

^SCR("W4DCB","G",2,"OUTPUT")

^SCR("W4DCB","G",2,"SHEM")
 dlaw 
^SCR("W4DCB","G",2,"TYP")
D
^SCR("W4DCB","G",3,"CRD")
7,63,E,5,0
^SCR("W4DCB","G",3,"HELP")

^SCR("W4DCB","G",3,"LMAX")
5
^SCR("W4DCB","G",3,"MUMPS1")

^SCR("W4DCB","G",3,"MUMPS2")

^SCR("W4DCB","G",3,"OUTPUT")

^SCR("W4DCB","G",3,"SHEM")
jix`z
^SCR("W4DCB","G",3,"TYP")
E
^SCR("W4DCB","G",4,"CRD")
7,57,H,8,0
^SCR("W4DCB","G",4,"HELP")

^SCR("W4DCB","G",4,"LMAX")
8
^SCR("W4DCB","G",4,"MUMPS1")

^SCR("W4DCB","G",4,"MUMPS2")

^SCR("W4DCB","G",4,"OUTPUT")

^SCR("W4DCB","G",4,"SHEM")
gewl 'qn
^SCR("W4DCB","G",4,"TYP")
H
^SCR("W4DCB","G",5,"CRD")
7,48,N,6,1
^SCR("W4DCB","G",5,"HELP")

^SCR("W4DCB","G",5,"LMAX")
12
^SCR("W4DCB","G",5,"MUMPS1")

^SCR("W4DCB","G",5,"MUMPS2")

^SCR("W4DCB","G",5,"OUTPUT")

^SCR("W4DCB","G",5,"SHEM")
  gewld my  
^SCR("W4DCB","G",5,"TYP")
N
^SCR("W4DCB","G",6,"CRD")
7,35,N,5,1
^SCR("W4DCB","G",6,"HELP")

^SCR("W4DCB","G",6,"LMAX")
6
^SCR("W4DCB","G",6,"MUMPS1")

^SCR("W4DCB","G",6,"MUMPS2")

^SCR("W4DCB","G",6,"SHEM")
 k"dq 
^SCR("W4DCB","G",6,"TYP")
N
^SCR("W4DCB","G",7,"CRD")
7,28,N,4,1
^SCR("W4DCB","G",7,"HELP")

^SCR("W4DCB","G",7,"LMAX")
5
^SCR("W4DCB","G",7,"MUMPS1")

^SCR("W4DCB","G",7,"MUMPS2")

^SCR("W4DCB","G",7,"OUTPUT")

^SCR("W4DCB","G",7,"SHEM")
onefn
^SCR("W4DCB","G",7,"TYP")
N
^SCR("W4DCB","G",8,"CRD")
7,22,N,4,1
^SCR("W4DCB","G",8,"HELP")

^SCR("W4DCB","G",8,"LMAX")
4
^SCR("W4DCB","G",8,"MUMPS1")

^SCR("W4DCB","G",8,"MUMPS2")

^SCR("W4DCB","G",8,"OUTPUT")

^SCR("W4DCB","G",8,"SHEM")
 wiy
^SCR("W4DCB","G",8,"TYP")
N
^SCR("W4DCB","G",9,"CRD")
7,17,N,5,1
^SCR("W4DCB","G",9,"HELP")

^SCR("W4DCB","G",9,"LMAX")
7
^SCR("W4DCB","G",9,"MUMPS1")

^SCR("W4DCB","G",9,"MUMPS2")

^SCR("W4DCB","G",9,"OUTPUT")

^SCR("W4DCB","G",9,"SHEM")
  `"k  
^SCR("W4DCB","G",9,"TYP")
N
^SCR("W4DCB","G",10,"CRD")
7,9,N,5,1
^SCR("W4DCB","G",10,"HELP")

^SCR("W4DCB","G",10,"LMAX")
5
^SCR("W4DCB","G",10,"MUMPS1")

^SCR("W4DCB","G",10,"MUMPS2")

^SCR("W4DCB","G",10,"OUTPUT")

^SCR("W4DCB","G",10,"SHEM")
iekip
^SCR("W4DCB","G",10,"TYP")
N
^SCR("W4DCB","G","DEL")

^SCR("W4DCB","G","MAX")
99999
^SCR("W4DCB","G","NAME","CA")
8
^SCR("W4DCB","G","NAME","CB")
1
^SCR("W4DCB","G","NAME","CHK")
7
^SCR("W4DCB","G","NAME","DATH")
2
^SCR("W4DCB","G","NAME","LKH")
3
^SCR("W4DCB","G","NAME","LKH1")
4
^SCR("W4DCB","G","NAME","MZM")
6
^SCR("W4DCB","G","NAME","NIK")
9
^SCR("W4DCB","G","NAME","SUM")
5
^SCR("W4DCB","G","NAME","YETER")
10
^SCR("W4DCB","G","NM",1)
CB
^SCR("W4DCB","G","NM",2)
DATH
^SCR("W4DCB","G","NM",3)
LKH
^SCR("W4DCB","G","NM",4)
LKH1
^SCR("W4DCB","G","NM",5)
SUM
^SCR("W4DCB","G","NM",6)
MZM
^SCR("W4DCB","G","NM",7)
CHK
^SCR("W4DCB","G","NM",8)
CA
^SCR("W4DCB","G","NM",9)
NIK
^SCR("W4DCB","G","NM",10)
YETER
^SCR("W4DCB","G","RB")
6,2,23,79
^SCR("W4DCB","G","REF")
^TEMPDH($P
^SCR("W4DCB","G","RZD")
\
^SCR("W4DCB","G","STEP")
1
^SCR("W4DCB","G","STG")
   :iekip:  `"k  : wiy:onefn: k"dq :  gewld my  :gewl 'qn:jix`z: dlaw :  izx  :
^SCR("W4DCB","G","VG")
8
^SCR("W4DCB","NAME")

^SCR("W4DCB","P",5,"CRD")
2,44,D,8,0
^SCR("W4DCB","P",5,"HELP")

^SCR("W4DCB","P",5,"LMAX")
9
^SCR("W4DCB","P",5,"MUMPS1")
D:'$D(P1DZ) ^W4IN S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("W4DCB","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("W4DCB","P",5,"MUST")

^SCR("W4DCB","P",5,"TYP")
D
^SCR("W4DCB","P",10,"CRD")
2,21,D,8,0
^SCR("W4DCB","P",10,"HELP")

^SCR("W4DCB","P",10,"LMAX")
9
^SCR("W4DCB","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("W4DCB","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I $E(D2)="?" S %SC("ER")=1
^SCR("W4DCB","P",10,"MUST")

^SCR("W4DCB","P",10,"TYP")
D
^SCR("W4DCB","P",12,"CRD")
3,59,E,5,0
^SCR("W4DCB","P",12,"FNC")

^SCR("W4DCB","P",12,"GLOB")
^SUGL
^SCR("W4DCB","P",12,"HELP")

^SCR("W4DCB","P",12,"LMAX")
5
^SCR("W4DCB","P",12,"MUMPS1")

^SCR("W4DCB","P",12,"MUMPS2")

^SCR("W4DCB","P",12,"NLN")
20
^SCR("W4DCB","P",12,"RZD")
\
^SCR("W4DCB","P",12,"TOPB")
8
^SCR("W4DCB","P",12,"TYP")
E
^SCR("W4DCB","P",12,"VRB")
MESUGL1
^SCR("W4DCB","P",13,"CRD")
3,57,H,15
^SCR("W4DCB","P",13,"HELP")

^SCR("W4DCB","P",13,"LMAX")
15
^SCR("W4DCB","P",13,"MUMPS1")

^SCR("W4DCB","P",13,"MUMPS2")

^SCR("W4DCB","P",13,"OUTPUT")

^SCR("W4DCB","P",13,"TYP")
H
^SCR("W4DCB","P",14,"CRD")
3,17,E,5,0
^SCR("W4DCB","P",14,"FNC")

^SCR("W4DCB","P",14,"GLOB")
^SUGL
^SCR("W4DCB","P",14,"HELP")

^SCR("W4DCB","P",14,"LMAX")
5
^SCR("W4DCB","P",14,"MUMPS1")
I ADSUGL<MESUGL S %SC("ER")=1
^SCR("W4DCB","P",14,"MUMPS2")

^SCR("W4DCB","P",14,"NLN")
20
^SCR("W4DCB","P",14,"RZD")
\
^SCR("W4DCB","P",14,"TOPB")
8
^SCR("W4DCB","P",14,"TYP")
E
^SCR("W4DCB","P",14,"VRB")
ADSUGL1
^SCR("W4DCB","P",15,"CRD")
3,16,H,14
^SCR("W4DCB","P",15,"HELP")

^SCR("W4DCB","P",15,"LMAX")
14
^SCR("W4DCB","P",15,"MUMPS1")

^SCR("W4DCB","P",15,"MUMPS2")

^SCR("W4DCB","P",15,"OUTPUT")

^SCR("W4DCB","P",15,"TYP")
H
^SCR("W4DCB","P",20,"CRD")
4,42,E,11,0
^SCR("W4DCB","P",20,"FNC")

^SCR("W4DCB","P",20,"GLOB")
^LKH
^SCR("W4DCB","P",20,"HELP")

^SCR("W4DCB","P",20,"LMAX")
11
^SCR("W4DCB","P",20,"MUMPS1")

^SCR("W4DCB","P",20,"MUMPS2")

^SCR("W4DCB","P",20,"NLN")
20
^SCR("W4DCB","P",20,"RZD")
\
^SCR("W4DCB","P",20,"TOPB")
8
^SCR("W4DCB","P",20,"TYP")
E
^SCR("W4DCB","P",20,"VRB")
MELKH1
^SCR("W4DCB","P",21,"CRD")
4,19,E,11,0
^SCR("W4DCB","P",21,"FNC")

^SCR("W4DCB","P",21,"GLOB")
^LKH
^SCR("W4DCB","P",21,"HELP")

^SCR("W4DCB","P",21,"LMAX")
11
^SCR("W4DCB","P",21,"MUMPS1")

^SCR("W4DCB","P",21,"MUMPS2")
I ADLKH<MELKH S %SC("ER")=1
^SCR("W4DCB","P",21,"NLN")
20
^SCR("W4DCB","P",21,"RZD")
\
^SCR("W4DCB","P",21,"TOPB")
8
^SCR("W4DCB","P",21,"TYP")
E
^SCR("W4DCB","P",25,"CRD")
23,55,E,5,0
^SCR("W4DCB","P",25,"HELP")

^SCR("W4DCB","P",25,"LMAX")
5
^SCR("W4DCB","P",25,"MUMPS1")

^SCR("W4DCB","P",25,"MUMPS2")

^SCR("W4DCB","P",25,"OUTPUT")

^SCR("W4DCB","P",25,"TYP")
E
^SCR("W4DCB","P",40,"CRD")
23,31,N,7,2
^SCR("W4DCB","P",40,"HELP")

^SCR("W4DCB","P",40,"LMAX")
7
^SCR("W4DCB","P",40,"MUMPS1")

^SCR("W4DCB","P",40,"MUMPS2")

^SCR("W4DCB","P",40,"OUTPUT")

^SCR("W4DCB","P",40,"TYP")
N
^SCR("W4DCB","P",45,"CRD")
23,24,N,6,1
^SCR("W4DCB","P",45,"HELP")

^SCR("W4DCB","P",45,"LMAX")
6
^SCR("W4DCB","P",45,"MUMPS1")

^SCR("W4DCB","P",45,"MUMPS2")

^SCR("W4DCB","P",45,"OUTPUT")

^SCR("W4DCB","P",45,"TYP")
N
^SCR("W4DCB","P",47,"CRD")
23,16,N,7,1
^SCR("W4DCB","P",47,"HELP")

^SCR("W4DCB","P",47,"LMAX")
7
^SCR("W4DCB","P",47,"MUMPS1")

^SCR("W4DCB","P",47,"MUMPS2")

^SCR("W4DCB","P",47,"OUTPUT")

^SCR("W4DCB","P",47,"TYP")
N
^SCR("W4DCB","P",55,"CRD")
23,8,N,6,1
^SCR("W4DCB","P",55,"HELP")

^SCR("W4DCB","P",55,"LMAX")
7
^SCR("W4DCB","P",55,"MUMPS1")

^SCR("W4DCB","P",55,"MUMPS2")

^SCR("W4DCB","P",55,"OUTPUT")

^SCR("W4DCB","P",55,"TYP")
N
^SCR("W4DCB","P",60,"CRD")
23,1,N,6,1
^SCR("W4DCB","P",60,"HELP")

^SCR("W4DCB","P",60,"LMAX")
6
^SCR("W4DCB","P",60,"MUMPS1")

^SCR("W4DCB","P",60,"MUMPS2")

^SCR("W4DCB","P",60,"OUTPUT")

^SCR("W4DCB","P",60,"TYP")
N
^SCR("W4DCB","P","NAME","ADLKH")
21
^SCR("W4DCB","P","NAME","ADSUGL")
14
^SCR("W4DCB","P","NAME","ADSUGL1")
15
^SCR("W4DCB","P","NAME","DAT1")
5
^SCR("W4DCB","P","NAME","DAT2")
10
^SCR("W4DCB","P","NAME","MELKH")
20
^SCR("W4DCB","P","NAME","MESUGL")
12
^SCR("W4DCB","P","NAME","MESUGL1")
13
^SCR("W4DCB","P","NAME","SAH")
40
^SCR("W4DCB","P","NAME","SCA")
55
^SCR("W4DCB","P","NAME","SCHK")
47
^SCR("W4DCB","P","NAME","SMZM")
45
^SCR("W4DCB","P","NAME","SNIK")
60
^SCR("W4DCB","P","NAME","SUMCB")
25
^SCR("W4DCB","P","NM",5)
DAT1
^SCR("W4DCB","P","NM",10)
DAT2
^SCR("W4DCB","P","NM",12)
MESUGL
^SCR("W4DCB","P","NM",13)
MESUGL1
^SCR("W4DCB","P","NM",14)
ADSUGL
^SCR("W4DCB","P","NM",15)
ADSUGL1
^SCR("W4DCB","P","NM",20)
MELKH
^SCR("W4DCB","P","NM",21)
ADLKH
^SCR("W4DCB","P","NM",25)
SUMCB
^SCR("W4DCB","P","NM",40)
SAH
^SCR("W4DCB","P","NM",45)
SMZM
^SCR("W4DCB","P","NM",47)
SCHK
^SCR("W4DCB","P","NM",55)
SCA
^SCR("W4DCB","P","NM",60)
SNIK
^SCR("W4DCSR")
H
^SCR("W4DCSR",1)
                         #  (zi)mi`tew g"ec  #                                 
^SCR("W4DCSR",2)
                     {10      }   jix`z cr    {05      }  jix`zn               
^SCR("W4DCSR",3)
                         {20  }     dry cr        {15  }    dryn               
^SCR("W4DCSR",4)
          {40 } 2 - zitqk dxibq itl, 1 - mihixt zxikn itl g"ec bivdl           
^SCR("W4DCSR",5)
             {45 } 0 - zepnfdd lk, 2 - zexebq, 1 - zegezt zepnfd itl           
^SCR("W4DCSR","A",1)
(š‰)�‰€”…—‡"…ƒ
^SCR("W4DCSR","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("W4DCSR","A",3)
„’™ƒ’„’™Ž
^SCR("W4DCSR","A",4)
2-š‰”‘‹„˜‰‚‘‰”Œ,1-�‰ˆ‰˜”š˜‰‹Ž‰”Œ‡"…ƒ‚‰–„Œ
^SCR("W4DCSR","A",5)
0-š…�Ž†„„Œ‹,2-š…˜…‚‘,1-š…‡…š”š…�Ž†„‰”Œ
^SCR("W4DCSR","AV",1)
(,h)ohtpuej"us
^SCR("W4DCSR","AV",2)
lhrt,sglhrt,n
^SCR("W4DCSR","AV",3)
vgasgvgan
^SCR("W4DCSR","AV",4)
2-,hpxfvrhdxhpk'1-ohyhrp,rhfnhpkj"usdhmvk
^SCR("W4DCSR","AV",5)
0-,ubnzvvkf'2-,urudx'1-,uju,p,ubnzvhpk
^SCR("W4DCSR","NAME")

^SCR("W4DCSR","P",5,"CRD")
2,46,D,8,0
^SCR("W4DCSR","P",5,"HELP")

^SCR("W4DCSR","P",5,"LMAX")
9
^SCR("W4DCSR","P",5,"MUMPS1")
D ^W4IN S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("W4DCSR","P",5,"MUMPS2")

^SCR("W4DCSR","P",5,"MUST")

^SCR("W4DCSR","P",5,"TYP")
D
^SCR("W4DCSR","P",10,"CRD")
2,21,D,8,0
^SCR("W4DCSR","P",10,"HELP")

^SCR("W4DCSR","P",10,"LMAX")
9
^SCR("W4DCSR","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("W4DCSR","P",10,"MUMPS2")

^SCR("W4DCSR","P",10,"MUST")

^SCR("W4DCSR","P",10,"TYP")
D
^SCR("W4DCSR","P",15,"CRD")
3,50,T,5,0
^SCR("W4DCSR","P",15,"HELP")

^SCR("W4DCSR","P",15,"LMAX")
5
^SCR("W4DCSR","P",15,"MUMPS1")

^SCR("W4DCSR","P",15,"MUMPS2")

^SCR("W4DCSR","P",15,"TYP")
T
^SCR("W4DCSR","P",20,"CRD")
3,25,T,5,0
^SCR("W4DCSR","P",20,"HELP")

^SCR("W4DCSR","P",20,"LMAX")
5
^SCR("W4DCSR","P",20,"MUMPS1")
S:'$G(ADSHAA) ADSHAA=24
^SCR("W4DCSR","P",20,"MUMPS2")
I MESHAA<ADSHAA S %SC("ER")=1
^SCR("W4DCSR","P",20,"TYP")
T
^SCR("W4DCSR","P",40,"CRD")
4,10,N,1,0
^SCR("W4DCSR","P",40,"HELP")

^SCR("W4DCSR","P",40,"LMAX")
4
^SCR("W4DCSR","P",40,"MUMPS1")
S:'$G(SGR) SGR=2
^SCR("W4DCSR","P",40,"MUMPS2")

^SCR("W4DCSR","P",40,"MUST")

^SCR("W4DCSR","P",40,"TYP")
N
^SCR("W4DCSR","P",45,"CRD")
5,13,N,1,0
^SCR("W4DCSR","P",45,"HELP")

^SCR("W4DCSR","P",45,"LMAX")
4
^SCR("W4DCSR","P",45,"MUMPS1")
S:'$G(SUGHZ) SUGHZ=2
^SCR("W4DCSR","P",45,"MUMPS2")

^SCR("W4DCSR","P",45,"MUST")

^SCR("W4DCSR","P",45,"TYP")
N
^SCR("W4DCSR","P","NAME","ADSHAA")
20
^SCR("W4DCSR","P","NAME","DAT1")
5
^SCR("W4DCSR","P","NAME","DAT2")
10
^SCR("W4DCSR","P","NAME","MESHAA")
15
^SCR("W4DCSR","P","NAME","SGR")
40
^SCR("W4DCSR","P","NAME","SUGHZ")
45
^SCR("W4DCSR","P","NM",5)
DAT1
^SCR("W4DCSR","P","NM",10)
DAT2
^SCR("W4DCSR","P","NM",15)
MESHAA
^SCR("W4DCSR","P","NM",20)
ADSHAA
^SCR("W4DCSR","P","NM",40)
SGR
^SCR("W4DCSR","P","NM",45)
SUGHZ
^SCR("W4DEPREP")
H
^SCR("W4DEPREP",1)
                               # miyceg itl izpy zewlgn g"ec #                 
^SCR("W4DEPREP",2)
                                                                               
^SCR("W4DEPREP",3)
                                                 {05  } :     dpy              
^SCR("W4DEPREP",4)
                                               {10    } :   ycegn              
^SCR("W4DEPREP",5)
                                               {15    } : yceg cr              
^SCR("W4DEPREP",6)
                                             {20      } :    mini              
^SCR("W4DEPREP","A",1)
�‰™ƒ…‡‰”Œ‰š�™š…—Œ‡Ž‡"…ƒ
^SCR("W4DEPREP","A",2)

^SCR("W4DEPREP","A",3)
:„�™
^SCR("W4DEPREP","A",4)
:™ƒ…‡Ž
^SCR("W4DEPREP","A",5)
:™ƒ…‡ƒ’
^SCR("W4DEPREP","A",6)
:�‰Ž‰
^SCR("W4DEPREP","AV",1)
ohasujhpkh,ba,uekjnj"us
^SCR("W4DEPREP","AV",2)

^SCR("W4DEPREP","AV",3)
:vba
^SCR("W4DEPREP","AV",4)
:asujn
^SCR("W4DEPREP","AV",5)
:asujsg
^SCR("W4DEPREP","AV",6)
:ohnh
^SCR("W4DEPREP","NAME")
miyceg itl izpy zewlgn g"ec
^SCR("W4DEPREP","P",5,"CRD")
3,49,E,4,0
^SCR("W4DEPREP","P",5,"HELP")

^SCR("W4DEPREP","P",5,"LMAX")
5
^SCR("W4DEPREP","P",5,"MUMPS1")

^SCR("W4DEPREP","P",5,"MUMPS2")

^SCR("W4DEPREP","P",5,"TYP")
E
^SCR("W4DEPREP","P",10,"CRD")
4,47,E,2,0
^SCR("W4DEPREP","P",10,"HELP")

^SCR("W4DEPREP","P",10,"LMAX")
7
^SCR("W4DEPREP","P",10,"MUMPS1")

^SCR("W4DEPREP","P",10,"MUMPS2")

^SCR("W4DEPREP","P",10,"TYP")
E
^SCR("W4DEPREP","P",15,"CRD")
5,47,E,2,0
^SCR("W4DEPREP","P",15,"HELP")

^SCR("W4DEPREP","P",15,"LMAX")
7
^SCR("W4DEPREP","P",15,"MUMPS1")

^SCR("W4DEPREP","P",15,"MUMPS2")

^SCR("W4DEPREP","P",15,"TYP")
E
^SCR("W4DEPREP","P",20,"CRD")
6,45,E,7,0
^SCR("W4DEPREP","P",20,"HELP")

^SCR("W4DEPREP","P",20,"LMAX")
9
^SCR("W4DEPREP","P",20,"MUMPS1")

^SCR("W4DEPREP","P",20,"MUMPS2")

^SCR("W4DEPREP","P",20,"TYP")
E
^SCR("W4DEPREP","P","NAME","DAYS")
20
^SCR("W4DEPREP","P","NAME","MM1")
10
^SCR("W4DEPREP","P","NAME","MM2")
15
^SCR("W4DEPREP","P","NAME","YEAR")
5
^SCR("W4DEPREP","P","NM",5)
YEAR
^SCR("W4DEPREP","P","NM",10)
MM1
^SCR("W4DEPREP","P","NM",15)
MM2
^SCR("W4DEPREP","P","NM",20)
DAYS
^SCR("W4DEV")
H
^SCR("W4DEV",1)
                                                                             1$
^SCR("W4DEV",2)
     :dfefz : rav :seqn beq:         dxrd        :     owzd my     :owzd 'qn:  
^SCR("W4DEV",3)
                                                                               
^SCR("W4DEV",4)
                                                                               
^SCR("W4DEV",5)
                                                                               
^SCR("W4DEV",6)
                                                                               
^SCR("W4DEV",7)
                                                                               
^SCR("W4DEV",8)
                                                                               
^SCR("W4DEV",9)
                                                                               
^SCR("W4DEV",10)
                                                                               
^SCR("W4DEV",11)
                                                                               
^SCR("W4DEV",12)
                                                                               
^SCR("W4DEV",13)
                                                                               
^SCR("W4DEV",14)
                                                                               
^SCR("W4DEV",15)
                                                                               
^SCR("W4DEV",16)
                                                                               
^SCR("W4DEV",17)
                                                                               
^SCR("W4DEV",18)
                                                                               
^SCR("W4DEV",19)
                                                                               
^SCR("W4DEV",20)
   $1                                                                          
^SCR("W4DEV","A",1)

^SCR("W4DEV","A",2)
„†…†š’�–“…‘Ž‚…‘„˜’„�—š„�™�—š„'‘Ž
^SCR("W4DEV","A",3)
-------------------------------------------------------------------
^SCR("W4DEV","A",4)

^SCR("W4DEV","A",5)

^SCR("W4DEV","A",6)

^SCR("W4DEV","A",7)

^SCR("W4DEV","A",8)

^SCR("W4DEV","A",9)

^SCR("W4DEV","A",10)

^SCR("W4DEV","A",11)

^SCR("W4DEV","A",12)

^SCR("W4DEV","A",13)

^SCR("W4DEV","A",14)

^SCR("W4DEV","A",15)

^SCR("W4DEV","A",16)

^SCR("W4DEV","A",17)

^SCR("W4DEV","A",18)

^SCR("W4DEV","A",19)

^SCR("W4DEV","A",20)

^SCR("W4DEV","AV",1)

^SCR("W4DEV","AV",2)
äæåæúòáöóåñîâåñäøòäï÷úäíùï÷úä'ñî
^SCR("W4DEV","AV",3)
-------------------------------------------------------------------
^SCR("W4DEV","AV",4)

^SCR("W4DEV","AV",5)

^SCR("W4DEV","AV",6)

^SCR("W4DEV","AV",7)

^SCR("W4DEV","AV",8)

^SCR("W4DEV","AV",9)

^SCR("W4DEV","AV",10)

^SCR("W4DEV","AV",11)

^SCR("W4DEV","AV",12)

^SCR("W4DEV","AV",13)

^SCR("W4DEV","AV",14)

^SCR("W4DEV","AV",15)

^SCR("W4DEV","AV",16)

^SCR("W4DEV","AV",17)

^SCR("W4DEV","AV",18)

^SCR("W4DEV","AV",19)

^SCR("W4DEV","AV",20)

^SCR("W4DEV","G",4,"CRD")
3,27,E,8,0
^SCR("W4DEV","G",4,"HELP")
PC , PC1 , VT520 , VT510
^SCR("W4DEV","G",4,"LMAX")
8
^SCR("W4DEV","G",4,"MUMPS1")

^SCR("W4DEV","G",4,"MUMPS2")

^SCR("W4DEV","G",4,"SHEM")
seqn beq
^SCR("W4DEV","G",4,"TYP")
E
^SCR("W4DEV","G",5,"CRD")
3,18,E,2,0
^SCR("W4DEV","G",5,"HELP")

^SCR("W4DEV","G",5,"LMAX")
5
^SCR("W4DEV","G",5,"MUMPS1")

^SCR("W4DEV","G",5,"MUMPS2")
I $L(CEVA)>2!(150'[CEVA) S %SC("ER")=1
^SCR("W4DEV","G",5,"SHEM")
 rav 
^SCR("W4DEV","G",5,"TYP")
E
^SCR("W4DEV","G",6,"CRD")
3,12,E,2,0
^SCR("W4DEV","G",6,"HELP")

^SCR("W4DEV","G",6,"LMAX")
6
^SCR("W4DEV","G",6,"MUMPS1")

^SCR("W4DEV","G",6,"MUMPS2")

^SCR("W4DEV","G",6,"SHEM")
dfefz 
^SCR("W4DEV","G",6,"TYP")
E
^SCR("W4DEV","G","DEL")
Y
^SCR("W4DEV","G","MAX")
999
^SCR("W4DEV","G","NAME","CEVA")
5
^SCR("W4DEV","G","NAME","DEVN")
1
^SCR("W4DEV","G","NAME","DEVS")
2
^SCR("W4DEV","G","NAME","HRA")
3
^SCR("W4DEV","G","NAME","SHIFT")
6
^SCR("W4DEV","G","NAME","TYPC")
4
^SCR("W4DEV","G","NM",1)
DEVN
^SCR("W4DEV","G","NM",2)
DEVS
^SCR("W4DEV","G","NM",3)
HRA
^SCR("W4DEV","G","NM",4)
TYPC
^SCR("W4DEV","G","NM",5)
CEVA
^SCR("W4DEV","G","NM",6)
SHIFT
^SCR("W4DEV","G","RB")
2,4,21,79
^SCR("W4DEV","G","REF")
^TEMP($P
^SCR("W4DEV","G","RZD")
\
^SCR("W4DEV","G","STEP")
1
^SCR("W4DEV","G","STG")
     :dfefz : rav :seqn beq:         dxrd        :     owzd my     :owzd 'qn:  
^SCR("W4DEV","G","VG")
4
^SCR("W4DEV","NAME")

^SCR("W4DHB")
H
^SCR("W4DHB",1)
                     {07      }:jix`z cr    {05      }:jix`zn                  
^SCR("W4DHB",2)
                {                  09} {08  }   zegewl zveawn                  
^SCR("W4DHB",3)
                {                  11} {10  } zegewl zveaw cr                  
^SCR("W4DHB",4)
             {13           }: gewl cr  {12           }: gewln                  
^SCR("W4DHB",5)
  {              16} {14 } : (3-iekif,2-ipci,1- zfkxn,0-mlek) zipeayg beq      
^SCR("W4DHB",6)
           {                                                   18}             
^SCR("W4DHB",7)
                                                                             1$
^SCR("W4DHB",8)
 :  +/- :n"rn llek:n"rn:n"rn iptl:      gewld my    :gewl 'qn: jix`zl :zipeayg:
^SCR("W4DHB",9)
                                                                               
^SCR("W4DHB",10)
                                                                               
^SCR("W4DHB",11)
                                                                               
^SCR("W4DHB",12)
                                                                               
^SCR("W4DHB",13)
                                                                               
^SCR("W4DHB",14)
                                                                               
^SCR("W4DHB",15)
                                                                               
^SCR("W4DHB",16)
                                                                               
^SCR("W4DHB",17)
                                                                               
^SCR("W4DHB",18)
                                                                               
^SCR("W4DHB",19)
                                                                               
^SCR("W4DHB",20)
                                                                               
^SCR("W4DHB",21)
 $1                                                                            
^SCR("W4DHB",22)
 {45   }'nfdl sqepa {40     } k"dq {35    } n"rn {30    }:n"rn iptl {15  }:'ayg
^SCR("W4DHB",23)
                                                                               
^SCR("W4DHB","AV",1)
:lhrt,sg:lhrt,n
^SCR("W4DHB","AV",2)
,ujuek,mucen
^SCR("W4DHB","AV",3)
,ujuek,mucesg
^SCR("W4DHB","AV",4)
:jueksg:juekn
^SCR("W4DHB","AV",5)
:(3-hufhz'2-hbsh'1-,zfrn'0-okuf),hbucajdux
^SCR("W4DHB","AV",6)

^SCR("W4DHB","AV",7)

^SCR("W4DHB","AV",8)
+q-n"gnkkufn"gnn"gnhbpkjuekvoajuekwxnlhrt,k,hbucaj
^SCR("W4DHB","AV",9)
---------------------------------------------------------------------
^SCR("W4DHB","AV",10)

^SCR("W4DHB","AV",11)

^SCR("W4DHB","AV",12)

^SCR("W4DHB","AV",13)

^SCR("W4DHB","AV",14)

^SCR("W4DHB","AV",15)

^SCR("W4DHB","AV",16)

^SCR("W4DHB","AV",17)

^SCR("W4DHB","AV",18)

^SCR("W4DHB","AV",19)

^SCR("W4DHB","AV",20)

^SCR("W4DHB","AV",21)

^SCR("W4DHB","AV",22)
wnzvk;xubcf"vxn"gn:n"gnhbpk:wcaj
^SCR("W4DHB","AV",23)

^SCR("W4DHB","G",1,"CRD")
9,78,E,7,0
^SCR("W4DHB","G",1,"HELP")

^SCR("W4DHB","G",1,"LMAX")
7
^SCR("W4DHB","G",1,"MUMPS1")

^SCR("W4DHB","G",1,"MUMPS2")

^SCR("W4DHB","G",1,"OUTPUT")

^SCR("W4DHB","G",1,"SHEM")
zipeayg
^SCR("W4DHB","G",1,"TYP")
E
^SCR("W4DHB","G",2,"CRD")
9,70,D,8,0
^SCR("W4DHB","G",2,"HELP")
<F9> ugl zipeayg zbvdl 
^SCR("W4DHB","G",2,"LMAX")
8
^SCR("W4DHB","G",2,"MUMPS1")

^SCR("W4DHB","G",2,"MUMPS2")

^SCR("W4DHB","G",2,"OUTPUT")

^SCR("W4DHB","G",2,"SHEM")
 jix`zl 
^SCR("W4DHB","G",2,"TYP")
D
^SCR("W4DHB","G",3,"CRD")
9,61,E,8,0
^SCR("W4DHB","G",3,"HELP")

^SCR("W4DHB","G",3,"LMAX")
8
^SCR("W4DHB","G",3,"MUMPS1")

^SCR("W4DHB","G",3,"MUMPS2")

^SCR("W4DHB","G",3,"OUTPUT")

^SCR("W4DHB","G",3,"SHEM")
gewl 'qn
^SCR("W4DHB","G",3,"TYP")
E
^SCR("W4DHB","G",4,"CRD")
9,52,H,18,0
^SCR("W4DHB","G",4,"HELP")

^SCR("W4DHB","G",4,"LMAX")
18
^SCR("W4DHB","G",4,"MUMPS1")

^SCR("W4DHB","G",4,"MUMPS2")

^SCR("W4DHB","G",4,"OUTPUT")

^SCR("W4DHB","G",4,"SHEM")
      gewld my    
^SCR("W4DHB","G",4,"TYP")
H
^SCR("W4DHB","G",5,"CRD")
9,33,N,9,2
^SCR("W4DHB","G",5,"HELP")

^SCR("W4DHB","G",5,"LMAX")
9
^SCR("W4DHB","G",5,"MUMPS1")

^SCR("W4DHB","G",5,"MUMPS2")

^SCR("W4DHB","G",5,"OUTPUT")

^SCR("W4DHB","G",5,"SHEM")
n"rn iptl
^SCR("W4DHB","G",5,"TYP")
N
^SCR("W4DHB","G",6,"CRD")
9,23,N,4,2
^SCR("W4DHB","G",6,"HELP")

^SCR("W4DHB","G",6,"LMAX")
4
^SCR("W4DHB","G",6,"MUMPS1")

^SCR("W4DHB","G",6,"MUMPS2")

^SCR("W4DHB","G",6,"OUTPUT")

^SCR("W4DHB","G",6,"SHEM")
n"rn
^SCR("W4DHB","G",6,"TYP")
N
^SCR("W4DHB","G",7,"CRD")
9,18,N,9,2
^SCR("W4DHB","G",7,"HELP")

^SCR("W4DHB","G",7,"LMAX")
9
^SCR("W4DHB","G",7,"MUMPS1")

^SCR("W4DHB","G",7,"MUMPS2")

^SCR("W4DHB","G",7,"OUTPUT")

^SCR("W4DHB","G",7,"SHEM")
n"rn llek
^SCR("W4DHB","G",7,"TYP")
N
^SCR("W4DHB","G",8,"CRD")
9,8,N,6,2
^SCR("W4DHB","G",8,"HELP")

^SCR("W4DHB","G",8,"LMAX")
6
^SCR("W4DHB","G",8,"MUMPS1")

^SCR("W4DHB","G",8,"MUMPS2")

^SCR("W4DHB","G",8,"OUTPUT")

^SCR("W4DHB","G",8,"SHEM")
  +/- 
^SCR("W4DHB","G",8,"TYP")
N
^SCR("W4DHB","G","DEL")

^SCR("W4DHB","G","MAX")
99999
^SCR("W4DHB","G","NAME","DATH")
2
^SCR("W4DHB","G","NAME","DOP")
8
^SCR("W4DHB","G","NAME","HSB")
1
^SCR("W4DHB","G","NAME","LKH")
3
^SCR("W4DHB","G","NAME","LKH1")
4
^SCR("W4DHB","G","NAME","LMAM")
5
^SCR("W4DHB","G","NAME","MAM")
6
^SCR("W4DHB","G","NAME","SUM")
7
^SCR("W4DHB","G","NM",1)
HSB
^SCR("W4DHB","G","NM",2)
DATH
^SCR("W4DHB","G","NM",3)
LKH
^SCR("W4DHB","G","NM",4)
LKH1
^SCR("W4DHB","G","NM",5)
LMAM
^SCR("W4DHB","G","NM",6)
MAM
^SCR("W4DHB","G","NM",7)
SUM
^SCR("W4DHB","G","NM",8)
DOP
^SCR("W4DHB","G","RB")
8,2,22,79
^SCR("W4DHB","G","REF")
^TEMPDH($P
^SCR("W4DHB","G","RZD")
\
^SCR("W4DHB","G","STEP")
1
^SCR("W4DHB","G","STG")
 :  +/- :n"rn llek:n"rn:n"rn iptl:      gewld my    :gewl 'qn: jix`zl :zipeayg:
^SCR("W4DHB","G","VG")
10
^SCR("W4DHB","NAME")
zeipeayg g"ec
^SCR("W4DHB","P",5,"CRD")
1,44,D,8,0
^SCR("W4DHB","P",5,"HELP")

^SCR("W4DHB","P",5,"LMAX")
9
^SCR("W4DHB","P",5,"MUMPS1")
D:'$D(P1DZ) ^W4IN S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("W4DHB","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("W4DHB","P",5,"MUST")

^SCR("W4DHB","P",5,"TYP")
D
^SCR("W4DHB","P",7,"CRD")
1,21,D,8,0
^SCR("W4DHB","P",7,"HELP")

^SCR("W4DHB","P",7,"LMAX")
9
^SCR("W4DHB","P",7,"MUMPS1")

^SCR("W4DHB","P",7,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I $E(D2)="?" S %SC("ER")=1
^SCR("W4DHB","P",7,"TYP")
D
^SCR("W4DHB","P",8,"CRD")
2,39,E,5,0
^SCR("W4DHB","P",8,"FNC")

^SCR("W4DHB","P",8,"GLOB")
^SUGL
^SCR("W4DHB","P",8,"HELP")

^SCR("W4DHB","P",8,"LMAX")
5
^SCR("W4DHB","P",8,"MUMPS1")

^SCR("W4DHB","P",8,"MUMPS2")

^SCR("W4DHB","P",8,"NLN")
20
^SCR("W4DHB","P",8,"RZD")
\
^SCR("W4DHB","P",8,"TOPB")
8
^SCR("W4DHB","P",8,"TYP")
E
^SCR("W4DHB","P",8,"VRB")
SUGL1
^SCR("W4DHB","P",9,"CRD")
2,38,H,21
^SCR("W4DHB","P",9,"HELP")

^SCR("W4DHB","P",9,"LMAX")
21
^SCR("W4DHB","P",9,"MUMPS1")

^SCR("W4DHB","P",9,"MUMPS2")

^SCR("W4DHB","P",9,"OUTPUT")

^SCR("W4DHB","P",9,"TYP")
H
^SCR("W4DHB","P",10,"CRD")
3,39,E,5,0
^SCR("W4DHB","P",10,"FNC")

^SCR("W4DHB","P",10,"GLOB")
^SUGL
^SCR("W4DHB","P",10,"HELP")

^SCR("W4DHB","P",10,"LMAX")
5
^SCR("W4DHB","P",10,"MUMPS1")

^SCR("W4DHB","P",10,"MUMPS2")

^SCR("W4DHB","P",10,"MUST")

^SCR("W4DHB","P",10,"NLN")
20
^SCR("W4DHB","P",10,"RZD")
\
^SCR("W4DHB","P",10,"TOPB")
8
^SCR("W4DHB","P",10,"TYP")
E
^SCR("W4DHB","P",10,"VRB")
ADSUGL1
^SCR("W4DHB","P",11,"CRD")
3,38,H,21
^SCR("W4DHB","P",11,"HELP")

^SCR("W4DHB","P",11,"LMAX")
21
^SCR("W4DHB","P",11,"MUMPS1")

^SCR("W4DHB","P",11,"MUMPS2")

^SCR("W4DHB","P",11,"OUTPUT")

^SCR("W4DHB","P",11,"TYP")
H
^SCR("W4DHB","P",12,"CRD")
4,39,E,14,0
^SCR("W4DHB","P",12,"FNC")

^SCR("W4DHB","P",12,"GLOB")
LKH
^SCR("W4DHB","P",12,"HELP")

^SCR("W4DHB","P",12,"LMAX")
14
^SCR("W4DHB","P",12,"MUMPS1")

^SCR("W4DHB","P",12,"MUMPS2")

^SCR("W4DHB","P",12,"NLN")
20
^SCR("W4DHB","P",12,"RZD")
\
^SCR("W4DHB","P",12,"TOPB")
8
^SCR("W4DHB","P",12,"TYP")
E
^SCR("W4DHB","P",13,"CRD")
4,13,E,14,0
^SCR("W4DHB","P",13,"FNC")

^SCR("W4DHB","P",13,"GLOB")
LKH
^SCR("W4DHB","P",13,"HELP")

^SCR("W4DHB","P",13,"LMAX")
14
^SCR("W4DHB","P",13,"MUMPS1")
S:'$G(ADLKH) ADLKH=MELKH
^SCR("W4DHB","P",13,"MUMPS2")
I ADLKH<MELKH S %SC("ER")=1
^SCR("W4DHB","P",13,"NLN")
20
^SCR("W4DHB","P",13,"RZD")
\
^SCR("W4DHB","P",13,"TOPB")
8
^SCR("W4DHB","P",13,"TYP")
E
^SCR("W4DHB","P",14,"CRD")
5,21,N,1,0
^SCR("W4DHB","P",14,"HELP")

^SCR("W4DHB","P",14,"LMAX")
4
^SCR("W4DHB","P",14,"MUMPS1")
S:'$G(VD) VD=0
^SCR("W4DHB","P",14,"MUMPS2")
I VD<0!(VD>3) S %SC("ER")=1
^SCR("W4DHB","P",14,"TYP")
N
^SCR("W4DHB","P",15,"CRD")
22,68,N,5,0
^SCR("W4DHB","P",15,"HELP")

^SCR("W4DHB","P",15,"LMAX")
5
^SCR("W4DHB","P",15,"MUMPS1")

^SCR("W4DHB","P",15,"MUMPS2")

^SCR("W4DHB","P",15,"OUTPUT")

^SCR("W4DHB","P",15,"TYP")
N
^SCR("W4DHB","P",16,"CRD")
5,20,H,17
^SCR("W4DHB","P",16,"HELP")

^SCR("W4DHB","P",16,"LMAX")
17
^SCR("W4DHB","P",16,"MUMPS1")

^SCR("W4DHB","P",16,"MUMPS2")

^SCR("W4DHB","P",16,"OUTPUT")

^SCR("W4DHB","P",16,"TYP")
H
^SCR("W4DHB","P",18,"CRD")
6,66,H,51
^SCR("W4DHB","P",18,"HELP")

^SCR("W4DHB","P",18,"LMAX")
54
^SCR("W4DHB","P",18,"MUMPS1")

^SCR("W4DHB","P",18,"MUMPS2")

^SCR("W4DHB","P",18,"OUTPUT")

^SCR("W4DHB","P",18,"TYP")
H
^SCR("W4DHB","P",30,"CRD")
22,49,N,7,1
^SCR("W4DHB","P",30,"HELP")

^SCR("W4DHB","P",30,"LMAX")
7
^SCR("W4DHB","P",30,"MUMPS1")

^SCR("W4DHB","P",30,"MUMPS2")

^SCR("W4DHB","P",30,"OUTPUT")

^SCR("W4DHB","P",30,"TYP")
N
^SCR("W4DHB","P",35,"CRD")
22,35,N,7,1
^SCR("W4DHB","P",35,"HELP")

^SCR("W4DHB","P",35,"LMAX")
7
^SCR("W4DHB","P",35,"MUMPS1")

^SCR("W4DHB","P",35,"MUMPS2")

^SCR("W4DHB","P",35,"OUTPUT")

^SCR("W4DHB","P",35,"TYP")
N
^SCR("W4DHB","P",40,"CRD")
22,20,N,8,1
^SCR("W4DHB","P",40,"HELP")

^SCR("W4DHB","P",40,"LMAX")
8
^SCR("W4DHB","P",40,"MUMPS1")

^SCR("W4DHB","P",40,"MUMPS2")

^SCR("W4DHB","P",40,"OUTPUT")

^SCR("W4DHB","P",40,"TYP")
N
^SCR("W4DHB","P",45,"CRD")
22,1,N,6,1
^SCR("W4DHB","P",45,"HELP")

^SCR("W4DHB","P",45,"LMAX")
6
^SCR("W4DHB","P",45,"MUMPS1")

^SCR("W4DHB","P",45,"MUMPS2")

^SCR("W4DHB","P",45,"OUTPUT")

^SCR("W4DHB","P",45,"TYP")
N
^SCR("W4DHB","P","NAME","ADLKH")
13
^SCR("W4DHB","P","NAME","ADSUGL")
10
^SCR("W4DHB","P","NAME","ADSUGL1")
11
^SCR("W4DHB","P","NAME","DAT1")
5
^SCR("W4DHB","P","NAME","DAT2")
7
^SCR("W4DHB","P","NAME","HEARA")
18
^SCR("W4DHB","P","NAME","MAM")
35
^SCR("W4DHB","P","NAME","MELKH")
12
^SCR("W4DHB","P","NAME","MESUGL")
8
^SCR("W4DHB","P","NAME","MESUGL1")
9
^SCR("W4DHB","P","NAME","SAH")
40
^SCR("W4DHB","P","NAME","SDOP")
45
^SCR("W4DHB","P","NAME","SLMAM")
30
^SCR("W4DHB","P","NAME","SUMH")
15
^SCR("W4DHB","P","NAME","VD")
14
^SCR("W4DHB","P","NAME","VD1")
16
^SCR("W4DHB","P","NM",5)
DAT1
^SCR("W4DHB","P","NM",7)
DAT2
^SCR("W4DHB","P","NM",8)
MESUGL
^SCR("W4DHB","P","NM",9)
MESUGL1
^SCR("W4DHB","P","NM",10)
ADSUGL
^SCR("W4DHB","P","NM",11)
ADSUGL1
^SCR("W4DHB","P","NM",12)
MELKH
^SCR("W4DHB","P","NM",13)
ADLKH
^SCR("W4DHB","P","NM",14)
VD
^SCR("W4DHB","P","NM",15)
SUMH
^SCR("W4DHB","P","NM",16)
VD1
^SCR("W4DHB","P","NM",18)
HEARA
^SCR("W4DHB","P","NM",30)
SLMAM
^SCR("W4DHB","P","NM",35)
MAM
^SCR("W4DHB","P","NM",40)
SAH
^SCR("W4DHB","P","NM",45)
SDOP
^SCR("W4DHMK")
H
^SCR("W4DHMK",1)
                     {07      }:jix`z cr    {05      }:jix`zn                  
^SCR("W4DHMK",2)
                  {11  } zegewl zveaw cr    {10  } zegewl zveawn               
^SCR("W4DHMK",3)
                   {13        }: gewl cr  {12        }: gewln                  
^SCR("W4DHMK",4)
                                                                             1$
^SCR("W4DHMK",5)
 :  k"dq  : n"rn :n"rn iptl:     gewld my     : gewl 'qn : jix`zl:dlaw/qn 'ayg:
^SCR("W4DHMK",6)
                                                                               
^SCR("W4DHMK",7)
                                                                               
^SCR("W4DHMK",8)
                                                                               
^SCR("W4DHMK",9)
                                                                               
^SCR("W4DHMK",10)
                                                                               
^SCR("W4DHMK",11)
                                                                               
^SCR("W4DHMK",12)
                                                                               
^SCR("W4DHMK",13)
                                                                               
^SCR("W4DHMK",14)
                                                                               
^SCR("W4DHMK",15)
                                                                               
^SCR("W4DHMK",16)
                                                                               
^SCR("W4DHMK",17)
                                                                               
^SCR("W4DHMK",18)
                                                                               
^SCR("W4DHMK",19)
                                                                               
^SCR("W4DHMK",20)
 $1                                                                            
^SCR("W4DHMK",21)
 {40      } k"dq {25    } :n"rn  {20     } n"rn iptl  {15  }: dlaw /qn 'ayg 'qn
^SCR("W4DHMK",22)
                                                                               
^SCR("W4DHMK",23)
                                                                               
^SCR("W4DHMK","A",1)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("W4DHMK","A",2)
š…‡…—Œš–…�—ƒ’š…‡…—Œš–…�—Ž
^SCR("W4DHMK","A",3)
:‡…—Œƒ’:‡…—ŒŽ
^SCR("W4DHMK","A",4)

^SCR("W4DHMK","A",5)
‹"„‘Ž"’ŽŽ"’Ž‰�”Œ‡…—Œ„�™‡…—Œ'‘ŽŠ‰˜€šŒ„Œ�—/‘Ž'�™‡
^SCR("W4DHMK","A",6)
----------------------------------------------------------------------
^SCR("W4DHMK","A",7)

^SCR("W4DHMK","A",8)

^SCR("W4DHMK","A",9)

^SCR("W4DHMK","A",10)

^SCR("W4DHMK","A",11)

^SCR("W4DHMK","A",12)

^SCR("W4DHMK","A",13)

^SCR("W4DHMK","A",14)

^SCR("W4DHMK","A",15)

^SCR("W4DHMK","A",16)

^SCR("W4DHMK","A",17)

^SCR("W4DHMK","A",18)

^SCR("W4DHMK","A",19)

^SCR("W4DHMK","A",20)

^SCR("W4DHMK","A",21)
‹"„‘:Ž"’ŽŽ"’Ž‰�”Œ:„Œ�—/‘Ž'�™‡'‘Ž
^SCR("W4DHMK","A",22)

^SCR("W4DHMK","A",23)

^SCR("W4DHMK","AV",1)
:lhrt,sg:lhrt,n
^SCR("W4DHMK","AV",2)
,ujuek,mucesg,ujuek,mucen
^SCR("W4DHMK","AV",3)
:jueksg:juekn
^SCR("W4DHMK","AV",4)

^SCR("W4DHMK","AV",5)
f"vxn"gnn"gnhbpkjuekvoajuekwxnlhrt,kvkceqxnwcaj
^SCR("W4DHMK","AV",6)
----------------------------------------------------------------------
^SCR("W4DHMK","AV",7)

^SCR("W4DHMK","AV",8)

^SCR("W4DHMK","AV",9)

^SCR("W4DHMK","AV",10)

^SCR("W4DHMK","AV",11)

^SCR("W4DHMK","AV",12)

^SCR("W4DHMK","AV",13)

^SCR("W4DHMK","AV",14)

^SCR("W4DHMK","AV",15)

^SCR("W4DHMK","AV",16)

^SCR("W4DHMK","AV",17)

^SCR("W4DHMK","AV",18)

^SCR("W4DHMK","AV",19)

^SCR("W4DHMK","AV",20)

^SCR("W4DHMK","AV",21)
f"vx:n"gnn"gnhbpk:vkceqxnwcajwxn
^SCR("W4DHMK","AV",22)

^SCR("W4DHMK","AV",23)

^SCR("W4DHMK","G",1,"CRD")
6,78,E,7,0
^SCR("W4DHMK","G",1,"HELP")

^SCR("W4DHMK","G",1,"LMAX")
12
^SCR("W4DHMK","G",1,"MUMPS1")

^SCR("W4DHMK","G",1,"MUMPS2")

^SCR("W4DHMK","G",1,"OUTPUT")

^SCR("W4DHMK","G",1,"SHEM")
dlaw/qn 'ayg
^SCR("W4DHMK","G",1,"TYP")
E
^SCR("W4DHMK","G",2,"CRD")
6,65,D,7,0
^SCR("W4DHMK","G",2,"HELP")
<F9> ugl zipeayg zbvdl 
^SCR("W4DHMK","G",2,"LMAX")
7
^SCR("W4DHMK","G",2,"MUMPS1")

^SCR("W4DHMK","G",2,"MUMPS2")

^SCR("W4DHMK","G",2,"OUTPUT")

^SCR("W4DHMK","G",2,"SHEM")
 jix`zl
^SCR("W4DHMK","G",2,"TYP")
D
^SCR("W4DHMK","G",3,"CRD")
6,57,E,10,0
^SCR("W4DHMK","G",3,"HELP")

^SCR("W4DHMK","G",3,"LMAX")
10
^SCR("W4DHMK","G",3,"MUMPS1")

^SCR("W4DHMK","G",3,"MUMPS2")

^SCR("W4DHMK","G",3,"OUTPUT")

^SCR("W4DHMK","G",3,"SHEM")
 gewl 'qn 
^SCR("W4DHMK","G",3,"TYP")
E
^SCR("W4DHMK","G",4,"CRD")
6,46,H,18,0
^SCR("W4DHMK","G",4,"HELP")

^SCR("W4DHMK","G",4,"LMAX")
18
^SCR("W4DHMK","G",4,"MUMPS1")

^SCR("W4DHMK","G",4,"MUMPS2")

^SCR("W4DHMK","G",4,"OUTPUT")

^SCR("W4DHMK","G",4,"SHEM")
     gewld my     
^SCR("W4DHMK","G",4,"TYP")
H
^SCR("W4DHMK","G",5,"CRD")
6,27,N,9,2
^SCR("W4DHMK","G",5,"HELP")

^SCR("W4DHMK","G",5,"LMAX")
9
^SCR("W4DHMK","G",5,"MUMPS1")

^SCR("W4DHMK","G",5,"MUMPS2")

^SCR("W4DHMK","G",5,"OUTPUT")

^SCR("W4DHMK","G",5,"SHEM")
n"rn iptl
^SCR("W4DHMK","G",5,"TYP")
N
^SCR("W4DHMK","G",6,"CRD")
6,17,N,6,2
^SCR("W4DHMK","G",6,"HELP")

^SCR("W4DHMK","G",6,"LMAX")
6
^SCR("W4DHMK","G",6,"MUMPS1")

^SCR("W4DHMK","G",6,"MUMPS2")

^SCR("W4DHMK","G",6,"OUTPUT")

^SCR("W4DHMK","G",6,"SHEM")
 n"rn 
^SCR("W4DHMK","G",6,"TYP")
N
^SCR("W4DHMK","G",7,"CRD")
6,10,N,8,2
^SCR("W4DHMK","G",7,"HELP")

^SCR("W4DHMK","G",7,"LMAX")
8
^SCR("W4DHMK","G",7,"MUMPS1")

^SCR("W4DHMK","G",7,"MUMPS2")

^SCR("W4DHMK","G",7,"SHEM")
  k"dq  
^SCR("W4DHMK","G",7,"TYP")
N
^SCR("W4DHMK","G","DEL")

^SCR("W4DHMK","G","MAX")
99999
^SCR("W4DHMK","G","NAME","DATH")
2
^SCR("W4DHMK","G","NAME","HMK")
1
^SCR("W4DHMK","G","NAME","LKH")
3
^SCR("W4DHMK","G","NAME","LKH1")
4
^SCR("W4DHMK","G","NAME","LMAM")
5
^SCR("W4DHMK","G","NAME","MAM")
6
^SCR("W4DHMK","G","NAME","SUM")
7
^SCR("W4DHMK","G","NM",1)
HMK
^SCR("W4DHMK","G","NM",2)
DATH
^SCR("W4DHMK","G","NM",3)
LKH
^SCR("W4DHMK","G","NM",4)
LKH1
^SCR("W4DHMK","G","NM",5)
LMAM
^SCR("W4DHMK","G","NM",6)
MAM
^SCR("W4DHMK","G","NM",7)
SUM
^SCR("W4DHMK","G","RB")
5,2,21,79
^SCR("W4DHMK","G","REF")
^TEMPDH($P
^SCR("W4DHMK","G","RZD")
\
^SCR("W4DHMK","G","STEP")
1
^SCR("W4DHMK","G","STG")
 :  k"dq  : n"rn :n"rn iptl:     gewld my     : gewl 'qn : jix`zl:dlaw/qn 'ayg:
^SCR("W4DHMK","G","VG")
7
^SCR("W4DHMK","NAME")

^SCR("W4DHMK","P",5,"CRD")
1,44,D,8,0
^SCR("W4DHMK","P",5,"HELP")

^SCR("W4DHMK","P",5,"LMAX")
9
^SCR("W4DHMK","P",5,"MUMPS1")
;;D:'$D(P1DZ) ^W4IN S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1),DAT2=DAT1
^SCR("W4DHMK","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("W4DHMK","P",5,"MUST")

^SCR("W4DHMK","P",5,"TYP")
D
^SCR("W4DHMK","P",7,"CRD")
1,21,D,8,0
^SCR("W4DHMK","P",7,"HELP")

^SCR("W4DHMK","P",7,"LMAX")
9
^SCR("W4DHMK","P",7,"MUMPS1")

^SCR("W4DHMK","P",7,"MUMPS2")
S D2=$$^%L1DC(DAT2,3)
^SCR("W4DHMK","P",7,"TYP")
D
^SCR("W4DHMK","P",10,"CRD")
2,44,E,5,0
^SCR("W4DHMK","P",10,"FNC")

^SCR("W4DHMK","P",10,"GLOB")
^SUGL
^SCR("W4DHMK","P",10,"HELP")

^SCR("W4DHMK","P",10,"LMAX")
5
^SCR("W4DHMK","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("W4DHMK","P",10,"MUMPS2")

^SCR("W4DHMK","P",10,"MUST")

^SCR("W4DHMK","P",10,"NLN")
20
^SCR("W4DHMK","P",10,"RZD")
\
^SCR("W4DHMK","P",10,"TOPB")
8
^SCR("W4DHMK","P",10,"TYP")
E
^SCR("W4DHMK","P",11,"CRD")
2,18,E,5,0
^SCR("W4DHMK","P",11,"FNC")

^SCR("W4DHMK","P",11,"GLOB")
^SUGL
^SCR("W4DHMK","P",11,"HELP")

^SCR("W4DHMK","P",11,"LMAX")
5
^SCR("W4DHMK","P",11,"MUMPS1")

^SCR("W4DHMK","P",11,"MUMPS2")

^SCR("W4DHMK","P",11,"NLN")
20
^SCR("W4DHMK","P",11,"RZD")
\
^SCR("W4DHMK","P",11,"TOPB")
8
^SCR("W4DHMK","P",11,"TYP")
E
^SCR("W4DHMK","P",12,"CRD")
3,42,E,11,0
^SCR("W4DHMK","P",12,"FNC")

^SCR("W4DHMK","P",12,"GLOB")
LKH
^SCR("W4DHMK","P",12,"HELP")

^SCR("W4DHMK","P",12,"LMAX")
11
^SCR("W4DHMK","P",12,"MUMPS1")

^SCR("W4DHMK","P",12,"MUMPS2")

^SCR("W4DHMK","P",12,"NLN")
20
^SCR("W4DHMK","P",12,"RZD")
\
^SCR("W4DHMK","P",12,"TOPB")
8
^SCR("W4DHMK","P",12,"TYP")
E
^SCR("W4DHMK","P",13,"CRD")
3,19,E,11,0
^SCR("W4DHMK","P",13,"FNC")

^SCR("W4DHMK","P",13,"GLOB")
LKH
^SCR("W4DHMK","P",13,"HELP")

^SCR("W4DHMK","P",13,"LMAX")
11
^SCR("W4DHMK","P",13,"MUMPS1")
S:'$G(ADLKH) ADLKH=MELKH
^SCR("W4DHMK","P",13,"MUMPS2")
I ADLKH<MELKH S %SC("ER")=1
^SCR("W4DHMK","P",13,"NLN")
20
^SCR("W4DHMK","P",13,"RZD")
\
^SCR("W4DHMK","P",13,"TOPB")
8
^SCR("W4DHMK","P",13,"TYP")
E
^SCR("W4DHMK","P",15,"CRD")
21,54,N,5,0
^SCR("W4DHMK","P",15,"HELP")

^SCR("W4DHMK","P",15,"LMAX")
5
^SCR("W4DHMK","P",15,"MUMPS1")

^SCR("W4DHMK","P",15,"MUMPS2")

^SCR("W4DHMK","P",15,"OUTPUT")

^SCR("W4DHMK","P",15,"TYP")
N
^SCR("W4DHMK","P",20,"CRD")
21,33,N,8,2
^SCR("W4DHMK","P",20,"HELP")

^SCR("W4DHMK","P",20,"LMAX")
8
^SCR("W4DHMK","P",20,"MUMPS1")

^SCR("W4DHMK","P",20,"MUMPS2")

^SCR("W4DHMK","P",20,"OUTPUT")

^SCR("W4DHMK","P",20,"TYP")
N
^SCR("W4DHMK","P",25,"CRD")
21,17,N,7,2
^SCR("W4DHMK","P",25,"HELP")

^SCR("W4DHMK","P",25,"LMAX")
7
^SCR("W4DHMK","P",25,"MUMPS1")

^SCR("W4DHMK","P",25,"MUMPS2")

^SCR("W4DHMK","P",25,"OUTPUT")

^SCR("W4DHMK","P",25,"TYP")
N
^SCR("W4DHMK","P",40,"CRD")
21,1,N,9,2
^SCR("W4DHMK","P",40,"HELP")

^SCR("W4DHMK","P",40,"LMAX")
9
^SCR("W4DHMK","P",40,"MUMPS1")

^SCR("W4DHMK","P",40,"MUMPS2")

^SCR("W4DHMK","P",40,"OUTPUT")

^SCR("W4DHMK","P",40,"TYP")
N
^SCR("W4DHMK","P","NAME","ADKVZ")
11
^SCR("W4DHMK","P","NAME","ADLKH")
13
^SCR("W4DHMK","P","NAME","DAT1")
5
^SCR("W4DHMK","P","NAME","DAT2")
7
^SCR("W4DHMK","P","NAME","MEKVZ")
10
^SCR("W4DHMK","P","NAME","MELKH")
12
^SCR("W4DHMK","P","NAME","SAH")
40
^SCR("W4DHMK","P","NAME","SLMAM")
20
^SCR("W4DHMK","P","NAME","SMAM")
25
^SCR("W4DHMK","P","NAME","SUMHMK")
15
^SCR("W4DHMK","P","NM",5)
DAT1
^SCR("W4DHMK","P","NM",7)
DAT2
^SCR("W4DHMK","P","NM",10)
MEKVZ
^SCR("W4DHMK","P","NM",11)
ADKVZ
^SCR("W4DHMK","P","NM",12)
MELKH
^SCR("W4DHMK","P","NM",13)
ADLKH
^SCR("W4DHMK","P","NM",15)
SUMHMK
^SCR("W4DHMK","P","NM",20)
SLMAM
^SCR("W4DHMK","P","NM",25)
SMAM
^SCR("W4DHMK","P","NM",40)
SAH
^SCR("W4DHNH0")
H
^SCR("W4DHNH0",1)
                                                                               
^SCR("W4DHNH0",2)
                                                                    1]         
^SCR("W4DHNH0",3)
                                              {05      } :   jix`zn            
^SCR("W4DHNH0",4)
                                              {10      } : jix`z cr            
^SCR("W4DHNH0",5)
                              {              16} {15   } : caer 'qn            
^SCR("W4DHNH0",6)
                   {20 } : ( 2 - micaer itl , 1 - zepnfd itl ) oein            
^SCR("W4DHNH0",7)
                       {25 } : ( 0 - zhxetn ,1 - zfkexn ) g"ec zxev            
^SCR("W4DHNH0",8)
                                                                               
^SCR("W4DHNH0",9)
                 [1                                                            
^SCR("W4DHNH0","A",1)

^SCR("W4DHNH0","A",2)

^SCR("W4DHNH0","A",3)
:Š‰˜€šŽ
^SCR("W4DHNH0","A",4)
:Š‰˜€šƒ’
^SCR("W4DHNH0","A",5)
:ƒ�…’'‘Ž
^SCR("W4DHNH0","A",6)
:(2-�‰ƒ�…’‰”Œ,1-š…�Ž†„‰”Œ)�…‰Ž
^SCR("W4DHNH0","A",7)
:(0-šˆ˜…”Ž,1-š†‹…˜Ž)‡"…ƒš˜…–
^SCR("W4DHNH0","A",8)

^SCR("W4DHNH0","A",9)

^SCR("W4DHNH0","AV",1)

^SCR("W4DHNH0","AV",2)

^SCR("W4DHNH0","AV",3)
:lhrt,n
^SCR("W4DHNH0","AV",4)
:lhrt,sg
^SCR("W4DHNH0","AV",5)
:scugwxn
^SCR("W4DHNH0","AV",6)
:(2-ohscughpk'1-,ubnzvhpk)iuhn
^SCR("W4DHNH0","AV",7)
:(0-,yrupn'1-,zfurn)j"us,rum
^SCR("W4DHNH0","AV",8)

^SCR("W4DHNH0","AV",9)

^SCR("W4DHNH0","NAME")
zegpd/milehia g"ecl mixhnxt
^SCR("W4DHNH0","P",5,"CRD")
3,46,D,8,0
^SCR("W4DHNH0","P",5,"HELP")

^SCR("W4DHNH0","P",5,"LMAX")
9
^SCR("W4DHNH0","P",5,"MUMPS1")

^SCR("W4DHNH0","P",5,"MUMPS2")

^SCR("W4DHNH0","P",5,"TYP")
D
^SCR("W4DHNH0","P",10,"CRD")
4,46,D,8,0
^SCR("W4DHNH0","P",10,"HELP")

^SCR("W4DHNH0","P",10,"LMAX")
9
^SCR("W4DHNH0","P",10,"MUMPS1")

^SCR("W4DHNH0","P",10,"MUMPS2")

^SCR("W4DHNH0","P",10,"TYP")
D
^SCR("W4DHNH0","P",15,"CRD")
5,49,E,5,0
^SCR("W4DHNH0","P",15,"FNC")

^SCR("W4DHNH0","P",15,"GLOB")
^NAME
^SCR("W4DHNH0","P",15,"HELP")

^SCR("W4DHNH0","P",15,"LMAX")
6
^SCR("W4DHNH0","P",15,"MUMPS1")

^SCR("W4DHNH0","P",15,"MUMPS2")

^SCR("W4DHNH0","P",15,"NLN")
20
^SCR("W4DHNH0","P",15,"RZD")
\
^SCR("W4DHNH0","P",15,"TOPB")
8
^SCR("W4DHNH0","P",15,"TYP")
E
^SCR("W4DHNH0","P",15,"VRB")
MLZR1
^SCR("W4DHNH0","P",16,"CRD")
5,48,H,17
^SCR("W4DHNH0","P",16,"HELP")

^SCR("W4DHNH0","P",16,"LMAX")
17
^SCR("W4DHNH0","P",16,"MUMPS1")

^SCR("W4DHNH0","P",16,"MUMPS2")

^SCR("W4DHNH0","P",16,"OUTPUT")

^SCR("W4DHNH0","P",16,"TYP")
H
^SCR("W4DHNH0","P",20,"CRD")
6,19,N,1,0
^SCR("W4DHNH0","P",20,"HELP")

^SCR("W4DHNH0","P",20,"LMAX")
4
^SCR("W4DHNH0","P",20,"MUMPS1")

^SCR("W4DHNH0","P",20,"MUMPS2")

^SCR("W4DHNH0","P",20,"MUST")

^SCR("W4DHNH0","P",20,"TYP")
N
^SCR("W4DHNH0","P",25,"CRD")
7,23,N,1,0
^SCR("W4DHNH0","P",25,"HELP")

^SCR("W4DHNH0","P",25,"LMAX")
4
^SCR("W4DHNH0","P",25,"MUMPS1")

^SCR("W4DHNH0","P",25,"MUMPS2")

^SCR("W4DHNH0","P",25,"MUST")

^SCR("W4DHNH0","P",25,"TYP")
N
^SCR("W4DHNH0","P","NAME","ADDAT")
10
^SCR("W4DHNH0","P","NAME","MEDAT")
5
^SCR("W4DHNH0","P","NAME","MIUN")
20
^SCR("W4DHNH0","P","NAME","MLZR")
15
^SCR("W4DHNH0","P","NAME","MLZR1")
16
^SCR("W4DHNH0","P","NAME","SIK")
25
^SCR("W4DHNH0","P","NM",5)
MEDAT
^SCR("W4DHNH0","P","NM",10)
ADDAT
^SCR("W4DHNH0","P","NM",15)
MLZR
^SCR("W4DHNH0","P","NM",16)
MLZR1
^SCR("W4DHNH0","P","NM",20)
MIUN
^SCR("W4DHNH0","P","NM",25)
SIK
^SCR("W4DHNH0","P","RB",1)
3,18,10,70
^SCR("W4DHNHB")
H
^SCR("W4DHNHB",1)
                                                                               
^SCR("W4DHNHB",2)
                                                                    1]         
^SCR("W4DHNHB",3)
                                              {05      } :   jix`zn            
^SCR("W4DHNHB",4)
                                              {10      } : jix`z cr            
^SCR("W4DHNHB",5)
                                                 {12   } :     dryn            
^SCR("W4DHNHB",6)
                                                 {13   } :   dry cr            
^SCR("W4DHNHB",7)
                              {              16} {15   } :  lhia in            
^SCR("W4DHNHB",8)
                   {20 } : ( 2 - micaer itl , 1 - zepnfd itl ) oein            
^SCR("W4DHNHB",9)
                       {25 } : ( 1 - zfkexn ,0 - zhxetn ) g"ec zxev            
^SCR("W4DHNHB",10)
                                                      {27       } : dpnfd mekqn
^SCR("W4DHNHB",11)
                                                    {30       } : dpnfd mekq cr
^SCR("W4DHNHB",12)
                 [1                                                            
^SCR("W4DHNHB","AV",1)

^SCR("W4DHNHB","AV",2)

^SCR("W4DHNHB","AV",3)
:êéøàúî
^SCR("W4DHNHB","AV",4)
:êéøàúãò
^SCR("W4DHNHB","AV",5)
:äòùî
^SCR("W4DHNHB","AV",6)
:äòùãò
^SCR("W4DHNHB","AV",7)
:ìèéáéî
^SCR("W4DHNHB","AV",8)
:(2-íéãáåòéôì,1-úåðîæäéôì)ïåéî
^SCR("W4DHNHB","AV",9)
:(1-úæëåøî,0-úèøåôî)ç"åãúøåö
^SCR("W4DHNHB","AV",10)
:äðîæäíåëñî
^SCR("W4DHNHB","AV",11)
:äðîæäíåëñãò
^SCR("W4DHNHB","AV",12)

^SCR("W4DHNHB","NAME")
milehia g"ecl mixhnxt
^SCR("W4DHNHB","P",5,"CRD")
3,46,D,8,0
^SCR("W4DHNHB","P",5,"HELP")

^SCR("W4DHNHB","P",5,"LMAX")
9
^SCR("W4DHNHB","P",5,"MUMPS1")

^SCR("W4DHNHB","P",5,"MUMPS2")

^SCR("W4DHNHB","P",5,"TYP")
D
^SCR("W4DHNHB","P",10,"CRD")
4,46,D,8,0
^SCR("W4DHNHB","P",10,"HELP")

^SCR("W4DHNHB","P",10,"LMAX")
9
^SCR("W4DHNHB","P",10,"MUMPS1")

^SCR("W4DHNHB","P",10,"MUMPS2")

^SCR("W4DHNHB","P",10,"TYP")
D
^SCR("W4DHNHB","P",12,"CRD")
5,49,T,5,0
^SCR("W4DHNHB","P",12,"HELP")

^SCR("W4DHNHB","P",12,"LMAX")
6
^SCR("W4DHNHB","P",12,"MUMPS1")

^SCR("W4DHNHB","P",12,"MUMPS2")

^SCR("W4DHNHB","P",12,"TYP")
T
^SCR("W4DHNHB","P",13,"CRD")
6,49,T,5,0
^SCR("W4DHNHB","P",13,"HELP")

^SCR("W4DHNHB","P",13,"LMAX")
6
^SCR("W4DHNHB","P",13,"MUMPS1")

^SCR("W4DHNHB","P",13,"MUMPS2")

^SCR("W4DHNHB","P",13,"TYP")
T
^SCR("W4DHNHB","P",15,"CRD")
7,49,E,5,0
^SCR("W4DHNHB","P",15,"FNC")

^SCR("W4DHNHB","P",15,"GLOB")
^NAME
^SCR("W4DHNHB","P",15,"HELP")

^SCR("W4DHNHB","P",15,"LMAX")
6
^SCR("W4DHNHB","P",15,"MUMPS1")

^SCR("W4DHNHB","P",15,"MUMPS2")

^SCR("W4DHNHB","P",15,"NLN")
20
^SCR("W4DHNHB","P",15,"RZD")
\
^SCR("W4DHNHB","P",15,"TOPB")
8
^SCR("W4DHNHB","P",15,"TYP")
E
^SCR("W4DHNHB","P",15,"VRB")
MLZR1
^SCR("W4DHNHB","P",16,"CRD")
7,48,H,17
^SCR("W4DHNHB","P",16,"HELP")

^SCR("W4DHNHB","P",16,"LMAX")
17
^SCR("W4DHNHB","P",16,"MUMPS1")

^SCR("W4DHNHB","P",16,"MUMPS2")

^SCR("W4DHNHB","P",16,"OUTPUT")

^SCR("W4DHNHB","P",16,"TYP")
H
^SCR("W4DHNHB","P",20,"CRD")
8,19,N,1,0
^SCR("W4DHNHB","P",20,"HELP")

^SCR("W4DHNHB","P",20,"LMAX")
4
^SCR("W4DHNHB","P",20,"MUMPS1")

^SCR("W4DHNHB","P",20,"MUMPS2")

^SCR("W4DHNHB","P",20,"MUST")

^SCR("W4DHNHB","P",20,"TYP")
N
^SCR("W4DHNHB","P",25,"CRD")
9,23,N,1,0
^SCR("W4DHNHB","P",25,"HELP")

^SCR("W4DHNHB","P",25,"LMAX")
4
^SCR("W4DHNHB","P",25,"MUMPS1")

^SCR("W4DHNHB","P",25,"MUMPS2")

^SCR("W4DHNHB","P",25,"MUST")

^SCR("W4DHNHB","P",25,"TYP")
N
^SCR("W4DHNHB","P",27,"CRD")
10,54,N,7,2
^SCR("W4DHNHB","P",27,"HELP")

^SCR("W4DHNHB","P",27,"LMAX")
10
^SCR("W4DHNHB","P",27,"MUMPS1")

^SCR("W4DHNHB","P",27,"MUMPS2")

^SCR("W4DHNHB","P",27,"TYP")
N
^SCR("W4DHNHB","P",30,"CRD")
11,52,N,8,2
^SCR("W4DHNHB","P",30,"HELP")

^SCR("W4DHNHB","P",30,"LMAX")
10
^SCR("W4DHNHB","P",30,"MUMPS1")

^SCR("W4DHNHB","P",30,"MUMPS2")

^SCR("W4DHNHB","P",30,"TYP")
N
^SCR("W4DHNHB","P","NAME","ADDAT")
10
^SCR("W4DHNHB","P","NAME","ADSHAA")
13
^SCR("W4DHNHB","P","NAME","ADSUM")
30
^SCR("W4DHNHB","P","NAME","MEDAT")
5
^SCR("W4DHNHB","P","NAME","MESHAA")
12
^SCR("W4DHNHB","P","NAME","MESUM")
27
^SCR("W4DHNHB","P","NAME","MIUN")
20
^SCR("W4DHNHB","P","NAME","MLZR")
15
^SCR("W4DHNHB","P","NAME","MLZR1")
16
^SCR("W4DHNHB","P","NAME","SIK")
25
^SCR("W4DHNHB","P","NM",5)
MEDAT
^SCR("W4DHNHB","P","NM",10)
ADDAT
^SCR("W4DHNHB","P","NM",12)
MESHAA
^SCR("W4DHNHB","P","NM",13)
ADSHAA
^SCR("W4DHNHB","P","NM",15)
MLZR
^SCR("W4DHNHB","P","NM",16)
MLZR1
^SCR("W4DHNHB","P","NM",20)
MIUN
^SCR("W4DHNHB","P","NM",25)
SIK
^SCR("W4DHNHB","P","NM",27)
MESUM
^SCR("W4DHNHB","P","NM",30)
ADSUM
^SCR("W4DHNHB","P","RB",1)
3,18,13,70
^SCR("W4DHNHH")
H
^SCR("W4DHNHH",1)
                                                                               
^SCR("W4DHNHH",2)
                                                                             1]
^SCR("W4DHNHH",3)
                                                      {05      } :   jix`zn    
^SCR("W4DHNHH",4)
                                                      {10      } : jix`z cr    
^SCR("W4DHNHH",5)
                                      {              16} {15   } : caer 'qn    
^SCR("W4DHNHH",6)
                           {20 } : ( 2 - micaer itl , 1 - zepnfd itl ) oein    
^SCR("W4DHNHH",7)
 {22 }:(3-100% wx ,2-zereaw wx, 1-zereaw zegpd `ll ,0-mlek) mihixtl zegpd bivdl
^SCR("W4DHNHH",8)
                                                                               
^SCR("W4DHNHH",9)
 [1                                                                            
^SCR("W4DHNHH","A",1)

^SCR("W4DHNHH","A",2)

^SCR("W4DHNHH","A",3)
:Š‰˜€šŽ
^SCR("W4DHNHH","A",4)
:Š‰˜€šƒ’
^SCR("W4DHNHH","A",5)
:ƒ�…’'‘Ž
^SCR("W4DHNHH","A",6)
:(2-�‰ƒ�…’‰”Œ,1-š…�Ž†„‰”Œ)�…‰Ž
^SCR("W4DHNHH","A",7)
:(3-100%—˜,2-š…’…�——˜,1-š…’…�—š…‡�„€ŒŒ,0-�Œ…‹)�‰ˆ‰˜”Œš…‡�„‚‰–„Œ
^SCR("W4DHNHH","A",8)

^SCR("W4DHNHH","A",9)

^SCR("W4DHNHH","AV",1)

^SCR("W4DHNHH","AV",2)

^SCR("W4DHNHH","AV",3)
:lhrt,n
^SCR("W4DHNHH","AV",4)
:lhrt,sg
^SCR("W4DHNHH","AV",5)
:scugwxn
^SCR("W4DHNHH","AV",6)
:(2-ohscughpk'1-,ubnzvhpk)iuhn
^SCR("W4DHNHH","AV",7)
:(3-100%er'2-,uguceer'1-,uguce,ujbvtkk'0-okuf)ohyhrpk,ujbvdhmvk
^SCR("W4DHNHH","AV",8)

^SCR("W4DHNHH","AV",9)

^SCR("W4DHNHH","NAME")
zegpd/milehia g"ecl mixhnxt
^SCR("W4DHNHH","P",5,"CRD")
3,54,D,8,0
^SCR("W4DHNHH","P",5,"HELP")

^SCR("W4DHNHH","P",5,"LMAX")
9
^SCR("W4DHNHH","P",5,"MUMPS1")

^SCR("W4DHNHH","P",5,"MUMPS2")

^SCR("W4DHNHH","P",5,"TYP")
D
^SCR("W4DHNHH","P",10,"CRD")
4,54,D,8,0
^SCR("W4DHNHH","P",10,"HELP")

^SCR("W4DHNHH","P",10,"LMAX")
9
^SCR("W4DHNHH","P",10,"MUMPS1")

^SCR("W4DHNHH","P",10,"MUMPS2")

^SCR("W4DHNHH","P",10,"TYP")
D
^SCR("W4DHNHH","P",15,"CRD")
5,57,E,5,0
^SCR("W4DHNHH","P",15,"FNC")

^SCR("W4DHNHH","P",15,"GLOB")
^NAME
^SCR("W4DHNHH","P",15,"HELP")

^SCR("W4DHNHH","P",15,"LMAX")
6
^SCR("W4DHNHH","P",15,"MUMPS1")

^SCR("W4DHNHH","P",15,"MUMPS2")

^SCR("W4DHNHH","P",15,"NLN")
20
^SCR("W4DHNHH","P",15,"RZD")
\
^SCR("W4DHNHH","P",15,"TOPB")
8
^SCR("W4DHNHH","P",15,"TYP")
E
^SCR("W4DHNHH","P",15,"VRB")
MLZR1
^SCR("W4DHNHH","P",16,"CRD")
5,56,H,17
^SCR("W4DHNHH","P",16,"HELP")

^SCR("W4DHNHH","P",16,"LMAX")
17
^SCR("W4DHNHH","P",16,"MUMPS1")

^SCR("W4DHNHH","P",16,"MUMPS2")

^SCR("W4DHNHH","P",16,"OUTPUT")

^SCR("W4DHNHH","P",16,"TYP")
H
^SCR("W4DHNHH","P",20,"CRD")
6,27,N,1,0
^SCR("W4DHNHH","P",20,"HELP")

^SCR("W4DHNHH","P",20,"LMAX")
4
^SCR("W4DHNHH","P",20,"MUMPS1")

^SCR("W4DHNHH","P",20,"MUMPS2")

^SCR("W4DHNHH","P",20,"MUST")

^SCR("W4DHNHH","P",20,"TYP")
N
^SCR("W4DHNHH","P",22,"CRD")
7,1,N,1,0
^SCR("W4DHNHH","P",22,"HELP")

^SCR("W4DHNHH","P",22,"LMAX")
4
^SCR("W4DHNHH","P",22,"MUMPS1")

^SCR("W4DHNHH","P",22,"MUMPS2")

^SCR("W4DHNHH","P",22,"MUST")

^SCR("W4DHNHH","P",22,"TYP")
N
^SCR("W4DHNHH","P","NAME","ADDAT")
10
^SCR("W4DHNHH","P","NAME","MEDAT")
5
^SCR("W4DHNHH","P","NAME","MIUN")
20
^SCR("W4DHNHH","P","NAME","MLZR")
15
^SCR("W4DHNHH","P","NAME","MLZR1")
16
^SCR("W4DHNHH","P","NAME","VHNHP")
22
^SCR("W4DHNHH","P","NM",5)
MEDAT
^SCR("W4DHNHH","P","NM",10)
ADDAT
^SCR("W4DHNHH","P","NM",15)
MLZR
^SCR("W4DHNHH","P","NM",16)
MLZR1
^SCR("W4DHNHH","P","NM",20)
MIUN
^SCR("W4DHNHH","P","NM",22)
VHNHP
^SCR("W4DHNHH","P","RB",1)
3,2,10,79
^SCR("W4DHV")
H
^SCR("W4DHV",1)
                                                                               
^SCR("W4DHV",2)
                                                                             ] 
^SCR("W4DHV",3)
                                      {05        } :   jix`zl                  
^SCR("W4DHV",4)
                                      {07        } : cr minelyz                
^SCR("W4DHV",5)
                     {                  12} {11  } : zegewl zveawn             
^SCR("W4DHV",6)
                     {                  14} {13  } :zegewl zveaw cr            
^SCR("W4DHV",7)
                                                                               
^SCR("W4DHV",8)
                                                                               
^SCR("W4DHV",9)
                 {                16} {15        } :    gewln                  
^SCR("W4DHV",10)
                 {                21} {20        } :  gewl cr                  
^SCR("W4DHV",11)
                                                                               
^SCR("W4DHV",12)
                                                                               
^SCR("W4DHV",13)
 [                                                                             
^SCR("W4DHV",14)
                                                                               
^SCR("W4DHV","AV",1)

^SCR("W4DHV","AV",2)

^SCR("W4DHV","AV",3)
:êéøàúì
^SCR("W4DHV","AV",4)
:ãòíéîåìùú
^SCR("W4DHV","AV",5)
:úåçå÷ìúöåá÷î
^SCR("W4DHV","AV",6)
:úåçå÷ìúöåá÷ãò
^SCR("W4DHV","AV",7)

^SCR("W4DHV","AV",8)

^SCR("W4DHV","AV",9)
:çå÷ìî
^SCR("W4DHV","AV",10)
:çå÷ìãò
^SCR("W4DHV","AV",11)

^SCR("W4DHV","AV",12)

^SCR("W4DHV","AV",13)

^SCR("W4DHV","AV",14)

^SCR("W4DHV","NAME")

^SCR("W4DHV","P",5,"CRD")
3,38,D,8,0
^SCR("W4DHV","P",5,"HELP")

^SCR("W4DHV","P",5,"LMAX")
11
^SCR("W4DHV","P",5,"MUMPS1")
D DAT0^W4DHV
^SCR("W4DHV","P",5,"MUMPS2")

^SCR("W4DHV","P",5,"MUST")

^SCR("W4DHV","P",5,"TYP")
D
^SCR("W4DHV","P",7,"CRD")
4,38,D,8,0
^SCR("W4DHV","P",7,"HELP")

^SCR("W4DHV","P",7,"LMAX")
11
^SCR("W4DHV","P",7,"MUMPS1")

^SCR("W4DHV","P",7,"MUMPS2")

^SCR("W4DHV","P",7,"TYP")
D
^SCR("W4DHV","P",11,"CRD")
5,44,E,5,0
^SCR("W4DHV","P",11,"FNC")

^SCR("W4DHV","P",11,"GLOB")
^SUGL
^SCR("W4DHV","P",11,"HELP")

^SCR("W4DHV","P",11,"LMAX")
5
^SCR("W4DHV","P",11,"MUMPS1")

^SCR("W4DHV","P",11,"MUMPS2")

^SCR("W4DHV","P",11,"NLN")
20
^SCR("W4DHV","P",11,"RZD")
\
^SCR("W4DHV","P",11,"TOPB")
8
^SCR("W4DHV","P",11,"TYP")
E
^SCR("W4DHV","P",11,"VRB")
MEKVZ1
^SCR("W4DHV","P",12,"CRD")
5,43,H,21
^SCR("W4DHV","P",12,"HELP")

^SCR("W4DHV","P",12,"LMAX")
21
^SCR("W4DHV","P",12,"MUMPS1")

^SCR("W4DHV","P",12,"MUMPS2")

^SCR("W4DHV","P",12,"OUTPUT")

^SCR("W4DHV","P",12,"TYP")
H
^SCR("W4DHV","P",13,"CRD")
6,44,E,5,0
^SCR("W4DHV","P",13,"FNC")

^SCR("W4DHV","P",13,"GLOB")
^SUGL
^SCR("W4DHV","P",13,"HELP")

^SCR("W4DHV","P",13,"LMAX")
5
^SCR("W4DHV","P",13,"MUMPS1")

^SCR("W4DHV","P",13,"MUMPS2")

^SCR("W4DHV","P",13,"NLN")
20
^SCR("W4DHV","P",13,"RZD")
\
^SCR("W4DHV","P",13,"TOPB")
8
^SCR("W4DHV","P",13,"TYP")
E
^SCR("W4DHV","P",13,"VRB")
ADKVZ1
^SCR("W4DHV","P",14,"CRD")
6,43,H,21
^SCR("W4DHV","P",14,"HELP")

^SCR("W4DHV","P",14,"LMAX")
21
^SCR("W4DHV","P",14,"MUMPS1")

^SCR("W4DHV","P",14,"MUMPS2")

^SCR("W4DHV","P",14,"OUTPUT")

^SCR("W4DHV","P",14,"TYP")
H
^SCR("W4DHV","P",15,"CRD")
9,38,E,11,0
^SCR("W4DHV","P",15,"FNC")

^SCR("W4DHV","P",15,"GLOB")
LKH
^SCR("W4DHV","P",15,"HELP")

^SCR("W4DHV","P",15,"LMAX")
11
^SCR("W4DHV","P",15,"MUMPS1")

^SCR("W4DHV","P",15,"MUMPS2")

^SCR("W4DHV","P",15,"NLN")
20
^SCR("W4DHV","P",15,"RZD")
\
^SCR("W4DHV","P",15,"TOPB")
8
^SCR("W4DHV","P",15,"TYP")
E
^SCR("W4DHV","P",15,"VRB")
MELKH1
^SCR("W4DHV","P",16,"CRD")
9,37,H,19
^SCR("W4DHV","P",16,"HELP")

^SCR("W4DHV","P",16,"LMAX")
19
^SCR("W4DHV","P",16,"MUMPS1")

^SCR("W4DHV","P",16,"MUMPS2")

^SCR("W4DHV","P",16,"OUTPUT")

^SCR("W4DHV","P",16,"TYP")
H
^SCR("W4DHV","P",20,"CRD")
10,38,E,11,0
^SCR("W4DHV","P",20,"FNC")

^SCR("W4DHV","P",20,"GLOB")
LKH
^SCR("W4DHV","P",20,"HELP")

^SCR("W4DHV","P",20,"LMAX")
11
^SCR("W4DHV","P",20,"MUMPS1")

^SCR("W4DHV","P",20,"MUMPS2")

^SCR("W4DHV","P",20,"NLN")
20
^SCR("W4DHV","P",20,"RZD")
\
^SCR("W4DHV","P",20,"TOPB")
8
^SCR("W4DHV","P",20,"TYP")
E
^SCR("W4DHV","P",20,"VRB")
ADLKH1
^SCR("W4DHV","P",21,"CRD")
10,37,H,19
^SCR("W4DHV","P",21,"HELP")

^SCR("W4DHV","P",21,"LMAX")
19
^SCR("W4DHV","P",21,"MUMPS1")

^SCR("W4DHV","P",21,"MUMPS2")

^SCR("W4DHV","P",21,"OUTPUT")

^SCR("W4DHV","P",21,"TYP")
H
^SCR("W4DHV","P","NAME","ADKVZ")
13
^SCR("W4DHV","P","NAME","ADKVZ1")
14
^SCR("W4DHV","P","NAME","ADLKH")
20
^SCR("W4DHV","P","NAME","ADLKH1")
21
^SCR("W4DHV","P","NAME","CBAD")
7
^SCR("W4DHV","P","NAME","DAT")
5
^SCR("W4DHV","P","NAME","MEKVZ")
11
^SCR("W4DHV","P","NAME","MEKVZ1")
12
^SCR("W4DHV","P","NAME","MELKH")
15
^SCR("W4DHV","P","NAME","MELKH1")
16
^SCR("W4DHV","P","NM",5)
DAT
^SCR("W4DHV","P","NM",7)
CBAD
^SCR("W4DHV","P","NM",11)
MEKVZ
^SCR("W4DHV","P","NM",12)
MEKVZ1
^SCR("W4DHV","P","NM",13)
ADKVZ
^SCR("W4DHV","P","NM",14)
ADKVZ1
^SCR("W4DHV","P","NM",15)
MELKH
^SCR("W4DHV","P","NM",16)
MELKH1
^SCR("W4DHV","P","NM",20)
ADLKH
^SCR("W4DHV","P","NM",21)
ADLKH1
^SCR("W4DLKM")
H
^SCR("W4DLKM",1)
                                                                               
^SCR("W4DLKM",2)
                                                                ]              
^SCR("W4DLKM",3)
                                        {05        } :   jix`zn                
^SCR("W4DLKM",4)
                                        {10        } : jix`z cr                
^SCR("W4DLKM",5)
                                                                               
^SCR("W4DLKM",6)
                 {                12} {11   } :   zegewl zveawn                
^SCR("W4DLKM",7)
                 {                14} {13   } : zegewl zveaw cr                
^SCR("W4DLKM",8)
                                                                               
^SCR("W4DLKM",9)
                                                                               
^SCR("W4DLKM",10)
                   {                16} {15        } :    gewln                
^SCR("W4DLKM",11)
                   {                21} {20        } :  gewl cr                
^SCR("W4DLKM",12)
                                                                               
^SCR("W4DLKM",13)
     {25 } :(2 - zelawe zeipeayg wx , 1 - zepnfd llek) bivdl dn                
^SCR("W4DLKM",14)
                         {30 } dxzi mdl yiy zegewl wx bivdl m`d                
^SCR("W4DLKM",15)
                                                                               
^SCR("W4DLKM",16)
   [                                                                           
^SCR("W4DLKM","A",1)

^SCR("W4DLKM","A",2)

^SCR("W4DLKM","A",3)
:Š‰˜€šŽ
^SCR("W4DLKM","A",4)
:Š‰˜€šƒ’
^SCR("W4DLKM","A",5)

^SCR("W4DLKM","A",6)
:š…‡…—Œš–…�—Ž
^SCR("W4DLKM","A",7)
:š…‡…—Œš–…�—ƒ’
^SCR("W4DLKM","A",8)

^SCR("W4DLKM","A",9)

^SCR("W4DLKM","A",10)
:‡…—ŒŽ
^SCR("W4DLKM","A",11)
:‡…—Œƒ’
^SCR("W4DLKM","A",12)

^SCR("W4DLKM","A",13)
:(2-š…Œ�—…š…‰�…�™‡—˜,1-š…�Ž†„ŒŒ…‹)‚‰–„Œ„Ž
^SCR("W4DLKM","A",14)
„˜š‰�„Œ™‰™š…‡…—Œ—˜‚‰–„Œ�€„
^SCR("W4DLKM","A",15)

^SCR("W4DLKM","A",16)

^SCR("W4DLKM","AV",1)

^SCR("W4DLKM","AV",2)

^SCR("W4DLKM","AV",3)
:lhrt,n
^SCR("W4DLKM","AV",4)
:lhrt,sg
^SCR("W4DLKM","AV",5)

^SCR("W4DLKM","AV",6)
:,ujuek,mucen
^SCR("W4DLKM","AV",7)
:,ujuek,mucesg
^SCR("W4DLKM","AV",8)

^SCR("W4DLKM","AV",9)

^SCR("W4DLKM","AV",10)
:juekn
^SCR("W4DLKM","AV",11)
:jueksg
^SCR("W4DLKM","AV",12)

^SCR("W4DLKM","AV",13)
:(2-,ukceu,uhbucajer'1-,ubnzvkkuf)dhmvkvn
^SCR("W4DLKM","AV",14)
vr,hovkaha,ujuekerdhmvkotv
^SCR("W4DLKM","AV",15)

^SCR("W4DLKM","AV",16)

^SCR("W4DLKM","NAME")
zegewl g"ecl mixhnxt
^SCR("W4DLKM","P",5,"CRD")
3,40,D,8,0
^SCR("W4DLKM","P",5,"HELP")

^SCR("W4DLKM","P",5,"LMAX")
11
^SCR("W4DLKM","P",5,"MUMPS1")

^SCR("W4DLKM","P",5,"MUMPS2")

^SCR("W4DLKM","P",5,"MUST")

^SCR("W4DLKM","P",5,"TYP")
D
^SCR("W4DLKM","P",10,"CRD")
4,40,D,8,0
^SCR("W4DLKM","P",10,"HELP")

^SCR("W4DLKM","P",10,"LMAX")
11
^SCR("W4DLKM","P",10,"MUMPS1")

^SCR("W4DLKM","P",10,"MUMPS2")

^SCR("W4DLKM","P",10,"TYP")
D
^SCR("W4DLKM","P",11,"CRD")
6,38,E,5,0
^SCR("W4DLKM","P",11,"FNC")

^SCR("W4DLKM","P",11,"GLOB")
^SUGL
^SCR("W4DLKM","P",11,"HELP")

^SCR("W4DLKM","P",11,"LMAX")
6
^SCR("W4DLKM","P",11,"MUMPS1")

^SCR("W4DLKM","P",11,"MUMPS2")

^SCR("W4DLKM","P",11,"NLN")
20
^SCR("W4DLKM","P",11,"RZD")
\
^SCR("W4DLKM","P",11,"TOPB")
8
^SCR("W4DLKM","P",11,"TYP")
E
^SCR("W4DLKM","P",11,"VRB")
MEKVZ1
^SCR("W4DLKM","P",12,"CRD")
6,37,H,19
^SCR("W4DLKM","P",12,"HELP")

^SCR("W4DLKM","P",12,"LMAX")
19
^SCR("W4DLKM","P",12,"MUMPS1")

^SCR("W4DLKM","P",12,"MUMPS2")

^SCR("W4DLKM","P",12,"OUTPUT")

^SCR("W4DLKM","P",12,"TYP")
H
^SCR("W4DLKM","P",13,"CRD")
7,38,E,5,0
^SCR("W4DLKM","P",13,"FNC")

^SCR("W4DLKM","P",13,"GLOB")
^SUGL
^SCR("W4DLKM","P",13,"HELP")

^SCR("W4DLKM","P",13,"LMAX")
6
^SCR("W4DLKM","P",13,"MUMPS1")

^SCR("W4DLKM","P",13,"MUMPS2")

^SCR("W4DLKM","P",13,"NLN")
20
^SCR("W4DLKM","P",13,"RZD")
\
^SCR("W4DLKM","P",13,"TOPB")
8
^SCR("W4DLKM","P",13,"TYP")
E
^SCR("W4DLKM","P",13,"VRB")
ADKVZ1
^SCR("W4DLKM","P",14,"CRD")
7,37,H,19
^SCR("W4DLKM","P",14,"HELP")

^SCR("W4DLKM","P",14,"LMAX")
19
^SCR("W4DLKM","P",14,"MUMPS1")

^SCR("W4DLKM","P",14,"MUMPS2")

^SCR("W4DLKM","P",14,"OUTPUT")

^SCR("W4DLKM","P",14,"TYP")
H
^SCR("W4DLKM","P",15,"CRD")
10,40,E,11,0
^SCR("W4DLKM","P",15,"FNC")

^SCR("W4DLKM","P",15,"GLOB")
LKH
^SCR("W4DLKM","P",15,"HELP")

^SCR("W4DLKM","P",15,"LMAX")
11
^SCR("W4DLKM","P",15,"MUMPS1")

^SCR("W4DLKM","P",15,"MUMPS2")

^SCR("W4DLKM","P",15,"NLN")
20
^SCR("W4DLKM","P",15,"RZD")
\
^SCR("W4DLKM","P",15,"TOPB")
8
^SCR("W4DLKM","P",15,"TYP")
E
^SCR("W4DLKM","P",15,"VRB")
MELKH1
^SCR("W4DLKM","P",16,"CRD")
10,39,H,19
^SCR("W4DLKM","P",16,"HELP")

^SCR("W4DLKM","P",16,"LMAX")
19
^SCR("W4DLKM","P",16,"MUMPS1")

^SCR("W4DLKM","P",16,"MUMPS2")

^SCR("W4DLKM","P",16,"OUTPUT")

^SCR("W4DLKM","P",16,"TYP")
H
^SCR("W4DLKM","P",20,"CRD")
11,40,E,11,0
^SCR("W4DLKM","P",20,"FNC")

^SCR("W4DLKM","P",20,"GLOB")
LKH
^SCR("W4DLKM","P",20,"HELP")

^SCR("W4DLKM","P",20,"LMAX")
11
^SCR("W4DLKM","P",20,"MUMPS1")

^SCR("W4DLKM","P",20,"MUMPS2")

^SCR("W4DLKM","P",20,"NLN")
20
^SCR("W4DLKM","P",20,"RZD")
\
^SCR("W4DLKM","P",20,"TOPB")
8
^SCR("W4DLKM","P",20,"TYP")
E
^SCR("W4DLKM","P",20,"VRB")
ADLKH1
^SCR("W4DLKM","P",21,"CRD")
11,39,H,19
^SCR("W4DLKM","P",21,"HELP")

^SCR("W4DLKM","P",21,"LMAX")
19
^SCR("W4DLKM","P",21,"MUMPS1")

^SCR("W4DLKM","P",21,"MUMPS2")

^SCR("W4DLKM","P",21,"OUTPUT")

^SCR("W4DLKM","P",21,"TYP")
H
^SCR("W4DLKM","P",25,"CRD")
13,5,N,1,0
^SCR("W4DLKM","P",25,"HELP")

^SCR("W4DLKM","P",25,"LMAX")
4
^SCR("W4DLKM","P",25,"MUMPS1")

^SCR("W4DLKM","P",25,"MUMPS2")
I ASONLY'=1&(ASONLY'=2) S %SC("ER")=1
^SCR("W4DLKM","P",25,"TYP")
N
^SCR("W4DLKM","P",30,"CRD")
14,25,B,1,0
^SCR("W4DLKM","P",30,"HELP")

^SCR("W4DLKM","P",30,"LMAX")
4
^SCR("W4DLKM","P",30,"MUMPS1")

^SCR("W4DLKM","P",30,"MUMPS2")

^SCR("W4DLKM","P",30,"TYP")
B
^SCR("W4DLKM","P","NAME","ADDAT")
10
^SCR("W4DLKM","P","NAME","ADKVZ")
13
^SCR("W4DLKM","P","NAME","ADKVZ1")
14
^SCR("W4DLKM","P","NAME","ADLKH")
20
^SCR("W4DLKM","P","NAME","ADLKH1")
21
^SCR("W4DLKM","P","NAME","ASONLY")
25
^SCR("W4DLKM","P","NAME","LKITRA")
30
^SCR("W4DLKM","P","NAME","MEDAT")
5
^SCR("W4DLKM","P","NAME","MEKVZ")
11
^SCR("W4DLKM","P","NAME","MEKVZ1")
12
^SCR("W4DLKM","P","NAME","MELKH")
15
^SCR("W4DLKM","P","NAME","MELKH1")
16
^SCR("W4DLKM","P","NM",5)
MEDAT
^SCR("W4DLKM","P","NM",10)
ADDAT
^SCR("W4DLKM","P","NM",11)
MEKVZ
^SCR("W4DLKM","P","NM",12)
MEKVZ1
^SCR("W4DLKM","P","NM",13)
ADKVZ
^SCR("W4DLKM","P","NM",14)
ADKVZ1
^SCR("W4DLKM","P","NM",15)
MELKH
^SCR("W4DLKM","P","NM",16)
MELKH1
^SCR("W4DLKM","P","NM",20)
ADLKH
^SCR("W4DLKM","P","NM",21)
ADLKH1
^SCR("W4DLKM","P","NM",25)
ASONLY
^SCR("W4DLKM","P","NM",30)
LKITRA
^SCR("W4DLKM1")
H
^SCR("W4DLKM1",1)
                                                                               
^SCR("W4DLKM1",2)
                                                                           ]   
^SCR("W4DLKM1",3)
                                                   {05        } :   jix`zn     
^SCR("W4DLKM1",4)
                                                   {10        } : jix`z cr     
^SCR("W4DLKM1",5)
                                                                               
^SCR("W4DLKM1",6)
                             {                  12}{11  }:   zegewl zveawn     
^SCR("W4DLKM1",7)
                             {                  14}{13  }: zegewl zveaw cr     
^SCR("W4DLKM1",8)
                                                                               
^SCR("W4DLKM1",9)
                              {                16} {15        } :    gewln     
^SCR("W4DLKM1",10)
                              {                21} {20        } :  gewl cr     
^SCR("W4DLKM1",11)
                                                                               
^SCR("W4DLKM1",12)
                                                                               
^SCR("W4DLKM1",13)
  {25 } ( 2 - dlaw/qn 'ayge gelyn 'z mb ,1 - zelawe zeipeayg wx ) bivdl dn     
^SCR("W4DLKM1",14)
                                                                               
^SCR("W4DLKM1",15)
                                                                               
^SCR("W4DLKM1",16)
 [                                                                             
^SCR("W4DLKM1",17)
                                                                               
^SCR("W4DLKM1","A",1)

^SCR("W4DLKM1","A",2)

^SCR("W4DLKM1","A",3)
:Š‰˜€šŽ
^SCR("W4DLKM1","A",4)
:Š‰˜€šƒ’
^SCR("W4DLKM1","A",5)

^SCR("W4DLKM1","A",6)
:š…‡…—Œš–…�—Ž
^SCR("W4DLKM1","A",7)
:š…‡…—Œš–…�—ƒ’
^SCR("W4DLKM1","A",8)

^SCR("W4DLKM1","A",9)
:‡…—ŒŽ
^SCR("W4DLKM1","A",10)
:‡…—Œƒ’
^SCR("W4DLKM1","A",11)

^SCR("W4DLKM1","A",12)

^SCR("W4DLKM1","A",13)
(2-„Œ�—/‘Ž'�™‡…‡…Œ™Ž'š�‚,1-š…Œ�—…š…‰�…�™‡—˜)‚‰–„Œ„Ž
^SCR("W4DLKM1","A",14)

^SCR("W4DLKM1","A",15)

^SCR("W4DLKM1","A",16)

^SCR("W4DLKM1","A",17)

^SCR("W4DLKM1","AV",1)

^SCR("W4DLKM1","AV",2)

^SCR("W4DLKM1","AV",3)
:lhrt,n
^SCR("W4DLKM1","AV",4)
:lhrt,sg
^SCR("W4DLKM1","AV",5)

^SCR("W4DLKM1","AV",6)
:,ujuek,mucen
^SCR("W4DLKM1","AV",7)
:,ujuek,mucesg
^SCR("W4DLKM1","AV",8)

^SCR("W4DLKM1","AV",9)
:juekn
^SCR("W4DLKM1","AV",10)
:jueksg
^SCR("W4DLKM1","AV",11)

^SCR("W4DLKM1","AV",12)

^SCR("W4DLKM1","AV",13)
(2-vkceqxnwcajujukanw,od'1-,ukceu,uhbucajer)dhmvkvn
^SCR("W4DLKM1","AV",14)

^SCR("W4DLKM1","AV",15)

^SCR("W4DLKM1","AV",16)

^SCR("W4DLKM1","AV",17)

^SCR("W4DLKM1","NAME")

^SCR("W4DLKM1","P",5,"CRD")
3,51,D,8,0
^SCR("W4DLKM1","P",5,"HELP")

^SCR("W4DLKM1","P",5,"LMAX")
11
^SCR("W4DLKM1","P",5,"MUMPS1")

^SCR("W4DLKM1","P",5,"MUMPS2")

^SCR("W4DLKM1","P",5,"MUST")

^SCR("W4DLKM1","P",5,"TYP")
D
^SCR("W4DLKM1","P",10,"CRD")
4,51,D,8,0
^SCR("W4DLKM1","P",10,"HELP")

^SCR("W4DLKM1","P",10,"LMAX")
11
^SCR("W4DLKM1","P",10,"MUMPS1")

^SCR("W4DLKM1","P",10,"MUMPS2")

^SCR("W4DLKM1","P",10,"TYP")
D
^SCR("W4DLKM1","P",11,"CRD")
6,51,E,5,0
^SCR("W4DLKM1","P",11,"FNC")

^SCR("W4DLKM1","P",11,"GLOB")
^SUGL
^SCR("W4DLKM1","P",11,"HELP")

^SCR("W4DLKM1","P",11,"LMAX")
5
^SCR("W4DLKM1","P",11,"MUMPS1")

^SCR("W4DLKM1","P",11,"MUMPS2")

^SCR("W4DLKM1","P",11,"NLN")
20
^SCR("W4DLKM1","P",11,"RZD")
\
^SCR("W4DLKM1","P",11,"TOPB")
8
^SCR("W4DLKM1","P",11,"TYP")
E
^SCR("W4DLKM1","P",11,"VRB")
MEKVZ1
^SCR("W4DLKM1","P",12,"CRD")
6,51,H,21
^SCR("W4DLKM1","P",12,"HELP")

^SCR("W4DLKM1","P",12,"LMAX")
21
^SCR("W4DLKM1","P",12,"MUMPS1")

^SCR("W4DLKM1","P",12,"MUMPS2")

^SCR("W4DLKM1","P",12,"OUTPUT")

^SCR("W4DLKM1","P",12,"TYP")
H
^SCR("W4DLKM1","P",13,"CRD")
7,51,E,5,0
^SCR("W4DLKM1","P",13,"FNC")

^SCR("W4DLKM1","P",13,"GLOB")
^SUGL
^SCR("W4DLKM1","P",13,"HELP")

^SCR("W4DLKM1","P",13,"LMAX")
5
^SCR("W4DLKM1","P",13,"MUMPS1")

^SCR("W4DLKM1","P",13,"MUMPS2")

^SCR("W4DLKM1","P",13,"NLN")
20
^SCR("W4DLKM1","P",13,"RZD")
\
^SCR("W4DLKM1","P",13,"TOPB")
8
^SCR("W4DLKM1","P",13,"TYP")
E
^SCR("W4DLKM1","P",13,"VRB")
ADKVZ1
^SCR("W4DLKM1","P",14,"CRD")
7,51,H,21
^SCR("W4DLKM1","P",14,"HELP")

^SCR("W4DLKM1","P",14,"LMAX")
21
^SCR("W4DLKM1","P",14,"MUMPS1")

^SCR("W4DLKM1","P",14,"MUMPS2")

^SCR("W4DLKM1","P",14,"OUTPUT")

^SCR("W4DLKM1","P",14,"TYP")
H
^SCR("W4DLKM1","P",15,"CRD")
9,51,E,11,0
^SCR("W4DLKM1","P",15,"FNC")

^SCR("W4DLKM1","P",15,"GLOB")
LKH
^SCR("W4DLKM1","P",15,"HELP")

^SCR("W4DLKM1","P",15,"LMAX")
11
^SCR("W4DLKM1","P",15,"MUMPS1")

^SCR("W4DLKM1","P",15,"MUMPS2")

^SCR("W4DLKM1","P",15,"NLN")
20
^SCR("W4DLKM1","P",15,"RZD")
\
^SCR("W4DLKM1","P",15,"TOPB")
8
^SCR("W4DLKM1","P",15,"TYP")
E
^SCR("W4DLKM1","P",15,"VRB")
MELKH1
^SCR("W4DLKM1","P",16,"CRD")
9,50,H,19
^SCR("W4DLKM1","P",16,"HELP")

^SCR("W4DLKM1","P",16,"LMAX")
19
^SCR("W4DLKM1","P",16,"MUMPS1")

^SCR("W4DLKM1","P",16,"MUMPS2")

^SCR("W4DLKM1","P",16,"OUTPUT")

^SCR("W4DLKM1","P",16,"TYP")
H
^SCR("W4DLKM1","P",20,"CRD")
10,51,E,11,0
^SCR("W4DLKM1","P",20,"FNC")

^SCR("W4DLKM1","P",20,"GLOB")
LKH
^SCR("W4DLKM1","P",20,"HELP")

^SCR("W4DLKM1","P",20,"LMAX")
11
^SCR("W4DLKM1","P",20,"MUMPS1")

^SCR("W4DLKM1","P",20,"MUMPS2")

^SCR("W4DLKM1","P",20,"NLN")
20
^SCR("W4DLKM1","P",20,"RZD")
\
^SCR("W4DLKM1","P",20,"TOPB")
8
^SCR("W4DLKM1","P",20,"TYP")
E
^SCR("W4DLKM1","P",20,"VRB")
ADLKH1
^SCR("W4DLKM1","P",21,"CRD")
10,50,H,19
^SCR("W4DLKM1","P",21,"HELP")

^SCR("W4DLKM1","P",21,"LMAX")
19
^SCR("W4DLKM1","P",21,"MUMPS1")

^SCR("W4DLKM1","P",21,"MUMPS2")

^SCR("W4DLKM1","P",21,"OUTPUT")

^SCR("W4DLKM1","P",21,"TYP")
H
^SCR("W4DLKM1","P",25,"CRD")
13,2,E,4,0
^SCR("W4DLKM1","P",25,"HELP")

^SCR("W4DLKM1","P",25,"LMAX")
4
^SCR("W4DLKM1","P",25,"MUMPS1")

^SCR("W4DLKM1","P",25,"MUMPS2")

^SCR("W4DLKM1","P",25,"TYP")
E
^SCR("W4DLKM1","P","NAME","ADDAT")
10
^SCR("W4DLKM1","P","NAME","ADKVZ")
13
^SCR("W4DLKM1","P","NAME","ADKVZ1")
14
^SCR("W4DLKM1","P","NAME","ADLKH")
20
^SCR("W4DLKM1","P","NAME","ADLKH1")
21
^SCR("W4DLKM1","P","NAME","ASONLY")
25
^SCR("W4DLKM1","P","NAME","MEDAT")
5
^SCR("W4DLKM1","P","NAME","MEKVZ")
11
^SCR("W4DLKM1","P","NAME","MEKVZ1")
12
^SCR("W4DLKM1","P","NAME","MELKH")
15
^SCR("W4DLKM1","P","NAME","MELKH1")
16
^SCR("W4DLKM1","P","NM",5)
MEDAT
^SCR("W4DLKM1","P","NM",10)
ADDAT
^SCR("W4DLKM1","P","NM",11)
MEKVZ
^SCR("W4DLKM1","P","NM",12)
MEKVZ1
^SCR("W4DLKM1","P","NM",13)
ADKVZ
^SCR("W4DLKM1","P","NM",14)
ADKVZ1
^SCR("W4DLKM1","P","NM",15)
MELKH
^SCR("W4DLKM1","P","NM",16)
MELKH1
^SCR("W4DLKM1","P","NM",20)
ADLKH
^SCR("W4DLKM1","P","NM",21)
ADLKH1
^SCR("W4DLKM1","P","NM",25)
ASONLY
^SCR("W4DLKMR")
H
^SCR("W4DLKMR",1)
                                                                               
^SCR("W4DLKMR",2)
               {10  }: zegewl zveaw cr              {05   }: zegewl zvoawn     
^SCR("W4DLKMR",3)
          {20       }:         gewl cr         {15        }:         gewln     
^SCR("W4DLKMR",4)
           {30      }:        jix`z cr           {25      }:        jix`zn     
^SCR("W4DLKMR",5)
                                                                               
^SCR("W4DLKMR",6)
                                                                             1$
^SCR("W4DLKMR",7)
  :dxzi:minelyz:iekif z-yg:zeipci z-yg:zeipw k"dq:zncew dxzi:gewl my:gewl 'qn :
^SCR("W4DLKMR",8)
                                                                               
^SCR("W4DLKMR",9)
                                                                               
^SCR("W4DLKMR",10)
                                                                               
^SCR("W4DLKMR",11)
                                                                               
^SCR("W4DLKMR",12)
                                                                               
^SCR("W4DLKMR",13)
                                                                               
^SCR("W4DLKMR",14)
                                                                               
^SCR("W4DLKMR",15)
                                                                               
^SCR("W4DLKMR",16)
                                                                               
^SCR("W4DLKMR",17)
                                                                               
^SCR("W4DLKMR",18)
                                                                               
^SCR("W4DLKMR",19)
                                                                               
^SCR("W4DLKMR",20)
                                                                               
^SCR("W4DLKMR",21)
                                                                               
^SCR("W4DLKMR",22)
                                                                               
^SCR("W4DLKMR",23)
 $1                                                                            
^SCR("W4DLKMR","A",1)

^SCR("W4DLKMR","A",2)
:š…‡…—Œš–…�—ƒ’:š…‡…—Œš–��—Ž
^SCR("W4DLKMR","A",3)
:‡…—Œƒ’:‡…—ŒŽ
^SCR("W4DLKMR","A",4)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("W4DLKMR","A",5)

^SCR("W4DLKMR","A",6)

^SCR("W4DLKMR","A",7)
„˜š‰�‰Ž…Œ™š‰…‹‰†š-™‡š…‰�ƒ‰š-™‡š…‰�—‹"„‘šŽƒ…—„˜š‰‡…—Œ�™‡…—Œ'‘Ž
^SCR("W4DLKMR","A",8)
--------------------------------------------------------------------
^SCR("W4DLKMR","A",9)

^SCR("W4DLKMR","A",10)

^SCR("W4DLKMR","A",11)

^SCR("W4DLKMR","A",12)

^SCR("W4DLKMR","A",13)

^SCR("W4DLKMR","A",14)

^SCR("W4DLKMR","A",15)

^SCR("W4DLKMR","A",16)

^SCR("W4DLKMR","A",17)

^SCR("W4DLKMR","A",18)

^SCR("W4DLKMR","A",19)

^SCR("W4DLKMR","A",20)

^SCR("W4DLKMR","A",21)

^SCR("W4DLKMR","A",22)

^SCR("W4DLKMR","A",23)

^SCR("W4DLKMR","AV",1)

^SCR("W4DLKMR","AV",2)
:,ujuek,mucesg:,ujuek,micen
^SCR("W4DLKMR","AV",3)
:jueksg:juekn
^SCR("W4DLKMR","AV",4)
:lhrt,sg:lhrt,n
^SCR("W4DLKMR","AV",5)

^SCR("W4DLKMR","AV",6)

^SCR("W4DLKMR","AV",7)
vr,hohnuka,hufhz,-aj,uhbsh,-aj,uhbef"vx,nsuevr,hjuekoajuekwxn
^SCR("W4DLKMR","AV",8)
--------------------------------------------------------------------
^SCR("W4DLKMR","AV",9)

^SCR("W4DLKMR","AV",10)

^SCR("W4DLKMR","AV",11)

^SCR("W4DLKMR","AV",12)

^SCR("W4DLKMR","AV",13)

^SCR("W4DLKMR","AV",14)

^SCR("W4DLKMR","AV",15)

^SCR("W4DLKMR","AV",16)

^SCR("W4DLKMR","AV",17)

^SCR("W4DLKMR","AV",18)

^SCR("W4DLKMR","AV",19)

^SCR("W4DLKMR","AV",20)

^SCR("W4DLKMR","AV",21)

^SCR("W4DLKMR","AV",22)

^SCR("W4DLKMR","AV",23)

^SCR("W4DLKMR","G",1,"CRD")
8,78,E,9,0
^SCR("W4DLKMR","G",1,"HELP")

^SCR("W4DLKMR","G",1,"LMAX")
9
^SCR("W4DLKMR","G",1,"MUMPS1")

^SCR("W4DLKMR","G",1,"MUMPS2")

^SCR("W4DLKMR","G",1,"OUTPUT")

^SCR("W4DLKMR","G",1,"SHEM")
gewl 'qn 
^SCR("W4DLKMR","G",1,"TYP")
E
^SCR("W4DLKMR","G",2,"CRD")
8,68,H,7,0
^SCR("W4DLKMR","G",2,"HELP")

^SCR("W4DLKMR","G",2,"LMAX")
7
^SCR("W4DLKMR","G",2,"MUMPS1")

^SCR("W4DLKMR","G",2,"MUMPS2")

^SCR("W4DLKMR","G",2,"OUTPUT")

^SCR("W4DLKMR","G",2,"SHEM")
gewl my
^SCR("W4DLKMR","G",2,"TYP")
H
^SCR("W4DLKMR","G",3,"CRD")
8,60,N,8,2
^SCR("W4DLKMR","G",3,"HELP")

^SCR("W4DLKMR","G",3,"LMAX")
10
^SCR("W4DLKMR","G",3,"MUMPS1")

^SCR("W4DLKMR","G",3,"MUMPS2")

^SCR("W4DLKMR","G",3,"OUTPUT")

^SCR("W4DLKMR","G",3,"SHEM")
zncew dxzi
^SCR("W4DLKMR","G",3,"TYP")
N
^SCR("W4DLKMR","G",4,"CRD")
8,49,N,8,2
^SCR("W4DLKMR","G",4,"HELP")

^SCR("W4DLKMR","G",4,"LMAX")
10
^SCR("W4DLKMR","G",4,"MUMPS1")

^SCR("W4DLKMR","G",4,"MUMPS2")

^SCR("W4DLKMR","G",4,"OUTPUT")

^SCR("W4DLKMR","G",4,"SHEM")
zeipw k"dq
^SCR("W4DLKMR","G",4,"TYP")
N
^SCR("W4DLKMR","G",5,"CRD")
8,38,N,8,2
^SCR("W4DLKMR","G",5,"HELP")

^SCR("W4DLKMR","G",5,"LMAX")
11
^SCR("W4DLKMR","G",5,"MUMPS1")

^SCR("W4DLKMR","G",5,"MUMPS2")

^SCR("W4DLKMR","G",5,"OUTPUT")

^SCR("W4DLKMR","G",5,"SHEM")
zeipci z-yg
^SCR("W4DLKMR","G",5,"TYP")
N
^SCR("W4DLKMR","G",6,"CRD")
8,26,N,7,2
^SCR("W4DLKMR","G",6,"HELP")

^SCR("W4DLKMR","G",6,"LMAX")
10
^SCR("W4DLKMR","G",6,"MUMPS1")

^SCR("W4DLKMR","G",6,"MUMPS2")

^SCR("W4DLKMR","G",6,"OUTPUT")

^SCR("W4DLKMR","G",6,"SHEM")
iekif z-yg
^SCR("W4DLKMR","G",6,"TYP")
N
^SCR("W4DLKMR","G",7,"CRD")
8,15,N,7,2
^SCR("W4DLKMR","G",7,"HELP")

^SCR("W4DLKMR","G",7,"LMAX")
7
^SCR("W4DLKMR","G",7,"MUMPS1")

^SCR("W4DLKMR","G",7,"MUMPS2")

^SCR("W4DLKMR","G",7,"OUTPUT")

^SCR("W4DLKMR","G",7,"SHEM")
minelyz
^SCR("W4DLKMR","G",7,"TYP")
N
^SCR("W4DLKMR","G",8,"CRD")
8,7,N,4,2
^SCR("W4DLKMR","G",8,"HELP")

^SCR("W4DLKMR","G",8,"LMAX")
4
^SCR("W4DLKMR","G",8,"MUMPS1")

^SCR("W4DLKMR","G",8,"MUMPS2")

^SCR("W4DLKMR","G",8,"SHEM")
dxzi
^SCR("W4DLKMR","G",8,"TYP")
N
^SCR("W4DLKMR","G","DEL")

^SCR("W4DLKMR","G","MAX")
99999
^SCR("W4DLKMR","G","NAME","ITRA")
8
^SCR("W4DLKMR","G","NAME","ITRA0")
3
^SCR("W4DLKMR","G","NAME","LKH")
1
^SCR("W4DLKMR","G","NAME","LKH1")
2
^SCR("W4DLKMR","G","NAME","SCB")
7
^SCR("W4DLKMR","G","NAME","SHBY")
5
^SCR("W4DLKMR","G","NAME","SKN")
4
^SCR("W4DLKMR","G","NAME","STZ")
6
^SCR("W4DLKMR","G","NM",1)
LKH
^SCR("W4DLKMR","G","NM",2)
LKH1
^SCR("W4DLKMR","G","NM",3)
ITRA0
^SCR("W4DLKMR","G","NM",4)
SKN
^SCR("W4DLKMR","G","NM",5)
SHBY
^SCR("W4DLKMR","G","NM",6)
STZ
^SCR("W4DLKMR","G","NM",7)
SCB
^SCR("W4DLKMR","G","NM",8)
ITRA
^SCR("W4DLKMR","G","RB")
7,2,24,79
^SCR("W4DLKMR","G","REF")
^TMPREP("G"
^SCR("W4DLKMR","G","RZD")
\
^SCR("W4DLKMR","G","STEP")
1
^SCR("W4DLKMR","G","STG")
  :dxzi:minelyz:iekif z-yg:zeipci z-yg:zeipw k"dq:zncew dxzi:gewl my:gewl 'qn :
^SCR("W4DLKMR","G","VG")
9
^SCR("W4DLKMR","NAME")
fkexn zegewl gec
^SCR("W4DLKMR","P",5,"CRD")
2,52,E,6,0
^SCR("W4DLKMR","P",5,"HELP")

^SCR("W4DLKMR","P",5,"LMAX")
6
^SCR("W4DLKMR","P",5,"MUMPS1")

^SCR("W4DLKMR","P",5,"MUMPS2")

^SCR("W4DLKMR","P",5,"OUTPUT")

^SCR("W4DLKMR","P",5,"TYP")
E
^SCR("W4DLKMR","P",10,"CRD")
2,15,E,5,0
^SCR("W4DLKMR","P",10,"HELP")

^SCR("W4DLKMR","P",10,"LMAX")
5
^SCR("W4DLKMR","P",10,"MUMPS1")

^SCR("W4DLKMR","P",10,"MUMPS2")

^SCR("W4DLKMR","P",10,"OUTPUT")

^SCR("W4DLKMR","P",10,"TYP")
E
^SCR("W4DLKMR","P",15,"CRD")
3,47,E,11,0
^SCR("W4DLKMR","P",15,"HELP")

^SCR("W4DLKMR","P",15,"LMAX")
11
^SCR("W4DLKMR","P",15,"MUMPS1")

^SCR("W4DLKMR","P",15,"MUMPS2")

^SCR("W4DLKMR","P",15,"OUTPUT")

^SCR("W4DLKMR","P",15,"TYP")
E
^SCR("W4DLKMR","P",20,"CRD")
3,10,E,10,0
^SCR("W4DLKMR","P",20,"HELP")

^SCR("W4DLKMR","P",20,"LMAX")
10
^SCR("W4DLKMR","P",20,"MUMPS1")

^SCR("W4DLKMR","P",20,"MUMPS2")

^SCR("W4DLKMR","P",20,"OUTPUT")

^SCR("W4DLKMR","P",20,"TYP")
E
^SCR("W4DLKMR","P",25,"CRD")
4,49,D,8,0
^SCR("W4DLKMR","P",25,"HELP")

^SCR("W4DLKMR","P",25,"LMAX")
9
^SCR("W4DLKMR","P",25,"MUMPS1")

^SCR("W4DLKMR","P",25,"MUMPS2")

^SCR("W4DLKMR","P",25,"OUTPUT")

^SCR("W4DLKMR","P",25,"TYP")
D
^SCR("W4DLKMR","P",30,"CRD")
4,11,D,8,0
^SCR("W4DLKMR","P",30,"HELP")

^SCR("W4DLKMR","P",30,"LMAX")
9
^SCR("W4DLKMR","P",30,"MUMPS1")

^SCR("W4DLKMR","P",30,"MUMPS2")

^SCR("W4DLKMR","P",30,"OUTPUT")

^SCR("W4DLKMR","P",30,"TYP")
D
^SCR("W4DLKMR","P","NAME","ADDAT")
30
^SCR("W4DLKMR","P","NAME","ADLKH")
20
^SCR("W4DLKMR","P","NAME","ADSUGL")
10
^SCR("W4DLKMR","P","NAME","MEDAT")
25
^SCR("W4DLKMR","P","NAME","MELKH")
15
^SCR("W4DLKMR","P","NAME","MESUGL")
5
^SCR("W4DLKMR","P","NM",5)
MESUGL
^SCR("W4DLKMR","P","NM",10)
ADSUGL
^SCR("W4DLKMR","P","NM",15)
MELKH
^SCR("W4DLKMR","P","NM",20)
ADLKH
^SCR("W4DLKMR","P","NM",25)
MEDAT
^SCR("W4DLKMR","P","NM",30)
ADDAT
^SCR("W4DLKP")
H
^SCR("W4DLKP",1)
                                                                               
^SCR("W4DLKP",2)
                                                                       ]       
^SCR("W4DLKP",3)
                                               {05        } :   jix`zn         
^SCR("W4DLKP",4)
                                               {10        } : jix`z cr         
^SCR("W4DLKP",5)
                                                                               
^SCR("W4DLKP",6)
                          {                  12} {11  }: zegewl zveawn         
^SCR("W4DLKP",7)
                          {                  14} {13  }zegewl zveaw cr         
^SCR("W4DLKP",8)
                                                                               
^SCR("W4DLKP",9)
                          {                16} {15        } :    gewln         
^SCR("W4DLKP",10)
                          {                21} {20        } :  gewl cr         
^SCR("W4DLKP",11)
                                                                               
^SCR("W4DLKP",12)
           {25 } :( 2 - zelawe zeipeayg wx , 1 - zepnfd llek) bivdl dn         
^SCR("W4DLKP",13)
                                                                               
^SCR("W4DLKP",14)
     [                                                                         
^SCR("W4DLKP","A",1)

^SCR("W4DLKP","A",2)

^SCR("W4DLKP","A",3)
:Š‰˜€šŽ
^SCR("W4DLKP","A",4)
:Š‰˜€šƒ’
^SCR("W4DLKP","A",5)

^SCR("W4DLKP","A",6)
:š…‡…—Œš–…�—Ž
^SCR("W4DLKP","A",7)
š…‡…—Œš–…�—ƒ’
^SCR("W4DLKP","A",8)

^SCR("W4DLKP","A",9)
:‡…—ŒŽ
^SCR("W4DLKP","A",10)
:‡…—Œƒ’
^SCR("W4DLKP","A",11)

^SCR("W4DLKP","A",12)
:(2-š…Œ�—…š…‰�…�™‡—˜,1-š…�Ž†„ŒŒ…‹)‚‰–„Œ„Ž
^SCR("W4DLKP","A",13)

^SCR("W4DLKP","A",14)

^SCR("W4DLKP","AV",1)

^SCR("W4DLKP","AV",2)

^SCR("W4DLKP","AV",3)
:lhrt,n
^SCR("W4DLKP","AV",4)
:lhrt,sg
^SCR("W4DLKP","AV",5)

^SCR("W4DLKP","AV",6)
:,ujuek,mucen
^SCR("W4DLKP","AV",7)
,ujuek,mucesg
^SCR("W4DLKP","AV",8)

^SCR("W4DLKP","AV",9)
:juekn
^SCR("W4DLKP","AV",10)
:jueksg
^SCR("W4DLKP","AV",11)

^SCR("W4DLKP","AV",12)
:(2-,ukceu,uhbucajer'1-,ubnzvkkuf)dhmvkvn
^SCR("W4DLKP","AV",13)

^SCR("W4DLKP","AV",14)

^SCR("W4DLKP","NAME")
zegewl g"ecl mixhnxt
^SCR("W4DLKP","P",5,"CRD")
3,47,D,8,0
^SCR("W4DLKP","P",5,"HELP")

^SCR("W4DLKP","P",5,"LMAX")
11
^SCR("W4DLKP","P",5,"MUMPS1")

^SCR("W4DLKP","P",5,"MUMPS2")

^SCR("W4DLKP","P",5,"MUST")

^SCR("W4DLKP","P",5,"TYP")
D
^SCR("W4DLKP","P",10,"CRD")
4,47,D,8,0
^SCR("W4DLKP","P",10,"HELP")

^SCR("W4DLKP","P",10,"LMAX")
11
^SCR("W4DLKP","P",10,"MUMPS1")

^SCR("W4DLKP","P",10,"MUMPS2")

^SCR("W4DLKP","P",10,"TYP")
D
^SCR("W4DLKP","P",11,"CRD")
6,49,E,5,0
^SCR("W4DLKP","P",11,"FNC")

^SCR("W4DLKP","P",11,"GLOB")
^SUGL
^SCR("W4DLKP","P",11,"HELP")

^SCR("W4DLKP","P",11,"LMAX")
5
^SCR("W4DLKP","P",11,"MUMPS1")

^SCR("W4DLKP","P",11,"MUMPS2")

^SCR("W4DLKP","P",11,"NLN")
20
^SCR("W4DLKP","P",11,"RZD")
\
^SCR("W4DLKP","P",11,"TOPB")
8
^SCR("W4DLKP","P",11,"TYP")
E
^SCR("W4DLKP","P",11,"VRB")
MEKVZ1
^SCR("W4DLKP","P",12,"CRD")
6,48,H,21,0
^SCR("W4DLKP","P",12,"HELP")

^SCR("W4DLKP","P",12,"LMAX")
21
^SCR("W4DLKP","P",12,"MUMPS1")

^SCR("W4DLKP","P",12,"MUMPS2")

^SCR("W4DLKP","P",12,"OUTPUT")

^SCR("W4DLKP","P",12,"TYP")
H
^SCR("W4DLKP","P",13,"CRD")
7,49,E,5,0
^SCR("W4DLKP","P",13,"FNC")

^SCR("W4DLKP","P",13,"GLOB")
^SUGL
^SCR("W4DLKP","P",13,"HELP")

^SCR("W4DLKP","P",13,"LMAX")
5
^SCR("W4DLKP","P",13,"MUMPS1")

^SCR("W4DLKP","P",13,"MUMPS2")

^SCR("W4DLKP","P",13,"NLN")
20
^SCR("W4DLKP","P",13,"RZD")
\
^SCR("W4DLKP","P",13,"TOPB")
8
^SCR("W4DLKP","P",13,"TYP")
E
^SCR("W4DLKP","P",13,"VRB")
ADKVZ1
^SCR("W4DLKP","P",14,"CRD")
7,48,H,21,0
^SCR("W4DLKP","P",14,"HELP")

^SCR("W4DLKP","P",14,"LMAX")
21
^SCR("W4DLKP","P",14,"MUMPS1")

^SCR("W4DLKP","P",14,"MUMPS2")

^SCR("W4DLKP","P",14,"OUTPUT")

^SCR("W4DLKP","P",14,"TYP")
H
^SCR("W4DLKP","P",15,"CRD")
9,47,E,11,0
^SCR("W4DLKP","P",15,"FNC")

^SCR("W4DLKP","P",15,"GLOB")
LKH
^SCR("W4DLKP","P",15,"HELP")

^SCR("W4DLKP","P",15,"LMAX")
11
^SCR("W4DLKP","P",15,"MUMPS1")

^SCR("W4DLKP","P",15,"MUMPS2")

^SCR("W4DLKP","P",15,"NLN")
20
^SCR("W4DLKP","P",15,"RZD")
\
^SCR("W4DLKP","P",15,"TOPB")
8
^SCR("W4DLKP","P",15,"TYP")
E
^SCR("W4DLKP","P",15,"VRB")
MELKH1
^SCR("W4DLKP","P",16,"CRD")
9,46,H,19
^SCR("W4DLKP","P",16,"HELP")

^SCR("W4DLKP","P",16,"LMAX")
19
^SCR("W4DLKP","P",16,"MUMPS1")

^SCR("W4DLKP","P",16,"MUMPS2")

^SCR("W4DLKP","P",16,"OUTPUT")

^SCR("W4DLKP","P",16,"TYP")
H
^SCR("W4DLKP","P",20,"CRD")
10,47,E,11,0
^SCR("W4DLKP","P",20,"FNC")

^SCR("W4DLKP","P",20,"GLOB")
LKH
^SCR("W4DLKP","P",20,"HELP")

^SCR("W4DLKP","P",20,"LMAX")
11
^SCR("W4DLKP","P",20,"MUMPS1")

^SCR("W4DLKP","P",20,"MUMPS2")

^SCR("W4DLKP","P",20,"NLN")
20
^SCR("W4DLKP","P",20,"RZD")
\
^SCR("W4DLKP","P",20,"TOPB")
8
^SCR("W4DLKP","P",20,"TYP")
E
^SCR("W4DLKP","P",20,"VRB")
ADLKH1
^SCR("W4DLKP","P",21,"CRD")
10,46,H,19
^SCR("W4DLKP","P",21,"HELP")

^SCR("W4DLKP","P",21,"LMAX")
19
^SCR("W4DLKP","P",21,"MUMPS1")

^SCR("W4DLKP","P",21,"MUMPS2")

^SCR("W4DLKP","P",21,"OUTPUT")

^SCR("W4DLKP","P",21,"TYP")
H
^SCR("W4DLKP","P",25,"CRD")
12,11,N,1,0
^SCR("W4DLKP","P",25,"HELP")

^SCR("W4DLKP","P",25,"LMAX")
4
^SCR("W4DLKP","P",25,"MUMPS1")

^SCR("W4DLKP","P",25,"MUMPS2")
I ASONLY'=1&(ASONLY'=2) S %SC("ER")=1
^SCR("W4DLKP","P",25,"TYP")
N
^SCR("W4DLKP","P","NAME","ADDAT")
10
^SCR("W4DLKP","P","NAME","ADKVZ")
13
^SCR("W4DLKP","P","NAME","ADKVZ1")
14
^SCR("W4DLKP","P","NAME","ADLKH")
20
^SCR("W4DLKP","P","NAME","ADLKH1")
21
^SCR("W4DLKP","P","NAME","ASONLY")
25
^SCR("W4DLKP","P","NAME","MEDAT")
5
^SCR("W4DLKP","P","NAME","MEKVZ")
11
^SCR("W4DLKP","P","NAME","MEKVZ1")
12
^SCR("W4DLKP","P","NAME","MELKH")
15
^SCR("W4DLKP","P","NAME","MELKH1")
16
^SCR("W4DLKP","P","NM",5)
MEDAT
^SCR("W4DLKP","P","NM",10)
ADDAT
^SCR("W4DLKP","P","NM",11)
MEKVZ
^SCR("W4DLKP","P","NM",12)
MEKVZ1
^SCR("W4DLKP","P","NM",13)
ADKVZ
^SCR("W4DLKP","P","NM",14)
ADKVZ1
^SCR("W4DLKP","P","NM",15)
MELKH
^SCR("W4DLKP","P","NM",16)
MELKH1
^SCR("W4DLKP","P","NM",20)
ADLKH
^SCR("W4DLKP","P","NM",21)
ADLKH1
^SCR("W4DLKP","P","NM",25)
ASONLY
^SCR("W4DLKP1")
H
^SCR("W4DLKP1",1)
                                                                               
^SCR("W4DLKP1",2)
                                                                             ] 
^SCR("W4DLKP1",3)
                                      {05        } :   jix`zn                  
^SCR("W4DLKP1",4)
                                      {10        } : jix`z cr                  
^SCR("W4DLKP1",5)
                                                                               
^SCR("W4DLKP1",6)
                     {                  12} {11  } : zegewl zveawn             
^SCR("W4DLKP1",7)
                     {                  14} {13  } :zegewl zveaw cr            
^SCR("W4DLKP1",8)
                                                                               
^SCR("W4DLKP1",9)
                                                                               
^SCR("W4DLKP1",10)
                                                                               
^SCR("W4DLKP1",11)
                 {                16} {15        } :    gewln                  
^SCR("W4DLKP1",12)
                 {                21} {20        } :  gewl cr                  
^SCR("W4DLKP1",13)
                                                                               
^SCR("W4DLKP1",14)
 {25 } : (1 - dlaw/qn 'ayge gelyn zecerz mb , 2 - zelawe zeipeayg wx) bivdl dn 
^SCR("W4DLKP1",15)
                                                                               
^SCR("W4DLKP1",16)
 [                                                                             
^SCR("W4DLKP1",17)
                                                                               
^SCR("W4DLKP1","A",1)

^SCR("W4DLKP1","A",2)

^SCR("W4DLKP1","A",3)
:Š‰˜€šŽ
^SCR("W4DLKP1","A",4)
:Š‰˜€šƒ’
^SCR("W4DLKP1","A",5)

^SCR("W4DLKP1","A",6)
:š…‡…—Œš–…�—Ž
^SCR("W4DLKP1","A",7)
:š…‡…—Œš–…�—ƒ’
^SCR("W4DLKP1","A",8)

^SCR("W4DLKP1","A",9)

^SCR("W4DLKP1","A",10)

^SCR("W4DLKP1","A",11)
:‡…—ŒŽ
^SCR("W4DLKP1","A",12)
:‡…—Œƒ’
^SCR("W4DLKP1","A",13)

^SCR("W4DLKP1","A",14)
:(1-„Œ�—/‘Ž'�™‡…‡…Œ™Žš…ƒ…’š�‚,2-š…Œ�—…š…‰�…�™‡—˜)‚‰–„Œ„Ž
^SCR("W4DLKP1","A",15)

^SCR("W4DLKP1","A",16)

^SCR("W4DLKP1","A",17)

^SCR("W4DLKP1","AV",1)

^SCR("W4DLKP1","AV",2)

^SCR("W4DLKP1","AV",3)
:lhrt,n
^SCR("W4DLKP1","AV",4)
:lhrt,sg
^SCR("W4DLKP1","AV",5)

^SCR("W4DLKP1","AV",6)
:,ujuek,mucen
^SCR("W4DLKP1","AV",7)
:,ujuek,mucesg
^SCR("W4DLKP1","AV",8)

^SCR("W4DLKP1","AV",9)

^SCR("W4DLKP1","AV",10)

^SCR("W4DLKP1","AV",11)
:juekn
^SCR("W4DLKP1","AV",12)
:jueksg
^SCR("W4DLKP1","AV",13)

^SCR("W4DLKP1","AV",14)
:(1-vkceqxnwcajujukan,usug,od'2-,ukceu,uhbucajer)dhmvkvn
^SCR("W4DLKP1","AV",15)

^SCR("W4DLKP1","AV",16)

^SCR("W4DLKP1","AV",17)

^SCR("W4DLKP1","NAME")

^SCR("W4DLKP1","P",5,"CRD")
3,38,D,8,0
^SCR("W4DLKP1","P",5,"HELP")

^SCR("W4DLKP1","P",5,"LMAX")
11
^SCR("W4DLKP1","P",5,"MUMPS1")

^SCR("W4DLKP1","P",5,"MUMPS2")

^SCR("W4DLKP1","P",5,"MUST")

^SCR("W4DLKP1","P",5,"TYP")
D
^SCR("W4DLKP1","P",10,"CRD")
4,38,D,8,0
^SCR("W4DLKP1","P",10,"HELP")

^SCR("W4DLKP1","P",10,"LMAX")
11
^SCR("W4DLKP1","P",10,"MUMPS1")

^SCR("W4DLKP1","P",10,"MUMPS2")

^SCR("W4DLKP1","P",10,"TYP")
D
^SCR("W4DLKP1","P",11,"CRD")
6,44,E,5,0
^SCR("W4DLKP1","P",11,"FNC")

^SCR("W4DLKP1","P",11,"GLOB")
^SUGL
^SCR("W4DLKP1","P",11,"HELP")

^SCR("W4DLKP1","P",11,"LMAX")
5
^SCR("W4DLKP1","P",11,"MUMPS1")

^SCR("W4DLKP1","P",11,"MUMPS2")

^SCR("W4DLKP1","P",11,"NLN")
20
^SCR("W4DLKP1","P",11,"RZD")
\
^SCR("W4DLKP1","P",11,"TOPB")
8
^SCR("W4DLKP1","P",11,"TYP")
E
^SCR("W4DLKP1","P",11,"VRB")
MEKVZ1
^SCR("W4DLKP1","P",12,"CRD")
6,43,H,21
^SCR("W4DLKP1","P",12,"HELP")

^SCR("W4DLKP1","P",12,"LMAX")
21
^SCR("W4DLKP1","P",12,"MUMPS1")

^SCR("W4DLKP1","P",12,"MUMPS2")

^SCR("W4DLKP1","P",12,"OUTPUT")

^SCR("W4DLKP1","P",12,"TYP")
H
^SCR("W4DLKP1","P",13,"CRD")
7,44,E,5,0
^SCR("W4DLKP1","P",13,"FNC")

^SCR("W4DLKP1","P",13,"GLOB")
^SUGL
^SCR("W4DLKP1","P",13,"HELP")

^SCR("W4DLKP1","P",13,"LMAX")
5
^SCR("W4DLKP1","P",13,"MUMPS1")

^SCR("W4DLKP1","P",13,"MUMPS2")

^SCR("W4DLKP1","P",13,"NLN")
20
^SCR("W4DLKP1","P",13,"RZD")
\
^SCR("W4DLKP1","P",13,"TOPB")
8
^SCR("W4DLKP1","P",13,"TYP")
E
^SCR("W4DLKP1","P",13,"VRB")
ADKVZ1
^SCR("W4DLKP1","P",14,"CRD")
7,43,H,21
^SCR("W4DLKP1","P",14,"HELP")

^SCR("W4DLKP1","P",14,"LMAX")
21
^SCR("W4DLKP1","P",14,"MUMPS1")

^SCR("W4DLKP1","P",14,"MUMPS2")

^SCR("W4DLKP1","P",14,"OUTPUT")

^SCR("W4DLKP1","P",14,"TYP")
H
^SCR("W4DLKP1","P",15,"CRD")
11,38,E,11,0
^SCR("W4DLKP1","P",15,"FNC")

^SCR("W4DLKP1","P",15,"GLOB")
LKH
^SCR("W4DLKP1","P",15,"HELP")

^SCR("W4DLKP1","P",15,"LMAX")
11
^SCR("W4DLKP1","P",15,"MUMPS1")

^SCR("W4DLKP1","P",15,"MUMPS2")

^SCR("W4DLKP1","P",15,"NLN")
20
^SCR("W4DLKP1","P",15,"RZD")
\
^SCR("W4DLKP1","P",15,"TOPB")
8
^SCR("W4DLKP1","P",15,"TYP")
E
^SCR("W4DLKP1","P",15,"VRB")
MELKH1
^SCR("W4DLKP1","P",16,"CRD")
11,37,H,19
^SCR("W4DLKP1","P",16,"HELP")

^SCR("W4DLKP1","P",16,"LMAX")
19
^SCR("W4DLKP1","P",16,"MUMPS1")

^SCR("W4DLKP1","P",16,"MUMPS2")

^SCR("W4DLKP1","P",16,"OUTPUT")

^SCR("W4DLKP1","P",16,"TYP")
H
^SCR("W4DLKP1","P",20,"CRD")
12,38,E,11,0
^SCR("W4DLKP1","P",20,"FNC")

^SCR("W4DLKP1","P",20,"GLOB")
LKH
^SCR("W4DLKP1","P",20,"HELP")

^SCR("W4DLKP1","P",20,"LMAX")
11
^SCR("W4DLKP1","P",20,"MUMPS1")

^SCR("W4DLKP1","P",20,"MUMPS2")

^SCR("W4DLKP1","P",20,"NLN")
20
^SCR("W4DLKP1","P",20,"RZD")
\
^SCR("W4DLKP1","P",20,"TOPB")
8
^SCR("W4DLKP1","P",20,"TYP")
E
^SCR("W4DLKP1","P",20,"VRB")
ADLKH1
^SCR("W4DLKP1","P",21,"CRD")
12,37,H,19
^SCR("W4DLKP1","P",21,"HELP")

^SCR("W4DLKP1","P",21,"LMAX")
19
^SCR("W4DLKP1","P",21,"MUMPS1")

^SCR("W4DLKP1","P",21,"MUMPS2")

^SCR("W4DLKP1","P",21,"OUTPUT")

^SCR("W4DLKP1","P",21,"TYP")
H
^SCR("W4DLKP1","P",25,"CRD")
14,1,N,1,0
^SCR("W4DLKP1","P",25,"HELP")

^SCR("W4DLKP1","P",25,"LMAX")
4
^SCR("W4DLKP1","P",25,"MUMPS1")

^SCR("W4DLKP1","P",25,"MUMPS2")
I ASONLY'=1&(ASONLY'=2) S %SC("ER")=1
^SCR("W4DLKP1","P",25,"TYP")
N
^SCR("W4DLKP1","P","NAME","ADDAT")
10
^SCR("W4DLKP1","P","NAME","ADKVZ")
13
^SCR("W4DLKP1","P","NAME","ADKVZ1")
14
^SCR("W4DLKP1","P","NAME","ADLKH")
20
^SCR("W4DLKP1","P","NAME","ADLKH1")
21
^SCR("W4DLKP1","P","NAME","ASONLY")
25
^SCR("W4DLKP1","P","NAME","MEDAT")
5
^SCR("W4DLKP1","P","NAME","MEKVZ")
11
^SCR("W4DLKP1","P","NAME","MEKVZ1")
12
^SCR("W4DLKP1","P","NAME","MELKH")
15
^SCR("W4DLKP1","P","NAME","MELKH1")
16
^SCR("W4DLKP1","P","NM",5)
MEDAT
^SCR("W4DLKP1","P","NM",10)
ADDAT
^SCR("W4DLKP1","P","NM",11)
MEKVZ
^SCR("W4DLKP1","P","NM",12)
MEKVZ1
^SCR("W4DLKP1","P","NM",13)
ADKVZ
^SCR("W4DLKP1","P","NM",14)
ADKVZ1
^SCR("W4DLKP1","P","NM",15)
MELKH
^SCR("W4DLKP1","P","NM",16)
MELKH1
^SCR("W4DLKP1","P","NM",20)
ADLKH
^SCR("W4DLKP1","P","NM",21)
ADLKH1
^SCR("W4DLKP1","P","NM",25)
ASONLY
^SCR("W4DMLZ")
H
^SCR("W4DMLZ",1)
                             #  mixvln g"ec  #                                 
^SCR("W4DMLZ",2)
                     {10      }   jix`z cr    {05      }  jix`zn               
^SCR("W4DMLZ",3)
                         {20  }     dry cr        {15  }    dryn               
^SCR("W4DMLZ",4)
 {            36}{35 }  ogley beq cr     {           26}{25 }  ogley beqn      
^SCR("W4DMLZ",5)
       {40 } (2 - zitqk dxibq itl, 1 - mihixt zxikn itl ) g"ec bivdl           
^SCR("W4DMLZ",6)
       {45 }    (0 - zepnfdd lk, 2 - zexebq, 1 - zegezt ) zepnfd itl           
^SCR("W4DMLZ","A",1)
�‰˜–ŒŽ‡"…ƒ
^SCR("W4DMLZ","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("W4DMLZ","A",3)
„’™ƒ’„’™Ž
^SCR("W4DMLZ","A",4)
�‡Œ…™‚…‘ƒ’�‡Œ…™‚…‘Ž
^SCR("W4DMLZ","A",5)
(2-š‰”‘‹„˜‰‚‘‰”Œ,1-�‰ˆ‰˜”š˜‰‹Ž‰”Œ)‡"…ƒ‚‰–„Œ
^SCR("W4DMLZ","A",6)
(0-š…�Ž†„„Œ‹,2-š…˜…‚‘,1-š…‡…š”)š…�Ž†„‰”Œ
^SCR("W4DMLZ","AV",1)
ohrmknj"us
^SCR("W4DMLZ","AV",2)
lhrt,sglhrt,n
^SCR("W4DMLZ","AV",3)
vgasgvgan
^SCR("W4DMLZ","AV",4)
ijkuaduxsgijkuaduxn
^SCR("W4DMLZ","AV",5)
(2-,hpxfvrhdxhpk'1-ohyhrp,rhfnhpk)j"usdhmvk
^SCR("W4DMLZ","AV",6)
(0-,ubnzvvkf'2-,urudx'1-,uju,p),ubnzvhpk
^SCR("W4DMLZ","NAME")
4
^SCR("W4DMLZ","P",5,"CRD")
2,46,D,8,0
^SCR("W4DMLZ","P",5,"HELP")

^SCR("W4DMLZ","P",5,"LMAX")
9
^SCR("W4DMLZ","P",5,"MUMPS1")
D ^W4IN S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("W4DMLZ","P",5,"MUMPS2")

^SCR("W4DMLZ","P",5,"MUST")

^SCR("W4DMLZ","P",5,"TYP")
D
^SCR("W4DMLZ","P",10,"CRD")
2,21,D,8,0
^SCR("W4DMLZ","P",10,"HELP")

^SCR("W4DMLZ","P",10,"LMAX")
9
^SCR("W4DMLZ","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("W4DMLZ","P",10,"MUMPS2")

^SCR("W4DMLZ","P",10,"MUST")

^SCR("W4DMLZ","P",10,"TYP")
D
^SCR("W4DMLZ","P",15,"CRD")
3,50,T,5,0
^SCR("W4DMLZ","P",15,"HELP")

^SCR("W4DMLZ","P",15,"LMAX")
5
^SCR("W4DMLZ","P",15,"MUMPS1")

^SCR("W4DMLZ","P",15,"MUMPS2")

^SCR("W4DMLZ","P",15,"TYP")
T
^SCR("W4DMLZ","P",20,"CRD")
3,25,T,5,0
^SCR("W4DMLZ","P",20,"HELP")

^SCR("W4DMLZ","P",20,"LMAX")
5
^SCR("W4DMLZ","P",20,"MUMPS1")
S:'$G(ADSHAA) ADSHAA=24
^SCR("W4DMLZ","P",20,"MUMPS2")
I MESHAA<ADSHAA S %SC("ER")=1
^SCR("W4DMLZ","P",20,"TYP")
T
^SCR("W4DMLZ","P",25,"CHECK")
Y
^SCR("W4DMLZ","P",25,"CRD")
4,56,E,4,0
^SCR("W4DMLZ","P",25,"FNC")

^SCR("W4DMLZ","P",25,"GLOB")
SUGS
^SCR("W4DMLZ","P",25,"HELP")

^SCR("W4DMLZ","P",25,"LMAX")
4
^SCR("W4DMLZ","P",25,"MUMPS1")

^SCR("W4DMLZ","P",25,"MUMPS2")

^SCR("W4DMLZ","P",25,"NLN")
20
^SCR("W4DMLZ","P",25,"RZD")
\
^SCR("W4DMLZ","P",25,"TOPB")
8
^SCR("W4DMLZ","P",25,"TYP")
E
^SCR("W4DMLZ","P",25,"VRB")
MESUGS1
^SCR("W4DMLZ","P",26,"CRD")
4,56,H,14
^SCR("W4DMLZ","P",26,"HELP")

^SCR("W4DMLZ","P",26,"LMAX")
14
^SCR("W4DMLZ","P",26,"MUMPS1")

^SCR("W4DMLZ","P",26,"MUMPS2")

^SCR("W4DMLZ","P",26,"OUTPUT")

^SCR("W4DMLZ","P",26,"TYP")
H
^SCR("W4DMLZ","P",35,"CHECK")
Y
^SCR("W4DMLZ","P",35,"CRD")
4,17,E,4,0
^SCR("W4DMLZ","P",35,"FNC")

^SCR("W4DMLZ","P",35,"GLOB")
SUGS
^SCR("W4DMLZ","P",35,"HELP")

^SCR("W4DMLZ","P",35,"LMAX")
4
^SCR("W4DMLZ","P",35,"MUMPS1")

^SCR("W4DMLZ","P",35,"MUMPS2")

^SCR("W4DMLZ","P",35,"NLN")
20
^SCR("W4DMLZ","P",35,"RZD")
\
^SCR("W4DMLZ","P",35,"TOPB")
8
^SCR("W4DMLZ","P",35,"TYP")
E
^SCR("W4DMLZ","P",35,"VRB")
ADSUGS1
^SCR("W4DMLZ","P",36,"CRD")
4,17,H,15
^SCR("W4DMLZ","P",36,"HELP")

^SCR("W4DMLZ","P",36,"LMAX")
15
^SCR("W4DMLZ","P",36,"MUMPS1")

^SCR("W4DMLZ","P",36,"MUMPS2")

^SCR("W4DMLZ","P",36,"OUTPUT")

^SCR("W4DMLZ","P",36,"TYP")
H
^SCR("W4DMLZ","P",40,"CRD")
5,7,N,1,0
^SCR("W4DMLZ","P",40,"HELP")

^SCR("W4DMLZ","P",40,"LMAX")
4
^SCR("W4DMLZ","P",40,"MUMPS1")
S:'$G(SGR) SGR=2
^SCR("W4DMLZ","P",40,"MUMPS2")

^SCR("W4DMLZ","P",40,"MUST")

^SCR("W4DMLZ","P",40,"TYP")
N
^SCR("W4DMLZ","P",45,"CRD")
6,7,N,1,0
^SCR("W4DMLZ","P",45,"HELP")

^SCR("W4DMLZ","P",45,"LMAX")
4
^SCR("W4DMLZ","P",45,"MUMPS1")
S:'$G(SUGHZ) SUGHZ=2
^SCR("W4DMLZ","P",45,"MUMPS2")

^SCR("W4DMLZ","P",45,"MUST")

^SCR("W4DMLZ","P",45,"TYP")
N
^SCR("W4DMLZ","P","NAME","ADSHAA")
20
^SCR("W4DMLZ","P","NAME","ADSUGS")
35
^SCR("W4DMLZ","P","NAME","ADSUGS1")
36
^SCR("W4DMLZ","P","NAME","DAT1")
5
^SCR("W4DMLZ","P","NAME","DAT2")
10
^SCR("W4DMLZ","P","NAME","MESHAA")
15
^SCR("W4DMLZ","P","NAME","MESUGS")
25
^SCR("W4DMLZ","P","NAME","MESUGS1")
26
^SCR("W4DMLZ","P","NAME","SGR")
40
^SCR("W4DMLZ","P","NAME","SUGHZ")
45
^SCR("W4DMLZ","P","NM",5)
DAT1
^SCR("W4DMLZ","P","NM",10)
DAT2
^SCR("W4DMLZ","P","NM",15)
MESHAA
^SCR("W4DMLZ","P","NM",20)
ADSHAA
^SCR("W4DMLZ","P","NM",25)
MESUGS
^SCR("W4DMLZ","P","NM",26)
MESUGS1
^SCR("W4DMLZ","P","NM",35)
ADSUGS
^SCR("W4DMLZ","P","NM",36)
ADSUGS1
^SCR("W4DMLZ","P","NM",40)
SGR
^SCR("W4DMLZ","P","NM",45)
SUGHZ
^SCR("W4DP1")
H
^SCR("W4DP1",1)
    #{                        01} mihixt g"ec #                                
^SCR("W4DP1",2)
                   {10      } jix`z cr    {05      } jix`zn                    
^SCR("W4DP1",3)
 {                 36} {35 }:mihixt zveaw    {                31} {30}:'qn hq  
^SCR("W4DP1",4)
  {               17}{16     }:hixt cr      {              14}{13     }:hixtn  
^SCR("W4DP1",5)
                                                                             1$
^SCR("W4DP1",6)
 : % :nrn iptl:oexg` xign:ehp mekq: dgpd : zenk :      hixt xe`z    :hixt cew: 
^SCR("W4DP1",7)
                                                                               
^SCR("W4DP1",8)
                                                                               
^SCR("W4DP1",9)
                                                                               
^SCR("W4DP1",10)
                                                                               
^SCR("W4DP1",11)
                                                                               
^SCR("W4DP1",12)
                                                                               
^SCR("W4DP1",13)
                                                                               
^SCR("W4DP1",14)
                                                                               
^SCR("W4DP1",15)
                                                                               
^SCR("W4DP1",16)
                                                                               
^SCR("W4DP1",17)
                                                                               
^SCR("W4DP1",18)
                                                                               
^SCR("W4DP1",19)
                                                                               
^SCR("W4DP1",20)
 $1                                                                            
^SCR("W4DP1",21)
 {22      }: n"rn iptl {20      }: mekq   {18    }:zegpd  {15     }:zenk k"dq  
^SCR("W4DP1",22)
                   {45    }: ehp zenk    {40      }: mekqa {25    }:   zeiwqr  
^SCR("W4DP1","AV",1)
íéèéøôç"åã
^SCR("W4DP1","AV",2)
êéøàúãòêéøàúî
^SCR("W4DP1","AV",3)
:íéèéøôúöåá÷:'ñîèñ
^SCR("W4DP1","AV",4)
:èéøôãò:èéøôî
^SCR("W4DP1","AV",5)

^SCR("W4DP1","AV",6)
%îòîéðôìïåøçàøéçîåèðíåëñäçðäúåîëèéøôøåàúèéøôãå÷
^SCR("W4DP1","AV",7)
---------------------------------------------------------------------
^SCR("W4DP1","AV",8)

^SCR("W4DP1","AV",9)

^SCR("W4DP1","AV",10)

^SCR("W4DP1","AV",11)

^SCR("W4DP1","AV",12)

^SCR("W4DP1","AV",13)

^SCR("W4DP1","AV",14)

^SCR("W4DP1","AV",15)

^SCR("W4DP1","AV",16)

^SCR("W4DP1","AV",17)

^SCR("W4DP1","AV",18)

^SCR("W4DP1","AV",19)

^SCR("W4DP1","AV",20)

^SCR("W4DP1","AV",21)
:î"òîéðôì:íåëñ:úåçðä:úåîëë"äñ
^SCR("W4DP1","AV",22)
:åèðúåîë:íåëñá:úåé÷ñò
^SCR("W4DP1","G",1,"CHECK")
Y
^SCR("W4DP1","G",1,"CRD")
7,77,E,8,0
^SCR("W4DP1","G",1,"FNC")

^SCR("W4DP1","G",1,"GLOB")
PAR
^SCR("W4DP1","G",1,"HELP")

^SCR("W4DP1","G",1,"LMAX")
8
^SCR("W4DP1","G",1,"MUMPS1")

^SCR("W4DP1","G",1,"MUMPS2")
D PAR^P1DP1
^SCR("W4DP1","G",1,"MUST")

^SCR("W4DP1","G",1,"NLN")
20
^SCR("W4DP1","G",1,"RZD")
**
^SCR("W4DP1","G",1,"SHEM")
hixt cew
^SCR("W4DP1","G",1,"TOPB")
8
^SCR("W4DP1","G",1,"TYP")
E
^SCR("W4DP1","G",1,"VRB")
PAR1
^SCR("W4DP1","G",2,"CRD")
7,68,H,18,0
^SCR("W4DP1","G",2,"HELP")

^SCR("W4DP1","G",2,"LMAX")
19
^SCR("W4DP1","G",2,"MUMPS1")

^SCR("W4DP1","G",2,"MUMPS2")

^SCR("W4DP1","G",2,"OUTPUT")

^SCR("W4DP1","G",2,"SHEM")
      hixt xe`z    
^SCR("W4DP1","G",2,"TYP")
H
^SCR("W4DP1","G",3,"CRD")
7,48,N,6,1
^SCR("W4DP1","G",3,"HELP")

^SCR("W4DP1","G",3,"LMAX")
6
^SCR("W4DP1","G",3,"MUMPS1")

^SCR("W4DP1","G",3,"MUMPS2")

^SCR("W4DP1","G",3,"OUTPUT")

^SCR("W4DP1","G",3,"SHEM")
 zenk 
^SCR("W4DP1","G",3,"TYP")
N
^SCR("W4DP1","G",4,"CRD")
7,41,N,6,2
^SCR("W4DP1","G",4,"HELP")

^SCR("W4DP1","G",4,"LMAX")
6
^SCR("W4DP1","G",4,"MUMPS1")

^SCR("W4DP1","G",4,"MUMPS2")

^SCR("W4DP1","G",4,"OUTPUT")

^SCR("W4DP1","G",4,"SHEM")
 dgpd 
^SCR("W4DP1","G",4,"TYP")
N
^SCR("W4DP1","G",5,"CRD")
7,34,N,8,2
^SCR("W4DP1","G",5,"HELP")

^SCR("W4DP1","G",5,"LMAX")
8
^SCR("W4DP1","G",5,"MUMPS1")

^SCR("W4DP1","G",5,"MUMPS2")

^SCR("W4DP1","G",5,"OUTPUT")

^SCR("W4DP1","G",5,"SHEM")
ehp mekq
^SCR("W4DP1","G",5,"TYP")
N
^SCR("W4DP1","G",6,"CRD")
7,25,N,7,2
^SCR("W4DP1","G",6,"HELP")

^SCR("W4DP1","G",6,"LMAX")
10
^SCR("W4DP1","G",6,"MUMPS1")

^SCR("W4DP1","G",6,"MUMPS2")

^SCR("W4DP1","G",6,"OUTPUT")

^SCR("W4DP1","G",6,"SHEM")
oexg` xign
^SCR("W4DP1","G",6,"TYP")
N
^SCR("W4DP1","G",7,"CRD")
7,14,N,7,2
^SCR("W4DP1","G",7,"HELP")

^SCR("W4DP1","G",7,"LMAX")
8
^SCR("W4DP1","G",7,"MUMPS1")

^SCR("W4DP1","G",7,"MUMPS2")

^SCR("W4DP1","G",7,"OUTPUT")

^SCR("W4DP1","G",7,"SHEM")
nrn iptl
^SCR("W4DP1","G",7,"TYP")
N
^SCR("W4DP1","G",8,"CRD")
7,5,N,3,1
^SCR("W4DP1","G",8,"HELP")

^SCR("W4DP1","G",8,"LMAX")
3
^SCR("W4DP1","G",8,"MUMPS1")

^SCR("W4DP1","G",8,"MUMPS2")

^SCR("W4DP1","G",8,"OUTPUT")

^SCR("W4DP1","G",8,"SHEM")
 % 
^SCR("W4DP1","G",8,"TYP")
N
^SCR("W4DP1","G","DEL")
Y
^SCR("W4DP1","G","MAX")
99999
^SCR("W4DP1","G","NAME","AHUZ")
8
^SCR("W4DP1","G","NAME","HN")
4
^SCR("W4DP1","G","NAME","KAM")
3
^SCR("W4DP1","G","NAME","LMAM")
7
^SCR("W4DP1","G","NAME","MH")
6
^SCR("W4DP1","G","NAME","PAR")
1
^SCR("W4DP1","G","NAME","PAR1")
2
^SCR("W4DP1","G","NAME","SUM")
5
^SCR("W4DP1","G","NM",1)
PAR
^SCR("W4DP1","G","NM",2)
PAR1
^SCR("W4DP1","G","NM",3)
KAM
^SCR("W4DP1","G","NM",4)
HN
^SCR("W4DP1","G","NM",5)
SUM
^SCR("W4DP1","G","NM",6)
MH
^SCR("W4DP1","G","NM",7)
LMAM
^SCR("W4DP1","G","NM",8)
AHUZ
^SCR("W4DP1","G","RB")
6,2,21,79
^SCR("W4DP1","G","REF")
^TEMP($P
^SCR("W4DP1","G","RZD")
\
^SCR("W4DP1","G","STEP")
1
^SCR("W4DP1","G","STG")
 : % :nrn iptl:oexg` xign:ehp mekq: dgpd : zenk :      hixt xe`z    :hixt cew: 
^SCR("W4DP1","G","VG")
8
^SCR("W4DP1","NAME")

^SCR("W4DP1","P",1,"CRD")
1,33,H,25
^SCR("W4DP1","P",1,"HELP")

^SCR("W4DP1","P",1,"LMAX")
27
^SCR("W4DP1","P",1,"MUMPS1")

^SCR("W4DP1","P",1,"MUMPS2")

^SCR("W4DP1","P",1,"OUTPUT")

^SCR("W4DP1","P",1,"TYP")
H
^SCR("W4DP1","P",5,"CRD")
2,42,D,8,0
^SCR("W4DP1","P",5,"HELP")

^SCR("W4DP1","P",5,"LMAX")
9
^SCR("W4DP1","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($S($G(P1DZ):P1DZ,1:+$H),1) K %L1NMB("ALB")
^SCR("W4DP1","P",5,"MUMPS2")

^SCR("W4DP1","P",5,"TYP")
D
^SCR("W4DP1","P",10,"CRD")
2,19,D,8,0
^SCR("W4DP1","P",10,"HELP")

^SCR("W4DP1","P",10,"LMAX")
9
^SCR("W4DP1","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("W4DP1","P",10,"MUMPS2")
D TV1^P1HZGDAT(DAT1,DAT2)
^SCR("W4DP1","P",10,"TYP")
D
^SCR("W4DP1","P",13,"CRD")
4,62,E,8,0
^SCR("W4DP1","P",13,"FNC")

^SCR("W4DP1","P",13,"GLOB")
PAR
^SCR("W4DP1","P",13,"HELP")

^SCR("W4DP1","P",13,"LMAX")
8
^SCR("W4DP1","P",13,"MUMPS1")

^SCR("W4DP1","P",13,"MUMPS2")

^SCR("W4DP1","P",13,"NLN")
20
^SCR("W4DP1","P",13,"RZD")
**
^SCR("W4DP1","P",13,"TOPB")
8
^SCR("W4DP1","P",13,"TYP")
E
^SCR("W4DP1","P",13,"VRB")
MEPAR1
^SCR("W4DP1","P",14,"CRD")
4,62,H,17
^SCR("W4DP1","P",14,"HELP")

^SCR("W4DP1","P",14,"LMAX")
17
^SCR("W4DP1","P",14,"MUMPS1")

^SCR("W4DP1","P",14,"MUMPS2")

^SCR("W4DP1","P",14,"OUTPUT")

^SCR("W4DP1","P",14,"TYP")
H
^SCR("W4DP1","P",15,"CRD")
21,58,N,8,1
^SCR("W4DP1","P",15,"HELP")

^SCR("W4DP1","P",15,"LMAX")
8
^SCR("W4DP1","P",15,"MUMPS1")

^SCR("W4DP1","P",15,"MUMPS2")

^SCR("W4DP1","P",15,"OUTPUT")

^SCR("W4DP1","P",15,"TYP")
N
^SCR("W4DP1","P",16,"CRD")
4,21,E,8,0
^SCR("W4DP1","P",16,"FNC")

^SCR("W4DP1","P",16,"GLOB")
PAR
^SCR("W4DP1","P",16,"HELP")

^SCR("W4DP1","P",16,"LMAX")
8
^SCR("W4DP1","P",16,"MUMPS1")

^SCR("W4DP1","P",16,"MUMPS2")

^SCR("W4DP1","P",16,"NLN")
20
^SCR("W4DP1","P",16,"RZD")
**
^SCR("W4DP1","P",16,"TOPB")
8
^SCR("W4DP1","P",16,"TYP")
E
^SCR("W4DP1","P",16,"VRB")
ADPAR1
^SCR("W4DP1","P",17,"CRD")
4,21,H,18
^SCR("W4DP1","P",17,"HELP")

^SCR("W4DP1","P",17,"LMAX")
18
^SCR("W4DP1","P",17,"MUMPS1")

^SCR("W4DP1","P",17,"MUMPS2")

^SCR("W4DP1","P",17,"OUTPUT")

^SCR("W4DP1","P",17,"TYP")
H
^SCR("W4DP1","P",18,"CRD")
21,42,N,7,2
^SCR("W4DP1","P",18,"HELP")

^SCR("W4DP1","P",18,"LMAX")
7
^SCR("W4DP1","P",18,"MUMPS1")

^SCR("W4DP1","P",18,"MUMPS2")

^SCR("W4DP1","P",18,"OUTPUT")

^SCR("W4DP1","P",18,"TYP")
N
^SCR("W4DP1","P",20,"CRD")
21,23,N,9,2
^SCR("W4DP1","P",20,"HELP")

^SCR("W4DP1","P",20,"LMAX")
9
^SCR("W4DP1","P",20,"MUMPS1")

^SCR("W4DP1","P",20,"MUMPS2")

^SCR("W4DP1","P",20,"OUTPUT")

^SCR("W4DP1","P",20,"TYP")
N
^SCR("W4DP1","P",22,"CRD")
21,1,N,8,2
^SCR("W4DP1","P",22,"HELP")

^SCR("W4DP1","P",22,"LMAX")
9
^SCR("W4DP1","P",22,"MUMPS1")

^SCR("W4DP1","P",22,"MUMPS2")

^SCR("W4DP1","P",22,"OUTPUT")

^SCR("W4DP1","P",22,"TYP")
N
^SCR("W4DP1","P",25,"CRD")
22,59,N,7,1
^SCR("W4DP1","P",25,"HELP")

^SCR("W4DP1","P",25,"LMAX")
7
^SCR("W4DP1","P",25,"MUMPS1")

^SCR("W4DP1","P",25,"MUMPS2")

^SCR("W4DP1","P",25,"OUTPUT")

^SCR("W4DP1","P",25,"TYP")
N
^SCR("W4DP1","P",30,"CRD")
3,66,E,2,0
^SCR("W4DP1","P",30,"FNC")

^SCR("W4DP1","P",30,"GLOB")
P1SET
^SCR("W4DP1","P",30,"HELP")

^SCR("W4DP1","P",30,"LMAX")
3
^SCR("W4DP1","P",30,"MUMPS1")

^SCR("W4DP1","P",30,"MUMPS2")

^SCR("W4DP1","P",30,"NLN")
20
^SCR("W4DP1","P",30,"RZD")
\
^SCR("W4DP1","P",30,"TOPB")
8
^SCR("W4DP1","P",30,"TYP")
E
^SCR("W4DP1","P",30,"VRB")
NS1
^SCR("W4DP1","P",31,"CRD")
3,65,H,19
^SCR("W4DP1","P",31,"HELP")

^SCR("W4DP1","P",31,"LMAX")
19
^SCR("W4DP1","P",31,"MUMPS1")

^SCR("W4DP1","P",31,"MUMPS2")

^SCR("W4DP1","P",31,"OUTPUT")

^SCR("W4DP1","P",31,"TYP")
H
^SCR("W4DP1","P",35,"CRD")
3,23,E,4,0
^SCR("W4DP1","P",35,"FNC")

^SCR("W4DP1","P",35,"GLOB")
PARSUG
^SCR("W4DP1","P",35,"HELP")

^SCR("W4DP1","P",35,"LMAX")
4
^SCR("W4DP1","P",35,"MUMPS1")

^SCR("W4DP1","P",35,"MUMPS2")

^SCR("W4DP1","P",35,"NLN")
20
^SCR("W4DP1","P",35,"RZD")
\
^SCR("W4DP1","P",35,"TOPB")
8
^SCR("W4DP1","P",35,"TYP")
E
^SCR("W4DP1","P",35,"VRB")
SUGP1
^SCR("W4DP1","P",36,"CRD")
3,22,H,20
^SCR("W4DP1","P",36,"HELP")

^SCR("W4DP1","P",36,"LMAX")
20
^SCR("W4DP1","P",36,"MUMPS1")

^SCR("W4DP1","P",36,"MUMPS2")

^SCR("W4DP1","P",36,"OUTPUT")

^SCR("W4DP1","P",36,"TYP")
H
^SCR("W4DP1","P",40,"CRD")
22,41,N,9,2
^SCR("W4DP1","P",40,"HELP")

^SCR("W4DP1","P",40,"LMAX")
9
^SCR("W4DP1","P",40,"MUMPS1")

^SCR("W4DP1","P",40,"MUMPS2")

^SCR("W4DP1","P",40,"OUTPUT")

^SCR("W4DP1","P",40,"TYP")
N
^SCR("W4DP1","P",45,"CRD")
22,19,N,7,1
^SCR("W4DP1","P",45,"HELP")

^SCR("W4DP1","P",45,"LMAX")
7
^SCR("W4DP1","P",45,"MUMPS1")

^SCR("W4DP1","P",45,"MUMPS2")

^SCR("W4DP1","P",45,"OUTPUT")

^SCR("W4DP1","P",45,"TYP")
N
^SCR("W4DP1","P","NAME","ADPAR")
16
^SCR("W4DP1","P","NAME","ADPAR1")
17
^SCR("W4DP1","P","NAME","CAI")
25
^SCR("W4DP1","P","NAME","CNT")
45
^SCR("W4DP1","P","NAME","DAT1")
5
^SCR("W4DP1","P","NAME","DAT2")
10
^SCR("W4DP1","P","NAME","MEPAR")
13
^SCR("W4DP1","P","NAME","MEPAR1")
14
^SCR("W4DP1","P","NAME","NS")
30
^SCR("W4DP1","P","NAME","NS1")
31
^SCR("W4DP1","P","NAME","SAI")
40
^SCR("W4DP1","P","NAME","SHUM")
20
^SCR("W4DP1","P","NAME","SLMAM")
22
^SCR("W4DP1","P","NAME","SUGDOH")
1
^SCR("W4DP1","P","NAME","SUGP")
35
^SCR("W4DP1","P","NAME","SUGP1")
36
^SCR("W4DP1","P","NAME","SUMHN")
18
^SCR("W4DP1","P","NAME","SUMK")
15
^SCR("W4DP1","P","NM",1)
SUGDOH
^SCR("W4DP1","P","NM",5)
DAT1
^SCR("W4DP1","P","NM",10)
DAT2
^SCR("W4DP1","P","NM",13)
MEPAR
^SCR("W4DP1","P","NM",14)
MEPAR1
^SCR("W4DP1","P","NM",15)
SUMK
^SCR("W4DP1","P","NM",16)
ADPAR
^SCR("W4DP1","P","NM",17)
ADPAR1
^SCR("W4DP1","P","NM",18)
SUMHN
^SCR("W4DP1","P","NM",20)
SHUM
^SCR("W4DP1","P","NM",22)
SLMAM
^SCR("W4DP1","P","NM",25)
CAI
^SCR("W4DP1","P","NM",30)
NS
^SCR("W4DP1","P","NM",31)
NS1
^SCR("W4DP1","P","NM",35)
SUGP
^SCR("W4DP1","P","NM",36)
SUGP1
^SCR("W4DP1","P","NM",40)
SAI
^SCR("W4DP1","P","NM",45)
CNT
^SCR("W4DPRTEN")
H
^SCR("W4DPRTEN",1)
                              # xnbdl micnery mihixt g"ec #                    
^SCR("W4DPRTEN",2)
                                                                               
^SCR("W4DPRTEN",3)
                    {10      } : jix`z cr   {05      } : jix`zn                
^SCR("W4DPRTEN",4)
                    {20      } :  hixt cr   {15      } :  hixtn                
^SCR("W4DPRTEN",5)
                                                                               
^SCR("W4DPRTEN",6)
                                                                             1$
^SCR("W4DPRTEN",7)
   :mei seql dxzi:gahndn d`vi:mei zligzl dxzi:   hixt my   :hixt cew:  jix`z : 
^SCR("W4DPRTEN",8)
                                                                               
^SCR("W4DPRTEN",9)
                                                                               
^SCR("W4DPRTEN",10)
                                                                               
^SCR("W4DPRTEN",11)
                                                                               
^SCR("W4DPRTEN",12)
                                                                               
^SCR("W4DPRTEN",13)
                                                                               
^SCR("W4DPRTEN",14)
                                                                               
^SCR("W4DPRTEN",15)
                                                                               
^SCR("W4DPRTEN",16)
                                                                               
^SCR("W4DPRTEN",17)
                                                                               
^SCR("W4DPRTEN",18)
                                                                               
^SCR("W4DPRTEN",19)
                                                                               
^SCR("W4DPRTEN",20)
                                                                               
^SCR("W4DPRTEN",21)
 $1                                                                            
^SCR("W4DPRTEN",22)
    {35       }    {30     }     {25     }                                     
^SCR("W4DPRTEN",23)
                                                                               
^SCR("W4DPRTEN","A",1)
˜Ž‚„Œ�‰ƒŽ…’™�‰ˆ‰˜”‡"…ƒ
^SCR("W4DPRTEN","A",2)

^SCR("W4DPRTEN","A",3)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("W4DPRTEN","A",4)
:ˆ‰˜”ƒ’:ˆ‰˜”Ž
^SCR("W4DPRTEN","A",5)

^SCR("W4DPRTEN","A",6)

^SCR("W4DPRTEN","A",7)
�…‰“…‘Œ„˜š‰‡�ˆŽ„Ž„€–‰�…‰šŒ‰‡šŒ„˜š‰ˆ‰˜”�™ˆ‰˜”ƒ…—Š‰˜€š
^SCR("W4DPRTEN","A",8)
---------------------------------------------------------------------
^SCR("W4DPRTEN","A",9)

^SCR("W4DPRTEN","A",10)

^SCR("W4DPRTEN","A",11)

^SCR("W4DPRTEN","A",12)

^SCR("W4DPRTEN","A",13)

^SCR("W4DPRTEN","A",14)

^SCR("W4DPRTEN","A",15)

^SCR("W4DPRTEN","A",16)

^SCR("W4DPRTEN","A",17)

^SCR("W4DPRTEN","A",18)

^SCR("W4DPRTEN","A",19)

^SCR("W4DPRTEN","A",20)

^SCR("W4DPRTEN","A",21)

^SCR("W4DPRTEN","A",22)

^SCR("W4DPRTEN","A",23)

^SCR("W4DPRTEN","AV",1)
rndvkohsnugaohyhrpj"us
^SCR("W4DPRTEN","AV",2)

^SCR("W4DPRTEN","AV",3)
:lhrt,sg:lhrt,n
^SCR("W4DPRTEN","AV",4)
:yhrpsg:yhrpn
^SCR("W4DPRTEN","AV",5)

^SCR("W4DPRTEN","AV",6)

^SCR("W4DPRTEN","AV",7)
ouh;uxkvr,hjcynvnvtmhouh,khj,kvr,hyhrpoayhrpsuelhrt,
^SCR("W4DPRTEN","AV",8)
---------------------------------------------------------------------
^SCR("W4DPRTEN","AV",9)

^SCR("W4DPRTEN","AV",10)

^SCR("W4DPRTEN","AV",11)

^SCR("W4DPRTEN","AV",12)

^SCR("W4DPRTEN","AV",13)

^SCR("W4DPRTEN","AV",14)

^SCR("W4DPRTEN","AV",15)

^SCR("W4DPRTEN","AV",16)

^SCR("W4DPRTEN","AV",17)

^SCR("W4DPRTEN","AV",18)

^SCR("W4DPRTEN","AV",19)

^SCR("W4DPRTEN","AV",20)

^SCR("W4DPRTEN","AV",21)

^SCR("W4DPRTEN","AV",22)

^SCR("W4DPRTEN","AV",23)

^SCR("W4DPRTEN","G",1,"CRD")
8,77,D,8,0
^SCR("W4DPRTEN","G",1,"HELP")

^SCR("W4DPRTEN","G",1,"LMAX")
8
^SCR("W4DPRTEN","G",1,"MUMPS1")

^SCR("W4DPRTEN","G",1,"MUMPS2")

^SCR("W4DPRTEN","G",1,"SHEM")
  jix`z 
^SCR("W4DPRTEN","G",1,"TYP")
D
^SCR("W4DPRTEN","G",2,"CRD")
8,68,E,8,0
^SCR("W4DPRTEN","G",2,"HELP")

^SCR("W4DPRTEN","G",2,"LMAX")
8
^SCR("W4DPRTEN","G",2,"MUMPS1")

^SCR("W4DPRTEN","G",2,"MUMPS2")

^SCR("W4DPRTEN","G",2,"OUTPUT")

^SCR("W4DPRTEN","G",2,"SHEM")
hixt cew
^SCR("W4DPRTEN","G",2,"TYP")
E
^SCR("W4DPRTEN","G",3,"CRD")
8,59,H,13,0
^SCR("W4DPRTEN","G",3,"HELP")

^SCR("W4DPRTEN","G",3,"LMAX")
13
^SCR("W4DPRTEN","G",3,"MUMPS1")

^SCR("W4DPRTEN","G",3,"MUMPS2")

^SCR("W4DPRTEN","G",3,"OUTPUT")

^SCR("W4DPRTEN","G",3,"SHEM")
   hixt my   
^SCR("W4DPRTEN","G",3,"TYP")
H
^SCR("W4DPRTEN","G",4,"CRD")
8,45,N,8,0
^SCR("W4DPRTEN","G",4,"HELP")

^SCR("W4DPRTEN","G",4,"LMAX")
15
^SCR("W4DPRTEN","G",4,"MUMPS1")

^SCR("W4DPRTEN","G",4,"MUMPS2")

^SCR("W4DPRTEN","G",4,"SHEM")
mei zligzl dxzi
^SCR("W4DPRTEN","G",4,"TYP")
N
^SCR("W4DPRTEN","G",5,"CRD")
8,29,N,8,0
^SCR("W4DPRTEN","G",5,"HELP")

^SCR("W4DPRTEN","G",5,"LMAX")
11
^SCR("W4DPRTEN","G",5,"MUMPS1")

^SCR("W4DPRTEN","G",5,"MUMPS2")

^SCR("W4DPRTEN","G",5,"OUTPUT")

^SCR("W4DPRTEN","G",5,"SHEM")
gahndn d`vi
^SCR("W4DPRTEN","G",5,"TYP")
N
^SCR("W4DPRTEN","G",6,"CRD")
8,17,N,8,0
^SCR("W4DPRTEN","G",6,"HELP")

^SCR("W4DPRTEN","G",6,"LMAX")
13
^SCR("W4DPRTEN","G",6,"MUMPS1")

^SCR("W4DPRTEN","G",6,"MUMPS2")

^SCR("W4DPRTEN","G",6,"OUTPUT")

^SCR("W4DPRTEN","G",6,"SHEM")
mei seql dxzi
^SCR("W4DPRTEN","G",6,"TYP")
N
^SCR("W4DPRTEN","G","DEL")

^SCR("W4DPRTEN","G","MAX")

^SCR("W4DPRTEN","G","NAME","DAT")
1
^SCR("W4DPRTEN","G","NAME","EX")
5
^SCR("W4DPRTEN","G","NAME","ITRA0")
4
^SCR("W4DPRTEN","G","NAME","ITRA1")
6
^SCR("W4DPRTEN","G","NAME","PAR")
2
^SCR("W4DPRTEN","G","NAME","PAR1")
3
^SCR("W4DPRTEN","G","NM",1)
DAT
^SCR("W4DPRTEN","G","NM",2)
PAR
^SCR("W4DPRTEN","G","NM",3)
PAR1
^SCR("W4DPRTEN","G","NM",4)
ITRA0
^SCR("W4DPRTEN","G","NM",5)
EX
^SCR("W4DPRTEN","G","NM",6)
ITRA1
^SCR("W4DPRTEN","G","RB")
7,2,22,79
^SCR("W4DPRTEN","G","REF")

^SCR("W4DPRTEN","G","RZD")

^SCR("W4DPRTEN","G","STEP")

^SCR("W4DPRTEN","G","STG")
   :mei seql dxzi:gahndn d`vi:mei zligzl dxzi:   hixt my   :hixt cew:  jix`z : 
^SCR("W4DPRTEN","G","VG")
9
^SCR("W4DPRTEN","NAME")
xnbdl micnery mihixt g"ec
^SCR("W4DPRTEN","P",5,"CRD")
3,44,D,8,0
^SCR("W4DPRTEN","P",5,"HELP")

^SCR("W4DPRTEN","P",5,"LMAX")
9
^SCR("W4DPRTEN","P",5,"MUMPS1")

^SCR("W4DPRTEN","P",5,"MUMPS2")

^SCR("W4DPRTEN","P",5,"TYP")
D
^SCR("W4DPRTEN","P",10,"CRD")
3,20,D,8,0
^SCR("W4DPRTEN","P",10,"HELP")

^SCR("W4DPRTEN","P",10,"LMAX")
9
^SCR("W4DPRTEN","P",10,"MUMPS1")

^SCR("W4DPRTEN","P",10,"MUMPS2")

^SCR("W4DPRTEN","P",10,"TYP")
D
^SCR("W4DPRTEN","P",15,"CRD")
4,44,E,8,0
^SCR("W4DPRTEN","P",15,"FNC")

^SCR("W4DPRTEN","P",15,"GLOB")
PAR
^SCR("W4DPRTEN","P",15,"HELP")

^SCR("W4DPRTEN","P",15,"LMAX")
9
^SCR("W4DPRTEN","P",15,"MUMPS1")

^SCR("W4DPRTEN","P",15,"MUMPS2")

^SCR("W4DPRTEN","P",15,"NLN")
20
^SCR("W4DPRTEN","P",15,"RZD")
**
^SCR("W4DPRTEN","P",15,"TOPB")
8
^SCR("W4DPRTEN","P",15,"TYP")
E
^SCR("W4DPRTEN","P",20,"CRD")
4,20,E,8,0
^SCR("W4DPRTEN","P",20,"FNC")

^SCR("W4DPRTEN","P",20,"GLOB")
PAR
^SCR("W4DPRTEN","P",20,"HELP")

^SCR("W4DPRTEN","P",20,"LMAX")
9
^SCR("W4DPRTEN","P",20,"MUMPS1")

^SCR("W4DPRTEN","P",20,"MUMPS2")

^SCR("W4DPRTEN","P",20,"NLN")
20
^SCR("W4DPRTEN","P",20,"RZD")
**
^SCR("W4DPRTEN","P",20,"TOPB")
8
^SCR("W4DPRTEN","P",20,"TYP")
E
^SCR("W4DPRTEN","P",25,"CRD")
22,33,N,8,0
^SCR("W4DPRTEN","P",25,"HELP")

^SCR("W4DPRTEN","P",25,"LMAX")
8
^SCR("W4DPRTEN","P",25,"MUMPS1")

^SCR("W4DPRTEN","P",25,"MUMPS2")

^SCR("W4DPRTEN","P",25,"OUTPUT")

^SCR("W4DPRTEN","P",25,"TYP")
N
^SCR("W4DPRTEN","P",30,"CRD")
22,19,N,8,0
^SCR("W4DPRTEN","P",30,"HELP")

^SCR("W4DPRTEN","P",30,"LMAX")
8
^SCR("W4DPRTEN","P",30,"MUMPS1")

^SCR("W4DPRTEN","P",30,"MUMPS2")

^SCR("W4DPRTEN","P",30,"OUTPUT")

^SCR("W4DPRTEN","P",30,"TYP")
N
^SCR("W4DPRTEN","P",35,"CRD")
22,4,N,8,0
^SCR("W4DPRTEN","P",35,"HELP")

^SCR("W4DPRTEN","P",35,"LMAX")
10
^SCR("W4DPRTEN","P",35,"MUMPS1")

^SCR("W4DPRTEN","P",35,"MUMPS2")

^SCR("W4DPRTEN","P",35,"OUTPUT")

^SCR("W4DPRTEN","P",35,"TYP")
N
^SCR("W4DPRTEN","P","NAME","ADPAR")
20
^SCR("W4DPRTEN","P","NAME","DAT1")
5
^SCR("W4DPRTEN","P","NAME","DAT2")
10
^SCR("W4DPRTEN","P","NAME","EXIT")
30
^SCR("W4DPRTEN","P","NAME","MEPAR")
15
^SCR("W4DPRTEN","P","NAME","SAHBG")
25
^SCR("W4DPRTEN","P","NAME","SAHFN")
35
^SCR("W4DPRTEN","P","NM",5)
DAT1
^SCR("W4DPRTEN","P","NM",10)
DAT2
^SCR("W4DPRTEN","P","NM",15)
MEPAR
^SCR("W4DPRTEN","P","NM",20)
ADPAR
^SCR("W4DPRTEN","P","NM",25)
SAHBG
^SCR("W4DPRTEN","P","NM",30)
EXIT
^SCR("W4DPRTEN","P","NM",35)
SAHFN
^SCR("W4DSPM")
H
^SCR("W4DSPM",1)
                                                                               
^SCR("W4DSPM",2)
                                                                ]              
^SCR("W4DSPM",3)
                                        {05        } :   jix`zn                
^SCR("W4DSPM",4)
                                        {10        } : jix`z cr                
^SCR("W4DSPM",5)
                                                                               
^SCR("W4DSPM",6)
                   {                16} {15        } :     wtqn                
^SCR("W4DSPM",7)
                   {                21} {20        } :   wtq cr                
^SCR("W4DSPM",8)
                                                                               
^SCR("W4DSPM",9)
                                                                               
^SCR("W4DSPM",10)
   [                                                                           
^SCR("W4DSPM","A",1)

^SCR("W4DSPM","A",2)

^SCR("W4DSPM","A",3)
:Š‰˜€šŽ
^SCR("W4DSPM","A",4)
:Š‰˜€šƒ’
^SCR("W4DSPM","A",5)

^SCR("W4DSPM","A",6)
:—”‘Ž
^SCR("W4DSPM","A",7)
:—”‘ƒ’
^SCR("W4DSPM","A",8)

^SCR("W4DSPM","A",9)

^SCR("W4DSPM","A",10)

^SCR("W4DSPM","AV",1)

^SCR("W4DSPM","AV",2)

^SCR("W4DSPM","AV",3)
:lhrt,n
^SCR("W4DSPM","AV",4)
:lhrt,sg
^SCR("W4DSPM","AV",5)

^SCR("W4DSPM","AV",6)
:epxn
^SCR("W4DSPM","AV",7)
:epxsg
^SCR("W4DSPM","AV",8)

^SCR("W4DSPM","AV",9)

^SCR("W4DSPM","AV",10)

^SCR("W4DSPM","NAME")

^SCR("W4DSPM","P",5,"CRD")
3,40,D,8,0
^SCR("W4DSPM","P",5,"HELP")

^SCR("W4DSPM","P",5,"LMAX")
11
^SCR("W4DSPM","P",5,"MUMPS1")

^SCR("W4DSPM","P",5,"MUMPS2")

^SCR("W4DSPM","P",5,"MUST")

^SCR("W4DSPM","P",5,"TYP")
D
^SCR("W4DSPM","P",10,"CRD")
4,40,D,8,0
^SCR("W4DSPM","P",10,"HELP")

^SCR("W4DSPM","P",10,"LMAX")
11
^SCR("W4DSPM","P",10,"MUMPS1")

^SCR("W4DSPM","P",10,"MUMPS2")

^SCR("W4DSPM","P",10,"TYP")
D
^SCR("W4DSPM","P",15,"CRD")
6,40,E,11,0
^SCR("W4DSPM","P",15,"FNC")

^SCR("W4DSPM","P",15,"GLOB")
W4SPK
^SCR("W4DSPM","P",15,"HELP")

^SCR("W4DSPM","P",15,"LMAX")
11
^SCR("W4DSPM","P",15,"MUMPS1")

^SCR("W4DSPM","P",15,"MUMPS2")

^SCR("W4DSPM","P",15,"NLN")
20
^SCR("W4DSPM","P",15,"RZD")
\
^SCR("W4DSPM","P",15,"TOPB")
8
^SCR("W4DSPM","P",15,"TYP")
E
^SCR("W4DSPM","P",15,"VRB")
MESPK1
^SCR("W4DSPM","P",16,"CRD")
6,39,H,19,0
^SCR("W4DSPM","P",16,"HELP")

^SCR("W4DSPM","P",16,"LMAX")
19
^SCR("W4DSPM","P",16,"MUMPS1")

^SCR("W4DSPM","P",16,"MUMPS2")

^SCR("W4DSPM","P",16,"OUTPUT")

^SCR("W4DSPM","P",16,"TYP")
H
^SCR("W4DSPM","P",20,"CRD")
7,40,E,11,0
^SCR("W4DSPM","P",20,"FNC")

^SCR("W4DSPM","P",20,"GLOB")
W4SPK
^SCR("W4DSPM","P",20,"HELP")

^SCR("W4DSPM","P",20,"LMAX")
11
^SCR("W4DSPM","P",20,"MUMPS1")

^SCR("W4DSPM","P",20,"MUMPS2")

^SCR("W4DSPM","P",20,"NLN")
20
^SCR("W4DSPM","P",20,"RZD")
\
^SCR("W4DSPM","P",20,"TOPB")
8
^SCR("W4DSPM","P",20,"TYP")
E
^SCR("W4DSPM","P",20,"VRB")
ADSPK1
^SCR("W4DSPM","P",21,"CRD")
7,39,H,19,0
^SCR("W4DSPM","P",21,"HELP")

^SCR("W4DSPM","P",21,"LMAX")
19
^SCR("W4DSPM","P",21,"MUMPS1")

^SCR("W4DSPM","P",21,"MUMPS2")

^SCR("W4DSPM","P",21,"OUTPUT")

^SCR("W4DSPM","P",21,"TYP")
H
^SCR("W4DSPM","P","NAME","ADDAT")
10
^SCR("W4DSPM","P","NAME","ADSPK")
20
^SCR("W4DSPM","P","NAME","ADSPK1")
21
^SCR("W4DSPM","P","NAME","MEDAT")
5
^SCR("W4DSPM","P","NAME","MESPK")
15
^SCR("W4DSPM","P","NAME","MESPK1")
16
^SCR("W4DSPM","P","NM",5)
MEDAT
^SCR("W4DSPM","P","NM",10)
ADDAT
^SCR("W4DSPM","P","NM",15)
MESPK
^SCR("W4DSPM","P","NM",16)
MESPK1
^SCR("W4DSPM","P","NM",20)
ADSPK
^SCR("W4DSPM","P","NM",21)
ADSPK1
^SCR("W4DTM")
H
^SCR("W4DTM",1)
                     {10      }:jix`z cr    {05      }:jix`zn                  
^SCR("W4DTM",2)
                   {13        }: gewl cr  {12        }: gewln                  
^SCR("W4DTM",3)
                                                                             1$
^SCR("W4DTM",4)
 :  k"dq  : n"rn :n"rn iptl:     gewld my     : gewl 'qn : jix`zl :gelyn zcerz:
^SCR("W4DTM",5)
                                                                               
^SCR("W4DTM",6)
                                                                               
^SCR("W4DTM",7)
                                                                               
^SCR("W4DTM",8)
                                                                               
^SCR("W4DTM",9)
                                                                               
^SCR("W4DTM",10)
                                                                               
^SCR("W4DTM",11)
                                                                               
^SCR("W4DTM",12)
                                                                               
^SCR("W4DTM",13)
                                                                               
^SCR("W4DTM",14)
                                                                               
^SCR("W4DTM",15)
                                                                               
^SCR("W4DTM",16)
                                                                               
^SCR("W4DTM",17)
                                                                               
^SCR("W4DTM",18)
                                                                               
^SCR("W4DTM",19)
 $1                                                                            
^SCR("W4DTM",20)
  {40      } k"dq  {25     } n"rn {20     }: n"rn iptl  {15  }:gelyn zecerz 'qn
^SCR("W4DTM",21)
                                                                               
^SCR("W4DTM",22)
                                                                               
^SCR("W4DTM","A",1)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("W4DTM","A",2)
:‡…—Œƒ’:‡…—ŒŽ
^SCR("W4DTM","A",3)

^SCR("W4DTM","A",4)
‹"„‘Ž"’ŽŽ"’Ž‰�”Œ‡…—Œ„�™‡…—Œ'‘ŽŠ‰˜€šŒ‡…Œ™Žšƒ…’š
^SCR("W4DTM","A",5)
----------------------------------------------------------------------
^SCR("W4DTM","A",6)

^SCR("W4DTM","A",7)

^SCR("W4DTM","A",8)

^SCR("W4DTM","A",9)

^SCR("W4DTM","A",10)

^SCR("W4DTM","A",11)

^SCR("W4DTM","A",12)

^SCR("W4DTM","A",13)

^SCR("W4DTM","A",14)

^SCR("W4DTM","A",15)

^SCR("W4DTM","A",16)

^SCR("W4DTM","A",17)

^SCR("W4DTM","A",18)

^SCR("W4DTM","A",19)

^SCR("W4DTM","A",20)
‹"„‘Ž"’Ž:Ž"’Ž‰�”Œ:‡…Œ™Žš…ƒ…’š'‘Ž
^SCR("W4DTM","A",21)

^SCR("W4DTM","A",22)

^SCR("W4DTM","AV",1)
:lhrt,sg:lhrt,n
^SCR("W4DTM","AV",2)
:jueksg:juekn
^SCR("W4DTM","AV",3)

^SCR("W4DTM","AV",4)
f"vxn"gnn"gnhbpkjuekvoajuekwxnlhrt,kjukan,sug,
^SCR("W4DTM","AV",5)
----------------------------------------------------------------------
^SCR("W4DTM","AV",6)

^SCR("W4DTM","AV",7)

^SCR("W4DTM","AV",8)

^SCR("W4DTM","AV",9)

^SCR("W4DTM","AV",10)

^SCR("W4DTM","AV",11)

^SCR("W4DTM","AV",12)

^SCR("W4DTM","AV",13)

^SCR("W4DTM","AV",14)

^SCR("W4DTM","AV",15)

^SCR("W4DTM","AV",16)

^SCR("W4DTM","AV",17)

^SCR("W4DTM","AV",18)

^SCR("W4DTM","AV",19)

^SCR("W4DTM","AV",20)
f"vxn"gn:n"gnhbpk:jukan,usug,wxn
^SCR("W4DTM","AV",21)

^SCR("W4DTM","AV",22)

^SCR("W4DTM","G",1,"CRD")
5,78,E,7,0
^SCR("W4DTM","G",1,"HELP")

^SCR("W4DTM","G",1,"LMAX")
11
^SCR("W4DTM","G",1,"MUMPS1")

^SCR("W4DTM","G",1,"MUMPS2")

^SCR("W4DTM","G",1,"OUTPUT")

^SCR("W4DTM","G",1,"SHEM")
gelyn zcerz
^SCR("W4DTM","G",1,"TYP")
E
^SCR("W4DTM","G",2,"CRD")
5,66,D,8,0
^SCR("W4DTM","G",2,"HELP")
<F9> ugl zipeayg zbvdl 
^SCR("W4DTM","G",2,"LMAX")
8
^SCR("W4DTM","G",2,"MUMPS1")

^SCR("W4DTM","G",2,"MUMPS2")

^SCR("W4DTM","G",2,"OUTPUT")

^SCR("W4DTM","G",2,"SHEM")
 jix`zl 
^SCR("W4DTM","G",2,"TYP")
D
^SCR("W4DTM","G",3,"CRD")
5,57,E,10,0
^SCR("W4DTM","G",3,"HELP")

^SCR("W4DTM","G",3,"LMAX")
10
^SCR("W4DTM","G",3,"MUMPS1")

^SCR("W4DTM","G",3,"MUMPS2")

^SCR("W4DTM","G",3,"OUTPUT")

^SCR("W4DTM","G",3,"SHEM")
 gewl 'qn 
^SCR("W4DTM","G",3,"TYP")
E
^SCR("W4DTM","G",4,"CRD")
5,46,H,18,0
^SCR("W4DTM","G",4,"HELP")

^SCR("W4DTM","G",4,"LMAX")
18
^SCR("W4DTM","G",4,"MUMPS1")

^SCR("W4DTM","G",4,"MUMPS2")

^SCR("W4DTM","G",4,"OUTPUT")

^SCR("W4DTM","G",4,"SHEM")
     gewld my     
^SCR("W4DTM","G",4,"TYP")
H
^SCR("W4DTM","G",5,"CRD")
5,27,N,8,2
^SCR("W4DTM","G",5,"HELP")

^SCR("W4DTM","G",5,"LMAX")
9
^SCR("W4DTM","G",5,"MUMPS1")

^SCR("W4DTM","G",5,"MUMPS2")

^SCR("W4DTM","G",5,"OUTPUT")

^SCR("W4DTM","G",5,"SHEM")
n"rn iptl
^SCR("W4DTM","G",5,"TYP")
N
^SCR("W4DTM","G",6,"CRD")
5,17,H,6,0
^SCR("W4DTM","G",6,"LMAX")
6
^SCR("W4DTM","G",6,"SHEM")
 n"rn 
^SCR("W4DTM","G",7,"CRD")
5,10,H,8,0
^SCR("W4DTM","G",7,"LMAX")
8
^SCR("W4DTM","G",7,"SHEM")
  k"dq  
^SCR("W4DTM","G","DEL")

^SCR("W4DTM","G","MAX")
99999
^SCR("W4DTM","G","NAME","DATH")
2
^SCR("W4DTM","G","NAME","HMK")
1
^SCR("W4DTM","G","NAME","LKH")
3
^SCR("W4DTM","G","NAME","LKH1")
4
^SCR("W4DTM","G","NAME","LMAM")
5
^SCR("W4DTM","G","NM",1)
HMK
^SCR("W4DTM","G","NM",2)
DATH
^SCR("W4DTM","G","NM",3)
LKH
^SCR("W4DTM","G","NM",4)
LKH1
^SCR("W4DTM","G","NM",5)
LMAM
^SCR("W4DTM","G","RB")
4,2,20,79
^SCR("W4DTM","G","REF")
^TEMPDH($P
^SCR("W4DTM","G","RZD")
\
^SCR("W4DTM","G","STEP")
1
^SCR("W4DTM","G","STG")
 :  k"dq  : n"rn :n"rn iptl:     gewld my     : gewl 'qn : jix`zl :gelyn zcerz:
^SCR("W4DTM","G","VG")
6
^SCR("W4DTM","NAME")

^SCR("W4DTM","P",5,"CRD")
1,44,D,8,0
^SCR("W4DTM","P",5,"HELP")

^SCR("W4DTM","P",5,"LMAX")
9
^SCR("W4DTM","P",5,"MUMPS1")
D:'$D(P1DZ) ^W4IN S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("W4DTM","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("W4DTM","P",5,"MUST")

^SCR("W4DTM","P",5,"TYP")
D
^SCR("W4DTM","P",10,"CRD")
1,21,D,8,0
^SCR("W4DTM","P",10,"HELP")

^SCR("W4DTM","P",10,"LMAX")
9
^SCR("W4DTM","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("W4DTM","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I $E(D2)="?" S %SC("ER")=1
^SCR("W4DTM","P",10,"MUST")

^SCR("W4DTM","P",10,"TYP")
D
^SCR("W4DTM","P",12,"CRD")
2,42,E,11,0
^SCR("W4DTM","P",12,"FNC")

^SCR("W4DTM","P",12,"GLOB")
LKH
^SCR("W4DTM","P",12,"HELP")

^SCR("W4DTM","P",12,"LMAX")
11
^SCR("W4DTM","P",12,"MUMPS1")

^SCR("W4DTM","P",12,"MUMPS2")

^SCR("W4DTM","P",12,"NLN")
20
^SCR("W4DTM","P",12,"RZD")
\
^SCR("W4DTM","P",12,"TOPB")
8
^SCR("W4DTM","P",12,"TYP")
E
^SCR("W4DTM","P",13,"CRD")
2,19,E,11,0
^SCR("W4DTM","P",13,"FNC")

^SCR("W4DTM","P",13,"GLOB")
LKH
^SCR("W4DTM","P",13,"HELP")

^SCR("W4DTM","P",13,"LMAX")
11
^SCR("W4DTM","P",13,"MUMPS1")
S:'$G(ADLKH) ADLKH=MELKH
^SCR("W4DTM","P",13,"MUMPS2")
I ADLKH<MELKH S %SC("ER")=1
^SCR("W4DTM","P",13,"NLN")
20
^SCR("W4DTM","P",13,"RZD")
\
^SCR("W4DTM","P",13,"TOPB")
8
^SCR("W4DTM","P",13,"TYP")
E
^SCR("W4DTM","P",15,"CRD")
20,56,N,5,0
^SCR("W4DTM","P",15,"HELP")

^SCR("W4DTM","P",15,"LMAX")
5
^SCR("W4DTM","P",15,"MUMPS1")

^SCR("W4DTM","P",15,"MUMPS2")

^SCR("W4DTM","P",15,"OUTPUT")

^SCR("W4DTM","P",15,"TYP")
N
^SCR("W4DTM","P",20,"CRD")
20,34,N,8,2
^SCR("W4DTM","P",20,"HELP")

^SCR("W4DTM","P",20,"LMAX")
8
^SCR("W4DTM","P",20,"MUMPS1")

^SCR("W4DTM","P",20,"MUMPS2")

^SCR("W4DTM","P",20,"OUTPUT")

^SCR("W4DTM","P",20,"TYP")
N
^SCR("W4DTM","P",25,"CRD")
20,19,N,7,2
^SCR("W4DTM","P",25,"HELP")

^SCR("W4DTM","P",25,"LMAX")
8
^SCR("W4DTM","P",25,"MUMPS1")

^SCR("W4DTM","P",25,"MUMPS2")

^SCR("W4DTM","P",25,"OUTPUT")

^SCR("W4DTM","P",25,"TYP")
N
^SCR("W4DTM","P",40,"CRD")
20,2,N,9,2
^SCR("W4DTM","P",40,"HELP")

^SCR("W4DTM","P",40,"LMAX")
9
^SCR("W4DTM","P",40,"MUMPS1")

^SCR("W4DTM","P",40,"MUMPS2")

^SCR("W4DTM","P",40,"OUTPUT")

^SCR("W4DTM","P",40,"TYP")
N
^SCR("W4DTM","P","NAME","ADLKH")
13
^SCR("W4DTM","P","NAME","DAT1")
5
^SCR("W4DTM","P","NAME","DAT2")
10
^SCR("W4DTM","P","NAME","MELKH")
12
^SCR("W4DTM","P","NAME","SAH")
40
^SCR("W4DTM","P","NAME","SLMAM")
20
^SCR("W4DTM","P","NAME","SMAM")
25
^SCR("W4DTM","P","NAME","SUMTM")
15
^SCR("W4DTM","P","NM",5)
DAT1
^SCR("W4DTM","P","NM",10)
DAT2
^SCR("W4DTM","P","NM",12)
MELKH
^SCR("W4DTM","P","NM",13)
ADLKH
^SCR("W4DTM","P","NM",15)
SUMTM
^SCR("W4DTM","P","NM",20)
SLMAM
^SCR("W4DTM","P","NM",25)
SMAM
^SCR("W4DTM","P","NM",40)
SAH
^SCR("W4ESEK")
H
^SCR("W4ESEK",1)
                                                                               
^SCR("W4ESEK",2)
                                                                1]             
^SCR("W4ESEK",3)
                 {                                5}: wqrd my                  
^SCR("W4ESEK",4)
                 {                               10}:   zaezk                  
^SCR("W4ESEK",5)
                                         {15       }:   oetlh                  
^SCR("W4ESEK",6)
                                {20         }:dyxen wqer xtqn                  
^SCR("W4ESEK",7)
                                                {25 :sipq 'qn                  
^SCR("W4ESEK",8)
                                         {30 : LOGO zexey 'qn                  
^SCR("W4ESEK",9)
             [1                                                                
^SCR("W4ESEK",10)
                                                                               
^SCR("W4ESEK","A",1)

^SCR("W4ESEK","A",2)

^SCR("W4ESEK","A",3)
:—‘’„�™
^SCR("W4ESEK","A",4)
:š�…š‹
^SCR("W4ESEK","A",5)
:�…”Œˆ
^SCR("W4ESEK","A",6)
:„™˜…Ž—‘…’˜”‘Ž
^SCR("W4ESEK","A",7)
:“‰�‘'‘Ž
^SCR("W4ESEK","A",8)
:LOGOš…˜…™'‘Ž
^SCR("W4ESEK","A",9)

^SCR("W4ESEK","A",10)

^SCR("W4ESEK","AV",1)

^SCR("W4ESEK","AV",2)

^SCR("W4ESEK","AV",3)
:exgvoa
^SCR("W4ESEK","AV",4)
:,cu,f
^SCR("W4ESEK","AV",5)
:iupky
^SCR("W4ESEK","AV",6)
:varunexugrpxn
^SCR("W4ESEK","AV",7)
:;hbxwxn
^SCR("W4ESEK","AV",8)
:LOGO,uruawxn
^SCR("W4ESEK","AV",9)

^SCR("W4ESEK","AV",10)

^SCR("W4ESEK","NAME")

^SCR("W4ESEK","P",5,"CRD")
3,52,H,30,0
^SCR("W4ESEK","P",5,"HELP")

^SCR("W4ESEK","P",5,"LMAX")
34
^SCR("W4ESEK","P",5,"MUMPS1")

^SCR("W4ESEK","P",5,"MUMPS2")

^SCR("W4ESEK","P",5,"MUST")

^SCR("W4ESEK","P",5,"TYP")
H
^SCR("W4ESEK","P",10,"CRD")
4,52,H,30,0
^SCR("W4ESEK","P",10,"HELP")

^SCR("W4ESEK","P",10,"LMAX")
34
^SCR("W4ESEK","P",10,"MUMPS1")

^SCR("W4ESEK","P",10,"MUMPS2")

^SCR("W4ESEK","P",10,"MUST")

^SCR("W4ESEK","P",10,"TYP")
H
^SCR("W4ESEK","P",15,"CRD")
5,41,E,10,0
^SCR("W4ESEK","P",15,"HELP")

^SCR("W4ESEK","P",15,"LMAX")
10
^SCR("W4ESEK","P",15,"MUMPS1")

^SCR("W4ESEK","P",15,"MUMPS2")

^SCR("W4ESEK","P",15,"MUST")

^SCR("W4ESEK","P",15,"TYP")
E
^SCR("W4ESEK","P",20,"CRD")
6,32,E,11,0
^SCR("W4ESEK","P",20,"HELP")

^SCR("W4ESEK","P",20,"LMAX")
12
^SCR("W4ESEK","P",20,"MUMPS1")

^SCR("W4ESEK","P",20,"MUMPS2")

^SCR("W4ESEK","P",20,"MUST")

^SCR("W4ESEK","P",20,"TYP")
E
^SCR("W4ESEK","P",25,"CRD")
7,48,N,4,0
^SCR("W4ESEK","P",25,"HELP")

^SCR("W4ESEK","P",25,"LMAX")
4
^SCR("W4ESEK","P",25,"MUMPS1")

^SCR("W4ESEK","P",25,"MUMPS2")

^SCR("W4ESEK","P",25,"TYP")
N
^SCR("W4ESEK","P",30,"CRD")
8,41,N,2,0
^SCR("W4ESEK","P",30,"HELP")

^SCR("W4ESEK","P",30,"LMAX")
4
^SCR("W4ESEK","P",30,"MUMPS1")

^SCR("W4ESEK","P",30,"MUMPS2")

^SCR("W4ESEK","P",30,"TYP")
N
^SCR("W4ESEK","P","NAME","KTOV")
10
^SCR("W4ESEK","P","NAME","LOGO")
30
^SCR("W4ESEK","P","NAME","MURSH")
20
^SCR("W4ESEK","P","NAME","NAME")
5
^SCR("W4ESEK","P","NAME","SNIF")
25
^SCR("W4ESEK","P","NAME","TEL")
15
^SCR("W4ESEK","P","NM",5)
NAME
^SCR("W4ESEK","P","NM",10)
KTOV
^SCR("W4ESEK","P","NM",15)
TEL
^SCR("W4ESEK","P","NM",20)
MURSH
^SCR("W4ESEK","P","NM",25)
SNIF
^SCR("W4ESEK","P","NM",30)
LOGO
^SCR("W4ESEK","P","RB",1)
3,14,10,66
^SCR("W4GAPPRM")
H
^SCR("W4GAPPRM",1)
                                                                               
^SCR("W4GAPPRM",2)
                                                   {10 } : zlrten GAP zkxrn m`d
^SCR("W4GAPPRM",3)
                                                          {20  } : dcrqn xtqn  
^SCR("W4GAPPRM",4)
    {30                                                        } : mivawl dvign
^SCR("W4GAPPRM",5)
                                                                               
^SCR("W4GAPPRM","AV",1)

^SCR("W4GAPPRM","AV",2)
:úìòôåîGAPúëøòîíàä
^SCR("W4GAPPRM","AV",3)
:äãòñîøôñî
^SCR("W4GAPPRM","AV",4)
:íéöá÷ìäöéçî
^SCR("W4GAPPRM","AV",5)

^SCR("W4GAPPRM","NAME")

^SCR("W4GAPPRM","P",10,"CRD")
2,51,B,1,0
^SCR("W4GAPPRM","P",10,"HELP")

^SCR("W4GAPPRM","P",10,"LMAX")
4
^SCR("W4GAPPRM","P",10,"MUMPS1")
S PRM=$$GAP^W4PRM
^SCR("W4GAPPRM","P",10,"MUMPS2")

^SCR("W4GAPPRM","P",10,"MUST")

^SCR("W4GAPPRM","P",10,"TYP")
B
^SCR("W4GAPPRM","P",20,"CRD")
3,58,E,5,0
^SCR("W4GAPPRM","P",20,"HELP")

^SCR("W4GAPPRM","P",20,"LMAX")
5
^SCR("W4GAPPRM","P",20,"MUMPS1")
S STORYID=$G(@$$^W4PRM@("GAP","ID"))
^SCR("W4GAPPRM","P",20,"MUMPS2")

^SCR("W4GAPPRM","P",20,"TYP")
E
^SCR("W4GAPPRM","P",30,"CRD")
4,4,E,59,0
^SCR("W4GAPPRM","P",30,"HELP")

^SCR("W4GAPPRM","P",30,"LMAX")
59
^SCR("W4GAPPRM","P",30,"MUMPS1")
S DIR=$G(@$$^W4PRM@("GAP","DIR"))
^SCR("W4GAPPRM","P",30,"MUMPS2")

^SCR("W4GAPPRM","P",30,"TYP")
E
^SCR("W4GAPPRM","P","NAME","DIR")
30
^SCR("W4GAPPRM","P","NAME","PRM")
10
^SCR("W4GAPPRM","P","NAME","STORYID")
20
^SCR("W4GAPPRM","P","NM",10)
PRM
^SCR("W4GAPPRM","P","NM",20)
STORYID
^SCR("W4GAPPRM","P","NM",30)
DIR
^SCR("W4HB")
H
^SCR("W4HB",1)
        #{                     03}#                                            
^SCR("W4HB",2)
                     {10      }:jix`z cr    {05      }:jix`zn                  
^SCR("W4HB",3)
                    {13       }: gewl cr  {12        }: gewln                  
^SCR("W4HB",4)
        {14 } :  3 - zeipeaygd lk ,2 - zeipci ,1 - zeihnehe` zeipeayg          
^SCR("W4HB",5)
                                                                          1$   
^SCR("W4HB",6)
    :      gewld my    :  gewl 'qn :  n"rn  :  mekq  :zipeayg: jix`z  :        
^SCR("W4HB",7)
                                                                               
^SCR("W4HB",8)
                                                                               
^SCR("W4HB",9)
                                                                               
^SCR("W4HB",10)
                                                                               
^SCR("W4HB",11)
                                                                               
^SCR("W4HB",12)
                                                                               
^SCR("W4HB",13)
                                                                               
^SCR("W4HB",14)
                                                                               
^SCR("W4HB",15)
                                                                               
^SCR("W4HB",16)
                                                                               
^SCR("W4HB",17)
                                                                               
^SCR("W4HB",18)
                                                                               
^SCR("W4HB",19)
                                                                               
^SCR("W4HB",20)
  $1                                                                           
^SCR("W4HB",21)
  {30       }: n"rn iptl  {25    }: n"rn  {20       }:k"dq  {15  }:zeipeayg    
^SCR("W4HB",22)
                                                                               
^SCR("W4HB",23)
zfkexn i`ln zipeayg - 'M' , i`lndn dxiyi zipeayg - '<' , zipci zipeayg - '+' * 
^SCR("W4HB","A",1)

^SCR("W4HB","A",2)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("W4HB","A",3)
:‡…—Œƒ’:‡…—ŒŽ
^SCR("W4HB","A",4)
:3-š…‰�…�™‡„Œ‹,2-š…‰�ƒ‰,1-š…‰ˆŽ…ˆ…€š…‰�…�™‡
^SCR("W4HB","A",5)

^SCR("W4HB","A",6)
‡…—Œ„�™‡…—Œ'‘ŽŽ"’Ž�…‹‘š‰�…�™‡Š‰˜€š
^SCR("W4HB","A",7)
------------------------------------------------------------
^SCR("W4HB","A",8)

^SCR("W4HB","A",9)

^SCR("W4HB","A",10)

^SCR("W4HB","A",11)

^SCR("W4HB","A",12)

^SCR("W4HB","A",13)

^SCR("W4HB","A",14)

^SCR("W4HB","A",15)

^SCR("W4HB","A",16)

^SCR("W4HB","A",17)

^SCR("W4HB","A",18)

^SCR("W4HB","A",19)

^SCR("W4HB","A",20)

^SCR("W4HB","A",21)
:Ž"’Ž‰�”Œ:Ž"’Ž:‹"„‘:š…‰�…�™‡
^SCR("W4HB","A",22)

^SCR("W4HB","A",23)
š†‹…˜Ž‰€ŒŽš‰�…�™‡-'M',‰€ŒŽ„Ž„˜‰™‰š‰�…�™‡-'<',š‰�ƒ‰š‰�…�™‡-'+'*
^SCR("W4HB","AV",1)

^SCR("W4HB","AV",2)
:lhrt,sg:lhrt,n
^SCR("W4HB","AV",3)
:jueksg:juekn
^SCR("W4HB","AV",4)
:3-,uhbucajvkf'2-,uhbsh'1-,uhynuyut,uhbucaj
^SCR("W4HB","AV",5)

^SCR("W4HB","AV",6)
juekvoajuekwxnn"gnoufx,hbucajlhrt,
^SCR("W4HB","AV",7)
------------------------------------------------------------
^SCR("W4HB","AV",8)

^SCR("W4HB","AV",9)

^SCR("W4HB","AV",10)

^SCR("W4HB","AV",11)

^SCR("W4HB","AV",12)

^SCR("W4HB","AV",13)

^SCR("W4HB","AV",14)

^SCR("W4HB","AV",15)

^SCR("W4HB","AV",16)

^SCR("W4HB","AV",17)

^SCR("W4HB","AV",18)

^SCR("W4HB","AV",19)

^SCR("W4HB","AV",20)

^SCR("W4HB","AV",21)
:n"gnhbpk:n"gn:f"vx:,uhbucaj
^SCR("W4HB","AV",22)

^SCR("W4HB","AV",23)
,zfurnhtkn,hbucaj-wMw'htknvnvrhah,hbucaj-w<w',hbsh,hbucaj-w+w*
^SCR("W4HB","G","DEL")

^SCR("W4HB","G","MAX")
99999
^SCR("W4HB","G","NAME","DATH")
1
^SCR("W4HB","G","NAME","HESB")
2
^SCR("W4HB","G","NAME","MAM")
4
^SCR("W4HB","G","NAME","NAME")
6
^SCR("W4HB","G","NAME","NMB")
5
^SCR("W4HB","G","NAME","SHUM")
3
^SCR("W4HB","G","NM",1)
DATH
^SCR("W4HB","G","NM",2)
HESB
^SCR("W4HB","G","NM",3)
SHUM
^SCR("W4HB","G","NM",4)
MAM
^SCR("W4HB","G","NM",5)
NMB
^SCR("W4HB","G","NM",6)
NAME
^SCR("W4HB","G","RB")
6,3,21,76
^SCR("W4HB","G","REF")
^TEMPDH($P
^SCR("W4HB","G","RZD")
\
^SCR("W4HB","G","STEP")
1
^SCR("W4HB","G","STG")
    :      gewld my    :  gewl 'qn :  n"rn  :  mekq  :zipeayg: jix`z  :        
^SCR("W4HB","G","VG")
8
^SCR("W4HB","NAME")
zeipeayg g"ec
^SCR("W4HB","P",3,"CRD")
1,34,H,24
^SCR("W4HB","P",3,"HELP")

^SCR("W4HB","P",3,"LMAX")
24
^SCR("W4HB","P",3,"MUMPS1")

^SCR("W4HB","P",3,"MUMPS2")

^SCR("W4HB","P",3,"OUTPUT")

^SCR("W4HB","P",3,"TYP")
H
^SCR("W4HB","P",5,"CRD")
2,44,D,8,0
^SCR("W4HB","P",5,"HELP")

^SCR("W4HB","P",5,"LMAX")
9
^SCR("W4HB","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("W4HB","P",5,"MUMPS2")
S D1=$$^%L1DC(DAT1,3) I $E(D1)="?" S %SC("ER")=1
^SCR("W4HB","P",5,"MUST")

^SCR("W4HB","P",5,"TYP")
D
^SCR("W4HB","P",10,"CRD")
2,21,D,8,0
^SCR("W4HB","P",10,"HELP")

^SCR("W4HB","P",10,"LMAX")
9
^SCR("W4HB","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("W4HB","P",10,"MUMPS2")
S D2=$$^%L1DC(DAT2,3) I $E(D2)="?" S %SC("ER")=1
^SCR("W4HB","P",10,"MUST")

^SCR("W4HB","P",10,"TYP")
D
^SCR("W4HB","P",12,"CRD")
3,42,E,11,0
^SCR("W4HB","P",12,"FNC")

^SCR("W4HB","P",12,"GLOB")
LKH
^SCR("W4HB","P",12,"HELP")

^SCR("W4HB","P",12,"LMAX")
11
^SCR("W4HB","P",12,"MUMPS1")

^SCR("W4HB","P",12,"MUMPS2")

^SCR("W4HB","P",12,"NLN")
20
^SCR("W4HB","P",12,"RZD")
\
^SCR("W4HB","P",12,"TOPB")
8
^SCR("W4HB","P",12,"TYP")
E
^SCR("W4HB","P",13,"CRD")
3,20,E,10,0
^SCR("W4HB","P",13,"FNC")

^SCR("W4HB","P",13,"GLOB")
LKH
^SCR("W4HB","P",13,"HELP")

^SCR("W4HB","P",13,"LMAX")
10
^SCR("W4HB","P",13,"MUMPS1")
S:'$G(ADLKH) ADLKH=MELKH
^SCR("W4HB","P",13,"MUMPS2")
I ADLKH<MELKH S %SC("ER")=1
^SCR("W4HB","P",13,"NLN")
20
^SCR("W4HB","P",13,"RZD")
\
^SCR("W4HB","P",13,"TOPB")
8
^SCR("W4HB","P",13,"TYP")
E
^SCR("W4HB","P",14,"CRD")
4,8,N,4,0
^SCR("W4HB","P",14,"HELP")

^SCR("W4HB","P",14,"LMAX")
4
^SCR("W4HB","P",14,"MUMPS1")
S:'$G(VD) VD=3
^SCR("W4HB","P",14,"MUMPS2")
I VD<1!(VD>3) S %SC("ER")=1
^SCR("W4HB","P",14,"TYP")
N
^SCR("W4HB","P",15,"CRD")
21,60,N,5,0
^SCR("W4HB","P",15,"HELP")

^SCR("W4HB","P",15,"LMAX")
5
^SCR("W4HB","P",15,"MUMPS1")

^SCR("W4HB","P",15,"MUMPS2")

^SCR("W4HB","P",15,"OUTPUT")

^SCR("W4HB","P",15,"TYP")
N
^SCR("W4HB","P",20,"CRD")
21,42,N,9,2
^SCR("W4HB","P",20,"HELP")

^SCR("W4HB","P",20,"LMAX")
10
^SCR("W4HB","P",20,"MUMPS1")

^SCR("W4HB","P",20,"MUMPS2")

^SCR("W4HB","P",20,"OUTPUT")

^SCR("W4HB","P",20,"TYP")
N
^SCR("W4HB","P",25,"CRD")
21,26,N,7,2
^SCR("W4HB","P",25,"HELP")

^SCR("W4HB","P",25,"LMAX")
7
^SCR("W4HB","P",25,"MUMPS1")

^SCR("W4HB","P",25,"MUMPS2")

^SCR("W4HB","P",25,"OUTPUT")

^SCR("W4HB","P",25,"TYP")
N
^SCR("W4HB","P",30,"CRD")
21,2,N,10,2
^SCR("W4HB","P",30,"HELP")

^SCR("W4HB","P",30,"LMAX")
10
^SCR("W4HB","P",30,"MUMPS1")

^SCR("W4HB","P",30,"MUMPS2")

^SCR("W4HB","P",30,"OUTPUT")

^SCR("W4HB","P",30,"TYP")
N
^SCR("W4HB","P","NAME","ADLKH")
13
^SCR("W4HB","P","NAME","DAT1")
5
^SCR("W4HB","P","NAME","DAT2")
10
^SCR("W4HB","P","NAME","KOT")
3
^SCR("W4HB","P","NAME","MELKH")
12
^SCR("W4HB","P","NAME","SLMAM")
30
^SCR("W4HB","P","NAME","SMAM")
25
^SCR("W4HB","P","NAME","SUM")
20
^SCR("W4HB","P","NAME","SUMH")
15
^SCR("W4HB","P","NAME","VD")
14
^SCR("W4HB","P","NM",3)
KOT
^SCR("W4HB","P","NM",5)
DAT1
^SCR("W4HB","P","NM",10)
DAT2
^SCR("W4HB","P","NM",12)
MELKH
^SCR("W4HB","P","NM",13)
ADLKH
^SCR("W4HB","P","NM",14)
VD
^SCR("W4HB","P","NM",15)
SUMH
^SCR("W4HB","P","NM",20)
SUM
^SCR("W4HB","P","NM",25)
SMAM
^SCR("W4HB","P","NM",30)
SLMAM
^SCR("W4HIPUS")
H
^SCR("W4HIPUS",1)
                                # miknqn yetig #                               
^SCR("W4HIPUS",2)
                            {               03} {02 } : jnqn beq               
^SCR("W4HIPUS",3)
                {10       } : jix`z cr    {05       } :   jix`zn               
^SCR("W4HIPUS",4)
          {                      12}{11         } :    gewl beqn               
^SCR("W4HIPUS",5)
          {                      14}{13         } :  gewl beq cr               
^SCR("W4HIPUS",6)
              {                      16}{15         } :    gewln               
^SCR("W4HIPUS",7)
              {                      21}{20         } :  gewl cr               
^SCR("W4HIPUS",8)
                   {30       } : mekq cr  {25       } :    mekqn               
^SCR("W4HIPUS",9)
                 {40       } jnqn 'qn cr  {35       } :jnqn 'qnn               
^SCR("W4HIPUS",10)
                                                                         1$    
^SCR("W4HIPUS",11)
    :  mekq  :           gewl my       :  gewl 'qn  :  jix`z :jnqn 'qn:        
^SCR("W4HIPUS",12)
                                                                               
^SCR("W4HIPUS",13)
                                                                               
^SCR("W4HIPUS",14)
                                                                               
^SCR("W4HIPUS",15)
                                                                               
^SCR("W4HIPUS",16)
                                                                               
^SCR("W4HIPUS",17)
                                                                               
^SCR("W4HIPUS",18)
                                                                               
^SCR("W4HIPUS",19)
                                                                               
^SCR("W4HIPUS",20)
                                                                               
^SCR("W4HIPUS",21)
                                                                               
^SCR("W4HIPUS",22)
                                                                               
^SCR("W4HIPUS",23)
 $1                                                                            
^SCR("W4HIPUS",24)
  {50        }                                                                 
^SCR("W4HIPUS","A",1)
�‰‹Ž‘Ž™…”‰‡
^SCR("W4HIPUS","A",2)
:ŠŽ‘Ž‚…‘
^SCR("W4HIPUS","A",3)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("W4HIPUS","A",4)
:‡…—Œ‚…‘Ž
^SCR("W4HIPUS","A",5)
:‡…—Œ‚…‘ƒ’
^SCR("W4HIPUS","A",6)
:‡…—ŒŽ
^SCR("W4HIPUS","A",7)
:‡…—Œƒ’
^SCR("W4HIPUS","A",8)
:�…‹‘ƒ’:�…‹‘Ž
^SCR("W4HIPUS","A",9)
ŠŽ‘Ž'‘Žƒ’:ŠŽ‘Ž'‘ŽŽ
^SCR("W4HIPUS","A",10)

^SCR("W4HIPUS","A",11)
�…‹‘‡…—Œ�™‡…—Œ'‘ŽŠ‰˜€šŠŽ‘Ž'‘Ž
^SCR("W4HIPUS","A",12)
-------------------------------------------------------------
^SCR("W4HIPUS","A",13)

^SCR("W4HIPUS","A",14)

^SCR("W4HIPUS","A",15)

^SCR("W4HIPUS","A",16)

^SCR("W4HIPUS","A",17)

^SCR("W4HIPUS","A",18)

^SCR("W4HIPUS","A",19)

^SCR("W4HIPUS","A",20)

^SCR("W4HIPUS","A",21)

^SCR("W4HIPUS","A",22)

^SCR("W4HIPUS","A",23)

^SCR("W4HIPUS","A",24)

^SCR("W4HIPUS","AV",1)
ohfnxnauphj
^SCR("W4HIPUS","AV",2)
:lnxndux
^SCR("W4HIPUS","AV",3)
:lhrt,sg:lhrt,n
^SCR("W4HIPUS","AV",4)
:juekduxn
^SCR("W4HIPUS","AV",5)
:juekduxsg
^SCR("W4HIPUS","AV",6)
:juekn
^SCR("W4HIPUS","AV",7)
:jueksg
^SCR("W4HIPUS","AV",8)
:oufxsg:oufxn
^SCR("W4HIPUS","AV",9)
lnxnwxnsg:lnxnwxnn
^SCR("W4HIPUS","AV",10)

^SCR("W4HIPUS","AV",11)
oufxjuekoajuekwxnlhrt,lnxnwxn
^SCR("W4HIPUS","AV",12)
-------------------------------------------------------------
^SCR("W4HIPUS","AV",13)

^SCR("W4HIPUS","AV",14)

^SCR("W4HIPUS","AV",15)

^SCR("W4HIPUS","AV",16)

^SCR("W4HIPUS","AV",17)

^SCR("W4HIPUS","AV",18)

^SCR("W4HIPUS","AV",19)

^SCR("W4HIPUS","AV",20)

^SCR("W4HIPUS","AV",21)

^SCR("W4HIPUS","AV",22)

^SCR("W4HIPUS","AV",23)

^SCR("W4HIPUS","AV",24)

^SCR("W4HIPUS","G",1,"CRD")
12,70,E,8,0
^SCR("W4HIPUS","G",1,"HELP")

^SCR("W4HIPUS","G",1,"LMAX")
8
^SCR("W4HIPUS","G",1,"MUMPS1")

^SCR("W4HIPUS","G",1,"MUMPS2")

^SCR("W4HIPUS","G",1,"OUTPUT")

^SCR("W4HIPUS","G",1,"SHEM")
jnqn 'qn
^SCR("W4HIPUS","G",1,"TYP")
E
^SCR("W4HIPUS","G",2,"CRD")
12,61,D,8,0
^SCR("W4HIPUS","G",2,"HELP")

^SCR("W4HIPUS","G",2,"LMAX")
8
^SCR("W4HIPUS","G",2,"MUMPS1")

^SCR("W4HIPUS","G",2,"MUMPS2")

^SCR("W4HIPUS","G",2,"OUTPUT")

^SCR("W4HIPUS","G",2,"SHEM")
  jix`z 
^SCR("W4HIPUS","G",2,"TYP")
D
^SCR("W4HIPUS","G",3,"CRD")
12,52,E,11,0
^SCR("W4HIPUS","G",3,"HELP")

^SCR("W4HIPUS","G",3,"LMAX")
12
^SCR("W4HIPUS","G",3,"MUMPS1")

^SCR("W4HIPUS","G",3,"MUMPS2")

^SCR("W4HIPUS","G",3,"OUTPUT")

^SCR("W4HIPUS","G",3,"SHEM")
  gewl 'qn  
^SCR("W4HIPUS","G",3,"TYP")
E
^SCR("W4HIPUS","G",4,"CRD")
12,39,H,25,0
^SCR("W4HIPUS","G",4,"HELP")

^SCR("W4HIPUS","G",4,"LMAX")
25
^SCR("W4HIPUS","G",4,"MUMPS1")

^SCR("W4HIPUS","G",4,"MUMPS2")

^SCR("W4HIPUS","G",4,"OUTPUT")

^SCR("W4HIPUS","G",4,"SHEM")
           gewl my       
^SCR("W4HIPUS","G",4,"TYP")
H
^SCR("W4HIPUS","G",5,"CRD")
12,13,N,8,2
^SCR("W4HIPUS","G",5,"HELP")

^SCR("W4HIPUS","G",5,"LMAX")
8
^SCR("W4HIPUS","G",5,"MUMPS1")

^SCR("W4HIPUS","G",5,"MUMPS2")

^SCR("W4HIPUS","G",5,"OUTPUT")

^SCR("W4HIPUS","G",5,"SHEM")
  mekq  
^SCR("W4HIPUS","G",5,"TYP")
N
^SCR("W4HIPUS","G","DEL")

^SCR("W4HIPUS","G","MAX")
99999
^SCR("W4HIPUS","G","NAME","DAT")
2
^SCR("W4HIPUS","G","NAME","LKH")
3
^SCR("W4HIPUS","G","NAME","LKH1")
4
^SCR("W4HIPUS","G","NAME","NOM")
1
^SCR("W4HIPUS","G","NAME","SUM")
5
^SCR("W4HIPUS","G","NM",1)
NOM
^SCR("W4HIPUS","G","NM",2)
DAT
^SCR("W4HIPUS","G","NM",3)
LKH
^SCR("W4HIPUS","G","NM",4)
LKH1
^SCR("W4HIPUS","G","NM",5)
SUM
^SCR("W4HIPUS","G","RB")
11,2,24,75
^SCR("W4HIPUS","G","REF")
^TEMPHIP($P
^SCR("W4HIPUS","G","RZD")
\
^SCR("W4HIPUS","G","STEP")
1
^SCR("W4HIPUS","G","STG")
    :  mekq  :           gewl my       :  gewl 'qn  :  jix`z :jnqn 'qn:        
^SCR("W4HIPUS","G","VG")
13
^SCR("W4HIPUS","NAME")
miknqn yetig
^SCR("W4HIPUS","P",2,"CHECK")
Y
^SCR("W4HIPUS","P",2,"CRD")
2,48,N,1,0
^SCR("W4HIPUS","P",2,"FNC")

^SCR("W4HIPUS","P",2,"GLOB")
W4SUGM
^SCR("W4HIPUS","P",2,"HELP")

^SCR("W4HIPUS","P",2,"LMAX")
4
^SCR("W4HIPUS","P",2,"MUMPS1")
D SETSUGM^W4HIPUS
^SCR("W4HIPUS","P",2,"MUMPS2")

^SCR("W4HIPUS","P",2,"NLN")
20
^SCR("W4HIPUS","P",2,"RZD")
\
^SCR("W4HIPUS","P",2,"TOPB")
8
^SCR("W4HIPUS","P",2,"TYP")
N
^SCR("W4HIPUS","P",2,"VRB")
SUGM1
^SCR("W4HIPUS","P",3,"CRD")
2,47,H,18
^SCR("W4HIPUS","P",3,"HELP")

^SCR("W4HIPUS","P",3,"LMAX")
18
^SCR("W4HIPUS","P",3,"MUMPS1")

^SCR("W4HIPUS","P",3,"MUMPS2")

^SCR("W4HIPUS","P",3,"OUTPUT")

^SCR("W4HIPUS","P",3,"TYP")
H
^SCR("W4HIPUS","P",5,"CRD")
3,42,D,8,0
^SCR("W4HIPUS","P",5,"HELP")

^SCR("W4HIPUS","P",5,"LMAX")
10
^SCR("W4HIPUS","P",5,"MUMPS1")

^SCR("W4HIPUS","P",5,"MUMPS2")

^SCR("W4HIPUS","P",5,"TYP")
D
^SCR("W4HIPUS","P",10,"CRD")
3,16,D,8,0
^SCR("W4HIPUS","P",10,"HELP")

^SCR("W4HIPUS","P",10,"LMAX")
10
^SCR("W4HIPUS","P",10,"MUMPS1")

^SCR("W4HIPUS","P",10,"MUMPS2")

^SCR("W4HIPUS","P",10,"TYP")
D
^SCR("W4HIPUS","P",11,"CRD")
4,36,E,5,0
^SCR("W4HIPUS","P",11,"FNC")

^SCR("W4HIPUS","P",11,"GLOB")
^SUGL
^SCR("W4HIPUS","P",11,"HELP")

^SCR("W4HIPUS","P",11,"LMAX")
12
^SCR("W4HIPUS","P",11,"MUMPS1")

^SCR("W4HIPUS","P",11,"MUMPS2")

^SCR("W4HIPUS","P",11,"NLN")
20
^SCR("W4HIPUS","P",11,"RZD")
\
^SCR("W4HIPUS","P",11,"TOPB")
8
^SCR("W4HIPUS","P",11,"TYP")
E
^SCR("W4HIPUS","P",11,"VRB")
MESUGL1
^SCR("W4HIPUS","P",12,"CRD")
4,36,H,25
^SCR("W4HIPUS","P",12,"HELP")

^SCR("W4HIPUS","P",12,"LMAX")
25
^SCR("W4HIPUS","P",12,"MUMPS1")

^SCR("W4HIPUS","P",12,"MUMPS2")

^SCR("W4HIPUS","P",12,"OUTPUT")

^SCR("W4HIPUS","P",12,"TYP")
H
^SCR("W4HIPUS","P",13,"CRD")
5,36,E,5,0
^SCR("W4HIPUS","P",13,"HELP")

^SCR("W4HIPUS","P",13,"LMAX")
12
^SCR("W4HIPUS","P",13,"MUMPS1")

^SCR("W4HIPUS","P",13,"MUMPS2")

^SCR("W4HIPUS","P",13,"TYP")
E
^SCR("W4HIPUS","P",14,"CRD")
5,36,H,25
^SCR("W4HIPUS","P",14,"HELP")

^SCR("W4HIPUS","P",14,"LMAX")
25
^SCR("W4HIPUS","P",14,"MUMPS1")

^SCR("W4HIPUS","P",14,"MUMPS2")

^SCR("W4HIPUS","P",14,"OUTPUT")

^SCR("W4HIPUS","P",14,"TYP")
H
^SCR("W4HIPUS","P",15,"CRD")
6,40,E,11,0
^SCR("W4HIPUS","P",15,"FNC")

^SCR("W4HIPUS","P",15,"GLOB")
LKH
^SCR("W4HIPUS","P",15,"HELP")

^SCR("W4HIPUS","P",15,"LMAX")
12
^SCR("W4HIPUS","P",15,"MUMPS1")

^SCR("W4HIPUS","P",15,"MUMPS2")

^SCR("W4HIPUS","P",15,"NLN")
20
^SCR("W4HIPUS","P",15,"RZD")
\
^SCR("W4HIPUS","P",15,"TOPB")
8
^SCR("W4HIPUS","P",15,"TYP")
E
^SCR("W4HIPUS","P",15,"VRB")
MELKH1
^SCR("W4HIPUS","P",16,"CRD")
6,40,H,25
^SCR("W4HIPUS","P",16,"HELP")

^SCR("W4HIPUS","P",16,"LMAX")
25
^SCR("W4HIPUS","P",16,"MUMPS1")

^SCR("W4HIPUS","P",16,"MUMPS2")

^SCR("W4HIPUS","P",16,"OUTPUT")

^SCR("W4HIPUS","P",16,"TYP")
H
^SCR("W4HIPUS","P",20,"CRD")
7,40,E,11,0
^SCR("W4HIPUS","P",20,"FNC")

^SCR("W4HIPUS","P",20,"GLOB")
LKH
^SCR("W4HIPUS","P",20,"HELP")

^SCR("W4HIPUS","P",20,"LMAX")
12
^SCR("W4HIPUS","P",20,"MUMPS1")

^SCR("W4HIPUS","P",20,"MUMPS2")

^SCR("W4HIPUS","P",20,"NLN")
20
^SCR("W4HIPUS","P",20,"RZD")
\
^SCR("W4HIPUS","P",20,"TOPB")
8
^SCR("W4HIPUS","P",20,"TYP")
E
^SCR("W4HIPUS","P",20,"VRB")
ADLKH1
^SCR("W4HIPUS","P",21,"CRD")
7,40,H,25
^SCR("W4HIPUS","P",21,"HELP")

^SCR("W4HIPUS","P",21,"LMAX")
25
^SCR("W4HIPUS","P",21,"MUMPS1")

^SCR("W4HIPUS","P",21,"MUMPS2")

^SCR("W4HIPUS","P",21,"OUTPUT")

^SCR("W4HIPUS","P",21,"TYP")
H
^SCR("W4HIPUS","P",25,"CRD")
8,42,N,10,2
^SCR("W4HIPUS","P",25,"HELP")

^SCR("W4HIPUS","P",25,"LMAX")
10
^SCR("W4HIPUS","P",25,"MUMPS1")

^SCR("W4HIPUS","P",25,"MUMPS2")

^SCR("W4HIPUS","P",25,"TYP")
N
^SCR("W4HIPUS","P",30,"CRD")
8,19,N,10,2
^SCR("W4HIPUS","P",30,"HELP")

^SCR("W4HIPUS","P",30,"LMAX")
10
^SCR("W4HIPUS","P",30,"MUMPS1")

^SCR("W4HIPUS","P",30,"MUMPS2")

^SCR("W4HIPUS","P",30,"TYP")
N
^SCR("W4HIPUS","P",35,"CRD")
9,42,N,10,0
^SCR("W4HIPUS","P",35,"HELP")

^SCR("W4HIPUS","P",35,"LMAX")
10
^SCR("W4HIPUS","P",35,"MUMPS1")

^SCR("W4HIPUS","P",35,"MUMPS2")

^SCR("W4HIPUS","P",35,"TYP")
N
^SCR("W4HIPUS","P",40,"CRD")
9,17,N,10,0
^SCR("W4HIPUS","P",40,"HELP")

^SCR("W4HIPUS","P",40,"LMAX")
10
^SCR("W4HIPUS","P",40,"MUMPS1")

^SCR("W4HIPUS","P",40,"MUMPS2")

^SCR("W4HIPUS","P",40,"TYP")
N
^SCR("W4HIPUS","P",50,"CRD")
24,2,N,11,2
^SCR("W4HIPUS","P",50,"HELP")

^SCR("W4HIPUS","P",50,"LMAX")
11
^SCR("W4HIPUS","P",50,"MUMPS1")

^SCR("W4HIPUS","P",50,"MUMPS2")

^SCR("W4HIPUS","P",50,"OUTPUT")

^SCR("W4HIPUS","P",50,"TYP")
N
^SCR("W4HIPUS","P","NAME","ADLKH")
20
^SCR("W4HIPUS","P","NAME","ADLKH1")
21
^SCR("W4HIPUS","P","NAME","ADNOM")
40
^SCR("W4HIPUS","P","NAME","ADSUGL")
13
^SCR("W4HIPUS","P","NAME","ADSUGL1")
14
^SCR("W4HIPUS","P","NAME","ADSUM")
30
^SCR("W4HIPUS","P","NAME","DAT1")
5
^SCR("W4HIPUS","P","NAME","DAT2")
10
^SCR("W4HIPUS","P","NAME","MELKH")
15
^SCR("W4HIPUS","P","NAME","MELKH1")
16
^SCR("W4HIPUS","P","NAME","MENOM")
35
^SCR("W4HIPUS","P","NAME","MESUGL")
11
^SCR("W4HIPUS","P","NAME","MESUGL1")
12
^SCR("W4HIPUS","P","NAME","MESUM")
25
^SCR("W4HIPUS","P","NAME","SAH")
50
^SCR("W4HIPUS","P","NAME","SUGM")
2
^SCR("W4HIPUS","P","NAME","SUGM1")
3
^SCR("W4HIPUS","P","NM",2)
SUGM
^SCR("W4HIPUS","P","NM",3)
SUGM1
^SCR("W4HIPUS","P","NM",5)
DAT1
^SCR("W4HIPUS","P","NM",10)
DAT2
^SCR("W4HIPUS","P","NM",11)
MESUGL
^SCR("W4HIPUS","P","NM",12)
MESUGL1
^SCR("W4HIPUS","P","NM",13)
ADSUGL
^SCR("W4HIPUS","P","NM",14)
ADSUGL1
^SCR("W4HIPUS","P","NM",15)
MELKH
^SCR("W4HIPUS","P","NM",16)
MELKH1
^SCR("W4HIPUS","P","NM",20)
ADLKH
^SCR("W4HIPUS","P","NM",21)
ADLKH1
^SCR("W4HIPUS","P","NM",25)
MESUM
^SCR("W4HIPUS","P","NM",30)
ADSUM
^SCR("W4HIPUS","P","NM",35)
MENOM
^SCR("W4HIPUS","P","NM",40)
ADNOM
^SCR("W4HIPUS","P","NM",50)
SAH
^SCR("W4HIPUS1")
H
^SCR("W4HIPUS1",1)
                                # miknqn yetig #                               
^SCR("W4HIPUS1",2)
                            {               03} {02 } : jnqn beq               
^SCR("W4HIPUS1",3)
                {10       } : jix`z cr    {05       } :   jix`zn               
^SCR("W4HIPUS1",4)
          {                      12}{11         } :    gewl beqn               
^SCR("W4HIPUS1",5)
          {                      14}{13         } :  gewl beq cr               
^SCR("W4HIPUS1",6)
              {                      16}{15         } :    gewln               
^SCR("W4HIPUS1",7)
              {                      21}{20         } :  gewl cr               
^SCR("W4HIPUS1",8)
                   {30       } : mekq cr  {25       } :    mekqn               
^SCR("W4HIPUS1",9)
                 {40       } jnqn 'qn cr  {35       } :jnqn 'qnn               
^SCR("W4HIPUS1",10)
                                                                         1$    
^SCR("W4HIPUS1",11)
    :  mekq  :           gewl my       :  gewl 'qn  :  jix`z :jnqn 'qn:        
^SCR("W4HIPUS1",12)
                                                                               
^SCR("W4HIPUS1",13)
                                                                               
^SCR("W4HIPUS1",14)
                                                                               
^SCR("W4HIPUS1",15)
                                                                               
^SCR("W4HIPUS1",16)
                                                                               
^SCR("W4HIPUS1",17)
                                                                               
^SCR("W4HIPUS1",18)
                                                                               
^SCR("W4HIPUS1",19)
                                                                               
^SCR("W4HIPUS1",20)
                                                                               
^SCR("W4HIPUS1",21)
 $1                                                                            
^SCR("W4HIPUS1",22)
  {50        }                                                                 
^SCR("W4HIPUS1",23)
                                                                               
^SCR("W4HIPUS1","A",1)
�‰‹Ž‘Ž™…”‰‡
^SCR("W4HIPUS1","A",2)
:ŠŽ‘Ž‚…‘
^SCR("W4HIPUS1","A",3)
:Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("W4HIPUS1","A",4)
:‡…—Œ‚…‘Ž
^SCR("W4HIPUS1","A",5)
:‡…—Œ‚…‘ƒ’
^SCR("W4HIPUS1","A",6)
:‡…—ŒŽ
^SCR("W4HIPUS1","A",7)
:‡…—Œƒ’
^SCR("W4HIPUS1","A",8)
:�…‹‘ƒ’:�…‹‘Ž
^SCR("W4HIPUS1","A",9)
ŠŽ‘Ž'‘Žƒ’:ŠŽ‘Ž'‘ŽŽ
^SCR("W4HIPUS1","A",10)

^SCR("W4HIPUS1","A",11)
�…‹‘‡…—Œ�™‡…—Œ'‘ŽŠ‰˜€šŠŽ‘Ž'‘Ž
^SCR("W4HIPUS1","A",12)
-------------------------------------------------------------
^SCR("W4HIPUS1","A",13)

^SCR("W4HIPUS1","A",14)

^SCR("W4HIPUS1","A",15)

^SCR("W4HIPUS1","A",16)

^SCR("W4HIPUS1","A",17)

^SCR("W4HIPUS1","A",18)

^SCR("W4HIPUS1","A",19)

^SCR("W4HIPUS1","A",20)

^SCR("W4HIPUS1","A",21)

^SCR("W4HIPUS1","A",22)

^SCR("W4HIPUS1","A",23)

^SCR("W4HIPUS1","AV",1)
ohfnxnauphj
^SCR("W4HIPUS1","AV",2)
:lnxndux
^SCR("W4HIPUS1","AV",3)
:lhrt,sg:lhrt,n
^SCR("W4HIPUS1","AV",4)
:juekduxn
^SCR("W4HIPUS1","AV",5)
:juekduxsg
^SCR("W4HIPUS1","AV",6)
:juekn
^SCR("W4HIPUS1","AV",7)
:jueksg
^SCR("W4HIPUS1","AV",8)
:oufxsg:oufxn
^SCR("W4HIPUS1","AV",9)
lnxnwxnsg:lnxnwxnn
^SCR("W4HIPUS1","AV",10)

^SCR("W4HIPUS1","AV",11)
oufxjuekoajuekwxnlhrt,lnxnwxn
^SCR("W4HIPUS1","AV",12)
-------------------------------------------------------------
^SCR("W4HIPUS1","AV",13)

^SCR("W4HIPUS1","AV",14)

^SCR("W4HIPUS1","AV",15)

^SCR("W4HIPUS1","AV",16)

^SCR("W4HIPUS1","AV",17)

^SCR("W4HIPUS1","AV",18)

^SCR("W4HIPUS1","AV",19)

^SCR("W4HIPUS1","AV",20)

^SCR("W4HIPUS1","AV",21)

^SCR("W4HIPUS1","AV",22)

^SCR("W4HIPUS1","AV",23)

^SCR("W4HIPUS1","G",1,"CRD")
12,70,E,8,0
^SCR("W4HIPUS1","G",1,"HELP")

^SCR("W4HIPUS1","G",1,"LMAX")
8
^SCR("W4HIPUS1","G",1,"MUMPS1")

^SCR("W4HIPUS1","G",1,"MUMPS2")

^SCR("W4HIPUS1","G",1,"OUTPUT")

^SCR("W4HIPUS1","G",1,"SHEM")
jnqn 'qn
^SCR("W4HIPUS1","G",1,"TYP")
E
^SCR("W4HIPUS1","G",2,"CRD")
12,61,D,8,0
^SCR("W4HIPUS1","G",2,"HELP")

^SCR("W4HIPUS1","G",2,"LMAX")
8
^SCR("W4HIPUS1","G",2,"MUMPS1")

^SCR("W4HIPUS1","G",2,"MUMPS2")

^SCR("W4HIPUS1","G",2,"OUTPUT")

^SCR("W4HIPUS1","G",2,"SHEM")
  jix`z 
^SCR("W4HIPUS1","G",2,"TYP")
D
^SCR("W4HIPUS1","G",3,"CRD")
12,52,E,11,0
^SCR("W4HIPUS1","G",3,"HELP")

^SCR("W4HIPUS1","G",3,"LMAX")
12
^SCR("W4HIPUS1","G",3,"MUMPS1")

^SCR("W4HIPUS1","G",3,"MUMPS2")

^SCR("W4HIPUS1","G",3,"OUTPUT")

^SCR("W4HIPUS1","G",3,"SHEM")
  gewl 'qn  
^SCR("W4HIPUS1","G",3,"TYP")
E
^SCR("W4HIPUS1","G",4,"CRD")
12,39,H,25,0
^SCR("W4HIPUS1","G",4,"HELP")

^SCR("W4HIPUS1","G",4,"LMAX")
25
^SCR("W4HIPUS1","G",4,"MUMPS1")

^SCR("W4HIPUS1","G",4,"MUMPS2")

^SCR("W4HIPUS1","G",4,"OUTPUT")

^SCR("W4HIPUS1","G",4,"SHEM")
           gewl my       
^SCR("W4HIPUS1","G",4,"TYP")
H
^SCR("W4HIPUS1","G",5,"CRD")
12,13,N,8,0
^SCR("W4HIPUS1","G",5,"HELP")

^SCR("W4HIPUS1","G",5,"LMAX")
8
^SCR("W4HIPUS1","G",5,"MUMPS1")

^SCR("W4HIPUS1","G",5,"MUMPS2")

^SCR("W4HIPUS1","G",5,"SHEM")
  mekq  
^SCR("W4HIPUS1","G",5,"TYP")
N
^SCR("W4HIPUS1","G","DEL")

^SCR("W4HIPUS1","G","MAX")
99999
^SCR("W4HIPUS1","G","NAME","DAT")
2
^SCR("W4HIPUS1","G","NAME","LKH")
3
^SCR("W4HIPUS1","G","NAME","LKH1")
4
^SCR("W4HIPUS1","G","NAME","NOM")
1
^SCR("W4HIPUS1","G","NAME","SUM")
5
^SCR("W4HIPUS1","G","NM",1)
NOM
^SCR("W4HIPUS1","G","NM",2)
DAT
^SCR("W4HIPUS1","G","NM",3)
LKH
^SCR("W4HIPUS1","G","NM",4)
LKH1
^SCR("W4HIPUS1","G","NM",5)
SUM
^SCR("W4HIPUS1","G","RB")
11,2,22,75
^SCR("W4HIPUS1","G","REF")
^TEMPHIP($P
^SCR("W4HIPUS1","G","RZD")
\
^SCR("W4HIPUS1","G","STEP")
1
^SCR("W4HIPUS1","G","STG")
    :  mekq  :           gewl my       :  gewl 'qn  :  jix`z :jnqn 'qn:        
^SCR("W4HIPUS1","G","VG")
13
^SCR("W4HIPUS1","NAME")

^SCR("W4HIPUS1","P",2,"CHECK")
Y
^SCR("W4HIPUS1","P",2,"CRD")
2,48,N,1,0
^SCR("W4HIPUS1","P",2,"FNC")

^SCR("W4HIPUS1","P",2,"GLOB")
W4SUGM
^SCR("W4HIPUS1","P",2,"HELP")

^SCR("W4HIPUS1","P",2,"LMAX")
4
^SCR("W4HIPUS1","P",2,"MUMPS1")
D SETSUGM^W4HIPUS
^SCR("W4HIPUS1","P",2,"MUMPS2")

^SCR("W4HIPUS1","P",2,"NLN")
20
^SCR("W4HIPUS1","P",2,"RZD")
\
^SCR("W4HIPUS1","P",2,"TOPB")
8
^SCR("W4HIPUS1","P",2,"TYP")
N
^SCR("W4HIPUS1","P",2,"VRB")
SUGM1
^SCR("W4HIPUS1","P",3,"CRD")
2,47,H,18
^SCR("W4HIPUS1","P",3,"HELP")

^SCR("W4HIPUS1","P",3,"LMAX")
18
^SCR("W4HIPUS1","P",3,"MUMPS1")

^SCR("W4HIPUS1","P",3,"MUMPS2")

^SCR("W4HIPUS1","P",3,"OUTPUT")

^SCR("W4HIPUS1","P",3,"TYP")
H
^SCR("W4HIPUS1","P",5,"CRD")
3,42,D,8,0
^SCR("W4HIPUS1","P",5,"HELP")

^SCR("W4HIPUS1","P",5,"LMAX")
10
^SCR("W4HIPUS1","P",5,"MUMPS1")

^SCR("W4HIPUS1","P",5,"MUMPS2")

^SCR("W4HIPUS1","P",5,"TYP")
D
^SCR("W4HIPUS1","P",10,"CRD")
3,16,D,8,0
^SCR("W4HIPUS1","P",10,"HELP")

^SCR("W4HIPUS1","P",10,"LMAX")
10
^SCR("W4HIPUS1","P",10,"MUMPS1")

^SCR("W4HIPUS1","P",10,"MUMPS2")

^SCR("W4HIPUS1","P",10,"TYP")
D
^SCR("W4HIPUS1","P",11,"CRD")
4,36,E,5,0
^SCR("W4HIPUS1","P",11,"FNC")

^SCR("W4HIPUS1","P",11,"GLOB")
SUGL
^SCR("W4HIPUS1","P",11,"HELP")

^SCR("W4HIPUS1","P",11,"LMAX")
12
^SCR("W4HIPUS1","P",11,"MUMPS1")

^SCR("W4HIPUS1","P",11,"MUMPS2")

^SCR("W4HIPUS1","P",11,"NLN")
20
^SCR("W4HIPUS1","P",11,"RZD")
\
^SCR("W4HIPUS1","P",11,"TOPB")
8
^SCR("W4HIPUS1","P",11,"TYP")
E
^SCR("W4HIPUS1","P",11,"VRB")
MESUGL1
^SCR("W4HIPUS1","P",12,"CRD")
4,36,H,25
^SCR("W4HIPUS1","P",12,"HELP")

^SCR("W4HIPUS1","P",12,"LMAX")
25
^SCR("W4HIPUS1","P",12,"MUMPS1")

^SCR("W4HIPUS1","P",12,"MUMPS2")

^SCR("W4HIPUS1","P",12,"OUTPUT")

^SCR("W4HIPUS1","P",12,"TYP")
H
^SCR("W4HIPUS1","P",13,"CRD")
5,36,E,5,0
^SCR("W4HIPUS1","P",13,"FNC")

^SCR("W4HIPUS1","P",13,"GLOB")
SUGL
^SCR("W4HIPUS1","P",13,"HELP")

^SCR("W4HIPUS1","P",13,"LMAX")
12
^SCR("W4HIPUS1","P",13,"MUMPS1")

^SCR("W4HIPUS1","P",13,"MUMPS2")

^SCR("W4HIPUS1","P",13,"NLN")
20
^SCR("W4HIPUS1","P",13,"RZD")
\
^SCR("W4HIPUS1","P",13,"TOPB")
8
^SCR("W4HIPUS1","P",13,"TYP")
E
^SCR("W4HIPUS1","P",13,"VRB")
ADSUGL1
^SCR("W4HIPUS1","P",14,"CRD")
5,36,H,25
^SCR("W4HIPUS1","P",14,"HELP")

^SCR("W4HIPUS1","P",14,"LMAX")
25
^SCR("W4HIPUS1","P",14,"MUMPS1")

^SCR("W4HIPUS1","P",14,"MUMPS2")

^SCR("W4HIPUS1","P",14,"OUTPUT")

^SCR("W4HIPUS1","P",14,"TYP")
H
^SCR("W4HIPUS1","P",15,"CRD")
6,40,E,11,0
^SCR("W4HIPUS1","P",15,"FNC")

^SCR("W4HIPUS1","P",15,"GLOB")
LKH
^SCR("W4HIPUS1","P",15,"HELP")

^SCR("W4HIPUS1","P",15,"LMAX")
12
^SCR("W4HIPUS1","P",15,"MUMPS1")

^SCR("W4HIPUS1","P",15,"MUMPS2")

^SCR("W4HIPUS1","P",15,"NLN")
20
^SCR("W4HIPUS1","P",15,"RZD")
\
^SCR("W4HIPUS1","P",15,"TOPB")
8
^SCR("W4HIPUS1","P",15,"TYP")
E
^SCR("W4HIPUS1","P",15,"VRB")
MELKH1
^SCR("W4HIPUS1","P",16,"CRD")
6,40,H,25
^SCR("W4HIPUS1","P",16,"HELP")

^SCR("W4HIPUS1","P",16,"LMAX")
25
^SCR("W4HIPUS1","P",16,"MUMPS1")

^SCR("W4HIPUS1","P",16,"MUMPS2")

^SCR("W4HIPUS1","P",16,"OUTPUT")

^SCR("W4HIPUS1","P",16,"TYP")
H
^SCR("W4HIPUS1","P",20,"CRD")
7,40,E,11,0
^SCR("W4HIPUS1","P",20,"FNC")

^SCR("W4HIPUS1","P",20,"GLOB")
LKH
^SCR("W4HIPUS1","P",20,"HELP")

^SCR("W4HIPUS1","P",20,"LMAX")
12
^SCR("W4HIPUS1","P",20,"MUMPS1")

^SCR("W4HIPUS1","P",20,"MUMPS2")

^SCR("W4HIPUS1","P",20,"NLN")
20
^SCR("W4HIPUS1","P",20,"RZD")
\
^SCR("W4HIPUS1","P",20,"TOPB")
8
^SCR("W4HIPUS1","P",20,"TYP")
E
^SCR("W4HIPUS1","P",20,"VRB")
ADLKH1
^SCR("W4HIPUS1","P",21,"CRD")
7,40,H,25
^SCR("W4HIPUS1","P",21,"HELP")

^SCR("W4HIPUS1","P",21,"LMAX")
25
^SCR("W4HIPUS1","P",21,"MUMPS1")

^SCR("W4HIPUS1","P",21,"MUMPS2")

^SCR("W4HIPUS1","P",21,"OUTPUT")

^SCR("W4HIPUS1","P",21,"TYP")
H
^SCR("W4HIPUS1","P",25,"CRD")
8,42,N,10,2
^SCR("W4HIPUS1","P",25,"HELP")

^SCR("W4HIPUS1","P",25,"LMAX")
10
^SCR("W4HIPUS1","P",25,"MUMPS1")

^SCR("W4HIPUS1","P",25,"MUMPS2")

^SCR("W4HIPUS1","P",25,"TYP")
N
^SCR("W4HIPUS1","P",30,"CRD")
8,19,N,10,2
^SCR("W4HIPUS1","P",30,"HELP")

^SCR("W4HIPUS1","P",30,"LMAX")
10
^SCR("W4HIPUS1","P",30,"MUMPS1")

^SCR("W4HIPUS1","P",30,"MUMPS2")

^SCR("W4HIPUS1","P",30,"TYP")
N
^SCR("W4HIPUS1","P",35,"CRD")
9,42,N,10,0
^SCR("W4HIPUS1","P",35,"HELP")

^SCR("W4HIPUS1","P",35,"LMAX")
10
^SCR("W4HIPUS1","P",35,"MUMPS1")

^SCR("W4HIPUS1","P",35,"MUMPS2")

^SCR("W4HIPUS1","P",35,"TYP")
N
^SCR("W4HIPUS1","P",40,"CRD")
9,17,N,10,0
^SCR("W4HIPUS1","P",40,"HELP")

^SCR("W4HIPUS1","P",40,"LMAX")
10
^SCR("W4HIPUS1","P",40,"MUMPS1")

^SCR("W4HIPUS1","P",40,"MUMPS2")

^SCR("W4HIPUS1","P",40,"TYP")
N
^SCR("W4HIPUS1","P",50,"CRD")
22,2,N,11,2
^SCR("W4HIPUS1","P",50,"HELP")

^SCR("W4HIPUS1","P",50,"LMAX")
11
^SCR("W4HIPUS1","P",50,"MUMPS1")

^SCR("W4HIPUS1","P",50,"MUMPS2")

^SCR("W4HIPUS1","P",50,"OUTPUT")

^SCR("W4HIPUS1","P",50,"TYP")
N
^SCR("W4HIPUS1","P","NAME","ADLKH")
20
^SCR("W4HIPUS1","P","NAME","ADLKH1")
21
^SCR("W4HIPUS1","P","NAME","ADNOM")
40
^SCR("W4HIPUS1","P","NAME","ADSUGL")
13
^SCR("W4HIPUS1","P","NAME","ADSUGL1")
14
^SCR("W4HIPUS1","P","NAME","ADSUM")
30
^SCR("W4HIPUS1","P","NAME","DAT1")
5
^SCR("W4HIPUS1","P","NAME","DAT2")
10
^SCR("W4HIPUS1","P","NAME","MELKH")
15
^SCR("W4HIPUS1","P","NAME","MELKH1")
16
^SCR("W4HIPUS1","P","NAME","MENOM")
35
^SCR("W4HIPUS1","P","NAME","MESUGL")
11
^SCR("W4HIPUS1","P","NAME","MESUGL1")
12
^SCR("W4HIPUS1","P","NAME","MESUM")
25
^SCR("W4HIPUS1","P","NAME","SAH")
50
^SCR("W4HIPUS1","P","NAME","SUGM")
2
^SCR("W4HIPUS1","P","NAME","SUGM1")
3
^SCR("W4HIPUS1","P","NM",2)
SUGM
^SCR("W4HIPUS1","P","NM",3)
SUGM1
^SCR("W4HIPUS1","P","NM",5)
DAT1
^SCR("W4HIPUS1","P","NM",10)
DAT2
^SCR("W4HIPUS1","P","NM",11)
MESUGL
^SCR("W4HIPUS1","P","NM",12)
MESUGL1
^SCR("W4HIPUS1","P","NM",13)
ADSUGL
^SCR("W4HIPUS1","P","NM",14)
ADSUGL1
^SCR("W4HIPUS1","P","NM",15)
MELKH
^SCR("W4HIPUS1","P","NM",16)
MELKH1
^SCR("W4HIPUS1","P","NM",20)
ADLKH
^SCR("W4HIPUS1","P","NM",21)
ADLKH1
^SCR("W4HIPUS1","P","NM",25)
MESUM
^SCR("W4HIPUS1","P","NM",30)
ADSUM
^SCR("W4HIPUS1","P","NM",35)
MENOM
^SCR("W4HIPUS1","P","NM",40)
ADNOM
^SCR("W4HIPUS1","P","NM",50)
SAH
^SCR("W4HSV")
H
^SCR("W4HSV",1)
                                                                               
^SCR("W4HSV",2)
                                  # zayayg ixhnxt #                            
^SCR("W4HSV",3)
                                                                               
^SCR("W4HSV",4)
                                                                     1]        
^SCR("W4HSV",5)
                 {10      }: zeneyz n"rn     {05     }: zeipw oeayg            
^SCR("W4HSV",6)
                 {20      }: ze`wqr n"rn     {15     }:zeqpkd oeayg            
^SCR("W4HSV",7)
                                   {22      } : xewn qn iekip oeayg            
^SCR("W4HSV",8)
                 {30      }:    dtew wiy     {25     }: dtew  onefn            
^SCR("W4HSV",9)
                 {33      }:   onefn wiy     {27     }:   dtew yelz            
^SCR("W4HSV",10)
                                             {34     }:       mitih            
^SCR("W4HSV",11)
                 {40      }:dxag hxk`xyi     {35     }: dtew hxk`xyi           
^SCR("W4HSV",12)
                 {50      }:dxag    dfie     {45     }: dtew   dfie            
^SCR("W4HSV",13)
                 {60      }:dxag  qxpiic     {55     }: dtew qxpiic            
^SCR("W4HSV",14)
                 {70      }:dxag  AM.EXP     {65     }: dtew AM.EXP            
^SCR("W4HSV",15)
                 {72      }:dxag     JCB     {71     }: dtew    JCB            
^SCR("W4HSV",16)
                 {74      }:dxag    `tl`     {73     }: dtew   `tl`            
^SCR("W4HSV",17)
                                                                               
^SCR("W4HSV",18)
                 {80       : dtew oeayg      {75      :   wpa oeayg            
^SCR("W4HSV",19)
                                                                               
^SCR("W4HSV",20)
                 {90                   }: MOVEIN.DAT uaew miyl okid            
^SCR("W4HSV",21)
                 {95 :3 - PRIORITY , 2 - 90 ,1 - 180 : zeniyx hnxet            
^SCR("W4HSV",22)
           [1                                                                  
^SCR("W4HSV","A",1)

^SCR("W4HSV","A",2)
š�™�™‡‰˜ˆŽ˜”
^SCR("W4HSV","A",3)

^SCR("W4HSV","A",4)

^SCR("W4HSV","A",5)
:š…Ž…™šŽ"’Ž:š…‰�—�…�™‡
^SCR("W4HSV","A",6)
:š…€—‘’Ž"’Ž:š…‘�‹„�…�™‡
^SCR("W4HSV","A",7)
:˜…—Ž‘Ž‰…‹‰��…�™‡
^SCR("W4HSV","A",8)
:„”…——‰™:„”…—�Ž…†Ž
^SCR("W4HSV","A",9)
:�Ž…†Ž—‰™:„”…—™…Œš
^SCR("W4HSV","A",10)
:�‰”‰ˆ
^SCR("W4HSV","A",11)
:„˜�‡ˆ˜‹€˜™‰:„”…—ˆ˜‹€˜™‰
^SCR("W4HSV","A",12)
:„˜�‡„†‰…:„”…—„†‰…
^SCR("W4HSV","A",13)
:„˜�‡‘˜�‰‰ƒ:„”…—‘˜�‰‰ƒ
^SCR("W4HSV","A",14)
:„˜�‡AM.EXP:„”…—AM.EXP
^SCR("W4HSV","A",15)
:„˜�‡JCB:„”…—JCB
^SCR("W4HSV","A",16)
:„˜�‡€”Œ€:„”…—€”Œ€
^SCR("W4HSV","A",17)

^SCR("W4HSV","A",18)
:„”…—�…�™‡:—���…�™‡
^SCR("W4HSV","A",19)

^SCR("W4HSV","A",20)
:MOVEIN.DAT•�…—�‰™Œ�‹‰„
^SCR("W4HSV","A",21)
:3-PRIORITY,2-90,1-180:š…Ž‰™˜ˆŽ˜…”
^SCR("W4HSV","A",22)

^SCR("W4HSV","AV",1)

^SCR("W4HSV","AV",2)
,cacajhrynrp
^SCR("W4HSV","AV",3)

^SCR("W4HSV","AV",4)

^SCR("W4HSV","AV",5)
:,unua,n"gn:,uhbeiucaj
^SCR("W4HSV","AV",6)
:,utexgn"gn:,uxbfviucaj
^SCR("W4HSV","AV",7)
:ruenxnhufhbiucaj
^SCR("W4HSV","AV",8)
:vpueeha:vpueinuzn
^SCR("W4HSV","AV",9)
:inuzneha:vpueauk,
^SCR("W4HSV","AV",10)
:ohphy
^SCR("W4HSV","AV",11)
:vrcjyrftrah:vpueyrftrah
^SCR("W4HSV","AV",12)
:vrcjvzhu:vpuevzhu
^SCR("W4HSV","AV",13)
:vrcjxrbhhs:vpuexrbhhs
^SCR("W4HSV","AV",14)
:vrcjAM/EXP:vpueAM/EXP
^SCR("W4HSV","AV",15)
:vrcjJCB:vpueJCB
^SCR("W4HSV","AV",16)
:vrcjtpkt:vpuetpkt
^SCR("W4HSV","AV",17)

^SCR("W4HSV","AV",18)
:vpueiucaj:ebciucaj
^SCR("W4HSV","AV",19)

^SCR("W4HSV","AV",20)
:MOVEIN/DAT•cueohakifhv
^SCR("W4HSV","AV",21)
:3-PRIORITY'2-90'1-180:,unharynrup
^SCR("W4HSV","AV",22)

^SCR("W4HSV","NAME")

^SCR("W4HSV","P",5,"CRD")
5,45,E,8,0
^SCR("W4HSV","P",5,"HELP")

^SCR("W4HSV","P",5,"LMAX")
8
^SCR("W4HSV","P",5,"MUMPS1")

^SCR("W4HSV","P",5,"MUMPS2")

^SCR("W4HSV","P",5,"TYP")
E
^SCR("W4HSV","P",10,"CRD")
5,17,E,8,0
^SCR("W4HSV","P",10,"HELP")

^SCR("W4HSV","P",10,"LMAX")
9
^SCR("W4HSV","P",10,"MUMPS1")

^SCR("W4HSV","P",10,"MUMPS2")

^SCR("W4HSV","P",10,"TYP")
E
^SCR("W4HSV","P",15,"CRD")
6,45,E,8,0
^SCR("W4HSV","P",15,"HELP")

^SCR("W4HSV","P",15,"LMAX")
8
^SCR("W4HSV","P",15,"MUMPS1")

^SCR("W4HSV","P",15,"MUMPS2")

^SCR("W4HSV","P",15,"TYP")
E
^SCR("W4HSV","P",20,"CRD")
6,17,E,8,0
^SCR("W4HSV","P",20,"HELP")

^SCR("W4HSV","P",20,"LMAX")
9
^SCR("W4HSV","P",20,"MUMPS1")

^SCR("W4HSV","P",20,"MUMPS2")

^SCR("W4HSV","P",20,"TYP")
E
^SCR("W4HSV","P",22,"CRD")
7,35,E,8,0
^SCR("W4HSV","P",22,"HELP")

^SCR("W4HSV","P",22,"LMAX")
9
^SCR("W4HSV","P",22,"MUMPS1")

^SCR("W4HSV","P",22,"MUMPS2")

^SCR("W4HSV","P",22,"TYP")
E
^SCR("W4HSV","P",25,"CRD")
8,45,E,8,0
^SCR("W4HSV","P",25,"HELP")

^SCR("W4HSV","P",25,"LMAX")
8
^SCR("W4HSV","P",25,"MUMPS1")

^SCR("W4HSV","P",25,"MUMPS2")

^SCR("W4HSV","P",25,"TYP")
E
^SCR("W4HSV","P",27,"CRD")
9,45,E,8,0
^SCR("W4HSV","P",27,"HELP")

^SCR("W4HSV","P",27,"LMAX")
8
^SCR("W4HSV","P",27,"MUMPS1")

^SCR("W4HSV","P",27,"MUMPS2")

^SCR("W4HSV","P",27,"TYP")
E
^SCR("W4HSV","P",30,"CRD")
8,17,E,8,0
^SCR("W4HSV","P",30,"HELP")

^SCR("W4HSV","P",30,"LMAX")
9
^SCR("W4HSV","P",30,"MUMPS1")

^SCR("W4HSV","P",30,"MUMPS2")

^SCR("W4HSV","P",30,"TYP")
E
^SCR("W4HSV","P",33,"CRD")
9,17,E,8,0
^SCR("W4HSV","P",33,"HELP")

^SCR("W4HSV","P",33,"LMAX")
9
^SCR("W4HSV","P",33,"MUMPS1")

^SCR("W4HSV","P",33,"MUMPS2")

^SCR("W4HSV","P",33,"TYP")
E
^SCR("W4HSV","P",34,"CRD")
10,45,E,8,0
^SCR("W4HSV","P",34,"HELP")

^SCR("W4HSV","P",34,"LMAX")
8
^SCR("W4HSV","P",34,"MUMPS1")

^SCR("W4HSV","P",34,"MUMPS2")

^SCR("W4HSV","P",34,"TYP")
E
^SCR("W4HSV","P",35,"CRD")
11,45,E,8,0
^SCR("W4HSV","P",35,"HELP")

^SCR("W4HSV","P",35,"LMAX")
8
^SCR("W4HSV","P",35,"MUMPS1")

^SCR("W4HSV","P",35,"MUMPS2")

^SCR("W4HSV","P",35,"TYP")
E
^SCR("W4HSV","P",40,"CRD")
11,17,E,8,0
^SCR("W4HSV","P",40,"HELP")

^SCR("W4HSV","P",40,"LMAX")
9
^SCR("W4HSV","P",40,"MUMPS1")

^SCR("W4HSV","P",40,"MUMPS2")

^SCR("W4HSV","P",40,"TYP")
E
^SCR("W4HSV","P",45,"CRD")
12,45,E,8,0
^SCR("W4HSV","P",45,"HELP")

^SCR("W4HSV","P",45,"LMAX")
8
^SCR("W4HSV","P",45,"MUMPS1")

^SCR("W4HSV","P",45,"MUMPS2")

^SCR("W4HSV","P",45,"TYP")
E
^SCR("W4HSV","P",50,"CRD")
12,17,E,8,0
^SCR("W4HSV","P",50,"HELP")

^SCR("W4HSV","P",50,"LMAX")
9
^SCR("W4HSV","P",50,"MUMPS1")

^SCR("W4HSV","P",50,"MUMPS2")

^SCR("W4HSV","P",50,"TYP")
E
^SCR("W4HSV","P",55,"CRD")
13,45,E,8,0
^SCR("W4HSV","P",55,"HELP")

^SCR("W4HSV","P",55,"LMAX")
8
^SCR("W4HSV","P",55,"MUMPS1")

^SCR("W4HSV","P",55,"MUMPS2")

^SCR("W4HSV","P",55,"TYP")
E
^SCR("W4HSV","P",60,"CRD")
13,17,E,8,0
^SCR("W4HSV","P",60,"HELP")

^SCR("W4HSV","P",60,"LMAX")
9
^SCR("W4HSV","P",60,"MUMPS1")

^SCR("W4HSV","P",60,"MUMPS2")

^SCR("W4HSV","P",60,"TYP")
E
^SCR("W4HSV","P",65,"CRD")
14,45,E,8,0
^SCR("W4HSV","P",65,"HELP")

^SCR("W4HSV","P",65,"LMAX")
8
^SCR("W4HSV","P",65,"MUMPS1")

^SCR("W4HSV","P",65,"MUMPS2")

^SCR("W4HSV","P",65,"TYP")
E
^SCR("W4HSV","P",70,"CRD")
14,17,E,8,0
^SCR("W4HSV","P",70,"HELP")

^SCR("W4HSV","P",70,"LMAX")
9
^SCR("W4HSV","P",70,"MUMPS1")

^SCR("W4HSV","P",70,"MUMPS2")

^SCR("W4HSV","P",70,"TYP")
E
^SCR("W4HSV","P",71,"CRD")
15,45,E,8,0
^SCR("W4HSV","P",71,"HELP")

^SCR("W4HSV","P",71,"LMAX")
8
^SCR("W4HSV","P",71,"MUMPS1")

^SCR("W4HSV","P",71,"MUMPS2")

^SCR("W4HSV","P",71,"TYP")
E
^SCR("W4HSV","P",72,"CRD")
15,17,E,8,0
^SCR("W4HSV","P",72,"HELP")

^SCR("W4HSV","P",72,"LMAX")
9
^SCR("W4HSV","P",72,"MUMPS1")

^SCR("W4HSV","P",72,"MUMPS2")

^SCR("W4HSV","P",72,"TYP")
E
^SCR("W4HSV","P",73,"CRD")
16,45,E,8,0
^SCR("W4HSV","P",73,"HELP")

^SCR("W4HSV","P",73,"LMAX")
8
^SCR("W4HSV","P",73,"MUMPS1")

^SCR("W4HSV","P",73,"MUMPS2")

^SCR("W4HSV","P",73,"TYP")
E
^SCR("W4HSV","P",74,"CRD")
16,17,E,8,0
^SCR("W4HSV","P",74,"HELP")

^SCR("W4HSV","P",74,"LMAX")
9
^SCR("W4HSV","P",74,"MUMPS1")

^SCR("W4HSV","P",74,"MUMPS2")

^SCR("W4HSV","P",74,"TYP")
E
^SCR("W4HSV","P",75,"CRD")
18,45,E,8,0
^SCR("W4HSV","P",75,"HELP")

^SCR("W4HSV","P",75,"LMAX")
9
^SCR("W4HSV","P",75,"MUMPS1")

^SCR("W4HSV","P",75,"MUMPS2")

^SCR("W4HSV","P",75,"TYP")
E
^SCR("W4HSV","P",80,"CRD")
18,17,E,8,0
^SCR("W4HSV","P",80,"HELP")

^SCR("W4HSV","P",80,"LMAX")
10
^SCR("W4HSV","P",80,"MUMPS1")

^SCR("W4HSV","P",80,"MUMPS2")

^SCR("W4HSV","P",80,"TYP")
E
^SCR("W4HSV","P",90,"CRD")
20,17,E,22,0
^SCR("W4HSV","P",90,"HELP")

^SCR("W4HSV","P",90,"LMAX")
22
^SCR("W4HSV","P",90,"MUMPS1")

^SCR("W4HSV","P",90,"MUMPS2")

^SCR("W4HSV","P",90,"TYP")
E
^SCR("W4HSV","P",95,"CRD")
21,17,N,4,0
^SCR("W4HSV","P",95,"HELP")

^SCR("W4HSV","P",95,"LMAX")
4
^SCR("W4HSV","P",95,"MUMPS1")

^SCR("W4HSV","P",95,"MUMPS2")
I %S<1,%S>3 S %SC("ER")=1
^SCR("W4HSV","P",95,"MUST")

^SCR("W4HSV","P",95,"TYP")
N
^SCR("W4HSV","P","NAME","ALPHA")
74
^SCR("W4HSV","P","NAME","ALPHAK")
73
^SCR("W4HSV","P","NAME","AMEXP")
70
^SCR("W4HSV","P","NAME","AMEXPK")
65
^SCR("W4HSV","P","NAME","BANK")
75
^SCR("W4HSV","P","NAME","CHKK")
30
^SCR("W4HSV","P","NAME","CHKKM")
33
^SCR("W4HSV","P","NAME","DINERS")
60
^SCR("W4HSV","P","NAME","DINERSK")
55
^SCR("W4HSV","P","NAME","FORMAT")
95
^SCR("W4HSV","P","NAME","HKNIJOT")
5
^SCR("W4HSV","P","NAME","HMHIROT")
15
^SCR("W4HSV","P","NAME","HNKMM")
22
^SCR("W4HSV","P","NAME","ISR")
40
^SCR("W4HSV","P","NAME","ISRK")
35
^SCR("W4HSV","P","NAME","JCB")
72
^SCR("W4HSV","P","NAME","JCBK")
71
^SCR("W4HSV","P","NAME","KUPA")
80
^SCR("W4HSV","P","NAME","MAMI")
20
^SCR("W4HSV","P","NAME","MAMT")
10
^SCR("W4HSV","P","NAME","MZMK")
25
^SCR("W4HSV","P","NAME","PATH")
90
^SCR("W4HSV","P","NAME","TIP")
34
^SCR("W4HSV","P","NAME","VISA")
50
^SCR("W4HSV","P","NAME","VISAK")
45
^SCR("W4HSV","P","NAME","ZK")
27
^SCR("W4HSV","P","NM",5)
HKNIJOT
^SCR("W4HSV","P","NM",10)
MAMT
^SCR("W4HSV","P","NM",15)
HMHIROT
^SCR("W4HSV","P","NM",20)
MAMI
^SCR("W4HSV","P","NM",22)
HNKMM
^SCR("W4HSV","P","NM",25)
MZMK
^SCR("W4HSV","P","NM",27)
ZK
^SCR("W4HSV","P","NM",30)
CHKK
^SCR("W4HSV","P","NM",33)
CHKKM
^SCR("W4HSV","P","NM",34)
TIP
^SCR("W4HSV","P","NM",35)
ISRK
^SCR("W4HSV","P","NM",40)
ISR
^SCR("W4HSV","P","NM",45)
VISAK
^SCR("W4HSV","P","NM",50)
VISA
^SCR("W4HSV","P","NM",55)
DINERSK
^SCR("W4HSV","P","NM",60)
DINERS
^SCR("W4HSV","P","NM",65)
AMEXPK
^SCR("W4HSV","P","NM",70)
AMEXP
^SCR("W4HSV","P","NM",71)
JCBK
^SCR("W4HSV","P","NM",72)
JCB
^SCR("W4HSV","P","NM",73)
ALPHAK
^SCR("W4HSV","P","NM",74)
ALPHA
^SCR("W4HSV","P","NM",75)
BANK
^SCR("W4HSV","P","NM",80)
KUPA
^SCR("W4HSV","P","NM",90)
PATH
^SCR("W4HSV","P","NM",95)
FORMAT
^SCR("W4HSV","P","RB",1)
5,12,23,71
^SCR("W4HZCA")
H
^SCR("W4HZCA",1)
                                 # `"k g"ec #                                  
^SCR("W4HZCA",2)
                   {10      } jix`z cr    {05      }: jix`zn                   
^SCR("W4HZCA",3)
                   {14      }  mekq cr    {12      }:  mekqn                   
^SCR("W4HZCA",4)
              {20  } ( zelaw - 2 , zepnfd - 1 ,mlek - 0) jnqn beq              
^SCR("W4HZCA",5)
              {21  } ( 2- ipevig ,1 - inipt ,mlek - 0 ) i`xy` beq              
^SCR("W4HZCA",6)
   {22  } ( dpzn/orhp-4,iciin aeig-3,wlc-2,xiih-1, il`xyi-0 ,mlek-9 ) qihxk beq
^SCR("W4HZCA",7)
                        {24               }: zepexg` zextq 4 e` i`xy` qihxk 'qn
^SCR("W4HZCA",8)
                                                   {26 }: mini itl minekq bivdl
^SCR("W4HZCA",9)
                                                                             1$
^SCR("W4HZCA",10)
 :  mekq  : `"k beq :dzknq`:    `"k 'qn   :dwqr 'qn:jnqn 'qn:jnqn beq: jix`z  :
^SCR("W4HZCA",11)
                                                                               
^SCR("W4HZCA",12)
                                                                               
^SCR("W4HZCA",13)
                                                                               
^SCR("W4HZCA",14)
                                                                               
^SCR("W4HZCA",15)
                                                                               
^SCR("W4HZCA",16)
                                                                               
^SCR("W4HZCA",17)
                                                                               
^SCR("W4HZCA",18)
 $1                                                                            
^SCR("W4HZCA",19)
  {35      :      qxpiic k"dq  {30      :  dfie k"dq {25      : hxk`xyi k"dq   
^SCR("W4HZCA",20)
 {50       :         `"k k"dq  {45      : ine`l k"dq {40      :.qw` .n` k"dq   
^SCR("W4HZCA",21)
 {60       :           minipt  {55       : md mipevig i`xy` iqihxk k"dq jeza   
^SCR("W4HZCA","AV",1)
à"ëç"åã
^SCR("W4HZCA","AV",2)
êéøàúãò:êéøàúî
^SCR("W4HZCA","AV",3)
íåëñãò:íåëñî
^SCR("W4HZCA","AV",4)
(úåìá÷-2,úåðîæä-1,íìåë-0)êîñîâåñ
^SCR("W4HZCA","AV",5)
(2-éðåöéç,1-éîéðô,íìåë-0)éàøùàâåñ
^SCR("W4HZCA","AV",6)
(äðúî/ïòèð-4,éãééîáåéç-3,÷ìã-2,øééè-1,éìàøùé-0,íìåë-9)ñéèøëâåñ
^SCR("W4HZCA","AV",7)
:úåðåøçàúåøôñ4åàéàøùàñéèøë'ñî
^SCR("W4HZCA","AV",8)
:íéîééôìíéîåëñâéöäì
^SCR("W4HZCA","AV",9)

^SCR("W4HZCA","AV",10)
íåëñà"ëâåñäúëîñàà"ë'ñîä÷ñò'ñîêîñî'ñîêîñîâåñêéøàú
^SCR("W4HZCA","AV",11)
---------------------------------------------------------------------
^SCR("W4HZCA","AV",12)

^SCR("W4HZCA","AV",13)

^SCR("W4HZCA","AV",14)

^SCR("W4HZCA","AV",15)

^SCR("W4HZCA","AV",16)

^SCR("W4HZCA","AV",17)

^SCR("W4HZCA","AV",18)

^SCR("W4HZCA","AV",19)
:ñøðééãë"äñ:äæéåë"äñ:èøëàøùéë"äñ
^SCR("W4HZCA","AV",20)
:à"ëë"äñ:éîåàìë"äñ:.ñ÷à.îàë"äñ
^SCR("W4HZCA","AV",21)
:íéîéðô:íäíéðåöéçéàøùàéñéèøëë"äñêåúá
^SCR("W4HZCA","G",1,"CRD")
11,78,D,8,0
^SCR("W4HZCA","G",1,"HELP")

^SCR("W4HZCA","G",1,"LMAX")
8
^SCR("W4HZCA","G",1,"MUMPS1")

^SCR("W4HZCA","G",1,"MUMPS2")

^SCR("W4HZCA","G",1,"SHEM")
 jix`z  
^SCR("W4HZCA","G",1,"TYP")
D
^SCR("W4HZCA","G",2,"CRD")
11,69,H,8,0
^SCR("W4HZCA","G",2,"HELP")

^SCR("W4HZCA","G",2,"LMAX")
8
^SCR("W4HZCA","G",2,"MUMPS1")

^SCR("W4HZCA","G",2,"MUMPS2")

^SCR("W4HZCA","G",2,"OUTPUT")

^SCR("W4HZCA","G",2,"SHEM")
jnqn beq
^SCR("W4HZCA","G",2,"TYP")
H
^SCR("W4HZCA","G",3,"CRD")
11,60,N,8,0
^SCR("W4HZCA","G",3,"HELP")

^SCR("W4HZCA","G",3,"LMAX")
8
^SCR("W4HZCA","G",3,"MUMPS1")

^SCR("W4HZCA","G",3,"MUMPS2")

^SCR("W4HZCA","G",3,"OUTPUT")

^SCR("W4HZCA","G",3,"SHEM")
jnqn 'qn
^SCR("W4HZCA","G",3,"TYP")
N
^SCR("W4HZCA","G",4,"CRD")
11,51,E,8,0
^SCR("W4HZCA","G",4,"HELP")

^SCR("W4HZCA","G",4,"LMAX")
8
^SCR("W4HZCA","G",4,"MUMPS1")

^SCR("W4HZCA","G",4,"MUMPS2")

^SCR("W4HZCA","G",4,"OUTPUT")

^SCR("W4HZCA","G",4,"SHEM")
dwqr 'qn
^SCR("W4HZCA","G",4,"TYP")
E
^SCR("W4HZCA","G",5,"CRD")
11,42,N,14,0
^SCR("W4HZCA","G",5,"HELP")

^SCR("W4HZCA","G",5,"LMAX")
14
^SCR("W4HZCA","G",5,"MUMPS1")

^SCR("W4HZCA","G",5,"MUMPS2")

^SCR("W4HZCA","G",5,"OUTPUT")

^SCR("W4HZCA","G",5,"SHEM")
    `"k 'qn   
^SCR("W4HZCA","G",5,"TYP")
N
^SCR("W4HZCA","G",6,"CRD")
11,27,E,6,0
^SCR("W4HZCA","G",6,"HELP")

^SCR("W4HZCA","G",6,"LMAX")
6
^SCR("W4HZCA","G",6,"MUMPS1")

^SCR("W4HZCA","G",6,"MUMPS2")

^SCR("W4HZCA","G",6,"SHEM")
dzknq`
^SCR("W4HZCA","G",6,"TYP")
E
^SCR("W4HZCA","G",7,"CRD")
11,20,H,6,0
^SCR("W4HZCA","G",7,"HELP")

^SCR("W4HZCA","G",7,"LMAX")
9
^SCR("W4HZCA","G",7,"MUMPS1")

^SCR("W4HZCA","G",7,"MUMPS2")

^SCR("W4HZCA","G",7,"OUTPUT")

^SCR("W4HZCA","G",7,"SHEM")
 `"k beq 
^SCR("W4HZCA","G",7,"TYP")
H
^SCR("W4HZCA","G",8,"CRD")
11,10,N,8,2
^SCR("W4HZCA","G",8,"HELP")

^SCR("W4HZCA","G",8,"LMAX")
8
^SCR("W4HZCA","G",8,"MUMPS1")

^SCR("W4HZCA","G",8,"MUMPS2")

^SCR("W4HZCA","G",8,"OUTPUT")

^SCR("W4HZCA","G",8,"SHEM")
  mekq  
^SCR("W4HZCA","G",8,"TYP")
N
^SCR("W4HZCA","G","DEL")

^SCR("W4HZCA","G","MAX")
99999
^SCR("W4HZCA","G","NAME","ASM")
6
^SCR("W4HZCA","G","NAME","CA")
5
^SCR("W4HZCA","G","NAME","DAT")
1
^SCR("W4HZCA","G","NAME","ISKA")
4
^SCR("W4HZCA","G","NAME","NUMBER")
3
^SCR("W4HZCA","G","NAME","SUGCA")
7
^SCR("W4HZCA","G","NAME","SUGM")
2
^SCR("W4HZCA","G","NAME","SUM")
8
^SCR("W4HZCA","G","NM",1)
DAT
^SCR("W4HZCA","G","NM",2)
SUGM
^SCR("W4HZCA","G","NM",3)
NUMBER
^SCR("W4HZCA","G","NM",4)
ISKA
^SCR("W4HZCA","G","NM",5)
CA
^SCR("W4HZCA","G","NM",6)
ASM
^SCR("W4HZCA","G","NM",7)
SUGCA
^SCR("W4HZCA","G","NM",8)
SUM
^SCR("W4HZCA","G","RB")
10,2,19,79
^SCR("W4HZCA","G","REF")
^TEMP($P,"CA"
^SCR("W4HZCA","G","RZD")
\
^SCR("W4HZCA","G","STEP")
1
^SCR("W4HZCA","G","STG")
 :  mekq  : `"k beq :dzknq`:    `"k 'qn   :dwqr 'qn:jnqn 'qn:jnqn beq: jix`z  :
^SCR("W4HZCA","G","VG")
12
^SCR("W4HZCA","NAME")

^SCR("W4HZCA","P",5,"CRD")
2,42,D,8,0
^SCR("W4HZCA","P",5,"HELP")

^SCR("W4HZCA","P",5,"LMAX")
9
^SCR("W4HZCA","P",5,"MUMPS1")
S:'$G(DAT1) DAT1=$$^%L1DC($$^W4DZ,1)
^SCR("W4HZCA","P",5,"MUMPS2")

^SCR("W4HZCA","P",5,"MUST")

^SCR("W4HZCA","P",5,"TYP")
D
^SCR("W4HZCA","P",10,"CRD")
2,19,D,8,0
^SCR("W4HZCA","P",10,"HELP")

^SCR("W4HZCA","P",10,"LMAX")
9
^SCR("W4HZCA","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("W4HZCA","P",10,"MUMPS2")

^SCR("W4HZCA","P",10,"MUST")

^SCR("W4HZCA","P",10,"TYP")
D
^SCR("W4HZCA","P",12,"CRD")
3,42,E,7,0
^SCR("W4HZCA","P",12,"HELP")

^SCR("W4HZCA","P",12,"LMAX")
9
^SCR("W4HZCA","P",12,"MUMPS1")

^SCR("W4HZCA","P",12,"MUMPS2")

^SCR("W4HZCA","P",12,"TYP")
E
^SCR("W4HZCA","P",14,"CRD")
3,19,E,7,0
^SCR("W4HZCA","P",14,"HELP")

^SCR("W4HZCA","P",14,"LMAX")
9
^SCR("W4HZCA","P",14,"MUMPS1")
S:'$G(ADSUM) ADSUM=MESUM
^SCR("W4HZCA","P",14,"MUMPS2")

^SCR("W4HZCA","P",14,"TYP")
E
^SCR("W4HZCA","P",20,"CRD")
4,14,N,1,0
^SCR("W4HZCA","P",20,"HELP")

^SCR("W4HZCA","P",20,"LMAX")
5
^SCR("W4HZCA","P",20,"MUMPS1")

^SCR("W4HZCA","P",20,"MUMPS2")

^SCR("W4HZCA","P",20,"TYP")
N
^SCR("W4HZCA","P",21,"CRD")
5,14,N,1,0
^SCR("W4HZCA","P",21,"HELP")

^SCR("W4HZCA","P",21,"LMAX")
5
^SCR("W4HZCA","P",21,"MUMPS1")

^SCR("W4HZCA","P",21,"MUMPS2")

^SCR("W4HZCA","P",21,"TYP")
N
^SCR("W4HZCA","P",22,"CRD")
6,3,E,1,0
^SCR("W4HZCA","P",22,"HELP")

^SCR("W4HZCA","P",22,"LMAX")
5
^SCR("W4HZCA","P",22,"MUMPS1")

^SCR("W4HZCA","P",22,"MUMPS2")

^SCR("W4HZCA","P",22,"TYP")
E
^SCR("W4HZCA","P",24,"CRD")
7,24,E,18,0
^SCR("W4HZCA","P",24,"HELP")

^SCR("W4HZCA","P",24,"LMAX")
18
^SCR("W4HZCA","P",24,"MUMPS1")

^SCR("W4HZCA","P",24,"MUMPS2")

^SCR("W4HZCA","P",24,"TYP")
E
^SCR("W4HZCA","P",25,"CRD")
19,53,N,9,2
^SCR("W4HZCA","P",25,"HELP")

^SCR("W4HZCA","P",25,"LMAX")
9
^SCR("W4HZCA","P",25,"MUMPS1")

^SCR("W4HZCA","P",25,"MUMPS2")

^SCR("W4HZCA","P",25,"OUTPUT")

^SCR("W4HZCA","P",25,"TYP")
N
^SCR("W4HZCA","P",26,"CRD")
8,51,B,1,0
^SCR("W4HZCA","P",26,"HELP")

^SCR("W4HZCA","P",26,"LMAX")
4
^SCR("W4HZCA","P",26,"MUMPS1")

^SCR("W4HZCA","P",26,"MUMPS2")

^SCR("W4HZCA","P",26,"TYP")
B
^SCR("W4HZCA","P",30,"CRD")
19,31,N,9,2
^SCR("W4HZCA","P",30,"HELP")

^SCR("W4HZCA","P",30,"LMAX")
9
^SCR("W4HZCA","P",30,"MUMPS1")

^SCR("W4HZCA","P",30,"MUMPS2")

^SCR("W4HZCA","P",30,"OUTPUT")

^SCR("W4HZCA","P",30,"TYP")
N
^SCR("W4HZCA","P",35,"CRD")
19,2,N,9,2
^SCR("W4HZCA","P",35,"HELP")

^SCR("W4HZCA","P",35,"LMAX")
9
^SCR("W4HZCA","P",35,"MUMPS1")

^SCR("W4HZCA","P",35,"MUMPS2")

^SCR("W4HZCA","P",35,"OUTPUT")

^SCR("W4HZCA","P",35,"TYP")
N
^SCR("W4HZCA","P",40,"CRD")
20,53,N,9,2
^SCR("W4HZCA","P",40,"HELP")

^SCR("W4HZCA","P",40,"LMAX")
9
^SCR("W4HZCA","P",40,"MUMPS1")

^SCR("W4HZCA","P",40,"MUMPS2")

^SCR("W4HZCA","P",40,"OUTPUT")

^SCR("W4HZCA","P",40,"TYP")
N
^SCR("W4HZCA","P",45,"CRD")
20,31,N,9,2
^SCR("W4HZCA","P",45,"HELP")

^SCR("W4HZCA","P",45,"LMAX")
9
^SCR("W4HZCA","P",45,"MUMPS1")

^SCR("W4HZCA","P",45,"MUMPS2")

^SCR("W4HZCA","P",45,"OUTPUT")

^SCR("W4HZCA","P",45,"TYP")
N
^SCR("W4HZCA","P",50,"CRD")
20,1,N,9,2
^SCR("W4HZCA","P",50,"HELP")

^SCR("W4HZCA","P",50,"LMAX")
10
^SCR("W4HZCA","P",50,"MUMPS1")

^SCR("W4HZCA","P",50,"MUMPS2")

^SCR("W4HZCA","P",50,"OUTPUT")

^SCR("W4HZCA","P",50,"TYP")
N
^SCR("W4HZCA","P",55,"CRD")
21,31,N,9,2
^SCR("W4HZCA","P",55,"HELP")

^SCR("W4HZCA","P",55,"LMAX")
10
^SCR("W4HZCA","P",55,"MUMPS1")

^SCR("W4HZCA","P",55,"MUMPS2")

^SCR("W4HZCA","P",55,"OUTPUT")

^SCR("W4HZCA","P",55,"TYP")
N
^SCR("W4HZCA","P",60,"CRD")
21,1,N,9,2
^SCR("W4HZCA","P",60,"HELP")

^SCR("W4HZCA","P",60,"LMAX")
10
^SCR("W4HZCA","P",60,"MUMPS1")

^SCR("W4HZCA","P",60,"MUMPS2")

^SCR("W4HZCA","P",60,"OUTPUT")

^SCR("W4HZCA","P",60,"TYP")
N
^SCR("W4HZCA","P","NAME","ADSUM")
14
^SCR("W4HZCA","P","NAME","DAT1")
5
^SCR("W4HZCA","P","NAME","DAT2")
10
^SCR("W4HZCA","P","NAME","MESUM")
12
^SCR("W4HZCA","P","NAME","NCA")
24
^SCR("W4HZCA","P","NAME","PRSUMDAT")
26
^SCR("W4HZCA","P","NAME","SAE")
40
^SCR("W4HZCA","P","NAME","SALP")
45
^SCR("W4HZCA","P","NAME","SCA")
50
^SCR("W4HZCA","P","NAME","SCAH")
55
^SCR("W4HZCA","P","NAME","SCAP")
60
^SCR("W4HZCA","P","NAME","SDIN")
35
^SCR("W4HZCA","P","NAME","SISR")
25
^SCR("W4HZCA","P","NAME","SUGASR")
21
^SCR("W4HZCA","P","NAME","SUGCA")
22
^SCR("W4HZCA","P","NAME","SUGM")
20
^SCR("W4HZCA","P","NAME","SVIZA")
30
^SCR("W4HZCA","P","NM",5)
DAT1
^SCR("W4HZCA","P","NM",10)
DAT2
^SCR("W4HZCA","P","NM",12)
MESUM
^SCR("W4HZCA","P","NM",14)
ADSUM
^SCR("W4HZCA","P","NM",20)
SUGM
^SCR("W4HZCA","P","NM",21)
SUGASR
^SCR("W4HZCA","P","NM",22)
SUGCA
^SCR("W4HZCA","P","NM",24)
NCA
^SCR("W4HZCA","P","NM",25)
SISR
^SCR("W4HZCA","P","NM",26)
PRSUMDAT
^SCR("W4HZCA","P","NM",30)
SVIZA
^SCR("W4HZCA","P","NM",35)
SDIN
^SCR("W4HZCA","P","NM",40)
SAE
^SCR("W4HZCA","P","NM",45)
SALP
^SCR("W4HZCA","P","NM",50)
SCA
^SCR("W4HZCA","P","NM",55)
SCAH
^SCR("W4HZCA","P","NM",60)
SCAP
^SCR("W4IBNPRM")
H
^SCR("W4IBNPRM",1)
                                                                               
^SCR("W4IBNPRM",2)
                                                  {10 } : zlrten IBON zkxrn m`d
^SCR("W4IBNPRM",3)
    {15                                               } : zyx cew              
^SCR("W4IBNPRM",4)
                                                        {20    } : dcrqn xtqn  
^SCR("W4IBNPRM",5)
    {30                                                        } : mivawl dvign
^SCR("W4IBNPRM",6)
      {25                                                         } : URL zaezk
^SCR("W4IBNPRM","AV",1)

^SCR("W4IBNPRM","AV",2)
:úìòôåîIBONúëøòîíàä
^SCR("W4IBNPRM","AV",3)
:úùøãå÷
^SCR("W4IBNPRM","AV",4)
:äãòñîøôñî
^SCR("W4IBNPRM","AV",5)
:íéöá÷ìäöéçî
^SCR("W4IBNPRM","AV",6)
:URLúáåúë
^SCR("W4IBNPRM","NAME")

^SCR("W4IBNPRM","P",10,"CRD")
2,50,B,1,0
^SCR("W4IBNPRM","P",10,"HELP")

^SCR("W4IBNPRM","P",10,"LMAX")
4
^SCR("W4IBNPRM","P",10,"MUMPS1")
S PRM=$$IBON^W4PRM
^SCR("W4IBNPRM","P",10,"MUMPS2")

^SCR("W4IBNPRM","P",10,"MUST")

^SCR("W4IBNPRM","P",10,"TYP")
B
^SCR("W4IBNPRM","P",15,"CRD")
3,4,E,50,0
^SCR("W4IBNPRM","P",15,"HELP")

^SCR("W4IBNPRM","P",15,"LMAX")
50
^SCR("W4IBNPRM","P",15,"MUMPS1")
S MAIN=$G(@$$^W4PRM@("IBON","MAIN"))
^SCR("W4IBNPRM","P",15,"MUMPS2")

^SCR("W4IBNPRM","P",15,"TYP")
E
^SCR("W4IBNPRM","P",20,"CRD")
4,56,E,7,0
^SCR("W4IBNPRM","P",20,"HELP")

^SCR("W4IBNPRM","P",20,"LMAX")
7
^SCR("W4IBNPRM","P",20,"MUMPS1")
S STORE=$G(@$$^W4PRM@("IBON","STORE"))
^SCR("W4IBNPRM","P",20,"MUMPS2")

^SCR("W4IBNPRM","P",20,"TYP")
E
^SCR("W4IBNPRM","P",25,"CRD")
6,6,E,59,0
^SCR("W4IBNPRM","P",25,"HELP")

^SCR("W4IBNPRM","P",25,"LMAX")
60
^SCR("W4IBNPRM","P",25,"MUMPS1")
S URL=$G(@$$^W4PRM@("IBON","URL"))
^SCR("W4IBNPRM","P",25,"MUMPS2")

^SCR("W4IBNPRM","P",25,"TYP")
E
^SCR("W4IBNPRM","P",30,"CRD")
5,4,E,59,0
^SCR("W4IBNPRM","P",30,"HELP")

^SCR("W4IBNPRM","P",30,"LMAX")
59
^SCR("W4IBNPRM","P",30,"MUMPS1")
S DIR=$G(@$$^W4PRM@("IBON","DIR"))
^SCR("W4IBNPRM","P",30,"MUMPS2")

^SCR("W4IBNPRM","P",30,"TYP")
E
^SCR("W4IBNPRM","P","NAME","DIR")
30
^SCR("W4IBNPRM","P","NAME","MAIN")
15
^SCR("W4IBNPRM","P","NAME","PRM")
10
^SCR("W4IBNPRM","P","NAME","STORE")
20
^SCR("W4IBNPRM","P","NAME","URL")
25
^SCR("W4IBNPRM","P","NM",10)
PRM
^SCR("W4IBNPRM","P","NM",15)
MAIN
^SCR("W4IBNPRM","P","NM",20)
STORE
^SCR("W4IBNPRM","P","NM",25)
URL
^SCR("W4IBNPRM","P","NM",30)
DIR
^SCR("W4IT4WEB")
H
^SCR("W4IT4WEB",1)
                                                                               
^SCR("W4IT4WEB",2)
                                                      {05  } xz`a zecrqn hq 'qn
^SCR("W4IT4WEB",3)
                                                          {10  } xz`a dcrqn 'qn
^SCR("W4IT4WEB",4)
                                         {20                       } xz`a zaezk
^SCR("W4IT4WEB",5)
                                                              {30       } dnqiq
^SCR("W4IT4WEB",6)
                                         {35 } : Z onfa iznehe` hixtz helwl m`d
^SCR("W4IT4WEB","AV",1)

^SCR("W4IT4WEB","AV",2)
øúàáúåãòñîèñ'ñî
^SCR("W4IT4WEB","AV",3)
øúàáäãòñî'ñî
^SCR("W4IT4WEB","AV",4)
øúàáúáåúë
^SCR("W4IT4WEB","AV",5)
äîñéñ
^SCR("W4IT4WEB","AV",6)
:Zïîæáéúîåèåàèéøôúèåì÷ìíàä
^SCR("W4IT4WEB","NAME")
xz`n hixtz zhilwl mixhnxt
^SCR("W4IT4WEB","P",5,"CRD")
2,54,N,5,0
^SCR("W4IT4WEB","P",5,"HELP")

^SCR("W4IT4WEB","P",5,"LMAX")
5
^SCR("W4IT4WEB","P",5,"MUMPS1")
S MSDR=$G(@$$^W4PRM@("IT4WEB","MSDR")) 
^SCR("W4IT4WEB","P",5,"MUMPS2")

^SCR("W4IT4WEB","P",5,"TYP")
N
^SCR("W4IT4WEB","P",10,"CRD")
3,58,N,5,0
^SCR("W4IT4WEB","P",10,"HELP")

^SCR("W4IT4WEB","P",10,"LMAX")
5
^SCR("W4IT4WEB","P",10,"MUMPS1")
S MSD=$G(@$$^W4PRM@("IT4WEB","MSD"))
^SCR("W4IT4WEB","P",10,"MUMPS2")

^SCR("W4IT4WEB","P",10,"MUST")

^SCR("W4IT4WEB","P",10,"TYP")
N
^SCR("W4IT4WEB","P",20,"CRD")
4,41,E,26,0
^SCR("W4IT4WEB","P",20,"HELP")

^SCR("W4IT4WEB","P",20,"LMAX")
26
^SCR("W4IT4WEB","P",20,"MUMPS1")
S SRVADR=$G(@$$^W4PRM@("IT4WEB","SRVADR"))
^SCR("W4IT4WEB","P",20,"MUMPS2")

^SCR("W4IT4WEB","P",20,"TYP")
E
^SCR("W4IT4WEB","P",30,"CRD")
5,62,E,10,0
^SCR("W4IT4WEB","P",30,"HELP")

^SCR("W4IT4WEB","P",30,"LMAX")
10
^SCR("W4IT4WEB","P",30,"MUMPS1")
S PSW=$G(@$$^W4PRM@("IT4WEB","PSW"))
^SCR("W4IT4WEB","P",30,"MUMPS2")

^SCR("W4IT4WEB","P",30,"TYP")
E
^SCR("W4IT4WEB","P",35,"CRD")
6,41,B,1,0
^SCR("W4IT4WEB","P",35,"HELP")

^SCR("W4IT4WEB","P",35,"LMAX")
4
^SCR("W4IT4WEB","P",35,"MUMPS1")
S Z=$G(@$$^W4PRM@("IT4WEB","Z"))
^SCR("W4IT4WEB","P",35,"MUMPS2")

^SCR("W4IT4WEB","P",35,"TYP")
B
^SCR("W4IT4WEB","P","NAME","MSD")
10
^SCR("W4IT4WEB","P","NAME","MSDR")
5
^SCR("W4IT4WEB","P","NAME","PSW")
30
^SCR("W4IT4WEB","P","NAME","SRVADR")
20
^SCR("W4IT4WEB","P","NAME","Z")
35
^SCR("W4IT4WEB","P","NM",5)
MSDR
^SCR("W4IT4WEB","P","NM",10)
MSD
^SCR("W4IT4WEB","P","NM",20)
SRVADR
^SCR("W4IT4WEB","P","NM",30)
PSW
^SCR("W4IT4WEB","P","NM",35)
Z
^SCR("W4KSHCSH")
H
^SCR("W4KSHCSH",1)
                                                                               
^SCR("W4KSHCSH",2)
                                               {05 } : dlirt "y`wy`w" zkxrn m`d
^SCR("W4KSHCSH",3)
                                      {10                          } : ynzyn my
^SCR("W4KSHCSH",4)
                                      {15                             } : dnqiq
^SCR("W4KSHCSH",5)
                                      {20                         } : wqr ly ID
^SCR("W4KSHCSH",6)
        {25                                                      } : xken ly ID
^SCR("W4KSHCSH",7)
   {30                                                                  } : URL
^SCR("W4KSHCSH",8)
                                                            {35       } : dqxib
^SCR("W4KSHCSH",9)
                                                                               
^SCR("W4KSHCSH","AV",1)

^SCR("W4KSHCSH","AV",2)
:äìéòô"ùà÷ùà÷"úëøòîíàä
^SCR("W4KSHCSH","AV",3)
:ùîúùîíù
^SCR("W4KSHCSH","AV",4)
:äîñéñ
^SCR("W4KSHCSH","AV",5)
:÷ñòìùID
^SCR("W4KSHCSH","AV",6)
:øëåîìùID
^SCR("W4KSHCSH","AV",7)
:URL
^SCR("W4KSHCSH","AV",8)
:äñøéâ
^SCR("W4KSHCSH","AV",9)

^SCR("W4KSHCSH","NAME")
"y`wy`w" l mixhnxt
^SCR("W4KSHCSH","P",5,"CRD")
2,47,B,1,0
^SCR("W4KSHCSH","P",5,"HELP")

^SCR("W4KSHCSH","P",5,"LMAX")
4
^SCR("W4KSHCSH","P",5,"MUMPS1")

^SCR("W4KSHCSH","P",5,"MUMPS2")

^SCR("W4KSHCSH","P",5,"TYP")
B
^SCR("W4KSHCSH","P",10,"CRD")
3,38,E,29,0
^SCR("W4KSHCSH","P",10,"HELP")

^SCR("W4KSHCSH","P",10,"LMAX")
29
^SCR("W4KSHCSH","P",10,"MUMPS1")

^SCR("W4KSHCSH","P",10,"MUMPS2")

^SCR("W4KSHCSH","P",10,"TYP")
E
^SCR("W4KSHCSH","P",15,"CRD")
4,38,E,32,0
^SCR("W4KSHCSH","P",15,"HELP")

^SCR("W4KSHCSH","P",15,"LMAX")
32
^SCR("W4KSHCSH","P",15,"MUMPS1")

^SCR("W4KSHCSH","P",15,"MUMPS2")

^SCR("W4KSHCSH","P",15,"TYP")
E
^SCR("W4KSHCSH","P",20,"CRD")
5,38,E,28,0
^SCR("W4KSHCSH","P",20,"HELP")

^SCR("W4KSHCSH","P",20,"LMAX")
28
^SCR("W4KSHCSH","P",20,"MUMPS1")

^SCR("W4KSHCSH","P",20,"MUMPS2")

^SCR("W4KSHCSH","P",20,"TYP")
E
^SCR("W4KSHCSH","P",25,"CRD")
6,8,E,57,0
^SCR("W4KSHCSH","P",25,"HELP")

^SCR("W4KSHCSH","P",25,"LMAX")
57
^SCR("W4KSHCSH","P",25,"MUMPS1")

^SCR("W4KSHCSH","P",25,"MUMPS2")

^SCR("W4KSHCSH","P",25,"TYP")
E
^SCR("W4KSHCSH","P",30,"CRD")
7,3,E,69,0
^SCR("W4KSHCSH","P",30,"HELP")

^SCR("W4KSHCSH","P",30,"LMAX")
69
^SCR("W4KSHCSH","P",30,"MUMPS1")

^SCR("W4KSHCSH","P",30,"MUMPS2")

^SCR("W4KSHCSH","P",30,"TYP")
E
^SCR("W4KSHCSH","P",35,"CRD")
8,60,E,10,0
^SCR("W4KSHCSH","P",35,"HELP")

^SCR("W4KSHCSH","P",35,"LMAX")
10
^SCR("W4KSHCSH","P",35,"MUMPS1")

^SCR("W4KSHCSH","P",35,"MUMPS2")

^SCR("W4KSHCSH","P",35,"TYP")
E
^SCR("W4KSHCSH","P","NAME","BSNID")
20
^SCR("W4KSHCSH","P","NAME","KSHCSH")
5
^SCR("W4KSHCSH","P","NAME","PSW")
15
^SCR("W4KSHCSH","P","NAME","URL")
30
^SCR("W4KSHCSH","P","NAME","USRNAME")
10
^SCR("W4KSHCSH","P","NAME","VER")
35
^SCR("W4KSHCSH","P","NAME","VNDID")
25
^SCR("W4KSHCSH","P","NM",5)
KSHCSH
^SCR("W4KSHCSH","P","NM",10)
USRNAME
^SCR("W4KSHCSH","P","NM",15)
PSW
^SCR("W4KSHCSH","P","NM",20)
BSNID
^SCR("W4KSHCSH","P","NM",25)
VNDID
^SCR("W4KSHCSH","P","NM",30)
URL
^SCR("W4KSHCSH","P","NM",35)
VER
^SCR("W4LEVIN")
H
^SCR("W4LEVIN",1)
                                                                               
^SCR("W4LEVIN",2)
                                                                               
^SCR("W4LEVIN",3)
                                                                             1]
^SCR("W4LEVIN",4)
                                  {05   } :                  ipci oewizl dnqiq 
^SCR("W4LEVIN",5)
                          {07 } : ldpn ly divte`a wx zegkep oeryl qpkdl zexyt` 
^SCR("W4LEVIN",6)
                  {08  } : zepnfd ilawn ly dniyx zbvda micaer zegkep wecal m`d 
^SCR("W4LEVIN",7)
    {10 } :( zery 15 n xzei `l -2 , ok -1 ,`l -0 ) d`ivi ixg` dqipky wecal m`d 
^SCR("W4LEVIN",8)
                                    {15 } :  dcear ini 'qn deey zeqipk 'qn m`d 
^SCR("W4LEVIN",9)
                                    {20 } :                     dwqtd zewc 'qn 
^SCR("W4LEVIN",10)
                               {25 }: dwqtd onf zcxedl zilnipin dcear zery 'qn 
^SCR("W4LEVIN",11)
                                   {27 } :     d`ivie dqipka miyelz qitcdl m`d 
^SCR("W4LEVIN",12)
                                   {30 } :   d`ivi yelza dcear zery qitcdl m`d 
^SCR("W4LEVIN",13)
 [1                                                                            
^SCR("W4LEVIN",14)
                                                                               
^SCR("W4LEVIN","AV",1)

^SCR("W4LEVIN","AV",2)

^SCR("W4LEVIN","AV",3)

^SCR("W4LEVIN","AV",4)
:éðãéïå÷éúìäîñéñ
^SCR("W4LEVIN","AV",5)
:ìäðîìùäéöôåàá÷øúåçëåðïåòùìñðëäìúåøùôà
^SCR("W4LEVIN","AV",6)
:úåðîæäéìá÷îìùäîéùøúâöäáíéãáåòúåçëåð÷åãáìíàä
^SCR("W4LEVIN","AV",7)
:(úåòù15îøúåéàì-2,ïë-1,àì-0)äàéöééøçàäñéðëù÷åãáìíàä
^SCR("W4LEVIN","AV",8)
:äãåáòéîé'ñîäååùúåñéðë'ñîíàä
^SCR("W4LEVIN","AV",9)
:ä÷ñôäúå÷ã'ñî
^SCR("W4LEVIN","AV",10)
:ä÷ñôäïîæúãøåäìúéìîéðéîäãåáòúåòù'ñî
^SCR("W4LEVIN","AV",11)
:äàéöéåäñéðëáíéùåìúñéôãäìíàä
^SCR("W4LEVIN","AV",12)
:äàéöéùåìúáäãåáòúåòùñéôãäìíàä
^SCR("W4LEVIN","AV",13)

^SCR("W4LEVIN","AV",14)

^SCR("W4LEVIN","NAME")
zegkep oeryl zexcbd
^SCR("W4LEVIN","P",5,"CRD")
4,34,N,6,0
^SCR("W4LEVIN","P",5,"HELP")

^SCR("W4LEVIN","P",5,"LMAX")
6
^SCR("W4LEVIN","P",5,"MUMPS1")
S PSWRPR=$G(@$$^W4PRM@("LEV","PSW"))
^SCR("W4LEVIN","P",5,"MUMPS2")
I PSWRPR="" S %SC("ER")=1
^SCR("W4LEVIN","P",5,"TYP")
N
^SCR("W4LEVIN","P",7,"CRD")
5,26,B,1,0
^SCR("W4LEVIN","P",7,"HELP")

^SCR("W4LEVIN","P",7,"LMAX")
4
^SCR("W4LEVIN","P",7,"MUMPS1")
S SHAONMGR=$G(@$$^W4PRM@("SHAONMGR"))
^SCR("W4LEVIN","P",7,"MUMPS2")

^SCR("W4LEVIN","P",7,"TYP")
B
^SCR("W4LEVIN","P",8,"CRD")
6,18,B,1,0
^SCR("W4LEVIN","P",8,"HELP")

^SCR("W4LEVIN","P",8,"LMAX")
5
^SCR("W4LEVIN","P",8,"MUMPS1")
S BDNOCH=$G(@$$^W4PRM@("BDNOCH"))
^SCR("W4LEVIN","P",8,"MUMPS2")

^SCR("W4LEVIN","P",8,"TYP")
B
^SCR("W4LEVIN","P",10,"CRD")
7,4,N,1,0
^SCR("W4LEVIN","P",10,"HELP")

^SCR("W4LEVIN","P",10,"LMAX")
4
^SCR("W4LEVIN","P",10,"MUMPS1")
S TSTIO=$G(@$$^W4PRM@("LEV","IOBDK"))
^SCR("W4LEVIN","P",10,"MUMPS2")

^SCR("W4LEVIN","P",10,"TYP")
N
^SCR("W4LEVIN","P",15,"CRD")
8,36,B,1,0
^SCR("W4LEVIN","P",15,"HELP")

^SCR("W4LEVIN","P",15,"LMAX")
4
^SCR("W4LEVIN","P",15,"MUMPS1")
S IOEQD=$G(@$$^W4PRM@("LEV","CNISA"))
^SCR("W4LEVIN","P",15,"MUMPS2")

^SCR("W4LEVIN","P",15,"TYP")
B
^SCR("W4LEVIN","P",20,"CRD")
9,36,N,2,0
^SCR("W4LEVIN","P",20,"HELP")

^SCR("W4LEVIN","P",20,"LMAX")
4
^SCR("W4LEVIN","P",20,"MUMPS1")
S REST=$G(@$$^W4PRM@("LEV","REST"))
^SCR("W4LEVIN","P",20,"MUMPS2")

^SCR("W4LEVIN","P",20,"TYP")
N
^SCR("W4LEVIN","P",25,"CRD")
10,31,N,2,0
^SCR("W4LEVIN","P",25,"HELP")

^SCR("W4LEVIN","P",25,"LMAX")
4
^SCR("W4LEVIN","P",25,"MUMPS1")
S HRMIN=$G(@$$^W4PRM@("LEV","HRMIN"))
^SCR("W4LEVIN","P",25,"MUMPS2")

^SCR("W4LEVIN","P",25,"TYP")
N
^SCR("W4LEVIN","P",27,"CRD")
11,35,B,1,0
^SCR("W4LEVIN","P",27,"HELP")

^SCR("W4LEVIN","P",27,"LMAX")
4
^SCR("W4LEVIN","P",27,"MUMPS1")
S NOPC='$G(@$$^W4PRM@("NOPC"))
^SCR("W4LEVIN","P",27,"MUMPS2")

^SCR("W4LEVIN","P",27,"TYP")
B
^SCR("W4LEVIN","P",30,"CRD")
12,35,B,1,0
^SCR("W4LEVIN","P",30,"HELP")

^SCR("W4LEVIN","P",30,"LMAX")
4
^SCR("W4LEVIN","P",30,"MUMPS1")
S PCWORK=$$PCWORK^W4PRM
^SCR("W4LEVIN","P",30,"MUMPS2")

^SCR("W4LEVIN","P",30,"TYP")
B
^SCR("W4LEVIN","P","NAME","BDNOCH")
8
^SCR("W4LEVIN","P","NAME","HRMIN")
25
^SCR("W4LEVIN","P","NAME","IOEQD")
15
^SCR("W4LEVIN","P","NAME","NOPC")
27
^SCR("W4LEVIN","P","NAME","PCWORK")
30
^SCR("W4LEVIN","P","NAME","PSWRPR")
5
^SCR("W4LEVIN","P","NAME","REST")
20
^SCR("W4LEVIN","P","NAME","SHAONMGR")
7
^SCR("W4LEVIN","P","NAME","TSTIO")
10
^SCR("W4LEVIN","P","NM",5)
PSWRPR
^SCR("W4LEVIN","P","NM",7)
SHAONMGR
^SCR("W4LEVIN","P","NM",8)
BDNOCH
^SCR("W4LEVIN","P","NM",10)
TSTIO
^SCR("W4LEVIN","P","NM",15)
IOEQD
^SCR("W4LEVIN","P","NM",20)
REST
^SCR("W4LEVIN","P","NM",25)
HRMIN
^SCR("W4LEVIN","P","NM",27)
NOPC
^SCR("W4LEVIN","P","NM",30)
PCWORK
^SCR("W4LEVIN","P","RB",1)
4,2,14,79
^SCR("W4LEVKVZ")
H
^SCR("W4LEVKVZ",1)
                                                                               
^SCR("W4LEVKVZ",2)
           {                          03}  {01  }: micaer zveaw 'qn            
^SCR("W4LEVKVZ",3)
                                                                               
^SCR("W4LEVKVZ",4)
                                                                     1]        
^SCR("W4LEVKVZ",5)
                           {07  } -n 'e mei {05  }-n  1 zxnyn zligz            
^SCR("W4LEVKVZ",6)
                           {17  } -n 'e mei {15  }-n  2 zxnyn zligz            
^SCR("W4LEVKVZ",7)
                                            {25  }-n  3 zxnyn zligz            
^SCR("W4LEVKVZ",8)
                                                                               
^SCR("W4LEVKVZ",9)
                   {40  } dry '` mei cr {35  } dry 'e mein zay zery            
^SCR("W4LEVKVZ",10)
                   {42  } dry 'y mei cr e`                                     
^SCR("W4LEVKVZ",11)
                                                                               
^SCR("W4LEVKVZ",12)
                                         {45    } :    cr qiqa zery            
^SCR("W4LEVKVZ",13)
                                         {50    } :cr 1 zetqep zery            
^SCR("W4LEVKVZ",14)
                                         {55    } :cr 2 zetqep zery            
^SCR("W4LEVKVZ",15)
                                                                               
^SCR("W4LEVKVZ",16)
                                     {60    } : cr qiqa zery 'e mei            
^SCR("W4LEVKVZ",17)
                                     {65    } :    cr 1 zetqep zery            
^SCR("W4LEVKVZ",18)
                                     {70    } :    cr 2 zetqep zery            
^SCR("W4LEVKVZ",19)
                                                                               
^SCR("W4LEVKVZ",20)
                         {72 } : mitih aeyiga dveaw icaer lelkl m`d            
^SCR("W4LEVKVZ",21)
                                                                               
^SCR("W4LEVKVZ",22)
               [1                                                              
^SCR("W4LEVKVZ","A",1)

^SCR("W4LEVKVZ","A",2)
:�‰ƒ�…’š–…�—'‘Ž
^SCR("W4LEVKVZ","A",3)

^SCR("W4LEVKVZ","A",4)

^SCR("W4LEVKVZ","A",5)
-Ž'…�…‰-Ž1š˜Ž™ŽšŒ‰‡š
^SCR("W4LEVKVZ","A",6)
-Ž'…�…‰-Ž2š˜Ž™ŽšŒ‰‡š
^SCR("W4LEVKVZ","A",7)
-Ž3š˜Ž™ŽšŒ‰‡š
^SCR("W4LEVKVZ","A",8)

^SCR("W4LEVKVZ","A",9)
„’™'€�…‰ƒ’„’™'…�…‰Žš�™š…’™
^SCR("W4LEVKVZ","A",10)
„’™'™�…‰ƒ’…€
^SCR("W4LEVKVZ","A",11)

^SCR("W4LEVKVZ","A",12)
:ƒ’‘‰‘�š…’™
^SCR("W4LEVKVZ","A",13)
:ƒ’1š…”‘…�š…’™
^SCR("W4LEVKVZ","A",14)
:ƒ’2š…”‘…�š…’™
^SCR("W4LEVKVZ","A",15)

^SCR("W4LEVKVZ","A",16)
:ƒ’‘‰‘�š…’™'…�…‰
^SCR("W4LEVKVZ","A",17)
:ƒ’1š…”‘…�š…’™
^SCR("W4LEVKVZ","A",18)
:ƒ’2š…”‘…�š…’™
^SCR("W4LEVKVZ","A",19)

^SCR("W4LEVKVZ","A",20)
:�‰”‰ˆ�…™‰‡�„–…�—‰ƒ�…’Œ…Œ‹Œ�€„
^SCR("W4LEVKVZ","A",21)

^SCR("W4LEVKVZ","A",22)

^SCR("W4LEVKVZ","AV",1)

^SCR("W4LEVKVZ","AV",2)
:ohscug,mucewxn
^SCR("W4LEVKVZ","AV",3)

^SCR("W4LEVKVZ","AV",4)

^SCR("W4LEVKVZ","AV",5)
-nwuouh-n1,rnan,khj,
^SCR("W4LEVKVZ","AV",6)
-nwuouh-n2,rnan,khj,
^SCR("W4LEVKVZ","AV",7)
-n3,rnan,khj,
^SCR("W4LEVKVZ","AV",8)

^SCR("W4LEVKVZ","AV",9)
vgawtouhsgvgawuouhn,ca,uga
^SCR("W4LEVKVZ","AV",10)
vgawaouhsgut
^SCR("W4LEVKVZ","AV",11)

^SCR("W4LEVKVZ","AV",12)
:sgxhxc,uga
^SCR("W4LEVKVZ","AV",13)
:sg1,upxub,uga
^SCR("W4LEVKVZ","AV",14)
:sg2,upxub,uga
^SCR("W4LEVKVZ","AV",15)

^SCR("W4LEVKVZ","AV",16)
:sgxhxc,ugawuouh
^SCR("W4LEVKVZ","AV",17)
:sg1,upxub,uga
^SCR("W4LEVKVZ","AV",18)
:sg2,upxub,uga
^SCR("W4LEVKVZ","AV",19)

^SCR("W4LEVKVZ","AV",20)
:ohphycuahjcvmucehscugkukfkotv
^SCR("W4LEVKVZ","AV",21)

^SCR("W4LEVKVZ","AV",22)

^SCR("W4LEVKVZ","NAME")

^SCR("W4LEVKVZ","P",1,"CRD")
2,43,E,4,0
^SCR("W4LEVKVZ","P",1,"FNC")

^SCR("W4LEVKVZ","P",1,"GLOB")
LEVKVZ
^SCR("W4LEVKVZ","P",1,"HELP")

^SCR("W4LEVKVZ","P",1,"LMAX")
5
^SCR("W4LEVKVZ","P",1,"MUMPS1")

^SCR("W4LEVKVZ","P",1,"MUMPS2")

^SCR("W4LEVKVZ","P",1,"MUST")

^SCR("W4LEVKVZ","P",1,"NLN")
20
^SCR("W4LEVKVZ","P",1,"RZD")
\
^SCR("W4LEVKVZ","P",1,"TOPB")
8
^SCR("W4LEVKVZ","P",1,"TYP")
E
^SCR("W4LEVKVZ","P",1,"VRB")
KVZ1
^SCR("W4LEVKVZ","P",3,"CRD")
2,41,H,29
^SCR("W4LEVKVZ","P",3,"HELP")

^SCR("W4LEVKVZ","P",3,"LMAX")
29
^SCR("W4LEVKVZ","P",3,"MUMPS1")

^SCR("W4LEVKVZ","P",3,"MUMPS2")

^SCR("W4LEVKVZ","P",3,"MUST")

^SCR("W4LEVKVZ","P",3,"TYP")
H
^SCR("W4LEVKVZ","P",5,"CRD")
5,44,T,5,0
^SCR("W4LEVKVZ","P",5,"HELP")

^SCR("W4LEVKVZ","P",5,"LMAX")
5
^SCR("W4LEVKVZ","P",5,"MUMPS1")

^SCR("W4LEVKVZ","P",5,"MUMPS2")

^SCR("W4LEVKVZ","P",5,"TYP")
T
^SCR("W4LEVKVZ","P",7,"CRD")
5,27,T,5,0
^SCR("W4LEVKVZ","P",7,"HELP")

^SCR("W4LEVKVZ","P",7,"LMAX")
5
^SCR("W4LEVKVZ","P",7,"MUMPS1")

^SCR("W4LEVKVZ","P",7,"MUMPS2")

^SCR("W4LEVKVZ","P",7,"TYP")
T
^SCR("W4LEVKVZ","P",15,"CRD")
6,44,T,5,0
^SCR("W4LEVKVZ","P",15,"HELP")

^SCR("W4LEVKVZ","P",15,"LMAX")
5
^SCR("W4LEVKVZ","P",15,"MUMPS1")

^SCR("W4LEVKVZ","P",15,"MUMPS2")

^SCR("W4LEVKVZ","P",15,"TYP")
T
^SCR("W4LEVKVZ","P",17,"CRD")
6,27,T,5,0
^SCR("W4LEVKVZ","P",17,"HELP")

^SCR("W4LEVKVZ","P",17,"LMAX")
5
^SCR("W4LEVKVZ","P",17,"MUMPS1")

^SCR("W4LEVKVZ","P",17,"MUMPS2")

^SCR("W4LEVKVZ","P",17,"TYP")
T
^SCR("W4LEVKVZ","P",25,"CRD")
7,44,T,5,0
^SCR("W4LEVKVZ","P",25,"HELP")

^SCR("W4LEVKVZ","P",25,"LMAX")
5
^SCR("W4LEVKVZ","P",25,"MUMPS1")

^SCR("W4LEVKVZ","P",25,"MUMPS2")

^SCR("W4LEVKVZ","P",25,"TYP")
T
^SCR("W4LEVKVZ","P",35,"CRD")
9,40,T,5,0
^SCR("W4LEVKVZ","P",35,"HELP")

^SCR("W4LEVKVZ","P",35,"LMAX")
5
^SCR("W4LEVKVZ","P",35,"MUMPS1")

^SCR("W4LEVKVZ","P",35,"MUMPS2")
I SHB1="00:00"!(SHB1>23) S %SC("ER")=1
^SCR("W4LEVKVZ","P",35,"TYP")
T
^SCR("W4LEVKVZ","P",40,"CRD")
9,19,T,5,0
^SCR("W4LEVKVZ","P",40,"HELP")

^SCR("W4LEVKVZ","P",40,"LMAX")
5
^SCR("W4LEVKVZ","P",40,"MUMPS1")

^SCR("W4LEVKVZ","P",40,"MUMPS2")
D SHB2^W4LEVKVZ
^SCR("W4LEVKVZ","P",40,"TYP")
T
^SCR("W4LEVKVZ","P",42,"CRD")
10,19,T,5,0
^SCR("W4LEVKVZ","P",42,"HELP")

^SCR("W4LEVKVZ","P",42,"LMAX")
5
^SCR("W4LEVKVZ","P",42,"MUMPS1")

^SCR("W4LEVKVZ","P",42,"MUMPS2")
D SHB3^W4LEVKVZ
^SCR("W4LEVKVZ","P",42,"TYP")
T
^SCR("W4LEVKVZ","P",45,"CRD")
12,41,N,7,0
^SCR("W4LEVKVZ","P",45,"HELP")

^SCR("W4LEVKVZ","P",45,"LMAX")
7
^SCR("W4LEVKVZ","P",45,"MUMPS1")

^SCR("W4LEVKVZ","P",45,"MUMPS2")

^SCR("W4LEVKVZ","P",45,"TYP")
N
^SCR("W4LEVKVZ","P",50,"CRD")
13,41,N,7,0
^SCR("W4LEVKVZ","P",50,"HELP")

^SCR("W4LEVKVZ","P",50,"LMAX")
7
^SCR("W4LEVKVZ","P",50,"MUMPS1")

^SCR("W4LEVKVZ","P",50,"MUMPS2")

^SCR("W4LEVKVZ","P",50,"TYP")
N
^SCR("W4LEVKVZ","P",55,"CRD")
14,41,N,7,0
^SCR("W4LEVKVZ","P",55,"HELP")

^SCR("W4LEVKVZ","P",55,"LMAX")
7
^SCR("W4LEVKVZ","P",55,"MUMPS1")

^SCR("W4LEVKVZ","P",55,"MUMPS2")

^SCR("W4LEVKVZ","P",55,"TYP")
N
^SCR("W4LEVKVZ","P",60,"CRD")
16,37,N,7,0
^SCR("W4LEVKVZ","P",60,"HELP")

^SCR("W4LEVKVZ","P",60,"LMAX")
7
^SCR("W4LEVKVZ","P",60,"MUMPS1")

^SCR("W4LEVKVZ","P",60,"MUMPS2")

^SCR("W4LEVKVZ","P",60,"TYP")
N
^SCR("W4LEVKVZ","P",65,"CRD")
17,37,N,7,0
^SCR("W4LEVKVZ","P",65,"HELP")

^SCR("W4LEVKVZ","P",65,"LMAX")
7
^SCR("W4LEVKVZ","P",65,"MUMPS1")

^SCR("W4LEVKVZ","P",65,"MUMPS2")

^SCR("W4LEVKVZ","P",65,"TYP")
N
^SCR("W4LEVKVZ","P",70,"CRD")
18,37,N,7,0
^SCR("W4LEVKVZ","P",70,"HELP")

^SCR("W4LEVKVZ","P",70,"LMAX")
7
^SCR("W4LEVKVZ","P",70,"MUMPS1")

^SCR("W4LEVKVZ","P",70,"MUMPS2")

^SCR("W4LEVKVZ","P",70,"TYP")
N
^SCR("W4LEVKVZ","P",72,"CRD")
20,25,B,1,0
^SCR("W4LEVKVZ","P",72,"HELP")

^SCR("W4LEVKVZ","P",72,"LMAX")
4
^SCR("W4LEVKVZ","P",72,"MUMPS1")

^SCR("W4LEVKVZ","P",72,"MUMPS2")

^SCR("W4LEVKVZ","P",72,"TYP")
B
^SCR("W4LEVKVZ","P","NAME","JAMIM","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",14)
^SCR("W4LEVKVZ","P","NAME","JAMIM","REF1")
$P(^LEVKVZ(KVZ,1),"\",14)
^SCR("W4LEVKVZ","P","NAME","KVZ")
1
^SCR("W4LEVKVZ","P","NAME","KVZ","KEY")

^SCR("W4LEVKVZ","P","NAME","KVZ","KEY",1)
KVZ/\KVZ1
^SCR("W4LEVKVZ","P","NAME","KVZ","KEY",2)
KVZ/\KVZ1
^SCR("W4LEVKVZ","P","NAME","KVZ","KEY",3)
KVZ/\KVZ1
^SCR("W4LEVKVZ","P","NAME","KVZ","KEY",4)
KVZ/\SHAAME1,SHAAME2,SHAAME3,SHAAMV1,SHAAMV2,SHAAMV3,SHB1,SHB2,SHAA0,SHAA1,TSF1,SHAA2,TSF2,JAMIM,SHAOT,SHB3,SHAAV0,SHAAV1,SHAAV2,TVAV,TIP
^SCR("W4LEVKVZ","P","NAME","KVZ1")
3
^SCR("W4LEVKVZ","P","NAME","KVZ1","REF")
$P($G(^LEVKVZ(KVZ)),"\",1)
^SCR("W4LEVKVZ","P","NAME","KVZ1","REF1")
$P(^LEVKVZ(KVZ),"\",1)
^SCR("W4LEVKVZ","P","NAME","SHAA0")
45
^SCR("W4LEVKVZ","P","NAME","SHAA0","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",9)
^SCR("W4LEVKVZ","P","NAME","SHAA0","REF1")
$P(^LEVKVZ(KVZ,1),"\",9)
^SCR("W4LEVKVZ","P","NAME","SHAA1")
50
^SCR("W4LEVKVZ","P","NAME","SHAA1","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",10)
^SCR("W4LEVKVZ","P","NAME","SHAA1","REF1")
$P(^LEVKVZ(KVZ,1),"\",10)
^SCR("W4LEVKVZ","P","NAME","SHAA2")
55
^SCR("W4LEVKVZ","P","NAME","SHAA2","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",12)
^SCR("W4LEVKVZ","P","NAME","SHAA2","REF1")
$P(^LEVKVZ(KVZ,1),"\",12)
^SCR("W4LEVKVZ","P","NAME","SHAAME1")
5
^SCR("W4LEVKVZ","P","NAME","SHAAME1","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",1)
^SCR("W4LEVKVZ","P","NAME","SHAAME1","REF1")
$P(^LEVKVZ(KVZ,1),"\",1)
^SCR("W4LEVKVZ","P","NAME","SHAAME2")
15
^SCR("W4LEVKVZ","P","NAME","SHAAME2","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",2)
^SCR("W4LEVKVZ","P","NAME","SHAAME2","REF1")
$P(^LEVKVZ(KVZ,1),"\",2)
^SCR("W4LEVKVZ","P","NAME","SHAAME3")
25
^SCR("W4LEVKVZ","P","NAME","SHAAME3","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",3)
^SCR("W4LEVKVZ","P","NAME","SHAAME3","REF1")
$P(^LEVKVZ(KVZ,1),"\",3)
^SCR("W4LEVKVZ","P","NAME","SHAAMV1")
7
^SCR("W4LEVKVZ","P","NAME","SHAAMV1","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",4)
^SCR("W4LEVKVZ","P","NAME","SHAAMV1","REF1")
$P(^LEVKVZ(KVZ,1),"\",4)
^SCR("W4LEVKVZ","P","NAME","SHAAMV2")
17
^SCR("W4LEVKVZ","P","NAME","SHAAMV2","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",5)
^SCR("W4LEVKVZ","P","NAME","SHAAMV2","REF1")
$P(^LEVKVZ(KVZ,1),"\",5)
^SCR("W4LEVKVZ","P","NAME","SHAAMV3","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",6)
^SCR("W4LEVKVZ","P","NAME","SHAAMV3","REF1")
$P(^LEVKVZ(KVZ,1),"\",6)
^SCR("W4LEVKVZ","P","NAME","SHAAV0")
60
^SCR("W4LEVKVZ","P","NAME","SHAAV0","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",17)
^SCR("W4LEVKVZ","P","NAME","SHAAV0","REF1")
$P(^LEVKVZ(KVZ,1),"\",17)
^SCR("W4LEVKVZ","P","NAME","SHAAV1")
65
^SCR("W4LEVKVZ","P","NAME","SHAAV1","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",18)
^SCR("W4LEVKVZ","P","NAME","SHAAV1","REF1")
$P(^LEVKVZ(KVZ,1),"\",18)
^SCR("W4LEVKVZ","P","NAME","SHAAV2")
70
^SCR("W4LEVKVZ","P","NAME","SHAAV2","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",19)
^SCR("W4LEVKVZ","P","NAME","SHAAV2","REF1")
$P(^LEVKVZ(KVZ,1),"\",19)
^SCR("W4LEVKVZ","P","NAME","SHAOT","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",15)
^SCR("W4LEVKVZ","P","NAME","SHAOT","REF1")
$P(^LEVKVZ(KVZ,1),"\",15)
^SCR("W4LEVKVZ","P","NAME","SHB1")
35
^SCR("W4LEVKVZ","P","NAME","SHB1","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",7)
^SCR("W4LEVKVZ","P","NAME","SHB1","REF1")
$P(^LEVKVZ(KVZ,1),"\",7)
^SCR("W4LEVKVZ","P","NAME","SHB2")
40
^SCR("W4LEVKVZ","P","NAME","SHB2","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",8)
^SCR("W4LEVKVZ","P","NAME","SHB2","REF1")
$P(^LEVKVZ(KVZ,1),"\",8)
^SCR("W4LEVKVZ","P","NAME","SHB3")
42
^SCR("W4LEVKVZ","P","NAME","SHB3","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",16)
^SCR("W4LEVKVZ","P","NAME","SHB3","REF1")
$P(^LEVKVZ(KVZ,1),"\",16)
^SCR("W4LEVKVZ","P","NAME","TIP")
72
^SCR("W4LEVKVZ","P","NAME","TIP","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",21)
^SCR("W4LEVKVZ","P","NAME","TIP","REF1")
$P(^LEVKVZ(KVZ,1),"\",21)
^SCR("W4LEVKVZ","P","NAME","TSF1","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",11)
^SCR("W4LEVKVZ","P","NAME","TSF1","REF1")
$P(^LEVKVZ(KVZ,1),"\",11)
^SCR("W4LEVKVZ","P","NAME","TSF2","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",13)
^SCR("W4LEVKVZ","P","NAME","TSF2","REF1")
$P(^LEVKVZ(KVZ,1),"\",13)
^SCR("W4LEVKVZ","P","NAME","TVAV","REF")
$P($G(^LEVKVZ(KVZ,1)),"\",20)
^SCR("W4LEVKVZ","P","NAME","TVAV","REF1")
$P(^LEVKVZ(KVZ,1),"\",20)
^SCR("W4LEVKVZ","P","NM",1)
KVZ
^SCR("W4LEVKVZ","P","NM",3)
KVZ1
^SCR("W4LEVKVZ","P","NM",5)
SHAAME1
^SCR("W4LEVKVZ","P","NM",7)
SHAAMV1
^SCR("W4LEVKVZ","P","NM",15)
SHAAME2
^SCR("W4LEVKVZ","P","NM",17)
SHAAMV2
^SCR("W4LEVKVZ","P","NM",25)
SHAAME3
^SCR("W4LEVKVZ","P","NM",35)
SHB1
^SCR("W4LEVKVZ","P","NM",40)
SHB2
^SCR("W4LEVKVZ","P","NM",42)
SHB3
^SCR("W4LEVKVZ","P","NM",45)
SHAA0
^SCR("W4LEVKVZ","P","NM",50)
SHAA1
^SCR("W4LEVKVZ","P","NM",55)
SHAA2
^SCR("W4LEVKVZ","P","NM",60)
SHAAV0
^SCR("W4LEVKVZ","P","NM",65)
SHAAV1
^SCR("W4LEVKVZ","P","NM",70)
SHAAV2
^SCR("W4LEVKVZ","P","NM",72)
TIP
^SCR("W4LEVKVZ","P","RB",1)
5,16,23,71
^SCR("W4LEVKVZ","P","REF",1)
^LEVKVZ(KVZ)
^SCR("W4LEVKVZ","P","REF",1,"RZD")
\
^SCR("W4LEVKVZ","P","REF",1,"STR")
KVZ1
^SCR("W4LEVKVZ","P","REF",2)
^LEVKVZ(KVZ,1)
^SCR("W4LEVKVZ","P","REF",2,"RZD")
\
^SCR("W4LEVKVZ","P","REF",2,"STR")
SHAAME1\SHAAME2\SHAAME3\SHAAMV1\SHAAMV2\SHAAMV3\SHB1\SHB2\SHAA0\SHAA1\TSF1\SHAA2\TSF2\JAMIM\SHAOT\SHB3\SHAAV0\SHAAV1\SHAAV2\TVAV\TIP
^SCR("W4LEVPR")
H
^SCR("W4LEVPR",1)
                                                                               
^SCR("W4LEVPR",2)
   {03 } lirt {                   02} :caer my {01  }:       caer 'qn          
^SCR("W4LEVPR",3)
                    {                       05} {04 }:   micaer zveaw          
^SCR("W4LEVPR",4)
                   {                       08}  {07 }:     zxekyn beq          
^SCR("W4LEVPR",5)
                             ( `l - 0 ,ok - 1 ) {09 }: zegewl mr caer          
^SCR("W4LEVPR",6)
                                                                     1]        
^SCR("W4LEVPR",7)
                {                                   10} :       zaezk          
^SCR("W4LEVPR",8)
                                         {15           }: zedf 'z 'qn          
^SCR("W4LEVPR",9)
                                  {20                  }:       oetlh          
^SCR("W4LEVPR",10)
                                       {            25} :  mileg ztew          
^SCR("W4LEVPR",11)
                                               {30     }: dcear zligz          
^SCR("W4LEVPR",12)
                                               {35     }:  dcear meiq          
^SCR("W4LEVPR",13)
                                               {40     }:  dcil jix`z          
^SCR("W4LEVPR",14)
                                  {                 45} :       ciwtz          
^SCR("W4LEVPR",15)
   {47                                                      } : l`"ec          
^SCR("W4LEVPR",16)
                {                                   50} :        dxrd          
^SCR("W4LEVPR",17)
          [1                                                                   
^SCR("W4LEVPR",18)
                                                                               
^SCR("W4LEVPR",19)
                                                                               
^SCR("W4LEVPR","AV",1)

^SCR("W4LEVPR","AV",2)
ìéòô:ãáåòíù:ãáåò'ñî
^SCR("W4LEVPR","AV",3)
:íéãáåòúöåá÷
^SCR("W4LEVPR","AV",4)
:úøåëùîâåñ
^SCR("W4LEVPR","AV",5)
(àì-0,ïë-1):úåçå÷ìíòãáåò
^SCR("W4LEVPR","AV",6)

^SCR("W4LEVPR","AV",7)
:úáåúë
^SCR("W4LEVPR","AV",8)
:úåäæ'ú'ñî
^SCR("W4LEVPR","AV",9)
:ïåôìè
^SCR("W4LEVPR","AV",10)
:íéìåçúôå÷
^SCR("W4LEVPR","AV",11)
:äãåáòúìéçú
^SCR("W4LEVPR","AV",12)
:äãåáòíåéñ
^SCR("W4LEVPR","AV",13)
:äãéìêéøàú
^SCR("W4LEVPR","AV",14)
:ãé÷ôú
^SCR("W4LEVPR","AV",15)
:ìà"åã
^SCR("W4LEVPR","AV",16)
:äøòä
^SCR("W4LEVPR","AV",17)

^SCR("W4LEVPR","AV",18)

^SCR("W4LEVPR","AV",19)

^SCR("W4LEVPR","NAME")

^SCR("W4LEVPR","P",1,"CRD")
2,47,E,5.,0
^SCR("W4LEVPR","P",1,"FNC")
F6
^SCR("W4LEVPR","P",1,"GLOB")
NAME
^SCR("W4LEVPR","P",1,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("W4LEVPR","P",1,"LMAX")
5
^SCR("W4LEVPR","P",1,"MUMPS1")

^SCR("W4LEVPR","P",1,"MUMPS2")
D CHKOVED^W4LEVPR
^SCR("W4LEVPR","P",1,"MUST")

^SCR("W4LEVPR","P",1,"NLN")
20
^SCR("W4LEVPR","P",1,"RZD")
\
^SCR("W4LEVPR","P",1,"TOPB")
8
^SCR("W4LEVPR","P",1,"TYP")
E
^SCR("W4LEVPR","P",1,"VRB")
SHEM
^SCR("W4LEVPR","P",2,"CRD")
2,37,H,22
^SCR("W4LEVPR","P",2,"HELP")

^SCR("W4LEVPR","P",2,"LMAX")
22
^SCR("W4LEVPR","P",2,"MUMPS1")

^SCR("W4LEVPR","P",2,"MUMPS2")
I $L(SHEM)<2 S %SC("ER")="1:FILLEMPLNAME"
^SCR("W4LEVPR","P",2,"TYP")
H
^SCR("W4LEVPR","P",3,"CRD")
2,3,B,1,0
^SCR("W4LEVPR","P",3,"HELP")
0 - `l ,1 - ok
^SCR("W4LEVPR","P",3,"LMAX")
4
^SCR("W4LEVPR","P",3,"MUMPS1")

^SCR("W4LEVPR","P",3,"MUMPS2")
D ^%L1BDO
^SCR("W4LEVPR","P",3,"TYP")
B
^SCR("W4LEVPR","P",4,"CHECK")
Y
^SCR("W4LEVPR","P",4,"CRD")
3,48,E,4,0
^SCR("W4LEVPR","P",4,"CREAT")

^SCR("W4LEVPR","P",4,"FNC")
F6
^SCR("W4LEVPR","P",4,"GLOB")
LEVKVZ
^SCR("W4LEVPR","P",4,"HELP")

^SCR("W4LEVPR","P",4,"LMAX")
4
^SCR("W4LEVPR","P",4,"MUMPS1")

^SCR("W4LEVPR","P",4,"MUMPS2")

^SCR("W4LEVPR","P",4,"MUST")

^SCR("W4LEVPR","P",4,"NLN")
20
^SCR("W4LEVPR","P",4,"NS")
micaer zeveaw zlah
^SCR("W4LEVPR","P",4,"RZD")
\
^SCR("W4LEVPR","P",4,"TOPB")
8
^SCR("W4LEVPR","P",4,"TYP")
E
^SCR("W4LEVPR","P",4,"VRB")
KVZ1
^SCR("W4LEVPR","P",5,"CRD")
3,47,H,22
^SCR("W4LEVPR","P",5,"HELP")

^SCR("W4LEVPR","P",5,"LMAX")
26
^SCR("W4LEVPR","P",5,"MUMPS1")

^SCR("W4LEVPR","P",5,"MUMPS2")

^SCR("W4LEVPR","P",5,"OUTPUT")

^SCR("W4LEVPR","P",5,"TYP")
H
^SCR("W4LEVPR","P",7,"CHECK")
Y
^SCR("W4LEVPR","P",7,"CRD")
4,48,N,3,0
^SCR("W4LEVPR","P",7,"FNC")

^SCR("W4LEVPR","P",7,"GLOB")
LEVSUGMS
^SCR("W4LEVPR","P",7,"HELP")

^SCR("W4LEVPR","P",7,"LMAX")
4
^SCR("W4LEVPR","P",7,"MUMPS1")

^SCR("W4LEVPR","P",7,"MUMPS2")

^SCR("W4LEVPR","P",7,"NLN")
20
^SCR("W4LEVPR","P",7,"RZD")
\
^SCR("W4LEVPR","P",7,"TOPB")
8
^SCR("W4LEVPR","P",7,"TYP")
N
^SCR("W4LEVPR","P",7,"VRB")
SUGMS1
^SCR("W4LEVPR","P",8,"CRD")
4,46,H,26
^SCR("W4LEVPR","P",8,"HELP")

^SCR("W4LEVPR","P",8,"LMAX")
26
^SCR("W4LEVPR","P",8,"MUMPS1")

^SCR("W4LEVPR","P",8,"MUMPS2")

^SCR("W4LEVPR","P",8,"OUTPUT")

^SCR("W4LEVPR","P",8,"TYP")
H
^SCR("W4LEVPR","P",9,"CRD")
5,48,B,1,0
^SCR("W4LEVPR","P",9,"HELP")

^SCR("W4LEVPR","P",9,"LMAX")
4
^SCR("W4LEVPR","P",9,"MUMPS1")

^SCR("W4LEVPR","P",9,"MUMPS2")

^SCR("W4LEVPR","P",9,"MUST")

^SCR("W4LEVPR","P",9,"TYP")
B
^SCR("W4LEVPR","P",10,"CRD")
7,55,H,37
^SCR("W4LEVPR","P",10,"HELP")

^SCR("W4LEVPR","P",10,"LMAX")
38
^SCR("W4LEVPR","P",10,"MUMPS1")

^SCR("W4LEVPR","P",10,"MUMPS2")

^SCR("W4LEVPR","P",10,"TYP")
H
^SCR("W4LEVPR","P",15,"CRD")
8,41,E,14,0
^SCR("W4LEVPR","P",15,"HELP")

^SCR("W4LEVPR","P",15,"LMAX")
14
^SCR("W4LEVPR","P",15,"MUMPS1")

^SCR("W4LEVPR","P",15,"MUMPS2")
D CHKTZ^W4LEVPR
^SCR("W4LEVPR","P",15,"TYP")
E
^SCR("W4LEVPR","P",20,"CRD")
9,34,E,11,0
^SCR("W4LEVPR","P",20,"HELP")

^SCR("W4LEVPR","P",20,"LMAX")
21
^SCR("W4LEVPR","P",20,"MUMPS1")

^SCR("W4LEVPR","P",20,"MUMPS2")
D CHKTEL^W4LEVPR
^SCR("W4LEVPR","P",20,"TYP")
E
^SCR("W4LEVPR","P",25,"CRD")
10,55,H,14
^SCR("W4LEVPR","P",25,"HELP")

^SCR("W4LEVPR","P",25,"LMAX")
15
^SCR("W4LEVPR","P",25,"MUMPS1")

^SCR("W4LEVPR","P",25,"MUMPS2")

^SCR("W4LEVPR","P",25,"TYP")
H
^SCR("W4LEVPR","P",30,"CRD")
11,47,D,8,0
^SCR("W4LEVPR","P",30,"HELP")

^SCR("W4LEVPR","P",30,"LMAX")
8
^SCR("W4LEVPR","P",30,"MUMPS1")

^SCR("W4LEVPR","P",30,"MUMPS2")

^SCR("W4LEVPR","P",30,"TYP")
D
^SCR("W4LEVPR","P",35,"CRD")
12,47,D,8,0
^SCR("W4LEVPR","P",35,"HELP")

^SCR("W4LEVPR","P",35,"LMAX")
8
^SCR("W4LEVPR","P",35,"MUMPS1")

^SCR("W4LEVPR","P",35,"MUMPS2")

^SCR("W4LEVPR","P",35,"TYP")
D
^SCR("W4LEVPR","P",40,"CRD")
13,47,D,8,0
^SCR("W4LEVPR","P",40,"HELP")

^SCR("W4LEVPR","P",40,"LMAX")
8
^SCR("W4LEVPR","P",40,"MUMPS1")

^SCR("W4LEVPR","P",40,"MUMPS2")
I $$PAPJ^W4PRM D CHKAGE^W4LEVPR(JOMH)
^SCR("W4LEVPR","P",40,"TYP")
D
^SCR("W4LEVPR","P",45,"CRD")
14,55,H,19
^SCR("W4LEVPR","P",45,"HELP")

^SCR("W4LEVPR","P",45,"LMAX")
20
^SCR("W4LEVPR","P",45,"MUMPS1")

^SCR("W4LEVPR","P",45,"MUMPS2")

^SCR("W4LEVPR","P",45,"TYP")
H
^SCR("W4LEVPR","P",47,"CRD")
15,3,E,57,0
^SCR("W4LEVPR","P",47,"HELP")

^SCR("W4LEVPR","P",47,"LMAX")
57
^SCR("W4LEVPR","P",47,"MUMPS1")

^SCR("W4LEVPR","P",47,"MUMPS2")
D CHKMAIL^W4LEVPR(EMAIL)
^SCR("W4LEVPR","P",47,"MUST")

^SCR("W4LEVPR","P",47,"TYP")
E
^SCR("W4LEVPR","P",50,"CRD")
16,55,H,38
^SCR("W4LEVPR","P",50,"HELP")

^SCR("W4LEVPR","P",50,"LMAX")
38
^SCR("W4LEVPR","P",50,"MUMPS1")

^SCR("W4LEVPR","P",50,"MUMPS2")

^SCR("W4LEVPR","P",50,"TYP")
H
^SCR("W4LEVPR","P","NAME","DATF")
35
^SCR("W4LEVPR","P","NAME","DATS")
30
^SCR("W4LEVPR","P","NAME","EMAIL")
47
^SCR("W4LEVPR","P","NAME","HRA")
50
^SCR("W4LEVPR","P","NAME","JOMH")
40
^SCR("W4LEVPR","P","NAME","KTV")
10
^SCR("W4LEVPR","P","NAME","KUPH")
25
^SCR("W4LEVPR","P","NAME","KVZ")
4
^SCR("W4LEVPR","P","NAME","KVZ1")
5
^SCR("W4LEVPR","P","NAME","MTIP")
9
^SCR("W4LEVPR","P","NAME","OVED")
1
^SCR("W4LEVPR","P","NAME","PAIL")
3
^SCR("W4LEVPR","P","NAME","SHEM")
2
^SCR("W4LEVPR","P","NAME","SUGMS")
7
^SCR("W4LEVPR","P","NAME","SUGMS1")
8
^SCR("W4LEVPR","P","NAME","TEL")
20
^SCR("W4LEVPR","P","NAME","TFK")
45
^SCR("W4LEVPR","P","NAME","TZ")
15
^SCR("W4LEVPR","P","NM",1)
OVED
^SCR("W4LEVPR","P","NM",2)
SHEM
^SCR("W4LEVPR","P","NM",3)
PAIL
^SCR("W4LEVPR","P","NM",4)
KVZ
^SCR("W4LEVPR","P","NM",5)
KVZ1
^SCR("W4LEVPR","P","NM",7)
SUGMS
^SCR("W4LEVPR","P","NM",8)
SUGMS1
^SCR("W4LEVPR","P","NM",9)
MTIP
^SCR("W4LEVPR","P","NM",10)
KTV
^SCR("W4LEVPR","P","NM",15)
TZ
^SCR("W4LEVPR","P","NM",20)
TEL
^SCR("W4LEVPR","P","NM",25)
KUPH
^SCR("W4LEVPR","P","NM",30)
DATS
^SCR("W4LEVPR","P","NM",35)
DATF
^SCR("W4LEVPR","P","NM",40)
JOMH
^SCR("W4LEVPR","P","NM",45)
TFK
^SCR("W4LEVPR","P","NM",47)
EMAIL
^SCR("W4LEVPR","P","NM",50)
HRA
^SCR("W4LEVPR","P","RB",1)
7,11,18,71
^SCR("W4LEVPR1")
H
^SCR("W4LEVPR1",1)
                           # caer ihxt #                                       
^SCR("W4LEVPR1",2)
                                                                               
^SCR("W4LEVPR1",3)
   {03 } lirt {                   02} :caer my {01  }:       caer 'qn          
^SCR("W4LEVPR1",4)
                    {                       05} {04 }:   micaer zveaw          
^SCR("W4LEVPR1",5)
                   {                       08}  {07 }:     zxekyn beq          
^SCR("W4LEVPR1",6)
                             ( `l - 0 ,ok - 1 ) {09 }: zegewl mr caer          
^SCR("W4LEVPR1",7)
                                                                     1]        
^SCR("W4LEVPR1",8)
                {                                   10} :       zaezk          
^SCR("W4LEVPR1",9)
                                         {15           }: zedf 'z 'qn          
^SCR("W4LEVPR1",10)
                                  {20                  }:       oetlh          
^SCR("W4LEVPR1",11)
                                       {            25} :  mileg ztew          
^SCR("W4LEVPR1",12)
                                               {30     }: dcear zligz          
^SCR("W4LEVPR1",13)
                                               {35     }:  dcear meiq          
^SCR("W4LEVPR1",14)
                                               {40     }:   zcled mei          
^SCR("W4LEVPR1",15)
                                  {                 45} :       ciwtz          
^SCR("W4LEVPR1",16)
                {                                   50} :        dxrd          
^SCR("W4LEVPR1",17)
                                                    {53    } : zeòiqp          
^SCR("W4LEVPR1",18)
                                                     {55    } : dcnzd          
^SCR("W4LEVPR1",19)
                                                 {57   } : akx ze`ved          
^SCR("W4LEVPR1",20)
                                                       {60   }: d`xad          
^SCR("W4LEVPR1",21)
                                                       {65   }: cebia          
^SCR("W4LEVPR1",22)
          [1                                                                   
^SCR("W4LEVPR1",23)
                                                                               
^SCR("W4LEVPR1","AV",1)
ãáåòéèøô
^SCR("W4LEVPR1","AV",2)

^SCR("W4LEVPR1","AV",3)
ìéòô:ãáåòíù:ãáåò'ñî
^SCR("W4LEVPR1","AV",4)
:íéãáåòúöåá÷
^SCR("W4LEVPR1","AV",5)
:úøåëùîâåñ
^SCR("W4LEVPR1","AV",6)
(àì-0,ïë-1):úåçå÷ìíòãáåò
^SCR("W4LEVPR1","AV",7)

^SCR("W4LEVPR1","AV",8)
:úáåúë
^SCR("W4LEVPR1","AV",9)
:úåäæ'ú'ñî
^SCR("W4LEVPR1","AV",10)
:ïåôìè
^SCR("W4LEVPR1","AV",11)
:íéìåçúôå÷
^SCR("W4LEVPR1","AV",12)
:äãåáòúìéçú
^SCR("W4LEVPR1","AV",13)
:äãåáòíåéñ
^SCR("W4LEVPR1","AV",14)
:úãìåäíåé
^SCR("W4LEVPR1","AV",15)
:ãé÷ôú
^SCR("W4LEVPR1","AV",16)
:äøòä
^SCR("W4LEVPR1","AV",17)
:úåòéñð
^SCR("W4LEVPR1","AV",18)
:äãîúä
^SCR("W4LEVPR1","AV",19)
:áëøúåàöåä
^SCR("W4LEVPR1","AV",20)
:äàøáä
^SCR("W4LEVPR1","AV",21)
:ãåâéá
^SCR("W4LEVPR1","AV",22)

^SCR("W4LEVPR1","AV",23)

^SCR("W4LEVPR1","NAME")

^SCR("W4LEVPR1","P",1,"CRD")
3,47,E,5.,0
^SCR("W4LEVPR1","P",1,"FNC")
F6
^SCR("W4LEVPR1","P",1,"GLOB")
NAME
^SCR("W4LEVPR1","P",1,"HELP")
<F7 > - dbvd , <F6> - my zlgzd itl yetig 
^SCR("W4LEVPR1","P",1,"LMAX")
5
^SCR("W4LEVPR1","P",1,"MUMPS1")

^SCR("W4LEVPR1","P",1,"MUMPS2")

^SCR("W4LEVPR1","P",1,"MUST")

^SCR("W4LEVPR1","P",1,"NLN")
20
^SCR("W4LEVPR1","P",1,"RZD")
\
^SCR("W4LEVPR1","P",1,"TOPB")
8
^SCR("W4LEVPR1","P",1,"TYP")
E
^SCR("W4LEVPR1","P",1,"VRB")
SHEM
^SCR("W4LEVPR1","P",2,"CRD")
3,37,H,22
^SCR("W4LEVPR1","P",2,"HELP")

^SCR("W4LEVPR1","P",2,"LMAX")
22
^SCR("W4LEVPR1","P",2,"MUMPS1")

^SCR("W4LEVPR1","P",2,"MUMPS2")
I $L(SHEM)<2 S %SC("ER")="1:FILLEMPLNAME"
^SCR("W4LEVPR1","P",2,"TYP")
H
^SCR("W4LEVPR1","P",3,"CRD")
3,3,B,1,0
^SCR("W4LEVPR1","P",3,"HELP")
0 - `l ,1 - ok
^SCR("W4LEVPR1","P",3,"LMAX")
4
^SCR("W4LEVPR1","P",3,"MUMPS1")

^SCR("W4LEVPR1","P",3,"MUMPS2")
D ^%L1BDO
^SCR("W4LEVPR1","P",3,"TYP")
B
^SCR("W4LEVPR1","P",4,"CHECK")
Y
^SCR("W4LEVPR1","P",4,"CRD")
4,48,E,4,0
^SCR("W4LEVPR1","P",4,"CREAT")

^SCR("W4LEVPR1","P",4,"FNC")
F6
^SCR("W4LEVPR1","P",4,"GLOB")
LEVKVZ
^SCR("W4LEVPR1","P",4,"HELP")

^SCR("W4LEVPR1","P",4,"LMAX")
4
^SCR("W4LEVPR1","P",4,"MUMPS1")

^SCR("W4LEVPR1","P",4,"MUMPS2")

^SCR("W4LEVPR1","P",4,"MUST")

^SCR("W4LEVPR1","P",4,"NLN")
20
^SCR("W4LEVPR1","P",4,"NS")
micaer zeveaw zlah
^SCR("W4LEVPR1","P",4,"RZD")
\
^SCR("W4LEVPR1","P",4,"TOPB")
8
^SCR("W4LEVPR1","P",4,"TYP")
H
^SCR("W4LEVPR1","P",4,"VRB")
KVZ1
^SCR("W4LEVPR1","P",5,"CRD")
4,47,H,22
^SCR("W4LEVPR1","P",5,"HELP")

^SCR("W4LEVPR1","P",5,"LMAX")
26
^SCR("W4LEVPR1","P",5,"MUMPS1")

^SCR("W4LEVPR1","P",5,"MUMPS2")

^SCR("W4LEVPR1","P",5,"OUTPUT")

^SCR("W4LEVPR1","P",5,"TYP")
H
^SCR("W4LEVPR1","P",7,"CHECK")
Y
^SCR("W4LEVPR1","P",7,"CRD")
5,48,N,3,0
^SCR("W4LEVPR1","P",7,"FNC")

^SCR("W4LEVPR1","P",7,"GLOB")
LEVSUGMS
^SCR("W4LEVPR1","P",7,"HELP")

^SCR("W4LEVPR1","P",7,"LMAX")
4
^SCR("W4LEVPR1","P",7,"MUMPS1")

^SCR("W4LEVPR1","P",7,"MUMPS2")

^SCR("W4LEVPR1","P",7,"NLN")
20
^SCR("W4LEVPR1","P",7,"RZD")
\
^SCR("W4LEVPR1","P",7,"TOPB")
8
^SCR("W4LEVPR1","P",7,"TYP")
N
^SCR("W4LEVPR1","P",7,"VRB")
SUGMS1
^SCR("W4LEVPR1","P",8,"CRD")
5,46,H,26
^SCR("W4LEVPR1","P",8,"HELP")

^SCR("W4LEVPR1","P",8,"LMAX")
26
^SCR("W4LEVPR1","P",8,"MUMPS1")

^SCR("W4LEVPR1","P",8,"MUMPS2")

^SCR("W4LEVPR1","P",8,"OUTPUT")

^SCR("W4LEVPR1","P",8,"TYP")
H
^SCR("W4LEVPR1","P",9,"CRD")
6,48,B,1,0
^SCR("W4LEVPR1","P",9,"HELP")

^SCR("W4LEVPR1","P",9,"LMAX")
4
^SCR("W4LEVPR1","P",9,"MUMPS1")

^SCR("W4LEVPR1","P",9,"MUMPS2")

^SCR("W4LEVPR1","P",9,"MUST")

^SCR("W4LEVPR1","P",9,"TYP")
B
^SCR("W4LEVPR1","P",10,"CRD")
8,55,H,37
^SCR("W4LEVPR1","P",10,"HELP")

^SCR("W4LEVPR1","P",10,"LMAX")
38
^SCR("W4LEVPR1","P",10,"MUMPS1")

^SCR("W4LEVPR1","P",10,"MUMPS2")

^SCR("W4LEVPR1","P",10,"TYP")
H
^SCR("W4LEVPR1","P",15,"CRD")
9,41,E,14,0
^SCR("W4LEVPR1","P",15,"HELP")

^SCR("W4LEVPR1","P",15,"LMAX")
14
^SCR("W4LEVPR1","P",15,"MUMPS1")

^SCR("W4LEVPR1","P",15,"MUMPS2")
I $L(TZ),'$$^W4TZ(TZ) S %SC("ER")="1:IDNUMBERISWRONG"
^SCR("W4LEVPR1","P",15,"TYP")
E
^SCR("W4LEVPR1","P",20,"CRD")
10,34,E,11,0
^SCR("W4LEVPR1","P",20,"HELP")

^SCR("W4LEVPR1","P",20,"LMAX")
21
^SCR("W4LEVPR1","P",20,"MUMPS1")

^SCR("W4LEVPR1","P",20,"MUMPS2")

^SCR("W4LEVPR1","P",20,"TYP")
E
^SCR("W4LEVPR1","P",25,"CRD")
11,55,H,14
^SCR("W4LEVPR1","P",25,"HELP")

^SCR("W4LEVPR1","P",25,"LMAX")
15
^SCR("W4LEVPR1","P",25,"MUMPS1")

^SCR("W4LEVPR1","P",25,"MUMPS2")

^SCR("W4LEVPR1","P",25,"TYP")
H
^SCR("W4LEVPR1","P",30,"CRD")
12,47,D,8,0
^SCR("W4LEVPR1","P",30,"HELP")

^SCR("W4LEVPR1","P",30,"LMAX")
8
^SCR("W4LEVPR1","P",30,"MUMPS1")

^SCR("W4LEVPR1","P",30,"MUMPS2")

^SCR("W4LEVPR1","P",30,"TYP")
D
^SCR("W4LEVPR1","P",35,"CRD")
13,47,D,8,0
^SCR("W4LEVPR1","P",35,"HELP")

^SCR("W4LEVPR1","P",35,"LMAX")
8
^SCR("W4LEVPR1","P",35,"MUMPS1")

^SCR("W4LEVPR1","P",35,"MUMPS2")

^SCR("W4LEVPR1","P",35,"TYP")
D
^SCR("W4LEVPR1","P",40,"CRD")
14,47,D,8,0
^SCR("W4LEVPR1","P",40,"HELP")

^SCR("W4LEVPR1","P",40,"LMAX")
8
^SCR("W4LEVPR1","P",40,"MUMPS1")

^SCR("W4LEVPR1","P",40,"MUMPS2")

^SCR("W4LEVPR1","P",40,"TYP")
D
^SCR("W4LEVPR1","P",45,"CRD")
15,55,H,19
^SCR("W4LEVPR1","P",45,"HELP")

^SCR("W4LEVPR1","P",45,"LMAX")
20
^SCR("W4LEVPR1","P",45,"MUMPS1")

^SCR("W4LEVPR1","P",45,"MUMPS2")

^SCR("W4LEVPR1","P",45,"TYP")
H
^SCR("W4LEVPR1","P",50,"CRD")
16,55,H,38
^SCR("W4LEVPR1","P",50,"HELP")

^SCR("W4LEVPR1","P",50,"LMAX")
38
^SCR("W4LEVPR1","P",50,"MUMPS1")

^SCR("W4LEVPR1","P",50,"MUMPS2")

^SCR("W4LEVPR1","P",50,"TYP")
H
^SCR("W4LEVPR1","P",53,"CRD")
17,52,E,7,0
^SCR("W4LEVPR1","P",53,"HELP")

^SCR("W4LEVPR1","P",53,"LMAX")
7
^SCR("W4LEVPR1","P",53,"MUMPS1")

^SCR("W4LEVPR1","P",53,"MUMPS2")

^SCR("W4LEVPR1","P",53,"TYP")
E
^SCR("W4LEVPR1","P",55,"CRD")
18,53,E,7,0
^SCR("W4LEVPR1","P",55,"HELP")

^SCR("W4LEVPR1","P",55,"LMAX")
7
^SCR("W4LEVPR1","P",55,"MUMPS1")

^SCR("W4LEVPR1","P",55,"MUMPS2")

^SCR("W4LEVPR1","P",55,"TYP")
E
^SCR("W4LEVPR1","P",57,"CRD")
19,49,E,6,0
^SCR("W4LEVPR1","P",57,"HELP")

^SCR("W4LEVPR1","P",57,"LMAX")
6
^SCR("W4LEVPR1","P",57,"MUMPS1")

^SCR("W4LEVPR1","P",57,"MUMPS2")

^SCR("W4LEVPR1","P",57,"TYP")
E
^SCR("W4LEVPR1","P",60,"CRD")
20,55,E,6,0
^SCR("W4LEVPR1","P",60,"HELP")

^SCR("W4LEVPR1","P",60,"LMAX")
6
^SCR("W4LEVPR1","P",60,"MUMPS1")

^SCR("W4LEVPR1","P",60,"MUMPS2")

^SCR("W4LEVPR1","P",60,"TYP")
E
^SCR("W4LEVPR1","P",65,"CRD")
21,55,E,6,0
^SCR("W4LEVPR1","P",65,"HELP")

^SCR("W4LEVPR1","P",65,"LMAX")
6
^SCR("W4LEVPR1","P",65,"MUMPS1")

^SCR("W4LEVPR1","P",65,"MUMPS2")

^SCR("W4LEVPR1","P",65,"TYP")
E
^SCR("W4LEVPR1","P","NAME","ADDS")
60
^SCR("W4LEVPR1","P","NAME","ATMADA")
55
^SCR("W4LEVPR1","P","NAME","BIGUD")
65
^SCR("W4LEVPR1","P","NAME","DATF")
35
^SCR("W4LEVPR1","P","NAME","DATS")
30
^SCR("W4LEVPR1","P","NAME","HRA")
50
^SCR("W4LEVPR1","P","NAME","JOMH")
40
^SCR("W4LEVPR1","P","NAME","KTV")
10
^SCR("W4LEVPR1","P","NAME","KUPH")
25
^SCR("W4LEVPR1","P","NAME","KVZ")
4
^SCR("W4LEVPR1","P","NAME","KVZ1")
5
^SCR("W4LEVPR1","P","NAME","MTIP")
9
^SCR("W4LEVPR1","P","NAME","NESIOT")
53
^SCR("W4LEVPR1","P","NAME","OVED")
1
^SCR("W4LEVPR1","P","NAME","PAIL")
3
^SCR("W4LEVPR1","P","NAME","REHEV")
57
^SCR("W4LEVPR1","P","NAME","SHEM")
2
^SCR("W4LEVPR1","P","NAME","SUGMS")
7
^SCR("W4LEVPR1","P","NAME","SUGMS1")
8
^SCR("W4LEVPR1","P","NAME","TEL")
20
^SCR("W4LEVPR1","P","NAME","TFK")
45
^SCR("W4LEVPR1","P","NAME","TZ")
15
^SCR("W4LEVPR1","P","NM",1)
OVED
^SCR("W4LEVPR1","P","NM",2)
SHEM
^SCR("W4LEVPR1","P","NM",3)
PAIL
^SCR("W4LEVPR1","P","NM",4)
KVZ
^SCR("W4LEVPR1","P","NM",5)
KVZ1
^SCR("W4LEVPR1","P","NM",7)
SUGMS
^SCR("W4LEVPR1","P","NM",8)
SUGMS1
^SCR("W4LEVPR1","P","NM",9)
MTIP
^SCR("W4LEVPR1","P","NM",10)
KTV
^SCR("W4LEVPR1","P","NM",15)
TZ
^SCR("W4LEVPR1","P","NM",20)
TEL
^SCR("W4LEVPR1","P","NM",25)
KUPH
^SCR("W4LEVPR1","P","NM",30)
DATS
^SCR("W4LEVPR1","P","NM",35)
DATF
^SCR("W4LEVPR1","P","NM",40)
JOMH
^SCR("W4LEVPR1","P","NM",45)
TFK
^SCR("W4LEVPR1","P","NM",50)
HRA
^SCR("W4LEVPR1","P","NM",53)
NESIOT
^SCR("W4LEVPR1","P","NM",55)
ATMADA
^SCR("W4LEVPR1","P","NM",57)
REHEV
^SCR("W4LEVPR1","P","NM",60)
ADDS
^SCR("W4LEVPR1","P","NM",65)
BIGUD
^SCR("W4LEVPR1","P","RB",1)
8,11,23,71
^SCR("W4LEVSPR")
H
^SCR("W4LEVSPR",1)
                            # migkep micaer zniyx #                            
^SCR("W4LEVSPR",2)
                       {10  }: dry  {05     } : jix`z                          
^SCR("W4LEVSPR",3)
                                                                             1$
^SCR("W4LEVSPR",4)
        : `vnpy onf : dqipk zry :dqipk jix`z :   caer  my   :caer 'qn:         
^SCR("W4LEVSPR",5)
                                                                               
^SCR("W4LEVSPR",6)
                                                                               
^SCR("W4LEVSPR",7)
                                                                               
^SCR("W4LEVSPR",8)
                                                                               
^SCR("W4LEVSPR",9)
                                                                               
^SCR("W4LEVSPR",10)
                                                                               
^SCR("W4LEVSPR",11)
                                                                               
^SCR("W4LEVSPR",12)
                                                                               
^SCR("W4LEVSPR",13)
                                                                               
^SCR("W4LEVSPR",14)
                                                                               
^SCR("W4LEVSPR",15)
                                                                               
^SCR("W4LEVSPR",16)
                                                                               
^SCR("W4LEVSPR",17)
                                                                               
^SCR("W4LEVSPR",18)
                                                                               
^SCR("W4LEVSPR",19)
                                                                               
^SCR("W4LEVSPR",20)
                                                                               
^SCR("W4LEVSPR",21)
  $1                                                                           
^SCR("W4LEVSPR",22)
                                                                               
^SCR("W4LEVSPR","A",1)
�‰‡‹…��‰ƒ�…’šŽ‰™˜
^SCR("W4LEVSPR","A",2)
:„’™:Š‰˜€š
^SCR("W4LEVSPR","A",3)

^SCR("W4LEVSPR","A",4)
€–Ž�™�Ž†„‘‰�‹š’™„‘‰�‹Š‰˜€šƒ�…’�™ƒ�…’'‘Ž
^SCR("W4LEVSPR","A",5)
-----------------------------------------------------------------
^SCR("W4LEVSPR","A",6)

^SCR("W4LEVSPR","A",7)

^SCR("W4LEVSPR","A",8)

^SCR("W4LEVSPR","A",9)

^SCR("W4LEVSPR","A",10)

^SCR("W4LEVSPR","A",11)

^SCR("W4LEVSPR","A",12)

^SCR("W4LEVSPR","A",13)

^SCR("W4LEVSPR","A",14)

^SCR("W4LEVSPR","A",15)

^SCR("W4LEVSPR","A",16)

^SCR("W4LEVSPR","A",17)

^SCR("W4LEVSPR","A",18)

^SCR("W4LEVSPR","A",19)

^SCR("W4LEVSPR","A",20)

^SCR("W4LEVSPR","A",21)

^SCR("W4LEVSPR","A",22)

^SCR("W4LEVSPR","AV",1)
ohjfubohscug,nhar
^SCR("W4LEVSPR","AV",2)
:vga:lhrt,
^SCR("W4LEVSPR","AV",3)

^SCR("W4LEVSPR","AV",4)
tmnbainzvxhbf,gavxhbflhrt,scugoascugwxn
^SCR("W4LEVSPR","AV",5)
-----------------------------------------------------------------
^SCR("W4LEVSPR","AV",6)

^SCR("W4LEVSPR","AV",7)

^SCR("W4LEVSPR","AV",8)

^SCR("W4LEVSPR","AV",9)

^SCR("W4LEVSPR","AV",10)

^SCR("W4LEVSPR","AV",11)

^SCR("W4LEVSPR","AV",12)

^SCR("W4LEVSPR","AV",13)

^SCR("W4LEVSPR","AV",14)

^SCR("W4LEVSPR","AV",15)

^SCR("W4LEVSPR","AV",16)

^SCR("W4LEVSPR","AV",17)

^SCR("W4LEVSPR","AV",18)

^SCR("W4LEVSPR","AV",19)

^SCR("W4LEVSPR","AV",20)

^SCR("W4LEVSPR","AV",21)

^SCR("W4LEVSPR","AV",22)

^SCR("W4LEVSPR","G",1,"CRD")
5,69,E,5,0
^SCR("W4LEVSPR","G",1,"HELP")

^SCR("W4LEVSPR","G",1,"LMAX")
8
^SCR("W4LEVSPR","G",1,"MUMPS1")

^SCR("W4LEVSPR","G",1,"MUMPS2")

^SCR("W4LEVSPR","G",1,"OUTPUT")

^SCR("W4LEVSPR","G",1,"SHEM")
caer 'qn
^SCR("W4LEVSPR","G",1,"TYP")
E
^SCR("W4LEVSPR","G",2,"CRD")
5,60,H,14,0
^SCR("W4LEVSPR","G",2,"HELP")

^SCR("W4LEVSPR","G",2,"LMAX")
14
^SCR("W4LEVSPR","G",2,"MUMPS1")

^SCR("W4LEVSPR","G",2,"MUMPS2")

^SCR("W4LEVSPR","G",2,"OUTPUT")

^SCR("W4LEVSPR","G",2,"SHEM")
   caer  my   
^SCR("W4LEVSPR","G",2,"TYP")
H
^SCR("W4LEVSPR","G",3,"CRD")
5,45,T,5,0
^SCR("W4LEVSPR","G",3,"HELP")

^SCR("W4LEVSPR","G",3,"LMAX")
12
^SCR("W4LEVSPR","G",3,"MUMPS1")

^SCR("W4LEVSPR","G",3,"MUMPS2")

^SCR("W4LEVSPR","G",3,"OUTPUT")

^SCR("W4LEVSPR","G",3,"SHEM")
dqipk jix`z 
^SCR("W4LEVSPR","G",3,"TYP")
T
^SCR("W4LEVSPR","G",4,"CRD")
5,32,T,5,0
^SCR("W4LEVSPR","G",4,"HELP")

^SCR("W4LEVSPR","G",4,"LMAX")
11
^SCR("W4LEVSPR","G",4,"MUMPS1")

^SCR("W4LEVSPR","G",4,"MUMPS2")

^SCR("W4LEVSPR","G",4,"OUTPUT")

^SCR("W4LEVSPR","G",4,"SHEM")
 dqipk zry 
^SCR("W4LEVSPR","G",4,"TYP")
T
^SCR("W4LEVSPR","G",5,"CRD")
5,20,T,5,0
^SCR("W4LEVSPR","G",5,"HELP")

^SCR("W4LEVSPR","G",5,"LMAX")
11
^SCR("W4LEVSPR","G",5,"MUMPS1")

^SCR("W4LEVSPR","G",5,"MUMPS2")

^SCR("W4LEVSPR","G",5,"OUTPUT")

^SCR("W4LEVSPR","G",5,"SHEM")
 `vnpy onf 
^SCR("W4LEVSPR","G",5,"TYP")
T
^SCR("W4LEVSPR","G","DEL")

^SCR("W4LEVSPR","G","MAX")
99999
^SCR("W4LEVSPR","G","NAME","KNISA")
3
^SCR("W4LEVSPR","G","NAME","OVED")
1
^SCR("W4LEVSPR","G","NAME","OVED1")
2
^SCR("W4LEVSPR","G","NAME","SHAA")
4
^SCR("W4LEVSPR","G","NAME","ZMAN")
5
^SCR("W4LEVSPR","G","NM",1)
OVED
^SCR("W4LEVSPR","G","NM",2)
OVED1
^SCR("W4LEVSPR","G","NM",3)
KNISA
^SCR("W4LEVSPR","G","NM",4)
SHAA
^SCR("W4LEVSPR","G","NM",5)
ZMAN
^SCR("W4LEVSPR","G","RB")
4,3,22,79
^SCR("W4LEVSPR","G","REF")
^TEMPS($P
^SCR("W4LEVSPR","G","RZD")
\
^SCR("W4LEVSPR","G","STEP")
1
^SCR("W4LEVSPR","G","STG")
        : `vnpy onf : dqipk zry :dqipk jix`z :   caer  my   :caer 'qn:         
^SCR("W4LEVSPR","G","VG")
6
^SCR("W4LEVSPR","NAME")

^SCR("W4LEVSPR","P",5,"CRD")
2,36,D,8,0
^SCR("W4LEVSPR","P",5,"HELP")

^SCR("W4LEVSPR","P",5,"LMAX")
8
^SCR("W4LEVSPR","P",5,"MUMPS1")

^SCR("W4LEVSPR","P",5,"MUMPS2")

^SCR("W4LEVSPR","P",5,"OUTPUT")

^SCR("W4LEVSPR","P",5,"TYP")
D
^SCR("W4LEVSPR","P",10,"CRD")
2,23,T,5,0
^SCR("W4LEVSPR","P",10,"HELP")

^SCR("W4LEVSPR","P",10,"LMAX")
5
^SCR("W4LEVSPR","P",10,"MUMPS1")

^SCR("W4LEVSPR","P",10,"MUMPS2")

^SCR("W4LEVSPR","P",10,"OUTPUT")

^SCR("W4LEVSPR","P",10,"TYP")
T
^SCR("W4LEVSPR","P","NAME","TIM")
10
^SCR("W4LEVSPR","P","NAME","TRH")
5
^SCR("W4LEVSPR","P","NM",5)
TRH
^SCR("W4LEVSPR","P","NM",10)
TIM
^SCR("W4LEVTYP")
H
^SCR("W4LEVTYP",1)
                             #  micaer g"ec  #                                 
^SCR("W4LEVTYP",2)
                     {10      }   jix`z cr    {05      }  jix`zn               
^SCR("W4LEVTYP",3)
  {            31}{30 }  dveaw cr     {           26}{25 }  micaer zveawn      
^SCR("W4LEVTYP",4)
 {           38}{37 } zxekyn beq cr     {           34} {33 } zxekyn beqn      
^SCR("W4LEVTYP",5)
 {            41}{40  } caer 'qn cr      {           36}{35  }  caer 'qnn      
^SCR("W4LEVTYP",6)
                                              {45 } zeveaw itl oiinl           
^SCR("W4LEVTYP",7)
                                              {50 }     zxekyn bivdl           
^SCR("W4LEVTYP",8)
                                     {55 } : cxtp sca caer lk qitcdl           
^SCR("W4LEVTYP",9)
                                                                               
^SCR("W4LEVTYP","A",1)
�‰ƒ�…’‡"…ƒ
^SCR("W4LEVTYP","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("W4LEVTYP","A",3)
„–…�—ƒ’�‰ƒ�…’š–…�—Ž
^SCR("W4LEVTYP","A",4)
š˜…‹™Ž‚…‘ƒ’š˜…‹™Ž‚…‘Ž
^SCR("W4LEVTYP","A",5)
ƒ�…’'‘Žƒ’ƒ�…’'‘ŽŽ
^SCR("W4LEVTYP","A",6)
š…–…�—‰”Œ�‰‰ŽŒ
^SCR("W4LEVTYP","A",7)
š˜…‹™Ž‚‰–„Œ
^SCR("W4LEVTYP","A",8)
:ƒ˜”�“ƒ�ƒ�…’Œ‹‘‰”ƒ„Œ
^SCR("W4LEVTYP","A",9)

^SCR("W4LEVTYP","AV",1)
ohscugj"us
^SCR("W4LEVTYP","AV",2)
lhrt,sglhrt,n
^SCR("W4LEVTYP","AV",3)
vmucesgohscug,mucen
^SCR("W4LEVTYP","AV",4)
,rufanduxsg,rufanduxn
^SCR("W4LEVTYP","AV",5)
scugwxnsgscugwxnn
^SCR("W4LEVTYP","AV",6)
,umucehpkihhnk
^SCR("W4LEVTYP","AV",7)
,rufandhmvk
^SCR("W4LEVTYP","AV",8)
:srpb;scscugkfxhpsvk
^SCR("W4LEVTYP","AV",9)

^SCR("W4LEVTYP","NAME")

^SCR("W4LEVTYP","P",5,"CRD")
2,46,D,8,0
^SCR("W4LEVTYP","P",5,"HELP")

^SCR("W4LEVTYP","P",5,"LMAX")
9
^SCR("W4LEVTYP","P",5,"MUMPS1")
S:'$G(MEDAT) MEDAT=$ZD($H,"DD.MM.YY")
^SCR("W4LEVTYP","P",5,"MUMPS2")

^SCR("W4LEVTYP","P",5,"MUST")

^SCR("W4LEVTYP","P",5,"TYP")
D
^SCR("W4LEVTYP","P",10,"CRD")
2,21,D,8,0
^SCR("W4LEVTYP","P",10,"HELP")

^SCR("W4LEVTYP","P",10,"LMAX")
9
^SCR("W4LEVTYP","P",10,"MUMPS1")
S:'$G(ADDAT) ADDAT=MEDAT
^SCR("W4LEVTYP","P",10,"MUMPS2")

^SCR("W4LEVTYP","P",10,"MUST")

^SCR("W4LEVTYP","P",10,"TYP")
D
^SCR("W4LEVTYP","P",25,"CHECK")
Y
^SCR("W4LEVTYP","P",25,"CRD")
3,53,E,4,0
^SCR("W4LEVTYP","P",25,"FNC")

^SCR("W4LEVTYP","P",25,"GLOB")
LEVKVZ
^SCR("W4LEVTYP","P",25,"HELP")

^SCR("W4LEVTYP","P",25,"LMAX")
4
^SCR("W4LEVTYP","P",25,"MUMPS1")

^SCR("W4LEVTYP","P",25,"MUMPS2")

^SCR("W4LEVTYP","P",25,"NLN")
20
^SCR("W4LEVTYP","P",25,"RZD")
\
^SCR("W4LEVTYP","P",25,"TOPB")
8
^SCR("W4LEVTYP","P",25,"TYP")
E
^SCR("W4LEVTYP","P",25,"VRB")
MESUG1
^SCR("W4LEVTYP","P",26,"CRD")
3,53,H,14
^SCR("W4LEVTYP","P",26,"HELP")

^SCR("W4LEVTYP","P",26,"LMAX")
14
^SCR("W4LEVTYP","P",26,"MUMPS1")

^SCR("W4LEVTYP","P",26,"MUMPS2")

^SCR("W4LEVTYP","P",26,"OUTPUT")

^SCR("W4LEVTYP","P",26,"TYP")
H
^SCR("W4LEVTYP","P",30,"CRD")
3,18,E,4,0
^SCR("W4LEVTYP","P",30,"FNC")

^SCR("W4LEVTYP","P",30,"GLOB")
^LEVKVZ
^SCR("W4LEVTYP","P",30,"HELP")

^SCR("W4LEVTYP","P",30,"LMAX")
4
^SCR("W4LEVTYP","P",30,"MUMPS1")

^SCR("W4LEVTYP","P",30,"MUMPS2")

^SCR("W4LEVTYP","P",30,"NLN")
20
^SCR("W4LEVTYP","P",30,"RZD")
\
^SCR("W4LEVTYP","P",30,"TOPB")
8
^SCR("W4LEVTYP","P",30,"TYP")
E
^SCR("W4LEVTYP","P",30,"VRB")
ADSUG1
^SCR("W4LEVTYP","P",31,"CRD")
3,18,H,15
^SCR("W4LEVTYP","P",31,"HELP")

^SCR("W4LEVTYP","P",31,"LMAX")
15
^SCR("W4LEVTYP","P",31,"MUMPS1")

^SCR("W4LEVTYP","P",31,"MUMPS2")

^SCR("W4LEVTYP","P",31,"OUTPUT")

^SCR("W4LEVTYP","P",31,"TYP")
H
^SCR("W4LEVTYP","P",33,"CRD")
4,56,E,1,0
^SCR("W4LEVTYP","P",33,"FNC")

^SCR("W4LEVTYP","P",33,"GLOB")
LEVSUGMS
^SCR("W4LEVTYP","P",33,"HELP")

^SCR("W4LEVTYP","P",33,"LMAX")
4
^SCR("W4LEVTYP","P",33,"MUMPS1")

^SCR("W4LEVTYP","P",33,"MUMPS2")

^SCR("W4LEVTYP","P",33,"NLN")
20
^SCR("W4LEVTYP","P",33,"RZD")
\
^SCR("W4LEVTYP","P",33,"TOPB")
8
^SCR("W4LEVTYP","P",33,"TYP")
E
^SCR("W4LEVTYP","P",33,"VRB")
MESUGMS1
^SCR("W4LEVTYP","P",34,"CRD")
4,55,H,14
^SCR("W4LEVTYP","P",34,"HELP")

^SCR("W4LEVTYP","P",34,"LMAX")
14
^SCR("W4LEVTYP","P",34,"MUMPS1")

^SCR("W4LEVTYP","P",34,"MUMPS2")

^SCR("W4LEVTYP","P",34,"OUTPUT")

^SCR("W4LEVTYP","P",34,"TYP")
H
^SCR("W4LEVTYP","P",35,"CRD")
5,56,E,5,0
^SCR("W4LEVTYP","P",35,"FNC")

^SCR("W4LEVTYP","P",35,"GLOB")
^NAME
^SCR("W4LEVTYP","P",35,"HELP")

^SCR("W4LEVTYP","P",35,"LMAX")
5
^SCR("W4LEVTYP","P",35,"MUMPS1")

^SCR("W4LEVTYP","P",35,"MUMPS2")

^SCR("W4LEVTYP","P",35,"NLN")
20
^SCR("W4LEVTYP","P",35,"RZD")
\
^SCR("W4LEVTYP","P",35,"TOPB")
8
^SCR("W4LEVTYP","P",35,"TYP")
E
^SCR("W4LEVTYP","P",35,"VRB")
MESTR1
^SCR("W4LEVTYP","P",36,"CRD")
5,56,H,14
^SCR("W4LEVTYP","P",36,"HELP")

^SCR("W4LEVTYP","P",36,"LMAX")
14
^SCR("W4LEVTYP","P",36,"MUMPS1")

^SCR("W4LEVTYP","P",36,"MUMPS2")

^SCR("W4LEVTYP","P",36,"OUTPUT")

^SCR("W4LEVTYP","P",36,"TYP")
H
^SCR("W4LEVTYP","P",37,"CRD")
4,16,E,1,0
^SCR("W4LEVTYP","P",37,"FNC")

^SCR("W4LEVTYP","P",37,"GLOB")
LEVSUGMS
^SCR("W4LEVTYP","P",37,"HELP")

^SCR("W4LEVTYP","P",37,"LMAX")
4
^SCR("W4LEVTYP","P",37,"MUMPS1")

^SCR("W4LEVTYP","P",37,"MUMPS2")

^SCR("W4LEVTYP","P",37,"NLN")
20
^SCR("W4LEVTYP","P",37,"RZD")
\
^SCR("W4LEVTYP","P",37,"TOPB")
8
^SCR("W4LEVTYP","P",37,"TYP")
E
^SCR("W4LEVTYP","P",37,"VRB")
ADSUGMS1
^SCR("W4LEVTYP","P",38,"CRD")
4,16,H,14
^SCR("W4LEVTYP","P",38,"HELP")

^SCR("W4LEVTYP","P",38,"LMAX")
14
^SCR("W4LEVTYP","P",38,"MUMPS1")

^SCR("W4LEVTYP","P",38,"MUMPS2")

^SCR("W4LEVTYP","P",38,"OUTPUT")

^SCR("W4LEVTYP","P",38,"TYP")
H
^SCR("W4LEVTYP","P",40,"CRD")
5,17,E,5,0
^SCR("W4LEVTYP","P",40,"FNC")

^SCR("W4LEVTYP","P",40,"GLOB")
NAME
^SCR("W4LEVTYP","P",40,"HELP")

^SCR("W4LEVTYP","P",40,"LMAX")
5
^SCR("W4LEVTYP","P",40,"MUMPS1")

^SCR("W4LEVTYP","P",40,"MUMPS2")

^SCR("W4LEVTYP","P",40,"NLN")
20
^SCR("W4LEVTYP","P",40,"RZD")
\
^SCR("W4LEVTYP","P",40,"TOPB")
8
^SCR("W4LEVTYP","P",40,"TYP")
E
^SCR("W4LEVTYP","P",40,"VRB")
ADSTR1
^SCR("W4LEVTYP","P",41,"CRD")
5,17,H,15
^SCR("W4LEVTYP","P",41,"HELP")

^SCR("W4LEVTYP","P",41,"LMAX")
15
^SCR("W4LEVTYP","P",41,"MUMPS1")

^SCR("W4LEVTYP","P",41,"MUMPS2")

^SCR("W4LEVTYP","P",41,"OUTPUT")

^SCR("W4LEVTYP","P",41,"TYP")
H
^SCR("W4LEVTYP","P",45,"CRD")
6,46,B,1,0
^SCR("W4LEVTYP","P",45,"HELP")

^SCR("W4LEVTYP","P",45,"LMAX")
4
^SCR("W4LEVTYP","P",45,"MUMPS1")

^SCR("W4LEVTYP","P",45,"MUMPS2")

^SCR("W4LEVTYP","P",45,"MUST")

^SCR("W4LEVTYP","P",45,"TYP")
B
^SCR("W4LEVTYP","P",50,"CRD")
7,46,B,1,0
^SCR("W4LEVTYP","P",50,"HELP")

^SCR("W4LEVTYP","P",50,"LMAX")
4
^SCR("W4LEVTYP","P",50,"MUMPS1")

^SCR("W4LEVTYP","P",50,"MUMPS2")

^SCR("W4LEVTYP","P",50,"TYP")
B
^SCR("W4LEVTYP","P",55,"CRD")
8,37,B,1,0
^SCR("W4LEVTYP","P",55,"HELP")

^SCR("W4LEVTYP","P",55,"LMAX")
4
^SCR("W4LEVTYP","P",55,"MUMPS1")
S:FLDAF="" FLDAF=1
^SCR("W4LEVTYP","P",55,"MUMPS2")

^SCR("W4LEVTYP","P",55,"TYP")
B
^SCR("W4LEVTYP","P","NAME","ADDAT")
10
^SCR("W4LEVTYP","P","NAME","ADSTR1")
41
^SCR("W4LEVTYP","P","NAME","ADSTRING")
40
^SCR("W4LEVTYP","P","NAME","ADSUG")
30
^SCR("W4LEVTYP","P","NAME","ADSUG1")
31
^SCR("W4LEVTYP","P","NAME","ADSUGMS")
37
^SCR("W4LEVTYP","P","NAME","ADSUGMS1")
38
^SCR("W4LEVTYP","P","NAME","FLDAF")
55
^SCR("W4LEVTYP","P","NAME","FLSLR")
50
^SCR("W4LEVTYP","P","NAME","KVUZA")
45
^SCR("W4LEVTYP","P","NAME","MEDAT")
5
^SCR("W4LEVTYP","P","NAME","MESTR1")
36
^SCR("W4LEVTYP","P","NAME","MESTRING")
35
^SCR("W4LEVTYP","P","NAME","MESUG")
25
^SCR("W4LEVTYP","P","NAME","MESUG1")
26
^SCR("W4LEVTYP","P","NAME","MESUGMS")
33
^SCR("W4LEVTYP","P","NAME","MESUGMS1")
34
^SCR("W4LEVTYP","P","NM",5)
MEDAT
^SCR("W4LEVTYP","P","NM",10)
ADDAT
^SCR("W4LEVTYP","P","NM",25)
MESUG
^SCR("W4LEVTYP","P","NM",26)
MESUG1
^SCR("W4LEVTYP","P","NM",30)
ADSUG
^SCR("W4LEVTYP","P","NM",31)
ADSUG1
^SCR("W4LEVTYP","P","NM",33)
MESUGMS
^SCR("W4LEVTYP","P","NM",34)
MESUGMS1
^SCR("W4LEVTYP","P","NM",35)
MESTRING
^SCR("W4LEVTYP","P","NM",36)
MESTR1
^SCR("W4LEVTYP","P","NM",37)
ADSUGMS
^SCR("W4LEVTYP","P","NM",38)
ADSUGMS1
^SCR("W4LEVTYP","P","NM",40)
ADSTRING
^SCR("W4LEVTYP","P","NM",41)
ADSTR1
^SCR("W4LEVTYP","P","NM",45)
KVUZA
^SCR("W4LEVTYP","P","NM",50)
FLSLR
^SCR("W4LEVTYP","P","NM",55)
FLDAF
^SCR("W4LKHMGR")
H
^SCR("W4LKHMGR",1)
                             {                                    5}: wqrd my  
^SCR("W4LKHMGR",2)
                                                {20         }:dyxen wqer xtqn  
^SCR("W4LKHMGR",3)
  {25                                                       }:     LOGO zpenz  
^SCR("W4LKHMGR",4)
                                           {27 } : zxzek mewna geex zexey 'qn  
^SCR("W4LKHMGR",5)
                                                                               
^SCR("W4LKHMGR",6)
                                       {30     }:       zipeayg ly izlgzd 'qn  
^SCR("W4LKHMGR",7)
                                       {33     }: iekif zipeayg ly izlgzd 'qn  
^SCR("W4LKHMGR",8)
                                       {35     }:   gelyn zcerz ly izlgzd 'qn  
^SCR("W4LKHMGR",9)
                                       {37     }:          dlaw ly izlgzd 'qn  
^SCR("W4LKHMGR",10)
                                       {40     }:  dlaw/qn 'ayg ly izlgzd 'qn  
^SCR("W4LKHMGR",11)
                                  {45 }: gelyn zcerze dlaw/qn 'ayga mekq lbrl  
^SCR("W4LKHMGR",12)
                                        {46 } : il`ixq xtqn millek miknqn m`d  
^SCR("W4LKHMGR",13)
                            {47 }:(lcgn zxixa ) n"rn llek gewll hixt xign m`d  
^SCR("W4LKHMGR",14)
                                          {50 } :    znyex dtewk dcear divte`  
^SCR("W4LKHMGR",15)
                                      {55 } :oetqndn i`xy` iqihxk zlaw divte`  
^SCR("W4LKHMGR",16)
                                      {60 } :          zayayg mr dcear divte`  
^SCR("W4LKHMGR",17)
                                      {65 } :           i`lnd mr dcear divte`  
^SCR("W4LKHMGR",18)
                                      {67 } :      mirav zlah mr dcear divte`  
^SCR("W4LKHMGR",19)
                                      {69 } :      zecin zlah mr dcear divte`  
^SCR("W4LKHMGR",20)
                                      {71 } :         xf rahn mr dcear divte`  
^SCR("W4LKHMGR",21)
  {73                                     } :         l"`ec gelyl dvign dfi`n  
^SCR("W4LKHMGR",22)
  {75                                                      }:     l"`ec gleyd  
^SCR("W4LKHMGR",23)
            {77                                            }:            SMTP  
^SCR("W4LKHMGR",24)
            {79                                            }: l"`ec ynzyn cew  
^SCR("W4LKHMGR",25)
                                         {81               }:    l"`ecl dnqiq  
^SCR("W4LKHMGR",26)
                                                                              
^SCR("W4LKHMGR","A",1)
:—‘’„�™
^SCR("W4LKHMGR","A",2)
:„™˜…Ž—‘…’˜”‘Ž
^SCR("W4LKHMGR","A",3)
:LOGOš�…Žš
^SCR("W4LKHMGR","A",4)
:š˜š…‹�…—Ž�‡……˜š…˜…™'‘Ž
^SCR("W4LKHMGR","A",5)

^SCR("W4LKHMGR","A",6)
:š‰�…�™‡Œ™‰šŒ‡š„'‘Ž
^SCR("W4LKHMGR","A",7)
:‰…‹‰†š‰�…�™‡Œ™‰šŒ‡š„'‘Ž
^SCR("W4LKHMGR","A",8)
:‡…Œ™Žšƒ…’šŒ™‰šŒ‡š„'‘Ž
^SCR("W4LKHMGR","A",9)
:„Œ�—Œ™‰šŒ‡š„'‘Ž
^SCR("W4LKHMGR","A",10)
:„Œ�—/‘Ž'�™‡Œ™‰šŒ‡š„'‘Ž
^SCR("W4LKHMGR","A",11)
:‡…Œ™Žšƒ…’š…„Œ�—/‘Ž'�™‡��…‹‘Œ‚’Œ
^SCR("W4LKHMGR","A",12)
:‰Œ€‰˜‘˜”‘Ž�‰ŒŒ…‹�‰‹Ž‘Ž�€„
^SCR("W4LKHMGR","A",13)
:(Œƒ‡Žš˜‰˜�)Ž"’ŽŒŒ…‹‡…—ŒŒˆ‰˜”˜‰‡Ž�€„
^SCR("W4LKHMGR","A",14)
:šŽ™…˜„”…—‹„ƒ…�’„‰–”…€
^SCR("W4LKHMGR","A",15)
:�…”‘Ž„Ž‰€˜™€‰‘‰ˆ˜‹šŒ�—„‰–”…€
^SCR("W4LKHMGR","A",16)
:š�™�™‡�’„ƒ…�’„‰–”…€
^SCR("W4LKHMGR","A",17)
:‰€ŒŽ„�’„ƒ…�’„‰–”…€
^SCR("W4LKHMGR","A",18)
:�‰’�–šŒ�ˆ�’„ƒ…�’„‰–”…€
^SCR("W4LKHMGR","A",19)
:š…ƒ‰ŽšŒ�ˆ�’„ƒ…�’„‰–”…€
^SCR("W4LKHMGR","A",20)
:˜†’�ˆŽ�’„ƒ…�’„‰–”…€
^SCR("W4LKHMGR","A",21)
:Œ"€…ƒ‡…Œ™Œ„–‰‡Ž„†‰€Ž
^SCR("W4LKHMGR","A",22)
:Œ"€…ƒ‡Œ…™„
^SCR("W4LKHMGR","A",23)
:SMTP
^SCR("W4LKHMGR","A",24)
:Œ"€…ƒ™Žš™Žƒ…—
^SCR("W4LKHMGR","A",25)
:Œ"€…ƒŒ„Ž‘‰‘
^SCR("W4LKHMGR","A",26)

^SCR("W4LKHMGR","AV",1)
:exgvoa
^SCR("W4LKHMGR","AV",2)
:varunexugrpxn
^SCR("W4LKHMGR","AV",3)
:LOGO,bun,
^SCR("W4LKHMGR","AV",4)
:,r,ufouencjuur,uruawxn
^SCR("W4LKHMGR","AV",5)

^SCR("W4LKHMGR","AV",6)
:,hbucajkah,kj,vwxn
^SCR("W4LKHMGR","AV",7)
:hufhz,hbucajkah,kj,vwxn
^SCR("W4LKHMGR","AV",8)
:jukan,sug,kah,kj,vwxn
^SCR("W4LKHMGR","AV",9)
:vkcekah,kj,vwxn
^SCR("W4LKHMGR","AV",10)
:vkceqxnwcajkah,kj,vwxn
^SCR("W4LKHMGR","AV",11)
:jukan,sug,uvkceqxnwcajcoufxkdgk
^SCR("W4LKHMGR","AV",12)
:hkthrxrpxnohkkufohfnxnotv
^SCR("W4LKHMGR","AV",13)
:(ksjn,rhrc)n"gnkkufjuekkyhrprhjnotv
^SCR("W4LKHMGR","AV",14)
:,naurvpuefvsucgvhmput
^SCR("W4LKHMGR","AV",15)
:iupxnvnhtrathxhyrf,kcevhmput
^SCR("W4LKHMGR","AV",16)
:,cacajogvsucgvhmput
^SCR("W4LKHMGR","AV",17)
:htknvogvsucgvhmput
^SCR("W4LKHMGR","AV",18)
:ohgcm,kcyogvsucgvhmput
^SCR("W4LKHMGR","AV",19)
:,ushn,kcyogvsucgvhmput
^SCR("W4LKHMGR","AV",20)
:rzgcynogvsucgvhmput
^SCR("W4LKHMGR","AV",21)
:k"tusjukakvmhjnvzhtn
^SCR("W4LKHMGR","AV",22)
:k"tusjkuav
^SCR("W4LKHMGR","AV",23)
:SMTP
^SCR("W4LKHMGR","AV",24)
:k"tusan,ansue
^SCR("W4LKHMGR","AV",25)
:k"tuskvnxhx
^SCR("W4LKHMGR","AV",26)

^SCR("W4LKHMGR","NAME")

^SCR("W4LKHMGR","P",5,"CRD")
1,68,H,36
^SCR("W4LKHMGR","P",5,"HELP")

^SCR("W4LKHMGR","P",5,"LMAX")
38
^SCR("W4LKHMGR","P",5,"MUMPS1")

^SCR("W4LKHMGR","P",5,"MUMPS2")

^SCR("W4LKHMGR","P",5,"MUST")

^SCR("W4LKHMGR","P",5,"TYP")
H
^SCR("W4LKHMGR","P",20,"CRD")
2,48,E,9,0
^SCR("W4LKHMGR","P",20,"HELP")

^SCR("W4LKHMGR","P",20,"LMAX")
12
^SCR("W4LKHMGR","P",20,"MUMPS1")

^SCR("W4LKHMGR","P",20,"MUMPS2")

^SCR("W4LKHMGR","P",20,"MUST")

^SCR("W4LKHMGR","P",20,"TYP")
E
^SCR("W4LKHMGR","P",25,"CRD")
3,2,E,55,0
^SCR("W4LKHMGR","P",25,"HELP")

^SCR("W4LKHMGR","P",25,"LMAX")
58
^SCR("W4LKHMGR","P",25,"MUMPS1")

^SCR("W4LKHMGR","P",25,"MUMPS2")

^SCR("W4LKHMGR","P",25,"TYP")
E
^SCR("W4LKHMGR","P",27,"CRD")
4,43,N,1,0
^SCR("W4LKHMGR","P",27,"HELP")

^SCR("W4LKHMGR","P",27,"LMAX")
4
^SCR("W4LKHMGR","P",27,"MUMPS1")

^SCR("W4LKHMGR","P",27,"MUMPS2")

^SCR("W4LKHMGR","P",27,"TYP")
N
^SCR("W4LKHMGR","P",30,"CRD")
6,39,N,8,0
^SCR("W4LKHMGR","P",30,"HELP")

^SCR("W4LKHMGR","P",30,"LMAX")
8
^SCR("W4LKHMGR","P",30,"MUMPS1")

^SCR("W4LKHMGR","P",30,"MUMPS2")

^SCR("W4LKHMGR","P",30,"TYP")
N
^SCR("W4LKHMGR","P",33,"CRD")
7,39,N,8,0
^SCR("W4LKHMGR","P",33,"HELP")

^SCR("W4LKHMGR","P",33,"LMAX")
8
^SCR("W4LKHMGR","P",33,"MUMPS1")

^SCR("W4LKHMGR","P",33,"MUMPS2")

^SCR("W4LKHMGR","P",33,"TYP")
N
^SCR("W4LKHMGR","P",35,"CRD")
8,39,N,8,0
^SCR("W4LKHMGR","P",35,"HELP")

^SCR("W4LKHMGR","P",35,"LMAX")
8
^SCR("W4LKHMGR","P",35,"MUMPS1")

^SCR("W4LKHMGR","P",35,"MUMPS2")

^SCR("W4LKHMGR","P",35,"TYP")
N
^SCR("W4LKHMGR","P",37,"CRD")
9,39,N,8,0
^SCR("W4LKHMGR","P",37,"HELP")

^SCR("W4LKHMGR","P",37,"LMAX")
8
^SCR("W4LKHMGR","P",37,"MUMPS1")

^SCR("W4LKHMGR","P",37,"MUMPS2")

^SCR("W4LKHMGR","P",37,"TYP")
N
^SCR("W4LKHMGR","P",40,"CRD")
10,39,N,8,0
^SCR("W4LKHMGR","P",40,"HELP")

^SCR("W4LKHMGR","P",40,"LMAX")
8
^SCR("W4LKHMGR","P",40,"MUMPS1")

^SCR("W4LKHMGR","P",40,"MUMPS2")

^SCR("W4LKHMGR","P",40,"TYP")
N
^SCR("W4LKHMGR","P",45,"CRD")
11,34,B,1,0
^SCR("W4LKHMGR","P",45,"HELP")

^SCR("W4LKHMGR","P",45,"LMAX")
4
^SCR("W4LKHMGR","P",45,"MUMPS1")

^SCR("W4LKHMGR","P",45,"MUMPS2")

^SCR("W4LKHMGR","P",45,"TYP")
B
^SCR("W4LKHMGR","P",46,"CRD")
12,40,B,1,0
^SCR("W4LKHMGR","P",46,"HELP")

^SCR("W4LKHMGR","P",46,"LMAX")
4
^SCR("W4LKHMGR","P",46,"MUMPS1")

^SCR("W4LKHMGR","P",46,"MUMPS2")

^SCR("W4LKHMGR","P",46,"TYP")
B
^SCR("W4LKHMGR","P",47,"CRD")
13,28,B,1,0
^SCR("W4LKHMGR","P",47,"HELP")

^SCR("W4LKHMGR","P",47,"LMAX")
4
^SCR("W4LKHMGR","P",47,"MUMPS1")

^SCR("W4LKHMGR","P",47,"MUMPS2")

^SCR("W4LKHMGR","P",47,"TYP")
B
^SCR("W4LKHMGR","P",50,"CRD")
14,42,B,1,0
^SCR("W4LKHMGR","P",50,"HELP")

^SCR("W4LKHMGR","P",50,"LMAX")
4
^SCR("W4LKHMGR","P",50,"MUMPS1")

^SCR("W4LKHMGR","P",50,"MUMPS2")

^SCR("W4LKHMGR","P",50,"TYP")
B
^SCR("W4LKHMGR","P",55,"CRD")
15,38,B,1,0
^SCR("W4LKHMGR","P",55,"HELP")

^SCR("W4LKHMGR","P",55,"LMAX")
4
^SCR("W4LKHMGR","P",55,"MUMPS1")

^SCR("W4LKHMGR","P",55,"MUMPS2")

^SCR("W4LKHMGR","P",55,"TYP")
B
^SCR("W4LKHMGR","P",60,"CRD")
16,38,B,1,0
^SCR("W4LKHMGR","P",60,"HELP")

^SCR("W4LKHMGR","P",60,"LMAX")
4
^SCR("W4LKHMGR","P",60,"MUMPS1")

^SCR("W4LKHMGR","P",60,"MUMPS2")

^SCR("W4LKHMGR","P",60,"TYP")
B
^SCR("W4LKHMGR","P",65,"CRD")
17,38,B,1,0
^SCR("W4LKHMGR","P",65,"HELP")

^SCR("W4LKHMGR","P",65,"LMAX")
4
^SCR("W4LKHMGR","P",65,"MUMPS1")

^SCR("W4LKHMGR","P",65,"MUMPS2")

^SCR("W4LKHMGR","P",65,"TYP")
B
^SCR("W4LKHMGR","P",67,"CRD")
18,38,B,1,0
^SCR("W4LKHMGR","P",67,"HELP")

^SCR("W4LKHMGR","P",67,"LMAX")
4
^SCR("W4LKHMGR","P",67,"MUMPS1")

^SCR("W4LKHMGR","P",67,"MUMPS2")

^SCR("W4LKHMGR","P",67,"TYP")
B
^SCR("W4LKHMGR","P",69,"CRD")
19,38,B,1,0
^SCR("W4LKHMGR","P",69,"HELP")

^SCR("W4LKHMGR","P",69,"LMAX")
4
^SCR("W4LKHMGR","P",69,"MUMPS1")

^SCR("W4LKHMGR","P",69,"MUMPS2")

^SCR("W4LKHMGR","P",69,"TYP")
B
^SCR("W4LKHMGR","P",71,"CRD")
20,38,B,1,0
^SCR("W4LKHMGR","P",71,"HELP")

^SCR("W4LKHMGR","P",71,"LMAX")
4
^SCR("W4LKHMGR","P",71,"MUMPS1")

^SCR("W4LKHMGR","P",71,"MUMPS2")

^SCR("W4LKHMGR","P",71,"TYP")
B
^SCR("W4LKHMGR","P",73,"CRD")
21,2,E,40,0
^SCR("W4LKHMGR","P",73,"HELP")

^SCR("W4LKHMGR","P",73,"LMAX")
40
^SCR("W4LKHMGR","P",73,"MUMPS1")

^SCR("W4LKHMGR","P",73,"MUMPS2")

^SCR("W4LKHMGR","P",73,"TYP")
E
^SCR("W4LKHMGR","P",75,"CRD")
22,2,E,57,0
^SCR("W4LKHMGR","P",75,"HELP")

^SCR("W4LKHMGR","P",75,"LMAX")
57
^SCR("W4LKHMGR","P",75,"MUMPS1")

^SCR("W4LKHMGR","P",75,"MUMPS2")

^SCR("W4LKHMGR","P",75,"TYP")
E
^SCR("W4LKHMGR","P",77,"CRD")
23,12,E,47,0
^SCR("W4LKHMGR","P",77,"HELP")

^SCR("W4LKHMGR","P",77,"LMAX")
47
^SCR("W4LKHMGR","P",77,"MUMPS1")

^SCR("W4LKHMGR","P",77,"MUMPS2")

^SCR("W4LKHMGR","P",77,"TYP")
E
^SCR("W4LKHMGR","P",79,"CRD")
24,12,E,47,0
^SCR("W4LKHMGR","P",79,"HELP")

^SCR("W4LKHMGR","P",79,"LMAX")
47
^SCR("W4LKHMGR","P",79,"MUMPS1")

^SCR("W4LKHMGR","P",79,"MUMPS2")

^SCR("W4LKHMGR","P",79,"TYP")
E
^SCR("W4LKHMGR","P",81,"CRD")
25,41,E,18,0
^SCR("W4LKHMGR","P",81,"HELP")

^SCR("W4LKHMGR","P",81,"LMAX")
18
^SCR("W4LKHMGR","P",81,"MUMPS1")

^SCR("W4LKHMGR","P",81,"MUMPS2")

^SCR("W4LKHMGR","P",81,"TYP")
E
^SCR("W4LKHMGR","P","NAME","CAJ")
55
^SCR("W4LKHMGR","P","NAME","CBIN")
37
^SCR("W4LKHMGR","P","NAME","COLOR")
67
^SCR("W4LKHMGR","P","NAME","CSR")
50
^SCR("W4LKHMGR","P","NAME","DIRFROM")
73
^SCR("W4LKHMGR","P","NAME","FROM")
75
^SCR("W4LKHMGR","P","NAME","HBIN")
30
^SCR("W4LKHMGR","P","NAME","HBZIN")
33
^SCR("W4LKHMGR","P","NAME","HMKIN")
40
^SCR("W4LKHMGR","P","NAME","HSHV")
60
^SCR("W4LKHMGR","P","NAME","IGUL")
45
^SCR("W4LKHMGR","P","NAME","LOGO")
25
^SCR("W4LKHMGR","P","NAME","MIDA")
69
^SCR("W4LKHMGR","P","NAME","MTB")
71
^SCR("W4LKHMGR","P","NAME","MURSH")
20
^SCR("W4LKHMGR","P","NAME","NAME")
5
^SCR("W4LKHMGR","P","NAME","NEWMLY")
65
^SCR("W4LKHMGR","P","NAME","NOHD")
27
^SCR("W4LKHMGR","P","NAME","PRMAM")
47
^SCR("W4LKHMGR","P","NAME","PSW")
81
^SCR("W4LKHMGR","P","NAME","SERNUM")
46
^SCR("W4LKHMGR","P","NAME","SMTP")
77
^SCR("W4LKHMGR","P","NAME","TMIN")
35
^SCR("W4LKHMGR","P","NAME","USER")
79
^SCR("W4LKHMGR","P","NM",5)
NAME
^SCR("W4LKHMGR","P","NM",20)
MURSH
^SCR("W4LKHMGR","P","NM",25)
LOGO
^SCR("W4LKHMGR","P","NM",27)
NOHD
^SCR("W4LKHMGR","P","NM",30)
HBIN
^SCR("W4LKHMGR","P","NM",33)
HBZIN
^SCR("W4LKHMGR","P","NM",35)
TMIN
^SCR("W4LKHMGR","P","NM",37)
CBIN
^SCR("W4LKHMGR","P","NM",40)
HMKIN
^SCR("W4LKHMGR","P","NM",45)
IGUL
^SCR("W4LKHMGR","P","NM",46)
SERNUM
^SCR("W4LKHMGR","P","NM",47)
PRMAM
^SCR("W4LKHMGR","P","NM",50)
CSR
^SCR("W4LKHMGR","P","NM",55)
CAJ
^SCR("W4LKHMGR","P","NM",60)
HSHV
^SCR("W4LKHMGR","P","NM",65)
NEWMLY
^SCR("W4LKHMGR","P","NM",67)
COLOR
^SCR("W4LKHMGR","P","NM",69)
MIDA
^SCR("W4LKHMGR","P","NM",71)
MTB
^SCR("W4LKHMGR","P","NM",73)
DIRFROM
^SCR("W4LKHMGR","P","NM",75)
FROM
^SCR("W4LKHMGR","P","NM",77)
SMTP
^SCR("W4LKHMGR","P","NM",79)
USER
^SCR("W4LKHMGR","P","NM",81)
PSW
^SCR("W4LKHP")
H
^SCR("W4LKHP",1)
                              # gewl qihxk #                                   
^SCR("W4LKHP",2)
     {                               10}: my {05         }:(ycg- 0) gewl xtqn  
^SCR("W4LKHP",3)
                                                                               
^SCR("W4LKHP",4)
                                {12      :oeayg                { 11}:  avn     
^SCR("W4LKHP",5)
                              {20 } 'qn {                        15}: aegx     
^SCR("W4LKHP",6)
                                   {  23} dqipk    {22 }:dxic {  21}: dnew     
^SCR("W4LKHP",7)
                   {                                             24}: dxrd     
^SCR("W4LKHP",8)
                     {                  26}:xir           {25     }: cewin     
^SCR("W4LKHP",9)
                      {28         }: ciip oetlh    {27       }:       .f.z     
^SCR("W4LKHP",10)
                      {35         }:dcear oetlh   {30        }:  zia oetlh     
^SCR("W4LKHP",11)
                      {41         }:       mcen   {40        }:        qwt     
^SCR("W4LKHP",12)
                      {42                                    }:     E-MAIL     
^SCR("W4LKHP",13)
  {48   }%:gewll dgpd {           46} {45 }:gewl beq {      44}{43}: revwn     
^SCR("W4LKHP",14)
            {50      } :   dgizt jix`z               {49     }: dcil jix`z     
^SCR("W4LKHP",15)
            {52      } : oi`eyip jix`z      {51     }:bef za/oa dcil jix`z     
^SCR("W4LKHP",16)
                                            {53     }: oecrenl dqipk jix`z     
^SCR("W4LKHP",17)
              { 57}:dpnfdl xeyi`  { 55}: dtwdl xeyi`  { 54}:    wiyl xeyi`     
^SCR("W4LKHP",18)
            {59   }:    reaw xign     {58                 }:  yelz ly ieey     
^SCR("W4LKHP",19)
         { 63}: oinfnd my  { 62}: `zknq` le`yl  {60       }:    i`xy` lceb     
^SCR("W4LKHP",20)
                           {68 }: + shey melyz  {65       }:zeipw itl dxzi     
^SCR("W4LKHP",21)
                                     {70       }: zelawe zeipeayg itl dxzi     
^SCR("W4LKHP",22)
                                                                               
^SCR("W4LKHP",23)
                                                                               
^SCR("W4LKHP","A",1)
‡…—Œ‘‰ˆ˜‹
^SCR("W4LKHP","A",2)
:�™:(™ƒ‡-0)‡…—Œ˜”‘Ž
^SCR("W4LKHP","A",3)

^SCR("W4LKHP","A",4)
:�…�™‡:�–Ž
^SCR("W4LKHP","A",5)
'‘Ž:�…‡˜
^SCR("W4LKHP","A",6)
„‘‰�‹:„˜‰ƒ:„Ž…—
^SCR("W4LKHP","A",7)
:„˜’„
^SCR("W4LKHP","A",8)
:˜‰’:ƒ…—‰Ž
^SCR("W4LKHP","A",9)
:ƒ‰‰��…”Œˆ:.†.š
^SCR("W4LKHP","A",10)
:„ƒ…�’�…”Œˆ:š‰��…”Œˆ
^SCR("W4LKHP","A",11)
:�ƒ…Ž:‘—”
^SCR("W4LKHP","A",12)
:E-MAIL
^SCR("W4LKHP","A",13)
%:‡…—ŒŒ„‡�„:‡…—Œ‚…‘:’…–—Ž
^SCR("W4LKHP","A",14)
:„‡‰š”Š‰˜€š:„ƒ‰ŒŠ‰˜€š
^SCR("W4LKHP","A",15)
:�‰€…™‰�Š‰˜€š:‚…†š�/��„ƒ‰ŒŠ‰˜€š
^SCR("W4LKHP","A",16)
:�…ƒ’…ŽŒ„‘‰�‹Š‰˜€š
^SCR("W4LKHP","A",17)
:„�Ž†„Œ˜…™‰€:„”—„Œ˜…™‰€:—‰™Œ˜…™‰€
^SCR("W4LKHP","A",18)
:’…�—˜‰‡Ž:™…ŒšŒ™‰……™
^SCR("W4LKHP","A",19)
:�‰Ž†Ž„�™:€š‹Ž‘€Œ…€™Œ:‰€˜™€Œƒ…‚
^SCR("W4LKHP","A",20)
:+“ˆ…™�…Œ™š:š…‰�—‰”Œ„˜š‰
^SCR("W4LKHP","A",21)
:š…Œ�—…š…‰�…�™‡‰”Œ„˜š‰
^SCR("W4LKHP","A",22)

^SCR("W4LKHP","A",23)

^SCR("W4LKHP","AV",1)
juekxhyrf
^SCR("W4LKHP","AV",2)
:oa:(asj-0)juekrpxn
^SCR("W4LKHP","AV",3)

^SCR("W4LKHP","AV",4)
:iucaj:cmn
^SCR("W4LKHP","AV",5)
wxn:cujr
^SCR("W4LKHP","AV",6)
vxhbf:vrhs:vnue
^SCR("W4LKHP","AV",7)
:vrgv
^SCR("W4LKHP","AV",8)
:rhg:suehn
^SCR("W4LKHP","AV",9)
:shhbiupky:/z/,
^SCR("W4LKHP","AV",10)
:vsucgiupky:,hciupky
^SCR("W4LKHP","AV",11)
:osun:xep
^SCR("W4LKHP","AV",12)
:E-MAIL
^SCR("W4LKHP","AV",13)
%:juekkvjbv:juekdux:gumen
^SCR("W4LKHP","AV",14)
:vjh,plhrt,:vshklhrt,
^SCR("W4LKHP","AV",15)
:ihtuahblhrt,:duz,cqicvshklhrt,
^SCR("W4LKHP","AV",16)
:iusgunkvxhbflhrt,
^SCR("W4LKHP","AV",17)
:vbnzvkruaht:vpevkruaht:ehakruaht
^SCR("W4LKHP","AV",18)
:gucerhjn:auk,kahuua
^SCR("W4LKHP","AV",19)
:ihnznvoa:t,fnxtkutak:htratksud
^SCR("W4LKHP","AV",20)
:+;yuaouka,:,uhbehpkvr,h
^SCR("W4LKHP","AV",21)
:,ukceu,uhbucajhpkvr,h
^SCR("W4LKHP","AV",22)

^SCR("W4LKHP","AV",23)

^SCR("W4LKHP","NAME")

^SCR("W4LKHP","P",5,"CRD")
2,45,E,12,0
^SCR("W4LKHP","P",5,"FNC")
F8,F9,F10
^SCR("W4LKHP","P",5,"GLOB")
LKH
^SCR("W4LKHP","P",5,"HELP")
<F10> oeayg itl, <F9> .f.z itl , <F8> lh itl ,<F6> my itl yetig
^SCR("W4LKHP","P",5,"LMAX")
12
^SCR("W4LKHP","P",5,"MUMPS1")
S %ZMSL("bf")="&<>SC"
^SCR("W4LKHP","P",5,"MUMPS2")
D LKH^KLLKHS
^SCR("W4LKHP","P",5,"MUST")

^SCR("W4LKHP","P",5,"NLN")
20
^SCR("W4LKHP","P",5,"RZD")
\
^SCR("W4LKHP","P",5,"TOPB")
8
^SCR("W4LKHP","P",5,"TYP")
E
^SCR("W4LKHP","P",5,"VRB")
LKH1
^SCR("W4LKHP","P",10,"CRD")
2,40,H,34
^SCR("W4LKHP","P",10,"HELP")
<F7> - dnec my mr miqihxk yetig 
^SCR("W4LKHP","P",10,"LMAX")
34
^SCR("W4LKHP","P",10,"MUMPS1")

^SCR("W4LKHP","P",10,"MUMPS2")
D BDIKA^KLLKHS
^SCR("W4LKHP","P",10,"TYP")
H
^SCR("W4LKHP","P",11,"CRD")
4,68,H,1
^SCR("W4LKHP","P",11,"HELP")
cala zepnfdl xebq - d ,xebq - q ,gezt - t
^SCR("W4LKHP","P",11,"LMAX")
4
^SCR("W4LKHP","P",11,"MUMPS1")
S:$G(MAZAV)'="q"&($G(MAZAV)'="d") MAZAV="t"
^SCR("W4LKHP","P",11,"MUMPS2")
D MAZAV^KLLKHS
^SCR("W4LKHP","P",11,"TYP")
H
^SCR("W4LKHP","P",12,"CRD")
4,32,E,8,0
^SCR("W4LKHP","P",12,"HELP")

^SCR("W4LKHP","P",12,"LMAX")
9
^SCR("W4LKHP","P",12,"MUMPS1")

^SCR("W4LKHP","P",12,"MUMPS2")

^SCR("W4LKHP","P",12,"TYP")
E
^SCR("W4LKHP","P",15,"CRD")
5,68,H,25
^SCR("W4LKHP","P",15,"HELP")

^SCR("W4LKHP","P",15,"LMAX")
27
^SCR("W4LKHP","P",15,"MUMPS1")

^SCR("W4LKHP","P",15,"MUMPS2")
S KTOV=$TR(KTOV,"{}\*","()/X")
^SCR("W4LKHP","P",15,"MUST")

^SCR("W4LKHP","P",15,"TYP")
H
^SCR("W4LKHP","P",20,"CRD")
5,30,E,3,0
^SCR("W4LKHP","P",20,"HELP")

^SCR("W4LKHP","P",20,"LMAX")
4
^SCR("W4LKHP","P",20,"MUMPS1")

^SCR("W4LKHP","P",20,"MUMPS2")

^SCR("W4LKHP","P",20,"TYP")
E
^SCR("W4LKHP","P",21,"CRD")
6,68,H,4
^SCR("W4LKHP","P",21,"HELP")

^SCR("W4LKHP","P",21,"LMAX")
5
^SCR("W4LKHP","P",21,"MUMPS1")

^SCR("W4LKHP","P",21,"MUMPS2")

^SCR("W4LKHP","P",21,"TYP")
H
^SCR("W4LKHP","P",22,"CRD")
6,51,E,4,0
^SCR("W4LKHP","P",22,"HELP")

^SCR("W4LKHP","P",22,"LMAX")
4
^SCR("W4LKHP","P",22,"MUMPS1")

^SCR("W4LKHP","P",22,"MUMPS2")

^SCR("W4LKHP","P",22,"TYP")
E
^SCR("W4LKHP","P",23,"CRD")
6,41,H,5
^SCR("W4LKHP","P",23,"HELP")

^SCR("W4LKHP","P",23,"LMAX")
5
^SCR("W4LKHP","P",23,"MUMPS1")

^SCR("W4LKHP","P",23,"MUMPS2")

^SCR("W4LKHP","P",23,"TYP")
H
^SCR("W4LKHP","P",24,"CRD")
7,68,H,48
^SCR("W4LKHP","P",24,"HELP")

^SCR("W4LKHP","P",24,"LMAX")
48
^SCR("W4LKHP","P",24,"MUMPS1")

^SCR("W4LKHP","P",24,"MUMPS2")

^SCR("W4LKHP","P",24,"TYP")
H
^SCR("W4LKHP","P",25,"CRD")
8,58,E,7,0
^SCR("W4LKHP","P",25,"HELP")

^SCR("W4LKHP","P",25,"LMAX")
8
^SCR("W4LKHP","P",25,"MUMPS1")

^SCR("W4LKHP","P",25,"MUMPS2")

^SCR("W4LKHP","P",25,"TYP")
E
^SCR("W4LKHP","P",26,"CRD")
8,43,H,20
^SCR("W4LKHP","P",26,"FNC")

^SCR("W4LKHP","P",26,"GLOB")
P1IR
^SCR("W4LKHP","P",26,"HELP")

^SCR("W4LKHP","P",26,"LMAX")
21
^SCR("W4LKHP","P",26,"MUMPS1")
S:$G(IR)="" IR=$G(^P1PRM("IR"))
^SCR("W4LKHP","P",26,"MUMPS2")

^SCR("W4LKHP","P",26,"NLN")
20
^SCR("W4LKHP","P",26,"RZD")
\
^SCR("W4LKHP","P",26,"TOPB")
8
^SCR("W4LKHP","P",26,"TYP")
H
^SCR("W4LKHP","P",26,"VRB")
IR
^SCR("W4LKHP","P",27,"CRD")
9,51,E,9,0
^SCR("W4LKHP","P",27,"HELP")

^SCR("W4LKHP","P",27,"LMAX")
10
^SCR("W4LKHP","P",27,"MUMPS1")

^SCR("W4LKHP","P",27,"MUMPS2")

^SCR("W4LKHP","P",27,"TYP")
E
^SCR("W4LKHP","P",28,"CRD")
9,22,E,11,0
^SCR("W4LKHP","P",28,"HELP")

^SCR("W4LKHP","P",28,"LMAX")
12
^SCR("W4LKHP","P",28,"MUMPS1")

^SCR("W4LKHP","P",28,"MUMPS2")

^SCR("W4LKHP","P",28,"TYP")
E
^SCR("W4LKHP","P",30,"CRD")
10,50,E,11,0
^SCR("W4LKHP","P",30,"HELP")

^SCR("W4LKHP","P",30,"LMAX")
11
^SCR("W4LKHP","P",30,"MUMPS1")

^SCR("W4LKHP","P",30,"MUMPS2")

^SCR("W4LKHP","P",30,"TYP")
E
^SCR("W4LKHP","P",35,"CRD")
10,22,E,11,0
^SCR("W4LKHP","P",35,"HELP")

^SCR("W4LKHP","P",35,"LMAX")
12
^SCR("W4LKHP","P",35,"MUMPS1")

^SCR("W4LKHP","P",35,"MUMPS2")

^SCR("W4LKHP","P",35,"TYP")
E
^SCR("W4LKHP","P",40,"CRD")
11,50,E,11,0
^SCR("W4LKHP","P",40,"HELP")

^SCR("W4LKHP","P",40,"LMAX")
11
^SCR("W4LKHP","P",40,"MUMPS1")

^SCR("W4LKHP","P",40,"MUMPS2")

^SCR("W4LKHP","P",40,"TYP")
E
^SCR("W4LKHP","P",41,"CRD")
11,22,E,11,0
^SCR("W4LKHP","P",41,"HELP")

^SCR("W4LKHP","P",41,"LMAX")
12
^SCR("W4LKHP","P",41,"MUMPS1")

^SCR("W4LKHP","P",41,"MUMPS2")

^SCR("W4LKHP","P",41,"TYP")
E
^SCR("W4LKHP","P",42,"CRD")
12,22,E,36,0
^SCR("W4LKHP","P",42,"HELP")

^SCR("W4LKHP","P",42,"LMAX")
39
^SCR("W4LKHP","P",42,"MUMPS1")

^SCR("W4LKHP","P",42,"MUMPS2")

^SCR("W4LKHP","P",42,"TYP")
E
^SCR("W4LKHP","P",43,"CHECK")
Y
^SCR("W4LKHP","P",43,"CRD")
13,63,E,3,0
^SCR("W4LKHP","P",43,"CREAT")

^SCR("W4LKHP","P",43,"FNC")

^SCR("W4LKHP","P",43,"GLOB")
MIKZ
^SCR("W4LKHP","P",43,"HELP")

^SCR("W4LKHP","P",43,"LMAX")
3
^SCR("W4LKHP","P",43,"MUMPS1")

^SCR("W4LKHP","P",43,"MUMPS2")

^SCR("W4LKHP","P",43,"NLN")
20
^SCR("W4LKHP","P",43,"NS")
zerevwn zlah
^SCR("W4LKHP","P",43,"RZD")
\
^SCR("W4LKHP","P",43,"TOPB")
8
^SCR("W4LKHP","P",43,"TYP")
E
^SCR("W4LKHP","P",43,"VRB")
MIKZ1
^SCR("W4LKHP","P",44,"CRD")
13,63,H,9
^SCR("W4LKHP","P",44,"HELP")

^SCR("W4LKHP","P",44,"LMAX")
9
^SCR("W4LKHP","P",44,"MUMPS1")

^SCR("W4LKHP","P",44,"MUMPS2")

^SCR("W4LKHP","P",44,"OUTPUT")

^SCR("W4LKHP","P",44,"TYP")
H
^SCR("W4LKHP","P",45,"CHECK")
Y
^SCR("W4LKHP","P",45,"CRD")
13,38,E,2,0
^SCR("W4LKHP","P",45,"CREAT")

^SCR("W4LKHP","P",45,"FNC")

^SCR("W4LKHP","P",45,"GLOB")
SUGL
^SCR("W4LKHP","P",45,"HELP")

^SCR("W4LKHP","P",45,"LMAX")
4
^SCR("W4LKHP","P",45,"MUMPS1")

^SCR("W4LKHP","P",45,"MUMPS2")
S:SUGL'=""&'$G(MHKV) AHUZ=+$G(^SUGL(SUGL,1))
^SCR("W4LKHP","P",45,"MUST")

^SCR("W4LKHP","P",45,"NLN")
20
^SCR("W4LKHP","P",45,"NS")
zegewl ibeq zlah
^SCR("W4LKHP","P",45,"RZD")
\
^SCR("W4LKHP","P",45,"TOPB")
8
^SCR("W4LKHP","P",45,"TYP")
E
^SCR("W4LKHP","P",45,"VRB")
SUGL1
^SCR("W4LKHP","P",46,"CRD")
13,37,H,14
^SCR("W4LKHP","P",46,"HELP")

^SCR("W4LKHP","P",46,"LMAX")
14
^SCR("W4LKHP","P",46,"MUMPS1")

^SCR("W4LKHP","P",46,"MUMPS2")

^SCR("W4LKHP","P",46,"OUTPUT")

^SCR("W4LKHP","P",46,"TYP")
H
^SCR("W4LKHP","P",48,"CRD")
13,2,N,6,2
^SCR("W4LKHP","P",48,"HELP")

^SCR("W4LKHP","P",48,"LMAX")
6
^SCR("W4LKHP","P",48,"MUMPS1")

^SCR("W4LKHP","P",48,"MUMPS2")

^SCR("W4LKHP","P",48,"OUTPUT")

^SCR("W4LKHP","P",48,"TYP")
N
^SCR("W4LKHP","P",49,"CRD")
14,53,D,8,0
^SCR("W4LKHP","P",49,"HELP")

^SCR("W4LKHP","P",49,"LMAX")
8
^SCR("W4LKHP","P",49,"MUMPS1")

^SCR("W4LKHP","P",49,"MUMPS2")

^SCR("W4LKHP","P",49,"TYP")
D
^SCR("W4LKHP","P",50,"CRD")
14,12,D,8,0
^SCR("W4LKHP","P",50,"HELP")

^SCR("W4LKHP","P",50,"LMAX")
9
^SCR("W4LKHP","P",50,"MUMPS1")

^SCR("W4LKHP","P",50,"MUMPS2")

^SCR("W4LKHP","P",50,"OUTPUT")

^SCR("W4LKHP","P",50,"TYP")
D
^SCR("W4LKHP","P",51,"CRD")
15,44,D,8,0
^SCR("W4LKHP","P",51,"HELP")

^SCR("W4LKHP","P",51,"LMAX")
8
^SCR("W4LKHP","P",51,"MUMPS1")

^SCR("W4LKHP","P",51,"MUMPS2")

^SCR("W4LKHP","P",51,"TYP")
D
^SCR("W4LKHP","P",52,"CRD")
15,12,D,8,0
^SCR("W4LKHP","P",52,"HELP")

^SCR("W4LKHP","P",52,"LMAX")
9
^SCR("W4LKHP","P",52,"MUMPS1")

^SCR("W4LKHP","P",52,"MUMPS2")

^SCR("W4LKHP","P",52,"TYP")
D
^SCR("W4LKHP","P",53,"CRD")
16,44,D,8,0
^SCR("W4LKHP","P",53,"HELP")

^SCR("W4LKHP","P",53,"LMAX")
8
^SCR("W4LKHP","P",53,"MUMPS1")

^SCR("W4LKHP","P",53,"MUMPS2")

^SCR("W4LKHP","P",53,"OUTPUT")

^SCR("W4LKHP","P",53,"TYP")
D
^SCR("W4LKHP","P",54,"CRD")
17,59,H,1
^SCR("W4LKHP","P",54,"HELP")

^SCR("W4LKHP","P",54,"LMAX")
4
^SCR("W4LKHP","P",54,"MUMPS1")
S:$G(ICH)="" ICH="k"
^SCR("W4LKHP","P",54,"MUMPS2")
I $$^%L1YN("ICH")<0 S %SC("ER")=1
^SCR("W4LKHP","P",54,"TYP")
H
^SCR("W4LKHP","P",55,"CRD")
17,39,H,1
^SCR("W4LKHP","P",55,"HELP")

^SCR("W4LKHP","P",55,"LMAX")
4
^SCR("W4LKHP","P",55,"MUMPS1")
S:$G(ICR)="" ICR="k"
^SCR("W4LKHP","P",55,"MUMPS2")
S:ICR="F" ICR="k" S:ICR="K" ICR="l" I ICR'="k",ICR'="l" S %SC("ER")=1
^SCR("W4LKHP","P",55,"MUST")

^SCR("W4LKHP","P",55,"TYP")
H
^SCR("W4LKHP","P",57,"CRD")
17,19,H,1
^SCR("W4LKHP","P",57,"HELP")

^SCR("W4LKHP","P",57,"LMAX")
4
^SCR("W4LKHP","P",57,"MUMPS1")
S:'$G(IHZM) IHZM="k"
^SCR("W4LKHP","P",57,"MUMPS2")
S:IHZM="F" IHZM="k" S:IHZM="K" IHZM="l" I IHZM'="k",IHZM'="l" S %SC("ER")=1
^SCR("W4LKHP","P",57,"MUST")

^SCR("W4LKHP","P",57,"TYP")
H
^SCR("W4LKHP","P",58,"CRD")
18,38,E,13,0
^SCR("W4LKHP","P",58,"HELP")
qepea - g"y 6  , zelr - g"y 25 dti` , 31=25+6 : lynl
^SCR("W4LKHP","P",58,"LMAX")
20
^SCR("W4LKHP","P",58,"MUMPS1")

^SCR("W4LKHP","P",58,"MUMPS2")
D TLUSH^KLLKHS
^SCR("W4LKHP","P",58,"TYP")
E
^SCR("W4LKHP","P",59,"CRD")
18,12,N,6,2
^SCR("W4LKHP","P",59,"HELP")

^SCR("W4LKHP","P",59,"LMAX")
6
^SCR("W4LKHP","P",59,"MUMPS1")

^SCR("W4LKHP","P",59,"MUMPS2")

^SCR("W4LKHP","P",59,"TYP")
N
^SCR("W4LKHP","P",60,"CRD")
19,48,N,10,2
^SCR("W4LKHP","P",60,"HELP")

^SCR("W4LKHP","P",60,"LMAX")
10
^SCR("W4LKHP","P",60,"MUMPS1")
S:'$G(GDCR) GDCR=$G(^P1PRM("GDCR"),2000)
^SCR("W4LKHP","P",60,"MUMPS2")

^SCR("W4LKHP","P",60,"MUST")

^SCR("W4LKHP","P",60,"TYP")
N
^SCR("W4LKHP","P",62,"CRD")
19,32,H,1
^SCR("W4LKHP","P",62,"HELP")

^SCR("W4LKHP","P",62,"LMAX")
4
^SCR("W4LKHP","P",62,"MUMPS1")
S:$G(ASM)="" ASM="l"
^SCR("W4LKHP","P",62,"MUMPS2")
I $$^%L1YN("ASM")<0 S %SC("ER")=1
^SCR("W4LKHP","P",62,"TYP")
H
^SCR("W4LKHP","P",63,"CRD")
19,14,H,1
^SCR("W4LKHP","P",63,"HELP")

^SCR("W4LKHP","P",63,"LMAX")
4
^SCR("W4LKHP","P",63,"MUMPS1")
S:$G(MZM)="" MZM="l"
^SCR("W4LKHP","P",63,"MUMPS2")
I $$^%L1YN("MZM")<0 S %SC("ER")=1
^SCR("W4LKHP","P",63,"MUST")

^SCR("W4LKHP","P",63,"TYP")
H
^SCR("W4LKHP","P",65,"CRD")
20,48,N,10,2
^SCR("W4LKHP","P",65,"HELP")

^SCR("W4LKHP","P",65,"LMAX")
10
^SCR("W4LKHP","P",65,"MUMPS1")

^SCR("W4LKHP","P",65,"MUMPS2")

^SCR("W4LKHP","P",65,"OUTPUT")

^SCR("W4LKHP","P",65,"TYP")
N
^SCR("W4LKHP","P",68,"CRD")
20,27,N,3,0
^SCR("W4LKHP","P",68,"HELP")

^SCR("W4LKHP","P",68,"LMAX")
4
^SCR("W4LKHP","P",68,"MUMPS1")

^SCR("W4LKHP","P",68,"MUMPS2")

^SCR("W4LKHP","P",68,"TYP")
N
^SCR("W4LKHP","P",70,"CRD")
21,37,N,10,2
^SCR("W4LKHP","P",70,"HELP")

^SCR("W4LKHP","P",70,"LMAX")
10
^SCR("W4LKHP","P",70,"MUMPS1")

^SCR("W4LKHP","P",70,"MUMPS2")

^SCR("W4LKHP","P",70,"OUTPUT")

^SCR("W4LKHP","P",70,"TYP")
N
^SCR("W4LKHP","P","NAME","AHUZ")
48
^SCR("W4LKHP","P","NAME","AHUZ","REF")
$P($G(^VRM($P,LKH,2)),"*",7)
^SCR("W4LKHP","P","NAME","AHUZ","REF1")
$P(^VRM($P,LKH,2),"*",7)
^SCR("W4LKHP","P","NAME","ASM")
62
^SCR("W4LKHP","P","NAME","ASM","REF")
$P($G(^VRM($P,LKH,2)),"*",12)
^SCR("W4LKHP","P","NAME","ASM","REF1")
$P(^VRM($P,LKH,2),"*",12)
^SCR("W4LKHP","P","NAME","BAIT")
20
^SCR("W4LKHP","P","NAME","BAIT","REF")
$P($G(^VRM($P,LKH,1)),"*",3)
^SCR("W4LKHP","P","NAME","BAIT","REF1")
$P(^VRM($P,LKH,1),"*",3)
^SCR("W4LKHP","P","NAME","CMNT")
24
^SCR("W4LKHP","P","NAME","CMNT","REF")
$P($G(^VRM($P,LKH,1)),"*",10)
^SCR("W4LKHP","P","NAME","CMNT","REF1")
$P(^VRM($P,LKH,1),"*",10)
^SCR("W4LKHP","P","NAME","CNISA")
23
^SCR("W4LKHP","P","NAME","CNISA","REF")
$P($G(^VRM($P,LKH,1)),"*",9)
^SCR("W4LKHP","P","NAME","CNISA","REF1")
$P(^VRM($P,LKH,1),"*",9)
^SCR("W4LKHP","P","NAME","DATPTH")
50
^SCR("W4LKHP","P","NAME","DATPTH","REF")
$P($G(^VRM($P,LKH,2)),"*",13)
^SCR("W4LKHP","P","NAME","DATPTH","REF1")
$P(^VRM($P,LKH,2),"*",13)
^SCR("W4LKHP","P","NAME","DIRA")
22
^SCR("W4LKHP","P","NAME","DIRA","REF")
$P($G(^VRM($P,LKH,1)),"*",6)
^SCR("W4LKHP","P","NAME","DIRA","REF1")
$P(^VRM($P,LKH,1),"*",6)
^SCR("W4LKHP","P","NAME","EMAIL")
42
^SCR("W4LKHP","P","NAME","EMAIL","REF")
$P($G(^VRM($P,LKH,2)),"*",22)
^SCR("W4LKHP","P","NAME","EMAIL","REF1")
$P(^VRM($P,LKH,2),"*",22)
^SCR("W4LKHP","P","NAME","FAX")
40
^SCR("W4LKHP","P","NAME","FAX","REF")
$P($G(^VRM($P,LKH,1)),"*",15)
^SCR("W4LKHP","P","NAME","FAX","REF1")
$P(^VRM($P,LKH,1),"*",15)
^SCR("W4LKHP","P","NAME","GDCR")
60
^SCR("W4LKHP","P","NAME","GDCR","REF")
$P($G(^VRM($P,LKH,2)),"*",3)
^SCR("W4LKHP","P","NAME","GDCR","REF1")
$P(^VRM($P,LKH,2),"*",3)
^SCR("W4LKHP","P","NAME","HAGAA","REF")
$P($G(^VRM($P,LKH,3)),"*",1)
^SCR("W4LKHP","P","NAME","HAGAA","REF1")
$P(^VRM($P,LKH,3),"*",1)
^SCR("W4LKHP","P","NAME","HESB")
12
^SCR("W4LKHP","P","NAME","HESB","REF")
$P($G(^VRM($P,LKH,1)),"*",1)
^SCR("W4LKHP","P","NAME","HESB","REF1")
$P(^VRM($P,LKH,1),"*",1)
^SCR("W4LKHP","P","NAME","ICH")
54
^SCR("W4LKHP","P","NAME","ICH","REF")
$P($G(^VRM($P,LKH,2)),"*",1)
^SCR("W4LKHP","P","NAME","ICH","REF1")
$P(^VRM($P,LKH,2),"*",1)
^SCR("W4LKHP","P","NAME","ICR")
55
^SCR("W4LKHP","P","NAME","ICR","REF")
$P($G(^VRM($P,LKH,2)),"*",2)
^SCR("W4LKHP","P","NAME","ICR","REF1")
$P(^VRM($P,LKH,2),"*",2)
^SCR("W4LKHP","P","NAME","IHZM")
57
^SCR("W4LKHP","P","NAME","IHZM","REF")
$P($G(^VRM($P,LKH,2)),"*",8)
^SCR("W4LKHP","P","NAME","IHZM","REF1")
$P(^VRM($P,LKH,2),"*",8)
^SCR("W4LKHP","P","NAME","INTERES","REF")
$P($G(^VRM($P,LKH,3)),"*",2)
^SCR("W4LKHP","P","NAME","INTERES","REF1")
$P(^VRM($P,LKH,3),"*",2)
^SCR("W4LKHP","P","NAME","IR")
26
^SCR("W4LKHP","P","NAME","IR","REF")
$P($G(^VRM($P,LKH,1)),"*",13)
^SCR("W4LKHP","P","NAME","IR","REF1")
$P(^VRM($P,LKH,1),"*",13)
^SCR("W4LKHP","P","NAME","ITRA")
65
^SCR("W4LKHP","P","NAME","ITRA","REF")
$P($G(^VRM($P,LKH,2)),"*",4)
^SCR("W4LKHP","P","NAME","ITRA","REF1")
$P(^VRM($P,LKH,2),"*",4)
^SCR("W4LKHP","P","NAME","ITRAH")
70
^SCR("W4LKHP","P","NAME","JOMH")
49
^SCR("W4LKHP","P","NAME","JOMH","REF")
$P($G(^VRM($P,LKH,1)),"*",17)
^SCR("W4LKHP","P","NAME","JOMH","REF1")
$P(^VRM($P,LKH,1),"*",17)
^SCR("W4LKHP","P","NAME","JOMHBZ")
51
^SCR("W4LKHP","P","NAME","JOMHBZ","REF")
$P($G(^VRM($P,LKH,2)),"*",20)
^SCR("W4LKHP","P","NAME","JOMHBZ","REF1")
$P(^VRM($P,LKH,2),"*",20)
^SCR("W4LKHP","P","NAME","JOMNS")
52
^SCR("W4LKHP","P","NAME","JOMNS","REF")
$P($G(^VRM($P,LKH,2)),"*",21)
^SCR("W4LKHP","P","NAME","JOMNS","REF1")
$P(^VRM($P,LKH,2),"*",21)
^SCR("W4LKHP","P","NAME","KODSK","REF")
$P($G(^VRM($P,LKH,2)),"*",6)
^SCR("W4LKHP","P","NAME","KODSK","REF1")
$P(^VRM($P,LKH,2),"*",6)
^SCR("W4LKHP","P","NAME","KOMA")
21
^SCR("W4LKHP","P","NAME","KOMA","REF")
$P($G(^VRM($P,LKH,1)),"*",4)
^SCR("W4LKHP","P","NAME","KOMA","REF1")
$P(^VRM($P,LKH,1),"*",4)
^SCR("W4LKHP","P","NAME","KTOV")
15
^SCR("W4LKHP","P","NAME","KTOV","REF")
$P($G(^VRM($P,LKH,1)),"*",5)
^SCR("W4LKHP","P","NAME","KTOV","REF1")
$P(^VRM($P,LKH,1),"*",5)
^SCR("W4LKHP","P","NAME","LKH")
5
^SCR("W4LKHP","P","NAME","LKH","KEY")

^SCR("W4LKHP","P","NAME","LKH","KEY",1)
LKH/\LKH1
^SCR("W4LKHP","P","NAME","LKH","KEY",2)
LKH/\HESB,TZ,BAIT,KOMA,KTOV,DIRA,TELB,TELA,CNISA,CMNT,TIDK,TIDK1,IR,MIKUD,FAX,,JOMH,MIKZ,MODEM
^SCR("W4LKHP","P","NAME","LKH","KEY",3)
LKH/\ICH,ICR,GDCR,ITRA,SUGL,KODSK,AHUZ,IHZM,YYMM,VZ,MHKV,ASM,DATPTH,SHOTEF,MZM,TRHMDL,TLUSH,MAZAV,PELE,JOMHBZ,JOMNS,EMAIL
^SCR("W4LKHP","P","NAME","LKH","KEY",4)
LKH/\HAGAA,INTERES
^SCR("W4LKHP","P","NAME","LKH1")
10
^SCR("W4LKHP","P","NAME","LKH1","REF")
$P($G(^VRM($P,LKH)),"*",1)
^SCR("W4LKHP","P","NAME","LKH1","REF1")
$P(^VRM($P,LKH),"*",1)
^SCR("W4LKHP","P","NAME","MAZAV")
11
^SCR("W4LKHP","P","NAME","MAZAV","REF")
$P($G(^VRM($P,LKH,2)),"*",18)
^SCR("W4LKHP","P","NAME","MAZAV","REF1")
$P(^VRM($P,LKH,2),"*",18)
^SCR("W4LKHP","P","NAME","MHKV")
59
^SCR("W4LKHP","P","NAME","MHKV","REF")
$P($G(^VRM($P,LKH,2)),"*",11)
^SCR("W4LKHP","P","NAME","MHKV","REF1")
$P(^VRM($P,LKH,2),"*",11)
^SCR("W4LKHP","P","NAME","MIKUD")
25
^SCR("W4LKHP","P","NAME","MIKUD","REF")
$P($G(^VRM($P,LKH,1)),"*",14)
^SCR("W4LKHP","P","NAME","MIKUD","REF1")
$P(^VRM($P,LKH,1),"*",14)
^SCR("W4LKHP","P","NAME","MIKZ")
43
^SCR("W4LKHP","P","NAME","MIKZ","REF")
$P($G(^VRM($P,LKH,1)),"*",18)
^SCR("W4LKHP","P","NAME","MIKZ","REF1")
$P(^VRM($P,LKH,1),"*",18)
^SCR("W4LKHP","P","NAME","MIKZ1")
44
^SCR("W4LKHP","P","NAME","MODEM")
41
^SCR("W4LKHP","P","NAME","MODEM","REF")
$P($G(^VRM($P,LKH,1)),"*",19)
^SCR("W4LKHP","P","NAME","MODEM","REF1")
$P(^VRM($P,LKH,1),"*",19)
^SCR("W4LKHP","P","NAME","MZM")
63
^SCR("W4LKHP","P","NAME","MZM","REF")
$P($G(^VRM($P,LKH,2)),"*",15)
^SCR("W4LKHP","P","NAME","MZM","REF1")
$P(^VRM($P,LKH,2),"*",15)
^SCR("W4LKHP","P","NAME","PELE")
28
^SCR("W4LKHP","P","NAME","PELE","REF")
$P($G(^VRM($P,LKH,2)),"*",19)
^SCR("W4LKHP","P","NAME","PELE","REF1")
$P(^VRM($P,LKH,2),"*",19)
^SCR("W4LKHP","P","NAME","SHOTEF")
68
^SCR("W4LKHP","P","NAME","SHOTEF","REF")
$P($G(^VRM($P,LKH,2)),"*",14)
^SCR("W4LKHP","P","NAME","SHOTEF","REF1")
$P(^VRM($P,LKH,2),"*",14)
^SCR("W4LKHP","P","NAME","SUGL")
45
^SCR("W4LKHP","P","NAME","SUGL","REF")
$P($G(^VRM($P,LKH,2)),"*",5)
^SCR("W4LKHP","P","NAME","SUGL","REF1")
$P(^VRM($P,LKH,2),"*",5)
^SCR("W4LKHP","P","NAME","SUGL1")
46
^SCR("W4LKHP","P","NAME","TELA")
35
^SCR("W4LKHP","P","NAME","TELA","REF")
$P($G(^VRM($P,LKH,1)),"*",8)
^SCR("W4LKHP","P","NAME","TELA","REF1")
$P(^VRM($P,LKH,1),"*",8)
^SCR("W4LKHP","P","NAME","TELB")
30
^SCR("W4LKHP","P","NAME","TELB","REF")
$P($G(^VRM($P,LKH,1)),"*",7)
^SCR("W4LKHP","P","NAME","TELB","REF1")
$P(^VRM($P,LKH,1),"*",7)
^SCR("W4LKHP","P","NAME","TIDK","REF")
$P($G(^VRM($P,LKH,1)),"*",11)
^SCR("W4LKHP","P","NAME","TIDK","REF1")
$P(^VRM($P,LKH,1),"*",11)
^SCR("W4LKHP","P","NAME","TIDK1","REF")
$P($G(^VRM($P,LKH,1)),"*",12)
^SCR("W4LKHP","P","NAME","TIDK1","REF1")
$P(^VRM($P,LKH,1),"*",12)
^SCR("W4LKHP","P","NAME","TLUSH")
58
^SCR("W4LKHP","P","NAME","TLUSH","REF")
$P($G(^VRM($P,LKH,2)),"*",17)
^SCR("W4LKHP","P","NAME","TLUSH","REF1")
$P(^VRM($P,LKH,2),"*",17)
^SCR("W4LKHP","P","NAME","TRHMDL")
53
^SCR("W4LKHP","P","NAME","TRHMDL","REF")
$P($G(^VRM($P,LKH,2)),"*",16)
^SCR("W4LKHP","P","NAME","TRHMDL","REF1")
$P(^VRM($P,LKH,2),"*",16)
^SCR("W4LKHP","P","NAME","TZ")
27
^SCR("W4LKHP","P","NAME","TZ","REF")
$P($G(^VRM($P,LKH,1)),"*",2)
^SCR("W4LKHP","P","NAME","TZ","REF1")
$P(^VRM($P,LKH,1),"*",2)
^SCR("W4LKHP","P","NAME","VZ","REF")
$P($G(^VRM($P,LKH,2)),"*",10)
^SCR("W4LKHP","P","NAME","VZ","REF1")
$P(^VRM($P,LKH,2),"*",10)
^SCR("W4LKHP","P","NAME","YYMM","REF")
$P($G(^VRM($P,LKH,2)),"*",9)
^SCR("W4LKHP","P","NAME","YYMM","REF1")
$P(^VRM($P,LKH,2),"*",9)
^SCR("W4LKHP","P","NM",5)
LKH
^SCR("W4LKHP","P","NM",10)
LKH1
^SCR("W4LKHP","P","NM",11)
MAZAV
^SCR("W4LKHP","P","NM",12)
HESB
^SCR("W4LKHP","P","NM",15)
KTOV
^SCR("W4LKHP","P","NM",20)
BAIT
^SCR("W4LKHP","P","NM",21)
KOMA
^SCR("W4LKHP","P","NM",22)
DIRA
^SCR("W4LKHP","P","NM",23)
CNISA
^SCR("W4LKHP","P","NM",24)
CMNT
^SCR("W4LKHP","P","NM",25)
MIKUD
^SCR("W4LKHP","P","NM",26)
IR
^SCR("W4LKHP","P","NM",27)
TZ
^SCR("W4LKHP","P","NM",28)
PELE
^SCR("W4LKHP","P","NM",30)
TELB
^SCR("W4LKHP","P","NM",35)
TELA
^SCR("W4LKHP","P","NM",40)
FAX
^SCR("W4LKHP","P","NM",41)
MODEM
^SCR("W4LKHP","P","NM",42)
EMAIL
^SCR("W4LKHP","P","NM",43)
MIKZ
^SCR("W4LKHP","P","NM",44)
MIKZ1
^SCR("W4LKHP","P","NM",45)
SUGL
^SCR("W4LKHP","P","NM",46)
SUGL1
^SCR("W4LKHP","P","NM",48)
AHUZ
^SCR("W4LKHP","P","NM",49)
JOMH
^SCR("W4LKHP","P","NM",50)
DATPTH
^SCR("W4LKHP","P","NM",51)
JOMHBZ
^SCR("W4LKHP","P","NM",52)
JOMNS
^SCR("W4LKHP","P","NM",53)
TRHMDL
^SCR("W4LKHP","P","NM",54)
ICH
^SCR("W4LKHP","P","NM",55)
ICR
^SCR("W4LKHP","P","NM",57)
IHZM
^SCR("W4LKHP","P","NM",58)
TLUSH
^SCR("W4LKHP","P","NM",59)
MHKV
^SCR("W4LKHP","P","NM",60)
GDCR
^SCR("W4LKHP","P","NM",62)
ASM
^SCR("W4LKHP","P","NM",63)
MZM
^SCR("W4LKHP","P","NM",65)
ITRA
^SCR("W4LKHP","P","NM",68)
SHOTEF
^SCR("W4LKHP","P","NM",70)
ITRAH
^SCR("W4LKHP","P","REF",1)
^VRM($P,LKH)
^SCR("W4LKHP","P","REF",1,"RZD")
*
^SCR("W4LKHP","P","REF",1,"STR")
LKH1
^SCR("W4LKHP","P","REF",2)
^VRM($P,LKH,1)
^SCR("W4LKHP","P","REF",2,"RZD")
*
^SCR("W4LKHP","P","REF",2,"STR")
HESB*TZ*BAIT*KOMA*KTOV*DIRA*TELB*TELA*CNISA*CMNT*TIDK*TIDK1*IR*MIKUD*FAX**JOMH*MIKZ*MODEM
^SCR("W4LKHP","P","REF",3)
^VRM($P,LKH,2)
^SCR("W4LKHP","P","REF",3,"RZD")
*
^SCR("W4LKHP","P","REF",3,"STR")
ICH*ICR*GDCR*ITRA*SUGL*KODSK*AHUZ*IHZM*YYMM*VZ*MHKV*ASM*DATPTH*SHOTEF*MZM*TRHMDL*TLUSH*MAZAV*PELE*JOMHBZ*JOMNS*EMAIL
^SCR("W4LKHP","P","REF",4)
^VRM($P,LKH,3)
^SCR("W4LKHP","P","REF",4,"RZD")
*
^SCR("W4LKHP","P","REF",4,"STR")
HAGAA*INTERES
^SCR("W4LKHPRM")
H
^SCR("W4LKHPRM",1)
                                                                               
^SCR("W4LKHPRM",2)
                                                                     1]        
^SCR("W4LKHPRM",3)
              {                                      10}: wqr ly zaezk         
^SCR("W4LKHPRM",4)
         {                                     11} : x`ec zgilyl zaezk         
^SCR("W4LKHPRM",5)
                                                 {12        }:     'lh         
^SCR("W4LKHPRM",6)
                                                 {15        }:    ciip         
^SCR("W4LKHPRM",7)
                                                 {17        }:     qwt         
^SCR("W4LKHPRM",8)
                    {20                                 }:       l"`ec         
^SCR("W4LKHPRM",9)
               {22                                      }: hpxhpi` xz`         
^SCR("W4LKHPRM",10)
                                             {23        }:  dyxen wqer         
^SCR("W4LKHPRM",11)
       {45                                             }: zkxrn ly xz`         
^SCR("W4LKHPRM",12)
                                                                               
^SCR("W4LKHPRM",13)
    [1                                                                         
^SCR("W4LKHPRM",14)
                                                                               
^SCR("W4LKHPRM","AV",1)

^SCR("W4LKHPRM","AV",2)

^SCR("W4LKHPRM","AV",3)
:÷ñòìùúáåúë
^SCR("W4LKHPRM","AV",4)
:øàåãúçéìùìúáåúë
^SCR("W4LKHPRM","AV",5)
:'ìè
^SCR("W4LKHPRM","AV",6)
:ãééð
^SCR("W4LKHPRM","AV",7)
:ñ÷ô
^SCR("W4LKHPRM","AV",8)
:ì"àåã
^SCR("W4LKHPRM","AV",9)
:èðøèðéàøúà
^SCR("W4LKHPRM","AV",10)
:äùøåî÷ñåò
^SCR("W4LKHPRM","AV",11)
:úëøòîìùøúà
^SCR("W4LKHPRM","AV",12)

^SCR("W4LKHPRM","AV",13)

^SCR("W4LKHPRM","AV",14)

^SCR("W4LKHPRM","NAME")
wqrd ihxt
^SCR("W4LKHPRM","P",10,"CRD")
3,56,H,40
^SCR("W4LKHPRM","P",10,"HELP")

^SCR("W4LKHPRM","P",10,"LMAX")
41
^SCR("W4LKHPRM","P",10,"MUMPS1")

^SCR("W4LKHPRM","P",10,"MUMPS2")

^SCR("W4LKHPRM","P",10,"MUST")

^SCR("W4LKHPRM","P",10,"TYP")
H
^SCR("W4LKHPRM","P",11,"CRD")
4,50,H,40
^SCR("W4LKHPRM","P",11,"HELP")

^SCR("W4LKHPRM","P",11,"LMAX")
40
^SCR("W4LKHPRM","P",11,"MUMPS1")

^SCR("W4LKHPRM","P",11,"MUMPS2")

^SCR("W4LKHPRM","P",11,"TYP")
H
^SCR("W4LKHPRM","P",12,"CRD")
5,49,E,11,0
^SCR("W4LKHPRM","P",12,"HELP")

^SCR("W4LKHPRM","P",12,"LMAX")
11
^SCR("W4LKHPRM","P",12,"MUMPS1")

^SCR("W4LKHPRM","P",12,"MUMPS2")

^SCR("W4LKHPRM","P",12,"TYP")
E
^SCR("W4LKHPRM","P",15,"CRD")
6,49,E,11,0
^SCR("W4LKHPRM","P",15,"HELP")

^SCR("W4LKHPRM","P",15,"LMAX")
11
^SCR("W4LKHPRM","P",15,"MUMPS1")

^SCR("W4LKHPRM","P",15,"MUMPS2")

^SCR("W4LKHPRM","P",15,"MUST")

^SCR("W4LKHPRM","P",15,"TYP")
E
^SCR("W4LKHPRM","P",17,"CRD")
7,49,E,11,0
^SCR("W4LKHPRM","P",17,"HELP")

^SCR("W4LKHPRM","P",17,"LMAX")
11
^SCR("W4LKHPRM","P",17,"MUMPS1")

^SCR("W4LKHPRM","P",17,"MUMPS2")

^SCR("W4LKHPRM","P",17,"TYP")
E
^SCR("W4LKHPRM","P",20,"CRD")
8,20,E,35,0
^SCR("W4LKHPRM","P",20,"HELP")

^SCR("W4LKHPRM","P",20,"LMAX")
36
^SCR("W4LKHPRM","P",20,"MUMPS1")

^SCR("W4LKHPRM","P",20,"MUMPS2")

^SCR("W4LKHPRM","P",20,"MUST")

^SCR("W4LKHPRM","P",20,"TYP")
E
^SCR("W4LKHPRM","P",22,"CRD")
9,15,E,40,0
^SCR("W4LKHPRM","P",22,"HELP")

^SCR("W4LKHPRM","P",22,"LMAX")
41
^SCR("W4LKHPRM","P",22,"MUMPS1")

^SCR("W4LKHPRM","P",22,"MUMPS2")

^SCR("W4LKHPRM","P",22,"TYP")
E
^SCR("W4LKHPRM","P",23,"CRD")
10,45,E,9,0
^SCR("W4LKHPRM","P",23,"HELP")

^SCR("W4LKHPRM","P",23,"LMAX")
11
^SCR("W4LKHPRM","P",23,"MUMPS1")

^SCR("W4LKHPRM","P",23,"MUMPS2")
D ESEK^W4LKHPRM
^SCR("W4LKHPRM","P",23,"TYP")
E
^SCR("W4LKHPRM","P",45,"CRD")
11,7,E,48,0
^SCR("W4LKHPRM","P",45,"HELP")

^SCR("W4LKHPRM","P",45,"LMAX")
48
^SCR("W4LKHPRM","P",45,"MUMPS1")

^SCR("W4LKHPRM","P",45,"MUMPS2")

^SCR("W4LKHPRM","P",45,"TYP")
E
^SCR("W4LKHPRM","P","NAME","DOAR")
11
^SCR("W4LKHPRM","P","NAME","EMAIL")
20
^SCR("W4LKHPRM","P","NAME","ESEK")
23
^SCR("W4LKHPRM","P","NAME","FAX")
17
^SCR("W4LKHPRM","P","NAME","KTOV")
10
^SCR("W4LKHPRM","P","NAME","MYIP")
45
^SCR("W4LKHPRM","P","NAME","PELE")
15
^SCR("W4LKHPRM","P","NAME","SITE")
22
^SCR("W4LKHPRM","P","NAME","TEL")
12
^SCR("W4LKHPRM","P","NM",10)
KTOV
^SCR("W4LKHPRM","P","NM",11)
DOAR
^SCR("W4LKHPRM","P","NM",12)
TEL
^SCR("W4LKHPRM","P","NM",15)
PELE
^SCR("W4LKHPRM","P","NM",17)
FAX
^SCR("W4LKHPRM","P","NM",20)
EMAIL
^SCR("W4LKHPRM","P","NM",22)
SITE
^SCR("W4LKHPRM","P","NM",23)
ESEK
^SCR("W4LKHPRM","P","NM",45)
MYIP
^SCR("W4LKHPRM","P","RB",1)
3,5,14,71
^SCR("W4LKHSRV")
H
^SCR("W4LKHSRV",1)
                                                                               
^SCR("W4LKHSRV",2)
                                                                1]             
^SCR("W4LKHSRV",3)
                                                                               
^SCR("W4LKHSRV",4)
                g"y {35  }: cr gewl xeyi` yxec `ly oewiz mekq                  
^SCR("W4LKHSRV",5)
                                  mei {40 } `id oewizl zeixg`                  
^SCR("W4LKHSRV",6)
                                                                               
^SCR("W4LKHSRV",7)
             [1                                                                
^SCR("W4LKHSRV",8)
                                                                               
^SCR("W4LKHSRV","A",1)

^SCR("W4LKHSRV","A",2)

^SCR("W4LKHSRV","A",3)

^SCR("W4LKHSRV","A",4)
‡"™:ƒ’‡…—Œ˜…™‰€™˜…ƒ€Œ™�…—‰š�…‹‘
^SCR("W4LKHSRV","A",5)
�…‰€‰„�…—‰šŒš…‰˜‡€
^SCR("W4LKHSRV","A",6)

^SCR("W4LKHSRV","A",7)

^SCR("W4LKHSRV","A",8)

^SCR("W4LKHSRV","AV",1)

^SCR("W4LKHSRV","AV",2)

^SCR("W4LKHSRV","AV",3)

^SCR("W4LKHSRV","AV",4)
j"a:sgjuekruahtarustkaiueh,oufx
^SCR("W4LKHSRV","AV",5)
ouhthviueh,k,uhrjt
^SCR("W4LKHSRV","AV",6)

^SCR("W4LKHSRV","AV",7)

^SCR("W4LKHSRV","AV",8)

^SCR("W4LKHSRV","NAME")

^SCR("W4LKHSRV","P",35,"CRD")
4,20,N,5,1
^SCR("W4LKHSRV","P",35,"HELP")

^SCR("W4LKHSRV","P",35,"LMAX")
5
^SCR("W4LKHSRV","P",35,"MUMPS1")

^SCR("W4LKHSRV","P",35,"MUMPS2")

^SCR("W4LKHSRV","P",35,"TYP")
N
^SCR("W4LKHSRV","P",40,"CRD")
5,38,N,3,0
^SCR("W4LKHSRV","P",40,"HELP")

^SCR("W4LKHSRV","P",40,"LMAX")
4
^SCR("W4LKHSRV","P",40,"MUMPS1")

^SCR("W4LKHSRV","P",40,"MUMPS2")

^SCR("W4LKHSRV","P",40,"TYP")
N
^SCR("W4LKHSRV","P","NAME","NOACCSUM")
35
^SCR("W4LKHSRV","P","NAME","WARRPRD")
40
^SCR("W4LKHSRV","P","NM",35)
NOACCSUM
^SCR("W4LKHSRV","P","NM",40)
WARRPRD
^SCR("W4LKHSRV","P","RB",1)
3,14,8,66
^SCR("W4LMTHR")
H
^SCR("W4LMTHR",1)
                            {03 } : dlirt dcear zery ly zelabn zwical zkxrn m`d
^SCR("W4LMTHR",2)
                                      {05 } : mipihwl dlil zerya dcear ly dlabn
^SCR("W4LMTHR",3)
                                            {10 } : mipihwl zaya dcear lr dlabn
^SCR("W4LMTHR",4)
                                  {15 } : meia zexcben zery  lrn dcear lr dlabn
^SCR("W4LMTHR",5)
                                  {20 } : reaya zexcben zery lrn dcear lr dlabn
^SCR("W4LMTHR",6)
                                           {25 } : sevxa cearl xzeny zezay xtqn
^SCR("W4LMTHR",7)
                                                  {30 } : zyxcp dgepn zery xtqn
^SCR("W4LMTHR",8)
                                                   {35 } : meia iaxin zery xtqn
^SCR("W4LMTHR",9)
                                                  {40 } : reaya iaxin zery xtqn
^SCR("W4LMTHR","AV",1)
:äìéòôäãåáòúåòùìùúåìáâîú÷éãáìúëøòîíàä
^SCR("W4LMTHR","AV",2)
:íéðéè÷ìäìéìúåòùáäãåáòìùäìáâî
^SCR("W4LMTHR","AV",3)
:íéðéè÷ìúáùáäãåáòìòäìáâî
^SCR("W4LMTHR","AV",4)
:íåéáúåøãâåîúåòùìòîäãåáòìòäìáâî
^SCR("W4LMTHR","AV",5)
:òåáùáúåøãâåîúåòùìòîäãåáòìòäìáâî
^SCR("W4LMTHR","AV",6)
:óåöøáãåáòìøúåîùúåúáùøôñî
^SCR("W4LMTHR","AV",7)
:úùøãðäçåðîúåòùøôñî
^SCR("W4LMTHR","AV",8)
:íåéáéáøéîúåòùøôñî
^SCR("W4LMTHR","AV",9)
:òåáùáéáøéîúåòùøôñî
^SCR("W4LMTHR","NAME")
zery zelabn zlah
^SCR("W4LMTHR","P",3,"CRD")
1,28,B,1,0
^SCR("W4LMTHR","P",3,"HELP")

^SCR("W4LMTHR","P",3,"LMAX")
4
^SCR("W4LMTHR","P",3,"MUMPS1")

^SCR("W4LMTHR","P",3,"MUMPS2")

^SCR("W4LMTHR","P",3,"TYP")
B
^SCR("W4LMTHR","P",5,"CRD")
2,38,B,1,0
^SCR("W4LMTHR","P",5,"HELP")

^SCR("W4LMTHR","P",5,"LMAX")
4
^SCR("W4LMTHR","P",5,"MUMPS1")

^SCR("W4LMTHR","P",5,"MUMPS2")

^SCR("W4LMTHR","P",5,"TYP")
B
^SCR("W4LMTHR","P",10,"CRD")
3,44,B,1,0
^SCR("W4LMTHR","P",10,"HELP")

^SCR("W4LMTHR","P",10,"LMAX")
4
^SCR("W4LMTHR","P",10,"MUMPS1")

^SCR("W4LMTHR","P",10,"MUMPS2")

^SCR("W4LMTHR","P",10,"TYP")
B
^SCR("W4LMTHR","P",15,"CRD")
4,34,B,1,0
^SCR("W4LMTHR","P",15,"HELP")

^SCR("W4LMTHR","P",15,"LMAX")
4
^SCR("W4LMTHR","P",15,"MUMPS1")

^SCR("W4LMTHR","P",15,"MUMPS2")

^SCR("W4LMTHR","P",15,"TYP")
B
^SCR("W4LMTHR","P",20,"CRD")
5,34,B,1,0
^SCR("W4LMTHR","P",20,"HELP")

^SCR("W4LMTHR","P",20,"LMAX")
4
^SCR("W4LMTHR","P",20,"MUMPS1")

^SCR("W4LMTHR","P",20,"MUMPS2")

^SCR("W4LMTHR","P",20,"TYP")
B
^SCR("W4LMTHR","P",25,"CRD")
6,43,N,2,0
^SCR("W4LMTHR","P",25,"HELP")

^SCR("W4LMTHR","P",25,"LMAX")
4
^SCR("W4LMTHR","P",25,"MUMPS1")

^SCR("W4LMTHR","P",25,"MUMPS2")

^SCR("W4LMTHR","P",25,"TYP")
N
^SCR("W4LMTHR","P",30,"CRD")
7,50,N,2,0
^SCR("W4LMTHR","P",30,"HELP")

^SCR("W4LMTHR","P",30,"LMAX")
4
^SCR("W4LMTHR","P",30,"MUMPS1")

^SCR("W4LMTHR","P",30,"MUMPS2")

^SCR("W4LMTHR","P",30,"TYP")
N
^SCR("W4LMTHR","P",35,"CRD")
8,51,N,2,0
^SCR("W4LMTHR","P",35,"HELP")

^SCR("W4LMTHR","P",35,"LMAX")
4
^SCR("W4LMTHR","P",35,"MUMPS1")

^SCR("W4LMTHR","P",35,"MUMPS2")

^SCR("W4LMTHR","P",35,"TYP")
N
^SCR("W4LMTHR","P",40,"CRD")
9,50,N,2,0
^SCR("W4LMTHR","P",40,"HELP")

^SCR("W4LMTHR","P",40,"LMAX")
4
^SCR("W4LMTHR","P",40,"MUMPS1")

^SCR("W4LMTHR","P",40,"MUMPS2")

^SCR("W4LMTHR","P",40,"TYP")
N
^SCR("W4LMTHR","P","NAME","AGENIGHT")
5
^SCR("W4LMTHR","P","NAME","AGESTDY")
10
^SCR("W4LMTHR","P","NAME","AUTOUT")
3
^SCR("W4LMTHR","P","NAME","DAY")
35
^SCR("W4LMTHR","P","NAME","HRREST")
30
^SCR("W4LMTHR","P","NAME","MAXHRDAY")
15
^SCR("W4LMTHR","P","NAME","MAXHRWK")
20
^SCR("W4LMTHR","P","NAME","RESTSTDY")
25
^SCR("W4LMTHR","P","NAME","WEEK")
40
^SCR("W4LMTHR","P","NM",3)
AUTOUT
^SCR("W4LMTHR","P","NM",5)
AGENIGHT
^SCR("W4LMTHR","P","NM",10)
AGESTDY
^SCR("W4LMTHR","P","NM",15)
MAXHRDAY
^SCR("W4LMTHR","P","NM",20)
MAXHRWK
^SCR("W4LMTHR","P","NM",25)
RESTSTDY
^SCR("W4LMTHR","P","NM",30)
HRREST
^SCR("W4LMTHR","P","NM",35)
DAY
^SCR("W4LMTHR","P","NM",40)
WEEK
^SCR("W4MDP")
H
^SCR("W4MDP",1)
                                 # gahn zeqtcn ly zexbcd #                     
^SCR("W4MDP",2)
                                                                               
^SCR("W4MDP",3)
                                                                           1$  
^SCR("W4MDP",4)
        : wzrd : sevtiv :     dxrd     : hxet 'qn :   zqtcn mbc   :beq: 'qn    
^SCR("W4MDP",5)
                                                                               
^SCR("W4MDP",6)
                                                                               
^SCR("W4MDP",7)
                                                                               
^SCR("W4MDP",8)
                                                                               
^SCR("W4MDP",9)
                                                                               
^SCR("W4MDP",10)
                                                                               
^SCR("W4MDP",11)
                                                                               
^SCR("W4MDP",12)
                                                                               
^SCR("W4MDP",13)
                                                                               
^SCR("W4MDP",14)
                                                                               
^SCR("W4MDP",15)
                                                                               
^SCR("W4MDP",16)
                                                                               
^SCR("W4MDP",17)
  $1                                                                           
^SCR("W4MDP","A",1)
‡�ˆŽš…‘”ƒŽŒ™š…˜‚ƒ„
^SCR("W4MDP","A",2)

^SCR("W4MDP","A",3)

^SCR("W4MDP","A",4)
—š’„“…–”‰–„˜’„ˆ˜…”'‘Žš‘”ƒŽ�‚ƒ‚…‘'‘Ž
^SCR("W4MDP","A",5)
--------------------------------------------------------
^SCR("W4MDP","A",6)

^SCR("W4MDP","A",7)

^SCR("W4MDP","A",8)

^SCR("W4MDP","A",9)

^SCR("W4MDP","A",10)

^SCR("W4MDP","A",11)

^SCR("W4MDP","A",12)

^SCR("W4MDP","A",13)

^SCR("W4MDP","A",14)

^SCR("W4MDP","A",15)

^SCR("W4MDP","A",16)

^SCR("W4MDP","A",17)

^SCR("W4MDP","AV",1)
jcyn,uxpsnka,urdsv
^SCR("W4MDP","AV",2)

^SCR("W4MDP","AV",3)

^SCR("W4MDP","AV",4)
e,gv;umphmvrgvyrupwxn,xpsnodsduxwxn
^SCR("W4MDP","AV",5)
--------------------------------------------------------
^SCR("W4MDP","AV",6)

^SCR("W4MDP","AV",7)

^SCR("W4MDP","AV",8)

^SCR("W4MDP","AV",9)

^SCR("W4MDP","AV",10)

^SCR("W4MDP","AV",11)

^SCR("W4MDP","AV",12)

^SCR("W4MDP","AV",13)

^SCR("W4MDP","AV",14)

^SCR("W4MDP","AV",15)

^SCR("W4MDP","AV",16)

^SCR("W4MDP","AV",17)

^SCR("W4MDP","G","DEL")
Y
^SCR("W4MDP","G","MAX")
99999
^SCR("W4MDP","G","NAME","BEEP")
5
^SCR("W4MDP","G","NAME","ETEK")
6
^SCR("W4MDP","G","NAME","HRA")
4
^SCR("W4MDP","G","NAME","MDPN")
2
^SCR("W4MDP","G","NAME","MDPS")
1
^SCR("W4MDP","G","NAME","PORT")
3
^SCR("W4MDP","G","NM",1)
MDPS
^SCR("W4MDP","G","NM",2)
MDPN
^SCR("W4MDP","G","NM",3)
PORT
^SCR("W4MDP","G","NM",4)
HRA
^SCR("W4MDP","G","NM",5)
BEEP
^SCR("W4MDP","G","NM",6)
ETEK
^SCR("W4MDP","G","RB")
4,3,18,77
^SCR("W4MDP","G","REF")
^TEMP($P
^SCR("W4MDP","G","RZD")
\
^SCR("W4MDP","G","STEP")
1
^SCR("W4MDP","G","STG")
        : wzrd : sevtiv :     dxrd     : hxet 'qn :   zqtcn mbc   :beq: 'qn    
^SCR("W4MDP","G","VG")
6
^SCR("W4MDP","NAME")

^SCR("W4MDPK")
H
^SCR("W4MDPK",1)
                           # dtew zecnrl mixhnxt zxcbd #                       
^SCR("W4MDPK",2)
                                                               $               
^SCR("W4MDPK",3)
                  :lwyn beq:lwynl hxet:zqtcnl hxet:hxet xtqn:                  
^SCR("W4MDPK",4)
                                                                               
^SCR("W4MDPK",5)
                                                                               
^SCR("W4MDPK",6)
                                                                               
^SCR("W4MDPK",7)
                                                                               
^SCR("W4MDPK",8)
                                                                               
^SCR("W4MDPK",9)
                                                                               
^SCR("W4MDPK",10)
                                                                               
^SCR("W4MDPK",11)
                                                                               
^SCR("W4MDPK",12)
                                                                               
^SCR("W4MDPK",13)
                                                                               
^SCR("W4MDPK",14)
                                                                               
^SCR("W4MDPK",15)
                                                                               
^SCR("W4MDPK",16)
                                                                               
^SCR("W4MDPK",17)
                                                                               
^SCR("W4MDPK",18)
                                                                               
^SCR("W4MDPK",19)
                                                                               
^SCR("W4MDPK",20)
            $                                                                  
^SCR("W4MDPK",21)
                                                                               
^SCR("W4MDPK","A",1)
„”…—š…ƒŽ’Œ�‰˜ˆŽ˜”š˜ƒ‚„
^SCR("W4MDPK","A",2)

^SCR("W4MDPK","A",3)
Œ—™Ž‚…‘Œ—™ŽŒˆ˜…”š‘”ƒŽŒˆ˜…”ˆ˜…”˜”‘Ž
^SCR("W4MDPK","A",4)
--------------------------------------
^SCR("W4MDPK","A",5)

^SCR("W4MDPK","A",6)

^SCR("W4MDPK","A",7)

^SCR("W4MDPK","A",8)

^SCR("W4MDPK","A",9)

^SCR("W4MDPK","A",10)

^SCR("W4MDPK","A",11)

^SCR("W4MDPK","A",12)

^SCR("W4MDPK","A",13)

^SCR("W4MDPK","A",14)

^SCR("W4MDPK","A",15)

^SCR("W4MDPK","A",16)

^SCR("W4MDPK","A",17)

^SCR("W4MDPK","A",18)

^SCR("W4MDPK","A",19)

^SCR("W4MDPK","A",20)

^SCR("W4MDPK","A",21)

^SCR("W4MDPK","AV",1)
vpue,usngkohrynrp,rsdv
^SCR("W4MDPK","AV",2)

^SCR("W4MDPK","AV",3)
keanduxkeankyrup,xpsnkyrupyruprpxn
^SCR("W4MDPK","AV",4)
--------------------------------------
^SCR("W4MDPK","AV",5)

^SCR("W4MDPK","AV",6)

^SCR("W4MDPK","AV",7)

^SCR("W4MDPK","AV",8)

^SCR("W4MDPK","AV",9)

^SCR("W4MDPK","AV",10)

^SCR("W4MDPK","AV",11)

^SCR("W4MDPK","AV",12)

^SCR("W4MDPK","AV",13)

^SCR("W4MDPK","AV",14)

^SCR("W4MDPK","AV",15)

^SCR("W4MDPK","AV",16)

^SCR("W4MDPK","AV",17)

^SCR("W4MDPK","AV",18)

^SCR("W4MDPK","AV",19)

^SCR("W4MDPK","AV",20)

^SCR("W4MDPK","AV",21)

^SCR("W4MDPK","G",1,"CRD")
4,60,H,9,0
^SCR("W4MDPK","G",1,"HELP")

^SCR("W4MDPK","G",1,"LMAX")
9
^SCR("W4MDPK","G",1,"MUMPS1")

^SCR("W4MDPK","G",1,"MUMPS2")

^SCR("W4MDPK","G",1,"SHEM")
hxet xtqn
^SCR("W4MDPK","G",1,"TYP")
H
^SCR("W4MDPK","G",2,"CRD")
4,50,H,11,0
^SCR("W4MDPK","G",2,"HELP")

^SCR("W4MDPK","G",2,"LMAX")
11
^SCR("W4MDPK","G",2,"MUMPS1")

^SCR("W4MDPK","G",2,"MUMPS2")

^SCR("W4MDPK","G",2,"SHEM")
zqtcnl hxet
^SCR("W4MDPK","G",2,"TYP")
H
^SCR("W4MDPK","G",3,"CRD")
4,38,E,10,0
^SCR("W4MDPK","G",3,"HELP")

^SCR("W4MDPK","G",3,"LMAX")
10
^SCR("W4MDPK","G",3,"MUMPS1")

^SCR("W4MDPK","G",3,"MUMPS2")

^SCR("W4MDPK","G",3,"SHEM")
lwynl hxet
^SCR("W4MDPK","G",3,"TYP")
E
^SCR("W4MDPK","G",4,"CRD")
4,27,H,10,0
^SCR("W4MDPK","G",4,"HELP")

^SCR("W4MDPK","G",4,"LMAX")
10
^SCR("W4MDPK","G",4,"MUMPS1")

^SCR("W4MDPK","G",4,"MUMPS2")

^SCR("W4MDPK","G",4,"TYP")
H
^SCR("W4MDPK","G","DEL")
Y
^SCR("W4MDPK","G","MAX")
99999
^SCR("W4MDPK","G","NAME","BIT")
4
^SCR("W4MDPK","G","NAME","MDP")
2
^SCR("W4MDPK","G","NAME","MSK")
3
^SCR("W4MDPK","G","NAME","MSKS")
4
^SCR("W4MDPK","G","NAME","PORT")
1
^SCR("W4MDPK","G","NM",1)
PORT
^SCR("W4MDPK","G","NM",2)
MDP
^SCR("W4MDPK","G","NM",3)
MSK
^SCR("W4MDPK","G","NM",4)
MSKS
^SCR("W4MDPK","G","RB")
3,13,21,64
^SCR("W4MDPK","G","REF")
^MBG($P
^SCR("W4MDPK","G","RZD")
\
^SCR("W4MDPK","G","STEP")
2
^SCR("W4MDPK","G","STG")
                  :lwyn beq:lwynl hxet:zqtcnl hxet:hxet xtqn:                  
^SCR("W4MDPK","G","VG")
5
^SCR("W4MDPK","NAME")

^SCR("W4MLOPRM")
H
^SCR("W4MLOPRM",1)
                                                                               
^SCR("W4MLOPRM",2)
                # ipevig i`ln zkxrnl wynnl mixhnxt #                           
^SCR("W4MLOPRM",3)
                                                                               
^SCR("W4MLOPRM",4)
                                                                           1]  
^SCR("W4MLOPRM",5)
                   {05 } : ipevig i`ln wynnl mipezp mei zxibqa xcyl m`d        
^SCR("W4MLOPRM",6)
                                     {10              } :  xeciyl zaezk        
^SCR("W4MLOPRM",7)
                                                {15   } : i`ln fkxn 'qn        
^SCR("W4MLOPRM",8)
                                                                               
^SCR("W4MLOPRM",9)
              [1                                                               
^SCR("W4MLOPRM",10)
                                                                               
^SCR("W4MLOPRM","A",1)

^SCR("W4MLOPRM","A",2)
‰�…–‰‡‰€ŒŽš‹˜’ŽŒ—™ŽŽŒ�‰˜ˆŽ˜”
^SCR("W4MLOPRM","A",3)

^SCR("W4MLOPRM","A",4)

^SCR("W4MLOPRM","A",5)
:‰�…–‰‡‰€ŒŽ—™ŽŽŒ�‰�…š��…‰š˜‰‚‘�˜ƒ™Œ�€„
^SCR("W4MLOPRM","A",6)
:˜…ƒ‰™Œš�…š‹
^SCR("W4MLOPRM","A",7)
:‰€ŒŽ†‹˜Ž'‘Ž
^SCR("W4MLOPRM","A",8)

^SCR("W4MLOPRM","A",9)

^SCR("W4MLOPRM","A",10)

^SCR("W4MLOPRM","AV",1)

^SCR("W4MLOPRM","AV",2)
hbumhjhtkn,frgnkeannkohrynrp
^SCR("W4MLOPRM","AV",3)

^SCR("W4MLOPRM","AV",4)

^SCR("W4MLOPRM","AV",5)
:hbumhjhtkneannkohbu,bouh,rhdxcrsakotv
^SCR("W4MLOPRM","AV",6)
:rushak,cu,f
^SCR("W4MLOPRM","AV",7)
:htknzfrnwxn
^SCR("W4MLOPRM","AV",8)

^SCR("W4MLOPRM","AV",9)

^SCR("W4MLOPRM","AV",10)

^SCR("W4MLOPRM","NAME")

^SCR("W4MLOPRM","P",5,"CRD")
5,19,B,1,0
^SCR("W4MLOPRM","P",5,"HELP")

^SCR("W4MLOPRM","P",5,"LMAX")
4
^SCR("W4MLOPRM","P",5,"MUMPS1")

^SCR("W4MLOPRM","P",5,"MUMPS2")

^SCR("W4MLOPRM","P",5,"TYP")
B
^SCR("W4MLOPRM","P",10,"CRD")
6,37,E,15,0
^SCR("W4MLOPRM","P",10,"HELP")

^SCR("W4MLOPRM","P",10,"LMAX")
17
^SCR("W4MLOPRM","P",10,"MUMPS1")

^SCR("W4MLOPRM","P",10,"MUMPS2")

^SCR("W4MLOPRM","P",10,"MUST")

^SCR("W4MLOPRM","P",10,"TYP")
E
^SCR("W4MLOPRM","P",15,"CRD")
7,48,E,4,0
^SCR("W4MLOPRM","P",15,"HELP")

^SCR("W4MLOPRM","P",15,"LMAX")
6
^SCR("W4MLOPRM","P",15,"MUMPS1")

^SCR("W4MLOPRM","P",15,"MUMPS2")

^SCR("W4MLOPRM","P",15,"TYP")
E
^SCR("W4MLOPRM","P","NAME","MLYADR")
10
^SCR("W4MLOPRM","P","NAME","MLYHUZ")
5
^SCR("W4MLOPRM","P","NAME","MLYMRK")
15
^SCR("W4MLOPRM","P","NM",5)
MLYHUZ
^SCR("W4MLOPRM","P","NM",10)
MLYADR
^SCR("W4MLOPRM","P","NM",15)
MLYMRK
^SCR("W4MLOPRM","P","RB",1)
5,15,10,77
^SCR("W4MLTNIN")
H
^SCR("W4MLTNIN",1)
                                # i`lnl zeqpkd g"ec #                          
^SCR("W4MLTNIN",2)
             {10       } jixrz cr            {05      } jix`zn                 
^SCR("W4MLTNIN",3)
  {               21} {20  } dwlgn cr         {            16} {15  } dwlgnn   
^SCR("W4MLTNIN",4)
  {               25} {24  } dveaw cr         {            23} {22  } dveawn   
^SCR("W4MLTNIN",5)
                                           {              27} {26   }    wtq   
^SCR("W4MLTNIN",6)
                                                                             1$
^SCR("W4MLTNIN",7)
    :  k"dq  :  k"dq : xfgd : mekq : dqpkd:  'gi :    hixt my    : hixt cew :  
^SCR("W4MLTNIN",8)
    :  mekq  :  zenk :izenk :      : izenk: dcin :               :          :  
^SCR("W4MLTNIN",9)
                                                                               
^SCR("W4MLTNIN",10)
                                                                               
^SCR("W4MLTNIN",11)
                                                                               
^SCR("W4MLTNIN",12)
                                                                               
^SCR("W4MLTNIN",13)
                                                                               
^SCR("W4MLTNIN",14)
                                                                               
^SCR("W4MLTNIN",15)
                                                                               
^SCR("W4MLTNIN",16)
                                                                               
^SCR("W4MLTNIN",17)
                                                                               
^SCR("W4MLTNIN",18)
                                                                               
^SCR("W4MLTNIN",19)
                                                                               
^SCR("W4MLTNIN",20)
                                                                               
^SCR("W4MLTNIN",21)
                                                                               
^SCR("W4MLTNIN",22)
 $1                                                                            
^SCR("W4MLTNIN","A",1)
‰€ŒŽŒš…‘�‹„‡"…ƒ
^SCR("W4MLTNIN","A",2)
Š‰˜’šƒ’Š‰˜€šŽ
^SCR("W4MLTNIN","A",3)
„—Œ‡Žƒ’„—Œ‡ŽŽ
^SCR("W4MLTNIN","A",4)
„–…�—ƒ’„–…�—Ž
^SCR("W4MLTNIN","A",5)
—”‘
^SCR("W4MLTNIN","A",6)

^SCR("W4MLTNIN","A",7)
‹"„‘‹"„‘˜†‡„�…‹‘„‘�‹„'‡‰ˆ‰˜”�™ˆ‰˜”ƒ…—
^SCR("W4MLTNIN","A",8)
�…‹‘š…Ž‹‰š…Ž‹‰š…Ž‹„ƒ‰Ž
^SCR("W4MLTNIN","A",9)
------------------------------------------------------------------
^SCR("W4MLTNIN","A",10)

^SCR("W4MLTNIN","A",11)

^SCR("W4MLTNIN","A",12)

^SCR("W4MLTNIN","A",13)

^SCR("W4MLTNIN","A",14)

^SCR("W4MLTNIN","A",15)

^SCR("W4MLTNIN","A",16)

^SCR("W4MLTNIN","A",17)

^SCR("W4MLTNIN","A",18)

^SCR("W4MLTNIN","A",19)

^SCR("W4MLTNIN","A",20)

^SCR("W4MLTNIN","A",21)

^SCR("W4MLTNIN","A",22)

^SCR("W4MLTNIN","AV",1)
htknk,uxbfvj"us
^SCR("W4MLTNIN","AV",2)
lhrg,sglhrt,n
^SCR("W4MLTNIN","AV",3)
vekjnsgvekjnn
^SCR("W4MLTNIN","AV",4)
vmucesgvmucen
^SCR("W4MLTNIN","AV",5)
epx
^SCR("W4MLTNIN","AV",6)

^SCR("W4MLTNIN","AV",7)
f"vxf"vxrzjvoufxvxbfvwjhyhrpoayhrpsue
^SCR("W4MLTNIN","AV",8)
oufx,unfh,unfh,unfvshn
^SCR("W4MLTNIN","AV",9)
------------------------------------------------------------------
^SCR("W4MLTNIN","AV",10)

^SCR("W4MLTNIN","AV",11)

^SCR("W4MLTNIN","AV",12)

^SCR("W4MLTNIN","AV",13)

^SCR("W4MLTNIN","AV",14)

^SCR("W4MLTNIN","AV",15)

^SCR("W4MLTNIN","AV",16)

^SCR("W4MLTNIN","AV",17)

^SCR("W4MLTNIN","AV",18)

^SCR("W4MLTNIN","AV",19)

^SCR("W4MLTNIN","AV",20)

^SCR("W4MLTNIN","AV",21)

^SCR("W4MLTNIN","AV",22)

^SCR("W4MLTNIN","G",1,"CRD")
8,76,E,8,0
^SCR("W4MLTNIN","G",1,"HELP")

^SCR("W4MLTNIN","G",1,"LMAX")
10
^SCR("W4MLTNIN","G",1,"MUMPS1")

^SCR("W4MLTNIN","G",1,"MUMPS2")

^SCR("W4MLTNIN","G",1,"OUTPUT")

^SCR("W4MLTNIN","G",1,"SHEM")
 hixt cew 
^SCR("W4MLTNIN","G",1,"TYP")
E
^SCR("W4MLTNIN","G",2,"CRD")
8,65,H,14,0
^SCR("W4MLTNIN","G",2,"HELP")

^SCR("W4MLTNIN","G",2,"LMAX")
15
^SCR("W4MLTNIN","G",2,"MUMPS1")

^SCR("W4MLTNIN","G",2,"MUMPS2")

^SCR("W4MLTNIN","G",2,"OUTPUT")

^SCR("W4MLTNIN","G",2,"SHEM")
    hixt my    
^SCR("W4MLTNIN","G",2,"TYP")
H
^SCR("W4MLTNIN","G",3,"CRD")
8,49,H,6,0
^SCR("W4MLTNIN","G",3,"HELP")

^SCR("W4MLTNIN","G",3,"LMAX")
6
^SCR("W4MLTNIN","G",3,"MUMPS1")

^SCR("W4MLTNIN","G",3,"MUMPS2")

^SCR("W4MLTNIN","G",3,"OUTPUT")

^SCR("W4MLTNIN","G",3,"SHEM")
  'gi 
^SCR("W4MLTNIN","G",3,"TYP")
H
^SCR("W4MLTNIN","G",4,"CRD")
8,42,N,6,2
^SCR("W4MLTNIN","G",4,"HELP")

^SCR("W4MLTNIN","G",4,"LMAX")
6
^SCR("W4MLTNIN","G",4,"MUMPS1")

^SCR("W4MLTNIN","G",4,"MUMPS2")

^SCR("W4MLTNIN","G",4,"OUTPUT")

^SCR("W4MLTNIN","G",4,"SHEM")
 dqpkd
^SCR("W4MLTNIN","G",4,"TYP")
N
^SCR("W4MLTNIN","G",5,"CRD")
8,35,N,6,2
^SCR("W4MLTNIN","G",5,"HELP")

^SCR("W4MLTNIN","G",5,"LMAX")
6
^SCR("W4MLTNIN","G",5,"MUMPS1")

^SCR("W4MLTNIN","G",5,"MUMPS2")

^SCR("W4MLTNIN","G",5,"OUTPUT")

^SCR("W4MLTNIN","G",5,"SHEM")
 mekq 
^SCR("W4MLTNIN","G",5,"TYP")
N
^SCR("W4MLTNIN","G",6,"CRD")
8,28,N,6,2
^SCR("W4MLTNIN","G",6,"HELP")

^SCR("W4MLTNIN","G",6,"LMAX")
6
^SCR("W4MLTNIN","G",6,"MUMPS1")

^SCR("W4MLTNIN","G",6,"MUMPS2")

^SCR("W4MLTNIN","G",6,"OUTPUT")

^SCR("W4MLTNIN","G",6,"SHEM")
 xfgd 
^SCR("W4MLTNIN","G",6,"TYP")
N
^SCR("W4MLTNIN","G",7,"CRD")
8,21,N,6,2
^SCR("W4MLTNIN","G",7,"HELP")

^SCR("W4MLTNIN","G",7,"LMAX")
7
^SCR("W4MLTNIN","G",7,"MUMPS1")

^SCR("W4MLTNIN","G",7,"MUMPS2")

^SCR("W4MLTNIN","G",7,"SHEM")
  k"dq 
^SCR("W4MLTNIN","G",7,"TYP")
N
^SCR("W4MLTNIN","G",8,"CRD")
8,13,N,8,2
^SCR("W4MLTNIN","G",8,"HELP")

^SCR("W4MLTNIN","G",8,"LMAX")
8
^SCR("W4MLTNIN","G",8,"MUMPS1")

^SCR("W4MLTNIN","G",8,"MUMPS2")

^SCR("W4MLTNIN","G",8,"OUTPUT")

^SCR("W4MLTNIN","G",8,"SHEM")
  k"dq  
^SCR("W4MLTNIN","G",8,"TYP")
N
^SCR("W4MLTNIN","G","DEL")

^SCR("W4MLTNIN","G","MAX")
99999
^SCR("W4MLTNIN","G","NAME","EM")
3
^SCR("W4MLTNIN","G","NAME","INP")
5
^SCR("W4MLTNIN","G","NAME","ITB")
4
^SCR("W4MLTNIN","G","NAME","ITF")
8
^SCR("W4MLTNIN","G","NAME","OUT")
7
^SCR("W4MLTNIN","G","NAME","PAR")
1
^SCR("W4MLTNIN","G","NAME","PAR1")
2
^SCR("W4MLTNIN","G","NAME","ZIC")
6
^SCR("W4MLTNIN","G","NM",1)
PAR
^SCR("W4MLTNIN","G","NM",2)
PAR1
^SCR("W4MLTNIN","G","NM",3)
EM
^SCR("W4MLTNIN","G","NM",4)
ITB
^SCR("W4MLTNIN","G","NM",5)
INP
^SCR("W4MLTNIN","G","NM",6)
ZIC
^SCR("W4MLTNIN","G","NM",7)
OUT
^SCR("W4MLTNIN","G","NM",8)
ITF
^SCR("W4MLTNIN","G","RB")
7,2,23,79
^SCR("W4MLTNIN","G","REF")
^TMP($P
^SCR("W4MLTNIN","G","RZD")
\
^SCR("W4MLTNIN","G","STEP")
1
^SCR("W4MLTNIN","G","STG")
    :  k"dq  :  k"dq : xfgd : mekq : dqpkd:  'gi :    hixt my    : hixt cew :  
^SCR("W4MLTNIN","G","VG")
10
^SCR("W4MLTNIN","NAME")

^SCR("W4MLTNIN","P",5,"CRD")
2,45,D,8,0
^SCR("W4MLTNIN","P",5,"HELP")

^SCR("W4MLTNIN","P",5,"LMAX")
9
^SCR("W4MLTNIN","P",5,"MUMPS1")

^SCR("W4MLTNIN","P",5,"MUMPS2")

^SCR("W4MLTNIN","P",5,"MUST")

^SCR("W4MLTNIN","P",5,"TYP")
D
^SCR("W4MLTNIN","P",10,"CRD")
2,13,D,8,0
^SCR("W4MLTNIN","P",10,"HELP")

^SCR("W4MLTNIN","P",10,"LMAX")
10
^SCR("W4MLTNIN","P",10,"MUMPS1")

^SCR("W4MLTNIN","P",10,"MUMPS2")

^SCR("W4MLTNIN","P",10,"MUST")

^SCR("W4MLTNIN","P",10,"TYP")
D
^SCR("W4MLTNIN","P",15,"CRD")
3,63,E,5,0
^SCR("W4MLTNIN","P",15,"FNC")

^SCR("W4MLTNIN","P",15,"GLOB")
^DEP
^SCR("W4MLTNIN","P",15,"HELP")

^SCR("W4MLTNIN","P",15,"LMAX")
5
^SCR("W4MLTNIN","P",15,"MUMPS1")

^SCR("W4MLTNIN","P",15,"MUMPS2")

^SCR("W4MLTNIN","P",15,"NLN")
20
^SCR("W4MLTNIN","P",15,"RZD")
\
^SCR("W4MLTNIN","P",15,"TOPB")
8
^SCR("W4MLTNIN","P",15,"TYP")
E
^SCR("W4MLTNIN","P",15,"VRB")
DEP1
^SCR("W4MLTNIN","P",16,"CRD")
3,62,H,15
^SCR("W4MLTNIN","P",16,"HELP")

^SCR("W4MLTNIN","P",16,"LMAX")
15
^SCR("W4MLTNIN","P",16,"MUMPS1")

^SCR("W4MLTNIN","P",16,"MUMPS2")

^SCR("W4MLTNIN","P",16,"OUTPUT")

^SCR("W4MLTNIN","P",16,"TYP")
H
^SCR("W4MLTNIN","P",20,"CRD")
3,22,E,5,0
^SCR("W4MLTNIN","P",20,"FNC")

^SCR("W4MLTNIN","P",20,"GLOB")
DEP
^SCR("W4MLTNIN","P",20,"HELP")

^SCR("W4MLTNIN","P",20,"LMAX")
5
^SCR("W4MLTNIN","P",20,"MUMPS1")

^SCR("W4MLTNIN","P",20,"MUMPS2")
I ADDEP<MEDEP S %SC("ER")=1
^SCR("W4MLTNIN","P",20,"NLN")
20
^SCR("W4MLTNIN","P",20,"RZD")
\
^SCR("W4MLTNIN","P",20,"TOPB")
8
^SCR("W4MLTNIN","P",20,"TYP")
E
^SCR("W4MLTNIN","P",20,"VRB")
ADDEP1
^SCR("W4MLTNIN","P",21,"CRD")
3,21,H,18
^SCR("W4MLTNIN","P",21,"HELP")

^SCR("W4MLTNIN","P",21,"LMAX")
18
^SCR("W4MLTNIN","P",21,"MUMPS1")

^SCR("W4MLTNIN","P",21,"MUMPS2")

^SCR("W4MLTNIN","P",21,"OUTPUT")

^SCR("W4MLTNIN","P",21,"TYP")
H
^SCR("W4MLTNIN","P",22,"CRD")
4,63,E,5,0
^SCR("W4MLTNIN","P",22,"FNC")

^SCR("W4MLTNIN","P",22,"GLOB")
MLSUGP
^SCR("W4MLTNIN","P",22,"HELP")

^SCR("W4MLTNIN","P",22,"LMAX")
5
^SCR("W4MLTNIN","P",22,"MUMPS1")

^SCR("W4MLTNIN","P",22,"MUMPS2")

^SCR("W4MLTNIN","P",22,"NLN")
20
^SCR("W4MLTNIN","P",22,"RZD")
\
^SCR("W4MLTNIN","P",22,"TOPB")
8
^SCR("W4MLTNIN","P",22,"TYP")
E
^SCR("W4MLTNIN","P",22,"VRB")
MEKVZ1
^SCR("W4MLTNIN","P",23,"CRD")
4,62,H,15
^SCR("W4MLTNIN","P",23,"HELP")

^SCR("W4MLTNIN","P",23,"LMAX")
15
^SCR("W4MLTNIN","P",23,"MUMPS1")

^SCR("W4MLTNIN","P",23,"MUMPS2")

^SCR("W4MLTNIN","P",23,"OUTPUT")

^SCR("W4MLTNIN","P",23,"TYP")
H
^SCR("W4MLTNIN","P",24,"CRD")
4,22,E,5,0
^SCR("W4MLTNIN","P",24,"FNC")

^SCR("W4MLTNIN","P",24,"GLOB")
MLSUGP
^SCR("W4MLTNIN","P",24,"HELP")

^SCR("W4MLTNIN","P",24,"LMAX")
5
^SCR("W4MLTNIN","P",24,"MUMPS1")

^SCR("W4MLTNIN","P",24,"MUMPS2")
I ADKVZ<MEKVZ S %SC("ER")=1
^SCR("W4MLTNIN","P",24,"NLN")
20
^SCR("W4MLTNIN","P",24,"RZD")
\
^SCR("W4MLTNIN","P",24,"TOPB")
8
^SCR("W4MLTNIN","P",24,"TYP")
E
^SCR("W4MLTNIN","P",24,"VRB")
ADKVZ1
^SCR("W4MLTNIN","P",25,"CRD")
4,21,H,18
^SCR("W4MLTNIN","P",25,"HELP")

^SCR("W4MLTNIN","P",25,"LMAX")
18
^SCR("W4MLTNIN","P",25,"MUMPS1")

^SCR("W4MLTNIN","P",25,"MUMPS2")

^SCR("W4MLTNIN","P",25,"OUTPUT")

^SCR("W4MLTNIN","P",25,"TYP")
H
^SCR("W4MLTNIN","P",26,"CRD")
5,62,E,6,0
^SCR("W4MLTNIN","P",26,"FNC")

^SCR("W4MLTNIN","P",26,"GLOB")
W4SPK
^SCR("W4MLTNIN","P",26,"HELP")

^SCR("W4MLTNIN","P",26,"LMAX")
6
^SCR("W4MLTNIN","P",26,"MUMPS1")

^SCR("W4MLTNIN","P",26,"MUMPS2")

^SCR("W4MLTNIN","P",26,"NLN")
20
^SCR("W4MLTNIN","P",26,"RZD")
\
^SCR("W4MLTNIN","P",26,"TOPB")
8
^SCR("W4MLTNIN","P",26,"TYP")
E
^SCR("W4MLTNIN","P",26,"VRB")
SPK1
^SCR("W4MLTNIN","P",27,"CRD")
5,61,H,17
^SCR("W4MLTNIN","P",27,"HELP")

^SCR("W4MLTNIN","P",27,"LMAX")
17
^SCR("W4MLTNIN","P",27,"MUMPS1")

^SCR("W4MLTNIN","P",27,"MUMPS2")

^SCR("W4MLTNIN","P",27,"OUTPUT")

^SCR("W4MLTNIN","P",27,"TYP")
H
^SCR("W4MLTNIN","P","NAME","ADDAT")
10
^SCR("W4MLTNIN","P","NAME","ADDEP")
20
^SCR("W4MLTNIN","P","NAME","ADDEP1")
21
^SCR("W4MLTNIN","P","NAME","ADKVZ")
24
^SCR("W4MLTNIN","P","NAME","ADKVZ1")
25
^SCR("W4MLTNIN","P","NAME","MEDAT")
5
^SCR("W4MLTNIN","P","NAME","MEDEP")
15
^SCR("W4MLTNIN","P","NAME","MEDEP1")
16
^SCR("W4MLTNIN","P","NAME","MEKVZ")
22
^SCR("W4MLTNIN","P","NAME","MEKVZ1")
23
^SCR("W4MLTNIN","P","NAME","SPK")
26
^SCR("W4MLTNIN","P","NAME","SPK1")
27
^SCR("W4MLTNIN","P","NM",5)
MEDAT
^SCR("W4MLTNIN","P","NM",10)
ADDAT
^SCR("W4MLTNIN","P","NM",15)
MEDEP
^SCR("W4MLTNIN","P","NM",16)
MEDEP1
^SCR("W4MLTNIN","P","NM",20)
ADDEP
^SCR("W4MLTNIN","P","NM",21)
ADDEP1
^SCR("W4MLTNIN","P","NM",22)
MEKVZ
^SCR("W4MLTNIN","P","NM",23)
MEKVZ1
^SCR("W4MLTNIN","P","NM",24)
ADKVZ
^SCR("W4MLTNIN","P","NM",25)
ADKVZ1
^SCR("W4MLTNIN","P","NM",26)
SPK
^SCR("W4MLTNIN","P","NM",27)
SPK1
^SCR("W4MLTNQ")
H
^SCR("W4MLTNQ",1)
                                 # i`ln zerepz g"ec #                          
^SCR("W4MLTNQ",2)
             {10       } jixrz cr            {05      } jix`zn                 
^SCR("W4MLTNQ",3)
  {               21} {20  } dwlgn cr         {            16} {15  } dwlgnn   
^SCR("W4MLTNQ",4)
  {               25} {24  } dveaw cr         {            23} {22  } dveawn   
^SCR("W4MLTNQ",5)
           {30 } dtew ihixt bivdl m`d      {              27} {26   }    wtq   
^SCR("W4MLTNQ",6)
                                                                             1$
^SCR("W4MLTNQ",7)
    :ziteq dxzi: d`ved: xfgd : dqpkd :   dxzi:  'gi :    hixt my   : hixt cew :
^SCR("W4MLTNQ",8)
    :          :      :      :       :zizlgzd: dcin :              :          :
^SCR("W4MLTNQ",9)
                                                                               
^SCR("W4MLTNQ",10)
                                                                               
^SCR("W4MLTNQ",11)
                                                                               
^SCR("W4MLTNQ",12)
                                                                               
^SCR("W4MLTNQ",13)
                                                                               
^SCR("W4MLTNQ",14)
                                                                               
^SCR("W4MLTNQ",15)
                                                                               
^SCR("W4MLTNQ",16)
                                                                               
^SCR("W4MLTNQ",17)
                                                                               
^SCR("W4MLTNQ",18)
                                                                               
^SCR("W4MLTNQ",19)
                                                                               
^SCR("W4MLTNQ",20)
                                                                               
^SCR("W4MLTNQ",21)
                                                                               
^SCR("W4MLTNQ",22)
   $1                                                                          
^SCR("W4MLTNQ","A",1)
‰€ŒŽš…’…�š‡"…ƒ
^SCR("W4MLTNQ","A",2)
Š‰˜’šƒ’Š‰˜€šŽ
^SCR("W4MLTNQ","A",3)
„—Œ‡Žƒ’„—Œ‡ŽŽ
^SCR("W4MLTNQ","A",4)
„–…�—ƒ’„–…�—Ž
^SCR("W4MLTNQ","A",5)
„”…—‰ˆ‰˜”‚‰–„Œ�€„—”‘
^SCR("W4MLTNQ","A",6)

^SCR("W4MLTNQ","A",7)
š‰”…‘„˜š‰„€–…„˜†‡„„‘�‹„„˜š‰'‡‰ˆ‰˜”�™ˆ‰˜”ƒ…—
^SCR("W4MLTNQ","A",8)
š‰šŒ‡š„„ƒ‰Ž
^SCR("W4MLTNQ","A",9)
------------------------------------------------------------------
^SCR("W4MLTNQ","A",10)

^SCR("W4MLTNQ","A",11)

^SCR("W4MLTNQ","A",12)

^SCR("W4MLTNQ","A",13)

^SCR("W4MLTNQ","A",14)

^SCR("W4MLTNQ","A",15)

^SCR("W4MLTNQ","A",16)

^SCR("W4MLTNQ","A",17)

^SCR("W4MLTNQ","A",18)

^SCR("W4MLTNQ","A",19)

^SCR("W4MLTNQ","A",20)

^SCR("W4MLTNQ","A",21)

^SCR("W4MLTNQ","A",22)

^SCR("W4MLTNQ","AV",1)
htkn,ugub,j"us
^SCR("W4MLTNQ","AV",2)
lhrg,sglhrt,n
^SCR("W4MLTNQ","AV",3)
vekjnsgvekjnn
^SCR("W4MLTNQ","AV",4)
vmucesgvmucen
^SCR("W4MLTNQ","AV",5)
vpuehyhrpdhmvkotvepx
^SCR("W4MLTNQ","AV",6)

^SCR("W4MLTNQ","AV",7)
,hpuxvr,hvtmuvrzjvvxbfvvr,hwjhyhrpoayhrpsue
^SCR("W4MLTNQ","AV",8)
,h,kj,vvshn
^SCR("W4MLTNQ","AV",9)
------------------------------------------------------------------
^SCR("W4MLTNQ","AV",10)

^SCR("W4MLTNQ","AV",11)

^SCR("W4MLTNQ","AV",12)

^SCR("W4MLTNQ","AV",13)

^SCR("W4MLTNQ","AV",14)

^SCR("W4MLTNQ","AV",15)

^SCR("W4MLTNQ","AV",16)

^SCR("W4MLTNQ","AV",17)

^SCR("W4MLTNQ","AV",18)

^SCR("W4MLTNQ","AV",19)

^SCR("W4MLTNQ","AV",20)

^SCR("W4MLTNQ","AV",21)

^SCR("W4MLTNQ","AV",22)

^SCR("W4MLTNQ","G",1,"CRD")
8,78,E,8,0
^SCR("W4MLTNQ","G",1,"HELP")

^SCR("W4MLTNQ","G",1,"LMAX")
10
^SCR("W4MLTNQ","G",1,"MUMPS1")

^SCR("W4MLTNQ","G",1,"MUMPS2")

^SCR("W4MLTNQ","G",1,"OUTPUT")

^SCR("W4MLTNQ","G",1,"SHEM")
 hixt cew 
^SCR("W4MLTNQ","G",1,"TYP")
E
^SCR("W4MLTNQ","G",2,"CRD")
8,67,H,14,0
^SCR("W4MLTNQ","G",2,"HELP")

^SCR("W4MLTNQ","G",2,"LMAX")
14
^SCR("W4MLTNQ","G",2,"MUMPS1")

^SCR("W4MLTNQ","G",2,"MUMPS2")

^SCR("W4MLTNQ","G",2,"OUTPUT")

^SCR("W4MLTNQ","G",2,"SHEM")
    hixt my   
^SCR("W4MLTNQ","G",2,"TYP")
H
^SCR("W4MLTNQ","G",3,"CRD")
8,52,H,6,0
^SCR("W4MLTNQ","G",3,"HELP")

^SCR("W4MLTNQ","G",3,"LMAX")
6
^SCR("W4MLTNQ","G",3,"MUMPS1")

^SCR("W4MLTNQ","G",3,"MUMPS2")

^SCR("W4MLTNQ","G",3,"OUTPUT")

^SCR("W4MLTNQ","G",3,"SHEM")
  'gi 
^SCR("W4MLTNQ","G",3,"TYP")
H
^SCR("W4MLTNQ","G",4,"CRD")
8,45,N,7,2
^SCR("W4MLTNQ","G",4,"HELP")

^SCR("W4MLTNQ","G",4,"LMAX")
7
^SCR("W4MLTNQ","G",4,"MUMPS1")

^SCR("W4MLTNQ","G",4,"MUMPS2")

^SCR("W4MLTNQ","G",4,"OUTPUT")

^SCR("W4MLTNQ","G",4,"SHEM")
   dxzi
^SCR("W4MLTNQ","G",4,"TYP")
N
^SCR("W4MLTNQ","G",5,"CRD")
8,37,N,7,2
^SCR("W4MLTNQ","G",5,"HELP")

^SCR("W4MLTNQ","G",5,"LMAX")
7
^SCR("W4MLTNQ","G",5,"MUMPS1")

^SCR("W4MLTNQ","G",5,"MUMPS2")

^SCR("W4MLTNQ","G",5,"OUTPUT")

^SCR("W4MLTNQ","G",5,"SHEM")
 dqpkd 
^SCR("W4MLTNQ","G",5,"TYP")
N
^SCR("W4MLTNQ","G",6,"CRD")
8,29,N,6,2
^SCR("W4MLTNQ","G",6,"HELP")

^SCR("W4MLTNQ","G",6,"LMAX")
6
^SCR("W4MLTNQ","G",6,"MUMPS1")

^SCR("W4MLTNQ","G",6,"MUMPS2")

^SCR("W4MLTNQ","G",6,"OUTPUT")

^SCR("W4MLTNQ","G",6,"SHEM")
 xfgd 
^SCR("W4MLTNQ","G",6,"TYP")
N
^SCR("W4MLTNQ","G",7,"CRD")
8,22,N,6,2
^SCR("W4MLTNQ","G",7,"HELP")

^SCR("W4MLTNQ","G",7,"LMAX")
6
^SCR("W4MLTNQ","G",7,"MUMPS1")

^SCR("W4MLTNQ","G",7,"MUMPS2")

^SCR("W4MLTNQ","G",7,"SHEM")
 d`ved
^SCR("W4MLTNQ","G",7,"TYP")
N
^SCR("W4MLTNQ","G",8,"CRD")
8,15,N,8,2
^SCR("W4MLTNQ","G",8,"HELP")

^SCR("W4MLTNQ","G",8,"LMAX")
10
^SCR("W4MLTNQ","G",8,"MUMPS1")

^SCR("W4MLTNQ","G",8,"MUMPS2")

^SCR("W4MLTNQ","G",8,"OUTPUT")

^SCR("W4MLTNQ","G",8,"SHEM")
ziteq dxzi
^SCR("W4MLTNQ","G",8,"TYP")
N
^SCR("W4MLTNQ","G","DEL")

^SCR("W4MLTNQ","G","MAX")
99999
^SCR("W4MLTNQ","G","NAME","EM")
3
^SCR("W4MLTNQ","G","NAME","INP")
5
^SCR("W4MLTNQ","G","NAME","ITB")
4
^SCR("W4MLTNQ","G","NAME","ITF")
8
^SCR("W4MLTNQ","G","NAME","OUT")
7
^SCR("W4MLTNQ","G","NAME","PAR")
1
^SCR("W4MLTNQ","G","NAME","PAR1")
2
^SCR("W4MLTNQ","G","NAME","ZIC")
6
^SCR("W4MLTNQ","G","NM",1)
PAR
^SCR("W4MLTNQ","G","NM",2)
PAR1
^SCR("W4MLTNQ","G","NM",3)
EM
^SCR("W4MLTNQ","G","NM",4)
ITB
^SCR("W4MLTNQ","G","NM",5)
INP
^SCR("W4MLTNQ","G","NM",6)
ZIC
^SCR("W4MLTNQ","G","NM",7)
OUT
^SCR("W4MLTNQ","G","NM",8)
ITF
^SCR("W4MLTNQ","G","RB")
7,4,23,79
^SCR("W4MLTNQ","G","REF")
^TMP($P
^SCR("W4MLTNQ","G","RZD")
\
^SCR("W4MLTNQ","G","STEP")
1
^SCR("W4MLTNQ","G","STG")
    :ziteq dxzi: d`ved: xfgd : dqpkd :   dxzi:  'gi :    hixt my   : hixt cew :
^SCR("W4MLTNQ","G","VG")
10
^SCR("W4MLTNQ","NAME")
i`ln zerepz g"ec4
^SCR("W4MLTNQ","P",5,"CRD")
2,45,D,8,0
^SCR("W4MLTNQ","P",5,"HELP")

^SCR("W4MLTNQ","P",5,"LMAX")
9
^SCR("W4MLTNQ","P",5,"MUMPS1")

^SCR("W4MLTNQ","P",5,"MUMPS2")

^SCR("W4MLTNQ","P",5,"MUST")

^SCR("W4MLTNQ","P",5,"TYP")
D
^SCR("W4MLTNQ","P",10,"CRD")
2,13,D,8,0
^SCR("W4MLTNQ","P",10,"HELP")

^SCR("W4MLTNQ","P",10,"LMAX")
10
^SCR("W4MLTNQ","P",10,"MUMPS1")

^SCR("W4MLTNQ","P",10,"MUMPS2")

^SCR("W4MLTNQ","P",10,"MUST")

^SCR("W4MLTNQ","P",10,"TYP")
D
^SCR("W4MLTNQ","P",15,"CRD")
3,63,E,5,0
^SCR("W4MLTNQ","P",15,"FNC")

^SCR("W4MLTNQ","P",15,"GLOB")
^DEP
^SCR("W4MLTNQ","P",15,"HELP")

^SCR("W4MLTNQ","P",15,"LMAX")
5
^SCR("W4MLTNQ","P",15,"MUMPS1")

^SCR("W4MLTNQ","P",15,"MUMPS2")

^SCR("W4MLTNQ","P",15,"NLN")
20
^SCR("W4MLTNQ","P",15,"RZD")
\
^SCR("W4MLTNQ","P",15,"TOPB")
8
^SCR("W4MLTNQ","P",15,"TYP")
E
^SCR("W4MLTNQ","P",15,"VRB")
DEP1
^SCR("W4MLTNQ","P",16,"CRD")
3,62,H,15
^SCR("W4MLTNQ","P",16,"HELP")

^SCR("W4MLTNQ","P",16,"LMAX")
15
^SCR("W4MLTNQ","P",16,"MUMPS1")

^SCR("W4MLTNQ","P",16,"MUMPS2")

^SCR("W4MLTNQ","P",16,"OUTPUT")

^SCR("W4MLTNQ","P",16,"TYP")
H
^SCR("W4MLTNQ","P",20,"CRD")
3,22,E,5,0
^SCR("W4MLTNQ","P",20,"FNC")

^SCR("W4MLTNQ","P",20,"GLOB")
DEP
^SCR("W4MLTNQ","P",20,"HELP")

^SCR("W4MLTNQ","P",20,"LMAX")
5
^SCR("W4MLTNQ","P",20,"MUMPS1")

^SCR("W4MLTNQ","P",20,"MUMPS2")
I ADDEP<MEDEP S %SC("ER")=1
^SCR("W4MLTNQ","P",20,"NLN")
20
^SCR("W4MLTNQ","P",20,"RZD")
\
^SCR("W4MLTNQ","P",20,"TOPB")
8
^SCR("W4MLTNQ","P",20,"TYP")
E
^SCR("W4MLTNQ","P",20,"VRB")
ADDEP1
^SCR("W4MLTNQ","P",21,"CRD")
3,21,H,18
^SCR("W4MLTNQ","P",21,"HELP")

^SCR("W4MLTNQ","P",21,"LMAX")
18
^SCR("W4MLTNQ","P",21,"MUMPS1")

^SCR("W4MLTNQ","P",21,"MUMPS2")

^SCR("W4MLTNQ","P",21,"OUTPUT")

^SCR("W4MLTNQ","P",21,"TYP")
H
^SCR("W4MLTNQ","P",22,"CRD")
4,63,E,5,0
^SCR("W4MLTNQ","P",22,"FNC")

^SCR("W4MLTNQ","P",22,"GLOB")
MLSUGP
^SCR("W4MLTNQ","P",22,"HELP")

^SCR("W4MLTNQ","P",22,"LMAX")
5
^SCR("W4MLTNQ","P",22,"MUMPS1")

^SCR("W4MLTNQ","P",22,"MUMPS2")

^SCR("W4MLTNQ","P",22,"NLN")
20
^SCR("W4MLTNQ","P",22,"RZD")
\
^SCR("W4MLTNQ","P",22,"TOPB")
8
^SCR("W4MLTNQ","P",22,"TYP")
E
^SCR("W4MLTNQ","P",22,"VRB")
MEKVZ1
^SCR("W4MLTNQ","P",23,"CRD")
4,62,H,15,0
^SCR("W4MLTNQ","P",23,"HELP")

^SCR("W4MLTNQ","P",23,"LMAX")
15
^SCR("W4MLTNQ","P",23,"MUMPS1")

^SCR("W4MLTNQ","P",23,"MUMPS2")

^SCR("W4MLTNQ","P",23,"OUTPUT")

^SCR("W4MLTNQ","P",23,"TYP")
H
^SCR("W4MLTNQ","P",24,"CRD")
4,22,E,5,0
^SCR("W4MLTNQ","P",24,"FNC")

^SCR("W4MLTNQ","P",24,"GLOB")
MLSUGP
^SCR("W4MLTNQ","P",24,"HELP")

^SCR("W4MLTNQ","P",24,"LMAX")
5
^SCR("W4MLTNQ","P",24,"MUMPS1")

^SCR("W4MLTNQ","P",24,"MUMPS2")
I ADKVZ<MEKVZ S %SC("ER")=1
^SCR("W4MLTNQ","P",24,"NLN")
20
^SCR("W4MLTNQ","P",24,"RZD")
\
^SCR("W4MLTNQ","P",24,"TOPB")
8
^SCR("W4MLTNQ","P",24,"TYP")
E
^SCR("W4MLTNQ","P",24,"VRB")
ADKVZ1
^SCR("W4MLTNQ","P",25,"CRD")
4,21,H,18,0
^SCR("W4MLTNQ","P",25,"HELP")

^SCR("W4MLTNQ","P",25,"LMAX")
18
^SCR("W4MLTNQ","P",25,"MUMPS1")

^SCR("W4MLTNQ","P",25,"MUMPS2")

^SCR("W4MLTNQ","P",25,"OUTPUT")

^SCR("W4MLTNQ","P",25,"TYP")
H
^SCR("W4MLTNQ","P",26,"CRD")
5,62,E,6,0
^SCR("W4MLTNQ","P",26,"FNC")

^SCR("W4MLTNQ","P",26,"GLOB")
W4SPK
^SCR("W4MLTNQ","P",26,"HELP")

^SCR("W4MLTNQ","P",26,"LMAX")
6
^SCR("W4MLTNQ","P",26,"MUMPS1")

^SCR("W4MLTNQ","P",26,"MUMPS2")

^SCR("W4MLTNQ","P",26,"NLN")
20
^SCR("W4MLTNQ","P",26,"RZD")
\
^SCR("W4MLTNQ","P",26,"TOPB")
8
^SCR("W4MLTNQ","P",26,"TYP")
E
^SCR("W4MLTNQ","P",26,"VRB")
SPK1
^SCR("W4MLTNQ","P",27,"CRD")
5,61,H,17,0
^SCR("W4MLTNQ","P",27,"HELP")

^SCR("W4MLTNQ","P",27,"LMAX")
17
^SCR("W4MLTNQ","P",27,"MUMPS1")

^SCR("W4MLTNQ","P",27,"MUMPS2")

^SCR("W4MLTNQ","P",27,"OUTPUT")

^SCR("W4MLTNQ","P",27,"TYP")
H
^SCR("W4MLTNQ","P",30,"CRD")
5,11,B,1,0
^SCR("W4MLTNQ","P",30,"HELP")

^SCR("W4MLTNQ","P",30,"LMAX")
4
^SCR("W4MLTNQ","P",30,"MUMPS1")

^SCR("W4MLTNQ","P",30,"MUMPS2")

^SCR("W4MLTNQ","P",30,"TYP")
B
^SCR("W4MLTNQ","P","NAME","ADDAT")
10
^SCR("W4MLTNQ","P","NAME","ADDEP")
20
^SCR("W4MLTNQ","P","NAME","ADDEP1")
21
^SCR("W4MLTNQ","P","NAME","ADKVZ")
24
^SCR("W4MLTNQ","P","NAME","ADKVZ1")
25
^SCR("W4MLTNQ","P","NAME","MEDAT")
5
^SCR("W4MLTNQ","P","NAME","MEDEP")
15
^SCR("W4MLTNQ","P","NAME","MEDEP1")
16
^SCR("W4MLTNQ","P","NAME","MEKVZ")
22
^SCR("W4MLTNQ","P","NAME","MEKVZ1")
23
^SCR("W4MLTNQ","P","NAME","PRKUP")
30
^SCR("W4MLTNQ","P","NAME","SPK")
26
^SCR("W4MLTNQ","P","NAME","SPK1")
27
^SCR("W4MLTNQ","P","NM",5)
MEDAT
^SCR("W4MLTNQ","P","NM",10)
ADDAT
^SCR("W4MLTNQ","P","NM",15)
MEDEP
^SCR("W4MLTNQ","P","NM",16)
MEDEP1
^SCR("W4MLTNQ","P","NM",20)
ADDEP
^SCR("W4MLTNQ","P","NM",21)
ADDEP1
^SCR("W4MLTNQ","P","NM",22)
MEKVZ
^SCR("W4MLTNQ","P","NM",23)
MEKVZ1
^SCR("W4MLTNQ","P","NM",24)
ADKVZ
^SCR("W4MLTNQ","P","NM",25)
ADKVZ1
^SCR("W4MLTNQ","P","NM",26)
SPK
^SCR("W4MLTNQ","P","NM",27)
SPK1
^SCR("W4MLTNQ","P","NM",30)
PRKUP
^SCR("W4MRKMAN")
H
^SCR("W4MRKMAN",1)
                                                                               
^SCR("W4MRKMAN",2)
              {05                                                    } :  gztn 
^SCR("W4MRKMAN",3)
                                                                               
^SCR("W4MRKMAN",4)
              {10                                                    } : dnqiq 
^SCR("W4MRKMAN","A",1)

^SCR("W4MRKMAN","A",2)
:‡š”Ž
^SCR("W4MRKMAN","A",3)

^SCR("W4MRKMAN","A",4)
:„Ž‘‰‘
^SCR("W4MRKMAN","AV",1)

^SCR("W4MRKMAN","AV",2)
:j,pn
^SCR("W4MRKMAN","AV",3)

^SCR("W4MRKMAN","AV",4)
:vnxhx
^SCR("W4MRKMAN","NAME")
onhwxnl mixhnxt
^SCR("W4MRKMAN","P",5,"CRD")
2,14,E,55,0
^SCR("W4MRKMAN","P",5,"HELP")

^SCR("W4MRKMAN","P",5,"LMAX")
55
^SCR("W4MRKMAN","P",5,"MUMPS1")

^SCR("W4MRKMAN","P",5,"MUMPS2")

^SCR("W4MRKMAN","P",5,"TYP")
E
^SCR("W4MRKMAN","P",10,"CRD")
4,14,E,55,0
^SCR("W4MRKMAN","P",10,"HELP")

^SCR("W4MRKMAN","P",10,"LMAX")
55
^SCR("W4MRKMAN","P",10,"MUMPS1")

^SCR("W4MRKMAN","P",10,"MUMPS2")

^SCR("W4MRKMAN","P",10,"TYP")
E
^SCR("W4MRKMAN","P","NAME","APIKEY")
5
^SCR("W4MRKMAN","P","NAME","APIPSW")
10
^SCR("W4MRKMAN","P","NM",5)
APIKEY
^SCR("W4MRKMAN","P","NM",10)
APIPSW
^SCR("W4MSDPRM")
H
^SCR("W4MSDPRM","NAME")
dcrqn mr dcearl mixhnxt
^SCR("W4OUTPRM")
H
^SCR("W4OUTPRM",1)
                                                                               
^SCR("W4OUTPRM",2)
             # zipevig dpkezl wynnl mixhnxt #                                  
^SCR("W4OUTPRM",3)
                                                                               
^SCR("W4OUTPRM",4)
                                                                           1]  
^SCR("W4OUTPRM",5)
                                                                               
^SCR("W4OUTPRM",6)
                      {05 } : zipevig dpkezl mipezp mei zxibqa xcyl m`d        
^SCR("W4OUTPRM",7)
                                     {10              } :  xeciyl zaezk        
^SCR("W4OUTPRM",8)
                                                                               
^SCR("W4OUTPRM",9)
              [1                                                               
^SCR("W4OUTPRM",10)
                                                                               
^SCR("W4OUTPRM","A",1)

^SCR("W4OUTPRM","A",2)
š‰�…–‰‡„�‹…šŒ—™ŽŽŒ�‰˜ˆŽ˜”
^SCR("W4OUTPRM","A",3)

^SCR("W4OUTPRM","A",4)

^SCR("W4OUTPRM","A",5)

^SCR("W4OUTPRM","A",6)
:š‰�…–‰‡„�‹…šŒ�‰�…š��…‰š˜‰‚‘�˜ƒ™Œ�€„
^SCR("W4OUTPRM","A",7)
:˜…ƒ‰™Œš�…š‹
^SCR("W4OUTPRM","A",8)

^SCR("W4OUTPRM","A",9)

^SCR("W4OUTPRM","A",10)

^SCR("W4OUTPRM","AV",1)

^SCR("W4OUTPRM","AV",2)
,hbumhjvbfu,keannkohrynrp
^SCR("W4OUTPRM","AV",3)

^SCR("W4OUTPRM","AV",4)

^SCR("W4OUTPRM","AV",5)

^SCR("W4OUTPRM","AV",6)
:,hbumhjvbfu,kohbu,bouh,rhdxcrsakotv
^SCR("W4OUTPRM","AV",7)
:rushak,cu,f
^SCR("W4OUTPRM","AV",8)

^SCR("W4OUTPRM","AV",9)

^SCR("W4OUTPRM","AV",10)

^SCR("W4OUTPRM","NAME")

^SCR("W4OUTPRM","P",5,"CRD")
6,22,B,1,0
^SCR("W4OUTPRM","P",5,"HELP")

^SCR("W4OUTPRM","P",5,"LMAX")
4
^SCR("W4OUTPRM","P",5,"MUMPS1")

^SCR("W4OUTPRM","P",5,"MUMPS2")

^SCR("W4OUTPRM","P",5,"TYP")
B
^SCR("W4OUTPRM","P",10,"CRD")
7,37,E,15,0
^SCR("W4OUTPRM","P",10,"HELP")

^SCR("W4OUTPRM","P",10,"LMAX")
17
^SCR("W4OUTPRM","P",10,"MUMPS1")

^SCR("W4OUTPRM","P",10,"MUMPS2")

^SCR("W4OUTPRM","P",10,"MUST")

^SCR("W4OUTPRM","P",10,"TYP")
E
^SCR("W4OUTPRM","P","NAME","IP")
10
^SCR("W4OUTPRM","P","NAME","OUT")
5
^SCR("W4OUTPRM","P","NM",5)
OUT
^SCR("W4OUTPRM","P","NM",10)
IP
^SCR("W4OUTPRM","P","RB",1)
5,15,10,77
^SCR("W4PARNEW")
H
^SCR("W4PARNEW",1)
                                                                               
^SCR("W4PARNEW",2)
                                                       {05     } :   hixtn     
^SCR("W4PARNEW",3)
                                                       {10     } : hixt cr     
^SCR("W4PARNEW",4)
                                                       {15     } :    d`ld     
^SCR("W4PARNEW",5)
                               {20 } : dxard ixg` milirt mihixt xi`ydl m`d     
^SCR("W4PARNEW","A",1)

^SCR("W4PARNEW","A",2)
:ˆ‰˜”Ž
^SCR("W4PARNEW","A",3)
:ˆ‰˜”ƒ’
^SCR("W4PARNEW","A",4)
:„€Œ„
^SCR("W4PARNEW","A",5)
:„˜�’„‰˜‡€�‰Œ‰’”�‰ˆ‰˜”˜‰€™„Œ�€„
^SCR("W4PARNEW","AV",1)

^SCR("W4PARNEW","AV",2)
:yhrpn
^SCR("W4PARNEW","AV",3)
:yhrpsg
^SCR("W4PARNEW","AV",4)
:vtkv
^SCR("W4PARNEW","AV",5)
:vrcgvhrjtohkhgpohyhrprhtavkotv
^SCR("W4PARNEW","NAME")
mihixt ly micew zxard
^SCR("W4PARNEW","P",5,"CRD")
2,55,E,8,0
^SCR("W4PARNEW","P",5,"FNC")

^SCR("W4PARNEW","P",5,"GLOB")
PAR
^SCR("W4PARNEW","P",5,"HELP")

^SCR("W4PARNEW","P",5,"LMAX")
8
^SCR("W4PARNEW","P",5,"MUMPS1")

^SCR("W4PARNEW","P",5,"MUMPS2")

^SCR("W4PARNEW","P",5,"NLN")
20
^SCR("W4PARNEW","P",5,"RZD")
**
^SCR("W4PARNEW","P",5,"TOPB")
8
^SCR("W4PARNEW","P",5,"TYP")
E
^SCR("W4PARNEW","P",10,"CRD")
3,55,E,8,0
^SCR("W4PARNEW","P",10,"FNC")

^SCR("W4PARNEW","P",10,"GLOB")
PAR
^SCR("W4PARNEW","P",10,"HELP")

^SCR("W4PARNEW","P",10,"LMAX")
8
^SCR("W4PARNEW","P",10,"MUMPS1")

^SCR("W4PARNEW","P",10,"MUMPS2")

^SCR("W4PARNEW","P",10,"NLN")
20
^SCR("W4PARNEW","P",10,"RZD")
**
^SCR("W4PARNEW","P",10,"TOPB")
8
^SCR("W4PARNEW","P",10,"TYP")
E
^SCR("W4PARNEW","P",15,"CRD")
4,55,N,8,0
^SCR("W4PARNEW","P",15,"HELP")

^SCR("W4PARNEW","P",15,"LMAX")
8
^SCR("W4PARNEW","P",15,"MUMPS1")

^SCR("W4PARNEW","P",15,"MUMPS2")

^SCR("W4PARNEW","P",15,"TYP")
N
^SCR("W4PARNEW","P",20,"CRD")
5,31,B,1,0
^SCR("W4PARNEW","P",20,"HELP")

^SCR("W4PARNEW","P",20,"LMAX")
4
^SCR("W4PARNEW","P",20,"MUMPS1")

^SCR("W4PARNEW","P",20,"MUMPS2")

^SCR("W4PARNEW","P",20,"TYP")
B
^SCR("W4PARNEW","P","NAME","ADPAR")
10
^SCR("W4PARNEW","P","NAME","MEPAR")
5
^SCR("W4PARNEW","P","NAME","NL")
20
^SCR("W4PARNEW","P","NAME","SHIFT")
15
^SCR("W4PARNEW","P","NM",5)
MEPAR
^SCR("W4PARNEW","P","NM",10)
ADPAR
^SCR("W4PARNEW","P","NM",15)
SHIFT
^SCR("W4PARNEW","P","NM",20)
NL
^SCR("W4PARTN")
H
^SCR("W4PARTN",1)
                                                                               
^SCR("W4PARTN",2)
                                                                       ]       
^SCR("W4PARTN",3)
                       {                    04}{03        } :     hixt         
^SCR("W4PARTN",4)
                                                                               
^SCR("W4PARTN",5)
                                               {05        } :   jix`zn         
^SCR("W4PARTN",6)
                                               {10        } : jix`z cr         
^SCR("W4PARTN",7)
                                                                               
^SCR("W4PARTN",8)
     [                                                                         
^SCR("W4PARTN","A",1)

^SCR("W4PARTN","A",2)

^SCR("W4PARTN","A",3)
:ˆ‰˜”
^SCR("W4PARTN","A",4)

^SCR("W4PARTN","A",5)
:Š‰˜€šŽ
^SCR("W4PARTN","A",6)
:Š‰˜€šƒ’
^SCR("W4PARTN","A",7)

^SCR("W4PARTN","A",8)

^SCR("W4PARTN","AV",1)

^SCR("W4PARTN","AV",2)

^SCR("W4PARTN","AV",3)
:yhrp
^SCR("W4PARTN","AV",4)

^SCR("W4PARTN","AV",5)
:lhrt,n
^SCR("W4PARTN","AV",6)
:lhrt,sg
^SCR("W4PARTN","AV",7)

^SCR("W4PARTN","AV",8)

^SCR("W4PARTN","NAME")

^SCR("W4PARTN","P",3,"CHECK")
Y
^SCR("W4PARTN","P",3,"CRD")
3,47,E,8,0
^SCR("W4PARTN","P",3,"FNC")

^SCR("W4PARTN","P",3,"GLOB")
^PAR
^SCR("W4PARTN","P",3,"HELP")

^SCR("W4PARTN","P",3,"LMAX")
11
^SCR("W4PARTN","P",3,"MUMPS1")

^SCR("W4PARTN","P",3,"MUMPS2")

^SCR("W4PARTN","P",3,"NLN")
20
^SCR("W4PARTN","P",3,"RZD")
\
^SCR("W4PARTN","P",3,"TOPB")
8
^SCR("W4PARTN","P",3,"TYP")
E
^SCR("W4PARTN","P",3,"VRB")
PAR1
^SCR("W4PARTN","P",4,"CRD")
3,47,H,23,0
^SCR("W4PARTN","P",4,"HELP")

^SCR("W4PARTN","P",4,"LMAX")
23
^SCR("W4PARTN","P",4,"MUMPS1")

^SCR("W4PARTN","P",4,"MUMPS2")

^SCR("W4PARTN","P",4,"OUTPUT")

^SCR("W4PARTN","P",4,"TYP")
H
^SCR("W4PARTN","P",5,"CRD")
5,47,D,8,0
^SCR("W4PARTN","P",5,"HELP")

^SCR("W4PARTN","P",5,"LMAX")
11
^SCR("W4PARTN","P",5,"MUMPS1")

^SCR("W4PARTN","P",5,"MUMPS2")

^SCR("W4PARTN","P",5,"MUST")

^SCR("W4PARTN","P",5,"TYP")
D
^SCR("W4PARTN","P",10,"CRD")
6,47,D,8,0
^SCR("W4PARTN","P",10,"HELP")

^SCR("W4PARTN","P",10,"LMAX")
11
^SCR("W4PARTN","P",10,"MUMPS1")

^SCR("W4PARTN","P",10,"MUMPS2")

^SCR("W4PARTN","P",10,"TYP")
D
^SCR("W4PARTN","P","NAME","ADDAT")
10
^SCR("W4PARTN","P","NAME","MEDAT")
5
^SCR("W4PARTN","P","NAME","PAR")
3
^SCR("W4PARTN","P","NAME","PAR1")
4
^SCR("W4PARTN","P","NM",3)
PAR
^SCR("W4PARTN","P","NM",4)
PAR1
^SCR("W4PARTN","P","NM",5)
MEDAT
^SCR("W4PARTN","P","NM",10)
ADDAT
^SCR("W4PRATE")
H
^SCR("W4PRATE",1)
                                                                               
^SCR("W4PRATE",2)
                                                              ]                
^SCR("W4PRATE",3)
                                      {05        } :   jix`zn                  
^SCR("W4PRATE",4)
                                      {10        } : jix`z cr                  
^SCR("W4PRATE",5)
                                                                               
^SCR("W4PRATE",6)
                                                                               
^SCR("W4PRATE",7)
                                  [                                            
^SCR("W4PRATE","A",1)

^SCR("W4PRATE","A",2)

^SCR("W4PRATE","A",3)
:Š‰˜€šŽ
^SCR("W4PRATE","A",4)
:Š‰˜€šƒ’
^SCR("W4PRATE","A",5)

^SCR("W4PRATE","A",6)

^SCR("W4PRATE","A",7)

^SCR("W4PRATE","AV",1)

^SCR("W4PRATE","AV",2)

^SCR("W4PRATE","AV",3)
:lhrt,n
^SCR("W4PRATE","AV",4)
:lhrt,sg
^SCR("W4PRATE","AV",5)

^SCR("W4PRATE","AV",6)

^SCR("W4PRATE","AV",7)

^SCR("W4PRATE","NAME")

^SCR("W4PRATE","P",5,"CRD")
3,38,D,8,0
^SCR("W4PRATE","P",5,"HELP")

^SCR("W4PRATE","P",5,"LMAX")
11
^SCR("W4PRATE","P",5,"MUMPS1")

^SCR("W4PRATE","P",5,"MUMPS2")

^SCR("W4PRATE","P",5,"MUST")

^SCR("W4PRATE","P",5,"TYP")
D
^SCR("W4PRATE","P",10,"CRD")
4,38,D,8,0
^SCR("W4PRATE","P",10,"HELP")

^SCR("W4PRATE","P",10,"LMAX")
11
^SCR("W4PRATE","P",10,"MUMPS1")

^SCR("W4PRATE","P",10,"MUMPS2")

^SCR("W4PRATE","P",10,"TYP")
D
^SCR("W4PRATE","P","NAME","ADDAT")
10
^SCR("W4PRATE","P","NAME","MEDAT")
5
^SCR("W4PRATE","P","NM",5)
MEDAT
^SCR("W4PRATE","P","NM",10)
ADDAT
^SCR("W4PRMADM")
H
^SCR("W4PRMADM",1)
                          # zkxrn ldpn ly mixhnxt #                            
^SCR("W4PRMADM",2)
                      {                                       01}:inyix wqrd my
^SCR("W4PRMADM",3)
                                            {                 03}: sqep wqrd my
^SCR("W4PRMADM",4)
     {02 } : ( 0 - divte` oi` , 4 - xteq ,3 - xa, 2 - TAW ,1 - libx ) dcrqn beq
^SCR("W4PRMADM",5)
                 {05 } : (0 - `l ,1 - ok ) migelyn zkxrn mr cearl zexyt` yi m`d
^SCR("W4PRMADM",6)
                                            {06 }: xign zrvdk gelyn lk lawl m`d
^SCR("W4PRMADM",7)
                   {07 } : ( 0   - `l , 1 - ok ) mipetqn mr cearl zexyt` yi m`d
^SCR("W4PRMADM",8)
                 {10 } : ( 0  - `l , 1 - ok ) i`ln zkxrn mr cearl zexyt` yi m`d
^SCR("W4PRMADM",9)
                                   {11  }  :  miwtql miwiy qitcdl zexyt` yi m`d
^SCR("W4PRMADM",10)
                 {12 } : (0 - `l ,1 - ok) RESTORAN zkxrn mr cearl zexyt` yi m`d
^SCR("W4PRMADM",11)
                  {17 } : (0 - `l ,1 - ok) qtihlen zkxrn mr cearl zexyt` yi m`d
^SCR("W4PRMADM",12)
           {14 } : (0 - `l ,1 - ok) LOGIC BUSINESS zkxrn mr cearl zexyt` yi m`d
^SCR("W4PRMADM",13)
                 {16 } : (0 - `l ,1 - ok) CHECK MY zkxrn mr cearl zexyt` yi m`d
^SCR("W4PRMADM",14)
                              {13 }: zipevig dpkezl mipezp xiardl zexyt` yi m`d
^SCR("W4PRMADM",15)
     {15 }:(0-`l ,2-'nehe` zexcbd mr,1-ok )  zi`xw` dcnrn zkxrnl qpkdl ozip m`d
^SCR("W4PRMADM",16)
     {20 }:                                               zkxrna dtew zecnr 'qn
^SCR("W4PRMADM",17)
     {25 }:                                             zkxrna mipea zeqtcn 'qn
^SCR("W4PRMADM",18)
            {30 } : (0 - `l ,1 - ok )  mei zxibq `ll cearl jiyndl zexyt` yi m`d
^SCR("W4PRMADM",19)
                   {35 } : (0 - `l ,1 - ok )  l"`ecl Z ipezp xcyl zexyt` yi m`d
^SCR("W4PRMADM",20)
            {37 } : (0 - `l ,1 - ok )  l"`ecl zegpde milehia xcyl zexyt` yi m`d
^SCR("W4PRMADM",21)
              {40 } : (0 - `l ,1 - ok )  zegezt zepnfd mr Z witdl zexyt` yi m`d
^SCR("W4PRMADM",22)
              {42 } :                    cf zwtd iptl zegezt zepnfd lk lhal m`d
^SCR("W4PRMADM",23)
         {45      } :                                        wegxn dqipkl dnqiq
^SCR("W4PRMADM",24)
             {47  } :zncew 'ayg ly jix`zn zegt `l zipeayg jix`zy dwica lhal m`d
^SCR("W4PRMADM",25)
               {50 }:     ( 0 - `l ,1 - ok ) "dpnfd bvde xeny" divte` bivdl m`d
^SCR("W4PRMADM",26)
               {52 }:                                   SNBC zeqtcna ynzydl m`d
^SCR("W4PRMADM",27)
  {54 }:(ueg xeciy+opr-5,opra-4,ycg-3,xiykn ila-2,xiykn mr-1,`l-0) EMV mr dcear
^SCR("W4PRMADM",28)
               {56 }:                          zilbp`a zeiaezke miywn bivdl m`d
^SCR("W4PRMADM",29)
               {58 }:                                  "-" mr gewl cew xy`l m`d
^SCR("W4PRMADM",30)
     {60           }:         hpxhpi`n dpnfd dribdy drced gelyl oetlh 'qn dfi`l
^SCR("W4PRMADM",31)
               {65 }:                         ifkxn xz`n mihixt zhilw xyt`l m`d
^SCR("W4PRMADM",32)
               {68 }:                  mihixt zkxrn mr dcear "zepey"a xytdl m`d
^SCR("W4PRMADM","AV",1)
úëøòîìäðîìùíéøèîøô
^SCR("W4PRMADM","AV",2)
:éîùéø÷ñòäíù
^SCR("W4PRMADM","AV",3)
:óñåð÷ñòäíù
^SCR("W4PRMADM","AV",4)
:(0-äéöôåàïéà,4-øôåñ,3-øá,2-TAW,1-ìéâø)äãòñîâåñ
^SCR("W4PRMADM","AV",5)
:(0-àì,1-ïë)íéçåìùîúëøòîíòãåáòìúåøùôàùéíàä
^SCR("W4PRMADM","AV",6)
:øéçîúòöäëçåìùîìëìá÷ìíàä
^SCR("W4PRMADM","AV",7)
:(0-àì,1-ïë)íéðåôñîíòãåáòìúåøùôàùéíàä
^SCR("W4PRMADM","AV",8)
:(0-àì,1-ïë)éàìîúëøòîíòãåáòìúåøùôàùéíàä
^SCR("W4PRMADM","AV",9)
:íé÷ôñìíé÷éùñéôãäìúåøùôàùéíàä
^SCR("W4PRMADM","AV",10)
:(0-àì,1-ïë)RESTORANúëøòîíòãåáòìúåøùôàùéíàä
^SCR("W4PRMADM","AV",11)
:(0-àì,1-ïë)ñôéèìåîúëøòîíòãåáòìúåøùôàùéíàä
^SCR("W4PRMADM","AV",12)
:(0-àì,1-ïë)LOGICBUSINESSúëøòîíòãåáòìúåøùôàùéíàä
^SCR("W4PRMADM","AV",13)
:(0-àì,1-ïë)CHECKMYúëøòîíòãåáòìúåøùôàùéíàä
^SCR("W4PRMADM","AV",14)
:úéðåöéçäðëåúìíéðåúðøéáòäìúåøùôàùéíàä
^SCR("W4PRMADM","AV",15)
:(0-àì,2-'îåèåàúåøãâäíò,1-ïë)úéàø÷àäãîòîúëøòîìñðëäìïúéðíàä
^SCR("W4PRMADM","AV",16)
:úëøòîáäôå÷úåãîò'ñî
^SCR("W4PRMADM","AV",17)
:úëøòîáíéðåáúåñôãî'ñî
^SCR("W4PRMADM","AV",18)
:(0-àì,1-ïë)íåéúøéâñàììãåáòìêéùîäìúåøùôàùéíàä
^SCR("W4PRMADM","AV",19)
:(0-àì,1-ïë)ì"àåãìZéðåúðøãùìúåøùôàùéíàä
^SCR("W4PRMADM","AV",20)
:(0-àì,1-ïë)ì"àåãìúåçðäåíéìåèéáøãùìúåøùôàùéíàä
^SCR("W4PRMADM","AV",21)
:(0-àì,1-ïë)úåçåúôúåðîæäíòZ÷éôäìúåøùôàùéíàä
^SCR("W4PRMADM","AV",22)
:ãæú÷ôäéðôìúåçåúôúåðîæäìëìèáìíàä
^SCR("W4PRMADM","AV",23)
:÷åçøîäñéðëìäîñéñ
^SCR("W4PRMADM","AV",24)
:úîãå÷'áùçìùêéøàúîúåçôàìúéðåáùçêéøàúùä÷éãáìèáìíàä
^SCR("W4PRMADM","AV",25)
:(0-àì,1-ïë)"äðîæäâöäåøåîù"äéöôåàâéöäìíàä
^SCR("W4PRMADM","AV",26)
:SNBCúåñôãîáùîúùäìíàä
^SCR("W4PRMADM","AV",27)
:(õåçøåãéù+ïðò-5,ïðòá-4,ùãç-3,øéùëîéìá-2,øéùëîíò-1,àì-0)EMVíòäãåáò
^SCR("W4PRMADM","AV",28)
:úéìâðàáúåéáåúëåíéù÷îâéöäìíàä
^SCR("W4PRMADM","AV",29)
:"-"íòçå÷ìãå÷øùàìíàä
^SCR("W4PRMADM","AV",30)
:èðøèðéàîäðîæääòéâäùäòãåäçåìùìïåôìè'ñîäæéàì
^SCR("W4PRMADM","AV",31)
:éæëøîøúàîíéèéøôúèéì÷øùôàìíàä
^SCR("W4PRMADM","AV",32)
:íéèéøôúëøòîíòäãåáò"úåðåù"áøùôäìíàä
^SCR("W4PRMADM","NAME")
zkxrn ldpn ly mixhnxt
^SCR("W4PRMADM","P",1,"CRD")
2,65,H,39
^SCR("W4PRMADM","P",1,"HELP")

^SCR("W4PRMADM","P",1,"LMAX")
42
^SCR("W4PRMADM","P",1,"MUMPS1")

^SCR("W4PRMADM","P",1,"MUMPS2")

^SCR("W4PRMADM","P",1,"TYP")
H
^SCR("W4PRMADM","P",2,"CRD")
4,5,E,4,0
^SCR("W4PRMADM","P",2,"HELP")

^SCR("W4PRMADM","P",2,"LMAX")
4
^SCR("W4PRMADM","P",2,"MUMPS1")

^SCR("W4PRMADM","P",2,"MUMPS2")

^SCR("W4PRMADM","P",2,"TYP")
E
^SCR("W4PRMADM","P",3,"CRD")
3,65,H,20
^SCR("W4PRMADM","P",3,"HELP")

^SCR("W4PRMADM","P",3,"LMAX")
20
^SCR("W4PRMADM","P",3,"MUMPS1")

^SCR("W4PRMADM","P",3,"MUMPS2")

^SCR("W4PRMADM","P",3,"TYP")
H
^SCR("W4PRMADM","P",5,"CRD")
5,17,B,1,0
^SCR("W4PRMADM","P",5,"HELP")

^SCR("W4PRMADM","P",5,"LMAX")
4
^SCR("W4PRMADM","P",5,"MUMPS1")

^SCR("W4PRMADM","P",5,"MUMPS2")

^SCR("W4PRMADM","P",5,"TYP")
B
^SCR("W4PRMADM","P",6,"CRD")
6,44,B,1,0
^SCR("W4PRMADM","P",6,"HELP")

^SCR("W4PRMADM","P",6,"LMAX")
4
^SCR("W4PRMADM","P",6,"MUMPS1")

^SCR("W4PRMADM","P",6,"MUMPS2")

^SCR("W4PRMADM","P",6,"TYP")
B
^SCR("W4PRMADM","P",7,"CRD")
7,19,B,1,0
^SCR("W4PRMADM","P",7,"HELP")

^SCR("W4PRMADM","P",7,"LMAX")
4
^SCR("W4PRMADM","P",7,"MUMPS1")

^SCR("W4PRMADM","P",7,"MUMPS2")

^SCR("W4PRMADM","P",7,"TYP")
B
^SCR("W4PRMADM","P",10,"CRD")
8,17,B,1,0
^SCR("W4PRMADM","P",10,"HELP")

^SCR("W4PRMADM","P",10,"LMAX")
4
^SCR("W4PRMADM","P",10,"MUMPS1")

^SCR("W4PRMADM","P",10,"MUMPS2")

^SCR("W4PRMADM","P",10,"TYP")
B
^SCR("W4PRMADM","P",11,"CRD")
9,35,B,1,0
^SCR("W4PRMADM","P",11,"HELP")

^SCR("W4PRMADM","P",11,"LMAX")
5
^SCR("W4PRMADM","P",11,"MUMPS1")

^SCR("W4PRMADM","P",11,"MUMPS2")

^SCR("W4PRMADM","P",11,"TYP")
B
^SCR("W4PRMADM","P",12,"CRD")
10,17,B,1,0
^SCR("W4PRMADM","P",12,"HELP")

^SCR("W4PRMADM","P",12,"LMAX")
4
^SCR("W4PRMADM","P",12,"MUMPS1")

^SCR("W4PRMADM","P",12,"MUMPS2")

^SCR("W4PRMADM","P",12,"TYP")
B
^SCR("W4PRMADM","P",13,"CRD")
14,30,B,1,0
^SCR("W4PRMADM","P",13,"HELP")

^SCR("W4PRMADM","P",13,"LMAX")
4
^SCR("W4PRMADM","P",13,"MUMPS1")

^SCR("W4PRMADM","P",13,"MUMPS2")

^SCR("W4PRMADM","P",13,"TYP")
B
^SCR("W4PRMADM","P",14,"CRD")
12,11,B,1,0
^SCR("W4PRMADM","P",14,"HELP")

^SCR("W4PRMADM","P",14,"LMAX")
4
^SCR("W4PRMADM","P",14,"MUMPS1")

^SCR("W4PRMADM","P",14,"MUMPS2")

^SCR("W4PRMADM","P",14,"TYP")
B
^SCR("W4PRMADM","P",15,"CRD")
15,5,N,1,0
^SCR("W4PRMADM","P",15,"HELP")

^SCR("W4PRMADM","P",15,"LMAX")
4
^SCR("W4PRMADM","P",15,"MUMPS1")

^SCR("W4PRMADM","P",15,"MUMPS2")

^SCR("W4PRMADM","P",15,"TYP")
N
^SCR("W4PRMADM","P",16,"CRD")
13,17,B,1,0
^SCR("W4PRMADM","P",16,"HELP")

^SCR("W4PRMADM","P",16,"LMAX")
4
^SCR("W4PRMADM","P",16,"MUMPS1")

^SCR("W4PRMADM","P",16,"MUMPS2")

^SCR("W4PRMADM","P",16,"TYP")
B
^SCR("W4PRMADM","P",17,"CRD")
11,18,B,1,0
^SCR("W4PRMADM","P",17,"HELP")

^SCR("W4PRMADM","P",17,"LMAX")
4
^SCR("W4PRMADM","P",17,"MUMPS1")

^SCR("W4PRMADM","P",17,"MUMPS2")

^SCR("W4PRMADM","P",17,"TYP")
B
^SCR("W4PRMADM","P",20,"CRD")
16,5,N,2,0
^SCR("W4PRMADM","P",20,"HELP")

^SCR("W4PRMADM","P",20,"LMAX")
4
^SCR("W4PRMADM","P",20,"MUMPS1")

^SCR("W4PRMADM","P",20,"MUMPS2")

^SCR("W4PRMADM","P",20,"TYP")
N
^SCR("W4PRMADM","P",25,"CRD")
17,5,N,2,0
^SCR("W4PRMADM","P",25,"HELP")

^SCR("W4PRMADM","P",25,"LMAX")
4
^SCR("W4PRMADM","P",25,"MUMPS1")

^SCR("W4PRMADM","P",25,"MUMPS2")

^SCR("W4PRMADM","P",25,"TYP")
N
^SCR("W4PRMADM","P",30,"CRD")
18,12,B,1,0
^SCR("W4PRMADM","P",30,"HELP")

^SCR("W4PRMADM","P",30,"LMAX")
4
^SCR("W4PRMADM","P",30,"MUMPS1")

^SCR("W4PRMADM","P",30,"MUMPS2")

^SCR("W4PRMADM","P",30,"TYP")
B
^SCR("W4PRMADM","P",35,"CRD")
19,19,B,1,0
^SCR("W4PRMADM","P",35,"HELP")

^SCR("W4PRMADM","P",35,"LMAX")
4
^SCR("W4PRMADM","P",35,"MUMPS1")

^SCR("W4PRMADM","P",35,"MUMPS2")

^SCR("W4PRMADM","P",35,"TYP")
B
^SCR("W4PRMADM","P",37,"CRD")
20,12,B,1,0
^SCR("W4PRMADM","P",37,"HELP")

^SCR("W4PRMADM","P",37,"LMAX")
4
^SCR("W4PRMADM","P",37,"MUMPS1")

^SCR("W4PRMADM","P",37,"MUMPS2")

^SCR("W4PRMADM","P",37,"TYP")
B
^SCR("W4PRMADM","P",40,"CRD")
21,14,B,1,0
^SCR("W4PRMADM","P",40,"HELP")

^SCR("W4PRMADM","P",40,"LMAX")
4
^SCR("W4PRMADM","P",40,"MUMPS1")

^SCR("W4PRMADM","P",40,"MUMPS2")

^SCR("W4PRMADM","P",40,"TYP")
B
^SCR("W4PRMADM","P",42,"CRD")
22,14,B,1,0
^SCR("W4PRMADM","P",42,"HELP")

^SCR("W4PRMADM","P",42,"LMAX")
4
^SCR("W4PRMADM","P",42,"MUMPS1")

^SCR("W4PRMADM","P",42,"MUMPS2")

^SCR("W4PRMADM","P",42,"TYP")
B
^SCR("W4PRMADM","P",45,"CRD")
23,9,E,9,0
^SCR("W4PRMADM","P",45,"HELP")

^SCR("W4PRMADM","P",45,"LMAX")
9
^SCR("W4PRMADM","P",45,"MUMPS1")

^SCR("W4PRMADM","P",45,"MUMPS2")

^SCR("W4PRMADM","P",45,"TYP")
E
^SCR("W4PRMADM","P",47,"CRD")
24,13,B,1,0
^SCR("W4PRMADM","P",47,"HELP")

^SCR("W4PRMADM","P",47,"LMAX")
5
^SCR("W4PRMADM","P",47,"MUMPS1")

^SCR("W4PRMADM","P",47,"MUMPS2")

^SCR("W4PRMADM","P",47,"TYP")
B
^SCR("W4PRMADM","P",50,"CRD")
25,15,B,1,0
^SCR("W4PRMADM","P",50,"HELP")

^SCR("W4PRMADM","P",50,"LMAX")
4
^SCR("W4PRMADM","P",50,"MUMPS1")

^SCR("W4PRMADM","P",50,"MUMPS2")

^SCR("W4PRMADM","P",50,"TYP")
B
^SCR("W4PRMADM","P",52,"CRD")
26,15,B,1,0
^SCR("W4PRMADM","P",52,"HELP")

^SCR("W4PRMADM","P",52,"LMAX")
4
^SCR("W4PRMADM","P",52,"MUMPS1")

^SCR("W4PRMADM","P",52,"MUMPS2")

^SCR("W4PRMADM","P",52,"TYP")
B
^SCR("W4PRMADM","P",54,"CRD")
27,2,N,1,0
^SCR("W4PRMADM","P",54,"HELP")

^SCR("W4PRMADM","P",54,"LMAX")
4
^SCR("W4PRMADM","P",54,"MUMPS1")

^SCR("W4PRMADM","P",54,"MUMPS2")

^SCR("W4PRMADM","P",54,"TYP")
N
^SCR("W4PRMADM","P",56,"CRD")
28,15,B,1,0
^SCR("W4PRMADM","P",56,"HELP")

^SCR("W4PRMADM","P",56,"LMAX")
4
^SCR("W4PRMADM","P",56,"MUMPS1")

^SCR("W4PRMADM","P",56,"MUMPS2")

^SCR("W4PRMADM","P",56,"TYP")
B
^SCR("W4PRMADM","P",58,"CRD")
29,15,B,1,0
^SCR("W4PRMADM","P",58,"HELP")

^SCR("W4PRMADM","P",58,"LMAX")
4
^SCR("W4PRMADM","P",58,"MUMPS1")

^SCR("W4PRMADM","P",58,"MUMPS2")

^SCR("W4PRMADM","P",58,"TYP")
B
^SCR("W4PRMADM","P",60,"CRD")
30,5,E,10,0
^SCR("W4PRMADM","P",60,"HELP")

^SCR("W4PRMADM","P",60,"LMAX")
14
^SCR("W4PRMADM","P",60,"MUMPS1")

^SCR("W4PRMADM","P",60,"MUMPS2")

^SCR("W4PRMADM","P",60,"TYP")
E
^SCR("W4PRMADM","P",65,"CRD")
31,15,B,1,0
^SCR("W4PRMADM","P",65,"HELP")

^SCR("W4PRMADM","P",65,"LMAX")
4
^SCR("W4PRMADM","P",65,"MUMPS1")

^SCR("W4PRMADM","P",65,"MUMPS2")

^SCR("W4PRMADM","P",65,"TYP")
B
^SCR("W4PRMADM","P",68,"CRD")
32,15,B,1,0
^SCR("W4PRMADM","P",68,"HELP")

^SCR("W4PRMADM","P",68,"LMAX")
4
^SCR("W4PRMADM","P",68,"MUMPS1")

^SCR("W4PRMADM","P",68,"MUMPS2")

^SCR("W4PRMADM","P",68,"TYP")
B
^SCR("W4PRMADM","P","NAME","BSL")
14
^SCR("W4PRMADM","P","NAME","DEFISLK")
58
^SCR("W4PRMADM","P","NAME","EMV")
54
^SCR("W4PRMADM","P","NAME","ESEKNAME")
1
^SCR("W4PRMADM","P","NAME","IT4WEB")
65
^SCR("W4PRMADM","P","NAME","KBENG")
56
^SCR("W4PRMADM","P","NAME","MAILBIT")
37
^SCR("W4PRMADM","P","NAME","MAILZ")
35
^SCR("W4PRMADM","P","NAME","MAXMDP")
25
^SCR("W4PRMADM","P","NAME","MAXPOS")
20
^SCR("W4PRMADM","P","NAME","MITEMS")
68
^SCR("W4PRMADM","P","NAME","MP")
17
^SCR("W4PRMADM","P","NAME","MSD")
2
^SCR("W4PRMADM","P","NAME","MSF")
7
^SCR("W4PRMADM","P","NAME","MSL")
5
^SCR("W4PRMADM","P","NAME","MYCHECK")
16
^SCR("W4PRMADM","P","NAME","NEWMLY")
10
^SCR("W4PRMADM","P","NAME","NIK")
3
^SCR("W4PRMADM","P","NAME","NOCHKDAT")
47
^SCR("W4PRMADM","P","NAME","NODLVORD")
6
^SCR("W4PRMADM","P","NAME","NOSG")
30
^SCR("W4PRMADM","P","NAME","NOSVSHOW")
50
^SCR("W4PRMADM","P","NAME","POS0")
15
^SCR("W4PRMADM","P","NAME","PRINTCHK")
11
^SCR("W4PRMADM","P","NAME","PSWREM")
45
^SCR("W4PRMADM","P","NAME","RESTORAN")
12
^SCR("W4PRMADM","P","NAME","SMS2BAAL")
60
^SCR("W4PRMADM","P","NAME","SNBC")
52
^SCR("W4PRMADM","P","NAME","SNDOUT")
13
^SCR("W4PRMADM","P","NAME","Z24")
40
^SCR("W4PRMADM","P","NAME","ZOPNDEL")
42
^SCR("W4PRMADM","P","NM",1)
ESEKNAME
^SCR("W4PRMADM","P","NM",2)
MSD
^SCR("W4PRMADM","P","NM",3)
NIK
^SCR("W4PRMADM","P","NM",5)
MSL
^SCR("W4PRMADM","P","NM",6)
NODLVORD
^SCR("W4PRMADM","P","NM",7)
MSF
^SCR("W4PRMADM","P","NM",10)
NEWMLY
^SCR("W4PRMADM","P","NM",11)
PRINTCHK
^SCR("W4PRMADM","P","NM",12)
RESTORAN
^SCR("W4PRMADM","P","NM",13)
SNDOUT
^SCR("W4PRMADM","P","NM",14)
BSL
^SCR("W4PRMADM","P","NM",15)
POS0
^SCR("W4PRMADM","P","NM",16)
MYCHECK
^SCR("W4PRMADM","P","NM",17)
MP
^SCR("W4PRMADM","P","NM",20)
MAXPOS
^SCR("W4PRMADM","P","NM",25)
MAXMDP
^SCR("W4PRMADM","P","NM",30)
NOSG
^SCR("W4PRMADM","P","NM",35)
MAILZ
^SCR("W4PRMADM","P","NM",37)
MAILBIT
^SCR("W4PRMADM","P","NM",40)
Z24
^SCR("W4PRMADM","P","NM",42)
ZOPNDEL
^SCR("W4PRMADM","P","NM",45)
PSWREM
^SCR("W4PRMADM","P","NM",47)
NOCHKDAT
^SCR("W4PRMADM","P","NM",50)
NOSVSHOW
^SCR("W4PRMADM","P","NM",52)
SNBC
^SCR("W4PRMADM","P","NM",54)
EMV
^SCR("W4PRMADM","P","NM",56)
KBENG
^SCR("W4PRMADM","P","NM",58)
DEFISLK
^SCR("W4PRMADM","P","NM",60)
SMS2BAAL
^SCR("W4PRMADM","P","NM",65)
IT4WEB
^SCR("W4PRMADM","P","NM",68)
MITEMS
^SCR("W4PRMAIL")
H
^SCR("W4PRMAIL",1)
     {79 }:  (0 - `l ,1 - ok )          zegewl zeveawl l"`ec xcyl zexyt` yi m`d
^SCR("W4PRMAIL",2)
  {81                                               }:   l"`ec xcyl dvign dfi`n
^SCR("W4PRMAIL",3)
 {82                                               }:(1) l"`ec xcyl zaezk dfi`l
^SCR("W4PRMAIL",4)
 {83                                               }:(2) l"`ec xcyl zaezk dfi`l
^SCR("W4PRMAIL",5)
 {84                                               }:(3) l"`ec xcyl zaezk dfi`l
^SCR("W4PRMAIL",6)
 {85                                               }:(4) l"`ec xcyl zaezk dfi`l
^SCR("W4PRMAIL",7)
 {86                                         }:oiil oe` zegpde milehia xcyl o`l
^SCR("W4PRMAIL",8)
 {19                                      }:SMS jxc zegpde milehia xeciyl xhnxt
^SCR("W4PRMAIL",9)
 {88                                     }: zayaygl uaew xcyl l"`ec zaezk dfi`l
^SCR("W4PRMAIL",10)
 {89                                               }: l"`eca zayaygl uaew zxzek
^SCR("W4PRMAIL",11)
                                                                               
^SCR("W4PRMAIL",12)
 {87                                                         }:     l"`ec gleyd
^SCR("W4PRMAIL",13)
              {90                                            }:            SMTP
^SCR("W4PRMAIL",14)
              {92                                            }: l"`ec ynzyn cew
^SCR("W4PRMAIL",15)
                                         {95                 }:    l"`ecl dnqiq
^SCR("W4PRMAIL",16)
                                                                               
^SCR("W4PRMAIL",17)
     {97                                               }: qetl` zpkez ly dvignd
^SCR("W4PRMAIL",18)
                                          {10 } : l"`ecl zipeayg xewn gelyl m`d
^SCR("W4PRMAIL",19)
                               {20 }: zilhibic dnizg mr miknqn l"`ecl gelyl m`d
^SCR("W4PRMAIL",20)
                                  {25 }: i`lah dxeva liina dpnfd ihxt bivdl m`d
^SCR("W4PRMAIL",21)
 {                                                              30}: l"`ecl lln
^SCR("W4PRMAIL",22)
 {                                                           35}:xign zrvdl lln
^SCR("W4PRMAIL",23)
 {                                                               40} :qnq-l lln
^SCR("W4PRMAIL",24)
 {                                                          42} :"zgwl" qnq lln
^SCR("W4PRMAIL",25)
 {45                                                         } qnq-l liin zaezk
^SCR("W4PRMAIL",26)
                                                                               
^SCR("W4PRMAIL","AV",1)
:(0-àì,1-ïë)úåçå÷ìúåöåá÷ìì"àåãøãùìúåøùôàùéíàä
^SCR("W4PRMAIL","AV",2)
:ì"àåãøãùìäöéçîäæéàî
^SCR("W4PRMAIL","AV",3)
:(1)ì"àåãøãùìúáåúëäæéàì
^SCR("W4PRMAIL","AV",4)
:(2)ì"àåãøãùìúáåúëäæéàì
^SCR("W4PRMAIL","AV",5)
:(3)ì"àåãøãùìúáåúëäæéàì
^SCR("W4PRMAIL","AV",6)
:(4)ì"àåãøãùìúáåúëäæéàì
^SCR("W4PRMAIL","AV",7)
:ïééìïåàúåçðäåíéìåèéáøãùìïàì
^SCR("W4PRMAIL","AV",8)
:SMSêøãúåçðäåíéìåèéáøåãéùìøèîøô
^SCR("W4PRMAIL","AV",9)
:úáùáùçìõáå÷øãùìì"àåãúáåúëäæéàì
^SCR("W4PRMAIL","AV",10)
:ì"àåãáúáùáùçìõáå÷úøúåë
^SCR("W4PRMAIL","AV",11)

^SCR("W4PRMAIL","AV",12)
:ì"àåãçìåùä
^SCR("W4PRMAIL","AV",13)
:SMTP
^SCR("W4PRMAIL","AV",14)
:ì"àåãùîúùîãå÷
^SCR("W4PRMAIL","AV",15)
:ì"àåãìäîñéñ
^SCR("W4PRMAIL","AV",16)

^SCR("W4PRMAIL","AV",17)
:ñåôìàúðëåúìùäöéçîä
^SCR("W4PRMAIL","AV",18)
:ì"àåãìúéðåáùçøå÷îçåìùìíàä
^SCR("W4PRMAIL","AV",19)
:úéìèéâéãäîéúçíòíéëîñîì"àåãìçåìùìíàä
^SCR("W4PRMAIL","AV",20)
:éàìáèäøåöáìééîáäðîæäéèøôâéöäìíàä
^SCR("W4PRMAIL","AV",21)
:ì"àåãìììî
^SCR("W4PRMAIL","AV",22)
:øéçîúòöäìììî
^SCR("W4PRMAIL","AV",23)
:ñîñ-ìììî
^SCR("W4PRMAIL","AV",24)
:"úç÷ì"ñîñììî
^SCR("W4PRMAIL","AV",25)
ñîñ-ììééîúáåúë
^SCR("W4PRMAIL","AV",26)

^SCR("W4PRMAIL","NAME")

^SCR("W4PRMAIL","P",10,"CRD")
18,42,B,1,0
^SCR("W4PRMAIL","P",10,"HELP")

^SCR("W4PRMAIL","P",10,"LMAX")
4
^SCR("W4PRMAIL","P",10,"MUMPS1")

^SCR("W4PRMAIL","P",10,"MUMPS2")

^SCR("W4PRMAIL","P",10,"TYP")
B
^SCR("W4PRMAIL","P",19,"CRD")
8,1,E,40,0
^SCR("W4PRMAIL","P",19,"HELP")

^SCR("W4PRMAIL","P",19,"LMAX")
41
^SCR("W4PRMAIL","P",19,"MUMPS1")

^SCR("W4PRMAIL","P",19,"MUMPS2")

^SCR("W4PRMAIL","P",19,"TYP")
E
^SCR("W4PRMAIL","P",20,"CRD")
19,31,B,1,0
^SCR("W4PRMAIL","P",20,"HELP")

^SCR("W4PRMAIL","P",20,"LMAX")
4
^SCR("W4PRMAIL","P",20,"MUMPS1")

^SCR("W4PRMAIL","P",20,"MUMPS2")

^SCR("W4PRMAIL","P",20,"TYP")
B
^SCR("W4PRMAIL","P",25,"CRD")
20,34,B,1,0
^SCR("W4PRMAIL","P",25,"HELP")

^SCR("W4PRMAIL","P",25,"LMAX")
4
^SCR("W4PRMAIL","P",25,"MUMPS1")

^SCR("W4PRMAIL","P",25,"MUMPS2")

^SCR("W4PRMAIL","P",25,"TYP")
B
^SCR("W4PRMAIL","P",30,"CRD")
21,67,H,60*8
^SCR("W4PRMAIL","P",30,"HELP")

^SCR("W4PRMAIL","P",30,"LMAX")
65
^SCR("W4PRMAIL","P",30,"MUMPS1")

^SCR("W4PRMAIL","P",30,"MUMPS2")

^SCR("W4PRMAIL","P",30,"TYP")
H
^SCR("W4PRMAIL","P",35,"CRD")
22,64,H,60*5
^SCR("W4PRMAIL","P",35,"HELP")

^SCR("W4PRMAIL","P",35,"LMAX")
62
^SCR("W4PRMAIL","P",35,"MUMPS1")

^SCR("W4PRMAIL","P",35,"MUMPS2")

^SCR("W4PRMAIL","P",35,"TYP")
H
^SCR("W4PRMAIL","P",40,"CRD")
23,68,H,60*4
^SCR("W4PRMAIL","P",40,"HELP")

^SCR("W4PRMAIL","P",40,"LMAX")
66
^SCR("W4PRMAIL","P",40,"MUMPS1")

^SCR("W4PRMAIL","P",40,"MUMPS2")

^SCR("W4PRMAIL","P",40,"TYP")
H
^SCR("W4PRMAIL","P",42,"CRD")
24,63,H,60*4,0
^SCR("W4PRMAIL","P",42,"HELP")

^SCR("W4PRMAIL","P",42,"LMAX")
61
^SCR("W4PRMAIL","P",42,"MUMPS1")

^SCR("W4PRMAIL","P",42,"MUMPS2")

^SCR("W4PRMAIL","P",42,"TYP")
H
^SCR("W4PRMAIL","P",45,"CRD")
25,1,E,60,0
^SCR("W4PRMAIL","P",45,"HELP")

^SCR("W4PRMAIL","P",45,"LMAX")
60
^SCR("W4PRMAIL","P",45,"MUMPS1")

^SCR("W4PRMAIL","P",45,"MUMPS2")

^SCR("W4PRMAIL","P",45,"TYP")
E
^SCR("W4PRMAIL","P",79,"CRD")
1,5,B,1,0
^SCR("W4PRMAIL","P",79,"HELP")

^SCR("W4PRMAIL","P",79,"LMAX")
4
^SCR("W4PRMAIL","P",79,"MUMPS1")

^SCR("W4PRMAIL","P",79,"MUMPS2")

^SCR("W4PRMAIL","P",79,"TYP")
B
^SCR("W4PRMAIL","P",81,"CRD")
2,2,E,50,0
^SCR("W4PRMAIL","P",81,"HELP")

^SCR("W4PRMAIL","P",81,"LMAX")
50
^SCR("W4PRMAIL","P",81,"MUMPS1")

^SCR("W4PRMAIL","P",81,"MUMPS2")

^SCR("W4PRMAIL","P",81,"TYP")
E
^SCR("W4PRMAIL","P",82,"CRD")
3,1,E,50,0
^SCR("W4PRMAIL","P",82,"HELP")

^SCR("W4PRMAIL","P",82,"LMAX")
50
^SCR("W4PRMAIL","P",82,"MUMPS1")

^SCR("W4PRMAIL","P",82,"MUMPS2")

^SCR("W4PRMAIL","P",82,"TYP")
E
^SCR("W4PRMAIL","P",83,"CRD")
4,1,E,50,0
^SCR("W4PRMAIL","P",83,"HELP")

^SCR("W4PRMAIL","P",83,"LMAX")
50
^SCR("W4PRMAIL","P",83,"MUMPS1")

^SCR("W4PRMAIL","P",83,"MUMPS2")

^SCR("W4PRMAIL","P",83,"TYP")
E
^SCR("W4PRMAIL","P",84,"CRD")
5,1,E,50,0
^SCR("W4PRMAIL","P",84,"HELP")

^SCR("W4PRMAIL","P",84,"LMAX")
50
^SCR("W4PRMAIL","P",84,"MUMPS1")

^SCR("W4PRMAIL","P",84,"MUMPS2")

^SCR("W4PRMAIL","P",84,"TYP")
E
^SCR("W4PRMAIL","P",85,"CRD")
6,1,E,50,0
^SCR("W4PRMAIL","P",85,"HELP")

^SCR("W4PRMAIL","P",85,"LMAX")
50
^SCR("W4PRMAIL","P",85,"MUMPS1")

^SCR("W4PRMAIL","P",85,"MUMPS2")

^SCR("W4PRMAIL","P",85,"TYP")
E
^SCR("W4PRMAIL","P",86,"CRD")
7,1,E,40,0
^SCR("W4PRMAIL","P",86,"HELP")

^SCR("W4PRMAIL","P",86,"LMAX")
44
^SCR("W4PRMAIL","P",86,"MUMPS1")

^SCR("W4PRMAIL","P",86,"MUMPS2")

^SCR("W4PRMAIL","P",86,"TYP")
E
^SCR("W4PRMAIL","P",87,"CRD")
12,1,E,50,0
^SCR("W4PRMAIL","P",87,"HELP")

^SCR("W4PRMAIL","P",87,"LMAX")
60
^SCR("W4PRMAIL","P",87,"MUMPS1")

^SCR("W4PRMAIL","P",87,"MUMPS2")

^SCR("W4PRMAIL","P",87,"TYP")
E
^SCR("W4PRMAIL","P",88,"CRD")
9,1,E,40,0
^SCR("W4PRMAIL","P",88,"HELP")

^SCR("W4PRMAIL","P",88,"LMAX")
40
^SCR("W4PRMAIL","P",88,"MUMPS1")

^SCR("W4PRMAIL","P",88,"MUMPS2")

^SCR("W4PRMAIL","P",88,"TYP")
E
^SCR("W4PRMAIL","P",89,"CRD")
10,1,E,50,0
^SCR("W4PRMAIL","P",89,"HELP")

^SCR("W4PRMAIL","P",89,"LMAX")
50
^SCR("W4PRMAIL","P",89,"MUMPS1")

^SCR("W4PRMAIL","P",89,"MUMPS2")

^SCR("W4PRMAIL","P",89,"TYP")
E
^SCR("W4PRMAIL","P",90,"CRD")
13,14,E,45,0
^SCR("W4PRMAIL","P",90,"HELP")

^SCR("W4PRMAIL","P",90,"LMAX")
47
^SCR("W4PRMAIL","P",90,"MUMPS1")

^SCR("W4PRMAIL","P",90,"MUMPS2")

^SCR("W4PRMAIL","P",90,"TYP")
E
^SCR("W4PRMAIL","P",92,"CRD")
14,14,E,45,0
^SCR("W4PRMAIL","P",92,"HELP")

^SCR("W4PRMAIL","P",92,"LMAX")
47
^SCR("W4PRMAIL","P",92,"MUMPS1")

^SCR("W4PRMAIL","P",92,"MUMPS2")

^SCR("W4PRMAIL","P",92,"TYP")
E
^SCR("W4PRMAIL","P",95,"CRD")
15,41,E,20,0
^SCR("W4PRMAIL","P",95,"HELP")

^SCR("W4PRMAIL","P",95,"LMAX")
20
^SCR("W4PRMAIL","P",95,"MUMPS1")

^SCR("W4PRMAIL","P",95,"MUMPS2")

^SCR("W4PRMAIL","P",95,"TYP")
E
^SCR("W4PRMAIL","P",97,"CRD")
17,5,E,50,0
^SCR("W4PRMAIL","P",97,"HELP")

^SCR("W4PRMAIL","P",97,"LMAX")
50
^SCR("W4PRMAIL","P",97,"MUMPS1")

^SCR("W4PRMAIL","P",97,"MUMPS2")

^SCR("W4PRMAIL","P",97,"TYP")
E
^SCR("W4PRMAIL","P","NAME","BIDCAUT")
35
^SCR("W4PRMAIL","P","NAME","BITSMS")
19
^SCR("W4PRMAIL","P","NAME","CMNTMAIL")
25
^SCR("W4PRMAIL","P","NAME","FROM")
87
^SCR("W4PRMAIL","P","NAME","HB2EMAIL")
10
^SCR("W4PRMAIL","P","NAME","MAILBTTO")
86
^SCR("W4PRMAIL","P","NAME","MAILGR")
79
^SCR("W4PRMAIL","P","NAME","MAILHVHD")
89
^SCR("W4PRMAIL","P","NAME","MAILHVTO")
88
^SCR("W4PRMAIL","P","NAME","MELEL")
30
^SCR("W4PRMAIL","P","NAME","MYIP")
97
^SCR("W4PRMAIL","P","NAME","PATH")
81
^SCR("W4PRMAIL","P","NAME","PSW")
95
^SCR("W4PRMAIL","P","NAME","SGNPDF")
20
^SCR("W4PRMAIL","P","NAME","SMSCONT")
40
^SCR("W4PRMAIL","P","NAME","SMSMAIL")
45
^SCR("W4PRMAIL","P","NAME","SMSTAW")
42
^SCR("W4PRMAIL","P","NAME","SMTP")
90
^SCR("W4PRMAIL","P","NAME","TO1")
82
^SCR("W4PRMAIL","P","NAME","TO2")
83
^SCR("W4PRMAIL","P","NAME","TO3")
84
^SCR("W4PRMAIL","P","NAME","TO4")
85
^SCR("W4PRMAIL","P","NAME","USER")
92
^SCR("W4PRMAIL","P","NM",10)
HB2EMAIL
^SCR("W4PRMAIL","P","NM",19)
BITSMS
^SCR("W4PRMAIL","P","NM",20)
SGNPDF
^SCR("W4PRMAIL","P","NM",25)
CMNTMAIL
^SCR("W4PRMAIL","P","NM",30)
MELEL
^SCR("W4PRMAIL","P","NM",35)
BIDCAUT
^SCR("W4PRMAIL","P","NM",40)
SMSCONT
^SCR("W4PRMAIL","P","NM",42)
SMSTAW
^SCR("W4PRMAIL","P","NM",45)
SMSMAIL
^SCR("W4PRMAIL","P","NM",79)
MAILGR
^SCR("W4PRMAIL","P","NM",81)
PATH
^SCR("W4PRMAIL","P","NM",82)
TO1
^SCR("W4PRMAIL","P","NM",83)
TO2
^SCR("W4PRMAIL","P","NM",84)
TO3
^SCR("W4PRMAIL","P","NM",85)
TO4
^SCR("W4PRMAIL","P","NM",86)
MAILBTTO
^SCR("W4PRMAIL","P","NM",87)
FROM
^SCR("W4PRMAIL","P","NM",88)
MAILHVTO
^SCR("W4PRMAIL","P","NM",89)
MAILHVHD
^SCR("W4PRMAIL","P","NM",90)
SMTP
^SCR("W4PRMAIL","P","NM",92)
USER
^SCR("W4PRMAIL","P","NM",95)
PSW
^SCR("W4PRMAIL","P","NM",97)
MYIP
^SCR("W4PRMBO0")
H
^SCR("W4PRMBO0",1)
                                {05 } : zepelg zxeva jqnl mipea zbvd lirtdl m`d
^SCR("W4PRMBO0",2)
                               {10 }: "xiit" qwea w've "zeqtcn" zniyx bivdl m`d
^SCR("W4PRMBO0",3)
                        {15 } : ( 1-1 , 2-2 ) jqnd lr bivdl zepnfd ly zexey dnk
^SCR("W4PRMBO0",4)
                     {20 } : ( 6-6 ,5-5 ,4-4 ) jqn lr bivdl zepnfd ly mixeh dnk
^SCR("W4PRMBO0",5)
                                     {25 } : oea zbvd zligzn zewc 'qn bivdl m`d
^SCR("W4PRMBO0",6)
                                   {30  }: "mec`"e "aedv" -l zewc wiqt jxc oiiv
^SCR("W4PRMBO0",7)
                              {32  }: (zewc) dbvdn oken oea milrdl onf dnk ixg`
^SCR("W4PRMBO0",8)
                                   {35                  }: oeil` wlg ly rwx rav
^SCR("W4PRMBO0",9)
                                 {37              }: oeil` wlg ly zeize` ly rav
^SCR("W4PRMBO0",10)
                                   {40                  }: oezgz wlg ly rwx rav
^SCR("W4PRMBO0",11)
                                  {45                 }: dpnfd zxzek ly rwx rav
^SCR("W4PRMBO0","AV",1)
:úåðåìçúøåöáêñîìíéðåáúâöäìéòôäìíàä
^SCR("W4PRMBO0","AV",2)
:"øééô"ñ÷åá÷'öå"úåñôãî"úîéùøâéöäìíàä
^SCR("W4PRMBO0","AV",3)
:(1-1,2-2)êñîäìòâéöäìúåðîæäìùúåøåùäîë
^SCR("W4PRMBO0","AV",4)
:(6-6,5-5,4-4)êñîìòâéöäìúåðîæäìùíéøåèäîë
^SCR("W4PRMBO0","AV",5)
:ïåáúâöäúìéçúîúå÷ã'ñîâéöäìíàä
^SCR("W4PRMBO0","AV",6)
:"íåãà"å"áåäö"-ìúå÷ã÷éñôêøãïééö
^SCR("W4PRMBO0","AV",7)
:(úå÷ã)äâöäîïëåîïåáíéìòäìïîæäîëéøçà
^SCR("W4PRMBO0","AV",8)
:ïåéìà÷ìçìùò÷øòáö
^SCR("W4PRMBO0","AV",9)
:ïåéìà÷ìçìùúåéúåàìùòáö
^SCR("W4PRMBO0","AV",10)
:ïåúçú÷ìçìùò÷øòáö
^SCR("W4PRMBO0","AV",11)
:äðîæäúøúåëìùò÷øòáö
^SCR("W4PRMBO0","NAME")
jqnl mipea zbvdl mixhnxt
^SCR("W4PRMBO0","P",5,"CRD")
1,32,B,1,0
^SCR("W4PRMBO0","P",5,"HELP")

^SCR("W4PRMBO0","P",5,"LMAX")
4
^SCR("W4PRMBO0","P",5,"MUMPS1")

^SCR("W4PRMBO0","P",5,"MUMPS2")

^SCR("W4PRMBO0","P",5,"TYP")
B
^SCR("W4PRMBO0","P",10,"CRD")
2,31,B,1,0
^SCR("W4PRMBO0","P",10,"HELP")

^SCR("W4PRMBO0","P",10,"LMAX")
4
^SCR("W4PRMBO0","P",10,"MUMPS1")

^SCR("W4PRMBO0","P",10,"MUMPS2")

^SCR("W4PRMBO0","P",10,"TYP")
B
^SCR("W4PRMBO0","P",15,"CRD")
3,24,N,1,0
^SCR("W4PRMBO0","P",15,"HELP")

^SCR("W4PRMBO0","P",15,"LMAX")
4
^SCR("W4PRMBO0","P",15,"MUMPS1")

^SCR("W4PRMBO0","P",15,"MUMPS2")

^SCR("W4PRMBO0","P",15,"TYP")
N
^SCR("W4PRMBO0","P",20,"CRD")
4,21,N,1,0
^SCR("W4PRMBO0","P",20,"HELP")

^SCR("W4PRMBO0","P",20,"LMAX")
4
^SCR("W4PRMBO0","P",20,"MUMPS1")

^SCR("W4PRMBO0","P",20,"MUMPS2")

^SCR("W4PRMBO0","P",20,"TYP")
N
^SCR("W4PRMBO0","P",25,"CRD")
5,37,B,1,0
^SCR("W4PRMBO0","P",25,"HELP")

^SCR("W4PRMBO0","P",25,"LMAX")
4
^SCR("W4PRMBO0","P",25,"MUMPS1")

^SCR("W4PRMBO0","P",25,"MUMPS2")

^SCR("W4PRMBO0","P",25,"TYP")
B
^SCR("W4PRMBO0","P",30,"CRD")
6,35,E,5,0
^SCR("W4PRMBO0","P",30,"HELP")

^SCR("W4PRMBO0","P",30,"LMAX")
5
^SCR("W4PRMBO0","P",30,"MUMPS1")

^SCR("W4PRMBO0","P",30,"MUMPS2")

^SCR("W4PRMBO0","P",30,"TYP")
E
^SCR("W4PRMBO0","P",32,"CRD")
7,30,N,3,0
^SCR("W4PRMBO0","P",32,"HELP")

^SCR("W4PRMBO0","P",32,"LMAX")
5
^SCR("W4PRMBO0","P",32,"MUMPS1")

^SCR("W4PRMBO0","P",32,"MUMPS2")

^SCR("W4PRMBO0","P",32,"TYP")
N
^SCR("W4PRMBO0","P",35,"CRD")
8,35,C,6,0
^SCR("W4PRMBO0","P",35,"HELP")

^SCR("W4PRMBO0","P",35,"LMAX")
21
^SCR("W4PRMBO0","P",35,"MUMPS1")

^SCR("W4PRMBO0","P",35,"MUMPS2")

^SCR("W4PRMBO0","P",35,"TYP")
C
^SCR("W4PRMBO0","P",37,"CRD")
9,33,C,6,0
^SCR("W4PRMBO0","P",37,"HELP")

^SCR("W4PRMBO0","P",37,"LMAX")
17
^SCR("W4PRMBO0","P",37,"MUMPS1")

^SCR("W4PRMBO0","P",37,"MUMPS2")

^SCR("W4PRMBO0","P",37,"TYP")
C
^SCR("W4PRMBO0","P",40,"CRD")
10,35,C,6,0
^SCR("W4PRMBO0","P",40,"HELP")

^SCR("W4PRMBO0","P",40,"LMAX")
21
^SCR("W4PRMBO0","P",40,"MUMPS1")

^SCR("W4PRMBO0","P",40,"MUMPS2")

^SCR("W4PRMBO0","P",40,"TYP")
C
^SCR("W4PRMBO0","P",45,"CRD")
11,34,C,6,0
^SCR("W4PRMBO0","P",45,"HELP")

^SCR("W4PRMBO0","P",45,"LMAX")
20
^SCR("W4PRMBO0","P",45,"MUMPS1")

^SCR("W4PRMBO0","P",45,"MUMPS2")

^SCR("W4PRMBO0","P",45,"TYP")
C
^SCR("W4PRMBO0","P","NAME","BGHDORD")
45
^SCR("W4PRMBO0","P","NAME","BONWND")
5
^SCR("W4PRMBO0","P","NAME","CLRBD")
40
^SCR("W4PRMBO0","P","NAME","CLRFG")
37
^SCR("W4PRMBO0","P","NAME","CLRHD")
35
^SCR("W4PRMBO0","P","NAME","DAKOT")
25
^SCR("W4PRMBO0","P","NAME","RAMZOR")
30
^SCR("W4PRMBO0","P","NAME","SHOWTM")
32
^SCR("W4PRMBO0","P","NAME","SMALLHD")
10
^SCR("W4PRMBO0","P","NAME","WNDCOLS")
20
^SCR("W4PRMBO0","P","NAME","WNDROWS")
15
^SCR("W4PRMBO0","P","NM",5)
BONWND
^SCR("W4PRMBO0","P","NM",10)
SMALLHD
^SCR("W4PRMBO0","P","NM",15)
WNDROWS
^SCR("W4PRMBO0","P","NM",20)
WNDCOLS
^SCR("W4PRMBO0","P","NM",25)
DAKOT
^SCR("W4PRMBO0","P","NM",30)
RAMZOR
^SCR("W4PRMBO0","P","NM",32)
SHOWTM
^SCR("W4PRMBO0","P","NM",35)
CLRHD
^SCR("W4PRMBO0","P","NM",37)
CLRFG
^SCR("W4PRMBO0","P","NM",40)
CLRBD
^SCR("W4PRMBO0","P","NM",45)
BGHDORD
^SCR("W4PRMBON")
H
^SCR("W4PRMBON",1)
                                {05 } : zepelg zxeva jqnl mipea zbvd lirtdl m`d
^SCR("W4PRMBON",2)
                     {20 } : ( 6-6 ,5-5 ,4-4 ) jqn lr bivdl zepnfd ly mixeh dnk
^SCR("W4PRMBON",3)
                                     {25 } : oea zbvd zligzn zewc 'qn bivdl m`d
^SCR("W4PRMBON",4)
                                   {30  }: "mec`"e "aedv" -l zewc wiqt jxc oiiv
^SCR("W4PRMBON",5)
                              {32  }: (zewc) dbvdn oken oea milrdl onf dnk ixg`
^SCR("W4PRMBON",6)
                                     {35 }: 1 zenka wx miiy`x mihixt qitcdl m`d
^SCR("W4PRMBON",7)
                                   {40 }: dpken dpnfdy oeniqa zewacn qitcdl m`d
^SCR("W4PRMBON",8)
                                            {45 }: migelyn oeaa zaezk bivdl m`d
^SCR("W4PRMBON",9)
  {50 }:( 35-35,33-33,31-31,29-29,27-27,25-25,23-23,21-21) iy`x hixtl hpet lceb
^SCR("W4PRMBON",10)
 {55 }:( 35-35,33-33,31-31,29-29,27-27,25-25,23-23,21-21) ztqez hixtl hpet lceb
^SCR("W4PRMBON",11)
                                                                               
^SCR("W4PRMBON","AV",1)
:úåðåìçúøåöáêñîìíéðåáúâöäìéòôäìíàä
^SCR("W4PRMBON","AV",2)
:(6-6,5-5,4-4)êñîìòâéöäìúåðîæäìùíéøåèäîë
^SCR("W4PRMBON","AV",3)
:ïåáúâöäúìéçúîúå÷ã'ñîâéöäìíàä
^SCR("W4PRMBON","AV",4)
:"íåãà"å"áåäö"-ìúå÷ã÷éñôêøãïééö
^SCR("W4PRMBON","AV",5)
:(úå÷ã)äâöäîïëåîïåáíéìòäìïîæäîëéøçà
^SCR("W4PRMBON","AV",6)
:1úåîëá÷øíééùàøíéèéøôñéôãäìíàä
^SCR("W4PRMBON","AV",7)
:äðëåîäðîæäùïåîéñáúå÷áãîñéôãäìíàä
^SCR("W4PRMBON","AV",8)
:íéçåìùîïåááúáåúëâéöäìíàä
^SCR("W4PRMBON","AV",9)
:(35-35,33-33,31-31,29-29,27-27,25-25,23-23,21-21)éùàøèéøôìèðåôìãåâ
^SCR("W4PRMBON","AV",10)
:(35-35,33-33,31-31,29-29,27-27,25-25,23-23,21-21)úôñåúèéøôìèðåôìãåâ
^SCR("W4PRMBON","AV",11)

^SCR("W4PRMBON","NAME")
jqnl mipea zbvdl mixhnxt
^SCR("W4PRMBON","P",5,"CRD")
1,32,B,1,0
^SCR("W4PRMBON","P",5,"HELP")

^SCR("W4PRMBON","P",5,"LMAX")
4
^SCR("W4PRMBON","P",5,"MUMPS1")

^SCR("W4PRMBON","P",5,"MUMPS2")

^SCR("W4PRMBON","P",5,"TYP")
B
^SCR("W4PRMBON","P",20,"CRD")
2,21,N,1,0
^SCR("W4PRMBON","P",20,"HELP")

^SCR("W4PRMBON","P",20,"LMAX")
4
^SCR("W4PRMBON","P",20,"MUMPS1")

^SCR("W4PRMBON","P",20,"MUMPS2")

^SCR("W4PRMBON","P",20,"TYP")
N
^SCR("W4PRMBON","P",25,"CRD")
3,37,B,1,0
^SCR("W4PRMBON","P",25,"HELP")

^SCR("W4PRMBON","P",25,"LMAX")
4
^SCR("W4PRMBON","P",25,"MUMPS1")

^SCR("W4PRMBON","P",25,"MUMPS2")

^SCR("W4PRMBON","P",25,"TYP")
B
^SCR("W4PRMBON","P",30,"CRD")
4,35,E,5,0
^SCR("W4PRMBON","P",30,"HELP")

^SCR("W4PRMBON","P",30,"LMAX")
5
^SCR("W4PRMBON","P",30,"MUMPS1")

^SCR("W4PRMBON","P",30,"MUMPS2")

^SCR("W4PRMBON","P",30,"TYP")
E
^SCR("W4PRMBON","P",32,"CRD")
5,30,N,3,0
^SCR("W4PRMBON","P",32,"HELP")

^SCR("W4PRMBON","P",32,"LMAX")
5
^SCR("W4PRMBON","P",32,"MUMPS1")

^SCR("W4PRMBON","P",32,"MUMPS2")

^SCR("W4PRMBON","P",32,"TYP")
N
^SCR("W4PRMBON","P",35,"CRD")
6,37,B,1,0
^SCR("W4PRMBON","P",35,"HELP")

^SCR("W4PRMBON","P",35,"LMAX")
4
^SCR("W4PRMBON","P",35,"MUMPS1")

^SCR("W4PRMBON","P",35,"MUMPS2")

^SCR("W4PRMBON","P",35,"TYP")
B
^SCR("W4PRMBON","P",40,"CRD")
7,35,B,1,0
^SCR("W4PRMBON","P",40,"HELP")

^SCR("W4PRMBON","P",40,"LMAX")
4
^SCR("W4PRMBON","P",40,"MUMPS1")

^SCR("W4PRMBON","P",40,"MUMPS2")

^SCR("W4PRMBON","P",40,"TYP")
B
^SCR("W4PRMBON","P",45,"CRD")
8,44,B,1,0
^SCR("W4PRMBON","P",45,"HELP")

^SCR("W4PRMBON","P",45,"LMAX")
4
^SCR("W4PRMBON","P",45,"MUMPS1")

^SCR("W4PRMBON","P",45,"MUMPS2")

^SCR("W4PRMBON","P",45,"TYP")
B
^SCR("W4PRMBON","P",50,"CRD")
9,2,E,4,0
^SCR("W4PRMBON","P",50,"HELP")

^SCR("W4PRMBON","P",50,"LMAX")
4
^SCR("W4PRMBON","P",50,"MUMPS1")

^SCR("W4PRMBON","P",50,"MUMPS2")

^SCR("W4PRMBON","P",50,"TYP")
E
^SCR("W4PRMBON","P",55,"CRD")
10,1,E,4,0
^SCR("W4PRMBON","P",55,"HELP")

^SCR("W4PRMBON","P",55,"LMAX")
4
^SCR("W4PRMBON","P",55,"MUMPS1")

^SCR("W4PRMBON","P",55,"MUMPS2")

^SCR("W4PRMBON","P",55,"TYP")
E
^SCR("W4PRMBON","P","NAME","ADDSIZE")
55
^SCR("W4PRMBON","P","NAME","BONADDR")
45
^SCR("W4PRMBON","P","NAME","BONWND")
5
^SCR("W4PRMBON","P","NAME","DAKOT")
25
^SCR("W4PRMBON","P","NAME","MAINSIZE")
50
^SCR("W4PRMBON","P","NAME","MDBYAD")
40
^SCR("W4PRMBON","P","NAME","PCQN1")
35
^SCR("W4PRMBON","P","NAME","RAMZOR")
30
^SCR("W4PRMBON","P","NAME","SHOWTM")
32
^SCR("W4PRMBON","P","NAME","WNDCOLS")
20
^SCR("W4PRMBON","P","NM",5)
BONWND
^SCR("W4PRMBON","P","NM",20)
WNDCOLS
^SCR("W4PRMBON","P","NM",25)
DAKOT
^SCR("W4PRMBON","P","NM",30)
RAMZOR
^SCR("W4PRMBON","P","NM",32)
SHOWTM
^SCR("W4PRMBON","P","NM",35)
PCQN1
^SCR("W4PRMBON","P","NM",40)
MDBYAD
^SCR("W4PRMBON","P","NM",45)
BONADDR
^SCR("W4PRMBON","P","NM",50)
MAINSIZE
^SCR("W4PRMBON","P","NM",55)
ADDSIZE
^SCR("W4PRMCMV")
H
^SCR("W4PRMCMV",1)
                        # qeaiq ly rvanl mixhnxt #                             
^SCR("W4PRMCMV",2)
                                                                               
^SCR("W4PRMCMV",3)
                                                           {05       } : jix`zn
^SCR("W4PRMCMV",4)
                                                           {10     } : jix`z cr
^SCR("W4PRMCMV",5)
                                                                 {15   } : dryn
^SCR("W4PRMCMV",6)
                                                                {20  } : dry cr
^SCR("W4PRMCMV",7)
                                         {25        } : [ 12345 lynl ] reay ini
^SCR("W4PRMCMV",8)
                                                                {30  } : dgpd %
^SCR("W4PRMCMV",9)
                                                                               
^SCR("W4PRMCMV",10)
                                                                               
^SCR("W4PRMCMV",11)
                                                                               
^SCR("W4PRMCMV","AV",1)
ñåáéñìùòöáîìíéøèîøô
^SCR("W4PRMCMV","AV",2)

^SCR("W4PRMCMV","AV",3)
:êéøàúî
^SCR("W4PRMCMV","AV",4)
:êéøàúãò
^SCR("W4PRMCMV","AV",5)
:äòùî
^SCR("W4PRMCMV","AV",6)
:äòùãò
^SCR("W4PRMCMV","AV",7)
:2345ìùîòåáùéîé
^SCR("W4PRMCMV","AV",8)
:äçðä%
^SCR("W4PRMCMV","AV",9)

^SCR("W4PRMCMV","AV",10)

^SCR("W4PRMCMV","AV",11)

^SCR("W4PRMCMV","NAME")
qeaiq ly rvanl mixhnxt
^SCR("W4PRMCMV","P",5,"CRD")
3,59,D,8,0
^SCR("W4PRMCMV","P",5,"HELP")

^SCR("W4PRMCMV","P",5,"LMAX")
10
^SCR("W4PRMCMV","P",5,"MUMPS1")
S MEDAT=$G(@$$^W4PRM@("CIBMVC","MEDAT"))
^SCR("W4PRMCMV","P",5,"MUMPS2")

^SCR("W4PRMCMV","P",5,"TYP")
D
^SCR("W4PRMCMV","P",10,"CRD")
4,59,D,8,0
^SCR("W4PRMCMV","P",10,"HELP")

^SCR("W4PRMCMV","P",10,"LMAX")
8
^SCR("W4PRMCMV","P",10,"MUMPS1")
S ADDAT=$G(@$$^W4PRM@("CIBMVC","ADDAT")) 
^SCR("W4PRMCMV","P",10,"MUMPS2")

^SCR("W4PRMCMV","P",10,"TYP")
D
^SCR("W4PRMCMV","P",15,"CRD")
5,65,N,2,0
^SCR("W4PRMCMV","P",15,"HELP")

^SCR("W4PRMCMV","P",15,"LMAX")
6
^SCR("W4PRMCMV","P",15,"MUMPS1")
S MESHAA=$G(@$$^W4PRM@("CIBMVC","MESHAA")) 
^SCR("W4PRMCMV","P",15,"MUMPS2")

^SCR("W4PRMCMV","P",15,"TYP")
N
^SCR("W4PRMCMV","P",20,"CRD")
6,64,N,2,0
^SCR("W4PRMCMV","P",20,"HELP")

^SCR("W4PRMCMV","P",20,"LMAX")
5
^SCR("W4PRMCMV","P",20,"MUMPS1")
S ADSHAA=$G(@$$^W4PRM@("CIBMVC","ADSHAA")) 
^SCR("W4PRMCMV","P",20,"MUMPS2")

^SCR("W4PRMCMV","P",20,"TYP")
N
^SCR("W4PRMCMV","P",25,"CRD")
7,41,E,11,0
^SCR("W4PRMCMV","P",25,"HELP")

^SCR("W4PRMCMV","P",25,"LMAX")
11
^SCR("W4PRMCMV","P",25,"MUMPS1")
S DAYS=$G(@$$^W4PRM@("CIBMVC","DAYS")) 
^SCR("W4PRMCMV","P",25,"MUMPS2")

^SCR("W4PRMCMV","P",25,"TYP")
E
^SCR("W4PRMCMV","P",30,"CRD")
8,64,N,5,0
^SCR("W4PRMCMV","P",30,"HELP")

^SCR("W4PRMCMV","P",30,"LMAX")
5
^SCR("W4PRMCMV","P",30,"MUMPS1")
S HN=$G(@$$^W4PRM@("CIBMVC","HN")) 
^SCR("W4PRMCMV","P",30,"MUMPS2")

^SCR("W4PRMCMV","P",30,"TYP")
N
^SCR("W4PRMCMV","P","NAME","ADDAT")
10
^SCR("W4PRMCMV","P","NAME","ADSHAA")
20
^SCR("W4PRMCMV","P","NAME","DAYS")
25
^SCR("W4PRMCMV","P","NAME","HN")
30
^SCR("W4PRMCMV","P","NAME","MEDAT")
5
^SCR("W4PRMCMV","P","NAME","MESHAA")
15
^SCR("W4PRMCMV","P","NM",5)
MEDAT
^SCR("W4PRMCMV","P","NM",10)
ADDAT
^SCR("W4PRMCMV","P","NM",15)
MESHAA
^SCR("W4PRMCMV","P","NM",20)
ADSHAA
^SCR("W4PRMCMV","P","NM",25)
DAYS
^SCR("W4PRMCMV","P","NM",30)
HN
^SCR("W4PRMD")
H
^SCR("W4PRMD",1)
                                                     migily \mixvln g"ec       
^SCR("W4PRMD",2)
                         {05 }:  (ok - 1 , `l - 0)      X -a zepnfd g"ec       
^SCR("W4PRMD",3)
                         {07 }:  (ok - 1 , `l - 0)      Z -a zepnfd g"ec       
^SCR("W4PRMD",4)
                         {10 }:  (ok - 1 , `l - 0)    X -a zeipeayg g"ec       
^SCR("W4PRMD",5)
                         {12 }:  (ok - 1 , `l - 0)    Z -a zeipeayg g"ec       
^SCR("W4PRMD",6)
                          {13 }: (ok - 1 ,`l - 0) X -a dtwda zegewl g"ec       
^SCR("W4PRMD",7)
                          {14 }: (ok - 1, `l - 0) Z -a dtwda zegewl g"ec       
^SCR("W4PRMD",8)
                    {15 } : (ok - 1 ,`l - 0 ) Z -a mixvln itl g"ec bivdl       
^SCR("W4PRMD",9)
    {17 }:(0 - `ivedl `l,2 - X e Z a ,1 - Z a wx) zegpde milehia g"ec witdl m`d
^SCR("W4PRMD",10)
               {20 }:  (ok - 1 ,`l - 0)       dtwda zeipw g"ec witdl m`d       
^SCR("W4PRMD",11)
    {21 }:(zeveaw itl-3,zewlgn itl-2, hxetn-1,`l-0) mihixt zxikn g"ec witdl m`d
^SCR("W4PRMD",12)
                            {22 }: ( hxetn g"ec m` ) g"ecl mihixt hq 'qn       
^SCR("W4PRMD",13)
            {23 } : ( 4-mekq itl ,3-zenk itl ,2-my itl ,1-cew itl ) mihixt oein
^SCR("W4PRMD",14)
                           {25 } : ( dpzn iyelz ) mipetew g"ec witdl m`d       
^SCR("W4PRMD",15)
              {24 }:  (ok - 1, `l - 0)                xahvn Z qitcdl m`d       
^SCR("W4PRMD",16)
              {36 }: ( `l - 0 ,ok - 1)                  Y g"ec witdl m`d       
^SCR("W4PRMD",17)
              {37 }:     (ok - 1 ,`l - 0) zeg"ec zqtcnl Z-e X qitcdl m`d       
^SCR("W4PRMD",18)
              {38 }:       ( ok - 1 ,`l - 0 ) dxibn g"ec qitcdl cinz m`d       
^SCR("W4PRMD",19)
              {40 }: (ok - 1 ,`l - 0 ) Z iptl micaer zery zxibq rval m`d       
^SCR("W4PRMD",20)
              {45 }:      (`l  - 0 , ok - 1 ) Z ixg` `ayl xeciy rval m`d       
^SCR("W4PRMD",21)
             {47  }:                           ihnehe` Z zeyrl dry dfi`a       
^SCR("W4PRMD",22)
             {48  }:              zegezt zepnfd yi m` elit` ihnehe` Z rval m`d 
^SCR("W4PRMD",23)
             {49  }:                                      ihnehe` Z qitcdl m`d 
^SCR("W4PRMD",24)
  {50 }:(3-bven `l tih,2-g"eca bven tih la` llek `l,1-llek) tih llek oeict m`d 
^SCR("W4PRMD",25)
          {     60}:                                        tihl sqep my       
^SCR("W4PRMD",26)
  {65 } : (`l-0,ok-1 )itqk g"eca cxtp oezpk (dcrqn) TAW zexikn bivdl m`d       
^SCR("W4PRMD",27)
                                                                               
^SCR("W4PRMD","AV",1)
íéçéìù\íéøöìîç"åã
^SCR("W4PRMD","AV",2)
:(ïë-1,àì-0)X-áúåðîæäç"åã
^SCR("W4PRMD","AV",3)
:(ïë-1,àì-0)Z-áúåðîæäç"åã
^SCR("W4PRMD","AV",4)
:(ïë-1,àì-0)X-áúåéðåáùçç"åã
^SCR("W4PRMD","AV",5)
:(ïë-1,àì-0)Z-áúåéðåáùçç"åã
^SCR("W4PRMD","AV",6)
:(ïë-1,àì-0)X-áäô÷äáúåçå÷ìç"åã
^SCR("W4PRMD","AV",7)
:(ïë-1,àì-0)Z-áäô÷äáúåçå÷ìç"åã
^SCR("W4PRMD","AV",8)
:(ïë-1,àì-0)Z-áíéøöìîéôìç"åãâéöäì
^SCR("W4PRMD","AV",9)
:(0-àéöåäìàì,2-XåZá,1-Zá÷ø)úåçðäåíéìåèéáç"åã÷éôäìíàä
^SCR("W4PRMD","AV",10)
:(ïë-1,àì-0)äô÷äáúåéð÷ç"åã÷éôäìíàä
^SCR("W4PRMD","AV",11)
:(úåöåá÷éôì-3,úå÷ìçîéôì-2,èøåôî-1,àì-0)íéèéøôúøéëîç"åã÷éôäìíàä
^SCR("W4PRMD","AV",12)
:(èøåôîç"åãíà)ç"åãìíéèéøôèñ'ñî
^SCR("W4PRMD","AV",13)
:(4-íåëñéôì,3-úåîëéôì,2-íùéôì,1-ãå÷éôì)íéèéøôïåéî
^SCR("W4PRMD","AV",14)
:(äðúîéùåìú)íéðåôå÷ç"åã÷éôäìíàä
^SCR("W4PRMD","AV",15)
:(ïë-1,àì-0)øáèöîZñéôãäìíàä
^SCR("W4PRMD","AV",16)
:(àì-0,ïë-1)Yç"åã÷éôäìíàä
^SCR("W4PRMD","AV",17)
:(ïë-1,àì-0)úåç"åãúñôãîìZ-åXñéôãäìíàä
^SCR("W4PRMD","AV",18)
:(ïë-1,àì-0)äøéâîç"åãñéôãäìãéîúíàä
^SCR("W4PRMD","AV",19)
:(ïë-1,àì-0)Zéðôìíéãáåòúåòùúøéâñòöáìíàä
^SCR("W4PRMD","AV",20)
:(àì-0,ïë-1)Zéøçààáùìøåãéùòöáìíàä
^SCR("W4PRMD","AV",21)
:éèîåèåàZúåùòìäòùäæéàá
^SCR("W4PRMD","AV",22)
:úåçåúôúåðîæäùéíàåìéôàéèîåèåàZòöáìíàä
^SCR("W4PRMD","AV",23)
:éèîåèåàZñéôãäìíàä
^SCR("W4PRMD","AV",24)
:(3-âöåîàìôéè,2-ç"åãáâöåîôéèìáàììåëàì,1-ììåë)ôéèììåëïåéãôíàä
^SCR("W4PRMD","AV",25)
:ôéèìóñåðíù
^SCR("W4PRMD","AV",26)
:(àì-0,ïë-1)éôñëç"åãáãøôðïåúðë(äãòñî)TAWúåøéëîâéöäìíàä
^SCR("W4PRMD","AV",27)

^SCR("W4PRMD","NAME")

^SCR("W4PRMD","P",5,"CRD")
2,25,N,1,0
^SCR("W4PRMD","P",5,"HELP")

^SCR("W4PRMD","P",5,"LMAX")
4
^SCR("W4PRMD","P",5,"MUMPS1")

^SCR("W4PRMD","P",5,"MUMPS2")

^SCR("W4PRMD","P",5,"TYP")
N
^SCR("W4PRMD","P",7,"CRD")
3,25,N,1,0
^SCR("W4PRMD","P",7,"HELP")

^SCR("W4PRMD","P",7,"LMAX")
4
^SCR("W4PRMD","P",7,"MUMPS1")

^SCR("W4PRMD","P",7,"MUMPS2")

^SCR("W4PRMD","P",7,"TYP")
N
^SCR("W4PRMD","P",10,"CRD")
4,25,N,1,0
^SCR("W4PRMD","P",10,"HELP")

^SCR("W4PRMD","P",10,"LMAX")
4
^SCR("W4PRMD","P",10,"MUMPS1")

^SCR("W4PRMD","P",10,"MUMPS2")

^SCR("W4PRMD","P",10,"TYP")
N
^SCR("W4PRMD","P",12,"CRD")
5,25,N,1,0
^SCR("W4PRMD","P",12,"HELP")

^SCR("W4PRMD","P",12,"LMAX")
4
^SCR("W4PRMD","P",12,"MUMPS1")

^SCR("W4PRMD","P",12,"MUMPS2")

^SCR("W4PRMD","P",12,"TYP")
N
^SCR("W4PRMD","P",13,"CRD")
6,26,N,1,0
^SCR("W4PRMD","P",13,"HELP")

^SCR("W4PRMD","P",13,"LMAX")
4
^SCR("W4PRMD","P",13,"MUMPS1")

^SCR("W4PRMD","P",13,"MUMPS2")

^SCR("W4PRMD","P",13,"TYP")
N
^SCR("W4PRMD","P",14,"CRD")
7,26,N,1,0
^SCR("W4PRMD","P",14,"HELP")

^SCR("W4PRMD","P",14,"LMAX")
4
^SCR("W4PRMD","P",14,"MUMPS1")

^SCR("W4PRMD","P",14,"MUMPS2")

^SCR("W4PRMD","P",14,"TYP")
N
^SCR("W4PRMD","P",15,"CRD")
8,20,N,1,0
^SCR("W4PRMD","P",15,"HELP")

^SCR("W4PRMD","P",15,"LMAX")
4
^SCR("W4PRMD","P",15,"MUMPS1")

^SCR("W4PRMD","P",15,"MUMPS2")

^SCR("W4PRMD","P",15,"TYP")
N
^SCR("W4PRMD","P",17,"CRD")
9,4,N,1,0
^SCR("W4PRMD","P",17,"HELP")

^SCR("W4PRMD","P",17,"LMAX")
4
^SCR("W4PRMD","P",17,"MUMPS1")

^SCR("W4PRMD","P",17,"MUMPS2")

^SCR("W4PRMD","P",17,"TYP")
N
^SCR("W4PRMD","P",20,"CRD")
10,15,N,1,0
^SCR("W4PRMD","P",20,"HELP")

^SCR("W4PRMD","P",20,"LMAX")
4
^SCR("W4PRMD","P",20,"MUMPS1")

^SCR("W4PRMD","P",20,"MUMPS2")

^SCR("W4PRMD","P",20,"MUST")

^SCR("W4PRMD","P",20,"TYP")
N
^SCR("W4PRMD","P",21,"CRD")
11,4,N,1,0
^SCR("W4PRMD","P",21,"HELP")

^SCR("W4PRMD","P",21,"LMAX")
4
^SCR("W4PRMD","P",21,"MUMPS1")

^SCR("W4PRMD","P",21,"MUMPS2")

^SCR("W4PRMD","P",21,"MUST")

^SCR("W4PRMD","P",21,"TYP")
N
^SCR("W4PRMD","P",22,"CRD")
12,28,E,2,0
^SCR("W4PRMD","P",22,"FNC")

^SCR("W4PRMD","P",22,"GLOB")
P1SET
^SCR("W4PRMD","P",22,"HELP")

^SCR("W4PRMD","P",22,"LMAX")
4
^SCR("W4PRMD","P",22,"MUMPS1")

^SCR("W4PRMD","P",22,"MUMPS2")
I NSET,'$D(@$$^W4GL("P1SET")@(NSET)) S %SC("ER")=1
^SCR("W4PRMD","P",22,"NLN")
20
^SCR("W4PRMD","P",22,"RZD")
\
^SCR("W4PRMD","P",22,"TOPB")
8
^SCR("W4PRMD","P",22,"TYP")
E
^SCR("W4PRMD","P",23,"CRD")
13,12,N,1,0
^SCR("W4PRMD","P",23,"HELP")

^SCR("W4PRMD","P",23,"LMAX")
4
^SCR("W4PRMD","P",23,"MUMPS1")

^SCR("W4PRMD","P",23,"MUMPS2")

^SCR("W4PRMD","P",23,"TYP")
N
^SCR("W4PRMD","P",24,"CRD")
15,14,N,1,0
^SCR("W4PRMD","P",24,"HELP")

^SCR("W4PRMD","P",24,"LMAX")
4
^SCR("W4PRMD","P",24,"MUMPS1")

^SCR("W4PRMD","P",24,"MUMPS2")

^SCR("W4PRMD","P",24,"MUST")

^SCR("W4PRMD","P",24,"TYP")
N
^SCR("W4PRMD","P",25,"CRD")
14,27,B,1,0
^SCR("W4PRMD","P",25,"HELP")

^SCR("W4PRMD","P",25,"LMAX")
4
^SCR("W4PRMD","P",25,"MUMPS1")

^SCR("W4PRMD","P",25,"MUMPS2")

^SCR("W4PRMD","P",25,"TYP")
B
^SCR("W4PRMD","P",36,"CRD")
16,14,N,1,0
^SCR("W4PRMD","P",36,"HELP")

^SCR("W4PRMD","P",36,"LMAX")
4
^SCR("W4PRMD","P",36,"MUMPS1")

^SCR("W4PRMD","P",36,"MUMPS2")

^SCR("W4PRMD","P",36,"MUST")

^SCR("W4PRMD","P",36,"TYP")
N
^SCR("W4PRMD","P",37,"CRD")
17,14,N,1,0
^SCR("W4PRMD","P",37,"HELP")

^SCR("W4PRMD","P",37,"LMAX")
4
^SCR("W4PRMD","P",37,"MUMPS1")

^SCR("W4PRMD","P",37,"MUMPS2")

^SCR("W4PRMD","P",37,"MUST")

^SCR("W4PRMD","P",37,"TYP")
N
^SCR("W4PRMD","P",38,"CRD")
18,14,B,1,0
^SCR("W4PRMD","P",38,"HELP")

^SCR("W4PRMD","P",38,"LMAX")
4
^SCR("W4PRMD","P",38,"MUMPS1")

^SCR("W4PRMD","P",38,"MUMPS2")

^SCR("W4PRMD","P",38,"TYP")
B
^SCR("W4PRMD","P",40,"CRD")
19,14,N,1,0
^SCR("W4PRMD","P",40,"HELP")

^SCR("W4PRMD","P",40,"LMAX")
4
^SCR("W4PRMD","P",40,"MUMPS1")

^SCR("W4PRMD","P",40,"MUMPS2")

^SCR("W4PRMD","P",40,"TYP")
N
^SCR("W4PRMD","P",45,"CRD")
20,14,N,1,0
^SCR("W4PRMD","P",45,"HELP")

^SCR("W4PRMD","P",45,"LMAX")
4
^SCR("W4PRMD","P",45,"MUMPS1")

^SCR("W4PRMD","P",45,"MUMPS2")

^SCR("W4PRMD","P",45,"TYP")
N
^SCR("W4PRMD","P",47,"CRD")
21,13,T,5,0
^SCR("W4PRMD","P",47,"HELP")

^SCR("W4PRMD","P",47,"LMAX")
5
^SCR("W4PRMD","P",47,"MUMPS1")

^SCR("W4PRMD","P",47,"MUMPS2")

^SCR("W4PRMD","P",47,"TYP")
T
^SCR("W4PRMD","P",48,"CRD")
22,13,B,1,0
^SCR("W4PRMD","P",48,"HELP")

^SCR("W4PRMD","P",48,"LMAX")
5
^SCR("W4PRMD","P",48,"MUMPS1")

^SCR("W4PRMD","P",48,"MUMPS2")

^SCR("W4PRMD","P",48,"TYP")
B
^SCR("W4PRMD","P",49,"CRD")
23,13,B,1,0
^SCR("W4PRMD","P",49,"HELP")

^SCR("W4PRMD","P",49,"LMAX")
5
^SCR("W4PRMD","P",49,"MUMPS1")

^SCR("W4PRMD","P",49,"MUMPS2")

^SCR("W4PRMD","P",49,"TYP")
B
^SCR("W4PRMD","P",50,"CRD")
24,2,N,1,0
^SCR("W4PRMD","P",50,"HELP")

^SCR("W4PRMD","P",50,"LMAX")
4
^SCR("W4PRMD","P",50,"MUMPS1")

^SCR("W4PRMD","P",50,"MUMPS2")

^SCR("W4PRMD","P",50,"TYP")
N
^SCR("W4PRMD","P",60,"CRD")
25,19,H,8
^SCR("W4PRMD","P",60,"HELP")

^SCR("W4PRMD","P",60,"LMAX")
8
^SCR("W4PRMD","P",60,"MUMPS1")

^SCR("W4PRMD","P",60,"MUMPS2")

^SCR("W4PRMD","P",60,"TYP")
H
^SCR("W4PRMD","P",65,"CRD")
26,2,B,1,0
^SCR("W4PRMD","P",65,"HELP")

^SCR("W4PRMD","P",65,"LMAX")
4
^SCR("W4PRMD","P",65,"MUMPS1")

^SCR("W4PRMD","P",65,"MUMPS2")

^SCR("W4PRMD","P",65,"TYP")
B
^SCR("W4PRMD","P","NAME","DMGRA")
38
^SCR("W4PRMD","P","NAME","DOCHL")
20
^SCR("W4PRMD","P","NAME","DOCHP")
21
^SCR("W4PRMD","P","NAME","DOCHY")
36
^SCR("W4PRMD","P","NAME","MIUN")
23
^SCR("W4PRMD","P","NAME","MLZZ")
15
^SCR("W4PRMD","P","NAME","NOPCAUTO")
49
^SCR("W4PRMD","P","NAME","NSET")
22
^SCR("W4PRMD","P","NAME","SGKVZ")
40
^SCR("W4PRMD","P","NAME","TAWMSD")
65
^SCR("W4PRMD","P","NAME","TIPNT")
50
^SCR("W4PRMD","P","NAME","TIPPS")
60
^SCR("W4PRMD","P","NAME","XHSB")
10
^SCR("W4PRMD","P","NAME","XHZM")
5
^SCR("W4PRMD","P","NAME","XLKH")
13
^SCR("W4PRMD","P","NAME","Z2SHVA")
45
^SCR("W4PRMD","P","NAME","ZAUTO")
47
^SCR("W4PRMD","P","NAME","ZAUTOALW")
48
^SCR("W4PRMD","P","NAME","ZBIG")
37
^SCR("W4PRMD","P","NAME","ZDTLM")
25
^SCR("W4PRMD","P","NAME","ZHSB")
12
^SCR("W4PRMD","P","NAME","ZHZM")
7
^SCR("W4PRMD","P","NAME","ZLKH")
14
^SCR("W4PRMD","P","NAME","ZM")
24
^SCR("W4PRMD","P","NAME","ZXBIT")
17
^SCR("W4PRMD","P","NM",5)
XHZM
^SCR("W4PRMD","P","NM",7)
ZHZM
^SCR("W4PRMD","P","NM",10)
XHSB
^SCR("W4PRMD","P","NM",12)
ZHSB
^SCR("W4PRMD","P","NM",13)
XLKH
^SCR("W4PRMD","P","NM",14)
ZLKH
^SCR("W4PRMD","P","NM",15)
MLZZ
^SCR("W4PRMD","P","NM",17)
ZXBIT
^SCR("W4PRMD","P","NM",20)
DOCHL
^SCR("W4PRMD","P","NM",21)
DOCHP
^SCR("W4PRMD","P","NM",22)
NSET
^SCR("W4PRMD","P","NM",23)
MIUN
^SCR("W4PRMD","P","NM",24)
ZM
^SCR("W4PRMD","P","NM",25)
ZDTLM
^SCR("W4PRMD","P","NM",36)
DOCHY
^SCR("W4PRMD","P","NM",37)
ZBIG
^SCR("W4PRMD","P","NM",38)
DMGRA
^SCR("W4PRMD","P","NM",40)
SGKVZ
^SCR("W4PRMD","P","NM",45)
Z2SHVA
^SCR("W4PRMD","P","NM",47)
ZAUTO
^SCR("W4PRMD","P","NM",48)
ZAUTOALW
^SCR("W4PRMD","P","NM",49)
NOPCAUTO
^SCR("W4PRMD","P","NM",50)
TIPNT
^SCR("W4PRMD","P","NM",60)
TIPPS
^SCR("W4PRMD","P","NM",65)
TAWMSD
^SCR("W4PRMDA")
H
^SCR("W4PRMDA",1)
                         {03 } : ( `l - 0 ,ok - 1 ) dlirt "DELIVAPP" zkxrn m`d 
^SCR("W4PRMDA",2)
                                                           {30    } : sipq 'qn 
^SCR("W4PRMDA",3)
    {40                                                           } :     gztn 
^SCR("W4PRMDA",4)
        {45                                                           } :  ID  
^SCR("W4PRMDA",5)
   {50                                                    } : dpnfd xeciyl URL 
^SCR("W4PRMDA",6)
   {55                                                    } : dpnfd lehial URL 
^SCR("W4PRMDA",7)
                                                                               
^SCR("W4PRMDA","AV",1)
:(àì-0,ïë-1)äìéòô"DELIVAPP"úëøòîíàä
^SCR("W4PRMDA","AV",2)
:óéðñ'ñî
^SCR("W4PRMDA","AV",3)
:çúôî
^SCR("W4PRMDA","AV",4)
:ID
^SCR("W4PRMDA","AV",5)
:äðîæäøåãéùìURL
^SCR("W4PRMDA","AV",6)
:äðîæäìåèéáìURL
^SCR("W4PRMDA","AV",7)

^SCR("W4PRMDA","NAME")
DELIVAPP l mixhnxt
^SCR("W4PRMDA","P",3,"CRD")
1,25,B,1,0
^SCR("W4PRMDA","P",3,"HELP")

^SCR("W4PRMDA","P",3,"LMAX")
4
^SCR("W4PRMDA","P",3,"MUMPS1")

^SCR("W4PRMDA","P",3,"MUMPS2")

^SCR("W4PRMDA","P",3,"MUST")

^SCR("W4PRMDA","P",3,"TYP")
B
^SCR("W4PRMDA","P",30,"CRD")
2,59,E,7,0
^SCR("W4PRMDA","P",30,"HELP")

^SCR("W4PRMDA","P",30,"LMAX")
7
^SCR("W4PRMDA","P",30,"MUMPS1")

^SCR("W4PRMDA","P",30,"MUMPS2")

^SCR("W4PRMDA","P",30,"TYP")
E
^SCR("W4PRMDA","P",40,"CRD")
3,4,E,50,0
^SCR("W4PRMDA","P",40,"HELP")

^SCR("W4PRMDA","P",40,"LMAX")
62
^SCR("W4PRMDA","P",40,"MUMPS1")

^SCR("W4PRMDA","P",40,"MUMPS2")

^SCR("W4PRMDA","P",40,"TYP")
E
^SCR("W4PRMDA","P",45,"CRD")
4,8,E,50,0
^SCR("W4PRMDA","P",45,"HELP")

^SCR("W4PRMDA","P",45,"LMAX")
62
^SCR("W4PRMDA","P",45,"MUMPS1")

^SCR("W4PRMDA","P",45,"MUMPS2")

^SCR("W4PRMDA","P",45,"TYP")
E
^SCR("W4PRMDA","P",50,"CRD")
5,3,E,55,0
^SCR("W4PRMDA","P",50,"HELP")

^SCR("W4PRMDA","P",50,"LMAX")
55
^SCR("W4PRMDA","P",50,"MUMPS1")

^SCR("W4PRMDA","P",50,"MUMPS2")

^SCR("W4PRMDA","P",50,"TYP")
E
^SCR("W4PRMDA","P",55,"CRD")
6,3,E,55,0
^SCR("W4PRMDA","P",55,"HELP")

^SCR("W4PRMDA","P",55,"LMAX")
55
^SCR("W4PRMDA","P",55,"MUMPS1")

^SCR("W4PRMDA","P",55,"MUMPS2")

^SCR("W4PRMDA","P",55,"TYP")
E
^SCR("W4PRMDA","P","NAME","APPID")
45
^SCR("W4PRMDA","P","NAME","DA")
3
^SCR("W4PRMDA","P","NAME","KEY")
40
^SCR("W4PRMDA","P","NAME","MSD")
30
^SCR("W4PRMDA","P","NAME","URL")
50
^SCR("W4PRMDA","P","NAME","URLDEL")
55
^SCR("W4PRMDA","P","NM",3)
DA
^SCR("W4PRMDA","P","NM",30)
MSD
^SCR("W4PRMDA","P","NM",40)
KEY
^SCR("W4PRMDA","P","NM",45)
APPID
^SCR("W4PRMDA","P","NM",50)
URL
^SCR("W4PRMDA","P","NM",55)
URLDEL
^SCR("W4PRMDEF")
H
^SCR("W4PRMDEF","NAME")

^SCR("W4PRMEMN")
H
^SCR("W4PRMEMN",1)
                                                {05                } : seqn my 
^SCR("W4PRMEMN","AV",1)
:óåñîíù
^SCR("W4PRMEMN","NAME")
ycg `ayl mixhnxt
^SCR("W4PRMEMN","P",5,"CRD")
1,48,E,18,0
^SCR("W4PRMEMN","P",5,"HELP")

^SCR("W4PRMEMN","P",5,"LMAX")
19
^SCR("W4PRMEMN","P",5,"MUMPS1")
S BRIDGEID=$G(@$$^W4PRM@("BRIDGEID"))
^SCR("W4PRMEMN","P",5,"MUMPS2")

^SCR("W4PRMEMN","P",5,"TYP")
E
^SCR("W4PRMEMN","P","NAME","BRIDGEID")
5
^SCR("W4PRMEMN","P","NM",5)
BRIDGEID
^SCR("W4PRMEMV")
H
^SCR("W4PRMEMV",1)
                                                                               
^SCR("W4PRMEMV",2)
                                                {05      } :         seqn 'qn  
^SCR("W4PRMEMV",3)
                                         {10             } :         IP zaezk  
^SCR("W4PRMEMV",4)
                  {15                                    } : EMV zpkezl dvign  
^SCR("W4PRMEMV",5)
                                                                               
^SCR("W4PRMEMV","A",1)

^SCR("W4PRMEMV","A",2)
:“…‘Ž'‘Ž
^SCR("W4PRMEMV","A",3)
:IPš�…š‹
^SCR("W4PRMEMV","A",4)
:EMVš�‹…šŒ„–‰‡Ž
^SCR("W4PRMEMV","A",5)

^SCR("W4PRMEMV","AV",1)

^SCR("W4PRMEMV","AV",2)
:;uxnwxn
^SCR("W4PRMEMV","AV",3)
:IP,cu,f
^SCR("W4PRMEMV","AV",4)
:EMV,bfu,kvmhjn
^SCR("W4PRMEMV","AV",5)

^SCR("W4PRMEMV","NAME")
EMV-l mixhnxt
^SCR("W4PRMEMV","P",5,"CRD")
2,48,E,9,0
^SCR("W4PRMEMV","P",5,"HELP")

^SCR("W4PRMEMV","P",5,"LMAX")
9
^SCR("W4PRMEMV","P",5,"MUMPS1")
S EMVUSR=$$EMVUSR^W4PRM
^SCR("W4PRMEMV","P",5,"MUMPS2")

^SCR("W4PRMEMV","P",5,"MUST")

^SCR("W4PRMEMV","P",5,"TYP")
E
^SCR("W4PRMEMV","P",10,"CRD")
3,41,E,15,0
^SCR("W4PRMEMV","P",10,"HELP")

^SCR("W4PRMEMV","P",10,"LMAX")
16
^SCR("W4PRMEMV","P",10,"MUMPS1")
S EMVADR=$$EMVADR^W4PRM
^SCR("W4PRMEMV","P",10,"MUMPS2")

^SCR("W4PRMEMV","P",10,"TYP")
E
^SCR("W4PRMEMV","P",15,"CRD")
4,18,E,39,0
^SCR("W4PRMEMV","P",15,"HELP")

^SCR("W4PRMEMV","P",15,"LMAX")
39
^SCR("W4PRMEMV","P",15,"MUMPS1")
S EMVDIR=$$EMVDIR^W4PRM
^SCR("W4PRMEMV","P",15,"MUMPS2")

^SCR("W4PRMEMV","P",15,"TYP")
E
^SCR("W4PRMEMV","P","NAME","EMVADR")
10
^SCR("W4PRMEMV","P","NAME","EMVDIR")
15
^SCR("W4PRMEMV","P","NAME","EMVUSR")
5
^SCR("W4PRMEMV","P","NM",5)
EMVUSR
^SCR("W4PRMEMV","P","NM",10)
EMVADR
^SCR("W4PRMEMV","P","NM",15)
EMVDIR
^SCR("W4PRMGEN")
H
^SCR("W4PRMGEN",1)
          {10 }:                                elyin dnqiq ldpn lkl reawl m`d 
^SCR("W4PRMGEN",2)
       {12 }:                                  ldpn qihxka yi zneciw zextq dnk 
^SCR("W4PRMGEN",3)
          {15 }:     : (`l - 0 ,ok - 1) minelyzl `"ka melyz wlgl zexyt` yi m`d 
^SCR("W4PRMGEN",4)
        {17   }:              minelyz dnkl `"ka melyz wlgl xyt`ny ilnipin mekq 
^SCR("W4PRMGEN",5)
          {25 }:                                                 [%] n"rn lceb 
^SCR("W4PRMGEN",6)
      {30 }:(0-lebir `ll, 4-'b` 50 cr,2-'b` 10 cr,1-lwyd cr) melyzl mekq lebir 
^SCR("W4PRMGEN",7)
          {35 }:                         ( `l - 0 ,ok - 1 ) dhnl cinz lbrl m`d 
^SCR("W4PRMGEN",8)
          {37 }:                                      lwyd cr minelyz lbrl m`d 
^SCR("W4PRMGEN",9)
          {40 }:                         zclwndn mihixt ly micew cilwdl zexyt` 
^SCR("W4PRMGEN",10)
        {45   }:          gewl ihxt mr qn zipeayg `ivedl aiigny n"rn iptl mekq 
^SCR("W4PRMGEN",11)
          {50 }:       (`l - 0 ,ok - 1) oeayg zxibq ixg` ihnehe` minelyzn z`vl 
^SCR("W4PRMGEN",12)
          {55 }:       (`l - 0 ,ok - 1)  hq jeza hixtl ztqez zelrl qgiizdl m`d 
^SCR("W4PRMGEN",13)
          {57 }:       (`l - 0 ,ok - 1)    zetqezl mb dlirt (%) hixtl dgpd m`d 
^SCR("W4PRMGEN",14)
          {58 }:     (`l - 0 ,ok - 1)    dgpd `ll mb dgpd `ll hixtl zetqez m`d 
^SCR("W4PRMGEN",15)
          {60 }:  ( `l - 0 ,ok - 1)  i`xy` qihxka oeayg zxibqa dxibn geztl m`d 
^SCR("W4PRMGEN",16)
          {65 }:         ( `l - 0 ,ok - 1)  dtwda oeayg zxibqa dxibn geztl m`d 
^SCR("W4PRMGEN",17)
          {66 }:         ( `l - 0 ,ok - 1)        zeiwqr zegex` xtqn le`yl m`d 
^SCR("W4PRMGEN",18)
          {67 }:    ( `l - 0 ,ok - 1)  dgex`a zeveawd lkn zepn zxiga wecal m`d 
^SCR("W4PRMGEN",19)
          {68 }:        ( `l - 0 ,ok - 1 ) ilily mekq mr dpnfd lehia xyt`l m`d 
^SCR("W4PRMGEN",20)
          {69 }:                      ( `l - 0 ,ok - 1 ) dpnfd zwzrd xyt`l m`d 
^SCR("W4PRMGEN",21)
  {70 }: (mildpn ze`nqiq yi m` lirt `l) dgpd e`/e lehia xy`n ly xtqn le`yl m`d 
^SCR("W4PRMGEN",22)
          {80 }:                                  dgpd e` lehia zaiq le`yl m`d 
^SCR("W4PRMGEN",23)
          {82 }:                              gahndn `vi lhean hixty le`yl m`d 
^SCR("W4PRMGEN",24)
          {83 }:                             "hixt xfgye lha" divte` xyt`l m`d 
^SCR("W4PRMGEN",25)
          {84 }:                    dqtced `l cery dxey lehial xeyi` le`yl m`d 
^SCR("W4PRMGEN",26)
          {71 }:                        ipnf ea mihixt dnkl OTH zgpd xyt`l m`d 
^SCR("W4PRMGEN",27)
          {73 }:                   dpnfda zeqtcen `l zexey xcq zepyl xyt`l m`d 
^SCR("W4PRMGEN",28)
          {72 }:         dgpd / lehia ly daiq oeiva iyteg hqwh zclwd xyt`l m`d 
^SCR("W4PRMGEN",29)
          {74 }:   ( `l - 0 ,ok - 1)  `nqiq `ll '0' hixt cilwdl zexyt` zzl m`d 
^SCR("W4PRMGEN",30)
       {78 }: ( `l - 2 ,ok - 1) zg` mrt wx dpnfd oekcra dnqiq cilwdl xyt`l m`d 
^SCR("W4PRMGEN",31)
       {75    }:                               ziwqrl ccea hixt jeiyl hixt cew 
^SCR("W4PRMGEN",32)
       {77    }:                          ( iyteg hqwh ) zillk ztqezl hixt cew 
^SCR("W4PRMGEN",33)
          {76 }:                              mei zxibq lr dxdfd zzl dry dfi`a 
^SCR("W4PRMGEN",34)
                                                                               
^SCR("W4PRMGEN",35)
                                                                               
^SCR("W4PRMGEN",36)
                                                                               
^SCR("W4PRMGEN","A",1)
:…Œ™‰Ž„Ž‘‰‘Œ„�ŽŒ‹Œ’…�—Œ�€„
^SCR("W4PRMGEN","A",2)
:Œ„�Ž‘‰ˆ˜‹�™‰šŽ…ƒ‰—š…˜”‘„Ž‹
^SCR("W4PRMGEN","A",3)
::(€Œ-0,�‹-1)�‰Ž…Œ™šŒ€"‹��…Œ™š—Œ‡Œš…˜™”€™‰�€„
^SCR("W4PRMGEN","A",4)
:�‰Ž…Œ™š„Ž‹Œ€"‹��…Œ™š—Œ‡Œ˜™”€Ž™‰ŒŽ‰�‰Ž�…‹‘
^SCR("W4PRMGEN","A",5)
:Ž"’ŽŒƒ…‚
^SCR("W4PRMGEN","A",6)
:(0-Œ…‚‰’€ŒŒ,4-'‚€50ƒ’,2-'‚€10ƒ’,1-Œ—™„ƒ’)�…Œ™šŒ�…‹‘Œ…‚‰’
^SCR("W4PRMGEN","A",7)
:(€Œ-0,�‹-1)„ˆŽŒƒ‰ŽšŒ‚’Œ�€„
^SCR("W4PRMGEN","A",8)
:Œ—™„ƒ’�‰Ž…Œ™šŒ‚’Œ�€„
^SCR("W4PRMGEN","A",9)
:šƒŒ—Ž„Ž�‰ˆ‰˜”Œ™�‰ƒ…—ƒ‰Œ—„Œš…˜™”€
^SCR("W4PRMGEN","A",10)
:‡…—Œ‰ˆ˜”�’‘Žš‰�…�™‡€‰–…„Œ�‰‰‡Ž™Ž"’Ž‰�”Œ�…‹‘
^SCR("W4PRMGEN","A",11)
:(€Œ-0,�‹-1)�…�™‡š˜‰‚‘‰˜‡€‰ˆŽ…ˆ…€�‰Ž…Œ™šŽš€–Œ
^SCR("W4PRMGEN","A",12)
:(€Œ-0,�‹-1)ˆ‘Š…š�ˆ‰˜”Œš”‘…šš…Œ’Œ‘‡‰‰š„Œ�€„
^SCR("W4PRMGEN","A",13)
:(€Œ-0,�‹-1)š…”‘…šŒ�‚„Œ‰’”(%)ˆ‰˜”Œ„‡�„�€„
^SCR("W4PRMGEN","A",14)
:(€Œ-0,�‹-1)„‡�„€ŒŒ�‚„‡�„€ŒŒˆ‰˜”Œš…”‘…š�€„
^SCR("W4PRMGEN","A",15)
:(€Œ-0,�‹-1)‰€˜™€‘‰ˆ˜‹��…�™‡š˜‰‚‘�„˜‰‚Ž‡…š”Œ�€„
^SCR("W4PRMGEN","A",16)
:(€Œ-0,�‹-1)„”—„��…�™‡š˜‰‚‘�„˜‰‚Ž‡…š”Œ�€„
^SCR("W4PRMGEN","A",17)
:(€Œ-0,�‹-1)š…‰—‘’š…‡…˜€˜”‘ŽŒ…€™Œ�€„
^SCR("W4PRMGEN","A",18)
:(€Œ-0,�‹-1)„‡…˜€�š…–…�—„Œ‹Žš…�Žš˜‰‡�—…ƒ�Œ�€„
^SCR("W4PRMGEN","A",19)
:(€Œ-0,�‹-1)‰Œ‰Œ™�…‹‘�’„�Ž†„Œ…ˆ‰�˜™”€Œ�€„
^SCR("W4PRMGEN","A",20)
:(€Œ-0,�‹-1)„�Ž†„š—š’„˜™”€Œ�€„
^SCR("W4PRMGEN","A",21)
:(�‰Œ„�Žš…€Ž‘‰‘™‰�€Œ‰’”€Œ)„‡�„…€/…Œ…ˆ‰�˜™€ŽŒ™˜”‘ŽŒ…€™Œ�€„
^SCR("W4PRMGEN","A",22)
:„‡�„…€Œ…ˆ‰�š�‰‘Œ…€™Œ�€„
^SCR("W4PRMGEN","A",23)
:‡�ˆŽ„Ž€–‰Œˆ…�Žˆ‰˜”™Œ…€™Œ�€„
^SCR("W4PRMGEN","A",24)
:"ˆ‰˜”˜†‡™…Œˆ�"„‰–”…€˜™”€Œ�€„
^SCR("W4PRMGEN","A",25)
:„‘”ƒ…„€Œƒ…’™„˜…™Œ…ˆ‰�Œ˜…™‰€Œ…€™Œ�€„
^SCR("W4PRMGEN","A",26)
:‰�Ž†…��‰ˆ‰˜”„Ž‹ŒOTHš‡�„˜™”€Œ�€„
^SCR("W4PRMGEN","A",27)
:„�Ž†„�š…‘”ƒ…Ž€Œš…˜…™˜ƒ‘š…�™Œ˜™”€Œ�€„
^SCR("W4PRMGEN","A",28)
:„‡�„/Œ…ˆ‰�Œ™„�‰‘�…‰–�‰™”…‡ˆ‘—ˆšƒŒ—„˜™”€Œ�€„
^SCR("W4PRMGEN","A",29)
:(€Œ-0,�‹-1)€Ž‘‰‘€ŒŒ'0'ˆ‰˜”ƒ‰Œ—„Œš…˜™”€ššŒ�€„
^SCR("W4PRMGEN","A",30)
:(€Œ-2,�‹-1)š‡€�’”—˜„�Ž†„�…‹ƒ’�„Ž‘‰‘ƒ‰Œ—„Œ˜™”€Œ�€„
^SCR("W4PRMGEN","A",31)
:š‰—‘’Œƒƒ…�ˆ‰˜”Š…‰™Œˆ‰˜”ƒ…—
^SCR("W4PRMGEN","A",32)
:(‰™”…‡ˆ‘—ˆ)š‰ŒŒ‹š”‘…šŒˆ‰˜”ƒ…—
^SCR("W4PRMGEN","A",33)
:�…‰š˜‰‚‘Œ’„˜„†„ššŒ„’™„†‰€�
^SCR("W4PRMGEN","A",34)

^SCR("W4PRMGEN","A",35)

^SCR("W4PRMGEN","A",36)

^SCR("W4PRMGEN","AV",1)
:åìùéîäîñéñìäðîìëìòåá÷ìíàä
^SCR("W4PRMGEN","AV",2)
:ìäðîñéèøëáùéúîåãé÷úåøôñäîë
^SCR("W4PRMGEN","AV",3)
::(àì-0,ïë-1)íéîåìùúìà"ëáíåìùú÷ìçìúåøùôàùéíàä
^SCR("W4PRMGEN","AV",4)
:íéîåìùúäîëìà"ëáíåìùú÷ìçìøùôàîùéìîéðéîíåëñ
^SCR("W4PRMGEN","AV",5)
:î"òîìãåâ
^SCR("W4PRMGEN","AV",6)
:(0-ìåâéòàìì,4-'âà50ãò,2-'âà10ãò,1-ì÷ùäãò)íåìùúìíåëñìåâéò
^SCR("W4PRMGEN","AV",7)
:(àì-0,ïë-1)äèîìãéîúìâòìíàä
^SCR("W4PRMGEN","AV",8)
:ì÷ùäãòíéîåìùúìâòìíàä
^SCR("W4PRMGEN","AV",9)
:úãì÷îäîíéèéøôìùíéãå÷ãéì÷äìúåøùôà
^SCR("W4PRMGEN","AV",10)
:çå÷ìéèøôíòñîúéðåáùçàéöåäìáééçîùî"òîéðôìíåëñ
^SCR("W4PRMGEN","AV",11)
:(àì-0,ïë-1)ïåáùçúøéâñéøçàéèîåèåàíéîåìùúîúàöì
^SCR("W4PRMGEN","AV",12)
:(àì-0,ïë-1)èñêåúáèéøôìúôñåúúåìòìñçééúäìíàä
^SCR("W4PRMGEN","AV",13)
:(àì-0,ïë-1)úåôñåúìíâäìéòô(%)èéøôìäçðäíàä
^SCR("W4PRMGEN","AV",14)
:(àì-0,ïë-1)äçðäàììíâäçðäàììèéøôìúåôñåúíàä
^SCR("W4PRMGEN","AV",15)
:(àì-0,ïë-1)éàøùàñéèøëáïåáùçúøéâñáäøéâîçåúôìíàä
^SCR("W4PRMGEN","AV",16)
:(àì-0,ïë-1)äô÷äáïåáùçúøéâñáäøéâîçåúôìíàä
^SCR("W4PRMGEN","AV",17)
:(àì-0,ïë-1)úåé÷ñòúåçåøàøôñîìåàùìíàä
^SCR("W4PRMGEN","AV",18)
:(àì-0,ïë-1)äçåøàáúåöåá÷äìëîúåðîúøéçá÷åãáìíàä
^SCR("W4PRMGEN","AV",19)
:(àì-0,ïë-1)éìéìùíåëñíòäðîæäìåèéáøùôàìíàä
^SCR("W4PRMGEN","AV",20)
:(àì-0,ïë-1)äðîæäú÷úòäøùôàìíàä
^SCR("W4PRMGEN","AV",21)
:(íéìäðîúåàîñéñùéíàìéòôàì)äçðäåà/åìåèéáøùàîìùøôñîìåàùìíàä
^SCR("W4PRMGEN","AV",22)
:äçðäåàìåèéáúáéñìåàùìíàä
^SCR("W4PRMGEN","AV",23)
:çáèîäîàöéìèåáîèéøôùìåàùìíàä
^SCR("W4PRMGEN","AV",24)
:"èéøôøæçùåìèá"äéöôåàøùôàìíàä
^SCR("W4PRMGEN","AV",25)
:äñôãåäàìãåòùäøåùìåèéáìøåùéàìåàùìíàä
^SCR("W4PRMGEN","AV",26)
:éðîæåáíéèéøôäîëìOTHúçðäøùôàìíàä
^SCR("W4PRMGEN","AV",27)
:äðîæäáúåñôãåîàìúåøåùøãñúåðùìøùôàìíàä
^SCR("W4PRMGEN","AV",28)
:äçðä/ìåèéáìùäáéñïåéöáéùôåçèñ÷èúãì÷äøùôàìíàä
^SCR("W4PRMGEN","AV",29)
:(àì-0,ïë-1)àîñéñàìì'0'èéøôãéì÷äìúåøùôàúúìíàä
^SCR("W4PRMGEN","AV",30)
:(àì-2,ïë-1)úçàíòô÷øäðîæäïåëãòáäîñéñãéì÷äìøùôàìíàä
^SCR("W4PRMGEN","AV",31)
:úé÷ñòìããåáèéøôêåéùìèéøôãå÷
^SCR("W4PRMGEN","AV",32)
:(éùôåçèñ÷è)úéììëúôñåúìèéøôãå÷
^SCR("W4PRMGEN","AV",33)
:íåéúøéâñìòäøäæäúúìäòùäæéàá
^SCR("W4PRMGEN","AV",34)

^SCR("W4PRMGEN","AV",35)

^SCR("W4PRMGEN","AV",36)

^SCR("W4PRMGEN","NAME")
miillk mixhnxt
^SCR("W4PRMGEN","P",10,"CRD")
1,10,B,1,0
^SCR("W4PRMGEN","P",10,"HELP")

^SCR("W4PRMGEN","P",10,"LMAX")
4
^SCR("W4PRMGEN","P",10,"MUMPS1")

^SCR("W4PRMGEN","P",10,"MUMPS2")

^SCR("W4PRMGEN","P",10,"TYP")
B
^SCR("W4PRMGEN","P",12,"CRD")
2,7,N,1,0
^SCR("W4PRMGEN","P",12,"HELP")

^SCR("W4PRMGEN","P",12,"LMAX")
4
^SCR("W4PRMGEN","P",12,"MUMPS1")

^SCR("W4PRMGEN","P",12,"MUMPS2")

^SCR("W4PRMGEN","P",12,"TYP")
N
^SCR("W4PRMGEN","P",15,"CRD")
3,10,B,1,0
^SCR("W4PRMGEN","P",15,"HELP")

^SCR("W4PRMGEN","P",15,"LMAX")
4
^SCR("W4PRMGEN","P",15,"MUMPS1")

^SCR("W4PRMGEN","P",15,"MUMPS2")

^SCR("W4PRMGEN","P",15,"TYP")
B
^SCR("W4PRMGEN","P",17,"CRD")
4,8,N,6,2
^SCR("W4PRMGEN","P",17,"HELP")

^SCR("W4PRMGEN","P",17,"LMAX")
6
^SCR("W4PRMGEN","P",17,"MUMPS1")

^SCR("W4PRMGEN","P",17,"MUMPS2")

^SCR("W4PRMGEN","P",17,"TYP")
N
^SCR("W4PRMGEN","P",25,"CRD")
5,10,N,4,0
^SCR("W4PRMGEN","P",25,"HELP")

^SCR("W4PRMGEN","P",25,"LMAX")
4
^SCR("W4PRMGEN","P",25,"MUMPS1")

^SCR("W4PRMGEN","P",25,"MUMPS2")

^SCR("W4PRMGEN","P",25,"TYP")
N
^SCR("W4PRMGEN","P",30,"CRD")
6,6,N,1,0
^SCR("W4PRMGEN","P",30,"HELP")

^SCR("W4PRMGEN","P",30,"LMAX")
4
^SCR("W4PRMGEN","P",30,"MUMPS1")

^SCR("W4PRMGEN","P",30,"MUMPS2")
I "0124"'[IGUL S %SC("ER")=1
^SCR("W4PRMGEN","P",30,"TYP")
N
^SCR("W4PRMGEN","P",35,"CRD")
7,10,B,1,0
^SCR("W4PRMGEN","P",35,"HELP")

^SCR("W4PRMGEN","P",35,"LMAX")
4
^SCR("W4PRMGEN","P",35,"MUMPS1")

^SCR("W4PRMGEN","P",35,"MUMPS2")

^SCR("W4PRMGEN","P",35,"TYP")
B
^SCR("W4PRMGEN","P",37,"CRD")
8,10,B,1,0
^SCR("W4PRMGEN","P",37,"HELP")

^SCR("W4PRMGEN","P",37,"LMAX")
4
^SCR("W4PRMGEN","P",37,"MUMPS1")

^SCR("W4PRMGEN","P",37,"MUMPS2")

^SCR("W4PRMGEN","P",37,"TYP")
B
^SCR("W4PRMGEN","P",40,"CRD")
9,10,B,1,0
^SCR("W4PRMGEN","P",40,"HELP")

^SCR("W4PRMGEN","P",40,"LMAX")
4
^SCR("W4PRMGEN","P",40,"MUMPS1")

^SCR("W4PRMGEN","P",40,"MUMPS2")

^SCR("W4PRMGEN","P",40,"TYP")
B
^SCR("W4PRMGEN","P",45,"CRD")
10,8,N,5,0
^SCR("W4PRMGEN","P",45,"HELP")

^SCR("W4PRMGEN","P",45,"LMAX")
6
^SCR("W4PRMGEN","P",45,"MUMPS1")

^SCR("W4PRMGEN","P",45,"MUMPS2")

^SCR("W4PRMGEN","P",45,"TYP")
N
^SCR("W4PRMGEN","P",50,"CRD")
11,10,B,1,0
^SCR("W4PRMGEN","P",50,"HELP")

^SCR("W4PRMGEN","P",50,"LMAX")
4
^SCR("W4PRMGEN","P",50,"MUMPS1")

^SCR("W4PRMGEN","P",50,"MUMPS2")

^SCR("W4PRMGEN","P",50,"TYP")
B
^SCR("W4PRMGEN","P",55,"CRD")
12,10,B,1,0
^SCR("W4PRMGEN","P",55,"HELP")

^SCR("W4PRMGEN","P",55,"LMAX")
4
^SCR("W4PRMGEN","P",55,"MUMPS1")

^SCR("W4PRMGEN","P",55,"MUMPS2")

^SCR("W4PRMGEN","P",55,"TYP")
B
^SCR("W4PRMGEN","P",57,"CRD")
13,10,B,1,0
^SCR("W4PRMGEN","P",57,"HELP")

^SCR("W4PRMGEN","P",57,"LMAX")
4
^SCR("W4PRMGEN","P",57,"MUMPS1")

^SCR("W4PRMGEN","P",57,"MUMPS2")

^SCR("W4PRMGEN","P",57,"TYP")
B
^SCR("W4PRMGEN","P",58,"CRD")
14,10,B,1,0
^SCR("W4PRMGEN","P",58,"HELP")

^SCR("W4PRMGEN","P",58,"LMAX")
4
^SCR("W4PRMGEN","P",58,"MUMPS1")

^SCR("W4PRMGEN","P",58,"MUMPS2")

^SCR("W4PRMGEN","P",58,"TYP")
B
^SCR("W4PRMGEN","P",60,"CRD")
15,10,B,1,0
^SCR("W4PRMGEN","P",60,"HELP")

^SCR("W4PRMGEN","P",60,"LMAX")
4
^SCR("W4PRMGEN","P",60,"MUMPS1")

^SCR("W4PRMGEN","P",60,"MUMPS2")

^SCR("W4PRMGEN","P",60,"TYP")
B
^SCR("W4PRMGEN","P",65,"CRD")
16,10,B,1,0
^SCR("W4PRMGEN","P",65,"HELP")

^SCR("W4PRMGEN","P",65,"LMAX")
4
^SCR("W4PRMGEN","P",65,"MUMPS1")

^SCR("W4PRMGEN","P",65,"MUMPS2")

^SCR("W4PRMGEN","P",65,"TYP")
B
^SCR("W4PRMGEN","P",66,"CRD")
17,10,B,1,0
^SCR("W4PRMGEN","P",66,"HELP")

^SCR("W4PRMGEN","P",66,"LMAX")
4
^SCR("W4PRMGEN","P",66,"MUMPS1")
S:QAI1="" QAI1=1
^SCR("W4PRMGEN","P",66,"MUMPS2")

^SCR("W4PRMGEN","P",66,"TYP")
B
^SCR("W4PRMGEN","P",67,"CRD")
18,10,B,1,0
^SCR("W4PRMGEN","P",67,"HELP")

^SCR("W4PRMGEN","P",67,"LMAX")
4
^SCR("W4PRMGEN","P",67,"MUMPS1")

^SCR("W4PRMGEN","P",67,"MUMPS2")

^SCR("W4PRMGEN","P",67,"TYP")
B
^SCR("W4PRMGEN","P",68,"CRD")
19,10,B,1,0
^SCR("W4PRMGEN","P",68,"HELP")

^SCR("W4PRMGEN","P",68,"LMAX")
4
^SCR("W4PRMGEN","P",68,"MUMPS1")

^SCR("W4PRMGEN","P",68,"MUMPS2")

^SCR("W4PRMGEN","P",68,"TYP")
B
^SCR("W4PRMGEN","P",69,"CRD")
20,10,B,1,0
^SCR("W4PRMGEN","P",69,"HELP")

^SCR("W4PRMGEN","P",69,"LMAX")
4
^SCR("W4PRMGEN","P",69,"MUMPS1")

^SCR("W4PRMGEN","P",69,"MUMPS2")

^SCR("W4PRMGEN","P",69,"TYP")
B
^SCR("W4PRMGEN","P",70,"CRD")
21,2,B,1,0
^SCR("W4PRMGEN","P",70,"HELP")

^SCR("W4PRMGEN","P",70,"LMAX")
4
^SCR("W4PRMGEN","P",70,"MUMPS1")

^SCR("W4PRMGEN","P",70,"MUMPS2")

^SCR("W4PRMGEN","P",70,"TYP")
B
^SCR("W4PRMGEN","P",71,"CRD")
26,10,B,1,0
^SCR("W4PRMGEN","P",71,"HELP")

^SCR("W4PRMGEN","P",71,"LMAX")
4
^SCR("W4PRMGEN","P",71,"MUMPS1")

^SCR("W4PRMGEN","P",71,"MUMPS2")

^SCR("W4PRMGEN","P",71,"TYP")
B
^SCR("W4PRMGEN","P",72,"CRD")
28,10,B,1,0
^SCR("W4PRMGEN","P",72,"HELP")

^SCR("W4PRMGEN","P",72,"LMAX")
4
^SCR("W4PRMGEN","P",72,"MUMPS1")

^SCR("W4PRMGEN","P",72,"MUMPS2")

^SCR("W4PRMGEN","P",72,"TYP")
B
^SCR("W4PRMGEN","P",73,"CRD")
27,10,B,1,0
^SCR("W4PRMGEN","P",73,"HELP")

^SCR("W4PRMGEN","P",73,"LMAX")
4
^SCR("W4PRMGEN","P",73,"MUMPS1")

^SCR("W4PRMGEN","P",73,"MUMPS2")

^SCR("W4PRMGEN","P",73,"TYP")
B
^SCR("W4PRMGEN","P",74,"CRD")
29,10,B,1,0
^SCR("W4PRMGEN","P",74,"HELP")

^SCR("W4PRMGEN","P",74,"LMAX")
4
^SCR("W4PRMGEN","P",74,"MUMPS1")

^SCR("W4PRMGEN","P",74,"MUMPS2")

^SCR("W4PRMGEN","P",74,"TYP")
B
^SCR("W4PRMGEN","P",75,"CHECK")
Y
^SCR("W4PRMGEN","P",75,"CRD")
31,7,E,7,0
^SCR("W4PRMGEN","P",75,"FNC")

^SCR("W4PRMGEN","P",75,"GLOB")
^PAR
^SCR("W4PRMGEN","P",75,"HELP")

^SCR("W4PRMGEN","P",75,"LMAX")
7
^SCR("W4PRMGEN","P",75,"MUMPS1")

^SCR("W4PRMGEN","P",75,"MUMPS2")

^SCR("W4PRMGEN","P",75,"NLN")
20
^SCR("W4PRMGEN","P",75,"RZD")
**
^SCR("W4PRMGEN","P",75,"TOPB")
8
^SCR("W4PRMGEN","P",75,"TYP")
E
^SCR("W4PRMGEN","P",76,"CRD")
33,10,E,2,0
^SCR("W4PRMGEN","P",76,"HELP")

^SCR("W4PRMGEN","P",76,"LMAX")
4
^SCR("W4PRMGEN","P",76,"MUMPS1")

^SCR("W4PRMGEN","P",76,"MUMPS2")

^SCR("W4PRMGEN","P",76,"TYP")
E
^SCR("W4PRMGEN","P",77,"CHECK")
Y
^SCR("W4PRMGEN","P",77,"CRD")
32,7,E,7,0
^SCR("W4PRMGEN","P",77,"FNC")

^SCR("W4PRMGEN","P",77,"GLOB")
^PAR
^SCR("W4PRMGEN","P",77,"HELP")

^SCR("W4PRMGEN","P",77,"LMAX")
7
^SCR("W4PRMGEN","P",77,"MUMPS1")

^SCR("W4PRMGEN","P",77,"MUMPS2")

^SCR("W4PRMGEN","P",77,"NLN")
20
^SCR("W4PRMGEN","P",77,"RZD")
**
^SCR("W4PRMGEN","P",77,"TOPB")
8
^SCR("W4PRMGEN","P",77,"TYP")
E
^SCR("W4PRMGEN","P",78,"CRD")
30,7,N,1,0
^SCR("W4PRMGEN","P",78,"HELP")

^SCR("W4PRMGEN","P",78,"LMAX")
4
^SCR("W4PRMGEN","P",78,"MUMPS1")

^SCR("W4PRMGEN","P",78,"MUMPS2")

^SCR("W4PRMGEN","P",78,"TYP")
N
^SCR("W4PRMGEN","P",80,"CRD")
22,10,B,1,0
^SCR("W4PRMGEN","P",80,"HELP")

^SCR("W4PRMGEN","P",80,"LMAX")
4
^SCR("W4PRMGEN","P",80,"MUMPS1")

^SCR("W4PRMGEN","P",80,"MUMPS2")

^SCR("W4PRMGEN","P",80,"TYP")
B
^SCR("W4PRMGEN","P",82,"CRD")
23,10,B,1,0
^SCR("W4PRMGEN","P",82,"HELP")

^SCR("W4PRMGEN","P",82,"LMAX")
4
^SCR("W4PRMGEN","P",82,"MUMPS1")

^SCR("W4PRMGEN","P",82,"MUMPS2")

^SCR("W4PRMGEN","P",82,"TYP")
B
^SCR("W4PRMGEN","P",83,"CRD")
24,10,B,1,0
^SCR("W4PRMGEN","P",83,"HELP")

^SCR("W4PRMGEN","P",83,"LMAX")
4
^SCR("W4PRMGEN","P",83,"MUMPS1")

^SCR("W4PRMGEN","P",83,"MUMPS2")

^SCR("W4PRMGEN","P",83,"TYP")
B
^SCR("W4PRMGEN","P",84,"CRD")
25,10,B,1,0
^SCR("W4PRMGEN","P",84,"HELP")

^SCR("W4PRMGEN","P",84,"LMAX")
4
^SCR("W4PRMGEN","P",84,"MUMPS1")

^SCR("W4PRMGEN","P",84,"MUMPS2")

^SCR("W4PRMGEN","P",84,"TYP")
B
^SCR("W4PRMGEN","P","NAME","ADDFREE")
77
^SCR("W4PRMGEN","P","NAME","AINOTSF")
55
^SCR("W4PRMGEN","P","NAME","ASKWHO")
70
^SCR("W4PRMGEN","P","NAME","BGPSW")
12
^SCR("W4PRMGEN","P","NAME","CATSHL")
17
^SCR("W4PRMGEN","P","NAME","CAUSED")
80
^SCR("W4PRMGEN","P","NAME","CHNORD")
73
^SCR("W4PRMGEN","P","NAME","CLSBACK")
50
^SCR("W4PRMGEN","P","NAME","COPYORD")
69
^SCR("W4PRMGEN","P","NAME","DELDEL")
68
^SCR("W4PRMGEN","P","NAME","DELREST")
83
^SCR("W4PRMGEN","P","NAME","EXITKITC")
82
^SCR("W4PRMGEN","P","NAME","IGUL")
30
^SCR("W4PRMGEN","P","NAME","INPCODE")
40
^SCR("W4PRMGEN","P","NAME","MAM")
25
^SCR("W4PRMGEN","P","NAME","MAXHMK")
45
^SCR("W4PRMGEN","P","NAME","MOTH")
71
^SCR("W4PRMGEN","P","NAME","NOASKDEL")
84
^SCR("W4PRMGEN","P","NAME","NOCHKAI")
67
^SCR("W4PRMGEN","P","NAME","NOFRECAU")
72
^SCR("W4PRMGEN","P","NAME","NOPSW0")
74
^SCR("W4PRMGEN","P","NAME","NOPTASR")
65
^SCR("W4PRMGEN","P","NAME","NOPTCA")
60
^SCR("W4PRMGEN","P","NAME","PSWDRG")
10
^SCR("W4PRMGEN","P","NAME","QAI1")
66
^SCR("W4PRMGEN","P","NAME","RNDOWN")
35
^SCR("W4PRMGEN","P","NAME","ROUND")
37
^SCR("W4PRMGEN","P","NAME","SHAAZ")
76
^SCR("W4PRMGEN","P","NAME","SHVA1")
15
^SCR("W4PRMGEN","P","NAME","TOAICD")
75
^SCR("W4PRMGEN","P","NAME","TSFBHNH")
58
^SCR("W4PRMGEN","P","NAME","TSFMVC")
57
^SCR("W4PRMGEN","P","NAME","WASPSW")
78
^SCR("W4PRMGEN","P","NM",10)
PSWDRG
^SCR("W4PRMGEN","P","NM",12)
BGPSW
^SCR("W4PRMGEN","P","NM",15)
SHVA1
^SCR("W4PRMGEN","P","NM",17)
CATSHL
^SCR("W4PRMGEN","P","NM",25)
MAM
^SCR("W4PRMGEN","P","NM",30)
IGUL
^SCR("W4PRMGEN","P","NM",35)
RNDOWN
^SCR("W4PRMGEN","P","NM",37)
ROUND
^SCR("W4PRMGEN","P","NM",40)
INPCODE
^SCR("W4PRMGEN","P","NM",45)
MAXHMK
^SCR("W4PRMGEN","P","NM",50)
CLSBACK
^SCR("W4PRMGEN","P","NM",55)
AINOTSF
^SCR("W4PRMGEN","P","NM",57)
TSFMVC
^SCR("W4PRMGEN","P","NM",58)
TSFBHNH
^SCR("W4PRMGEN","P","NM",60)
NOPTCA
^SCR("W4PRMGEN","P","NM",65)
NOPTASR
^SCR("W4PRMGEN","P","NM",66)
QAI1
^SCR("W4PRMGEN","P","NM",67)
NOCHKAI
^SCR("W4PRMGEN","P","NM",68)
DELDEL
^SCR("W4PRMGEN","P","NM",69)
COPYORD
^SCR("W4PRMGEN","P","NM",70)
ASKWHO
^SCR("W4PRMGEN","P","NM",71)
MOTH
^SCR("W4PRMGEN","P","NM",72)
NOFRECAU
^SCR("W4PRMGEN","P","NM",73)
CHNORD
^SCR("W4PRMGEN","P","NM",74)
NOPSW0
^SCR("W4PRMGEN","P","NM",75)
TOAICD
^SCR("W4PRMGEN","P","NM",76)
SHAAZ
^SCR("W4PRMGEN","P","NM",77)
ADDFREE
^SCR("W4PRMGEN","P","NM",78)
WASPSW
^SCR("W4PRMGEN","P","NM",80)
CAUSED
^SCR("W4PRMGEN","P","NM",82)
EXITKITC
^SCR("W4PRMGEN","P","NM",83)
DELREST
^SCR("W4PRMGEN","P","NM",84)
NOASKDEL
^SCR("W4PRMGN1")
H
^SCR("W4PRMGN1",1)
          {10 }:                                elyin dnqiq ldpn lkl reawl m`d 
^SCR("W4PRMGN1",2)
          {11 }:                       dniyxdn xegal mewna xvln 'qn cilwdl m`d 
^SCR("W4PRMGN1",3)
       {12 }:                                  ldpn qihxka yi zneciw zextq dnk 
^SCR("W4PRMGN1",4)
          {25 }:                                                 [%] n"rn lceb 
^SCR("W4PRMGN1",5)
        {45   }:          gewl ihxt mr qn zipeayg `ivedl aiigny n"rn iptl mekq 
^SCR("W4PRMGN1",6)
          {76 }:                              mei zxibq lr dxdfd zzl dry dfi`a 
^SCR("W4PRMGN1",7)
          {80 }:                      mihixt zlaha zifrela mb hixt my `lnl m`d 
^SCR("W4PRMGN1",8)
 {81 }:(  qeecpiee zenra wx ozip xicbdl ) mihixt ly zepenz bivdl zexyt` yi m`d 
^SCR("W4PRMGN1",9)
          {82 }:                   gewl qihxka n.r/.t.g/.f.z 'qn `lnl daeg m`d 
^SCR("W4PRMGN1",10)
          {84 }:                     dtewn dpnfd yetiga zetqep zel`y le`yl m`d 
^SCR("W4PRMGN1",11)
          {86 }:                       `ayl xeciy ixg` ihnehe` ieaib zeyrl m`d 
^SCR("W4PRMGN1",12)
          {90 }:                             ixhne`ia xiykn jxc caer zedfl m`d 
^SCR("W4PRMGN1",13)
          {92 }:                        cxtpa dtew lk itl onefn zxitq rval m`d 
^SCR("W4PRMGN1",14)
          {95 }:              ( 0 - dniyxn xegal ,1 - cilwdl ) gewl qihxka xir 
^SCR("W4PRMGN1","AV",1)
:åìùéîäîñéñìäðîìëìòåá÷ìíàä
^SCR("W4PRMGN1","AV",2)
:äîéùøäîøåçáìíå÷îáøöìî'ñîãéì÷äìíàä
^SCR("W4PRMGN1","AV",3)
:ìäðîñéèøëáùéúîåãé÷úåøôñäîë
^SCR("W4PRMGN1","AV",4)
:î"òîìãåâ
^SCR("W4PRMGN1","AV",5)
:çå÷ìéèøôíòñîúéðåáùçàéöåäìáééçîùî"òîéðôìíåëñ
^SCR("W4PRMGN1","AV",6)
:íåéúøéâñìòäøäæäúúìäòùäæéàá
^SCR("W4PRMGN1","AV",7)
:íéèéøôúìáèáúéæòåìáíâèéøôíùàìîìíàä
^SCR("W4PRMGN1","AV",8)
:(ñååãðéååúåîòá÷øïúéðøéãâäì)íéèéøôìùúåðåîúâéöäìúåøùôàùéíàä
^SCR("W4PRMGN1","AV",9)
:çå÷ìñéèøëáî.ò/.ô.ç/.æ.ú'ñîàìîìäáåçíàä
^SCR("W4PRMGN1","AV",10)
:äôå÷îäðîæäùåôéçáúåôñåðúåìàùìåàùìíàä
^SCR("W4PRMGN1","AV",11)
:àáùìøåãéùéøçàéèîåèåàéåáéâúåùòìíàä
^SCR("W4PRMGN1","AV",12)
:éøèîåàéáøéùëîêøããáåòúåäæìíàä
^SCR("W4PRMGN1","AV",13)
:ãøôðáäôå÷ìëéôìïîåæîúøéôñòöáìíàä
^SCR("W4PRMGN1","AV",14)
:(0-äîéùøîøåçáì,1-ãéì÷äì)çå÷ìñéèøëáøéò
^SCR("W4PRMGN1","NAME")
miillk mixhnxt
^SCR("W4PRMGN1","P",10,"CRD")
1,10,B,1,0
^SCR("W4PRMGN1","P",10,"HELP")

^SCR("W4PRMGN1","P",10,"LMAX")
4
^SCR("W4PRMGN1","P",10,"MUMPS1")

^SCR("W4PRMGN1","P",10,"MUMPS2")

^SCR("W4PRMGN1","P",10,"TYP")
B
^SCR("W4PRMGN1","P",11,"CRD")
2,10,B,1,0
^SCR("W4PRMGN1","P",11,"HELP")

^SCR("W4PRMGN1","P",11,"LMAX")
4
^SCR("W4PRMGN1","P",11,"MUMPS1")

^SCR("W4PRMGN1","P",11,"MUMPS2")

^SCR("W4PRMGN1","P",11,"TYP")
B
^SCR("W4PRMGN1","P",12,"CRD")
3,7,N,1,0
^SCR("W4PRMGN1","P",12,"HELP")

^SCR("W4PRMGN1","P",12,"LMAX")
4
^SCR("W4PRMGN1","P",12,"MUMPS1")

^SCR("W4PRMGN1","P",12,"MUMPS2")

^SCR("W4PRMGN1","P",12,"TYP")
N
^SCR("W4PRMGN1","P",25,"CRD")
4,10,N,4,0
^SCR("W4PRMGN1","P",25,"HELP")

^SCR("W4PRMGN1","P",25,"LMAX")
4
^SCR("W4PRMGN1","P",25,"MUMPS1")

^SCR("W4PRMGN1","P",25,"MUMPS2")

^SCR("W4PRMGN1","P",25,"TYP")
N
^SCR("W4PRMGN1","P",45,"CRD")
5,8,N,5,0
^SCR("W4PRMGN1","P",45,"HELP")

^SCR("W4PRMGN1","P",45,"LMAX")
6
^SCR("W4PRMGN1","P",45,"MUMPS1")

^SCR("W4PRMGN1","P",45,"MUMPS2")

^SCR("W4PRMGN1","P",45,"TYP")
N
^SCR("W4PRMGN1","P",76,"CRD")
6,10,E,2,0
^SCR("W4PRMGN1","P",76,"HELP")

^SCR("W4PRMGN1","P",76,"LMAX")
4
^SCR("W4PRMGN1","P",76,"MUMPS1")

^SCR("W4PRMGN1","P",76,"MUMPS2")

^SCR("W4PRMGN1","P",76,"TYP")
E
^SCR("W4PRMGN1","P",80,"CRD")
7,10,B,1,0
^SCR("W4PRMGN1","P",80,"HELP")

^SCR("W4PRMGN1","P",80,"LMAX")
4
^SCR("W4PRMGN1","P",80,"MUMPS1")

^SCR("W4PRMGN1","P",80,"MUMPS2")

^SCR("W4PRMGN1","P",80,"TYP")
B
^SCR("W4PRMGN1","P",81,"CRD")
8,1,B,1,0
^SCR("W4PRMGN1","P",81,"HELP")

^SCR("W4PRMGN1","P",81,"LMAX")
4
^SCR("W4PRMGN1","P",81,"MUMPS1")

^SCR("W4PRMGN1","P",81,"MUMPS2")

^SCR("W4PRMGN1","P",81,"TYP")
B
^SCR("W4PRMGN1","P",82,"CRD")
9,10,B,1,0
^SCR("W4PRMGN1","P",82,"HELP")

^SCR("W4PRMGN1","P",82,"LMAX")
4
^SCR("W4PRMGN1","P",82,"MUMPS1")

^SCR("W4PRMGN1","P",82,"MUMPS2")

^SCR("W4PRMGN1","P",82,"TYP")
B
^SCR("W4PRMGN1","P",84,"CRD")
10,10,B,1,0
^SCR("W4PRMGN1","P",84,"HELP")

^SCR("W4PRMGN1","P",84,"LMAX")
4
^SCR("W4PRMGN1","P",84,"MUMPS1")

^SCR("W4PRMGN1","P",84,"MUMPS2")

^SCR("W4PRMGN1","P",84,"TYP")
B
^SCR("W4PRMGN1","P",86,"CRD")
11,10,B,1,0
^SCR("W4PRMGN1","P",86,"HELP")

^SCR("W4PRMGN1","P",86,"LMAX")
4
^SCR("W4PRMGN1","P",86,"MUMPS1")

^SCR("W4PRMGN1","P",86,"MUMPS2")

^SCR("W4PRMGN1","P",86,"TYP")
B
^SCR("W4PRMGN1","P",90,"CRD")
12,10,B,1,0
^SCR("W4PRMGN1","P",90,"HELP")

^SCR("W4PRMGN1","P",90,"LMAX")
4
^SCR("W4PRMGN1","P",90,"MUMPS1")

^SCR("W4PRMGN1","P",90,"MUMPS2")

^SCR("W4PRMGN1","P",90,"TYP")
B
^SCR("W4PRMGN1","P",92,"CRD")
13,10,B,1,0
^SCR("W4PRMGN1","P",92,"HELP")

^SCR("W4PRMGN1","P",92,"LMAX")
4
^SCR("W4PRMGN1","P",92,"MUMPS1")

^SCR("W4PRMGN1","P",92,"MUMPS2")

^SCR("W4PRMGN1","P",92,"TYP")
B
^SCR("W4PRMGN1","P",95,"CRD")
14,10,N,1,0
^SCR("W4PRMGN1","P",95,"HELP")

^SCR("W4PRMGN1","P",95,"LMAX")
4
^SCR("W4PRMGN1","P",95,"MUMPS1")

^SCR("W4PRMGN1","P",95,"MUMPS2")

^SCR("W4PRMGN1","P",95,"TYP")
N
^SCR("W4PRMGN1","P","NAME","ASKCOPY")
86
^SCR("W4PRMGN1","P","NAME","ASKWTR")
11
^SCR("W4PRMGN1","P","NAME","BGPSW")
12
^SCR("W4PRMGN1","P","NAME","BIO")
90
^SCR("W4PRMGN1","P","NAME","CITYINP")
95
^SCR("W4PRMGN1","P","NAME","CSHPOS")
92
^SCR("W4PRMGN1","P","NAME","FNDDOP")
84
^SCR("W4PRMGN1","P","NAME","MAM")
25
^SCR("W4PRMGN1","P","NAME","MAXHMK")
45
^SCR("W4PRMGN1","P","NAME","MUSTTZ")
82
^SCR("W4PRMGN1","P","NAME","PICTURE")
81
^SCR("W4PRMGN1","P","NAME","PSWDRG")
10
^SCR("W4PRMGN1","P","NAME","SHAAZ")
76
^SCR("W4PRMGN1","P","NAME","SHEML")
80
^SCR("W4PRMGN1","P","NM",10)
PSWDRG
^SCR("W4PRMGN1","P","NM",11)
ASKWTR
^SCR("W4PRMGN1","P","NM",12)
BGPSW
^SCR("W4PRMGN1","P","NM",25)
MAM
^SCR("W4PRMGN1","P","NM",45)
MAXHMK
^SCR("W4PRMGN1","P","NM",76)
SHAAZ
^SCR("W4PRMGN1","P","NM",80)
SHEML
^SCR("W4PRMGN1","P","NM",81)
PICTURE
^SCR("W4PRMGN1","P","NM",82)
MUSTTZ
^SCR("W4PRMGN1","P","NM",84)
FNDDOP
^SCR("W4PRMGN1","P","NM",86)
ASKCOPY
^SCR("W4PRMGN1","P","NM",90)
BIO
^SCR("W4PRMGN1","P","NM",92)
CSHPOS
^SCR("W4PRMGN1","P","NM",95)
CITYINP
^SCR("W4PRMGN2")
H
^SCR("W4PRMGN2",1)
          {15 }:     : (`l - 0 ,ok - 1) minelyzl `"ka melyz wlgl zexyt` yi m`d 
^SCR("W4PRMGN2",2)
        {17   }:              minelyz dnkl `"ka melyz wlgl xyt`ny ilnipin mekq 
^SCR("W4PRMGN2",3)
         {20 }:(migelyna wx ueg-3,libxe ueg-2, ueg wx-1 ,`l-0) ueg `"k lawl m`d
^SCR("W4PRMGN2",4)
         {25 }:                         xidn i`xy` qihxka melyza mekq le`yl m`d
^SCR("W4PRMGN2",5)
         {27 }:                 i`xy` qihxka melyza CVV e zedf.z le`yl cinz m`d
^SCR("W4PRMGN2",6)
      {30 }:(0-lebir `ll, 4-'b` 50 cr,2-'b` 10 cr,1-lwyd cr) melyzl mekq lebir 
^SCR("W4PRMGN2",7)
          {35 }:                         ( `l - 0 ,ok - 1 ) dhnl cinz lbrl m`d 
^SCR("W4PRMGN2",8)
          {37 }:                                lwyd cr dtwda minelyz lbrl m`d 
^SCR("W4PRMGN2",9)
          {40 }:                                 zi`wpa dxarda melyz xyt`l m`d 
^SCR("W4PRMGN2",10)
          {50 }:       (`l - 0 ,ok - 1) oeayg zxibq ixg` ihnehe` minelyzn z`vl 
^SCR("W4PRMGN2",11)
          {52 }:                    rvana mihixt lr mb dlirt oeaygl dgpd % m`d 
^SCR("W4PRMGN2",12)
          {55 }:       (`l - 0 ,ok - 1)  hq jeza hixtl ztqez zelrl qgiizdl m`d 
^SCR("W4PRMGN2",13)
          {57 }:       (`l - 0 ,ok - 1)    zetqezl mb dlirt (%) hixtl dgpd m`d 
^SCR("W4PRMGN2",14)
          {58 }:     (`l - 0 ,ok - 1)    dgpd `ll mb dgpd `ll hixtl zetqez m`d 
^SCR("W4PRMGN2",15)
          {60 }:  ( `l - 0 ,ok - 1)  i`xy` qihxka oeayg zxibqa dxibn geztl m`d 
^SCR("W4PRMGN2",16)
          {65 }:         ( `l - 0 ,ok - 1)  dtwda oeayg zxibqa dxibn geztl m`d 
^SCR("W4PRMGN2",17)
          {67 }:              dpnfd eze`a mekq eze`a midf `"k 2 zlaw meqgl m`d 
^SCR("W4PRMGN2",18)
          {69 }:                        ogley beq lka mixidn minelyz xyt`l m`d 
^SCR("W4PRMGN2",19)
          {71 }:                       cxweilee ly zeahd zexyt`a wx ynzydl m`d 
^SCR("W4PRMGN2",20)
          {73 }:                                onefn zlawl dpekna miynzyn m`d 
^SCR("W4PRMGN2","AV",1)
::(àì-0,ïë-1)íéîåìùúìà"ëáíåìùú÷ìçìúåøùôàùéíàä
^SCR("W4PRMGN2","AV",2)
:íéîåìùúäîëìà"ëáíåìùú÷ìçìøùôàîùéìîéðéîíåëñ
^SCR("W4PRMGN2","AV",3)
:(íéçåìùîá÷øõåç-3,ìéâøåõåç-2,õåç÷ø-1,àì-0)õåçà"ëìá÷ìíàä
^SCR("W4PRMGN2","AV",4)
:øéäîéàøùàñéèøëáíåìùúáíåëñìåàùìíàä
^SCR("W4PRMGN2","AV",5)
:éàøùàñéèøëáíåìùúáCVVåúåäæ.úìåàùìãéîúíàä
^SCR("W4PRMGN2","AV",6)
:(0-ìåâéòàìì,4-'âà50ãò,2-'âà10ãò,1-ì÷ùäãò)íåìùúìíåëñìåâéò
^SCR("W4PRMGN2","AV",7)
:(àì-0,ïë-1)äèîìãéîúìâòìíàä
^SCR("W4PRMGN2","AV",8)
:ì÷ùäãòäô÷äáíéîåìùúìâòìíàä
^SCR("W4PRMGN2","AV",9)
:úéà÷ðáäøáòäáíåìùúøùôàìíàä
^SCR("W4PRMGN2","AV",10)
:(àì-0,ïë-1)ïåáùçúøéâñéøçàéèîåèåàíéîåìùúîúàöì
^SCR("W4PRMGN2","AV",11)
:òöáîáíéèéøôìòíâäìéòôïåáùçìäçðä%íàä
^SCR("W4PRMGN2","AV",12)
:(àì-0,ïë-1)èñêåúáèéøôìúôñåúúåìòìñçééúäìíàä
^SCR("W4PRMGN2","AV",13)
:(àì-0,ïë-1)úåôñåúìíâäìéòô(%)èéøôìäçðäíàä
^SCR("W4PRMGN2","AV",14)
:(àì-0,ïë-1)äçðäàììíâäçðäàììèéøôìúåôñåúíàä
^SCR("W4PRMGN2","AV",15)
:(àì-0,ïë-1)éàøùàñéèøëáïåáùçúøéâñáäøéâîçåúôìíàä
^SCR("W4PRMGN2","AV",16)
:(àì-0,ïë-1)äô÷äáïåáùçúøéâñáäøéâîçåúôìíàä
^SCR("W4PRMGN2","AV",17)
:äðîæäåúåàáíåëñåúåàáíéäæà"ë2úìá÷íåñçìíàä
^SCR("W4PRMGN2","AV",18)
:ïçìåùâåñìëáíéøéäîíéîåìùúøùôàìíàä
^SCR("W4PRMGN2","AV",19)
:ãø÷åéìååìùúåáèäúåøùôàá÷øùîúùäìíàä
^SCR("W4PRMGN2","AV",20)
:ïîåæîúìá÷ìäðåëîáíéùîúùîíàä
^SCR("W4PRMGN2","NAME")
minelyze dpnfd aeyig
^SCR("W4PRMGN2","P",15,"CRD")
1,10,B,1,0
^SCR("W4PRMGN2","P",15,"HELP")

^SCR("W4PRMGN2","P",15,"LMAX")
4
^SCR("W4PRMGN2","P",15,"MUMPS1")

^SCR("W4PRMGN2","P",15,"MUMPS2")

^SCR("W4PRMGN2","P",15,"TYP")
B
^SCR("W4PRMGN2","P",17,"CRD")
2,8,N,6,2
^SCR("W4PRMGN2","P",17,"HELP")

^SCR("W4PRMGN2","P",17,"LMAX")
6
^SCR("W4PRMGN2","P",17,"MUMPS1")

^SCR("W4PRMGN2","P",17,"MUMPS2")

^SCR("W4PRMGN2","P",17,"TYP")
N
^SCR("W4PRMGN2","P",20,"CRD")
3,9,N,1,0
^SCR("W4PRMGN2","P",20,"HELP")

^SCR("W4PRMGN2","P",20,"LMAX")
4
^SCR("W4PRMGN2","P",20,"MUMPS1")

^SCR("W4PRMGN2","P",20,"MUMPS2")

^SCR("W4PRMGN2","P",20,"TYP")
N
^SCR("W4PRMGN2","P",25,"CRD")
4,9,B,1,0
^SCR("W4PRMGN2","P",25,"HELP")

^SCR("W4PRMGN2","P",25,"LMAX")
4
^SCR("W4PRMGN2","P",25,"MUMPS1")

^SCR("W4PRMGN2","P",25,"MUMPS2")

^SCR("W4PRMGN2","P",25,"TYP")
B
^SCR("W4PRMGN2","P",27,"CRD")
5,9,B,1,0
^SCR("W4PRMGN2","P",27,"HELP")

^SCR("W4PRMGN2","P",27,"LMAX")
4
^SCR("W4PRMGN2","P",27,"MUMPS1")

^SCR("W4PRMGN2","P",27,"MUMPS2")

^SCR("W4PRMGN2","P",27,"TYP")
B
^SCR("W4PRMGN2","P",30,"CRD")
6,6,N,1,0
^SCR("W4PRMGN2","P",30,"HELP")

^SCR("W4PRMGN2","P",30,"LMAX")
4
^SCR("W4PRMGN2","P",30,"MUMPS1")

^SCR("W4PRMGN2","P",30,"MUMPS2")
I "0124"'[IGUL S %SC("ER")=1
^SCR("W4PRMGN2","P",30,"TYP")
N
^SCR("W4PRMGN2","P",35,"CRD")
7,10,B,1,0
^SCR("W4PRMGN2","P",35,"HELP")

^SCR("W4PRMGN2","P",35,"LMAX")
4
^SCR("W4PRMGN2","P",35,"MUMPS1")

^SCR("W4PRMGN2","P",35,"MUMPS2")

^SCR("W4PRMGN2","P",35,"TYP")
B
^SCR("W4PRMGN2","P",37,"CRD")
8,10,B,1,0
^SCR("W4PRMGN2","P",37,"HELP")

^SCR("W4PRMGN2","P",37,"LMAX")
4
^SCR("W4PRMGN2","P",37,"MUMPS1")

^SCR("W4PRMGN2","P",37,"MUMPS2")

^SCR("W4PRMGN2","P",37,"TYP")
B
^SCR("W4PRMGN2","P",40,"CRD")
9,10,B,1,0
^SCR("W4PRMGN2","P",40,"HELP")

^SCR("W4PRMGN2","P",40,"LMAX")
4
^SCR("W4PRMGN2","P",40,"MUMPS1")

^SCR("W4PRMGN2","P",40,"MUMPS2")

^SCR("W4PRMGN2","P",40,"TYP")
B
^SCR("W4PRMGN2","P",50,"CRD")
10,10,B,1,0
^SCR("W4PRMGN2","P",50,"HELP")

^SCR("W4PRMGN2","P",50,"LMAX")
4
^SCR("W4PRMGN2","P",50,"MUMPS1")

^SCR("W4PRMGN2","P",50,"MUMPS2")

^SCR("W4PRMGN2","P",50,"TYP")
B
^SCR("W4PRMGN2","P",52,"CRD")
11,10,B,1,0
^SCR("W4PRMGN2","P",52,"HELP")

^SCR("W4PRMGN2","P",52,"LMAX")
4
^SCR("W4PRMGN2","P",52,"MUMPS1")

^SCR("W4PRMGN2","P",52,"MUMPS2")

^SCR("W4PRMGN2","P",52,"TYP")
B
^SCR("W4PRMGN2","P",55,"CRD")
12,10,B,1,0
^SCR("W4PRMGN2","P",55,"HELP")

^SCR("W4PRMGN2","P",55,"LMAX")
4
^SCR("W4PRMGN2","P",55,"MUMPS1")

^SCR("W4PRMGN2","P",55,"MUMPS2")

^SCR("W4PRMGN2","P",55,"TYP")
B
^SCR("W4PRMGN2","P",57,"CRD")
13,10,B,1,0
^SCR("W4PRMGN2","P",57,"HELP")

^SCR("W4PRMGN2","P",57,"LMAX")
4
^SCR("W4PRMGN2","P",57,"MUMPS1")

^SCR("W4PRMGN2","P",57,"MUMPS2")

^SCR("W4PRMGN2","P",57,"TYP")
B
^SCR("W4PRMGN2","P",58,"CRD")
14,10,B,1,0
^SCR("W4PRMGN2","P",58,"HELP")

^SCR("W4PRMGN2","P",58,"LMAX")
4
^SCR("W4PRMGN2","P",58,"MUMPS1")

^SCR("W4PRMGN2","P",58,"MUMPS2")

^SCR("W4PRMGN2","P",58,"TYP")
B
^SCR("W4PRMGN2","P",60,"CRD")
15,10,B,1,0
^SCR("W4PRMGN2","P",60,"HELP")

^SCR("W4PRMGN2","P",60,"LMAX")
4
^SCR("W4PRMGN2","P",60,"MUMPS1")

^SCR("W4PRMGN2","P",60,"MUMPS2")

^SCR("W4PRMGN2","P",60,"TYP")
B
^SCR("W4PRMGN2","P",65,"CRD")
16,10,B,1,0
^SCR("W4PRMGN2","P",65,"HELP")

^SCR("W4PRMGN2","P",65,"LMAX")
4
^SCR("W4PRMGN2","P",65,"MUMPS1")

^SCR("W4PRMGN2","P",65,"MUMPS2")

^SCR("W4PRMGN2","P",65,"TYP")
B
^SCR("W4PRMGN2","P",67,"CRD")
17,10,B,1,0
^SCR("W4PRMGN2","P",67,"HELP")

^SCR("W4PRMGN2","P",67,"LMAX")
4
^SCR("W4PRMGN2","P",67,"MUMPS1")

^SCR("W4PRMGN2","P",67,"MUMPS2")

^SCR("W4PRMGN2","P",67,"TYP")
B
^SCR("W4PRMGN2","P",69,"CRD")
18,10,B,1,0
^SCR("W4PRMGN2","P",69,"HELP")

^SCR("W4PRMGN2","P",69,"LMAX")
4
^SCR("W4PRMGN2","P",69,"MUMPS1")

^SCR("W4PRMGN2","P",69,"MUMPS2")

^SCR("W4PRMGN2","P",69,"TYP")
B
^SCR("W4PRMGN2","P",71,"CRD")
19,10,B,1,0
^SCR("W4PRMGN2","P",71,"HELP")

^SCR("W4PRMGN2","P",71,"LMAX")
4
^SCR("W4PRMGN2","P",71,"MUMPS1")

^SCR("W4PRMGN2","P",71,"MUMPS2")

^SCR("W4PRMGN2","P",71,"TYP")
B
^SCR("W4PRMGN2","P",73,"CRD")
20,10,B,1,0
^SCR("W4PRMGN2","P",73,"HELP")

^SCR("W4PRMGN2","P",73,"LMAX")
4
^SCR("W4PRMGN2","P",73,"MUMPS1")

^SCR("W4PRMGN2","P",73,"MUMPS2")

^SCR("W4PRMGN2","P",73,"TYP")
B
^SCR("W4PRMGN2","P","NAME","AINOTSF")
55
^SCR("W4PRMGN2","P","NAME","CAJ")
20
^SCR("W4PRMGN2","P","NAME","CATSHL")
17
^SCR("W4PRMGN2","P","NAME","CVVTZ")
27
^SCR("W4PRMGN2","P","NAME","FASTPAY")
69
^SCR("W4PRMGN2","P","NAME","FCASUM")
25
^SCR("W4PRMGN2","P","NAME","IGUL")
30
^SCR("W4PRMGN2","P","NAME","MZSM")
73
^SCR("W4PRMGN2","P","NAME","NODOUBLE")
67
^SCR("W4PRMGN2","P","NAME","NOKFLMVC")
52
^SCR("W4PRMGN2","P","NAME","NOMVBANK")
40
^SCR("W4PRMGN2","P","NAME","NOPAYBCK")
50
^SCR("W4PRMGN2","P","NAME","NOPTASR")
65
^SCR("W4PRMGN2","P","NAME","NOPTCA")
60
^SCR("W4PRMGN2","P","NAME","RNDOWN")
35
^SCR("W4PRMGN2","P","NAME","ROUND")
37
^SCR("W4PRMGN2","P","NAME","SHVA1")
15
^SCR("W4PRMGN2","P","NAME","TSFBHNH")
58
^SCR("W4PRMGN2","P","NAME","TSFMVC")
57
^SCR("W4PRMGN2","P","NAME","VCPREPAY")
71
^SCR("W4PRMGN2","P","NM",15)
SHVA1
^SCR("W4PRMGN2","P","NM",17)
CATSHL
^SCR("W4PRMGN2","P","NM",20)
CAJ
^SCR("W4PRMGN2","P","NM",25)
FCASUM
^SCR("W4PRMGN2","P","NM",27)
CVVTZ
^SCR("W4PRMGN2","P","NM",30)
IGUL
^SCR("W4PRMGN2","P","NM",35)
RNDOWN
^SCR("W4PRMGN2","P","NM",37)
ROUND
^SCR("W4PRMGN2","P","NM",40)
NOMVBANK
^SCR("W4PRMGN2","P","NM",50)
NOPAYBCK
^SCR("W4PRMGN2","P","NM",52)
NOKFLMVC
^SCR("W4PRMGN2","P","NM",55)
AINOTSF
^SCR("W4PRMGN2","P","NM",57)
TSFMVC
^SCR("W4PRMGN2","P","NM",58)
TSFBHNH
^SCR("W4PRMGN2","P","NM",60)
NOPTCA
^SCR("W4PRMGN2","P","NM",65)
NOPTASR
^SCR("W4PRMGN2","P","NM",67)
NODOUBLE
^SCR("W4PRMGN2","P","NM",69)
FASTPAY
^SCR("W4PRMGN2","P","NM",71)
VCPREPAY
^SCR("W4PRMGN2","P","NM",73)
MZSM
^SCR("W4PRMGN3")
H
^SCR("W4PRMGN3",1)
                                                                               
^SCR("W4PRMGN3",2)
          {40 }:                  zclwndn mihixt ly micew cilwdl zexyt` yi m`d 
^SCR("W4PRMGN3",3)
          {66 }:         ( `l - 0 ,ok - 1)        zeiwqr zegex` xtqn le`yl m`d 
^SCR("W4PRMGN3",4)
          {79 }:             mipta zetqez zenk mb zepyl zegex` zenk iepiya m`d 
^SCR("W4PRMGN3",5)
          {67 }:    ( `l - 0 ,ok - 1)  dgex`a zeveawd lkn zepn zxiga wecal m`d 
^SCR("W4PRMGN3",6)
          {69 }:                      ( `l - 0 ,ok - 1 ) dpnfd zwzrd xyt`l m`d 
^SCR("W4PRMGN3",7)
          {71 }:                                 dpnfd zxeya iaxin mihixt zenk 
^SCR("W4PRMGN3",8)
          {73 }:                   dpnfda zeqtcen `l zexey xcq zepyl xyt`l m`d 
^SCR("W4PRMGN3",9)
          {76 }:                             0 = micreq 'qn lr dnqiq le`yl m`d 
^SCR("W4PRMGN3",10)
       {78 }: ( `l - 2 ,ok - 1) zg` mrt wx dpnfd oekcra dnqiq cilwdl xyt`l m`d 
^SCR("W4PRMGN3",11)
       {75    }:                               ziwqrl ccea hixt jeiyl hixt cew 
^SCR("W4PRMGN3",12)
       {77    }:                          ( iyteg hqwh ) zillk ztqezl hixt cew 
^SCR("W4PRMGN3",13)
                                                                              
^SCR("W4PRMGN3",14)
                                                                               
^SCR("W4PRMGN3",15)
                                                                               
^SCR("W4PRMGN3","AV",1)

^SCR("W4PRMGN3","AV",2)
:úãì÷îäîíéèéøôìùíéãå÷ãéì÷äìúåøùôàùéíàä
^SCR("W4PRMGN3","AV",3)
:(àì-0,ïë-1)úåé÷ñòúåçåøàøôñîìåàùìíàä
^SCR("W4PRMGN3","AV",4)
:íéðôáúåôñåúúåîëíâúåðùìúåçåøàúåîëéåðéùáíàä
^SCR("W4PRMGN3","AV",5)
:(àì-0,ïë-1)äçåøàáúåöåá÷äìëîúåðîúøéçá÷åãáìíàä
^SCR("W4PRMGN3","AV",6)
:(àì-0,ïë-1)äðîæäú÷úòäøùôàìíàä
^SCR("W4PRMGN3","AV",7)
:äðîæäúøåùáéáøéîíéèéøôúåîë
^SCR("W4PRMGN3","AV",8)
:äðîæäáúåñôãåîàìúåøåùøãñúåðùìøùôàìíàä
^SCR("W4PRMGN3","AV",9)
:0=íéãòåñ'ñîìòäîñéñìåàùìíàä
^SCR("W4PRMGN3","AV",10)
:(àì-2,ïë-1)úçàíòô÷øäðîæäïåëãòáäîñéñãéì÷äìøùôàìíàä
^SCR("W4PRMGN3","AV",11)
:úé÷ñòìããåáèéøôêåéùìèéøôãå÷
^SCR("W4PRMGN3","AV",12)
:(éùôåçèñ÷è)úéììëúôñåúìèéøôãå÷
^SCR("W4PRMGN3","AV",13)

^SCR("W4PRMGN3","AV",14)

^SCR("W4PRMGN3","AV",15)

^SCR("W4PRMGN3","NAME")
dpnfd jildzl mixhnxt
^SCR("W4PRMGN3","P",40,"CRD")
2,10,B,1,0
^SCR("W4PRMGN3","P",40,"HELP")

^SCR("W4PRMGN3","P",40,"LMAX")
4
^SCR("W4PRMGN3","P",40,"MUMPS1")

^SCR("W4PRMGN3","P",40,"MUMPS2")

^SCR("W4PRMGN3","P",40,"TYP")
B
^SCR("W4PRMGN3","P",66,"CRD")
3,10,B,1,0
^SCR("W4PRMGN3","P",66,"HELP")

^SCR("W4PRMGN3","P",66,"LMAX")
4
^SCR("W4PRMGN3","P",66,"MUMPS1")
S:QAI1="" QAI1=1
^SCR("W4PRMGN3","P",66,"MUMPS2")

^SCR("W4PRMGN3","P",66,"TYP")
B
^SCR("W4PRMGN3","P",67,"CRD")
5,10,B,1,0
^SCR("W4PRMGN3","P",67,"HELP")

^SCR("W4PRMGN3","P",67,"LMAX")
4
^SCR("W4PRMGN3","P",67,"MUMPS1")

^SCR("W4PRMGN3","P",67,"MUMPS2")

^SCR("W4PRMGN3","P",67,"TYP")
B
^SCR("W4PRMGN3","P",69,"CRD")
6,10,B,1,0
^SCR("W4PRMGN3","P",69,"HELP")

^SCR("W4PRMGN3","P",69,"LMAX")
4
^SCR("W4PRMGN3","P",69,"MUMPS1")

^SCR("W4PRMGN3","P",69,"MUMPS2")

^SCR("W4PRMGN3","P",69,"TYP")
B
^SCR("W4PRMGN3","P",71,"CRD")
7,10,E,4,0
^SCR("W4PRMGN3","P",71,"HELP")

^SCR("W4PRMGN3","P",71,"LMAX")
4
^SCR("W4PRMGN3","P",71,"MUMPS1")
S:$G(KOLMAX)="" KOLMAX=99
^SCR("W4PRMGN3","P",71,"MUMPS2")

^SCR("W4PRMGN3","P",71,"TYP")
E
^SCR("W4PRMGN3","P",73,"CRD")
8,10,B,1,0
^SCR("W4PRMGN3","P",73,"HELP")

^SCR("W4PRMGN3","P",73,"LMAX")
4
^SCR("W4PRMGN3","P",73,"MUMPS1")

^SCR("W4PRMGN3","P",73,"MUMPS2")

^SCR("W4PRMGN3","P",73,"TYP")
B
^SCR("W4PRMGN3","P",75,"CHECK")
Y
^SCR("W4PRMGN3","P",75,"CRD")
11,7,E,7,0
^SCR("W4PRMGN3","P",75,"FNC")

^SCR("W4PRMGN3","P",75,"GLOB")
^PAR
^SCR("W4PRMGN3","P",75,"HELP")

^SCR("W4PRMGN3","P",75,"LMAX")
7
^SCR("W4PRMGN3","P",75,"MUMPS1")

^SCR("W4PRMGN3","P",75,"MUMPS2")

^SCR("W4PRMGN3","P",75,"NLN")
20
^SCR("W4PRMGN3","P",75,"RZD")
**
^SCR("W4PRMGN3","P",75,"TOPB")
8
^SCR("W4PRMGN3","P",75,"TYP")
E
^SCR("W4PRMGN3","P",76,"CRD")
9,10,B,1,0
^SCR("W4PRMGN3","P",76,"HELP")

^SCR("W4PRMGN3","P",76,"LMAX")
4
^SCR("W4PRMGN3","P",76,"MUMPS1")

^SCR("W4PRMGN3","P",76,"MUMPS2")

^SCR("W4PRMGN3","P",76,"TYP")
B
^SCR("W4PRMGN3","P",77,"CHECK")
Y
^SCR("W4PRMGN3","P",77,"CRD")
12,7,E,7,0
^SCR("W4PRMGN3","P",77,"FNC")

^SCR("W4PRMGN3","P",77,"GLOB")
^PAR
^SCR("W4PRMGN3","P",77,"HELP")

^SCR("W4PRMGN3","P",77,"LMAX")
7
^SCR("W4PRMGN3","P",77,"MUMPS1")

^SCR("W4PRMGN3","P",77,"MUMPS2")

^SCR("W4PRMGN3","P",77,"NLN")
20
^SCR("W4PRMGN3","P",77,"RZD")
**
^SCR("W4PRMGN3","P",77,"TOPB")
8
^SCR("W4PRMGN3","P",77,"TYP")
E
^SCR("W4PRMGN3","P",78,"CRD")
10,7,N,1,0
^SCR("W4PRMGN3","P",78,"HELP")

^SCR("W4PRMGN3","P",78,"LMAX")
4
^SCR("W4PRMGN3","P",78,"MUMPS1")

^SCR("W4PRMGN3","P",78,"MUMPS2")

^SCR("W4PRMGN3","P",78,"TYP")
N
^SCR("W4PRMGN3","P",79,"CRD")
4,10,B,1,0
^SCR("W4PRMGN3","P",79,"HELP")

^SCR("W4PRMGN3","P",79,"LMAX")
4
^SCR("W4PRMGN3","P",79,"MUMPS1")

^SCR("W4PRMGN3","P",79,"MUMPS2")

^SCR("W4PRMGN3","P",79,"TYP")
B
^SCR("W4PRMGN3","P","NAME","ADDFREE")
77
^SCR("W4PRMGN3","P","NAME","CHNORD")
73
^SCR("W4PRMGN3","P","NAME","COPYORD")
69
^SCR("W4PRMGN3","P","NAME","INPCODE")
40
^SCR("W4PRMGN3","P","NAME","KOLMAX")
71
^SCR("W4PRMGN3","P","NAME","MULTY")
79
^SCR("W4PRMGN3","P","NAME","NOCHKAI")
67
^SCR("W4PRMGN3","P","NAME","NOPSWSD0")
76
^SCR("W4PRMGN3","P","NAME","QAI1")
66
^SCR("W4PRMGN3","P","NAME","TOAICD")
75
^SCR("W4PRMGN3","P","NAME","WASPSW")
78
^SCR("W4PRMGN3","P","NM",40)
INPCODE
^SCR("W4PRMGN3","P","NM",66)
QAI1
^SCR("W4PRMGN3","P","NM",67)
NOCHKAI
^SCR("W4PRMGN3","P","NM",69)
COPYORD
^SCR("W4PRMGN3","P","NM",71)
KOLMAX
^SCR("W4PRMGN3","P","NM",73)
CHNORD
^SCR("W4PRMGN3","P","NM",75)
TOAICD
^SCR("W4PRMGN3","P","NM",76)
NOPSWSD0
^SCR("W4PRMGN3","P","NM",77)
ADDFREE
^SCR("W4PRMGN3","P","NM",78)
WASPSW
^SCR("W4PRMGN3","P","NM",79)
MULTY
^SCR("W4PRMGN4")
H
^SCR("W4PRMGN4",1)
  {70 }: (mildpn ze`nqiq yi m` lirt `l) dgpd e`/e lehia xy`n ly xtqn le`yl m`d 
^SCR("W4PRMGN4",2)
          {80 }:                                  dgpd e` lehia zaiq le`yl m`d 
^SCR("W4PRMGN4",3)
          {82 }:                              gahndn `vi lhean hixty le`yl m`d 
^SCR("W4PRMGN4",4)
          {83 }:                             "hixt xfgye lha" divte` xyt`l m`d 
^SCR("W4PRMGN4",5)
          {84 }:                    dqtced `l cery dxey lehial xeyi` le`yl m`d 
^SCR("W4PRMGN4",6)
          {71 }:                        ipnf ea mihixt dnkl OTH zgpd xyt`l m`d 
^SCR("W4PRMGN4",7)
          {72 }:         dgpd / lehia ly daiq oeiva iyteg hqwh zclwd xyt`l m`d 
^SCR("W4PRMGN4",8)
          {75 }:                                   3 dnxa `id lehial dnqiq m`d 
^SCR("W4PRMGN4",9)
                                                                              
^SCR("W4PRMGN4","AV",1)
:(ohkvbn,utnxhxahotkhgptk)vjbvutqukuyhcratnkarpxnkutakotv
^SCR("W4PRMGN4","AV",2)
:vjbvutkuyhc,chxkutakotv
^SCR("W4PRMGN4","AV",3)
:jcynvntmhkyucnyhrpakutakotv
^SCR("W4PRMGN4","AV",4)
:"yhrprzjaukyc"vhmputraptkotv
^SCR("W4PRMGN4","AV",5)
:vxpsuvtksugavruakuyhckruahtkutakotv
^SCR("W4PRMGN4","AV",6)
:hbnzucohyhrpvnfkOTH,jbvraptkotv
^SCR("W4PRMGN4","AV",7)
:vjbvqkuyhckavchxiuhmchapujyxey,skevraptkotv
^SCR("W4PRMGN4","AV",8)
:3vnrcthvkuyhckvnxhxotv
^SCR("W4PRMGN4","AV",9)

^SCR("W4PRMGN4","NAME")
milehiae zegpdl mixhnxt
^SCR("W4PRMGN4","P",70,"CRD")
1,2,B,1,0
^SCR("W4PRMGN4","P",70,"HELP")

^SCR("W4PRMGN4","P",70,"LMAX")
4
^SCR("W4PRMGN4","P",70,"MUMPS1")

^SCR("W4PRMGN4","P",70,"MUMPS2")

^SCR("W4PRMGN4","P",70,"TYP")
B
^SCR("W4PRMGN4","P",71,"CRD")
6,10,B,1,0
^SCR("W4PRMGN4","P",71,"HELP")

^SCR("W4PRMGN4","P",71,"LMAX")
4
^SCR("W4PRMGN4","P",71,"MUMPS1")

^SCR("W4PRMGN4","P",71,"MUMPS2")

^SCR("W4PRMGN4","P",71,"TYP")
B
^SCR("W4PRMGN4","P",72,"CRD")
7,10,B,1,0
^SCR("W4PRMGN4","P",72,"HELP")

^SCR("W4PRMGN4","P",72,"LMAX")
4
^SCR("W4PRMGN4","P",72,"MUMPS1")

^SCR("W4PRMGN4","P",72,"MUMPS2")

^SCR("W4PRMGN4","P",72,"TYP")
B
^SCR("W4PRMGN4","P",75,"CRD")
8,10,B,1,0
^SCR("W4PRMGN4","P",75,"HELP")

^SCR("W4PRMGN4","P",75,"LMAX")
4
^SCR("W4PRMGN4","P",75,"MUMPS1")

^SCR("W4PRMGN4","P",75,"MUMPS2")

^SCR("W4PRMGN4","P",75,"TYP")
B
^SCR("W4PRMGN4","P",80,"CRD")
2,10,B,1,0
^SCR("W4PRMGN4","P",80,"HELP")

^SCR("W4PRMGN4","P",80,"LMAX")
4
^SCR("W4PRMGN4","P",80,"MUMPS1")

^SCR("W4PRMGN4","P",80,"MUMPS2")

^SCR("W4PRMGN4","P",80,"TYP")
B
^SCR("W4PRMGN4","P",82,"CRD")
3,10,B,1,0
^SCR("W4PRMGN4","P",82,"HELP")

^SCR("W4PRMGN4","P",82,"LMAX")
4
^SCR("W4PRMGN4","P",82,"MUMPS1")

^SCR("W4PRMGN4","P",82,"MUMPS2")

^SCR("W4PRMGN4","P",82,"TYP")
B
^SCR("W4PRMGN4","P",83,"CRD")
4,10,B,1,0
^SCR("W4PRMGN4","P",83,"HELP")

^SCR("W4PRMGN4","P",83,"LMAX")
4
^SCR("W4PRMGN4","P",83,"MUMPS1")

^SCR("W4PRMGN4","P",83,"MUMPS2")

^SCR("W4PRMGN4","P",83,"TYP")
B
^SCR("W4PRMGN4","P",84,"CRD")
5,10,B,1,0
^SCR("W4PRMGN4","P",84,"HELP")

^SCR("W4PRMGN4","P",84,"LMAX")
4
^SCR("W4PRMGN4","P",84,"MUMPS1")

^SCR("W4PRMGN4","P",84,"MUMPS2")

^SCR("W4PRMGN4","P",84,"TYP")
B
^SCR("W4PRMGN4","P","NAME","ASKWHO")
70
^SCR("W4PRMGN4","P","NAME","CAUSED")
80
^SCR("W4PRMGN4","P","NAME","DELREST")
83
^SCR("W4PRMGN4","P","NAME","EXITKITC")
82
^SCR("W4PRMGN4","P","NAME","MOTH")
71
^SCR("W4PRMGN4","P","NAME","NOASKDEL")
84
^SCR("W4PRMGN4","P","NAME","NOFRECAU")
72
^SCR("W4PRMGN4","P","NAME","PSWDEL3")
75
^SCR("W4PRMGN4","P","NM",70)
ASKWHO
^SCR("W4PRMGN4","P","NM",71)
MOTH
^SCR("W4PRMGN4","P","NM",72)
NOFRECAU
^SCR("W4PRMGN4","P","NM",75)
PSWDEL3
^SCR("W4PRMGN4","P","NM",80)
CAUSED
^SCR("W4PRMGN4","P","NM",82)
EXITKITC
^SCR("W4PRMGN4","P","NM",83)
DELREST
^SCR("W4PRMGN4","P","NM",84)
NOASKDEL
^SCR("W4PRMHDP")
H
^SCR("W4PRMHDP",1)
                                                                               
^SCR("W4PRMHDP",2)
                                       {05 } : micf itl zayaygl uaew zepal m`d 
^SCR("W4PRMHDP",3)
                                       {10 } : 2 e 1 `zknq` qn mewna silgdl m`d
^SCR("W4PRMHDP",4)
                                   {15 } : iekif zipeayga zecy mewna silgdl m`d
^SCR("W4PRMHDP","AV",1)

^SCR("W4PRMHDP","AV",2)
:íéãæéôìúáùáùçìõáå÷úåðáìíàä
^SCR("W4PRMHDP","AV",3)
:2å1àúëîñàñîíå÷îáóéìçäìíàä
^SCR("W4PRMHDP","AV",4)
:éåëéæúéðåáùçáúåãùíå÷îáóéìçäìíàä
^SCR("W4PRMHDP","NAME")
mitqep zayaygl mixhnxt
^SCR("W4PRMHDP","P",5,"CRD")
2,39,B,1,0
^SCR("W4PRMHDP","P",5,"HELP")

^SCR("W4PRMHDP","P",5,"LMAX")
4
^SCR("W4PRMHDP","P",5,"MUMPS1")

^SCR("W4PRMHDP","P",5,"MUMPS2")

^SCR("W4PRMHDP","P",5,"TYP")
B
^SCR("W4PRMHDP","P",10,"CRD")
3,39,B,1,0
^SCR("W4PRMHDP","P",10,"HELP")

^SCR("W4PRMHDP","P",10,"LMAX")
4
^SCR("W4PRMHDP","P",10,"MUMPS1")

^SCR("W4PRMHDP","P",10,"MUMPS2")

^SCR("W4PRMHDP","P",10,"TYP")
B
^SCR("W4PRMHDP","P",15,"CRD")
4,35,B,1,0
^SCR("W4PRMHDP","P",15,"HELP")

^SCR("W4PRMHDP","P",15,"LMAX")
4
^SCR("W4PRMHDP","P",15,"MUMPS1")

^SCR("W4PRMHDP","P",15,"MUMPS2")

^SCR("W4PRMHDP","P",15,"TYP")
B
^SCR("W4PRMHDP","P","NAME","HSVOLD")
10
^SCR("W4PRMHDP","P","NAME","HSVZ")
5
^SCR("W4PRMHDP","P","NAME","HSVZC")
15
^SCR("W4PRMHDP","P","NM",5)
HSVZ
^SCR("W4PRMHDP","P","NM",10)
HSVOLD
^SCR("W4PRMHDP","P","NM",15)
HSVZC
^SCR("W4PRMHMS")
H
^SCR("W4PRMHMS",1)
                 # dqpkd qnn zipeayg ly xeyi` zlawl mixhnxt#                   
^SCR("W4PRMHMS",2)
                                                                           1]  
^SCR("W4PRMHMS",3)
                                                                               
^SCR("W4PRMHMS",4)
                                {10       }: ( n"rn iptil ) dwical ilnipin mekq
^SCR("W4PRMHMS",5)
                                                                               
^SCR("W4PRMHMS",6)
      [1                                                                       
^SCR("W4PRMHMS","AV",1)
äñðëäñîîúéðåáùçìùøåùéàúìá÷ìíéøèîøô
^SCR("W4PRMHMS","AV",2)

^SCR("W4PRMHMS","AV",3)

^SCR("W4PRMHMS","AV",4)
:(î"òîéðôéì)ä÷éãáìéìîéðéîíåëñ
^SCR("W4PRMHMS","AV",5)

^SCR("W4PRMHMS","AV",6)

^SCR("W4PRMHMS","NAME")
zipeayg xeyi` zlawl mixhnxt
^SCR("W4PRMHMS","P",10,"CRD")
4,32,E,10,0
^SCR("W4PRMHMS","P",10,"HELP")

^SCR("W4PRMHMS","P",10,"LMAX")
10
^SCR("W4PRMHMS","P",10,"MUMPS1")

^SCR("W4PRMHMS","P",10,"MUMPS2")

^SCR("W4PRMHMS","P",10,"TYP")
E
^SCR("W4PRMHMS","P","NAME","SUM")
10
^SCR("W4PRMHMS","P","NM",10)
SUM
^SCR("W4PRMHMS","P","RB",1)
3,7,7,77
^SCR("W4PRMHSN")
H
^SCR("W4PRMHSN",1)
                                                                               
^SCR("W4PRMHSN",2)
                                  # zayayg ixhnxt #                            
^SCR("W4PRMHSN",3)
                                                                               
^SCR("W4PRMHSN",4)
                                                                     1]        
^SCR("W4PRMHSN",5)
                 {10      }: zeneyz n"rn     {05     }: zeipw oeayg            
^SCR("W4PRMHSN",6)
                 {17      }: ze`wqr n"rn     {15     }:zeqpkd oeayg            
^SCR("W4PRMHSN",7)
                 {21      }:miiekif n"rn    {19     }:miiekif oeayg            
^SCR("W4PRMHSN",8)
                                   {22      } : xewn qn iekip oeayg            
^SCR("W4PRMHSN",9)
       {26    } n"rn daeg `l onefn  {25     } n"rn daeg dtew  onefn            
^SCR("W4PRMHSN",10)
        {31    } n"rn daeg `l  wiy  {30     }:   n"rn daeg dtew wiy            
^SCR("W4PRMHSN",11)
          {28   } n"rn daeg `l yelz {27     }:  n"rn daeg dtew yelz            
^SCR("W4PRMHSN",12)
 {36   } n"rn daeg `l zi`wpa dxard {33      }:  n"rn daeg wpa dxard            
^SCR("W4PRMHSN",13)
        {38    } n"rn daeg `l mitih {34     }:      n"rn daeg mitih            
^SCR("W4PRMHSN",14)
      {39   } n"rn daeg `l hxw`xyi {35     }:n"rn daeg dtew hxk`xyi            
^SCR("W4PRMHSN",15)
                                            {40      }:dxag hxk`xyi            
^SCR("W4PRMHSN",16)
         {46    } n"rn daeg `l dfie {45     }:n"rn daeg dtew   dfie            
^SCR("W4PRMHSN",17)
                                            {50      }:dxag    dfie            
^SCR("W4PRMHSN",18)
      {56   } n"rn daeg `l qxpiic  {55     }: n"rn daeg dtew qxpiic            
^SCR("W4PRMHSN",19)
                                          {60      }:  dxag  qxpiic            
^SCR("W4PRMHSN",20)
        {66    } n"rn daeg `l .tqw`.n`  {65    }:n"rn daeg .tqw`.n`            
^SCR("W4PRMHSN",21)
                                            {70      }:dxag  AM.EXP            
^SCR("W4PRMHSN",22)
        {77    }: n"rn daeg `l ine`l {73    }: n"rn daeg dtew ine`l            
^SCR("W4PRMHSN",23)
                                            {74      }:dxag   ine`l            
^SCR("W4PRMHSN",24)
                                                                               
^SCR("W4PRMHSN",25)
                      {75  }:   (0 - `l ,1 - ok ) wpal zecwtd xiardl           
^SCR("W4PRMHSN",26)
                                                {78     }: wpa oeayg           
^SCR("W4PRMHSN",27)
                                                                               
^SCR("W4PRMHSN",28)
                     {95 }:(3- mef , 2- xvw ,1- jex`) : zeniyx hnxet           
^SCR("W4PRMHSN",29)
        [1                                                                     
^SCR("W4PRMHSN",30)
                                                                               
^SCR("W4PRMHSN","AV",1)

^SCR("W4PRMHSN","AV",2)
úáùáùçéøèîøô
^SCR("W4PRMHSN","AV",3)

^SCR("W4PRMHSN","AV",4)

^SCR("W4PRMHSN","AV",5)
:úåîåùúî"òî:úåéð÷ïåáùç
^SCR("W4PRMHSN","AV",6)
:úåà÷ñòî"òî:úåñðëäïåáùç
^SCR("W4PRMHSN","AV",7)
:íééåëéæî"òî:íééåëéæïåáùç
^SCR("W4PRMHSN","AV",8)
:øå÷îñîéåëéðïåáùç
^SCR("W4PRMHSN","AV",9)
î"òîäáåçàìïîåæîî"òîäáåçäôå÷ïîåæî
^SCR("W4PRMHSN","AV",10)
î"òîäáåçàì÷éù:î"òîäáåçäôå÷÷éù
^SCR("W4PRMHSN","AV",11)
î"òîäáåçàìùåìú:î"òîäáåçäôå÷ùåìú
^SCR("W4PRMHSN","AV",12)
î"òîäáåçàìúéà÷ðáäøáòä:î"òîäáåç÷ðáäøáòä
^SCR("W4PRMHSN","AV",13)
î"òîäáåçàìíéôéè:î"òîäáåçíéôéè
^SCR("W4PRMHSN","AV",14)
î"òîäáåçàìèø÷àøùé:î"òîäáåçäôå÷èøëàøùé
^SCR("W4PRMHSN","AV",15)
:äøáçèøëàøùé
^SCR("W4PRMHSN","AV",16)
î"òîäáåçàìäæéå:î"òîäáåçäôå÷äæéå
^SCR("W4PRMHSN","AV",17)
:äøáçäæéå
^SCR("W4PRMHSN","AV",18)
î"òîäáåçàìñøðééã:î"òîäáåçäôå÷ñøðééã
^SCR("W4PRMHSN","AV",19)
:äøáçñøðééã
^SCR("W4PRMHSN","AV",20)
î"òîäáåçàì.ôñ÷à.îà:î"òîäáåç.ôñ÷à.îà
^SCR("W4PRMHSN","AV",21)
:äøáçAM.EXP
^SCR("W4PRMHSN","AV",22)
:î"òîäáåçàìéîåàì:î"òîäáåçäôå÷éîåàì
^SCR("W4PRMHSN","AV",23)
:äøáçéîåàì
^SCR("W4PRMHSN","AV",24)

^SCR("W4PRMHSN","AV",25)
:(0-àì,1-ïë)÷ðáìúåã÷ôäøéáòäì
^SCR("W4PRMHSN","AV",26)
:÷ðáïåáùç
^SCR("W4PRMHSN","AV",27)

^SCR("W4PRMHSN","AV",28)
:(3-íåæ,2-øö÷,1-êåøà):úåîéùøèîøåô
^SCR("W4PRMHSN","AV",29)

^SCR("W4PRMHSN","AV",30)

^SCR("W4PRMHSN","NAME")

^SCR("W4PRMHSN","P",5,"CRD")
5,45,E,8,0
^SCR("W4PRMHSN","P",5,"HELP")

^SCR("W4PRMHSN","P",5,"LMAX")
8
^SCR("W4PRMHSN","P",5,"MUMPS1")

^SCR("W4PRMHSN","P",5,"MUMPS2")

^SCR("W4PRMHSN","P",5,"TYP")
E
^SCR("W4PRMHSN","P",10,"CRD")
5,17,E,8,0
^SCR("W4PRMHSN","P",10,"HELP")

^SCR("W4PRMHSN","P",10,"LMAX")
9
^SCR("W4PRMHSN","P",10,"MUMPS1")

^SCR("W4PRMHSN","P",10,"MUMPS2")

^SCR("W4PRMHSN","P",10,"TYP")
E
^SCR("W4PRMHSN","P",15,"CRD")
6,45,E,8,0
^SCR("W4PRMHSN","P",15,"HELP")

^SCR("W4PRMHSN","P",15,"LMAX")
8
^SCR("W4PRMHSN","P",15,"MUMPS1")

^SCR("W4PRMHSN","P",15,"MUMPS2")

^SCR("W4PRMHSN","P",15,"TYP")
E
^SCR("W4PRMHSN","P",17,"CRD")
6,17,E,8,0
^SCR("W4PRMHSN","P",17,"HELP")

^SCR("W4PRMHSN","P",17,"LMAX")
9
^SCR("W4PRMHSN","P",17,"MUMPS1")

^SCR("W4PRMHSN","P",17,"MUMPS2")

^SCR("W4PRMHSN","P",17,"TYP")
E
^SCR("W4PRMHSN","P",19,"CRD")
7,44,E,8,0
^SCR("W4PRMHSN","P",19,"HELP")

^SCR("W4PRMHSN","P",19,"LMAX")
8
^SCR("W4PRMHSN","P",19,"MUMPS1")

^SCR("W4PRMHSN","P",19,"MUMPS2")

^SCR("W4PRMHSN","P",19,"TYP")
E
^SCR("W4PRMHSN","P",21,"CRD")
7,17,E,8,0
^SCR("W4PRMHSN","P",21,"HELP")

^SCR("W4PRMHSN","P",21,"LMAX")
9
^SCR("W4PRMHSN","P",21,"MUMPS1")

^SCR("W4PRMHSN","P",21,"MUMPS2")

^SCR("W4PRMHSN","P",21,"TYP")
E
^SCR("W4PRMHSN","P",22,"CRD")
8,35,E,8,0
^SCR("W4PRMHSN","P",22,"HELP")

^SCR("W4PRMHSN","P",22,"LMAX")
9
^SCR("W4PRMHSN","P",22,"MUMPS1")

^SCR("W4PRMHSN","P",22,"MUMPS2")

^SCR("W4PRMHSN","P",22,"TYP")
E
^SCR("W4PRMHSN","P",25,"CRD")
9,36,E,8,0
^SCR("W4PRMHSN","P",25,"HELP")

^SCR("W4PRMHSN","P",25,"LMAX")
8
^SCR("W4PRMHSN","P",25,"MUMPS1")

^SCR("W4PRMHSN","P",25,"MUMPS2")

^SCR("W4PRMHSN","P",25,"TYP")
E
^SCR("W4PRMHSN","P",26,"CRD")
9,7,E,7,0
^SCR("W4PRMHSN","P",26,"HELP")

^SCR("W4PRMHSN","P",26,"LMAX")
7
^SCR("W4PRMHSN","P",26,"MUMPS1")

^SCR("W4PRMHSN","P",26,"MUMPS2")

^SCR("W4PRMHSN","P",26,"TYP")
E
^SCR("W4PRMHSN","P",27,"CRD")
11,36,E,8,0
^SCR("W4PRMHSN","P",27,"HELP")

^SCR("W4PRMHSN","P",27,"LMAX")
8
^SCR("W4PRMHSN","P",27,"MUMPS1")

^SCR("W4PRMHSN","P",27,"MUMPS2")

^SCR("W4PRMHSN","P",27,"TYP")
E
^SCR("W4PRMHSN","P",28,"CRD")
11,10,E,6,0
^SCR("W4PRMHSN","P",28,"HELP")

^SCR("W4PRMHSN","P",28,"LMAX")
6
^SCR("W4PRMHSN","P",28,"MUMPS1")

^SCR("W4PRMHSN","P",28,"MUMPS2")

^SCR("W4PRMHSN","P",28,"TYP")
E
^SCR("W4PRMHSN","P",30,"CRD")
10,36,E,8,0
^SCR("W4PRMHSN","P",30,"HELP")

^SCR("W4PRMHSN","P",30,"LMAX")
8
^SCR("W4PRMHSN","P",30,"MUMPS1")

^SCR("W4PRMHSN","P",30,"MUMPS2")

^SCR("W4PRMHSN","P",30,"TYP")
E
^SCR("W4PRMHSN","P",31,"CRD")
10,8,E,7,0
^SCR("W4PRMHSN","P",31,"HELP")

^SCR("W4PRMHSN","P",31,"LMAX")
7
^SCR("W4PRMHSN","P",31,"MUMPS1")

^SCR("W4PRMHSN","P",31,"MUMPS2")

^SCR("W4PRMHSN","P",31,"TYP")
E
^SCR("W4PRMHSN","P",33,"CRD")
12,35,E,8,0
^SCR("W4PRMHSN","P",33,"HELP")

^SCR("W4PRMHSN","P",33,"LMAX")
9
^SCR("W4PRMHSN","P",33,"MUMPS1")

^SCR("W4PRMHSN","P",33,"MUMPS2")

^SCR("W4PRMHSN","P",33,"TYP")
E
^SCR("W4PRMHSN","P",34,"CRD")
13,36,E,8,0
^SCR("W4PRMHSN","P",34,"HELP")

^SCR("W4PRMHSN","P",34,"LMAX")
8
^SCR("W4PRMHSN","P",34,"MUMPS1")

^SCR("W4PRMHSN","P",34,"MUMPS2")

^SCR("W4PRMHSN","P",34,"TYP")
E
^SCR("W4PRMHSN","P",35,"CRD")
14,35,E,8,0
^SCR("W4PRMHSN","P",35,"HELP")

^SCR("W4PRMHSN","P",35,"LMAX")
8
^SCR("W4PRMHSN","P",35,"MUMPS1")

^SCR("W4PRMHSN","P",35,"MUMPS2")

^SCR("W4PRMHSN","P",35,"TYP")
E
^SCR("W4PRMHSN","P",36,"CRD")
12,1,E,6,0
^SCR("W4PRMHSN","P",36,"HELP")

^SCR("W4PRMHSN","P",36,"LMAX")
6
^SCR("W4PRMHSN","P",36,"MUMPS1")

^SCR("W4PRMHSN","P",36,"MUMPS2")

^SCR("W4PRMHSN","P",36,"TYP")
E
^SCR("W4PRMHSN","P",38,"CRD")
13,8,E,7,0
^SCR("W4PRMHSN","P",38,"HELP")

^SCR("W4PRMHSN","P",38,"LMAX")
7
^SCR("W4PRMHSN","P",38,"MUMPS1")

^SCR("W4PRMHSN","P",38,"MUMPS2")

^SCR("W4PRMHSN","P",38,"TYP")
E
^SCR("W4PRMHSN","P",39,"CRD")
14,6,E,6,0
^SCR("W4PRMHSN","P",39,"HELP")

^SCR("W4PRMHSN","P",39,"LMAX")
6
^SCR("W4PRMHSN","P",39,"MUMPS1")

^SCR("W4PRMHSN","P",39,"MUMPS2")

^SCR("W4PRMHSN","P",39,"TYP")
E
^SCR("W4PRMHSN","P",40,"CRD")
15,44,E,8,0
^SCR("W4PRMHSN","P",40,"HELP")

^SCR("W4PRMHSN","P",40,"LMAX")
9
^SCR("W4PRMHSN","P",40,"MUMPS1")

^SCR("W4PRMHSN","P",40,"MUMPS2")

^SCR("W4PRMHSN","P",40,"TYP")
E
^SCR("W4PRMHSN","P",45,"CRD")
16,36,E,8,0
^SCR("W4PRMHSN","P",45,"HELP")

^SCR("W4PRMHSN","P",45,"LMAX")
8
^SCR("W4PRMHSN","P",45,"MUMPS1")

^SCR("W4PRMHSN","P",45,"MUMPS2")

^SCR("W4PRMHSN","P",45,"TYP")
E
^SCR("W4PRMHSN","P",46,"CRD")
16,9,E,7,0
^SCR("W4PRMHSN","P",46,"HELP")

^SCR("W4PRMHSN","P",46,"LMAX")
7
^SCR("W4PRMHSN","P",46,"MUMPS1")

^SCR("W4PRMHSN","P",46,"MUMPS2")

^SCR("W4PRMHSN","P",46,"TYP")
E
^SCR("W4PRMHSN","P",50,"CRD")
17,44,E,8,0
^SCR("W4PRMHSN","P",50,"HELP")

^SCR("W4PRMHSN","P",50,"LMAX")
9
^SCR("W4PRMHSN","P",50,"MUMPS1")

^SCR("W4PRMHSN","P",50,"MUMPS2")

^SCR("W4PRMHSN","P",50,"TYP")
E
^SCR("W4PRMHSN","P",55,"CRD")
18,35,E,8,0
^SCR("W4PRMHSN","P",55,"HELP")

^SCR("W4PRMHSN","P",55,"LMAX")
8
^SCR("W4PRMHSN","P",55,"MUMPS1")

^SCR("W4PRMHSN","P",55,"MUMPS2")

^SCR("W4PRMHSN","P",55,"TYP")
E
^SCR("W4PRMHSN","P",56,"CRD")
18,6,E,6,0
^SCR("W4PRMHSN","P",56,"HELP")

^SCR("W4PRMHSN","P",56,"LMAX")
6
^SCR("W4PRMHSN","P",56,"MUMPS1")

^SCR("W4PRMHSN","P",56,"MUMPS2")

^SCR("W4PRMHSN","P",56,"TYP")
E
^SCR("W4PRMHSN","P",60,"CRD")
19,42,E,8,0
^SCR("W4PRMHSN","P",60,"HELP")

^SCR("W4PRMHSN","P",60,"LMAX")
9
^SCR("W4PRMHSN","P",60,"MUMPS1")

^SCR("W4PRMHSN","P",60,"MUMPS2")

^SCR("W4PRMHSN","P",60,"TYP")
E
^SCR("W4PRMHSN","P",65,"CRD")
20,40,E,7,0
^SCR("W4PRMHSN","P",65,"HELP")

^SCR("W4PRMHSN","P",65,"LMAX")
7
^SCR("W4PRMHSN","P",65,"MUMPS1")

^SCR("W4PRMHSN","P",65,"MUMPS2")

^SCR("W4PRMHSN","P",65,"TYP")
E
^SCR("W4PRMHSN","P",66,"CRD")
20,8,E,7,0
^SCR("W4PRMHSN","P",66,"HELP")

^SCR("W4PRMHSN","P",66,"LMAX")
7
^SCR("W4PRMHSN","P",66,"MUMPS1")

^SCR("W4PRMHSN","P",66,"MUMPS2")

^SCR("W4PRMHSN","P",66,"TYP")
E
^SCR("W4PRMHSN","P",70,"CRD")
21,44,E,8,0
^SCR("W4PRMHSN","P",70,"HELP")

^SCR("W4PRMHSN","P",70,"LMAX")
9
^SCR("W4PRMHSN","P",70,"MUMPS1")

^SCR("W4PRMHSN","P",70,"MUMPS2")

^SCR("W4PRMHSN","P",70,"TYP")
E
^SCR("W4PRMHSN","P",73,"CRD")
22,37,E,7,0
^SCR("W4PRMHSN","P",73,"HELP")

^SCR("W4PRMHSN","P",73,"LMAX")
7
^SCR("W4PRMHSN","P",73,"MUMPS1")

^SCR("W4PRMHSN","P",73,"MUMPS2")

^SCR("W4PRMHSN","P",73,"TYP")
E
^SCR("W4PRMHSN","P",74,"CRD")
23,44,E,8,0
^SCR("W4PRMHSN","P",74,"HELP")

^SCR("W4PRMHSN","P",74,"LMAX")
9
^SCR("W4PRMHSN","P",74,"MUMPS1")

^SCR("W4PRMHSN","P",74,"MUMPS2")

^SCR("W4PRMHSN","P",74,"TYP")
E
^SCR("W4PRMHSN","P",75,"CRD")
25,22,E,1,0
^SCR("W4PRMHSN","P",75,"HELP")

^SCR("W4PRMHSN","P",75,"LMAX")
5
^SCR("W4PRMHSN","P",75,"MUMPS1")

^SCR("W4PRMHSN","P",75,"MUMPS2")

^SCR("W4PRMHSN","P",75,"TYP")
E
^SCR("W4PRMHSN","P",77,"CRD")
22,8,E,7,0
^SCR("W4PRMHSN","P",77,"HELP")

^SCR("W4PRMHSN","P",77,"LMAX")
7
^SCR("W4PRMHSN","P",77,"MUMPS1")

^SCR("W4PRMHSN","P",77,"MUMPS2")

^SCR("W4PRMHSN","P",77,"TYP")
E
^SCR("W4PRMHSN","P",78,"CRD")
26,48,E,8,0
^SCR("W4PRMHSN","P",78,"HELP")

^SCR("W4PRMHSN","P",78,"LMAX")
8
^SCR("W4PRMHSN","P",78,"MUMPS1")

^SCR("W4PRMHSN","P",78,"MUMPS2")

^SCR("W4PRMHSN","P",78,"TYP")
E
^SCR("W4PRMHSN","P",95,"CRD")
28,21,N,4,0
^SCR("W4PRMHSN","P",95,"HELP")

^SCR("W4PRMHSN","P",95,"LMAX")
4
^SCR("W4PRMHSN","P",95,"MUMPS1")

^SCR("W4PRMHSN","P",95,"MUMPS2")
I %S<1,%S>3 S %SC("ER")=1
^SCR("W4PRMHSN","P",95,"MUST")

^SCR("W4PRMHSN","P",95,"TYP")
N
^SCR("W4PRMHSN","P","NAME","ALPHA")
74
^SCR("W4PRMHSN","P","NAME","ALPHAK")
73
^SCR("W4PRMHSN","P","NAME","ALPHANM")
77
^SCR("W4PRMHSN","P","NAME","AMEXNM")
66
^SCR("W4PRMHSN","P","NAME","AMEXP")
70
^SCR("W4PRMHSN","P","NAME","AMEXPK")
65
^SCR("W4PRMHSN","P","NAME","BANK")
78
^SCR("W4PRMHSN","P","NAME","CHKK")
30
^SCR("W4PRMHSN","P","NAME","CHKKM")
33
^SCR("W4PRMHSN","P","NAME","CHKKMNM")
36
^SCR("W4PRMHSN","P","NAME","CHKNM")
31
^SCR("W4PRMHSN","P","NAME","DINERS")
60
^SCR("W4PRMHSN","P","NAME","DINERSK")
55
^SCR("W4PRMHSN","P","NAME","DNRNM")
56
^SCR("W4PRMHSN","P","NAME","FORMAT")
95
^SCR("W4PRMHSN","P","NAME","HFK")
75
^SCR("W4PRMHSN","P","NAME","HKNIJOT")
5
^SCR("W4PRMHSN","P","NAME","HMHIROT")
15
^SCR("W4PRMHSN","P","NAME","HNKMM")
22
^SCR("W4PRMHSN","P","NAME","HZICMH")
19
^SCR("W4PRMHSN","P","NAME","HZICMHM")
21
^SCR("W4PRMHSN","P","NAME","ISR")
40
^SCR("W4PRMHSN","P","NAME","ISRK")
35
^SCR("W4PRMHSN","P","NAME","ISRKNM")
39
^SCR("W4PRMHSN","P","NAME","MAMI")
17
^SCR("W4PRMHSN","P","NAME","MAMT")
10
^SCR("W4PRMHSN","P","NAME","MZMK")
25
^SCR("W4PRMHSN","P","NAME","MZMKNM")
26
^SCR("W4PRMHSN","P","NAME","TIP")
34
^SCR("W4PRMHSN","P","NAME","TIPNM")
38
^SCR("W4PRMHSN","P","NAME","VISA")
50
^SCR("W4PRMHSN","P","NAME","VISAK")
45
^SCR("W4PRMHSN","P","NAME","VISAKNM")
46
^SCR("W4PRMHSN","P","NAME","ZK")
27
^SCR("W4PRMHSN","P","NAME","ZKNM")
28
^SCR("W4PRMHSN","P","NM",5)
HKNIJOT
^SCR("W4PRMHSN","P","NM",10)
MAMT
^SCR("W4PRMHSN","P","NM",15)
HMHIROT
^SCR("W4PRMHSN","P","NM",17)
MAMI
^SCR("W4PRMHSN","P","NM",19)
HZICMH
^SCR("W4PRMHSN","P","NM",21)
HZICMHM
^SCR("W4PRMHSN","P","NM",22)
HNKMM
^SCR("W4PRMHSN","P","NM",25)
MZMK
^SCR("W4PRMHSN","P","NM",26)
MZMKNM
^SCR("W4PRMHSN","P","NM",27)
ZK
^SCR("W4PRMHSN","P","NM",28)
ZKNM
^SCR("W4PRMHSN","P","NM",30)
CHKK
^SCR("W4PRMHSN","P","NM",31)
CHKNM
^SCR("W4PRMHSN","P","NM",33)
CHKKM
^SCR("W4PRMHSN","P","NM",34)
TIP
^SCR("W4PRMHSN","P","NM",35)
ISRK
^SCR("W4PRMHSN","P","NM",36)
CHKKMNM
^SCR("W4PRMHSN","P","NM",38)
TIPNM
^SCR("W4PRMHSN","P","NM",39)
ISRKNM
^SCR("W4PRMHSN","P","NM",40)
ISR
^SCR("W4PRMHSN","P","NM",45)
VISAK
^SCR("W4PRMHSN","P","NM",46)
VISAKNM
^SCR("W4PRMHSN","P","NM",50)
VISA
^SCR("W4PRMHSN","P","NM",55)
DINERSK
^SCR("W4PRMHSN","P","NM",56)
DNRNM
^SCR("W4PRMHSN","P","NM",60)
DINERS
^SCR("W4PRMHSN","P","NM",65)
AMEXPK
^SCR("W4PRMHSN","P","NM",66)
AMEXNM
^SCR("W4PRMHSN","P","NM",70)
AMEXP
^SCR("W4PRMHSN","P","NM",73)
ALPHAK
^SCR("W4PRMHSN","P","NM",74)
ALPHA
^SCR("W4PRMHSN","P","NM",75)
HFK
^SCR("W4PRMHSN","P","NM",77)
ALPHANM
^SCR("W4PRMHSN","P","NM",78)
BANK
^SCR("W4PRMHSN","P","NM",95)
FORMAT
^SCR("W4PRMHSN","P","RB",1)
5,9,30,71
^SCR("W4PRMHSV")
H
^SCR("W4PRMHSV",1)
                                                                               
^SCR("W4PRMHSV",2)
                                  # zayayg ixhnxt #                            
^SCR("W4PRMHSV",3)
                                                                               
^SCR("W4PRMHSV",4)
                                                                     1]        
^SCR("W4PRMHSV",5)
                 {10      }: zeneyz n"rn     {05     }: zeipw oeayg            
^SCR("W4PRMHSV",6)
                 {17      }: ze`wqr n"rn     {15     }:zeqpkd oeayg            
^SCR("W4PRMHSV",7)
                                            {18     }: n"rn zexezt zeqpkd oeayg
^SCR("W4PRMHSV",8)
                 {21      }:miiekif n"rn    {19     }:miiekif oeayg            
^SCR("W4PRMHSV",9)
                                   {22      } : xewn qn iekip oeayg            
^SCR("W4PRMHSV",10)
                 {30      }:    dtew wiy     {25     }: dtew  onefn            
^SCR("W4PRMHSV",11)
                 {33      }:   wpa dxard     {27     }:   dtew yelz            
^SCR("W4PRMHSV",12)
                                             {34     }:       mitih            
^SCR("W4PRMHSV",13)
                 {40      }:dxag hxk`xyi     {35     }: dtew hxk`xyi           
^SCR("W4PRMHSV",14)
                 {50      }:dxag    dfie     {45     }: dtew   dfie            
^SCR("W4PRMHSV",15)
                 {60      }:dxag  qxpiic     {55     }: dtew qxpiic            
^SCR("W4PRMHSV",16)
                 {70      }:dxag  AM.EXP     {65     }: dtew AM.EXP            
^SCR("W4PRMHSV",17)
                 {72      }:dxag     JCB     {71     }: dtew    JCB            
^SCR("W4PRMHSV",18)
                 {74      }:dxag   ine`l     {73     }: dtew  ine`l            
^SCR("W4PRMHSV",19)
                                                                               
^SCR("W4PRMHSV",20)
                     {75  }:   (0 - `l ,1 - ok ) wpal zecwtd xiardl            
^SCR("W4PRMHSV",21)
                                               {78     }: wpa oeayg            
^SCR("W4PRMHSV",22)
                                                                               
^SCR("W4PRMHSV",23)
                    {95 }:(3- mef , 2- xvw ,1- jex`) : zeniyx hnxet            
^SCR("W4PRMHSV",24)
        [1                                                                     
^SCR("W4PRMHSV","AV",1)

^SCR("W4PRMHSV","AV",2)
úáùáùçéøèîøô
^SCR("W4PRMHSV","AV",3)

^SCR("W4PRMHSV","AV",4)

^SCR("W4PRMHSV","AV",5)
:úåîåùúî"òî:úåéð÷ïåáùç
^SCR("W4PRMHSV","AV",6)
:úåà÷ñòî"òî:úåñðëäïåáùç
^SCR("W4PRMHSV","AV",7)
:î"òîúåøåúôúåñðëäïåáùç
^SCR("W4PRMHSV","AV",8)
:íééåëéæî"òî:íééåëéæïåáùç
^SCR("W4PRMHSV","AV",9)
:øå÷îñîéåëéðïåáùç
^SCR("W4PRMHSV","AV",10)
:äôå÷÷éù:äôå÷ïîåæî
^SCR("W4PRMHSV","AV",11)
:÷ðáäøáòä:äôå÷ùåìú
^SCR("W4PRMHSV","AV",12)
:íéôéè
^SCR("W4PRMHSV","AV",13)
:äøáçèøëàøùé:äôå÷èøëàøùé
^SCR("W4PRMHSV","AV",14)
:äøáçäæéå:äôå÷äæéå
^SCR("W4PRMHSV","AV",15)
:äøáçñøðééã:äôå÷ñøðééã
^SCR("W4PRMHSV","AV",16)
:äøáçAM.EXP:äôå÷AM.EXP
^SCR("W4PRMHSV","AV",17)
:äøáçJCB:äôå÷JCB
^SCR("W4PRMHSV","AV",18)
:äøáçéîåàì:äôå÷éîåàì
^SCR("W4PRMHSV","AV",19)

^SCR("W4PRMHSV","AV",20)
:(0-àì,1-ïë)÷ðáìúåã÷ôäøéáòäì
^SCR("W4PRMHSV","AV",21)
:÷ðáïåáùç
^SCR("W4PRMHSV","AV",22)

^SCR("W4PRMHSV","AV",23)
:(3-íåæ,2-øö÷,1-êåøà):úåîéùøèîøåô
^SCR("W4PRMHSV","AV",24)

^SCR("W4PRMHSV","NAME")

^SCR("W4PRMHSV","P",5,"CRD")
5,45,E,8,0
^SCR("W4PRMHSV","P",5,"HELP")

^SCR("W4PRMHSV","P",5,"LMAX")
8
^SCR("W4PRMHSV","P",5,"MUMPS1")

^SCR("W4PRMHSV","P",5,"MUMPS2")

^SCR("W4PRMHSV","P",5,"TYP")
E
^SCR("W4PRMHSV","P",10,"CRD")
5,17,E,8,0
^SCR("W4PRMHSV","P",10,"HELP")

^SCR("W4PRMHSV","P",10,"LMAX")
9
^SCR("W4PRMHSV","P",10,"MUMPS1")

^SCR("W4PRMHSV","P",10,"MUMPS2")

^SCR("W4PRMHSV","P",10,"TYP")
E
^SCR("W4PRMHSV","P",15,"CRD")
6,45,E,8,0
^SCR("W4PRMHSV","P",15,"HELP")

^SCR("W4PRMHSV","P",15,"LMAX")
8
^SCR("W4PRMHSV","P",15,"MUMPS1")

^SCR("W4PRMHSV","P",15,"MUMPS2")

^SCR("W4PRMHSV","P",15,"TYP")
E
^SCR("W4PRMHSV","P",17,"CRD")
6,17,E,8,0
^SCR("W4PRMHSV","P",17,"HELP")

^SCR("W4PRMHSV","P",17,"LMAX")
9
^SCR("W4PRMHSV","P",17,"MUMPS1")

^SCR("W4PRMHSV","P",17,"MUMPS2")

^SCR("W4PRMHSV","P",17,"TYP")
E
^SCR("W4PRMHSV","P",18,"CRD")
7,44,E,8,0
^SCR("W4PRMHSV","P",18,"HELP")

^SCR("W4PRMHSV","P",18,"LMAX")
8
^SCR("W4PRMHSV","P",18,"MUMPS1")

^SCR("W4PRMHSV","P",18,"MUMPS2")

^SCR("W4PRMHSV","P",18,"TYP")
E
^SCR("W4PRMHSV","P",19,"CRD")
8,44,E,8,0
^SCR("W4PRMHSV","P",19,"HELP")

^SCR("W4PRMHSV","P",19,"LMAX")
8
^SCR("W4PRMHSV","P",19,"MUMPS1")

^SCR("W4PRMHSV","P",19,"MUMPS2")

^SCR("W4PRMHSV","P",19,"TYP")
E
^SCR("W4PRMHSV","P",21,"CRD")
8,17,E,8,0
^SCR("W4PRMHSV","P",21,"HELP")

^SCR("W4PRMHSV","P",21,"LMAX")
9
^SCR("W4PRMHSV","P",21,"MUMPS1")

^SCR("W4PRMHSV","P",21,"MUMPS2")

^SCR("W4PRMHSV","P",21,"TYP")
E
^SCR("W4PRMHSV","P",22,"CRD")
9,35,E,8,0
^SCR("W4PRMHSV","P",22,"HELP")

^SCR("W4PRMHSV","P",22,"LMAX")
9
^SCR("W4PRMHSV","P",22,"MUMPS1")

^SCR("W4PRMHSV","P",22,"MUMPS2")

^SCR("W4PRMHSV","P",22,"TYP")
E
^SCR("W4PRMHSV","P",25,"CRD")
10,45,E,8,0
^SCR("W4PRMHSV","P",25,"HELP")

^SCR("W4PRMHSV","P",25,"LMAX")
8
^SCR("W4PRMHSV","P",25,"MUMPS1")

^SCR("W4PRMHSV","P",25,"MUMPS2")

^SCR("W4PRMHSV","P",25,"TYP")
E
^SCR("W4PRMHSV","P",27,"CRD")
11,45,E,8,0
^SCR("W4PRMHSV","P",27,"HELP")

^SCR("W4PRMHSV","P",27,"LMAX")
8
^SCR("W4PRMHSV","P",27,"MUMPS1")

^SCR("W4PRMHSV","P",27,"MUMPS2")

^SCR("W4PRMHSV","P",27,"TYP")
E
^SCR("W4PRMHSV","P",30,"CRD")
10,17,E,8,0
^SCR("W4PRMHSV","P",30,"HELP")

^SCR("W4PRMHSV","P",30,"LMAX")
9
^SCR("W4PRMHSV","P",30,"MUMPS1")

^SCR("W4PRMHSV","P",30,"MUMPS2")

^SCR("W4PRMHSV","P",30,"TYP")
E
^SCR("W4PRMHSV","P",33,"CRD")
11,17,E,8,0
^SCR("W4PRMHSV","P",33,"HELP")

^SCR("W4PRMHSV","P",33,"LMAX")
9
^SCR("W4PRMHSV","P",33,"MUMPS1")

^SCR("W4PRMHSV","P",33,"MUMPS2")

^SCR("W4PRMHSV","P",33,"TYP")
E
^SCR("W4PRMHSV","P",34,"CRD")
12,45,E,8,0
^SCR("W4PRMHSV","P",34,"HELP")

^SCR("W4PRMHSV","P",34,"LMAX")
8
^SCR("W4PRMHSV","P",34,"MUMPS1")

^SCR("W4PRMHSV","P",34,"MUMPS2")

^SCR("W4PRMHSV","P",34,"TYP")
E
^SCR("W4PRMHSV","P",35,"CRD")
13,45,E,8,0
^SCR("W4PRMHSV","P",35,"HELP")

^SCR("W4PRMHSV","P",35,"LMAX")
8
^SCR("W4PRMHSV","P",35,"MUMPS1")

^SCR("W4PRMHSV","P",35,"MUMPS2")

^SCR("W4PRMHSV","P",35,"TYP")
E
^SCR("W4PRMHSV","P",40,"CRD")
13,17,E,8,0
^SCR("W4PRMHSV","P",40,"HELP")

^SCR("W4PRMHSV","P",40,"LMAX")
9
^SCR("W4PRMHSV","P",40,"MUMPS1")

^SCR("W4PRMHSV","P",40,"MUMPS2")

^SCR("W4PRMHSV","P",40,"TYP")
E
^SCR("W4PRMHSV","P",45,"CRD")
14,45,E,8,0
^SCR("W4PRMHSV","P",45,"HELP")

^SCR("W4PRMHSV","P",45,"LMAX")
8
^SCR("W4PRMHSV","P",45,"MUMPS1")

^SCR("W4PRMHSV","P",45,"MUMPS2")

^SCR("W4PRMHSV","P",45,"TYP")
E
^SCR("W4PRMHSV","P",50,"CRD")
14,17,E,8,0
^SCR("W4PRMHSV","P",50,"HELP")

^SCR("W4PRMHSV","P",50,"LMAX")
9
^SCR("W4PRMHSV","P",50,"MUMPS1")

^SCR("W4PRMHSV","P",50,"MUMPS2")

^SCR("W4PRMHSV","P",50,"TYP")
E
^SCR("W4PRMHSV","P",55,"CRD")
15,45,E,8,0
^SCR("W4PRMHSV","P",55,"HELP")

^SCR("W4PRMHSV","P",55,"LMAX")
8
^SCR("W4PRMHSV","P",55,"MUMPS1")

^SCR("W4PRMHSV","P",55,"MUMPS2")

^SCR("W4PRMHSV","P",55,"TYP")
E
^SCR("W4PRMHSV","P",60,"CRD")
15,17,E,8,0
^SCR("W4PRMHSV","P",60,"HELP")

^SCR("W4PRMHSV","P",60,"LMAX")
9
^SCR("W4PRMHSV","P",60,"MUMPS1")

^SCR("W4PRMHSV","P",60,"MUMPS2")

^SCR("W4PRMHSV","P",60,"TYP")
E
^SCR("W4PRMHSV","P",65,"CRD")
16,45,E,8,0
^SCR("W4PRMHSV","P",65,"HELP")

^SCR("W4PRMHSV","P",65,"LMAX")
8
^SCR("W4PRMHSV","P",65,"MUMPS1")

^SCR("W4PRMHSV","P",65,"MUMPS2")

^SCR("W4PRMHSV","P",65,"TYP")
E
^SCR("W4PRMHSV","P",70,"CRD")
16,17,E,8,0
^SCR("W4PRMHSV","P",70,"HELP")

^SCR("W4PRMHSV","P",70,"LMAX")
9
^SCR("W4PRMHSV","P",70,"MUMPS1")

^SCR("W4PRMHSV","P",70,"MUMPS2")

^SCR("W4PRMHSV","P",70,"TYP")
E
^SCR("W4PRMHSV","P",71,"CRD")
17,45,E,8,0
^SCR("W4PRMHSV","P",71,"HELP")

^SCR("W4PRMHSV","P",71,"LMAX")
8
^SCR("W4PRMHSV","P",71,"MUMPS1")

^SCR("W4PRMHSV","P",71,"MUMPS2")

^SCR("W4PRMHSV","P",71,"TYP")
E
^SCR("W4PRMHSV","P",72,"CRD")
17,17,E,8,0
^SCR("W4PRMHSV","P",72,"HELP")

^SCR("W4PRMHSV","P",72,"LMAX")
9
^SCR("W4PRMHSV","P",72,"MUMPS1")

^SCR("W4PRMHSV","P",72,"MUMPS2")

^SCR("W4PRMHSV","P",72,"TYP")
E
^SCR("W4PRMHSV","P",73,"CRD")
18,45,E,8,0
^SCR("W4PRMHSV","P",73,"HELP")

^SCR("W4PRMHSV","P",73,"LMAX")
8
^SCR("W4PRMHSV","P",73,"MUMPS1")

^SCR("W4PRMHSV","P",73,"MUMPS2")

^SCR("W4PRMHSV","P",73,"TYP")
E
^SCR("W4PRMHSV","P",74,"CRD")
18,17,E,8,0
^SCR("W4PRMHSV","P",74,"HELP")

^SCR("W4PRMHSV","P",74,"LMAX")
9
^SCR("W4PRMHSV","P",74,"MUMPS1")

^SCR("W4PRMHSV","P",74,"MUMPS2")

^SCR("W4PRMHSV","P",74,"TYP")
E
^SCR("W4PRMHSV","P",75,"CRD")
20,21,E,1,0
^SCR("W4PRMHSV","P",75,"HELP")

^SCR("W4PRMHSV","P",75,"LMAX")
5
^SCR("W4PRMHSV","P",75,"MUMPS1")

^SCR("W4PRMHSV","P",75,"MUMPS2")

^SCR("W4PRMHSV","P",75,"TYP")
E
^SCR("W4PRMHSV","P",78,"CRD")
21,47,E,8,0
^SCR("W4PRMHSV","P",78,"HELP")

^SCR("W4PRMHSV","P",78,"LMAX")
8
^SCR("W4PRMHSV","P",78,"MUMPS1")

^SCR("W4PRMHSV","P",78,"MUMPS2")

^SCR("W4PRMHSV","P",78,"TYP")
E
^SCR("W4PRMHSV","P",95,"CRD")
23,20,N,4,0
^SCR("W4PRMHSV","P",95,"HELP")

^SCR("W4PRMHSV","P",95,"LMAX")
4
^SCR("W4PRMHSV","P",95,"MUMPS1")

^SCR("W4PRMHSV","P",95,"MUMPS2")
I %S<1,%S>3 S %SC("ER")=1
^SCR("W4PRMHSV","P",95,"MUST")

^SCR("W4PRMHSV","P",95,"TYP")
N
^SCR("W4PRMHSV","P","NAME","ALPHA")
74
^SCR("W4PRMHSV","P","NAME","ALPHAK")
73
^SCR("W4PRMHSV","P","NAME","AMEXP")
70
^SCR("W4PRMHSV","P","NAME","AMEXPK")
65
^SCR("W4PRMHSV","P","NAME","BANK")
78
^SCR("W4PRMHSV","P","NAME","CHKK")
30
^SCR("W4PRMHSV","P","NAME","CHKKM")
33
^SCR("W4PRMHSV","P","NAME","DINERS")
60
^SCR("W4PRMHSV","P","NAME","DINERSK")
55
^SCR("W4PRMHSV","P","NAME","FORMAT")
95
^SCR("W4PRMHSV","P","NAME","HFK")
75
^SCR("W4PRMHSV","P","NAME","HKNIJOT")
5
^SCR("W4PRMHSV","P","NAME","HMHIROT")
15
^SCR("W4PRMHSV","P","NAME","HNKMM")
22
^SCR("W4PRMHSV","P","NAME","HZICMH")
19
^SCR("W4PRMHSV","P","NAME","HZICMHM")
21
^SCR("W4PRMHSV","P","NAME","ISR")
40
^SCR("W4PRMHSV","P","NAME","ISRK")
35
^SCR("W4PRMHSV","P","NAME","JCB")
72
^SCR("W4PRMHSV","P","NAME","JCBK")
71
^SCR("W4PRMHSV","P","NAME","MAMI")
17
^SCR("W4PRMHSV","P","NAME","MAMT")
10
^SCR("W4PRMHSV","P","NAME","MZMK")
25
^SCR("W4PRMHSV","P","NAME","NOMAM")
18
^SCR("W4PRMHSV","P","NAME","TIP")
34
^SCR("W4PRMHSV","P","NAME","VISA")
50
^SCR("W4PRMHSV","P","NAME","VISAK")
45
^SCR("W4PRMHSV","P","NAME","ZK")
27
^SCR("W4PRMHSV","P","NM",5)
HKNIJOT
^SCR("W4PRMHSV","P","NM",10)
MAMT
^SCR("W4PRMHSV","P","NM",15)
HMHIROT
^SCR("W4PRMHSV","P","NM",17)
MAMI
^SCR("W4PRMHSV","P","NM",18)
NOMAM
^SCR("W4PRMHSV","P","NM",19)
HZICMH
^SCR("W4PRMHSV","P","NM",21)
HZICMHM
^SCR("W4PRMHSV","P","NM",22)
HNKMM
^SCR("W4PRMHSV","P","NM",25)
MZMK
^SCR("W4PRMHSV","P","NM",27)
ZK
^SCR("W4PRMHSV","P","NM",30)
CHKK
^SCR("W4PRMHSV","P","NM",33)
CHKKM
^SCR("W4PRMHSV","P","NM",34)
TIP
^SCR("W4PRMHSV","P","NM",35)
ISRK
^SCR("W4PRMHSV","P","NM",40)
ISR
^SCR("W4PRMHSV","P","NM",45)
VISAK
^SCR("W4PRMHSV","P","NM",50)
VISA
^SCR("W4PRMHSV","P","NM",55)
DINERSK
^SCR("W4PRMHSV","P","NM",60)
DINERS
^SCR("W4PRMHSV","P","NM",65)
AMEXPK
^SCR("W4PRMHSV","P","NM",70)
AMEXP
^SCR("W4PRMHSV","P","NM",71)
JCBK
^SCR("W4PRMHSV","P","NM",72)
JCB
^SCR("W4PRMHSV","P","NM",73)
ALPHAK
^SCR("W4PRMHSV","P","NM",74)
ALPHA
^SCR("W4PRMHSV","P","NM",75)
HFK
^SCR("W4PRMHSV","P","NM",78)
BANK
^SCR("W4PRMHSV","P","NM",95)
FORMAT
^SCR("W4PRMHSV","P","RB",1)
5,9,25,71
^SCR("W4PRMHTN")
H
^SCR("W4PRMHTN",1)
                           # zayaygl zerepz ibeq #                             
^SCR("W4PRMHTN",2)
                                                            1]                
^SCR("W4PRMHTN",3)
                   { 05}:           dlaw/qn 'aygl drepz beq                    
^SCR("W4PRMHTN",4)
                   { 10}:       gewll qn zipeaygl drepz beq                    
^SCR("W4PRMHTN",5)
                   { 12}: gewll iekif qn zipeaygl drepz beq                    
^SCR("W4PRMHTN",6)
                   { 15}:         gewln sqk zlawl drepz beq                    
^SCR("W4PRMHTN",7)
                   { 20}:        wtqn qn zipeaygl drepz beq                    
^SCR("W4PRMHTN",8)
                   { 22}:nrn `ll wtqn qn zipeaygl drepz beq                    
^SCR("W4PRMHTN",9)
                   { 25}:             wtql melyzl drepz beq                    
^SCR("W4PRMHTN",10)
                   { 30}:            onefn zcwtdl drepz beq                    
^SCR("W4PRMHTN",11)
                   { 32}:            mitih zcwtdl drepz beq                    
^SCR("W4PRMHTN",12)
                   { 35}:              wiy zcwtdl drepz beq                    
^SCR("W4PRMHTN",13)
                   { 40}:     ipci hxk`xyi zcwtdl drepz beq                    
^SCR("W4PRMHTN",14)
                   { 45}:     ipci    dfie zcwtdl drepz beq                    
^SCR("W4PRMHTN",15)
                   { 50}:     ipci  qxpiic zcwtdl drepz beq                    
^SCR("W4PRMHTN",16)
                   { 55}:     ipci  qw`.n` zcwtdl drepz beq                    
^SCR("W4PRMHTN",17)
                   { 58}:     ipci   ine`l zcwtdl drepz beq                    
^SCR("W4PRMHTN",18)
                   { 60}:    (`ay) hxk`xyi zcwtdl drepz beq                    
^SCR("W4PRMHTN",19)
                   { 65}:     (`ay)   dfie zcwtdl drepz beq                    
^SCR("W4PRMHTN",20)
                   { 70}:     (`ay) qxpiic zcwtdl drepz beq                    
^SCR("W4PRMHTN",21)
                   { 75}:     (`ay) qw`.n` zcwtdl drepz beq                    
^SCR("W4PRMHTN",22)
                   { 78}:     (`ay)  ine`l zcwtdl drepz beq                    
^SCR("W4PRMHTN",23)
                [1                                                             
^SCR("W4PRMHTN",24)
                                                                               
^SCR("W4PRMHTN","A",1)
š�™�™‡Œš…’…�š‰‚…‘
^SCR("W4PRMHTN","A",2)

^SCR("W4PRMHTN","A",3)
:„Œ�—/‘Ž'�™‡Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",4)
:‡…—ŒŒ‘Žš‰�…�™‡Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",5)
:‡…—ŒŒ‰…‹‰†‘Žš‰�…�™‡Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",6)
:‡…—ŒŽ“‘‹šŒ�—Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",7)
:—”‘Ž‘Žš‰�…�™‡Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",8)
:Ž’Ž€ŒŒ—”‘Ž‘Žš‰�…�™‡Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",9)
:—”‘Œ�…Œ™šŒ„’…�š‚…‘
^SCR("W4PRMHTN","A",10)
:�Ž…†Žšƒ—”„Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",11)
:�‰”‰ˆšƒ—”„Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",12)
:—‰™šƒ—”„Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",13)
:‰�ƒ‰ˆ˜‹€˜™‰šƒ—”„Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",14)
:‰�ƒ‰„†‰…šƒ—”„Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",15)
:‰�ƒ‰‘˜�‰‰ƒšƒ—”„Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",16)
:‰�ƒ‰‘—€.Ž€šƒ—”„Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",17)
:‰�ƒ‰‰Ž…€Œšƒ—”„Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",18)
:(€�™)ˆ˜‹€˜™‰šƒ—”„Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",19)
:(€�™)„†‰…šƒ—”„Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",20)
:(€�™)‘˜�‰‰ƒšƒ—”„Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",21)
:(€�™)‘—€.Ž€šƒ—”„Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",22)
:(€�™)‰Ž…€Œšƒ—”„Œ„’…�š‚…‘
^SCR("W4PRMHTN","A",23)

^SCR("W4PRMHTN","A",24)

^SCR("W4PRMHTN","AV",1)
,cacajk,ugub,hdux
^SCR("W4PRMHTN","AV",2)

^SCR("W4PRMHTN","AV",3)
:vkceqxnwcajkvgub,dux
^SCR("W4PRMHTN","AV",4)
:juekkxn,hbucajkvgub,dux
^SCR("W4PRMHTN","AV",5)
:juekkhufhzxn,hbucajkvgub,dux
^SCR("W4PRMHTN","AV",6)
:juekn;xf,kcekvgub,dux
^SCR("W4PRMHTN","AV",7)
:epxnxn,hbucajkvgub,dux
^SCR("W4PRMHTN","AV",8)
:ngntkkepxnxn,hbucajkvgub,dux
^SCR("W4PRMHTN","AV",9)
:epxkouka,kvgub,dux
^SCR("W4PRMHTN","AV",10)
:inuzn,sepvkvgub,dux
^SCR("W4PRMHTN","AV",11)
:ohphy,sepvkvgub,dux
^SCR("W4PRMHTN","AV",12)
:eha,sepvkvgub,dux
^SCR("W4PRMHTN","AV",13)
:hbshyrftrah,sepvkvgub,dux
^SCR("W4PRMHTN","AV",14)
:hbshvzhu,sepvkvgub,dux
^SCR("W4PRMHTN","AV",15)
:hbshxrbhhs,sepvkvgub,dux
^SCR("W4PRMHTN","AV",16)
:hbshxet/nt,sepvkvgub,dux
^SCR("W4PRMHTN","AV",17)
:hbshhnutk,sepvkvgub,dux
^SCR("W4PRMHTN","AV",18)
:(tca)yrftrah,sepvkvgub,dux
^SCR("W4PRMHTN","AV",19)
:(tca)vzhu,sepvkvgub,dux
^SCR("W4PRMHTN","AV",20)
:(tca)xrbhhs,sepvkvgub,dux
^SCR("W4PRMHTN","AV",21)
:(tca)xet/nt,sepvkvgub,dux
^SCR("W4PRMHTN","AV",22)
:(tca)hnutk,sepvkvgub,dux
^SCR("W4PRMHTN","AV",23)

^SCR("W4PRMHTN","AV",24)

^SCR("W4PRMHTN","NAME")

^SCR("W4PRMHTN","P",5,"CRD")
3,24,H,3
^SCR("W4PRMHTN","P",5,"HELP")

^SCR("W4PRMHTN","P",5,"LMAX")
4
^SCR("W4PRMHTN","P",5,"MUMPS1")

^SCR("W4PRMHTN","P",5,"MUMPS2")

^SCR("W4PRMHTN","P",5,"TYP")
H
^SCR("W4PRMHTN","P",10,"CRD")
4,24,H,3
^SCR("W4PRMHTN","P",10,"HELP")

^SCR("W4PRMHTN","P",10,"LMAX")
4
^SCR("W4PRMHTN","P",10,"MUMPS1")

^SCR("W4PRMHTN","P",10,"MUMPS2")

^SCR("W4PRMHTN","P",10,"TYP")
H
^SCR("W4PRMHTN","P",12,"CRD")
5,24,H,3,0
^SCR("W4PRMHTN","P",12,"HELP")

^SCR("W4PRMHTN","P",12,"LMAX")
4
^SCR("W4PRMHTN","P",12,"MUMPS1")

^SCR("W4PRMHTN","P",12,"MUMPS2")

^SCR("W4PRMHTN","P",12,"TYP")
H
^SCR("W4PRMHTN","P",15,"CRD")
6,24,H,3
^SCR("W4PRMHTN","P",15,"HELP")

^SCR("W4PRMHTN","P",15,"LMAX")
4
^SCR("W4PRMHTN","P",15,"MUMPS1")

^SCR("W4PRMHTN","P",15,"MUMPS2")

^SCR("W4PRMHTN","P",15,"TYP")
H
^SCR("W4PRMHTN","P",20,"CRD")
7,24,H,3
^SCR("W4PRMHTN","P",20,"HELP")

^SCR("W4PRMHTN","P",20,"LMAX")
4
^SCR("W4PRMHTN","P",20,"MUMPS1")

^SCR("W4PRMHTN","P",20,"MUMPS2")

^SCR("W4PRMHTN","P",20,"TYP")
H
^SCR("W4PRMHTN","P",22,"CRD")
8,24,H,3
^SCR("W4PRMHTN","P",22,"HELP")

^SCR("W4PRMHTN","P",22,"LMAX")
4
^SCR("W4PRMHTN","P",22,"MUMPS1")

^SCR("W4PRMHTN","P",22,"MUMPS2")

^SCR("W4PRMHTN","P",22,"TYP")
H
^SCR("W4PRMHTN","P",25,"CRD")
9,24,H,3
^SCR("W4PRMHTN","P",25,"HELP")

^SCR("W4PRMHTN","P",25,"LMAX")
4
^SCR("W4PRMHTN","P",25,"MUMPS1")

^SCR("W4PRMHTN","P",25,"MUMPS2")

^SCR("W4PRMHTN","P",25,"TYP")
H
^SCR("W4PRMHTN","P",30,"CRD")
10,24,H,3
^SCR("W4PRMHTN","P",30,"HELP")

^SCR("W4PRMHTN","P",30,"LMAX")
4
^SCR("W4PRMHTN","P",30,"MUMPS1")

^SCR("W4PRMHTN","P",30,"MUMPS2")

^SCR("W4PRMHTN","P",30,"TYP")
H
^SCR("W4PRMHTN","P",32,"CRD")
11,24,H,3
^SCR("W4PRMHTN","P",32,"HELP")

^SCR("W4PRMHTN","P",32,"LMAX")
4
^SCR("W4PRMHTN","P",32,"MUMPS1")

^SCR("W4PRMHTN","P",32,"MUMPS2")

^SCR("W4PRMHTN","P",32,"TYP")
H
^SCR("W4PRMHTN","P",35,"CRD")
12,24,H,3
^SCR("W4PRMHTN","P",35,"HELP")

^SCR("W4PRMHTN","P",35,"LMAX")
4
^SCR("W4PRMHTN","P",35,"MUMPS1")

^SCR("W4PRMHTN","P",35,"MUMPS2")

^SCR("W4PRMHTN","P",35,"TYP")
H
^SCR("W4PRMHTN","P",40,"CRD")
13,24,H,3
^SCR("W4PRMHTN","P",40,"HELP")

^SCR("W4PRMHTN","P",40,"LMAX")
4
^SCR("W4PRMHTN","P",40,"MUMPS1")

^SCR("W4PRMHTN","P",40,"MUMPS2")

^SCR("W4PRMHTN","P",40,"TYP")
H
^SCR("W4PRMHTN","P",45,"CRD")
14,24,H,3
^SCR("W4PRMHTN","P",45,"HELP")

^SCR("W4PRMHTN","P",45,"LMAX")
4
^SCR("W4PRMHTN","P",45,"MUMPS1")

^SCR("W4PRMHTN","P",45,"MUMPS2")

^SCR("W4PRMHTN","P",45,"TYP")
H
^SCR("W4PRMHTN","P",50,"CRD")
15,24,H,3
^SCR("W4PRMHTN","P",50,"HELP")

^SCR("W4PRMHTN","P",50,"LMAX")
4
^SCR("W4PRMHTN","P",50,"MUMPS1")

^SCR("W4PRMHTN","P",50,"MUMPS2")

^SCR("W4PRMHTN","P",50,"TYP")
H
^SCR("W4PRMHTN","P",55,"CRD")
16,24,H,3
^SCR("W4PRMHTN","P",55,"HELP")

^SCR("W4PRMHTN","P",55,"LMAX")
4
^SCR("W4PRMHTN","P",55,"MUMPS1")

^SCR("W4PRMHTN","P",55,"MUMPS2")

^SCR("W4PRMHTN","P",55,"TYP")
H
^SCR("W4PRMHTN","P",58,"CRD")
17,24,H,3
^SCR("W4PRMHTN","P",58,"HELP")

^SCR("W4PRMHTN","P",58,"LMAX")
4
^SCR("W4PRMHTN","P",58,"MUMPS1")

^SCR("W4PRMHTN","P",58,"MUMPS2")

^SCR("W4PRMHTN","P",58,"TYP")
H
^SCR("W4PRMHTN","P",60,"CRD")
18,24,H,3
^SCR("W4PRMHTN","P",60,"HELP")

^SCR("W4PRMHTN","P",60,"LMAX")
4
^SCR("W4PRMHTN","P",60,"MUMPS1")

^SCR("W4PRMHTN","P",60,"MUMPS2")

^SCR("W4PRMHTN","P",60,"TYP")
H
^SCR("W4PRMHTN","P",65,"CRD")
19,24,H,3
^SCR("W4PRMHTN","P",65,"HELP")

^SCR("W4PRMHTN","P",65,"LMAX")
4
^SCR("W4PRMHTN","P",65,"MUMPS1")

^SCR("W4PRMHTN","P",65,"MUMPS2")

^SCR("W4PRMHTN","P",65,"TYP")
H
^SCR("W4PRMHTN","P",70,"CRD")
20,24,H,3
^SCR("W4PRMHTN","P",70,"HELP")

^SCR("W4PRMHTN","P",70,"LMAX")
4
^SCR("W4PRMHTN","P",70,"MUMPS1")

^SCR("W4PRMHTN","P",70,"MUMPS2")

^SCR("W4PRMHTN","P",70,"TYP")
H
^SCR("W4PRMHTN","P",75,"CRD")
21,24,H,3
^SCR("W4PRMHTN","P",75,"HELP")

^SCR("W4PRMHTN","P",75,"LMAX")
4
^SCR("W4PRMHTN","P",75,"MUMPS1")

^SCR("W4PRMHTN","P",75,"MUMPS2")

^SCR("W4PRMHTN","P",75,"TYP")
H
^SCR("W4PRMHTN","P",78,"CRD")
22,24,H,3
^SCR("W4PRMHTN","P",78,"HELP")

^SCR("W4PRMHTN","P",78,"LMAX")
4
^SCR("W4PRMHTN","P",78,"MUMPS1")

^SCR("W4PRMHTN","P",78,"MUMPS2")

^SCR("W4PRMHTN","P",78,"TYP")
H
^SCR("W4PRMHTN","P","NAME","CB")
15
^SCR("W4PRMHTN","P","NAME","HFAEA")
75
^SCR("W4PRMHTN","P","NAME","HFAEJ")
55
^SCR("W4PRMHTN","P","NAME","HFALA")
78
^SCR("W4PRMHTN","P","NAME","HFALJ")
58
^SCR("W4PRMHTN","P","NAME","HFCH")
35
^SCR("W4PRMHTN","P","NAME","HFDA")
70
^SCR("W4PRMHTN","P","NAME","HFDJ")
50
^SCR("W4PRMHTN","P","NAME","HFIA")
60
^SCR("W4PRMHTN","P","NAME","HFIJ")
40
^SCR("W4PRMHTN","P","NAME","HFMZ")
30
^SCR("W4PRMHTN","P","NAME","HFTP")
32
^SCR("W4PRMHTN","P","NAME","HFVA")
65
^SCR("W4PRMHTN","P","NAME","HFVJ")
45
^SCR("W4PRMHTN","P","NAME","HMK")
5
^SCR("W4PRMHTN","P","NAME","HML")
10
^SCR("W4PRMHTN","P","NAME","HMS")
20
^SCR("W4PRMHTN","P","NAME","HMSB")
22
^SCR("W4PRMHTN","P","NAME","HMZ")
12
^SCR("W4PRMHTN","P","NAME","TSH")
25
^SCR("W4PRMHTN","P","NM",5)
HMK
^SCR("W4PRMHTN","P","NM",10)
HML
^SCR("W4PRMHTN","P","NM",12)
HMZ
^SCR("W4PRMHTN","P","NM",15)
CB
^SCR("W4PRMHTN","P","NM",20)
HMS
^SCR("W4PRMHTN","P","NM",22)
HMSB
^SCR("W4PRMHTN","P","NM",25)
TSH
^SCR("W4PRMHTN","P","NM",30)
HFMZ
^SCR("W4PRMHTN","P","NM",32)
HFTP
^SCR("W4PRMHTN","P","NM",35)
HFCH
^SCR("W4PRMHTN","P","NM",40)
HFIJ
^SCR("W4PRMHTN","P","NM",45)
HFVJ
^SCR("W4PRMHTN","P","NM",50)
HFDJ
^SCR("W4PRMHTN","P","NM",55)
HFAEJ
^SCR("W4PRMHTN","P","NM",58)
HFALJ
^SCR("W4PRMHTN","P","NM",60)
HFIA
^SCR("W4PRMHTN","P","NM",65)
HFVA
^SCR("W4PRMHTN","P","NM",70)
HFDA
^SCR("W4PRMHTN","P","NM",75)
HFAEA
^SCR("W4PRMHTN","P","NM",78)
HFALA
^SCR("W4PRMHTN","P","RB",1)
3,17,24,62
^SCR("W4PRMHZG")
H
^SCR("W4PRMHZG",1)
                                   {05 } : cg` jqnd lr mihixte zeveaw bivdl m`d
^SCR("W4PRMHZG",2)
                   {08 } : mihixt zveaw ywn ly rava mihixt jqn ly rwx bivdl m`d
^SCR("W4PRMHZG",3)
                {10 } : ihnehe` mihixt zeveaw jqna zecenre zexey xtqn xegal m`d
^SCR("W4PRMHZG",4)
        {15 }: (9-9,8-8,7-7,6-6,5-5) ['he` `l m`] mihixt zeveaw jqna zecenr 'qn
^SCR("W4PRMHZG",5)
    {20 }: (8-8,7-7,6-6,5-5,4-4,3-3,2-2)['he` `l m`] mihixt veaw jqna zexey 'qn
^SCR("W4PRMHZG",6)
                                                                               
^SCR("W4PRMHZG",7)
                       {25 } : ihnehe` mihixt jqna zecenre zexey xtqn xegal m`d
^SCR("W4PRMHZG",8)
             {30 }:(9-9,8-8,7-7,6-6,5-5) [ihnehe` `l m`] mihixt jqna zecenr 'qn
^SCR("W4PRMHZG",9)
   {35 }:(8-8,7-7,6-6,5-5,4-4,3-3) [ihnehe` `l m`] mihixt mihixt jqna zexey 'qn
^SCR("W4PRMHZG",10)
  {36 }:(18-18 ,16-16 ,14-14 ,12-12 ,11-11 ,xegal - 0) mihixt zeveawl hpet lceb
^SCR("W4PRMHZG",11)
        {37 }:(18-18 ,16-16 ,14-14 ,12-12 ,11-11 ,xegal - 0)  mihixtl hpet lceb
^SCR("W4PRMHZG",12)
                {38 } : ihnehe` mihixt zetqez jqna zecenre zexey xtqn xegal m`d
^SCR("W4PRMHZG",13)
                                    {39 } : mihixt zeveaw jqna zewlgn bivdl m`d
^SCR("W4PRMHZG",14)
                                    {41 } : mihixt zeveaw jqna zepenz bivdl m`d
^SCR("W4PRMHZG",15)
                                             {47 } : ywnd lr hixt cew bivdl m`d
^SCR("W4PRMHZG",16)
                              {40 } : lcgn zxixak dpnfda zetqez hexit bivdl m`d
^SCR("W4PRMHZG",17)
                              {43 } :                  dpnfda milehia bivdl m`d
^SCR("W4PRMHZG",18)
                                           {42 } : mihixt jqna mixign bivdl m`d
^SCR("W4PRMHZG",19)
                              {44 } : mihixt zlaha xcbend rava zetqez bivdl m`d
^SCR("W4PRMHZG",20)
               {07 }: miptlh/ mixvln zniyx bivdl mewna otlh/xvln xtqn le`yl m`d
^SCR("W4PRMHZG",21)
                                           {45 } : ( `l - 0 ,ok - 1 ) mle` xeiv
^SCR("W4PRMHZG",22)
    {50 }: (1 - zepgleyd lk ,0 - miqetz zepgley ) mle` ly zi`lah dxeva bivdl dn
^SCR("W4PRMHZG",23)
                            {52 } : xvln my qetz ogley zgz mle` xeiva bivdl m`d
^SCR("W4PRMHZG",24)
                           {53 }: ihatl` zeize` xcqa zil`ehxiee zclwn bivdl m`d
^SCR("W4PRMHZG",25)
                   {55 }: lcgn zxixak zilbp`a zexrdl zil`ehxiee zclwn bivdl m`d
^SCR("W4PRMHZG",26)
                     {60 }: dpnfd zbvda jqn zizgza mihixtl zegpd k"dq bivdl m`d
^SCR("W4PRMHZG",27)
      {65 }:(2-wiy ixg`,1 - `"k ixg` ,0-dligza ): onefna melyz bivdl mewn dfi`a
^SCR("W4PRMHZG",28)
                   {70 }: ixeg` cxyn ly hixtz zxzeka 'gewl qihxk' ywn bivdl m`d
^SCR("W4PRMHZG",29)
                        {75 }: zxvewn dxeva dpnfd zbvda zeivte` hixtz bivdl m`d
^SCR("W4PRMHZG",30)
                        {78 }:                 wiqt mr zeg"eca minekq bivdl m`d
^SCR("W4PRMHZG",31)
                        {80 }:           dniyxdn xegal mewna mikix`z cilwdl m`d
^SCR("W4PRMHZG",32)
                        {82 }:         i`xy` qihxk melyz ihxta zedf 'z bvdl m`d
^SCR("W4PRMHZG",33)
                        {83 }:          zepnfd ilawn jqna zegkep oery bivdl m`d
^SCR("W4PRMHZG",34)
  {85 } : (dpkez ly zclwn - 1 ,hla`h ly zclwn - 0) hla`ha zil`ehxiee zclwn zbvd
^SCR("W4PRMHZG",35)
    {86 } : (16 - 16 , 14 - 14 , 12 - 12 ,ihnheh` - 0 ) : mixvln jqna hpet lceb
^SCR("W4PRMHZG",36)
                          {87 } : dtewa "gewl xe`z"e "gewl 'qn" miywn bivdl m`d
^SCR("W4PRMHZG",37)
                     {88 } : zexidn zeveawk dlrnl zeveaw-zz bivdl zexyt` yi m`d
^SCR("W4PRMHZG",38)
                                                                               
^SCR("W4PRMHZG","AV",1)
:ãçàêñîäìòíéèéøôåúåöåá÷âéöäìíàä
^SCR("W4PRMHZG","AV",2)
:íéèéøôúöåá÷ù÷îìùòáöáíéèéøôêñîìùò÷øâéöäìíàä
^SCR("W4PRMHZG","AV",3)
:éèîåèåàíéèéøôúåöåá÷êñîáúåãåîòåúåøåùøôñîøåçáìíàä
^SCR("W4PRMHZG","AV",4)
:(9-9,8-8,7-7,6-6,5-5)åààìíéèéøôúåöåá÷êñîáúåãåîò'ñî
^SCR("W4PRMHZG","AV",5)
:(8-8,7-7,6-6,5-5,4-4,3-3,2-2)åààìíéèéøôöåá÷êñîáúåøåù'ñî
^SCR("W4PRMHZG","AV",6)

^SCR("W4PRMHZG","AV",7)
:éèîåèåàíéèéøôêñîáúåãåîòåúåøåùøôñîøåçáìíàä
^SCR("W4PRMHZG","AV",8)
:(9-9,8-8,7-7,6-6,5-5)îåèåààìíéèéøôêñîáúåãåîò'ñî
^SCR("W4PRMHZG","AV",9)
:(8-8,7-7,6-6,5-5,4-4,3-3)îåèåààìíéèéøôíéèéøôêñîáúåøåù'ñî
^SCR("W4PRMHZG","AV",10)
:(18-18,16-16,14-14,12-12,11-11,øåçáì-0)íéèéøôúåöåá÷ìèðåôìãåâ
^SCR("W4PRMHZG","AV",11)
:(18-18,16-16,14-14,12-12,11-11,øåçáì-0)íéèéøôìèðåôìãåâ
^SCR("W4PRMHZG","AV",12)
:éèîåèåàíéèéøôúåôñåúêñîáúåãåîòåúåøåùøôñîøåçáìíàä
^SCR("W4PRMHZG","AV",13)
:íéèéøôúåöåá÷êñîáúå÷ìçîâéöäìíàä
^SCR("W4PRMHZG","AV",14)
:íéèéøôúåöåá÷êñîáúåðåîúâéöäìíàä
^SCR("W4PRMHZG","AV",15)
:ù÷îäìòèéøôãå÷âéöäìíàä
^SCR("W4PRMHZG","AV",16)
:ìãçîúøéøáëäðîæäáúåôñåúèåøéôâéöäìíàä
^SCR("W4PRMHZG","AV",17)
:äðîæäáíéìåèéáâéöäìíàä
^SCR("W4PRMHZG","AV",18)
:íéèéøôêñîáíéøéçîâéöäìíàä
^SCR("W4PRMHZG","AV",19)
:íéèéøôúìáèáøãâåîäòáöáúåôñåúâéöäìíàä
^SCR("W4PRMHZG","AV",20)
:íéðôìè/íéøöìîúîéùøâéöäìíå÷îáïôìè/øöìîøôñîìåàùìíàä
^SCR("W4PRMHZG","AV",21)
:(àì-0,ïë-1)íìåàøåéö
^SCR("W4PRMHZG","AV",22)
:(1-úåðçìåùäìë,0-íéñåôúúåðçìåù)íìåàìùúéàìáèäøåöáâéöäìäî
^SCR("W4PRMHZG","AV",23)
:øöìîíùñåôúïçìåùúçúíìåàøåéöáâéöäìíàä
^SCR("W4PRMHZG","AV",24)
:éèáôìàúåéúåàøãñáúéìàåèøéååúãì÷îâéöäìíàä
^SCR("W4PRMHZG","AV",25)
:ìãçîúøéøáëúéìâðàáúåøòäìúéìàåèøéååúãì÷îâéöäìíàä
^SCR("W4PRMHZG","AV",26)
:äðîæäúâöäáêñîúéúçúáíéèéøôìúåçðäë"äñâéöäìíàä
^SCR("W4PRMHZG","AV",27)
:(2-÷éùéøçà,1-à"ëéøçà,0-äìéçúá):ïîåæîáíåìùúâéöäìíå÷îäæéàá
^SCR("W4PRMHZG","AV",28)
:éøåçàãøùîìùèéøôúúøúåëá'çå÷ìñéèøë'ù÷îâéöäìíàä
^SCR("W4PRMHZG","AV",29)
:úøöå÷îäøåöáäðîæäúâöäáúåéöôåàèéøôúâéöäìíàä
^SCR("W4PRMHZG","AV",30)
:÷éñôíòúåç"åãáíéîåëñâéöäìíàä
^SCR("W4PRMHZG","AV",31)
:äîéùøäîøåçáìíå÷îáíéëéøàúãéì÷äìíàä
^SCR("W4PRMHZG","AV",32)
:éàøùàñéèøëíåìùúéèøôáúåäæ'úâöäìíàä
^SCR("W4PRMHZG","AV",33)
:úåðîæäéìá÷îêñîáúåçëåðïåòùâéöäìíàä
^SCR("W4PRMHZG","AV",34)
:(äðëåúìùúãì÷î-1,èìáàèìùúãì÷î-0)èìáàèáúéìàåèøéååúãì÷îúâöä
^SCR("W4PRMHZG","AV",35)
:(16-16,14-14,12-12,éèîèåèà-0):íéøöìîêñîáèðåôìãåâ
^SCR("W4PRMHZG","AV",36)
:äôå÷á"çå÷ìøåàú"å"çå÷ì'ñî"íéù÷îâéöäìíàä
^SCR("W4PRMHZG","AV",37)
:úåøéäîúåöåá÷ëäìòîìúåöåá÷-úúâéöäìúåøùôàùéíàä
^SCR("W4PRMHZG","AV",38)

^SCR("W4PRMHZG","NAME")
dbvdl mixhnxt
^SCR("W4PRMHZG","P",5,"CRD")
1,35,B,1,0
^SCR("W4PRMHZG","P",5,"HELP")

^SCR("W4PRMHZG","P",5,"LMAX")
4
^SCR("W4PRMHZG","P",5,"MUMPS1")

^SCR("W4PRMHZG","P",5,"MUMPS2")

^SCR("W4PRMHZG","P",5,"TYP")
B
^SCR("W4PRMHZG","P",7,"CRD")
20,15,B,1,0
^SCR("W4PRMHZG","P",7,"HELP")

^SCR("W4PRMHZG","P",7,"LMAX")
4
^SCR("W4PRMHZG","P",7,"MUMPS1")

^SCR("W4PRMHZG","P",7,"MUMPS2")

^SCR("W4PRMHZG","P",7,"TYP")
B
^SCR("W4PRMHZG","P",8,"CRD")
2,19,B,1,0
^SCR("W4PRMHZG","P",8,"HELP")

^SCR("W4PRMHZG","P",8,"LMAX")
4
^SCR("W4PRMHZG","P",8,"MUMPS1")

^SCR("W4PRMHZG","P",8,"MUMPS2")

^SCR("W4PRMHZG","P",8,"TYP")
B
^SCR("W4PRMHZG","P",10,"CRD")
3,16,B,1,0
^SCR("W4PRMHZG","P",10,"HELP")

^SCR("W4PRMHZG","P",10,"LMAX")
4
^SCR("W4PRMHZG","P",10,"MUMPS1")

^SCR("W4PRMHZG","P",10,"MUMPS2")

^SCR("W4PRMHZG","P",10,"TYP")
B
^SCR("W4PRMHZG","P",15,"CRD")
4,8,N,4,0
^SCR("W4PRMHZG","P",15,"HELP")

^SCR("W4PRMHZG","P",15,"LMAX")
4
^SCR("W4PRMHZG","P",15,"MUMPS1")

^SCR("W4PRMHZG","P",15,"MUMPS2")

^SCR("W4PRMHZG","P",15,"TYP")
N
^SCR("W4PRMHZG","P",20,"CRD")
5,4,N,2,0
^SCR("W4PRMHZG","P",20,"HELP")

^SCR("W4PRMHZG","P",20,"LMAX")
4
^SCR("W4PRMHZG","P",20,"MUMPS1")

^SCR("W4PRMHZG","P",20,"MUMPS2")

^SCR("W4PRMHZG","P",20,"TYP")
N
^SCR("W4PRMHZG","P",25,"CRD")
7,23,B,1,0
^SCR("W4PRMHZG","P",25,"HELP")

^SCR("W4PRMHZG","P",25,"LMAX")
4
^SCR("W4PRMHZG","P",25,"MUMPS1")

^SCR("W4PRMHZG","P",25,"MUMPS2")

^SCR("W4PRMHZG","P",25,"TYP")
B
^SCR("W4PRMHZG","P",30,"CRD")
8,13,N,2,0
^SCR("W4PRMHZG","P",30,"HELP")

^SCR("W4PRMHZG","P",30,"LMAX")
4
^SCR("W4PRMHZG","P",30,"MUMPS1")

^SCR("W4PRMHZG","P",30,"MUMPS2")

^SCR("W4PRMHZG","P",30,"TYP")
N
^SCR("W4PRMHZG","P",35,"CRD")
9,3,N,2,0
^SCR("W4PRMHZG","P",35,"HELP")

^SCR("W4PRMHZG","P",35,"LMAX")
4
^SCR("W4PRMHZG","P",35,"MUMPS1")

^SCR("W4PRMHZG","P",35,"MUMPS2")

^SCR("W4PRMHZG","P",35,"TYP")
N
^SCR("W4PRMHZG","P",36,"CRD")
10,2,N,2,0
^SCR("W4PRMHZG","P",36,"HELP")

^SCR("W4PRMHZG","P",36,"LMAX")
4
^SCR("W4PRMHZG","P",36,"MUMPS1")

^SCR("W4PRMHZG","P",36,"MUMPS2")

^SCR("W4PRMHZG","P",36,"TYP")
N
^SCR("W4PRMHZG","P",37,"CRD")
11,8,N,2,0
^SCR("W4PRMHZG","P",37,"HELP")

^SCR("W4PRMHZG","P",37,"LMAX")
4
^SCR("W4PRMHZG","P",37,"MUMPS1")

^SCR("W4PRMHZG","P",37,"MUMPS2")

^SCR("W4PRMHZG","P",37,"TYP")
N
^SCR("W4PRMHZG","P",38,"CRD")
12,16,B,1,0
^SCR("W4PRMHZG","P",38,"HELP")

^SCR("W4PRMHZG","P",38,"LMAX")
4
^SCR("W4PRMHZG","P",38,"MUMPS1")

^SCR("W4PRMHZG","P",38,"MUMPS2")

^SCR("W4PRMHZG","P",38,"TYP")
B
^SCR("W4PRMHZG","P",39,"CRD")
13,36,B,1,0
^SCR("W4PRMHZG","P",39,"HELP")

^SCR("W4PRMHZG","P",39,"LMAX")
4
^SCR("W4PRMHZG","P",39,"MUMPS1")

^SCR("W4PRMHZG","P",39,"MUMPS2")

^SCR("W4PRMHZG","P",39,"TYP")
B
^SCR("W4PRMHZG","P",40,"CRD")
16,30,B,1,0
^SCR("W4PRMHZG","P",40,"HELP")

^SCR("W4PRMHZG","P",40,"LMAX")
4
^SCR("W4PRMHZG","P",40,"MUMPS1")

^SCR("W4PRMHZG","P",40,"MUMPS2")

^SCR("W4PRMHZG","P",40,"TYP")
B
^SCR("W4PRMHZG","P",41,"CRD")
14,36,B,1,0
^SCR("W4PRMHZG","P",41,"HELP")

^SCR("W4PRMHZG","P",41,"LMAX")
4
^SCR("W4PRMHZG","P",41,"MUMPS1")

^SCR("W4PRMHZG","P",41,"MUMPS2")

^SCR("W4PRMHZG","P",41,"TYP")
B
^SCR("W4PRMHZG","P",42,"CRD")
18,43,B,1,0
^SCR("W4PRMHZG","P",42,"HELP")

^SCR("W4PRMHZG","P",42,"LMAX")
4
^SCR("W4PRMHZG","P",42,"MUMPS1")

^SCR("W4PRMHZG","P",42,"MUMPS2")

^SCR("W4PRMHZG","P",42,"TYP")
B
^SCR("W4PRMHZG","P",43,"CRD")
17,30,B,1,0
^SCR("W4PRMHZG","P",43,"HELP")

^SCR("W4PRMHZG","P",43,"LMAX")
4
^SCR("W4PRMHZG","P",43,"MUMPS1")

^SCR("W4PRMHZG","P",43,"MUMPS2")

^SCR("W4PRMHZG","P",43,"TYP")
B
^SCR("W4PRMHZG","P",44,"CRD")
19,30,B,1,0
^SCR("W4PRMHZG","P",44,"HELP")

^SCR("W4PRMHZG","P",44,"LMAX")
4
^SCR("W4PRMHZG","P",44,"MUMPS1")

^SCR("W4PRMHZG","P",44,"MUMPS2")

^SCR("W4PRMHZG","P",44,"TYP")
B
^SCR("W4PRMHZG","P",45,"CRD")
21,43,B,1,0
^SCR("W4PRMHZG","P",45,"HELP")

^SCR("W4PRMHZG","P",45,"LMAX")
4
^SCR("W4PRMHZG","P",45,"MUMPS1")

^SCR("W4PRMHZG","P",45,"MUMPS2")

^SCR("W4PRMHZG","P",45,"TYP")
B
^SCR("W4PRMHZG","P",47,"CRD")
15,45,B,1,0
^SCR("W4PRMHZG","P",47,"HELP")

^SCR("W4PRMHZG","P",47,"LMAX")
4
^SCR("W4PRMHZG","P",47,"MUMPS1")

^SCR("W4PRMHZG","P",47,"MUMPS2")

^SCR("W4PRMHZG","P",47,"TYP")
B
^SCR("W4PRMHZG","P",50,"CRD")
22,4,N,1,0
^SCR("W4PRMHZG","P",50,"HELP")

^SCR("W4PRMHZG","P",50,"LMAX")
4
^SCR("W4PRMHZG","P",50,"MUMPS1")

^SCR("W4PRMHZG","P",50,"MUMPS2")

^SCR("W4PRMHZG","P",50,"TYP")
N
^SCR("W4PRMHZG","P",52,"CRD")
23,28,B,1,0
^SCR("W4PRMHZG","P",52,"HELP")

^SCR("W4PRMHZG","P",52,"LMAX")
4
^SCR("W4PRMHZG","P",52,"MUMPS1")

^SCR("W4PRMHZG","P",52,"MUMPS2")

^SCR("W4PRMHZG","P",52,"TYP")
B
^SCR("W4PRMHZG","P",53,"CRD")
24,27,B,1,0
^SCR("W4PRMHZG","P",53,"HELP")

^SCR("W4PRMHZG","P",53,"LMAX")
4
^SCR("W4PRMHZG","P",53,"MUMPS1")

^SCR("W4PRMHZG","P",53,"MUMPS2")

^SCR("W4PRMHZG","P",53,"TYP")
B
^SCR("W4PRMHZG","P",55,"CRD")
25,19,B,1,0
^SCR("W4PRMHZG","P",55,"HELP")

^SCR("W4PRMHZG","P",55,"LMAX")
4
^SCR("W4PRMHZG","P",55,"MUMPS1")

^SCR("W4PRMHZG","P",55,"MUMPS2")

^SCR("W4PRMHZG","P",55,"TYP")
B
^SCR("W4PRMHZG","P",60,"CRD")
26,21,B,1,0
^SCR("W4PRMHZG","P",60,"HELP")

^SCR("W4PRMHZG","P",60,"LMAX")
4
^SCR("W4PRMHZG","P",60,"MUMPS1")

^SCR("W4PRMHZG","P",60,"MUMPS2")

^SCR("W4PRMHZG","P",60,"TYP")
B
^SCR("W4PRMHZG","P",65,"CRD")
27,6,N,1,0
^SCR("W4PRMHZG","P",65,"HELP")

^SCR("W4PRMHZG","P",65,"LMAX")
4
^SCR("W4PRMHZG","P",65,"MUMPS1")

^SCR("W4PRMHZG","P",65,"MUMPS2")

^SCR("W4PRMHZG","P",65,"TYP")
N
^SCR("W4PRMHZG","P",70,"CRD")
28,19,B,1,0
^SCR("W4PRMHZG","P",70,"HELP")

^SCR("W4PRMHZG","P",70,"LMAX")
4
^SCR("W4PRMHZG","P",70,"MUMPS1")

^SCR("W4PRMHZG","P",70,"MUMPS2")

^SCR("W4PRMHZG","P",70,"TYP")
B
^SCR("W4PRMHZG","P",75,"CRD")
29,24,B,1,0
^SCR("W4PRMHZG","P",75,"HELP")

^SCR("W4PRMHZG","P",75,"LMAX")
4
^SCR("W4PRMHZG","P",75,"MUMPS1")

^SCR("W4PRMHZG","P",75,"MUMPS2")

^SCR("W4PRMHZG","P",75,"TYP")
B
^SCR("W4PRMHZG","P",78,"CRD")
30,24,B,1,0
^SCR("W4PRMHZG","P",78,"HELP")

^SCR("W4PRMHZG","P",78,"LMAX")
4
^SCR("W4PRMHZG","P",78,"MUMPS1")

^SCR("W4PRMHZG","P",78,"MUMPS2")

^SCR("W4PRMHZG","P",78,"TYP")
B
^SCR("W4PRMHZG","P",80,"CRD")
31,24,B,1,0
^SCR("W4PRMHZG","P",80,"HELP")

^SCR("W4PRMHZG","P",80,"LMAX")
4
^SCR("W4PRMHZG","P",80,"MUMPS1")

^SCR("W4PRMHZG","P",80,"MUMPS2")

^SCR("W4PRMHZG","P",80,"TYP")
B
^SCR("W4PRMHZG","P",82,"CRD")
32,24,B,1,0
^SCR("W4PRMHZG","P",82,"HELP")

^SCR("W4PRMHZG","P",82,"LMAX")
4
^SCR("W4PRMHZG","P",82,"MUMPS1")

^SCR("W4PRMHZG","P",82,"MUMPS2")

^SCR("W4PRMHZG","P",82,"TYP")
B
^SCR("W4PRMHZG","P",83,"CRD")
33,24,B,1,0
^SCR("W4PRMHZG","P",83,"HELP")

^SCR("W4PRMHZG","P",83,"LMAX")
4
^SCR("W4PRMHZG","P",83,"MUMPS1")

^SCR("W4PRMHZG","P",83,"MUMPS2")

^SCR("W4PRMHZG","P",83,"TYP")
B
^SCR("W4PRMHZG","P",85,"CRD")
34,2,N,1,0
^SCR("W4PRMHZG","P",85,"HELP")

^SCR("W4PRMHZG","P",85,"LMAX")
4
^SCR("W4PRMHZG","P",85,"MUMPS1")

^SCR("W4PRMHZG","P",85,"MUMPS2")

^SCR("W4PRMHZG","P",85,"TYP")
N
^SCR("W4PRMHZG","P",86,"CRD")
35,4,N,2,0
^SCR("W4PRMHZG","P",86,"HELP")

^SCR("W4PRMHZG","P",86,"LMAX")
4
^SCR("W4PRMHZG","P",86,"MUMPS1")

^SCR("W4PRMHZG","P",86,"MUMPS2")

^SCR("W4PRMHZG","P",86,"TYP")
N
^SCR("W4PRMHZG","P",87,"CRD")
36,26,B,1,0
^SCR("W4PRMHZG","P",87,"HELP")

^SCR("W4PRMHZG","P",87,"LMAX")
4
^SCR("W4PRMHZG","P",87,"MUMPS1")

^SCR("W4PRMHZG","P",87,"MUMPS2")

^SCR("W4PRMHZG","P",87,"TYP")
B
^SCR("W4PRMHZG","P",88,"CRD")
37,21,B,1,0
^SCR("W4PRMHZG","P",88,"HELP")

^SCR("W4PRMHZG","P",88,"LMAX")
4
^SCR("W4PRMHZG","P",88,"MUMPS1")

^SCR("W4PRMHZG","P",88,"MUMPS2")

^SCR("W4PRMHZG","P",88,"TYP")
B
^SCR("W4PRMHZG","P","NAME","ABC")
53
^SCR("W4PRMHZG","P","NAME","ABCENG")
55
^SCR("W4PRMHZG","P","NAME","ADDCOLOR")
44
^SCR("W4PRMHZG","P","NAME","ADDSCRAU")
38
^SCR("W4PRMHZG","P","NAME","ASKWTR")
7
^SCR("W4PRMHZG","P","NAME","AUTOGR")
10
^SCR("W4PRMHZG","P","NAME","AUTOIT")
25
^SCR("W4PRMHZG","P","NAME","BOCUST")
70
^SCR("W4PRMHZG","P","NAME","CLKVWMLZ")
83
^SCR("W4PRMHZG","P","NAME","COLXGR")
15
^SCR("W4PRMHZG","P","NAME","COLXIT")
30
^SCR("W4PRMHZG","P","NAME","COLYGR")
20
^SCR("W4PRMHZG","P","NAME","COLYIT")
35
^SCR("W4PRMHZG","P","NAME","CRCARD1")
65
^SCR("W4PRMHZG","P","NAME","DEP2FAST")
88
^SCR("W4PRMHZG","P","NAME","FSZGR")
36
^SCR("W4PRMHZG","P","NAME","FSZIT")
37
^SCR("W4PRMHZG","P","NAME","GRITVW")
5
^SCR("W4PRMHZG","P","NAME","GRPIC")
41
^SCR("W4PRMHZG","P","NAME","HZGDEP")
39
^SCR("W4PRMHZG","P","NAME","HZGPRC")
42
^SCR("W4PRMHZG","P","NAME","HZGSHALL")
50
^SCR("W4PRMHZG","P","NAME","NOVWCODE")
47
^SCR("W4PRMHZG","P","NAME","NOVWDEL")
43
^SCR("W4PRMHZG","P","NAME","NOZPT")
78
^SCR("W4PRMHZG","P","NAME","OLDDAT")
80
^SCR("W4PRMHZG","P","NAME","OPENADD")
40
^SCR("W4PRMHZG","P","NAME","SHEETBG")
8
^SCR("W4PRMHZG","P","NAME","SHORT")
87
^SCR("W4PRMHZG","P","NAME","SHORTFN")
75
^SCR("W4PRMHZG","P","NAME","SHOWCRTZ")
82
^SCR("W4PRMHZG","P","NAME","SHOWDSIT")
60
^SCR("W4PRMHZG","P","NAME","SZMLZ")
86
^SCR("W4PRMHZG","P","NAME","TABLETAB")
85
^SCR("W4PRMHZG","P","NAME","ULAM")
45
^SCR("W4PRMHZG","P","NAME","ULAMTBLB")
52
^SCR("W4PRMHZG","P","NM",5)
GRITVW
^SCR("W4PRMHZG","P","NM",7)
ASKWTR
^SCR("W4PRMHZG","P","NM",8)
SHEETBG
^SCR("W4PRMHZG","P","NM",10)
AUTOGR
^SCR("W4PRMHZG","P","NM",15)
COLXGR
^SCR("W4PRMHZG","P","NM",20)
COLYGR
^SCR("W4PRMHZG","P","NM",25)
AUTOIT
^SCR("W4PRMHZG","P","NM",30)
COLXIT
^SCR("W4PRMHZG","P","NM",35)
COLYIT
^SCR("W4PRMHZG","P","NM",36)
FSZGR
^SCR("W4PRMHZG","P","NM",37)
FSZIT
^SCR("W4PRMHZG","P","NM",38)
ADDSCRAU
^SCR("W4PRMHZG","P","NM",39)
HZGDEP
^SCR("W4PRMHZG","P","NM",40)
OPENADD
^SCR("W4PRMHZG","P","NM",41)
GRPIC
^SCR("W4PRMHZG","P","NM",42)
HZGPRC
^SCR("W4PRMHZG","P","NM",43)
NOVWDEL
^SCR("W4PRMHZG","P","NM",44)
ADDCOLOR
^SCR("W4PRMHZG","P","NM",45)
ULAM
^SCR("W4PRMHZG","P","NM",47)
NOVWCODE
^SCR("W4PRMHZG","P","NM",50)
HZGSHALL
^SCR("W4PRMHZG","P","NM",52)
ULAMTBLB
^SCR("W4PRMHZG","P","NM",53)
ABC
^SCR("W4PRMHZG","P","NM",55)
ABCENG
^SCR("W4PRMHZG","P","NM",60)
SHOWDSIT
^SCR("W4PRMHZG","P","NM",65)
CRCARD1
^SCR("W4PRMHZG","P","NM",70)
BOCUST
^SCR("W4PRMHZG","P","NM",75)
SHORTFN
^SCR("W4PRMHZG","P","NM",78)
NOZPT
^SCR("W4PRMHZG","P","NM",80)
OLDDAT
^SCR("W4PRMHZG","P","NM",82)
SHOWCRTZ
^SCR("W4PRMHZG","P","NM",83)
CLKVWMLZ
^SCR("W4PRMHZG","P","NM",85)
TABLETAB
^SCR("W4PRMHZG","P","NM",86)
SZMLZ
^SCR("W4PRMHZG","P","NM",87)
SHORT
^SCR("W4PRMHZG","P","NM",88)
DEP2FAST
^SCR("W4PRMMAP")
H
^SCR("W4PRMMAP",1)
                                                                               
^SCR("W4PRMMAP",2)
                                                                            1] 
^SCR("W4PRMMAP",3)
               {05                    } :              [ LAT,LNG ] dtn fkxn    
^SCR("W4PRMMAP",4)
               {10                    } : [ LAT,LNG ] 1 fkxn ly zehpicxe`ew    
^SCR("W4PRMMAP",5)
               {                    11} :                         1 fkxn my    
^SCR("W4PRMMAP",6)
               {13                    } : [ LAT,LNG ] 2 fkxn ly zehpicxe`ew    
^SCR("W4PRMMAP",7)
               {                    14} :                         2 fkxn my    
^SCR("W4PRMMAP",8)
               {16                    } : [ LAT,LNG ] 3 fkxn ly zehpicxe`ew    
^SCR("W4PRMMAP",9)
               {                    17} :                         3 fkxn my    
^SCR("W4PRMMAP",10)
               {19                    } : [ LAT,LNG ] 4 fkxn ly zehpicxe`ew    
^SCR("W4PRMMAP",11)
               {                    20} :                         4 fkxn my    
^SCR("W4PRMMAP",12)
               {25  } :      (20-20,19-19,18-18,17-17,16-16,15-15) dcin dpw    
^SCR("W4PRMMAP",13)
                                                                               
^SCR("W4PRMMAP",14)
            [1                                                                 
^SCR("W4PRMMAP","A",1)

^SCR("W4PRMMAP","A",2)

^SCR("W4PRMMAP","A",3)
:AT,LN„”Ž†‹˜Ž
^SCR("W4PRMMAP","A",4)
:AT,LN1†‹˜ŽŒ™š…ˆ�‰ƒ˜…€…—
^SCR("W4PRMMAP","A",5)
:1†‹˜Ž�™
^SCR("W4PRMMAP","A",6)
:AT,LN2†‹˜ŽŒ™š…ˆ�‰ƒ˜…€…—
^SCR("W4PRMMAP","A",7)
:2†‹˜Ž�™
^SCR("W4PRMMAP","A",8)
:AT,LN3†‹˜ŽŒ™š…ˆ�‰ƒ˜…€…—
^SCR("W4PRMMAP","A",9)
:3†‹˜Ž�™
^SCR("W4PRMMAP","A",10)
:AT,LN4†‹˜ŽŒ™š…ˆ�‰ƒ˜…€…—
^SCR("W4PRMMAP","A",11)
:4†‹˜Ž�™
^SCR("W4PRMMAP","A",12)
:(20-20,19-19,18-18,17-17,16-16,15-15)„ƒ‰Ž„�—
^SCR("W4PRMMAP","A",13)

^SCR("W4PRMMAP","A",14)

^SCR("W4PRMMAP","AV",1)

^SCR("W4PRMMAP","AV",2)

^SCR("W4PRMMAP","AV",3)
:AT'LNvpnzfrn
^SCR("W4PRMMAP","AV",4)
:AT'LN1zfrnka,uybhsrutue
^SCR("W4PRMMAP","AV",5)
:1zfrnoa
^SCR("W4PRMMAP","AV",6)
:AT'LN2zfrnka,uybhsrutue
^SCR("W4PRMMAP","AV",7)
:2zfrnoa
^SCR("W4PRMMAP","AV",8)
:AT'LN3zfrnka,uybhsrutue
^SCR("W4PRMMAP","AV",9)
:3zfrnoa
^SCR("W4PRMMAP","AV",10)
:AT'LN4zfrnka,uybhsrutue
^SCR("W4PRMMAP","AV",11)
:4zfrnoa
^SCR("W4PRMMAP","AV",12)
:(20-20'19-19'18-18'17-17'16-16'15-15)vshnvbe
^SCR("W4PRMMAP","AV",13)

^SCR("W4PRMMAP","AV",14)

^SCR("W4PRMMAP","NAME")
dtnl mixhnxt
^SCR("W4PRMMAP","P",5,"CRD")
3,15,E,23,0
^SCR("W4PRMMAP","P",5,"HELP")

^SCR("W4PRMMAP","P",5,"LMAX")
23
^SCR("W4PRMMAP","P",5,"MUMPS1")

^SCR("W4PRMMAP","P",5,"MUMPS2")

^SCR("W4PRMMAP","P",5,"MUST")

^SCR("W4PRMMAP","P",5,"TYP")
E
^SCR("W4PRMMAP","P",10,"CRD")
4,15,E,23,0
^SCR("W4PRMMAP","P",10,"HELP")

^SCR("W4PRMMAP","P",10,"LMAX")
23
^SCR("W4PRMMAP","P",10,"MUMPS1")

^SCR("W4PRMMAP","P",10,"MUMPS2")

^SCR("W4PRMMAP","P",10,"MUST")

^SCR("W4PRMMAP","P",10,"TYP")
E
^SCR("W4PRMMAP","P",11,"CRD")
5,39,H,23
^SCR("W4PRMMAP","P",11,"HELP")

^SCR("W4PRMMAP","P",11,"LMAX")
23
^SCR("W4PRMMAP","P",11,"MUMPS1")

^SCR("W4PRMMAP","P",11,"MUMPS2")

^SCR("W4PRMMAP","P",11,"TYP")
H
^SCR("W4PRMMAP","P",13,"CRD")
6,15,E,23,0
^SCR("W4PRMMAP","P",13,"HELP")

^SCR("W4PRMMAP","P",13,"LMAX")
23
^SCR("W4PRMMAP","P",13,"MUMPS1")

^SCR("W4PRMMAP","P",13,"MUMPS2")

^SCR("W4PRMMAP","P",13,"TYP")
E
^SCR("W4PRMMAP","P",14,"CRD")
7,39,H,23
^SCR("W4PRMMAP","P",14,"HELP")

^SCR("W4PRMMAP","P",14,"LMAX")
23
^SCR("W4PRMMAP","P",14,"MUMPS1")

^SCR("W4PRMMAP","P",14,"MUMPS2")

^SCR("W4PRMMAP","P",14,"TYP")
H
^SCR("W4PRMMAP","P",16,"CRD")
8,15,E,23,0
^SCR("W4PRMMAP","P",16,"HELP")

^SCR("W4PRMMAP","P",16,"LMAX")
23
^SCR("W4PRMMAP","P",16,"MUMPS1")

^SCR("W4PRMMAP","P",16,"MUMPS2")

^SCR("W4PRMMAP","P",16,"TYP")
E
^SCR("W4PRMMAP","P",17,"CRD")
9,39,H,23
^SCR("W4PRMMAP","P",17,"HELP")

^SCR("W4PRMMAP","P",17,"LMAX")
23
^SCR("W4PRMMAP","P",17,"MUMPS1")

^SCR("W4PRMMAP","P",17,"MUMPS2")

^SCR("W4PRMMAP","P",17,"TYP")
H
^SCR("W4PRMMAP","P",19,"CRD")
10,15,E,23,0
^SCR("W4PRMMAP","P",19,"HELP")

^SCR("W4PRMMAP","P",19,"LMAX")
23
^SCR("W4PRMMAP","P",19,"MUMPS1")

^SCR("W4PRMMAP","P",19,"MUMPS2")

^SCR("W4PRMMAP","P",19,"TYP")
E
^SCR("W4PRMMAP","P",20,"CRD")
11,39,H,23
^SCR("W4PRMMAP","P",20,"HELP")

^SCR("W4PRMMAP","P",20,"LMAX")
23
^SCR("W4PRMMAP","P",20,"MUMPS1")

^SCR("W4PRMMAP","P",20,"MUMPS2")

^SCR("W4PRMMAP","P",20,"TYP")
H
^SCR("W4PRMMAP","P",25,"CRD")
12,15,N,5,0
^SCR("W4PRMMAP","P",25,"HELP")

^SCR("W4PRMMAP","P",25,"LMAX")
5
^SCR("W4PRMMAP","P",25,"MUMPS1")

^SCR("W4PRMMAP","P",25,"MUMPS2")

^SCR("W4PRMMAP","P",25,"TYP")
N
^SCR("W4PRMMAP","P","NAME","CENTER")
5
^SCR("W4PRMMAP","P","NAME","CRD1")
10
^SCR("W4PRMMAP","P","NAME","CRD2")
13
^SCR("W4PRMMAP","P","NAME","CRD3")
16
^SCR("W4PRMMAP","P","NAME","CRD4")
19
^SCR("W4PRMMAP","P","NAME","INFO1")
11
^SCR("W4PRMMAP","P","NAME","INFO2")
14
^SCR("W4PRMMAP","P","NAME","INFO3")
17
^SCR("W4PRMMAP","P","NAME","INFO4")
20
^SCR("W4PRMMAP","P","NAME","ZOOM")
25
^SCR("W4PRMMAP","P","NM",5)
CENTER
^SCR("W4PRMMAP","P","NM",10)
CRD1
^SCR("W4PRMMAP","P","NM",11)
INFO1
^SCR("W4PRMMAP","P","NM",13)
CRD2
^SCR("W4PRMMAP","P","NM",14)
INFO2
^SCR("W4PRMMAP","P","NM",16)
CRD3
^SCR("W4PRMMAP","P","NM",17)
INFO3
^SCR("W4PRMMAP","P","NM",19)
CRD4
^SCR("W4PRMMAP","P","NM",20)
INFO4
^SCR("W4PRMMAP","P","NM",25)
ZOOM
^SCR("W4PRMMAP","P","RB",1)
3,13,15,78
^SCR("W4PRMMS0")
H
^SCR("W4PRMMS0",1)
                             # dcrqna dcear mixhnxt zxcbd #                    
^SCR("W4PRMMS0",2)
                          {05 }:   (0-`l,1-ok)          xg` xvlnn dpnfd zpbd   
^SCR("W4PRMMS0",3)
            {10 }:( 0- dpnfd xbqy in itl ,1- dpnfd ligzdy in itl ) sqk zxitq   
^SCR("W4PRMMS0",4)
 {12 }:(1- dpnfd ligzdy in itl , 0- dpnfda hixt cilwdy in itl ) mihixt zxitq   
^SCR("W4PRMMS0",5)
                          {15 }: (0-`l,1-ok) oeayg zligza gewl 'qn le`yl m`d   
^SCR("W4PRMMS0",6)
    {20 }:(0 - `l ,1 - ok ) dpnfd oekcrl zexiyi xearl gezt ogleyl dqipka m`d   
^SCR("W4PRMMS0",7)
                          {21 }:                zeiwqr zegex` xtqn le`yl m`d   
^SCR("W4PRMMS0",8)
              {22 }: dxarde lehia, dbvd, dkixr zeivte` xidn ogleyl xyt`l m`d   
^SCR("W4PRMMS0",9)
 {23 } :(3-dpnfd ,2-zepgley,1-mixvln zlahl) xidn ogleya melyz ixg` xefgl o`l   
^SCR("W4PRMMS0",10)
                         {25  }:                        zepn ibeql iaxin 'qn   
^SCR("W4PRMMS0",11)
                         {40  }:                    libx ogleyl menipin xign   
^SCR("W4PRMMS0",12)
                         {45  }:                      xa ogleyl menipin xign   
^SCR("W4PRMMS0",13)
                         {50  }:                                 zexiy inc %   
^SCR("W4PRMMS0",14)
      {53  }:  (0- `l, 2- dnqiq mr ,1-ok) i`xy` qihxka mitih cilwdl xyt` m`d   
^SCR("W4PRMMS0",15)
              {54 }: (0 - `l,1- ok) melyzl mekqn 25% xearl leki tih lceb m`d   
^SCR("W4PRMMS0",16)
                 {55 }: ( 0 -zxnyn seqa,1 -dceard jldna ) onefna mitih zclwd   
^SCR("W4PRMMS0",17)
                                                                               
^SCR("W4PRMMS0",18)
                                                                               
^SCR("W4PRMMS0","A",1)
„ƒ’‘Ž�„ƒ…�’�‰˜ˆŽ˜”š˜ƒ‚„
^SCR("W4PRMMS0","A",2)
:(0-€Œ,1-�‹)˜‡€˜–ŒŽŽ„�Ž†„š�‚„
^SCR("W4PRMMS0","A",3)
:(0-„�Ž†„˜‚‘™‰Ž‰”Œ,1-„�Ž†„Œ‰‡š„™‰Ž‰”Œ)“‘‹š˜‰”‘
^SCR("W4PRMMS0","A",4)
:(1-„�Ž†„Œ‰‡š„™‰Ž‰”Œ,0-„�Ž†„�ˆ‰˜”ƒ‰Œ—„™‰Ž‰”Œ)�‰ˆ‰˜”š˜‰”‘
^SCR("W4PRMMS0","A",5)
:(0-€Œ,1-�‹)�…�™‡šŒ‰‡š�‡…—Œ'‘ŽŒ…€™Œ�€„
^SCR("W4PRMMS0","A",6)
:(0-€Œ,1-�‹)„�Ž†„�…‹ƒ’Œš…˜‰™‰˜…�’Œ‡…š”�‡Œ…™Œ„‘‰�‹��€„
^SCR("W4PRMMS0","A",7)
:š…‰—‘’š…‡…˜€˜”‘ŽŒ…€™Œ�€„
^SCR("W4PRMMS0","A",8)
:„˜�’„…Œ…ˆ‰�,„‚–„,„‹‰˜’š…‰–”…€˜‰„Ž�‡Œ…™Œ˜™”€Œ�€„
^SCR("W4PRMMS0","A",9)
:(3-„�Ž†„,2-š…�‡Œ…™,1-�‰˜–ŒŽšŒ�ˆŒ)˜‰„Ž�‡Œ…™��…Œ™š‰˜‡€˜…†‡Œ�€Œ
^SCR("W4PRMMS0","A",10)
:š…�Ž‰‚…‘Œ‰�˜‰Ž'‘Ž
^SCR("W4PRMMS0","A",11)
:Œ‰‚˜�‡Œ…™Œ�…Ž‰�‰Ž˜‰‡Ž
^SCR("W4PRMMS0","A",12)
:˜��‡Œ…™Œ�…Ž‰�‰Ž˜‰‡Ž
^SCR("W4PRMMS0","A",13)
:š…˜‰™‰Žƒ%
^SCR("W4PRMMS0","A",14)
:(0-€Œ,2-„Ž‘‰‘�’,1-�‹)‰€˜™€‘‰ˆ˜‹��‰”‰ˆƒ‰Œ—„Œ˜™”€�€„
^SCR("W4PRMMS0","A",15)
:(0-€Œ,1-�‹)�…Œ™šŒ�…‹‘Ž25%˜…�’ŒŒ…‹‰”‰ˆŒƒ…‚�€„
^SCR("W4PRMMS0","A",16)
:(0-š˜Ž™Ž“…‘�,1-„ƒ…�’„ŠŒ„Ž�)�Ž…†Ž��‰”‰ˆšƒŒ—„
^SCR("W4PRMMS0","A",17)

^SCR("W4PRMMS0","A",18)

^SCR("W4PRMMS0","AV",1)
vsgxncvsucgohrynrp,rsdv
^SCR("W4PRMMS0","AV",2)
:(0-tk'1-if)rjtrmknnvbnzv,bdv
^SCR("W4PRMMS0","AV",3)
:(0-vbnzvrdxahnhpk'1-vbnzvkhj,vahnhpk);xf,rhpx
^SCR("W4PRMMS0","AV",4)
:(1-vbnzvkhj,vahnhpk'0-vbnzvcyhrpshkevahnhpk)ohyhrp,rhpx
^SCR("W4PRMMS0","AV",5)
:(0-tk'1-if)iucaj,khj,cjuekwxnkutakotv
^SCR("W4PRMMS0","AV",6)
:(0-tk'1-if)vbnzviufsgk,urhahrucgkju,pijkuakvxhbfcotv
^SCR("W4PRMMS0","AV",7)
:,uhexg,ujurtrpxnkutakotv
^SCR("W4PRMMS0","AV",8)
:vrcgvukuyhc'vdmv'vfhrg,uhmputrhvnijkuakraptkotv
^SCR("W4PRMMS0","AV",9)
:(3-vbnzv'2-,ubjkua'1-ohrmkn,kcyk)rhvnijkuacouka,hrjtruzjkitk
^SCR("W4PRMMS0","AV",10)
:,ubnhduxkhcrhnwxn
^SCR("W4PRMMS0","AV",11)
:khdrijkuakounhbhnrhjn
^SCR("W4PRMMS0","AV",12)
:rcijkuakounhbhnrhjn
^SCR("W4PRMMS0","AV",13)
:,urhahns%
^SCR("W4PRMMS0","AV",14)
:(0-tk'2-vnxhxog'1-if)htratxhyrfcohphyshkevkraptotv
^SCR("W4PRMMS0","AV",15)
:(0-tk'1-if)ouka,koufxn25%rucgkkufhphyksudotv
^SCR("W4PRMMS0","AV",16)
:(0-,rnan;uxc'1-vsucgvlkvnc)inuzncohphy,skev
^SCR("W4PRMMS0","AV",17)

^SCR("W4PRMMS0","AV",18)

^SCR("W4PRMMS0","NAME")

^SCR("W4PRMMS0","P",5,"CRD")
2,26,B,1,0
^SCR("W4PRMMS0","P",5,"HELP")

^SCR("W4PRMMS0","P",5,"LMAX")
4
^SCR("W4PRMMS0","P",5,"MUMPS1")

^SCR("W4PRMMS0","P",5,"MUMPS2")

^SCR("W4PRMMS0","P",5,"TYP")
B
^SCR("W4PRMMS0","P",10,"CRD")
3,12,N,1,0
^SCR("W4PRMMS0","P",10,"HELP")

^SCR("W4PRMMS0","P",10,"LMAX")
4
^SCR("W4PRMMS0","P",10,"MUMPS1")

^SCR("W4PRMMS0","P",10,"MUMPS2")

^SCR("W4PRMMS0","P",10,"TYP")
N
^SCR("W4PRMMS0","P",12,"CRD")
4,1,N,1,0
^SCR("W4PRMMS0","P",12,"HELP")

^SCR("W4PRMMS0","P",12,"LMAX")
4
^SCR("W4PRMMS0","P",12,"MUMPS1")

^SCR("W4PRMMS0","P",12,"MUMPS2")

^SCR("W4PRMMS0","P",12,"TYP")
N
^SCR("W4PRMMS0","P",15,"CRD")
5,26,B,1,0
^SCR("W4PRMMS0","P",15,"HELP")

^SCR("W4PRMMS0","P",15,"LMAX")
4
^SCR("W4PRMMS0","P",15,"MUMPS1")

^SCR("W4PRMMS0","P",15,"MUMPS2")

^SCR("W4PRMMS0","P",15,"MUST")

^SCR("W4PRMMS0","P",15,"TYP")
B
^SCR("W4PRMMS0","P",20,"CRD")
6,4,B,1,0
^SCR("W4PRMMS0","P",20,"HELP")

^SCR("W4PRMMS0","P",20,"LMAX")
4
^SCR("W4PRMMS0","P",20,"MUMPS1")

^SCR("W4PRMMS0","P",20,"MUMPS2")

^SCR("W4PRMMS0","P",20,"TYP")
B
^SCR("W4PRMMS0","P",21,"CRD")
7,26,B,1,0
^SCR("W4PRMMS0","P",21,"HELP")

^SCR("W4PRMMS0","P",21,"LMAX")
4
^SCR("W4PRMMS0","P",21,"MUMPS1")

^SCR("W4PRMMS0","P",21,"MUMPS2")

^SCR("W4PRMMS0","P",21,"TYP")
B
^SCR("W4PRMMS0","P",22,"CRD")
8,14,B,1,0
^SCR("W4PRMMS0","P",22,"HELP")

^SCR("W4PRMMS0","P",22,"LMAX")
4
^SCR("W4PRMMS0","P",22,"MUMPS1")

^SCR("W4PRMMS0","P",22,"MUMPS2")

^SCR("W4PRMMS0","P",22,"TYP")
B
^SCR("W4PRMMS0","P",23,"CRD")
9,1,E,1,0
^SCR("W4PRMMS0","P",23,"HELP")

^SCR("W4PRMMS0","P",23,"LMAX")
4
^SCR("W4PRMMS0","P",23,"MUMPS1")

^SCR("W4PRMMS0","P",23,"MUMPS2")

^SCR("W4PRMMS0","P",23,"TYP")
E
^SCR("W4PRMMS0","P",25,"CRD")
10,25,N,2,0
^SCR("W4PRMMS0","P",25,"HELP")

^SCR("W4PRMMS0","P",25,"LMAX")
5
^SCR("W4PRMMS0","P",25,"MUMPS1")

^SCR("W4PRMMS0","P",25,"MUMPS2")

^SCR("W4PRMMS0","P",25,"TYP")
N
^SCR("W4PRMMS0","P",40,"CRD")
11,25,N,5,2
^SCR("W4PRMMS0","P",40,"HELP")

^SCR("W4PRMMS0","P",40,"LMAX")
5
^SCR("W4PRMMS0","P",40,"MUMPS1")

^SCR("W4PRMMS0","P",40,"MUMPS2")

^SCR("W4PRMMS0","P",40,"TYP")
N
^SCR("W4PRMMS0","P",45,"CRD")
12,25,N,5,2
^SCR("W4PRMMS0","P",45,"HELP")

^SCR("W4PRMMS0","P",45,"LMAX")
5
^SCR("W4PRMMS0","P",45,"MUMPS1")

^SCR("W4PRMMS0","P",45,"MUMPS2")

^SCR("W4PRMMS0","P",45,"TYP")
N
^SCR("W4PRMMS0","P",50,"CRD")
13,25,N,4,1
^SCR("W4PRMMS0","P",50,"HELP")

^SCR("W4PRMMS0","P",50,"LMAX")
5
^SCR("W4PRMMS0","P",50,"MUMPS1")

^SCR("W4PRMMS0","P",50,"MUMPS2")

^SCR("W4PRMMS0","P",50,"TYP")
N
^SCR("W4PRMMS0","P",53,"CRD")
14,6,N,1,0
^SCR("W4PRMMS0","P",53,"HELP")

^SCR("W4PRMMS0","P",53,"LMAX")
5
^SCR("W4PRMMS0","P",53,"MUMPS1")

^SCR("W4PRMMS0","P",53,"MUMPS2")

^SCR("W4PRMMS0","P",53,"TYP")
N
^SCR("W4PRMMS0","P",54,"CRD")
15,14,N,1,0
^SCR("W4PRMMS0","P",54,"HELP")

^SCR("W4PRMMS0","P",54,"LMAX")
4
^SCR("W4PRMMS0","P",54,"MUMPS1")

^SCR("W4PRMMS0","P",54,"MUMPS2")

^SCR("W4PRMMS0","P",54,"TYP")
N
^SCR("W4PRMMS0","P",55,"CRD")
16,17,N,1,0
^SCR("W4PRMMS0","P",55,"HELP")

^SCR("W4PRMMS0","P",55,"LMAX")
4
^SCR("W4PRMMS0","P",55,"MUMPS1")

^SCR("W4PRMMS0","P",55,"MUMPS2")

^SCR("W4PRMMS0","P",55,"TYP")
N
^SCR("W4PRMMS0","P","NAME","ACNTAW")
22
^SCR("W4PRMMS0","P","NAME","BACKTO")
23
^SCR("W4PRMMS0","P","NAME","DMSHMSD")
50
^SCR("W4PRMMS0","P","NAME","LAST")
10
^SCR("W4PRMMS0","P","NAME","LKHN")
15
^SCR("W4PRMMS0","P","NAME","MAXMANA")
25
^SCR("W4PRMMS0","P","NAME","MAXTIP")
54
^SCR("W4PRMMS0","P","NAME","MINMH")
40
^SCR("W4PRMMS0","P","NAME","MINMHB")
45
^SCR("W4PRMMS0","P","NAME","MLZ")
5
^SCR("W4PRMMS0","P","NAME","MLZBGPAR")
12
^SCR("W4PRMMS0","P","NAME","NOORDVW")
20
^SCR("W4PRMMS0","P","NAME","NOTIPCA")
53
^SCR("W4PRMMS0","P","NAME","QAI1")
21
^SCR("W4PRMMS0","P","NAME","TIPMZM")
55
^SCR("W4PRMMS0","P","NM",5)
MLZ
^SCR("W4PRMMS0","P","NM",10)
LAST
^SCR("W4PRMMS0","P","NM",12)
MLZBGPAR
^SCR("W4PRMMS0","P","NM",15)
LKHN
^SCR("W4PRMMS0","P","NM",20)
NOORDVW
^SCR("W4PRMMS0","P","NM",21)
QAI1
^SCR("W4PRMMS0","P","NM",22)
ACNTAW
^SCR("W4PRMMS0","P","NM",23)
BACKTO
^SCR("W4PRMMS0","P","NM",25)
MAXMANA
^SCR("W4PRMMS0","P","NM",40)
MINMH
^SCR("W4PRMMS0","P","NM",45)
MINMHB
^SCR("W4PRMMS0","P","NM",50)
DMSHMSD
^SCR("W4PRMMS0","P","NM",53)
NOTIPCA
^SCR("W4PRMMS0","P","NM",54)
MAXTIP
^SCR("W4PRMMS0","P","NM",55)
TIPMZM
^SCR("W4PRMMSD")
H
^SCR("W4PRMMSD",1)
                             # dcrqna dcear mixhnxt zxcbd #                    
^SCR("W4PRMMSD",2)
                          {05 }:   (0-`l,1-ok)          xg` xvlnn dpnfd zpbd   
^SCR("W4PRMMSD",3)
            {10 }:( 0- dpnfd xbqy in itl ,1- dpnfd ligzdy in itl ) sqk zxitq   
^SCR("W4PRMMSD",4)
 {12 }:(1- dpnfd ligzdy in itl , 0- dpnfda hixt cilwdy in itl ) mihixt zxitq   
^SCR("W4PRMMSD",5)
    {20 }:(0 - `l ,1 - ok ) dpnfd oekcrl zexiyi xearl gezt ogleyl dqipka m`d   
^SCR("W4PRMMSD",6)
              {22 }: dxarde lehia, dbvd, dkixr zeivte` xidn ogleyl xyt`l m`d   
^SCR("W4PRMMSD",7)
                         {23  }:                 ogley zxarda dnqiq ywal m`d   
^SCR("W4PRMMSD",8)
                         {25  }:                        zepn ibeql iaxin 'qn   
^SCR("W4PRMMSD",9)
                         {40  }:                    libx ogleyl menipin xign   
^SCR("W4PRMMSD",10)
                         {45  }:                      xa ogleyl menipin xign   
^SCR("W4PRMMSD",11)
                         {50  }:                                 zexiy inc %   
^SCR("W4PRMMSD",12)
  {54 }:(0-`l,4-dnqiqa,3-`"ka `l,2-melyzn %50 cr,1-dlabd `ll) tih lawl xyt` m`d
^SCR("W4PRMMSD",13)
                 {55 }: ( 0 -zxnyn seqa,1 -dceard jldna ) onefna mitih zclwd   
^SCR("W4PRMMSD",14)
                                   {57 } :  mifeg`a iyteg tih lceb xyt`l m`d   
^SCR("W4PRMMSD",15)
            {60 } : (2 - zepgleyd lka ,1 - xa zepgleya ) gewl xe`z bivdl m`d   
^SCR("W4PRMMSD",16)
                                   {62 } :    dcrqna dpnfda zetqez bivdl m`d   
^SCR("W4PRMMSD",17)
                                      {69      } : o`xehqxl "gepiw" hixt 'qn   
^SCR("W4PRMMSD",18)
                                          {72      } : "xw'vl dxrd" hixt 'qn   
^SCR("W4PRMMSD",19)
    {70                           } :( wiqta micxten ) dpnl jeiya micreq xcq   
^SCR("W4PRMMSD",20)
        {75 }:(0-`l,1-ok) zepn zenk itl micreq zniyxa "mlek" zxiga wecal m`d   
^SCR("W4PRMMSD",21)
                                       {78 }:  "iwlg oeayg" divte` xyt`l m`d   
^SCR("W4PRMMSD",22)
                   {80 } : iept ogleyl mihixtd lk dpnfd jezn xiardl xyt` m`d   
^SCR("W4PRMMSD",23)
                 {82   } : mliy `l ogleyy onql dpnfd zlaw ixg` zewc dnk ixg`   
^SCR("W4PRMMSD",24)
                                                                               
^SCR("W4PRMMSD","AV",1)
äãòñîáäãåáòíéøèîøôúøãâä
^SCR("W4PRMMSD","AV",2)
:(0-àì,1-ïë)øçàøöìîîäðîæäúðâä
^SCR("W4PRMMSD","AV",3)
:(0-äðîæäøâñùéîéôì,1-äðîæäìéçúäùéîéôì)óñëúøéôñ
^SCR("W4PRMMSD","AV",4)
:(1-äðîæäìéçúäùéîéôì,0-äðîæäáèéøôãéì÷äùéîéôì)íéèéøôúøéôñ
^SCR("W4PRMMSD","AV",5)
:(0-àì,1-ïë)äðîæäïåëãòìúåøéùéøåáòìçåúôïçìåùìäñéðëáíàä
^SCR("W4PRMMSD","AV",6)
:äøáòäåìåèéá,äâöä,äëéøòúåéöôåàøéäîïçìåùìøùôàìíàä
^SCR("W4PRMMSD","AV",7)
:ïçìåùúøáòäáäîñéñù÷áìíàä
^SCR("W4PRMMSD","AV",8)
:úåðîéâåñìéáøéî'ñî
^SCR("W4PRMMSD","AV",9)
:ìéâøïçìåùìíåîéðéîøéçî
^SCR("W4PRMMSD","AV",10)
:øáïçìåùìíåîéðéîøéçî
^SCR("W4PRMMSD","AV",11)
:úåøéùéîã%
^SCR("W4PRMMSD","AV",12)
:(0-àì,4-äîñéñá,3-à"ëáàì,2-íåìùúî%50ãò,1-äìáâäàìì)ôéèìá÷ìøùôàíàä
^SCR("W4PRMMSD","AV",13)
:(0-úøîùîóåñá,1-äãåáòäêìäîá)ïîåæîáíéôéèúãì÷ä
^SCR("W4PRMMSD","AV",14)
:íéæåçàáéùôåçôéèìãåâøùôàìíàä
^SCR("W4PRMMSD","AV",15)
:(2-úåðçìåùäìëá,1-øáúåðçìåùá)çå÷ìøåàúâéöäìíàä
^SCR("W4PRMMSD","AV",16)
:äãòñîáäðîæäáúåôñåúâéöäìíàä
^SCR("W4PRMMSD","AV",17)
:ïàøåèñøì"çåðé÷"èéøô'ñî
^SCR("W4PRMMSD","AV",18)
:"ø÷'öìäøòä"èéøô'ñî
^SCR("W4PRMMSD","AV",19)
:(÷éñôáíéãøôåî)äðîìêåéùáíéãòåñøãñ
^SCR("W4PRMMSD","AV",20)
:(0-àì,1-ïë)úåðîúåîëéôìíéãòåñúîéùøá"íìåë"úøéçá÷åãáìíàä
^SCR("W4PRMMSD","AV",21)
:"é÷ìçïåáùç"äéöôåàøùôàìíàä
^SCR("W4PRMMSD","AV",22)
:éåðôïçìåùìíéèéøôäìëäðîæäêåúîøéáòäìøùôàíàä
^SCR("W4PRMMSD","AV",23)
:íìéùàìïçìåùùïîñìäðîæäúìá÷éøçàúå÷ãäîëéøçà
^SCR("W4PRMMSD","AV",24)

^SCR("W4PRMMSD","NAME")

^SCR("W4PRMMSD","P",5,"CRD")
2,26,B,1,0
^SCR("W4PRMMSD","P",5,"HELP")

^SCR("W4PRMMSD","P",5,"LMAX")
4
^SCR("W4PRMMSD","P",5,"MUMPS1")

^SCR("W4PRMMSD","P",5,"MUMPS2")

^SCR("W4PRMMSD","P",5,"TYP")
B
^SCR("W4PRMMSD","P",10,"CRD")
3,12,N,1,0
^SCR("W4PRMMSD","P",10,"HELP")

^SCR("W4PRMMSD","P",10,"LMAX")
4
^SCR("W4PRMMSD","P",10,"MUMPS1")

^SCR("W4PRMMSD","P",10,"MUMPS2")

^SCR("W4PRMMSD","P",10,"TYP")
N
^SCR("W4PRMMSD","P",12,"CRD")
4,1,N,1,0
^SCR("W4PRMMSD","P",12,"HELP")

^SCR("W4PRMMSD","P",12,"LMAX")
4
^SCR("W4PRMMSD","P",12,"MUMPS1")

^SCR("W4PRMMSD","P",12,"MUMPS2")

^SCR("W4PRMMSD","P",12,"TYP")
N
^SCR("W4PRMMSD","P",20,"CRD")
5,4,B,1,0
^SCR("W4PRMMSD","P",20,"HELP")

^SCR("W4PRMMSD","P",20,"LMAX")
4
^SCR("W4PRMMSD","P",20,"MUMPS1")

^SCR("W4PRMMSD","P",20,"MUMPS2")

^SCR("W4PRMMSD","P",20,"TYP")
B
^SCR("W4PRMMSD","P",22,"CRD")
6,14,B,1,0
^SCR("W4PRMMSD","P",22,"HELP")

^SCR("W4PRMMSD","P",22,"LMAX")
4
^SCR("W4PRMMSD","P",22,"MUMPS1")

^SCR("W4PRMMSD","P",22,"MUMPS2")

^SCR("W4PRMMSD","P",22,"TYP")
B
^SCR("W4PRMMSD","P",23,"CRD")
7,25,B,1,0
^SCR("W4PRMMSD","P",23,"HELP")

^SCR("W4PRMMSD","P",23,"LMAX")
5
^SCR("W4PRMMSD","P",23,"MUMPS1")

^SCR("W4PRMMSD","P",23,"MUMPS2")

^SCR("W4PRMMSD","P",23,"TYP")
B
^SCR("W4PRMMSD","P",25,"CRD")
8,25,N,2,0
^SCR("W4PRMMSD","P",25,"HELP")

^SCR("W4PRMMSD","P",25,"LMAX")
5
^SCR("W4PRMMSD","P",25,"MUMPS1")

^SCR("W4PRMMSD","P",25,"MUMPS2")

^SCR("W4PRMMSD","P",25,"TYP")
N
^SCR("W4PRMMSD","P",40,"CRD")
9,25,N,5,2
^SCR("W4PRMMSD","P",40,"HELP")

^SCR("W4PRMMSD","P",40,"LMAX")
5
^SCR("W4PRMMSD","P",40,"MUMPS1")

^SCR("W4PRMMSD","P",40,"MUMPS2")

^SCR("W4PRMMSD","P",40,"TYP")
N
^SCR("W4PRMMSD","P",45,"CRD")
10,25,N,5,2
^SCR("W4PRMMSD","P",45,"HELP")

^SCR("W4PRMMSD","P",45,"LMAX")
5
^SCR("W4PRMMSD","P",45,"MUMPS1")

^SCR("W4PRMMSD","P",45,"MUMPS2")

^SCR("W4PRMMSD","P",45,"TYP")
N
^SCR("W4PRMMSD","P",50,"CRD")
11,25,N,4,1
^SCR("W4PRMMSD","P",50,"HELP")

^SCR("W4PRMMSD","P",50,"LMAX")
5
^SCR("W4PRMMSD","P",50,"MUMPS1")

^SCR("W4PRMMSD","P",50,"MUMPS2")

^SCR("W4PRMMSD","P",50,"TYP")
N
^SCR("W4PRMMSD","P",54,"CRD")
12,2,N,1,0
^SCR("W4PRMMSD","P",54,"HELP")

^SCR("W4PRMMSD","P",54,"LMAX")
4
^SCR("W4PRMMSD","P",54,"MUMPS1")

^SCR("W4PRMMSD","P",54,"MUMPS2")

^SCR("W4PRMMSD","P",54,"TYP")
N
^SCR("W4PRMMSD","P",55,"CRD")
13,17,N,1,0
^SCR("W4PRMMSD","P",55,"HELP")

^SCR("W4PRMMSD","P",55,"LMAX")
4
^SCR("W4PRMMSD","P",55,"MUMPS1")

^SCR("W4PRMMSD","P",55,"MUMPS2")

^SCR("W4PRMMSD","P",55,"TYP")
N
^SCR("W4PRMMSD","P",57,"CRD")
14,35,B,1,0
^SCR("W4PRMMSD","P",57,"HELP")

^SCR("W4PRMMSD","P",57,"LMAX")
4
^SCR("W4PRMMSD","P",57,"MUMPS1")

^SCR("W4PRMMSD","P",57,"MUMPS2")

^SCR("W4PRMMSD","P",57,"TYP")
B
^SCR("W4PRMMSD","P",60,"CRD")
15,12,E,4,0
^SCR("W4PRMMSD","P",60,"HELP")

^SCR("W4PRMMSD","P",60,"LMAX")
4
^SCR("W4PRMMSD","P",60,"MUMPS1")

^SCR("W4PRMMSD","P",60,"MUMPS2")

^SCR("W4PRMMSD","P",60,"MUST")

^SCR("W4PRMMSD","P",60,"TYP")
E
^SCR("W4PRMMSD","P",62,"CRD")
16,35,B,1,0
^SCR("W4PRMMSD","P",62,"HELP")

^SCR("W4PRMMSD","P",62,"LMAX")
4
^SCR("W4PRMMSD","P",62,"MUMPS1")

^SCR("W4PRMMSD","P",62,"MUMPS2")

^SCR("W4PRMMSD","P",62,"TYP")
B
^SCR("W4PRMMSD","P",69,"CHECK")
Y
^SCR("W4PRMMSD","P",69,"CRD")
17,38,E,8,0
^SCR("W4PRMMSD","P",69,"FNC")

^SCR("W4PRMMSD","P",69,"GLOB")
PAR
^SCR("W4PRMMSD","P",69,"HELP")

^SCR("W4PRMMSD","P",69,"LMAX")
9
^SCR("W4PRMMSD","P",69,"MUMPS1")

^SCR("W4PRMMSD","P",69,"MUMPS2")

^SCR("W4PRMMSD","P",69,"NLN")
20
^SCR("W4PRMMSD","P",69,"RZD")
**
^SCR("W4PRMMSD","P",69,"TOPB")
8
^SCR("W4PRMMSD","P",69,"TYP")
E
^SCR("W4PRMMSD","P",70,"CRD")
19,4,E,30,0
^SCR("W4PRMMSD","P",70,"HELP")

^SCR("W4PRMMSD","P",70,"LMAX")
30
^SCR("W4PRMMSD","P",70,"MUMPS1")

^SCR("W4PRMMSD","P",70,"MUMPS2")

^SCR("W4PRMMSD","P",70,"TYP")
E
^SCR("W4PRMMSD","P",72,"CHECK")
Y
^SCR("W4PRMMSD","P",72,"CRD")
18,42,E,9,0
^SCR("W4PRMMSD","P",72,"FNC")

^SCR("W4PRMMSD","P",72,"GLOB")
^PAR
^SCR("W4PRMMSD","P",72,"HELP")

^SCR("W4PRMMSD","P",72,"LMAX")
9
^SCR("W4PRMMSD","P",72,"MUMPS1")

^SCR("W4PRMMSD","P",72,"MUMPS2")

^SCR("W4PRMMSD","P",72,"NLN")
20
^SCR("W4PRMMSD","P",72,"RZD")
**
^SCR("W4PRMMSD","P",72,"TOPB")
8
^SCR("W4PRMMSD","P",72,"TYP")
E
^SCR("W4PRMMSD","P",75,"CRD")
20,8,B,1,0
^SCR("W4PRMMSD","P",75,"HELP")

^SCR("W4PRMMSD","P",75,"LMAX")
4
^SCR("W4PRMMSD","P",75,"MUMPS1")

^SCR("W4PRMMSD","P",75,"MUMPS2")

^SCR("W4PRMMSD","P",75,"TYP")
B
^SCR("W4PRMMSD","P",78,"CRD")
21,39,B,1,0
^SCR("W4PRMMSD","P",78,"HELP")

^SCR("W4PRMMSD","P",78,"LMAX")
4
^SCR("W4PRMMSD","P",78,"MUMPS1")

^SCR("W4PRMMSD","P",78,"MUMPS2")

^SCR("W4PRMMSD","P",78,"TYP")
B
^SCR("W4PRMMSD","P",80,"CRD")
22,19,B,1,0
^SCR("W4PRMMSD","P",80,"HELP")

^SCR("W4PRMMSD","P",80,"LMAX")
4
^SCR("W4PRMMSD","P",80,"MUMPS1")

^SCR("W4PRMMSD","P",80,"MUMPS2")

^SCR("W4PRMMSD","P",80,"TYP")
B
^SCR("W4PRMMSD","P",82,"CRD")
23,17,E,6,0
^SCR("W4PRMMSD","P",82,"HELP")

^SCR("W4PRMMSD","P",82,"LMAX")
6
^SCR("W4PRMMSD","P",82,"MUMPS1")

^SCR("W4PRMMSD","P",82,"MUMPS2")

^SCR("W4PRMMSD","P",82,"TYP")
E
^SCR("W4PRMMSD","P","NAME","ACNTAW")
22
^SCR("W4PRMMSD","P","NAME","CDCHKER")
72
^SCR("W4PRMMSD","P","NAME","DESCCUST")
60
^SCR("W4PRMMSD","P","NAME","DESERT")
69
^SCR("W4PRMMSD","P","NAME","DMSHMSD")
50
^SCR("W4PRMMSD","P","NAME","DOPOPT")
80
^SCR("W4PRMMSD","P","NAME","GLIST")
70
^SCR("W4PRMMSD","P","NAME","GLISTALL")
75
^SCR("W4PRMMSD","P","NAME","LAST")
10
^SCR("W4PRMMSD","P","NAME","MAXMANA")
25
^SCR("W4PRMMSD","P","NAME","MAXTIP")
54
^SCR("W4PRMMSD","P","NAME","MINMH")
40
^SCR("W4PRMMSD","P","NAME","MINMHB")
45
^SCR("W4PRMMSD","P","NAME","MLZ")
5
^SCR("W4PRMMSD","P","NAME","MLZBGPAR")
12
^SCR("W4PRMMSD","P","NAME","MVPSW")
23
^SCR("W4PRMMSD","P","NAME","NOORDVW")
20
^SCR("W4PRMMSD","P","NAME","NOPART")
78
^SCR("W4PRMMSD","P","NAME","NOTSFMSD")
62
^SCR("W4PRMMSD","P","NAME","PAIDTIME")
82
^SCR("W4PRMMSD","P","NAME","TIPFREE")
57
^SCR("W4PRMMSD","P","NAME","TIPMZM")
55
^SCR("W4PRMMSD","P","NM",5)
MLZ
^SCR("W4PRMMSD","P","NM",10)
LAST
^SCR("W4PRMMSD","P","NM",12)
MLZBGPAR
^SCR("W4PRMMSD","P","NM",20)
NOORDVW
^SCR("W4PRMMSD","P","NM",22)
ACNTAW
^SCR("W4PRMMSD","P","NM",23)
MVPSW
^SCR("W4PRMMSD","P","NM",25)
MAXMANA
^SCR("W4PRMMSD","P","NM",40)
MINMH
^SCR("W4PRMMSD","P","NM",45)
MINMHB
^SCR("W4PRMMSD","P","NM",50)
DMSHMSD
^SCR("W4PRMMSD","P","NM",54)
MAXTIP
^SCR("W4PRMMSD","P","NM",55)
TIPMZM
^SCR("W4PRMMSD","P","NM",57)
TIPFREE
^SCR("W4PRMMSD","P","NM",60)
DESCCUST
^SCR("W4PRMMSD","P","NM",62)
NOTSFMSD
^SCR("W4PRMMSD","P","NM",69)
DESERT
^SCR("W4PRMMSD","P","NM",70)
GLIST
^SCR("W4PRMMSD","P","NM",72)
CDCHKER
^SCR("W4PRMMSD","P","NM",75)
GLISTALL
^SCR("W4PRMMSD","P","NM",78)
NOPART
^SCR("W4PRMMSD","P","NM",80)
DOPOPT
^SCR("W4PRMMSD","P","NM",82)
PAIDTIME
^SCR("W4PRMMSL")
H
^SCR("W4PRMMSL",1)
                               # migelynl dpnfd mixhnxt zxcbd #                
^SCR("W4PRMMSL",2)
                         {10 } : ('u`h `ll) xakr zxfra migelyn jqn mr cearl m`d
^SCR("W4PRMMSL",3)
                                   {12 } : zxvewn dxeva gewl ihxt jqn bivdl m`d
^SCR("W4PRMMSL",4)
                                             {13  } : jix`z iepiya dry qt`l m`d
^SCR("W4PRMMSL",5)
                            {15 } :              "zgwl" md migelynd lk m`d     
^SCR("W4PRMMSL",6)
                     {30 } : cg` jqna mihixt hixtze zeveaw hixtz bivdl m`d     
^SCR("W4PRMMSL",7)
                             {40 }:                migily zegkep wecal m`d     
^SCR("W4PRMMSL",8)
                             {45 }:  dnley `ly dpnfd xebiy dnqiqa obdl m`d     
^SCR("W4PRMMSL",9)
                             {50 }:sqk xifgd `edy caer ly d`ivia wecal m`d     
^SCR("W4PRMMSL",10)
                        g"y {54  }:    lrn `ed gelyn inc lhany melyzl mekq     
^SCR("W4PRMMSL",11)
                        % {65    }:                   (%) TAW -l      dgpd     
^SCR("W4PRMMSL",12)
  {67 } : (2-dyixc itl,0-`l,1-ok) gewl qihxkl dpnfda gewl ihxt iepiy xiardl m`d
^SCR("W4PRMMSL",13)
                             {69 }:            a-` itl mixr zniyx xcql m`d     
^SCR("W4PRMMSL",14)
             {            71} : ( iza`tl` mixr xcq m`) mixr zniyx zligza xir my
^SCR("W4PRMMSL",15)
                             {70 }:             `adl gewl ly `"k xenyl m`d     
^SCR("W4PRMMSL",16)
                             {78 }:       gelyn zlawa micreq 'qn le`yl m`d     
^SCR("W4PRMMSL",17)
                             {79 }: ze"geca migelyn ly micreq 'qn aygl m`d     
^SCR("W4PRMMSL",18)
                             {80 }:                     iaxin mipinfn xtqn     
^SCR("W4PRMMSL",19)
                        {81      }:               oetlh eilr oi`y gewl 'qn     
^SCR("W4PRMMSL",20)
                          {82    }:                    ilnipin mihixt mekq     
^SCR("W4PRMMSL",21)
                            {83 }:dpzyd dpnfd zaezk m` gelyn onf zepyl m`d     
^SCR("W4PRMMSL",22)
                             {84 }:          ( zewc ) TAW zepnfd zpkdl onf     
^SCR("W4PRMMSL",23)
                             {85 }:         dgilyl dpnfd zlaw oia zewc 'qn     
^SCR("W4PRMMSL",24)
                             {88 }:     dgilyl gelyn 'z z`ved oia zewc 'qn     
^SCR("W4PRMMSL",25)
                            {89  }:    ( mixr zlaha xcbed `l m`) gelyn inc     
^SCR("W4PRMMSL",26)
                             {22 }:          0 gelyn inc ly mekq xyt`l m`d     
^SCR("W4PRMMSL",27)
          {            91} {90   }:                     "mievit" hixt xtqn     
^SCR("W4PRMMSL",28)
          {            93} {92   }:                  "xign zrvd" hixt xtqn     
^SCR("W4PRMMSL",29)
                             {94 }:       mefi ote`a gahnl mipea gelyl m`d     
^SCR("W4PRMMSL",30)
                             {95 }:             cin dnleyy dpnfd xebql m`d     
^SCR("W4PRMMSL",31)
                             {96 }:      melyz onfa cin zipeayg qitcdl m`d     
^SCR("W4PRMMSL",32)
                             {72 }:        iegc melyz ly zeivte` bivdl m`d     
^SCR("W4PRMMSL",33)
                             {97 }:             zipnf dtwd gewll xyt`l m`d     
^SCR("W4PRMMSL",34)
          {98 }: (`l- 0, qnq-2 ,l`ecl-1) gelyn xebiy onfa gewll drced gelyl m`d
^SCR("W4PRMMSL",35)
                             {99 }: xebiyl zepnfd zniyxa lawn my bivdl m`d     
^SCR("W4PRMMSL",36)
                             {86 }: zepnfd zniyxa zelhean zepnfd bivdl m`d     
^SCR("W4PRMMSL",37)
                              {63 }: zepnfd zniyxa "zgwl" zepnfd bivdl m`d     
^SCR("W4PRMMSL",38)
                   {61 } : ( 1 - oyil ycgn , 0 - ycgl oyin ) 1 zepnfd oein     
^SCR("W4PRMMSL",39)
    {62 } :(2 - zaezk itl ,1 - dpnfd 'qn itl , 0 - onf itl ) 2 zepnfd oein     
^SCR("W4PRMMSL",40)
                            {74  } :        zeiegc zepnfd qitcdl dry dfi`a
^SCR("W4PRMMSL",41)
                             {87 }:               MAP GOOGLE -a ynzydl m`d     
^SCR("W4PRMMSL",42)
                                          {60 } : migelynl xniih bivdl m`d     
^SCR("W4PRMMSL",43)
                                       {17 }: migilyn onefn ziiab rval m`d     
^SCR("W4PRMMSL",44)
                                {35 } : hphpi`n dpnfd zrbd onfa sevtiv rval m`d
^SCR("W4PRMMSL",45)
                  {37 } : zihnehe` dxeva onefna enleyy hpxhpi` zepnfd xebql m`d
^SCR("W4PRMMSL",46)
                                                                               
^SCR("W4PRMMSL",47)
                                                                               
^SCR("W4PRMMSL",48)
                                                                               
^SCR("W4PRMMSL",49)
                                                                               
^SCR("W4PRMMSL","AV",1)
íéçåìùîìäðîæäíéøèîøôúøãâä
^SCR("W4PRMMSL","AV",2)
:('õàèàìì)øáëòúøæòáíéçåìùîêñîíòãåáòìíàä
^SCR("W4PRMMSL","AV",3)
:úøöå÷îäøåöáçå÷ìéèøôêñîâéöäìíàä
^SCR("W4PRMMSL","AV",4)
:êéøàúéåðéùáäòùñôàìíàä
^SCR("W4PRMMSL","AV",5)
:"úç÷ì"íäíéçåìùîäìëíàä
^SCR("W4PRMMSL","AV",6)
:ãçàêñîáíéèéøôèéøôúåúåöåá÷èéøôúâéöäìíàä
^SCR("W4PRMMSL","AV",7)
:íéçéìùúåçëåð÷åãáìíàä
^SCR("W4PRMMSL","AV",8)
:äîìåùàìùäðîæäøåâéùäîñéñáïâäìíàä
^SCR("W4PRMMSL","AV",9)
:óñëøéæçäàåäùãáåòìùäàéöéá÷åãáìíàä
^SCR("W4PRMMSL","AV",10)
ç"ù:ìòîàåäçåìùîéîãìèáîùíåìùúìíåëñ
^SCR("W4PRMMSL","AV",11)
%:(%)TAW-ìäçðä
^SCR("W4PRMMSL","AV",12)
:(2-äùéøãéôì,0-àì,1-ïë)çå÷ìñéèøëìäðîæäáçå÷ìéèøôéåðéùøéáòäìíàä
^SCR("W4PRMMSL","AV",13)
:á-àéôìíéøòúîéùøøãñìíàä
^SCR("W4PRMMSL","AV",14)
:(éúáàôìàíéøòøãñíà)íéøòúîéùøúìéçúáøéòíù
^SCR("W4PRMMSL","AV",15)
:àáäìçå÷ììùà"ëøåîùìíàä
^SCR("W4PRMMSL","AV",16)
:çåìùîúìá÷áíéãòåñ'ñîìåàùìíàä
^SCR("W4PRMMSL","AV",17)
:úå"çåãáíéçåìùîìùíéãòåñ'ñîáùçìíàä
^SCR("W4PRMMSL","AV",18)
:éáøéîíéðéîæîøôñî
^SCR("W4PRMMSL","AV",19)
:ïåôìèåéìòïéàùçå÷ì'ñî
^SCR("W4PRMMSL","AV",20)
:éìîéðéîíéèéøôíåëñ
^SCR("W4PRMMSL","AV",21)
:äðúùääðîæäúáåúëíàçåìùîïîæúåðùìíàä
^SCR("W4PRMMSL","AV",22)
:(úå÷ã)TAWúåðîæäúðëäìïîæ
^SCR("W4PRMMSL","AV",23)
:äçéìùìäðîæäúìá÷ïéáúå÷ã'ñî
^SCR("W4PRMMSL","AV",24)
:äçéìùìçåìùî'úúàöåäïéáúå÷ã'ñî
^SCR("W4PRMMSL","AV",25)
:(íéøòúìáèáøãâåäàìíà)çåìùîéîã
^SCR("W4PRMMSL","AV",26)
:0çåìùîéîãìùíåëñøùôàìíàä
^SCR("W4PRMMSL","AV",27)
:"íéåöéô"èéøôøôñî
^SCR("W4PRMMSL","AV",28)
:"øéçîúòöä"èéøôøôñî
^SCR("W4PRMMSL","AV",29)
:íåæéïôåàáçáèîìíéðåáçåìùìíàä
^SCR("W4PRMMSL","AV",30)
:ãéîäîìåùùäðîæäøåâñìíàä
^SCR("W4PRMMSL","AV",31)
:íåìùúïîæáãéîúéðåáùçñéôãäìíàä
^SCR("W4PRMMSL","AV",32)
:éåçãíåìùúìùúåéöôåàâéöäìíàä
^SCR("W4PRMMSL","AV",33)
:úéðîæäô÷äçå÷ììøùôàìíàä
^SCR("W4PRMMSL","AV",34)
:(àì-0,ñîñ-2,ìàåãì-1)çåìùîøåâéùïîæáçå÷ììäòãåäçåìùìíàä
^SCR("W4PRMMSL","AV",35)
:øåâéùìúåðîæäúîéùøáìá÷îíùâéöäìíàä
^SCR("W4PRMMSL","AV",36)
:úåðîæäúîéùøáúåìèåáîúåðîæäâéöäìíàä
^SCR("W4PRMMSL","AV",37)
:úåðîæäúîéùøá"úç÷ì"úåðîæäâéöäìíàä
^SCR("W4PRMMSL","AV",38)
:(1-ïùéìùãçî,0-ùãçìïùéî)1úåðîæäïåéî
^SCR("W4PRMMSL","AV",39)
:(2-úáåúëéôì,1-äðîæä'ñîéôì,0-ïîæéôì)2úåðîæäïåéî
^SCR("W4PRMMSL","AV",40)
:úåéåçãúåðîæäñéôãäìäòùäæéàá
^SCR("W4PRMMSL","AV",41)
:MAPGOOGLE-áùîúùäìíàä
^SCR("W4PRMMSL","AV",42)
:íéçåìùîìøîééèâéöäìíàä
^SCR("W4PRMMSL","AV",43)
:íéçéìùîïîåæîúééáâòöáìíàä
^SCR("W4PRMMSL","AV",44)
:èðèðéàîäðîæäúòâäïîæáóåöôéöòöáìíàä
^SCR("W4PRMMSL","AV",45)
:úéèîåèåàäøåöáïîåæîáåîìåùùèðøèðéàúåðîæäøåâñìíàä
^SCR("W4PRMMSL","AV",46)

^SCR("W4PRMMSL","AV",47)

^SCR("W4PRMMSL","AV",48)

^SCR("W4PRMMSL","AV",49)

^SCR("W4PRMMSL","NAME")
migelynl mixhnxt
^SCR("W4PRMMSL","P",10,"CRD")
2,25,B,1,0
^SCR("W4PRMMSL","P",10,"HELP")

^SCR("W4PRMMSL","P",10,"LMAX")
4
^SCR("W4PRMMSL","P",10,"MUMPS1")

^SCR("W4PRMMSL","P",10,"MUMPS2")

^SCR("W4PRMMSL","P",10,"TYP")
B
^SCR("W4PRMMSL","P",12,"CRD")
3,35,B,1,0
^SCR("W4PRMMSL","P",12,"HELP")

^SCR("W4PRMMSL","P",12,"LMAX")
4
^SCR("W4PRMMSL","P",12,"MUMPS1")

^SCR("W4PRMMSL","P",12,"MUMPS2")

^SCR("W4PRMMSL","P",12,"TYP")
B
^SCR("W4PRMMSL","P",13,"CRD")
4,45,B,1,0
^SCR("W4PRMMSL","P",13,"HELP")

^SCR("W4PRMMSL","P",13,"LMAX")
5
^SCR("W4PRMMSL","P",13,"MUMPS1")

^SCR("W4PRMMSL","P",13,"MUMPS2")

^SCR("W4PRMMSL","P",13,"TYP")
B
^SCR("W4PRMMSL","P",15,"CRD")
5,28,B,1,0
^SCR("W4PRMMSL","P",15,"HELP")

^SCR("W4PRMMSL","P",15,"LMAX")
4
^SCR("W4PRMMSL","P",15,"MUMPS1")

^SCR("W4PRMMSL","P",15,"MUMPS2")

^SCR("W4PRMMSL","P",15,"TYP")
B
^SCR("W4PRMMSL","P",17,"CRD")
43,39,B,1,0
^SCR("W4PRMMSL","P",17,"HELP")

^SCR("W4PRMMSL","P",17,"LMAX")
4
^SCR("W4PRMMSL","P",17,"MUMPS1")

^SCR("W4PRMMSL","P",17,"MUMPS2")

^SCR("W4PRMMSL","P",17,"TYP")
B
^SCR("W4PRMMSL","P",22,"CRD")
26,29,B,1,0
^SCR("W4PRMMSL","P",22,"HELP")

^SCR("W4PRMMSL","P",22,"LMAX")
4
^SCR("W4PRMMSL","P",22,"MUMPS1")

^SCR("W4PRMMSL","P",22,"MUMPS2")

^SCR("W4PRMMSL","P",22,"TYP")
B
^SCR("W4PRMMSL","P",30,"CRD")
6,21,B,1,0
^SCR("W4PRMMSL","P",30,"HELP")

^SCR("W4PRMMSL","P",30,"LMAX")
4
^SCR("W4PRMMSL","P",30,"MUMPS1")

^SCR("W4PRMMSL","P",30,"MUMPS2")

^SCR("W4PRMMSL","P",30,"TYP")
B
^SCR("W4PRMMSL","P",35,"CRD")
44,32,B,1,0
^SCR("W4PRMMSL","P",35,"HELP")

^SCR("W4PRMMSL","P",35,"LMAX")
4
^SCR("W4PRMMSL","P",35,"MUMPS1")

^SCR("W4PRMMSL","P",35,"MUMPS2")

^SCR("W4PRMMSL","P",35,"TYP")
B
^SCR("W4PRMMSL","P",37,"CRD")
45,18,B,1,0
^SCR("W4PRMMSL","P",37,"HELP")

^SCR("W4PRMMSL","P",37,"LMAX")
4
^SCR("W4PRMMSL","P",37,"MUMPS1")

^SCR("W4PRMMSL","P",37,"MUMPS2")

^SCR("W4PRMMSL","P",37,"TYP")
B
^SCR("W4PRMMSL","P",40,"CRD")
7,29,B,1,0
^SCR("W4PRMMSL","P",40,"HELP")

^SCR("W4PRMMSL","P",40,"LMAX")
4
^SCR("W4PRMMSL","P",40,"MUMPS1")

^SCR("W4PRMMSL","P",40,"MUMPS2")

^SCR("W4PRMMSL","P",40,"TYP")
B
^SCR("W4PRMMSL","P",45,"CRD")
8,29,B,1,0
^SCR("W4PRMMSL","P",45,"HELP")

^SCR("W4PRMMSL","P",45,"LMAX")
4
^SCR("W4PRMMSL","P",45,"MUMPS1")

^SCR("W4PRMMSL","P",45,"MUMPS2")

^SCR("W4PRMMSL","P",45,"TYP")
B
^SCR("W4PRMMSL","P",50,"CRD")
9,29,B,1,0
^SCR("W4PRMMSL","P",50,"HELP")

^SCR("W4PRMMSL","P",50,"LMAX")
4
^SCR("W4PRMMSL","P",50,"MUMPS1")

^SCR("W4PRMMSL","P",50,"MUMPS2")

^SCR("W4PRMMSL","P",50,"TYP")
B
^SCR("W4PRMMSL","P",54,"CRD")
10,28,N,5,1
^SCR("W4PRMMSL","P",54,"HELP")

^SCR("W4PRMMSL","P",54,"LMAX")
5
^SCR("W4PRMMSL","P",54,"MUMPS1")

^SCR("W4PRMMSL","P",54,"MUMPS2")

^SCR("W4PRMMSL","P",54,"TYP")
N
^SCR("W4PRMMSL","P",60,"CRD")
42,42,B,1,0
^SCR("W4PRMMSL","P",60,"HELP")

^SCR("W4PRMMSL","P",60,"LMAX")
4
^SCR("W4PRMMSL","P",60,"MUMPS1")

^SCR("W4PRMMSL","P",60,"MUMPS2")

^SCR("W4PRMMSL","P",60,"TYP")
B
^SCR("W4PRMMSL","P",61,"CRD")
38,19,N,1,0
^SCR("W4PRMMSL","P",61,"HELP")

^SCR("W4PRMMSL","P",61,"LMAX")
4
^SCR("W4PRMMSL","P",61,"MUMPS1")

^SCR("W4PRMMSL","P",61,"MUMPS2")

^SCR("W4PRMMSL","P",61,"TYP")
N
^SCR("W4PRMMSL","P",62,"CRD")
39,4,N,1,0
^SCR("W4PRMMSL","P",62,"HELP")

^SCR("W4PRMMSL","P",62,"LMAX")
4
^SCR("W4PRMMSL","P",62,"MUMPS1")

^SCR("W4PRMMSL","P",62,"MUMPS2")

^SCR("W4PRMMSL","P",62,"TYP")
N
^SCR("W4PRMMSL","P",63,"CRD")
37,30,B,1,0
^SCR("W4PRMMSL","P",63,"HELP")

^SCR("W4PRMMSL","P",63,"LMAX")
4
^SCR("W4PRMMSL","P",63,"MUMPS1")

^SCR("W4PRMMSL","P",63,"MUMPS2")

^SCR("W4PRMMSL","P",63,"TYP")
B
^SCR("W4PRMMSL","P",65,"CRD")
11,26,N,4,2
^SCR("W4PRMMSL","P",65,"HELP")

^SCR("W4PRMMSL","P",65,"LMAX")
7
^SCR("W4PRMMSL","P",65,"MUMPS1")

^SCR("W4PRMMSL","P",65,"MUMPS2")

^SCR("W4PRMMSL","P",65,"TYP")
N
^SCR("W4PRMMSL","P",67,"CRD")
12,2,E,1,0
^SCR("W4PRMMSL","P",67,"HELP")

^SCR("W4PRMMSL","P",67,"LMAX")
4
^SCR("W4PRMMSL","P",67,"MUMPS1")

^SCR("W4PRMMSL","P",67,"MUMPS2")

^SCR("W4PRMMSL","P",67,"TYP")
E
^SCR("W4PRMMSL","P",69,"CRD")
13,29,B,1,0
^SCR("W4PRMMSL","P",69,"HELP")

^SCR("W4PRMMSL","P",69,"LMAX")
4
^SCR("W4PRMMSL","P",69,"MUMPS1")

^SCR("W4PRMMSL","P",69,"MUMPS2")

^SCR("W4PRMMSL","P",69,"TYP")
B
^SCR("W4PRMMSL","P",70,"CRD")
15,29,B,1,0
^SCR("W4PRMMSL","P",70,"HELP")

^SCR("W4PRMMSL","P",70,"LMAX")
4
^SCR("W4PRMMSL","P",70,"MUMPS1")

^SCR("W4PRMMSL","P",70,"MUMPS2")

^SCR("W4PRMMSL","P",70,"MUST")

^SCR("W4PRMMSL","P",70,"TYP")
B
^SCR("W4PRMMSL","P",71,"CRD")
14,29,H,15,0
^SCR("W4PRMMSL","P",71,"HELP")

^SCR("W4PRMMSL","P",71,"LMAX")
15
^SCR("W4PRMMSL","P",71,"MUMPS1")

^SCR("W4PRMMSL","P",71,"MUMPS2")

^SCR("W4PRMMSL","P",71,"TYP")
H
^SCR("W4PRMMSL","P",72,"CRD")
32,29,B,1,0
^SCR("W4PRMMSL","P",72,"HELP")

^SCR("W4PRMMSL","P",72,"LMAX")
4
^SCR("W4PRMMSL","P",72,"MUMPS1")

^SCR("W4PRMMSL","P",72,"MUMPS2")

^SCR("W4PRMMSL","P",72,"TYP")
B
^SCR("W4PRMMSL","P",74,"CRD")
40,28,T,5,0
^SCR("W4PRMMSL","P",74,"HELP")

^SCR("W4PRMMSL","P",74,"LMAX")
5
^SCR("W4PRMMSL","P",74,"MUMPS1")

^SCR("W4PRMMSL","P",74,"MUMPS2")

^SCR("W4PRMMSL","P",74,"TYP")
T
^SCR("W4PRMMSL","P",78,"CRD")
16,29,B,1,0
^SCR("W4PRMMSL","P",78,"HELP")

^SCR("W4PRMMSL","P",78,"LMAX")
4
^SCR("W4PRMMSL","P",78,"MUMPS1")

^SCR("W4PRMMSL","P",78,"MUMPS2")

^SCR("W4PRMMSL","P",78,"TYP")
B
^SCR("W4PRMMSL","P",79,"CRD")
17,29,B,1,0
^SCR("W4PRMMSL","P",79,"HELP")

^SCR("W4PRMMSL","P",79,"LMAX")
4
^SCR("W4PRMMSL","P",79,"MUMPS1")

^SCR("W4PRMMSL","P",79,"MUMPS2")

^SCR("W4PRMMSL","P",79,"TYP")
B
^SCR("W4PRMMSL","P",80,"CRD")
18,29,N,4,0
^SCR("W4PRMMSL","P",80,"HELP")

^SCR("W4PRMMSL","P",80,"LMAX")
4
^SCR("W4PRMMSL","P",80,"MUMPS1")

^SCR("W4PRMMSL","P",80,"MUMPS2")

^SCR("W4PRMMSL","P",80,"TYP")
N
^SCR("W4PRMMSL","P",81,"CRD")
19,24,E,9,0
^SCR("W4PRMMSL","P",81,"HELP")

^SCR("W4PRMMSL","P",81,"LMAX")
9
^SCR("W4PRMMSL","P",81,"MUMPS1")

^SCR("W4PRMMSL","P",81,"MUMPS2")

^SCR("W4PRMMSL","P",81,"TYP")
E
^SCR("W4PRMMSL","P",82,"CRD")
20,26,N,6,2
^SCR("W4PRMMSL","P",82,"HELP")

^SCR("W4PRMMSL","P",82,"LMAX")
7
^SCR("W4PRMMSL","P",82,"MUMPS1")

^SCR("W4PRMMSL","P",82,"MUMPS2")

^SCR("W4PRMMSL","P",82,"TYP")
N
^SCR("W4PRMMSL","P",83,"CRD")
21,28,B,1,0
^SCR("W4PRMMSL","P",83,"HELP")

^SCR("W4PRMMSL","P",83,"LMAX")
4
^SCR("W4PRMMSL","P",83,"MUMPS1")

^SCR("W4PRMMSL","P",83,"MUMPS2")

^SCR("W4PRMMSL","P",83,"TYP")
B
^SCR("W4PRMMSL","P",84,"CRD")
22,29,N,4,0
^SCR("W4PRMMSL","P",84,"HELP")

^SCR("W4PRMMSL","P",84,"LMAX")
4
^SCR("W4PRMMSL","P",84,"MUMPS1")
S:$G(TAWTIME)="" TAWTIME=30
^SCR("W4PRMMSL","P",84,"MUMPS2")

^SCR("W4PRMMSL","P",84,"TYP")
N
^SCR("W4PRMMSL","P",85,"CRD")
23,29,N,4,0
^SCR("W4PRMMSL","P",85,"HELP")

^SCR("W4PRMMSL","P",85,"LMAX")
4
^SCR("W4PRMMSL","P",85,"MUMPS1")

^SCR("W4PRMMSL","P",85,"MUMPS2")

^SCR("W4PRMMSL","P",85,"MUST")

^SCR("W4PRMMSL","P",85,"TYP")
N
^SCR("W4PRMMSL","P",86,"CRD")
36,29,B,1,0
^SCR("W4PRMMSL","P",86,"HELP")

^SCR("W4PRMMSL","P",86,"LMAX")
4
^SCR("W4PRMMSL","P",86,"MUMPS1")

^SCR("W4PRMMSL","P",86,"MUMPS2")

^SCR("W4PRMMSL","P",86,"TYP")
B
^SCR("W4PRMMSL","P",87,"CRD")
41,29,B,1,0
^SCR("W4PRMMSL","P",87,"HELP")

^SCR("W4PRMMSL","P",87,"LMAX")
4
^SCR("W4PRMMSL","P",87,"MUMPS1")

^SCR("W4PRMMSL","P",87,"MUMPS2")

^SCR("W4PRMMSL","P",87,"TYP")
B
^SCR("W4PRMMSL","P",88,"CRD")
24,29,N,4,0
^SCR("W4PRMMSL","P",88,"HELP")

^SCR("W4PRMMSL","P",88,"LMAX")
4
^SCR("W4PRMMSL","P",88,"MUMPS1")

^SCR("W4PRMMSL","P",88,"MUMPS2")

^SCR("W4PRMMSL","P",88,"TYP")
N
^SCR("W4PRMMSL","P",89,"CRD")
25,28,N,5,0
^SCR("W4PRMMSL","P",89,"HELP")

^SCR("W4PRMMSL","P",89,"LMAX")
5
^SCR("W4PRMMSL","P",89,"MUMPS1")

^SCR("W4PRMMSL","P",89,"MUMPS2")

^SCR("W4PRMMSL","P",89,"TYP")
N
^SCR("W4PRMMSL","P",90,"CHECK")
Y
^SCR("W4PRMMSL","P",90,"CRD")
27,27,E,6,0
^SCR("W4PRMMSL","P",90,"FNC")

^SCR("W4PRMMSL","P",90,"GLOB")
PAR
^SCR("W4PRMMSL","P",90,"HELP")

^SCR("W4PRMMSL","P",90,"LMAX")
6
^SCR("W4PRMMSL","P",90,"MUMPS1")

^SCR("W4PRMMSL","P",90,"MUMPS2")

^SCR("W4PRMMSL","P",90,"NLN")
20
^SCR("W4PRMMSL","P",90,"RZD")
**
^SCR("W4PRMMSL","P",90,"TOPB")
8
^SCR("W4PRMMSL","P",90,"TYP")
E
^SCR("W4PRMMSL","P",90,"VRB")
PIZUIM1
^SCR("W4PRMMSL","P",91,"CRD")
27,26,H,15
^SCR("W4PRMMSL","P",91,"HELP")

^SCR("W4PRMMSL","P",91,"LMAX")
15
^SCR("W4PRMMSL","P",91,"MUMPS1")

^SCR("W4PRMMSL","P",91,"MUMPS2")

^SCR("W4PRMMSL","P",91,"OUTPUT")

^SCR("W4PRMMSL","P",91,"TYP")
H
^SCR("W4PRMMSL","P",92,"CHECK")
Y
^SCR("W4PRMMSL","P",92,"CRD")
28,27,E,6,0
^SCR("W4PRMMSL","P",92,"FNC")

^SCR("W4PRMMSL","P",92,"GLOB")
PAR
^SCR("W4PRMMSL","P",92,"HELP")

^SCR("W4PRMMSL","P",92,"LMAX")
6
^SCR("W4PRMMSL","P",92,"MUMPS1")

^SCR("W4PRMMSL","P",92,"MUMPS2")

^SCR("W4PRMMSL","P",92,"NLN")
20
^SCR("W4PRMMSL","P",92,"RZD")
**
^SCR("W4PRMMSL","P",92,"TOPB")
8
^SCR("W4PRMMSL","P",92,"TYP")
E
^SCR("W4PRMMSL","P",92,"VRB")
HZMH1
^SCR("W4PRMMSL","P",93,"CRD")
28,26,H,5
^SCR("W4PRMMSL","P",93,"HELP")

^SCR("W4PRMMSL","P",93,"LMAX")
15
^SCR("W4PRMMSL","P",93,"MUMPS1")

^SCR("W4PRMMSL","P",93,"MUMPS2")

^SCR("W4PRMMSL","P",93,"OUTPUT")

^SCR("W4PRMMSL","P",93,"TYP")
H
^SCR("W4PRMMSL","P",94,"CRD")
29,29,B,1,0
^SCR("W4PRMMSL","P",94,"HELP")

^SCR("W4PRMMSL","P",94,"LMAX")
4
^SCR("W4PRMMSL","P",94,"MUMPS1")

^SCR("W4PRMMSL","P",94,"MUMPS2")

^SCR("W4PRMMSL","P",94,"TYP")
B
^SCR("W4PRMMSL","P",95,"CRD")
30,29,B,1,0
^SCR("W4PRMMSL","P",95,"HELP")

^SCR("W4PRMMSL","P",95,"LMAX")
4
^SCR("W4PRMMSL","P",95,"MUMPS1")

^SCR("W4PRMMSL","P",95,"MUMPS2")

^SCR("W4PRMMSL","P",95,"TYP")
B
^SCR("W4PRMMSL","P",96,"CRD")
31,29,B,1,0
^SCR("W4PRMMSL","P",96,"HELP")

^SCR("W4PRMMSL","P",96,"LMAX")
4
^SCR("W4PRMMSL","P",96,"MUMPS1")

^SCR("W4PRMMSL","P",96,"MUMPS2")

^SCR("W4PRMMSL","P",96,"TYP")
B
^SCR("W4PRMMSL","P",97,"CRD")
33,29,B,1,0
^SCR("W4PRMMSL","P",97,"HELP")

^SCR("W4PRMMSL","P",97,"LMAX")
4
^SCR("W4PRMMSL","P",97,"MUMPS1")

^SCR("W4PRMMSL","P",97,"MUMPS2")

^SCR("W4PRMMSL","P",97,"TYP")
B
^SCR("W4PRMMSL","P",98,"CRD")
34,10,E,1,0
^SCR("W4PRMMSL","P",98,"HELP")

^SCR("W4PRMMSL","P",98,"LMAX")
4
^SCR("W4PRMMSL","P",98,"MUMPS1")

^SCR("W4PRMMSL","P",98,"MUMPS2")

^SCR("W4PRMMSL","P",98,"TYP")
E
^SCR("W4PRMMSL","P",99,"CRD")
35,29,B,1,0
^SCR("W4PRMMSL","P",99,"HELP")

^SCR("W4PRMMSL","P",99,"LMAX")
4
^SCR("W4PRMMSL","P",99,"MUMPS1")

^SCR("W4PRMMSL","P",99,"MUMPS2")

^SCR("W4PRMMSL","P",99,"TYP")
B
^SCR("W4PRMMSL","P","NAME","AUTOMZM")
37
^SCR("W4PRMMSL","P","NAME","BDNOCHSL")
40
^SCR("W4PRMMSL","P","NAME","CITYDEF")
71
^SCR("W4PRMMSL","P","NAME","CLSDLV")
95
^SCR("W4PRMMSL","P","NAME","DLVDMSH0")
22
^SCR("W4PRMMSL","P","NAME","DLVMOUSE")
10
^SCR("W4PRMMSL","P","NAME","DLVN2O")
61
^SCR("W4PRMMSL","P","NAME","DPS")
17
^SCR("W4PRMMSL","P","NAME","DSHL")
89
^SCR("W4PRMMSL","P","NAME","GRITMSL")
30
^SCR("W4PRMMSL","P","NAME","HZMH")
92
^SCR("W4PRMMSL","P","NAME","HZMH1")
93
^SCR("W4PRMMSL","P","NAME","LKKLALI")
81
^SCR("W4PRMMSL","P","NAME","MAXMSLSD")
80
^SCR("W4PRMMSL","P","NAME","MSHHBNOW")
96
^SCR("W4PRMMSL","P","NAME","MSLMHMIN")
82
^SCR("W4PRMMSL","P","NAME","MSLSD")
78
^SCR("W4PRMMSL","P","NAME","NDTNTM")
13
^SCR("W4PRMMSL","P","NAME","NEWINET")
35
^SCR("W4PRMMSL","P","NAME","NOCHKDLV")
45
^SCR("W4PRMMSL","P","NAME","NOCHNTM")
83
^SCR("W4PRMMSL","P","NAME","NOSVLKCH")
67
^SCR("W4PRMMSL","P","NAME","NOWILLPY")
72
^SCR("W4PRMMSL","P","NAME","PIZUIM")
90
^SCR("W4PRMMSL","P","NAME","PIZUIM1")
91
^SCR("W4PRMMSL","P","NAME","POLYGON")
87
^SCR("W4PRMMSL","P","NAME","PRINTALL")
74
^SCR("W4PRMMSL","P","NAME","SDMSL")
79
^SCR("W4PRMMSL","P","NAME","SHORTDET")
12
^SCR("W4PRMMSL","P","NAME","SHOWDEL")
86
^SCR("W4PRMMSL","P","NAME","SHOWMKBL")
99
^SCR("W4PRMMSL","P","NAME","SHOWTAW")
63
^SCR("W4PRMMSL","P","NAME","SLHOV")
50
^SCR("W4PRMMSL","P","NAME","SND2MAIL")
98
^SCR("W4PRMMSL","P","NAME","SNDDLKTC")
94
^SCR("W4PRMMSL","P","NAME","SORTCITY")
69
^SCR("W4PRMMSL","P","NAME","TAWDLV")
15
^SCR("W4PRMMSL","P","NAME","TAWMSLH")
65
^SCR("W4PRMMSL","P","NAME","TAWTIME")
84
^SCR("W4PRMMSL","P","NAME","TEMPCRED")
97
^SCR("W4PRMMSL","P","NAME","TIMEHZ")
85
^SCR("W4PRMMSL","P","NAME","TIMERMSL")
60
^SCR("W4PRMMSL","P","NAME","TIMESORT")
62
^SCR("W4PRMMSL","P","NAME","TIMETM")
88
^SCR("W4PRMMSL","P","NAME","TSHLDM")
54
^SCR("W4PRMMSL","P","NAME","VIZSVNO")
70
^SCR("W4PRMMSL","P","NM",10)
DLVMOUSE
^SCR("W4PRMMSL","P","NM",12)
SHORTDET
^SCR("W4PRMMSL","P","NM",13)
NDTNTM
^SCR("W4PRMMSL","P","NM",15)
TAWDLV
^SCR("W4PRMMSL","P","NM",17)
DPS
^SCR("W4PRMMSL","P","NM",22)
DLVDMSH0
^SCR("W4PRMMSL","P","NM",30)
GRITMSL
^SCR("W4PRMMSL","P","NM",35)
NEWINET
^SCR("W4PRMMSL","P","NM",37)
AUTOMZM
^SCR("W4PRMMSL","P","NM",40)
BDNOCHSL
^SCR("W4PRMMSL","P","NM",45)
NOCHKDLV
^SCR("W4PRMMSL","P","NM",50)
SLHOV
^SCR("W4PRMMSL","P","NM",54)
TSHLDM
^SCR("W4PRMMSL","P","NM",60)
TIMERMSL
^SCR("W4PRMMSL","P","NM",61)
DLVN2O
^SCR("W4PRMMSL","P","NM",62)
TIMESORT
^SCR("W4PRMMSL","P","NM",63)
SHOWTAW
^SCR("W4PRMMSL","P","NM",65)
TAWMSLH
^SCR("W4PRMMSL","P","NM",67)
NOSVLKCH
^SCR("W4PRMMSL","P","NM",69)
SORTCITY
^SCR("W4PRMMSL","P","NM",70)
VIZSVNO
^SCR("W4PRMMSL","P","NM",71)
CITYDEF
^SCR("W4PRMMSL","P","NM",72)
NOWILLPY
^SCR("W4PRMMSL","P","NM",74)
PRINTALL
^SCR("W4PRMMSL","P","NM",78)
MSLSD
^SCR("W4PRMMSL","P","NM",79)
SDMSL
^SCR("W4PRMMSL","P","NM",80)
MAXMSLSD
^SCR("W4PRMMSL","P","NM",81)
LKKLALI
^SCR("W4PRMMSL","P","NM",82)
MSLMHMIN
^SCR("W4PRMMSL","P","NM",83)
NOCHNTM
^SCR("W4PRMMSL","P","NM",84)
TAWTIME
^SCR("W4PRMMSL","P","NM",85)
TIMEHZ
^SCR("W4PRMMSL","P","NM",86)
SHOWDEL
^SCR("W4PRMMSL","P","NM",87)
POLYGON
^SCR("W4PRMMSL","P","NM",88)
TIMETM
^SCR("W4PRMMSL","P","NM",89)
DSHL
^SCR("W4PRMMSL","P","NM",90)
PIZUIM
^SCR("W4PRMMSL","P","NM",91)
PIZUIM1
^SCR("W4PRMMSL","P","NM",92)
HZMH
^SCR("W4PRMMSL","P","NM",93)
HZMH1
^SCR("W4PRMMSL","P","NM",94)
SNDDLKTC
^SCR("W4PRMMSL","P","NM",95)
CLSDLV
^SCR("W4PRMMSL","P","NM",96)
MSHHBNOW
^SCR("W4PRMMSL","P","NM",97)
TEMPCRED
^SCR("W4PRMMSL","P","NM",98)
SND2MAIL
^SCR("W4PRMMSL","P","NM",99)
SHOWMKBL
^SCR("W4PRMPC")
H
^SCR("W4PRMPC",1)
                               # zepnfd zqtcdl mixhnxt #                       
^SCR("W4PRMPC",2)
 {05 }:( 0 - `l , 2 - mpiga mihixt llek , 1 - ok )          fkexn oeayg z`ved  
^SCR("W4PRMPC",3)
                         {06 }: (0 - `l , 1 - ok ) zhxetn dxeva zipeayg zqtcd  
^SCR("W4PRMPC",4)
                         {07 }:( 0 - `l , 1 - ok )       zifrela hixt my `lnl  
^SCR("W4PRMPC",5)
                  {08 }:( 0 - `l , 1 - ok ) gahnl oeaa zifrela hixt my qitcdl  
^SCR("W4PRMPC",6)
                         {09 }:( 0 - `l , 1 - ok) zifrela oeayg qitcdl zexyt`  
^SCR("W4PRMPC",7)
 {10 }: (0-micew itl,1- [zeiwqr zegex`l] zepn itl,2-dclwd xcq itl) dqtcd oein  
^SCR("W4PRMPC",8)
          {11 }:( 0 - `l , 1 - ok )  miiy`x mihixtd oiia geex zxey siqedl m`d  
^SCR("W4PRMPC",9)
       {04 }:( 0 - `l , 1 - ok ) mihqd jezay mihixt oiia geex zxey cixedl m`d  
^SCR("W4PRMPC",10)
               {12 }:( 0 - `l , 1 - ok )      mihixtd oia dcxtd ew qitcdl m`d  
^SCR("W4PRMPC",11)
               {14 }:( 0 - `l , 1 - ok )         cxtp oeaa hixt lk qitcdl m`d  
^SCR("W4PRMPC",12)
    {13 }:( 1 - hlea oteba, 2 - ybcen oteba , 0 - libx oteba ) dpnfd onf qtcd  
^SCR("W4PRMPC",13)
    {15 }:( 1 - hlea oteba, 2 - ybcen oteba , 0 - libx oteba ) dpnfd 'qn qtcd  
^SCR("W4PRMPC",14)
   {16 }:( 0 - libx oteba , 1 - hlea oteba , 2 - ybcen oteba ) ogley 'qn qtcd  
^SCR("W4PRMPC",15)
   {19 }:( 1 - hlea oteba, 2 - ybcen oteba , 0 - libx oteba ) micreq 'qn qtcd  
^SCR("W4PRMPC",16)
                         {17 }:( 0 - `l , 1 - ok )   zetqezl zxzek qitcdl m`d  
^SCR("W4PRMPC",17)
   {18 }:(0 - `l,2-ixewn 'tcna wx ,1 - ok ) iy`x xveny zqtcn eze`l ztqez qtcd  
^SCR("W4PRMPC",18)
 {20 }:(3-ce`n lecb,2-lecb,1-libx oteba,0-qitcdl `l) oeaa hixt cew qitcdl ji`  
^SCR("W4PRMPC",19)
       {21 }: (0 - ohwa lkd, 2- hixt wx,1-zetqeze hixt) zelecb zeize`a qitcdl  
^SCR("W4PRMPC",20)
  {29}:(0-lecba lkd,2-ziwqr 'x`l,1-'qez 'aw mr hixtl) zephw zeize`a hq qitcdl  
^SCR("W4PRMPC",21)
                                                           dcxtd ew qtcdl m`d  
^SCR("W4PRMPC",22)
                         {26 }: ( 0 - `l ,1 - ok )  zephw zeize`a dxrd qitcdl  
^SCR("W4PRMPC",23)
  {27 }:(hlea-3,deab-2,jenp dar-1,libx dar-0) zelecb zeize` qitcdl oteb dfi`a  
^SCR("W4PRMPC",24)
              {28 }: zetqez zeveaw mr hixta mihqd oia zeinex zextq qitcdl m`d  
^SCR("W4PRMPC",25)
         {22 }:(2 - mly ogley wx ,0 - `l ,1 - ok )   gahna milehia qitcdl m`d  
^SCR("W4PRMPC",26)
       {23 }: (3-dyixc itl,2-mly ogley wx,0-`l,1-ok) gahna 'dxard' qitcdl m`d  
^SCR("W4PRMPC",27)
 {24 }:( 0 - `l ,2 - mixgaen mihixt wx,1 - ok ) wzrd mr cgia dpnfd qitcdl m`d  
^SCR("W4PRMPC",28)
                     {25 }: ( 0 - `l ,1 - ok ) xa zqtcnl xa zepnfd qitcdl m`d  
^SCR("W4PRMPC",29)
  {30 }:( 2 - zeqtcnd lkl ,1 - xa zqtcnn ueg , 0 - `l ) TAW zepnfd qitcdl m`d  
^SCR("W4PRMPC",30)
                                  {                     31}  TAW -l dxrd hqwh  
^SCR("W4PRMPC",31)
                   {32 }: (1 - zxzeka , 0 - dxey lka) TAW -l dxrd qitcdl dti`  
^SCR("W4PRMPC",32)
                         {35 }: ( 0 - `l ,1 - ok ) xidn ogleyl gtq qitcdl m`d  
^SCR("W4PRMPC",33)
                     {37 }: (0 - `l ,1 - ok) xidn ogleya oinfnd my qitcdl m`d  
^SCR("W4PRMPC",34)
  {40 }:(0 -`l,4-cinz,2-migelyne dcrqn,3-migelyne TAW,1-migelyn) glynl qitcdl  
^SCR("W4PRMPC",35)
                            {42 }: ( 0 - `l , 1 - ok ) oeayga dxrd qitcdl m`d  
^SCR("W4PRMPC",36)
                              {43 }: ( 0 - `l ,1 - ok ) lehia yelz qitcdl m`d  
^SCR("W4PRMPC",37)
                              {44 }: ( 0 - `l ,1 - ok )  dgpd yelz qitcdl m`d  
^SCR("W4PRMPC",38)
  {45 }:(0-qitcdl `l,2-zipeaygae oeayga,1-oeayga ) "zexiy llek `l" qitcdl m`d  
^SCR("W4PRMPC",39)
               {47 }:( 0 - `l , 1 - ok )  dtwd yelz mewna gelyn 'z qitcdl m`d  
^SCR("W4PRMPC",40)
                      {50 }:       [ - 1  qitcdl `l ] dtwd yelz ly miwzrd 'qn  
^SCR("W4PRMPC",41)
                                  {55 }:      dtwd yelza gewl zxzi qitcdl m`d  
^SCR("W4PRMPC",42)
                                  {60 }:        zipeayga gewl zxzi qitcdl m`d  
^SCR("W4PRMPC",43)
                     {65 } : `"k ly zepexg` zextq 4 wx dcrqnl gtqa qitcdl m`d  
^SCR("W4PRMPC",44)
      {67 }: (2-dcrqnl wx,1-gewll wx,0-dcrqnle gewll) qitcdl `"k ly migtq dnk  
^SCR("W4PRMPC",45)
   {68 }: (2-dcrqnl wx,1-gewll wx,0-dcrqnle gewll) qitcdl qia oz ly migtq dnk  
^SCR("W4PRMPC",46)
                    {70 } : (ebel mr sc lr miqitcn m`) ebell xi`ydl zexey dnk  
^SCR("W4PRMPC",47)
                 {72                                         } : ebel uaew my  
^SCR("W4PRMPC",48)
                                      {73  } : ( milqwit ) ebel zpenz ly daeb  
^SCR("W4PRMPC",49)
                                      {74  } : ( milqwit ) ebel zpenz ly agex  
^SCR("W4PRMPC",50)
                                                 {77  }: wqrd ihxt qitcdl m`d  
^SCR("W4PRMPC",51)
                        {75 } : dlecb zqtcnl zipeayga hixt cew zqtcd lhal m`d  
^SCR("W4PRMPC",52)
                        {76 } :    xewn zqtcd ixg` qn zipeayg wzrd qitcdl m`d  
^SCR("W4PRMPC",53)
                        {78 } :                cx`weilee ly miyelz qitcdl m`d  
^SCR("W4PRMPC",54)
                                {80 }: dtwda zeipw lr  melyz zelaw qitcdl m`d  
^SCR("W4PRMPC",55)
                                {82 }: zeipeayg zniyx mr dlawl jtq qitcdl m`d  
^SCR("W4PRMPC",56)
                                       {85 }: OTH zegpda dgpd lceb qitcdl m`d  
^SCR("W4PRMPC",57)
                           {87 }: "n"rn llek" dcenr zfkxn zipeayga qitcdl m`d  
^SCR("W4PRMPC",58)
                      {89 }: ihnehe` dtew zqtcnl `ayl xeciy ze`vez qitcdl m`d  
^SCR("W4PRMPC",59)
                           {90 }:  zegkep oerya d`ivie dqipk iyelz qitcdl m`d  
^SCR("W4PRMPC",60)
                              {92 }:  dxibn zgizt ixg` dqtcda i`lic zeyrl m`d  
^SCR("W4PRMPC",61)
                                  {94 }:  gewll ziwlg zipeayga tih qitcdl m`d  
^SCR("W4PRMPC","AV",1)
,ubnzv,xpsvkohrynrp
^SCR("W4PRMPC","AV",2)
:(0-tk'2-obhjcohyhrpkkuf'1-if)zfurniucaj,tmuv
^SCR("W4PRMPC","AV",3)
:(0-tk'1-if),yrupnvrumc,hbucaj,xpsv
^SCR("W4PRMPC","AV",4)
:(0-tk'1-if),hzgukcyhrpoatknk
^SCR("W4PRMPC","AV",5)
:(0-tk'1-if)jcynkiucc,hzgukcyhrpoaxhpsvk
^SCR("W4PRMPC","AV",6)
:(0-tk'1-if),hzgukciucajxhpsvk,urapt
^SCR("W4PRMPC","AV",7)
:(0-ohsuehpk'1-hexg,ujur,ubnhpk'2-vskevrsxhpk)vxpsviuhn
^SCR("W4PRMPC","AV",8)
:(0-tk'1-if)ohhatrohyhrpvihhcjuur,rua;hxuvkotv
^SCR("W4PRMPC","AV",9)
:(0-tk'1-if)ohyxvlu,caohyhrpihhcjuur,ruashruvkotv
^SCR("W4PRMPC","AV",10)
:(0-tk'1-if)ohyhrpvihcvsrpvuexhpsvkotv
^SCR("W4PRMPC","AV",11)
:(0-tk'1-if)srpbiuccyhrpkfxhpsvkotv
^SCR("W4PRMPC","AV",12)
:(1-ykucipudc'2-adsunipudc'0-khdripudc)vbnzvinzxpsv
^SCR("W4PRMPC","AV",13)
:(1-ykucipudc'2-adsunipudc'0-khdripudc)vbnzvwxnxpsv
^SCR("W4PRMPC","AV",14)
:(0-khdripudc'1-ykucipudc'2-adsunipudc)ijkuawxnxpsv
^SCR("W4PRMPC","AV",15)
:(1-ykucipudc'2-adsunipudc'0-khdripudc)ohsguxwxnxpsv
^SCR("W4PRMPC","AV",16)
:(0-tk'1-if),upxu,k,r,ufxhpsvkotv
^SCR("W4PRMPC","AV",17)
:(0-tk'2-hruenwpsncer'1-if)hatrrmuna,xpsnu,utk,pxu,xpsv
^SCR("W4PRMPC","AV",18)
:(3-sutnkusd'2-kusd'1-khdripudc'0-xhpsvktk)iuccyhrpsuexhpsvklht
^SCR("W4PRMPC","AV",19)
:(0-iyeckfv'2-yhrper'1-,upxu,uyhrp),ukusd,uh,utcxhpsvk
^SCR("W4PRMPC","AV",20)
:(0-kusdckfv'2-,hexgwrtk'1-wxu,wceogyhrpk),ubye,uh,utcyxxhpsvk
^SCR("W4PRMPC","AV",21)
vsrpvuexpsvkotv
^SCR("W4PRMPC","AV",22)
:(0-tk'1-if),ubye,uh,utcvrgvxhpsvk
^SCR("W4PRMPC","AV",23)
:(ykuc-3'vucd-2'lunbvcg-1'khdrvcg-0),ukusd,uh,utxhpsvkipudvzhtc
^SCR("W4PRMPC","AV",24)
:,upxu,,umuceogyhrpcohyxvihc,uhnur,urpxxhpsvkotv
^SCR("W4PRMPC","AV",25)
:(2-okaijkuaer'0-tk'1-if)jcyncohkuyhcxhpsvkotv
^SCR("W4PRMPC","AV",26)
:(3-vahrshpk'2-okaijkuaer'0-tk'1-if)jcyncwvrcgvwxhpsvkotv
^SCR("W4PRMPC","AV",27)
:(0-tk'2-ohrjcunohyhrper'1-if)e,gvogsjhcvbnzvxhpsvkotv
^SCR("W4PRMPC","AV",28)
:(0-tk'1-if)rc,xpsnkrc,ubnzvxhpsvkotv
^SCR("W4PRMPC","AV",29)
:(2-,uxpsnvkfk'1-rc,xpsnn•uj'0-tk)TAW,ubnzvxhpsvkotv
^SCR("W4PRMPC","AV",30)
TAW-kvrgvyxey
^SCR("W4PRMPC","AV",31)
:(1-,r,ufc'0-vruakfc)TAW-kvrgvxhpsvkvpht
^SCR("W4PRMPC","AV",32)
:(0-tk'1-if)rhvnijkuakjpxxhpsvkotv
^SCR("W4PRMPC","AV",33)
:(0-tk'1-if)rhvnijkuacihnznvoaxhpsvkotv
^SCR("W4PRMPC","AV",34)
:(0-tk'4-shn,'2-ohjukanuvsgxn'3-ohjukanuTAW'1-ohjukan)jkankxhpsvk
^SCR("W4PRMPC","AV",35)
:(0-tk'1-if)iucajcvrgvxhpsvkotv
^SCR("W4PRMPC","AV",36)
:(0-tk'1-if)kuyhcauk,xhpsvkotv
^SCR("W4PRMPC","AV",37)
:(0-tk'1-if)vjbvauk,xhpsvkotv
^SCR("W4PRMPC","AV",38)
:(0-xhpsvktk'2-,hbucajcuiucajc'1-iucajc)",urhakkuftk"xhpsvkotv
^SCR("W4PRMPC","AV",39)
:(0-tk'1-if)vpevauk,ouencjukanw,xhpsvkotv
^SCR("W4PRMPC","AV",40)
:1xhpsvktvpevauk,kaohe,gvwxn
^SCR("W4PRMPC","AV",41)
:vpevauk,cjuek,r,hxhpsvkotv
^SCR("W4PRMPC","AV",42)
:,hbucajcjuek,r,hxhpsvkotv
^SCR("W4PRMPC","AV",43)
:t"fka,uburjt,urpx4ervsgxnkjpxcxhpsvkotv
^SCR("W4PRMPC","AV",44)
:(2-vsgxnker'1-juekker'0-vsgxnkujuekk)xhpsvkt"fkaohjpxvnf
^SCR("W4PRMPC","AV",45)
:(2-vsgxnker'1-juekker'0-vsgxnkujuekk)xhpsvkxhci,kaohjpxvnf
^SCR("W4PRMPC","AV",46)
:(udukog;skgohxhpsnot)udukkrhtavk,uruavnf
^SCR("W4PRMPC","AV",47)
:uduk•cueoa
^SCR("W4PRMPC","AV",48)
:(ohkxehp)uduk,bun,kavcud
^SCR("W4PRMPC","AV",49)
:(ohkxehp)uduk,bun,kacjur
^SCR("W4PRMPC","AV",50)
:exgvhyrpxhpsvkotv
^SCR("W4PRMPC","AV",51)
:vkusd,xpsnk,hbucajcyhrpsue,xpsvkyckotv
^SCR("W4PRMPC","AV",52)
:ruen,xpsvhrjtxn,hbucaje,gvxhpsvkotv
^SCR("W4PRMPC","AV",53)
:srteuhkuukaohauk,xhpsvkotv
^SCR("W4PRMPC","AV",54)
:vpevc,uhbekgouka,,ukcexhpsvkotv
^SCR("W4PRMPC","AV",55)
:,uhbucaj,nharogvkceklpxxhpsvkotv
^SCR("W4PRMPC","AV",56)
:OTH,ujbvcvjbvksudxhpsvkotv
^SCR("W4PRMPC","AV",57)
:"n"gnkkuf"vsung,zfrn,hbucajcxhpsvkotv
^SCR("W4PRMPC","AV",58)
:hynuyutvpue,xpsnktcakrusha,utmu,xhpsvkotv
^SCR("W4PRMPC","AV",59)
:,ujfubiugacvthmhuvxhbfhauk,xhpsvkotv
^SCR("W4PRMPC","AV",60)
:vrhdn,jh,phrjtvxpsvchtkhs,uagkotv
^SCR("W4PRMPC","AV",61)
:juekk,hekj,hbucajcphyxhpsvkotv
^SCR("W4PRMPC","NAME")

^SCR("W4PRMPC","P",4,"CRD")
9,7,B,1,0
^SCR("W4PRMPC","P",4,"HELP")

^SCR("W4PRMPC","P",4,"LMAX")
4
^SCR("W4PRMPC","P",4,"MUMPS1")

^SCR("W4PRMPC","P",4,"MUMPS2")

^SCR("W4PRMPC","P",4,"TYP")
B
^SCR("W4PRMPC","P",5,"CRD")
2,1,N,1,0
^SCR("W4PRMPC","P",5,"HELP")

^SCR("W4PRMPC","P",5,"LMAX")
4
^SCR("W4PRMPC","P",5,"MUMPS1")

^SCR("W4PRMPC","P",5,"MUMPS2")
I HSBRKZ'=1,HSBRKZ'=2,HSBRKZ'=0 S %SC("ER")=1
^SCR("W4PRMPC","P",5,"TYP")
N
^SCR("W4PRMPC","P",6,"CRD")
3,25,N,1,0
^SCR("W4PRMPC","P",6,"HELP")

^SCR("W4PRMPC","P",6,"LMAX")
4
^SCR("W4PRMPC","P",6,"MUMPS1")

^SCR("W4PRMPC","P",6,"MUMPS2")

^SCR("W4PRMPC","P",6,"TYP")
N
^SCR("W4PRMPC","P",7,"CRD")
4,25,B,1,0
^SCR("W4PRMPC","P",7,"HELP")

^SCR("W4PRMPC","P",7,"LMAX")
4
^SCR("W4PRMPC","P",7,"MUMPS1")

^SCR("W4PRMPC","P",7,"MUMPS2")

^SCR("W4PRMPC","P",7,"MUST")

^SCR("W4PRMPC","P",7,"TYP")
B
^SCR("W4PRMPC","P",8,"CRD")
5,18,B,1,0
^SCR("W4PRMPC","P",8,"HELP")

^SCR("W4PRMPC","P",8,"LMAX")
4
^SCR("W4PRMPC","P",8,"MUMPS1")

^SCR("W4PRMPC","P",8,"MUMPS2")

^SCR("W4PRMPC","P",8,"TYP")
B
^SCR("W4PRMPC","P",9,"CRD")
6,25,B,1,0
^SCR("W4PRMPC","P",9,"HELP")

^SCR("W4PRMPC","P",9,"LMAX")
4
^SCR("W4PRMPC","P",9,"MUMPS1")

^SCR("W4PRMPC","P",9,"MUMPS2")

^SCR("W4PRMPC","P",9,"MUST")

^SCR("W4PRMPC","P",9,"TYP")
B
^SCR("W4PRMPC","P",10,"CRD")
7,1,N,1,0
^SCR("W4PRMPC","P",10,"HELP")

^SCR("W4PRMPC","P",10,"LMAX")
4
^SCR("W4PRMPC","P",10,"MUMPS1")

^SCR("W4PRMPC","P",10,"MUMPS2")
I MANA'=0,MANA'=1,MANA'=3 S %SC("ER")=1
^SCR("W4PRMPC","P",10,"MUST")

^SCR("W4PRMPC","P",10,"TYP")
N
^SCR("W4PRMPC","P",11,"CRD")
8,10,B,1,0
^SCR("W4PRMPC","P",11,"HELP")

^SCR("W4PRMPC","P",11,"LMAX")
4
^SCR("W4PRMPC","P",11,"MUMPS1")

^SCR("W4PRMPC","P",11,"MUMPS2")

^SCR("W4PRMPC","P",11,"TYP")
B
^SCR("W4PRMPC","P",12,"CRD")
10,15,B,1,0
^SCR("W4PRMPC","P",12,"HELP")

^SCR("W4PRMPC","P",12,"LMAX")
4
^SCR("W4PRMPC","P",12,"MUMPS1")

^SCR("W4PRMPC","P",12,"MUMPS2")

^SCR("W4PRMPC","P",12,"TYP")
B
^SCR("W4PRMPC","P",13,"CRD")
12,4,N,1,0
^SCR("W4PRMPC","P",13,"HELP")

^SCR("W4PRMPC","P",13,"LMAX")
4
^SCR("W4PRMPC","P",13,"MUMPS1")

^SCR("W4PRMPC","P",13,"MUMPS2")

^SCR("W4PRMPC","P",13,"TYP")
N
^SCR("W4PRMPC","P",14,"CRD")
11,15,B,1,0
^SCR("W4PRMPC","P",14,"HELP")

^SCR("W4PRMPC","P",14,"LMAX")
4
^SCR("W4PRMPC","P",14,"MUMPS1")

^SCR("W4PRMPC","P",14,"MUMPS2")

^SCR("W4PRMPC","P",14,"TYP")
B
^SCR("W4PRMPC","P",15,"CRD")
13,4,N,1,0
^SCR("W4PRMPC","P",15,"HELP")

^SCR("W4PRMPC","P",15,"LMAX")
4
^SCR("W4PRMPC","P",15,"MUMPS1")

^SCR("W4PRMPC","P",15,"MUMPS2")

^SCR("W4PRMPC","P",15,"TYP")
N
^SCR("W4PRMPC","P",16,"CRD")
14,3,N,1,0
^SCR("W4PRMPC","P",16,"HELP")

^SCR("W4PRMPC","P",16,"LMAX")
4
^SCR("W4PRMPC","P",16,"MUMPS1")

^SCR("W4PRMPC","P",16,"MUMPS2")

^SCR("W4PRMPC","P",16,"TYP")
N
^SCR("W4PRMPC","P",17,"CRD")
16,25,B,1,0
^SCR("W4PRMPC","P",17,"HELP")

^SCR("W4PRMPC","P",17,"LMAX")
4
^SCR("W4PRMPC","P",17,"MUMPS1")

^SCR("W4PRMPC","P",17,"MUMPS2")

^SCR("W4PRMPC","P",17,"MUST")

^SCR("W4PRMPC","P",17,"TYP")
B
^SCR("W4PRMPC","P",18,"CRD")
17,3,N,1,0
^SCR("W4PRMPC","P",18,"HELP")

^SCR("W4PRMPC","P",18,"LMAX")
4
^SCR("W4PRMPC","P",18,"MUMPS1")

^SCR("W4PRMPC","P",18,"MUMPS2")

^SCR("W4PRMPC","P",18,"TYP")
N
^SCR("W4PRMPC","P",19,"CRD")
15,3,N,1,0
^SCR("W4PRMPC","P",19,"HELP")

^SCR("W4PRMPC","P",19,"LMAX")
4
^SCR("W4PRMPC","P",19,"MUMPS1")

^SCR("W4PRMPC","P",19,"MUMPS2")

^SCR("W4PRMPC","P",19,"TYP")
N
^SCR("W4PRMPC","P",20,"CRD")
18,1,N,1,0
^SCR("W4PRMPC","P",20,"HELP")

^SCR("W4PRMPC","P",20,"LMAX")
4
^SCR("W4PRMPC","P",20,"MUMPS1")

^SCR("W4PRMPC","P",20,"MUMPS2")

^SCR("W4PRMPC","P",20,"MUST")

^SCR("W4PRMPC","P",20,"TYP")
N
^SCR("W4PRMPC","P",21,"CRD")
19,7,N,1,0
^SCR("W4PRMPC","P",21,"HELP")

^SCR("W4PRMPC","P",21,"LMAX")
4
^SCR("W4PRMPC","P",21,"MUMPS1")

^SCR("W4PRMPC","P",21,"MUMPS2")
I BIGNAME'=1,BIGNAME'=2,BIGNAME'=0 S %SC("ER")=1
^SCR("W4PRMPC","P",21,"MUST")

^SCR("W4PRMPC","P",21,"TYP")
N
^SCR("W4PRMPC","P",22,"CRD")
25,9,N,1,0
^SCR("W4PRMPC","P",22,"HELP")

^SCR("W4PRMPC","P",22,"LMAX")
4
^SCR("W4PRMPC","P",22,"MUMPS1")

^SCR("W4PRMPC","P",22,"MUMPS2")
I HZMBIT'=0,HZMBIT'=1,HZMBIT'=2 S %SC("ER")=1
^SCR("W4PRMPC","P",22,"MUST")

^SCR("W4PRMPC","P",22,"TYP")
N
^SCR("W4PRMPC","P",23,"CRD")
26,7,N,1,0
^SCR("W4PRMPC","P",23,"HELP")

^SCR("W4PRMPC","P",23,"LMAX")
4
^SCR("W4PRMPC","P",23,"MUMPS1")

^SCR("W4PRMPC","P",23,"MUMPS2")
I HZMHV'=0,HZMHV'=1,HZMHV'=2 S %SC("ER")=1
^SCR("W4PRMPC","P",23,"MUST")

^SCR("W4PRMPC","P",23,"TYP")
N
^SCR("W4PRMPC","P",24,"CRD")
27,1,N,1,0
^SCR("W4PRMPC","P",24,"HELP")

^SCR("W4PRMPC","P",24,"LMAX")
4
^SCR("W4PRMPC","P",24,"MUMPS1")

^SCR("W4PRMPC","P",24,"MUMPS2")
I HZMDBL'=1,HZMDBL'=2,HZMDBL'=0 S %SC("ER")=1
^SCR("W4PRMPC","P",24,"TYP")
N
^SCR("W4PRMPC","P",25,"CRD")
28,21,B,1,0
^SCR("W4PRMPC","P",25,"HELP")

^SCR("W4PRMPC","P",25,"LMAX")
4
^SCR("W4PRMPC","P",25,"MUMPS1")

^SCR("W4PRMPC","P",25,"MUMPS2")

^SCR("W4PRMPC","P",25,"TYP")
B
^SCR("W4PRMPC","P",26,"CRD")
22,25,B,1,0
^SCR("W4PRMPC","P",26,"HELP")

^SCR("W4PRMPC","P",26,"LMAX")
4
^SCR("W4PRMPC","P",26,"MUMPS1")

^SCR("W4PRMPC","P",26,"MUMPS2")

^SCR("W4PRMPC","P",26,"TYP")
B
^SCR("W4PRMPC","P",27,"CRD")
23,2,N,1,0
^SCR("W4PRMPC","P",27,"HELP")

^SCR("W4PRMPC","P",27,"LMAX")
4
^SCR("W4PRMPC","P",27,"MUMPS1")

^SCR("W4PRMPC","P",27,"MUMPS2")

^SCR("W4PRMPC","P",27,"TYP")
N
^SCR("W4PRMPC","P",28,"CRD")
24,14,B,1,0
^SCR("W4PRMPC","P",28,"HELP")

^SCR("W4PRMPC","P",28,"LMAX")
4
^SCR("W4PRMPC","P",28,"MUMPS1")

^SCR("W4PRMPC","P",28,"MUMPS2")

^SCR("W4PRMPC","P",28,"TYP")
B
^SCR("W4PRMPC","P",29,"CRD")
20,2,N,1,0
^SCR("W4PRMPC","P",29,"HELP")

^SCR("W4PRMPC","P",29,"LMAX")
3
^SCR("W4PRMPC","P",29,"MUMPS1")

^SCR("W4PRMPC","P",29,"MUMPS2")

^SCR("W4PRMPC","P",29,"TYP")
N
^SCR("W4PRMPC","P",30,"CRD")
29,2,N,1,0
^SCR("W4PRMPC","P",30,"HELP")

^SCR("W4PRMPC","P",30,"LMAX")
4
^SCR("W4PRMPC","P",30,"MUMPS1")

^SCR("W4PRMPC","P",30,"MUMPS2")

^SCR("W4PRMPC","P",30,"MUST")

^SCR("W4PRMPC","P",30,"TYP")
N
^SCR("W4PRMPC","P",31,"CRD")
30,59,H,24
^SCR("W4PRMPC","P",31,"HELP")

^SCR("W4PRMPC","P",31,"LMAX")
24
^SCR("W4PRMPC","P",31,"MUMPS1")

^SCR("W4PRMPC","P",31,"MUMPS2")

^SCR("W4PRMPC","P",31,"TYP")
H
^SCR("W4PRMPC","P",32,"CRD")
31,19,N,1,0
^SCR("W4PRMPC","P",32,"HELP")

^SCR("W4PRMPC","P",32,"LMAX")
4
^SCR("W4PRMPC","P",32,"MUMPS1")

^SCR("W4PRMPC","P",32,"MUMPS2")

^SCR("W4PRMPC","P",32,"TYP")
N
^SCR("W4PRMPC","P",35,"CRD")
32,25,B,1,0
^SCR("W4PRMPC","P",35,"HELP")

^SCR("W4PRMPC","P",35,"LMAX")
4
^SCR("W4PRMPC","P",35,"MUMPS1")

^SCR("W4PRMPC","P",35,"MUMPS2")

^SCR("W4PRMPC","P",35,"MUST")

^SCR("W4PRMPC","P",35,"TYP")
B
^SCR("W4PRMPC","P",37,"CRD")
33,21,B,1,0
^SCR("W4PRMPC","P",37,"HELP")

^SCR("W4PRMPC","P",37,"LMAX")
4
^SCR("W4PRMPC","P",37,"MUMPS1")

^SCR("W4PRMPC","P",37,"MUMPS2")

^SCR("W4PRMPC","P",37,"MUST")

^SCR("W4PRMPC","P",37,"TYP")
B
^SCR("W4PRMPC","P",40,"CRD")
34,2,N,1,0
^SCR("W4PRMPC","P",40,"HELP")

^SCR("W4PRMPC","P",40,"LMAX")
4
^SCR("W4PRMPC","P",40,"MUMPS1")

^SCR("W4PRMPC","P",40,"MUMPS2")
I HZMMSL>3 S %SC("ER")=1
^SCR("W4PRMPC","P",40,"MUST")

^SCR("W4PRMPC","P",40,"TYP")
N
^SCR("W4PRMPC","P",42,"CRD")
35,28,B,1,0
^SCR("W4PRMPC","P",42,"HELP")

^SCR("W4PRMPC","P",42,"LMAX")
4
^SCR("W4PRMPC","P",42,"MUMPS1")

^SCR("W4PRMPC","P",42,"MUMPS2")

^SCR("W4PRMPC","P",42,"TYP")
B
^SCR("W4PRMPC","P",43,"CRD")
36,30,B,1,0
^SCR("W4PRMPC","P",43,"HELP")

^SCR("W4PRMPC","P",43,"LMAX")
4
^SCR("W4PRMPC","P",43,"MUMPS1")

^SCR("W4PRMPC","P",43,"MUMPS2")

^SCR("W4PRMPC","P",43,"MUST")

^SCR("W4PRMPC","P",43,"TYP")
B
^SCR("W4PRMPC","P",44,"CRD")
37,30,B,1,0
^SCR("W4PRMPC","P",44,"HELP")

^SCR("W4PRMPC","P",44,"LMAX")
4
^SCR("W4PRMPC","P",44,"MUMPS1")

^SCR("W4PRMPC","P",44,"MUMPS2")

^SCR("W4PRMPC","P",44,"TYP")
B
^SCR("W4PRMPC","P",45,"CRD")
38,2,N,1,0
^SCR("W4PRMPC","P",45,"HELP")

^SCR("W4PRMPC","P",45,"LMAX")
4
^SCR("W4PRMPC","P",45,"MUMPS1")

^SCR("W4PRMPC","P",45,"MUMPS2")
I BOTHB<0!(BOTHB>2)!(BOTHB'?1N) S %SC("ER")=1
^SCR("W4PRMPC","P",45,"MUST")

^SCR("W4PRMPC","P",45,"TYP")
N
^SCR("W4PRMPC","P",47,"CRD")
39,15,B,1,0
^SCR("W4PRMPC","P",47,"HELP")

^SCR("W4PRMPC","P",47,"LMAX")
4
^SCR("W4PRMPC","P",47,"MUMPS1")

^SCR("W4PRMPC","P",47,"MUMPS2")

^SCR("W4PRMPC","P",47,"MUST")

^SCR("W4PRMPC","P",47,"TYP")
B
^SCR("W4PRMPC","P",50,"CRD")
40,22,N,2,0
^SCR("W4PRMPC","P",50,"HELP")

^SCR("W4PRMPC","P",50,"LMAX")
4
^SCR("W4PRMPC","P",50,"MUMPS1")

^SCR("W4PRMPC","P",50,"MUMPS2")

^SCR("W4PRMPC","P",50,"MUST")

^SCR("W4PRMPC","P",50,"TYP")
N
^SCR("W4PRMPC","P",55,"CRD")
41,34,B,1,0
^SCR("W4PRMPC","P",55,"HELP")

^SCR("W4PRMPC","P",55,"LMAX")
4
^SCR("W4PRMPC","P",55,"MUMPS1")

^SCR("W4PRMPC","P",55,"MUMPS2")

^SCR("W4PRMPC","P",55,"MUST")

^SCR("W4PRMPC","P",55,"TYP")
B
^SCR("W4PRMPC","P",60,"CRD")
42,34,B,1,0
^SCR("W4PRMPC","P",60,"HELP")

^SCR("W4PRMPC","P",60,"LMAX")
4
^SCR("W4PRMPC","P",60,"MUMPS1")

^SCR("W4PRMPC","P",60,"MUMPS2")

^SCR("W4PRMPC","P",60,"TYP")
B
^SCR("W4PRMPC","P",65,"CRD")
43,21,B,1,0
^SCR("W4PRMPC","P",65,"HELP")

^SCR("W4PRMPC","P",65,"LMAX")
4
^SCR("W4PRMPC","P",65,"MUMPS1")

^SCR("W4PRMPC","P",65,"MUMPS2")

^SCR("W4PRMPC","P",65,"TYP")
B
^SCR("W4PRMPC","P",67,"CRD")
44,6,E,1,0
^SCR("W4PRMPC","P",67,"HELP")

^SCR("W4PRMPC","P",67,"LMAX")
4
^SCR("W4PRMPC","P",67,"MUMPS1")

^SCR("W4PRMPC","P",67,"MUMPS2")

^SCR("W4PRMPC","P",67,"TYP")
E
^SCR("W4PRMPC","P",68,"CRD")
45,3,N,1,0
^SCR("W4PRMPC","P",68,"HELP")

^SCR("W4PRMPC","P",68,"LMAX")
4
^SCR("W4PRMPC","P",68,"MUMPS1")

^SCR("W4PRMPC","P",68,"MUMPS2")

^SCR("W4PRMPC","P",68,"TYP")
N
^SCR("W4PRMPC","P",70,"CRD")
46,20,N,2,0
^SCR("W4PRMPC","P",70,"HELP")

^SCR("W4PRMPC","P",70,"LMAX")
4
^SCR("W4PRMPC","P",70,"MUMPS1")

^SCR("W4PRMPC","P",70,"MUMPS2")

^SCR("W4PRMPC","P",70,"TYP")
N
^SCR("W4PRMPC","P",72,"CRD")
47,17,E,44,0
^SCR("W4PRMPC","P",72,"HELP")

^SCR("W4PRMPC","P",72,"LMAX")
44
^SCR("W4PRMPC","P",72,"MUMPS1")

^SCR("W4PRMPC","P",72,"MUMPS2")

^SCR("W4PRMPC","P",72,"TYP")
E
^SCR("W4PRMPC","P",73,"CRD")
48,38,N,3,0
^SCR("W4PRMPC","P",73,"HELP")

^SCR("W4PRMPC","P",73,"LMAX")
5
^SCR("W4PRMPC","P",73,"MUMPS1")

^SCR("W4PRMPC","P",73,"MUMPS2")

^SCR("W4PRMPC","P",73,"TYP")
N
^SCR("W4PRMPC","P",74,"CRD")
49,38,N,3,0
^SCR("W4PRMPC","P",74,"HELP")

^SCR("W4PRMPC","P",74,"LMAX")
5
^SCR("W4PRMPC","P",74,"MUMPS1")

^SCR("W4PRMPC","P",74,"MUMPS2")

^SCR("W4PRMPC","P",74,"TYP")
N
^SCR("W4PRMPC","P",75,"CRD")
51,24,B,1,0
^SCR("W4PRMPC","P",75,"HELP")

^SCR("W4PRMPC","P",75,"LMAX")
4
^SCR("W4PRMPC","P",75,"MUMPS1")

^SCR("W4PRMPC","P",75,"MUMPS2")

^SCR("W4PRMPC","P",75,"TYP")
B
^SCR("W4PRMPC","P",76,"CRD")
52,24,B,1,0
^SCR("W4PRMPC","P",76,"HELP")

^SCR("W4PRMPC","P",76,"LMAX")
4
^SCR("W4PRMPC","P",76,"MUMPS1")

^SCR("W4PRMPC","P",76,"MUMPS2")

^SCR("W4PRMPC","P",76,"TYP")
B
^SCR("W4PRMPC","P",77,"CRD")
50,49,B,1,0
^SCR("W4PRMPC","P",77,"HELP")

^SCR("W4PRMPC","P",77,"LMAX")
5
^SCR("W4PRMPC","P",77,"MUMPS1")

^SCR("W4PRMPC","P",77,"MUMPS2")

^SCR("W4PRMPC","P",77,"TYP")
B
^SCR("W4PRMPC","P",78,"CRD")
53,24,B,1,0
^SCR("W4PRMPC","P",78,"HELP")

^SCR("W4PRMPC","P",78,"LMAX")
4
^SCR("W4PRMPC","P",78,"MUMPS1")

^SCR("W4PRMPC","P",78,"MUMPS2")

^SCR("W4PRMPC","P",78,"TYP")
B
^SCR("W4PRMPC","P",80,"CRD")
54,32,B,1,0
^SCR("W4PRMPC","P",80,"HELP")

^SCR("W4PRMPC","P",80,"LMAX")
4
^SCR("W4PRMPC","P",80,"MUMPS1")

^SCR("W4PRMPC","P",80,"MUMPS2")

^SCR("W4PRMPC","P",80,"TYP")
B
^SCR("W4PRMPC","P",82,"CRD")
55,32,B,1,0
^SCR("W4PRMPC","P",82,"HELP")

^SCR("W4PRMPC","P",82,"LMAX")
4
^SCR("W4PRMPC","P",82,"MUMPS1")

^SCR("W4PRMPC","P",82,"MUMPS2")

^SCR("W4PRMPC","P",82,"TYP")
B
^SCR("W4PRMPC","P",85,"CRD")
56,39,B,1,0
^SCR("W4PRMPC","P",85,"HELP")

^SCR("W4PRMPC","P",85,"LMAX")
4
^SCR("W4PRMPC","P",85,"MUMPS1")

^SCR("W4PRMPC","P",85,"MUMPS2")

^SCR("W4PRMPC","P",85,"TYP")
B
^SCR("W4PRMPC","P",87,"CRD")
57,27,B,1,0
^SCR("W4PRMPC","P",87,"HELP")

^SCR("W4PRMPC","P",87,"LMAX")
4
^SCR("W4PRMPC","P",87,"MUMPS1")

^SCR("W4PRMPC","P",87,"MUMPS2")

^SCR("W4PRMPC","P",87,"TYP")
B
^SCR("W4PRMPC","P",89,"CRD")
58,22,B,1,0
^SCR("W4PRMPC","P",89,"HELP")

^SCR("W4PRMPC","P",89,"LMAX")
4
^SCR("W4PRMPC","P",89,"MUMPS1")

^SCR("W4PRMPC","P",89,"MUMPS2")

^SCR("W4PRMPC","P",89,"TYP")
B
^SCR("W4PRMPC","P",90,"CRD")
59,27,B,1,0
^SCR("W4PRMPC","P",90,"HELP")

^SCR("W4PRMPC","P",90,"LMAX")
4
^SCR("W4PRMPC","P",90,"MUMPS1")

^SCR("W4PRMPC","P",90,"MUMPS2")

^SCR("W4PRMPC","P",90,"TYP")
B
^SCR("W4PRMPC","P",92,"CRD")
60,30,B,1,0
^SCR("W4PRMPC","P",92,"HELP")

^SCR("W4PRMPC","P",92,"LMAX")
4
^SCR("W4PRMPC","P",92,"MUMPS1")

^SCR("W4PRMPC","P",92,"MUMPS2")

^SCR("W4PRMPC","P",92,"TYP")
B
^SCR("W4PRMPC","P",94,"CRD")
61,34,B,1,0
^SCR("W4PRMPC","P",94,"HELP")

^SCR("W4PRMPC","P",94,"LMAX")
4
^SCR("W4PRMPC","P",94,"MUMPS1")

^SCR("W4PRMPC","P",94,"MUMPS2")

^SCR("W4PRMPC","P",94,"TYP")
B
^SCR("W4PRMPC","P","NAME","ASR")
50
^SCR("W4PRMPC","P","NAME","ASRITRA")
55
^SCR("W4PRMPC","P","NAME","BIGFONT")
27
^SCR("W4PRMPC","P","NAME","BIGNAME")
21
^SCR("W4PRMPC","P","NAME","BIGNMB")
20
^SCR("W4PRMPC","P","NAME","BIGTIME")
13
^SCR("W4PRMPC","P","NAME","BOTHB")
45
^SCR("W4PRMPC","P","NAME","EZSMALL")
29
^SCR("W4PRMPC","P","NAME","HRA2")
42
^SCR("W4PRMPC","P","NAME","HSBENG")
9
^SCR("W4PRMPC","P","NAME","HSBRKZ")
5
^SCR("W4PRMPC","P","NAME","HZMBAR")
25
^SCR("W4PRMPC","P","NAME","HZMBIT")
22
^SCR("W4PRMPC","P","NAME","HZMDBL")
24
^SCR("W4PRMPC","P","NAME","HZMHV")
23
^SCR("W4PRMPC","P","NAME","HZMMSL")
40
^SCR("W4PRMPC","P","NAME","HZPCSP")
11
^SCR("W4PRMPC","P","NAME","ITRA")
60
^SCR("W4PRMPC","P","NAME","LHBAFTAX")
87
^SCR("W4PRMPC","P","NAME","LINE")
12
^SCR("W4PRMPC","P","NAME","LOGO")
72
^SCR("W4PRMPC","P","NAME","LOGOHG")
73
^SCR("W4PRMPC","P","NAME","LOGOWD")
74
^SCR("W4PRMPC","P","NAME","MANA")
10
^SCR("W4PRMPC","P","NAME","MANATL")
14
^SCR("W4PRMPC","P","NAME","NOBIGHRA")
26
^SCR("W4PRMPC","P","NAME","NOHBCOPY")
76
^SCR("W4PRMPC","P","NAME","NOHD")
70
^SCR("W4PRMPC","P","NAME","NOKOTTSF")
17
^SCR("W4PRMPC","P","NAME","NOMHOTH")
85
^SCR("W4PRMPC","P","NAME","NOMYDETS")
77
^SCR("W4PRMPC","P","NAME","NOPC")
90
^SCR("W4PRMPC","P","NAME","NOPCCB")
80
^SCR("W4PRMPC","P","NAME","NOPCCBHB")
82
^SCR("W4PRMPC","P","NAME","NOPCHBCD")
75
^SCR("W4PRMPC","P","NAME","NOPCLOAZ")
8
^SCR("W4PRMPC","P","NAME","NOROMA")
28
^SCR("W4PRMPC","P","NAME","NOSPACE2")
4
^SCR("W4PRMPC","P","NAME","NOVZHZG")
65
^SCR("W4PRMPC","P","NAME","ORDBIG")
15
^SCR("W4PRMPC","P","NAME","PCCA1")
67
^SCR("W4PRMPC","P","NAME","PCTB")
68
^SCR("W4PRMPC","P","NAME","PRINTDET")
6
^SCR("W4PRMPC","P","NAME","PTHDLY")
92
^SCR("W4PRMPC","P","NAME","SEFAHNM")
37
^SCR("W4PRMPC","P","NAME","SHEML")
7
^SCR("W4PRMPC","P","NAME","SHVACSRP")
89
^SCR("W4PRMPC","P","NAME","SOADBIG")
19
^SCR("W4PRMPC","P","NAME","TAWHR")
31
^SCR("W4PRMPC","P","NAME","TAWHRKOT")
32
^SCR("W4PRMPC","P","NAME","TAWHZ")
30
^SCR("W4PRMPC","P","NAME","TAWS")
35
^SCR("W4PRMPC","P","NAME","TBLBIG")
16
^SCR("W4PRMPC","P","NAME","TIP2LK")
94
^SCR("W4PRMPC","P","NAME","TLBIT")
43
^SCR("W4PRMPC","P","NAME","TLHNH")
44
^SCR("W4PRMPC","P","NAME","TMASR")
47
^SCR("W4PRMPC","P","NAME","TSFTIED")
18
^SCR("W4PRMPC","P","NAME","VCNOPC")
78
^SCR("W4PRMPC","P","NM",4)
NOSPACE2
^SCR("W4PRMPC","P","NM",5)
HSBRKZ
^SCR("W4PRMPC","P","NM",6)
PRINTDET
^SCR("W4PRMPC","P","NM",7)
SHEML
^SCR("W4PRMPC","P","NM",8)
NOPCLOAZ
^SCR("W4PRMPC","P","NM",9)
HSBENG
^SCR("W4PRMPC","P","NM",10)
MANA
^SCR("W4PRMPC","P","NM",11)
HZPCSP
^SCR("W4PRMPC","P","NM",12)
LINE
^SCR("W4PRMPC","P","NM",13)
BIGTIME
^SCR("W4PRMPC","P","NM",14)
MANATL
^SCR("W4PRMPC","P","NM",15)
ORDBIG
^SCR("W4PRMPC","P","NM",16)
TBLBIG
^SCR("W4PRMPC","P","NM",17)
NOKOTTSF
^SCR("W4PRMPC","P","NM",18)
TSFTIED
^SCR("W4PRMPC","P","NM",19)
SOADBIG
^SCR("W4PRMPC","P","NM",20)
BIGNMB
^SCR("W4PRMPC","P","NM",21)
BIGNAME
^SCR("W4PRMPC","P","NM",22)
HZMBIT
^SCR("W4PRMPC","P","NM",23)
HZMHV
^SCR("W4PRMPC","P","NM",24)
HZMDBL
^SCR("W4PRMPC","P","NM",25)
HZMBAR
^SCR("W4PRMPC","P","NM",26)
NOBIGHRA
^SCR("W4PRMPC","P","NM",27)
BIGFONT
^SCR("W4PRMPC","P","NM",28)
NOROMA
^SCR("W4PRMPC","P","NM",29)
EZSMALL
^SCR("W4PRMPC","P","NM",30)
TAWHZ
^SCR("W4PRMPC","P","NM",31)
TAWHR
^SCR("W4PRMPC","P","NM",32)
TAWHRKOT
^SCR("W4PRMPC","P","NM",35)
TAWS
^SCR("W4PRMPC","P","NM",37)
SEFAHNM
^SCR("W4PRMPC","P","NM",40)
HZMMSL
^SCR("W4PRMPC","P","NM",42)
HRA2
^SCR("W4PRMPC","P","NM",43)
TLBIT
^SCR("W4PRMPC","P","NM",44)
TLHNH
^SCR("W4PRMPC","P","NM",45)
BOTHB
^SCR("W4PRMPC","P","NM",47)
TMASR
^SCR("W4PRMPC","P","NM",50)
ASR
^SCR("W4PRMPC","P","NM",55)
ASRITRA
^SCR("W4PRMPC","P","NM",60)
ITRA
^SCR("W4PRMPC","P","NM",65)
NOVZHZG
^SCR("W4PRMPC","P","NM",67)
PCCA1
^SCR("W4PRMPC","P","NM",68)
PCTB
^SCR("W4PRMPC","P","NM",70)
NOHD
^SCR("W4PRMPC","P","NM",72)
LOGO
^SCR("W4PRMPC","P","NM",73)
LOGOHG
^SCR("W4PRMPC","P","NM",74)
LOGOWD
^SCR("W4PRMPC","P","NM",75)
NOPCHBCD
^SCR("W4PRMPC","P","NM",76)
NOHBCOPY
^SCR("W4PRMPC","P","NM",77)
NOMYDETS
^SCR("W4PRMPC","P","NM",78)
VCNOPC
^SCR("W4PRMPC","P","NM",80)
NOPCCB
^SCR("W4PRMPC","P","NM",82)
NOPCCBHB
^SCR("W4PRMPC","P","NM",85)
NOMHOTH
^SCR("W4PRMPC","P","NM",87)
LHBAFTAX
^SCR("W4PRMPC","P","NM",89)
SHVACSRP
^SCR("W4PRMPC","P","NM",90)
NOPC
^SCR("W4PRMPC","P","NM",92)
PTHDLY
^SCR("W4PRMPC","P","NM",94)
TIP2LK
^SCR("W4PRMPC1")
H
^SCR("W4PRMPC1",1)
                          # gahn zqtcnl dqtcdl mixhnxt #                       
^SCR("W4PRMPC1",2)
                  {08 }:( 0 - `l , 1 - ok ) gahnl oeaa zifrela hixt my qitcdl  
^SCR("W4PRMPC1",3)
        {10 }: (3-zeveawe zepn itl,1-zepn itl,2-dclwd xcq itl,0-oi`) dqtcd oein
^SCR("W4PRMPC1",4)
     {14 }:(3-zeveawe zepn itl,1-zepn itl,2-dclwd xcq itl,0-oi`)'lyn dqtcd oein
^SCR("W4PRMPC1",5)
                             {12 } : hixt beq itl oeayge glynl qteh oiinl m`d  
^SCR("W4PRMPC1",6)
                        {11 }:( 0 - `l , 1 - ok )  dpn beq itl mipea wlgl m`d  
^SCR("W4PRMPC1",7)
      {04 }:( 0 - `l , 1 - ok ) mihqd jezay mihixtd oiia geex zxey siqedl m`d  
^SCR("W4PRMPC1",8)
  {05 }:(0-`l,2-mihqe miy`x mihixt,1-miy`x mihixt) ewa mihixtd oia cixtdl m`d  
^SCR("W4PRMPC1",9)
    {13 }:( 1 - hlea oteba, 2 - ybcen oteba , 0 - libx oteba ) dpnfd onf qtcd  
^SCR("W4PRMPC1",10)
     {15 }:(3-xegy lr hlea,1-hlea,2-ybcen,0-libx) dpnfd 'qn qitcdl oteb dfi`a  
^SCR("W4PRMPC1",11)
                                         {09 }:  dpnfd ly inei 'qn qitcdl m`d  
^SCR("W4PRMPC1",12)
    {16 }:( 0-libx,3-xegy lr hlea,1-hlea,2-ybcen) ogley 'qn qitcdl oteb dfi`a  
^SCR("W4PRMPC1",13)
   {19 }:( 1 - hlea oteba, 2 - ybcen oteba , 0 - libx oteba ) micreq 'qn qtcd  
^SCR("W4PRMPC1",14)
                                                    {06 }: mle` my qitcdl m`d  
^SCR("W4PRMPC1",15)
                                 {07 }: dcrqn zpnfd zxzeka gewl my qitcdl m`d  
^SCR("W4PRMPC1",16)
                                    {03 } : zephw zeize`a zqtcn my qitcdl m`d  
^SCR("W4PRMPC1",17)
                                   {21 } : 1 zenka miiy`x mihixtd lk qitcdl m`d
^SCR("W4PRMPC1",18)
                                   {33 } : ze`inex zeize`a dpn 'qn qitcdl m`d  
^SCR("W4PRMPC1",19)
              {28 }: zetqez zeveaw mr hixta mihqd oia zeinex zextq qitcdl m`d  
^SCR("W4PRMPC1",20)
        {18 }:(0-`l,1.5-hqn zetqez mb,1-ok) iy`x xveny zqtcn eze`l ztqez qtcd  
^SCR("W4PRMPC1",21)
 {20 }:(3-ce`n lecb,2-lecb,1-libx oteba,0-qitcdl `l) oeaa hixt cew qitcdl ji`  
^SCR("W4PRMPC1",22)
         {41 } : (ohw - 0 , hlea - 2 , lecb - 1 ) iy`x hixt qitcdl oteb dfi`a  
^SCR("W4PRMPC1",23)
            {42 } : (ohw - 0 , hlea - 2 , lecb - 1 ) zetqez qitcdl oteb dfi`a  
^SCR("W4PRMPC1",24)
   {43 } : (ohw-0,hlea-2,lecb-1) qez 'aw mr hixtl mihixt hq qitcdl oteb dfi`a  
^SCR("W4PRMPC1",25)
       {44 } : (ohw-0,hlea-2,lecb-1) ziwqr dgex`l mihixt hq qitcdl oteb dfi`a  
^SCR("W4PRMPC1",26)
                         {26 }: ( 0 - `l ,1 - ok )  zephw zeize`a dxrd qitcdl  
^SCR("W4PRMPC1",27)
         {22 }:(2 - mly ogley wx ,0 - `l ,1 - ok )   gahna milehia qitcdl m`d  
^SCR("W4PRMPC1",28)
       {23 }: (3-dyixc itl,2-mly ogley wx,0-`l,1-ok) gahna 'dxard' qitcdl m`d  
^SCR("W4PRMPC1",29)
 {24 }:( 0 - `l ,2 - mixgaen mihixt wx,1 - ok ) wzrd mr cgia dpnfd qitcdl m`d  
^SCR("W4PRMPC1",30)
                     {25 }: ( 0 - `l ,1 - ok ) xa zqtcnl xa zepnfd qitcdl m`d  
^SCR("W4PRMPC1",31)
  {30 }:( 2 - zeqtcnd lkl ,1 - xa zqtcnn ueg , 0 - `l ) TAW zepnfd qitcdl m`d  
^SCR("W4PRMPC1",32)
                                  {                     31}  TAW -l dxrd hqwh  
^SCR("W4PRMPC1",33)
                   {32 }: (1 - zxzeka , 0 - dxey lka) TAW -l dxrd qitcdl dti`  
^SCR("W4PRMPC1",34)
                                                {63}: WOLT jy zepnfd qitcdl m`d
^SCR("W4PRMPC1",35)
                                  {35 } : 1 = `edy dxwna zenk oeaa qitcdl m`d  
^SCR("W4PRMPC1",36)
 {37 }: [ oea jeza - 2 , zqtcn dze`l- 1 ] dpnfd ihixt fekix qitcdl hxet dfi`l  
^SCR("W4PRMPC1",37)
                                       {39 }: oea seqa mihixt k"dq qitcdl m`d
^SCR("W4PRMPC1",38)
                                              {45 }: "0" hixt oeaa qitcdl m`d  
^SCR("W4PRMPC1",39)
                                                                               
^SCR("W4PRMPC1",40)
                                                                               
^SCR("W4PRMPC1",41)
                                                                               
^SCR("W4PRMPC1",42)
                                                                               
^SCR("W4PRMPC1",43)
                                                                               
^SCR("W4PRMPC1","AV",1)
çáèîúñôãîìäñôãäìíéøèîøô
^SCR("W4PRMPC1","AV",2)
:(0-àì,1-ïë)çáèîìïåááúéæòåìáèéøôíùñéôãäì
^SCR("W4PRMPC1","AV",3)
:(3-úåöåá÷åúåðîéôì,1-úåðîéôì,2-äãì÷äøãñéôì,0-ïéà)äñôãäïåéî
^SCR("W4PRMPC1","AV",4)
:(3-úåöåá÷åúåðîéôì,1-úåðîéôì,2-äãì÷äøãñéôì,0-ïéà)'ìùîäñôãäïåéî
^SCR("W4PRMPC1","AV",5)
:èéøôâåñéôìïåáùçåçìùîìñôåèïééîìíàä
^SCR("W4PRMPC1","AV",6)
:(0-àì,1-ïë)äðîâåñéôìíéðåá÷ìçìíàä
^SCR("W4PRMPC1","AV",7)
:(0-àì,1-ïë)íéèñäêåúáùíéèéøôäïééáçååøúøåùóéñåäìíàä
^SCR("W4PRMPC1","AV",8)
:(0-àì,2-íéèñåíéùàøíéèéøô,1-íéùàøíéèéøô)å÷áíéèéøôäïéáãéøôäìíàä
^SCR("W4PRMPC1","AV",9)
:(1-èìåáïôåâá,2-ùâãåîïôåâá,0-ìéâøïôåâá)äðîæäïîæñôãä
^SCR("W4PRMPC1","AV",10)
:(3-øåçùìòèìåá,1-èìåá,2-ùâãåî,0-ìéâø)äðîæä'ñîñéôãäìïôåâäæéàá
^SCR("W4PRMPC1","AV",11)
:äðîæäìùéîåé'ñîñéôãäìíàä
^SCR("W4PRMPC1","AV",12)
:(0-ìéâø,3-øåçùìòèìåá,1-èìåá,2-ùâãåî)ïçìåù'ñîñéôãäìïôåâäæéàá
^SCR("W4PRMPC1","AV",13)
:(1-èìåáïôåâá,2-ùâãåîïôåâá,0-ìéâøïôåâá)íéãòåñ'ñîñôãä
^SCR("W4PRMPC1","AV",14)
:íìåàíùñéôãäìíàä
^SCR("W4PRMPC1","AV",15)
:äãòñîúðîæäúøúåëáçå÷ìíùñéôãäìíàä
^SCR("W4PRMPC1","AV",16)
:úåðè÷úåéúåàáúñôãîíùñéôãäìíàä
^SCR("W4PRMPC1","AV",17)
:1úåîëáíééùàøíéèéøôäìëñéôãäìíàä
^SCR("W4PRMPC1","AV",18)
:úåàéîåøúåéúåàáäðî'ñîñéôãäìíàä
^SCR("W4PRMPC1","AV",19)
:úåôñåúúåöåá÷íòèéøôáíéèñäïéáúåéîåøúåøôññéôãäìíàä
^SCR("W4PRMPC1","AV",20)
:(0-àì,1.5-èñîúåôñåúíâ,1-ïë)éùàøøöåîùúñôãîåúåàìúôñåúñôãä
^SCR("W4PRMPC1","AV",21)
:(3-ãåàîìåãâ,2-ìåãâ,1-ìéâøïôåâá,0-ñéôãäìàì)ïåááèéøôãå÷ñéôãäìêéà
^SCR("W4PRMPC1","AV",22)
:(ïè÷-0,èìåá-2,ìåãâ-1)éùàøèéøôñéôãäìïôåâäæéàá
^SCR("W4PRMPC1","AV",23)
:(ïè÷-0,èìåá-2,ìåãâ-1)úåôñåúñéôãäìïôåâäæéàá
^SCR("W4PRMPC1","AV",24)
:(ïè÷-0,èìåá-2,ìåãâ-1)ñåú'á÷íòèéøôìíéèéøôèññéôãäìïôåâäæéàá
^SCR("W4PRMPC1","AV",25)
:(ïè÷-0,èìåá-2,ìåãâ-1)úé÷ñòäçåøàìíéèéøôèññéôãäìïôåâäæéàá
^SCR("W4PRMPC1","AV",26)
:(0-àì,1-ïë)úåðè÷úåéúåàáäøòäñéôãäì
^SCR("W4PRMPC1","AV",27)
:(2-íìùïçìåù÷ø,0-àì,1-ïë)çáèîáíéìåèéáñéôãäìíàä
^SCR("W4PRMPC1","AV",28)
:(3-äùéøãéôì,2-íìùïçìåù÷ø,0-àì,1-ïë)çáèîá'äøáòä'ñéôãäìíàä
^SCR("W4PRMPC1","AV",29)
:(0-àì,2-íéøçáåîíéèéøô÷ø,1-ïë)÷úòäíòãçéáäðîæäñéôãäìíàä
^SCR("W4PRMPC1","AV",30)
:(0-àì,1-ïë)øáúñôãîìøáúåðîæäñéôãäìíàä
^SCR("W4PRMPC1","AV",31)
:(2-úåñôãîäìëì,1-øáúñôãîîõåç,0-àì)TAWúåðîæäñéôãäìíàä
^SCR("W4PRMPC1","AV",32)
TAW-ìäøòäèñ÷è
^SCR("W4PRMPC1","AV",33)
:(1-úøúåëá,0-äøåùìëá)TAW-ìäøòäñéôãäìäôéà
^SCR("W4PRMPC1","AV",34)
:WOLTêùúåðîæäñéôãäìíàä
^SCR("W4PRMPC1","AV",35)
:1=àåäùäø÷îáúåîëïåááñéôãäìíàä
^SCR("W4PRMPC1","AV",36)
:åáêåúá-2,úñôãîäúåàì-äðîæäéèéøôæåëéøñéôãäìèøåôäæéàì
^SCR("W4PRMPC1","AV",37)
:ïåáóåñáíéèéøôë"äññéôãäìíàä
^SCR("W4PRMPC1","AV",38)
:"0"èéøôïåááñéôãäìíàä
^SCR("W4PRMPC1","AV",39)

^SCR("W4PRMPC1","AV",40)

^SCR("W4PRMPC1","AV",41)

^SCR("W4PRMPC1","AV",42)

^SCR("W4PRMPC1","AV",43)

^SCR("W4PRMPC1","NAME")
gahn zqtcnl dqtcd
^SCR("W4PRMPC1","P",3,"CRD")
16,36,B,1,0
^SCR("W4PRMPC1","P",3,"HELP")

^SCR("W4PRMPC1","P",3,"LMAX")
4
^SCR("W4PRMPC1","P",3,"MUMPS1")

^SCR("W4PRMPC1","P",3,"MUMPS2")

^SCR("W4PRMPC1","P",3,"TYP")
B
^SCR("W4PRMPC1","P",4,"CRD")
7,6,B,1,0
^SCR("W4PRMPC1","P",4,"HELP")

^SCR("W4PRMPC1","P",4,"LMAX")
4
^SCR("W4PRMPC1","P",4,"MUMPS1")

^SCR("W4PRMPC1","P",4,"MUMPS2")

^SCR("W4PRMPC1","P",4,"TYP")
B
^SCR("W4PRMPC1","P",5,"CRD")
8,2,N,1,0
^SCR("W4PRMPC1","P",5,"HELP")

^SCR("W4PRMPC1","P",5,"LMAX")
4
^SCR("W4PRMPC1","P",5,"MUMPS1")

^SCR("W4PRMPC1","P",5,"MUMPS2")

^SCR("W4PRMPC1","P",5,"TYP")
N
^SCR("W4PRMPC1","P",6,"CRD")
14,52,B,1,0
^SCR("W4PRMPC1","P",6,"HELP")

^SCR("W4PRMPC1","P",6,"LMAX")
4
^SCR("W4PRMPC1","P",6,"MUMPS1")

^SCR("W4PRMPC1","P",6,"MUMPS2")

^SCR("W4PRMPC1","P",6,"TYP")
B
^SCR("W4PRMPC1","P",7,"CRD")
15,33,B,1,0
^SCR("W4PRMPC1","P",7,"HELP")

^SCR("W4PRMPC1","P",7,"LMAX")
4
^SCR("W4PRMPC1","P",7,"MUMPS1")

^SCR("W4PRMPC1","P",7,"MUMPS2")

^SCR("W4PRMPC1","P",7,"TYP")
B
^SCR("W4PRMPC1","P",8,"CRD")
2,18,B,1,0
^SCR("W4PRMPC1","P",8,"HELP")

^SCR("W4PRMPC1","P",8,"LMAX")
4
^SCR("W4PRMPC1","P",8,"MUMPS1")

^SCR("W4PRMPC1","P",8,"MUMPS2")

^SCR("W4PRMPC1","P",8,"TYP")
B
^SCR("W4PRMPC1","P",9,"CRD")
11,41,B,1,0
^SCR("W4PRMPC1","P",9,"HELP")

^SCR("W4PRMPC1","P",9,"LMAX")
4
^SCR("W4PRMPC1","P",9,"MUMPS1")

^SCR("W4PRMPC1","P",9,"MUMPS2")

^SCR("W4PRMPC1","P",9,"TYP")
B
^SCR("W4PRMPC1","P",10,"CRD")
3,8,N,1,0
^SCR("W4PRMPC1","P",10,"HELP")

^SCR("W4PRMPC1","P",10,"LMAX")
4
^SCR("W4PRMPC1","P",10,"MUMPS1")

^SCR("W4PRMPC1","P",10,"MUMPS2")

^SCR("W4PRMPC1","P",10,"MUST")

^SCR("W4PRMPC1","P",10,"TYP")
N
^SCR("W4PRMPC1","P",11,"CRD")
6,24,B,1,0
^SCR("W4PRMPC1","P",11,"HELP")

^SCR("W4PRMPC1","P",11,"LMAX")
4
^SCR("W4PRMPC1","P",11,"MUMPS1")

^SCR("W4PRMPC1","P",11,"MUMPS2")

^SCR("W4PRMPC1","P",11,"TYP")
B
^SCR("W4PRMPC1","P",12,"CRD")
5,29,B,1,0
^SCR("W4PRMPC1","P",12,"HELP")

^SCR("W4PRMPC1","P",12,"LMAX")
4
^SCR("W4PRMPC1","P",12,"MUMPS1")

^SCR("W4PRMPC1","P",12,"MUMPS2")

^SCR("W4PRMPC1","P",12,"TYP")
B
^SCR("W4PRMPC1","P",13,"CRD")
9,4,N,1,0
^SCR("W4PRMPC1","P",13,"HELP")

^SCR("W4PRMPC1","P",13,"LMAX")
4
^SCR("W4PRMPC1","P",13,"MUMPS1")

^SCR("W4PRMPC1","P",13,"MUMPS2")

^SCR("W4PRMPC1","P",13,"TYP")
N
^SCR("W4PRMPC1","P",14,"CRD")
4,5,N,1,0
^SCR("W4PRMPC1","P",14,"HELP")

^SCR("W4PRMPC1","P",14,"LMAX")
4
^SCR("W4PRMPC1","P",14,"MUMPS1")

^SCR("W4PRMPC1","P",14,"MUMPS2")

^SCR("W4PRMPC1","P",14,"TYP")
N
^SCR("W4PRMPC1","P",15,"CRD")
10,5,N,1,0
^SCR("W4PRMPC1","P",15,"HELP")

^SCR("W4PRMPC1","P",15,"LMAX")
4
^SCR("W4PRMPC1","P",15,"MUMPS1")

^SCR("W4PRMPC1","P",15,"MUMPS2")

^SCR("W4PRMPC1","P",15,"TYP")
N
^SCR("W4PRMPC1","P",16,"CRD")
12,4,N,1,0
^SCR("W4PRMPC1","P",16,"HELP")

^SCR("W4PRMPC1","P",16,"LMAX")
4
^SCR("W4PRMPC1","P",16,"MUMPS1")

^SCR("W4PRMPC1","P",16,"MUMPS2")

^SCR("W4PRMPC1","P",16,"TYP")
N
^SCR("W4PRMPC1","P",18,"CRD")
20,8,N,1,0
^SCR("W4PRMPC1","P",18,"HELP")

^SCR("W4PRMPC1","P",18,"LMAX")
4
^SCR("W4PRMPC1","P",18,"MUMPS1")

^SCR("W4PRMPC1","P",18,"MUMPS2")

^SCR("W4PRMPC1","P",18,"TYP")
N
^SCR("W4PRMPC1","P",19,"CRD")
13,3,N,1,0
^SCR("W4PRMPC1","P",19,"HELP")

^SCR("W4PRMPC1","P",19,"LMAX")
4
^SCR("W4PRMPC1","P",19,"MUMPS1")

^SCR("W4PRMPC1","P",19,"MUMPS2")

^SCR("W4PRMPC1","P",19,"TYP")
N
^SCR("W4PRMPC1","P",20,"CRD")
21,1,N,1,0
^SCR("W4PRMPC1","P",20,"HELP")

^SCR("W4PRMPC1","P",20,"LMAX")
4
^SCR("W4PRMPC1","P",20,"MUMPS1")

^SCR("W4PRMPC1","P",20,"MUMPS2")

^SCR("W4PRMPC1","P",20,"MUST")

^SCR("W4PRMPC1","P",20,"TYP")
N
^SCR("W4PRMPC1","P",21,"CRD")
17,35,B,1,0
^SCR("W4PRMPC1","P",21,"HELP")

^SCR("W4PRMPC1","P",21,"LMAX")
4
^SCR("W4PRMPC1","P",21,"MUMPS1")

^SCR("W4PRMPC1","P",21,"MUMPS2")

^SCR("W4PRMPC1","P",21,"TYP")
B
^SCR("W4PRMPC1","P",22,"CRD")
27,9,N,1,0
^SCR("W4PRMPC1","P",22,"HELP")

^SCR("W4PRMPC1","P",22,"LMAX")
4
^SCR("W4PRMPC1","P",22,"MUMPS1")

^SCR("W4PRMPC1","P",22,"MUMPS2")
I HZMBIT'=0,HZMBIT'=1,HZMBIT'=2 S %SC("ER")=1
^SCR("W4PRMPC1","P",22,"MUST")

^SCR("W4PRMPC1","P",22,"TYP")
N
^SCR("W4PRMPC1","P",23,"CRD")
28,7,N,1,0
^SCR("W4PRMPC1","P",23,"HELP")

^SCR("W4PRMPC1","P",23,"LMAX")
4
^SCR("W4PRMPC1","P",23,"MUMPS1")

^SCR("W4PRMPC1","P",23,"MUMPS2")
I HZMHV'=0,HZMHV'=1,HZMHV'=2 S %SC("ER")=1
^SCR("W4PRMPC1","P",23,"MUST")

^SCR("W4PRMPC1","P",23,"TYP")
N
^SCR("W4PRMPC1","P",24,"CRD")
29,1,N,1,0
^SCR("W4PRMPC1","P",24,"HELP")

^SCR("W4PRMPC1","P",24,"LMAX")
4
^SCR("W4PRMPC1","P",24,"MUMPS1")

^SCR("W4PRMPC1","P",24,"MUMPS2")
I HZMDBL'=1,HZMDBL'=2,HZMDBL'=0 S %SC("ER")=1
^SCR("W4PRMPC1","P",24,"TYP")
N
^SCR("W4PRMPC1","P",25,"CRD")
30,21,B,1,0
^SCR("W4PRMPC1","P",25,"HELP")

^SCR("W4PRMPC1","P",25,"LMAX")
4
^SCR("W4PRMPC1","P",25,"MUMPS1")

^SCR("W4PRMPC1","P",25,"MUMPS2")

^SCR("W4PRMPC1","P",25,"TYP")
B
^SCR("W4PRMPC1","P",26,"CRD")
26,25,B,1,0
^SCR("W4PRMPC1","P",26,"HELP")

^SCR("W4PRMPC1","P",26,"LMAX")
4
^SCR("W4PRMPC1","P",26,"MUMPS1")

^SCR("W4PRMPC1","P",26,"MUMPS2")

^SCR("W4PRMPC1","P",26,"TYP")
B
^SCR("W4PRMPC1","P",28,"CRD")
19,14,B,1,0
^SCR("W4PRMPC1","P",28,"HELP")

^SCR("W4PRMPC1","P",28,"LMAX")
4
^SCR("W4PRMPC1","P",28,"MUMPS1")

^SCR("W4PRMPC1","P",28,"MUMPS2")

^SCR("W4PRMPC1","P",28,"TYP")
B
^SCR("W4PRMPC1","P",30,"CRD")
31,2,N,1,0
^SCR("W4PRMPC1","P",30,"HELP")

^SCR("W4PRMPC1","P",30,"LMAX")
4
^SCR("W4PRMPC1","P",30,"MUMPS1")

^SCR("W4PRMPC1","P",30,"MUMPS2")

^SCR("W4PRMPC1","P",30,"MUST")

^SCR("W4PRMPC1","P",30,"TYP")
N
^SCR("W4PRMPC1","P",31,"CRD")
32,59,H,24
^SCR("W4PRMPC1","P",31,"HELP")

^SCR("W4PRMPC1","P",31,"LMAX")
24
^SCR("W4PRMPC1","P",31,"MUMPS1")

^SCR("W4PRMPC1","P",31,"MUMPS2")

^SCR("W4PRMPC1","P",31,"TYP")
H
^SCR("W4PRMPC1","P",32,"CRD")
33,19,N,1,0
^SCR("W4PRMPC1","P",32,"HELP")

^SCR("W4PRMPC1","P",32,"LMAX")
4
^SCR("W4PRMPC1","P",32,"MUMPS1")

^SCR("W4PRMPC1","P",32,"MUMPS2")

^SCR("W4PRMPC1","P",32,"TYP")
N
^SCR("W4PRMPC1","P",33,"CRD")
18,35,B,1,0
^SCR("W4PRMPC1","P",33,"HELP")

^SCR("W4PRMPC1","P",33,"LMAX")
4
^SCR("W4PRMPC1","P",33,"MUMPS1")

^SCR("W4PRMPC1","P",33,"MUMPS2")

^SCR("W4PRMPC1","P",33,"TYP")
B
^SCR("W4PRMPC1","P",35,"CRD")
35,34,B,1,0
^SCR("W4PRMPC1","P",35,"HELP")

^SCR("W4PRMPC1","P",35,"LMAX")
4
^SCR("W4PRMPC1","P",35,"MUMPS1")

^SCR("W4PRMPC1","P",35,"MUMPS2")

^SCR("W4PRMPC1","P",35,"TYP")
B
^SCR("W4PRMPC1","P",37,"CRD")
36,1,E,2,0
^SCR("W4PRMPC1","P",37,"HELP")

^SCR("W4PRMPC1","P",37,"LMAX")
4
^SCR("W4PRMPC1","P",37,"MUMPS1")

^SCR("W4PRMPC1","P",37,"MUMPS2")

^SCR("W4PRMPC1","P",37,"TYP")
E
^SCR("W4PRMPC1","P",39,"CRD")
37,39,B,1,0
^SCR("W4PRMPC1","P",39,"HELP")

^SCR("W4PRMPC1","P",39,"LMAX")
4
^SCR("W4PRMPC1","P",39,"MUMPS1")

^SCR("W4PRMPC1","P",39,"MUMPS2")

^SCR("W4PRMPC1","P",39,"TYP")
B
^SCR("W4PRMPC1","P",41,"CRD")
22,9,N,1,0
^SCR("W4PRMPC1","P",41,"HELP")

^SCR("W4PRMPC1","P",41,"LMAX")
4
^SCR("W4PRMPC1","P",41,"MUMPS1")

^SCR("W4PRMPC1","P",41,"MUMPS2")

^SCR("W4PRMPC1","P",41,"TYP")
N
^SCR("W4PRMPC1","P",42,"CRD")
23,12,N,1,0
^SCR("W4PRMPC1","P",42,"HELP")

^SCR("W4PRMPC1","P",42,"LMAX")
4
^SCR("W4PRMPC1","P",42,"MUMPS1")

^SCR("W4PRMPC1","P",42,"MUMPS2")

^SCR("W4PRMPC1","P",42,"TYP")
N
^SCR("W4PRMPC1","P",43,"CRD")
24,3,N,1,0
^SCR("W4PRMPC1","P",43,"HELP")

^SCR("W4PRMPC1","P",43,"LMAX")
4
^SCR("W4PRMPC1","P",43,"MUMPS1")

^SCR("W4PRMPC1","P",43,"MUMPS2")

^SCR("W4PRMPC1","P",43,"TYP")
N
^SCR("W4PRMPC1","P",44,"CRD")
25,7,N,1,0
^SCR("W4PRMPC1","P",44,"HELP")

^SCR("W4PRMPC1","P",44,"LMAX")
4
^SCR("W4PRMPC1","P",44,"MUMPS1")

^SCR("W4PRMPC1","P",44,"MUMPS2")

^SCR("W4PRMPC1","P",44,"TYP")
N
^SCR("W4PRMPC1","P",45,"CRD")
38,46,B,1,0
^SCR("W4PRMPC1","P",45,"HELP")

^SCR("W4PRMPC1","P",45,"LMAX")
4
^SCR("W4PRMPC1","P",45,"MUMPS1")

^SCR("W4PRMPC1","P",45,"MUMPS2")

^SCR("W4PRMPC1","P",45,"TYP")
B
^SCR("W4PRMPC1","P",63,"CRD")
34,48,B,1,0
^SCR("W4PRMPC1","P",63,"HELP")

^SCR("W4PRMPC1","P",63,"LMAX")
3
^SCR("W4PRMPC1","P",63,"MUMPS1")

^SCR("W4PRMPC1","P",63,"MUMPS2")

^SCR("W4PRMPC1","P",63,"TYP")
B
^SCR("W4PRMPC1","P","NAME","BIGNAME")
41
^SCR("W4PRMPC1","P","NAME","BIGNMB")
20
^SCR("W4PRMPC1","P","NAME","BIGNMEZA")
44
^SCR("W4PRMPC1","P","NAME","BIGNMEZI")
42
^SCR("W4PRMPC1","P","NAME","BIGNMEZT")
43
^SCR("W4PRMPC1","P","NAME","BIGTIME")
13
^SCR("W4PRMPC1","P","NAME","HZMBAR")
25
^SCR("W4PRMPC1","P","NAME","HZMBIT")
22
^SCR("W4PRMPC1","P","NAME","HZMDBL")
24
^SCR("W4PRMPC1","P","NAME","HZMHV")
23
^SCR("W4PRMPC1","P","NAME","HZMLKHN")
7
^SCR("W4PRMPC1","P","NAME","HZMRKZ")
37
^SCR("W4PRMPC1","P","NAME","LINE")
5
^SCR("W4PRMPC1","P","NAME","MANA")
10
^SCR("W4PRMPC1","P","NAME","MANABLKV")
33
^SCR("W4PRMPC1","P","NAME","MANAM")
14
^SCR("W4PRMPC1","P","NAME","MANATL")
11
^SCR("W4PRMPC1","P","NAME","MSPYOM")
9
^SCR("W4PRMPC1","P","NAME","NMPRNMSL")
3
^SCR("W4PRMPC1","P","NAME","NOBIGHRA")
26
^SCR("W4PRMPC1","P","NAME","NOPCLOAZ")
8
^SCR("W4PRMPC1","P","NAME","NOPCWOLT")
63
^SCR("W4PRMPC1","P","NAME","NOPCZERO")
45
^SCR("W4PRMPC1","P","NAME","NOQ1")
35
^SCR("W4PRMPC1","P","NAME","NOROMA")
28
^SCR("W4PRMPC1","P","NAME","NOSPACE2")
4
^SCR("W4PRMPC1","P","NAME","ORDBIG")
15
^SCR("W4PRMPC1","P","NAME","PCHZKV")
12
^SCR("W4PRMPC1","P","NAME","PCQN1")
21
^SCR("W4PRMPC1","P","NAME","PCULNM")
6
^SCR("W4PRMPC1","P","NAME","QNPARHZ")
39
^SCR("W4PRMPC1","P","NAME","SOADBIG")
19
^SCR("W4PRMPC1","P","NAME","TAWHR")
31
^SCR("W4PRMPC1","P","NAME","TAWHRKOT")
32
^SCR("W4PRMPC1","P","NAME","TAWHZ")
30
^SCR("W4PRMPC1","P","NAME","TBLBIG")
16
^SCR("W4PRMPC1","P","NAME","TSFTIED")
18
^SCR("W4PRMPC1","P","NM",3)
NMPRNMSL
^SCR("W4PRMPC1","P","NM",4)
NOSPACE2
^SCR("W4PRMPC1","P","NM",5)
LINE
^SCR("W4PRMPC1","P","NM",6)
PCULNM
^SCR("W4PRMPC1","P","NM",7)
HZMLKHN
^SCR("W4PRMPC1","P","NM",8)
NOPCLOAZ
^SCR("W4PRMPC1","P","NM",9)
MSPYOM
^SCR("W4PRMPC1","P","NM",10)
MANA
^SCR("W4PRMPC1","P","NM",11)
MANATL
^SCR("W4PRMPC1","P","NM",12)
PCHZKV
^SCR("W4PRMPC1","P","NM",13)
BIGTIME
^SCR("W4PRMPC1","P","NM",14)
MANAM
^SCR("W4PRMPC1","P","NM",15)
ORDBIG
^SCR("W4PRMPC1","P","NM",16)
TBLBIG
^SCR("W4PRMPC1","P","NM",18)
TSFTIED
^SCR("W4PRMPC1","P","NM",19)
SOADBIG
^SCR("W4PRMPC1","P","NM",20)
BIGNMB
^SCR("W4PRMPC1","P","NM",21)
PCQN1
^SCR("W4PRMPC1","P","NM",22)
HZMBIT
^SCR("W4PRMPC1","P","NM",23)
HZMHV
^SCR("W4PRMPC1","P","NM",24)
HZMDBL
^SCR("W4PRMPC1","P","NM",25)
HZMBAR
^SCR("W4PRMPC1","P","NM",26)
NOBIGHRA
^SCR("W4PRMPC1","P","NM",28)
NOROMA
^SCR("W4PRMPC1","P","NM",30)
TAWHZ
^SCR("W4PRMPC1","P","NM",31)
TAWHR
^SCR("W4PRMPC1","P","NM",32)
TAWHRKOT
^SCR("W4PRMPC1","P","NM",33)
MANABLKV
^SCR("W4PRMPC1","P","NM",35)
NOQ1
^SCR("W4PRMPC1","P","NM",37)
HZMRKZ
^SCR("W4PRMPC1","P","NM",39)
QNPARHZ
^SCR("W4PRMPC1","P","NM",41)
BIGNAME
^SCR("W4PRMPC1","P","NM",42)
BIGNMEZI
^SCR("W4PRMPC1","P","NM",43)
BIGNMEZT
^SCR("W4PRMPC1","P","NM",44)
BIGNMEZA
^SCR("W4PRMPC1","P","NM",45)
NOPCZERO
^SCR("W4PRMPC1","P","NM",63)
NOPCWOLT
^SCR("W4PRMPC2")
H
^SCR("W4PRMPC2",1)
                       # zepeayg zqtcnl zqtcdl mixhnxt #                       
^SCR("W4PRMPC2",2)
 {05 }:( 0 - `l , 2 - mpiga mihixt llek , 1 - ok )          fkexn oeayg z`ved  
^SCR("W4PRMPC2",3)
                         {06 }: (0 - `l , 1 - ok ) zhxetn dxeva zipeayg zqtcd  
^SCR("W4PRMPC2",4)
                         {09 }:( 0 - `l , 1 - ok) zifrela oeayg qitcdl zexyt`  
^SCR("W4PRMPC2",5)
                             {11 } zixara oeayg qitcdl xyt` zilbp` dqxiba m`d  
^SCR("W4PRMPC2",6)
                             {14 }                cge`n dyxen wqer qitcdl m`d  
^SCR("W4PRMPC2",7)
                                   {16 }  : zxzeka cxtpa dxice zia qitcdl m`d  
^SCR("W4PRMPC2",8)
          {18 }: (migelyna wx-2,ok-1,`l-0 ) dlaw/qn zipeayga zexrd qitcdl m`d  
^SCR("W4PRMPC2",9)
                         {35 }: ( 0 - `l ,1 - ok ) xidn ogleyl gtq qitcdl m`d  
^SCR("W4PRMPC2",10)
                     {37 }: (0 - `l ,1 - ok) xidn ogleya oinfnd my qitcdl m`d  
^SCR("W4PRMPC2",11)
  {40 }:(0 -`l,4-cinz,2-migelyne dcrqn,3-migelyne TAW,1-migelyn) glynl qitcdl  
^SCR("W4PRMPC2",12)
          {41 }: zelecb zeize`a gelyn zcerz e` glynl jnqna iy`x hixt qitcdl m`d
^SCR("W4PRMPC2",13)
                            {42 }: ( 0 - `l , 1 - ok ) oeayga dxrd qitcdl m`d  
^SCR("W4PRMPC2",14)
                              {43 }: ( 0 - `l ,1 - ok ) lehia yelz qitcdl m`d  
^SCR("W4PRMPC2",15)
                              {44 }: ( 0 - `l ,1 - ok )  dgpd yelz qitcdl m`d  
^SCR("W4PRMPC2",16)
  {45 }:(0-qitcdl `l,2-zipeaygae oeayga,1-oeayga ) "zexiy llek `l" qitcdl m`d  
^SCR("W4PRMPC2",17)
               {47 }:( 0 - `l , 1 - ok )  dtwd yelz mewna gelyn 'z qitcdl m`d  
^SCR("W4PRMPC2",18)
                                              {48 }: zetqezl zxzek qitcdl m`d  
^SCR("W4PRMPC2",19)
                      {50 }:       [ - 1  qitcdl `l ] dtwd yelz ly miwzrd 'qn  
^SCR("W4PRMPC2",20)
                                        {52 }: dcrqnl dtwd yelz wx qitcdl m`d  
^SCR("W4PRMPC2",21)
                                  {55 }:      dtwd yelza gewl zxzi qitcdl m`d  
^SCR("W4PRMPC2",22)
                                  {60 }:        zipeayga gewl zxzi qitcdl m`d  
^SCR("W4PRMPC2",23)
                     {65 } : `"k ly zepexg` zextq 4 wx dcrqnl gtqa qitcdl m`d  
^SCR("W4PRMPC2",24)
                                           {66 } : `"k yelz lr tih qitcdl m`d  
^SCR("W4PRMPC2",25)
      {67 }: (2-dcrqnl wx,1-gewll wx,0-dcrqnle gewll) qitcdl `"k ly migtq dnk  
^SCR("W4PRMPC2",26)
   {68 }: (2-dcrqnl wx,1-gewll wx,0-dcrqnle gewll) qitcdl qia oz ly migtq dnk  
^SCR("W4PRMPC2",27)
                        {78 } :                cx`weilee ly miyelz qitcdl m`d  
^SCR("W4PRMPC2",28)
                        {79 } :          LOGIC  BUSINESS ly miyelz qitcdl m`d  
^SCR("W4PRMPC2",29)
                                        {85 }: OTH hixta dgpd zxey qitcdl m`d  
^SCR("W4PRMPC2",30)
                      {89 }: ihnehe` dtew zqtcnl `ayl xeciy ze`vez qitcdl m`d  
^SCR("W4PRMPC2",31)
                           {90 }:  zegkep oerya d`ivie dqipk iyelz qitcdl m`d  
^SCR("W4PRMPC2",32)
                              {92 }:  dxibn zgizt ixg` dqtcda i`lic zeyrl m`d  
^SCR("W4PRMPC2",33)
                                  {94 }:  gewll ziwlg zipeayga tih qitcdl m`d  
^SCR("W4PRMPC2",34)
                                     {95 } : (ok-1,`l-0) melyz beq yibcdl m`d  
^SCR("W4PRMPC2",35)
         {81 } : ( `l - 0 ,ok - 1 ) hla`hn oeayg qitcdl zqtcn dfi`l le`yl m`d  
^SCR("W4PRMPC2",36)
                   {83 } : ( `l - 0 ,ok - 1 ) `"k ly wzt qitcdl m`d le`yl m`d  
^SCR("W4PRMPC2",37)
                                                                               
^SCR("W4PRMPC2",38)
                                                                               
^SCR("W4PRMPC2","AV",1)
úåðåáùçúñôãîìúñôãäìíéøèîøô
^SCR("W4PRMPC2","AV",2)
:(0-àì,2-íðéçáíéèéøôììåë,1-ïë)æëåøîïåáùçúàöåä
^SCR("W4PRMPC2","AV",3)
:(0-àì,1-ïë)úèøåôîäøåöáúéðåáùçúñôãä
^SCR("W4PRMPC2","AV",4)
:(0-àì,1-ïë)úéæòåìáïåáùçñéôãäìúåøùôà
^SCR("W4PRMPC2","AV",5)
úéøáòáïåáùçñéôãäìøùôàúéìâðàäñøéâáíàä
^SCR("W4PRMPC2","AV",6)
ãçåàîäùøåî÷ñåòñéôãäìíàä
^SCR("W4PRMPC2","AV",7)
:úøúåëáãøôðáäøéãåúéáñéôãäìíàä
^SCR("W4PRMPC2","AV",8)
:(íéçåìùîá÷ø-2,ïë-1,àì-0)äìá÷/ñîúéðåáùçáúåøòäñéôãäìíàä
^SCR("W4PRMPC2","AV",9)
:(0-àì,1-ïë)øéäîïçìåùìçôññéôãäìíàä
^SCR("W4PRMPC2","AV",10)
:(0-àì,1-ïë)øéäîïçìåùáïéîæîäíùñéôãäìíàä
^SCR("W4PRMPC2","AV",11)
:(0-àì,4-ãéîú,2-íéçåìùîåäãòñî,3-íéçåìùîåTAW,1-íéçåìùî)çìùîìñéôãäì
^SCR("W4PRMPC2","AV",12)
:úåìåãâúåéúåàáçåìùîúãåòúåàçìùîìêîñîáéùàøèéøôñéôãäìíàä
^SCR("W4PRMPC2","AV",13)
:(0-àì,1-ïë)ïåáùçáäøòäñéôãäìíàä
^SCR("W4PRMPC2","AV",14)
:(0-àì,1-ïë)ìåèéáùåìúñéôãäìíàä
^SCR("W4PRMPC2","AV",15)
:(0-àì,1-ïë)äçðäùåìúñéôãäìíàä
^SCR("W4PRMPC2","AV",16)
:(0-ñéôãäìàì,2-úéðåáùçáåïåáùçá,1-ïåáùçá)"úåøéùììåëàì"ñéôãäìíàä
^SCR("W4PRMPC2","AV",17)
:(0-àì,1-ïë)äô÷äùåìúíå÷îáçåìùî'úñéôãäìíàä
^SCR("W4PRMPC2","AV",18)
:úåôñåúìúøúåëñéôãäìíàä
^SCR("W4PRMPC2","AV",19)
:1ñéôãäìàäô÷äùåìúìùíé÷úòä'ñî
^SCR("W4PRMPC2","AV",20)
:äãòñîìäô÷äùåìú÷øñéôãäìíàä
^SCR("W4PRMPC2","AV",21)
:äô÷äùåìúáçå÷ìúøúéñéôãäìíàä
^SCR("W4PRMPC2","AV",22)
:úéðåáùçáçå÷ìúøúéñéôãäìíàä
^SCR("W4PRMPC2","AV",23)
:à"ëìùúåðåøçàúåøôñ4÷øäãòñîìçôñáñéôãäìíàä
^SCR("W4PRMPC2","AV",24)
:à"ëùåìúìòôéèñéôãäìíàä
^SCR("W4PRMPC2","AV",25)
:(2-äãòñîì÷ø,1-çå÷ìì÷ø,0-äãòñîìåçå÷ìì)ñéôãäìà"ëìùíéçôñäîë
^SCR("W4PRMPC2","AV",26)
:(2-äãòñîì÷ø,1-çå÷ìì÷ø,0-äãòñîìåçå÷ìì)ñéôãäìñéáïúìùíéçôñäîë
^SCR("W4PRMPC2","AV",27)
:ãøà÷åéìååìùíéùåìúñéôãäìíàä
^SCR("W4PRMPC2","AV",28)
:LOGICBUSINESSìùíéùåìúñéôãäìíàä
^SCR("W4PRMPC2","AV",29)
:OTHèéøôáäçðäúøåùñéôãäìíàä
^SCR("W4PRMPC2","AV",30)
:éèîåèåàäôå÷úñôãîìàáùìøåãéùúåàöåúñéôãäìíàä
^SCR("W4PRMPC2","AV",31)
:úåçëåðïåòùáäàéöéåäñéðëéùåìúñéôãäìíàä
^SCR("W4PRMPC2","AV",32)
:äøéâîúçéúôéøçàäñôãäáéàìéãúåùòìíàä
^SCR("W4PRMPC2","AV",33)
:çå÷ììúé÷ìçúéðåáùçáôéèñéôãäìíàä
^SCR("W4PRMPC2","AV",34)
:(ïë-1,àì-0)íåìùúâåñùéâãäìíàä
^SCR("W4PRMPC2","AV",35)
:(àì-0,ïë-1)èìáàèîïåáùçñéôãäìúñôãîäæéàììåàùìíàä
^SCR("W4PRMPC2","AV",36)
:(àì-0,ïë-1)à"ëìù÷úôñéôãäìíàäìåàùìíàä
^SCR("W4PRMPC2","AV",37)

^SCR("W4PRMPC2","AV",38)

^SCR("W4PRMPC2","NAME")
zepeayg zqtcnl dqtcd mixhnxt
^SCR("W4PRMPC2","P",5,"CRD")
2,1,N,1,0
^SCR("W4PRMPC2","P",5,"HELP")

^SCR("W4PRMPC2","P",5,"LMAX")
4
^SCR("W4PRMPC2","P",5,"MUMPS1")

^SCR("W4PRMPC2","P",5,"MUMPS2")
I HSBRKZ'=1,HSBRKZ'=2,HSBRKZ'=0 S %SC("ER")=1
^SCR("W4PRMPC2","P",5,"TYP")
N
^SCR("W4PRMPC2","P",6,"CRD")
3,25,N,1,0
^SCR("W4PRMPC2","P",6,"HELP")

^SCR("W4PRMPC2","P",6,"LMAX")
4
^SCR("W4PRMPC2","P",6,"MUMPS1")

^SCR("W4PRMPC2","P",6,"MUMPS2")

^SCR("W4PRMPC2","P",6,"TYP")
N
^SCR("W4PRMPC2","P",9,"CRD")
4,25,B,1,0
^SCR("W4PRMPC2","P",9,"HELP")

^SCR("W4PRMPC2","P",9,"LMAX")
4
^SCR("W4PRMPC2","P",9,"MUMPS1")

^SCR("W4PRMPC2","P",9,"MUMPS2")

^SCR("W4PRMPC2","P",9,"MUST")

^SCR("W4PRMPC2","P",9,"TYP")
B
^SCR("W4PRMPC2","P",11,"CRD")
5,29,B,1,0
^SCR("W4PRMPC2","P",11,"HELP")

^SCR("W4PRMPC2","P",11,"LMAX")
4
^SCR("W4PRMPC2","P",11,"MUMPS1")

^SCR("W4PRMPC2","P",11,"MUMPS2")

^SCR("W4PRMPC2","P",11,"TYP")
B
^SCR("W4PRMPC2","P",14,"CRD")
6,29,B,1,0
^SCR("W4PRMPC2","P",14,"HELP")

^SCR("W4PRMPC2","P",14,"LMAX")
4
^SCR("W4PRMPC2","P",14,"MUMPS1")

^SCR("W4PRMPC2","P",14,"MUMPS2")

^SCR("W4PRMPC2","P",14,"TYP")
B
^SCR("W4PRMPC2","P",16,"CRD")
7,35,B,1,0
^SCR("W4PRMPC2","P",16,"HELP")

^SCR("W4PRMPC2","P",16,"LMAX")
4
^SCR("W4PRMPC2","P",16,"MUMPS1")

^SCR("W4PRMPC2","P",16,"MUMPS2")

^SCR("W4PRMPC2","P",16,"TYP")
B
^SCR("W4PRMPC2","P",18,"CRD")
8,10,N,1,0
^SCR("W4PRMPC2","P",18,"HELP")

^SCR("W4PRMPC2","P",18,"LMAX")
4
^SCR("W4PRMPC2","P",18,"MUMPS1")

^SCR("W4PRMPC2","P",18,"MUMPS2")

^SCR("W4PRMPC2","P",18,"TYP")
N
^SCR("W4PRMPC2","P",35,"CRD")
9,25,B,1,0
^SCR("W4PRMPC2","P",35,"HELP")

^SCR("W4PRMPC2","P",35,"LMAX")
4
^SCR("W4PRMPC2","P",35,"MUMPS1")

^SCR("W4PRMPC2","P",35,"MUMPS2")

^SCR("W4PRMPC2","P",35,"MUST")

^SCR("W4PRMPC2","P",35,"TYP")
B
^SCR("W4PRMPC2","P",37,"CRD")
10,21,B,1,0
^SCR("W4PRMPC2","P",37,"HELP")

^SCR("W4PRMPC2","P",37,"LMAX")
4
^SCR("W4PRMPC2","P",37,"MUMPS1")

^SCR("W4PRMPC2","P",37,"MUMPS2")

^SCR("W4PRMPC2","P",37,"MUST")

^SCR("W4PRMPC2","P",37,"TYP")
B
^SCR("W4PRMPC2","P",40,"CRD")
11,2,N,1,0
^SCR("W4PRMPC2","P",40,"HELP")

^SCR("W4PRMPC2","P",40,"LMAX")
4
^SCR("W4PRMPC2","P",40,"MUMPS1")

^SCR("W4PRMPC2","P",40,"MUMPS2")
I HZMMSL>3 S %SC("ER")=1
^SCR("W4PRMPC2","P",40,"MUST")

^SCR("W4PRMPC2","P",40,"TYP")
N
^SCR("W4PRMPC2","P",41,"CRD")
12,10,B,1,0
^SCR("W4PRMPC2","P",41,"HELP")

^SCR("W4PRMPC2","P",41,"LMAX")
4
^SCR("W4PRMPC2","P",41,"MUMPS1")

^SCR("W4PRMPC2","P",41,"MUMPS2")

^SCR("W4PRMPC2","P",41,"TYP")
B
^SCR("W4PRMPC2","P",42,"CRD")
13,28,B,1,0
^SCR("W4PRMPC2","P",42,"HELP")

^SCR("W4PRMPC2","P",42,"LMAX")
4
^SCR("W4PRMPC2","P",42,"MUMPS1")

^SCR("W4PRMPC2","P",42,"MUMPS2")

^SCR("W4PRMPC2","P",42,"TYP")
B
^SCR("W4PRMPC2","P",43,"CRD")
14,30,B,1,0
^SCR("W4PRMPC2","P",43,"HELP")

^SCR("W4PRMPC2","P",43,"LMAX")
4
^SCR("W4PRMPC2","P",43,"MUMPS1")

^SCR("W4PRMPC2","P",43,"MUMPS2")

^SCR("W4PRMPC2","P",43,"MUST")

^SCR("W4PRMPC2","P",43,"TYP")
B
^SCR("W4PRMPC2","P",44,"CRD")
15,30,B,1,0
^SCR("W4PRMPC2","P",44,"HELP")

^SCR("W4PRMPC2","P",44,"LMAX")
4
^SCR("W4PRMPC2","P",44,"MUMPS1")

^SCR("W4PRMPC2","P",44,"MUMPS2")

^SCR("W4PRMPC2","P",44,"TYP")
B
^SCR("W4PRMPC2","P",45,"CRD")
16,2,N,1,0
^SCR("W4PRMPC2","P",45,"HELP")

^SCR("W4PRMPC2","P",45,"LMAX")
4
^SCR("W4PRMPC2","P",45,"MUMPS1")

^SCR("W4PRMPC2","P",45,"MUMPS2")
I BOTHB<0!(BOTHB>2)!(BOTHB'?1N) S %SC("ER")=1
^SCR("W4PRMPC2","P",45,"MUST")

^SCR("W4PRMPC2","P",45,"TYP")
N
^SCR("W4PRMPC2","P",47,"CRD")
17,15,B,1,0
^SCR("W4PRMPC2","P",47,"HELP")

^SCR("W4PRMPC2","P",47,"LMAX")
4
^SCR("W4PRMPC2","P",47,"MUMPS1")

^SCR("W4PRMPC2","P",47,"MUMPS2")

^SCR("W4PRMPC2","P",47,"MUST")

^SCR("W4PRMPC2","P",47,"TYP")
B
^SCR("W4PRMPC2","P",48,"CRD")
18,46,B,1,0
^SCR("W4PRMPC2","P",48,"HELP")

^SCR("W4PRMPC2","P",48,"LMAX")
4
^SCR("W4PRMPC2","P",48,"MUMPS1")

^SCR("W4PRMPC2","P",48,"MUMPS2")

^SCR("W4PRMPC2","P",48,"TYP")
B
^SCR("W4PRMPC2","P",50,"CRD")
19,22,N,2,0
^SCR("W4PRMPC2","P",50,"HELP")

^SCR("W4PRMPC2","P",50,"LMAX")
4
^SCR("W4PRMPC2","P",50,"MUMPS1")

^SCR("W4PRMPC2","P",50,"MUMPS2")

^SCR("W4PRMPC2","P",50,"MUST")

^SCR("W4PRMPC2","P",50,"TYP")
N
^SCR("W4PRMPC2","P",52,"CRD")
20,40,B,1,0
^SCR("W4PRMPC2","P",52,"HELP")

^SCR("W4PRMPC2","P",52,"LMAX")
4
^SCR("W4PRMPC2","P",52,"MUMPS1")

^SCR("W4PRMPC2","P",52,"MUMPS2")

^SCR("W4PRMPC2","P",52,"TYP")
B
^SCR("W4PRMPC2","P",55,"CRD")
21,34,B,1,0
^SCR("W4PRMPC2","P",55,"HELP")

^SCR("W4PRMPC2","P",55,"LMAX")
4
^SCR("W4PRMPC2","P",55,"MUMPS1")

^SCR("W4PRMPC2","P",55,"MUMPS2")

^SCR("W4PRMPC2","P",55,"MUST")

^SCR("W4PRMPC2","P",55,"TYP")
B
^SCR("W4PRMPC2","P",60,"CRD")
22,34,B,1,0
^SCR("W4PRMPC2","P",60,"HELP")

^SCR("W4PRMPC2","P",60,"LMAX")
4
^SCR("W4PRMPC2","P",60,"MUMPS1")

^SCR("W4PRMPC2","P",60,"MUMPS2")

^SCR("W4PRMPC2","P",60,"TYP")
B
^SCR("W4PRMPC2","P",65,"CRD")
23,21,B,1,0
^SCR("W4PRMPC2","P",65,"HELP")

^SCR("W4PRMPC2","P",65,"LMAX")
4
^SCR("W4PRMPC2","P",65,"MUMPS1")

^SCR("W4PRMPC2","P",65,"MUMPS2")

^SCR("W4PRMPC2","P",65,"TYP")
B
^SCR("W4PRMPC2","P",66,"CRD")
24,43,B,1,0
^SCR("W4PRMPC2","P",66,"HELP")

^SCR("W4PRMPC2","P",66,"LMAX")
4
^SCR("W4PRMPC2","P",66,"MUMPS1")

^SCR("W4PRMPC2","P",66,"MUMPS2")

^SCR("W4PRMPC2","P",66,"TYP")
B
^SCR("W4PRMPC2","P",67,"CRD")
25,6,E,1,0
^SCR("W4PRMPC2","P",67,"HELP")

^SCR("W4PRMPC2","P",67,"LMAX")
4
^SCR("W4PRMPC2","P",67,"MUMPS1")

^SCR("W4PRMPC2","P",67,"MUMPS2")

^SCR("W4PRMPC2","P",67,"TYP")
E
^SCR("W4PRMPC2","P",68,"CRD")
26,3,N,1,0
^SCR("W4PRMPC2","P",68,"HELP")

^SCR("W4PRMPC2","P",68,"LMAX")
4
^SCR("W4PRMPC2","P",68,"MUMPS1")

^SCR("W4PRMPC2","P",68,"MUMPS2")

^SCR("W4PRMPC2","P",68,"TYP")
N
^SCR("W4PRMPC2","P",78,"CRD")
27,24,B,1,0
^SCR("W4PRMPC2","P",78,"HELP")

^SCR("W4PRMPC2","P",78,"LMAX")
4
^SCR("W4PRMPC2","P",78,"MUMPS1")

^SCR("W4PRMPC2","P",78,"MUMPS2")

^SCR("W4PRMPC2","P",78,"TYP")
B
^SCR("W4PRMPC2","P",79,"CRD")
28,24,B,1,0
^SCR("W4PRMPC2","P",79,"HELP")

^SCR("W4PRMPC2","P",79,"LMAX")
4
^SCR("W4PRMPC2","P",79,"MUMPS1")

^SCR("W4PRMPC2","P",79,"MUMPS2")

^SCR("W4PRMPC2","P",79,"TYP")
B
^SCR("W4PRMPC2","P",81,"CRD")
35,9,N,1,0
^SCR("W4PRMPC2","P",81,"HELP")

^SCR("W4PRMPC2","P",81,"LMAX")
4
^SCR("W4PRMPC2","P",81,"MUMPS1")

^SCR("W4PRMPC2","P",81,"MUMPS2")

^SCR("W4PRMPC2","P",81,"TYP")
N
^SCR("W4PRMPC2","P",83,"CRD")
36,19,N,1,0
^SCR("W4PRMPC2","P",83,"HELP")

^SCR("W4PRMPC2","P",83,"LMAX")
4
^SCR("W4PRMPC2","P",83,"MUMPS1")

^SCR("W4PRMPC2","P",83,"MUMPS2")

^SCR("W4PRMPC2","P",83,"TYP")
N
^SCR("W4PRMPC2","P",85,"CRD")
29,40,B,1,0
^SCR("W4PRMPC2","P",85,"HELP")

^SCR("W4PRMPC2","P",85,"LMAX")
4
^SCR("W4PRMPC2","P",85,"MUMPS1")

^SCR("W4PRMPC2","P",85,"MUMPS2")

^SCR("W4PRMPC2","P",85,"TYP")
B
^SCR("W4PRMPC2","P",89,"CRD")
30,22,B,1,0
^SCR("W4PRMPC2","P",89,"HELP")

^SCR("W4PRMPC2","P",89,"LMAX")
4
^SCR("W4PRMPC2","P",89,"MUMPS1")

^SCR("W4PRMPC2","P",89,"MUMPS2")

^SCR("W4PRMPC2","P",89,"TYP")
B
^SCR("W4PRMPC2","P",90,"CRD")
31,27,B,1,0
^SCR("W4PRMPC2","P",90,"HELP")

^SCR("W4PRMPC2","P",90,"LMAX")
4
^SCR("W4PRMPC2","P",90,"MUMPS1")

^SCR("W4PRMPC2","P",90,"MUMPS2")

^SCR("W4PRMPC2","P",90,"TYP")
B
^SCR("W4PRMPC2","P",92,"CRD")
32,30,B,1,0
^SCR("W4PRMPC2","P",92,"HELP")

^SCR("W4PRMPC2","P",92,"LMAX")
4
^SCR("W4PRMPC2","P",92,"MUMPS1")

^SCR("W4PRMPC2","P",92,"MUMPS2")

^SCR("W4PRMPC2","P",92,"TYP")
B
^SCR("W4PRMPC2","P",94,"CRD")
33,34,B,1,0
^SCR("W4PRMPC2","P",94,"HELP")

^SCR("W4PRMPC2","P",94,"LMAX")
4
^SCR("W4PRMPC2","P",94,"MUMPS1")

^SCR("W4PRMPC2","P",94,"MUMPS2")

^SCR("W4PRMPC2","P",94,"TYP")
B
^SCR("W4PRMPC2","P",95,"CRD")
34,37,N,1,0
^SCR("W4PRMPC2","P",95,"HELP")

^SCR("W4PRMPC2","P",95,"LMAX")
4
^SCR("W4PRMPC2","P",95,"MUMPS1")

^SCR("W4PRMPC2","P",95,"MUMPS2")

^SCR("W4PRMPC2","P",95,"TYP")
N
^SCR("W4PRMPC2","P","NAME","ASKCAPC")
83
^SCR("W4PRMPC2","P","NAME","ASKHBMDP")
81
^SCR("W4PRMPC2","P","NAME","ASR")
50
^SCR("W4PRMPC2","P","NAME","ASR2")
52
^SCR("W4PRMPC2","P","NAME","ASRITRA")
55
^SCR("W4PRMPC2","P","NAME","BAITDIRA")
16
^SCR("W4PRMPC2","P","NAME","BIGNMIT")
41
^SCR("W4PRMPC2","P","NAME","BIGVT")
95
^SCR("W4PRMPC2","P","NAME","BOTHB")
45
^SCR("W4PRMPC2","P","NAME","BSNOPCHP")
79
^SCR("W4PRMPC2","P","NAME","HBHR")
18
^SCR("W4PRMPC2","P","NAME","HRA2")
42
^SCR("W4PRMPC2","P","NAME","HSBENG")
9
^SCR("W4PRMPC2","P","NAME","HSBHBR")
11
^SCR("W4PRMPC2","P","NAME","HSBRKZ")
5
^SCR("W4PRMPC2","P","NAME","HZMMSL")
40
^SCR("W4PRMPC2","P","NAME","ITRA")
60
^SCR("W4PRMPC2","P","NAME","MEUHAD")
14
^SCR("W4PRMPC2","P","NAME","NOKOTTSF")
48
^SCR("W4PRMPC2","P","NAME","NOMHOTH")
85
^SCR("W4PRMPC2","P","NAME","NOPC")
90
^SCR("W4PRMPC2","P","NAME","NOVZHZG")
65
^SCR("W4PRMPC2","P","NAME","PCCA1")
67
^SCR("W4PRMPC2","P","NAME","PCTB")
68
^SCR("W4PRMPC2","P","NAME","PCTIPCA")
66
^SCR("W4PRMPC2","P","NAME","PRINTDET")
6
^SCR("W4PRMPC2","P","NAME","PTHDLY")
92
^SCR("W4PRMPC2","P","NAME","SEFAHNM")
37
^SCR("W4PRMPC2","P","NAME","SHVACSRP")
89
^SCR("W4PRMPC2","P","NAME","TAWS")
35
^SCR("W4PRMPC2","P","NAME","TIP2LK")
94
^SCR("W4PRMPC2","P","NAME","TLBIT")
43
^SCR("W4PRMPC2","P","NAME","TLHNH")
44
^SCR("W4PRMPC2","P","NAME","TMASR")
47
^SCR("W4PRMPC2","P","NAME","VCNOPC")
78
^SCR("W4PRMPC2","P","NM",5)
HSBRKZ
^SCR("W4PRMPC2","P","NM",6)
PRINTDET
^SCR("W4PRMPC2","P","NM",9)
HSBENG
^SCR("W4PRMPC2","P","NM",11)
HSBHBR
^SCR("W4PRMPC2","P","NM",14)
MEUHAD
^SCR("W4PRMPC2","P","NM",16)
BAITDIRA
^SCR("W4PRMPC2","P","NM",18)
HBHR
^SCR("W4PRMPC2","P","NM",35)
TAWS
^SCR("W4PRMPC2","P","NM",37)
SEFAHNM
^SCR("W4PRMPC2","P","NM",40)
HZMMSL
^SCR("W4PRMPC2","P","NM",41)
BIGNMIT
^SCR("W4PRMPC2","P","NM",42)
HRA2
^SCR("W4PRMPC2","P","NM",43)
TLBIT
^SCR("W4PRMPC2","P","NM",44)
TLHNH
^SCR("W4PRMPC2","P","NM",45)
BOTHB
^SCR("W4PRMPC2","P","NM",47)
TMASR
^SCR("W4PRMPC2","P","NM",48)
NOKOTTSF
^SCR("W4PRMPC2","P","NM",50)
ASR
^SCR("W4PRMPC2","P","NM",52)
ASR2
^SCR("W4PRMPC2","P","NM",55)
ASRITRA
^SCR("W4PRMPC2","P","NM",60)
ITRA
^SCR("W4PRMPC2","P","NM",65)
NOVZHZG
^SCR("W4PRMPC2","P","NM",66)
PCTIPCA
^SCR("W4PRMPC2","P","NM",67)
PCCA1
^SCR("W4PRMPC2","P","NM",68)
PCTB
^SCR("W4PRMPC2","P","NM",78)
VCNOPC
^SCR("W4PRMPC2","P","NM",79)
BSNOPCHP
^SCR("W4PRMPC2","P","NM",81)
ASKHBMDP
^SCR("W4PRMPC2","P","NM",83)
ASKCAPC
^SCR("W4PRMPC2","P","NM",85)
NOMHOTH
^SCR("W4PRMPC2","P","NM",89)
SHVACSRP
^SCR("W4PRMPC2","P","NM",90)
NOPC
^SCR("W4PRMPC2","P","NM",92)
PTHDLY
^SCR("W4PRMPC2","P","NM",94)
TIP2LK
^SCR("W4PRMPC2","P","NM",95)
BIGVT
^SCR("W4PRMPC3")
H
^SCR("W4PRMPC3",1)
                         # dlecb zqtcnl zqtcdl mixhnxt #                       
^SCR("W4PRMPC3",2)
              {70 } : (ebel mr sc lr miqitcn m`) ebel zpenzl xi`ydl zexey dnk  
^SCR("W4PRMPC3",3)
                 {72                                         } : ebel uaew my  
^SCR("W4PRMPC3",4)
                                      {73  } : ( milqwit ) ebel zpenz ly daeb  
^SCR("W4PRMPC3",5)
                                      {74  } : ( milqwit ) ebel zpenz ly agex  
^SCR("W4PRMPC3",6)
                                                 {77  }: wqrd ihxt qitcdl m`d  
^SCR("W4PRMPC3",7)
                                       {50 } : wpa oeayg ihxt ebela bivdl m`d  
^SCR("W4PRMPC3",8)
      {                                                     52} : ebela aezik  
^SCR("W4PRMPC3",9)
                                 {55 } : dhnl aezike wpa oeayg ihxt bivdl m`d  
^SCR("W4PRMPC3",10)
                        {75 } : dlecb zqtcnl zipeayga hixt cew zqtcd lhal m`d  
^SCR("W4PRMPC3",11)
                        {76 } :    xewn zqtcd ixg` qn zipeayg wzrd qitcdl m`d  
^SCR("W4PRMPC3",12)
                                       {80 }: dtwda zeipw lr zelaw qitcdl m`d  
^SCR("W4PRMPC3",13)
                                                 {81 } : dlaw wzrd qitcdl m`d  
^SCR("W4PRMPC3",14)
                                {82 }: zeipeayg zniyx mr dlawl jtq qitcdl m`d  
^SCR("W4PRMPC3",15)
                           {87 }: "n"rn llek" dcenr zfkxn zipeayga qitcdl m`d  
^SCR("W4PRMPC3",16)
                                         {89 } oal-xegya wx miknqn qitcdl m`d  
^SCR("W4PRMPC3",17)
                                                                               
^SCR("W4PRMPC3",18)
                                                                               
^SCR("W4PRMPC3","AV",1)
äìåãâúñôãîìúñôãäìíéøèîøô
^SCR("W4PRMPC3","AV",2)
:(åâåìíòóãìòíéñéôãîíà)åâåìúðåîúìøéàùäìúåøåùäîë
^SCR("W4PRMPC3","AV",3)
:åâåìõáå÷íù
^SCR("W4PRMPC3","AV",4)
:(íéìñ÷éô)åâåìúðåîúìùäáåâ
^SCR("W4PRMPC3","AV",5)
:(íéìñ÷éô)åâåìúðåîúìùáçåø
^SCR("W4PRMPC3","AV",6)
:÷ñòäéèøôñéôãäìíàä
^SCR("W4PRMPC3","AV",7)
:÷ðáïåáùçéèøôåâåìáâéöäìíàä
^SCR("W4PRMPC3","AV",8)
:åâåìááåúéë
^SCR("W4PRMPC3","AV",9)
:äèîìáåúéëå÷ðáïåáùçéèøôâéöäìíàä
^SCR("W4PRMPC3","AV",10)
:äìåãâúñôãîìúéðåáùçáèéøôãå÷úñôãäìèáìíàä
^SCR("W4PRMPC3","AV",11)
:øå÷îúñôãäéøçàñîúéðåáùç÷úòäñéôãäìíàä
^SCR("W4PRMPC3","AV",12)
:äô÷äáúåéð÷ìòúåìá÷ñéôãäìíàä
^SCR("W4PRMPC3","AV",13)
:äìá÷÷úòäñéôãäìíàä
^SCR("W4PRMPC3","AV",14)
:úåéðåáùçúîéùøíòäìá÷ìêôññéôãäìíàä
^SCR("W4PRMPC3","AV",15)
:"î"òîììåë"äãåîòúæëøîúéðåáùçáñéôãäìíàä
^SCR("W4PRMPC3","AV",16)
ïáì-øåçùá÷øíéëîñîñéôãäìíàä
^SCR("W4PRMPC3","AV",17)

^SCR("W4PRMPC3","AV",18)

^SCR("W4PRMPC3","NAME")
dlecb zqtcnl dqtcdl mixhnxt
^SCR("W4PRMPC3","P",50,"CRD")
7,39,B,1,0
^SCR("W4PRMPC3","P",50,"HELP")

^SCR("W4PRMPC3","P",50,"LMAX")
4
^SCR("W4PRMPC3","P",50,"MUMPS1")

^SCR("W4PRMPC3","P",50,"MUMPS2")

^SCR("W4PRMPC3","P",50,"TYP")
B
^SCR("W4PRMPC3","P",52,"CRD")
8,63,H,56
^SCR("W4PRMPC3","P",52,"HELP")

^SCR("W4PRMPC3","P",52,"LMAX")
56
^SCR("W4PRMPC3","P",52,"MUMPS1")

^SCR("W4PRMPC3","P",52,"MUMPS2")

^SCR("W4PRMPC3","P",52,"TYP")
H
^SCR("W4PRMPC3","P",55,"CRD")
9,33,B,1,0
^SCR("W4PRMPC3","P",55,"HELP")

^SCR("W4PRMPC3","P",55,"LMAX")
4
^SCR("W4PRMPC3","P",55,"MUMPS1")

^SCR("W4PRMPC3","P",55,"MUMPS2")

^SCR("W4PRMPC3","P",55,"TYP")
B
^SCR("W4PRMPC3","P",70,"CRD")
2,14,N,2,0
^SCR("W4PRMPC3","P",70,"HELP")

^SCR("W4PRMPC3","P",70,"LMAX")
4
^SCR("W4PRMPC3","P",70,"MUMPS1")

^SCR("W4PRMPC3","P",70,"MUMPS2")

^SCR("W4PRMPC3","P",70,"TYP")
N
^SCR("W4PRMPC3","P",72,"CRD")
3,17,E,44,0
^SCR("W4PRMPC3","P",72,"HELP")

^SCR("W4PRMPC3","P",72,"LMAX")
44
^SCR("W4PRMPC3","P",72,"MUMPS1")

^SCR("W4PRMPC3","P",72,"MUMPS2")

^SCR("W4PRMPC3","P",72,"TYP")
E
^SCR("W4PRMPC3","P",73,"CRD")
4,38,N,3,0
^SCR("W4PRMPC3","P",73,"HELP")

^SCR("W4PRMPC3","P",73,"LMAX")
5
^SCR("W4PRMPC3","P",73,"MUMPS1")

^SCR("W4PRMPC3","P",73,"MUMPS2")

^SCR("W4PRMPC3","P",73,"TYP")
N
^SCR("W4PRMPC3","P",74,"CRD")
5,38,N,3,0
^SCR("W4PRMPC3","P",74,"HELP")

^SCR("W4PRMPC3","P",74,"LMAX")
5
^SCR("W4PRMPC3","P",74,"MUMPS1")

^SCR("W4PRMPC3","P",74,"MUMPS2")

^SCR("W4PRMPC3","P",74,"TYP")
N
^SCR("W4PRMPC3","P",75,"CRD")
10,24,B,1,0
^SCR("W4PRMPC3","P",75,"HELP")

^SCR("W4PRMPC3","P",75,"LMAX")
4
^SCR("W4PRMPC3","P",75,"MUMPS1")

^SCR("W4PRMPC3","P",75,"MUMPS2")

^SCR("W4PRMPC3","P",75,"TYP")
B
^SCR("W4PRMPC3","P",76,"CRD")
11,24,B,1,0
^SCR("W4PRMPC3","P",76,"HELP")

^SCR("W4PRMPC3","P",76,"LMAX")
4
^SCR("W4PRMPC3","P",76,"MUMPS1")

^SCR("W4PRMPC3","P",76,"MUMPS2")

^SCR("W4PRMPC3","P",76,"TYP")
B
^SCR("W4PRMPC3","P",77,"CRD")
6,49,B,1,0
^SCR("W4PRMPC3","P",77,"HELP")

^SCR("W4PRMPC3","P",77,"LMAX")
5
^SCR("W4PRMPC3","P",77,"MUMPS1")

^SCR("W4PRMPC3","P",77,"MUMPS2")

^SCR("W4PRMPC3","P",77,"TYP")
B
^SCR("W4PRMPC3","P",80,"CRD")
12,39,B,1,0
^SCR("W4PRMPC3","P",80,"HELP")

^SCR("W4PRMPC3","P",80,"LMAX")
4
^SCR("W4PRMPC3","P",80,"MUMPS1")

^SCR("W4PRMPC3","P",80,"MUMPS2")

^SCR("W4PRMPC3","P",80,"TYP")
B
^SCR("W4PRMPC3","P",81,"CRD")
13,49,B,1,0
^SCR("W4PRMPC3","P",81,"HELP")

^SCR("W4PRMPC3","P",81,"LMAX")
4
^SCR("W4PRMPC3","P",81,"MUMPS1")

^SCR("W4PRMPC3","P",81,"MUMPS2")

^SCR("W4PRMPC3","P",81,"TYP")
B
^SCR("W4PRMPC3","P",82,"CRD")
14,32,B,1,0
^SCR("W4PRMPC3","P",82,"HELP")

^SCR("W4PRMPC3","P",82,"LMAX")
4
^SCR("W4PRMPC3","P",82,"MUMPS1")

^SCR("W4PRMPC3","P",82,"MUMPS2")

^SCR("W4PRMPC3","P",82,"TYP")
B
^SCR("W4PRMPC3","P",87,"CRD")
15,27,B,1,0
^SCR("W4PRMPC3","P",87,"HELP")

^SCR("W4PRMPC3","P",87,"LMAX")
4
^SCR("W4PRMPC3","P",87,"MUMPS1")

^SCR("W4PRMPC3","P",87,"MUMPS2")

^SCR("W4PRMPC3","P",87,"TYP")
B
^SCR("W4PRMPC3","P",89,"CRD")
16,41,B,1,0
^SCR("W4PRMPC3","P",89,"HELP")

^SCR("W4PRMPC3","P",89,"LMAX")
4
^SCR("W4PRMPC3","P",89,"MUMPS1")

^SCR("W4PRMPC3","P",89,"MUMPS2")

^SCR("W4PRMPC3","P",89,"TYP")
B
^SCR("W4PRMPC3","P","NAME","KOTACNT")
50
^SCR("W4PRMPC3","P","NAME","KOTACNTD")
55
^SCR("W4PRMPC3","P","NAME","KOTACNTT")
52
^SCR("W4PRMPC3","P","NAME","LHBAFTAX")
87
^SCR("W4PRMPC3","P","NAME","LOGO")
72
^SCR("W4PRMPC3","P","NAME","LOGOHG")
73
^SCR("W4PRMPC3","P","NAME","LOGOWD")
74
^SCR("W4PRMPC3","P","NAME","NOCBET")
81
^SCR("W4PRMPC3","P","NAME","NOHBCOPY")
76
^SCR("W4PRMPC3","P","NAME","NOHD")
70
^SCR("W4PRMPC3","P","NAME","NOMYDETS")
77
^SCR("W4PRMPC3","P","NAME","NOPCCB")
80
^SCR("W4PRMPC3","P","NAME","NOPCCBHB")
82
^SCR("W4PRMPC3","P","NAME","NOPCHBCD")
75
^SCR("W4PRMPC3","P","NAME","PRINTBW")
89
^SCR("W4PRMPC3","P","NM",50)
KOTACNT
^SCR("W4PRMPC3","P","NM",52)
KOTACNTT
^SCR("W4PRMPC3","P","NM",55)
KOTACNTD
^SCR("W4PRMPC3","P","NM",70)
NOHD
^SCR("W4PRMPC3","P","NM",72)
LOGO
^SCR("W4PRMPC3","P","NM",73)
LOGOHG
^SCR("W4PRMPC3","P","NM",74)
LOGOWD
^SCR("W4PRMPC3","P","NM",75)
NOPCHBCD
^SCR("W4PRMPC3","P","NM",76)
NOHBCOPY
^SCR("W4PRMPC3","P","NM",77)
NOMYDETS
^SCR("W4PRMPC3","P","NM",80)
NOPCCB
^SCR("W4PRMPC3","P","NM",81)
NOCBET
^SCR("W4PRMPC3","P","NM",82)
NOPCCBHB
^SCR("W4PRMPC3","P","NM",87)
LHBAFTAX
^SCR("W4PRMPC3","P","NM",89)
PRINTBW
^SCR("W4PRMPC4")
H
^SCR("W4PRMPC4",1)
                                                                               
^SCR("W4PRMPC4",2)
                               # migelynl dpnfd mixhnxt zxcbd #                
^SCR("W4PRMPC4",3)
               {30 }: zxvewn dxeva glynl jnqn/gelyn 'z ly zxzek qitcdl m`d     
^SCR("W4PRMPC4",4)
                                   {71 } : gahnl oeaa gewl ihxt qitcdl m`d     
^SCR("W4PRMPC4",5)
                             {72 }:       gahnl oeaa gewl zaezk qitcdl m`d     
^SCR("W4PRMPC4",6)
                             {73 }:        migelyna oeayg qitcdl xyt`l m`d     
^SCR("W4PRMPC4",7)
                        {75 }:gelyn zcerz mewna dlaw qn zipeayg qitcdl m`d     
^SCR("W4PRMPC4",8)
                        {42 }: glynl jnqn mewna dlaw/qn zipeayg qitcdl m`d     
^SCR("W4PRMPC4",9)
                             {96 }:      melyz onfa cin zipeayg qitcdl m`d     
^SCR("W4PRMPC4",10)
                             {98 }:        wzrd mr cgi gelyn 'z qitcdl m`d     
^SCR("W4PRMPC4",11)
                                  {35 } : zhxetn dxeva gelyn 'z qitcdl m`d     
^SCR("W4PRMPC4",12)
                    {40 } : glynl jnqn ly dxeva xgnl zepnfdd lk qitcdl m`d     
^SCR("W4PRMPC4",13)
                                                                               
^SCR("W4PRMPC4",14)
                             {76 }:           dwacn lr hixt cew qitcdl m`d     
^SCR("W4PRMPC4",15)
   {77 }: ( 2 - zcxtp dwacn lr ,0 - `l ,1 - ok ) dwacn lr zaezk qitcdl m`d     
^SCR("W4PRMPC4",16)
                                  {79 } : dwacn lr zewacn zxitq qitcdl m`d     
^SCR("W4PRMPC4",17)
                                {81 } : zephw zeize`a oinfnd my qitcdl m`d     
^SCR("W4PRMPC4",18)
                                {83 } : zephw zeize`a dpnfd onf qitcdl m`d     
^SCR("W4PRMPC4",19)
                                        {80 } : dwacn lr zetqez qitcdl m`d     
^SCR("W4PRMPC4",20)
                            {82 }: "i`ee` wiih" zepgleyl zewacn qitcdl m`d     
^SCR("W4PRMPC4",21)
                   {85 }: melyz ixg` wx onefna `l enleyy zeznfd qitcdl m`d     
^SCR("W4PRMPC4",22)
{90} [zgwl `a m` gewl zrbd iptl zewc qn oiiv] drbd onf itl zepnfd qitcdl m`d
^SCR("W4PRMPC4",23)
                                                                               
^SCR("W4PRMPC4","AV",1)

^SCR("W4PRMPC4","AV",2)
íéçåìùîìäðîæäíéøèîøôúøãâä
^SCR("W4PRMPC4","AV",3)
:úøöå÷îäøåöáçìùîìêîñî/çåìùî'úìùúøúåëñéôãäìíàä
^SCR("W4PRMPC4","AV",4)
:çáèîìïåááçå÷ìéèøôñéôãäìíàä
^SCR("W4PRMPC4","AV",5)
:çáèîìïåááçå÷ìúáåúëñéôãäìíàä
^SCR("W4PRMPC4","AV",6)
:íéçåìùîáïåáùçñéôãäìøùôàìíàä
^SCR("W4PRMPC4","AV",7)
:çåìùîúãåòúíå÷îáäìá÷ñîúéðåáùçñéôãäìíàä
^SCR("W4PRMPC4","AV",8)
:çìùîìêîñîíå÷îáäìá÷/ñîúéðåáùçñéôãäìíàä
^SCR("W4PRMPC4","AV",9)
:íåìùúïîæáãéîúéðåáùçñéôãäìíàä
^SCR("W4PRMPC4","AV",10)
:÷úòäíòãçéçåìùî'úñéôãäìíàä
^SCR("W4PRMPC4","AV",11)
:úèøåôîäøåöáçåìùî'úñéôãäìíàä
^SCR("W4PRMPC4","AV",12)
:çìùîìêîñîìùäøåöáøçîìúåðîæääìëñéôãäìíàä
^SCR("W4PRMPC4","AV",13)

^SCR("W4PRMPC4","AV",14)
:ä÷áãîìòèéøôãå÷ñéôãäìíàä
^SCR("W4PRMPC4","AV",15)
:(2-úãøôðä÷áãîìò,0-àì,1-ïë)ä÷áãîìòúáåúëñéôãäìíàä
^SCR("W4PRMPC4","AV",16)
:ä÷áãîìòúå÷áãîúøéôññéôãäìíàä
^SCR("W4PRMPC4","AV",17)
:úåðè÷úåéúåàáïéîæîäíùñéôãäìíàä
^SCR("W4PRMPC4","AV",18)
:úåðè÷úåéúåàáäðîæäïîæñéôãäìíàä
^SCR("W4PRMPC4","AV",19)
:ä÷áãîìòúåôñåúñéôãäìíàä
^SCR("W4PRMPC4","AV",20)
:"éàååà÷ééè"úåðçìåùìúå÷áãîñéôãäìíàä
^SCR("W4PRMPC4","AV",21)
:íåìùúéøçà÷øïîåæîáàìåîìåùùúåúîæäñéôãäìíàä
^SCR("W4PRMPC4","AV",22)
÷ìàáíàçå÷ìúòâäéðôìúå÷ãñîïéäòâäïîæéôìúåðîæäñéôãäìíàä
^SCR("W4PRMPC4","AV",23)

^SCR("W4PRMPC4","NAME")
migelyn zqtcdl mixhnxt
^SCR("W4PRMPC4","P",30,"CRD")
3,15,B,1,0
^SCR("W4PRMPC4","P",30,"HELP")

^SCR("W4PRMPC4","P",30,"LMAX")
4
^SCR("W4PRMPC4","P",30,"MUMPS1")

^SCR("W4PRMPC4","P",30,"MUMPS2")

^SCR("W4PRMPC4","P",30,"TYP")
B
^SCR("W4PRMPC4","P",35,"CRD")
11,34,B,1,0
^SCR("W4PRMPC4","P",35,"HELP")

^SCR("W4PRMPC4","P",35,"LMAX")
4
^SCR("W4PRMPC4","P",35,"MUMPS1")

^SCR("W4PRMPC4","P",35,"MUMPS2")

^SCR("W4PRMPC4","P",35,"TYP")
B
^SCR("W4PRMPC4","P",40,"CRD")
12,20,B,1,0
^SCR("W4PRMPC4","P",40,"HELP")

^SCR("W4PRMPC4","P",40,"LMAX")
4
^SCR("W4PRMPC4","P",40,"MUMPS1")

^SCR("W4PRMPC4","P",40,"MUMPS2")

^SCR("W4PRMPC4","P",40,"TYP")
B
^SCR("W4PRMPC4","P",42,"CRD")
8,24,B,1,0
^SCR("W4PRMPC4","P",42,"HELP")

^SCR("W4PRMPC4","P",42,"LMAX")
4
^SCR("W4PRMPC4","P",42,"MUMPS1")

^SCR("W4PRMPC4","P",42,"MUMPS2")

^SCR("W4PRMPC4","P",42,"TYP")
B
^SCR("W4PRMPC4","P",71,"CRD")
4,35,B,1,0
^SCR("W4PRMPC4","P",71,"HELP")

^SCR("W4PRMPC4","P",71,"LMAX")
4
^SCR("W4PRMPC4","P",71,"MUMPS1")

^SCR("W4PRMPC4","P",71,"MUMPS2")

^SCR("W4PRMPC4","P",71,"TYP")
B
^SCR("W4PRMPC4","P",72,"CRD")
5,29,B,1,0
^SCR("W4PRMPC4","P",72,"HELP")

^SCR("W4PRMPC4","P",72,"LMAX")
4
^SCR("W4PRMPC4","P",72,"MUMPS1")

^SCR("W4PRMPC4","P",72,"MUMPS2")

^SCR("W4PRMPC4","P",72,"TYP")
B
^SCR("W4PRMPC4","P",73,"CRD")
6,29,B,1,0
^SCR("W4PRMPC4","P",73,"HELP")

^SCR("W4PRMPC4","P",73,"LMAX")
4
^SCR("W4PRMPC4","P",73,"MUMPS1")

^SCR("W4PRMPC4","P",73,"MUMPS2")

^SCR("W4PRMPC4","P",73,"TYP")
B
^SCR("W4PRMPC4","P",75,"CRD")
7,24,B,1,0
^SCR("W4PRMPC4","P",75,"HELP")

^SCR("W4PRMPC4","P",75,"LMAX")
4
^SCR("W4PRMPC4","P",75,"MUMPS1")

^SCR("W4PRMPC4","P",75,"MUMPS2")

^SCR("W4PRMPC4","P",75,"MUST")

^SCR("W4PRMPC4","P",75,"TYP")
B
^SCR("W4PRMPC4","P",76,"CRD")
14,29,B,1,0
^SCR("W4PRMPC4","P",76,"HELP")

^SCR("W4PRMPC4","P",76,"LMAX")
4
^SCR("W4PRMPC4","P",76,"MUMPS1")

^SCR("W4PRMPC4","P",76,"MUMPS2")

^SCR("W4PRMPC4","P",76,"TYP")
B
^SCR("W4PRMPC4","P",77,"CRD")
15,3,N,1,0
^SCR("W4PRMPC4","P",77,"HELP")

^SCR("W4PRMPC4","P",77,"LMAX")
4
^SCR("W4PRMPC4","P",77,"MUMPS1")

^SCR("W4PRMPC4","P",77,"MUMPS2")

^SCR("W4PRMPC4","P",77,"TYP")
N
^SCR("W4PRMPC4","P",79,"CRD")
16,34,B,1,0
^SCR("W4PRMPC4","P",79,"HELP")

^SCR("W4PRMPC4","P",79,"LMAX")
4
^SCR("W4PRMPC4","P",79,"MUMPS1")

^SCR("W4PRMPC4","P",79,"MUMPS2")

^SCR("W4PRMPC4","P",79,"TYP")
B
^SCR("W4PRMPC4","P",80,"CRD")
19,40,B,1,0
^SCR("W4PRMPC4","P",80,"HELP")

^SCR("W4PRMPC4","P",80,"LMAX")
4
^SCR("W4PRMPC4","P",80,"MUMPS1")

^SCR("W4PRMPC4","P",80,"MUMPS2")

^SCR("W4PRMPC4","P",80,"TYP")
B
^SCR("W4PRMPC4","P",81,"CRD")
17,32,B,1,0
^SCR("W4PRMPC4","P",81,"HELP")

^SCR("W4PRMPC4","P",81,"LMAX")
4
^SCR("W4PRMPC4","P",81,"MUMPS1")

^SCR("W4PRMPC4","P",81,"MUMPS2")

^SCR("W4PRMPC4","P",81,"TYP")
B
^SCR("W4PRMPC4","P",82,"CRD")
20,28,B,1,0
^SCR("W4PRMPC4","P",82,"HELP")

^SCR("W4PRMPC4","P",82,"LMAX")
4
^SCR("W4PRMPC4","P",82,"MUMPS1")

^SCR("W4PRMPC4","P",82,"MUMPS2")

^SCR("W4PRMPC4","P",82,"TYP")
B
^SCR("W4PRMPC4","P",83,"CRD")
18,32,B,1,0
^SCR("W4PRMPC4","P",83,"HELP")

^SCR("W4PRMPC4","P",83,"LMAX")
4
^SCR("W4PRMPC4","P",83,"MUMPS1")

^SCR("W4PRMPC4","P",83,"MUMPS2")

^SCR("W4PRMPC4","P",83,"TYP")
B
^SCR("W4PRMPC4","P",85,"CRD")
21,19,B,1,0
^SCR("W4PRMPC4","P",85,"HELP")

^SCR("W4PRMPC4","P",85,"LMAX")
4
^SCR("W4PRMPC4","P",85,"MUMPS1")

^SCR("W4PRMPC4","P",85,"MUMPS2")

^SCR("W4PRMPC4","P",85,"TYP")
B
^SCR("W4PRMPC4","P",90,"CRD")
22,0,N,2,0
^SCR("W4PRMPC4","P",90,"HELP")

^SCR("W4PRMPC4","P",90,"LMAX")
3
^SCR("W4PRMPC4","P",90,"MUMPS1")

^SCR("W4PRMPC4","P",90,"MUMPS2")

^SCR("W4PRMPC4","P",90,"TYP")
N
^SCR("W4PRMPC4","P",96,"CRD")
9,29,B,1,0
^SCR("W4PRMPC4","P",96,"HELP")

^SCR("W4PRMPC4","P",96,"LMAX")
4
^SCR("W4PRMPC4","P",96,"MUMPS1")

^SCR("W4PRMPC4","P",96,"MUMPS2")

^SCR("W4PRMPC4","P",96,"TYP")
B
^SCR("W4PRMPC4","P",98,"CRD")
10,29,B,1,0
^SCR("W4PRMPC4","P",98,"HELP")

^SCR("W4PRMPC4","P",98,"LMAX")
4
^SCR("W4PRMPC4","P",98,"MUMPS1")

^SCR("W4PRMPC4","P",98,"MUMPS2")

^SCR("W4PRMPC4","P",98,"TYP")
B
^SCR("W4PRMPC4","P","NAME","ACNMSL")
73
^SCR("W4PRMPC4","P","NAME","ALL2MSL")
40
^SCR("W4PRMPC4","P","NAME","BONADDR")
72
^SCR("W4PRMPC4","P","NAME","CDMDB")
76
^SCR("W4PRMPC4","P","NAME","DETTM")
35
^SCR("W4PRMPC4","P","NAME","DLYPRN")
90
^SCR("W4PRMPC4","P","NAME","HZAFTPAY")
85
^SCR("W4PRMPC4","P","NAME","MDBADDR")
77
^SCR("W4PRMPC4","P","NAME","MDBDTKTN")
83
^SCR("W4PRMPC4","P","NAME","MDBLKKTN")
81
^SCR("W4PRMPC4","P","NAME","MDBMSD")
82
^SCR("W4PRMPC4","P","NAME","MDBTSF")
80
^SCR("W4PRMPC4","P","NAME","MSHHBNOW")
96
^SCR("W4PRMPC4","P","NAME","NOMSLHD")
71
^SCR("W4PRMPC4","P","NAME","NOTM")
75
^SCR("W4PRMPC4","P","NAME","SAHMDB")
79
^SCR("W4PRMPC4","P","NAME","SHORTPC")
30
^SCR("W4PRMPC4","P","NAME","TM2")
98
^SCR("W4PRMPC4","P","NAME","TMMSL")
42
^SCR("W4PRMPC4","P","NM",30)
SHORTPC
^SCR("W4PRMPC4","P","NM",35)
DETTM
^SCR("W4PRMPC4","P","NM",40)
ALL2MSL
^SCR("W4PRMPC4","P","NM",42)
TMMSL
^SCR("W4PRMPC4","P","NM",71)
NOMSLHD
^SCR("W4PRMPC4","P","NM",72)
BONADDR
^SCR("W4PRMPC4","P","NM",73)
ACNMSL
^SCR("W4PRMPC4","P","NM",75)
NOTM
^SCR("W4PRMPC4","P","NM",76)
CDMDB
^SCR("W4PRMPC4","P","NM",77)
MDBADDR
^SCR("W4PRMPC4","P","NM",79)
SAHMDB
^SCR("W4PRMPC4","P","NM",80)
MDBTSF
^SCR("W4PRMPC4","P","NM",81)
MDBLKKTN
^SCR("W4PRMPC4","P","NM",82)
MDBMSD
^SCR("W4PRMPC4","P","NM",83)
MDBDTKTN
^SCR("W4PRMPC4","P","NM",85)
HZAFTPAY
^SCR("W4PRMPC4","P","NM",90)
DLYPRN
^SCR("W4PRMPC4","P","NM",96)
MSHHBNOW
^SCR("W4PRMPC4","P","NM",98)
TM2
^SCR("W4PRMPZM")
H
^SCR("W4PRMPZM",1)
                                                                               
^SCR("W4PRMPZM",2)
                             {              11} {10    }: miievitl hixt cew    
^SCR("W4PRMPZM",3)
                                                                               
^SCR("W4PRMPZM","A",1)

^SCR("W4PRMPZM","A",2)
:�‰‰…–‰”Œˆ‰˜”ƒ…—
^SCR("W4PRMPZM","A",3)

^SCR("W4PRMPZM","AV",1)

^SCR("W4PRMPZM","AV",2)
:ohhumhpkyhrpsue
^SCR("W4PRMPZM","AV",3)

^SCR("W4PRMPZM","NAME")

^SCR("W4PRMPZM","P",10,"CHECK")
Y
^SCR("W4PRMPZM","P",10,"CRD")
2,48,E,7,0
^SCR("W4PRMPZM","P",10,"FNC")

^SCR("W4PRMPZM","P",10,"GLOB")
^PAR
^SCR("W4PRMPZM","P",10,"HELP")

^SCR("W4PRMPZM","P",10,"LMAX")
7
^SCR("W4PRMPZM","P",10,"MUMPS1")
D GET^W4PRMPZM
^SCR("W4PRMPZM","P",10,"MUMPS2")

^SCR("W4PRMPZM","P",10,"NLN")
20
^SCR("W4PRMPZM","P",10,"RZD")
\
^SCR("W4PRMPZM","P",10,"TOPB")
8
^SCR("W4PRMPZM","P",10,"TYP")
E
^SCR("W4PRMPZM","P",10,"VRB")
PRTPZM1
^SCR("W4PRMPZM","P",11,"CRD")
2,47,H,17,0
^SCR("W4PRMPZM","P",11,"HELP")

^SCR("W4PRMPZM","P",11,"LMAX")
17
^SCR("W4PRMPZM","P",11,"MUMPS1")

^SCR("W4PRMPZM","P",11,"MUMPS2")

^SCR("W4PRMPZM","P",11,"OUTPUT")

^SCR("W4PRMPZM","P",11,"TYP")
H
^SCR("W4PRMPZM","P","NAME","PRTPZM")
10
^SCR("W4PRMPZM","P","NAME","PRTPZM1")
11
^SCR("W4PRMPZM","P","NM",10)
PRTPZM
^SCR("W4PRMPZM","P","NM",11)
PRTPZM1
^SCR("W4PRMTD")
H
^SCR("W4PRMTD",1)
                           # mitih aeyigl mixhnxt #                            
^SCR("W4PRMTD",2)
                                                                               
^SCR("W4PRMTD",3)
                    {02  } drya zniizqne {01  } drya dligzn 1 zxnyn            
^SCR("W4PRMTD",4)
                    {04  } drya zniizqne {03  } drya dligzn 2 zxnyn            
^SCR("W4PRMTD",5)
      {05 }:(0-`l,1-ok) zegkep oery itl ihnehe` `ed mitih aeyig m`d            
^SCR("W4PRMTD",6)
      {08 }:    (0-`l,1-ok)    zxnyna micaerd lk oia mitih wlgl m`d            
^SCR("W4PRMTD",7)
    {10   }:                                         mitihn dcxed %            
^SCR("W4PRMTD",8)
      {20 }:    (0-`l,1-ok)          zizveaw micaer zxibq xyt`l m`d            
^SCR("W4PRMTD",9)
      {22 }:    (0-`l,1-ok)   mei zxibqa mitih aeyig zlah bivdl m`d            
^SCR("W4PRMTD",10)
                                                                               
^SCR("W4PRMTD",11)
                                                                               
^SCR("W4PRMTD",12)
                                                                               
^SCR("W4PRMTD","A",1)
�‰”‰ˆ�…™‰‡Œ�‰˜ˆŽ˜”
^SCR("W4PRMTD","A",2)

^SCR("W4PRMTD","A",3)
„’™�šŽ‰‰š‘Ž…„’™�„Œ‰‡šŽ1š˜Ž™Ž
^SCR("W4PRMTD","A",4)
„’™�šŽ‰‰š‘Ž…„’™�„Œ‰‡šŽ2š˜Ž™Ž
^SCR("W4PRMTD","A",5)
:(0-€Œ,1-�‹)š…‡‹…��…’™‰”Œ‰ˆŽ…ˆ…€€…„�‰”‰ˆ�…™‰‡�€„
^SCR("W4PRMTD","A",6)
:(0-€Œ,1-�‹)š˜Ž™Ž��‰ƒ�…’„Œ‹�‰��‰”‰ˆ—Œ‡Œ�€„
^SCR("W4PRMTD","A",7)
:�‰”‰ˆŽ„ƒ˜…„%
^SCR("W4PRMTD","A",8)
:(0-€Œ,1-�‹)š‰š–…�—�‰ƒ�…’š˜‰‚‘˜™”€Œ�€„
^SCR("W4PRMTD","A",9)
:(0-€Œ,1-�‹)�…‰š˜‰‚‘��‰”‰ˆ�…™‰‡šŒ�ˆ‚‰–„Œ�€„
^SCR("W4PRMTD","A",10)

^SCR("W4PRMTD","A",11)

^SCR("W4PRMTD","A",12)

^SCR("W4PRMTD","AV",1)
ohphycuahjkohrynrp
^SCR("W4PRMTD","AV",2)

^SCR("W4PRMTD","AV",3)
vgac,nhh,xnuvgacvkhj,n1,rnan
^SCR("W4PRMTD","AV",4)
vgac,nhh,xnuvgacvkhj,n2,rnan
^SCR("W4PRMTD","AV",5)
:(0-tk'1-if),ujfubiugahpkhynuyuttuvohphycuahjotv
^SCR("W4PRMTD","AV",6)
:(0-tk'1-if),rnancohscugvkfihcohphyekjkotv
^SCR("W4PRMTD","AV",7)
:ohphynvsruv%
^SCR("W4PRMTD","AV",8)
:(0-tk'1-if),h,muceohscug,rhdxraptkotv
^SCR("W4PRMTD","AV",9)
:(0-tk'1-if)ouh,rhdxcohphycuahj,kcydhmvkotv
^SCR("W4PRMTD","AV",10)

^SCR("W4PRMTD","AV",11)

^SCR("W4PRMTD","AV",12)

^SCR("W4PRMTD","NAME")

^SCR("W4PRMTD","P",1,"CRD")
3,41,T,5,0
^SCR("W4PRMTD","P",1,"HELP")

^SCR("W4PRMTD","P",1,"LMAX")
5
^SCR("W4PRMTD","P",1,"MUMPS1")

^SCR("W4PRMTD","P",1,"MUMPS2")

^SCR("W4PRMTD","P",1,"TYP")
T
^SCR("W4PRMTD","P",2,"CRD")
3,20,T,5,0
^SCR("W4PRMTD","P",2,"HELP")

^SCR("W4PRMTD","P",2,"LMAX")
5
^SCR("W4PRMTD","P",2,"MUMPS1")

^SCR("W4PRMTD","P",2,"MUMPS2")

^SCR("W4PRMTD","P",2,"TYP")
T
^SCR("W4PRMTD","P",3,"CRD")
4,41,T,5,0
^SCR("W4PRMTD","P",3,"HELP")

^SCR("W4PRMTD","P",3,"LMAX")
5
^SCR("W4PRMTD","P",3,"MUMPS1")

^SCR("W4PRMTD","P",3,"MUMPS2")

^SCR("W4PRMTD","P",3,"TYP")
T
^SCR("W4PRMTD","P",4,"CRD")
4,20,T,5,0
^SCR("W4PRMTD","P",4,"HELP")

^SCR("W4PRMTD","P",4,"LMAX")
5
^SCR("W4PRMTD","P",4,"MUMPS1")

^SCR("W4PRMTD","P",4,"MUMPS2")

^SCR("W4PRMTD","P",4,"TYP")
T
^SCR("W4PRMTD","P",5,"CRD")
5,6,N,3,0
^SCR("W4PRMTD","P",5,"HELP")

^SCR("W4PRMTD","P",5,"LMAX")
4
^SCR("W4PRMTD","P",5,"MUMPS1")

^SCR("W4PRMTD","P",5,"MUMPS2")
D AUTO^W4PRMTD
^SCR("W4PRMTD","P",5,"TYP")
N
^SCR("W4PRMTD","P",8,"CRD")
6,6,N,3,0
^SCR("W4PRMTD","P",8,"HELP")

^SCR("W4PRMTD","P",8,"LMAX")
4
^SCR("W4PRMTD","P",8,"MUMPS1")

^SCR("W4PRMTD","P",8,"MUMPS2")

^SCR("W4PRMTD","P",8,"TYP")
N
^SCR("W4PRMTD","P",10,"CRD")
7,4,N,5,2
^SCR("W4PRMTD","P",10,"HELP")

^SCR("W4PRMTD","P",10,"LMAX")
6
^SCR("W4PRMTD","P",10,"MUMPS1")

^SCR("W4PRMTD","P",10,"MUMPS2")

^SCR("W4PRMTD","P",10,"TYP")
N
^SCR("W4PRMTD","P",20,"CRD")
8,6,N,3,0
^SCR("W4PRMTD","P",20,"HELP")

^SCR("W4PRMTD","P",20,"LMAX")
4
^SCR("W4PRMTD","P",20,"MUMPS1")

^SCR("W4PRMTD","P",20,"MUMPS2")

^SCR("W4PRMTD","P",20,"TYP")
N
^SCR("W4PRMTD","P",22,"CRD")
9,6,N,3,0
^SCR("W4PRMTD","P",22,"HELP")

^SCR("W4PRMTD","P",22,"LMAX")
4
^SCR("W4PRMTD","P",22,"MUMPS1")

^SCR("W4PRMTD","P",22,"MUMPS2")

^SCR("W4PRMTD","P",22,"TYP")
N
^SCR("W4PRMTD","P","NAME","ADSHAA1")
2
^SCR("W4PRMTD","P","NAME","ADSHAA2")
4
^SCR("W4PRMTD","P","NAME","AHTIP")
10
^SCR("W4PRMTD","P","NAME","AUTO")
5
^SCR("W4PRMTD","P","NAME","HILUK")
8
^SCR("W4PRMTD","P","NAME","MESHAA1")
1
^SCR("W4PRMTD","P","NAME","MESHAA2")
3
^SCR("W4PRMTD","P","NAME","SGIRA")
22
^SCR("W4PRMTD","P","NAME","SGKVZ")
20
^SCR("W4PRMTD","P","NM",1)
MESHAA1
^SCR("W4PRMTD","P","NM",2)
ADSHAA1
^SCR("W4PRMTD","P","NM",3)
MESHAA2
^SCR("W4PRMTD","P","NM",4)
ADSHAA2
^SCR("W4PRMTD","P","NM",5)
AUTO
^SCR("W4PRMTD","P","NM",8)
HILUK
^SCR("W4PRMTD","P","NM",10)
AHTIP
^SCR("W4PRMTD","P","NM",20)
SGKVZ
^SCR("W4PRMTD","P","NM",22)
SGIRA
^SCR("W4PRMTLM")
H
^SCR("W4PRMTLM",1)
                                                                               
^SCR("W4PRMTLM",2)
                     {              11} {10    }: dpzn yelz zxiknl hixt cew    
^SCR("W4PRMTLM",3)
                     {              16} {15    }: dpzn yelz yeninl hixt cew    
^SCR("W4PRMTLM",4)
                          {20 } : ihnehe` `ed zeinipt zepzn iyelz xetqn m`d    
^SCR("W4PRMTLM","A",1)

^SCR("W4PRMTLM","A",2)
:„�šŽ™…Œšš˜‰‹ŽŒˆ‰˜”ƒ…—
^SCR("W4PRMTLM","A",3)
:„�šŽ™…Œš™…Ž‰ŽŒˆ‰˜”ƒ…—
^SCR("W4PRMTLM","A",4)
:‰ˆŽ…ˆ…€€…„š…‰Ž‰�”š…�šŽ‰™…Œš˜…”‘Ž�€„
^SCR("W4PRMTLM","AV",1)

^SCR("W4PRMTLM","AV",2)
:vb,nauk,,rhfnkyhrpsue
^SCR("W4PRMTLM","AV",3)
:vb,nauk,aunhnkyhrpsue
^SCR("W4PRMTLM","AV",4)
:hynuyuttuv,uhnhbp,ub,nhauk,rupxnotv
^SCR("W4PRMTLM","NAME")

^SCR("W4PRMTLM","P",10,"CHECK")
Y
^SCR("W4PRMTLM","P",10,"CRD")
2,40,E,7,0
^SCR("W4PRMTLM","P",10,"FNC")

^SCR("W4PRMTLM","P",10,"GLOB")
^PAR
^SCR("W4PRMTLM","P",10,"HELP")

^SCR("W4PRMTLM","P",10,"LMAX")
7
^SCR("W4PRMTLM","P",10,"MUMPS1")

^SCR("W4PRMTLM","P",10,"MUMPS2")

^SCR("W4PRMTLM","P",10,"NLN")
20
^SCR("W4PRMTLM","P",10,"RZD")
\
^SCR("W4PRMTLM","P",10,"TOPB")
8
^SCR("W4PRMTLM","P",10,"TYP")
E
^SCR("W4PRMTLM","P",10,"VRB")
GCOUPIT1
^SCR("W4PRMTLM","P",11,"CRD")
2,39,H,17
^SCR("W4PRMTLM","P",11,"HELP")

^SCR("W4PRMTLM","P",11,"LMAX")
17
^SCR("W4PRMTLM","P",11,"MUMPS1")

^SCR("W4PRMTLM","P",11,"MUMPS2")

^SCR("W4PRMTLM","P",11,"OUTPUT")

^SCR("W4PRMTLM","P",11,"TYP")
H
^SCR("W4PRMTLM","P",15,"CRD")
3,40,E,7,0
^SCR("W4PRMTLM","P",15,"FNC")

^SCR("W4PRMTLM","P",15,"GLOB")
^PAR
^SCR("W4PRMTLM","P",15,"HELP")

^SCR("W4PRMTLM","P",15,"LMAX")
7
^SCR("W4PRMTLM","P",15,"MUMPS1")

^SCR("W4PRMTLM","P",15,"MUMPS2")

^SCR("W4PRMTLM","P",15,"NLN")
20
^SCR("W4PRMTLM","P",15,"RZD")
\
^SCR("W4PRMTLM","P",15,"TOPB")
8
^SCR("W4PRMTLM","P",15,"TYP")
E
^SCR("W4PRMTLM","P",15,"VRB")
GCOUPPY1
^SCR("W4PRMTLM","P",16,"CRD")
3,39,H,17
^SCR("W4PRMTLM","P",16,"HELP")

^SCR("W4PRMTLM","P",16,"LMAX")
17
^SCR("W4PRMTLM","P",16,"MUMPS1")

^SCR("W4PRMTLM","P",16,"MUMPS2")

^SCR("W4PRMTLM","P",16,"OUTPUT")

^SCR("W4PRMTLM","P",16,"TYP")
H
^SCR("W4PRMTLM","P",20,"CRD")
4,26,B,1,0
^SCR("W4PRMTLM","P",20,"HELP")

^SCR("W4PRMTLM","P",20,"LMAX")
4
^SCR("W4PRMTLM","P",20,"MUMPS1")

^SCR("W4PRMTLM","P",20,"MUMPS2")

^SCR("W4PRMTLM","P",20,"TYP")
B
^SCR("W4PRMTLM","P","NAME","GCOUPC")
20
^SCR("W4PRMTLM","P","NAME","GCOUPIT")
10
^SCR("W4PRMTLM","P","NAME","GCOUPIT1")
11
^SCR("W4PRMTLM","P","NAME","GCOUPPY")
15
^SCR("W4PRMTLM","P","NAME","GCOUPPY1")
16
^SCR("W4PRMTLM","P","NM",10)
GCOUPIT
^SCR("W4PRMTLM","P","NM",11)
GCOUPIT1
^SCR("W4PRMTLM","P","NM",15)
GCOUPPY
^SCR("W4PRMTLM","P","NM",16)
GCOUPPY1
^SCR("W4PRMTLM","P","NM",20)
GCOUPC
^SCR("W4PRMTRC")
H
^SCR("W4PRMTRC",1)
                           {03 } : ( `l - 0 ,ok - 1 ) dlirt "xwixh" zkxrn m`d  
^SCR("W4PRMTRC",2)
                                                                               
^SCR("W4PRMTRC",3)
       {40                                                       } :     oweh  
^SCR("W4PRMTRC",4)
                                                                               
^SCR("W4PRMTRC",5)
                                                                               
^SCR("W4PRMTRC","AV",1)
:(àì-0,ïë-1)äìéòô"ø÷éøè"úëøòîíàä
^SCR("W4PRMTRC","AV",2)

^SCR("W4PRMTRC","AV",3)
:ï÷åè
^SCR("W4PRMTRC","AV",4)

^SCR("W4PRMTRC","AV",5)

^SCR("W4PRMTRC","NAME")

^SCR("W4PRMTRC","P",3,"CRD")
1,27,B,1,0
^SCR("W4PRMTRC","P",3,"HELP")

^SCR("W4PRMTRC","P",3,"LMAX")
4
^SCR("W4PRMTRC","P",3,"MUMPS1")

^SCR("W4PRMTRC","P",3,"MUMPS2")

^SCR("W4PRMTRC","P",3,"MUST")

^SCR("W4PRMTRC","P",3,"TYP")
B
^SCR("W4PRMTRC","P",40,"CRD")
3,7,E,50,0
^SCR("W4PRMTRC","P",40,"HELP")

^SCR("W4PRMTRC","P",40,"LMAX")
58
^SCR("W4PRMTRC","P",40,"MUMPS1")

^SCR("W4PRMTRC","P",40,"MUMPS2")

^SCR("W4PRMTRC","P",40,"TYP")
E
^SCR("W4PRMTRC","P","NAME","TOKEN")
40
^SCR("W4PRMTRC","P","NAME","TRC")
3
^SCR("W4PRMTRC","P","NM",3)
TRC
^SCR("W4PRMTRC","P","NM",40)
TOKEN
^SCR("W4PRMTV")
H
^SCR("W4PRMTV",1)
                         {03 } : ( `l - 0 ,ok - 1 ) dlirt "oea`iza" zkxrn m`d  
^SCR("W4PRMTV",2)
   {40                                                           } :     oweh  
^SCR("W4PRMTV",3)
   {45                                                           } :    xeaig  
^SCR("W4PRMTV",4)
   {50                                                    } : dpnfd zgilyl URL 
^SCR("W4PRMTV",5)
   {55                                                    } : qehhq oekcrl URL 
^SCR("W4PRMTV",6)
   {60                                                    } : migily znwdl URL 
^SCR("W4PRMTV",7)
   {65                                                    } : zegkep zeryl URL 
^SCR("W4PRMTV","AV",1)
:(àì-0,ïë-1)äìéòô"ïåáàéúá"úëøòîíàä
^SCR("W4PRMTV","AV",2)
:ï÷åè
^SCR("W4PRMTV","AV",3)
:øåáéç
^SCR("W4PRMTV","AV",4)
:äðîæäúçéìùìURL
^SCR("W4PRMTV","AV",5)
:ñåèèñïåëãòìURL
^SCR("W4PRMTV","AV",6)
:íéçéìùúî÷äìURL
^SCR("W4PRMTV","AV",7)
:úåçëåðúåòùìURL
^SCR("W4PRMTV","NAME")

^SCR("W4PRMTV","P",3,"CRD")
1,25,B,1,0
^SCR("W4PRMTV","P",3,"HELP")

^SCR("W4PRMTV","P",3,"LMAX")
4
^SCR("W4PRMTV","P",3,"MUMPS1")

^SCR("W4PRMTV","P",3,"MUMPS2")

^SCR("W4PRMTV","P",3,"MUST")

^SCR("W4PRMTV","P",3,"TYP")
B
^SCR("W4PRMTV","P",40,"CRD")
2,3,E,60,0
^SCR("W4PRMTV","P",40,"HELP")

^SCR("W4PRMTV","P",40,"LMAX")
62
^SCR("W4PRMTV","P",40,"MUMPS1")

^SCR("W4PRMTV","P",40,"MUMPS2")

^SCR("W4PRMTV","P",40,"TYP")
E
^SCR("W4PRMTV","P",45,"CRD")
3,3,E,60,0
^SCR("W4PRMTV","P",45,"HELP")

^SCR("W4PRMTV","P",45,"LMAX")
62
^SCR("W4PRMTV","P",45,"MUMPS1")

^SCR("W4PRMTV","P",45,"MUMPS2")

^SCR("W4PRMTV","P",45,"TYP")
E
^SCR("W4PRMTV","P",50,"CRD")
4,3,E,55,0
^SCR("W4PRMTV","P",50,"HELP")

^SCR("W4PRMTV","P",50,"LMAX")
55
^SCR("W4PRMTV","P",50,"MUMPS1")

^SCR("W4PRMTV","P",50,"MUMPS2")

^SCR("W4PRMTV","P",50,"TYP")
E
^SCR("W4PRMTV","P",55,"CRD")
5,3,E,55,0
^SCR("W4PRMTV","P",55,"HELP")

^SCR("W4PRMTV","P",55,"LMAX")
55
^SCR("W4PRMTV","P",55,"MUMPS1")

^SCR("W4PRMTV","P",55,"MUMPS2")

^SCR("W4PRMTV","P",55,"TYP")
E
^SCR("W4PRMTV","P",60,"CRD")
6,3,E,55,0
^SCR("W4PRMTV","P",60,"HELP")

^SCR("W4PRMTV","P",60,"LMAX")
55
^SCR("W4PRMTV","P",60,"MUMPS1")

^SCR("W4PRMTV","P",60,"MUMPS2")

^SCR("W4PRMTV","P",60,"TYP")
E
^SCR("W4PRMTV","P",65,"CRD")
7,3,E,55,0
^SCR("W4PRMTV","P",65,"HELP")

^SCR("W4PRMTV","P",65,"LMAX")
55
^SCR("W4PRMTV","P",65,"MUMPS1")

^SCR("W4PRMTV","P",65,"MUMPS2")

^SCR("W4PRMTV","P",65,"TYP")
E
^SCR("W4PRMTV","P","NAME","CONNECT")
45
^SCR("W4PRMTV","P","NAME","TOKEN")
40
^SCR("W4PRMTV","P","NAME","TV")
3
^SCR("W4PRMTV","P","NAME","URL")
50
^SCR("W4PRMTV","P","NAME","URLCLK")
65
^SCR("W4PRMTV","P","NAME","URLCOUR")
60
^SCR("W4PRMTV","P","NAME","URLUPD")
55
^SCR("W4PRMTV","P","NM",3)
TV
^SCR("W4PRMTV","P","NM",40)
TOKEN
^SCR("W4PRMTV","P","NM",45)
CONNECT
^SCR("W4PRMTV","P","NM",50)
URL
^SCR("W4PRMTV","P","NM",55)
URLUPD
^SCR("W4PRMTV","P","NM",60)
URLCOUR
^SCR("W4PRMTV","P","NM",65)
URLCLK
^SCR("W4PRMWEB")
H
^SCR("W4PRMWEB",1)
                                    # oiil oe` zepnfd zlawl mixhnxt #          
^SCR("W4PRMWEB",2)
                                                                        1]     
^SCR("W4PRMWEB",3)
                                          {05    } :          dcrqn 'qn        
^SCR("W4PRMWEB",4)
                                       {07       } :              dnqiq        
^SCR("W4PRMWEB",5)
                                          {10    } :   iaihwit lawn 'qn        
^SCR("W4PRMWEB",6)
                                                                               
^SCR("W4PRMWEB",7)
                                     {15         } :    qia oz gewl 'qn        
^SCR("W4PRMWEB",8)
                                     {20         } :     qeaiq gewl 'qn        
^SCR("W4PRMWEB",9)
                                     {22         } :  oetpetew gewl 'qn        
^SCR("W4PRMWEB",10)
                                     {25         } :    dgelyn gewl 'qn        
^SCR("W4PRMWEB",11)
                                     {30         } : lke`d xtq gewl 'qn        
^SCR("W4PRMWEB",12)
                                                                               
^SCR("W4PRMWEB",13)
                              [1                                               
^SCR("W4PRMWEB",14)
                                                                               
^SCR("W4PRMWEB","AV",1)
ihhkiut,ubnzv,kcekohrynrp
^SCR("W4PRMWEB","AV",2)

^SCR("W4PRMWEB","AV",3)
:vsgxnwxn
^SCR("W4PRMWEB","AV",4)
:vnxhx
^SCR("W4PRMWEB","AV",5)
:hchyehpkcenwxn
^SCR("W4PRMWEB","AV",6)

^SCR("W4PRMWEB","AV",7)
:xhci,juekwxn
^SCR("W4PRMWEB","AV",8)
:xuchxjuekwxn
^SCR("W4PRMWEB","AV",9)
:iupbupuejuekwxn
^SCR("W4PRMWEB","AV",10)
:vjukanjuekwxn
^SCR("W4PRMWEB","AV",11)
:kfutvrpxjuekwxn
^SCR("W4PRMWEB","AV",12)

^SCR("W4PRMWEB","AV",13)

^SCR("W4PRMWEB","AV",14)

^SCR("W4PRMWEB","NAME")
oiil oe` zepnfdl mixhnxt
^SCR("W4PRMWEB","P",5,"CRD")
3,42,E,5,0
^SCR("W4PRMWEB","P",5,"HELP")

^SCR("W4PRMWEB","P",5,"LMAX")
7
^SCR("W4PRMWEB","P",5,"MUMPS1")

^SCR("W4PRMWEB","P",5,"MUMPS2")

^SCR("W4PRMWEB","P",5,"TYP")
E
^SCR("W4PRMWEB","P",7,"CRD")
4,39,E,10,0
^SCR("W4PRMWEB","P",7,"HELP")

^SCR("W4PRMWEB","P",7,"LMAX")
10
^SCR("W4PRMWEB","P",7,"MUMPS1")

^SCR("W4PRMWEB","P",7,"MUMPS2")

^SCR("W4PRMWEB","P",7,"TYP")
E
^SCR("W4PRMWEB","P",10,"CRD")
5,42,E,7,0
^SCR("W4PRMWEB","P",10,"HELP")

^SCR("W4PRMWEB","P",10,"LMAX")
7
^SCR("W4PRMWEB","P",10,"MUMPS1")

^SCR("W4PRMWEB","P",10,"MUMPS2")

^SCR("W4PRMWEB","P",10,"TYP")
E
^SCR("W4PRMWEB","P",15,"CRD")
7,37,E,12,0
^SCR("W4PRMWEB","P",15,"HELP")

^SCR("W4PRMWEB","P",15,"LMAX")
12
^SCR("W4PRMWEB","P",15,"MUMPS1")

^SCR("W4PRMWEB","P",15,"MUMPS2")

^SCR("W4PRMWEB","P",15,"TYP")
E
^SCR("W4PRMWEB","P",20,"CRD")
8,37,E,12,0
^SCR("W4PRMWEB","P",20,"HELP")

^SCR("W4PRMWEB","P",20,"LMAX")
12
^SCR("W4PRMWEB","P",20,"MUMPS1")

^SCR("W4PRMWEB","P",20,"MUMPS2")

^SCR("W4PRMWEB","P",20,"TYP")
E
^SCR("W4PRMWEB","P",22,"CRD")
9,37,E,12,0
^SCR("W4PRMWEB","P",22,"HELP")

^SCR("W4PRMWEB","P",22,"LMAX")
12
^SCR("W4PRMWEB","P",22,"MUMPS1")

^SCR("W4PRMWEB","P",22,"MUMPS2")

^SCR("W4PRMWEB","P",22,"TYP")
E
^SCR("W4PRMWEB","P",25,"CRD")
10,37,E,12,0
^SCR("W4PRMWEB","P",25,"HELP")

^SCR("W4PRMWEB","P",25,"LMAX")
12
^SCR("W4PRMWEB","P",25,"MUMPS1")

^SCR("W4PRMWEB","P",25,"MUMPS2")

^SCR("W4PRMWEB","P",25,"TYP")
E
^SCR("W4PRMWEB","P",30,"CRD")
11,37,E,12,0
^SCR("W4PRMWEB","P",30,"HELP")

^SCR("W4PRMWEB","P",30,"LMAX")
12
^SCR("W4PRMWEB","P",30,"MUMPS1")

^SCR("W4PRMWEB","P",30,"MUMPS2")

^SCR("W4PRMWEB","P",30,"TYP")
E
^SCR("W4PRMWEB","P","NAME","CIBUS")
20
^SCR("W4PRMWEB","P","NAME","CPHON")
22
^SCR("W4PRMWEB","P","NAME","FOOD")
30
^SCR("W4PRMWEB","P","NAME","MKBL")
10
^SCR("W4PRMWEB","P","NAME","MSD")
5
^SCR("W4PRMWEB","P","NAME","MSH")
25
^SCR("W4PRMWEB","P","NAME","PSW")
7
^SCR("W4PRMWEB","P","NAME","TBIS")
15
^SCR("W4PRMWEB","P","NM",5)
MSD
^SCR("W4PRMWEB","P","NM",7)
PSW
^SCR("W4PRMWEB","P","NM",10)
MKBL
^SCR("W4PRMWEB","P","NM",15)
TBIS
^SCR("W4PRMWEB","P","NM",20)
CIBUS
^SCR("W4PRMWEB","P","NM",22)
CPHON
^SCR("W4PRMWEB","P","NM",25)
MSH
^SCR("W4PRMWEB","P","NM",30)
FOOD
^SCR("W4PRMWEB","P","RB",1)
3,31,14,74
^SCR("W4PRMZMS")
H
^SCR("W4PRMZMS",1)
                                                                 {10 } : IN USE
^SCR("W4PRMZMS",2)
                 {40                                             } : STATION ID
^SCR("W4PRMZMS",3)
                 {50                                                   } : URL 
^SCR("W4PRMZMS",4)
                                                                               
^SCR("W4PRMZMS","AV",1)
:INUSE
^SCR("W4PRMZMS","AV",2)
:STATIONID
^SCR("W4PRMZMS","AV",3)
:URL
^SCR("W4PRMZMS","AV",4)

^SCR("W4PRMZMS","NAME")
mkg onefn xiygvn mixhnxt
^SCR("W4PRMZMS","P",10,"CRD")
1,65,B,1,0
^SCR("W4PRMZMS","P",10,"HELP")

^SCR("W4PRMZMS","P",10,"LMAX")
4
^SCR("W4PRMZMS","P",10,"MUMPS1")

^SCR("W4PRMZMS","P",10,"MUMPS2")

^SCR("W4PRMZMS","P",10,"TYP")
B
^SCR("W4PRMZMS","P",40,"CRD")
2,17,E,48,0
^SCR("W4PRMZMS","P",40,"HELP")

^SCR("W4PRMZMS","P",40,"LMAX")
48
^SCR("W4PRMZMS","P",40,"MUMPS1")

^SCR("W4PRMZMS","P",40,"MUMPS2")

^SCR("W4PRMZMS","P",40,"TYP")
E
^SCR("W4PRMZMS","P",50,"CRD")
3,17,E,54,0
^SCR("W4PRMZMS","P",50,"HELP")

^SCR("W4PRMZMS","P",50,"LMAX")
54
^SCR("W4PRMZMS","P",50,"MUMPS1")

^SCR("W4PRMZMS","P",50,"MUMPS2")

^SCR("W4PRMZMS","P",50,"TYP")
E
^SCR("W4PRMZMS","P","NAME","MZSM")
10
^SCR("W4PRMZMS","P","NAME","SID")
40
^SCR("W4PRMZMS","P","NAME","URL")
50
^SCR("W4PRMZMS","P","NM",10)
MZSM
^SCR("W4PRMZMS","P","NM",40)
SID
^SCR("W4PRMZMS","P","NM",50)
URL
^SCR("W4PRMZSM")
H
^SCR("W4PRMZSM",1)
                                      {10 } : (  `l - 0, ok-1 ) dlirt zkxrn m`d
^SCR("W4PRMZSM",2)
               {30                                              } :  STATION ID
^SCR("W4PRMZSM",3)
  {50                                                           } : PAYMENT URL
^SCR("W4PRMZSM",4)
  {60                                                      } : REGISTRATION URL
^SCR("W4PRMZSM","AV",1)
:(àì-0,ïë-1)äìéòôúëøòîíàä
^SCR("W4PRMZSM","AV",2)
:STATIONID
^SCR("W4PRMZSM","AV",3)
:PAYMENTURL
^SCR("W4PRMZSM","AV",4)
:REGISTRATIONURL
^SCR("W4PRMZSM","NAME")
mkg onefn xiygvn mixhnxt
^SCR("W4PRMZSM","P",10,"CRD")
1,38,B,1,0
^SCR("W4PRMZSM","P",10,"HELP")

^SCR("W4PRMZSM","P",10,"LMAX")
4
^SCR("W4PRMZSM","P",10,"MUMPS1")

^SCR("W4PRMZSM","P",10,"MUMPS2")

^SCR("W4PRMZSM","P",10,"TYP")
B
^SCR("W4PRMZSM","P",30,"CRD")
2,15,E,40,0
^SCR("W4PRMZSM","P",30,"HELP")

^SCR("W4PRMZSM","P",30,"LMAX")
49
^SCR("W4PRMZSM","P",30,"MUMPS1")

^SCR("W4PRMZSM","P",30,"MUMPS2")

^SCR("W4PRMZSM","P",30,"TYP")
E
^SCR("W4PRMZSM","P",50,"CRD")
3,2,E,55,0
^SCR("W4PRMZSM","P",50,"HELP")

^SCR("W4PRMZSM","P",50,"LMAX")
62
^SCR("W4PRMZSM","P",50,"MUMPS1")

^SCR("W4PRMZSM","P",50,"MUMPS2")

^SCR("W4PRMZSM","P",50,"TYP")
E
^SCR("W4PRMZSM","P",60,"CRD")
4,2,E,57,0
^SCR("W4PRMZSM","P",60,"HELP")

^SCR("W4PRMZSM","P",60,"LMAX")
57
^SCR("W4PRMZSM","P",60,"MUMPS1")

^SCR("W4PRMZSM","P",60,"MUMPS2")

^SCR("W4PRMZSM","P",60,"TYP")
E
^SCR("W4PRMZSM","P","NAME","MZSM")
10
^SCR("W4PRMZSM","P","NAME","SID")
30
^SCR("W4PRMZSM","P","NAME","URL")
50
^SCR("W4PRMZSM","P","NAME","URLREG")
60
^SCR("W4PRMZSM","P","NM",10)
MZSM
^SCR("W4PRMZSM","P","NM",30)
SID
^SCR("W4PRMZSM","P","NM",50)
URL
^SCR("W4PRMZSM","P","NM",60)
URLREG
^SCR("W4PRTEND")
H
^SCR("W4PRTEND","NAME")

^SCR("W4PSWASH")
H
^SCR("W4PSWASH",1)
                                                                               
^SCR("W4PSWASH",2)
                                           {05       } : zkxrnl dqipkl dnqiq   
^SCR("W4PSWASH",3)
                                                                               
^SCR("W4PSWASH",4)
                                   {10       } : zexiy zeipkezl dqipkl dnqiq   
^SCR("W4PSWASH","A",1)

^SCR("W4PSWASH","A",2)
:š‹˜’ŽŒ„‘‰�‹Œ„Ž‘‰‘
^SCR("W4PSWASH","A",3)

^SCR("W4PSWASH","A",4)
:š…˜‰™š…‰�‹…šŒ„‘‰�‹Œ„Ž‘‰‘
^SCR("W4PSWASH","AV",1)

^SCR("W4PSWASH","AV",2)
:,frgnkvxhbfkvnxhx
^SCR("W4PSWASH","AV",3)

^SCR("W4PSWASH","AV",4)
:,urha,uhbfu,kvxhbfkvnxhx
^SCR("W4PSWASH","NAME")
m`xy`l ze`nqiq
^SCR("W4PSWASH","P",5,"CRD")
2,43,E,10,0
^SCR("W4PSWASH","P",5,"HELP")

^SCR("W4PSWASH","P",5,"LMAX")
10
^SCR("W4PSWASH","P",5,"MUMPS1")

^SCR("W4PSWASH","P",5,"MUMPS2")

^SCR("W4PSWASH","P",5,"TYP")
E
^SCR("W4PSWASH","P",10,"CRD")
4,35,E,10,0
^SCR("W4PSWASH","P",10,"HELP")

^SCR("W4PSWASH","P",10,"LMAX")
10
^SCR("W4PSWASH","P",10,"MUMPS1")

^SCR("W4PSWASH","P",10,"MUMPS2")

^SCR("W4PSWASH","P",10,"TYP")
E
^SCR("W4PSWASH","P","NAME","PSW")
5
^SCR("W4PSWASH","P","NAME","PSWSRV")
10
^SCR("W4PSWASH","P","NM",5)
PSW
^SCR("W4PSWASH","P","NM",10)
PSWSRV
^SCR("W4REPAIR")
H
^SCR("W4REPAIR",1)
                                        # micaer zery oewiz #                  
^SCR("W4REPAIR",2)
                                                                               
^SCR("W4REPAIR",3)
                                                                             1]
^SCR("W4REPAIR",4)
                         {                 06} : caer my {05   } : caer 'qn    
^SCR("W4REPAIR",5)
                                                                               
^SCR("W4REPAIR",6)
                                                      {10      } :    jix`z    
^SCR("W4REPAIR",7)
                      [1                                                       
^SCR("W4REPAIR",8)
                                                                               
^SCR("W4REPAIR","A",1)
�‰ƒ�…’š…’™�…—‰š
^SCR("W4REPAIR","A",2)

^SCR("W4REPAIR","A",3)

^SCR("W4REPAIR","A",4)
:ƒ�…’�™:ƒ�…’'‘Ž
^SCR("W4REPAIR","A",5)

^SCR("W4REPAIR","A",6)
:Š‰˜€š
^SCR("W4REPAIR","A",7)

^SCR("W4REPAIR","A",8)

^SCR("W4REPAIR","AV",1)
ohscug,ugaiueh,
^SCR("W4REPAIR","AV",2)

^SCR("W4REPAIR","AV",3)

^SCR("W4REPAIR","AV",4)
:scugoa:scugwxn
^SCR("W4REPAIR","AV",5)

^SCR("W4REPAIR","AV",6)
:lhrt,
^SCR("W4REPAIR","AV",7)

^SCR("W4REPAIR","AV",8)

^SCR("W4REPAIR","NAME")
ipci oewiz
^SCR("W4REPAIR","P",5,"CHECK")
Y
^SCR("W4REPAIR","P",5,"CRD")
4,57,E,5.,0
^SCR("W4REPAIR","P",5,"FNC")

^SCR("W4REPAIR","P",5,"GLOB")
NAME
^SCR("W4REPAIR","P",5,"HELP")

^SCR("W4REPAIR","P",5,"LMAX")
6
^SCR("W4REPAIR","P",5,"MUMPS1")

^SCR("W4REPAIR","P",5,"MUMPS2")

^SCR("W4REPAIR","P",5,"NLN")
20
^SCR("W4REPAIR","P",5,"RZD")
\
^SCR("W4REPAIR","P",5,"TOPB")
8
^SCR("W4REPAIR","P",5,"TYP")
E
^SCR("W4REPAIR","P",5,"VRB")
OVED1
^SCR("W4REPAIR","P",6,"CRD")
4,46,H,20
^SCR("W4REPAIR","P",6,"HELP")

^SCR("W4REPAIR","P",6,"LMAX")
20
^SCR("W4REPAIR","P",6,"MUMPS1")

^SCR("W4REPAIR","P",6,"MUMPS2")

^SCR("W4REPAIR","P",6,"OUTPUT")

^SCR("W4REPAIR","P",6,"TYP")
H
^SCR("W4REPAIR","P",10,"CRD")
6,54,D,8,0
^SCR("W4REPAIR","P",10,"HELP")

^SCR("W4REPAIR","P",10,"LMAX")
9
^SCR("W4REPAIR","P",10,"MUMPS1")

^SCR("W4REPAIR","P",10,"MUMPS2")

^SCR("W4REPAIR","P",10,"TYP")
D
^SCR("W4REPAIR","P","NAME","DAT")
10
^SCR("W4REPAIR","P","NAME","OVED")
5
^SCR("W4REPAIR","P","NAME","OVED1")
6
^SCR("W4REPAIR","P","NM",5)
OVED
^SCR("W4REPAIR","P","NM",6)
OVED1
^SCR("W4REPAIR","P","NM",10)
DAT
^SCR("W4REPAIR","P","RB",1)
4,23,8,79
^SCR("W4REPEMV")
H
^SCR("W4REPEMV",1)
                                                                               
^SCR("W4REPEMV",2)
                                                                           1$  
^SCR("W4REPEMV",3)
                               :                                          :    
^SCR("W4REPEMV",4)
                                                                               
^SCR("W4REPEMV",5)
                                                                               
^SCR("W4REPEMV",6)
                                                                               
^SCR("W4REPEMV",7)
                                                                               
^SCR("W4REPEMV",8)
                                                                               
^SCR("W4REPEMV",9)
                                                                               
^SCR("W4REPEMV",10)
                                                                               
^SCR("W4REPEMV",11)
                                                                               
^SCR("W4REPEMV",12)
                                                                               
^SCR("W4REPEMV",13)
                                                                               
^SCR("W4REPEMV",14)
                                                                               
^SCR("W4REPEMV",15)
                                                                               
^SCR("W4REPEMV",16)
                                                                               
^SCR("W4REPEMV",17)
                                                                               
^SCR("W4REPEMV",18)
                                                                               
^SCR("W4REPEMV",19)
                                                                               
^SCR("W4REPEMV",20)
                                                                               
^SCR("W4REPEMV",21)
                              $1                                               
^SCR("W4REPEMV",22)
     'lyz oecren - 9 ; minelyz - 8 ;hicxw qxpiic,dfie - 6 ; `tl` - 5           
^SCR("W4REPEMV",23)
                                                                               
^SCR("W4REPEMV","A",1)

^SCR("W4REPEMV","A",2)

^SCR("W4REPEMV","A",3)

^SCR("W4REPEMV","A",4)
------------------------------------------
^SCR("W4REPEMV","A",5)

^SCR("W4REPEMV","A",6)

^SCR("W4REPEMV","A",7)

^SCR("W4REPEMV","A",8)

^SCR("W4REPEMV","A",9)

^SCR("W4REPEMV","A",10)

^SCR("W4REPEMV","A",11)

^SCR("W4REPEMV","A",12)

^SCR("W4REPEMV","A",13)

^SCR("W4REPEMV","A",14)

^SCR("W4REPEMV","A",15)

^SCR("W4REPEMV","A",16)

^SCR("W4REPEMV","A",17)

^SCR("W4REPEMV","A",18)

^SCR("W4REPEMV","A",19)

^SCR("W4REPEMV","A",20)

^SCR("W4REPEMV","A",21)

^SCR("W4REPEMV","A",22)
'Œ™š�…ƒ’…Ž-9“�‰Ž…Œ™š-8“ˆ‰ƒ˜—‘˜�‰‰ƒ,„†‰…-6“€”Œ€-5
^SCR("W4REPEMV","A",23)

^SCR("W4REPEMV","AV",1)

^SCR("W4REPEMV","AV",2)

^SCR("W4REPEMV","AV",3)

^SCR("W4REPEMV","AV",4)
------------------------------------------
^SCR("W4REPEMV","AV",5)

^SCR("W4REPEMV","AV",6)

^SCR("W4REPEMV","AV",7)

^SCR("W4REPEMV","AV",8)

^SCR("W4REPEMV","AV",9)

^SCR("W4REPEMV","AV",10)

^SCR("W4REPEMV","AV",11)

^SCR("W4REPEMV","AV",12)

^SCR("W4REPEMV","AV",13)

^SCR("W4REPEMV","AV",14)

^SCR("W4REPEMV","AV",15)

^SCR("W4REPEMV","AV",16)

^SCR("W4REPEMV","AV",17)

^SCR("W4REPEMV","AV",18)

^SCR("W4REPEMV","AV",19)

^SCR("W4REPEMV","AV",20)

^SCR("W4REPEMV","AV",21)

^SCR("W4REPEMV","AV",22)
wka,iusgun-9;ohnuka,-8;yhsrexrbhhs'vzhu-6;tpkt-5
^SCR("W4REPEMV","AV",23)

^SCR("W4REPEMV","G",1,"CRD")
4,74,H,42,0
^SCR("W4REPEMV","G",1,"HELP")

^SCR("W4REPEMV","G",1,"LMAX")
42
^SCR("W4REPEMV","G",1,"MUMPS1")

^SCR("W4REPEMV","G",1,"MUMPS2")

^SCR("W4REPEMV","G",1,"OUTPUT")

^SCR("W4REPEMV","G",1,"SHEM")
                                          
^SCR("W4REPEMV","G",1,"TYP")
H
^SCR("W4REPEMV","G","MAX")
9999
^SCR("W4REPEMV","G","NAME","ST")
1
^SCR("W4REPEMV","G","NM",1)
ST
^SCR("W4REPEMV","G","RB")
3,31,22,77
^SCR("W4REPEMV","G","REF")
^TMPREP("G"
^SCR("W4REPEMV","G","RZD")
\
^SCR("W4REPEMV","G","STEP")
1
^SCR("W4REPEMV","G","STG")
                               :                                          :    
^SCR("W4REPEMV","G","VG")
5
^SCR("W4REPEMV","NAME")
EMV `ay gec
^SCR("W4REPPZM")
H
^SCR("W4REPPZM",1)
                             # miievit gec #                                   
^SCR("W4REPPZM",2)
             {02 }: ( 2 - yenin jix`z itl ,1 - ievit jix`z itl )  mipezp bivdl 
^SCR("W4REPPZM",3)
                     {10      } jix`z cr  {05     } jix`zn                     
^SCR("W4REPPZM",4)
                                                                               
^SCR("W4REPPZM","A",1)
�‰‰…–‰”‡…ƒ
^SCR("W4REPPZM","A",2)
:(2-™…Ž‰ŽŠ‰˜€š‰”Œ,1-‰…–‰”Š‰˜€š‰”Œ)�‰�…š�‚‰–„Œ
^SCR("W4REPPZM","A",3)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("W4REPPZM","A",4)

^SCR("W4REPPZM","AV",1)
ohhumhpjus
^SCR("W4REPPZM","AV",2)
:(2-aunhnlhrt,hpk'1-humhplhrt,hpk)ohbu,bdhmvk
^SCR("W4REPPZM","AV",3)
lhrt,sglhrt,n
^SCR("W4REPPZM","AV",4)

^SCR("W4REPPZM","NAME")

^SCR("W4REPPZM","P",2,"CRD")
2,13,E,1,0
^SCR("W4REPPZM","P",2,"HELP")

^SCR("W4REPPZM","P",2,"LMAX")
4
^SCR("W4REPPZM","P",2,"MUMPS1")
S:'$G(VD) VD=1
^SCR("W4REPPZM","P",2,"MUMPS2")
I VD'=1,VD'=2 S %SC("ER")=1
^SCR("W4REPPZM","P",2,"MUST")

^SCR("W4REPPZM","P",2,"TYP")
E
^SCR("W4REPPZM","P",5,"CRD")
3,42,D,8,0
^SCR("W4REPPZM","P",5,"HELP")

^SCR("W4REPPZM","P",5,"LMAX")
8
^SCR("W4REPPZM","P",5,"MUMPS1")
S METRH=$ZD($H,"DD.MM.YY")
^SCR("W4REPPZM","P",5,"MUMPS2")

^SCR("W4REPPZM","P",5,"TYP")
D
^SCR("W4REPPZM","P",10,"CRD")
3,21,D,8,0
^SCR("W4REPPZM","P",10,"HELP")

^SCR("W4REPPZM","P",10,"LMAX")
9
^SCR("W4REPPZM","P",10,"MUMPS1")
S:'$G(ADTRH) ADTRH=METRH
^SCR("W4REPPZM","P",10,"MUMPS2")

^SCR("W4REPPZM","P",10,"TYP")
D
^SCR("W4REPPZM","P","NAME","ADTRH")
10
^SCR("W4REPPZM","P","NAME","METRH")
5
^SCR("W4REPPZM","P","NAME","VD")
2
^SCR("W4REPPZM","P","NM",2)
VD
^SCR("W4REPPZM","P","NM",5)
METRH
^SCR("W4REPPZM","P","NM",10)
ADTRH
^SCR("W4REPSHD")
H
^SCR("W4REPSHD",1)
             {15            } xeciy onf  {10      }: `zknq`  {05       }: uaew 
^SCR("W4REPSHD",2)
                                                                             1$
^SCR("W4REPSHD",3)
 : 2 mekq: 1 nekq :yz:y`:  dwqir :  akek :  ehexa :ag:      qihxk     : xceq : 
^SCR("W4REPSHD",4)
                                                                               
^SCR("W4REPSHD",5)
                                                                               
^SCR("W4REPSHD",6)
                                                                               
^SCR("W4REPSHD",7)
                                                                               
^SCR("W4REPSHD",8)
                                                                               
^SCR("W4REPSHD",9)
                                                                               
^SCR("W4REPSHD",10)
                                                                               
^SCR("W4REPSHD",11)
                                                                               
^SCR("W4REPSHD",12)
                                                                               
^SCR("W4REPSHD",13)
                                                                               
^SCR("W4REPSHD",14)
                                                                               
^SCR("W4REPSHD",15)
                                                                               
^SCR("W4REPSHD",16)
                                                                               
^SCR("W4REPSHD",17)
                                                                               
^SCR("W4REPSHD",18)
                                                                               
^SCR("W4REPSHD",19)
 $1                                                                            
^SCR("W4REPSHD",20)
           zipetlh- lh , cala dnizg - ag , zvle`n - ln , zxye`n - yn :     dwqr
^SCR("W4REPSHD",21)
       oecren - 4 ; iciin - 3 ;30+'e,sicr dfie,xw`xyi - 2 ; libx - 1 :i`xy` beq
^SCR("W4REPSHD",22)
     'lyz oecren - 9 ; minelyz - 8 ;hicxw qxpiic,dfie - 6 ; `tl` - 5           
^SCR("W4REPSHD",23)
                                                                               
^SCR("W4REPSHD","A",1)
˜…ƒ‰™�Ž†:€š‹Ž‘€:•�…—
^SCR("W4REPSHD","A",2)

^SCR("W4REPSHD","A",3)
2�…‹‘1Ž…‹‘™š™€„—‘‰’�‹…‹…ˆ…˜��‡‘‰ˆ˜‹˜ƒ…‘
^SCR("W4REPSHD","A",4)
-------------------------------------------------------------------
^SCR("W4REPSHD","A",5)

^SCR("W4REPSHD","A",6)

^SCR("W4REPSHD","A",7)

^SCR("W4REPSHD","A",8)

^SCR("W4REPSHD","A",9)

^SCR("W4REPSHD","A",10)

^SCR("W4REPSHD","A",11)

^SCR("W4REPSHD","A",12)

^SCR("W4REPSHD","A",13)

^SCR("W4REPSHD","A",14)

^SCR("W4REPSHD","A",15)

^SCR("W4REPSHD","A",16)

^SCR("W4REPSHD","A",17)

^SCR("W4REPSHD","A",18)

^SCR("W4REPSHD","A",19)

^SCR("W4REPSHD","A",20)
š‰�…”Œˆ-Œˆ,ƒ�Œ�„Ž‰š‡-�‡,š–Œ…€Ž-ŒŽ,š˜™…€Ž-™Ž:„—‘’
^SCR("W4REPSHD","A",21)
�…ƒ’…Ž-4“‰ƒ‰‰Ž-3“30+'…,“‰ƒ’„†‰…,˜—€˜™‰-2“Œ‰‚˜-1:‰€˜™€‚…‘
^SCR("W4REPSHD","A",22)
'Œ™š�…ƒ’…Ž-9“�‰Ž…Œ™š-8“ˆ‰ƒ˜—‘˜�‰‰ƒ,„†‰…-6“€”Œ€-5
^SCR("W4REPSHD","A",23)

^SCR("W4REPSHD","AV",1)
øåãéùïîæ:àúëîñà:õáå÷
^SCR("W4REPSHD","AV",2)

^SCR("W4REPSHD","AV",3)
2íåëñ1îåëñùúùàä÷ñéòáëåëåèåøááçñéèøëøãåñ
^SCR("W4REPSHD","AV",4)
-------------------------------------------------------------------
^SCR("W4REPSHD","AV",5)

^SCR("W4REPSHD","AV",6)

^SCR("W4REPSHD","AV",7)

^SCR("W4REPSHD","AV",8)

^SCR("W4REPSHD","AV",9)

^SCR("W4REPSHD","AV",10)

^SCR("W4REPSHD","AV",11)

^SCR("W4REPSHD","AV",12)

^SCR("W4REPSHD","AV",13)

^SCR("W4REPSHD","AV",14)

^SCR("W4REPSHD","AV",15)

^SCR("W4REPSHD","AV",16)

^SCR("W4REPSHD","AV",17)

^SCR("W4REPSHD","AV",18)

^SCR("W4REPSHD","AV",19)

^SCR("W4REPSHD","AV",20)
úéðåôìè-ìè,ãáìáäîéúç-áç,úöìåàî-ìî,úøùåàî-ùî:ä÷ñò
^SCR("W4REPSHD","AV",21)
ïåãòåî-4;éãééî-3;30+'å,óéãòäæéå,ø÷àøùé-2;ìéâø-1:éàøùàâåñ
^SCR("W4REPSHD","AV",22)
'ìùúïåãòåî-9;íéîåìùú-8;èéãø÷ñøðééã,äæéå-6;àôìà-5
^SCR("W4REPSHD","AV",23)

^SCR("W4REPSHD","G",1,"CRD")
4,77,E,6,0
^SCR("W4REPSHD","G",1,"HELP")

^SCR("W4REPSHD","G",1,"LMAX")
6
^SCR("W4REPSHD","G",1,"MUMPS1")

^SCR("W4REPSHD","G",1,"MUMPS2")

^SCR("W4REPSHD","G",1,"OUTPUT")

^SCR("W4REPSHD","G",1,"SHEM")
 xceq 
^SCR("W4REPSHD","G",1,"TYP")
E
^SCR("W4REPSHD","G",2,"CRD")
4,70,N,16,0
^SCR("W4REPSHD","G",2,"HELP")

^SCR("W4REPSHD","G",2,"LMAX")
16
^SCR("W4REPSHD","G",2,"MUMPS1")

^SCR("W4REPSHD","G",2,"MUMPS2")
D CARD^A2HZGT
^SCR("W4REPSHD","G",2,"SHEM")
      qihxk     
^SCR("W4REPSHD","G",2,"TYP")
N
^SCR("W4REPSHD","G",3,"CRD")
4,53,H,2,0
^SCR("W4REPSHD","G",3,"HELP")

^SCR("W4REPSHD","G",3,"LMAX")
2
^SCR("W4REPSHD","G",3,"MUMPS1")

^SCR("W4REPSHD","G",3,"MUMPS2")

^SCR("W4REPSHD","G",3,"OUTPUT")

^SCR("W4REPSHD","G",3,"SHEM")
ag
^SCR("W4REPSHD","G",3,"TYP")
H
^SCR("W4REPSHD","G",4,"CRD")
4,50,N,8,2
^SCR("W4REPSHD","G",4,"HELP")

^SCR("W4REPSHD","G",4,"LMAX")
8
^SCR("W4REPSHD","G",4,"MUMPS1")

^SCR("W4REPSHD","G",4,"MUMPS2")

^SCR("W4REPSHD","G",4,"OUTPUT")

^SCR("W4REPSHD","G",4,"SHEM")
  ehexa 
^SCR("W4REPSHD","G",4,"TYP")
N
^SCR("W4REPSHD","G",5,"CRD")
4,41,N,7,2
^SCR("W4REPSHD","G",5,"HELP")

^SCR("W4REPSHD","G",5,"LMAX")
7
^SCR("W4REPSHD","G",5,"MUMPS1")

^SCR("W4REPSHD","G",5,"MUMPS2")

^SCR("W4REPSHD","G",5,"OUTPUT")

^SCR("W4REPSHD","G",5,"SHEM")
  akek 
^SCR("W4REPSHD","G",5,"TYP")
N
^SCR("W4REPSHD","G",6,"CRD")
4,33,H,8,0
^SCR("W4REPSHD","G",6,"HELP")

^SCR("W4REPSHD","G",6,"LMAX")
8
^SCR("W4REPSHD","G",6,"MUMPS1")

^SCR("W4REPSHD","G",6,"MUMPS2")

^SCR("W4REPSHD","G",6,"OUTPUT")

^SCR("W4REPSHD","G",6,"SHEM")
  dwqir 
^SCR("W4REPSHD","G",6,"TYP")
H
^SCR("W4REPSHD","G",7,"CRD")
4,24,E,2,0
^SCR("W4REPSHD","G",7,"HELP")

^SCR("W4REPSHD","G",7,"LMAX")
2
^SCR("W4REPSHD","G",7,"MUMPS1")

^SCR("W4REPSHD","G",7,"MUMPS2")

^SCR("W4REPSHD","G",7,"OUTPUT")

^SCR("W4REPSHD","G",7,"SHEM")
y`
^SCR("W4REPSHD","G",7,"TYP")
E
^SCR("W4REPSHD","G",8,"CRD")
4,21,E,2,0
^SCR("W4REPSHD","G",8,"HELP")

^SCR("W4REPSHD","G",8,"LMAX")
2
^SCR("W4REPSHD","G",8,"MUMPS1")

^SCR("W4REPSHD","G",8,"MUMPS2")

^SCR("W4REPSHD","G",8,"OUTPUT")

^SCR("W4REPSHD","G",8,"SHEM")
yz
^SCR("W4REPSHD","G",8,"TYP")
E
^SCR("W4REPSHD","G",9,"CRD")
4,18,N,8,2
^SCR("W4REPSHD","G",9,"HELP")

^SCR("W4REPSHD","G",9,"LMAX")
8
^SCR("W4REPSHD","G",9,"MUMPS1")

^SCR("W4REPSHD","G",9,"MUMPS2")

^SCR("W4REPSHD","G",9,"OUTPUT")

^SCR("W4REPSHD","G",9,"SHEM")
 1 nekq 
^SCR("W4REPSHD","G",9,"TYP")
N
^SCR("W4REPSHD","G",10,"CRD")
4,9,N,7,2
^SCR("W4REPSHD","G",10,"HELP")

^SCR("W4REPSHD","G",10,"LMAX")
7
^SCR("W4REPSHD","G",10,"MUMPS1")

^SCR("W4REPSHD","G",10,"MUMPS2")

^SCR("W4REPSHD","G",10,"OUTPUT")

^SCR("W4REPSHD","G",10,"SHEM")
 2 mekq
^SCR("W4REPSHD","G",10,"TYP")
N
^SCR("W4REPSHD","G","MAX")
99999
^SCR("W4REPSHD","G","NAME","ASR")
7
^SCR("W4REPSHD","G","NAME","CARD")
2
^SCR("W4REPSHD","G","NAME","HEV")
3
^SCR("W4REPSHD","G","NAME","ISKA")
6
^SCR("W4REPSHD","G","NAME","KOHAV")
5
^SCR("W4REPSHD","G","NAME","SID")
1
^SCR("W4REPSHD","G","NAME","SUM")
4
^SCR("W4REPSHD","G","NAME","SUM1")
9
^SCR("W4REPSHD","G","NAME","SUM2")
10
^SCR("W4REPSHD","G","NAME","TSL")
8
^SCR("W4REPSHD","G","NM",1)
SID
^SCR("W4REPSHD","G","NM",2)
CARD
^SCR("W4REPSHD","G","NM",3)
HEV
^SCR("W4REPSHD","G","NM",4)
SUM
^SCR("W4REPSHD","G","NM",5)
KOHAV
^SCR("W4REPSHD","G","NM",6)
ISKA
^SCR("W4REPSHD","G","NM",7)
ASR
^SCR("W4REPSHD","G","NM",8)
TSL
^SCR("W4REPSHD","G","NM",9)
SUM1
^SCR("W4REPSHD","G","NM",10)
SUM2
^SCR("W4REPSHD","G","RB")
3,2,20,79
^SCR("W4REPSHD","G","REF")
^TEMP($P,"S"
^SCR("W4REPSHD","G","RZD")
\
^SCR("W4REPSHD","G","STEP")
1
^SCR("W4REPSHD","G","STG")
 : 2 mekq: 1 nekq :yz:y`:  dwqir :  akek :  ehexa :ag:      qihxk     : xceq : 
^SCR("W4REPSHD","G","VG")
5
^SCR("W4REPSHD","NAME")

^SCR("W4REPSHD","P",5,"CRD")
1,61,E,10,0
^SCR("W4REPSHD","P",5,"HELP")

^SCR("W4REPSHD","P",5,"LMAX")
10
^SCR("W4REPSHD","P",5,"MUMPS1")

^SCR("W4REPSHD","P",5,"MUMPS2")

^SCR("W4REPSHD","P",5,"OUTPUT")

^SCR("W4REPSHD","P",5,"TYP")
E
^SCR("W4REPSHD","P",10,"CRD")
1,41,E,9,0
^SCR("W4REPSHD","P",10,"HELP")

^SCR("W4REPSHD","P",10,"LMAX")
9
^SCR("W4REPSHD","P",10,"MUMPS1")

^SCR("W4REPSHD","P",10,"MUMPS2")

^SCR("W4REPSHD","P",10,"OUTPUT")

^SCR("W4REPSHD","P",10,"TYP")
E
^SCR("W4REPSHD","P",15,"CRD")
1,13,E,15,0
^SCR("W4REPSHD","P",15,"HELP")

^SCR("W4REPSHD","P",15,"LMAX")
15
^SCR("W4REPSHD","P",15,"MUMPS1")

^SCR("W4REPSHD","P",15,"MUMPS2")

^SCR("W4REPSHD","P",15,"OUTPUT")

^SCR("W4REPSHD","P",15,"TYP")
E
^SCR("W4REPSHD","P","NAME","ASM")
10
^SCR("W4REPSHD","P","NAME","KVZ")
5
^SCR("W4REPSHD","P","NAME","ZMAN")
15
^SCR("W4REPSHD","P","NM",5)
KVZ
^SCR("W4REPSHD","P","NM",10)
ASM
^SCR("W4REPSHD","P","NM",15)
ZMAN
^SCR("W4REPSHV")
H
^SCR("W4REPSHV",1)
                                                                               
^SCR("W4REPSHV",2)
                {10       }:  ehexa zekf k"dq   {05      } :  ehexa daeg k"dq  
^SCR("W4REPSHV",3)
                {20       }: miakek zekf k"dq   {15      } : miakek daeg k"dq  
^SCR("W4REPSHV",4)
                                                                               
^SCR("W4REPSHV",5)
  {27      }: ehexa zekf hxk`xyi k"dq     {25      }: ehexa daeg hxk`xyi k"dq  
^SCR("W4REPSHV",6)
  {32      }:miakek zekf hxk`xyi k"dq     {30      }:miakek daeg hxk`xyi k"dq  
^SCR("W4REPSHV",7)
                                                                               
^SCR("W4REPSHV",8)
  {37      }: ehexa zekf    dfie k"dq     {35      }: ehexa daeg    dfie k"dq  
^SCR("W4REPSHV",9)
  {42      }:miakek zekf    dfie k"dq     {40      }:miakek daeg    dfie k"dq  
^SCR("W4REPSHV",10)
                                                                               
^SCR("W4REPSHV",11)
  {47      }: ehexa zekf  qxpiic k"dq     {45      }: ehexa daeg  qxpiic k"dq  
^SCR("W4REPSHV",12)
  {52      }:miakek zekf  qxpiic k"dq     {50      }:miakek daeg  qxpiic k"dq  
^SCR("W4REPSHV",13)
                                                                               
^SCR("W4REPSHV",14)
  {57      }: ehexa zekf .qw`.n` k"dq     {55      }: ehexa daeg .qw`.n` k"dq  
^SCR("W4REPSHV",15)
  {62      }:miakek zekf .qw`.n` k"dq     {60      }:miakek daeg .qw`.n` k"dq  
^SCR("W4REPSHV",16)
                                                                               
^SCR("W4REPSHV",17)
  {67      }: ehexa zekf     JCB k"dq     {65      }: ehexa daeg     JCB k"dq  
^SCR("W4REPSHV",18)
  {72      }:miakek zekf     JCB k"dq     {70      }:miakek daeg     JCB k"dq  
^SCR("W4REPSHV",19)
                                                                               
^SCR("W4REPSHV",20)
   {77      }: ehexa zekf  ine`l k"dq     {75      }: ehexa daeg   ine`l k"dq  
^SCR("W4REPSHV",21)
   {82      }:miakek zekf  ine`l k"dq     {80      }:miakek daeg   ine`l k"dq  
^SCR("W4REPSHV","A",1)

^SCR("W4REPSHV","A",2)
:…ˆ…˜�š…‹†‹"„‘:…ˆ…˜�„�…‡‹"„‘
^SCR("W4REPSHV","A",3)
:�‰�‹…‹š…‹†‹"„‘:�‰�‹…‹„�…‡‹"„‘
^SCR("W4REPSHV","A",4)

^SCR("W4REPSHV","A",5)
:…ˆ…˜�š…‹†ˆ˜‹€˜™‰‹"„‘:…ˆ…˜�„�…‡ˆ˜‹€˜™‰‹"„‘
^SCR("W4REPSHV","A",6)
:�‰�‹…‹š…‹†ˆ˜‹€˜™‰‹"„‘:�‰�‹…‹„�…‡ˆ˜‹€˜™‰‹"„‘
^SCR("W4REPSHV","A",7)

^SCR("W4REPSHV","A",8)
:…ˆ…˜�š…‹†„†‰…‹"„‘:…ˆ…˜�„�…‡„†‰…‹"„‘
^SCR("W4REPSHV","A",9)
:�‰�‹…‹š…‹†„†‰…‹"„‘:�‰�‹…‹„�…‡„†‰…‹"„‘
^SCR("W4REPSHV","A",10)

^SCR("W4REPSHV","A",11)
:…ˆ…˜�š…‹†‘˜�‰‰ƒ‹"„‘:…ˆ…˜�„�…‡‘˜�‰‰ƒ‹"„‘
^SCR("W4REPSHV","A",12)
:�‰�‹…‹š…‹†‘˜�‰‰ƒ‹"„‘:�‰�‹…‹„�…‡‘˜�‰‰ƒ‹"„‘
^SCR("W4REPSHV","A",13)

^SCR("W4REPSHV","A",14)
:…ˆ…˜�š…‹†.‘—€.Ž€‹"„‘:…ˆ…˜�„�…‡.‘—€.Ž€‹"„‘
^SCR("W4REPSHV","A",15)
:�‰�‹…‹š…‹†.‘—€.Ž€‹"„‘:�‰�‹…‹„�…‡.‘—€.Ž€‹"„‘
^SCR("W4REPSHV","A",16)

^SCR("W4REPSHV","A",17)
:…ˆ…˜�š…‹†JCB‹"„‘:…ˆ…˜�„�…‡JCB‹"„‘
^SCR("W4REPSHV","A",18)
:�‰�‹…‹š…‹†JCB‹"„‘:�‰�‹…‹„�…‡JCB‹"„‘
^SCR("W4REPSHV","A",19)

^SCR("W4REPSHV","A",20)
:…ˆ…˜�š…‹†‰Ž…€Œ‹"„‘:…ˆ…˜�„�…‡‰Ž…€Œ‹"„‘
^SCR("W4REPSHV","A",21)
:�‰�‹…‹š…‹†‰Ž…€Œ‹"„‘:�‰�‹…‹„�…‡‰Ž…€Œ‹"„‘
^SCR("W4REPSHV","AV",1)

^SCR("W4REPSHV","AV",2)
:åèåøáúåëæë"äñ:åèåøáäáåçë"äñ
^SCR("W4REPSHV","AV",3)
:íéáëåëúåëæë"äñ:íéáëåëäáåçë"äñ
^SCR("W4REPSHV","AV",4)

^SCR("W4REPSHV","AV",5)
:åèåøáúåëæèøëàøùéë"äñ:åèåøáäáåçèøëàøùéë"äñ
^SCR("W4REPSHV","AV",6)
:íéáëåëúåëæèøëàøùéë"äñ:íéáëåëäáåçèøëàøùéë"äñ
^SCR("W4REPSHV","AV",7)

^SCR("W4REPSHV","AV",8)
:åèåøáúåëæäæéåë"äñ:åèåøáäáåçäæéåë"äñ
^SCR("W4REPSHV","AV",9)
:íéáëåëúåëæäæéåë"äñ:íéáëåëäáåçäæéåë"äñ
^SCR("W4REPSHV","AV",10)

^SCR("W4REPSHV","AV",11)
:åèåøáúåëæñøðééãë"äñ:åèåøáäáåçñøðééãë"äñ
^SCR("W4REPSHV","AV",12)
:íéáëåëúåëæñøðééãë"äñ:íéáëåëäáåçñøðééãë"äñ
^SCR("W4REPSHV","AV",13)

^SCR("W4REPSHV","AV",14)
:åèåøáúåëæ.ñ÷à.îàë"äñ:åèåøáäáåç.ñ÷à.îàë"äñ
^SCR("W4REPSHV","AV",15)
:íéáëåëúåëæ.ñ÷à.îàë"äñ:íéáëåëäáåç.ñ÷à.îàë"äñ
^SCR("W4REPSHV","AV",16)

^SCR("W4REPSHV","AV",17)
:åèåøáúåëæJCBë"äñ:åèåøáäáåçJCBë"äñ
^SCR("W4REPSHV","AV",18)
:íéáëåëúåëæJCBë"äñ:íéáëåëäáåçJCBë"äñ
^SCR("W4REPSHV","AV",19)

^SCR("W4REPSHV","AV",20)
:åèåøáúåëæéîåàìë"äñ:åèåøáäáåçéîåàìë"äñ
^SCR("W4REPSHV","AV",21)
:íéáëåëúåëæéîåàìë"äñ:íéáëåëäáåçéîåàìë"äñ
^SCR("W4REPSHV","NAME")

^SCR("W4REPSHV","P",5,"CRD")
2,48,N,9,2
^SCR("W4REPSHV","P",5,"HELP")

^SCR("W4REPSHV","P",5,"LMAX")
9
^SCR("W4REPSHV","P",5,"MUMPS1")

^SCR("W4REPSHV","P",5,"MUMPS2")

^SCR("W4REPSHV","P",5,"OUTPUT")

^SCR("W4REPSHV","P",5,"TYP")
N
^SCR("W4REPSHV","P",10,"CRD")
2,16,N,9,2
^SCR("W4REPSHV","P",10,"HELP")

^SCR("W4REPSHV","P",10,"LMAX")
10
^SCR("W4REPSHV","P",10,"MUMPS1")

^SCR("W4REPSHV","P",10,"MUMPS2")

^SCR("W4REPSHV","P",10,"OUTPUT")

^SCR("W4REPSHV","P",10,"TYP")
N
^SCR("W4REPSHV","P",15,"CRD")
3,48,N,9,2
^SCR("W4REPSHV","P",15,"HELP")

^SCR("W4REPSHV","P",15,"LMAX")
9
^SCR("W4REPSHV","P",15,"MUMPS1")

^SCR("W4REPSHV","P",15,"MUMPS2")

^SCR("W4REPSHV","P",15,"OUTPUT")

^SCR("W4REPSHV","P",15,"TYP")
N
^SCR("W4REPSHV","P",20,"CRD")
3,16,N,9,2
^SCR("W4REPSHV","P",20,"HELP")

^SCR("W4REPSHV","P",20,"LMAX")
10
^SCR("W4REPSHV","P",20,"MUMPS1")

^SCR("W4REPSHV","P",20,"MUMPS2")

^SCR("W4REPSHV","P",20,"OUTPUT")

^SCR("W4REPSHV","P",20,"TYP")
N
^SCR("W4REPSHV","P",25,"CRD")
5,42,N,9,2
^SCR("W4REPSHV","P",25,"HELP")

^SCR("W4REPSHV","P",25,"LMAX")
9
^SCR("W4REPSHV","P",25,"MUMPS1")

^SCR("W4REPSHV","P",25,"MUMPS2")

^SCR("W4REPSHV","P",25,"OUTPUT")

^SCR("W4REPSHV","P",25,"TYP")
N
^SCR("W4REPSHV","P",27,"CRD")
5,2,N,9,2
^SCR("W4REPSHV","P",27,"HELP")

^SCR("W4REPSHV","P",27,"LMAX")
9
^SCR("W4REPSHV","P",27,"MUMPS1")

^SCR("W4REPSHV","P",27,"MUMPS2")

^SCR("W4REPSHV","P",27,"OUTPUT")

^SCR("W4REPSHV","P",27,"TYP")
N
^SCR("W4REPSHV","P",30,"CRD")
6,42,N,9,2
^SCR("W4REPSHV","P",30,"HELP")

^SCR("W4REPSHV","P",30,"LMAX")
9
^SCR("W4REPSHV","P",30,"MUMPS1")

^SCR("W4REPSHV","P",30,"MUMPS2")

^SCR("W4REPSHV","P",30,"OUTPUT")

^SCR("W4REPSHV","P",30,"TYP")
N
^SCR("W4REPSHV","P",32,"CRD")
6,2,N,9,2
^SCR("W4REPSHV","P",32,"HELP")

^SCR("W4REPSHV","P",32,"LMAX")
9
^SCR("W4REPSHV","P",32,"MUMPS1")

^SCR("W4REPSHV","P",32,"MUMPS2")

^SCR("W4REPSHV","P",32,"OUTPUT")

^SCR("W4REPSHV","P",32,"TYP")
N
^SCR("W4REPSHV","P",35,"CRD")
8,42,N,9,2
^SCR("W4REPSHV","P",35,"HELP")

^SCR("W4REPSHV","P",35,"LMAX")
9
^SCR("W4REPSHV","P",35,"MUMPS1")

^SCR("W4REPSHV","P",35,"MUMPS2")

^SCR("W4REPSHV","P",35,"OUTPUT")

^SCR("W4REPSHV","P",35,"TYP")
N
^SCR("W4REPSHV","P",37,"CRD")
8,2,N,9,2
^SCR("W4REPSHV","P",37,"HELP")

^SCR("W4REPSHV","P",37,"LMAX")
9
^SCR("W4REPSHV","P",37,"MUMPS1")

^SCR("W4REPSHV","P",37,"MUMPS2")

^SCR("W4REPSHV","P",37,"OUTPUT")

^SCR("W4REPSHV","P",37,"TYP")
N
^SCR("W4REPSHV","P",40,"CRD")
9,42,N,9,2
^SCR("W4REPSHV","P",40,"HELP")

^SCR("W4REPSHV","P",40,"LMAX")
9
^SCR("W4REPSHV","P",40,"MUMPS1")

^SCR("W4REPSHV","P",40,"MUMPS2")

^SCR("W4REPSHV","P",40,"OUTPUT")

^SCR("W4REPSHV","P",40,"TYP")
N
^SCR("W4REPSHV","P",42,"CRD")
9,2,N,9,2
^SCR("W4REPSHV","P",42,"HELP")

^SCR("W4REPSHV","P",42,"LMAX")
9
^SCR("W4REPSHV","P",42,"MUMPS1")

^SCR("W4REPSHV","P",42,"MUMPS2")

^SCR("W4REPSHV","P",42,"OUTPUT")

^SCR("W4REPSHV","P",42,"TYP")
N
^SCR("W4REPSHV","P",45,"CRD")
11,42,N,9,2
^SCR("W4REPSHV","P",45,"HELP")

^SCR("W4REPSHV","P",45,"LMAX")
9
^SCR("W4REPSHV","P",45,"MUMPS1")

^SCR("W4REPSHV","P",45,"MUMPS2")

^SCR("W4REPSHV","P",45,"OUTPUT")

^SCR("W4REPSHV","P",45,"TYP")
N
^SCR("W4REPSHV","P",47,"CRD")
11,2,N,9,2
^SCR("W4REPSHV","P",47,"HELP")

^SCR("W4REPSHV","P",47,"LMAX")
9
^SCR("W4REPSHV","P",47,"MUMPS1")

^SCR("W4REPSHV","P",47,"MUMPS2")

^SCR("W4REPSHV","P",47,"OUTPUT")

^SCR("W4REPSHV","P",47,"TYP")
N
^SCR("W4REPSHV","P",50,"CRD")
12,42,N,9,2
^SCR("W4REPSHV","P",50,"HELP")

^SCR("W4REPSHV","P",50,"LMAX")
9
^SCR("W4REPSHV","P",50,"MUMPS1")

^SCR("W4REPSHV","P",50,"MUMPS2")

^SCR("W4REPSHV","P",50,"OUTPUT")

^SCR("W4REPSHV","P",50,"TYP")
N
^SCR("W4REPSHV","P",52,"CRD")
12,2,N,9,2
^SCR("W4REPSHV","P",52,"HELP")

^SCR("W4REPSHV","P",52,"LMAX")
9
^SCR("W4REPSHV","P",52,"MUMPS1")

^SCR("W4REPSHV","P",52,"MUMPS2")

^SCR("W4REPSHV","P",52,"OUTPUT")

^SCR("W4REPSHV","P",52,"TYP")
N
^SCR("W4REPSHV","P",55,"CRD")
14,42,N,9,2
^SCR("W4REPSHV","P",55,"HELP")

^SCR("W4REPSHV","P",55,"LMAX")
9
^SCR("W4REPSHV","P",55,"MUMPS1")

^SCR("W4REPSHV","P",55,"MUMPS2")

^SCR("W4REPSHV","P",55,"OUTPUT")

^SCR("W4REPSHV","P",55,"TYP")
N
^SCR("W4REPSHV","P",57,"CRD")
14,2,N,9,2
^SCR("W4REPSHV","P",57,"HELP")

^SCR("W4REPSHV","P",57,"LMAX")
9
^SCR("W4REPSHV","P",57,"MUMPS1")

^SCR("W4REPSHV","P",57,"MUMPS2")

^SCR("W4REPSHV","P",57,"OUTPUT")

^SCR("W4REPSHV","P",57,"TYP")
N
^SCR("W4REPSHV","P",60,"CRD")
15,42,N,9,2
^SCR("W4REPSHV","P",60,"HELP")

^SCR("W4REPSHV","P",60,"LMAX")
9
^SCR("W4REPSHV","P",60,"MUMPS1")

^SCR("W4REPSHV","P",60,"MUMPS2")

^SCR("W4REPSHV","P",60,"OUTPUT")

^SCR("W4REPSHV","P",60,"TYP")
N
^SCR("W4REPSHV","P",62,"CRD")
15,2,N,9,2
^SCR("W4REPSHV","P",62,"HELP")

^SCR("W4REPSHV","P",62,"LMAX")
9
^SCR("W4REPSHV","P",62,"MUMPS1")

^SCR("W4REPSHV","P",62,"MUMPS2")

^SCR("W4REPSHV","P",62,"OUTPUT")

^SCR("W4REPSHV","P",62,"TYP")
N
^SCR("W4REPSHV","P",65,"CRD")
17,42,N,9,2
^SCR("W4REPSHV","P",65,"HELP")

^SCR("W4REPSHV","P",65,"LMAX")
9
^SCR("W4REPSHV","P",65,"MUMPS1")

^SCR("W4REPSHV","P",65,"MUMPS2")

^SCR("W4REPSHV","P",65,"OUTPUT")

^SCR("W4REPSHV","P",65,"TYP")
N
^SCR("W4REPSHV","P",67,"CRD")
17,2,N,9,2
^SCR("W4REPSHV","P",67,"HELP")

^SCR("W4REPSHV","P",67,"LMAX")
9
^SCR("W4REPSHV","P",67,"MUMPS1")

^SCR("W4REPSHV","P",67,"MUMPS2")

^SCR("W4REPSHV","P",67,"OUTPUT")

^SCR("W4REPSHV","P",67,"TYP")
N
^SCR("W4REPSHV","P",70,"CRD")
18,42,N,9,2
^SCR("W4REPSHV","P",70,"HELP")

^SCR("W4REPSHV","P",70,"LMAX")
9
^SCR("W4REPSHV","P",70,"MUMPS1")

^SCR("W4REPSHV","P",70,"MUMPS2")

^SCR("W4REPSHV","P",70,"OUTPUT")

^SCR("W4REPSHV","P",70,"TYP")
N
^SCR("W4REPSHV","P",72,"CRD")
18,2,N,9,2
^SCR("W4REPSHV","P",72,"HELP")

^SCR("W4REPSHV","P",72,"LMAX")
9
^SCR("W4REPSHV","P",72,"MUMPS1")

^SCR("W4REPSHV","P",72,"MUMPS2")

^SCR("W4REPSHV","P",72,"OUTPUT")

^SCR("W4REPSHV","P",72,"TYP")
N
^SCR("W4REPSHV","P",75,"CRD")
20,42,N,9,2
^SCR("W4REPSHV","P",75,"HELP")

^SCR("W4REPSHV","P",75,"LMAX")
9
^SCR("W4REPSHV","P",75,"MUMPS1")

^SCR("W4REPSHV","P",75,"MUMPS2")

^SCR("W4REPSHV","P",75,"OUTPUT")

^SCR("W4REPSHV","P",75,"TYP")
N
^SCR("W4REPSHV","P",77,"CRD")
20,3,N,9,2
^SCR("W4REPSHV","P",77,"HELP")

^SCR("W4REPSHV","P",77,"LMAX")
9
^SCR("W4REPSHV","P",77,"MUMPS1")

^SCR("W4REPSHV","P",77,"MUMPS2")

^SCR("W4REPSHV","P",77,"OUTPUT")

^SCR("W4REPSHV","P",77,"TYP")
N
^SCR("W4REPSHV","P",80,"CRD")
21,42,N,9,2
^SCR("W4REPSHV","P",80,"HELP")

^SCR("W4REPSHV","P",80,"LMAX")
9
^SCR("W4REPSHV","P",80,"MUMPS1")

^SCR("W4REPSHV","P",80,"MUMPS2")

^SCR("W4REPSHV","P",80,"OUTPUT")

^SCR("W4REPSHV","P",80,"TYP")
N
^SCR("W4REPSHV","P",82,"CRD")
21,3,N,9,2
^SCR("W4REPSHV","P",82,"HELP")

^SCR("W4REPSHV","P",82,"LMAX")
9
^SCR("W4REPSHV","P",82,"MUMPS1")

^SCR("W4REPSHV","P",82,"MUMPS2")

^SCR("W4REPSHV","P",82,"OUTPUT")

^SCR("W4REPSHV","P",82,"TYP")
N
^SCR("W4REPSHV","P","NAME","SAHB")
55
^SCR("W4REPSHV","P","NAME","SAHK")
60
^SCR("W4REPSHV","P","NAME","SAZB")
57
^SCR("W4REPSHV","P","NAME","SAZK")
62
^SCR("W4REPSHV","P","NAME","SDHB")
45
^SCR("W4REPSHV","P","NAME","SDHK")
50
^SCR("W4REPSHV","P","NAME","SDZB")
47
^SCR("W4REPSHV","P","NAME","SDZK")
52
^SCR("W4REPSHV","P","NAME","SHHB")
5
^SCR("W4REPSHV","P","NAME","SHHK")
15
^SCR("W4REPSHV","P","NAME","SHZB")
10
^SCR("W4REPSHV","P","NAME","SHZK")
20
^SCR("W4REPSHV","P","NAME","SIHB")
25
^SCR("W4REPSHV","P","NAME","SIHK")
30
^SCR("W4REPSHV","P","NAME","SIZB")
27
^SCR("W4REPSHV","P","NAME","SIZK")
32
^SCR("W4REPSHV","P","NAME","SJHB")
65
^SCR("W4REPSHV","P","NAME","SJHK")
70
^SCR("W4REPSHV","P","NAME","SJZB")
67
^SCR("W4REPSHV","P","NAME","SJZK")
72
^SCR("W4REPSHV","P","NAME","SLHB")
75
^SCR("W4REPSHV","P","NAME","SLHK")
80
^SCR("W4REPSHV","P","NAME","SLZB")
77
^SCR("W4REPSHV","P","NAME","SLZK")
82
^SCR("W4REPSHV","P","NAME","SVHB")
35
^SCR("W4REPSHV","P","NAME","SVHK")
40
^SCR("W4REPSHV","P","NAME","SVZB")
37
^SCR("W4REPSHV","P","NAME","SVZK")
42
^SCR("W4REPSHV","P","NM",5)
SHHB
^SCR("W4REPSHV","P","NM",10)
SHZB
^SCR("W4REPSHV","P","NM",15)
SHHK
^SCR("W4REPSHV","P","NM",20)
SHZK
^SCR("W4REPSHV","P","NM",25)
SIHB
^SCR("W4REPSHV","P","NM",27)
SIZB
^SCR("W4REPSHV","P","NM",30)
SIHK
^SCR("W4REPSHV","P","NM",32)
SIZK
^SCR("W4REPSHV","P","NM",35)
SVHB
^SCR("W4REPSHV","P","NM",37)
SVZB
^SCR("W4REPSHV","P","NM",40)
SVHK
^SCR("W4REPSHV","P","NM",42)
SVZK
^SCR("W4REPSHV","P","NM",45)
SDHB
^SCR("W4REPSHV","P","NM",47)
SDZB
^SCR("W4REPSHV","P","NM",50)
SDHK
^SCR("W4REPSHV","P","NM",52)
SDZK
^SCR("W4REPSHV","P","NM",55)
SAHB
^SCR("W4REPSHV","P","NM",57)
SAZB
^SCR("W4REPSHV","P","NM",60)
SAHK
^SCR("W4REPSHV","P","NM",62)
SAZK
^SCR("W4REPSHV","P","NM",65)
SJHB
^SCR("W4REPSHV","P","NM",67)
SJZB
^SCR("W4REPSHV","P","NM",70)
SJHK
^SCR("W4REPSHV","P","NM",72)
SJZK
^SCR("W4REPSHV","P","NM",75)
SLHB
^SCR("W4REPSHV","P","NM",77)
SLZB
^SCR("W4REPSHV","P","NM",80)
SLHK
^SCR("W4REPSHV","P","NM",82)
SLZK
^SCR("W4REPTL")
H
^SCR("W4REPTL",1)
                          # dpzn iyelz gec #                                   
^SCR("W4REPTL",2)
 {02              }: ( 2 - melyz jix`z itl ,1 - dxikn jix`z itl )  mipezp bivdl
^SCR("W4REPTL",3)
                     {10      } jix`z cr  {05     } jix`zn                     
^SCR("W4REPTL",4)
                                                                               
^SCR("W4REPTL",5)
                                                                             1$
^SCR("W4REPTL",6)
 :yz mekq:dpnfd:'yz jix`z:  mekq :  inl  : mlynd my :mlynd 'qn:  jix`z : dlaw :
^SCR("W4REPTL",7)
                                                                               
^SCR("W4REPTL",8)
                                                                               
^SCR("W4REPTL",9)
                                                                               
^SCR("W4REPTL",10)
                                                                               
^SCR("W4REPTL",11)
                                                                               
^SCR("W4REPTL",12)
                                                                               
^SCR("W4REPTL",13)
                                                                               
^SCR("W4REPTL",14)
                                                                               
^SCR("W4REPTL",15)
                                                                               
^SCR("W4REPTL",16)
                                                                               
^SCR("W4REPTL",17)
                                                                               
^SCR("W4REPTL",18)
                                                                               
^SCR("W4REPTL",19)
                                                                               
^SCR("W4REPTL",20)
                                                                               
^SCR("W4REPTL",21)
 $1                                                                            
^SCR("W4REPTL",22)
 {25     }               {20     }                                             
^SCR("W4REPTL",23)
                                                                               
^SCR("W4REPTL","A",1)
„�šŽ‰™…Œš‡…ƒ
^SCR("W4REPTL","A",2)
:(2-�…Œ™šŠ‰˜€š‰”Œ,1-„˜‰‹ŽŠ‰˜€š‰”Œ)�‰�…š�‚‰–„Œ
^SCR("W4REPTL","A",3)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("W4REPTL","A",4)

^SCR("W4REPTL","A",5)

^SCR("W4REPTL","A",6)
™š�…‹‘„�Ž†„'™šŠ‰˜€š�…‹‘‰ŽŒ�Œ™Ž„�™�Œ™Ž„'‘ŽŠ‰˜€š„Œ�—
^SCR("W4REPTL","A",7)
--------------------------------------------------------------------
^SCR("W4REPTL","A",8)

^SCR("W4REPTL","A",9)

^SCR("W4REPTL","A",10)

^SCR("W4REPTL","A",11)

^SCR("W4REPTL","A",12)

^SCR("W4REPTL","A",13)

^SCR("W4REPTL","A",14)

^SCR("W4REPTL","A",15)

^SCR("W4REPTL","A",16)

^SCR("W4REPTL","A",17)

^SCR("W4REPTL","A",18)

^SCR("W4REPTL","A",19)

^SCR("W4REPTL","A",20)

^SCR("W4REPTL","A",21)

^SCR("W4REPTL","A",22)

^SCR("W4REPTL","A",23)

^SCR("W4REPTL","AV",1)
vb,nhauk,jus
^SCR("W4REPTL","AV",2)
:(2-ouka,lhrt,hpk'1-vrhfnlhrt,hpk)ohbu,bdhmvk
^SCR("W4REPTL","AV",3)
lhrt,sglhrt,n
^SCR("W4REPTL","AV",4)

^SCR("W4REPTL","AV",5)

^SCR("W4REPTL","AV",6)
a,oufxvbnzvwa,lhrt,oufxhnkokanvoaokanvwxnlhrt,vkce
^SCR("W4REPTL","AV",7)
--------------------------------------------------------------------
^SCR("W4REPTL","AV",8)

^SCR("W4REPTL","AV",9)

^SCR("W4REPTL","AV",10)

^SCR("W4REPTL","AV",11)

^SCR("W4REPTL","AV",12)

^SCR("W4REPTL","AV",13)

^SCR("W4REPTL","AV",14)

^SCR("W4REPTL","AV",15)

^SCR("W4REPTL","AV",16)

^SCR("W4REPTL","AV",17)

^SCR("W4REPTL","AV",18)

^SCR("W4REPTL","AV",19)

^SCR("W4REPTL","AV",20)

^SCR("W4REPTL","AV",21)

^SCR("W4REPTL","AV",22)

^SCR("W4REPTL","AV",23)

^SCR("W4REPTL","G",1,"CRD")
7,78,E,6,0
^SCR("W4REPTL","G",1,"HELP")

^SCR("W4REPTL","G",1,"LMAX")
6
^SCR("W4REPTL","G",1,"MUMPS1")

^SCR("W4REPTL","G",1,"MUMPS2")

^SCR("W4REPTL","G",1,"OUTPUT")

^SCR("W4REPTL","G",1,"SHEM")
 dlaw 
^SCR("W4REPTL","G",1,"TYP")
E
^SCR("W4REPTL","G",2,"CRD")
7,71,D,8,0
^SCR("W4REPTL","G",2,"HELP")

^SCR("W4REPTL","G",2,"LMAX")
8
^SCR("W4REPTL","G",2,"MUMPS1")

^SCR("W4REPTL","G",2,"MUMPS2")

^SCR("W4REPTL","G",2,"SHEM")
  jix`z 
^SCR("W4REPTL","G",2,"TYP")
D
^SCR("W4REPTL","G",3,"CRD")
7,62,E,9,0
^SCR("W4REPTL","G",3,"HELP")

^SCR("W4REPTL","G",3,"LMAX")
9
^SCR("W4REPTL","G",3,"MUMPS1")

^SCR("W4REPTL","G",3,"MUMPS2")

^SCR("W4REPTL","G",3,"TYP")
E
^SCR("W4REPTL","G",4,"CRD")
7,52,H,9,0
^SCR("W4REPTL","G",4,"HELP")

^SCR("W4REPTL","G",4,"LMAX")
9
^SCR("W4REPTL","G",4,"MUMPS1")

^SCR("W4REPTL","G",4,"MUMPS2")

^SCR("W4REPTL","G",4,"TYP")
H
^SCR("W4REPTL","G",5,"CRD")
7,41,H,8,0
^SCR("W4REPTL","G",5,"HELP")

^SCR("W4REPTL","G",5,"LMAX")
9
^SCR("W4REPTL","G",5,"MUMPS1")

^SCR("W4REPTL","G",5,"MUMPS2")

^SCR("W4REPTL","G",5,"TYP")
H
^SCR("W4REPTL","G",6,"CRD")
7,33,N,8,2
^SCR("W4REPTL","G",6,"HELP")

^SCR("W4REPTL","G",6,"LMAX")
9
^SCR("W4REPTL","G",6,"MUMPS1")

^SCR("W4REPTL","G",6,"MUMPS2")

^SCR("W4REPTL","G",6,"OUTPUT")

^SCR("W4REPTL","G",6,"SHEM")
mlynd 'qn
^SCR("W4REPTL","G",6,"TYP")
N
^SCR("W4REPTL","G",7,"CRD")
7,25,D,8,0
^SCR("W4REPTL","G",7,"HELP")

^SCR("W4REPTL","G",7,"LMAX")
10
^SCR("W4REPTL","G",7,"MUMPS1")

^SCR("W4REPTL","G",7,"MUMPS2")

^SCR("W4REPTL","G",7,"OUTPUT")

^SCR("W4REPTL","G",7,"SHEM")
 mlynd my 
^SCR("W4REPTL","G",7,"TYP")
D
^SCR("W4REPTL","G",8,"CRD")
7,15,E,7,0
^SCR("W4REPTL","G",8,"HELP")

^SCR("W4REPTL","G",8,"LMAX")
7
^SCR("W4REPTL","G",8,"MUMPS1")

^SCR("W4REPTL","G",8,"MUMPS2")

^SCR("W4REPTL","G",8,"OUTPUT")

^SCR("W4REPTL","G",8,"SHEM")
  inl  
^SCR("W4REPTL","G",8,"TYP")
E
^SCR("W4REPTL","G",9,"CRD")
7,9,N,7,2
^SCR("W4REPTL","G",9,"HELP")

^SCR("W4REPTL","G",9,"LMAX")
7
^SCR("W4REPTL","G",9,"MUMPS1")

^SCR("W4REPTL","G",9,"MUMPS2")

^SCR("W4REPTL","G",9,"OUTPUT")

^SCR("W4REPTL","G",9,"SHEM")
  mekq 
^SCR("W4REPTL","G",9,"TYP")
N
^SCR("W4REPTL","G","MAX")
9999
^SCR("W4REPTL","G","NAME","DATMH")
2
^SCR("W4REPTL","G","NAME","DATTS")
7
^SCR("W4REPTL","G","NAME","FOR")
5
^SCR("W4REPTL","G","NAME","HZMTS")
8
^SCR("W4REPTL","G","NAME","LK")
3
^SCR("W4REPTL","G","NAME","LK1")
4
^SCR("W4REPTL","G","NAME","NOMCB")
1
^SCR("W4REPTL","G","NAME","SUMTL")
6
^SCR("W4REPTL","G","NAME","SUMTS")
9
^SCR("W4REPTL","G","NEW")

^SCR("W4REPTL","G","NM",1)
NOMCB
^SCR("W4REPTL","G","NM",2)
DATMH
^SCR("W4REPTL","G","NM",3)
LK
^SCR("W4REPTL","G","NM",4)
LK1
^SCR("W4REPTL","G","NM",5)
FOR
^SCR("W4REPTL","G","NM",6)
SUMTL
^SCR("W4REPTL","G","NM",7)
DATTS
^SCR("W4REPTL","G","NM",8)
HZMTS
^SCR("W4REPTL","G","NM",9)
SUMTS
^SCR("W4REPTL","G","RB")
6,2,22,79
^SCR("W4REPTL","G","REF")
^TMP($P
^SCR("W4REPTL","G","RZD")
\
^SCR("W4REPTL","G","STEP")
1
^SCR("W4REPTL","G","STG")
 :yz mekq:dpnfd:'yz jix`z:  mekq :  inl  : mlynd my :mlynd 'qn:  jix`z : dlaw :
^SCR("W4REPTL","G","VG")
8
^SCR("W4REPTL","NAME")

^SCR("W4REPTL","P",2,"CRD")
2,1,E,1,0
^SCR("W4REPTL","P",2,"HELP")

^SCR("W4REPTL","P",2,"LMAX")
17
^SCR("W4REPTL","P",2,"MUMPS1")
S:'$G(VD) VD=1
^SCR("W4REPTL","P",2,"MUMPS2")
I VD'=1,VD'=2 S %SC("ER")=1
^SCR("W4REPTL","P",2,"MUST")

^SCR("W4REPTL","P",2,"TYP")
E
^SCR("W4REPTL","P",5,"CRD")
3,42,D,8,0
^SCR("W4REPTL","P",5,"HELP")

^SCR("W4REPTL","P",5,"LMAX")
8
^SCR("W4REPTL","P",5,"MUMPS1")
S METRH=$ZD($H,"DD.MM.YY")
^SCR("W4REPTL","P",5,"MUMPS2")

^SCR("W4REPTL","P",5,"TYP")
D
^SCR("W4REPTL","P",10,"CRD")
3,21,D,8,0
^SCR("W4REPTL","P",10,"HELP")

^SCR("W4REPTL","P",10,"LMAX")
9
^SCR("W4REPTL","P",10,"MUMPS1")
S:'$G(ADTRH) ADTRH=METRH
^SCR("W4REPTL","P",10,"MUMPS2")

^SCR("W4REPTL","P",10,"TYP")
D
^SCR("W4REPTL","P",20,"CRD")
22,25,N,8,2
^SCR("W4REPTL","P",20,"HELP")

^SCR("W4REPTL","P",20,"LMAX")
8
^SCR("W4REPTL","P",20,"MUMPS1")

^SCR("W4REPTL","P",20,"MUMPS2")

^SCR("W4REPTL","P",20,"OUTPUT")

^SCR("W4REPTL","P",20,"TYP")
N
^SCR("W4REPTL","P",25,"CRD")
22,1,N,8,2
^SCR("W4REPTL","P",25,"HELP")

^SCR("W4REPTL","P",25,"LMAX")
8
^SCR("W4REPTL","P",25,"MUMPS1")

^SCR("W4REPTL","P",25,"MUMPS2")

^SCR("W4REPTL","P",25,"OUTPUT")

^SCR("W4REPTL","P",25,"TYP")
N
^SCR("W4REPTL","P","NAME","ADTRH")
10
^SCR("W4REPTL","P","NAME","METRH")
5
^SCR("W4REPTL","P","NAME","SSUMTL")
20
^SCR("W4REPTL","P","NAME","SSUMTS")
25
^SCR("W4REPTL","P","NAME","VD")
2
^SCR("W4REPTL","P","NM",2)
VD
^SCR("W4REPTL","P","NM",5)
METRH
^SCR("W4REPTL","P","NM",10)
ADTRH
^SCR("W4REPTL","P","NM",20)
SSUMTL
^SCR("W4REPTL","P","NM",25)
SSUMTS
^SCR("W4REPTL1")
H
^SCR("W4REPTL1",1)
                          # dpzn iyelz gec #                                   
^SCR("W4REPTL1",2)
              {02 }: ( 2 - yenin jix`z itl ,1 - dyikx jix`z itl )  mipezp bivdl
^SCR("W4REPTL1",3)
                     {10      } jix`z cr  {05     } jix`zn                     
^SCR("W4REPTL1",4)
                   {20       } yelz cr  {15       }  yelzn                    
^SCR("W4REPTL1","A",1)
„�šŽ‰™…Œš‡…ƒ
^SCR("W4REPTL1","A",2)
:(2-™…Ž‰ŽŠ‰˜€š‰”Œ,1-„™‰‹˜Š‰˜€š‰”Œ)�‰�…š�‚‰–„Œ
^SCR("W4REPTL1","A",3)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("W4REPTL1","A",4)
™…Œšƒ’™…ŒšŽ
^SCR("W4REPTL1","AV",1)
äðúîéùåìúçåã
^SCR("W4REPTL1","AV",2)
:(2-ùåîéîêéøàúéôì,1-äùéëøêéøàúéôì)íéðåúðâéöäì
^SCR("W4REPTL1","AV",3)
êéøàúãòêéøàúî
^SCR("W4REPTL1","AV",4)
ùåìúãòùåìúî
^SCR("W4REPTL1","NAME")

^SCR("W4REPTL1","P",2,"CRD")
2,14,E,1,0
^SCR("W4REPTL1","P",2,"HELP")

^SCR("W4REPTL1","P",2,"LMAX")
4
^SCR("W4REPTL1","P",2,"MUMPS1")
S:'$G(VD) VD=1
^SCR("W4REPTL1","P",2,"MUMPS2")
I VD'=1,VD'=2 S %SC("ER")=1
^SCR("W4REPTL1","P",2,"MUST")

^SCR("W4REPTL1","P",2,"TYP")
E
^SCR("W4REPTL1","P",5,"CRD")
3,42,D,8,0
^SCR("W4REPTL1","P",5,"HELP")

^SCR("W4REPTL1","P",5,"LMAX")
8
^SCR("W4REPTL1","P",5,"MUMPS1")
S METRH=$ZD($H,"DD.MM.YY")
^SCR("W4REPTL1","P",5,"MUMPS2")

^SCR("W4REPTL1","P",5,"TYP")
D
^SCR("W4REPTL1","P",10,"CRD")
3,21,D,8,0
^SCR("W4REPTL1","P",10,"HELP")

^SCR("W4REPTL1","P",10,"LMAX")
9
^SCR("W4REPTL1","P",10,"MUMPS1")
S:'$G(ADTRH) ADTRH=METRH
^SCR("W4REPTL1","P",10,"MUMPS2")

^SCR("W4REPTL1","P",10,"TYP")
D
^SCR("W4REPTL1","P",15,"CRD")
4,40,E,10,0
^SCR("W4REPTL1","P",15,"HELP")

^SCR("W4REPTL1","P",15,"LMAX")
10
^SCR("W4REPTL1","P",15,"MUMPS1")

^SCR("W4REPTL1","P",15,"MUMPS2")

^SCR("W4REPTL1","P",15,"TYP")
E
^SCR("W4REPTL1","P",20,"CRD")
4,19,E,10,0
^SCR("W4REPTL1","P",20,"HELP")

^SCR("W4REPTL1","P",20,"LMAX")
10
^SCR("W4REPTL1","P",20,"MUMPS1")

^SCR("W4REPTL1","P",20,"MUMPS2")
I ADTL<METL S %SC("ER")=1
^SCR("W4REPTL1","P",20,"TYP")
E
^SCR("W4REPTL1","P","NAME","ADTL")
20
^SCR("W4REPTL1","P","NAME","ADTRH")
10
^SCR("W4REPTL1","P","NAME","METL")
15
^SCR("W4REPTL1","P","NAME","METRH")
5
^SCR("W4REPTL1","P","NAME","VD")
2
^SCR("W4REPTL1","P","NM",2)
VD
^SCR("W4REPTL1","P","NM",5)
METRH
^SCR("W4REPTL1","P","NM",10)
ADTRH
^SCR("W4REPTL1","P","NM",15)
METL
^SCR("W4REPTL1","P","NM",20)
ADTL
^SCR("W4RKZSHD")
H
^SCR("W4RKZSHD",1)
                             # mixeciy fekix #                                 
^SCR("W4RKZSHD",2)
                     {10      } jix`z cr  {05      } jix`zn                    
^SCR("W4RKZSHD",3)
                                                                               
^SCR("W4RKZSHD",4)
                                                                            1$ 
^SCR("W4RKZSHD",5)
    :`"k k"dq :ine`l:qxtqw`.n`:qxpiic:dfie:hxk`xyi:beq:`zknq`: dry :  jix`z :  
^SCR("W4RKZSHD",6)
                                                                               
^SCR("W4RKZSHD",7)
                                                                               
^SCR("W4RKZSHD",8)
                                                                               
^SCR("W4RKZSHD",9)
                                                                               
^SCR("W4RKZSHD",10)
                                                                               
^SCR("W4RKZSHD",11)
                                                                               
^SCR("W4RKZSHD",12)
                                                                               
^SCR("W4RKZSHD",13)
                                                                               
^SCR("W4RKZSHD",14)
                                                                               
^SCR("W4RKZSHD",15)
                                                                               
^SCR("W4RKZSHD",16)
                                                                               
^SCR("W4RKZSHD",17)
                                                                               
^SCR("W4RKZSHD",18)
                                                                               
^SCR("W4RKZSHD",19)
                                                                               
^SCR("W4RKZSHD",20)
                                                                               
^SCR("W4RKZSHD",21)
                                                                               
^SCR("W4RKZSHD",22)
  1$                                                                           
^SCR("W4RKZSHD","A",1)
�‰˜…ƒ‰™†…‹‰˜
^SCR("W4RKZSHD","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("W4RKZSHD","A",3)

^SCR("W4RKZSHD","A",4)

^SCR("W4RKZSHD","A",5)
€"‹‹"„‘‰Ž…€Œ‘˜”‘—€.Ž€‘˜�‰‰ƒ„†‰…ˆ˜‹€˜™‰‚…‘€š‹Ž‘€„’™Š‰˜€š
^SCR("W4RKZSHD","A",6)
--------------------------------------------------------------
^SCR("W4RKZSHD","A",7)

^SCR("W4RKZSHD","A",8)

^SCR("W4RKZSHD","A",9)

^SCR("W4RKZSHD","A",10)

^SCR("W4RKZSHD","A",11)

^SCR("W4RKZSHD","A",12)

^SCR("W4RKZSHD","A",13)

^SCR("W4RKZSHD","A",14)

^SCR("W4RKZSHD","A",15)

^SCR("W4RKZSHD","A",16)

^SCR("W4RKZSHD","A",17)

^SCR("W4RKZSHD","A",18)

^SCR("W4RKZSHD","A",19)

^SCR("W4RKZSHD","A",20)

^SCR("W4RKZSHD","A",21)

^SCR("W4RKZSHD","A",22)
1
^SCR("W4RKZSHD","AV",1)
ohrushazufhr
^SCR("W4RKZSHD","AV",2)
lhrt,sglhrt,n
^SCR("W4RKZSHD","AV",3)

^SCR("W4RKZSHD","AV",4)

^SCR("W4RKZSHD","AV",5)
t"ff"vxhnutkxrpxet/ntxrbhhsvzhuyrftrahduxt,fnxtvgalhrt,
^SCR("W4RKZSHD","AV",6)
--------------------------------------------------------------
^SCR("W4RKZSHD","AV",7)

^SCR("W4RKZSHD","AV",8)

^SCR("W4RKZSHD","AV",9)

^SCR("W4RKZSHD","AV",10)

^SCR("W4RKZSHD","AV",11)

^SCR("W4RKZSHD","AV",12)

^SCR("W4RKZSHD","AV",13)

^SCR("W4RKZSHD","AV",14)

^SCR("W4RKZSHD","AV",15)

^SCR("W4RKZSHD","AV",16)

^SCR("W4RKZSHD","AV",17)

^SCR("W4RKZSHD","AV",18)

^SCR("W4RKZSHD","AV",19)

^SCR("W4RKZSHD","AV",20)

^SCR("W4RKZSHD","AV",21)

^SCR("W4RKZSHD","AV",22)
1
^SCR("W4RKZSHD","G",1,"CRD")
6,76,D,8,0
^SCR("W4RKZSHD","G",1,"HELP")

^SCR("W4RKZSHD","G",1,"LMAX")
8
^SCR("W4RKZSHD","G",1,"MUMPS1")

^SCR("W4RKZSHD","G",1,"MUMPS2")

^SCR("W4RKZSHD","G",1,"OUTPUT")

^SCR("W4RKZSHD","G",1,"SHEM")
  jix`z 
^SCR("W4RKZSHD","G",1,"TYP")
D
^SCR("W4RKZSHD","G",2,"CRD")
6,67,T,5,0
^SCR("W4RKZSHD","G",2,"HELP")

^SCR("W4RKZSHD","G",2,"LMAX")
5
^SCR("W4RKZSHD","G",2,"MUMPS1")

^SCR("W4RKZSHD","G",2,"MUMPS2")

^SCR("W4RKZSHD","G",2,"OUTPUT")

^SCR("W4RKZSHD","G",2,"SHEM")
 dry 
^SCR("W4RKZSHD","G",2,"TYP")
T
^SCR("W4RKZSHD","G",3,"CRD")
6,61,E,6,0
^SCR("W4RKZSHD","G",3,"HELP")

^SCR("W4RKZSHD","G",3,"LMAX")
6
^SCR("W4RKZSHD","G",3,"MUMPS1")

^SCR("W4RKZSHD","G",3,"MUMPS2")

^SCR("W4RKZSHD","G",3,"SHEM")
`zknq`
^SCR("W4RKZSHD","G",3,"TYP")
E
^SCR("W4RKZSHD","G",4,"CRD")
6,54,E,3,0
^SCR("W4RKZSHD","G",4,"HELP")

^SCR("W4RKZSHD","G",4,"LMAX")
3
^SCR("W4RKZSHD","G",4,"MUMPS1")

^SCR("W4RKZSHD","G",4,"MUMPS2")

^SCR("W4RKZSHD","G",4,"OUTPUT")

^SCR("W4RKZSHD","G",4,"SHEM")
beq
^SCR("W4RKZSHD","G",4,"TYP")
E
^SCR("W4RKZSHD","G",5,"CRD")
6,50,N,7,2
^SCR("W4RKZSHD","G",5,"HELP")

^SCR("W4RKZSHD","G",5,"LMAX")
7
^SCR("W4RKZSHD","G",5,"MUMPS1")

^SCR("W4RKZSHD","G",5,"MUMPS2")

^SCR("W4RKZSHD","G",5,"OUTPUT")

^SCR("W4RKZSHD","G",5,"SHEM")
hxk`xyi
^SCR("W4RKZSHD","G",5,"TYP")
N
^SCR("W4RKZSHD","G",6,"CRD")
6,42,N,4,2
^SCR("W4RKZSHD","G",6,"HELP")

^SCR("W4RKZSHD","G",6,"LMAX")
4
^SCR("W4RKZSHD","G",6,"MUMPS1")

^SCR("W4RKZSHD","G",6,"MUMPS2")

^SCR("W4RKZSHD","G",6,"OUTPUT")

^SCR("W4RKZSHD","G",6,"SHEM")
dfie
^SCR("W4RKZSHD","G",6,"TYP")
N
^SCR("W4RKZSHD","G",7,"CRD")
6,37,N,6,2
^SCR("W4RKZSHD","G",7,"HELP")

^SCR("W4RKZSHD","G",7,"LMAX")
6
^SCR("W4RKZSHD","G",7,"MUMPS1")

^SCR("W4RKZSHD","G",7,"MUMPS2")

^SCR("W4RKZSHD","G",7,"OUTPUT")

^SCR("W4RKZSHD","G",7,"SHEM")
qxpiic
^SCR("W4RKZSHD","G",7,"TYP")
N
^SCR("W4RKZSHD","G",8,"CRD")
6,30,N,9,2
^SCR("W4RKZSHD","G",8,"HELP")

^SCR("W4RKZSHD","G",8,"LMAX")
9
^SCR("W4RKZSHD","G",8,"MUMPS1")

^SCR("W4RKZSHD","G",8,"MUMPS2")

^SCR("W4RKZSHD","G",8,"OUTPUT")

^SCR("W4RKZSHD","G",8,"SHEM")
qxtqw`.n`
^SCR("W4RKZSHD","G",8,"TYP")
N
^SCR("W4RKZSHD","G",9,"CRD")
6,20,N,5,2
^SCR("W4RKZSHD","G",9,"HELP")

^SCR("W4RKZSHD","G",9,"LMAX")
5
^SCR("W4RKZSHD","G",9,"MUMPS1")

^SCR("W4RKZSHD","G",9,"MUMPS2")

^SCR("W4RKZSHD","G",9,"OUTPUT")

^SCR("W4RKZSHD","G",9,"SHEM")
ine`l
^SCR("W4RKZSHD","G",9,"TYP")
N
^SCR("W4RKZSHD","G",10,"CRD")
6,14,N,9,2
^SCR("W4RKZSHD","G",10,"HELP")

^SCR("W4RKZSHD","G",10,"LMAX")
9
^SCR("W4RKZSHD","G",10,"MUMPS1")

^SCR("W4RKZSHD","G",10,"MUMPS2")

^SCR("W4RKZSHD","G",10,"OUTPUT")

^SCR("W4RKZSHD","G",10,"SHEM")
`"k k"dq 
^SCR("W4RKZSHD","G",10,"TYP")
N
^SCR("W4RKZSHD","G","DEL")

^SCR("W4RKZSHD","G","MAX")

^SCR("W4RKZSHD","G","NAME","ACA")
8
^SCR("W4RKZSHD","G","NAME","ASM")
3
^SCR("W4RKZSHD","G","NAME","DAT")
1
^SCR("W4RKZSHD","G","NAME","DCA")
7
^SCR("W4RKZSHD","G","NAME","ICA")
5
^SCR("W4RKZSHD","G","NAME","LCA")
9
^SCR("W4RKZSHD","G","NAME","SUG")
4
^SCR("W4RKZSHD","G","NAME","TIME")
2
^SCR("W4RKZSHD","G","NAME","TOT")
10
^SCR("W4RKZSHD","G","NAME","VCA")
6
^SCR("W4RKZSHD","G","NM",1)
DAT
^SCR("W4RKZSHD","G","NM",2)
TIME
^SCR("W4RKZSHD","G","NM",3)
ASM
^SCR("W4RKZSHD","G","NM",4)
SUG
^SCR("W4RKZSHD","G","NM",5)
ICA
^SCR("W4RKZSHD","G","NM",6)
VCA
^SCR("W4RKZSHD","G","NM",7)
DCA
^SCR("W4RKZSHD","G","NM",8)
ACA
^SCR("W4RKZSHD","G","NM",9)
LCA
^SCR("W4RKZSHD","G","NM",10)
TOT
^SCR("W4RKZSHD","G","RB")
5,4,23,78
^SCR("W4RKZSHD","G","REF")

^SCR("W4RKZSHD","G","RZD")

^SCR("W4RKZSHD","G","STEP")

^SCR("W4RKZSHD","G","STG")
    :`"k k"dq :ine`l:qxtqw`.n`:qxpiic:dfie:hxk`xyi:beq:`zknq`: dry :  jix`z :  
^SCR("W4RKZSHD","G","VG")
7
^SCR("W4RKZSHD","NAME")
mixeciy fokix
^SCR("W4RKZSHD","P",5,"CRD")
2,42,D,8,0
^SCR("W4RKZSHD","P",5,"HELP")

^SCR("W4RKZSHD","P",5,"LMAX")
9
^SCR("W4RKZSHD","P",5,"MUMPS1")

^SCR("W4RKZSHD","P",5,"MUMPS2")

^SCR("W4RKZSHD","P",5,"OUTPUT")

^SCR("W4RKZSHD","P",5,"TYP")
D
^SCR("W4RKZSHD","P",10,"CRD")
2,21,D,8,0
^SCR("W4RKZSHD","P",10,"HELP")

^SCR("W4RKZSHD","P",10,"LMAX")
9
^SCR("W4RKZSHD","P",10,"MUMPS1")

^SCR("W4RKZSHD","P",10,"MUMPS2")

^SCR("W4RKZSHD","P",10,"OUTPUT")

^SCR("W4RKZSHD","P",10,"TYP")
D
^SCR("W4RKZSHD","P","NAME","DAT1")
5
^SCR("W4RKZSHD","P","NAME","DAT2")
10
^SCR("W4RKZSHD","P","NM",5)
DAT1
^SCR("W4RKZSHD","P","NM",10)
DAT2
^SCR("W4RSTGP")
H
^SCR("W4RSTGP",1)
                                                                               
^SCR("W4RSTGP",2)
                                         {05 }: ycg ebihqx ly lewehext lirt m`d
^SCR("W4RSTGP",3)
                                                              {10   }: sipq 'qn
^SCR("W4RSTGP",4)
  {15                                                                   }: gztn
^SCR("W4RSTGP",5)
                                                                               
^SCR("W4RSTGP","AV",1)

^SCR("W4RSTGP","AV",2)
:ùãçåâéèñøìùìå÷åèåøôìéòôíàä
^SCR("W4RSTGP","AV",3)
:óéðñ'ñî
^SCR("W4RSTGP","AV",4)
:çúôî
^SCR("W4RSTGP","AV",5)

^SCR("W4RSTGP","NAME")
qxhnxt ebihqx
^SCR("W4RSTGP","P",5,"CRD")
2,41,B,1,0
^SCR("W4RSTGP","P",5,"HELP")

^SCR("W4RSTGP","P",5,"LMAX")
4
^SCR("W4RSTGP","P",5,"MUMPS1")
S RSTGNEW=$G(@$$^W4PRM@("RSTGNEW"))
^SCR("W4RSTGP","P",5,"MUMPS2")

^SCR("W4RSTGP","P",5,"TYP")
B
^SCR("W4RSTGP","P",10,"CRD")
3,62,E,6,0
^SCR("W4RSTGP","P",10,"HELP")

^SCR("W4RSTGP","P",10,"LMAX")
6
^SCR("W4RSTGP","P",10,"MUMPS1")
S BRANCH=$G(@$$^W4PRM@("RSTGO","BRANCH"))
^SCR("W4RSTGP","P",10,"MUMPS2")

^SCR("W4RSTGP","P",10,"TYP")
E
^SCR("W4RSTGP","P",15,"CRD")
4,2,E,70,0
^SCR("W4RSTGP","P",15,"HELP")

^SCR("W4RSTGP","P",15,"LMAX")
70
^SCR("W4RSTGP","P",15,"MUMPS1")
S KEY=$G(@$$^W4PRM@("RSTGO","KEY"))
^SCR("W4RSTGP","P",15,"MUMPS2")

^SCR("W4RSTGP","P",15,"TYP")
E
^SCR("W4RSTGP","P","NAME","BRANCH")
10
^SCR("W4RSTGP","P","NAME","KEY")
15
^SCR("W4RSTGP","P","NAME","RSTGNEW")
5
^SCR("W4RSTGP","P","NM",5)
RSTGNEW
^SCR("W4RSTGP","P","NM",10)
BRANCH
^SCR("W4RSTGP","P","NM",15)
KEY
^SCR("W4RSTPRM")
H
^SCR("W4RSTPRM",1)
                                                                               
^SCR("W4RSTPRM",2)
                                                                               
^SCR("W4RSTPRM",3)
                                       {15             } :       dcrqn ly ID   
^SCR("W4RSTPRM",4)
                                                   {20 } : (zeipy) daebz onf   
^SCR("W4RSTPRM",5)
                                                                               
^SCR("W4RSTPRM","A",1)

^SCR("W4RSTPRM","A",2)

^SCR("W4RSTPRM","A",3)
:„ƒ’‘ŽŒ™ID
^SCR("W4RSTPRM","A",4)
:(š…‰�™)„�…‚š�Ž†
^SCR("W4RSTPRM","A",5)

^SCR("W4RSTPRM","AV",1)

^SCR("W4RSTPRM","AV",2)

^SCR("W4RSTPRM","AV",3)
:vsgxnkaID
^SCR("W4RSTPRM","AV",4)
:(,uhba)vcud,inz
^SCR("W4RSTPRM","AV",5)

^SCR("W4RSTPRM","NAME")
'o`xehqx'-l mixhnxt
^SCR("W4RSTPRM","P",15,"CRD")
3,39,E,15,0
^SCR("W4RSTPRM","P",15,"HELP")

^SCR("W4RSTPRM","P",15,"LMAX")
16
^SCR("W4RSTPRM","P",15,"MUMPS1")

^SCR("W4RSTPRM","P",15,"MUMPS2")

^SCR("W4RSTPRM","P",15,"TYP")
E
^SCR("W4RSTPRM","P",20,"CRD")
4,51,E,4,0
^SCR("W4RSTPRM","P",20,"HELP")

^SCR("W4RSTPRM","P",20,"LMAX")
4
^SCR("W4RSTPRM","P",20,"MUMPS1")

^SCR("W4RSTPRM","P",20,"MUMPS2")

^SCR("W4RSTPRM","P",20,"TYP")
E
^SCR("W4RSTPRM","P","NAME","RESTID")
15
^SCR("W4RSTPRM","P","NAME","TMOUT")
20
^SCR("W4RSTPRM","P","NM",15)
RESTID
^SCR("W4RSTPRM","P","NM",20)
TMOUT
^SCR("W4SHVREP")
H
^SCR("W4SHVREP",1)
                                # `"ay ixeciy g"ec #                           
^SCR("W4SHVREP",2)
                      {10      } jix`z cr     {05      } : jix`zn              
^SCR("W4SHVREP",3)
                                                                          1$   
^SCR("W4SHVREP",4)
                     :   ehp  :  zekf  :  daeg  : `zknq` : dry :  jix`z :      
^SCR("W4SHVREP",5)
                                                                               
^SCR("W4SHVREP",6)
                                                                               
^SCR("W4SHVREP",7)
                                                                               
^SCR("W4SHVREP",8)
                                                                               
^SCR("W4SHVREP",9)
                                                                               
^SCR("W4SHVREP",10)
                                                                               
^SCR("W4SHVREP",11)
                                                                               
^SCR("W4SHVREP",12)
                                                                               
^SCR("W4SHVREP",13)
                                                                               
^SCR("W4SHVREP",14)
                                                                               
^SCR("W4SHVREP",15)
                                                                               
^SCR("W4SHVREP",16)
                                                                               
^SCR("W4SHVREP",17)
                                                                               
^SCR("W4SHVREP",18)
                                                                               
^SCR("W4SHVREP",19)
                                                                               
^SCR("W4SHVREP",20)
                                                                               
^SCR("W4SHVREP",21)
                $1                                                             
^SCR("W4SHVREP","A",1)
€"�™‰˜…ƒ‰™‡"…ƒ
^SCR("W4SHVREP","A",2)
Š‰˜€šƒ’:Š‰˜€šŽ
^SCR("W4SHVREP","A",3)

^SCR("W4SHVREP","A",4)
…ˆ�š…‹†„�…‡€š‹Ž‘€„’™Š‰˜€š
^SCR("W4SHVREP","A",5)
---------------------------------------------
^SCR("W4SHVREP","A",6)

^SCR("W4SHVREP","A",7)

^SCR("W4SHVREP","A",8)

^SCR("W4SHVREP","A",9)

^SCR("W4SHVREP","A",10)

^SCR("W4SHVREP","A",11)

^SCR("W4SHVREP","A",12)

^SCR("W4SHVREP","A",13)

^SCR("W4SHVREP","A",14)

^SCR("W4SHVREP","A",15)

^SCR("W4SHVREP","A",16)

^SCR("W4SHVREP","A",17)

^SCR("W4SHVREP","A",18)

^SCR("W4SHVREP","A",19)

^SCR("W4SHVREP","A",20)

^SCR("W4SHVREP","A",21)

^SCR("W4SHVREP","AV",1)
t"cahrushaj"us
^SCR("W4SHVREP","AV",2)
lhrt,sg:lhrt,n
^SCR("W4SHVREP","AV",3)

^SCR("W4SHVREP","AV",4)
uyb,ufzvcujt,fnxtvgalhrt,
^SCR("W4SHVREP","AV",5)
---------------------------------------------
^SCR("W4SHVREP","AV",6)

^SCR("W4SHVREP","AV",7)

^SCR("W4SHVREP","AV",8)

^SCR("W4SHVREP","AV",9)

^SCR("W4SHVREP","AV",10)

^SCR("W4SHVREP","AV",11)

^SCR("W4SHVREP","AV",12)

^SCR("W4SHVREP","AV",13)

^SCR("W4SHVREP","AV",14)

^SCR("W4SHVREP","AV",15)

^SCR("W4SHVREP","AV",16)

^SCR("W4SHVREP","AV",17)

^SCR("W4SHVREP","AV",18)

^SCR("W4SHVREP","AV",19)

^SCR("W4SHVREP","AV",20)

^SCR("W4SHVREP","AV",21)

^SCR("W4SHVREP","G",1,"CRD")
5,72,D,8,0
^SCR("W4SHVREP","G",1,"HELP")

^SCR("W4SHVREP","G",1,"LMAX")
8
^SCR("W4SHVREP","G",1,"MUMPS1")

^SCR("W4SHVREP","G",1,"MUMPS2")

^SCR("W4SHVREP","G",1,"OUTPUT")

^SCR("W4SHVREP","G",1,"SHEM")
  jix`z 
^SCR("W4SHVREP","G",1,"TYP")
D
^SCR("W4SHVREP","G",2,"CRD")
5,63,T,5,0
^SCR("W4SHVREP","G",2,"HELP")

^SCR("W4SHVREP","G",2,"LMAX")
5
^SCR("W4SHVREP","G",2,"MUMPS1")

^SCR("W4SHVREP","G",2,"MUMPS2")

^SCR("W4SHVREP","G",2,"SHEM")
 dry 
^SCR("W4SHVREP","G",2,"TYP")
T
^SCR("W4SHVREP","G",3,"CRD")
5,57,E,8,0
^SCR("W4SHVREP","G",3,"HELP")

^SCR("W4SHVREP","G",3,"LMAX")
8
^SCR("W4SHVREP","G",3,"MUMPS1")

^SCR("W4SHVREP","G",3,"MUMPS2")

^SCR("W4SHVREP","G",3,"OUTPUT")

^SCR("W4SHVREP","G",3,"SHEM")
 `zknq` 
^SCR("W4SHVREP","G",3,"TYP")
E
^SCR("W4SHVREP","G",4,"CRD")
5,48,N,8,2
^SCR("W4SHVREP","G",4,"HELP")

^SCR("W4SHVREP","G",4,"LMAX")
8
^SCR("W4SHVREP","G",4,"MUMPS1")

^SCR("W4SHVREP","G",4,"MUMPS2")

^SCR("W4SHVREP","G",4,"OUTPUT")

^SCR("W4SHVREP","G",4,"SHEM")
  daeg  
^SCR("W4SHVREP","G",4,"TYP")
N
^SCR("W4SHVREP","G",5,"CRD")
5,39,N,8,2
^SCR("W4SHVREP","G",5,"HELP")

^SCR("W4SHVREP","G",5,"LMAX")
8
^SCR("W4SHVREP","G",5,"MUMPS1")

^SCR("W4SHVREP","G",5,"MUMPS2")

^SCR("W4SHVREP","G",5,"OUTPUT")

^SCR("W4SHVREP","G",5,"SHEM")
  zekf  
^SCR("W4SHVREP","G",5,"TYP")
N
^SCR("W4SHVREP","G",6,"CRD")
5,30,N,8,2
^SCR("W4SHVREP","G",6,"HELP")

^SCR("W4SHVREP","G",6,"LMAX")
8
^SCR("W4SHVREP","G",6,"MUMPS1")

^SCR("W4SHVREP","G",6,"MUMPS2")

^SCR("W4SHVREP","G",6,"OUTPUT")

^SCR("W4SHVREP","G",6,"SHEM")
   ehp  
^SCR("W4SHVREP","G",6,"TYP")
N
^SCR("W4SHVREP","G","MAX")
9999
^SCR("W4SHVREP","G","NAME","ASM")
3
^SCR("W4SHVREP","G","NAME","DAT")
1
^SCR("W4SHVREP","G","NAME","HOVA")
4
^SCR("W4SHVREP","G","NAME","NETTO")
6
^SCR("W4SHVREP","G","NAME","SHAA")
2
^SCR("W4SHVREP","G","NAME","ZHUT")
5
^SCR("W4SHVREP","G","NM",1)
DAT
^SCR("W4SHVREP","G","NM",2)
SHAA
^SCR("W4SHVREP","G","NM",3)
ASM
^SCR("W4SHVREP","G","NM",4)
HOVA
^SCR("W4SHVREP","G","NM",5)
ZHUT
^SCR("W4SHVREP","G","NM",6)
NETTO
^SCR("W4SHVREP","G","RB")
4,17,22,76
^SCR("W4SHVREP","G","REF")
^TMP($$^%W1JB
^SCR("W4SHVREP","G","RZD")
\
^SCR("W4SHVREP","G","STEP")
1
^SCR("W4SHVREP","G","STG")
                     :   ehp  :  zekf  :  daeg  : `zknq` : dry :  jix`z :      
^SCR("W4SHVREP","G","VG")
6
^SCR("W4SHVREP","NAME")
`"ay ixeciy g"ec
^SCR("W4SHVREP","P",5,"CRD")
2,46,D,8,0
^SCR("W4SHVREP","P",5,"HELP")

^SCR("W4SHVREP","P",5,"LMAX")
9
^SCR("W4SHVREP","P",5,"MUMPS1")

^SCR("W4SHVREP","P",5,"MUMPS2")

^SCR("W4SHVREP","P",5,"TYP")
D
^SCR("W4SHVREP","P",10,"CRD")
2,22,D,8,0
^SCR("W4SHVREP","P",10,"HELP")

^SCR("W4SHVREP","P",10,"LMAX")
9
^SCR("W4SHVREP","P",10,"MUMPS1")

^SCR("W4SHVREP","P",10,"MUMPS2")

^SCR("W4SHVREP","P",10,"TYP")
D
^SCR("W4SHVREP","P","NAME","ADDAT")
10
^SCR("W4SHVREP","P","NAME","MEDAT")
5
^SCR("W4SHVREP","P","NM",5)
MEDAT
^SCR("W4SHVREP","P","NM",10)
ADDAT
^SCR("W4SISCC")
H
^SCR("W4SISCC",1)
                                                                               
^SCR("W4SISCC",2)
                               {05       } :        ixeg` cxynl dqipkl dnqiq   
^SCR("W4SISCC",3)
   {10       } : [ 'eke zegpd ] dpnfd zlaw jldna xeyi` zeyxecy zelertl dnqiq   
^SCR("W4SISCC",4)
       {15 } : ( `l - 0 , ok - 1 ) [ '0' hixt ] iyteg hixt lr dnqiq ywal m`d   
^SCR("W4SISCC","A",1)

^SCR("W4SISCC","A",2)
:‰˜…‡€ƒ˜™ŽŒ„‘‰�‹Œ„Ž‘‰‘
^SCR("W4SISCC","A",3)
:…‹…š…‡�„�Ž†„šŒ�—ŠŒ„Ž�˜…™‰€š…™˜…ƒ™š…Œ…’”Œ„Ž‘‰‘
^SCR("W4SISCC","A",4)
:(€Œ-0,�‹-1)0'ˆ‰˜‰™”…‡ˆ‰˜”Œ’„Ž‘‰‘™—�Œ�€„
^SCR("W4SISCC","AV",1)

^SCR("W4SISCC","AV",2)
:hrujtsrankvxhbfkvnxhx
^SCR("W4SISCC","AV",3)
:ufu,ujbvbnzv,kcelkvncruaht,uarusa,ukugpkvnxhx
^SCR("W4SISCC","AV",4)
:(tk-0'if-1)0wyhrhapujyhrpkgvnxhxaeckotv
^SCR("W4SISCC","NAME")
xhpq lewl ze`nqiq
^SCR("W4SISCC","P",5,"CRD")
2,31,E,10,0
^SCR("W4SISCC","P",5,"HELP")

^SCR("W4SISCC","P",5,"LMAX")
10
^SCR("W4SISCC","P",5,"MUMPS1")
S PSWBO=$G(@$$^W4GL("W3PRM")@("PSW"))
^SCR("W4SISCC","P",5,"MUMPS2")

^SCR("W4SISCC","P",5,"MUST")

^SCR("W4SISCC","P",5,"TYP")
E
^SCR("W4SISCC","P",10,"CRD")
3,3,E,10,0
^SCR("W4SISCC","P",10,"HELP")

^SCR("W4SISCC","P",10,"LMAX")
10
^SCR("W4SISCC","P",10,"MUMPS1")
S PSW2=$G(@$$^W4PRM@("PSW2"))
^SCR("W4SISCC","P",10,"MUMPS2")

^SCR("W4SISCC","P",10,"TYP")
E
^SCR("W4SISCC","P",15,"CRD")
4,7,N,1,0
^SCR("W4SISCC","P",15,"HELP")

^SCR("W4SISCC","P",15,"LMAX")
4
^SCR("W4SISCC","P",15,"MUMPS1")
S NOPSW0='$G(@$$^W4PRM@("NOPSW0"))
^SCR("W4SISCC","P",15,"MUMPS2")

^SCR("W4SISCC","P",15,"TYP")
N
^SCR("W4SISCC","P","NAME","NOPSW0")
15
^SCR("W4SISCC","P","NAME","PSW2")
10
^SCR("W4SISCC","P","NAME","PSWBO")
5
^SCR("W4SISCC","P","NM",5)
PSWBO
^SCR("W4SISCC","P","NM",10)
PSW2
^SCR("W4SISCC","P","NM",15)
NOPSW0
^SCR("W4SISDEF")
H
^SCR("W4SISDEF",1)
                                      # ze`nqiq zxcbd #                        
^SCR("W4SISDEF",2)
                                                                               
^SCR("W4SISDEF",3)
                            {05        }:            1 `nqiq                   
^SCR("W4SISDEF",4)
                            {10        }:            2 `nqiq                   
^SCR("W4SISDEF",5)
                            {12        }:            3 `nqiq                   
^SCR("W4SISDEF",6)
                            {13        }:            4 `nqiq                   
^SCR("W4SISDEF",7)
                            {15        }:   ( dnqiq `ll - "-" ) milehial `nqiq 
^SCR("W4SISDEF",8)
                            {20        }:   ( dnqiq `ll - "-" )   zegpdl `nqiq 
^SCR("W4SISDEF",9)
                            {25        }:      `"k zipci dclwdl dnqiq          
^SCR("W4SISDEF",10)
                            {27        }   : micaer zery oewizl dnqiq          
^SCR("W4SISDEF",11)
                            {30        }:  xg` ogleyl mihixt zxardl `nqiq      
^SCR("W4SISDEF",12)
                            {35        }:  dxibn zgiztl `nqiq                  
^SCR("W4SISDEF",13)
                                   {37 }:   3 dnxa `id 0 hixtl dnqiq m`d       
^SCR("W4SISDEF","AV",1)
,utnxhx,rsdv
^SCR("W4SISDEF","AV",2)

^SCR("W4SISDEF","AV",3)
:1tnxhx
^SCR("W4SISDEF","AV",4)
:2tnxhx
^SCR("W4SISDEF","AV",5)
:3tnxhx
^SCR("W4SISDEF","AV",6)
:4tnxhx
^SCR("W4SISDEF","AV",7)
:(vnxhxtkk-"-")ohkuyhcktnxhx
^SCR("W4SISDEF","AV",8)
:(vnxhxtkk-"-"),ujbvktnxhx
^SCR("W4SISDEF","AV",9)
:t"f,hbshvskevkvnxhx
^SCR("W4SISDEF","AV",10)
:ohscug,ugaiueh,kvnxhx
^SCR("W4SISDEF","AV",11)
:rjtijkuakohyhrp,rcgvktnxhx
^SCR("W4SISDEF","AV",12)
:vrhdn,jh,pktnxhx
^SCR("W4SISDEF","AV",13)
:3vnrcthv0yhrpkvnxhxotv
^SCR("W4SISDEF","NAME")

^SCR("W4SISDEF","P",5,"CRD")
3,28,E,10,0
^SCR("W4SISDEF","P",5,"HELP")

^SCR("W4SISDEF","P",5,"LMAX")
11
^SCR("W4SISDEF","P",5,"MUMPS1")
S PSW=$G(@$$^W4PRM@("PSW"),999)
^SCR("W4SISDEF","P",5,"MUMPS2")

^SCR("W4SISDEF","P",5,"TYP")
E
^SCR("W4SISDEF","P",10,"CRD")
4,28,E,10,0
^SCR("W4SISDEF","P",10,"HELP")

^SCR("W4SISDEF","P",10,"LMAX")
11
^SCR("W4SISDEF","P",10,"MUMPS1")
S PSW2=$G(@$$^W4PRM@("PSW2"),PSW+10)
^SCR("W4SISDEF","P",10,"MUMPS2")

^SCR("W4SISDEF","P",10,"TYP")
E
^SCR("W4SISDEF","P",12,"CRD")
5,28,E,10,0
^SCR("W4SISDEF","P",12,"HELP")

^SCR("W4SISDEF","P",12,"LMAX")
11
^SCR("W4SISDEF","P",12,"MUMPS1")
S PSW3=$G(@$$^W4PRM@("PSW3"),PSW+100)
^SCR("W4SISDEF","P",12,"MUMPS2")

^SCR("W4SISDEF","P",12,"TYP")
E
^SCR("W4SISDEF","P",13,"CRD")
6,28,E,10,0
^SCR("W4SISDEF","P",13,"HELP")

^SCR("W4SISDEF","P",13,"LMAX")
11
^SCR("W4SISDEF","P",13,"MUMPS1")
S PSW4=$G(@$$^W4PRM@("PSW4"),PSW+1000)
^SCR("W4SISDEF","P",13,"MUMPS2")

^SCR("W4SISDEF","P",13,"TYP")
E
^SCR("W4SISDEF","P",15,"CRD")
7,28,E,10,0
^SCR("W4SISDEF","P",15,"HELP")

^SCR("W4SISDEF","P",15,"LMAX")
11
^SCR("W4SISDEF","P",15,"MUMPS1")
S PSWBIT=$G(@$$^W4PRM@("PSWBIT"),PSW)
^SCR("W4SISDEF","P",15,"MUMPS2")

^SCR("W4SISDEF","P",15,"TYP")
E
^SCR("W4SISDEF","P",20,"CRD")
8,28,E,10,0
^SCR("W4SISDEF","P",20,"HELP")

^SCR("W4SISDEF","P",20,"LMAX")
11
^SCR("W4SISDEF","P",20,"MUMPS1")
S PSWHNH=$G(@$$^W4PRM@("PSWHNH"),PSW2)
^SCR("W4SISDEF","P",20,"MUMPS2")

^SCR("W4SISDEF","P",20,"TYP")
E
^SCR("W4SISDEF","P",25,"CRD")
9,28,E,10,0
^SCR("W4SISDEF","P",25,"HELP")

^SCR("W4SISDEF","P",25,"LMAX")
11
^SCR("W4SISDEF","P",25,"MUMPS1")
S PSWCA=$G(@$$^W4PRM@("PSWCA"))
^SCR("W4SISDEF","P",25,"MUMPS2")

^SCR("W4SISDEF","P",25,"TYP")
E
^SCR("W4SISDEF","P",27,"CRD")
10,28,E,10,0
^SCR("W4SISDEF","P",27,"HELP")

^SCR("W4SISDEF","P",27,"LMAX")
11
^SCR("W4SISDEF","P",27,"MUMPS1")
S TIKYAD=$G(@$$^W4PRM@("TIKYAD"))
^SCR("W4SISDEF","P",27,"MUMPS2")

^SCR("W4SISDEF","P",27,"TYP")
E
^SCR("W4SISDEF","P",30,"CRD")
11,28,E,10,0
^SCR("W4SISDEF","P",30,"HELP")

^SCR("W4SISDEF","P",30,"LMAX")
11
^SCR("W4SISDEF","P",30,"MUMPS1")
S PSWHV=$G(@$$^W4PRM@("PSWHV"))
^SCR("W4SISDEF","P",30,"MUMPS2")

^SCR("W4SISDEF","P",30,"TYP")
E
^SCR("W4SISDEF","P",35,"CRD")
12,28,E,10,0
^SCR("W4SISDEF","P",35,"HELP")

^SCR("W4SISDEF","P",35,"LMAX")
11
^SCR("W4SISDEF","P",35,"MUMPS1")
S SISPTM=$G(@$$^W4PRM@("SISPTM"))
^SCR("W4SISDEF","P",35,"MUMPS2")

^SCR("W4SISDEF","P",35,"TYP")
E
^SCR("W4SISDEF","P",37,"CRD")
13,35,B,1,0
^SCR("W4SISDEF","P",37,"HELP")

^SCR("W4SISDEF","P",37,"LMAX")
4
^SCR("W4SISDEF","P",37,"MUMPS1")

^SCR("W4SISDEF","P",37,"MUMPS2")

^SCR("W4SISDEF","P",37,"TYP")
B
^SCR("W4SISDEF","P","NAME","PSW")
5
^SCR("W4SISDEF","P","NAME","PSW2")
10
^SCR("W4SISDEF","P","NAME","PSW3")
12
^SCR("W4SISDEF","P","NAME","PSW4")
13
^SCR("W4SISDEF","P","NAME","PSWBIT")
15
^SCR("W4SISDEF","P","NAME","PSWCA")
25
^SCR("W4SISDEF","P","NAME","PSWHNH")
20
^SCR("W4SISDEF","P","NAME","PSWHV")
30
^SCR("W4SISDEF","P","NAME","PSWZERO3")
37
^SCR("W4SISDEF","P","NAME","SISPTM")
35
^SCR("W4SISDEF","P","NAME","TIKYAD")
27
^SCR("W4SISDEF","P","NM",5)
PSW
^SCR("W4SISDEF","P","NM",10)
PSW2
^SCR("W4SISDEF","P","NM",12)
PSW3
^SCR("W4SISDEF","P","NM",13)
PSW4
^SCR("W4SISDEF","P","NM",15)
PSWBIT
^SCR("W4SISDEF","P","NM",20)
PSWHNH
^SCR("W4SISDEF","P","NM",25)
PSWCA
^SCR("W4SISDEF","P","NM",27)
TIKYAD
^SCR("W4SISDEF","P","NM",30)
PSWHV
^SCR("W4SISDEF","P","NM",35)
SISPTM
^SCR("W4SISDEF","P","NM",37)
PSWZERO3
^SCR("W4SISDF")
H
^SCR("W4SISDF",1)
                                      # ze`nqiq zxcbd #                        
^SCR("W4SISDF",2)
                                                                               
^SCR("W4SISDF",3)
                               {15 }:       milehial `nqiq zniiw m`d           
^SCR("W4SISDF",4)
                               {20 }:         zegpdl `nqiq zniiw m`d           
^SCR("W4SISDF",5)
                               {30 }:  xg` ogleyl mihixt zxardl `nqiq zniiw m`d
^SCR("W4SISDF",6)
                               {35 }:        dxibn zgiztl `nqiq zniiw m`d      
^SCR("W4SISDF",7)
                                                                               
^SCR("W4SISDF","A",1)
š…€Ž‘‰‘š˜ƒ‚„
^SCR("W4SISDF","A",2)

^SCR("W4SISDF","A",3)
:�‰Œ…ˆ‰�Œ€Ž‘‰‘šŽ‰‰—�€„
^SCR("W4SISDF","A",4)
:š…‡�„Œ€Ž‘‰‘šŽ‰‰—�€„
^SCR("W4SISDF","A",5)
:˜‡€�‡Œ…™Œ�‰ˆ‰˜”š˜�’„Œ€Ž‘‰‘šŽ‰‰—�€„
^SCR("W4SISDF","A",6)
:„˜‰‚Žš‡‰š”Œ€Ž‘‰‘šŽ‰‰—�€„
^SCR("W4SISDF","A",7)

^SCR("W4SISDF","AV",1)
,utnxhx,rsdv
^SCR("W4SISDF","AV",2)

^SCR("W4SISDF","AV",3)
:ohkuyhcktnxhx,nhheotv
^SCR("W4SISDF","AV",4)
:,ujbvktnxhx,nhheotv
^SCR("W4SISDF","AV",5)
:rjtijkuakohyhrp,rcgvktnxhx,nhheotv
^SCR("W4SISDF","AV",6)
:vrhdn,jh,pktnxhx,nhheotv
^SCR("W4SISDF","AV",7)

^SCR("W4SISDF","NAME")

^SCR("W4SISDF","P",15,"CRD")
3,31,B,1,0
^SCR("W4SISDF","P",15,"HELP")

^SCR("W4SISDF","P",15,"LMAX")
4
^SCR("W4SISDF","P",15,"MUMPS1")
S PSWBIT=$G(@$$^W4PRM@("PSWBIT"))
^SCR("W4SISDF","P",15,"MUMPS2")

^SCR("W4SISDF","P",15,"TYP")
B
^SCR("W4SISDF","P",20,"CRD")
4,31,B,1,0
^SCR("W4SISDF","P",20,"HELP")

^SCR("W4SISDF","P",20,"LMAX")
4
^SCR("W4SISDF","P",20,"MUMPS1")
S PSWHNH=$G(@$$^W4PRM@("PSWHNH"))
^SCR("W4SISDF","P",20,"MUMPS2")

^SCR("W4SISDF","P",20,"TYP")
B
^SCR("W4SISDF","P",30,"CRD")
5,31,B,1,0
^SCR("W4SISDF","P",30,"HELP")

^SCR("W4SISDF","P",30,"LMAX")
4
^SCR("W4SISDF","P",30,"MUMPS1")
S PSWHV=$G(@$$^W4PRM@("PSWHV"))
^SCR("W4SISDF","P",30,"MUMPS2")

^SCR("W4SISDF","P",30,"TYP")
B
^SCR("W4SISDF","P",35,"CRD")
6,31,B,1,0
^SCR("W4SISDF","P",35,"HELP")

^SCR("W4SISDF","P",35,"LMAX")
4
^SCR("W4SISDF","P",35,"MUMPS1")
S SISPTM=$G(@$$^W4PRM@("SISPTM"))
^SCR("W4SISDF","P",35,"MUMPS2")

^SCR("W4SISDF","P",35,"TYP")
B
^SCR("W4SISDF","P","NAME","PSWBIT")
15
^SCR("W4SISDF","P","NAME","PSWHNH")
20
^SCR("W4SISDF","P","NAME","PSWHV")
30
^SCR("W4SISDF","P","NAME","SISPTM")
35
^SCR("W4SISDF","P","NM",15)
PSWBIT
^SCR("W4SISDF","P","NM",20)
PSWHNH
^SCR("W4SISDF","P","NM",30)
PSWHV
^SCR("W4SISDF","P","NM",35)
SISPTM
^SCR("W4SNDY")
H
^SCR("W4SNDY",1)
                                                                               
^SCR("W4SNDY",2)
                                              {10  }: zlrten SENDYMAN zkxrn m`d
^SCR("W4SNDY",3)
                   {15                               } : sipq cew              
^SCR("W4SNDY",4)
                        {20                                      } : dcrqn ddfn
^SCR("W4SNDY",5)
                     {25                                                 } : PW
^SCR("W4SNDY","AV",1)

^SCR("W4SNDY","AV",2)
:úìòôåîSENDYMANúëøòîíàä
^SCR("W4SNDY","AV",3)
:óéðñãå÷
^SCR("W4SNDY","AV",4)
:äãòñîääæî
^SCR("W4SNDY","AV",5)
:PW
^SCR("W4SNDY","NAME")

^SCR("W4SNDY","P",10,"CRD")
2,46,B,1,0
^SCR("W4SNDY","P",10,"HELP")

^SCR("W4SNDY","P",10,"LMAX")
5
^SCR("W4SNDY","P",10,"MUMPS1")
S PRM=$$SNDY^W4PRM
^SCR("W4SNDY","P",10,"MUMPS2")

^SCR("W4SNDY","P",10,"MUST")

^SCR("W4SNDY","P",10,"TYP")
B
^SCR("W4SNDY","P",15,"CRD")
3,19,E,30,0
^SCR("W4SNDY","P",15,"HELP")

^SCR("W4SNDY","P",15,"LMAX")
34
^SCR("W4SNDY","P",15,"MUMPS1")
S BRANCH=$G(@$$^W4PRM@("SNDY","BRANCH"))
^SCR("W4SNDY","P",15,"MUMPS2")

^SCR("W4SNDY","P",15,"MUST")

^SCR("W4SNDY","P",15,"TYP")
E
^SCR("W4SNDY","P",20,"CRD")
4,24,E,41,0
^SCR("W4SNDY","P",20,"HELP")

^SCR("W4SNDY","P",20,"LMAX")
41
^SCR("W4SNDY","P",20,"MUMPS1")
S REST=$G(@$$^W4PRM@("SNDY","REST"))
^SCR("W4SNDY","P",20,"MUMPS2")

^SCR("W4SNDY","P",20,"TYP")
E
^SCR("W4SNDY","P",25,"CRD")
5,21,E,52,0
^SCR("W4SNDY","P",25,"HELP")

^SCR("W4SNDY","P",25,"LMAX")
52
^SCR("W4SNDY","P",25,"MUMPS1")
S PW=$G(@$$^W4PRM@("SNDY","PW"))
^SCR("W4SNDY","P",25,"MUMPS2")

^SCR("W4SNDY","P",25,"TYP")
E
^SCR("W4SNDY","P","NAME","BRANCH")
15
^SCR("W4SNDY","P","NAME","PRM")
10
^SCR("W4SNDY","P","NAME","PW")
25
^SCR("W4SNDY","P","NAME","REST")
20
^SCR("W4SNDY","P","NM",10)
PRM
^SCR("W4SNDY","P","NM",15)
BRANCH
^SCR("W4SNDY","P","NM",20)
REST
^SCR("W4SNDY","P","NM",25)
PW
^SCR("W4SNOU1")
H
^SCR("W4SNOU1",1)
                                 # weyl wynn #                                 
^SCR("W4SNOU1",2)
                                                                               
^SCR("W4SNOU1",3)
                                               {03 } :     lirt weyl wynn m`d  
^SCR("W4SNOU1",4)
                                         {05       } :               wtq xtqn  
^SCR("W4SNOU1",5)
                                  {              10} :                 wtq my  
^SCR("W4SNOU1",6)
                                         {15       } :              gewl xtqn  
^SCR("W4SNOU1",7)
                                  {              20} :                gewl my  
^SCR("W4SNOU1",8)
                                  {25              } : mipezp xeciyl IP zaezk  
^SCR("W4SNOU1",9)
                                             {30   } :              hxet xtqn  
^SCR("W4SNOU1",10)
                                  {35              } :               ynzyn my  
^SCR("W4SNOU1",11)
                                  {40              } :                  `nqiq  
^SCR("W4SNOU1","A",1)
—…™Œ—™ŽŽ
^SCR("W4SNOU1","A",2)

^SCR("W4SNOU1","A",3)
:Œ‰’”—…™Œ—™ŽŽ�€„
^SCR("W4SNOU1","A",4)
:—”‘˜”‘Ž
^SCR("W4SNOU1","A",5)
:—”‘�™
^SCR("W4SNOU1","A",6)
:‡…—Œ˜”‘Ž
^SCR("W4SNOU1","A",7)
:‡…—Œ�™
^SCR("W4SNOU1","A",8)
:�‰�…š�˜…ƒ‰™ŒIPš�…š‹
^SCR("W4SNOU1","A",9)
:ˆ˜…”˜”‘Ž
^SCR("W4SNOU1","A",10)
:™Žš™Ž�™
^SCR("W4SNOU1","A",11)
:€Ž‘‰‘
^SCR("W4SNOU1","AV",1)
euakeann
^SCR("W4SNOU1","AV",2)

^SCR("W4SNOU1","AV",3)
:khgpeuakeannotv
^SCR("W4SNOU1","AV",4)
:epxrpxn
^SCR("W4SNOU1","AV",5)
:epxoa
^SCR("W4SNOU1","AV",6)
:juekrpxn
^SCR("W4SNOU1","AV",7)
:juekoa
^SCR("W4SNOU1","AV",8)
:ohbu,brushakIP,cu,f
^SCR("W4SNOU1","AV",9)
:yruprpxn
^SCR("W4SNOU1","AV",10)
:an,anoa
^SCR("W4SNOU1","AV",11)
:tnxhx
^SCR("W4SNOU1","NAME")
weyl wynn
^SCR("W4SNOU1","P",3,"CRD")
3,47,B,1,0
^SCR("W4SNOU1","P",3,"HELP")

^SCR("W4SNOU1","P",3,"LMAX")
4
^SCR("W4SNOU1","P",3,"MUMPS1")

^SCR("W4SNOU1","P",3,"MUMPS2")

^SCR("W4SNOU1","P",3,"TYP")
B
^SCR("W4SNOU1","P",5,"CRD")
4,41,E,10,0
^SCR("W4SNOU1","P",5,"HELP")

^SCR("W4SNOU1","P",5,"LMAX")
10
^SCR("W4SNOU1","P",5,"MUMPS1")

^SCR("W4SNOU1","P",5,"MUMPS2")

^SCR("W4SNOU1","P",5,"TYP")
E
^SCR("W4SNOU1","P",10,"CRD")
5,52,H,15
^SCR("W4SNOU1","P",10,"HELP")

^SCR("W4SNOU1","P",10,"LMAX")
17
^SCR("W4SNOU1","P",10,"MUMPS1")

^SCR("W4SNOU1","P",10,"MUMPS2")

^SCR("W4SNOU1","P",10,"TYP")
H
^SCR("W4SNOU1","P",15,"CRD")
6,41,E,10,0
^SCR("W4SNOU1","P",15,"HELP")

^SCR("W4SNOU1","P",15,"LMAX")
10
^SCR("W4SNOU1","P",15,"MUMPS1")

^SCR("W4SNOU1","P",15,"MUMPS2")

^SCR("W4SNOU1","P",15,"TYP")
E
^SCR("W4SNOU1","P",20,"CRD")
7,52,H,15
^SCR("W4SNOU1","P",20,"HELP")

^SCR("W4SNOU1","P",20,"LMAX")
17
^SCR("W4SNOU1","P",20,"MUMPS1")

^SCR("W4SNOU1","P",20,"MUMPS2")

^SCR("W4SNOU1","P",20,"TYP")
H
^SCR("W4SNOU1","P",25,"CRD")
8,34,E,15,0
^SCR("W4SNOU1","P",25,"HELP")

^SCR("W4SNOU1","P",25,"LMAX")
17
^SCR("W4SNOU1","P",25,"MUMPS1")

^SCR("W4SNOU1","P",25,"MUMPS2")

^SCR("W4SNOU1","P",25,"TYP")
E
^SCR("W4SNOU1","P",30,"CRD")
9,45,E,4,0
^SCR("W4SNOU1","P",30,"HELP")

^SCR("W4SNOU1","P",30,"LMAX")
6
^SCR("W4SNOU1","P",30,"MUMPS1")

^SCR("W4SNOU1","P",30,"MUMPS2")

^SCR("W4SNOU1","P",30,"TYP")
E
^SCR("W4SNOU1","P",35,"CRD")
10,34,E,15,0
^SCR("W4SNOU1","P",35,"HELP")

^SCR("W4SNOU1","P",35,"LMAX")
17
^SCR("W4SNOU1","P",35,"MUMPS1")

^SCR("W4SNOU1","P",35,"MUMPS2")

^SCR("W4SNOU1","P",35,"TYP")
E
^SCR("W4SNOU1","P",40,"CRD")
11,34,E,15,0
^SCR("W4SNOU1","P",40,"HELP")

^SCR("W4SNOU1","P",40,"LMAX")
17
^SCR("W4SNOU1","P",40,"MUMPS1")

^SCR("W4SNOU1","P",40,"MUMPS2")

^SCR("W4SNOU1","P",40,"TYP")
E
^SCR("W4SNOU1","P","NAME","IP")
25
^SCR("W4SNOU1","P","NAME","LKH")
15
^SCR("W4SNOU1","P","NAME","LKH1")
20
^SCR("W4SNOU1","P","NAME","PORT")
30
^SCR("W4SNOU1","P","NAME","PSW")
40
^SCR("W4SNOU1","P","NAME","SNOU1")
3
^SCR("W4SNOU1","P","NAME","SPK")
5
^SCR("W4SNOU1","P","NAME","SPK1")
10
^SCR("W4SNOU1","P","NAME","USR")
35
^SCR("W4SNOU1","P","NM",3)
SNOU1
^SCR("W4SNOU1","P","NM",5)
SPK
^SCR("W4SNOU1","P","NM",10)
SPK1
^SCR("W4SNOU1","P","NM",15)
LKH
^SCR("W4SNOU1","P","NM",20)
LKH1
^SCR("W4SNOU1","P","NM",25)
IP
^SCR("W4SNOU1","P","NM",30)
PORT
^SCR("W4SNOU1","P","NM",35)
USR
^SCR("W4SNOU1","P","NM",40)
PSW
^SCR("W4TKADD")
H
^SCR("W4TKADD",1)
                                                                               
^SCR("W4TKADD",2)
                                           {10       } : dcwtdl gwlp           
^SCR("W4TKADD",3)
                                           {15       } : dxibnl sqep           
^SCR("W4TKADD",4)
                                                                               
^SCR("W4TKADD",5)
                                                                               
^SCR("W4TKADD","AV",1)

^SCR("W4TKADD","AV",2)
:äã÷ôäìç÷ìð
^SCR("W4TKADD","AV",3)
:äøéâîìóñåð
^SCR("W4TKADD","AV",4)

^SCR("W4TKADD","AV",5)

^SCR("W4TKADD","NAME")

^SCR("W4TKADD","P",10,"CRD")
2,43,N,7,2
^SCR("W4TKADD","P",10,"HELP")

^SCR("W4TKADD","P",10,"LMAX")
10
^SCR("W4TKADD","P",10,"MUMPS1")

^SCR("W4TKADD","P",10,"MUMPS2")

^SCR("W4TKADD","P",10,"TYP")
N
^SCR("W4TKADD","P",15,"CRD")
3,43,N,7,2
^SCR("W4TKADD","P",15,"HELP")

^SCR("W4TKADD","P",15,"LMAX")
10
^SCR("W4TKADD","P",15,"MUMPS1")

^SCR("W4TKADD","P",15,"MUMPS2")

^SCR("W4TKADD","P",15,"TYP")
N
^SCR("W4TKADD","P","NAME","ADDED")
15
^SCR("W4TKADD","P","NAME","TAKED")
10
^SCR("W4TKADD","P","NM",10)
TAKED
^SCR("W4TKADD","P","NM",15)
ADDED
^SCR("W4TOT")
H
^SCR("W4TOT",1)
              ---------------------------------------------------              
^SCR("W4TOT",2)
              |   k"dq  |      l a w z d  |  x k n p  |    beq  |              
^SCR("W4TOT",3)
              ---------------------------------------------------              
^SCR("W4TOT",4)
              {58      }|   {55        }  |  {05     }|     onefn   {03   }    
^SCR("W4TOT",5)
              {65      }|   {60        }  |  {10     }|     d`gnd   {04   }    
^SCR("W4TOT",6)
              {67      }|   {61        }  |  {11     }|'wpa dxard   {06   }    
^SCR("W4TOT",7)
              {72      }|   {70        }  |  {15     }|   hxk`xyi   {07   }    
^SCR("W4TOT",8)
              {78      }|   {75        }  |  {20     }|      dfie   {08   }    
^SCR("W4TOT",9)
              {82      }|   {80        }  |  {25     }|    qxpiic   {09   }    
^SCR("W4TOT",10)
              {84      }|   {83        }  |  {26     }|       AEX   {16   }    
^SCR("W4TOT",11)
              {33      }|   {32        }  |  {31     }|       JCB   {18   }    
^SCR("W4TOT",12)
              {37      }|   {36        }  |  {34     }|cx`w ine`l   {19   }    
^SCR("W4TOT",13)
              ----------------------------------------------------             
^SCR("W4TOT",14)
  : `"k xcey  {97      }|   {90        }  | {35      }| ehp oeict              
^SCR("W4TOT",15)
 {87       } {95       }| `"k k"dq        |  {49     }|      n"rn              
^SCR("W4TOT",16)
          {62     }: zeicizr zepnfda `"k  |  {51     }| n"rn iptl              
^SCR("W4TOT",17)
    {86      }:oetpetew k"dq {89      } : qia oz k"dq  {88     }:qeaiq k"dq    
^SCR("W4TOT",18)
 {14        : zexiknd k"dq  {13      } :yelz {12     }: dtwda zepnfd           
^SCR("W4TOT",19)
 {                                                               91}           
^SCR("W4TOT",20)
 {                                                               92}           
^SCR("W4TOT",21)
 {93     }  micreq 'qn  {45     } :miekif    {28     } {     30}    {21   }    
^SCR("W4TOT",22)
 {43     }: qeaiq zegpd {41     } zegewl zegpd  {40     }:mildpn zegpd         
^SCR("W4TOT",23)
  {              96}  {47     } : zexy inc   {42     }: mihixt zexikn          
^SCR("W4TOT",24)
 {94    }: w"nyg 'qn {98     } : dgha` {54     } :{     53}  {50     }: milehia
^SCR("W4TOT",25)
                                                        {52      } : ehexa k"dq
^SCR("W4TOT",26)
                 {                                        56}                  
^SCR("W4TOT",27)
                 {                                        59}                  
^SCR("W4TOT","AV",1)
---------------------------------------------------
^SCR("W4TOT","AV",2)
|ë"äñ|ìá÷úä|øëîð|âåñ|
^SCR("W4TOT","AV",3)
---------------------------------------------------
^SCR("W4TOT","AV",4)
|||ïîåæî
^SCR("W4TOT","AV",5)
|||äàçîä
^SCR("W4TOT","AV",6)
|||'÷ðáäøáòä
^SCR("W4TOT","AV",7)
|||èøëàøùé
^SCR("W4TOT","AV",8)
|||äæéå
^SCR("W4TOT","AV",9)
|||ñøðééã
^SCR("W4TOT","AV",10)
|||AEX
^SCR("W4TOT","AV",11)
|||JCB
^SCR("W4TOT","AV",12)
|||ãøà÷éîåàì
^SCR("W4TOT","AV",13)
----------------------------------------------------
^SCR("W4TOT","AV",14)
:à"ëøãåù|||åèðïåéãô
^SCR("W4TOT","AV",15)
|à"ëë"äñ||î"òî
^SCR("W4TOT","AV",16)
:úåéãéúòúåðîæäáà"ë||î"òîéðôì
^SCR("W4TOT","AV",17)
:ïåôðåôå÷ë"äñ:ñéáïúë"äñ:ñåáéñë"äñ
^SCR("W4TOT","AV",18)
:úåøéëîäë"äñ:ùåìú:äô÷äáúåðîæä
^SCR("W4TOT","AV",19)

^SCR("W4TOT","AV",20)

^SCR("W4TOT","AV",21)
íéãòåñ'ñî:íéåëéæ
^SCR("W4TOT","AV",22)
:ñåáéñúåçðäúåçå÷ìúåçðä:íéìäðîúåçðä
^SCR("W4TOT","AV",23)
:úåøùéîã:íéèéøôúåøéëî
^SCR("W4TOT","AV",24)
:÷"îùç'ñî:äçèáà::íéìåèéá
^SCR("W4TOT","AV",25)
:åèåøáë"äñ
^SCR("W4TOT","AV",26)

^SCR("W4TOT","AV",27)

^SCR("W4TOT","NAME")

^SCR("W4TOT","P",3,"CRD")
4,68,E,6,0
^SCR("W4TOT","P",3,"HELP")

^SCR("W4TOT","P",3,"LMAX")
6
^SCR("W4TOT","P",3,"MUMPS1")

^SCR("W4TOT","P",3,"MUMPS2")

^SCR("W4TOT","P",3,"OUTPUT")

^SCR("W4TOT","P",3,"TYP")
E
^SCR("W4TOT","P",4,"CRD")
5,68,E,6,0
^SCR("W4TOT","P",4,"HELP")

^SCR("W4TOT","P",4,"LMAX")
6
^SCR("W4TOT","P",4,"MUMPS1")

^SCR("W4TOT","P",4,"MUMPS2")

^SCR("W4TOT","P",4,"OUTPUT")

^SCR("W4TOT","P",4,"TYP")
E
^SCR("W4TOT","P",5,"CRD")
4,45,N,8,2
^SCR("W4TOT","P",5,"HELP")

^SCR("W4TOT","P",5,"LMAX")
8
^SCR("W4TOT","P",5,"MUMPS1")

^SCR("W4TOT","P",5,"MUMPS2")

^SCR("W4TOT","P",5,"OUTPUT")

^SCR("W4TOT","P",5,"TYP")
N
^SCR("W4TOT","P",6,"CRD")
6,68,E,6,0
^SCR("W4TOT","P",6,"HELP")

^SCR("W4TOT","P",6,"LMAX")
6
^SCR("W4TOT","P",6,"MUMPS1")

^SCR("W4TOT","P",6,"MUMPS2")

^SCR("W4TOT","P",6,"OUTPUT")

^SCR("W4TOT","P",6,"TYP")
E
^SCR("W4TOT","P",7,"CRD")
7,68,E,6,0
^SCR("W4TOT","P",7,"HELP")

^SCR("W4TOT","P",7,"LMAX")
6
^SCR("W4TOT","P",7,"MUMPS1")

^SCR("W4TOT","P",7,"MUMPS2")

^SCR("W4TOT","P",7,"OUTPUT")

^SCR("W4TOT","P",7,"TYP")
E
^SCR("W4TOT","P",8,"CRD")
8,68,E,6,0
^SCR("W4TOT","P",8,"HELP")

^SCR("W4TOT","P",8,"LMAX")
6
^SCR("W4TOT","P",8,"MUMPS1")

^SCR("W4TOT","P",8,"MUMPS2")

^SCR("W4TOT","P",8,"OUTPUT")

^SCR("W4TOT","P",8,"TYP")
E
^SCR("W4TOT","P",9,"CRD")
9,68,E,6,0
^SCR("W4TOT","P",9,"HELP")

^SCR("W4TOT","P",9,"LMAX")
6
^SCR("W4TOT","P",9,"MUMPS1")

^SCR("W4TOT","P",9,"MUMPS2")

^SCR("W4TOT","P",9,"OUTPUT")

^SCR("W4TOT","P",9,"TYP")
E
^SCR("W4TOT","P",10,"CRD")
5,45,N,8,2
^SCR("W4TOT","P",10,"HELP")

^SCR("W4TOT","P",10,"LMAX")
8
^SCR("W4TOT","P",10,"MUMPS1")

^SCR("W4TOT","P",10,"MUMPS2")

^SCR("W4TOT","P",10,"OUTPUT")

^SCR("W4TOT","P",10,"TYP")
N
^SCR("W4TOT","P",11,"CRD")
6,45,N,8,2
^SCR("W4TOT","P",11,"HELP")

^SCR("W4TOT","P",11,"LMAX")
8
^SCR("W4TOT","P",11,"MUMPS1")

^SCR("W4TOT","P",11,"MUMPS2")

^SCR("W4TOT","P",11,"OUTPUT")

^SCR("W4TOT","P",11,"TYP")
N
^SCR("W4TOT","P",12,"CRD")
18,45,N,8,2
^SCR("W4TOT","P",12,"HELP")

^SCR("W4TOT","P",12,"LMAX")
8
^SCR("W4TOT","P",12,"MUMPS1")

^SCR("W4TOT","P",12,"MUMPS2")

^SCR("W4TOT","P",12,"OUTPUT")

^SCR("W4TOT","P",12,"TYP")
N
^SCR("W4TOT","P",13,"CRD")
18,28,N,8,2
^SCR("W4TOT","P",13,"HELP")

^SCR("W4TOT","P",13,"LMAX")
9
^SCR("W4TOT","P",13,"MUMPS1")

^SCR("W4TOT","P",13,"MUMPS2")

^SCR("W4TOT","P",13,"OUTPUT")

^SCR("W4TOT","P",13,"TYP")
N
^SCR("W4TOT","P",14,"CRD")
18,1,N,10,2
^SCR("W4TOT","P",14,"HELP")

^SCR("W4TOT","P",14,"LMAX")
11
^SCR("W4TOT","P",14,"MUMPS1")

^SCR("W4TOT","P",14,"MUMPS2")

^SCR("W4TOT","P",14,"OUTPUT")

^SCR("W4TOT","P",14,"TYP")
N
^SCR("W4TOT","P",15,"CRD")
7,45,N,8,2
^SCR("W4TOT","P",15,"HELP")

^SCR("W4TOT","P",15,"LMAX")
8
^SCR("W4TOT","P",15,"MUMPS1")

^SCR("W4TOT","P",15,"MUMPS2")

^SCR("W4TOT","P",15,"OUTPUT")

^SCR("W4TOT","P",15,"TYP")
N
^SCR("W4TOT","P",16,"CRD")
10,68,E,6,0
^SCR("W4TOT","P",16,"HELP")

^SCR("W4TOT","P",16,"LMAX")
6
^SCR("W4TOT","P",16,"MUMPS1")

^SCR("W4TOT","P",16,"MUMPS2")

^SCR("W4TOT","P",16,"OUTPUT")

^SCR("W4TOT","P",16,"TYP")
E
^SCR("W4TOT","P",18,"CRD")
11,68,E,6,0
^SCR("W4TOT","P",18,"HELP")

^SCR("W4TOT","P",18,"LMAX")
6
^SCR("W4TOT","P",18,"MUMPS1")

^SCR("W4TOT","P",18,"MUMPS2")

^SCR("W4TOT","P",18,"OUTPUT")

^SCR("W4TOT","P",18,"TYP")
E
^SCR("W4TOT","P",19,"CRD")
12,68,E,6,0
^SCR("W4TOT","P",19,"HELP")

^SCR("W4TOT","P",19,"LMAX")
6
^SCR("W4TOT","P",19,"MUMPS1")

^SCR("W4TOT","P",19,"MUMPS2")

^SCR("W4TOT","P",19,"OUTPUT")

^SCR("W4TOT","P",19,"TYP")
E
^SCR("W4TOT","P",20,"CRD")
8,45,N,8,2
^SCR("W4TOT","P",20,"HELP")

^SCR("W4TOT","P",20,"LMAX")
8
^SCR("W4TOT","P",20,"MUMPS1")

^SCR("W4TOT","P",20,"MUMPS2")

^SCR("W4TOT","P",20,"OUTPUT")

^SCR("W4TOT","P",20,"TYP")
N
^SCR("W4TOT","P",21,"CRD")
21,68,E,6,0
^SCR("W4TOT","P",21,"HELP")

^SCR("W4TOT","P",21,"LMAX")
6
^SCR("W4TOT","P",21,"MUMPS1")

^SCR("W4TOT","P",21,"MUMPS2")

^SCR("W4TOT","P",21,"OUTPUT")

^SCR("W4TOT","P",21,"TYP")
E
^SCR("W4TOT","P",25,"CRD")
9,45,N,8,2
^SCR("W4TOT","P",25,"HELP")

^SCR("W4TOT","P",25,"LMAX")
8
^SCR("W4TOT","P",25,"MUMPS1")

^SCR("W4TOT","P",25,"MUMPS2")

^SCR("W4TOT","P",25,"OUTPUT")

^SCR("W4TOT","P",25,"TYP")
N
^SCR("W4TOT","P",26,"CRD")
10,45,N,8,2
^SCR("W4TOT","P",26,"HELP")

^SCR("W4TOT","P",26,"LMAX")
8
^SCR("W4TOT","P",26,"MUMPS1")

^SCR("W4TOT","P",26,"MUMPS2")

^SCR("W4TOT","P",26,"OUTPUT")

^SCR("W4TOT","P",26,"TYP")
N
^SCR("W4TOT","P",28,"CRD")
21,45,N,8,2
^SCR("W4TOT","P",28,"HELP")

^SCR("W4TOT","P",28,"LMAX")
8
^SCR("W4TOT","P",28,"MUMPS1")

^SCR("W4TOT","P",28,"MUMPS2")

^SCR("W4TOT","P",28,"TYP")
N
^SCR("W4TOT","P",30,"CRD")
21,64,H,8
^SCR("W4TOT","P",30,"HELP")

^SCR("W4TOT","P",30,"LMAX")
8
^SCR("W4TOT","P",30,"MUMPS1")

^SCR("W4TOT","P",30,"MUMPS2")

^SCR("W4TOT","P",30,"OUTPUT")

^SCR("W4TOT","P",30,"TYP")
H
^SCR("W4TOT","P",31,"CRD")
11,45,N,8,2
^SCR("W4TOT","P",31,"HELP")

^SCR("W4TOT","P",31,"LMAX")
8
^SCR("W4TOT","P",31,"MUMPS1")

^SCR("W4TOT","P",31,"MUMPS2")

^SCR("W4TOT","P",31,"OUTPUT")

^SCR("W4TOT","P",31,"TYP")
N
^SCR("W4TOT","P",32,"CRD")
11,28,N,8,2
^SCR("W4TOT","P",32,"HELP")

^SCR("W4TOT","P",32,"LMAX")
11
^SCR("W4TOT","P",32,"MUMPS1")

^SCR("W4TOT","P",32,"MUMPS2")

^SCR("W4TOT","P",32,"OUTPUT")

^SCR("W4TOT","P",32,"TYP")
N
^SCR("W4TOT","P",33,"CRD")
11,14,N,9,2
^SCR("W4TOT","P",33,"HELP")

^SCR("W4TOT","P",33,"LMAX")
9
^SCR("W4TOT","P",33,"MUMPS1")

^SCR("W4TOT","P",33,"MUMPS2")

^SCR("W4TOT","P",33,"OUTPUT")

^SCR("W4TOT","P",33,"TYP")
N
^SCR("W4TOT","P",34,"CRD")
12,45,N,8,2
^SCR("W4TOT","P",34,"HELP")

^SCR("W4TOT","P",34,"LMAX")
8
^SCR("W4TOT","P",34,"MUMPS1")

^SCR("W4TOT","P",34,"MUMPS2")

^SCR("W4TOT","P",34,"OUTPUT")

^SCR("W4TOT","P",34,"TYP")
N
^SCR("W4TOT","P",35,"CRD")
14,44,N,9,2
^SCR("W4TOT","P",35,"HELP")

^SCR("W4TOT","P",35,"LMAX")
9
^SCR("W4TOT","P",35,"MUMPS1")

^SCR("W4TOT","P",35,"MUMPS2")

^SCR("W4TOT","P",35,"OUTPUT")

^SCR("W4TOT","P",35,"TYP")
N
^SCR("W4TOT","P",36,"CRD")
12,28,N,9,2
^SCR("W4TOT","P",36,"HELP")

^SCR("W4TOT","P",36,"LMAX")
11
^SCR("W4TOT","P",36,"MUMPS1")

^SCR("W4TOT","P",36,"MUMPS2")

^SCR("W4TOT","P",36,"OUTPUT")

^SCR("W4TOT","P",36,"TYP")
N
^SCR("W4TOT","P",37,"CRD")
12,14,N,9,2
^SCR("W4TOT","P",37,"HELP")

^SCR("W4TOT","P",37,"LMAX")
9
^SCR("W4TOT","P",37,"MUMPS1")

^SCR("W4TOT","P",37,"MUMPS2")

^SCR("W4TOT","P",37,"OUTPUT")

^SCR("W4TOT","P",37,"TYP")
N
^SCR("W4TOT","P",40,"CRD")
22,48,N,8,2
^SCR("W4TOT","P",40,"HELP")

^SCR("W4TOT","P",40,"LMAX")
8
^SCR("W4TOT","P",40,"MUMPS1")

^SCR("W4TOT","P",40,"MUMPS2")

^SCR("W4TOT","P",40,"OUTPUT")

^SCR("W4TOT","P",40,"TYP")
N
^SCR("W4TOT","P",41,"CRD")
22,24,N,8,2
^SCR("W4TOT","P",41,"HELP")

^SCR("W4TOT","P",41,"LMAX")
8
^SCR("W4TOT","P",41,"MUMPS1")

^SCR("W4TOT","P",41,"MUMPS2")

^SCR("W4TOT","P",41,"OUTPUT")

^SCR("W4TOT","P",41,"TYP")
N
^SCR("W4TOT","P",42,"CRD")
23,45,N,8,2
^SCR("W4TOT","P",42,"HELP")

^SCR("W4TOT","P",42,"LMAX")
8
^SCR("W4TOT","P",42,"MUMPS1")

^SCR("W4TOT","P",42,"MUMPS2")

^SCR("W4TOT","P",42,"OUTPUT")

^SCR("W4TOT","P",42,"TYP")
N
^SCR("W4TOT","P",43,"CRD")
22,1,N,8,2
^SCR("W4TOT","P",43,"HELP")

^SCR("W4TOT","P",43,"LMAX")
8
^SCR("W4TOT","P",43,"MUMPS1")

^SCR("W4TOT","P",43,"MUMPS2")

^SCR("W4TOT","P",43,"OUTPUT")

^SCR("W4TOT","P",43,"TYP")
N
^SCR("W4TOT","P",45,"CRD")
21,24,N,8,2
^SCR("W4TOT","P",45,"HELP")

^SCR("W4TOT","P",45,"LMAX")
8
^SCR("W4TOT","P",45,"MUMPS1")

^SCR("W4TOT","P",45,"MUMPS2")

^SCR("W4TOT","P",45,"OUTPUT")

^SCR("W4TOT","P",45,"TYP")
N
^SCR("W4TOT","P",47,"CRD")
23,22,N,8,2
^SCR("W4TOT","P",47,"HELP")

^SCR("W4TOT","P",47,"LMAX")
8
^SCR("W4TOT","P",47,"MUMPS1")

^SCR("W4TOT","P",47,"MUMPS2")

^SCR("W4TOT","P",47,"OUTPUT")

^SCR("W4TOT","P",47,"TYP")
N
^SCR("W4TOT","P",49,"CRD")
15,45,N,8,2
^SCR("W4TOT","P",49,"HELP")

^SCR("W4TOT","P",49,"LMAX")
8
^SCR("W4TOT","P",49,"MUMPS1")

^SCR("W4TOT","P",49,"MUMPS2")

^SCR("W4TOT","P",49,"OUTPUT")

^SCR("W4TOT","P",49,"TYP")
N
^SCR("W4TOT","P",50,"CRD")
24,61,N,8,2
^SCR("W4TOT","P",50,"HELP")

^SCR("W4TOT","P",50,"LMAX")
8
^SCR("W4TOT","P",50,"MUMPS1")

^SCR("W4TOT","P",50,"MUMPS2")

^SCR("W4TOT","P",50,"OUTPUT")

^SCR("W4TOT","P",50,"TYP")
N
^SCR("W4TOT","P",51,"CRD")
16,45,N,8,2
^SCR("W4TOT","P",51,"HELP")

^SCR("W4TOT","P",51,"LMAX")
8
^SCR("W4TOT","P",51,"MUMPS1")

^SCR("W4TOT","P",51,"MUMPS2")

^SCR("W4TOT","P",51,"OUTPUT")

^SCR("W4TOT","P",51,"TYP")
N
^SCR("W4TOT","P",52,"CRD")
25,56,N,9,2
^SCR("W4TOT","P",52,"HELP")

^SCR("W4TOT","P",52,"LMAX")
9
^SCR("W4TOT","P",52,"MUMPS1")

^SCR("W4TOT","P",52,"MUMPS2")

^SCR("W4TOT","P",52,"OUTPUT")

^SCR("W4TOT","P",52,"TYP")
N
^SCR("W4TOT","P",53,"CRD")
24,59,H,8,0
^SCR("W4TOT","P",53,"HELP")

^SCR("W4TOT","P",53,"LMAX")
8
^SCR("W4TOT","P",53,"MUMPS1")

^SCR("W4TOT","P",53,"MUMPS2")

^SCR("W4TOT","P",53,"OUTPUT")

^SCR("W4TOT","P",53,"TYP")
H
^SCR("W4TOT","P",54,"CRD")
24,39,N,8,2
^SCR("W4TOT","P",54,"HELP")

^SCR("W4TOT","P",54,"LMAX")
8
^SCR("W4TOT","P",54,"MUMPS1")

^SCR("W4TOT","P",54,"MUMPS2")

^SCR("W4TOT","P",54,"OUTPUT")

^SCR("W4TOT","P",54,"TYP")
N
^SCR("W4TOT","P",55,"CRD")
4,28,N,8,2
^SCR("W4TOT","P",55,"HELP")

^SCR("W4TOT","P",55,"LMAX")
11
^SCR("W4TOT","P",55,"MUMPS1")

^SCR("W4TOT","P",55,"MUMPS2")

^SCR("W4TOT","P",55,"OUTPUT")

^SCR("W4TOT","P",55,"TYP")
N
^SCR("W4TOT","P",56,"CRD")
26,61,H,43
^SCR("W4TOT","P",56,"HELP")

^SCR("W4TOT","P",56,"LMAX")
43
^SCR("W4TOT","P",56,"MUMPS1")

^SCR("W4TOT","P",56,"MUMPS2")

^SCR("W4TOT","P",56,"OUTPUT")

^SCR("W4TOT","P",56,"TYP")
H
^SCR("W4TOT","P",58,"CRD")
4,14,N,9,2
^SCR("W4TOT","P",58,"HELP")

^SCR("W4TOT","P",58,"LMAX")
9
^SCR("W4TOT","P",58,"MUMPS1")

^SCR("W4TOT","P",58,"MUMPS2")

^SCR("W4TOT","P",58,"OUTPUT")

^SCR("W4TOT","P",58,"TYP")
N
^SCR("W4TOT","P",59,"CRD")
27,61,H,43
^SCR("W4TOT","P",59,"HELP")

^SCR("W4TOT","P",59,"LMAX")
43
^SCR("W4TOT","P",59,"MUMPS1")

^SCR("W4TOT","P",59,"MUMPS2")

^SCR("W4TOT","P",59,"OUTPUT")

^SCR("W4TOT","P",59,"TYP")
H
^SCR("W4TOT","P",60,"CRD")
5,28,N,8,2
^SCR("W4TOT","P",60,"HELP")

^SCR("W4TOT","P",60,"LMAX")
11
^SCR("W4TOT","P",60,"MUMPS1")

^SCR("W4TOT","P",60,"MUMPS2")

^SCR("W4TOT","P",60,"OUTPUT")

^SCR("W4TOT","P",60,"TYP")
N
^SCR("W4TOT","P",61,"CRD")
6,28,N,8,2
^SCR("W4TOT","P",61,"HELP")

^SCR("W4TOT","P",61,"LMAX")
11
^SCR("W4TOT","P",61,"MUMPS1")

^SCR("W4TOT","P",61,"MUMPS2")

^SCR("W4TOT","P",61,"OUTPUT")

^SCR("W4TOT","P",61,"TYP")
N
^SCR("W4TOT","P",62,"CRD")
16,10,N,8,2
^SCR("W4TOT","P",62,"HELP")

^SCR("W4TOT","P",62,"LMAX")
8
^SCR("W4TOT","P",62,"MUMPS1")

^SCR("W4TOT","P",62,"MUMPS2")

^SCR("W4TOT","P",62,"OUTPUT")

^SCR("W4TOT","P",62,"TYP")
N
^SCR("W4TOT","P",65,"CRD")
5,14,N,9,2
^SCR("W4TOT","P",65,"HELP")

^SCR("W4TOT","P",65,"LMAX")
9
^SCR("W4TOT","P",65,"MUMPS1")

^SCR("W4TOT","P",65,"MUMPS2")

^SCR("W4TOT","P",65,"OUTPUT")

^SCR("W4TOT","P",65,"TYP")
N
^SCR("W4TOT","P",67,"CRD")
6,14,N,9,2
^SCR("W4TOT","P",67,"HELP")

^SCR("W4TOT","P",67,"LMAX")
9
^SCR("W4TOT","P",67,"MUMPS1")

^SCR("W4TOT","P",67,"MUMPS2")

^SCR("W4TOT","P",67,"TYP")
N
^SCR("W4TOT","P",70,"CRD")
7,28,N,8,2
^SCR("W4TOT","P",70,"HELP")

^SCR("W4TOT","P",70,"LMAX")
11
^SCR("W4TOT","P",70,"MUMPS1")

^SCR("W4TOT","P",70,"MUMPS2")

^SCR("W4TOT","P",70,"OUTPUT")

^SCR("W4TOT","P",70,"TYP")
N
^SCR("W4TOT","P",72,"CRD")
7,14,N,9,2
^SCR("W4TOT","P",72,"HELP")

^SCR("W4TOT","P",72,"LMAX")
9
^SCR("W4TOT","P",72,"MUMPS1")

^SCR("W4TOT","P",72,"MUMPS2")

^SCR("W4TOT","P",72,"OUTPUT")

^SCR("W4TOT","P",72,"TYP")
N
^SCR("W4TOT","P",75,"CRD")
8,28,N,8,2
^SCR("W4TOT","P",75,"HELP")

^SCR("W4TOT","P",75,"LMAX")
11
^SCR("W4TOT","P",75,"MUMPS1")

^SCR("W4TOT","P",75,"MUMPS2")

^SCR("W4TOT","P",75,"OUTPUT")

^SCR("W4TOT","P",75,"TYP")
N
^SCR("W4TOT","P",78,"CRD")
8,14,N,9,2
^SCR("W4TOT","P",78,"HELP")

^SCR("W4TOT","P",78,"LMAX")
9
^SCR("W4TOT","P",78,"MUMPS1")

^SCR("W4TOT","P",78,"MUMPS2")

^SCR("W4TOT","P",78,"OUTPUT")

^SCR("W4TOT","P",78,"TYP")
N
^SCR("W4TOT","P",80,"CRD")
9,28,N,8,2
^SCR("W4TOT","P",80,"HELP")

^SCR("W4TOT","P",80,"LMAX")
11
^SCR("W4TOT","P",80,"MUMPS1")

^SCR("W4TOT","P",80,"MUMPS2")

^SCR("W4TOT","P",80,"OUTPUT")

^SCR("W4TOT","P",80,"TYP")
N
^SCR("W4TOT","P",82,"CRD")
9,14,N,9,2
^SCR("W4TOT","P",82,"HELP")

^SCR("W4TOT","P",82,"LMAX")
9
^SCR("W4TOT","P",82,"MUMPS1")

^SCR("W4TOT","P",82,"MUMPS2")

^SCR("W4TOT","P",82,"OUTPUT")

^SCR("W4TOT","P",82,"TYP")
N
^SCR("W4TOT","P",83,"CRD")
10,28,N,8,2
^SCR("W4TOT","P",83,"HELP")

^SCR("W4TOT","P",83,"LMAX")
11
^SCR("W4TOT","P",83,"MUMPS1")

^SCR("W4TOT","P",83,"MUMPS2")

^SCR("W4TOT","P",83,"OUTPUT")

^SCR("W4TOT","P",83,"TYP")
N
^SCR("W4TOT","P",84,"CRD")
10,14,N,9,2
^SCR("W4TOT","P",84,"HELP")

^SCR("W4TOT","P",84,"LMAX")
9
^SCR("W4TOT","P",84,"MUMPS1")

^SCR("W4TOT","P",84,"MUMPS2")

^SCR("W4TOT","P",84,"OUTPUT")

^SCR("W4TOT","P",84,"TYP")
N
^SCR("W4TOT","P",86,"CRD")
17,4,N,9,2
^SCR("W4TOT","P",86,"HELP")

^SCR("W4TOT","P",86,"LMAX")
9
^SCR("W4TOT","P",86,"MUMPS1")

^SCR("W4TOT","P",86,"MUMPS2")

^SCR("W4TOT","P",86,"OUTPUT")

^SCR("W4TOT","P",86,"TYP")
N
^SCR("W4TOT","P",87,"CRD")
15,1,N,10,2
^SCR("W4TOT","P",87,"HELP")

^SCR("W4TOT","P",87,"LMAX")
10
^SCR("W4TOT","P",87,"MUMPS1")

^SCR("W4TOT","P",87,"MUMPS2")

^SCR("W4TOT","P",87,"OUTPUT")

^SCR("W4TOT","P",87,"TYP")
N
^SCR("W4TOT","P",88,"CRD")
17,55,N,8,2
^SCR("W4TOT","P",88,"HELP")

^SCR("W4TOT","P",88,"LMAX")
8
^SCR("W4TOT","P",88,"MUMPS1")

^SCR("W4TOT","P",88,"MUMPS2")

^SCR("W4TOT","P",88,"OUTPUT")

^SCR("W4TOT","P",88,"TYP")
N
^SCR("W4TOT","P",89,"CRD")
17,29,N,9,2
^SCR("W4TOT","P",89,"HELP")

^SCR("W4TOT","P",89,"LMAX")
9
^SCR("W4TOT","P",89,"MUMPS1")

^SCR("W4TOT","P",89,"MUMPS2")

^SCR("W4TOT","P",89,"OUTPUT")

^SCR("W4TOT","P",89,"TYP")
N
^SCR("W4TOT","P",90,"CRD")
14,28,N,8,2
^SCR("W4TOT","P",90,"HELP")

^SCR("W4TOT","P",90,"LMAX")
11
^SCR("W4TOT","P",90,"MUMPS1")

^SCR("W4TOT","P",90,"MUMPS2")

^SCR("W4TOT","P",90,"OUTPUT")

^SCR("W4TOT","P",90,"TYP")
N
^SCR("W4TOT","P",91,"CRD")
19,68,H,65
^SCR("W4TOT","P",91,"HELP")

^SCR("W4TOT","P",91,"LMAX")
66
^SCR("W4TOT","P",91,"MUMPS1")

^SCR("W4TOT","P",91,"MUMPS2")

^SCR("W4TOT","P",91,"OUTPUT")

^SCR("W4TOT","P",91,"TYP")
H
^SCR("W4TOT","P",92,"CRD")
20,68,H,66
^SCR("W4TOT","P",92,"HELP")

^SCR("W4TOT","P",92,"LMAX")
66
^SCR("W4TOT","P",92,"MUMPS1")

^SCR("W4TOT","P",92,"MUMPS2")

^SCR("W4TOT","P",92,"OUTPUT")

^SCR("W4TOT","P",92,"TYP")
H
^SCR("W4TOT","P",93,"CRD")
21,1,E,8,0
^SCR("W4TOT","P",93,"HELP")

^SCR("W4TOT","P",93,"LMAX")
8
^SCR("W4TOT","P",93,"MUMPS1")

^SCR("W4TOT","P",93,"MUMPS2")

^SCR("W4TOT","P",93,"OUTPUT")

^SCR("W4TOT","P",93,"TYP")
E
^SCR("W4TOT","P",94,"CRD")
24,1,N,7,0
^SCR("W4TOT","P",94,"HELP")

^SCR("W4TOT","P",94,"LMAX")
7
^SCR("W4TOT","P",94,"MUMPS1")

^SCR("W4TOT","P",94,"MUMPS2")

^SCR("W4TOT","P",94,"OUTPUT")

^SCR("W4TOT","P",94,"TYP")
N
^SCR("W4TOT","P",95,"CRD")
15,13,N,10,2
^SCR("W4TOT","P",95,"HELP")

^SCR("W4TOT","P",95,"LMAX")
10
^SCR("W4TOT","P",95,"MUMPS1")

^SCR("W4TOT","P",95,"MUMPS2")

^SCR("W4TOT","P",95,"OUTPUT")

^SCR("W4TOT","P",95,"TYP")
N
^SCR("W4TOT","P",96,"CRD")
23,20,H,17
^SCR("W4TOT","P",96,"HELP")

^SCR("W4TOT","P",96,"LMAX")
17
^SCR("W4TOT","P",96,"MUMPS1")

^SCR("W4TOT","P",96,"MUMPS2")

^SCR("W4TOT","P",96,"OUTPUT")

^SCR("W4TOT","P",96,"TYP")
H
^SCR("W4TOT","P",97,"CRD")
14,14,N,9,2
^SCR("W4TOT","P",97,"HELP")

^SCR("W4TOT","P",97,"LMAX")
9
^SCR("W4TOT","P",97,"MUMPS1")

^SCR("W4TOT","P",97,"MUMPS2")

^SCR("W4TOT","P",97,"OUTPUT")

^SCR("W4TOT","P",97,"TYP")
N
^SCR("W4TOT","P",98,"CRD")
24,21,N,8,2
^SCR("W4TOT","P",98,"HELP")

^SCR("W4TOT","P",98,"LMAX")
8
^SCR("W4TOT","P",98,"MUMPS1")

^SCR("W4TOT","P",98,"MUMPS2")

^SCR("W4TOT","P",98,"OUTPUT")

^SCR("W4TOT","P",98,"TYP")
N
^SCR("W4TOT","P","NAME","AEQ")
16
^SCR("W4TOT","P","NAME","AEX")
26
^SCR("W4TOT","P","NAME","AEXS")
84
^SCR("W4TOT","P","NAME","ALPHA")
34
^SCR("W4TOT","P","NAME","ALPHAS")
37
^SCR("W4TOT","P","NAME","ALQ")
19
^SCR("W4TOT","P","NAME","ASR")
12
^SCR("W4TOT","P","NAME","BIT")
50
^SCR("W4TOT","P","NAME","BNQ")
6
^SCR("W4TOT","P","NAME","CAFUT")
62
^SCR("W4TOT","P","NAME","CAS")
95
^SCR("W4TOT","P","NAME","CASHD")
87
^SCR("W4TOT","P","NAME","CHKM")
11
^SCR("W4TOT","P","NAME","CHKMS")
67
^SCR("W4TOT","P","NAME","CHKO")
10
^SCR("W4TOT","P","NAME","CHKS")
65
^SCR("W4TOT","P","NAME","CHQ")
4
^SCR("W4TOT","P","NAME","DMSHS")
47
^SCR("W4TOT","P","NAME","DNQ")
9
^SCR("W4TOT","P","NAME","DNR")
25
^SCR("W4TOT","P","NAME","DNRS")
82
^SCR("W4TOT","P","NAME","HAEX")
83
^SCR("W4TOT","P","NAME","HALPHA")
36
^SCR("W4TOT","P","NAME","HAVT")
98
^SCR("W4TOT","P","NAME","HCHKB")
61
^SCR("W4TOT","P","NAME","HCHKO")
60
^SCR("W4TOT","P","NAME","HDNR")
80
^SCR("W4TOT","P","NAME","HISR")
70
^SCR("W4TOT","P","NAME","HJCB")
32
^SCR("W4TOT","P","NAME","HMK")
94
^SCR("W4TOT","P","NAME","HMZM")
55
^SCR("W4TOT","P","NAME","HNHCIB")
43
^SCR("W4TOT","P","NAME","HNHL")
41
^SCR("W4TOT","P","NAME","HNHS")
40
^SCR("W4TOT","P","NAME","HSHUM")
90
^SCR("W4TOT","P","NAME","HVIZ")
75
^SCR("W4TOT","P","NAME","ISQ")
7
^SCR("W4TOT","P","NAME","ISR")
15
^SCR("W4TOT","P","NAME","ISRS")
72
^SCR("W4TOT","P","NAME","JCB")
31
^SCR("W4TOT","P","NAME","JCBS")
33
^SCR("W4TOT","P","NAME","JCQ")
18
^SCR("W4TOT","P","NAME","LLS")
56
^SCR("W4TOT","P","NAME","LLT")
59
^SCR("W4TOT","P","NAME","LMAM")
51
^SCR("W4TOT","P","NAME","MAMS")
49
^SCR("W4TOT","P","NAME","MIN3")
45
^SCR("W4TOT","P","NAME","MSDAMSL")
92
^SCR("W4TOT","P","NAME","MSDMSL")
91
^SCR("W4TOT","P","NAME","MZM")
5
^SCR("W4TOT","P","NAME","MZMS")
58
^SCR("W4TOT","P","NAME","MZQ")
3
^SCR("W4TOT","P","NAME","SCIB")
88
^SCR("W4TOT","P","NAME","SCOUP")
86
^SCR("W4TOT","P","NAME","SHUM")
35
^SCR("W4TOT","P","NAME","SHUMS")
97
^SCR("W4TOT","P","NAME","SMHIRA")
14
^SCR("W4TOT","P","NAME","SMSL")
96
^SCR("W4TOT","P","NAME","SSOAD")
93
^SCR("W4TOT","P","NAME","STENB")
89
^SCR("W4TOT","P","NAME","SUMB")
52
^SCR("W4TOT","P","NAME","SUMP")
42
^SCR("W4TOT","P","NAME","TIP")
28
^SCR("W4TOT","P","NAME","TIP1")
54
^SCR("W4TOT","P","NAME","TIPPS")
30
^SCR("W4TOT","P","NAME","TIPPS1")
53
^SCR("W4TOT","P","NAME","TIQ")
21
^SCR("W4TOT","P","NAME","TL")
13
^SCR("W4TOT","P","NAME","VIZ")
20
^SCR("W4TOT","P","NAME","VIZS")
78
^SCR("W4TOT","P","NAME","VZQ")
8
^SCR("W4TOT","P","NM",3)
MZQ
^SCR("W4TOT","P","NM",4)
CHQ
^SCR("W4TOT","P","NM",5)
MZM
^SCR("W4TOT","P","NM",6)
BNQ
^SCR("W4TOT","P","NM",7)
ISQ
^SCR("W4TOT","P","NM",8)
VZQ
^SCR("W4TOT","P","NM",9)
DNQ
^SCR("W4TOT","P","NM",10)
CHKO
^SCR("W4TOT","P","NM",11)
CHKM
^SCR("W4TOT","P","NM",12)
ASR
^SCR("W4TOT","P","NM",13)
TL
^SCR("W4TOT","P","NM",14)
SMHIRA
^SCR("W4TOT","P","NM",15)
ISR
^SCR("W4TOT","P","NM",16)
AEQ
^SCR("W4TOT","P","NM",18)
JCQ
^SCR("W4TOT","P","NM",19)
ALQ
^SCR("W4TOT","P","NM",20)
VIZ
^SCR("W4TOT","P","NM",21)
TIQ
^SCR("W4TOT","P","NM",25)
DNR
^SCR("W4TOT","P","NM",26)
AEX
^SCR("W4TOT","P","NM",28)
TIP
^SCR("W4TOT","P","NM",30)
TIPPS
^SCR("W4TOT","P","NM",31)
JCB
^SCR("W4TOT","P","NM",32)
HJCB
^SCR("W4TOT","P","NM",33)
JCBS
^SCR("W4TOT","P","NM",34)
ALPHA
^SCR("W4TOT","P","NM",35)
SHUM
^SCR("W4TOT","P","NM",36)
HALPHA
^SCR("W4TOT","P","NM",37)
ALPHAS
^SCR("W4TOT","P","NM",40)
HNHS
^SCR("W4TOT","P","NM",41)
HNHL
^SCR("W4TOT","P","NM",42)
SUMP
^SCR("W4TOT","P","NM",43)
HNHCIB
^SCR("W4TOT","P","NM",45)
MIN3
^SCR("W4TOT","P","NM",47)
DMSHS
^SCR("W4TOT","P","NM",49)
MAMS
^SCR("W4TOT","P","NM",50)
BIT
^SCR("W4TOT","P","NM",51)
LMAM
^SCR("W4TOT","P","NM",52)
SUMB
^SCR("W4TOT","P","NM",53)
TIPPS1
^SCR("W4TOT","P","NM",54)
TIP1
^SCR("W4TOT","P","NM",55)
HMZM
^SCR("W4TOT","P","NM",56)
LLS
^SCR("W4TOT","P","NM",58)
MZMS
^SCR("W4TOT","P","NM",59)
LLT
^SCR("W4TOT","P","NM",60)
HCHKO
^SCR("W4TOT","P","NM",61)
HCHKB
^SCR("W4TOT","P","NM",62)
CAFUT
^SCR("W4TOT","P","NM",65)
CHKS
^SCR("W4TOT","P","NM",67)
CHKMS
^SCR("W4TOT","P","NM",70)
HISR
^SCR("W4TOT","P","NM",72)
ISRS
^SCR("W4TOT","P","NM",75)
HVIZ
^SCR("W4TOT","P","NM",78)
VIZS
^SCR("W4TOT","P","NM",80)
HDNR
^SCR("W4TOT","P","NM",82)
DNRS
^SCR("W4TOT","P","NM",83)
HAEX
^SCR("W4TOT","P","NM",84)
AEXS
^SCR("W4TOT","P","NM",86)
SCOUP
^SCR("W4TOT","P","NM",87)
CASHD
^SCR("W4TOT","P","NM",88)
SCIB
^SCR("W4TOT","P","NM",89)
STENB
^SCR("W4TOT","P","NM",90)
HSHUM
^SCR("W4TOT","P","NM",91)
MSDMSL
^SCR("W4TOT","P","NM",92)
MSDAMSL
^SCR("W4TOT","P","NM",93)
SSOAD
^SCR("W4TOT","P","NM",94)
HMK
^SCR("W4TOT","P","NM",95)
CAS
^SCR("W4TOT","P","NM",96)
SMSL
^SCR("W4TOT","P","NM",97)
SHUMS
^SCR("W4TOT","P","NM",98)
HAVT
^SCR("W4TOTLKH")
H
^SCR("W4TOTLKH",1)
                                                                               
^SCR("W4TOTLKH",2)
              ---------------------------------------------------              
^SCR("W4TOTLKH",3)
              |   k"dq  |      l a w z d  |  x k n p  |    beq  |              
^SCR("W4TOTLKH",4)
              ---------------------------------------------------              
^SCR("W4TOTLKH",5)
              {58      }|   {55        }  |  {05     }|     onefn   {03  }     
^SCR("W4TOTLKH",6)
              {65      }|   {60        }  |  {10     }|     d`gnd   {04  }     
^SCR("W4TOTLKH",7)
              {67      }|   {61        }  |  {11     }|'wpa dxard   {06  }     
^SCR("W4TOTLKH",8)
              {72      }|   {70        }  |  {15     }|   hxk`xyi   {07  }     
^SCR("W4TOTLKH",9)
              {78      }|   {75        }  |  {20     }|      dfie   {08  }     
^SCR("W4TOTLKH",10)
              {82      }|   {80        }  |  {25     }|    qxpiic   {09  }     
^SCR("W4TOTLKH",11)
              {84      }|   {83        }  |  {26     }|       AEX   {16  }     
^SCR("W4TOTLKH",12)
              {33      }|   {32        }  |  {31     }|       JCB   {18  }     
^SCR("W4TOTLKH",13)
              {37      }|   {36        }  |  {34     }|cx`w ine`l   {19  }     
^SCR("W4TOTLKH",14)
              ----------------------------------------------------             
^SCR("W4TOTLKH",15)
              {97      }|   {90        }  |{35       }|      k"dq              
^SCR("W4TOTLKH",16)
                                           {12       }|   qn 'ayg   {21  }     
^SCR("W4TOTLKH",17)
                                       [-] {51       }|iekif 'ayg   {22  }     
^SCR("W4TOTLKH",18)
                                           {56       }| gelyn 'rz   {23  }     
^SCR("W4TOTLKH",19)
                                           {52       }| ehp oeict              
^SCR("W4TOTLKH",20)
             {95       }| `"k k"dq         {49       }|      n"rn              
^SCR("W4TOTLKH",21)
             {87       }| `"k xcey         {54       }| gelyn inc              
^SCR("W4TOTLKH",22)
             {53       }|    zegpd         {50       }|   milehia              
^SCR("W4TOTLKH","A",1)

^SCR("W4TOTLKH","A",2)
---------------------------------------------------
^SCR("W4TOTLKH","A",3)
|‹"„‘|Œ�—š„|˜‹Ž�|‚…‘|
^SCR("W4TOTLKH","A",4)
---------------------------------------------------
^SCR("W4TOTLKH","A",5)
|||�Ž…†Ž
^SCR("W4TOTLKH","A",6)
|||„€‡Ž„
^SCR("W4TOTLKH","A",7)
|||'—��„˜�’„
^SCR("W4TOTLKH","A",8)
|||ˆ˜‹€˜™‰
^SCR("W4TOTLKH","A",9)
|||„†‰…
^SCR("W4TOTLKH","A",10)
|||‘˜�‰‰ƒ
^SCR("W4TOTLKH","A",11)
|||AEX
^SCR("W4TOTLKH","A",12)
|||JCB
^SCR("W4TOTLKH","A",13)
|||ƒ˜€—‰Ž…€Œ
^SCR("W4TOTLKH","A",14)
----------------------------------------------------
^SCR("W4TOTLKH","A",15)
|||‹"„‘
^SCR("W4TOTLKH","A",16)
|‘Ž'�™‡
^SCR("W4TOTLKH","A",17)
|‰…‹‰†'�™‡
^SCR("W4TOTLKH","A",18)
|‡…Œ™Ž'’š
^SCR("W4TOTLKH","A",19)
|…ˆ��…‰ƒ”
^SCR("W4TOTLKH","A",20)
|€"‹‹"„‘|Ž"’Ž
^SCR("W4TOTLKH","A",21)
|€"‹˜ƒ…™|‡…Œ™Ž‰Žƒ
^SCR("W4TOTLKH","A",22)
|š…‡�„|�‰Œ…ˆ‰�
^SCR("W4TOTLKH","AV",1)

^SCR("W4TOTLKH","AV",2)
---------------------------------------------------
^SCR("W4TOTLKH","AV",3)
|f"vx|kce,v|rfnb|dux|
^SCR("W4TOTLKH","AV",4)
---------------------------------------------------
^SCR("W4TOTLKH","AV",5)
|||inuzn
^SCR("W4TOTLKH","AV",6)
|||vtjnv
^SCR("W4TOTLKH","AV",7)
|||webcvrcgv
^SCR("W4TOTLKH","AV",8)
|||yrftrah
^SCR("W4TOTLKH","AV",9)
|||vzhu
^SCR("W4TOTLKH","AV",10)
|||xrbhhs
^SCR("W4TOTLKH","AV",11)
|||AEX
^SCR("W4TOTLKH","AV",12)
|||JCB
^SCR("W4TOTLKH","AV",13)
|||srtehnutk
^SCR("W4TOTLKH","AV",14)
----------------------------------------------------
^SCR("W4TOTLKH","AV",15)
|||f"vx
^SCR("W4TOTLKH","AV",16)
|xnwcaj
^SCR("W4TOTLKH","AV",17)
|hufhzwcaj
^SCR("W4TOTLKH","AV",18)
|jukanwg,
^SCR("W4TOTLKH","AV",19)
|uybiuhsp
^SCR("W4TOTLKH","AV",20)
|t"ff"vx|n"gn
^SCR("W4TOTLKH","AV",21)
|t"frsua|jukanhns
^SCR("W4TOTLKH","AV",22)
|,ujbv|ohkuyhc
^SCR("W4TOTLKH","NAME")

^SCR("W4TOTLKH","P",3,"CRD")
5,68,E,5,0
^SCR("W4TOTLKH","P",3,"HELP")

^SCR("W4TOTLKH","P",3,"LMAX")
5
^SCR("W4TOTLKH","P",3,"MUMPS1")

^SCR("W4TOTLKH","P",3,"MUMPS2")

^SCR("W4TOTLKH","P",3,"OUTPUT")

^SCR("W4TOTLKH","P",3,"TYP")
E
^SCR("W4TOTLKH","P",4,"CRD")
6,68,E,5,0
^SCR("W4TOTLKH","P",4,"HELP")

^SCR("W4TOTLKH","P",4,"LMAX")
5
^SCR("W4TOTLKH","P",4,"MUMPS1")

^SCR("W4TOTLKH","P",4,"MUMPS2")

^SCR("W4TOTLKH","P",4,"OUTPUT")

^SCR("W4TOTLKH","P",4,"TYP")
E
^SCR("W4TOTLKH","P",5,"CRD")
5,45,N,8,2
^SCR("W4TOTLKH","P",5,"HELP")

^SCR("W4TOTLKH","P",5,"LMAX")
8
^SCR("W4TOTLKH","P",5,"MUMPS1")

^SCR("W4TOTLKH","P",5,"MUMPS2")

^SCR("W4TOTLKH","P",5,"OUTPUT")

^SCR("W4TOTLKH","P",5,"TYP")
N
^SCR("W4TOTLKH","P",6,"CRD")
7,68,E,5,0
^SCR("W4TOTLKH","P",6,"HELP")

^SCR("W4TOTLKH","P",6,"LMAX")
5
^SCR("W4TOTLKH","P",6,"MUMPS1")

^SCR("W4TOTLKH","P",6,"MUMPS2")

^SCR("W4TOTLKH","P",6,"OUTPUT")

^SCR("W4TOTLKH","P",6,"TYP")
E
^SCR("W4TOTLKH","P",7,"CRD")
8,68,E,5,0
^SCR("W4TOTLKH","P",7,"HELP")

^SCR("W4TOTLKH","P",7,"LMAX")
5
^SCR("W4TOTLKH","P",7,"MUMPS1")

^SCR("W4TOTLKH","P",7,"MUMPS2")

^SCR("W4TOTLKH","P",7,"OUTPUT")

^SCR("W4TOTLKH","P",7,"TYP")
E
^SCR("W4TOTLKH","P",8,"CRD")
9,68,E,5,0
^SCR("W4TOTLKH","P",8,"HELP")

^SCR("W4TOTLKH","P",8,"LMAX")
5
^SCR("W4TOTLKH","P",8,"MUMPS1")

^SCR("W4TOTLKH","P",8,"MUMPS2")

^SCR("W4TOTLKH","P",8,"OUTPUT")

^SCR("W4TOTLKH","P",8,"TYP")
E
^SCR("W4TOTLKH","P",9,"CRD")
10,68,E,5,0
^SCR("W4TOTLKH","P",9,"HELP")

^SCR("W4TOTLKH","P",9,"LMAX")
5
^SCR("W4TOTLKH","P",9,"MUMPS1")

^SCR("W4TOTLKH","P",9,"MUMPS2")

^SCR("W4TOTLKH","P",9,"OUTPUT")

^SCR("W4TOTLKH","P",9,"TYP")
E
^SCR("W4TOTLKH","P",10,"CRD")
6,45,N,8,2
^SCR("W4TOTLKH","P",10,"HELP")

^SCR("W4TOTLKH","P",10,"LMAX")
8
^SCR("W4TOTLKH","P",10,"MUMPS1")

^SCR("W4TOTLKH","P",10,"MUMPS2")

^SCR("W4TOTLKH","P",10,"OUTPUT")

^SCR("W4TOTLKH","P",10,"TYP")
N
^SCR("W4TOTLKH","P",11,"CRD")
7,45,N,8,2
^SCR("W4TOTLKH","P",11,"HELP")

^SCR("W4TOTLKH","P",11,"LMAX")
8
^SCR("W4TOTLKH","P",11,"MUMPS1")

^SCR("W4TOTLKH","P",11,"MUMPS2")

^SCR("W4TOTLKH","P",11,"OUTPUT")

^SCR("W4TOTLKH","P",11,"TYP")
N
^SCR("W4TOTLKH","P",12,"CRD")
16,43,N,9,2
^SCR("W4TOTLKH","P",12,"HELP")

^SCR("W4TOTLKH","P",12,"LMAX")
10
^SCR("W4TOTLKH","P",12,"MUMPS1")

^SCR("W4TOTLKH","P",12,"MUMPS2")

^SCR("W4TOTLKH","P",12,"OUTPUT")

^SCR("W4TOTLKH","P",12,"TYP")
N
^SCR("W4TOTLKH","P",15,"CRD")
8,45,N,8,2
^SCR("W4TOTLKH","P",15,"HELP")

^SCR("W4TOTLKH","P",15,"LMAX")
8
^SCR("W4TOTLKH","P",15,"MUMPS1")

^SCR("W4TOTLKH","P",15,"MUMPS2")

^SCR("W4TOTLKH","P",15,"OUTPUT")

^SCR("W4TOTLKH","P",15,"TYP")
N
^SCR("W4TOTLKH","P",16,"CRD")
11,68,E,5,0
^SCR("W4TOTLKH","P",16,"HELP")

^SCR("W4TOTLKH","P",16,"LMAX")
5
^SCR("W4TOTLKH","P",16,"MUMPS1")

^SCR("W4TOTLKH","P",16,"MUMPS2")

^SCR("W4TOTLKH","P",16,"OUTPUT")

^SCR("W4TOTLKH","P",16,"TYP")
E
^SCR("W4TOTLKH","P",18,"CRD")
12,68,E,5,0
^SCR("W4TOTLKH","P",18,"HELP")

^SCR("W4TOTLKH","P",18,"LMAX")
5
^SCR("W4TOTLKH","P",18,"MUMPS1")

^SCR("W4TOTLKH","P",18,"MUMPS2")

^SCR("W4TOTLKH","P",18,"OUTPUT")

^SCR("W4TOTLKH","P",18,"TYP")
E
^SCR("W4TOTLKH","P",19,"CRD")
13,68,E,5,0
^SCR("W4TOTLKH","P",19,"HELP")

^SCR("W4TOTLKH","P",19,"LMAX")
5
^SCR("W4TOTLKH","P",19,"MUMPS1")

^SCR("W4TOTLKH","P",19,"MUMPS2")

^SCR("W4TOTLKH","P",19,"OUTPUT")

^SCR("W4TOTLKH","P",19,"TYP")
E
^SCR("W4TOTLKH","P",20,"CRD")
9,45,N,8,2
^SCR("W4TOTLKH","P",20,"HELP")

^SCR("W4TOTLKH","P",20,"LMAX")
8
^SCR("W4TOTLKH","P",20,"MUMPS1")

^SCR("W4TOTLKH","P",20,"MUMPS2")

^SCR("W4TOTLKH","P",20,"OUTPUT")

^SCR("W4TOTLKH","P",20,"TYP")
N
^SCR("W4TOTLKH","P",21,"CRD")
16,68,E,5,0
^SCR("W4TOTLKH","P",21,"HELP")

^SCR("W4TOTLKH","P",21,"LMAX")
5
^SCR("W4TOTLKH","P",21,"MUMPS1")

^SCR("W4TOTLKH","P",21,"MUMPS2")

^SCR("W4TOTLKH","P",21,"OUTPUT")

^SCR("W4TOTLKH","P",21,"TYP")
E
^SCR("W4TOTLKH","P",22,"CRD")
17,68,E,5,0
^SCR("W4TOTLKH","P",22,"HELP")

^SCR("W4TOTLKH","P",22,"LMAX")
5
^SCR("W4TOTLKH","P",22,"MUMPS1")

^SCR("W4TOTLKH","P",22,"MUMPS2")

^SCR("W4TOTLKH","P",22,"OUTPUT")

^SCR("W4TOTLKH","P",22,"TYP")
E
^SCR("W4TOTLKH","P",23,"CRD")
18,68,E,5,0
^SCR("W4TOTLKH","P",23,"HELP")

^SCR("W4TOTLKH","P",23,"LMAX")
5
^SCR("W4TOTLKH","P",23,"MUMPS1")

^SCR("W4TOTLKH","P",23,"MUMPS2")

^SCR("W4TOTLKH","P",23,"OUTPUT")

^SCR("W4TOTLKH","P",23,"TYP")
E
^SCR("W4TOTLKH","P",25,"CRD")
10,45,N,8,2
^SCR("W4TOTLKH","P",25,"HELP")

^SCR("W4TOTLKH","P",25,"LMAX")
8
^SCR("W4TOTLKH","P",25,"MUMPS1")

^SCR("W4TOTLKH","P",25,"MUMPS2")

^SCR("W4TOTLKH","P",25,"OUTPUT")

^SCR("W4TOTLKH","P",25,"TYP")
N
^SCR("W4TOTLKH","P",26,"CRD")
11,45,N,8,2
^SCR("W4TOTLKH","P",26,"HELP")

^SCR("W4TOTLKH","P",26,"LMAX")
8
^SCR("W4TOTLKH","P",26,"MUMPS1")

^SCR("W4TOTLKH","P",26,"MUMPS2")

^SCR("W4TOTLKH","P",26,"OUTPUT")

^SCR("W4TOTLKH","P",26,"TYP")
N
^SCR("W4TOTLKH","P",31,"CRD")
12,45,N,8,2
^SCR("W4TOTLKH","P",31,"HELP")

^SCR("W4TOTLKH","P",31,"LMAX")
8
^SCR("W4TOTLKH","P",31,"MUMPS1")

^SCR("W4TOTLKH","P",31,"MUMPS2")

^SCR("W4TOTLKH","P",31,"OUTPUT")

^SCR("W4TOTLKH","P",31,"TYP")
N
^SCR("W4TOTLKH","P",32,"CRD")
12,28,N,8,2
^SCR("W4TOTLKH","P",32,"HELP")

^SCR("W4TOTLKH","P",32,"LMAX")
11
^SCR("W4TOTLKH","P",32,"MUMPS1")

^SCR("W4TOTLKH","P",32,"MUMPS2")

^SCR("W4TOTLKH","P",32,"OUTPUT")

^SCR("W4TOTLKH","P",32,"TYP")
N
^SCR("W4TOTLKH","P",33,"CRD")
12,14,N,9,2
^SCR("W4TOTLKH","P",33,"HELP")

^SCR("W4TOTLKH","P",33,"LMAX")
9
^SCR("W4TOTLKH","P",33,"MUMPS1")

^SCR("W4TOTLKH","P",33,"MUMPS2")

^SCR("W4TOTLKH","P",33,"OUTPUT")

^SCR("W4TOTLKH","P",33,"TYP")
N
^SCR("W4TOTLKH","P",34,"CRD")
13,45,N,8,2
^SCR("W4TOTLKH","P",34,"HELP")

^SCR("W4TOTLKH","P",34,"LMAX")
8
^SCR("W4TOTLKH","P",34,"MUMPS1")

^SCR("W4TOTLKH","P",34,"MUMPS2")

^SCR("W4TOTLKH","P",34,"OUTPUT")

^SCR("W4TOTLKH","P",34,"TYP")
N
^SCR("W4TOTLKH","P",35,"CRD")
15,43,N,9,2
^SCR("W4TOTLKH","P",35,"HELP")

^SCR("W4TOTLKH","P",35,"LMAX")
10
^SCR("W4TOTLKH","P",35,"MUMPS1")

^SCR("W4TOTLKH","P",35,"MUMPS2")

^SCR("W4TOTLKH","P",35,"OUTPUT")

^SCR("W4TOTLKH","P",35,"TYP")
N
^SCR("W4TOTLKH","P",36,"CRD")
13,28,N,9,2
^SCR("W4TOTLKH","P",36,"HELP")

^SCR("W4TOTLKH","P",36,"LMAX")
11
^SCR("W4TOTLKH","P",36,"MUMPS1")

^SCR("W4TOTLKH","P",36,"MUMPS2")

^SCR("W4TOTLKH","P",36,"OUTPUT")

^SCR("W4TOTLKH","P",36,"TYP")
N
^SCR("W4TOTLKH","P",37,"CRD")
13,14,N,9,2
^SCR("W4TOTLKH","P",37,"HELP")

^SCR("W4TOTLKH","P",37,"LMAX")
9
^SCR("W4TOTLKH","P",37,"MUMPS1")

^SCR("W4TOTLKH","P",37,"MUMPS2")

^SCR("W4TOTLKH","P",37,"OUTPUT")

^SCR("W4TOTLKH","P",37,"TYP")
N
^SCR("W4TOTLKH","P",49,"CRD")
20,43,N,9,2
^SCR("W4TOTLKH","P",49,"HELP")

^SCR("W4TOTLKH","P",49,"LMAX")
10
^SCR("W4TOTLKH","P",49,"MUMPS1")

^SCR("W4TOTLKH","P",49,"MUMPS2")

^SCR("W4TOTLKH","P",49,"OUTPUT")

^SCR("W4TOTLKH","P",49,"TYP")
N
^SCR("W4TOTLKH","P",50,"CRD")
22,43,N,9,2
^SCR("W4TOTLKH","P",50,"HELP")

^SCR("W4TOTLKH","P",50,"LMAX")
10
^SCR("W4TOTLKH","P",50,"MUMPS1")

^SCR("W4TOTLKH","P",50,"MUMPS2")

^SCR("W4TOTLKH","P",50,"OUTPUT")

^SCR("W4TOTLKH","P",50,"TYP")
N
^SCR("W4TOTLKH","P",51,"CRD")
17,43,N,9,2
^SCR("W4TOTLKH","P",51,"HELP")

^SCR("W4TOTLKH","P",51,"LMAX")
10
^SCR("W4TOTLKH","P",51,"MUMPS1")

^SCR("W4TOTLKH","P",51,"MUMPS2")

^SCR("W4TOTLKH","P",51,"OUTPUT")

^SCR("W4TOTLKH","P",51,"TYP")
N
^SCR("W4TOTLKH","P",52,"CRD")
19,43,N,9,2
^SCR("W4TOTLKH","P",52,"HELP")

^SCR("W4TOTLKH","P",52,"LMAX")
10
^SCR("W4TOTLKH","P",52,"MUMPS1")

^SCR("W4TOTLKH","P",52,"MUMPS2")

^SCR("W4TOTLKH","P",52,"OUTPUT")

^SCR("W4TOTLKH","P",52,"TYP")
N
^SCR("W4TOTLKH","P",53,"CRD")
22,13,N,9,2
^SCR("W4TOTLKH","P",53,"HELP")

^SCR("W4TOTLKH","P",53,"LMAX")
10
^SCR("W4TOTLKH","P",53,"MUMPS1")

^SCR("W4TOTLKH","P",53,"MUMPS2")

^SCR("W4TOTLKH","P",53,"OUTPUT")

^SCR("W4TOTLKH","P",53,"TYP")
N
^SCR("W4TOTLKH","P",54,"CRD")
21,43,N,9,2
^SCR("W4TOTLKH","P",54,"HELP")

^SCR("W4TOTLKH","P",54,"LMAX")
10
^SCR("W4TOTLKH","P",54,"MUMPS1")

^SCR("W4TOTLKH","P",54,"MUMPS2")

^SCR("W4TOTLKH","P",54,"OUTPUT")

^SCR("W4TOTLKH","P",54,"TYP")
N
^SCR("W4TOTLKH","P",55,"CRD")
5,28,N,9,2
^SCR("W4TOTLKH","P",55,"HELP")

^SCR("W4TOTLKH","P",55,"LMAX")
11
^SCR("W4TOTLKH","P",55,"MUMPS1")

^SCR("W4TOTLKH","P",55,"MUMPS2")

^SCR("W4TOTLKH","P",55,"OUTPUT")

^SCR("W4TOTLKH","P",55,"TYP")
N
^SCR("W4TOTLKH","P",56,"CRD")
18,43,N,9,2
^SCR("W4TOTLKH","P",56,"HELP")

^SCR("W4TOTLKH","P",56,"LMAX")
10
^SCR("W4TOTLKH","P",56,"MUMPS1")

^SCR("W4TOTLKH","P",56,"MUMPS2")

^SCR("W4TOTLKH","P",56,"OUTPUT")

^SCR("W4TOTLKH","P",56,"TYP")
N
^SCR("W4TOTLKH","P",58,"CRD")
5,14,N,9,2
^SCR("W4TOTLKH","P",58,"HELP")

^SCR("W4TOTLKH","P",58,"LMAX")
9
^SCR("W4TOTLKH","P",58,"MUMPS1")

^SCR("W4TOTLKH","P",58,"MUMPS2")

^SCR("W4TOTLKH","P",58,"OUTPUT")

^SCR("W4TOTLKH","P",58,"TYP")
N
^SCR("W4TOTLKH","P",60,"CRD")
6,28,N,9,2
^SCR("W4TOTLKH","P",60,"HELP")

^SCR("W4TOTLKH","P",60,"LMAX")
11
^SCR("W4TOTLKH","P",60,"MUMPS1")

^SCR("W4TOTLKH","P",60,"MUMPS2")

^SCR("W4TOTLKH","P",60,"OUTPUT")

^SCR("W4TOTLKH","P",60,"TYP")
N
^SCR("W4TOTLKH","P",61,"CRD")
7,28,N,9,2
^SCR("W4TOTLKH","P",61,"HELP")

^SCR("W4TOTLKH","P",61,"LMAX")
11
^SCR("W4TOTLKH","P",61,"MUMPS1")

^SCR("W4TOTLKH","P",61,"MUMPS2")

^SCR("W4TOTLKH","P",61,"OUTPUT")

^SCR("W4TOTLKH","P",61,"TYP")
N
^SCR("W4TOTLKH","P",65,"CRD")
6,14,N,9,2
^SCR("W4TOTLKH","P",65,"HELP")

^SCR("W4TOTLKH","P",65,"LMAX")
9
^SCR("W4TOTLKH","P",65,"MUMPS1")

^SCR("W4TOTLKH","P",65,"MUMPS2")

^SCR("W4TOTLKH","P",65,"OUTPUT")

^SCR("W4TOTLKH","P",65,"TYP")
N
^SCR("W4TOTLKH","P",67,"CRD")
7,14,N,9,2
^SCR("W4TOTLKH","P",67,"HELP")

^SCR("W4TOTLKH","P",67,"LMAX")
9
^SCR("W4TOTLKH","P",67,"MUMPS1")

^SCR("W4TOTLKH","P",67,"MUMPS2")

^SCR("W4TOTLKH","P",67,"OUTPUT")

^SCR("W4TOTLKH","P",67,"TYP")
N
^SCR("W4TOTLKH","P",70,"CRD")
8,28,N,9,2
^SCR("W4TOTLKH","P",70,"HELP")

^SCR("W4TOTLKH","P",70,"LMAX")
11
^SCR("W4TOTLKH","P",70,"MUMPS1")

^SCR("W4TOTLKH","P",70,"MUMPS2")

^SCR("W4TOTLKH","P",70,"OUTPUT")

^SCR("W4TOTLKH","P",70,"TYP")
N
^SCR("W4TOTLKH","P",72,"CRD")
8,14,N,9,2
^SCR("W4TOTLKH","P",72,"HELP")

^SCR("W4TOTLKH","P",72,"LMAX")
9
^SCR("W4TOTLKH","P",72,"MUMPS1")

^SCR("W4TOTLKH","P",72,"MUMPS2")

^SCR("W4TOTLKH","P",72,"OUTPUT")

^SCR("W4TOTLKH","P",72,"TYP")
N
^SCR("W4TOTLKH","P",75,"CRD")
9,28,N,9,2
^SCR("W4TOTLKH","P",75,"HELP")

^SCR("W4TOTLKH","P",75,"LMAX")
11
^SCR("W4TOTLKH","P",75,"MUMPS1")

^SCR("W4TOTLKH","P",75,"MUMPS2")

^SCR("W4TOTLKH","P",75,"OUTPUT")

^SCR("W4TOTLKH","P",75,"TYP")
N
^SCR("W4TOTLKH","P",78,"CRD")
9,14,N,9,2
^SCR("W4TOTLKH","P",78,"HELP")

^SCR("W4TOTLKH","P",78,"LMAX")
9
^SCR("W4TOTLKH","P",78,"MUMPS1")

^SCR("W4TOTLKH","P",78,"MUMPS2")

^SCR("W4TOTLKH","P",78,"OUTPUT")

^SCR("W4TOTLKH","P",78,"TYP")
N
^SCR("W4TOTLKH","P",80,"CRD")
10,28,N,9,2
^SCR("W4TOTLKH","P",80,"HELP")

^SCR("W4TOTLKH","P",80,"LMAX")
11
^SCR("W4TOTLKH","P",80,"MUMPS1")

^SCR("W4TOTLKH","P",80,"MUMPS2")

^SCR("W4TOTLKH","P",80,"OUTPUT")

^SCR("W4TOTLKH","P",80,"TYP")
N
^SCR("W4TOTLKH","P",82,"CRD")
10,14,N,9,2
^SCR("W4TOTLKH","P",82,"HELP")

^SCR("W4TOTLKH","P",82,"LMAX")
9
^SCR("W4TOTLKH","P",82,"MUMPS1")

^SCR("W4TOTLKH","P",82,"MUMPS2")

^SCR("W4TOTLKH","P",82,"OUTPUT")

^SCR("W4TOTLKH","P",82,"TYP")
N
^SCR("W4TOTLKH","P",83,"CRD")
11,28,N,9,2
^SCR("W4TOTLKH","P",83,"HELP")

^SCR("W4TOTLKH","P",83,"LMAX")
11
^SCR("W4TOTLKH","P",83,"MUMPS1")

^SCR("W4TOTLKH","P",83,"MUMPS2")

^SCR("W4TOTLKH","P",83,"OUTPUT")

^SCR("W4TOTLKH","P",83,"TYP")
N
^SCR("W4TOTLKH","P",84,"CRD")
11,14,N,9,2
^SCR("W4TOTLKH","P",84,"HELP")

^SCR("W4TOTLKH","P",84,"LMAX")
9
^SCR("W4TOTLKH","P",84,"MUMPS1")

^SCR("W4TOTLKH","P",84,"MUMPS2")

^SCR("W4TOTLKH","P",84,"OUTPUT")

^SCR("W4TOTLKH","P",84,"TYP")
N
^SCR("W4TOTLKH","P",87,"CRD")
21,13,N,10,2
^SCR("W4TOTLKH","P",87,"HELP")

^SCR("W4TOTLKH","P",87,"LMAX")
10
^SCR("W4TOTLKH","P",87,"MUMPS1")

^SCR("W4TOTLKH","P",87,"MUMPS2")

^SCR("W4TOTLKH","P",87,"OUTPUT")

^SCR("W4TOTLKH","P",87,"TYP")
N
^SCR("W4TOTLKH","P",90,"CRD")
15,28,N,8,2
^SCR("W4TOTLKH","P",90,"HELP")

^SCR("W4TOTLKH","P",90,"LMAX")
11
^SCR("W4TOTLKH","P",90,"MUMPS1")

^SCR("W4TOTLKH","P",90,"MUMPS2")

^SCR("W4TOTLKH","P",90,"OUTPUT")

^SCR("W4TOTLKH","P",90,"TYP")
N
^SCR("W4TOTLKH","P",95,"CRD")
20,13,N,10,2
^SCR("W4TOTLKH","P",95,"HELP")

^SCR("W4TOTLKH","P",95,"LMAX")
10
^SCR("W4TOTLKH","P",95,"MUMPS1")

^SCR("W4TOTLKH","P",95,"MUMPS2")

^SCR("W4TOTLKH","P",95,"OUTPUT")

^SCR("W4TOTLKH","P",95,"TYP")
N
^SCR("W4TOTLKH","P",97,"CRD")
15,14,N,9,2
^SCR("W4TOTLKH","P",97,"HELP")

^SCR("W4TOTLKH","P",97,"LMAX")
9
^SCR("W4TOTLKH","P",97,"MUMPS1")

^SCR("W4TOTLKH","P",97,"MUMPS2")

^SCR("W4TOTLKH","P",97,"OUTPUT")

^SCR("W4TOTLKH","P",97,"TYP")
N
^SCR("W4TOTLKH","P","NAME","AEQ")
16
^SCR("W4TOTLKH","P","NAME","AEX")
26
^SCR("W4TOTLKH","P","NAME","AEXS")
84
^SCR("W4TOTLKH","P","NAME","ALPHA")
34
^SCR("W4TOTLKH","P","NAME","ALPHAS")
37
^SCR("W4TOTLKH","P","NAME","ALQ")
19
^SCR("W4TOTLKH","P","NAME","BIT")
50
^SCR("W4TOTLKH","P","NAME","BNQ")
6
^SCR("W4TOTLKH","P","NAME","CAS")
95
^SCR("W4TOTLKH","P","NAME","CASHD")
87
^SCR("W4TOTLKH","P","NAME","CHKB")
11
^SCR("W4TOTLKH","P","NAME","CHKBS")
67
^SCR("W4TOTLKH","P","NAME","CHKO")
10
^SCR("W4TOTLKH","P","NAME","CHKS")
65
^SCR("W4TOTLKH","P","NAME","CHQ")
4
^SCR("W4TOTLKH","P","NAME","DMSHS")
54
^SCR("W4TOTLKH","P","NAME","DNQ")
9
^SCR("W4TOTLKH","P","NAME","DNR")
25
^SCR("W4TOTLKH","P","NAME","DNRS")
82
^SCR("W4TOTLKH","P","NAME","HAEX")
83
^SCR("W4TOTLKH","P","NAME","HALPHA")
36
^SCR("W4TOTLKH","P","NAME","HB")
12
^SCR("W4TOTLKH","P","NAME","HBQ")
21
^SCR("W4TOTLKH","P","NAME","HBZ")
51
^SCR("W4TOTLKH","P","NAME","HBZQ")
22
^SCR("W4TOTLKH","P","NAME","HCHKB")
61
^SCR("W4TOTLKH","P","NAME","HCHKO")
60
^SCR("W4TOTLKH","P","NAME","HDNR")
80
^SCR("W4TOTLKH","P","NAME","HISR")
70
^SCR("W4TOTLKH","P","NAME","HJCB")
32
^SCR("W4TOTLKH","P","NAME","HMZM")
55
^SCR("W4TOTLKH","P","NAME","HNH")
53
^SCR("W4TOTLKH","P","NAME","HSHUM")
90
^SCR("W4TOTLKH","P","NAME","HVIZ")
75
^SCR("W4TOTLKH","P","NAME","ISQ")
7
^SCR("W4TOTLKH","P","NAME","ISR")
15
^SCR("W4TOTLKH","P","NAME","ISRS")
72
^SCR("W4TOTLKH","P","NAME","JCB")
31
^SCR("W4TOTLKH","P","NAME","JCBS")
33
^SCR("W4TOTLKH","P","NAME","JCQ")
18
^SCR("W4TOTLKH","P","NAME","MAMS")
49
^SCR("W4TOTLKH","P","NAME","MZM")
5
^SCR("W4TOTLKH","P","NAME","MZMS")
58
^SCR("W4TOTLKH","P","NAME","MZQ")
3
^SCR("W4TOTLKH","P","NAME","PDN")
52
^SCR("W4TOTLKH","P","NAME","SHUM")
35
^SCR("W4TOTLKH","P","NAME","SHUMS")
97
^SCR("W4TOTLKH","P","NAME","TM")
56
^SCR("W4TOTLKH","P","NAME","TMQ")
23
^SCR("W4TOTLKH","P","NAME","VIZ")
20
^SCR("W4TOTLKH","P","NAME","VIZS")
78
^SCR("W4TOTLKH","P","NAME","VZQ")
8
^SCR("W4TOTLKH","P","NM",3)
MZQ
^SCR("W4TOTLKH","P","NM",4)
CHQ
^SCR("W4TOTLKH","P","NM",5)
MZM
^SCR("W4TOTLKH","P","NM",6)
BNQ
^SCR("W4TOTLKH","P","NM",7)
ISQ
^SCR("W4TOTLKH","P","NM",8)
VZQ
^SCR("W4TOTLKH","P","NM",9)
DNQ
^SCR("W4TOTLKH","P","NM",10)
CHKO
^SCR("W4TOTLKH","P","NM",11)
CHKB
^SCR("W4TOTLKH","P","NM",12)
HB
^SCR("W4TOTLKH","P","NM",15)
ISR
^SCR("W4TOTLKH","P","NM",16)
AEQ
^SCR("W4TOTLKH","P","NM",18)
JCQ
^SCR("W4TOTLKH","P","NM",19)
ALQ
^SCR("W4TOTLKH","P","NM",20)
VIZ
^SCR("W4TOTLKH","P","NM",21)
HBQ
^SCR("W4TOTLKH","P","NM",22)
HBZQ
^SCR("W4TOTLKH","P","NM",23)
TMQ
^SCR("W4TOTLKH","P","NM",25)
DNR
^SCR("W4TOTLKH","P","NM",26)
AEX
^SCR("W4TOTLKH","P","NM",31)
JCB
^SCR("W4TOTLKH","P","NM",32)
HJCB
^SCR("W4TOTLKH","P","NM",33)
JCBS
^SCR("W4TOTLKH","P","NM",34)
ALPHA
^SCR("W4TOTLKH","P","NM",35)
SHUM
^SCR("W4TOTLKH","P","NM",36)
HALPHA
^SCR("W4TOTLKH","P","NM",37)
ALPHAS
^SCR("W4TOTLKH","P","NM",49)
MAMS
^SCR("W4TOTLKH","P","NM",50)
BIT
^SCR("W4TOTLKH","P","NM",51)
HBZ
^SCR("W4TOTLKH","P","NM",52)
PDN
^SCR("W4TOTLKH","P","NM",53)
HNH
^SCR("W4TOTLKH","P","NM",54)
DMSHS
^SCR("W4TOTLKH","P","NM",55)
HMZM
^SCR("W4TOTLKH","P","NM",56)
TM
^SCR("W4TOTLKH","P","NM",58)
MZMS
^SCR("W4TOTLKH","P","NM",60)
HCHKO
^SCR("W4TOTLKH","P","NM",61)
HCHKB
^SCR("W4TOTLKH","P","NM",65)
CHKS
^SCR("W4TOTLKH","P","NM",67)
CHKBS
^SCR("W4TOTLKH","P","NM",70)
HISR
^SCR("W4TOTLKH","P","NM",72)
ISRS
^SCR("W4TOTLKH","P","NM",75)
HVIZ
^SCR("W4TOTLKH","P","NM",78)
VIZS
^SCR("W4TOTLKH","P","NM",80)
HDNR
^SCR("W4TOTLKH","P","NM",82)
DNRS
^SCR("W4TOTLKH","P","NM",83)
HAEX
^SCR("W4TOTLKH","P","NM",84)
AEXS
^SCR("W4TOTLKH","P","NM",87)
CASHD
^SCR("W4TOTLKH","P","NM",90)
HSHUM
^SCR("W4TOTLKH","P","NM",95)
CAS
^SCR("W4TOTLKH","P","NM",97)
SHUMS
^SCR("W4TOTMT")
H
^SCR("W4TOTMT",1)
    ---------------------------------------------  ----------------------------
^SCR("W4TOTMT",2)
 |g"ya k"dq| k"dq | xry|rahn| |   k"dq  | l a w z d  |x k n p  |     beq  |    
^SCR("W4TOTMT",3)
     --------------------------------------------- ----------------------------
^SCR("W4TOTMT",4)
 {22     }         1.00  g"y  {58      }|{55      }|{05     }|     onefn {03  }
^SCR("W4TOTMT",5)
 {27     } {24   }{23 } xlec  {65      }|{60      }|{10     }|     d`gnd {04  }
^SCR("W4TOTMT",6)
 {38     } {33   }{29 } exei  {67      }|{61      }|{11     }|'wpa dxard {06  }
^SCR("W4TOTMT",7)
                              {72      }|{70      }|{15     }|   hxk`xyi {07  }
^SCR("W4TOTMT",8)
                              {78      }|{75      }|{20     }|      dfie {08  }
^SCR("W4TOTMT",9)
                              {82      }|{80      }|{25     }|    qxpiic {09  }
^SCR("W4TOTMT",10)
                              {84      }|{83      }|{26     }|   .qw`.n` {16  }
^SCR("W4TOTMT",11)
                              {37      }|{36      }|{34     }|cx`w ine`l {19  }
^SCR("W4TOTMT",12)
     ---------------------------------------------                             
^SCR("W4TOTMT",13)
                  : `"k xcey  {97      }|{90     }|{35      }| ehp oeict       
^SCR("W4TOTMT",14)
                  {87       } {95      }| `"k k"dq|{49      }|      n"rn       
^SCR("W4TOTMT",15)
                  {62       }  zeicizr zepnfda `"k|{51      }| n"rn iptl       
^SCR("W4TOTMT",16)
                                                                               
^SCR("W4TOTMT",17)
       {86      }:oetpetew k"dq {89      } : qia oz k"dq  {88     }:qeaiq k"dq 
^SCR("W4TOTMT",18)
           {14        : zexiknd k"dq  {13      } :yelz {12     }: dtwda zepnfd 
^SCR("W4TOTMT",19)
 {                                                               91}           
^SCR("W4TOTMT",20)
 {                                                               92}           
^SCR("W4TOTMT",21)
 {93     }  micreq 'qn  {45     } :miekif    {28     } {     30}    {21   }    
^SCR("W4TOTMT",22)
 {43     }: qeaiq zegpd {41     } zegewl zegpd  {40     }:mildpn zegpd         
^SCR("W4TOTMT",23)
     {              96}  {47     } : zexy inc   {42     }: mihixt zexikn       
^SCR("W4TOTMT",24)
  {94    }: w"nyg qn {98     } :dgha` {54     } :{     53}  {50     }: milehia 
^SCR("W4TOTMT",25)
                                                       {52      } : ehexa k"dq 
^SCR("W4TOTMT",26)
               {                                       56}                     
^SCR("W4TOTMT",27)
               {                                        59}                    
^SCR("W4TOTMT",28)
                                                                               
^SCR("W4TOTMT","AV",1)
-------------------------------------------------------------------------
^SCR("W4TOTMT","AV",2)
|ç"ùáë"äñ|ë"äñ|øòù|òáèî||ë"äñ|ìá÷úä|øëîð|âåñ|
^SCR("W4TOTMT","AV",3)
-------------------------------------------------------------------------
^SCR("W4TOTMT","AV",4)
1.00ç"ù|||ïîåæî
^SCR("W4TOTMT","AV",5)
øìåã|||äàçîä
^SCR("W4TOTMT","AV",6)
åøåé|||'÷ðáäøáòä
^SCR("W4TOTMT","AV",7)
|||èøëàøùé
^SCR("W4TOTMT","AV",8)
|||äæéå
^SCR("W4TOTMT","AV",9)
|||ñøðééã
^SCR("W4TOTMT","AV",10)
|||.ñ÷à.îà
^SCR("W4TOTMT","AV",11)
|||ãøà÷éîåàì
^SCR("W4TOTMT","AV",12)
---------------------------------------------
^SCR("W4TOTMT","AV",13)
:à"ëøãåù|||åèðïåéãô
^SCR("W4TOTMT","AV",14)
|à"ëë"äñ||î"òî
^SCR("W4TOTMT","AV",15)
úåéãéúòúåðîæäáà"ë||î"òîéðôì
^SCR("W4TOTMT","AV",16)

^SCR("W4TOTMT","AV",17)
:ïåôðåôå÷ë"äñ:ñéáïúë"äñ:ñåáéñë"äñ
^SCR("W4TOTMT","AV",18)
:úåøéëîäë"äñ:ùåìú:äô÷äáúåðîæä
^SCR("W4TOTMT","AV",19)

^SCR("W4TOTMT","AV",20)

^SCR("W4TOTMT","AV",21)
íéãòåñ'ñî:íéåëéæ
^SCR("W4TOTMT","AV",22)
:ñåáéñúåçðäúåçå÷ìúåçðä:íéìäðîúåçðä
^SCR("W4TOTMT","AV",23)
:úåøùéîã:íéèéøôúåøéëî
^SCR("W4TOTMT","AV",24)
:÷"îùçñî:äçèáà::íéìåèéá
^SCR("W4TOTMT","AV",25)
:åèåøáë"äñ
^SCR("W4TOTMT","AV",26)

^SCR("W4TOTMT","AV",27)

^SCR("W4TOTMT","AV",28)

^SCR("W4TOTMT","NAME")

^SCR("W4TOTMT","P",3,"CRD")
4,73,E,5,0
^SCR("W4TOTMT","P",3,"HELP")

^SCR("W4TOTMT","P",3,"LMAX")
5
^SCR("W4TOTMT","P",3,"MUMPS1")

^SCR("W4TOTMT","P",3,"MUMPS2")

^SCR("W4TOTMT","P",3,"OUTPUT")

^SCR("W4TOTMT","P",3,"TYP")
E
^SCR("W4TOTMT","P",4,"CRD")
5,73,E,5,0
^SCR("W4TOTMT","P",4,"HELP")

^SCR("W4TOTMT","P",4,"LMAX")
5
^SCR("W4TOTMT","P",4,"MUMPS1")

^SCR("W4TOTMT","P",4,"MUMPS2")

^SCR("W4TOTMT","P",4,"OUTPUT")

^SCR("W4TOTMT","P",4,"TYP")
E
^SCR("W4TOTMT","P",5,"CRD")
4,52,N,8,2
^SCR("W4TOTMT","P",5,"HELP")

^SCR("W4TOTMT","P",5,"LMAX")
8
^SCR("W4TOTMT","P",5,"MUMPS1")

^SCR("W4TOTMT","P",5,"MUMPS2")

^SCR("W4TOTMT","P",5,"OUTPUT")

^SCR("W4TOTMT","P",5,"TYP")
N
^SCR("W4TOTMT","P",6,"CRD")
6,73,E,5,0
^SCR("W4TOTMT","P",6,"HELP")

^SCR("W4TOTMT","P",6,"LMAX")
5
^SCR("W4TOTMT","P",6,"MUMPS1")

^SCR("W4TOTMT","P",6,"MUMPS2")

^SCR("W4TOTMT","P",6,"OUTPUT")

^SCR("W4TOTMT","P",6,"TYP")
E
^SCR("W4TOTMT","P",7,"CRD")
7,73,E,5,0
^SCR("W4TOTMT","P",7,"HELP")

^SCR("W4TOTMT","P",7,"LMAX")
5
^SCR("W4TOTMT","P",7,"MUMPS1")

^SCR("W4TOTMT","P",7,"MUMPS2")

^SCR("W4TOTMT","P",7,"OUTPUT")

^SCR("W4TOTMT","P",7,"TYP")
E
^SCR("W4TOTMT","P",8,"CRD")
8,73,E,5,0
^SCR("W4TOTMT","P",8,"HELP")

^SCR("W4TOTMT","P",8,"LMAX")
5
^SCR("W4TOTMT","P",8,"MUMPS1")

^SCR("W4TOTMT","P",8,"MUMPS2")

^SCR("W4TOTMT","P",8,"OUTPUT")

^SCR("W4TOTMT","P",8,"TYP")
E
^SCR("W4TOTMT","P",9,"CRD")
9,73,E,5,0
^SCR("W4TOTMT","P",9,"HELP")

^SCR("W4TOTMT","P",9,"LMAX")
5
^SCR("W4TOTMT","P",9,"MUMPS1")

^SCR("W4TOTMT","P",9,"MUMPS2")

^SCR("W4TOTMT","P",9,"OUTPUT")

^SCR("W4TOTMT","P",9,"TYP")
E
^SCR("W4TOTMT","P",10,"CRD")
5,52,N,8,2
^SCR("W4TOTMT","P",10,"HELP")

^SCR("W4TOTMT","P",10,"LMAX")
8
^SCR("W4TOTMT","P",10,"MUMPS1")

^SCR("W4TOTMT","P",10,"MUMPS2")

^SCR("W4TOTMT","P",10,"OUTPUT")

^SCR("W4TOTMT","P",10,"TYP")
N
^SCR("W4TOTMT","P",11,"CRD")
6,52,N,8,2
^SCR("W4TOTMT","P",11,"HELP")

^SCR("W4TOTMT","P",11,"LMAX")
8
^SCR("W4TOTMT","P",11,"MUMPS1")

^SCR("W4TOTMT","P",11,"MUMPS2")

^SCR("W4TOTMT","P",11,"OUTPUT")

^SCR("W4TOTMT","P",11,"TYP")
N
^SCR("W4TOTMT","P",12,"CRD")
18,55,N,8,2
^SCR("W4TOTMT","P",12,"HELP")

^SCR("W4TOTMT","P",12,"LMAX")
8
^SCR("W4TOTMT","P",12,"MUMPS1")

^SCR("W4TOTMT","P",12,"MUMPS2")

^SCR("W4TOTMT","P",12,"OUTPUT")

^SCR("W4TOTMT","P",12,"TYP")
N
^SCR("W4TOTMT","P",13,"CRD")
18,38,N,8,2
^SCR("W4TOTMT","P",13,"HELP")

^SCR("W4TOTMT","P",13,"LMAX")
9
^SCR("W4TOTMT","P",13,"MUMPS1")

^SCR("W4TOTMT","P",13,"MUMPS2")

^SCR("W4TOTMT","P",13,"OUTPUT")

^SCR("W4TOTMT","P",13,"TYP")
N
^SCR("W4TOTMT","P",14,"CRD")
18,11,N,10,2
^SCR("W4TOTMT","P",14,"HELP")

^SCR("W4TOTMT","P",14,"LMAX")
11
^SCR("W4TOTMT","P",14,"MUMPS1")

^SCR("W4TOTMT","P",14,"MUMPS2")

^SCR("W4TOTMT","P",14,"OUTPUT")

^SCR("W4TOTMT","P",14,"TYP")
N
^SCR("W4TOTMT","P",15,"CRD")
7,52,N,8,2
^SCR("W4TOTMT","P",15,"HELP")

^SCR("W4TOTMT","P",15,"LMAX")
8
^SCR("W4TOTMT","P",15,"MUMPS1")

^SCR("W4TOTMT","P",15,"MUMPS2")

^SCR("W4TOTMT","P",15,"OUTPUT")

^SCR("W4TOTMT","P",15,"TYP")
N
^SCR("W4TOTMT","P",16,"CRD")
10,73,E,5,0
^SCR("W4TOTMT","P",16,"HELP")

^SCR("W4TOTMT","P",16,"LMAX")
5
^SCR("W4TOTMT","P",16,"MUMPS1")

^SCR("W4TOTMT","P",16,"MUMPS2")

^SCR("W4TOTMT","P",16,"OUTPUT")

^SCR("W4TOTMT","P",16,"TYP")
E
^SCR("W4TOTMT","P",19,"CRD")
11,73,E,5,0
^SCR("W4TOTMT","P",19,"HELP")

^SCR("W4TOTMT","P",19,"LMAX")
5
^SCR("W4TOTMT","P",19,"MUMPS1")

^SCR("W4TOTMT","P",19,"MUMPS2")

^SCR("W4TOTMT","P",19,"OUTPUT")

^SCR("W4TOTMT","P",19,"TYP")
E
^SCR("W4TOTMT","P",20,"CRD")
8,52,N,8,2
^SCR("W4TOTMT","P",20,"HELP")

^SCR("W4TOTMT","P",20,"LMAX")
8
^SCR("W4TOTMT","P",20,"MUMPS1")

^SCR("W4TOTMT","P",20,"MUMPS2")

^SCR("W4TOTMT","P",20,"OUTPUT")

^SCR("W4TOTMT","P",20,"TYP")
N
^SCR("W4TOTMT","P",21,"CRD")
21,68,E,6,0
^SCR("W4TOTMT","P",21,"HELP")

^SCR("W4TOTMT","P",21,"LMAX")
6
^SCR("W4TOTMT","P",21,"MUMPS1")

^SCR("W4TOTMT","P",21,"MUMPS2")

^SCR("W4TOTMT","P",21,"OUTPUT")

^SCR("W4TOTMT","P",21,"TYP")
E
^SCR("W4TOTMT","P",22,"CRD")
4,1,N,7,2
^SCR("W4TOTMT","P",22,"HELP")

^SCR("W4TOTMT","P",22,"LMAX")
8
^SCR("W4TOTMT","P",22,"MUMPS1")

^SCR("W4TOTMT","P",22,"MUMPS2")

^SCR("W4TOTMT","P",22,"OUTPUT")

^SCR("W4TOTMT","P",22,"TYP")
N
^SCR("W4TOTMT","P",23,"CRD")
5,18,N,4,2
^SCR("W4TOTMT","P",23,"HELP")

^SCR("W4TOTMT","P",23,"LMAX")
4
^SCR("W4TOTMT","P",23,"MUMPS1")

^SCR("W4TOTMT","P",23,"MUMPS2")

^SCR("W4TOTMT","P",23,"TYP")
N
^SCR("W4TOTMT","P",24,"CRD")
5,11,N,6,1
^SCR("W4TOTMT","P",24,"HELP")

^SCR("W4TOTMT","P",24,"LMAX")
6
^SCR("W4TOTMT","P",24,"MUMPS1")

^SCR("W4TOTMT","P",24,"MUMPS2")

^SCR("W4TOTMT","P",24,"OUTPUT")

^SCR("W4TOTMT","P",24,"TYP")
N
^SCR("W4TOTMT","P",25,"CRD")
9,52,N,8,2
^SCR("W4TOTMT","P",25,"HELP")

^SCR("W4TOTMT","P",25,"LMAX")
8
^SCR("W4TOTMT","P",25,"MUMPS1")

^SCR("W4TOTMT","P",25,"MUMPS2")

^SCR("W4TOTMT","P",25,"OUTPUT")

^SCR("W4TOTMT","P",25,"TYP")
N
^SCR("W4TOTMT","P",26,"CRD")
10,52,N,8,2
^SCR("W4TOTMT","P",26,"HELP")

^SCR("W4TOTMT","P",26,"LMAX")
8
^SCR("W4TOTMT","P",26,"MUMPS1")

^SCR("W4TOTMT","P",26,"MUMPS2")

^SCR("W4TOTMT","P",26,"OUTPUT")

^SCR("W4TOTMT","P",26,"TYP")
N
^SCR("W4TOTMT","P",27,"CRD")
5,1,N,8,2
^SCR("W4TOTMT","P",27,"HELP")

^SCR("W4TOTMT","P",27,"LMAX")
8
^SCR("W4TOTMT","P",27,"MUMPS1")

^SCR("W4TOTMT","P",27,"MUMPS2")

^SCR("W4TOTMT","P",27,"OUTPUT")

^SCR("W4TOTMT","P",27,"TYP")
N
^SCR("W4TOTMT","P",28,"CRD")
21,45,N,8,2
^SCR("W4TOTMT","P",28,"HELP")

^SCR("W4TOTMT","P",28,"LMAX")
8
^SCR("W4TOTMT","P",28,"MUMPS1")

^SCR("W4TOTMT","P",28,"MUMPS2")

^SCR("W4TOTMT","P",28,"TYP")
N
^SCR("W4TOTMT","P",29,"CRD")
6,18,N,4,2
^SCR("W4TOTMT","P",29,"HELP")

^SCR("W4TOTMT","P",29,"LMAX")
4
^SCR("W4TOTMT","P",29,"MUMPS1")

^SCR("W4TOTMT","P",29,"MUMPS2")

^SCR("W4TOTMT","P",29,"OUTPUT")

^SCR("W4TOTMT","P",29,"TYP")
N
^SCR("W4TOTMT","P",30,"CRD")
21,64,H,8
^SCR("W4TOTMT","P",30,"HELP")

^SCR("W4TOTMT","P",30,"LMAX")
8
^SCR("W4TOTMT","P",30,"MUMPS1")

^SCR("W4TOTMT","P",30,"MUMPS2")

^SCR("W4TOTMT","P",30,"OUTPUT")

^SCR("W4TOTMT","P",30,"TYP")
H
^SCR("W4TOTMT","P",33,"CRD")
6,11,N,6,1
^SCR("W4TOTMT","P",33,"HELP")

^SCR("W4TOTMT","P",33,"LMAX")
6
^SCR("W4TOTMT","P",33,"MUMPS1")

^SCR("W4TOTMT","P",33,"MUMPS2")

^SCR("W4TOTMT","P",33,"TYP")
N
^SCR("W4TOTMT","P",34,"CRD")
11,52,N,8,2
^SCR("W4TOTMT","P",34,"HELP")

^SCR("W4TOTMT","P",34,"LMAX")
8
^SCR("W4TOTMT","P",34,"MUMPS1")

^SCR("W4TOTMT","P",34,"MUMPS2")

^SCR("W4TOTMT","P",34,"OUTPUT")

^SCR("W4TOTMT","P",34,"TYP")
N
^SCR("W4TOTMT","P",35,"CRD")
13,51,N,9,2
^SCR("W4TOTMT","P",35,"HELP")

^SCR("W4TOTMT","P",35,"LMAX")
9
^SCR("W4TOTMT","P",35,"MUMPS1")

^SCR("W4TOTMT","P",35,"MUMPS2")

^SCR("W4TOTMT","P",35,"OUTPUT")

^SCR("W4TOTMT","P",35,"TYP")
N
^SCR("W4TOTMT","P",36,"CRD")
11,41,N,9,2
^SCR("W4TOTMT","P",36,"HELP")

^SCR("W4TOTMT","P",36,"LMAX")
9
^SCR("W4TOTMT","P",36,"MUMPS1")

^SCR("W4TOTMT","P",36,"MUMPS2")

^SCR("W4TOTMT","P",36,"OUTPUT")

^SCR("W4TOTMT","P",36,"TYP")
N
^SCR("W4TOTMT","P",37,"CRD")
11,30,N,9,2
^SCR("W4TOTMT","P",37,"HELP")

^SCR("W4TOTMT","P",37,"LMAX")
9
^SCR("W4TOTMT","P",37,"MUMPS1")

^SCR("W4TOTMT","P",37,"MUMPS2")

^SCR("W4TOTMT","P",37,"OUTPUT")

^SCR("W4TOTMT","P",37,"TYP")
N
^SCR("W4TOTMT","P",38,"CRD")
6,1,N,8,2
^SCR("W4TOTMT","P",38,"HELP")

^SCR("W4TOTMT","P",38,"LMAX")
8
^SCR("W4TOTMT","P",38,"MUMPS1")

^SCR("W4TOTMT","P",38,"MUMPS2")

^SCR("W4TOTMT","P",38,"OUTPUT")

^SCR("W4TOTMT","P",38,"TYP")
N
^SCR("W4TOTMT","P",40,"CRD")
22,48,N,8,2
^SCR("W4TOTMT","P",40,"HELP")

^SCR("W4TOTMT","P",40,"LMAX")
8
^SCR("W4TOTMT","P",40,"MUMPS1")

^SCR("W4TOTMT","P",40,"MUMPS2")

^SCR("W4TOTMT","P",40,"OUTPUT")

^SCR("W4TOTMT","P",40,"TYP")
N
^SCR("W4TOTMT","P",41,"CRD")
22,24,N,8,2
^SCR("W4TOTMT","P",41,"HELP")

^SCR("W4TOTMT","P",41,"LMAX")
8
^SCR("W4TOTMT","P",41,"MUMPS1")

^SCR("W4TOTMT","P",41,"MUMPS2")

^SCR("W4TOTMT","P",41,"OUTPUT")

^SCR("W4TOTMT","P",41,"TYP")
N
^SCR("W4TOTMT","P",42,"CRD")
23,48,N,8,2
^SCR("W4TOTMT","P",42,"HELP")

^SCR("W4TOTMT","P",42,"LMAX")
8
^SCR("W4TOTMT","P",42,"MUMPS1")

^SCR("W4TOTMT","P",42,"MUMPS2")

^SCR("W4TOTMT","P",42,"OUTPUT")

^SCR("W4TOTMT","P",42,"TYP")
N
^SCR("W4TOTMT","P",43,"CRD")
22,1,N,8,2
^SCR("W4TOTMT","P",43,"HELP")

^SCR("W4TOTMT","P",43,"LMAX")
8
^SCR("W4TOTMT","P",43,"MUMPS1")

^SCR("W4TOTMT","P",43,"MUMPS2")

^SCR("W4TOTMT","P",43,"OUTPUT")

^SCR("W4TOTMT","P",43,"TYP")
N
^SCR("W4TOTMT","P",45,"CRD")
21,24,N,8,2
^SCR("W4TOTMT","P",45,"HELP")

^SCR("W4TOTMT","P",45,"LMAX")
8
^SCR("W4TOTMT","P",45,"MUMPS1")

^SCR("W4TOTMT","P",45,"MUMPS2")

^SCR("W4TOTMT","P",45,"OUTPUT")

^SCR("W4TOTMT","P",45,"TYP")
N
^SCR("W4TOTMT","P",47,"CRD")
23,25,N,8,2
^SCR("W4TOTMT","P",47,"HELP")

^SCR("W4TOTMT","P",47,"LMAX")
8
^SCR("W4TOTMT","P",47,"MUMPS1")

^SCR("W4TOTMT","P",47,"MUMPS2")

^SCR("W4TOTMT","P",47,"OUTPUT")

^SCR("W4TOTMT","P",47,"TYP")
N
^SCR("W4TOTMT","P",49,"CRD")
14,51,N,8,2
^SCR("W4TOTMT","P",49,"HELP")

^SCR("W4TOTMT","P",49,"LMAX")
9
^SCR("W4TOTMT","P",49,"MUMPS1")

^SCR("W4TOTMT","P",49,"MUMPS2")

^SCR("W4TOTMT","P",49,"OUTPUT")

^SCR("W4TOTMT","P",49,"TYP")
N
^SCR("W4TOTMT","P",50,"CRD")
24,60,N,8,2
^SCR("W4TOTMT","P",50,"HELP")

^SCR("W4TOTMT","P",50,"LMAX")
8
^SCR("W4TOTMT","P",50,"MUMPS1")

^SCR("W4TOTMT","P",50,"MUMPS2")

^SCR("W4TOTMT","P",50,"OUTPUT")

^SCR("W4TOTMT","P",50,"TYP")
N
^SCR("W4TOTMT","P",51,"CRD")
15,51,N,8,2
^SCR("W4TOTMT","P",51,"HELP")

^SCR("W4TOTMT","P",51,"LMAX")
9
^SCR("W4TOTMT","P",51,"MUMPS1")

^SCR("W4TOTMT","P",51,"MUMPS2")

^SCR("W4TOTMT","P",51,"OUTPUT")

^SCR("W4TOTMT","P",51,"TYP")
N
^SCR("W4TOTMT","P",52,"CRD")
25,55,N,9,2
^SCR("W4TOTMT","P",52,"HELP")

^SCR("W4TOTMT","P",52,"LMAX")
9
^SCR("W4TOTMT","P",52,"MUMPS1")

^SCR("W4TOTMT","P",52,"MUMPS2")

^SCR("W4TOTMT","P",52,"OUTPUT")

^SCR("W4TOTMT","P",52,"TYP")
N
^SCR("W4TOTMT","P",53,"CRD")
24,58,H,8
^SCR("W4TOTMT","P",53,"HELP")

^SCR("W4TOTMT","P",53,"LMAX")
8
^SCR("W4TOTMT","P",53,"MUMPS1")

^SCR("W4TOTMT","P",53,"MUMPS2")

^SCR("W4TOTMT","P",53,"OUTPUT")

^SCR("W4TOTMT","P",53,"TYP")
H
^SCR("W4TOTMT","P",54,"CRD")
24,38,N,8,2
^SCR("W4TOTMT","P",54,"HELP")

^SCR("W4TOTMT","P",54,"LMAX")
8
^SCR("W4TOTMT","P",54,"MUMPS1")

^SCR("W4TOTMT","P",54,"MUMPS2")

^SCR("W4TOTMT","P",54,"OUTPUT")

^SCR("W4TOTMT","P",54,"TYP")
N
^SCR("W4TOTMT","P",55,"CRD")
4,41,N,8,2
^SCR("W4TOTMT","P",55,"HELP")

^SCR("W4TOTMT","P",55,"LMAX")
9
^SCR("W4TOTMT","P",55,"MUMPS1")

^SCR("W4TOTMT","P",55,"MUMPS2")

^SCR("W4TOTMT","P",55,"OUTPUT")

^SCR("W4TOTMT","P",55,"TYP")
N
^SCR("W4TOTMT","P",56,"CRD")
26,58,H,42
^SCR("W4TOTMT","P",56,"HELP")

^SCR("W4TOTMT","P",56,"LMAX")
42
^SCR("W4TOTMT","P",56,"MUMPS1")

^SCR("W4TOTMT","P",56,"MUMPS2")

^SCR("W4TOTMT","P",56,"OUTPUT")

^SCR("W4TOTMT","P",56,"TYP")
H
^SCR("W4TOTMT","P",58,"CRD")
4,30,N,9,2
^SCR("W4TOTMT","P",58,"HELP")

^SCR("W4TOTMT","P",58,"LMAX")
9
^SCR("W4TOTMT","P",58,"MUMPS1")

^SCR("W4TOTMT","P",58,"MUMPS2")

^SCR("W4TOTMT","P",58,"OUTPUT")

^SCR("W4TOTMT","P",58,"TYP")
N
^SCR("W4TOTMT","P",59,"CRD")
27,59,H,43
^SCR("W4TOTMT","P",59,"HELP")

^SCR("W4TOTMT","P",59,"LMAX")
43
^SCR("W4TOTMT","P",59,"MUMPS1")

^SCR("W4TOTMT","P",59,"MUMPS2")

^SCR("W4TOTMT","P",59,"OUTPUT")

^SCR("W4TOTMT","P",59,"TYP")
H
^SCR("W4TOTMT","P",60,"CRD")
5,41,N,8,2
^SCR("W4TOTMT","P",60,"HELP")

^SCR("W4TOTMT","P",60,"LMAX")
9
^SCR("W4TOTMT","P",60,"MUMPS1")

^SCR("W4TOTMT","P",60,"MUMPS2")

^SCR("W4TOTMT","P",60,"OUTPUT")

^SCR("W4TOTMT","P",60,"TYP")
N
^SCR("W4TOTMT","P",61,"CRD")
6,41,N,8,2
^SCR("W4TOTMT","P",61,"HELP")

^SCR("W4TOTMT","P",61,"LMAX")
9
^SCR("W4TOTMT","P",61,"MUMPS1")

^SCR("W4TOTMT","P",61,"MUMPS2")

^SCR("W4TOTMT","P",61,"OUTPUT")

^SCR("W4TOTMT","P",61,"TYP")
N
^SCR("W4TOTMT","P",62,"CRD")
15,18,N,8,2
^SCR("W4TOTMT","P",62,"HELP")

^SCR("W4TOTMT","P",62,"LMAX")
10
^SCR("W4TOTMT","P",62,"MUMPS1")

^SCR("W4TOTMT","P",62,"MUMPS2")

^SCR("W4TOTMT","P",62,"OUTPUT")

^SCR("W4TOTMT","P",62,"TYP")
N
^SCR("W4TOTMT","P",65,"CRD")
5,30,N,9,2
^SCR("W4TOTMT","P",65,"HELP")

^SCR("W4TOTMT","P",65,"LMAX")
9
^SCR("W4TOTMT","P",65,"MUMPS1")

^SCR("W4TOTMT","P",65,"MUMPS2")

^SCR("W4TOTMT","P",65,"OUTPUT")

^SCR("W4TOTMT","P",65,"TYP")
N
^SCR("W4TOTMT","P",67,"CRD")
6,30,N,9,2
^SCR("W4TOTMT","P",67,"HELP")

^SCR("W4TOTMT","P",67,"LMAX")
9
^SCR("W4TOTMT","P",67,"MUMPS1")

^SCR("W4TOTMT","P",67,"MUMPS2")

^SCR("W4TOTMT","P",67,"TYP")
N
^SCR("W4TOTMT","P",70,"CRD")
7,41,N,8,2
^SCR("W4TOTMT","P",70,"HELP")

^SCR("W4TOTMT","P",70,"LMAX")
9
^SCR("W4TOTMT","P",70,"MUMPS1")

^SCR("W4TOTMT","P",70,"MUMPS2")

^SCR("W4TOTMT","P",70,"OUTPUT")

^SCR("W4TOTMT","P",70,"TYP")
N
^SCR("W4TOTMT","P",72,"CRD")
7,30,N,9,2
^SCR("W4TOTMT","P",72,"HELP")

^SCR("W4TOTMT","P",72,"LMAX")
9
^SCR("W4TOTMT","P",72,"MUMPS1")

^SCR("W4TOTMT","P",72,"MUMPS2")

^SCR("W4TOTMT","P",72,"OUTPUT")

^SCR("W4TOTMT","P",72,"TYP")
N
^SCR("W4TOTMT","P",75,"CRD")
8,41,N,8,2
^SCR("W4TOTMT","P",75,"HELP")

^SCR("W4TOTMT","P",75,"LMAX")
9
^SCR("W4TOTMT","P",75,"MUMPS1")

^SCR("W4TOTMT","P",75,"MUMPS2")

^SCR("W4TOTMT","P",75,"OUTPUT")

^SCR("W4TOTMT","P",75,"TYP")
N
^SCR("W4TOTMT","P",78,"CRD")
8,30,N,9,2
^SCR("W4TOTMT","P",78,"HELP")

^SCR("W4TOTMT","P",78,"LMAX")
9
^SCR("W4TOTMT","P",78,"MUMPS1")

^SCR("W4TOTMT","P",78,"MUMPS2")

^SCR("W4TOTMT","P",78,"OUTPUT")

^SCR("W4TOTMT","P",78,"TYP")
N
^SCR("W4TOTMT","P",80,"CRD")
9,41,N,8,2
^SCR("W4TOTMT","P",80,"HELP")

^SCR("W4TOTMT","P",80,"LMAX")
9
^SCR("W4TOTMT","P",80,"MUMPS1")

^SCR("W4TOTMT","P",80,"MUMPS2")

^SCR("W4TOTMT","P",80,"OUTPUT")

^SCR("W4TOTMT","P",80,"TYP")
N
^SCR("W4TOTMT","P",82,"CRD")
9,30,N,9,2
^SCR("W4TOTMT","P",82,"HELP")

^SCR("W4TOTMT","P",82,"LMAX")
9
^SCR("W4TOTMT","P",82,"MUMPS1")

^SCR("W4TOTMT","P",82,"MUMPS2")

^SCR("W4TOTMT","P",82,"OUTPUT")

^SCR("W4TOTMT","P",82,"TYP")
N
^SCR("W4TOTMT","P",83,"CRD")
10,41,N,8,2
^SCR("W4TOTMT","P",83,"HELP")

^SCR("W4TOTMT","P",83,"LMAX")
9
^SCR("W4TOTMT","P",83,"MUMPS1")

^SCR("W4TOTMT","P",83,"MUMPS2")

^SCR("W4TOTMT","P",83,"OUTPUT")

^SCR("W4TOTMT","P",83,"TYP")
N
^SCR("W4TOTMT","P",84,"CRD")
10,30,N,9,2
^SCR("W4TOTMT","P",84,"HELP")

^SCR("W4TOTMT","P",84,"LMAX")
9
^SCR("W4TOTMT","P",84,"MUMPS1")

^SCR("W4TOTMT","P",84,"MUMPS2")

^SCR("W4TOTMT","P",84,"OUTPUT")

^SCR("W4TOTMT","P",84,"TYP")
N
^SCR("W4TOTMT","P",86,"CRD")
17,7,N,9,2
^SCR("W4TOTMT","P",86,"HELP")

^SCR("W4TOTMT","P",86,"LMAX")
9
^SCR("W4TOTMT","P",86,"MUMPS1")

^SCR("W4TOTMT","P",86,"MUMPS2")

^SCR("W4TOTMT","P",86,"OUTPUT")

^SCR("W4TOTMT","P",86,"TYP")
N
^SCR("W4TOTMT","P",87,"CRD")
14,18,N,10,2
^SCR("W4TOTMT","P",87,"HELP")

^SCR("W4TOTMT","P",87,"LMAX")
10
^SCR("W4TOTMT","P",87,"MUMPS1")

^SCR("W4TOTMT","P",87,"MUMPS2")

^SCR("W4TOTMT","P",87,"OUTPUT")

^SCR("W4TOTMT","P",87,"TYP")
N
^SCR("W4TOTMT","P",88,"CRD")
17,58,N,8,2
^SCR("W4TOTMT","P",88,"HELP")

^SCR("W4TOTMT","P",88,"LMAX")
8
^SCR("W4TOTMT","P",88,"MUMPS1")

^SCR("W4TOTMT","P",88,"MUMPS2")

^SCR("W4TOTMT","P",88,"OUTPUT")

^SCR("W4TOTMT","P",88,"TYP")
N
^SCR("W4TOTMT","P",89,"CRD")
17,32,N,9,2
^SCR("W4TOTMT","P",89,"HELP")

^SCR("W4TOTMT","P",89,"LMAX")
9
^SCR("W4TOTMT","P",89,"MUMPS1")

^SCR("W4TOTMT","P",89,"MUMPS2")

^SCR("W4TOTMT","P",89,"OUTPUT")

^SCR("W4TOTMT","P",89,"TYP")
N
^SCR("W4TOTMT","P",90,"CRD")
13,41,N,8,2
^SCR("W4TOTMT","P",90,"HELP")

^SCR("W4TOTMT","P",90,"LMAX")
8
^SCR("W4TOTMT","P",90,"MUMPS1")

^SCR("W4TOTMT","P",90,"MUMPS2")

^SCR("W4TOTMT","P",90,"OUTPUT")

^SCR("W4TOTMT","P",90,"TYP")
N
^SCR("W4TOTMT","P",91,"CRD")
19,68,H,65
^SCR("W4TOTMT","P",91,"HELP")

^SCR("W4TOTMT","P",91,"LMAX")
66
^SCR("W4TOTMT","P",91,"MUMPS1")

^SCR("W4TOTMT","P",91,"MUMPS2")

^SCR("W4TOTMT","P",91,"OUTPUT")

^SCR("W4TOTMT","P",91,"TYP")
H
^SCR("W4TOTMT","P",92,"CRD")
20,68,H,66
^SCR("W4TOTMT","P",92,"HELP")

^SCR("W4TOTMT","P",92,"LMAX")
66
^SCR("W4TOTMT","P",92,"MUMPS1")

^SCR("W4TOTMT","P",92,"MUMPS2")

^SCR("W4TOTMT","P",92,"OUTPUT")

^SCR("W4TOTMT","P",92,"TYP")
H
^SCR("W4TOTMT","P",93,"CRD")
21,1,E,8,0
^SCR("W4TOTMT","P",93,"HELP")

^SCR("W4TOTMT","P",93,"LMAX")
8
^SCR("W4TOTMT","P",93,"MUMPS1")

^SCR("W4TOTMT","P",93,"MUMPS2")

^SCR("W4TOTMT","P",93,"OUTPUT")

^SCR("W4TOTMT","P",93,"TYP")
E
^SCR("W4TOTMT","P",94,"CRD")
24,2,N,7,0
^SCR("W4TOTMT","P",94,"HELP")

^SCR("W4TOTMT","P",94,"LMAX")
7
^SCR("W4TOTMT","P",94,"MUMPS1")

^SCR("W4TOTMT","P",94,"MUMPS2")

^SCR("W4TOTMT","P",94,"OUTPUT")

^SCR("W4TOTMT","P",94,"TYP")
N
^SCR("W4TOTMT","P",95,"CRD")
14,30,N,9,2
^SCR("W4TOTMT","P",95,"HELP")

^SCR("W4TOTMT","P",95,"LMAX")
9
^SCR("W4TOTMT","P",95,"MUMPS1")

^SCR("W4TOTMT","P",95,"MUMPS2")

^SCR("W4TOTMT","P",95,"OUTPUT")

^SCR("W4TOTMT","P",95,"TYP")
N
^SCR("W4TOTMT","P",96,"CRD")
23,23,H,17
^SCR("W4TOTMT","P",96,"HELP")

^SCR("W4TOTMT","P",96,"LMAX")
17
^SCR("W4TOTMT","P",96,"MUMPS1")

^SCR("W4TOTMT","P",96,"MUMPS2")

^SCR("W4TOTMT","P",96,"OUTPUT")

^SCR("W4TOTMT","P",96,"TYP")
H
^SCR("W4TOTMT","P",97,"CRD")
13,30,N,9,2
^SCR("W4TOTMT","P",97,"HELP")

^SCR("W4TOTMT","P",97,"LMAX")
9
^SCR("W4TOTMT","P",97,"MUMPS1")

^SCR("W4TOTMT","P",97,"MUMPS2")

^SCR("W4TOTMT","P",97,"OUTPUT")

^SCR("W4TOTMT","P",97,"TYP")
N
^SCR("W4TOTMT","P",98,"CRD")
24,21,N,8,2
^SCR("W4TOTMT","P",98,"HELP")

^SCR("W4TOTMT","P",98,"LMAX")
8
^SCR("W4TOTMT","P",98,"MUMPS1")

^SCR("W4TOTMT","P",98,"MUMPS2")

^SCR("W4TOTMT","P",98,"OUTPUT")

^SCR("W4TOTMT","P",98,"TYP")
N
^SCR("W4TOTMT","P","NAME","AEQ")
16
^SCR("W4TOTMT","P","NAME","AEX")
26
^SCR("W4TOTMT","P","NAME","AEXS")
84
^SCR("W4TOTMT","P","NAME","ALPHA")
34
^SCR("W4TOTMT","P","NAME","ALPHAS")
37
^SCR("W4TOTMT","P","NAME","ALQ")
19
^SCR("W4TOTMT","P","NAME","ASR")
12
^SCR("W4TOTMT","P","NAME","BIT")
50
^SCR("W4TOTMT","P","NAME","BNQ")
6
^SCR("W4TOTMT","P","NAME","CAFUT")
62
^SCR("W4TOTMT","P","NAME","CAS")
95
^SCR("W4TOTMT","P","NAME","CASHD")
87
^SCR("W4TOTMT","P","NAME","CHKM")
11
^SCR("W4TOTMT","P","NAME","CHKMS")
67
^SCR("W4TOTMT","P","NAME","CHKO")
10
^SCR("W4TOTMT","P","NAME","CHKS")
65
^SCR("W4TOTMT","P","NAME","CHQ")
4
^SCR("W4TOTMT","P","NAME","DMSHS")
47
^SCR("W4TOTMT","P","NAME","DNQ")
9
^SCR("W4TOTMT","P","NAME","DNR")
25
^SCR("W4TOTMT","P","NAME","DNRS")
82
^SCR("W4TOTMT","P","NAME","HAEX")
83
^SCR("W4TOTMT","P","NAME","HALPHA")
36
^SCR("W4TOTMT","P","NAME","HAVT")
98
^SCR("W4TOTMT","P","NAME","HCHKB")
61
^SCR("W4TOTMT","P","NAME","HCHKO")
60
^SCR("W4TOTMT","P","NAME","HDNR")
80
^SCR("W4TOTMT","P","NAME","HISR")
70
^SCR("W4TOTMT","P","NAME","HMK")
94
^SCR("W4TOTMT","P","NAME","HMZM")
55
^SCR("W4TOTMT","P","NAME","HNHCIB")
43
^SCR("W4TOTMT","P","NAME","HNHL")
41
^SCR("W4TOTMT","P","NAME","HNHS")
40
^SCR("W4TOTMT","P","NAME","HSHUM")
90
^SCR("W4TOTMT","P","NAME","HVIZ")
75
^SCR("W4TOTMT","P","NAME","ISQ")
7
^SCR("W4TOTMT","P","NAME","ISR")
15
^SCR("W4TOTMT","P","NAME","ISRS")
72
^SCR("W4TOTMT","P","NAME","LLS")
56
^SCR("W4TOTMT","P","NAME","LLT")
59
^SCR("W4TOTMT","P","NAME","LMAM")
51
^SCR("W4TOTMT","P","NAME","MAMS")
49
^SCR("W4TOTMT","P","NAME","MIN3")
45
^SCR("W4TOTMT","P","NAME","MSDAMSL")
92
^SCR("W4TOTMT","P","NAME","MSDMSL")
91
^SCR("W4TOTMT","P","NAME","MZM")
5
^SCR("W4TOTMT","P","NAME","MZMS")
58
^SCR("W4TOTMT","P","NAME","MZQ")
3
^SCR("W4TOTMT","P","NAME","SCIB")
88
^SCR("W4TOTMT","P","NAME","SCOUP")
86
^SCR("W4TOTMT","P","NAME","SHAAR2")
23
^SCR("W4TOTMT","P","NAME","SHAAR3")
29
^SCR("W4TOTMT","P","NAME","SHUM")
35
^SCR("W4TOTMT","P","NAME","SHUMS")
97
^SCR("W4TOTMT","P","NAME","SMHIRA")
14
^SCR("W4TOTMT","P","NAME","SMSL")
96
^SCR("W4TOTMT","P","NAME","SSOAD")
93
^SCR("W4TOTMT","P","NAME","STENB")
89
^SCR("W4TOTMT","P","NAME","SUMB")
52
^SCR("W4TOTMT","P","NAME","SUMMTB2")
24
^SCR("W4TOTMT","P","NAME","SUMMTB3")
33
^SCR("W4TOTMT","P","NAME","SUMMTS1")
22
^SCR("W4TOTMT","P","NAME","SUMMTS2")
27
^SCR("W4TOTMT","P","NAME","SUMMTS3")
38
^SCR("W4TOTMT","P","NAME","SUMP")
42
^SCR("W4TOTMT","P","NAME","TIP")
28
^SCR("W4TOTMT","P","NAME","TIP1")
54
^SCR("W4TOTMT","P","NAME","TIPPS")
30
^SCR("W4TOTMT","P","NAME","TIPPS1")
53
^SCR("W4TOTMT","P","NAME","TIQ")
21
^SCR("W4TOTMT","P","NAME","TL")
13
^SCR("W4TOTMT","P","NAME","VIZ")
20
^SCR("W4TOTMT","P","NAME","VIZS")
78
^SCR("W4TOTMT","P","NAME","VZQ")
8
^SCR("W4TOTMT","P","NM",3)
MZQ
^SCR("W4TOTMT","P","NM",4)
CHQ
^SCR("W4TOTMT","P","NM",5)
MZM
^SCR("W4TOTMT","P","NM",6)
BNQ
^SCR("W4TOTMT","P","NM",7)
ISQ
^SCR("W4TOTMT","P","NM",8)
VZQ
^SCR("W4TOTMT","P","NM",9)
DNQ
^SCR("W4TOTMT","P","NM",10)
CHKO
^SCR("W4TOTMT","P","NM",11)
CHKM
^SCR("W4TOTMT","P","NM",12)
ASR
^SCR("W4TOTMT","P","NM",13)
TL
^SCR("W4TOTMT","P","NM",14)
SMHIRA
^SCR("W4TOTMT","P","NM",15)
ISR
^SCR("W4TOTMT","P","NM",16)
AEQ
^SCR("W4TOTMT","P","NM",19)
ALQ
^SCR("W4TOTMT","P","NM",20)
VIZ
^SCR("W4TOTMT","P","NM",21)
TIQ
^SCR("W4TOTMT","P","NM",22)
SUMMTS1
^SCR("W4TOTMT","P","NM",23)
SHAAR2
^SCR("W4TOTMT","P","NM",24)
SUMMTB2
^SCR("W4TOTMT","P","NM",25)
DNR
^SCR("W4TOTMT","P","NM",26)
AEX
^SCR("W4TOTMT","P","NM",27)
SUMMTS2
^SCR("W4TOTMT","P","NM",28)
TIP
^SCR("W4TOTMT","P","NM",29)
SHAAR3
^SCR("W4TOTMT","P","NM",30)
TIPPS
^SCR("W4TOTMT","P","NM",33)
SUMMTB3
^SCR("W4TOTMT","P","NM",34)
ALPHA
^SCR("W4TOTMT","P","NM",35)
SHUM
^SCR("W4TOTMT","P","NM",36)
HALPHA
^SCR("W4TOTMT","P","NM",37)
ALPHAS
^SCR("W4TOTMT","P","NM",38)
SUMMTS3
^SCR("W4TOTMT","P","NM",40)
HNHS
^SCR("W4TOTMT","P","NM",41)
HNHL
^SCR("W4TOTMT","P","NM",42)
SUMP
^SCR("W4TOTMT","P","NM",43)
HNHCIB
^SCR("W4TOTMT","P","NM",45)
MIN3
^SCR("W4TOTMT","P","NM",47)
DMSHS
^SCR("W4TOTMT","P","NM",49)
MAMS
^SCR("W4TOTMT","P","NM",50)
BIT
^SCR("W4TOTMT","P","NM",51)
LMAM
^SCR("W4TOTMT","P","NM",52)
SUMB
^SCR("W4TOTMT","P","NM",53)
TIPPS1
^SCR("W4TOTMT","P","NM",54)
TIP1
^SCR("W4TOTMT","P","NM",55)
HMZM
^SCR("W4TOTMT","P","NM",56)
LLS
^SCR("W4TOTMT","P","NM",58)
MZMS
^SCR("W4TOTMT","P","NM",59)
LLT
^SCR("W4TOTMT","P","NM",60)
HCHKO
^SCR("W4TOTMT","P","NM",61)
HCHKB
^SCR("W4TOTMT","P","NM",62)
CAFUT
^SCR("W4TOTMT","P","NM",65)
CHKS
^SCR("W4TOTMT","P","NM",67)
CHKMS
^SCR("W4TOTMT","P","NM",70)
HISR
^SCR("W4TOTMT","P","NM",72)
ISRS
^SCR("W4TOTMT","P","NM",75)
HVIZ
^SCR("W4TOTMT","P","NM",78)
VIZS
^SCR("W4TOTMT","P","NM",80)
HDNR
^SCR("W4TOTMT","P","NM",82)
DNRS
^SCR("W4TOTMT","P","NM",83)
HAEX
^SCR("W4TOTMT","P","NM",84)
AEXS
^SCR("W4TOTMT","P","NM",86)
SCOUP
^SCR("W4TOTMT","P","NM",87)
CASHD
^SCR("W4TOTMT","P","NM",88)
SCIB
^SCR("W4TOTMT","P","NM",89)
STENB
^SCR("W4TOTMT","P","NM",90)
HSHUM
^SCR("W4TOTMT","P","NM",91)
MSDMSL
^SCR("W4TOTMT","P","NM",92)
MSDAMSL
^SCR("W4TOTMT","P","NM",93)
SSOAD
^SCR("W4TOTMT","P","NM",94)
HMK
^SCR("W4TOTMT","P","NM",95)
CAS
^SCR("W4TOTMT","P","NM",96)
SMSL
^SCR("W4TOTMT","P","NM",97)
SHUMS
^SCR("W4TOTMT","P","NM",98)
HAVT
^SCR("W4TOTNO")
H
^SCR("W4TOTNO",1)
              ---------------------------------------------------              
^SCR("W4TOTNO",2)
              |   k"dq  |      l a w z d  |  x k n p  |    beq  |              
^SCR("W4TOTNO",3)
              ---------------------------------------------------              
^SCR("W4TOTNO",4)
              {58      }|   {55        }  |  {05     }|     onefn   {03   }    
^SCR("W4TOTNO",5)
              {65      }|   {60        }  |  {10     }|     d`gnd   {04   }    
^SCR("W4TOTNO",6)
              {67      }|   {61        }  |  {11     }|'wpa dxard   {06   }    
^SCR("W4TOTNO",7)
              {72      }|   {70        }  |  {15     }|   hxk`xyi   {07   }    
^SCR("W4TOTNO",8)
              {78      }|   {75        }  |  {20     }|      dfie   {08   }    
^SCR("W4TOTNO",9)
              {82      }|   {80        }  |  {25     }|    qxpiic   {09   }    
^SCR("W4TOTNO",10)
              {84      }|   {83        }  |  {26     }|       AEX   {16   }    
^SCR("W4TOTNO",11)
              {33      }|   {32        }  |  {31     }|       JCB   {18   }    
^SCR("W4TOTNO",12)
              {37      }|   {36        }  |  {34     }|cx`w ine`l   {19   }    
^SCR("W4TOTNO",13)
              ----------------------------------------------------             
^SCR("W4TOTNO",14)
  : `"k xcey  {97      }|   {90        }  | {35      }| ehp oeict              
^SCR("W4TOTNO",15)
 {87       } {95       }| `"k k"dq           {49     }|      n"rn              
^SCR("W4TOTNO",16)
   {89      }: qia oz k"dq {88      }: qeaiq k"dq  {51     }| n"rn iptl        
^SCR("W4TOTNO",17)
   {86      }:oetpetew k"dq                                                    
^SCR("W4TOTNO",18)
 {14        : zexiknd k"dq  {13      } :yelz {12     }: dtwda zepnfd           
^SCR("W4TOTNO",19)
 {                                                               91}{       00}
^SCR("W4TOTNO",20)
 {                                                               92}{       00}
^SCR("W4TOTNO",21)
                              {93     }  micreq 'qn  {45     } :miekif         
^SCR("W4TOTNO",22)
 {43     }: qeaiq zegpd {41     } zegewl zegpd  {40     }:mildpn zegpd         
^SCR("W4TOTNO",23)
  {              96}  {47     } : zexy inc   {42     }: mihixt zexikn          
^SCR("W4TOTNO",24)
    {94      } w"nyg   {98       } : dghad         {50     }: milehia          
^SCR("W4TOTNO",25)
                                              {52      } : ehexa k"dq          
^SCR("W4TOTNO",26)
                                   {                                        56}
^SCR("W4TOTNO",27)
                                   {                                        59}
^SCR("W4TOTNO","AV",1)
---------------------------------------------------
^SCR("W4TOTNO","AV",2)
|ë"äñ|ìá÷úä|øëîð|âåñ|
^SCR("W4TOTNO","AV",3)
---------------------------------------------------
^SCR("W4TOTNO","AV",4)
|||ïîåæî
^SCR("W4TOTNO","AV",5)
|||äàçîä
^SCR("W4TOTNO","AV",6)
|||'÷ðáäøáòä
^SCR("W4TOTNO","AV",7)
|||èøëàøùé
^SCR("W4TOTNO","AV",8)
|||äæéå
^SCR("W4TOTNO","AV",9)
|||ñøðééã
^SCR("W4TOTNO","AV",10)
|||AEX
^SCR("W4TOTNO","AV",11)
|||JCB
^SCR("W4TOTNO","AV",12)
|||ãøà÷éîåàì
^SCR("W4TOTNO","AV",13)
----------------------------------------------------
^SCR("W4TOTNO","AV",14)
:à"ëøãåù|||åèðïåéãô
^SCR("W4TOTNO","AV",15)
|à"ëë"äñ|î"òî
^SCR("W4TOTNO","AV",16)
:ñéáïúë"äñ:ñåáéñë"äñ|î"òîéðôì
^SCR("W4TOTNO","AV",17)
:ïåôðåôå÷ë"äñ
^SCR("W4TOTNO","AV",18)
:úåøéëîäë"äñ:ùåìú:äô÷äáúåðîæä
^SCR("W4TOTNO","AV",19)

^SCR("W4TOTNO","AV",20)

^SCR("W4TOTNO","AV",21)
íéãòåñ'ñî:íéåëéæ
^SCR("W4TOTNO","AV",22)
:ñåáéñúåçðäúåçå÷ìúåçðä:íéìäðîúåçðä
^SCR("W4TOTNO","AV",23)
:úåøùéîã:íéèéøôúåøéëî
^SCR("W4TOTNO","AV",24)
÷"îùç:äçèáä:íéìåèéá
^SCR("W4TOTNO","AV",25)
:åèåøáë"äñ
^SCR("W4TOTNO","AV",26)

^SCR("W4TOTNO","AV",27)

^SCR("W4TOTNO","NAME")

^SCR("W4TOTNO","P",3,"CRD")
4,68,E,6,0
^SCR("W4TOTNO","P",3,"HELP")

^SCR("W4TOTNO","P",3,"LMAX")
6
^SCR("W4TOTNO","P",3,"MUMPS1")

^SCR("W4TOTNO","P",3,"MUMPS2")

^SCR("W4TOTNO","P",3,"OUTPUT")

^SCR("W4TOTNO","P",3,"TYP")
E
^SCR("W4TOTNO","P",4,"CRD")
5,68,E,6,0
^SCR("W4TOTNO","P",4,"HELP")

^SCR("W4TOTNO","P",4,"LMAX")
6
^SCR("W4TOTNO","P",4,"MUMPS1")

^SCR("W4TOTNO","P",4,"MUMPS2")

^SCR("W4TOTNO","P",4,"OUTPUT")

^SCR("W4TOTNO","P",4,"TYP")
E
^SCR("W4TOTNO","P",5,"CRD")
4,45,N,8,2
^SCR("W4TOTNO","P",5,"HELP")

^SCR("W4TOTNO","P",5,"LMAX")
8
^SCR("W4TOTNO","P",5,"MUMPS1")

^SCR("W4TOTNO","P",5,"MUMPS2")

^SCR("W4TOTNO","P",5,"OUTPUT")

^SCR("W4TOTNO","P",5,"TYP")
N
^SCR("W4TOTNO","P",6,"CRD")
6,68,E,6,0
^SCR("W4TOTNO","P",6,"HELP")

^SCR("W4TOTNO","P",6,"LMAX")
6
^SCR("W4TOTNO","P",6,"MUMPS1")

^SCR("W4TOTNO","P",6,"MUMPS2")

^SCR("W4TOTNO","P",6,"OUTPUT")

^SCR("W4TOTNO","P",6,"TYP")
E
^SCR("W4TOTNO","P",7,"CRD")
7,68,E,6,0
^SCR("W4TOTNO","P",7,"HELP")

^SCR("W4TOTNO","P",7,"LMAX")
6
^SCR("W4TOTNO","P",7,"MUMPS1")

^SCR("W4TOTNO","P",7,"MUMPS2")

^SCR("W4TOTNO","P",7,"OUTPUT")

^SCR("W4TOTNO","P",7,"TYP")
E
^SCR("W4TOTNO","P",8,"CRD")
8,68,E,6,0
^SCR("W4TOTNO","P",8,"HELP")

^SCR("W4TOTNO","P",8,"LMAX")
6
^SCR("W4TOTNO","P",8,"MUMPS1")

^SCR("W4TOTNO","P",8,"MUMPS2")

^SCR("W4TOTNO","P",8,"OUTPUT")

^SCR("W4TOTNO","P",8,"TYP")
E
^SCR("W4TOTNO","P",9,"CRD")
9,68,E,6,0
^SCR("W4TOTNO","P",9,"HELP")

^SCR("W4TOTNO","P",9,"LMAX")
6
^SCR("W4TOTNO","P",9,"MUMPS1")

^SCR("W4TOTNO","P",9,"MUMPS2")

^SCR("W4TOTNO","P",9,"OUTPUT")

^SCR("W4TOTNO","P",9,"TYP")
E
^SCR("W4TOTNO","P",10,"CRD")
5,45,N,8,2
^SCR("W4TOTNO","P",10,"HELP")

^SCR("W4TOTNO","P",10,"LMAX")
8
^SCR("W4TOTNO","P",10,"MUMPS1")

^SCR("W4TOTNO","P",10,"MUMPS2")

^SCR("W4TOTNO","P",10,"OUTPUT")

^SCR("W4TOTNO","P",10,"TYP")
N
^SCR("W4TOTNO","P",11,"CRD")
6,45,N,8,2
^SCR("W4TOTNO","P",11,"HELP")

^SCR("W4TOTNO","P",11,"LMAX")
8
^SCR("W4TOTNO","P",11,"MUMPS1")

^SCR("W4TOTNO","P",11,"MUMPS2")

^SCR("W4TOTNO","P",11,"OUTPUT")

^SCR("W4TOTNO","P",11,"TYP")
N
^SCR("W4TOTNO","P",12,"CRD")
18,45,N,8,2
^SCR("W4TOTNO","P",12,"HELP")

^SCR("W4TOTNO","P",12,"LMAX")
8
^SCR("W4TOTNO","P",12,"MUMPS1")

^SCR("W4TOTNO","P",12,"MUMPS2")

^SCR("W4TOTNO","P",12,"OUTPUT")

^SCR("W4TOTNO","P",12,"TYP")
N
^SCR("W4TOTNO","P",13,"CRD")
18,28,N,8,2
^SCR("W4TOTNO","P",13,"HELP")

^SCR("W4TOTNO","P",13,"LMAX")
9
^SCR("W4TOTNO","P",13,"MUMPS1")

^SCR("W4TOTNO","P",13,"MUMPS2")

^SCR("W4TOTNO","P",13,"OUTPUT")

^SCR("W4TOTNO","P",13,"TYP")
N
^SCR("W4TOTNO","P",14,"CRD")
18,1,N,10,2
^SCR("W4TOTNO","P",14,"HELP")

^SCR("W4TOTNO","P",14,"LMAX")
11
^SCR("W4TOTNO","P",14,"MUMPS1")

^SCR("W4TOTNO","P",14,"MUMPS2")

^SCR("W4TOTNO","P",14,"OUTPUT")

^SCR("W4TOTNO","P",14,"TYP")
N
^SCR("W4TOTNO","P",15,"CRD")
7,45,N,8,2
^SCR("W4TOTNO","P",15,"HELP")

^SCR("W4TOTNO","P",15,"LMAX")
8
^SCR("W4TOTNO","P",15,"MUMPS1")

^SCR("W4TOTNO","P",15,"MUMPS2")

^SCR("W4TOTNO","P",15,"OUTPUT")

^SCR("W4TOTNO","P",15,"TYP")
N
^SCR("W4TOTNO","P",16,"CRD")
10,68,E,6,0
^SCR("W4TOTNO","P",16,"HELP")

^SCR("W4TOTNO","P",16,"LMAX")
6
^SCR("W4TOTNO","P",16,"MUMPS1")

^SCR("W4TOTNO","P",16,"MUMPS2")

^SCR("W4TOTNO","P",16,"OUTPUT")

^SCR("W4TOTNO","P",16,"TYP")
E
^SCR("W4TOTNO","P",18,"CRD")
11,68,E,6,0
^SCR("W4TOTNO","P",18,"HELP")

^SCR("W4TOTNO","P",18,"LMAX")
6
^SCR("W4TOTNO","P",18,"MUMPS1")

^SCR("W4TOTNO","P",18,"MUMPS2")

^SCR("W4TOTNO","P",18,"OUTPUT")

^SCR("W4TOTNO","P",18,"TYP")
E
^SCR("W4TOTNO","P",19,"CRD")
12,68,E,6,0
^SCR("W4TOTNO","P",19,"HELP")

^SCR("W4TOTNO","P",19,"LMAX")
6
^SCR("W4TOTNO","P",19,"MUMPS1")

^SCR("W4TOTNO","P",19,"MUMPS2")

^SCR("W4TOTNO","P",19,"OUTPUT")

^SCR("W4TOTNO","P",19,"TYP")
E
^SCR("W4TOTNO","P",20,"CRD")
8,45,N,8,2
^SCR("W4TOTNO","P",20,"HELP")

^SCR("W4TOTNO","P",20,"LMAX")
8
^SCR("W4TOTNO","P",20,"MUMPS1")

^SCR("W4TOTNO","P",20,"MUMPS2")

^SCR("W4TOTNO","P",20,"OUTPUT")

^SCR("W4TOTNO","P",20,"TYP")
N
^SCR("W4TOTNO","P",25,"CRD")
9,45,N,8,2
^SCR("W4TOTNO","P",25,"HELP")

^SCR("W4TOTNO","P",25,"LMAX")
8
^SCR("W4TOTNO","P",25,"MUMPS1")

^SCR("W4TOTNO","P",25,"MUMPS2")

^SCR("W4TOTNO","P",25,"OUTPUT")

^SCR("W4TOTNO","P",25,"TYP")
N
^SCR("W4TOTNO","P",26,"CRD")
10,45,N,8,2
^SCR("W4TOTNO","P",26,"HELP")

^SCR("W4TOTNO","P",26,"LMAX")
8
^SCR("W4TOTNO","P",26,"MUMPS1")

^SCR("W4TOTNO","P",26,"MUMPS2")

^SCR("W4TOTNO","P",26,"OUTPUT")

^SCR("W4TOTNO","P",26,"TYP")
N
^SCR("W4TOTNO","P",31,"CRD")
11,45,N,8,2
^SCR("W4TOTNO","P",31,"HELP")

^SCR("W4TOTNO","P",31,"LMAX")
8
^SCR("W4TOTNO","P",31,"MUMPS1")

^SCR("W4TOTNO","P",31,"MUMPS2")

^SCR("W4TOTNO","P",31,"OUTPUT")

^SCR("W4TOTNO","P",31,"TYP")
N
^SCR("W4TOTNO","P",32,"CRD")
11,28,N,8,2
^SCR("W4TOTNO","P",32,"HELP")

^SCR("W4TOTNO","P",32,"LMAX")
11
^SCR("W4TOTNO","P",32,"MUMPS1")

^SCR("W4TOTNO","P",32,"MUMPS2")

^SCR("W4TOTNO","P",32,"OUTPUT")

^SCR("W4TOTNO","P",32,"TYP")
N
^SCR("W4TOTNO","P",33,"CRD")
11,14,N,9,2
^SCR("W4TOTNO","P",33,"HELP")

^SCR("W4TOTNO","P",33,"LMAX")
9
^SCR("W4TOTNO","P",33,"MUMPS1")

^SCR("W4TOTNO","P",33,"MUMPS2")

^SCR("W4TOTNO","P",33,"OUTPUT")

^SCR("W4TOTNO","P",33,"TYP")
N
^SCR("W4TOTNO","P",34,"CRD")
12,45,N,8,2
^SCR("W4TOTNO","P",34,"HELP")

^SCR("W4TOTNO","P",34,"LMAX")
8
^SCR("W4TOTNO","P",34,"MUMPS1")

^SCR("W4TOTNO","P",34,"MUMPS2")

^SCR("W4TOTNO","P",34,"OUTPUT")

^SCR("W4TOTNO","P",34,"TYP")
N
^SCR("W4TOTNO","P",35,"CRD")
14,44,N,9,2
^SCR("W4TOTNO","P",35,"HELP")

^SCR("W4TOTNO","P",35,"LMAX")
9
^SCR("W4TOTNO","P",35,"MUMPS1")

^SCR("W4TOTNO","P",35,"MUMPS2")

^SCR("W4TOTNO","P",35,"OUTPUT")

^SCR("W4TOTNO","P",35,"TYP")
N
^SCR("W4TOTNO","P",36,"CRD")
12,28,N,9,2
^SCR("W4TOTNO","P",36,"HELP")

^SCR("W4TOTNO","P",36,"LMAX")
11
^SCR("W4TOTNO","P",36,"MUMPS1")

^SCR("W4TOTNO","P",36,"MUMPS2")

^SCR("W4TOTNO","P",36,"OUTPUT")

^SCR("W4TOTNO","P",36,"TYP")
N
^SCR("W4TOTNO","P",37,"CRD")
12,14,N,9,2
^SCR("W4TOTNO","P",37,"HELP")

^SCR("W4TOTNO","P",37,"LMAX")
9
^SCR("W4TOTNO","P",37,"MUMPS1")

^SCR("W4TOTNO","P",37,"MUMPS2")

^SCR("W4TOTNO","P",37,"OUTPUT")

^SCR("W4TOTNO","P",37,"TYP")
N
^SCR("W4TOTNO","P",40,"CRD")
22,48,N,8,2
^SCR("W4TOTNO","P",40,"HELP")

^SCR("W4TOTNO","P",40,"LMAX")
8
^SCR("W4TOTNO","P",40,"MUMPS1")

^SCR("W4TOTNO","P",40,"MUMPS2")

^SCR("W4TOTNO","P",40,"OUTPUT")

^SCR("W4TOTNO","P",40,"TYP")
N
^SCR("W4TOTNO","P",41,"CRD")
22,24,N,8,2
^SCR("W4TOTNO","P",41,"HELP")

^SCR("W4TOTNO","P",41,"LMAX")
8
^SCR("W4TOTNO","P",41,"MUMPS1")

^SCR("W4TOTNO","P",41,"MUMPS2")

^SCR("W4TOTNO","P",41,"OUTPUT")

^SCR("W4TOTNO","P",41,"TYP")
N
^SCR("W4TOTNO","P",42,"CRD")
23,45,N,8,2
^SCR("W4TOTNO","P",42,"HELP")

^SCR("W4TOTNO","P",42,"LMAX")
8
^SCR("W4TOTNO","P",42,"MUMPS1")

^SCR("W4TOTNO","P",42,"MUMPS2")

^SCR("W4TOTNO","P",42,"OUTPUT")

^SCR("W4TOTNO","P",42,"TYP")
N
^SCR("W4TOTNO","P",43,"CRD")
22,1,N,8,2
^SCR("W4TOTNO","P",43,"HELP")

^SCR("W4TOTNO","P",43,"LMAX")
8
^SCR("W4TOTNO","P",43,"MUMPS1")

^SCR("W4TOTNO","P",43,"MUMPS2")

^SCR("W4TOTNO","P",43,"OUTPUT")

^SCR("W4TOTNO","P",43,"TYP")
N
^SCR("W4TOTNO","P",45,"CRD")
21,53,N,8,2
^SCR("W4TOTNO","P",45,"HELP")

^SCR("W4TOTNO","P",45,"LMAX")
8
^SCR("W4TOTNO","P",45,"MUMPS1")

^SCR("W4TOTNO","P",45,"MUMPS2")

^SCR("W4TOTNO","P",45,"OUTPUT")

^SCR("W4TOTNO","P",45,"TYP")
N
^SCR("W4TOTNO","P",47,"CRD")
23,22,N,8,2
^SCR("W4TOTNO","P",47,"HELP")

^SCR("W4TOTNO","P",47,"LMAX")
8
^SCR("W4TOTNO","P",47,"MUMPS1")

^SCR("W4TOTNO","P",47,"MUMPS2")

^SCR("W4TOTNO","P",47,"OUTPUT")

^SCR("W4TOTNO","P",47,"TYP")
N
^SCR("W4TOTNO","P",49,"CRD")
15,45,N,8,2
^SCR("W4TOTNO","P",49,"HELP")

^SCR("W4TOTNO","P",49,"LMAX")
8
^SCR("W4TOTNO","P",49,"MUMPS1")

^SCR("W4TOTNO","P",49,"MUMPS2")

^SCR("W4TOTNO","P",49,"OUTPUT")

^SCR("W4TOTNO","P",49,"TYP")
N
^SCR("W4TOTNO","P",50,"CRD")
24,51,N,8,2
^SCR("W4TOTNO","P",50,"HELP")

^SCR("W4TOTNO","P",50,"LMAX")
8
^SCR("W4TOTNO","P",50,"MUMPS1")

^SCR("W4TOTNO","P",50,"MUMPS2")

^SCR("W4TOTNO","P",50,"OUTPUT")

^SCR("W4TOTNO","P",50,"TYP")
N
^SCR("W4TOTNO","P",51,"CRD")
16,51,N,8,2
^SCR("W4TOTNO","P",51,"HELP")

^SCR("W4TOTNO","P",51,"LMAX")
8
^SCR("W4TOTNO","P",51,"MUMPS1")

^SCR("W4TOTNO","P",51,"MUMPS2")

^SCR("W4TOTNO","P",51,"OUTPUT")

^SCR("W4TOTNO","P",51,"TYP")
N
^SCR("W4TOTNO","P",52,"CRD")
25,46,N,9,2
^SCR("W4TOTNO","P",52,"HELP")

^SCR("W4TOTNO","P",52,"LMAX")
9
^SCR("W4TOTNO","P",52,"MUMPS1")

^SCR("W4TOTNO","P",52,"MUMPS2")

^SCR("W4TOTNO","P",52,"OUTPUT")

^SCR("W4TOTNO","P",52,"TYP")
N
^SCR("W4TOTNO","P",55,"CRD")
4,28,N,8,2
^SCR("W4TOTNO","P",55,"HELP")

^SCR("W4TOTNO","P",55,"LMAX")
11
^SCR("W4TOTNO","P",55,"MUMPS1")

^SCR("W4TOTNO","P",55,"MUMPS2")

^SCR("W4TOTNO","P",55,"OUTPUT")

^SCR("W4TOTNO","P",55,"TYP")
N
^SCR("W4TOTNO","P",56,"CRD")
26,79,H,43
^SCR("W4TOTNO","P",56,"HELP")

^SCR("W4TOTNO","P",56,"LMAX")
43
^SCR("W4TOTNO","P",56,"MUMPS1")

^SCR("W4TOTNO","P",56,"MUMPS2")

^SCR("W4TOTNO","P",56,"OUTPUT")

^SCR("W4TOTNO","P",56,"TYP")
H
^SCR("W4TOTNO","P",58,"CRD")
4,14,N,9,2
^SCR("W4TOTNO","P",58,"HELP")

^SCR("W4TOTNO","P",58,"LMAX")
9
^SCR("W4TOTNO","P",58,"MUMPS1")

^SCR("W4TOTNO","P",58,"MUMPS2")

^SCR("W4TOTNO","P",58,"OUTPUT")

^SCR("W4TOTNO","P",58,"TYP")
N
^SCR("W4TOTNO","P",59,"CRD")
27,79,H,43
^SCR("W4TOTNO","P",59,"HELP")

^SCR("W4TOTNO","P",59,"LMAX")
43
^SCR("W4TOTNO","P",59,"MUMPS1")

^SCR("W4TOTNO","P",59,"MUMPS2")

^SCR("W4TOTNO","P",59,"OUTPUT")

^SCR("W4TOTNO","P",59,"TYP")
H
^SCR("W4TOTNO","P",60,"CRD")
5,28,N,8,2
^SCR("W4TOTNO","P",60,"HELP")

^SCR("W4TOTNO","P",60,"LMAX")
11
^SCR("W4TOTNO","P",60,"MUMPS1")

^SCR("W4TOTNO","P",60,"MUMPS2")

^SCR("W4TOTNO","P",60,"OUTPUT")

^SCR("W4TOTNO","P",60,"TYP")
N
^SCR("W4TOTNO","P",61,"CRD")
6,28,N,8,2
^SCR("W4TOTNO","P",61,"HELP")

^SCR("W4TOTNO","P",61,"LMAX")
11
^SCR("W4TOTNO","P",61,"MUMPS1")

^SCR("W4TOTNO","P",61,"MUMPS2")

^SCR("W4TOTNO","P",61,"OUTPUT")

^SCR("W4TOTNO","P",61,"TYP")
N
^SCR("W4TOTNO","P",65,"CRD")
5,14,N,9,2
^SCR("W4TOTNO","P",65,"HELP")

^SCR("W4TOTNO","P",65,"LMAX")
9
^SCR("W4TOTNO","P",65,"MUMPS1")

^SCR("W4TOTNO","P",65,"MUMPS2")

^SCR("W4TOTNO","P",65,"OUTPUT")

^SCR("W4TOTNO","P",65,"TYP")
N
^SCR("W4TOTNO","P",67,"CRD")
6,14,N,9,2
^SCR("W4TOTNO","P",67,"HELP")

^SCR("W4TOTNO","P",67,"LMAX")
9
^SCR("W4TOTNO","P",67,"MUMPS1")

^SCR("W4TOTNO","P",67,"MUMPS2")

^SCR("W4TOTNO","P",67,"TYP")
N
^SCR("W4TOTNO","P",70,"CRD")
7,28,N,8,2
^SCR("W4TOTNO","P",70,"HELP")

^SCR("W4TOTNO","P",70,"LMAX")
11
^SCR("W4TOTNO","P",70,"MUMPS1")

^SCR("W4TOTNO","P",70,"MUMPS2")

^SCR("W4TOTNO","P",70,"OUTPUT")

^SCR("W4TOTNO","P",70,"TYP")
N
^SCR("W4TOTNO","P",72,"CRD")
7,14,N,9,2
^SCR("W4TOTNO","P",72,"HELP")

^SCR("W4TOTNO","P",72,"LMAX")
9
^SCR("W4TOTNO","P",72,"MUMPS1")

^SCR("W4TOTNO","P",72,"MUMPS2")

^SCR("W4TOTNO","P",72,"OUTPUT")

^SCR("W4TOTNO","P",72,"TYP")
N
^SCR("W4TOTNO","P",75,"CRD")
8,28,N,8,2
^SCR("W4TOTNO","P",75,"HELP")

^SCR("W4TOTNO","P",75,"LMAX")
11
^SCR("W4TOTNO","P",75,"MUMPS1")

^SCR("W4TOTNO","P",75,"MUMPS2")

^SCR("W4TOTNO","P",75,"OUTPUT")

^SCR("W4TOTNO","P",75,"TYP")
N
^SCR("W4TOTNO","P",78,"CRD")
8,14,N,9,2
^SCR("W4TOTNO","P",78,"HELP")

^SCR("W4TOTNO","P",78,"LMAX")
9
^SCR("W4TOTNO","P",78,"MUMPS1")

^SCR("W4TOTNO","P",78,"MUMPS2")

^SCR("W4TOTNO","P",78,"OUTPUT")

^SCR("W4TOTNO","P",78,"TYP")
N
^SCR("W4TOTNO","P",80,"CRD")
9,28,N,8,2
^SCR("W4TOTNO","P",80,"HELP")

^SCR("W4TOTNO","P",80,"LMAX")
11
^SCR("W4TOTNO","P",80,"MUMPS1")

^SCR("W4TOTNO","P",80,"MUMPS2")

^SCR("W4TOTNO","P",80,"OUTPUT")

^SCR("W4TOTNO","P",80,"TYP")
N
^SCR("W4TOTNO","P",82,"CRD")
9,14,N,9,2
^SCR("W4TOTNO","P",82,"HELP")

^SCR("W4TOTNO","P",82,"LMAX")
9
^SCR("W4TOTNO","P",82,"MUMPS1")

^SCR("W4TOTNO","P",82,"MUMPS2")

^SCR("W4TOTNO","P",82,"OUTPUT")

^SCR("W4TOTNO","P",82,"TYP")
N
^SCR("W4TOTNO","P",83,"CRD")
10,28,N,8,2
^SCR("W4TOTNO","P",83,"HELP")

^SCR("W4TOTNO","P",83,"LMAX")
11
^SCR("W4TOTNO","P",83,"MUMPS1")

^SCR("W4TOTNO","P",83,"MUMPS2")

^SCR("W4TOTNO","P",83,"OUTPUT")

^SCR("W4TOTNO","P",83,"TYP")
N
^SCR("W4TOTNO","P",84,"CRD")
10,14,N,9,2
^SCR("W4TOTNO","P",84,"HELP")

^SCR("W4TOTNO","P",84,"LMAX")
9
^SCR("W4TOTNO","P",84,"MUMPS1")

^SCR("W4TOTNO","P",84,"MUMPS2")

^SCR("W4TOTNO","P",84,"OUTPUT")

^SCR("W4TOTNO","P",84,"TYP")
N
^SCR("W4TOTNO","P",86,"CRD")
17,3,N,9,2
^SCR("W4TOTNO","P",86,"HELP")

^SCR("W4TOTNO","P",86,"LMAX")
9
^SCR("W4TOTNO","P",86,"MUMPS1")

^SCR("W4TOTNO","P",86,"MUMPS2")

^SCR("W4TOTNO","P",86,"OUTPUT")

^SCR("W4TOTNO","P",86,"TYP")
N
^SCR("W4TOTNO","P",87,"CRD")
15,1,N,10,2
^SCR("W4TOTNO","P",87,"HELP")

^SCR("W4TOTNO","P",87,"LMAX")
10
^SCR("W4TOTNO","P",87,"MUMPS1")

^SCR("W4TOTNO","P",87,"MUMPS2")

^SCR("W4TOTNO","P",87,"OUTPUT")

^SCR("W4TOTNO","P",87,"TYP")
N
^SCR("W4TOTNO","P",88,"CRD")
16,27,N,9,2
^SCR("W4TOTNO","P",88,"HELP")

^SCR("W4TOTNO","P",88,"LMAX")
9
^SCR("W4TOTNO","P",88,"MUMPS1")

^SCR("W4TOTNO","P",88,"MUMPS2")

^SCR("W4TOTNO","P",88,"OUTPUT")

^SCR("W4TOTNO","P",88,"TYP")
N
^SCR("W4TOTNO","P",89,"CRD")
16,3,N,9,2
^SCR("W4TOTNO","P",89,"HELP")

^SCR("W4TOTNO","P",89,"LMAX")
9
^SCR("W4TOTNO","P",89,"MUMPS1")

^SCR("W4TOTNO","P",89,"MUMPS2")

^SCR("W4TOTNO","P",89,"OUTPUT")

^SCR("W4TOTNO","P",89,"TYP")
N
^SCR("W4TOTNO","P",90,"CRD")
14,28,N,8,2
^SCR("W4TOTNO","P",90,"HELP")

^SCR("W4TOTNO","P",90,"LMAX")
11
^SCR("W4TOTNO","P",90,"MUMPS1")

^SCR("W4TOTNO","P",90,"MUMPS2")

^SCR("W4TOTNO","P",90,"OUTPUT")

^SCR("W4TOTNO","P",90,"TYP")
N
^SCR("W4TOTNO","P",91,"CRD")
19,68,H,65
^SCR("W4TOTNO","P",91,"HELP")

^SCR("W4TOTNO","P",91,"LMAX")
66
^SCR("W4TOTNO","P",91,"MUMPS1")

^SCR("W4TOTNO","P",91,"MUMPS2")

^SCR("W4TOTNO","P",91,"OUTPUT")

^SCR("W4TOTNO","P",91,"TYP")
H
^SCR("W4TOTNO","P",92,"CRD")
20,68,H,66
^SCR("W4TOTNO","P",92,"HELP")

^SCR("W4TOTNO","P",92,"LMAX")
66
^SCR("W4TOTNO","P",92,"MUMPS1")

^SCR("W4TOTNO","P",92,"MUMPS2")

^SCR("W4TOTNO","P",92,"OUTPUT")

^SCR("W4TOTNO","P",92,"TYP")
H
^SCR("W4TOTNO","P",93,"CRD")
21,30,E,8,0
^SCR("W4TOTNO","P",93,"HELP")

^SCR("W4TOTNO","P",93,"LMAX")
8
^SCR("W4TOTNO","P",93,"MUMPS1")

^SCR("W4TOTNO","P",93,"MUMPS2")

^SCR("W4TOTNO","P",93,"OUTPUT")

^SCR("W4TOTNO","P",93,"TYP")
E
^SCR("W4TOTNO","P",94,"CRD")
24,4,N,9,0
^SCR("W4TOTNO","P",94,"HELP")

^SCR("W4TOTNO","P",94,"LMAX")
9
^SCR("W4TOTNO","P",94,"MUMPS1")

^SCR("W4TOTNO","P",94,"MUMPS2")

^SCR("W4TOTNO","P",94,"OUTPUT")

^SCR("W4TOTNO","P",94,"TYP")
N
^SCR("W4TOTNO","P",95,"CRD")
15,13,N,10,2
^SCR("W4TOTNO","P",95,"HELP")

^SCR("W4TOTNO","P",95,"LMAX")
10
^SCR("W4TOTNO","P",95,"MUMPS1")

^SCR("W4TOTNO","P",95,"MUMPS2")

^SCR("W4TOTNO","P",95,"OUTPUT")

^SCR("W4TOTNO","P",95,"TYP")
N
^SCR("W4TOTNO","P",96,"CRD")
23,20,H,17
^SCR("W4TOTNO","P",96,"HELP")

^SCR("W4TOTNO","P",96,"LMAX")
17
^SCR("W4TOTNO","P",96,"MUMPS1")

^SCR("W4TOTNO","P",96,"MUMPS2")

^SCR("W4TOTNO","P",96,"OUTPUT")

^SCR("W4TOTNO","P",96,"TYP")
H
^SCR("W4TOTNO","P",97,"CRD")
14,14,N,9,2
^SCR("W4TOTNO","P",97,"HELP")

^SCR("W4TOTNO","P",97,"LMAX")
9
^SCR("W4TOTNO","P",97,"MUMPS1")

^SCR("W4TOTNO","P",97,"MUMPS2")

^SCR("W4TOTNO","P",97,"OUTPUT")

^SCR("W4TOTNO","P",97,"TYP")
N
^SCR("W4TOTNO","P",98,"CRD")
24,23,N,10,2
^SCR("W4TOTNO","P",98,"HELP")

^SCR("W4TOTNO","P",98,"LMAX")
10
^SCR("W4TOTNO","P",98,"MUMPS1")

^SCR("W4TOTNO","P",98,"MUMPS2")

^SCR("W4TOTNO","P",98,"OUTPUT")

^SCR("W4TOTNO","P",98,"TYP")
N
^SCR("W4TOTNO","P","NAME","AEQ")
16
^SCR("W4TOTNO","P","NAME","AEX")
26
^SCR("W4TOTNO","P","NAME","AEXS")
84
^SCR("W4TOTNO","P","NAME","ALPHA")
34
^SCR("W4TOTNO","P","NAME","ALPHAS")
37
^SCR("W4TOTNO","P","NAME","ALQ")
19
^SCR("W4TOTNO","P","NAME","ASR")
12
^SCR("W4TOTNO","P","NAME","BIT")
50
^SCR("W4TOTNO","P","NAME","BNQ")
6
^SCR("W4TOTNO","P","NAME","CAS")
95
^SCR("W4TOTNO","P","NAME","CASHD")
87
^SCR("W4TOTNO","P","NAME","CHKM")
11
^SCR("W4TOTNO","P","NAME","CHKMS")
67
^SCR("W4TOTNO","P","NAME","CHKO")
10
^SCR("W4TOTNO","P","NAME","CHKS")
65
^SCR("W4TOTNO","P","NAME","CHQ")
4
^SCR("W4TOTNO","P","NAME","DMSHS")
47
^SCR("W4TOTNO","P","NAME","DNQ")
9
^SCR("W4TOTNO","P","NAME","DNR")
25
^SCR("W4TOTNO","P","NAME","DNRS")
82
^SCR("W4TOTNO","P","NAME","HAEX")
83
^SCR("W4TOTNO","P","NAME","HALPHA")
36
^SCR("W4TOTNO","P","NAME","HAVT")
98
^SCR("W4TOTNO","P","NAME","HCHKB")
61
^SCR("W4TOTNO","P","NAME","HCHKO")
60
^SCR("W4TOTNO","P","NAME","HDNR")
80
^SCR("W4TOTNO","P","NAME","HISR")
70
^SCR("W4TOTNO","P","NAME","HJCB")
32
^SCR("W4TOTNO","P","NAME","HMK")
94
^SCR("W4TOTNO","P","NAME","HMZM")
55
^SCR("W4TOTNO","P","NAME","HNHCIB")
43
^SCR("W4TOTNO","P","NAME","HNHL")
41
^SCR("W4TOTNO","P","NAME","HNHS")
40
^SCR("W4TOTNO","P","NAME","HSHUM")
90
^SCR("W4TOTNO","P","NAME","HVIZ")
75
^SCR("W4TOTNO","P","NAME","ISQ")
7
^SCR("W4TOTNO","P","NAME","ISR")
15
^SCR("W4TOTNO","P","NAME","ISRS")
72
^SCR("W4TOTNO","P","NAME","JCB")
31
^SCR("W4TOTNO","P","NAME","JCBS")
33
^SCR("W4TOTNO","P","NAME","JCQ")
18
^SCR("W4TOTNO","P","NAME","LLS")
56
^SCR("W4TOTNO","P","NAME","LLT")
59
^SCR("W4TOTNO","P","NAME","LMAM")
51
^SCR("W4TOTNO","P","NAME","MAMS")
49
^SCR("W4TOTNO","P","NAME","MIN3")
45
^SCR("W4TOTNO","P","NAME","MSDAMSL")
92
^SCR("W4TOTNO","P","NAME","MSDMSL")
91
^SCR("W4TOTNO","P","NAME","MZM")
5
^SCR("W4TOTNO","P","NAME","MZMS")
58
^SCR("W4TOTNO","P","NAME","MZQ")
3
^SCR("W4TOTNO","P","NAME","SCIB")
88
^SCR("W4TOTNO","P","NAME","SCOUP")
86
^SCR("W4TOTNO","P","NAME","SHUM")
35
^SCR("W4TOTNO","P","NAME","SHUMS")
97
^SCR("W4TOTNO","P","NAME","SMHIRA")
14
^SCR("W4TOTNO","P","NAME","SMSL")
96
^SCR("W4TOTNO","P","NAME","SSOAD")
93
^SCR("W4TOTNO","P","NAME","STENB")
89
^SCR("W4TOTNO","P","NAME","SUMB")
52
^SCR("W4TOTNO","P","NAME","SUMP")
42
^SCR("W4TOTNO","P","NAME","TL")
13
^SCR("W4TOTNO","P","NAME","VIZ")
20
^SCR("W4TOTNO","P","NAME","VIZS")
78
^SCR("W4TOTNO","P","NAME","VZQ")
8
^SCR("W4TOTNO","P","NM",3)
MZQ
^SCR("W4TOTNO","P","NM",4)
CHQ
^SCR("W4TOTNO","P","NM",5)
MZM
^SCR("W4TOTNO","P","NM",6)
BNQ
^SCR("W4TOTNO","P","NM",7)
ISQ
^SCR("W4TOTNO","P","NM",8)
VZQ
^SCR("W4TOTNO","P","NM",9)
DNQ
^SCR("W4TOTNO","P","NM",10)
CHKO
^SCR("W4TOTNO","P","NM",11)
CHKM
^SCR("W4TOTNO","P","NM",12)
ASR
^SCR("W4TOTNO","P","NM",13)
TL
^SCR("W4TOTNO","P","NM",14)
SMHIRA
^SCR("W4TOTNO","P","NM",15)
ISR
^SCR("W4TOTNO","P","NM",16)
AEQ
^SCR("W4TOTNO","P","NM",18)
JCQ
^SCR("W4TOTNO","P","NM",19)
ALQ
^SCR("W4TOTNO","P","NM",20)
VIZ
^SCR("W4TOTNO","P","NM",25)
DNR
^SCR("W4TOTNO","P","NM",26)
AEX
^SCR("W4TOTNO","P","NM",31)
JCB
^SCR("W4TOTNO","P","NM",32)
HJCB
^SCR("W4TOTNO","P","NM",33)
JCBS
^SCR("W4TOTNO","P","NM",34)
ALPHA
^SCR("W4TOTNO","P","NM",35)
SHUM
^SCR("W4TOTNO","P","NM",36)
HALPHA
^SCR("W4TOTNO","P","NM",37)
ALPHAS
^SCR("W4TOTNO","P","NM",40)
HNHS
^SCR("W4TOTNO","P","NM",41)
HNHL
^SCR("W4TOTNO","P","NM",42)
SUMP
^SCR("W4TOTNO","P","NM",43)
HNHCIB
^SCR("W4TOTNO","P","NM",45)
MIN3
^SCR("W4TOTNO","P","NM",47)
DMSHS
^SCR("W4TOTNO","P","NM",49)
MAMS
^SCR("W4TOTNO","P","NM",50)
BIT
^SCR("W4TOTNO","P","NM",51)
LMAM
^SCR("W4TOTNO","P","NM",52)
SUMB
^SCR("W4TOTNO","P","NM",55)
HMZM
^SCR("W4TOTNO","P","NM",56)
LLS
^SCR("W4TOTNO","P","NM",58)
MZMS
^SCR("W4TOTNO","P","NM",59)
LLT
^SCR("W4TOTNO","P","NM",60)
HCHKO
^SCR("W4TOTNO","P","NM",61)
HCHKB
^SCR("W4TOTNO","P","NM",65)
CHKS
^SCR("W4TOTNO","P","NM",67)
CHKMS
^SCR("W4TOTNO","P","NM",70)
HISR
^SCR("W4TOTNO","P","NM",72)
ISRS
^SCR("W4TOTNO","P","NM",75)
HVIZ
^SCR("W4TOTNO","P","NM",78)
VIZS
^SCR("W4TOTNO","P","NM",80)
HDNR
^SCR("W4TOTNO","P","NM",82)
DNRS
^SCR("W4TOTNO","P","NM",83)
HAEX
^SCR("W4TOTNO","P","NM",84)
AEXS
^SCR("W4TOTNO","P","NM",86)
SCOUP
^SCR("W4TOTNO","P","NM",87)
CASHD
^SCR("W4TOTNO","P","NM",88)
SCIB
^SCR("W4TOTNO","P","NM",89)
STENB
^SCR("W4TOTNO","P","NM",90)
HSHUM
^SCR("W4TOTNO","P","NM",91)
MSDMSL
^SCR("W4TOTNO","P","NM",92)
MSDAMSL
^SCR("W4TOTNO","P","NM",93)
SSOAD
^SCR("W4TOTNO","P","NM",94)
HMK
^SCR("W4TOTNO","P","NM",95)
CAS
^SCR("W4TOTNO","P","NM",96)
SMSL
^SCR("W4TOTNO","P","NM",97)
SHUMS
^SCR("W4TOTNO","P","NM",98)
HAVT
^SCR("W4TOTS")
H
^SCR("W4TOTS",1)
                                                                               
^SCR("W4TOTS",2)
              ---------------------------------------------------              
^SCR("W4TOTS",3)
              |   k"dq  |      l a w z d  |  x k n p  |    beq  |              
^SCR("W4TOTS",4)
              ---------------------------------------------------              
^SCR("W4TOTS",5)
              {58      }|   {55        }  |  {05     }|     onefn   {03   }    
^SCR("W4TOTS",6)
              {65      }|   {60        }  |  {10     }|     d`gnd   {04   }    
^SCR("W4TOTS",7)
              {67      }|   {61        }  |  {11     }|'wpa dxard   {06   }    
^SCR("W4TOTS",8)
              {72      }|   {70        }  |  {15     }|   hxk`xyi   {07   }    
^SCR("W4TOTS",9)
              {78      }|   {75        }  |  {20     }|      dfie   {08   }    
^SCR("W4TOTS",10)
              {82      }|   {80        }  |  {25     }|    qxpiic   {09   }    
^SCR("W4TOTS",11)
              {84      }|   {83        }  |  {26     }|       AEX   {16   }    
^SCR("W4TOTS",12)
              {33      }|   {32        }  |  {31     }|       JCB   {18   }    
^SCR("W4TOTS",13)
              {37      }|   {36        }  |  {34     }|cx`w ine`l   {19   }    
^SCR("W4TOTS",14)
              ----------------------------------------------------             
^SCR("W4TOTS",15)
  : `"k xcey  {97      }|   {90        }  | {35      }| ehp oeict              
^SCR("W4TOTS",16)
                                        {38     }: n"rn setk k"dq              
^SCR("W4TOTS",17)
                                        {39     }: n"rn xeht k"dq              
^SCR("W4TOTS",18)
 {87       } {95       }| `"k k"dq           {49     }|      n"rn              
^SCR("W4TOTS",19)
 {14        : zexiknd k"dq  {13      } :yelz {12     }: dtwda zepnfd           
^SCR("W4TOTS",20)
                                                                               
^SCR("W4TOTS",21)
                                                      {93     }: mixwan 'qn    
^SCR("W4TOTS",22)
                                       zegewl zegpd  {40     }:mildpn zegpd    
^SCR("W4TOTS",23)
                                                   {42     }: mihixt zexikn    
^SCR("W4TOTS",24)
                                    {94    }: w"nyg 'qn  {50     }: milehia    
^SCR("W4TOTS",25)
                                                    {52      } : ehexa k"dq    
^SCR("W4TOTS",26)
                                                                               
^SCR("W4TOTS",27)
                 {                                        59}                  
^SCR("W4TOTS","AV",1)

^SCR("W4TOTS","AV",2)
---------------------------------------------------
^SCR("W4TOTS","AV",3)
|ë"äñ|ìá÷úä|øëîð|âåñ|
^SCR("W4TOTS","AV",4)
---------------------------------------------------
^SCR("W4TOTS","AV",5)
|||ïîåæî
^SCR("W4TOTS","AV",6)
|||äàçîä
^SCR("W4TOTS","AV",7)
|||'÷ðáäøáòä
^SCR("W4TOTS","AV",8)
|||èøëàøùé
^SCR("W4TOTS","AV",9)
|||äæéå
^SCR("W4TOTS","AV",10)
|||ñøðééã
^SCR("W4TOTS","AV",11)
|||AEX
^SCR("W4TOTS","AV",12)
|||JCB
^SCR("W4TOTS","AV",13)
|||ãøà÷éîåàì
^SCR("W4TOTS","AV",14)
----------------------------------------------------
^SCR("W4TOTS","AV",15)
:à"ëøãåù|||åèðïåéãô
^SCR("W4TOTS","AV",16)
:î"òîóåôëë"äñ
^SCR("W4TOTS","AV",17)
:î"òîøåèôë"äñ
^SCR("W4TOTS","AV",18)
|à"ëë"äñ|î"òî
^SCR("W4TOTS","AV",19)
:úåøéëîäë"äñ:ùåìú:äô÷äáúåðîæä
^SCR("W4TOTS","AV",20)

^SCR("W4TOTS","AV",21)
:íéø÷áî'ñî
^SCR("W4TOTS","AV",22)
úåçå÷ìúåçðä:íéìäðîúåçðä
^SCR("W4TOTS","AV",23)
:íéèéøôúåøéëî
^SCR("W4TOTS","AV",24)
:÷"îùç'ñî:íéìåèéá
^SCR("W4TOTS","AV",25)
:åèåøáë"äñ
^SCR("W4TOTS","AV",26)

^SCR("W4TOTS","AV",27)

^SCR("W4TOTS","NAME")

^SCR("W4TOTS","P",3,"CRD")
5,68,E,6,0
^SCR("W4TOTS","P",3,"HELP")

^SCR("W4TOTS","P",3,"LMAX")
6
^SCR("W4TOTS","P",3,"MUMPS1")

^SCR("W4TOTS","P",3,"MUMPS2")

^SCR("W4TOTS","P",3,"OUTPUT")

^SCR("W4TOTS","P",3,"TYP")
E
^SCR("W4TOTS","P",4,"CRD")
6,68,E,6,0
^SCR("W4TOTS","P",4,"HELP")

^SCR("W4TOTS","P",4,"LMAX")
6
^SCR("W4TOTS","P",4,"MUMPS1")

^SCR("W4TOTS","P",4,"MUMPS2")

^SCR("W4TOTS","P",4,"OUTPUT")

^SCR("W4TOTS","P",4,"TYP")
E
^SCR("W4TOTS","P",5,"CRD")
5,45,N,8,2
^SCR("W4TOTS","P",5,"HELP")

^SCR("W4TOTS","P",5,"LMAX")
8
^SCR("W4TOTS","P",5,"MUMPS1")

^SCR("W4TOTS","P",5,"MUMPS2")

^SCR("W4TOTS","P",5,"OUTPUT")

^SCR("W4TOTS","P",5,"TYP")
N
^SCR("W4TOTS","P",6,"CRD")
7,68,E,6,0
^SCR("W4TOTS","P",6,"HELP")

^SCR("W4TOTS","P",6,"LMAX")
6
^SCR("W4TOTS","P",6,"MUMPS1")

^SCR("W4TOTS","P",6,"MUMPS2")

^SCR("W4TOTS","P",6,"OUTPUT")

^SCR("W4TOTS","P",6,"TYP")
E
^SCR("W4TOTS","P",7,"CRD")
8,68,E,6,0
^SCR("W4TOTS","P",7,"HELP")

^SCR("W4TOTS","P",7,"LMAX")
6
^SCR("W4TOTS","P",7,"MUMPS1")

^SCR("W4TOTS","P",7,"MUMPS2")

^SCR("W4TOTS","P",7,"OUTPUT")

^SCR("W4TOTS","P",7,"TYP")
E
^SCR("W4TOTS","P",8,"CRD")
9,68,E,6,0
^SCR("W4TOTS","P",8,"HELP")

^SCR("W4TOTS","P",8,"LMAX")
6
^SCR("W4TOTS","P",8,"MUMPS1")

^SCR("W4TOTS","P",8,"MUMPS2")

^SCR("W4TOTS","P",8,"OUTPUT")

^SCR("W4TOTS","P",8,"TYP")
E
^SCR("W4TOTS","P",9,"CRD")
10,68,E,6,0
^SCR("W4TOTS","P",9,"HELP")

^SCR("W4TOTS","P",9,"LMAX")
6
^SCR("W4TOTS","P",9,"MUMPS1")

^SCR("W4TOTS","P",9,"MUMPS2")

^SCR("W4TOTS","P",9,"OUTPUT")

^SCR("W4TOTS","P",9,"TYP")
E
^SCR("W4TOTS","P",10,"CRD")
6,45,N,8,2
^SCR("W4TOTS","P",10,"HELP")

^SCR("W4TOTS","P",10,"LMAX")
8
^SCR("W4TOTS","P",10,"MUMPS1")

^SCR("W4TOTS","P",10,"MUMPS2")

^SCR("W4TOTS","P",10,"OUTPUT")

^SCR("W4TOTS","P",10,"TYP")
N
^SCR("W4TOTS","P",11,"CRD")
7,45,N,8,2
^SCR("W4TOTS","P",11,"HELP")

^SCR("W4TOTS","P",11,"LMAX")
8
^SCR("W4TOTS","P",11,"MUMPS1")

^SCR("W4TOTS","P",11,"MUMPS2")

^SCR("W4TOTS","P",11,"OUTPUT")

^SCR("W4TOTS","P",11,"TYP")
N
^SCR("W4TOTS","P",12,"CRD")
19,45,N,8,2
^SCR("W4TOTS","P",12,"HELP")

^SCR("W4TOTS","P",12,"LMAX")
8
^SCR("W4TOTS","P",12,"MUMPS1")

^SCR("W4TOTS","P",12,"MUMPS2")

^SCR("W4TOTS","P",12,"OUTPUT")

^SCR("W4TOTS","P",12,"TYP")
N
^SCR("W4TOTS","P",13,"CRD")
19,28,N,8,2
^SCR("W4TOTS","P",13,"HELP")

^SCR("W4TOTS","P",13,"LMAX")
9
^SCR("W4TOTS","P",13,"MUMPS1")

^SCR("W4TOTS","P",13,"MUMPS2")

^SCR("W4TOTS","P",13,"OUTPUT")

^SCR("W4TOTS","P",13,"TYP")
N
^SCR("W4TOTS","P",14,"CRD")
19,1,N,10,2
^SCR("W4TOTS","P",14,"HELP")

^SCR("W4TOTS","P",14,"LMAX")
11
^SCR("W4TOTS","P",14,"MUMPS1")

^SCR("W4TOTS","P",14,"MUMPS2")

^SCR("W4TOTS","P",14,"OUTPUT")

^SCR("W4TOTS","P",14,"TYP")
N
^SCR("W4TOTS","P",15,"CRD")
8,45,N,8,2
^SCR("W4TOTS","P",15,"HELP")

^SCR("W4TOTS","P",15,"LMAX")
8
^SCR("W4TOTS","P",15,"MUMPS1")

^SCR("W4TOTS","P",15,"MUMPS2")

^SCR("W4TOTS","P",15,"OUTPUT")

^SCR("W4TOTS","P",15,"TYP")
N
^SCR("W4TOTS","P",16,"CRD")
11,68,E,6,0
^SCR("W4TOTS","P",16,"HELP")

^SCR("W4TOTS","P",16,"LMAX")
6
^SCR("W4TOTS","P",16,"MUMPS1")

^SCR("W4TOTS","P",16,"MUMPS2")

^SCR("W4TOTS","P",16,"OUTPUT")

^SCR("W4TOTS","P",16,"TYP")
E
^SCR("W4TOTS","P",18,"CRD")
12,68,E,6,0
^SCR("W4TOTS","P",18,"HELP")

^SCR("W4TOTS","P",18,"LMAX")
6
^SCR("W4TOTS","P",18,"MUMPS1")

^SCR("W4TOTS","P",18,"MUMPS2")

^SCR("W4TOTS","P",18,"OUTPUT")

^SCR("W4TOTS","P",18,"TYP")
E
^SCR("W4TOTS","P",19,"CRD")
13,68,E,6,0
^SCR("W4TOTS","P",19,"HELP")

^SCR("W4TOTS","P",19,"LMAX")
6
^SCR("W4TOTS","P",19,"MUMPS1")

^SCR("W4TOTS","P",19,"MUMPS2")

^SCR("W4TOTS","P",19,"OUTPUT")

^SCR("W4TOTS","P",19,"TYP")
E
^SCR("W4TOTS","P",20,"CRD")
9,45,N,8,2
^SCR("W4TOTS","P",20,"HELP")

^SCR("W4TOTS","P",20,"LMAX")
8
^SCR("W4TOTS","P",20,"MUMPS1")

^SCR("W4TOTS","P",20,"MUMPS2")

^SCR("W4TOTS","P",20,"OUTPUT")

^SCR("W4TOTS","P",20,"TYP")
N
^SCR("W4TOTS","P",25,"CRD")
10,45,N,8,2
^SCR("W4TOTS","P",25,"HELP")

^SCR("W4TOTS","P",25,"LMAX")
8
^SCR("W4TOTS","P",25,"MUMPS1")

^SCR("W4TOTS","P",25,"MUMPS2")

^SCR("W4TOTS","P",25,"OUTPUT")

^SCR("W4TOTS","P",25,"TYP")
N
^SCR("W4TOTS","P",26,"CRD")
11,45,N,8,2
^SCR("W4TOTS","P",26,"HELP")

^SCR("W4TOTS","P",26,"LMAX")
8
^SCR("W4TOTS","P",26,"MUMPS1")

^SCR("W4TOTS","P",26,"MUMPS2")

^SCR("W4TOTS","P",26,"OUTPUT")

^SCR("W4TOTS","P",26,"TYP")
N
^SCR("W4TOTS","P",31,"CRD")
12,45,N,8,2
^SCR("W4TOTS","P",31,"HELP")

^SCR("W4TOTS","P",31,"LMAX")
8
^SCR("W4TOTS","P",31,"MUMPS1")

^SCR("W4TOTS","P",31,"MUMPS2")

^SCR("W4TOTS","P",31,"OUTPUT")

^SCR("W4TOTS","P",31,"TYP")
N
^SCR("W4TOTS","P",32,"CRD")
12,28,N,8,2
^SCR("W4TOTS","P",32,"HELP")

^SCR("W4TOTS","P",32,"LMAX")
11
^SCR("W4TOTS","P",32,"MUMPS1")

^SCR("W4TOTS","P",32,"MUMPS2")

^SCR("W4TOTS","P",32,"OUTPUT")

^SCR("W4TOTS","P",32,"TYP")
N
^SCR("W4TOTS","P",33,"CRD")
12,14,N,9,2
^SCR("W4TOTS","P",33,"HELP")

^SCR("W4TOTS","P",33,"LMAX")
9
^SCR("W4TOTS","P",33,"MUMPS1")

^SCR("W4TOTS","P",33,"MUMPS2")

^SCR("W4TOTS","P",33,"OUTPUT")

^SCR("W4TOTS","P",33,"TYP")
N
^SCR("W4TOTS","P",34,"CRD")
13,45,N,8,2
^SCR("W4TOTS","P",34,"HELP")

^SCR("W4TOTS","P",34,"LMAX")
8
^SCR("W4TOTS","P",34,"MUMPS1")

^SCR("W4TOTS","P",34,"MUMPS2")

^SCR("W4TOTS","P",34,"OUTPUT")

^SCR("W4TOTS","P",34,"TYP")
N
^SCR("W4TOTS","P",35,"CRD")
15,44,N,9,2
^SCR("W4TOTS","P",35,"HELP")

^SCR("W4TOTS","P",35,"LMAX")
9
^SCR("W4TOTS","P",35,"MUMPS1")

^SCR("W4TOTS","P",35,"MUMPS2")

^SCR("W4TOTS","P",35,"OUTPUT")

^SCR("W4TOTS","P",35,"TYP")
N
^SCR("W4TOTS","P",36,"CRD")
13,28,N,9,2
^SCR("W4TOTS","P",36,"HELP")

^SCR("W4TOTS","P",36,"LMAX")
11
^SCR("W4TOTS","P",36,"MUMPS1")

^SCR("W4TOTS","P",36,"MUMPS2")

^SCR("W4TOTS","P",36,"OUTPUT")

^SCR("W4TOTS","P",36,"TYP")
N
^SCR("W4TOTS","P",37,"CRD")
13,14,N,9,2
^SCR("W4TOTS","P",37,"HELP")

^SCR("W4TOTS","P",37,"LMAX")
9
^SCR("W4TOTS","P",37,"MUMPS1")

^SCR("W4TOTS","P",37,"MUMPS2")

^SCR("W4TOTS","P",37,"OUTPUT")

^SCR("W4TOTS","P",37,"TYP")
N
^SCR("W4TOTS","P",38,"CRD")
16,40,N,8,2
^SCR("W4TOTS","P",38,"HELP")

^SCR("W4TOTS","P",38,"LMAX")
8
^SCR("W4TOTS","P",38,"MUMPS1")

^SCR("W4TOTS","P",38,"MUMPS2")

^SCR("W4TOTS","P",38,"OUTPUT")

^SCR("W4TOTS","P",38,"TYP")
N
^SCR("W4TOTS","P",39,"CRD")
17,40,N,8,2
^SCR("W4TOTS","P",39,"HELP")

^SCR("W4TOTS","P",39,"LMAX")
8
^SCR("W4TOTS","P",39,"MUMPS1")

^SCR("W4TOTS","P",39,"MUMPS2")

^SCR("W4TOTS","P",39,"OUTPUT")

^SCR("W4TOTS","P",39,"TYP")
N
^SCR("W4TOTS","P",40,"CRD")
22,53,N,8,2
^SCR("W4TOTS","P",40,"HELP")

^SCR("W4TOTS","P",40,"LMAX")
8
^SCR("W4TOTS","P",40,"MUMPS1")

^SCR("W4TOTS","P",40,"MUMPS2")

^SCR("W4TOTS","P",40,"OUTPUT")

^SCR("W4TOTS","P",40,"TYP")
N
^SCR("W4TOTS","P",42,"CRD")
23,51,N,8,2
^SCR("W4TOTS","P",42,"HELP")

^SCR("W4TOTS","P",42,"LMAX")
8
^SCR("W4TOTS","P",42,"MUMPS1")

^SCR("W4TOTS","P",42,"MUMPS2")

^SCR("W4TOTS","P",42,"OUTPUT")

^SCR("W4TOTS","P",42,"TYP")
N
^SCR("W4TOTS","P",49,"CRD")
18,45,N,8,2
^SCR("W4TOTS","P",49,"HELP")

^SCR("W4TOTS","P",49,"LMAX")
8
^SCR("W4TOTS","P",49,"MUMPS1")

^SCR("W4TOTS","P",49,"MUMPS2")

^SCR("W4TOTS","P",49,"OUTPUT")

^SCR("W4TOTS","P",49,"TYP")
N
^SCR("W4TOTS","P",50,"CRD")
24,57,N,8,2
^SCR("W4TOTS","P",50,"HELP")

^SCR("W4TOTS","P",50,"LMAX")
8
^SCR("W4TOTS","P",50,"MUMPS1")

^SCR("W4TOTS","P",50,"MUMPS2")

^SCR("W4TOTS","P",50,"OUTPUT")

^SCR("W4TOTS","P",50,"TYP")
N
^SCR("W4TOTS","P",52,"CRD")
25,52,N,9,2
^SCR("W4TOTS","P",52,"HELP")

^SCR("W4TOTS","P",52,"LMAX")
9
^SCR("W4TOTS","P",52,"MUMPS1")

^SCR("W4TOTS","P",52,"MUMPS2")

^SCR("W4TOTS","P",52,"OUTPUT")

^SCR("W4TOTS","P",52,"TYP")
N
^SCR("W4TOTS","P",55,"CRD")
5,28,N,8,2
^SCR("W4TOTS","P",55,"HELP")

^SCR("W4TOTS","P",55,"LMAX")
11
^SCR("W4TOTS","P",55,"MUMPS1")

^SCR("W4TOTS","P",55,"MUMPS2")

^SCR("W4TOTS","P",55,"OUTPUT")

^SCR("W4TOTS","P",55,"TYP")
N
^SCR("W4TOTS","P",58,"CRD")
5,14,N,9,2
^SCR("W4TOTS","P",58,"HELP")

^SCR("W4TOTS","P",58,"LMAX")
9
^SCR("W4TOTS","P",58,"MUMPS1")

^SCR("W4TOTS","P",58,"MUMPS2")

^SCR("W4TOTS","P",58,"OUTPUT")

^SCR("W4TOTS","P",58,"TYP")
N
^SCR("W4TOTS","P",59,"CRD")
27,61,H,43,0
^SCR("W4TOTS","P",59,"HELP")

^SCR("W4TOTS","P",59,"LMAX")
43
^SCR("W4TOTS","P",59,"MUMPS1")

^SCR("W4TOTS","P",59,"MUMPS2")

^SCR("W4TOTS","P",59,"TYP")
H
^SCR("W4TOTS","P",60,"CRD")
6,28,N,8,2
^SCR("W4TOTS","P",60,"HELP")

^SCR("W4TOTS","P",60,"LMAX")
11
^SCR("W4TOTS","P",60,"MUMPS1")

^SCR("W4TOTS","P",60,"MUMPS2")

^SCR("W4TOTS","P",60,"OUTPUT")

^SCR("W4TOTS","P",60,"TYP")
N
^SCR("W4TOTS","P",61,"CRD")
7,28,N,8,2
^SCR("W4TOTS","P",61,"HELP")

^SCR("W4TOTS","P",61,"LMAX")
11
^SCR("W4TOTS","P",61,"MUMPS1")

^SCR("W4TOTS","P",61,"MUMPS2")

^SCR("W4TOTS","P",61,"OUTPUT")

^SCR("W4TOTS","P",61,"TYP")
N
^SCR("W4TOTS","P",65,"CRD")
6,14,N,9,2
^SCR("W4TOTS","P",65,"HELP")

^SCR("W4TOTS","P",65,"LMAX")
9
^SCR("W4TOTS","P",65,"MUMPS1")

^SCR("W4TOTS","P",65,"MUMPS2")

^SCR("W4TOTS","P",65,"OUTPUT")

^SCR("W4TOTS","P",65,"TYP")
N
^SCR("W4TOTS","P",67,"CRD")
7,14,N,9,2
^SCR("W4TOTS","P",67,"HELP")

^SCR("W4TOTS","P",67,"LMAX")
9
^SCR("W4TOTS","P",67,"MUMPS1")

^SCR("W4TOTS","P",67,"MUMPS2")

^SCR("W4TOTS","P",67,"TYP")
N
^SCR("W4TOTS","P",70,"CRD")
8,28,N,8,2
^SCR("W4TOTS","P",70,"HELP")

^SCR("W4TOTS","P",70,"LMAX")
11
^SCR("W4TOTS","P",70,"MUMPS1")

^SCR("W4TOTS","P",70,"MUMPS2")

^SCR("W4TOTS","P",70,"OUTPUT")

^SCR("W4TOTS","P",70,"TYP")
N
^SCR("W4TOTS","P",72,"CRD")
8,14,N,9,2
^SCR("W4TOTS","P",72,"HELP")

^SCR("W4TOTS","P",72,"LMAX")
9
^SCR("W4TOTS","P",72,"MUMPS1")

^SCR("W4TOTS","P",72,"MUMPS2")

^SCR("W4TOTS","P",72,"OUTPUT")

^SCR("W4TOTS","P",72,"TYP")
N
^SCR("W4TOTS","P",75,"CRD")
9,28,N,8,2
^SCR("W4TOTS","P",75,"HELP")

^SCR("W4TOTS","P",75,"LMAX")
11
^SCR("W4TOTS","P",75,"MUMPS1")

^SCR("W4TOTS","P",75,"MUMPS2")

^SCR("W4TOTS","P",75,"OUTPUT")

^SCR("W4TOTS","P",75,"TYP")
N
^SCR("W4TOTS","P",78,"CRD")
9,14,N,9,2
^SCR("W4TOTS","P",78,"HELP")

^SCR("W4TOTS","P",78,"LMAX")
9
^SCR("W4TOTS","P",78,"MUMPS1")

^SCR("W4TOTS","P",78,"MUMPS2")

^SCR("W4TOTS","P",78,"OUTPUT")

^SCR("W4TOTS","P",78,"TYP")
N
^SCR("W4TOTS","P",80,"CRD")
10,28,N,8,2
^SCR("W4TOTS","P",80,"HELP")

^SCR("W4TOTS","P",80,"LMAX")
11
^SCR("W4TOTS","P",80,"MUMPS1")

^SCR("W4TOTS","P",80,"MUMPS2")

^SCR("W4TOTS","P",80,"OUTPUT")

^SCR("W4TOTS","P",80,"TYP")
N
^SCR("W4TOTS","P",82,"CRD")
10,14,N,9,2
^SCR("W4TOTS","P",82,"HELP")

^SCR("W4TOTS","P",82,"LMAX")
9
^SCR("W4TOTS","P",82,"MUMPS1")

^SCR("W4TOTS","P",82,"MUMPS2")

^SCR("W4TOTS","P",82,"OUTPUT")

^SCR("W4TOTS","P",82,"TYP")
N
^SCR("W4TOTS","P",83,"CRD")
11,28,N,8,2
^SCR("W4TOTS","P",83,"HELP")

^SCR("W4TOTS","P",83,"LMAX")
11
^SCR("W4TOTS","P",83,"MUMPS1")

^SCR("W4TOTS","P",83,"MUMPS2")

^SCR("W4TOTS","P",83,"OUTPUT")

^SCR("W4TOTS","P",83,"TYP")
N
^SCR("W4TOTS","P",84,"CRD")
11,14,N,9,2
^SCR("W4TOTS","P",84,"HELP")

^SCR("W4TOTS","P",84,"LMAX")
9
^SCR("W4TOTS","P",84,"MUMPS1")

^SCR("W4TOTS","P",84,"MUMPS2")

^SCR("W4TOTS","P",84,"OUTPUT")

^SCR("W4TOTS","P",84,"TYP")
N
^SCR("W4TOTS","P",87,"CRD")
18,1,N,10,2
^SCR("W4TOTS","P",87,"HELP")

^SCR("W4TOTS","P",87,"LMAX")
10
^SCR("W4TOTS","P",87,"MUMPS1")

^SCR("W4TOTS","P",87,"MUMPS2")

^SCR("W4TOTS","P",87,"OUTPUT")

^SCR("W4TOTS","P",87,"TYP")
N
^SCR("W4TOTS","P",90,"CRD")
15,28,N,8,2
^SCR("W4TOTS","P",90,"HELP")

^SCR("W4TOTS","P",90,"LMAX")
11
^SCR("W4TOTS","P",90,"MUMPS1")

^SCR("W4TOTS","P",90,"MUMPS2")

^SCR("W4TOTS","P",90,"OUTPUT")

^SCR("W4TOTS","P",90,"TYP")
N
^SCR("W4TOTS","P",93,"CRD")
21,54,E,8,0
^SCR("W4TOTS","P",93,"HELP")

^SCR("W4TOTS","P",93,"LMAX")
8
^SCR("W4TOTS","P",93,"MUMPS1")

^SCR("W4TOTS","P",93,"MUMPS2")

^SCR("W4TOTS","P",93,"OUTPUT")

^SCR("W4TOTS","P",93,"TYP")
E
^SCR("W4TOTS","P",94,"CRD")
24,36,N,7,0
^SCR("W4TOTS","P",94,"HELP")

^SCR("W4TOTS","P",94,"LMAX")
7
^SCR("W4TOTS","P",94,"MUMPS1")

^SCR("W4TOTS","P",94,"MUMPS2")

^SCR("W4TOTS","P",94,"OUTPUT")

^SCR("W4TOTS","P",94,"TYP")
N
^SCR("W4TOTS","P",95,"CRD")
18,13,N,10,2
^SCR("W4TOTS","P",95,"HELP")

^SCR("W4TOTS","P",95,"LMAX")
10
^SCR("W4TOTS","P",95,"MUMPS1")

^SCR("W4TOTS","P",95,"MUMPS2")

^SCR("W4TOTS","P",95,"OUTPUT")

^SCR("W4TOTS","P",95,"TYP")
N
^SCR("W4TOTS","P",97,"CRD")
15,14,N,9,2
^SCR("W4TOTS","P",97,"HELP")

^SCR("W4TOTS","P",97,"LMAX")
9
^SCR("W4TOTS","P",97,"MUMPS1")

^SCR("W4TOTS","P",97,"MUMPS2")

^SCR("W4TOTS","P",97,"OUTPUT")

^SCR("W4TOTS","P",97,"TYP")
N
^SCR("W4TOTS","P","NAME","AEQ")
16
^SCR("W4TOTS","P","NAME","AEX")
26
^SCR("W4TOTS","P","NAME","AEXS")
84
^SCR("W4TOTS","P","NAME","ALPHA")
34
^SCR("W4TOTS","P","NAME","ALPHAS")
37
^SCR("W4TOTS","P","NAME","ALQ")
19
^SCR("W4TOTS","P","NAME","ASR")
12
^SCR("W4TOTS","P","NAME","BIT")
50
^SCR("W4TOTS","P","NAME","BNQ")
6
^SCR("W4TOTS","P","NAME","CAS")
95
^SCR("W4TOTS","P","NAME","CASHD")
87
^SCR("W4TOTS","P","NAME","CHKM")
11
^SCR("W4TOTS","P","NAME","CHKMS")
67
^SCR("W4TOTS","P","NAME","CHKO")
10
^SCR("W4TOTS","P","NAME","CHKS")
65
^SCR("W4TOTS","P","NAME","CHQ")
4
^SCR("W4TOTS","P","NAME","DNQ")
9
^SCR("W4TOTS","P","NAME","DNR")
25
^SCR("W4TOTS","P","NAME","DNRS")
82
^SCR("W4TOTS","P","NAME","HAEX")
83
^SCR("W4TOTS","P","NAME","HALPHA")
36
^SCR("W4TOTS","P","NAME","HCHKB")
61
^SCR("W4TOTS","P","NAME","HCHKO")
60
^SCR("W4TOTS","P","NAME","HDNR")
80
^SCR("W4TOTS","P","NAME","HISR")
70
^SCR("W4TOTS","P","NAME","HJCB")
32
^SCR("W4TOTS","P","NAME","HMK")
94
^SCR("W4TOTS","P","NAME","HMZM")
55
^SCR("W4TOTS","P","NAME","HNHS")
40
^SCR("W4TOTS","P","NAME","HSHUM")
90
^SCR("W4TOTS","P","NAME","HVIZ")
75
^SCR("W4TOTS","P","NAME","ISQ")
7
^SCR("W4TOTS","P","NAME","ISR")
15
^SCR("W4TOTS","P","NAME","ISRS")
72
^SCR("W4TOTS","P","NAME","JCB")
31
^SCR("W4TOTS","P","NAME","JCBS")
33
^SCR("W4TOTS","P","NAME","JCQ")
18
^SCR("W4TOTS","P","NAME","MAMS")
49
^SCR("W4TOTS","P","NAME","MZM")
5
^SCR("W4TOTS","P","NAME","MZMS")
58
^SCR("W4TOTS","P","NAME","MZQ")
3
^SCR("W4TOTS","P","NAME","SHUM")
35
^SCR("W4TOTS","P","NAME","SHUMS")
97
^SCR("W4TOTS","P","NAME","SMHIRA")
14
^SCR("W4TOTS","P","NAME","SSOAD")
93
^SCR("W4TOTS","P","NAME","STAM")
59
^SCR("W4TOTS","P","NAME","SUMB")
52
^SCR("W4TOTS","P","NAME","SUMMAM")
38
^SCR("W4TOTS","P","NAME","SUMNOMAM")
39
^SCR("W4TOTS","P","NAME","SUMP")
42
^SCR("W4TOTS","P","NAME","TL")
13
^SCR("W4TOTS","P","NAME","VIZ")
20
^SCR("W4TOTS","P","NAME","VIZS")
78
^SCR("W4TOTS","P","NAME","VZQ")
8
^SCR("W4TOTS","P","NM",3)
MZQ
^SCR("W4TOTS","P","NM",4)
CHQ
^SCR("W4TOTS","P","NM",5)
MZM
^SCR("W4TOTS","P","NM",6)
BNQ
^SCR("W4TOTS","P","NM",7)
ISQ
^SCR("W4TOTS","P","NM",8)
VZQ
^SCR("W4TOTS","P","NM",9)
DNQ
^SCR("W4TOTS","P","NM",10)
CHKO
^SCR("W4TOTS","P","NM",11)
CHKM
^SCR("W4TOTS","P","NM",12)
ASR
^SCR("W4TOTS","P","NM",13)
TL
^SCR("W4TOTS","P","NM",14)
SMHIRA
^SCR("W4TOTS","P","NM",15)
ISR
^SCR("W4TOTS","P","NM",16)
AEQ
^SCR("W4TOTS","P","NM",18)
JCQ
^SCR("W4TOTS","P","NM",19)
ALQ
^SCR("W4TOTS","P","NM",20)
VIZ
^SCR("W4TOTS","P","NM",25)
DNR
^SCR("W4TOTS","P","NM",26)
AEX
^SCR("W4TOTS","P","NM",31)
JCB
^SCR("W4TOTS","P","NM",32)
HJCB
^SCR("W4TOTS","P","NM",33)
JCBS
^SCR("W4TOTS","P","NM",34)
ALPHA
^SCR("W4TOTS","P","NM",35)
SHUM
^SCR("W4TOTS","P","NM",36)
HALPHA
^SCR("W4TOTS","P","NM",37)
ALPHAS
^SCR("W4TOTS","P","NM",38)
SUMMAM
^SCR("W4TOTS","P","NM",39)
SUMNOMAM
^SCR("W4TOTS","P","NM",40)
HNHS
^SCR("W4TOTS","P","NM",42)
SUMP
^SCR("W4TOTS","P","NM",49)
MAMS
^SCR("W4TOTS","P","NM",50)
BIT
^SCR("W4TOTS","P","NM",52)
SUMB
^SCR("W4TOTS","P","NM",55)
HMZM
^SCR("W4TOTS","P","NM",58)
MZMS
^SCR("W4TOTS","P","NM",59)
STAM
^SCR("W4TOTS","P","NM",60)
HCHKO
^SCR("W4TOTS","P","NM",61)
HCHKB
^SCR("W4TOTS","P","NM",65)
CHKS
^SCR("W4TOTS","P","NM",67)
CHKMS
^SCR("W4TOTS","P","NM",70)
HISR
^SCR("W4TOTS","P","NM",72)
ISRS
^SCR("W4TOTS","P","NM",75)
HVIZ
^SCR("W4TOTS","P","NM",78)
VIZS
^SCR("W4TOTS","P","NM",80)
HDNR
^SCR("W4TOTS","P","NM",82)
DNRS
^SCR("W4TOTS","P","NM",83)
HAEX
^SCR("W4TOTS","P","NM",84)
AEXS
^SCR("W4TOTS","P","NM",87)
CASHD
^SCR("W4TOTS","P","NM",90)
HSHUM
^SCR("W4TOTS","P","NM",93)
SSOAD
^SCR("W4TOTS","P","NM",94)
HMK
^SCR("W4TOTS","P","NM",95)
CAS
^SCR("W4TOTS","P","NM",97)
SHUMS
^SCR("W4TOTT")
H
^SCR("W4TOTT",1)
              ---------------------------------------------------              
^SCR("W4TOTT",2)
              |   k"dq  |      l a w z d  |  x k n p  |    beq  |              
^SCR("W4TOTT",3)
              ---------------------------------------------------              
^SCR("W4TOTT",4)
                        |                 |  {05     }|     onefn   {03   }    
^SCR("W4TOTT",5)
              {85      }|                 |  {28     }|{      30}   {21   }    
^SCR("W4TOTT",6)
              {58      }|   {55        }  |  {29     }| ehp onefn              
^SCR("W4TOTT",7)
              {65      }|   {60        }  |  {10     }|     d`gnd   {04   }    
^SCR("W4TOTT",8)
              {67      }|   {61        }  |  {11     }|'wpa dxard   {06   }    
^SCR("W4TOTT",9)
              {72      }|   {70        }  |  {15     }|   hxk`xyi   {07   }    
^SCR("W4TOTT",10)
              {78      }|   {75        }  |  {20     }|      dfie   {08   }    
^SCR("W4TOTT",11)
              {82      }|   {80        }  |  {25     }|    qxpiic   {09   }    
^SCR("W4TOTT",12)
              {84      }|   {83        }  |  {26     }|       AEX   {16   }    
^SCR("W4TOTT",13)
              {33      }|   {32        }  |  {31     }|       JCB   {18   }    
^SCR("W4TOTT",14)
              {37      }|   {36        }  |  {34     }|cx`w ine`l   {19   }    
^SCR("W4TOTT",15)
              ----------------------------------------------------             
^SCR("W4TOTT",16)
  : `"k xcey  {97      }|   {90        }  | {35      }| ehp oeict              
^SCR("W4TOTT",17)
 {87       } {95       }| `"k k"dq          {49      }|      n"rn              
^SCR("W4TOTT",18)
      {62      } : zeicizr zepnfda `"k k"dq                                    
^SCR("W4TOTT",19)
 {89       }: qia oz k"dq   {88       } : qeaiq k"dq   {51      }| n"rn iptl   
^SCR("W4TOTT",20)
 {86       }:oetpetew k"dq                                                     
^SCR("W4TOTT",21)
 {14        : zexiknd k"dq  {13      } :yelz {12     }: dtwda zepnfd           
^SCR("W4TOTT",22)
 {                                                               91}           
^SCR("W4TOTT",23)
 {                                                               92}           
^SCR("W4TOTT",24)
   {94      } w"nyg 'qn       {93     }  micreq 'qn  {45     } :miekif         
^SCR("W4TOTT",25)
 {43     }: qeaiq zegpd {41     } zegewl zegpd  {40     }:mildpn zegpd         
^SCR("W4TOTT",26)
  {              96}  {47     } : zexy inc   {42     }: mihixt zexikn          
^SCR("W4TOTT",27)
                       {98       } : dghad         {50     }: milehia          
^SCR("W4TOTT",28)
                                               {52      }: ehexa k"dq          
^SCR("W4TOTT",29)
                                   {                                        56}
^SCR("W4TOTT",30)
                                   {                                        59}
^SCR("W4TOTT","A",1)
---------------------------------------------------
^SCR("W4TOTT","A",2)
|‹"„‘|Œ�—š„|˜‹Ž�|‚…‘|
^SCR("W4TOTT","A",3)
---------------------------------------------------
^SCR("W4TOTT","A",4)
|||�Ž…†Ž
^SCR("W4TOTT","A",5)
|||
^SCR("W4TOTT","A",6)
|||…ˆ��Ž…†Ž
^SCR("W4TOTT","A",7)
|||„€‡Ž„
^SCR("W4TOTT","A",8)
|||'—��„˜�’„
^SCR("W4TOTT","A",9)
|||ˆ˜‹€˜™‰
^SCR("W4TOTT","A",10)
|||„†‰…
^SCR("W4TOTT","A",11)
|||‘˜�‰‰ƒ
^SCR("W4TOTT","A",12)
|||AEX
^SCR("W4TOTT","A",13)
|||JCB
^SCR("W4TOTT","A",14)
|||ƒ˜€—‰Ž…€Œ
^SCR("W4TOTT","A",15)
----------------------------------------------------
^SCR("W4TOTT","A",16)
:€"‹˜ƒ…™|||…ˆ��…‰ƒ”
^SCR("W4TOTT","A",17)
|€"‹‹"„‘|Ž"’Ž
^SCR("W4TOTT","A",18)
:š…‰ƒ‰š’š…�Ž†„�€"‹‹"„‘
^SCR("W4TOTT","A",19)
:‘‰��š‹"„‘:‘…�‰‘‹"„‘|Ž"’Ž‰�”Œ
^SCR("W4TOTT","A",20)
:�…”�…”…—‹"„‘
^SCR("W4TOTT","A",21)
:š…˜‰‹Ž„‹"„‘:™…Œš:„”—„�š…�Ž†„
^SCR("W4TOTT","A",22)

^SCR("W4TOTT","A",23)

^SCR("W4TOTT","A",24)
—"Ž™‡'‘Ž�‰ƒ’…‘'‘Ž:�‰…‹‰†
^SCR("W4TOTT","A",25)
:‘…�‰‘š…‡�„š…‡…—Œš…‡�„:�‰Œ„�Žš…‡�„
^SCR("W4TOTT","A",26)
:š…˜™‰Žƒ:�‰ˆ‰˜”š…˜‰‹Ž
^SCR("W4TOTT","A",27)
:„‡ˆ�„:�‰Œ…ˆ‰�
^SCR("W4TOTT","A",28)
:…ˆ…˜�‹"„‘
^SCR("W4TOTT","A",29)

^SCR("W4TOTT","A",30)

^SCR("W4TOTT","AV",1)
---------------------------------------------------
^SCR("W4TOTT","AV",2)
|ë"äñ|ìá÷úä|øëîð|âåñ|
^SCR("W4TOTT","AV",3)
---------------------------------------------------
^SCR("W4TOTT","AV",4)
|||ïîåæî
^SCR("W4TOTT","AV",5)
|||
^SCR("W4TOTT","AV",6)
|||åèðïîåæî
^SCR("W4TOTT","AV",7)
|||äàçîä
^SCR("W4TOTT","AV",8)
|||'÷ðáäøáòä
^SCR("W4TOTT","AV",9)
|||èøëàøùé
^SCR("W4TOTT","AV",10)
|||äæéå
^SCR("W4TOTT","AV",11)
|||ñøðééã
^SCR("W4TOTT","AV",12)
|||AEX
^SCR("W4TOTT","AV",13)
|||JCB
^SCR("W4TOTT","AV",14)
|||ãøà÷éîåàì
^SCR("W4TOTT","AV",15)
----------------------------------------------------
^SCR("W4TOTT","AV",16)
:à"ëøãåù|||åèðïåéãô
^SCR("W4TOTT","AV",17)
|à"ëë"äñ|î"òî
^SCR("W4TOTT","AV",18)
:úåéãéúòúåðîæäáà"ëë"äñ
^SCR("W4TOTT","AV",19)
:ñéáïúë"äñ:ñåáéñë"äñ|î"òîéðôì
^SCR("W4TOTT","AV",20)
:ïåôðåôå÷ë"äñ
^SCR("W4TOTT","AV",21)
:úåøéëîäë"äñ:ùåìú:äô÷äáúåðîæä
^SCR("W4TOTT","AV",22)

^SCR("W4TOTT","AV",23)

^SCR("W4TOTT","AV",24)
÷"îùç'ñîíéãòåñ'ñî:íéåëéæ
^SCR("W4TOTT","AV",25)
:ñåáéñúåçðäúåçå÷ìúåçðä:íéìäðîúåçðä
^SCR("W4TOTT","AV",26)
:úåøùéîã:íéèéøôúåøéëî
^SCR("W4TOTT","AV",27)
:äçèáä:íéìåèéá
^SCR("W4TOTT","AV",28)
:åèåøáë"äñ
^SCR("W4TOTT","AV",29)

^SCR("W4TOTT","AV",30)

^SCR("W4TOTT","NAME")

^SCR("W4TOTT","P",3,"CRD")
4,68,E,6,0
^SCR("W4TOTT","P",3,"HELP")

^SCR("W4TOTT","P",3,"LMAX")
6
^SCR("W4TOTT","P",3,"MUMPS1")

^SCR("W4TOTT","P",3,"MUMPS2")

^SCR("W4TOTT","P",3,"OUTPUT")

^SCR("W4TOTT","P",3,"TYP")
E
^SCR("W4TOTT","P",4,"CRD")
7,68,E,6,0
^SCR("W4TOTT","P",4,"HELP")

^SCR("W4TOTT","P",4,"LMAX")
6
^SCR("W4TOTT","P",4,"MUMPS1")

^SCR("W4TOTT","P",4,"MUMPS2")

^SCR("W4TOTT","P",4,"OUTPUT")

^SCR("W4TOTT","P",4,"TYP")
E
^SCR("W4TOTT","P",5,"CRD")
4,45,N,8,2
^SCR("W4TOTT","P",5,"HELP")

^SCR("W4TOTT","P",5,"LMAX")
8
^SCR("W4TOTT","P",5,"MUMPS1")

^SCR("W4TOTT","P",5,"MUMPS2")

^SCR("W4TOTT","P",5,"OUTPUT")

^SCR("W4TOTT","P",5,"TYP")
N
^SCR("W4TOTT","P",6,"CRD")
8,68,E,6,0
^SCR("W4TOTT","P",6,"HELP")

^SCR("W4TOTT","P",6,"LMAX")
6
^SCR("W4TOTT","P",6,"MUMPS1")

^SCR("W4TOTT","P",6,"MUMPS2")

^SCR("W4TOTT","P",6,"OUTPUT")

^SCR("W4TOTT","P",6,"TYP")
E
^SCR("W4TOTT","P",7,"CRD")
9,68,E,6,0
^SCR("W4TOTT","P",7,"HELP")

^SCR("W4TOTT","P",7,"LMAX")
6
^SCR("W4TOTT","P",7,"MUMPS1")

^SCR("W4TOTT","P",7,"MUMPS2")

^SCR("W4TOTT","P",7,"OUTPUT")

^SCR("W4TOTT","P",7,"TYP")
E
^SCR("W4TOTT","P",8,"CRD")
10,68,E,6,0
^SCR("W4TOTT","P",8,"HELP")

^SCR("W4TOTT","P",8,"LMAX")
6
^SCR("W4TOTT","P",8,"MUMPS1")

^SCR("W4TOTT","P",8,"MUMPS2")

^SCR("W4TOTT","P",8,"OUTPUT")

^SCR("W4TOTT","P",8,"TYP")
E
^SCR("W4TOTT","P",9,"CRD")
11,68,E,6,0
^SCR("W4TOTT","P",9,"HELP")

^SCR("W4TOTT","P",9,"LMAX")
6
^SCR("W4TOTT","P",9,"MUMPS1")

^SCR("W4TOTT","P",9,"MUMPS2")

^SCR("W4TOTT","P",9,"OUTPUT")

^SCR("W4TOTT","P",9,"TYP")
E
^SCR("W4TOTT","P",10,"CRD")
7,45,N,8,2
^SCR("W4TOTT","P",10,"HELP")

^SCR("W4TOTT","P",10,"LMAX")
8
^SCR("W4TOTT","P",10,"MUMPS1")

^SCR("W4TOTT","P",10,"MUMPS2")

^SCR("W4TOTT","P",10,"OUTPUT")

^SCR("W4TOTT","P",10,"TYP")
N
^SCR("W4TOTT","P",11,"CRD")
8,45,N,8,2
^SCR("W4TOTT","P",11,"HELP")

^SCR("W4TOTT","P",11,"LMAX")
8
^SCR("W4TOTT","P",11,"MUMPS1")

^SCR("W4TOTT","P",11,"MUMPS2")

^SCR("W4TOTT","P",11,"OUTPUT")

^SCR("W4TOTT","P",11,"TYP")
N
^SCR("W4TOTT","P",12,"CRD")
21,45,N,8,2
^SCR("W4TOTT","P",12,"HELP")

^SCR("W4TOTT","P",12,"LMAX")
8
^SCR("W4TOTT","P",12,"MUMPS1")

^SCR("W4TOTT","P",12,"MUMPS2")

^SCR("W4TOTT","P",12,"OUTPUT")

^SCR("W4TOTT","P",12,"TYP")
N
^SCR("W4TOTT","P",13,"CRD")
21,28,N,8,2
^SCR("W4TOTT","P",13,"HELP")

^SCR("W4TOTT","P",13,"LMAX")
9
^SCR("W4TOTT","P",13,"MUMPS1")

^SCR("W4TOTT","P",13,"MUMPS2")

^SCR("W4TOTT","P",13,"OUTPUT")

^SCR("W4TOTT","P",13,"TYP")
N
^SCR("W4TOTT","P",14,"CRD")
21,1,N,10,2
^SCR("W4TOTT","P",14,"HELP")

^SCR("W4TOTT","P",14,"LMAX")
11
^SCR("W4TOTT","P",14,"MUMPS1")

^SCR("W4TOTT","P",14,"MUMPS2")

^SCR("W4TOTT","P",14,"OUTPUT")

^SCR("W4TOTT","P",14,"TYP")
N
^SCR("W4TOTT","P",15,"CRD")
9,45,N,8,2
^SCR("W4TOTT","P",15,"HELP")

^SCR("W4TOTT","P",15,"LMAX")
8
^SCR("W4TOTT","P",15,"MUMPS1")

^SCR("W4TOTT","P",15,"MUMPS2")

^SCR("W4TOTT","P",15,"OUTPUT")

^SCR("W4TOTT","P",15,"TYP")
N
^SCR("W4TOTT","P",16,"CRD")
12,68,E,6,0
^SCR("W4TOTT","P",16,"HELP")

^SCR("W4TOTT","P",16,"LMAX")
6
^SCR("W4TOTT","P",16,"MUMPS1")

^SCR("W4TOTT","P",16,"MUMPS2")

^SCR("W4TOTT","P",16,"OUTPUT")

^SCR("W4TOTT","P",16,"TYP")
E
^SCR("W4TOTT","P",18,"CRD")
13,68,E,6,0
^SCR("W4TOTT","P",18,"HELP")

^SCR("W4TOTT","P",18,"LMAX")
6
^SCR("W4TOTT","P",18,"MUMPS1")

^SCR("W4TOTT","P",18,"MUMPS2")

^SCR("W4TOTT","P",18,"OUTPUT")

^SCR("W4TOTT","P",18,"TYP")
E
^SCR("W4TOTT","P",19,"CRD")
14,68,E,6,0
^SCR("W4TOTT","P",19,"HELP")

^SCR("W4TOTT","P",19,"LMAX")
6
^SCR("W4TOTT","P",19,"MUMPS1")

^SCR("W4TOTT","P",19,"MUMPS2")

^SCR("W4TOTT","P",19,"OUTPUT")

^SCR("W4TOTT","P",19,"TYP")
E
^SCR("W4TOTT","P",20,"CRD")
10,45,N,8,2
^SCR("W4TOTT","P",20,"HELP")

^SCR("W4TOTT","P",20,"LMAX")
8
^SCR("W4TOTT","P",20,"MUMPS1")

^SCR("W4TOTT","P",20,"MUMPS2")

^SCR("W4TOTT","P",20,"OUTPUT")

^SCR("W4TOTT","P",20,"TYP")
N
^SCR("W4TOTT","P",21,"CRD")
5,68,E,6,0
^SCR("W4TOTT","P",21,"HELP")

^SCR("W4TOTT","P",21,"LMAX")
6
^SCR("W4TOTT","P",21,"MUMPS1")

^SCR("W4TOTT","P",21,"MUMPS2")

^SCR("W4TOTT","P",21,"OUTPUT")

^SCR("W4TOTT","P",21,"TYP")
E
^SCR("W4TOTT","P",25,"CRD")
11,45,N,8,2
^SCR("W4TOTT","P",25,"HELP")

^SCR("W4TOTT","P",25,"LMAX")
8
^SCR("W4TOTT","P",25,"MUMPS1")

^SCR("W4TOTT","P",25,"MUMPS2")

^SCR("W4TOTT","P",25,"OUTPUT")

^SCR("W4TOTT","P",25,"TYP")
N
^SCR("W4TOTT","P",26,"CRD")
12,45,N,8,2
^SCR("W4TOTT","P",26,"HELP")

^SCR("W4TOTT","P",26,"LMAX")
8
^SCR("W4TOTT","P",26,"MUMPS1")

^SCR("W4TOTT","P",26,"MUMPS2")

^SCR("W4TOTT","P",26,"OUTPUT")

^SCR("W4TOTT","P",26,"TYP")
N
^SCR("W4TOTT","P",28,"CRD")
5,45,N,8,2
^SCR("W4TOTT","P",28,"HELP")

^SCR("W4TOTT","P",28,"LMAX")
8
^SCR("W4TOTT","P",28,"MUMPS1")

^SCR("W4TOTT","P",28,"MUMPS2")

^SCR("W4TOTT","P",28,"TYP")
N
^SCR("W4TOTT","P",29,"CRD")
6,45,N,8,2
^SCR("W4TOTT","P",29,"HELP")

^SCR("W4TOTT","P",29,"LMAX")
8
^SCR("W4TOTT","P",29,"MUMPS1")

^SCR("W4TOTT","P",29,"MUMPS2")

^SCR("W4TOTT","P",29,"OUTPUT")

^SCR("W4TOTT","P",29,"TYP")
N
^SCR("W4TOTT","P",30,"CRD")
5,65,H,9
^SCR("W4TOTT","P",30,"HELP")

^SCR("W4TOTT","P",30,"LMAX")
9
^SCR("W4TOTT","P",30,"MUMPS1")

^SCR("W4TOTT","P",30,"MUMPS2")

^SCR("W4TOTT","P",30,"OUTPUT")

^SCR("W4TOTT","P",30,"TYP")
H
^SCR("W4TOTT","P",31,"CRD")
13,45,N,8,2
^SCR("W4TOTT","P",31,"HELP")

^SCR("W4TOTT","P",31,"LMAX")
8
^SCR("W4TOTT","P",31,"MUMPS1")

^SCR("W4TOTT","P",31,"MUMPS2")

^SCR("W4TOTT","P",31,"OUTPUT")

^SCR("W4TOTT","P",31,"TYP")
N
^SCR("W4TOTT","P",32,"CRD")
13,28,N,8,2
^SCR("W4TOTT","P",32,"HELP")

^SCR("W4TOTT","P",32,"LMAX")
11
^SCR("W4TOTT","P",32,"MUMPS1")

^SCR("W4TOTT","P",32,"MUMPS2")

^SCR("W4TOTT","P",32,"OUTPUT")

^SCR("W4TOTT","P",32,"TYP")
N
^SCR("W4TOTT","P",33,"CRD")
13,14,N,9,2
^SCR("W4TOTT","P",33,"HELP")

^SCR("W4TOTT","P",33,"LMAX")
9
^SCR("W4TOTT","P",33,"MUMPS1")

^SCR("W4TOTT","P",33,"MUMPS2")

^SCR("W4TOTT","P",33,"OUTPUT")

^SCR("W4TOTT","P",33,"TYP")
N
^SCR("W4TOTT","P",34,"CRD")
14,45,N,8,2
^SCR("W4TOTT","P",34,"HELP")

^SCR("W4TOTT","P",34,"LMAX")
8
^SCR("W4TOTT","P",34,"MUMPS1")

^SCR("W4TOTT","P",34,"MUMPS2")

^SCR("W4TOTT","P",34,"OUTPUT")

^SCR("W4TOTT","P",34,"TYP")
N
^SCR("W4TOTT","P",35,"CRD")
16,44,N,9,2
^SCR("W4TOTT","P",35,"HELP")

^SCR("W4TOTT","P",35,"LMAX")
9
^SCR("W4TOTT","P",35,"MUMPS1")

^SCR("W4TOTT","P",35,"MUMPS2")

^SCR("W4TOTT","P",35,"OUTPUT")

^SCR("W4TOTT","P",35,"TYP")
N
^SCR("W4TOTT","P",36,"CRD")
14,28,N,9,2
^SCR("W4TOTT","P",36,"HELP")

^SCR("W4TOTT","P",36,"LMAX")
11
^SCR("W4TOTT","P",36,"MUMPS1")

^SCR("W4TOTT","P",36,"MUMPS2")

^SCR("W4TOTT","P",36,"OUTPUT")

^SCR("W4TOTT","P",36,"TYP")
N
^SCR("W4TOTT","P",37,"CRD")
14,14,N,9,2
^SCR("W4TOTT","P",37,"HELP")

^SCR("W4TOTT","P",37,"LMAX")
9
^SCR("W4TOTT","P",37,"MUMPS1")

^SCR("W4TOTT","P",37,"MUMPS2")

^SCR("W4TOTT","P",37,"OUTPUT")

^SCR("W4TOTT","P",37,"TYP")
N
^SCR("W4TOTT","P",40,"CRD")
25,48,N,8,2
^SCR("W4TOTT","P",40,"HELP")

^SCR("W4TOTT","P",40,"LMAX")
8
^SCR("W4TOTT","P",40,"MUMPS1")

^SCR("W4TOTT","P",40,"MUMPS2")

^SCR("W4TOTT","P",40,"OUTPUT")

^SCR("W4TOTT","P",40,"TYP")
N
^SCR("W4TOTT","P",41,"CRD")
25,24,N,8,2
^SCR("W4TOTT","P",41,"HELP")

^SCR("W4TOTT","P",41,"LMAX")
8
^SCR("W4TOTT","P",41,"MUMPS1")

^SCR("W4TOTT","P",41,"MUMPS2")

^SCR("W4TOTT","P",41,"OUTPUT")

^SCR("W4TOTT","P",41,"TYP")
N
^SCR("W4TOTT","P",42,"CRD")
26,45,N,8,2
^SCR("W4TOTT","P",42,"HELP")

^SCR("W4TOTT","P",42,"LMAX")
8
^SCR("W4TOTT","P",42,"MUMPS1")

^SCR("W4TOTT","P",42,"MUMPS2")

^SCR("W4TOTT","P",42,"OUTPUT")

^SCR("W4TOTT","P",42,"TYP")
N
^SCR("W4TOTT","P",43,"CRD")
25,1,N,8,2
^SCR("W4TOTT","P",43,"HELP")

^SCR("W4TOTT","P",43,"LMAX")
8
^SCR("W4TOTT","P",43,"MUMPS1")

^SCR("W4TOTT","P",43,"MUMPS2")

^SCR("W4TOTT","P",43,"OUTPUT")

^SCR("W4TOTT","P",43,"TYP")
N
^SCR("W4TOTT","P",45,"CRD")
24,53,N,8,2
^SCR("W4TOTT","P",45,"HELP")

^SCR("W4TOTT","P",45,"LMAX")
8
^SCR("W4TOTT","P",45,"MUMPS1")

^SCR("W4TOTT","P",45,"MUMPS2")

^SCR("W4TOTT","P",45,"OUTPUT")

^SCR("W4TOTT","P",45,"TYP")
N
^SCR("W4TOTT","P",47,"CRD")
26,22,N,8,2
^SCR("W4TOTT","P",47,"HELP")

^SCR("W4TOTT","P",47,"LMAX")
8
^SCR("W4TOTT","P",47,"MUMPS1")

^SCR("W4TOTT","P",47,"MUMPS2")

^SCR("W4TOTT","P",47,"OUTPUT")

^SCR("W4TOTT","P",47,"TYP")
N
^SCR("W4TOTT","P",49,"CRD")
17,44,N,9,2
^SCR("W4TOTT","P",49,"HELP")

^SCR("W4TOTT","P",49,"LMAX")
9
^SCR("W4TOTT","P",49,"MUMPS1")

^SCR("W4TOTT","P",49,"MUMPS2")

^SCR("W4TOTT","P",49,"OUTPUT")

^SCR("W4TOTT","P",49,"TYP")
N
^SCR("W4TOTT","P",50,"CRD")
27,51,N,8,2
^SCR("W4TOTT","P",50,"HELP")

^SCR("W4TOTT","P",50,"LMAX")
8
^SCR("W4TOTT","P",50,"MUMPS1")

^SCR("W4TOTT","P",50,"MUMPS2")

^SCR("W4TOTT","P",50,"OUTPUT")

^SCR("W4TOTT","P",50,"TYP")
N
^SCR("W4TOTT","P",51,"CRD")
19,55,N,9,2
^SCR("W4TOTT","P",51,"HELP")

^SCR("W4TOTT","P",51,"LMAX")
9
^SCR("W4TOTT","P",51,"MUMPS1")

^SCR("W4TOTT","P",51,"MUMPS2")

^SCR("W4TOTT","P",51,"OUTPUT")

^SCR("W4TOTT","P",51,"TYP")
N
^SCR("W4TOTT","P",52,"CRD")
28,47,N,8,2
^SCR("W4TOTT","P",52,"HELP")

^SCR("W4TOTT","P",52,"LMAX")
9
^SCR("W4TOTT","P",52,"MUMPS1")

^SCR("W4TOTT","P",52,"MUMPS2")

^SCR("W4TOTT","P",52,"OUTPUT")

^SCR("W4TOTT","P",52,"TYP")
N
^SCR("W4TOTT","P",55,"CRD")
6,28,N,8,2
^SCR("W4TOTT","P",55,"HELP")

^SCR("W4TOTT","P",55,"LMAX")
11
^SCR("W4TOTT","P",55,"MUMPS1")

^SCR("W4TOTT","P",55,"MUMPS2")

^SCR("W4TOTT","P",55,"OUTPUT")

^SCR("W4TOTT","P",55,"TYP")
N
^SCR("W4TOTT","P",56,"CRD")
29,79,H,43
^SCR("W4TOTT","P",56,"HELP")

^SCR("W4TOTT","P",56,"LMAX")
43
^SCR("W4TOTT","P",56,"MUMPS1")

^SCR("W4TOTT","P",56,"MUMPS2")

^SCR("W4TOTT","P",56,"OUTPUT")

^SCR("W4TOTT","P",56,"TYP")
H
^SCR("W4TOTT","P",58,"CRD")
6,14,N,9,2
^SCR("W4TOTT","P",58,"HELP")

^SCR("W4TOTT","P",58,"LMAX")
9
^SCR("W4TOTT","P",58,"MUMPS1")

^SCR("W4TOTT","P",58,"MUMPS2")

^SCR("W4TOTT","P",58,"OUTPUT")

^SCR("W4TOTT","P",58,"TYP")
N
^SCR("W4TOTT","P",59,"CRD")
30,79,H,43
^SCR("W4TOTT","P",59,"HELP")

^SCR("W4TOTT","P",59,"LMAX")
43
^SCR("W4TOTT","P",59,"MUMPS1")

^SCR("W4TOTT","P",59,"MUMPS2")

^SCR("W4TOTT","P",59,"OUTPUT")

^SCR("W4TOTT","P",59,"TYP")
H
^SCR("W4TOTT","P",60,"CRD")
7,28,N,8,2
^SCR("W4TOTT","P",60,"HELP")

^SCR("W4TOTT","P",60,"LMAX")
11
^SCR("W4TOTT","P",60,"MUMPS1")

^SCR("W4TOTT","P",60,"MUMPS2")

^SCR("W4TOTT","P",60,"OUTPUT")

^SCR("W4TOTT","P",60,"TYP")
N
^SCR("W4TOTT","P",61,"CRD")
8,28,N,8,2
^SCR("W4TOTT","P",61,"HELP")

^SCR("W4TOTT","P",61,"LMAX")
11
^SCR("W4TOTT","P",61,"MUMPS1")

^SCR("W4TOTT","P",61,"MUMPS2")

^SCR("W4TOTT","P",61,"OUTPUT")

^SCR("W4TOTT","P",61,"TYP")
N
^SCR("W4TOTT","P",62,"CRD")
18,6,N,8,2
^SCR("W4TOTT","P",62,"HELP")

^SCR("W4TOTT","P",62,"LMAX")
9
^SCR("W4TOTT","P",62,"MUMPS1")

^SCR("W4TOTT","P",62,"MUMPS2")

^SCR("W4TOTT","P",62,"OUTPUT")

^SCR("W4TOTT","P",62,"TYP")
N
^SCR("W4TOTT","P",65,"CRD")
7,14,N,9,2
^SCR("W4TOTT","P",65,"HELP")

^SCR("W4TOTT","P",65,"LMAX")
9
^SCR("W4TOTT","P",65,"MUMPS1")

^SCR("W4TOTT","P",65,"MUMPS2")

^SCR("W4TOTT","P",65,"OUTPUT")

^SCR("W4TOTT","P",65,"TYP")
N
^SCR("W4TOTT","P",67,"CRD")
8,14,N,9,2
^SCR("W4TOTT","P",67,"HELP")

^SCR("W4TOTT","P",67,"LMAX")
9
^SCR("W4TOTT","P",67,"MUMPS1")

^SCR("W4TOTT","P",67,"MUMPS2")

^SCR("W4TOTT","P",67,"TYP")
N
^SCR("W4TOTT","P",70,"CRD")
9,28,N,8,2
^SCR("W4TOTT","P",70,"HELP")

^SCR("W4TOTT","P",70,"LMAX")
11
^SCR("W4TOTT","P",70,"MUMPS1")

^SCR("W4TOTT","P",70,"MUMPS2")

^SCR("W4TOTT","P",70,"OUTPUT")

^SCR("W4TOTT","P",70,"TYP")
N
^SCR("W4TOTT","P",72,"CRD")
9,14,N,9,2
^SCR("W4TOTT","P",72,"HELP")

^SCR("W4TOTT","P",72,"LMAX")
9
^SCR("W4TOTT","P",72,"MUMPS1")

^SCR("W4TOTT","P",72,"MUMPS2")

^SCR("W4TOTT","P",72,"OUTPUT")

^SCR("W4TOTT","P",72,"TYP")
N
^SCR("W4TOTT","P",75,"CRD")
10,28,N,8,2
^SCR("W4TOTT","P",75,"HELP")

^SCR("W4TOTT","P",75,"LMAX")
11
^SCR("W4TOTT","P",75,"MUMPS1")

^SCR("W4TOTT","P",75,"MUMPS2")

^SCR("W4TOTT","P",75,"OUTPUT")

^SCR("W4TOTT","P",75,"TYP")
N
^SCR("W4TOTT","P",78,"CRD")
10,14,N,9,2
^SCR("W4TOTT","P",78,"HELP")

^SCR("W4TOTT","P",78,"LMAX")
9
^SCR("W4TOTT","P",78,"MUMPS1")

^SCR("W4TOTT","P",78,"MUMPS2")

^SCR("W4TOTT","P",78,"OUTPUT")

^SCR("W4TOTT","P",78,"TYP")
N
^SCR("W4TOTT","P",80,"CRD")
11,28,N,8,2
^SCR("W4TOTT","P",80,"HELP")

^SCR("W4TOTT","P",80,"LMAX")
11
^SCR("W4TOTT","P",80,"MUMPS1")

^SCR("W4TOTT","P",80,"MUMPS2")

^SCR("W4TOTT","P",80,"OUTPUT")

^SCR("W4TOTT","P",80,"TYP")
N
^SCR("W4TOTT","P",82,"CRD")
11,14,N,9,2
^SCR("W4TOTT","P",82,"HELP")

^SCR("W4TOTT","P",82,"LMAX")
9
^SCR("W4TOTT","P",82,"MUMPS1")

^SCR("W4TOTT","P",82,"MUMPS2")

^SCR("W4TOTT","P",82,"OUTPUT")

^SCR("W4TOTT","P",82,"TYP")
N
^SCR("W4TOTT","P",83,"CRD")
12,28,N,8,2
^SCR("W4TOTT","P",83,"HELP")

^SCR("W4TOTT","P",83,"LMAX")
11
^SCR("W4TOTT","P",83,"MUMPS1")

^SCR("W4TOTT","P",83,"MUMPS2")

^SCR("W4TOTT","P",83,"OUTPUT")

^SCR("W4TOTT","P",83,"TYP")
N
^SCR("W4TOTT","P",84,"CRD")
12,14,N,9,2
^SCR("W4TOTT","P",84,"HELP")

^SCR("W4TOTT","P",84,"LMAX")
9
^SCR("W4TOTT","P",84,"MUMPS1")

^SCR("W4TOTT","P",84,"MUMPS2")

^SCR("W4TOTT","P",84,"OUTPUT")

^SCR("W4TOTT","P",84,"TYP")
N
^SCR("W4TOTT","P",85,"CRD")
5,14,N,9,2
^SCR("W4TOTT","P",85,"HELP")

^SCR("W4TOTT","P",85,"LMAX")
9
^SCR("W4TOTT","P",85,"MUMPS1")

^SCR("W4TOTT","P",85,"MUMPS2")

^SCR("W4TOTT","P",85,"OUTPUT")

^SCR("W4TOTT","P",85,"TYP")
N
^SCR("W4TOTT","P",86,"CRD")
20,1,N,9,2
^SCR("W4TOTT","P",86,"HELP")

^SCR("W4TOTT","P",86,"LMAX")
10
^SCR("W4TOTT","P",86,"MUMPS1")

^SCR("W4TOTT","P",86,"MUMPS2")

^SCR("W4TOTT","P",86,"OUTPUT")

^SCR("W4TOTT","P",86,"TYP")
N
^SCR("W4TOTT","P",87,"CRD")
17,1,N,10,2
^SCR("W4TOTT","P",87,"HELP")

^SCR("W4TOTT","P",87,"LMAX")
10
^SCR("W4TOTT","P",87,"MUMPS1")

^SCR("W4TOTT","P",87,"MUMPS2")

^SCR("W4TOTT","P",87,"OUTPUT")

^SCR("W4TOTT","P",87,"TYP")
N
^SCR("W4TOTT","P",88,"CRD")
19,28,N,9,2
^SCR("W4TOTT","P",88,"HELP")

^SCR("W4TOTT","P",88,"LMAX")
10
^SCR("W4TOTT","P",88,"MUMPS1")

^SCR("W4TOTT","P",88,"MUMPS2")

^SCR("W4TOTT","P",88,"OUTPUT")

^SCR("W4TOTT","P",88,"TYP")
N
^SCR("W4TOTT","P",89,"CRD")
19,1,N,9,2
^SCR("W4TOTT","P",89,"HELP")

^SCR("W4TOTT","P",89,"LMAX")
10
^SCR("W4TOTT","P",89,"MUMPS1")

^SCR("W4TOTT","P",89,"MUMPS2")

^SCR("W4TOTT","P",89,"OUTPUT")

^SCR("W4TOTT","P",89,"TYP")
N
^SCR("W4TOTT","P",90,"CRD")
16,28,N,8,2
^SCR("W4TOTT","P",90,"HELP")

^SCR("W4TOTT","P",90,"LMAX")
11
^SCR("W4TOTT","P",90,"MUMPS1")

^SCR("W4TOTT","P",90,"MUMPS2")

^SCR("W4TOTT","P",90,"OUTPUT")

^SCR("W4TOTT","P",90,"TYP")
N
^SCR("W4TOTT","P",91,"CRD")
22,68,H,65
^SCR("W4TOTT","P",91,"HELP")

^SCR("W4TOTT","P",91,"LMAX")
66
^SCR("W4TOTT","P",91,"MUMPS1")

^SCR("W4TOTT","P",91,"MUMPS2")

^SCR("W4TOTT","P",91,"OUTPUT")

^SCR("W4TOTT","P",91,"TYP")
H
^SCR("W4TOTT","P",92,"CRD")
23,68,H,66
^SCR("W4TOTT","P",92,"HELP")

^SCR("W4TOTT","P",92,"LMAX")
66
^SCR("W4TOTT","P",92,"MUMPS1")

^SCR("W4TOTT","P",92,"MUMPS2")

^SCR("W4TOTT","P",92,"OUTPUT")

^SCR("W4TOTT","P",92,"TYP")
H
^SCR("W4TOTT","P",93,"CRD")
24,30,E,8,0
^SCR("W4TOTT","P",93,"HELP")

^SCR("W4TOTT","P",93,"LMAX")
8
^SCR("W4TOTT","P",93,"MUMPS1")

^SCR("W4TOTT","P",93,"MUMPS2")

^SCR("W4TOTT","P",93,"OUTPUT")

^SCR("W4TOTT","P",93,"TYP")
E
^SCR("W4TOTT","P",94,"CRD")
24,3,E,9,0
^SCR("W4TOTT","P",94,"HELP")

^SCR("W4TOTT","P",94,"LMAX")
9
^SCR("W4TOTT","P",94,"MUMPS1")

^SCR("W4TOTT","P",94,"MUMPS2")

^SCR("W4TOTT","P",94,"OUTPUT")

^SCR("W4TOTT","P",94,"TYP")
E
^SCR("W4TOTT","P",95,"CRD")
17,13,N,10,2
^SCR("W4TOTT","P",95,"HELP")

^SCR("W4TOTT","P",95,"LMAX")
10
^SCR("W4TOTT","P",95,"MUMPS1")

^SCR("W4TOTT","P",95,"MUMPS2")

^SCR("W4TOTT","P",95,"OUTPUT")

^SCR("W4TOTT","P",95,"TYP")
N
^SCR("W4TOTT","P",96,"CRD")
26,20,H,17
^SCR("W4TOTT","P",96,"HELP")

^SCR("W4TOTT","P",96,"LMAX")
17
^SCR("W4TOTT","P",96,"MUMPS1")

^SCR("W4TOTT","P",96,"MUMPS2")

^SCR("W4TOTT","P",96,"OUTPUT")

^SCR("W4TOTT","P",96,"TYP")
H
^SCR("W4TOTT","P",97,"CRD")
16,14,N,9,2
^SCR("W4TOTT","P",97,"HELP")

^SCR("W4TOTT","P",97,"LMAX")
9
^SCR("W4TOTT","P",97,"MUMPS1")

^SCR("W4TOTT","P",97,"MUMPS2")

^SCR("W4TOTT","P",97,"OUTPUT")

^SCR("W4TOTT","P",97,"TYP")
N
^SCR("W4TOTT","P",98,"CRD")
27,23,N,10,2
^SCR("W4TOTT","P",98,"HELP")

^SCR("W4TOTT","P",98,"LMAX")
10
^SCR("W4TOTT","P",98,"MUMPS1")

^SCR("W4TOTT","P",98,"MUMPS2")

^SCR("W4TOTT","P",98,"OUTPUT")

^SCR("W4TOTT","P",98,"TYP")
N
^SCR("W4TOTT","P","NAME","AEQ")
16
^SCR("W4TOTT","P","NAME","AEX")
26
^SCR("W4TOTT","P","NAME","AEXS")
84
^SCR("W4TOTT","P","NAME","ALPHA")
34
^SCR("W4TOTT","P","NAME","ALPHAS")
37
^SCR("W4TOTT","P","NAME","ALQ")
19
^SCR("W4TOTT","P","NAME","ASR")
12
^SCR("W4TOTT","P","NAME","BIT")
50
^SCR("W4TOTT","P","NAME","BNQ")
6
^SCR("W4TOTT","P","NAME","CAFUT")
62
^SCR("W4TOTT","P","NAME","CAS")
95
^SCR("W4TOTT","P","NAME","CASHD")
87
^SCR("W4TOTT","P","NAME","CHKM")
11
^SCR("W4TOTT","P","NAME","CHKMS")
67
^SCR("W4TOTT","P","NAME","CHKO")
10
^SCR("W4TOTT","P","NAME","CHKS")
65
^SCR("W4TOTT","P","NAME","CHQ")
4
^SCR("W4TOTT","P","NAME","DMSHS")
47
^SCR("W4TOTT","P","NAME","DNQ")
9
^SCR("W4TOTT","P","NAME","DNR")
25
^SCR("W4TOTT","P","NAME","DNRS")
82
^SCR("W4TOTT","P","NAME","HAEX")
83
^SCR("W4TOTT","P","NAME","HALPHA")
36
^SCR("W4TOTT","P","NAME","HAVT")
98
^SCR("W4TOTT","P","NAME","HCHKB")
61
^SCR("W4TOTT","P","NAME","HCHKO")
60
^SCR("W4TOTT","P","NAME","HDNR")
80
^SCR("W4TOTT","P","NAME","HISR")
70
^SCR("W4TOTT","P","NAME","HJCB")
32
^SCR("W4TOTT","P","NAME","HMK")
94
^SCR("W4TOTT","P","NAME","HMZM")
55
^SCR("W4TOTT","P","NAME","HNHCIB")
43
^SCR("W4TOTT","P","NAME","HNHL")
41
^SCR("W4TOTT","P","NAME","HNHS")
40
^SCR("W4TOTT","P","NAME","HSHUM")
90
^SCR("W4TOTT","P","NAME","HVIZ")
75
^SCR("W4TOTT","P","NAME","ISQ")
7
^SCR("W4TOTT","P","NAME","ISR")
15
^SCR("W4TOTT","P","NAME","ISRS")
72
^SCR("W4TOTT","P","NAME","JCB")
31
^SCR("W4TOTT","P","NAME","JCBS")
33
^SCR("W4TOTT","P","NAME","JCQ")
18
^SCR("W4TOTT","P","NAME","LLS")
56
^SCR("W4TOTT","P","NAME","LLT")
59
^SCR("W4TOTT","P","NAME","LMAM")
51
^SCR("W4TOTT","P","NAME","MAMS")
49
^SCR("W4TOTT","P","NAME","MIN3")
45
^SCR("W4TOTT","P","NAME","MSDAMSL")
92
^SCR("W4TOTT","P","NAME","MSDMSL")
91
^SCR("W4TOTT","P","NAME","MZM")
5
^SCR("W4TOTT","P","NAME","MZMNT")
29
^SCR("W4TOTT","P","NAME","MZMS")
58
^SCR("W4TOTT","P","NAME","MZQ")
3
^SCR("W4TOTT","P","NAME","SCIB")
88
^SCR("W4TOTT","P","NAME","SCOUP")
86
^SCR("W4TOTT","P","NAME","SHUM")
35
^SCR("W4TOTT","P","NAME","SHUMS")
97
^SCR("W4TOTT","P","NAME","SMHIRA")
14
^SCR("W4TOTT","P","NAME","SMSL")
96
^SCR("W4TOTT","P","NAME","SSOAD")
93
^SCR("W4TOTT","P","NAME","STENB")
89
^SCR("W4TOTT","P","NAME","SUMB")
52
^SCR("W4TOTT","P","NAME","SUMP")
42
^SCR("W4TOTT","P","NAME","TIP")
28
^SCR("W4TOTT","P","NAME","TIPPS")
30
^SCR("W4TOTT","P","NAME","TIPS")
85
^SCR("W4TOTT","P","NAME","TIQ")
21
^SCR("W4TOTT","P","NAME","TL")
13
^SCR("W4TOTT","P","NAME","VIZ")
20
^SCR("W4TOTT","P","NAME","VIZS")
78
^SCR("W4TOTT","P","NAME","VZQ")
8
^SCR("W4TOTT","P","NM",3)
MZQ
^SCR("W4TOTT","P","NM",4)
CHQ
^SCR("W4TOTT","P","NM",5)
MZM
^SCR("W4TOTT","P","NM",6)
BNQ
^SCR("W4TOTT","P","NM",7)
ISQ
^SCR("W4TOTT","P","NM",8)
VZQ
^SCR("W4TOTT","P","NM",9)
DNQ
^SCR("W4TOTT","P","NM",10)
CHKO
^SCR("W4TOTT","P","NM",11)
CHKM
^SCR("W4TOTT","P","NM",12)
ASR
^SCR("W4TOTT","P","NM",13)
TL
^SCR("W4TOTT","P","NM",14)
SMHIRA
^SCR("W4TOTT","P","NM",15)
ISR
^SCR("W4TOTT","P","NM",16)
AEQ
^SCR("W4TOTT","P","NM",18)
JCQ
^SCR("W4TOTT","P","NM",19)
ALQ
^SCR("W4TOTT","P","NM",20)
VIZ
^SCR("W4TOTT","P","NM",21)
TIQ
^SCR("W4TOTT","P","NM",25)
DNR
^SCR("W4TOTT","P","NM",26)
AEX
^SCR("W4TOTT","P","NM",28)
TIP
^SCR("W4TOTT","P","NM",29)
MZMNT
^SCR("W4TOTT","P","NM",30)
TIPPS
^SCR("W4TOTT","P","NM",31)
JCB
^SCR("W4TOTT","P","NM",32)
HJCB
^SCR("W4TOTT","P","NM",33)
JCBS
^SCR("W4TOTT","P","NM",34)
ALPHA
^SCR("W4TOTT","P","NM",35)
SHUM
^SCR("W4TOTT","P","NM",36)
HALPHA
^SCR("W4TOTT","P","NM",37)
ALPHAS
^SCR("W4TOTT","P","NM",40)
HNHS
^SCR("W4TOTT","P","NM",41)
HNHL
^SCR("W4TOTT","P","NM",42)
SUMP
^SCR("W4TOTT","P","NM",43)
HNHCIB
^SCR("W4TOTT","P","NM",45)
MIN3
^SCR("W4TOTT","P","NM",47)
DMSHS
^SCR("W4TOTT","P","NM",49)
MAMS
^SCR("W4TOTT","P","NM",50)
BIT
^SCR("W4TOTT","P","NM",51)
LMAM
^SCR("W4TOTT","P","NM",52)
SUMB
^SCR("W4TOTT","P","NM",55)
HMZM
^SCR("W4TOTT","P","NM",56)
LLS
^SCR("W4TOTT","P","NM",58)
MZMS
^SCR("W4TOTT","P","NM",59)
LLT
^SCR("W4TOTT","P","NM",60)
HCHKO
^SCR("W4TOTT","P","NM",61)
HCHKB
^SCR("W4TOTT","P","NM",62)
CAFUT
^SCR("W4TOTT","P","NM",65)
CHKS
^SCR("W4TOTT","P","NM",67)
CHKMS
^SCR("W4TOTT","P","NM",70)
HISR
^SCR("W4TOTT","P","NM",72)
ISRS
^SCR("W4TOTT","P","NM",75)
HVIZ
^SCR("W4TOTT","P","NM",78)
VIZS
^SCR("W4TOTT","P","NM",80)
HDNR
^SCR("W4TOTT","P","NM",82)
DNRS
^SCR("W4TOTT","P","NM",83)
HAEX
^SCR("W4TOTT","P","NM",84)
AEXS
^SCR("W4TOTT","P","NM",85)
TIPS
^SCR("W4TOTT","P","NM",86)
SCOUP
^SCR("W4TOTT","P","NM",87)
CASHD
^SCR("W4TOTT","P","NM",88)
SCIB
^SCR("W4TOTT","P","NM",89)
STENB
^SCR("W4TOTT","P","NM",90)
HSHUM
^SCR("W4TOTT","P","NM",91)
MSDMSL
^SCR("W4TOTT","P","NM",92)
MSDAMSL
^SCR("W4TOTT","P","NM",93)
SSOAD
^SCR("W4TOTT","P","NM",94)
HMK
^SCR("W4TOTT","P","NM",95)
CAS
^SCR("W4TOTT","P","NM",96)
SMSL
^SCR("W4TOTT","P","NM",97)
SHUMS
^SCR("W4TOTT","P","NM",98)
HAVT
^SCR("W4VCLREP")
H
^SCR("W4VCLREP",1)
                        # cx`weilee zegewl lyzepirh g"ec #                     
^SCR("W4VCLREP",2)
                       {10     } jix`z cr {05     } jix`zn                     
^SCR("W4VCLREP",3)
              {15 }: (`l - 0 ,ok - 1) miinei minekiq bivdl                     
^SCR("W4VCLREP",4)
                                                                          1$   
^SCR("W4VCLREP",5)
      :  lawzd  : `zknq` :  qihxk 'qn  :   gewl my  :dlaw 'qn:  jix`z  :       
^SCR("W4VCLREP",6)
                                                                               
^SCR("W4VCLREP",7)
                                                                               
^SCR("W4VCLREP",8)
                                                                               
^SCR("W4VCLREP",9)
                                                                               
^SCR("W4VCLREP",10)
                                                                               
^SCR("W4VCLREP",11)
                                                                               
^SCR("W4VCLREP",12)
                                                                               
^SCR("W4VCLREP",13)
                                                                               
^SCR("W4VCLREP",14)
                                                                               
^SCR("W4VCLREP",15)
                                                                               
^SCR("W4VCLREP",16)
                                                                               
^SCR("W4VCLREP",17)
                                                                               
^SCR("W4VCLREP",18)
                                                                               
^SCR("W4VCLREP",19)
   $1                                                                          
^SCR("W4VCLREP",20)
                                                                               
^SCR("W4VCLREP",21)
   {25     } : lawzd k"dq                         {20    }: zelaw k"dq         
^SCR("W4VCLREP",22)
                                                                               
^SCR("W4VCLREP",23)
                                                                               
^SCR("W4VCLREP","A",1)
ƒ˜€—…‰Œ……š…‡…—ŒŒ™š…�‰’ˆ‡"…ƒ
^SCR("W4VCLREP","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("W4VCLREP","A",3)
:(€Œ-0,�‹-1)�‰‰Ž…‰�‰Ž…‹‰‘‚‰–„Œ
^SCR("W4VCLREP","A",4)

^SCR("W4VCLREP","A",5)
Œ�—š„€š‹Ž‘€‘‰ˆ˜‹'‘Ž‡…—Œ�™„Œ�—'‘ŽŠ‰˜€š
^SCR("W4VCLREP","A",6)
-----------------------------------------------------------
^SCR("W4VCLREP","A",7)

^SCR("W4VCLREP","A",8)

^SCR("W4VCLREP","A",9)

^SCR("W4VCLREP","A",10)

^SCR("W4VCLREP","A",11)

^SCR("W4VCLREP","A",12)

^SCR("W4VCLREP","A",13)

^SCR("W4VCLREP","A",14)

^SCR("W4VCLREP","A",15)

^SCR("W4VCLREP","A",16)

^SCR("W4VCLREP","A",17)

^SCR("W4VCLREP","A",18)

^SCR("W4VCLREP","A",19)

^SCR("W4VCLREP","A",20)

^SCR("W4VCLREP","A",21)
:Œ�—š„‹"„‘:š…Œ�—‹"„‘
^SCR("W4VCLREP","A",22)

^SCR("W4VCLREP","A",23)

^SCR("W4VCLREP","AV",1)
srteuhkuu,ujuekka,ubhgyj"us
^SCR("W4VCLREP","AV",2)
lhrt,sglhrt,n
^SCR("W4VCLREP","AV",3)
:(tk-0'if-1)ohhnuhohnufhxdhmvk
^SCR("W4VCLREP","AV",4)

^SCR("W4VCLREP","AV",5)
kce,vt,fnxtxhyrfwxnjuekoavkcewxnlhrt,
^SCR("W4VCLREP","AV",6)
-----------------------------------------------------------
^SCR("W4VCLREP","AV",7)

^SCR("W4VCLREP","AV",8)

^SCR("W4VCLREP","AV",9)

^SCR("W4VCLREP","AV",10)

^SCR("W4VCLREP","AV",11)

^SCR("W4VCLREP","AV",12)

^SCR("W4VCLREP","AV",13)

^SCR("W4VCLREP","AV",14)

^SCR("W4VCLREP","AV",15)

^SCR("W4VCLREP","AV",16)

^SCR("W4VCLREP","AV",17)

^SCR("W4VCLREP","AV",18)

^SCR("W4VCLREP","AV",19)

^SCR("W4VCLREP","AV",20)

^SCR("W4VCLREP","AV",21)
:kce,vf"vx:,ukcef"vx
^SCR("W4VCLREP","AV",22)

^SCR("W4VCLREP","AV",23)

^SCR("W4VCLREP","G",1,"CRD")
6,71,D,8,0
^SCR("W4VCLREP","G",1,"HELP")

^SCR("W4VCLREP","G",1,"LMAX")
9
^SCR("W4VCLREP","G",1,"MUMPS1")

^SCR("W4VCLREP","G",1,"MUMPS2")

^SCR("W4VCLREP","G",1,"OUTPUT")

^SCR("W4VCLREP","G",1,"SHEM")
  jix`z  
^SCR("W4VCLREP","G",1,"TYP")
D
^SCR("W4VCLREP","G",2,"CRD")
6,61,E,5,0
^SCR("W4VCLREP","G",2,"HELP")

^SCR("W4VCLREP","G",2,"LMAX")
8
^SCR("W4VCLREP","G",2,"MUMPS1")

^SCR("W4VCLREP","G",2,"MUMPS2")

^SCR("W4VCLREP","G",2,"OUTPUT")

^SCR("W4VCLREP","G",2,"SHEM")
dlaw 'qn
^SCR("W4VCLREP","G",2,"TYP")
E
^SCR("W4VCLREP","G",3,"CRD")
6,52,H,3,0
^SCR("W4VCLREP","G",3,"HELP")

^SCR("W4VCLREP","G",3,"LMAX")
12
^SCR("W4VCLREP","G",3,"MUMPS1")

^SCR("W4VCLREP","G",3,"MUMPS2")

^SCR("W4VCLREP","G",3,"OUTPUT")

^SCR("W4VCLREP","G",3,"SHEM")
   gewl my  
^SCR("W4VCLREP","G",3,"TYP")
H
^SCR("W4VCLREP","G",4,"CRD")
6,39,H,13,0
^SCR("W4VCLREP","G",4,"HELP")

^SCR("W4VCLREP","G",4,"LMAX")
13
^SCR("W4VCLREP","G",4,"MUMPS1")

^SCR("W4VCLREP","G",4,"MUMPS2")

^SCR("W4VCLREP","G",4,"OUTPUT")

^SCR("W4VCLREP","G",4,"SHEM")
  qihxk 'qn  
^SCR("W4VCLREP","G",4,"TYP")
H
^SCR("W4VCLREP","G",5,"CRD")
6,25,E,8,0
^SCR("W4VCLREP","G",5,"HELP")

^SCR("W4VCLREP","G",5,"LMAX")
8
^SCR("W4VCLREP","G",5,"MUMPS1")

^SCR("W4VCLREP","G",5,"MUMPS2")

^SCR("W4VCLREP","G",5,"SHEM")
 `zknq` 
^SCR("W4VCLREP","G",5,"TYP")
E
^SCR("W4VCLREP","G",6,"CRD")
6,16,N,8,2
^SCR("W4VCLREP","G",6,"HELP")

^SCR("W4VCLREP","G",6,"LMAX")
9
^SCR("W4VCLREP","G",6,"MUMPS1")

^SCR("W4VCLREP","G",6,"MUMPS2")

^SCR("W4VCLREP","G",6,"OUTPUT")

^SCR("W4VCLREP","G",6,"SHEM")
  lawzd  
^SCR("W4VCLREP","G",6,"TYP")
N
^SCR("W4VCLREP","G","DEL")

^SCR("W4VCLREP","G","MAX")

^SCR("W4VCLREP","G","NAME","ASM")
5
^SCR("W4VCLREP","G","NAME","CARD")
4
^SCR("W4VCLREP","G","NAME","DAT")
1
^SCR("W4VCLREP","G","NAME","HZM")
2
^SCR("W4VCLREP","G","NAME","SHEML")
3
^SCR("W4VCLREP","G","NAME","SHULAM")
6
^SCR("W4VCLREP","G","NM",1)
DAT
^SCR("W4VCLREP","G","NM",2)
HZM
^SCR("W4VCLREP","G","NM",3)
SHEML
^SCR("W4VCLREP","G","NM",4)
CARD
^SCR("W4VCLREP","G","NM",5)
ASM
^SCR("W4VCLREP","G","NM",6)
SHULAM
^SCR("W4VCLREP","G","RB")
5,4,20,76
^SCR("W4VCLREP","G","REF")

^SCR("W4VCLREP","G","RZD")

^SCR("W4VCLREP","G","STEP")

^SCR("W4VCLREP","G","STG")
      :  lawzd  : `zknq` :  qihxk 'qn  :   gewl my  :dlaw 'qn:  jix`z  :       
^SCR("W4VCLREP","G","VG")
7
^SCR("W4VCLREP","NAME")

^SCR("W4VCLREP","P",5,"CRD")
2,42,D,8,0
^SCR("W4VCLREP","P",5,"HELP")

^SCR("W4VCLREP","P",5,"LMAX")
8
^SCR("W4VCLREP","P",5,"MUMPS1")

^SCR("W4VCLREP","P",5,"MUMPS2")

^SCR("W4VCLREP","P",5,"TYP")
D
^SCR("W4VCLREP","P",10,"CRD")
2,23,D,8,0
^SCR("W4VCLREP","P",10,"HELP")

^SCR("W4VCLREP","P",10,"LMAX")
8
^SCR("W4VCLREP","P",10,"MUMPS1")

^SCR("W4VCLREP","P",10,"MUMPS2")

^SCR("W4VCLREP","P",10,"TYP")
D
^SCR("W4VCLREP","P",15,"CRD")
3,14,B,1,0
^SCR("W4VCLREP","P",15,"HELP")

^SCR("W4VCLREP","P",15,"LMAX")
4
^SCR("W4VCLREP","P",15,"MUMPS1")

^SCR("W4VCLREP","P",15,"MUMPS2")

^SCR("W4VCLREP","P",15,"TYP")
B
^SCR("W4VCLREP","P",20,"CRD")
21,50,E,5,0
^SCR("W4VCLREP","P",20,"HELP")

^SCR("W4VCLREP","P",20,"LMAX")
7
^SCR("W4VCLREP","P",20,"MUMPS1")

^SCR("W4VCLREP","P",20,"MUMPS2")

^SCR("W4VCLREP","P",20,"OUTPUT")

^SCR("W4VCLREP","P",20,"TYP")
E
^SCR("W4VCLREP","P",25,"CRD")
21,3,N,8,2
^SCR("W4VCLREP","P",25,"HELP")

^SCR("W4VCLREP","P",25,"LMAX")
8
^SCR("W4VCLREP","P",25,"MUMPS1")

^SCR("W4VCLREP","P",25,"MUMPS2")

^SCR("W4VCLREP","P",25,"OUTPUT")

^SCR("W4VCLREP","P",25,"TYP")
N
^SCR("W4VCLREP","P","NAME","DAT1")
5
^SCR("W4VCLREP","P","NAME","DAT2")
10
^SCR("W4VCLREP","P","NAME","SCB")
20
^SCR("W4VCLREP","P","NAME","SIKD")
15
^SCR("W4VCLREP","P","NAME","SSUM")
25
^SCR("W4VCLREP","P","NM",5)
DAT1
^SCR("W4VCLREP","P","NM",10)
DAT2
^SCR("W4VCLREP","P","NM",15)
SIKD
^SCR("W4VCLREP","P","NM",20)
SCB
^SCR("W4VCLREP","P","NM",25)
SSUM
^SCR("W4VCREP")
H
^SCR("W4VCREP",1)
                  # cx`weilee zegewl ly zeahde minelyz g"ec #                  
^SCR("W4VCREP",2)
                       {10     } jix`z cr {05     } jix`zn                     
^SCR("W4VCREP",3)
              {15 }: (`l - 0 ,ok - 1) miinei minekiq bivdl                     
^SCR("W4VCREP",4)
                                                                             1$
^SCR("W4VCREP",5)
 :  dahd  : dgpd :  mley  : `zknq` :  qihxk 'qn  :   gewl my  :dpnfd:  jix`z : 
^SCR("W4VCREP",6)
                                                                               
^SCR("W4VCREP",7)
                                                                               
^SCR("W4VCREP",8)
                                                                               
^SCR("W4VCREP",9)
                                                                               
^SCR("W4VCREP",10)
                                                                               
^SCR("W4VCREP",11)
                                                                               
^SCR("W4VCREP",12)
                                                                               
^SCR("W4VCREP",13)
                                                                               
^SCR("W4VCREP",14)
                                                                               
^SCR("W4VCREP",15)
                                                                               
^SCR("W4VCREP",16)
                                                                               
^SCR("W4VCREP",17)
                                                                               
^SCR("W4VCREP",18)
                                                                               
^SCR("W4VCREP",19)
 $1                                                                            
^SCR("W4VCREP",20)
                                                                               
^SCR("W4VCREP",21)
   {35     } zeahd  {30     } zegpd {25     } : mley k"dq                      
^SCR("W4VCREP","A",1)
ƒ˜€—…‰Œ……š…‡…—ŒŒ™š…�ˆ„…�‰Ž…Œ™š‡"…ƒ
^SCR("W4VCREP","A",2)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("W4VCREP","A",3)
:(€Œ-0,�‹-1)�‰‰Ž…‰�‰Ž…‹‰‘‚‰–„Œ
^SCR("W4VCREP","A",4)

^SCR("W4VCREP","A",5)
„�ˆ„„‡�„�Œ…™€š‹Ž‘€‘‰ˆ˜‹'‘Ž‡…—Œ�™„�Ž†„Š‰˜€š
^SCR("W4VCREP","A",6)
---------------------------------------------------------------------
^SCR("W4VCREP","A",7)

^SCR("W4VCREP","A",8)

^SCR("W4VCREP","A",9)

^SCR("W4VCREP","A",10)

^SCR("W4VCREP","A",11)

^SCR("W4VCREP","A",12)

^SCR("W4VCREP","A",13)

^SCR("W4VCREP","A",14)

^SCR("W4VCREP","A",15)

^SCR("W4VCREP","A",16)

^SCR("W4VCREP","A",17)

^SCR("W4VCREP","A",18)

^SCR("W4VCREP","A",19)

^SCR("W4VCREP","A",20)

^SCR("W4VCREP","A",21)
š…�ˆ„š…‡�„:�Œ…™‹"„‘
^SCR("W4VCREP","AV",1)
srteuhkuu,ujuekka,ucyvuohnuka,j"us
^SCR("W4VCREP","AV",2)
lhrt,sglhrt,n
^SCR("W4VCREP","AV",3)
:(tk-0'if-1)ohhnuhohnufhxdhmvk
^SCR("W4VCREP","AV",4)

^SCR("W4VCREP","AV",5)
vcyvvjbvokuat,fnxtxhyrfwxnjuekoavbnzvlhrt,
^SCR("W4VCREP","AV",6)
---------------------------------------------------------------------
^SCR("W4VCREP","AV",7)

^SCR("W4VCREP","AV",8)

^SCR("W4VCREP","AV",9)

^SCR("W4VCREP","AV",10)

^SCR("W4VCREP","AV",11)

^SCR("W4VCREP","AV",12)

^SCR("W4VCREP","AV",13)

^SCR("W4VCREP","AV",14)

^SCR("W4VCREP","AV",15)

^SCR("W4VCREP","AV",16)

^SCR("W4VCREP","AV",17)

^SCR("W4VCREP","AV",18)

^SCR("W4VCREP","AV",19)

^SCR("W4VCREP","AV",20)

^SCR("W4VCREP","AV",21)
,ucyv,ujbv:okuaf"vx
^SCR("W4VCREP","G",1,"CRD")
6,77,D,8,0
^SCR("W4VCREP","G",1,"HELP")

^SCR("W4VCREP","G",1,"LMAX")
8
^SCR("W4VCREP","G",1,"MUMPS1")

^SCR("W4VCREP","G",1,"MUMPS2")

^SCR("W4VCREP","G",1,"OUTPUT")

^SCR("W4VCREP","G",1,"SHEM")
  jix`z 
^SCR("W4VCREP","G",1,"TYP")
D
^SCR("W4VCREP","G",2,"CRD")
6,68,E,5,0
^SCR("W4VCREP","G",2,"HELP")

^SCR("W4VCREP","G",2,"LMAX")
5
^SCR("W4VCREP","G",2,"MUMPS1")

^SCR("W4VCREP","G",2,"MUMPS2")

^SCR("W4VCREP","G",2,"OUTPUT")

^SCR("W4VCREP","G",2,"SHEM")
dpnfd
^SCR("W4VCREP","G",2,"TYP")
E
^SCR("W4VCREP","G",3,"CRD")
6,62,H,3,0
^SCR("W4VCREP","G",3,"HELP")

^SCR("W4VCREP","G",3,"LMAX")
12
^SCR("W4VCREP","G",3,"MUMPS1")

^SCR("W4VCREP","G",3,"MUMPS2")

^SCR("W4VCREP","G",3,"OUTPUT")

^SCR("W4VCREP","G",3,"SHEM")
   gewl my  
^SCR("W4VCREP","G",3,"TYP")
H
^SCR("W4VCREP","G",4,"CRD")
6,49,H,13,0
^SCR("W4VCREP","G",4,"HELP")

^SCR("W4VCREP","G",4,"LMAX")
13
^SCR("W4VCREP","G",4,"MUMPS1")

^SCR("W4VCREP","G",4,"MUMPS2")

^SCR("W4VCREP","G",4,"OUTPUT")

^SCR("W4VCREP","G",4,"SHEM")
  qihxk 'qn  
^SCR("W4VCREP","G",4,"TYP")
H
^SCR("W4VCREP","G",5,"CRD")
6,35,E,8,0
^SCR("W4VCREP","G",5,"HELP")

^SCR("W4VCREP","G",5,"LMAX")
8
^SCR("W4VCREP","G",5,"MUMPS1")

^SCR("W4VCREP","G",5,"MUMPS2")

^SCR("W4VCREP","G",5,"SHEM")
 `zknq` 
^SCR("W4VCREP","G",5,"TYP")
E
^SCR("W4VCREP","G",6,"CRD")
6,26,N,8,2
^SCR("W4VCREP","G",6,"HELP")

^SCR("W4VCREP","G",6,"LMAX")
8
^SCR("W4VCREP","G",6,"MUMPS1")

^SCR("W4VCREP","G",6,"MUMPS2")

^SCR("W4VCREP","G",6,"OUTPUT")

^SCR("W4VCREP","G",6,"SHEM")
  mley  
^SCR("W4VCREP","G",6,"TYP")
N
^SCR("W4VCREP","G",7,"CRD")
6,17,N,6,2
^SCR("W4VCREP","G",7,"HELP")

^SCR("W4VCREP","G",7,"LMAX")
6
^SCR("W4VCREP","G",7,"MUMPS1")

^SCR("W4VCREP","G",7,"MUMPS2")

^SCR("W4VCREP","G",7,"OUTPUT")

^SCR("W4VCREP","G",7,"SHEM")
 dgpd 
^SCR("W4VCREP","G",7,"TYP")
N
^SCR("W4VCREP","G",8,"CRD")
6,10,N,7,2
^SCR("W4VCREP","G",8,"HELP")

^SCR("W4VCREP","G",8,"LMAX")
8
^SCR("W4VCREP","G",8,"MUMPS1")

^SCR("W4VCREP","G",8,"MUMPS2")

^SCR("W4VCREP","G",8,"OUTPUT")

^SCR("W4VCREP","G",8,"SHEM")
  dahd  
^SCR("W4VCREP","G",8,"TYP")
N
^SCR("W4VCREP","G","DEL")

^SCR("W4VCREP","G","MAX")

^SCR("W4VCREP","G","NAME","ASM")
5
^SCR("W4VCREP","G","NAME","BONUS")
8
^SCR("W4VCREP","G","NAME","CARD")
4
^SCR("W4VCREP","G","NAME","DAT")
1
^SCR("W4VCREP","G","NAME","HNH")
7
^SCR("W4VCREP","G","NAME","HZM")
2
^SCR("W4VCREP","G","NAME","SHEML")
3
^SCR("W4VCREP","G","NAME","SHULAM")
6
^SCR("W4VCREP","G","NM",1)
DAT
^SCR("W4VCREP","G","NM",2)
HZM
^SCR("W4VCREP","G","NM",3)
SHEML
^SCR("W4VCREP","G","NM",4)
CARD
^SCR("W4VCREP","G","NM",5)
ASM
^SCR("W4VCREP","G","NM",6)
SHULAM
^SCR("W4VCREP","G","NM",7)
HNH
^SCR("W4VCREP","G","NM",8)
BONUS
^SCR("W4VCREP","G","RB")
5,2,20,79
^SCR("W4VCREP","G","REF")

^SCR("W4VCREP","G","RZD")

^SCR("W4VCREP","G","STEP")

^SCR("W4VCREP","G","STG")
 :  dahd  : dgpd :  mley  : `zknq` :  qihxk 'qn  :   gewl my  :dpnfd:  jix`z : 
^SCR("W4VCREP","G","VG")
7
^SCR("W4VCREP","NAME")
cx`weilee zexikn g"ec
^SCR("W4VCREP","P",5,"CRD")
2,42,D,8,0
^SCR("W4VCREP","P",5,"HELP")

^SCR("W4VCREP","P",5,"LMAX")
8
^SCR("W4VCREP","P",5,"MUMPS1")

^SCR("W4VCREP","P",5,"MUMPS2")

^SCR("W4VCREP","P",5,"TYP")
D
^SCR("W4VCREP","P",10,"CRD")
2,23,D,8,0
^SCR("W4VCREP","P",10,"HELP")

^SCR("W4VCREP","P",10,"LMAX")
8
^SCR("W4VCREP","P",10,"MUMPS1")

^SCR("W4VCREP","P",10,"MUMPS2")

^SCR("W4VCREP","P",10,"TYP")
D
^SCR("W4VCREP","P",15,"CRD")
3,14,B,1,0
^SCR("W4VCREP","P",15,"HELP")

^SCR("W4VCREP","P",15,"LMAX")
4
^SCR("W4VCREP","P",15,"MUMPS1")

^SCR("W4VCREP","P",15,"MUMPS2")

^SCR("W4VCREP","P",15,"TYP")
B
^SCR("W4VCREP","P",25,"CRD")
21,36,N,8,2
^SCR("W4VCREP","P",25,"HELP")

^SCR("W4VCREP","P",25,"LMAX")
8
^SCR("W4VCREP","P",25,"MUMPS1")

^SCR("W4VCREP","P",25,"MUMPS2")

^SCR("W4VCREP","P",25,"OUTPUT")

^SCR("W4VCREP","P",25,"TYP")
N
^SCR("W4VCREP","P",30,"CRD")
21,20,N,8,2
^SCR("W4VCREP","P",30,"HELP")

^SCR("W4VCREP","P",30,"LMAX")
8
^SCR("W4VCREP","P",30,"MUMPS1")

^SCR("W4VCREP","P",30,"MUMPS2")

^SCR("W4VCREP","P",30,"OUTPUT")

^SCR("W4VCREP","P",30,"TYP")
N
^SCR("W4VCREP","P",35,"CRD")
21,3,N,8,2
^SCR("W4VCREP","P",35,"HELP")

^SCR("W4VCREP","P",35,"LMAX")
8
^SCR("W4VCREP","P",35,"MUMPS1")

^SCR("W4VCREP","P",35,"MUMPS2")

^SCR("W4VCREP","P",35,"OUTPUT")

^SCR("W4VCREP","P",35,"TYP")
N
^SCR("W4VCREP","P","NAME","DAT1")
5
^SCR("W4VCREP","P","NAME","DAT2")
10
^SCR("W4VCREP","P","NAME","SBON")
35
^SCR("W4VCREP","P","NAME","SHNH")
30
^SCR("W4VCREP","P","NAME","SIKD")
15
^SCR("W4VCREP","P","NAME","SSUM")
25
^SCR("W4VCREP","P","NM",5)
DAT1
^SCR("W4VCREP","P","NM",10)
DAT2
^SCR("W4VCREP","P","NM",15)
SIKD
^SCR("W4VCREP","P","NM",25)
SSUM
^SCR("W4VCREP","P","NM",30)
SHNH
^SCR("W4VCREP","P","NM",35)
SBON
^SCR("W4VVHBM1")
H
^SCR("W4VVHBM1",1)
                                                                               
^SCR("W4VVHBM1",2)
                                                    {05        } : zipeayg 'qn 
^SCR("W4VVHBM1",3)
                                                                               
^SCR("W4VVHBM1",4)
                                                            {10         } n.r  
^SCR("W4VVHBM1",5)
                                                                               
^SCR("W4VVHBM1","AV",1)

^SCR("W4VVHBM1","AV",2)
:úéðåáùç'ñî
^SCR("W4VVHBM1","AV",3)

^SCR("W4VVHBM1","AV",4)
î.ò
^SCR("W4VVHBM1","AV",5)

^SCR("W4VVHBM1","NAME")

^SCR("W4VVHBM1","P",5,"CRD")
2,52,N,9,0
^SCR("W4VVHBM1","P",5,"HELP")

^SCR("W4VVHBM1","P",5,"LMAX")
11
^SCR("W4VVHBM1","P",5,"MUMPS1")

^SCR("W4VVHBM1","P",5,"MUMPS2")

^SCR("W4VVHBM1","P",5,"TYP")
N
^SCR("W4VVHBM1","P",10,"CRD")
4,60,N,9,0
^SCR("W4VVHBM1","P",10,"HELP")

^SCR("W4VVHBM1","P",10,"LMAX")
12
^SCR("W4VVHBM1","P",10,"MUMPS1")

^SCR("W4VVHBM1","P",10,"MUMPS2")

^SCR("W4VVHBM1","P",10,"TYP")
N
^SCR("W4VVHBM1","P","NAME","CUSTTZ")
10
^SCR("W4VVHBM1","P","NAME","HB")
5
^SCR("W4VVHBM1","P","NM",5)
HB
^SCR("W4VVHBM1","P","NM",10)
CUSTTZ
^SCR("W4VVHBMS")
H
^SCR("W4VVHBMS",1)
                                                                               
^SCR("W4VVHBMS",2)
                                                    {05        } : zipeayg 'qn 
^SCR("W4VVHBMS",3)
                                                                               
^SCR("W4VVHBMS",4)
                                                     {10         } : xeyi` 'qn 
^SCR("W4VVHBMS",5)
                                                                               
^SCR("W4VVHBMS","AV",1)

^SCR("W4VVHBMS","AV",2)
:úéðåáùç'ñî
^SCR("W4VVHBMS","AV",3)

^SCR("W4VVHBMS","AV",4)
:øåùéà'ñî
^SCR("W4VVHBMS","AV",5)

^SCR("W4VVHBMS","NAME")
zipeayg xeyi` zclwd
^SCR("W4VVHBMS","P",5,"CRD")
2,52,N,9,0
^SCR("W4VVHBMS","P",5,"HELP")

^SCR("W4VVHBMS","P",5,"LMAX")
11
^SCR("W4VVHBMS","P",5,"MUMPS1")

^SCR("W4VVHBMS","P",5,"MUMPS2")

^SCR("W4VVHBMS","P",5,"TYP")
N
^SCR("W4VVHBMS","P",10,"CRD")
4,53,N,9,0
^SCR("W4VVHBMS","P",10,"HELP")

^SCR("W4VVHBMS","P",10,"LMAX")
12
^SCR("W4VVHBMS","P",10,"MUMPS1")

^SCR("W4VVHBMS","P",10,"MUMPS2")

^SCR("W4VVHBMS","P",10,"TYP")
N
^SCR("W4VVHBMS","P","NAME","HB")
5
^SCR("W4VVHBMS","P","NAME","HBMAS")
10
^SCR("W4VVHBMS","P","NM",5)
HB
^SCR("W4VVHBMS","P","NM",10)
HBMAS
^SCR("W4ZOOMIN")
H
^SCR("W4ZOOMIN",1)
                                                                               
^SCR("W4ZOOMIN",2)
                             # ZOOM zkxrnl mixhnxt #                           
^SCR("W4ZOOMIN",3)
                                                                               
^SCR("W4ZOOMIN",4)
                                                            1]                 
^SCR("W4ZOOMIN",5)
                             {05         } : i`xw` gewl 'qn                    
^SCR("W4ZOOMIN",6)
                             {10         } :   zeqpkd oeayg                    
^SCR("W4ZOOMIN",7)
                                                                               
^SCR("W4ZOOMIN",8)
                      [1                                                       
^SCR("W4ZOOMIN",9)
                                                                               
^SCR("W4ZOOMIN","A",1)

^SCR("W4ZOOMIN","A",2)
ZOOMš‹˜’ŽŒ�‰˜ˆŽ˜”
^SCR("W4ZOOMIN","A",3)

^SCR("W4ZOOMIN","A",4)

^SCR("W4ZOOMIN","A",5)
:‰€˜—€‡…—Œ'‘Ž
^SCR("W4ZOOMIN","A",6)
:š…‘�‹„�…�™‡
^SCR("W4ZOOMIN","A",7)

^SCR("W4ZOOMIN","A",8)

^SCR("W4ZOOMIN","A",9)

^SCR("W4ZOOMIN","AV",1)

^SCR("W4ZOOMIN","AV",2)
ZOOM,frgnkohrynrp
^SCR("W4ZOOMIN","AV",3)

^SCR("W4ZOOMIN","AV",4)

^SCR("W4ZOOMIN","AV",5)
:htretjuekwxn
^SCR("W4ZOOMIN","AV",6)
:,uxbfviucaj
^SCR("W4ZOOMIN","AV",7)

^SCR("W4ZOOMIN","AV",8)

^SCR("W4ZOOMIN","AV",9)

^SCR("W4ZOOMIN","NAME")

^SCR("W4ZOOMIN","P",5,"CRD")
5,29,E,12,0
^SCR("W4ZOOMIN","P",5,"HELP")

^SCR("W4ZOOMIN","P",5,"LMAX")
12
^SCR("W4ZOOMIN","P",5,"MUMPS1")

^SCR("W4ZOOMIN","P",5,"MUMPS2")

^SCR("W4ZOOMIN","P",5,"TYP")
E
^SCR("W4ZOOMIN","P",10,"CRD")
6,29,E,12,0
^SCR("W4ZOOMIN","P",10,"HELP")

^SCR("W4ZOOMIN","P",10,"LMAX")
12
^SCR("W4ZOOMIN","P",10,"MUMPS1")

^SCR("W4ZOOMIN","P",10,"MUMPS2")

^SCR("W4ZOOMIN","P",10,"MUST")

^SCR("W4ZOOMIN","P",10,"TYP")
E
^SCR("W4ZOOMIN","P","NAME","HESHIN")
10
^SCR("W4ZOOMIN","P","NAME","LKHAKR")
5
^SCR("W4ZOOMIN","P","NM",5)
LKHAKR
^SCR("W4ZOOMIN","P","NM",10)
HESHIN
^SCR("W4ZOOMIN","P","RB",1)
5,23,9,62
^SCR("W4ZSTPRM")
H
^SCR("W4ZSTPRM",1)
                                                                               
^SCR("W4ZSTPRM",2)
                                                {10  }: dlrted ZESTER zkxrn m`d
^SCR("W4ZSTPRM",3)
                   {15                               } : sipq cew              
^SCR("W4ZSTPRM",4)
      {20                                                          }: ynzyn cew
^SCR("W4ZSTPRM",5)
      {25                                                              }: dnqiq
^SCR("W4ZSTPRM",6)
      {30                                                          }: owehl URL
^SCR("W4ZSTPRM",7)
      {35                                                 }: miitqk mipezpl URL
^SCR("W4ZSTPRM",8)
 {40                                                }: mihixt zexikn ipezpl URL
^SCR("W4ZSTPRM",9)
                                                                               
^SCR("W4ZSTPRM",10)
                                                                               
^SCR("W4ZSTPRM","AV",1)

^SCR("W4ZSTPRM","AV",2)
:äìòôåäZESTERúëøòîíàä
^SCR("W4ZSTPRM","AV",3)
:óéðñãå÷
^SCR("W4ZSTPRM","AV",4)
:ùîúùîãå÷
^SCR("W4ZSTPRM","AV",5)
:äîñéñ
^SCR("W4ZSTPRM","AV",6)
:ï÷åèìURL
^SCR("W4ZSTPRM","AV",7)
:íééôñëíéðåúðìURL
^SCR("W4ZSTPRM","AV",8)
:íéèéøôúåøéëîéðåúðìURL
^SCR("W4ZSTPRM","AV",9)

^SCR("W4ZSTPRM","AV",10)

^SCR("W4ZSTPRM","NAME")

^SCR("W4ZSTPRM","P",10,"CRD")
2,48,B,1,0
^SCR("W4ZSTPRM","P",10,"HELP")

^SCR("W4ZSTPRM","P",10,"LMAX")
5
^SCR("W4ZSTPRM","P",10,"MUMPS1")
S ZSTR=$$ZSTR^W4PRM
^SCR("W4ZSTPRM","P",10,"MUMPS2")

^SCR("W4ZSTPRM","P",10,"MUST")

^SCR("W4ZSTPRM","P",10,"TYP")
B
^SCR("W4ZSTPRM","P",15,"CRD")
3,19,E,30,0
^SCR("W4ZSTPRM","P",15,"HELP")

^SCR("W4ZSTPRM","P",15,"LMAX")
34
^SCR("W4ZSTPRM","P",15,"MUMPS1")
S BRANCH=$G(@$$^W4PRM@("ZSTR","BRANCH"))
^SCR("W4ZSTPRM","P",15,"MUMPS2")

^SCR("W4ZSTPRM","P",15,"MUST")

^SCR("W4ZSTPRM","P",15,"TYP")
E
^SCR("W4ZSTPRM","P",20,"CRD")
4,6,E,50,0
^SCR("W4ZSTPRM","P",20,"HELP")

^SCR("W4ZSTPRM","P",20,"LMAX")
61
^SCR("W4ZSTPRM","P",20,"MUMPS1")
S USER=$G(@$$^W4PRM@("ZSTR","USER"))
^SCR("W4ZSTPRM","P",20,"MUMPS2")

^SCR("W4ZSTPRM","P",20,"TYP")
E
^SCR("W4ZSTPRM","P",25,"CRD")
5,6,E,50,0
^SCR("W4ZSTPRM","P",25,"HELP")

^SCR("W4ZSTPRM","P",25,"LMAX")
65
^SCR("W4ZSTPRM","P",25,"MUMPS1")
S PSW=$G(@$$^W4PRM@("ZSTR","PSW"))
^SCR("W4ZSTPRM","P",25,"MUMPS2")

^SCR("W4ZSTPRM","P",25,"TYP")
E
^SCR("W4ZSTPRM","P",30,"CRD")
6,6,E,50,0
^SCR("W4ZSTPRM","P",30,"HELP")

^SCR("W4ZSTPRM","P",30,"LMAX")
61
^SCR("W4ZSTPRM","P",30,"MUMPS1")
S URLTOKEN=$G(@$$^W4PRM@("ZSTR","URLTOKEN"))
^SCR("W4ZSTPRM","P",30,"MUMPS2")

^SCR("W4ZSTPRM","P",30,"TYP")
E
^SCR("W4ZSTPRM","P",35,"CRD")
7,6,E,50,0
^SCR("W4ZSTPRM","P",35,"HELP")

^SCR("W4ZSTPRM","P",35,"LMAX")
52
^SCR("W4ZSTPRM","P",35,"MUMPS1")
S URLTOT=$G(@$$^W4PRM@("ZSTR","URLTOT"))
^SCR("W4ZSTPRM","P",35,"MUMPS2")

^SCR("W4ZSTPRM","P",35,"TYP")
E
^SCR("W4ZSTPRM","P",40,"CRD")
8,1,E,50,0
^SCR("W4ZSTPRM","P",40,"HELP")

^SCR("W4ZSTPRM","P",40,"LMAX")
51
^SCR("W4ZSTPRM","P",40,"MUMPS1")
S URLPAR=$G(@$$^W4PRM@("ZSTR","URLPAR"))
^SCR("W4ZSTPRM","P",40,"MUMPS2")

^SCR("W4ZSTPRM","P",40,"TYP")
E
^SCR("W4ZSTPRM","P","NAME","BRANCH")
15
^SCR("W4ZSTPRM","P","NAME","PSW")
25
^SCR("W4ZSTPRM","P","NAME","URLPAR")
40
^SCR("W4ZSTPRM","P","NAME","URLTOKEN")
30
^SCR("W4ZSTPRM","P","NAME","URLTOT")
35
^SCR("W4ZSTPRM","P","NAME","USER")
20
^SCR("W4ZSTPRM","P","NAME","ZSTR")
10
^SCR("W4ZSTPRM","P","NM",10)
ZSTR
^SCR("W4ZSTPRM","P","NM",15)
BRANCH
^SCR("W4ZSTPRM","P","NM",20)
USER
^SCR("W4ZSTPRM","P","NM",25)
PSW
^SCR("W4ZSTPRM","P","NM",30)
URLTOKEN
^SCR("W4ZSTPRM","P","NM",35)
URLTOT
^SCR("W4ZSTPRM","P","NM",40)
URLPAR
^SCR("WBADVSRC")
H
^SCR("WBADVSRC",1)
                                                                               
^SCR("WBADVSRC",2)
                                                                  1]           
^SCR("WBADVSRC",3)
                        {                         01}                          
^SCR("WBADVSRC",4)
                                                                               
^SCR("WBADVSRC",5)
                        {                         05} :  ihxt my               
^SCR("WBADVSRC",6)
                                                                               
^SCR("WBADVSRC",7)
                        {                         07} : dgtyn my               
^SCR("WBADVSRC",8)
                                                                               
^SCR("WBADVSRC",9)
                                         {10        } : gewl 'lh               
^SCR("WBADVSRC",10)
                                                                               
^SCR("WBADVSRC",11)
                                          {15       } :  zedf 'z               
^SCR("WBADVSRC",12)
                                                                               
^SCR("WBADVSRC",13)
                 {20                                } :    l"`ec               
^SCR("WBADVSRC",14)
                                                                               
^SCR("WBADVSRC",15)
             [1                                                                
^SCR("WBADVSRC",16)
                                                                               
^SCR("WBADVSRC","A",1)

^SCR("WBADVSRC","A",2)

^SCR("WBADVSRC","A",3)

^SCR("WBADVSRC","A",4)

^SCR("WBADVSRC","A",5)
:‰ˆ˜”�™
^SCR("WBADVSRC","A",6)

^SCR("WBADVSRC","A",7)
:„‡”™Ž�™
^SCR("WBADVSRC","A",8)

^SCR("WBADVSRC","A",9)
:‡…—Œ'Œˆ
^SCR("WBADVSRC","A",10)

^SCR("WBADVSRC","A",11)
:š…„†'š
^SCR("WBADVSRC","A",12)

^SCR("WBADVSRC","A",13)
:Œ"€…ƒ
^SCR("WBADVSRC","A",14)

^SCR("WBADVSRC","A",15)

^SCR("WBADVSRC","A",16)

^SCR("WBADVSRC","AV",1)

^SCR("WBADVSRC","AV",2)

^SCR("WBADVSRC","AV",3)

^SCR("WBADVSRC","AV",4)

^SCR("WBADVSRC","AV",5)
:hyrpoa
^SCR("WBADVSRC","AV",6)

^SCR("WBADVSRC","AV",7)
:vjpanoa
^SCR("WBADVSRC","AV",8)

^SCR("WBADVSRC","AV",9)
:juekwky
^SCR("WBADVSRC","AV",10)

^SCR("WBADVSRC","AV",11)
:,uvzw,
^SCR("WBADVSRC","AV",12)

^SCR("WBADVSRC","AV",13)
:k"tus
^SCR("WBADVSRC","AV",14)

^SCR("WBADVSRC","AV",15)

^SCR("WBADVSRC","AV",16)

^SCR("WBADVSRC","NAME")

^SCR("WBADVSRC","P",1,"CRD")
3,53,H,28,0
^SCR("WBADVSRC","P",1,"HELP")

^SCR("WBADVSRC","P",1,"LMAX")
28
^SCR("WBADVSRC","P",1,"MUMPS1")

^SCR("WBADVSRC","P",1,"MUMPS2")

^SCR("WBADVSRC","P",1,"OUTPUT")

^SCR("WBADVSRC","P",1,"TYP")
H
^SCR("WBADVSRC","P",5,"CRD")
5,53,H,26,0
^SCR("WBADVSRC","P",5,"HELP")

^SCR("WBADVSRC","P",5,"LMAX")
28
^SCR("WBADVSRC","P",5,"MUMPS1")

^SCR("WBADVSRC","P",5,"MUMPS2")

^SCR("WBADVSRC","P",5,"TYP")
H
^SCR("WBADVSRC","P",7,"CRD")
7,53,H,28,0
^SCR("WBADVSRC","P",7,"HELP")

^SCR("WBADVSRC","P",7,"LMAX")
28
^SCR("WBADVSRC","P",7,"MUMPS1")

^SCR("WBADVSRC","P",7,"MUMPS2")

^SCR("WBADVSRC","P",7,"TYP")
H
^SCR("WBADVSRC","P",10,"CRD")
9,41,E,11,0
^SCR("WBADVSRC","P",10,"HELP")

^SCR("WBADVSRC","P",10,"LMAX")
11
^SCR("WBADVSRC","P",10,"MUMPS1")

^SCR("WBADVSRC","P",10,"MUMPS2")

^SCR("WBADVSRC","P",10,"TYP")
E
^SCR("WBADVSRC","P",15,"CRD")
11,42,E,9,0
^SCR("WBADVSRC","P",15,"HELP")

^SCR("WBADVSRC","P",15,"LMAX")
10
^SCR("WBADVSRC","P",15,"MUMPS1")

^SCR("WBADVSRC","P",15,"MUMPS2")

^SCR("WBADVSRC","P",15,"TYP")
E
^SCR("WBADVSRC","P",20,"CRD")
13,17,E,35,0
^SCR("WBADVSRC","P",20,"HELP")

^SCR("WBADVSRC","P",20,"LMAX")
35
^SCR("WBADVSRC","P",20,"MUMPS1")

^SCR("WBADVSRC","P",20,"MUMPS2")

^SCR("WBADVSRC","P",20,"TYP")
E
^SCR("WBADVSRC","P","NAME","B1EMAIL")
20
^SCR("WBADVSRC","P","NAME","B1FNAME")
5
^SCR("WBADVSRC","P","NAME","B1LNAME")
7
^SCR("WBADVSRC","P","NAME","B1TEL")
10
^SCR("WBADVSRC","P","NAME","B1TZ")
15
^SCR("WBADVSRC","P","NAME","CLUB")
1
^SCR("WBADVSRC","P","NM",1)
CLUB
^SCR("WBADVSRC","P","NM",5)
B1FNAME
^SCR("WBADVSRC","P","NM",7)
B1LNAME
^SCR("WBADVSRC","P","NM",10)
B1TEL
^SCR("WBADVSRC","P","NM",15)
B1TZ
^SCR("WBADVSRC","P","NM",20)
B1EMAIL
^SCR("WBADVSRC","P","RB",1)
3,14,16,68
^SCR("WBLKH")
H
^SCR("WBLKH",1)
                                                                               
^SCR("WBLKH",2)
                           {05                 } wi'bel qpfia gewl 'qn         
^SCR("WBLKH",3)
                                                                         1]    
^SCR("WBLKH",4)
                                      {              10}:   ihxt my            
^SCR("WBLKH",5)
                                      {              12}:  dgtyn my            
^SCR("WBLKH",6)
                                            {17        }:zedf zcerz            
^SCR("WBLKH",7)
             {                                       20}:     zaezk            
^SCR("WBLKH",8)
                                           {37         }:  ciip 'lh            
^SCR("WBLKH",9)
             {40                                       }:     l"`ec            
^SCR("WBLKH",10)
                                             {45       }: zcled mei            
^SCR("WBLKH",11)
                                                                               
^SCR("WBLKH",12)
        [1                                                                     
^SCR("WBLKH","A",1)

^SCR("WBLKH","A",2)
—‰'‚…Œ‘�†‰�‡…—Œ'‘Ž
^SCR("WBLKH","A",3)

^SCR("WBLKH","A",4)
:‰ˆ˜”�™
^SCR("WBLKH","A",5)
:„‡”™Ž�™
^SCR("WBLKH","A",6)
:š…„†šƒ…’š
^SCR("WBLKH","A",7)
:š�…š‹
^SCR("WBLKH","A",8)
:ƒ‰‰�'Œˆ
^SCR("WBLKH","A",9)
:Œ"€…ƒ
^SCR("WBLKH","A",10)
:šƒŒ…„�…‰
^SCR("WBLKH","A",11)

^SCR("WBLKH","A",12)

^SCR("WBLKH","AV",1)

^SCR("WBLKH","AV",2)
ehwdukxbzhcjuekwxn
^SCR("WBLKH","AV",3)

^SCR("WBLKH","AV",4)
:hyrpoa
^SCR("WBLKH","AV",5)
:vjpanoa
^SCR("WBLKH","AV",6)
:,uvz,sug,
^SCR("WBLKH","AV",7)
:,cu,f
^SCR("WBLKH","AV",8)
:shhbwky
^SCR("WBLKH","AV",9)
:k"tus
^SCR("WBLKH","AV",10)
:,skuvouh
^SCR("WBLKH","AV",11)

^SCR("WBLKH","AV",12)

^SCR("WBLKH","NAME")

^SCR("WBLKH","P",5,"CRD")
2,27,E,16,0
^SCR("WBLKH","P",5,"HELP")

^SCR("WBLKH","P",5,"LMAX")
20
^SCR("WBLKH","P",5,"MUMPS1")

^SCR("WBLKH","P",5,"MUMPS2")

^SCR("WBLKH","P",5,"MUST")

^SCR("WBLKH","P",5,"OUTPUT")

^SCR("WBLKH","P",5,"TYP")
E
^SCR("WBLKH","P",10,"CRD")
4,56,H,16
^SCR("WBLKH","P",10,"HELP")

^SCR("WBLKH","P",10,"LMAX")
17
^SCR("WBLKH","P",10,"MUMPS1")

^SCR("WBLKH","P",10,"MUMPS2")

^SCR("WBLKH","P",10,"MUST")

^SCR("WBLKH","P",10,"TYP")
H
^SCR("WBLKH","P",12,"CRD")
5,56,H,17
^SCR("WBLKH","P",12,"HELP")

^SCR("WBLKH","P",12,"LMAX")
17
^SCR("WBLKH","P",12,"MUMPS1")

^SCR("WBLKH","P",12,"MUMPS2")

^SCR("WBLKH","P",12,"MUST")

^SCR("WBLKH","P",12,"TYP")
H
^SCR("WBLKH","P",17,"CRD")
6,44,E,9,0
^SCR("WBLKH","P",17,"HELP")

^SCR("WBLKH","P",17,"LMAX")
11
^SCR("WBLKH","P",17,"MUMPS1")

^SCR("WBLKH","P",17,"MUMPS2")

^SCR("WBLKH","P",17,"TYP")
E
^SCR("WBLKH","P",20,"CRD")
7,56,H,40
^SCR("WBLKH","P",20,"HELP")

^SCR("WBLKH","P",20,"LMAX")
42
^SCR("WBLKH","P",20,"MUMPS1")

^SCR("WBLKH","P",20,"MUMPS2")

^SCR("WBLKH","P",20,"MUST")

^SCR("WBLKH","P",20,"TYP")
H
^SCR("WBLKH","P",37,"CRD")
8,43,E,12,0
^SCR("WBLKH","P",37,"HELP")

^SCR("WBLKH","P",37,"LMAX")
12
^SCR("WBLKH","P",37,"MUMPS1")

^SCR("WBLKH","P",37,"MUMPS2")

^SCR("WBLKH","P",37,"MUST")

^SCR("WBLKH","P",37,"TYP")
E
^SCR("WBLKH","P",40,"CRD")
9,13,E,42,0
^SCR("WBLKH","P",40,"HELP")

^SCR("WBLKH","P",40,"LMAX")
42
^SCR("WBLKH","P",40,"MUMPS1")

^SCR("WBLKH","P",40,"MUMPS2")
S EMAIL=$$FUNC^%UCASE(EMAIL)
^SCR("WBLKH","P",40,"MUST")

^SCR("WBLKH","P",40,"TYP")
E
^SCR("WBLKH","P",45,"CRD")
10,45,D,8,0
^SCR("WBLKH","P",45,"HELP")

^SCR("WBLKH","P",45,"LMAX")
10
^SCR("WBLKH","P",45,"MUMPS1")

^SCR("WBLKH","P",45,"MUMPS2")

^SCR("WBLKH","P",45,"TYP")
D
^SCR("WBLKH","P","NAME","EMAIL")
40
^SCR("WBLKH","P","NAME","FNAME")
10
^SCR("WBLKH","P","NAME","JOMH")
45
^SCR("WBLKH","P","NAME","KTOV")
20
^SCR("WBLKH","P","NAME","LKH")
5
^SCR("WBLKH","P","NAME","LNAME")
12
^SCR("WBLKH","P","NAME","PELE")
37
^SCR("WBLKH","P","NAME","TZ")
17
^SCR("WBLKH","P","NM",5)
LKH
^SCR("WBLKH","P","NM",10)
FNAME
^SCR("WBLKH","P","NM",12)
LNAME
^SCR("WBLKH","P","NM",17)
TZ
^SCR("WBLKH","P","NM",20)
KTOV
^SCR("WBLKH","P","NM",37)
PELE
^SCR("WBLKH","P","NM",40)
EMAIL
^SCR("WBLKH","P","NM",45)
JOMH
^SCR("WBLKH","P","RB",1)
4,9,13,75
^SCR("WBPRM")
H
^SCR("WBPRM",1)
                       # "wi'bel qpfia"-l mixhnxt #                            
^SCR("WBPRM",2)
                                                                            1] 
^SCR("WBPRM",3)
                    {03 } : ( `l - 0 ,ok - 1 ) dlirt "wi'bel qpfia" zkxrn m`d  
^SCR("WBPRM",4)
                                                                               
^SCR("WBPRM",5)
                                          dwqr xeciy zra zecewp yenin zra m`d  
^SCR("WBPRM",6)
             {05 }  :     ( `l - 0 ,ok - 1 ) ixyt`d zecewpd mekq `eln z` miyl  
^SCR("WBPRM",7)
                                                                               
^SCR("WBPRM",8)
                                                      - oecren gewl iedif zra  
^SCR("WBPRM",9)
             {10 }  :( `l - 0 , ok - 1 ) dtewa zeiniptd zeahdd lk z` lhal m`d  
^SCR("WBPRM",10)
                                                                               
^SCR("WBPRM",11)
            {                  13} {12      } : "wi'bel qpfia qihxk" hixt cew  
^SCR("WBPRM",12)
                                                                               
^SCR("WBPRM",13)
                                                                               
^SCR("WBPRM",14)
            {                      41} {40     } :     "zeahd yenin" hixt cew  
^SCR("WBPRM",15)
            {                      46} {45     } :    "zecewp yenin" hixt cew  
^SCR("WBPRM",16)
       [1                                                                      
^SCR("WBPRM",17)
                                                                               
^SCR("WBPRM",18)
                                                                               
^SCR("WBPRM","A",1)
"—‰'‚…Œ‘�†‰�"-Œ�‰˜ˆŽ˜”
^SCR("WBPRM","A",2)

^SCR("WBPRM","A",3)
:(€Œ-0,�‹-1)„Œ‰’”"—‰'‚…Œ‘�†‰�"š‹˜’Ž�€„
^SCR("WBPRM","A",4)

^SCR("WBPRM","A",5)
„—‘’˜…ƒ‰™š’�š…ƒ…—�™…Ž‰Žš’��€„
^SCR("WBPRM","A",6)
:(€Œ-0,�‹-1)‰˜™”€„š…ƒ…—�„�…‹‘€…ŒŽš€�‰™Œ
^SCR("WBPRM","A",7)

^SCR("WBPRM","A",8)
-�…ƒ’…Ž‡…—Œ‰…„‰†š’�
^SCR("WBPRM","A",9)
:(€Œ-0,�‹-1)„”…—�š…‰Ž‰�”„š…�ˆ„„Œ‹š€Œˆ�Œ�€„
^SCR("WBPRM","A",10)

^SCR("WBPRM","A",11)
:"—‰'‚…Œ‘�†‰�‘‰ˆ˜‹"ˆ‰˜”ƒ…—
^SCR("WBPRM","A",12)

^SCR("WBPRM","A",13)

^SCR("WBPRM","A",14)
:"š…�ˆ„™…Ž‰Ž"ˆ‰˜”ƒ…—
^SCR("WBPRM","A",15)
:"š…ƒ…—�™…Ž‰Ž"ˆ‰˜”ƒ…—
^SCR("WBPRM","A",16)

^SCR("WBPRM","A",17)

^SCR("WBPRM","A",18)

^SCR("WBPRM","AV",1)
"÷é'âåìñðæéá"-ìíéøèîøô
^SCR("WBPRM","AV",2)

^SCR("WBPRM","AV",3)
:(àì-0,ïë-1)äìéòô"÷é'âåìñðæéá"úëøòîíàä
^SCR("WBPRM","AV",4)

^SCR("WBPRM","AV",5)
ä÷ñòøåãéùúòáúåãå÷ðùåîéîúòáíàä
^SCR("WBPRM","AV",6)
:(àì-0,ïë-1)éøùôàäúåãå÷ðäíåëñàåìîúàíéùì
^SCR("WBPRM","AV",7)

^SCR("WBPRM","AV",8)
-ïåãòåîçå÷ìéåäéæúòá
^SCR("WBPRM","AV",9)
:(àì-0,ïë-1)äôå÷áúåéîéðôäúåáèääìëúàìèáìíàä
^SCR("WBPRM","AV",10)

^SCR("WBPRM","AV",11)
:"÷é'âåìñðæéáñéèøë"èéøôãå÷
^SCR("WBPRM","AV",12)

^SCR("WBPRM","AV",13)

^SCR("WBPRM","AV",14)
:"úåáèäùåîéî"èéøôãå÷
^SCR("WBPRM","AV",15)
:"úåãå÷ðùåîéî"èéøôãå÷
^SCR("WBPRM","AV",16)

^SCR("WBPRM","AV",17)

^SCR("WBPRM","AV",18)

^SCR("WBPRM","NAME")
wi'bel qpfial lixhnxt
^SCR("WBPRM","P",3,"CRD")
3,20,N,1,0
^SCR("WBPRM","P",3,"HELP")

^SCR("WBPRM","P",3,"LMAX")
4
^SCR("WBPRM","P",3,"MUMPS1")

^SCR("WBPRM","P",3,"MUMPS2")
D ^%L1BDO
^SCR("WBPRM","P",3,"MUST")

^SCR("WBPRM","P",3,"TYP")
N
^SCR("WBPRM","P",5,"CRD")
6,13,N,1,0
^SCR("WBPRM","P",5,"HELP")

^SCR("WBPRM","P",5,"LMAX")
4
^SCR("WBPRM","P",5,"MUMPS1")
S:$G(NKD)="" NKD=1
^SCR("WBPRM","P",5,"MUMPS2")
D ^%L1BDO
^SCR("WBPRM","P",5,"MUST")

^SCR("WBPRM","P",5,"TYP")
N
^SCR("WBPRM","P",10,"CRD")
9,13,N,1,0
^SCR("WBPRM","P",10,"HELP")

^SCR("WBPRM","P",10,"LMAX")
4
^SCR("WBPRM","P",10,"MUMPS1")
S:'$G(NOKFL) NOKFL=0
^SCR("WBPRM","P",10,"MUMPS2")

^SCR("WBPRM","P",10,"TYP")
N
^SCR("WBPRM","P",12,"CHECK")
Y
^SCR("WBPRM","P",12,"CRD")
11,35,E,8,0
^SCR("WBPRM","P",12,"FNC")

^SCR("WBPRM","P",12,"GLOB")
PAR
^SCR("WBPRM","P",12,"HELP")

^SCR("WBPRM","P",12,"LMAX")
9
^SCR("WBPRM","P",12,"MUMPS1")

^SCR("WBPRM","P",12,"MUMPS2")

^SCR("WBPRM","P",12,"NLN")
20
^SCR("WBPRM","P",12,"RZD")
\
^SCR("WBPRM","P",12,"TOPB")
8
^SCR("WBPRM","P",12,"TYP")
E
^SCR("WBPRM","P",12,"VRB")
PAR1
^SCR("WBPRM","P",13,"CRD")
11,34,H,21,0
^SCR("WBPRM","P",13,"HELP")

^SCR("WBPRM","P",13,"LMAX")
21
^SCR("WBPRM","P",13,"MUMPS1")

^SCR("WBPRM","P",13,"MUMPS2")

^SCR("WBPRM","P",13,"OUTPUT")

^SCR("WBPRM","P",13,"TYP")
H
^SCR("WBPRM","P",40,"CHECK")
Y
^SCR("WBPRM","P",40,"CRD")
14,39,E,8,0
^SCR("WBPRM","P",40,"FNC")

^SCR("WBPRM","P",40,"GLOB")
^PAR
^SCR("WBPRM","P",40,"HELP")

^SCR("WBPRM","P",40,"LMAX")
8
^SCR("WBPRM","P",40,"MUMPS1")

^SCR("WBPRM","P",40,"MUMPS2")

^SCR("WBPRM","P",40,"NLN")
20
^SCR("WBPRM","P",40,"RZD")
**
^SCR("WBPRM","P",40,"TOPB")
8
^SCR("WBPRM","P",40,"TYP")
E
^SCR("WBPRM","P",40,"VRB")
PARBON1
^SCR("WBPRM","P",41,"CRD")
14,38,H,25,0
^SCR("WBPRM","P",41,"HELP")

^SCR("WBPRM","P",41,"LMAX")
25
^SCR("WBPRM","P",41,"MUMPS1")

^SCR("WBPRM","P",41,"MUMPS2")

^SCR("WBPRM","P",41,"OUTPUT")

^SCR("WBPRM","P",41,"TYP")
H
^SCR("WBPRM","P",45,"CHECK")
Y
^SCR("WBPRM","P",45,"CRD")
15,39,N,8,0
^SCR("WBPRM","P",45,"FNC")

^SCR("WBPRM","P",45,"GLOB")
^PAR
^SCR("WBPRM","P",45,"HELP")

^SCR("WBPRM","P",45,"LMAX")
8
^SCR("WBPRM","P",45,"MUMPS1")

^SCR("WBPRM","P",45,"MUMPS2")

^SCR("WBPRM","P",45,"NLN")
20
^SCR("WBPRM","P",45,"RZD")
**
^SCR("WBPRM","P",45,"TOPB")
8
^SCR("WBPRM","P",45,"TYP")
N
^SCR("WBPRM","P",45,"VRB")
PARNKD1
^SCR("WBPRM","P",46,"CRD")
15,38,H,25,0
^SCR("WBPRM","P",46,"HELP")

^SCR("WBPRM","P",46,"LMAX")
25
^SCR("WBPRM","P",46,"MUMPS1")

^SCR("WBPRM","P",46,"MUMPS2")

^SCR("WBPRM","P",46,"OUTPUT")

^SCR("WBPRM","P",46,"TYP")
H
^SCR("WBPRM","P","NAME","BSL")
3
^SCR("WBPRM","P","NAME","NKD")
5
^SCR("WBPRM","P","NAME","NOKFL")
10
^SCR("WBPRM","P","NAME","PAR")
12
^SCR("WBPRM","P","NAME","PAR1")
13
^SCR("WBPRM","P","NAME","PARBON")
40
^SCR("WBPRM","P","NAME","PARBON1")
41
^SCR("WBPRM","P","NAME","PARNKD")
45
^SCR("WBPRM","P","NAME","PARNKD1")
46
^SCR("WBPRM","P","NM",3)
BSL
^SCR("WBPRM","P","NM",5)
NKD
^SCR("WBPRM","P","NM",10)
NOKFL
^SCR("WBPRM","P","NM",12)
PAR
^SCR("WBPRM","P","NM",13)
PAR1
^SCR("WBPRM","P","NM",40)
PARBON
^SCR("WBPRM","P","NM",41)
PARBON1
^SCR("WBPRM","P","NM",45)
PARNKD
^SCR("WBPRM","P","NM",46)
PARNKD1
^SCR("WBPRM","P","RB",1)
3,8,17,78
^SCR("WBQIDNT")
H
^SCR("WBQIDNT",1)
                                                                               
^SCR("WBQIDNT",2)
                                                                               
^SCR("WBQIDNT",3)
                                                                               
^SCR("WBQIDNT",4)
                                                                               
^SCR("WBQIDNT",5)
                                                                               
^SCR("WBQIDNT",6)
                                                                               
^SCR("WBQIDNT",7)
                                                                   1]          
^SCR("WBQIDNT",8)
                                       {05         } : zedf 'z 'qn             
^SCR("WBQIDNT",9)
                                                                               
^SCR("WBQIDNT",10)
                                       {10         } :   oetlh 'qn             
^SCR("WBQIDNT",11)
                                                                               
^SCR("WBQIDNT",12)
                                {15                } :   qihxk 'qn             
^SCR("WBQIDNT",13)
                             [1                                                
^SCR("WBQIDNT",14)
                                                                               
^SCR("WBQIDNT","A",1)

^SCR("WBQIDNT","A",2)

^SCR("WBQIDNT","A",3)

^SCR("WBQIDNT","A",4)

^SCR("WBQIDNT","A",5)

^SCR("WBQIDNT","A",6)

^SCR("WBQIDNT","A",7)

^SCR("WBQIDNT","A",8)
:š…„†'š'‘Ž
^SCR("WBQIDNT","A",9)

^SCR("WBQIDNT","A",10)
:�…”Œˆ'‘Ž
^SCR("WBQIDNT","A",11)

^SCR("WBQIDNT","A",12)
:‘‰ˆ˜‹'‘Ž
^SCR("WBQIDNT","A",13)

^SCR("WBQIDNT","A",14)

^SCR("WBQIDNT","AV",1)

^SCR("WBQIDNT","AV",2)

^SCR("WBQIDNT","AV",3)

^SCR("WBQIDNT","AV",4)

^SCR("WBQIDNT","AV",5)

^SCR("WBQIDNT","AV",6)

^SCR("WBQIDNT","AV",7)

^SCR("WBQIDNT","AV",8)
:,uvzw,wxn
^SCR("WBQIDNT","AV",9)

^SCR("WBQIDNT","AV",10)
:iupkywxn
^SCR("WBQIDNT","AV",11)

^SCR("WBQIDNT","AV",12)
:xhyrfwxn
^SCR("WBQIDNT","AV",13)

^SCR("WBQIDNT","AV",14)

^SCR("WBQIDNT","NAME")

^SCR("WBQIDNT","P",5,"CRD")
8,39,E,9,0
^SCR("WBQIDNT","P",5,"HELP")

^SCR("WBQIDNT","P",5,"LMAX")
12
^SCR("WBQIDNT","P",5,"MUMPS1")

^SCR("WBQIDNT","P",5,"MUMPS2")

^SCR("WBQIDNT","P",5,"TYP")
E
^SCR("WBQIDNT","P",10,"CRD")
10,39,E,11,0
^SCR("WBQIDNT","P",10,"HELP")

^SCR("WBQIDNT","P",10,"LMAX")
12
^SCR("WBQIDNT","P",10,"MUMPS1")

^SCR("WBQIDNT","P",10,"MUMPS2")

^SCR("WBQIDNT","P",10,"TYP")
E
^SCR("WBQIDNT","P",15,"CRD")
12,32,E,19,0
^SCR("WBQIDNT","P",15,"HELP")

^SCR("WBQIDNT","P",15,"LMAX")
19
^SCR("WBQIDNT","P",15,"MUMPS1")

^SCR("WBQIDNT","P",15,"MUMPS2")

^SCR("WBQIDNT","P",15,"TYP")
E
^SCR("WBQIDNT","P","NAME","B1CARD")
15
^SCR("WBQIDNT","P","NAME","B1TEL")
10
^SCR("WBQIDNT","P","NAME","B1TZ")
5
^SCR("WBQIDNT","P","NM",5)
B1TZ
^SCR("WBQIDNT","P","NM",10)
B1TEL
^SCR("WBQIDNT","P","NM",15)
B1CARD
^SCR("WBQIDNT","P","RB",1)
8,30,14,69
^SCR("WBSRCH")
H
^SCR("WBSRCH",1)
                                                                               
^SCR("WBSRCH",2)
                                                                               
^SCR("WBSRCH",3)
                                                                               
^SCR("WBSRCH",4)
                                                                               
^SCR("WBSRCH",5)
                                                                               
^SCR("WBSRCH",6)
                                                                               
^SCR("WBSRCH",7)
                                                                  1]           
^SCR("WBSRCH",8)
                        {                         01}                          
^SCR("WBSRCH",9)
                                                                               
^SCR("WBSRCH",10)
                        {                         05} :  ihxt my               
^SCR("WBSRCH",11)
                                                                               
^SCR("WBSRCH",12)
                        {                         07} : dgtyn my               
^SCR("WBSRCH",13)
                                                                               
^SCR("WBSRCH",14)
                                         {10        } : gewl 'lh               
^SCR("WBSRCH",15)
                                                                               
^SCR("WBSRCH",16)
                                          {15       } :  zedf 'z               
^SCR("WBSRCH",17)
                                                                               
^SCR("WBSRCH",18)
                 {20                                } :    l"`ec               
^SCR("WBSRCH",19)
                                                                               
^SCR("WBSRCH",20)
             [1                                                                
^SCR("WBSRCH",21)
                                                                               
^SCR("WBSRCH","A",1)

^SCR("WBSRCH","A",2)

^SCR("WBSRCH","A",3)

^SCR("WBSRCH","A",4)

^SCR("WBSRCH","A",5)

^SCR("WBSRCH","A",6)

^SCR("WBSRCH","A",7)

^SCR("WBSRCH","A",8)

^SCR("WBSRCH","A",9)

^SCR("WBSRCH","A",10)
:‰ˆ˜”�™
^SCR("WBSRCH","A",11)

^SCR("WBSRCH","A",12)
:„‡”™Ž�™
^SCR("WBSRCH","A",13)

^SCR("WBSRCH","A",14)
:‡…—Œ'Œˆ
^SCR("WBSRCH","A",15)

^SCR("WBSRCH","A",16)
:š…„†'š
^SCR("WBSRCH","A",17)

^SCR("WBSRCH","A",18)
:Œ"€…ƒ
^SCR("WBSRCH","A",19)

^SCR("WBSRCH","A",20)

^SCR("WBSRCH","A",21)

^SCR("WBSRCH","AV",1)

^SCR("WBSRCH","AV",2)

^SCR("WBSRCH","AV",3)

^SCR("WBSRCH","AV",4)

^SCR("WBSRCH","AV",5)

^SCR("WBSRCH","AV",6)

^SCR("WBSRCH","AV",7)

^SCR("WBSRCH","AV",8)

^SCR("WBSRCH","AV",9)

^SCR("WBSRCH","AV",10)
:hyrpoa
^SCR("WBSRCH","AV",11)

^SCR("WBSRCH","AV",12)
:vjpanoa
^SCR("WBSRCH","AV",13)

^SCR("WBSRCH","AV",14)
:juekwky
^SCR("WBSRCH","AV",15)

^SCR("WBSRCH","AV",16)
:,uvzw,
^SCR("WBSRCH","AV",17)

^SCR("WBSRCH","AV",18)
:k"tus
^SCR("WBSRCH","AV",19)

^SCR("WBSRCH","AV",20)

^SCR("WBSRCH","AV",21)

^SCR("WBSRCH","NAME")

^SCR("WBSRCH","P",1,"CRD")
8,53,H,28
^SCR("WBSRCH","P",1,"HELP")

^SCR("WBSRCH","P",1,"LMAX")
28
^SCR("WBSRCH","P",1,"MUMPS1")

^SCR("WBSRCH","P",1,"MUMPS2")

^SCR("WBSRCH","P",1,"OUTPUT")

^SCR("WBSRCH","P",1,"TYP")
H
^SCR("WBSRCH","P",5,"CRD")
10,53,H,26
^SCR("WBSRCH","P",5,"HELP")

^SCR("WBSRCH","P",5,"LMAX")
28
^SCR("WBSRCH","P",5,"MUMPS1")

^SCR("WBSRCH","P",5,"MUMPS2")

^SCR("WBSRCH","P",5,"TYP")
H
^SCR("WBSRCH","P",7,"CRD")
12,53,H,28
^SCR("WBSRCH","P",7,"HELP")

^SCR("WBSRCH","P",7,"LMAX")
28
^SCR("WBSRCH","P",7,"MUMPS1")

^SCR("WBSRCH","P",7,"MUMPS2")

^SCR("WBSRCH","P",7,"TYP")
H
^SCR("WBSRCH","P",10,"CRD")
14,41,E,11,0
^SCR("WBSRCH","P",10,"HELP")

^SCR("WBSRCH","P",10,"LMAX")
11
^SCR("WBSRCH","P",10,"MUMPS1")

^SCR("WBSRCH","P",10,"MUMPS2")

^SCR("WBSRCH","P",10,"TYP")
E
^SCR("WBSRCH","P",15,"CRD")
16,42,E,9,0
^SCR("WBSRCH","P",15,"HELP")

^SCR("WBSRCH","P",15,"LMAX")
10
^SCR("WBSRCH","P",15,"MUMPS1")

^SCR("WBSRCH","P",15,"MUMPS2")

^SCR("WBSRCH","P",15,"TYP")
E
^SCR("WBSRCH","P",20,"CRD")
18,17,E,35,0
^SCR("WBSRCH","P",20,"HELP")

^SCR("WBSRCH","P",20,"LMAX")
35
^SCR("WBSRCH","P",20,"MUMPS1")

^SCR("WBSRCH","P",20,"MUMPS2")

^SCR("WBSRCH","P",20,"TYP")
E
^SCR("WBSRCH","P","NAME","B1EMAIL")
20
^SCR("WBSRCH","P","NAME","B1FNAME")
5
^SCR("WBSRCH","P","NAME","B1LNAME")
7
^SCR("WBSRCH","P","NAME","B1TEL")
10
^SCR("WBSRCH","P","NAME","B1TZ")
15
^SCR("WBSRCH","P","NAME","CLUB")
1
^SCR("WBSRCH","P","NM",1)
CLUB
^SCR("WBSRCH","P","NM",5)
B1FNAME
^SCR("WBSRCH","P","NM",7)
B1LNAME
^SCR("WBSRCH","P","NM",10)
B1TEL
^SCR("WBSRCH","P","NM",15)
B1TZ
^SCR("WBSRCH","P","NM",20)
B1EMAIL
^SCR("WBSRCH","P","RB",1)
8,14,21,68
^SCR("WCSETUP")
H
^SCR("WCSETUP",1)
                                                                               
^SCR("WCSETUP",2)
                   # qeaiq zkxrnl mixhnxt #                                    
^SCR("WCSETUP",3)
                                                                               
^SCR("WCSETUP",4)
                                                             1]                
^SCR("WCSETUP",5)
                                                                               
^SCR("WCSETUP",6)
                       {05            } :          zxy zaezk                   
^SCR("WCSETUP",7)
                                 {10  } :           uexr 'qn                   
^SCR("WCSETUP",8)
                                 {15  } :  (zeipy) dpznd onf                   
^SCR("WCSETUP",9)
                             {20      } :         dcrqn xtqn                   
^SCR("WCSETUP",10)
                             {25      } :          dtew xtqn                   
^SCR("WCSETUP",11)
                                                                               
^SCR("WCSETUP",12)
                         {30          } :     qeaiq gewl 'qn                   
^SCR("WCSETUP",13)
              {35       } : (zipci dtwd) dtwd qeaiq gewl 'qn                   
^SCR("WCSETUP",14)
                              {40     } :           dxag 'qn                   
^SCR("WCSETUP",15)
                                {45   } :      qeaiq zelnr %                   
^SCR("WCSETUP",16)
                                                                               
^SCR("WCSETUP",17)
           [1                                                                  
^SCR("WCSETUP",18)
                                                                               
^SCR("WCSETUP","AV",1)

^SCR("WCSETUP","AV",2)
ñåáéñúëøòîìíéøèîøô
^SCR("WCSETUP","AV",3)

^SCR("WCSETUP","AV",4)

^SCR("WCSETUP","AV",5)

^SCR("WCSETUP","AV",6)
:úøùúáåúë
^SCR("WCSETUP","AV",7)
:õåøò'ñî
^SCR("WCSETUP","AV",8)
:(úåéðù)äðúîäïîæ
^SCR("WCSETUP","AV",9)
:äãòñîøôñî
^SCR("WCSETUP","AV",10)
:äôå÷øôñî
^SCR("WCSETUP","AV",11)

^SCR("WCSETUP","AV",12)
:ñåáéñçå÷ì'ñî
^SCR("WCSETUP","AV",13)
:(úéðãéäô÷ä)äô÷äñåáéñçå÷ì'ñî
^SCR("WCSETUP","AV",14)
:äøáç'ñî
^SCR("WCSETUP","AV",15)
:ñåáéñúåìîò%
^SCR("WCSETUP","AV",16)

^SCR("WCSETUP","AV",17)

^SCR("WCSETUP","AV",18)

^SCR("WCSETUP","NAME")
SETUP FOR E1
^SCR("WCSETUP","P",5,"CRD")
6,23,E,15,0
^SCR("WCSETUP","P",5,"HELP")

^SCR("WCSETUP","P",5,"LMAX")
15
^SCR("WCSETUP","P",5,"MUMPS1")

^SCR("WCSETUP","P",5,"MUMPS2")

^SCR("WCSETUP","P",5,"TYP")
E
^SCR("WCSETUP","P",10,"CRD")
7,33,N,5,0
^SCR("WCSETUP","P",10,"HELP")

^SCR("WCSETUP","P",10,"LMAX")
5
^SCR("WCSETUP","P",10,"MUMPS1")

^SCR("WCSETUP","P",10,"MUMPS2")

^SCR("WCSETUP","P",10,"TYP")
N
^SCR("WCSETUP","P",15,"CRD")
8,33,N,4,0
^SCR("WCSETUP","P",15,"HELP")

^SCR("WCSETUP","P",15,"LMAX")
5
^SCR("WCSETUP","P",15,"MUMPS1")

^SCR("WCSETUP","P",15,"MUMPS2")

^SCR("WCSETUP","P",15,"TYP")
N
^SCR("WCSETUP","P",20,"CRD")
9,29,N,8,0
^SCR("WCSETUP","P",20,"HELP")

^SCR("WCSETUP","P",20,"LMAX")
9
^SCR("WCSETUP","P",20,"MUMPS1")

^SCR("WCSETUP","P",20,"MUMPS2")

^SCR("WCSETUP","P",20,"MUST")

^SCR("WCSETUP","P",20,"TYP")
N
^SCR("WCSETUP","P",25,"CRD")
10,29,N,8,0
^SCR("WCSETUP","P",25,"HELP")

^SCR("WCSETUP","P",25,"LMAX")
9
^SCR("WCSETUP","P",25,"MUMPS1")

^SCR("WCSETUP","P",25,"MUMPS2")

^SCR("WCSETUP","P",25,"TYP")
N
^SCR("WCSETUP","P",30,"CRD")
12,25,E,10,0
^SCR("WCSETUP","P",30,"HELP")

^SCR("WCSETUP","P",30,"LMAX")
13
^SCR("WCSETUP","P",30,"MUMPS1")

^SCR("WCSETUP","P",30,"MUMPS2")

^SCR("WCSETUP","P",30,"TYP")
E
^SCR("WCSETUP","P",35,"CRD")
13,14,E,10,0
^SCR("WCSETUP","P",35,"FNC")

^SCR("WCSETUP","P",35,"GLOB")
^LKH
^SCR("WCSETUP","P",35,"HELP")

^SCR("WCSETUP","P",35,"LMAX")
10
^SCR("WCSETUP","P",35,"MUMPS1")

^SCR("WCSETUP","P",35,"MUMPS2")

^SCR("WCSETUP","P",35,"NLN")
20
^SCR("WCSETUP","P",35,"RZD")
\
^SCR("WCSETUP","P",35,"TOPB")
8
^SCR("WCSETUP","P",35,"TYP")
E
^SCR("WCSETUP","P",35,"VRB")
LKH1
^SCR("WCSETUP","P",40,"CRD")
14,30,E,8,0
^SCR("WCSETUP","P",40,"HELP")

^SCR("WCSETUP","P",40,"LMAX")
8
^SCR("WCSETUP","P",40,"MUMPS1")

^SCR("WCSETUP","P",40,"MUMPS2")

^SCR("WCSETUP","P",40,"TYP")
E
^SCR("WCSETUP","P",45,"CRD")
15,32,N,5,2
^SCR("WCSETUP","P",45,"HELP")

^SCR("WCSETUP","P",45,"LMAX")
6
^SCR("WCSETUP","P",45,"MUMPS1")

^SCR("WCSETUP","P",45,"MUMPS2")

^SCR("WCSETUP","P",45,"TYP")
N
^SCR("WCSETUP","P","NAME","AHUZ")
45
^SCR("WCSETUP","P","NAME","CMPID")
40
^SCR("WCSETUP","P","NAME","IPA")
5
^SCR("WCSETUP","P","NAME","KUP")
25
^SCR("WCSETUP","P","NAME","LKCIB")
30
^SCR("WCSETUP","P","NAME","LKCIBH")
35
^SCR("WCSETUP","P","NAME","PORT")
10
^SCR("WCSETUP","P","NAME","RSID")
20
^SCR("WCSETUP","P","NAME","TOUT")
15
^SCR("WCSETUP","P","NM",5)
IPA
^SCR("WCSETUP","P","NM",10)
PORT
^SCR("WCSETUP","P","NM",15)
TOUT
^SCR("WCSETUP","P","NM",20)
RSID
^SCR("WCSETUP","P","NM",25)
KUP
^SCR("WCSETUP","P","NM",30)
LKCIB
^SCR("WCSETUP","P","NM",35)
LKCIBH
^SCR("WCSETUP","P","NM",40)
CMPID
^SCR("WCSETUP","P","NM",45)
AHUZ
^SCR("WCSETUP","P","RB",1)
5,12,18,63
^SCR("WLMADVSR")
H
^SCR("WLMADVSR",1)
                                                                               
^SCR("WLMADVSR",2)
                                                                  1]           
^SCR("WLMADVSR",3)
                                                                               
^SCR("WLMADVSR",4)
                        {                         05} :  ihxt my               
^SCR("WLMADVSR",5)
                                                                               
^SCR("WLMADVSR",6)
                        {                         07} : dgtyn my               
^SCR("WLMADVSR",7)
                                                                               
^SCR("WLMADVSR",8)
                                         {10        } : gewl 'lh               
^SCR("WLMADVSR",9)
                                                                               
^SCR("WLMADVSR",10)
                                          {15       } :  zedf 'z               
^SCR("WLMADVSR",11)
                                                                               
^SCR("WLMADVSR",12)
                 {20                                } :    l"`ec               
^SCR("WLMADVSR",13)
                                                                               
^SCR("WLMADVSR",14)
             [1                                                                
^SCR("WLMADVSR",15)
                                                                               
^SCR("WLMADVSR","AV",1)

^SCR("WLMADVSR","AV",2)

^SCR("WLMADVSR","AV",3)

^SCR("WLMADVSR","AV",4)
:éèøôíù
^SCR("WLMADVSR","AV",5)

^SCR("WLMADVSR","AV",6)
:äçôùîíù
^SCR("WLMADVSR","AV",7)

^SCR("WLMADVSR","AV",8)
:çå÷ì'ìè
^SCR("WLMADVSR","AV",9)

^SCR("WLMADVSR","AV",10)
:úåäæ'ú
^SCR("WLMADVSR","AV",11)

^SCR("WLMADVSR","AV",12)
:ì"àåã
^SCR("WLMADVSR","AV",13)

^SCR("WLMADVSR","AV",14)

^SCR("WLMADVSR","AV",15)

^SCR("WLMADVSR","NAME")

^SCR("WLMADVSR","P",5,"CRD")
4,53,H,26,0
^SCR("WLMADVSR","P",5,"HELP")

^SCR("WLMADVSR","P",5,"LMAX")
28
^SCR("WLMADVSR","P",5,"MUMPS1")

^SCR("WLMADVSR","P",5,"MUMPS2")

^SCR("WLMADVSR","P",5,"TYP")
H
^SCR("WLMADVSR","P",7,"CRD")
6,53,H,28,0
^SCR("WLMADVSR","P",7,"HELP")

^SCR("WLMADVSR","P",7,"LMAX")
28
^SCR("WLMADVSR","P",7,"MUMPS1")

^SCR("WLMADVSR","P",7,"MUMPS2")

^SCR("WLMADVSR","P",7,"TYP")
H
^SCR("WLMADVSR","P",10,"CRD")
8,41,E,11,0
^SCR("WLMADVSR","P",10,"HELP")

^SCR("WLMADVSR","P",10,"LMAX")
11
^SCR("WLMADVSR","P",10,"MUMPS1")

^SCR("WLMADVSR","P",10,"MUMPS2")

^SCR("WLMADVSR","P",10,"TYP")
E
^SCR("WLMADVSR","P",15,"CRD")
10,42,E,9,0
^SCR("WLMADVSR","P",15,"HELP")

^SCR("WLMADVSR","P",15,"LMAX")
10
^SCR("WLMADVSR","P",15,"MUMPS1")

^SCR("WLMADVSR","P",15,"MUMPS2")

^SCR("WLMADVSR","P",15,"TYP")
E
^SCR("WLMADVSR","P",20,"CRD")
12,17,E,35,0
^SCR("WLMADVSR","P",20,"HELP")

^SCR("WLMADVSR","P",20,"LMAX")
35
^SCR("WLMADVSR","P",20,"MUMPS1")

^SCR("WLMADVSR","P",20,"MUMPS2")

^SCR("WLMADVSR","P",20,"TYP")
E
^SCR("WLMADVSR","P","NAME","LKMEMAIL")
20
^SCR("WLMADVSR","P","NAME","LKMFAMIL")
7
^SCR("WLMADVSR","P","NAME","LKMNAME")
5
^SCR("WLMADVSR","P","NAME","LKMTEL")
10
^SCR("WLMADVSR","P","NAME","LKMTZ")
15
^SCR("WLMADVSR","P","NM",5)
LKMNAME
^SCR("WLMADVSR","P","NM",7)
LKMFAMIL
^SCR("WLMADVSR","P","NM",10)
LKMTEL
^SCR("WLMADVSR","P","NM",15)
LKMTZ
^SCR("WLMADVSR","P","NM",20)
LKMEMAIL
^SCR("WLMADVSR","P","RB",1)
3,14,15,68
^SCR("WLMQIDNT")
H
^SCR("WLMQIDNT",1)
                                                                               
^SCR("WLMQIDNT",2)
                                                                               
^SCR("WLMQIDNT",3)
                                                                               
^SCR("WLMQIDNT",4)
                                                                               
^SCR("WLMQIDNT",5)
                                                                               
^SCR("WLMQIDNT",6)
                                                                               
^SCR("WLMQIDNT",7)
                                                                   1]          
^SCR("WLMQIDNT",8)
                                       {05         } : zedf 'z 'qn             
^SCR("WLMQIDNT",9)
                                                                               
^SCR("WLMQIDNT",10)
                                       {10         } :   oetlh 'qn             
^SCR("WLMQIDNT",11)
                                                                               
^SCR("WLMQIDNT",12)
                                {15                } :   qihxk 'qn             
^SCR("WLMQIDNT",13)
                             [1                                                
^SCR("WLMQIDNT",14)
                                                                               
^SCR("WLMQIDNT","AV",1)

^SCR("WLMQIDNT","AV",2)

^SCR("WLMQIDNT","AV",3)

^SCR("WLMQIDNT","AV",4)

^SCR("WLMQIDNT","AV",5)

^SCR("WLMQIDNT","AV",6)

^SCR("WLMQIDNT","AV",7)

^SCR("WLMQIDNT","AV",8)
:úåäæ'ú'ñî
^SCR("WLMQIDNT","AV",9)

^SCR("WLMQIDNT","AV",10)
:ïåôìè'ñî
^SCR("WLMQIDNT","AV",11)

^SCR("WLMQIDNT","AV",12)
:ñéèøë'ñî
^SCR("WLMQIDNT","AV",13)

^SCR("WLMQIDNT","AV",14)

^SCR("WLMQIDNT","NAME")

^SCR("WLMQIDNT","P",5,"CRD")
8,39,E,9,0
^SCR("WLMQIDNT","P",5,"HELP")

^SCR("WLMQIDNT","P",5,"LMAX")
12
^SCR("WLMQIDNT","P",5,"MUMPS1")

^SCR("WLMQIDNT","P",5,"MUMPS2")

^SCR("WLMQIDNT","P",5,"TYP")
E
^SCR("WLMQIDNT","P",10,"CRD")
10,39,E,11,0
^SCR("WLMQIDNT","P",10,"HELP")

^SCR("WLMQIDNT","P",10,"LMAX")
12
^SCR("WLMQIDNT","P",10,"MUMPS1")

^SCR("WLMQIDNT","P",10,"MUMPS2")

^SCR("WLMQIDNT","P",10,"TYP")
E
^SCR("WLMQIDNT","P",15,"CRD")
12,32,E,19,0
^SCR("WLMQIDNT","P",15,"HELP")

^SCR("WLMQIDNT","P",15,"LMAX")
19
^SCR("WLMQIDNT","P",15,"MUMPS1")

^SCR("WLMQIDNT","P",15,"MUMPS2")

^SCR("WLMQIDNT","P",15,"TYP")
E
^SCR("WLMQIDNT","P","NAME","LKMCARD")
15
^SCR("WLMQIDNT","P","NAME","LKMTEL")
10
^SCR("WLMQIDNT","P","NAME","LKMTZ")
5
^SCR("WLMQIDNT","P","NM",5)
LKMTZ
^SCR("WLMQIDNT","P","NM",10)
LKMTEL
^SCR("WLMQIDNT","P","NM",15)
LKMCARD
^SCR("WLMQIDNT","P","RB",1)
8,30,14,69
^SCR("WMCSETUP")
H
^SCR("WMCSETUP",1)
                                                                               
^SCR("WMCSETUP",2)
                                                                        1]     
^SCR("WMCSETUP",3)
                                      {05      } :           dcrqn 'qn         
^SCR("WMCSETUP",4)
                                                                               
^SCR("WMCSETUP",5)
                                          {10  } :     dqtcdl uexr 'qn         
^SCR("WMCSETUP",6)
                                                                               
^SCR("WMCSETUP",7)
                                     {15       } : 'MY CHECK' hixt 'qn         
^SCR("WMCSETUP",8)
                                                                               
^SCR("WMCSETUP",9)
                                 [1                                            
^SCR("WMCSETUP","A",1)

^SCR("WMCSETUP","A",2)

^SCR("WMCSETUP","A",3)
:„ƒ’‘Ž'‘Ž
^SCR("WMCSETUP","A",4)

^SCR("WMCSETUP","A",5)
:„‘”ƒ„Œ•…˜’'‘Ž
^SCR("WMCSETUP","A",6)

^SCR("WMCSETUP","A",7)
:'MYCHECK'ˆ‰˜”'‘Ž
^SCR("WMCSETUP","A",8)

^SCR("WMCSETUP","A",9)

^SCR("WMCSETUP","AV",1)

^SCR("WMCSETUP","AV",2)

^SCR("WMCSETUP","AV",3)
:vsgxnwxn
^SCR("WMCSETUP","AV",4)

^SCR("WMCSETUP","AV",5)
:vxpsvk•urgwxn
^SCR("WMCSETUP","AV",6)

^SCR("WMCSETUP","AV",7)
:wMYCHECKwyhrpwxn
^SCR("WMCSETUP","AV",8)

^SCR("WMCSETUP","AV",9)

^SCR("WMCSETUP","NAME")
MY CHECK mixhnxt
^SCR("WMCSETUP","P",5,"CRD")
3,38,E,8,0
^SCR("WMCSETUP","P",5,"HELP")

^SCR("WMCSETUP","P",5,"LMAX")
9
^SCR("WMCSETUP","P",5,"MUMPS1")

^SCR("WMCSETUP","P",5,"MUMPS2")

^SCR("WMCSETUP","P",5,"TYP")
E
^SCR("WMCSETUP","P",10,"CRD")
5,42,E,4,0
^SCR("WMCSETUP","P",10,"HELP")

^SCR("WMCSETUP","P",10,"LMAX")
5
^SCR("WMCSETUP","P",10,"MUMPS1")

^SCR("WMCSETUP","P",10,"MUMPS2")

^SCR("WMCSETUP","P",10,"TYP")
E
^SCR("WMCSETUP","P",15,"CHECK")
Y
^SCR("WMCSETUP","P",15,"CRD")
7,37,E,8,0
^SCR("WMCSETUP","P",15,"FNC")

^SCR("WMCSETUP","P",15,"GLOB")
^PAR
^SCR("WMCSETUP","P",15,"HELP")

^SCR("WMCSETUP","P",15,"LMAX")
10
^SCR("WMCSETUP","P",15,"MUMPS1")

^SCR("WMCSETUP","P",15,"MUMPS2")

^SCR("WMCSETUP","P",15,"MUST")

^SCR("WMCSETUP","P",15,"NLN")
20
^SCR("WMCSETUP","P",15,"RZD")
**
^SCR("WMCSETUP","P",15,"TOPB")
8
^SCR("WMCSETUP","P",15,"TYP")
E
^SCR("WMCSETUP","P",15,"VRB")
MYCH1
^SCR("WMCSETUP","P","NAME","MSD")
5
^SCR("WMCSETUP","P","NAME","MYCH")
15
^SCR("WMCSETUP","P","NAME","PRINT")
10
^SCR("WMCSETUP","P","NM",5)
MSD
^SCR("WMCSETUP","P","NM",10)
PRINT
^SCR("WMCSETUP","P","NM",15)
MYCH
^SCR("WMCSETUP","P","RB",1)
3,34,10,74
^SCR("WMLKH")
H
^SCR("WMLKH",1)
                              {                      10}:   gewl my            
^SCR("WMLKH",2)
                                         { 15}: (0 - p , 1 - f) oin            
^SCR("WMLKH",3)
                                {                    20}:      aegx            
^SCR("WMLKH",4)
                                                  {25  }:       zia            
^SCR("WMLKH",5)
                                                  {30  }:      dxic            
^SCR("WMLKH",6)
                                       {             35}:       xir            
^SCR("WMLKH",7)
                     {40                               }:     l"`ec            
^SCR("WMLKH",8)
                                                                               
^SCR("WMLKH",9)
                                                                               
^SCR("WMLKH","A",1)
:‡…—Œ�™
^SCR("WMLKH","A",2)
:(0-�,1-†)�‰Ž
^SCR("WMLKH","A",3)
:�…‡˜
^SCR("WMLKH","A",4)
:š‰�
^SCR("WMLKH","A",5)
:„˜‰ƒ
^SCR("WMLKH","A",6)
:˜‰’
^SCR("WMLKH","A",7)
:Œ"€…ƒ
^SCR("WMLKH","A",8)

^SCR("WMLKH","A",9)

^SCR("WMLKH","AV",1)
:juekoa
^SCR("WMLKH","AV",2)
:(0-b'1-z)ihn
^SCR("WMLKH","AV",3)
:cujr
^SCR("WMLKH","AV",4)
:,hc
^SCR("WMLKH","AV",5)
:vrhs
^SCR("WMLKH","AV",6)
:rhg
^SCR("WMLKH","AV",7)
:k"tus
^SCR("WMLKH","AV",8)

^SCR("WMLKH","AV",9)

^SCR("WMLKH","NAME")

^SCR("WMLKH","P",10,"CRD")
1,56,H,23
^SCR("WMLKH","P",10,"HELP")

^SCR("WMLKH","P",10,"LMAX")
25
^SCR("WMLKH","P",10,"MUMPS1")

^SCR("WMLKH","P",10,"MUMPS2")

^SCR("WMLKH","P",10,"MUST")

^SCR("WMLKH","P",10,"TYP")
H
^SCR("WMLKH","P",15,"CRD")
2,46,H,1,0
^SCR("WMLKH","P",15,"HELP")

^SCR("WMLKH","P",15,"LMAX")
4
^SCR("WMLKH","P",15,"MUMPS1")

^SCR("WMLKH","P",15,"MUMPS2")

^SCR("WMLKH","P",15,"MUST")

^SCR("WMLKH","P",15,"TYP")
H
^SCR("WMLKH","P",20,"CRD")
3,56,H,23
^SCR("WMLKH","P",20,"HELP")

^SCR("WMLKH","P",20,"LMAX")
23
^SCR("WMLKH","P",20,"MUMPS1")

^SCR("WMLKH","P",20,"MUMPS2")

^SCR("WMLKH","P",20,"MUST")

^SCR("WMLKH","P",20,"TYP")
H
^SCR("WMLKH","P",25,"CRD")
4,50,E,5,0
^SCR("WMLKH","P",25,"HELP")

^SCR("WMLKH","P",25,"LMAX")
5
^SCR("WMLKH","P",25,"MUMPS1")

^SCR("WMLKH","P",25,"MUMPS2")

^SCR("WMLKH","P",25,"MUST")

^SCR("WMLKH","P",25,"TYP")
E
^SCR("WMLKH","P",30,"CRD")
5,50,E,5,0
^SCR("WMLKH","P",30,"HELP")

^SCR("WMLKH","P",30,"LMAX")
5
^SCR("WMLKH","P",30,"MUMPS1")

^SCR("WMLKH","P",30,"MUMPS2")

^SCR("WMLKH","P",30,"MUST")

^SCR("WMLKH","P",30,"TYP")
E
^SCR("WMLKH","P",35,"CRD")
6,56,H,16
^SCR("WMLKH","P",35,"HELP")

^SCR("WMLKH","P",35,"LMAX")
16
^SCR("WMLKH","P",35,"MUMPS1")

^SCR("WMLKH","P",35,"MUMPS2")

^SCR("WMLKH","P",35,"MUST")

^SCR("WMLKH","P",35,"TYP")
H
^SCR("WMLKH","P",40,"CRD")
7,21,E,34,0
^SCR("WMLKH","P",40,"HELP")

^SCR("WMLKH","P",40,"LMAX")
34
^SCR("WMLKH","P",40,"MUMPS1")

^SCR("WMLKH","P",40,"MUMPS2")
S EMAIL=$$FUNC^%UCASE(EMAIL)
^SCR("WMLKH","P",40,"TYP")
E
^SCR("WMLKH","P","NAME","BAIT")
25
^SCR("WMLKH","P","NAME","DIRA")
30
^SCR("WMLKH","P","NAME","EMAIL")
40
^SCR("WMLKH","P","NAME","IR")
35
^SCR("WMLKH","P","NAME","LKHNAME")
10
^SCR("WMLKH","P","NAME","MIN")
15
^SCR("WMLKH","P","NAME","STREET")
20
^SCR("WMLKH","P","NM",10)
LKHNAME
^SCR("WMLKH","P","NM",15)
MIN
^SCR("WMLKH","P","NM",20)
STREET
^SCR("WMLKH","P","NM",25)
BAIT
^SCR("WMLKH","P","NM",30)
DIRA
^SCR("WMLKH","P","NM",35)
IR
^SCR("WMLKH","P","NM",40)
EMAIL
^SCR("WMPREP")
H
^SCR("WMPREP",1)
                     {10      }   jix`z cr    {05      }  jix`zn               
^SCR("WMPREP",2)
         {15 } : ( 2 - dtwd , 1 - milibx minelyz ,0 - minelyzd lk ) minelyz beq
^SCR("WMPREP","A",1)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("WMPREP","A",2)
:(2-„”—„,1-�‰Œ‰‚˜�‰Ž…Œ™š,0-�‰Ž…Œ™š„Œ‹)�‰Ž…Œ™š‚…‘
^SCR("WMPREP","AV",1)
lhrt,sglhrt,n
^SCR("WMPREP","AV",2)
:(2-vpev'1-ohkhdrohnuka,'0-ohnuka,vkf)ohnuka,dux
^SCR("WMPREP","NAME")
cia10 iqihxka minelyz g"ec
^SCR("WMPREP","P",5,"CRD")
1,46,D,8,0
^SCR("WMPREP","P",5,"HELP")

^SCR("WMPREP","P",5,"LMAX")
9
^SCR("WMPREP","P",5,"MUMPS1")
D ^W4IN S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("WMPREP","P",5,"MUMPS2")

^SCR("WMPREP","P",5,"MUST")

^SCR("WMPREP","P",5,"TYP")
D
^SCR("WMPREP","P",10,"CRD")
1,21,D,8,0
^SCR("WMPREP","P",10,"HELP")

^SCR("WMPREP","P",10,"LMAX")
9
^SCR("WMPREP","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("WMPREP","P",10,"MUMPS2")

^SCR("WMPREP","P",10,"MUST")

^SCR("WMPREP","P",10,"TYP")
D
^SCR("WMPREP","P",15,"CRD")
2,9,E,1,0
^SCR("WMPREP","P",15,"HELP")

^SCR("WMPREP","P",15,"LMAX")
4
^SCR("WMPREP","P",15,"MUMPS1")

^SCR("WMPREP","P",15,"MUMPS2")

^SCR("WMPREP","P",15,"TYP")
E
^SCR("WMPREP","P","NAME","DAT1")
5
^SCR("WMPREP","P","NAME","DAT2")
10
^SCR("WMPREP","P","NAME","VT")
15
^SCR("WMPREP","P","NM",5)
DAT1
^SCR("WMPREP","P","NM",10)
DAT2
^SCR("WMPREP","P","NM",15)
VT
^SCR("WMSETUP")
H
^SCR("WMSETUP",1)
                                                                               
^SCR("WMSETUP",2)
                 # qtihlen zkxrnl mixhnxt #                                    
^SCR("WMSETUP",3)
                                                                               
^SCR("WMSETUP",4)
                                  {03 } :dlirt "qtihlen" zkxrn m`d             
^SCR("WMSETUP",5)
                       {05            } :           zxy zaezk                  
^SCR("WMSETUP",6)
                                 {10  } :            uexr 'qn                  
^SCR("WMSETUP",7)
                                  {15 } :   (zeipy) dpznd onf                  
^SCR("WMSETUP",8)
                              {20     } :           seqn xtqn                  
^SCR("WMSETUP",9)
                                              mr dcear zexyt`                  
^SCR("WMSETUP",10)
                                  {25 } :(`l-0,ok-1) ONESWIPE                  
^SCR("WMSETUP",11)
      {                31} {30        } :  illk dgpd hixt cew                  
^SCR("WMSETUP",12)
      {                36} {35        } :mihixtl dgpd hixt cew                 
^SCR("WMSETUP",13)
                           {40        } :   "w`a y`w" hixt cew                 
^SCR("WMSETUP",14)
                                                                               
^SCR("WMSETUP",15)
                                                                               
^SCR("WMSETUP","A",1)

^SCR("WMSETUP","A",2)
‘”‰ˆŒ…Žš‹˜’ŽŒ�‰˜ˆŽ˜”
^SCR("WMSETUP","A",3)

^SCR("WMSETUP","A",4)
:„Œ‰’”"‘”‰ˆŒ…Ž"š‹˜’Ž�€„
^SCR("WMSETUP","A",5)
:š˜™š�…š‹
^SCR("WMSETUP","A",6)
:•…˜’'‘Ž
^SCR("WMSETUP","A",7)
:(š…‰�™)„�šŽ„�Ž†
^SCR("WMSETUP","A",8)
:“…‘Ž˜”‘Ž
^SCR("WMSETUP","A",9)
�’„ƒ…�’š…˜™”€
^SCR("WMSETUP","A",10)
:(€Œ-0,�‹-1)ONESWIPE
^SCR("WMSETUP","A",11)
:‰ŒŒ‹„‡�„ˆ‰˜”ƒ…—
^SCR("WMSETUP","A",12)
:�‰ˆ‰˜”Œ„‡�„ˆ‰˜”ƒ…—
^SCR("WMSETUP","A",13)
:"—€�™€—"ˆ‰˜”ƒ…—
^SCR("WMSETUP","A",14)

^SCR("WMSETUP","A",15)

^SCR("WMSETUP","AV",1)

^SCR("WMSETUP","AV",2)
xphykun,frgnkohrynrp
^SCR("WMSETUP","AV",3)

^SCR("WMSETUP","AV",4)
:vkhgp"xphykun",frgnotv
^SCR("WMSETUP","AV",5)
:,ra,cu,f
^SCR("WMSETUP","AV",6)
:•urgwxn
^SCR("WMSETUP","AV",7)
:(,uhba)vb,nvinz
^SCR("WMSETUP","AV",8)
:;uxnrpxn
^SCR("WMSETUP","AV",9)
ogvsucg,urapt
^SCR("WMSETUP","AV",10)
:(tk-0'if-1)ONESWIPE
^SCR("WMSETUP","AV",11)
:hkkfvjbvyhrpsue
^SCR("WMSETUP","AV",12)
:ohyhrpkvjbvyhrpsue
^SCR("WMSETUP","AV",13)
:"etcate"yhrpsue
^SCR("WMSETUP","AV",14)

^SCR("WMSETUP","AV",15)

^SCR("WMSETUP","NAME")

^SCR("WMSETUP","P",3,"CRD")
4,34,B,1,0
^SCR("WMSETUP","P",3,"HELP")

^SCR("WMSETUP","P",3,"LMAX")
4
^SCR("WMSETUP","P",3,"MUMPS1")

^SCR("WMSETUP","P",3,"MUMPS2")

^SCR("WMSETUP","P",3,"TYP")
B
^SCR("WMSETUP","P",5,"CRD")
5,23,E,15,0
^SCR("WMSETUP","P",5,"HELP")

^SCR("WMSETUP","P",5,"LMAX")
15
^SCR("WMSETUP","P",5,"MUMPS1")

^SCR("WMSETUP","P",5,"MUMPS2")

^SCR("WMSETUP","P",5,"TYP")
E
^SCR("WMSETUP","P",10,"CRD")
6,33,N,5,0
^SCR("WMSETUP","P",10,"HELP")

^SCR("WMSETUP","P",10,"LMAX")
5
^SCR("WMSETUP","P",10,"MUMPS1")

^SCR("WMSETUP","P",10,"MUMPS2")

^SCR("WMSETUP","P",10,"TYP")
N
^SCR("WMSETUP","P",15,"CRD")
7,34,N,4,0
^SCR("WMSETUP","P",15,"HELP")

^SCR("WMSETUP","P",15,"LMAX")
4
^SCR("WMSETUP","P",15,"MUMPS1")

^SCR("WMSETUP","P",15,"MUMPS2")

^SCR("WMSETUP","P",15,"TYP")
N
^SCR("WMSETUP","P",20,"CRD")
8,30,N,6,0
^SCR("WMSETUP","P",20,"HELP")

^SCR("WMSETUP","P",20,"LMAX")
8
^SCR("WMSETUP","P",20,"MUMPS1")

^SCR("WMSETUP","P",20,"MUMPS2")

^SCR("WMSETUP","P",20,"MUST")

^SCR("WMSETUP","P",20,"TYP")
N
^SCR("WMSETUP","P",25,"CRD")
10,34,N,1,0
^SCR("WMSETUP","P",25,"HELP")

^SCR("WMSETUP","P",25,"LMAX")
4
^SCR("WMSETUP","P",25,"MUMPS1")

^SCR("WMSETUP","P",25,"MUMPS2")

^SCR("WMSETUP","P",25,"TYP")
N
^SCR("WMSETUP","P",30,"CHECK")
Y
^SCR("WMSETUP","P",30,"CRD")
11,27,E,8,0
^SCR("WMSETUP","P",30,"FNC")

^SCR("WMSETUP","P",30,"GLOB")
^PAR
^SCR("WMSETUP","P",30,"HELP")

^SCR("WMSETUP","P",30,"LMAX")
11
^SCR("WMSETUP","P",30,"MUMPS1")

^SCR("WMSETUP","P",30,"MUMPS2")

^SCR("WMSETUP","P",30,"MUST")

^SCR("WMSETUP","P",30,"NLN")
20
^SCR("WMSETUP","P",30,"RZD")
\
^SCR("WMSETUP","P",30,"TOPB")
8
^SCR("WMSETUP","P",30,"TYP")
E
^SCR("WMSETUP","P",30,"VRB")
CDHNHMP1
^SCR("WMSETUP","P",31,"CRD")
11,26,H,19
^SCR("WMSETUP","P",31,"HELP")

^SCR("WMSETUP","P",31,"LMAX")
19
^SCR("WMSETUP","P",31,"MUMPS1")

^SCR("WMSETUP","P",31,"MUMPS2")

^SCR("WMSETUP","P",31,"OUTPUT")

^SCR("WMSETUP","P",31,"TYP")
H
^SCR("WMSETUP","P",35,"CRD")
12,27,E,8,0
^SCR("WMSETUP","P",35,"FNC")

^SCR("WMSETUP","P",35,"GLOB")
^PAR
^SCR("WMSETUP","P",35,"HELP")

^SCR("WMSETUP","P",35,"LMAX")
11
^SCR("WMSETUP","P",35,"MUMPS1")

^SCR("WMSETUP","P",35,"MUMPS2")

^SCR("WMSETUP","P",35,"MUST")

^SCR("WMSETUP","P",35,"NLN")
20
^SCR("WMSETUP","P",35,"RZD")
\
^SCR("WMSETUP","P",35,"TOPB")
8
^SCR("WMSETUP","P",35,"TYP")
E
^SCR("WMSETUP","P",35,"VRB")
CDHNHMP2
^SCR("WMSETUP","P",36,"CRD")
12,26,H,19
^SCR("WMSETUP","P",36,"HELP")

^SCR("WMSETUP","P",36,"LMAX")
19
^SCR("WMSETUP","P",36,"MUMPS1")

^SCR("WMSETUP","P",36,"MUMPS2")

^SCR("WMSETUP","P",36,"OUTPUT")

^SCR("WMSETUP","P",36,"TYP")
H
^SCR("WMSETUP","P",40,"CHECK")
Y
^SCR("WMSETUP","P",40,"CRD")
13,27,E,8,0
^SCR("WMSETUP","P",40,"FNC")

^SCR("WMSETUP","P",40,"GLOB")
^PAR
^SCR("WMSETUP","P",40,"HELP")

^SCR("WMSETUP","P",40,"LMAX")
11
^SCR("WMSETUP","P",40,"MUMPS1")

^SCR("WMSETUP","P",40,"MUMPS2")

^SCR("WMSETUP","P",40,"NLN")
20
^SCR("WMSETUP","P",40,"RZD")
\
^SCR("WMSETUP","P",40,"TOPB")
8
^SCR("WMSETUP","P",40,"TYP")
E
^SCR("WMSETUP","P","NAME","CASHBACK")
40
^SCR("WMSETUP","P","NAME","CDHNHMP")
30
^SCR("WMSETUP","P","NAME","CDHNHMP1")
31
^SCR("WMSETUP","P","NAME","CDHNHMP2")
36
^SCR("WMSETUP","P","NAME","CDHNHMPP")
35
^SCR("WMSETUP","P","NAME","IPA")
5
^SCR("WMSETUP","P","NAME","MASOF")
20
^SCR("WMSETUP","P","NAME","MP")
3
^SCR("WMSETUP","P","NAME","ONESWIPE")
25
^SCR("WMSETUP","P","NAME","PORT")
10
^SCR("WMSETUP","P","NAME","TOUT")
15
^SCR("WMSETUP","P","NM",3)
MP
^SCR("WMSETUP","P","NM",5)
IPA
^SCR("WMSETUP","P","NM",10)
PORT
^SCR("WMSETUP","P","NM",15)
TOUT
^SCR("WMSETUP","P","NM",20)
MASOF
^SCR("WMSETUP","P","NM",25)
ONESWIPE
^SCR("WMSETUP","P","NM",30)
CDHNHMP
^SCR("WMSETUP","P","NM",31)
CDHNHMP1
^SCR("WMSETUP","P","NM",35)
CDHNHMPP
^SCR("WMSETUP","P","NM",36)
CDHNHMP2
^SCR("WMSETUP","P","NM",40)
CASHBACK
^SCR("WTBINIT")
H
^SCR("WTBINIT",1)
                                                                               
^SCR("WTBINIT",2)
                            # qia10 zkxrnl mixhnxt #                           
^SCR("WTBINIT",3)
                                                                               
^SCR("WTBINIT",4)
                                                            1]                 
^SCR("WTBINIT",5)
                                                                               
^SCR("WTBINIT",6)
                                 {20   } :       dcrqn xtqn                    
^SCR("WTBINIT",7)
                              {22       } :        ynzyn my                    
^SCR("WTBINIT",8)
                             {25       } :      dcrqn znqiq                    
^SCR("WTBINIT",9)
                           {35         } :   qia10 gewl 'qn                    
^SCR("WTBINIT",10)
                                                                               
^SCR("WTBINIT",11)
                      [1                                                       
^SCR("WTBINIT",12)
                                                                               
^SCR("WTBINIT","AV",1)

^SCR("WTBINIT","AV",2)
ñéá10úëøòîìíéøèîøô
^SCR("WTBINIT","AV",3)

^SCR("WTBINIT","AV",4)

^SCR("WTBINIT","AV",5)

^SCR("WTBINIT","AV",6)
:äãòñîøôñî
^SCR("WTBINIT","AV",7)
:ùîúùîíù
^SCR("WTBINIT","AV",8)
:äãòñîúîñéñ
^SCR("WTBINIT","AV",9)
:ñéá10çå÷ì'ñî
^SCR("WTBINIT","AV",10)

^SCR("WTBINIT","AV",11)

^SCR("WTBINIT","AV",12)

^SCR("WTBINIT","NAME")

^SCR("WTBINIT","P",20,"CRD")
6,33,N,5,0
^SCR("WTBINIT","P",20,"HELP")

^SCR("WTBINIT","P",20,"LMAX")
6
^SCR("WTBINIT","P",20,"MUMPS1")

^SCR("WTBINIT","P",20,"MUMPS2")

^SCR("WTBINIT","P",20,"MUST")

^SCR("WTBINIT","P",20,"TYP")
N
^SCR("WTBINIT","P",22,"CRD")
7,30,E,10,0
^SCR("WTBINIT","P",22,"HELP")

^SCR("WTBINIT","P",22,"LMAX")
10
^SCR("WTBINIT","P",22,"MUMPS1")

^SCR("WTBINIT","P",22,"MUMPS2")

^SCR("WTBINIT","P",22,"TYP")
E
^SCR("WTBINIT","P",25,"CRD")
8,29,E,10,0
^SCR("WTBINIT","P",25,"HELP")

^SCR("WTBINIT","P",25,"LMAX")
10
^SCR("WTBINIT","P",25,"MUMPS1")

^SCR("WTBINIT","P",25,"MUMPS2")

^SCR("WTBINIT","P",25,"TYP")
E
^SCR("WTBINIT","P",35,"CRD")
9,27,E,12,0
^SCR("WTBINIT","P",35,"HELP")

^SCR("WTBINIT","P",35,"LMAX")
12
^SCR("WTBINIT","P",35,"MUMPS1")

^SCR("WTBINIT","P",35,"MUMPS2")

^SCR("WTBINIT","P",35,"MUST")

^SCR("WTBINIT","P",35,"TYP")
E
^SCR("WTBINIT","P","NAME","LKH")
35
^SCR("WTBINIT","P","NAME","PSW")
25
^SCR("WTBINIT","P","NAME","RESTID")
20
^SCR("WTBINIT","P","NAME","USER")
22
^SCR("WTBINIT","P","NM",20)
RESTID
^SCR("WTBINIT","P","NM",22)
USER
^SCR("WTBINIT","P","NM",25)
PSW
^SCR("WTBINIT","P","NM",35)
LKH
^SCR("WTBINIT","P","RB",1)
5,23,12,62
^SCR("WTBREP")
H
^SCR("WTBREP",1)
                     {10      }   jix`z cr    {05      }  jix`zn               
^SCR("WTBREP",2)
       {15 } : ( 2 - migelyn, 1 - dcrqn ,0 - zepnfdd lk ) zepnfd beq           
^SCR("WTBREP","A",1)
Š‰˜€šƒ’Š‰˜€šŽ
^SCR("WTBREP","A",2)
:(2-�‰‡…Œ™Ž,1-„ƒ’‘Ž,0-š…�Ž†„„Œ‹)š…�Ž†„‚…‘
^SCR("WTBREP","AV",1)
êéøàúãòêéøàúî
^SCR("WTBREP","AV",2)
:(2-íéçåìùî,1-äãòñî,0-úåðîæääìë)úåðîæäâåñ
^SCR("WTBREP","NAME")
cia10 iqihxka minelyz g"ec
^SCR("WTBREP","P",5,"CRD")
1,46,D,8,0
^SCR("WTBREP","P",5,"HELP")

^SCR("WTBREP","P",5,"LMAX")
9
^SCR("WTBREP","P",5,"MUMPS1")
D ^W4IN S:'$G(DAT1) DAT1=$$^%L1DC(P1DZ,1)
^SCR("WTBREP","P",5,"MUMPS2")

^SCR("WTBREP","P",5,"MUST")

^SCR("WTBREP","P",5,"TYP")
D
^SCR("WTBREP","P",10,"CRD")
1,21,D,8,0
^SCR("WTBREP","P",10,"HELP")

^SCR("WTBREP","P",10,"LMAX")
9
^SCR("WTBREP","P",10,"MUMPS1")
S:'$G(DAT2) DAT2=DAT1
^SCR("WTBREP","P",10,"MUMPS2")

^SCR("WTBREP","P",10,"MUST")

^SCR("WTBREP","P",10,"TYP")
D
^SCR("WTBREP","P",15,"CRD")
2,7,E,1,0
^SCR("WTBREP","P",15,"HELP")

^SCR("WTBREP","P",15,"LMAX")
4
^SCR("WTBREP","P",15,"MUMPS1")

^SCR("WTBREP","P",15,"MUMPS2")

^SCR("WTBREP","P",15,"TYP")
E
^SCR("WTBREP","P","NAME","DAT1")
5
^SCR("WTBREP","P","NAME","DAT2")
10
^SCR("WTBREP","P","NAME","VT")
15
^SCR("WTBREP","P","NM",5)
DAT1
^SCR("WTBREP","P","NM",10)
DAT2
^SCR("WTBREP","P","NM",15)
VT
^SCR("WVGETINF")
H
^SCR("WVGETINF",1)
             {05                                       } cx`weile qihxk 'qn    
^SCR("WVGETINF",2)
                                        {07             }: zecewp/oetew 'qn    
^SCR("WVGETINF",3)
                         {                            10}:          gewl my    
^SCR("WVGETINF",4)
                                               {20      }:        zitqk dxzi   
^SCR("WVGETINF",5)
                                         {25            }:        `zli`y onf   
^SCR("WVGETINF",6)
                                                {27    } :              dgpd   
^SCR("WVGETINF",7)
      {                                                           30}: drced   
^SCR("WVGETINF",8)
      {                                                           31}          
^SCR("WVGETINF",9)
      {                                                           32}          
^SCR("WVGETINF",10)
      {                                                           33}          
^SCR("WVGETINF",11)
      {                                                           34}          
^SCR("WVGETINF",12)
      {                                                           35}          
^SCR("WVGETINF",13)
      {                                                           36}          
^SCR("WVGETINF",14)
      {                                                           37}          
^SCR("WVGETINF",15)
      {                                                           38}          
^SCR("WVGETINF",16)
      {                                                           39}          
^SCR("WVGETINF",17)
      {                                                           40}          
^SCR("WVGETINF",18)
      {                                                           41}          
^SCR("WVGETINF","A",1)
ƒ˜€—…‰Œ…‘‰ˆ˜‹'‘Ž
^SCR("WVGETINF","A",2)
:š…ƒ…—�/�…”…—'‘Ž
^SCR("WVGETINF","A",3)
:‡…—Œ�™
^SCR("WVGETINF","A",4)
:š‰”‘‹„˜š‰
^SCR("WVGETINF","A",5)
:€šŒ‰€™�Ž†
^SCR("WVGETINF","A",6)
:„‡�„
^SCR("WVGETINF","A",7)
:„’ƒ…„
^SCR("WVGETINF","A",8)

^SCR("WVGETINF","A",9)

^SCR("WVGETINF","A",10)

^SCR("WVGETINF","A",11)

^SCR("WVGETINF","A",12)

^SCR("WVGETINF","A",13)

^SCR("WVGETINF","A",14)

^SCR("WVGETINF","A",15)

^SCR("WVGETINF","A",16)

^SCR("WVGETINF","A",17)

^SCR("WVGETINF","A",18)

^SCR("WVGETINF","AV",1)
srteuhkuxhyrfwxn
^SCR("WVGETINF","AV",2)
:,usuebqiupuewxn
^SCR("WVGETINF","AV",3)
:juekoa
^SCR("WVGETINF","AV",4)
:,hpxfvr,h
^SCR("WVGETINF","AV",5)
:t,khtainz
^SCR("WVGETINF","AV",6)
:vjbv
^SCR("WVGETINF","AV",7)
:vgsuv
^SCR("WVGETINF","AV",8)

^SCR("WVGETINF","AV",9)

^SCR("WVGETINF","AV",10)

^SCR("WVGETINF","AV",11)

^SCR("WVGETINF","AV",12)

^SCR("WVGETINF","AV",13)

^SCR("WVGETINF","AV",14)

^SCR("WVGETINF","AV",15)

^SCR("WVGETINF","AV",16)

^SCR("WVGETINF","AV",17)

^SCR("WVGETINF","AV",18)

^SCR("WVGETINF","NAME")
21
^SCR("WVGETINF","P",5,"CRD")
1,13,E,40,0
^SCR("WVGETINF","P",5,"HELP")

^SCR("WVGETINF","P",5,"LMAX")
42
^SCR("WVGETINF","P",5,"MUMPS1")
D VC0^WVGETINF
^SCR("WVGETINF","P",5,"MUMPS2")
D VCARD^WVGETINF
^SCR("WVGETINF","P",5,"MUST")

^SCR("WVGETINF","P",5,"TYP")
E
^SCR("WVGETINF","P",7,"CRD")
2,40,E,16,0
^SCR("WVGETINF","P",7,"HELP")

^SCR("WVGETINF","P",7,"LMAX")
16
^SCR("WVGETINF","P",7,"MUMPS1")
D COUP0^WVGETINF
^SCR("WVGETINF","P",7,"MUMPS2")
D VCARD^WVGETINF
^SCR("WVGETINF","P",7,"TYP")
E
^SCR("WVGETINF","P",10,"CRD")
3,57,H,25
^SCR("WVGETINF","P",10,"HELP")

^SCR("WVGETINF","P",10,"LMAX")
31
^SCR("WVGETINF","P",10,"MUMPS1")

^SCR("WVGETINF","P",10,"MUMPS2")

^SCR("WVGETINF","P",10,"OUTPUT")

^SCR("WVGETINF","P",10,"TYP")
H
^SCR("WVGETINF","P",20,"CRD")
4,47,N,9,2
^SCR("WVGETINF","P",20,"HELP")

^SCR("WVGETINF","P",20,"LMAX")
9
^SCR("WVGETINF","P",20,"MUMPS1")

^SCR("WVGETINF","P",20,"MUMPS2")

^SCR("WVGETINF","P",20,"OUTPUT")

^SCR("WVGETINF","P",20,"TYP")
N
^SCR("WVGETINF","P",25,"CRD")
5,41,E,15,0
^SCR("WVGETINF","P",25,"HELP")

^SCR("WVGETINF","P",25,"LMAX")
15
^SCR("WVGETINF","P",25,"MUMPS1")

^SCR("WVGETINF","P",25,"MUMPS2")

^SCR("WVGETINF","P",25,"OUTPUT")

^SCR("WVGETINF","P",25,"TYP")
E
^SCR("WVGETINF","P",27,"CRD")
6,48,N,7,2
^SCR("WVGETINF","P",27,"HELP")

^SCR("WVGETINF","P",27,"LMAX")
7
^SCR("WVGETINF","P",27,"MUMPS1")

^SCR("WVGETINF","P",27,"MUMPS2")

^SCR("WVGETINF","P",27,"OUTPUT")

^SCR("WVGETINF","P",27,"TYP")
N
^SCR("WVGETINF","P",30,"CRD")
7,69,H,60
^SCR("WVGETINF","P",30,"HELP")

^SCR("WVGETINF","P",30,"LMAX")
62
^SCR("WVGETINF","P",30,"MUMPS1")

^SCR("WVGETINF","P",30,"MUMPS2")

^SCR("WVGETINF","P",30,"OUTPUT")

^SCR("WVGETINF","P",30,"TYP")
H
^SCR("WVGETINF","P",31,"CRD")
8,69,H,60
^SCR("WVGETINF","P",31,"HELP")

^SCR("WVGETINF","P",31,"LMAX")
62
^SCR("WVGETINF","P",31,"MUMPS1")

^SCR("WVGETINF","P",31,"MUMPS2")

^SCR("WVGETINF","P",31,"OUTPUT")

^SCR("WVGETINF","P",31,"TYP")
H
^SCR("WVGETINF","P",32,"CRD")
9,69,H,60
^SCR("WVGETINF","P",32,"HELP")

^SCR("WVGETINF","P",32,"LMAX")
62
^SCR("WVGETINF","P",32,"MUMPS1")

^SCR("WVGETINF","P",32,"MUMPS2")

^SCR("WVGETINF","P",32,"OUTPUT")

^SCR("WVGETINF","P",32,"TYP")
H
^SCR("WVGETINF","P",33,"CRD")
10,69,H,60
^SCR("WVGETINF","P",33,"HELP")

^SCR("WVGETINF","P",33,"LMAX")
62
^SCR("WVGETINF","P",33,"MUMPS1")

^SCR("WVGETINF","P",33,"MUMPS2")

^SCR("WVGETINF","P",33,"OUTPUT")

^SCR("WVGETINF","P",33,"TYP")
H
^SCR("WVGETINF","P",34,"CRD")
11,69,H,60
^SCR("WVGETINF","P",34,"HELP")

^SCR("WVGETINF","P",34,"LMAX")
62
^SCR("WVGETINF","P",34,"MUMPS1")

^SCR("WVGETINF","P",34,"MUMPS2")

^SCR("WVGETINF","P",34,"OUTPUT")

^SCR("WVGETINF","P",34,"TYP")
H
^SCR("WVGETINF","P",35,"CRD")
12,69,H,60
^SCR("WVGETINF","P",35,"HELP")

^SCR("WVGETINF","P",35,"LMAX")
62
^SCR("WVGETINF","P",35,"MUMPS1")

^SCR("WVGETINF","P",35,"MUMPS2")

^SCR("WVGETINF","P",35,"OUTPUT")

^SCR("WVGETINF","P",35,"TYP")
H
^SCR("WVGETINF","P",36,"CRD")
13,69,H,60
^SCR("WVGETINF","P",36,"HELP")

^SCR("WVGETINF","P",36,"LMAX")
62
^SCR("WVGETINF","P",36,"MUMPS1")

^SCR("WVGETINF","P",36,"MUMPS2")

^SCR("WVGETINF","P",36,"OUTPUT")

^SCR("WVGETINF","P",36,"TYP")
H
^SCR("WVGETINF","P",37,"CRD")
14,69,H,60
^SCR("WVGETINF","P",37,"HELP")

^SCR("WVGETINF","P",37,"LMAX")
62
^SCR("WVGETINF","P",37,"MUMPS1")

^SCR("WVGETINF","P",37,"MUMPS2")

^SCR("WVGETINF","P",37,"OUTPUT")

^SCR("WVGETINF","P",37,"TYP")
H
^SCR("WVGETINF","P",38,"CRD")
15,69,H,60
^SCR("WVGETINF","P",38,"HELP")

^SCR("WVGETINF","P",38,"LMAX")
62
^SCR("WVGETINF","P",38,"MUMPS1")

^SCR("WVGETINF","P",38,"MUMPS2")

^SCR("WVGETINF","P",38,"OUTPUT")

^SCR("WVGETINF","P",38,"TYP")
H
^SCR("WVGETINF","P",39,"CRD")
16,69,H,60
^SCR("WVGETINF","P",39,"HELP")

^SCR("WVGETINF","P",39,"LMAX")
62
^SCR("WVGETINF","P",39,"MUMPS1")

^SCR("WVGETINF","P",39,"MUMPS2")

^SCR("WVGETINF","P",39,"OUTPUT")

^SCR("WVGETINF","P",39,"TYP")
H
^SCR("WVGETINF","P",40,"CRD")
17,69,H,60
^SCR("WVGETINF","P",40,"HELP")

^SCR("WVGETINF","P",40,"LMAX")
62
^SCR("WVGETINF","P",40,"MUMPS1")

^SCR("WVGETINF","P",40,"MUMPS2")

^SCR("WVGETINF","P",40,"OUTPUT")

^SCR("WVGETINF","P",40,"TYP")
H
^SCR("WVGETINF","P",41,"CRD")
18,69,H,60
^SCR("WVGETINF","P",41,"HELP")

^SCR("WVGETINF","P",41,"LMAX")
62
^SCR("WVGETINF","P",41,"MUMPS1")

^SCR("WVGETINF","P",41,"MUMPS2")

^SCR("WVGETINF","P",41,"OUTPUT")

^SCR("WVGETINF","P",41,"TYP")
H
^SCR("WVGETINF","P","NAME","BUDG")
20
^SCR("WVGETINF","P","NAME","COUPON")
7
^SCR("WVGETINF","P","NAME","DISC")
27
^SCR("WVGETINF","P","NAME","EMP")
10
^SCR("WVGETINF","P","NAME","MES1")
30
^SCR("WVGETINF","P","NAME","MES10")
39
^SCR("WVGETINF","P","NAME","MES11")
40
^SCR("WVGETINF","P","NAME","MES12")
41
^SCR("WVGETINF","P","NAME","MES2")
31
^SCR("WVGETINF","P","NAME","MES3")
32
^SCR("WVGETINF","P","NAME","MES4")
33
^SCR("WVGETINF","P","NAME","MES5")
34
^SCR("WVGETINF","P","NAME","MES6")
35
^SCR("WVGETINF","P","NAME","MES7")
36
^SCR("WVGETINF","P","NAME","MES8")
37
^SCR("WVGETINF","P","NAME","MES9")
38
^SCR("WVGETINF","P","NAME","VC")
5
^SCR("WVGETINF","P","NAME","ZMAN")
25
^SCR("WVGETINF","P","NM",5)
VC
^SCR("WVGETINF","P","NM",7)
COUPON
^SCR("WVGETINF","P","NM",10)
EMP
^SCR("WVGETINF","P","NM",20)
BUDG
^SCR("WVGETINF","P","NM",25)
ZMAN
^SCR("WVGETINF","P","NM",27)
DISC
^SCR("WVGETINF","P","NM",30)
MES1
^SCR("WVGETINF","P","NM",31)
MES2
^SCR("WVGETINF","P","NM",32)
MES3
^SCR("WVGETINF","P","NM",33)
MES4
^SCR("WVGETINF","P","NM",34)
MES5
^SCR("WVGETINF","P","NM",35)
MES6
^SCR("WVGETINF","P","NM",36)
MES7
^SCR("WVGETINF","P","NM",37)
MES8
^SCR("WVGETINF","P","NM",38)
MES9
^SCR("WVGETINF","P","NM",39)
MES10
^SCR("WVGETINF","P","NM",40)
MES11
^SCR("WVGETINF","P","NM",41)
MES12
^SCR("WVSETUP")
H
^SCR("WVSETUP",1)
                                                                               
^SCR("WVSETUP",2)
                        # VALUECARD zkxrnl mixhnxt #                           
^SCR("WVSETUP",3)
                                                                               
^SCR("WVSETUP",4)
                                                                 1]            
^SCR("WVSETUP",5)
                                                                               
^SCR("WVSETUP",6)
                                {15 } :   (zeipy) dpznd onf                    
^SCR("WVSETUP",7)
                              {20   } :  (POSID) dcrqn xtqn                    
^SCR("WVSETUP",8)
                          {25       } : (POSPW) dcrqn znqiq                    
^SCR("WVSETUP",9)
                          {30       } :  (CPW)  i`tew znqiq                    
^SCR("WVSETUP",10)
                        {35         } :         VC gewl 'qn                    
^SCR("WVSETUP",11)
 {55                                                           } : dnyxdl zaezk
^SCR("WVSETUP",12)
                                                                               
^SCR("WVSETUP",13)
                      [1                                                       
^SCR("WVSETUP",14)
                                                                               
^SCR("WVSETUP","AV",1)

^SCR("WVSETUP","AV",2)
VALUECARDúëøòîìíéøèîøô
^SCR("WVSETUP","AV",3)

^SCR("WVSETUP","AV",4)

^SCR("WVSETUP","AV",5)

^SCR("WVSETUP","AV",6)
:(úåéðù)äðúîäïîæ
^SCR("WVSETUP","AV",7)
:(POSID)äãòñîøôñî
^SCR("WVSETUP","AV",8)
:(POSPW)äãòñîúîñéñ
^SCR("WVSETUP","AV",9)
:(CPW)éàôå÷úîñéñ
^SCR("WVSETUP","AV",10)
:VCçå÷ì'ñî
^SCR("WVSETUP","AV",11)
:äîùøäìúáåúë
^SCR("WVSETUP","AV",12)

^SCR("WVSETUP","AV",13)

^SCR("WVSETUP","AV",14)

^SCR("WVSETUP","NAME")

^SCR("WVSETUP","P",15,"CRD")
6,32,N,4,0
^SCR("WVSETUP","P",15,"HELP")

^SCR("WVSETUP","P",15,"LMAX")
4
^SCR("WVSETUP","P",15,"MUMPS1")

^SCR("WVSETUP","P",15,"MUMPS2")

^SCR("WVSETUP","P",15,"TYP")
N
^SCR("WVSETUP","P",20,"CRD")
7,30,N,5,0
^SCR("WVSETUP","P",20,"HELP")

^SCR("WVSETUP","P",20,"LMAX")
6
^SCR("WVSETUP","P",20,"MUMPS1")

^SCR("WVSETUP","P",20,"MUMPS2")

^SCR("WVSETUP","P",20,"MUST")

^SCR("WVSETUP","P",20,"TYP")
N
^SCR("WVSETUP","P",25,"CRD")
8,26,N,10,0
^SCR("WVSETUP","P",25,"HELP")

^SCR("WVSETUP","P",25,"LMAX")
10
^SCR("WVSETUP","P",25,"MUMPS1")

^SCR("WVSETUP","P",25,"MUMPS2")

^SCR("WVSETUP","P",25,"TYP")
N
^SCR("WVSETUP","P",30,"CRD")
9,26,N,10,0
^SCR("WVSETUP","P",30,"HELP")

^SCR("WVSETUP","P",30,"LMAX")
10
^SCR("WVSETUP","P",30,"MUMPS1")

^SCR("WVSETUP","P",30,"MUMPS2")

^SCR("WVSETUP","P",30,"TYP")
N
^SCR("WVSETUP","P",35,"CRD")
10,24,E,12,0
^SCR("WVSETUP","P",35,"HELP")

^SCR("WVSETUP","P",35,"LMAX")
12
^SCR("WVSETUP","P",35,"MUMPS1")

^SCR("WVSETUP","P",35,"MUMPS2")

^SCR("WVSETUP","P",35,"MUST")

^SCR("WVSETUP","P",35,"TYP")
E
^SCR("WVSETUP","P",55,"CRD")
11,1,E,60,0
^SCR("WVSETUP","P",55,"HELP")

^SCR("WVSETUP","P",55,"LMAX")
62
^SCR("WVSETUP","P",55,"MUMPS1")

^SCR("WVSETUP","P",55,"MUMPS2")

^SCR("WVSETUP","P",55,"TYP")
E
^SCR("WVSETUP","P","NAME","ADRREG")
55
^SCR("WVSETUP","P","NAME","CPW")
30
^SCR("WVSETUP","P","NAME","LKH")
35
^SCR("WVSETUP","P","NAME","PSW")
25
^SCR("WVSETUP","P","NAME","RSID")
20
^SCR("WVSETUP","P","NAME","TOUT")
15
^SCR("WVSETUP","P","NM",15)
TOUT
^SCR("WVSETUP","P","NM",20)
RSID
^SCR("WVSETUP","P","NM",25)
PSW
^SCR("WVSETUP","P","NM",30)
CPW
^SCR("WVSETUP","P","NM",35)
LKH
^SCR("WVSETUP","P","NM",55)
ADRREG
^SCR("WVSETUP","P","RB",1)
5,23,14,67
^SCR("w4prmhsv")
H
^SCR("w4prmhsv",1)
                                                                               
^SCR("w4prmhsv",2)
                                  # zayayg ixhnxt #                            
^SCR("w4prmhsv",3)
                                                                               
^SCR("w4prmhsv",4)
                                                                     1]        
^SCR("w4prmhsv",5)
                 {10      }: zeneyz n"rn     {05     }: zeipw oeayg            
^SCR("w4prmhsv",6)
                 {20      }: ze`wqr n"rn     {15     }:zeqpkd oeayg            
^SCR("w4prmhsv",7)
                                   {22      } : xewn qn iekip oeayg            
^SCR("w4prmhsv",8)
                 {30      }:    dtew wiy     {25     }: dtew  onefn            
^SCR("w4prmhsv",9)
                 {33      }:   onefn wiy     {27     }:   dtew yelz            
^SCR("w4prmhsv",10)
                                             {34     }:       mitih            
^SCR("w4prmhsv",11)
                 {40      }:dxag hxk`xyi     {35     }: dtew hxk`xyi           
^SCR("w4prmhsv",12)
                 {50      }:dxag    dfie     {45     }: dtew   dfie            
^SCR("w4prmhsv",13)
                 {60      }:dxag  qxpiic     {55     }: dtew qxpiic            
^SCR("w4prmhsv",14)
                 {70      }:dxag  AM.EXP     {65     }: dtew AM.EXP            
^SCR("w4prmhsv",15)
                 {72      }:dxag     JCB     {71     }: dtew    JCB            
^SCR("w4prmhsv",16)
                 {74      }:dxag    `tl`     {73     }: dtew   `tl`            
^SCR("w4prmhsv",17)
                                                                               
^SCR("w4prmhsv",18)
                 {80       : dtew oeayg      {75      :   wpa oeayg            
^SCR("w4prmhsv",19)
                                                                               
^SCR("w4prmhsv",20)
                 {90                   }: MOVEIN.DAT uaew miyl okid            
^SCR("w4prmhsv",21)
                 {95 :3 - PRIORITY , 2 - 90 ,1 - 180 : zeniyx hnxet            
^SCR("w4prmhsv",22)
           [1                                                                  
^SCR("w4prmhsv","A",1)

^SCR("w4prmhsv","A",2)
š�™�™‡‰˜ˆŽ˜”
^SCR("w4prmhsv","A",3)

^SCR("w4prmhsv","A",4)

^SCR("w4prmhsv","A",5)
:š…Ž…™šŽ"’Ž:š…‰�—�…�™‡
^SCR("w4prmhsv","A",6)
:š…€—‘’Ž"’Ž:š…‘�‹„�…�™‡
^SCR("w4prmhsv","A",7)
:˜…—Ž‘Ž‰…‹‰��…�™‡
^SCR("w4prmhsv","A",8)
:„”…——‰™:„”…—�Ž…†Ž
^SCR("w4prmhsv","A",9)
:�Ž…†Ž—‰™:„”…—™…Œš
^SCR("w4prmhsv","A",10)
:�‰”‰ˆ
^SCR("w4prmhsv","A",11)
:„˜�‡ˆ˜‹€˜™‰:„”…—ˆ˜‹€˜™‰
^SCR("w4prmhsv","A",12)
:„˜�‡„†‰…:„”…—„†‰…
^SCR("w4prmhsv","A",13)
:„˜�‡‘˜�‰‰ƒ:„”…—‘˜�‰‰ƒ
^SCR("w4prmhsv","A",14)
:„˜�‡AM.EXP:„”…—AM.EXP
^SCR("w4prmhsv","A",15)
:„˜�‡JCB:„”…—JCB
^SCR("w4prmhsv","A",16)
:„˜�‡€”Œ€:„”…—€”Œ€
^SCR("w4prmhsv","A",17)

^SCR("w4prmhsv","A",18)
:„”…—�…�™‡:—���…�™‡
^SCR("w4prmhsv","A",19)

^SCR("w4prmhsv","A",20)
:MOVEIN.DAT•�…—�‰™Œ�‹‰„
^SCR("w4prmhsv","A",21)
:3-PRIORITY,2-90,1-180:š…Ž‰™˜ˆŽ˜…”
^SCR("w4prmhsv","A",22)

^SCR("w4prmhsv","AV",1)

^SCR("w4prmhsv","AV",2)
,cacajhrynrp
^SCR("w4prmhsv","AV",3)

^SCR("w4prmhsv","AV",4)

^SCR("w4prmhsv","AV",5)
:,unua,n"gn:,uhbeiucaj
^SCR("w4prmhsv","AV",6)
:,utexgn"gn:,uxbfviucaj
^SCR("w4prmhsv","AV",7)
:ruenxnhufhbiucaj
^SCR("w4prmhsv","AV",8)
:vpueeha:vpueinuzn
^SCR("w4prmhsv","AV",9)
:inuzneha:vpueauk,
^SCR("w4prmhsv","AV",10)
:ohphy
^SCR("w4prmhsv","AV",11)
:vrcjyrftrah:vpueyrftrah
^SCR("w4prmhsv","AV",12)
:vrcjvzhu:vpuevzhu
^SCR("w4prmhsv","AV",13)
:vrcjxrbhhs:vpuexrbhhs
^SCR("w4prmhsv","AV",14)
:vrcjAM/EXP:vpueAM/EXP
^SCR("w4prmhsv","AV",15)
:vrcjJCB:vpueJCB
^SCR("w4prmhsv","AV",16)
:vrcjtpkt:vpuetpkt
^SCR("w4prmhsv","AV",17)

^SCR("w4prmhsv","AV",18)
:vpueiucaj:ebciucaj
^SCR("w4prmhsv","AV",19)

^SCR("w4prmhsv","AV",20)
:MOVEIN/DAT•cueohakifhv
^SCR("w4prmhsv","AV",21)
:3-PRIORITY'2-90'1-180:,unharynrup
^SCR("w4prmhsv","AV",22)

^SCR("w4prmhsv","NAME")

^SCR("w4prmhsv","P",5,"CRD")
5,45,E,8,0
^SCR("w4prmhsv","P",5,"HELP")

^SCR("w4prmhsv","P",5,"LMAX")
8
^SCR("w4prmhsv","P",5,"MUMPS1")

^SCR("w4prmhsv","P",5,"MUMPS2")

^SCR("w4prmhsv","P",5,"TYP")
E
^SCR("w4prmhsv","P",10,"CRD")
5,17,E,8,0
^SCR("w4prmhsv","P",10,"HELP")

^SCR("w4prmhsv","P",10,"LMAX")
9
^SCR("w4prmhsv","P",10,"MUMPS1")

^SCR("w4prmhsv","P",10,"MUMPS2")

^SCR("w4prmhsv","P",10,"TYP")
E
^SCR("w4prmhsv","P",15,"CRD")
6,45,E,8,0
^SCR("w4prmhsv","P",15,"HELP")

^SCR("w4prmhsv","P",15,"LMAX")
8
^SCR("w4prmhsv","P",15,"MUMPS1")

^SCR("w4prmhsv","P",15,"MUMPS2")

^SCR("w4prmhsv","P",15,"TYP")
E
^SCR("w4prmhsv","P",20,"CRD")
6,17,E,8,0
^SCR("w4prmhsv","P",20,"HELP")

^SCR("w4prmhsv","P",20,"LMAX")
9
^SCR("w4prmhsv","P",20,"MUMPS1")

^SCR("w4prmhsv","P",20,"MUMPS2")

^SCR("w4prmhsv","P",20,"TYP")
E
^SCR("w4prmhsv","P",22,"CRD")
7,35,E,8,0
^SCR("w4prmhsv","P",22,"HELP")

^SCR("w4prmhsv","P",22,"LMAX")
9
^SCR("w4prmhsv","P",22,"MUMPS1")

^SCR("w4prmhsv","P",22,"MUMPS2")

^SCR("w4prmhsv","P",22,"TYP")
E
^SCR("w4prmhsv","P",25,"CRD")
8,45,E,8,0
^SCR("w4prmhsv","P",25,"HELP")

^SCR("w4prmhsv","P",25,"LMAX")
8
^SCR("w4prmhsv","P",25,"MUMPS1")

^SCR("w4prmhsv","P",25,"MUMPS2")

^SCR("w4prmhsv","P",25,"TYP")
E
^SCR("w4prmhsv","P",27,"CRD")
9,45,E,8,0
^SCR("w4prmhsv","P",27,"HELP")

^SCR("w4prmhsv","P",27,"LMAX")
8
^SCR("w4prmhsv","P",27,"MUMPS1")

^SCR("w4prmhsv","P",27,"MUMPS2")

^SCR("w4prmhsv","P",27,"TYP")
E
^SCR("w4prmhsv","P",30,"CRD")
8,17,E,8,0
^SCR("w4prmhsv","P",30,"HELP")

^SCR("w4prmhsv","P",30,"LMAX")
9
^SCR("w4prmhsv","P",30,"MUMPS1")

^SCR("w4prmhsv","P",30,"MUMPS2")

^SCR("w4prmhsv","P",30,"TYP")
E
^SCR("w4prmhsv","P",33,"CRD")
9,17,E,8,0
^SCR("w4prmhsv","P",33,"HELP")

^SCR("w4prmhsv","P",33,"LMAX")
9
^SCR("w4prmhsv","P",33,"MUMPS1")

^SCR("w4prmhsv","P",33,"MUMPS2")

^SCR("w4prmhsv","P",33,"TYP")
E
^SCR("w4prmhsv","P",34,"CRD")
10,45,E,8,0
^SCR("w4prmhsv","P",34,"HELP")

^SCR("w4prmhsv","P",34,"LMAX")
8
^SCR("w4prmhsv","P",34,"MUMPS1")

^SCR("w4prmhsv","P",34,"MUMPS2")

^SCR("w4prmhsv","P",34,"TYP")
E
^SCR("w4prmhsv","P",35,"CRD")
11,45,E,8,0
^SCR("w4prmhsv","P",35,"HELP")

^SCR("w4prmhsv","P",35,"LMAX")
8
^SCR("w4prmhsv","P",35,"MUMPS1")

^SCR("w4prmhsv","P",35,"MUMPS2")

^SCR("w4prmhsv","P",35,"TYP")
E
^SCR("w4prmhsv","P",40,"CRD")
11,17,E,8,0
^SCR("w4prmhsv","P",40,"HELP")

^SCR("w4prmhsv","P",40,"LMAX")
9
^SCR("w4prmhsv","P",40,"MUMPS1")

^SCR("w4prmhsv","P",40,"MUMPS2")

^SCR("w4prmhsv","P",40,"TYP")
E
^SCR("w4prmhsv","P",45,"CRD")
12,45,E,8,0
^SCR("w4prmhsv","P",45,"HELP")

^SCR("w4prmhsv","P",45,"LMAX")
8
^SCR("w4prmhsv","P",45,"MUMPS1")

^SCR("w4prmhsv","P",45,"MUMPS2")

^SCR("w4prmhsv","P",45,"TYP")
E
^SCR("w4prmhsv","P",50,"CRD")
12,17,E,8,0
^SCR("w4prmhsv","P",50,"HELP")

^SCR("w4prmhsv","P",50,"LMAX")
9
^SCR("w4prmhsv","P",50,"MUMPS1")

^SCR("w4prmhsv","P",50,"MUMPS2")

^SCR("w4prmhsv","P",50,"TYP")
E
^SCR("w4prmhsv","P",55,"CRD")
13,45,E,8,0
^SCR("w4prmhsv","P",55,"HELP")

^SCR("w4prmhsv","P",55,"LMAX")
8
^SCR("w4prmhsv","P",55,"MUMPS1")

^SCR("w4prmhsv","P",55,"MUMPS2")

^SCR("w4prmhsv","P",55,"TYP")
E
^SCR("w4prmhsv","P",60,"CRD")
13,17,E,8,0
^SCR("w4prmhsv","P",60,"HELP")

^SCR("w4prmhsv","P",60,"LMAX")
9
^SCR("w4prmhsv","P",60,"MUMPS1")

^SCR("w4prmhsv","P",60,"MUMPS2")

^SCR("w4prmhsv","P",60,"TYP")
E
^SCR("w4prmhsv","P",65,"CRD")
14,45,E,8,0
^SCR("w4prmhsv","P",65,"HELP")

^SCR("w4prmhsv","P",65,"LMAX")
8
^SCR("w4prmhsv","P",65,"MUMPS1")

^SCR("w4prmhsv","P",65,"MUMPS2")

^SCR("w4prmhsv","P",65,"TYP")
E
^SCR("w4prmhsv","P",70,"CRD")
14,17,E,8,0
^SCR("w4prmhsv","P",70,"HELP")

^SCR("w4prmhsv","P",70,"LMAX")
9
^SCR("w4prmhsv","P",70,"MUMPS1")

^SCR("w4prmhsv","P",70,"MUMPS2")

^SCR("w4prmhsv","P",70,"TYP")
E
^SCR("w4prmhsv","P",71,"CRD")
15,45,E,8,0
^SCR("w4prmhsv","P",71,"HELP")

^SCR("w4prmhsv","P",71,"LMAX")
8
^SCR("w4prmhsv","P",71,"MUMPS1")

^SCR("w4prmhsv","P",71,"MUMPS2")

^SCR("w4prmhsv","P",71,"TYP")
E
^SCR("w4prmhsv","P",72,"CRD")
15,17,E,8,0
^SCR("w4prmhsv","P",72,"HELP")

^SCR("w4prmhsv","P",72,"LMAX")
9
^SCR("w4prmhsv","P",72,"MUMPS1")

^SCR("w4prmhsv","P",72,"MUMPS2")

^SCR("w4prmhsv","P",72,"TYP")
E
^SCR("w4prmhsv","P",73,"CRD")
16,45,E,8,0
^SCR("w4prmhsv","P",73,"HELP")

^SCR("w4prmhsv","P",73,"LMAX")
8
^SCR("w4prmhsv","P",73,"MUMPS1")

^SCR("w4prmhsv","P",73,"MUMPS2")

^SCR("w4prmhsv","P",73,"TYP")
E
^SCR("w4prmhsv","P",74,"CRD")
16,17,E,8,0
^SCR("w4prmhsv","P",74,"HELP")

^SCR("w4prmhsv","P",74,"LMAX")
9
^SCR("w4prmhsv","P",74,"MUMPS1")

^SCR("w4prmhsv","P",74,"MUMPS2")

^SCR("w4prmhsv","P",74,"TYP")
E
^SCR("w4prmhsv","P",75,"CRD")
18,45,E,8,0
^SCR("w4prmhsv","P",75,"HELP")

^SCR("w4prmhsv","P",75,"LMAX")
9
^SCR("w4prmhsv","P",75,"MUMPS1")

^SCR("w4prmhsv","P",75,"MUMPS2")

^SCR("w4prmhsv","P",75,"TYP")
E
^SCR("w4prmhsv","P",80,"CRD")
18,17,E,8,0
^SCR("w4prmhsv","P",80,"HELP")

^SCR("w4prmhsv","P",80,"LMAX")
10
^SCR("w4prmhsv","P",80,"MUMPS1")

^SCR("w4prmhsv","P",80,"MUMPS2")

^SCR("w4prmhsv","P",80,"TYP")
E
^SCR("w4prmhsv","P",90,"CRD")
20,17,E,22,0
^SCR("w4prmhsv","P",90,"HELP")

^SCR("w4prmhsv","P",90,"LMAX")
22
^SCR("w4prmhsv","P",90,"MUMPS1")

^SCR("w4prmhsv","P",90,"MUMPS2")

^SCR("w4prmhsv","P",90,"TYP")
E
^SCR("w4prmhsv","P",95,"CRD")
21,17,N,4,0
^SCR("w4prmhsv","P",95,"HELP")

^SCR("w4prmhsv","P",95,"LMAX")
4
^SCR("w4prmhsv","P",95,"MUMPS1")

^SCR("w4prmhsv","P",95,"MUMPS2")
I %S<1,%S>3 S %SC("ER")=1
^SCR("w4prmhsv","P",95,"MUST")

^SCR("w4prmhsv","P",95,"TYP")
N
^SCR("w4prmhsv","P","NAME","ALPHA")
74
^SCR("w4prmhsv","P","NAME","ALPHAK")
73
^SCR("w4prmhsv","P","NAME","AMEXP")
70
^SCR("w4prmhsv","P","NAME","AMEXPK")
65
^SCR("w4prmhsv","P","NAME","BANK")
75
^SCR("w4prmhsv","P","NAME","CHKK")
30
^SCR("w4prmhsv","P","NAME","CHKKM")
33
^SCR("w4prmhsv","P","NAME","DINERS")
60
^SCR("w4prmhsv","P","NAME","DINERSK")
55
^SCR("w4prmhsv","P","NAME","FORMAT")
95
^SCR("w4prmhsv","P","NAME","HKNIJOT")
5
^SCR("w4prmhsv","P","NAME","HMHIROT")
15
^SCR("w4prmhsv","P","NAME","HNKMM")
22
^SCR("w4prmhsv","P","NAME","ISR")
40
^SCR("w4prmhsv","P","NAME","ISRK")
35
^SCR("w4prmhsv","P","NAME","JCB")
72
^SCR("w4prmhsv","P","NAME","JCBK")
71
^SCR("w4prmhsv","P","NAME","KUPA")
80
^SCR("w4prmhsv","P","NAME","MAMI")
20
^SCR("w4prmhsv","P","NAME","MAMT")
10
^SCR("w4prmhsv","P","NAME","MZMK")
25
^SCR("w4prmhsv","P","NAME","PATH")
90
^SCR("w4prmhsv","P","NAME","TIP")
34
^SCR("w4prmhsv","P","NAME","VISA")
50
^SCR("w4prmhsv","P","NAME","VISAK")
45
^SCR("w4prmhsv","P","NAME","ZK")
27
^SCR("w4prmhsv","P","NM",5)
HKNIJOT
^SCR("w4prmhsv","P","NM",10)
MAMT
^SCR("w4prmhsv","P","NM",15)
HMHIROT
^SCR("w4prmhsv","P","NM",20)
MAMI
^SCR("w4prmhsv","P","NM",22)
HNKMM
^SCR("w4prmhsv","P","NM",25)
MZMK
^SCR("w4prmhsv","P","NM",27)
ZK
^SCR("w4prmhsv","P","NM",30)
CHKK
^SCR("w4prmhsv","P","NM",33)
CHKKM
^SCR("w4prmhsv","P","NM",34)
TIP
^SCR("w4prmhsv","P","NM",35)
ISRK
^SCR("w4prmhsv","P","NM",40)
ISR
^SCR("w4prmhsv","P","NM",45)
VISAK
^SCR("w4prmhsv","P","NM",50)
VISA
^SCR("w4prmhsv","P","NM",55)
DINERSK
^SCR("w4prmhsv","P","NM",60)
DINERS
^SCR("w4prmhsv","P","NM",65)
AMEXPK
^SCR("w4prmhsv","P","NM",70)
AMEXP
^SCR("w4prmhsv","P","NM",71)
JCBK
^SCR("w4prmhsv","P","NM",72)
JCB
^SCR("w4prmhsv","P","NM",73)
ALPHAK
^SCR("w4prmhsv","P","NM",74)
ALPHA
^SCR("w4prmhsv","P","NM",75)
BANK
^SCR("w4prmhsv","P","NM",80)
KUPA
^SCR("w4prmhsv","P","NM",90)
PATH
^SCR("w4prmhsv","P","NM",95)
FORMAT
^SCR("w4prmhsv","P","RB",1)
5,12,23,71
^SHB(67208)
16:30
^SHB(67215)
16:35
^SHB(67222)
16:40
^SHB(67229)
16:45
^SHB(67236)
16:50
^SHB(67243)
17:00
^SHB(67250)
17:05
^SHB(67257)
17:10
^SHB(67264)
17:15
^SHB(67271)
17:20
^SHB(67278)
17:25
^SHB(67285)
17:30
^SHB(67292)
18:35
^SHB(67299)
18:40
^SHB(67306)
18:45
^SHB(67320)
18:55
^SHB(67327)
19:00
^SHB(67334)
19:05
^SHB(67341)
19:10
^SHB(67348)
19:15
^SHB(67355)
19:20
^SHB(67362)
19:25
^SHB(67369)
19:25
^SHB(67376)
19:30
^SHB(67383)
19:30
^SHB(67390)
19:30
^SHB(67397)
19:30
^SHB(67404)
19:25
^SHB(67411)
19:20
^SHB(67418)
19:15
^SHB(67425)
19:10
^SHB(67432)
19:05
^SHB(67439)
18:55
^SHB(67446)
18:45
^SHB(67453)
18:40
^SHB(67460)
18:30
^SHB(67467)
18:20
^SHB(67474)
18:10
^SHB(67481)
18:00
^SHB(67488)
17:55
^SHB(67495)
17:45
^SHB(67502)
17:35
^SHB(67509)
16:30
^SHB(67516)
16:25
^SHB(67523)
16:20
^SHB(67530)
16:15
^SHB(67537)
16:15
^SHB(67544)
16:15
^SHB(67551)
16:15
^SHB(67558)
16:20
^SHB(67565)
16:20
^SHB(67572)
16:25
^SHB(67579)
16:30
^SHB(67586)
16:40
^SHB(67593)
16:45
^SHB(67600)
16:50
^SHB(67607)
17:00
^SHB(67614)
17:05
^SHB(67621)
17:10
^SHB(67628)
17:15
^SHB(67635)
17:20
^SHB(67642)
17:25
^SHB(67649)
17:30
^SHB(67656)
18:35
^SHB(67663)
18:40
^SHB(67670)
18:45
^SHB(67677)
18:50
^SHB(67684)
18:55
^SHB(67691)
19:00
^SHB(67698)
19:05
^SHB(67705)
19:10
^SHB(67712)
19:15
^SHB(67719)
19:20
^SHB(67726)
19:20
^SHB(67733)
19:25
^SHB(67740)
19:30
^SHB(67747)
19:30
^SHB(67754)
19:30
^SHB(67761)
19:30
^SHB(67768)
19:25
^SHB(67775)
19:20
^SHB(67782)
19:15
^SHB(67789)
19:10
^SHB(67796)
19:05
^SHB(67803)
18:55
^SHB(67810)
18:50
^SHB(67817)
18:40
^SHB(67824)
18:30
^SHB(67831)
18:20
^SHB(67838)
18:10
^SHB(67845)
18:05
^SHB(67852)
17:55
^SHB(67859)
17:45
^SHB(67866)
17:40
^SHB(67873)
16:30
^SHB(67880)
16:25
^SHB(67887)
16:20
^SHB(67894)
16:15
^SHB(67901)
16:15
^SHB(67908)
16:15
^SHB(67915)
16:15
^SHB(67922)
16:20
^SHBEX(67209)
17:25
^SHBEX(67216)
17:30
^SHBEX(67223)
17:40
^SHBEX(67230)
17:45
^SHBEX(67237)
17:50
^SHBEX(67244)
17:55
^SHBEX(67251)
18:00
^SHBEX(67258)
18:05
^SHBEX(67265)
18:10
^SHBEX(67272)
18:15
^SHBEX(67279)
18:20
^SHBEX(67286)
18:25
^SHBEX(67293)
19:30
^SHBEX(67300)
19:35
^SHBEX(67307)
19:45
^SHBEX(67321)
19:55
^SHBEX(67328)
20:00
^SHBEX(67335)
20:05
^SHBEX(67342)
20:10
^SHBEX(67349)
20:15
^SHBEX(67356)
20:20
^SHBEX(67363)
20:25
^SHBEX(67370)
20:30
^SHBEX(67377)
20:30
^SHBEX(67384)
20:30
^SHBEX(67391)
20:30
^SHBEX(67398)
20:30
^SHBEX(67405)
20:25
^SHBEX(67412)
20:20
^SHBEX(67419)
20:15
^SHBEX(67426)
20:10
^SHBEX(67433)
20:00
^SHBEX(67440)
19:55
^SHBEX(67447)
19:45
^SHBEX(67454)
19:35
^SHBEX(67461)
19:25
^SHBEX(67468)
19:15
^SHBEX(67475)
19:10
^SHBEX(67482)
19:00
^SHBEX(67489)
18:50
^SHBEX(67496)
18:40
^SHBEX(67503)
18:35
^SHBEX(67510)
17:30
^SHBEX(67517)
17:25
^SHBEX(67524)
17:20
^SHBEX(67531)
17:15
^SHBEX(67538)
17:15
^SHBEX(67545)
17:15
^SHBEX(67552)
17:15
^SHBEX(67559)
17:20
^SHBEX(67566)
17:20
^SHBEX(67573)
17:25
^SHBEX(67580)
17:30
^SHBEX(67587)
17:35
^SHBEX(67594)
17:45
^SHBEX(67601)
17:50
^SHBEX(67608)
17:55
^SHBEX(67615)
18:00
^SHBEX(67622)
18:05
^SHBEX(67629)
18:10
^SHBEX(67636)
18:15
^SHBEX(67643)
18:20
^SHBEX(67650)
18:25
^SHBEX(67657)
19:30
^SHBEX(67664)
19:35
^SHBEX(67671)
19:40
^SHBEX(67678)
19:45
^SHBEX(67685)
19:55
^SHBEX(67692)
20:00
^SHBEX(67699)
20:05
^SHBEX(67706)
20:10
^SHBEX(67713)
20:15
^SHBEX(67720)
20:20
^SHBEX(67727)
20:25
^SHBEX(67734)
20:30
^SHBEX(67741)
20:30
^SHBEX(67748)
20:30
^SHBEX(67755)
20:30
^SHBEX(67762)
20:30
^SHBEX(67769)
20:25
^SHBEX(67776)
20:25
^SHBEX(67783)
20:15
^SHBEX(67790)
20:10
^SHBEX(67797)
20:05
^SHBEX(67804)
19:55
^SHBEX(67811)
19:45
^SHBEX(67818)
19:35
^SHBEX(67825)
19:30
^SHBEX(67832)
19:20
^SHBEX(67839)
19:10
^SHBEX(67846)
19:00
^SHBEX(67853)
18:50
^SHBEX(67860)
18:45
^SHBEX(67867)
18:35
^SHBEX(67874)
17:30
^SHBEX(67881)
17:25
^SHBEX(67888)
17:20
^SHBEX(67895)
17:15
^SHBEX(67902)
17:15
^SHBEX(67909)
17:15
^SHBEX(67916)
17:15
^SHBEX(67923)
17:15
^SHP
%GSW4
^SHP("%GSALL")

^SHP("%GSALL",1)
*
^SHP("%GSALL",2)
-UCI
^SHP("%GSALL",3)
-devi20
^SHP("%GSALL",4)

^SHP("%GSALL","RG")
H
^SHP("%GSBSC",1)
%TYPCRT
^SHP("%GSBSC",2)
%CVET
^SHP("%GSBSC",3)
ADRES
^SHP("%GSBSC",4)
BAR
^SHP("%GSBSC",5)
BLACK
^SHP("%GSBSC",6)
DARGA
^SHP("%GSBSC",7)
DARGAi
^SHP("%GSBSC",8)
DEP
^SHP("%GSBSC",9)
DEV
^SHP("%GSBSC",10)
DIASUG
^SHP("%GSBSC",11)
DT
^SHP("%GSBSC",12)
E1G
^SHP("%GSBSC",13)
E1MSG
^SHP("%GSBSC",14)
ISRVIS
^SHP("%GSBSC",15)
JENR
^SHP("%GSBSC",16)
KILLZ
^SHP("%GSBSC",17)
KL
^SHP("%GSBSC",18)
KLLKHTZ
^SHP("%GSBSC",19)
KLLKH
^SHP("%GSBSC",20)
KOD
^SHP("%GSBSC",21)
L1TIP
^SHP("%GSBSC",22)
LEV
^SHP("%GSBSC",23)
LEVKVZ
^SHP("%GSBSC",24)
LEVSUGMS
^SHP("%GSBSC",25)
LKH
^SHP("%GSBSC",26)
LKHi
^SHP("%GSBSC",27)
LKHi1
^SHP("%GSBSC",28)
LKK
^SHP("%GSBSC",29)
MHSET
^SHP("%GSBSC",30)
QNDEF
^SHP("%GSBSC",31)
QNSET
^SHP("%GSBSC",32)
LOOP
^SHP("%GSBSC",33)
MHT
^SHP("%GSBSC",34)
MHTSF
^SHP("%GSBSC",35)
MSPMOD
^SHP("%GSBSC",36)
NAME
^SHP("%GSBSC",37)
NAMEi
^SHP("%GSBSC",38)
P1AREA
^SHP("%GSBSC",39)
P1BARMAN
^SHP("%GSBSC",40)
P1BLRD
^SHP("%GSBSC",41)
P1CODH
^SHP("%GSBSC",42)
P1CODHi
^SHP("%GSBSC",43)
P1CODHM
^SHP("%GSBSC",44)
P1CODTS
^SHP("%GSBSC",45)
P1DOP
^SHP("%GSBSC",46)
P1EZ
^SHP("%GSBSC",47)
P1EZI
^SHP("%GSBSC",48)
P1EZA
^SHP("%GSBSC",49)
P1EZAI
^SHP("%GSBSC",50)
P1EZH
^SHP("%GSBSC",51)
P1EZHK
^SHP("%GSBSC",52)
P1EZT
^SHP("%GSBSC",53)
P1EZK
^SHP("%GSBSC",54)
P1EZKI
^SHP("%GSBSC",55)
P1EZL
^SHP("%GSBSC",56)
P1EZLI
^SHP("%GSBSC",57)
P1EZP
^SHP("%GSBSC",58)
P1EZPI
^SHP("%GSBSC",59)
P1EZR
^SHP("%GSBSC",60)
P1EZRI
^SHP("%GSBSC",61)
P1HLDR
^SHP("%GSBSC",62)
P1HNH
^SHP("%GSBSC",63)
P1HNHS
^SHP("%GSBSC",64)
P1IR
^SHP("%GSBSC",65)
P1HOD
^SHP("%GSBSC",66)
P1HOD
^SHP("%GSBSC",67)
P1KDM
^SHP("%GSBSC",68)
P1KDMI
^SHP("%GSBSC",69)
P1KEY
^SHP("%GSBSC",70)
P1KUP
^SHP("%GSBSC",71)
P1KVZSID
^SHP("%GSBSC",72)
P1LKDM
^SHP("%GSBSC",73)
P1LKWK
^SHP("%GSBSC",74)
P1MDPS
^SHP("%GSBSC",75)
P1MDPSi
^SHP("%GSBSC",76)
P1MLZSH
^SHP("%GSBSC",77)
P1MLZSHI
^SHP("%GSBSC",78)
P1MSD
^SHP("%GSBSC",79)
P1MSKSP1MVC
^SHP("%GSBSC",80)
P1PARTAW
^SHP("%GSBSC",81)
P1PARMSL
^SHP("%GSBSC",82)
P1PARSID
^SHP("%GSBSC",83)
P1SBIT
^SHP("%GSBSC",84)
P1SBR
^SHP("%GSBSC",85)
P1SHNH
^SHP("%GSBSC",86)
P1SIS
^SHP("%GSBSC",87)
P1SL
^SHP("%GSBSC",88)
P1SLi
^SHP("%GSBSC",89)
P1STREET
^SHP("%GSBSC",90)
P1SUGM
^SHP("%GSBSC",91)
P1SUG
^SHP("%GSBSC",92)
P1SUGi
^SHP("%GSBSC",93)
P1PRM
^SHP("%GSBSC",94)
P1SBIT
^SHP("%GSBSC",95)
P1SET
^SHP("%GSBSC",96)
P1SETA
^SHP("%GSBSC",97)
P1SETAI
^SHP("%GSBSC",98)
P1SETM
^SHP("%GSBSC",99)
P1SETP
^SHP("%GSBSC",100)
P1SETPI
^SHP("%GSBSC",101)
P1TFRA
^SHP("%GSBSC",102)
P1THUM
^SHP("%GSBSC",103)
P1ULAM
^SHP("%GSBSC",104)
PARNL
^SHP("%GSBSC",105)
PARSUG
^SHP("%GSBSC",106)
PARSUGi
^SHP("%GSBSC",107)
PAR
^SHP("%GSBSC",108)
PARi
^SHP("%GSBSC",109)
PARs
^SHP("%GSBSC",110)
PARDEP
^SHP("%GSBSC",111)
PARM
^SHP("%GSBSC",112)
PARMS
^SHP("%GSBSC",113)
PARLKH
^SHP("%GSBSC",114)
PARSHA
^SHP("%GSBSC",115)
PARSLK
^SHP("%GSBSC",116)
PARTA
^SHP("%GSBSC",117)
PATH
^SHP("%GSBSC",118)
PL
^SHP("%GSBSC",119)
PLUK
^SHP("%GSBSC",120)
PLZJ0
^SHP("%GSBSC",121)
PRTBH
^SHP("%GSBSC",122)
PRTMB
^SHP("%GSBSC",123)
PRTNO
^SHP("%GSBSC",124)
RANDOM
^SHP("%GSBSC",125)
SCR
^SHP("%GSBSC",126)
SCRP
^SHP("%GSBSC",127)
SCRL
^SHP("%GSBSC",128)
SHP
^SHP("%GSBSC",129)
SHVA
^SHP("%GSBSC",130)
SPK
^SHP("%GSBSC",131)
SPKi
^SHP("%GSBSC",132)
START
^SHP("%GSBSC",133)
SUGL
^SHP("%GSBSC",134)
SUGLi
^SHP("%GSBSC",135)
SUGS
^SHP("%GSBSC",136)
SUGSi
^SHP("%GSBSC",137)
TABLs
^SHP("%GSBSC",138)
TEL
^SHP("%GSBSC",139)
UCI
^SHP("%GSBSC",140)
UCI0
^SHP("%GSBSC",141)
UCIKL
^SHP("%GSBSC",142)
VECT
^SHP("%GSBSC",143)
VERSION
^SHP("%GSBSC",144)
ZT
^SHP("%GSBSC",145)
ZB
^SHP("%GSBSC",146)
dev
^SHP("%GSBSC",147)
devi
^SHP("%GSBSC",148)
devi1
^SHP("%GSBSC",149)
devi2
^SHP("%GSBSC",150)
devi3
^SHP("%GSBSC",151)
m
^SHP("%GSBSC",152)
msg
^SHP("%GSBSC",153)
rep
^SHP("%GSBSC",154)
word
^SHP("%GSBSC",155)
W3MAIN
^SHP("%GSBSC",156)
W3MSD
^SHP("%GSBSC",157)
W3MSDR
^SHP("%GSBSC",158)
W3SUG
^SHP("%GSBSC",159)
W3PAR
^SHP("%GSBSC",160)
W3PARM
^SHP("%GSBSC",161)
W3PRM
^SHP("%GSBSC",162)
W4ACNT
^SHP("%GSBSC",163)
W4DIAPTB
^SHP("%GSBSC",164)
W4OPT
^SHP("%GSBSC",165)
W4PAY
^SHP("%GSBSC",166)
W4PAYS
^SHP("%GSBSC",167)
W4TIPAH
^SHP("%GSBSC",168)
W4ASK
^SHP("%GSBSC",169)
W4GRC
^SHP("%GSBSC",170)
W4KVZRKZ
^SHP("%GSBSC",171)
W4REP
^SHP("%GSBSC",172)
W4REPSCR
^SHP("%GSBSC",173)
W4SP
^SHP("%GSBSC",174)
W4VWGR
^SHP("%GSBSC",175)
W4VDHB
^SHP("%GSBSC",176)
W1REP
^SHP("%GSBSC",177)
W1SP
^SHP("%GSBSC",178)
W1DICT
^SHP("%GSBSC",179)
WO1VM
^SHP("%GSBSC",180)
W3AZR
^SHP("%GSBSC",181)
W4ITFAST
^SHP("%GSBSC",182)
W4FASTGR
^SHP("%GSBSC",183)
W4MAPPRM
^SHP("%GSBSC",184)
W4MDP
^SHP("%GSBSC",185)
W4MDPH
^SHP("%GSBSC",186)
W4PSWDRG
^SHP("%GSBSC",187)
W4PLGN
^SHP("%GSBSC",188)
W4ULAM
^SHP("%GSBSC",189)
W4ULAMA
^SHP("%GSBSC",190)
W4SUGH
^SHP("%GSBSC",191)
W4SUGM
^SHP("%GSBSC",192)
W4SHVER
^SHP("%GSBSC",193)
W4SETMT
^SHP("%GSBSC",194)
WCG
^SHP("%GSBSC",195)
WCCMP
^SHP("%GSBSC",196)
WCMSG
^SHP("%GSBSC",197)
WCREP
^SHP("%GSBSC",198)
WVG
^SHP("%GSBSC",199)
MLDEP
^SHP("%GSBSC",200)
MLEZM
^SHP("%GSBSC",201)
MLEZMI
^SHP("%GSBSC",202)
MLMIDA
^SHP("%GSBSC",203)
MLMKDM
^SHP("%GSBSC",204)
MLPAR
^SHP("%GSBSC",205)
MLSUGP
^SHP("%GSBSC",206)
W4MTB
^SHP("%GSBSC",207)
W4FREEDOC
^SHP("%GSBSC",208)
W4INOUT
^SHP("%GSBSC",209)
W4INDDIR
^SHP("%GSBSC",210)
W4ITDGSH
^SHP("%GSBSC",211)
W3MVC
^SHP("%GSBSC",212)
W4MVC1
^SHP("%GSBSC",213)
W4MVCAH
^SHP("%GSBSC",214)
W4MVC11
^SHP("%GSBSC",215)
W4MVC3
^SHP("%GSBSC",216)
W4BCODE
^SHP("%GSBSC",217)
W4BONCVG
^SHP("%GSBSC",218)
W4NOITCN
^SHP("%GSBSC",219)
W4TATSUG
^SHP("%GSBSC",220)
W4POSEMV
^SHP("%GSBSC",221)
W3KKIND
^SHP("%GSBSC",222)
W3MKR
^SHP("%GSBSC",223)
W3SUGTS
^SHP("%GSBSC",224)
W3COND
^SHP("%GSBSC",225)
W3KASHER
^SHP("%GSBSC",226)
W3PRICE
^SHP("%GSBSC",227)
W4ABS
^SHP("%GSBSC",228)
W4CPERR
^SHP("%GSBSC",229)
W4ORDEND
^SHP("%GSBSC",230)
W4ORDENDR
^SHP("%GSBSC",231)
W4SHP
^SHP("%GSBSC",232)
W4SCR
^SHP("%GSBSC",233)
W4TAB
^SHP("%GSBSC",234)
W4ZOOM
^SHP("%GSKLS")

^SHP("%GSKLS",1)
P1LHB
^SHP("%GSKLS",2)
KLIN
^SHP("%GSKLS",3)
KLF
^SHP("%GSKLS",4)
KLPTCH
^SHP("%GSKLS",5)
LKH
^SHP("%GSKLS",6)
P1EZL
^SHP("%GSKLS",7)
P1EZLI
^SHP("%GSKLS",8)
P1HL1
^SHP("%GSKLS",9)
P1HL2
^SHP("%GSKLS",10)
SUGL
^SHP("%GSKLS","RG")
H
^SHP("%GSKLZ")
miwgyn zwign
^SHP("%GSKLZ",1)
DEP
^SHP("%GSKLZ",2)
DUMP
^SHP("%GSKLZ",3)
DUMP1
^SHP("%GSKLZ",4)
FILE
^SHP("%GSKLZ",5)
L1TIP
^SHP("%GSKLZ",6)
LEV
^SHP("%GSKLZ",7)
LEVKVZ
^SHP("%GSKLZ",8)
MHT
^SHP("%GSKLZ",9)
MLDEP
^SHP("%GSKLZ",10)
MLPAR
^SHP("%GSKLZ",11)
MLSPK
^SHP("%GSKLZ",12)
MSPMOD
^SHP("%GSKLZ",13)
NAME
^SHP("%GSKLZ",14)
P1BLRD
^SHP("%GSKLZ",15)
P1CODH
^SHP("%GSKLZ",16)
P1CODHM
^SHP("%GSKLZ",17)
P1CODTS
^SHP("%GSKLZ",18)
P1DOP
^SHP("%GSKLZ",19)
P1EZ
^SHP("%GSKLZ",20)
P1EZI
^SHP("%GSKLZ",21)
P1EZA
^SHP("%GSKLZ",22)
P1EZAI
^SHP("%GSKLZ",23)
P1EZH
^SHP("%GSKLZ",24)
P1EZHK
^SHP("%GSKLZ",25)
P1EZT
^SHP("%GSKLZ",26)
P1EZK
^SHP("%GSKLZ",27)
P1EZKI
^SHP("%GSKLZ",28)
P1EZL
^SHP("%GSKLZ",29)
P1EZLI
^SHP("%GSKLZ",30)
P1EZP
^SHP("%GSKLZ",31)
P1EZPI
^SHP("%GSKLZ",32)
P1EZR
^SHP("%GSKLZ",33)
P1EZRI
^SHP("%GSKLZ",34)
P1HNH
^SHP("%GSKLZ",35)
P1HNHS
^SHP("%GSKLZ",36)
P1IR
^SHP("%GSKLZ",37)
P1HOD
^SHP("%GSKLZ",38)
P1KDM
^SHP("%GSKLZ",39)
P1KDMI
^SHP("%GSKLZ",40)
P1KEY
^SHP("%GSKLZ",41)
P1KUP
^SHP("%GSKLZ",42)
P1LKDM
^SHP("%GSKLZ",43)
P1LKWK
^SHP("%GSKLZ",44)
P1MDPS
^SHP("%GSKLZ",45)
P1MLZSH
^SHP("%GSKLZ",46)
P1MLZSHI
^SHP("%GSKLZ",47)
P1MSD
^SHP("%GSKLZ",48)
P1MVC
^SHP("%GSKLZ",49)
P1PARTAW
^SHP("%GSKLZ",50)
P1PARMSL
^SHP("%GSKLZ",51)
P1SBIT
^SHP("%GSKLZ",52)
P1SIS
^SHP("%GSKLZ",53)
P1SHNH
^SHP("%GSKLZ",54)
P1SL
^SHP("%GSKLZ",55)
P1SUGM
^SHP("%GSKLZ",56)
P1SUG
^SHP("%GSKLZ",57)
P1PRM
^SHP("%GSKLZ",58)
P1SBIT
^SHP("%GSKLZ",59)
P1SET
^SHP("%GSKLZ",60)
P1SETA
^SHP("%GSKLZ",61)
P1SETAI
^SHP("%GSKLZ",62)
P1SETM
^SHP("%GSKLZ",63)
P1SETP
^SHP("%GSKLZ",64)
P1SETPI
^SHP("%GSKLZ",65)
P1TFRA
^SHP("%GSKLZ",66)
P1CODTS
^SHP("%GSKLZ",67)
P1EZTI
^SHP("%GSKLZ",68)
P1KVZSID
^SHP("%GSKLZ",69)
P1PARSID
^SHP("%GSKLZ",70)
P1TFR
^SHP("%GSKLZ",71)
PARDEP
^SHP("%GSKLZ",72)
P1THUM
^SHP("%GSKLZ",73)
PRTMB
^SHP("%GSKLZ",74)
PRTEND
^SHP("%GSKLZ",75)
PRTMBS
^SHP("%GSKLZ",76)
PRTMBH
^SHP("%GSKLZ",77)
ENDSET
^SHP("%GSKLZ",78)
PRTMBS
^SHP("%GSKLZ",79)
PRTMBH
^SHP("%GSKLZ",80)
ENDSET
^SHP("%GSKLZ",81)
MHTSF
^SHP("%GSKLZ",82)
MHSET
^SHP("%GSKLZ",83)
QNSET 
^SHP("%GSKLZ",84)
QNDEF
^SHP("%GSKLZ",85)
W3MVC
^SHP("%GSKLZ",86)
W3PARM
^SHP("%GSKLZ",87)
W4BCODE
^SHP("%GSKLZ",88)
W4BONCVG
^SHP("%GSKLZ",89)
W4EZDI
^SHP("%GSKLZ",90)
W4FASTGR
^SHP("%GSKLZ",91)
W4GRC
^SHP("%GSKLZ",92)
W4KVZRKZ 
^SHP("%GSKLZ",93)
W4ITCNC
^SHP("%GSKLZ",94)
W4ITFAST
^SHP("%GSKLZ",95)
W4ITDGSH 
^SHP("%GSKLZ",96)
W4NOMAM
^SHP("%GSKLZ",97)
W4MVC1
^SHP("%GSKLZ",98)
W4MVCAH
^SHP("%GSKLZ",99)
W4MVC11
^SHP("%GSKLZ",100)
W4MVC3
^SHP("%GSKLZ",101)
W4NOITCN 
^SHP("%GSKLZ",102)
W4ORDEND
^SHP("%GSKLZ",103)
W4ORDENDR
^SHP("%GSKLZ",104)
W4ORDTRT
^SHP("%GSKLZ",105)
W4TATSUG
^SHP("%GSKLZ",106)
W4BLYGR
^SHP("%GSKLZ",107)
W4SETMT
^SHP("%GSKLZ",108)
PARNL
^SHP("%GSKLZ",109)
PARSUG
^SHP("%GSKLZ",110)
PAR
^SHP("%GSKLZ",111)
PARMS
^SHP("%GSKLZ",112)
PARLKH
^SHP("%GSKLZ",113)
PARSHA
^SHP("%GSKLZ",114)
PARSLK
^SHP("%GSKLZ",115)
PARTA
^SHP("%GSKLZ",116)
PATH
^SHP("%GSKLZ",117)
PL
^SHP("%GSKLZ",118)
PLUK
^SHP("%GSKLZ",119)
PRTBH
^SHP("%GSKLZ",120)
PRTNO
^SHP("%GSKLZ",121)
SUGL
^SHP("%GSKLZ",122)
SUGS
^SHP("%GSKLZ",123)
TEL
^SHP("%GSKLZ",124)
UCI
^SHP("%GSKLZ",125)
UCIKL
^SHP("%GSKLZ",126)
W3MAIN
^SHP("%GSKLZ",127)
W3PAR
^SHP("%GSKLZ",128)
W3SUG
^SHP("%GSKLZ",129)
W4SPK
^SHP("%GSKLZ",130)
W4ACNT
^SHP("%GSKLZ",131)
W4ATAR
^SHP("%GSKLZ",132)
W4PLGN
^SHP("%GSKLZ",133)
W4POSGRT
^SHP("%GSKLZ",134)
W4ULAM
^SHP("%GSKLZ",135)
W4TIPAH
^SHP("%GSKLZ",136)
Z
^SHP("%GSKLZ",137)
Z1
^SHP("%GSKLZ",138)
dev
^SHP("%GSKLZ",139)
devi
^SHP("%GSKLZ",140)
DARGA
^SHP("%GSKLZ",141)
DEV
^SHP("%GSKLZ",142)
DIASUG
^SHP("%GSKLZ",143)
MLEZM
^SHP("%GSKLZ",144)
MLEZMI
^SHP("%GSKLZ",145)
MLMIDA
^SHP("%GSKLZ",146)
MLMKDM
^SHP("%GSKLZ",147)
MLSUGP
^SHP("%GSKLZ",148)
P1HLDR
^SHP("%GSKLZ",149)
QNSET
^SHP("%GSKLZ",150)
W1SP
^SHP("%GSKLZ",151)
W3AZR
^SHP("%GSKLZ",152)
W3COND
^SHP("%GSKLZ",153)
W3MKR
^SHP("%GSKLZ",154)
W3MSD
^SHP("%GSKLZ",155)
W3MSDR
^SHP("%GSKLZ",156)
W3PRM
^SHP("%GSKLZ",157)
W4DIAPTB
^SHP("%GSKLZ",158)
W4FREEDOC
^SHP("%GSKLZ",159)
W4INDDIR
^SHP("%GSKLZ",160)
W4INOUT
^SHP("%GSKLZ",161)
W4ITDGSH
^SHP("%GSKLZ",162)
W4KVZRKZ
^SHP("%GSKLZ",163)
W4MAPPRM
^SHP("%GSKLZ",164)
W4MDP
^SHP("%GSKLZ",165)
W4MDPH
^SHP("%GSKLZ",166)
W4NOITCN
^SHP("%GSKLZ",167)
W4POSEMV
^SHP("%GSKLZ",168)
W4PSWDRG
^SHP("%GSKLZ",169)
W4SP
^SHP("%GSKLZ",170)
W4SUGM
^SHP("%GSKLZ",171)
W4ULAMA
^SHP("%GSKLZ",172)
WCCMP
^SHP("%GSKLZ",173)
WCG
^SHP("%GSKLZ",174)
WCMSG
^SHP("%GSKLZ",175)
WCREP
^SHP("%GSKLZ",176)
WVG
^SHP("%GSKLZ",177)
devi1
^SHP("%GSKLZ",178)

^SHP("%GSKLZ",179)

^SHP("%GSKLZ",180)

^SHP("%GSKLZ","RG")
H
^SHP("%GSKP")
KP hq
^SHP("%GSKP",1)
SCR
^SHP("%GSKP",1,"%TOP")
0
^SHP("%GSKP",2)
LOOP
^SHP("%GSKP",2,"%TOP")
0
^SHP("%GSKP",3)
KILLZ
^SHP("%GSKP",3,"%TOP")
0
^SHP("%GSKP",4)
TABLs
^SHP("%GSKP",4,"%TOP")
0
^SHP("%GSKP",5)
KOD
^SHP("%GSKP",5,"%TOP")
0
^SHP("%GSKP",6)
SHP
^SHP("%GSKP",6,"%TOP")
0
^SHP("%GSKP",7)
SCRL
^SHP("%GSKP",7,"%TOP")
0
^SHP("%GSKP",8)
SCRP
^SHP("%GSKP",8,"%TOP")
0
^SHP("%GSKP",9)
rep
^SHP("%GSKP",9,"%TOP")
0
^SHP("%GSKP",10)
L1TIP
^SHP("%GSKP",10,"%TOP")
0
^SHP("%GSKP",11)
P1CODTS
^SHP("%GSKP",11,"%TOP")
0
^SHP("%GSKP",12)
ZT
^SHP("%GSKP",12,"%TOP")
0
^SHP("%GSKP",13)
ZB
^SHP("%GSKP",13,"%TOP")
0
^SHP("%GSKP",14)
UCI0
^SHP("%GSKP",14,"%TOP")
0
^SHP("%GSKP","RG")
H
^SHP("%GSNEW")

^SHP("%GSNEW",1)
SCR
^SHP("%GSNEW",1,"%TOP")
0
^SHP("%GSNEW",2)
SHP
^SHP("%GSNEW",2,"%TOP")
0
^SHP("%GSNEW",3)
TABLs
^SHP("%GSNEW",3,"%TOP")
0
^SHP("%GSNEW",4)
UCI
^SHP("%GSNEW",4,"%TOP")
0
^SHP("%GSNEW",5)
ZT
^SHP("%GSNEW",5,"%TOP")
0
^SHP("%GSNEW",6)
W3PRM
^SHP("%GSNEW",6,"%TOP")
0
^SHP("%GSNEW",7)
P1PRM
^SHP("%GSNEW",7,"%TOP")
0
^SHP("%GSNEW",8)
PL
^SHP("%GSNEW",8,"%TOP")
0
^SHP("%GSNEW",9)
W1LNG
^SHP("%GSNEW",9,"%TOP")
0
^SHP("%GSNEW",10)

^SHP("%GSNEW","RG")
H
^SHP("%GSPAR")
hixtz ly mivaw
^SHP("%GSPAR",1)
P1EZ
^SHP("%GSPAR",2)
P1EZA
^SHP("%GSPAR",3)
P1EZAI
^SHP("%GSPAR",4)
P1EZI
^SHP("%GSPAR",5)
P1EZK
^SHP("%GSPAR",6)
P1EZKI
^SHP("%GSPAR",7)
P1EZT
^SHP("%GSPAR",8)
P1EZTI
^SHP("%GSPAR",9)
P1EZP
^SHP("%GSPAR",10)
P1EZR
^SHP("%GSPAR",11)
P1EZH
^SHP("%GSPAR",12)
P1EZHK
^SHP("%GSPAR",13)
P1HNHS
^SHP("%GSPAR",14)
P1KVZSID
^SHP("%GSPAR",15)
P1PARTAW
^SHP("%GSPAR",16)
P1PARMSL
^SHP("%GSPAR",17)
P1PARSID
^SHP("%GSPAR",18)
P1TFR
^SHP("%GSPAR",19)
P1TFRA
^SHP("%GSPAR",20)
P1SET
^SHP("%GSPAR",21)
P1SETM
^SHP("%GSPAR",22)
P1SETA
^SHP("%GSPAR",23)
P1SETP
^SHP("%GSPAR",24)
P1SBR
^SHP("%GSPAR",25)
PAR
^SHP("%GSPAR",26)
PARLKH
^SHP("%GSPAR",27)
PARNL
^SHP("%GSPAR",28)
PARSLK
^SHP("%GSPAR",29)
PARSHA
^SHP("%GSPAR",30)
PARSUG
^SHP("%GSPAR",31)
PARSUGi
^SHP("%GSPAR",32)
PARTA
^SHP("%GSPAR",33)
PARDEP
^SHP("%GSPAR",34)
PARMS
^SHP("%GSPAR",35)
P1BLRD
^SHP("%GSPAR",36)
P1CODH
^SHP("%GSPAR",37)
P1THUM
^SHP("%GSPAR",38)
P1MVC
^SHP("%GSPAR",39)
PRTBH
^SHP("%GSPAR",40)
PRTMB
^SHP("%GSPAR",41)
PRTNO
^SHP("%GSPAR",42)
PRTEND
^SHP("%GSPAR",43)
PRTMBS
^SHP("%GSPAR",44)
PRTMBH
^SHP("%GSPAR",45)
ENDSET
^SHP("%GSPAR",46)
DEP
^SHP("%GSPAR",47)
PRTMBS
^SHP("%GSPAR",48)
PRTMBH
^SHP("%GSPAR",49)
ENDSET
^SHP("%GSPAR",50)
DEP
^SHP("%GSPAR",51)
P1MHT
^SHP("%GSPAR",52)
MHT
^SHP("%GSPAR",53)
MHTSF
^SHP("%GSPAR",54)
MHSET
^SHP("%GSPAR",55)
QNSET 
^SHP("%GSPAR",56)
QNDEF
^SHP("%GSPAR",57)
W3MVC
^SHP("%GSPAR",58)
W3PAR
^SHP("%GSPAR",59)
W3PARM
^SHP("%GSPAR",60)
W3SUG
^SHP("%GSPAR",61)
W4BCODE
^SHP("%GSPAR",62)
W4BONCVG
^SHP("%GSPAR",63)
W4EZDI
^SHP("%GSPAR",64)
W4FASTGR
^SHP("%GSPAR",65)
W4GRC
^SHP("%GSPAR",66)
W4KVZRKZ 
^SHP("%GSPAR",67)
W4ITCNC
^SHP("%GSPAR",68)
W4ITFAST
^SHP("%GSPAR",69)
W4ITDGSH 
^SHP("%GSPAR",70)
W4NOMAM
^SHP("%GSPAR",71)
W4MVC1
^SHP("%GSPAR",72)
W4MVCAH
^SHP("%GSPAR",73)
W4MVC11
^SHP("%GSPAR",74)
W4MVC3
^SHP("%GSPAR",75)
W4NOITCN 
^SHP("%GSPAR",76)
W4ORDEND
^SHP("%GSPAR",77)
W4ORDENDR
^SHP("%GSPAR",78)
W4TATSUG
^SHP("%GSPAR",79)
W4BLYGR
^SHP("%GSPAR",80)
W4SETMT
^SHP("%GSPAR","RG")
H
^SHP("%GSW")

^SHP("%GSW",1)
W1DICT
^SHP("%GSW",2)
SHP
^SHP("%GSW",3)
W3CNTRY
^SHP("%GSW",4)

^SHP("%GSW","RG")
H
^SHP("%GSW4")

^SHP("%GSW4",1)
W3KKIND
^SHP("%GSW4",2)
W3SUGTS
^SHP("%GSW4",3)
W3COND 
^SHP("%GSW4",4)
W3KASHER
^SHP("%GSW4",5)
W3PRICE
^SHP("%GSW4",6)
W4ABS
^SHP("%GSW4",7)
W4CPERR
^SHP("%GSW4",8)
W4PAY
^SHP("%GSW4",9)
W4PAYS
^SHP("%GSW4",10)
W1DICT
^SHP("%GSW4",11)
W4ASK
^SHP("%GSW4",12)
W4VWGR
^SHP("%GSW4",13)
W4SP 
^SHP("%GSW4",14)
W4SUGH
^SHP("%GSW4",15)
W4SHVER
^SHP("%GSW4",16)
W4REP
^SHP("%GSW4",17)
W4REPSCR
^SHP("%GSW4",18)
W4SHP
^SHP("%GSW4",19)
W4OPT
^SHP("%GSW4",20)
W4SCR
^SHP("%GSW4",21)
W4TAB
^SHP("%GSW4",22)
W4VDHB
^SHP("%GSW4",23)
W4ZOOM
^SHP("%GSW4",24)
TABLs
^SHP("%GSW4",25)
W1REP
^SHP("%GSW4",26)
WO1VM
^SHP("%GSW4",27)
WO1P
^SHP("%GSW4",28)
KOD
^SHP("%GSW4",29)
KODCIB
^SHP("%GSW4",30)
P1SBR
^SHP("%GSW4",31)
P1STREET
^SHP("%GSW4",32)
SHB
^SHP("%GSW4",33)
SHBEX
^SHP("%GSW4",34)
SCR
^SHP("%GSW4",35)
SHP
^SHP("%GSW4",36)
LEVSUGMS
^SHP("%GSW4",37)
UCI0
^SHP("%GSW4",38)
rep
^SHP("%GSW4",39)
ZT
^SHP("%GSW4",40)
W4MTB
^SHP("%GSW4",41)
W4MTB
^SHP("%GSW4",42)
W4MMGL
^SHP("%GSW4","RG")
H
^SHP("%GSZERO")

^SHP("%GSZERO",1)
%TYPCRT
^SHP("%GSZERO",2)
%CVET
^SHP("%GSZERO",3)
ADRES
^SHP("%GSZERO",4)
BAR
^SHP("%GSZERO",5)
BLACK
^SHP("%GSZERO",6)
DARGA
^SHP("%GSZERO",7)
DARGAi
^SHP("%GSZERO",8)
DEP
^SHP("%GSZERO",9)
DEV
^SHP("%GSZERO",10)
DIASUG
^SHP("%GSZERO",11)
DT
^SHP("%GSZERO",12)
E1G
^SHP("%GSZERO",13)
E1MSG
^SHP("%GSZERO",14)
ISRVIS
^SHP("%GSZERO",15)
JENR
^SHP("%GSZERO",16)
KILLZ
^SHP("%GSZERO",17)
KL
^SHP("%GSZERO",18)
KLLKHTZ
^SHP("%GSZERO",19)
KLLKH
^SHP("%GSZERO",20)
KOD
^SHP("%GSZERO",21)
L1TIP
^SHP("%GSZERO",22)
LEV
^SHP("%GSZERO",23)
LEVKVZ
^SHP("%GSZERO",24)
LKH
^SHP("%GSZERO",25)
LKHi
^SHP("%GSZERO",26)
LKHi1
^SHP("%GSZERO",27)
LKK
^SHP("%GSZERO",28)
LOOP
^SHP("%GSZERO",29)
MHT
^SHP("%GSZERO",30)
MHTSF
^SHP("%GSZERO",31)
MSPMOD
^SHP("%GSZERO",32)
NAME
^SHP("%GSZERO",33)
NAMEi
^SHP("%GSZERO",34)
P1AREA
^SHP("%GSZERO",35)
P1BARMAN
^SHP("%GSZERO",36)
P1BLRD
^SHP("%GSZERO",37)
P1CODH
^SHP("%GSZERO",38)
P1CODHi
^SHP("%GSZERO",39)
P1CODHM
^SHP("%GSZERO",40)
P1CODTS
^SHP("%GSZERO",41)
P1DOP
^SHP("%GSZERO",42)
P1EZ
^SHP("%GSZERO",43)
P1EZI
^SHP("%GSZERO",44)
P1EZA
^SHP("%GSZERO",45)
P1EZAI
^SHP("%GSZERO",46)
P1EZH
^SHP("%GSZERO",47)
P1EZHK
^SHP("%GSZERO",48)
P1EZT
^SHP("%GSZERO",49)
P1EZK
^SHP("%GSZERO",50)
P1EZKI
^SHP("%GSZERO",51)
P1EZL
^SHP("%GSZERO",52)
P1EZLI
^SHP("%GSZERO",53)
P1EZP
^SHP("%GSZERO",54)
P1EZPI
^SHP("%GSZERO",55)
P1EZR
^SHP("%GSZERO",56)
P1EZRI
^SHP("%GSZERO",57)
P1HLDR
^SHP("%GSZERO",58)
P1HNH
^SHP("%GSZERO",59)
P1HNHS
^SHP("%GSZERO",60)
P1IR
^SHP("%GSZERO",61)
P1HOD
^SHP("%GSZERO",62)
P1HOD
^SHP("%GSZERO",63)
P1KDM
^SHP("%GSZERO",64)
P1KDMI
^SHP("%GSZERO",65)
P1KEY
^SHP("%GSZERO",66)
P1KUP
^SHP("%GSZERO",67)
P1KVZSID
^SHP("%GSZERO",68)
P1LKDM
^SHP("%GSZERO",69)
P1LKWK
^SHP("%GSZERO",70)
P1MDPS
^SHP("%GSZERO",71)
P1MDPSi
^SHP("%GSZERO",72)
P1MLZSH
^SHP("%GSZERO",73)
P1MLZSHI
^SHP("%GSZERO",74)
P1MSD
^SHP("%GSZERO",75)
P1MSKSP1MVC
^SHP("%GSZERO",76)
P1PARTAW
^SHP("%GSZERO",77)
P1PARMSL
^SHP("%GSZERO",78)
P1SBIT
^SHP("%GSZERO",79)
P1SBR
^SHP("%GSZERO",80)
P1SIS
^SHP("%GSZERO",81)
P1SL
^SHP("%GSZERO",82)
P1SLi
^SHP("%GSZERO",83)
P1SUGM
^SHP("%GSZERO",84)
P1SUG
^SHP("%GSZERO",85)
P1SUGi
^SHP("%GSZERO",86)
P1PRM
^SHP("%GSZERO",87)
P1SBIT
^SHP("%GSZERO",88)
P1SET
^SHP("%GSZERO",89)
P1SETA
^SHP("%GSZERO",90)
P1SETAI
^SHP("%GSZERO",91)
P1SETM
^SHP("%GSZERO",92)
P1SETP
^SHP("%GSZERO",93)
P1SETPI
^SHP("%GSZERO",94)
P1TFRA
^SHP("%GSZERO",95)
P1ULAM
^SHP("%GSZERO",96)
PARNL
^SHP("%GSZERO",97)
PARSUG
^SHP("%GSZERO",98)
PARSUGi
^SHP("%GSZERO",99)
PAR
^SHP("%GSZERO",100)
PARi
^SHP("%GSZERO",101)
PARs
^SHP("%GSZERO",102)
PARM
^SHP("%GSZERO",103)
PARMS
^SHP("%GSZERO",104)
PARCAT
^SHP("%GSZERO",105)
PARLKH
^SHP("%GSZERO",106)
PARSHA
^SHP("%GSZERO",107)
PARSLK
^SHP("%GSZERO",108)
PARTA
^SHP("%GSZERO",109)
PATH
^SHP("%GSZERO",110)
PL
^SHP("%GSZERO",111)
PLUK
^SHP("%GSZERO",112)
PLZJ0
^SHP("%GSZERO",113)
PRTBH
^SHP("%GSZERO",114)
PRTNO
^SHP("%GSZERO",115)
RANDOM
^SHP("%GSZERO",116)
SCR
^SHP("%GSZERO",117)
SCRP
^SHP("%GSZERO",118)
SCRL
^SHP("%GSZERO",119)
SHP
^SHP("%GSZERO",120)
SHVA
^SHP("%GSZERO",121)
SPK
^SHP("%GSZERO",122)
SPKi
^SHP("%GSZERO",123)
START
^SHP("%GSZERO",124)
SUGL
^SHP("%GSZERO",125)
SUGLi
^SHP("%GSZERO",126)
SUGS
^SHP("%GSZERO",127)
SUGSi
^SHP("%GSZERO",128)
TABLs
^SHP("%GSZERO",129)
TEL
^SHP("%GSZERO",130)
UCI
^SHP("%GSZERO",131)
UCI0
^SHP("%GSZERO",132)
UCIKL
^SHP("%GSZERO",133)
VECT
^SHP("%GSZERO",134)
VERSION
^SHP("%GSZERO",135)
ZT
^SHP("%GSZERO",136)
ZB
^SHP("%GSZERO",137)
dev
^SHP("%GSZERO",138)
devi
^SHP("%GSZERO",139)
devi1
^SHP("%GSZERO",140)
devi2
^SHP("%GSZERO",141)
devi3
^SHP("%GSZERO",142)
m
^SHP("%GSZERO",143)
msg
^SHP("%GSZERO",144)
rep
^SHP("%GSZERO",145)
word
^SHP("%GSZERO",146)
W4OPT
^SHP("%GSZERO",147)
W4PAY
^SHP("%GSZERO",148)
W4PAYS
^SHP("%GSZERO",149)
W4ASK
^SHP("%GSZERO",150)
W4REP
^SHP("%GSZERO",151)
W4SP
^SHP("%GSZERO",152)
W1REP
^SHP("%GSZERO",153)
W1DICT
^SHP("%GSZERO",154)
WO1VM
^SHP("%GSZERO",155)
FILE
^SHP("%GSZERO",156)
FILE1
^SHP("%GSZERO",157)
P1HZMN
^SHP("%GSZERO","RG")
H
^SHP("%RSIR")

^SHP("%RSIR",1)
P1IR*
^SHP("%RSIR",2)
P1TRM
^SHP("%RSIR",3)
P1MSIMP
^SHP("%RSIR",4)
P1HZTMI
^SHP("%RSIR",5)
P1HZTHI
^SHP("%RSIR",6)
P1HZMI
^SHP("%RSIR",7)
P1SCANER
^SHP("%RSIR",8)
-*0
^SHP("%RSIR",9)

^SHP("%RSIR","RG")
H
^SHP("%RSMGW")

^SHP("%RSMGW",1)
%L1X
^SHP("%RSMGW",2)
%L1WEBHD
^SHP("%RSMGW",3)
%L1ZOS
^SHP("%RSMGW",4)
%L1FRM
^SHP("%RSMGW",5)
%L1RSE
^SHP("%RSMGW",6)
%L1RCE
^SHP("%RSMGW",7)
%L1RSEL
^SHP("%RSMGW",8)
%L1F2G
^SHP("%RSMGW",9)
%S2VIEW
^SHP("%RSMGW",10)
%L1ER
^SHP("%RSMGW","RG")
H
^SHP("%RSP1")

^SHP("%RSP1",1)
*
^SHP("%RSP1",2)
-*0
^SHP("%RSP1",3)
-%*
^SHP("%RSP1",4)
%ET
^SHP("%RSP1",5)
%RSEL
^SHP("%RSP1",6)
%L1*
^SHP("%RSP1",7)
%L2*
^SHP("%RSP1",8)
%L3*
^SHP("%RSP1",9)
%L4*
^SHP("%RSP1",10)
%L5*
^SHP("%RSP1",11)
%S1*
^SHP("%RSP1",12)
%S2*
^SHP("%RSP1",13)
%S3*
^SHP("%RSP1",14)
%S4*
^SHP("%RSP1",15)
%W*
^SHP("%RSP1",16)
%VIDEO
^SHP("%RSP1",17)
%ZMSL
^SHP("%RSP1",18)
%HOSTCMD
^SHP("%RSP1",19)
-TTT*
^SHP("%RSP1",20)
-GEN*
^SHP("%RSP1",21)
-CHK*
^SHP("%RSP1",22)
-LOAD*
^SHP("%RSP1",23)
-MSG
^SHP("%RSP1",24)
-UNLOAD
^SHP("%RSP1",25)
-GTM*
^SHP("%RSP1",26)
-GET*
^SHP("%RSP1",27)
-Z*
^SHP("%RSP1",28)
-p1*
^SHP("%RSP1",29)
-s1*
^SHP("%RSP1",30)
-TK*
^SHP("%RSP1",31)
-P1IR*
^SHP("%RSP1",32)
-P1TRM
^SHP("%RSP1",33)
-P1MSIMP
^SHP("%RSP1",34)
-P1HZTMI
^SHP("%RSP1",35)
-P1HZTHI
^SHP("%RSP1",36)
-P1HZMI
^SHP("%RSP1",37)
-a:zzzz
^SHP("%RSP1",38)
-%W*
^SHP("%RSP1",39)
-%L1WEB*
^SHP("%RSP1",40)
-a:zzzz
^SHP("%RSP1","RG")
H
^SHP("%RSW")

^SHP("%RSW",1)
%W*
^SHP("%RSW",2)
W*
^SHP("%RSW",3)
A2HZGT
^SHP("%RSW",4)
KILLZ
^SHP("%RSW",5)
P1KILLD
^SHP("%RSW",6)
KLASSD
^SHP("%RSW",7)
KLOST
^SHP("%RSW",8)
KLUP
^SHP("%RSW",9)
LEVINIT
^SHP("%RSW",10)
LEVP
^SHP("%RSW",11)
P1CAZIC
^SHP("%RSW",12)
P1REMOTE
^SHP("%RSW",13)
P1SISALL
^SHP("%RSW",14)
P1GTVCH
^SHP("%RSW",15)
P1FZ
^SHP("%RSW",16)
P1NAME
^SHP("%RSW",17)
P1MDP
^SHP("%RSW",18)
P1FGIB
^SHP("%RSW",19)
P1TST
^SHP("%RSW",20)
P1DBREST
^SHP("%RSW",21)
P1MNTR
^SHP("%RSW",22)
P1NEWDAY
^SHP("%RSW",23)
P1PAREX
^SHP("%RSW",24)
P1PC
^SHP("%RSW",25)
P1PCMLZ
^SHP("%RSW",26)
P1PCDOS
^SHP("%RSW",27)
P1PRM*
^SHP("%RSW",28)
INS*
^SHP("%RSW",29)
P1IN
^SHP("%RSW",30)
P1CHL
^SHP("%RSW",31)
P1GS
^SHP("%RSW",32)
P1IR1
^SHP("%RSW",33)
P1SETA
^SHP("%RSW",34)
P1EZR
^SHP("%RSW",35)
P1DHB
^SHP("%RSW",36)
P1KOTD
^SHP("%RSW",37)
P1HODAA
^SHP("%RSW",38)
P1SISDEF
^SHP("%RSW",39)
P1MNSIS
^SHP("%RSW",40)
P1TIPMZ
^SHP("%RSW",41)
P1CUT
^SHP("%RSW",42)
PLUINP
^SHP("%RSW",43)
P1SSM
^SHP("%RSW",44)
P1SIS
^SHP("%RSW",45)
P1SISM
^SHP("%RSW",46)
P1JOB
^SHP("%RSW",47)
%HOSTCMD
^SHP("%RSW",48)
%L1*
^SHP("%RSW",49)
%L2*
^SHP("%RSW",50)
%L3*
^SHP("%RSW",51)
%L4*
^SHP("%RSW",52)
%L5*
^SHP("%RSW",53)
%S1*
^SHP("%RSW",54)
%S2*
^SHP("%RSW",55)
%S3*
^SHP("%RSW",56)
%S4*
^SHP("%RSW",57)
%RD
^SHP("%RSW",58)
%RSEL
^SHP("%RSW",59)
%
^SHP("%RSW",60)
%ZMSL
^SHP("%RSW",61)
%ZCAVJSP
^SHP("%RSW",62)
MJSP
^SHP("%RSW",63)

^SHP("%RSW",64)

^SHP("%RSW","RG")
H
^SHP("BAT")

^SHP("BAT",1)
M
^SHP("BAT",2)
UCIDAT.SH
^SHP("BAT",3)
MLGIB
^SHP("BAT",4)
CRMU
^SHP("BAT","RG")
H
^SHP("CHBA1s")

^SHP("CHBA1s",1)
                     #  dcwtdl zelawdn onefne miwiy zpkd  #                    
^SHP("CHBA1s",2)
                               &07      > cr &05      > -n mikix`z xear dcwtd  
^SHP("CHBA1s",3)
   >&30 miiegc miwiy   >&20 ( mini 5 cr) miiegc miwiy   >&10 mipnefn miwiy  
^SHP("CHBA1s",4)
  ----------------------------------------------------------------------------
^SHP("CHBA1s",5)
  : oniq:   mekq  :  w'yd 'qn  :wpa:sipq: oeaygd 'qn :'qn :  jix`z :  jix`z  : 
^SHP("CHBA1s",6)
  :lehia:         :            :   :    :            :dlaw:   dlaw : oerxtl  : 
^SHP("CHBA1s",7)
  ----------------------------------------------------------------------------
^SHP("CHBA1s",8)
  $TTTTT:999999.99:TTTTTTTTTTTT:TTT:TTTT:TTTTTTTTTTTT:9999:99999999: 99999999:1
^SHP("CHBA1s",9)

^SHP("CHBA1s",10)

^SHP("CHBA1s",11)

^SHP("CHBA1s",12)

^SHP("CHBA1s",13)

^SHP("CHBA1s",14)

^SHP("CHBA1s",15)

^SHP("CHBA1s",16)

^SHP("CHBA1s",17)

^SHP("CHBA1s",18)

^SHP("CHBA1s",19)

^SHP("CHBA1s",20)

^SHP("CHBA1s",21)

^SHP("CHBA1s",22)

^SHP("CHBA1s",23)

^SHP("CHBA1s",24)

^SHP("CHBA1s",25)

^SHP("CHBA1s",26)

^SHP("CHBA1s",27)

^SHP("CHBA1s",28)

^SHP("CHBA1s",29)

^SHP("CHBA1s",30)

^SHP("CHBA1s",31)

^SHP("CHBA1s",32)

^SHP("CHBA1s",33)

^SHP("CHBA1s",34)

^SHP("CHBA1s",35)

^SHP("CHBA1s",36)

^SHP("CHBA1s",37)

^SHP("CHBA1s",38)

^SHP("CHBA1s",39)

^SHP("CHBA1s",40)

^SHP("CHBA1s",41)

^SHP("CHBA1s",42)

^SHP("CHBA1s",43)

^SHP("CHBA1s",44)

^SHP("CHBA1s",45)

^SHP("CHBA1s",46)

^SHP("CHBA1s",47)

^SHP("CHBA1s",48)

^SHP("CHBA1s",49)
                                                                               
^SHP("CHBA1s",50)
                                                                               
^SHP("CHBA1s",51)

^SHP("CHBA1s",52)

^SHP("CHBA1s",53)
                                                                            $ 
^SHP("CHBA1s",54)
  ----------------------------------------------------------------------------
^SHP("CHBA1s",55)
                                                                               
^SHP("CHBA1s",56)
         &40     > : k"dq                                 &35    > : onefn     
^SHP("CHBA1s","RG")
H
^SHP("CHBAs")

^SHP("CHBAs",1)
                      #  dcwtdl miwiy zniyx ly dpkd  #                         
^SHP("CHBAs",2)
                                                                               
^SHP("CHBAs",3)
   &30> miiegc miwiy   &20> ( minei 5 ) miiegc miwiy   &10> mipnefn miwiy    
^SHP("CHBAs",4)
   --------------------------------------------------------------------------
^SHP("CHBAs",5)
   : oniq:  mekq  : w'yd 'qn : wpa : sipq : oeaygd 'qn :   jix`z  :  jix`z  :  
^SHP("CHBAs",6)
   :lehia:        :          :     :      :            :   dlaw   :  oerxtl :  
^SHP("CHBAs",7)
   --------------------------------------------------------------------------
^SHP("CHBAs",8)
   $TTTTT: 9999.99:  99999999:   99:   999:  9999999999:  99999999: 99999999:1
^SHP("CHBAs",9)

^SHP("CHBAs",10)

^SHP("CHBAs",11)

^SHP("CHBAs",12)

^SHP("CHBAs",13)

^SHP("CHBAs",14)
                                                                               
^SHP("CHBAs",15)
                                                                               
^SHP("CHBAs",16)
                                                                               
^SHP("CHBAs",17)
                                                                               
^SHP("CHBAs",18)

^SHP("CHBAs",19)

^SHP("CHBAs",20)

^SHP("CHBAs",21)

^SHP("CHBAs",22)
                                                                               
^SHP("CHBAs",23)
                                                                               
^SHP("CHBAs",24)
                                                                               
^SHP("CHBAs",25)
                                                                               
^SHP("CHBAs",26)
                                                                               
^SHP("CHBAs",27)
                                                                               
^SHP("CHBAs",28)

^SHP("CHBAs",29)

^SHP("CHBAs",30)

^SHP("CHBAs",31)

^SHP("CHBAs",32)

^SHP("CHBAs",33)

^SHP("CHBAs",34)

^SHP("CHBAs",35)

^SHP("CHBAs",36)

^SHP("CHBAs",37)

^SHP("CHBAs",38)

^SHP("CHBAs",39)

^SHP("CHBAs",40)

^SHP("CHBAs",41)

^SHP("CHBAs",42)

^SHP("CHBAs",43)

^SHP("CHBAs",44)
                                                                               
^SHP("CHBAs",45)
                                                                               
^SHP("CHBAs",46)
                                                                               
^SHP("CHBAs",47)
                                                                               
^SHP("CHBAs",48)

^SHP("CHBAs",49)

^SHP("CHBAs",50)

^SHP("CHBAs",51)

^SHP("CHBAs",52)

^SHP("CHBAs",53)
                                                                           $ 
^SHP("CHBAs",54)
   --------------------------------------------------------------------------
^SHP("CHBAs",55)
                                                                               
^SHP("CHBAs",56)
&40     > : k''dq   ( &37    > - zelawn, &36    > - zetewn ) &35    > : onefn  
^SHP("CHBAs","RG")
H
^SHP("DLKHOs")
oyi fwexn zegewl
^SHP("DLKHOs",1)
                         # zegewl g"ec #                                       
^SHP("DLKHOs",1,"%TOP")
25
^SHP("DLKHOs",2)
                 &10     > jix`z cr           &05     > jix`zn                 
^SHP("DLKHOs",2,"%TOP")
17
^SHP("DLKHOs",3)
              &13 : zegewl zveaw cr        &11 : zegewl zveawn                 
^SHP("DLKHOs",3,"%TOP")
14
^SHP("DLKHOs",4)
              &20         > gewl cr        &15        >  gewln                 
^SHP("DLKHOs",4,"%TOP")
14
^SHP("DLKHOs",5)
                                                                               
^SHP("DLKHOs",5,"%TOP")
79
^SHP("DLKHOs",6)
                 &22                                         >                 
^SHP("DLKHOs",6,"%TOP")
17
^SHP("DLKHOs",7)
                 &23                                         >                 
^SHP("DLKHOs",7,"%TOP")
17
^SHP("DLKHOs",8)
    -----------------------------------------------------------------------
^SHP("DLKHOs",8,"%TOP")
4
^SHP("DLKHOs",9)
    :   dxzi   : minelyz :  zeipw  :  dxzi  :      gewl my     : gewl 'qn :    
^SHP("DLKHOs",9,"%TOP")
4
^SHP("DLKHOs",10)
    :  ziteq   :         :         : zncew  :                  :          :    
^SHP("DLKHOs",10,"%TOP")
4
^SHP("DLKHOs",11)
    -----------------------------------------------------------------------
^SHP("DLKHOs",11,"%TOP")
4
^SHP("DLKHOs",12)
    $999999.99:999999.99:999999.99:999999.99:TTTTTTTTTTTTTTTTTT:9999999999:1
^SHP("DLKHOs",12,"%TOP")
4
^SHP("DLKHOs",13)

^SHP("DLKHOs",13,"%TOP")
0
^SHP("DLKHOs",14)

^SHP("DLKHOs",14,"%TOP")
0
^SHP("DLKHOs",15)

^SHP("DLKHOs",15,"%TOP")
0
^SHP("DLKHOs",16)

^SHP("DLKHOs",16,"%TOP")
0
^SHP("DLKHOs",17)

^SHP("DLKHOs",17,"%TOP")
0
^SHP("DLKHOs",18)

^SHP("DLKHOs",18,"%TOP")
0
^SHP("DLKHOs",19)

^SHP("DLKHOs",19,"%TOP")
0
^SHP("DLKHOs",20)

^SHP("DLKHOs",20,"%TOP")
0
^SHP("DLKHOs",21)

^SHP("DLKHOs",21,"%TOP")
0
^SHP("DLKHOs",22)

^SHP("DLKHOs",22,"%TOP")
0
^SHP("DLKHOs",23)

^SHP("DLKHOs",23,"%TOP")
0
^SHP("DLKHOs",24)

^SHP("DLKHOs",24,"%TOP")
0
^SHP("DLKHOs",25)

^SHP("DLKHOs",25,"%TOP")
0
^SHP("DLKHOs",26)

^SHP("DLKHOs",26,"%TOP")
0
^SHP("DLKHOs",27)

^SHP("DLKHOs",27,"%TOP")
0
^SHP("DLKHOs",28)

^SHP("DLKHOs",28,"%TOP")
0
^SHP("DLKHOs",29)

^SHP("DLKHOs",29,"%TOP")
0
^SHP("DLKHOs",30)

^SHP("DLKHOs",30,"%TOP")
0
^SHP("DLKHOs",31)

^SHP("DLKHOs",31,"%TOP")
0
^SHP("DLKHOs",32)

^SHP("DLKHOs",32,"%TOP")
0
^SHP("DLKHOs",33)

^SHP("DLKHOs",33,"%TOP")
0
^SHP("DLKHOs",34)

^SHP("DLKHOs",34,"%TOP")
0
^SHP("DLKHOs",35)

^SHP("DLKHOs",35,"%TOP")
0
^SHP("DLKHOs",36)

^SHP("DLKHOs",36,"%TOP")
0
^SHP("DLKHOs",37)

^SHP("DLKHOs",37,"%TOP")
0
^SHP("DLKHOs",38)

^SHP("DLKHOs",38,"%TOP")
0
^SHP("DLKHOs",39)

^SHP("DLKHOs",39,"%TOP")
0
^SHP("DLKHOs",40)

^SHP("DLKHOs",40,"%TOP")
0
^SHP("DLKHOs",41)

^SHP("DLKHOs",41,"%TOP")
0
^SHP("DLKHOs",42)

^SHP("DLKHOs",42,"%TOP")
0
^SHP("DLKHOs",43)

^SHP("DLKHOs",43,"%TOP")
0
^SHP("DLKHOs",44)

^SHP("DLKHOs",44,"%TOP")
0
^SHP("DLKHOs",45)

^SHP("DLKHOs",45,"%TOP")
0
^SHP("DLKHOs",46)

^SHP("DLKHOs",46,"%TOP")
0
^SHP("DLKHOs",47)

^SHP("DLKHOs",47,"%TOP")
0
^SHP("DLKHOs",48)

^SHP("DLKHOs",48,"%TOP")
0
^SHP("DLKHOs",49)

^SHP("DLKHOs",49,"%TOP")
0
^SHP("DLKHOs",50)

^SHP("DLKHOs",50,"%TOP")
0
^SHP("DLKHOs",51)
                                                                               
^SHP("DLKHOs",51,"%TOP")
79
^SHP("DLKHOs",52)

^SHP("DLKHOs",52,"%TOP")
0
^SHP("DLKHOs",53)

^SHP("DLKHOs",53,"%TOP")
0
^SHP("DLKHOs",54)
                                                                         $ 
^SHP("DLKHOs",54,"%TOP")
73
^SHP("DLKHOs",55)
    -----------------------------------------------------------------------
^SHP("DLKHOs",55,"%TOP")
4
^SHP("DLKHOs",56)
    :&40       :&35      :&30      :&25     : k"dq             :          :    
^SHP("DLKHOs",56,"%TOP")
4
^SHP("DLKHOs",57)
    -----------------------------------------------------------------------    
^SHP("DLKHOs",57,"%TOP")
4
^SHP("DLKHOs",58)
                                                                               
^SHP("DLKHOs",58,"%TOP")
79
^SHP("DLKHOs","RG")
H
^SHP("DLKHs")
fkexn zegewl i"ec
^SHP("DLKHs",1)
                         # zegewl g"ec #                                       
^SHP("DLKHs",1,"%TOP")
25
^SHP("DLKHs",2)
                 &10     > jix`z cr           &05     > jix`zn                 
^SHP("DLKHs",2,"%TOP")
17
^SHP("DLKHs",3)
              &13 : zegewl zveaw cr        &11 : zegewl zveawn                 
^SHP("DLKHs",3,"%TOP")
14
^SHP("DLKHs",4)
              &20         > gewl cr        &15        >  gewln                 
^SHP("DLKHs",4,"%TOP")
14
^SHP("DLKHs",5)
                                                                               
^SHP("DLKHs",5,"%TOP")
79
^SHP("DLKHs",6)
                 &22                                         >                 
^SHP("DLKHs",6,"%TOP")
17
^SHP("DLKHs",7)
                 &23                                         >                 
^SHP("DLKHs",7,"%TOP")
17
^SHP("DLKHs",8)
    -----------------------------------------------------------------------
^SHP("DLKHs",8,"%TOP")
4
^SHP("DLKHs",9)
    :   dxzi   : minelyz :  zeipw  :zeipeayg:      gewl my     : gewl 'qn :    
^SHP("DLKHs",9,"%TOP")
4
^SHP("DLKHs",10)
    :  ziteq   :         :         :  zeipci:                  :          :    
^SHP("DLKHs",10,"%TOP")
4
^SHP("DLKHs",11)
    -----------------------------------------------------------------------
^SHP("DLKHs",11,"%TOP")
4
^SHP("DLKHs",12)
    $999999.99:999999.99:999999.99:999999.99:TTTTTTTTTTTTTTTTTT:9999999999:1
^SHP("DLKHs",12,"%TOP")
4
^SHP("DLKHs",13)

^SHP("DLKHs",13,"%TOP")
0
^SHP("DLKHs",14)

^SHP("DLKHs",14,"%TOP")
0
^SHP("DLKHs",15)

^SHP("DLKHs",15,"%TOP")
0
^SHP("DLKHs",16)

^SHP("DLKHs",16,"%TOP")
0
^SHP("DLKHs",17)

^SHP("DLKHs",17,"%TOP")
0
^SHP("DLKHs",18)

^SHP("DLKHs",18,"%TOP")
0
^SHP("DLKHs",19)

^SHP("DLKHs",19,"%TOP")
0
^SHP("DLKHs",20)

^SHP("DLKHs",20,"%TOP")
0
^SHP("DLKHs",21)

^SHP("DLKHs",21,"%TOP")
0
^SHP("DLKHs",22)

^SHP("DLKHs",22,"%TOP")
0
^SHP("DLKHs",23)

^SHP("DLKHs",23,"%TOP")
0
^SHP("DLKHs",24)

^SHP("DLKHs",24,"%TOP")
0
^SHP("DLKHs",25)

^SHP("DLKHs",25,"%TOP")
0
^SHP("DLKHs",26)

^SHP("DLKHs",26,"%TOP")
0
^SHP("DLKHs",27)

^SHP("DLKHs",27,"%TOP")
0
^SHP("DLKHs",28)

^SHP("DLKHs",28,"%TOP")
0
^SHP("DLKHs",29)

^SHP("DLKHs",29,"%TOP")
0
^SHP("DLKHs",30)

^SHP("DLKHs",30,"%TOP")
0
^SHP("DLKHs",31)

^SHP("DLKHs",31,"%TOP")
0
^SHP("DLKHs",32)

^SHP("DLKHs",32,"%TOP")
0
^SHP("DLKHs",33)

^SHP("DLKHs",33,"%TOP")
0
^SHP("DLKHs",34)

^SHP("DLKHs",34,"%TOP")
0
^SHP("DLKHs",35)

^SHP("DLKHs",35,"%TOP")
0
^SHP("DLKHs",36)

^SHP("DLKHs",36,"%TOP")
0
^SHP("DLKHs",37)

^SHP("DLKHs",37,"%TOP")
0
^SHP("DLKHs",38)

^SHP("DLKHs",38,"%TOP")
0
^SHP("DLKHs",39)

^SHP("DLKHs",39,"%TOP")
0
^SHP("DLKHs",40)

^SHP("DLKHs",40,"%TOP")
0
^SHP("DLKHs",41)

^SHP("DLKHs",41,"%TOP")
0
^SHP("DLKHs",42)

^SHP("DLKHs",42,"%TOP")
0
^SHP("DLKHs",43)

^SHP("DLKHs",43,"%TOP")
0
^SHP("DLKHs",44)

^SHP("DLKHs",44,"%TOP")
0
^SHP("DLKHs",45)

^SHP("DLKHs",45,"%TOP")
0
^SHP("DLKHs",46)

^SHP("DLKHs",46,"%TOP")
0
^SHP("DLKHs",47)

^SHP("DLKHs",47,"%TOP")
0
^SHP("DLKHs",48)

^SHP("DLKHs",48,"%TOP")
0
^SHP("DLKHs",49)

^SHP("DLKHs",49,"%TOP")
0
^SHP("DLKHs",50)

^SHP("DLKHs",50,"%TOP")
0
^SHP("DLKHs",51)
                                                                               
^SHP("DLKHs",51,"%TOP")
79
^SHP("DLKHs",52)

^SHP("DLKHs",52,"%TOP")
0
^SHP("DLKHs",53)

^SHP("DLKHs",53,"%TOP")
0
^SHP("DLKHs",54)
                                                                         $ 
^SHP("DLKHs",54,"%TOP")
73
^SHP("DLKHs",55)
    -----------------------------------------------------------------------
^SHP("DLKHs",55,"%TOP")
4
^SHP("DLKHs",56)
    :&40      >:&35     >:&30     >:&25    >: k"dq             :          :    
^SHP("DLKHs",56,"%TOP")
4
^SHP("DLKHs",57)
    -----------------------------------------------------------------------    
^SHP("DLKHs",57,"%TOP")
4
^SHP("DLKHs",58)
                                                                               
^SHP("DLKHs",58,"%TOP")
79
^SHP("DLKHs","RG")
H
^SHP("DLVLK",1)
                       [ &01                > jix`z itl ]                      
^SHP("DLVLK",1,"%TOP")
23
^SHP("DLVLK","RG")
H
^SHP("DPMH",1)
                                                                               
^SHP("DPMH",1,"%TOP")
79
^SHP("DPMH",2)
                 &05   : mihixtd epnfedy zepgleya micreq 'qn                   
^SHP("DPMH",2,"%TOP")
17
^SHP("DPMH","P5")
6
^SHP("HMKDFLTv")

^SHP("HMKDFLTv",1)
                                         #{04               }#                 
^SHP("HMKDFLTv",2)
                                                {02                          } 
^SHP("HMKDFLTv",3)
                                                          {71        } :   'lh 
^SHP("HMKDFLTv",4)
                                         {74                         } : l"`ec 
^SHP("HMKDFLTv",5)
                                                      {77        }  dyxen wqer 
^SHP("HMKDFLTv",6)
                                                                               
^SHP("HMKDFLTv",7)
                                        #{78       }#                          
^SHP("HMKDFLTv",8)
                                               #{01            }#              
^SHP("HMKDFLTv",9)
                                               #{03    }#                      
^SHP("HMKDFLTv",10)
                                           {05               } :     dqtcd onf 
^SHP("HMKDFLTv",11)
                                           {06               } : xewn zwtd onf 
^SHP("HMKDFLTv","RG")
H
^SHP("HMKFOOTv")

^SHP("HMKFOOTv",1)
                                           {10     }  :      k"dq              
^SHP("HMKFOOTv",1,"%TOP")
43
^SHP("HMKFOOTv",2)
                                           {12     }  : &11% dgpd              
^SHP("HMKFOOTv",2,"%TOP")
43
^SHP("HMKFOOTv",3)
                                           {13     }  :  g"y dgpd              
^SHP("HMKFOOTv",3,"%TOP")
43
^SHP("HMKFOOTv",4)
                                           {14     }  : gelyn inc              
^SHP("HMKFOOTv",4,"%TOP")
43
^SHP("HMKFOOTv",5)
                                           {15     }  : lebir                  
^SHP("HMKFOOTv",5,"%TOP")
43
^SHP("HMKFOOTv",6)
                                           {16     }  : n"rn iptl              
^SHP("HMKFOOTv",6,"%TOP")
43
^SHP("HMKFOOTv",7)
                                           {18     }  :      n"rn              
^SHP("HMKFOOTv",7,"%TOP")
43
^SHP("HMKFOOTv",8)
                                          #{19     }# : n"rn llek              
^SHP("HMKFOOTv",8,"%TOP")
42
^SHP("HMKFOOTv",9)
                                                                               
^SHP("HMKFOOTv",9,"%TOP")
79
^SHP("HMKFOOTv",10)
                                                                               
^SHP("HMKFOOTv",10,"%TOP")
79
^SHP("HMKFOOTv",11)
                                                                               
^SHP("HMKFOOTv",11,"%TOP")
79
^SHP("HMKFOOTv",12)
                                                                               
^SHP("HMKFOOTv",12,"%TOP")
79
^SHP("HMKFOOTv","RG")
H
^SHP("HMKv")
dlaw qn 'ayg
^SHP("HMKv",1)
                                        {04                                 }  
^SHP("HMKv",1,"%TOP")
40
^SHP("HMKv",2)
                                               {02                          }  
^SHP("HMKv",2,"%TOP")
47
^SHP("HMKv",3)
                                                         {71        } :   'lh  
^SHP("HMKv",3,"%TOP")
57
^SHP("HMKv",4)
                                        {74                         } : l"`ec  
^SHP("HMKv",4,"%TOP")
40
^SHP("HMKv",5)
                                        {76                         } :  xz`d  
^SHP("HMKv",5,"%TOP")
40
^SHP("HMKv",6)
                                                     {77        }  dyxen wqer  
^SHP("HMKv",6,"%TOP")
53
^SHP("HMKv",7)
                                                                               
^SHP("HMKv",7,"%TOP")
79
^SHP("HMKv",8)
                                         #{78   }#                             
^SHP("HMKv",8,"%TOP")
41
^SHP("HMKv",9)
                                           #{01             }#                 
^SHP("HMKv",9,"%TOP")
43
^SHP("HMKv",10)
                                           #{03   } 'qn#                       
^SHP("HMKv",10,"%TOP")
43
^SHP("HMKv",11)
                                                                               
^SHP("HMKv",11,"%TOP")
79
^SHP("HMKv",12)
                                           {05               } :     dqtcd onf 
^SHP("HMKv",12,"%TOP")
43
^SHP("HMKv",13)
                                           {06               } : xewn zwtd onf 
^SHP("HMKv",13,"%TOP")
43
^SHP("HMKv",14)
                                                                               
^SHP("HMKv",14,"%TOP")
79
^SHP("HMKv",15)
                                                                         ceakl 
^SHP("HMKv",15,"%TOP")
73
^SHP("HMKv",16)
                                                  {08                        } 
^SHP("HMKv",16,"%TOP")
50
^SHP("HMKv",17)
                                                  {73                        } 
^SHP("HMKv",17,"%TOP")
50
^SHP("HMKv",18)
                                                         {75           } : 'lh 
^SHP("HMKv",18,"%TOP")
57
^SHP("HMKv",19)
                                                                               
^SHP("HMKv",19,"%TOP")
79
^SHP("HMKv",20)
                                              #{07       }# gewl xtqn          
^SHP("HMKv",20,"%TOP")
46
^SHP("HMKv","RG")
H
^SHP("JOMANs")
zeyibt onei
^SHP("JOMANs",1)
                                                                               
^SHP("JOMANs",2)
                                         &10 > mei   &05     >: jix`z          
^SHP("JOMANs",3)
    ----------------------------------------------------------------------
^SHP("JOMANs",4)
    :                                      okez                    : dry :     
^SHP("JOMANs",5)
    ----------------------------------------------------------------------
^SHP("JOMANs",6)
    $TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT:99999:1
^SHP("JOMANs",7)

^SHP("JOMANs",8)

^SHP("JOMANs",9)

^SHP("JOMANs",10)

^SHP("JOMANs",11)

^SHP("JOMANs",12)

^SHP("JOMANs",13)

^SHP("JOMANs",14)

^SHP("JOMANs",15)

^SHP("JOMANs",16)

^SHP("JOMANs",17)

^SHP("JOMANs",18)

^SHP("JOMANs",19)

^SHP("JOMANs",20)

^SHP("JOMANs",21)

^SHP("JOMANs",22)

^SHP("JOMANs",23)

^SHP("JOMANs",24)

^SHP("JOMANs",25)

^SHP("JOMANs",26)

^SHP("JOMANs",27)

^SHP("JOMANs",28)

^SHP("JOMANs",29)

^SHP("JOMANs",30)

^SHP("JOMANs",31)

^SHP("JOMANs",32)

^SHP("JOMANs",33)

^SHP("JOMANs",34)

^SHP("JOMANs",35)

^SHP("JOMANs",36)

^SHP("JOMANs",37)

^SHP("JOMANs",38)

^SHP("JOMANs",39)

^SHP("JOMANs",40)

^SHP("JOMANs",41)

^SHP("JOMANs",42)

^SHP("JOMANs",43)

^SHP("JOMANs",44)

^SHP("JOMANs",45)

^SHP("JOMANs",46)

^SHP("JOMANs",47)

^SHP("JOMANs",48)

^SHP("JOMANs",49)

^SHP("JOMANs",50)

^SHP("JOMANs",51)

^SHP("JOMANs",52)

^SHP("JOMANs",53)
                                                                        $ 
^SHP("JOMANs",54)
    ----------------------------------------------------------------------
^SHP("JOMANs",55)
                                                                               
^SHP("JOMANs","RG")
H
^SHP("KLAS3")
DOH HAJAVIM
^SHP("KLAS3",1)
                  #&01     #    # miaiig  g"ec #
^SHP("KLAS3",1,"%TOP")
18
^SHP("KLAS3",2)
                                                                               
^SHP("KLAS3",2,"%TOP")
79
^SHP("KLAS3",3)
 &98  > sc        &03       : dqtcd jix`z     &02           : oein beq
^SHP("KLAS3",3,"%TOP")
1
^SHP("KLAS3",4)
                                         &05        > itl aeg aeyig            
^SHP("KLAS3",4,"%TOP")
41
^SHP("KLAS3",5)
 ----------------------------------------------------------------------------- 
^SHP("KLAS3",5,"%TOP")
1
^SHP("KLAS3",6)
 :   aeg   :  mliy :    oetlh     :      zaezk     :      my      : gewl 'qn : 
^SHP("KLAS3",6,"%TOP")
1
^SHP("KLAS3",7)
 : (ycegn) :  ycega:              :                :              :&04       : 
^SHP("KLAS3",7,"%TOP")
1
^SHP("KLAS3",8)
 ----------------------------------------------------------------------------- 
^SHP("KLAS3",8,"%TOP")
1
^SHP("KLAS3",9)
 $ TP      :99999.9:       TP     :    TP          :         TP   :     TP   :1
^SHP("KLAS3",9,"%TOP")
1
^SHP("KLAS3",10)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS3",10,"%TOP")
1
^SHP("KLAS3",11)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS3",11,"%TOP")
1
^SHP("KLAS3",12)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS3",12,"%TOP")
1
^SHP("KLAS3",13)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS3",13,"%TOP")
1
^SHP("KLAS3",14)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS3",14,"%TOP")
1
^SHP("KLAS3",15)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS3",15,"%TOP")
1
^SHP("KLAS3",16)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS3",16,"%TOP")
1
^SHP("KLAS3",17)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS3",17,"%TOP")
1
^SHP("KLAS3",18)
 :           :      :    :   :                        :             :        : 
^SHP("KLAS3",18,"%TOP")
1
^SHP("KLAS3",19)
 :           :      :    :   :                        :             :        : 
^SHP("KLAS3",19,"%TOP")
1
^SHP("KLAS3",20)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS3",20,"%TOP")
1
^SHP("KLAS3",21)
 :           :      :    :   :                        :             :       $: 
^SHP("KLAS3",21,"%TOP")
1
^SHP("KLAS3",22)
 ----------------------------------------------------------------------------- 
^SHP("KLAS3",22,"%TOP")
1
^SHP("KLAS3",23)

^SHP("KLAS3",23,"%TOP")
0
^SHP("KLAS3",24)
  &11        : k"dq
^SHP("KLAS3",24,"%TOP")
2
^SHP("KLAS3",25)
                                                                               
^SHP("KLAS3",25,"%TOP")
79
^SHP("KLAS3",26)
                                                                               
^SHP("KLAS3",26,"%TOP")
79
^SHP("KLAS3",27)
                                                                               
^SHP("KLAS3",27,"%TOP")
79
^SHP("KLAS3",28)
                                                                               
^SHP("KLAS3",28,"%TOP")
79
^SHP("KLAS3",29)
                                                                               
^SHP("KLAS3",29,"%TOP")
79
^SHP("KLAS3",30)
                                                                               
^SHP("KLAS3",30,"%TOP")
79
^SHP("KLAS3","RG")
H
^SHP("KLAS32")
OH HAJAVIM (PRINTER)
^SHP("KLAS32",1)
          #&01     > -l  miaiig  g"ec #
^SHP("KLAS32",1,"%TOP")
10
^SHP("KLAS32",2)
   &98 > sc
^SHP("KLAS32",2,"%TOP")
3
^SHP("KLAS32",3)
                                                  &02           : oein beq
^SHP("KLAS32",3,"%TOP")
50
^SHP("KLAS32",4)
   &03       > dqtcd jix`z                &05              > itl aeg aeyig
^SHP("KLAS32",4,"%TOP")
3
^SHP("KLAS32",5)
 ----------------------------------------------------------------------------- 
^SHP("KLAS32",5,"%TOP")
1
^SHP("KLAS32",6)
 :  aeg   :mliy dnk:    oetlh    :      zaezk     :      my       : gewl 'qn : 
^SHP("KLAS32",6,"%TOP")
1
^SHP("KLAS32",7)
 : (ycegn):   ycega:             :                :               :          : 
^SHP("KLAS32",7,"%TOP")
1
^SHP("KLAS32",8)
 ----------------------------------------------------------------------------- 
^SHP("KLAS32",8,"%TOP")
1
^SHP("KLAS32",9)
 $TP      :99999.99:      TP     :    TP          :       TP      :TTTTTTTTTT:1
^SHP("KLAS32",9,"%TOP")
1
^SHP("KLAS32",10)
 :                 :     :      :                     :             :        : 
^SHP("KLAS32",10,"%TOP")
1
^SHP("KLAS32",11)
 :                 :     :      :                     :             :        : 
^SHP("KLAS32",11,"%TOP")
1
^SHP("KLAS32",12)
 :                 :     :      :                     :             :        : 
^SHP("KLAS32",12,"%TOP")
1
^SHP("KLAS32",13)
 :                 :     :      :                     :             :        : 
^SHP("KLAS32",13,"%TOP")
1
^SHP("KLAS32",14)
 :                 :     :      :                     :             :        : 
^SHP("KLAS32",14,"%TOP")
1
^SHP("KLAS32",15)
 :                 :     :      :                     :             :        : 
^SHP("KLAS32",15,"%TOP")
1
^SHP("KLAS32",16)
 :                 :     :   :                        :             :        : 
^SHP("KLAS32",16,"%TOP")
1
^SHP("KLAS32",17)
 :                 :     :   :                        :             :        : 
^SHP("KLAS32",17,"%TOP")
1
^SHP("KLAS32",18)
 :                 :     :      :                     :             :        : 
^SHP("KLAS32",18,"%TOP")
1
^SHP("KLAS32",19)
 :                 :     :      :                     :             :        : 
^SHP("KLAS32",19,"%TOP")
1
^SHP("KLAS32",20)
 :                 :     :   :                        :             :        : 
^SHP("KLAS32",20,"%TOP")
1
^SHP("KLAS32",21)
 :                 :     :      :                     :             :        : 
^SHP("KLAS32",21,"%TOP")
1
^SHP("KLAS32",22)
 :                 :     :   :                        :             :        : 
^SHP("KLAS32",22,"%TOP")
1
^SHP("KLAS32",23)
 :            :      :     :   :                        :             :      : 
^SHP("KLAS32",23,"%TOP")
1
^SHP("KLAS32",24)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS32",24,"%TOP")
1
^SHP("KLAS32",25)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS32",25,"%TOP")
1
^SHP("KLAS32",26)
 :            :      :     :   :                        :             :      : 
^SHP("KLAS32",26,"%TOP")
1
^SHP("KLAS32",27)
 :            :      :     :   :                        :             :      : 
^SHP("KLAS32",27,"%TOP")
1
^SHP("KLAS32",28)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS32",28,"%TOP")
1
^SHP("KLAS32",29)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS32",29,"%TOP")
1
^SHP("KLAS32",30)
 :            :      :     :   :                        :             :      : 
^SHP("KLAS32",30,"%TOP")
1
^SHP("KLAS32",31)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS32",31,"%TOP")
1
^SHP("KLAS32",32)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS32",32,"%TOP")
1
^SHP("KLAS32",33)
 :            :      :     :   :                        :             :      : 
^SHP("KLAS32",33,"%TOP")
1
^SHP("KLAS32",34)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS32",34,"%TOP")
1
^SHP("KLAS32",35)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS32",35,"%TOP")
1
^SHP("KLAS32",36)
 :           :       :     :   :                        :             :      : 
^SHP("KLAS32",36,"%TOP")
1
^SHP("KLAS32",37)
 :            :      :     :   :                        :             :      : 
^SHP("KLAS32",37,"%TOP")
1
^SHP("KLAS32",38)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS32",38,"%TOP")
1
^SHP("KLAS32",39)
 :            :     :      :      :                     :             :      : 
^SHP("KLAS32",39,"%TOP")
1
^SHP("KLAS32",40)
 :            :     :      :      :                     :             :      : 
^SHP("KLAS32",40,"%TOP")
1
^SHP("KLAS32",41)
 :            :     :      :      :                     :             :      : 
^SHP("KLAS32",41,"%TOP")
1
^SHP("KLAS32",42)
 :            :     :      :   :                        :             :      : 
^SHP("KLAS32",42,"%TOP")
1
^SHP("KLAS32",43)
 :            :     :      :   :                        :             :      : 
^SHP("KLAS32",43,"%TOP")
1
^SHP("KLAS32",44)
                                                                               
^SHP("KLAS32",44,"%TOP")
79
^SHP("KLAS32",45)
                                                                               
^SHP("KLAS32",45,"%TOP")
79
^SHP("KLAS32",46)
                                                                               
^SHP("KLAS32",46,"%TOP")
79
^SHP("KLAS32",47)
 :            :     :      :      :                     :             :      : 
^SHP("KLAS32",47,"%TOP")
1
^SHP("KLAS32",48)
 :            :     :      :      :                     :             :      : 
^SHP("KLAS32",48,"%TOP")
1
^SHP("KLAS32",49)
                                                                               
^SHP("KLAS32",49,"%TOP")
79
^SHP("KLAS32",50)
                                                                               
^SHP("KLAS32",50,"%TOP")
79
^SHP("KLAS32",51)
 :            :     :      :   :                        :             :      : 
^SHP("KLAS32",51,"%TOP")
1
^SHP("KLAS32",52)
                                                                               
^SHP("KLAS32",52,"%TOP")
79
^SHP("KLAS32",53)
 :            :     :      :   :                        :             :     $: 
^SHP("KLAS32",53,"%TOP")
1
^SHP("KLAS32",54)
 ----------------------------------------------------------------------------- 
^SHP("KLAS32",54,"%TOP")
1
^SHP("KLAS32",55)
 &11       >  : k"dq                                                           
^SHP("KLAS32",55,"%TOP")
1
^SHP("KLAS32",56)
                                                                               
^SHP("KLAS32",56,"%TOP")
79
^SHP("KLAS32","RG")
H
^SHP("KLAS4")
mixebq zegewl g"ec
^SHP("KLAS4",1)
                                                                               
^SHP("KLAS4",1,"%TOP")
79
^SHP("KLAS4",2)
        #&01     #  cegi` zgz mi`vnp e` mixebq zegewl  g"ec  
^SHP("KLAS4",2,"%TOP")
8
^SHP("KLAS4",3)
                                                                               
^SHP("KLAS4",3,"%TOP")
79
^SHP("KLAS4",4)
 &98  > sc           &03       : dqtcd jix`z     &02           : oein beq
^SHP("KLAS4",4,"%TOP")
1
^SHP("KLAS4",5)
                                               &05        > itl aeg aeyig      
^SHP("KLAS4",5,"%TOP")
47
^SHP("KLAS4",6)
 ----------------------------------------------------------------------------- 
^SHP("KLAS4",6,"%TOP")
1
^SHP("KLAS4",7)
 :    aeg   :   / avn  :    oetlh   :     zaezk    :      my      : gewl 'qn : 
^SHP("KLAS4",7,"%TOP")
1
^SHP("KLAS4",8)
 :  (ycegn) :iy`x gewl :            :              :              :&04       : 
^SHP("KLAS4",8,"%TOP")
1
^SHP("KLAS4",9)
 ----------------------------------------------------------------------------- 
^SHP("KLAS4",9,"%TOP")
1
^SHP("KLAS4",10)
 $ TP       :TTTTTTTTTT:     TP     :    TP        :         TP   :     TP   :1
^SHP("KLAS4",10,"%TOP")
1
^SHP("KLAS4",11)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS4",11,"%TOP")
1
^SHP("KLAS4",12)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS4",12,"%TOP")
1
^SHP("KLAS4",13)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS4",13,"%TOP")
1
^SHP("KLAS4",14)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS4",14,"%TOP")
1
^SHP("KLAS4",15)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS4",15,"%TOP")
1
^SHP("KLAS4",16)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS4",16,"%TOP")
1
^SHP("KLAS4",17)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS4",17,"%TOP")
1
^SHP("KLAS4",18)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS4",18,"%TOP")
1
^SHP("KLAS4",19)
 :           :      :    :   :                        :             :        : 
^SHP("KLAS4",19,"%TOP")
1
^SHP("KLAS4",20)
 :           :      :    :   :                        :             :        : 
^SHP("KLAS4",20,"%TOP")
1
^SHP("KLAS4",21)
 :           :      :    :      :                     :             :        : 
^SHP("KLAS4",21,"%TOP")
1
^SHP("KLAS4",22)
 :           :      :    :   :                        :             :       $: 
^SHP("KLAS4",22,"%TOP")
1
^SHP("KLAS4",23)
 ----------------------------------------------------------------------------- 
^SHP("KLAS4",23,"%TOP")
1
^SHP("KLAS4",24)

^SHP("KLAS4",24,"%TOP")
0
^SHP("KLAS4",25)
  &11        : k"dq
^SHP("KLAS4",25,"%TOP")
2
^SHP("KLAS4",26)
                                                                               
^SHP("KLAS4",26,"%TOP")
79
^SHP("KLAS4",27)
                                                                               
^SHP("KLAS4",27,"%TOP")
79
^SHP("KLAS4",28)
                                                                               
^SHP("KLAS4",28,"%TOP")
79
^SHP("KLAS4",29)
                                                                               
^SHP("KLAS4",29,"%TOP")
79
^SHP("KLAS4",30)
                                                                               
^SHP("KLAS4",30,"%TOP")
79
^SHP("KLAS4",31)
                                                                               
^SHP("KLAS4",31,"%TOP")
79
^SHP("KLAS4","RG")
H
^SHP("KLAS42")
mixebq zegewl g"ec
^SHP("KLAS42",1)
          #&01     ># cegi` zgz mi`vnp e` mixebq zegewl  g"ec
^SHP("KLAS42",2)
   &98 > sc
^SHP("KLAS42",3)
                                                  &02           : oein beq
^SHP("KLAS42",4)
   &03       > dqtcd jix`z                &05              > itl aeg aeyig
^SHP("KLAS42",5)
 ----------------------------------------------------------------------------- 
^SHP("KLAS42",6)
 :   aeg  :     / avn :   oetlh    :     zaezk    :      my       : gewl 'qn : 
^SHP("KLAS42",7)
 : (ycegn): iy`x gewl :            :              :               :          : 
^SHP("KLAS42",8)
 ----------------------------------------------------------------------------- 
^SHP("KLAS42",9)
 $TP      :TTTTTTTTTTT:     TP     :    TP        :       TP      :TTTTTTTTTT:1
^SHP("KLAS42",10)
 :                 :     :      :                     :             :        : 
^SHP("KLAS42",11)
 :                 :     :      :                     :             :        : 
^SHP("KLAS42",12)
 :                 :     :      :                     :             :        : 
^SHP("KLAS42",13)
 :                 :     :      :                     :             :        : 
^SHP("KLAS42",14)
 :                 :     :      :                     :             :        : 
^SHP("KLAS42",15)
 :                 :     :      :                     :             :        : 
^SHP("KLAS42",16)
 :                 :     :   :                        :             :        : 
^SHP("KLAS42",17)
 :                 :     :   :                        :             :        : 
^SHP("KLAS42",18)
 :                 :     :      :                     :             :        : 
^SHP("KLAS42",19)
 :                 :     :      :                     :             :        : 
^SHP("KLAS42",20)
 :                 :     :   :                        :             :        : 
^SHP("KLAS42",21)
 :                 :     :      :                     :             :        : 
^SHP("KLAS42",22)
 :                 :     :   :                        :             :        : 
^SHP("KLAS42",23)
 :            :      :     :   :                        :             :      : 
^SHP("KLAS42",24)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS42",25)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS42",26)
 :            :      :     :   :                        :             :      : 
^SHP("KLAS42",27)
 :            :      :     :   :                        :             :      : 
^SHP("KLAS42",28)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS42",29)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS42",30)
 :            :      :     :   :                        :             :      : 
^SHP("KLAS42",31)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS42",32)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS42",33)
 :            :      :     :   :                        :             :      : 
^SHP("KLAS42",34)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS42",35)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS42",36)
 :           :       :     :   :                        :             :      : 
^SHP("KLAS42",37)
 :            :      :     :   :                        :             :      : 
^SHP("KLAS42",38)
 :            :      :     :      :                     :             :      : 
^SHP("KLAS42",39)
 :            :     :      :      :                     :             :      : 
^SHP("KLAS42",40)
 :            :     :      :      :                     :             :      : 
^SHP("KLAS42",41)
 :            :     :      :      :                     :             :      : 
^SHP("KLAS42",42)
 :            :     :      :   :                        :             :      : 
^SHP("KLAS42",43)
 :            :     :      :   :                        :             :      : 
^SHP("KLAS42",44)
                                                                               
^SHP("KLAS42",45)
                                                                               
^SHP("KLAS42",46)
                                                                               
^SHP("KLAS42",47)
 :            :     :      :      :                     :             :      : 
^SHP("KLAS42",48)
 :            :     :      :      :                     :             :      : 
^SHP("KLAS42",49)
                                                                               
^SHP("KLAS42",50)
                                                                               
^SHP("KLAS42",51)
 :            :     :      :   :                        :             :      : 
^SHP("KLAS42",52)
                                                                               
^SHP("KLAS42",53)
 :            :     :      :   :                        :             :     $: 
^SHP("KLAS42",54)
 ----------------------------------------------------------------------------- 
^SHP("KLAS42",55)
 &11       >  : k"dq                                                           
^SHP("KLAS42",56)
                                                                               
^SHP("KLAS42","RG")
H
^SHP("KLINC1s")
dxv .tcnl dlaw
^SHP("KLINC1s",1)
                                        &01                                 >  
^SHP("KLINC1s",2)
                                               &02                          >  
^SHP("KLINC1s",3)
                                                            &71        > : lh  
^SHP("KLINC1s",4)
                                                     &77        >  dyxen wqer  
^SHP("KLINC1s",5)
                                                                               
^SHP("KLINC1s",6)
                                            #&78    #                          
^SHP("KLINC1s",7)
                                            #&03   > 'qn dlaw#                 
^SHP("KLINC1s",8)
                                                             &05     > : jix`z 
^SHP("KLINC1s",9)
                                        &08                       > :z`n lawzp 
^SHP("KLINC1s",10)
                                                      #&07       ># : gewl 'qn 
^SHP("KLINC1s",11)
                                        &73                        >:    zaezk 
^SHP("KLINC1s",12)
                                                                               
^SHP("KLINC1s",13)
                                          -----------------------------------
^SHP("KLINC1s",14)
                                            : zedf zcrz :sipq :wpa qn:  mekq  :
^SHP("KLINC1s",15)
                                            -----------------------------------
^SHP("KLINC1s",16)
                                            :    oerxtl :  wiy 'qn  :  oeayg  :
^SHP("KLINC1s",17)
                                          -----------------------------------
^SHP("KLINC1s",18)
                                           $999999999 : 999 :  99  :  999.99:1 
^SHP("KLINC1s",19)
                                              99999999:99999999999:999999999:2 
^SHP("KLINC1s",20)

^SHP("KLINC1s",21)
                                                                               
^SHP("KLINC1s",22)
                                                                               
^SHP("KLINC1s",23)
                                                                               
^SHP("KLINC1s",24)
                                                                               
^SHP("KLINC1s",25)

^SHP("KLINC1s",26)

^SHP("KLINC1s",27)

^SHP("KLINC1s",28)
                                                                            $
^SHP("KLINC1s",29)
                                          -----------------------------------
^SHP("KLINC1s",30)
                                                                               
^SHP("KLINC1s",31)
                                                  &12         > :        onefn 
^SHP("KLINC1s",32)
                                                    &13       > :xewn qn iekip 
^SHP("KLINC1s",33)
                                                                               
^SHP("KLINC1s",34)
                                                    &14       > :    `"ka mley 
^SHP("KLINC1s",35)
                                              &15             > :      `"k 'qn 
^SHP("KLINC1s",36)
                                                   &16        > :     dwqr beq 
^SHP("KLINC1s",37)
                                                   &17        > :    i`xy` beq 
^SHP("KLINC1s",38)
                                                           &19> : minelyz xtqn 
^SHP("KLINC1s",39)
                                                       &18    > :  oey`x melyz 
^SHP("KLINC1s",40)
                                                       &20    > :  minelyz x`y 
^SHP("KLINC1s",41)
                                                                               
^SHP("KLINC1s",42)
                                                    #&25     ># :   k"dq       
^SHP("KLINC1s",43)
                                                                               
^SHP("KLINC1s",44)
                                                   #&27     >#&44           >  
^SHP("KLINC1s",45)
                                                                               
^SHP("KLINC1s",46)
                                                             : enleyy zeipeayg 
^SHP("KLINC1s",47)
                                           &40                               > 
^SHP("KLINC1s",48)
                                                                               
^SHP("KLINC1s",49)
                                           &30                      >:   drced 
^SHP("KLINC1s",50)
                                           &38                      >          
^SHP("KLINC1s",51)
                                                                               
^SHP("KLINC1s",52)
                                                            .......... : dnizg 
^SHP("KLINC1s","RG")
H
^SHP("KLINC2s")
dxv .tcnl dlaw
^SHP("KLINC2s",1)
                                         #&01              >#                  
^SHP("KLINC2s",2)
                                               &02                          >  
^SHP("KLINC2s",3)
                                                            &71        > : lh  
^SHP("KLINC2s",4)
                                                     &77        >  dyxen wqer  
^SHP("KLINC2s",5)
                                                                               
^SHP("KLINC2s",6)
                                           #&78    #                           
^SHP("KLINC2s",7)
                                           #&03   > 'qn dlaw#                  
^SHP("KLINC2s",8)
                                                                               
^SHP("KLINC2s",9)
                                                             &05     > : jix`z 
^SHP("KLINC2s",10)
                                        &08                       > :z`n lawzd 
^SHP("KLINC2s",11)
                                                   #&07    ># : gewl 'qn       
^SHP("KLINC2s",12)
                                                                               
^SHP("KLINC2s",13)
                                                  &12         > :        onefn 
^SHP("KLINC2s",14)
                                                                               
^SHP("KLINC2s",15)
                                                    &14       > :    `"ka mley 
^SHP("KLINC2s",16)
                                              &15             > :      `"k 'qn 
^SHP("KLINC2s",17)
                                                        &16   > :     dwqr beq 
^SHP("KLINC2s",18)
                                                        &17   > :    i`xy` beq 
^SHP("KLINC2s",19)
                                                           &19> : minelyz xtqn 
^SHP("KLINC2s",20)
                                                        &18   > :  oey`x melyz 
^SHP("KLINC2s",21)
                                                       &20    > :  minelyz x`y 
^SHP("KLINC2s",22)
                                                                               
^SHP("KLINC2s",23)
                                                 #&25     ># :   k"dq          
^SHP("KLINC2s",24)
                                                                               
^SHP("KLINC2s",25)
                                                  #&27     ># &44        >     
^SHP("KLINC2s",26)
                                                                               
^SHP("KLINC2s",27)
                                                            .......... : dnizg 
^SHP("KLINC2s",28)
                                                                               
^SHP("KLINC2s","RG")
H
^SHP("KLINCs")
KABALA
^SHP("KLINCs",1)
                  #&01                      >#                                 
^SHP("KLINCs",1,"%TOP")
18
^SHP("KLINCs",2)
                                               &02                          >  
^SHP("KLINCs",2,"%TOP")
47
^SHP("KLINCs",3)
                                               &71                      > :lh  
^SHP("KLINCs",3,"%TOP")
47
^SHP("KLINCs",4)
                                                     &77        >  dyxen wqer  
^SHP("KLINCs",4,"%TOP")
53
^SHP("KLINCs",5)
                                                                               
^SHP("KLINCs",5,"%TOP")
79
^SHP("KLINCs",6)
          #&78 #           #&76> 'qn dlaw #                                    
^SHP("KLINCs",6,"%TOP")
10
^SHP("KLINCs",7)
                                                                               
^SHP("KLINCs",7,"%TOP")
79
^SHP("KLINCs",8)
              &05     > : dlaw jix`z                                           
^SHP("KLINCs",8,"%TOP")
14
^SHP("KLINCs",9)
           &07        > : gewl 'qn   &08                       >: z`n lawzp    
^SHP("KLINCs",9,"%TOP")
11
^SHP("KLINCs",10)
                           &73                                 >:     zaezk    
^SHP("KLINCs",10,"%TOP")
27
^SHP("KLINCs",11)
                                                                               
^SHP("KLINCs",11,"%TOP")
79
^SHP("KLINCs",12)
         ------------------------------------------------------------------
^SHP("KLINCs",12,"%TOP")
9
^SHP("KLINCs",13)
         : oerxtl :  wiy 'qn  :  oeayg  : zedf zcrz :sipq :wpa qn:  mekq  :    
^SHP("KLINCs",13,"%TOP")
9
^SHP("KLINCs",14)
         ------------------------------------------------------------------
^SHP("KLINCs",14,"%TOP")
9
^SHP("KLINCs",15)
         $99999999:99999999999:999999999: 999999999 : 999 :  99  :  999.99:1
^SHP("KLINCs",15,"%TOP")
9
^SHP("KLINCs",16)

^SHP("KLINCs",16,"%TOP")
0
^SHP("KLINCs",17)

^SHP("KLINCs",17,"%TOP")
0
^SHP("KLINCs",18)

^SHP("KLINCs",18,"%TOP")
0
^SHP("KLINCs",19)

^SHP("KLINCs",19,"%TOP")
0
^SHP("KLINCs",20)

^SHP("KLINCs",20,"%TOP")
0
^SHP("KLINCs",21)

^SHP("KLINCs",21,"%TOP")
0
^SHP("KLINCs",22)

^SHP("KLINCs",22,"%TOP")
0
^SHP("KLINCs",23)

^SHP("KLINCs",23,"%TOP")
0
^SHP("KLINCs",24)

^SHP("KLINCs",24,"%TOP")
0
^SHP("KLINCs",25)

^SHP("KLINCs",25,"%TOP")
0
^SHP("KLINCs",26)
                                                                         $ 
^SHP("KLINCs",26,"%TOP")
73
^SHP("KLINCs",27)
         ------------------------------------------------------------------
^SHP("KLINCs",27,"%TOP")
9
^SHP("KLINCs",28)
                                                                               
^SHP("KLINCs",28,"%TOP")
79
^SHP("KLINCs",29)
                    &13       > :xewn qn iekip   &12         > :    onefn      
^SHP("KLINCs",29,"%TOP")
20
^SHP("KLINCs",30)
                                                                               
^SHP("KLINCs",30,"%TOP")
79
^SHP("KLINCs",31)
      &16   > :dwqr beq &15             > `"k 'qn  &14       > :`"ka mley      
^SHP("KLINCs",31,"%TOP")
6
^SHP("KLINCs",32)
   &20    >:'lyz x`y &18   >:oey`x 'lyz &19>:'lyz zenk &17   > :i`xy` beq      
^SHP("KLINCs",32,"%TOP")
3
^SHP("KLINCs",33)
                                                                               
^SHP("KLINCs",33,"%TOP")
79
^SHP("KLINCs",34)
                                            #&25     ># :     k"dq             
^SHP("KLINCs",34,"%TOP")
44
^SHP("KLINCs",35)
                                                                               
^SHP("KLINCs",35,"%TOP")
79
^SHP("KLINCs",36)
                                     #&27       ># &44      >                  
^SHP("KLINCs",36,"%TOP")
37
^SHP("KLINCs",37)
                                                                               
^SHP("KLINCs",37,"%TOP")
79
^SHP("KLINCs",38)
                                                                               
^SHP("KLINCs",38,"%TOP")
79
^SHP("KLINCs",39)
                                                                               
^SHP("KLINCs",39,"%TOP")
79
^SHP("KLINCs",40)
                                                    .......... :    dnizg      
^SHP("KLINCs",40,"%TOP")
52
^SHP("KLINCs",41)
                                                                               
^SHP("KLINCs",41,"%TOP")
79
^SHP("KLINCs",42)
                                                                               
^SHP("KLINCs",42,"%TOP")
79
^SHP("KLINCs",43)
        &30                                                   >:    drced      
^SHP("KLINCs",43,"%TOP")
8
^SHP("KLINCs",44)
        &38                                                   >                
^SHP("KLINCs",44,"%TOP")
8
^SHP("KLINCs",45)
                                                                               
^SHP("KLINCs",45,"%TOP")
79
^SHP("KLINCs",46)
                                                                               
^SHP("KLINCs",46,"%TOP")
79
^SHP("KLINCs",47)
                                                                               
^SHP("KLINCs",47,"%TOP")
79
^SHP("KLINCs","RG")
H
^SHP("KLMDSV2s")
iz`eeyd oecren g"ec
^SHP("KLMDSV2s",1)
                # iz`eeyd zegewl zeipw g"ec #                                  
^SHP("KLMDSV2s",2)
                                                                               
^SHP("KLMDSV2s",3)
              &02     > jix`z cr  &01     > jix`zn : (1)  zncew dtewz          
^SHP("KLMDSV2s",4)
                        &05      >  mekq cr        &04      >:  mekqn          
^SHP("KLMDSV2s",5)
              &11     > jix`z cr  &10     > jix`zn : (2) zigkep dtewz          
^SHP("KLMDSV2s",6)
                        &20      >  mekq cr        &15      >:  mekqn          
^SHP("KLMDSV2s",7)
     ----------------------------------------------------------------------
^SHP("KLMDSV2s",8)
     :   yxtd   :(2) zeipw k"dq:(1) zeipw k"dq:     gewl my    : gewl 'qn :    
^SHP("KLMDSV2s",9)
     ----------------------------------------------------------------------
^SHP("KLMDSV2s",10)
     $9999999.99:    9999999.99:    9999999.99:TTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("KLMDSV2s",11)

^SHP("KLMDSV2s",12)

^SHP("KLMDSV2s",13)

^SHP("KLMDSV2s",14)

^SHP("KLMDSV2s",15)

^SHP("KLMDSV2s",16)

^SHP("KLMDSV2s",17)

^SHP("KLMDSV2s",18)

^SHP("KLMDSV2s",19)

^SHP("KLMDSV2s",20)

^SHP("KLMDSV2s",21)

^SHP("KLMDSV2s",22)

^SHP("KLMDSV2s",23)

^SHP("KLMDSV2s",24)

^SHP("KLMDSV2s",25)

^SHP("KLMDSV2s",26)

^SHP("KLMDSV2s",27)

^SHP("KLMDSV2s",28)

^SHP("KLMDSV2s",29)

^SHP("KLMDSV2s",30)

^SHP("KLMDSV2s",31)

^SHP("KLMDSV2s",32)

^SHP("KLMDSV2s",33)

^SHP("KLMDSV2s",34)

^SHP("KLMDSV2s",35)

^SHP("KLMDSV2s",36)

^SHP("KLMDSV2s",37)

^SHP("KLMDSV2s",38)

^SHP("KLMDSV2s",39)

^SHP("KLMDSV2s",40)

^SHP("KLMDSV2s",41)

^SHP("KLMDSV2s",42)

^SHP("KLMDSV2s",43)

^SHP("KLMDSV2s",44)

^SHP("KLMDSV2s",45)

^SHP("KLMDSV2s",46)

^SHP("KLMDSV2s",47)

^SHP("KLMDSV2s",48)

^SHP("KLMDSV2s",49)

^SHP("KLMDSV2s",50)

^SHP("KLMDSV2s",51)

^SHP("KLMDSV2s",52)

^SHP("KLMDSV2s",53)

^SHP("KLMDSV2s",54)

^SHP("KLMDSV2s",55)

^SHP("KLMDSV2s",56)
                                                                         $ 
^SHP("KLMDSV2s",57)
     ----------------------------------------------------------------------
^SHP("KLMDSV2s",58)
      &50       >    &45      >      &40       >                               
^SHP("KLMDSV2s","RG")
H
^SHP("KLTSHLs")
izveaw melyz
^SHP("KLTSHLs",1)
                                           &03 > yceg &02 >  dpyl melyz        
^SHP("KLTSHLs",2)
                       &06                        > &05   > gewl   beqn        
^SHP("KLTSHLs",3)
                       &11                        > &10   > gewl beq cr        
^SHP("KLTSHLs",4)
  --------------------------------------------------------------------------
^SHP("KLTSHLs",5)
  :   dxzi :  melyz :  zekf  :  daeg  :          gewl my        : gewl 'qn :   
^SHP("KLTSHLs",6)
  --------------------------------------------------------------------------
^SHP("KLTSHLs",7)
  $99999.99: 9999.99:99999.99:99999.99:TTTTTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("KLTSHLs",8)

^SHP("KLTSHLs",9)

^SHP("KLTSHLs",10)

^SHP("KLTSHLs",11)

^SHP("KLTSHLs",12)

^SHP("KLTSHLs",13)

^SHP("KLTSHLs",14)

^SHP("KLTSHLs",15)

^SHP("KLTSHLs",16)

^SHP("KLTSHLs",17)

^SHP("KLTSHLs",18)

^SHP("KLTSHLs",19)

^SHP("KLTSHLs",20)

^SHP("KLTSHLs",21)

^SHP("KLTSHLs",22)

^SHP("KLTSHLs",23)

^SHP("KLTSHLs",24)

^SHP("KLTSHLs",25)

^SHP("KLTSHLs",26)

^SHP("KLTSHLs",27)

^SHP("KLTSHLs",28)

^SHP("KLTSHLs",29)

^SHP("KLTSHLs",30)

^SHP("KLTSHLs",31)

^SHP("KLTSHLs",32)

^SHP("KLTSHLs",33)

^SHP("KLTSHLs",34)

^SHP("KLTSHLs",35)

^SHP("KLTSHLs",36)

^SHP("KLTSHLs",37)

^SHP("KLTSHLs",38)

^SHP("KLTSHLs",39)

^SHP("KLTSHLs",40)

^SHP("KLTSHLs",41)

^SHP("KLTSHLs",42)

^SHP("KLTSHLs",43)

^SHP("KLTSHLs",44)

^SHP("KLTSHLs",45)

^SHP("KLTSHLs",46)

^SHP("KLTSHLs",47)

^SHP("KLTSHLs",48)

^SHP("KLTSHLs",49)

^SHP("KLTSHLs",50)

^SHP("KLTSHLs",51)

^SHP("KLTSHLs",52)

^SHP("KLTSHLs",53)

^SHP("KLTSHLs",54)
                                                                          $ 
^SHP("KLTSHLs",55)
  --------------------------------------------------------------------------
^SHP("KLTSHLs",56)
                                                                               
^SHP("KLTSHLs",57)
  &35      >&37     >&30     >&25     >                                        
^SHP("KLTSHLs","RG")
H
^SHP("KOT0v")
(oyi ) 'n'z l zxzek
^SHP("KOT0v",1)
                      #{                       01}#                            
^SHP("KOT0v",2)
                                               {                          05}  
^SHP("KOT0v",3)
                                                              {10        }:lh  
^SHP("KOT0v",4)
                                                     {15        }  dyxen wqer  
^SHP("KOT0v",5)
     {25     }:dry {20       }:dwtd jix`z                                      
^SHP("KOT0v",6)
     {27     }:dryl onfed                                                      
^SHP("KOT0v",7)
             #{30   }{40     } qn {        35}#                                
^SHP("KOT0v",8)
    #{57  }#:qn dpnfd{                       55}:oinfnd my                     
^SHP("KOT0v",9)
 { 64}:dqipk {63 }:dxic {62 }:dnew {61  }'qn {                           60}   
^SHP("KOT0v",10)
             {                                                      68}:dxrd   
^SHP("KOT0v",11)
                                                          {75           }:lh   
^SHP("KOT0v",12)
                                                                          1$   
^SHP("KOT0v",13)
                             $1                                                
^SHP("KOT0v",14)
                                                                               
^SHP("KOT0v",15)
                                                       ______________: dnizg   
^SHP("KOT0v","RG")
H
^SHP("KOT1v")
ycg zxzek
^SHP("KOT1v",1)
                                         {                                01}  
^SHP("KOT1v",1,"%TOP")
41
^SHP("KOT1v",2)
                                               {                          05}  
^SHP("KOT1v",2,"%TOP")
47
^SHP("KOT1v",3)
                                                              {10        }:lh  
^SHP("KOT1v",3,"%TOP")
62
^SHP("KOT1v",4)
                                                     {15        }  dyxen wqer  
^SHP("KOT1v",4,"%TOP")
53
^SHP("KOT1v",5)
                                         {25     }:dry {20       }:dwtd jix`z  
^SHP("KOT1v",5,"%TOP")
41
^SHP("KOT1v",6)
                                                         {27     }:dryl onfed  
^SHP("KOT1v",6,"%TOP")
57
^SHP("KOT1v",7)
                                              {30   }{40     } qn {        35} 
^SHP("KOT1v",7,"%TOP")
46
^SHP("KOT1v",8)
                                          {                       55}:gewld my 
^SHP("KOT1v",8,"%TOP")
42
^SHP("KOT1v",9)
                                                              {57  }:'qn dpnfd 
^SHP("KOT1v",9,"%TOP")
62
^SHP("KOT1v",10)
                                        {61  }'qn {                        60} 
^SHP("KOT1v",10,"%TOP")
40
^SHP("KOT1v",11)
                                             { 64}:dqipk {63 }:dxic {62 }:dnew 
^SHP("KOT1v",11,"%TOP")
45
^SHP("KOT1v",12)
                                             {                              68}
^SHP("KOT1v",12,"%TOP")
45
^SHP("KOT1v",13)
                                             {                              69}
^SHP("KOT1v",13,"%TOP")
45
^SHP("KOT1v",14)
                                                             {75           }:lh
^SHP("KOT1v",14,"%TOP")
61
^SHP("KOT1v",15)
                                                                          1$   
^SHP("KOT1v",15,"%TOP")
74
^SHP("KOT1v",16)
                                              $1                               
^SHP("KOT1v",16,"%TOP")
46
^SHP("KOT1v",17)
                                                                               
^SHP("KOT1v",17,"%TOP")
79
^SHP("KOT1v",18)
                                                       ______________: dnizg   
^SHP("KOT1v",18,"%TOP")
55
^SHP("KOT1v","RG")
H
^SHP("KOTMS1v")
jex` zxzek
^SHP("KOTMS1v",1)
 *************************************                                         
^SHP("KOTMS1v",1,"%TOP")
1
^SHP("KOTMS1v",2)
  {                                01}                                         
^SHP("KOTMS1v",2,"%TOP")
2
^SHP("KOTMS1v",3)
  {10        }:lh {                05}                                         
^SHP("KOTMS1v",3,"%TOP")
2
^SHP("KOTMS1v",4)
               {15        }:dyxen wqer                                         
^SHP("KOTMS1v",4,"%TOP")
15
^SHP("KOTMS1v",5)
 {25     }:dry {20       }:dqtcd jix`z                                         
^SHP("KOTMS1v",5,"%TOP")
1
^SHP("KOTMS1v",6)
 {27           }: xewn zwtd drye jix`z                                         
^SHP("KOTMS1v",6,"%TOP")
1
^SHP("KOTMS1v",7)
 #{             35}#                                                           
^SHP("KOTMS1v",7,"%TOP")
1
^SHP("KOTMS1v",8)
 #{30  }{40   } 'qn#                                                           
^SHP("KOTMS1v",8,"%TOP")
1
^SHP("KOTMS1v",9)
 #{             80}#                                                           
^SHP("KOTMS1v",9,"%TOP")
1
^SHP("KOTMS1v",10)
                 #{51 }#:    ogley                                             
^SHP("KOTMS1v",10,"%TOP")
17
^SHP("KOTMS1v",11)
          #{57     }#:'qn dpnfd                                                
^SHP("KOTMS1v",11,"%TOP")
10
^SHP("KOTMS1v",12)
                #{53 }# micreq 'qn                                             
^SHP("KOTMS1v",12,"%TOP")
16
^SHP("KOTMS1v",13)
                                      1$                                       
^SHP("KOTMS1v",13,"%TOP")
38
^SHP("KOTMS1v",14)
  mekq :------- hixt xe`ze cew -------:                                        
^SHP("KOTMS1v",14,"%TOP")
2
^SHP("KOTMS1v",15)
                                                                               
^SHP("KOTMS1v",15,"%TOP")
79
^SHP("KOTMS1v",16)
      $1                                                                       
^SHP("KOTMS1v",16,"%TOP")
6
^SHP("KOTMS1v",17)
                                                                               
^SHP("KOTMS1v",17,"%TOP")
79
^SHP("KOTMS1v",18)
                ______________: dnizg                                          
^SHP("KOTMS1v",18,"%TOP")
16
^SHP("KOTMS1v","RG")
H
^SHP("KOTMS2v")
cxbpee`
^SHP("KOTMS2v",1)
 *************************************                                         
^SHP("KOTMS2v",1,"%TOP")
1
^SHP("KOTMS2v",2)
             #cxbpee` #                                                        
^SHP("KOTMS2v",2,"%TOP")
13
^SHP("KOTMS2v",3)
 #n"ra zecrqne dtw iza#                                                        
^SHP("KOTMS2v",3,"%TOP")
1
^SHP("KOTMS2v",4)
 {10        }:lh {                05}                                          
^SHP("KOTMS2v",4,"%TOP")
1
^SHP("KOTMS2v",5)
               {15        }:dyxen wqer                                         
^SHP("KOTMS2v",5,"%TOP")
15
^SHP("KOTMS2v",6)
 {25     }:dry {20       }:dqtcd jix`z                                         
^SHP("KOTMS2v",6,"%TOP")
1
^SHP("KOTMS2v",7)
 {27           }: xewn zwtd drye jix`z                                         
^SHP("KOTMS2v",7,"%TOP")
1
^SHP("KOTMS2v",8)
 #{             35}#                                                           
^SHP("KOTMS2v",8,"%TOP")
1
^SHP("KOTMS2v",9)
 #{30  }{40   } 'qn#                                                           
^SHP("KOTMS2v",9,"%TOP")
1
^SHP("KOTMS2v",10)
 #{             80}#                                                           
^SHP("KOTMS2v",10,"%TOP")
1
^SHP("KOTMS2v",11)
                 #{51 }#:    ogley                                             
^SHP("KOTMS2v",11,"%TOP")
17
^SHP("KOTMS2v",12)
         #{57     }#:'qn dpnfd                                                 
^SHP("KOTMS2v",12,"%TOP")
9
^SHP("KOTMS2v",13)
                #{53 }# micreq 'qn                                             
^SHP("KOTMS2v",13,"%TOP")
16
^SHP("KOTMS2v",14)
                                      1$                                       
^SHP("KOTMS2v",14,"%TOP")
38
^SHP("KOTMS2v",15)
  mekq :------- hixt xe`ze cew -------:                                        
^SHP("KOTMS2v",15,"%TOP")
2
^SHP("KOTMS2v",16)
                                                                               
^SHP("KOTMS2v",16,"%TOP")
79
^SHP("KOTMS2v",17)
      $1                                                                       
^SHP("KOTMS2v",17,"%TOP")
6
^SHP("KOTMS2v",18)
                                                                               
^SHP("KOTMS2v",18,"%TOP")
79
^SHP("KOTMS2v",19)
                ______________: dnizg                                          
^SHP("KOTMS2v",19,"%TOP")
16
^SHP("KOTMS2v","RG")
H
^SHP("KOTMS3v")

^SHP("KOTMS3v",1)
 *************************************                                         
^SHP("KOTMS3v",1,"%TOP")
1
^SHP("KOTMS3v",2)
 #{               01}#                                                         
^SHP("KOTMS3v",2,"%TOP")
1
^SHP("KOTMS3v",3)
                                                                               
^SHP("KOTMS3v",3,"%TOP")
79
^SHP("KOTMS3v",4)
 {10        }:lh {                 05}                                         
^SHP("KOTMS3v",4,"%TOP")
1
^SHP("KOTMS3v",5)
               {15        }:dyxen wqer                                         
^SHP("KOTMS3v",5,"%TOP")
15
^SHP("KOTMS3v",6)
               {81                   }                                         
^SHP("KOTMS3v",6,"%TOP")
15
^SHP("KOTMS3v",7)
 {25     }:dry {20       }:dqtcd jix`z                                         
^SHP("KOTMS3v",7,"%TOP")
1
^SHP("KOTMS3v",8)
 {27           }: xewn zwtd drye jix`z                                         
^SHP("KOTMS3v",8,"%TOP")
1
^SHP("KOTMS3v",9)
 {               85}                                                           
^SHP("KOTMS3v",9,"%TOP")
1
^SHP("KOTMS3v",10)
 #{             35}#                                                           
^SHP("KOTMS3v",10,"%TOP")
1
^SHP("KOTMS3v",11)
 #{30  }{40   } 'qn#                                                           
^SHP("KOTMS3v",11,"%TOP")
1
^SHP("KOTMS3v",12)
 #{             80}#                                                           
^SHP("KOTMS3v",12,"%TOP")
1
^SHP("KOTMS3v",13)
                 #{51 }#:    ogley                                             
^SHP("KOTMS3v",13,"%TOP")
17
^SHP("KOTMS3v",14)
          #{57    }#:'qn dpnfd                                                 
^SHP("KOTMS3v",14,"%TOP")
10
^SHP("KOTMS3v",15)
               #{53 }# micreq 'qn                                              
^SHP("KOTMS3v",15,"%TOP")
15
^SHP("KOTMS3v",16)
                                      1$                                       
^SHP("KOTMS3v",16,"%TOP")
38
^SHP("KOTMS3v",17)
  mekq :------- hixt xe`ze cew -------:                                        
^SHP("KOTMS3v",17,"%TOP")
2
^SHP("KOTMS3v",18)
                                                                               
^SHP("KOTMS3v",18,"%TOP")
79
^SHP("KOTMS3v",19)
      $1                                                                       
^SHP("KOTMS3v",19,"%TOP")
6
^SHP("KOTMS3v",20)
                                                                               
^SHP("KOTMS3v",20,"%TOP")
79
^SHP("KOTMS3v",21)
                ______________: dnizg                                          
^SHP("KOTMS3v",21,"%TOP")
16
^SHP("KOTMS3v","RG")
H
^SHP("KOTMS5v")

^SHP("KOTMS5v",1)
 *************************************                                         
^SHP("KOTMS5v",1,"%TOP")
1
^SHP("KOTMS5v",2)
 #{               01}#                                                         
^SHP("KOTMS5v",2,"%TOP")
1
^SHP("KOTMS5v",3)
                                                                               
^SHP("KOTMS5v",3,"%TOP")
79
^SHP("KOTMS5v",4)
 {10        }:lh {                 05}                                         
^SHP("KOTMS5v",4,"%TOP")
1
^SHP("KOTMS5v",5)
               {15        }:dyxen wqer                                         
^SHP("KOTMS5v",5,"%TOP")
15
^SHP("KOTMS5v",6)
               {81                   }                                         
^SHP("KOTMS5v",6,"%TOP")
15
^SHP("KOTMS5v",7)
 {25     }:dry {20       }:dqtcd jix`z                                         
^SHP("KOTMS5v",7,"%TOP")
1
^SHP("KOTMS5v",8)
 {27           }: xewn zwtd drye jix`z                                         
^SHP("KOTMS5v",8,"%TOP")
1
^SHP("KOTMS5v",9)
  #{             35}#                                                          
^SHP("KOTMS5v",9,"%TOP")
2
^SHP("KOTMS5v",10)
 #{30  }{40   }{33}#                                                           
^SHP("KOTMS5v",10,"%TOP")
1
^SHP("KOTMS5v",11)
 #{             80}#                                                           
^SHP("KOTMS5v",11,"%TOP")
1
^SHP("KOTMS5v",12)
               #{51 }# :     dtew                                              
^SHP("KOTMS5v",12,"%TOP")
15
^SHP("KOTMS5v",13)
         #{57    }# :'qn dpnfd                                                 
^SHP("KOTMS5v",13,"%TOP")
9
^SHP("KOTMS5v",14)
                                      1$                                       
^SHP("KOTMS5v",14,"%TOP")
38
^SHP("KOTMS5v",15)
  mekq :------- hixt xe`ze cew -------:                                        
^SHP("KOTMS5v",15,"%TOP")
2
^SHP("KOTMS5v",16)
                                                                               
^SHP("KOTMS5v",16,"%TOP")
79
^SHP("KOTMS5v",17)
      $1                                                                       
^SHP("KOTMS5v",17,"%TOP")
6
^SHP("KOTMS5v",18)
                                                                               
^SHP("KOTMS5v",18,"%TOP")
79
^SHP("KOTMS5v",19)
                ______________: dnizg                                          
^SHP("KOTMS5v",19,"%TOP")
16
^SHP("KOTMS5v","RG")
H
^SHP("KOTMS6v")

^SHP("KOTMS6v",1)
 *************************************                                         
^SHP("KOTMS6v",2)
 {                                01}                                          
^SHP("KOTMS6v",3)
 {10        }:lh {                05}                                          
^SHP("KOTMS6v",4)
               {15        }:dyxen wqer                                         
^SHP("KOTMS6v",5)
 {25     }:dry {20       }:dqtcd jix`z                                         
^SHP("KOTMS6v",6)
 {27           }: xewn zwtd drye jix`z                                         
^SHP("KOTMS6v",7)
 #{             35}#                                                           
^SHP("KOTMS6v",8)
 #{30  }{40   } 'qn#                                                           
^SHP("KOTMS6v",9)
 #{             80}#                                                           
^SHP("KOTMS6v",10)
                  #{51 }#:    dtew                                             
^SHP("KOTMS6v",11)
         #{57     }#:'qn dpnfd                                                 
^SHP("KOTMS6v",12)
                                      1$                                       
^SHP("KOTMS6v",13)
  mekq :------- hixt xe`ze cew -------:                                        
^SHP("KOTMS6v",14)
                                                                               
^SHP("KOTMS6v",15)
      $1                                                                       
^SHP("KOTMS6v",16)
                                                                               
^SHP("KOTMS6v",17)
                ______________: dnizg                                          
^SHP("KOTMS6v","RG")
H
^SHP("KOTMSEv")

^SHP("KOTMSEv",1)
 *************************************                                         
^SHP("KOTMSEv",1,"%TOP")
1
^SHP("KOTMSEv",2)
 #{               01}#                                                         
^SHP("KOTMSEv",2,"%TOP")
1
^SHP("KOTMSEv",3)
                                                                               
^SHP("KOTMSEv",3,"%TOP")
79
^SHP("KOTMSEv",4)
 {                 05} TEL:{10       }                               
^SHP("KOTMSEv",4,"%TOP")
1
^SHP("KOTMSEv",5)
 BUSINESS ID {15        }
^SHP("KOTMSEv",5,"%TOP")
1
^SHP("KOTMSEv",6)
 {81                   }                                         
^SHP("KOTMSEv",6,"%TOP")
1
^SHP("KOTMSEv",7)
 DATE: {20       }   TIME :{25   }
^SHP("KOTMSEv",7,"%TOP")
1
^SHP("KOTMSEv",8)
 #{             35}#                                                           
^SHP("KOTMSEv",8,"%TOP")
1
^SHP("KOTMSEv",9)
 #{30  }{40   }{33}#                                                           
^SHP("KOTMSEv",9,"%TOP")
1
^SHP("KOTMSEv",10)
 #{             80}#                                                           
^SHP("KOTMSEv",10,"%TOP")
1
^SHP("KOTMSEv",11)
 TABLE: #{51 }#
^SHP("KOTMSEv",11,"%TOP")
1
^SHP("KOTMSEv",12)
 ORDER: #{57    }#
^SHP("KOTMSEv",12,"%TOP")
1
^SHP("KOTMSEv",13)
 GUESTS:#{53 }#
^SHP("KOTMSEv",13,"%TOP")
1
^SHP("KOTMSEv",14)
                                      1$                                       
^SHP("KOTMSEv",14,"%TOP")
38
^SHP("KOTMSEv",15)
  SUM  :    CODE AND NAME OF DISH     :                                       
^SHP("KOTMSEv",15,"%TOP")
2
^SHP("KOTMSEv",16)
                                                                               
^SHP("KOTMSEv",16,"%TOP")
79
^SHP("KOTMSEv",17)
 $1                                                                       
^SHP("KOTMSEv",17,"%TOP")
1
^SHP("KOTMSEv",18)
                                                                               
^SHP("KOTMSEv",18,"%TOP")
79
^SHP("KOTMSEv",19)
  SIGN:  ______________
^SHP("KOTMSEv",19,"%TOP")
2
^SHP("KOTMSEv","RG")
H
^SHP("KOTMSv")
dcqinl zxzek
^SHP("KOTMSv",1)
 *************************************                                         
^SHP("KOTMSv",1,"%TOP")
1
^SHP("KOTMSv",2)
 #{               01}#                                                         
^SHP("KOTMSv",2,"%TOP")
1
^SHP("KOTMSv",3)
                                                                               
^SHP("KOTMSv",3,"%TOP")
79
^SHP("KOTMSv",4)
 {10        }:lh {                 05}                                         
^SHP("KOTMSv",4,"%TOP")
1
^SHP("KOTMSv",5)
               {15        }:dyxen wqer                                         
^SHP("KOTMSv",5,"%TOP")
15
^SHP("KOTMSv",6)
               {81                   }                                         
^SHP("KOTMSv",6,"%TOP")
15
^SHP("KOTMSv",7)
 {25     }:dry {20       }:dqtcd jix`z                                         
^SHP("KOTMSv",7,"%TOP")
1
^SHP("KOTMSv",8)
 {27           }: xewn zwtd drye jix`z                                         
^SHP("KOTMSv",8,"%TOP")
1
^SHP("KOTMSv",9)
 #{             35}#                                                           
^SHP("KOTMSv",9,"%TOP")
1
^SHP("KOTMSv",10)
 #{30  }{40   }{33}#                                                           
^SHP("KOTMSv",10,"%TOP")
1
^SHP("KOTMSv",11)
 #{             80}#                                                           
^SHP("KOTMSv",11,"%TOP")
1
^SHP("KOTMSv",12)
                 #{51 }#:    ogley                                             
^SHP("KOTMSv",12,"%TOP")
17
^SHP("KOTMSv",13)
           #{57    }#:'qn dpnfd                                                
^SHP("KOTMSv",13,"%TOP")
11
^SHP("KOTMSv",14)
                #{53 }# micreq 'qn                                             
^SHP("KOTMSv",14,"%TOP")
16
^SHP("KOTMSv",15)
                                      1$                                       
^SHP("KOTMSv",15,"%TOP")
38
^SHP("KOTMSv",16)
  mekq :------- hixt xe`ze cew -------:                                        
^SHP("KOTMSv",16,"%TOP")
2
^SHP("KOTMSv",17)
                                                                               
^SHP("KOTMSv",17,"%TOP")
79
^SHP("KOTMSv",18)
      $1                                                                       
^SHP("KOTMSv",18,"%TOP")
6
^SHP("KOTMSv",19)
                                                                               
^SHP("KOTMSv",19,"%TOP")
79
^SHP("KOTMSv",20)
                ______________: dnizg                                          
^SHP("KOTMSv",20,"%TOP")
16
^SHP("KOTMSv","RG")
H
^SHP("KOTTMv")
'n'z l zxzek
^SHP("KOTTMv",1)
  #!!!!!!!!!!!!!!!!!!!#                                                        
^SHP("KOTTMv",1,"%TOP")
2
^SHP("KOTTMv",2)
                                                                               
^SHP("KOTTMv",2,"%TOP")
79
^SHP("KOTTMv",3)
 #{                01}#                                                        
^SHP("KOTTMv",3,"%TOP")
1
^SHP("KOTTMv",4)
                                                                               
^SHP("KOTTMv",4,"%TOP")
79
^SHP("KOTTMv",5)
   {10        }:lh {                 05}                                       
^SHP("KOTTMv",5,"%TOP")
3
^SHP("KOTTMv",6)
                 {15        }:dyxen wqer                                       
^SHP("KOTTMv",6,"%TOP")
17
^SHP("KOTTMv",7)
    {25     }:dry {20       }:dwtd jix`z                                       
^SHP("KOTTMv",7,"%TOP")
4
^SHP("KOTTMv",8)
    {27     }:dry {26     }:jix`zl onfed                                       
^SHP("KOTTMv",8,"%TOP")
4
^SHP("KOTTMv",9)
                                                                               
^SHP("KOTTMv",9,"%TOP")
79
^SHP("KOTTMv",10)
     #{           35}#                                                         
^SHP("KOTTMv",10,"%TOP")
5
^SHP("KOTTMv",11)
 #{30   } {40     }#                                                           
^SHP("KOTTMv",11,"%TOP")
1
^SHP("KOTTMv",12)
                                 : gewld                                       
^SHP("KOTTMv",12,"%TOP")
33
^SHP("KOTTMv",13)
 #{             55}#                                                           
^SHP("KOTTMv",13,"%TOP")
1
^SHP("KOTTMv",14)
                 {75        } : gewld lh                                       
^SHP("KOTTMv",14,"%TOP")
17
^SHP("KOTTMv",15)
                 {77        } :     ciip                                       
^SHP("KOTTMv",15,"%TOP")
17
^SHP("KOTTMv",16)
        #{      59}#:   oinfnd                                                 
^SHP("KOTTMv",16,"%TOP")
8
^SHP("KOTTMv",17)
                                                                               
^SHP("KOTTMv",17,"%TOP")
79
^SHP("KOTTMv",18)
             #{57    }# : 'qn dpnfd                                            
^SHP("KOTTMv",18,"%TOP")
13
^SHP("KOTTMv",19)
 #{56               }#                                                         
^SHP("KOTTMv",19,"%TOP")
1
^SHP("KOTTMv",20)
                                 : zaezk                                       
^SHP("KOTTMv",20,"%TOP")
33
^SHP("KOTTMv",21)
 #{               60}#
^SHP("KOTTMv",21,"%TOP")
1
^SHP("KOTTMv",22)
 #{63} dxic {61} 'qn#                                                          
^SHP("KOTTMv",22,"%TOP")
1
^SHP("KOTTMv",23)
 #{  64}# :dqipk #{62  }# :dnew                                                
^SHP("KOTTMv",23,"%TOP")
1
^SHP("KOTTMv",24)
   #{           65}# : xir                                                     
^SHP("KOTTMv",24,"%TOP")
3
^SHP("KOTTMv",25)
                 #{    67}# :xef`                                              
^SHP("KOTTMv",25,"%TOP")
17
^SHP("KOTTMv",26)
                                                                               
^SHP("KOTTMv",26,"%TOP")
79
^SHP("KOTTMv",27)
                                       1$                                      
^SHP("KOTTMv",27,"%TOP")
39
^SHP("KOTTMv",28)
 :-------------------------------------:                                       
^SHP("KOTTMv",28,"%TOP")
1
^SHP("KOTTMv",29)
 $1                                                                            
^SHP("KOTTMv",29,"%TOP")
1
^SHP("KOTTMv",30)
                                                                               
^SHP("KOTTMv",30,"%TOP")
79
^SHP("KOTTMv",31)
                ______________: dnizg                                          
^SHP("KOTTMv",31,"%TOP")
16
^SHP("KOTTMv",32)
                                                                               
^SHP("KOTTMv",32,"%TOP")
79
^SHP("KOTTMv","RG")
H
^SHP("KOTv")
(ycg)'n'zl zxzek
^SHP("KOTv",1)
 *************************************                                         
^SHP("KOTv",1,"%TOP")
1
^SHP("KOTv",2)
 {                  01}                                                        
^SHP("KOTv",2,"%TOP")
1
^SHP("KOTv",3)
                                                                               
^SHP("KOTv",3,"%TOP")
79
^SHP("KOTv",4)
 {10        }:lh {                 05}                                         
^SHP("KOTv",4,"%TOP")
1
^SHP("KOTv",5)
               {15        }:dyxen wqer                                         
^SHP("KOTv",5,"%TOP")
15
^SHP("KOTv",6)
               {                   81}                                         
^SHP("KOTv",6,"%TOP")
15
^SHP("KOTv",7)
 {25     }:dry  {20       }:dwtd jix`z                                         
^SHP("KOTv",7,"%TOP")
1
^SHP("KOTv",8)
 {27     }:dry {26      }:jix`zl onfed                                         
^SHP("KOTv",8,"%TOP")
1
^SHP("KOTv",9)
 #{             35}#                                                           
^SHP("KOTv",9,"%TOP")
1
^SHP("KOTv",10)
 #{30 }{40    }{33}#                                                           
^SHP("KOTv",10,"%TOP")
1
^SHP("KOTv",11)
               {75        } : gewld lh                                         
^SHP("KOTv",11,"%TOP")
15
^SHP("KOTv",12)
 {                      55} : gewld my                                         
^SHP("KOTv",12,"%TOP")
1
^SHP("KOTv",13)
        {               59} :   oinfnd                                         
^SHP("KOTv",13,"%TOP")
8
^SHP("KOTv",14)
                  {57     } :'qn dpnfd                                         
^SHP("KOTv",14,"%TOP")
18
^SHP("KOTv",15)
                                      1$                                       
^SHP("KOTv",15,"%TOP")
38
^SHP("KOTv",16)
  mekq :------- hixt xe`ze cew -------:                                        
^SHP("KOTv",16,"%TOP")
2
^SHP("KOTv",17)
 $1                                                                            
^SHP("KOTv",17,"%TOP")
1
^SHP("KOTv",18)
                                                                               
^SHP("KOTv",18,"%TOP")
79
^SHP("KOTv",19)
                ______________: dnizg                                          
^SHP("KOTv",19,"%TOP")
16
^SHP("KOTv","RG")
H
^SHP("L1TRPRG")
xeciyl zeipkez zniyx
^SHP("L1TRPRG",1)
P1SHULH
^SHP("L1TRPRG","RG")
H
^SHP("L1TRPRGL")
xeciyl zegewl zniyx
^SHP("L1TRPRGL",1)
03-6024787                      iawn dcedi fx` mgl                   *
^SHP("L1TRPRGL",1,"%TOP")
0
^SHP("L1TRPRGL",2)
03-6443606                       liigd znx fx` mgl                   *
^SHP("L1TRPRGL",2,"%TOP")
0
^SHP("L1TRPRGL",3)
03-6090104                      lexiab oa` fx` mgl                   *
^SHP("L1TRPRGL",3,"%TOP")
0
^SHP("L1TRPRGL",4)
                                                                               
^SHP("L1TRPRGL",4,"%TOP")
79
^SHP("L1TRPRGL",5)
                                                                               
^SHP("L1TRPRGL",5,"%TOP")
79
^SHP("L1TRPRGL","RG")
H                                                                     
^SHP("LEV")

^SHP("LEV",1)
  &99 sc              &02                   &01          &10
^SHP("LEV",1,"%TOP")
2
^SHP("LEV",2)
                      ====================
^SHP("LEV",2,"%TOP")
22
^SHP("LEV",3)

^SHP("LEV",3,"%TOP")
0
^SHP("LEV",4)
                        &04       -cr   &03       -n
^SHP("LEV",4,"%TOP")
24
^SHP("LEV",5)

^SHP("LEV",5,"%TOP")
0
^SHP("LEV",6)
               k''dq       d`ivi           dqipk         jix`z      mei
^SHP("LEV",6,"%TOP")
15
^SHP("LEV",7)
              --------   ----------     ----------      --------   -----
^SHP("LEV",7,"%TOP")
14
^SHP("LEV",8)
1           :           :              :               :          :
^SHP("LEV",8,"%TOP")
0
^SHP("LEV","P1")
13
^SHP("LEV","P10")
3
^SHP("LEV","P2")
22
^SHP("LEV","P3")
10
^SHP("LEV","P4")
10
^SHP("LEV","P99")
4
^SHP("LEV","RG")
H
^SHP("LEVDSs")
micaer g"ec fekix
^SHP("LEVDSs",1)
                               # micaer g"ec #                                 
^SHP("LEVDSs",2)
                   &10     > :    jix`z cr    &05      > :    jix`zn           
^SHP("LEVDSs",3)
  &14               > &13  > : dveaw cr    &12              > &11 > : dveawn   
^SHP("LEVDSs",4)
                     &20   > :caer xtqn cr       &15   > :caer xtqnn           
^SHP("LEVDSs",5)
 -----------------------------------------------------------------------------
^SHP("LEVDSs",6)
 : zxekyn : dncwn : qepea : yteg: 'lin: dlgn: ini : zery :     my     :  'qn : 
^SHP("LEVDSs",7)
 :        : ( - ) :       :     :     :     :dcear:dcear :    caer    : caer : 
^SHP("LEVDSs",8)
 -----------------------------------------------------------------------------
^SHP("LEVDSs",9)
 $99999.99:9999.99:99999.9:TTTTT:TTTTT:TTTTT: 9999:TTTTTT:TTTTTTTTTTTT:TTTTTT:1
^SHP("LEVDSs",10)

^SHP("LEVDSs",11)

^SHP("LEVDSs",12)

^SHP("LEVDSs",13)

^SHP("LEVDSs",14)

^SHP("LEVDSs",15)

^SHP("LEVDSs",16)

^SHP("LEVDSs",17)

^SHP("LEVDSs",18)

^SHP("LEVDSs",19)

^SHP("LEVDSs",20)

^SHP("LEVDSs",21)

^SHP("LEVDSs",22)

^SHP("LEVDSs",23)

^SHP("LEVDSs",24)

^SHP("LEVDSs",25)

^SHP("LEVDSs",26)

^SHP("LEVDSs",27)

^SHP("LEVDSs",28)

^SHP("LEVDSs",29)

^SHP("LEVDSs",30)

^SHP("LEVDSs",31)

^SHP("LEVDSs",32)

^SHP("LEVDSs",33)

^SHP("LEVDSs",34)

^SHP("LEVDSs",35)

^SHP("LEVDSs",36)

^SHP("LEVDSs",37)

^SHP("LEVDSs",38)

^SHP("LEVDSs",39)

^SHP("LEVDSs",40)

^SHP("LEVDSs",41)

^SHP("LEVDSs",42)

^SHP("LEVDSs",43)

^SHP("LEVDSs",44)

^SHP("LEVDSs",45)

^SHP("LEVDSs",46)

^SHP("LEVDSs",47)

^SHP("LEVDSs",48)

^SHP("LEVDSs",49)

^SHP("LEVDSs",50)

^SHP("LEVDSs",51)

^SHP("LEVDSs",52)

^SHP("LEVDSs",53)

^SHP("LEVDSs",54)
                                                                            $ 
^SHP("LEVDSs",55)
 -----------------------------------------------------------------------------
^SHP("LEVDSs",56)
 &60     >&55    >&52    >&50  >&45  >&40  >&35  >&30   >                      
^SHP("LEVDSs","RG")
H
^SHP("LEVHISTs")
caer ilehia lewehext
^SHP("LEVHISTs",1)
                 # miiepiye milehia lewehext #                                 
^SHP("LEVHISTs",1,"%TOP")
17
^SHP("LEVHISTs",2)
                                                                               
^SHP("LEVHISTs",2,"%TOP")
79
^SHP("LEVHISTs",3)
                      &10     > jix`z cr    &05     > jix`zn                   
^SHP("LEVHISTs",3,"%TOP")
22
^SHP("LEVHISTs",4)
                                                                               
^SHP("LEVHISTs",4,"%TOP")
79
^SHP("LEVHISTs",5)
     ----------------------------------------------------------------
^SHP("LEVHISTs",5,"%TOP")
5
^SHP("LEVHISTs",6)
     : rvand my : dry :  jix`z : ycg : dlert :   caer my   :caer 'qn:          
^SHP("LEVHISTs",6,"%TOP")
5
^SHP("LEVHISTs",7)
     ----------------------------------------------------------------
^SHP("LEVHISTs",7,"%TOP")
5
^SHP("LEVHISTs",8)
     $TTTTTTTTTT:TTTTT:99999999:TTTTT:TTTTTTT:TTTTTTTTTTTTT:TTTTTTTT:1
^SHP("LEVHISTs",8,"%TOP")
5
^SHP("LEVHISTs",9)

^SHP("LEVHISTs",9,"%TOP")
0
^SHP("LEVHISTs",10)

^SHP("LEVHISTs",10,"%TOP")
0
^SHP("LEVHISTs",11)

^SHP("LEVHISTs",11,"%TOP")
0
^SHP("LEVHISTs",12)

^SHP("LEVHISTs",12,"%TOP")
0
^SHP("LEVHISTs",13)

^SHP("LEVHISTs",13,"%TOP")
0
^SHP("LEVHISTs",14)

^SHP("LEVHISTs",14,"%TOP")
0
^SHP("LEVHISTs",15)

^SHP("LEVHISTs",15,"%TOP")
0
^SHP("LEVHISTs",16)

^SHP("LEVHISTs",16,"%TOP")
0
^SHP("LEVHISTs",17)

^SHP("LEVHISTs",17,"%TOP")
0
^SHP("LEVHISTs",18)

^SHP("LEVHISTs",18,"%TOP")
0
^SHP("LEVHISTs",19)

^SHP("LEVHISTs",19,"%TOP")
0
^SHP("LEVHISTs",20)

^SHP("LEVHISTs",20,"%TOP")
0
^SHP("LEVHISTs",21)

^SHP("LEVHISTs",21,"%TOP")
0
^SHP("LEVHISTs",22)

^SHP("LEVHISTs",22,"%TOP")
0
^SHP("LEVHISTs",23)

^SHP("LEVHISTs",23,"%TOP")
0
^SHP("LEVHISTs",24)

^SHP("LEVHISTs",24,"%TOP")
0
^SHP("LEVHISTs",25)

^SHP("LEVHISTs",25,"%TOP")
0
^SHP("LEVHISTs",26)

^SHP("LEVHISTs",26,"%TOP")
0
^SHP("LEVHISTs",27)

^SHP("LEVHISTs",27,"%TOP")
0
^SHP("LEVHISTs",28)

^SHP("LEVHISTs",28,"%TOP")
0
^SHP("LEVHISTs",29)

^SHP("LEVHISTs",29,"%TOP")
0
^SHP("LEVHISTs",30)

^SHP("LEVHISTs",30,"%TOP")
0
^SHP("LEVHISTs",31)

^SHP("LEVHISTs",31,"%TOP")
0
^SHP("LEVHISTs",32)

^SHP("LEVHISTs",32,"%TOP")
0
^SHP("LEVHISTs",33)

^SHP("LEVHISTs",33,"%TOP")
0
^SHP("LEVHISTs",34)

^SHP("LEVHISTs",34,"%TOP")
0
^SHP("LEVHISTs",35)

^SHP("LEVHISTs",35,"%TOP")
0
^SHP("LEVHISTs",36)

^SHP("LEVHISTs",36,"%TOP")
0
^SHP("LEVHISTs",37)

^SHP("LEVHISTs",37,"%TOP")
0
^SHP("LEVHISTs",38)

^SHP("LEVHISTs",38,"%TOP")
0
^SHP("LEVHISTs",39)

^SHP("LEVHISTs",39,"%TOP")
0
^SHP("LEVHISTs",40)

^SHP("LEVHISTs",40,"%TOP")
0
^SHP("LEVHISTs",41)

^SHP("LEVHISTs",41,"%TOP")
0
^SHP("LEVHISTs",42)

^SHP("LEVHISTs",42,"%TOP")
0
^SHP("LEVHISTs",43)

^SHP("LEVHISTs",43,"%TOP")
0
^SHP("LEVHISTs",44)

^SHP("LEVHISTs",44,"%TOP")
0
^SHP("LEVHISTs",45)

^SHP("LEVHISTs",45,"%TOP")
0
^SHP("LEVHISTs",46)

^SHP("LEVHISTs",46,"%TOP")
0
^SHP("LEVHISTs",47)

^SHP("LEVHISTs",47,"%TOP")
0
^SHP("LEVHISTs",48)

^SHP("LEVHISTs",48,"%TOP")
0
^SHP("LEVHISTs",49)

^SHP("LEVHISTs",49,"%TOP")
0
^SHP("LEVHISTs",50)

^SHP("LEVHISTs",50,"%TOP")
0
^SHP("LEVHISTs",51)

^SHP("LEVHISTs",51,"%TOP")
0
^SHP("LEVHISTs",52)

^SHP("LEVHISTs",52,"%TOP")
0
^SHP("LEVHISTs",53)
                                                                               
^SHP("LEVHISTs",53,"%TOP")
79
^SHP("LEVHISTs",54)

^SHP("LEVHISTs",54,"%TOP")
0
^SHP("LEVHISTs",55)
                                                                   $ 
^SHP("LEVHISTs",55,"%TOP")
67
^SHP("LEVHISTs",56)
    ----------------------------------------------------------------           
^SHP("LEVHISTs",56,"%TOP")
4
^SHP("LEVHISTs","RG")
H
^SHP("LEVTIPs")
mitih zxibq
^SHP("LEVTIPs",1)
                                  &04   >: drya tih  &03     > : dtew jix`z    
^SHP("LEVTIPs",2)
                              &10  > dry  &05     > jix`z : zxnyn zxibq onf    
^SHP("LEVTIPs",3)
       -------------------------------------------------------------------
^SHP("LEVTIPs",4)
       : aygn k"dq : zery k"dq : dry cr : dryn :    caer my     :caer 'qn:     
^SHP("LEVTIPs",5)
       -------------------------------------------------------------------
^SHP("LEVTIPs",6)
       $  999999.99:     999.99:   99999: 99999:TTTTTTTTTTTTTTTT:TTTTTTTT:1
^SHP("LEVTIPs",7)

^SHP("LEVTIPs",8)

^SHP("LEVTIPs",9)

^SHP("LEVTIPs",10)

^SHP("LEVTIPs",11)

^SHP("LEVTIPs",12)

^SHP("LEVTIPs",13)

^SHP("LEVTIPs",14)

^SHP("LEVTIPs",15)

^SHP("LEVTIPs",16)

^SHP("LEVTIPs",17)

^SHP("LEVTIPs",18)

^SHP("LEVTIPs",19)

^SHP("LEVTIPs",20)

^SHP("LEVTIPs",21)

^SHP("LEVTIPs",22)

^SHP("LEVTIPs",23)

^SHP("LEVTIPs",24)

^SHP("LEVTIPs",25)

^SHP("LEVTIPs",26)

^SHP("LEVTIPs",27)

^SHP("LEVTIPs",28)

^SHP("LEVTIPs",29)

^SHP("LEVTIPs",30)

^SHP("LEVTIPs",31)

^SHP("LEVTIPs",32)

^SHP("LEVTIPs",33)

^SHP("LEVTIPs",34)

^SHP("LEVTIPs",35)

^SHP("LEVTIPs",36)

^SHP("LEVTIPs",37)

^SHP("LEVTIPs",38)

^SHP("LEVTIPs",39)

^SHP("LEVTIPs",40)

^SHP("LEVTIPs",41)

^SHP("LEVTIPs",42)

^SHP("LEVTIPs",43)

^SHP("LEVTIPs",44)

^SHP("LEVTIPs",45)

^SHP("LEVTIPs",46)

^SHP("LEVTIPs",47)

^SHP("LEVTIPs",48)

^SHP("LEVTIPs",49)

^SHP("LEVTIPs",50)

^SHP("LEVTIPs",51)

^SHP("LEVTIPs",52)

^SHP("LEVTIPs",53)
                                                                        $ 
^SHP("LEVTIPs",54)
       -------------------------------------------------------------------
^SHP("LEVTIPs",55)
          &25     >   &20     >                                                
^SHP("LEVTIPs","RG")
H
^SHP("LKH")
itqk zegewl g"ec
^SHP("LKH",1)

^SHP("LKH",2)
        &98 : sc                    &01    :dry   &06       : dqtcd jix`z
^SHP("LKH",3)

^SHP("LKH",4)
                #&03        #-cr    #&02      # -n                             
^SHP("LKH",5)
                                        #&04       # : gewl 'qn                
^SHP("LKH",6)
            #&05                     # :  gewl my                            
^SHP("LKH",7)

^SHP("LKH",8)
      #&07                        #              &10
^SHP("LKH",9)
 ----------------------------------------------------------------------------
^SHP("LKH",10)
 :   dxzi   :   zekf   :  daeg  : jix`z  :\'ayg mekq  :dcerz 'qn: dcerz beq :
^SHP("LKH",11)
 :          :          :        :        :  iy`x gewl :         :           :
^SHP("LKH",12)
 ----------------------------------------------------------------------------
^SHP("LKH",13)
 : $999999.99:999999.99:99999.99:TTTTTTTT:TTTTTTTTTTTT:TTTTTTTT : TTTTTTTTT :1
^SHP("LKH",14)
 :                                                                          :
^SHP("LKH",15)
 :                                                                          :
^SHP("LKH",16)
 :                                                                          :
^SHP("LKH",17)
 :                                                                          :
^SHP("LKH",18)
 :                                                                          :
^SHP("LKH",19)
 :                                                                          :
^SHP("LKH",20)
 :                                                                          :
^SHP("LKH",21)
 :                                                                          :
^SHP("LKH",22)
 :                                                                          :
^SHP("LKH",23)
 :                                                                          :
^SHP("LKH",24)
 :                                                                          :
^SHP("LKH",25)
 :                                                                          :
^SHP("LKH",26)
 :                                                                          :
^SHP("LKH",27)
 :                                                                          :
^SHP("LKH",28)
 :                                                                          :
^SHP("LKH",29)
 :                                                                          :
^SHP("LKH",30)
 :                                                                          :
^SHP("LKH",31)
 :                                                                          :
^SHP("LKH",32)
 :                                                                          :
^SHP("LKH",33)
 :                                                                          :
^SHP("LKH",34)
 :                                                                          :
^SHP("LKH",35)
 :                                                                          :
^SHP("LKH",36)
 :                                                                          :
^SHP("LKH",37)
 :                                                                          :
^SHP("LKH",38)
 :                                                                          :
^SHP("LKH",39)
 :                                                                          :
^SHP("LKH",40)
 :                                                                          :
^SHP("LKH",41)
 :                                                                          :
^SHP("LKH",42)
 :                                                                          :
^SHP("LKH",43)
 :                                                                          :
^SHP("LKH",44)
 :                                                                          :
^SHP("LKH",45)
 :                                                                          :
^SHP("LKH",46)
 :                                                                          :
^SHP("LKH",47)
 :                                                                          :
^SHP("LKH",48)
 :                                                                          :
^SHP("LKH",49)
 :                                                                          :
^SHP("LKH",50)
 :                                                                          :
^SHP("LKH",51)
 :                                                                         $:
^SHP("LKH",52)
 ----------------------------------------------------------------------------
^SHP("LKH",53)

^SHP("LKH",54)

^SHP("LKH",55)

^SHP("LKH",56)

^SHP("LKH","RG")
H
^SHP("LKHHIP1s")
dcy oekcr
^SHP("LKHHIP1s",1)
                                                                               
^SHP("LKHHIP1s",2)
            #&10                  ># dcy oekcr                                 
^SHP("LKHHIP1s",3)
  --------------------------------------------------------------------------
^SHP("LKHHIP1s",4)
  :            :  ycg   :            :   oyi  :      gewl my    : gewl 'qn :   
^SHP("LKHHIP1s",5)
  --------------------------------------------------------------------------
^SHP("LKHHIP1s",6)
  $TTTTTTTTTTTT:TTTTTTTT:TTTTTTTTTTTT:TTTTTTTTT:TTTTTTTTTTTTTTTTT:9999999999:1
^SHP("LKHHIP1s",7)

^SHP("LKHHIP1s",8)
                                                                               
^SHP("LKHHIP1s",9)
                                                                               
^SHP("LKHHIP1s",10)

^SHP("LKHHIP1s",11)

^SHP("LKHHIP1s",12)

^SHP("LKHHIP1s",13)

^SHP("LKHHIP1s",14)

^SHP("LKHHIP1s",15)

^SHP("LKHHIP1s",16)

^SHP("LKHHIP1s",17)

^SHP("LKHHIP1s",18)

^SHP("LKHHIP1s",19)

^SHP("LKHHIP1s",20)

^SHP("LKHHIP1s",21)

^SHP("LKHHIP1s",22)

^SHP("LKHHIP1s",23)

^SHP("LKHHIP1s",24)

^SHP("LKHHIP1s",25)

^SHP("LKHHIP1s",26)

^SHP("LKHHIP1s",27)

^SHP("LKHHIP1s",28)

^SHP("LKHHIP1s",29)

^SHP("LKHHIP1s",30)

^SHP("LKHHIP1s",31)

^SHP("LKHHIP1s",32)

^SHP("LKHHIP1s",33)

^SHP("LKHHIP1s",34)

^SHP("LKHHIP1s",35)

^SHP("LKHHIP1s",36)

^SHP("LKHHIP1s",37)

^SHP("LKHHIP1s",38)

^SHP("LKHHIP1s",39)

^SHP("LKHHIP1s",40)

^SHP("LKHHIP1s",41)

^SHP("LKHHIP1s",42)

^SHP("LKHHIP1s",43)

^SHP("LKHHIP1s",44)

^SHP("LKHHIP1s",45)

^SHP("LKHHIP1s",46)

^SHP("LKHHIP1s",47)

^SHP("LKHHIP1s",48)

^SHP("LKHHIP1s",49)

^SHP("LKHHIP1s",50)
                                                                               
^SHP("LKHHIP1s",51)
                                                                               
^SHP("LKHHIP1s",52)

^SHP("LKHHIP1s",53)

^SHP("LKHHIP1s",54)
                                                                          $ 
^SHP("LKHHIP1s",55)
  --------------------------------------------------------------------------
^SHP("LKHHIP1s",56)
                                                                               
^SHP("LKHHIP1s","RG")
H
^SHP("LKHT")
TAVLA LAKOHOT
^SHP("LKHT",1)
                                # zegewl ihxt #      
^SHP("LKHT",1,"%TOP")
32
^SHP("LKHT",2)
  #&98  #:sc
^SHP("LKHT",2,"%TOP")
2
^SHP("LKHT",3)
                                                    &02           :oein beq
^SHP("LKHT",3,"%TOP")
52
^SHP("LKHT",4)
    #&03        #:dqtcd jix`z    #&05         #:gewl cr  #&04       #:gewln
^SHP("LKHT",4,"%TOP")
4
^SHP("LKHT",5)
 ----------------------------------------------------------------------------- 
^SHP("LKHT",5,"%TOP")
1
^SHP("LKHT",6)
 :   oetlh    :&06        :         zaezk       :          my     :&07  > 'qn: 
^SHP("LKHT",6,"%TOP")
1
^SHP("LKHT",7)
 ----------------------------------------------------------------------------- 
^SHP("LKHT",7,"%TOP")
1
^SHP("LKHT",8)
 :$   TP      : TTTTTTTTTT:           TP        :          TP     :TTTTTTTTTT:1
^SHP("LKHT",8,"%TOP")
1
^SHP("LKHT",9)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT",9,"%TOP")
1
^SHP("LKHT",10)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT",10,"%TOP")
1
^SHP("LKHT",11)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT",11,"%TOP")
1
^SHP("LKHT",12)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT",12,"%TOP")
1
^SHP("LKHT",13)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT",13,"%TOP")
1
^SHP("LKHT",14)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT",14,"%TOP")
1
^SHP("LKHT",15)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT",15,"%TOP")
1
^SHP("LKHT",16)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT",16,"%TOP")
1
^SHP("LKHT",17)
 :           :      :      :   :                        :             :      : 
^SHP("LKHT",17,"%TOP")
1
^SHP("LKHT",18)
 :           :      :      :   :                        :             :      : 
^SHP("LKHT",18,"%TOP")
1
^SHP("LKHT",19)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT",19,"%TOP")
1
^SHP("LKHT",20)
 :           :      :      :   :                        :             :     $: 
^SHP("LKHT",20,"%TOP")
1
^SHP("LKHT",21)
 ----------------------------------------------------------------------------- 
^SHP("LKHT",21,"%TOP")
1
^SHP("LKHT","RG")
H
^SHP("LKHT2")
PRINT
^SHP("LKHT2",1)
                                # zegewl ihxt #      
^SHP("LKHT2",2)
  #&98  #:sc
^SHP("LKHT2",3)
                                                    &02           :oein beq
^SHP("LKHT2",4)
  &03        :dqtcd jix`z            &05         :gewl cr  &04       :gewln
^SHP("LKHT2",5)
 ----------------------------------------------------------------------------- 
^SHP("LKHT2",6)
 :   oetlh    :&06        :         zaezk       :          my     :&07  > 'qn: 
^SHP("LKHT2",7)
 ----------------------------------------------------------------------------- 
^SHP("LKHT2",8)
 :$   TP      : TTTTTTTTTT:           TP        :          TP     :TTTTTTTTTT:1
^SHP("LKHT2",9)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",10)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",11)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",12)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",13)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",14)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",15)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",16)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",17)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",18)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",19)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",20)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",21)
 :           :      :      :   :                        :             :      : 
^SHP("LKHT2",22)
 :           :      :      :   :                        :             :      : 
^SHP("LKHT2",23)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",24)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",25)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",26)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",27)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",28)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",29)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",30)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",31)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",32)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",33)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",34)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",35)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",36)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",37)
 :           :      :      :   :                        :             :      : 
^SHP("LKHT2",38)
 :           :      :      :   :                        :             :      : 
^SHP("LKHT2",39)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",40)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",41)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",42)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",43)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",44)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",45)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",46)
 :           :      :      :   :                        :             :      : 
^SHP("LKHT2",47)
 :           :      :      :   :                        :             :      : 
^SHP("LKHT2",48)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",49)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",50)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",51)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",52)
 :           :      :      :   :                        :             :      : 
^SHP("LKHT2",53)
 :           :      :      :   :                        :             :      : 
^SHP("LKHT2",54)
 :           :      :      :      :                     :             :      : 
^SHP("LKHT2",55)
 :           :      :      :   :                        :             :     $: 
^SHP("LKHT2",56)
 ----------------------------------------------------------------------------- 
^SHP("LKHT2","RG")
H
^SHP("P1AREAs")

^SHP("P1AREAs",1)
                                    # mixef` zlah #                            
^SHP("P1AREAs",2)
                                                                               
^SHP("P1AREAs",3)
                                                  &05          > : xir         
^SHP("P1AREAs",4)
                  ------------------------------------------------------
^SHP("P1AREAs",5)
                  : gelyn inc :  xef`  : 'qn cr :          aegx        :       
^SHP("P1AREAs",6)
                  ------------------------------------------------------
^SHP("P1AREAs",7)
                  $    9999.99:TTTTTTTT:TTTTTTTT:TTTTTTTTTTTTTTTTTTTTTT:1
^SHP("P1AREAs",8)

^SHP("P1AREAs",9)

^SHP("P1AREAs",10)

^SHP("P1AREAs",11)

^SHP("P1AREAs",12)

^SHP("P1AREAs",13)

^SHP("P1AREAs",14)

^SHP("P1AREAs",15)

^SHP("P1AREAs",16)

^SHP("P1AREAs",17)

^SHP("P1AREAs",18)

^SHP("P1AREAs",19)

^SHP("P1AREAs",20)

^SHP("P1AREAs",21)

^SHP("P1AREAs",22)

^SHP("P1AREAs",23)

^SHP("P1AREAs",24)

^SHP("P1AREAs",25)

^SHP("P1AREAs",26)

^SHP("P1AREAs",27)

^SHP("P1AREAs",28)

^SHP("P1AREAs",29)

^SHP("P1AREAs",30)

^SHP("P1AREAs",31)

^SHP("P1AREAs",32)

^SHP("P1AREAs",33)

^SHP("P1AREAs",34)

^SHP("P1AREAs",35)

^SHP("P1AREAs",36)

^SHP("P1AREAs",37)

^SHP("P1AREAs",38)

^SHP("P1AREAs",39)

^SHP("P1AREAs",40)

^SHP("P1AREAs",41)

^SHP("P1AREAs",42)

^SHP("P1AREAs",43)

^SHP("P1AREAs",44)

^SHP("P1AREAs",45)

^SHP("P1AREAs",46)

^SHP("P1AREAs",47)

^SHP("P1AREAs",48)

^SHP("P1AREAs",49)

^SHP("P1AREAs",50)

^SHP("P1AREAs",51)
                                                                               
^SHP("P1AREAs",52)
                                                                               
^SHP("P1AREAs",53)
                                                                               
^SHP("P1AREAs",54)

^SHP("P1AREAs",55)
                                                                      $ 
^SHP("P1AREAs",56)
                 ------------------------------------------------------        
^SHP("P1AREAs","RG")
H
^SHP("P1AVDs")

^SHP("P1AVDs",1)
                 #&07  >  &05      > jix`zl inei g"ec #                        
^SHP("P1AVDs",2)
                                     # micaer g"ec (d #                        
^SHP("P1AVDs",3)
                                                                               
^SHP("P1AVDs",4)
               -------------------------------------------------------
^SHP("P1AVDs",5)
               : dcear zery :   'f'z    :      caer my    : caer 'qn :         
^SHP("P1AVDs",6)
               -------------------------------------------------------
^SHP("P1AVDs",7)
               $      999999:  999999999:TTTTTTTTTTTTTTTTT:     99999:1
^SHP("P1AVDs",8)

^SHP("P1AVDs",9)

^SHP("P1AVDs",10)

^SHP("P1AVDs",11)

^SHP("P1AVDs",12)

^SHP("P1AVDs",13)

^SHP("P1AVDs",14)

^SHP("P1AVDs",15)

^SHP("P1AVDs",16)

^SHP("P1AVDs",17)

^SHP("P1AVDs",18)

^SHP("P1AVDs",19)

^SHP("P1AVDs",20)

^SHP("P1AVDs",21)

^SHP("P1AVDs",22)

^SHP("P1AVDs",23)

^SHP("P1AVDs",24)

^SHP("P1AVDs",25)

^SHP("P1AVDs",26)

^SHP("P1AVDs",27)

^SHP("P1AVDs",28)

^SHP("P1AVDs",29)

^SHP("P1AVDs",30)

^SHP("P1AVDs",31)

^SHP("P1AVDs",32)

^SHP("P1AVDs",33)

^SHP("P1AVDs",34)

^SHP("P1AVDs",35)

^SHP("P1AVDs",36)

^SHP("P1AVDs",37)

^SHP("P1AVDs",38)

^SHP("P1AVDs",39)

^SHP("P1AVDs",40)

^SHP("P1AVDs",41)

^SHP("P1AVDs",42)

^SHP("P1AVDs",43)

^SHP("P1AVDs",44)

^SHP("P1AVDs",45)

^SHP("P1AVDs",46)

^SHP("P1AVDs",47)

^SHP("P1AVDs",48)

^SHP("P1AVDs",49)

^SHP("P1AVDs",50)

^SHP("P1AVDs",51)

^SHP("P1AVDs",52)

^SHP("P1AVDs",53)

^SHP("P1AVDs",54)
                                                                    $ 
^SHP("P1AVDs",55)
               -------------------------------------------------------
^SHP("P1AVDs",56)
                                                                               
^SHP("P1AVDs","RG")
H
^SHP("P1BARMAN")
mipnxa zlah
^SHP("P1BARMAN",1)
                                 # mipnxa zniyx #                              
^SHP("P1BARMAN",2)
                           &03 : jqn sca iaxin zexey 'qn                       
^SHP("P1BARMAN",3)
                           &05 :         dxeya ze`qk 'qn                       
^SHP("P1BARMAN",4)
                         ------------------------------
^SHP("P1BARMAN",5)
                         :      onxa my    : onxa 'qn :                        
^SHP("P1BARMAN",6)
                         ------------------------------
^SHP("P1BARMAN",7)
                         $TTTTTTTTTTTTTTTTT:     99999:1
^SHP("P1BARMAN",8)

^SHP("P1BARMAN",9)

^SHP("P1BARMAN",10)

^SHP("P1BARMAN",11)
                                                                               
^SHP("P1BARMAN",12)
                                                                               
^SHP("P1BARMAN",13)
                                                                               
^SHP("P1BARMAN",14)
                                                                               
^SHP("P1BARMAN",15)

^SHP("P1BARMAN",16)

^SHP("P1BARMAN",17)

^SHP("P1BARMAN",18)

^SHP("P1BARMAN",19)

^SHP("P1BARMAN",20)

^SHP("P1BARMAN",21)

^SHP("P1BARMAN",22)

^SHP("P1BARMAN",23)

^SHP("P1BARMAN",24)

^SHP("P1BARMAN",25)
                                                     $ 
^SHP("P1BARMAN",26)
                         ------------------------------
^SHP("P1BARMAN",27)
                                                                               
^SHP("P1BARMAN","RG")
H
^SHP("P1BARMANs",1)
                                 # mipnxa zniyx #                              
^SHP("P1BARMANs",1,"%TOP")
33
^SHP("P1BARMANs",2)
                           &03 : jqn sca iaxin zexey 'qn                       
^SHP("P1BARMANs",2,"%TOP")
27
^SHP("P1BARMANs",3)
                           &05 :         dxeya ze`qk 'qn                       
^SHP("P1BARMANs",3,"%TOP")
27
^SHP("P1BARMANs",4)
                         ------------------------------
^SHP("P1BARMANs",4,"%TOP")
25
^SHP("P1BARMANs",5)
                         :      onxa my    : onxa 'qn :                        
^SHP("P1BARMANs",5,"%TOP")
25
^SHP("P1BARMANs",6)
                         ------------------------------
^SHP("P1BARMANs",6,"%TOP")
25
^SHP("P1BARMANs",7)
                         $TTTTTTTTTTTTTTTTT:     99999:1
^SHP("P1BARMANs",7,"%TOP")
25
^SHP("P1BARMANs",8)

^SHP("P1BARMANs",8,"%TOP")
0
^SHP("P1BARMANs",9)

^SHP("P1BARMANs",9,"%TOP")
0
^SHP("P1BARMANs",10)

^SHP("P1BARMANs",10,"%TOP")
0
^SHP("P1BARMANs",11)

^SHP("P1BARMANs",11,"%TOP")
0
^SHP("P1BARMANs",12)

^SHP("P1BARMANs",12,"%TOP")
0
^SHP("P1BARMANs",13)

^SHP("P1BARMANs",13,"%TOP")
0
^SHP("P1BARMANs",14)

^SHP("P1BARMANs",14,"%TOP")
0
^SHP("P1BARMANs",15)

^SHP("P1BARMANs",15,"%TOP")
0
^SHP("P1BARMANs",16)

^SHP("P1BARMANs",16,"%TOP")
0
^SHP("P1BARMANs",17)

^SHP("P1BARMANs",17,"%TOP")
0
^SHP("P1BARMANs",18)

^SHP("P1BARMANs",18,"%TOP")
0
^SHP("P1BARMANs",19)

^SHP("P1BARMANs",19,"%TOP")
0
^SHP("P1BARMANs",20)

^SHP("P1BARMANs",20,"%TOP")
0
^SHP("P1BARMANs",21)

^SHP("P1BARMANs",21,"%TOP")
0
^SHP("P1BARMANs",22)

^SHP("P1BARMANs",22,"%TOP")
0
^SHP("P1BARMANs",23)

^SHP("P1BARMANs",23,"%TOP")
0
^SHP("P1BARMANs",24)

^SHP("P1BARMANs",24,"%TOP")
0
^SHP("P1BARMANs",25)

^SHP("P1BARMANs",25,"%TOP")
0
^SHP("P1BARMANs",26)

^SHP("P1BARMANs",26,"%TOP")
0
^SHP("P1BARMANs",27)

^SHP("P1BARMANs",27,"%TOP")
0
^SHP("P1BARMANs",28)

^SHP("P1BARMANs",28,"%TOP")
0
^SHP("P1BARMANs",29)

^SHP("P1BARMANs",29,"%TOP")
0
^SHP("P1BARMANs",30)

^SHP("P1BARMANs",30,"%TOP")
0
^SHP("P1BARMANs",31)

^SHP("P1BARMANs",31,"%TOP")
0
^SHP("P1BARMANs",32)

^SHP("P1BARMANs",32,"%TOP")
0
^SHP("P1BARMANs",33)

^SHP("P1BARMANs",33,"%TOP")
0
^SHP("P1BARMANs",34)

^SHP("P1BARMANs",34,"%TOP")
0
^SHP("P1BARMANs",35)

^SHP("P1BARMANs",35,"%TOP")
0
^SHP("P1BARMANs",36)

^SHP("P1BARMANs",36,"%TOP")
0
^SHP("P1BARMANs",37)

^SHP("P1BARMANs",37,"%TOP")
0
^SHP("P1BARMANs",38)

^SHP("P1BARMANs",38,"%TOP")
0
^SHP("P1BARMANs",39)

^SHP("P1BARMANs",39,"%TOP")
0
^SHP("P1BARMANs",40)
                                                     $ 
^SHP("P1BARMANs",40,"%TOP")
53
^SHP("P1BARMANs",41)
                         ------------------------------
^SHP("P1BARMANs",41,"%TOP")
25
^SHP("P1BARMANs",42)
                                                                               
^SHP("P1BARMANs",42,"%TOP")
79
^SHP("P1BARMANs",43)
                                                                               
^SHP("P1BARMANs",43,"%TOP")
79
^SHP("P1BARMANs",44)
                                                                               
^SHP("P1BARMANs",44,"%TOP")
79
^SHP("P1BARMANs",45)
                                                                               
^SHP("P1BARMANs",45,"%TOP")
79
^SHP("P1BARMANs",46)
                                                                               
^SHP("P1BARMANs",46,"%TOP")
79
^SHP("P1BARMANs",47)
                                                                               
^SHP("P1BARMANs",47,"%TOP")
79
^SHP("P1BARMANs",48)
                                                                               
^SHP("P1BARMANs",48,"%TOP")
79
^SHP("P1BARMANs",49)
                                                                               
^SHP("P1BARMANs",49,"%TOP")
79
^SHP("P1BARMANs",50)
                                                                               
^SHP("P1BARMANs",50,"%TOP")
79
^SHP("P1BARMANs",51)
                                                                               
^SHP("P1BARMANs",51,"%TOP")
79
^SHP("P1BARMANs",52)
                                                                               
^SHP("P1BARMANs",52,"%TOP")
79
^SHP("P1BARMANs",53)
                                                                               
^SHP("P1BARMANs",53,"%TOP")
79
^SHP("P1BARMANs",54)
                                                                               
^SHP("P1BARMANs",54,"%TOP")
79
^SHP("P1BARMANs",55)
                                                                               
^SHP("P1BARMANs",55,"%TOP")
79
^SHP("P1BARMANs",56)
                                                                               
^SHP("P1BARMANs",56,"%TOP")
79
^SHP("P1BARMANs","RG")
H
^SHP("P1CARDs")

^SHP("P1CARDs",1)
                           #  miqihxk zniyx  #                                 
^SHP("P1CARDs",2)
                                                                               
^SHP("P1CARDs",3)
                      -------------------------------------------
^SHP("P1CARDs",4)
                      :  xign  :        hixt xe`z    : hixt cew :              
^SHP("P1CARDs",5)
                      -------------------------------------------
^SHP("P1CARDs",6)
                      $99999.99:TTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("P1CARDs",7)

^SHP("P1CARDs",8)

^SHP("P1CARDs",9)

^SHP("P1CARDs",10)

^SHP("P1CARDs",11)

^SHP("P1CARDs",12)

^SHP("P1CARDs",13)

^SHP("P1CARDs",14)

^SHP("P1CARDs",15)

^SHP("P1CARDs",16)

^SHP("P1CARDs",17)

^SHP("P1CARDs",18)

^SHP("P1CARDs",19)

^SHP("P1CARDs",20)

^SHP("P1CARDs",21)

^SHP("P1CARDs",22)

^SHP("P1CARDs",23)

^SHP("P1CARDs",24)

^SHP("P1CARDs",25)

^SHP("P1CARDs",26)

^SHP("P1CARDs",27)

^SHP("P1CARDs",28)

^SHP("P1CARDs",29)

^SHP("P1CARDs",30)

^SHP("P1CARDs",31)

^SHP("P1CARDs",32)

^SHP("P1CARDs",33)

^SHP("P1CARDs",34)

^SHP("P1CARDs",35)

^SHP("P1CARDs",36)

^SHP("P1CARDs",37)

^SHP("P1CARDs",38)

^SHP("P1CARDs",39)

^SHP("P1CARDs",40)

^SHP("P1CARDs",41)

^SHP("P1CARDs",42)

^SHP("P1CARDs",43)

^SHP("P1CARDs",44)

^SHP("P1CARDs",45)

^SHP("P1CARDs",46)

^SHP("P1CARDs",47)

^SHP("P1CARDs",48)

^SHP("P1CARDs",49)

^SHP("P1CARDs",50)

^SHP("P1CARDs",51)

^SHP("P1CARDs",52)

^SHP("P1CARDs",53)

^SHP("P1CARDs",54)

^SHP("P1CARDs",55)
                                                               $ 
^SHP("P1CARDs",56)
                      -------------------------------------------
^SHP("P1CARDs",57)
                                                                               
^SHP("P1CARDs","RG")
H
^SHP("P1CASs")
`"k
^SHP("P1CASs",1)
                        # wtqa `"k zniyx #                                     
^SHP("P1CASs",2)
                                                                               
^SHP("P1CASs",3)
                       -----------------------------
^SHP("P1CASs",4)
                       :           `"k 'qn         :                           
^SHP("P1CASs",5)
                       -----------------------------
^SHP("P1CASs",6)
                       $TTTTTTTTTTTTTTTTTTTTTTTTTTT:1
^SHP("P1CASs",7)

^SHP("P1CASs",8)

^SHP("P1CASs",9)

^SHP("P1CASs",10)

^SHP("P1CASs",11)

^SHP("P1CASs",12)

^SHP("P1CASs",13)

^SHP("P1CASs",14)

^SHP("P1CASs",15)

^SHP("P1CASs",16)

^SHP("P1CASs",17)

^SHP("P1CASs",18)

^SHP("P1CASs",19)

^SHP("P1CASs",20)

^SHP("P1CASs",21)

^SHP("P1CASs",22)

^SHP("P1CASs",23)

^SHP("P1CASs",24)

^SHP("P1CASs",25)

^SHP("P1CASs",26)

^SHP("P1CASs",27)

^SHP("P1CASs",28)

^SHP("P1CASs",29)

^SHP("P1CASs",30)

^SHP("P1CASs",31)

^SHP("P1CASs",32)

^SHP("P1CASs",33)

^SHP("P1CASs",34)

^SHP("P1CASs",35)

^SHP("P1CASs",36)

^SHP("P1CASs",37)

^SHP("P1CASs",38)

^SHP("P1CASs",39)

^SHP("P1CASs",40)

^SHP("P1CASs",41)

^SHP("P1CASs",42)

^SHP("P1CASs",43)

^SHP("P1CASs",44)

^SHP("P1CASs",45)

^SHP("P1CASs",46)

^SHP("P1CASs",47)

^SHP("P1CASs",48)

^SHP("P1CASs",49)

^SHP("P1CASs",50)

^SHP("P1CASs",51)

^SHP("P1CASs",52)

^SHP("P1CASs",53)
                                                  $ 
^SHP("P1CASs",54)
                       -----------------------------
^SHP("P1CASs",55)
                                                                               
^SHP("P1CASs","RG")
H
^SHP("P1CBs")
qn iekip
^SHP("P1CBs",1)
                         #&03                     >#                           
^SHP("P1CBs",2)
                                                                               
^SHP("P1CBs",3)
                     &10      >:jix`z cr    &05      >:jix`zn                  
^SHP("P1CBs",4)
   ------------------------------------------------------------------------
^SHP("P1CBs",5)
   : melyz beq :xewn qn:   gewld my    : gewl 'qn :   mekq  :dlaw: jix`z  :    
^SHP("P1CBs",6)
   ------------------------------------------------------------------------
^SHP("P1CBs",7)
   $TTTTTTTTTTT: 999.99:TTTTTTTTTTTTTTT:TTTTTTTTTT:999999.99:TTTT:99999999:1
^SHP("P1CBs",8)

^SHP("P1CBs",9)

^SHP("P1CBs",10)

^SHP("P1CBs",11)

^SHP("P1CBs",12)

^SHP("P1CBs",13)

^SHP("P1CBs",14)

^SHP("P1CBs",15)

^SHP("P1CBs",16)

^SHP("P1CBs",17)

^SHP("P1CBs",18)

^SHP("P1CBs",19)

^SHP("P1CBs",20)

^SHP("P1CBs",21)

^SHP("P1CBs",22)

^SHP("P1CBs",23)

^SHP("P1CBs",24)

^SHP("P1CBs",25)

^SHP("P1CBs",26)

^SHP("P1CBs",27)

^SHP("P1CBs",28)

^SHP("P1CBs",29)

^SHP("P1CBs",30)

^SHP("P1CBs",31)

^SHP("P1CBs",32)

^SHP("P1CBs",33)

^SHP("P1CBs",34)

^SHP("P1CBs",35)

^SHP("P1CBs",36)

^SHP("P1CBs",37)

^SHP("P1CBs",38)

^SHP("P1CBs",39)

^SHP("P1CBs",40)

^SHP("P1CBs",41)

^SHP("P1CBs",42)

^SHP("P1CBs",43)

^SHP("P1CBs",44)

^SHP("P1CBs",45)

^SHP("P1CBs",46)

^SHP("P1CBs",47)

^SHP("P1CBs",48)

^SHP("P1CBs",49)

^SHP("P1CBs",50)

^SHP("P1CBs",51)

^SHP("P1CBs",52)

^SHP("P1CBs",53)
                                                                         $ 
^SHP("P1CBs",54)
   ------------------------------------------------------------------------
^SHP("P1CBs",55)
                                                                               
^SHP("P1CBs",56)
             &25     >:qn iekip k"dq      &20       >:k"dq  &15  >:zelaw       
^SHP("P1CBs","RG")
H
^SHP("P1CODHs")
zexrd zlah
^SHP("P1CODHs",1)
                                 # zexrd zlah #                                
^SHP("P1CODHs",2)
                                                                               
^SHP("P1CODHs",3)
                                ---------------------------------
^SHP("P1CODHs",4)
                                :        dxrd       : dxrd 'qn  :              
^SHP("P1CODHs",5)
                                ---------------------------------
^SHP("P1CODHs",6)
                                $TTTTTTTTTTTTTTTTTTT:TTTTTTTTTTT:1
^SHP("P1CODHs",7)

^SHP("P1CODHs",8)

^SHP("P1CODHs",9)

^SHP("P1CODHs",10)

^SHP("P1CODHs",11)

^SHP("P1CODHs",12)

^SHP("P1CODHs",13)

^SHP("P1CODHs",14)

^SHP("P1CODHs",15)

^SHP("P1CODHs",16)

^SHP("P1CODHs",17)

^SHP("P1CODHs",18)

^SHP("P1CODHs",19)

^SHP("P1CODHs",20)

^SHP("P1CODHs",21)

^SHP("P1CODHs",22)

^SHP("P1CODHs",23)

^SHP("P1CODHs",24)

^SHP("P1CODHs",25)

^SHP("P1CODHs",26)

^SHP("P1CODHs",27)

^SHP("P1CODHs",28)

^SHP("P1CODHs",29)

^SHP("P1CODHs",30)

^SHP("P1CODHs",31)

^SHP("P1CODHs",32)

^SHP("P1CODHs",33)

^SHP("P1CODHs",34)

^SHP("P1CODHs",35)

^SHP("P1CODHs",36)

^SHP("P1CODHs",37)

^SHP("P1CODHs",38)

^SHP("P1CODHs",39)

^SHP("P1CODHs",40)

^SHP("P1CODHs",41)

^SHP("P1CODHs",42)

^SHP("P1CODHs",43)

^SHP("P1CODHs",44)

^SHP("P1CODHs",45)

^SHP("P1CODHs",46)

^SHP("P1CODHs",47)

^SHP("P1CODHs",48)

^SHP("P1CODHs",49)

^SHP("P1CODHs",50)

^SHP("P1CODHs",51)

^SHP("P1CODHs",52)

^SHP("P1CODHs",53)
                                                               $ 
^SHP("P1CODHs",54)
                                ---------------------------------
^SHP("P1CODHs",55)
                                                                               
^SHP("P1CODHs",56)
                                                                               
^SHP("P1CODHs","RG")
H
^SHP("P1CTLs")
q ixg` elheay zepnfd
^SHP("P1CTLs",1)
          # dzxibq ixg` elheay zepnfd g"ec #                                   
^SHP("P1CTLs",2)
                                                                               
^SHP("P1CTLs",3)
                        &10      >: jix`z cr  &05     >: jix`zn                
^SHP("P1CTLs",4)
                                                                               
^SHP("P1CTLs",5)
        &12: 3 - mlek ,2 - xefgy mr , 1 - xefgy `ll elheay zepnfd wx bivdl     
^SHP("P1CTLs",6)
          ---------------------------------------------------------------
^SHP("P1CTLs",7)
          :  mekq  : dpnfd 'qn :  mekq  : zpnfd qn :  mekq  : dpnfd 'qn :      
^SHP("P1CTLs",8)
          :        :     zxfeg :        :    lehia :        :    zixewn :      
^SHP("P1CTLs",9)
          ---------------------------------------------------------------
^SHP("P1CTLs",10)
          $99999.99:TTTTTTTTTTT:99999.99:TTTTTTTTTT:99999.99:TTTTTTTTTTT:1
^SHP("P1CTLs",11)

^SHP("P1CTLs",12)

^SHP("P1CTLs",13)

^SHP("P1CTLs",14)

^SHP("P1CTLs",15)

^SHP("P1CTLs",16)

^SHP("P1CTLs",17)

^SHP("P1CTLs",18)

^SHP("P1CTLs",19)

^SHP("P1CTLs",20)

^SHP("P1CTLs",21)

^SHP("P1CTLs",22)

^SHP("P1CTLs",23)

^SHP("P1CTLs",24)

^SHP("P1CTLs",25)

^SHP("P1CTLs",26)

^SHP("P1CTLs",27)

^SHP("P1CTLs",28)

^SHP("P1CTLs",29)

^SHP("P1CTLs",30)

^SHP("P1CTLs",31)

^SHP("P1CTLs",32)

^SHP("P1CTLs",33)

^SHP("P1CTLs",34)

^SHP("P1CTLs",35)

^SHP("P1CTLs",36)

^SHP("P1CTLs",37)

^SHP("P1CTLs",38)

^SHP("P1CTLs",39)

^SHP("P1CTLs",40)

^SHP("P1CTLs",41)

^SHP("P1CTLs",42)

^SHP("P1CTLs",43)

^SHP("P1CTLs",44)

^SHP("P1CTLs",45)

^SHP("P1CTLs",46)

^SHP("P1CTLs",47)

^SHP("P1CTLs",48)

^SHP("P1CTLs",49)

^SHP("P1CTLs",50)

^SHP("P1CTLs",51)

^SHP("P1CTLs",52)

^SHP("P1CTLs",53)

^SHP("P1CTLs",54)
                                                                       $ 
^SHP("P1CTLs",55)
          ---------------------------------------------------------------
^SHP("P1CTLs",56)
          :&25    >:           :&20    >:          :&15    >:           :      
^SHP("P1CTLs",57)
          ---------------------------------------------------------------      
^SHP("P1CTLs","RG")
H
^SHP("P1DCIBML")

^SHP("P1DCIBML",1)
              # "qeaiq" zegewl oecren g"ec #                                   
^SHP("P1DCIBML",2)
                    &05      >: jix`z cr    &01      >: jix`zn                 
^SHP("P1DCIBML",3)
   ------------------------------------------------------------------------
^SHP("P1DCIBML",4)
   :sqka mley:zecewpa mley: melyzl :zecewp:  qihxk 'qn :dpnfd 'qn:  jix`z :    
^SHP("P1DCIBML",5)
   ------------------------------------------------------------------------
^SHP("P1DCIBML",6)
   $ 99999.99:     9999.99:99999.99:999999:TTTTTTTTTTTT:TTTTTTTTT:99999999:1
^SHP("P1DCIBML",7)

^SHP("P1DCIBML",8)

^SHP("P1DCIBML",9)

^SHP("P1DCIBML",10)

^SHP("P1DCIBML",11)

^SHP("P1DCIBML",12)

^SHP("P1DCIBML",13)

^SHP("P1DCIBML",14)

^SHP("P1DCIBML",15)

^SHP("P1DCIBML",16)

^SHP("P1DCIBML",17)

^SHP("P1DCIBML",18)

^SHP("P1DCIBML",19)

^SHP("P1DCIBML",20)

^SHP("P1DCIBML",21)

^SHP("P1DCIBML",22)

^SHP("P1DCIBML",23)

^SHP("P1DCIBML",24)

^SHP("P1DCIBML",25)

^SHP("P1DCIBML",26)

^SHP("P1DCIBML",27)

^SHP("P1DCIBML",28)

^SHP("P1DCIBML",29)

^SHP("P1DCIBML",30)

^SHP("P1DCIBML",31)

^SHP("P1DCIBML",32)

^SHP("P1DCIBML",33)

^SHP("P1DCIBML",34)

^SHP("P1DCIBML",35)

^SHP("P1DCIBML",36)

^SHP("P1DCIBML",37)

^SHP("P1DCIBML",38)

^SHP("P1DCIBML",39)

^SHP("P1DCIBML",40)

^SHP("P1DCIBML",41)

^SHP("P1DCIBML",42)

^SHP("P1DCIBML",43)

^SHP("P1DCIBML",44)

^SHP("P1DCIBML",45)

^SHP("P1DCIBML",46)

^SHP("P1DCIBML",47)

^SHP("P1DCIBML",48)

^SHP("P1DCIBML",49)

^SHP("P1DCIBML",50)

^SHP("P1DCIBML",51)

^SHP("P1DCIBML",52)

^SHP("P1DCIBML",53)
                                                                         $ 
^SHP("P1DCIBML",54)
   ------------------------------------------------------------------------
^SHP("P1DCIBML",55)
                                                                               
^SHP("P1DCIBML",56)
   &25      > &15      >  &10     >                                            
^SHP("P1DCIBML","RG")
H
^SHP("P1DCIBMLs",1)
              # "qeaiq" zegewl oecren g"ec #                                   
^SHP("P1DCIBMLs",1,"%TOP")
14
^SHP("P1DCIBMLs",2)
                    &05      >: jix`z cr    &01      >: jix`zn                 
^SHP("P1DCIBMLs",2,"%TOP")
20
^SHP("P1DCIBMLs",3)
   ------------------------------------------------------------------------
^SHP("P1DCIBMLs",3,"%TOP")
3
^SHP("P1DCIBMLs",4)
   :sqka mley:zecewpa mley: melyzl :zecewp:  qihxk 'qn :dpnfd 'qn:  jix`z :    
^SHP("P1DCIBMLs",4,"%TOP")
3
^SHP("P1DCIBMLs",5)
   ------------------------------------------------------------------------
^SHP("P1DCIBMLs",5,"%TOP")
3
^SHP("P1DCIBMLs",6)
   $ 99999.99:     9999.99:99999.99:999999:TTTTTTTTTTTT:TTTTTTTTT:99999999:1
^SHP("P1DCIBMLs",6,"%TOP")
3
^SHP("P1DCIBMLs",7)

^SHP("P1DCIBMLs",7,"%TOP")
0
^SHP("P1DCIBMLs",8)

^SHP("P1DCIBMLs",8,"%TOP")
0
^SHP("P1DCIBMLs",9)

^SHP("P1DCIBMLs",9,"%TOP")
0
^SHP("P1DCIBMLs",10)

^SHP("P1DCIBMLs",10,"%TOP")
0
^SHP("P1DCIBMLs",11)

^SHP("P1DCIBMLs",11,"%TOP")
0
^SHP("P1DCIBMLs",12)

^SHP("P1DCIBMLs",12,"%TOP")
0
^SHP("P1DCIBMLs",13)

^SHP("P1DCIBMLs",13,"%TOP")
0
^SHP("P1DCIBMLs",14)

^SHP("P1DCIBMLs",14,"%TOP")
0
^SHP("P1DCIBMLs",15)

^SHP("P1DCIBMLs",15,"%TOP")
0
^SHP("P1DCIBMLs",16)

^SHP("P1DCIBMLs",16,"%TOP")
0
^SHP("P1DCIBMLs",17)

^SHP("P1DCIBMLs",17,"%TOP")
0
^SHP("P1DCIBMLs",18)

^SHP("P1DCIBMLs",18,"%TOP")
0
^SHP("P1DCIBMLs",19)

^SHP("P1DCIBMLs",19,"%TOP")
0
^SHP("P1DCIBMLs",20)

^SHP("P1DCIBMLs",20,"%TOP")
0
^SHP("P1DCIBMLs",21)

^SHP("P1DCIBMLs",21,"%TOP")
0
^SHP("P1DCIBMLs",22)

^SHP("P1DCIBMLs",22,"%TOP")
0
^SHP("P1DCIBMLs",23)

^SHP("P1DCIBMLs",23,"%TOP")
0
^SHP("P1DCIBMLs",24)

^SHP("P1DCIBMLs",24,"%TOP")
0
^SHP("P1DCIBMLs",25)

^SHP("P1DCIBMLs",25,"%TOP")
0
^SHP("P1DCIBMLs",26)

^SHP("P1DCIBMLs",26,"%TOP")
0
^SHP("P1DCIBMLs",27)

^SHP("P1DCIBMLs",27,"%TOP")
0
^SHP("P1DCIBMLs",28)

^SHP("P1DCIBMLs",28,"%TOP")
0
^SHP("P1DCIBMLs",29)

^SHP("P1DCIBMLs",29,"%TOP")
0
^SHP("P1DCIBMLs",30)

^SHP("P1DCIBMLs",30,"%TOP")
0
^SHP("P1DCIBMLs",31)

^SHP("P1DCIBMLs",31,"%TOP")
0
^SHP("P1DCIBMLs",32)

^SHP("P1DCIBMLs",32,"%TOP")
0
^SHP("P1DCIBMLs",33)

^SHP("P1DCIBMLs",33,"%TOP")
0
^SHP("P1DCIBMLs",34)

^SHP("P1DCIBMLs",34,"%TOP")
0
^SHP("P1DCIBMLs",35)

^SHP("P1DCIBMLs",35,"%TOP")
0
^SHP("P1DCIBMLs",36)

^SHP("P1DCIBMLs",36,"%TOP")
0
^SHP("P1DCIBMLs",37)

^SHP("P1DCIBMLs",37,"%TOP")
0
^SHP("P1DCIBMLs",38)

^SHP("P1DCIBMLs",38,"%TOP")
0
^SHP("P1DCIBMLs",39)

^SHP("P1DCIBMLs",39,"%TOP")
0
^SHP("P1DCIBMLs",40)

^SHP("P1DCIBMLs",40,"%TOP")
0
^SHP("P1DCIBMLs",41)

^SHP("P1DCIBMLs",41,"%TOP")
0
^SHP("P1DCIBMLs",42)

^SHP("P1DCIBMLs",42,"%TOP")
0
^SHP("P1DCIBMLs",43)

^SHP("P1DCIBMLs",43,"%TOP")
0
^SHP("P1DCIBMLs",44)

^SHP("P1DCIBMLs",44,"%TOP")
0
^SHP("P1DCIBMLs",45)

^SHP("P1DCIBMLs",45,"%TOP")
0
^SHP("P1DCIBMLs",46)

^SHP("P1DCIBMLs",46,"%TOP")
0
^SHP("P1DCIBMLs",47)

^SHP("P1DCIBMLs",47,"%TOP")
0
^SHP("P1DCIBMLs",48)

^SHP("P1DCIBMLs",48,"%TOP")
0
^SHP("P1DCIBMLs",49)

^SHP("P1DCIBMLs",49,"%TOP")
0
^SHP("P1DCIBMLs",50)

^SHP("P1DCIBMLs",50,"%TOP")
0
^SHP("P1DCIBMLs",51)

^SHP("P1DCIBMLs",51,"%TOP")
0
^SHP("P1DCIBMLs",52)

^SHP("P1DCIBMLs",52,"%TOP")
0
^SHP("P1DCIBMLs",53)
                                                                         $ 
^SHP("P1DCIBMLs",53,"%TOP")
73
^SHP("P1DCIBMLs",54)
   ------------------------------------------------------------------------
^SHP("P1DCIBMLs",54,"%TOP")
3
^SHP("P1DCIBMLs",55)
                                                                               
^SHP("P1DCIBMLs",55,"%TOP")
79
^SHP("P1DCIBMLs",56)
                                                                               
^SHP("P1DCIBMLs",56,"%TOP")
79
^SHP("P1DCIBMLs",57)
                                                                               
^SHP("P1DCIBMLs",57,"%TOP")
79
^SHP("P1DCIBMLs",58)
                                                                               
^SHP("P1DCIBMLs",58,"%TOP")
79
^SHP("P1DCIBMLs",59)
                                                                               
^SHP("P1DCIBMLs",59,"%TOP")
79
^SHP("P1DCIBMLs",60)
                                                                               
^SHP("P1DCIBMLs",60,"%TOP")
79
^SHP("P1DCIBMLs",61)
                                                                               
^SHP("P1DCIBMLs",61,"%TOP")
79
^SHP("P1DCIBMLs",62)
                                                                               
^SHP("P1DCIBMLs",62,"%TOP")
79
^SHP("P1DCIBMLs",63)
                                                                               
^SHP("P1DCIBMLs",63,"%TOP")
79
^SHP("P1DCIBMLs",64)
                                                                               
^SHP("P1DCIBMLs",64,"%TOP")
79
^SHP("P1DCIBMLs",65)
                                                                               
^SHP("P1DCIBMLs",65,"%TOP")
79
^SHP("P1DCIBMLs",66)
                                                                               
^SHP("P1DCIBMLs",66,"%TOP")
79
^SHP("P1DCIBMLs",67)
                                                                               
^SHP("P1DCIBMLs",67,"%TOP")
79
^SHP("P1DCIBMLs",68)
                                                                               
^SHP("P1DCIBMLs",68,"%TOP")
79
^SHP("P1DCIBMLs",69)
                                                                               
^SHP("P1DCIBMLs",69,"%TOP")
79
^SHP("P1DCIBMLs",70)
                                                                               
^SHP("P1DCIBMLs",70,"%TOP")
79
^SHP("P1DCIBMLs",71)
   &25      > &15      >  &10     >                                            
^SHP("P1DCIBMLs",71,"%TOP")
3
^SHP("P1DCIBMLs","RG")
H
^SHP("P1DEXSLs")
migily ze`ivi gec
^SHP("P1DEXSLs",1)
                                # migily ze`ivi g"ec #                         
^SHP("P1DEXSLs",1,"%TOP")
32
^SHP("P1DEXSLs",2)
                                                                               
^SHP("P1DEXSLs",2,"%TOP")
79
^SHP("P1DEXSLs",3)
   &08              > &07   >: gily cr   &06              > &05   > : gilyn    
^SHP("P1DEXSLs",3,"%TOP")
3
^SHP("P1DEXSLs",4)
                            &15       > jix`z cr    &10        > :   jix`zn    
^SHP("P1DEXSLs",4,"%TOP")
28
^SHP("P1DEXSLs",5)
                                                                               
^SHP("P1DEXSLs",5,"%TOP")
79
^SHP("P1DEXSLs",6)
 -----------------------------------------------------------------------------
^SHP("P1DEXSLs",6,"%TOP")
1
^SHP("P1DEXSLs",7)
 :        zaezk       :     gewl my     :  gewl 'qn  : dryl :  mekq  : dpnfd : 
^SHP("P1DEXSLs",7,"%TOP")
1
^SHP("P1DEXSLs",8)
 -----------------------------------------------------------------------------
^SHP("P1DEXSLs",8,"%TOP")
1
^SHP("P1DEXSLs",9)
 $TTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTTTTTTTT:TTTTTTTTTTTT: 99999:TTTTTTTT:TTTTTTT:1
^SHP("P1DEXSLs",9,"%TOP")
1
^SHP("P1DEXSLs",10)

^SHP("P1DEXSLs",10,"%TOP")
0
^SHP("P1DEXSLs",11)

^SHP("P1DEXSLs",11,"%TOP")
0
^SHP("P1DEXSLs",12)

^SHP("P1DEXSLs",12,"%TOP")
0
^SHP("P1DEXSLs",13)

^SHP("P1DEXSLs",13,"%TOP")
0
^SHP("P1DEXSLs",14)

^SHP("P1DEXSLs",14,"%TOP")
0
^SHP("P1DEXSLs",15)

^SHP("P1DEXSLs",15,"%TOP")
0
^SHP("P1DEXSLs",16)

^SHP("P1DEXSLs",16,"%TOP")
0
^SHP("P1DEXSLs",17)

^SHP("P1DEXSLs",17,"%TOP")
0
^SHP("P1DEXSLs",18)

^SHP("P1DEXSLs",18,"%TOP")
0
^SHP("P1DEXSLs",19)

^SHP("P1DEXSLs",19,"%TOP")
0
^SHP("P1DEXSLs",20)

^SHP("P1DEXSLs",20,"%TOP")
0
^SHP("P1DEXSLs",21)

^SHP("P1DEXSLs",21,"%TOP")
0
^SHP("P1DEXSLs",22)

^SHP("P1DEXSLs",22,"%TOP")
0
^SHP("P1DEXSLs",23)

^SHP("P1DEXSLs",23,"%TOP")
0
^SHP("P1DEXSLs",24)

^SHP("P1DEXSLs",24,"%TOP")
0
^SHP("P1DEXSLs",25)

^SHP("P1DEXSLs",25,"%TOP")
0
^SHP("P1DEXSLs",26)

^SHP("P1DEXSLs",26,"%TOP")
0
^SHP("P1DEXSLs",27)

^SHP("P1DEXSLs",27,"%TOP")
0
^SHP("P1DEXSLs",28)

^SHP("P1DEXSLs",28,"%TOP")
0
^SHP("P1DEXSLs",29)

^SHP("P1DEXSLs",29,"%TOP")
0
^SHP("P1DEXSLs",30)

^SHP("P1DEXSLs",30,"%TOP")
0
^SHP("P1DEXSLs",31)

^SHP("P1DEXSLs",31,"%TOP")
0
^SHP("P1DEXSLs",32)

^SHP("P1DEXSLs",32,"%TOP")
0
^SHP("P1DEXSLs",33)

^SHP("P1DEXSLs",33,"%TOP")
0
^SHP("P1DEXSLs",34)

^SHP("P1DEXSLs",34,"%TOP")
0
^SHP("P1DEXSLs",35)

^SHP("P1DEXSLs",35,"%TOP")
0
^SHP("P1DEXSLs",36)

^SHP("P1DEXSLs",36,"%TOP")
0
^SHP("P1DEXSLs",37)

^SHP("P1DEXSLs",37,"%TOP")
0
^SHP("P1DEXSLs",38)

^SHP("P1DEXSLs",38,"%TOP")
0
^SHP("P1DEXSLs",39)

^SHP("P1DEXSLs",39,"%TOP")
0
^SHP("P1DEXSLs",40)

^SHP("P1DEXSLs",40,"%TOP")
0
^SHP("P1DEXSLs",41)

^SHP("P1DEXSLs",41,"%TOP")
0
^SHP("P1DEXSLs",42)

^SHP("P1DEXSLs",42,"%TOP")
0
^SHP("P1DEXSLs",43)

^SHP("P1DEXSLs",43,"%TOP")
0
^SHP("P1DEXSLs",44)

^SHP("P1DEXSLs",44,"%TOP")
0
^SHP("P1DEXSLs",45)

^SHP("P1DEXSLs",45,"%TOP")
0
^SHP("P1DEXSLs",46)

^SHP("P1DEXSLs",46,"%TOP")
0
^SHP("P1DEXSLs",47)

^SHP("P1DEXSLs",47,"%TOP")
0
^SHP("P1DEXSLs",48)

^SHP("P1DEXSLs",48,"%TOP")
0
^SHP("P1DEXSLs",49)

^SHP("P1DEXSLs",49,"%TOP")
0
^SHP("P1DEXSLs",50)

^SHP("P1DEXSLs",50,"%TOP")
0
^SHP("P1DEXSLs",51)

^SHP("P1DEXSLs",51,"%TOP")
0
^SHP("P1DEXSLs",52)

^SHP("P1DEXSLs",52,"%TOP")
0
^SHP("P1DEXSLs",53)

^SHP("P1DEXSLs",53,"%TOP")
0
^SHP("P1DEXSLs",54)

^SHP("P1DEXSLs",54,"%TOP")
0
^SHP("P1DEXSLs",55)

^SHP("P1DEXSLs",55,"%TOP")
0
^SHP("P1DEXSLs",56)
                                                                            $ 
^SHP("P1DEXSLs",56,"%TOP")
76
^SHP("P1DEXSLs",57)
 -----------------------------------------------------------------------------
^SHP("P1DEXSLs",57,"%TOP")
1
^SHP("P1DEXSLs",58)
                                                                               
^SHP("P1DEXSLs",58,"%TOP")
79
^SHP("P1DEXSLs","RG")
H
^SHP("P1DHBLs")
zeipeayg g"ec
^SHP("P1DHBLs",1)
                                  # zeipeayg g"ec #                            
^SHP("P1DHBLs",2)
                           &10       > cr   &05      >: jix`zn                 
^SHP("P1DHBLs",3)
       ---------------------------------------------------------------
^SHP("P1DHBLs",4)
       :   mekq  :  jix`z  : zipeayg :       gewl my      : gewl 'qn :         
^SHP("P1DHBLs",5)
       ---------------------------------------------------------------
^SHP("P1DHBLs",6)
       $999999.99: 99999999: 99999999:TTTTTTTTTTTTTTTTTTTT:9999999999:1
^SHP("P1DHBLs",7)

^SHP("P1DHBLs",8)

^SHP("P1DHBLs",9)

^SHP("P1DHBLs",10)

^SHP("P1DHBLs",11)

^SHP("P1DHBLs",12)

^SHP("P1DHBLs",13)

^SHP("P1DHBLs",14)

^SHP("P1DHBLs",15)

^SHP("P1DHBLs",16)

^SHP("P1DHBLs",17)

^SHP("P1DHBLs",18)

^SHP("P1DHBLs",19)

^SHP("P1DHBLs",20)

^SHP("P1DHBLs",21)

^SHP("P1DHBLs",22)

^SHP("P1DHBLs",23)

^SHP("P1DHBLs",24)

^SHP("P1DHBLs",25)

^SHP("P1DHBLs",26)

^SHP("P1DHBLs",27)

^SHP("P1DHBLs",28)

^SHP("P1DHBLs",29)

^SHP("P1DHBLs",30)

^SHP("P1DHBLs",31)

^SHP("P1DHBLs",32)

^SHP("P1DHBLs",33)

^SHP("P1DHBLs",34)

^SHP("P1DHBLs",35)

^SHP("P1DHBLs",36)

^SHP("P1DHBLs",37)

^SHP("P1DHBLs",38)

^SHP("P1DHBLs",39)

^SHP("P1DHBLs",40)

^SHP("P1DHBLs",41)

^SHP("P1DHBLs",42)

^SHP("P1DHBLs",43)

^SHP("P1DHBLs",44)

^SHP("P1DHBLs",45)

^SHP("P1DHBLs",46)

^SHP("P1DHBLs",47)

^SHP("P1DHBLs",48)

^SHP("P1DHBLs",49)

^SHP("P1DHBLs",50)
                                                                               
^SHP("P1DHBLs",51)
                                                                               
^SHP("P1DHBLs",52)

^SHP("P1DHBLs",53)
                                                                    $ 
^SHP("P1DHBLs",54)
       ---------------------------------------------------------------
^SHP("P1DHBLs",55)
                                                                               
^SHP("P1DHBLs",56)
      &15       >: k"dq                                                        
^SHP("P1DHBLs","RG")
H
^SHP("P1DLMLs")

^SHP("P1DLMLs",1)
             #oecren zegewl ly zepnfd g"ec#                                    
^SHP("P1DLMLs",1,"%TOP")
13
^SHP("P1DLMLs",2)
                            &10       > jix`z cr      &05       > jix`zn       
^SHP("P1DLMLs",2,"%TOP")
28
^SHP("P1DLMLs",3)
                                &04   >   dry cr          &03   >   dryn       
^SHP("P1DLMLs",3,"%TOP")
32
^SHP("P1DLMLs",4)
                          &17   > zepnfd zenk cr   &15    > zepnfd zenkn       
^SHP("P1DLMLs",4,"%TOP")
26
^SHP("P1DLMLs",5)
                       &20      > mekq cr       &19       >        mekqn       
^SHP("P1DLMLs",5,"%TOP")
23
^SHP("P1DLMLs",6)
         &26     > : melyz beq  &23        > gewl cr  &22        > gewln       
^SHP("P1DLMLs",6,"%TOP")
9
^SHP("P1DLMLs",7)
                     ------------------------------------------------------
^SHP("P1DLMLs",7,"%TOP")
21
^SHP("P1DLMLs",8)
                     :   k"dq  :zepnfd:         gewl my      :  gewl 'qn  :    
^SHP("P1DLMLs",8,"%TOP")
21
^SHP("P1DLMLs",9)
                     ------------------------------------------------------
^SHP("P1DLMLs",9,"%TOP")
21
^SHP("P1DLMLs",10)
                     $999999.99:TTTTTT:TTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTTT:1
^SHP("P1DLMLs",10,"%TOP")
21
^SHP("P1DLMLs",11)

^SHP("P1DLMLs",11,"%TOP")
0
^SHP("P1DLMLs",12)

^SHP("P1DLMLs",12,"%TOP")
0
^SHP("P1DLMLs",13)

^SHP("P1DLMLs",13,"%TOP")
0
^SHP("P1DLMLs",14)

^SHP("P1DLMLs",14,"%TOP")
0
^SHP("P1DLMLs",15)

^SHP("P1DLMLs",15,"%TOP")
0
^SHP("P1DLMLs",16)

^SHP("P1DLMLs",16,"%TOP")
0
^SHP("P1DLMLs",17)

^SHP("P1DLMLs",17,"%TOP")
0
^SHP("P1DLMLs",18)

^SHP("P1DLMLs",18,"%TOP")
0
^SHP("P1DLMLs",19)

^SHP("P1DLMLs",19,"%TOP")
0
^SHP("P1DLMLs",20)

^SHP("P1DLMLs",20,"%TOP")
0
^SHP("P1DLMLs",21)

^SHP("P1DLMLs",21,"%TOP")
0
^SHP("P1DLMLs",22)

^SHP("P1DLMLs",22,"%TOP")
0
^SHP("P1DLMLs",23)

^SHP("P1DLMLs",23,"%TOP")
0
^SHP("P1DLMLs",24)

^SHP("P1DLMLs",24,"%TOP")
0
^SHP("P1DLMLs",25)

^SHP("P1DLMLs",25,"%TOP")
0
^SHP("P1DLMLs",26)

^SHP("P1DLMLs",26,"%TOP")
0
^SHP("P1DLMLs",27)

^SHP("P1DLMLs",27,"%TOP")
0
^SHP("P1DLMLs",28)

^SHP("P1DLMLs",28,"%TOP")
0
^SHP("P1DLMLs",29)

^SHP("P1DLMLs",29,"%TOP")
0
^SHP("P1DLMLs",30)

^SHP("P1DLMLs",30,"%TOP")
0
^SHP("P1DLMLs",31)

^SHP("P1DLMLs",31,"%TOP")
0
^SHP("P1DLMLs",32)

^SHP("P1DLMLs",32,"%TOP")
0
^SHP("P1DLMLs",33)

^SHP("P1DLMLs",33,"%TOP")
0
^SHP("P1DLMLs",34)

^SHP("P1DLMLs",34,"%TOP")
0
^SHP("P1DLMLs",35)

^SHP("P1DLMLs",35,"%TOP")
0
^SHP("P1DLMLs",36)

^SHP("P1DLMLs",36,"%TOP")
0
^SHP("P1DLMLs",37)

^SHP("P1DLMLs",37,"%TOP")
0
^SHP("P1DLMLs",38)

^SHP("P1DLMLs",38,"%TOP")
0
^SHP("P1DLMLs",39)

^SHP("P1DLMLs",39,"%TOP")
0
^SHP("P1DLMLs",40)

^SHP("P1DLMLs",40,"%TOP")
0
^SHP("P1DLMLs",41)

^SHP("P1DLMLs",41,"%TOP")
0
^SHP("P1DLMLs",42)

^SHP("P1DLMLs",42,"%TOP")
0
^SHP("P1DLMLs",43)

^SHP("P1DLMLs",43,"%TOP")
0
^SHP("P1DLMLs",44)

^SHP("P1DLMLs",44,"%TOP")
0
^SHP("P1DLMLs",45)

^SHP("P1DLMLs",45,"%TOP")
0
^SHP("P1DLMLs",46)

^SHP("P1DLMLs",46,"%TOP")
0
^SHP("P1DLMLs",47)

^SHP("P1DLMLs",47,"%TOP")
0
^SHP("P1DLMLs",48)

^SHP("P1DLMLs",48,"%TOP")
0
^SHP("P1DLMLs",49)

^SHP("P1DLMLs",49,"%TOP")
0
^SHP("P1DLMLs",50)

^SHP("P1DLMLs",50,"%TOP")
0
^SHP("P1DLMLs",51)

^SHP("P1DLMLs",51,"%TOP")
0
^SHP("P1DLMLs",52)

^SHP("P1DLMLs",52,"%TOP")
0
^SHP("P1DLMLs",53)

^SHP("P1DLMLs",53,"%TOP")
0
^SHP("P1DLMLs",54)

^SHP("P1DLMLs",54,"%TOP")
0
^SHP("P1DLMLs",55)

^SHP("P1DLMLs",55,"%TOP")
0
^SHP("P1DLMLs",56)
                                                                         $ 
^SHP("P1DLMLs",56,"%TOP")
73
^SHP("P1DLMLs",57)
                     ------------------------------------------------------
^SHP("P1DLMLs",57,"%TOP")
21
^SHP("P1DLMLs",58)
                                                                               
^SHP("P1DLMLs",58,"%TOP")
79
^SHP("P1DLMLs",59)
                                                                               
^SHP("P1DLMLs",59,"%TOP")
79
^SHP("P1DLMLs",60)
                                                                               
^SHP("P1DLMLs",60,"%TOP")
79
^SHP("P1DLMLs",61)
                                                                               
^SHP("P1DLMLs",61,"%TOP")
79
^SHP("P1DLMLs",62)
                                                                               
^SHP("P1DLMLs",62,"%TOP")
79
^SHP("P1DLMLs",63)
                                                                               
^SHP("P1DLMLs",63,"%TOP")
79
^SHP("P1DLMLs",64)
                                                                               
^SHP("P1DLMLs",64,"%TOP")
79
^SHP("P1DLMLs",65)
                                                                               
^SHP("P1DLMLs",65,"%TOP")
79
^SHP("P1DLMLs",66)
                                                                               
^SHP("P1DLMLs",66,"%TOP")
79
^SHP("P1DLMLs",67)
                                                                               
^SHP("P1DLMLs",67,"%TOP")
79
^SHP("P1DLMLs",68)
                                                                               
^SHP("P1DLMLs",68,"%TOP")
79
^SHP("P1DLMLs",69)
                                                                               
^SHP("P1DLMLs",69,"%TOP")
79
^SHP("P1DLMLs",70)
                                                                               
^SHP("P1DLMLs",70,"%TOP")
79
^SHP("P1DLMLs",71)
                                                                               
^SHP("P1DLMLs",71,"%TOP")
79
^SHP("P1DLMLs",72)
                     &35      > &30   >            &25      >: zegewl k"dq     
^SHP("P1DLMLs",72,"%TOP")
21
^SHP("P1DLMLs","RG")
H
^SHP("P1DLs")
'nfd itl zegewl g"ec
^SHP("P1DLs",1)
         # zepnfd xtqn itl zegewl g"ec #                                       
^SHP("P1DLs",1,"%TOP")
9
^SHP("P1DLs",2)
                           &02       >  hixt cr       &01       >  hixtn       
^SHP("P1DLs",2,"%TOP")
27
^SHP("P1DLs",3)
                              &04    >   dry cr           &03   >   dryn       
^SHP("P1DLs",3,"%TOP")
30
^SHP("P1DLs",4)
  &08 > xef`  &07                    > zaezk    &06             >    xir       
^SHP("P1DLs",4,"%TOP")
2
^SHP("P1DLs",5)
                           &11       > melyz beq          &09 > rvan 'qn       
^SHP("P1DLs",5,"%TOP")
27
^SHP("P1DLs",6)
                           &10       > jix`z cr       &05       > jix`zn       
^SHP("P1DLs",6,"%TOP")
27
^SHP("P1DLs",7)
                         &17   > zepnfd zenk cr   &15    >  zepnfd zenkn       
^SHP("P1DLs",7,"%TOP")
25
^SHP("P1DLs",8)
                      &20      > mekq cr        &19      >         mekqn       
^SHP("P1DLs",8,"%TOP")
22
^SHP("P1DLs",9)
                         &24   > zegewl zveaw cr   &22   > zegewl zveawn       
^SHP("P1DLs",9,"%TOP")
25
^SHP("P1DLs",10)
                                &28        > gewl cr  &26        > gewln       
^SHP("P1DLs",10,"%TOP")
32
^SHP("P1DLs",11)
 ---------------------------------------------------------------------------
^SHP("P1DLs",11,"%TOP")
1
^SHP("P1DLs",12)
 :             zaezk          :   k"dq  :'nfd:      gewl my     : gewl 'qn :   
^SHP("P1DLs",12,"%TOP")
1
^SHP("P1DLs",13)
 ---------------------------------------------------------------------------
^SHP("P1DLs",13,"%TOP")
1
^SHP("P1DLs",14)
 $TTTTTTTTTTTTTTTTTTTTTTTTTTTT:999999.99:TTTT:TTTTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("P1DLs",14,"%TOP")
1
^SHP("P1DLs",15)

^SHP("P1DLs",15,"%TOP")
0
^SHP("P1DLs",16)

^SHP("P1DLs",16,"%TOP")
0
^SHP("P1DLs",17)

^SHP("P1DLs",17,"%TOP")
0
^SHP("P1DLs",18)

^SHP("P1DLs",18,"%TOP")
0
^SHP("P1DLs",19)

^SHP("P1DLs",19,"%TOP")
0
^SHP("P1DLs",20)

^SHP("P1DLs",20,"%TOP")
0
^SHP("P1DLs",21)

^SHP("P1DLs",21,"%TOP")
0
^SHP("P1DLs",22)

^SHP("P1DLs",22,"%TOP")
0
^SHP("P1DLs",23)

^SHP("P1DLs",23,"%TOP")
0
^SHP("P1DLs",24)

^SHP("P1DLs",24,"%TOP")
0
^SHP("P1DLs",25)

^SHP("P1DLs",25,"%TOP")
0
^SHP("P1DLs",26)

^SHP("P1DLs",26,"%TOP")
0
^SHP("P1DLs",27)

^SHP("P1DLs",27,"%TOP")
0
^SHP("P1DLs",28)

^SHP("P1DLs",28,"%TOP")
0
^SHP("P1DLs",29)

^SHP("P1DLs",29,"%TOP")
0
^SHP("P1DLs",30)

^SHP("P1DLs",30,"%TOP")
0
^SHP("P1DLs",31)

^SHP("P1DLs",31,"%TOP")
0
^SHP("P1DLs",32)

^SHP("P1DLs",32,"%TOP")
0
^SHP("P1DLs",33)

^SHP("P1DLs",33,"%TOP")
0
^SHP("P1DLs",34)

^SHP("P1DLs",34,"%TOP")
0
^SHP("P1DLs",35)

^SHP("P1DLs",35,"%TOP")
0
^SHP("P1DLs",36)

^SHP("P1DLs",36,"%TOP")
0
^SHP("P1DLs",37)

^SHP("P1DLs",37,"%TOP")
0
^SHP("P1DLs",38)

^SHP("P1DLs",38,"%TOP")
0
^SHP("P1DLs",39)

^SHP("P1DLs",39,"%TOP")
0
^SHP("P1DLs",40)

^SHP("P1DLs",40,"%TOP")
0
^SHP("P1DLs",41)

^SHP("P1DLs",41,"%TOP")
0
^SHP("P1DLs",42)

^SHP("P1DLs",42,"%TOP")
0
^SHP("P1DLs",43)

^SHP("P1DLs",43,"%TOP")
0
^SHP("P1DLs",44)

^SHP("P1DLs",44,"%TOP")
0
^SHP("P1DLs",45)

^SHP("P1DLs",45,"%TOP")
0
^SHP("P1DLs",46)

^SHP("P1DLs",46,"%TOP")
0
^SHP("P1DLs",47)

^SHP("P1DLs",47,"%TOP")
0
^SHP("P1DLs",48)

^SHP("P1DLs",48,"%TOP")
0
^SHP("P1DLs",49)

^SHP("P1DLs",49,"%TOP")
0
^SHP("P1DLs",50)

^SHP("P1DLs",50,"%TOP")
0
^SHP("P1DLs",51)

^SHP("P1DLs",51,"%TOP")
0
^SHP("P1DLs",52)

^SHP("P1DLs",52,"%TOP")
0
^SHP("P1DLs",53)

^SHP("P1DLs",53,"%TOP")
0
^SHP("P1DLs",54)
                                                                          $ 
^SHP("P1DLs",54,"%TOP")
74
^SHP("P1DLs",55)
 ---------------------------------------------------------------------------
^SHP("P1DLs",55,"%TOP")
1
^SHP("P1DLs",56)
                                                                               
^SHP("P1DLs",56,"%TOP")
79
^SHP("P1DLs",57)
                           &35      > &30  >        &25    > :zegewl k"dq      
^SHP("P1DLs",57,"%TOP")
27
^SHP("P1DLs","RG")
H
^SHP("P1DMZPR",1)
          &10      jix`z cr &05      jix`zn mixvln itl mihixt g"ec             
^SHP("P1DMZPR","P10")
9
^SHP("P1DMZPR","P5")
9
^SHP("P1DMZPRS",1)
           &10      jix`z cr &05      jix`zn zerye mixvln itl mihixt g"ec      
^SHP("P1DMZPRS",1,"%TOP")
11
^SHP("P1DMZPRS",2)
                                              &20  : dry cr   &15  : dryn      
^SHP("P1DMZPRS",2,"%TOP")
46
^SHP("P1DMZPRS","P10")
9
^SHP("P1DMZPRS","P15")
5
^SHP("P1DMZPRS","P20")
5
^SHP("P1DMZPRS","P5")
9
^SHP("P1DP11s")
mihixt Z 
^SHP("P1DP11s",1)
                                                                               
^SHP("P1DP11s",2)
                    &05      > jix`zl mihixt zexikn g"ec                       
^SHP("P1DP11s",3)
                                                                               
^SHP("P1DP11s",4)
 -----------------------------------------------------------------------------
^SHP("P1DP11s",5)
 :  %  :  dxrd  :oexg` xign:ehp mekq: dgpd :zenk:      hixt xe`z    :hixt cew: 
^SHP("P1DP11s",6)
 -----------------------------------------------------------------------------
^SHP("P1DP11s",7)
 $99.99:TTTTTTTT:    999.99:99999.99:999.99:9999:TTTTTTTTTTTTTTTTTTT:  999999:1
^SHP("P1DP11s",8)

^SHP("P1DP11s",9)

^SHP("P1DP11s",10)

^SHP("P1DP11s",11)

^SHP("P1DP11s",12)

^SHP("P1DP11s",13)

^SHP("P1DP11s",14)

^SHP("P1DP11s",15)

^SHP("P1DP11s",16)

^SHP("P1DP11s",17)

^SHP("P1DP11s",18)

^SHP("P1DP11s",19)

^SHP("P1DP11s",20)

^SHP("P1DP11s",21)

^SHP("P1DP11s",22)

^SHP("P1DP11s",23)

^SHP("P1DP11s",24)

^SHP("P1DP11s",25)

^SHP("P1DP11s",26)

^SHP("P1DP11s",27)

^SHP("P1DP11s",28)

^SHP("P1DP11s",29)

^SHP("P1DP11s",30)

^SHP("P1DP11s",31)

^SHP("P1DP11s",32)

^SHP("P1DP11s",33)

^SHP("P1DP11s",34)

^SHP("P1DP11s",35)

^SHP("P1DP11s",36)

^SHP("P1DP11s",37)

^SHP("P1DP11s",38)

^SHP("P1DP11s",39)

^SHP("P1DP11s",40)

^SHP("P1DP11s",41)

^SHP("P1DP11s",42)

^SHP("P1DP11s",43)

^SHP("P1DP11s",44)

^SHP("P1DP11s",45)

^SHP("P1DP11s",46)

^SHP("P1DP11s",47)

^SHP("P1DP11s",48)

^SHP("P1DP11s",49)

^SHP("P1DP11s",50)

^SHP("P1DP11s",51)

^SHP("P1DP11s",52)

^SHP("P1DP11s",53)
                                                                            $ 
^SHP("P1DP11s",54)
  ---------------------------------------------------------------------------  
^SHP("P1DP11s",55)
  :                      :&20      :&18    :&15 :                           :  
^SHP("P1DP11s",56)
  ---------------------------------------------------------------------------  
^SHP("P1DP11s","RG")
H
^SHP("P1DP1Ts")
inei mihixt gec
^SHP("P1DP1Ts",1)
     &01                        > #mihixt g"ec#                                
^SHP("P1DP1Ts",2)
 &98> sc           &10      > jix`z cr    &05      > jix`zn                    
^SHP("P1DP1Ts",3)
         &12 >: 4 - rvan ihixt , 3 - ccea hixt , 2 - mihixtd lk , 1 - hq itl   
^SHP("P1DP1Ts",4)
 &36               > &35 > mihixt zveaw    &31               > &30  : hq 'qn   
^SHP("P1DP1Ts",5)
 &17               > &16    > : hixt cr   &14              >&13   > :  hixtn   
^SHP("P1DP1Ts",6)
 -----------------------------------------------------------------------------
^SHP("P1DP1Ts",7)
 :  %  :  dxrd  :oexg` xign:ehp mekq: dgpd :zenk:      hixt xe`z    :hixt cew: 
^SHP("P1DP1Ts",8)
 -----------------------------------------------------------------------------
^SHP("P1DP1Ts",9)
 $99.99:TTTTTTTT:    999.99:99999.99:999.99:9999:TTTTTTTTTTTTTTTTTTT:  999999:1
^SHP("P1DP1Ts",10)

^SHP("P1DP1Ts",11)

^SHP("P1DP1Ts",12)

^SHP("P1DP1Ts",13)

^SHP("P1DP1Ts",14)

^SHP("P1DP1Ts",15)

^SHP("P1DP1Ts",16)

^SHP("P1DP1Ts",17)

^SHP("P1DP1Ts",18)

^SHP("P1DP1Ts",19)

^SHP("P1DP1Ts",20)

^SHP("P1DP1Ts",21)

^SHP("P1DP1Ts",22)

^SHP("P1DP1Ts",23)

^SHP("P1DP1Ts",24)

^SHP("P1DP1Ts",25)

^SHP("P1DP1Ts",26)

^SHP("P1DP1Ts",27)

^SHP("P1DP1Ts",28)

^SHP("P1DP1Ts",29)

^SHP("P1DP1Ts",30)

^SHP("P1DP1Ts",31)

^SHP("P1DP1Ts",32)

^SHP("P1DP1Ts",33)

^SHP("P1DP1Ts",34)

^SHP("P1DP1Ts",35)

^SHP("P1DP1Ts",36)

^SHP("P1DP1Ts",37)

^SHP("P1DP1Ts",38)

^SHP("P1DP1Ts",39)

^SHP("P1DP1Ts",40)

^SHP("P1DP1Ts",41)

^SHP("P1DP1Ts",42)

^SHP("P1DP1Ts",43)

^SHP("P1DP1Ts",44)

^SHP("P1DP1Ts",45)

^SHP("P1DP1Ts",46)
                                                                               
^SHP("P1DP1Ts",47)
                                                                               
^SHP("P1DP1Ts",48)
                                                                               
^SHP("P1DP1Ts",49)

^SHP("P1DP1Ts",50)

^SHP("P1DP1Ts",51)
                                                                            $ 
^SHP("P1DP1Ts",52)
 ----------------------------------------------------------------------------- 
^SHP("P1DP1Ts",53)
 :     :        :          :&20     :&18   :&15 :      k"dq         :        : 
^SHP("P1DP1Ts",54)
 :     :        :          :&40     :      :&25 :    zeiwqr         :        : 
^SHP("P1DP1Ts",55)
 :     :        :          :        :      :&45 :  ehp zenk         :        : 
^SHP("P1DP1Ts",56)
 ----------------------------------------------------------------------------- 
^SHP("P1DP1Ts","RG")
H
^SHP("P1DP1s")
inei mihixt gec
^SHP("P1DP1s",1)
     &01                        > #mihixt g"ec#                                
^SHP("P1DP1s",1,"%TOP")
5
^SHP("P1DP1s",2)
 &98> sc           &10      > jix`z cr    &05      > jix`zn                    
^SHP("P1DP1s",2,"%TOP")
1
^SHP("P1DP1s",3)
         &12 >: 4 - rvan ihixt , 3 - ccea hixt , 2 - mihixtd lk , 1 - hq itl   
^SHP("P1DP1s",3,"%TOP")
9
^SHP("P1DP1s",4)
 &36               > &35 > mihixt zveaw    &31               > &30  : hq 'qn   
^SHP("P1DP1s",4,"%TOP")
1
^SHP("P1DP1s",5)
 &17               > &16    > : hixt cr   &14              >&13   > :  hixtn   
^SHP("P1DP1s",5,"%TOP")
1
^SHP("P1DP1s",6)
 -----------------------------------------------------------------------------
^SHP("P1DP1s",6,"%TOP")
1
^SHP("P1DP1s",7)
 :  %  :  dxrd  :oexg` xign:ehp mekq: dgpd :zenk:      hixt xe`z    :hixt cew: 
^SHP("P1DP1s",7,"%TOP")
1
^SHP("P1DP1s",8)
 -----------------------------------------------------------------------------
^SHP("P1DP1s",8,"%TOP")
1
^SHP("P1DP1s",9)
 $99.99:TTTTTTTT:    999.99:99999.99:999.99:9999:TTTTTTTTTTTTTTTTTTT:  999999:1
^SHP("P1DP1s",9,"%TOP")
1
^SHP("P1DP1s",10)

^SHP("P1DP1s",10,"%TOP")
0
^SHP("P1DP1s",11)

^SHP("P1DP1s",11,"%TOP")
0
^SHP("P1DP1s",12)

^SHP("P1DP1s",12,"%TOP")
0
^SHP("P1DP1s",13)

^SHP("P1DP1s",13,"%TOP")
0
^SHP("P1DP1s",14)

^SHP("P1DP1s",14,"%TOP")
0
^SHP("P1DP1s",15)

^SHP("P1DP1s",15,"%TOP")
0
^SHP("P1DP1s",16)

^SHP("P1DP1s",16,"%TOP")
0
^SHP("P1DP1s",17)

^SHP("P1DP1s",17,"%TOP")
0
^SHP("P1DP1s",18)

^SHP("P1DP1s",18,"%TOP")
0
^SHP("P1DP1s",19)

^SHP("P1DP1s",19,"%TOP")
0
^SHP("P1DP1s",20)

^SHP("P1DP1s",20,"%TOP")
0
^SHP("P1DP1s",21)

^SHP("P1DP1s",21,"%TOP")
0
^SHP("P1DP1s",22)

^SHP("P1DP1s",22,"%TOP")
0
^SHP("P1DP1s",23)

^SHP("P1DP1s",23,"%TOP")
0
^SHP("P1DP1s",24)

^SHP("P1DP1s",24,"%TOP")
0
^SHP("P1DP1s",25)

^SHP("P1DP1s",25,"%TOP")
0
^SHP("P1DP1s",26)

^SHP("P1DP1s",26,"%TOP")
0
^SHP("P1DP1s",27)

^SHP("P1DP1s",27,"%TOP")
0
^SHP("P1DP1s",28)

^SHP("P1DP1s",28,"%TOP")
0
^SHP("P1DP1s",29)

^SHP("P1DP1s",29,"%TOP")
0
^SHP("P1DP1s",30)

^SHP("P1DP1s",30,"%TOP")
0
^SHP("P1DP1s",31)

^SHP("P1DP1s",31,"%TOP")
0
^SHP("P1DP1s",32)

^SHP("P1DP1s",32,"%TOP")
0
^SHP("P1DP1s",33)

^SHP("P1DP1s",33,"%TOP")
0
^SHP("P1DP1s",34)

^SHP("P1DP1s",34,"%TOP")
0
^SHP("P1DP1s",35)

^SHP("P1DP1s",35,"%TOP")
0
^SHP("P1DP1s",36)

^SHP("P1DP1s",36,"%TOP")
0
^SHP("P1DP1s",37)

^SHP("P1DP1s",37,"%TOP")
0
^SHP("P1DP1s",38)

^SHP("P1DP1s",38,"%TOP")
0
^SHP("P1DP1s",39)

^SHP("P1DP1s",39,"%TOP")
0
^SHP("P1DP1s",40)

^SHP("P1DP1s",40,"%TOP")
0
^SHP("P1DP1s",41)

^SHP("P1DP1s",41,"%TOP")
0
^SHP("P1DP1s",42)

^SHP("P1DP1s",42,"%TOP")
0
^SHP("P1DP1s",43)

^SHP("P1DP1s",43,"%TOP")
0
^SHP("P1DP1s",44)

^SHP("P1DP1s",44,"%TOP")
0
^SHP("P1DP1s",45)

^SHP("P1DP1s",45,"%TOP")
0
^SHP("P1DP1s",46)
                                                                               
^SHP("P1DP1s",46,"%TOP")
79
^SHP("P1DP1s",47)
                                                                               
^SHP("P1DP1s",47,"%TOP")
79
^SHP("P1DP1s",48)
                                                                               
^SHP("P1DP1s",48,"%TOP")
79
^SHP("P1DP1s",49)

^SHP("P1DP1s",49,"%TOP")
0
^SHP("P1DP1s",50)

^SHP("P1DP1s",50,"%TOP")
0
^SHP("P1DP1s",51)
                                                                            $ 
^SHP("P1DP1s",51,"%TOP")
76
^SHP("P1DP1s",52)
 ----------------------------------------------------------------------------- 
^SHP("P1DP1s",52,"%TOP")
1
^SHP("P1DP1s",53)
 :     :        :          :&20     :&18   :&15 :      k"dq         :        : 
^SHP("P1DP1s",53,"%TOP")
1
^SHP("P1DP1s",54)
 :     :        :          :&40     :      :&25 :    zeiwqr         :        : 
^SHP("P1DP1s",54,"%TOP")
1
^SHP("P1DP1s",55)
 :     :        :          :        :      :&45 :  ehp zenk         :        : 
^SHP("P1DP1s",55,"%TOP")
1
^SHP("P1DP1s",56)
 ----------------------------------------------------------------------------- 
^SHP("P1DP1s",56,"%TOP")
1
^SHP("P1DP1s","RG")
H
^SHP("P1DPMKB",1)
    &10      > jix`z cr  &05      > jix`zn zepnfd ilawn itl mihixt g"ec        
^SHP("P1DPMKB","P10")
9
^SHP("P1DPMKB","P5")
9
^SHP("P1DPMS",1)
     &10      : jix`z cr &05     : jix`zn mixvlne ogley ibeq itl mihixt g"ec   
^SHP("P1DPMS","P10")
9
^SHP("P1DPMS","P5")
8
^SHP("P1DPs")
mihixt g"ec
^SHP("P1DPs",1)
     &01                        > #mihixt g"ec#                                
^SHP("P1DPs",1,"%TOP")
5
^SHP("P1DPs",2)
                   &10      > jix`z cr    &05      > jix`zn                    
^SHP("P1DPs",2,"%TOP")
19
^SHP("P1DPs",3)
          &12 >: 4 - rvan ihixt ,3 - ccea hixt , 2 - mihixtd lk , 1 - hq itl   
^SHP("P1DPs",3,"%TOP")
10
^SHP("P1DPs",4)
  &36               > &35 > mihixt zveaw    &31               > &30  :hq 'qn   
^SHP("P1DPs",4,"%TOP")
2
^SHP("P1DPs",5)
     &17               >&16    >:hixt cr    &14              >&13   >: hixtn   
^SHP("P1DPs",5,"%TOP")
5
^SHP("P1DPs",6)
 -----------------------------------------------------------------------------
^SHP("P1DPs",6,"%TOP")
1
^SHP("P1DPs",7)
 :  %  :  dxrd  :oexg` xign:ehp mekq: dgpd :zenk:      hixt xe`z    :hixt cew: 
^SHP("P1DPs",7,"%TOP")
1
^SHP("P1DPs",8)
 -----------------------------------------------------------------------------
^SHP("P1DPs",8,"%TOP")
1
^SHP("P1DPs",9)
 $99.99 TTTTTTTT:    999.99: 9999.99: 99.99:9999:TTTTTTTTTTTTTTTTTTT:  999999:1
^SHP("P1DPs",9,"%TOP")
1
^SHP("P1DPs",10)

^SHP("P1DPs",10,"%TOP")
0
^SHP("P1DPs",11)

^SHP("P1DPs",11,"%TOP")
0
^SHP("P1DPs",12)

^SHP("P1DPs",12,"%TOP")
0
^SHP("P1DPs",13)

^SHP("P1DPs",13,"%TOP")
0
^SHP("P1DPs",14)

^SHP("P1DPs",14,"%TOP")
0
^SHP("P1DPs",15)

^SHP("P1DPs",15,"%TOP")
0
^SHP("P1DPs",16)

^SHP("P1DPs",16,"%TOP")
0
^SHP("P1DPs",17)

^SHP("P1DPs",17,"%TOP")
0
^SHP("P1DPs",18)

^SHP("P1DPs",18,"%TOP")
0
^SHP("P1DPs",19)

^SHP("P1DPs",19,"%TOP")
0
^SHP("P1DPs",20)

^SHP("P1DPs",20,"%TOP")
0
^SHP("P1DPs",21)

^SHP("P1DPs",21,"%TOP")
0
^SHP("P1DPs",22)

^SHP("P1DPs",22,"%TOP")
0
^SHP("P1DPs",23)

^SHP("P1DPs",23,"%TOP")
0
^SHP("P1DPs",24)

^SHP("P1DPs",24,"%TOP")
0
^SHP("P1DPs",25)

^SHP("P1DPs",25,"%TOP")
0
^SHP("P1DPs",26)

^SHP("P1DPs",26,"%TOP")
0
^SHP("P1DPs",27)

^SHP("P1DPs",27,"%TOP")
0
^SHP("P1DPs",28)

^SHP("P1DPs",28,"%TOP")
0
^SHP("P1DPs",29)

^SHP("P1DPs",29,"%TOP")
0
^SHP("P1DPs",30)

^SHP("P1DPs",30,"%TOP")
0
^SHP("P1DPs",31)

^SHP("P1DPs",31,"%TOP")
0
^SHP("P1DPs",32)

^SHP("P1DPs",32,"%TOP")
0
^SHP("P1DPs",33)

^SHP("P1DPs",33,"%TOP")
0
^SHP("P1DPs",34)

^SHP("P1DPs",34,"%TOP")
0
^SHP("P1DPs",35)

^SHP("P1DPs",35,"%TOP")
0
^SHP("P1DPs",36)

^SHP("P1DPs",36,"%TOP")
0
^SHP("P1DPs",37)

^SHP("P1DPs",37,"%TOP")
0
^SHP("P1DPs",38)

^SHP("P1DPs",38,"%TOP")
0
^SHP("P1DPs",39)

^SHP("P1DPs",39,"%TOP")
0
^SHP("P1DPs",40)

^SHP("P1DPs",40,"%TOP")
0
^SHP("P1DPs",41)

^SHP("P1DPs",41,"%TOP")
0
^SHP("P1DPs",42)

^SHP("P1DPs",42,"%TOP")
0
^SHP("P1DPs",43)

^SHP("P1DPs",43,"%TOP")
0
^SHP("P1DPs",44)

^SHP("P1DPs",44,"%TOP")
0
^SHP("P1DPs",45)

^SHP("P1DPs",45,"%TOP")
0
^SHP("P1DPs",46)

^SHP("P1DPs",46,"%TOP")
0
^SHP("P1DPs",47)

^SHP("P1DPs",47,"%TOP")
0
^SHP("P1DPs",48)

^SHP("P1DPs",48,"%TOP")
0
^SHP("P1DPs",49)

^SHP("P1DPs",49,"%TOP")
0
^SHP("P1DPs",50)

^SHP("P1DPs",50,"%TOP")
0
^SHP("P1DPs",51)

^SHP("P1DPs",51,"%TOP")
0
^SHP("P1DPs",52)

^SHP("P1DPs",52,"%TOP")
0
^SHP("P1DPs",53)
                                                                            $ 
^SHP("P1DPs",53,"%TOP")
76
^SHP("P1DPs",54)
  ---------------------------------------------------------------------------  
^SHP("P1DPs",54,"%TOP")
2
^SHP("P1DPs",55)
  :                 &20      :&18    :&15 :                                 :  
^SHP("P1DPs",55,"%TOP")
2
^SHP("P1DPs",56)
  ---------------------------------------------------------------------------  
^SHP("P1DPs",56,"%TOP")
2
^SHP("P1DPs","RG")
H
^SHP("P1DTLAs")
ielz itl zegewl g"ec
^SHP("P1DTLAs",1)
                    # i`xy` iyelz itl zegewl g"ec #                            
^SHP("P1DTLAs",1,"%TOP")
20
^SHP("P1DTLAs",2)
                                                                               
^SHP("P1DTLAs",2,"%TOP")
79
^SHP("P1DTLAs",3)
                       &10      > jix`z cr   &05      > jix`zn                 
^SHP("P1DTLAs",3,"%TOP")
23
^SHP("P1DTLAs",4)
                      &14       >  gewl cr   &12       > gewln                 
^SHP("P1DTLAs",4,"%TOP")
22
^SHP("P1DTLAs",5)
      ---------------------------------------------------------------------
^SHP("P1DTLAs",5,"%TOP")
6
^SHP("P1DTLAs",6)
      :   k"dq   : miyelz xtqn : yelz ieey :     gewld my     : gewl 'qn  :    
^SHP("P1DTLAs",6,"%TOP")
6
^SHP("P1DTLAs",7)
      ---------------------------------------------------------------------
^SHP("P1DTLAs",7,"%TOP")
6
^SHP("P1DTLAs",8)
      $9999999.99:       999999:    9999.99:TTTTTTTTTTTTTTTTTT:TTTTTTTTTTT:1
^SHP("P1DTLAs",8,"%TOP")
6
^SHP("P1DTLAs",9)

^SHP("P1DTLAs",9,"%TOP")
0
^SHP("P1DTLAs",10)

^SHP("P1DTLAs",10,"%TOP")
0
^SHP("P1DTLAs",11)

^SHP("P1DTLAs",11,"%TOP")
0
^SHP("P1DTLAs",12)

^SHP("P1DTLAs",12,"%TOP")
0
^SHP("P1DTLAs",13)

^SHP("P1DTLAs",13,"%TOP")
0
^SHP("P1DTLAs",14)

^SHP("P1DTLAs",14,"%TOP")
0
^SHP("P1DTLAs",15)

^SHP("P1DTLAs",15,"%TOP")
0
^SHP("P1DTLAs",16)

^SHP("P1DTLAs",16,"%TOP")
0
^SHP("P1DTLAs",17)

^SHP("P1DTLAs",17,"%TOP")
0
^SHP("P1DTLAs",18)

^SHP("P1DTLAs",18,"%TOP")
0
^SHP("P1DTLAs",19)

^SHP("P1DTLAs",19,"%TOP")
0
^SHP("P1DTLAs",20)

^SHP("P1DTLAs",20,"%TOP")
0
^SHP("P1DTLAs",21)

^SHP("P1DTLAs",21,"%TOP")
0
^SHP("P1DTLAs",22)

^SHP("P1DTLAs",22,"%TOP")
0
^SHP("P1DTLAs",23)

^SHP("P1DTLAs",23,"%TOP")
0
^SHP("P1DTLAs",24)

^SHP("P1DTLAs",24,"%TOP")
0
^SHP("P1DTLAs",25)

^SHP("P1DTLAs",25,"%TOP")
0
^SHP("P1DTLAs",26)

^SHP("P1DTLAs",26,"%TOP")
0
^SHP("P1DTLAs",27)

^SHP("P1DTLAs",27,"%TOP")
0
^SHP("P1DTLAs",28)

^SHP("P1DTLAs",28,"%TOP")
0
^SHP("P1DTLAs",29)

^SHP("P1DTLAs",29,"%TOP")
0
^SHP("P1DTLAs",30)

^SHP("P1DTLAs",30,"%TOP")
0
^SHP("P1DTLAs",31)

^SHP("P1DTLAs",31,"%TOP")
0
^SHP("P1DTLAs",32)

^SHP("P1DTLAs",32,"%TOP")
0
^SHP("P1DTLAs",33)

^SHP("P1DTLAs",33,"%TOP")
0
^SHP("P1DTLAs",34)

^SHP("P1DTLAs",34,"%TOP")
0
^SHP("P1DTLAs",35)

^SHP("P1DTLAs",35,"%TOP")
0
^SHP("P1DTLAs",36)

^SHP("P1DTLAs",36,"%TOP")
0
^SHP("P1DTLAs",37)

^SHP("P1DTLAs",37,"%TOP")
0
^SHP("P1DTLAs",38)

^SHP("P1DTLAs",38,"%TOP")
0
^SHP("P1DTLAs",39)

^SHP("P1DTLAs",39,"%TOP")
0
^SHP("P1DTLAs",40)

^SHP("P1DTLAs",40,"%TOP")
0
^SHP("P1DTLAs",41)

^SHP("P1DTLAs",41,"%TOP")
0
^SHP("P1DTLAs",42)

^SHP("P1DTLAs",42,"%TOP")
0
^SHP("P1DTLAs",43)

^SHP("P1DTLAs",43,"%TOP")
0
^SHP("P1DTLAs",44)

^SHP("P1DTLAs",44,"%TOP")
0
^SHP("P1DTLAs",45)

^SHP("P1DTLAs",45,"%TOP")
0
^SHP("P1DTLAs",46)

^SHP("P1DTLAs",46,"%TOP")
0
^SHP("P1DTLAs",47)

^SHP("P1DTLAs",47,"%TOP")
0
^SHP("P1DTLAs",48)

^SHP("P1DTLAs",48,"%TOP")
0
^SHP("P1DTLAs",49)

^SHP("P1DTLAs",49,"%TOP")
0
^SHP("P1DTLAs",50)

^SHP("P1DTLAs",50,"%TOP")
0
^SHP("P1DTLAs",51)

^SHP("P1DTLAs",51,"%TOP")
0
^SHP("P1DTLAs",52)

^SHP("P1DTLAs",52,"%TOP")
0
^SHP("P1DTLAs",53)
                                                                         $ 
^SHP("P1DTLAs",53,"%TOP")
73
^SHP("P1DTLAs",54)
      ---------------------------------------------------------------------
^SHP("P1DTLAs",54,"%TOP")
6
^SHP("P1DTLAs",55)
                                                                               
^SHP("P1DTLAs",55,"%TOP")
79
^SHP("P1DTLAs",56)
         &35      >   &30      >                                               
^SHP("P1DTLAs",56,"%TOP")
9
^SHP("P1DTLAs","RG")
H
^SHP("P1DTZKs")
dtew kif 'z g"ec
^SHP("P1DTZKs",1)
       #&03                      >#                                            
^SHP("P1DTZKs",2)
                                                                               
^SHP("P1DTZKs",3)
                     &10      >:jix`z cr    &05      >:jix`zn                  
^SHP("P1DTZKs",4)
  ----------------------------------------------------------------------------
^SHP("P1DTZKs",5)
  :  xvln my  : xvln :beq:  gewld my   : gewl 'qn :  mekq : iekif 'z: jix`z  : 
^SHP("P1DTZKs",6)
  :  gily my  : gily :lyz:             :ogley 'qn :       :         :        : 
^SHP("P1DTZKs",7)
  ----------------------------------------------------------------------------
^SHP("P1DTZKs",8)
  $TTTTTTTTTTT: 99999:999:TTTTTTTTTTTTT:9999999999:9999.99:  9999999:99999999:1
^SHP("P1DTZKs",9)

^SHP("P1DTZKs",10)

^SHP("P1DTZKs",11)

^SHP("P1DTZKs",12)

^SHP("P1DTZKs",13)

^SHP("P1DTZKs",14)

^SHP("P1DTZKs",15)

^SHP("P1DTZKs",16)

^SHP("P1DTZKs",17)

^SHP("P1DTZKs",18)

^SHP("P1DTZKs",19)

^SHP("P1DTZKs",20)

^SHP("P1DTZKs",21)

^SHP("P1DTZKs",22)

^SHP("P1DTZKs",23)

^SHP("P1DTZKs",24)

^SHP("P1DTZKs",25)

^SHP("P1DTZKs",26)

^SHP("P1DTZKs",27)

^SHP("P1DTZKs",28)

^SHP("P1DTZKs",29)

^SHP("P1DTZKs",30)

^SHP("P1DTZKs",31)

^SHP("P1DTZKs",32)

^SHP("P1DTZKs",33)

^SHP("P1DTZKs",34)

^SHP("P1DTZKs",35)

^SHP("P1DTZKs",36)

^SHP("P1DTZKs",37)

^SHP("P1DTZKs",38)

^SHP("P1DTZKs",39)

^SHP("P1DTZKs",40)

^SHP("P1DTZKs",41)

^SHP("P1DTZKs",42)

^SHP("P1DTZKs",43)

^SHP("P1DTZKs",44)

^SHP("P1DTZKs",45)

^SHP("P1DTZKs",46)

^SHP("P1DTZKs",47)

^SHP("P1DTZKs",48)

^SHP("P1DTZKs",49)

^SHP("P1DTZKs",50)

^SHP("P1DTZKs",51)

^SHP("P1DTZKs",52)

^SHP("P1DTZKs",53)
                                                                            $ 
^SHP("P1DTZKs",54)
  ----------------------------------------------------------------------------
^SHP("P1DTZKs",55)
                                                                               
^SHP("P1DTZKs",56)
                                          &20       >:k"dq  &15  >:zecerz k"dq 
^SHP("P1DTZKs","RG")
H
^SHP("P1DTZs")
iekif 'z g"ec
^SHP("P1DTZs",1)
       #&03                      >#                                            
^SHP("P1DTZs",2)
                                                                               
^SHP("P1DTZs",3)
                     &10      >:jix`z cr    &05      >:jix`zn                  
^SHP("P1DTZs",4)
               -----------------------------------------------------
^SHP("P1DTZs",5)
               :  gewld my   : gewl 'qn :  mekq : iekif 'z: jix`z  :           
^SHP("P1DTZs",6)
               :             :ogley 'qn :       :         :        :           
^SHP("P1DTZs",7)
               -----------------------------------------------------
^SHP("P1DTZs",8)
               $TTTTTTTTTTTTT:9999999999:9999.99:  9999999:99999999:1
^SHP("P1DTZs",9)

^SHP("P1DTZs",10)

^SHP("P1DTZs",11)

^SHP("P1DTZs",12)

^SHP("P1DTZs",13)

^SHP("P1DTZs",14)

^SHP("P1DTZs",15)

^SHP("P1DTZs",16)

^SHP("P1DTZs",17)

^SHP("P1DTZs",18)

^SHP("P1DTZs",19)

^SHP("P1DTZs",20)

^SHP("P1DTZs",21)

^SHP("P1DTZs",22)

^SHP("P1DTZs",23)

^SHP("P1DTZs",24)

^SHP("P1DTZs",25)

^SHP("P1DTZs",26)

^SHP("P1DTZs",27)

^SHP("P1DTZs",28)

^SHP("P1DTZs",29)

^SHP("P1DTZs",30)

^SHP("P1DTZs",31)

^SHP("P1DTZs",32)

^SHP("P1DTZs",33)

^SHP("P1DTZs",34)

^SHP("P1DTZs",35)

^SHP("P1DTZs",36)

^SHP("P1DTZs",37)

^SHP("P1DTZs",38)

^SHP("P1DTZs",39)

^SHP("P1DTZs",40)

^SHP("P1DTZs",41)

^SHP("P1DTZs",42)

^SHP("P1DTZs",43)

^SHP("P1DTZs",44)

^SHP("P1DTZs",45)

^SHP("P1DTZs",46)

^SHP("P1DTZs",47)

^SHP("P1DTZs",48)

^SHP("P1DTZs",49)

^SHP("P1DTZs",50)

^SHP("P1DTZs",51)

^SHP("P1DTZs",52)

^SHP("P1DTZs",53)
                                                                  $ 
^SHP("P1DTZs",54)
               -----------------------------------------------------
^SHP("P1DTZs",55)
                                                                               
^SHP("P1DTZs",56)
                                    &20       >:k"dq  &15  >:zecerz k"dq       
^SHP("P1DTZs","RG")
H
^SHP("P1EZAs")

^SHP("P1EZAs",1)
                                 # dgex`l zepn hq #                            
^SHP("P1EZAs",2)
                                                                               
^SHP("P1EZAs",3)
                &06                           > &05    >:dgex` cew             
^SHP("P1EZAs",4)
                   ----------------------------------------------
^SHP("P1EZAs",5)
                   : zenk zwica :       dpn xe`z      : dpn cew :              
^SHP("P1EZAs",6)
                   ----------------------------------------------
^SHP("P1EZAs",7)
                   $TTTTTTTTTTTT:TTTTTTTTTTTTTTTTTTTTT: 99999999:1
^SHP("P1EZAs",8)

^SHP("P1EZAs",9)

^SHP("P1EZAs",10)

^SHP("P1EZAs",11)

^SHP("P1EZAs",12)

^SHP("P1EZAs",13)

^SHP("P1EZAs",14)

^SHP("P1EZAs",15)

^SHP("P1EZAs",16)

^SHP("P1EZAs",17)

^SHP("P1EZAs",18)

^SHP("P1EZAs",19)

^SHP("P1EZAs",20)

^SHP("P1EZAs",21)

^SHP("P1EZAs",22)

^SHP("P1EZAs",23)

^SHP("P1EZAs",24)

^SHP("P1EZAs",25)

^SHP("P1EZAs",26)

^SHP("P1EZAs",27)

^SHP("P1EZAs",28)

^SHP("P1EZAs",29)

^SHP("P1EZAs",30)

^SHP("P1EZAs",31)

^SHP("P1EZAs",32)

^SHP("P1EZAs",33)

^SHP("P1EZAs",34)

^SHP("P1EZAs",35)

^SHP("P1EZAs",36)

^SHP("P1EZAs",37)

^SHP("P1EZAs",38)

^SHP("P1EZAs",39)

^SHP("P1EZAs",40)

^SHP("P1EZAs",41)

^SHP("P1EZAs",42)

^SHP("P1EZAs",43)

^SHP("P1EZAs",44)

^SHP("P1EZAs",45)

^SHP("P1EZAs",46)

^SHP("P1EZAs",47)

^SHP("P1EZAs",48)

^SHP("P1EZAs",49)

^SHP("P1EZAs",50)

^SHP("P1EZAs",51)

^SHP("P1EZAs",52)

^SHP("P1EZAs",53)

^SHP("P1EZAs",54)
                                                               $ 
^SHP("P1EZAs",55)
                   ----------------------------------------------
^SHP("P1EZAs",56)
                                                                               
^SHP("P1EZAs","RG")
H
^SHP("P1EZHs")
zexrd
^SHP("P1EZHs",1)
                               # hixtl zexrd zxcbd #                           
^SHP("P1EZHs",2)
                                                                               
^SHP("P1EZHs",3)
               &06                           > &05    > : hixt cew             
^SHP("P1EZHs",4)
                      -------------------------------------------
^SHP("P1EZHs",5)
                      :             dxrd xe`z        : dxrd 'qn :              
^SHP("P1EZHs",6)
                      -------------------------------------------
^SHP("P1EZHs",7)
                      $TTTTTTTTTTTTTTTTTTTTTTTTTTTTTT:  99999999:1
^SHP("P1EZHs",8)

^SHP("P1EZHs",9)

^SHP("P1EZHs",10)

^SHP("P1EZHs",11)

^SHP("P1EZHs",12)

^SHP("P1EZHs",13)

^SHP("P1EZHs",14)

^SHP("P1EZHs",15)

^SHP("P1EZHs",16)

^SHP("P1EZHs",17)

^SHP("P1EZHs",18)

^SHP("P1EZHs",19)

^SHP("P1EZHs",20)

^SHP("P1EZHs",21)

^SHP("P1EZHs",22)

^SHP("P1EZHs",23)

^SHP("P1EZHs",24)

^SHP("P1EZHs",25)

^SHP("P1EZHs",26)

^SHP("P1EZHs",27)

^SHP("P1EZHs",28)

^SHP("P1EZHs",29)

^SHP("P1EZHs",30)

^SHP("P1EZHs",31)

^SHP("P1EZHs",32)

^SHP("P1EZHs",33)

^SHP("P1EZHs",34)

^SHP("P1EZHs",35)

^SHP("P1EZHs",36)

^SHP("P1EZHs",37)

^SHP("P1EZHs",38)

^SHP("P1EZHs",39)

^SHP("P1EZHs",40)

^SHP("P1EZHs",41)

^SHP("P1EZHs",42)

^SHP("P1EZHs",43)

^SHP("P1EZHs",44)

^SHP("P1EZHs",45)

^SHP("P1EZHs",46)

^SHP("P1EZHs",47)

^SHP("P1EZHs",48)

^SHP("P1EZHs",49)

^SHP("P1EZHs",50)

^SHP("P1EZHs",51)

^SHP("P1EZHs",52)

^SHP("P1EZHs",53)

^SHP("P1EZHs",54)
                                                               $ 
^SHP("P1EZHs",55)
                      -------------------------------------------
^SHP("P1EZHs",56)
                                                                               
^SHP("P1EZHs","RG")
H
^SHP("P1EZLPRs")
ceg` lewehext
^SHP("P1EZLPRs",1)
                    # zegewl ceg` lewehext #                                   
^SHP("P1EZLPRs",2)
                                                                               
^SHP("P1EZLPRs",3)
                    &10    > : jix`z cr       &05    > : jix`zn                
^SHP("P1EZLPRs",4)
  ---------------------------------------------------------------------------
^SHP("P1EZLPRs",5)
  : dlert :      my      : iy`x gewl:       my     : ccea gewl: dry : jix`z :  
^SHP("P1EZLPRs",6)
  ---------------------------------------------------------------------------
^SHP("P1EZLPRs",7)
  $TTTTTTT:TTTTTTTTTTTTTT:TTTTTTTTTT:TTTTTTTTTTTTTT:TTTTTTTTTT:TTTTT:TTTTTTT:1
^SHP("P1EZLPRs",8)

^SHP("P1EZLPRs",9)

^SHP("P1EZLPRs",10)

^SHP("P1EZLPRs",11)

^SHP("P1EZLPRs",12)

^SHP("P1EZLPRs",13)

^SHP("P1EZLPRs",14)

^SHP("P1EZLPRs",15)

^SHP("P1EZLPRs",16)

^SHP("P1EZLPRs",17)

^SHP("P1EZLPRs",18)

^SHP("P1EZLPRs",19)

^SHP("P1EZLPRs",20)

^SHP("P1EZLPRs",21)

^SHP("P1EZLPRs",22)

^SHP("P1EZLPRs",23)

^SHP("P1EZLPRs",24)

^SHP("P1EZLPRs",25)

^SHP("P1EZLPRs",26)

^SHP("P1EZLPRs",27)

^SHP("P1EZLPRs",28)

^SHP("P1EZLPRs",29)

^SHP("P1EZLPRs",30)

^SHP("P1EZLPRs",31)

^SHP("P1EZLPRs",32)

^SHP("P1EZLPRs",33)

^SHP("P1EZLPRs",34)

^SHP("P1EZLPRs",35)

^SHP("P1EZLPRs",36)

^SHP("P1EZLPRs",37)

^SHP("P1EZLPRs",38)

^SHP("P1EZLPRs",39)

^SHP("P1EZLPRs",40)

^SHP("P1EZLPRs",41)

^SHP("P1EZLPRs",42)

^SHP("P1EZLPRs",43)

^SHP("P1EZLPRs",44)

^SHP("P1EZLPRs",45)

^SHP("P1EZLPRs",46)

^SHP("P1EZLPRs",47)

^SHP("P1EZLPRs",48)

^SHP("P1EZLPRs",49)

^SHP("P1EZLPRs",50)

^SHP("P1EZLPRs",51)

^SHP("P1EZLPRs",52)

^SHP("P1EZLPRs",53)

^SHP("P1EZLPRs",54)
                                                                           $ 
^SHP("P1EZLPRs",55)
  ---------------------------------------------------------------------------  
^SHP("P1EZLPRs","RG")
H
^SHP("P1EZLs")
zegewl cegi`
^SHP("P1EZLs",1)
                                 # zegewl ur #                                 
^SHP("P1EZLs",2)
                                                                               
^SHP("P1EZLs",3)
             &06                           > &05      >   :iy`x gewl cew       
^SHP("P1EZLs",4)
                                                                               
^SHP("P1EZLs",5)
                           ---------------------------------------
^SHP("P1EZLs",6)
                           :         gewl my        :  gewl 'qn  :             
^SHP("P1EZLs",7)
                           ---------------------------------------
^SHP("P1EZLs",8)
                           $TTTTTTTTTTTTTTTTTTTTTTTT:  9999999999:1
^SHP("P1EZLs",9)

^SHP("P1EZLs",10)

^SHP("P1EZLs",11)

^SHP("P1EZLs",12)

^SHP("P1EZLs",13)

^SHP("P1EZLs",14)

^SHP("P1EZLs",15)

^SHP("P1EZLs",16)

^SHP("P1EZLs",17)

^SHP("P1EZLs",18)

^SHP("P1EZLs",19)

^SHP("P1EZLs",20)

^SHP("P1EZLs",21)

^SHP("P1EZLs",22)

^SHP("P1EZLs",23)

^SHP("P1EZLs",24)

^SHP("P1EZLs",25)

^SHP("P1EZLs",26)

^SHP("P1EZLs",27)

^SHP("P1EZLs",28)

^SHP("P1EZLs",29)

^SHP("P1EZLs",30)

^SHP("P1EZLs",31)

^SHP("P1EZLs",32)

^SHP("P1EZLs",33)

^SHP("P1EZLs",34)

^SHP("P1EZLs",35)

^SHP("P1EZLs",36)

^SHP("P1EZLs",37)

^SHP("P1EZLs",38)

^SHP("P1EZLs",39)

^SHP("P1EZLs",40)

^SHP("P1EZLs",41)

^SHP("P1EZLs",42)

^SHP("P1EZLs",43)

^SHP("P1EZLs",44)

^SHP("P1EZLs",45)

^SHP("P1EZLs",46)

^SHP("P1EZLs",47)

^SHP("P1EZLs",48)

^SHP("P1EZLs",49)

^SHP("P1EZLs",50)
                                                                               
^SHP("P1EZLs",51)
                                                                               
^SHP("P1EZLs",52)

^SHP("P1EZLs",53)

^SHP("P1EZLs",54)
                                                                $ 
^SHP("P1EZLs",55)
                           ---------------------------------------
^SHP("P1EZLs",56)
                                                                               
^SHP("P1EZLs","RG")
H
^SHP("P1EZMs")
zetqez
^SHP("P1EZMs",1)
                              # hixtl zetqez zxcbd #                           
^SHP("P1EZMs",2)
                                                                               
^SHP("P1EZMs",3)
               &06                           > &05    > : hixt cew             
^SHP("P1EZMs",4)
                                           &10 >:(l/k) daeg zetqez             
^SHP("P1EZMs",5)
                    ---------------------------------------------
^SHP("P1EZMs",6)
                    :  xign  :       ztqez xe`z     : ztqez cew :              
^SHP("P1EZMs",7)
                    ---------------------------------------------
^SHP("P1EZMs",8)
                    $ 9999.99:TTTTTTTTTTTTTTTTTTTTTT:   99999999:1
^SHP("P1EZMs",9)

^SHP("P1EZMs",10)

^SHP("P1EZMs",11)

^SHP("P1EZMs",12)

^SHP("P1EZMs",13)

^SHP("P1EZMs",14)

^SHP("P1EZMs",15)

^SHP("P1EZMs",16)

^SHP("P1EZMs",17)

^SHP("P1EZMs",18)

^SHP("P1EZMs",19)

^SHP("P1EZMs",20)

^SHP("P1EZMs",21)

^SHP("P1EZMs",22)

^SHP("P1EZMs",23)

^SHP("P1EZMs",24)

^SHP("P1EZMs",25)

^SHP("P1EZMs",26)

^SHP("P1EZMs",27)

^SHP("P1EZMs",28)

^SHP("P1EZMs",29)

^SHP("P1EZMs",30)

^SHP("P1EZMs",31)

^SHP("P1EZMs",32)

^SHP("P1EZMs",33)

^SHP("P1EZMs",34)

^SHP("P1EZMs",35)

^SHP("P1EZMs",36)

^SHP("P1EZMs",37)

^SHP("P1EZMs",38)

^SHP("P1EZMs",39)

^SHP("P1EZMs",40)

^SHP("P1EZMs",41)

^SHP("P1EZMs",42)

^SHP("P1EZMs",43)

^SHP("P1EZMs",44)

^SHP("P1EZMs",45)

^SHP("P1EZMs",46)

^SHP("P1EZMs",47)

^SHP("P1EZMs",48)

^SHP("P1EZMs",49)

^SHP("P1EZMs",50)

^SHP("P1EZMs",51)

^SHP("P1EZMs",52)
                                                                               
^SHP("P1EZMs",53)

^SHP("P1EZMs",54)
                                                               $ 
^SHP("P1EZMs",55)
                    ---------------------------------------------
^SHP("P1EZMs",56)
                                                                               
^SHP("P1EZMs","RG")
H
^SHP("P1EZRs")
dxixa-ax zetqez
^SHP("P1EZRs",1)
                           # dxixa-ax zetqez zxcbd #                           
^SHP("P1EZRs",2)
                                                                               
^SHP("P1EZRs",3)
               &06                           > &05    > : hixt cew             
^SHP("P1EZRs",4)
                                           &10 >:(l/k) daeg zetqez             
^SHP("P1EZRs",5)
                             ------------------------------------
^SHP("P1EZRs",6)
                             :       ztqez xe`z     : ztqez cew :              
^SHP("P1EZRs",7)
                             ------------------------------------
^SHP("P1EZRs",8)
                             $TTTTTTTTTTTTTTTTTTTTTT:   99999999:1
^SHP("P1EZRs",9)

^SHP("P1EZRs",10)

^SHP("P1EZRs",11)

^SHP("P1EZRs",12)

^SHP("P1EZRs",13)

^SHP("P1EZRs",14)

^SHP("P1EZRs",15)

^SHP("P1EZRs",16)

^SHP("P1EZRs",17)

^SHP("P1EZRs",18)

^SHP("P1EZRs",19)

^SHP("P1EZRs",20)

^SHP("P1EZRs",21)

^SHP("P1EZRs",22)

^SHP("P1EZRs",23)

^SHP("P1EZRs",24)

^SHP("P1EZRs",25)

^SHP("P1EZRs",26)

^SHP("P1EZRs",27)

^SHP("P1EZRs",28)

^SHP("P1EZRs",29)

^SHP("P1EZRs",30)

^SHP("P1EZRs",31)

^SHP("P1EZRs",32)

^SHP("P1EZRs",33)

^SHP("P1EZRs",34)

^SHP("P1EZRs",35)

^SHP("P1EZRs",36)

^SHP("P1EZRs",37)

^SHP("P1EZRs",38)

^SHP("P1EZRs",39)

^SHP("P1EZRs",40)

^SHP("P1EZRs",41)

^SHP("P1EZRs",42)

^SHP("P1EZRs",43)

^SHP("P1EZRs",44)

^SHP("P1EZRs",45)

^SHP("P1EZRs",46)

^SHP("P1EZRs",47)

^SHP("P1EZRs",48)

^SHP("P1EZRs",49)

^SHP("P1EZRs",50)

^SHP("P1EZRs",51)

^SHP("P1EZRs",52)

^SHP("P1EZRs",53)

^SHP("P1EZRs",54)
                                                               $ 
^SHP("P1EZRs",55)
                             ------------------------------------
^SHP("P1EZRs",56)
                                                                               
^SHP("P1EZRs","RG")
H
^SHP("P1FASTs")

^SHP("P1FASTs",1)
            # mixidn xa zepgley zlah #                                         
^SHP("P1FASTs",2)
                                                                               
^SHP("P1FASTs",3)
                                -------------
^SHP("P1FASTs",4)
                                : ogley 'qn :                                  
^SHP("P1FASTs",5)
                                -------------
^SHP("P1FASTs",6)
                                $TTTTTTTTTTT:1
^SHP("P1FASTs",7)

^SHP("P1FASTs",8)

^SHP("P1FASTs",9)

^SHP("P1FASTs",10)

^SHP("P1FASTs",11)

^SHP("P1FASTs",12)

^SHP("P1FASTs",13)

^SHP("P1FASTs",14)

^SHP("P1FASTs",15)

^SHP("P1FASTs",16)

^SHP("P1FASTs",17)

^SHP("P1FASTs",18)

^SHP("P1FASTs",19)

^SHP("P1FASTs",20)

^SHP("P1FASTs",21)

^SHP("P1FASTs",22)

^SHP("P1FASTs",23)

^SHP("P1FASTs",24)

^SHP("P1FASTs",25)

^SHP("P1FASTs",26)

^SHP("P1FASTs",27)

^SHP("P1FASTs",28)

^SHP("P1FASTs",29)

^SHP("P1FASTs",30)

^SHP("P1FASTs",31)

^SHP("P1FASTs",32)

^SHP("P1FASTs",33)

^SHP("P1FASTs",34)

^SHP("P1FASTs",35)

^SHP("P1FASTs",36)

^SHP("P1FASTs",37)

^SHP("P1FASTs",38)

^SHP("P1FASTs",39)

^SHP("P1FASTs",40)

^SHP("P1FASTs",41)

^SHP("P1FASTs",42)

^SHP("P1FASTs",43)

^SHP("P1FASTs",44)

^SHP("P1FASTs",45)

^SHP("P1FASTs",46)

^SHP("P1FASTs",47)

^SHP("P1FASTs",48)

^SHP("P1FASTs",49)

^SHP("P1FASTs",50)

^SHP("P1FASTs",51)

^SHP("P1FASTs",52)

^SHP("P1FASTs",53)
                                           $ 
^SHP("P1FASTs",54)
                                -------------
^SHP("P1FASTs",55)
                                                                               
^SHP("P1FASTs",56)
                                                                               
^SHP("P1FASTs","RG")
H
^SHP("P1HALLSH")

^SHP("P1HALLSH",1)
                        # "zepgley-mle`" dlah #                                
^SHP("P1HALLSH",2)
                                                                               
^SHP("P1HALLSH",3)
                              &06                     > &05   > : mle` 'qn     
^SHP("P1HALLSH",4)
                                                                               
^SHP("P1HALLSH",5)
              ---------------------------------------------------------
^SHP("P1HALLSH",6)
              : ogley beq xe`z : ogley beq :  ogley xe`z  : ogley 'qn :        
^SHP("P1HALLSH",7)
              ---------------------------------------------------------
^SHP("P1HALLSH",8)
              $TTTTTTTTTTTTTTTT:        999:TTTTTTTTTTTTTT:TTTTTTTTTTT:1
^SHP("P1HALLSH",9)

^SHP("P1HALLSH",10)

^SHP("P1HALLSH",11)

^SHP("P1HALLSH",12)

^SHP("P1HALLSH",13)

^SHP("P1HALLSH",14)

^SHP("P1HALLSH",15)

^SHP("P1HALLSH",16)

^SHP("P1HALLSH",17)

^SHP("P1HALLSH",18)

^SHP("P1HALLSH",19)

^SHP("P1HALLSH",20)

^SHP("P1HALLSH",21)

^SHP("P1HALLSH",22)

^SHP("P1HALLSH",23)

^SHP("P1HALLSH",24)

^SHP("P1HALLSH",25)

^SHP("P1HALLSH",26)

^SHP("P1HALLSH",27)

^SHP("P1HALLSH",28)

^SHP("P1HALLSH",29)

^SHP("P1HALLSH",30)

^SHP("P1HALLSH",31)

^SHP("P1HALLSH",32)

^SHP("P1HALLSH",33)

^SHP("P1HALLSH",34)

^SHP("P1HALLSH",35)

^SHP("P1HALLSH",36)

^SHP("P1HALLSH",37)

^SHP("P1HALLSH",38)

^SHP("P1HALLSH",39)

^SHP("P1HALLSH",40)

^SHP("P1HALLSH",41)

^SHP("P1HALLSH",42)

^SHP("P1HALLSH",43)

^SHP("P1HALLSH",44)

^SHP("P1HALLSH",45)

^SHP("P1HALLSH",46)

^SHP("P1HALLSH",47)

^SHP("P1HALLSH",48)

^SHP("P1HALLSH",49)

^SHP("P1HALLSH",50)

^SHP("P1HALLSH",51)

^SHP("P1HALLSH",52)

^SHP("P1HALLSH",53)

^SHP("P1HALLSH",54)

^SHP("P1HALLSH",55)

^SHP("P1HALLSH",56)

^SHP("P1HALLSH",57)
                                                                     $ 
^SHP("P1HALLSH",58)
              ---------------------------------------------------------
^SHP("P1HALLSH",59)
                                                                               
^SHP("P1HALLSH","RG")
H
^SHP("P1HALLSHs",1)
                        # "zepgley-mle`" dlah #                                
^SHP("P1HALLSHs",1,"%TOP")
24
^SHP("P1HALLSHs",2)
                                                                               
^SHP("P1HALLSHs",2,"%TOP")
79
^SHP("P1HALLSHs",3)
                              &06                     > &05   > : mle` 'qn     
^SHP("P1HALLSHs",3,"%TOP")
30
^SHP("P1HALLSHs",4)
                                                                               
^SHP("P1HALLSHs",4,"%TOP")
79
^SHP("P1HALLSHs",5)
              ---------------------------------------------------------
^SHP("P1HALLSHs",5,"%TOP")
14
^SHP("P1HALLSHs",6)
              : ogley beq xe`z : ogley beq :  ogley xe`z  : ogley 'qn :        
^SHP("P1HALLSHs",6,"%TOP")
14
^SHP("P1HALLSHs",7)
              ---------------------------------------------------------
^SHP("P1HALLSHs",7,"%TOP")
14
^SHP("P1HALLSHs",8)
              $TTTTTTTTTTTTTTTT:        999:TTTTTTTTTTTTTT:TTTTTTTTTTT:1
^SHP("P1HALLSHs",8,"%TOP")
14
^SHP("P1HALLSHs",9)

^SHP("P1HALLSHs",9,"%TOP")
0
^SHP("P1HALLSHs",10)

^SHP("P1HALLSHs",10,"%TOP")
0
^SHP("P1HALLSHs",11)

^SHP("P1HALLSHs",11,"%TOP")
0
^SHP("P1HALLSHs",12)

^SHP("P1HALLSHs",12,"%TOP")
0
^SHP("P1HALLSHs",13)

^SHP("P1HALLSHs",13,"%TOP")
0
^SHP("P1HALLSHs",14)

^SHP("P1HALLSHs",14,"%TOP")
0
^SHP("P1HALLSHs",15)

^SHP("P1HALLSHs",15,"%TOP")
0
^SHP("P1HALLSHs",16)

^SHP("P1HALLSHs",16,"%TOP")
0
^SHP("P1HALLSHs",17)

^SHP("P1HALLSHs",17,"%TOP")
0
^SHP("P1HALLSHs",18)

^SHP("P1HALLSHs",18,"%TOP")
0
^SHP("P1HALLSHs",19)

^SHP("P1HALLSHs",19,"%TOP")
0
^SHP("P1HALLSHs",20)

^SHP("P1HALLSHs",20,"%TOP")
0
^SHP("P1HALLSHs",21)

^SHP("P1HALLSHs",21,"%TOP")
0
^SHP("P1HALLSHs",22)

^SHP("P1HALLSHs",22,"%TOP")
0
^SHP("P1HALLSHs",23)

^SHP("P1HALLSHs",23,"%TOP")
0
^SHP("P1HALLSHs",24)

^SHP("P1HALLSHs",24,"%TOP")
0
^SHP("P1HALLSHs",25)

^SHP("P1HALLSHs",25,"%TOP")
0
^SHP("P1HALLSHs",26)

^SHP("P1HALLSHs",26,"%TOP")
0
^SHP("P1HALLSHs",27)

^SHP("P1HALLSHs",27,"%TOP")
0
^SHP("P1HALLSHs",28)

^SHP("P1HALLSHs",28,"%TOP")
0
^SHP("P1HALLSHs",29)

^SHP("P1HALLSHs",29,"%TOP")
0
^SHP("P1HALLSHs",30)

^SHP("P1HALLSHs",30,"%TOP")
0
^SHP("P1HALLSHs",31)

^SHP("P1HALLSHs",31,"%TOP")
0
^SHP("P1HALLSHs",32)

^SHP("P1HALLSHs",32,"%TOP")
0
^SHP("P1HALLSHs",33)

^SHP("P1HALLSHs",33,"%TOP")
0
^SHP("P1HALLSHs",34)

^SHP("P1HALLSHs",34,"%TOP")
0
^SHP("P1HALLSHs",35)

^SHP("P1HALLSHs",35,"%TOP")
0
^SHP("P1HALLSHs",36)

^SHP("P1HALLSHs",36,"%TOP")
0
^SHP("P1HALLSHs",37)

^SHP("P1HALLSHs",37,"%TOP")
0
^SHP("P1HALLSHs",38)

^SHP("P1HALLSHs",38,"%TOP")
0
^SHP("P1HALLSHs",39)

^SHP("P1HALLSHs",39,"%TOP")
0
^SHP("P1HALLSHs",40)

^SHP("P1HALLSHs",40,"%TOP")
0
^SHP("P1HALLSHs",41)

^SHP("P1HALLSHs",41,"%TOP")
0
^SHP("P1HALLSHs",42)

^SHP("P1HALLSHs",42,"%TOP")
0
^SHP("P1HALLSHs",43)

^SHP("P1HALLSHs",43,"%TOP")
0
^SHP("P1HALLSHs",44)

^SHP("P1HALLSHs",44,"%TOP")
0
^SHP("P1HALLSHs",45)

^SHP("P1HALLSHs",45,"%TOP")
0
^SHP("P1HALLSHs",46)

^SHP("P1HALLSHs",46,"%TOP")
0
^SHP("P1HALLSHs",47)

^SHP("P1HALLSHs",47,"%TOP")
0
^SHP("P1HALLSHs",48)

^SHP("P1HALLSHs",48,"%TOP")
0
^SHP("P1HALLSHs",49)

^SHP("P1HALLSHs",49,"%TOP")
0
^SHP("P1HALLSHs",50)

^SHP("P1HALLSHs",50,"%TOP")
0
^SHP("P1HALLSHs",51)

^SHP("P1HALLSHs",51,"%TOP")
0
^SHP("P1HALLSHs",52)

^SHP("P1HALLSHs",52,"%TOP")
0
^SHP("P1HALLSHs",53)

^SHP("P1HALLSHs",53,"%TOP")
0
^SHP("P1HALLSHs",54)

^SHP("P1HALLSHs",54,"%TOP")
0
^SHP("P1HALLSHs",55)

^SHP("P1HALLSHs",55,"%TOP")
0
^SHP("P1HALLSHs",56)

^SHP("P1HALLSHs",56,"%TOP")
0
^SHP("P1HALLSHs",57)
                                                                     $ 
^SHP("P1HALLSHs",57,"%TOP")
69
^SHP("P1HALLSHs",58)
              ---------------------------------------------------------
^SHP("P1HALLSHs",58,"%TOP")
14
^SHP("P1HALLSHs",59)
                                                                               
^SHP("P1HALLSHs",59,"%TOP")
79
^SHP("P1HALLSHs",60)
                                                                               
^SHP("P1HALLSHs",60,"%TOP")
79
^SHP("P1HALLSHs",61)
                                                                               
^SHP("P1HALLSHs",61,"%TOP")
79
^SHP("P1HALLSHs",62)
                                                                               
^SHP("P1HALLSHs",62,"%TOP")
79
^SHP("P1HALLSHs",63)
                                                                               
^SHP("P1HALLSHs",63,"%TOP")
79
^SHP("P1HALLSHs",64)
                                                                               
^SHP("P1HALLSHs",64,"%TOP")
79
^SHP("P1HALLSHs",65)
                                                                               
^SHP("P1HALLSHs",65,"%TOP")
79
^SHP("P1HALLSHs",66)
                                                                               
^SHP("P1HALLSHs",66,"%TOP")
79
^SHP("P1HALLSHs",67)
                                                                               
^SHP("P1HALLSHs",67,"%TOP")
79
^SHP("P1HALLSHs",68)
                                                                               
^SHP("P1HALLSHs",68,"%TOP")
79
^SHP("P1HALLSHs",69)
                                                                               
^SHP("P1HALLSHs",69,"%TOP")
79
^SHP("P1HALLSHs",70)
                                                                               
^SHP("P1HALLSHs",70,"%TOP")
79
^SHP("P1HALLSHs",71)
                                                                               
^SHP("P1HALLSHs",71,"%TOP")
79
^SHP("P1HALLSHs",72)
                                                                               
^SHP("P1HALLSHs",72,"%TOP")
79
^SHP("P1HALLSHs","RG")
H
^SHP("P1HALLs")

^SHP("P1HALLs",1)
                                # zenle` zlah #                                
^SHP("P1HALLs",2)
                                                                               
^SHP("P1HALLs",3)
                             ------------------------------------
^SHP("P1HALLs",4)
                             :        mle` my       : mle` 'qn  :              
^SHP("P1HALLs",5)
                             ------------------------------------
^SHP("P1HALLs",6)
                             $TTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTT:1
^SHP("P1HALLs",7)

^SHP("P1HALLs",8)

^SHP("P1HALLs",9)

^SHP("P1HALLs",10)

^SHP("P1HALLs",11)

^SHP("P1HALLs",12)

^SHP("P1HALLs",13)

^SHP("P1HALLs",14)

^SHP("P1HALLs",15)

^SHP("P1HALLs",16)

^SHP("P1HALLs",17)

^SHP("P1HALLs",18)

^SHP("P1HALLs",19)

^SHP("P1HALLs",20)

^SHP("P1HALLs",21)

^SHP("P1HALLs",22)

^SHP("P1HALLs",23)

^SHP("P1HALLs",24)

^SHP("P1HALLs",25)

^SHP("P1HALLs",26)

^SHP("P1HALLs",27)

^SHP("P1HALLs",28)

^SHP("P1HALLs",29)

^SHP("P1HALLs",30)

^SHP("P1HALLs",31)

^SHP("P1HALLs",32)

^SHP("P1HALLs",33)

^SHP("P1HALLs",34)

^SHP("P1HALLs",35)

^SHP("P1HALLs",36)

^SHP("P1HALLs",37)

^SHP("P1HALLs",38)

^SHP("P1HALLs",39)

^SHP("P1HALLs",40)

^SHP("P1HALLs",41)

^SHP("P1HALLs",42)

^SHP("P1HALLs",43)

^SHP("P1HALLs",44)

^SHP("P1HALLs",45)

^SHP("P1HALLs",46)

^SHP("P1HALLs",47)
                                                               $ 
^SHP("P1HALLs",48)
                             ------------------------------------
^SHP("P1HALLs",49)
                                                                               
^SHP("P1HALLs",50)
                                                                               
^SHP("P1HALLs","RG")
H
^SHP("P1HB2s")

^SHP("P1HB2s",1)
                     &03                                >                      
^SHP("P1HB2s",1,"%TOP")
21
^SHP("P1HB2s",2)
                                                                               
^SHP("P1HB2s",2,"%TOP")
79
^SHP("P1HB2s",3)
                       &10      > jix`z cr   &05      > jix`zn                 
^SHP("P1HB2s",3,"%TOP")
23
^SHP("P1HB2s",4)
                      &14       >  gewl cr   &12       > gewln                 
^SHP("P1HB2s",4,"%TOP")
22
^SHP("P1HB2s",5)
  -------------------------------------------------------------------------
^SHP("P1HB2s",5,"%TOP")
2
^SHP("P1HB2s",6)
  : `zknq`: dpnfd :   gewld my    : gewl 'qn :  mekq :i`xy` oeayg: jix`z  :    
^SHP("P1HB2s",6,"%TOP")
2
^SHP("P1HB2s",7)
  -------------------------------------------------------------------------
^SHP("P1HB2s",7,"%TOP")
2
^SHP("P1HB2s",8)
  $TTTTTTT:TTTTTTT:TTTTTTTTTTTTTTT:TTTTTTTTTT: 999.99:TTTTTTTTTTT:99999999:1
^SHP("P1HB2s",8,"%TOP")
2
^SHP("P1HB2s",9)

^SHP("P1HB2s",9,"%TOP")
0
^SHP("P1HB2s",10)

^SHP("P1HB2s",10,"%TOP")
0
^SHP("P1HB2s",11)

^SHP("P1HB2s",11,"%TOP")
0
^SHP("P1HB2s",12)

^SHP("P1HB2s",12,"%TOP")
0
^SHP("P1HB2s",13)

^SHP("P1HB2s",13,"%TOP")
0
^SHP("P1HB2s",14)

^SHP("P1HB2s",14,"%TOP")
0
^SHP("P1HB2s",15)

^SHP("P1HB2s",15,"%TOP")
0
^SHP("P1HB2s",16)

^SHP("P1HB2s",16,"%TOP")
0
^SHP("P1HB2s",17)

^SHP("P1HB2s",17,"%TOP")
0
^SHP("P1HB2s",18)

^SHP("P1HB2s",18,"%TOP")
0
^SHP("P1HB2s",19)

^SHP("P1HB2s",19,"%TOP")
0
^SHP("P1HB2s",20)

^SHP("P1HB2s",20,"%TOP")
0
^SHP("P1HB2s",21)

^SHP("P1HB2s",21,"%TOP")
0
^SHP("P1HB2s",22)

^SHP("P1HB2s",22,"%TOP")
0
^SHP("P1HB2s",23)

^SHP("P1HB2s",23,"%TOP")
0
^SHP("P1HB2s",24)

^SHP("P1HB2s",24,"%TOP")
0
^SHP("P1HB2s",25)

^SHP("P1HB2s",25,"%TOP")
0
^SHP("P1HB2s",26)

^SHP("P1HB2s",26,"%TOP")
0
^SHP("P1HB2s",27)

^SHP("P1HB2s",27,"%TOP")
0
^SHP("P1HB2s",28)

^SHP("P1HB2s",28,"%TOP")
0
^SHP("P1HB2s",29)

^SHP("P1HB2s",29,"%TOP")
0
^SHP("P1HB2s",30)

^SHP("P1HB2s",30,"%TOP")
0
^SHP("P1HB2s",31)

^SHP("P1HB2s",31,"%TOP")
0
^SHP("P1HB2s",32)

^SHP("P1HB2s",32,"%TOP")
0
^SHP("P1HB2s",33)

^SHP("P1HB2s",33,"%TOP")
0
^SHP("P1HB2s",34)

^SHP("P1HB2s",34,"%TOP")
0
^SHP("P1HB2s",35)

^SHP("P1HB2s",35,"%TOP")
0
^SHP("P1HB2s",36)

^SHP("P1HB2s",36,"%TOP")
0
^SHP("P1HB2s",37)

^SHP("P1HB2s",37,"%TOP")
0
^SHP("P1HB2s",38)

^SHP("P1HB2s",38,"%TOP")
0
^SHP("P1HB2s",39)

^SHP("P1HB2s",39,"%TOP")
0
^SHP("P1HB2s",40)

^SHP("P1HB2s",40,"%TOP")
0
^SHP("P1HB2s",41)

^SHP("P1HB2s",41,"%TOP")
0
^SHP("P1HB2s",42)

^SHP("P1HB2s",42,"%TOP")
0
^SHP("P1HB2s",43)

^SHP("P1HB2s",43,"%TOP")
0
^SHP("P1HB2s",44)

^SHP("P1HB2s",44,"%TOP")
0
^SHP("P1HB2s",45)

^SHP("P1HB2s",45,"%TOP")
0
^SHP("P1HB2s",46)

^SHP("P1HB2s",46,"%TOP")
0
^SHP("P1HB2s",47)

^SHP("P1HB2s",47,"%TOP")
0
^SHP("P1HB2s",48)

^SHP("P1HB2s",48,"%TOP")
0
^SHP("P1HB2s",49)

^SHP("P1HB2s",49,"%TOP")
0
^SHP("P1HB2s",50)

^SHP("P1HB2s",50,"%TOP")
0
^SHP("P1HB2s",51)

^SHP("P1HB2s",51,"%TOP")
0
^SHP("P1HB2s",52)

^SHP("P1HB2s",52,"%TOP")
0
^SHP("P1HB2s",53)

^SHP("P1HB2s",53,"%TOP")
0
^SHP("P1HB2s",54)

^SHP("P1HB2s",54,"%TOP")
0
^SHP("P1HB2s",55)
                                                                         $ 
^SHP("P1HB2s",55,"%TOP")
73
^SHP("P1HB2s",56)
  -------------------------------------------------------------------------
^SHP("P1HB2s",56,"%TOP")
2
^SHP("P1HB2s",57)
                       &25     : mitih  &20       >:k"dq  &15  >:zepeayg       
^SHP("P1HB2s",57,"%TOP")
23
^SHP("P1HB2s","RG")
H
^SHP("P1HBA1s")
dxv zqtcnl zipeayg
^SHP("P1HBA1s",1)
                                        &01                                  > 
^SHP("P1HBA1s",2)
                                        &02                                  > 
^SHP("P1HBA1s",3)
                                                            &71           >:lh 
^SHP("P1HBA1s",4)
                                                    &77          > :dyxen wqer 
^SHP("P1HBA1s",5)
                                              &74        > &72               > 
^SHP("P1HBA1s",6)
                                        &08                                  > 
^SHP("P1HBA1s",7)
                                                                               
^SHP("P1HBA1s",8)
                                                     #&05       ># : gewl xtqn 
^SHP("P1HBA1s",9)
                                        &10                         > :gewl my 
^SHP("P1HBA1s",10)
                                                       &12       > f.z/t.g/n.r 
^SHP("P1HBA1s",11)
                                        &15                         > :  zaezk 
^SHP("P1HBA1s",12)
                                                           &21      > : jix`zl 
^SHP("P1HBA1s",13)
                                                                               
^SHP("P1HBA1s",14)
                                           #&19  > qn zipeayg#                 
^SHP("P1HBA1s",15)
                                         #&22 >##&20   > xtqn#                 
^SHP("P1HBA1s",16)
                                         &24       > d`vwd 'qn                 
^SHP("P1HBA1s",17)
 <                                  36&                                        
^SHP("P1HBA1s",18)
                                                                               
^SHP("P1HBA1s",19)
                                       --------------------------------------- 
^SHP("P1HBA1s",20)
                                       :    mekq :        dxrd      :   mekq : 
^SHP("P1HBA1s",21)
                                       :n"rn llek:                  :n"rn `ll: 
^SHP("P1HBA1s",22)
                                       --------------------------------------- 
^SHP("P1HBA1s",23)
                                        $ 99999.99:       TP        :99999.99:1
^SHP("P1HBA1s",24)
                                                                               
^SHP("P1HBA1s",25)
                                                                               
^SHP("P1HBA1s",26)
                                                                               
^SHP("P1HBA1s",27)
                                                                               
^SHP("P1HBA1s",28)
                                                                               
^SHP("P1HBA1s",29)
                                                                               
^SHP("P1HBA1s",30)
                                                                               
^SHP("P1HBA1s",31)
                                                                               
^SHP("P1HBA1s",32)
                                                                              $
^SHP("P1HBA1s",33)
                                        ---------------------------------------
^SHP("P1HBA1s",34)
                                                        &25      >:zepnfd zenk 
^SHP("P1HBA1s",35)
                                                                               
^SHP("P1HBA1s",36)
                                           #&27     #: n"rn iptl mekq          
^SHP("P1HBA1s",37)
                                           #&28     #: n"rn                    
^SHP("P1HBA1s",38)
                                           #&30     #: k"dq                    
^SHP("P1HBA1s",39)
                                                                               
^SHP("P1HBA1s",40)
                                           #&45     #&44          >            
^SHP("P1HBA1s",41)
                                                                               
^SHP("P1HBA1s",42)
                                                     _______________:dnizg     
^SHP("P1HBA1s","RG")
H
^SHP("P1HBA2s")
dxv zqtcnl zipeayg
^SHP("P1HBA2s",1)
                                         &01                                  >
^SHP("P1HBA2s",1,"%TOP")
41
^SHP("P1HBA2s",2)
                                         &02                                  >
^SHP("P1HBA2s",2,"%TOP")
41
^SHP("P1HBA2s",3)
                                                             &71           >:lh
^SHP("P1HBA2s",3,"%TOP")
61
^SHP("P1HBA2s",4)
                                                     &77          > :dyxen wqer
^SHP("P1HBA2s",4,"%TOP")
53
^SHP("P1HBA2s",5)
                                                  &74      > &72              >
^SHP("P1HBA2s",5,"%TOP")
50
^SHP("P1HBA2s",6)
                                         &08                                  >
^SHP("P1HBA2s",6,"%TOP")
41
^SHP("P1HBA2s",7)
                                                                               
^SHP("P1HBA2s",7,"%TOP")
79
^SHP("P1HBA2s",8)
                                                      #&05       ># : gewl xtqn
^SHP("P1HBA2s",8,"%TOP")
54
^SHP("P1HBA2s",9)
                                         &10                         > :gewl my
^SHP("P1HBA2s",9,"%TOP")
41
^SHP("P1HBA2s",10)
                                         &15                         > :  zaezk
^SHP("P1HBA2s",10,"%TOP")
41
^SHP("P1HBA2s",11)
                                                            &21      > : jix`zl
^SHP("P1HBA2s",11,"%TOP")
60
^SHP("P1HBA2s",12)
                                                                               
^SHP("P1HBA2s",12,"%TOP")
79
^SHP("P1HBA2s",13)
                                         #&20                >#                
^SHP("P1HBA2s",13,"%TOP")
41
^SHP("P1HBA2s",14)
                                            #&22 >#                            
^SHP("P1HBA2s",14,"%TOP")
44
^SHP("P1HBA2s",15)
                                                     &24     > : dpnfd lr dwted
^SHP("P1HBA2s",15,"%TOP")
53
^SHP("P1HBA2s",16)
                                                                               
^SHP("P1HBA2s",16,"%TOP")
79
^SHP("P1HBA2s",17)
                                            #&26     #&25            >         
^SHP("P1HBA2s",17,"%TOP")
44
^SHP("P1HBA2s",18)
                                            #&27     #: n"rn iptl mekq         
^SHP("P1HBA2s",18,"%TOP")
44
^SHP("P1HBA2s",19)
                                            #&28     #: &32% n"rn              
^SHP("P1HBA2s",19,"%TOP")
44
^SHP("P1HBA2s",20)
                                            #&30     #: k"dq                   
^SHP("P1HBA2s",20,"%TOP")
44
^SHP("P1HBA2s",21)
                                                                               
^SHP("P1HBA2s",21,"%TOP")
79
^SHP("P1HBA2s",22)
                                            #&45     #&44         >            
^SHP("P1HBA2s",22,"%TOP")
44
^SHP("P1HBA2s",23)
                                                                               
^SHP("P1HBA2s",23,"%TOP")
79
^SHP("P1HBA2s",24)
                                                      _______________:dnizg    
^SHP("P1HBA2s",24,"%TOP")
54
^SHP("P1HBA2s","RG")
H
^SHP("P1HBAs")
zihnehe` 'ayg
^SHP("P1HBAs",1)
 #&01                               >#                                         
^SHP("P1HBAs",1,"%TOP")
1
^SHP("P1HBAs",2)
        #&21    >#: jix`zl                                                     
^SHP("P1HBAs",2,"%TOP")
8
^SHP("P1HBAs",3)
                                &02                                   >        
^SHP("P1HBAs",3,"%TOP")
32
^SHP("P1HBAs",4)
                                                    &71           > :lh        
^SHP("P1HBAs",4,"%TOP")
52
^SHP("P1HBAs",5)
                                             &77          > :dyxen wqer        
^SHP("P1HBAs",5,"%TOP")
45
^SHP("P1HBAs",6)
      &08                                    >                                 
^SHP("P1HBAs",6,"%TOP")
6
^SHP("P1HBAs",7)
                                                                               
^SHP("P1HBAs",7,"%TOP")
79
^SHP("P1HBAs",8)
   &10                                 > : my  &05         > :gewl xtqn        
^SHP("P1HBAs",8,"%TOP")
3
^SHP("P1HBAs",9)
   &15                                                       > :  zaezk        
^SHP("P1HBAs",9,"%TOP")
3
^SHP("P1HBAs",10)
                                                                               
^SHP("P1HBAs",10,"%TOP")
79
^SHP("P1HBAs",11)
       #&22 >         &24&76> qn zipeayg #                                     
^SHP("P1HBAs",11,"%TOP")
7
^SHP("P1HBAs",12)
                                                                               
^SHP("P1HBAs",12,"%TOP")
79
^SHP("P1HBAs",13)
       ----------------------------------------------------------------
^SHP("P1HBAs",13,"%TOP")
7
^SHP("P1HBAs",14)
       :    mekq  :                            dxrd         :   mekq  :        
^SHP("P1HBAs",14,"%TOP")
7
^SHP("P1HBAs",15)
       :n"rn llek :                                         :n"rn `ll :        
^SHP("P1HBAs",15,"%TOP")
7
^SHP("P1HBAs",16)
       ----------------------------------------------------------------
^SHP("P1HBAs",16,"%TOP")
7
^SHP("P1HBAs",17)
       $  99999.99:TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT:  9999.99:1
^SHP("P1HBAs",17,"%TOP")
7
^SHP("P1HBAs",18)
                                                                               
^SHP("P1HBAs",18,"%TOP")
79
^SHP("P1HBAs",19)
                                                                               
^SHP("P1HBAs",19,"%TOP")
79
^SHP("P1HBAs",20)
                                                                               
^SHP("P1HBAs",20,"%TOP")
79
^SHP("P1HBAs",21)
                                                                               
^SHP("P1HBAs",21,"%TOP")
79
^SHP("P1HBAs",22)
                                                                               
^SHP("P1HBAs",22,"%TOP")
79
^SHP("P1HBAs",23)
                                                                               
^SHP("P1HBAs",23,"%TOP")
79
^SHP("P1HBAs",24)
                                                                               
^SHP("P1HBAs",24,"%TOP")
79
^SHP("P1HBAs",25)
                                                                               
^SHP("P1HBAs",25,"%TOP")
79
^SHP("P1HBAs",26)
                                                                               
^SHP("P1HBAs",26,"%TOP")
79
^SHP("P1HBAs",27)
                                                                               
^SHP("P1HBAs",27,"%TOP")
79
^SHP("P1HBAs",28)
                                                                     $ 
^SHP("P1HBAs",28,"%TOP")
69
^SHP("P1HBAs",29)
       ----------------------------------------------------------------        
^SHP("P1HBAs",29,"%TOP")
7
^SHP("P1HBAs",30)
         &27      > :n"rn iptl mekq                                            
^SHP("P1HBAs",30,"%TOP")
9
^SHP("P1HBAs",31)
         &28      > :n"rn                                                      
^SHP("P1HBAs",31,"%TOP")
9
^SHP("P1HBAs",32)
         &30      > :k"dq                       &25      > :zepnfd zenk        
^SHP("P1HBAs",32,"%TOP")
9
^SHP("P1HBAs",33)
                                                                               
^SHP("P1HBAs",33,"%TOP")
79
^SHP("P1HBAs",34)
         &45      > &44         >                                              
^SHP("P1HBAs",34,"%TOP")
9
^SHP("P1HBAs",35)
                                                                               
^SHP("P1HBAs",35,"%TOP")
79
^SHP("P1HBAs",36)
         &50                                                          >        
^SHP("P1HBAs",36,"%TOP")
9
^SHP("P1HBAs",37)
                                                                               
^SHP("P1HBAs",37,"%TOP")
79
^SHP("P1HBAs",38)
                                                                               
^SHP("P1HBAs",38,"%TOP")
79
^SHP("P1HBAs",39)
                                                                               
^SHP("P1HBAs",39,"%TOP")
79
^SHP("P1HBAs",40)
                                                  _______________:dnizg        
^SHP("P1HBAs",40,"%TOP")
50
^SHP("P1HBAs",41)
                                                                               
^SHP("P1HBAs",41,"%TOP")
79
^SHP("P1HBAs","RG")
H
^SHP("P1HBMKs")
dlaw/qn-yg g"ec
^SHP("P1HBMKs",1)
        #&03                     >#                                            
^SHP("P1HBMKs",2)
                                                                               
^SHP("P1HBMKs",3)
                     &10      >:jix`z cr    &05      >:jix`zn                  
^SHP("P1HBMKs",4)
    -------------------------------------------------------------------------
^SHP("P1HBMKs",5)
    : melyz beq : dpnfd :   gewld my    : gewl 'qn :  mekq :zipeayg: jix`z  :  
^SHP("P1HBMKs",6)
    -------------------------------------------------------------------------
^SHP("P1HBMKs",7)
    $     999999: 999999:TTTTTTTTTTTTTTT:9999999999:9999.99:9999999:99999999:1
^SHP("P1HBMKs",8)

^SHP("P1HBMKs",9)

^SHP("P1HBMKs",10)

^SHP("P1HBMKs",11)

^SHP("P1HBMKs",12)

^SHP("P1HBMKs",13)

^SHP("P1HBMKs",14)

^SHP("P1HBMKs",15)

^SHP("P1HBMKs",16)

^SHP("P1HBMKs",17)

^SHP("P1HBMKs",18)

^SHP("P1HBMKs",19)

^SHP("P1HBMKs",20)

^SHP("P1HBMKs",21)

^SHP("P1HBMKs",22)

^SHP("P1HBMKs",23)

^SHP("P1HBMKs",24)

^SHP("P1HBMKs",25)

^SHP("P1HBMKs",26)

^SHP("P1HBMKs",27)

^SHP("P1HBMKs",28)

^SHP("P1HBMKs",29)

^SHP("P1HBMKs",30)

^SHP("P1HBMKs",31)

^SHP("P1HBMKs",32)

^SHP("P1HBMKs",33)

^SHP("P1HBMKs",34)

^SHP("P1HBMKs",35)

^SHP("P1HBMKs",36)

^SHP("P1HBMKs",37)

^SHP("P1HBMKs",38)

^SHP("P1HBMKs",39)

^SHP("P1HBMKs",40)

^SHP("P1HBMKs",41)

^SHP("P1HBMKs",42)

^SHP("P1HBMKs",43)

^SHP("P1HBMKs",44)

^SHP("P1HBMKs",45)

^SHP("P1HBMKs",46)

^SHP("P1HBMKs",47)

^SHP("P1HBMKs",48)

^SHP("P1HBMKs",49)
                                                                               
^SHP("P1HBMKs",50)
                                                                               
^SHP("P1HBMKs",51)

^SHP("P1HBMKs",52)
                                                                           $ 
^SHP("P1HBMKs",53)
    -------------------------------------------------------------------------
^SHP("P1HBMKs",54)
                                                                               
^SHP("P1HBMKs",55)
                                            &20       >:k"dq  &15  >:zeipeayg  
^SHP("P1HBMKs",56)
                                                                               
^SHP("P1HBMKs","RG")
H
^SHP("P1HBOs")
zegezt zeipeayg
^SHP("P1HBOs",1)
                        # zegezt zeipeayg #                                    
^SHP("P1HBOs",2)
                    &07      > :jix`z cr   &05      > :jix`zn                  
^SHP("P1HBOs",3)
                   &12       > : gewl cr  &10       > : gewln                  
^SHP("P1HBOs",4)
   ---------------------------------------------------------------------------
^SHP("P1HBOs",5)
   :   dxzi  :  mley  :  mekq  :  jix`z  :zipeayg:     gewl my    : gewl 'qn : 
^SHP("P1HBOs",6)
   ---------------------------------------------------------------------------
^SHP("P1HBOs",7)
   $ 99999.99:99999.99:99999.99: 99999999:TTTTTTT:TTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("P1HBOs",8)

^SHP("P1HBOs",9)
                                                                               
^SHP("P1HBOs",10)

^SHP("P1HBOs",11)

^SHP("P1HBOs",12)

^SHP("P1HBOs",13)

^SHP("P1HBOs",14)

^SHP("P1HBOs",15)

^SHP("P1HBOs",16)

^SHP("P1HBOs",17)

^SHP("P1HBOs",18)

^SHP("P1HBOs",19)

^SHP("P1HBOs",20)

^SHP("P1HBOs",21)

^SHP("P1HBOs",22)

^SHP("P1HBOs",23)

^SHP("P1HBOs",24)

^SHP("P1HBOs",25)

^SHP("P1HBOs",26)

^SHP("P1HBOs",27)

^SHP("P1HBOs",28)

^SHP("P1HBOs",29)

^SHP("P1HBOs",30)

^SHP("P1HBOs",31)

^SHP("P1HBOs",32)

^SHP("P1HBOs",33)

^SHP("P1HBOs",34)

^SHP("P1HBOs",35)

^SHP("P1HBOs",36)

^SHP("P1HBOs",37)

^SHP("P1HBOs",38)

^SHP("P1HBOs",39)

^SHP("P1HBOs",40)

^SHP("P1HBOs",41)

^SHP("P1HBOs",42)

^SHP("P1HBOs",43)

^SHP("P1HBOs",44)

^SHP("P1HBOs",45)

^SHP("P1HBOs",46)

^SHP("P1HBOs",47)

^SHP("P1HBOs",48)

^SHP("P1HBOs",49)

^SHP("P1HBOs",50)

^SHP("P1HBOs",51)

^SHP("P1HBOs",52)

^SHP("P1HBOs",53)
                                                                            $ 
^SHP("P1HBOs",54)
   ---------------------------------------------------------------------------
^SHP("P1HBOs",55)
                                                                               
^SHP("P1HBOs",56)
   &25      >&20     >&15     >                                                
^SHP("P1HBOs","RG")
H
^SHP("P1HBTs")
minelyz zifgz
^SHP("P1HBTs",1)
                         # minelyz zifgz #                                     
^SHP("P1HBTs",2)
                                                                               
^SHP("P1HBTs",3)
                     &10      >:jix`z cr    &05      >:jix`zn                  
^SHP("P1HBTs",4)
   ------------------------------------------------------------------------
^SHP("P1HBTs",5)
   : 'ayg jix`z :     gewld my    : gewl 'qn :  dxzi  :zipeayg:melyz jix`z:    
^SHP("P1HBTs",6)
   ------------------------------------------------------------------------
^SHP("P1HBTs",7)
   $    99999999:TTTTTTTTTTTTTTTTT:9999999999: 9999.99:9999999:   99999999:1
^SHP("P1HBTs",8)

^SHP("P1HBTs",9)

^SHP("P1HBTs",10)

^SHP("P1HBTs",11)

^SHP("P1HBTs",12)

^SHP("P1HBTs",13)

^SHP("P1HBTs",14)

^SHP("P1HBTs",15)

^SHP("P1HBTs",16)

^SHP("P1HBTs",17)

^SHP("P1HBTs",18)

^SHP("P1HBTs",19)

^SHP("P1HBTs",20)

^SHP("P1HBTs",21)

^SHP("P1HBTs",22)

^SHP("P1HBTs",23)

^SHP("P1HBTs",24)

^SHP("P1HBTs",25)

^SHP("P1HBTs",26)

^SHP("P1HBTs",27)

^SHP("P1HBTs",28)

^SHP("P1HBTs",29)

^SHP("P1HBTs",30)

^SHP("P1HBTs",31)

^SHP("P1HBTs",32)

^SHP("P1HBTs",33)

^SHP("P1HBTs",34)

^SHP("P1HBTs",35)

^SHP("P1HBTs",36)

^SHP("P1HBTs",37)

^SHP("P1HBTs",38)

^SHP("P1HBTs",39)

^SHP("P1HBTs",40)

^SHP("P1HBTs",41)

^SHP("P1HBTs",42)

^SHP("P1HBTs",43)

^SHP("P1HBTs",44)

^SHP("P1HBTs",45)

^SHP("P1HBTs",46)

^SHP("P1HBTs",47)

^SHP("P1HBTs",48)

^SHP("P1HBTs",49)

^SHP("P1HBTs",50)

^SHP("P1HBTs",51)

^SHP("P1HBTs",52)

^SHP("P1HBTs",53)
                                                                         $ 
^SHP("P1HBTs",54)
   ------------------------------------------------------------------------
^SHP("P1HBTs",55)
                                                                               
^SHP("P1HBTs",56)
                                           &20       >: k"dq                   
^SHP("P1HBTs","RG")
H
^SHP("P1HBs")
qn zeipeayg g"ec
^SHP("P1HBs",1)
        #&03                     >#                                            
^SHP("P1HBs",1,"%TOP")
8
^SHP("P1HBs",2)
                                                                               
^SHP("P1HBs",2,"%TOP")
79
^SHP("P1HBs",3)
                     &10      >:jix`z cr    &05      >:jix`zn                  
^SHP("P1HBs",3,"%TOP")
21
^SHP("P1HBs",4)
                    &13       >: gewl cr  &12        >: gewln                  
^SHP("P1HBs",4,"%TOP")
20
^SHP("P1HBs",5)
        &14 > :  3 - zeipeaygd lk ,2 - zeipci ,1 - zeihnehe` zeipeayg          
^SHP("P1HBs",5,"%TOP")
8
^SHP("P1HBs",6)
    -------------------------------------------------------------------
^SHP("P1HBs",6,"%TOP")
4
^SHP("P1HBs",7)
    :      gewld my    :  gewl 'qn :  n"rn  :  mekq  :zipeayg: jix`z  :        
^SHP("P1HBs",7,"%TOP")
4
^SHP("P1HBs",8)
    -------------------------------------------------------------------
^SHP("P1HBs",8,"%TOP")
4
^SHP("P1HBs",9)
    $TTTTTTTTTTTTTTTTTT:TTTTTTTTTTT:99999.99:99999.99:TTTTTTT:99999999:1
^SHP("P1HBs",9,"%TOP")
4
^SHP("P1HBs",10)

^SHP("P1HBs",10,"%TOP")
0
^SHP("P1HBs",11)

^SHP("P1HBs",11,"%TOP")
0
^SHP("P1HBs",12)

^SHP("P1HBs",12,"%TOP")
0
^SHP("P1HBs",13)

^SHP("P1HBs",13,"%TOP")
0
^SHP("P1HBs",14)

^SHP("P1HBs",14,"%TOP")
0
^SHP("P1HBs",15)

^SHP("P1HBs",15,"%TOP")
0
^SHP("P1HBs",16)

^SHP("P1HBs",16,"%TOP")
0
^SHP("P1HBs",17)

^SHP("P1HBs",17,"%TOP")
0
^SHP("P1HBs",18)

^SHP("P1HBs",18,"%TOP")
0
^SHP("P1HBs",19)

^SHP("P1HBs",19,"%TOP")
0
^SHP("P1HBs",20)

^SHP("P1HBs",20,"%TOP")
0
^SHP("P1HBs",21)

^SHP("P1HBs",21,"%TOP")
0
^SHP("P1HBs",22)

^SHP("P1HBs",22,"%TOP")
0
^SHP("P1HBs",23)

^SHP("P1HBs",23,"%TOP")
0
^SHP("P1HBs",24)

^SHP("P1HBs",24,"%TOP")
0
^SHP("P1HBs",25)

^SHP("P1HBs",25,"%TOP")
0
^SHP("P1HBs",26)

^SHP("P1HBs",26,"%TOP")
0
^SHP("P1HBs",27)

^SHP("P1HBs",27,"%TOP")
0
^SHP("P1HBs",28)

^SHP("P1HBs",28,"%TOP")
0
^SHP("P1HBs",29)

^SHP("P1HBs",29,"%TOP")
0
^SHP("P1HBs",30)

^SHP("P1HBs",30,"%TOP")
0
^SHP("P1HBs",31)

^SHP("P1HBs",31,"%TOP")
0
^SHP("P1HBs",32)

^SHP("P1HBs",32,"%TOP")
0
^SHP("P1HBs",33)

^SHP("P1HBs",33,"%TOP")
0
^SHP("P1HBs",34)

^SHP("P1HBs",34,"%TOP")
0
^SHP("P1HBs",35)

^SHP("P1HBs",35,"%TOP")
0
^SHP("P1HBs",36)

^SHP("P1HBs",36,"%TOP")
0
^SHP("P1HBs",37)

^SHP("P1HBs",37,"%TOP")
0
^SHP("P1HBs",38)

^SHP("P1HBs",38,"%TOP")
0
^SHP("P1HBs",39)

^SHP("P1HBs",39,"%TOP")
0
^SHP("P1HBs",40)

^SHP("P1HBs",40,"%TOP")
0
^SHP("P1HBs",41)

^SHP("P1HBs",41,"%TOP")
0
^SHP("P1HBs",42)

^SHP("P1HBs",42,"%TOP")
0
^SHP("P1HBs",43)

^SHP("P1HBs",43,"%TOP")
0
^SHP("P1HBs",44)

^SHP("P1HBs",44,"%TOP")
0
^SHP("P1HBs",45)

^SHP("P1HBs",45,"%TOP")
0
^SHP("P1HBs",46)

^SHP("P1HBs",46,"%TOP")
0
^SHP("P1HBs",47)

^SHP("P1HBs",47,"%TOP")
0
^SHP("P1HBs",48)

^SHP("P1HBs",48,"%TOP")
0
^SHP("P1HBs",49)

^SHP("P1HBs",49,"%TOP")
0
^SHP("P1HBs",50)

^SHP("P1HBs",50,"%TOP")
0
^SHP("P1HBs",51)

^SHP("P1HBs",51,"%TOP")
0
^SHP("P1HBs",52)
                                                                     $ 
^SHP("P1HBs",52,"%TOP")
69
^SHP("P1HBs",53)
    -------------------------------------------------------------------
^SHP("P1HBs",53,"%TOP")
4
^SHP("P1HBs",54)
                                                                               
^SHP("P1HBs",54,"%TOP")
79
^SHP("P1HBs",55)
  &30       >: n"rn iptl  &25    >: n"rn  &20       >:k"dq  &15  >:zeipeayg    
^SHP("P1HBs",55,"%TOP")
2
^SHP("P1HBs",56)
                                                                               
^SHP("P1HBs",56,"%TOP")
79
^SHP("P1HBs",57)
zfkexn i`ln zipeayg - 'M' , i`lndn dxiyi zipeayg - '<' , zipci zipeayg - '+' * 
^SHP("P1HBs",57,"%TOP")
0
^SHP("P1HBs","RG")
H
^SHP("P1HBs0")
zeipeayg g"ec
^SHP("P1HBs0",1)
        #&03                     >#                                            
^SHP("P1HBs0",1,"%TOP")
8
^SHP("P1HBs0",2)
                                                                               
^SHP("P1HBs0",2,"%TOP")
79
^SHP("P1HBs0",3)
                     &10      >:jix`z cr    &05      >:jix`zn                  
^SHP("P1HBs0",3,"%TOP")
21
^SHP("P1HBs0",4)
                    &13       >: gewl cr  &12        >: gewln                  
^SHP("P1HBs0",4,"%TOP")
20
^SHP("P1HBs0",5)
                                                                               
^SHP("P1HBs0",5,"%TOP")
79
^SHP("P1HBs0",6)
    &14> : 3 - zeipeaygd lk , 2 - zeipci , 1 - zeihnehe` zeipeayg              
^SHP("P1HBs0",6,"%TOP")
4
^SHP("P1HBs0",7)
        ---------------------------------------------------------
^SHP("P1HBs0",7,"%TOP")
8
^SHP("P1HBs0",8)
        :      gewld my    : gewl 'qn :  mekq  :zipeayg: jix`z  :              
^SHP("P1HBs0",8,"%TOP")
8
^SHP("P1HBs0",9)
        ---------------------------------------------------------
^SHP("P1HBs0",9,"%TOP")
8
^SHP("P1HBs0",10)
        $TTTTTTTTTTTTTTTTTT:TTTTTTTTTT:99999.99:TTTTTTT:99999999:1
^SHP("P1HBs0",10,"%TOP")
8
^SHP("P1HBs0",11)

^SHP("P1HBs0",11,"%TOP")
0
^SHP("P1HBs0",12)

^SHP("P1HBs0",12,"%TOP")
0
^SHP("P1HBs0",13)

^SHP("P1HBs0",13,"%TOP")
0
^SHP("P1HBs0",14)

^SHP("P1HBs0",14,"%TOP")
0
^SHP("P1HBs0",15)

^SHP("P1HBs0",15,"%TOP")
0
^SHP("P1HBs0",16)

^SHP("P1HBs0",16,"%TOP")
0
^SHP("P1HBs0",17)

^SHP("P1HBs0",17,"%TOP")
0
^SHP("P1HBs0",18)

^SHP("P1HBs0",18,"%TOP")
0
^SHP("P1HBs0",19)

^SHP("P1HBs0",19,"%TOP")
0
^SHP("P1HBs0",20)

^SHP("P1HBs0",20,"%TOP")
0
^SHP("P1HBs0",21)

^SHP("P1HBs0",21,"%TOP")
0
^SHP("P1HBs0",22)

^SHP("P1HBs0",22,"%TOP")
0
^SHP("P1HBs0",23)

^SHP("P1HBs0",23,"%TOP")
0
^SHP("P1HBs0",24)

^SHP("P1HBs0",24,"%TOP")
0
^SHP("P1HBs0",25)

^SHP("P1HBs0",25,"%TOP")
0
^SHP("P1HBs0",26)

^SHP("P1HBs0",26,"%TOP")
0
^SHP("P1HBs0",27)

^SHP("P1HBs0",27,"%TOP")
0
^SHP("P1HBs0",28)

^SHP("P1HBs0",28,"%TOP")
0
^SHP("P1HBs0",29)

^SHP("P1HBs0",29,"%TOP")
0
^SHP("P1HBs0",30)

^SHP("P1HBs0",30,"%TOP")
0
^SHP("P1HBs0",31)

^SHP("P1HBs0",31,"%TOP")
0
^SHP("P1HBs0",32)

^SHP("P1HBs0",32,"%TOP")
0
^SHP("P1HBs0",33)

^SHP("P1HBs0",33,"%TOP")
0
^SHP("P1HBs0",34)

^SHP("P1HBs0",34,"%TOP")
0
^SHP("P1HBs0",35)

^SHP("P1HBs0",35,"%TOP")
0
^SHP("P1HBs0",36)

^SHP("P1HBs0",36,"%TOP")
0
^SHP("P1HBs0",37)

^SHP("P1HBs0",37,"%TOP")
0
^SHP("P1HBs0",38)

^SHP("P1HBs0",38,"%TOP")
0
^SHP("P1HBs0",39)

^SHP("P1HBs0",39,"%TOP")
0
^SHP("P1HBs0",40)

^SHP("P1HBs0",40,"%TOP")
0
^SHP("P1HBs0",41)

^SHP("P1HBs0",41,"%TOP")
0
^SHP("P1HBs0",42)

^SHP("P1HBs0",42,"%TOP")
0
^SHP("P1HBs0",43)

^SHP("P1HBs0",43,"%TOP")
0
^SHP("P1HBs0",44)

^SHP("P1HBs0",44,"%TOP")
0
^SHP("P1HBs0",45)

^SHP("P1HBs0",45,"%TOP")
0
^SHP("P1HBs0",46)

^SHP("P1HBs0",46,"%TOP")
0
^SHP("P1HBs0",47)

^SHP("P1HBs0",47,"%TOP")
0
^SHP("P1HBs0",48)

^SHP("P1HBs0",48,"%TOP")
0
^SHP("P1HBs0",49)

^SHP("P1HBs0",49,"%TOP")
0
^SHP("P1HBs0",50)

^SHP("P1HBs0",50,"%TOP")
0
^SHP("P1HBs0",51)

^SHP("P1HBs0",51,"%TOP")
0
^SHP("P1HBs0",52)

^SHP("P1HBs0",52,"%TOP")
0
^SHP("P1HBs0",53)

^SHP("P1HBs0",53,"%TOP")
0
^SHP("P1HBs0",54)
                                                               $ 
^SHP("P1HBs0",54,"%TOP")
63
^SHP("P1HBs0",55)
        ---------------------------------------------------------
^SHP("P1HBs0",55,"%TOP")
8
^SHP("P1HBs0",56)
        :                  :          :&20    >: &15 > :zeipeayg:              
^SHP("P1HBs0",56,"%TOP")
8
^SHP("P1HBs0",57)
        ---------------------------------------------------------              
^SHP("P1HBs0",57,"%TOP")
8
^SHP("P1HBs0","RG")
H
^SHP("P1HZ0v")
(VIEW) dpnfd
^SHP("P1HZ0v",1)
 {11      } daeg {                      10} : my {05        } :(oetlh) gewl 'qn
^SHP("P1HZ0v",2)
                                                                               
^SHP("P1HZ0v",3)
                               #{12   }:dpnfd#                                 
^SHP("P1HZ0v",4)
          #{                              20}#                                 
^SHP("P1HZ0v",5)
                                           {                        15} : zaezk
^SHP("P1HZ0v",6)
                                                                               
^SHP("P1HZ0v",7)
      {34      } : dryl {32      } : jix`zl {31              } : dpnfd zlaw onf
^SHP("P1HZ0v",8)
                                                                             1$
^SHP("P1HZ0v",9)
 :        dxrd      :  mekq :zetqez:zenk: xign:      hixt xe`z     :   cew   : 
^SHP("P1HZ0v",10)
                                                                               
^SHP("P1HZ0v",11)
                                                                               
^SHP("P1HZ0v",12)
                                                                               
^SHP("P1HZ0v",13)
                                                                               
^SHP("P1HZ0v",14)
                                                                               
^SHP("P1HZ0v",15)
                                                                               
^SHP("P1HZ0v",16)
                                                                               
^SHP("P1HZ0v",17)
                                                                               
^SHP("P1HZ0v",18)
                                                                               
^SHP("P1HZ0v",19)
                                                                               
^SHP("P1HZ0v",20)
                                                                               
^SHP("P1HZ0v",21)
                                                                               
^SHP("P1HZ0v",22)
                                                                               
^SHP("P1HZ0v",23)
 $1                                                                            
^SHP("P1HZ0v",24)
  {                          53}:dxrd _                                        
^SHP("P1HZ0v",25)
  {                          65}:gily                                          
^SHP("P1HZ0v",26)
  {                        52}:cilwnd                                          
^SHP("P1HZ0v",27)
                  {69    }:ztqep dgpd                                          
^SHP("P1HZ0v",28)
                                                                               
^SHP("P1HZ0v","RG")
H
^SHP("P1HZCAs")
zepnfd itl `"k g"ec
^SHP("P1HZCAs",1)
                            # zepnfd itl `"k g"ec #                            
^SHP("P1HZCAs",2)
                    &10      > jix`z cr    &05     >: jix`zn                   
^SHP("P1HZCAs",3)
                    &20      > dpnfd cr    &15     >: dpnfdn                   
^SHP("P1HZCAs",4)
  --------------------------------------------------------------------------
^SHP("P1HZCAs",5)
  :  mekq  : `"k beq :       `"k 'qn     :dwqr 'qn: dry :  jix`z :dpnfd 'qn:   
^SHP("P1HZCAs",6)
  --------------------------------------------------------------------------
^SHP("P1HZCAs",7)
  $99999.99:TTTTTTTTT:TTTTTTTTTTTTTTTTTTT:TTTTTTTT:TTTTT:99999999:TTTTTTTTT:1
^SHP("P1HZCAs",8)

^SHP("P1HZCAs",9)

^SHP("P1HZCAs",10)

^SHP("P1HZCAs",11)

^SHP("P1HZCAs",12)

^SHP("P1HZCAs",13)

^SHP("P1HZCAs",14)

^SHP("P1HZCAs",15)

^SHP("P1HZCAs",16)

^SHP("P1HZCAs",17)

^SHP("P1HZCAs",18)

^SHP("P1HZCAs",19)

^SHP("P1HZCAs",20)

^SHP("P1HZCAs",21)

^SHP("P1HZCAs",22)

^SHP("P1HZCAs",23)

^SHP("P1HZCAs",24)

^SHP("P1HZCAs",25)

^SHP("P1HZCAs",26)

^SHP("P1HZCAs",27)

^SHP("P1HZCAs",28)

^SHP("P1HZCAs",29)

^SHP("P1HZCAs",30)

^SHP("P1HZCAs",31)

^SHP("P1HZCAs",32)

^SHP("P1HZCAs",33)

^SHP("P1HZCAs",34)

^SHP("P1HZCAs",35)

^SHP("P1HZCAs",36)

^SHP("P1HZCAs",37)

^SHP("P1HZCAs",38)

^SHP("P1HZCAs",39)

^SHP("P1HZCAs",40)

^SHP("P1HZCAs",41)

^SHP("P1HZCAs",42)

^SHP("P1HZCAs",43)

^SHP("P1HZCAs",44)

^SHP("P1HZCAs",45)

^SHP("P1HZCAs",46)

^SHP("P1HZCAs",47)

^SHP("P1HZCAs",48)

^SHP("P1HZCAs",49)

^SHP("P1HZCAs",50)

^SHP("P1HZCAs",51)

^SHP("P1HZCAs",52)
                                                                          $ 
^SHP("P1HZCAs",53)
  --------------------------------------------------------------------------
^SHP("P1HZCAs",54)
                                                                               
^SHP("P1HZCAs",55)
        &35     >: qxpiic k"dq  &30     >: dfie k"dq &25     >: hxk`xyi k"dq   
^SHP("P1HZCAs",56)
        &50     >:    `"k k"dq  &45     >: `tl` k"dq &40     >:.qw` .n` k"dq   
^SHP("P1HZCAs","RG")
H
^SHP("P1HZH",1)
                       &05                                                     
^SHP("P1HZH",1,"%TOP")
23
^SHP("P1HZMN1s")

^SHP("P1HZMN1s",1)
                                     # ogley zepnfd #                          
^SHP("P1HZMN1s",1,"%TOP")
37
^SHP("P1HZMN1s",2)
                                                                               
^SHP("P1HZMN1s",2,"%TOP")
79
^SHP("P1HZMN1s",3)
               &13                   >   &10 > mei   &05     >: jix`z          
^SHP("P1HZMN1s",3,"%TOP")
15
^SHP("P1HZMN1s",4)
  ----------------------------------------------------------------------------
^SHP("P1HZMN1s",4,"%TOP")
2
^SHP("P1HZMN1s",5)
  :    zepgley   :rex`:mipyrn:  oet`lt  :   oetlh   :  oinfnd my  :creq: dry : 
^SHP("P1HZMN1s",5,"%TOP")
2
^SHP("P1HZMN1s",6)
                    : lawnd :                 dxrd                :            
^SHP("P1HZMN1s",6,"%TOP")
20
^SHP("P1HZMN1s",7)
  ----------------------------------------------------------------------------
^SHP("P1HZMN1s",7,"%TOP")
2
^SHP("P1HZMN1s",8)
  $TTTTTTTTTTTTTT:TTTT:TTTTTT:TTTTTTTTTT:TTTTTTTTTTT:TTTTTTTTTTTTT:9999:99999:1
^SHP("P1HZMN1s",8,"%TOP")
2
^SHP("P1HZMN1s",9)
                         TTTTTTT:TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT:2
^SHP("P1HZMN1s",9,"%TOP")
25
^SHP("P1HZMN1s",10)

^SHP("P1HZMN1s",10,"%TOP")
0
^SHP("P1HZMN1s",11)

^SHP("P1HZMN1s",11,"%TOP")
0
^SHP("P1HZMN1s",12)

^SHP("P1HZMN1s",12,"%TOP")
0
^SHP("P1HZMN1s",13)

^SHP("P1HZMN1s",13,"%TOP")
0
^SHP("P1HZMN1s",14)

^SHP("P1HZMN1s",14,"%TOP")
0
^SHP("P1HZMN1s",15)

^SHP("P1HZMN1s",15,"%TOP")
0
^SHP("P1HZMN1s",16)

^SHP("P1HZMN1s",16,"%TOP")
0
^SHP("P1HZMN1s",17)

^SHP("P1HZMN1s",17,"%TOP")
0
^SHP("P1HZMN1s",18)

^SHP("P1HZMN1s",18,"%TOP")
0
^SHP("P1HZMN1s",19)

^SHP("P1HZMN1s",19,"%TOP")
0
^SHP("P1HZMN1s",20)

^SHP("P1HZMN1s",20,"%TOP")
0
^SHP("P1HZMN1s",21)

^SHP("P1HZMN1s",21,"%TOP")
0
^SHP("P1HZMN1s",22)

^SHP("P1HZMN1s",22,"%TOP")
0
^SHP("P1HZMN1s",23)

^SHP("P1HZMN1s",23,"%TOP")
0
^SHP("P1HZMN1s",24)

^SHP("P1HZMN1s",24,"%TOP")
0
^SHP("P1HZMN1s",25)

^SHP("P1HZMN1s",25,"%TOP")
0
^SHP("P1HZMN1s",26)

^SHP("P1HZMN1s",26,"%TOP")
0
^SHP("P1HZMN1s",27)

^SHP("P1HZMN1s",27,"%TOP")
0
^SHP("P1HZMN1s",28)

^SHP("P1HZMN1s",28,"%TOP")
0
^SHP("P1HZMN1s",29)

^SHP("P1HZMN1s",29,"%TOP")
0
^SHP("P1HZMN1s",30)

^SHP("P1HZMN1s",30,"%TOP")
0
^SHP("P1HZMN1s",31)

^SHP("P1HZMN1s",31,"%TOP")
0
^SHP("P1HZMN1s",32)

^SHP("P1HZMN1s",32,"%TOP")
0
^SHP("P1HZMN1s",33)

^SHP("P1HZMN1s",33,"%TOP")
0
^SHP("P1HZMN1s",34)

^SHP("P1HZMN1s",34,"%TOP")
0
^SHP("P1HZMN1s",35)

^SHP("P1HZMN1s",35,"%TOP")
0
^SHP("P1HZMN1s",36)

^SHP("P1HZMN1s",36,"%TOP")
0
^SHP("P1HZMN1s",37)

^SHP("P1HZMN1s",37,"%TOP")
0
^SHP("P1HZMN1s",38)

^SHP("P1HZMN1s",38,"%TOP")
0
^SHP("P1HZMN1s",39)

^SHP("P1HZMN1s",39,"%TOP")
0
^SHP("P1HZMN1s",40)

^SHP("P1HZMN1s",40,"%TOP")
0
^SHP("P1HZMN1s",41)

^SHP("P1HZMN1s",41,"%TOP")
0
^SHP("P1HZMN1s",42)

^SHP("P1HZMN1s",42,"%TOP")
0
^SHP("P1HZMN1s",43)

^SHP("P1HZMN1s",43,"%TOP")
0
^SHP("P1HZMN1s",44)

^SHP("P1HZMN1s",44,"%TOP")
0
^SHP("P1HZMN1s",45)

^SHP("P1HZMN1s",45,"%TOP")
0
^SHP("P1HZMN1s",46)

^SHP("P1HZMN1s",46,"%TOP")
0
^SHP("P1HZMN1s",47)

^SHP("P1HZMN1s",47,"%TOP")
0
^SHP("P1HZMN1s",48)

^SHP("P1HZMN1s",48,"%TOP")
0
^SHP("P1HZMN1s",49)

^SHP("P1HZMN1s",49,"%TOP")
0
^SHP("P1HZMN1s",50)

^SHP("P1HZMN1s",50,"%TOP")
0
^SHP("P1HZMN1s",51)

^SHP("P1HZMN1s",51,"%TOP")
0
^SHP("P1HZMN1s",52)

^SHP("P1HZMN1s",52,"%TOP")
0
^SHP("P1HZMN1s",53)
                                                                            $ 
^SHP("P1HZMN1s",53,"%TOP")
76
^SHP("P1HZMN1s",54)
  ----------------------------------------------------------------------------
^SHP("P1HZMN1s",54,"%TOP")
2
^SHP("P1HZMN1s",55)
                                                                               
^SHP("P1HZMN1s",55,"%TOP")
79
^SHP("P1HZMN1s",56)
                                                      &20    > : micreq k"dq   
^SHP("P1HZMN1s",56,"%TOP")
54
^SHP("P1HZMN1s","RG")
H
^SHP("P1HZMNs")
zepnfd onei
^SHP("P1HZMNs",1)
                                     # ogley zepnfd #                          
^SHP("P1HZMNs",1,"%TOP")
37
^SHP("P1HZMNs",2)
                                                                               
^SHP("P1HZMNs",2,"%TOP")
79
^SHP("P1HZMNs",3)
              &13                   >    &10 > mei   &05     >: jix`z          
^SHP("P1HZMNs",3,"%TOP")
14
^SHP("P1HZMNs",4)
     ------------------------------------------------------------------------
^SHP("P1HZMNs",4,"%TOP")
5
^SHP("P1HZMNs",5)
     :mitqep zepgley:ogley: dry :micreq:  oinfnd my  :  oet`lt   :oinfnd lh :  
^SHP("P1HZMNs",5,"%TOP")
5
^SHP("P1HZMNs",6)
      : lawnd :                 dxrd                :rex`:mipyrn:              
^SHP("P1HZMNs",6,"%TOP")
6
^SHP("P1HZMNs",7)
     ------------------------------------------------------------------------
^SHP("P1HZMNs",7,"%TOP")
5
^SHP("P1HZMNs",8)
     $TTTTTTTTTTTTTT:  999:99999:   999:TTTTTTTTTTTTT:TTTTTTTTTTT:TTTTTTTTTT:1
^SHP("P1HZMNs",8,"%TOP")
5
^SHP("P1HZMNs",9)
       TTTTTTT:TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT:TTTT:TTTTTT:2
^SHP("P1HZMNs",9,"%TOP")
7
^SHP("P1HZMNs",10)

^SHP("P1HZMNs",10,"%TOP")
0
^SHP("P1HZMNs",11)

^SHP("P1HZMNs",11,"%TOP")
0
^SHP("P1HZMNs",12)

^SHP("P1HZMNs",12,"%TOP")
0
^SHP("P1HZMNs",13)

^SHP("P1HZMNs",13,"%TOP")
0
^SHP("P1HZMNs",14)

^SHP("P1HZMNs",14,"%TOP")
0
^SHP("P1HZMNs",15)

^SHP("P1HZMNs",15,"%TOP")
0
^SHP("P1HZMNs",16)

^SHP("P1HZMNs",16,"%TOP")
0
^SHP("P1HZMNs",17)

^SHP("P1HZMNs",17,"%TOP")
0
^SHP("P1HZMNs",18)

^SHP("P1HZMNs",18,"%TOP")
0
^SHP("P1HZMNs",19)

^SHP("P1HZMNs",19,"%TOP")
0
^SHP("P1HZMNs",20)

^SHP("P1HZMNs",20,"%TOP")
0
^SHP("P1HZMNs",21)

^SHP("P1HZMNs",21,"%TOP")
0
^SHP("P1HZMNs",22)

^SHP("P1HZMNs",22,"%TOP")
0
^SHP("P1HZMNs",23)

^SHP("P1HZMNs",23,"%TOP")
0
^SHP("P1HZMNs",24)

^SHP("P1HZMNs",24,"%TOP")
0
^SHP("P1HZMNs",25)

^SHP("P1HZMNs",25,"%TOP")
0
^SHP("P1HZMNs",26)

^SHP("P1HZMNs",26,"%TOP")
0
^SHP("P1HZMNs",27)

^SHP("P1HZMNs",27,"%TOP")
0
^SHP("P1HZMNs",28)

^SHP("P1HZMNs",28,"%TOP")
0
^SHP("P1HZMNs",29)

^SHP("P1HZMNs",29,"%TOP")
0
^SHP("P1HZMNs",30)

^SHP("P1HZMNs",30,"%TOP")
0
^SHP("P1HZMNs",31)

^SHP("P1HZMNs",31,"%TOP")
0
^SHP("P1HZMNs",32)

^SHP("P1HZMNs",32,"%TOP")
0
^SHP("P1HZMNs",33)

^SHP("P1HZMNs",33,"%TOP")
0
^SHP("P1HZMNs",34)

^SHP("P1HZMNs",34,"%TOP")
0
^SHP("P1HZMNs",35)

^SHP("P1HZMNs",35,"%TOP")
0
^SHP("P1HZMNs",36)

^SHP("P1HZMNs",36,"%TOP")
0
^SHP("P1HZMNs",37)

^SHP("P1HZMNs",37,"%TOP")
0
^SHP("P1HZMNs",38)

^SHP("P1HZMNs",38,"%TOP")
0
^SHP("P1HZMNs",39)

^SHP("P1HZMNs",39,"%TOP")
0
^SHP("P1HZMNs",40)

^SHP("P1HZMNs",40,"%TOP")
0
^SHP("P1HZMNs",41)

^SHP("P1HZMNs",41,"%TOP")
0
^SHP("P1HZMNs",42)

^SHP("P1HZMNs",42,"%TOP")
0
^SHP("P1HZMNs",43)

^SHP("P1HZMNs",43,"%TOP")
0
^SHP("P1HZMNs",44)

^SHP("P1HZMNs",44,"%TOP")
0
^SHP("P1HZMNs",45)

^SHP("P1HZMNs",45,"%TOP")
0
^SHP("P1HZMNs",46)

^SHP("P1HZMNs",46,"%TOP")
0
^SHP("P1HZMNs",47)

^SHP("P1HZMNs",47,"%TOP")
0
^SHP("P1HZMNs",48)

^SHP("P1HZMNs",48,"%TOP")
0
^SHP("P1HZMNs",49)

^SHP("P1HZMNs",49,"%TOP")
0
^SHP("P1HZMNs",50)

^SHP("P1HZMNs",50,"%TOP")
0
^SHP("P1HZMNs",51)

^SHP("P1HZMNs",51,"%TOP")
0
^SHP("P1HZMNs",52)

^SHP("P1HZMNs",52,"%TOP")
0
^SHP("P1HZMNs",53)
                                                                          $ 
^SHP("P1HZMNs",53,"%TOP")
74
^SHP("P1HZMNs",54)
    ------------------------------------------------------------------------  
^SHP("P1HZMNs",54,"%TOP")
4
^SHP("P1HZMNs",55)
                                                                               
^SHP("P1HZMNs",55,"%TOP")
79
^SHP("P1HZMNs",56)
                                                      &20    > : micreq k"dq   
^SHP("P1HZMNs",56,"%TOP")
54
^SHP("P1HZMNs","RG")
H
^SHP("P1HZMSv")
dcrqnl dpnfd
^SHP("P1HZMSv",1)
                                                                               
^SHP("P1HZMSv",1,"%TOP")
79
^SHP("P1HZMSv",2)
                                                                {12     }:dpnfd
^SHP("P1HZMSv",2,"%TOP")
64
^SHP("P1HZMSv",3)
                        {03                   }:xvlnd       {05     }:ogley 'qn
^SHP("P1HZMSv",3,"%TOP")
24
^SHP("P1HZMSv",4)
                                              {31              }:dpnfd zlaw onf
^SHP("P1HZMSv",4,"%TOP")
46
^SHP("P1HZMSv",5)
                                   {74               }   {72      } 'qn zipeayg
^SHP("P1HZMSv",5,"%TOP")
35
^SHP("P1HZMSv",6)
                                                                             1$
^SHP("P1HZMSv",6,"%TOP")
77
^SHP("P1HZMSv",7)
   :        dxrd      :  mekq :zetqez:zenk: xign:      hixt xe`z     : cew :   
^SHP("P1HZMSv",7,"%TOP")
3
^SHP("P1HZMSv",8)
                                                                               
^SHP("P1HZMSv",8,"%TOP")
79
^SHP("P1HZMSv",9)
                                                                               
^SHP("P1HZMSv",9,"%TOP")
79
^SHP("P1HZMSv",10)
                                                                               
^SHP("P1HZMSv",10,"%TOP")
79
^SHP("P1HZMSv",11)
                                                                               
^SHP("P1HZMSv",11,"%TOP")
79
^SHP("P1HZMSv",12)
                                                                               
^SHP("P1HZMSv",12,"%TOP")
79
^SHP("P1HZMSv",13)
                                                                               
^SHP("P1HZMSv",13,"%TOP")
79
^SHP("P1HZMSv",14)
                                                                               
^SHP("P1HZMSv",14,"%TOP")
79
^SHP("P1HZMSv",15)
                                                                               
^SHP("P1HZMSv",15,"%TOP")
79
^SHP("P1HZMSv",16)
                                                                               
^SHP("P1HZMSv",16,"%TOP")
79
^SHP("P1HZMSv",17)
                                                                               
^SHP("P1HZMSv",17,"%TOP")
79
^SHP("P1HZMSv",18)
                                                                               
^SHP("P1HZMSv",18,"%TOP")
79
^SHP("P1HZMSv",19)
 $1                                                                            
^SHP("P1HZMSv",19,"%TOP")
1
^SHP("P1HZMSv",20)
               {            03} :xvln                                          
^SHP("P1HZMSv",20,"%TOP")
15
^SHP("P1HZMSv",21)
                                                                               
^SHP("P1HZMSv",21,"%TOP")
79
^SHP("P1HZMSv","RG")
H
^SHP("P1HZv")
(VIEW) dpnfd
^SHP("P1HZv",1)
 {11      } daeg {                      10} : my {05        } :(oetlh) gewl 'qn
^SHP("P1HZv",1,"%TOP")
1
^SHP("P1HZv",2)
                                                                               
^SHP("P1HZv",2,"%TOP")
79
^SHP("P1HZv",3)
                               #{12   }:dpnfd#                                 
^SHP("P1HZv",3,"%TOP")
31
^SHP("P1HZv",4)
                                           {                        15} : zaezk
^SHP("P1HZv",4,"%TOP")
43
^SHP("P1HZv",5)
                        #{                      20}#                           
^SHP("P1HZv",5,"%TOP")
24
^SHP("P1HZv",6)
      {34      } : dryl {32      } : jix`zl {31              } : dpnfd zlaw onf
^SHP("P1HZv",6,"%TOP")
6
^SHP("P1HZv",7)
                                                                             1$
^SHP("P1HZv",7,"%TOP")
77
^SHP("P1HZv",8)
 :        dxrd      :  mekq :zetqez:zenk: xign:      hixt xe`z     :   cew   : 
^SHP("P1HZv",8,"%TOP")
1
^SHP("P1HZv",9)
                                                                               
^SHP("P1HZv",9,"%TOP")
79
^SHP("P1HZv",10)
                                                                               
^SHP("P1HZv",10,"%TOP")
79
^SHP("P1HZv",11)
                                                                               
^SHP("P1HZv",11,"%TOP")
79
^SHP("P1HZv",12)
                                                                               
^SHP("P1HZv",12,"%TOP")
79
^SHP("P1HZv",13)
                                                                               
^SHP("P1HZv",13,"%TOP")
79
^SHP("P1HZv",14)
                                                                               
^SHP("P1HZv",14,"%TOP")
79
^SHP("P1HZv",15)
                                                                               
^SHP("P1HZv",15,"%TOP")
79
^SHP("P1HZv",16)
                                                                               
^SHP("P1HZv",16,"%TOP")
79
^SHP("P1HZv",17)
                                                                               
^SHP("P1HZv",17,"%TOP")
79
^SHP("P1HZv",18)
                                                                               
^SHP("P1HZv",18,"%TOP")
79
^SHP("P1HZv",19)
                                                                               
^SHP("P1HZv",19,"%TOP")
79
^SHP("P1HZv",20)
                                                                               
^SHP("P1HZv",20,"%TOP")
79
^SHP("P1HZv",21)
                                                                               
^SHP("P1HZv",21,"%TOP")
79
^SHP("P1HZv",22)
 $1                                                                            
^SHP("P1HZv",22,"%TOP")
1
^SHP("P1HZv",23)
  {                          53}:dxrd _                                        
^SHP("P1HZv",23,"%TOP")
2
^SHP("P1HZv",24)
  {                          65}:gily                                          
^SHP("P1HZv",24,"%TOP")
2
^SHP("P1HZv",25)
  {                        52}:cilwnd                                          
^SHP("P1HZv",25,"%TOP")
2
^SHP("P1HZv",26)
                  {69    }:ztqep dgpd                                          
^SHP("P1HZv",26,"%TOP")
18
^SHP("P1HZv",27)
                                                                               
^SHP("P1HZv",27,"%TOP")
79
^SHP("P1HZv","RG")
H
^SHP("P1LHB1s")
dxv 'ayg
^SHP("P1LHB1s",1)
                                                         #&20  > zipeayg hext# 
^SHP("P1LHB1s",1,"%TOP")
57
^SHP("P1LHB1s",2)
                                                                               
^SHP("P1LHB1s",2,"%TOP")
79
^SHP("P1LHB1s",3)
                                                       &05        > :gewl xtqn 
^SHP("P1LHB1s",3,"%TOP")
55
^SHP("P1LHB1s",4)
                                         &10                        > :gewl my 
^SHP("P1LHB1s",4,"%TOP")
41
^SHP("P1LHB1s",5)
                                         &15                        > :  zaezk 
^SHP("P1LHB1s",5,"%TOP")
41
^SHP("P1LHB1s",6)
                                                                               
^SHP("P1LHB1s",6,"%TOP")
79
^SHP("P1LHB1s",7)
                                        -------------------------------------
^SHP("P1LHB1s",7,"%TOP")
40
^SHP("P1LHB1s",8)
                                          :     gewl my    : gewl 'qn : dpnfd :
^SHP("P1LHB1s",8,"%TOP")
42
^SHP("P1LHB1s",9)
                                        -------------------------------------
^SHP("P1LHB1s",9,"%TOP")
40
^SHP("P1LHB1s",10)
                                          :     mekq    :  dryl  :   jix`zl   :
^SHP("P1LHB1s",10,"%TOP")
42
^SHP("P1LHB1s",11)
                                          -------------------------------------
^SHP("P1LHB1s",11,"%TOP")
42
^SHP("P1LHB1s",12)
                                        $       TP       :TTTTTTTTTT:9999999:1
^SHP("P1LHB1s",12,"%TOP")
40
^SHP("P1LHB1s",13)
                                        :  99999.99   :  TTTTT : TTTTTTTTTT :2
^SHP("P1LHB1s",13,"%TOP")
40
^SHP("P1LHB1s",14)

^SHP("P1LHB1s",14,"%TOP")
0
^SHP("P1LHB1s",15)

^SHP("P1LHB1s",15,"%TOP")
0
^SHP("P1LHB1s",16)
                                                                               
^SHP("P1LHB1s",16,"%TOP")
79
^SHP("P1LHB1s",17)
                                                                               
^SHP("P1LHB1s",17,"%TOP")
79
^SHP("P1LHB1s",18)
                                                                               
^SHP("P1LHB1s",18,"%TOP")
79
^SHP("P1LHB1s",19)
                                                                               
^SHP("P1LHB1s",19,"%TOP")
79
^SHP("P1LHB1s",20)
                                                                               
^SHP("P1LHB1s",20,"%TOP")
79
^SHP("P1LHB1s",21)
                                                                               
^SHP("P1LHB1s",21,"%TOP")
79
^SHP("P1LHB1s",22)
                                                                               
^SHP("P1LHB1s",22,"%TOP")
79
^SHP("P1LHB1s",23)
                                                                               
^SHP("P1LHB1s",23,"%TOP")
79
^SHP("P1LHB1s",24)
                                                                               
^SHP("P1LHB1s",24,"%TOP")
79
^SHP("P1LHB1s",25)
                                                                               
^SHP("P1LHB1s",25,"%TOP")
79
^SHP("P1LHB1s",26)
                                                                               
^SHP("P1LHB1s",26,"%TOP")
79
^SHP("P1LHB1s",27)
                                                                               
^SHP("P1LHB1s",27,"%TOP")
79
^SHP("P1LHB1s",28)
                                                                               
^SHP("P1LHB1s",28,"%TOP")
79
^SHP("P1LHB1s",29)
                                                                               
^SHP("P1LHB1s",29,"%TOP")
79
^SHP("P1LHB1s",30)
                                                                               
^SHP("P1LHB1s",30,"%TOP")
79
^SHP("P1LHB1s",31)
                                                                               
^SHP("P1LHB1s",31,"%TOP")
79
^SHP("P1LHB1s",32)
                                                                               
^SHP("P1LHB1s",32,"%TOP")
79
^SHP("P1LHB1s",33)
                                                                               
^SHP("P1LHB1s",33,"%TOP")
79
^SHP("P1LHB1s",34)
                                                                               
^SHP("P1LHB1s",34,"%TOP")
79
^SHP("P1LHB1s",35)
                                                                               
^SHP("P1LHB1s",35,"%TOP")
79
^SHP("P1LHB1s",36)
                                                                               
^SHP("P1LHB1s",36,"%TOP")
79
^SHP("P1LHB1s",37)
                                                                               
^SHP("P1LHB1s",37,"%TOP")
79
^SHP("P1LHB1s",38)
                                                                               
^SHP("P1LHB1s",38,"%TOP")
79
^SHP("P1LHB1s",39)
                                                                               
^SHP("P1LHB1s",39,"%TOP")
79
^SHP("P1LHB1s",40)
                                                                               
^SHP("P1LHB1s",40,"%TOP")
79
^SHP("P1LHB1s",41)
                                                                               
^SHP("P1LHB1s",41,"%TOP")
79
^SHP("P1LHB1s",42)
                                                                               
^SHP("P1LHB1s",42,"%TOP")
79
^SHP("P1LHB1s",43)
                                                                               
^SHP("P1LHB1s",43,"%TOP")
79
^SHP("P1LHB1s",44)
                                                                               
^SHP("P1LHB1s",44,"%TOP")
79
^SHP("P1LHB1s",45)
                                                                               
^SHP("P1LHB1s",45,"%TOP")
79
^SHP("P1LHB1s",46)
                                                                               
^SHP("P1LHB1s",46,"%TOP")
79
^SHP("P1LHB1s",47)
                                                                               
^SHP("P1LHB1s",47,"%TOP")
79
^SHP("P1LHB1s",48)
                                                                               
^SHP("P1LHB1s",48,"%TOP")
79
^SHP("P1LHB1s",49)
                                                                               
^SHP("P1LHB1s",49,"%TOP")
79
^SHP("P1LHB1s",50)
                                                                               
^SHP("P1LHB1s",50,"%TOP")
79
^SHP("P1LHB1s",51)
                                                                               
^SHP("P1LHB1s",51,"%TOP")
79
^SHP("P1LHB1s",52)
                                                                               
^SHP("P1LHB1s",52,"%TOP")
79
^SHP("P1LHB1s",53)
                                                                               
^SHP("P1LHB1s",53,"%TOP")
79
^SHP("P1LHB1s",54)
                                                                               
^SHP("P1LHB1s",54,"%TOP")
79
^SHP("P1LHB1s",55)
                                                                            $ 
^SHP("P1LHB1s",55,"%TOP")
76
^SHP("P1LHB1s",56)
                                        -------------------------------------
^SHP("P1LHB1s",56,"%TOP")
40
^SHP("P1LHB1s",57)
                                                     &25      > :zepnfd zenk   
^SHP("P1LHB1s",57,"%TOP")
53
^SHP("P1LHB1s",58)
                                                     &30      > :       k"dq   
^SHP("P1LHB1s",58,"%TOP")
53
^SHP("P1LHB1s",59)
                                                                               
^SHP("P1LHB1s",59,"%TOP")
79
^SHP("P1LHB1s","RG")
H
^SHP("P1LHBMs")

^SHP("P1LHBMs",1)
                                   # zipeayg hext #                            
^SHP("P1LHBMs",2)
              &10                          >:gewl my  &05         >:gewl xtqn  
^SHP("P1LHBMs",3)
              &15                                                    >: zaezk  
^SHP("P1LHBMs",4)
                               #&20      > zipeayg #                           
^SHP("P1LHBMs",5)
      ----------------------------------------------------------------------
^SHP("P1LHBMs",6)
      :   mekq  :  jix`z :       gewl my     :  gewl 'qn  :    gelyn 'z    :   
^SHP("P1LHBMs",7)
      ----------------------------------------------------------------------
^SHP("P1LHBMs",8)
      $999999.99:99999999:TTTTTTTTTTTTTTTTTTT:TTTTTTTTTTTT:TTTTTTTTTTTTTTTT:1
^SHP("P1LHBMs",9)

^SHP("P1LHBMs",10)

^SHP("P1LHBMs",11)

^SHP("P1LHBMs",12)

^SHP("P1LHBMs",13)

^SHP("P1LHBMs",14)

^SHP("P1LHBMs",15)

^SHP("P1LHBMs",16)

^SHP("P1LHBMs",17)

^SHP("P1LHBMs",18)

^SHP("P1LHBMs",19)

^SHP("P1LHBMs",20)

^SHP("P1LHBMs",21)

^SHP("P1LHBMs",22)

^SHP("P1LHBMs",23)

^SHP("P1LHBMs",24)

^SHP("P1LHBMs",25)

^SHP("P1LHBMs",26)

^SHP("P1LHBMs",27)

^SHP("P1LHBMs",28)

^SHP("P1LHBMs",29)

^SHP("P1LHBMs",30)

^SHP("P1LHBMs",31)

^SHP("P1LHBMs",32)

^SHP("P1LHBMs",33)

^SHP("P1LHBMs",34)

^SHP("P1LHBMs",35)

^SHP("P1LHBMs",36)

^SHP("P1LHBMs",37)

^SHP("P1LHBMs",38)

^SHP("P1LHBMs",39)

^SHP("P1LHBMs",40)

^SHP("P1LHBMs",41)

^SHP("P1LHBMs",42)

^SHP("P1LHBMs",43)

^SHP("P1LHBMs",44)

^SHP("P1LHBMs",45)

^SHP("P1LHBMs",46)

^SHP("P1LHBMs",47)

^SHP("P1LHBMs",48)

^SHP("P1LHBMs",49)

^SHP("P1LHBMs",50)

^SHP("P1LHBMs",51)

^SHP("P1LHBMs",52)

^SHP("P1LHBMs",53)
                                                                          $ 
^SHP("P1LHBMs",54)
      ----------------------------------------------------------------------
^SHP("P1LHBMs",55)
                                                                               
^SHP("P1LHBMs",56)
           &30      >:k"dq          &25      >:zepnfd xtqn                     
^SHP("P1LHBMs","RG")
H
^SHP("P1LHBs")

^SHP("P1LHBs",1)
                          # zipeayg hext #                                     
^SHP("P1LHBs",1,"%TOP")
26
^SHP("P1LHBs",2)
                                                                               
^SHP("P1LHBs",2,"%TOP")
79
^SHP("P1LHBs",3)
              &10                          >:gewl my  &05         >:gewl xtqn  
^SHP("P1LHBs",3,"%TOP")
14
^SHP("P1LHBs",4)
              &15                                                    >: zaezk  
^SHP("P1LHBs",4,"%TOP")
14
^SHP("P1LHBs",5)
                                                                               
^SHP("P1LHBs",5,"%TOP")
79
^SHP("P1LHBs",6)
                     #&20      > zipeayg #                                     
^SHP("P1LHBs",6,"%TOP")
21
^SHP("P1LHBs",7)
                                                                               
^SHP("P1LHBs",7,"%TOP")
79
^SHP("P1LHBs",8)
  ---------------------------------------------------------------------------
^SHP("P1LHBs",8,"%TOP")
2
^SHP("P1LHBs",9)
  : `zknq` :  mekq  : dryl : jix`zl :       gewl my     :  gewl 'qn : dpnfd :  
^SHP("P1LHBs",9,"%TOP")
2
^SHP("P1LHBs",10)
  ---------------------------------------------------------------------------
^SHP("P1LHBs",10,"%TOP")
2
^SHP("P1LHBs",11)
  $ 9999999: 9999.99:999999:99999999:TTTTTTTTTTTTTTTTTTT:99999999999:9999999:1
^SHP("P1LHBs",11,"%TOP")
2
^SHP("P1LHBs",12)

^SHP("P1LHBs",12,"%TOP")
0
^SHP("P1LHBs",13)

^SHP("P1LHBs",13,"%TOP")
0
^SHP("P1LHBs",14)

^SHP("P1LHBs",14,"%TOP")
0
^SHP("P1LHBs",15)

^SHP("P1LHBs",15,"%TOP")
0
^SHP("P1LHBs",16)

^SHP("P1LHBs",16,"%TOP")
0
^SHP("P1LHBs",17)

^SHP("P1LHBs",17,"%TOP")
0
^SHP("P1LHBs",18)

^SHP("P1LHBs",18,"%TOP")
0
^SHP("P1LHBs",19)

^SHP("P1LHBs",19,"%TOP")
0
^SHP("P1LHBs",20)

^SHP("P1LHBs",20,"%TOP")
0
^SHP("P1LHBs",21)

^SHP("P1LHBs",21,"%TOP")
0
^SHP("P1LHBs",22)

^SHP("P1LHBs",22,"%TOP")
0
^SHP("P1LHBs",23)

^SHP("P1LHBs",23,"%TOP")
0
^SHP("P1LHBs",24)

^SHP("P1LHBs",24,"%TOP")
0
^SHP("P1LHBs",25)

^SHP("P1LHBs",25,"%TOP")
0
^SHP("P1LHBs",26)

^SHP("P1LHBs",26,"%TOP")
0
^SHP("P1LHBs",27)

^SHP("P1LHBs",27,"%TOP")
0
^SHP("P1LHBs",28)

^SHP("P1LHBs",28,"%TOP")
0
^SHP("P1LHBs",29)

^SHP("P1LHBs",29,"%TOP")
0
^SHP("P1LHBs",30)

^SHP("P1LHBs",30,"%TOP")
0
^SHP("P1LHBs",31)

^SHP("P1LHBs",31,"%TOP")
0
^SHP("P1LHBs",32)

^SHP("P1LHBs",32,"%TOP")
0
^SHP("P1LHBs",33)

^SHP("P1LHBs",33,"%TOP")
0
^SHP("P1LHBs",34)

^SHP("P1LHBs",34,"%TOP")
0
^SHP("P1LHBs",35)

^SHP("P1LHBs",35,"%TOP")
0
^SHP("P1LHBs",36)

^SHP("P1LHBs",36,"%TOP")
0
^SHP("P1LHBs",37)

^SHP("P1LHBs",37,"%TOP")
0
^SHP("P1LHBs",38)

^SHP("P1LHBs",38,"%TOP")
0
^SHP("P1LHBs",39)

^SHP("P1LHBs",39,"%TOP")
0
^SHP("P1LHBs",40)

^SHP("P1LHBs",40,"%TOP")
0
^SHP("P1LHBs",41)

^SHP("P1LHBs",41,"%TOP")
0
^SHP("P1LHBs",42)

^SHP("P1LHBs",42,"%TOP")
0
^SHP("P1LHBs",43)

^SHP("P1LHBs",43,"%TOP")
0
^SHP("P1LHBs",44)

^SHP("P1LHBs",44,"%TOP")
0
^SHP("P1LHBs",45)

^SHP("P1LHBs",45,"%TOP")
0
^SHP("P1LHBs",46)

^SHP("P1LHBs",46,"%TOP")
0
^SHP("P1LHBs",47)

^SHP("P1LHBs",47,"%TOP")
0
^SHP("P1LHBs",48)

^SHP("P1LHBs",48,"%TOP")
0
^SHP("P1LHBs",49)

^SHP("P1LHBs",49,"%TOP")
0
^SHP("P1LHBs",50)

^SHP("P1LHBs",50,"%TOP")
0
^SHP("P1LHBs",51)

^SHP("P1LHBs",51,"%TOP")
0
^SHP("P1LHBs",52)

^SHP("P1LHBs",52,"%TOP")
0
^SHP("P1LHBs",53)
                                                                           $ 
^SHP("P1LHBs",53,"%TOP")
75
^SHP("P1LHBs",54)
  ---------------------------------------------------------------------------
^SHP("P1LHBs",54,"%TOP")
2
^SHP("P1LHBs",55)
                                                                               
^SHP("P1LHBs",55,"%TOP")
79
^SHP("P1LHBs",56)
         &30      >:k"dq            &25      >:zepnfd zenk                     
^SHP("P1LHBs",56,"%TOP")
9
^SHP("P1LHBs","RG")
H
^SHP("P1LKDMs")
mixeht zegewl zniyx
^SHP("P1LKDMs",1)
                           # gelyn incn mixeht zegewl zniyx #                  
^SHP("P1LKDMs",2)
                         ------------------------------------------
^SHP("P1LKDMs",3)
                         :             gewl my       :  gewl 'qn  :            
^SHP("P1LKDMs",4)
                         ------------------------------------------
^SHP("P1LKDMs",5)
                         $TTTTTTTTTTTTTTTTTTTTTTTTTTT:  9999999999:1
^SHP("P1LKDMs",6)

^SHP("P1LKDMs",7)

^SHP("P1LKDMs",8)

^SHP("P1LKDMs",9)

^SHP("P1LKDMs",10)

^SHP("P1LKDMs",11)

^SHP("P1LKDMs",12)

^SHP("P1LKDMs",13)

^SHP("P1LKDMs",14)

^SHP("P1LKDMs",15)

^SHP("P1LKDMs",16)

^SHP("P1LKDMs",17)

^SHP("P1LKDMs",18)

^SHP("P1LKDMs",19)

^SHP("P1LKDMs",20)

^SHP("P1LKDMs",21)

^SHP("P1LKDMs",22)

^SHP("P1LKDMs",23)

^SHP("P1LKDMs",24)

^SHP("P1LKDMs",25)

^SHP("P1LKDMs",26)

^SHP("P1LKDMs",27)

^SHP("P1LKDMs",28)

^SHP("P1LKDMs",29)

^SHP("P1LKDMs",30)

^SHP("P1LKDMs",31)

^SHP("P1LKDMs",32)

^SHP("P1LKDMs",33)

^SHP("P1LKDMs",34)

^SHP("P1LKDMs",35)

^SHP("P1LKDMs",36)

^SHP("P1LKDMs",37)

^SHP("P1LKDMs",38)

^SHP("P1LKDMs",39)

^SHP("P1LKDMs",40)

^SHP("P1LKDMs",41)

^SHP("P1LKDMs",42)

^SHP("P1LKDMs",43)

^SHP("P1LKDMs",44)

^SHP("P1LKDMs",45)

^SHP("P1LKDMs",46)

^SHP("P1LKDMs",47)

^SHP("P1LKDMs",48)

^SHP("P1LKDMs",49)

^SHP("P1LKDMs",50)

^SHP("P1LKDMs",51)
                                                                 $ 
^SHP("P1LKDMs",52)
                         ------------------------------------------
^SHP("P1LKDMs",53)
                                                                               
^SHP("P1LKDMs",54)
                                                                               
^SHP("P1LKDMs",55)
                                                                               
^SHP("P1LKDMs",56)
                                                                               
^SHP("P1LKDMs","RG")
H
^SHP("P1LKHMDB")

^SHP("P1LKHMDB",1)
                         # 'zewacn - zegewl' zlah #                            
^SHP("P1LKHMDB",2)
                                                                               
^SHP("P1LKHMDB",3)
                  -------------------------------------------------------
^SHP("P1LKHMDB",4)
                  : zewacn zqtcd :           gewl my       :  gewl 'qn  :      
^SHP("P1LKHMDB",5)
                  -------------------------------------------------------
^SHP("P1LKHMDB",6)
                  $             9:TTTTTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTTT:1
^SHP("P1LKHMDB",7)

^SHP("P1LKHMDB",8)

^SHP("P1LKHMDB",9)

^SHP("P1LKHMDB",10)

^SHP("P1LKHMDB",11)

^SHP("P1LKHMDB",12)

^SHP("P1LKHMDB",13)

^SHP("P1LKHMDB",14)

^SHP("P1LKHMDB",15)

^SHP("P1LKHMDB",16)

^SHP("P1LKHMDB",17)

^SHP("P1LKHMDB",18)

^SHP("P1LKHMDB",19)

^SHP("P1LKHMDB",20)

^SHP("P1LKHMDB",21)

^SHP("P1LKHMDB",22)

^SHP("P1LKHMDB",23)

^SHP("P1LKHMDB",24)

^SHP("P1LKHMDB",25)

^SHP("P1LKHMDB",26)

^SHP("P1LKHMDB",27)

^SHP("P1LKHMDB",28)

^SHP("P1LKHMDB",29)

^SHP("P1LKHMDB",30)

^SHP("P1LKHMDB",31)

^SHP("P1LKHMDB",32)

^SHP("P1LKHMDB",33)

^SHP("P1LKHMDB",34)

^SHP("P1LKHMDB",35)

^SHP("P1LKHMDB",36)

^SHP("P1LKHMDB",37)

^SHP("P1LKHMDB",38)

^SHP("P1LKHMDB",39)

^SHP("P1LKHMDB",40)

^SHP("P1LKHMDB",41)

^SHP("P1LKHMDB",42)

^SHP("P1LKHMDB",43)

^SHP("P1LKHMDB",44)

^SHP("P1LKHMDB",45)

^SHP("P1LKHMDB",46)

^SHP("P1LKHMDB",47)

^SHP("P1LKHMDB",48)

^SHP("P1LKHMDB",49)

^SHP("P1LKHMDB",50)

^SHP("P1LKHMDB",51)

^SHP("P1LKHMDB",52)

^SHP("P1LKHMDB",53)
                                                                       $ 
^SHP("P1LKHMDB",54)
                  -------------------------------------------------------
^SHP("P1LKHMDB",55)
                                                                               
^SHP("P1LKHMDB",56)
                                                                               
^SHP("P1LKHMDB","RG")
H
^SHP("P1LKHMDBs",1)
                         # 'zewacn - zegewl' zlah #                            
^SHP("P1LKHMDBs",1,"%TOP")
25
^SHP("P1LKHMDBs",2)
                                                                               
^SHP("P1LKHMDBs",2,"%TOP")
79
^SHP("P1LKHMDBs",3)
                  -------------------------------------------------------
^SHP("P1LKHMDBs",3,"%TOP")
18
^SHP("P1LKHMDBs",4)
                  : zewacn zqtcd :           gewl my       :  gewl 'qn  :      
^SHP("P1LKHMDBs",4,"%TOP")
18
^SHP("P1LKHMDBs",5)
                  -------------------------------------------------------
^SHP("P1LKHMDBs",5,"%TOP")
18
^SHP("P1LKHMDBs",6)
                  $             9:TTTTTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTTT:1
^SHP("P1LKHMDBs",6,"%TOP")
18
^SHP("P1LKHMDBs",7)

^SHP("P1LKHMDBs",7,"%TOP")
0
^SHP("P1LKHMDBs",8)

^SHP("P1LKHMDBs",8,"%TOP")
0
^SHP("P1LKHMDBs",9)

^SHP("P1LKHMDBs",9,"%TOP")
0
^SHP("P1LKHMDBs",10)

^SHP("P1LKHMDBs",10,"%TOP")
0
^SHP("P1LKHMDBs",11)

^SHP("P1LKHMDBs",11,"%TOP")
0
^SHP("P1LKHMDBs",12)

^SHP("P1LKHMDBs",12,"%TOP")
0
^SHP("P1LKHMDBs",13)

^SHP("P1LKHMDBs",13,"%TOP")
0
^SHP("P1LKHMDBs",14)

^SHP("P1LKHMDBs",14,"%TOP")
0
^SHP("P1LKHMDBs",15)

^SHP("P1LKHMDBs",15,"%TOP")
0
^SHP("P1LKHMDBs",16)

^SHP("P1LKHMDBs",16,"%TOP")
0
^SHP("P1LKHMDBs",17)

^SHP("P1LKHMDBs",17,"%TOP")
0
^SHP("P1LKHMDBs",18)

^SHP("P1LKHMDBs",18,"%TOP")
0
^SHP("P1LKHMDBs",19)

^SHP("P1LKHMDBs",19,"%TOP")
0
^SHP("P1LKHMDBs",20)

^SHP("P1LKHMDBs",20,"%TOP")
0
^SHP("P1LKHMDBs",21)

^SHP("P1LKHMDBs",21,"%TOP")
0
^SHP("P1LKHMDBs",22)

^SHP("P1LKHMDBs",22,"%TOP")
0
^SHP("P1LKHMDBs",23)

^SHP("P1LKHMDBs",23,"%TOP")
0
^SHP("P1LKHMDBs",24)

^SHP("P1LKHMDBs",24,"%TOP")
0
^SHP("P1LKHMDBs",25)

^SHP("P1LKHMDBs",25,"%TOP")
0
^SHP("P1LKHMDBs",26)

^SHP("P1LKHMDBs",26,"%TOP")
0
^SHP("P1LKHMDBs",27)

^SHP("P1LKHMDBs",27,"%TOP")
0
^SHP("P1LKHMDBs",28)

^SHP("P1LKHMDBs",28,"%TOP")
0
^SHP("P1LKHMDBs",29)

^SHP("P1LKHMDBs",29,"%TOP")
0
^SHP("P1LKHMDBs",30)

^SHP("P1LKHMDBs",30,"%TOP")
0
^SHP("P1LKHMDBs",31)

^SHP("P1LKHMDBs",31,"%TOP")
0
^SHP("P1LKHMDBs",32)

^SHP("P1LKHMDBs",32,"%TOP")
0
^SHP("P1LKHMDBs",33)

^SHP("P1LKHMDBs",33,"%TOP")
0
^SHP("P1LKHMDBs",34)

^SHP("P1LKHMDBs",34,"%TOP")
0
^SHP("P1LKHMDBs",35)

^SHP("P1LKHMDBs",35,"%TOP")
0
^SHP("P1LKHMDBs",36)

^SHP("P1LKHMDBs",36,"%TOP")
0
^SHP("P1LKHMDBs",37)

^SHP("P1LKHMDBs",37,"%TOP")
0
^SHP("P1LKHMDBs",38)

^SHP("P1LKHMDBs",38,"%TOP")
0
^SHP("P1LKHMDBs",39)

^SHP("P1LKHMDBs",39,"%TOP")
0
^SHP("P1LKHMDBs",40)

^SHP("P1LKHMDBs",40,"%TOP")
0
^SHP("P1LKHMDBs",41)

^SHP("P1LKHMDBs",41,"%TOP")
0
^SHP("P1LKHMDBs",42)

^SHP("P1LKHMDBs",42,"%TOP")
0
^SHP("P1LKHMDBs",43)

^SHP("P1LKHMDBs",43,"%TOP")
0
^SHP("P1LKHMDBs",44)

^SHP("P1LKHMDBs",44,"%TOP")
0
^SHP("P1LKHMDBs",45)

^SHP("P1LKHMDBs",45,"%TOP")
0
^SHP("P1LKHMDBs",46)

^SHP("P1LKHMDBs",46,"%TOP")
0
^SHP("P1LKHMDBs",47)

^SHP("P1LKHMDBs",47,"%TOP")
0
^SHP("P1LKHMDBs",48)

^SHP("P1LKHMDBs",48,"%TOP")
0
^SHP("P1LKHMDBs",49)

^SHP("P1LKHMDBs",49,"%TOP")
0
^SHP("P1LKHMDBs",50)

^SHP("P1LKHMDBs",50,"%TOP")
0
^SHP("P1LKHMDBs",51)

^SHP("P1LKHMDBs",51,"%TOP")
0
^SHP("P1LKHMDBs",52)

^SHP("P1LKHMDBs",52,"%TOP")
0
^SHP("P1LKHMDBs",53)
                                                                       $ 
^SHP("P1LKHMDBs",53,"%TOP")
71
^SHP("P1LKHMDBs",54)
                  -------------------------------------------------------
^SHP("P1LKHMDBs",54,"%TOP")
18
^SHP("P1LKHMDBs",55)
                                                                               
^SHP("P1LKHMDBs",55,"%TOP")
79
^SHP("P1LKHMDBs",56)
                                                                               
^SHP("P1LKHMDBs",56,"%TOP")
79
^SHP("P1LKHMDBs",57)
                                                                               
^SHP("P1LKHMDBs",57,"%TOP")
79
^SHP("P1LKHMDBs",58)
                                                                               
^SHP("P1LKHMDBs",58,"%TOP")
79
^SHP("P1LKHMDBs",59)
                                                                               
^SHP("P1LKHMDBs",59,"%TOP")
79
^SHP("P1LKHMDBs",60)
                                                                               
^SHP("P1LKHMDBs",60,"%TOP")
79
^SHP("P1LKHMDBs",61)
                                                                               
^SHP("P1LKHMDBs",61,"%TOP")
79
^SHP("P1LKHMDBs",62)
                                                                               
^SHP("P1LKHMDBs",62,"%TOP")
79
^SHP("P1LKHMDBs",63)
                                                                               
^SHP("P1LKHMDBs",63,"%TOP")
79
^SHP("P1LKHMDBs",64)
                                                                               
^SHP("P1LKHMDBs",64,"%TOP")
79
^SHP("P1LKHMDBs",65)
                                                                               
^SHP("P1LKHMDBs",65,"%TOP")
79
^SHP("P1LKHMDBs",66)
                                                                               
^SHP("P1LKHMDBs",66,"%TOP")
79
^SHP("P1LKHMDBs",67)
                                                                               
^SHP("P1LKHMDBs",67,"%TOP")
79
^SHP("P1LKHMDBs",68)
                                                                               
^SHP("P1LKHMDBs",68,"%TOP")
79
^SHP("P1LKHMDBs",69)
                                                                               
^SHP("P1LKHMDBs",69,"%TOP")
79
^SHP("P1LKHMDBs",70)
                                                                               
^SHP("P1LKHMDBs",70,"%TOP")
79
^SHP("P1LKHMDBs","RG")
H
^SHP("P1LKHMs")

^SHP("P1LKHMs",1)
                     # zegewl ixtqn iiepiy dixehqid #                          
^SHP("P1LKHMs",2)
                                                                               
^SHP("P1LKHMs",3)
        -------------------------------------------------------------
^SHP("P1LKHMs",4)
        :  jix`z  :  ycg xtqn :             gewl  my   :  oyi xtqn  :          
^SHP("P1LKHMs",5)
        -------------------------------------------------------------
^SHP("P1LKHMs",6)
        $ 99999999:TTTTTTTTTTT:TTTTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTTT:1
^SHP("P1LKHMs",7)

^SHP("P1LKHMs",8)

^SHP("P1LKHMs",9)

^SHP("P1LKHMs",10)

^SHP("P1LKHMs",11)

^SHP("P1LKHMs",12)

^SHP("P1LKHMs",13)

^SHP("P1LKHMs",14)

^SHP("P1LKHMs",15)

^SHP("P1LKHMs",16)

^SHP("P1LKHMs",17)

^SHP("P1LKHMs",18)

^SHP("P1LKHMs",19)

^SHP("P1LKHMs",20)

^SHP("P1LKHMs",21)

^SHP("P1LKHMs",22)

^SHP("P1LKHMs",23)

^SHP("P1LKHMs",24)

^SHP("P1LKHMs",25)

^SHP("P1LKHMs",26)

^SHP("P1LKHMs",27)

^SHP("P1LKHMs",28)

^SHP("P1LKHMs",29)

^SHP("P1LKHMs",30)

^SHP("P1LKHMs",31)

^SHP("P1LKHMs",32)

^SHP("P1LKHMs",33)

^SHP("P1LKHMs",34)

^SHP("P1LKHMs",35)

^SHP("P1LKHMs",36)

^SHP("P1LKHMs",37)

^SHP("P1LKHMs",38)

^SHP("P1LKHMs",39)

^SHP("P1LKHMs",40)

^SHP("P1LKHMs",41)

^SHP("P1LKHMs",42)

^SHP("P1LKHMs",43)

^SHP("P1LKHMs",44)

^SHP("P1LKHMs",45)

^SHP("P1LKHMs",46)

^SHP("P1LKHMs",47)

^SHP("P1LKHMs",48)

^SHP("P1LKHMs",49)

^SHP("P1LKHMs",50)

^SHP("P1LKHMs",51)

^SHP("P1LKHMs",52)

^SHP("P1LKHMs",53)

^SHP("P1LKHMs",54)

^SHP("P1LKHMs",55)
                                                                   $ 
^SHP("P1LKHMs",56)
        -------------------------------------------------------------
^SHP("P1LKHMs",57)
                                                                               
^SHP("P1LKHMs","RG")
H
^SHP("P1LKHZs")
DOCH LAKOHOT
^SHP("P1LKHZs",1)
                                                                               
^SHP("P1LKHZs",2)
                     &05      > jix`zl dtwda zegewl g"ec                       
^SHP("P1LKHZs",3)
                                                                               
^SHP("P1LKHZs",4)
     -------------------------------------------------------------------
^SHP("P1LKHZs",5)
     : miyelz zenk : yelz jxr :   dpw  :       gewl my      : gewl 'qn :       
^SHP("P1LKHZs",6)
     -------------------------------------------------------------------
^SHP("P1LKHZs",7)
     $TTTTTTTTTTTTT: 999999.99:99999.99:TTTTTTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("P1LKHZs",8)

^SHP("P1LKHZs",9)

^SHP("P1LKHZs",10)

^SHP("P1LKHZs",11)

^SHP("P1LKHZs",12)

^SHP("P1LKHZs",13)

^SHP("P1LKHZs",14)

^SHP("P1LKHZs",15)

^SHP("P1LKHZs",16)

^SHP("P1LKHZs",17)

^SHP("P1LKHZs",18)

^SHP("P1LKHZs",19)

^SHP("P1LKHZs",20)

^SHP("P1LKHZs",21)

^SHP("P1LKHZs",22)

^SHP("P1LKHZs",23)

^SHP("P1LKHZs",24)

^SHP("P1LKHZs",25)

^SHP("P1LKHZs",26)

^SHP("P1LKHZs",27)

^SHP("P1LKHZs",28)

^SHP("P1LKHZs",29)

^SHP("P1LKHZs",30)

^SHP("P1LKHZs",31)

^SHP("P1LKHZs",32)

^SHP("P1LKHZs",33)

^SHP("P1LKHZs",34)

^SHP("P1LKHZs",35)

^SHP("P1LKHZs",36)

^SHP("P1LKHZs",37)

^SHP("P1LKHZs",38)

^SHP("P1LKHZs",39)

^SHP("P1LKHZs",40)

^SHP("P1LKHZs",41)

^SHP("P1LKHZs",42)

^SHP("P1LKHZs",43)

^SHP("P1LKHZs",44)

^SHP("P1LKHZs",45)

^SHP("P1LKHZs",46)

^SHP("P1LKHZs",47)

^SHP("P1LKHZs",48)

^SHP("P1LKHZs",49)

^SHP("P1LKHZs",50)

^SHP("P1LKHZs",51)

^SHP("P1LKHZs",52)

^SHP("P1LKHZs",53)

^SHP("P1LKHZs",54)
                                                                      $ 
^SHP("P1LKHZs",55)
     -------------------------------------------------------------------
^SHP("P1LKHZs",56)
                                                                               
^SHP("P1LKHZs","RG")
H
^SHP("P1LKWKs")
reay zegewl
^SHP("P1LKWKs",1)
   # reay ini itl zepnfd milawny zegewl #                                      
^SHP("P1LKWKs",2)
                                                                               
^SHP("P1LKWKs",3)
                           ---------------------------------------
^SHP("P1LKWKs",4)
                           :         gewl my        :  gewl 'qn  :             
^SHP("P1LKWKs",5)
                           ---------------------------------------
^SHP("P1LKWKs",6)
                           $TTTTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTTT:1
^SHP("P1LKWKs",7)

^SHP("P1LKWKs",8)

^SHP("P1LKWKs",9)

^SHP("P1LKWKs",10)

^SHP("P1LKWKs",11)

^SHP("P1LKWKs",12)

^SHP("P1LKWKs",13)

^SHP("P1LKWKs",14)

^SHP("P1LKWKs",15)

^SHP("P1LKWKs",16)

^SHP("P1LKWKs",17)

^SHP("P1LKWKs",18)

^SHP("P1LKWKs",19)

^SHP("P1LKWKs",20)

^SHP("P1LKWKs",21)

^SHP("P1LKWKs",22)

^SHP("P1LKWKs",23)

^SHP("P1LKWKs",24)

^SHP("P1LKWKs",25)

^SHP("P1LKWKs",26)

^SHP("P1LKWKs",27)

^SHP("P1LKWKs",28)

^SHP("P1LKWKs",29)

^SHP("P1LKWKs",30)

^SHP("P1LKWKs",31)

^SHP("P1LKWKs",32)

^SHP("P1LKWKs",33)

^SHP("P1LKWKs",34)

^SHP("P1LKWKs",35)

^SHP("P1LKWKs",36)

^SHP("P1LKWKs",37)

^SHP("P1LKWKs",38)

^SHP("P1LKWKs",39)

^SHP("P1LKWKs",40)

^SHP("P1LKWKs",41)

^SHP("P1LKWKs",42)

^SHP("P1LKWKs",43)

^SHP("P1LKWKs",44)

^SHP("P1LKWKs",45)

^SHP("P1LKWKs",46)

^SHP("P1LKWKs",47)

^SHP("P1LKWKs",48)

^SHP("P1LKWKs",49)
                                                                               
^SHP("P1LKWKs",50)
                                                                               
^SHP("P1LKWKs",51)

^SHP("P1LKWKs",52)
                                                                               
^SHP("P1LKWKs",53)

^SHP("P1LKWKs",54)
                                                                $ 
^SHP("P1LKWKs",55)
                           ---------------------------------------
^SHP("P1LKWKs",56)
                                                                               
^SHP("P1LKWKs","RG")
H
^SHP("P1MAMs")

^SHP("P1MAMs",1)
                         # n"rn ly dixehqd zlah #                              
^SHP("P1MAMs",2)
                                                                               
^SHP("P1MAMs",3)
                               --------------------------
^SHP("P1MAMs",4)
                               :  n"rn daeb  : jix`z cr :                      
^SHP("P1MAMs",5)
                               --------------------------
^SHP("P1MAMs",6)
                               $        99.99:  99999999:1
^SHP("P1MAMs",7)

^SHP("P1MAMs",8)

^SHP("P1MAMs",9)

^SHP("P1MAMs",10)

^SHP("P1MAMs",11)

^SHP("P1MAMs",12)

^SHP("P1MAMs",13)

^SHP("P1MAMs",14)

^SHP("P1MAMs",15)

^SHP("P1MAMs",16)

^SHP("P1MAMs",17)

^SHP("P1MAMs",18)

^SHP("P1MAMs",19)

^SHP("P1MAMs",20)

^SHP("P1MAMs",21)

^SHP("P1MAMs",22)

^SHP("P1MAMs",23)

^SHP("P1MAMs",24)

^SHP("P1MAMs",25)

^SHP("P1MAMs",26)

^SHP("P1MAMs",27)

^SHP("P1MAMs",28)

^SHP("P1MAMs",29)

^SHP("P1MAMs",30)

^SHP("P1MAMs",31)

^SHP("P1MAMs",32)

^SHP("P1MAMs",33)

^SHP("P1MAMs",34)

^SHP("P1MAMs",35)

^SHP("P1MAMs",36)

^SHP("P1MAMs",37)

^SHP("P1MAMs",38)

^SHP("P1MAMs",39)

^SHP("P1MAMs",40)

^SHP("P1MAMs",41)

^SHP("P1MAMs",42)

^SHP("P1MAMs",43)

^SHP("P1MAMs",44)

^SHP("P1MAMs",45)
                                                       $ 
^SHP("P1MAMs",46)
                               --------------------------
^SHP("P1MAMs",47)
                                                                               
^SHP("P1MAMs","RG")
H
^SHP("P1MKBs")
zepnfd ilawn g"ec
^SHP("P1MKBs",1)
                       #  zepnfd ilawn g"ec  #                                 
^SHP("P1MKBs",1,"%TOP")
23
^SHP("P1MKBs",2)
                        &10      > jix`z cr    &05      > jix`zn               
^SHP("P1MKBs",2,"%TOP")
24
^SHP("P1MKBs",3)
                              &15  > dry cr        &12  >   dryn               
^SHP("P1MKBs",3,"%TOP")
30
^SHP("P1MKBs",4)
   ---------------------------------------------------------------------------
^SHP("P1MKBs",4,"%TOP")
3
^SHP("P1MKBs",5)
   : iekif :  tih :zepnfd: zegpd :milehia: zexy :  oeict  :   lawn my  : 'qn : 
^SHP("P1MKBs",5,"%TOP")
3
^SHP("P1MKBs",6)
   ---------------------------------------------------------------------------
^SHP("P1MKBs",6,"%TOP")
3
^SHP("P1MKBs",7)
   $99999.9:9999.9: 99999:99999.9: 9999.9:9999.9:9999999.9:TTTTTTTTTTTT:99999:1
^SHP("P1MKBs",7,"%TOP")
3
^SHP("P1MKBs",8)

^SHP("P1MKBs",8,"%TOP")
0
^SHP("P1MKBs",9)

^SHP("P1MKBs",9,"%TOP")
0
^SHP("P1MKBs",10)

^SHP("P1MKBs",10,"%TOP")
0
^SHP("P1MKBs",11)

^SHP("P1MKBs",11,"%TOP")
0
^SHP("P1MKBs",12)

^SHP("P1MKBs",12,"%TOP")
0
^SHP("P1MKBs",13)

^SHP("P1MKBs",13,"%TOP")
0
^SHP("P1MKBs",14)

^SHP("P1MKBs",14,"%TOP")
0
^SHP("P1MKBs",15)

^SHP("P1MKBs",15,"%TOP")
0
^SHP("P1MKBs",16)

^SHP("P1MKBs",16,"%TOP")
0
^SHP("P1MKBs",17)

^SHP("P1MKBs",17,"%TOP")
0
^SHP("P1MKBs",18)

^SHP("P1MKBs",18,"%TOP")
0
^SHP("P1MKBs",19)

^SHP("P1MKBs",19,"%TOP")
0
^SHP("P1MKBs",20)

^SHP("P1MKBs",20,"%TOP")
0
^SHP("P1MKBs",21)

^SHP("P1MKBs",21,"%TOP")
0
^SHP("P1MKBs",22)

^SHP("P1MKBs",22,"%TOP")
0
^SHP("P1MKBs",23)

^SHP("P1MKBs",23,"%TOP")
0
^SHP("P1MKBs",24)

^SHP("P1MKBs",24,"%TOP")
0
^SHP("P1MKBs",25)

^SHP("P1MKBs",25,"%TOP")
0
^SHP("P1MKBs",26)

^SHP("P1MKBs",26,"%TOP")
0
^SHP("P1MKBs",27)

^SHP("P1MKBs",27,"%TOP")
0
^SHP("P1MKBs",28)

^SHP("P1MKBs",28,"%TOP")
0
^SHP("P1MKBs",29)

^SHP("P1MKBs",29,"%TOP")
0
^SHP("P1MKBs",30)

^SHP("P1MKBs",30,"%TOP")
0
^SHP("P1MKBs",31)

^SHP("P1MKBs",31,"%TOP")
0
^SHP("P1MKBs",32)

^SHP("P1MKBs",32,"%TOP")
0
^SHP("P1MKBs",33)

^SHP("P1MKBs",33,"%TOP")
0
^SHP("P1MKBs",34)

^SHP("P1MKBs",34,"%TOP")
0
^SHP("P1MKBs",35)

^SHP("P1MKBs",35,"%TOP")
0
^SHP("P1MKBs",36)

^SHP("P1MKBs",36,"%TOP")
0
^SHP("P1MKBs",37)

^SHP("P1MKBs",37,"%TOP")
0
^SHP("P1MKBs",38)

^SHP("P1MKBs",38,"%TOP")
0
^SHP("P1MKBs",39)

^SHP("P1MKBs",39,"%TOP")
0
^SHP("P1MKBs",40)

^SHP("P1MKBs",40,"%TOP")
0
^SHP("P1MKBs",41)

^SHP("P1MKBs",41,"%TOP")
0
^SHP("P1MKBs",42)

^SHP("P1MKBs",42,"%TOP")
0
^SHP("P1MKBs",43)

^SHP("P1MKBs",43,"%TOP")
0
^SHP("P1MKBs",44)

^SHP("P1MKBs",44,"%TOP")
0
^SHP("P1MKBs",45)

^SHP("P1MKBs",45,"%TOP")
0
^SHP("P1MKBs",46)

^SHP("P1MKBs",46,"%TOP")
0
^SHP("P1MKBs",47)

^SHP("P1MKBs",47,"%TOP")
0
^SHP("P1MKBs",48)

^SHP("P1MKBs",48,"%TOP")
0
^SHP("P1MKBs",49)

^SHP("P1MKBs",49,"%TOP")
0
^SHP("P1MKBs",50)

^SHP("P1MKBs",50,"%TOP")
0
^SHP("P1MKBs",51)

^SHP("P1MKBs",51,"%TOP")
0
^SHP("P1MKBs",52)

^SHP("P1MKBs",52,"%TOP")
0
^SHP("P1MKBs",53)
                                                                            $ 
^SHP("P1MKBs",53,"%TOP")
76
^SHP("P1MKBs",54)
   ---------------------------------------------------------------------------
^SHP("P1MKBs",54,"%TOP")
3
^SHP("P1MKBs",55)
                                                                               
^SHP("P1MKBs",55,"%TOP")
79
^SHP("P1MKBs",56)
  &50    >&47    >&42    >&35    >&30    >&25    >&20       >                  
^SHP("P1MKBs",56,"%TOP")
2
^SHP("P1MKBs","RG")
H
^SHP("P1ML1s")

^SHP("P1ML1s",1)
                            # oecrenn zegewl g"ec #                            
^SHP("P1ML1s",2)
                                                                               
^SHP("P1ML1s",3)
                  &10       > : gewl cr    &05       > : gewln                 
^SHP("P1ML1s",4)
                   &20      > :jix`z cr     &15      > :jix`zn                 
^SHP("P1ML1s",5)
    ------------------------------------------------------------------------
^SHP("P1ML1s",6)
    : rvenn:ixg` k"dq: zegpd :zepnfd:   oetlh  :     gewl my    : gewl 'qn :   
^SHP("P1ML1s",7)
    :dpnfdl:    zegpd:       :      :          :                :          :   
^SHP("P1ML1s",8)
    ------------------------------------------------------------------------
^SHP("P1ML1s",9)
    $999.99:999999.99:9999.99:999999:9999999999:TTTTTTTTTTTTTTTT:9999999999:1
^SHP("P1ML1s",10)

^SHP("P1ML1s",11)

^SHP("P1ML1s",12)

^SHP("P1ML1s",13)

^SHP("P1ML1s",14)

^SHP("P1ML1s",15)

^SHP("P1ML1s",16)

^SHP("P1ML1s",17)

^SHP("P1ML1s",18)

^SHP("P1ML1s",19)

^SHP("P1ML1s",20)

^SHP("P1ML1s",21)

^SHP("P1ML1s",22)

^SHP("P1ML1s",23)

^SHP("P1ML1s",24)

^SHP("P1ML1s",25)

^SHP("P1ML1s",26)

^SHP("P1ML1s",27)

^SHP("P1ML1s",28)

^SHP("P1ML1s",29)

^SHP("P1ML1s",30)

^SHP("P1ML1s",31)

^SHP("P1ML1s",32)

^SHP("P1ML1s",33)

^SHP("P1ML1s",34)

^SHP("P1ML1s",35)

^SHP("P1ML1s",36)

^SHP("P1ML1s",37)

^SHP("P1ML1s",38)

^SHP("P1ML1s",39)

^SHP("P1ML1s",40)

^SHP("P1ML1s",41)

^SHP("P1ML1s",42)

^SHP("P1ML1s",43)

^SHP("P1ML1s",44)

^SHP("P1ML1s",45)

^SHP("P1ML1s",46)

^SHP("P1ML1s",47)

^SHP("P1ML1s",48)

^SHP("P1ML1s",49)

^SHP("P1ML1s",50)

^SHP("P1ML1s",51)

^SHP("P1ML1s",52)

^SHP("P1ML1s",53)
                                                                          $ 
^SHP("P1ML1s",54)
    ------------------------------------------------------------------------
^SHP("P1ML1s",55)
    :&50   :&40      :&35    :&25 > : k"dq                                 :   
^SHP("P1ML1s",56)
    ------------------------------------------------------------------------   
^SHP("P1ML1s","RG")
H
^SHP("P1ML2s")
zcled mei g"ec
^SHP("P1ML2s",1)
                                 # zcled mei g"ec #                            
^SHP("P1ML2s",2)
                                                                               
^SHP("P1ML2s",3)
    &03: 3 - mieyip mei ,2 - bef za/oa ly ,1 - oecren xag ly zcled mei         
^SHP("P1ML2s",4)
       &22 : dpy  &20 yceg &15 mei cr      &12 > dpy &10 yceg &05 mein         
^SHP("P1ML2s",5)
                                                                               
^SHP("P1ML2s",6)
  ----------------------------------------------------------------------------
^SHP("P1ML2s",7)
  :  jix`z : revwn :  oetlh   :          zaezk        :    gewl my   :'wl 'qn: 
^SHP("P1ML2s",8)
  ----------------------------------------------------------------------------
^SHP("P1ML2s",9)
  $99999999:TTTTTTT:TTTTTTTTTT:TTTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTTTTT:TTTTTTT:1
^SHP("P1ML2s",10)

^SHP("P1ML2s",11)

^SHP("P1ML2s",12)

^SHP("P1ML2s",13)

^SHP("P1ML2s",14)

^SHP("P1ML2s",15)

^SHP("P1ML2s",16)

^SHP("P1ML2s",17)

^SHP("P1ML2s",18)

^SHP("P1ML2s",19)

^SHP("P1ML2s",20)

^SHP("P1ML2s",21)

^SHP("P1ML2s",22)

^SHP("P1ML2s",23)

^SHP("P1ML2s",24)

^SHP("P1ML2s",25)

^SHP("P1ML2s",26)

^SHP("P1ML2s",27)

^SHP("P1ML2s",28)

^SHP("P1ML2s",29)

^SHP("P1ML2s",30)

^SHP("P1ML2s",31)

^SHP("P1ML2s",32)

^SHP("P1ML2s",33)

^SHP("P1ML2s",34)

^SHP("P1ML2s",35)

^SHP("P1ML2s",36)

^SHP("P1ML2s",37)

^SHP("P1ML2s",38)

^SHP("P1ML2s",39)

^SHP("P1ML2s",40)

^SHP("P1ML2s",41)

^SHP("P1ML2s",42)

^SHP("P1ML2s",43)

^SHP("P1ML2s",44)

^SHP("P1ML2s",45)

^SHP("P1ML2s",46)

^SHP("P1ML2s",47)

^SHP("P1ML2s",48)

^SHP("P1ML2s",49)

^SHP("P1ML2s",50)

^SHP("P1ML2s",51)

^SHP("P1ML2s",52)

^SHP("P1ML2s",53)

^SHP("P1ML2s",54)

^SHP("P1ML2s",55)

^SHP("P1ML2s",56)
                                                                            $ 
^SHP("P1ML2s",57)
  ---------------------------------------------------------------------------  
^SHP("P1ML2s","RG")
H
^SHP("P1MLZ1s")
mixvln Z 
^SHP("P1MLZ1s",1)
                               #-&07>   -#                                     
^SHP("P1MLZ1s",2)
                                                                               
^SHP("P1MLZ1s",3)
             &03       > &05      > : jix`zl mixvln g"ec                       
^SHP("P1MLZ1s",4)
                                                                               
^SHP("P1MLZ1s",5)
   ---------------------------------------------------------------------------
^SHP("P1MLZ1s",6)
   :'nfd:creq: oeict  : mitih : miekif: zegpd :milehia: zexy : xvln my : 'qn : 
^SHP("P1MLZ1s",7)
   ---------------------------------------------------------------------------
^SHP("P1MLZ1s",8)
   $9999:9999:999999.9:99999.9:99999.9:99999.9:99999.9:9999.9:TTTTTTTTT:99999:1
^SHP("P1MLZ1s",9)

^SHP("P1MLZ1s",10)

^SHP("P1MLZ1s",11)

^SHP("P1MLZ1s",12)

^SHP("P1MLZ1s",13)

^SHP("P1MLZ1s",14)

^SHP("P1MLZ1s",15)

^SHP("P1MLZ1s",16)

^SHP("P1MLZ1s",17)

^SHP("P1MLZ1s",18)

^SHP("P1MLZ1s",19)

^SHP("P1MLZ1s",20)

^SHP("P1MLZ1s",21)

^SHP("P1MLZ1s",22)

^SHP("P1MLZ1s",23)

^SHP("P1MLZ1s",24)

^SHP("P1MLZ1s",25)

^SHP("P1MLZ1s",26)

^SHP("P1MLZ1s",27)

^SHP("P1MLZ1s",28)

^SHP("P1MLZ1s",29)

^SHP("P1MLZ1s",30)

^SHP("P1MLZ1s",31)

^SHP("P1MLZ1s",32)

^SHP("P1MLZ1s",33)

^SHP("P1MLZ1s",34)

^SHP("P1MLZ1s",35)

^SHP("P1MLZ1s",36)

^SHP("P1MLZ1s",37)

^SHP("P1MLZ1s",38)

^SHP("P1MLZ1s",39)

^SHP("P1MLZ1s",40)

^SHP("P1MLZ1s",41)

^SHP("P1MLZ1s",42)

^SHP("P1MLZ1s",43)

^SHP("P1MLZ1s",44)

^SHP("P1MLZ1s",45)

^SHP("P1MLZ1s",46)

^SHP("P1MLZ1s",47)

^SHP("P1MLZ1s",48)

^SHP("P1MLZ1s",49)

^SHP("P1MLZ1s",50)

^SHP("P1MLZ1s",51)

^SHP("P1MLZ1s",52)

^SHP("P1MLZ1s",53)
                                                                            $ 
^SHP("P1MLZ1s",54)
   ---------------------------------------------------------------------------
^SHP("P1MLZ1s",55)
                                                                               
^SHP("P1MLZ1s",56)
 &47 >&45  >&20     >&42     >&40   >&35    >&30     >&25    >                 
^SHP("P1MLZ1s","RG")
H
^SHP("P1MLZN")

^SHP("P1MLZN",1)
                             #  mixvln g"ec  #                                 
^SHP("P1MLZN",1,"%TOP")
29
^SHP("P1MLZN",2)
                        &10      > jix`z cr    &05      > jix`zn               
^SHP("P1MLZN",2,"%TOP")
24
^SHP("P1MLZN",3)
 -----------------------------------------------------------------------------------------
^SHP("P1MLZN",3,"%TOP")
1
^SHP("P1MLZN",4)
 : creql rvenn :'nfd:creq: oeict  : mitih : miekif: zegpd :milehia: zexy : xvln my : 'qn : 
^SHP("P1MLZN",4,"%TOP")
1
^SHP("P1MLZN",5)
 -----------------------------------------------------------------------------------------
^SHP("P1MLZN",5,"%TOP")
1
^SHP("P1MLZN",6)
$:   9999.99   :9999:9999:999999.9:99999.9:99999.9:99999.9:99999.9:9999.9:TTTTTTTTT:99999:$
^SHP("P1MLZN",6,"%TOP")
0
^SHP("P1MLZN",7)

^SHP("P1MLZN",7,"%TOP")
0
^SHP("P1MLZN",8)
                                                                                     $ 
^SHP("P1MLZN",8,"%TOP")
85
^SHP("P1MLZN",9)
 -----------------------------------------------------------------------------
^SHP("P1MLZN",9,"%TOP")
1
^SHP("P1MLZN",10)
                 &47 >&45  >&20     >&42     >&40   >&35    >&30     >&25    >                 
^SHP("P1MLZN",10,"%TOP")
17
^SHP("P1MLZN",11)

^SHP("P1MLZN",11,"%TOP")
0
^SHP("P1MLZN","RG")
H
^SHP("P1MLZs")

^SHP("P1MLZs",1)
                             #  mixvln g"ec  #                                 
^SHP("P1MLZs",1,"%TOP")
29
^SHP("P1MLZs",2)
                        &10      > jix`z cr    &05      > jix`zn               
^SHP("P1MLZs",2,"%TOP")
24
^SHP("P1MLZs",3)
   ---------------------------------------------------------------------------
^SHP("P1MLZs",3,"%TOP")
3
^SHP("P1MLZs",4)
   :'nfd:creq: oeict  : mitih : miekif: zegpd :milehia: zexy : xvln my : 'qn : 
^SHP("P1MLZs",4,"%TOP")
3
^SHP("P1MLZs",5)
   ---------------------------------------------------------------------------
^SHP("P1MLZs",5,"%TOP")
3
^SHP("P1MLZs",6)
   $9999:9999:999999.9:99999.9:99999.9:99999.9:99999.9:9999.9:TTTTTTTTT:99999:1
^SHP("P1MLZs",6,"%TOP")
3
^SHP("P1MLZs",7)

^SHP("P1MLZs",7,"%TOP")
0
^SHP("P1MLZs",8)

^SHP("P1MLZs",8,"%TOP")
0
^SHP("P1MLZs",9)

^SHP("P1MLZs",9,"%TOP")
0
^SHP("P1MLZs",10)

^SHP("P1MLZs",10,"%TOP")
0
^SHP("P1MLZs",11)

^SHP("P1MLZs",11,"%TOP")
0
^SHP("P1MLZs",12)

^SHP("P1MLZs",12,"%TOP")
0
^SHP("P1MLZs",13)

^SHP("P1MLZs",13,"%TOP")
0
^SHP("P1MLZs",14)

^SHP("P1MLZs",14,"%TOP")
0
^SHP("P1MLZs",15)

^SHP("P1MLZs",15,"%TOP")
0
^SHP("P1MLZs",16)

^SHP("P1MLZs",16,"%TOP")
0
^SHP("P1MLZs",17)

^SHP("P1MLZs",17,"%TOP")
0
^SHP("P1MLZs",18)

^SHP("P1MLZs",18,"%TOP")
0
^SHP("P1MLZs",19)

^SHP("P1MLZs",19,"%TOP")
0
^SHP("P1MLZs",20)

^SHP("P1MLZs",20,"%TOP")
0
^SHP("P1MLZs",21)

^SHP("P1MLZs",21,"%TOP")
0
^SHP("P1MLZs",22)

^SHP("P1MLZs",22,"%TOP")
0
^SHP("P1MLZs",23)

^SHP("P1MLZs",23,"%TOP")
0
^SHP("P1MLZs",24)

^SHP("P1MLZs",24,"%TOP")
0
^SHP("P1MLZs",25)

^SHP("P1MLZs",25,"%TOP")
0
^SHP("P1MLZs",26)

^SHP("P1MLZs",26,"%TOP")
0
^SHP("P1MLZs",27)

^SHP("P1MLZs",27,"%TOP")
0
^SHP("P1MLZs",28)

^SHP("P1MLZs",28,"%TOP")
0
^SHP("P1MLZs",29)

^SHP("P1MLZs",29,"%TOP")
0
^SHP("P1MLZs",30)

^SHP("P1MLZs",30,"%TOP")
0
^SHP("P1MLZs",31)

^SHP("P1MLZs",31,"%TOP")
0
^SHP("P1MLZs",32)

^SHP("P1MLZs",32,"%TOP")
0
^SHP("P1MLZs",33)

^SHP("P1MLZs",33,"%TOP")
0
^SHP("P1MLZs",34)

^SHP("P1MLZs",34,"%TOP")
0
^SHP("P1MLZs",35)

^SHP("P1MLZs",35,"%TOP")
0
^SHP("P1MLZs",36)

^SHP("P1MLZs",36,"%TOP")
0
^SHP("P1MLZs",37)

^SHP("P1MLZs",37,"%TOP")
0
^SHP("P1MLZs",38)

^SHP("P1MLZs",38,"%TOP")
0
^SHP("P1MLZs",39)

^SHP("P1MLZs",39,"%TOP")
0
^SHP("P1MLZs",40)

^SHP("P1MLZs",40,"%TOP")
0
^SHP("P1MLZs",41)

^SHP("P1MLZs",41,"%TOP")
0
^SHP("P1MLZs",42)

^SHP("P1MLZs",42,"%TOP")
0
^SHP("P1MLZs",43)

^SHP("P1MLZs",43,"%TOP")
0
^SHP("P1MLZs",44)

^SHP("P1MLZs",44,"%TOP")
0
^SHP("P1MLZs",45)

^SHP("P1MLZs",45,"%TOP")
0
^SHP("P1MLZs",46)

^SHP("P1MLZs",46,"%TOP")
0
^SHP("P1MLZs",47)

^SHP("P1MLZs",47,"%TOP")
0
^SHP("P1MLZs",48)

^SHP("P1MLZs",48,"%TOP")
0
^SHP("P1MLZs",49)

^SHP("P1MLZs",49,"%TOP")
0
^SHP("P1MLZs",50)

^SHP("P1MLZs",50,"%TOP")
0
^SHP("P1MLZs",51)

^SHP("P1MLZs",51,"%TOP")
0
^SHP("P1MLZs",52)

^SHP("P1MLZs",52,"%TOP")
0
^SHP("P1MLZs",53)
                                                                            $ 
^SHP("P1MLZs",53,"%TOP")
76
^SHP("P1MLZs",54)
   ---------------------------------------------------------------------------
^SHP("P1MLZs",54,"%TOP")
3
^SHP("P1MLZs",55)
                                                                               
^SHP("P1MLZs",55,"%TOP")
79
^SHP("P1MLZs",56)
 &47 >&45  >&20     >&42     >&40   >&35    >&30     >&25    >                 
^SHP("P1MLZs",56,"%TOP")
1
^SHP("P1MLZs","RG")
H
^SHP("P1MSH1s")
migily Z 
^SHP("P1MSH1s",1)
                              #-&07>   -#                                      
^SHP("P1MSH1s",2)
                                                                               
^SHP("P1MSH1s",3)
             &03       >  &05      > : jix`zl migily g"ec                      
^SHP("P1MSH1s",4)
                                                                               
^SHP("P1MSH1s",5)
   ---------------------------------------------------------------------------
^SHP("P1MSH1s",6)
   : iekif :  tih :zepnfd: zegpd :milehia: zexy :  oeict  :   gily my  : 'qn : 
^SHP("P1MSH1s",7)
   ---------------------------------------------------------------------------
^SHP("P1MSH1s",8)
   $99999.9:9999.9: 99999:99999.9: 9999.9:9999.9:9999999.9:TTTTTTTTTTTT:99999:1
^SHP("P1MSH1s",9)

^SHP("P1MSH1s",10)

^SHP("P1MSH1s",11)
                                                                               
^SHP("P1MSH1s",12)

^SHP("P1MSH1s",13)

^SHP("P1MSH1s",14)
                                                                            $ 
^SHP("P1MSH1s",15)
   ---------------------------------------------------------------------------
^SHP("P1MSH1s",16)
                                                                               
^SHP("P1MSH1s",17)
    &50   > &47   >&42   >&35    >&30   >&25   > &20      >                    
^SHP("P1MSH1s","RG")
H
^SHP("P1MSHs")

^SHP("P1MSHs",1)
                             #  migily g"ec  #                                 
^SHP("P1MSHs",1,"%TOP")
29
^SHP("P1MSHs",2)
                        &10      > jix`z cr    &05      > jix`zn               
^SHP("P1MSHs",2,"%TOP")
24
^SHP("P1MSHs",3)
   ---------------------------------------------------------------------------
^SHP("P1MSHs",3,"%TOP")
3
^SHP("P1MSHs",4)
   : iekif :  tih :zepnfd: zegpd :milehia: zexy :  oeict  :   gily my  : 'qn : 
^SHP("P1MSHs",4,"%TOP")
3
^SHP("P1MSHs",5)
   ---------------------------------------------------------------------------
^SHP("P1MSHs",5,"%TOP")
3
^SHP("P1MSHs",6)
   $99999.9:9999.9: 99999:99999.9: 9999.9:9999.9:9999999.9:TTTTTTTTTTTT:99999:1
^SHP("P1MSHs",6,"%TOP")
3
^SHP("P1MSHs",7)

^SHP("P1MSHs",7,"%TOP")
0
^SHP("P1MSHs",8)

^SHP("P1MSHs",8,"%TOP")
0
^SHP("P1MSHs",9)

^SHP("P1MSHs",9,"%TOP")
0
^SHP("P1MSHs",10)

^SHP("P1MSHs",10,"%TOP")
0
^SHP("P1MSHs",11)

^SHP("P1MSHs",11,"%TOP")
0
^SHP("P1MSHs",12)

^SHP("P1MSHs",12,"%TOP")
0
^SHP("P1MSHs",13)

^SHP("P1MSHs",13,"%TOP")
0
^SHP("P1MSHs",14)

^SHP("P1MSHs",14,"%TOP")
0
^SHP("P1MSHs",15)

^SHP("P1MSHs",15,"%TOP")
0
^SHP("P1MSHs",16)

^SHP("P1MSHs",16,"%TOP")
0
^SHP("P1MSHs",17)

^SHP("P1MSHs",17,"%TOP")
0
^SHP("P1MSHs",18)

^SHP("P1MSHs",18,"%TOP")
0
^SHP("P1MSHs",19)

^SHP("P1MSHs",19,"%TOP")
0
^SHP("P1MSHs",20)

^SHP("P1MSHs",20,"%TOP")
0
^SHP("P1MSHs",21)

^SHP("P1MSHs",21,"%TOP")
0
^SHP("P1MSHs",22)

^SHP("P1MSHs",22,"%TOP")
0
^SHP("P1MSHs",23)

^SHP("P1MSHs",23,"%TOP")
0
^SHP("P1MSHs",24)

^SHP("P1MSHs",24,"%TOP")
0
^SHP("P1MSHs",25)

^SHP("P1MSHs",25,"%TOP")
0
^SHP("P1MSHs",26)

^SHP("P1MSHs",26,"%TOP")
0
^SHP("P1MSHs",27)

^SHP("P1MSHs",27,"%TOP")
0
^SHP("P1MSHs",28)

^SHP("P1MSHs",28,"%TOP")
0
^SHP("P1MSHs",29)

^SHP("P1MSHs",29,"%TOP")
0
^SHP("P1MSHs",30)

^SHP("P1MSHs",30,"%TOP")
0
^SHP("P1MSHs",31)

^SHP("P1MSHs",31,"%TOP")
0
^SHP("P1MSHs",32)

^SHP("P1MSHs",32,"%TOP")
0
^SHP("P1MSHs",33)

^SHP("P1MSHs",33,"%TOP")
0
^SHP("P1MSHs",34)

^SHP("P1MSHs",34,"%TOP")
0
^SHP("P1MSHs",35)

^SHP("P1MSHs",35,"%TOP")
0
^SHP("P1MSHs",36)

^SHP("P1MSHs",36,"%TOP")
0
^SHP("P1MSHs",37)

^SHP("P1MSHs",37,"%TOP")
0
^SHP("P1MSHs",38)

^SHP("P1MSHs",38,"%TOP")
0
^SHP("P1MSHs",39)

^SHP("P1MSHs",39,"%TOP")
0
^SHP("P1MSHs",40)

^SHP("P1MSHs",40,"%TOP")
0
^SHP("P1MSHs",41)

^SHP("P1MSHs",41,"%TOP")
0
^SHP("P1MSHs",42)

^SHP("P1MSHs",42,"%TOP")
0
^SHP("P1MSHs",43)

^SHP("P1MSHs",43,"%TOP")
0
^SHP("P1MSHs",44)

^SHP("P1MSHs",44,"%TOP")
0
^SHP("P1MSHs",45)

^SHP("P1MSHs",45,"%TOP")
0
^SHP("P1MSHs",46)

^SHP("P1MSHs",46,"%TOP")
0
^SHP("P1MSHs",47)

^SHP("P1MSHs",47,"%TOP")
0
^SHP("P1MSHs",48)

^SHP("P1MSHs",48,"%TOP")
0
^SHP("P1MSHs",49)
                                                                               
^SHP("P1MSHs",49,"%TOP")
79
^SHP("P1MSHs",50)
                                                                               
^SHP("P1MSHs",50,"%TOP")
79
^SHP("P1MSHs",51)

^SHP("P1MSHs",51,"%TOP")
0
^SHP("P1MSHs",52)

^SHP("P1MSHs",52,"%TOP")
0
^SHP("P1MSHs",53)
                                                                            $ 
^SHP("P1MSHs",53,"%TOP")
76
^SHP("P1MSHs",54)
   ---------------------------------------------------------------------------
^SHP("P1MSHs",54,"%TOP")
3
^SHP("P1MSHs",55)
                                                                               
^SHP("P1MSHs",55,"%TOP")
79
^SHP("P1MSHs",56)
   &50    >&47    >&42    >&35    >&30    >&25    >&20       >                 
^SHP("P1MSHs",56,"%TOP")
3
^SHP("P1MSHs","RG")
H
^SHP("P1MTKs")

^SHP("P1MTKs",1)
                    &06                             > &05   >: xven 'qn        
^SHP("P1MTKs",2)
            --------------------------------------------------------
^SHP("P1MTKs",3)
            :                        oekznd xe`z                   :           
^SHP("P1MTKs",4)
            --------------------------------------------------------
^SHP("P1MTKs",5)
            $                                              TP      :1
^SHP("P1MTKs",6)

^SHP("P1MTKs",7)

^SHP("P1MTKs",8)

^SHP("P1MTKs",9)

^SHP("P1MTKs",10)

^SHP("P1MTKs",11)

^SHP("P1MTKs",12)

^SHP("P1MTKs",13)

^SHP("P1MTKs",14)

^SHP("P1MTKs",15)

^SHP("P1MTKs",16)

^SHP("P1MTKs",17)

^SHP("P1MTKs",18)

^SHP("P1MTKs",19)

^SHP("P1MTKs",20)

^SHP("P1MTKs",21)

^SHP("P1MTKs",22)
                                                                  $ 
^SHP("P1MTKs",23)
            --------------------------------------------------------
^SHP("P1MTKs",24)
                                                                               
^SHP("P1MTKs","RG")
H
^SHP("P1PARGs")
dxidn mihixt znwd
^SHP("P1PARGs",1)
                       # dxidn mihixt znwd #                                   
^SHP("P1PARGs",2)
                                                                               
^SHP("P1PARGs",3)
      ----------------------------------------------------------------------
^SHP("P1PARGs",4)
      : 'tcn xe`z :'tcn: dveaw xe`z :dveaw: xign :      hixt xe`z    : cew :   
^SHP("P1PARGs",5)
      ----------------------------------------------------------------------
^SHP("P1PARGs",6)
      $TTTTTTTTTTT:9999:TTTTTTTTTTTT:TTTTT:999.99:TTTTTTTTTTTTTTTTTTT:TTTTT:1
^SHP("P1PARGs",7)

^SHP("P1PARGs",8)

^SHP("P1PARGs",9)

^SHP("P1PARGs",10)

^SHP("P1PARGs",11)

^SHP("P1PARGs",12)

^SHP("P1PARGs",13)

^SHP("P1PARGs",14)

^SHP("P1PARGs",15)

^SHP("P1PARGs",16)

^SHP("P1PARGs",17)

^SHP("P1PARGs",18)

^SHP("P1PARGs",19)

^SHP("P1PARGs",20)

^SHP("P1PARGs",21)

^SHP("P1PARGs",22)

^SHP("P1PARGs",23)

^SHP("P1PARGs",24)

^SHP("P1PARGs",25)

^SHP("P1PARGs",26)

^SHP("P1PARGs",27)

^SHP("P1PARGs",28)

^SHP("P1PARGs",29)

^SHP("P1PARGs",30)

^SHP("P1PARGs",31)

^SHP("P1PARGs",32)

^SHP("P1PARGs",33)

^SHP("P1PARGs",34)

^SHP("P1PARGs",35)

^SHP("P1PARGs",36)

^SHP("P1PARGs",37)

^SHP("P1PARGs",38)

^SHP("P1PARGs",39)

^SHP("P1PARGs",40)

^SHP("P1PARGs",41)

^SHP("P1PARGs",42)

^SHP("P1PARGs",43)

^SHP("P1PARGs",44)

^SHP("P1PARGs",45)

^SHP("P1PARGs",46)

^SHP("P1PARGs",47)

^SHP("P1PARGs",48)

^SHP("P1PARGs",49)

^SHP("P1PARGs",50)

^SHP("P1PARGs",51)

^SHP("P1PARGs",52)

^SHP("P1PARGs",53)

^SHP("P1PARGs",54)
                                                                          $ 
^SHP("P1PARGs",55)
      ----------------------------------------------------------------------
^SHP("P1PARGs",56)
                                                                               
^SHP("P1PARGs","RG")
H
^SHP("P1PARLKH")
gewl oexign
^SHP("P1PARLKH",1)
                               # gewl oexign #                                 
^SHP("P1PARLKH",2)
                                                                               
^SHP("P1PARLKH",3)
                  &06                        > &05       >: gewl 'qn           
^SHP("P1PARLKH",4)
          ----------------------------------------------------------
^SHP("P1PARLKH",5)
          : gewll xign : libx xign :      hixt xe`z     : hixt cew :           
^SHP("P1PARLKH",6)
          ----------------------------------------------------------
^SHP("P1PARLKH",7)
          $    99999.99:   99999.99:TTTTTTTTTTTTTTTTTTTT:9999999999:1
^SHP("P1PARLKH",8)

^SHP("P1PARLKH",9)

^SHP("P1PARLKH",10)

^SHP("P1PARLKH",11)

^SHP("P1PARLKH",12)

^SHP("P1PARLKH",13)

^SHP("P1PARLKH",14)

^SHP("P1PARLKH",15)

^SHP("P1PARLKH",16)

^SHP("P1PARLKH",17)

^SHP("P1PARLKH",18)

^SHP("P1PARLKH",19)

^SHP("P1PARLKH",20)

^SHP("P1PARLKH",21)

^SHP("P1PARLKH",22)
                                                                               
^SHP("P1PARLKH",23)
                                                                               
^SHP("P1PARLKH",24)
                                                                               
^SHP("P1PARLKH",25)
                                                                               
^SHP("P1PARLKH",26)
                                                                               
^SHP("P1PARLKH",27)

^SHP("P1PARLKH",28)

^SHP("P1PARLKH",29)

^SHP("P1PARLKH",30)

^SHP("P1PARLKH",31)

^SHP("P1PARLKH",32)

^SHP("P1PARLKH",33)

^SHP("P1PARLKH",34)

^SHP("P1PARLKH",35)

^SHP("P1PARLKH",36)

^SHP("P1PARLKH",37)

^SHP("P1PARLKH",38)

^SHP("P1PARLKH",39)

^SHP("P1PARLKH",40)

^SHP("P1PARLKH",41)

^SHP("P1PARLKH",42)
                                                                               
^SHP("P1PARLKH",43)
                                                                               
^SHP("P1PARLKH",44)
                                                                               
^SHP("P1PARLKH",45)
                                                                               
^SHP("P1PARLKH",46)
                                                                               
^SHP("P1PARLKH",47)

^SHP("P1PARLKH",48)
                                                                               
^SHP("P1PARLKH",49)
                                                                               
^SHP("P1PARLKH",50)
                                                                               
^SHP("P1PARLKH",51)
                                                                               
^SHP("P1PARLKH",52)

^SHP("P1PARLKH",53)

^SHP("P1PARLKH",54)
                                                                  $ 
^SHP("P1PARLKH",55)
         ----------------------------------------------------------            
^SHP("P1PARLKH",56)
                                                                               
^SHP("P1PARLKH","RG")
H
^SHP("P1PARLKHs",1)
                               # gewl oexign #                                 
^SHP("P1PARLKHs",1,"%TOP")
31
^SHP("P1PARLKHs",2)
                                                                               
^SHP("P1PARLKHs",2,"%TOP")
79
^SHP("P1PARLKHs",3)
                  &06                        > &05       >: gewl 'qn           
^SHP("P1PARLKHs",3,"%TOP")
18
^SHP("P1PARLKHs",4)
          ----------------------------------------------------------
^SHP("P1PARLKHs",4,"%TOP")
10
^SHP("P1PARLKHs",5)
          : gewll xign : libx xign :      hixt xe`z     : hixt cew :           
^SHP("P1PARLKHs",5,"%TOP")
10
^SHP("P1PARLKHs",6)
          ----------------------------------------------------------
^SHP("P1PARLKHs",6,"%TOP")
10
^SHP("P1PARLKHs",7)
          $    99999.99:   99999.99:TTTTTTTTTTTTTTTTTTTT:9999999999:1
^SHP("P1PARLKHs",7,"%TOP")
10
^SHP("P1PARLKHs",8)

^SHP("P1PARLKHs",8,"%TOP")
0
^SHP("P1PARLKHs",9)

^SHP("P1PARLKHs",9,"%TOP")
0
^SHP("P1PARLKHs",10)

^SHP("P1PARLKHs",10,"%TOP")
0
^SHP("P1PARLKHs",11)

^SHP("P1PARLKHs",11,"%TOP")
0
^SHP("P1PARLKHs",12)

^SHP("P1PARLKHs",12,"%TOP")
0
^SHP("P1PARLKHs",13)

^SHP("P1PARLKHs",13,"%TOP")
0
^SHP("P1PARLKHs",14)

^SHP("P1PARLKHs",14,"%TOP")
0
^SHP("P1PARLKHs",15)

^SHP("P1PARLKHs",15,"%TOP")
0
^SHP("P1PARLKHs",16)

^SHP("P1PARLKHs",16,"%TOP")
0
^SHP("P1PARLKHs",17)

^SHP("P1PARLKHs",17,"%TOP")
0
^SHP("P1PARLKHs",18)

^SHP("P1PARLKHs",18,"%TOP")
0
^SHP("P1PARLKHs",19)

^SHP("P1PARLKHs",19,"%TOP")
0
^SHP("P1PARLKHs",20)

^SHP("P1PARLKHs",20,"%TOP")
0
^SHP("P1PARLKHs",21)

^SHP("P1PARLKHs",21,"%TOP")
0
^SHP("P1PARLKHs",22)

^SHP("P1PARLKHs",22,"%TOP")
0
^SHP("P1PARLKHs",23)

^SHP("P1PARLKHs",23,"%TOP")
0
^SHP("P1PARLKHs",24)

^SHP("P1PARLKHs",24,"%TOP")
0
^SHP("P1PARLKHs",25)

^SHP("P1PARLKHs",25,"%TOP")
0
^SHP("P1PARLKHs",26)

^SHP("P1PARLKHs",26,"%TOP")
0
^SHP("P1PARLKHs",27)

^SHP("P1PARLKHs",27,"%TOP")
0
^SHP("P1PARLKHs",28)

^SHP("P1PARLKHs",28,"%TOP")
0
^SHP("P1PARLKHs",29)

^SHP("P1PARLKHs",29,"%TOP")
0
^SHP("P1PARLKHs",30)

^SHP("P1PARLKHs",30,"%TOP")
0
^SHP("P1PARLKHs",31)

^SHP("P1PARLKHs",31,"%TOP")
0
^SHP("P1PARLKHs",32)

^SHP("P1PARLKHs",32,"%TOP")
0
^SHP("P1PARLKHs",33)

^SHP("P1PARLKHs",33,"%TOP")
0
^SHP("P1PARLKHs",34)

^SHP("P1PARLKHs",34,"%TOP")
0
^SHP("P1PARLKHs",35)

^SHP("P1PARLKHs",35,"%TOP")
0
^SHP("P1PARLKHs",36)

^SHP("P1PARLKHs",36,"%TOP")
0
^SHP("P1PARLKHs",37)

^SHP("P1PARLKHs",37,"%TOP")
0
^SHP("P1PARLKHs",38)

^SHP("P1PARLKHs",38,"%TOP")
0
^SHP("P1PARLKHs",39)

^SHP("P1PARLKHs",39,"%TOP")
0
^SHP("P1PARLKHs",40)
                                                                  $ 
^SHP("P1PARLKHs",40,"%TOP")
66
^SHP("P1PARLKHs",41)
          ----------------------------------------------------------
^SHP("P1PARLKHs",41,"%TOP")
10
^SHP("P1PARLKHs",42)
                                                                               
^SHP("P1PARLKHs",42,"%TOP")
79
^SHP("P1PARLKHs",43)
                                                                               
^SHP("P1PARLKHs",43,"%TOP")
79
^SHP("P1PARLKHs",44)
                                                                               
^SHP("P1PARLKHs",44,"%TOP")
79
^SHP("P1PARLKHs",45)
                                                                               
^SHP("P1PARLKHs",45,"%TOP")
79
^SHP("P1PARLKHs",46)
                                                                               
^SHP("P1PARLKHs",46,"%TOP")
79
^SHP("P1PARLKHs",47)
                                                                               
^SHP("P1PARLKHs",47,"%TOP")
79
^SHP("P1PARLKHs",48)
                                                                               
^SHP("P1PARLKHs",48,"%TOP")
79
^SHP("P1PARLKHs",49)
                                                                               
^SHP("P1PARLKHs",49,"%TOP")
79
^SHP("P1PARLKHs",50)
                                                                               
^SHP("P1PARLKHs",50,"%TOP")
79
^SHP("P1PARLKHs",51)
                                                                               
^SHP("P1PARLKHs",51,"%TOP")
79
^SHP("P1PARLKHs",52)
                                                                               
^SHP("P1PARLKHs",52,"%TOP")
79
^SHP("P1PARLKHs",53)
                                                                               
^SHP("P1PARLKHs",53,"%TOP")
79
^SHP("P1PARLKHs",54)
                                                                               
^SHP("P1PARLKHs",54,"%TOP")
79
^SHP("P1PARLKHs",55)
                                                                               
^SHP("P1PARLKHs",55,"%TOP")
79
^SHP("P1PARLKHs",56)
                                                                               
^SHP("P1PARLKHs",56,"%TOP")
79
^SHP("P1PARLKHs","RG")
H
^SHP("P1PARMSL")
mgelynl mihixt zniyx
^SHP("P1PARMSL",1)
                      # migelynl mihixt zeveaw zniyx #                         
^SHP("P1PARMSL",2)
                                                                               
^SHP("P1PARMSL",3)
                        ------------------------------------
^SHP("P1PARMSL",4)
                        :       dveaw xtqn     : dveaw cew :                   
^SHP("P1PARMSL",5)
                        ------------------------------------
^SHP("P1PARMSL",6)
                        $TTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTT:1
^SHP("P1PARMSL",7)

^SHP("P1PARMSL",8)

^SHP("P1PARMSL",9)

^SHP("P1PARMSL",10)

^SHP("P1PARMSL",11)

^SHP("P1PARMSL",12)

^SHP("P1PARMSL",13)

^SHP("P1PARMSL",14)

^SHP("P1PARMSL",15)

^SHP("P1PARMSL",16)

^SHP("P1PARMSL",17)

^SHP("P1PARMSL",18)

^SHP("P1PARMSL",19)

^SHP("P1PARMSL",20)

^SHP("P1PARMSL",21)

^SHP("P1PARMSL",22)

^SHP("P1PARMSL",23)

^SHP("P1PARMSL",24)

^SHP("P1PARMSL",25)

^SHP("P1PARMSL",26)

^SHP("P1PARMSL",27)

^SHP("P1PARMSL",28)

^SHP("P1PARMSL",29)
                                                                               
^SHP("P1PARMSL",30)
                                                                               
^SHP("P1PARMSL",31)
                                                                               
^SHP("P1PARMSL",32)
                                                                               
^SHP("P1PARMSL",33)
                                                                               
^SHP("P1PARMSL",34)
                                                                               
^SHP("P1PARMSL",35)
                                                                               
^SHP("P1PARMSL",36)
                                                                               
^SHP("P1PARMSL",37)
                                                                               
^SHP("P1PARMSL",38)
                                                                               
^SHP("P1PARMSL",39)

^SHP("P1PARMSL",40)

^SHP("P1PARMSL",41)

^SHP("P1PARMSL",42)

^SHP("P1PARMSL",43)
                                                                               
^SHP("P1PARMSL",44)
                                                                               
^SHP("P1PARMSL",45)
                                                                               
^SHP("P1PARMSL",46)
                                                                               
^SHP("P1PARMSL",47)

^SHP("P1PARMSL",48)

^SHP("P1PARMSL",49)

^SHP("P1PARMSL",50)

^SHP("P1PARMSL",51)

^SHP("P1PARMSL",52)

^SHP("P1PARMSL",53)

^SHP("P1PARMSL",54)
                                                          $ 
^SHP("P1PARMSL",55)
                        ------------------------------------
^SHP("P1PARMSL",56)
                                                                               
^SHP("P1PARMSL","RG")
H
^SHP("P1PARMSLs",1)
                      # migelynl mihixt zeveaw zniyx #                         
^SHP("P1PARMSLs",1,"%TOP")
22
^SHP("P1PARMSLs",2)
                                                                               
^SHP("P1PARMSLs",2,"%TOP")
79
^SHP("P1PARMSLs",3)
                        ------------------------------------
^SHP("P1PARMSLs",3,"%TOP")
24
^SHP("P1PARMSLs",4)
                        :       dveaw xtqn     : dveaw cew :                   
^SHP("P1PARMSLs",4,"%TOP")
24
^SHP("P1PARMSLs",5)
                        ------------------------------------
^SHP("P1PARMSLs",5,"%TOP")
24
^SHP("P1PARMSLs",6)
                        $TTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTT:1
^SHP("P1PARMSLs",6,"%TOP")
24
^SHP("P1PARMSLs",7)

^SHP("P1PARMSLs",7,"%TOP")
0
^SHP("P1PARMSLs",8)

^SHP("P1PARMSLs",8,"%TOP")
0
^SHP("P1PARMSLs",9)

^SHP("P1PARMSLs",9,"%TOP")
0
^SHP("P1PARMSLs",10)

^SHP("P1PARMSLs",10,"%TOP")
0
^SHP("P1PARMSLs",11)

^SHP("P1PARMSLs",11,"%TOP")
0
^SHP("P1PARMSLs",12)

^SHP("P1PARMSLs",12,"%TOP")
0
^SHP("P1PARMSLs",13)

^SHP("P1PARMSLs",13,"%TOP")
0
^SHP("P1PARMSLs",14)

^SHP("P1PARMSLs",14,"%TOP")
0
^SHP("P1PARMSLs",15)

^SHP("P1PARMSLs",15,"%TOP")
0
^SHP("P1PARMSLs",16)

^SHP("P1PARMSLs",16,"%TOP")
0
^SHP("P1PARMSLs",17)

^SHP("P1PARMSLs",17,"%TOP")
0
^SHP("P1PARMSLs",18)

^SHP("P1PARMSLs",18,"%TOP")
0
^SHP("P1PARMSLs",19)

^SHP("P1PARMSLs",19,"%TOP")
0
^SHP("P1PARMSLs",20)

^SHP("P1PARMSLs",20,"%TOP")
0
^SHP("P1PARMSLs",21)

^SHP("P1PARMSLs",21,"%TOP")
0
^SHP("P1PARMSLs",22)

^SHP("P1PARMSLs",22,"%TOP")
0
^SHP("P1PARMSLs",23)

^SHP("P1PARMSLs",23,"%TOP")
0
^SHP("P1PARMSLs",24)

^SHP("P1PARMSLs",24,"%TOP")
0
^SHP("P1PARMSLs",25)

^SHP("P1PARMSLs",25,"%TOP")
0
^SHP("P1PARMSLs",26)

^SHP("P1PARMSLs",26,"%TOP")
0
^SHP("P1PARMSLs",27)

^SHP("P1PARMSLs",27,"%TOP")
0
^SHP("P1PARMSLs",28)

^SHP("P1PARMSLs",28,"%TOP")
0
^SHP("P1PARMSLs",29)

^SHP("P1PARMSLs",29,"%TOP")
0
^SHP("P1PARMSLs",30)

^SHP("P1PARMSLs",30,"%TOP")
0
^SHP("P1PARMSLs",31)

^SHP("P1PARMSLs",31,"%TOP")
0
^SHP("P1PARMSLs",32)

^SHP("P1PARMSLs",32,"%TOP")
0
^SHP("P1PARMSLs",33)

^SHP("P1PARMSLs",33,"%TOP")
0
^SHP("P1PARMSLs",34)

^SHP("P1PARMSLs",34,"%TOP")
0
^SHP("P1PARMSLs",35)

^SHP("P1PARMSLs",35,"%TOP")
0
^SHP("P1PARMSLs",36)

^SHP("P1PARMSLs",36,"%TOP")
0
^SHP("P1PARMSLs",37)

^SHP("P1PARMSLs",37,"%TOP")
0
^SHP("P1PARMSLs",38)

^SHP("P1PARMSLs",38,"%TOP")
0
^SHP("P1PARMSLs",39)

^SHP("P1PARMSLs",39,"%TOP")
0
^SHP("P1PARMSLs",40)
                                                          $ 
^SHP("P1PARMSLs",40,"%TOP")
58
^SHP("P1PARMSLs",41)
                        ------------------------------------
^SHP("P1PARMSLs",41,"%TOP")
24
^SHP("P1PARMSLs",42)
                                                                               
^SHP("P1PARMSLs",42,"%TOP")
79
^SHP("P1PARMSLs",43)
                                                                               
^SHP("P1PARMSLs",43,"%TOP")
79
^SHP("P1PARMSLs",44)
                                                                               
^SHP("P1PARMSLs",44,"%TOP")
79
^SHP("P1PARMSLs",45)
                                                                               
^SHP("P1PARMSLs",45,"%TOP")
79
^SHP("P1PARMSLs",46)
                                                                               
^SHP("P1PARMSLs",46,"%TOP")
79
^SHP("P1PARMSLs",47)
                                                                               
^SHP("P1PARMSLs",47,"%TOP")
79
^SHP("P1PARMSLs",48)
                                                                               
^SHP("P1PARMSLs",48,"%TOP")
79
^SHP("P1PARMSLs",49)
                                                                               
^SHP("P1PARMSLs",49,"%TOP")
79
^SHP("P1PARMSLs",50)
                                                                               
^SHP("P1PARMSLs",50,"%TOP")
79
^SHP("P1PARMSLs",51)
                                                                               
^SHP("P1PARMSLs",51,"%TOP")
79
^SHP("P1PARMSLs",52)
                                                                               
^SHP("P1PARMSLs",52,"%TOP")
79
^SHP("P1PARMSLs",53)
                                                                               
^SHP("P1PARMSLs",53,"%TOP")
79
^SHP("P1PARMSLs",54)
                                                                               
^SHP("P1PARMSLs",54,"%TOP")
79
^SHP("P1PARMSLs",55)
                                                                               
^SHP("P1PARMSLs",55,"%TOP")
79
^SHP("P1PARMSLs",56)
                                                                               
^SHP("P1PARMSLs",56,"%TOP")
79
^SHP("P1PARMSLs","RG")
H
^SHP("P1PARNLs")
NEILAT PRITIM LEFI S
^SHP("P1PARNLs",1)
              # zery itl mihixt zlirp #                                        
^SHP("P1PARNLs",2)
                   &04                      > &03 : 'qn dlah                   
^SHP("P1PARNLs",3)
                     &10 >: dry cr &05 > :   dryn sweza dlah                   
^SHP("P1PARNLs",4)
                      &20 : mei cr   &15 : mein                                
^SHP("P1PARNLs",5)
                   --------------------------------------
^SHP("P1PARNLs",6)
                   :         hixt xe`z       : hixt cew :                      
^SHP("P1PARNLs",7)
                   --------------------------------------
^SHP("P1PARNLs",8)
                   $TTTTTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("P1PARNLs",9)

^SHP("P1PARNLs",10)

^SHP("P1PARNLs",11)

^SHP("P1PARNLs",12)

^SHP("P1PARNLs",13)

^SHP("P1PARNLs",14)

^SHP("P1PARNLs",15)

^SHP("P1PARNLs",16)

^SHP("P1PARNLs",17)

^SHP("P1PARNLs",18)

^SHP("P1PARNLs",19)

^SHP("P1PARNLs",20)

^SHP("P1PARNLs",21)

^SHP("P1PARNLs",22)

^SHP("P1PARNLs",23)

^SHP("P1PARNLs",24)

^SHP("P1PARNLs",25)

^SHP("P1PARNLs",26)

^SHP("P1PARNLs",27)

^SHP("P1PARNLs",28)

^SHP("P1PARNLs",29)

^SHP("P1PARNLs",30)

^SHP("P1PARNLs",31)

^SHP("P1PARNLs",32)

^SHP("P1PARNLs",33)

^SHP("P1PARNLs",34)

^SHP("P1PARNLs",35)

^SHP("P1PARNLs",36)

^SHP("P1PARNLs",37)

^SHP("P1PARNLs",38)

^SHP("P1PARNLs",39)

^SHP("P1PARNLs",40)

^SHP("P1PARNLs",41)

^SHP("P1PARNLs",42)

^SHP("P1PARNLs",43)

^SHP("P1PARNLs",44)

^SHP("P1PARNLs",45)

^SHP("P1PARNLs",46)

^SHP("P1PARNLs",47)

^SHP("P1PARNLs",48)

^SHP("P1PARNLs",49)

^SHP("P1PARNLs",50)

^SHP("P1PARNLs",51)

^SHP("P1PARNLs",52)

^SHP("P1PARNLs",53)

^SHP("P1PARNLs",54)
                                                       $ 
^SHP("P1PARNLs",55)
                   --------------------------------------
^SHP("P1PARNLs",56)
                                                                               
^SHP("P1PARNLs","RG")
H
^SHP("P1PARSHA")
zery itl oexign
^SHP("P1PARSHA",1)
                    # zery itl oexign #                                        
^SHP("P1PARSHA",2)
                 &04                      > &03 : 'qn oexign                   
^SHP("P1PARSHA",3)
                     &10 >: dry cr &05 > : dryn sweza oexign                   
^SHP("P1PARSHA",4)
                      &20 : mei cr   &15 : mein                                
^SHP("P1PARSHA",5)
        ------------------------------------------------------------
^SHP("P1PARSHA",6)
        : dry itl xign : libx xign :      hixt xe`z     : hixt cew :           
^SHP("P1PARSHA",7)
        ------------------------------------------------------------
^SHP("P1PARSHA",8)
        $      99999.99:   99999.99:TTTTTTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("P1PARSHA",9)

^SHP("P1PARSHA",10)

^SHP("P1PARSHA",11)

^SHP("P1PARSHA",12)

^SHP("P1PARSHA",13)

^SHP("P1PARSHA",14)

^SHP("P1PARSHA",15)

^SHP("P1PARSHA",16)

^SHP("P1PARSHA",17)

^SHP("P1PARSHA",18)

^SHP("P1PARSHA",19)

^SHP("P1PARSHA",20)

^SHP("P1PARSHA",21)

^SHP("P1PARSHA",22)

^SHP("P1PARSHA",23)

^SHP("P1PARSHA",24)

^SHP("P1PARSHA",25)

^SHP("P1PARSHA",26)

^SHP("P1PARSHA",27)

^SHP("P1PARSHA",28)

^SHP("P1PARSHA",29)

^SHP("P1PARSHA",30)

^SHP("P1PARSHA",31)

^SHP("P1PARSHA",32)

^SHP("P1PARSHA",33)

^SHP("P1PARSHA",34)

^SHP("P1PARSHA",35)

^SHP("P1PARSHA",36)

^SHP("P1PARSHA",37)

^SHP("P1PARSHA",38)

^SHP("P1PARSHA",39)

^SHP("P1PARSHA",40)
                                                                  $ 
^SHP("P1PARSHA",41)
       ------------------------------------------------------------            
^SHP("P1PARSHA","RG")
H
^SHP("P1PARSHAs",1)
                    # zery itl oexign #                                        
^SHP("P1PARSHAs",1,"%TOP")
20
^SHP("P1PARSHAs",2)
                 &04                      > &03 : 'qn oexign                   
^SHP("P1PARSHAs",2,"%TOP")
17
^SHP("P1PARSHAs",3)
                     &10 >: dry cr &05 > : dryn sweza oexign                   
^SHP("P1PARSHAs",3,"%TOP")
21
^SHP("P1PARSHAs",4)
                      &20 : mei cr   &15 : mein                                
^SHP("P1PARSHAs",4,"%TOP")
22
^SHP("P1PARSHAs",5)
        ------------------------------------------------------------
^SHP("P1PARSHAs",5,"%TOP")
8
^SHP("P1PARSHAs",6)
        : dry itl xign : libx xign :      hixt xe`z     : hixt cew :           
^SHP("P1PARSHAs",6,"%TOP")
8
^SHP("P1PARSHAs",7)
        ------------------------------------------------------------
^SHP("P1PARSHAs",7,"%TOP")
8
^SHP("P1PARSHAs",8)
        $      99999.99:   99999.99:TTTTTTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("P1PARSHAs",8,"%TOP")
8
^SHP("P1PARSHAs",9)

^SHP("P1PARSHAs",9,"%TOP")
0
^SHP("P1PARSHAs",10)

^SHP("P1PARSHAs",10,"%TOP")
0
^SHP("P1PARSHAs",11)

^SHP("P1PARSHAs",11,"%TOP")
0
^SHP("P1PARSHAs",12)

^SHP("P1PARSHAs",12,"%TOP")
0
^SHP("P1PARSHAs",13)

^SHP("P1PARSHAs",13,"%TOP")
0
^SHP("P1PARSHAs",14)

^SHP("P1PARSHAs",14,"%TOP")
0
^SHP("P1PARSHAs",15)

^SHP("P1PARSHAs",15,"%TOP")
0
^SHP("P1PARSHAs",16)

^SHP("P1PARSHAs",16,"%TOP")
0
^SHP("P1PARSHAs",17)

^SHP("P1PARSHAs",17,"%TOP")
0
^SHP("P1PARSHAs",18)

^SHP("P1PARSHAs",18,"%TOP")
0
^SHP("P1PARSHAs",19)

^SHP("P1PARSHAs",19,"%TOP")
0
^SHP("P1PARSHAs",20)

^SHP("P1PARSHAs",20,"%TOP")
0
^SHP("P1PARSHAs",21)

^SHP("P1PARSHAs",21,"%TOP")
0
^SHP("P1PARSHAs",22)

^SHP("P1PARSHAs",22,"%TOP")
0
^SHP("P1PARSHAs",23)

^SHP("P1PARSHAs",23,"%TOP")
0
^SHP("P1PARSHAs",24)

^SHP("P1PARSHAs",24,"%TOP")
0
^SHP("P1PARSHAs",25)

^SHP("P1PARSHAs",25,"%TOP")
0
^SHP("P1PARSHAs",26)

^SHP("P1PARSHAs",26,"%TOP")
0
^SHP("P1PARSHAs",27)

^SHP("P1PARSHAs",27,"%TOP")
0
^SHP("P1PARSHAs",28)

^SHP("P1PARSHAs",28,"%TOP")
0
^SHP("P1PARSHAs",29)

^SHP("P1PARSHAs",29,"%TOP")
0
^SHP("P1PARSHAs",30)

^SHP("P1PARSHAs",30,"%TOP")
0
^SHP("P1PARSHAs",31)

^SHP("P1PARSHAs",31,"%TOP")
0
^SHP("P1PARSHAs",32)

^SHP("P1PARSHAs",32,"%TOP")
0
^SHP("P1PARSHAs",33)

^SHP("P1PARSHAs",33,"%TOP")
0
^SHP("P1PARSHAs",34)

^SHP("P1PARSHAs",34,"%TOP")
0
^SHP("P1PARSHAs",35)

^SHP("P1PARSHAs",35,"%TOP")
0
^SHP("P1PARSHAs",36)

^SHP("P1PARSHAs",36,"%TOP")
0
^SHP("P1PARSHAs",37)

^SHP("P1PARSHAs",37,"%TOP")
0
^SHP("P1PARSHAs",38)

^SHP("P1PARSHAs",38,"%TOP")
0
^SHP("P1PARSHAs",39)

^SHP("P1PARSHAs",39,"%TOP")
0
^SHP("P1PARSHAs",40)
                                                                  $ 
^SHP("P1PARSHAs",40,"%TOP")
66
^SHP("P1PARSHAs",41)
        ------------------------------------------------------------
^SHP("P1PARSHAs",41,"%TOP")
8
^SHP("P1PARSHAs",42)
                                                                               
^SHP("P1PARSHAs",42,"%TOP")
79
^SHP("P1PARSHAs",43)
                                                                               
^SHP("P1PARSHAs",43,"%TOP")
79
^SHP("P1PARSHAs",44)
                                                                               
^SHP("P1PARSHAs",44,"%TOP")
79
^SHP("P1PARSHAs",45)
                                                                               
^SHP("P1PARSHAs",45,"%TOP")
79
^SHP("P1PARSHAs",46)
                                                                               
^SHP("P1PARSHAs",46,"%TOP")
79
^SHP("P1PARSHAs",47)
                                                                               
^SHP("P1PARSHAs",47,"%TOP")
79
^SHP("P1PARSHAs",48)
                                                                               
^SHP("P1PARSHAs",48,"%TOP")
79
^SHP("P1PARSHAs",49)
                                                                               
^SHP("P1PARSHAs",49,"%TOP")
79
^SHP("P1PARSHAs",50)
                                                                               
^SHP("P1PARSHAs",50,"%TOP")
79
^SHP("P1PARSHAs",51)
                                                                               
^SHP("P1PARSHAs",51,"%TOP")
79
^SHP("P1PARSHAs",52)
                                                                               
^SHP("P1PARSHAs",52,"%TOP")
79
^SHP("P1PARSHAs",53)
                                                                               
^SHP("P1PARSHAs",53,"%TOP")
79
^SHP("P1PARSHAs",54)
                                                                               
^SHP("P1PARSHAs",54,"%TOP")
79
^SHP("P1PARSHAs",55)
                                                                               
^SHP("P1PARSHAs",55,"%TOP")
79
^SHP("P1PARSHAs",56)
                                                                               
^SHP("P1PARSHAs",56,"%TOP")
79
^SHP("P1PARSHAs","RG")
H
^SHP("P1PARSLK")
zegewl zveaw oexign
^SHP("P1PARSLK",1)
                 # zegewl zveaw itl oexign #                                   
^SHP("P1PARSLK",2)
                                                                               
^SHP("P1PARSLK",3)
                &06                        > &05   >: zegewl zveaw             
^SHP("P1PARSLK",4)
          ----------------------------------------------------------
^SHP("P1PARSLK",5)
          : gewll xign : libx xign :      hixt xe`z     : hixt cew :           
^SHP("P1PARSLK",6)
          ----------------------------------------------------------
^SHP("P1PARSLK",7)
          $    99999.99:   99999.99:TTTTTTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("P1PARSLK",8)

^SHP("P1PARSLK",9)

^SHP("P1PARSLK",10)

^SHP("P1PARSLK",11)

^SHP("P1PARSLK",12)

^SHP("P1PARSLK",13)

^SHP("P1PARSLK",14)

^SHP("P1PARSLK",15)

^SHP("P1PARSLK",16)

^SHP("P1PARSLK",17)

^SHP("P1PARSLK",18)

^SHP("P1PARSLK",19)

^SHP("P1PARSLK",20)

^SHP("P1PARSLK",21)

^SHP("P1PARSLK",22)

^SHP("P1PARSLK",23)

^SHP("P1PARSLK",24)

^SHP("P1PARSLK",25)

^SHP("P1PARSLK",26)

^SHP("P1PARSLK",27)

^SHP("P1PARSLK",28)

^SHP("P1PARSLK",29)

^SHP("P1PARSLK",30)

^SHP("P1PARSLK",31)

^SHP("P1PARSLK",32)

^SHP("P1PARSLK",33)

^SHP("P1PARSLK",34)

^SHP("P1PARSLK",35)

^SHP("P1PARSLK",36)

^SHP("P1PARSLK",37)

^SHP("P1PARSLK",38)
                                                                               
^SHP("P1PARSLK",39)
                                                                               
^SHP("P1PARSLK",40)
                                                                               
^SHP("P1PARSLK",41)
                                                                               
^SHP("P1PARSLK",42)
                                                                               
^SHP("P1PARSLK",43)
                                                                               
^SHP("P1PARSLK",44)
                                                                               
^SHP("P1PARSLK",45)
                                                                               
^SHP("P1PARSLK",46)
                                                                               
^SHP("P1PARSLK",47)
                                                                               
^SHP("P1PARSLK",48)
                                                                               
^SHP("P1PARSLK",49)
                                                                               
^SHP("P1PARSLK",50)
                                                                               
^SHP("P1PARSLK",51)
                                                                               
^SHP("P1PARSLK",52)

^SHP("P1PARSLK",53)

^SHP("P1PARSLK",54)
                                                                  $ 
^SHP("P1PARSLK",55)
         ----------------------------------------------------------            
^SHP("P1PARSLK",56)
                                                                               
^SHP("P1PARSLK","RG")
H
^SHP("P1PARSLKs",1)
                   # zegewl zveaw itl oexign #                                 
^SHP("P1PARSLKs",1,"%TOP")
19
^SHP("P1PARSLKs",2)
                                                                               
^SHP("P1PARSLKs",2,"%TOP")
79
^SHP("P1PARSLKs",3)
                &06                        > &05   >: zegewl zveaw             
^SHP("P1PARSLKs",3,"%TOP")
16
^SHP("P1PARSLKs",4)
          ----------------------------------------------------------
^SHP("P1PARSLKs",4,"%TOP")
10
^SHP("P1PARSLKs",5)
          : gewll xign : libx xign :      hixt xe`z     : hixt cew :           
^SHP("P1PARSLKs",5,"%TOP")
10
^SHP("P1PARSLKs",6)
          ----------------------------------------------------------
^SHP("P1PARSLKs",6,"%TOP")
10
^SHP("P1PARSLKs",7)
          $    99999.99:   99999.99:TTTTTTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("P1PARSLKs",7,"%TOP")
10
^SHP("P1PARSLKs",8)

^SHP("P1PARSLKs",8,"%TOP")
0
^SHP("P1PARSLKs",9)

^SHP("P1PARSLKs",9,"%TOP")
0
^SHP("P1PARSLKs",10)

^SHP("P1PARSLKs",10,"%TOP")
0
^SHP("P1PARSLKs",11)

^SHP("P1PARSLKs",11,"%TOP")
0
^SHP("P1PARSLKs",12)

^SHP("P1PARSLKs",12,"%TOP")
0
^SHP("P1PARSLKs",13)

^SHP("P1PARSLKs",13,"%TOP")
0
^SHP("P1PARSLKs",14)

^SHP("P1PARSLKs",14,"%TOP")
0
^SHP("P1PARSLKs",15)

^SHP("P1PARSLKs",15,"%TOP")
0
^SHP("P1PARSLKs",16)

^SHP("P1PARSLKs",16,"%TOP")
0
^SHP("P1PARSLKs",17)

^SHP("P1PARSLKs",17,"%TOP")
0
^SHP("P1PARSLKs",18)

^SHP("P1PARSLKs",18,"%TOP")
0
^SHP("P1PARSLKs",19)

^SHP("P1PARSLKs",19,"%TOP")
0
^SHP("P1PARSLKs",20)

^SHP("P1PARSLKs",20,"%TOP")
0
^SHP("P1PARSLKs",21)

^SHP("P1PARSLKs",21,"%TOP")
0
^SHP("P1PARSLKs",22)

^SHP("P1PARSLKs",22,"%TOP")
0
^SHP("P1PARSLKs",23)

^SHP("P1PARSLKs",23,"%TOP")
0
^SHP("P1PARSLKs",24)

^SHP("P1PARSLKs",24,"%TOP")
0
^SHP("P1PARSLKs",25)

^SHP("P1PARSLKs",25,"%TOP")
0
^SHP("P1PARSLKs",26)

^SHP("P1PARSLKs",26,"%TOP")
0
^SHP("P1PARSLKs",27)

^SHP("P1PARSLKs",27,"%TOP")
0
^SHP("P1PARSLKs",28)

^SHP("P1PARSLKs",28,"%TOP")
0
^SHP("P1PARSLKs",29)

^SHP("P1PARSLKs",29,"%TOP")
0
^SHP("P1PARSLKs",30)

^SHP("P1PARSLKs",30,"%TOP")
0
^SHP("P1PARSLKs",31)

^SHP("P1PARSLKs",31,"%TOP")
0
^SHP("P1PARSLKs",32)

^SHP("P1PARSLKs",32,"%TOP")
0
^SHP("P1PARSLKs",33)

^SHP("P1PARSLKs",33,"%TOP")
0
^SHP("P1PARSLKs",34)

^SHP("P1PARSLKs",34,"%TOP")
0
^SHP("P1PARSLKs",35)

^SHP("P1PARSLKs",35,"%TOP")
0
^SHP("P1PARSLKs",36)

^SHP("P1PARSLKs",36,"%TOP")
0
^SHP("P1PARSLKs",37)

^SHP("P1PARSLKs",37,"%TOP")
0
^SHP("P1PARSLKs",38)

^SHP("P1PARSLKs",38,"%TOP")
0
^SHP("P1PARSLKs",39)

^SHP("P1PARSLKs",39,"%TOP")
0
^SHP("P1PARSLKs",40)
                                                                  $ 
^SHP("P1PARSLKs",40,"%TOP")
66
^SHP("P1PARSLKs",41)
          ----------------------------------------------------------
^SHP("P1PARSLKs",41,"%TOP")
10
^SHP("P1PARSLKs",42)
                                                                               
^SHP("P1PARSLKs",42,"%TOP")
79
^SHP("P1PARSLKs",43)
                                                                               
^SHP("P1PARSLKs",43,"%TOP")
79
^SHP("P1PARSLKs",44)
                                                                               
^SHP("P1PARSLKs",44,"%TOP")
79
^SHP("P1PARSLKs",45)
                                                                               
^SHP("P1PARSLKs",45,"%TOP")
79
^SHP("P1PARSLKs",46)
                                                                               
^SHP("P1PARSLKs",46,"%TOP")
79
^SHP("P1PARSLKs",47)
                                                                               
^SHP("P1PARSLKs",47,"%TOP")
79
^SHP("P1PARSLKs",48)
                                                                               
^SHP("P1PARSLKs",48,"%TOP")
79
^SHP("P1PARSLKs",49)
                                                                               
^SHP("P1PARSLKs",49,"%TOP")
79
^SHP("P1PARSLKs",50)
                                                                               
^SHP("P1PARSLKs",50,"%TOP")
79
^SHP("P1PARSLKs",51)
                                                                               
^SHP("P1PARSLKs",51,"%TOP")
79
^SHP("P1PARSLKs",52)
                                                                               
^SHP("P1PARSLKs",52,"%TOP")
79
^SHP("P1PARSLKs",53)
                                                                               
^SHP("P1PARSLKs",53,"%TOP")
79
^SHP("P1PARSLKs",54)
                                                                               
^SHP("P1PARSLKs",54,"%TOP")
79
^SHP("P1PARSLKs",55)
                                                                               
^SHP("P1PARSLKs",55,"%TOP")
79
^SHP("P1PARSLKs",56)
                                                                               
^SHP("P1PARSLKs",56,"%TOP")
79
^SHP("P1PARSLKs","RG")
H
^SHP("P1PARTAW")
TAW-l mihixt zeveaw
^SHP("P1PARTAW",1)
 #xidn ogleya dxiknl mihixt zeveaw zniyx#                                      
^SHP("P1PARTAW",2)
                                                                               
^SHP("P1PARTAW",3)
                             ------------------------------------
^SHP("P1PARTAW",4)
                             :       dveaw xtqn     : dveaw cew :              
^SHP("P1PARTAW",5)
                             ------------------------------------
^SHP("P1PARTAW",6)
                             $TTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTT:1
^SHP("P1PARTAW",7)

^SHP("P1PARTAW",8)

^SHP("P1PARTAW",9)

^SHP("P1PARTAW",10)

^SHP("P1PARTAW",11)

^SHP("P1PARTAW",12)

^SHP("P1PARTAW",13)

^SHP("P1PARTAW",14)

^SHP("P1PARTAW",15)

^SHP("P1PARTAW",16)

^SHP("P1PARTAW",17)

^SHP("P1PARTAW",18)

^SHP("P1PARTAW",19)

^SHP("P1PARTAW",20)

^SHP("P1PARTAW",21)

^SHP("P1PARTAW",22)
                                                                               
^SHP("P1PARTAW",23)
                                                                               
^SHP("P1PARTAW",24)
                                                                               
^SHP("P1PARTAW",25)
                                                                               
^SHP("P1PARTAW",26)
                                                                               
^SHP("P1PARTAW",27)
                                                                               
^SHP("P1PARTAW",28)
                                                                               
^SHP("P1PARTAW",29)
                                                                               
^SHP("P1PARTAW",30)

^SHP("P1PARTAW",31)

^SHP("P1PARTAW",32)

^SHP("P1PARTAW",33)

^SHP("P1PARTAW",34)

^SHP("P1PARTAW",35)

^SHP("P1PARTAW",36)

^SHP("P1PARTAW",37)

^SHP("P1PARTAW",38)

^SHP("P1PARTAW",39)

^SHP("P1PARTAW",40)

^SHP("P1PARTAW",41)

^SHP("P1PARTAW",42)
                                                                               
^SHP("P1PARTAW",43)
                                                                               
^SHP("P1PARTAW",44)
                                                                               
^SHP("P1PARTAW",45)
                                                                               
^SHP("P1PARTAW",46)

^SHP("P1PARTAW",47)

^SHP("P1PARTAW",48)

^SHP("P1PARTAW",49)

^SHP("P1PARTAW",50)
                                                                               
^SHP("P1PARTAW",51)

^SHP("P1PARTAW",52)

^SHP("P1PARTAW",53)

^SHP("P1PARTAW",54)
                                                               $ 
^SHP("P1PARTAW",55)
                             ------------------------------------
^SHP("P1PARTAW",56)
                                                                               
^SHP("P1PARTAW","RG")
H
^SHP("P1PARTAWs",1)
       # xidn ogleya dxiknl mihixt zeveaw zniyx #                              
^SHP("P1PARTAWs",1,"%TOP")
7
^SHP("P1PARTAWs",2)
                                                                               
^SHP("P1PARTAWs",2,"%TOP")
79
^SHP("P1PARTAWs",3)
                             ------------------------------------
^SHP("P1PARTAWs",3,"%TOP")
29
^SHP("P1PARTAWs",4)
                             :       dveaw xtqn     : dveaw cew :              
^SHP("P1PARTAWs",4,"%TOP")
29
^SHP("P1PARTAWs",5)
                             ------------------------------------
^SHP("P1PARTAWs",5,"%TOP")
29
^SHP("P1PARTAWs",6)
                             $TTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTT:1
^SHP("P1PARTAWs",6,"%TOP")
29
^SHP("P1PARTAWs",7)

^SHP("P1PARTAWs",7,"%TOP")
0
^SHP("P1PARTAWs",8)

^SHP("P1PARTAWs",8,"%TOP")
0
^SHP("P1PARTAWs",9)

^SHP("P1PARTAWs",9,"%TOP")
0
^SHP("P1PARTAWs",10)

^SHP("P1PARTAWs",10,"%TOP")
0
^SHP("P1PARTAWs",11)

^SHP("P1PARTAWs",11,"%TOP")
0
^SHP("P1PARTAWs",12)

^SHP("P1PARTAWs",12,"%TOP")
0
^SHP("P1PARTAWs",13)

^SHP("P1PARTAWs",13,"%TOP")
0
^SHP("P1PARTAWs",14)

^SHP("P1PARTAWs",14,"%TOP")
0
^SHP("P1PARTAWs",15)

^SHP("P1PARTAWs",15,"%TOP")
0
^SHP("P1PARTAWs",16)

^SHP("P1PARTAWs",16,"%TOP")
0
^SHP("P1PARTAWs",17)

^SHP("P1PARTAWs",17,"%TOP")
0
^SHP("P1PARTAWs",18)

^SHP("P1PARTAWs",18,"%TOP")
0
^SHP("P1PARTAWs",19)

^SHP("P1PARTAWs",19,"%TOP")
0
^SHP("P1PARTAWs",20)

^SHP("P1PARTAWs",20,"%TOP")
0
^SHP("P1PARTAWs",21)

^SHP("P1PARTAWs",21,"%TOP")
0
^SHP("P1PARTAWs",22)

^SHP("P1PARTAWs",22,"%TOP")
0
^SHP("P1PARTAWs",23)

^SHP("P1PARTAWs",23,"%TOP")
0
^SHP("P1PARTAWs",24)

^SHP("P1PARTAWs",24,"%TOP")
0
^SHP("P1PARTAWs",25)

^SHP("P1PARTAWs",25,"%TOP")
0
^SHP("P1PARTAWs",26)

^SHP("P1PARTAWs",26,"%TOP")
0
^SHP("P1PARTAWs",27)

^SHP("P1PARTAWs",27,"%TOP")
0
^SHP("P1PARTAWs",28)

^SHP("P1PARTAWs",28,"%TOP")
0
^SHP("P1PARTAWs",29)

^SHP("P1PARTAWs",29,"%TOP")
0
^SHP("P1PARTAWs",30)

^SHP("P1PARTAWs",30,"%TOP")
0
^SHP("P1PARTAWs",31)

^SHP("P1PARTAWs",31,"%TOP")
0
^SHP("P1PARTAWs",32)

^SHP("P1PARTAWs",32,"%TOP")
0
^SHP("P1PARTAWs",33)

^SHP("P1PARTAWs",33,"%TOP")
0
^SHP("P1PARTAWs",34)

^SHP("P1PARTAWs",34,"%TOP")
0
^SHP("P1PARTAWs",35)

^SHP("P1PARTAWs",35,"%TOP")
0
^SHP("P1PARTAWs",36)

^SHP("P1PARTAWs",36,"%TOP")
0
^SHP("P1PARTAWs",37)

^SHP("P1PARTAWs",37,"%TOP")
0
^SHP("P1PARTAWs",38)

^SHP("P1PARTAWs",38,"%TOP")
0
^SHP("P1PARTAWs",39)

^SHP("P1PARTAWs",39,"%TOP")
0
^SHP("P1PARTAWs",40)

^SHP("P1PARTAWs",40,"%TOP")
0
^SHP("P1PARTAWs",41)
                                                               $ 
^SHP("P1PARTAWs",41,"%TOP")
63
^SHP("P1PARTAWs",42)
                             ------------------------------------
^SHP("P1PARTAWs",42,"%TOP")
29
^SHP("P1PARTAWs",43)
                                                                               
^SHP("P1PARTAWs",43,"%TOP")
79
^SHP("P1PARTAWs",44)
                                                                               
^SHP("P1PARTAWs",44,"%TOP")
79
^SHP("P1PARTAWs",45)
                                                                               
^SHP("P1PARTAWs",45,"%TOP")
79
^SHP("P1PARTAWs",46)
                                                                               
^SHP("P1PARTAWs",46,"%TOP")
79
^SHP("P1PARTAWs",47)
                                                                               
^SHP("P1PARTAWs",47,"%TOP")
79
^SHP("P1PARTAWs",48)
                                                                               
^SHP("P1PARTAWs",48,"%TOP")
79
^SHP("P1PARTAWs",49)
                                                                               
^SHP("P1PARTAWs",49,"%TOP")
79
^SHP("P1PARTAWs",50)
                                                                               
^SHP("P1PARTAWs",50,"%TOP")
79
^SHP("P1PARTAWs",51)
                                                                               
^SHP("P1PARTAWs",51,"%TOP")
79
^SHP("P1PARTAWs",52)
                                                                               
^SHP("P1PARTAWs",52,"%TOP")
79
^SHP("P1PARTAWs",53)
                                                                               
^SHP("P1PARTAWs",53,"%TOP")
79
^SHP("P1PARTAWs",54)
                                                                               
^SHP("P1PARTAWs",54,"%TOP")
79
^SHP("P1PARTAWs",55)
                                                                               
^SHP("P1PARTAWs",55,"%TOP")
79
^SHP("P1PARTAWs",56)
                                                                               
^SHP("P1PARTAWs",56,"%TOP")
79
^SHP("P1PARTAWs","RG")
H
^SHP("P1PMDPs")
zqtcn <- hixt zlah
^SHP("P1PMDPs",1)
                    # mihixtl zeqtcn zlah #                                    
^SHP("P1PMDPs",2)
           &98> sc                                                             
^SHP("P1PMDPs",3)
           ----------------------------------------------------------
^SHP("P1PMDPs",4)
           : rav : zqtcn xe`z :zqtcn 'qn:     hixt xe`z    :hixt cew:          
^SHP("P1PMDPs",5)
           ----------------------------------------------------------
^SHP("P1PMDPs",6)
           $TTTTT:TTTTTTTTTTTT:       99:TTTTTTTTTTTTTTTTTT:99999999:1
^SHP("P1PMDPs",7)

^SHP("P1PMDPs",8)

^SHP("P1PMDPs",9)

^SHP("P1PMDPs",10)

^SHP("P1PMDPs",11)

^SHP("P1PMDPs",12)

^SHP("P1PMDPs",13)

^SHP("P1PMDPs",14)

^SHP("P1PMDPs",15)

^SHP("P1PMDPs",16)

^SHP("P1PMDPs",17)

^SHP("P1PMDPs",18)

^SHP("P1PMDPs",19)

^SHP("P1PMDPs",20)

^SHP("P1PMDPs",21)

^SHP("P1PMDPs",22)

^SHP("P1PMDPs",23)

^SHP("P1PMDPs",24)

^SHP("P1PMDPs",25)

^SHP("P1PMDPs",26)

^SHP("P1PMDPs",27)

^SHP("P1PMDPs",28)

^SHP("P1PMDPs",29)

^SHP("P1PMDPs",30)

^SHP("P1PMDPs",31)

^SHP("P1PMDPs",32)

^SHP("P1PMDPs",33)

^SHP("P1PMDPs",34)

^SHP("P1PMDPs",35)

^SHP("P1PMDPs",36)

^SHP("P1PMDPs",37)

^SHP("P1PMDPs",38)

^SHP("P1PMDPs",39)

^SHP("P1PMDPs",40)

^SHP("P1PMDPs",41)

^SHP("P1PMDPs",42)

^SHP("P1PMDPs",43)

^SHP("P1PMDPs",44)

^SHP("P1PMDPs",45)

^SHP("P1PMDPs",46)

^SHP("P1PMDPs",47)

^SHP("P1PMDPs",48)

^SHP("P1PMDPs",49)

^SHP("P1PMDPs",50)

^SHP("P1PMDPs",51)

^SHP("P1PMDPs",52)

^SHP("P1PMDPs",53)

^SHP("P1PMDPs",54)
                                                                   $ 
^SHP("P1PMDPs",55)
           ----------------------------------------------------------
^SHP("P1PMDPs",56)
                                                                               
^SHP("P1PMDPs","RG")
H
^SHP("P1PSUGs")

^SHP("P1PSUGs",1)
                  # 'hixt beq <- hixt' dlah #                                  
^SHP("P1PSUGs",2)
             &98> sc                                                           
^SHP("P1PSUGs",3)
            --------------------------------------------------------------
^SHP("P1PSUGs",4)
            :     beq xe`z    :hixt beq:       hixt xe`z        :hixt cew:     
^SHP("P1PSUGs",5)
            --------------------------------------------------------------
^SHP("P1PSUGs",6)
            $TTTTTTTTTTTTTTTTT:    9999:TTTTTTTTTTTTTTTTTTTTTTTT:99999999:1
^SHP("P1PSUGs",7)

^SHP("P1PSUGs",8)

^SHP("P1PSUGs",9)

^SHP("P1PSUGs",10)

^SHP("P1PSUGs",11)

^SHP("P1PSUGs",12)

^SHP("P1PSUGs",13)

^SHP("P1PSUGs",14)

^SHP("P1PSUGs",15)

^SHP("P1PSUGs",16)

^SHP("P1PSUGs",17)

^SHP("P1PSUGs",18)

^SHP("P1PSUGs",19)

^SHP("P1PSUGs",20)

^SHP("P1PSUGs",21)

^SHP("P1PSUGs",22)

^SHP("P1PSUGs",23)

^SHP("P1PSUGs",24)

^SHP("P1PSUGs",25)

^SHP("P1PSUGs",26)

^SHP("P1PSUGs",27)

^SHP("P1PSUGs",28)

^SHP("P1PSUGs",29)

^SHP("P1PSUGs",30)

^SHP("P1PSUGs",31)

^SHP("P1PSUGs",32)

^SHP("P1PSUGs",33)

^SHP("P1PSUGs",34)

^SHP("P1PSUGs",35)

^SHP("P1PSUGs",36)

^SHP("P1PSUGs",37)

^SHP("P1PSUGs",38)

^SHP("P1PSUGs",39)

^SHP("P1PSUGs",40)

^SHP("P1PSUGs",41)

^SHP("P1PSUGs",42)

^SHP("P1PSUGs",43)

^SHP("P1PSUGs",44)

^SHP("P1PSUGs",45)

^SHP("P1PSUGs",46)

^SHP("P1PSUGs",47)

^SHP("P1PSUGs",48)

^SHP("P1PSUGs",49)

^SHP("P1PSUGs",50)

^SHP("P1PSUGs",51)

^SHP("P1PSUGs",52)

^SHP("P1PSUGs",53)
                                                                        $ 
^SHP("P1PSUGs",54)
            --------------------------------------------------------------
^SHP("P1PSUGs",55)
                                                                               
^SHP("P1PSUGs",56)
                                                                               
^SHP("P1PSUGs","RG")
H
^SHP("P1SBITs")
milehia zeaiq zlah
^SHP("P1SBITs",1)
                           # milehia zeaiq zlah #                              
^SHP("P1SBITs",2)
                                                                               
^SHP("P1SBITs",3)
                         --------------------------------
^SHP("P1SBITs",4)
                         :  lehia zaiq xe`z  : daiq cew :                      
^SHP("P1SBITs",5)
                         --------------------------------
^SHP("P1SBITs",6)
                         $TTTTTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("P1SBITs",7)

^SHP("P1SBITs",8)

^SHP("P1SBITs",9)

^SHP("P1SBITs",10)

^SHP("P1SBITs",11)

^SHP("P1SBITs",12)

^SHP("P1SBITs",13)

^SHP("P1SBITs",14)

^SHP("P1SBITs",15)

^SHP("P1SBITs",16)

^SHP("P1SBITs",17)

^SHP("P1SBITs",18)

^SHP("P1SBITs",19)

^SHP("P1SBITs",20)

^SHP("P1SBITs",21)

^SHP("P1SBITs",22)

^SHP("P1SBITs",23)

^SHP("P1SBITs",24)

^SHP("P1SBITs",25)

^SHP("P1SBITs",26)

^SHP("P1SBITs",27)

^SHP("P1SBITs",28)

^SHP("P1SBITs",29)

^SHP("P1SBITs",30)

^SHP("P1SBITs",31)

^SHP("P1SBITs",32)

^SHP("P1SBITs",33)

^SHP("P1SBITs",34)

^SHP("P1SBITs",35)

^SHP("P1SBITs",36)

^SHP("P1SBITs",37)

^SHP("P1SBITs",38)

^SHP("P1SBITs",39)

^SHP("P1SBITs",40)

^SHP("P1SBITs",41)

^SHP("P1SBITs",42)

^SHP("P1SBITs",43)

^SHP("P1SBITs",44)

^SHP("P1SBITs",45)

^SHP("P1SBITs",46)

^SHP("P1SBITs",47)

^SHP("P1SBITs",48)

^SHP("P1SBITs",49)

^SHP("P1SBITs",50)

^SHP("P1SBITs",51)

^SHP("P1SBITs",52)

^SHP("P1SBITs",53)
                                                       $ 
^SHP("P1SBITs",54)
                         --------------------------------
^SHP("P1SBITs",55)
                                                                               
^SHP("P1SBITs",56)
                                                                               
^SHP("P1SBITs","RG")
H
^SHP("P1SETAs")
dpnl mihixt hq
^SHP("P1SETAs",1)
                         # dpnl mihixt hq  #                                   
^SHP("P1SETAs",1,"%TOP")
25
^SHP("P1SETAs",2)
                                                                               
^SHP("P1SETAs",2,"%TOP")
79
^SHP("P1SETAs",3)
                  &10                        > &05  > : hq xtqn                
^SHP("P1SETAs",3,"%TOP")
18
^SHP("P1SETAs",4)
                 &15 > ? zegex` zenk xearl leki mihixt k"dq m`d                
^SHP("P1SETAs",4,"%TOP")
17
^SHP("P1SETAs",5)
                    -------------------------------------------
^SHP("P1SETAs",5,"%TOP")
20
^SHP("P1SETAs",6)
                    :           hixt xe`z         : hixt cew  :                
^SHP("P1SETAs",6,"%TOP")
20
^SHP("P1SETAs",7)
                    -------------------------------------------
^SHP("P1SETAs",7,"%TOP")
20
^SHP("P1SETAs",8)
                    $TTTTTTTTTTTTTTTTTTTTTTTTTTTTT:     999999:1
^SHP("P1SETAs",8,"%TOP")
20
^SHP("P1SETAs",9)

^SHP("P1SETAs",9,"%TOP")
0
^SHP("P1SETAs",10)

^SHP("P1SETAs",10,"%TOP")
0
^SHP("P1SETAs",11)

^SHP("P1SETAs",11,"%TOP")
0
^SHP("P1SETAs",12)

^SHP("P1SETAs",12,"%TOP")
0
^SHP("P1SETAs",13)

^SHP("P1SETAs",13,"%TOP")
0
^SHP("P1SETAs",14)

^SHP("P1SETAs",14,"%TOP")
0
^SHP("P1SETAs",15)

^SHP("P1SETAs",15,"%TOP")
0
^SHP("P1SETAs",16)

^SHP("P1SETAs",16,"%TOP")
0
^SHP("P1SETAs",17)

^SHP("P1SETAs",17,"%TOP")
0
^SHP("P1SETAs",18)

^SHP("P1SETAs",18,"%TOP")
0
^SHP("P1SETAs",19)

^SHP("P1SETAs",19,"%TOP")
0
^SHP("P1SETAs",20)

^SHP("P1SETAs",20,"%TOP")
0
^SHP("P1SETAs",21)

^SHP("P1SETAs",21,"%TOP")
0
^SHP("P1SETAs",22)

^SHP("P1SETAs",22,"%TOP")
0
^SHP("P1SETAs",23)

^SHP("P1SETAs",23,"%TOP")
0
^SHP("P1SETAs",24)

^SHP("P1SETAs",24,"%TOP")
0
^SHP("P1SETAs",25)

^SHP("P1SETAs",25,"%TOP")
0
^SHP("P1SETAs",26)

^SHP("P1SETAs",26,"%TOP")
0
^SHP("P1SETAs",27)

^SHP("P1SETAs",27,"%TOP")
0
^SHP("P1SETAs",28)

^SHP("P1SETAs",28,"%TOP")
0
^SHP("P1SETAs",29)

^SHP("P1SETAs",29,"%TOP")
0
^SHP("P1SETAs",30)

^SHP("P1SETAs",30,"%TOP")
0
^SHP("P1SETAs",31)

^SHP("P1SETAs",31,"%TOP")
0
^SHP("P1SETAs",32)

^SHP("P1SETAs",32,"%TOP")
0
^SHP("P1SETAs",33)

^SHP("P1SETAs",33,"%TOP")
0
^SHP("P1SETAs",34)

^SHP("P1SETAs",34,"%TOP")
0
^SHP("P1SETAs",35)

^SHP("P1SETAs",35,"%TOP")
0
^SHP("P1SETAs",36)

^SHP("P1SETAs",36,"%TOP")
0
^SHP("P1SETAs",37)

^SHP("P1SETAs",37,"%TOP")
0
^SHP("P1SETAs",38)

^SHP("P1SETAs",38,"%TOP")
0
^SHP("P1SETAs",39)

^SHP("P1SETAs",39,"%TOP")
0
^SHP("P1SETAs",40)

^SHP("P1SETAs",40,"%TOP")
0
^SHP("P1SETAs",41)

^SHP("P1SETAs",41,"%TOP")
0
^SHP("P1SETAs",42)

^SHP("P1SETAs",42,"%TOP")
0
^SHP("P1SETAs",43)

^SHP("P1SETAs",43,"%TOP")
0
^SHP("P1SETAs",44)

^SHP("P1SETAs",44,"%TOP")
0
^SHP("P1SETAs",45)

^SHP("P1SETAs",45,"%TOP")
0
^SHP("P1SETAs",46)

^SHP("P1SETAs",46,"%TOP")
0
^SHP("P1SETAs",47)

^SHP("P1SETAs",47,"%TOP")
0
^SHP("P1SETAs",48)
                                                                               
^SHP("P1SETAs",48,"%TOP")
79
^SHP("P1SETAs",49)
                                                                               
^SHP("P1SETAs",49,"%TOP")
79
^SHP("P1SETAs",50)
                                                                               
^SHP("P1SETAs",50,"%TOP")
79
^SHP("P1SETAs",51)
                                                                               
^SHP("P1SETAs",51,"%TOP")
79
^SHP("P1SETAs",52)
                                                                               
^SHP("P1SETAs",52,"%TOP")
79
^SHP("P1SETAs",53)

^SHP("P1SETAs",53,"%TOP")
0
^SHP("P1SETAs",54)

^SHP("P1SETAs",54,"%TOP")
0
^SHP("P1SETAs",55)
                                                             $ 
^SHP("P1SETAs",55,"%TOP")
61
^SHP("P1SETAs",56)
                   -------------------------------------------                 
^SHP("P1SETAs",56,"%TOP")
19
^SHP("P1SETAs","RG")
H
^SHP("P1SETMs")
rvanl mihixt hq
^SHP("P1SETMs",1)
                                 # rvanl mihixt hq  #                          
^SHP("P1SETMs",2)
                                                                               
^SHP("P1SETMs",3)
                    &10                        > &05  >:hq xtqn                
^SHP("P1SETMs",4)
        -----------------------------------------------------------------
^SHP("P1SETMs",5)
        :zenk: rvan xign :  xign  :         hixt xe`z       : hixt cew  :      
^SHP("P1SETMs",6)
        -----------------------------------------------------------------
^SHP("P1SETMs",7)
        $ 999:    9999.99: 9999.99:TTTTTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTT:1
^SHP("P1SETMs",8)

^SHP("P1SETMs",9)

^SHP("P1SETMs",10)

^SHP("P1SETMs",11)

^SHP("P1SETMs",12)

^SHP("P1SETMs",13)

^SHP("P1SETMs",14)

^SHP("P1SETMs",15)

^SHP("P1SETMs",16)

^SHP("P1SETMs",17)

^SHP("P1SETMs",18)

^SHP("P1SETMs",19)

^SHP("P1SETMs",20)

^SHP("P1SETMs",21)

^SHP("P1SETMs",22)

^SHP("P1SETMs",23)

^SHP("P1SETMs",24)

^SHP("P1SETMs",25)

^SHP("P1SETMs",26)

^SHP("P1SETMs",27)

^SHP("P1SETMs",28)

^SHP("P1SETMs",29)

^SHP("P1SETMs",30)

^SHP("P1SETMs",31)

^SHP("P1SETMs",32)

^SHP("P1SETMs",33)

^SHP("P1SETMs",34)

^SHP("P1SETMs",35)

^SHP("P1SETMs",36)

^SHP("P1SETMs",37)

^SHP("P1SETMs",38)

^SHP("P1SETMs",39)

^SHP("P1SETMs",40)

^SHP("P1SETMs",41)

^SHP("P1SETMs",42)

^SHP("P1SETMs",43)

^SHP("P1SETMs",44)

^SHP("P1SETMs",45)

^SHP("P1SETMs",46)

^SHP("P1SETMs",47)

^SHP("P1SETMs",48)

^SHP("P1SETMs",49)

^SHP("P1SETMs",50)

^SHP("P1SETMs",51)

^SHP("P1SETMs",52)

^SHP("P1SETMs",53)

^SHP("P1SETMs",54)
                                                                       $ 
^SHP("P1SETMs",55)
        -----------------------------------------------------------------
^SHP("P1SETMs",56)
                                                                               
^SHP("P1SETMs","RG")
H
^SHP("P1SETPs")

^SHP("P1SETPs",1)
                        # dxiknl mihixt hq  #                                  
^SHP("P1SETPs",2)
                                                                               
^SHP("P1SETPs",3)
                  &10                        > &05  > : hq xtqn                
^SHP("P1SETPs",4)
               --------------------------------------------------------
^SHP("P1SETPs",5)
               : okxvl xign :           hixt xe`z         : hixt cew  :        
^SHP("P1SETPs",6)
               --------------------------------------------------------
^SHP("P1SETPs",7)
               $    99999.99:TTTTTTTTTTTTTTTTTTTTTTTTTTTTT:     999999:1
^SHP("P1SETPs",8)

^SHP("P1SETPs",9)

^SHP("P1SETPs",10)

^SHP("P1SETPs",11)

^SHP("P1SETPs",12)

^SHP("P1SETPs",13)

^SHP("P1SETPs",14)

^SHP("P1SETPs",15)

^SHP("P1SETPs",16)

^SHP("P1SETPs",17)

^SHP("P1SETPs",18)

^SHP("P1SETPs",19)

^SHP("P1SETPs",20)

^SHP("P1SETPs",21)

^SHP("P1SETPs",22)

^SHP("P1SETPs",23)

^SHP("P1SETPs",24)

^SHP("P1SETPs",25)

^SHP("P1SETPs",26)

^SHP("P1SETPs",27)

^SHP("P1SETPs",28)

^SHP("P1SETPs",29)

^SHP("P1SETPs",30)

^SHP("P1SETPs",31)

^SHP("P1SETPs",32)

^SHP("P1SETPs",33)

^SHP("P1SETPs",34)

^SHP("P1SETPs",35)

^SHP("P1SETPs",36)

^SHP("P1SETPs",37)

^SHP("P1SETPs",38)

^SHP("P1SETPs",39)

^SHP("P1SETPs",40)

^SHP("P1SETPs",41)

^SHP("P1SETPs",42)

^SHP("P1SETPs",43)

^SHP("P1SETPs",44)

^SHP("P1SETPs",45)

^SHP("P1SETPs",46)

^SHP("P1SETPs",47)

^SHP("P1SETPs",48)

^SHP("P1SETPs",49)

^SHP("P1SETPs",50)

^SHP("P1SETPs",51)

^SHP("P1SETPs",52)

^SHP("P1SETPs",53)

^SHP("P1SETPs",54)
                                                                     $ 
^SHP("P1SETPs",55)
               --------------------------------------------------------
^SHP("P1SETPs",56)
                                                                               
^SHP("P1SETPs","RG")
H
^SHP("P1SHBs")

^SHP("P1SHBs",1)
                        # zeipeayg zxibq #                                     
^SHP("P1SHBs",2)
                              &04                    > &03    >:gewl xtqn      
^SHP("P1SHBs",3)
      &15     >:zeipeayg lr mley k"dq  &10     > mekq  &05    >:dlaw xtqn      
^SHP("P1SHBs",4)
      &20     >:dxzi                                &17       >:    jix`z      
^SHP("P1SHBs",5)
   -------------------------------------------------------------------------
^SHP("P1SHBs",6)
   :  dxzi : k"dq mley :dlawa mley : mcew mley :  mekq :  jix`z  : zipeayg :   
^SHP("P1SHBs",7)
   -------------------------------------------------------------------------
^SHP("P1SHBs",8)
   $9999.99:  999999.99:  999999.99:   99999.99:9999.99: 99999999:TTTTTTTTT:1
^SHP("P1SHBs",9)

^SHP("P1SHBs",10)

^SHP("P1SHBs",11)

^SHP("P1SHBs",12)

^SHP("P1SHBs",13)

^SHP("P1SHBs",14)

^SHP("P1SHBs",15)

^SHP("P1SHBs",16)

^SHP("P1SHBs",17)

^SHP("P1SHBs",18)

^SHP("P1SHBs",19)

^SHP("P1SHBs",20)

^SHP("P1SHBs",21)

^SHP("P1SHBs",22)

^SHP("P1SHBs",23)

^SHP("P1SHBs",24)

^SHP("P1SHBs",25)

^SHP("P1SHBs",26)

^SHP("P1SHBs",27)

^SHP("P1SHBs",28)

^SHP("P1SHBs",29)

^SHP("P1SHBs",30)

^SHP("P1SHBs",31)

^SHP("P1SHBs",32)

^SHP("P1SHBs",33)

^SHP("P1SHBs",34)

^SHP("P1SHBs",35)

^SHP("P1SHBs",36)

^SHP("P1SHBs",37)

^SHP("P1SHBs",38)

^SHP("P1SHBs",39)

^SHP("P1SHBs",40)

^SHP("P1SHBs",41)

^SHP("P1SHBs",42)

^SHP("P1SHBs",43)

^SHP("P1SHBs",44)

^SHP("P1SHBs",45)

^SHP("P1SHBs",46)

^SHP("P1SHBs",47)

^SHP("P1SHBs",48)

^SHP("P1SHBs",49)

^SHP("P1SHBs",50)

^SHP("P1SHBs",51)

^SHP("P1SHBs",52)

^SHP("P1SHBs",53)

^SHP("P1SHBs",54)
                                                                          $ 
^SHP("P1SHBs",55)
   -------------------------------------------------------------------------
^SHP("P1SHBs",56)
                                                                               
^SHP("P1SHBs",57)
  zfkexn i`ln zipeayg - 'M' , i`lndn dxiyi zipeayg - '<' , zipci zipeayg - '+' 
^SHP("P1SHBs","RG")
H
^SHP("P1SLs")
migily zlah
^SHP("P1SLs",1)
                                    # migily zlah #                            
^SHP("P1SLs",2)
                                                                               
^SHP("P1SLs",3)
                           ----------------------------------
^SHP("P1SLs",4)
                           :       gily  my      : gily 'qn :                  
^SHP("P1SLs",5)
                           ----------------------------------
^SHP("P1SLs",6)
                           $TTTTTTTTTTTTTTTTTTTTT:      9999:1
^SHP("P1SLs",7)

^SHP("P1SLs",8)

^SHP("P1SLs",9)

^SHP("P1SLs",10)

^SHP("P1SLs",11)

^SHP("P1SLs",12)

^SHP("P1SLs",13)

^SHP("P1SLs",14)

^SHP("P1SLs",15)

^SHP("P1SLs",16)

^SHP("P1SLs",17)

^SHP("P1SLs",18)

^SHP("P1SLs",19)

^SHP("P1SLs",20)

^SHP("P1SLs",21)

^SHP("P1SLs",22)

^SHP("P1SLs",23)

^SHP("P1SLs",24)

^SHP("P1SLs",25)

^SHP("P1SLs",26)

^SHP("P1SLs",27)

^SHP("P1SLs",28)

^SHP("P1SLs",29)

^SHP("P1SLs",30)

^SHP("P1SLs",31)

^SHP("P1SLs",32)

^SHP("P1SLs",33)

^SHP("P1SLs",34)

^SHP("P1SLs",35)

^SHP("P1SLs",36)

^SHP("P1SLs",37)

^SHP("P1SLs",38)

^SHP("P1SLs",39)

^SHP("P1SLs",40)

^SHP("P1SLs",41)

^SHP("P1SLs",42)

^SHP("P1SLs",43)

^SHP("P1SLs",44)

^SHP("P1SLs",45)

^SHP("P1SLs",46)

^SHP("P1SLs",47)

^SHP("P1SLs",48)

^SHP("P1SLs",49)

^SHP("P1SLs",50)

^SHP("P1SLs",51)

^SHP("P1SLs",52)

^SHP("P1SLs",53)
                                                           $ 
^SHP("P1SLs",54)
                           ----------------------------------
^SHP("P1SLs",55)
                                                                               
^SHP("P1SLs","RG")
H
^SHP("P1SMSs")
dcqin zepnfd zxibq
^SHP("P1SMSs",1)
                              # zepnfd zxibq #                                 
^SHP("P1SMSs",1,"%TOP")
30
^SHP("P1SMSs",2)
                                                                               
^SHP("P1SMSs",2,"%TOP")
79
^SHP("P1SMSs",3)
          &15                    >:xvln my &10 >:xvln 'qn &05      > jix`z     
^SHP("P1SMSs",3,"%TOP")
10
^SHP("P1SMSs",4)
    &25      >:minelyz k"dq  #&20      >#:dxzi k"dq                            
^SHP("P1SMSs",4,"%TOP")
4
^SHP("P1SMSs",5)
          -------------------------------------------------------------------
^SHP("P1SMSs",5,"%TOP")
10
^SHP("P1SMSs",6)
          :          ogley   : melyz:z beq: dxzi : dtwd : mley :melyzl:dpnfd:  
^SHP("P1SMSs",6,"%TOP")
10
^SHP("P1SMSs",7)
          -------------------------------------------------------------------
^SHP("P1SMSs",7,"%TOP")
10
^SHP("P1SMSs",8)
          $TTTTTTTTTTTTTTTTTT:999.99:    9:999.99:999.99:999.99:999.99:99999:1
^SHP("P1SMSs",8,"%TOP")
10
^SHP("P1SMSs",9)

^SHP("P1SMSs",9,"%TOP")
0
^SHP("P1SMSs",10)

^SHP("P1SMSs",10,"%TOP")
0
^SHP("P1SMSs",11)

^SHP("P1SMSs",11,"%TOP")
0
^SHP("P1SMSs",12)

^SHP("P1SMSs",12,"%TOP")
0
^SHP("P1SMSs",13)

^SHP("P1SMSs",13,"%TOP")
0
^SHP("P1SMSs",14)

^SHP("P1SMSs",14,"%TOP")
0
^SHP("P1SMSs",15)

^SHP("P1SMSs",15,"%TOP")
0
^SHP("P1SMSs",16)

^SHP("P1SMSs",16,"%TOP")
0
^SHP("P1SMSs",17)

^SHP("P1SMSs",17,"%TOP")
0
^SHP("P1SMSs",18)

^SHP("P1SMSs",18,"%TOP")
0
^SHP("P1SMSs",19)

^SHP("P1SMSs",19,"%TOP")
0
^SHP("P1SMSs",20)

^SHP("P1SMSs",20,"%TOP")
0
^SHP("P1SMSs",21)

^SHP("P1SMSs",21,"%TOP")
0
^SHP("P1SMSs",22)

^SHP("P1SMSs",22,"%TOP")
0
^SHP("P1SMSs",23)

^SHP("P1SMSs",23,"%TOP")
0
^SHP("P1SMSs",24)

^SHP("P1SMSs",24,"%TOP")
0
^SHP("P1SMSs",25)

^SHP("P1SMSs",25,"%TOP")
0
^SHP("P1SMSs",26)

^SHP("P1SMSs",26,"%TOP")
0
^SHP("P1SMSs",27)

^SHP("P1SMSs",27,"%TOP")
0
^SHP("P1SMSs",28)

^SHP("P1SMSs",28,"%TOP")
0
^SHP("P1SMSs",29)

^SHP("P1SMSs",29,"%TOP")
0
^SHP("P1SMSs",30)

^SHP("P1SMSs",30,"%TOP")
0
^SHP("P1SMSs",31)

^SHP("P1SMSs",31,"%TOP")
0
^SHP("P1SMSs",32)

^SHP("P1SMSs",32,"%TOP")
0
^SHP("P1SMSs",33)

^SHP("P1SMSs",33,"%TOP")
0
^SHP("P1SMSs",34)

^SHP("P1SMSs",34,"%TOP")
0
^SHP("P1SMSs",35)

^SHP("P1SMSs",35,"%TOP")
0
^SHP("P1SMSs",36)

^SHP("P1SMSs",36,"%TOP")
0
^SHP("P1SMSs",37)

^SHP("P1SMSs",37,"%TOP")
0
^SHP("P1SMSs",38)

^SHP("P1SMSs",38,"%TOP")
0
^SHP("P1SMSs",39)

^SHP("P1SMSs",39,"%TOP")
0
^SHP("P1SMSs",40)

^SHP("P1SMSs",40,"%TOP")
0
^SHP("P1SMSs",41)

^SHP("P1SMSs",41,"%TOP")
0
^SHP("P1SMSs",42)

^SHP("P1SMSs",42,"%TOP")
0
^SHP("P1SMSs",43)

^SHP("P1SMSs",43,"%TOP")
0
^SHP("P1SMSs",44)

^SHP("P1SMSs",44,"%TOP")
0
^SHP("P1SMSs",45)

^SHP("P1SMSs",45,"%TOP")
0
^SHP("P1SMSs",46)

^SHP("P1SMSs",46,"%TOP")
0
^SHP("P1SMSs",47)

^SHP("P1SMSs",47,"%TOP")
0
^SHP("P1SMSs",48)

^SHP("P1SMSs",48,"%TOP")
0
^SHP("P1SMSs",49)

^SHP("P1SMSs",49,"%TOP")
0
^SHP("P1SMSs",50)

^SHP("P1SMSs",50,"%TOP")
0
^SHP("P1SMSs",51)

^SHP("P1SMSs",51,"%TOP")
0
^SHP("P1SMSs",52)

^SHP("P1SMSs",52,"%TOP")
0
^SHP("P1SMSs",53)

^SHP("P1SMSs",53,"%TOP")
0
^SHP("P1SMSs",54)
                                                                           $ 
^SHP("P1SMSs",54,"%TOP")
75
^SHP("P1SMSs",55)
          -------------------------------------------------------------------
^SHP("P1SMSs",55,"%TOP")
10
^SHP("P1SMSs",56)
                                                                               
^SHP("P1SMSs",56,"%TOP")
79
^SHP("P1SMSs","RG")
H
^SHP("P1SPTLHs")
miyelzl zegpd zlah
^SHP("P1SPTLHs",1)
                        # miyelzl zegpd zlah #                                 
^SHP("P1SPTLHs",1,"%TOP")
24
^SHP("P1SPTLHs",2)
                   -------------------------------------------------
^SHP("P1SPTLHs",2,"%TOP")
19
^SHP("P1SPTLHs",3)
                   : dgpd :  xign  :      hixt xe`z     : hixt cew :           
^SHP("P1SPTLHs",3,"%TOP")
19
^SHP("P1SPTLHs",4)
                   -------------------------------------------------
^SHP("P1SPTLHs",4,"%TOP")
19
^SHP("P1SPTLHs",5)
                   $999.99:99999.99:TTTTTTTTTTTTTTTTTTTT:  99999999:1
^SHP("P1SPTLHs",5,"%TOP")
19
^SHP("P1SPTLHs",6)

^SHP("P1SPTLHs",6,"%TOP")
0
^SHP("P1SPTLHs",7)

^SHP("P1SPTLHs",7,"%TOP")
0
^SHP("P1SPTLHs",8)

^SHP("P1SPTLHs",8,"%TOP")
0
^SHP("P1SPTLHs",9)

^SHP("P1SPTLHs",9,"%TOP")
0
^SHP("P1SPTLHs",10)

^SHP("P1SPTLHs",10,"%TOP")
0
^SHP("P1SPTLHs",11)

^SHP("P1SPTLHs",11,"%TOP")
0
^SHP("P1SPTLHs",12)

^SHP("P1SPTLHs",12,"%TOP")
0
^SHP("P1SPTLHs",13)

^SHP("P1SPTLHs",13,"%TOP")
0
^SHP("P1SPTLHs",14)

^SHP("P1SPTLHs",14,"%TOP")
0
^SHP("P1SPTLHs",15)

^SHP("P1SPTLHs",15,"%TOP")
0
^SHP("P1SPTLHs",16)

^SHP("P1SPTLHs",16,"%TOP")
0
^SHP("P1SPTLHs",17)

^SHP("P1SPTLHs",17,"%TOP")
0
^SHP("P1SPTLHs",18)

^SHP("P1SPTLHs",18,"%TOP")
0
^SHP("P1SPTLHs",19)

^SHP("P1SPTLHs",19,"%TOP")
0
^SHP("P1SPTLHs",20)

^SHP("P1SPTLHs",20,"%TOP")
0
^SHP("P1SPTLHs",21)

^SHP("P1SPTLHs",21,"%TOP")
0
^SHP("P1SPTLHs",22)

^SHP("P1SPTLHs",22,"%TOP")
0
^SHP("P1SPTLHs",23)

^SHP("P1SPTLHs",23,"%TOP")
0
^SHP("P1SPTLHs",24)

^SHP("P1SPTLHs",24,"%TOP")
0
^SHP("P1SPTLHs",25)

^SHP("P1SPTLHs",25,"%TOP")
0
^SHP("P1SPTLHs",26)

^SHP("P1SPTLHs",26,"%TOP")
0
^SHP("P1SPTLHs",27)

^SHP("P1SPTLHs",27,"%TOP")
0
^SHP("P1SPTLHs",28)

^SHP("P1SPTLHs",28,"%TOP")
0
^SHP("P1SPTLHs",29)

^SHP("P1SPTLHs",29,"%TOP")
0
^SHP("P1SPTLHs",30)

^SHP("P1SPTLHs",30,"%TOP")
0
^SHP("P1SPTLHs",31)

^SHP("P1SPTLHs",31,"%TOP")
0
^SHP("P1SPTLHs",32)

^SHP("P1SPTLHs",32,"%TOP")
0
^SHP("P1SPTLHs",33)

^SHP("P1SPTLHs",33,"%TOP")
0
^SHP("P1SPTLHs",34)

^SHP("P1SPTLHs",34,"%TOP")
0
^SHP("P1SPTLHs",35)

^SHP("P1SPTLHs",35,"%TOP")
0
^SHP("P1SPTLHs",36)

^SHP("P1SPTLHs",36,"%TOP")
0
^SHP("P1SPTLHs",37)

^SHP("P1SPTLHs",37,"%TOP")
0
^SHP("P1SPTLHs",38)

^SHP("P1SPTLHs",38,"%TOP")
0
^SHP("P1SPTLHs",39)

^SHP("P1SPTLHs",39,"%TOP")
0
^SHP("P1SPTLHs",40)

^SHP("P1SPTLHs",40,"%TOP")
0
^SHP("P1SPTLHs",41)

^SHP("P1SPTLHs",41,"%TOP")
0
^SHP("P1SPTLHs",42)

^SHP("P1SPTLHs",42,"%TOP")
0
^SHP("P1SPTLHs",43)

^SHP("P1SPTLHs",43,"%TOP")
0
^SHP("P1SPTLHs",44)

^SHP("P1SPTLHs",44,"%TOP")
0
^SHP("P1SPTLHs",45)

^SHP("P1SPTLHs",45,"%TOP")
0
^SHP("P1SPTLHs",46)

^SHP("P1SPTLHs",46,"%TOP")
0
^SHP("P1SPTLHs",47)

^SHP("P1SPTLHs",47,"%TOP")
0
^SHP("P1SPTLHs",48)

^SHP("P1SPTLHs",48,"%TOP")
0
^SHP("P1SPTLHs",49)

^SHP("P1SPTLHs",49,"%TOP")
0
^SHP("P1SPTLHs",50)

^SHP("P1SPTLHs",50,"%TOP")
0
^SHP("P1SPTLHs",51)

^SHP("P1SPTLHs",51,"%TOP")
0
^SHP("P1SPTLHs",52)
                                                                  $ 
^SHP("P1SPTLHs",52,"%TOP")
66
^SHP("P1SPTLHs",53)
                   -------------------------------------------------
^SHP("P1SPTLHs",53,"%TOP")
19
^SHP("P1SPTLHs",54)
                                                                               
^SHP("P1SPTLHs",54,"%TOP")
79
^SHP("P1SPTLHs","RG")
H
^SHP("P1Ss")
migily zxibq
^SHP("P1Ss",1)
                              # zepnfd zxibq #                                 
^SHP("P1Ss",1,"%TOP")
30
^SHP("P1Ss",2)
                                                                               
^SHP("P1Ss",2,"%TOP")
79
^SHP("P1Ss",3)
      &15                        >:gily my &10 >:gily 'qn &05      > jix`z     
^SHP("P1Ss",3,"%TOP")
6
^SHP("P1Ss",4)
  ---------------------------------------------------------------------------
^SHP("P1Ss",4,"%TOP")
2
^SHP("P1Ss",5)
  :melyz 'z:     gewl my   : melyz:z beq: dxzi : dtwd : mley :melyzl: dpnfd :  
^SHP("P1Ss",5,"%TOP")
2
^SHP("P1Ss",6)
  ---------------------------------------------------------------------------
^SHP("P1Ss",6,"%TOP")
2
^SHP("P1Ss",7)
  $99999999:TTTTTTTTTTTTTTT:999.99:TTTTT:999.99:999.99:999.99:999.99:TTTTTTT:1
^SHP("P1Ss",7,"%TOP")
2
^SHP("P1Ss",8)

^SHP("P1Ss",8,"%TOP")
0
^SHP("P1Ss",9)

^SHP("P1Ss",9,"%TOP")
0
^SHP("P1Ss",10)

^SHP("P1Ss",10,"%TOP")
0
^SHP("P1Ss",11)

^SHP("P1Ss",11,"%TOP")
0
^SHP("P1Ss",12)

^SHP("P1Ss",12,"%TOP")
0
^SHP("P1Ss",13)

^SHP("P1Ss",13,"%TOP")
0
^SHP("P1Ss",14)

^SHP("P1Ss",14,"%TOP")
0
^SHP("P1Ss",15)

^SHP("P1Ss",15,"%TOP")
0
^SHP("P1Ss",16)

^SHP("P1Ss",16,"%TOP")
0
^SHP("P1Ss",17)

^SHP("P1Ss",17,"%TOP")
0
^SHP("P1Ss",18)

^SHP("P1Ss",18,"%TOP")
0
^SHP("P1Ss",19)

^SHP("P1Ss",19,"%TOP")
0
^SHP("P1Ss",20)

^SHP("P1Ss",20,"%TOP")
0
^SHP("P1Ss",21)

^SHP("P1Ss",21,"%TOP")
0
^SHP("P1Ss",22)

^SHP("P1Ss",22,"%TOP")
0
^SHP("P1Ss",23)

^SHP("P1Ss",23,"%TOP")
0
^SHP("P1Ss",24)

^SHP("P1Ss",24,"%TOP")
0
^SHP("P1Ss",25)

^SHP("P1Ss",25,"%TOP")
0
^SHP("P1Ss",26)

^SHP("P1Ss",26,"%TOP")
0
^SHP("P1Ss",27)

^SHP("P1Ss",27,"%TOP")
0
^SHP("P1Ss",28)

^SHP("P1Ss",28,"%TOP")
0
^SHP("P1Ss",29)

^SHP("P1Ss",29,"%TOP")
0
^SHP("P1Ss",30)

^SHP("P1Ss",30,"%TOP")
0
^SHP("P1Ss",31)

^SHP("P1Ss",31,"%TOP")
0
^SHP("P1Ss",32)

^SHP("P1Ss",32,"%TOP")
0
^SHP("P1Ss",33)

^SHP("P1Ss",33,"%TOP")
0
^SHP("P1Ss",34)

^SHP("P1Ss",34,"%TOP")
0
^SHP("P1Ss",35)

^SHP("P1Ss",35,"%TOP")
0
^SHP("P1Ss",36)

^SHP("P1Ss",36,"%TOP")
0
^SHP("P1Ss",37)

^SHP("P1Ss",37,"%TOP")
0
^SHP("P1Ss",38)

^SHP("P1Ss",38,"%TOP")
0
^SHP("P1Ss",39)

^SHP("P1Ss",39,"%TOP")
0
^SHP("P1Ss",40)

^SHP("P1Ss",40,"%TOP")
0
^SHP("P1Ss",41)

^SHP("P1Ss",41,"%TOP")
0
^SHP("P1Ss",42)

^SHP("P1Ss",42,"%TOP")
0
^SHP("P1Ss",43)

^SHP("P1Ss",43,"%TOP")
0
^SHP("P1Ss",44)

^SHP("P1Ss",44,"%TOP")
0
^SHP("P1Ss",45)

^SHP("P1Ss",45,"%TOP")
0
^SHP("P1Ss",46)

^SHP("P1Ss",46,"%TOP")
0
^SHP("P1Ss",47)

^SHP("P1Ss",47,"%TOP")
0
^SHP("P1Ss",48)

^SHP("P1Ss",48,"%TOP")
0
^SHP("P1Ss",49)

^SHP("P1Ss",49,"%TOP")
0
^SHP("P1Ss",50)
                                                                           $ 
^SHP("P1Ss",50,"%TOP")
75
^SHP("P1Ss",51)
  ---------------------------------------------------------------------------
^SHP("P1Ss",51,"%TOP")
2
^SHP("P1Ss",52)
 &50     > dtwd &45    > yelz &40     > `"k &35     > wiy &30     > onefn 'lyzl
^SHP("P1Ss",52,"%TOP")
1
^SHP("P1Ss",53)
 &80     > dtwd &75    > yelz &70     > `"k &65     > wiy &60     > onefn  mley
^SHP("P1Ss",53,"%TOP")
1
^SHP("P1Ss",54)
 &90     > dtwd &88    > yelz &86     > `"k &84     > wiy &82     > onefn iekif
^SHP("P1Ss",54,"%TOP")
1
^SHP("P1Ss",55)
                                                                               
^SHP("P1Ss",55,"%TOP")
79
^SHP("P1Ss",56)
 &97  >:tih &98     >:dxzi &96     >:iekif &94     >:mley &92     >:melyzl k"dq
^SHP("P1Ss",56,"%TOP")
1
^SHP("P1Ss","RG")
H
^SHP("P1TAVDs")
dcear zipkez
^SHP("P1TAVDs",1)
                                  # dcear zipkez #                             
^SHP("P1TAVDs",2)
                                                                               
^SHP("P1TAVDs",3)
                                         &10 > mei   &05     >: jix`z          
^SHP("P1TAVDs",4)
           -----------------------------------------------------------------
^SHP("P1TAVDs",5)
           :       dxrd     : dry cr : dryn :        caer my      :caer 'qn:   
^SHP("P1TAVDs",6)
           -----------------------------------------------------------------
^SHP("P1TAVDs",7)
           $TTTTTTTTTTTTTTTT:   99999: 99999:TTTTTTTTTTTTTTTTTTTTT:   99999:1
^SHP("P1TAVDs",8)

^SHP("P1TAVDs",9)

^SHP("P1TAVDs",10)

^SHP("P1TAVDs",11)

^SHP("P1TAVDs",12)

^SHP("P1TAVDs",13)

^SHP("P1TAVDs",14)

^SHP("P1TAVDs",15)

^SHP("P1TAVDs",16)

^SHP("P1TAVDs",17)

^SHP("P1TAVDs",18)

^SHP("P1TAVDs",19)

^SHP("P1TAVDs",20)

^SHP("P1TAVDs",21)

^SHP("P1TAVDs",22)

^SHP("P1TAVDs",23)

^SHP("P1TAVDs",24)

^SHP("P1TAVDs",25)

^SHP("P1TAVDs",26)

^SHP("P1TAVDs",27)

^SHP("P1TAVDs",28)

^SHP("P1TAVDs",29)

^SHP("P1TAVDs",30)

^SHP("P1TAVDs",31)

^SHP("P1TAVDs",32)

^SHP("P1TAVDs",33)

^SHP("P1TAVDs",34)

^SHP("P1TAVDs",35)

^SHP("P1TAVDs",36)

^SHP("P1TAVDs",37)

^SHP("P1TAVDs",38)

^SHP("P1TAVDs",39)

^SHP("P1TAVDs",40)

^SHP("P1TAVDs",41)

^SHP("P1TAVDs",42)

^SHP("P1TAVDs",43)

^SHP("P1TAVDs",44)

^SHP("P1TAVDs",45)

^SHP("P1TAVDs",46)

^SHP("P1TAVDs",47)

^SHP("P1TAVDs",48)

^SHP("P1TAVDs",49)

^SHP("P1TAVDs",50)

^SHP("P1TAVDs",51)

^SHP("P1TAVDs",52)

^SHP("P1TAVDs",53)

^SHP("P1TAVDs",54)
                                                                          $ 
^SHP("P1TAVDs",55)
           -----------------------------------------------------------------
^SHP("P1TAVDs",56)
                                                                               
^SHP("P1TAVDs","RG")
H
^SHP("P1TIPDOH")
mitih aeyigl g"ec
^SHP("P1TIPDOH",1)
                                                                               
^SHP("P1TIPDOH",2)
                                       &10      : jix`z cr  &5     >>: jix`zn  
^SHP("P1TIPDOH",3)
                                        &25 >: dry cr  &20 >:dryn dcear zligz  
^SHP("P1TIPDOH",4)
 &38     >:dryl zxekyn    &35 >: zexy incdn dcxed %    &30 >: mitihdn dcxed %  
^SHP("P1TIPDOH",5)
  ----------------------------------------------------------------------------
^SHP("P1TIPDOH",6)
  : cwted: dnlyd :  zxekyn:itl dqpkd: zery:zexy inc:  tih  :  caer my  :  'qn: 
^SHP("P1TIPDOH",7)
  : dtewa:       :zery itl: ehp zery:dcear:        :       :           : caer: 
^SHP("P1TIPDOH",8)
  ----------------------------------------------------------------------------
^SHP("P1TIPDOH",9)
  $999.99:9999.99:99999.99:  9999.99:99.99: 9999.99:9999.99:TTTTTTTTTTT:TTTTT:1
^SHP("P1TIPDOH",10)

^SHP("P1TIPDOH",11)

^SHP("P1TIPDOH",12)

^SHP("P1TIPDOH",13)

^SHP("P1TIPDOH",14)

^SHP("P1TIPDOH",15)

^SHP("P1TIPDOH",16)

^SHP("P1TIPDOH",17)

^SHP("P1TIPDOH",18)

^SHP("P1TIPDOH",19)

^SHP("P1TIPDOH",20)

^SHP("P1TIPDOH",21)

^SHP("P1TIPDOH",22)

^SHP("P1TIPDOH",23)

^SHP("P1TIPDOH",24)

^SHP("P1TIPDOH",25)

^SHP("P1TIPDOH",26)

^SHP("P1TIPDOH",27)

^SHP("P1TIPDOH",28)

^SHP("P1TIPDOH",29)

^SHP("P1TIPDOH",30)

^SHP("P1TIPDOH",31)

^SHP("P1TIPDOH",32)

^SHP("P1TIPDOH",33)

^SHP("P1TIPDOH",34)

^SHP("P1TIPDOH",35)

^SHP("P1TIPDOH",36)

^SHP("P1TIPDOH",37)

^SHP("P1TIPDOH",38)

^SHP("P1TIPDOH",39)

^SHP("P1TIPDOH",40)
                                                                               
^SHP("P1TIPDOH",41)
                                                                               
^SHP("P1TIPDOH",42)
                                                                               
^SHP("P1TIPDOH",43)
                                                                               
^SHP("P1TIPDOH",44)
                                                                               
^SHP("P1TIPDOH",45)
                                                                               
^SHP("P1TIPDOH",46)
                                                                               
^SHP("P1TIPDOH",47)
                                                                               
^SHP("P1TIPDOH",48)
                                                                               
^SHP("P1TIPDOH",49)
                                                                               
^SHP("P1TIPDOH",50)
                                                                               
^SHP("P1TIPDOH",51)
                                                                               
^SHP("P1TIPDOH",52)

^SHP("P1TIPDOH",53)
                                                                            $ 
^SHP("P1TIPDOH",54)
  ----------------------------------------------------------------------------
^SHP("P1TIPDOH",55)
 &65   > &60    > &55    > &50    >&45   >&43    >&40    >                     
^SHP("P1TIPDOH","RG")
H
^SHP("P1TIPDOHs",1)
                                                                               
^SHP("P1TIPDOHs",1,"%TOP")
79
^SHP("P1TIPDOHs",2)
                                       &10      : jix`z cr  &5     >>: jix`zn  
^SHP("P1TIPDOHs",2,"%TOP")
39
^SHP("P1TIPDOHs",3)
                                        &25 >: dry cr  &20 >:dryn dcear zligz  
^SHP("P1TIPDOHs",3,"%TOP")
40
^SHP("P1TIPDOHs",4)
 &38     >:dryl zxekyn    &35 >: zexy incdn dcxed %    &30 >: mitihdn dcxed %  
^SHP("P1TIPDOHs",4,"%TOP")
1
^SHP("P1TIPDOHs",5)
  ----------------------------------------------------------------------------
^SHP("P1TIPDOHs",5,"%TOP")
2
^SHP("P1TIPDOHs",6)
  : cwted: dnlyd :  zxekyn:itl dqpkd: zery:zexy inc:  tih  :  caer my  :  'qn: 
^SHP("P1TIPDOHs",6,"%TOP")
2
^SHP("P1TIPDOHs",7)
  : dtewa:       :zery itl: ehp zery:dcear:        :       :           : caer: 
^SHP("P1TIPDOHs",7,"%TOP")
2
^SHP("P1TIPDOHs",8)
  ----------------------------------------------------------------------------
^SHP("P1TIPDOHs",8,"%TOP")
2
^SHP("P1TIPDOHs",9)
  $999.99:9999.99:99999.99:  9999.99:99.99: 9999.99:9999.99:TTTTTTTTTTT:TTTTT:1
^SHP("P1TIPDOHs",9,"%TOP")
2
^SHP("P1TIPDOHs",10)

^SHP("P1TIPDOHs",10,"%TOP")
0
^SHP("P1TIPDOHs",11)

^SHP("P1TIPDOHs",11,"%TOP")
0
^SHP("P1TIPDOHs",12)

^SHP("P1TIPDOHs",12,"%TOP")
0
^SHP("P1TIPDOHs",13)

^SHP("P1TIPDOHs",13,"%TOP")
0
^SHP("P1TIPDOHs",14)

^SHP("P1TIPDOHs",14,"%TOP")
0
^SHP("P1TIPDOHs",15)

^SHP("P1TIPDOHs",15,"%TOP")
0
^SHP("P1TIPDOHs",16)

^SHP("P1TIPDOHs",16,"%TOP")
0
^SHP("P1TIPDOHs",17)

^SHP("P1TIPDOHs",17,"%TOP")
0
^SHP("P1TIPDOHs",18)

^SHP("P1TIPDOHs",18,"%TOP")
0
^SHP("P1TIPDOHs",19)

^SHP("P1TIPDOHs",19,"%TOP")
0
^SHP("P1TIPDOHs",20)

^SHP("P1TIPDOHs",20,"%TOP")
0
^SHP("P1TIPDOHs",21)

^SHP("P1TIPDOHs",21,"%TOP")
0
^SHP("P1TIPDOHs",22)

^SHP("P1TIPDOHs",22,"%TOP")
0
^SHP("P1TIPDOHs",23)

^SHP("P1TIPDOHs",23,"%TOP")
0
^SHP("P1TIPDOHs",24)

^SHP("P1TIPDOHs",24,"%TOP")
0
^SHP("P1TIPDOHs",25)

^SHP("P1TIPDOHs",25,"%TOP")
0
^SHP("P1TIPDOHs",26)

^SHP("P1TIPDOHs",26,"%TOP")
0
^SHP("P1TIPDOHs",27)

^SHP("P1TIPDOHs",27,"%TOP")
0
^SHP("P1TIPDOHs",28)

^SHP("P1TIPDOHs",28,"%TOP")
0
^SHP("P1TIPDOHs",29)

^SHP("P1TIPDOHs",29,"%TOP")
0
^SHP("P1TIPDOHs",30)

^SHP("P1TIPDOHs",30,"%TOP")
0
^SHP("P1TIPDOHs",31)

^SHP("P1TIPDOHs",31,"%TOP")
0
^SHP("P1TIPDOHs",32)

^SHP("P1TIPDOHs",32,"%TOP")
0
^SHP("P1TIPDOHs",33)

^SHP("P1TIPDOHs",33,"%TOP")
0
^SHP("P1TIPDOHs",34)

^SHP("P1TIPDOHs",34,"%TOP")
0
^SHP("P1TIPDOHs",35)

^SHP("P1TIPDOHs",35,"%TOP")
0
^SHP("P1TIPDOHs",36)

^SHP("P1TIPDOHs",36,"%TOP")
0
^SHP("P1TIPDOHs",37)

^SHP("P1TIPDOHs",37,"%TOP")
0
^SHP("P1TIPDOHs",38)

^SHP("P1TIPDOHs",38,"%TOP")
0
^SHP("P1TIPDOHs",39)

^SHP("P1TIPDOHs",39,"%TOP")
0
^SHP("P1TIPDOHs",40)

^SHP("P1TIPDOHs",40,"%TOP")
0
^SHP("P1TIPDOHs",41)
                                                                            $ 
^SHP("P1TIPDOHs",41,"%TOP")
76
^SHP("P1TIPDOHs",42)
  ----------------------------------------------------------------------------
^SHP("P1TIPDOHs",42,"%TOP")
2
^SHP("P1TIPDOHs",43)
                                                                               
^SHP("P1TIPDOHs",43,"%TOP")
79
^SHP("P1TIPDOHs",44)
                                                                               
^SHP("P1TIPDOHs",44,"%TOP")
79
^SHP("P1TIPDOHs",45)
                                                                               
^SHP("P1TIPDOHs",45,"%TOP")
79
^SHP("P1TIPDOHs",46)
                                                                               
^SHP("P1TIPDOHs",46,"%TOP")
79
^SHP("P1TIPDOHs",47)
                                                                               
^SHP("P1TIPDOHs",47,"%TOP")
79
^SHP("P1TIPDOHs",48)
                                                                               
^SHP("P1TIPDOHs",48,"%TOP")
79
^SHP("P1TIPDOHs",49)
                                                                               
^SHP("P1TIPDOHs",49,"%TOP")
79
^SHP("P1TIPDOHs",50)
                                                                               
^SHP("P1TIPDOHs",50,"%TOP")
79
^SHP("P1TIPDOHs",51)
                                                                               
^SHP("P1TIPDOHs",51,"%TOP")
79
^SHP("P1TIPDOHs",52)
                                                                               
^SHP("P1TIPDOHs",52,"%TOP")
79
^SHP("P1TIPDOHs",53)
                                                                               
^SHP("P1TIPDOHs",53,"%TOP")
79
^SHP("P1TIPDOHs",54)
                                                                               
^SHP("P1TIPDOHs",54,"%TOP")
79
^SHP("P1TIPDOHs",55)
                                                                               
^SHP("P1TIPDOHs",55,"%TOP")
79
^SHP("P1TIPDOHs",56)
 &65   > &60    > &55    > &50    >&45   >&43    >&40    >                     
^SHP("P1TIPDOHs",56,"%TOP")
1
^SHP("P1TIPDOHs","RG")
H
^SHP("P1TIPMs")

^SHP("P1TIPMs",1)
                            # mixvlnl mitih zclwd #                            
^SHP("P1TIPMs",2)
                                                                               
^SHP("P1TIPMs",3)
                                             &05      > : jix`z                
^SHP("P1TIPMs",4)
                -----------------------------------------------
^SHP("P1TIPMs",5)
                :   tih   :         xvln  my       : xvln 'qn :                
^SHP("P1TIPMs",6)
                -----------------------------------------------
^SHP("P1TIPMs",7)
                $999999.99:TTTTTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("P1TIPMs",8)

^SHP("P1TIPMs",9)

^SHP("P1TIPMs",10)

^SHP("P1TIPMs",11)

^SHP("P1TIPMs",12)

^SHP("P1TIPMs",13)

^SHP("P1TIPMs",14)

^SHP("P1TIPMs",15)

^SHP("P1TIPMs",16)

^SHP("P1TIPMs",17)

^SHP("P1TIPMs",18)

^SHP("P1TIPMs",19)

^SHP("P1TIPMs",20)

^SHP("P1TIPMs",21)

^SHP("P1TIPMs",22)

^SHP("P1TIPMs",23)

^SHP("P1TIPMs",24)

^SHP("P1TIPMs",25)

^SHP("P1TIPMs",26)

^SHP("P1TIPMs",27)

^SHP("P1TIPMs",28)

^SHP("P1TIPMs",29)

^SHP("P1TIPMs",30)

^SHP("P1TIPMs",31)

^SHP("P1TIPMs",32)

^SHP("P1TIPMs",33)

^SHP("P1TIPMs",34)

^SHP("P1TIPMs",35)

^SHP("P1TIPMs",36)

^SHP("P1TIPMs",37)

^SHP("P1TIPMs",38)

^SHP("P1TIPMs",39)

^SHP("P1TIPMs",40)

^SHP("P1TIPMs",41)

^SHP("P1TIPMs",42)

^SHP("P1TIPMs",43)

^SHP("P1TIPMs",44)

^SHP("P1TIPMs",45)

^SHP("P1TIPMs",46)

^SHP("P1TIPMs",47)

^SHP("P1TIPMs",48)

^SHP("P1TIPMs",49)

^SHP("P1TIPMs",50)

^SHP("P1TIPMs",51)

^SHP("P1TIPMs",52)

^SHP("P1TIPMs",53)
                                                             $ 
^SHP("P1TIPMs",54)
                -----------------------------------------------
^SHP("P1TIPMs",55)
                 &10      >                                                    
^SHP("P1TIPMs",56)
                                                                               
^SHP("P1TIPMs","RG")
H
^SHP("P1TMs")
migelyn g"ec
^SHP("P1TMs",1)
        #&03                     >#                                            
^SHP("P1TMs",2)
                     &10      >:jix`z cr    &05      >:jix`zn                  
^SHP("P1TMs",3)
                    &13       >: gewl cr   &11       >: gewln                  
^SHP("P1TMs",4)
 -----------------------------------------------------------------------------
^SHP("P1TMs",5)
 :    dlaw onf   : dpnfd :   gewld my    : gewl 'qn : mley :gelyn 'z: jix`z  : 
^SHP("P1TMs",6)
 -----------------------------------------------------------------------------
^SHP("P1TMs",7)
 $TTTTTTTTTTTTTTT:TTTTTTT:TTTTTTTTTTTTTTT:TTTTTTTTTT:999.99:TTTTTTTT:99999999:1
^SHP("P1TMs",8)

^SHP("P1TMs",9)

^SHP("P1TMs",10)

^SHP("P1TMs",11)

^SHP("P1TMs",12)

^SHP("P1TMs",13)

^SHP("P1TMs",14)

^SHP("P1TMs",15)

^SHP("P1TMs",16)

^SHP("P1TMs",17)

^SHP("P1TMs",18)

^SHP("P1TMs",19)

^SHP("P1TMs",20)

^SHP("P1TMs",21)

^SHP("P1TMs",22)

^SHP("P1TMs",23)

^SHP("P1TMs",24)

^SHP("P1TMs",25)

^SHP("P1TMs",26)

^SHP("P1TMs",27)

^SHP("P1TMs",28)

^SHP("P1TMs",29)

^SHP("P1TMs",30)

^SHP("P1TMs",31)

^SHP("P1TMs",32)

^SHP("P1TMs",33)

^SHP("P1TMs",34)

^SHP("P1TMs",35)

^SHP("P1TMs",36)

^SHP("P1TMs",37)

^SHP("P1TMs",38)

^SHP("P1TMs",39)

^SHP("P1TMs",40)

^SHP("P1TMs",41)

^SHP("P1TMs",42)

^SHP("P1TMs",43)

^SHP("P1TMs",44)

^SHP("P1TMs",45)

^SHP("P1TMs",46)

^SHP("P1TMs",47)

^SHP("P1TMs",48)

^SHP("P1TMs",49)

^SHP("P1TMs",50)

^SHP("P1TMs",51)

^SHP("P1TMs",52)

^SHP("P1TMs",53)
                                                                            $ 
^SHP("P1TMs",54)
 -----------------------------------------------------------------------------
^SHP("P1TMs",55)
                                                                               
^SHP("P1TMs",56)
                                       &20       >:k"dq  &15  >: migelyn       
^SHP("P1TMs","RG")
H
^SHP("P1TOT1s")
z i`vn` itl inei gec
^SHP("P1TOT1s",1)
                              # -&07>   -#                                     
^SHP("P1TOT1s",2)
                                 &03     >                                     
^SHP("P1TOT1s",3)
                       &01       > jix`zl zexikn g"ec                          
^SHP("P1TOT1s",4)
                                                                               
^SHP("P1TOT1s",5)
            -----------------------------------------------------              
^SHP("P1TOT1s",6)
            | d x i b n |  lr  l a w z d  |  x k n p  |    beq  |              
^SHP("P1TOT1s",7)
            |           |  zencew zexikn  |           |  melyz  |              
^SHP("P1TOT1s",8)
            -----------------------------------------------------              
^SHP("P1TOT1s",9)
              &58      >|   &55        >  |  &05     >|   onefn                
^SHP("P1TOT1s",10)
                        |                 |           |                        
^SHP("P1TOT1s",11)
              &65      >|   &60        >  |  &10     >| wiy d`gnd              
^SHP("P1TOT1s",12)
              &67      >|   &61        >  |  &11     >| 'fn d`gnd              
^SHP("P1TOT1s",13)
                        |                 |           |                        
^SHP("P1TOT1s",14)
              &72      >|   &70        >  |  &15     >| hxk`xyi                
^SHP("P1TOT1s",15)
              &78      >|   &75        >  |  &20     >|    dfie                
^SHP("P1TOT1s",16)
              &82      >|   &80        >  |  &25     >|  qxpiic                
^SHP("P1TOT1s",17)
              &84      >|   &83        >  |  &26     >|     AEX                
^SHP("P1TOT1s",18)
              &85      >|                 |  &28     >|&30)    >               
^SHP("P1TOT1s",19)
                        |                 |  &12     >|    dtwd                
^SHP("P1TOT1s",20)
            ------------------------------------------------------             
^SHP("P1TOT1s",21)
              &97      >|   &90        >  | &35      >| ehp k"dq               
^SHP("P1TOT1s",22)
                                             &49     >|     n"rn               
^SHP("P1TOT1s",23)
                                                                               
^SHP("P1TOT1s",24)
              &74      >|   &73        >  |  &13     >|     yelz               
^SHP("P1TOT1s",25)
                                                                               
^SHP("P1TOT1s",26)
              &92     > : migelyn ehp k"dq  &91      >: dcrqn ehp k"dq         
^SHP("P1TOT1s",27)
                                                                               
^SHP("P1TOT1s",28)
                                            &95      >:`"k k"dq                
^SHP("P1TOT1s",29)
                                                                               
^SHP("P1TOT1s",30)
                                            &40      >: mildpn zegpd           
^SHP("P1TOT1s",31)
                                            &41      >: miyelzl zegpd          
^SHP("P1TOT1s",32)
                                            &45      >: miekif                 
^SHP("P1TOT1s",33)
                                            &47      >: zexy inc               
^SHP("P1TOT1s",34)
                                            &42      >: mihixt zexikn          
^SHP("P1TOT1s",35)
                                            &50      >: milehia                
^SHP("P1TOT1s",36)
                                            &54      >: &53   >                
^SHP("P1TOT1s",37)
                                            &52      >:ehexa k"dq              
^SHP("P1TOT1s",38)
                                                                               
^SHP("P1TOT1s",39)
                                                                               
^SHP("P1TOT1s",40)
                                                                               
^SHP("P1TOT1s",41)
                                                                               
^SHP("P1TOT1s","RG")
H
^SHP("P1TOTM1s")
zerahnl Z 
^SHP("P1TOTM1s",1)
                                #-&07>   -#                                    
^SHP("P1TOTM1s",2)
                                 &03  > 'qn                                    
^SHP("P1TOTM1s",3)
                             &01      >:jix`zl zexikn g"ec                     
^SHP("P1TOTM1s",4)
                                                                               
^SHP("P1TOTM1s",5)
 ----------------------------------------------  ------------------------------
^SHP("P1TOTM1s",6)
 |   k"dq  |  l a w z d |  x k n p  |    beq  |  |          zerahn itl onefn  |
^SHP("P1TOTM1s",7)
 ----------------------------------------------  ------------------------------
^SHP("P1TOTM1s",8)
 &58      >|&55        >|  &05     >|     onefn   &08                   > &07 >
^SHP("P1TOTM1s",9)
 &65      >|&60        >|  &10     >| wiy d`gnd   &14                   > &09 >
^SHP("P1TOTM1s",10)
 &72      >|&70        >|  &15     >|   hxk`xyi   &18                   > &16 >
^SHP("P1TOTM1s",11)
 &78      >|&75        >|  &20     >|      dfie   &21                   > &19 >
^SHP("P1TOTM1s",12)
 &82      >|&80        >|  &25     >|    qxpiic   -----------------------------
^SHP("P1TOTM1s",13)
 &84      >|&83        >|  &26     >|       AEX   &23       >           k"dq   
^SHP("P1TOTM1s",14)
 &33      >|&32        >|  &31     >|       JCB                                
^SHP("P1TOTM1s",15)
 &37      >|&36        >|  &34     >|      `tl`                                
^SHP("P1TOTM1s",16)
 &85      >|            |  &28     >|  &30     >                               
^SHP("P1TOTM1s",17)
 ----------------------------------------------                                
^SHP("P1TOTM1s",18)
 &97      >|&90        >| &35      >| ehp oeict                                
^SHP("P1TOTM1s",19)
 &95       >| `"k k"dq     &49     >|      n"rn                                
^SHP("P1TOTM1s",20)
                                                                               
^SHP("P1TOTM1s",21)
  &13      >  yelz        &12      >: dtwda zepnfd                             
^SHP("P1TOTM1s",22)
                                                                               
^SHP("P1TOTM1s",23)
                          &44      >:  zexikn k"dq                             
^SHP("P1TOTM1s",24)
                                                                               
^SHP("P1TOTM1s",25)
   &45     > :   miekif   &40      >: mildpn zegpd                             
^SHP("P1TOTM1s",26)
                                                                               
^SHP("P1TOTM1s",27)
   &47     > : zexy inc   &42      >: mihixt zexikn                            
^SHP("P1TOTM1s",28)
                                                                               
^SHP("P1TOTM1s",29)
   &54     > :&53     >   &50      >: milehia                                  
^SHP("P1TOTM1s",30)
                                                                               
^SHP("P1TOTM1s",31)
                                                                               
^SHP("P1TOTM1s",32)
                                                                               
^SHP("P1TOTM1s",33)
&91                                                               >            
^SHP("P1TOTM1s",34)
                                                                               
^SHP("P1TOTM1s","RG")
H
^SHP("P1TOTMTs")
zerahn mr itqk g"ec
^SHP("P1TOTMTs",1)
                                                                               
^SHP("P1TOTMTs",2)
             # melyz i`vn` itl itqk g"ec #                                     
^SHP("P1TOTMTs",3)
                                                                               
^SHP("P1TOTMTs",4)
                      &02     >:jix`z cr  &01      >:jix`zn                    
^SHP("P1TOTMTs",5)
                                                                               
^SHP("P1TOTMTs",6)
 ---------------------------------------------- -------------------------------
^SHP("P1TOTMTs",7)
 |   k"dq  |  l a w z d |  x k n p  |    beq  | |          zerahn itl onefn   |
^SHP("P1TOTMTs",8)
 ---------------------------------------------- -------------------------------
^SHP("P1TOTMTs",9)
 &58      >|&55        >|  &05     >|     onefn  &08                     >&07 >
^SHP("P1TOTMTs",10)
 &65      >|&60        >|  &10     >| wiy d`gnd  &14                     >&09 >
^SHP("P1TOTMTs",11)
 &72      >|&70        >|  &15     >|   hxk`xyi  &18                     >&16 >
^SHP("P1TOTMTs",12)
 &78      >|&75        >|  &20     >|      dfie  &21                     >&19 >
^SHP("P1TOTMTs",13)
 &82      >|&80        >|  &25     >|    qxpiic  ------------------------------
^SHP("P1TOTMTs",14)
 &84      >|&83        >|  &26     >|       AEX  &23      >             k"dq   
^SHP("P1TOTMTs",15)
 &33      >|&32        >|  &31     >|       JCB                                
^SHP("P1TOTMTs",16)
 &37      >|&36        >|  &34     >|      `tl`                                
^SHP("P1TOTMTs",17)
 &85      >|            |  &28     >|  &30     >                               
^SHP("P1TOTMTs",18)
 ----------------------------------------------                                
^SHP("P1TOTMTs",19)
 &97      >|&90        >| &35      >| ehp oeict                                
^SHP("P1TOTMTs",20)
 &95       >| `"k k"dq     &49     >|      n"rn                                
^SHP("P1TOTMTs",21)
                                                                               
^SHP("P1TOTMTs",22)
  &13      >  yelz        &12      >: dtwda zepnfd                             
^SHP("P1TOTMTs",23)
                                                                               
^SHP("P1TOTMTs",24)
                          &44      >:  zexikn k"dq                             
^SHP("P1TOTMTs",25)
                                                                               
^SHP("P1TOTMTs",26)
   &45     > :   miekif   &40      >: mildpn zegpd                             
^SHP("P1TOTMTs",27)
                                                                               
^SHP("P1TOTMTs",28)
                          &43      >:'qeaiq' zegpd                             
^SHP("P1TOTMTs",29)
                                                                               
^SHP("P1TOTMTs",30)
   &47     > : zexy inc   &42      >: mihixt zexikn                            
^SHP("P1TOTMTs",31)
                                                                               
^SHP("P1TOTMTs",32)
   &54     > :&53     >   &50      >: milehia                                  
^SHP("P1TOTMTs",33)
                                                                               
^SHP("P1TOTMTs",34)
                          &93      >: micreq 'qn                               
^SHP("P1TOTMTs",35)
                                                                               
^SHP("P1TOTMTs",36)
&91                                                               >            
^SHP("P1TOTMTs",37)
                                                                               
^SHP("P1TOTMTs","RG")
H
^SHP("P1TOTN1s")
dtwd ila zexikn
^SHP("P1TOTN1s",1)
                            #-&07>    -#                                       
^SHP("P1TOTN1s",2)
                                                                               
^SHP("P1TOTN1s",3)
               &03    >  &01      > : jix`zl zexikn g"ec                       
^SHP("P1TOTN1s",4)
                                                                               
^SHP("P1TOTN1s",5)
            -----------------------------------------------------              
^SHP("P1TOTN1s",6)
            | d x i b n |  lr  l a w z d  |  x k n p  |    beq  |              
^SHP("P1TOTN1s",7)
            |           |  zencew zexikn  |           |  melyz  |              
^SHP("P1TOTN1s",8)
            -----------------------------------------------------              
^SHP("P1TOTN1s",9)
             &58       >|   &55        >  |&05       >|   onefn                
^SHP("P1TOTN1s",10)
                        |                 |           |                        
^SHP("P1TOTN1s",11)
             &65       >|   &60        >  |&10       >| wiy d`gnd              
^SHP("P1TOTN1s",12)
             &67       >|   &61        >  |&11       >| 'fn d`gnd              
^SHP("P1TOTN1s",13)
                        |                 |           |                        
^SHP("P1TOTN1s",14)
             &72       >|   &70        >  |&15       >| hxk`xyi                
^SHP("P1TOTN1s",15)
             &78       >|   &75        >  |&20       >|    dfie                
^SHP("P1TOTN1s",16)
             &82       >|   &80        >  |&25       >|  qxpiic                
^SHP("P1TOTN1s",17)
             &84       >|   &83        >  |&26       >|     AEX                
^SHP("P1TOTN1s",18)
             &33       >|   &32        >  |&31       >|     JCB                
^SHP("P1TOTN1s",19)
             &37       >|   &36        >  |&34       >|    `tl`                
^SHP("P1TOTN1s",20)
             &85       >|                 |&28       >|&30    >                
^SHP("P1TOTN1s",21)
            -----------------------------------------------------              
^SHP("P1TOTN1s",22)
             &97       >|   &90        >  |&35       >| ehp oeict              
^SHP("P1TOTN1s",23)
                                            &49      >|      n"rn              
^SHP("P1TOTN1s",24)
                                                                               
^SHP("P1TOTN1s",25)
                   &13       >: miyelz     &12       >: dtwda zepnfd           
^SHP("P1TOTN1s",26)
                                           &14       >:  zexikn k"dq           
^SHP("P1TOTN1s",27)
                                           &95       >: `"k k"dq               
^SHP("P1TOTN1s",28)
                                                                               
^SHP("P1TOTN1s",29)
                                           &40       >: mildpn zegpd           
^SHP("P1TOTN1s",30)
                                           &41       >: miyelzl zegpd          
^SHP("P1TOTN1s",31)
                                           &45       >: miekif                 
^SHP("P1TOTN1s",32)
                                           &47       >: zexy inc               
^SHP("P1TOTN1s",33)
                                           &42       >: mihixt zexikn          
^SHP("P1TOTN1s",34)
                                           &50       >: milehia                
^SHP("P1TOTN1s",35)
                                           &54       >:&53    >                
^SHP("P1TOTN1s",36)
                                           &52       >:ehexa k"dq              
^SHP("P1TOTN1s",37)
                                                                               
^SHP("P1TOTN1s",38)
   &91                                                               >         
^SHP("P1TOTN1s",39)
   &92                                                               >         
^SHP("P1TOTN1s",40)
                                                                               
^SHP("P1TOTN1s","RG")
H
^SHP("P1TOTNAs")
oeicta i`xy` ila
^SHP("P1TOTNAs",1)
                         #melyz irvn` itl itqk g"ec#                           
^SHP("P1TOTNAs",1,"%TOP")
25
^SHP("P1TOTNAs",2)
                       &02     >:jix`z cr  &01      >:jix`zn                   
^SHP("P1TOTNAs",2,"%TOP")
23
^SHP("P1TOTNAs",3)
                                                                               
^SHP("P1TOTNAs",3,"%TOP")
79
^SHP("P1TOTNAs",4)
            ------------------------------------------------------             
^SHP("P1TOTNAs",4,"%TOP")
12
^SHP("P1TOTNAs",5)
            | d x i b n |  lr  l a w z d  |  x k n p  |     beq  |             
^SHP("P1TOTNAs",5,"%TOP")
12
^SHP("P1TOTNAs",6)
            |           |  zencew zexikn  |           |   melyz  |             
^SHP("P1TOTNAs",6,"%TOP")
12
^SHP("P1TOTNAs",7)
            ------------------------------------------------------             
^SHP("P1TOTNAs",7,"%TOP")
12
^SHP("P1TOTNAs",8)
            |&58       >|   &55        >  |&05       >|     onefn|             
^SHP("P1TOTNAs",8,"%TOP")
12
^SHP("P1TOTNAs",9)
            |           |                 |           |          |             
^SHP("P1TOTNAs",9,"%TOP")
12
^SHP("P1TOTNAs",10)
            |&65       >|   &60        >  |&10       >| wiy d`gnd|             
^SHP("P1TOTNAs",10,"%TOP")
12
^SHP("P1TOTNAs",11)
            |&67       >|   &61        >  |&11       >| 'fn d`gnd|             
^SHP("P1TOTNAs",11,"%TOP")
12
^SHP("P1TOTNAs",12)
            |           |                 |           |          |             
^SHP("P1TOTNAs",12,"%TOP")
12
^SHP("P1TOTNAs",13)
            |&72       >|   &70        >  |&15       >|   hxk`xyi|             
^SHP("P1TOTNAs",13,"%TOP")
12
^SHP("P1TOTNAs",14)
            |&78       >|   &75        >  |&20       >|      dfie|             
^SHP("P1TOTNAs",14,"%TOP")
12
^SHP("P1TOTNAs",15)
            |&82       >|   &80        >  |&25       >|    qxpiic|             
^SHP("P1TOTNAs",15,"%TOP")
12
^SHP("P1TOTNAs",16)
            |&84       >|   &83        >  |&26       >|       AEX|             
^SHP("P1TOTNAs",16,"%TOP")
12
^SHP("P1TOTNAs",17)
            |&33       >|   &32        >  |&31       >|       JCB|             
^SHP("P1TOTNAs",17,"%TOP")
12
^SHP("P1TOTNAs",18)
            |&37       >|   &36        >  |&34       >|cx`w ine`l|             
^SHP("P1TOTNAs",18,"%TOP")
12
^SHP("P1TOTNAs",19)
            |&85       >|                 |&28       >|  &30    >|             
^SHP("P1TOTNAs",19,"%TOP")
12
^SHP("P1TOTNAs",20)
            ------------------------------------------------------             
^SHP("P1TOTNAs",20,"%TOP")
12
^SHP("P1TOTNAs",21)
            |&97       >|   &90        >  |&35       >|ehp oeict |             
^SHP("P1TOTNAs",21,"%TOP")
12
^SHP("P1TOTNAs",22)
            |           |                 |&49       >|     n"rn |             
^SHP("P1TOTNAs",22,"%TOP")
12
^SHP("P1TOTNAs",23)
            ------------------------------------------------------             
^SHP("P1TOTNAs",23,"%TOP")
12
^SHP("P1TOTNAs",24)
                                                                               
^SHP("P1TOTNAs",24,"%TOP")
79
^SHP("P1TOTNAs",25)
                &13       >: miyelz     &12       >: dtwda zepnfd              
^SHP("P1TOTNAs",25,"%TOP")
16
^SHP("P1TOTNAs",26)
                                        &14       >:  zexikn k"dq              
^SHP("P1TOTNAs",26,"%TOP")
40
^SHP("P1TOTNAs",27)
                                        &95       >:     `"k k"dq              
^SHP("P1TOTNAs",27,"%TOP")
40
^SHP("P1TOTNAs",28)
                                        &87       >:     `"k xcey              
^SHP("P1TOTNAs",28,"%TOP")
40
^SHP("P1TOTNAs",29)
                                        &40       >: mildpn zegpd              
^SHP("P1TOTNAs",29,"%TOP")
40
^SHP("P1TOTNAs",30)
                                        &43       >:'qeaiq' zegpd              
^SHP("P1TOTNAs",30,"%TOP")
40
^SHP("P1TOTNAs",31)
                                        &41       >:miyelzl zegpd              
^SHP("P1TOTNAs",31,"%TOP")
40
^SHP("P1TOTNAs",32)
                                        &45       >:       miekif              
^SHP("P1TOTNAs",32,"%TOP")
40
^SHP("P1TOTNAs",33)
                                        &47       >:     zexy inc              
^SHP("P1TOTNAs",33,"%TOP")
40
^SHP("P1TOTNAs",34)
             &98       >: dgha` mdn     &42       >:mihixt zexikn              
^SHP("P1TOTNAs",34,"%TOP")
13
^SHP("P1TOTNAs",35)
                                        &50       >:      milehia              
^SHP("P1TOTNAs",35,"%TOP")
40
^SHP("P1TOTNAs",36)
                                        &54       >:     &53    >              
^SHP("P1TOTNAs",36,"%TOP")
40
^SHP("P1TOTNAs",37)
                                        &52       >:   ehexa k"dq              
^SHP("P1TOTNAs",37,"%TOP")
40
^SHP("P1TOTNAs",38)
                                                                               
^SHP("P1TOTNAs",38,"%TOP")
79
^SHP("P1TOTNAs",39)
                  &96                >        &93   >  micreq 'qn              
^SHP("P1TOTNAs",39,"%TOP")
18
^SHP("P1TOTNAs",40)
                                                                               
^SHP("P1TOTNAs",40,"%TOP")
79
^SHP("P1TOTNAs",41)
   &91                                                               >         
^SHP("P1TOTNAs",41,"%TOP")
3
^SHP("P1TOTNAs",42)
   &92                                                               >         
^SHP("P1TOTNAs",42,"%TOP")
3
^SHP("P1TOTNAs",43)
                                                                               
^SHP("P1TOTNAs",43,"%TOP")
79
^SHP("P1TOTNAs","RG")
H
^SHP("P1TOTSVs")
itqk iz`eeyd g"ec
^SHP("P1TOTSVs",1)
              # itqk zexikn z`eeyd g"ec #                                      
^SHP("P1TOTSVs",2)
                                                                               
^SHP("P1TOTSVs",3)
             &03> yceg cr  &02> ycegn  &01> dpy :  zncew dtewz                 
^SHP("P1TOTSVs",4)
             &08> yceg cr  &07> ycegn  &06> dpy : zigkep dtewz                 
^SHP("P1TOTSVs",5)
                                                                               
^SHP("P1TOTSVs",6)
         -------------------------------------------------------------         
^SHP("P1TOTSVs",7)
         | -a yxtd |   yxtd   | dtewza xknp |  dtewza xknp |    beq  |         
^SHP("P1TOTSVs",8)
         |     %   |          |      zigkep |        zncew |  melyz  |         
^SHP("P1TOTSVs",9)
         -------------------------------------------------------------         
^SHP("P1TOTSVs",10)
          &31     >|&58      >| &55       > |  &09       > |     onefn         
^SHP("P1TOTSVs",11)
          &34     >|&65      >| &60       > |  &10       > | wiy d`gnd         
^SHP("P1TOTSVs",12)
          &36     >|&67      >| &61       > |  &11       > | 'fn d`gnd         
^SHP("P1TOTSVs",13)
          &39     >|&72      >| &70       > |  &15       > |   hxk`xyi         
^SHP("P1TOTSVs",14)
          &43     >|&78      >| &75       > |  &20       > |      dfie         
^SHP("P1TOTSVs",15)
          &46     >|&82      >| &80       > |  &25       > |    qxpiic         
^SHP("P1TOTSVs",16)
          &49     >|&84      >| &83       > |  &26       > |       AEX         
^SHP("P1TOTSVs",17)
          &19     >|&18      >| &16       > |  &27       > |       JCB         
^SHP("P1TOTSVs",18)
          &47     >|&44      >| &40       > |  &29       > |      `tl`         
^SHP("P1TOTSVs",19)
          &62     >|&85      >| &86       > |  &28       > |  &30     >        
^SHP("P1TOTSVs",20)
          &66     >|&95      >| &91       > |  &12       > |      dtwd         
^SHP("P1TOTSVs",21)
         --------------------------------------------------------------        
^SHP("P1TOTSVs",22)
          &73     >|&93      >| &87        >|  &32        >| zexikn k"dq       
^SHP("P1TOTSVs",23)
          &77     >|&97      >| &90        >|  &35        >| ehp k"dq          
^SHP("P1TOTSVs",24)
          &96     >|&94      >| &92        >|  &38        >| `"k k"dq          
^SHP("P1TOTSVs","RG")
H
^SHP("P1TOTWs")

^SHP("P1TOTWs",1)
                       #melyz irvn` itl itqk g"ec#                             
^SHP("P1TOTWs",1,"%TOP")
23
^SHP("P1TOTWs",2)
                   #&02     >#:jix`z cr  #&01      >#:jix`zn                   
^SHP("P1TOTWs",2,"%TOP")
19
^SHP("P1TOTWs",3)
            ------------------------------------------------------             
^SHP("P1TOTWs",3,"%TOP")
12
^SHP("P1TOTWs",4)
            | d x i b n |  lr  l a w z d  |  x k n p  |     beq  |             
^SHP("P1TOTWs",4,"%TOP")
12
^SHP("P1TOTWs",5)
            |           |  zencew zexikn  |           |   melyz  |             
^SHP("P1TOTWs",5,"%TOP")
12
^SHP("P1TOTWs",6)
            ------------------------------------------------------             
^SHP("P1TOTWs",6,"%TOP")
12
^SHP("P1TOTWs",7)
            |&58       >|   &55        >  |&05       >|     onefn|             
^SHP("P1TOTWs",7,"%TOP")
12
^SHP("P1TOTWs",8)
            |           |                 |           |          |             
^SHP("P1TOTWs",8,"%TOP")
12
^SHP("P1TOTWs",9)
            |&65       >|   &60        >  |&10       >| wiy d`gnd|             
^SHP("P1TOTWs",9,"%TOP")
12
^SHP("P1TOTWs",10)
            |&67       >|   &61        >  |&11       >| 'fn d`gnd|             
^SHP("P1TOTWs",10,"%TOP")
12
^SHP("P1TOTWs",11)
            |           |                 |           |          |             
^SHP("P1TOTWs",11,"%TOP")
12
^SHP("P1TOTWs",12)
            |&72       >|   &70        >  |&15       >|   hxk`xyi|             
^SHP("P1TOTWs",12,"%TOP")
12
^SHP("P1TOTWs",13)
            |&78       >|   &75        >  |&20       >|      dfie|             
^SHP("P1TOTWs",13,"%TOP")
12
^SHP("P1TOTWs",14)
            |&82       >|   &80        >  |&25       >|    qxpiic|             
^SHP("P1TOTWs",14,"%TOP")
12
^SHP("P1TOTWs",15)
            |&84       >|   &83        >  |&26       >|       AEX|             
^SHP("P1TOTWs",15,"%TOP")
12
^SHP("P1TOTWs",16)
            |&33       >|   &32        >  |&31       >|       JCB|             
^SHP("P1TOTWs",16,"%TOP")
12
^SHP("P1TOTWs",17)
            |&37       >|   &36        >  |&34       >|cx`w ine`l|             
^SHP("P1TOTWs",17,"%TOP")
12
^SHP("P1TOTWs",18)
            |&85       >|                 |&28       >|&30      >|             
^SHP("P1TOTWs",18,"%TOP")
12
^SHP("P1TOTWs",19)
            ------------------------------------------------------             
^SHP("P1TOTWs",19,"%TOP")
12
^SHP("P1TOTWs",20)
            |&97       >|   &90        >  |&35       >|ehp oeict |             
^SHP("P1TOTWs",20,"%TOP")
12
^SHP("P1TOTWs",21)
            |           |                 |&49       >|     n"rn |             
^SHP("P1TOTWs",21,"%TOP")
12
^SHP("P1TOTWs",22)
            ------------------------------------------------------             
^SHP("P1TOTWs",22,"%TOP")
12
^SHP("P1TOTWs",23)
                                                                               
^SHP("P1TOTWs",23,"%TOP")
79
^SHP("P1TOTWs",24)
                  &13       >: miyelz   &12       >: dtwda zepnfd              
^SHP("P1TOTWs",24,"%TOP")
18
^SHP("P1TOTWs",25)
                  &00       >&00    >   &14       >:  zexikn k"dq              
^SHP("P1TOTWs",25,"%TOP")
18
^SHP("P1TOTWs",26)
                  &00       >&00    >   &95       >:     `"k k"dq              
^SHP("P1TOTWs",26,"%TOP")
18
^SHP("P1TOTWs",27)
                  &00       >&00    >   &87       >:     `"k xcey              
^SHP("P1TOTWs",27,"%TOP")
18
^SHP("P1TOTWs",28)
            &45       >:       miekif   &40       >: mildpn zegpd              
^SHP("P1TOTWs",28,"%TOP")
12
^SHP("P1TOTWs",29)
            &47       >:     zexy inc   &43       >:'qeaiq' zegpd              
^SHP("P1TOTWs",29,"%TOP")
12
^SHP("P1TOTWs",30)
                  &00       >&00    >   &41       >:miyelzl zegpd              
^SHP("P1TOTWs",30,"%TOP")
18
^SHP("P1TOTWs",31)
               &98       >: dgha` mdn   &42       >:mihixt zexikn              
^SHP("P1TOTWs",31,"%TOP")
15
^SHP("P1TOTWs",32)
                  &00       >&00    >   &50       >:      milehia              
^SHP("P1TOTWs",32,"%TOP")
18
^SHP("P1TOTWs",33)
            &52       >:   ehexa k"dq   &54       >:     &53    >              
^SHP("P1TOTWs",33,"%TOP")
12
^SHP("P1TOTWs",34)
                                                                               
^SHP("P1TOTWs",34,"%TOP")
79
^SHP("P1TOTWs",35)
           &96                >  &00   >    &93   >:   micreq 'qn              
^SHP("P1TOTWs",35,"%TOP")
11
^SHP("P1TOTWs",36)
                                                                               
^SHP("P1TOTWs",36,"%TOP")
79
^SHP("P1TOTWs",37)
 &91                                                               >           
^SHP("P1TOTWs",37,"%TOP")
1
^SHP("P1TOTWs",38)
 &92                                                               >           
^SHP("P1TOTWs",38,"%TOP")
1
^SHP("P1TOTWs",39)
                                                                               
^SHP("P1TOTWs",39,"%TOP")
79
^SHP("P1TOTWs","RG")
H
^SHP("P1TOTs")
minekiq
^SHP("P1TOTs",1)
              #melyz irvn` itl itqk g"ec#                                      
^SHP("P1TOTs",1,"%TOP")
14
^SHP("P1TOTs",2)
                       &02     >:jix`z cr  &01      >:jix`zn                   
^SHP("P1TOTs",2,"%TOP")
23
^SHP("P1TOTs",3)
                                                                               
^SHP("P1TOTs",3,"%TOP")
79
^SHP("P1TOTs",4)
            -----------------------------------------------------              
^SHP("P1TOTs",4,"%TOP")
12
^SHP("P1TOTs",5)
            | d x i b n |  lr  l a w z d  |  x k n p  |    beq  |              
^SHP("P1TOTs",5,"%TOP")
12
^SHP("P1TOTs",6)
            |           |  zencew zexikn  |           |  melyz  |              
^SHP("P1TOTs",6,"%TOP")
12
^SHP("P1TOTs",7)
            -----------------------------------------------------              
^SHP("P1TOTs",7,"%TOP")
12
^SHP("P1TOTs",8)
              &58      >|   &55        >  |  &05     >|   onefn                
^SHP("P1TOTs",8,"%TOP")
14
^SHP("P1TOTs",9)
                        |                 |           |                        
^SHP("P1TOTs",9,"%TOP")
24
^SHP("P1TOTs",10)
              &65      >|   &60        >  |  &10     >| wiy d`gnd              
^SHP("P1TOTs",10,"%TOP")
14
^SHP("P1TOTs",11)
              &67      >|   &61        >  |  &11     >| 'fn d`gnd              
^SHP("P1TOTs",11,"%TOP")
14
^SHP("P1TOTs",12)
                        |                 |           |                        
^SHP("P1TOTs",12,"%TOP")
24
^SHP("P1TOTs",13)
              &72      >|   &70        >  |  &15     >| hxk`xyi                
^SHP("P1TOTs",13,"%TOP")
14
^SHP("P1TOTs",14)
              &78      >|   &75        >  |  &20     >|    dfie                
^SHP("P1TOTs",14,"%TOP")
14
^SHP("P1TOTs",15)
              &82      >|   &80        >  |  &25     >|  qxpiic                
^SHP("P1TOTs",15,"%TOP")
14
^SHP("P1TOTs",16)
              &84      >|   &83        >  |  &26     >|     AEX                
^SHP("P1TOTs",16,"%TOP")
14
^SHP("P1TOTs",17)
              &85      >|                 |  &28     >|&30)    >               
^SHP("P1TOTs",17,"%TOP")
14
^SHP("P1TOTs",18)
                        |                 |  &12     >|    dtwd                
^SHP("P1TOTs",18,"%TOP")
24
^SHP("P1TOTs",19)
            ------------------------------------------------------             
^SHP("P1TOTs",19,"%TOP")
12
^SHP("P1TOTs",20)
              &97      >|   &90        >  | &35      >| ehp k"dq               
^SHP("P1TOTs",20,"%TOP")
14
^SHP("P1TOTs",21)
                                             &49     >|     n"rn               
^SHP("P1TOTs",21,"%TOP")
45
^SHP("P1TOTs",22)
                                                                               
^SHP("P1TOTs",22,"%TOP")
79
^SHP("P1TOTs",23)
              &74      >|   &73        >  |  &13     >|     yelz               
^SHP("P1TOTs",23,"%TOP")
14
^SHP("P1TOTs",24)
                                                                               
^SHP("P1TOTs",24,"%TOP")
79
^SHP("P1TOTs",25)
              &92     > : migelyn ehp k"dq  &91      >: dcrqn ehp k"dq         
^SHP("P1TOTs",25,"%TOP")
14
^SHP("P1TOTs",26)
                                                                               
^SHP("P1TOTs",26,"%TOP")
79
^SHP("P1TOTs",27)
                                            &95      >:`"k k"dq                
^SHP("P1TOTs",27,"%TOP")
44
^SHP("P1TOTs",28)
                                                                               
^SHP("P1TOTs",28,"%TOP")
79
^SHP("P1TOTs",29)
                                            &40      >: mildpn zegpd           
^SHP("P1TOTs",29,"%TOP")
44
^SHP("P1TOTs",30)
                                            &41      >: miyelzl zegpd          
^SHP("P1TOTs",30,"%TOP")
44
^SHP("P1TOTs",31)
                                            &45      >: miekif                 
^SHP("P1TOTs",31,"%TOP")
44
^SHP("P1TOTs",32)
                                            &47      >: zexy inc               
^SHP("P1TOTs",32,"%TOP")
44
^SHP("P1TOTs",33)
                                            &42      >: mihixt zexikn          
^SHP("P1TOTs",33,"%TOP")
44
^SHP("P1TOTs",34)
                                            &50      >: milehia                
^SHP("P1TOTs",34,"%TOP")
44
^SHP("P1TOTs",35)
                                            &54      >: &53   >                
^SHP("P1TOTs",35,"%TOP")
44
^SHP("P1TOTs",36)
                                            &52      >:ehexa k"dq              
^SHP("P1TOTs",36,"%TOP")
44
^SHP("P1TOTs",37)
                                                                               
^SHP("P1TOTs",37,"%TOP")
79
^SHP("P1TOTs",38)
                                                                               
^SHP("P1TOTs",38,"%TOP")
79
^SHP("P1TOTs",39)
                                                                               
^SHP("P1TOTs",39,"%TOP")
79
^SHP("P1TOTs",40)
                                                                               
^SHP("P1TOTs",40,"%TOP")
79
^SHP("P1TOTs","RG")
H
^SHP("P1Tv")

^SHP("P1Tv",1)
                                                   # zegewldn minelyz zlaw #   
^SHP("P1Tv",2)
                                                                               
^SHP("P1Tv",3)
                                                                               
^SHP("P1Tv",4)
                                                        {35      }:onefna mley 
^SHP("P1Tv",5)
                                                                               
^SHP("P1Tv",6)
                                                         {40      }: wiya mley 
^SHP("P1Tv",7)
                                                            {42      } wiy 'qn 
^SHP("P1Tv",8)
                                          {50    }:sipq+wpa  {45       }: .f.z 
^SHP("P1Tv",9)
                                        {62     } oerxtl {60        }:oeayg qn 
^SHP("P1Tv",10)
                                                                               
^SHP("P1Tv",11)
                                                                               
^SHP("P1Tv",12)
                                                  {70               }: `"k 'qn 
^SHP("P1Tv",13)
                                           {75     }: dwqr qn  {72      }:mley 
^SHP("P1Tv",14)
                                                                              
^SHP("P1Tv",15)
                                                          {78       }:    dtwd 
^SHP("P1Tv",16)
                                                                               
^SHP("P1Tv",17)
                                                           {33      }:mley k"dq
^SHP("P1Tv","RG")
H
^SHP("PAR",1)
                      # mihixt g"ec #                                          
^SHP("PAR",1,"%TOP")
22
^SHP("PAR","RG")
H
^SHP("PARHIP1s")
micew oekcr
^SHP("PARHIP1s",1)
                                                                               
^SHP("PARHIP1s",2)
            #&10                  ># dcy oekcr                                 
^SHP("PARHIP1s",3)
   -------------------------------------------------------------------------
^SHP("PARHIP1s",4)
   :            :  ycg   :            :   oyi  :     hixt xe`z    :hixt cew:   
^SHP("PARHIP1s",5)
   -------------------------------------------------------------------------
^SHP("PARHIP1s",6)
   $TTTTTTTTTTTT:TTTTTTTT:TTTTTTTTTTTT:TTTTTTTT:TTTTTTTTTTTTTTTTTT:TTTTTTTT:1
^SHP("PARHIP1s",7)

^SHP("PARHIP1s",8)

^SHP("PARHIP1s",9)

^SHP("PARHIP1s",10)

^SHP("PARHIP1s",11)

^SHP("PARHIP1s",12)

^SHP("PARHIP1s",13)

^SHP("PARHIP1s",14)

^SHP("PARHIP1s",15)

^SHP("PARHIP1s",16)

^SHP("PARHIP1s",17)

^SHP("PARHIP1s",18)

^SHP("PARHIP1s",19)

^SHP("PARHIP1s",20)

^SHP("PARHIP1s",21)

^SHP("PARHIP1s",22)

^SHP("PARHIP1s",23)

^SHP("PARHIP1s",24)

^SHP("PARHIP1s",25)

^SHP("PARHIP1s",26)

^SHP("PARHIP1s",27)

^SHP("PARHIP1s",28)

^SHP("PARHIP1s",29)

^SHP("PARHIP1s",30)

^SHP("PARHIP1s",31)

^SHP("PARHIP1s",32)

^SHP("PARHIP1s",33)

^SHP("PARHIP1s",34)

^SHP("PARHIP1s",35)

^SHP("PARHIP1s",36)

^SHP("PARHIP1s",37)

^SHP("PARHIP1s",38)

^SHP("PARHIP1s",39)

^SHP("PARHIP1s",40)

^SHP("PARHIP1s",41)

^SHP("PARHIP1s",42)

^SHP("PARHIP1s",43)

^SHP("PARHIP1s",44)

^SHP("PARHIP1s",45)

^SHP("PARHIP1s",46)

^SHP("PARHIP1s",47)

^SHP("PARHIP1s",48)

^SHP("PARHIP1s",49)

^SHP("PARHIP1s",50)

^SHP("PARHIP1s",51)

^SHP("PARHIP1s",52)

^SHP("PARHIP1s",53)
                                                                          $ 
^SHP("PARHIP1s",54)
   -------------------------------------------------------------------------
^SHP("PARHIP1s",55)
                                                                               
^SHP("PARHIP1s","RG")
H
^SHP("PARPROTs")

^SHP("PARPROTs",1)
                              # mixign iepiy lewehext #                        
^SHP("PARPROTs",1,"%TOP")
30
^SHP("PARPROTs",2)
                                                                               
^SHP("PARPROTs",2,"%TOP")
79
^SHP("PARPROTs",3)
                                  &10      > jix`z cr      &05      > jix`zn   
^SHP("PARPROTs",3,"%TOP")
34
^SHP("PARPROTs",4)
     &21               >&20    >  hixt cr   &16             >&15    >  hixtn   
^SHP("PARPROTs",4,"%TOP")
5
^SHP("PARPROTs",5)
                                                                               
^SHP("PARPROTs",5,"%TOP")
79
^SHP("PARPROTs",6)
     ----------------------------------------------------------------------
^SHP("PARPROTs",6,"%TOP")
5
^SHP("PARPROTs",7)
     :   i`xg`  :ycg xign:oyi xign:     hixt xe`z    : cew : dry :  jix`z :    
^SHP("PARPROTs",7,"%TOP")
5
^SHP("PARPROTs",8)
     ----------------------------------------------------------------------
^SHP("PARPROTs",8,"%TOP")
5
^SHP("PARPROTs",9)
     $TTTTTTTTTT:TTTTTTTT:TTTTTTTT:TTTTTTTTTTTTTTTTTT:99999:99999:99999999:1
^SHP("PARPROTs",9,"%TOP")
5
^SHP("PARPROTs",10)

^SHP("PARPROTs",10,"%TOP")
0
^SHP("PARPROTs",11)

^SHP("PARPROTs",11,"%TOP")
0
^SHP("PARPROTs",12)

^SHP("PARPROTs",12,"%TOP")
0
^SHP("PARPROTs",13)

^SHP("PARPROTs",13,"%TOP")
0
^SHP("PARPROTs",14)

^SHP("PARPROTs",14,"%TOP")
0
^SHP("PARPROTs",15)

^SHP("PARPROTs",15,"%TOP")
0
^SHP("PARPROTs",16)

^SHP("PARPROTs",16,"%TOP")
0
^SHP("PARPROTs",17)

^SHP("PARPROTs",17,"%TOP")
0
^SHP("PARPROTs",18)

^SHP("PARPROTs",18,"%TOP")
0
^SHP("PARPROTs",19)

^SHP("PARPROTs",19,"%TOP")
0
^SHP("PARPROTs",20)

^SHP("PARPROTs",20,"%TOP")
0
^SHP("PARPROTs",21)

^SHP("PARPROTs",21,"%TOP")
0
^SHP("PARPROTs",22)

^SHP("PARPROTs",22,"%TOP")
0
^SHP("PARPROTs",23)

^SHP("PARPROTs",23,"%TOP")
0
^SHP("PARPROTs",24)

^SHP("PARPROTs",24,"%TOP")
0
^SHP("PARPROTs",25)

^SHP("PARPROTs",25,"%TOP")
0
^SHP("PARPROTs",26)

^SHP("PARPROTs",26,"%TOP")
0
^SHP("PARPROTs",27)

^SHP("PARPROTs",27,"%TOP")
0
^SHP("PARPROTs",28)

^SHP("PARPROTs",28,"%TOP")
0
^SHP("PARPROTs",29)

^SHP("PARPROTs",29,"%TOP")
0
^SHP("PARPROTs",30)

^SHP("PARPROTs",30,"%TOP")
0
^SHP("PARPROTs",31)

^SHP("PARPROTs",31,"%TOP")
0
^SHP("PARPROTs",32)

^SHP("PARPROTs",32,"%TOP")
0
^SHP("PARPROTs",33)

^SHP("PARPROTs",33,"%TOP")
0
^SHP("PARPROTs",34)

^SHP("PARPROTs",34,"%TOP")
0
^SHP("PARPROTs",35)

^SHP("PARPROTs",35,"%TOP")
0
^SHP("PARPROTs",36)

^SHP("PARPROTs",36,"%TOP")
0
^SHP("PARPROTs",37)

^SHP("PARPROTs",37,"%TOP")
0
^SHP("PARPROTs",38)

^SHP("PARPROTs",38,"%TOP")
0
^SHP("PARPROTs",39)

^SHP("PARPROTs",39,"%TOP")
0
^SHP("PARPROTs",40)

^SHP("PARPROTs",40,"%TOP")
0
^SHP("PARPROTs",41)

^SHP("PARPROTs",41,"%TOP")
0
^SHP("PARPROTs",42)

^SHP("PARPROTs",42,"%TOP")
0
^SHP("PARPROTs",43)

^SHP("PARPROTs",43,"%TOP")
0
^SHP("PARPROTs",44)

^SHP("PARPROTs",44,"%TOP")
0
^SHP("PARPROTs",45)

^SHP("PARPROTs",45,"%TOP")
0
^SHP("PARPROTs",46)

^SHP("PARPROTs",46,"%TOP")
0
^SHP("PARPROTs",47)

^SHP("PARPROTs",47,"%TOP")
0
^SHP("PARPROTs",48)

^SHP("PARPROTs",48,"%TOP")
0
^SHP("PARPROTs",49)

^SHP("PARPROTs",49,"%TOP")
0
^SHP("PARPROTs",50)

^SHP("PARPROTs",50,"%TOP")
0
^SHP("PARPROTs",51)

^SHP("PARPROTs",51,"%TOP")
0
^SHP("PARPROTs",52)

^SHP("PARPROTs",52,"%TOP")
0
^SHP("PARPROTs",53)

^SHP("PARPROTs",53,"%TOP")
0
^SHP("PARPROTs",54)
                                                                               
^SHP("PARPROTs",54,"%TOP")
79
^SHP("PARPROTs",55)
                                                                         $ 
^SHP("PARPROTs",55,"%TOP")
73
^SHP("PARPROTs",56)
     ----------------------------------------------------------------------    
^SHP("PARPROTs",56,"%TOP")
5
^SHP("PARPROTs","RG")
H
^SHP("PARS",1)
             #&10      # cr  #&05      # jix`zn                                
^SHP("PARS",1,"%TOP")
13
^SHP("PARS",2)
    ( `ad meil zekiiy 6 cr 0- n zery ) #&20#: dry cr #&15#: dryn               
^SHP("PARS",2,"%TOP")
4
^SHP("PARS","P10")
9
^SHP("PARS","P15")
3
^SHP("PARS","P20")
3
^SHP("PARS","P5")
9
^SHP("PARS","RG")
H
^SHP("PRTBHs")
dgdpd `ll mihixt
^SHP("PRTBHs",1)
                     # dgpd `ll mihixt zniyx #                                 
^SHP("PRTBHs",2)
                   -----------------------------------------
^SHP("PRTBHs",3)
                   : xign :        hixt xe`z    : hixt cew :                   
^SHP("PRTBHs",4)
                   -----------------------------------------
^SHP("PRTBHs",5)
                   $999.99:TTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("PRTBHs",6)

^SHP("PRTBHs",7)

^SHP("PRTBHs",8)

^SHP("PRTBHs",9)
                                                                               
^SHP("PRTBHs",10)

^SHP("PRTBHs",11)

^SHP("PRTBHs",12)

^SHP("PRTBHs",13)

^SHP("PRTBHs",14)

^SHP("PRTBHs",15)

^SHP("PRTBHs",16)

^SHP("PRTBHs",17)

^SHP("PRTBHs",18)

^SHP("PRTBHs",19)

^SHP("PRTBHs",20)

^SHP("PRTBHs",21)

^SHP("PRTBHs",22)

^SHP("PRTBHs",23)

^SHP("PRTBHs",24)

^SHP("PRTBHs",25)

^SHP("PRTBHs",26)

^SHP("PRTBHs",27)

^SHP("PRTBHs",28)

^SHP("PRTBHs",29)

^SHP("PRTBHs",30)

^SHP("PRTBHs",31)

^SHP("PRTBHs",32)

^SHP("PRTBHs",33)

^SHP("PRTBHs",34)

^SHP("PRTBHs",35)

^SHP("PRTBHs",36)

^SHP("PRTBHs",37)

^SHP("PRTBHs",38)

^SHP("PRTBHs",39)

^SHP("PRTBHs",40)

^SHP("PRTBHs",41)

^SHP("PRTBHs",42)

^SHP("PRTBHs",43)

^SHP("PRTBHs",44)

^SHP("PRTBHs",45)

^SHP("PRTBHs",46)

^SHP("PRTBHs",47)

^SHP("PRTBHs",48)

^SHP("PRTBHs",49)

^SHP("PRTBHs",50)

^SHP("PRTBHs",51)

^SHP("PRTBHs",52)

^SHP("PRTBHs",53)
                                                          $ 
^SHP("PRTBHs",54)
                   -----------------------------------------
^SHP("PRTBHs",55)
                                                                               
^SHP("PRTBHs","RG")
H
^SHP("PRTH",1)
            # iz`eeyd mihixt zexikn gec #                                      
^SHP("PRTH",2)
                 &03 yceg cr  &02 ycegn  &01 dpy : (1)  zncew dtewz            
^SHP("PRTH",3)
                 &08 yceg cr  &07 ycegn  &05 dpy : (2) zigkep dtewz            
^SHP("PRTH","P1")
4
^SHP("PRTH","P2")
4
^SHP("PRTH","P3")
4
^SHP("PRTH","P5")
4
^SHP("PRTH","P7")
4
^SHP("PRTH","P8")
4
^SHP("PRTMBs")

^SHP("PRTMBs",1)
                         &05                         >                         
^SHP("PRTMBs",2)
                   -----------------------------------------
^SHP("PRTMBs",3)
                   : xign :        hixt xe`z    : hixt cew :                   
^SHP("PRTMBs",4)
                   -----------------------------------------
^SHP("PRTMBs",5)
                   $999.99:TTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("PRTMBs",6)

^SHP("PRTMBs",7)

^SHP("PRTMBs",8)

^SHP("PRTMBs",9)

^SHP("PRTMBs",10)

^SHP("PRTMBs",11)

^SHP("PRTMBs",12)

^SHP("PRTMBs",13)

^SHP("PRTMBs",14)

^SHP("PRTMBs",15)

^SHP("PRTMBs",16)

^SHP("PRTMBs",17)

^SHP("PRTMBs",18)

^SHP("PRTMBs",19)

^SHP("PRTMBs",20)

^SHP("PRTMBs",21)

^SHP("PRTMBs",22)

^SHP("PRTMBs",23)

^SHP("PRTMBs",24)

^SHP("PRTMBs",25)

^SHP("PRTMBs",26)

^SHP("PRTMBs",27)

^SHP("PRTMBs",28)

^SHP("PRTMBs",29)

^SHP("PRTMBs",30)

^SHP("PRTMBs",31)

^SHP("PRTMBs",32)

^SHP("PRTMBs",33)

^SHP("PRTMBs",34)

^SHP("PRTMBs",35)

^SHP("PRTMBs",36)

^SHP("PRTMBs",37)

^SHP("PRTMBs",38)

^SHP("PRTMBs",39)

^SHP("PRTMBs",40)

^SHP("PRTMBs",41)

^SHP("PRTMBs",42)

^SHP("PRTMBs",43)

^SHP("PRTMBs",44)

^SHP("PRTMBs",45)

^SHP("PRTMBs",46)

^SHP("PRTMBs",47)

^SHP("PRTMBs",48)

^SHP("PRTMBs",49)

^SHP("PRTMBs",50)

^SHP("PRTMBs",51)

^SHP("PRTMBs",52)
                                                          $ 
^SHP("PRTMBs",53)
                   -----------------------------------------
^SHP("PRTMBs",54)
                                                                               
^SHP("PRTMBs","RG")
H
^SHP("SHULHANs")

^SHP("SHULHANs",1)
                                 #  zepgley zlah  #                            
^SHP("SHULHANs",1,"%TOP")
33
^SHP("SHULHANs",2)
                                                                               
^SHP("SHULHANs",2,"%TOP")
79
^SHP("SHULHANs",3)
                     --------------------------------------------------
^SHP("SHULHANs",3,"%TOP")
21
^SHP("SHULHANs",4)
                     :      ogley beq xe`z    : ogley beq : ogley 'qn :        
^SHP("SHULHANs",4,"%TOP")
21
^SHP("SHULHANs",5)
                     --------------------------------------------------
^SHP("SHULHANs",5,"%TOP")
21
^SHP("SHULHANs",6)
                     $TTTTTTTTTTTTTTTTTTTTTTTT:         99:        999:1
^SHP("SHULHANs",6,"%TOP")
21
^SHP("SHULHANs",7)

^SHP("SHULHANs",7,"%TOP")
0
^SHP("SHULHANs",8)

^SHP("SHULHANs",8,"%TOP")
0
^SHP("SHULHANs",9)

^SHP("SHULHANs",9,"%TOP")
0
^SHP("SHULHANs",10)

^SHP("SHULHANs",10,"%TOP")
0
^SHP("SHULHANs",11)

^SHP("SHULHANs",11,"%TOP")
0
^SHP("SHULHANs",12)

^SHP("SHULHANs",12,"%TOP")
0
^SHP("SHULHANs",13)

^SHP("SHULHANs",13,"%TOP")
0
^SHP("SHULHANs",14)

^SHP("SHULHANs",14,"%TOP")
0
^SHP("SHULHANs",15)

^SHP("SHULHANs",15,"%TOP")
0
^SHP("SHULHANs",16)

^SHP("SHULHANs",16,"%TOP")
0
^SHP("SHULHANs",17)

^SHP("SHULHANs",17,"%TOP")
0
^SHP("SHULHANs",18)

^SHP("SHULHANs",18,"%TOP")
0
^SHP("SHULHANs",19)

^SHP("SHULHANs",19,"%TOP")
0
^SHP("SHULHANs",20)

^SHP("SHULHANs",20,"%TOP")
0
^SHP("SHULHANs",21)

^SHP("SHULHANs",21,"%TOP")
0
^SHP("SHULHANs",22)

^SHP("SHULHANs",22,"%TOP")
0
^SHP("SHULHANs",23)

^SHP("SHULHANs",23,"%TOP")
0
^SHP("SHULHANs",24)

^SHP("SHULHANs",24,"%TOP")
0
^SHP("SHULHANs",25)

^SHP("SHULHANs",25,"%TOP")
0
^SHP("SHULHANs",26)

^SHP("SHULHANs",26,"%TOP")
0
^SHP("SHULHANs",27)

^SHP("SHULHANs",27,"%TOP")
0
^SHP("SHULHANs",28)

^SHP("SHULHANs",28,"%TOP")
0
^SHP("SHULHANs",29)

^SHP("SHULHANs",29,"%TOP")
0
^SHP("SHULHANs",30)

^SHP("SHULHANs",30,"%TOP")
0
^SHP("SHULHANs",31)

^SHP("SHULHANs",31,"%TOP")
0
^SHP("SHULHANs",32)

^SHP("SHULHANs",32,"%TOP")
0
^SHP("SHULHANs",33)

^SHP("SHULHANs",33,"%TOP")
0
^SHP("SHULHANs",34)

^SHP("SHULHANs",34,"%TOP")
0
^SHP("SHULHANs",35)

^SHP("SHULHANs",35,"%TOP")
0
^SHP("SHULHANs",36)

^SHP("SHULHANs",36,"%TOP")
0
^SHP("SHULHANs",37)

^SHP("SHULHANs",37,"%TOP")
0
^SHP("SHULHANs",38)

^SHP("SHULHANs",38,"%TOP")
0
^SHP("SHULHANs",39)

^SHP("SHULHANs",39,"%TOP")
0
^SHP("SHULHANs",40)

^SHP("SHULHANs",40,"%TOP")
0
^SHP("SHULHANs",41)

^SHP("SHULHANs",41,"%TOP")
0
^SHP("SHULHANs",42)

^SHP("SHULHANs",42,"%TOP")
0
^SHP("SHULHANs",43)

^SHP("SHULHANs",43,"%TOP")
0
^SHP("SHULHANs",44)

^SHP("SHULHANs",44,"%TOP")
0
^SHP("SHULHANs",45)

^SHP("SHULHANs",45,"%TOP")
0
^SHP("SHULHANs",46)

^SHP("SHULHANs",46,"%TOP")
0
^SHP("SHULHANs",47)

^SHP("SHULHANs",47,"%TOP")
0
^SHP("SHULHANs",48)

^SHP("SHULHANs",48,"%TOP")
0
^SHP("SHULHANs",49)
                                                                               
^SHP("SHULHANs",49,"%TOP")
79
^SHP("SHULHANs",50)
                                                                               
^SHP("SHULHANs",50,"%TOP")
79
^SHP("SHULHANs",51)
                                                                               
^SHP("SHULHANs",51,"%TOP")
79
^SHP("SHULHANs",52)
                                                                               
^SHP("SHULHANs",52,"%TOP")
79
^SHP("SHULHANs",53)
                                                                               
^SHP("SHULHANs",53,"%TOP")
79
^SHP("SHULHANs",54)

^SHP("SHULHANs",54,"%TOP")
0
^SHP("SHULHANs",55)
                                                                     $ 
^SHP("SHULHANs",55,"%TOP")
69
^SHP("SHULHANs",56)
                    --------------------------------------------------         
^SHP("SHULHANs",56,"%TOP")
20
^SHP("SHULHANs","RG")
H
^SHP("SHVA1s")

^SHP("SHVA1s",1)
                                                                               
^SHP("SHVA1s",2)
                  &10       >:  ehexa zekf k"dq   &05      > :  ehexa daeg k"dq
^SHP("SHVA1s",3)
                  &20       >: miakek zekf k"dq   &15      > : miakek daeg k"dq
^SHP("SHVA1s",4)
                                                                               
^SHP("SHVA1s",5)
    &27      >: ehexa zekf hxk`xyi k"dq     &25      >: ehexa daeg hxk`xyi k"dq
^SHP("SHVA1s",6)
    &32      >:miakek zekf hxk`xyi k"dq     &30      >:miakek daeg hxk`xyi k"dq
^SHP("SHVA1s",7)
                                                                               
^SHP("SHVA1s",8)
    &37      >: ehexa zekf    dfie k"dq     &35      >: ehexa daeg    dfie k"dq
^SHP("SHVA1s",9)
    &42      >:miakek zekf    dfie k"dq     &40      >:miakek daeg    dfie k"dq
^SHP("SHVA1s",10)
                                                                               
^SHP("SHVA1s",11)
    &47      >: ehexa zekf  qxpiic k"dq     &45      >: ehexa daeg  qxpiic k"dq
^SHP("SHVA1s",12)
    &52      >:miakek zekf  qxpiic k"dq     &50      >:miakek daeg  qxpiic k"dq
^SHP("SHVA1s",13)
                                                                               
^SHP("SHVA1s",14)
    &57      >: ehexa zekf .qw`.n` k"dq     &55      >: ehexa daeg .qw`.n` k"dq
^SHP("SHVA1s",15)
    &62      >:miakek zekf .qw`.n` k"dq     &60      >:miakek daeg .qw`.n` k"dq
^SHP("SHVA1s",16)
                                                                               
^SHP("SHVA1s",17)
    &67      >: ehexa zekf     JCB k"dq     &65      >: ehexa daeg     JCB k"dq
^SHP("SHVA1s",18)
    &72      >:miakek zekf     JCB k"dq     &70      >:miakek daeg     JCB k"dq
^SHP("SHVA1s",19)
                                                                               
^SHP("SHVA1s",20)
    &77      >: ehexa zekf    `tl` k"dq     &75      >: ehexa daeg    `tl` k"dq
^SHP("SHVA1s",21)
    &82      >:miakek zekf    `tl` k"dq     &80      >:miakek daeg    `tl` k"dq
^SHP("SHVA1s",22)
                                                                               
^SHP("SHVA1s",23)
                                                                               
^SHP("SHVA1s","RG")
H
^SHP("SHVAs")

^SHP("SHVAs",1)
             &15            > xeciy onf  &10      >: `zknq`  &05       >: uaew 
^SHP("SHVAs",2)
 -----------------------------------------------------------------------------
^SHP("SHVAs",3)
 : 2 mekq: 1 nekq :yz:y`:  dwqir :  akek :  ehexa :ag:      qihxk     : xceq : 
^SHP("SHVAs",4)
 -----------------------------------------------------------------------------
^SHP("SHVAs",5)
 $9999.99:99999.99:99:99:TTTTTTTT:9999.99:99999.99:TT:9999999999999999:999999:1
^SHP("SHVAs",6)

^SHP("SHVAs",7)

^SHP("SHVAs",8)

^SHP("SHVAs",9)

^SHP("SHVAs",10)

^SHP("SHVAs",11)

^SHP("SHVAs",12)

^SHP("SHVAs",13)

^SHP("SHVAs",14)

^SHP("SHVAs",15)

^SHP("SHVAs",16)

^SHP("SHVAs",17)

^SHP("SHVAs",18)

^SHP("SHVAs",19)

^SHP("SHVAs",20)

^SHP("SHVAs",21)

^SHP("SHVAs",22)

^SHP("SHVAs",23)

^SHP("SHVAs",24)

^SHP("SHVAs",25)

^SHP("SHVAs",26)

^SHP("SHVAs",27)

^SHP("SHVAs",28)

^SHP("SHVAs",29)

^SHP("SHVAs",30)

^SHP("SHVAs",31)

^SHP("SHVAs",32)

^SHP("SHVAs",33)

^SHP("SHVAs",34)

^SHP("SHVAs",35)

^SHP("SHVAs",36)

^SHP("SHVAs",37)

^SHP("SHVAs",38)

^SHP("SHVAs",39)

^SHP("SHVAs",40)

^SHP("SHVAs",41)

^SHP("SHVAs",42)

^SHP("SHVAs",43)

^SHP("SHVAs",44)

^SHP("SHVAs",45)

^SHP("SHVAs",46)

^SHP("SHVAs",47)

^SHP("SHVAs",48)

^SHP("SHVAs",49)

^SHP("SHVAs",50)

^SHP("SHVAs",51)

^SHP("SHVAs",52)
                                                                            $ 
^SHP("SHVAs",53)
 -----------------------------------------------------------------------------
^SHP("SHVAs",54)
                                                                               
^SHP("SHVAs",55)
       oecren - 4 ; iciin - 3 ;30+'e,sicr dfie,xw`xyi - 2 ; libx - 1 :i`xy` beq
^SHP("SHVAs",56)
     'lyz oecren - 9 ; minelyz - 8 ;zicxw qxpiic,dfie - 6 ; `tl` - 5           
^SHP("SHVAs","RG")
H
^SHP("SITE1")

^SHP("SITE1",1)
                                                                               
^SHP("SITE1",1,"%TOP")
79
^SHP("SITE1",2)
                             oiil oe`d megza zinpice dycg dxag dpid oiil oe` al
^SHP("SITE1",2,"%TOP")
29
^SHP("SITE1",3)
                       zekxrn gezita ax oeiqip mr miprevwn zeev zcg`n `id .hwxn
^SHP("SITE1",3,"%TOP")
23
^SHP("SITE1",4)
                          .zegewl ledipe i`ln ,zenyex zetew megza xzeia zeakxen
^SHP("SITE1",4,"%TOP")
26
^SHP("SITE1",5)
                               ,eib`t`t ,fx` mgl :oebk zezyxa zelirt dl` zekxrn
^SHP("SITE1",5,"%TOP")
31
^SHP("SITE1",6)
                             mixg` miwqr ze`ne e'b dtw ,xa eqxtq` ,dnex`,mihbtq
^SHP("SITE1",6,"%TOP")
29
^SHP("SITE1",7)
                                                                               
^SHP("SITE1",7,"%TOP")
79
^SHP("SITE1",8)
                          WEB-d zibelepkhn mlrzdl xyt` i` meid ly inpicd ocira 
^SHP("SITE1",8,"%TOP")
26
^SHP("SITE1",9)
                           mewn lekn divnxetpi` mr dceara zecig`e zehyt zxyt`nd
^SHP("SITE1",9,"%TOP")
27
^SHP("SITE1",10)
                                  mipetlhe ml`t iaygn llek ,dvw ceiv lkne mlera
^SHP("SITE1",10,"%TOP")
34
^SHP("SITE1",11)
                                                                        .miciip
^SHP("SITE1",11,"%TOP")
72
^SHP("SITE1",12)
                                                                               
^SHP("SITE1",12,"%TOP")
79
^SHP("SITE1",13)
                           dpkez oiicr oi` hpxhpi`d jxc migelyne zepcrqn megza 
^SHP("SITE1",13,"%TOP")
27
^SHP("SITE1",14)
                           xearl ilan oiil oe` oinfdl gewll zpzepy dxidne dheyt
^SHP("SITE1",14,"%TOP")
27
^SHP("SITE1",15)
                         dheyt dpnfd revia elit` .mikyenne mikaeqn meyix ikildz
^SHP("SITE1",15,"%TOP")
25
^SHP("SITE1",16)
                         .miaygna rcie diyez gewldn yxecy heyt `l llka xac dpid
^SHP("SITE1",16,"%TOP")
25
^SHP("SITE1",17)
                                                                               
^SHP("SITE1",17,"%TOP")
79
^SHP("SITE1",18)
                          ze`n mr dceara epxavy ax oeiqipae zeipycg zeibelepkha
^SHP("SITE1",18,"%TOP")
26
^SHP("SITE1",19)
                        bivdl mi`b epgp` mixa 'uieecpqe zeixvit,dtw iza ,zecrqn
^SHP("SITE1",19,"%TOP")
24
^SHP("SITE1",20)
                                 .oiil oe` zepnfdl zeiexyt`a dxiyre dyicg dpkez
^SHP("SITE1",20,"%TOP")
33
^SHP("SITE1",21)
                                                                               
^SHP("SITE1",21,"%TOP")
79
^SHP("SITE1","RG")
H
^SHP("SITE1E")

^SHP("SITE1E",1)
Lev  Online  - is a dynamic  company  that provides
^SHP("SITE1E",2)
e-commerce solutions  for retail market.
^SHP("SITE1E",3)

^SHP("SITE1E",4)
We are a group of professionals with a huge
^SHP("SITE1E",5)
experience of developing software for a retail
^SHP("SITE1E",6)
industry:Point of Sale,Stock Management and
^SHP("SITE1E",7)
Customer Management.
^SHP("SITE1E",8)

^SHP("SITE1E",9)
Incidentally ,nowadays we can see the popularity
^SHP("SITE1E",10)
of WEB based systems.Web technologies provide us an
^SHP("SITE1E",11)
easy and standardized way of working with information,
^SHP("SITE1E",12)
and give us a possibility to access data anywhere
^SHP("SITE1E",13)
from any equipment that have a Web browser and a
^SHP("SITE1E",14)
connection to an internet.
^SHP("SITE1E",15)

^SHP("SITE1E",16)
After intensive research of web systems that supply
^SHP("SITE1E",17)
solutions for restaurants and food delivery businesses ,
^SHP("SITE1E",18)
we found that, in spite of many attempts, no one of
^SHP("SITE1E",19)
current providers supplies an easy to use ,fast and
^SHP("SITE1E",20)
comprehensive system for online food ordering. In many
^SHP("SITE1E",21)
cases neither customer registration or food ordering
^SHP("SITE1E",22)
process are simple and require extended knowledge of
^SHP("SITE1E",23)
computer systems a lot of passion.
^SHP("SITE1E",24)

^SHP("SITE1E",25)
Our company decided to change this situation .
^SHP("SITE1E",26)
As well as ,we used most modern technologies and all our
^SHP("SITE1E",27)
work experience with Restaurants ,Pizza Houses ,Delivery
^SHP("SITE1E",28)
businesses and Sandwich Bars. After some time of hard
^SHP("SITE1E",29)
working we are proud to expose an online ordering system
^SHP("SITE1E",30)
that is fast,user-friendly and fully featured .The system
^SHP("SITE1E",31)
that can meet the current and future requirements of
^SHP("SITE1E",32)
modern market.
^SHP("SITE1E",33)

^SHP("SITE1E","RG")
H
^SHP("SITE1R")

^SHP("SITE1R",1)
Lev On-la!in - nova!a i dinami!4na!a kompani!a
^SHP("SITE1R",2)
vedu!sa!a razrabotki na osnove !%WEB!%-tehnologi!i.
^SHP("SITE1R",3)
Ona ob!tedin!aet specialistov s mnogoletnim opy-
^SHP("SITE1R",4)
tom raboty v razvitii sistem s ispol!mzovaniem
^SHP("SITE1R",5)
komp!m!utezirovannyh kass, u!4etom tovarnyh
^SHP("SITE1R",6)
zapasov, ras!4etov s postav!sikami i zakaz!4ikami.
^SHP("SITE1R",7)
 !Eti sistemy s uspehom rabota!ut vo mnogih krupnyh
^SHP("SITE1R",8)
torgovyh set!ah.
^SHP("SITE1R",9)

^SHP("SITE1R",10)
 Stremitel!mnoe razvitie !%WEB!%-tehnologi!i ne moglo
^SHP("SITE1R",11)
ne privle!4!m na!6ego vnimani!a. Prakti!4eski neogra-
^SHP("SITE1R",12)
ni!4ennoe !4islo pol!mzovatele!i, universal!mnost!m
^SHP("SITE1R",13)
metodov i oborudovani!a priveli k ih povsemestnomu 
^SHP("SITE1R",14)
primeneni!u. Vmeste s tem my s dole!i udivleni!a                                                    
^SHP("SITE1R",15)
obnarujili !4to nesmotr!a na izobilie mat-
^SHP("SITE1R",16)
obespe!4eni!a do sih por otsutstvuet prosta!a i                                                                       
^SHP("SITE1R",17)
udobna!a programma dl!a zakazov !4erez internet.
^SHP("SITE1R",18)
 Po!4ti vse su!sestvu!u!sie programmy trebu!ut
^SHP("SITE1R",19)
ot pol!mzovatel!a slojno!i procedury registracii
^SHP("SITE1R",20)
da i sam process zakaza mojet potrebovat!m nemalo!i
^SHP("SITE1R",21)
soobrazitel!mnosti i opyta raboty s komp!m!uterom.
^SHP("SITE1R",22)

^SHP("SITE1R",23)
 Vozmojno zvu!4it samonade!anno, no my re!6ili
^SHP("SITE1R",24)
ispravit!m polojenie.Ispol!mzu!a nakoplenny!i
^SHP("SITE1R",25)
opyt raboty s sotn!ami kafe, restoranov i pic-
^SHP("SITE1R",26)
ceri!i i sovremennye nove!i!6ie tehnologii nam
^SHP("SITE1R",27)
udalos!m sozdat!m programmu udobnu!u , bystru!u,
^SHP("SITE1R",28)
prostu!u v ispol!mzovanii i bogatu!u vozmojnost!ami.
^SHP("SITE1R",29)

^SHP("SITE1R","RG")
H
^SHP("SITE2")

^SHP("SITE2",1)
                            itc mr dceara dyicg dibelepkh qiqa lr diepa dpkezd 
^SHP("SITE2",1,"%TOP")
28
^SHP("SITE2",2)
                                     d`eeyda xzei daxd dxidn dpidy MJSP hpxhpi`
^SHP("SITE2",2,"%TOP")
37
^SHP("SITE2",3)
                               GTM mipezp qiqaa yeniy mr cgi. zencew dibelepkhl
^SHP("SITE2",3,"%TOP")
31
^SHP("SITE2",4)
                                 ,zxg` dxeva zcaery zkxrn milawn mlera zexidndn
^SHP("SITE2",4,"%TOP")
33
^SHP("SITE2",5)
                                                     .dpin`e dheyt ,dxidn ,dpey
^SHP("SITE2",5,"%TOP")
53
^SHP("SITE2",6)
                                                                               
^SHP("SITE2",6,"%TOP")
79
^SHP("SITE2",7)
                                          .ce`n heyt epid gewl i"r dpnfdd jildz
^SHP("SITE2",7,"%TOP")
42
^SHP("SITE2",8)
                            witqn - dnqiqe ynzyn my oifdl daeg oi` eply zekxrna
^SHP("SITE2",8,"%TOP")
28
^SHP("SITE2",9)
                           zybl xyie - zaezke oetlh ihxt wx "gxe`" divte`a `lnl
^SHP("SITE2",9,"%TOP")
27
^SHP("SITE2",10)
                               .zepexzi xtqn ozep xz`l meyix z`f mr cgi .dpnfdl
^SHP("SITE2",10,"%TOP")
31
^SHP("SITE2",11)
                          z` wizrdle ely zepnfdd dixehqda ynzydl leki meyx gewl
^SHP("SITE2",11,"%TOP")
26
^SHP("SITE2",12)
                              dwihqihhql zexyt` dpyi ok enk .zncewd dpnfdd okez
^SHP("SITE2",12,"%TOP")
30
^SHP("SITE2",13)
                             rval ozip zkxrnl meyix .xardn zepnfdd lk lr zhxetn
^SHP("SITE2",13,"%TOP")
29
^SHP("SITE2",14)
                                   .dxvwe dheyt ce`n dxeva dpnfdd jildz meza mb
^SHP("SITE2",14,"%TOP")
35
^SHP("SITE2",15)
                                divte`l eqpk - mkly dpnfd mr dxew dn zrcl mivex
^SHP("SITE2",15,"%TOP")
32
^SHP("SITE2",16)
                                    ciin ercze - mkly mihxt epiivz ."dpnfd avn"
^SHP("SITE2",16,"%TOP")
36
^SHP("SITE2",17)
                                       .mkil` jxca xak e` dpkda ,dpznda `id m`d
^SHP("SITE2",17,"%TOP")
39
^SHP("SITE2",18)
                                                                               
^SHP("SITE2",18,"%TOP")
79
^SHP("SITE2",19)
                                  ,dira oi` - cal dpnfdd z` seq`le oinfdl mivex
^SHP("SITE2",19,"%TOP")
34
^SHP("SITE2",20)
                                      ."zgwl `ea`" zexyt`d z` "xir" dcya ewilwd
^SHP("SITE2",20,"%TOP")
38
^SHP("SITE2",21)
                                                                               
^SHP("SITE2",21,"%TOP")
79
^SHP("SITE2",22)
                                           zpkezl eqpk - "miipir d`xnn aeh oi`"
^SHP("SITE2",22,"%TOP")
43
^SHP("SITE2",23)
                                                             .mknvra ehtye enc 
^SHP("SITE2",23,"%TOP")
61
^SHP("SITE2",24)
                                                                               
^SHP("SITE2",24,"%TOP")
79
^SHP("SITE2",25)
                                                                               
^SHP("SITE2",25,"%TOP")
79
^SHP("SITE2",26)
                                                                               
^SHP("SITE2",26,"%TOP")
79
^SHP("SITE2",27)
                                                                               
^SHP("SITE2",27,"%TOP")
79
^SHP("SITE2",28)
                                                                               
^SHP("SITE2",28,"%TOP")
79
^SHP("SITE2",29)
                                                                               
^SHP("SITE2",29,"%TOP")
79
^SHP("SITE2",30)
                                                                               
^SHP("SITE2",30,"%TOP")
79
^SHP("SITE2",31)
                                                                               
^SHP("SITE2",31,"%TOP")
79
^SHP("SITE2",32)
                                                                               
^SHP("SITE2",32,"%TOP")
79
^SHP("SITE2","RG")
H
^SHP("SITE2E")

^SHP("SITE2E",1)
The  system is built on a base of Java Server Page(JSP)
^SHP("SITE2E",2)
technology .In contrast with previous
^SHP("SITE2E",3)
technologies ,JSP is very fast and opens a lot of
^SHP("SITE2E",4)
possibilities to implement fully featured systems.
^SHP("SITE2E",5)

^SHP("SITE2E",6)
Together with a GT.M database, one of the fastest 
^SHP("SITE2E",7)
in the world ,an end user can enjoy a high performance
^SHP("SITE2E",8)
at the time of ordering .In contrast with other systems
^SHP("SITE2E",9)
the ordering process is simple and user friendly .
^SHP("SITE2E",10)
Users can see the current order and modify selected
^SHP("SITE2E",11)
items in the  same window and all modifications will 
^SHP("SITE2E",12)
happen visually and in real time.
^SHP("SITE2E",13)

^SHP("SITE2E",14)
A registration process is unnecessary and customers can just 
^SHP("SITE2E",15)
press on the "Guest" button, fill phone number and address
^SHP("SITE2E",16)
for delivery and make an order like a registered cutomer.
^SHP("SITE2E",17)
However a one time registration is open to a client with the
^SHP("SITE2E",18)
following options. Instead of filling personal information
^SHP("SITE2E",19)
every time clients just  put  their own code and password ,
^SHP("SITE2E",20)
and have the possibility to make new order or  copy 
^SHP("SITE2E",21)
contents from any previous order purchased by him in a
^SHP("SITE2E",22)
period of time to a new one. The client has access to
^SHP("SITE2E",23)
a statistic of all orders made by him in a specific 
^SHP("SITE2E",24)
period of time.
^SHP("SITE2E",25)

^SHP("SITE2E",26)
To make a TAKE AWAY order, just select from a list of
^SHP("SITE2E",27)
cities "TAKE AWAY" option .
^SHP("SITE2E",28)

^SHP("SITE2E",29)
To get a correct impression it is better to try it,
^SHP("SITE2E",30)
instead of reading about it ,so press on the <a href="#" onClick="ToDemo()">DEMO</a> button
^SHP("SITE2E",31)
and make your own opinion.
^SHP("SITE2E",32)

^SHP("SITE2E","RG")
H
^SHP("SITE2R")

^SHP("SITE2R",1)
Programma napisana s ispol!mzovaniem nove!i!6e!i
^SHP("SITE2R",2)
tehnologii - !%JSP!% - bolee !efektivno!i po sravne-
^SHP("SITE2R",3)
ni!u s predydu!simi. Vmeste s ispol!mzovaniem
^SHP("SITE2R",4)
bazy dannyh !%GTM!% - odno!i iz samyh bystryh iz nyne
^SHP("SITE2R",5)
su!sestvu!u!sih -polu!4aem sistemu drugogo
^SHP("SITE2R",6)
urovn!a - bystru!u, nadejnu!u i prostu!u
^SHP("SITE2R",7)
v !ekspluatacii.
^SHP("SITE2R",8)

^SHP("SITE2R",9)
  Sam process zakaza upro!sen do predela. Registra-
^SHP("SITE2R",10)
ci!a ne ob!azatel!mna, dostato!4no ukazat!m
^SHP("SITE2R",11)
adres i nomer telefona - i mojno pristupit!m nepos-                                                                            
^SHP("SITE2R",12)
redstvenno k zakazu. Vmeste s tem registraci!a
^SHP("SITE2R",13)
daet r!ad preimu!sestv - vozmojnost!m skopirovat!m
^SHP("SITE2R",14)
predydu!si!i zakaz, polu!4it!m razvernutu!u statis-
^SHP("SITE2R",15)
tiku i t.d. Est!m vozmojnost!m zaregistrirovat!ms!a
^SHP("SITE2R",16)
po okon!4anii zakaza. !Eto o!4en!m prosto - bol!m!6in-
^SHP("SITE2R",17)
stvo dannyh budut skopirovany iz zakaza.
^SHP("SITE2R",18)
 Vpro!4em !4em !4itat!m opisanie - poprobu!ite i
^SHP("SITE2R",19)
ubedites!m sami.Programma !%<a href="#" onclick="ToEnter(4)" style="color:blue">!%Demo!%</a>!% -
^SHP("SITE2R",20)
pered vami.
^SHP("SITE2R",21)
                                                                               
^SHP("SITE2R",22)
                                                                               
^SHP("SITE2R",23)
                                                                               
^SHP("SITE2R",24)
                                                                               
^SHP("SITE2R",25)
                                                                               
^SHP("SITE2R",26)
                                                                               
^SHP("SITE2R",27)
                                                                               
^SHP("SITE2R",28)
                                                                               
^SHP("SITE2R",29)
                                                                               
^SHP("SITE2R","RG")
H
^SHP("SITE3")

^SHP("SITE3",1)
                                         - "miixt" ly hixtzd lr diepa enc zpkez
^SHP("SITE3",1,"%TOP")
41
^SHP("SITE3",2)
                                 hixtz mr migelynde oefnd spra recie dlecb dxag
^SHP("SITE3",2,"%TOP")
33
^SHP("SITE3",3)
                                    .'eke zeiwqr zegex`,miax mihixt llekd akxen
^SHP("SITE3",3,"%TOP")
36
^SHP("SITE3",4)
                                dpkezd iaikxn lk ly dpiga mkl zxyt`n encd zkxrn
^SHP("SITE3",4,"%TOP")
32
^SHP("SITE3",5)
                                    `id miakxen mihixtz mr dceara elit`y dbivne
^SHP("SITE3",5,"%TOP")
36
^SHP("SITE3",6)
                                                         yeniyl dlwe dgep oiicr
^SHP("SITE3",6,"%TOP")
57
^SHP("SITE3",7)
                                                                               
^SHP("SITE3",7,"%TOP")
79
^SHP("SITE3",8)
                                                  "enc" ywn uegll `p ligzdl ick
^SHP("SITE3",8,"%TOP")
50
^SHP("SITE3","RG")
H
^SHP("SITE3E")

^SHP("SITE3E",1)

^SHP("SITE3E",2)
In the Demo you can see how  the system  work with
^SHP("SITE3E",3)
a menu  of Itailan  restaurant.
^SHP("SITE3E",4)
Generally speaking ,the system provide a tools to work
^SHP("SITE3E",5)
with menus of any complexity  of choices and can be
^SHP("SITE3E",6)
adapted to any type of meal delivery businesses.
^SHP("SITE3E",7)

^SHP("SITE3E",8)

^SHP("SITE3E",9)
To start press button "Demo"
^SHP("SITE3E",10)

^SHP("SITE3E",11)

^SHP("SITE3E","RG")
H
^SHP("SITE3R")

^SHP("SITE3R",1)
Programma demo postroena na osnove men!u
^SHP("SITE3R",2)
ital!m!anskogo restorana. Vy mojete regu- 
^SHP("SITE3R",3)
lirovat!m cveta sa!ita, pro!4itat!m opisani!a
^SHP("SITE3R",4)
bl!ud i daje posmotret!m na nih )).
^SHP("SITE3R",5)
 Mojete ukazat!m k vybrannym bl!udam sousy
^SHP("SITE3R",6)
i dobavki. 
^SHP("SITE3R",7)
 !04toby na!4at!m proceduru zakaza najmite 
^SHP("SITE3R",8)
klavi!6u "Demo"
^SHP("SITE3R",9)

^SHP("SITE3R",10)

^SHP("SITE3R","RG")
H
^SHP("SITE4")

^SHP("SITE4",1)
                                                                               
^SHP("SITE4",1,"%TOP")
79
^SHP("SITE4",2)
                            ? dpkeza ynzydl lkep m`d .aygn epl oi` <S2> .y <S1>
^SHP("SITE4",2,"%TOP")
28
^SHP("SITE4",3)
            .qwtl zexiyi zepnfd elawz mz` .qwt mkl didiy witqn .ok <S2> .z <S1>
^SHP("SITE4",3,"%TOP")
12
^SHP("SITE4",4)
                                                                               
^SHP("SITE4",4,"%TOP")
79
^SHP("SITE4",5)
                 ? dpkeza ynzydl lkep m`d .qwt oi` la` aygn epl yi <S2> .y <S1>
^SHP("SITE4",5,"%TOP")
17
^SHP("SITE4",6)
                          elawz mz` .aygnl zxaegn zqtcna witqn .ok <S2> .z <S1>
^SHP("SITE4",6,"%TOP")
26
^SHP("SITE4",7)
                        qitcdle ze`xl elkez fre dnqiqe hpxhpi`a zaezk <N><N><N>
^SHP("SITE4",7,"%TOP")
24
^SHP("SITE4",8)
                 xardn zepnfd mb, dyixc itl milawn mz`y zepnfdd lk z` <N><N><N>
^SHP("SITE4",8,"%TOP")
17
^SHP("SITE4",9)
                                                   .zeiegc zepnfd mbe <N><N><N>
^SHP("SITE4",9,"%TOP")
51
^SHP("SITE4",10)
                                                                               
^SHP("SITE4",10,"%TOP")
79
^SHP("SITE4",11)
                   ? dpkeza ynzydl lkep m`d . hpxhpi`a xz` epl oi` <S2> .y <S1>
^SHP("SITE4",11,"%TOP")
19
^SHP("SITE4",12)
                    gztp epgp`e mkly hixtzd lr rcin epl exiarz .ok <S2> .z <S1>
^SHP("SITE4",12,"%TOP")
20
^SHP("SITE4",13)
                    ynzyn cew,zaezk elawz mz` ,eply zxya dvign mkxear <N><N><N>
^SHP("SITE4",13,"%TOP")
20
^SHP("SITE4",14)
                                                              .dnqiqe <N><N><N>
^SHP("SITE4",14,"%TOP")
62
^SHP("SITE4",15)
                                                                               
^SHP("SITE4",15,"%TOP")
79
^SHP("SITE4",16)
               ? dpkezd z` eil` xagl lkep m`d .hpxhpi`a xz` epl yi <S2> .y <S1>
^SHP("SITE4",16,"%TOP")
15
^SHP("SITE4",17)
                                 .ciin cearl xyt`e dpkezl wpil .ok <S2> .z <S1>
^SHP("SITE4",17,"%TOP")
33
^SHP("SITE4",18)
                                                                               
^SHP("SITE4",18,"%TOP")
79
^SHP("SITE4",19)
                     .zekxrn c.y.x dxag ici lr dgzety dpkez epl yi <S2> .y <S1>
^SHP("SITE4",19,"%TOP")
21
^SHP("SITE4",20)
                       jezl xyi hpxhpi`n milawny zepnfd alyl lkep m`d <N><N><N>
^SHP("SITE4",20,"%TOP")
23
^SHP("SITE4",21)
                                            ? zipy cilwdl ila ,zkxrnd <N><N><N>
^SHP("SITE4",21,"%TOP")
44
^SHP("SITE4",22)
                  ozip qwepil daiaqa zcaer .c.y.x ly dpkezde dcina <S2> .z <S1>
^SHP("SITE4",22,"%TOP")
18
^SHP("SITE4",23)
                                .zkxrnl zexiyi hpxhpi`n zepnfd xiardl <N><N><N>
^SHP("SITE4",23,"%TOP")
32
^SHP("SITE4",24)
                                                                               
^SHP("SITE4",24,"%TOP")
79
^SHP("SITE4",25)
                                                  ? dpkezd xign dn <S2> .y <S1>
^SHP("SITE4",25,"%TOP")
50
^SHP("SITE4",26)
                  lceba ielze zil`ecieicpi` dxeva rawp dpkezd xign <S2> .z <S1>
^SHP("SITE4",26,"%TOP")
18
^SHP("SITE4",27)
                 'eke zniiw dpkezd mr wynnl divte` ,zepnfd 'qn ,hixtz <N><N><N>
^SHP("SITE4",27,"%TOP")
17
^SHP("SITE4",28)
                                            obed xignl miaiigzn epgp` <N><N><N>
^SHP("SITE4",28,"%TOP")
44
^SHP("SITE4",29)
                                                                               
^SHP("SITE4",29,"%TOP")
79
^SHP("SITE4",30)
                                                                               
^SHP("SITE4",30,"%TOP")
79
^SHP("SITE4",31)
                                                                               
^SHP("SITE4",31,"%TOP")
79
^SHP("SITE4",32)
                                                                               
^SHP("SITE4",32,"%TOP")
79
^SHP("SITE4","RG")
H
^SHP("SITE4R")

^SHP("SITE4R",1)
!%<span style="color:blue">!%V.!%</span>!% U nas net komp!m!utera. Mojem li my                                                                  
^SHP("SITE4R",2)
pol!mzovat!ms!a va!6e!i programmo!i ?
^SHP("SITE4R",3)
!%<span style="color:blue">!%O.!%</span>!% Da. Dostato!4no imet!m faks. Zakaz
^SHP("SITE4R",4)
 budet polu!4en pr!amo na nego.
^SHP("SITE4R",5)

^SHP("SITE4R",6)
!%<span style="color:blue">!%V.!%</span>!% U nas est!m komp!m!uter, no net faksa.
^SHP("SITE4R",7)
 Vozmojno li pol!mzovat!ms!a programmo!i ?
^SHP("SITE4R",8)
!%<span style="color:blue">!%O.!%</span>!% Da. Vam budet vydelen sa!it i, po vvode
^SHP("SITE4R",9)
sootvetstvu!u!sego parol!a, vy uvidete vse polu!4ennye
^SHP("SITE4R",10)
zakazy s vozmojnost!m!u raspe!4atat!m ih na printere.
^SHP("SITE4R",11)

^SHP("SITE4R",12)
!%<span style="color:blue">!%V.!%</span>!% U nas net svoego sa!ita v internete. Smojem
^SHP("SITE4R",13)
 li my vospol!mzovat!ms!a va!6e!i programmo!i ?
^SHP("SITE4R",14)
!%<span style="color:blue">!%O.!%</span>!% Da. My mojem vkl!u!4it!m vas v razrabotanny!i
^SHP("SITE4R",15)
nami katalog restoranov ili razrabotat!m dl!a vas
^SHP("SITE4R",16)
individual!mny!i sa!it.
^SHP("SITE4R",17)

^SHP("SITE4R",18)
!%<span style="color:blue">!%V.!%</span>!% U nas est!m uje svo!i sa!it. Kak my mojem
^SHP("SITE4R",19)
podsoedinit!m k nemu va!6u programmu ?
^SHP("SITE4R",20)
!%<span style="color:blue">!%O.!%</span>!% Poprosite soprovojda!u!sego sa!it vkl!u!4it!m
^SHP("SITE4R",21)
tuda ssylku na ukazanny!i nami adres - i gotovo !                                                                        
^SHP("SITE4R",22)
                                                                               
^SHP("SITE4R",23)
!%<span style="color:blue">!%V.!%</span>!% Kakova cena programmy ?
^SHP("SITE4R",24)
!%<span style="color:blue">!%O.!%</span>!% Cena opredel!ats!a individual!mno v zavisimosti
^SHP("SITE4R",25)
ot paketa trebovani!i k programme. Vmeste s tem my
^SHP("SITE4R",26)
ob!azuems!a !4to cena ne budet prevoshodit!m sredne-
^SHP("SITE4R",27)
stati!4esku!u dl!a analogi!4nyh sistem.
^SHP("SITE4R",28)
                                                                               
^SHP("SITE4R",29)
                                                                               
^SHP("SITE4R",30)
                                                                               
^SHP("SITE4R",31)
                                                                               
^SHP("SITE4R","RG")
H
^SHP("SITE5")

^SHP("SITE5",1)
                                                      zervde zel`y zeaebzl gnyp
^SHP("SITE5",1,"%TOP")
54
^SHP("SITE5",2)
                                                                -a xyw xevil `p
^SHP("SITE5",2,"%TOP")
64
^SHP("SITE5",3)
                                                                               
^SHP("SITE5",3,"%TOP")
79
^SHP("SITE5",4)
                     <S2><E><SPAN DIR="LTR"">08-6881815</SPAN><N><E><S1>: oetlh
^SHP("SITE5",4,"%TOP")
21
^SHP("SITE5",5)
                                                                               
^SHP("SITE5",5,"%TOP")
79
^SHP("SITE5",6)
                   <S2><E><SPAN DIR="LTR">054-4380608</SPAN><N><E><S1>:<N> ciip
^SHP("SITE5",6,"%TOP")
19
^SHP("SITE5",7)
                                                                               
^SHP("SITE5",7,"%TOP")
79
^SHP("SITE5",8)
                  <S2><E><SPAN DIR="LTR">08-6812270</SPAN><N><E><S1>:<N><N> qwt
^SHP("SITE5",8,"%TOP")
18
^SHP("SITE5",9)
                                                                               
^SHP("SITE5",9,"%TOP")
79
^SHP("SITE5",10)
    <E><N><A HREF="MAILTO:LEV1957@GMAIL.COM">lev1957@gmail.com</A><N><E>: l"`ec
^SHP("SITE5",10,"%TOP")
4
^SHP("SITE5",11)
                                                                               
^SHP("SITE5",11,"%TOP")
79
^SHP("SITE5",12)
                                                                               
^SHP("SITE5",12,"%TOP")
79
^SHP("SITE5","RG")
H
^SHP("SITE5E")

^SHP("SITE5E",1)
We will be happy to now about Your opinion.
^SHP("SITE5E",2)
Please Contact us :
^SHP("SITE5E",3)

^SHP("SITE5E",4)
Phone  # : +972-8-6881815
^SHP("SITE5E",5)

^SHP("SITE5E",6)
Mobile # : +972-54-380608
^SHP("SITE5E",7)

^SHP("SITE5E",8)
Fax    # : +972-8-6812270
^SHP("SITE5E",9)

^SHP("SITE5E",10)
E-mail   :<a href=mailto:lev1957@gmail.com> lev1957@gmail.com</a>
^SHP("SITE5E","RG")
H
^SHP("SITE5R")

^SHP("SITE5R",1)
Budem rady usly!6at!m va!6e mnenie.
^SHP("SITE5R",2)
Vy mojete sv!azat!ms!a s nami po :
^SHP("SITE5R",3)

^SHP("SITE5R",4)
telefonu : 972-8-6881815
^SHP("SITE5R",5)

^SHP("SITE5R",6)
mobil!mnomu : +972-5-44380608
^SHP("SITE5R",7)

^SHP("SITE5R",8)
faksu : 972-8-6812270
^SHP("SITE5R",9)

^SHP("SITE5R",10)
e-ma!ilu : !%<a style="color:blue" href="mailto:lev1957@gmail.com">lev1957@gmail.com</a>!%
^SHP("SITE5R",11)
                                                                               
^SHP("SITE5R",12)
                                                                               
^SHP("SITE5R","RG")
H
^SHP("SND2DLVs")
hixtz xeciy
^SHP("SND2DLVs",1)
                                                                               
^SHP("SND2DLVs",2)
                                                                               
^SHP("SND2DLVs",3)
                                               &05        > :   dwlgnn         
^SHP("SND2DLVs",4)
                                               &10        > : dwlgn cr         
^SHP("SND2DLVs",5)
                                                                               
^SHP("SND2DLVs",6)
                        &12                  > &11  >:   mihixt zveawn         
^SHP("SND2DLVs",7)
                        &14                  > &13  >: mihixt zveaw cr         
^SHP("SND2DLVs",8)
                                                                               
^SHP("SND2DLVs",9)
                          &16                > &15        > :    hixtn         
^SHP("SND2DLVs",10)
                          &21                > &20        > :  hixt cr         
^SHP("SND2DLVs",11)
                                                                               
^SHP("SND2DLVs",12)
                                                                               
^SHP("SND2DLVs","RG")
H
^SHP("SUGDEPs")
dwlgn- hixt beq zlah
^SHP("SUGDEPs",1)
                          # "dwlgn - hixt beq" zlah #                          
^SHP("SUGDEPs",1,"%TOP")
26
^SHP("SUGDEPs",2)
                                                                               
^SHP("SUGDEPs",2,"%TOP")
79
^SHP("SUGDEPs",3)
                   ------------------------------------------------------
^SHP("SUGDEPs",3,"%TOP")
19
^SHP("SUGDEPs",4)
                   :    dwlgn xe`z   : dwlgn : hixt beq xe`z : hixt beq :      
^SHP("SUGDEPs",4,"%TOP")
19
^SHP("SUGDEPs",5)
                   ------------------------------------------------------
^SHP("SUGDEPs",5,"%TOP")
19
^SHP("SUGDEPs",6)
                   $TTTTTTTTTTTTTTTTT:  99999:TTTTTTTTTTTTTTT:     99999:1
^SHP("SUGDEPs",6,"%TOP")
19
^SHP("SUGDEPs",7)

^SHP("SUGDEPs",7,"%TOP")
0
^SHP("SUGDEPs",8)

^SHP("SUGDEPs",8,"%TOP")
0
^SHP("SUGDEPs",9)

^SHP("SUGDEPs",9,"%TOP")
0
^SHP("SUGDEPs",10)

^SHP("SUGDEPs",10,"%TOP")
0
^SHP("SUGDEPs",11)

^SHP("SUGDEPs",11,"%TOP")
0
^SHP("SUGDEPs",12)

^SHP("SUGDEPs",12,"%TOP")
0
^SHP("SUGDEPs",13)

^SHP("SUGDEPs",13,"%TOP")
0
^SHP("SUGDEPs",14)

^SHP("SUGDEPs",14,"%TOP")
0
^SHP("SUGDEPs",15)

^SHP("SUGDEPs",15,"%TOP")
0
^SHP("SUGDEPs",16)

^SHP("SUGDEPs",16,"%TOP")
0
^SHP("SUGDEPs",17)

^SHP("SUGDEPs",17,"%TOP")
0
^SHP("SUGDEPs",18)

^SHP("SUGDEPs",18,"%TOP")
0
^SHP("SUGDEPs",19)

^SHP("SUGDEPs",19,"%TOP")
0
^SHP("SUGDEPs",20)

^SHP("SUGDEPs",20,"%TOP")
0
^SHP("SUGDEPs",21)

^SHP("SUGDEPs",21,"%TOP")
0
^SHP("SUGDEPs",22)

^SHP("SUGDEPs",22,"%TOP")
0
^SHP("SUGDEPs",23)

^SHP("SUGDEPs",23,"%TOP")
0
^SHP("SUGDEPs",24)

^SHP("SUGDEPs",24,"%TOP")
0
^SHP("SUGDEPs",25)

^SHP("SUGDEPs",25,"%TOP")
0
^SHP("SUGDEPs",26)

^SHP("SUGDEPs",26,"%TOP")
0
^SHP("SUGDEPs",27)

^SHP("SUGDEPs",27,"%TOP")
0
^SHP("SUGDEPs",28)

^SHP("SUGDEPs",28,"%TOP")
0
^SHP("SUGDEPs",29)

^SHP("SUGDEPs",29,"%TOP")
0
^SHP("SUGDEPs",30)

^SHP("SUGDEPs",30,"%TOP")
0
^SHP("SUGDEPs",31)

^SHP("SUGDEPs",31,"%TOP")
0
^SHP("SUGDEPs",32)

^SHP("SUGDEPs",32,"%TOP")
0
^SHP("SUGDEPs",33)

^SHP("SUGDEPs",33,"%TOP")
0
^SHP("SUGDEPs",34)

^SHP("SUGDEPs",34,"%TOP")
0
^SHP("SUGDEPs",35)

^SHP("SUGDEPs",35,"%TOP")
0
^SHP("SUGDEPs",36)

^SHP("SUGDEPs",36,"%TOP")
0
^SHP("SUGDEPs",37)

^SHP("SUGDEPs",37,"%TOP")
0
^SHP("SUGDEPs",38)

^SHP("SUGDEPs",38,"%TOP")
0
^SHP("SUGDEPs",39)

^SHP("SUGDEPs",39,"%TOP")
0
^SHP("SUGDEPs",40)

^SHP("SUGDEPs",40,"%TOP")
0
^SHP("SUGDEPs",41)

^SHP("SUGDEPs",41,"%TOP")
0
^SHP("SUGDEPs",42)

^SHP("SUGDEPs",42,"%TOP")
0
^SHP("SUGDEPs",43)

^SHP("SUGDEPs",43,"%TOP")
0
^SHP("SUGDEPs",44)

^SHP("SUGDEPs",44,"%TOP")
0
^SHP("SUGDEPs",45)

^SHP("SUGDEPs",45,"%TOP")
0
^SHP("SUGDEPs",46)

^SHP("SUGDEPs",46,"%TOP")
0
^SHP("SUGDEPs",47)

^SHP("SUGDEPs",47,"%TOP")
0
^SHP("SUGDEPs",48)
                                                                               
^SHP("SUGDEPs",48,"%TOP")
79
^SHP("SUGDEPs",49)
                                                                               
^SHP("SUGDEPs",49,"%TOP")
79
^SHP("SUGDEPs",50)
                                                                               
^SHP("SUGDEPs",50,"%TOP")
79
^SHP("SUGDEPs",51)
                                                                               
^SHP("SUGDEPs",51,"%TOP")
79
^SHP("SUGDEPs",52)

^SHP("SUGDEPs",52,"%TOP")
0
^SHP("SUGDEPs",53)

^SHP("SUGDEPs",53,"%TOP")
0
^SHP("SUGDEPs",54)
                                                                       $ 
^SHP("SUGDEPs",54,"%TOP")
71
^SHP("SUGDEPs",55)
                   ------------------------------------------------------
^SHP("SUGDEPs",55,"%TOP")
19
^SHP("SUGDEPs",56)
                                                                               
^SHP("SUGDEPs",56,"%TOP")
79
^SHP("SUGDEPs","RG")
H
^SHP("SUGSs")
zepgley ibeq zlah
^SHP("SUGSs",1)
                                # zepgley ibeq zlah #                          
^SHP("SUGSs",2)
                                                                               
^SHP("SUGSs",3)
                          -----------------------------------
^SHP("SUGSs",4)
                          :    ogley beq xe`z   : ogley beq :                  
^SHP("SUGSs",5)
                          -----------------------------------
^SHP("SUGSs",6)
                          $TTTTTTTTTTTTTTTTTTTTT:TTTTTTTTTTT:1
^SHP("SUGSs",7)

^SHP("SUGSs",8)

^SHP("SUGSs",9)

^SHP("SUGSs",10)

^SHP("SUGSs",11)

^SHP("SUGSs",12)

^SHP("SUGSs",13)

^SHP("SUGSs",14)

^SHP("SUGSs",15)

^SHP("SUGSs",16)

^SHP("SUGSs",17)

^SHP("SUGSs",18)

^SHP("SUGSs",19)

^SHP("SUGSs",20)

^SHP("SUGSs",21)

^SHP("SUGSs",22)

^SHP("SUGSs",23)

^SHP("SUGSs",24)

^SHP("SUGSs",25)

^SHP("SUGSs",26)

^SHP("SUGSs",27)

^SHP("SUGSs",28)

^SHP("SUGSs",29)

^SHP("SUGSs",30)

^SHP("SUGSs",31)

^SHP("SUGSs",32)

^SHP("SUGSs",33)

^SHP("SUGSs",34)

^SHP("SUGSs",35)

^SHP("SUGSs",36)

^SHP("SUGSs",37)

^SHP("SUGSs",38)

^SHP("SUGSs",39)

^SHP("SUGSs",40)

^SHP("SUGSs",41)

^SHP("SUGSs",42)

^SHP("SUGSs",43)

^SHP("SUGSs",44)

^SHP("SUGSs",45)

^SHP("SUGSs",46)

^SHP("SUGSs",47)

^SHP("SUGSs",48)

^SHP("SUGSs",49)

^SHP("SUGSs",50)

^SHP("SUGSs",51)

^SHP("SUGSs",52)

^SHP("SUGSs",53)
                                                           $ 
^SHP("SUGSs",54)
                          -----------------------------------
^SHP("SUGSs",55)
                                                                               
^SHP("SUGSs","RG")
H
^SHP("TBNOSFs")

^SHP("TBNOSFs",1)
                 08.17 ixehwt 'uieecpqa zexqegy qia oz zepnfd zniyx            
^SHP("TBNOSFs",2)
                                                                               
^SHP("TBNOSFs",3)
                                -------------
^SHP("TBNOSFs",4)
                                | 10B zpnfd |                                  
^SHP("TBNOSFs",5)
                                -------------
^SHP("TBNOSFs",6)
                                $TTTTTTTTTTT:1
^SHP("TBNOSFs",7)

^SHP("TBNOSFs",8)

^SHP("TBNOSFs",9)

^SHP("TBNOSFs",10)

^SHP("TBNOSFs",11)

^SHP("TBNOSFs",12)

^SHP("TBNOSFs",13)

^SHP("TBNOSFs",14)

^SHP("TBNOSFs",15)

^SHP("TBNOSFs",16)

^SHP("TBNOSFs",17)

^SHP("TBNOSFs",18)

^SHP("TBNOSFs",19)

^SHP("TBNOSFs",20)

^SHP("TBNOSFs",21)

^SHP("TBNOSFs",22)

^SHP("TBNOSFs",23)

^SHP("TBNOSFs",24)

^SHP("TBNOSFs",25)

^SHP("TBNOSFs",26)

^SHP("TBNOSFs",27)

^SHP("TBNOSFs",28)

^SHP("TBNOSFs",29)

^SHP("TBNOSFs",30)

^SHP("TBNOSFs",31)

^SHP("TBNOSFs",32)

^SHP("TBNOSFs",33)

^SHP("TBNOSFs",34)

^SHP("TBNOSFs",35)

^SHP("TBNOSFs",36)

^SHP("TBNOSFs",37)

^SHP("TBNOSFs",38)

^SHP("TBNOSFs",39)

^SHP("TBNOSFs",40)

^SHP("TBNOSFs",41)

^SHP("TBNOSFs",42)

^SHP("TBNOSFs",43)

^SHP("TBNOSFs",44)

^SHP("TBNOSFs",45)

^SHP("TBNOSFs",46)

^SHP("TBNOSFs",47)

^SHP("TBNOSFs",48)

^SHP("TBNOSFs",49)

^SHP("TBNOSFs",50)

^SHP("TBNOSFs",51)

^SHP("TBNOSFs",52)

^SHP("TBNOSFs",53)
                                           $ 
^SHP("TBNOSFs",54)
                                -------------
^SHP("TBNOSFs","RG")
H
^SHP("TBNOTBs")

^SHP("TBNOTBs",1)
                           08.17 qia oz geca oi`y qia oz zepnfd zniyx          
^SHP("TBNOTBs",2)
                                                                               
^SHP("TBNOTBs",3)
    -------------------------------------------------------------------------
^SHP("TBNOTBs",4)
    | 'lyn .nc |  mekq  | dryl | jix`zl | -a dlawzd | t-q zpnfd | 10B zpnfd |  
^SHP("TBNOTBs",5)
    -------------------------------------------------------------------------
^SHP("TBNOTBs",6)
    $   9999.99:99999.99:TTTTTT:99999999:TTTTTTTTTTT:TTTTTTTTTTT:TTTTTTTTTTT:1
^SHP("TBNOTBs",7)

^SHP("TBNOTBs",8)

^SHP("TBNOTBs",9)

^SHP("TBNOTBs",10)

^SHP("TBNOTBs",11)

^SHP("TBNOTBs",12)

^SHP("TBNOTBs",13)

^SHP("TBNOTBs",14)

^SHP("TBNOTBs",15)

^SHP("TBNOTBs",16)

^SHP("TBNOTBs",17)

^SHP("TBNOTBs",18)

^SHP("TBNOTBs",19)

^SHP("TBNOTBs",20)

^SHP("TBNOTBs",21)

^SHP("TBNOTBs",22)

^SHP("TBNOTBs",23)

^SHP("TBNOTBs",24)

^SHP("TBNOTBs",25)

^SHP("TBNOTBs",26)

^SHP("TBNOTBs",27)

^SHP("TBNOTBs",28)

^SHP("TBNOTBs",29)

^SHP("TBNOTBs",30)

^SHP("TBNOTBs",31)

^SHP("TBNOTBs",32)

^SHP("TBNOTBs",33)

^SHP("TBNOTBs",34)

^SHP("TBNOTBs",35)

^SHP("TBNOTBs",36)

^SHP("TBNOTBs",37)

^SHP("TBNOTBs",38)

^SHP("TBNOTBs",39)

^SHP("TBNOTBs",40)

^SHP("TBNOTBs",41)

^SHP("TBNOTBs",42)

^SHP("TBNOTBs",43)

^SHP("TBNOTBs",44)

^SHP("TBNOTBs",45)

^SHP("TBNOTBs",46)

^SHP("TBNOTBs",47)

^SHP("TBNOTBs",48)

^SHP("TBNOTBs",49)

^SHP("TBNOTBs",50)

^SHP("TBNOTBs",51)

^SHP("TBNOTBs",52)

^SHP("TBNOTBs",53)
                                                                           $ 
^SHP("TBNOTBs",54)
    -------------------------------------------------------------------------
^SHP("TBNOTBs",55)
                                                                               
^SHP("TBNOTBs","RG")
H
^SHP("TCH")
'uh ikqn zlrtd
^SHP("TCH",1)
                                         .'uh zkxrn zwtdl zelert xcq           
^SHP("TCH",1,"%TOP")
41
^SHP("TCH",2)
                                         ---------------------------           
^SHP("TCH",2,"%TOP")
41
^SHP("TCH",3)
                                                                               
^SHP("TCH",3,"%TOP")
79
^SHP("TCH",4)
              : zecewt micilwn  ">>" PRPOMPT-a MG micilwn (TTY1) leqpewa .1    
^SHP("TCH",4,"%TOP")
14
^SHP("TCH",5)
           -----------------------------------------------------------         
^SHP("TCH",5,"%TOP")
11
^SHP("TCH",6)
                                                                               
^SHP("TCH",6,"%TOP")
79
^SHP("TCH",7)
      m` ) 15 e` 1 = rav ,PC = seqn beq <-  ALL PORTS DEFINITIONS <- TCH       
^SHP("TCH",7,"%TOP")
6
^SHP("TCH",8)
                                                   ( 'upi` 15 jqn              
^SHP("TCH",8,"%TOP")
51
^SHP("TCH",9)
                               zyx iteqn lkl mb dnec dcewt mirvan              
^SHP("TCH",9,"%TOP")
31
^SHP("TCH",10)
                                                                               
^SHP("TCH",10,"%TOP")
79
^SHP("TCH",11)
  1      PC       CONSOLE   -    ( zephw zeize` ) /DEV/TTY1      1             
^SHP("TCH",11,"%TOP")
2
^SHP("TCH",12)
              llx`t zqtcn                          /DEV/LP0      3             
^SHP("TCH",12,"%TOP")
14
^SHP("TCH",13)
  0     PC1          mcen                        /DEV/TTYS0      4             
^SHP("TCH",13,"%TOP")
2
^SHP("TCH",14)
                                                                               
^SHP("TCH",14,"%TOP")
79
^SHP("TCH",15)
 1/0  VT520 milibx miteqn    /DEV/TTYMI... e` /DEV/TTYM...  19 -11             
^SHP("TCH",15,"%TOP")
1
^SHP("TCH",16)
  1      PC                 /DEV/PTS/0 - /DEV/PTS/8 - 'uhl                     
^SHP("TCH",16,"%TOP")
2
^SHP("TCH",17)
                                                                               
^SHP("TCH",17,"%TOP")
79
^SHP("TCH",18)
  1      PC il`ehxie seqn                        /DEV/VC/2      20             
^SHP("TCH",18,"%TOP")
2
^SHP("TCH",19)
                                                                               
^SHP("TCH",19,"%TOP")
79
^SHP("TCH",20)
           zeil`ixq zeqtcn              /DEV/TTYM0 - TTYM8   29-21             
^SHP("TCH",20,"%TOP")
11
^SHP("TCH",21)
                                                                               
^SHP("TCH",21,"%TOP")
79
^SHP("TCH",22)
          -----------------------------------------------------------          
^SHP("TCH",22,"%TOP")
10
^SHP("TCH",23)
                      P1PRMN micilwn MG-a e` zexy zeipkez Z-n milirtn          
^SHP("TCH",23,"%TOP")
22
^SHP("TCH",24)
                                                                               
^SHP("TCH",24,"%TOP")
79
^SHP("TCH",25)
 ( %L1DEV-n) hxet 'qn mikiiyn (13 vte`) zepeayg zqtcnl mixhnxt zxcbda          
^SHP("TCH",25,"%TOP")
1
^SHP("TCH",26)
                                                 zepeayg   zqtcn 'qnl          
^SHP("TCH",26,"%TOP")
49
^SHP("TCH",27)
                                                                               
^SHP("TCH",27,"%TOP")
79
^SHP("TCH",28)
     -1 zqtcn 'qn mr (il`ehxie lpinxh - /DEV/VC/2) 20 hxet mb mixicbn          
^SHP("TCH",28,"%TOP")
5
^SHP("TCH",29)
                                                                               
^SHP("TCH",29,"%TOP")
79
^SHP("TCH",30)
          -----------------------------------------------------------          
^SHP("TCH",30,"%TOP")
10
^SHP("TCH",31)
      mr (1) leqpew mixicbn (zexy zeipkezn) 'uh zecnrl mixhnxt zxbcda          
^SHP("TCH",31,"%TOP")
6
^SHP("TCH",32)
                                                       5 'uh hxet 'qn          
^SHP("TCH",32,"%TOP")
55
^SHP("TCH",33)
                                                                               
^SHP("TCH",33,"%TOP")
79
^SHP("TCH",34)
                        4 'uh hxet 'qn mr (20) ilehxie lpinxh mixicbn          
^SHP("TCH",34,"%TOP")
24
^SHP("TCH",35)
                                                                               
^SHP("TCH",35,"%TOP")
79
^SHP("TCH",36)
         (-1)-l 'uh hxet mixicbn 'uh mr micaery (19 - 11) miteqnd x`y          
^SHP("TCH",36,"%TOP")
9
^SHP("TCH",37)
                                                                               
^SHP("TCH",37,"%TOP")
79
^SHP("TCH",38)
                 mirvan 'rbn jqnl zexcbd xefgy' divte`a zexy zeipkeza          
^SHP("TCH",38,"%TOP")
17
^SHP("TCH",39)
                             ( miteqndn cg`e leqpewa wx witqn ) oeeiw          
^SHP("TCH",39,"%TOP")
29
^SHP("TCH",40)
                                                                               
^SHP("TCH",40,"%TOP")
79
^SHP("TCH",41)
                           ( ALT+F3) 3 oelga oeeiw zpkez mirvan seqna          
^SHP("TCH",41,"%TOP")
27
^SHP("TCH",42)
                                                                               
^SHP("TCH",42,"%TOP")
79
^SHP("TCH",43)
          -----------------------------------------------------------          
^SHP("TCH",43,"%TOP")
10
^SHP("TCH",44)
                                                                               
^SHP("TCH",44,"%TOP")
79
^SHP("TCH",45)
                       P1CRDTCH dpkez ihnehe` zlrten 2 oelga seqn lka          
^SHP("TCH",45,"%TOP")
23
^SHP("TCH",46)
                             oexkif-e`cie & 'uh mr dpekp dcear zwtqny          
^SHP("TCH",46,"%TOP")
29
^SHP("TCH",47)
                                                                               
^SHP("TCH",47,"%TOP")
79
^SHP("TCH",48)
         ------------------------------------------------------------          
^SHP("TCH",48,"%TOP")
9
^SHP("TCH",49)
                : zeixwi zeaiq 2 zeidl lki dfl zevigll aibn `l 'uh m`          
^SHP("TCH",49,"%TOP")
16
^SHP("TCH",50)
                                                                               
^SHP("TCH",50,"%TOP")
79
^SHP("TCH",51)
                    P1CRDTCH dpkez cearl dwiqtd (ALT+F2) 2 oelga - (`          
^SHP("TCH",51,"%TOP")
20
^SHP("TCH",52)
                                                                               
^SHP("TCH",52,"%TOP")
79
^SHP("TCH",53)
                                            ycgn dpkez lirtrl `p               
^SHP("TCH",53,"%TOP")
44
^SHP("TCH",54)
                                                                               
^SHP("TCH",54,"%TOP")
79
^SHP("TCH",55)
                        'uh ikqn ly mixhnxt uaew oekp `l e` wgnp - (a          
^SHP("TCH",55,"%TOP")
24
^SHP("TCH",56)
                                                                               
^SHP("TCH",56,"%TOP")
79
^SHP("TCH",57)
                     xexy zeipkeza rbn jqnl zexcbd xefgy rval `p               
^SHP("TCH",57,"%TOP")
21
^SHP("TCH",58)
                                     seqn eze`a (ALT+F3) 3 oelga               
^SHP("TCH",58,"%TOP")
37
^SHP("TCH","RG")
H
^SHP("TCH1")

^SHP("TCH1",1)
                                                                               
^SHP("TCH1",2)
                 : ze`ad zelert zrvan (^P1RBUA , ^%L1NMB) hp`ilw zpkez         
^SHP("TCH1",3)
                                                                               
^SHP("TCH1",4)
                                               : $$INIT^%L2MOUSE-l z`xew .1    
^SHP("TCH1",5)
                                                                               
^SHP("TCH1",6)
        ^P1PRM("TOUCH",$P,"PORT") 'u`h hxet (!)xtqn dxicbn (`                  
^SHP("TCH1",7)
                                                                               
^SHP("TCH1",8)
                                seqn df - 0-n zegt hxet m`                     
^SHP("TCH1",9)
                                                                               
^SHP("TCH1",10)
                                    'u`z oi` - 0 = hxet m`                     
^SHP("TCH1",11)
                                                                               
^SHP("TCH1",12)
    VIRTUAL TERMINAL & (/DEV/TTY1/) CONSOLE -l wx 0 < hxet                     
^SHP("TCH1",13)
                                                    (VC/2)                     
^SHP("TCH1",14)
                                                                               
^SHP("TCH1",15)
                             eze` zgzet dpkez 0 < hxet m`  (a                  
^SHP("TCH1",16)
                                                                               
^SHP("TCH1",17)
  `ed m` elit` ) hxetl %XMIN, %XMAX, %YMIN , %YMAX  dxicbn (b                  
^SHP("TCH1",18)
                                                 ( ! ilily                     
^SHP("TCH1",19)
                                                                               
^SHP("TCH1",20)
   zeize`- ^DEV(hxet xtqn) ] 'u`h hxet dxicbn ( 0 < `ed m`) hxet 'qn itl .2    
^SHP("TCH1",21)
                                                                 [ zephw       
^SHP("TCH1",22)
                                                                               
^SHP("TCH1",23)
  %CRD=$$REPORT^%L2MOUSE(%PORT,%XMIN,%XMAX,%YMIN,%YMAX) rbn ly X,Y zlawn .3    
^SHP("TCH1",24)
                                                               X,Y dxeva       
^SHP("TCH1",25)
                                                                               
^SHP("TCH1",26)
                                                0 `id d`vez rbn did `l m`      
^SHP("TCH1",27)
                                                                               
^SHP("TCH1",28)
                  : ze`ad zelert zrvan dpkez ( miteqn ) ilily hxet 'qn m`      
^SHP("TCH1",29)
                                                                               
^SHP("TCH1",30)
                             POS=$$POS^%L2MOUSE : dcnr ly ID dxicbn  (`        
^SHP("TCH1",31)
                                                                               
^SHP("TCH1",32)
  LINUX zpkez ici lr xvepy ) WSSTAT.LOG uaewn zgwel dpkez seqn ly ID           
^SHP("TCH1",33)
                    WSSTAT.LOG uaew z`xew ^%L1DEFWS dpkez . ( WSSTAT           
^SHP("TCH1",34)
     zeize`)  ^DEVI2(POS)=PORT -e ^DEVI1(PORT)=POS  MUMPS ivaw dpeae           
^SHP("TCH1",35)
                                                              (zephw           
^SHP("TCH1",36)
                                                                               
^SHP("TCH1",37)
                                S CRD=^CRDTCH(POS)  0-n dpey POS m`            
^SHP("TCH1",38)
                                                                               
^SHP("TCH1",39)
                                              CRD="?"  rbn did `l m`           
^SHP("TCH1",40)
                                                                               
^SHP("TCH1",41)
              dvxy TV^P1CRDTCH dpkez zwtqn ^CRDTCH(POS)-a mizicxe`ew           
^SHP("TCH1",42)
                           ^P1CRDTCH dpkezn zlrtene   BACKGROUND-a             
^SHP("TCH1",43)
                                                                               
^SHP("TCH1",44)
           %CRD=$$REPORT^%L2MOUSE(%PORT,%XMIN,%XMAX,%YMIN,%YMAX)               
^SHP("TCH1",45)
                                                                               
^SHP("TCH1",46)
                   (VC/2) VIRTUAL TERMINAL ly hxet - %PORT dti`                
^SHP("TCH1",47)
                                                                               
^SHP("TCH1",48)
                                                                               
^SHP("TCH1","RG")
H
^SHP("THVs")

^SHP("THVs",1)
                                # dxard zcerz #                                
^SHP("THVs",2)
                                                                               
^SHP("THVs",3)
                        #&50  >#     #&01     ># 'qn dcerz                     
^SHP("THVs",4)
                                                                               
^SHP("THVs",5)
                                                   &02      > : jix`z          
^SHP("THVs",6)
                                                                               
^SHP("THVs",7)
                &06                             > &05       > : gewln          
^SHP("THVs",8)
                &11                             > &10       > : gewll          
^SHP("THVs",9)
                                                                               
^SHP("THVs",10)
                                                                               
^SHP("THVs",11)
                                                                               
^SHP("THVs",12)
                                    #&20      ># :dxardl mekq                  
^SHP("THVs",13)
                                                                               
^SHP("THVs",14)
                                                                               
^SHP("THVs",15)
                                                                               
^SHP("THVs",16)
                &25                                           >: dxrd          
^SHP("THVs",17)
                                                                               
^SHP("THVs",18)
                                                                               
^SHP("THVs",19)
                                                                               
^SHP("THVs",20)
                                                   ___________: dnizg          
^SHP("THVs","RG")
H
^SHP("TRRD",1)
                             &05             : xeciyl dpkd onf                 
^SHP("TRRD",2)
                                                                               
^SHP("TRRL",1)
                             &05             : xeciyl dpkd onf                 
^SHP("TRRL","P5")
16
^SHP("TZK1s")
dxv zqtcn
^SHP("TZK1s",1)
                                        &04                                 >  
^SHP("TZK1s",1,"%TOP")
40
^SHP("TZK1s",2)
                                               &02                          >  
^SHP("TZK1s",2,"%TOP")
47
^SHP("TZK1s",3)
                                                         &71        > :   'lh  
^SHP("TZK1s",3,"%TOP")
57
^SHP("TZK1s",4)
                                        &74                         > : l"`ec  
^SHP("TZK1s",4,"%TOP")
40
^SHP("TZK1s",5)
                                                     &77        >  dyxen wqer  
^SHP("TZK1s",5,"%TOP")
53
^SHP("TZK1s",6)
                                                                               
^SHP("TZK1s",6,"%TOP")
79
^SHP("TZK1s",7)
                                           &79                            >    
^SHP("TZK1s",7,"%TOP")
43
^SHP("TZK1s",8)
                                                                               
^SHP("TZK1s",8,"%TOP")
79
^SHP("TZK1s",9)
                                           #&78     >#                         
^SHP("TZK1s",9,"%TOP")
43
^SHP("TZK1s",10)
                                           #&01            >#                  
^SHP("TZK1s",10,"%TOP")
43
^SHP("TZK1s",11)
                                              #&03   > 'qn#                    
^SHP("TZK1s",11,"%TOP")
46
^SHP("TZK1s",12)
                                                 #&05    ># jix`zl             
^SHP("TZK1s",12,"%TOP")
49
^SHP("TZK1s",13)
                              &24                               >              
^SHP("TZK1s",13,"%TOP")
30
^SHP("TZK1s",14)
                                                                         ceakl 
^SHP("TZK1s",14,"%TOP")
73
^SHP("TZK1s",15)
                                                  &08                        > 
^SHP("TZK1s",15,"%TOP")
50
^SHP("TZK1s",16)
                                                     &80         > n.r/f.z/t.g 
^SHP("TZK1s",16,"%TOP")
53
^SHP("TZK1s",17)
                                                  &73                        > 
^SHP("TZK1s",17,"%TOP")
50
^SHP("TZK1s",18)
                                                         &75           > : 'lh 
^SHP("TZK1s",18,"%TOP")
57
^SHP("TZK1s",19)
                                                 #&07       ># gewl xtqn       
^SHP("TZK1s",19,"%TOP")
49
^SHP("TZK1s",20)
                                                                               
^SHP("TZK1s",20,"%TOP")
79
^SHP("TZK1s",21)
                                        --------------------------------------
^SHP("TZK1s",21,"%TOP")
40
^SHP("TZK1s",22)
                                        :n"rn llek:        dxrd    :n"rn iptl: 
^SHP("TZK1s",22,"%TOP")
40
^SHP("TZK1s",23)
                                        --------------------------------------
^SHP("TZK1s",23,"%TOP")
40
^SHP("TZK1s",24)
                                        :$99999.99:TP              : 99999.99:1
^SHP("TZK1s",24,"%TOP")
40
^SHP("TZK1s",25)

^SHP("TZK1s",25,"%TOP")
0
^SHP("TZK1s",26)

^SHP("TZK1s",26,"%TOP")
0
^SHP("TZK1s",27)

^SHP("TZK1s",27,"%TOP")
0
^SHP("TZK1s",28)

^SHP("TZK1s",28,"%TOP")
0
^SHP("TZK1s",29)

^SHP("TZK1s",29,"%TOP")
0
^SHP("TZK1s",30)
                                                                               
^SHP("TZK1s",30,"%TOP")
79
^SHP("TZK1s",31)
                                                                               
^SHP("TZK1s",31,"%TOP")
79
^SHP("TZK1s",32)
                                                                               
^SHP("TZK1s",32,"%TOP")
79
^SHP("TZK1s",33)
                                                                              $
^SHP("TZK1s",33,"%TOP")
78
^SHP("TZK1s",34)
                                         --------------------------------------
^SHP("TZK1s",34,"%TOP")
41
^SHP("TZK1s",35)
                                          &09     >  :      k"dq               
^SHP("TZK1s",35,"%TOP")
42
^SHP("TZK1s",36)
                                          &10     >  : n"rn llek               
^SHP("TZK1s",36,"%TOP")
42
^SHP("TZK1s",37)
                                          &12     >  : &11% dgpd               
^SHP("TZK1s",37,"%TOP")
42
^SHP("TZK1s",38)
                                          &13     >  :  g"y dgpd               
^SHP("TZK1s",38,"%TOP")
42
^SHP("TZK1s",39)
                                          &14     >  : gelyn inc               
^SHP("TZK1s",39,"%TOP")
42
^SHP("TZK1s",40)
                                          &15     >  : lebir                   
^SHP("TZK1s",40,"%TOP")
42
^SHP("TZK1s",41)
                                          &16     >  : n"rn iptl               
^SHP("TZK1s",41,"%TOP")
42
^SHP("TZK1s",42)
                                          &18     >  :      n"rn               
^SHP("TZK1s",42,"%TOP")
42
^SHP("TZK1s",43)
                                           #&19     ># : n"rn llek             
^SHP("TZK1s",43,"%TOP")
43
^SHP("TZK1s",44)
                                                                               
^SHP("TZK1s",44,"%TOP")
79
^SHP("TZK1s",45)
                                           #&17     ># &44         >           
^SHP("TZK1s",45,"%TOP")
43
^SHP("TZK1s",46)
                                                                               
^SHP("TZK1s",46,"%TOP")
79
^SHP("TZK1s",47)
                                         &70                                  >
^SHP("TZK1s",47,"%TOP")
41
^SHP("TZK1s",48)
                                         &30                                  >
^SHP("TZK1s",48,"%TOP")
41
^SHP("TZK1s",49)
                                                                               
^SHP("TZK1s",49,"%TOP")
79
^SHP("TZK1s",50)
                                               ____________ dnizg         
^SHP("TZK1s",50,"%TOP")
47
^SHP("TZK1s",51)
                                                                               
^SHP("TZK1s",51,"%TOP")
79
^SHP("TZK1s",52)
                                                                               
^SHP("TZK1s",52,"%TOP")
79
^SHP("TZK1s",53)
                                                                               
^SHP("TZK1s",53,"%TOP")
79
^SHP("TZK1s","RG")
H
^SHP("TZKs")

^SHP("TZKs",1)
                                               &02                          >  
^SHP("TZKs",1,"%TOP")
47
^SHP("TZKs",2)
                                                              &71        >:lh  
^SHP("TZKs",2,"%TOP")
62
^SHP("TZKs",3)
                                                     &77        >  dyxen wqer  
^SHP("TZKs",3,"%TOP")
53
^SHP("TZKs",4)
                                                                               
^SHP("TZKs",4,"%TOP")
79
^SHP("TZKs",5)
       &79                             >                                       
^SHP("TZKs",5,"%TOP")
7
^SHP("TZKs",6)
                                                                               
^SHP("TZKs",6,"%TOP")
79
^SHP("TZKs",7)
      #&78       >#                                                            
^SHP("TZKs",7,"%TOP")
6
^SHP("TZKs",8)
      &05     > jix`zl         #&24&76  >&01        >#                         
^SHP("TZKs",8,"%TOP")
6
^SHP("TZKs",9)
                                                                               
^SHP("TZKs",9,"%TOP")
79
^SHP("TZKs",10)
                                                                       ceakl   
^SHP("TZKs",10,"%TOP")
71
^SHP("TZKs",11)
                                      &08                                  >   
^SHP("TZKs",11,"%TOP")
38
^SHP("TZKs",12)
                                      &73                                  >   
^SHP("TZKs",12,"%TOP")
38
^SHP("TZKs",13)
                                                         &75           > :lh   
^SHP("TZKs",13,"%TOP")
57
^SHP("TZKs",14)
                                                         &07     > gewl xtqn   
^SHP("TZKs",14,"%TOP")
57
^SHP("TZKs",15)
                                                                               
^SHP("TZKs",15,"%TOP")
79
^SHP("TZKs",16)
       -----------------------------------------------------------------------
^SHP("TZKs",16,"%TOP")
7
^SHP("TZKs",17)
       :   mekq   :                   x e ` z                    :   mekq    : 
^SHP("TZKs",17,"%TOP")
7
^SHP("TZKs",18)
       : nrn llek :                                              : n"rn `ll  : 
^SHP("TZKs",18,"%TOP")
7
^SHP("TZKs",19)
       -----------------------------------------------------------------------
^SHP("TZKs",19,"%TOP")
7
^SHP("TZKs",20)
       :$99999.99 :   TP                                         :  99999.99 :1
^SHP("TZKs",20,"%TOP")
7
^SHP("TZKs",21)

^SHP("TZKs",21,"%TOP")
0
^SHP("TZKs",22)

^SHP("TZKs",22,"%TOP")
0
^SHP("TZKs",23)

^SHP("TZKs",23,"%TOP")
0
^SHP("TZKs",24)

^SHP("TZKs",24,"%TOP")
0
^SHP("TZKs",25)

^SHP("TZKs",25,"%TOP")
0
^SHP("TZKs",26)

^SHP("TZKs",26,"%TOP")
0
^SHP("TZKs",27)

^SHP("TZKs",27,"%TOP")
0
^SHP("TZKs",28)

^SHP("TZKs",28,"%TOP")
0
^SHP("TZKs",29)

^SHP("TZKs",29,"%TOP")
0
^SHP("TZKs",30)

^SHP("TZKs",30,"%TOP")
0
^SHP("TZKs",31)

^SHP("TZKs",31,"%TOP")
0
^SHP("TZKs",32)

^SHP("TZKs",32,"%TOP")
0
^SHP("TZKs",33)

^SHP("TZKs",33,"%TOP")
0
^SHP("TZKs",34)

^SHP("TZKs",34,"%TOP")
0
^SHP("TZKs",35)

^SHP("TZKs",35,"%TOP")
0
^SHP("TZKs",36)

^SHP("TZKs",36,"%TOP")
0
^SHP("TZKs",37)

^SHP("TZKs",37,"%TOP")
0
^SHP("TZKs",38)

^SHP("TZKs",38,"%TOP")
0
^SHP("TZKs",39)
                                                                            $ 
^SHP("TZKs",39,"%TOP")
76
^SHP("TZKs",40)
       ------------------------------------------------------------------------
^SHP("TZKs",40,"%TOP")
7
^SHP("TZKs",41)
                                                                               
^SHP("TZKs",41,"%TOP")
79
^SHP("TZKs",42)
                                                       &15      >   n"rn `ll   
^SHP("TZKs",42,"%TOP")
55
^SHP("TZKs",43)
                                                       &18      >       n"rn   
^SHP("TZKs",43,"%TOP")
55
^SHP("TZKs",44)
                                                       &19      >  n"rn llek   
^SHP("TZKs",44,"%TOP")
55
^SHP("TZKs",45)
                                                                               
^SHP("TZKs",45,"%TOP")
79
^SHP("TZKs",46)
                                           #&17      ># &44      >             
^SHP("TZKs",46,"%TOP")
43
^SHP("TZKs",47)
                                                                               
^SHP("TZKs",47,"%TOP")
79
^SHP("TZKs",48)
                            &70                                              > 
^SHP("TZKs",48,"%TOP")
28
^SHP("TZKs",49)
                            &30                                              > 
^SHP("TZKs",49,"%TOP")
28
^SHP("TZKs",50)
                                                                               
^SHP("TZKs",50,"%TOP")
79
^SHP("TZKs",51)
                                                                               
^SHP("TZKs",51,"%TOP")
79
^SHP("TZKs",52)
                       ____________ dnizg                                
^SHP("TZKs",52,"%TOP")
23
^SHP("TZKs",53)
                                                                               
^SHP("TZKs",53,"%TOP")
79
^SHP("TZKs",54)
                                                                               
^SHP("TZKs",54,"%TOP")
79
^SHP("TZKs","RG")
H
^SHP("V020107")

^SHP("V020107",1)
                    miycg mixac zniyx 
^SHP("V020107",1,"%TOP")
20
^SHP("V020107",2)
                    ------------------ 
^SHP("V020107",2,"%TOP")
20
^SHP("V020107",3)

^SHP("V020107",3,"%TOP")
0
^SHP("V020107",4)
          ( 0 - mieqn xign cr dtwd lebir" xhnxt )  tihk qipkdl gewl yelzn scer
^SHP("V020107",4,"%TOP")
10
^SHP("V020107",5)
         zwtdl mixhnxt `lnl + "dpzn" - ogley beq)             dpzn yelz `ivedl
^SHP("V020107",5,"%TOP")
9
^SHP("V020107",6)
         (ze`lah) dpzn yelz                                                    
^SHP("V020107",6,"%TOP")
9
^SHP("V020107",7)
                                        zelawe zeipeayg itl dxzi : zegewl zlah 
^SHP("V020107",7,"%TOP")
40
^SHP("V020107",8)
                                     mcen mixhnxt - dpri mceny cr milevliv 'qn
^SHP("V020107",8,"%TOP")
37
^SHP("V020107",9)
                           ^PL("MASTERK")=1 xhnxt -   cxk`xyil xhqn oia cixtdl
^SHP("V020107",9,"%TOP")
27
^SHP("V020107",10)
                        ^P1PRM("HZMLKHN")=1 xhnxt -   gahna dpnfdd lr gewld my
^SHP("V020107",10,"%TOP")
24
^SHP("V020107",11)
                                                                               
^SHP("V020107",11,"%TOP")
79
^SHP("V020107",12)
                    epwezy ze`iby zniyx 
^SHP("V020107",12,"%TOP")
20
^SHP("V020107",13)
                    -------------------- 
^SHP("V020107",13,"%TOP")
20
^SHP("V020107",14)
                           owez - clwedy itk `le hixt 'qn itl ziwqr dgex`a xcq 
^SHP("V020107",14,"%TOP")
27
^SHP("V020107",15)
                                                                               
^SHP("V020107",15,"%TOP")
79
^SHP("V020107","RG")
H
^SHP("V020108",1)
                    miycg mixac zniyx 
^SHP("V020108",1,"%TOP")
20
^SHP("V020108",2)
                    ------------------ 
^SHP("V020108",2,"%TOP")
20
^SHP("V020108",3)

^SHP("V020108",3,"%TOP")
0
^SHP("V020108",4)
                                                   tihk qipkdl gewl yelzn scer
^SHP("V020108",4,"%TOP")
51
^SHP("V020108",5)
                                                              dpzn yelz `ivedl
^SHP("V020108",5,"%TOP")
62
^SHP("V020108",6)
                                          zepeayg itl dxzi zegewl zlahl qipkdl
^SHP("V020108",6,"%TOP")
42
^SHP("V020108",7)
                                                    dpri mceny cr milevliv 'qn
^SHP("V020108",7,"%TOP")
52
^SHP("V020108",8)
                                                                    FIRE -> UP
^SHP("V020108",8,"%TOP")
68
^SHP("V020108",9)
                                                     cxk`xyi`e xhqn oia cixtdl
^SHP("V020108",9,"%TOP")
53
^SHP("V020108",10)
                                                      gahna dpnfdd lr gewld my
^SHP("V020108",10,"%TOP")
54
^SHP("V020108",11)
                    epwezy ze`iby zniyx 
^SHP("V020108",11,"%TOP")
20
^SHP("V020108",12)
                    -------------------- 
^SHP("V020108",12,"%TOP")
20
^SHP("V020108",13)
                                                  hixt 'qn itl hqa xcq - P1AIO
^SHP("V020108",13,"%TOP")
50
^SHP("V020108",14)
                                                               P1SBIT -> KILLZ
^SHP("V020108",14,"%TOP")
63
^SHP("V020108",15)
                                                                wng 'qna dvitw
^SHP("V020108",15,"%TOP")
64
^SHP("V020108",16)
                                                        zelhean zepnfd wgen `l
^SHP("V020108",16,"%TOP")
56
^SHP("V020108",17)
                                                          "-" mr hixt qitcn `l
^SHP("V020108",17,"%TOP")
58
^SHP("V020108",18)
                                             zegpd bivn hixtl zegpd zlah mewna
^SHP("V020108",18,"%TOP")
45
^SHP("V020108",19)
                                                             oeaygl zegpd  <--
^SHP("V020108",19,"%TOP")
61
^SHP("V020108",20)
                                                zxeywz lewehexta oekp `l jix`z
^SHP("V020108",20,"%TOP")
48
^SHP("V020108","RG")
H
^SHP("V020114")
14.01.02 dqxib
^SHP("V020114",1)
                    miycg mixac zniyx 
^SHP("V020114",1,"%TOP")
20
^SHP("V020114",2)
                    ------------------ 
^SHP("V020114",2,"%TOP")
20
^SHP("V020114",3)

^SHP("V020114",3,"%TOP")
0
^SHP("V020114",4)
                                             zayaygl dxardl mitih oeayg iztqed
^SHP("V020114",4,"%TOP")
45
^SHP("V020114",5)
                                                                               
^SHP("V020114",5,"%TOP")
79
^SHP("V020114",6)
                         xven ura <F7> - MLY xven ur mdl oi`y dtew ihixt zniyx
^SHP("V020114",6,"%TOP")
25
^SHP("V020114",7)
                                                                               
^SHP("V020114",7,"%TOP")
79
^SHP("V020114",8)
                                            ogley 'qnl xfeg onq - zei`tew zlah
^SHP("V020114",8,"%TOP")
44
^SHP("V020114",9)
                                                                               
^SHP("V020114",9,"%TOP")
79
^SHP("V020114",10)
                                        zepgley itl oein - migezt zepgley zbvd
^SHP("V020114",10,"%TOP")
40
^SHP("V020114",11)
                                                             oein zepyl - <F8>
^SHP("V020114",11,"%TOP")
61
^SHP("V020114",12)
                                                                               
^SHP("V020114",12,"%TOP")
79
^SHP("V020114",13)
                                           yi m` wx " dgpd `ll - *" dxrd zqtcd
^SHP("V020114",13,"%TOP")
43
^SHP("V020114",14)
                                                        dpnfda dgpd `ll mihixt
^SHP("V020114",14,"%TOP")
56
^SHP("V020114",15)
                                                                               
^SHP("V020114",15,"%TOP")
79
^SHP("V020114",16)
                                           dtwdd yelz qitcdl m`d xhnxt iztqed  
^SHP("V020114",16,"%TOP")
43
^SHP("V020114",17)
                                 [ ^P1PRM("PCTL")=1 ] gewldn yelz laewy dxwna 
^SHP("V020114",17,"%TOP")
33
^SHP("V020114",18)
                                                                               
^SHP("V020114",18,"%TOP")
79
^SHP("V020114",19)
                                                        `ln `"k 'qn wzra qitcn
^SHP("V020114",19,"%TOP")
56
^SHP("V020114",20)
                                                                               
^SHP("V020114",20,"%TOP")
79
^SHP("V020114",21)
                                          dycg dxeva ziwqr 'xr mr dcear izxtiy
^SHP("V020114",21,"%TOP")
42
^SHP("V020114",22)
                                                                               
^SHP("V020114",22,"%TOP")
79
^SHP("V020114",23)
                                       zncew dxzi ilae mr : gewl ly fkexn g"ec
^SHP("V020114",23,"%TOP")
39
^SHP("V020114",24)
                                                                               
^SHP("V020114",24,"%TOP")
79
^SHP("V020114",25)
                    epwezy ze`iby zniyx 
^SHP("V020114",25,"%TOP")
20
^SHP("V020114",26)
                    -------------------- 
^SHP("V020114",26,"%TOP")
20
^SHP("V020114",27)
                                            iha`tl` xcqa CTRL+P-a oelegn dqtcd
^SHP("V020114",27,"%TOP")
44
^SHP("V020114",28)
                                                                zixar did `l -
^SHP("V020114",28,"%TOP")
64
^SHP("V020114",29)
                                                                               
^SHP("V020114",29,"%TOP")
79
^SHP("V020114",30)
                                            a zerh - (zexnyn itl) 3 zxekyn beq
^SHP("V020114",30,"%TOP")
44
^SHP("V020114",31)
                                                        iyiy mei ly zery aeyig
^SHP("V020114",31,"%TOP")
56
^SHP("V020114",32)
                                                                               
^SHP("V020114",32,"%TOP")
79
^SHP("V020114",33)
                                                                               
^SHP("V020114",33,"%TOP")
79
^SHP("V020114",34)
                                                                               
^SHP("V020114",34,"%TOP")
79
^SHP("V020114","RG")
H
^SHP("V020121")

^SHP("V020121",1)
              creql rvenn mb zeeydl eiykr  xyt` - miyceg itl zexikn z`eeyd g"ec
^SHP("V020121",1,"%TOP")
14
^SHP("V020121",2)
                          xpwqd jxc gewl 'qn `exwl zexyt` - dpnfd + zegewl zlah
^SHP("V020121",2,"%TOP")
26
^SHP("V020121",3)
                                  (hixt cewa -25% lynl) hixtl dgpd % zzl zexyt`
^SHP("V020121",3,"%TOP")
34
^SHP("V020121",4)
                                                       19571710 - sqep illk cew
^SHP("V020121",4,"%TOP")
55
^SHP("V020121",5)
                                                                               
^SHP("V020121",5,"%TOP")
79
^SHP("V020121",6)
                                             epwezy ze`iby zniyx               
^SHP("V020121",6,"%TOP")
45
^SHP("V020121",7)
                                             -------------------               
^SHP("V020121",7,"%TOP")
45
^SHP("V020121",8)
                                                                               
^SHP("V020121",8,"%TOP")
79
^SHP("V020121",9)
                                                         12 yceg ly miaiig g"ec
^SHP("V020121",9,"%TOP")
57
^SHP("V020121",10)
                                                  dycg  zkxrn ly minelyza UNDEF
^SHP("V020121",10,"%TOP")
50
^SHP("V020121",11)
                                         mildpn zenx zlah itl mildpn zgpd zlabd
^SHP("V020121",11,"%TOP")
41
^SHP("V020121",12)
                                                                               
^SHP("V020121",12,"%TOP")
79
^SHP("V020121","RG")
H
^SHP("V020125",1)
                    miycg mixac zniyx 
^SHP("V020125",2)
                    ------------------ 
^SHP("V020125",3)

^SHP("V020125",4)
                    epwezy ze`iby zniyx 
^SHP("V020125",5)
                    -------------------- 
^SHP("V020128")
28.01.02 dqxib
^SHP("V020128",1)
                    miycg mixac zniyx 
^SHP("V020128",2)
                    ------------------ 
^SHP("V020128",3)

^SHP("V020128",4)
                                         rvenn zexyt` - zexikn ly iz`eeyd g"ec
^SHP("V020128",5)
                                                                         creql
^SHP("V020128",6)
                    epwezy ze`iby zniyx 
^SHP("V020128",7)
                    -------------------- 
^SHP("V020128",8)
                                         oekp ayig `l - 12 yceg ly miaiig g"ec
^SHP("V020128",9)
                                                                               
^SHP("V020128",10)
                                             dxey lka TAKE AWAY  dxrd qitcd `l
^SHP("V020128",11)
                                                                               
^SHP("V020128",12)
                                              aeh bivd `l - mililnz carnl dxfr
^SHP("V020128",13)
                                                                               
^SHP("V020128",14)
                              dti `l bivd -mipetlh 2 eid micaer zlaha caerl m`
^SHP("V020128",15)
                                                                               
^SHP("V020128",16)
                            !!! zetqez ayig `l "+"n dligzn dzid ztqezl dxrd m`
^SHP("V020128",17)
                                                                               
^SHP("V020128",18)
                                            TAW-a 100-n zegt micew dxw `l xpwq
^SHP("V020128",19)
                                                                               
^SHP("V020128",20)
                    oekp `l dcar dpkez - *,{,} mipniq llek gewl my m` migelyna 
^SHP("V020128",21)
                                                                               
^SHP("V020128",22)
                                    `ad dpnfda riten did `l gewl ly ciip oetlh
^SHP("V020128","RG")
H
^SHP("V020206")
06.02.02 dqxib
^SHP("V020206",1)
                    miycg mixac zniyx 
^SHP("V020206",2)
                    ------------------ 
^SHP("V020206",3)

^SHP("V020206",4)
                                          (i`ln) dqtcd ixg` dxard zecerz oewiz
^SHP("V020206",5)
                                                                               
^SHP("V020206",6)
                                               xzeie zeqtcn 3 -l qitcdl zexyt`
^SHP("V020206",7)
                                                                               
^SHP("V020206",8)
                                  90000 caer cr" zegkep oery zegeca lcgn zxixa
^SHP("V020206",9)
                                                                               
^SHP("V020206",10)
                  cxtpa zeipcie zeihneh` zeipeayg ze`xl zexyt` - zeipeayg g"ec 
^SHP("V020206",11)
                                                                               
^SHP("V020206",12)
                                                                               
^SHP("V020206",13)
                    epwezy ze`iby zniyx 
^SHP("V020206",14)
                    -------------------- 
^SHP("V020206",15)
                                                                               
^SHP("V020206",16)
                                miycg mihixt wx llek eiykr (dcrqn) xiw'vl jnqn 
^SHP("V020206",17)
                                                                               
^SHP("V020206",18)
                                                          dcar `l dxrda ziakek
^SHP("V020206",19)
                                                                               
^SHP("V020206",20)
                                           Z fekix g"eca zixara zxzek qitcd `l
^SHP("V020206",21)
                                                                               
^SHP("V020206",22)
                                                 gewl znwda zegewl zlaha d`iby
^SHP("V020206",23)
                                                                               
^SHP("V020206",24)
                                                  zipeayga zepnfd zenk bivd `l
^SHP("V020206",25)
                                                                               
^SHP("V020206",26)
             UNDEF d`iby zizhnehe` zipeayg did `le zipci zipeayg dzid gewll m` 
^SHP("V020206",27)
                                                                               
^SHP("V020206",28)
                                     dpyi dxeva fkexn zegewl g"ec zqtcda d`iby
^SHP("V020206",29)
                                                                               
^SHP("V020206","RG")
H
^SHP("V020210")
10.02.02 dqxib
^SHP("V020210",1)
                    miycg mixac zniyx 
^SHP("V020210",2)
                    ------------------ 
^SHP("V020210",3)

^SHP("V020210",4)
                         oebhwe`l -  zegec + mieyip & bef za/oa mikix`z iztqed
^SHP("V020210",5)
                                                                               
^SHP("V020210",6)
                                        ^P1PRM("CARD")=1 - TLV-l miqihxk zqtcd 
^SHP("V020210",7)
                                                                               
^SHP("V020210",8)
                                                       gewll mixywzn .1 : GATE 
^SHP("V020210",9)
                                             (MG ,MR ) UCI -l miqpkp .2        
^SHP("V020210",10)
                                        xfeg beigl oetlh 'qn micilwn .3        
^SHP("V020210",11)
                                     (MG,MR) UCI-l miqpkp mkly aygna .4        
^SHP("V020210",12)
                                                          XM micilwn .5        
^SHP("V020210",13)
                                 CTRL + C mivgel CONNECT + RING ixg` .6        
^SHP("V020210",14)
                                                                               
^SHP("V020210",15)
                                                                      ya       
^SHP("V020210",16)
                                                                               
^SHP("V020210",17)
                    epwezy ze`iby zniyx 
^SHP("V020210",18)
                    -------------------- 
^SHP("V020210",19)
                                          zipeayg zwtd ixg` oel`y zqtcd izlhia 
^SHP("V020210","RG")
H
^SHP("V020217")
17.02.02 dqxib
^SHP("V020217",1)
                         miycg mixac zniyx 
^SHP("V020217",2)
                        ------------------ 
^SHP("V020217",3)

^SHP("V020217",4)
                                                                     Z-a F6,F6
^SHP("V020217",5)
                                         S ^P1PRM("CARD")=1 dqipk iqihxk zqtcd
^SHP("V020217",6)
                                  (migelynl dpnfd mixhnxt) gelynl ilnipin xign
^SHP("V020217",7)
                                                                               
^SHP("V020217",8)
                                                                               
^SHP("V020217",9)
                             ze`iby oewiz                                      
^SHP("V020217",10)
                             -------------                                     
^SHP("V020217",11)
                                                                               
^SHP("V020217",12)
                                         gelyn 'z itl i`ln zipeayg zwtd izpwiz 
^SHP("V020217",13)
                                           i`lndn zipeayg i`vedl zexyt` izxfgd 
^SHP("V020217",14)
                         cew mewna dcigi my eiykr qitcn (i`ln) gelyn 'z zqtcda 
^SHP("V020217","RG")
H
^SHP("V020224")
24.02.02 dqxib
^SHP("V020224",1)
                    miycg mixac zniyx 
^SHP("V020224",2)
                    ------------------ 
^SHP("V020224",3)

^SHP("V020224",4)
                                                           gelynl ilnipin xign
^SHP("V020224",5)
                    epwezy ze`iby zniyx 
^SHP("V020224",6)
                    -------------------- 
^SHP("V020224",7)
                                                   oekp did `l Y2-a micreq 'qn
^SHP("V020224",8)
                                        (i`ln) cew-xa zwicaa d`iby - hixt znwd
^SHP("V020224",9)
                                            `"k zwical xg` aygnn zxeywza d`iby
^SHP("V020224","RG")
H
^SHP("V020310")

^SHP("V020310",1)
                    miycg mixac zniyx 
^SHP("V020310",2)
                    ------------------ 
^SHP("V020310",3)
                                          zegewl itl zepnfd g"ec izxtiy        
^SHP("V020310",4)

^SHP("V020310",5)
                    epwezy ze`iby zniyx 
^SHP("V020310",6)
                    -------------------- 
^SHP("V020310",7)
                                                                               
^SHP("V020310","RG")
H
^SHP("V020512")
12.05.02 dqxib
^SHP("V020512",1)
                    miycg mixac zniyx 
^SHP("V020512",2)
                    ------------------ 
^SHP("V020512",3)

^SHP("V020512",4)
                                                                    xahvn - Z 
^SHP("V020512",5)
                                                       dlaw `ll zeipeayg zxibq
^SHP("V020512",6)
                  gewl qihxka aezkyn `le dpnfda aezkyn itl gelyn 'za xir zqtcd
^SHP("V020512",7)
                                   zery itl zegewl zeveawe zegewl oexign zwzrd 
^SHP("V020512",8)
                                     dpnfdd itle micreq 'qn itl milaben mihixt
^SHP("V020512",9)
                                                xg` aygnl dqtcd zxardl mixhnxt 
^SHP("V020512",10)
     (^P1B - mi`ln milehia bivdl) mzxibq ixg` zepnfda wx milehia bivdl - xhnxt 
^SHP("V020512",11)
                                                     milehia yelz zqtcdl xhnxt 
^SHP("V020512",12)
                                                   (migelyn) milaben `"k zniyx 
^SHP("V020512",13)
                                               mzxibq ixg` zelhean zepnfd g"ec 
^SHP("V020512",14)
                                            CITIZEN zqtcnl zeinxh zewacn zqtcd 
^SHP("V020512",15)
                                                                               
^SHP("V020512",16)
                    epwezy ze`iby zniyx 
^SHP("V020512",17)
                    -------------------- 
^SHP("V020512",18)
                                              aizk zerh - gewl qihxka 'mieyip'
^SHP("V020512",19)
                            zg` dpnfda miyelz 2-l oekp qitcn did `l gewll dgpd
^SHP("V020512","RG")
H
^SHP("V020605")
05.06.02 dqxib
^SHP("V020605",1)
                                                              5.71 zi`xy` : ycg
^SHP("V020605",2)
                                                         ----------------------
^SHP("V020605",3)
                                                                               
^SHP("V020605",4)
                                                                      : mipewiz
^SHP("V020605",5)
                                                                      ---------
^SHP("V020605",6)
                   melyzl divte` did `l - "zepey" daiq - zegkep oery .1        
^SHP("V020605",7)
                                                                               
^SHP("V020605",8)
                     miteqna jqnd lr hqwh zbvda rwzip - mililnz carn .2        
^SHP("V020605",9)
                                                                               
^SHP("V020605",10)
       . 0 zepnfd zenk liaya car `l - zegewl zepnfd itl migelyn g"ec .3        
^SHP("V020605",11)
                                                                               
^SHP("V020605",12)
                                  EXCEL -l mipezp zxarda d`iby dpwez .4        
^SHP("V020605",13)
                                                                               
^SHP("V020605","RG")
H
^SHP("V020613")
13.06.02 dqxib
^SHP("V020613",1)
                    miycg mixac zniyx 
^SHP("V020613",2)
                    ------------------ 
^SHP("V020613",3)
                        (migelyn) zegewll zexikn iz`eeyd g"ec                  
^SHP("V020613",4)
                               mixg` micewl mihixt zveaw wzrd                  
^SHP("V020613",5)
                                     18% - n"rn ly lcgn zxixa                  
^SHP("V020613",6)
                                                                               
^SHP("V020613",7)

^SHP("V020613",8)
                    epwezy ze`iby zniyx 
^SHP("V020613",9)
                    -------------------- 
^SHP("V020613",10)
          caer ly hxetn g"ec bivn did F9-a iyceg zxekyn g"eca                  
^SHP("V020613",11)
                       owez - f` ly `le meid ly dryl xign itl                  
^SHP("V020613",12)
                                                                               
^SHP("V020613",13)
              divte` dcar `l - i`ln ly zeizveaw zeipeayg zwtd                  
^SHP("V020613",14)
                                              "wzrd `ll xewn"                  
^SHP("V020613",15)
                                                                               
^SHP("V020613",16)
          xey` m` zipeayg witn did `l - zeizveaw zeipeayg zwtd                 
^SHP("V020613",17)
                                                 "l" did dtwdl                 
^SHP("V020613",18)
                                                                               
^SHP("V020613",19)
      0 did dqtcdl mixhnxtayk mb SERVISE NOT INCLUDE qitcn did                 
^SHP("V020613",20)
                                                                               
^SHP("V020613","RG")
H
^SHP("V020721")
21.07.02 dqxib
^SHP("V020721",1)
                    miycg mixac zniyx 
^SHP("V020721",2)
                    ------------------ 
^SHP("V020721",3)
                           :bf-bifl dpkez zpkd                                 
^SHP("V020721",4)
                                 zecrqn-ax `ll                                 
^SHP("V020721",5)
                      S ^P1PRM("MMZZ")=1                                       
^SHP("V020721",6)

^SHP("V020721",7)
                    epwezy ze`iby zniyx 
^SHP("V020721",8)
                    -------------------- 
^SHP("V020721",9)
                  zepeayg & zepnfd g"ec izlhia                                 
^SHP("V020721",10)
                               ccea xvln g"ecn                                 
^SHP("V020721","RG")
H
^SHP("V020808")

^SHP("V020808",1)
                                                                      SNS : ycg
^SHP("V020808",2)
                                                          lwyn : zepwezn ze`iby
^SHP("V020808",3)
                            "dpnfda mihixt oi`" drtez cbp dpbd                 
^SHP("V020808",4)
                                                                               
^SHP("V020808","RG")
H
^SHP("V020815")

^SHP("V020815",1)
                                                         SMS-a zilbp` : mipewiz
^SHP("V020815",2)
                                              (^P1PRM("ARZ")=1) migelyna zefix`
^SHP("V020815",3)
                                                                     jtqa sevtv
^SHP("V020815","RG")
H
^SHP("V020829")

^SHP("V020829",1)
                    miycg mixac zniyx 
^SHP("V020829",1,"%TOP")
20
^SHP("V020829",2)
                    ------------------ 
^SHP("V020829",2,"%TOP")
20
^SHP("V020829",3)
                                      : mirvan mr dcear izipy                  
^SHP("V020829",3,"%TOP")
38
^SHP("V020829",4)
                          mi`zn onfl dpzn zlaw zegcl xyt`                      
^SHP("V020829",4,"%TOP")
26
^SHP("V020829",5)
         dcrqna mb mini dnk jez mihixt zxiavl ynzydl xyt`                      
^SHP("V020829",5,"%TOP")
9
^SHP("V020829",6)
                       sqep hixt znwd ila rvann axql xty`                      
^SHP("V020829",6,"%TOP")
23
^SHP("V020829",7)
                        hqa yeniy `ll xigna dpzn zzl xyt`                      
^SHP("V020829",7,"%TOP")
24
^SHP("V020829",8)
           hixt cew 'qn i"r rtyen `l rvanl hqa mihixt xcq                      
^SHP("V020829",8,"%TOP")
11
^SHP("V020829",9)
                               ogley beq itl mirvan zcxtd                      
^SHP("V020829",9,"%TOP")
31
^SHP("V020829",10)
                                                                               
^SHP("V020829",10,"%TOP")
79
^SHP("V020829",11)
                                 zegewl g"ecl n"rn iztqed
^SHP("V020829",11,"%TOP")
33
^SHP("V020829",12)
                                                                               
^SHP("V020829",12,"%TOP")
79
^SHP("V020829",13)
     jixvynn xzei mley mr dtwda tihdn xzeel zexyt` iztqed                      
^SHP("V020829",13,"%TOP")
5
^SHP("V020829",14)
                                                                               
^SHP("V020829",14,"%TOP")
79
^SHP("V020829",15)
                                                                               
^SHP("V020829",15,"%TOP")
79
^SHP("V020829",16)
                    epwezy ze`iby zniyx 
^SHP("V020829",16,"%TOP")
20
^SHP("V020829",17)
                    -------------------- 
^SHP("V020829",17,"%TOP")
20
^SHP("V020829",18)
                   18% n"rn mr z`vi mb dpyi zipeayg zqtcd                      
^SHP("V020829",18,"%TOP")
19
^SHP("V020829",19)
                                                                               
^SHP("V020829",19,"%TOP")
79
^SHP("V020829",20)
           did zelaw g"eca - dphw zqtcnl iztewz itqk g"ec                      
^SHP("V020829",20,"%TOP")
11
^SHP("V020829",21)
                                      oekp `l jix`z riten                      
^SHP("V020829",21,"%TOP")
38
^SHP("V020829",22)
                                                                               
^SHP("V020829",22,"%TOP")
79
^SHP("V020829","RG")
H
^SHP("V020917")

^SHP("V020917",1)
                                                                               
^SHP("V020917",2)
                                                                : BE-52        
^SHP("V020917",3)
                                                                               
^SHP("V020917",4)
                                                     mihixt fekix zqtcd        
^SHP("V020917",5)
                                      dycg dxeva zetqez mr dceara xetiy        
^SHP("V020917",6)
                                         ybcen oinfnd my mr oeayg zqtcd        
^SHP("V020917",7)
                                                                               
^SHP("V020917",8)
                             cala zepnfdl xebq : gewwl avna dycg divte`        
^SHP("V020917",9)
                                                                               
^SHP("V020917",10)
                                                                               
^SHP("V020917",11)
                             dxarda n"rn aeyiga 21.08.02 -n d`iby dpwez        
^SHP("V020917",12)
                                                                zayaygl        
^SHP("V020917","RG")
H
^SHP("V020922")

^SHP("V020922",1)
                                       zeqtcnd lkl mihixt fekix zqtcd - BE-52 -
^SHP("V020922",2)
                                                                               
^SHP("V020922",3)
                                               lehia zaiq oeiv `ll lhal : xhnxt
^SHP("V020922",4)
                                                                               
^SHP("V020922",5)
                                           micaer zeveaw itl dpnfdn micaer zbvd
^SHP("V020922",6)
                                                                               
^SHP("V020922",7)
                               migelyne dcrqn itl wlgl eiykr xyt` zery itl rvan
^SHP("V020922",8)
                                                                               
^SHP("V020922","RG")
H
^SHP("V021007")

^SHP("V021007",1)
                    miycg mixac zniyx 
^SHP("V021007",2)
                    ------------------ 
^SHP("V021007",3)
                   mixeciy fekix g"eca cgia ine`l e l`k qtcdl m`d xhnxt        
^SHP("V021007",4)
              n"rn `ll zecerz eiykr mipneqn i`lndn zfkexn zipeayg zwtda        
^SHP("V021007",5)

^SHP("V021007",6)
                    epwezy ze`iby zniyx 
^SHP("V021007",7)
                    -------------------- 
^SHP("V021007",8)
                                         owezn - ccea hixtl mihixt g"ec        
^SHP("V021007","RG")
H
^SHP("V021014")

^SHP("V021014",1)
                    miycg mixac zniyx 
^SHP("V021014",2)
                    ------------------ 
^SHP("V021014",3)
                 zeipeayg itl dxzi = zepnfd itl dxzi  : hxetn gewl g"eca iepiy 
^SHP("V021014",4)
           zepexg` zepnfd + zelawe                                             
^SHP("V021014",5)

^SHP("V021014",6)
                    epwezy ze`iby zniyx 
^SHP("V021014",7)
                    -------------------- 
^SHP("V021014","RG")
H
^SHP("V021023")

^SHP("V021023",1)
                                                                          : ycg
^SHP("V021023",2)
                    "oicelw"e (S ^P1PRM("NOSIBA")=1) "dnex`" l miepiy ervea    
^SHP("V021023",3)
                               3 dnqiqn ueg ze`nqiqd lk wegnl jixv "dnex`"l    
^SHP("V021023",4)
                                                                               
^SHP("V021023",5)
                                                                      : mipewiz
^SHP("V021023",6)
                                   qn zeipeayg g"eca nrn aeyiga d`iby dpwez    
^SHP("V021023",7)
                                                 zextq 18 dnqiq lawl zexyt`    
^SHP("V021023","RG")
H
^SHP("W3SHM")

^SHP("W3SHM",1)
         .<S2> </B> "ziyeniy" <B> <S1> mya wqr ledipl dpkez mkzxigal mibivn ep`
^SHP("W3SHM",2)
                                                ...zg` dpkez cer ,ecibz ,aeh ep
^SHP("W3SHM",3)
                                              .dl`k zeipkez oend eiykr yi ,oekp
^SHP("W3SHM",4)
                                                         ? eply z` xegal dnl f`
^SHP("W3SHM",5)
           .</B> lef <B> dfe </B> heyt <B> df ,</B> gep <B> df ik - daeyzd dpid
^SHP("W3SHM",6)
            ! </B> zaygenn znyex dtewl <B> zkxrnd z` jetdl divte` yi - dfn uege
^SHP("W3SHM",7)
                       ... dly xignd dn rcei zaygenn dtew yekxl mrt lwyy cg` lk
^SHP("W3SHM",8)
                            zepexzi lkn zepridl mileki mz` ! dxnbp dbibg eiykre
^SHP("W3SHM",9)
                                            ! dnk it zegt mlyle zagyenn dtew ly
^SHP("W3SHM",10)
                                       .zepexzi oend dfa yi ! oiil oe` caer dfe
^SHP("W3SHM",11)
                                      ! ipnf ea zenewn dnkn zkxrn mr cearl ozip
^SHP("W3SHM",12)
                                  ? daxd mirqep ,wqr ilra aexk, mz`y zeidl leki
^SHP("W3SHM",13)
               e` oeayg d`ex lv` ,dterz lnpa e` oelna - mi`vnp mz` dti` dpyn `l
^SHP("W3SHM",14)
                            ! mipezpl dyib mkl yi ,aygn yiy mewn lka - gewl lv`
^SHP("W3SHM",15)
                                                               ! beprz - xeviwa
^SHP("W3SHM",16)
                                                                               
^SHP("W3SHM",17)
                                                      ! miwcev ? wtqa oiicr mz`
^SHP("W3SHM",18)
                                               .daeh ikd ely dpkezy xne` cg` lk
^SHP("W3SHM",19)
                    oeiqipl xz` epiyr ,mkl mi`zn zn`a df m`d, hilgdl elkezy ick
^SHP("W3SHM",20)
       ! melyz mey `lle onf zlabd `ll mivex mz`y dnk zkxrn wecale wgyl elkez my
^SHP("W3SHM",21)
                    .zil`ix zkxrn oinfdl elkez ,mzytigy dpkezd dfy ehilgzyk wxe
^SHP("W3SHM",22)
                                                                               
^SHP("W3SHM","RG")
H
^SHP("W3SHMCON")

^SHP("W3SHMCON",1)
                                             . mkly zervde zel`y , zeaebzl gnyp
^SHP("W3SHMCON",1,"%TOP")
45
^SHP("W3SHMCON",2)
                                                                               
^SHP("W3SHMCON",2,"%TOP")
79
^SHP("W3SHMCON",3)
                                                                -a xyw xevil `p
^SHP("W3SHMCON",3,"%TOP")
64
^SHP("W3SHMCON",4)
                                                                               
^SHP("W3SHMCON",4,"%TOP")
79
^SHP("W3SHMCON",5)
                  <S2><E><SPAN DIR="LTR""> 08-6881815 </SPAN><N><E><S1> : oetlh
^SHP("W3SHMCON",5,"%TOP")
18
^SHP("W3SHMCON",6)
                                                                               
^SHP("W3SHMCON",6,"%TOP")
79
^SHP("W3SHMCON",7)
            <S2><E><SPAN DIR="LTR"> 054-4380608 </SPAN><N><E><S1> : <N><N> ciip
^SHP("W3SHMCON",7,"%TOP")
12
^SHP("W3SHMCON",8)
                                                                               
^SHP("W3SHMCON",8,"%TOP")
79
^SHP("W3SHMCON",9)
                 <S2><E><SPAN DIR="LTR"> 08-6812270 </SPAN><N><E><S1> : <N> qwt
^SHP("W3SHMCON",9,"%TOP")
17
^SHP("W3SHMCON",10)
                                                                               
^SHP("W3SHMCON",10,"%TOP")
79
^SHP("W3SHMCON","RG")
H
^SHP("W3SHMDEMO")

^SHP("W3SHMDEMO",1)
                                                                               
^SHP("W3SHMDEMO",1,"%TOP")
79
^SHP("W3SHMDEMO",2)
                          .zkxrna yiy zeivte`d lk wecale ze`xl elkez enc zkxrna
^SHP("W3SHMDEMO",2,"%TOP")
26
^SHP("W3SHMDEMO",3)
                           gelyl ,dcear ikildz oiadl ,zegece miknqn witdl elkez
^SHP("W3SHMDEMO",3,"%TOP")
27
^SHP("W3SHMDEMO",4)
                                           .zeaeyz lawl oaenke zel`y l"`ecl epl
^SHP("W3SHMDEMO",4,"%TOP")
43
^SHP("W3SHMDEMO",5)
                                                                               
^SHP("W3SHMDEMO",5,"%TOP")
79
^SHP("W3SHMDEMO",6)
                                                 .dnqiq cilwdl yi zkxrnl dqipkl
^SHP("W3SHMDEMO",6,"%TOP")
49
^SHP("W3SHMDEMO",7)
                                                    99999 `id dnqiq enc divte`a
^SHP("W3SHMDEMO",7,"%TOP")
52
^SHP("W3SHMDEMO",8)
                                                                               
^SHP("W3SHMDEMO",8,"%TOP")
79
^SHP("W3SHMDEMO",9)
                                                            ! eprdzy mieewn ep`
^SHP("W3SHMDEMO",9,"%TOP")
60
^SHP("W3SHMDEMO","RG")
H
^SHP("W3SHMPRICE")

^SHP("W3SHMPRICE",1)
                                                     ... aeyg ikdl eprbd eiykre
^SHP("W3SHMPRICE",1,"%TOP")
53
^SHP("W3SHMPRICE",2)
                                                                  ? dlri df dnk
^SHP("W3SHMPRICE",2,"%TOP")
66
^SHP("W3SHMPRICE",3)
                                                    ? oekp ,lef didi dfy epghad
^SHP("W3SHMPRICE",3,"%TOP")
52
^SHP("W3SHMPRICE",4)
                                                               .miiwl yi zeghad
^SHP("W3SHMPRICE",4,"%TOP")
63
^SHP("W3SHMPRICE",5)
                                .df beqn zekxrn aexn xzei jenp mirivn ep`y xign
^SHP("W3SHMPRICE",5,"%TOP")
32
^SHP("W3SHMPRICE",6)
                                 .milawn mz`y zeiexyt` mr xign zeeydl m` cgeina
^SHP("W3SHMPRICE",6,"%TOP")
33
^SHP("W3SHMPRICE",7)
                               yceg lk mlyl epilre oiil oe` zkxrn dfy ,egkyz l`
^SHP("W3SHMPRICE",7,"%TOP")
31
^SHP("W3SHMPRICE",8)
                                                         .zxy zwefgz lr minelyz
^SHP("W3SHMPRICE",8,"%TOP")
57
^SHP("W3SHMPRICE",9)
                             zxya zkxrn oeqgi`e zexiy lr wx melyz zeaexw mizirl
^SHP("W3SHMPRICE",9,"%TOP")
29
^SHP("W3SHMPRICE",10)
                                                      .ycega g"y 100-n xzei `ed
^SHP("W3SHMPRICE",10,"%TOP")
54
^SHP("W3SHMPRICE",11)
                             ,zexiy ince oeqgi` llek ,eply iyceg xign z`f zexnl
^SHP("W3SHMPRICE",11,"%TOP")
29
^SHP("W3SHMPRICE",12)
                                                ! calia ycegl g"y <B>29</B> `ed
^SHP("W3SHMPRICE",12,"%TOP")
48
^SHP("W3SHMPRICE",13)
                                                                     ! jkn xzei
^SHP("W3SHMPRICE",13,"%TOP")
69
^SHP("W3SHMPRICE",14)
                                                  ! qepea milawn mz` dpey`x dpy
^SHP("W3SHMPRICE",14,"%TOP")
50
^SHP("W3SHMPRICE",15)
                                                      !! ycega g"y <B>20</B> wx
^SHP("W3SHMPRICE",15,"%TOP")
54
^SHP("W3SHMPRICE",16)
                                                                 ? dghada epcnr
^SHP("W3SHMPRICE",16,"%TOP")
65
^SHP("W3SHMPRICE",17)
                                                                               
^SHP("W3SHMPRICE",17,"%TOP")
79
^SHP("W3SHMPRICE",18)
           .i`xy` iqihxk aeig lecen </B> llek `l <B> df - zepad i` didi `ly la`
^SHP("W3SHMPRICE",18,"%TOP")
11
^SHP("W3SHMPRICE",19)
                     .lef ynn `l `ede zeiyily zexagl xeyw i`xy` iqihxk zexiy ik
^SHP("W3SHMPRICE",19,"%TOP")
21
^SHP("W3SHMPRICE",20)
                                                    ? mixg` dpkez ilra miyer dn
^SHP("W3SHMPRICE",20,"%TOP")
52
^SHP("W3SHMPRICE",21)
                                   .df mr miwqrzn `l ep` - mixne` md .ce`n heyt
^SHP("W3SHMPRICE",21,"%TOP")
35
^SHP("W3SHMPRICE",22)
                        wx ep`e zenec zexag e` <E>Tranzilla<E> mr ze`wqir exbqz
^SHP("W3SHMPRICE",22,"%TOP")
24
^SHP("W3SHMPRICE",23)
                      ? g"y 3000 cil dpya melyz mkl `vei ,dn .mdly dpkeza ynzyp
^SHP("W3SHMPRICE",23,"%TOP")
22
^SHP("W3SHMPRICE",24)
                                                        ... md df , epgp` `l df
^SHP("W3SHMPRICE",24,"%TOP")
56
^SHP("W3SHMPRICE",25)
                                          ... la` .z`f jxca zkll epgp` mb eplwy
^SHP("W3SHMPRICE",25,"%TOP")
42
^SHP("W3SHMPRICE",26)
                             xzei milef mixign gewll biydl jxc yi m`y, ayeg ip`
^SHP("W3SHMPRICE",26,"%TOP")
29
^SHP("W3SHMPRICE",27)
                        .y`x a`we dcear xzei zvw yxec df m` elit`, z`f zeyrl yi
^SHP("W3SHMPRICE",27,"%TOP")
24
^SHP("W3SHMPRICE",28)
                                ,i`xy` iqihxk ly lecena ynzydl mipiipern mz` m`
^SHP("W3SHMPRICE",28,"%TOP")
32
^SHP("W3SHMPRICE",29)
         g"y <B>1400</B>- `"ay seqn zgizt lr </B> dpey`x dpy <B> mkz` aiigp ep`
^SHP("W3SHMPRICE",29,"%TOP")
9
^SHP("W3SHMPRICE",30)
                      ,( n"rn millek `l mixignd lk) g"y <B>240</B> - dpkezd lre
^SHP("W3SHMPRICE",30,"%TOP")
22
^SHP("W3SHMPRICE",31)
                  ,dpkez zelr llek ,cala ycega g"y <B>70</B> aiigp ze`ad mipyae
^SHP("W3SHMPRICE",31,"%TOP")
18
^SHP("W3SHMPRICE",32)
                                         .oeqgi`e zexiy inc ,i`xy` iqihxk lecen
^SHP("W3SHMPRICE",32,"%TOP")
41
^SHP("W3SHMPRICE",33)
                                                                               
^SHP("W3SHMPRICE",33,"%TOP")
79
^SHP("W3SHMPRICE",34)
                        dtew <B> ly divte` m` mb zkxrn mr cearl mipipern mz` m`
^SHP("W3SHMPRICE",34,"%TOP")
24
^SHP("W3SHMPRICE",35)
    aeig lecen </B> `ll <B> ycega g"y <B>70</B> `ed xign f` ,</B> zaygenn znyex
^SHP("W3SHMPRICE",35,"%TOP")
4
^SHP("W3SHMPRICE",36)
              lr g"y <B>1400</B> dpey`x dpy mkl dlri lecend xeaig .i`xy` iqihxk
^SHP("W3SHMPRICE",36,"%TOP")
14
^SHP("W3SHMPRICE",37)
                         wx - ze`ad mipyae (ihnehe` wpa izexy) `"aya seqn zgizt
^SHP("W3SHMPRICE",37,"%TOP")
25
^SHP("W3SHMPRICE",38)
                                                           .ycega g"y <B>70</B>
^SHP("W3SHMPRICE",38,"%TOP")
59
^SHP("W3SHMPRICE",39)
            ,micew-xal ihte` `xew - mixfia` zelr millek </B> `l <B> dl`d mixign
^SHP("W3SHMPRICE",39,"%TOP")
12
^SHP("W3SHMPRICE",40)
                             .mitqk zxibne dtew zqtcn ,i`xy` iqihxkl ihpbn `xew
^SHP("W3SHMPRICE",40,"%TOP")
29
^SHP("W3SHMPRICE",41)
                                                                               
^SHP("W3SHMPRICE",41,"%TOP")
79
^SHP("W3SHMPRICE",42)
                                .</B> zayaygl <B> wynn zkxrnl xagl zexyt` mb yi
^SHP("W3SHMPRICE",42,"%TOP")
32
^SHP("W3SHMPRICE",43)
                                          ! yceg a g"y <B>20</B> wx mkl dlri df
^SHP("W3SHMPRICE",43,"%TOP")
42
^SHP("W3SHMPRICE",44)
                                                                               
^SHP("W3SHMPRICE",44,"%TOP")
79
^SHP("W3SHMPRICE",45)
                            zihpalx xzei z`f drvdy e`xz  , weya mixign ewcaz m`
^SHP("W3SHMPRICE",45,"%TOP")
28
^SHP("W3SHMPRICE",46)
                                                                 .zxg` drvd lkn
^SHP("W3SHMPRICE",46,"%TOP")
65
^SHP("W3SHMPRICE",47)
                                                                               
^SHP("W3SHMPRICE",47,"%TOP")
79
^SHP("W3SHMPRICE",48)
                                                    . zel`yd lkl mkl zeprl gnyp
^SHP("W3SHMPRICE",48,"%TOP")
52
^SHP("W3SHMPRICE",49)
                                              "</B> xyw xev <B>" sca - xyw ihxt
^SHP("W3SHMPRICE",49,"%TOP")
46
^SHP("W3SHMPRICE","RG")
H
^SHP("W3SHMPROD")

^SHP("W3SHMPROD",1)
                                        .wqr ledip ly dpkeza ixewn zeidl dyw ic
^SHP("W3SHMPROD",2)
                             ,zelaw ,qn zeipeayg - miihxcphqe mireci miknqnd lk
^SHP("W3SHMPROD",3)
                                 gelyn zecerz ,iekif zeipeayg ,dlaw qn zeipeayg
^SHP("W3SHMPROD",4)
                       miknqnd lk - xign zervd , gelyn zecerz zefkxny zeipeayge
^SHP("W3SHMPROD",5)
                         ,mdly dixehqid ze`xl mb oaenke .zkxrna witdl ozip dl`d
^SHP("W3SHMPROD",6)
                                                  .mieqn gewl xt mbe mlek ly mb
^SHP("W3SHMPROD",7)
                         .mikix`z geez,gewl 'qn ,jnqn xtqn itl yetig zeivte` yi
^SHP("W3SHMPROD",8)
                 .gewl ici lr enley `l oiicry ,zegezt zeipeayg wx ze`xl mb ozip
^SHP("W3SHMPROD",9)
                 .wzrd qitcdle jqnd lr bivdl ozip ,zkxrna mrt i` wtedy ,jnqn lk
^SHP("W3SHMPROD",10)
                ,zexg` zekxrna mb `evnl elkez dl`d zeivte`d ly aex e` lky zexnl
^SHP("W3SHMPROD",11)
                             :mkpira og e`vni zeidl lekiy ,micgein mixac dnk yi
^SHP("W3SHMPROD",12)
                                                                               
^SHP("W3SHMPROD",13)
                                      </B> zaygenn dtewl <B> zkxrn jetdl ozip<>
^SHP("W3SHMPROD",14)
                      ,znyex dtew ly miitivtq ze"gec witdl zexyt` elawzy in ueg
^SHP("W3SHMPROD",15)
                       ihpbn `xew ,micew-xal ihte` `xew mb xagl (evxz m`) elkez
^SHP("W3SHMPROD",16)
                                        .mitqk zxibne dtew zqtcn ,i`xy` iqihxkl
^SHP("W3SHMPROD",17)
                                                                               
^SHP("W3SHMPROD",18)
                   .ze`lah mey y`xn miwdl jxev oi`y, zkxrna izpigan cngp ikd <>
^SHP("W3SHMPROD",19)
                    elit` .zipci daizkk dcin eze`a heyt jnqn zwtd jildz dyer df
^SHP("W3SHMPROD",20)
                     d`ad mrte zxkef `id, zkxrna micilwny ,oezp lk ik, gep xzei
^SHP("W3SHMPROD",21)
                                             .cg` wilwa miyexcd mihxt `lnl ozip
^SHP("W3SHMPROD",22)
                                                                               
^SHP("W3SHMPROD",23)
                   zwtdd onf xvwl lekiy mcew jnqnn wizrdl ozip zeipeayg okez <>
^SHP("W3SHMPROD",24)
                                                                         .jnqnd
^SHP("W3SHMPROD",25)
                                                                               
^SHP("W3SHMPROD",26)
                         ici lr ze`xl mb ozip enleyy zeipeayg ly dniyx zbvda <>
^SHP("W3SHMPROD",27)
                               mihxt ze`xle zipeaygd dnley (zelaw e`) dlaw dfi`
^SHP("W3SHMPROD",28)
                                                                 melyz irvn` ly
^SHP("W3SHMPROD",29)
                                                                               
^SHP("W3SHMPROD",30)
                           .zexiy zeipeaygl mihixt zxikn zeipeayg oia epcxtd <>
^SHP("W3SHMPROD",31)
                             leki dcear xe`ze zegewll zexiy mipzep llk jxca ep`
^SHP("W3SHMPROD",32)
                         zcrein zipeayg zxbqna dcear xe`z aezkl .zexey dnk zgwl
^SHP("W3SHMPROD",33)
                           - xigne zenk , (xvw ic) hixt my ,cew - mihixt zxiknl
^SHP("W3SHMPROD",34)
                           ozipy zipeayg eptqed f` .gewll `le epliaya `l gep `l
^SHP("W3SHMPROD",35)
                                 .dcear zelr aezkl seqa wxe iyteg hqwh da aezkl
^SHP("W3SHMPROD",36)
                                      .dlaw qn zipeayg mb witdl xyt` z`fk dxeva
^SHP("W3SHMPROD",37)
                                                                               
^SHP("W3SHMPROD",38)
                           .wiyd ihxt ycgn `lnl mrt lk ekxhvz `l zelaw zwtda <>
^SHP("W3SHMPROD",39)
                              mihxt `lnl xefrze zncew mrt mz`lin dn zxkef zkxrn
^SHP("W3SHMPROD",40)
                                                                     .cg` wilwa
^SHP("W3SHMPROD",41)
                                                                               
^SHP("W3SHMPROD",42)
                              hiiltnhk drvd okez mixney ep` xign zervd zwtda <>
^SHP("W3SHMPROD",43)
                           qiqa lr gewll xign aygl divte` yi dfn ueg .`ad jnqnl
^SHP("W3SHMPROD",44)
                                jnqn zqtcda .zkxrna xcbedy geex feg`e zelr xign
^SHP("W3SHMPROD",45)
                            mixken m` gep ce`n df .iteq xign wx d`xi oaenk gewl
^SHP("W3SHMPROD",46)
                                    .aygn lynl - mipey miwlgn mewna akxeny xven
^SHP("W3SHMPROD",47)
                                                                               
^SHP("W3SHMPROD",48)
                       .oewizl dlaw jnqn mb yi ,oewizl mixiykn milawn mz` m` <>
^SHP("W3SHMPROD",49)
                             ,dpexg` mrt letiha did xiykn izn wecal mb xefri df
^SHP("W3SHMPROD",50)
                                'eke zeixg` eilr yi m`d ,xara el eid zelwz dfi`
^SHP("W3SHMPROD",51)
                                                                               
^SHP("W3SHMPROD",52)
                             , d`ln i`ln zkxrn epgzit `l zigkep zkxrn zxbqna <>
^SHP("W3SHMPROD",53)
                              ykx zeipeayg ly miitqk ipezp cilwdl zexyt` yi la`
^SHP("W3SHMPROD",54)
                                  ygx zipeayg xenyl mkl aeyg m` .dly okez x`zle
^SHP("W3SHMPROD",55)
                                   dpenz ly dxeva xenyle dze` mlvl ozip - aygna
^SHP("W3SHMPROD",56)
                                                           .yexc rbx lka bivdle
^SHP("W3SHMPROD",57)
                                                                               
^SHP("W3SHMPROD",58)
                            zwtd dixehqid ze`xl ,miwtql minelyz crzl mb ozip <>
^SHP("W3SHMPROD",59)
                               .mieqn mikix`z geez xt minelyz zifgz lawle miwiy
^SHP("W3SHMPROD",60)
                                                                               
^SHP("W3SHMPROD",61)
                            dpenz lawl mkl zexyt`ny ze"gec ipin lk mb zkxrna yi
^SHP("W3SHMPROD",62)
                            itl mze` oiinl divte` mr mkly zeipwe zexikn ly d`ln
^SHP("W3SHMPROD",63)
                                                                .mipey mipiit`n
^SHP("W3SHMPROD",64)
                                                                               
^SHP("W3SHMPROD",65)
                        .`exwil minrt xyrn ze`xl zg` mrt sicr ,mixne`y enk ,la`
^SHP("W3SHMPROD",66)
                          eze` rval da ozipy , enc zkxrn ze`xl mkz` mipinfn ep`
^SHP("W3SHMPROD",67)
                                                         .zil`ix zkxrnay zelert
^SHP("W3SHMPROD","RG")
H
^SHP("W4ASRMGRs")

^SHP("W4ASRMGRs",1)
                             &05                                   >: wqrd my  
^SHP("W4ASRMGRs",2)
                                                &20         >:dyxen wqer xtqn  
^SHP("W4ASRMGRs",3)
                                                                              
^SHP("W4ASRMGRs","RG")
H
^SHP("W4CASHCs")

^SHP("W4CASHCs",1)
                                                                               
^SHP("W4CASHCs",1,"%TOP")
79
^SHP("W4CASHCs",2)
                                                                               
^SHP("W4CASHCs",2,"%TOP")
79
^SHP("W4CASHCs",3)
                                 g"y {06     } {05  } | 200 ly zexhy           
^SHP("W4CASHCs",3,"%TOP")
33
^SHP("W4CASHCs",4)
                                                                               
^SHP("W4CASHCs",4,"%TOP")
79
^SHP("W4CASHCs",5)
                                 g"y {11     } {10  } | 100 ly zexhy           
^SHP("W4CASHCs",5,"%TOP")
33
^SHP("W4CASHCs",6)
                                                                               
^SHP("W4CASHCs",6,"%TOP")
79
^SHP("W4CASHCs",7)
                                 g"y {16     } {15  } |  50 ly zexzy           
^SHP("W4CASHCs",7,"%TOP")
33
^SHP("W4CASHCs",8)
                                                                               
^SHP("W4CASHCs",8,"%TOP")
79
^SHP("W4CASHCs",9)
                                 g"y {21     } {20  } |  20 ly zexzy           
^SHP("W4CASHCs",9,"%TOP")
33
^SHP("W4CASHCs",10)
                                                                               
^SHP("W4CASHCs",10,"%TOP")
79
^SHP("W4CASHCs",11)
                                 g"y {26     } {25  } | 10 ly zerahn           
^SHP("W4CASHCs",11,"%TOP")
33
^SHP("W4CASHCs",12)
                                                                               
^SHP("W4CASHCs",12,"%TOP")
79
^SHP("W4CASHCs",13)
                                 g"y {31     } {30  } |  5 ly zerahn           
^SHP("W4CASHCs",13,"%TOP")
33
^SHP("W4CASHCs",14)
                                                                               
^SHP("W4CASHCs",14,"%TOP")
79
^SHP("W4CASHCs",15)
                                 g"y {36     } {35  } |  2 ly zerahn           
^SHP("W4CASHCs",15,"%TOP")
33
^SHP("W4CASHCs",16)
                                                                               
^SHP("W4CASHCs",16,"%TOP")
79
^SHP("W4CASHCs",17)
                                 g"y {41     } {40  } |  1 ly zerahn           
^SHP("W4CASHCs",17,"%TOP")
33
^SHP("W4CASHCs",18)
                                                                               
^SHP("W4CASHCs",18,"%TOP")
79
^SHP("W4CASHCs","RG")
H
^SHP("W4CLKTO1s")

^SHP("W4CLKTO1s",1)
                               # micaer g"ec #                                 
^SHP("W4CLKTO1s",2)
                   &10     > :    jix`z cr    &05      > :    jix`zn           
^SHP("W4CLKTO1s",3)
  &14               > &13  > : dveaw cr    &12              > &11 > : dveawn   
^SHP("W4CLKTO1s",4)
                     &20   > :caer xtqn cr       &15   > :caer xtqnn           
^SHP("W4CLKTO1s",5)
 ------------------------------------------------------------------------------
^SHP("W4CLKTO1s",6)
 | zxekyn|dncwn|yteg| k"dq |zery | zery | zery | zery |ini|     my     |  'qn |
^SHP("W4CLKTO1s",7)
 |       | (-) |    | zery | zay |2'qep |1'qep |zelibx|'ar|    caer    | caer |
^SHP("W4CLKTO1s",8)
 ------------------------------------------------------------------------------
^SHP("W4CLKTO1s",9)
 $99999.9: 99.9:TTTT:TTTTTT:TTTTT:TTTTTT:TTTTTT:TTTTTT:999:TTTTTTTTTTTT:TTTTTT:1
^SHP("W4CLKTO1s",10)

^SHP("W4CLKTO1s",11)

^SHP("W4CLKTO1s",12)

^SHP("W4CLKTO1s",13)

^SHP("W4CLKTO1s",14)

^SHP("W4CLKTO1s",15)

^SHP("W4CLKTO1s",16)

^SHP("W4CLKTO1s",17)

^SHP("W4CLKTO1s",18)

^SHP("W4CLKTO1s",19)

^SHP("W4CLKTO1s",20)

^SHP("W4CLKTO1s",21)

^SHP("W4CLKTO1s",22)

^SHP("W4CLKTO1s",23)

^SHP("W4CLKTO1s",24)

^SHP("W4CLKTO1s",25)

^SHP("W4CLKTO1s",26)

^SHP("W4CLKTO1s",27)

^SHP("W4CLKTO1s",28)

^SHP("W4CLKTO1s",29)

^SHP("W4CLKTO1s",30)

^SHP("W4CLKTO1s",31)

^SHP("W4CLKTO1s",32)

^SHP("W4CLKTO1s",33)

^SHP("W4CLKTO1s",34)

^SHP("W4CLKTO1s",35)

^SHP("W4CLKTO1s",36)

^SHP("W4CLKTO1s",37)

^SHP("W4CLKTO1s",38)

^SHP("W4CLKTO1s",39)

^SHP("W4CLKTO1s",40)

^SHP("W4CLKTO1s",41)
                                                                             $ 
^SHP("W4CLKTO1s",42)
 ------------------------------------------------------------------------------
^SHP("W4CLKTO1s",43)
 &60    >&55   >&53  >&52   >&50   >&45  >&40  >&35   >&30   >                 
^SHP("W4CLKTO1s",44)
                                                                               
^SHP("W4CLKTO1s","RG")
H
^SHP("W4CLKTOT")

^SHP("W4CLKTOT",1)
                               # micaer g"ec #                                 
^SHP("W4CLKTOT",1,"%TOP")
31
^SHP("W4CLKTOT",2)
                   &10     > :    jix`z cr    &05      > :    jix`zn           
^SHP("W4CLKTOT",2,"%TOP")
19
^SHP("W4CLKTOT",3)
  &14               > &13  > : dveaw cr    &12              > &11 > : dveawn   
^SHP("W4CLKTOT",3,"%TOP")
2
^SHP("W4CLKTOT",4)
                     &20   > :caer xtqn cr       &15   > :caer xtqnn           
^SHP("W4CLKTOT",4,"%TOP")
21
^SHP("W4CLKTOT",5)
 -----------------------------------------------------------------------------
^SHP("W4CLKTOT",5,"%TOP")
1
^SHP("W4CLKTOT",6)
 | zxekyn | dncwn | qepea | yteg| 'lin| dlgn| ini | zery |     my     |  'qn | 
^SHP("W4CLKTOT",6,"%TOP")
1
^SHP("W4CLKTOT",7)
 |        | ( - ) |       |     |     |     |dcear|dcear |    caer    | caer | 
^SHP("W4CLKTOT",7,"%TOP")
1
^SHP("W4CLKTOT",8)
 -----------------------------------------------------------------------------
^SHP("W4CLKTOT",8,"%TOP")
1
^SHP("W4CLKTOT",9)
 $99999.99:9999.99:99999.9:TTTTT:TTTTT:TTTTT: 9999:TTTTTT:TTTTTTTTTTTT:TTTTTT:1
^SHP("W4CLKTOT",9,"%TOP")
1
^SHP("W4CLKTOT",10)

^SHP("W4CLKTOT",10,"%TOP")
0
^SHP("W4CLKTOT",11)

^SHP("W4CLKTOT",11,"%TOP")
0
^SHP("W4CLKTOT",12)

^SHP("W4CLKTOT",12,"%TOP")
0
^SHP("W4CLKTOT",13)

^SHP("W4CLKTOT",13,"%TOP")
0
^SHP("W4CLKTOT",14)

^SHP("W4CLKTOT",14,"%TOP")
0
^SHP("W4CLKTOT",15)

^SHP("W4CLKTOT",15,"%TOP")
0
^SHP("W4CLKTOT",16)

^SHP("W4CLKTOT",16,"%TOP")
0
^SHP("W4CLKTOT",17)

^SHP("W4CLKTOT",17,"%TOP")
0
^SHP("W4CLKTOT",18)

^SHP("W4CLKTOT",18,"%TOP")
0
^SHP("W4CLKTOT",19)

^SHP("W4CLKTOT",19,"%TOP")
0
^SHP("W4CLKTOT",20)

^SHP("W4CLKTOT",20,"%TOP")
0
^SHP("W4CLKTOT",21)

^SHP("W4CLKTOT",21,"%TOP")
0
^SHP("W4CLKTOT",22)

^SHP("W4CLKTOT",22,"%TOP")
0
^SHP("W4CLKTOT",23)

^SHP("W4CLKTOT",23,"%TOP")
0
^SHP("W4CLKTOT",24)

^SHP("W4CLKTOT",24,"%TOP")
0
^SHP("W4CLKTOT",25)

^SHP("W4CLKTOT",25,"%TOP")
0
^SHP("W4CLKTOT",26)

^SHP("W4CLKTOT",26,"%TOP")
0
^SHP("W4CLKTOT",27)

^SHP("W4CLKTOT",27,"%TOP")
0
^SHP("W4CLKTOT",28)

^SHP("W4CLKTOT",28,"%TOP")
0
^SHP("W4CLKTOT",29)

^SHP("W4CLKTOT",29,"%TOP")
0
^SHP("W4CLKTOT",30)

^SHP("W4CLKTOT",30,"%TOP")
0
^SHP("W4CLKTOT",31)

^SHP("W4CLKTOT",31,"%TOP")
0
^SHP("W4CLKTOT",32)

^SHP("W4CLKTOT",32,"%TOP")
0
^SHP("W4CLKTOT",33)

^SHP("W4CLKTOT",33,"%TOP")
0
^SHP("W4CLKTOT",34)

^SHP("W4CLKTOT",34,"%TOP")
0
^SHP("W4CLKTOT",35)

^SHP("W4CLKTOT",35,"%TOP")
0
^SHP("W4CLKTOT",36)

^SHP("W4CLKTOT",36,"%TOP")
0
^SHP("W4CLKTOT",37)

^SHP("W4CLKTOT",37,"%TOP")
0
^SHP("W4CLKTOT",38)

^SHP("W4CLKTOT",38,"%TOP")
0
^SHP("W4CLKTOT",39)

^SHP("W4CLKTOT",39,"%TOP")
0
^SHP("W4CLKTOT",40)

^SHP("W4CLKTOT",40,"%TOP")
0
^SHP("W4CLKTOT",41)

^SHP("W4CLKTOT",41,"%TOP")
0
^SHP("W4CLKTOT",42)

^SHP("W4CLKTOT",42,"%TOP")
0
^SHP("W4CLKTOT",43)

^SHP("W4CLKTOT",43,"%TOP")
0
^SHP("W4CLKTOT",44)

^SHP("W4CLKTOT",44,"%TOP")
0
^SHP("W4CLKTOT",45)

^SHP("W4CLKTOT",45,"%TOP")
0
^SHP("W4CLKTOT",46)

^SHP("W4CLKTOT",46,"%TOP")
0
^SHP("W4CLKTOT",47)

^SHP("W4CLKTOT",47,"%TOP")
0
^SHP("W4CLKTOT",48)

^SHP("W4CLKTOT",48,"%TOP")
0
^SHP("W4CLKTOT",49)

^SHP("W4CLKTOT",49,"%TOP")
0
^SHP("W4CLKTOT",50)

^SHP("W4CLKTOT",50,"%TOP")
0
^SHP("W4CLKTOT",51)

^SHP("W4CLKTOT",51,"%TOP")
0
^SHP("W4CLKTOT",52)

^SHP("W4CLKTOT",52,"%TOP")
0
^SHP("W4CLKTOT",53)

^SHP("W4CLKTOT",53,"%TOP")
0
^SHP("W4CLKTOT",54)
                                                                            $ 
^SHP("W4CLKTOT",54,"%TOP")
76
^SHP("W4CLKTOT",55)
 -----------------------------------------------------------------------------
^SHP("W4CLKTOT",55,"%TOP")
1
^SHP("W4CLKTOT",56)
 &60     >&55    >&52    >&50  >&45  >&40  >&35  >&30   >                      
^SHP("W4CLKTOT",56,"%TOP")
1
^SHP("W4CLKTOT","RG")
H
^SHP("W4CLKTOTs")
micaer g"ec fekix
^SHP("W4CLKTOTs",1)
                               # micaer g"ec #                                 
^SHP("W4CLKTOTs",1,"%TOP")
31
^SHP("W4CLKTOTs",2)
                   &10     > :    jix`z cr    &05      > :    jix`zn           
^SHP("W4CLKTOTs",2,"%TOP")
19
^SHP("W4CLKTOTs",3)
  &14               > &13  > : dveaw cr    &12              > &11 > : dveawn   
^SHP("W4CLKTOTs",3,"%TOP")
2
^SHP("W4CLKTOTs",4)
                     &20   > :caer xtqn cr       &15   > :caer xtqnn           
^SHP("W4CLKTOTs",4,"%TOP")
21
^SHP("W4CLKTOTs",5)
 -----------------------------------------------------------------------------
^SHP("W4CLKTOTs",5,"%TOP")
1
^SHP("W4CLKTOTs",6)
 | zxekyn | dncwn | qepea | yteg| 'lin| dlgn| ini | zery |     my     |  'qn | 
^SHP("W4CLKTOTs",6,"%TOP")
1
^SHP("W4CLKTOTs",7)
 |        | ( - ) |       |     |     |     |dcear|dcear |    caer    | caer | 
^SHP("W4CLKTOTs",7,"%TOP")
1
^SHP("W4CLKTOTs",8)
 -----------------------------------------------------------------------------
^SHP("W4CLKTOTs",8,"%TOP")
1
^SHP("W4CLKTOTs",9)
 $99999.99:9999.99:99999.9:TTTTT:TTTTT:TTTTT: 9999:TTTTTT:TTTTTTTTTTTT:TTTTTT:1
^SHP("W4CLKTOTs",9,"%TOP")
1
^SHP("W4CLKTOTs",10)

^SHP("W4CLKTOTs",10,"%TOP")
0
^SHP("W4CLKTOTs",11)

^SHP("W4CLKTOTs",11,"%TOP")
0
^SHP("W4CLKTOTs",12)

^SHP("W4CLKTOTs",12,"%TOP")
0
^SHP("W4CLKTOTs",13)

^SHP("W4CLKTOTs",13,"%TOP")
0
^SHP("W4CLKTOTs",14)

^SHP("W4CLKTOTs",14,"%TOP")
0
^SHP("W4CLKTOTs",15)

^SHP("W4CLKTOTs",15,"%TOP")
0
^SHP("W4CLKTOTs",16)

^SHP("W4CLKTOTs",16,"%TOP")
0
^SHP("W4CLKTOTs",17)

^SHP("W4CLKTOTs",17,"%TOP")
0
^SHP("W4CLKTOTs",18)

^SHP("W4CLKTOTs",18,"%TOP")
0
^SHP("W4CLKTOTs",19)

^SHP("W4CLKTOTs",19,"%TOP")
0
^SHP("W4CLKTOTs",20)

^SHP("W4CLKTOTs",20,"%TOP")
0
^SHP("W4CLKTOTs",21)

^SHP("W4CLKTOTs",21,"%TOP")
0
^SHP("W4CLKTOTs",22)

^SHP("W4CLKTOTs",22,"%TOP")
0
^SHP("W4CLKTOTs",23)

^SHP("W4CLKTOTs",23,"%TOP")
0
^SHP("W4CLKTOTs",24)

^SHP("W4CLKTOTs",24,"%TOP")
0
^SHP("W4CLKTOTs",25)

^SHP("W4CLKTOTs",25,"%TOP")
0
^SHP("W4CLKTOTs",26)

^SHP("W4CLKTOTs",26,"%TOP")
0
^SHP("W4CLKTOTs",27)

^SHP("W4CLKTOTs",27,"%TOP")
0
^SHP("W4CLKTOTs",28)

^SHP("W4CLKTOTs",28,"%TOP")
0
^SHP("W4CLKTOTs",29)

^SHP("W4CLKTOTs",29,"%TOP")
0
^SHP("W4CLKTOTs",30)

^SHP("W4CLKTOTs",30,"%TOP")
0
^SHP("W4CLKTOTs",31)

^SHP("W4CLKTOTs",31,"%TOP")
0
^SHP("W4CLKTOTs",32)

^SHP("W4CLKTOTs",32,"%TOP")
0
^SHP("W4CLKTOTs",33)

^SHP("W4CLKTOTs",33,"%TOP")
0
^SHP("W4CLKTOTs",34)

^SHP("W4CLKTOTs",34,"%TOP")
0
^SHP("W4CLKTOTs",35)

^SHP("W4CLKTOTs",35,"%TOP")
0
^SHP("W4CLKTOTs",36)

^SHP("W4CLKTOTs",36,"%TOP")
0
^SHP("W4CLKTOTs",37)

^SHP("W4CLKTOTs",37,"%TOP")
0
^SHP("W4CLKTOTs",38)

^SHP("W4CLKTOTs",38,"%TOP")
0
^SHP("W4CLKTOTs",39)

^SHP("W4CLKTOTs",39,"%TOP")
0
^SHP("W4CLKTOTs",40)

^SHP("W4CLKTOTs",40,"%TOP")
0
^SHP("W4CLKTOTs",41)

^SHP("W4CLKTOTs",41,"%TOP")
0
^SHP("W4CLKTOTs",42)

^SHP("W4CLKTOTs",42,"%TOP")
0
^SHP("W4CLKTOTs",43)

^SHP("W4CLKTOTs",43,"%TOP")
0
^SHP("W4CLKTOTs",44)

^SHP("W4CLKTOTs",44,"%TOP")
0
^SHP("W4CLKTOTs",45)

^SHP("W4CLKTOTs",45,"%TOP")
0
^SHP("W4CLKTOTs",46)

^SHP("W4CLKTOTs",46,"%TOP")
0
^SHP("W4CLKTOTs",47)

^SHP("W4CLKTOTs",47,"%TOP")
0
^SHP("W4CLKTOTs",48)

^SHP("W4CLKTOTs",48,"%TOP")
0
^SHP("W4CLKTOTs",49)

^SHP("W4CLKTOTs",49,"%TOP")
0
^SHP("W4CLKTOTs",50)

^SHP("W4CLKTOTs",50,"%TOP")
0
^SHP("W4CLKTOTs",51)

^SHP("W4CLKTOTs",51,"%TOP")
0
^SHP("W4CLKTOTs",52)

^SHP("W4CLKTOTs",52,"%TOP")
0
^SHP("W4CLKTOTs",53)

^SHP("W4CLKTOTs",53,"%TOP")
0
^SHP("W4CLKTOTs",54)
                                                                            $ 
^SHP("W4CLKTOTs",54,"%TOP")
76
^SHP("W4CLKTOTs",55)
 -----------------------------------------------------------------------------
^SHP("W4CLKTOTs",55,"%TOP")
1
^SHP("W4CLKTOTs",56)
 &60     >&55    >&52    >&50  >&45  >&40  >&35  >&30   >                      
^SHP("W4CLKTOTs",56,"%TOP")
1
^SHP("W4CLKTOTs","RG")
H
^SHP("W4DCBs")
zelaw g"ec
^SHP("W4DCBs",1)
                                                                               
^SHP("W4DCBs",2)
                     &10      >:jix`z cr    &05      >:jix`zn                  
^SHP("W4DCBs",3)
 &15           > &14  >: zegewl zveaw cr &13            >  &12  >:zegewl zveawn
^SHP("W4DCBs",4)
                   &21        >: gewl cr  &20        >: gewln                  
^SHP("W4DCBs",5)
 ----------------------------------------------------------------------------  
^SHP("W4DCBs",6)
| xzi |iekip|  `"k  | wiy|onefn| k"dq |   gewld my   |gewl 'qn|jix`z| dlaw |
^SHP("W4DCBs",7)
 ---------------------------------------------------------------------------- 
^SHP("W4DCBs",8)
   99.9:999.9:999.9: 999.9:999.9:9999.9: TTTTTTTTTTTTT:TTTTTTTT:TTTTTT:TTTTT:1
^SHP("W4DCBs",9)

^SHP("W4DCBs",10)

^SHP("W4DCBs",11)

^SHP("W4DCBs",12)

^SHP("W4DCBs",13)

^SHP("W4DCBs",14)

^SHP("W4DCBs",15)

^SHP("W4DCBs",16)

^SHP("W4DCBs",17)

^SHP("W4DCBs",18)

^SHP("W4DCBs",19)

^SHP("W4DCBs",20)

^SHP("W4DCBs",21)

^SHP("W4DCBs",22)

^SHP("W4DCBs",23)

^SHP("W4DCBs",24)

^SHP("W4DCBs",25)

^SHP("W4DCBs",26)

^SHP("W4DCBs",27)

^SHP("W4DCBs",28)

^SHP("W4DCBs",29)

^SHP("W4DCBs",30)

^SHP("W4DCBs",31)

^SHP("W4DCBs",32)

^SHP("W4DCBs",33)

^SHP("W4DCBs",34)

^SHP("W4DCBs",35)

^SHP("W4DCBs",36)

^SHP("W4DCBs",37)

^SHP("W4DCBs",38)

^SHP("W4DCBs",39)

^SHP("W4DCBs",40)

^SHP("W4DCBs",41)

^SHP("W4DCBs",42)

^SHP("W4DCBs",43)

^SHP("W4DCBs",44)

^SHP("W4DCBs",45)

^SHP("W4DCBs",46)

^SHP("W4DCBs",47)

^SHP("W4DCBs",48)

^SHP("W4DCBs",49)

^SHP("W4DCBs",50)

^SHP("W4DCBs",51)

^SHP("W4DCBs",52)
                                                                            $  
^SHP("W4DCBs",53)
 ----------------------------------------------------------------------------  
^SHP("W4DCBs",54)
                                                                               
^SHP("W4DCBs",55)
                                                                               
^SHP("W4DCBs",56)
                                                                               
^SHP("W4DCBs",57)
                                                                               
^SHP("W4DCBs",58)
                                                                               
^SHP("W4DCBs",59)
                                                                               
^SHP("W4DCBs",60)
                                                                               
^SHP("W4DCBs",61)
                                                                               
^SHP("W4DCBs",62)
                                                                               
^SHP("W4DCBs",63)
                                                                               
^SHP("W4DCBs",64)
                                                                               
^SHP("W4DCBs",65)
                                                                               
^SHP("W4DCBs",66)
                                                                               
^SHP("W4DCBs",67)
                                                                               
^SHP("W4DCBs",68)
                                                                               
^SHP("W4DCBs",69)
 &60   >&55    >&47    >&45   >&40    > k"dq           &25  >: zelaw           
^SHP("W4DCBs",70)
                                                                               
^SHP("W4DCBs","RG")
H
^SHP("W4DEPREPs")

^SHP("W4DEPREPs",1)
                                                 &05  > :     dpy              
^SHP("W4DEPREPs",2)
                                               &10    > :   ycegn              
^SHP("W4DEPREPs",3)
                                               &15    > : yceg cr              
^SHP("W4DEPREPs",4)
                                             &20      > :    mini              
^SHP("W4DEPREPs","RG")
H
^SHP("W4DHBs")

^SHP("W4DHBs",1)
                     &07      >:jix`z cr    &05      >:jix`zn                  
^SHP("W4DHBs",1,"%TOP")
21
^SHP("W4DHBs",2)
                &09                  > &08  >   zegewl zveawn                  
^SHP("W4DHBs",2,"%TOP")
16
^SHP("W4DHBs",3)
                &11                  > &10  > zegewl zveaw cr                  
^SHP("W4DHBs",3,"%TOP")
16
^SHP("W4DHBs",4)
                   &13        >: gewl cr  &12        >: gewln                  
^SHP("W4DHBs",4,"%TOP")
19
^SHP("W4DHBs",5)
  &16              > &14 > : (3-iekif,2-ipci,1- zfkxn,0-mlek) zipeayg beq      
^SHP("W4DHBs",5,"%TOP")
2
^SHP("W4DHBs",6)
           &18                                                   >             
^SHP("W4DHBs",6,"%TOP")
11
^SHP("W4DHBs",7)
 ------------------------------------------------------------------------------
^SHP("W4DHBs",7,"%TOP")
1
^SHP("W4DHBs",8)
 |  +/- |n"rn llek|n"rn|n"rn iptl|      gewld my    |gewl 'qn| jix`zl |zipeayg|
^SHP("W4DHBs",8,"%TOP")
1
^SHP("W4DHBs",9)
 ------------------------------------------------------------------------------
^SHP("W4DHBs",9,"%TOP")
1
^SHP("W4DHBs",10)
 $999.99:999999.99:9.99:999999.99:TTTTTTTTTTTTTTTTTT:TTTTTTTT:99999999:TTTTTTT:1
^SHP("W4DHBs",10,"%TOP")
1
^SHP("W4DHBs",11)

^SHP("W4DHBs",11,"%TOP")
0
^SHP("W4DHBs",12)

^SHP("W4DHBs",12,"%TOP")
0
^SHP("W4DHBs",13)

^SHP("W4DHBs",13,"%TOP")
0
^SHP("W4DHBs",14)

^SHP("W4DHBs",14,"%TOP")
0
^SHP("W4DHBs",15)

^SHP("W4DHBs",15,"%TOP")
0
^SHP("W4DHBs",16)

^SHP("W4DHBs",16,"%TOP")
0
^SHP("W4DHBs",17)

^SHP("W4DHBs",17,"%TOP")
0
^SHP("W4DHBs",18)

^SHP("W4DHBs",18,"%TOP")
0
^SHP("W4DHBs",19)

^SHP("W4DHBs",19,"%TOP")
0
^SHP("W4DHBs",20)

^SHP("W4DHBs",20,"%TOP")
0
^SHP("W4DHBs",21)

^SHP("W4DHBs",21,"%TOP")
0
^SHP("W4DHBs",22)

^SHP("W4DHBs",22,"%TOP")
0
^SHP("W4DHBs",23)

^SHP("W4DHBs",23,"%TOP")
0
^SHP("W4DHBs",24)

^SHP("W4DHBs",24,"%TOP")
0
^SHP("W4DHBs",25)

^SHP("W4DHBs",25,"%TOP")
0
^SHP("W4DHBs",26)

^SHP("W4DHBs",26,"%TOP")
0
^SHP("W4DHBs",27)

^SHP("W4DHBs",27,"%TOP")
0
^SHP("W4DHBs",28)

^SHP("W4DHBs",28,"%TOP")
0
^SHP("W4DHBs",29)

^SHP("W4DHBs",29,"%TOP")
0
^SHP("W4DHBs",30)

^SHP("W4DHBs",30,"%TOP")
0
^SHP("W4DHBs",31)

^SHP("W4DHBs",31,"%TOP")
0
^SHP("W4DHBs",32)

^SHP("W4DHBs",32,"%TOP")
0
^SHP("W4DHBs",33)

^SHP("W4DHBs",33,"%TOP")
0
^SHP("W4DHBs",34)

^SHP("W4DHBs",34,"%TOP")
0
^SHP("W4DHBs",35)

^SHP("W4DHBs",35,"%TOP")
0
^SHP("W4DHBs",36)

^SHP("W4DHBs",36,"%TOP")
0
^SHP("W4DHBs",37)

^SHP("W4DHBs",37,"%TOP")
0
^SHP("W4DHBs",38)

^SHP("W4DHBs",38,"%TOP")
0
^SHP("W4DHBs",39)

^SHP("W4DHBs",39,"%TOP")
0
^SHP("W4DHBs",40)

^SHP("W4DHBs",40,"%TOP")
0
^SHP("W4DHBs",41)

^SHP("W4DHBs",41,"%TOP")
0
^SHP("W4DHBs",42)

^SHP("W4DHBs",42,"%TOP")
0
^SHP("W4DHBs",43)

^SHP("W4DHBs",43,"%TOP")
0
^SHP("W4DHBs",44)

^SHP("W4DHBs",44,"%TOP")
0
^SHP("W4DHBs",45)

^SHP("W4DHBs",45,"%TOP")
0
^SHP("W4DHBs",46)

^SHP("W4DHBs",46,"%TOP")
0
^SHP("W4DHBs",47)

^SHP("W4DHBs",47,"%TOP")
0
^SHP("W4DHBs",48)

^SHP("W4DHBs",48,"%TOP")
0
^SHP("W4DHBs",49)

^SHP("W4DHBs",49,"%TOP")
0
^SHP("W4DHBs",50)

^SHP("W4DHBs",50,"%TOP")
0
^SHP("W4DHBs",51)

^SHP("W4DHBs",51,"%TOP")
0
^SHP("W4DHBs",52)

^SHP("W4DHBs",52,"%TOP")
0
^SHP("W4DHBs",53)

^SHP("W4DHBs",53,"%TOP")
0
^SHP("W4DHBs",54)
                                                                             $ 
^SHP("W4DHBs",54,"%TOP")
77
^SHP("W4DHBs",55)
 ------------------------------------------------------------------------------
^SHP("W4DHBs",55,"%TOP")
1
^SHP("W4DHBs",56)
                                                                               
^SHP("W4DHBs",56,"%TOP")
79
^SHP("W4DHBs",57)
 &45   >'nfdl sqepa &40     > k"dq &35    > n"rn &30    > n"rn iptl &15  >:'ayg
^SHP("W4DHBs",57,"%TOP")
1
^SHP("W4DHBs",58)
                                                                               
^SHP("W4DHBs",58,"%TOP")
79
^SHP("W4DHBs","RG")
H
^SHP("W4DHMKs")

^SHP("W4DHMKs",1)
                     &07      >:jix`z cr    &05      >:jix`zn                  
^SHP("W4DHMKs",2)
                  &11  > zegewl zveaw cr    &10  > zegewl zveawn               
^SHP("W4DHMKs",3)
                   &13        >: gewl cr  &12        >: gewln                  
^SHP("W4DHMKs",4)
 ------------------------------------------------------------------------------
^SHP("W4DHMKs",5)
 |  k"dq  | n"rn |n"rn iptl|     gewld my     | gewl 'qn | jix`zl|dlaw/qn 'ayg|
^SHP("W4DHMKs",6)
 ------------------------------------------------------------------------------
^SHP("W4DHMKs",7)
 $99999.99:999.99:999999.99:TTTTTTTTTTTTTTTTTT:TTTTTTTTTT:9999999:TTTTTTTTTTTT:1
^SHP("W4DHMKs",8)

^SHP("W4DHMKs",9)

^SHP("W4DHMKs",10)

^SHP("W4DHMKs",11)

^SHP("W4DHMKs",12)

^SHP("W4DHMKs",13)

^SHP("W4DHMKs",14)

^SHP("W4DHMKs",15)

^SHP("W4DHMKs",16)

^SHP("W4DHMKs",17)

^SHP("W4DHMKs",18)

^SHP("W4DHMKs",19)

^SHP("W4DHMKs",20)

^SHP("W4DHMKs",21)

^SHP("W4DHMKs",22)

^SHP("W4DHMKs",23)

^SHP("W4DHMKs",24)

^SHP("W4DHMKs",25)

^SHP("W4DHMKs",26)

^SHP("W4DHMKs",27)

^SHP("W4DHMKs",28)

^SHP("W4DHMKs",29)

^SHP("W4DHMKs",30)

^SHP("W4DHMKs",31)

^SHP("W4DHMKs",32)

^SHP("W4DHMKs",33)

^SHP("W4DHMKs",34)

^SHP("W4DHMKs",35)

^SHP("W4DHMKs",36)

^SHP("W4DHMKs",37)

^SHP("W4DHMKs",38)

^SHP("W4DHMKs",39)

^SHP("W4DHMKs",40)

^SHP("W4DHMKs",41)

^SHP("W4DHMKs",42)

^SHP("W4DHMKs",43)

^SHP("W4DHMKs",44)

^SHP("W4DHMKs",45)

^SHP("W4DHMKs",46)

^SHP("W4DHMKs",47)

^SHP("W4DHMKs",48)

^SHP("W4DHMKs",49)

^SHP("W4DHMKs",50)

^SHP("W4DHMKs",51)

^SHP("W4DHMKs",52)

^SHP("W4DHMKs",53)
                                                                             $ 
^SHP("W4DHMKs",54)
 ------------------------------------------------------------------------------
^SHP("W4DHMKs",55)
 |&40     >|&25    >|&20   >|        |        |      |&15  >|dlaw /qn 'ayg 'qn|
^SHP("W4DHMKs",56)
 ------------------------------------------------------------------------------
^SHP("W4DHMKs",57)
                                                                               
^SHP("W4DHMKs","RG")
H
^SHP("W4DLKMRs")

^SHP("W4DLKMRs",1)
                                                                               
^SHP("W4DLKMRs",2)
               &10  >: zegewl zveaw cr              &05   >: zegewl zvoawn     
^SHP("W4DLKMRs",3)
          &20       >:         gewl cr         &15        >:         gewln     
^SHP("W4DLKMRs",4)
           &30      >:        jix`z cr           &25      >:        jix`zn     
^SHP("W4DLKMRs",5)
                                                                               
^SHP("W4DLKMRs",6)
 ----------------------------------------------------------------------------  
^SHP("W4DLKMRs",7)
 |dxzi|minelyz|iekif z-yg|zeipci z-yg|zeipw k"dq|zncew dxzi|gewl my|gewl 'qn|  
^SHP("W4DLKMRs",8)
 ----------------------------------------------------------------------------  
^SHP("W4DLKMRs",9)
 $9.99:9999.99:  9999.99:   99999.99:  99999.99:  99999.99:TTTTTTT:TTTTTTTTT:1 
^SHP("W4DLKMRs",10)

^SHP("W4DLKMRs",11)

^SHP("W4DLKMRs",12)

^SHP("W4DLKMRs",13)

^SHP("W4DLKMRs",14)

^SHP("W4DLKMRs",15)

^SHP("W4DLKMRs",16)

^SHP("W4DLKMRs",17)

^SHP("W4DLKMRs",18)

^SHP("W4DLKMRs",19)

^SHP("W4DLKMRs",20)

^SHP("W4DLKMRs",21)

^SHP("W4DLKMRs",22)

^SHP("W4DLKMRs",23)

^SHP("W4DLKMRs",24)

^SHP("W4DLKMRs",25)

^SHP("W4DLKMRs",26)

^SHP("W4DLKMRs",27)

^SHP("W4DLKMRs",28)

^SHP("W4DLKMRs",29)

^SHP("W4DLKMRs",30)

^SHP("W4DLKMRs",31)

^SHP("W4DLKMRs",32)

^SHP("W4DLKMRs",33)

^SHP("W4DLKMRs",34)

^SHP("W4DLKMRs",35)

^SHP("W4DLKMRs",36)

^SHP("W4DLKMRs",37)

^SHP("W4DLKMRs",38)

^SHP("W4DLKMRs",39)

^SHP("W4DLKMRs",40)

^SHP("W4DLKMRs",41)

^SHP("W4DLKMRs",42)

^SHP("W4DLKMRs",43)

^SHP("W4DLKMRs",44)

^SHP("W4DLKMRs",45)

^SHP("W4DLKMRs",46)

^SHP("W4DLKMRs",47)

^SHP("W4DLKMRs",48)

^SHP("W4DLKMRs",49)

^SHP("W4DLKMRs",50)

^SHP("W4DLKMRs",51)

^SHP("W4DLKMRs",52)

^SHP("W4DLKMRs",53)

^SHP("W4DLKMRs",54)
                                                                             $ 
^SHP("W4DLKMRs",55)
  -----------------------------------------------------------------------------
^SHP("W4DLKMRs",56)
                                                                               
^SHP("W4DLKMRs","RG")
H
^SHP("W4DMLZs")

^SHP("W4DMLZs",1)
                             #  mixvln g"ec  #                                 
^SHP("W4DMLZs",1,"%TOP")
29
^SHP("W4DMLZs",2)
                     &10      >   jix`z cr    &05      >  jix`zn               
^SHP("W4DMLZs",2,"%TOP")
21
^SHP("W4DMLZs",3)
                         &20  >     dry cr        &15  >    dryn               
^SHP("W4DMLZs",3,"%TOP")
25
^SHP("W4DMLZs",4)
 &36            >&35 >  ogley beq cr     &26           >&25 >  ogley beqn      
^SHP("W4DMLZs",4,"%TOP")
1
^SHP("W4DMLZs",5)
          &40 > 2 - zitqk dxibq itl, 1 - mihixt zxikn itl g"ec bivdl           
^SHP("W4DMLZs",5,"%TOP")
10
^SHP("W4DMLZs",6)
          &45 >     0 - zepnfdd lk, 2 - zexebq, 1 - zegezt zepnfd itl          
^SHP("W4DMLZs",6,"%TOP")
10
^SHP("W4DMLZs","RG")
H
^SHP("W4DP1s")

^SHP("W4DP1s",1)
    #&01                        > mihixt g"ec #                                
^SHP("W4DP1s",2)
                   &10      > jix`z cr    &05      > jix`zn                    
^SHP("W4DP1s",3)
 &36                 > &35 >:mihixt zveaw    &31                > &30>:'qn hq  
^SHP("W4DP1s",4)
  &17               >&16     >:hixt cr      &14              >&13     >:hixtn  
^SHP("W4DP1s",5)
 -----------------------------------------------------------------------------
^SHP("W4DP1s",6)
 | % |nrn iptl|oexg` xign|ehp mekq| dgpd | zenk |      hixt xe`z    |hixt cew| 
^SHP("W4DP1s",7)
 -----------------------------------------------------------------------------
^SHP("W4DP1s",8)
 $9.9: 9999.99:   9999.99:99999.99:999.99:9999.9:TTTTTTTTTTTTTTTTTTT:TTTTTTTT:1
^SHP("W4DP1s",9)

^SHP("W4DP1s",10)

^SHP("W4DP1s",11)

^SHP("W4DP1s",12)

^SHP("W4DP1s",13)

^SHP("W4DP1s",14)

^SHP("W4DP1s",15)

^SHP("W4DP1s",16)

^SHP("W4DP1s",17)

^SHP("W4DP1s",18)

^SHP("W4DP1s",19)

^SHP("W4DP1s",20)

^SHP("W4DP1s",21)

^SHP("W4DP1s",22)

^SHP("W4DP1s",23)

^SHP("W4DP1s",24)

^SHP("W4DP1s",25)

^SHP("W4DP1s",26)

^SHP("W4DP1s",27)

^SHP("W4DP1s",28)

^SHP("W4DP1s",29)

^SHP("W4DP1s",30)

^SHP("W4DP1s",31)

^SHP("W4DP1s",32)

^SHP("W4DP1s",33)

^SHP("W4DP1s",34)

^SHP("W4DP1s",35)

^SHP("W4DP1s",36)

^SHP("W4DP1s",37)

^SHP("W4DP1s",38)

^SHP("W4DP1s",39)

^SHP("W4DP1s",40)

^SHP("W4DP1s",41)

^SHP("W4DP1s",42)

^SHP("W4DP1s",43)

^SHP("W4DP1s",44)

^SHP("W4DP1s",45)

^SHP("W4DP1s",46)

^SHP("W4DP1s",47)

^SHP("W4DP1s",48)

^SHP("W4DP1s",49)

^SHP("W4DP1s",50)

^SHP("W4DP1s",51)

^SHP("W4DP1s",52)

^SHP("W4DP1s",53)

^SHP("W4DP1s",54)
                                                                            $ 
^SHP("W4DP1s",55)
 -----------------------------------------------------------------------------
^SHP("W4DP1s",56)
 &22      >: n"rn iptl &20      >: mekq   &18    >:zegpd  &15     >:zenk k"dq  
^SHP("W4DP1s",57)
                   &45    >: ehp zenk    &40      >: mekqa &25    >:   zeiwqr  
^SHP("W4DP1s","RG")
H
^SHP("W4DPRTENs")

^SHP("W4DPRTENs",1)
                              # xnbdl micnery mihixt g"ec #                    
^SHP("W4DPRTENs",2)
                                                                               
^SHP("W4DPRTENs",3)
                    &10      > : jix`z cr   &05      > : jix`zn                
^SHP("W4DPRTENs",4)
                    &20      > :  hixt cr   &15      > :  hixtn                
^SHP("W4DPRTENs",5)
                                                                               
^SHP("W4DPRTENs",6)
   ---------------------------------------------------------------------------
^SHP("W4DPRTENs",7)
   |mei seql dxzi|gahndn d`vi|mei zligzl dxzi|   hixt my   |hixt cew|  jix`z | 
^SHP("W4DPRTENs",8)
   ---------------------------------------------------------------------------
^SHP("W4DPRTENs",9)
   $     99999999:   99999999:       99999999:TTTTTTTTTTTTT:TTTTTTTT:99999999:1
^SHP("W4DPRTENs",10)

^SHP("W4DPRTENs",11)

^SHP("W4DPRTENs",12)

^SHP("W4DPRTENs",13)

^SHP("W4DPRTENs",14)

^SHP("W4DPRTENs",15)

^SHP("W4DPRTENs",16)

^SHP("W4DPRTENs",17)

^SHP("W4DPRTENs",18)

^SHP("W4DPRTENs",19)

^SHP("W4DPRTENs",20)

^SHP("W4DPRTENs",21)

^SHP("W4DPRTENs",22)

^SHP("W4DPRTENs",23)

^SHP("W4DPRTENs",24)

^SHP("W4DPRTENs",25)

^SHP("W4DPRTENs",26)

^SHP("W4DPRTENs",27)

^SHP("W4DPRTENs",28)

^SHP("W4DPRTENs",29)

^SHP("W4DPRTENs",30)

^SHP("W4DPRTENs",31)

^SHP("W4DPRTENs",32)

^SHP("W4DPRTENs",33)

^SHP("W4DPRTENs",34)

^SHP("W4DPRTENs",35)

^SHP("W4DPRTENs",36)

^SHP("W4DPRTENs",37)

^SHP("W4DPRTENs",38)

^SHP("W4DPRTENs",39)

^SHP("W4DPRTENs",40)

^SHP("W4DPRTENs",41)

^SHP("W4DPRTENs",42)

^SHP("W4DPRTENs",43)

^SHP("W4DPRTENs",44)

^SHP("W4DPRTENs",45)

^SHP("W4DPRTENs",46)

^SHP("W4DPRTENs",47)

^SHP("W4DPRTENs",48)

^SHP("W4DPRTENs",49)

^SHP("W4DPRTENs",50)

^SHP("W4DPRTENs",51)

^SHP("W4DPRTENs",52)

^SHP("W4DPRTENs",53)

^SHP("W4DPRTENs",54)
                                                                            $ 
^SHP("W4DPRTENs",55)
   ---------------------------------------------------------------------------
^SHP("W4DPRTENs",56)
    &35       >    &30     >     &25     >                                     
^SHP("W4DPRTENs",57)
                                                                               
^SHP("W4DPRTENs","RG")
H
^SHP("W4DPRTENv")

^SHP("W4DPRTENv",1)
                              # xnbdl micnery mihixt g"ec #                    
^SHP("W4DPRTENv",2)
                                                                               
^SHP("W4DPRTENv",3)
                    {10      } : jix`z cr   {05      } : jix`zn                
^SHP("W4DPRTENv",4)
                    {20      } :  hixt cr   {15      } :  hixtn                
^SHP("W4DPRTENv",5)
                                                                               
^SHP("W4DPRTENv",6)
                                                                            1$ 
^SHP("W4DPRTENv",7)
             : mei seql dxzi :  gahndn d`vi dnk : mei zligzl dxzi : jix`z :    
^SHP("W4DPRTENv",8)
                                                                               
^SHP("W4DPRTENv",9)
                                                                               
^SHP("W4DPRTENv",10)
                                                                               
^SHP("W4DPRTENv",11)
                                                                               
^SHP("W4DPRTENv",12)
                                                                               
^SHP("W4DPRTENv",13)
                                                                               
^SHP("W4DPRTENv",14)
                                                                               
^SHP("W4DPRTENv",15)
                                                                               
^SHP("W4DPRTENv",16)
                                                                               
^SHP("W4DPRTENv",17)
                                                                               
^SHP("W4DPRTENv",18)
                                                                               
^SHP("W4DPRTENv",19)
                                                                               
^SHP("W4DPRTENv",20)
                                                                               
^SHP("W4DPRTENv",21)
           $1                                                                  
^SHP("W4DPRTENv",22)
                {35       }          {30       }           {25     }           
^SHP("W4DPRTENv","RG")
H
^SHP("W4DTMs")

^SHP("W4DTMs",1)
                     &10      >:jix`z cr    &05      >:jix`zn                  
^SHP("W4DTMs",2)
                   &13        >: gewl cr  &12        >: gewln                  
^SHP("W4DTMs",3)
 ------------------------------------------------------------------------------
^SHP("W4DTMs",4)
 |  k"dq  | n"rn |n"rn iptl|     gewld my     | gewl 'qn | jix`zl |gelyn zcerz|
^SHP("W4DTMs",5)
 ------------------------------------------------------------------------------
^SHP("W4DTMs",6)
 $TTTTTTTT:TTTTTT: 99999.99:TTTTTTTTTTTTTTTTTT:TTTTTTTTTT:99999999:TTTTTTTTTTT:1
^SHP("W4DTMs",7)

^SHP("W4DTMs",8)

^SHP("W4DTMs",9)

^SHP("W4DTMs",10)

^SHP("W4DTMs",11)

^SHP("W4DTMs",12)

^SHP("W4DTMs",13)

^SHP("W4DTMs",14)

^SHP("W4DTMs",15)

^SHP("W4DTMs",16)

^SHP("W4DTMs",17)

^SHP("W4DTMs",18)

^SHP("W4DTMs",19)

^SHP("W4DTMs",20)

^SHP("W4DTMs",21)

^SHP("W4DTMs",22)

^SHP("W4DTMs",23)

^SHP("W4DTMs",24)

^SHP("W4DTMs",25)

^SHP("W4DTMs",26)

^SHP("W4DTMs",27)

^SHP("W4DTMs",28)

^SHP("W4DTMs",29)

^SHP("W4DTMs",30)

^SHP("W4DTMs",31)

^SHP("W4DTMs",32)

^SHP("W4DTMs",33)

^SHP("W4DTMs",34)

^SHP("W4DTMs",35)

^SHP("W4DTMs",36)

^SHP("W4DTMs",37)

^SHP("W4DTMs",38)

^SHP("W4DTMs",39)

^SHP("W4DTMs",40)

^SHP("W4DTMs",41)

^SHP("W4DTMs",42)

^SHP("W4DTMs",43)

^SHP("W4DTMs",44)

^SHP("W4DTMs",45)

^SHP("W4DTMs",46)

^SHP("W4DTMs",47)

^SHP("W4DTMs",48)

^SHP("W4DTMs",49)

^SHP("W4DTMs",50)

^SHP("W4DTMs",51)

^SHP("W4DTMs",52)

^SHP("W4DTMs",53)
                                                                             $ 
^SHP("W4DTMs",54)
 ------------------------------------------------------------------------------
^SHP("W4DTMs",55)
                                                                               
^SHP("W4DTMs",56)
  &40      > k"dq  &25     > n"rn &20     >: n"rn iptl  &15  >:gelyn zecerz 'qn
^SHP("W4DTMs",57)
                                                                               
^SHP("W4DTMs",58)
                                                                               
^SHP("W4DTMs","RG")
H
^SHP("W4HIPUS1s")

^SHP("W4HIPUS1s",1)
                          #&03            > : jnqn beq#                        
^SHP("W4HIPUS1s",2)
                   &10     >    jix`z cr    &05       >     jix`zn             
^SHP("W4HIPUS1s",3)
                &13        >  'wl beq cr   &11        >   'wl beqn             
^SHP("W4HIPUS1s",4)
                &20        >     gewl cr   &15        >      gewln             
^SHP("W4HIPUS1s",5)
                   &30     >     mekq cr    &25       >      mekqn             
^SHP("W4HIPUS1s",6)
                 &40       > jnqn 'qn cr    &35       >  jnqn 'qnn             
^SHP("W4HIPUS1s",7)
 ----------------------------------------------------------------------------- 
^SHP("W4HIPUS1s",8)
 |  mekq  |dpnfd 'qn|           gewl my       |  gewl 'qn  |  jix`z |jnqn 'qn| 
^SHP("W4HIPUS1s",9)
 ----------------------------------------------------------------------------- 
^SHP("W4HIPUS1s",10)
 $99999.99: 9999999 :TTTTTTTTTTTTTTTTTTTTTTTTT:999999999999:99999999:TTTTTTTT:1
^SHP("W4HIPUS1s",11)

^SHP("W4HIPUS1s",12)

^SHP("W4HIPUS1s",13)

^SHP("W4HIPUS1s",14)
                                                                               
^SHP("W4HIPUS1s",15)
                                                                               
^SHP("W4HIPUS1s",16)
                                                                               
^SHP("W4HIPUS1s",17)
                                                                               
^SHP("W4HIPUS1s",18)
                                                                               
^SHP("W4HIPUS1s",19)
                                                                               
^SHP("W4HIPUS1s",20)
                                                                               
^SHP("W4HIPUS1s",21)
                                                                               
^SHP("W4HIPUS1s",22)

^SHP("W4HIPUS1s",23)

^SHP("W4HIPUS1s",24)

^SHP("W4HIPUS1s",25)

^SHP("W4HIPUS1s",26)

^SHP("W4HIPUS1s",27)

^SHP("W4HIPUS1s",28)

^SHP("W4HIPUS1s",29)

^SHP("W4HIPUS1s",30)

^SHP("W4HIPUS1s",31)

^SHP("W4HIPUS1s",32)

^SHP("W4HIPUS1s",33)

^SHP("W4HIPUS1s",34)

^SHP("W4HIPUS1s",35)
                                                                               
^SHP("W4HIPUS1s",36)
                                                                               
^SHP("W4HIPUS1s",37)
                                                                               
^SHP("W4HIPUS1s",38)
                                                                               
^SHP("W4HIPUS1s",39)
                                                                               
^SHP("W4HIPUS1s",40)
                                                                               
^SHP("W4HIPUS1s",41)
                                                                               
^SHP("W4HIPUS1s",42)
                                                                               
^SHP("W4HIPUS1s",43)

^SHP("W4HIPUS1s",44)
                                                                               
^SHP("W4HIPUS1s",45)
                                                                               
^SHP("W4HIPUS1s",46)
                                                                               
^SHP("W4HIPUS1s",47)
                                                                               
^SHP("W4HIPUS1s",48)
                                                                               
^SHP("W4HIPUS1s",49)
                                                                               
^SHP("W4HIPUS1s",50)
                                                                               
^SHP("W4HIPUS1s",51)
                                                                               
^SHP("W4HIPUS1s",52)

^SHP("W4HIPUS1s",53)

^SHP("W4HIPUS1s",54)
                                                                              $
^SHP("W4HIPUS1s",55)
 ------------------------------------------------------------------------------
^SHP("W4HIPUS1s",56)
 &50     >        &48        > •          >   &44      >    &42         >      
^SHP("W4HIPUS1s",57)
                                                                               
^SHP("W4HIPUS1s","RG")
H
^SHP("W4HIPUSs")

^SHP("W4HIPUSs",1)
                            #&03          > : jnqn beq#                        
^SHP("W4HIPUSs",1,"%TOP")
28
^SHP("W4HIPUSs",2)
                   &10     >    jix`z cr    &05       >     jix`zn             
^SHP("W4HIPUSs",2,"%TOP")
19
^SHP("W4HIPUSs",3)
                   &13     >   'wl beq cr   &11       >   'wl beqn             
^SHP("W4HIPUSs",3,"%TOP")
19
^SHP("W4HIPUSs",4)
                &20        >     gewl cr   &15        >      gewln             
^SHP("W4HIPUSs",4,"%TOP")
16
^SHP("W4HIPUSs",5)
                 &30       >     mekq cr    &25       >      mekqn             
^SHP("W4HIPUSs",5,"%TOP")
17
^SHP("W4HIPUSs",6)
                 &40       > jnqn 'qn cr    &35       >  jnqn 'qnn             
^SHP("W4HIPUSs",6,"%TOP")
17
^SHP("W4HIPUSs",7)
    -------------------------------------------------------------------
^SHP("W4HIPUSs",7,"%TOP")
4
^SHP("W4HIPUSs",8)
    |  mekq  |           gewl my       |  gewl 'qn  |  jix`z |jnqn 'qn|        
^SHP("W4HIPUSs",8,"%TOP")
4
^SHP("W4HIPUSs",9)
    -------------------------------------------------------------------
^SHP("W4HIPUSs",9,"%TOP")
4
^SHP("W4HIPUSs",10)
    $99999.99:TTTTTTTTTTTTTTTTTTTTTTTTT:999999999999:99999999:99999999:1
^SHP("W4HIPUSs",10,"%TOP")
4
^SHP("W4HIPUSs",11)

^SHP("W4HIPUSs",11,"%TOP")
0
^SHP("W4HIPUSs",12)

^SHP("W4HIPUSs",12,"%TOP")
0
^SHP("W4HIPUSs",13)

^SHP("W4HIPUSs",13,"%TOP")
0
^SHP("W4HIPUSs",14)
                                                                               
^SHP("W4HIPUSs",14,"%TOP")
79
^SHP("W4HIPUSs",15)
                                                                               
^SHP("W4HIPUSs",15,"%TOP")
79
^SHP("W4HIPUSs",16)
                                                                               
^SHP("W4HIPUSs",16,"%TOP")
79
^SHP("W4HIPUSs",17)

^SHP("W4HIPUSs",17,"%TOP")
0
^SHP("W4HIPUSs",18)

^SHP("W4HIPUSs",18,"%TOP")
0
^SHP("W4HIPUSs",19)
                                                                               
^SHP("W4HIPUSs",19,"%TOP")
79
^SHP("W4HIPUSs",20)
                                                                               
^SHP("W4HIPUSs",20,"%TOP")
79
^SHP("W4HIPUSs",21)
                                                                               
^SHP("W4HIPUSs",21,"%TOP")
79
^SHP("W4HIPUSs",22)
                                                                               
^SHP("W4HIPUSs",22,"%TOP")
79
^SHP("W4HIPUSs",23)
                                                                               
^SHP("W4HIPUSs",23,"%TOP")
79
^SHP("W4HIPUSs",24)
                                                                               
^SHP("W4HIPUSs",24,"%TOP")
79
^SHP("W4HIPUSs",25)
                                                                               
^SHP("W4HIPUSs",25,"%TOP")
79
^SHP("W4HIPUSs",26)
                                                                               
^SHP("W4HIPUSs",26,"%TOP")
79
^SHP("W4HIPUSs",27)

^SHP("W4HIPUSs",27,"%TOP")
0
^SHP("W4HIPUSs",28)

^SHP("W4HIPUSs",28,"%TOP")
0
^SHP("W4HIPUSs",29)

^SHP("W4HIPUSs",29,"%TOP")
0
^SHP("W4HIPUSs",30)

^SHP("W4HIPUSs",30,"%TOP")
0
^SHP("W4HIPUSs",31)

^SHP("W4HIPUSs",31,"%TOP")
0
^SHP("W4HIPUSs",32)

^SHP("W4HIPUSs",32,"%TOP")
0
^SHP("W4HIPUSs",33)

^SHP("W4HIPUSs",33,"%TOP")
0
^SHP("W4HIPUSs",34)

^SHP("W4HIPUSs",34,"%TOP")
0
^SHP("W4HIPUSs",35)

^SHP("W4HIPUSs",35,"%TOP")
0
^SHP("W4HIPUSs",36)

^SHP("W4HIPUSs",36,"%TOP")
0
^SHP("W4HIPUSs",37)
                                                                               
^SHP("W4HIPUSs",37,"%TOP")
79
^SHP("W4HIPUSs",38)
                                                                               
^SHP("W4HIPUSs",38,"%TOP")
79
^SHP("W4HIPUSs",39)
                                                                               
^SHP("W4HIPUSs",39,"%TOP")
79
^SHP("W4HIPUSs",40)
                                                                               
^SHP("W4HIPUSs",40,"%TOP")
79
^SHP("W4HIPUSs",41)
                                                                               
^SHP("W4HIPUSs",41,"%TOP")
79
^SHP("W4HIPUSs",42)
                                                                               
^SHP("W4HIPUSs",42,"%TOP")
79
^SHP("W4HIPUSs",43)
                                                                               
^SHP("W4HIPUSs",43,"%TOP")
79
^SHP("W4HIPUSs",44)
                                                                               
^SHP("W4HIPUSs",44,"%TOP")
79
^SHP("W4HIPUSs",45)

^SHP("W4HIPUSs",45,"%TOP")
0
^SHP("W4HIPUSs",46)

^SHP("W4HIPUSs",46,"%TOP")
0
^SHP("W4HIPUSs",47)
                                                                               
^SHP("W4HIPUSs",47,"%TOP")
79
^SHP("W4HIPUSs",48)
                                                                               
^SHP("W4HIPUSs",48,"%TOP")
79
^SHP("W4HIPUSs",49)

^SHP("W4HIPUSs",49,"%TOP")
0
^SHP("W4HIPUSs",50)

^SHP("W4HIPUSs",50,"%TOP")
0
^SHP("W4HIPUSs",51)

^SHP("W4HIPUSs",51,"%TOP")
0
^SHP("W4HIPUSs",52)
                                                                     $ 
^SHP("W4HIPUSs",52,"%TOP")
69
^SHP("W4HIPUSs",53)
    -------------------------------------------------------------------
^SHP("W4HIPUSs",53,"%TOP")
4
^SHP("W4HIPUSs",54)
  &50       >     &48        > •          >   &44      >    &42         >      
^SHP("W4HIPUSs",54,"%TOP")
2
^SHP("W4HIPUSs",55)
                                                                               
^SHP("W4HIPUSs",55,"%TOP")
79
^SHP("W4HIPUSs","RG")
H
^SHP("W4HZCAs")

^SHP("W4HZCAs",1)
                                 # `"k g"ec #                                  
^SHP("W4HZCAs",2)
                   &10      > jix`z cr    &05      >: jix`zn                   
^SHP("W4HZCAs",3)
                   &14      >  mekq cr    &12      >:  mekqn                   
^SHP("W4HZCAs",4)
              &20  > ( zelaw - 2 , zepnfd - 1 ,mlek - 0) jnqn beq              
^SHP("W4HZCAs",5)
       &22  > (dpzn/orhp-4,iciin aeig-3,wlc-2,xiih-1,il`xyi-0,mlek-9) qihxk beq
^SHP("W4HZCAs",6)
                        &24               >: zepexg` zextq 4 e` i`xy` qihxk 'qn
^SHP("W4HZCAs",7)
 ------------------------------------------------------------------------------
^SHP("W4HZCAs",8)
 |  mekq  | `"k beq |dzknq`|    `"k 'qn   |dwqr 'qn|jnqn 'qn|jnqn beq| jix`z  |
^SHP("W4HZCAs",9)
 ------------------------------------------------------------------------------
^SHP("W4HZCAs",10)
 $99999.99:TTTTTTTTT:TTTTTT:99999999999999:TTTTTTTT:99999999:TTTTTTTT:99999999:1
^SHP("W4HZCAs",11)
                                                                               
^SHP("W4HZCAs",12)
                                                                               
^SHP("W4HZCAs",13)
                                                                               
^SHP("W4HZCAs",14)
                                                                               
^SHP("W4HZCAs",15)
                                                                               
^SHP("W4HZCAs",16)
                                                                               
^SHP("W4HZCAs",17)
                                                                               
^SHP("W4HZCAs",18)
                                                                               
^SHP("W4HZCAs",19)
                                                                               
^SHP("W4HZCAs",20)
                                                                               
^SHP("W4HZCAs",21)
                                                                               
^SHP("W4HZCAs",22)
                                                                             $ 
^SHP("W4HZCAs",23)
 ------------------------------------------------------------------------------
^SHP("W4HZCAs",24)
                                                                               
^SHP("W4HZCAs",25)
                                                                               
^SHP("W4HZCAs",26)
                                                                               
^SHP("W4HZCAs",27)
                                                                               
^SHP("W4HZCAs",28)
                                                                               
^SHP("W4HZCAs",29)
                                                                               
^SHP("W4HZCAs",30)
                                                                               
^SHP("W4HZCAs",31)
                                                                               
^SHP("W4HZCAs",32)
                                                                               
^SHP("W4HZCAs",33)
                                                                               
^SHP("W4HZCAs",34)
                                                                               
^SHP("W4HZCAs",35)
                                                                               
^SHP("W4HZCAs",36)
  &35     >:      qxpiic k"dq  &30     >:  dfie k"dq &25     >: hxk`xyi k"dq   
^SHP("W4HZCAs",37)
 &50     > :         `"k k"dq  &45     >: ine`l k"dq &40     >:.qw` .n` k"dq   
^SHP("W4HZCAs",38)
 &60     > :           minipt  &55     > : md mipevig i`xy` iqihxk k"dq jeza   
^SHP("W4HZCAs","RG")
H
^SHP("W4HZH",1)
                       &05                                                     
^SHP("W4LEVSPRs")

^SHP("W4LEVSPRs",1)
                            # migkep micaer zniyx #                            
^SHP("W4LEVSPRs",2)
                        &10  >: dry  &05    > : jix`z                          
^SHP("W4LEVSPRs",3)
        --------------------------------------------------------------
^SHP("W4LEVSPRs",4)
        | `vnpy onf | dqipk zry |dqipk jix`z |   caer  my   |caer 'qn|         
^SHP("W4LEVSPRs",5)
        --------------------------------------------------------------
^SHP("W4LEVSPRs",6)
        $      99999:      99999:       99999:TTTTTTTTTTTTTT:TTTTTTTT:1
^SHP("W4LEVSPRs",7)

^SHP("W4LEVSPRs",8)

^SHP("W4LEVSPRs",9)

^SHP("W4LEVSPRs",10)

^SHP("W4LEVSPRs",11)

^SHP("W4LEVSPRs",12)

^SHP("W4LEVSPRs",13)

^SHP("W4LEVSPRs",14)

^SHP("W4LEVSPRs",15)

^SHP("W4LEVSPRs",16)

^SHP("W4LEVSPRs",17)

^SHP("W4LEVSPRs",18)

^SHP("W4LEVSPRs",19)

^SHP("W4LEVSPRs",20)

^SHP("W4LEVSPRs",21)

^SHP("W4LEVSPRs",22)

^SHP("W4LEVSPRs",23)

^SHP("W4LEVSPRs",24)

^SHP("W4LEVSPRs",25)

^SHP("W4LEVSPRs",26)

^SHP("W4LEVSPRs",27)

^SHP("W4LEVSPRs",28)

^SHP("W4LEVSPRs",29)

^SHP("W4LEVSPRs",30)

^SHP("W4LEVSPRs",31)

^SHP("W4LEVSPRs",32)

^SHP("W4LEVSPRs",33)

^SHP("W4LEVSPRs",34)

^SHP("W4LEVSPRs",35)

^SHP("W4LEVSPRs",36)

^SHP("W4LEVSPRs",37)

^SHP("W4LEVSPRs",38)

^SHP("W4LEVSPRs",39)

^SHP("W4LEVSPRs",40)

^SHP("W4LEVSPRs",41)

^SHP("W4LEVSPRs",42)

^SHP("W4LEVSPRs",43)

^SHP("W4LEVSPRs",44)

^SHP("W4LEVSPRs",45)

^SHP("W4LEVSPRs",46)

^SHP("W4LEVSPRs",47)

^SHP("W4LEVSPRs",48)

^SHP("W4LEVSPRs",49)

^SHP("W4LEVSPRs",50)

^SHP("W4LEVSPRs",51)

^SHP("W4LEVSPRs",52)

^SHP("W4LEVSPRs",53)
                                                                    $ 
^SHP("W4LEVSPRs",54)
        --------------------------------------------------------------
^SHP("W4LEVSPRs",55)
                                                                               
^SHP("W4LEVSPRs",56)
                                                                               
^SHP("W4LEVSPRs",57)
                                                                               
^SHP("W4LEVSPRs",58)
                                                                               
^SHP("W4LEVSPRs",59)
                                                                               
^SHP("W4LEVSPRs",60)
                                                                               
^SHP("W4LEVSPRs",61)
                                                                               
^SHP("W4LEVSPRs",62)
                                                                               
^SHP("W4LEVSPRs",63)
                                                                               
^SHP("W4LEVSPRs",64)
                                                                               
^SHP("W4LEVSPRs",65)
                                                                               
^SHP("W4LEVSPRs",66)
                                                                               
^SHP("W4LEVSPRs",67)
                                                                               
^SHP("W4LEVSPRs",68)
                                                                               
^SHP("W4LEVSPRs",69)
                                                                               
^SHP("W4LEVSPRs",70)
                                                                               
^SHP("W4LEVSPRs",71)
                                                                               
^SHP("W4LEVSPRs","RG")
H
^SHP("W4LKHPRMs")

^SHP("W4LKHPRMs",1)
                                                                               
^SHP("W4LKHPRMs",2)
                                                                               
^SHP("W4LKHPRMs",3)
              &10                                      >: wqr ly zaezk         
^SHP("W4LKHPRMs",4)
         &11                                     > : x`ec zgilyl zaezk         
^SHP("W4LKHPRMs",5)
                       &13                             > : zehpicxe`ew         
^SHP("W4LKHPRMs",6)
                                                 &12        >:     'lh         
^SHP("W4LKHPRMs",7)
                                                 &15        >:    ciip         
^SHP("W4LKHPRMs",8)
                                                 &17        >:     qwt         
^SHP("W4LKHPRMs",9)
                    &20                                 >:       l"`ec         
^SHP("W4LKHPRMs",10)
               &22                                      >: hpxhpi` xz`         
^SHP("W4LKHPRMs",11)
                                             &23        >:  dyxen wqer         
^SHP("W4LKHPRMs",12)
                       &25                          >: LOGO -l uaew my         
^SHP("W4LKHPRMs",13)
                               &30  > : ( milqwit ) LOGO dpenz ly daeb         
^SHP("W4LKHPRMs",14)
                               &35  > : ( milqwit ) LOGO dpenz ly agex         
^SHP("W4LKHPRMs",15)
                           &40 >: LOGO mr xak xiip m` xi`ydl zexey dnk         
^SHP("W4LKHPRMs",16)
       &45                                             >: zkxrn ly xz`         
^SHP("W4LKHPRMs",17)
                                &50 > : wpa oeayg ihxt ebela bivdl m`d         
^SHP("W4LKHPRMs",18)
                                                                               
^SHP("W4LKHPRMs",19)
                                                                               
^SHP("W4LKHPRMs",20)
                                                                               
^SHP("W4LKHPRMs",21)
                                                                               
^SHP("W4LKHPRMs","RG")
H
^SHP("W4MLTNQs")

^SHP("W4MLTNQs",1)
                                 # i`ln zerepz g"ec #                          
^SHP("W4MLTNQs",2)
             &10       > jixrz cr            &05      > jix`zn                 
^SHP("W4MLTNQs",3)
  &21               > &20  > dwlgn cr         &16            > &15  > dwlgnn   
^SHP("W4MLTNQs",4)
  &25               > &24  > dveaw cr         &23            > &22  > dveawn   
^SHP("W4MLTNQs",5)
           &30 > dtew ihixt bivdl m`d      &27              > &26   >    wtq   
^SHP("W4MLTNQs",6)
    ---------------------------------------------------------------------------
^SHP("W4MLTNQs",7)
    |ziteq dxzi| d`ved| xfgd | dqpkd |   dxzi|  'gi |    hixt my   | hixt cew |
^SHP("W4MLTNQs",8)
    |          |      |      |       |zizlgzd| dcin |              |          |
^SHP("W4MLTNQs",9)
    ---------------------------------------------------------------------------
^SHP("W4MLTNQs",10)
    $  99999.99:999.99:999.99:9999.99:9999.99:TTTTTT:TTTTTTTTTTTTTT:TTTTTTTTTT:1
^SHP("W4MLTNQs",11)

^SHP("W4MLTNQs",12)

^SHP("W4MLTNQs",13)

^SHP("W4MLTNQs",14)

^SHP("W4MLTNQs",15)

^SHP("W4MLTNQs",16)

^SHP("W4MLTNQs",17)

^SHP("W4MLTNQs",18)

^SHP("W4MLTNQs",19)

^SHP("W4MLTNQs",20)

^SHP("W4MLTNQs",21)

^SHP("W4MLTNQs",22)

^SHP("W4MLTNQs",23)

^SHP("W4MLTNQs",24)

^SHP("W4MLTNQs",25)

^SHP("W4MLTNQs",26)

^SHP("W4MLTNQs",27)

^SHP("W4MLTNQs",28)

^SHP("W4MLTNQs",29)

^SHP("W4MLTNQs",30)

^SHP("W4MLTNQs",31)

^SHP("W4MLTNQs",32)

^SHP("W4MLTNQs",33)

^SHP("W4MLTNQs",34)

^SHP("W4MLTNQs",35)

^SHP("W4MLTNQs",36)

^SHP("W4MLTNQs",37)

^SHP("W4MLTNQs",38)

^SHP("W4MLTNQs",39)

^SHP("W4MLTNQs",40)

^SHP("W4MLTNQs",41)

^SHP("W4MLTNQs",42)

^SHP("W4MLTNQs",43)

^SHP("W4MLTNQs",44)

^SHP("W4MLTNQs",45)

^SHP("W4MLTNQs",46)

^SHP("W4MLTNQs",47)

^SHP("W4MLTNQs",48)

^SHP("W4MLTNQs",49)

^SHP("W4MLTNQs",50)

^SHP("W4MLTNQs",51)

^SHP("W4MLTNQs",52)
                                                                               
^SHP("W4MLTNQs",53)
                                                                               
^SHP("W4MLTNQs",54)

^SHP("W4MLTNQs",55)
                                                                             $ 
^SHP("W4MLTNQs",56)
    ---------------------------------------------------------------------------
^SHP("W4MLTNQs",57)
                                                                              
^SHP("W4MLTNQs","RG")
H
^SHP("W4PRMEMVs")

^SHP("W4PRMEMVs",1)
                                                                               
^SHP("W4PRMEMVs",2)
                                                &05      > :        ynzyn cew  
^SHP("W4PRMEMVs",3)
                                         &10             > :         IP zaezk  
^SHP("W4PRMEMVs",4)
                  &15                                    > : EMV zpkezl dvign  
^SHP("W4PRMEMVs",5)
                                                                               
^SHP("W4PRMEMVs","RG")
H
^SHP("W4PRMMSDs")

^SHP("W4PRMMSDs",1)
                             # dcrqna dcear mixhnxt zxcbd #                    
^SHP("W4PRMMSDs",1,"%TOP")
29
^SHP("W4PRMMSDs",2)
                                                                               
^SHP("W4PRMMSDs",2,"%TOP")
79
^SHP("W4PRMMSDs",3)
                     &15 :   (0-`l,1-ok)          xg` xvlnn dpnfd zpbd         
^SHP("W4PRMMSDs",3,"%TOP")
21
^SHP("W4PRMMSDs",4)
                     &17 :0- xbqy in ,1- dpnfd ligzdy in itl sqk zxitq         
^SHP("W4PRMMSDs",4,"%TOP")
21
^SHP("W4PRMMSDs",5)
                     &25 : (0-`l, 2-ldpn mb,1-ok) xvln ly zegkep wecal         
^SHP("W4PRMMSDs",5,"%TOP")
21
^SHP("W4PRMMSDs",6)
                  &45   >: xa ogleyl &40   >: libx ogleyl menipin xign         
^SHP("W4PRMMSDs",6,"%TOP")
18
^SHP("W4PRMMSDs",7)
                     &61 : (0-`l,1-ok) oeayg zligza gewl 'qn le`yl m`d         
^SHP("W4PRMMSDs",7,"%TOP")
21
^SHP("W4PRMMSDs",8)
                     &88 :0 -zxnyn seqa,1 -dceard jldna onefna mitih zclwd     
^SHP("W4PRMMSDs",8,"%TOP")
21
^SHP("W4PRMMSDs",9)
                                                                               
^SHP("W4PRMMSDs",9,"%TOP")
79
^SHP("W4PRMMSDs","RG")
H
^SHP("W4PRMMSLs")

^SHP("W4PRMMSLs",1)
                               # migelynl dpnfd mixhnxt zxcbd #                
^SHP("W4PRMMSLs",1,"%TOP")
31
^SHP("W4PRMMSLs",2)
                                                                               
^SHP("W4PRMMSLs",2,"%TOP")
79
^SHP("W4PRMMSLs",3)
                         g"y &54 >:        lrn gelyn inc lhany melyzl mekq     
^SHP("W4PRMMSLs",3,"%TOP")
25
^SHP("W4PRMMSLs",4)
                         % &65  > :                   (%) TAW -l      dgpd     
^SHP("W4PRMMSLs",4,"%TOP")
25
^SHP("W4PRMMSLs",5)
                              &70 :    (0-`l,1-ok)  `adl gewl ly `"k xenyl     
^SHP("W4PRMMSLs",5,"%TOP")
30
^SHP("W4PRMMSLs",6)
                              &75 :    0,1- 'n'z mewna dlaw qn 'ayg qitcdl     
^SHP("W4PRMMSLs",6,"%TOP")
30
^SHP("W4PRMMSLs",7)
                           &82  > :                    ilnipin mihixt mekq     
^SHP("W4PRMMSLs",7,"%TOP")
27
^SHP("W4PRMMSLs",8)
                              &85 :         dgilyl dpnfd zlaw oia zewc 'qn     
^SHP("W4PRMMSLs",8,"%TOP")
30
^SHP("W4PRMMSLs",9)
                              &88 :     dgilyl gelyn 'z z`ved oia zewc 'qn     
^SHP("W4PRMMSLs",9,"%TOP")
30
^SHP("W4PRMMSLs",10)
           &93            > &92  >:                  "xign zrvd" hixt xtqn     
^SHP("W4PRMMSLs",10,"%TOP")
11
^SHP("W4PRMMSLs",11)
                                                                               
^SHP("W4PRMMSLs",11,"%TOP")
79
^SHP("W4PRMMSLs",12)
                                                                               
^SHP("W4PRMMSLs",12,"%TOP")
79
^SHP("W4PRMMSLs","RG")
H
^SHP("W4PRMPC4s")

^SHP("W4PRMPC4s",1)
                                                                               
^SHP("W4PRMPC4s",1,"%TOP")
79
^SHP("W4PRMPC4s",2)
                               # migelynl dpnfd mixhnxt zxcbd #                
^SHP("W4PRMPC4s",2,"%TOP")
31
^SHP("W4PRMPC4s",3)
               &30 >: zxvewn dxeva glynl jnqn/gelyn 'z ly zxzek qitcdl m`d     
^SHP("W4PRMPC4s",3,"%TOP")
15
^SHP("W4PRMPC4s",4)
                             &50 >:       xegy lr oal dpnfd 'qn qitcdl m`d     
^SHP("W4PRMPC4s",4,"%TOP")
29
^SHP("W4PRMPC4s",5)
                             &72 >:       gahnl oeaa gewl zaezk qitcdl m`d     
^SHP("W4PRMPC4s",5,"%TOP")
29
^SHP("W4PRMPC4s",6)
                             &73 >:        migelyna oeayg qitcdl xyt`l m`d     
^SHP("W4PRMPC4s",6,"%TOP")
29
^SHP("W4PRMPC4s",7)
                             &75 >:     'n'z mewna dlaw qn 'ayg qitcdl m`d     
^SHP("W4PRMPC4s",7,"%TOP")
29
^SHP("W4PRMPC4s",8)
                             &76 >:           dwacn lr hixt cew qitcdl m`d     
^SHP("W4PRMPC4s",8,"%TOP")
29
^SHP("W4PRMPC4s",9)
                             &96 >:      melyz onfa cin zipeayg qitcdl m`d     
^SHP("W4PRMPC4s",9,"%TOP")
29
^SHP("W4PRMPC4s",10)
                                                                               
^SHP("W4PRMPC4s",10,"%TOP")
79
^SHP("W4PRMPC4s","RG")
H
^SHP("W4PRMPZMs",1)
                                                                               
^SHP("W4PRMPZMs",1,"%TOP")
79
^SHP("W4PRMPZMs",2)
                             &11              > &10    >: miievitl hixt cew    
^SHP("W4PRMPZMs",2,"%TOP")
29
^SHP("W4PRMPZMs",3)
                                                                               
^SHP("W4PRMPZMs",3,"%TOP")
79
^SHP("W4PRMPZMs","RG")
H
^SHP("W4PRMWEBs")
hpxhpi` 'fdl mixhnxt
^SHP("W4PRMWEBs",1)
                                    # oiil oe` zepnfd zlawl mixhnxt #          
^SHP("W4PRMWEBs",2)
                                                                               
^SHP("W4PRMWEBs",3)
                                          &05    > :          dcrqn 'qn        
^SHP("W4PRMWEBs",4)
                                       &07       > :              dnqiq        
^SHP("W4PRMWEBs",5)
                                          &10    > :   iaihwit lawn 'qn        
^SHP("W4PRMWEBs",6)
                                                                               
^SHP("W4PRMWEBs",7)
                                     &15         > :    qia oz gewl 'qn        
^SHP("W4PRMWEBs",8)
                                     &20         > :     qeaiq gewl 'qn        
^SHP("W4PRMWEBs",9)
                                     &22         > :  oetpetew gewl 'qn        
^SHP("W4PRMWEBs",10)
                                     &25         > :    dgelyn gewl 'qn        
^SHP("W4PRMWEBs",11)
                                     &30         > : lke`d xtq gewl 'qn        
^SHP("W4PRMWEBs",12)
                                                                               
^SHP("W4PRMWEBs",13)
                                                                               
^SHP("W4PRMWEBs",14)
                                                                               
^SHP("W4PRMWEBs","RG")
H
^SHP("W4PRMZMSs")

^SHP("W4PRMZMSs",1)
                                                                 &10 > : IN USE
^SHP("W4PRMZMSs",2)
                 &40                                             > : STATION ID
^SHP("W4PRMZMSs",3)
                 &50                                                   > : URL 
^SHP("W4PRMZMSs",4)
                                                                               
^SHP("W4PRMZMSs","RG")
H
^SHP("W4PRMZSMv")

^SHP("W4PRMZSMv",1)
                                      {10 } : (  `l - 0, ok-1 ) dlirt zkxrn m`d
^SHP("W4PRMZSMv",2)
                {30                                              } : STATION ID
^SHP("W4PRMZSMv",3)
                {50                                                    } : URL 
^SHP("W4PRMZSMv",4)
                                                                               
^SHP("W4PRMZSMv","RG")
H
^SHP("W4PSWASHs")

^SHP("W4PSWASHs",1)
                                                                               
^SHP("W4PSWASHs",1,"%TOP")
79
^SHP("W4PSWASHs",2)
                                           &05       > : zkxrnl dqipkl dnqiq   
^SHP("W4PSWASHs",2,"%TOP")
43
^SHP("W4PSWASHs",3)
                                                                               
^SHP("W4PSWASHs",3,"%TOP")
79
^SHP("W4PSWASHs",4)
                                   &10       > : zexiy zeipkezl dqipkl dnqiq   
^SHP("W4PSWASHs",4,"%TOP")
35
^SHP("W4PSWASHs","RG")
H
^SHP("W4REPEMVs")

^SHP("W4REPEMVs",1)
                                                                               
^SHP("W4REPEMVs",1,"%TOP")
79
^SHP("W4REPEMVs",2)
                               --------------------------------------------
^SHP("W4REPEMVs",2,"%TOP")
31
^SHP("W4REPEMVs",3)
                               |                                          |    
^SHP("W4REPEMVs",3,"%TOP")
31
^SHP("W4REPEMVs",4)
                               --------------------------------------------
^SHP("W4REPEMVs",4,"%TOP")
31
^SHP("W4REPEMVs",5)
                               $TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT:1
^SHP("W4REPEMVs",5,"%TOP")
31
^SHP("W4REPEMVs",6)

^SHP("W4REPEMVs",6,"%TOP")
0
^SHP("W4REPEMVs",7)

^SHP("W4REPEMVs",7,"%TOP")
0
^SHP("W4REPEMVs",8)

^SHP("W4REPEMVs",8,"%TOP")
0
^SHP("W4REPEMVs",9)

^SHP("W4REPEMVs",9,"%TOP")
0
^SHP("W4REPEMVs",10)

^SHP("W4REPEMVs",10,"%TOP")
0
^SHP("W4REPEMVs",11)

^SHP("W4REPEMVs",11,"%TOP")
0
^SHP("W4REPEMVs",12)

^SHP("W4REPEMVs",12,"%TOP")
0
^SHP("W4REPEMVs",13)

^SHP("W4REPEMVs",13,"%TOP")
0
^SHP("W4REPEMVs",14)

^SHP("W4REPEMVs",14,"%TOP")
0
^SHP("W4REPEMVs",15)

^SHP("W4REPEMVs",15,"%TOP")
0
^SHP("W4REPEMVs",16)

^SHP("W4REPEMVs",16,"%TOP")
0
^SHP("W4REPEMVs",17)

^SHP("W4REPEMVs",17,"%TOP")
0
^SHP("W4REPEMVs",18)

^SHP("W4REPEMVs",18,"%TOP")
0
^SHP("W4REPEMVs",19)

^SHP("W4REPEMVs",19,"%TOP")
0
^SHP("W4REPEMVs",20)

^SHP("W4REPEMVs",20,"%TOP")
0
^SHP("W4REPEMVs",21)

^SHP("W4REPEMVs",21,"%TOP")
0
^SHP("W4REPEMVs",22)

^SHP("W4REPEMVs",22,"%TOP")
0
^SHP("W4REPEMVs",23)

^SHP("W4REPEMVs",23,"%TOP")
0
^SHP("W4REPEMVs",24)

^SHP("W4REPEMVs",24,"%TOP")
0
^SHP("W4REPEMVs",25)

^SHP("W4REPEMVs",25,"%TOP")
0
^SHP("W4REPEMVs",26)

^SHP("W4REPEMVs",26,"%TOP")
0
^SHP("W4REPEMVs",27)

^SHP("W4REPEMVs",27,"%TOP")
0
^SHP("W4REPEMVs",28)

^SHP("W4REPEMVs",28,"%TOP")
0
^SHP("W4REPEMVs",29)

^SHP("W4REPEMVs",29,"%TOP")
0
^SHP("W4REPEMVs",30)

^SHP("W4REPEMVs",30,"%TOP")
0
^SHP("W4REPEMVs",31)

^SHP("W4REPEMVs",31,"%TOP")
0
^SHP("W4REPEMVs",32)

^SHP("W4REPEMVs",32,"%TOP")
0
^SHP("W4REPEMVs",33)

^SHP("W4REPEMVs",33,"%TOP")
0
^SHP("W4REPEMVs",34)

^SHP("W4REPEMVs",34,"%TOP")
0
^SHP("W4REPEMVs",35)

^SHP("W4REPEMVs",35,"%TOP")
0
^SHP("W4REPEMVs",36)

^SHP("W4REPEMVs",36,"%TOP")
0
^SHP("W4REPEMVs",37)

^SHP("W4REPEMVs",37,"%TOP")
0
^SHP("W4REPEMVs",38)

^SHP("W4REPEMVs",38,"%TOP")
0
^SHP("W4REPEMVs",39)

^SHP("W4REPEMVs",39,"%TOP")
0
^SHP("W4REPEMVs",40)

^SHP("W4REPEMVs",40,"%TOP")
0
^SHP("W4REPEMVs",41)

^SHP("W4REPEMVs",41,"%TOP")
0
^SHP("W4REPEMVs",42)

^SHP("W4REPEMVs",42,"%TOP")
0
^SHP("W4REPEMVs",43)

^SHP("W4REPEMVs",43,"%TOP")
0
^SHP("W4REPEMVs",44)

^SHP("W4REPEMVs",44,"%TOP")
0
^SHP("W4REPEMVs",45)

^SHP("W4REPEMVs",45,"%TOP")
0
^SHP("W4REPEMVs",46)

^SHP("W4REPEMVs",46,"%TOP")
0
^SHP("W4REPEMVs",47)

^SHP("W4REPEMVs",47,"%TOP")
0
^SHP("W4REPEMVs",48)

^SHP("W4REPEMVs",48,"%TOP")
0
^SHP("W4REPEMVs",49)

^SHP("W4REPEMVs",49,"%TOP")
0
^SHP("W4REPEMVs",50)

^SHP("W4REPEMVs",50,"%TOP")
0
^SHP("W4REPEMVs",51)

^SHP("W4REPEMVs",51,"%TOP")
0
^SHP("W4REPEMVs",52)
                                                                         $ 
^SHP("W4REPEMVs",52,"%TOP")
73
^SHP("W4REPEMVs",53)
                               --------------------------------------------
^SHP("W4REPEMVs",53,"%TOP")
31
^SHP("W4REPEMVs",54)
                                                                              
^SHP("W4REPEMVs",54,"%TOP")
78
^SHP("W4REPEMVs","RG")
H
^SHP("W4REPPZMs")

^SHP("W4REPPZMs",1)
                             # miievit gec #                                   
^SHP("W4REPPZMs",2)
             &02 >: ( 2 - yenin jix`z itl ,1 - ievit jix`z itl )  mipezp bivdl 
^SHP("W4REPPZMs",3)
                     &10      > jix`z cr  &05     > jix`zn                     
^SHP("W4REPPZMs",4)
                                                                               
^SHP("W4REPPZMs","RG")
H
^SHP("W4REPSHDs")

^SHP("W4REPSHDs",1)
 -----------------------------------------------------------------------------
^SHP("W4REPSHDs",2)
 | 2 mekq| 1 nekq |yz|y`|  dwqir |  akek |  ehexa |ag|      qihxk     | xtqn | 
^SHP("W4REPSHDs",3)
 -----------------------------------------------------------------------------
^SHP("W4REPSHDs",4)
 $9999.99:99999.99:TT:TT:TTTTTTTT:9999.99:99999.99:TT:9999999999999999:TTTTTT:1
^SHP("W4REPSHDs",5)

^SHP("W4REPSHDs",6)

^SHP("W4REPSHDs",7)

^SHP("W4REPSHDs",8)

^SHP("W4REPSHDs",9)

^SHP("W4REPSHDs",10)

^SHP("W4REPSHDs",11)

^SHP("W4REPSHDs",12)

^SHP("W4REPSHDs",13)

^SHP("W4REPSHDs",14)

^SHP("W4REPSHDs",15)

^SHP("W4REPSHDs",16)

^SHP("W4REPSHDs",17)

^SHP("W4REPSHDs",18)

^SHP("W4REPSHDs",19)

^SHP("W4REPSHDs",20)

^SHP("W4REPSHDs",21)

^SHP("W4REPSHDs",22)

^SHP("W4REPSHDs",23)

^SHP("W4REPSHDs",24)

^SHP("W4REPSHDs",25)

^SHP("W4REPSHDs",26)

^SHP("W4REPSHDs",27)

^SHP("W4REPSHDs",28)

^SHP("W4REPSHDs",29)

^SHP("W4REPSHDs",30)

^SHP("W4REPSHDs",31)

^SHP("W4REPSHDs",32)

^SHP("W4REPSHDs",33)

^SHP("W4REPSHDs",34)

^SHP("W4REPSHDs",35)

^SHP("W4REPSHDs",36)

^SHP("W4REPSHDs",37)

^SHP("W4REPSHDs",38)
                                                                            $ 
^SHP("W4REPSHDs",39)
 -----------------------------------------------------------------------------
^SHP("W4REPSHDs",40)
                                                                               
^SHP("W4REPSHDs",41)
         zipetlh- lh , cala dnizg - ag , zvle`n - ln , zxye`n - yn :     dwqr  
^SHP("W4REPSHDs",42)
    oecren - 4 ; iciin - 3 ;30+'e,sicr dfie,xw`xyi - 2 ; libx -  1 :i`xy` beq  
^SHP("W4REPSHDs",43)
 'lyz oecren - 9 ; minelyz - 8 ;hicxw qxpiic,dfie - 6 ; `tl` - 5 : ----------  
^SHP("W4REPSHDs",44)
                                                                               
^SHP("W4REPSHDs","RG")
H
^SHP("W4REPSHVs")

^SHP("W4REPSHVs",1)
  #&03                                                            >#          
^SHP("W4REPSHVs",2)
                                                                               
^SHP("W4REPSHVs",3)
                &10       >:  ehexa zekf k"dq   &05      > :  ehexa daeg k"dq  
^SHP("W4REPSHVs",4)
                &20       >: miakek zekf k"dq   &15      > : miakek daeg k"dq  
^SHP("W4REPSHVs",5)
                                                                               
^SHP("W4REPSHVs",6)
  &27      >: ehexa zekf hxk`xyi k"dq     &25      >: ehexa daeg hxk`xyi k"dq  
^SHP("W4REPSHVs",7)
  &32      >:miakek zekf hxk`xyi k"dq     &30      >:miakek daeg hxk`xyi k"dq  
^SHP("W4REPSHVs",8)
                                                                               
^SHP("W4REPSHVs",9)
  &37      >: ehexa zekf    dfie k"dq     &35      >: ehexa daeg    dfie k"dq  
^SHP("W4REPSHVs",10)
  &42      >:miakek zekf    dfie k"dq     &40      >:miakek daeg    dfie k"dq  
^SHP("W4REPSHVs",11)
                                                                               
^SHP("W4REPSHVs",12)
  &47      >: ehexa zekf  qxpiic k"dq     &45      >: ehexa daeg  qxpiic k"dq  
^SHP("W4REPSHVs",13)
  &52      >:miakek zekf  qxpiic k"dq     &50      >:miakek daeg  qxpiic k"dq  
^SHP("W4REPSHVs",14)
                                                                               
^SHP("W4REPSHVs",15)
  &57      >: ehexa zekf .qw`.n` k"dq     &55      >: ehexa daeg .qw`.n` k"dq  
^SHP("W4REPSHVs",16)
  &62      >:miakek zekf .qw`.n` k"dq     &60      >:miakek daeg .qw`.n` k"dq  
^SHP("W4REPSHVs",17)
                                                                               
^SHP("W4REPSHVs",18)
  &67      >: ehexa zekf     JCB k"dq     &65      >: ehexa daeg     JCB k"dq  
^SHP("W4REPSHVs",19)
  &72      >:miakek zekf     JCB k"dq     &70      >:miakek daeg     JCB k"dq  
^SHP("W4REPSHVs",20)
                                                                               
^SHP("W4REPSHVs",21)
  &77      >: ehexa zekf   ine`l k"dq     &75      >: ehexa daeg   ine`l k"dq  
^SHP("W4REPSHVs",22)
  &82      >:miakek zekf   ine`l k"dq     &80      >:miakek daeg   ine`l k"dq  
^SHP("W4REPSHVs","RG")
H
^SHP("W4REPTL1s")

^SHP("W4REPTL1s",1)
                          # dpzn iyelz gec #                                   
^SHP("W4REPTL1s",1,"%TOP")
26
^SHP("W4REPTL1s",2)
              &02 >: ( 2 - yenin jix`z itl ,1 - dyikx jix`z itl )  mipezp bivdl
^SHP("W4REPTL1s",2,"%TOP")
14
^SHP("W4REPTL1s",3)
                     &10      > jix`z cr  &05     > jix`zn                     
^SHP("W4REPTL1s",3,"%TOP")
21
^SHP("W4REPTL1s",4)
                                                                              
^SHP("W4REPTL1s",4,"%TOP")
78
^SHP("W4REPTL1s","RG")
H
^SHP("W4REPTLs")

^SHP("W4REPTLs",1)
                          # dpzn iyelz gec #                                   
^SHP("W4REPTLs",2)
 &02              >: ( 2 - melyz jix`z itl ,1 - dxikn jix`z itl )  mipezp bivdl
^SHP("W4REPTLs",3)
                     &10      > jix`z cr  &05     > jix`zn                     
^SHP("W4REPTLs",4)
                                                                               
^SHP("W4REPTLs",5)
 ------------------------------------------------------------------------------
^SHP("W4REPTLs",6)
 |yz mekq|dpnfd|'yz jix`z|  mekq |  inl  | mlynd my |mlynd 'qn|  jix`z | dlaw |
^SHP("W4REPTLs",7)
 ------------------------------------------------------------------------------
^SHP("W4REPTLs",8)
 $9999.99:TTTTTTT:  99999999: 99999.99:TTTTTTTTT:TTTTTTTTT:TTTTTTTTT:99999999:TTTTTT:1
^SHP("W4REPTLs",9)

^SHP("W4REPTLs",10)

^SHP("W4REPTLs",11)

^SHP("W4REPTLs",12)

^SHP("W4REPTLs",13)

^SHP("W4REPTLs",14)

^SHP("W4REPTLs",15)

^SHP("W4REPTLs",16)

^SHP("W4REPTLs",17)

^SHP("W4REPTLs",18)

^SHP("W4REPTLs",19)

^SHP("W4REPTLs",20)

^SHP("W4REPTLs",21)

^SHP("W4REPTLs",22)

^SHP("W4REPTLs",23)

^SHP("W4REPTLs",24)

^SHP("W4REPTLs",25)

^SHP("W4REPTLs",26)

^SHP("W4REPTLs",27)

^SHP("W4REPTLs",28)

^SHP("W4REPTLs",29)

^SHP("W4REPTLs",30)

^SHP("W4REPTLs",31)

^SHP("W4REPTLs",32)

^SHP("W4REPTLs",33)

^SHP("W4REPTLs",34)

^SHP("W4REPTLs",35)

^SHP("W4REPTLs",36)

^SHP("W4REPTLs",37)

^SHP("W4REPTLs",38)

^SHP("W4REPTLs",39)

^SHP("W4REPTLs",40)

^SHP("W4REPTLs",41)

^SHP("W4REPTLs",42)

^SHP("W4REPTLs",43)

^SHP("W4REPTLs",44)

^SHP("W4REPTLs",45)

^SHP("W4REPTLs",46)

^SHP("W4REPTLs",47)

^SHP("W4REPTLs",48)

^SHP("W4REPTLs",49)

^SHP("W4REPTLs",50)

^SHP("W4REPTLs",51)

^SHP("W4REPTLs",52)

^SHP("W4REPTLs",53)

^SHP("W4REPTLs",54)
                                                                             $ 
^SHP("W4REPTLs",55)
 ------------------------------------------------------------------------------
^SHP("W4REPTLs",56)
 &25     >&00   >&00   >&20     >&00       >&00  >&00        > &00           > 
^SHP("W4REPTLs",57)
                                                                               
^SHP("W4REPTLs",58)
                                                                               
^SHP("W4REPTLs","RG")
H
^SHP("W4RKZSHDs")

^SHP("W4RKZSHDs",1)
                             # mixeciy fekix #                                 
^SHP("W4RKZSHDs",1,"%TOP")
29
^SHP("W4RKZSHDs",2)
                     &10      > jix`z cr  &05      > jix`zn                    
^SHP("W4RKZSHDs",2,"%TOP")
21
^SHP("W4RKZSHDs",3)
                                                                               
^SHP("W4RKZSHDs",3,"%TOP")
79
^SHP("W4RKZSHDs",4)
    -------------------------------------------------------------------------
^SHP("W4RKZSHDs",4,"%TOP")
4
^SHP("W4RKZSHDs",5)
    |`"k k"dq |ine`l|qxtqw`.n`|qxpiic|dfie|hxk`xyi|beq|`zknq`| dry |  jix`z |  
^SHP("W4RKZSHDs",5,"%TOP")
4
^SHP("W4RKZSHDs",6)
    -------------------------------------------------------------------------
^SHP("W4RKZSHDs",6,"%TOP")
4
^SHP("W4RKZSHDs",7)
    $999999.99:99.99:999999.99:999.99:9.99:9999.99:TTT:TTTTTT:99999:99999999:1
^SHP("W4RKZSHDs",7,"%TOP")
4
^SHP("W4RKZSHDs",8)

^SHP("W4RKZSHDs",8,"%TOP")
0
^SHP("W4RKZSHDs",9)

^SHP("W4RKZSHDs",9,"%TOP")
0
^SHP("W4RKZSHDs",10)

^SHP("W4RKZSHDs",10,"%TOP")
0
^SHP("W4RKZSHDs",11)

^SHP("W4RKZSHDs",11,"%TOP")
0
^SHP("W4RKZSHDs",12)

^SHP("W4RKZSHDs",12,"%TOP")
0
^SHP("W4RKZSHDs",13)

^SHP("W4RKZSHDs",13,"%TOP")
0
^SHP("W4RKZSHDs",14)

^SHP("W4RKZSHDs",14,"%TOP")
0
^SHP("W4RKZSHDs",15)

^SHP("W4RKZSHDs",15,"%TOP")
0
^SHP("W4RKZSHDs",16)

^SHP("W4RKZSHDs",16,"%TOP")
0
^SHP("W4RKZSHDs",17)

^SHP("W4RKZSHDs",17,"%TOP")
0
^SHP("W4RKZSHDs",18)

^SHP("W4RKZSHDs",18,"%TOP")
0
^SHP("W4RKZSHDs",19)

^SHP("W4RKZSHDs",19,"%TOP")
0
^SHP("W4RKZSHDs",20)

^SHP("W4RKZSHDs",20,"%TOP")
0
^SHP("W4RKZSHDs",21)

^SHP("W4RKZSHDs",21,"%TOP")
0
^SHP("W4RKZSHDs",22)

^SHP("W4RKZSHDs",22,"%TOP")
0
^SHP("W4RKZSHDs",23)

^SHP("W4RKZSHDs",23,"%TOP")
0
^SHP("W4RKZSHDs",24)

^SHP("W4RKZSHDs",24,"%TOP")
0
^SHP("W4RKZSHDs",25)

^SHP("W4RKZSHDs",25,"%TOP")
0
^SHP("W4RKZSHDs",26)

^SHP("W4RKZSHDs",26,"%TOP")
0
^SHP("W4RKZSHDs",27)

^SHP("W4RKZSHDs",27,"%TOP")
0
^SHP("W4RKZSHDs",28)

^SHP("W4RKZSHDs",28,"%TOP")
0
^SHP("W4RKZSHDs",29)

^SHP("W4RKZSHDs",29,"%TOP")
0
^SHP("W4RKZSHDs",30)

^SHP("W4RKZSHDs",30,"%TOP")
0
^SHP("W4RKZSHDs",31)

^SHP("W4RKZSHDs",31,"%TOP")
0
^SHP("W4RKZSHDs",32)

^SHP("W4RKZSHDs",32,"%TOP")
0
^SHP("W4RKZSHDs",33)

^SHP("W4RKZSHDs",33,"%TOP")
0
^SHP("W4RKZSHDs",34)

^SHP("W4RKZSHDs",34,"%TOP")
0
^SHP("W4RKZSHDs",35)

^SHP("W4RKZSHDs",35,"%TOP")
0
^SHP("W4RKZSHDs",36)

^SHP("W4RKZSHDs",36,"%TOP")
0
^SHP("W4RKZSHDs",37)

^SHP("W4RKZSHDs",37,"%TOP")
0
^SHP("W4RKZSHDs",38)

^SHP("W4RKZSHDs",38,"%TOP")
0
^SHP("W4RKZSHDs",39)

^SHP("W4RKZSHDs",39,"%TOP")
0
^SHP("W4RKZSHDs",40)

^SHP("W4RKZSHDs",40,"%TOP")
0
^SHP("W4RKZSHDs",41)

^SHP("W4RKZSHDs",41,"%TOP")
0
^SHP("W4RKZSHDs",42)

^SHP("W4RKZSHDs",42,"%TOP")
0
^SHP("W4RKZSHDs",43)

^SHP("W4RKZSHDs",43,"%TOP")
0
^SHP("W4RKZSHDs",44)

^SHP("W4RKZSHDs",44,"%TOP")
0
^SHP("W4RKZSHDs",45)

^SHP("W4RKZSHDs",45,"%TOP")
0
^SHP("W4RKZSHDs",46)
                                                                           $ 
^SHP("W4RKZSHDs",46,"%TOP")
75
^SHP("W4RKZSHDs",47)
    -------------------------------------------------------------------------
^SHP("W4RKZSHDs",47,"%TOP")
4
^SHP("W4RKZSHDs",48)
                                                                              
^SHP("W4RKZSHDs",48,"%TOP")
78
^SHP("W4RKZSHDs","RG")
H
^SHP("W4SHVREPs")

^SHP("W4SHVREPs",1)
                                # `"ay ixeciy g"ec #                           
^SHP("W4SHVREPs",1,"%TOP")
32
^SHP("W4SHVREPs",2)
                      &10      > jix`z cr     &05      > : jix`zn              
^SHP("W4SHVREPs",2,"%TOP")
22
^SHP("W4SHVREPs",3)
                     ----------------------------------------------------
^SHP("W4SHVREPs",3,"%TOP")
21
^SHP("W4SHVREPs",4)
                     |   ehp  |  zekf  |  daeg  | `zknq` | dry |  jix`z |      
^SHP("W4SHVREPs",4,"%TOP")
21
^SHP("W4SHVREPs",5)
                     ----------------------------------------------------
^SHP("W4SHVREPs",5,"%TOP")
21
^SHP("W4SHVREPs",6)
                     $99999.99:99999.99:99999.99:TTTTTTTT:99999:99999999:1
^SHP("W4SHVREPs",6,"%TOP")
21
^SHP("W4SHVREPs",7)

^SHP("W4SHVREPs",7,"%TOP")
0
^SHP("W4SHVREPs",8)

^SHP("W4SHVREPs",8,"%TOP")
0
^SHP("W4SHVREPs",9)

^SHP("W4SHVREPs",9,"%TOP")
0
^SHP("W4SHVREPs",10)

^SHP("W4SHVREPs",10,"%TOP")
0
^SHP("W4SHVREPs",11)

^SHP("W4SHVREPs",11,"%TOP")
0
^SHP("W4SHVREPs",12)

^SHP("W4SHVREPs",12,"%TOP")
0
^SHP("W4SHVREPs",13)

^SHP("W4SHVREPs",13,"%TOP")
0
^SHP("W4SHVREPs",14)

^SHP("W4SHVREPs",14,"%TOP")
0
^SHP("W4SHVREPs",15)

^SHP("W4SHVREPs",15,"%TOP")
0
^SHP("W4SHVREPs",16)

^SHP("W4SHVREPs",16,"%TOP")
0
^SHP("W4SHVREPs",17)

^SHP("W4SHVREPs",17,"%TOP")
0
^SHP("W4SHVREPs",18)

^SHP("W4SHVREPs",18,"%TOP")
0
^SHP("W4SHVREPs",19)

^SHP("W4SHVREPs",19,"%TOP")
0
^SHP("W4SHVREPs",20)

^SHP("W4SHVREPs",20,"%TOP")
0
^SHP("W4SHVREPs",21)

^SHP("W4SHVREPs",21,"%TOP")
0
^SHP("W4SHVREPs",22)

^SHP("W4SHVREPs",22,"%TOP")
0
^SHP("W4SHVREPs",23)

^SHP("W4SHVREPs",23,"%TOP")
0
^SHP("W4SHVREPs",24)

^SHP("W4SHVREPs",24,"%TOP")
0
^SHP("W4SHVREPs",25)

^SHP("W4SHVREPs",25,"%TOP")
0
^SHP("W4SHVREPs",26)

^SHP("W4SHVREPs",26,"%TOP")
0
^SHP("W4SHVREPs",27)

^SHP("W4SHVREPs",27,"%TOP")
0
^SHP("W4SHVREPs",28)

^SHP("W4SHVREPs",28,"%TOP")
0
^SHP("W4SHVREPs",29)

^SHP("W4SHVREPs",29,"%TOP")
0
^SHP("W4SHVREPs",30)

^SHP("W4SHVREPs",30,"%TOP")
0
^SHP("W4SHVREPs",31)

^SHP("W4SHVREPs",31,"%TOP")
0
^SHP("W4SHVREPs",32)

^SHP("W4SHVREPs",32,"%TOP")
0
^SHP("W4SHVREPs",33)

^SHP("W4SHVREPs",33,"%TOP")
0
^SHP("W4SHVREPs",34)

^SHP("W4SHVREPs",34,"%TOP")
0
^SHP("W4SHVREPs",35)

^SHP("W4SHVREPs",35,"%TOP")
0
^SHP("W4SHVREPs",36)

^SHP("W4SHVREPs",36,"%TOP")
0
^SHP("W4SHVREPs",37)

^SHP("W4SHVREPs",37,"%TOP")
0
^SHP("W4SHVREPs",38)

^SHP("W4SHVREPs",38,"%TOP")
0
^SHP("W4SHVREPs",39)

^SHP("W4SHVREPs",39,"%TOP")
0
^SHP("W4SHVREPs",40)

^SHP("W4SHVREPs",40,"%TOP")
0
^SHP("W4SHVREPs",41)

^SHP("W4SHVREPs",41,"%TOP")
0
^SHP("W4SHVREPs",42)

^SHP("W4SHVREPs",42,"%TOP")
0
^SHP("W4SHVREPs",43)

^SHP("W4SHVREPs",43,"%TOP")
0
^SHP("W4SHVREPs",44)

^SHP("W4SHVREPs",44,"%TOP")
0
^SHP("W4SHVREPs",45)

^SHP("W4SHVREPs",45,"%TOP")
0
^SHP("W4SHVREPs",46)

^SHP("W4SHVREPs",46,"%TOP")
0
^SHP("W4SHVREPs",47)

^SHP("W4SHVREPs",47,"%TOP")
0
^SHP("W4SHVREPs",48)

^SHP("W4SHVREPs",48,"%TOP")
0
^SHP("W4SHVREPs",49)

^SHP("W4SHVREPs",49,"%TOP")
0
^SHP("W4SHVREPs",50)

^SHP("W4SHVREPs",50,"%TOP")
0
^SHP("W4SHVREPs",51)

^SHP("W4SHVREPs",51,"%TOP")
0
^SHP("W4SHVREPs",52)

^SHP("W4SHVREPs",52,"%TOP")
0
^SHP("W4SHVREPs",53)
                                                                       $ 
^SHP("W4SHVREPs",53,"%TOP")
71
^SHP("W4SHVREPs",54)
                     ----------------------------------------------------
^SHP("W4SHVREPs",54,"%TOP")
21
^SHP("W4SHVREPs",55)
                                                                               
^SHP("W4SHVREPs",55,"%TOP")
79
^SHP("W4SHVREPs","RG")
H
^SHP("W4SHVREPv",1)
                                # `"ay ixeciy g"ec #                           
^SHP("W4SHVREPv",1,"%TOP")
32
^SHP("W4SHVREPv",2)
                      {10      } jix`z cr     {05      } : jix`zn              
^SHP("W4SHVREPv",2,"%TOP")
22
^SHP("W4SHVREPv",3)
                                                                          1$   
^SHP("W4SHVREPv",3,"%TOP")
74
^SHP("W4SHVREPv",4)
                     :   ehp  :  zekf  :  daeg  : `zknq` : dry :  jix`z :      
^SHP("W4SHVREPv",4,"%TOP")
21
^SHP("W4SHVREPv",5)
                                                                               
^SHP("W4SHVREPv",5,"%TOP")
79
^SHP("W4SHVREPv",6)
                                                                               
^SHP("W4SHVREPv",6,"%TOP")
79
^SHP("W4SHVREPv",7)
                                                                               
^SHP("W4SHVREPv",7,"%TOP")
79
^SHP("W4SHVREPv",8)
                                                                               
^SHP("W4SHVREPv",8,"%TOP")
79
^SHP("W4SHVREPv",9)
                                                                               
^SHP("W4SHVREPv",9,"%TOP")
79
^SHP("W4SHVREPv",10)
                                                                               
^SHP("W4SHVREPv",10,"%TOP")
79
^SHP("W4SHVREPv",11)
                                                                               
^SHP("W4SHVREPv",11,"%TOP")
79
^SHP("W4SHVREPv",12)
                                                                               
^SHP("W4SHVREPv",12,"%TOP")
79
^SHP("W4SHVREPv",13)
                                                                               
^SHP("W4SHVREPv",13,"%TOP")
79
^SHP("W4SHVREPv",14)
                                                                               
^SHP("W4SHVREPv",14,"%TOP")
79
^SHP("W4SHVREPv",15)
                                                                               
^SHP("W4SHVREPv",15,"%TOP")
79
^SHP("W4SHVREPv",16)
                                                                               
^SHP("W4SHVREPv",16,"%TOP")
79
^SHP("W4SHVREPv",17)
                                                                               
^SHP("W4SHVREPv",17,"%TOP")
79
^SHP("W4SHVREPv",18)
                                                                               
^SHP("W4SHVREPv",18,"%TOP")
79
^SHP("W4SHVREPv",19)
                                                                               
^SHP("W4SHVREPv",19,"%TOP")
79
^SHP("W4SHVREPv",20)
                                                                               
^SHP("W4SHVREPv",20,"%TOP")
79
^SHP("W4SHVREPv",21)
                $1                                                             
^SHP("W4SHVREPv",21,"%TOP")
16
^SHP("W4SHVREPv","RG")
H
^SHP("W4SISDFs")

^SHP("W4SISDFs",1)
                                      # ze`nqiq zxcbd #                        
^SHP("W4SISDFs",1,"%TOP")
38
^SHP("W4SISDFs",2)
                                                                               
^SHP("W4SISDFs",2,"%TOP")
79
^SHP("W4SISDFs",3)
                               &15 >:       milehial `nqiq zniiw m`d           
^SHP("W4SISDFs",3,"%TOP")
31
^SHP("W4SISDFs",4)
                               &20 >:         zegpdl `nqiq zniiw m`d           
^SHP("W4SISDFs",4,"%TOP")
31
^SHP("W4SISDFs",5)
                               &30 >:  xg` ogleyl mihixt zxardl `nqiq zniiw m`d
^SHP("W4SISDFs",5,"%TOP")
31
^SHP("W4SISDFs",6)
                               &35 >:        dxibn zgiztl `nqiq zniiw m`d      
^SHP("W4SISDFs",6,"%TOP")
31
^SHP("W4SISDFs",7)
                                                                               
^SHP("W4SISDFs",7,"%TOP")
79
^SHP("W4SISDFs","RG")
H
^SHP("W4SITE1")

^SHP("W4SITE1",1)
migelyne zecrqn ledip zekxrn gezita ax oeiqp mr dxag , oiil oe` al
^SHP("W4SITE1",1,"%TOP")
0
^SHP("W4SITE1",2)
.  weya xiy` ikd zeiexyt` oeebn mr zkxrn `id qetl` .qetl` zkxrn dgzit
^SHP("W4SITE1",2,"%TOP")
0
^SHP("W4SITE1",3)
'eke mixa-iyeq ,zeixvit ,zeixi'vieecpq ,zecrqnl dni`zn zkxrn
^SHP("W4SITE1",3,"%TOP")
0
^SHP("W4SITE1",4)

^SHP("W4SITE1",4,"%TOP")
0
^SHP("W4SITE1",5)
.ixeg` cxyne migelyn ledipl zkxrn , zeaygenn zenyex zetew zllek zkxrn
^SHP("W4SITE1",5,"%TOP")
0
^SHP("W4SITE1",6)
,zecwtde miwiy ledip ,miwtqe zegewl ,hixtz ledpl zkxrn llek ixeg` cxyn
^SHP("W4SITE1",6,"%TOP")
0
^SHP("W4SITE1",7)
.mitxbe zeg"ec ipin lk , `"ay ixeciy ledip
^SHP("W4SITE1",7,"%TOP")
0
^SHP("W4SITE1",8)

^SHP("W4SITE1",8,"%TOP")
0
^SHP("W4SITE1",9)
ciip oetlhl mitxbe ze"gec lawle mihlah mr cearl zxyt`n qetl` zkxrn
^SHP("W4SITE1",9,"%TOP")
0
^SHP("W4SITE1",10)
(SODEXO )  qeaiq ; qia oz iqihxka minelyz lawl zxyt`n zkxrn .zn` onfa
^SHP("W4SITE1",10,"%TOP")
0
^SHP("W4SITE1",11)
          VALUECARD ; BUSINESS LOGIC 
^SHP("W4SITE1",11,"%TOP")
10
^SHP("W4SITE1",12)

^SHP("W4SITE1",12,"%TOP")
0
^SHP("W4SITE1",13)
.cere dgelyn ,qia oz enk miipevig mixz`n zepnfd zlaw zxyt`n migelyn zkxrn
^SHP("W4SITE1",13,"%TOP")
0
^SHP("W4SITE1",14)
.zecrqn zyxl migelynl zepnfd lawl xyt`ny xhppq lew mb yi
^SHP("W4SITE1",14,"%TOP")
0
^SHP("W4SITE1",15)

^SHP("W4SITE1",15,"%TOP")
0
^SHP("W4SITE1",16)
mixg` zepeayg zldpd ledip zekxrnle zayaygl miwynn mb yi
^SHP("W4SITE1",16,"%TOP")
0
^SHP("W4SITE1",17)

^SHP("W4SITE1",17,"%TOP")
0
^SHP("W4SITE1",18)
.zerye reay ini ,zegewl beqa ielz mipey mipexign ldpl ozip
^SHP("W4SITE1",18,"%TOP")
0
^SHP("W4SITE1",19)

^SHP("W4SITE1",19,"%TOP")
0
^SHP("W4SITE1",20)
.dcrqn ly zeitivtq zeyixcl zkxrn mi`zdl xyt`n xiy` mixhnxt oeebn
^SHP("W4SITE1",20,"%TOP")
0
^SHP("W4SITE1",21)

^SHP("W4SITE1",21,"%TOP")
0
^SHP("W4SITE1",22)
.dcnr mewina ielz mipey mihixtz bivdl ozip
^SHP("W4SITE1",22,"%TOP")
0
^SHP("W4SITE1",23)

^SHP("W4SITE1",23,"%TOP")
0
^SHP("W4SITE1",24)
mle` xeiv ly zitxb dxeva mbe dlah ly dxeva mb bivdl ozip dcrqn ly zepgley
^SHP("W4SITE1",24,"%TOP")
0
^SHP("W4SITE1",25)

^SHP("W4SITE1",25,"%TOP")
0
^SHP("W4SITE1",26)
.lwyne xpwq mb dxikn zcnrl xagl zexyt` yi
^SHP("W4SITE1",26,"%TOP")
0
^SHP("W4SITE1",27)

^SHP("W4SITE1",27,"%TOP")
0
^SHP("W4SITE1",28)
mihixt ly micew mr zexiyi dcear ly divte` mb yi 'u`h ly zexyt`n ueg
^SHP("W4SITE1",28,"%TOP")
0
^SHP("W4SITE1",29)

^SHP("W4SITE1",29,"%TOP")
0
^SHP("W4SITE1",30)
gewl ly l"`ecl zexiyi ze"gece zeipeayg gelyl ozip
^SHP("W4SITE1",30,"%TOP")
0
^SHP("W4SITE1",31)

^SHP("W4SITE1",31,"%TOP")
0
^SHP("W4SITE1",32)
.lqw`l xiardl ozip zegecd ly hlgen aex
^SHP("W4SITE1",32,"%TOP")
0
^SHP("W4SITE1",33)

^SHP("W4SITE1",33,"%TOP")
0
^SHP("W4SITE1",34)
.dtew zqtcnl mb la` ze"gec zeqtcnl wx `l qitcdle ciip oetlha mb bivdl ozip zeixwir ze"gec
^SHP("W4SITE1",34,"%TOP")
0
^SHP("W4SITE1",35)

^SHP("W4SITE1",35,"%TOP")
0
^SHP("W4SITE1",36)
cenill dlwe yeniya dheyt ce`n zkxrn
^SHP("W4SITE1",36,"%TOP")
0
^SHP("W4SITE1",37)

^SHP("W4SITE1",37,"%TOP")
0
^SHP("W4SITE1",38)
reaya mini 7 ;dnnia zery 24 lawl ozip zeaeyze dxfr .dpin` ce`n zkxrn
^SHP("W4SITE1",38,"%TOP")
0
^SHP("W4SITE1",39)

^SHP("W4SITE1",39,"%TOP")
0
^SHP("W4SITE1",40)

^SHP("W4SITE1",40,"%TOP")
0
^SHP("W4SITE1","RG")
H
^SHP("W4SITE1O")

^SHP("W4SITE1O",1)
la `eo liio , gaxd rm pqieo xa atizeg nrxkez pidel nqrcez enylegim
^SHP("W4SITE1O",1,"%TOP")
0
^SHP("W4SITE1O",2)
tizgd nrxkz `lteq. `lteq di` nrxkz rm nbeeo `tyxeiez dki `yix ayew  .
^SHP("W4SITE1O",2,"%TOP")
0
^SHP("W4SITE1O",3)
nrxkz nz`ind lnqrcez, qpceeiv'ixiez, tivxiez, qeyi-axim eke'
^SHP("W4SITE1O",3,"%TOP")
0
^SHP("W4SITE1O",4)

^SHP("W4SITE1O",4,"%TOP")
0
^SHP("W4SITE1O",5)
nrxkz kellz wetez xeynez nnegyaez , nrxkz lpidel nylegim enyxc `gexi.
^SHP("W4SITE1O",5,"%TOP")
0
^SHP("W4SITE1O",6)
nyxc `gexi kell nrxkz lpdel ztxih, lwegez eqtwim, pidel yiwim edtwcez,
^SHP("W4SITE1O",6,"%TOP")
0
^SHP("W4SITE1O",7)
pidel yicexi ya"` , kl nipi ce"gez ebxtim.
^SHP("W4SITE1O",7,"%TOP")
0
^SHP("W4SITE1O",8)

^SHP("W4SITE1O",8,"%TOP")
0
^SHP("W4SITE1O",9)
nrxkz `lteq n`tyxz lraec rm halhim elwal ceg"ez ebxtim lhlteo piic
^SHP("W4SITE1O",9,"%TOP")
0
^SHP("W4SITE1O",10)
afno `nz. nrxkz n`tyxz lwal zylenim akxhiqi zo aiq, qiaeq
^SHP("W4SITE1O",10,"%TOP")
0
^SHP("W4SITE1O",11)
          VALUECARD , BUSINESS LOGIC ,(SODEXO)
^SHP("W4SITE1O",11,"%TOP")
10
^SHP("W4SITE1O",12)

^SHP("W4SITE1O",12,"%TOP")
0
^SHP("W4SITE1O",13)
nrxkz nylegim n`tyxz walz dfnpez n`zxim givepiim kne zo aiq, nylegd erec.
^SHP("W4SITE1O",13,"%TOP")
0
^SHP("W4SITE1O",14)
iy bm wel qpphx yn`tyx lwal dfnpez lnylegim lxyz nqrcez.
^SHP("W4SITE1O",14,"%TOP")
0
^SHP("W4SITE1O",15)

^SHP("W4SITE1O",15,"%TOP")
0
^SHP("W4SITE1O",16)
iy bm nnywim lgyayaz elnrxkez pidel dpdlz gyaepez `gxim
^SHP("W4SITE1O",16,"%TOP")
0
^SHP("W4SITE1O",17)

^SHP("W4SITE1O",17,"%TOP")
0
^SHP("W4SITE1O",18)
pizo lpdl ngixepim yepim zlei aqeb lwegez, ini yaer eyrez.
^SHP("W4SITE1O",18,"%TOP")
0
^SHP("W4SITE1O",19)

^SHP("W4SITE1O",19,"%TOP")
0
^SHP("W4SITE1O",20)
nbeeo txnhxim `yix n`tyx ldz`im nrxkz lcxiyez qtvitiez yl nqrcd.
^SHP("W4SITE1O",20,"%TOP")
0
^SHP("W4SITE1O",21)

^SHP("W4SITE1O",21,"%TOP")
0
^SHP("W4SITE1O",22)
pizo ldvib ztxihim yepim zlei aniwem rncd.
^SHP("W4SITE1O",22,"%TOP")
0
^SHP("W4SITE1O",23)

^SHP("W4SITE1O",23,"%TOP")
0
^SHP("W4SITE1O",24)
yelgpez yl nqrcd pizo ldvib bm avexd yl hald ebm avexd bxtiz yl viex `elm
^SHP("W4SITE1O",24,"%TOP")
0
^SHP("W4SITE1O",25)

^SHP("W4SITE1O",25,"%TOP")
0
^SHP("W4SITE1O",26)
iy `tyxez lgax lrncz nkixd bm qwpx enywl.
^SHP("W4SITE1O",26,"%TOP")
0
^SHP("W4SITE1O",27)

^SHP("W4SITE1O",27,"%TOP")
0
^SHP("W4SITE1O",28)
geu n`tyxez yl h`u' iy bm `etvid yl raecd iyixez rm wecim yl txihim
^SHP("W4SITE1O",28,"%TOP")
0
^SHP("W4SITE1O",29)

^SHP("W4SITE1O",29,"%TOP")
0
^SHP("W4SITE1O",30)
pizo lyleg gyaepiez eceg"ez iyixez lce`"l yl lweg
^SHP("W4SITE1O",30,"%TOP")
0
^SHP("W4SITE1O",31)

^SHP("W4SITE1O",31,"%TOP")
0
^SHP("W4SITE1O",32)
xea neglh yl dcegez pizo ldraix l`wql.
^SHP("W4SITE1O",32,"%TOP")
0
^SHP("W4SITE1O",33)

^SHP("W4SITE1O",33,"%TOP")
0
^SHP("W4SITE1O",34)
ceg"ez riwxiez pizo ldvib bm ahlteo piic eldctiq l` xw lnctqez ceg"ez `al bm lnctqz wetd.
^SHP("W4SITE1O",34,"%TOP")
0
^SHP("W4SITE1O",35)

^SHP("W4SITE1O",35,"%TOP")
0
^SHP("W4SITE1O",36)
nrxkz n`ec tyehd ayiney ewld llinec
^SHP("W4SITE1O",36,"%TOP")
0
^SHP("W4SITE1O",37)

^SHP("W4SITE1O",37,"%TOP")
0
^SHP("W4SITE1O",38)
nrxkz n`ec `nipd. rfxd ezyeaez pizo lwal 24 yrez ainnd; 7 inim ayaer
^SHP("W4SITE1O",38,"%TOP")
0
^SHP("W4SITE1O",39)

^SHP("W4SITE1O",39,"%TOP")
0
^SHP("W4SITE1O",40)

^SHP("W4SITE1O",40,"%TOP")
0
^SHP("W4SITE1O","RG")
H
^SHP("W4SITE1T")

^SHP("W4SITE1T",1)
migelyne zecrqn ledip zekxrn gezita ax oeiqp mr dxag , oiil oe` al
^SHP("W4SITE1T",1,"%TOP")
0
^SHP("W4SITE1T",2)
.  weya xiy` ikd zeiexyt` oeebn mr zkxrn `id qetl` .qetl` zkxrn dgzit
^SHP("W4SITE1T",2,"%TOP")
0
^SHP("W4SITE1T",3)
'eke mixa-iyeq ,zeixvit ,zeixi'vieecpq ,zecrqnl dni`zn zkxrn
^SHP("W4SITE1T",3,"%TOP")
0
^SHP("W4SITE1T",4)

^SHP("W4SITE1T",4,"%TOP")
0
^SHP("W4SITE1T",5)
.ixeg` cxyne migelyn ledipl zkxrn , zeaygenn zenyex zetew zllek zkxrn
^SHP("W4SITE1T",5,"%TOP")
0
^SHP("W4SITE1T",6)
,zecwtde miwiy ledip ,miwtqe zegewl ,hixtz ledpl zkxrn llek ixeg` cxyn
^SHP("W4SITE1T",6,"%TOP")
0
^SHP("W4SITE1T",7)
.mitxbe zeg"ec ipin lk , `"ay ixeciy ledip
^SHP("W4SITE1T",7,"%TOP")
0
^SHP("W4SITE1T",8)

^SHP("W4SITE1T",8,"%TOP")
0
^SHP("W4SITE1T",9)
ciip oetlhl mitxbe ze"gec lawle mihlah mr cearl zxyt`n qetl` zkxrn
^SHP("W4SITE1T",9,"%TOP")
0
^SHP("W4SITE1T",10)
(SODEXO )  qeaiq ; qia oz iqihxka minelyz lawl zxyt`n zkxrn .zn` onfa
^SHP("W4SITE1T",10,"%TOP")
0
^SHP("W4SITE1T",11)
          VALUECARD ; BUSINESS LOGIC 
^SHP("W4SITE1T",11,"%TOP")
10
^SHP("W4SITE1T",12)

^SHP("W4SITE1T",12,"%TOP")
0
^SHP("W4SITE1T",13)
.cere dgelyn ,qia oz enk miipevig mixz`n zepnfd zlaw zxyt`n migelyn zkxrn
^SHP("W4SITE1T",13,"%TOP")
0
^SHP("W4SITE1T",14)
.zecrqn zyxl migelynl zepnfd lawl xyt`ny xhppq lew mb yi
^SHP("W4SITE1T",14,"%TOP")
0
^SHP("W4SITE1T",15)

^SHP("W4SITE1T",15,"%TOP")
0
^SHP("W4SITE1T",16)
lwyne xpwq xagl dxikn zcnr lkl ozip
^SHP("W4SITE1T",16,"%TOP")
0
^SHP("W4SITE1T",17)

^SHP("W4SITE1T",17,"%TOP")
0
^SHP("W4SITE1T",18)

^SHP("W4SITE1T",18,"%TOP")
0
^SHP("W4SITE1T","RG")
H
^SHP("W4SITEC1")
ligia`
^SHP("W4SITEC1",1)
                                                                   ligia` zcrqn
^SHP("W4SITEC1",2)
                                                              milyexi 21 oeyicd
^SHP("W4SITEC1",3)
                                                                               
^SHP("W4SITEC1","RG")
H
^SHP("W4SITEC10")

^SHP("W4SITEC10",1)
                                                                  mi za xa ltee
^SHP("W4SITEC10",2)
                                                            mi za 136 oeixeb oa
^SHP("W4SITEC10","RG")
H
^SHP("W4SITEC11")
MODIIN
^SHP("W4SITEC11",1)
                                                                oiricen xa ltee
^SHP("W4SITEC11",2)
                                                           oiricen 21 oiba mgpn
^SHP("W4SITEC11",3)
                                                                               
^SHP("W4SITEC11","RG")
H
^SHP("W4SITEC12")

^SHP("W4SITEC12",1)
                                                              oeiv mely xa ltee
^SHP("W4SITEC12",2)
                                                        milyexi dklnd oeiv mely
^SHP("W4SITEC12","RG")
H
^SHP("W4SITEC13")

^SHP("W4SITEC13",1)
                                                                  sebpfic dwy`i
^SHP("W4SITEC13",1,"%TOP")
66
^SHP("W4SITEC13",2)
                                                            aia` lz 105 sebpfic
^SHP("W4SITEC13",2,"%TOP")
60
^SHP("W4SITEC13","RG")
H
^SHP("W4SITEC14")

^SHP("W4SITEC14",1)
                                                              oinipa zlgp dwy`i
^SHP("W4SITEC14",2)
                                                                 73 oinipa zlgp
^SHP("W4SITEC14","RG")
H
^SHP("W4SITEC15")

^SHP("W4SITEC15",1)
                                                                ixehwt 'uieecpq
^SHP("W4SITEC15",2)
                                                            dilvxd 16 xwpy dix`
^SHP("W4SITEC15","RG")
H
^SHP("W4SITEC2")

^SHP("W4SITEC2",1)
                                                                         oii xa
^SHP("W4SITEC2",2)
                                                                 milyexi 28 dfr
^SHP("W4SITEC2","RG")
H
^SHP("W4SITEC3")

^SHP("W4SITEC3",1)
                                                                   l`ixab zcrqn
^SHP("W4SITEC3",2)
                                                         milyexi 7 ghy oa oerny
^SHP("W4SITEC3",3)
                                                                               
^SHP("W4SITEC3","RG")
H
^SHP("W4SITEC4")
dceipgn
^SHP("W4SITEC4",1)
                                                                  dceipgn zcrqn
^SHP("W4SITEC4",2)
                                                           milyexi 10 aewri zia
^SHP("W4SITEC4",3)
                                                                               
^SHP("W4SITEC4","RG")
H
^SHP("W4SITEC45")
ekih dp`
^SHP("W4SITEC45",1)
                                                             åëéè äðà úéá úãòñî
^SHP("W4SITEC45",1,"%TOP")
61
^SHP("W4SITEC45",2)
                                                             íéìùåøé 10 ï"âà áø
^SHP("W4SITEC45",2,"%TOP")
61
^SHP("W4SITEC45",3)
                                                                               
^SHP("W4SITEC45",3,"%TOP")
79
^SHP("W4SITEC45","RG")
H
^SHP("W4SITEC5")
dp` zcrqn
^SHP("W4SITEC5",1)
                                                                 ekih dp` zcrqn
^SHP("W4SITEC5",2)
                                                             milyexi 10 o"b` ax
^SHP("W4SITEC5",3)
                                                                               
^SHP("W4SITEC5","RG")
H
^SHP("W4SITEC6")

^SHP("W4SITEC6",1)
                                                                    meyliy lenz
^SHP("W4SITEC6",2)
                                                        milyexi oenelq dyn l`ei
^SHP("W4SITEC6",3)
                                                                               
^SHP("W4SITEC6","RG")
H
^SHP("W4SITEC7")

^SHP("W4SITEC7",1)
                                                                 din dhqt zcrqn
^SHP("W4SITEC7",2)
                                                              aia` lz 10 oeqlie
^SHP("W4SITEC7","RG")
H
^SHP("W4SITEC8")

^SHP("W4SITEC8",1)
                                                                  ixqihex zcrqn
^SHP("W4SITEC8",2)
                                                        aia` lz 20 bxaplee le`x
^SHP("W4SITEC8","RG")
H
^SHP("W4SITEC9")

^SHP("W4SITEC9",1)
                                                              xcd oeipw xa ltee
^SHP("W4SITEC9",2)
                                                          milyexi 26 bifiw xiit
^SHP("W4SITEC9",3)
                                                                               
^SHP("W4SITEC9","RG")
H
^SHP("W4SITETEL")

^SHP("W4SITETEL",1)
                                                                               
^SHP("W4SITETEL",2)
                                          : mipetlha epni` xyw xevil mileki mz`
^SHP("W4SITETEL",3)
                                                                               
^SHP("W4SITETEL",4)
                                          08-6881815, 054-4380608, 052-6923399 
^SHP("W4SITETEL",5)
                                                                               
^SHP("W4SITETEL",6)
                                                                               
^SHP("W4SITETEL","RG")
H
^SHP("W4TOTLKH")

^SHP("W4TOTLKH",1)
                         #melyz irvn` itl itqk g"ec#                           
^SHP("W4TOTLKH",2)
                   #&02     >#:jix`z cr  #&01      >#:jix`zn                   
^SHP("W4TOTLKH",3)
            ------------------------------------------------------             
^SHP("W4TOTLKH",4)
            | d x i b n |  lr  l a w z d  |  x k n p  |     beq  |             
^SHP("W4TOTLKH",5)
            |           |  zencew zexikn  |           |   melyz  |             
^SHP("W4TOTLKH",6)
            ------------------------------------------------------             
^SHP("W4TOTLKH",7)
            |&58       >|   &55        >  |&05       >|     onefn|             
^SHP("W4TOTLKH",8)
            |           |                 |           |          |             
^SHP("W4TOTLKH",9)
            |&65       >|   &60        >  |&10       >|     d`gnd|             
^SHP("W4TOTLKH",10)
            |&67       >|   &61        >  |&11       >|'wpa dxard|             
^SHP("W4TOTLKH",11)
            |           |                 |           |          |             
^SHP("W4TOTLKH",12)
            |&72       >|   &70        >  |&15       >|   hxk`xyi|             
^SHP("W4TOTLKH",13)
            |&78       >|   &75        >  |&20       >|      dfie|             
^SHP("W4TOTLKH",14)
            |&82       >|   &80        >  |&25       >|    qxpiic|             
^SHP("W4TOTLKH",15)
            |&84       >|   &83        >  |&26       >|       AEX|             
^SHP("W4TOTLKH",16)
            |&33       >|   &32        >  |&31       >|       JCB|             
^SHP("W4TOTLKH",17)
            |&37       >|   &36        >  |&34       >|cx`w ine`l|             
^SHP("W4TOTLKH",18)
            |           |                 |           |          |             
^SHP("W4TOTLKH",19)
            ------------------------------------------------------             
^SHP("W4TOTLKH",20)
            |&97       >|   &90        >  |&35       >|ehp oeict |             
^SHP("W4TOTLKH",21)
            |           |                 |&12       >| qn  'ayg |             
^SHP("W4TOTLKH",22)
            |           |                 |&49       >|     n"rn |             
^SHP("W4TOTLKH",23)
            ------------------------------------------------------             
^SHP("W4TOTLKH",24)
                                                                               
^SHP("W4TOTLKH",25)
                                        &95       >:     `"k k"dq              
^SHP("W4TOTLKH",26)
                                        &87       >:     `"k xcey              
^SHP("W4TOTLKH",27)
                                                                               
^SHP("W4TOTLKH",28)
                                                                               
^SHP("W4TOTLKH","RG")
H
^SHP("W4TOTLKHs")

^SHP("W4TOTLKHs",1)
             -----------------------------------------------------             
^SHP("W4TOTLKHs",2)
             |   k"dq   |      l a w z d  |  x k n p  |    beq   |             
^SHP("W4TOTLKHs",3)
             -----------------------------------------------------             
^SHP("W4TOTLKHs",4)
              &58      >|   &55        >  |  &05     >|     onefn  &03   >     
^SHP("W4TOTLKHs",5)
              &65      >|   &60        >  |  &10     >|     d`gnd  &04   >     
^SHP("W4TOTLKHs",6)
              &67      >|   &61        >  |  &11     >|'wpa dxard  &06   >     
^SHP("W4TOTLKHs",7)
              &72      >|   &70        >  |  &15     >|   hxk`xyi  &07   >     
^SHP("W4TOTLKHs",8)
              &78      >|   &75        >  |  &20     >|      dfie  &08   >     
^SHP("W4TOTLKHs",9)
              &82      >|   &80        >  |  &25     >|    qxpiic  &09   >     
^SHP("W4TOTLKHs",10)
              &84      >|   &83        >  |  &26     >|       AEX  &16   >     
^SHP("W4TOTLKHs",11)
              &33      >|   &32        >  |  &31     >|       JCB  &18   >     
^SHP("W4TOTLKHs",12)
              &37      >|   &36        >  |  &34     >|cx`w ine`l  &19   >     
^SHP("W4TOTLKHs",13)
             -----------------------------------------------------             
^SHP("W4TOTLKHs",14)
             |&97      >|   &90        >  |&35       >|      k"dq|             
^SHP("W4TOTLKHs",15)
             |          |                 |&12       >|   qn 'ayg|             
^SHP("W4TOTLKHs",16)
             |          |             [-] |&51       >|iekif 'ayg|             
^SHP("W4TOTLKHs",17)
             |          |                 |&56       >| gelyn 'rz|             
^SHP("W4TOTLKHs",18)
             |          |                 |&52       >| ehp oeict|             
^SHP("W4TOTLKHs",19)
             |          |                 |&49       >|      n"rn|             
^SHP("W4TOTLKHs",20)
             -----------------------------------------------------             
^SHP("W4TOTLKHs",21)
             |                            |&95       >|  `"k k"dq|             
^SHP("W4TOTLKHs",22)
             |                            |&87       >|  `"k xcey|             
^SHP("W4TOTLKHs",23)
             |                            |&50       >|  milehia |             
^SHP("W4TOTLKHs",24)
             |                            |&53       >|    zegpd |             
^SHP("W4TOTLKHs",25)
             |                            |&54       >| gelyn inc|             
^SHP("W4TOTLKHs",26)
             -----------------------------------------------------             
^SHP("W4TOTLKHs",27)
                                                                               
^SHP("W4TOTLKHs",28)
                                                                               
^SHP("W4TOTLKHs",29)
                                                                               
^SHP("W4TOTLKHs",30)
                                                                               
^SHP("W4TOTLKHs","RG")
H
^SHP("W4TOTMTs")

^SHP("W4TOTMTs",1)
            ------------------------------------------------------             
^SHP("W4TOTMTs",1,"%TOP")
12
^SHP("W4TOTMTs",2)
            | d x i b n |  lr  l a w z d  |  x k n p  |     beq  |             
^SHP("W4TOTMTs",2,"%TOP")
12
^SHP("W4TOTMTs",3)
            |           |  zencew zexikn  |           |   melyz  |             
^SHP("W4TOTMTs",3,"%TOP")
12
^SHP("W4TOTMTs",4)
            ------------------------------------------------------             
^SHP("W4TOTMTs",4,"%TOP")
12
^SHP("W4TOTMTs",5)
            |&58       >|   &55        >  |&05       >|     onefn|   &03   >   
^SHP("W4TOTMTs",5,"%TOP")
12
^SHP("W4TOTMTs",6)
            |           |                 |           |          |             
^SHP("W4TOTMTs",6,"%TOP")
12
^SHP("W4TOTMTs",7)
            |&65       >|   &60        >  |&10       >|     d`gnd|   &04   >   
^SHP("W4TOTMTs",7,"%TOP")
12
^SHP("W4TOTMTs",8)
            |&67       >|   &61        >  |&11       >|'wpa dxard|   &06   >   
^SHP("W4TOTMTs",8,"%TOP")
12
^SHP("W4TOTMTs",9)
            |           |                 |           |          |             
^SHP("W4TOTMTs",9,"%TOP")
12
^SHP("W4TOTMTs",10)
            |&72       >|   &70        >  |&15       >|   hxk`xyi|   &07   >   
^SHP("W4TOTMTs",10,"%TOP")
12
^SHP("W4TOTMTs",11)
            |&78       >|   &75        >  |&20       >|      dfie|   &08   >   
^SHP("W4TOTMTs",11,"%TOP")
12
^SHP("W4TOTMTs",12)
            |&82       >|   &80        >  |&25       >|    qxpiic|   &09   >   
^SHP("W4TOTMTs",12,"%TOP")
12
^SHP("W4TOTMTs",13)
            |&84       >|   &83        >  |&26       >|       AEX|   &16   >   
^SHP("W4TOTMTs",13,"%TOP")
12
^SHP("W4TOTMTs",14)
            |&33       >|   &32        >  |&31       >|       JCB|   &18   >   
^SHP("W4TOTMTs",14,"%TOP")
12
^SHP("W4TOTMTs",15)
            |&37       >|   &36        >  |&34       >|cx`w ine`l|   &19   >   
^SHP("W4TOTMTs",15,"%TOP")
12
^SHP("W4TOTMTs",16)
            ------------------------------------------------------             
^SHP("W4TOTMTs",16,"%TOP")
12
^SHP("W4TOTMTs",17)
            |&97       >|   &90        >  |&35       >|ehp oeict |             
^SHP("W4TOTMTs",17,"%TOP")
12
^SHP("W4TOTMTs",18)
            |           |                 |&49       >|     n"rn |             
^SHP("W4TOTMTs",18,"%TOP")
12
^SHP("W4TOTMTs",19)
            |           |                 |&51       >|n"rn iptl |             
^SHP("W4TOTMTs",19,"%TOP")
12
^SHP("W4TOTMTs",20)
            ------------------------------------------------------             
^SHP("W4TOTMTs",20,"%TOP")
12
^SHP("W4TOTMTs",21)
                                                                               
^SHP("W4TOTMTs",21,"%TOP")
79
^SHP("W4TOTMTs",22)
                                                                               
^SHP("W4TOTMTs",22,"%TOP")
79
^SHP("W4TOTMTs",23)
                    -----------------------------------------                  
^SHP("W4TOTMTs",23,"%TOP")
20
^SHP("W4TOTMTs",24)
                   | g"ya k"dq |   k"dq   |  xry  |  rahn  |                   
^SHP("W4TOTMTs",24,"%TOP")
19
^SHP("W4TOTMTs",25)
                    -----------------------------------------                  
^SHP("W4TOTMTs",25,"%TOP")
20
^SHP("W4TOTMTs",26)
                    &22       > &00      >  &00 >    g"y                       
^SHP("W4TOTMTs",26,"%TOP")
20
^SHP("W4TOTMTs",27)
                    &27       > &24      >  &23 >   xlec                       
^SHP("W4TOTMTs",27,"%TOP")
20
^SHP("W4TOTMTs",28)
                    &38       > &33      >  &29 >   exei                       
^SHP("W4TOTMTs",28,"%TOP")
20
^SHP("W4TOTMTs",29)
                                                                               
^SHP("W4TOTMTs",29,"%TOP")
79
^SHP("W4TOTMTs",30)
                                                                               
^SHP("W4TOTMTs",30,"%TOP")
79
^SHP("W4TOTMTs",31)
                   &99                 >   &28       >:    &30     >&00     >  
^SHP("W4TOTMTs",31,"%TOP")
19
^SHP("W4TOTMTs",32)
                                                                               
^SHP("W4TOTMTs",32,"%TOP")
79
^SHP("W4TOTMTs",33)
           &00    >  &13       >: miyelz   &12       >: dtwda zepnfd           
^SHP("W4TOTMTs",33,"%TOP")
11
^SHP("W4TOTMTs",34)
           &00    >  &17     >:n"rn iptl   &14       >:  zexikn k"dq           
^SHP("W4TOTMTs",34,"%TOP")
11
^SHP("W4TOTMTs",35)
   &81    >:ueg `"k &87      >:`"k  xcey   &95       >:     `"k k"dq           
^SHP("W4TOTMTs",35,"%TOP")
3
^SHP("W4TOTMTs",36)
   &00          > &00                  >   &85       >:     ueg+xcey           
^SHP("W4TOTMTs",36,"%TOP")
3
^SHP("W4TOTMTs",37)
  &86     >:   iceb &89      >:   qia oz   &88       >:   qeaiq k"dq           
^SHP("W4TOTMTs",37,"%TOP")
2
^SHP("W4TOTMTs",38)
  &00     >  &41    > dtwd zegewll zegpd   &40       >: mildpn zegpd           
^SHP("W4TOTMTs",38,"%TOP")
2
^SHP("W4TOTMTs",39)
  &00           > &47       >:  zexy inc   &45       >:       miekif           
^SHP("W4TOTMTs",39,"%TOP")
2
^SHP("W4TOTMTs",40)
  &00           > &98       >: dgha` mdn   &42       >:mihixt zexikn           
^SHP("W4TOTMTs",40,"%TOP")
2
^SHP("W4TOTMTs",41)
  &00           >   &54        >&53    >   &50       > &48 > milehia           
^SHP("W4TOTMTs",41,"%TOP")
2
^SHP("W4TOTMTs",42)
  &00           > &00          >&00    >   &52       >    ehexa k"dq           
^SHP("W4TOTMTs",42,"%TOP")
2
^SHP("W4TOTMTs",43)
 &00   >   &00   > &56                                                 >       
^SHP("W4TOTMTs",43,"%TOP")
1
^SHP("W4TOTMTs",44)
 &00   >   &00   > &59                                                 >       
^SHP("W4TOTMTs",44,"%TOP")
1
^SHP("W4TOTMTs",45)
    &96                > &94   >: w"nyg 'qn  &93     >:   micreq 'qn           
^SHP("W4TOTMTs",45,"%TOP")
4
^SHP("W4TOTMTs",46)
                                                                               
^SHP("W4TOTMTs",46,"%TOP")
79
^SHP("W4TOTMTs",47)
 &91                                                                       >   
^SHP("W4TOTMTs",47,"%TOP")
1
^SHP("W4TOTMTs",48)
 &92                                                                       >   
^SHP("W4TOTMTs",48,"%TOP")
1
^SHP("W4TOTMTs",49)
                                                                               
^SHP("W4TOTMTs",49,"%TOP")
79
^SHP("W4TOTMTs",50)
                zexiy inc - zegpd + miyelz + zexikn k"dq = mihixt zexikn *     
^SHP("W4TOTMTs",50,"%TOP")
16
^SHP("W4TOTMTs",51)
                                        tih cixedl yi oeictl qpkp tih m`       
^SHP("W4TOTMTs",51,"%TOP")
40
^SHP("W4TOTMTs",52)
                                                                               
^SHP("W4TOTMTs",52,"%TOP")
79
^SHP("W4TOTMTs",53)
            zexiy inc  + zegpd + milehia + mihixt zexikn  = ehexa zexikn *     
^SHP("W4TOTMTs",53,"%TOP")
12
^SHP("W4TOTMTs",54)
                                     tih siqedl yi oeictl qpkp `l tih m`       
^SHP("W4TOTMTs",54,"%TOP")
37
^SHP("W4TOTMTs",55)
                                                                               
^SHP("W4TOTMTs",55,"%TOP")
79
^SHP("W4TOTMTs","RG")
H
^SHP("W4TOTNOs")

^SHP("W4TOTNOs",1)
                         #melyz irvn` itl itqk g"ec#                           
^SHP("W4TOTNOs",2)
            ------------------------------------------------------             
^SHP("W4TOTNOs",3)
            | d x i b n |  lr  l a w z d  |  x k n p  |     beq  |             
^SHP("W4TOTNOs",4)
            |           |  zencew zexikn  |           |   melyz  |             
^SHP("W4TOTNOs",5)
            ------------------------------------------------------             
^SHP("W4TOTNOs",6)
            |&58       >|   &55        >  |&05       >|     onefn|   &03   >   
^SHP("W4TOTNOs",7)
            |           |                 |           |          |             
^SHP("W4TOTNOs",8)
            |&65       >|   &60        >  |&10       >|     d`gnd|   &04   >   
^SHP("W4TOTNOs",9)
            |&67       >|   &61        >  |&11       >|'wpa dxard|   &06   >   
^SHP("W4TOTNOs",10)
            |           |                 |           |          |             
^SHP("W4TOTNOs",11)
            |&72       >|   &70        >  |&15       >|   hxk`xyi|   &07   >   
^SHP("W4TOTNOs",12)
            |&78       >|   &75        >  |&20       >|      dfie|   &08   >   
^SHP("W4TOTNOs",13)
            |&82       >|   &80        >  |&25       >|    qxpiic|   &09   >   
^SHP("W4TOTNOs",14)
            |&84       >|   &83        >  |&26       >|       AEX|   &16   >   
^SHP("W4TOTNOs",15)
            |&33       >|   &32        >  |&31       >|       JCB|   &18   >   
^SHP("W4TOTNOs",16)
            |&37       >|   &36        >  |&34       >|cx`w ine`l|   &19   >   
^SHP("W4TOTNOs",17)
            ------------------------------------------------------             
^SHP("W4TOTNOs",18)
            |&97       >|   &90        >  |&35       >|ehp oeict |             
^SHP("W4TOTNOs",19)
            |           |                 |&49       >|     n"rn |             
^SHP("W4TOTNOs",20)
            |           |                 |&51       >|n"rn iptl |             
^SHP("W4TOTNOs",21)
            ------------------------------------------------------             
^SHP("W4TOTNOs",22)
                                                                               
^SHP("W4TOTNOs",23)
               &13       > :   miyelz   &12       >: dtwda zepnfd              
^SHP("W4TOTNOs",24)
               &17       > :n"rn iptl   &14       >:  zexikn k"dq              
^SHP("W4TOTNOs",25)
                  &00       >&00    >   &95       >:     `"k k"dq              
^SHP("W4TOTNOs",26)
                  &00       >&00    >   &87       >:     `"k xcey              
^SHP("W4TOTNOs",27)
  &86     > : iceb &89     > : qia oz   &88       >:   qeaiq k"dq              
^SHP("W4TOTNOs",28)
         &41     > dtwd zegewll zegpd   &40       >: mildpn zegpd              
^SHP("W4TOTNOs",29)
              &44     > miyelzl zegpd   &43       >:'qeaiq' zegpd              
^SHP("W4TOTNOs",30)
            &47       >:     zexy inc   &45       >:       miekif              
^SHP("W4TOTNOs",31)
               &98       >: dgha` mdn   &42       >:mihixt zexikn              
^SHP("W4TOTNOs",32)
                  &00       >&00    >   &50       >:      milehia              
^SHP("W4TOTNOs",33)
                                        &54       >:     &53    >              
^SHP("W4TOTNOs",34)
                  &00       >&00    >   &52       >:   ehexa k"dq              
^SHP("W4TOTNOs",35)
 &00   >   &00   > &56                                                 >       
^SHP("W4TOTNOs",36)
 &00   >   &00   > &59                                                 >       
^SHP("W4TOTNOs",37)
           &96                >  &00   > &93      >:   micreq 'qn              
^SHP("W4TOTNOs",38)
           &00                         > &94      >:    w"nyg 'qn              
^SHP("W4TOTNOs",39)
 &00   > &91                                                             >     
^SHP("W4TOTNOs",40)
 &00   > &92                                                             >     
^SHP("W4TOTNOs",41)
                                                                               
^SHP("W4TOTNOs",42)
                zexiy inc - miekif + zegpd + zexikn k"dq = mihixt zexikn *     
^SHP("W4TOTNOs",43)
                                                                               
^SHP("W4TOTNOs","RG")
H
^SHP("W4TOTSs")

^SHP("W4TOTSs",1)
                         #melyz irvn` itl itqk g"ec#                           
^SHP("W4TOTSs",1,"%TOP")
25
^SHP("W4TOTSs",2)
            ------------------------------------------------------             
^SHP("W4TOTSs",2,"%TOP")
12
^SHP("W4TOTSs",3)
            | d x i b n |  lr  l a w z d  |  x k n p  |     beq  |             
^SHP("W4TOTSs",3,"%TOP")
12
^SHP("W4TOTSs",4)
            |           |  zencew zexikn  |           |   melyz  |             
^SHP("W4TOTSs",4,"%TOP")
12
^SHP("W4TOTSs",5)
            ------------------------------------------------------             
^SHP("W4TOTSs",5,"%TOP")
12
^SHP("W4TOTSs",6)
            |&58       >|   &55        >  |&05       >|     onefn|   &03   >   
^SHP("W4TOTSs",6,"%TOP")
12
^SHP("W4TOTSs",7)
            |           |                 |           |          |             
^SHP("W4TOTSs",7,"%TOP")
12
^SHP("W4TOTSs",8)
            |&65       >|   &60        >  |&10       >|     d`gnd|   &04   >   
^SHP("W4TOTSs",8,"%TOP")
12
^SHP("W4TOTSs",9)
            |&67       >|   &61        >  |&11       >|'wpa dxard|   &06   >   
^SHP("W4TOTSs",9,"%TOP")
12
^SHP("W4TOTSs",10)
            |           |                 |           |          |             
^SHP("W4TOTSs",10,"%TOP")
12
^SHP("W4TOTSs",11)
            |&72       >|   &70        >  |&15       >|   hxk`xyi|   &07   >   
^SHP("W4TOTSs",11,"%TOP")
12
^SHP("W4TOTSs",12)
            |&78       >|   &75        >  |&20       >|      dfie|   &08   >   
^SHP("W4TOTSs",12,"%TOP")
12
^SHP("W4TOTSs",13)
            |&82       >|   &80        >  |&25       >|    qxpiic|   &09   >   
^SHP("W4TOTSs",13,"%TOP")
12
^SHP("W4TOTSs",14)
            |&84       >|   &83        >  |&26       >|       AEX|   &16   >   
^SHP("W4TOTSs",14,"%TOP")
12
^SHP("W4TOTSs",15)
            |&33       >|   &32        >  |&31       >|       JCB|   &18   >   
^SHP("W4TOTSs",15,"%TOP")
12
^SHP("W4TOTSs",16)
            |&37       >|   &36        >  |&34       >|cx`w ine`l|   &19   >   
^SHP("W4TOTSs",16,"%TOP")
12
^SHP("W4TOTSs",17)
            ------------------------------------------------------             
^SHP("W4TOTSs",17,"%TOP")
12
^SHP("W4TOTSs",18)
            |&97       >|   &90        >  |&35       >|ehp oeict |             
^SHP("W4TOTSs",18,"%TOP")
12
^SHP("W4TOTSs",19)
            |           |                 |&38       >|n"rn setk |             
^SHP("W4TOTSs",19,"%TOP")
12
^SHP("W4TOTSs",20)
            |           |                 |&39       >|n"rn xeht |             
^SHP("W4TOTSs",20,"%TOP")
12
^SHP("W4TOTSs",21)
            |           |                 |&49       >|     n"rn |             
^SHP("W4TOTSs",21,"%TOP")
12
^SHP("W4TOTSs",22)
            ------------------------------------------------------             
^SHP("W4TOTSs",22,"%TOP")
12
^SHP("W4TOTSs",23)
                                                                               
^SHP("W4TOTSs",23,"%TOP")
79
^SHP("W4TOTSs",24)
                  &13       >: miyelz   &12       >: dtwda zepnfd              
^SHP("W4TOTSs",24,"%TOP")
18
^SHP("W4TOTSs",25)
                  &00       >&00    >   &14       >:  zexikn k"dq              
^SHP("W4TOTSs",25,"%TOP")
18
^SHP("W4TOTSs",26)
                  &00       >&00    >   &95       >:     `"k k"dq              
^SHP("W4TOTSs",26,"%TOP")
18
^SHP("W4TOTSs",27)
                  &00       >&00    >   &87       >:     `"k xcey              
^SHP("W4TOTSs",27,"%TOP")
18
^SHP("W4TOTSs",28)
  &00   > &41    > dtwd zegewll zegpd   &40       >: mildpn zegpd              
^SHP("W4TOTSs",28,"%TOP")
2
^SHP("W4TOTSs",29)
                  &00       >&00    >   &42       >:mihixt zexikn              
^SHP("W4TOTSs",29,"%TOP")
18
^SHP("W4TOTSs",30)
                  &00       >&00    >   &50       >:      milehia              
^SHP("W4TOTSs",30,"%TOP")
18
^SHP("W4TOTSs",31)
                  &00       >&00    >   &52       >:   ehexa k"dq              
^SHP("W4TOTSs",31,"%TOP")
18
^SHP("W4TOTSs",32)
                  &00       >&00    >   &93       >:   mixwan 'qn              
^SHP("W4TOTSs",32,"%TOP")
18
^SHP("W4TOTSs",33)
                                                                               
^SHP("W4TOTSs",33,"%TOP")
79
^SHP("W4TOTSs",34)
           &00                         >  &94     >:   w"nyg xtqn              
^SHP("W4TOTSs",34,"%TOP")
11
^SHP("W4TOTSs",35)
                                                                               
^SHP("W4TOTSs",35,"%TOP")
79
^SHP("W4TOTSs",36)
                                                                               
^SHP("W4TOTSs",36,"%TOP")
79
^SHP("W4TOTSs",37)
                            zegpd + zexikn k"dq = mihixt zexikn *              
^SHP("W4TOTSs",37,"%TOP")
28
^SHP("W4TOTSs",38)
                                                                               
^SHP("W4TOTSs",38,"%TOP")
79
^SHP("W4TOTSs",39)
                                                                               
^SHP("W4TOTSs",39,"%TOP")
79
^SHP("W4TOTSs",40)
                                                                               
^SHP("W4TOTSs",40,"%TOP")
79
^SHP("W4TOTSs","RG")
H
^SHP("W4TOTTs")

^SHP("W4TOTTs",1)
            ------------------------------------------------------             
^SHP("W4TOTTs",1,"%TOP")
12
^SHP("W4TOTTs",2)
            | d x i b n |  lr  l a w z d  |  x k n p  |     beq  |             
^SHP("W4TOTTs",2,"%TOP")
12
^SHP("W4TOTTs",3)
            |           |  zencew zexikn  |           |   melyz  |             
^SHP("W4TOTTs",3,"%TOP")
12
^SHP("W4TOTTs",4)
            ------------------------------------------------------             
^SHP("W4TOTTs",4,"%TOP")
12
^SHP("W4TOTTs",5)
            |           |                 |&05       >|     onefn|   &03   >   
^SHP("W4TOTTs",5,"%TOP")
12
^SHP("W4TOTTs",6)
            |           |                 |&28       >| &30     >|   &21   >   
^SHP("W4TOTTs",6,"%TOP")
12
^SHP("W4TOTTs",7)
            |&58       >|   &55        >  |&29       >| ehp onefn|   &00   >   
^SHP("W4TOTTs",7,"%TOP")
12
^SHP("W4TOTTs",8)
            |           |                 |           |          |             
^SHP("W4TOTTs",8,"%TOP")
12
^SHP("W4TOTTs",9)
            |&65       >|   &60        >  |&10       >|     d`gnd|   &04   >   
^SHP("W4TOTTs",9,"%TOP")
12
^SHP("W4TOTTs",10)
            |&67       >|   &61        >  |&11       >|'wpa dxard|   &06   >   
^SHP("W4TOTTs",10,"%TOP")
12
^SHP("W4TOTTs",11)
            |           |                 |           |          |             
^SHP("W4TOTTs",11,"%TOP")
12
^SHP("W4TOTTs",12)
            |&72       >|   &70        >  |&15       >|   hxk`xyi|   &07   >   
^SHP("W4TOTTs",12,"%TOP")
12
^SHP("W4TOTTs",13)
            |&78       >|   &75        >  |&20       >|      dfie|   &08   >   
^SHP("W4TOTTs",13,"%TOP")
12
^SHP("W4TOTTs",14)
            |&82       >|   &80        >  |&25       >|    qxpiic|   &09   >   
^SHP("W4TOTTs",14,"%TOP")
12
^SHP("W4TOTTs",15)
            |&84       >|   &83        >  |&26       >|       AEX|   &16   >   
^SHP("W4TOTTs",15,"%TOP")
12
^SHP("W4TOTTs",16)
            |&33       >|   &32        >  |&31       >|       JCB|   &18   >   
^SHP("W4TOTTs",16,"%TOP")
12
^SHP("W4TOTTs",17)
            |&37       >|   &36        >  |&34       >|cx`w ine`l|   &19   >   
^SHP("W4TOTTs",17,"%TOP")
12
^SHP("W4TOTTs",18)
            ------------------------------------------------------             
^SHP("W4TOTTs",18,"%TOP")
12
^SHP("W4TOTTs",19)
            |&97       >|   &90        >  |&35       >|ehp oeict |             
^SHP("W4TOTTs",19,"%TOP")
12
^SHP("W4TOTTs",20)
            |           |                 |&49       >|     n"rn |             
^SHP("W4TOTTs",20,"%TOP")
12
^SHP("W4TOTTs",21)
            |           |                 |&51       >|n"rn iptl |             
^SHP("W4TOTTs",21,"%TOP")
12
^SHP("W4TOTTs",22)
            ------------------------------------------------------             
^SHP("W4TOTTs",22,"%TOP")
12
^SHP("W4TOTTs",23)
                                                                               
^SHP("W4TOTTs",23,"%TOP")
79
^SHP("W4TOTTs",24)
      &00    >  &13       >:   miyelz   &12       >: dtwda zepnfd              
^SHP("W4TOTTs",24,"%TOP")
6
^SHP("W4TOTTs",25)
      &00    >  &17      > :n"rn iptl   &14       >:  zexikn k"dq              
^SHP("W4TOTTs",25,"%TOP")
6
^SHP("W4TOTTs",26)
                  &00       >&00    >   &95       >:     `"k k"dq              
^SHP("W4TOTTs",26,"%TOP")
18
^SHP("W4TOTTs",27)
                  &81       >:ueg `"k   &87       >:     `"k xcey              
^SHP("W4TOTTs",27,"%TOP")
18
^SHP("W4TOTTs",28)
                  &00       >&00    >   &85       >:     ueg+xcey              
^SHP("W4TOTTs",28,"%TOP")
18
^SHP("W4TOTTs",29)
   &86     > :iceb &89     > : qia oz   &88       >:   qeaiq k"dq              
^SHP("W4TOTTs",29,"%TOP")
3
^SHP("W4TOTTs",30)
 &00>&00> &41    > dtwd zegewll zegpd   &40       >: mildpn zegpd              
^SHP("W4TOTTs",30,"%TOP")
1
^SHP("W4TOTTs",31)
              &44     > miyelzl zegpd   &43       >:'qeaiq' zegpd              
^SHP("W4TOTTs",31,"%TOP")
14
^SHP("W4TOTTs",32)
 &00      > &47       >:     zexy inc   &45       >:       miekif              
^SHP("W4TOTTs",32,"%TOP")
1
^SHP("W4TOTTs",33)
               &98       >: dgha` mdn   &42       >:mihixt zexikn              
^SHP("W4TOTTs",33,"%TOP")
15
^SHP("W4TOTTs",34)
               &52       >:ehexa k"dq   &50       >:      milehia              
^SHP("W4TOTTs",34,"%TOP")
15
^SHP("W4TOTTs",35)
 &00   >   &00   > &56                                                 >       
^SHP("W4TOTTs",35,"%TOP")
1
^SHP("W4TOTTs",36)
 &00   >   &00   > &59                                                 >       
^SHP("W4TOTTs",36,"%TOP")
1
^SHP("W4TOTTs",37)
 &96                > &94   > w"nyg xtqn  &93     >:   micreq 'qn              
^SHP("W4TOTTs",37,"%TOP")
1
^SHP("W4TOTTs",38)
                                                                               
^SHP("W4TOTTs",38,"%TOP")
79
^SHP("W4TOTTs",39)
 &91                                                                     >     
^SHP("W4TOTTs",39,"%TOP")
1
^SHP("W4TOTTs",40)
 &92                                                                     >     
^SHP("W4TOTTs",40,"%TOP")
1
^SHP("W4TOTTs",41)
                                                                               
^SHP("W4TOTTs",41,"%TOP")
79
^SHP("W4TOTTs",42)
                zexiy inc - miekif + zegpd + zexikn k"dq = mihixt zexikn *     
^SHP("W4TOTTs",42,"%TOP")
16
^SHP("W4TOTTs",43)
                                     tih siqedl yi oeictl qpkp `l tih m`       
^SHP("W4TOTTs",43,"%TOP")
37
^SHP("W4TOTTs",44)
                 zexiy inc + milehia + mihixt zexikn k"dq = ehexa zexikn *     
^SHP("W4TOTTs",44,"%TOP")
17
^SHP("W4TOTTs",45)
                                     tih siqedl yi oeictl qpkp `l tih m`       
^SHP("W4TOTTs",45,"%TOP")
37
^SHP("W4TOTTs",46)
                zexiy inc - miekif + zegpd + zexikn k"dq = mihixt zexikn *     
^SHP("W4TOTTs",46,"%TOP")
16
^SHP("W4TOTTs",47)
                                     tih siqedl yi oeictl qpkp `l tih m`       
^SHP("W4TOTTs",47,"%TOP")
37
^SHP("W4TOTTs",48)
         zexiy inc + zegpd + milehia + mihixt zexikn k"dq = ehexa zexikn *     
^SHP("W4TOTTs",48,"%TOP")
9
^SHP("W4TOTTs",49)
                                     tih siqedl yi oeictl qpkp `l tih m`       
^SHP("W4TOTTs",49,"%TOP")
37
^SHP("W4TOTTs","RG")
H
^SHP("W4TOTs")

^SHP("W4TOTs",1)
            ------------------------------------------------------             
^SHP("W4TOTs",1,"%TOP")
12
^SHP("W4TOTs",2)
            | d x i b n |  lr  l a w z d  |  x k n p  |     beq  |             
^SHP("W4TOTs",2,"%TOP")
12
^SHP("W4TOTs",3)
            |           |  zencew zexikn  |           |   melyz  |             
^SHP("W4TOTs",3,"%TOP")
12
^SHP("W4TOTs",4)
            ------------------------------------------------------             
^SHP("W4TOTs",4,"%TOP")
12
^SHP("W4TOTs",5)
            |&58       >|   &55        >  |&05       >|     onefn|   &03   >   
^SHP("W4TOTs",5,"%TOP")
12
^SHP("W4TOTs",6)
            |           |                 |           |          |             
^SHP("W4TOTs",6,"%TOP")
12
^SHP("W4TOTs",7)
            |&65       >|   &60        >  |&10       >|     d`gnd|   &04   >   
^SHP("W4TOTs",7,"%TOP")
12
^SHP("W4TOTs",8)
            |&67       >|   &61        >  |&11       >|'wpa dxard|   &06   >   
^SHP("W4TOTs",8,"%TOP")
12
^SHP("W4TOTs",9)
            |           |                 |           |          |             
^SHP("W4TOTs",9,"%TOP")
12
^SHP("W4TOTs",10)
            |&72       >|   &70        >  |&15       >|   hxk`xyi|   &07   >   
^SHP("W4TOTs",10,"%TOP")
12
^SHP("W4TOTs",11)
            |&78       >|   &75        >  |&20       >|      dfie|   &08   >   
^SHP("W4TOTs",11,"%TOP")
12
^SHP("W4TOTs",12)
            |&82       >|   &80        >  |&25       >|    qxpiic|   &09   >   
^SHP("W4TOTs",12,"%TOP")
12
^SHP("W4TOTs",13)
            |&84       >|   &83        >  |&26       >|       AEX|   &16   >   
^SHP("W4TOTs",13,"%TOP")
12
^SHP("W4TOTs",14)
            |&33       >|   &32        >  |&31       >|       JCB|   &18   >   
^SHP("W4TOTs",14,"%TOP")
12
^SHP("W4TOTs",15)
            |&37       >|   &36        >  |&34       >|cx`w ine`l|   &19   >   
^SHP("W4TOTs",15,"%TOP")
12
^SHP("W4TOTs",16)
            ------------------------------------------------------             
^SHP("W4TOTs",16,"%TOP")
12
^SHP("W4TOTs",17)
            |&97       >|   &90        >  |&35       >|ehp oeict |             
^SHP("W4TOTs",17,"%TOP")
12
^SHP("W4TOTs",18)
            |           |                 |&49       >|     n"rn |             
^SHP("W4TOTs",18,"%TOP")
12
^SHP("W4TOTs",19)
            |           |                 |&51       >|n"rn iptl |             
^SHP("W4TOTs",19,"%TOP")
12
^SHP("W4TOTs",20)
            ------------------------------------------------------             
^SHP("W4TOTs",20,"%TOP")
12
^SHP("W4TOTs",21)
                                                                               
^SHP("W4TOTs",21,"%TOP")
79
^SHP("W4TOTs",22)
           &00     > &99               >   &28       >:    &30     >           
^SHP("W4TOTs",22,"%TOP")
11
^SHP("W4TOTs",23)
                                                                               
^SHP("W4TOTs",23,"%TOP")
79
^SHP("W4TOTs",24)
           &00    >  &13       >: miyelz   &12       >: dtwda zepnfd           
^SHP("W4TOTs",24,"%TOP")
11
^SHP("W4TOTs",25)
           &00    >  &17     >:n"rn iptl   &14       >:  zexikn k"dq           
^SHP("W4TOTs",25,"%TOP")
11
^SHP("W4TOTs",26)
   &81    >:ueg `"k  &87     >: `"k xcey   &95       >:     `"k k"dq           
^SHP("W4TOTs",26,"%TOP")
3
^SHP("W4TOTs",27)
   &00            >  &00               >   &85       >:     ueg+xcey           
^SHP("W4TOTs",27,"%TOP")
3
^SHP("W4TOTs",28)
   &86    >:   iceb  &89     >:   qia oz   &88       >:   qeaiq k"dq           
^SHP("W4TOTs",28,"%TOP")
3
^SHP("W4TOTs",29)
   &00    >  &41    > dtwd zegewll zegpd   &40       >: mildpn zegpd           
^SHP("W4TOTs",29,"%TOP")
3
^SHP("W4TOTs",30)
   &00         >  &47       >:  zexy inc   &45       >:       miekif           
^SHP("W4TOTs",30,"%TOP")
3
^SHP("W4TOTs",31)
   &00         >  &98       >: dgha` mdn   &42       >:mihixt zexikn           
^SHP("W4TOTs",31,"%TOP")
3
^SHP("W4TOTs",32)
   &00         >     &54       >&53    >   &50       > &48 > milehia           
^SHP("W4TOTs",32,"%TOP")
3
^SHP("W4TOTs",33)
   &00         >  &00       >  &00     >   &52       >:   ehexa k"dq           
^SHP("W4TOTs",33,"%TOP")
3
^SHP("W4TOTs",34)
 &00   >   &00   > &56                                                 >       
^SHP("W4TOTs",34,"%TOP")
1
^SHP("W4TOTs",35)
 &00   >   &00   > &59                                                 >       
^SHP("W4TOTs",35,"%TOP")
1
^SHP("W4TOTs",36)
 &96                > &94   >: w"nyg 'qn  &93     >:   micreq 'qn              
^SHP("W4TOTs",36,"%TOP")
1
^SHP("W4TOTs",37)
                                                                               
^SHP("W4TOTs",37,"%TOP")
79
^SHP("W4TOTs",38)
 &91                                                                       >   
^SHP("W4TOTs",38,"%TOP")
1
^SHP("W4TOTs",39)
 &92                                                                       >   
^SHP("W4TOTs",39,"%TOP")
1
^SHP("W4TOTs",40)
                                                                               
^SHP("W4TOTs",40,"%TOP")
79
^SHP("W4TOTs",41)
                zexiy inc - zegpd + miyelz + zexikn k"dq = mihixt zexikn *     
^SHP("W4TOTs",41,"%TOP")
16
^SHP("W4TOTs",42)
                                        tih cixedl yi oeictl qpkp tih m`       
^SHP("W4TOTs",42,"%TOP")
40
^SHP("W4TOTs",43)
                                                                               
^SHP("W4TOTs",43,"%TOP")
79
^SHP("W4TOTs",44)
            zexiy inc  + zegpd + milehia + mihixt zexikn  = ehexa zexikn *     
^SHP("W4TOTs",44,"%TOP")
12
^SHP("W4TOTs",45)
                                     tih siqedl yi oeictl qpkp `l tih m`       
^SHP("W4TOTs",45,"%TOP")
37
^SHP("W4TOTs",46)
                                                                               
^SHP("W4TOTs",46,"%TOP")
79
^SHP("W4TOTs","RG")
H
^SHP("W4VCLREPs")

^SHP("W4VCLREPs",1)
                       # cx`weilee zegewl ly zepirh g"ec #                     
^SHP("W4VCLREPs",2)
                       &10     > jix`z cr &05     > jix`zn                     
^SHP("W4VCLREPs",3)
              &15 >: (`l - 0 ,ok - 1) miinei minekiq bivdl                     
^SHP("W4VCLREPs",4)
      ------------------------------------------------------------------
^SHP("W4VCLREPs",5)
      |  lawzd  | `zknq` |  qihxk 'qn  |   gewl my  |dlaw 'qn|  jix`z  |       
^SHP("W4VCLREPs",6)
      ------------------------------------------------------------------
^SHP("W4VCLREPs",7)
      $ 99999.99:TTTTTTTT:TTTTTTTTTTTTT:TTTTTTTTTTTT:TTTTTTTT: 99999999:1
^SHP("W4VCLREPs",8)

^SHP("W4VCLREPs",9)

^SHP("W4VCLREPs",10)

^SHP("W4VCLREPs",11)

^SHP("W4VCLREPs",12)

^SHP("W4VCLREPs",13)

^SHP("W4VCLREPs",14)

^SHP("W4VCLREPs",15)

^SHP("W4VCLREPs",16)

^SHP("W4VCLREPs",17)

^SHP("W4VCLREPs",18)

^SHP("W4VCLREPs",19)

^SHP("W4VCLREPs",20)

^SHP("W4VCLREPs",21)

^SHP("W4VCLREPs",22)

^SHP("W4VCLREPs",23)

^SHP("W4VCLREPs",24)

^SHP("W4VCLREPs",25)

^SHP("W4VCLREPs",26)

^SHP("W4VCLREPs",27)

^SHP("W4VCLREPs",28)

^SHP("W4VCLREPs",29)

^SHP("W4VCLREPs",30)

^SHP("W4VCLREPs",31)

^SHP("W4VCLREPs",32)

^SHP("W4VCLREPs",33)

^SHP("W4VCLREPs",34)

^SHP("W4VCLREPs",35)

^SHP("W4VCLREPs",36)

^SHP("W4VCLREPs",37)

^SHP("W4VCLREPs",38)

^SHP("W4VCLREPs",39)

^SHP("W4VCLREPs",40)

^SHP("W4VCLREPs",41)

^SHP("W4VCLREPs",42)

^SHP("W4VCLREPs",43)

^SHP("W4VCLREPs",44)

^SHP("W4VCLREPs",45)

^SHP("W4VCLREPs",46)

^SHP("W4VCLREPs",47)

^SHP("W4VCLREPs",48)

^SHP("W4VCLREPs",49)

^SHP("W4VCLREPs",50)

^SHP("W4VCLREPs",51)

^SHP("W4VCLREPs",52)

^SHP("W4VCLREPs",53)

^SHP("W4VCLREPs",54)
                                                                      $ 
^SHP("W4VCLREPs",55)
      ------------------------------------------------------------------
^SHP("W4VCLREPs",56)
                                                                               
^SHP("W4VCLREPs",57)
        &25     > : lawzd k"dq               &20     > : zelaw k"dq            
^SHP("W4VCLREPs","RG")
H
^SHP("W4VCREPs")

^SHP("W4VCREPs",1)
                  # cx`weilee zegewl ly zeahde minelyz g"ec #                  
^SHP("W4VCREPs",1,"%TOP")
18
^SHP("W4VCREPs",2)
                       &10     > jix`z cr &05     > jix`zn                     
^SHP("W4VCREPs",2,"%TOP")
23
^SHP("W4VCREPs",3)
                                                                               
^SHP("W4VCREPs",3,"%TOP")
79
^SHP("W4VCREPs",4)
 -----------------------------------------------------------------------------
^SHP("W4VCREPs",4,"%TOP")
1
^SHP("W4VCREPs",5)
 |  dahd  | dgpd |  mley  | `zknq` |  qihxk 'qn  |   gewl my  |dpnfd|  jix`z | 
^SHP("W4VCREPs",5,"%TOP")
1
^SHP("W4VCREPs",6)
 -----------------------------------------------------------------------------
^SHP("W4VCREPs",6,"%TOP")
1
^SHP("W4VCREPs",7)
 $ 9999.99:999.99:99999.99:TTTTTTTT:TTTTTTTTTTTTT:TTTTTTTTTTTT:TTTTT:99999999:1
^SHP("W4VCREPs",7,"%TOP")
1
^SHP("W4VCREPs",8)

^SHP("W4VCREPs",8,"%TOP")
0
^SHP("W4VCREPs",9)

^SHP("W4VCREPs",9,"%TOP")
0
^SHP("W4VCREPs",10)

^SHP("W4VCREPs",10,"%TOP")
0
^SHP("W4VCREPs",11)

^SHP("W4VCREPs",11,"%TOP")
0
^SHP("W4VCREPs",12)

^SHP("W4VCREPs",12,"%TOP")
0
^SHP("W4VCREPs",13)

^SHP("W4VCREPs",13,"%TOP")
0
^SHP("W4VCREPs",14)

^SHP("W4VCREPs",14,"%TOP")
0
^SHP("W4VCREPs",15)

^SHP("W4VCREPs",15,"%TOP")
0
^SHP("W4VCREPs",16)

^SHP("W4VCREPs",16,"%TOP")
0
^SHP("W4VCREPs",17)

^SHP("W4VCREPs",17,"%TOP")
0
^SHP("W4VCREPs",18)

^SHP("W4VCREPs",18,"%TOP")
0
^SHP("W4VCREPs",19)

^SHP("W4VCREPs",19,"%TOP")
0
^SHP("W4VCREPs",20)

^SHP("W4VCREPs",20,"%TOP")
0
^SHP("W4VCREPs",21)

^SHP("W4VCREPs",21,"%TOP")
0
^SHP("W4VCREPs",22)

^SHP("W4VCREPs",22,"%TOP")
0
^SHP("W4VCREPs",23)

^SHP("W4VCREPs",23,"%TOP")
0
^SHP("W4VCREPs",24)

^SHP("W4VCREPs",24,"%TOP")
0
^SHP("W4VCREPs",25)

^SHP("W4VCREPs",25,"%TOP")
0
^SHP("W4VCREPs",26)

^SHP("W4VCREPs",26,"%TOP")
0
^SHP("W4VCREPs",27)

^SHP("W4VCREPs",27,"%TOP")
0
^SHP("W4VCREPs",28)

^SHP("W4VCREPs",28,"%TOP")
0
^SHP("W4VCREPs",29)

^SHP("W4VCREPs",29,"%TOP")
0
^SHP("W4VCREPs",30)

^SHP("W4VCREPs",30,"%TOP")
0
^SHP("W4VCREPs",31)

^SHP("W4VCREPs",31,"%TOP")
0
^SHP("W4VCREPs",32)

^SHP("W4VCREPs",32,"%TOP")
0
^SHP("W4VCREPs",33)

^SHP("W4VCREPs",33,"%TOP")
0
^SHP("W4VCREPs",34)

^SHP("W4VCREPs",34,"%TOP")
0
^SHP("W4VCREPs",35)

^SHP("W4VCREPs",35,"%TOP")
0
^SHP("W4VCREPs",36)

^SHP("W4VCREPs",36,"%TOP")
0
^SHP("W4VCREPs",37)

^SHP("W4VCREPs",37,"%TOP")
0
^SHP("W4VCREPs",38)

^SHP("W4VCREPs",38,"%TOP")
0
^SHP("W4VCREPs",39)

^SHP("W4VCREPs",39,"%TOP")
0
^SHP("W4VCREPs",40)

^SHP("W4VCREPs",40,"%TOP")
0
^SHP("W4VCREPs",41)

^SHP("W4VCREPs",41,"%TOP")
0
^SHP("W4VCREPs",42)

^SHP("W4VCREPs",42,"%TOP")
0
^SHP("W4VCREPs",43)

^SHP("W4VCREPs",43,"%TOP")
0
^SHP("W4VCREPs",44)

^SHP("W4VCREPs",44,"%TOP")
0
^SHP("W4VCREPs",45)

^SHP("W4VCREPs",45,"%TOP")
0
^SHP("W4VCREPs",46)

^SHP("W4VCREPs",46,"%TOP")
0
^SHP("W4VCREPs",47)

^SHP("W4VCREPs",47,"%TOP")
0
^SHP("W4VCREPs",48)

^SHP("W4VCREPs",48,"%TOP")
0
^SHP("W4VCREPs",49)

^SHP("W4VCREPs",49,"%TOP")
0
^SHP("W4VCREPs",50)

^SHP("W4VCREPs",50,"%TOP")
0
^SHP("W4VCREPs",51)

^SHP("W4VCREPs",51,"%TOP")
0
^SHP("W4VCREPs",52)

^SHP("W4VCREPs",52,"%TOP")
0
^SHP("W4VCREPs",53)

^SHP("W4VCREPs",53,"%TOP")
0
^SHP("W4VCREPs",54)
                                                                            $ 
^SHP("W4VCREPs",54,"%TOP")
76
^SHP("W4VCREPs",55)
 -----------------------------------------------------------------------------
^SHP("W4VCREPs",55,"%TOP")
1
^SHP("W4VCREPs",56)
                                                                               
^SHP("W4VCREPs",56,"%TOP")
79
^SHP("W4VCREPs",57)
                                                                               
^SHP("W4VCREPs",57,"%TOP")
79
^SHP("W4VCREPs",58)
                                                                               
^SHP("W4VCREPs",58,"%TOP")
79
^SHP("W4VCREPs",59)
                                                                               
^SHP("W4VCREPs",59,"%TOP")
79
^SHP("W4VCREPs",60)
                                                                               
^SHP("W4VCREPs",60,"%TOP")
79
^SHP("W4VCREPs",61)
                                                                               
^SHP("W4VCREPs",61,"%TOP")
79
^SHP("W4VCREPs",62)
                                                                               
^SHP("W4VCREPs",62,"%TOP")
79
^SHP("W4VCREPs",63)
                                                                               
^SHP("W4VCREPs",63,"%TOP")
79
^SHP("W4VCREPs",64)
                                                                               
^SHP("W4VCREPs",64,"%TOP")
79
^SHP("W4VCREPs",65)
                                                                               
^SHP("W4VCREPs",65,"%TOP")
79
^SHP("W4VCREPs",66)
                                                                               
^SHP("W4VCREPs",66,"%TOP")
79
^SHP("W4VCREPs",67)
                                                                               
^SHP("W4VCREPs",67,"%TOP")
79
^SHP("W4VCREPs",68)
                                                                               
^SHP("W4VCREPs",68,"%TOP")
79
^SHP("W4VCREPs",69)
                                                                               
^SHP("W4VCREPs",69,"%TOP")
79
^SHP("W4VCREPs",70)
   &35     > zeahd  &30     > zegpd &25     > : mley k"dq                      
^SHP("W4VCREPs",70,"%TOP")
3
^SHP("W4VCREPs","RG")
H
^SHP("W4VVHBMSs")

^SHP("W4VVHBMSs",1)
                                                                               
^SHP("W4VVHBMSs",2)
                                                    &05        > : zipeayg 'qn 
^SHP("W4VVHBMSs",3)
                                                                               
^SHP("W4VVHBMSs",4)
                                                     &10         > : xeyi` 'qn 
^SHP("W4VVHBMSs",5)
                                                                               
^SHP("W4VVHBMSs","RG")
H
^SHP("WTBREPs")

^SHP("WTBREPs",1)
                      &10      >   jix`z cr    &05      >  jix`zn              
^SHP("WTBREPs",1,"%TOP")
22
^SHP("WTBREPs",2)
    ( 2 - migelyn , 1 - dcrqn , 0 - zepnfdd lk )  &15 > : zepnfd beq           
^SHP("WTBREPs",2,"%TOP")
4
^SHP("WTBREPs","RG")
H
^TABLs

^TABLs("A")
\\\\\\\\
^TABLs("A","RZD")
\
^TABLs("B1CLUB")
" LOGIC BUSINESS " ly mipecren\xtqn\4\ynzyn my\14\\E\E\
^TABLs("B1CLUB",1)
URL\50\E\\Y\
^TABLs("B1CLUB",2)
dnqiq\11\E\\Y\
^TABLs("B1CLUB",3)
xe`z\20\H\\N\
^TABLs("B1CLUB",4)
iy`x gewl xtqn\10\E\^LKH\N\
^TABLs("B1CLUB","RZD")
\
^TABLs("DARGA","PROG")
^P1DARGA
^TABLs("DEP")
zewlgn zlah\dwlgn 'qn\5\dwlgn my\20\\E\H\
^TABLs("DEP",1)
n"rn\1\N\^W4MAM\Y\1
^TABLs("DEP","RZD")
\
^TABLs("ENDSET","HZG")
$G(^ENDSET("N",%NXN))<>20H\/%NXN<>5
^TABLs("KSN")
miwtq zlah \wtq cew\5\wtq my\20
^TABLs("KSN",1)
zaezk\30\H
^TABLs("KSN",2)
oetlh\21\E
^TABLs("KSN",3)
qwt\10\E
^TABLs("KSN",4)
cewin\5\E
^TABLs("KSN","RZD")
\
^TABLs("LAK")
zexya zegewl zlah\gewl 'lh\10\gewl my\20
^TABLs("LAK",1)
xyw yi`\12\H
^TABLs("LAK",2)
oet`lt\10\E
^TABLs("LAK",3)
mcen 'qn\10\E
^TABLs("LAK",4)
mcenl hxet 'qn\2\N
^TABLs("LAK",5)
(l/k) difkxn\1\B
^TABLs("LAK",6)
DFLT -a mcen mixhtxt\30\E
^TABLs("LAK",7)
l/k lexhpew mcen\1\B
^TABLs("LAK",8)
Q-a mcen mixhnxt\30\E
^TABLs("LAK",9)
oexg` oekcr 'z\8\D
^TABLs("LAK",10)
oekci okez\30\H
^TABLs("LAK",11)
(2) oekcr okez\30\H
^TABLs("LAK",12)
dxrd\30\H
^TABLs("LAK",13)
2 dxrd\30\H
^TABLs("LAK",14)
(0- oi`,2- DOS,1- MUMPS) `ay\1\N
^TABLs("LAK","RZD")
\
^TABLs("LEVHAG")
mibg zlah\bg jix`z\10\mcew meia bg zligz zry\10\\D\T\
^TABLs("LEVHAG",1)
bg meiq zry\5\T\
^TABLs("LEVHAG","RZD")
\
^TABLs("LEVKVZ","KEY")
KVZ
^TABLs("LEVKVZ","PROG")
^LEVKVZ
^TABLs("MASH","HZG")
Ts("MH")*(100-Ts("AH"))*.01<>8,2\/Ts("AH")<>5,2\/Ts("MH")<>8,2\/Ts(2)<>12H\/Ts(4)<>20H\/PAR<>8\/%NXN<>2
^TABLs("MASH","SET")
S PAR=$P($G(^MASH(%NXN)),"*") S:PAR="" PAR="???" S Ts(1)=$G(^PAR(PAR)),Ts(3)=$P(Ts(1),"**",8),Ts(2)=$S(Ts(3)?1N.N:$G(^SPK(Ts(3))),1:""),Ts(4)=$P(Ts(1),"**"),Ts("MH")=$P(Ts(1),"**",2),Ts("AH")=$P(Ts(1),"**",7)
^TABLs("MLDEP")
i`ln zewlgn zlah\dwlgn 'qn\5\dwlgn my\24\\E\H\
^TABLs("MLDEP",1)
(l/k) n"rn\1\B\\N\
^TABLs("MLDEP","RZD")
\
^TABLs("MLMIDA")
dcin zecigi zlah\dcigi cew\5\dcigi my\22\\E\H
^TABLs("MLMIDA","RZD")
\
^TABLs("MLMKDM")
dxnd inbwn zlah\dcin 'gin\5\my\5\\E\H
^TABLs("MLMKDM",1)
dcin 'gil\5\E\^MLMIDA\Y\
^TABLs("MLMKDM",2)
dxnd mcwn\7\E\\N\
^TABLs("MLMKDM","RZD")
\
^TABLs("MLPAR")
i`ln ihixt zlah\hixt cew\8\hixt my\28\\E\H
^TABLs("MLPAR",1)
mihixt zveaw\5\E\^MLSUGP\N\
^TABLs("MLPAR",2)
dpnfdl dcin 'gi\5\E\^MLMIDA\Y\1
^TABLs("MLPAR",3)
dxitql dcin 'gi\5\E\^MLMIDA\Y\1
^TABLs("MLPAR",4)
ilnipin i`ln\7\E\\N\
^TABLs("MLPAR",5)
dpnfd zcewp\7\E\\N\
^TABLs("MLPAR","RZD")
\
^TABLs("MLSUGP")
mihixt zeveaw zlah\mihixt zveaw cew\5\hixt zveaw xe`z\20\\E\H\
^TABLs("MLSUGP",1)
dwlgn\3\N\^MLDEP\Y\
^TABLs("MLSUGP",2)
geex feg`\6\N\\N\
^TABLs("MLSUGP","PROG")
^L2SUG
^TABLs("MLSUGP","RZD")
\
^TABLs("MLSUGP","US","P1TFR")
$D(^P1TFR(%NXN))
^TABLs("MSPMOD")
mincen ixtqn zlah\mcen 'qn\12\dpgz my\24\\
^TABLs("MSPMOD",1)
oetlh 'qn\10\E
^TABLs("MSPMOD",2)
qwt 'qn\10\E
^TABLs("MSPMOD",3)
xyw yi`\12\H
^TABLs("MSPMOD",4)
zxeywz zery\13\E
^TABLs("MSPMOD","RZD")
\
^TABLs("NAME")
mildpn zlah\ldpn 'qn\5\ldpn my\20\\E\H\
^TABLs("NAME",1)
oetlh\11\E\\N\
^TABLs("NAME",2)
l"`ec\40\E\\N\
^TABLs("NAME","RZD")
\
^TABLs("NEWCSR")
qet l` zegewl\xtqn\4\gewl my\24\\E\H\
^TABLs("NEWCSR",1)
dpwzd jix`z\8\D\\Y\
^TABLs("NEWCSR",2)
zaezk\80\E\\Y\
^TABLs("NEWCSR",3)
oekcr jix`z\8\D\\N\
^TABLs("NEWCSR",4)
lirt\1\B\\N\
^TABLs("NEWCSR",5)
zecnr xtqn\4\E\\N\
^TABLs("NEWCSR",6)
dxrd\30\H\\N\
^TABLs("NEWCSR",7)
dqipkl dcewt\10\E\\N\
^TABLs("NEWCSR","RZD")
\
^TABLs("NEWVERS")
ze`qxib lewehext\dqxib 'qn\4\jix`z\8\\E\D\
^TABLs("NEWVERS",1)
miepiy xe`z\80*6\H\\N\
^TABLs("NEWVERS","RZD")
\
^TABLs("P1CODH")
zexrd zlah\dxrd cew\3\dxrd\40\\E\H\
^TABLs("P1CODH","RZD")
\
^TABLs("P1EZA","HZG")
$$SHEM^P1P(%NXN)<>20H\/%NXN<>6
^TABLs("P1GOD")
lceb itl dvit ibeq zlh \dvit lceb\1\xe`z\12
^TABLs("P1GOD",1)
dvit xign\4\N
^TABLs("P1GOD",2)
ztqez xign\4\N
^TABLs("P1GOD","RZD")
\
^TABLs("P1HNH")
zegpd zlah\dgpd cew\4\(%) dgpd lceb\6\\
^TABLs("P1HNH","HZG","P1HZ")
%NXS_"%"<>10\/%NXN<>5
^TABLs("P1HNH","HZG","P1HZMS")
%NXS_"%"<>10\/%NXN<>5
^TABLs("P1HNH","HZGKOT","P1HZ")
 : dgpd xegal `p 
^TABLs("P1HNH","HZGKOT","P1HZMS")
 : dgpd xegal `p 
^TABLs("P1HNH","RZD")
\
^TABLs("P1IR")
mixr zlah\xir 'qn\4\xird my\20\\E\H\\
^TABLs("P1IR",1)
gelyn inc\6\N\\N\
^TABLs("P1IR",2)
(zewc) dlaed onf\3\N\\N\
^TABLs("P1IR",3)
yn inc lhan mekq\7\N\\N\
^TABLs("P1IR",4)
dpnfd menipin\7\N\\N\
^TABLs("P1IR","HZG")
$P($G(^P1IR(%NXN,1)),"\",4)<>15\/$P($G(^P1IR(%NXN,1)),"\",2)<>5\/$P($G(^P1IR(%NXN,1)),"\",2)<>9,2\/%NXS<>20H\/%NXN<>3
^TABLs("P1IR","RZD")
\
^TABLs("P1KEY")
miywn zlah\ywn\1\okez\6\\
^TABLs("P1KEY","RZD")
\
^TABLs("P1PSL")
migily zlah\gily xtqn\2\gily my\20
^TABLs("P1PSL","RZD")
\
^TABLs("P1SBIT")
milehia zeaiq zlah\daiq cew\3\daiq xe`z\20
^TABLs("P1SBIT","RZD")
\
^TABLs("P1SHNH")
zegpd zeaiq zlah\daiq cew\3\daiq xe`z\20
^TABLs("P1SHNH","RZD")
\
^TABLs("P1SL")
migily zlah\gily xtqn\3\gily my\20\\E\H\
^TABLs("P1SL",1)
caer 'qn\5\E\^NAME\N\
^TABLs("P1SL",2)
oetlh 'qn\11\E\\N\
^TABLs("P1SL",3)
l"`ec\40\E\\N\
^TABLs("P1SL","RZD")
\
^TABLs("P1SLCV")
migily zlah\gily xtqn\3\gily my\20\\E\H\
^TABLs("P1SLCV",1)
caer 'qn\5\E\^NAME\N\
^TABLs("P1SLCV",2)
oetlh 'qn\11\E\\N\
^TABLs("P1SLCV",3)
l"`ec\40\E\\N\
^TABLs("P1SLCV",4)
rwx ly rav\6\CB\6\N\
^TABLs("P1SLCV",5)
zeize` ly dav\6\CF\6\N\
^TABLs("P1SLCV",6)
dnbec\7\E\4;5\N\
^TABLs("P1SLCV","RZD")
\
^TABLs("P1SUG")
zevit ibeq zlah\dvit beq\2\xe`z\16
^TABLs("P1SUG","RZD")
\
^TABLs("P1TF")
zevit zixth\dvit cew\2\dvit my\16
^TABLs("P1TF",1)
zetqez\40\H
^TABLs("P1TF",2)
lyza zetqez zenk\2\N
^TABLs("P1TF","RZD")
\
^TABLs("P1TFRA","HZG")
Ts("D")<>10\/Ts("S")<>20H\/%NXN<>10
^TABLs("P1TFRA","SET")
N P,R S R="^" S P=$G(^P1TFRA(%NXN)),Ts("S")=$P(P,R),Ts("D")=$ZD($P(P,R,2),"DD.MM.YY")
^TABLs("P1TSF")
zetqez zlah\ztqez cew\2\ztqez xe`z\20
^TABLs("P1TSF","RZD")
\
^TABLs("PAR","FIND")
^P1PARHIP
^TABLs("PAR","HZG")
$G(Ts("MP1"))<>4H\/Ts("MP")<>15\/Ts("SG1")<>16H\/Ts("SG")<>3\/Ts("MH")<>6,2\/Ts("S")<>18H\/%NXN<>6
^TABLs("PAR","HZG","P1HZ")
Ts("MH")<>8,2\/Ts("S")<>30H\/%NXN<>10\/$S($D(^PRTNO(%NXN)):"-",1:" ")
^TABLs("PAR","HZG","P1HZMS")
Ts("MH")<>8,2\/Ts("S")<>30H\/%NXN<>10\/$S($D(^PRTNO(%NXN)):"-",1:" ")
^TABLs("PAR","HZG","P1TSF")
Ts("MH")<>8,2\/Ts("S")<>20H\/%NXN<>10\/$S($D(^PRTNO(%NXN)):"-",1:" ")
^TABLs("PAR","HZGKOT")
        zqtcn       |      hixt beq      | xign |     hixt xe`z    |  cew 
^TABLs("PAR","KEY")
PAR
^TABLs("PAR","PROG")
^P1PARI
^TABLs("PAR","PROG","P1EZM")
^P1PARI
^TABLs("PAR","PROG","P1EZM1")
^P1PARI
^TABLs("PAR","PROG","P1EZP")
^P1PARI
^TABLs("PAR","RZD")
**
^TABLs("PAR","SET")
N P,R S R="**",P=$G(^PAR(%NXN)),Ts("S")=$P(P,R),Ts("MH")=$$MH^P1P(%NXN),Ts("MP")=$P(P,R,11),Ts("SG")=$P(P,R,5),Ts("SG1")=$S(Ts("SG"):$G(^PARSUG(Ts("SG"))),1:"") S Ts("MP1")="" I Ts("MP") S Ts("MP1")=$P($G(^P1PRM("MDP",Ts("MP"))),"\",4)
^TABLs("PAR","US","P1AIN")
$$P1AIN^P1PARUS(%NXN)
^TABLs("PAR","US","P1EZM")
'$D(^P1EZA(%NXN))&'$D(^P1EZT(%NXN))&'$D(^P1EZR(%NXN))
^TABLs("PAR","US","P1EZR")
'$D(^P1EZI(%NXN))&'$D(^P1EZA(%NXN))&'$D(^P1EZT(%NXN))
^TABLs("PAR","US","P1EZS")
'$D(^P1EZI(%NXN))&'$D(^P1EZA(%NXN))&'$D(^P1EZT(%NXN))
^TABLs("PAR","US","P1HZ")
$$P1HZ^P1PARUS(%NXN,$G(NMB))
^TABLs("PAR","US","P1HZMS")
$$P1HZMS^P1PARUS(%NXN,$G(NMB))
^TABLs("PAR","US","P1HZTA")
$$P1HZTF^P1PARUS(%NXN,$G(NMB))
^TABLs("PAR","US","P1HZTF")
$$P1HZTF^P1PARUS(%NXN,$G(NMB))
^TABLs("PAR","US","P1TFR")
$D(^PARCAT($$^%L3MYDVN,SUGP,%NXN))
^TABLs("PAR","US","P1TSF")
$D(^P1EZ(%NXN,KODP))
^TABLs("PARIT","HZG")
$P(Ts(1),"*",20)<>,2\/$$MHAL2^L2P(%NXN)<>,2\/Ts(2)<>H\/Ts(4)<>H\/%NXN
^TABLs("PARIT","HZGKOT")
okxvl xign|zelr xign|     wtq my     |         hixt xe`z       | hixt cew 
^TABLs("PARIT","SET")
S Ts(1)=$G(^PARIT(%NXN,1)),Ts(3)=$P(Ts(1),"*",8),Ts(2)=$S(Ts(3)?1N.N:$G(^YZRN(Ts(3))),1:""),Ts(4)=$G(^PARIT(%NXN))
^TABLs("PARLKH","HZG")
$$LKH^P1L(%NXN)\/%NXN
^TABLs("PARLKH","HZGKOT")
        gewl my        | gewl 'qn 
^TABLs("PARNL","HZG")
$P(%NXS,"\",4)\/$P(%NXS,"\",3)\/$P(%NXS,"\",2)\/$P(%NXS,"\",1)\/$P(%NXS,"\",5)
^TABLs("PARNL","HZGKOT")
 mei cr | mein | dry cr | dryn |     x`ez      
^TABLs("PARSEND","HZG")
$$LKH^P1L(%NXN)<>20H\/%NXN<>10
^TABLs("PARSHA","HZG")
$P(%NXS,"\",4)\/$P(%NXS,"\",3)\/$P(%NXS,"\",2)\/$P(%NXS,"\",1)\/$P(%NXS,"\",5)\/%NXN
^TABLs("PARSHA","HZGKOT")
 mei cr | mein | dry cr | dryn |     x`ez      | 'qn
^TABLs("PARSLK","HZG")
$$SUGL1^P1L(%NXN)\/%NXN
^TABLs("PARSLK","HZGKOT")
       zegewl zveaw my        | dveaw 'qn 
^TABLs("PARSUG")
mihixt zeveaw zlah\mihixt zveaw cew\4\hixt zveaw xe`z\15\\E\H\
^TABLs("PARSUG",1)
zifrela my\15\H\\N\
^TABLs("PARSUG",2)
dwlgn\3\N\^DEP\N\
^TABLs("PARSUG",3)
rwx ly rav\6\CB\5\N\
^TABLs("PARSUG",4)
zeize` ly rav\6\CF\5\N\
^TABLs("PARSUG",5)
dnbec\6\H\3;4\N\
^TABLs("PARSUG",6)
hixtza bvd\1\N\^W4VWGR\N\
^TABLs("PARSUG",7)
( lcgn zxxa ) dpn 'qn\3\E\^W4MANA\N\
^TABLs("PARSUG","PROG")
^L2SUG
^TABLs("PARSUG","RZD")
\
^TABLs("PARSUG","US","P1TFR")
$D(^P1TFR(%NXN))
^TABLs("PARSUG0")
mihixt zeveaw zlah\mihixt zveaw cew\4\hixt zveaw xe`z\20\\E\H\
^TABLs("PARSUG0",1)
dwlgn\3\N\^DEP
^TABLs("PARSUG0",2)
rwx ly rav\6\CB\4
^TABLs("PARSUG0",3)
zeize` ly rav\6\CF\4
^TABLs("PARSUG0",4)
dnbec\6\H\2;3
^TABLs("PARSUG0",5)
hixtza bvd\1\N\^W4VWGR
^TABLs("PARSUG0",6)
(lcgn zxxa) dpn 'qn\3\E\^W4MANA
^TABLs("PARSUG0","PROG")
^L2SUG
^TABLs("PARSUG0","RZD")
\
^TABLs("PARSUG0","US","P1TFR")
$D(^P1TFR(%NXN))
^TABLs("PLMDN")
zepicn zlah \(zneciw) dpicn cew\3\dpicnd my\20
^TABLs("PLMDN","RZD")
\
^TABLs("PLSKV")
zeveaw ibeq zlah \dveaw beq\3\dveaw xe`z \20
^TABLs("PLSKV","RZD")
\
^TABLs("PLUK")
xhpq lewl zecnr\dcnr 'qn\2\dcnr my\20\\E\H\
^TABLs("PLUK","RZD")
\
^TABLs("SHULHAN")
zepgley zlah\ogley 'qn\3\ogley xe`z\20
^TABLs("SHULHAN",1)
ogley beq\3\N\^SUGS
^TABLs("SHULHAN",2)
(%) dgpd\6\N\
^TABLs("SHULHAN","FIRST")
999
^TABLs("SHULHAN","RZD")
\
^TABLs("SUG")
mihixt zeveaw zlah\mihixt zveaw cew\5\hixt zveaw xe`z\20\\E\H
^TABLs("SUG",1)
dwlgn\3\N\^DEP
^TABLs("SUG","PROG")
^L2SUG
^TABLs("SUG","RZD")
\
^TABLs("SUG","US","P1TFR")
$D(^P1TFR(%NXN))
^TABLs("SUGL")
zegewl ibeq zlah\zegewl zveaw \3\zegewl zveaw xe`z\20
^TABLs("SUGL",1)
dgpd %\6\N
^TABLs("SUGL","HZG")
$J($G(^SUGL(%NXN,1)),2,2)_"%"\/%NXS\/%NXN
^TABLs("SUGL","HZGKOT")
 dgpd %| zegewl beq xe`z | beq 
^TABLs("SUGL","RZD")
\
^TABLs("SUGS")
zepgley ibeq zlah\ogley beq\2\ogley beq xe`z\26\\E\H\
^TABLs("SUGS",1)
rwx rav\6\CB\3\N\
^TABLs("SUGS",2)
zeize` rav\6\CF\3\N\
^TABLs("SUGS",3)
dnbec\6\E\1;2\N\
^TABLs("SUGS",4)
cgn zxixa ) micreq 'qn\5\E\\N\
^TABLs("SUGS",5)
dpnfd meiq ixg` xefgl\1\N\S1\N\
^TABLs("SUGS",6)
gewl 'qn le`yl\1\B\
^TABLs("SUGS",7)
zgwl/zayl le`yl\1\B\\N\
^TABLs("SUGS",8)
xignn 'ley zgpd cixedl\1\B\\N\
^TABLs("SUGS","RZD")
\
^TABLs("TEL")
mipetlh xtq\oetlh 'qn\11\gewl my\24\\E\H\
^TABLs("TEL",1)
xyw yi`\20\H\\N\
^TABLs("TEL",2)
ciip\11\E\\N\
^TABLs("TEL",3)
qwt\11\E\
^TABLs("TEL",4)
zaezk\40\H\\N\
^TABLs("TEL",5)
cewin\7\E\\N\
^TABLs("TEL",6)
l"`ec\40\E\\N\
^TABLs("TEL",7)
1 dxrd\40\H\\N\
^TABLs("TEL",8)
2 dxrd\40\H\\N\
^TABLs("TEL",9)
3 dxrd\40\H\\N\
^TABLs("TEL","RZD")
\
^TABLs("W3COLOR")
miaevir zlah\aevir cew\3\aevir xe`z\20
^TABLs("W3COLOR",1)
oeil` wlgl rwx\20\E\
^TABLs("W3COLOR",2)
oezgze wlgl rwx\20\E\
^TABLs("W3COLOR",3)
oezgze oeil` wlgl rav\20\E\
^TABLs("W3COLOR",4)
oini wlgl rwx\20\E\
^TABLs("W3COLOR",5)
oini wlgl rav\20\E\
^TABLs("W3COLOR",6)
l`ny wlgl rwx\20\E\
^TABLs("W3COLOR",7)
l`ny wlgl rav\20\E\
^TABLs("W3COLOR",8)
ifkxn wlgl rwx\20\E\
^TABLs("W3COLOR",9)
hixt cewl rav\20\E\
^TABLs("W3COLOR",10)
hixt myl rav\20\E\
^TABLs("W3COLOR",11)
xignl rav\20\E\
^TABLs("W3COLOR","RZD")
\
^TABLs("W3MKR")
zepnfd zexewn zlah\xewn 'qn\5\xewn my\15\\E\H\
^TABLs("W3MKR","RZD")
\
^TABLs("W3MSD")
zecrqn zlah\dcrqn 'qn\6\dcrqn my\24
^TABLs("W3MSD",1)
zaezk\30\H
^TABLs("W3MSD",2)
oetlh\10\E
^TABLs("W3MSD",3)
qwt\10\E
^TABLs("W3MSD",4)
c-` dcear onf\13\E
^TABLs("W3MSD",5)
'd mei dcear onf\13\E
^TABLs("W3MSD",6)
'e mei dcear onf\13\E
^TABLs("W3MSD",7)
'y mei dcear onf\13\E
^TABLs("W3MSD",8)
liin-i`\30\E
^TABLs("W3MSD",9)
dpenz\30\E
^TABLs("W3MSD",10)
hiiq\30\E
^TABLs("W3MSD",11)
iy`x sc\30\E
^TABLs("W3MSD",12)
dnqiq\12\E
^TABLs("W3MSD","RZD")
~
^TABLs("W3PLCPRM")
cxk`ltl mixhnxt\dcrqn 'qn\7\dcrqn my\20\\E\H\
^TABLs("W3PLCPRM",1)
seqn 'qn\8\E\\N\
^TABLs("W3PLCPRM",2)
ynzyn my\20\E\\N\
^TABLs("W3PLCPRM",3)
dnqiq\12\E\\N\
^TABLs("W3PLCPRM","RZD")
\
^TABLs("W4ACNT")
wpa zepeayg zlah\'qn\2\wpa\2
^TABLs("W4ACNT",1)
wpa xe`z\16\H\
^TABLs("W4ACNT",2)
sipq 'qn\3\E\
^TABLs("W4ACNT",3)
oeayg 'qn\11\E\
^TABLs("W4ACNT","RZD")
\
^TABLs("W4ATAR")
mixz` zlah\xz` 'qn\2\xz` xe`z\20\\E\H\
^TABLs("W4ATAR","RZD")
\
^TABLs("W4COLOR")
mirav zlah\xtqn\2\rav\10
^TABLs("W4COLOR","RZD")
\
^TABLs("W4DEV")
mipwzd zlah\owzd 'qn\5\owzd my\15\\E\E\
^TABLs("W4DEV",1)
dxrd\25\H\
^TABLs("W4DEV",2)
zqtcn beq\1\E\MDPSUG\N\
^TABLs("W4DEV","RZD")
\
^TABLs("W4GRC")
fekix zeveaw zlah\fekix zveaw qn\7\dveaw my\20\\E\H\
^TABLs("W4GRC","RZD")
\
^TABLs("W4LEVTB")
mitih - micaer zveaw - caer\caer 'qn\5\caer my\16\\E\H\
^TABLs("W4LEVTB",1)
micaer zveaw\5\E\LEVKVZ\N\
^TABLs("W4LEVTB",2)
zxekyn beq\1\E\LEVSUGMS\N\
^TABLs("W4LEVTB",3)
zegewl mr caer\1\B\\N\
^TABLs("W4LEVTB",4)
lirt\1\B\
^TABLs("W4LEVTB",5)
`ceel dyxen\1\B\\\
^TABLs("W4LEVTB","RZD")
\
^TABLs("W4LKHACM")
xyw iyp` zlah\xtqn\5\xyw yi`\14\\E\H\
^TABLs("W4LKHACM",1)
ciwtz\10\H\\N\
^TABLs("W4LKHACM",2)
oetlh\11\E\\N\
^TABLs("W4LKHACM",3)
dgely\4\E\\N\
^TABLs("W4LKHACM",4)
ciip\11\E\\N\
^TABLs("W4LKHACM",5)
qwt\11\E\\N\
^TABLs("W4LKHACM",6)
liin i`\30\E\\N\
^TABLs("W4LKHACM","RZD")
\
^TABLs("W4MAPPRM")
zetn mixhnxt zlah\dtn 'qn\2\dtn xe`z\24\\E\H\
^TABLs("W4MAPPRM",1)
fkxn xe`z e` zaezk\30\H\\N\
^TABLs("W4MAPPRM",2)
fkxn ly zehpicxe`ew\24\E\\N\
^TABLs("W4MAPPRM",3)
dcin dpw\14\N\[]W4ZOOM\N\
^TABLs("W4MAPPRM","RZD")
\
^TABLs("W4MDP")
mipeal zeqtcn zxcbd\zqtcn 'qn\2\zqtcn xe`z\16\\E\H\
^TABLs("W4MDP",1)
hxet 'qn\4\E\dev\N\
^TABLs("W4MDP",2)
sevtiv\1\B\\N\
^TABLs("W4MDP",3)
wzrd\1\B\\N\
^TABLs("W4MDP",4)
FIRE\1\B\\N\
^TABLs("W4MDP",5)
iaihpxhl` ixeciq 'qn\2\E\\N\
^TABLs("W4MDP","RZD")
\
^TABLs("W4MDPC")
xhpq lewl zecnr\dcnr 'qn\2\dcnr my\20\\E\H\
^TABLs("W4MDPC","RZD")
\
^TABLs("W4MDPH")
dcear zecnr zxcbd\ixeciq 'qn\2\dcnr xe`z\14\\E\H\
^TABLs("W4MDPH",1)
dcnrl hxet\3\N\dev\N\
^TABLs("W4MDPH",2)
zqtcnl hxet\3\N\dev\N\
^TABLs("W4MDPH",3)
lwyn\1\B\\N\
^TABLs("W4MDPH",4)
lwynl hxet\3\N\dev\N\
^TABLs("W4MDPH",5)
xpwq\1\B\\N\
^TABLs("W4MDPH",6)
dtew\1\B\\N\
^TABLs("W4MDPH",7)
'lyz\1\B\\N\
^TABLs("W4MDPH",8)
milehia\1\B\\N\
^TABLs("W4MDPH",9)
zegpd\1\B\\N\
^TABLs("W4MDPH",10)
onefn\1\B\\N\
^TABLs("W4MDPH",11)
wiy\1\B\\N\
^TABLs("W4MDPH",12)
gahnl oea\1\B\\N\
^TABLs("W4MDPH",13)
dgely\4\N\\N\
^TABLs("W4MDPH","RZD")
\
^TABLs("W4MDPH1")
dcear zecnr zxcbd\ixeciq 'qn\2\dcnr xe`z\14\\E\H\
^TABLs("W4MDPH1",1)
dcnrl hxet\2\N\dev\N\
^TABLs("W4MDPH1",2)
zqtcnl hxet\2\N\dev
^TABLs("W4MDPH1",3)
lwyn\1\B\
^TABLs("W4MDPH1",4)
lwynl hxet\2\N\dev
^TABLs("W4MDPH1",5)
xpwq\1\B\\N\
^TABLs("W4MDPH1",6)
dtew\1\B\\N\
^TABLs("W4MDPH1",7)
'lyz\1\B\\N\
^TABLs("W4MDPH1",8)
milehia\1\B\\N\
^TABLs("W4MDPH1",9)
zegpd\1\B\\N\
^TABLs("W4MDPH1",10)
onefn\1\B\\N\
^TABLs("W4MDPH1",11)
wiy\1\B\\N\
^TABLs("W4MDPH1",12)
gahnl oea\1\B\\N\
^TABLs("W4MDPH1",13)
bvl hxet\2\N\dev\N\
^TABLs("W4MDPH1","RZD")
\
^TABLs("W4MDPK")
zepeayg zeqtcn zxcbd\ixeciq 'qn\2\dcnr xe`z\16
^TABLs("W4MDPK",1)
dcnrl hxet\2\N\dev
^TABLs("W4MDPK",2)
zqtcnl hxet\2\N\dev
^TABLs("W4MDPK",3)
lwyn\1\B\
^TABLs("W4MDPK",4)
lwynl hxet\2\N\dev
^TABLs("W4MDPK","RZD")
\
^TABLs("W4MNSIS")
ixeg` cxynl ze`nqiq zebxc\divte` 'qn\2\divte` my\25\\E\H\
^TABLs("W4MNSIS",1)
dnqiq zbxc\1\N\^W4DARGA\N\
^TABLs("W4MNSIS","RZD")
\
^TABLs("W4MRK")
mipezp xeciyl mifkxn zniyx\fkxn 'qn\5\fkxn my\25\\E\H\
^TABLs("W4MRK",1)
xeciyl iy`x zaezk\35\E\\N\
^TABLs("W4MRK",2)
mihixt zvign my\30\E\\N\
^TABLs("W4MRK",3)
mixr zvign my\30\E\\N\
^TABLs("W4MRK",4)
zegewl zvign my\30\E\\N\
^TABLs("W4MRK","RZD")
\
^TABLs("W4MTB")
zerahn zlah\cew\3\rahn beq\9
^TABLs("W4MTB",1)
oniq\1\E\^W4MTBI
^TABLs("W4MTB",2)
xry\6\N\
^TABLs("W4MTB","RZD")
\
^TABLs("W4MVC1")
"dgpd-hixt" mirvan\rvan cew\3\rvan my\20\\E\H\VLD^W4MVC1
^TABLs("W4MVC1",1)
dxiknl hq    \4\E\^P1SETM
^TABLs("W4MVC1",2)
dxikn zenk\3\N\
^TABLs("W4MVC1",3)
g"y dgpd\5\N\
^TABLs("W4MVC1",4)
jix`zn\8\D\\N\
^TABLs("W4MVC1",5)
jix`z cr\8\D\\N\
^TABLs("W4MVC1",6)
lfen xign\6\N\\N\
^TABLs("W4MVC1","RZD")
\
^TABLs("W4MVC11")
1 + ( xzei e`) 1 mirvan\rvan cew\2\rvan my\14\\E\H\VLD^W4MVC11
^TABLs("W4MVC11",1)
dxiknl hq    \6\E\^P1SETM\N\
^TABLs("W4MVC11",2)
mihixt zveaw\6\E\^PARSUG\N\
^TABLs("W4MVC11",3)
mein\1\DY\\N\
^TABLs("W4MVC11",4)
mei cr\1\DY\\N\
^TABLs("W4MVC11",5)
dryn\7\T\\N\
^TABLs("W4MVC11",6)
dry cr\7\T\\N\
^TABLs("W4MVC11",7)
mihixt zenk\3\E\\Y\1
^TABLs("W4MVC11",8)
rvana hixt xign\5\E\\N\
^TABLs("W4MVC11",9)
megz\1\E\^W4DIAP\N\
^TABLs("W4MVC11","RZD")
\
^TABLs("W4MVC3")
mihixt zenk itl rvan\rvan cew\3\rvan my\20\\E\H\VLD^W4MVC3
^TABLs("W4MVC3",1)
dxiknl hq    \4\E\^P1SETM
^TABLs("W4MVC3",2)
dxikn zenk\3\N\
^TABLs("W4MVC3",3)
rvanl hq\4\E\^P1SETM\N\
^TABLs("W4MVC3",4)
rvan xign\6\N\\N\
^TABLs("W4MVC3",5)
jix`zn\8\D\\N\
^TABLs("W4MVC3",6)
jix`z cr\8\D\\N\
^TABLs("W4MVC3","RZD")
\
^TABLs("W4MVC4")
zlaben zenka mixknpy mihixt\hixt cew\8\hixt my\20\\E\H\VLD^W4MVC4
^TABLs("W4MVC4",1)
dnfda iaxn mihixt xtqn\4\N\\Y\
^TABLs("W4MVC4",2)
jix`zn\8\D\\N\
^TABLs("W4MVC4",3)
jix`z cr\8\D\\N\
^TABLs("W4MVC4","RZD")
\
^TABLs("W4MVC5")
mipey`x mihixtl rvan\rvan 'qn\4\rvan my\18\\E\H\
^TABLs("W4MVC5",1)
rvanl hq\5\E\^P1SETM\Y\
^TABLs("W4MVC5",2)
rvan xign\7\N\\N\
^TABLs("W4MVC5",3)
iaxn zenk\7\N\\N\
^TABLs("W4MVC5",4)
jix`zn\8\D\\N\
^TABLs("W4MVC5",5)
jix`z cr\8\D\\N\
^TABLs("W4MVC5","RZD")
\
^TABLs("W4MVCAH")
" % -a dgpd-hixt " mirvan\rvan cew\3\rvan my\14\\E\H\VLD^W4MVCAH
^TABLs("W4MVCAH",1)
dxiknl hq\4\E\^P1SETM\N\
^TABLs("W4MVCAH",2)
% -a dgpd\5\N\\N\
^TABLs("W4MVCAH",3)
jix`zn\8\D\\N\
^TABLs("W4MVCAH",4)
jix`z cr\8\D\\N\
^TABLs("W4MVCAH",5)
dryn\5\T\\N\
^TABLs("W4MVCAH",6)
dry cr\5\T\\N\
^TABLs("W4MVCAH","RZD")
\
^TABLs("W4ORDPLC")
mewn zpnfd\'qn\5\oinfnd my\14\\E\H\
^TABLs("W4ORDPLC",1)
dry\5\T\\Y\
^TABLs("W4ORDPLC",2)
micreq 'qn\5\E\\Y\
^TABLs("W4ORDPLC",3)
'lh\11\E\\Y\
^TABLs("W4ORDPLC",4)
ciip 'lh\11\E\\N\
^TABLs("W4ORDPLC",5)
? mipyrn\1\B\\N\
^TABLs("W4ORDPLC",6)
? rex`\1\B\\N\
^TABLs("W4ORDPLC","RZD")
\
^TABLs("W4ORDTRT")
miletih zpnfd\ixeciq xtqn\2\oetlh\11\\E\E\
^TABLs("W4ORDTRT",1)
oinfnd my\15\H\\Y\
^TABLs("W4ORDTRT",2)
letih beq\25*2\H\\Y\
^TABLs("W4ORDTRT",3)
rvand my\15\H\\N\
^TABLs("W4ORDTRT",4)
dryn\5\T\\Y\
^TABLs("W4ORDTRT",5)
dry cr\5\T\\Y\
^TABLs("W4ORDTRT","RZD")
\
^TABLs("W4PIZUY")
gewll miievit\gewl 'qn\11\gewl my\20\\E\H\
^TABLs("W4PIZUY",1)
ievitl dnxby dpnfd 'qn\7\E\\N\
^TABLs("W4PIZUY",2)
ievit zaiq\30\H\\N\
^TABLs("W4PIZUY",3)
ievit okez\30*5\H\\Y\
^TABLs("W4PIZUY",4)
cr lirt\8\D\\Y\
^TABLs("W4PIZUY",5)
yenin jix`z\8\D\\N\
^TABLs("W4PIZUY",6)
yenin zpnfd 'qn\7\E\\N\
^TABLs("W4PIZUY","RZD")
\
^TABLs("W4POSGRT")
"ogley beq - dcnr" dlah\dcnr 'qn\3\dcnr xe`z\20\\E\H\
^TABLs("W4POSGRT",1)
ogley beq\3\N\SUGS\Y\
^TABLs("W4POSGRT","RZD")
\
^TABLs("W4POSMSK")
lwyn zecnr zlah\dcnr 'qn\2\dcnr xe`z\12
^TABLs("W4POSMSK",1)
1 ogley 'qn\3\E\^SHULH
^TABLs("W4POSMSK",2)
1  xken 'qn\5\E\^NAME
^TABLs("W4POSMSK",3)
2 ogley 'qn\3\E\^SHULH
^TABLs("W4POSMSK",4)
2 xken 'qn\5\E\^NAME
^TABLs("W4POSMSK",5)
3 ogley 'qn\3\E\^SHULH
^TABLs("W4POSMSK",6)
3 xken 'qn\5\E\^NAME
^TABLs("W4POSMSK","RZD")
\
^TABLs("W4POSULM")
"mle` - dcnr" dlah\dcnr 'qn\2\dcnr xe`z\12
^TABLs("W4POSULM",1)
mle`\1\N\^W4ULAM
^TABLs("W4POSULM","RZD")
;
^TABLs("W4PSWDRG")
ze`nqiq zlah\caer 'qn\5\caer my\16\\E\H\
^TABLs("W4PSWDRG",1)
micaer zveaw\5\E\LEVKVZ\N\
^TABLs("W4PSWDRG",2)
lirt\1\B\\N\
^TABLs("W4PSWDRG",3)
dbxc\5\E\W4DARGA\N\
^TABLs("W4PSWDRG",4)
dnqiq\8\E\
^TABLs("W4PSWDRG","RZD")
\
^TABLs("W4SIZE")
zecin zlah\xtqn\2\dcin\10
^TABLs("W4SIZE","RZD")
\
^TABLs("W4SPKACM")
xyw iyp` zlah\xtqn\10\xyw yi`\20\\E\H\
^TABLs("W4SPKACM",1)
ciwtz\16\H\\N\
^TABLs("W4SPKACM",2)
oetlh\11\E\\N\
^TABLs("W4SPKACM",3)
dgely\4\E\\N\
^TABLs("W4SPKACM",4)
ciip\11\E\\N\
^TABLs("W4SPKACM",5)
qwt\11\E\\N\
^TABLs("W4SPKACM",6)
liin i`\40\E\\N\
^TABLs("W4SPKACM","RZD")
\
^TABLs("W4TBMNL")
mildpn zlah\ldpn 'qn\5\ldpn my\20\\E\H\
^TABLs("W4TBMNL",1)
oetlh\11\E\\N\
^TABLs("W4TBMNL",2)
l"`ec\40\E\\N\
^TABLs("W4TBMNL","RZD")
\
^TABLs("W4TBSLR")
\\\\\\\\
^TABLs("W4TBSLR","RZD")
\
^TABLs("W4TIPAH")
mitih ifeg` zlah\ixeciq xtqn\2\tih %\5\\E\E\
^TABLs("W4TIPAH","RZD")
\
^TABLs("dev")
mipwzd zlah\owzd 'qn\15\owzd my\20
^TABLs("dev",1)
dxrd\30\H\
^TABLs("dev","RZD")
\
^TABLs("word")
mixeviw oelin\xeviw cew\3\okez\16
^TABLs("word","RZD")
\
^UCI0
mumps.gld
^UCI0(1)
/home/www2order/app/mumps/sfactory/sfactory.gld
^UCI0(2)
/home/www2order/app/mumps/mumps.gld
^UCI0(4700)
/home/www2order/app/mumps/meatntrg/meatntrg.gld
^UCI0(4701)
/home/www2order/app/mumps/meatntta/meatntta.gld
^UCI0(4702)
/home/www2order/app/mumps/raksushi/raksushi.gld
^UCI0(4704)
/home/www2order/app/mumps/meatntcc/meatntcc.gld
^UCI0(4800)
/home/www2order/app/mumps/vafelbs/vafelbs.gld
^UCI0(6000)
/home/www2order/app/mumps/bali/bali.gld
^UCI0(7001)
/home/www2order/app/mumps/shimlev/shimlev.gld
^UCI0(7002)
/home/www2order/app/mumps/shimalon/shimalon.gld
^UCI0(8000)
/home/www2order/app/mumps/tzahibbtm/tzahibbtm.gld
^UCI0(8001)
/home/www2order/app/mumps/tzahibhln/tzahibhln.gld
^UCI0(8002)
/home/www2order/app/mumps/tzahibta/tzahibta.gld
^UCI0(8004)
/home/www2order/app/mumps/tzahicc/tzahicc.gld
^UCI0(9000)
/home/www2order/app/mumps/jhnunima/jhnunima.gld
^UCI0(10010)
/home/www2order/app/mumps/kafemuzeon/kafemuzeon.gld
^UCI0(10011)
/home/www2order/app/mumps/aninamuz/aninamuz.gld
^UCI0(10012)
/home/www2order/app/mumps/aninashuk/aninashuk.gld
^UCI0(10013)
/home/www2order/app/mumps/rtsrdrorim/rtsrdrorim.gld
^UCI0(10014)
/home/www2order/app/mumps/rotisery/rotisery.gld
^UCI0(10015)
/home/www2order/app/mumps/yashkacc/yashkacc.gld
^UCI0(10016)
/home/www2order/app/mumps/yashkadz/yashkadz.gld
^UCI0(10017)
/home/www2order/app/mumps/yashkanb/yashkanb.gld
^UCI0(10018)
/home/www2order/app/mumps/rolleat/rolleat.gld
^UCI0(10019)
/home/www2order/app/mumps/yashkatagor/yashkatagor.gld
^UCI0(10020)
/home/www2order/app/mumps/dedagvt/dedagvt.gld
^UCI0(10021)
/home/www2order/app/mumps/hachapuribtm/hachapuribtm.gld
^UCI0(10022)
/home/www2order/app/mumps/pizazaza/pizazaza.gld
^UCI0(10023)
/home/www2order/app/mumps/adika/adika.gld
^UCI0(10024)
/home/www2order/app/mumps/harvbveg/harvbveg.gld
^UCI0(10025)
/home/www2order/app/mumps/kioshi/kioshi.gld
^UCI0(10026)
/home/www2order/app/mumps/meat2meet/meat2meet.gld
^UCI0(10027)
/home/www2order/app/mumps/shvteumim/shvteumim.gld
^UCI0(10028)
/home/www2order/app/mumps/pizabulanet/pizabulanet.gld
^UCI0(10029)
/home/www2order/app/mumps/maadgld/maadgld.gld
^UCI0(10030)
/home/www2order/app/mumps/vafelshzn/vafelshzn.gld
^UCI0(10031)
/home/www2order/app/mumps/vafelmudein/vafelmudein.gld
^UCI0(10034)
/home/www2order/app/mumps/tasbih/tasbih.gld
^UCI0(10035)
/home/www2order/app/mumps/valero/valero.gld
^UCI0(10037)
/home/www2order/app/mumps/pizajunior/pizajunior.gld
^UCI0(10040)
/home/www2order/app/mumps/vafelmain/vafelmain.gld
^UCI0(10041)
/home/www2order/app/mumps/vafelby/vafelby.gld
^UCI0(10045)
/home/www2order/app/mumps/kura/kura.gld
^UCI0(10050)
/home/www2order/app/mumps/shukeda/shukeda.gld
^UCI0(10051)
/home/www2order/app/mumps/bibiqu/bibiqu.gld
^UCI0(10060)
/home/www2order/app/mumps/pina3cc/pina3cc.gld
^UCI0(10061)
/home/www2order/app/mumps/pinat3ta/pinat3ta.gld
^UCI0(10062)
/home/www2order/app/mumps/pinat3rshn/pinat3rshn.gld
^UCI0(10063)
/home/www2order/app/mumps/pinat3brzl/pinat3brzl.gld
^UCI0(10065)
/home/www2order/app/mumps/shv4tamim/shv4tamim.gld
^UCI0(10066)
/home/www2order/app/mumps/shv4tamimrs/shv4tamimrs.gld
^UCI0(10067)
/home/www2order/app/mumps/shv4tmrsrt/shv4tmrsrt.gld
^UCI0(10075)
/home/www2order/app/mumps/taigerlrh/taigerlrh.gld
^UCI0(10076)
/home/www2order/app/mumps/taigerlsrn/taigerlsrn.gld
^UCI0(10080)
/home/www2order/app/mumps/zahikebabcha/zahikebabcha.gld
^UCI0(10092)
/home/www2order/app/mumps/pastamiavl/pastamiavl.gld
^UCI0(10095)
/home/www2order/app/mumps/grandkafe/grandkafe.gld
^UCI0(10100)
/home/www2order/app/mumps/deqween/deqween.gld
^UCI0(10101)
/home/www2order/app/mumps/amoramia/amoramia.gld
^UCI0(10200)
/home/www2order/app/mumps/papajonsdz/papajonsdz.gld
^UCI0(10201)
/home/www2order/app/mumps/papajonsrs/papajonsrs.gld
^UCI0(10202)
/home/www2order/app/mumps/papajonsrg/papajonsrg.gld
^UCI0(10203)
/home/www2order/app/mumps/papajonsrh/papajonsrh.gld
^UCI0(10204)
/home/www2order/app/mumps/papajonshf/papajonshf.gld
^UCI0(10205)
/home/www2order/app/mumps/papajonsad/papajonsad.gld
^UCI0(10222)
/home/www2order/app/mumps/papajm/papajm.gld
^UCI0(11006)
/home/www2order/app/mumps/chopchop/chopchop.gld
^UCI0(20001)
/home/www2order/app/mumps/iposokinava/iposokinava.gld
^UCI0(20005)
/home/www2order/app/mumps/iposokinavadlv/iposokinavadlv.gld
^UCI0(20006)
/home/www2order/app/mumps/iposbbqtakses/iposbbqtakses.gld
^UCI0(20007)
/home/www2order/app/mumps/iposmatilda/iposmatilda.gld
^UCI0(20008)
/home/www2order/app/mumps/iposturitlv/iposturitlv.gld
^UCI0(20009)
/home/www2order/app/mumps/ipossuperfood/ipossuperfood.gld
^UCI0(20010)
/home/www2order/app/mumps/iposbirloga/iposbirloga.gld
^UCI0(20011)
/home/www2order/app/mumps/ipostalbagel/ipostalbagel.gld
^UCI0(30001)
/home/www2order/app/mumps/luchhd/luchhd.gld
^UCI0(30002)
/home/www2order/app/mumps/luchmmla/luchmmla.gld
^UCI0(30003)
/home/www2order/app/mumps/luchmdiin/luchmdiin.gld
^UCI0(30004)
/home/www2order/app/mumps/luchjoe/luchjoe.gld
^UCI0(30010)
/home/www2order/app/mumps/aiavafel/aiavafel.gld
^UCI0(30015)
/home/www2order/app/mumps/burersroom/burersroom.gld
^UCI0(40000)
/home/www2order/app/mumps/moonpnsk/moonpnsk.gld
^UCI0(40010)
/home/www2order/app/mumps/bigmama/bigmama.gld
^UCI0(72060)
/home/www2order/app/mumps/oren72060/oren72060.gld
^UCI0(72064)
/home/www2order/app/mumps/oren72064/oren72064.gld
^UCI0(72065)
/home/www2order/app/mumps/oren72065/oren72065.gld
^UCI0(72066)
/home/www2order/app/mumps/oren72066/oren72066.gld
^UCI0(72067)
/home/www2order/app/mumps/oren72067/oren72067.gld
^UCI0(72091)
/home/www2order/app/mumps/leontost/leontost.gld
^UCI0(72098)
/home/www2order/app/mumps/oren72098/oren72098.gld
^UCI0(72103)
/home/www2order/app/mumps/oren72103/oren72103.gld
^UCI0(99900)
/home/www2order/app/mumps/iposdemo/iposdemo.gld
^UCI0(99999)
/home/www2order/app/mumps/demo/demo.gld
^UCI0("KL")
/usr/local/mumps/mumps.gld
^UCI0("MGC")
/usr/local/mumps/client.gld
^UCI0("MGG")
/usr/local/mumps/mumps.gld
^UCI0("MGR")
/usr/local/mumps
^UCI0("MLG")
/usr/local/mumps/mly/mly.gld
^UCI0("MLR")
/usr/local/mumps/mly /usr/local/mumps
^W1DICT

^W1DICT("*CODEWITHOUTMAM","E")
Codes without VAT are marked with *
^W1DICT("*CODEWITHOUTMAM","H")
* - a mipneqn n"rn `ll micew
^W1DICT("12MONTHAGO","E")
12 Previous Months
^W1DICT("12MONTHAGO","H")
12 mincew miyceg
^W1DICT("24HR","E")
24 hours
^W1DICT("24HR","H")
edfe zery 24
^W1DICT("3MONTHAGO","E")
3 Previous Months
^W1DICT("3MONTHAGO","H")
3 mincew miyceg
^W1DICT("6MONTHAGO","E")
6 Previous Months
^W1DICT("6MONTHAGO","H")
6 mincew miyceg
^W1DICT("ABBREVTABLE","E")
Abbrev. table
^W1DICT("ABBREVTABLE","H")
mixeviw oelin
^W1DICT("ABC","E")
Alphabet
^W1DICT("ABC","H")
a-`
^W1DICT("ABCSORT","E")
Alphabet sort
^W1DICT("ABCSORT","H")
a - ` itl oiin
^W1DICT("ABOUTCHANGESAY2KITCHEN","E")
Please inform a kitchen abote chages of printed product
^W1DICT("ABOUTCHANGESAY2KITCHEN","H")
dt lra gahnd z` ricedl `p qtcen hixta miiepiy lr 
^W1DICT("ABOUTPRODUCT","E")
About product
^W1DICT("ABOUTPRODUCT","H")
xvend lr
^W1DICT("ABOUTPRODUCT","R")
O programme
^W1DICT("ABOUTUS","E")
About us
^W1DICT("ABOUTUS","H")
zece`
^W1DICT("ABOUTUS","R")
O nas
^W1DICT("ABSENCECAUSE","E")
Reason for absence
^W1DICT("ABSENCECAUSE","H")
zexcrd zaiq
^W1DICT("ABSENCECAUSES","E")
Reasons for absence
^W1DICT("ABSENCECAUSES","H")
zexcrd zeaiq
^W1DICT("ABSENCEPERCAUSES","E")
Absence of work according to reasons
^W1DICT("ABSENCEPERCAUSES","H")
zeaiq itl dcearn zexcrd
^W1DICT("ACCESSORIESTABLE","E")
Table of accessories
^W1DICT("ACCESSORIESTABLE","H")
qixeqqw` ly dlah
^W1DICT("ACCOUNT","E")
Account
^W1DICT("ACCOUNT","H")
oeayg
^W1DICT("ACCOUNT","R")
S!4et
^W1DICT("ACCOUNTMG","E")
Account
^W1DICT("ACCOUNTMG","H")
g"pda oeayg
^W1DICT("ACCOUNTMG","R")
Nom. s!4eta
^W1DICT("ACCOUNTNOTPRINTED","E")
Bill not printed
^W1DICT("ACCOUNTNOTPRINTED","H")
qtced `l oeayg
^W1DICT("ACCOUNTNOTPRINTED","R")
S!4et ne raspe!4atan
^W1DICT("ACCOUNTPRINTED","E")
Bill printed
^W1DICT("ACCOUNTPRINTED","H")
qtced oeayg
^W1DICT("ACCOUNTPRINTED","R")
S!4et raspe!4atan
^W1DICT("ACCOUNTPRINTERSDEFINITION","E")
POS setup and bill printers assignment
^W1DICT("ACCOUNTPRINTERSDEFINITION","H")
dcear zecnr zxcbd
^W1DICT("ACCOUNTPRINTERSDEFINITION","R")
Parametry printerov s!4etov
^W1DICT("ACCUMULATEBONUS","E")
Accumulation
^W1DICT("ACCUMULATEBONUS","H")
dxiav
^W1DICT("ACKCREDIT","E")
Credit approval
^W1DICT("ACKCREDIT","H")
gewll dtwd xy`
^W1DICT("ACKTEMPCREDIT","E")
Temporary credit acknoledge
^W1DICT("ACKTEMPCREDIT","H")
zipnf dtwd gewll xy`
^W1DICT("ACNT","E")
Account
^W1DICT("ACNT","H")
g
^W1DICT("ACTION","E")
Action
^W1DICT("ACTION","H")
dlert
^W1DICT("ACTIONCANCELLED","E")
Action canceled
^W1DICT("ACTIONCANCELLED","H")
dlhea dlert
^W1DICT("ACTIONKIND","E")
Action Type
^W1DICT("ACTIONKIND","H")
dlert beq
^W1DICT("ACTIVE","E")
Active
^W1DICT("ACTIVE","H")
lirt
^W1DICT("ACTIVEUPTO","E")
Active until
^W1DICT("ACTIVEUPTO","H")
cr lirt
^W1DICT("ACTMENU","E")
Active menu
^W1DICT("ACTMENU","H")
lirt hixtz
^W1DICT("ACTORDS","E")
Active orders
^W1DICT("ACTORDS","H")
zelirt zepnfd
^W1DICT("ADD","E")
Added
^W1DICT("ADD","H")
sqed
^W1DICT("ADDAT","E")
To
^W1DICT("ADDAT","H")
cr
^W1DICT("ADDAT","R")
do
^W1DICT("ADDATE","E")
To Date
^W1DICT("ADDATE","H")
jix`z cr
^W1DICT("ADDATE","R")
do daty
^W1DICT("ADDCOMPENSATION","E")
Please add a refund (source order $ 1)
^W1DICT("ADDCOMPENSATION","H")
: ( $1 xewn zpnfd ) mievit dpnfdl siqedl `p
^W1DICT("ADDCONTACTMANS","E")
More contacts
^W1DICT("ADDCONTACTMANS","H")
mitqep xyw iyp`
^W1DICT("ADDDLVPAY","E")
Postage of drivers
^W1DICT("ADDDLVPAY","H")
mibdp ly gelyn inc
^W1DICT("ADDEVICE","E")
Add. device
^W1DICT("ADDEVICE","H")
sxevn xfr
^W1DICT("ADDEVICE","R")
komplektu!u!sie
^W1DICT("ADDFIRSTLINE2TABLE","E")
Empty Table
^W1DICT("ADDFIRSTLINE2TABLE","H")
dpy`x dxey siqedl m`d . dwix dlah
^W1DICT("ADDFIRSTLINE2TABLE","R")
Tablica pusta! Dob-t!m perv. stroku ?
^W1DICT("ADDITEMS2LUNCH","E")
Collection of items for a meal
^W1DICT("ADDITEMS2LUNCH","H")
dgex`l mihixt sqe`
^W1DICT("ADDITIONPRICE","E")
Addition price
^W1DICT("ADDITIONPRICE","H")
ztqez xign
^W1DICT("ADDITIONS","E")
Addons
^W1DICT("ADDITIONS","H")
zetqez
^W1DICT("ADDITIONS","R")
Dobavki
^W1DICT("ADDITIONSTO","E")
Product addons
^W1DICT("ADDITIONSTO","H")
hixtl zetqez
^W1DICT("ADDITIONSTO","R")
Dobavki k porcii
^W1DICT("ADDMAIL","E")
Add
^W1DICT("ADDMAIL","H")
sqed
^W1DICT("ADDPAYMENTS","E")
Additional payments
^W1DICT("ADDPAYMENTS","H")
mitqep minelyz
^W1DICT("ADDPOINT2PLGN","E")
Add points to the area
^W1DICT("ADDPOINT2PLGN","H")
xef`l zecewp sqed
^W1DICT("ADDPRICE","E")
Addon price
^W1DICT("ADDPRICE","H")
xign ztqez
^W1DICT("ADDPRICE","R")
Dob. cena
^W1DICT("ADDR","E")
Address
^W1DICT("ADDR","H")
zaezk
^W1DICT("ADDR","R")
Adres
^W1DICT("ADDRESS","E")
Address
^W1DICT("ADDRESS","H")
zaezk
^W1DICT("ADDRESS","R")
Adres
^W1DICT("ADDSCOMMENTSTABLE","E")
Table Item - Comments (for additions only)
^W1DICT("ADDSCOMMENTSTABLE","H")
(cala zetqezl) zexrd - hixt dlah
^W1DICT("ADDSCOMMENTSTABLE","R")
Tablica "Porci!a-prime!4ani!a"
^W1DICT("ADDSORDERING","E")
Adds arrangement
^W1DICT("ADDSORDERING","H")
zetqez xeciq
^W1DICT("ADDSPARTITIONCOLORDEFINITION","E")
Adds part. def-n
^W1DICT("ADDSPARTITIONCOLORDEFINITION","H")
zetqez wlgl mirav zxcbd
^W1DICT("ADDSPARTITIONCOLORDEFINITION","R")
Cveta dl!a razdela "Dobavki"
^W1DICT("ADDSTREETNOTFOUND","E")
Do add street to list ?
^W1DICT("ADDSTREETNOTFOUND","H")
? dniyxl aegx siqedl m`d
^W1DICT("ADDWORKERS2BIO","E")
Adding employees to the biometric table
^W1DICT("ADDWORKERS2BIO","H")
ixhne`ia zlahl micaer ztqed
^W1DICT("ADHOME","E")
Until number
^W1DICT("ADHOME","H")
'qn cr
^W1DICT("ADHOME","R")
do nom.
^W1DICT("ADLKH","E")
To Client
^W1DICT("ADLKH","H")
gewl cr
^W1DICT("ADLKH","R")
do nom. klienta
^W1DICT("ADMIN","E")
System administrator
^W1DICT("ADMIN","H")
zkxrn ldpn
^W1DICT("ADMINPARAMETERS","E")
Admin parameters
^W1DICT("ADMINPARAMETERS","H")
zkxrn ldpn ly mixhnxt
^W1DICT("ADMINPSW","E")
Admin password
^W1DICT("ADMINPSW","H")
zkxrn ldpn ly dnqiq
^W1DICT("ADPAR","E")
Up to an item
^W1DICT("ADPAR","H")
hixt cr
^W1DICT("ADRSORT","E")
Sort by address
^W1DICT("ADRSORT","H")
zaezk itl oein
^W1DICT("ADSHAA","E")
To Hour
^W1DICT("ADSHAA","H")
dry cr
^W1DICT("ADSHAA","R")
do
^W1DICT("ADSUGL","E")
Up to a group of customers
^W1DICT("ADSUGL","H")
zegewl zveaw cr
^W1DICT("ADVANCEDSEARCH","E")
Advanced Search
^W1DICT("ADVANCEDSEARCH","H")
mcwzn yetig
^W1DICT("ADVANCEDSEARCH","R")
Ras!6irenny!i poisk
^W1DICT("ADVANCEPAYMENT","E")
Prepay
^W1DICT("ADVANCEPAYMENT","H")
y`xn melyz
^W1DICT("ADVCUSTSEARCH","E")
Extended client search
^W1DICT("ADVCUSTSEARCH","H")
agxen gewl yetig
^W1DICT("AEX","E")
Am.Exp.
^W1DICT("AEX","H")
qxtqw` .n`
^W1DICT("AFTERPRINTNOCHANGE","E")
After printing it will not be possible to change the document! Are you sure
^W1DICT("AFTERPRINTNOCHANGE","H")
geha (d)z` ! jnqn z` zepyl zexyt` didi `l dqtcd ixg`
^W1DICT("AFTERSLASHPAYMENTSNUMBERONLY","E")
After "/" you can only type a number of payments
^W1DICT("AFTERSLASHPAYMENTSNUMBERONLY","H")
minelyz xtqn wx cilwdl ozip "/" ixg` 
^W1DICT("AFTERTAX","E")
VAT Included
^W1DICT("AFTERTAX","H")
n"rn llek
^W1DICT("AFTERTAX","R")
vkl!u!4a!a nalog
^W1DICT("AFTERZONLY","E")
Invoice can be after Z production
^W1DICT("AFTERZONLY","H")
Z zwtd ixg` zipeayg `ivedl ozip $1 jix`za
^W1DICT("AFTERZONLY","R")
S!4et mojet byt!m raspe!4atan posle zakryti!a kassy
^W1DICT("AGE16","E")
Youth under the age of 16 are not allowed to work.
^W1DICT("AGE16","H")
! cearl xeq` 16 libn zegt xrepl
^W1DICT("AGENIGHT","E")
Youth under the age of 18 are not permitted to work at night.
^W1DICT("AGENIGHT","H")
dlil zerya cearl dyxen `l 18 lib cr xrep
^W1DICT("AGENIGNT","E")
Youth are not allowed to work at night.
^W1DICT("AGENIGNT","H")
dlila cearl xeq` xrepl
^W1DICT("AGESTDY","E")
Youth are not allowed to work on Saturdays.
^W1DICT("AGESTDY","H")
zezaya cearl xeq` xrepl
^W1DICT("AGETOOSMALL","E")
Too young age
^W1DICT("AGETOOSMALL","H")
icin ohw lib
^W1DICT("AGREERCVINF","E")
I'd like to receive updates on the latest offers and benefits
^W1DICT("AGREERCVINF","H")
zeahd mipekcr , mirvan lr rcin lawl oiipern ip`
^W1DICT("AGREERCVINF","R")
!a zainteresovan v polu!4. inf-cii na m!e!il 
^W1DICT("AHMAM","E")
VAT percentage
^W1DICT("AHMAM","H")
n"rn feg`
^W1DICT("AHNIKMAS","E")
% Withholding tax
^W1DICT("AHNIKMAS","H")
xewn qn iekip %
^W1DICT("AHPENS","E")
Percent of pension
^W1DICT("AHPENS","H")
diqpt feg`
^W1DICT("AHPENS","R")
% ot!4-ni!i na pensi!u
^W1DICT("AIQN","E")
Change the amount of meals
^W1DICT("AIQN","H")
zegex` zenk dpy
^W1DICT("AIRLINE","E")
Airline
^W1DICT("AIRLINE","H")
xie` ew
^W1DICT("AIRLINE","R")
vozd. lini!a
^W1DICT("ALIGN","E")
Location
^W1DICT("ALIGN","H")
mewin
^W1DICT("ALL","E")
Everyone
^W1DICT("ALL","H")
mlek
^W1DICT("ALL","R")
Vse
^W1DICT("ALLBRANCH","E")
All branches
^W1DICT("ALLBRANCH","H")
mitipqd lk
^W1DICT("ALLCHECKS","E")
All the checks
^W1DICT("ALLCHECKS","H")
miwiyd lk
^W1DICT("ALLCITIES","E")
All cities
^W1DICT("ALLCITIES","H")
mixrd lk
^W1DICT("ALLCITIES","R")
Vse goroda
^W1DICT("ALLCOMPANIES","E")
All companies
^W1DICT("ALLCOMPANIES","H")
zexagd lk
^W1DICT("ALLCOMPANIES","R")
Vse kompanii
^W1DICT("ALLCOURIERS","E")
All couriers
^W1DICT("ALLCOURIERS","H")
migilyd lk
^W1DICT("ALLCUSTOMERS","E")
All clients
^W1DICT("ALLCUSTOMERS","H")
zegewld lk
^W1DICT("ALLCUSTOMERS","R")
Vse klienty
^W1DICT("ALLDAYS","E")
All days
^W1DICT("ALLDAYS","H")
minid lk
^W1DICT("ALLDAYS","R")
Vse dni
^W1DICT("ALLDEPS","E")
All departments
^W1DICT("ALLDEPS","H")
zewlgnd lk
^W1DICT("ALLDLVORDS","E")
All shipping orders
^W1DICT("ALLDLVORDS","H")
migelyn ly zepnfd lk 
^W1DICT("ALLDOCS","E")
All documents
^W1DICT("ALLDOCS","H")
miknqnd lk
^W1DICT("ALLDOCUMENTS","E")
All documents
^W1DICT("ALLDOCUMENTS","H")
miknqnd lk 
^W1DICT("ALLGROUPS","E")
All groups
^W1DICT("ALLGROUPS","H")
zeveawd lk
^W1DICT("ALLGROUPS","R")
Vse gruppy
^W1DICT("ALLINVOICES","E")
All Invoices
^W1DICT("ALLINVOICES","H")
zeipeaygd lk
^W1DICT("ALLINVOICES","R")
Vse nakladnye
^W1DICT("ALLIT","E")
All
^W1DICT("ALLIT","H")
lkd
^W1DICT("ALLITEMS","E")
All Products
^W1DICT("ALLITEMS","H")
mihixtd lk
^W1DICT("ALLITEMS","R")
Vse bl!uda
^W1DICT("ALLKAV","E")
---------------All------------------
^W1DICT("ALLKAV","H")
---------------- mlek ----------------
^W1DICT("ALLKAV","R")
vse
^W1DICT("ALLKINDOFPAYMENTS","E")
All  payment types
^W1DICT("ALLKINDOFPAYMENTS","H")
melyz ibeq lk
^W1DICT("ALLKINDOFPAYMENTS","R")
Vse vidy plateje!i
^W1DICT("ALLKINDS","E")
All types
^W1DICT("ALLKINDS","H")
mibeqd lk
^W1DICT("ALLKINDS","R")
Vse vidy
^W1DICT("ALLKINDSOFKASHRUT","E")
All  kosher certificates
^W1DICT("ALLKINDSOFKASHRUT","H")
zexykd ibeq lk
^W1DICT("ALLKINDSOFKASHRUT","R")
Vse vidy ka!6ruta
^W1DICT("ALLKITCHENKINDS","E")
All  types of kytchen
^W1DICT("ALLKITCHENKINDS","H")
gahnd ibeq lk
^W1DICT("ALLKITCHENKINDS","R")
Vse vidy kuhni
^W1DICT("ALLORDERS","E")
All  orders
^W1DICT("ALLORDERS","H")
zepnfdd lk
^W1DICT("ALLORDERS","R")
Vse zakazy
^W1DICT("ALLPARAMETERSLIST","E")
Unified parameter table
^W1DICT("ALLPARAMETERSLIST","H")
zcge`n mixhnxt zlah
^W1DICT("ALLPAYDATAENCRYPTED","E")
All payment's transfered in encrypted way.
^W1DICT("ALLPAYDATAENCRYPTED","H")
zptven dxeva zxyl mixaren melyzd ipezp lk
^W1DICT("ALLPAYDATAENCRYPTED","R")
Vse platejnye dannye peresyla!uts!a na server v za!6ifrovannom vide
^W1DICT("ALLPLACES","E")
All sites
^W1DICT("ALLPLACES","H")
mixz`d lk
^W1DICT("ALLPRICES","E")
All prices
^W1DICT("ALLPRICES","H")
mixignd lk
^W1DICT("ALLPRICES","R")
Vse ceny
^W1DICT("ALLPRN","E")
All printers
^W1DICT("ALLPRN","H")
zeqtcnd lk
^W1DICT("ALLPRN","R")
Vse printery
^W1DICT("ALLRECEIVERS","E")
All recipients
^W1DICT("ALLRECEIVERS","H")
milawnd lk
^W1DICT("ALLREGIONS","E")
All areas
^W1DICT("ALLREGIONS","H")
mixef`d lk
^W1DICT("ALLREGIONS","R")
Vse ra!iony
^W1DICT("ALLREPORTS","E")
All reports
^W1DICT("ALLREPORTS","H")
zegecd lk
^W1DICT("ALLREPORTS","R")
Vse ot!4ety
^W1DICT("ALLRESTAURANTS","E")
All restaurants
^W1DICT("ALLRESTAURANTS","H")
zecrqnd lk
^W1DICT("ALLRESTAURANTS","R")
Vse restorany
^W1DICT("ALLSALES","E")
All sales
^W1DICT("ALLSALES","H")
zexiknd lk
^W1DICT("ALLSUMSAPPROXIMATE","E")
Attention! Number of products in order specified in packages ! Because weight of package is approximate, price of package and amount to be paid is approximate too !
^W1DICT("ALLTABLEGROUPS","E")
All types of tables
^W1DICT("ALLTABLEGROUPS","H")
zepgley ibeq lk
^W1DICT("ALLTABLES","E")
All tables
^W1DICT("ALLTABLES","H")
'gleyd lk
^W1DICT("ALLTABLES","R")
Vse stoly
^W1DICT("ALLTIMEITEMS","E")
All temporery active Products
^W1DICT("ALLTIMEITEMS","H")
onfd geeha mi`vnpy mihixtd lk
^W1DICT("ALLTIMEITEMS","R")
Vse bl!uda v !etom promej. vremeni
^W1DICT("ALLULAMS","E")
All the halls
^W1DICT("ALLULAMS","H")
zenle`d lk 
^W1DICT("ALLWORKERS","E")
All employees
^W1DICT("ALLWORKERS","H")
micaerd lk
^W1DICT("ALREADYDELETED","E")
An Order Already canceled  .Number of cancel is $1
^W1DICT("ALREADYDELETED","H")
 $1 `ed lehia zpnfd 'qn <BR> dlhea xak
^W1DICT("ALREADYDELETED","R")
Zakaz uje byl udalen. Nomer 
^W1DICT("ALREADYOPENED","E")
An application already open
^W1DICT("ALREADYOPENED","H")
gezt xak
^W1DICT("ALREADYOPENED","R")
Uje otkryt
^W1DICT("ALUT","E")
Cost
^W1DICT("ALUT","H")
zelr
^W1DICT("ALWAYS","E")
Always
^W1DICT("ALWAYS","H")
cinz
^W1DICT("ALWAYSNOTPRC","E")
Always without prices
^W1DICT("ALWAYSNOTPRC","H")
mixign ila cinz
^W1DICT("ALWAYSPRC","E")
Always with prices
^W1DICT("ALWAYSPRC","H")
mixign mr cinz
^W1DICT("AMALA","E")
Commissions(%)
^W1DICT("AMALA","H")
(%) zelnr
^W1DICT("AMALACA","E")
Credit Fees(%)
^W1DICT("AMALACA","H")
(%) i`xy` zelnr
^W1DICT("AMOUNT","E")
Amount
^W1DICT("APP2RECEIPTNMB","E")
Note for tax
^W1DICT("APP2RECEIPTNMB","H")
'qn dlawl gtq
^W1DICT("APP2RECEIPTNMB","R")
Prilojenie k kvitancii nom.
^W1DICT("AREYOUSHURE","E")
Are you sure
^W1DICT("AREYOUSHURE","H")
 geha dz`
^W1DICT("AREYOUSHURE","R")
Vy uvereny
^W1DICT("AREYOUSHUREDELMENU","E")
Are you sure want to delete menu
^W1DICT("AREYOUSHUREDELMENU","H")
hitxz lhal dvexy geha dz`
^W1DICT("AREYOUSURE","E")
Are you sure ?
^W1DICT("AREYOUSURE","H")
? geha dz`
^W1DICT("AREYOUSURE","R")
Vy uvereny?
^W1DICT("AREYOUSURE2DELETEITEMSTREE","E")
Are you sure want to delete product tree $1 $2
^W1DICT("AREYOUSURE2DELETEITEMSTREE","H")
$2 $1 xven ur lhal dvexy geha
^W1DICT("AREYOUSURE?","E")
Are are sure ?
^W1DICT("AREYOUSURE?","H")
 ? geha dz`
^W1DICT("AREYOUSURECHANGE2ORDER","E")
Are you sure (e) that you want to make a bid for an active order?
^W1DICT("AREYOUSURECHANGE2ORDER","H")
? dlirt dpnfdl xign zrvd jetdl dvexy (d)geha (d)z`
^W1DICT("AREYOUSURECHOICEORDER","E")
Are You surre copy order $1 content into a current order
^W1DICT("AREYOUSURECHOICEORDER","H")
? zigkep dpnfd jezl $1 dpnfd okez wizrdl
^W1DICT("AREYOUSUREDELARCH","E")
Are you sure want to delete painting hall $1 from archives ?
^W1DICT("AREYOUSUREDELARCH","H")
 ? '$1' mle` xeiv oeikx`n lhal dvexy geha
^W1DICT("AREYOUSUREDELETELEVEL","E")
Sure you want to cancel this layer?
^W1DICT("AREYOUSUREDELETELEVEL","H")
 ? z`f daky lhal dvexy geha
^W1DICT("AREYOUSUREDELMAIL","E")
Are you sure want to delete address $1
^W1DICT("AREYOUSUREDELMAIL","H")
$1 zaezk wegnl dvexy (d)geha (d)z`
^W1DICT("AREYOUSUREDELNOTES","E")
Do you want to cancel all comments?
^W1DICT("AREYOUSUREDELNOTES","H")
? zexrdd lk lhal dvexy (d)geza (d)z`
^W1DICT("AREYOUSUREPRINTALLORDSTOMORROW","E")
You're sure you want to print all orders for tomorrow ?
^W1DICT("AREYOUSUREPRINTALLORDSTOMORROW","H")
? xgnl zepnfdd lk qitcdl dvexy geha dz`
^W1DICT("AREYOUSURERCVIT4WEB","E")
Are You sure, you want to receive a menu from a website (delete the old menu
^W1DICT("AREYOUSURERCVIT4WEB","H")
( ! wgnz oyid hixtz ) xz`n hixtz lawl dvexy geza (d)z`
^W1DICT("AREYOUSURERESTOREORDSTATUS","E")
Are You sure wans restore order to status "not reay" ?
^W1DICT("AREYOUSURERESTOREORDSTATUS","H")
? "dpken `l" avnl dpnfd ly qehhq xifgdl dvexy (d)geza (d)z`
^W1DICT("AREYOUSURESENDITEMS2WEB","E")
Are you sure want to send items to site
^W1DICT("AREYOUSURESENDITEMS2WEB","H")
? xz`l mihixt xcyl dvexy (d)geha (d)z`
^W1DICT("AREYOUSURESTATUSNOTREADY","E")
Are You sure wans restore order to status "not ready" ?
^W1DICT("AREYOUSURESTATUSNOTREADY","H")
? "dpken `l" avnl dpnfd xiardl dvex (d)geha (d)z`
^W1DICT("AREYOUSURESTATUSREADY","E")
Are You sure wans restore order to status "ready" ?
^W1DICT("AREYOUSURESTATUSREADY","H")
? "dpken" avnl dpnfd xiardl dvex (d)geha (d)z`
^W1DICT("AREYOUSURETODELETEADDS2ITEM","E")
Are you sure want to delete adds to $1 $2
^W1DICT("AREYOUSURETODELETEADDS2ITEM","H")
 $2 $1 l zetqez lhal dvexy geha
^W1DICT("AREYOUSURETODELETEADDS2ITEM","R")
Uvereny !4to hotite udalit!m dobavku k $1 $2
^W1DICT("AREYOUSURETODELETELUNCH","E")
Are you sure want to delete the deal $1 $2
^W1DICT("AREYOUSURETODELETELUNCH","H")
 $2 $1 dgex` lhal dvexy geha
^W1DICT("AREYOUSURETODELETELUNCH","R")
Uvereny !4to hotite udalit!m kompl. obed  $1 $2
^W1DICT("AREYOUSUREWANT2DELLINK2DEAL","E")
Are you sure want to delete link to deal $1
^W1DICT("AREYOUSUREWANT2DELLINK2DEAL","H")
$1 dwqrl xyw lhal dvexy geha (d)z`
^W1DICT("AREYOUSUREWANTDELDEAL","E")
Are you sure want to delete the deal $1
^W1DICT("AREYOUSUREWANTDELDEAL","H")
 $1 dwqr lhal dvexy geha
^W1DICT("AREYOUSUREWANTDELDOC","E")
Are you sure want to delete the document
^W1DICT("AREYOUSUREWANTDELDOC","H")
? jnqn lhal dvexy (d)geha (d)z`
^W1DICT("AREYOUSUREWANTDELPAYMENT?","E")
Are you sure you want to cancel a payment?
^W1DICT("AREYOUSUREWANTDELPAYMENT?","H")
? melyz lhal dvexy geha (d)z`
^W1DICT("AREYOUSUREWANTDELWORKER","E")
Are You want to cancel an employee.?
^W1DICT("AREYOUSUREWANTDELWORKER","H")
? $1 caer lhal dvex (d)geza (d)z`
^W1DICT("AREYOUSUREWANTPRINT2DISPATHER","E")
Are You want to print a document for shipment.?
^W1DICT("AREYOUSUREWANTPRINT2DISPATHER","H")
? glynl jnqn qitcdl dvex geza (d)z`
^W1DICT("AREYOUWANTDELORDERFROMSHOW","E")
Download $1 order from show ?
^W1DICT("AREYOUWANTDELORDERFROMSHOW","H")
? dbvdn $1 dpnfd cixedl
^W1DICT("ARMINVOICERECEIPT","E")
Invoice / Receipt ( text free )
^W1DICT("ARMINVOICERECEIPT","H")
( iyteg hqwh ) zexiy dlaw/qn zipeayg
^W1DICT("ARMINVOICERECEIPT","R")
Nakladna!a s proizv.tekstom
^W1DICT("ARMINVOICES","E")
Invoice ( text free )
^W1DICT("ARMINVOICES","H")
zeipci zeipeayg
^W1DICT("ARMINVOICES","R")
Neavtomatiz. nakladna!a
^W1DICT("ARMINVOICESRECEIPT","E")
Invoice / Receipt ( text free )
^W1DICT("ARMINVOICESRECEIPT","H")
( iyteg hqwh ) zexiy dlaw/qn zipeayg
^W1DICT("ARMINVOICESUM","E")
Text free invoices
^W1DICT("ARMINVOICESUM","H")
zeipci z-yg
^W1DICT("ARMINVOICESUM","R")
S!4et 
^W1DICT("ARRIVEDTIME","E")
Customer arrival time
^W1DICT("ARRIVEDTIME","H")
gewll drbd onf
^W1DICT("ARRIVETIME","E")
Delivery time is $1 minutes from order receive time
^W1DICT("ARRIVETIME","H")
zewc $1 -k `ed gelyn onf
^W1DICT("ARRIVETIME","R")
Vrem!a dostavki $1 $2
^W1DICT("ASC2DEAL","E")
Belongs to deal
^W1DICT("ASC2DEAL","H")
dwqrl jiiy 
^W1DICT("ASCCANCELLED","E")
Assigning to meal deleted
^W1DICT("ASCCANCELLED","H")
lhea dgex`l jeiy
^W1DICT("ASCCARD2CUSTOMER","E")
Assigning a card to an existing customer
^W1DICT("ASCCARD2CUSTOMER","H")
miiw gewll qihxk jeiy
^W1DICT("ASCENDING","E")
By ascending
^W1DICT("ASCENDING","H")
dler xcq itl
^W1DICT("ASCENDING","R")
po vozrastani!u
^W1DICT("ASCGROUPS2WEB","E")
Sites to groups
^W1DICT("ASCGROUPS2WEB","H")
mixz`l zeveaw jeiy
^W1DICT("ASCITEM2LUNCH","E")
Associate a item "$ 1" for a meal?
^W1DICT("ASCITEM2LUNCH","H")
? dgex`l "$1" hixt jiiyl
^W1DICT("ASCITEMS2ADDDEP","E")
Assigning items to another department in a work plan
^W1DICT("ASCITEMS2ADDDEP","H")
dcear zipkeza ztqep dwlgnl mihixt jeiy
^W1DICT("ASCITEMS2OTHERDEPS","E")
Assign items to a different department
^W1DICT("ASCITEMS2OTHERDEPS","H")
dveaw ly dwlgnn dpey dwlgnl mihixt jeiy
^W1DICT("ASCITEMS2WEB","E")
Assigning items to sites
^W1DICT("ASCITEMS2WEB","H")
mixz`l mihixt jeiy
^W1DICT("ASH4","E")
Last 4 # of credit card
^W1DICT("ASH4","H")
`"k ly zepexg` zextq 4
^W1DICT("ASH4","R")
4 posl. cifry kred. kart.
^W1DICT("ASKBEFORE11","E")
Query before operation
^W1DICT("ASKBEFORE11","H")
rvan iptl `zli`y
^W1DICT("ASKNOTVALID","E")
Incorrect  request
^W1DICT("ASKNOTVALID","H")
dpekp `l `zli`y
^W1DICT("ASKNOTVALID","R")
neverny!i zapros
^W1DICT("ASKPRICE","E")
Enter a price
^W1DICT("ASKPRICE","H")
xign clwd
^W1DICT("ASKPRICE","R")
Vvedite cenu
^W1DICT("ASKTIME","E")
Time of request
^W1DICT("ASKTIME","H")
dzli`y onf
^W1DICT("ASKUSER4CC","E")
Call & ask credit card number
^W1DICT("ASKUSER4CC","H")
`"k le`yl
^W1DICT("ASKUSER4CC","R")
Sprosit!m nomer kr.kart.
^W1DICT("ASM","E")
Request a reference #
^W1DICT("ASM","H")
daeg `zknq` m`d
^W1DICT("ASM","R")
Sprosit!m nom.sopr.dok-ta
^W1DICT("ASR","E")
Amount after discount
^W1DICT("ASR","H")
dgpd ixg` mekq
^W1DICT("ASR","R")
Summa posle skidki
^W1DICT("ASRL","E")
Amount before discount
^W1DICT("ASRL","H")
dgpd iptl mekq
^W1DICT("ASRL","R")
Summa do skidki
^W1DICT("ASRORD","E")
Credit order
^W1DICT("ASRORD","H")
dtwd zepnfd
^W1DICT("ATAR","E")
Site
^W1DICT("ATAR","H")
xz`
^W1DICT("ATRTABLE","E")
Sites table
^W1DICT("ATRTABLE","H")
mixz` zlah
^W1DICT("ATTACHEDFILE","E")
As an attachment
^W1DICT("ATTACHEDFILE","H")
sxevn uaewk
^W1DICT("AUTHNO","E")
Reference #
^W1DICT("AUTHNO","H")
`zknq` 'qn
^W1DICT("AUTHNO","R")
Nom. podtv-!a
^W1DICT("AUTHNOSHVA","E")
Please call a credit card company and get a reference number
^W1DICT("AUTHNOSHVA","H")
$2 `ed wtq 'qn <BR> `zknq` 'qn lawle <BR> $1 'lha <BR> i`xy` zxagl xywzdl `p
^W1DICT("AUTHOR","E")
Authorised by
^W1DICT("AUTHOR","R")
Avtor
^W1DICT("AUTHORISEDBY","E")
The order was approved by $1 on $2 from pos $3
^W1DICT("AUTHORISEDBY","H")
$3 dcnrn $2 -a $1 ici lr dxye` dpnfd
^W1DICT("AUTHORITY","E")
Reference #
^W1DICT("AUTHORITY","H")
`zknq`
^W1DICT("AUTHORITY","R")
Nom. podtverjeni!a
^W1DICT("AUTOINVOICES","E")
Centralized invoices
^W1DICT("AUTOINVOICES","H")
zefkxn zeipeayg
^W1DICT("AUTOINVOICES","R")
Svodna!a nakladna!a
^W1DICT("AUTOPRINT","E")
Auto print
^W1DICT("AUTOPRINT","H")
'ehe` dqtcd
^W1DICT("AUTOPRINT","R")
AP!4
^W1DICT("AVBANK","E")
Bank transfer
^W1DICT("AVBANK","H")
zi`wpa dxard
^W1DICT("AVCUST","E")
From Customer
^W1DICT("AVCUST","H")
gewll 'nn
^W1DICT("AVDLP","E")
TAW average
^W1DICT("AVDLP","H")
T.A.W. rvenn
^W1DICT("AVDLP","R")
srednee !%TAW
^W1DICT("AVEERROR","E")
Saving Error
^W1DICT("AVEERROR","H")
dxinya d`iby
^W1DICT("AVERAGEPRICE","E")
Average price
^W1DICT("AVERAGEPRICE","H")
rvenn xign
^W1DICT("AVERAGEPRICE","R")
Sredn!a!a cena
^W1DICT("AVGUEST","E")
To the diner
^W1DICT("AVGUEST","H")
creql
^W1DICT("AVMSD","E")
Average to Cust.
^W1DICT("AVMSD","H")
creql 'nn
^W1DICT("AVMSD","R")
v srednem na posetitel!a
^W1DICT("AVMSDEVENING","E")
Average for dinner
^W1DICT("AVMSDEVENING","H")
axr creql rvenn
^W1DICT("AVMSDMORNING","E")
Average per morning
^W1DICT("AVMSDMORNING","H")
xwea creql rvenn
^W1DICT("AVMSL","E")
Delivery Average
^W1DICT("AVMSL","H")
migelyn rvenn
^W1DICT("AVMSL","R")
v srednem na posylku
^W1DICT("AVMSLEVENING","E")
Average evening deliveries
^W1DICT("AVMSLEVENING","H")
axr migelyn rvenn
^W1DICT("AVMSLMORNING","E")
Average deliveries per morning
^W1DICT("AVMSLMORNING","H")
xwea migelyn rvenn
^W1DICT("AVRG2DINER","E")
Average to Diner
^W1DICT("AVRGDLVRY","E")
Average shipments without shipping costs
^W1DICT("AVRGDLVRY","H")
gelyn inc `ll migelyn rvenn
^W1DICT("AVRGORD","E")
Average per order
^W1DICT("AVRGORD","H")
dpnfdl rvenn
^W1DICT("AVRGPREPTIME","E")
Average preparation time
^W1DICT("AVRGPREPTIME","H")
rvenn dpkd onf
^W1DICT("AVRGREST","E")
Average per day
^W1DICT("AVRGREST","H")
inei creql rvenn
^W1DICT("AVRGRESTEVENING","E")
Average for dinner
^W1DICT("AVRGRESTEVENING","H")
axr creql rvenn
^W1DICT("AVRGRESTMORNING","E")
Average per morning
^W1DICT("AVRGRESTMORNING","H")
xwea creql rvenn
^W1DICT("AVRGTAW","E")
Average TAW
^W1DICT("AVRGTAW","H")
TA rvenn
^W1DICT("AVRGTAWEVENING","E")
Average TAW evening
^W1DICT("AVRGTAWEVENING","H")
axr TA rvenn
^W1DICT("AVRGTAWMORNING","E")
Average TAW morning
^W1DICT("AVRGTAWMORNING","H")
xwea TA rvenn
^W1DICT("B","E")
Password to proceed a  Cancel
^W1DICT("B","H")
lehial `nqiq
^W1DICT("B","R")
Parol!m dl!a udaleni!a
^W1DICT("BACK","E")
Back
^W1DICT("BACK","H")
xefg
^W1DICT("BACK","R")
Vernut!ms!a
^W1DICT("BACK2ENTER","E")
To Main page
^W1DICT("BACK2ENTER","H")
dqipk scl
^W1DICT("BACK2ENTER","R")
Na vhod
^W1DICT("BACK2GROUPS","E")
Back to groups
^W1DICT("BACK2GROUPS","H")
zeveawl xefg
^W1DICT("BACK2GROUPS","R")
Vernut!ms!a v gl.men!u
^W1DICT("BACK2ITEMS","E")
Back to Products
^W1DICT("BACK2ITEMS","H")
hixtzl xefg
^W1DICT("BACK2ITEMS","R")
Vernut!ms!a v podmen!u
^W1DICT("BACK2LASTGROUP","E")
To group
^W1DICT("BACK2LASTGROUP","H")
dveawl
^W1DICT("BACK2MAIN","E")
To main page
^W1DICT("BACK2MAIN","H")
iy`x scl 
^W1DICT("BACK2MAIN","R")
Na glavnu!u
^W1DICT("BACK2MENU","E")
Back to menu
^W1DICT("BACK2MENU","H")
hixtzl xefg
^W1DICT("BACK2MENU","R")
Vernut!ms!a v men!u
^W1DICT("BACK2MENUNOCHOICE","E")
Back without choice
^W1DICT("BACK2MENUNOCHOICE","H")
dxiga `ll hixtzl xefg
^W1DICT("BACK2MENUNOCHOICE","R")
Otkazat!ms!a ot vybora
^W1DICT("BACK2MLY","E")
Return an item from a customer to inventory
^W1DICT("BACK2MLY","H")
i`lnl gewln hixt xfgd
^W1DICT("BACK2NORMAL","E")
Return to normal mode
^W1DICT("BACK2NORMAL","H")
libx avnl xefg
^W1DICT("BACK2ORDER","E")
Back to order
^W1DICT("BACK2ORDER","H")
dpnfdl xefg
^W1DICT("BACK2ORDER","R")
Vernut!ms!a k zakazu
^W1DICT("BACK2ORDHEADER","E")
Back to start order
^W1DICT("BACK2ORDHEADER","H")
dpnfd zligzl
^W1DICT("BACK2ORDHEADER","R")
V na!4alo zakaza
^W1DICT("BACK2ORDLIST","E")
Back to Order list
^W1DICT("BACK2ORDLIST","H")
zepnfd zniyxl
^W1DICT("BACK2ORDLIST","R")
Na spisok zakazov
^W1DICT("BACK2ORDNOCHANGE","E")
Back Without Change
^W1DICT("BACK2ORDNOCHANGE","H")
iepiy `ll dpnfdl xefg
^W1DICT("BACK2ORDNOCHOICE","E")
Return to order without selection
^W1DICT("BACK2ORDNOCHOICE","H")
dxiga `ll dpnfdl xefg
^W1DICT("BACK2RSTRN","E")
Back to list of restaurants
^W1DICT("BACK2RSTRN","H")
zecrqn zniyxl xefg
^W1DICT("BACK2RSTRN","R")
Na spisok restoranov
^W1DICT("BACK2TABLES","E")
To tables list
^W1DICT("BACK2TABLES","H")
zepgley zniyxl
^W1DICT("BACK2WAITERS","E")
To waiters list
^W1DICT("BACK2WAITERS","H")
mixvln zniyxl
^W1DICT("BACKGROUNDCOLOR","E")
Background
^W1DICT("BACKGROUNDCOLOR","H")
rwx ly rav
^W1DICT("BACKOFFICE","E")
Back office
^W1DICT("BACKOFFICE","H")
ixeg` cxyn
^W1DICT("BACKOFFICEPASSWORD","E")
Back office password
^W1DICT("BACKOFFICEPASSWORD","H")
ixeg` cxynl dqipkl dnqiq
^W1DICT("BACKUPCANCELLED","E")
Errors In Db .Backup Cancaled
^W1DICT("BACKUPCANCELLED","H")
!!! wqted ieaib !!! mipezp qiqaa ze`iby elbzd
^W1DICT("BACKUPCANCELLED","R")
Obnarujeny o!6ibki v BD ! Kopirovanie prekra!seno
^W1DICT("BALANCE","E")
Balance
^W1DICT("BALANCE","H")
dxzi
^W1DICT("BALANCE","R")
Ostatok
^W1DICT("BALANCEAFTERLOADING","E")
Balance after charging
^W1DICT("BALANCEAFTERLOADING","H")
dpirh ixg` dxzi
^W1DICT("BALANCENOTZERO","E")
Balance should be 0 !
^W1DICT("BALANCENOTZERO","H")
! 0 -n dpey dxzi
^W1DICT("BALANCENOTZERO","R")
Ostatok ne nulevo!i !
^W1DICT("BANK","E")
Bank
^W1DICT("BANK","H")
wpa
^W1DICT("BANK","R")
Bank
^W1DICT("BANKACCOUNTSTABLE","E")
Table of bank accounts
^W1DICT("BANKACCOUNTSTABLE","H")
wpa zepeayg zlah
^W1DICT("BANKMOVING","E")
Bank Transfer
^W1DICT("BANKMOVING","H")
zi`wpa dxard
^W1DICT("BANKMOVING","R")
Bank. perevod
^W1DICT("BANKNAME","E")
Name of Bank
^W1DICT("BANKNAME","H")
wpa my
^W1DICT("BARCODEPRINTERDEFINITION","E")
Setting up a barcode printer
^W1DICT("BARCODEPRINTERDEFINITION","H")
micewxal zqtcn zxcbd
^W1DICT("BARMANSTABLE","E")
Form of Bartenders
^W1DICT("BARMANSTABLE","H")
mipnxa zlah
^W1DICT("BARMANSTABLE","R")
Tabl. barmenov
^W1DICT("BASETFR","E")
Basic menu
^W1DICT("BASETFR","H")
iqiqa  hixtza letih
^W1DICT("BASICPERIOD","E")
Compared to the base period
^W1DICT("BASICPERIOD","H")
qiqa ztewz len d`eeyda
^W1DICT("BASICPIC","E")
Background picture
^W1DICT("BASICPIC","H")
rwx zpenz
^W1DICT("BASICSORT","E")
Basic sort
^W1DICT("BASICSORT","H")
iqiqa oein
^W1DICT("BASICSORT","R")
Osn. sort-ka
^W1DICT("BCODE","E")
Bar code
^W1DICT("BCODE","H")
cew-xa
^W1DICT("BCODETABLE","E")
Table "Item Code - Bar Code"
^W1DICT("BCODETABLE","H")
"cew-xa - hixt cew" dlah
^W1DICT("BEAVAILABLE","E")
Please, be available for call in short time
^W1DICT("BEAVAILABLE","H")
mknr xyw zxivie dpnfdd xg` awrnl miynyn oetlhd 'qne dpnfd 'qn
^W1DICT("BEAVAILABLE","R")
Pojalu!ista bud!mte v blija!i!6ee vrem!a gotovy otvetit!m po ukazannomu v zakaze telefonu
^W1DICT("BEFOREDEL","E")
Before cancellation
^W1DICT("BEFOREDEL","H")
lehia iptl
^W1DICT("BEFOREDISC","E")
Before discount
^W1DICT("BEFOREDISC","H")
dgpd iptl mekq
^W1DICT("BEFOREDISC","R")
Summa do skidki
^W1DICT("BEFORETAX","E")
Before VAT
^W1DICT("BEFORETAX","H")
n"rn iptl
^W1DICT("BEFORETAX","R")
Summa do n.d.s.
^W1DICT("BELONG11","E")
Table of bank accounts
^W1DICT("BELONG11","H")
zenk zepyl oi` - "1+1" rvana szzyn hixt
^W1DICT("BELONG11QN1","E")
The item is washed in 1 (or more) egg +1  can only be entered with a quantity 1
^W1DICT("BELONG11QN1","H")
1 zenk mr wx cilwdl ozip - 1 + ( xzei e` ) 1 dvana shhyn hixtd
^W1DICT("BELONGCARD2CUST","E")
Assign a card to the customer
^W1DICT("BELONGCARD2CUST","H")
gewll qihxk jeiy
^W1DICT("BGCOLORDELETED","E")
Background color canceled
^W1DICT("BGCOLORDELETED","H")
lhea rwx rav
^W1DICT("BIDCAUTION","E")
Ou can cancel your reservation up to 48 hours before the event free of charge.
^W1DICT("BIDCAUTION","H")
melyz `ll rexi` iptl zery 48 cr dpnfdd z` lhal ozip
^W1DICT("BIDS","E")
Quotation
^W1DICT("BIDS","H")
xign zervd
^W1DICT("BIGITRA","E")
To Payment : $1 NIS
^W1DICT("BIGITRA","H")
g"y $1 : melyzl dxzi
^W1DICT("BIGITRA","R")
K plateju: $1 rub
^W1DICT("BIGODEF","E")
Refund
^W1DICT("BIGODEF","H")
g"y $1 : scer
^W1DICT("BIGODEF","R")
Sda!4a : $1 rub
^W1DICT("BIGORDTIME","E")
Order to $1
^W1DICT("BIGORDTIME","H")
$1 <BR><BR> : -l dpnfd
^W1DICT("BIGPRINT","E")
Print to a wide printer
^W1DICT("BIGPRINT","H")
dagx zqtcnl qtcd
^W1DICT("BIGPRINTPARAMETERSDEFINITION","E")
Print parameters for reports printer
^W1DICT("BIGPRINTPARAMETERSDEFINITION","H")
zeg"ec zqtcnl dqtcdl mixhnxt
^W1DICT("BIGTM","E")
Print a delivery note to the report printer
^W1DICT("BIGTM","H")
zeg"ec zqtcnl gelyn zcerz zqtcd
^W1DICT("BILL","E")
Bill
^W1DICT("BILL","H")
oeayg
^W1DICT("BILLDISCOUNTS","E")
Bill discount
^W1DICT("BILLDISCOUNTS","H")
oeaygl zegpd
^W1DICT("BILLORPAYMENTS","E")
Bill / Payments
^W1DICT("BILLORPAYMENTS","H")
minelyz / oeayg
^W1DICT("BILLPART","E")
Partial bill
^W1DICT("BILLPART","H")
iwlg oeayg
^W1DICT("BILLPRINTED","E")
Bill printed
^W1DICT("BILLPRINTED","H")
qtced oeayg
^W1DICT("BIOADR","E")
IP address of biometric device
^W1DICT("BIOADR","H")
ixhne`ia xiykn ly zaezk IP
^W1DICT("BIODEV","E")
Is a biometric device connected?
^W1DICT("BIODEV","H")
ixhne`ia xiykn xaegn m`d
^W1DICT("BIONOTDEFINED4POS","E")
A biometric device has not been configured for this position.
^W1DICT("BIONOTDEFINED4POS","H")
z`f dcnrl xcbed `l ixhne`ia xiykn
^W1DICT("BIOWORKERSLIST","E")
Employee list in biometric table
^W1DICT("BIOWORKERSLIST","H")
ixhne`ia dlaha micaer zniyx
^W1DICT("BIRTHDATEMUSTBEFILLED","E")
Missing date of birth on employee card
^W1DICT("BIRTHDATEMUSTBEFILLED","H")
caer qihxka dcil jix`z xqeg
^W1DICT("BIRTHDAY","E")
Birthday
^W1DICT("BIRTHDAY","H")
zcled mei
^W1DICT("BIRTHDAY","R")
Data rojdeni!a
^W1DICT("BLACKNOTOK","E")
File of parameters isn't  complete
^W1DICT("BLACKNOTOK","H")
`ln `l mixhnxt uaew
^W1DICT("BLACKNOTOK","R")
Fa!il parametrov nepolon
^W1DICT("BLCUSTOMDATA","E")
Business Logic customer data
^W1DICT("BLCUSTOMDATA","H")
"wi'bel qpfia" ly gewl ipezp
^W1DICT("BONPARAMETERSDEFINITION","E")
Bon print parameters
^W1DICT("BONPARAMETERSDEFINITION","H")
gahnl oea zqtcdl mixhnxt
^W1DICT("BONUS","E")
Bonus
^W1DICT("BONUS","H")
dahd
^W1DICT("BONUSVC","E")
ValueCard Bonus
^W1DICT("BONUSVC","H")
cxweile zahd
^W1DICT("BONWNDPARAMETERS","E")
Parameters for displaying bons for kitchen on the screen (Windows version)
^W1DICT("BONWNDPARAMETERS","H")
( zepelg zqxib ) jqnd lr mipea zbvdl mixhnxt
^W1DICT("BORDER","E")
Frame
^W1DICT("BORDER","H")
zxbqn
^W1DICT("BORDERCOLORBUSY","E")
Frame color for busy table
^W1DICT("BORDERCOLORBUSY","H")
qetz ogley ly zxbqn rav
^W1DICT("BORDERCOLORFREE","E")
Frame color for free table
^W1DICT("BORDERCOLORFREE","H")
iept ogley ly zxbqn rav
^W1DICT("BOTPARTITIONCOLORDEFINITION","E")
CSS of bottom bar.
^W1DICT("BOTPARTITIONCOLORDEFINITION","H")
oezgz wlgl mirav zxcbd
^W1DICT("BOTPARTITIONCOLORDEFINITION","R")
Cveta dl!a nijne!i !4asti
^W1DICT("BOTTOM","E")
Bottom
^W1DICT("BOTTOM","H")
dhn
^W1DICT("BRANCH","E")
Branch
^W1DICT("BRANCH","H")
sipq
^W1DICT("BRUTTO","E")
Gross Sales
^W1DICT("BRUTTO","H")
ehexa zeqpkd
^W1DICT("BSLOGICPAY","E")
Business Logic
^W1DICT("BSLOGICPAY","H")
wi'bel qpfia
^W1DICT("BSLOGICPOINTPAY","E")
Realization of "Business Logic" points
^W1DICT("BSLOGICPOINTPAY","H")
"wi'bel qpfia" zecewp yenin
^W1DICT("BSLREPORT","E")
Sales report of "Business Logic"
^W1DICT("BSLREPORT","H")
"wi'bel qpfia" ly zexikn g"ec
^W1DICT("BSN","E")
Bank+Branch
^W1DICT("BSN","H")
sipq+wpa
^W1DICT("BSN","R")
Bank+otd-e
^W1DICT("BSNKDPAYRESULT","E")
Payment results at Business Logic points
^W1DICT("BSNKDPAYRESULT","H")
"wi'bel qpfia" ly zecewpa melyz ze`vez
^W1DICT("BUINGSUM","E")
Num of purchases
^W1DICT("BUINGSUM","H")
zeipw k"dq
^W1DICT("BUINGSUM","R")
Summa pokupok
^W1DICT("BUISINESSMANAGEMENTPROGRAMM","E")
Business management software
^W1DICT("BUISINESSMANAGEMENTPROGRAMM","H")
wqr ledipl dpkez
^W1DICT("BUS","E")
Bus
^W1DICT("BUS","R")
Avtobus
^W1DICT("BUSINESS","E")
Business
^W1DICT("BUSINESS","H")
iwqir
^W1DICT("BUSINESSID","E")
Business Id
^W1DICT("BUSINESSID","H")
.n.r/.t.g/.f.z
^W1DICT("BUSINESSID","R")
Id-!i nomer kompanii
^W1DICT("BUSINESSLOGICCLUBS","E")
Clubs of "BUSINESS LOGIC"
^W1DICT("BUSINESSLOGICCLUBS","H")
<E>"BUSINESS LOGIC"<E> ly mipecren
^W1DICT("BUSINESSLOGICMENU","E")
Menu of "Business Logic"
^W1DICT("BUSINESSLOGICMENU","H")
"wi'bel qpfia" ly hixtz
^W1DICT("BUSINESSLOGICPARAMETERS","E")
Parameters of "BUSINESS LOGIC"
^W1DICT("BUSINESSLOGICPARAMETERS","H")
<E>"BUSINESS LOGIC"<E> ly mixhnxt
^W1DICT("BUSINESSMANAGEMENTSYSTEM","E")
Business managment system
^W1DICT("BUSINESSMANAGEMENTSYSTEM","H")
wqr ledip zkxrn
^W1DICT("BUSINESSPARAMETERS","E")
Business details
^W1DICT("BUSINESSPARAMETERS","H")
wqrd ihxt
^W1DICT("BUSINESSPARAMETERS","R")
Dannye kompanii
^W1DICT("BUSINESSWORKTIME","E")
Shipping hours
^W1DICT("BUSINESSWORKTIME","H")
migelyn ly dcear zery
^W1DICT("BUSY","E")
Busy
^W1DICT("BUSY","H")
qetz
^W1DICT("BUSYTABLES","E")
Tables in use
^W1DICT("BUSYTABLES","H")
miqetz 'gley
^W1DICT("BUSYTABLES","R")
Zan!atye stoly
^W1DICT("BYCONTENT","E")
By content
^W1DICT("BYCONTENT","H")
okez itl
^W1DICT("BYDATERANGE","E")
By Date Range
^W1DICT("BYDATERANGE","H")
mikix`z geeh itl
^W1DICT("BYDATERANGE","R")
za period
^W1DICT("BYDOCNUMBER","E")
By Doc Number
^W1DICT("BYDOCNUMBER","H")
jnqn 'qn itl
^W1DICT("BYDOCNUMBER","R")
po nom. dok-ta
^W1DICT("BYLASTMOVEMENTS","E")
View only last  $1  transactions
^W1DICT("BYLASTMOVEMENTS","H")
zepexg` zerepz $1 itl
^W1DICT("BYLASTMOVEMENTS","R")
Pok-t!m $1 posl. tranzakci!i
^W1DICT("BYMAINCUST","E")
According to main customer
^W1DICT("BYMAINCUST","H")
iy`x gewl itl
^W1DICT("BYSUM","E")
By amount
^W1DICT("BYSUM","H")
mekq itl
^W1DICT("CA","E")
Credit Cards
^W1DICT("CA","H")
`"k
^W1DICT("CAJ","E")
Credit cards received out the system
^W1DICT("CAJ","H")
ueg `"k
^W1DICT("CAJREP2DAT","E")
Outside credit cards report  for  $1
^W1DICT("CAJREP2DAT","H")
$1 -l ueg i`xy` iqihxk g"ec
^W1DICT("CAJREP2PERIOD","E")
Outside credit cards report  per websites from $1 to $2
^W1DICT("CAJREP2PERIOD","H")
$2 cr $1n mixz` itl ueg `"k
^W1DICT("CALCULATOR","E")
Calculator
^W1DICT("CALCULATOR","H")
oeaygn
^W1DICT("CALL2PROGRAMMDESIGNER","E")
Please call a software vendor ($ 1 day(s) more left)
^W1DICT("CALL2PROGRAMMDESIGNER","H")
(mini $1 cer ex`yp) dpkez wtql xywzdl `p
^W1DICT("CALLCENTER","E")
Call center
^W1DICT("CALLCENTER","H")
zeipetlh zepnfd fkxn
^W1DICT("CALLTO","E")
Contact us
^W1DICT("CALLTO","H")
xyw xev
^W1DICT("CANCEL","E")
Cancel
^W1DICT("CANCEL","H")
lha
^W1DICT("CANCEL","R")
Otmenit!m
^W1DICT("CANCELACTION","E")
Cancel operation
^W1DICT("CANCELACTION","H")
dlert lha
^W1DICT("CANCELACTION","R")
Otmenit!m de!istvie
^W1DICT("CANCELALL","E")
Cancel all operations and return to the menu
^W1DICT("CANCELALL","H")
hixtzl xefge zelertd lk lha
^W1DICT("CANCELBIDQN","E")
Number of canceled bids
^W1DICT("CANCELBIDQN","H")
elheay xign zervd 'qn
^W1DICT("CANCELBIDSUM","E")
Amount of canceled bids
^W1DICT("CANCELBIDSUM","H")
elheay xign zervd mekq
^W1DICT("CANCELBONUS","E")
Cancel Bonus
^W1DICT("CANCELBONUS","H")
dahd lehia
^W1DICT("CANCELCARD","E")
Cancel card
^W1DICT("CANCELCARD","H")
qihxk lha
^W1DICT("CANCELCHANGE","E")
Leave without changes
^W1DICT("CANCELCHANGE","H")
aefrl
^W1DICT("CANCELCHANGE","R")
Otmenit!m izmeneni!a
^W1DICT("CANCELCHANGES","E")
Cancel Changes
^W1DICT("CANCELCHANGES","H")
miepiy lha
^W1DICT("CANCELCHANGES","R")
Otmenit!m izmeneni!a
^W1DICT("CANCELERUA","E")
You can cancel an order up to $ 1 o'clock
^W1DICT("CANCELERUA","H")
zery $1 cr dpnfd lhal ozip
^W1DICT("CANCELINGERROR","E")
Error canceling transaction
^W1DICT("CANCELINGERROR","H")
dwqr lehiaa d`iby
^W1DICT("CANCELINITCARD","E")
Deactivate a Card
^W1DICT("CANCELINITCARD","H")
qihxk zniqg
^W1DICT("CANCELLATIONS","E")
Cancellations
^W1DICT("CANCELLATIONS","H")
milehia
^W1DICT("CANCELLINGCARD","E")
Cancel card
^W1DICT("CANCELLINGCARD","H")
qihxk lehia
^W1DICT("CANCELORD","E")
Cancel order
^W1DICT("CANCELORD","H")
xefg
^W1DICT("CANCELORD","R")
Otmenit!m
^W1DICT("CANCELQN","E")
Number of cancellations
^W1DICT("CANCELQN","H")
milehia 'qn
^W1DICT("CANCELSUM","E")
Amount of cancellations
^W1DICT("CANCELSUM","H")
milehia mekq
^W1DICT("CANCELUPDATES","E")
Exit without changes
^W1DICT("CANCELUPDATES","H")
miepiy `ll `v
^W1DICT("CARD","E")
Card
^W1DICT("CARD","H")
'k
^W1DICT("CARDAMOUNT","E")
Cards amount
^W1DICT("CARDCANCELLED","E")
Card canceled
^W1DICT("CARDCANCELLED","H")
lhea qihxk
^W1DICT("CARDLOADING","E")
Load Card
^W1DICT("CARDLOADING","H")
qihxk zpirh
^W1DICT("CARDNUMBER","E")
Card number
^W1DICT("CARDNUMBER","H")
qihxk 'qn
^W1DICT("CARDNUMBER","R")
Nomer karto!4ki
^W1DICT("CARDPASTINDEVICE","E")
A response was received from a device.
^W1DICT("CARDPASTINDEVICE","H")
xiyknn daeyz dlawzd
^W1DICT("CARDS","E")
Cards
^W1DICT("CARDS AMOUNT","E")
Cards amount
^W1DICT("CARHIRE","E")

^W1DICT("CASH","E")
Cash
^W1DICT("CASH","H")
onefn
^W1DICT("CASH","R")
Nali!4nye
^W1DICT("CASHADDED","E")
Added to the cashdrawer
^W1DICT("CASHADDED","H")
dxibnl sqep
^W1DICT("CASHBEFORE","E")
Cash before sales
^W1DICT("CASHBEFORE","H")
zexikn iptl onefn
^W1DICT("CASHCOUNTING","E")
Cash counting
^W1DICT("CASHCOUNTING","H")
onefn zxitq
^W1DICT("CASHCSR","E")
Cash Cashier
^W1DICT("CASHCSR","H")
dtew onefn
^W1DICT("CASHIER","E")
Cashier
^W1DICT("CASHIER","H")
(z)i`tew
^W1DICT("CASHIER","R")
Kassir
^W1DICT("CASHIERNAME","E")
Cashier Name
^W1DICT("CASHIERNAME","H")
(z)i`tew my
^W1DICT("CASHIERNAME","R")
Im!a kassira
^W1DICT("CASHIERNUMBER","E")
Cashier #
^W1DICT("CASHIERNUMBER","H")
(z)i`tew 'qn
^W1DICT("CASHIERNUMBER","R")
Nom. kassira
^W1DICT("CASHIERORCOURIER","E")
Worker
^W1DICT("CASHIERORCOURIER","H")
caer
^W1DICT("CASHIERORCOURIER","R")
Rabotnik
^W1DICT("CASHIERORCOURIERNAME","E")
Worker name
^W1DICT("CASHIERORCOURIERNAME","H")
caer my
^W1DICT("CASHIERORCOURIERNAME","R")
Im!a rabotnika
^W1DICT("CASHIERORCOURIERNUMBER","E")
Worker
^W1DICT("CASHIERORCOURIERNUMBER","H")
caer
^W1DICT("CASHIERORCOURIERNUMBER","R")
Rabotnik
^W1DICT("CASHIERSREPORT","E")
Report by Cashiers
^W1DICT("CASHIERSREPORT","H")
(ze)mi`tew g"ec
^W1DICT("CASHIERSREPORT","R")
Ot!4et po kassiru
^W1DICT("CASHIERSTABLE","E")
Cashier Table
^W1DICT("CASHIERSTABLE","H")
(ze)mi`tew zlah
^W1DICT("CASHIERSTABLE","R")
Tablica kassirov
^W1DICT("CASHINDEPOSITION","E")
Cash deposited
^W1DICT("CASHINDEPOSITION","H")
dcwtda onefn
^W1DICT("CASHINVST2CSR","E")
Depositing cash into the CSR
^W1DICT("CASHINVST2CSR","H")
dtewl onefn zcwtd
^W1DICT("CASHNETTO","E")
Cash netto
^W1DICT("CASHNETTO","H")
ehp onefn
^W1DICT("CASHPOSREPORT","E")
Cash Sales Report
^W1DICT("CASHPOSREPORT","H")
onefna zexikn g"ec
^W1DICT("CASHREPORT","E")
POS report
^W1DICT("CASHREPORT","H")
minelyz zqixt g"ec
^W1DICT("CASHREPORT","R")
Ot!4et po kasse
^W1DICT("CASHSOLD","E")
Sold for cash
^W1DICT("CASHSOLD","H")
onefna xknp
^W1DICT("CASHSUM","E")
Amount to be paid in cash
^W1DICT("CASHSUM","H")
melyzl mekq
^W1DICT("CASHTAKED","E")
Taken for deposit
^W1DICT("CASHTAKED","H")
dcwtdl gwlp
^W1DICT("CASHTOTAL","E")
Total cash
^W1DICT("CASHTOTAL","H")
onefn k"dq
^W1DICT("CATALOGUPDATE","E")
Updating item catalog
^W1DICT("CATALOGUPDATE","H")
mihixt belhw oekcir
^W1DICT("CAUSEDEL","E")
Cancellation Reason
^W1DICT("CAUSEDEL","H")
lehial daiq
^W1DICT("CAUSEDEL","R")
Pri!4ina udaleni!a
^W1DICT("CAUSEDISC","E")
Discount Reason
^W1DICT("CAUSEDISC","H")
dgpdl daiq
^W1DICT("CELLCONFLICT","E")
Collision with settings of slot $1
^W1DICT("CELLCONFLICT","H")
$1 zvayn ly zexcbd mr zeybpzd
^W1DICT("CELLDOUBLE","E")
A table with such a number has already been set in a slot $1
^W1DICT("CELLDOUBLE","H")
$1 zvayna xcbed xak dfk xtqn mr ogley
^W1DICT("CELLHEIGHTPIX","E")
Height of slot (pix)
^W1DICT("CELLHEIGHTPIX","H")
('qwit ) zvayn daeb
^W1DICT("CELLWIDTHPIX","E")
Slot Width (Pix)
^W1DICT("CELLWIDTHPIX","H")
('qwit ) zvayn agex
^W1DICT("CHANGE","E")
Change
^W1DICT("CHANGE","H")
slgd
^W1DICT("CHANGE2ORDER","E")
Confirm order invitation
^W1DICT("CHANGE2ORDER","H")
dpnfd xy`
^W1DICT("CHANGE2ORDERANDPAY","E")
Confirm and pay order
^W1DICT("CHANGE2ORDERANDPAY","H")
dpnfd mlye xy`
^W1DICT("CHANGECOURIER","E")
Change Courier
^W1DICT("CHANGECOURIER","H")
gily slgd
^W1DICT("CHANGED","E")
Changed
^W1DICT("CHANGED","H")
dpey
^W1DICT("CHANGED","R")
Izm.
^W1DICT("CHANGEGUESTSQN","E")
Change number of diners
^W1DICT("CHANGEGUESTSQN","H")
micreq 'qn iepiy
^W1DICT("CHANGEGUESTSQN","R")
Izm. !4islo klientov
^W1DICT("CHANGEITEMSORDER","E")
Change item arrangement
^W1DICT("CHANGEITEMSORDER","H")
mihixt xeciq dpy
^W1DICT("CHANGEITRA","E")
Balance change
^W1DICT("CHANGEITRA","H")
dxzi iepiy
^W1DICT("CHANGEMENUNAME","E")
Change Menu Description
^W1DICT("CHANGEMENUNAME","H")
hixtz xe`z dpy
^W1DICT("CHANGENUMBER","E")
Change Number
^W1DICT("CHANGENUMBER","H")
xtqn iepiy
^W1DICT("CHANGEOLDNAME2NEW","E")
Change product name from $1 to $2
^W1DICT("CHANGEOLDNAME2NEW","H")
'$2' -l '$1' -n hixt my silgdl 
^W1DICT("CHANGEOLDNAME2NEW","R")
izmenit!m naim-e  s '$1' na '$2'
^W1DICT("CHANGEOLDPRICE2NEW","E")
Change product price from $1 to $2
^W1DICT("CHANGEOLDPRICE2NEW","H")
'$2' -l '$1' -n hixt xign silgdl 
^W1DICT("CHANGEOLDPRICE2NEW","R")
izmenit!m cenu  s '$1' na '$2'
^W1DICT("CHANGEORDER","E")
Change Order
^W1DICT("CHANGEORDER","H")
dpnfd dpy
^W1DICT("CHANGEPASSWORDERROR","E")
Error $1. Call for support
^W1DICT("CHANGEPASSWORDERROR","H")
dkinzl xywzz . $1 d`iby
^W1DICT("CHANGEPASSWORDERROR","R")
O!6ibka $1. Sv!ajites!m so slujbo!i podderjki
^W1DICT("CHANGEPASSWORDSHVA","E")
Change password of Shva
^W1DICT("CHANGEPASSWORDSHVA","H")
`"ay ly dnqiq iepiy
^W1DICT("CHANGEPASSWORDSHVA","R")
Izmenenie parol!a dl!a posylki kred. kart.
^W1DICT("CHANGEPRICEGR","E")
Group price change
^W1DICT("CHANGEPRICEGR","H")
izveaw xign iepiy
^W1DICT("CHANGEPRINTERSCONFIGURATION","E")
Change the configuration of kitchen printers
^W1DICT("CHANGEPRINTERSCONFIGURATION","H")
mipea zeqtcn ly divebitpew dpy
^W1DICT("CHANGESAKSQN","E")
Changing the number of bags
^W1DICT("CHANGESAKSQN","H")
zeiwy 'qn iepiy
^W1DICT("CHANGEWAITER","E")
Change Waiter
^W1DICT("CHANGEWAITER","H")
xvln ztlgd
^W1DICT("CHANGEWAITERINORDER","E")
Replacing waiter on order #$1
^W1DICT("CHANGEWAITERINORDER","H")
$1 'qn dpnfda xvln ztlgd
^W1DICT("CHANGINGCODESINORDERS","E")
Change order codes
^W1DICT("CHANGINGCODESINORDERS","H")
zepnfda micew iepiy
^W1DICT("CHANGINGCODESINSALEFILE","E")
Change codes in sales item items
^W1DICT("CHANGINGCODESINSALEFILE","H")
mihixt zexikn uaewa micew iepiy
^W1DICT("CHANGINGCODESINWAITERSFILE","E")
Change codes in the Waiters file
^W1DICT("CHANGINGCODESINWAITERSFILE","H")
mixvln uaewa micew iepiy
^W1DICT("CHARTS","E")
Charts
^W1DICT("CHARTS","H")
mitxb
^W1DICT("CHECK","E")
Check
^W1DICT("CHECK","H")
wiy
^W1DICT("CHECK","R")
!04ek
^W1DICT("CHECKCHECKDETAILS","E")
To Validate Check details
^W1DICT("CHECKCHECKDETAILS","H")
wiy ihxt wecal
^W1DICT("CHECKCHECKDETAILS","R")
Proverit!m dannye !4eka
^W1DICT("CHECKCLOSINGLIST","E")
Checklist downloaded from deposit
^W1DICT("CHECKCLOSINGLIST","H")
dcwtdn ecxedy miwiy zniyx
^W1DICT("CHECKER","E")
Dispatcher
^W1DICT("CHECKER","H")
glynd
^W1DICT("CHECKER","R")
Otpravitel!m
^W1DICT("CHECKERCODE","E")
Dispatcher id
^W1DICT("CHECKERCODE","H")
glyn cew
^W1DICT("CHECKERCODE","R")
Kod otpravitel!a
^W1DICT("CHECKERCODE=MY","E")
Dispatcher id must be different from Your id
^W1DICT("CHECKERCODE=MY","H")
oinfnd cewn dpey zeidl xen` glyn cew
^W1DICT("CHECKERCODE=MY","R")
Kod otpravitel!a doljen otli!4at!ms!a ot va!6ego
^W1DICT("CHECKERNAME","E")
Dispatcher name  :
^W1DICT("CHECKERNAME","H")
: `ed glynd my
^W1DICT("CHECKERNAME","R")
Im!a otpravitel!a
^W1DICT("CHECKFIELDSFILLING","E")
Field validation
^W1DICT("CHECKFIELDSFILLING","H")
zecy ielin weca
^W1DICT("CHECKFIELDSFILLING","R")
Prover!mte zapolnennost!m pole!i
^W1DICT("CHECKID","E")
Check ID number
^W1DICT("CHECKID","H")
zedf 'z 'qn wecal
^W1DICT("CHECKINUSE","E")
Check $ 1 Used in Payment #$2
^W1DICT("CHECKINUSE","H")
$2 'qn melyza yeniya $1 wiy 'qn
^W1DICT("CHECKLIST","E")
Checks List
^W1DICT("CHECKLIST","H")
miwiy zniyx
^W1DICT("CHECKMPBONUS","E")
Multipass benefits check
^W1DICT("CHECKMPBONUS","H")
"qtihlen" ly zeahd zwica
^W1DICT("CHECKNUMBER","E")
Check number
^W1DICT("CHECKNUMBER","H")
wiy 'qn
^W1DICT("CHECKNUMBER","R")
Nom. !4eka
^W1DICT("CHECKORCREDITNUMBER","E")
Check or Credit Card number
^W1DICT("CHECKORCREDITNUMBER","H")
`"k e` wiy 'qn
^W1DICT("CHECKORCREDITNUMBER","R")
Nom. !4eka ili kred. karto!4ki
^W1DICT("CHECKPOWERCLOSING","E")
Download checks from the deposit
^W1DICT("CHECKPOWERCLOSING","H")
dcwtdn miwiy zcxed
^W1DICT("CHECKPRINTER","E")
Check if printer is on and press on OK
^W1DICT("CHECKPRINTER","H")
OK ugle dpken zqtcn m`d weca
^W1DICT("CHECKPRINTER","R")
Prover!m gotovnost!m printera i najmi OK
^W1DICT("CHECKSNUMBER","E")
Number of checks
^W1DICT("CHECKSNUMBER","H")
miwiy xtqn
^W1DICT("CHECKSTOTAL","E")
Total checks
^W1DICT("CHECKSTOTAL","H")
miwiy k"dq
^W1DICT("CHECKSYSTEM","E")
Check system
^W1DICT("CHECKSYSTEM","H")
miwiy zkxrn
^W1DICT("CHKSPKREPORT","E")
Checks to suppliers report
^W1DICT("CHKSPKREPORT","H")
miwtql miwiy oerxt g"ec
^W1DICT("CHNDLV","E")
Type shipping cost (NIS)
^W1DICT("CHNDLV","H")
(g"y) gelyn inc clwd
^W1DICT("CHNDLVP","E")
Type % shipping
^W1DICT("CHNDLVP","H")
gelyn inc % clwd
^W1DICT("CHNISCR","E")
Password for the credit confirmation
^W1DICT("CHNISCR","H")
dtwdl xey`l dnqiq
^W1DICT("CHNMENUNAME","E")
Rename Menu
^W1DICT("CHNMENUNAME","H")
hixtz my dpy
^W1DICT("CHNSRV","E")
Type shipping cost (NIS)
^W1DICT("CHNSRV","H")
(g"y) zexiy inc clwd
^W1DICT("CHNSRVP","E")
Type % shipping
^W1DICT("CHNSRVP","H")
zexiy inc % clwd
^W1DICT("CHOICE","E")
Choice
^W1DICT("CHOICE","H")
xga
^W1DICT("CHOICE","R")
Vibrat!m
^W1DICT("CHOICEALL","E")
Select all
^W1DICT("CHOICEALL","H")
lkd xga
^W1DICT("CHOICEATAR","E")
Select a site
^W1DICT("CHOICEATAR","H")
xz` xga
^W1DICT("CHOICEAUTO","E")
Automatic selection
^W1DICT("CHOICEAUTO","H")
zihnehe` dxiga
^W1DICT("CHOICEBRANCH","E")
Select a branch
^W1DICT("CHOICEBRANCH","H")
sipq xga
^W1DICT("CHOICEBRANCH","R")
Vyberite filial
^W1DICT("CHOICECASHIER","E")
Select a cashier id
^W1DICT("CHOICECASHIER","H")
(z)i`tew xtqn xegal `p
^W1DICT("CHOICECASHIER","R")
Vyberite nom. kassira
^W1DICT("CHOICECAUSE","E")
- Select a reason --
^W1DICT("CHOICECAUSE","H")
-- daiq xga --
^W1DICT("CHOICECITY","E")
Select a city first
^W1DICT("CHOICECITY","H")
dligz xir xegal `p
^W1DICT("CHOICECITY","R")
Vyberite vna!4ale gorod
^W1DICT("CHOICECLUB","E")
Select a club
^W1DICT("CHOICECLUB","H")
oecren xga
^W1DICT("CHOICECOLOR","E")
Choose a color
^W1DICT("CHOICECOLOR","H")
rav xga
^W1DICT("CHOICECOLORS","E")
Select colors
^W1DICT("CHOICECOLORS","H")
mirav xga
^W1DICT("CHOICECOLORS","R")
Vyberite cvet
^W1DICT("CHOICECOMMENT","E")
Please choose note to the transfer
^W1DICT("CHOICECOMMENT","H")
dxardl dxrd xegal `p
^W1DICT("CHOICECOMMENT","R")
Vyberite kommentari!i dl!a perenosa
^W1DICT("CHOICECONFIGURATION","E")
Select Configuration
^W1DICT("CHOICECONFIGURATION","H")
divxebitpew xga
^W1DICT("CHOICECOURIER","E")
Select a courier
^W1DICT("CHOICECOURIER","H")
gily xga
^W1DICT("CHOICECOURIER","R")
Vyberite posyl!mnogo
^W1DICT("CHOICECREDITCARDKIND","E")
Select a credit card type
^W1DICT("CHOICECREDITCARDKIND","H")
i`xy` qihxk beq xga
^W1DICT("CHOICECSR","E")
Select a POS
^W1DICT("CHOICECSR","H")
dtew xegal `p
^W1DICT("CHOICECSR","R")
Vyberite kassu
^W1DICT("CHOICECUSTOM","E")
Please select a Client id
^W1DICT("CHOICECUSTOM","H")
gewl xtqn xegal `p
^W1DICT("CHOICECUSTOM","R")
Vyberite nom. klienta
^W1DICT("CHOICEDAT","E")
-- Select a date --
^W1DICT("CHOICEDAT","H")
-- jix`z xga --
^W1DICT("CHOICEDATA","E")
- Select a data -
^W1DICT("CHOICEDATA","H")
-- oezp xga --
^W1DICT("CHOICEDRESTNOTEQCOMPREST","E")
Your chosen restaurant is not suitable for choosing a computer! Are You sure ?
^W1DICT("CHOICEDRESTNOTEQCOMPREST","H")
? (d)geza (d)z` m`d ! aygn ly dxixal dni`zn `l zxgay dcrqn
^W1DICT("CHOICEEXACTLY","E")
Select $1 units exactly
^W1DICT("CHOICEEXACTLY","H")
weica zecigi $1 xegal yi
^W1DICT("CHOICEFIELD","E")
Select a field to update
^W1DICT("CHOICEFIELD","H")
oekcrl dcy xga
^W1DICT("CHOICEGRIT","E")
Select a group
^W1DICT("CHOICEGRIT","H")
dveaw xga
^W1DICT("CHOICEGROUP","E")
Select a group to migrate
^W1DICT("CHOICEGROUP","H")
dxardl dveaw xegal `p
^W1DICT("CHOICEHOUER","E")
Reservation time
^W1DICT("CHOICEHOUER","H")
dpnfd zry
^W1DICT("CHOICEIFNOTCASH","E")
If a payment type is different than cash; please choose a payment type
^W1DICT("CHOICEIFNOTCASH","H")
minelyz xtqne melyz beq xegal `p onefnn dpey melyz beq m`
^W1DICT("CHOICEIFNOTCASH","R")
Esli platej ne nali!4nymi vyberite vid i k-vo plateje!i
^W1DICT("CHOICEIGUL","E")
Select round
^W1DICT("CHOICEIGUL","H")
lebir xga
^W1DICT("CHOICEITEM","E")
Slelect an product to transfere
^W1DICT("CHOICEITEM","H")
dxardl hixt xga
^W1DICT("CHOICEITEM","R")
Vyberite produkt dl!a perenosa
^W1DICT("CHOICEITEM2COPY","E")
Please select an item to copy
^W1DICT("CHOICEITEM2COPY","H")
dwzrdl hixt xga
^W1DICT("CHOICEKINDOFINVOICE","E")
Select an invoice type
^W1DICT("CHOICEKINDOFINVOICE","H")
zipeayg ly beq xga
^W1DICT("CHOICEKINDOFSALARY","E")
Select  type of salary
^W1DICT("CHOICEKINDOFSALARY","H")
zxekyn beq xga
^W1DICT("CHOICEKINDOFSALARY","R")
Vyberite vid zarplaty
^W1DICT("CHOICEKINDOFSENDING","E")
Select a transmission type
^W1DICT("CHOICEKINDOFSENDING","H")
xeciy beq xga
^W1DICT("CHOICEKINDOFSENDING","R")
Vyberite vid posylki
^W1DICT("CHOICEKINDOFTABLE","E")
Select a table type
^W1DICT("CHOICEKINDOFTABLE","H")
ogley beq xga
^W1DICT("CHOICEMAP","E")
Select a map
^W1DICT("CHOICEMAP","H")
dtn xga
^W1DICT("CHOICEMENU","E")
Select a menu
^W1DICT("CHOICEMENU","H")
hixtz xga
^W1DICT("CHOICEMESSENGER","E")
Select a courier
^W1DICT("CHOICEMESSENGER","H")
gily xga
^W1DICT("CHOICEMESSENGER","R")
Vyberite posyl!mnogo
^W1DICT("CHOICEMINIMUM","E")
You must select at least $1 units
^W1DICT("CHOICEMINIMUM","H")
zecigi $1 zegtl xegal yi
^W1DICT("CHOICEMKRDLV","E")
Select an order source
^W1DICT("CHOICEMKRDLV","H")
dpnfd xewn xga
^W1DICT("CHOICEMONTH","E")
Select a month
^W1DICT("CHOICEMONTH","H")
yceg xga
^W1DICT("CHOICENOTFULL","E")
Incomplete selection
^W1DICT("CHOICENOTFULL","H")
`ln `l xgan
^W1DICT("CHOICEOPTION","E")
Select an option
^W1DICT("CHOICEOPTION","H")
divte` xga
^W1DICT("CHOICEOPTION","R")
Vyberite rejim
^W1DICT("CHOICEORDERKIND","E")
Select an order type
^W1DICT("CHOICEORDERKIND","H")
dpnfd beq xga
^W1DICT("CHOICEOTHEROPTIONFORMOVING","E")
Modify num of diners first or Select different option of transfer
^W1DICT("CHOICEOTHEROPTIONFORMOVING","H")
micreq 'qn dpy e` dxardl zxg` divte`a xga
^W1DICT("CHOICEOTHEROPTIONFORMOVING","R")
Vyberite drugu!u opci!u dl!a perenosa ili izm. !4islo goste!i
^W1DICT("CHOICEPAYMENT","E")
Please select a payment type
^W1DICT("CHOICEPAYMENT","H")
melyz beq xegal `p
^W1DICT("CHOICEPAYMENT","R")
Vyberite vid plateja
^W1DICT("CHOICEPOLYGON","E")
Select Region
^W1DICT("CHOICEPOLYGON","H")
xef` xga
^W1DICT("CHOICEPOSITION","E")
Please select a POS
^W1DICT("CHOICEPOSITION","H")
dcnr 'qn xegal `p
^W1DICT("CHOICEPOSITION","R")
vyberite nomer terminala
^W1DICT("CHOICEPRCCHNG","E")
Select Change Price
^W1DICT("CHOICEPRCCHNG","H")
xign iepiy xga
^W1DICT("CHOICERECEIVER","E")
Please select the recipient number
^W1DICT("CHOICERECEIVER","H")
lawnd xtqn xegal `p
^W1DICT("CHOICERECEIVER","R")
Vyberite nom. polu!4atel!a
^W1DICT("CHOICEREPORT","E")
Select report
^W1DICT("CHOICEREPORT","H")
g"ec xga
^W1DICT("CHOICEREPORT","R")
Vyberite ot!4et
^W1DICT("CHOICEREST","E")
Restaurants to choice
^W1DICT("CHOICEREST","H")
dcrqn xga
^W1DICT("CHOICEREST","R")
Vyberite restoran
^W1DICT("CHOICERESTAURANT","E")
Restaurants to choice
^W1DICT("CHOICERESTAURANT","H")
dcrqn xga
^W1DICT("CHOICERESTAURANT","R")
Vyberite rectoran
^W1DICT("CHOICESET","E")
Select Set
^W1DICT("CHOICESET","H")
hq xga
^W1DICT("CHOICESHOWOPTION","E")
Select output format
^W1DICT("CHOICESHOWOPTION","H")
dbvd ly divte` xga
^W1DICT("CHOICESHOWOPTION","R")
Vyberite vid pokaza
^W1DICT("CHOICESIZE","E")
Select a size
^W1DICT("CHOICESIZE","H")
dcin xga
^W1DICT("CHOICESUBGR","E")
Select Subgroup
^W1DICT("CHOICESUBGR","H")
-- dveaw zz xga --
^W1DICT("CHOICETABLE","E")
Please choose a table
^W1DICT("CHOICETABLE","H")
ogley xegal `p
^W1DICT("CHOICETABLE","R")
Vyberite stol
^W1DICT("CHOICEULAM","E")
Please choose a hall
^W1DICT("CHOICEULAM","H")
mle` xegal `p
^W1DICT("CHOICEVALUE","E")
Select a given
^W1DICT("CHOICEVALUE","H")
oezp xga
^W1DICT("CHOICEWAITER","E")
Select a waiter number
^W1DICT("CHOICEWAITER","H")
xvln xtqn xegal `p
^W1DICT("CHOICEWAITER","R")
Vyberite nomer oficianta
^W1DICT("CHOICEWEIGHTORDER","E")
Select order weight
^W1DICT("CHOICEWEIGHTORDER","H")
lwyn zpnfd xga
^W1DICT("CHOICEWORKER","E")
Select No. Employee
^W1DICT("CHOICEWORKER","H")
caer 'qn xga
^W1DICT("CHOICEWORKERKIND","E")
Select Employee Type
^W1DICT("CHOICEWORKERKIND","H")
micaer beq xga
^W1DICT("CHOICEWRKR","E")
Select an employee
^W1DICT("CHOICEWRKR","H")
caer xga
^W1DICT("CHOICEWTR","E")
Choose a waiter
^W1DICT("CHOICEWTR","H")
xvln xga
^W1DICT("CHOICEYEAR","E")
Select Year
^W1DICT("CHOICEYEAR","H")
dpy xga
^W1DICT("CHOICEZAG","E")
Select a display
^W1DICT("CHOICEZAG","H")
bv xga
^W1DICT("CHS","E")
Amount of check
^W1DICT("CHS","H")
wiy mekq
^W1DICT("CHS","R")
Summa !4eka
^W1DICT("CIBCMPSUM","E")
Sodexo company
^W1DICT("CIBCMPSUM","H")
dxag eqwceq
^W1DICT("CIBKIND","E")
Card type
^W1DICT("CIBKIND","H")
qihxk beq
^W1DICT("CIBKIND","R")
Vid karto!4ki
^W1DICT("CIBMVCPARAMETERS","E")
Parameters for Operation SODEXO
^W1DICT("CIBMVCPARAMETERS","H")
qeaiq rvanl mixhnxt
^W1DICT("CIBORDSUM","E")
SODEXO System
^W1DICT("CIBORDSUM","H")
zkxrn eqwceq
^W1DICT("CIBUS","E")
Sodexo
^W1DICT("CIBUS","H")
SODEXO qeaiq
^W1DICT("CIBUS","R")
Sibus
^W1DICT("CIBUSCARD","E")
Sodexo card
^W1DICT("CIBUSCARD","H")
(qeaiq) SODEXO qihxk
^W1DICT("CIBUSCARD","R")
Kart. Sibusa
^W1DICT("CIBUSERRORREPORT","E")
Error Sodexo Report
^W1DICT("CIBUSERRORREPORT","H")
qeaiq ze`iby g"ec
^W1DICT("CIBUSPARAMETERS","E")
System parameters for SODEXO
^W1DICT("CIBUSPARAMETERS","H")
"SODEXO" zkxrnl mixhnxt
^W1DICT("CIBUSPARAMETERS","R")
Parametry  dl!a sistemy "Sibus"
^W1DICT("CIBUSREPORT","E")
Customer payments report "SODEXO"
^W1DICT("CIBUSREPORT","H")
(qeaiq) "SODEXO" zegewl ly minelyz g"ec
^W1DICT("CITIESANDDISTRICTSTABLE","E")
City & Areas
^W1DICT("CITIESANDDISTRICTSTABLE","H")
mixef`e mixr 
^W1DICT("CITIESANDDISTRICTSTABLE","R")
Goroda i ra!iony
^W1DICT("CITIESFILESENDINGSTATUS","E")
Transmission status of cities file
^W1DICT("CITIESFILESENDINGSTATUS","H")
mixr uaew xeciy qehhq
^W1DICT("CITIESLIST","E")
Cities list
^W1DICT("CITIESLIST","H")
mixr zniyx
^W1DICT("CITIESLIST","R")
Spisok gorodov
^W1DICT("CITIESTABLE","E")
Cities table
^W1DICT("CITIESTABLE","H")
mixr zlah
^W1DICT("CITIESTABLE","R")
Spravo!4nik gorodov
^W1DICT("CITY","E")
City
^W1DICT("CITY","H")
xir
^W1DICT("CITY","R")
Gorod
^W1DICT("CITYCODE","E")
City code
^W1DICT("CITYCODE","H")
xir cew 
^W1DICT("CITYCODE","R")
Kod goroda
^W1DICT("CITYDISTRICTSTABLE","E")
City - Areas relation
^W1DICT("CITYDISTRICTSTABLE","H")
"mixef` - xir" dlah
^W1DICT("CITYDISTRICTSTABLE","R")
Tablica "Gorod - ra!iony"
^W1DICT("CITYMUSTBEFILLED","E")
In the "Address" field after the name of a street through a comma; fill the city
^W1DICT("CITYMUSTBEFILLED","H")
xird z` `lnl yi (,) wiqt jxc aegx my ixg` "zaezk" dcya
^W1DICT("CITYNAME","E")
City name
^W1DICT("CITYNAME","H")
xir my 
^W1DICT("CITYNAME","R")
Nazv.goroda
^W1DICT("CITYTABLE","E")
Cities table
^W1DICT("CITYTABLE","H")
mixr zlah
^W1DICT("CITYTABLE","R")
Spravo!4nik gorodov
^W1DICT("CLEAR","E")
Clear
^W1DICT("CLEAR","H")
dwp
^W1DICT("CLEAR","R")
O!4istit!m
^W1DICT("CLEARANDUPDATEORDER","E")
Clear and update an order
^W1DICT("CLEARANDUPDATEORDER","H")
dpnfd okcre dwp
^W1DICT("CLICK4COPY","E")
For show & copy order click on suitable line
^W1DICT("CLICK4COPY","H")
dni`zn dpnfd lr wilwdl `p dpnfd ly dwzrde dbvdl
^W1DICT("CLICK4COPY","R")
Dl!a razvernutogo pokaza i kopirovani!a zakaza kliknite na sootvetstvu!u!su!u stroku
^W1DICT("CLICKCONFIRM","E")
Your order has been approved! Thank you ! To view an order click here
^W1DICT("CLICKCONFIRM","H")
o`k ugl dpnfd zbvdl ! dax dcez ! dxye` dpnfdd
^W1DICT("CLICKCONFIRM","R")
Va!6 zakaz prin!at ! Dl!a prosmotra zakaza najmite s!uda
^W1DICT("CLICKORDER","E")
Click for show order
^W1DICT("CLICKORDER","H")
dpnfd zbvdl wilw
^W1DICT("CLICKTHEBID","E")
Thanks for your turn! For price quote click here
^W1DICT("CLICKTHEBID","H")
o`k ugl xign zrvdl ! jzipt lr dcez
^W1DICT("CLICKTHEBID","R")
Spasibo za pose!senie ! Dl!a polu!4eni!a pra!is-lista najmite s!uda
^W1DICT("CLICKTOORDERONLINE","E")
Online Reservation System Click here
^W1DICT("CLICKTOORDERONLINE","H")
o`k ugl oiil oe` zepnfd zkxrnl
^W1DICT("CLICKTOORDERONLINE","R")
Dl!a vhoda v sistemu zakazov on-la!in najmite s!uda
^W1DICT("CLIENT","E")
Client
^W1DICT("CLIENT","H")
gewl
^W1DICT("CLIENT","R")
Klient
^W1DICT("CLIENTPRICE","E")
The consumer price includes VAT
^W1DICT("CLIENTPRICE","H")
n"rn llek okxvl xign
^W1DICT("CLIENTPRICE","R")
Cena vkl!u!4a!a nal.sbor
^W1DICT("CLIENTSFILESENDINGSTATUS","E")
Status of Client File transmission
^W1DICT("CLIENTSFILESENDINGSTATUS","H")
zegewl uaew xeciy qehhq
^W1DICT("CLIENTSIGN","E")
Signature of the submitter
^W1DICT("CLIENTSIGN","H")
xqend znizg
^W1DICT("CLIENTSIGN","R")
Podpis!m klienta
^W1DICT("CLKTOTREPORT","E")
Summary of employee hours report
^W1DICT("CLKTOTREPORT","H")
micaer zery mekiq g"ec
^W1DICT("CLKTOTREPORT","R")
Ot!4et po !4asam raboty
^W1DICT("CLOCKWORKERSREPORT","E")
Summary of employee hours
^W1DICT("CLOCKWORKERSREPORT","H")
micaer zery mekiq
^W1DICT("CLOSE","E")
Close
^W1DICT("CLOSE","H")
xebq
^W1DICT("CLOSE","R")
Zakryt!m
^W1DICT("CLOSEAFTERMOVING","E")
Locking
^W1DICT("CLOSEAFTERMOVING","H")
dlirp
^W1DICT("CLOSEANDSHOWPLGN","E")
Close and display area
^W1DICT("CLOSEANDSHOWPLGN","H")
xef` bvde xebq
^W1DICT("CLOSECOURIERS","E")
Closing Couriers
^W1DICT("CLOSECOURIERS","H")
migily zxibq
^W1DICT("CLOSED","E")
Close
^W1DICT("CLOSED","H")
xebq
^W1DICT("CLOSED","R")
Zakryt!m
^W1DICT("CLOSEDAY","E")
Please make a date $1 closing
^W1DICT("CLOSEDAY","H")
 $1 mei zxibq rval `p
^W1DICT("CLOSEDAY","R")
Vypolnite zakrytie dn!a $1
^W1DICT("CLOSEDBY","E")
Close by
^W1DICT("CLOSEDBY","H")
ici lr xebq
^W1DICT("CLOSEDBY","R")
Upla!4eno posredstvom
^W1DICT("CLOSEDORDERS","E")
Closed orders
^W1DICT("CLOSEDORDERS","H")
zexebq zepnfd
^W1DICT("CLOSEDORDERS","R")
Zakrytye zakazy
^W1DICT("CLOSEINVOICES","E")
Cursor of invoices
^W1DICT("CLOSEINVOICES","H")
zeipeayg onq
^W1DICT("CLOSEINVOICES","R")
Pometit!m s!4et
^W1DICT("CLOSEMYCHECKORDERS","E")
Closing Orders "MyCheck"
^W1DICT("CLOSEMYCHECKORDERS","H")
 "wi'v iin" zepnfd zxibq
^W1DICT("CLOSEMYCHECKWAITERCALLS","E")
Closing Waiters [My Check]
^W1DICT("CLOSEMYCHECKWAITERCALLS","H")
[ w'v iin ] mixvln zeixw zxibq
^W1DICT("CLOSEORDER","E")
Close an order
^W1DICT("CLOSEORDER","H")
dpnfd xebq
^W1DICT("CLOSEORDER","R")
Zakryt!m zakaz
^W1DICT("CLOSEORDSINCASH","E")
Close order in cash
^W1DICT("CLOSEORDSINCASH","H")
onefna zepnfd xebq
^W1DICT("CLOSESET","E")
Close set
^W1DICT("CLOSESET","H")
hq xebq
^W1DICT("CLOSESET","R")
Zakryt!m set
^W1DICT("CLOSETABLE","E")
Close a table that remains open
^W1DICT("CLOSETABLE","H")
gezt x`ypy ogley zxibq
^W1DICT("CLOSINGDATE","E")
Closing date
^W1DICT("CLOSINGDATE","H")
dxibq jix`z
^W1DICT("CLOSINGDATE","R")
Data zakryti!a
^W1DICT("CLOSINGORDERS","E")
Closing orders
^W1DICT("CLOSINGORDERS","H")
zepnfd zxibq
^W1DICT("CLOSINGREPORTZ","E")
Closing Day Report (Z)
^W1DICT("CLOSINGREPORTZ","H")
Z mei zxibq g"ec
^W1DICT("CLSTBL","E")
Close a table
^W1DICT("CLSTBL","H")
ogley xebq
^W1DICT("CLUBCUSTCARD","E")
Club membership card
^W1DICT("CLUBCUSTCARD","H")
oecren xag qihxk
^W1DICT("CMNTCODE","E")
Code
^W1DICT("CMNTCODE","H")
cew
^W1DICT("CMNTCODE","R")
Kod
^W1DICT("CMNTNAME","E")
Contents of note
^W1DICT("CMNTNAME","H")
dxrd okez
^W1DICT("CMNTNAME","R")
Prime!4anie
^W1DICT("CMPRCMPNREPORT","E")
Comparative report on system data versus company data
^W1DICT("CMPRCMPNREPORT","H")
zexag ipezpl zkxrn ipezp oiia iz`eeyd g"ec
^W1DICT("CODE","E")
Code
^W1DICT("CODE","H")
cew
^W1DICT("CODE","R")
Kod
^W1DICT("CODEEXIST","E")
Code exist !
^W1DICT("CODEEXIST","H")
! miiw cew
^W1DICT("CODEEXIST","R")
Kod su!sestvuet !
^W1DICT("CODEISWRONG","E")
Incorrect code
^W1DICT("CODEISWRONG","H")
ieby cew
^W1DICT("CODEISWRONG","R")
O!6ibo!4ny!i kod
^W1DICT("CODEMUSTBEFILLED","E")
Enter a code
^W1DICT("CODEMUSTBEFILLED","H")
cew cilwdl `p
^W1DICT("CODEMUSTBENUMERIC","E")
Code should be numeric
^W1DICT("CODEMUSTBENUMERIC","H")
izxtiq zeidl xen` cew
^W1DICT("CODENOTEXIST","E")
Nonexistent code
^W1DICT("CODENOTEXIST","H")
! miiw `l cew
^W1DICT("CODENOTEXIST","R")
Kod ne su!sestvuet !
^W1DICT("CODENOTVALID","E")
Invalid code
^W1DICT("CODENOTVALID","H")
oekp `l cew
^W1DICT("CODENOTVALID","R")
Neverny!i kod
^W1DICT("CODEORNAME","E")
Code or start name
^W1DICT("CODEORNAME","H")
my zligz e` cew
^W1DICT("CODEORTEL","E")
Customer or phone number
^W1DICT("CODEORTEL","H")
'lh e` gewl 'qn
^W1DICT("CODEORTEL","R")
Nom. klienta ili tel.
^W1DICT("COEFFICIENTSTABLE","E")
Table of conversion coefficients
^W1DICT("COEFFICIENTSTABLE","H")
dxnd incwn zlah
^W1DICT("COLOR","E")
Color
^W1DICT("COLOR","H")
rav
^W1DICT("COLORTABLE","E")
Colors table
^W1DICT("COLORTABLE","H")
mirav zlah
^W1DICT("COLPM","E")
Payments number
^W1DICT("COLPM","H")
minelyz 'qn
^W1DICT("COLPM","R")
K-vo plateje!i
^W1DICT("COLSNUMBERTOOSMALL","E")
No columns are enough for all defined slots
^W1DICT("COLSNUMBERTOOSMALL","H")
zexcbend zevayn lkl witqn `l mixeh 'qn
^W1DICT("COLUMN","E")
Column
^W1DICT("COLUMN","H")
xeh
^W1DICT("COLUMNS","E")
Columns
^W1DICT("COLUMNS","H")
mixeh
^W1DICT("COLXADD","E")
Number of columns in the Adds list
^W1DICT("COLXADD","H")
zeteqz zniyxa mixeh xtqn
^W1DICT("COLXGR","E")
Number of columns in a list of item groups
^W1DICT("COLXGR","H")
mihixt zeveaw zniyxa mixeh xtqn
^W1DICT("COLXGRMLZ","E")
Nqtx hexim axyinz nlvxim
^W1DICT("COLXGRMLZ","H")
mixvln zniyxa mixeh xtqn
^W1DICT("COLXGRMSF","E")
Number of columns in a list of item groups
^W1DICT("COLXGRMSF","H")
mihixt zeveaw zniyxa mixeh xtqn
^W1DICT("COLXIT","E")
Number of columns in a list of items
^W1DICT("COLXIT","H")
mihixt zniyxa mixeh xtqn
^W1DICT("COLXMLZ","E")
Number of columns on waiters list
^W1DICT("COLXMLZ","H")
mixvln zniyxa mixeh xtqn
^W1DICT("COLXPRTMSF","E")
Number of columns in a list of items
^W1DICT("COLXPRTMSF","H")
mihixt zniyxa mixeh xtqn
^W1DICT("COLXSH","E")
Number of columns in a list of tables
^W1DICT("COLXSH","H")
zepgley zniyxa mixeh xtqn
^W1DICT("COLYADD","E")
Number of rows in the Adds list
^W1DICT("COLYADD","H")
zetqez zniyxa zexey xtqn
^W1DICT("COLYGR","E")
Number of rows in a list of item groups
^W1DICT("COLYGR","H")
mihixt zeveaw zniyxa zexey xtqn
^W1DICT("COLYGRMSF","E")
Number of rows in a list of item groups
^W1DICT("COLYGRMSF","H")
mihixt zeveaw zniyxa zexey xtqn
^W1DICT("COLYMLZ","E")
Number of rows in the waiters list
^W1DICT("COLYMLZ","H")
mixvln zniyxa zexey xtqn
^W1DICT("COLYPRT","E")
Number of rows in a list of items
^W1DICT("COLYPRT","H")
mihixt zniyxa zexey xtqn
^W1DICT("COLYPRTMSF","E")
Number of rows in a list of items
^W1DICT("COLYPRTMSF","H")
mihixt zniyxa zexey xtqn
^W1DICT("COLYSH","E")
Number of rows in a list of tables
^W1DICT("COLYSH","H")
zepgley zniyxa zexey xtqn
^W1DICT("COMMENT","E")
Comments
^W1DICT("COMMENT","H")
dxrd
^W1DICT("COMMENT","R")
Prime!4ani!a
^W1DICT("COMMENT2ADR","E")
Note to address
^W1DICT("COMMENT2ADR","H")
zaezkl dxrd
^W1DICT("COMMENT2CHECKER","E")
Note to the Dispatcher
^W1DICT("COMMENT2CHECKER","H")
xw'vl dxrd
^W1DICT("COMMENT2CUSTOM","E")
Customer description
^W1DICT("COMMENT2CUSTOM","H")
gewl xe`z
^W1DICT("COMMENT2KITCHEN","E")
Comments to kitchen
^W1DICT("COMMENT2KITCHEN","H")
gahnl dxrd
^W1DICT("COMMENT2KITCHEN","R")
Prime!4ani!a
^W1DICT("COMMENT2MAIL","E")
Comments to email
^W1DICT("COMMENT2MAIL","H")
liinl zexrd
^W1DICT("COMMENT2ORD","E")
Comments to order
^W1DICT("COMMENT2ORD","H")
dpnfdl dxrd
^W1DICT("COMMENT2ORDER","E")
Comments to order ( not to kitchen !)
^W1DICT("COMMENT2ORDER","H")
 ( ! gahnl `l ) <BR> dxrd
^W1DICT("COMMENT2ORDER","R")
Prime!4ani!a k zakazu
^W1DICT("COMMENTEXIST","E")
Note exists
^W1DICT("COMMENTEXIST","H")
zniiw dxrd
^W1DICT("COMMENTIN","E")
Customer Note
^W1DICT("COMMENTIN","H")
gewl lr dxrd
^W1DICT("COMMENTS","E")
Comments
^W1DICT("COMMENTS","H")
zexrd
^W1DICT("COMMENTS2ORDNOREST","E")
Comments to order
^W1DICT("COMMENTSTABLE","E")
Comments table
^W1DICT("COMMENTSTABLE","H")
zexrd zlah
^W1DICT("COMMENTSTABLE","R")
Tablica prime!4ani!i
^W1DICT("COMPANY","E")
Company
^W1DICT("COMPANY","H")
dxag
^W1DICT("COMPANYCARD","E")
Company card
^W1DICT("COMPANYCARD","H")
dxag qihxk
^W1DICT("COMPANYCARD","R")
Karto!4ka kompanii
^W1DICT("COMPANYCARDSREPORTS","E")
Companies card reports
^W1DICT("COMPANYCARDSREPORTS","H")
zexag itl zeg"ec
^W1DICT("COMPANYCODE","E")
Company number
^W1DICT("COMPANYCODE","H")
dxag xtqn
^W1DICT("COMPANYNAME","E")
Company name
^W1DICT("COMPANYNAME","H")
dxag my
^W1DICT("COMPANYNAME","R")
Organizaci!a
^W1DICT("COMPANYNUMBER","E")
Company number
^W1DICT("COMPANYNUMBER","H")
dxag 'qn
^W1DICT("COMPANYNUMBER","R")
Nomer kompanii
^W1DICT("COMPANYZREPORT","E")
Customers of "$1" report to date $2
^W1DICT("COMPAR","E")
Compare
^W1DICT("COMPAR","H")
deeyd
^W1DICT("COMPAREDD","E")
Compare $1 of a day $2 a month $3 a year $4 against month $5 a year $6
^W1DICT("COMPAREDD","H")
$6 dpy $5 yceg len $4 dpy $3 yceg $2 mei ly $1 z`eeyd
^W1DICT("COMPARTO","E")
Compare to
^W1DICT("COMPARTO","H")
len
^W1DICT("COMPENSATIONREPORT","E")
Compensation report
^W1DICT("COMPENSATIONREPORT","H")
mievit g"ec
^W1DICT("COMPENSCONTENT","E")
Compensation content
^W1DICT("COMPENSCONTENT","H")
ievit okez
^W1DICT("COMPENSREASON","E")
Compensation reason
^W1DICT("COMPENSREASON","H")
ievit zaiq
^W1DICT("COMPLEXLUNCH","E")
Complex Lunch
^W1DICT("COMPLEXLUNCH","H")
ziwqr dgex`
^W1DICT("COMPRDEL","E")
Coordinator of cancellations
^W1DICT("COMPRDEL","H")
milehia fkx
^W1DICT("COMPRDEL","R")
Sjat!m udaleni!a
^W1DICT("COMPRESSVIEW","E")
Display without addons
^W1DICT("COMPRESSVIEW","H")
zetqez hexit `ll bvd
^W1DICT("COMPRESSVIEW","R")
Pokazat!m bez dobavok
^W1DICT("COMPSUBADD","E")
Calculation of sub-additions
^W1DICT("COMPSUBADD","H")
zetqez-zz aeyig
^W1DICT("COMPUTENEWPRICE","E")
Refresh cost of components
^W1DICT("COMPUTENEWPRICE","H")
miaikxn zelr oprx
^W1DICT("CONCENTRATED","E")
Concentrated
^W1DICT("CONCENTRATED","H")
fkexn
^W1DICT("CONCENTRATEDBACKINVOICEISSUE","E")
Producing a centralize refund invoice
^W1DICT("CONCENTRATEDBACKINVOICEISSUE","H")
zfkxn iekif zipeayg zwtd
^W1DICT("CONCENTRATEDINVOICEISSUE","E")
Producing a billing invoice
^W1DICT("CONCENTRATEDINVOICEISSUE","H")
zfkxn zipeayg zwtd
^W1DICT("CONCENTRATEDINVOICEISSUE","R")
Svodna!a vedomost!m
^W1DICT("CONCENTRATEDINVOICES","E")
Centralized invoices
^W1DICT("CONCENTRATEDINVOICES","H")
zefkexn zeipeayg
^W1DICT("CONCENTRATEDPERDATE","E")
Concentrated by dates
^W1DICT("CONCENTRATEDPERDATE","H")
mikix`z itl fkexn
^W1DICT("CONCENTRATEDPERDATE","R")
Svod po datam
^W1DICT("CONCENTRATEDREPORT","E")
A report was presented in a concentrated manner
^W1DICT("CONCENTRATEDREPORT","H")
zfkexn dxeva bved g"ec 
^W1DICT("CONCONLY","E")
Just concentration
^W1DICT("CONCONLY","H")
fekix wx
^W1DICT("CONCPERBRANCH","E")
Do a concentration by branches
^W1DICT("CONCPERBRANCH","H")
mitipq itl fkx
^W1DICT("CONCPERDATE","E")
Concentrate by dates
^W1DICT("CONCPERDATE","H")
mikix`z itl fkx
^W1DICT("CONCPERDATE","R")
Svesti po datam
^W1DICT("CONCPERPERIOD","E")
Do a concentration by period
^W1DICT("CONCPERPERIOD","H")
dtewz itl fkx
^W1DICT("CONCREPORT","E")
A concentrated report
^W1DICT("CONCREPORT","H")
fkexn g"ec
^W1DICT("CONCSHOW","E")
Show compactly
^W1DICT("CONCSHOW","H")
zfkexn dxeva bvd
^W1DICT("CONCTIMEREPORT","E")
Concentrated delivery time report
^W1DICT("CONCTIMEREPORT","H")
fkexn migelyn zwtq` onf ly g"ec
^W1DICT("CONDITIONS","E")
Extra services
^W1DICT("CONDITIONS","H")
mitqep mizexy
^W1DICT("CONDITIONS","R")
Dop. uslugi
^W1DICT("CONF","E")
Configuration $1
^W1DICT("CONF","H")
$1 divxebitpew
^W1DICT("CONFLICTWITHITEMS","E")
Collision with item settings
^W1DICT("CONFLICTWITHITEMS","H")
mihixt zexcbd mr zeybpzd
^W1DICT("CONNECT2CREDCOMP","E")
Please call to credit company on the phone $1 and get permission to cancel
^W1DICT("CONNECT2CREDCOMP","H")
$1 'lha xeyi` lawle <BR> i`xy` zxagl xywzdl `p
^W1DICT("CONNECTCOMMENT","E")
Fixed note
^W1DICT("CONNECTCOMMENT","H")
dreaw dxrd
^W1DICT("CONNECTERROR","E")
Communication error $1
^W1DICT("CONNECTERROR","H")
$1 zxeywz z`iby
^W1DICT("CONNECTERRORDERS","E")
Show orders with communication errors only
^W1DICT("CONNECTERRORDERS","H")
cala zxeywz ze`iby mr zepnfd bvd
^W1DICT("CONNECTIONERROR","E")
Connection error $1
^W1DICT("CONNECTIONERROR","H")
$1 zxeywz d`iby
^W1DICT("CONTACTMAN","E")
Contact
^W1DICT("CONTACTMAN","H")
xyw yi`
^W1DICT("CONTACTMAN","R")
Sv!azat!ms!a s 
^W1DICT("CONTACTMAN1","E")
Contact1
^W1DICT("CONTACTMAN1","H")
g"ldpd ly xyw yi`
^W1DICT("CONTACTUS","E")
Contact Us
^W1DICT("CONTACTUS","H")
xyw xev
^W1DICT("CONTACTUS","R")
Sv!ajites!m s nami
^W1DICT("CONTENT","E")
Content
^W1DICT("CONTENT","H")
okez
^W1DICT("CONTINUE","E")
Continue
^W1DICT("CONTINUE","H")
jynd
^W1DICT("CONTINUE","R")
Prodoljit!m
^W1DICT("CONTINUECLOSING","E")
Continue a closing ?
^W1DICT("CONTINUECLOSING","H")
? dxibq jiyndl
^W1DICT("CONTINUENEXTPAGE","E")
Continuation in the next page
^W1DICT("CONTINUENEXTPAGE","H")
`ad sca jynd
^W1DICT("CONTINUENEXTPAGE","R")
Prod-e na sled. str.
^W1DICT("CONTINUEWORK","E")
Keep working
^W1DICT("CONTINUEWORK","H")
dceara jynd
^W1DICT("COORD","E")
Coordinates
^W1DICT("COORD","H")
zehpicxe`ew
^W1DICT("COPY","E")
Copy
^W1DICT("COPY","H")
wzrd
^W1DICT("COPY","R")
Skop-t!m
^W1DICT("COPY2DLVDOC","E")
Copy to a document
^W1DICT("COPY2DLVDOC","H")
dcerzl wizrdl
^W1DICT("COPY2INVOICE","E")
Copy to invoice
^W1DICT("COPY2INVOICE","H")
zipeaygl wizrdl
^W1DICT("COPY2NEWDEALINVOICE","E")
Copy a new deal invoice
^W1DICT("COPY2NEWDEALINVOICE","H")
dycg dwqr zipeaygl wizrdl
^W1DICT("COPY2NEWDOC","E")
Copy to New Doc
^W1DICT("COPY2NEWDOC","H")
ycg jnqnl dwzrd
^W1DICT("COPY2NEWDOC","R")
Skop-t!m sod-e v dr. dok-t
^W1DICT("COPY2NEWINVOICE","E")
Copy To new Invoice
^W1DICT("COPY2NEWINVOICE","H")
dycg zipeaygl wizrdl
^W1DICT("COPY2NEWINVOICE","R")
Sklp-t!m sod-e v dr. nakladnu!u
^W1DICT("COPY2NEWORDER","E")
Copy content to new order
^W1DICT("COPY2NEWORDER","H")
dycg dpnfdl okez wizrd
^W1DICT("COPY2ORD","E")
Copy Order
^W1DICT("COPY2ORD","H")
dpnfd wizrdl
^W1DICT("COPY2ORD","R")
Skopirovat!m zakaz
^W1DICT("COPYCODEISWRONG","E")
Copy code is wrong
^W1DICT("COPYCODEISWRONG","H")
ieby dwzrdl cew
^W1DICT("COPYCODEISWRONG","R")
Kod dl!a kop-!a o!6ibo!4en
^W1DICT("COPYFROM","E")
Copy from
^W1DICT("COPYFROM","H")
-n wizrdl
^W1DICT("COPYFROM","R")
Skop-t!m iz
^W1DICT("COPYFROMLASTDAY","E")
Copy items from last day
^W1DICT("COPYFROMLASTDAY","H")
oexg` mein mihixt wizrdl
^W1DICT("COPYIT","E")
Copy
^W1DICT("COPYIT","H")
wizrl
^W1DICT("COPYIT","R")
Skop-t!m
^W1DICT("COPYITEMFROMORDER","E")
Duplicate item ?
^W1DICT("COPYITEMFROMORDER","H")
? hixt ltkyl
^W1DICT("COPYITEMSFROMTABLE","E")
Copy items from a table $1
^W1DICT("COPYITEMSFROMTABLE","H")
$1 ogleyn mihixt zwzrd
^W1DICT("COPYLINK","E")
Copy Link
^W1DICT("COPYLINK","H")
mixg` mihixt mr xyw wizrd
^W1DICT("COPYORDER","E")
Copy Order
^W1DICT("COPYORDER","H")
dpnfd wizrdl
^W1DICT("COPYSUMTOO","E")
Copy amounts too ?
^W1DICT("COPYSUMTOO","H")
minekq mb wizrdl
^W1DICT("COPYSUMTOO","R")
Skop-t!m vkl!u!4a!a itogi
^W1DICT("COPYTO","E")
Copy to:
^W1DICT("COPYTO","H")
:l wizrdl
^W1DICT("COPYTO","R")
Skopirovat!m v:
^W1DICT("COPYZREPORT","E")
Closing Day Report(Copy)
^W1DICT("COPYZREPORT","H")
(wzrd) mei zxibq g"ec
^W1DICT("COPYZREPORT","R")
Dnevno!i ot!4et po kasse
^W1DICT("CORRESPONDENCE","E")
Сorrespondence
^W1DICT("CORRESPONDENCE","H")
zeazkzd
^W1DICT("COST","E")
Cost
^W1DICT("COST","H")
ieey
^W1DICT("COST","R")
Stoimost!m
^W1DICT("COSTINGPRICE","E")
Cost
^W1DICT("COSTINGPRICE","H")
zelr xign
^W1DICT("COSTINGPRICE","R")
Sebestoimost!m
^W1DICT("COUNTING","E")
Сounting
^W1DICT("COUNTING","H")
dxitq
^W1DICT("COUPNUMBER","E")
Coupon Number
^W1DICT("COUPNUMBER","H")
oetew 'qn
^W1DICT("COUPON","E")
Coupon Number
^W1DICT("COUPON","H")
oetew 'qn
^W1DICT("COUPONCHANGE","E")
Change $ 1
^W1DICT("COUPONCHANGE","H")
g"y $1 yelzn scer
^W1DICT("COUPONPHONE","E")
Couponphone
^W1DICT("COUPONPHONE","H")
ficeb
^W1DICT("COUPONPHONE","R")
Kuponfon
^W1DICT("COUPONSALES","E")
Coupon Specials
^W1DICT("COUPONSALES","H")
mipetew ly mirvan
^W1DICT("COUPONSALES","R")
Akcii po kuponam
^W1DICT("COUPPH","E")
Couponphone
^W1DICT("COUPPH","H")
iceb
^W1DICT("COUPPHPARAMETERS","E")
Couponphone parameters
^W1DICT("COUPPHPARAMETERS","H")
qxhnxt iceb
^W1DICT("COUPSOLD","E")
A coupon with such a number is sold by order $1
^W1DICT("COUPSOLD","H")
$1 dpnfda xknp dfk xtqn mr oetew
^W1DICT("COURIER","E")
Courier
^W1DICT("COURIER","H")
gily
^W1DICT("COURIEREXITTIME","E")
Delivery time
^W1DICT("COURIEREXITTIME","H")
gily z`ivi onf
^W1DICT("COURIERNAME","E")
Courier name
^W1DICT("COURIERNAME","H")
gily my
^W1DICT("COURIERNUMBER","E")
Courier number
^W1DICT("COURIERNUMBER","H")
gily 'qn
^W1DICT("COURIERS","E")
Number of messengers
^W1DICT("COURIERS","H")
migily 'qn
^W1DICT("COURIERSLOCATION","E")
Couriers location
^W1DICT("COURIERSLOCATION","H")
migily mewin
^W1DICT("COURIERSMANYREPORT","E")
Report of couriers
^W1DICT("COURIERSMANYREPORT","H")
itqk migily g"ec
^W1DICT("COURIERSORDERSREPORT","E")
Courier report by orders
^W1DICT("COURIERSORDERSREPORT","H")
zepnfd itl migily g"ec
^W1DICT("COURIERSPLAN","E")
Couriers planning
^W1DICT("COURIERSPLAN","H")
migily oepkz
^W1DICT("COURIERSPLANTODATE","E")
Planning of couriers to $1
^W1DICT("COURIERSPLANTODATE","H")
$1 - l migily oepkz
^W1DICT("COURIERSTABLE","E")
Couriers table
^W1DICT("COURIERSTABLE","H")
migily zlah
^W1DICT("COURIERTABLE","E")
Couriers table
^W1DICT("COURIERTABLE","H")
migily zlah
^W1DICT("COURMG","E")
Couriers management
^W1DICT("COURMG","H")
migily ledip
^W1DICT("CPHI2HB","E")
Pass to a tax invoice
^W1DICT("CPHI2HB","H")
qn zipeaygl xiard
^W1DICT("CPREPORT","E")
Couponphone card payments report
^W1DICT("CPREPORT","H")
"iceb" iqihxka minelyz  g"ec
^W1DICT("CRCARD","E")
Credit card
^W1DICT("CRCARD","H")
i`xy` qihxk
^W1DICT("CRCARD","R")
Kreditna!a karto!4ka
^W1DICT("CRCARD1","E")
Credit card
^W1DICT("CRCARD1","H")
i`xy` qihxk
^W1DICT("CRCARD1","R")
Kred. karto!4ka
^W1DICT("CRCARD1C","E")
One payment
^W1DICT("CRCARD1C","H")
cg` melyz
^W1DICT("CRCARD1C","R")
Odin platej
^W1DICT("CRCARDDET","E")
Enter password 2
^W1DICT("CRCARDDET","H")
2 dnqiq ywd
^W1DICT("CRCARDNUMBER","E")
Credit card number
^W1DICT("CRCARDNUMBER","H")
i`xy` qihxk 'qn
^W1DICT("CRCARDNUMBER","R")
Nom. kred. karto!4ki
^W1DICT("CRCARDOK","E")
Correct transaction
^W1DICT("CRCARDOK","H")
dpiwz dwqr
^W1DICT("CRCARDOK","R")
Vypolneno uspe!6no
^W1DICT("CRCARDPAYMENT","E")
Payment by credit card
^W1DICT("CRCARDPAYMENT","H")
i`xy` qihxka melyz
^W1DICT("CRCARDPC","E")
Payments
^W1DICT("CRCARDPC","H")
minelyz
^W1DICT("CRCARDPC","R")
na plateji
^W1DICT("CRCARDPERIOD","E")
Credit card period
^W1DICT("CRCARDPERIOD","H")
cr swez
^W1DICT("CRCARDPERIOD","R")
Deistvitel!mna do
^W1DICT("CREATEDORDER","E")
Created order
^W1DICT("CREATEDORDER","H")
dxvepy dpnfd
^W1DICT("CREATEDORDER","R")
Sformirovanny!i zakaz
^W1DICT("CREATEGROUPTABLES","E")
Setting up group tables
^W1DICT("CREATEGROUPTABLES","H")
zizveaw zepgley znwd
^W1DICT("CREATEITTREE","E")
Establish a product tree
^W1DICT("CREATEITTREE","H")
xven ur mwd
^W1DICT("CREATELINK","E")
Create Link
^W1DICT("CREATELINK","H")
mixg` mihixt mr xyw xev
^W1DICT("CREATENEWCUSTOM","E")
Establishing a new customer
^W1DICT("CREATENEWCUSTOM","H")
ycg gewl znwd
^W1DICT("CREATENEWDOC","E")
Copy to new document
^W1DICT("CREATENEWDOC","H")
ycg jnqnl wzrd
^W1DICT("CREATENEWDOC","R")
Skopiru!i v nov. dok-t
^W1DICT("CREATENEWFILE2HASHAVSHEVET","E")
Create a new client file for transfer to the computer
^W1DICT("CREATENEWFILE2HASHAVSHEVET","H")
zayaygl dxardl ycg zegewl uaew znwd
^W1DICT("CREATENEWITEM","E")
An item with such code does not exist. To establish ?
^W1DICT("CREATENEWITEM","H")
 ? miwdl . miiw `l dfk cew mr hixt
^W1DICT("CREATENEWPLGN","E")
Create a new area
^W1DICT("CREATENEWPLGN","H")
ycg xef` xev
^W1DICT("CREATENEWTABLES","E")
Setting up new tables
^W1DICT("CREATENEWTABLES","H")
miycg zepgley znwd
^W1DICT("CREATEORUPDATESET","E")
Set up or change sets
^W1DICT("CREATEORUPDATESET","H")
mihq iepiy e` dnwd
^W1DICT("CREATEPRINTERCONFIGURATIONS","E")
Setting up of kitchen printers configuration
^W1DICT("CREATEPRINTERCONFIGURATIONS","H")
mipea zeqtcn zeivebitpew ly dnwd
^W1DICT("CREATEPRSNLAREA","E")
Setting up a personal area
^W1DICT("CREATEPRSNLAREA","H")
iyi` xef` znwd
^W1DICT("CREATESHVATERM","E")
Definition of the SBA terminal
^W1DICT("CREATESHVATERM","H")
`"ay seqn zxcbd
^W1DICT("CREDCARDOUT","E")
External credit card
^W1DICT("CREDCARDOUT","H")
ipevig i`xy` qihxk
^W1DICT("CREDCARDSTRANSMISSIONFAILED","E")
Credit cards in last transmission were not transmitted
^W1DICT("CREDCARDSTRANSMISSIONFAILED","H")
excey `l oexg` xeciya i`xy` iqihxk
^W1DICT("CREDIT","E")
Credit
^W1DICT("CREDIT","H")
dtwd
^W1DICT("CREDIT","R")
V kredit
^W1DICT("CREDITACCOUNT","E")
Credit Bill
^W1DICT("CREDITACCOUNT","H")
dtwd oeayg
^W1DICT("CREDITACCOUNT","R")
Kreditny!i s!4et
^W1DICT("CREDITACCOUNTPRINTED","E")
Credit slip printed
^W1DICT("CREDITACCOUNTPRINTED","H")
qtced i`xy` yelz
^W1DICT("CREDITANDSERVISTABLE","E")
Credit permission table
^W1DICT("CREDITANDSERVISTABLE","H")
l"`ecl zeipeayg  , gelyn incn xeht, dtwd ixeyi` 
^W1DICT("CREDITANDSERVISTABLE","R")
Vozmojnost!m pokupat!m v kredit
^W1DICT("CREDITCARD","E")
Credit card
^W1DICT("CREDITCARD","H")
i`xy` qihxk
^W1DICT("CREDITCARD","R")
Kred. karta
^W1DICT("CREDITCARD4","E")
Credit card number or last 4 digits
^W1DICT("CREDITCARD4","H")
zepexg` zextq 4 e` <BR> i`xy` qihxk 'qn
^W1DICT("CREDITCARDKIND","E")
C/card type
^W1DICT("CREDITCARDKIND","H")
`"k beq
^W1DICT("CREDITCARDKIND","R")
Vid kr.kart.
^W1DICT("CREDITCARDNUMBER","E")
Credit card number
^W1DICT("CREDITCARDNUMBER","H")
i`xy` qihxk 'qn
^W1DICT("CREDITCARDNUMBER","R")
Nomer kreditno!i karto!4ki
^W1DICT("CREDITCARDS","E")
Credit cards
^W1DICT("CREDITCARDS","H")
i`xy` iqihxk
^W1DICT("CREDITCARDS","R")
Kred. karty
^W1DICT("CREDITCARDSYSTEM","E")
Credit card payment system
^W1DICT("CREDITCARDSYSTEM","H")
i`xy` qihxka minelyz zkxrn
^W1DICT("CREDITCUSTOMERSONLY","E")
Coffee customers only
^W1DICT("CREDITCUSTOMERSONLY","H")
cala dtwd zegewl
^W1DICT("CREDITDAYOVER","E")
Above a daily ceiling !
^W1DICT("CREDITDAYOVER","H")
! zinei dxwiz lrn
^W1DICT("CREDITDAYOVERDRAFT","E")
Up to daily ceiling remains $ 1 NIS
^W1DICT("CREDITDAYOVERDRAFT","H")
g"y $1 x`yp zinei dxwizd cr
^W1DICT("CREDITINVOICES","E")
All billing invoices
^W1DICT("CREDITINVOICES","H")
aeig zeipeaygd lk
^W1DICT("CREDITINVOICES","R")
Vse kred. s!4eta
^W1DICT("CREDITORDERSREPORT","E")
Orders credit report
^W1DICT("CREDITORDERSREPORT","H")
dtwd zepnfd g"ec
^W1DICT("CREDITOVER","E")
Customer can not acquire products on credit until that will not pay the debt
^W1DICT("CREDITOVER","H")
aegd z` mlyi `ly cr dtwda mixven yekxl leki `l gewl
^W1DICT("CREDITOVER","R")
Klient is!4erpal kredit
^W1DICT("CREDITOVERDRAFT","E")
Customer can acquire products on credit to the amount not more than $1 shekels
^W1DICT("CREDITOVERDRAFT","H")
g"y $1 -n xzei `l mekql dtwda mixven yekxl leki gewl
^W1DICT("CREDITOVERDRAFT","R")
Kredit klienta do $1 rub
^W1DICT("CREDITPAYMENTFAULT","E")
Credit card payment failed !
^W1DICT("CREDITPAYMENTFAULT","H")
! lykp i`xy` qihxka melyz
^W1DICT("CREDITPERMISSION","E")
Approval to her circumference
^W1DICT("CREDITPERMISSION","H")
dtwdl xeyi`
^W1DICT("CREDITPERMISSION","R")
Razre!6enie na kredit
^W1DICT("CREDITSALESONLY","E")
Only sales of items on credit
^W1DICT("CREDITSALESONLY","H")
dtwda mihixt zexikn wx
^W1DICT("CREDSUCCESS","E")
Deal was carried out successfully
^W1DICT("CREDSUCCESS","H")
dglva drvea dwqr
^W1DICT("CREDSUCCESS","R")
Vypolneno uspe!6no
^W1DICT("CRSHVKOD","E")
Establishment of a file of the ABS
^W1DICT("CRSHVKOD","H")
`"ay zerced uaew znwd
^W1DICT("CSHCODE","H")
cew y`w
^W1DICT("CSR","E")
POS
^W1DICT("CSR","H")
dtew
^W1DICT("CSR","R")
Kassa
^W1DICT("CSRDATE","E")
Date of POS
^W1DICT("CSRDATE","H")
dtew jix`z
^W1DICT("CSRDATE","R")
Data kassy
^W1DICT("CSRDEPOSITION","E")
Deposited at the POS
^W1DICT("CSRDEPOSITION","H")
dtewa cwted
^W1DICT("CSRHISTORY","E")
History of the POS $1
^W1DICT("CSRHISTORY","H")
$1 dtew ly dixehqd
^W1DICT("CSRHISTORY","R")
Istori!a kassy $1
^W1DICT("CSRITEMS","E")
POS items
^W1DICT("CSRITEMS","H")
dtew ihixt
^W1DICT("CSRITEMSDOCS","E")
View documents with POS items
^W1DICT("CSRITEMSDOCS","H")
dtew ihixt mr miknqn bvd
^W1DICT("CSRNOTBUSY","E")
POS not busy
^W1DICT("CSRNOTBUSY","H")
dqetz `l dtew
^W1DICT("CSRNOTEXIST","E")
POS $ 1 does not exist in the system
^W1DICT("CSRNOTEXIST","H")
zkxrna zniiw `l $1 dtew
^W1DICT("CSRNUMBER","E")
POS
^W1DICT("CSRNUMBER","H")
dtew
^W1DICT("CSRNUMBER","R")
Kassa
^W1DICT("CSRORDNUMBER","E")
Order number at checkout
^W1DICT("CSRORDNUMBER","H")
dtewa dpnfd 'qn
^W1DICT("CSRPARAMETERS","E")
Txnhxim lwetd xeynz
^W1DICT("CSRPARAMETERS","H")
znyex dtewl mixhnxt
^W1DICT("CSRPARAMETERSDEFINITION","E")
Print parameters for bill printer
^W1DICT("CSRPARAMETERSDEFINITION","H")
zepeayg zqtcnl dqtcdl mixhnxt
^W1DICT("CSRPRINT","E")
Print to POS printer
^W1DICT("CSRPRINT","H")
dtew zqtcnl qtcd
^W1DICT("CSRPRINTDLV","E")
Print Copy a delivery note to the POS printer
^W1DICT("CSRPRINTDLV","H")
dtew zqtcnl gelyn 'rz qtcd
^W1DICT("CSRPRINTINVC","E")
Print copy invoice to POS printer
^W1DICT("CSRPRINTINVC","H")
dtew zqtcnl 'ayg wzrd qtcd
^W1DICT("CSRPRINTORD","E")
Print to POS Printer
^W1DICT("CSRPRINTORD","H")
dtew zqtcnl qtcd
^W1DICT("CSRRANGEWRONG","E")
Incorrect range of POS
^W1DICT("CSRRANGEWRONG","H")
oekp `l zetew geeh
^W1DICT("CSRRANGEWRONG","R")
Neverny!i diapazon kass
^W1DICT("CSRREPORT","E")
POS Report
^W1DICT("CSRREPORT","H")
dtew g"ec
^W1DICT("CSRREPORT","R")
Kassovy!i ot!4et
^W1DICT("CSRSTATUS","E")
POS mode
^W1DICT("CSRSTATUS","H")
dtew avn
^W1DICT("CURRENCY","E")
Currency
^W1DICT("CURRENCY","H")
rahn
^W1DICT("CURRENCYNAME","E")
Currency type
^W1DICT("CURRENCYNAME","H")
rahn beq
^W1DICT("CURRENCYRATE","E")
Currency rate
^W1DICT("CURRENCYRATE","H")
rahn xry
^W1DICT("CURRENCYTABLE","E")
Currency table
^W1DICT("CURRENCYTABLE","H")
zerahn zlah
^W1DICT("CURRENTCONFIGURATION","E")
Current Configuration
^W1DICT("CURRENTCONFIGURATION","H")
zgikep divxebitpew
^W1DICT("CURSORHERE","E")
Put cursor here
^W1DICT("CURSORHERE","H")
dtl onq miy
^W1DICT("CURSORHERE","R")
Kursor s!uda
^W1DICT("CUSTBUSINESSID","E")
Customer's ID
^W1DICT("CUSTBUSINESSID","H")
gewl ly .n.r/.t.g/.f.z
^W1DICT("CUSTCLOSED","E")
Inactive!
^W1DICT("CUSTCLOSED","H")
!xebq gewl
^W1DICT("CUSTCLOSED","R")
Klient otkl!u!4en ot sistemy
^W1DICT("CUSTCODE","E")
Client Number
^W1DICT("CUSTCODE","H")
gewl 'qn
^W1DICT("CUSTCODE","R")
Kod
^W1DICT("CUSTDEALINVOICESLIST","E")
Invoice List Transaction of Customer $ 1 $2
^W1DICT("CUSTDEALINVOICESLIST","H")
$2 $1 gewl ly dwqr zeipeayg zniyx
^W1DICT("CUSTDLVBACKDOCLIST","E")
Refund Certificate List of Customer $1 $2
^W1DICT("CUSTDLVBACKDOCLIST","H")
$2 $1 gewl ly xfgd zecerz zniyx
^W1DICT("CUSTDLVDOCLIST","E")
Delivery list of Customer $1 $2
^W1DICT("CUSTDLVDOCLIST","H")
$2 $1 gewl ly gelyn zecerz zniyx
^W1DICT("CUSTDLVDOCLISTWITHOUTINVOICE","E")
List of shipping documents without invoice for customer $1 $2
^W1DICT("CUSTDLVDOCLISTWITHOUTINVOICE","H")
$2 $1 gewl ly zipeayg `ll gelyn zecerz zniyx
^W1DICT("CUSTEQMAIN","E")
This is the code of the main client !
^W1DICT("CUSTEQMAIN","H")
! iy`x gewl ly cew df
^W1DICT("CUSTEXIST","E")
Exist !
^W1DICT("CUSTEXIST","H")
miiw gewl
^W1DICT("CUSTEXIST","R")
Uje prisutstvuet
^W1DICT("CUSTGROUP","E")
Customer group
^W1DICT("CUSTGROUP","H")
zegewl zveaw
^W1DICT("CUSTHASMAIN","E")
Customer $ 1 belongs to the main customer $ 2
^W1DICT("CUSTHASMAIN","H")
$3 $2 iy`x gewll jiiy $1 gewl
^W1DICT("CUSTHIST","E")
History of the customer
^W1DICT("CUSTHIST","H")
gewl ly dixehqd
^W1DICT("CUSTINVCRCPLIST","E")
Invoice / Receipt Invoice List of Customer $1 $2
^W1DICT("CUSTINVCRCPLIST","H")
$2 $1 gewl ly dlaw/qn 'ayg zniyx
^W1DICT("CUSTLASTORDERS","E")
Recent orders
^W1DICT("CUSTLASTORDERS","H")
zepexg` zepnfd
^W1DICT("CUSTLASTORDS","E")
Recent orders of Customer $1 $2
^W1DICT("CUSTLASTORDS","H")
$2 $1 gewl ly zepexg` zepnfd
^W1DICT("CUSTMENU","E")
Menu of system of customers
^W1DICT("CUSTMENU","H")
zegewl zkxrn hixtz
^W1DICT("CUSTNET","E")
Customers with numbers from $1 to $2 are managed in a network center
^W1DICT("CUSTNET","H")
! zyx fkxna mildepn $2 cr $1 n mixtqn mr zegewl
^W1DICT("CUSTNOTCREDIT","E")
The customer does not have a permit for the credit
^W1DICT("CUSTNOTCREDIT","H")
dtwdl xey` oi` gewll
^W1DICT("CUSTOMBALANCE","E")
Balance of cust. $1 $2
^W1DICT("CUSTOMBALANCE","H")
$2 $1 gewl ly dxzi
^W1DICT("CUSTOMCLOSED","E")
Closed client
^W1DICT("CUSTOMCLOSED","H")
xebq gewl
^W1DICT("CUSTOMCREATE","E")
Establishing a new customer
^W1DICT("CUSTOMCREATE","H")
ycg gewl znwd
^W1DICT("CUSTOMDLVFREE","E")
Customer is free from shipping fees
^W1DICT("CUSTOMDLVFREE","H")
gelyn incn xeht gewl
^W1DICT("CUSTOMER","E")
Customer
^W1DICT("CUSTOMER","H")
gewl
^W1DICT("CUSTOMER","R")
Klient
^W1DICT("CUSTOMERDETAILS","E")
Customer details
^W1DICT("CUSTOMERDETAILS","H")
gewl ihxt
^W1DICT("CUSTOMERDETAILS","R")
Dannye pol!mzovatel!a
^W1DICT("CUSTOMERGROUPSTABLE","E")
Customer's groups
^W1DICT("CUSTOMERGROUPSTABLE","H")
zegewl zeveaw zlah
^W1DICT("CUSTOMERGROUPSTABLE","R")
Spravo!4nik grupp klientov
^W1DICT("CUSTOMERINUSEONTERMINAL","E")
Working with a client from a terminal $1
^W1DICT("CUSTOMERINUSEONTERMINAL","H")
$1 seqnn gewl mr micaer
^W1DICT("CUSTOMERINVOICESLIST","E")
Invoice List of Customer $1 $2
^W1DICT("CUSTOMERINVOICESLIST","H")
$2 $1 gewl ly zeipeayg zniyx
^W1DICT("CUSTOMERITEMSPRICESLIST","E")
Price list for customer items
^W1DICT("CUSTOMERITEMSPRICESLIST","H")
gewll mihixt oexign
^W1DICT("CUSTOMERNOTDEFINED","E")
Customer number not set
^W1DICT("CUSTOMERNOTDEFINED","H")
xcbed `l gewl 'qn
^W1DICT("CUSTOMERNOTEXIST","E")
Customer $ 1 does not exist in the system
^W1DICT("CUSTOMERNOTEXIST","H")
zkxrna miiw `l $1 gewl
^W1DICT("CUSTOMERNUMBERISWRONG","E")
Number of incorrect customer
^W1DICT("CUSTOMERNUMBERISWRONG","H")
ieby gewl 'qn
^W1DICT("CUSTOMERNUMBERTOOSHORT","E")
Customer number is too short (at least 4 digits)
^W1DICT("CUSTOMERNUMBERTOOSHORT","H")
(zegtl zextq 4) icin xvw gewl 'qn
^W1DICT("CUSTOMERORDER","E")
Customer order
^W1DICT("CUSTOMERORDER","H")
gewl zpnfd
^W1DICT("CUSTOMERORDERCSR","E")
Customer order ( POS items )
^W1DICT("CUSTOMERORDERCSR","H")
(dtew ihixt) gewl zpnfd
^W1DICT("CUSTOMERORDERMLY","E")
Customer order ( Inventory items )
^W1DICT("CUSTOMERORDERMLY","H")
(i`ln ihixt) gewl zpnfd
^W1DICT("CUSTOMERPRICE","E")
Price per customer
^W1DICT("CUSTOMERPRICE","H")
gewll xign
^W1DICT("CUSTOMERPRICESLIST","E")
Price list for the customer $1 $2
^W1DICT("CUSTOMERPRICESLIST","H")
$2 $1 gewll oexign
^W1DICT("CUSTOMERS","E")
Customers
^W1DICT("CUSTOMERS","H")
zegewl
^W1DICT("CUSTOMERS","R")
Klienty
^W1DICT("CUSTOMERSEARCH","E")
Customer search
^W1DICT("CUSTOMERSEARCH","H")
gewl ytg
^W1DICT("CUSTOMERSEARCH","R")
Poisk klienta
^W1DICT("CUSTOMERSGROUP","E")
Customers group
^W1DICT("CUSTOMERSGROUP","H")
zegewl zveaw
^W1DICT("CUSTOMERSGROUPITEMSPRICESLIST","E")
List of items for a group of customers
^W1DICT("CUSTOMERSGROUPITEMSPRICESLIST","H")
zegewl zveawl mihixt oexign
^W1DICT("CUSTOMERSLIST","E")
Customers list
^W1DICT("CUSTOMERSLIST","H")
zegewl zniyx
^W1DICT("CUSTOMERSLIST","R")
Spisok zakaz!4ikov
^W1DICT("CUSTOMERSNUMBER","E")
Number of diners
^W1DICT("CUSTOMERSNUMBER","H")
zegewl 'qn
^W1DICT("CUSTOMERSREPORTS","E")
Reports by customers
^W1DICT("CUSTOMERSREPORTS","H")
zegewl itl zegec
^W1DICT("CUSTOMERSSYSTEM","E")
Customers System
^W1DICT("CUSTOMERSSYSTEM","H")
zegewl zkxrn
^W1DICT("CUSTOMERSTAKEAWAY","E")
Customers came to take
^W1DICT("CUSTOMERSTAKEAWAY","H")
zgwl e`a zegewl
^W1DICT("CUSTOMERUNIONTABLE","E")
Customer Consolidation Table
^W1DICT("CUSTOMERUNIONTABLE","H")
zegewl cegi` zlah
^W1DICT("CUSTOMHISTORY","E")
History of the customer $1
^W1DICT("CUSTOMHISTORY","H")
$1 gewl ly dixehqd
^W1DICT("CUSTOMITEMCODE","E")
Customer item code
^W1DICT("CUSTOMITEMCODE","H")
gewl lv` hixt cew
^W1DICT("CUSTOMLIST","E")
Customers list
^W1DICT("CUSTOMLIST","H")
zegewl zniyx
^W1DICT("CUSTOMLISTDLVNOT","E")
List of customers who have not ordered from $ 1 to $ 2
^W1DICT("CUSTOMLISTDLVNOT","H")
$2 cr $1 -n dtewza epinfd `ly zegewl zniyx
^W1DICT("CUSTOMNAME","E")
Customer name
^W1DICT("CUSTOMNAME","H")
gewl my
^W1DICT("CUSTOMNAME","R")
Im!a klienta
^W1DICT("CUSTOMNAMEWRONG","E")
Invalid customer name
^W1DICT("CUSTOMNAMEWRONG","H")
ieby gewl my
^W1DICT("CUSTOMNUM","E")
Customer number (if not available; please enter phone number)
^W1DICT("CUSTOMNUM","H")
('lh 'qn cilwdl `p miiw `l m`) gewl 'qn
^W1DICT("CUSTOMNUMBER","E")
Customer number
^W1DICT("CUSTOMNUMBER","H")
gewl 'qn
^W1DICT("CUSTOMNUMBER","R")
Nomer klienta
^W1DICT("CUSTOMNUMBERORNAME","E")
No. or customer name
^W1DICT("CUSTOMNUMBERORNAME","H")
gewl my e` 'qn
^W1DICT("CUSTOMNUMBERORTABLE","E")
Table / customer number
^W1DICT("CUSTOMNUMBERORTABLE","H")
gewl/ogley 'qn
^W1DICT("CUSTOMPROTECTED","E")
Protected customer !
^W1DICT("CUSTOMPROTECTED","H")
! oben gewl
^W1DICT("CUSTOMREPORT","E")
Customer report
^W1DICT("CUSTOMREPORT","H")
gewl g"ec
^W1DICT("CUSTOMSCONCREPORT","E")
Report  customers (general)
^W1DICT("CUSTOMSCONCREPORT","H")
fkexn zegewl g"ec
^W1DICT("CUSTOMSRANGEWRONG","E")
Incorrect customer numbers range
^W1DICT("CUSTOMSRANGEWRONG","H")
oekp `l zegewl ixtqn geeh
^W1DICT("CUSTOMSREPORT","E")
Customers report
^W1DICT("CUSTOMSREPORT","H")
hxetn zegewl g"ec
^W1DICT("CUSTOMSREPORT","R")
Ot!4et po klientam
^W1DICT("CUSTOMSTATUS","E")
Customer status
^W1DICT("CUSTOMSTATUS","H")
gewl ly qehhq
^W1DICT("CUSTOMSWITHCREDIT","E")
Client file with certificate for credit
^W1DICT("CUSTOMSWITHCREDIT","H")
dtwdl xeyi` mr zegewl uaew
^W1DICT("CUSTOMTABLE","E")
Customers table
^W1DICT("CUSTOMTABLE","H")
zegewl zlah
^W1DICT("CUSTOMTEL","E")
Customer Phone
^W1DICT("CUSTOMTEL","H")
gewl 'lh
^W1DICT("CUSTOMUNION","E")
Customer Consolidation
^W1DICT("CUSTOMUNION","H")
zegewl cegi`
^W1DICT("CUSTOMUPDATE","E")
Update customer information
^W1DICT("CUSTOMUPDATE","H")
gewl ihxt oekcr
^W1DICT("CUSTORDLIST","E")
Order List of Customer $1 $2
^W1DICT("CUSTORDLIST","H")
$2 $1 gewl ly zepnfd zniyx
^W1DICT("CUSTPRCOFRLIST","E")
Quote list of Customer $1 $2
^W1DICT("CUSTPRCOFRLIST","H")
$1 gewl ly xign zervd zniyx
^W1DICT("CUSTREP2DAT","E")
Report on customers who buy on credit to $1
^W1DICT("CUSTREP2DAT","H")
$1 -l dtwd zegewl g"ec
^W1DICT("CUSTREP2PERIOD","E")
Report on customers who buy on credit from $1 to $2
^W1DICT("CUSTREP2PERIOD","H")
$2 cr $1 -n dtwd zegewl g"ec
^W1DICT("CUSTSUPPLNAME","E")
Customer / Vendor Name
^W1DICT("CUSTSUPPLNAME","H")
wtq / gewl my
^W1DICT("CUSTWEEKTABLE","E")
Table of customers who order once a week
^W1DICT("CUSTWEEKTABLE","H")
reaya mrt mipinfny zegewl zlah
^W1DICT("CVV","E")
CVV
^W1DICT("CVV","H")
CVV
^W1DICT("CVV","R")
SVV
^W1DICT("CVVWRONG","E")
CVV is wrong !
^W1DICT("CVVWRONG","H")
! ieby CVV
^W1DICT("DAPARAMETERS","E")
Parameters for the "DELIVAPP" system
^W1DICT("DAPARAMETERS","H")
"DELIVAPP" zkxrnl mixhnxt
^W1DICT("DAPROT","E")
"DELIVAPP" transmission protocol
^W1DICT("DAPROT","H")
"DELIVAPP" mixeciy lewehext
^W1DICT("DATABASENOTEXIST","E")
A database not exist for this restaurant
^W1DICT("DATABASENOTEXIST","H")
mipezp qiqa miiw `l z`f dcrqnl
^W1DICT("DATABASENOTEXIST","R")
Baza dannyh ne sozdana
^W1DICT("DATABASESAVING","E")
Database backup
^W1DICT("DATABASESAVING","H")
mipezp qiqa ieaib
^W1DICT("DATABEFORETAX","E")
(Financial data before VAT)
^W1DICT("DATABEFORETAX","H")
( n"rn iptl miitqk mipezp )
^W1DICT("DATAEXIST","E")
Code exist !
^W1DICT("DATAEXIST","H")
! miiw cew
^W1DICT("DATAEXIST","R")
Kod uje su!sestvuet !
^W1DICT("DATAINVALID","E")
A value is wrong
^W1DICT("DATAINVALID","H")
oekp `l oezp
^W1DICT("DATAINVALID","R")
O!6ibka
^W1DICT("DATAREADY4PRINT","E")
Data waiting for printing
^W1DICT("DATAREADY4PRINT","H")
dqtcdl mikgn mipezp
^W1DICT("DATA_NAME","E")
Description
^W1DICT("DATA_NAME","H")
oezp my
^W1DICT("DATBGWORK","E")
Beginning of work
^W1DICT("DATBGWORK","H")
dcear zligz
^W1DICT("DATE","E")
Date
^W1DICT("DATE","H")
jix`z
^W1DICT("DATE","R")
Data
^W1DICT("DATENOTVALID","E")
Wrong date
^W1DICT("DATENOTVALID","H")
oekp `l jix`z
^W1DICT("DATEOVER","E")
Date is over
^W1DICT("DATEOVER","H")
xar jix`z
^W1DICT("DATEOVER","R")
Data prosro!4ena
^W1DICT("DATEPRAON","E")
Due date
^W1DICT("DATEPRAON","H")
oerxtl jix`z
^W1DICT("DATERR","E")
Invalid date
^W1DICT("DATERR","H")
ieby jix`z
^W1DICT("DATERR","R")
Oshibo!4naya data
^W1DICT("DATETIMEREPAIR","E")
Date and time correction
^W1DICT("DATETIMEREPAIR","H")
drye jix`z oewiz
^W1DICT("DATETOOBIG","E")
Date is to large
^W1DICT("DATETOOBIG","H")
icin lecb jix`z
^W1DICT("DATETOOLONG","E")
Date is to far
^W1DICT("DATETOOLONG","H")
icin wegx jix`z
^W1DICT("DATP","E")
Due date
^W1DICT("DATP","H")
oerxtl
^W1DICT("DAY","E")
Day
^W1DICT("DAY","H")
mei
^W1DICT("DAY1","E")
Su
^W1DICT("DAY1","H")
'`
^W1DICT("DAY1","R")
Vs
^W1DICT("DAY2","E")
Mn
^W1DICT("DAY2","H")
'a
^W1DICT("DAY2","R")
Pn
^W1DICT("DAY3","E")
Tu
^W1DICT("DAY3","H")
'b
^W1DICT("DAY3","R")
Vt
^W1DICT("DAY4","E")
We
^W1DICT("DAY4","H")
'c
^W1DICT("DAY4","R")
Sr
^W1DICT("DAY5","E")
Th
^W1DICT("DAY5","H")
'd
^W1DICT("DAY5","R")
!04t
^W1DICT("DAY6","E")
Fr
^W1DICT("DAY6","H")
'e
^W1DICT("DAY6","R")
Pt
^W1DICT("DAY7","E")
St
^W1DICT("DAY7","H")
'y
^W1DICT("DAY7","R")
Sb
^W1DICT("DAYCLOSING","E")
Closing of day $1
^W1DICT("DAYCLOSING","H")
$1 mei zxibq
^W1DICT("DAYITEMS","E")
Items within the selected days range
^W1DICT("DAYITEMS","H")
xgapd mini geeha mi`vnpy mihixt
^W1DICT("DAYMENU","E")
Daily menu
^W1DICT("DAYMENU","H")
inei hixtz
^W1DICT("DAYORDERS","E")
Today Orders
^W1DICT("DAYORDERS","H")
meidl zepnfd
^W1DICT("DAYOUT","E")
This day restaurant closed
^W1DICT("DAYOUT","H")
dxebq dcrqnd dfd jix`za
^W1DICT("DAYOUT","R")
V !etot den!m restoran ne rabotaet
^W1DICT("DAYS","E")
Days
^W1DICT("DAYS","H")
mini
^W1DICT("DBCOPY","E")
Database $1 backup being ... please wait ...
^W1DICT("DBCOPY","H")
... oznd `p` ... $1 mipezp qiqa ieaib rvazn
^W1DICT("DBLCARD","E")
A card with such a number has already been accepted
^W1DICT("DBLCARD","H")
dpnfda lawzd xak dfk xtqn mr qihxk
^W1DICT("DEALARMINVOICE","E")
Invoice Transaction
^W1DICT("DEALARMINVOICE","H")
dwqr zipeayg
^W1DICT("DEALINVOICE","E")
Invoice Transaction
^W1DICT("DEALINVOICE","H")
dwqr zipeayg
^W1DICT("DEALINVOICEAPPX","E")
Attachment to Invoice Transaction # $1
^W1DICT("DEALINVOICEAPPX","H")
$1 'qn dwqr zipeaygl gtq
^W1DICT("DEALINVOICES","E")
Invoices Transaction
^W1DICT("DEALINVOICES","H")
dwqr zeipeayg
^W1DICT("DEALINVOICESLIST","E")
Invoices Transaction List
^W1DICT("DEALINVOICESLIST","H")
dwqr zeipeayg zniyx
^W1DICT("DEALSUCCESSFULL","E")
Transaction successfully completed
^W1DICT("DEALSUCCESSFULL","H")
dglvda rvea dwqr
^W1DICT("DEBET","E")
Debit
^W1DICT("DEBET","H")
iekif
^W1DICT("DEBETINVOICE","E")
Refund Invoice Service (free text)
^W1DICT("DEBETINVOICE","H")
( iyteg hqwh ) zexiy iekif zipeayg
^W1DICT("DEBETINVOICES","E")
Refund invoices
^W1DICT("DEBETINVOICES","H")
iekif zeipeayg
^W1DICT("DEBETINVOICESLIST","E")
Refund Invoice List $1
^W1DICT("DEBETINVOICESLIST","H")
$1 iekif zeipeayg zniyx
^W1DICT("DEBETINVOICESLIST2ITEM","E")
Refund Invoice List to Item $1
^W1DICT("DEBETINVOICESLIST2ITEM","H")
' $1 ' hixtl iekif zeipeayg zniyx
^W1DICT("DEBETINVOICESTHISREPORTSHOWEDASNEGATIV","E")
Promotional invoices are shown in a negative amount
^W1DICT("DEBETINVOICESTHISREPORTSHOWEDASNEGATIV","H")
ilily mekqa mibven iekif zeipeayg
^W1DICT("DEBETITEMSINVOICE","E")
Detailed credit invoice
^W1DICT("DEBETITEMSINVOICE","H")
zhxetn iekif zipeayg
^W1DICT("DEBETITEMSINVOICECSR","E")
Detailed Credit Invoice (POS)
^W1DICT("DEBETITEMSINVOICECSR","H")
( dtew ihixt ) zhxetn iekif zipeayg
^W1DICT("DEBETITEMSINVOICEMLY","E")
Detailed credit invoice (inventory items)
^W1DICT("DEBETITEMSINVOICEMLY","H")
( i`ln ihixt ) zhxetn iekif zipeayg
^W1DICT("DEBINVOICE2CUST","E")
Customer credit invoice
^W1DICT("DEBINVOICE2CUST","H")
gewll iekif zipeayg
^W1DICT("DEBINVOICENMB","E")
Credit Tax Invoice No
^W1DICT("DEBINVOICENMB","H")
'qn iekif qn zipeayg
^W1DICT("DEBINVOICES","E")
Refund invoice
^W1DICT("DEBINVOICES","H")
iekif z-yg
^W1DICT("DEBTREPORT","E")
Debtor's report
^W1DICT("DEBTREPORT","H")
miaiig g"ec
^W1DICT("DEBTREPORTTODATE","E")
Debtor's report to date $1
^W1DICT("DEBTREPORTTODATE","H")
$1 jix`zl miaiig g"ec
^W1DICT("DEFAULTPRM","E")
By default
^W1DICT("DEFAULTPRM","H")
lcgn zxixa itl
^W1DICT("DEFINEYOURACCOUNT","E")
Your bank account must be set up
^W1DICT("DEFINEYOURACCOUNT","H")
mkly wpa oeayg xicbdl yi
^W1DICT("DEFSHVAPARAMETERS","E")
Definition of parameters in the ABS
^W1DICT("DEFSHVAPARAMETERS","H")
`"ay mixhnxt zxcbd
^W1DICT("DELALLPARTS","E")
Cancel all sub-accounts without canceling payments
^W1DICT("DELALLPARTS","H")
minelyz lehia `ll zepeayg-zzd lk lehia
^W1DICT("DELARCH","E")
Delete from archive
^W1DICT("DELARCH","H")
oeikx`n wgn 
^W1DICT("DELCAER","E")
Credit card cancellation error. Action canceled
^W1DICT("DELCAER","H")
dlhea dlert . i`xy` qihxk lehiaa d`iby
^W1DICT("DELDBLCARD","E")
A card with this number has already been accepted . Cancel transaction ?
^W1DICT("DELDBLCARD","H")
? dwqr lhal <BR> dpnfda lawzd xak dfk xtqn mr qihxk
^W1DICT("DELDISCPARAMETERS","E")
Cancellation and discount parameters
^W1DICT("DELDISCPARAMETERS","H")
zegpde milehial mixhnxt 
^W1DICT("DELDLVDOC","E")
Cancellation of the tax delivery certificate No $1
^W1DICT("DELDLVDOC","H")
$1 'qn gelyz zcerz lehia
^W1DICT("DELDLVPAY","E")
Amount cancel dlv.fee
^W1DICT("DELDLVPAY","H")
gelyn inc lhan mekq
^W1DICT("DELDLVPAY","R")
Summa otmen!a!u!sa!a oplatu dostavki
^W1DICT("DELDOC","E")
Delete a document
^W1DICT("DELDOC","H")
jnqn wgn
^W1DICT("DELDOCUMENT","E")
Cancel Document #$1
^W1DICT("DELDOCUMENT","H")
$1 'qn jnqn lehia
^W1DICT("DELETE","E")
Delete
^W1DICT("DELETE","H")
wgn
^W1DICT("DELETE","R")
Ud-t!m
^W1DICT("DELETE?","E")
How to undo ?
^W1DICT("DELETE?","H")
? lhal ji`
^W1DICT("DELETEANDBACK","E")
Delete product & back to menu
^W1DICT("DELETEANDBACK","H")
hixtzl xefge dpnfdn hixt lha
^W1DICT("DELETEANDBACK","R")
Udalit!m bl!udou i vernut!ms!a v men!u
^W1DICT("DELETEANDRESTITEM","E")
Cancel and return
^W1DICT("DELETEANDRESTITEM","H")
xfgye lha
^W1DICT("DELETEANDRESTORDER","E")
In the dew and returned order
^W1DICT("DELETEANDRESTORDER","H")
dpnfd xfgye lha
^W1DICT("DELETED","E")
Deleted
^W1DICT("DELETED","H")
lhea
^W1DICT("DELETEDBIDLIST","E")
List of canceled bids from $1 to $2
^W1DICT("DELETEDBIDLIST","H")
$2 jix`z cr $1  jix`zn zelhean xign zervd zniyx
^W1DICT("DELETEDBIDSLIST","E")
List of canceled bids
^W1DICT("DELETEDBIDSLIST","H")
zelhean xign zervd zniyx
^W1DICT("DELETEDBY","E")
Order canceled by $1 at $2 from POS #$3
^W1DICT("DELETEDBY","H")
$3 dcnrn $2 -a $1 ici lr dlhea dpnfd
^W1DICT("DELETEDBYINVCRCP","E")
Canceled by Account #
^W1DICT("DELETEDBYINVCRCP","H")
$1 'qn dlaw/qn 'ayg ici lr lhea
^W1DICT("DELETEDBYORDER","E")
Invitation canceled! Cancel order number is $1
^W1DICT("DELETEDBYORDER","H")
 $1 `ed lehia zpnfd 'qn ! dlhea dpnfd
^W1DICT("DELETEDBYRECEIPT","E")
Was canceled by receipt of number $1
^W1DICT("DELETEDBYRECEIPT","H")
$1 'qn dlaw ici lr lhea
^W1DICT("DELETEDDOCUMENT","E")
Order canceled! Cancellation order number is $
^W1DICT("DELETEDDOCUMENT","H")
$1 `ed lehia jnqn 'qn ! lhea jnqn
^W1DICT("DELETEDINVOICE","E")
Invoice canceled! Credit Invoice Number is $1
^W1DICT("DELETEDINVOICE","H")
$1 `ed iekif zipeayg 'qn ! dlhea zipeayg
^W1DICT("DELETEDONLY","E")
Cancellations only
^W1DICT("DELETEDONLY","H")
cala milehia
^W1DICT("DELETEDORDERS","E")
Canceled orders
^W1DICT("DELETEDORDERS","H")
zelhean zepnfd
^W1DICT("DELETEDORDS","E")
Show canceled orders
^W1DICT("DELETEDORDS","H")
zelhean zepnfd bvd
^W1DICT("DELETEITEM","E")
Cancel product from order
^W1DICT("DELETEITEM","H")
dpnfdn (mi)hixt lha
^W1DICT("DELETEITEMFROMORDER","E")
Delete product from order
^W1DICT("DELETEITEMFROMORDER","H")
dpnfdn hixt wegnl
^W1DICT("DELETEITEMFROMORDER","R")
Udalit!m bl!udo iz zakaza
^W1DICT("DELETEITEMS","E")
Cancellation of products from order
^W1DICT("DELETEITEMS","H")
dpnfdn mihixt lehia
^W1DICT("DELETELEVEL","E")
Delete layer
^W1DICT("DELETELEVEL","H")
daky wgn
^W1DICT("DELETELOADING","E")
Unload
^W1DICT("DELETELOADING","H")
dpirh lehia
^W1DICT("DELETELUNCHINVIEWORDER","E")
To cancel a completed meal; go back and select the "View Order" option and then
^W1DICT("DELETELUNCHINVIEWORDER","H")
"mihixt lehia" myne "dpnfd bvd" divte`a xegale xefgl yi dqtcedy dgex` lehial
^W1DICT("DELETEMAINITEM","E")
Remove lunch completely
^W1DICT("DELETEMAINITEM","H")
dnly dgex`d wgn
^W1DICT("DELETEMYCHECKORDERS","E")
Cancel orders "My check"
^W1DICT("DELETEMYCHECKORDERS","H")
 "w'v iin" zepnfd lehia
^W1DICT("DELETEORDER","E")
Cancel order
^W1DICT("DELETEORDER","H")
dpnfd lha
^W1DICT("DELETEPARTITEMFROMORDER","E")
Cancel some items
^W1DICT("DELETEPARTITEMFROMORDER","H")
mihixtdn wlg lhal
^W1DICT("DELETEPARTORDER","E")
Cancel some parameters
^W1DICT("DELETEPARTORDER","H")
mihixtdn wlg lha
^W1DICT("DELETEPAYMENT","E")
To cancel a payment
^W1DICT("DELETEPAYMENT","H")
melyz lhal
^W1DICT("DELETEPRINTFILE","E")
Cancellation of turn to printing
^W1DICT("DELETEPRINTFILE","H")
dqtcdl xez lehia
^W1DICT("DELETERECORD","E")
Delete entry
^W1DICT("DELETERECORD","H")
dneyx wgn
^W1DICT("DELETEREPORT","E")
Cancellation report
^W1DICT("DELETEREPORT","H")
milehia g"ec
^W1DICT("DELETEREPORTCONC","E")
The concentrated cancellation report
^W1DICT("DELETEREPORTCONC","H")
fkexn milehia g"ec
^W1DICT("DELETEREPORTDET","E")
Detailed cancellation report
^W1DICT("DELETEREPORTDET","H")
hxetn milehia g"ec
^W1DICT("DELETESET","E")
Delete set
^W1DICT("DELETESET","H")
hq lhal
^W1DICT("DELETESET","R")
Ud-t!m set
^W1DICT("DELETING","E")
Cancellation
^W1DICT("DELETING","H")
milehia
^W1DICT("DELETING ERROR","E")
Error canceling payment
^W1DICT("DELETING ERROR","H")
melyz lehiaa d`iby
^W1DICT("DELETINGCAUSES","E")
Deleting causes
^W1DICT("DELETINGCAUSES","H")
milehia zeaiq zlah
^W1DICT("DELETINGCAUSES","R")
Spisok pri!4in ud-!i
^W1DICT("DELETINGINVCRCP","E")
Cancellation of invoice no.$1
^W1DICT("DELETINGINVCRCP","H")
$1 'qn dlaw/qn 'ayg lehia
^W1DICT("DELETINGINVCRCPNUMBER","E")
Invoice Number / Receipt Cancellation is $1
^W1DICT("DELETINGINVCRCPNUMBER","H")
$1 `ed lehia dlaw/qn 'ayg xtqn
^W1DICT("DELETINGOFORDER","E")
Cancellation of order of number $1
^W1DICT("DELETINGOFORDER","H")
$1 'qn dpnfd lehia
^W1DICT("DELETINGRECEIPT","E")
Cancellation of receipt of number $1
^W1DICT("DELETINGRECEIPT","H")
$1 'qn dlaw lehia
^W1DICT("DELETINGRECEIPTNUMBER","E")
Number a receipt of cancellation he $1
^W1DICT("DELETINGRECEIPTNUMBER","H")
$1 `ed lehia zlaw 'qn
^W1DICT("DELETINGREPORT","E")
Show cancellations
^W1DICT("DELETINGREPORT","H")
milehia zbvd
^W1DICT("DELETINGREPORTS","E")
Cancellation reports
^W1DICT("DELETINGREPORTS","H")
milehia zeg"ec
^W1DICT("DELETINGSERVICECARD","E")
The receipt form for repair device # 1 was canceled
^W1DICT("DELETINGSERVICECARD","H")
lhea $1 'qn oewizl xiykn zlaw qtez
^W1DICT("DELIMITERGROUPDEFINITION","E")
Defining a group for separation items
^W1DICT("DELIMITERGROUPDEFINITION","H")
dcxtd ihixtl dveaw zxcbd
^W1DICT("DELINVOICE","E")
Canceling of Invoice #$1
^W1DICT("DELINVOICE","H")
$1 'qn zipeayg lehia
^W1DICT("DELIVERIESAREA","E")
Areas of delivery
^W1DICT("DELIVERIESAREA","H")
migelyn ixef`
^W1DICT("DELIVERIESAREA","R")
Ra!iony dostavki
^W1DICT("DELIVERIESTIME","E")
Time of delivery
^W1DICT("DELIVERIESTIME","H")
migelyn ipnf
^W1DICT("DELIVERIESTIME","R")
Vrem!a dostavki
^W1DICT("DELIVERY","E")
Shipments
^W1DICT("DELIVERY","H")
migelyn
^W1DICT("DELIVERY!","E")
Delivery!
^W1DICT("DELIVERYDETAILS","E")
Delivery details
^W1DICT("DELIVERYDETAILS","H")
gelyn ihxt
^W1DICT("DELIVERYDISTRICTS","E")
Delivery districts
^W1DICT("DELIVERYDISTRICTS","H")
dwelg ixef`
^W1DICT("DELIVERYDISTRICTS","R")
Ra!iony dostavki
^W1DICT("DELIVERYDOC","E")
Shipping certificate
^W1DICT("DELIVERYDOC","H")
gelyn zcerz
^W1DICT("DELIVERYFREE","E")
Delivery free
^W1DICT("DELIVERYFREE","H")
gelyn incn xeht
^W1DICT("DELIVERYITEMSPRICELIST","E")
Price list for shipping items
^W1DICT("DELIVERYITEMSPRICELIST","H")
migelynl mihixt oexign
^W1DICT("DELIVERYNOTWORK","E")
A shipping system does not work temporarily
^W1DICT("DELIVERYNOTWORK","H")
ipnf zcaer `l migelyn zkxrn
^W1DICT("DELIVERYPARAMETERS","E")
Delivery system parameters
^W1DICT("DELIVERYPARAMETERS","H")
migelynl mixhnxt 
^W1DICT("DELIVERYSTATUS","E")
Shipping status
^W1DICT("DELIVERYSTATUS","H")
migelyn avn
^W1DICT("DELIVERYTABLES","E")
Delivery tables
^W1DICT("DELIVERYTABLES","H")
migelynl ze`lah
^W1DICT("DELIVERYTABLES","R")
Spravo!4niki dl!a dostavki
^W1DICT("DELIVERYTIME","E")
Delivery time
^W1DICT("DELIVERYTIME","H")
dwtq` onf
^W1DICT("DELIVERYTIME30","E")
Delivery time under 30 minutes
^W1DICT("DELIVERYTIME30","H")
zewc 30 zgzn dwtq` onf
^W1DICT("DELIVERYTIME30QN","E")
Number of orders with delivery time under 30 minutes
^W1DICT("DELIVERYTIME30QN","H")
zewc 30 zgzn dwtq` onf mr zepnfd xtqn
^W1DICT("DELLASTPOINT4PLGN","E")
Undo last point from region
^W1DICT("DELLASTPOINT4PLGN","H")
xef`n dpexg` dcewp lha
^W1DICT("DELLINK2DEAL","E")
Unlink the meal
^W1DICT("DELLINK2DEAL","H")
dwqrl jeiy lha
^W1DICT("DELMAIL","E")
Delete
^W1DICT("DELMAIL","H")
wgn
^W1DICT("DELMENU","E")
Cancel Menu
^W1DICT("DELMENU","H")
hixtz lha
^W1DICT("DELMIMUSHPIZUIM","E")
Cancel compensation implenentation
^W1DICT("DELMIMUSHPIZUIM","H")
mievit yenin lha
^W1DICT("DELPARTPSW","E")
Type a password 2 to delete sub-accounts
^W1DICT("DELPARTPSW","H")
zepeayg-zz lehial 2 dnqiq clwd 
^W1DICT("DELPAYMENTERROR","E")
Error canceling payment
^W1DICT("DELPAYMENTERROR","H")
melyz lehiaa d`iby
^W1DICT("DELPAYMENTSFIRST","E")
Order done outside the system A customer's credit card number should
^W1DICT("DELPAYMENTSFIRST","H")
ilily melyz rvale <BR> gewl lv` ix`y` qihxk 'qn xxal yi <BR> zkxrnl uegn diieg dpnfd
^W1DICT("DELPLGN","E")
Delete area
^W1DICT("DELPLGN","H")
xef` lha
^W1DICT("DELPLGN?","E")
Are You sure wants to delete area ?
^W1DICT("DELPLGN?","H")
xef` lhal dvexy (d)geha
^W1DICT("DELQUANT","E")
How much del.
^W1DICT("DELQUANT","H")
lhal dnk
^W1DICT("DELQUANT","R")
Sk. ud-n!m
^W1DICT("DELSET","E")
Delete set
^W1DICT("DELSET","H")
hq lha
^W1DICT("DELSET","R")
Ud-t!m set
^W1DICT("DELSUPER","E")
Card and benefit canceled from account
^W1DICT("DELSUPER","H")
oeaygdn elhea dahde qihxk 
^W1DICT("DEMO","E")
Demo
^W1DICT("DEMO","H")
enc
^W1DICT("DEMO","R")
Demo
^W1DICT("DEMOSP","E")
D e m o
^W1DICT("DEMOSP","H")
e n c
^W1DICT("DEPARRTM","E")
Dep/arr time
^W1DICT("DEPARRTM","H")
drbd onf
^W1DICT("DEPARTMENT","E")
Department
^W1DICT("DEPARTMENT","H")
dwlgn
^W1DICT("DEPARTMENTREPORT","E")
Report by department
^W1DICT("DEPARTMENTREPORT","H")
zewlgn itl g"ec
^W1DICT("DEPARTMENTSTABLE","E")
Departments table
^W1DICT("DEPARTMENTSTABLE","H")
zewlgn zlah
^W1DICT("DEPARTREPORT","E")
Report by department
^W1DICT("DEPARTREPORT","H")
zewlgn g"ec
^W1DICT("DEPDAYREPORT","E")
Daily department report
^W1DICT("DEPDAYREPORT","H")
inei zewlgn g"ec
^W1DICT("DEPNAME","E")
Department name
^W1DICT("DEPNUMBER","E")
Department No.
^W1DICT("DEPNUMBER","H")
dwlgn 'qn
^W1DICT("DEPOSITIONDATE","E")
Deposit date
^W1DICT("DEPOSITIONDATE","H")
dcwtd jix`z
^W1DICT("DEPOSITIONNUMBER","E")
Deposit No. $ 1 for the date $2
^W1DICT("DEPOSITIONNUMBER","H")
$2 jix`zl $1 dcwtd 'qn
^W1DICT("DEPOSITIONPREPARATION","E")
Preparation for deposit
^W1DICT("DEPOSITIONPREPARATION","H")
dcwtdl dpkd
^W1DICT("DEPOSITIONS","E")
Deposits
^W1DICT("DEPOSITIONS","H")
zecwtd
^W1DICT("DEPPERIODREPORT","E")
Periodic Departments Report
^W1DICT("DEPPERIODREPORT","H")
iztewz zewlgn g"ec
^W1DICT("DEPREPORT","E")
Report departments from $1 through $2
^W1DICT("DEPREPORT","H")
$2 cr $1 -n zewlgn g"ec
^W1DICT("DEPREPORTPERMONTH","E")
Report of departments by months
^W1DICT("DEPREPORTPERMONTH","H")
miyceg itl izpy zewlgn g"ec
^W1DICT("DEPREPORTPERMONTH2YEAR","E")
Report of departments by month to year $1
^W1DICT("DEPREPORTPERMONTH2YEAR","H")
$1 dpyl miyceg itl zewlgn g"ec
^W1DICT("DESCENDING","E")
Descending
^W1DICT("DESCENDING","H")
cxei xcq itl
^W1DICT("DESCRIPTION","E")
Description
^W1DICT("DESCRIPTION","H")
xe`iz
^W1DICT("DESCRIPTION","R")
Opisanie
^W1DICT("DESERT","E")
Desert
^W1DICT("DESERT","H")
gepiw
^W1DICT("DESTINTIME","E")
Customer arrival time
^W1DICT("DESTINTIME","H")
gewll drbd onf
^W1DICT("DETAILED","E")
Detailed
^W1DICT("DETAILED","H")
hxetn
^W1DICT("DETAILEDINVOICES","E")
Invoices with details
^W1DICT("DETAILEDINVOICES","H")
hexit mr zeipeayg
^W1DICT("DETAILNOTES","E")
Detailed notes
^W1DICT("DETAILNOTES","H")
zehxetn zexrd
^W1DICT("DETAILS","E")
Details
^W1DICT("DETAILS","H")
hexit
^W1DICT("DETAILS","R")
Podrobnee
^W1DICT("DETAILSHOW","E")
View in detail
^W1DICT("DETAILSHOW","H")
zhxetn dxeva bvd
^W1DICT("DETAILTIMEREPORT","E")
Detailed report of delivery time by branch
^W1DICT("DETAILTIMEREPORT","H")
hxetn mitipq itl migelyn zwtq` onf ly g"ec
^W1DICT("DETAILWATCHREPORT","E")
Report of workers hours ( detailed )
^W1DICT("DETAILWATCHREPORT","H")
hxetn micaer zery g"ec
^W1DICT("DETREPORT","E")
Detailed report
^W1DICT("DETREPORT","H")
hxetn g"ec
^W1DICT("DEVELOPERTEL","E")
Tel. 054-4380608
^W1DICT("DEVELOPERTEL","H")
054-4380608 'lh
^W1DICT("DEVELOPMENT","E")
Development
^W1DICT("DEVELOPMENT","H")
gezit
^W1DICT("DEVICE","E")
Device
^W1DICT("DEVICE","H")
xiykn
^W1DICT("DEVICESDEFINITION","E")
Devices definition
^W1DICT("DEVICESDEFINITION","H")
mipwzd zxcbd
^W1DICT("DIAP","E")
Diapason
^W1DICT("DIAP","H")
megz
^W1DICT("DIARY","E")
Booking log
^W1DICT("DIARY","H")
zepnfd onei
^W1DICT("DIF","E")
Difference
^W1DICT("DIF","H")
yxtd
^W1DICT("DIFCIB","E")
The Sodexo difference
^W1DICT("DIFCIB","H")
eqwceq yxtd
^W1DICT("DIFFERENCE","E")
Difference
^W1DICT("DIFFERENCE","H")
yxtd
^W1DICT("DIFTMP","E")
10bis difference
^W1DICT("DIFTMP","H")
qia oz yxtd
^W1DICT("DIFTNB","E")
10bis difference
^W1DICT("DIFTNB","H")
qia oz yxtd
^W1DICT("DINERS","E")
Diners
^W1DICT("DINERS","H")
qxpiic
^W1DICT("DISC","E")
Discount $1
^W1DICT("DISC","H")
$1 dgpd
^W1DICT("DISC","R")
Skidka $1
^W1DICT("DISCADD","E")
Take a discount from the adds
^W1DICT("DISCADD","H")
zetqezn dgpd zgwl 
^W1DICT("DISCANDDEL","E")
Discounts and Cancellations
^W1DICT("DISCANDDEL","H")
milehiae zegpd
^W1DICT("DISCASR","E")
Discount for customer $1
^W1DICT("DISCASR","H")
$1 dtwd gewll dgpd
^W1DICT("DISCAST","E")
Asterisk discount
^W1DICT("DISCAST","H")
miakek zgpd
^W1DICT("DISCINTOPRICE","E")
Deduct immediately from the price
^W1DICT("DISCINTOPRICE","H")
xigndn ciin cixedl
^W1DICT("DISCITEMCODE","E")
Code of discount item
^W1DICT("DISCITEMCODE","H")
dgpd hixt cew
^W1DICT("DISCITEMNAME","E")
Name of discount item
^W1DICT("DISCITEMNAME","H")
dgpd hixt my
^W1DICT("DISCITTOT","E")
Discounts for items
^W1DICT("DISCITTOT","H")
mihixtl zegpd
^W1DICT("DISCMAX","E")
Max Discount (NIS)
^W1DICT("DISCMAX","H")
(g"y) dgpd 'qwn
^W1DICT("DISCNEWLINE","E")
Display discount on a separate line
^W1DICT("DISCNEWLINE","H")
zcxtp dxeya dgpd bivdl
^W1DICT("DISCNIS","E")
Discount (NIS)
^W1DICT("DISCNIS","H")
g"y dgpd
^W1DICT("DISCNOADD","E")
Do not take a discount from supplements
^W1DICT("DISCNOADD","H")
zetqezn dgpd zgwl `l 
^W1DICT("DISCNOTVALID","E")
Incorrect discount
^W1DICT("DISCNOTVALID","H")
dpekp `l dgpd
^W1DICT("DISCONT","E")
Discount
^W1DICT("DISCONT","H")
dgpd
^W1DICT("DISCONT","R")
Skidka
^W1DICT("DISCOPNORD","E")
Take a discount by hour of  opening an order
^W1DICT("DISCOPNORD","H")
dpnfd zgizt zry itl dgpd zgwl
^W1DICT("DISCOTH","E")
OTH Discounts
^W1DICT("DISCOTH","H")
OTH zegpd
^W1DICT("DISCOUNT","E")
Discount $1%
^W1DICT("DISCOUNT","H")
$1% dgpd
^W1DICT("DISCOUNT","R")
Skidka $1%
^W1DICT("DISCOUNTCAUSES","E")
Discont's causes
^W1DICT("DISCOUNTCAUSES","H")
zegpd zeaiq zlah
^W1DICT("DISCOUNTCAUSES","R")
Spisok pri!4in skidok
^W1DICT("DISCOUNTGENREPORT","E")
General discounts report
^W1DICT("DISCOUNTGENREPORT","H")
illk zegpd g"ec
^W1DICT("DISCOUNTNET","E")
Discount $1%
^W1DICT("DISCOUNTNET","H")
$1% hpxhpi` zgpd
^W1DICT("DISCOUNTNET","R")
Skidka $1%
^W1DICT("DISCOUNTPERHOUER","E")
Hourly discount
^W1DICT("DISCOUNTPERHOUER","H")
dry itl dgpd
^W1DICT("DISCOUNTREPORT","E")
Discounts report
^W1DICT("DISCOUNTREPORT","H")
zegpd g"ec
^W1DICT("DISCOUNTREPORTCONC","E")
Concentrated discounts report
^W1DICT("DISCOUNTREPORTCONC","H")
fkexn zegpd g"ec
^W1DICT("DISCOUNTREPORTDET","E")
Detailed discounts report
^W1DICT("DISCOUNTREPORTDET","H")
hxetn zegpd g"ec
^W1DICT("DISCOUNTS","E")
Discounts
^W1DICT("DISCOUNTS","H")
zegpd
^W1DICT("DISCOUNTSHOW","E")
View detailed discounts
^W1DICT("DISCOUNTSHOW","H")
zhxetn zegpd zbvd
^W1DICT("DISCOUNTSPERDAYSANDHOUERS","E")
Discounts by days and hours
^W1DICT("DISCOUNTSPERDAYSANDHOUERS","H")
zerye mini itl zegpd
^W1DICT("DISCOUNTSTABLE","E")
Discounts table
^W1DICT("DISCOUNTSTABLE","H")
zegpd zlah
^W1DICT("DISCOUNTSTABLE","R")
Tablica skidok
^W1DICT("DISCOUNTVALUEISWRONG","E")
Incorrect discount value
^W1DICT("DISCOUNTVALUEISWRONG","H")
ieby dgpd jxr
^W1DICT("DISCPERCENT","E")
Discount in the percent
^W1DICT("DISCPERCENT","H")
dgpd %
^W1DICT("DISCPERCENTNOTVALID","E")
% discount is wrong
^W1DICT("DISCPERCENTNOTVALID","H")
oekp `l dgpd %
^W1DICT("DISCPERCENTPERITEM","E")
% Discount per item
^W1DICT("DISCPERCENTPERITEM","H")
hixtl dgpd %
^W1DICT("DISCREALTIME","E")
Take a discount by current time
^W1DICT("DISCREALTIME","H")
il`ix onf itl dgpd zgwl
^W1DICT("DISH","E")
Dish
^W1DICT("DISH","H")
dpn
^W1DICT("DISPATHPRINTERDEFINITION","E")
Set up a printer for the dispatcher
^W1DICT("DISPATHPRINTERDEFINITION","H")
glynl zqtcn zxcbd
^W1DICT("DISPLAY","E")
Show on the screen
^W1DICT("DISPLAY","H")
jqnl bvd
^W1DICT("DISPLAYDIRECTION","E")
Screen orientation
^W1DICT("DISPLAYDIRECTION","H")
jqn oeeik
^W1DICT("DISPLAYGROUP","E")
Show group
^W1DICT("DISPLAYGROUP","H")
dveaw bvd
^W1DICT("DISPLAYMENU","E")
Show menu
^W1DICT("DISPLAYMENU","H")
hixtz bvd
^W1DICT("DISTRICT","E")
Area
^W1DICT("DISTRICT","H")
xef`
^W1DICT("DISTRICT","R")
Ra!ion
^W1DICT("DISTRICTACTIVE","E")
Area in use
^W1DICT("DISTRICTACTIVE","H")
lirt xef`
^W1DICT("DISTRICTACTIVE","R")
Ra!ion aktiven
^W1DICT("DISTRICTCODE","E")
Area code
^W1DICT("DISTRICTCODE","H")
xef` cew
^W1DICT("DISTRICTCODE","R")
Kod ra!iona
^W1DICT("DISTRICTEXIST","E")
An area already defined
^W1DICT("DISTRICTEXIST","H")
xcbed xak xef`d
^W1DICT("DISTRICTEXIST","R")
Ra!ion uje su!sestvuet
^W1DICT("DISTRICTNAME","E")
Area name
^W1DICT("DISTRICTNAME","H")
xef` my
^W1DICT("DISTRICTNAME","R")
Nazvanie ra!iona
^W1DICT("DISTRICTONLY","E")
Permit to order from listed streets and areas only
^W1DICT("DISTRICTONLY","H")
cala mineyx mixef` ly zeaegxn oinfdl xyt` m`d
^W1DICT("DISTRICTONLY","R")
Zakaz vozmojen tol!mko iz ukazannyh ra!ionov
^W1DICT("DISTRICTPAINTING","E")
Drawing areas
^W1DICT("DISTRICTPAINTING","H")
mixef` xeiv
^W1DICT("DISTRICTS","E")
Area
^W1DICT("DISTRICTS","H")
mixef`
^W1DICT("DISTRICTS","R")
Ra!iony
^W1DICT("DISTRICTSTREETSTABLE","E")
Area to streets relation
^W1DICT("DISTRICTSTREETSTABLE","H")
"zeaegx - xef`" dlah
^W1DICT("DISTRICTSTREETSTABLE","R")
Tablica "gorod - ra!iony"
^W1DICT("DLVAVRGTIME","E")
Average delivery time
^W1DICT("DLVAVRGTIME","H")
rvenn dwtq` onf
^W1DICT("DLVBACK","E")
Refund
^W1DICT("DLVBACK","H")
xfgd
^W1DICT("DLVBACKDOC","E")
Refund Certificate
^W1DICT("DLVBACKDOC","H")
xfgd zcerz
^W1DICT("DLVBACKDOCLIST","E")
List of return certificates $1
^W1DICT("DLVBACKDOCLIST","H")
$1 xfgd zecerz zniyx
^W1DICT("DLVBACKDOCLIST2ITEM","E")
Return checklist for item $1
^W1DICT("DLVBACKDOCLIST2ITEM","H")
' $1 ' hixtl xfgd zecerz zniyx
^W1DICT("DLVBACKDOCNMB","E")
Refund Certificate #$1
^W1DICT("DLVBACKDOCNMB","H")
'qn xfgd zcerz
^W1DICT("DLVBACKDOCS","E")
Refund certificates
^W1DICT("DLVBACKDOCS","H")
xfgd zecerz
^W1DICT("DLVBACKDOCSLIST","E")
List of return certificates for tax invoice # $1
^W1DICT("DLVBACKDOCSLIST","H")
$1 'qn qn zipeaygl xfgd zecerz zniyx
^W1DICT("DLVCHARGE","E")
Delivery Charge
^W1DICT("DLVCHARGE","H")
gelyn inc
^W1DICT("DLVCUSTREPORT","E")
Shipping report by customers
^W1DICT("DLVCUSTREPORT","H")
zegewl itl migelyn g"ec
^W1DICT("DLVCUSTREPORTORDDAT","E")
Shipping report by customer [by receive date of order]
^W1DICT("DLVCUSTREPORTORDDAT","H")
[ dpnfd zlaw jix`z itl ] zegewl itl migelyn g"ec
^W1DICT("DLVCUSTREPORTPAYDAT","E")
Shipping Report by Customer [by Payment Date]
^W1DICT("DLVCUSTREPORTPAYDAT","H")
[ melyz jix`z itl ] zegewl itl migelyn g"ec
^W1DICT("DLVCUSTREPORTSNDDAT","E")
Shipping Report by Customer [by Date of Launch]
^W1DICT("DLVCUSTREPORTSNDDAT","H")
[ xebiy jix`z itl ] zegewl itl migelyn g"ec
^W1DICT("DLVDEFAULTTIME","E")
Delivery time if region not defined (default, minutes)
^W1DICT("DLVDEFAULTTIME","H")
( zewc,lcgn zxixa ) xcbed `l xef` m` dwtq` onf
^W1DICT("DLVDOC","E")
Dlv.note.
^W1DICT("DLVDOC","H")
'lyn 'rz
^W1DICT("DLVDOC2DATE","E")
Generate a delivery note for the date
^W1DICT("DLVDOC2DATE","H")
jix`zl gelyn zcerz witdl
^W1DICT("DLVDOCLIST","E")
Shipping List $1
^W1DICT("DLVDOCLIST","H")
$1 gelyn zecerz zniyx
^W1DICT("DLVDOCLISTWITHOUTINVOICE","E")
List of delivery notes without invoice
^W1DICT("DLVDOCLISTWITHOUTINVOICE","H")
zipeayg `ll gelyn zecerz zniyx
^W1DICT("DLVDOCNMB","E")
Delivery note No.
^W1DICT("DLVDOCNMB","H")
'qn gelyn zcerz
^W1DICT("DLVDOCPRINTED","E")
Delivery note printed
^W1DICT("DLVDOCPRINTED","H")
qtced gelyn zcerz
^W1DICT("DLVDOCS","E")
Shipping documents
^W1DICT("DLVDOCS","H")
gelyn zecerz
^W1DICT("DLVDOCSLIST","E")
List of shipping documents to invoice # $1
^W1DICT("DLVDOCSLIST","H")
$1 'qn qn zipeaygl gelyn zecerz zniyx
^W1DICT("DLVDOCSREPORT","E")
Report delivery certificates
^W1DICT("DLVDOCSREPORT","H")
gelyn zecerz g"ec
^W1DICT("DLVGAPREPORT","E")
Delivery report (GAP)
^W1DICT("DLVGAPREPORT","H")
(t`b) migelyn g"ec
^W1DICT("DLVMINTIM","E")
Minimum delivery time is $1 minute
^W1DICT("DLVMINTIM","H")
zewc $1 `ed ilnipin dwtqd onf
^W1DICT("DLVMKRREPORT","E")
Delivery order report by source
^W1DICT("DLVMKRREPORT","H")
xewn itl migelyn zepnfd g"ec
^W1DICT("DLVNETPLACE","E")
Percentage of deliveries under 30 minutes $1 - Network position $2 [ First place
^W1DICT("DLVNETPLACE","H")
[ $4 oey`x mewn ] $2 zyxa mewn - $1 zewc 30 zgzn zewtq` feg`
^W1DICT("DLVNETTO","E")
Total netto of shipments
^W1DICT("DLVNETTO","H")
ehp migelyn k"dq
^W1DICT("DLVNONREPORT","E")
List of customers who did not order during the period
^W1DICT("DLVNONREPORT","H")
dtewza epinfd `ly zegewl zniyx
^W1DICT("DLVNOREPORT","E")
A list of customers who did not order
^W1DICT("DLVNOREPORT","H")
epinfd `ly zegewl zniyx
^W1DICT("DLVONLY","E")
Deliveries only
^W1DICT("DLVONLY","H")
cala migelyn
^W1DICT("DLVORDERS","E")
Shipping orders
^W1DICT("DLVORDERS","H")
migelyn zepnfd
^W1DICT("DLVORDERSNUMBER","E")
Delibery Orders Number
^W1DICT("DLVORDERSNUMBER","H")
migelyn zepnfd xtqn
^W1DICT("DLVORDERSREPORT","E")
Shipping Orders Report
^W1DICT("DLVORDERSREPORT","H")
migelyn zepnfd g"ec
^W1DICT("DLVPAY","E")
Delivery fee
^W1DICT("DLVPAY","H")
gelyn inc
^W1DICT("DLVPAY","R")
Dostavka
^W1DICT("DLVPAYCHANGE","E")
Change Shipping Fee (NIS)
^W1DICT("DLVPAYCHANGE","H")
(g"y) gelyn inc iepiy
^W1DICT("DLVPAYMENTSREPORT","E")
Report by Types of Payment [Shipments]
^W1DICT("DLVPAYMENTSREPORT","H")
[ migelyn ] melyz ibeq itl g"ec
^W1DICT("DLVPAYPER","E")
Delivery fee $1%
^W1DICT("DLVPAYPER","H")
$1 gelyn inc
^W1DICT("DLVPAYPER","R")
Dostavka $1%
^W1DICT("DLVPAYPRCCHANGE","E")
Change Shipping Fee (%)
^W1DICT("DLVPAYPRCCHANGE","H")
(%) gelyn inc iepiy
^W1DICT("DLVPAYZERO","E")
No shipping fee! to approve ?
^W1DICT("DLVPAYZERO","H")
? xy`l ! gelyn inc oi`
^W1DICT("DLVPRINTPARAMETERS","E")
Shipping Print Parameters
^W1DICT("DLVPRINTPARAMETERS","H")
migelyn zqtcdl mixhnxt
^W1DICT("DLVPWRLNKREP","E")
Orders Report to POWERLINK
^W1DICT("DLVPWRLNKREP","H")
POWERLINK -l zepnfd g"ec
^W1DICT("DLVQN","E")
Number of delivery orders
^W1DICT("DLVQN","H")
migelyn zepnfd 'qn
^W1DICT("DLVQNORDERSREPORT","E")
Quantitative messenger report
^W1DICT("DLVQNORDERSREPORT","H")
izenk migily g"ec
^W1DICT("DLVREPORTS","E")
Shipping reports
^W1DICT("DLVREPORTS","H")
migelyn zeg"ec
^W1DICT("DLVREPYEARMONTH","E")
Sales report by representatives
^W1DICT("DLVREPYEARMONTH","H")
mibivp itl zexikn g"ec
^W1DICT("DLVRPRNETREPORT","E")
Preparing time report from $1 to $2
^W1DICT("DLVRPRNETREPORT","H")
$2 jix`z cr $1 jix`zn izyx migelyn zpkd onf ly g"ec
^W1DICT("DLVRYEVENING","E")
Evening deliveries
^W1DICT("DLVRYEVENING","H")
axr migelyn
^W1DICT("DLVRYMORNING","E")
Morning deliveries
^W1DICT("DLVRYMORNING","H")
xwea migelyn
^W1DICT("DLVSALES","E")
Total deliveries
^W1DICT("DLVSALES","H")
migelyn k"dq
^W1DICT("DLVTIME","E")
Delivery time (min)
^W1DICT("DLVTIME","H")
('wc) dwtq` onf
^W1DICT("DLVTIME","R")
Vrem!a dostavki (min)
^W1DICT("DLVTIMEREPORT","E")
Delivery time report
^W1DICT("DLVTIMEREPORT","H")
migelyn zwtq` onf ly g"ec
^W1DICT("DLVTIMNETREPORT","E")
Delivery time report from $1 to $2
^W1DICT("DLVTIMNETREPORT","H")
$2 jix`z cr $1 jix`zn izyx migelyn zwtq` onf ly g"ec
^W1DICT("DLVWEBSALES","E")
Delivery Sales
^W1DICT("DLVWEBSALES","H")
gewll drbd mr hpxhpi` jxc zexikn
^W1DICT("DMNREPORT","E")
Report shipping charges of drivers
^W1DICT("DMNREPORT","H")
mibdp ly gelyn inc g"ec
^W1DICT("DMSH","E")
Fees of service
^W1DICT("DMSH","H")
zexy inc
^W1DICT("DMSHMSD","E")
Type% Service Fee
^W1DICT("DMSHMSD","H")
zexiy inc % clwd
^W1DICT("DMSPECTABLE","E")
Special shipping charges
^W1DICT("DMSPECTABLE","H")
micgein gelyn inc zlah
^W1DICT("DNR","E")
Diners
^W1DICT("DNR","H")
qxpiic
^W1DICT("DO","E")
Do it
^W1DICT("DO","H")
rva
^W1DICT("DOCEXIST","E")
A document with such a number already exists in the system !
^W1DICT("DOCEXIST","H")
! zkxrna miiw xak dfk xtqn mr jnqn
^W1DICT("DOCNOTEXIST","E")
A document with such a number does not exist in the system !
^W1DICT("DOCNOTEXIST","H")
! zkxrna miiw `l dfk xtqn mr jnqn
^W1DICT("DOCNUMBER","E")
Number of document
^W1DICT("DOCNUMBER","H")
jnqn 'qn
^W1DICT("DOCNUMBERISWRONG","E")
Wrong document number
^W1DICT("DOCNUMBERISWRONG","H")
ieby jnqn 'qn
^W1DICT("DOCNUMBERNOTVALID","E")
Invalid document number
^W1DICT("DOCNUMBERNOTVALID","H")
oekp `l jnqn 'qn
^W1DICT("DOCOPY","E")
Back up a database
^W1DICT("DOCOPY","H")
mipezp qiqa ieaib rval
^W1DICT("DOCOPYTO","E")
Copy
^W1DICT("DOCOPYTO","H")
wizrdl
^W1DICT("DOCPRINTED","E")
Document printed
^W1DICT("DOCPRINTED","H")
qtced jnqn
^W1DICT("DOCSUMISWRONG","E")
Incorrect document amount
^W1DICT("DOCSUMISWRONG","H")
ieby jnqna mekq
^W1DICT("DOCUMENTS","E")
Documents
^W1DICT("DOCUMENTS","H")
miknqn
^W1DICT("DOCUMENTSANDREPORTS","E")
Certificates and reports
^W1DICT("DOCUMENTSANDREPORTS","H")
zeg"ece zecerz 
^W1DICT("DOCUMENTSISSUE","E")
Document production for customers
^W1DICT("DOCUMENTSISSUE","H")
zegewll miknqn zwtd
^W1DICT("DOCUMENTSLIST","E")
List of documents
^W1DICT("DOCUMENTSLIST","H")
miknqn zniyx
^W1DICT("DOINGTIME","E")
Execution time
^W1DICT("DOINGTIME","H")
revia onf
^W1DICT("DOLLAR","E")
Dollar
^W1DICT("DOLLAR","H")
xlec
^W1DICT("DONAME","E")
Operation name
^W1DICT("DONAME","H")
rvan my
^W1DICT("DONE","E")
Done
^W1DICT("DONE","H")
dnlyed dlert
^W1DICT("DONE","R")
Process zaver!6en
^W1DICT("DONEOK","E")
Action completed successfully
^W1DICT("DONEOK","H")
dglvda dnlyed dlert
^W1DICT("DONETIME","E")
End time of action
^W1DICT("DONETIME","H")
dlert meiq onf
^W1DICT("DONTFORGOTFILLMAP","E")
You didn't forget to fill in your map number ?
^W1DICT("DONTFORGOTFILLMAP","H")
? dtn 'qn `lnl mzgky `l
^W1DICT("DONTNOWPRESSENTER","E")
To the searching click "Submit" without number
^W1DICT("DONTNOWPRESSENTER","H")
"xy`" ugl dpnfd 'qn yetigl
^W1DICT("DORESULT","E")
Test results
^W1DICT("DORESULT","H")
dwica ze`vez
^W1DICT("DOTRNCA","E")
Make a transfer to automated banking services
^W1DICT("DOTRNCA","H")
`"ayl xeciy rva
^W1DICT("DOWN","E")
Down
^W1DICT("DOWN","H")
dhn
^W1DICT("DOWNHEADERDEFINITION","E")
A definition of lower headline
^W1DICT("DOWNHEADERDEFINITION","H")
dpezgz zxzek zxcbd
^W1DICT("DPSPAY","E")
Cash deposit
^W1DICT("DPSPAY","H")
onefn zcwtd
^W1DICT("DPSREPORT","E")
Cash deposit report of couriers
^W1DICT("DPSREPORT","H")
migily ly onefn zcwtd g"ec
^W1DICT("DRAFT","E")
Draft
^W1DICT("DRAFT","H")
dheih
^W1DICT("DRIVETIME","E")
Drive Time
^W1DICT("DRIVETIME","H")
dbidp onf
^W1DICT("DSPHPRN","E")
Dispatcher's printer
^W1DICT("DSPHPRN","H")
glynl zqtcn
^W1DICT("EDIT","E")
Edit
^W1DICT("EDIT","H")
okcr
^W1DICT("EDIT","R")
Izm-t!m
^W1DICT("EDITCUSTFIELDS","E")
Update fields of customer card
^W1DICT("EDITCUSTFIELDS","H")
gewl qihxk ly zecy oekcir
^W1DICT("EDITITEMTREE","E")
Update product tree
^W1DICT("EDITITEMTREE","H")
xven ur okcr
^W1DICT("EDITORDER","E")
Update order
^W1DICT("EDITORDER","H")
dpnfd okcr
^W1DICT("EDITORDERCONTENT","E")
Update order content
^W1DICT("EDITORDERCONTENT","H")
dpnfd okez okcr
^W1DICT("EDITORDERHEADER","E")
Update order header
^W1DICT("EDITORDERHEADER","H")
dpnfd zxzek okcr
^W1DICT("EDITORDERTIME","E")
Update Delivery Time
^W1DICT("EDITORDERTIME","H")
dwtq` onf okcr
^W1DICT("EDITPLGN","E")
Edit area
^W1DICT("EDITPLGN","H")
xef` jexr
^W1DICT("EDITPROFILE","E")
Update profile
^W1DICT("EDITPROFILE","H")
litext okcr
^W1DICT("EDITPROFILE","R")
Obnovit!m dannye
^W1DICT("ELPOSORDNUMBER","E")
Order number in Elpos
^W1DICT("ELPOSORDNUMBER","H")
qetl`a dpnfd xtqn
^W1DICT("EM","E")
Unit of measure
^W1DICT("EM","H")
dcin zcigi
^W1DICT("EMAIL","E")
E-mail
^W1DICT("EMAIL","H")
l"`ec
^W1DICT("EMAIL","R")
E-m!e!il
^W1DICT("EMAIL1","E")
Сounting room e-mail
^W1DICT("EMAIL1","H")
zepeayg zldpd l"`ec
^W1DICT("EMAILADDRISWRONG","E")
Wrong email address
^W1DICT("EMAILADDRISWRONG","H")
ieby l"`ec zaezk
^W1DICT("EMAILSENDED","E")
Email sent
^W1DICT("EMAILSENDED","H")
xcey l"`ec
^W1DICT("EMHZM","E")
Order measurement unit
^W1DICT("EMHZM","H")
dpnfdl dcin zcigi
^W1DICT("EMPGROUP","E")
Group of employees
^W1DICT("EMPGROUP","H")
micaer zveaw
^W1DICT("EMPID","E")
No. Employee
^W1DICT("EMPID","H")
caer 'qn
^W1DICT("EMPNAME","E")
Worker name
^W1DICT("EMPNAME","H")
caer my
^W1DICT("EMPTABLE","E")
Employees table
^W1DICT("EMPTABLE","H")
micaer zlah
^W1DICT("EMSFR","E")
Unit of measurement for counting
^W1DICT("EMSFR","H")
dxitql dcin zcigi
^W1DICT("EMVADR","E")
EMV address
^W1DICT("EMVADR","H")
EMV zaezk
^W1DICT("EMVARM","E")
The possibility of credit card typing
^W1DICT("EMVARM","H")
`"k zclwd zexyt`
^W1DICT("EMVNPR","E")
Transaction protocol  $1 $2
^W1DICT("EMVNPR","H")
$2 $1 `ay zerepz lewehext
^W1DICT("EMVNUM","E")
EMV number
^W1DICT("EMVNUM","H")
EMV xtqn 
^W1DICT("ENDITEMNUMBERSMOVING","E")
Item number change ended
^W1DICT("ENDITEMNUMBERSMOVING","H")
miizqd mihixt ixtqn iepiy
^W1DICT("ENDORDER","E")
End of Order
^W1DICT("ENDORDER","H")
dpnfd seq
^W1DICT("ENDORDITEMSLIST","E")
List of items asked at end of order [Deliveries]
^W1DICT("ENDORDITEMSLIST","H")
[migelyn] dpnfd seqa mil`ypy mihixt zniyx
^W1DICT("ENDORDRESTITEMSLIST","E")
List of items asked at end of order [Fast Tables]
^W1DICT("ENDORDRESTITEMSLIST","H")
[mixidn zepgley] dpnfd seqa mil`ypy mihixt zniyx
^W1DICT("ENDPREPARINGTIME","E")
Preparation completion time
^W1DICT("ENDPREPARINGTIME","H")
dpkd meiq onf
^W1DICT("ENGLISH","E")
English
^W1DICT("ENGLISH","H")
zilbp`
^W1DICT("ENGLISHNAME","E")
Foreign name
^W1DICT("ENGLISHNAME","H")
zifrela my
^W1DICT("ENGLISHNAME","R")
Latinice!i
^W1DICT("ENTER","E")
Enter
^W1DICT("ENTER","H")
 ENTER dqipk
^W1DICT("ENTERASMEMBERFORSALE","E")
To participate in the promotion enter as a registered customer
^W1DICT("ENTERASMEMBERFORSALE","H")
dipy dahd oi` df rvana ztzzyd xak m`<>eiykr myxdl `p (d)meyx `l oiicr (d)z` m`<>meyx gewlk qpkdl `p rvana zetzzydl
^W1DICT("ENTERCODE","E")
Enter code
^W1DICT("ENTERCODE","H")
cew cilwdl `p
^W1DICT("ENTERCODE","R")
Vvedite kod
^W1DICT("ENTERCRCARD2EMV","E")
Enter card to EMV device
^W1DICT("ENTERCRCARD2EMV","H")
EMV xiyknl qihxk qpkd 
^W1DICT("ENTERNAME","E")
Enter name
^W1DICT("ENTERNAME","H")
my cilwdl `p
^W1DICT("ENTERNAME","R")
Vvedite naim-e
^W1DICT("ENTERNEWNUMBER","E")
Type a new number
^W1DICT("ENTERNEWNUMBER","H")
ycg xtqn clwd
^W1DICT("ENTERNUMBER","E")
Enter a number
^W1DICT("ENTERNUMBER","H")
xtqn clwd
^W1DICT("ENTERNUMBER","R")
Vvedite nomer
^W1DICT("ENTERPASSWORD","E")
Enter password $1
^W1DICT("ENTERPASSWORD","H")
$1 dnqiq ywd
^W1DICT("ENTERPASSWORD","R")
Vvedite parol!m $1
^W1DICT("ENTERPAYMENTDETAILS","E")
Please enter payment details
^W1DICT("ENTERPAYMENTDETAILS","H")
melyz ihxt cilwdl `p
^W1DICT("ENTERPRICE","E")
Type a price
^W1DICT("ENTERPRICE","H")
xign clwd
^W1DICT("ENTRANCE","E")
Entry
^W1DICT("ENTRANCE","H")
dqipk
^W1DICT("ENTRANCE","R")
Pod!tezd
^W1DICT("ENTRANCEDATE","E")
Entry date
^W1DICT("ENTRANCEDATE","H")
dqipk jix`z
^W1DICT("ENTRANCEOREXIT?","E")
Entrance or departure?
^W1DICT("ENTRANCEOREXIT?","H")
? d`ivi e` dqipk
^W1DICT("ENTRANCETIME","E")
Entry time
^W1DICT("ENTRANCETIME","H")
dqipk onf
^W1DICT("EQORIG","E")
Faithful to the original
^W1DICT("EQORIG","H")
xewnl on`p
^W1DICT("ERASECSR","E")
POS release
^W1DICT("ERASECSR","H")
dtew xexgy
^W1DICT("ERASEDLV","E")
Release shipping order
^W1DICT("ERASEDLV","H")
gelyn zpnfd xexgy
^W1DICT("ERASETABLE","E")
Release of table
^W1DICT("ERASETABLE","H")
ogley xexgy
^W1DICT("ERASETXT","E")
Erase comment
^W1DICT("ERASETXT","H")
hqwh wgn
^W1DICT("ERASETXT","R")
Bez kommentari!a
^W1DICT("ERINTINOPEN","E")
An error of opening of file INT-IN
^W1DICT("ERINTINOPEN","H")
INT-IN uaew zgizt z`iby
^W1DICT("ERRKV","E")
Error in the datum $1
^W1DICT("ERRKV","H")
'$1' oezpa d`iby
^W1DICT("ERROR","E")
Error $1
^W1DICT("ERROR","H")
$1 d`iby
^W1DICT("ERROR","R")
O!6ibka $1
^W1DICT("ERRORCODE","E")
Code is wrong
^W1DICT("ERRORCODE","H")
ieby cew
^W1DICT("ERRORCODE","R")
O!6ibka v kode
^W1DICT("ERRORCREATEORDER","E")
Error creating invitation
^W1DICT("ERRORCREATEORDER","H")
dpnfd znwda d`iby
^W1DICT("ERRORHBMASLIST","E")
List of invoices that have not received an allocation number in the last two wee
^W1DICT("ERRORHBMASLIST","H")
mipexg` miireaya d`vwd 'qn elaiw `ly zeipeayg zniyx
^W1DICT("ERRORSPROTOCOL","E")
Error protocol
^W1DICT("ERRORSPROTOCOL","H")
ze`iby lewehext
^W1DICT("ERRTZ","E")
Wrong Allowed business
^W1DICT("ERRTZ","H")
<CANCEL> - lehial, <OK> ugl xey`l ! ieby .n.r/.t.g/.f.z
^W1DICT("ERSCREDWORK","E")
Work release with ABS
^W1DICT("ERSCREDWORK","H")
`ay mr dcear xexgy
^W1DICT("ERSCSR","E")
Type POS number
^W1DICT("ERSCSR","H")
dtew 'qn clwd
^W1DICT("ERSDLV","E")
Type a customer number
^W1DICT("ERSDLV","H")
gewl 'qn clwd
^W1DICT("ERSTBL","E")
Key a number of table
^W1DICT("ERSTBL","H")
ogley 'qn clwd
^W1DICT("ERUADATE","E")
Date Event
^W1DICT("ERUADATE","H")
rex` jix`z
^W1DICT("ERUATIME","E")
Event start time
^W1DICT("ERUATIME","H")
rex` zligz onf
^W1DICT("ERUIME","E")
Сelebrations
^W1DICT("ERUIME","H")
mirex`
^W1DICT("ESEK","E")
Business name
^W1DICT("ESEK","H")
wqr my
^W1DICT("EURO","E")
Euro
^W1DICT("EURO","H")
exei
^W1DICT("EVENING","E")
Evening
^W1DICT("EVENING","H")
axr
^W1DICT("EXAMPLE","E")
Example
^W1DICT("EXAMPLE","H")
dnbec
^W1DICT("EXIT","E")
Exit
^W1DICT("EXIT","H")
d`ivi
^W1DICT("EXIT","R")
Vyhod
^W1DICT("EXIT2KITCHEN","E")
Products came out from the kitchen
^W1DICT("EXIT2KITCHEN","H")
gahndn e`vi mihixt
^W1DICT("EXIT2KITCHEN?","E")
Products came out to the kitchen?
^W1DICT("EXIT2KITCHEN?","H")
?gahndn e`vi mihixt
^W1DICT("EXITMISCOPTION","E")
Please leave a  option "Miscellaneous"
^W1DICT("EXITMISCOPTION","H")
"zepey" divte`n z`vl `p
^W1DICT("EXITNOSAVE","E")
Exit without saving
^W1DICT("EXITNOSAVE","H")
dxiny `ll `v
^W1DICT("EXITPERCENT","E")
% Output
^W1DICT("EXITPERCENT","H")
d`ivi %
^W1DICT("EXITTIME","E")
Exit time
^W1DICT("EXITTIME","H")
d`ivi onf
^W1DICT("FAQ","E")
FAQ
^W1DICT("FAQ","H")
zeaeyze zel`y
^W1DICT("FAQ","R")
Voprosy i otvety
^W1DICT("FASTADDITEMS","E")
Adding Quick Items
^W1DICT("FASTADDITEMS","H")
dxidn mihixt ztqed
^W1DICT("FASTASR","E")
Fast Credit
^W1DICT("FASTASR","H")
dxidn dtwd
^W1DICT("FASTCAPAY","E")
Quick credit
^W1DICT("FASTCAPAY","H")
xidn i`xy`
^W1DICT("FASTCASH","E")
Quick cash
^W1DICT("FASTCASH","H")
xidn onefn
^W1DICT("FASTCIBUS","E")
Quick SODEXO
^W1DICT("FASTCIBUS","H")
xidn (qeaiq) SODEXO
^W1DICT("FASTGRMAX","E")
The maximum number of fast groups is $1
^W1DICT("FASTGRMAX","H")
$1 `ed zexidn zeveaw ly iaxn xtqn
^W1DICT("FASTGROUPSLIST","E")
List of "fast" groups
^W1DICT("FASTGROUPSLIST","H")
"zexidn" zeveaw zniyx
^W1DICT("FASTTB","E")
Quick 10BIS
^W1DICT("FASTTB","H")
xidn 10BIS
^W1DICT("FAX","E")
Fax
^W1DICT("FAX","H")
qwt
^W1DICT("FAX","R")
Faks
^W1DICT("FAXANDMAIL","E")
Fax and email
^W1DICT("FAXANDMAIL","H")
l"`ece qwt
^W1DICT("FAXAUTO","E")
Automatic transmission
^W1DICT("FAXAUTO","H")
ihnehe` xeciy
^W1DICT("FAXCOPY","E")
# Copies of fax
^W1DICT("FAXCOPY","H")
qwt ly miwzrd 'qn
^W1DICT("FAXKIND","E")
Fax transmission mode
^W1DICT("FAXKIND","H")
qwt xeciy jxc
^W1DICT("FAXNUMBERISWRONG","E")
Wrong fax number
^W1DICT("FAXNUMBERISWRONG","H")
ieby qwt 'qn
^W1DICT("FAXQN","E")
Number of faxes
^W1DICT("FAXQN","H")
miqwt 'qn
^W1DICT("FAXREMINDER","E")
A reminder fax is sent
^W1DICT("FAXREMINDER","H")
zxekfz qwt glyp
^W1DICT("FAXSENDED","E")
Fax sended
^W1DICT("FAXSENDED","H")
xcey qwt
^W1DICT("FAXYAD","E")
Initiative Transmission
^W1DICT("FAXYAD","H")
ipci xeciy
^W1DICT("FEEDBACK","E")
Feedback
^W1DICT("FEEDBACK","H")
zexrd
^W1DICT("FEEDBACK","R")
Zame!4ani!a
^W1DICT("FILE","E")
File
^W1DICT("FILE","H")
uaew
^W1DICT("FILECONTENT","E")
Content of file
^W1DICT("FILECONTENT","H")
uaew okez
^W1DICT("FILECREATINGFORGAP","E")
Creating a file for the "GAP" system
^W1DICT("FILECREATINGFORGAP","H")
"GAP" zkxrnl uaew znwd
^W1DICT("FILECREATINGFORHASHAVSHEVET","E")
Create a file for "Hashavshevet"
^W1DICT("FILECREATINGFORHASHAVSHEVET","H")
zayaygl uaew znwd
^W1DICT("FILECREATINGFORTAXESCONTROL","E")
An establishment of file to the income tax
^W1DICT("FILECREATINGFORTAXESCONTROL","H")
dqpkd qnl uaew znwd
^W1DICT("FILECREATINGFORZOOM","E")
Create a file for the system "ZOOM"
^W1DICT("FILECREATINGFORZOOM","H")
"ZOOM" zkxrnl uaew znwd
^W1DICT("FILEFORM","E")
Report Form
^W1DICT("FILEFORM","H")
uaew ly dxeva
^W1DICT("FILEMAILLIST","E")
Transmission list
^W1DICT("FILEMAILLIST","H")
mixeciy zniyx
^W1DICT("FILENAME","E")
File name
^W1DICT("FILENAME","H")
uaew my
^W1DICT("FILENAME","R")
Im!a fa!ila
^W1DICT("FILERCVERROR","E")
Error getting file
^W1DICT("FILERCVERROR","H")
uaew zlawa d`iby
^W1DICT("FILERCVSUCCESS","E")
File passed successfully
^W1DICT("FILERCVSUCCESS","H")
dglvda xar uaew
^W1DICT("FILLCOUPNUMBER","E")
Type a coupon number
^W1DICT("FILLCOUPNUMBER","H")
oetew 'qn clwd
^W1DICT("FILLDATA","E")
Please fill the data
^W1DICT("FILLDATA","H")
mipezpd z` `lnl `p
^W1DICT("FILLDAYS","H")
mei xegal `p
^W1DICT("FILLDISTRICTNAME","E")
Input district name
^W1DICT("FILLDISTRICTNAME","H")
xef` my clwd
^W1DICT("FILLDISTRICTNAME","R")
Vvedite naimenovanie ra!iona
^W1DICT("FILLDONAME","E")
Please fill in the name of the performer
^W1DICT("FILLDONAME","H")
rvan my `lnl `p
^W1DICT("FILLEMPLNAME","E")
Please fill there worker
^W1DICT("FILLEMPLNAME","H")
caer my `lnl `p
^W1DICT("FILLGROUPNAME","E")
Fill group's name, please
^W1DICT("FILLGROUPNAME","H")
dveaw my `lnl `p
^W1DICT("FILLGROUPNAME","R")
Vvedite naimenovanie gruppy
^W1DICT("FILLITEMNAME","E")
Fill product's name, please
^W1DICT("FILLITEMNAME","H")
hixt my `lnl `p
^W1DICT("FILLITEMNAME","R")
Vvedite naimenovanie produkta
^W1DICT("FILLKINDORD","E")
Please fill in an order type
^W1DICT("FILLKINDORD","H")
dpnfd beq `lnl `p
^W1DICT("FILLKINDORDANDMKRDLV","E")
You must fill in the order type and source.
^W1DICT("FILLKINDORDANDMKRDLV","H")
dpnfd xewne beq `lnl yi
^W1DICT("FILLMESSAGE","E")
Fill message text
^W1DICT("FILLMESSAGE","H")
drced cilwdl `p
^W1DICT("FILLMESSAGE","R")
Vvedite tekst soob!seni!a
^W1DICT("FILLMKRDLV","E")
Please fill in order source
^W1DICT("FILLMKRDLV","H")
dpnfd xewn `lnl `p
^W1DICT("FILLNAME","E")
Fill Name
^W1DICT("FILLNAME","H")
my `lnl `p
^W1DICT("FILLORDERDETAILS","E")
Fill order details, please
^W1DICT("FILLORDERDETAILS","H")
dpnfd ihxt `lnl `p
^W1DICT("FILLORDERDETAILS","R")
Zapolnite pojalu!ista dannye zakaza
^W1DICT("FILLORDERNUMBER","E")
Fill out an order number
^W1DICT("FILLORDERNUMBER","H")
dpnfd xtqn `ln
^W1DICT("FILLQN","E")
Please specify quantity of welcome item
^W1DICT("FILLQN","H")
onfen hixt zenk oiivl `p
^W1DICT("FILLSUBGRNAME","E")
Type a subgroup name
^W1DICT("FILLSUBGRNAME","H")
dveaw zz my clwd
^W1DICT("FIND","E")
Find
^W1DICT("FIND","H")
ytg
^W1DICT("FINDALL","E")
General Search
^W1DICT("FINDALL","H")
illk yetig
^W1DICT("FINDCUST","E")
Search a customer
^W1DICT("FINDCUST","H")
gewl ytg
^W1DICT("FINDERROR","E")
Search error !
^W1DICT("FINDERROR","H")
! yetig z`iby
^W1DICT("FINDINGDOCUMENTS","E")
Search for documents
^W1DICT("FINDINGDOCUMENTS","H")
miknqn yetig
^W1DICT("FINDINGORDER","E")
Search of order
^W1DICT("FINDINGORDER","H")
dpnfd yetig
^W1DICT("FINDINGOTHERDOCUMENTS","E")
View and search for other documents
^W1DICT("FINDINGOTHERDOCUMENTS","H")
mixg` miknqn yetige dbvd
^W1DICT("FINDORDER","E")
Search Order
^W1DICT("FINDORDER","H")
dpnfd ytg
^W1DICT("FINDORDERS","E")
Search for orders
^W1DICT("FINDORDERS","H")
zepnfd yetig
^W1DICT("FINISH","E")
Finish
^W1DICT("FINISH","H")
meiq
^W1DICT("FINPREPTIME","E")
Preparation completion time
^W1DICT("FINPREPTIME","H")
dpkd meiq onf
^W1DICT("FIRE","E")
Fire $1
^W1DICT("FIRE","H")
FIRE $1
^W1DICT("FIREOPTION","E")
Messages "FIRE !" generation mode
^W1DICT("FIREOPTION","H")
"FIRE" zerced zwtd avn
^W1DICT("FIREPRINTED","E")
A message "FIRE" has been sent
^W1DICT("FIREPRINTED","H")
FIRE drced dqtcdl dglyp
^W1DICT("FIRSTCHECKNUMBER","E")
First check number
^W1DICT("FIRSTCHECKNUMBER","H")
oey`x wiy 'qn
^W1DICT("FIRSTCHECKNUMBERMUSTBEFILLED","E")
Fill first check number
^W1DICT("FIRSTCHECKNUMBERMUSTBEFILLED","H")
oey`x wiy 'qn `lnl yi
^W1DICT("FIRSTDELETEMYCHECK","E")
First; a MyCheck code must be canceled
^W1DICT("FIRSTDELETEMYCHECK","H")
w'v iin cew lhal yi dligz
^W1DICT("FIRSTITEMSSALE","E")
Sale for first items
^W1DICT("FIRSTITEMSSALE","H")
mipey`x mihixtl rvan
^W1DICT("FIRSTNAME","E")
First name
^W1DICT("FIRSTNAME","H")
ihxt my
^W1DICT("FIRSTNAME","R")
Im!a
^W1DICT("FIRSTOPENINVCDATE","E")
Date of first open invoice
^W1DICT("FIRSTOPENINVCDATE","H")
dgezt dpey`x 'yg jix`z
^W1DICT("FIRSTOPENINVCNMB","E")
Number of first open invoice
^W1DICT("FIRSTOPENINVCNMB","H")
dgezt dpey`x 'yg 'qn
^W1DICT("FIRSTPAGE","E")
This is first page !
^W1DICT("FIRSTPAGE","H")
oey`x sc df
^W1DICT("FIRSTPAGE","R")
Eto perva!a stranica !
^W1DICT("FIRSTPAY","E")
First payment
^W1DICT("FIRSTPAY","H")
oey`x melyz
^W1DICT("FIRSTPAYMENT","E")
The amount of the first payment
^W1DICT("FIRSTPAYMENT","H")
oey`x melyz ly mekq
^W1DICT("FIRSTPAYMENTDATE","E")
First payment date
^W1DICT("FIRSTPAYMENTDATE","H")
oey`xd melyz jix`z
^W1DICT("FIRSTPAYMENTTOOBIG","E")
The first payment is too big
^W1DICT("FIRSTPAYMENTTOOBIG","H")
icin lecb oey`x melyz
^W1DICT("FLAT","E")
Flat #
^W1DICT("FLAT","H")
dxic
^W1DICT("FLAT","R")
Kv.
^W1DICT("FLDERR","E")
Information in field "$1" incorrect
^W1DICT("FLDERR","H")
ieby "$1" dcy okez
^W1DICT("FLDERR","R")
V pole "$1" o!6ibka
^W1DICT("FLDMAX","E")
Record size in field "$1" should be no more than $2
^W1DICT("FLDMAX","H")
zeieez $2 -n xzei zeidl xen` `l "$1" dcy jxe`
^W1DICT("FLDMAX","R")
Makc. dlina pol!a "$1" - $2 simvolov
^W1DICT("FLDMIN","E")
Record size in field "$1" should be no less than $2
^W1DICT("FLDMIN","H")
zeieez $2 zegtl zeidl xen` "$1" dcy jxe`
^W1DICT("FLDMIN","R")
Min. dlina pol!a "$1" - $2 simvolov
^W1DICT("FLDMUST","E")
Field "$1" should be filled
^W1DICT("FLDMUST","H")
daeg "$1" dcy
^W1DICT("FLDMUST","R")
Pole "$1" doljno byt!m zapolneno
^W1DICT("FLDMUSTASTR","E")
All fields with '*' should be filled
^W1DICT("FLDMUSTASTR","H")
`lnl daeg '*'-a mipneqn zecy
^W1DICT("FLDMUSTASTR","R")
Vse pol!a pome!4ennye zvezdo!4ko!i doljny byt!m zapolneny
^W1DICT("FLDNOTDEF","E")
Field $1 is not defined
^W1DICT("FLDNOTDEF","H")
xcbed `l $1 dcy
^W1DICT("FLDNOTDEF","R")
Zna!4enie pol!a $1 ne opredeleno
^W1DICT("FLDNUM","E")
Filed "$1" should be numeric
^W1DICT("FLDNUM","H")
izxtiq zeidl xen` "$1" dcy
^W1DICT("FLDNUM","R")
Zna!4enie pol!a doljno byt!m cifrovym
^W1DICT("FLDTXT","E")
Filed "$1" should be alphabet
^W1DICT("FLDTXT","H")
hqwh zeidl xen` "$1" dcy
^W1DICT("FLDTXT","R")
Zna!4enie pol!a doljno byt!m bukvennym
^W1DICT("FLIGHTNO","E")
Flight no.
^W1DICT("FLIGHTNO","H")
dqih 'qn
^W1DICT("FLOOR","E")
Floor #
^W1DICT("FLOOR","H")
dnew
^W1DICT("FLOOR","R")
!Etaj
^W1DICT("FONT","E")
Font
^W1DICT("FONT","H")
hpet
^W1DICT("FONTSIZE","E")
Size
^W1DICT("FONTSIZE","H")
lceb
^W1DICT("FOODCOST","E")
Foodcost
^W1DICT("FOODCOST","H")
hqewcet
^W1DICT("FORDETAILSPRESSHERE","E")
For details click here
^W1DICT("FORDETAILSPRESSHERE","H")
o`k ugl <BR> mihxtl
^W1DICT("FOREGROUNDCOLOR","E")
Text color
^W1DICT("FOREGROUNDCOLOR","H")
hqwh ly rav
^W1DICT("FOREIGNTYPE","E")
In foreign
^W1DICT("FOREIGNTYPE","H")
zifrela
^W1DICT("FORGETMOBILE","E")
You forget write Your mobile phone number
^W1DICT("FORGETMOBILE","H")
? ciip 'lh 'qn jzeyxa m`d
^W1DICT("FORGETMOBILE","R")
Vy ne zabyli vpisat!m nomer mobil!mnogo telefona ?
^W1DICT("FORGETPSW","E")
Forgot ?
^W1DICT("FORGETPSW","H")
dnqiq izgky
^W1DICT("FORGETPSW","R")
Zabyli ?
^W1DICT("FORITEMSHOWPRESSKEY","E")
To view Item card press [F4] in the "Item Code" field
^W1DICT("FORITEMSHOWPRESSKEY","H")
"hixt cew" dcya [F4] ugl hixt qihxk zbvdl
^W1DICT("FORMULTYPRESSHERE","E")
Click for duplication
^W1DICT("FORMULTYPRESSHERE","H")
letkyl ugl
^W1DICT("FRAMECOLOR4GROUPS","E")
Color of item marking to display in virtual bon
^W1DICT("FRAMECOLOR4GROUPS","H")
il`ehxiee oeaa dbvdl mihixt oeniq ly rav
^W1DICT("FREE","E")
Free
^W1DICT("FREE","H")
iept
^W1DICT("FREECOURIERS","E")
Free
^W1DICT("FREECOURIERS","H")
miiept
^W1DICT("FREETABLES","E")
Free tables
^W1DICT("FREETABLES","H")
miept 'gley
^W1DICT("FREETABLES","R")
Svob. stoly
^W1DICT("FREETEXT","E")
Free text
^W1DICT("FREETEXT","H")
iyteg hqwh
^W1DICT("FROM","E")
From
^W1DICT("FROM","H")
- n
^W1DICT("FROM","R")
s-
^W1DICT("FROMCSR","E")
From POS No.
^W1DICT("FROMCSR","H")
dtewn
^W1DICT("FROMCUSTOM","E")
From a client
^W1DICT("FROMCUSTOM","H")
gewln
^W1DICT("FROMDATE","E")
From date
^W1DICT("FROMDATE","H")
-n
^W1DICT("FROMDATE","R")
s
^W1DICT("FROMDATETODATE","E")
From $1 to $2
^W1DICT("FROMDATETODATE","H")
$2 jix`z cr $1 jix`zn
^W1DICT("FROMDAY","E")
From day
^W1DICT("FROMDAY","H")
mein
^W1DICT("FROME","E")
From
^W1DICT("FROME","H")
n-
^W1DICT("FROME","R")
s-
^W1DICT("FROMGROUP","E")
From a group
^W1DICT("FROMGROUP","H")
dveawn
^W1DICT("FROMMONTH","E")
From month
^W1DICT("FROMMONTH","H")
ycegn
^W1DICT("FROMNEW2OLD","E")
Sort from new to old
^W1DICT("FROMNEW2OLD","H")
oyil ycgn
^W1DICT("FROMOLD2NEW","E")
Sort from old to new
^W1DICT("FROMOLD2NEW","H")
ycgl oyin
^W1DICT("FROMORDER","E")
From the Order
^W1DICT("FROMORDER","H")
dpnfdn
^W1DICT("FROMSITE","E")
From the Site
^W1DICT("FROMSITE","H")
xz`dn
^W1DICT("FROMSITEQN","E")
Number of orders from the website
^W1DICT("FROMSITEQN","H")
xz`n zepnfd 'qn
^W1DICT("FROMSITESUM","E")
Amount of orders from the website
^W1DICT("FROMSITESUM","H")
xz`n zepnfd mekq
^W1DICT("FROMSNIF","E")
From filial
^W1DICT("FROMSNIF","H")
sipqn 
^W1DICT("FROMSNIF","R")
Iz filiala
^W1DICT("FROMSUM","E")
From sum
^W1DICT("FROMSUM","H")
mekqn 
^W1DICT("FROMTABLE","E")
From table
^W1DICT("FROMTABLE","H")
ogleyn
^W1DICT("FROMWEEKDAY","E")
From day
^W1DICT("FROMWEEKDAY","H")
mein
^W1DICT("FULLCUSTCARD","E")
Client card
^W1DICT("FULLCUSTCARD","H")
gewl qihxk
^W1DICT("FULLSHOW","E")
Full view
^W1DICT("FULLSHOW","H")
d`ln dbvd
^W1DICT("FULLSUPPLCARD","E")
Vendor card
^W1DICT("FULLSUPPLCARD","H")
wtq qihxk
^W1DICT("FUTDAT","E")
The restaurant already closed. You can order to next days
^W1DICT("FUTDAT","H")
df oelg xebq <BR> mi`ad minil dpnfd rval ozip <BR> zrk dxebq migelyn zkxrn
^W1DICT("FUTDAT","R")
Restoran uje zakryt. Vy mojete zakazat!m na sledu!u!sie dni
^W1DICT("FUTURE","E")
Future
^W1DICT("FUTURE","H")
iegc
^W1DICT("FUTURE","R")
Otsro!4enny!i
^W1DICT("FUTUREORDER","E")
Future Order
^W1DICT("FUTUREORDER","H")
zicizr dpnfd
^W1DICT("FUTUREORDS","E")
Show future orders
^W1DICT("FUTUREORDS","H")
zeicizr zepnfd bvd
^W1DICT("GALLERY","E")
Gallery
^W1DICT("GALLERY","H")
dixlb
^W1DICT("GALLERY","R")
Gallere!a
^W1DICT("GAPPARAMETERS","E")
Parameters for the "GAP" system
^W1DICT("GAPPARAMETERS","H")
"GAP" zkxrnl mixhnxt
^W1DICT("GAPZREPORT","E")
Extended financial report
^W1DICT("GAPZREPORT","H")
agxen itqk g"ec
^W1DICT("GCOUPCDPAYMUSTBEFILLED","E")
Fill out an item code to redeem a gift slip
^W1DICT("GCOUPCDPAYMUSTBEFILLED","H")
dpzn yelz yeninl hixt cew `lnl yi
^W1DICT("GCOUPON","E")
Gift slip
^W1DICT("GCOUPON","H")
dpzn / iekif yelz
^W1DICT("GCOUPONOLD","E")
Gift slip in old form
^W1DICT("GCOUPONOLD","H")
dpyi dxeva dpzn yelz
^W1DICT("GCOUPPARAMETERS","E")
Gift card parameters
^W1DICT("GCOUPPARAMETERS","H")
dpzn / iekif iyelzl mixhnxt
^W1DICT("GDAY","E")
Daily credit limit
^W1DICT("GDAY","H")
inei i`xy` zxwiz
^W1DICT("GDCR","E")
Size of credit
^W1DICT("GDCR","H")
i`xy` lceb
^W1DICT("GENCOMMENT","E")
General comment
^W1DICT("GENCOMMENT","H")
zillk dxrd
^W1DICT("GENERALPARAMETERS","E")
General parameters
^W1DICT("GENERALPARAMETERS","H")
miillk mixhnxt
^W1DICT("GENERALREPORT","E")
General Report
^W1DICT("GENERALREPORT","H")
illk g"ec
^W1DICT("GENERALSTATUS","E")
General Status
^W1DICT("GENERALSTATUS","H")
illk avn
^W1DICT("GETCARDBALANCE","E")
Check the balance of the card
^W1DICT("GETCARDBALANCE","H")
qihxk ly dxzi xexia
^W1DICT("GETCARDDETAILS","E")
Check card details
^W1DICT("GETCARDDETAILS","H")
qihxk ihxt xexia
^W1DICT("GETCASH","E")
Taking money out of a drawer
^W1DICT("GETCASH","H")
dxibnn sqk z`ved
^W1DICT("GETCUSTOMDETAILS","E")
Show customer details
^W1DICT("GETCUSTOMDETAILS","H")
gewl ihxt bvd
^W1DICT("GETDETAILSCARD","E")
Check card details
^W1DICT("GETDETAILSCARD","H")
qihxk ihxt xexia
^W1DICT("GETSHVAPARAMETERS","E")
Receiving parameters for the ABS
^W1DICT("GETSHVAPARAMETERS","H")
`"ayl mixhnxt zlaw
^W1DICT("GIFTCOUPON","E")
Gift slip
^W1DICT("GIFTCOUPON","H")
dpzn yelz
^W1DICT("GIFTPAID","E")
This coupon has already been paid on the order
^W1DICT("GIFTPAID","H")
$1 dpnfda mley xak df yelz
^W1DICT("GIFTREPORT","E")
Gift Certificates Report
^W1DICT("GIFTREPORT","H")
dpzn iyelz g"ec
^W1DICT("GLIST","E")
Diners:$1
^W1DICT("GLIST","H")
$1 :'eq
^W1DICT("GO","E")
Proceed
^W1DICT("GO","H")
rva
^W1DICT("GO","R")
Vyp-t!m
^W1DICT("GO2INPUTMODE","E")
Insufficient data - Transfer to the data entry option
^W1DICT("GO2INPUTMODE","H")
mipezp zclwd divte`l dxard - mipezp witqn oi`
^W1DICT("GODAS","E")
Size of credit
^W1DICT("GODAS","H")
i`xy` lceb
^W1DICT("GOOGLECODE","E")
Code in GOOGLE
^W1DICT("GOOGLECODE","H")
GOOGLE -a cew
^W1DICT("GOTOMENU","E")
Menu
^W1DICT("GOTOMENU","H")
hixtz
^W1DICT("GOTOSCANER","E")
Scanner
^W1DICT("GOTOSCANER","H")
xpwq
^W1DICT("GRAPH","E")
Graph
^W1DICT("GRAPH","H")
sxb
^W1DICT("GRAPHS","E")
Graphs
^W1DICT("GRAPHS","H")
mitxb
^W1DICT("GRAPHYEAR","E")
Graph $1 $2 per year $3 from month $4 to month $5
^W1DICT("GRAPHYEAR","H")
$5 yceg cr $4 ycegn $3 dpyl $2 $1 sxb
^W1DICT("GRCTABLE","E")
Concentration groups table
^W1DICT("GRCTABLE","H")
fekix zeveaw zlah
^W1DICT("GRID","E")
Grid
^W1DICT("GRID","H")
mieew
^W1DICT("GROUP","E")
Group
^W1DICT("GROUP","H")
dveaw
^W1DICT("GROUP","R")
Gruppa
^W1DICT("GROUP4DLM","E")
Group number for separation
^W1DICT("GROUP4DLM","H")
dcxtdl dveaw 'qn
^W1DICT("GROUP4PIZUL","E")
Group number for splitting
^W1DICT("GROUP4PIZUL","H")
levitl dveaw 'qn
^W1DICT("GROUPCODE","E")
Group code
^W1DICT("GROUPCODE","H")
dveaw cew
^W1DICT("GROUPCUSTOMERSTABLE","E")
Group - customers table
^W1DICT("GROUPCUSTOMERSTABLE","H")
"zegewl - dveaw" dlah
^W1DICT("GROUPCUSTOMERSTABLE","R")
Spravo!4nik "gruppa - klienty"
^W1DICT("GROUPCUSTOMINVOICES","E")
A production of invoices to the customer base
^W1DICT("GROUPCUSTOMINVOICES","H")
zegewl zveawl zeipeayg zwtd
^W1DICT("GROUPEMPTABLE","E")
Table "Employee group - employees"
^W1DICT("GROUPEMPTABLE","H")
"micaer - micaer zveaw" dlah
^W1DICT("GROUPEXIST","E")
Code already exist
^W1DICT("GROUPEXIST","H")
miiw hixt
^W1DICT("GROUPEXIST","R")
Kod cu!sestvuet v sisteme
^W1DICT("GROUPITEMSTABLE","E")
Groups - Products table
^W1DICT("GROUPITEMSTABLE","H")
mihixt - zeveaw dlah
^W1DICT("GROUPITEMSTABLE","R")
Tablica "Gruppa-tovar"
^W1DICT("GROUPNAME","E")
Group name
^W1DICT("GROUPNAME","H")
dveaw my
^W1DICT("GROUPNAME","R")
Naim-e gruppy
^W1DICT("GROUPNUMBER","E")
Group number
^W1DICT("GROUPNUMBER","H")
dveaw xtqn
^W1DICT("GROUPORDERSORT","E")
Sort by group order in the menu
^W1DICT("GROUPORDERSORT","H")
hixtza zeveaw xcq itl oein
^W1DICT("GROUPPOSITIONSTABLE","E")
Display item groups by positions
^W1DICT("GROUPPOSITIONSTABLE","H")
zecnr itl mihixt zeveaw zbvd
^W1DICT("GROUPPRINTERDEFINITIONS","E")
Set up printers for a group
^W1DICT("GROUPPRINTERDEFINITIONS","H")
dveawl zeqtcn zxcbd
^W1DICT("GROUPPRINTERSTABLE","E")
Table "Item Groups - Printers"
^W1DICT("GROUPPRINTERSTABLE","H")
"zeqtcn - mihixt zeveaw" dlah
^W1DICT("GROUPREPORTPERMONTH","E")
Sales of items by groups and months annual report
^W1DICT("GROUPREPORTPERMONTH","H")
miyceg itl izpy mihixt zeveaw g"ec 
^W1DICT("GROUPREPORTPERMONTH2YEAR","E")
Sales of item groups report per months to year $1
^W1DICT("GROUPREPORTPERMONTH2YEAR","H")
$3 yceg cr $2 ycegn $1 dpyl mihixt zeveaw g"ec
^W1DICT("GROUPS","E")
Groups
^W1DICT("GROUPS","H")
zeveaw
^W1DICT("GROUPS","R")
Gruppy
^W1DICT("GROUPSPARTITIONCOLORDEFINITION","E")
Groups part. def-n
^W1DICT("GROUPSPARTITIONCOLORDEFINITION","H")
mihixt zeveaw wlgl mirav zxcbd
^W1DICT("GROUPSUBGROUPSTABLE","E")
Table "Groups - Subgroups"
^W1DICT("GROUPSUBGROUPSTABLE","H")
"zeveaw zz - zeveaw" dlah
^W1DICT("GROUPTABLEKINDSTABLE","E")
Displays item groups by table types
^W1DICT("GROUPTABLEKINDSTABLE","H")
zepgley ibeq itl mihixt zeveaw zbvd
^W1DICT("GROUPWORKTIMEREPAIR","E")
Fixing working hours for a group of employees
^W1DICT("GROUPWORKTIMEREPAIR","H")
micaer zveawl dcear zery oewiz
^W1DICT("GST","E")
Diner
^W1DICT("GST","H")
creq
^W1DICT("GUEST","E")
Guest
^W1DICT("GUEST","H")
ycg gewl
^W1DICT("GUEST","R")
Gostei
^W1DICT("GUESTNUMBERNOTVALID","E")
Number of diners that you marked incorrectly
^W1DICT("GUESTNUMBERNOTVALID","H")
oekp `l zpniqy micreq 'qn
^W1DICT("GUESTS","E")
Guests
^W1DICT("GUESTS","H")
micreq
^W1DICT("GUESTS","R")
Gost!m
^W1DICT("GUESTSEVENING","E")
Evening diners
^W1DICT("GUESTSEVENING","H")
axr micreq
^W1DICT("GUESTSMORNING","E")
Morning diners
^W1DICT("GUESTSMORNING","H")
xwea micreq
^W1DICT("GUESTSNUMBER","E")
Number of guests
^W1DICT("GUESTSNUMBER","H")
migxe` xtqn
^W1DICT("GUESTSNUMBERTOOMUCH","E")
Number of diners marked too large
^W1DICT("GUESTSNUMBERTOOMUCH","H")
icin lecb mipneqn micreq 'qn
^W1DICT("GUESTSQN","E")
Guests #
^W1DICT("GUESTSQN","H")
micreq 'qn
^W1DICT("GUESTSQN","R")
K-vo kl-v
^W1DICT("GUESTSTOTAL","E")
Total number of diners
^W1DICT("GUESTSTOTAL","H")
micreq k"dq
^W1DICT("H","E")
Password for discount
^W1DICT("H","H")
dgpdl dnqiq
^W1DICT("HACHANA","E")
Average Preparation Time (minutes)
^W1DICT("HACHANA","H")
(zewc) rvenn dpkd onf
^W1DICT("HAFSAKA","E")
Break $1 minutes
^W1DICT("HAFSAKA","H")
zewc $1 dwqtd
^W1DICT("HAPPYHOUERSTABLE","E")
Happy houers table
^W1DICT("HAPPYHOUERSTABLE","H")
zery itl zegpd zlah
^W1DICT("HAPPYHOUERSTABLE","R")
Po!4asovye skidki
^W1DICT("HASHAVSHEVETPARAMETERS","E")
Parameters to "Hashavshevet"
^W1DICT("HASHAVSHEVETPARAMETERS","H")
zayaygl mixhnxt
^W1DICT("HASHAVSHEVETPARAMETERS2","E")
Parameters for "Hashavshevet" - types of transactions
^W1DICT("HASHAVSHEVETPARAMETERS2","H")
drepz ibeq - zayaygl mixhnxt
^W1DICT("HBMAIL","E")
Email Invoices
^W1DICT("HBMAIL","H")
l"`ecl zeipeayg
^W1DICT("HBMAS","E")
Assignment number $1
^W1DICT("HBMAS","H")
$1 : d`vwd 'qn
^W1DICT("HBMAS9","E")
Last 9 digits of confirmation
^W1DICT("HBMAS9","H")
xeyi` ly zepexg` zextq dryz
^W1DICT("HBMAS9MIN","E")
Assignment number should be 9 digits.
^W1DICT("HBMAS9MIN","H")
zextq 9 zeidl xen` d`vwd 'qn
^W1DICT("HBMASAUTH","E")
Receiving invoice confirmation from the ITD
^W1DICT("HBMASAUTH","H")
dqpkd qnn zipeayg xeyi` zlaw
^W1DICT("HBMASERROR","E")
Error getting assignment number $1 $2
^W1DICT("HBMASERROR","H")
$2 $1 d`vwd 'qn zlawa d`iby
^W1DICT("HBMASPARAMETERS","E")
Parameters for obtaining approval for an invoice from the ITD
^W1DICT("HBMASPARAMETERS","H")
dqpkd qnn zipeaygl xeyi` zlawl mixhnxt
^W1DICT("HBMASPROT","E")
Protocol for receiving approval from the ITD $1
^W1DICT("HBMASPROT","H")
$1 dqpkd qnn xeyi` zlaw lewehext
^W1DICT("HBMASTOKEN","E")
Receiving a token with identification
^W1DICT("HBMASTOKEN","H")
zedcfd mr oweh zlaw
^W1DICT("HBMASVVOD","E")
Entering an income tax invoice confirmation
^W1DICT("HBMASVVOD","H")
dqpkd qnn zipeayg xeyi` zclwd
^W1DICT("HBMASVVTOKEN","E")
Token typing
^W1DICT("HBMASVVTOKEN","H")
oweh zclwd
^W1DICT("HBNOW","E")
Immediate Invoice
^W1DICT("HBNOW","H")
ziciin zipeayg zwtd
^W1DICT("HDENG","E")
Title (English only)
^W1DICT("HDENG","H")
( cala zilbp` ) zxzek
^W1DICT("HEADER","E")
Head line
^W1DICT("HEADER","H")
zxzek
^W1DICT("HEADER","R")
Zagolovok
^W1DICT("HEADERSCOLORDEFINITION","E")
Top color def-n
^W1DICT("HEADERSCOLORDEFINITION","H")
oeil` wlgl mirav zxcbd
^W1DICT("HEADLINE","E")
Title between lines
^W1DICT("HEADLINE","H")
zexeyd oia zxzek
^W1DICT("HEADPAGE","E")
Page title
^W1DICT("HEADPAGE","H")
sc zxzek
^W1DICT("HEBREW","E")
Hebrew
^W1DICT("HEBREW","H")
zixar
^W1DICT("HELLO","E")
Hello
^W1DICT("HELLO","H")
mely
^W1DICT("HELLO","R")
Zdravstvu!ite
^W1DICT("HERE","E")
Here
^W1DICT("HERE","H")
o`k
^W1DICT("HESH","E")
Account
^W1DICT("HESH","H")
oeayg
^W1DICT("HEX","E")
Hex
^W1DICT("HFKMZSM","E")
Left to deposit $1 NIS
^W1DICT("HFKMZSM","H")
g"y $1 dcwtdl x`yp
^W1DICT("HFKPSLMZSM","E")
Deposit money into a smart drawer
^W1DICT("HFKPSLMZSM","H")
dnkg dxibnl sqk cwtd
^W1DICT("HFKSUM","E")
Deposit at the cash register
^W1DICT("HFKSUM","H")
dtewa dcwtd
^W1DICT("HI","E")
Hi
^W1DICT("HI","H")
mely
^W1DICT("HI","R")
Zdravstvu!ite
^W1DICT("HIDEPRICES","E")
Hide prices
^W1DICT("HIDEPRICES","H")
mixign xzqd
^W1DICT("HIDEREADYITEMS","E")
Hide ready itemsV
^W1DICT("HIDEREADYITEMS","H")
mipken mihixt xzqd
^W1DICT("HIDETEL","E")
Hide phones
^W1DICT("HIDETEL","H")
mipetlh xzqd
^W1DICT("HIDEVIRTKB","E")
Disable Virtual Keyboard
^W1DICT("HIDEVIRTKB","H")
zil`ehxie zclwn lha
^W1DICT("HNH","E")
Discount in shekels
^W1DICT("HNH","H")
g"y dgpd
^W1DICT("HNH1","E")
Additional discount : $1 shekels
^W1DICT("HNH1","H")
g"y $1 : ztqep dgpd
^W1DICT("HNH2","E")
Rounding discount $1
^W1DICT("HNH2","H")
$1 lebir zgpd
^W1DICT("HOLIDAYSTABLE","E")
Holydays Table
^W1DICT("HOLIDAYSTABLE","H")
mibg zlah
^W1DICT("HOME","E")
House #
^W1DICT("HOME","H")
zia 'qn
^W1DICT("HOME","R")
Dom !%N!%
^W1DICT("HOME1","E")
Home
^W1DICT("HOME1","H")
zia
^W1DICT("HOMENMB","E")
House #
^W1DICT("HOMENMB","H")
(dxic llek `l) <BR> dpnfdd z` `iadl zia 'qn dfi`l
^W1DICT("HOMENMB","R")
Nomer doma
^W1DICT("HOMERANGE","E")
House # must be from $1 to $2
^W1DICT("HOMERANGE","H")
$2 cr $1-n geeha `ed laewn zia 'qn
^W1DICT("HOMERANGE","R")
Nomer doma doljen byt!m v diapazone ot $1 do $2
^W1DICT("HOUER","E")
Hour
^W1DICT("HOUER","H")
'y
^W1DICT("HOUER","R")
!4.
^W1DICT("HOURNOTDEFINED","E")
Unspecified time
^W1DICT("HOURNOTDEFINED","H")
zxcben `l dry
^W1DICT("HOURS","E")
Hours
^W1DICT("HOURS","H")
zery
^W1DICT("HOURSDIVIDES","E")
Distribution hours
^W1DICT("HOURSDIVIDES","H")
dwelg zery
^W1DICT("HOURSRNG","E")
From hour $1 to $2
^W1DICT("HOURSRNG","H")
$2 dry cr $1 dryn
^W1DICT("HOURSSHOWDECIMAL","E")
Displays hours in decimal form
^W1DICT("HOURSSHOWDECIMAL","H")
ipexyr dxeva zery zbvd
^W1DICT("HOURSSHOWNORMAL","E")
Displays hours in normal mode
^W1DICT("HOURSSHOWNORMAL","H")
dlibx dxeva zery zbvd
^W1DICT("HOV","E")
Debt
^W1DICT("HOV","H")
aeg
^W1DICT("HOVA","E")
Duty
^W1DICT("HOVA","H")
daeg
^W1DICT("HOVHBC","E")
Debt according to invoices and receipts
^W1DICT("HOVHBC","H")
zelawe zeipeayg itl aeg
^W1DICT("HOWARRIVE","E")
Location description
^W1DICT("HOWARRIVE","H")
ribdl ji`
^W1DICT("HOWEVERPAINTING","E")
Painting of hall
^W1DICT("HOWEVERPAINTING","H")
mle` xeiv
^W1DICT("HOWEVERSHOW","E")
Display Hall
^W1DICT("HOWEVERSHOW","H")
mle` zbvd
^W1DICT("HOWINPUTCITY","E")
How to select cities: type - 1; choose from a list - 2
^W1DICT("HOWINPUTCITY","H")
2 - dniyxn xegal , 1 - cilwdl : mixr xegal ji`
^W1DICT("HOWMUCHDISC","E")
Size of discount shekels
^W1DICT("HOWMUCHDISC","H")
g"y dgpd lceb
^W1DICT("HOWSENDDOC","E")
In what way to send a document
^W1DICT("HOWSENDDOC","H")
jnqn gelyl dxev dfi`a
^W1DICT("HSVDOPPARAMETERS","E")
Additional parameter
^W1DICT("HSVDOPPARAMETERS","H")
zayaygl mitqep mixhnxt
^W1DICT("HSVLREP","E")
Transfer of customer data to "Hashavshevet"
^W1DICT("HSVLREP","H")
zayaygl zegewl ipezp zxard
^W1DICT("HSVREPORT","E")
Transferring data to the computer
^W1DICT("HSVREPORT","H")
zayaygl mipezp zxard
^W1DICT("HTLBUS","E")
Htl bus
^W1DICT("HZCAREPORT","E")
Credit card report
^W1DICT("HZCAREPORT","H")
i`xy` iqihxk g"ec
^W1DICT("HZMH","E")
Bid
^W1DICT("HZMH","H")
xign zrvd
^W1DICT("HZMLK","E")
Reference
^W1DICT("HZMLK","H")
`zknq`
^W1DICT("HZMMSK","E")
Weight order
^W1DICT("HZMMSK","H")
lwyn zpnfd
^W1DICT("HZSLTIM","E")
Courier booking time
^W1DICT("HZSLTIM","H")
gily zpnfd onf
^W1DICT("IBONPARAMETERS","H")
"IBON" zkxrnl mixhnxt
^W1DICT("IDNUMBER","E")
ID Number
^W1DICT("IDNUMBER","H")
zedf 'z 'qn
^W1DICT("IDNUMBER","R")
Nomer pasporta
^W1DICT("IDNUMBERISWRONG","E")
Tells ' identity is incorrect
^W1DICT("IDNUMBERISWRONG","H")
dpekp `l zxewia zxtq
^W1DICT("IDWRONG","E")
Invalid ID value
^W1DICT("IDWRONG","H")
ieby ID jxr
^W1DICT("IFERRORONLY","E")
In case of problem only
^W1DICT("IFERRORONLY","H")
cala dlwz dxwna
^W1DICT("IFHBMAIL","E")
Send a copy of an invoice to email?
^W1DICT("IFHBMAIL","H")
l"`ecl zipeayg ly xewn gelyl m`d
^W1DICT("IFPRINTMDB","E")
Print labels ?
^W1DICT("IFPRINTMDB","H")
? zewacn qitcdl
^W1DICT("IFYOUMEMBER","E")
If You member You can:
^W1DICT("IFYOUMEMBER","H")
leki meyx gewl
^W1DICT("IFYOUMEMBER","R")
Zaregistrirovalis!m? Vy mojete:
^W1DICT("IGUL","E")
Circle
^W1DICT("IGUL","H")
lebir
^W1DICT("IMAGE","E")
Image
^W1DICT("IMAGE","H")
dpenz
^W1DICT("IMBLI","E")
With / without
^W1DICT("IMBLI","H")
ila / mr
^W1DICT("IMREADY","E")
I am ready
^W1DICT("IMREADY","H")
oken ip`
^W1DICT("INBODYMAIL","E")
In email content
^W1DICT("INBODYMAIL","H")
l"`ec okeza
^W1DICT("INCASH","E")
In cash
^W1DICT("INCHECK","E")
In checks
^W1DICT("INCLDMHNH","E")
Including shipping fees and discounts
^W1DICT("INCLDMHNH","H")
zegpde gelyn inc llek
^W1DICT("INCLUDEPERCENTDISC","E")
In them discounts in the percent:
^W1DICT("INCLUDEPERCENTDISC","H")
: mifeg`a zegpd mkeza
^W1DICT("INCLUDETIPS","E")
Show tips and service charges
^W1DICT("INCLUDETIPS","H")
zexiy ince mitih bivdl
^W1DICT("INCOME","E")
Income
^W1DICT("INCOME","H")
dqpkd
^W1DICT("INCOMEARMINVOICE","E")
Purchase Invoice  (free text)
^W1DICT("INCOMEARMINVOICE","H")
( iyteg hqwh ) zexiy ykx zipeayg
^W1DICT("INCOMEARMINVOICES","E")
Purchase Invoices (free text)
^W1DICT("INCOMEARMINVOICES","H")
( iyteg hqwh ) zexiy ykx zeipeayg
^W1DICT("INCOMEDEBETARMINVOICE","E")
Purchase Credit Invoice (free text)
^W1DICT("INCOMEDEBETARMINVOICE","H")
( iyteg hqwh ) iekif zexiy ykx zipeayg
^W1DICT("INCOMEDEBETARMINVOICES","E")
Purchase Credit Invoices (free text)
^W1DICT("INCOMEDEBETARMINVOICES","H")
( iyteg hqwh ) iekif zexiy ykx zeipeayg
^W1DICT("INCOMEDEBETINVOICE","E")
Purchase Credit Invoice
^W1DICT("INCOMEDEBETINVOICE","H")
iekif ykx zipeayg
^W1DICT("INCOMEDEBETINVOICES","E")
Purchase Credit Invoice
^W1DICT("INCOMEDEBETINVOICES","H")
iekif ykx zipeayg
^W1DICT("INCOMEDEBETINVOICESLIST","E")
Purchase Credit Invoices List
^W1DICT("INCOMEDEBETINVOICESLIST","H")
iekif ykx zeipeayg zniyx
^W1DICT("INCOMEDETAILINVOICE","E")
Purchase invoice with detail
^W1DICT("INCOMEDETAILINVOICE","H")
hexit mr ykx zipeayg
^W1DICT("INCOMEDETAILINVOICES","E")
Purchase invoices with detail
^W1DICT("INCOMEDETAILINVOICES","H")
hexit mr ykx zeipeayg
^W1DICT("INCOMEDLVBACKDOC","E")
Refund Certificate
^W1DICT("INCOMEDLVBACKDOC","H")
xfgd zcerz
^W1DICT("INCOMEDLVBACKLIST","E")
List of return certificates
^W1DICT("INCOMEDLVBACKLIST","H")
xfgd zecerz zniyx
^W1DICT("INCOMEDLVDOC","E")
Purchase shipping certificate
^W1DICT("INCOMEDLVDOC","H")
ykx gelyn zcerz
^W1DICT("INCOMEDLVDOCLIST2ITEM","E")
Purchase shipping certificates list for item '$1'
^W1DICT("INCOMEDLVDOCLIST2ITEM","H")
' $1 ' hixtl ykx gelyz zecerz zniyx
^W1DICT("INCOMEDLVDOCSLIST","E")
Purchase shipping certificates list
^W1DICT("INCOMEDLVDOCSLIST","H")
ykx gelyz zecerz zniyx
^W1DICT("INCOMEDOCUMENTS","E")
Purchasing Documents
^W1DICT("INCOMEDOCUMENTS","H")
ykx iknqn
^W1DICT("INCOMEINVOICE","E")
Purchase Invoice
^W1DICT("INCOMEINVOICE","H")
ykx zipeayg
^W1DICT("INCOMEINVOICES","E")
Purchase Invoices
^W1DICT("INCOMEINVOICES","H")
ykx zeipeayg
^W1DICT("INCOMEINVOICESLIST","E")
Purchase Invoices List
^W1DICT("INCOMEINVOICESLIST","H")
ykx zeipeayg zniyx
^W1DICT("INCOMEINVOICESLIST2ITEM","E")
Purchase Invoice List for item '$1'
^W1DICT("INCOMEINVOICESLIST2ITEM","H")
' $1 ' hixtl ykx zeipeayg zniyx
^W1DICT("INCOMEREPORT","E")
Balance of incomes report
^W1DICT("INCOMEREPORT","H")
zeqpkd of`n g"ec
^W1DICT("INCRED","E")
In credit
^W1DICT("INCREDCA","E")
In credit cards
^W1DICT("INDEVELOPMENT","E")
Sorry, the option in development
^W1DICT("INDEVELOPMENT","H")
gezita oiicr ,dgilq
^W1DICT("INDEVELOPMENT","R")
Izvinite , opci!a v stadii razrabotki
^W1DICT("INITCARD","E")
Card activation
^W1DICT("INITCARD","H")
qihxk zlrtd
^W1DICT("INITDAY","E")
Boot day
^W1DICT("INITDAY","H")
mei legzi`
^W1DICT("INITIAL","E")
Initial
^W1DICT("INITIAL","H")
zeaiz iy`x
^W1DICT("INPUT","E")
Entry
^W1DICT("INPUT","H")
dqipk
^W1DICT("INPUTCARD","E")
Typing manually
^W1DICT("INPUTCARD","H")
zipci dclwd
^W1DICT("INPUTCOMMENTS","E")
Type comments
^W1DICT("INPUTCOMMENTS","H")
zexrd clwd
^W1DICT("INPUTCUSTDETAILSFORSEARCH","E")
Enter well-known customer information for search
^W1DICT("INPUTCUSTDETAILSFORSEARCH","H")
yetigl mireci gewl ihxt cilwdl `p
^W1DICT("INPUTDATA","E")
Input data :
^W1DICT("INPUTDATA","H")
mipezp clwd
^W1DICT("INPUTDATA","R")
Vvedite dannye
^W1DICT("INPUTORDERDETAILSFORSEARCH","E")
Enter well-known search details
^W1DICT("INPUTORDERDETAILSFORSEARCH","H")
yetigl mireci dpnfd ihxt cilwdl `p
^W1DICT("INPUTORDTIME","E")
Please enter a delivery time or mark an order to confirm a requested time
^W1DICT("INPUTORDTIME","H")
ywean onf xy`l ick dpnfd onql e` dwtq` onf cilwdl `p
^W1DICT("INPUTSHOPSCODE","E")
For a discount on the "Shops" operation; please enter a Sale code
^W1DICT("INPUTSHOPSCODE","H")
rvan cew cilwdl `p "qtey" rvana dgpd zlawl
^W1DICT("INPUTSHOPSCODE1","E")
Code can be obtained on the site
^W1DICT("INPUTSHOPSCODE1","H")
xz`a lawl ozip cew
^W1DICT("INTERFACEPARAMETERS","E")
Parameters for interfaces
^W1DICT("INTERFACEPARAMETERS","H")
miwynnl mixhnxt
^W1DICT("INTERNETPRINTERDEFINITION","E")
Setting up a printer to print invoices from the Internet
^W1DICT("INTERNETPRINTERDEFINITION","H")
hpxhpi`n zeipeayg zqtcdl zqtcn ly dxcbd
^W1DICT("INTOTNOTEXIST","E")
File int ot nonexistent
^W1DICT("INTOTNOTEXIST","H")
miiw `l INT-OT uaew
^W1DICT("INTRFPSW","E")
Passwords for interfaces
^W1DICT("INTRFPSW","H")
miwynnl dnqiq
^W1DICT("INVALIDDATE","E")
Please correct a date
^W1DICT("INVALIDDATE","H")
mipekp `l onf e` jix`z
^W1DICT("INVALIDDATE","R")
Data ukazana neverno
^W1DICT("INVALIDHOMENUMBER","E")
Invalid home number
^W1DICT("INVALIDHOMENUMBER","H")
ieby zia xtqn
^W1DICT("INVALIDHOMENUMBER","R")
O!6ibo!4ny!i nomer doma
^W1DICT("INVALIDINVOICENUMBER","E")
Number of invoice is incorrect
^W1DICT("INVALIDINVOICENUMBER","H")
ieby zipeayg xtqn
^W1DICT("INVALIDNUMBER","E")
Invalid number
^W1DICT("INVALIDNUMBER","H")
ieby xtqn
^W1DICT("INVALIDNUMBER","R")
O!6ibo!4ny!i nomer
^W1DICT("INVALIDPHONENUMBER","E")
Invalid phone number
^W1DICT("INVALIDPHONENUMBER","H")
ieby oetlh xtqn
^W1DICT("INVALIDPHONENUMBER","R")
O!6ibo!4ny!i nomer telefona
^W1DICT("INVALIDRANGE","E")
Wrong range
^W1DICT("INVALIDRANGE","H")
oekp `l geeh
^W1DICT("INVALIDTIME","E")
At that time restaurant doesn't work
^W1DICT("INVALIDTIME","H")
oekp `l dpnfd onf
^W1DICT("INVALIDTIME","R")
Vrem!a ukazano neverno
^W1DICT("INVC2CUST","E")
Invoice for customer $1
^W1DICT("INVC2CUST","H")
$1 gewll 'yg
^W1DICT("INVCORDCONT","E")
Print order contents on your invoice
^W1DICT("INVCORDCONT","H")
zipeayga zepnfd okez qtcd
^W1DICT("INVCORDLIST","E")
Print a list of orders in the invoice
^W1DICT("INVCORDLIST","H")
zipeayga zepnfd zniyx qtcd
^W1DICT("INVCORDSUM","E")
Invoices and Orders
^W1DICT("INVCORDSUM","H")
zepnfd + z-yg
^W1DICT("INVCRCP","E")
Invoice / Receipt
^W1DICT("INVCRCP","H")
dlaw/qn 'ayg
^W1DICT("INVCRCPLIST","E")
Invoices / Receipt List
^W1DICT("INVCRCPLIST","H")
dlaw/qn 'ayg zniyx
^W1DICT("INVENTORYBALANCESREPAIRING","E")
Repair of inventory balances
^W1DICT("INVENTORYBALANCESREPAIRING","H")
i`ln zexzi oewiz
^W1DICT("INVOICE","E")
Invoice
^W1DICT("INVOICE","H")
zipeayg
^W1DICT("INVOICE2CUST","E")
Customer Invoice
^W1DICT("INVOICE2CUST","H")
gewll zipeayg
^W1DICT("INVOICE2DATE","E")
Generate an invoice for a date
^W1DICT("INVOICE2DATE","H")
jix`zl zipeayg witdl
^W1DICT("INVOICEBALANCE","E")
Balance according to invoices
^W1DICT("INVOICEBALANCE","H")
zeipeayg itl dxzi
^W1DICT("INVOICEDELETED","E")
Invoice canceled
^W1DICT("INVOICEDELETED","H")
dlhea zipeayg
^W1DICT("INVOICEDOCNOTUPDATED","E")
Document belongs to $ 1 invoice - no update
^W1DICT("INVOICEDOCNOTUPDATED","H")
okcrl oi` - $1 zipeaygl jiiy jnqn
^W1DICT("INVOICEISSUENOTLATER","E")
Date a production of invoice not later off $1
^W1DICT("INVOICEISSUENOTLATER","H")
$1-n xzei xge`n `l zipeayg zwtd jix`z
^W1DICT("INVOICENMB","E")
Tax invoice of number
^W1DICT("INVOICENMB","H")
'qn qn zipeayg
^W1DICT("INVOICENOTEXIST","E")
Nonexistent invoice
^W1DICT("INVOICENOTEXIST","H")
! zniiw `l zipeayg
^W1DICT("INVOICENOTISSUED","E")
Invoice not generated
^W1DICT("INVOICENOTISSUED","H")
! dwted `l zipeayg
^W1DICT("INVOICENUMBER","E")
Number of invoice
^W1DICT("INVOICENUMBER","H")
zipeayg 'qn
^W1DICT("INVOICENUMBERIS","E")
Invoice of number $1
^W1DICT("INVOICENUMBERIS","H")
$1 'qn zipeayg
^W1DICT("INVOICENUMBERNOTORDER!","E")
Invoice number (not order number!)
^W1DICT("INVOICENUMBERNOTORDER!","H")
( ! dpnfd 'qn `l )  zipeayg 'qn
^W1DICT("INVOICEPAIDNOCHANGE","E")
Invoice paid - do not change !
^W1DICT("INVOICEPAIDNOCHANGE","H")
! zepyl oi` - dnley zipeayg
^W1DICT("INVOICEPRINTED","E")
Invoice was printed
^W1DICT("INVOICEPRINTED","H")
dqtcdl glyp jnqn
^W1DICT("INVOICERECEIPT","E")
Invoice / Receipt
^W1DICT("INVOICERECEIPT","H")
dlaw/qn zipeayg
^W1DICT("INVOICERECEIPTESREPORT","E")
Invoices / Receipt Report
^W1DICT("INVOICERECEIPTESREPORT","H")
dlaw/qn zipeayg g"ec
^W1DICT("INVOICES","E")
Invoices
^W1DICT("INVOICES","H")
ziepeayg
^W1DICT("INVOICES4PAYMENT","E")
Invoices for payment
^W1DICT("INVOICES4PAYMENT","H")
melyzl zeipeayg
^W1DICT("INVOICESANDRECEIPTS","E")
According to invoices and receipts
^W1DICT("INVOICESANDRECEIPTS","H")
zelawe zeipeayg itl
^W1DICT("INVOICESCLOSING","E")
Closing of invoices
^W1DICT("INVOICESCLOSING","H")
zeipeayg zxibq
^W1DICT("INVOICESCLOSINGLIST","E")
Invoice list closed in constraint
^W1DICT("INVOICESCLOSINGLIST","H")
ueli`a exbqpy zeipeayg zniyx
^W1DICT("INVOICESENDED2MAIL","E")
Invoice sent by email
^W1DICT("INVOICESENDED2MAIL","H")
l"`eca dglyp zipeayg
^W1DICT("INVOICESFORGROUPCUSTOMERS","E")
A production of invoices to the customer base
^W1DICT("INVOICESFORGROUPCUSTOMERS","H")
zegewl zveawl zeipeayg zwtd
^W1DICT("INVOICESLIST","E")
A list of invoices
^W1DICT("INVOICESLIST","H")
zeipeayg zniyx
^W1DICT("INVOICESPOWERCLOSING","E")
Closing forced of customer invoices
^W1DICT("INVOICESPOWERCLOSING","H")
zvle`n zegewl ly zeipeayg zxibq
^W1DICT("INVOICESREPORT","E")
Tax Invoice Report
^W1DICT("INVOICESREPORT","H")
qn zeipeayg g"ec
^W1DICT("INVOICESUMGREATTHANDEAL","E")
Amount on invoice # $1 is greater than balance $2. To approve ?
^W1DICT("INVOICESUMGREATTHANDEAL","H")
? xy`l . $2 dwqr zxzin lecb $1 qn zipeayga mekq
^W1DICT("INVOICETX","E")
Tax Invoice
^W1DICT("INVOICETX","H")
qn zipeayg
^W1DICT("INVOICETXLIST","E")
Tax Invoices List
^W1DICT("INVOICETXLIST","H")
qn zeipeayg zniyx
^W1DICT("INVOICEVALUE","E")
Invoice Value
^W1DICT("INVOICEVALUE","H")
zipeayg jxr
^W1DICT("INVRCPNMB","E")
Invoice / Receipt No.
^W1DICT("INVRCPNMB","H")
'qn dlaw/qn zipeayg
^W1DICT("INWAITING","E")
ÐwÑcÑbвÑhÑbп
^W1DICT("INWAITING","H")
dpznda
^W1DICT("IPADDRESSISWRONG","E")
Invalid IP address
^W1DICT("IPADDRESSISWRONG","H")
! ieby IP zaezk
^W1DICT("ISCH","E")
Cheque permission
^W1DICT("ISCH","H")
wiyl xeyi`
^W1DICT("ISCH","R")
Vozmojnost!m platit!m !4ekom
^W1DICT("ISCR","E")
Credit permission
^W1DICT("ISCR","H")
dtwdl xeyi`
^W1DICT("ISCR","R")
Vozmojnost!m platit!m v kredit
^W1DICT("ISKAOT","E")
Transactions
^W1DICT("ISKAOT","H")
ze`wqr
^W1DICT("ISR","E")
Isracard
^W1DICT("ISR","H")
hkx`xyi
^W1DICT("ISRACARD","E")
Isracard
^W1DICT("ISSUEBILLOPTION","E")
Bill pinting mode
^W1DICT("ISSUEBILLOPTION","H")
zepeayg zwtd avn
^W1DICT("ISSUEINVOICE","E")
Dtwz gyaepiz rl wpiez adwtd
^W1DICT("ISSUEINVOICE","H")
dtwda zeipw lr zipeayg zwtd
^W1DICT("ISSUEORIGTIME","E")
Source issue time
^W1DICT("ISSUEORIGTIME","H")
xewn zwtd onf
^W1DICT("ISSUEREPTIME","E")
Report generation time $1
^W1DICT("ISSUEREPTIME","H")
$1 g"ec zwtd onf
^W1DICT("ISSUETIME","E")
Print time $1 $2
^W1DICT("ISSUETIME","H")
$2 $1 dqtcd onf
^W1DICT("IT4WEBPARAMETERS","E")
Parameters for receiving a menu from a website
^W1DICT("IT4WEBPARAMETERS","H")
xz`n hixtz zhilwl mixhnxt
^W1DICT("ITCNC","E")
Concentration
^W1DICT("ITCNC","H")
fekix
^W1DICT("ITCONC","E")
Concentration of items
^W1DICT("ITCONC","H")
mihixt fekix
^W1DICT("ITDGSHTABLE","E")
List of highlighted items
^W1DICT("ITDGSHTABLE","H")
miybcen mihixt zniyx
^W1DICT("ITDLMTABLE","E")
List of separation items
^W1DICT("ITDLMTABLE","H")
dcxtd ihixt zniyx
^W1DICT("ITEM0REPORT","E")
Sales report of item "0"
^W1DICT("ITEM0REPORT","H")
"0" hixt ly zexikn g"ec
^W1DICT("ITEM2TREEKUP","E")
Belonging to a "POS-stock" product tree
^W1DICT("ITEM2TREEKUP","H")
"i`ln-dtew" xven url zekiiy
^W1DICT("ITEM2TREEMLY","E")
Belonging to a "stock-stock" product tree
^W1DICT("ITEM2TREEMLY","H")
"i`ln-i`ln" xven url zekiiy
^W1DICT("ITEM4COMPENSATION","E")
Code of item for compensation
^W1DICT("ITEM4COMPENSATION","H")
miievitl hixt 'qn
^W1DICT("ITEMADDGROUPTABLE","E")
Table Item - Additions Group
^W1DICT("ITEMADDGROUPTABLE","H")
zetqez zveaw - hixt dlah
^W1DICT("ITEMADDSTABLE","E")
Product - addons table
^W1DICT("ITEMADDSTABLE","H")
zetqez - hixt dlah
^W1DICT("ITEMADDSTABLE","R")
Spravo!4nik dobavok k bl!udam
^W1DICT("ITEMCARD","E")
Item card
^W1DICT("ITEMCARD","H")
hixt qihxk
^W1DICT("ITEMCLOSED","E")
Item closed
^W1DICT("ITEMCLOSED","H")
xebq hixt
^W1DICT("ITEMCODE","E")
Code
^W1DICT("ITEMCODE","H")
cew
^W1DICT("ITEMCODE","R")
Kod
^W1DICT("ITEMCODE4SALE11","E")
Item code for sale discount
^W1DICT("ITEMCODE4SALE11","H")
rvan zgpdl hixt cew
^W1DICT("ITEMCODENOTDEFINED","E")
Item code not defined
^W1DICT("ITEMCODENOTDEFINED","H")
xcbed `l hixt cew
^W1DICT("ITEMCOMMENTSTABLE","E")
Product to comments relation
^W1DICT("ITEMCOMMENTSTABLE","H")
zexrd - hixt dlah
^W1DICT("ITEMCONCDEPREP","E")
Concentration by Items $1 $2
^W1DICT("ITEMCONCDEPREP","H")
$2 $1 mihixt itl fekix
^W1DICT("ITEMDEFINEDCOMMENTTABLE","E")
Table "item - permanent note"
^W1DICT("ITEMDEFINEDCOMMENTTABLE","H")
"dreaw dxrd - hixt" dlah
^W1DICT("ITEMDESC","E")
Product description
^W1DICT("ITEMDESC","H")
hixt akxd xe`iz
^W1DICT("ITEMDESC","R")
Opisanie produkta
^W1DICT("ITEMDISCOUNTNISSALE","E")
Specials "Items - Discounts(NIS)"
^W1DICT("ITEMDISCOUNTNISSALE","H")
" g''ya zegpd - mihixt " mirvan
^W1DICT("ITEMDISCOUNTPERCENTSALE","E")
Deals "items - discounts(%)"
^W1DICT("ITEMDISCOUNTPERCENTSALE","H")
" % -a zegpd - mihixt " mirvan
^W1DICT("ITEMDISCOUNTREPORT","E")
Concentrated discounts report
^W1DICT("ITEMDISCOUNTREPORT","H")
fkexn zegpd g"ec
^W1DICT("ITEMDISCOUNTS","E")
Items discounts
^W1DICT("ITEMDISCOUNTS","H")
mihixtl zegpd
^W1DICT("ITEMEXIST","E")
Code already exist
^W1DICT("ITEMEXIST","H")
miiw hixt
^W1DICT("ITEMEXIST","R")
Kod cu!sestvuet v sisteme
^W1DICT("ITEMEXISTINSET","E")
Code $1 already exist in set $2
^W1DICT("ITEMEXISTINSET","H")
$2 hqa miiw xak $1 hixt
^W1DICT("ITEMEXISTINSET","R")
Kod $1 cu!sestvuet v sete $2
^W1DICT("ITEMFROMITEMGROUPWITHADDS","E")
Item from item group with adds
^W1DICT("ITEMFROMITEMGROUPWITHADDS","H")
zetqez mr mihixt zveaw jezn hixt
^W1DICT("ITEMGROUPS","E")
Item Groups
^W1DICT("ITEMGROUPS","H")
mihixt zeveaw
^W1DICT("ITEMINVOICES","E")
Detailed Invoices
^W1DICT("ITEMINVOICES","H")
zehxetn zeipeayg
^W1DICT("ITEMMENUSENDFILES","E")
Transmitted menu files
^W1DICT("ITEMMENUSENDFILES","H")
exceyy hixtz ivaw
^W1DICT("ITEMMOVEMENTS","E")
Show Item Movements
^W1DICT("ITEMMOVEMENTS","H")
hixt zerepz bvd
^W1DICT("ITEMMUST","E")
Item code must be filled out
^W1DICT("ITEMMUST","H")
hixt cew `lnl yi
^W1DICT("ITEMNAME","E")
Product name
^W1DICT("ITEMNAME","H")
hixt my
^W1DICT("ITEMNAME","R")
Naimenovanie
^W1DICT("ITEMNOTEXIST","E")
Item does not exist in the system
^W1DICT("ITEMNOTEXIST","H")
zkxrna miiw `l hixt
^W1DICT("ITEMNOTEXISTPRESS1","E")
Item does not exist - click 1
^W1DICT("ITEMNOTEXISTPRESS1","H")
1 ugl - miiw `l hixt
^W1DICT("ITEMNUMBER","E")
Item Code
^W1DICT("ITEMNUMBER","H")
hixt cew
^W1DICT("ITEMORGROUPMUST","E")
Item code or item group must be filled in
^W1DICT("ITEMORGROUPMUST","H")
mihixt zveaw e` hixt cew `lnl yi
^W1DICT("ITEMRECORDEDTOORDER","E")
Item has been recorded in your order
^W1DICT("ITEMRECORDEDTOORDER","H")
dpnfda hlwed hixt
^W1DICT("ITEMREMAINDER","E")
$1 items left
^W1DICT("ITEMREMAINDER","H")
mihixt $1 ex`yp
^W1DICT("ITEMREPORT","E")
Sales report of item $1 "$2" from date $3 to $4
^W1DICT("ITEMREPORT","H")
$4 jix`z cr $3 jix`zn "$2" $1 hixt ly zexikn g"ec
^W1DICT("ITEMS","E")
Products
^W1DICT("ITEMS","H")
mihixt
^W1DICT("ITEMS","R")
Porcii
^W1DICT("ITEMS4GRC","E")
Assigning items to concentration groups
^W1DICT("ITEMS4GRC","H")
fekix zeveawl mihixt jeiy
^W1DICT("ITEMSCAUSEDELETINGREPORT","E")
Item Cancellation Report by Reasons
^W1DICT("ITEMSCAUSEDELETINGREPORT","H")
zeaiq itl mihixt ilehia g"ec
^W1DICT("ITEMSCOURIERREPORT","E")
Report on the sale of items by Couriers
^W1DICT("ITEMSCOURIERREPORT","H")
migily itl mihixt zxikn g"ec
^W1DICT("ITEMSDELETINGREPORT","E")
Item Cancellation Report
^W1DICT("ITEMSDELETINGREPORT","H")
mihixt ilehia g"ec
^W1DICT("ITEMSDELETINGREPORTPEREXIT","E")
Report of item cancellations by exit from the kitchen
^W1DICT("ITEMSDELETINGREPORTPEREXIT","H")
gahndn d`ivi itl mihixt ilehia g"ec
^W1DICT("ITEMSDELIVERYREPORTS","E")
Report on the sale of items in shipping orders
^W1DICT("ITEMSDELIVERYREPORTS","H")
migelyn zepnfda mihixt zxikn g"ec
^W1DICT("ITEMSDEPREPORT","E")
Report Selling Items By Class "$1" From $2 To $3
^W1DICT("ITEMSDEPREPORT","H")
$3 cr $2 -n "$1" dwlgn itl mihixt zxikn g"ec
^W1DICT("ITEMSDESCR","E")
Description of items
^W1DICT("ITEMSDESCR","H")
mihixt xe`z
^W1DICT("ITEMSDIAP","E")
Assigning items to shipments and / or restaurants
^W1DICT("ITEMSDIAP","H")
wqeiwl e/e` dcrqnl e/e` migelynl mihixt jeiy  
^W1DICT("ITEMSENDEDREPORT","E")
Report items that are about to expire
^W1DICT("ITEMSENDEDREPORT","H")
xnbdl micnery mihixt g"ec
^W1DICT("ITEMSENDLIST","E")
List of items to be transmit
^W1DICT("ITEMSENDLIST","H")
xeciyl mihixt zniyx
^W1DICT("ITEMSEXACTLY","E")
Items $1 exactly
^W1DICT("ITEMSEXACTLY","H")
weica mihixt $1
^W1DICT("ITEMSFILESENDINGSTATUS","E")
Status of item file transmission
^W1DICT("ITEMSFILESENDINGSTATUS","H")
mihixt uaew xeciy qehhq
^W1DICT("ITEMSGROUP","E")
Products group
^W1DICT("ITEMSGROUP","H")
mihixt zveaw
^W1DICT("ITEMSGROUP","R")
Gruppa produktov
^W1DICT("ITEMSGROUPADDSTABLE","E")
Table Item Groups - Additions
^W1DICT("ITEMSGROUPADDSTABLE","H")
zetqez - mihixt zeveaw dlah
^W1DICT("ITEMSGROUPCOMMENTSTABLE","E")
Table Item Groups - Comments
^W1DICT("ITEMSGROUPCOMMENTSTABLE","H")
zexrd - mihixt zveaw dlah
^W1DICT("ITEMSGROUPMANAGMENT","E")
Item groups managing
^W1DICT("ITEMSGROUPMANAGMENT","H")
mihixt zeveaw ledip
^W1DICT("ITEMSGROUPORDERING","E")
Products group ordering
^W1DICT("ITEMSGROUPORDERING","H")
mihixt zeveaw xeciq
^W1DICT("ITEMSGROUPORDERING","R")
Por!adok grupp
^W1DICT("ITEMSGROUPS","E")
Products groups
^W1DICT("ITEMSGROUPS","H")
mihixt zeveaw
^W1DICT("ITEMSGROUPS","R")
Gruppy produktov
^W1DICT("ITEMSGROUPTABLE","E")
Products group table
^W1DICT("ITEMSGROUPTABLE","H")
mihixt zeveaw zlah
^W1DICT("ITEMSGROUPTABLE","R")
Spravo!4nik grupp tovarov
^W1DICT("ITEMSHOW","E")
Show product
^W1DICT("ITEMSHOW","H")
hixtza bivdl
^W1DICT("ITEMSHOW","R")
Pokaz. v men!u
^W1DICT("ITEMSINVOICE","E")
Detailed Invoices
^W1DICT("ITEMSINVOICE","H")
zhxetn zipeayg
^W1DICT("ITEMSINVOICECSR","E")
Detailed invoice (POS items)
^W1DICT("ITEMSINVOICECSR","H")
( dtew ihixt ) zhxetn zipeayg
^W1DICT("ITEMSINVOICEMLY","E")
Detailed invoice (Stock items)
^W1DICT("ITEMSINVOICEMLY","H")
( i`ln ihixt ) zhxetn zipeayg
^W1DICT("ITEMSINVOICERECEIPT","E")
Detailed Invoices / Receipts
^W1DICT("ITEMSINVOICERECEIPT","H")
zhxetn dlaw/qn zipeayg
^W1DICT("ITEMSLISTTOBEENDED","E")
List of items that are about to end
^W1DICT("ITEMSLISTTOBEENDED","H")
xnbdl micnery mihixt zniyx
^W1DICT("ITEMSMANAGMENT","E")
Item management
^W1DICT("ITEMSMANAGMENT","H")
mihixt ledip
^W1DICT("ITEMSMENU","E")
Products setup
^W1DICT("ITEMSMENU","H")
mihixta letih
^W1DICT("ITEMSNOTCHOICED","E")
No dishes selected
^W1DICT("ITEMSNOTCHOICED","H")
zepn exgap `l
^W1DICT("ITEMSORDERING","E")
Products ordering
^W1DICT("ITEMSORDERING","H")
mihixt xeciq
^W1DICT("ITEMSORDERING","R")
Por!adok bl!ud
^W1DICT("ITEMSPARTITIONCOLORDEFINITION","E")
Product part. def-n
^W1DICT("ITEMSPARTITIONCOLORDEFINITION","H")
mihixt wlgl mirav zxcbd
^W1DICT("ITEMSPERHOUERSPRICELIST","E")
Price list items by days and hours
^W1DICT("ITEMSPERHOUERSPRICELIST","H")
zerye mini itl mihixt oexign
^W1DICT("ITEMSPRINTERSTABLE","E")
Table "Item - Printers"
^W1DICT("ITEMSPRINTERSTABLE","H")
"zeqtcn - hixt" dlah
^W1DICT("ITEMSREPORT","E")
Products sale report
^W1DICT("ITEMSREPORT","H")
mihixt zxikn g"ec
^W1DICT("ITEMSREPORT","R")
Ot!4et po porcionnym prodajam
^W1DICT("ITEMSREPORTS","E")
Reports  of products sales
^W1DICT("ITEMSREPORTS","H")
mihixt zexikn zegec
^W1DICT("ITEMSREPORTS","R")
Ot!4ety po porcionnym prodajam
^W1DICT("ITEMSREPORTTREE","E")
Consolidate items into a report
^W1DICT("ITEMSREPORTTREE","H")
g"ecl mihixt cegi`
^W1DICT("ITEMSSALEPERCASHIERSREPORT","E")
Sales report items by cashiers
^W1DICT("ITEMSSALEPERCASHIERSREPORT","H")
(ze)mi`tew itl mihixt zexikn g"ec
^W1DICT("ITEMSSALEPERCUSTOMREPORT","E")
Sales report items by customers
^W1DICT("ITEMSSALEPERCUSTOMREPORT","H")
zegewl itl mihixt zexikn g"ec
^W1DICT("ITEMSSALEPERDEPGRREPORT","E")
Report  of products sale sliced  by categories  and groups
^W1DICT("ITEMSSALEPERDEPGRREPORT","H")
zeveawe zewlgn itl mihixt zexikn g"ec
^W1DICT("ITEMSSALEPERHOUERSREPORT","E")
Report  of products by sales time
^W1DICT("ITEMSSALEPERHOUERSREPORT","H")
zery itl mihixt zexikn g"ec
^W1DICT("ITEMSSALEPERORDERSREPORT","E")
Report of products sales by orders
^W1DICT("ITEMSSALEPERORDERSREPORT","H")
zepnfd itl mihixt zexikn g"ec
^W1DICT("ITEMSSALEPERRECEIVERSREPORT","E")
Sales report items by recipients
^W1DICT("ITEMSSALEPERRECEIVERSREPORT","H")
milawnd itl mihixt zexikn g"ec
^W1DICT("ITEMSSALEPERTABLESREPORT","E")
Report of products sales by  tables
^W1DICT("ITEMSSALEPERTABLESREPORT","H")
zepgley itl mihixt zexikn g"ec
^W1DICT("ITEMSSALEPERWAITERSREPORT","E")
Report of products sales by waiters
^W1DICT("ITEMSSALEPERWAITERSREPORT","H")
mixvln itl mihixt zexikn g"ec
^W1DICT("ITEMSSALEREP","E")
Consolidate items into a report
^W1DICT("ITEMSSALEREP","H")
mihixt zexikn g"ec
^W1DICT("ITEMSSALEREPORT","E")
Report of products sales  (general)
^W1DICT("ITEMSSALEREPORT","H")
illk mihixt zexikn g"ec
^W1DICT("ITEMSSALEREPORT","R")
Ot!4ety po porcionnym prodajam
^W1DICT("ITEMSSALETABLE","E")
Products sale table
^W1DICT("ITEMSSALETABLE","H")
mihixt zenk itl rvan
^W1DICT("ITEMSSALETABLE","R")
Bonusy po k-vu pokupok
^W1DICT("ITEMSSENDINGSTATUS","E")
Item sales data transmission protocol
^W1DICT("ITEMSSENDINGSTATUS","H")
mihixt zxikn ipezp ly mixeciy lewehext
^W1DICT("ITEMSSETLIST","E")
List of sets
^W1DICT("ITEMSSETLIST","H")
mihq zniyx
^W1DICT("ITEMSSYSTEM","E")
Products managment
^W1DICT("ITEMSSYSTEM","H")
mihixt zkxrn
^W1DICT("ITEMSTABLE","E")
Products table
^W1DICT("ITEMSTABLE","H")
mihixt zlah
^W1DICT("ITEMSTABLE","R")
Spravo!4nik tovarov
^W1DICT("ITEMSTOBEENDEDTABLE","E")
List of items that are about to end
^W1DICT("ITEMSTOBEENDEDTABLE","H")
xnbdl micnery mihixt zniyx
^W1DICT("ITEMSTOT","E")
Total products
^W1DICT("ITEMSTOT","H")
mihixt k"dq
^W1DICT("ITEMSTOT","R")
Vsego porci!i
^W1DICT("ITEMSTRANSLATIONTABLE","E")
Code conversion table for items
^W1DICT("ITEMSTRANSLATIONTABLE","H")
mihixt ly micew zxnd zlah
^W1DICT("ITEMSWASPAID","E")
Not to cancel or to pass products that were paid
^W1DICT("ITEMSWASPAID","H")
enleyy mihixt xiardl e` lhal oi`
^W1DICT("ITEMSWITHOUTDISCOUNTTABLE","E")
List items with no discount
^W1DICT("ITEMSWITHOUTDISCOUNTTABLE","H")
dgpd `ll mihixt zniyx
^W1DICT("ITEMSWITHOUTTAXES","E")
List of items without VAT
^W1DICT("ITEMSWITHOUTTAXES","H")
n"rn `ll mihixt zniyx
^W1DICT("ITEMSWITHVARIABLEPRICE","E")
List items with variable price
^W1DICT("ITEMSWITHVARIABLEPRICE","H")
dpzyn xign mr mihixt zniyx
^W1DICT("ITEMSYSTEM","E")
Products managment
^W1DICT("ITEMSYSTEM","H")
mihixta letih
^W1DICT("ITEMSYSTEM","R")
Spravo!4niki tovarov
^W1DICT("ITEMS_SALES_HOUR_REPORT","E")
Products Sales Report per Hour
^W1DICT("ITEMS_SALES_HOUR_REPORT","H")
zery itl mihixt zexikn zegec
^W1DICT("ITEMS_SALES_REPORTS","E")
Products Sales Reports
^W1DICT("ITEMS_SALES_REPORTS","H")
mihixt zexikn zegec
^W1DICT("ITEMTIMELIST","E")
Meal preparation schedule
^W1DICT("ITEMTIMELIST","H")
zepn zpkd ly mipnf zlah
^W1DICT("ITEMTREETABLE","E")
Product Tree "POS - Stock"
^W1DICT("ITEMTREETABLE","H")
"i`ln - dtew" xven ur zlah
^W1DICT("ITEMTYPEDINDOC","E")
An item has already been typed into the document
^W1DICT("ITEMTYPEDINDOC","H")
jnqna clwed xak hixt
^W1DICT("ITEMUPDATE","E")
Update item catalog
^W1DICT("ITEMUPDATE","H")
mihixt belhw oekcr
^W1DICT("ITEMWASSALE","E")
Item was on sale - do not change quantity, just cancel.
^W1DICT("ITEMWASSALE","H")
lhal wx ,zenk zepyl oi` - rvana shzyd hixt
^W1DICT("ITEMWITHOUTDISCOUNT","E")
Item without discount
^W1DICT("ITEMWITHOUTDISCOUNT","H")
dgpd `ll hixt
^W1DICT("ITEMWITHPASSWORD","E")
Password protected item
^W1DICT("ITEMWITHPASSWORD","H")
dnqiqa oben hixt
^W1DICT("ITEMWITHVARIABLEPRICE","E")
Item with variable price
^W1DICT("ITEMWITHVARIABLEPRICE","H")
dpzyn xign mr hixt
^W1DICT("ITEMZERO","E")
Item \'0\'
^W1DICT("ITEMZERO","H")
"0" hixt
^W1DICT("ITFASTTABLE","E")
"Most Used" item list
^W1DICT("ITFASTTABLE","H")
"yeniya ikd" mihixt zniyx
^W1DICT("ITRA","E")
Balance
^W1DICT("ITRA","H")
dxzi
^W1DICT("ITRA0","E")
Previous balance
^W1DICT("ITRA0","H")
zncew dxzi
^W1DICT("ITRA2PAY","E")
Unpaid balance
^W1DICT("ITRA2PAY","H")
melyzl dxzi
^W1DICT("ITRAH","E")
Balance according to invoices and receipts
^W1DICT("ITRAH","H")
zelawe zeipeayg itl dxzi
^W1DICT("ITRALKH","E")
Customer balance
^W1DICT("ITRALKH","H")
gewl zxzi
^W1DICT("ITRAS","E")
Debt
^W1DICT("ITRAS","H")
aeg
^W1DICT("ITS","E")
Unit
^W1DICT("ITS","H")
'gi
^W1DICT("ITSITEMADDONS!","E")
It's an item with adds !
^W1DICT("ITSITEMADDONS!","H")
! zetqez mr hixt df
^W1DICT("ITSITEMGROUPADDONS!","E")
This is an item with a set of plug-ins !
^W1DICT("ITSITEMGROUPADDONS!","H")
! zetqez zveaw mr hixt df
^W1DICT("ITSLUNCH","E")
This item has been set as a Meal - Dishes
^W1DICT("ITSLUNCH","H")
zepn - dgex`k xcbed df hixt
^W1DICT("ITSLUNCH!","E")
This is a business meal !
^W1DICT("ITSLUNCH!","H")
! ziwqr dgex` ef
^W1DICT("ITSNOTMANAGER","E")
Only administrator can give confirmation
^W1DICT("ITSNOTMANAGER","H")
xeyi` zzl leki ldpn wx
^W1DICT("ITSTAKEAWAYORDER","E")
This invitation is not for delivery !
^W1DICT("ITSTAKEAWAYORDER","H")
! geliyl `l z`fd dpnfd
^W1DICT("ITTIME","E")
Preparation time
^W1DICT("ITTIME","H")
dpkd onf
^W1DICT("JUNCORD","E")
Moved to another order
^W1DICT("JUNCORD","H")
zxg` dpnfdl xiard
^W1DICT("KAMDLP","E")
Numberof orders T.A.W
^W1DICT("KAMDLP","H")
T.A.W. zepnfd 'qn
^W1DICT("KAMMSL","E")
Deliveries number
^W1DICT("KAMMSL","H")
migelyn 'qn
^W1DICT("KASHCASH","H")
y`w yw
^W1DICT("KASHER","E")
Kosher
^W1DICT("KASHER","H")
xyk
^W1DICT("KCCDMSG","H")
$1 cew cilwdl gewln eywa
^W1DICT("KCQRMSG","H")
cew QR mlvl `p
^W1DICT("KEYWORDS","E")
Order,orders,online,on-line,on line,food,software,restaurants,eat,delivery
^W1DICT("KEYWORDS","H")
zecrqn,lke`,zeipkez,migelyn,oefn,oiil oe`,oiiloe`,zepnfd
^W1DICT("KIND","E")
Type
^W1DICT("KIND","H")
beq
^W1DICT("KINDOFDOCUMENT","E")
Type of document
^W1DICT("KINDOFDOCUMENT","H")
jnqn beq
^W1DICT("KINDOFERROR","E")
Type of error
^W1DICT("KINDOFERROR","H")
d`iby beq
^W1DICT("KINDOFERROR","R")
Vid o!6ibki
^W1DICT("KINDOFGRAPH","E")
Type of graph
^W1DICT("KINDOFGRAPH","H")
sxb ly beq
^W1DICT("KINDOFKASHER","E")
Type of kosher
^W1DICT("KINDOFKASHER","H")
zexyk beq
^W1DICT("KINDOFORDER","E")
Type of order
^W1DICT("KINDOFORDER","H")
dpnfd beq
^W1DICT("KINDOFORDERS","E")
Order type
^W1DICT("KINDOFORDERS","H")
zepnfd beq
^W1DICT("KINDOFPAYMENT","E")
Type of payment
^W1DICT("KINDOFPAYMENT","H")
melyz beq
^W1DICT("KINDOFPAYMENT","R")
Vid plateja
^W1DICT("KINDOFRECORDSREPORT","E")
Lists the total record types created in the file BKMVDATA.TXT
^W1DICT("KINDOFRECORDSREPORT","H")
BKMVDATA.TXT uaewa exvepy zeneyx ibeq jq hexit
^W1DICT("KINDOFREPORT","E")
Select a report
^W1DICT("KINDOFREPORT","H")
g"ec xegal `p
^W1DICT("KINDOFREPORTX","E")
Select a report X
^W1DICT("KINDOFREPORTX","H")
X g"ec xegal `p
^W1DICT("KINDOFSHOW","E")
Choose a type of presentation
^W1DICT("KINDOFSHOW","H")
dbvd beq xga
^W1DICT("KINDOFTABLE","E")
Table type
^W1DICT("KINDOFTABLE","H")
ogley beq
^W1DICT("KINDORD","E")
Order type
^W1DICT("KINDORD","H")
dpnfd beq
^W1DICT("KINDORIGDOC","E")
Original document type
^W1DICT("KINDORIGDOC","H")
xewn jnqn beq
^W1DICT("KINDSOFTABLES","E")
Table types list
^W1DICT("KINDSOFTABLES","H")
zepgley ibeq zlah
^W1DICT("KIOSK","E")
Kiosk
^W1DICT("KIOSK","H")
wqeiw
^W1DICT("KIOSKITEMSLIST","E")
Kiosk item list
^W1DICT("KIOSKITEMSLIST","H")
wqe`iwl mihixt zniyx
^W1DICT("KIOSKPARAMETERS","E")
Kiosk parameters
^W1DICT("KIOSKPARAMETERS","H")
wqeiwl mixhhnxt
^W1DICT("KITCHENKIND","E")
Kind of kitchen
^W1DICT("KITCHENKIND","H")
gahn beq
^W1DICT("KITCHENKIND","R")
Vid kuhni
^W1DICT("KITCHENPRINTERSDEFINITION","E")
A definition of printers to the building
^W1DICT("KITCHENPRINTERSDEFINITION","H")
mipeal zeqtcn zxcbd
^W1DICT("KKIND&COND","E")
Kitchen types & conditions
^W1DICT("KKIND&COND","H")
mi`pze gahn ibeq
^W1DICT("KKIND&COND","R")
Vid kuhni i dop. uslugi
^W1DICT("KMTL","E")
Amount of slips
^W1DICT("KMTL","H")
miyelz zenk
^W1DICT("KSHCSHPARAMETERS","H")
"y`wy`w" l mixhnxt
^W1DICT("KSHCSHREPORT","H")
"y`w yw"-a zeipw g"ec
^W1DICT("LABELPRINTERNOTDEFINED","E")
Label printer not configured
^W1DICT("LABELPRINTERNOTDEFINED","H")
dxcbed `l zewacn zqtcn
^W1DICT("LABQNWRONG","E")
Incorrect quantity of labels
^W1DICT("LABQNWRONG","H")
dpekp `l zewacn zenk
^W1DICT("LANDSIDE","E")
Landside
^W1DICT("LAST4DIGITSCARDMUSTBEFILLED","E")
Last digits of credit card must be filled in
^W1DICT("LAST4DIGITSCARDMUSTBEFILLED","H")
i`xy` qihxk ly zepxg` zextq `lnl yi
^W1DICT("LASTCLIENT","E")
Until last client
^W1DICT("LASTCLIENT","H")
oexg` gewl cr
^W1DICT("LASTCLIENT","R")
Do posl. klienta
^W1DICT("LASTDISC","E")
Last discount
^W1DICT("LASTDISC","H")
dpexg` dgpd
^W1DICT("LASTDLVDOC","E")
Last delivery note
^W1DICT("LASTDLVDOC","H")
dpexg` gelyn 'z
^W1DICT("LASTDLVDOCS","E")
5 recent delivery notes
^W1DICT("LASTDLVDOCS","H")
zepexg` gelyn zecerz 5
^W1DICT("LASTINVOICE","E")
Last invoice
^W1DICT("LASTINVOICE","H")
dpexg` zipeayg
^W1DICT("LASTINVOICES","E")
5 recent invoices
^W1DICT("LASTINVOICES","H")
zepexg` ziepeayg 5
^W1DICT("LASTINVOICEWAS","E")
Last invoice $1 was produced on the date $2
^W1DICT("LASTINVOICEWAS","H")
$2 jix`za dwted $1 dpexg` zipeayg
^W1DICT("LASTMHL","E")
Last price per counting unit
^W1DICT("LASTMHL","H")
dxitq 'gil oexg` xign
^W1DICT("LASTMHZ","E")
Last price per order unit
^W1DICT("LASTMHZ","H")
dpnfd 'gil xign
^W1DICT("LASTMOVEMENTS","E")
Recent Movements
^W1DICT("LASTMOVEMENTS","H")
zepexg` zerepz
^W1DICT("LASTNAME","E")
Last name
^W1DICT("LASTNAME","H")
dgtyn my
^W1DICT("LASTNAME","R")
Famili!a
^W1DICT("LASTORD","E")
Last order
^W1DICT("LASTORD","H")
dpexg` dpnfd
^W1DICT("LASTORDER","E")
Show last order
^W1DICT("LASTORDER","H")
dpexg` dpnfd bvd
^W1DICT("LASTORDERNOTEXIST","E")
Order not exist
^W1DICT("LASTORDERNOTEXIST","H")
zniiw `l dpnfd
^W1DICT("LASTORDTIME","E")
Last order time
^W1DICT("LASTORDTIME","H")
dpexg` dpnfd ly onf
^W1DICT("LASTPAGE","E")
This is last page !
^W1DICT("LASTPAGE","H")
oexg` sc df
^W1DICT("LASTPAGE","R")
Eto posledn!a!a stranica !
^W1DICT("LASTPAY","E")
Last payment made for $1
^W1DICT("LASTPAY","H")
$1 -a rvea oexg` melyz
^W1DICT("LASTPAYMDATE","E")
Date of last payment
^W1DICT("LASTPAYMDATE","H")
oexg` melyz ly jix`z
^W1DICT("LASTPAYMSUM","E")
Last payment
^W1DICT("LASTPAYMSUM","H")
oexg` 'lyz
^W1DICT("LASTPRICE","E")
Last price
^W1DICT("LASTPRICE","H")
oexg` xign
^W1DICT("LASTPRICELISTS","E")
5 Recent price lists
^W1DICT("LASTPRICELISTS","H")
mipexg` mipexign 5
^W1DICT("LASTSENDTIME","E")
Time of last transmission
^W1DICT("LASTSENDTIME","H")
oexg` xeciy ly onf
^W1DICT("LASTSPK","E")
Last vendor
^W1DICT("LASTSPK","H")
oexg` wtq
^W1DICT("LASTTKDOCS","E")
5 Recent stock update certificates
^W1DICT("LASTTKDOCS","H")
mipexg` i`ln oekcr zecerz 5
^W1DICT("LASTUPDATE","E")
Last update $1
^W1DICT("LASTUPDATE","H")
$1 oexg` oekcr
^W1DICT("LATEDORDS","E")
Late bookings only
^W1DICT("LATEDORDS","H")
zexge`n zepnfd wx
^W1DICT("LATEHOUR","E")
Hour late
^W1DICT("LATEHOUR","H")
xegi` zry
^W1DICT("LATEORDERS","E")
Late orders
^W1DICT("LATEORDERS","H")
xge`n eribdy zepnfd
^W1DICT("LCTPBUS","E")
Lctp bus
^W1DICT("LEFT","E")
Left
^W1DICT("LEFT","H")
dleny
^W1DICT("LESSPRICEMIN","E")
Order price less than minimum $1 $2 . Confirm ?
^W1DICT("LESSPRICEMIN","H")
? xy`l . $2 $1 menipinn zegt dpnfd xign
^W1DICT("LEUMI","E")
Leumi
^W1DICT("LEUMI","H")
cxw ine`l
^W1DICT("LEVADDR","E")
WWW.2ORDER.ORG
^W1DICT("LEVADDR","H")
WWW.2ORDER.ORG
^W1DICT("LEVADDR","R")
WWW.2ORDER.ORG
^W1DICT("LEVEL","E")
Level
^W1DICT("LEVEL","H")
daky
^W1DICT("LEVMAIN","E")
Lev On-line
^W1DICT("LEVMAIN","H")
oiil oe` al
^W1DICT("LEVMAIN","R")
Lev On-la!in
^W1DICT("LEVONLINE","E")
Lev on-line  -  on-line software for restaurants
^W1DICT("LEVONLINE","H")
zxg` dnxa oiil oe` zeipkez  - oiil oe` al 
^W1DICT("LEVONLINE","R")
Lev on-la!in - razrabotki s ispol!mzovaniem WEB-tehnologi!i
^W1DICT("LEVONLN","E")
Lev on-line
^W1DICT("LEVONLN","H")
oiil oe` al
^W1DICT("LIMITHOURSDEFINITION","E")
Parameters for limiting working hours
^W1DICT("LIMITHOURSDEFINITION","H")
dcear zery zlabdl mixhnxt
^W1DICT("LIMTIMEITEMS","E")
Restricted items that are within the time range
^W1DICT("LIMTIMEITEMS","H")
onfd geeha mi`vnpy milaben mihixt
^W1DICT("LINE","E")
Line
^W1DICT("LINE","H")
dxey
^W1DICT("LINENO2DELETE","E")
Not to cancel this line
^W1DICT("LINENO2DELETE","H")
z`f dxey lhal oi`
^W1DICT("LINES","E")
Lines
^W1DICT("LINES","H")
zexey
^W1DICT("LINESNUMBERTOOSMALL","E")
Number of rows is not enough for all defined slots
^W1DICT("LINESNUMBERTOOSMALL","H")
zexcbend zevayn lkl witqn `l zexey 'qn
^W1DICT("LINK2OTHERITEMS","E")
Connect to other items
^W1DICT("LINK2OTHERITEMS","H")
mixg` mihixtl xyw
^W1DICT("LISTOFBUSYTABLES","E")
There are open tables : $1
^W1DICT("LISTOFBUSYTABLES","H")
$1 : migezt zepgley mpyi
^W1DICT("LISTOFOPENORDERS","E")
There are open orders : $1
^W1DICT("LISTOFOPENORDERS","H")
$1 : zegezt zepnfd mpyi
^W1DICT("LKAH","E")
Discount in-%
^W1DICT("LKAH","H")
%-a dgpd
^W1DICT("LKHFOR","E")
In favor of
^W1DICT("LKHFOR","H")
zaehl
^W1DICT("LKHN","E")
Number of customer
^W1DICT("LKHN","H")
gewl 'qn
^W1DICT("LKHN1","E")
Customer name
^W1DICT("LKHN1","H")
gewl my
^W1DICT("LKHNH","E")
Discount in the shekels
^W1DICT("LKHNH","H")
g"ya dgpd
^W1DICT("LKHR","E")
Main customer
^W1DICT("LKHR","H")
iy`x gewl
^W1DICT("LKHR1","E")
Main customer name
^W1DICT("LKHR1","H")
iy`x gewl my
^W1DICT("LNDN","E")
Next line
^W1DICT("LNDN","H")
`ad dxey
^W1DICT("LNUP","E")
Previous line
^W1DICT("LNUP","H")
zncew dxey
^W1DICT("LOADBUDGET2CARD","E")
Upload a budget to a card
^W1DICT("LOADBUDGET2CARD","H")
qihxkl aivwz zpirh
^W1DICT("LOADCARD","E")
Upload a card
^W1DICT("LOADCARD","H")
qihxk orh
^W1DICT("LOADCARDERROR","E")
Error loading card<BR>Action canceled
^W1DICT("LOADCARDERROR","H")
dlhea dlert <BR> qihxk zpirha d`iby
^W1DICT("LOADPRINTPROGRAMMS","E")
Loading of printing programs
^W1DICT("LOADPRINTPROGRAMMS","H")
dqtcd zeipkez zpirh
^W1DICT("LOADSUM","E")
Amount to be charged
^W1DICT("LOADSUM","H")
dpirhl mekq
^W1DICT("LOPAIL","E")
Off
^W1DICT("LOPAIL","H")
lirt `l
^W1DICT("LTCPBUS","E")
Ltcp bus
^W1DICT("LUNCHNOTSAVED","E")
A meal is not stored
^W1DICT("LUNCHNOTSAVED","H")
oexkifa dxeny `l dgex`
^W1DICT("LUNCHNUMBERISWRONG!","E")
Wrong main product number
^W1DICT("LUNCHNUMBERISWRONG!","H")
! ieby iy`x xven 'qn
^W1DICT("LUNCHSETSTABLE","E")
Lunch - Sets table
^W1DICT("LUNCHSETSTABLE","H")
"mihq - dgex`" dlah
^W1DICT("LUNCHSETSTABLE","R")
Kompleksny!i obed - sety
^W1DICT("M","E")
Password to the transfer
^W1DICT("M","H")
dxardl dnqiq
^W1DICT("M01","E")
Total 1 NIS coins
^W1DICT("M01","H")
g"y 1 ly zerahn k"dq
^W1DICT("M02","E")
Total 2 NIS coins
^W1DICT("M02","H")
g"y 2 ly zerahn k"dq
^W1DICT("M05","E")
Total 5 NIS coins
^W1DICT("M05","H")
g"y 5 ly zerahn k"dq
^W1DICT("M10","E")
Total 10 NIS coins
^W1DICT("M10","H")
g"y 10 ly zerahn k"dq
^W1DICT("MAAS","E")
Maas
^W1DICT("MAAZANREPORT","E")
Balance report
^W1DICT("MAAZANREPORT","H")
zeqpkd g"ec
^W1DICT("MADESURE","E")
Made sure
^W1DICT("MADESURE","H")
`ciee
^W1DICT("MAGASHIM","E")
Trays & catering
^W1DICT("MAGASHIM","H")
bpixhiiwe miybn
^W1DICT("MAGIAPIZUIM","E")
The customer deserves compensation !
^W1DICT("MAGIAPIZUIM","H")
! mievit ribn gewll
^W1DICT("MAILERROR","E")
Error sending to email
^W1DICT("MAILERROR","H")
l"`ecl xeciya d`iby
^W1DICT("MAILPARAMETERS","E")
Email Send Parameters
^W1DICT("MAILPARAMETERS","H")
l"`ec zgilyl mixhnxt
^W1DICT("MAILSENDED","E")
Document sent to email
^W1DICT("MAILSENDED","H")
l"`ecl xcey jnqn
^W1DICT("MAILSENDINGDETAILS","E")
Details of email transmissions
^W1DICT("MAILSENDINGDETAILS","H")
l"`ec ixeciy hexit
^W1DICT("MAILSENDINGPROTOCOL","E")
The protocol transmits email from $ 1 to date $2
^W1DICT("MAILSENDINGPROTOCOL","H")
$2 jix`z cr $1 jix`zn l"`ec ixeciy lewehext
^W1DICT("MAILTIME","E")
Sending time
^W1DICT("MAILTIME","H")
xeciy onf
^W1DICT("MAINCELL","E")
Main cell
^W1DICT("MAINCELL","H")
ziy`x zvayn
^W1DICT("MAINCELLWRONG","E")
Incorrect initial cell
^W1DICT("MAINCELLWRONG","H")
dieby ziy`x zvayn
^W1DICT("MAINCUSTOMER","E")
Main customer
^W1DICT("MAINCUSTOMER","H")
iy`x gewl
^W1DICT("MAINCUSTOMER","R")
Golovno!i klient
^W1DICT("MAINCUSTOMERTABLE","E")
Main customer table
^W1DICT("MAINCUSTOMERTABLE","H")
zegewl cegi` zlah
^W1DICT("MAINCUSTOMERTABLE","R")
Ob!tedinenny!i spisok klientov
^W1DICT("MAINITEMNOTSIGNED","E")
Please check the main item first<BR>Or cancel the "Update Order" option
^W1DICT("MAINITEMNOTSIGNED","H")
"dpnfd okcr" divte`a lehia ervaz e` <BR> iy`x hixt dligz onql `p
^W1DICT("MAINITEMSIGNEDBUTSONSNOT","E")
The main Item is marked with no additions
^W1DICT("MAINITEMSIGNEDBUTSONSNOT","H")
zetqez `ll oneqn iy`x hixt
^W1DICT("MAINMENU","E")
Main menu
^W1DICT("MAINMENU","H")
iy`x hixtz
^W1DICT("MAINPAGE","E")
Main Page
^W1DICT("MAINPAGE","H")
iy`x sc
^W1DICT("MAKETIME","E")
Avg Make Time
^W1DICT("MAKETIME","H")
dpkd onf
^W1DICT("MAKINGCLOSINGDAYFROMOTHERTERMINAL","E")
Execute closing of day from different position
^W1DICT("MAKINGCLOSINGDAYFROMOTHERTERMINAL","H")
zxg` dcnrn mei zxibq mirvan
^W1DICT("MAKOR","E")
From
^W1DICT("MAKOR","H")
xewn
^W1DICT("MAKOR","R")
Isto!4nik
^W1DICT("MAKORPIZUIM","E")
Source of compensation
^W1DICT("MAKORPIZUIM","H")
mievit xewn
^W1DICT("MALFUNCTIONDESCR","E")
Problem Description
^W1DICT("MALFUNCTIONDESCR","H")
dlwzd xe`z
^W1DICT("MAM","E")
VAT
^W1DICT("MAM","H")
n"rn
^W1DICT("MANAGER","E")
Manager
^W1DICT("MANAGER","H")
ldpn
^W1DICT("MANAGERCANTDOORDER","E")
Manager can't take order
^W1DICT("MANAGERCANTDOORDER","H")
dpnfd lawl leki `l ldpn
^W1DICT("MANAGERCODE","E")
Manager No
^W1DICT("MANAGERCODE","H")
ldpn 'qn
^W1DICT("MANAGERNAME","E")
Manager Name
^W1DICT("MANAGERNAME","H")
ldpn my
^W1DICT("MANOT","E")
Dishes
^W1DICT("MANOT","H")
zepn
^W1DICT("MANPIK","E")
Issuer
^W1DICT("MANPIK","H")
witpn
^W1DICT("MANYREP2DAT","E")
Financial report for the date $1
^W1DICT("MANYREP2DAT","H")
$1 jix`zl itqk g"ec
^W1DICT("MANYREP2PERIOD","E")
Financial report from $1 to $2
^W1DICT("MANYREP2PERIOD","H")
$2 cr $1 -n itqk g"ec
^W1DICT("MANYREPCR","E")
Credit of financial report
^W1DICT("MANYREPCR","H")
itqk g"ec dtwd
^W1DICT("MANYREPORT","E")
Financial general report
^W1DICT("MANYREPORT","H")
illk itqk g"ec
^W1DICT("MANYREPORTPARAMETERSDEFINITION","E")
Parameters for financial report
^W1DICT("MANYREPORTPARAMETERSDEFINITION","H")
itqk g"ecl mixhnxt 
^W1DICT("MANYREPPD","E")
Financial report redemption
^W1DICT("MANYREPPD","H")
itqk g"ec oeict
^W1DICT("MANYSENDINGSTATUS","E")
Financial data transmission protocol
^W1DICT("MANYSENDINGSTATUS","H")
miitqk mipezp ly mixeciy lewehext
^W1DICT("MAP","E")
Map Map
^W1DICT("MAP","H")
dtn
^W1DICT("MAPDLV","E")
Delivery
^W1DICT("MAPDLV","H")
migelyn ztn
^W1DICT("MAPPARAMETERS","E")
Map parameters
^W1DICT("MAPPARAMETERS","H")
dtnl mixhnxt
^W1DICT("MAPTABLE","E")
Table of maps
^W1DICT("MAPTABLE","H")
zetn zlah
^W1DICT("MAPZOOMWRONG","E")
Incorrect map scale! Check map table settings.
^W1DICT("MAPZOOMWRONG","H")
zetn zlah ly zexcbd weca ! ieby dtn ly dcin dpw
^W1DICT("MASEFONPARAMETERS","E")
Parameters for working with a terminal
^W1DICT("MASEFONPARAMETERS","H")
oetqn mr dcearl mixhnxt
^W1DICT("MAXADD","E")
Maximum number to choose from
^W1DICT("MAXADD","H")
dxigal iaxin xtqn
^W1DICT("MAXCHECKSNUMBER","E")
Maximum checks
^W1DICT("MAXCHECKSNUMBER","H")
iaxin miwiy xtqn
^W1DICT("MAXGR","E")
Maximum number
^W1DICT("MAXGR","H")
iaxin xtqn
^W1DICT("MAXHRDAY","E")
An employee was fired for exceeding the maximum number of hours in a day.
^W1DICT("MAXHRDAY","H")
dnnia iaxn zery xtqn xary llba `ved caer
^W1DICT("MAXHRWEEK","E")
An employee was fired for exceeding the maximum number of hours per week.
^W1DICT("MAXHRWEEK","H")
reaya iaxn zery xtqn xary llba `ved caer
^W1DICT("MAXINVOICE","E")
Generate a tax invoice<BR>Must be if amount more than $1
^W1DICT("MAXINVOICE","H")
g"y $1 -n xzei mekqa daeg <BR> qn zipeayg zwtd
^W1DICT("MAXITEMSINORD","E")
Maximum number of '$1' items is $2 !
^W1DICT("MAXITEMSINORD","H")
! $2 `ed iaxn '$1' mihixt 'qn
^W1DICT("MAXLENGTH","E")
Record size should be not more than $1 characters
^W1DICT("MAXLENGTH","H")
zeieez $1 -n xzei `l zeidl xen` oezpd jxe`
^W1DICT("MAXLENGTH","R")
Dlina zapisi ne doljna prevy!6at!m $1 simvolov
^W1DICT("MAZMIN","E")
Customer
^W1DICT("MAZMIN","H")
oinfnd
^W1DICT("MAZMINNAME","E")
Customer name
^W1DICT("MAZMINNAME","H")
oinfnd my
^W1DICT("MDB2PRINT","E")
Labels have been sent to print
^W1DICT("MDB2PRINT","H")
dqtcdl eglyp zewacn
^W1DICT("MDBKOTPRINTED","E")
Stickers to the box were printed
^W1DICT("MDBKOTPRINTED","H")
eqtced fbx`l zewacn
^W1DICT("MDBPC","E")
Print labels
^W1DICT("MDBPC","H")
zewacn qtcd
^W1DICT("MEAL","E")
Meal
^W1DICT("MEAL","H")
dgex`
^W1DICT("MEASURETABLE","E")
Measure table
^W1DICT("MEASURETABLE","H")
zecin zlah
^W1DICT("MEATITEMSTABLE","E")
List of meat items
^W1DICT("MEATITEMSTABLE","H")
xya ihixt zniyx
^W1DICT("MEATREPORT","E")
Meat sales report
^W1DICT("MEATREPORT","H")
mixya zxikn g"ec
^W1DICT("MEDAT","E")
From
^W1DICT("MEDAT","H")
-n
^W1DICT("MEDATE","E")
From date
^W1DICT("MEDATE","H")
jix`zn
^W1DICT("MEHOME","E")
From number
^W1DICT("MEHOME","H")
'qnn
^W1DICT("MEHOME","R")
s nom.
^W1DICT("MELKH","E")
From client
^W1DICT("MELKH","H")
gewln
^W1DICT("MEMBER","E")
Member
^W1DICT("MEMBER","H")
meyx gewl
^W1DICT("MEMBER","R")
Zaregistrirovanny!i pol!mzovatel!m
^W1DICT("MEMBERPRESSHERE","E")
If You member press here
^W1DICT("MEMBERPRESSHERE","H")
o`k ugl meyx gewl (d)z` m`
^W1DICT("MEMBERPRESSHERE","R")
Esli Vy zaregistrirovany najmite zdes!m
^W1DICT("MEMSHAKIM","E")
Interfaces
^W1DICT("MEMSHAKIM","H")
miwynn
^W1DICT("MENU","E")
Menu
^W1DICT("MENU","H")
hixtz
^W1DICT("MENU","R")
Men!u
^W1DICT("MENU2MISHLOHIM","E")
Send Menu to "Rest"
^W1DICT("MENU2MISHLOHIM","H")
'migelyn'-l hixtz xeciy
^W1DICT("MENUNAMEMUSTBEFILLED","E")
Type in Menu Description
^W1DICT("MENUNAMEMUSTBEFILLED","H")
hixtz xe`z cilwdl yi
^W1DICT("MENUOPTIONSBYWORD","E")
Menu options that include a word "$1"
^W1DICT("MENUOPTIONSBYWORD","H")
"$1" dlin zelleky hixtza zeivte`
^W1DICT("MENUPASSWORDLEVELS","E")
Back office passwords
^W1DICT("MENUPASSWORDLEVELS","H")
ixeg` cxynl ze`nqiq zebxc
^W1DICT("MEPAR","E")
From Item
^W1DICT("MEPAR","H")
hixtn
^W1DICT("MERCHANTNUMBER","E")
Number of terminal that comes
^W1DICT("MERCHANTNUMBER","H")
`"ay seqn 'qn
^W1DICT("MESHAA","E")
From Hour
^W1DICT("MESHAA","H")
dryn
^W1DICT("MESSAGE","E")
Message
^W1DICT("MESSAGE","H")
drced
^W1DICT("MESSAGENUMBER","E")
Message no $1
^W1DICT("MESSAGENUMBER","H")
$1 xtqn drced
^W1DICT("MESSAGESENDED","E")
Message is sent
^W1DICT("MESSAGESENDED","H")
dglyp drced
^W1DICT("MESSAGESENDED2RESTORAN","E")
A message was sent to "Restoran"
^W1DICT("MESSAGESENDED2RESTORAN","H")
"o`xehqx" -l dglyp drced
^W1DICT("MESSAGESTABLE","E")
Messages table
^W1DICT("MESSAGESTABLE","H")
zerced zlah
^W1DICT("MESSAGESTABLE","R")
Tablica soob-!i
^W1DICT("MESSAGETEXT","E")
Messages text
^W1DICT("MESSAGETEXT","H")
drced hqwh
^W1DICT("MESSAGETEXT","R")
Text soob!seni!a
^W1DICT("MESSENGERSTABLE","E")
Messengers table
^W1DICT("MESSENGERSTABLE","H")
migily zlah
^W1DICT("MESSENGERSTABLE","R")
Spisok posyl!mnyh
^W1DICT("MESUGL","E")
From cust. group
^W1DICT("MESUGL","H")
zegewl zveawn
^W1DICT("MEUHAD","E")
Authorized united dealer
^W1DICT("MEUHAD","H")
cge`n dyxen wqer
^W1DICT("MGR","E")
Manager
^W1DICT("MGR","H")
ldpn
^W1DICT("MGR","R")
Na!4-k smeny
^W1DICT("MGRAUTH","E")
Administrator permissions
^W1DICT("MGRAUTH","H")
mildpn ze`yxd
^W1DICT("MGRDEPTABLE","E")
Department Managers Table
^W1DICT("MGRDEPTABLE","H")
zewlgn ildpn zlah
^W1DICT("MGRSHIFT","E")
Shift management
^W1DICT("MGRSHIFT","H")
zexnyn ledip
^W1DICT("MGRTABLE","E")
Managers table
^W1DICT("MGRTABLE","H")
mildpn zlah
^W1DICT("MHALAST","E")
Last price
^W1DICT("MHALAST","H")
oexg` xign
^W1DICT("MHLMAM","E")
Prices before VAT
^W1DICT("MHLMAM","H")
n"rn iptl mixign
^W1DICT("MHMIN","E")
Price Minimum
^W1DICT("MHMIN","H")
dpnfd menipin
^W1DICT("MHSFR","E")
Price per counting unit
^W1DICT("MHSFR","H")
dxitq 'gil xign
^W1DICT("MIKUM","E")
Location
^W1DICT("MIKUM","H")
mewin
^W1DICT("MIMUSHPIZUIM","E")
Realization of compensation
^W1DICT("MIMUSHPIZUIM","H")
mievit yenin
^W1DICT("MINLENGTH","E")
Record size in field "$1" should be no less than $2 characters
^W1DICT("MINLENGTH","H")
zeieez $2 zegtl zeidl xen` "$1" dcy jxe`
^W1DICT("MINLENGTH","R")
Dlina zapisi ne doljna byt!m men!m!6e $2 cimvolov
^W1DICT("MINLENN","E")
Record size should be no less than $1 digits
^W1DICT("MINLENN","H")
zextq $1 zegtl zeidl xen` dcy jxe`
^W1DICT("MINLENN","R")
Kod doljen soderjat!m po men!m!6e!i mere $1 cifry
^W1DICT("MINLNG","E")
At least $1 digits
^W1DICT("MINLNG","H")
zegtl zextq $1
^W1DICT("MINUT","E")
Min
^W1DICT("MINUT","H")
'wc
^W1DICT("MINUT","R")
min
^W1DICT("MISC","E")
Miscallenios
^W1DICT("MISC","H")
zepey
^W1DICT("MISC","R")
Raznoe
^W1DICT("MISCTABLES","E")
Miscallenios
^W1DICT("MISCTABLES","H")
zepey ze`lah
^W1DICT("MISCTABLES","R")
Raznoe
^W1DICT("MISS","E")
Miss
^W1DICT("MISS","H")
zxab
^W1DICT("MKLINEINPTIME","E")
Arrival time to MacLine
^W1DICT("MKLINEINPTIME","H")
oiilwnl drbd onf
^W1DICT("MKLINESTATUS","E")
MacLine Order Status
^W1DICT("MKLINESTATUS","H")
oiilwna zepnfd avn
^W1DICT("MKRDLV","E")
Source of arrival
^W1DICT("MKRDLV","H")
drbd xewn
^W1DICT("MKRNOM","E")
Source order number
^W1DICT("MKRNOM","H")
xewn zpnfd 'qn
^W1DICT("MLMINREPORT","E")
Report on items below minimum stock
^W1DICT("MLMINREPORT","H")
menipin i`ln zgz mi`vnpy mihixt g"ec
^W1DICT("MLTNINREPORT","E")
Income stock report
^W1DICT("MLTNINREPORT","H")
i`ln zeqpkd g"ec
^W1DICT("MLTNQREPORT","E")
Quantitative stock movements report
^W1DICT("MLTNQREPORT","H")
izenk i`ln zerepz g"ec
^W1DICT("MLYITEMS","E")
Stock Items
^W1DICT("MLYITEMS","H")
i`ln ihixt
^W1DICT("MLYITEMSDOCS","E")
View documents with stock items
^W1DICT("MLYITEMSDOCS","H")
i`ln ihixt mr miknqn bvd
^W1DICT("MLYMINIMUM","E")
Minimum stock
^W1DICT("MLYMINIMUM","H")
menipin i`ln
^W1DICT("MLYRAMA","E")
Stock level
^W1DICT("MLYRAMA","H")
dpnfd zcewp
^W1DICT("MLYTABLES","E")
Stock tables
^W1DICT("MLYTABLES","H")
i`ln ze`lah
^W1DICT("MM","E")
Month
^W1DICT("MM","H")
yceg
^W1DICT("MM","R")
Mes.
^W1DICT("MM1","E")
Yan
^W1DICT("MM1","H")
x`epi
^W1DICT("MM10","E")
October
^W1DICT("MM10","H")
xaehwe`
^W1DICT("MM11","E")
November
^W1DICT("MM11","H")
xanaep
^W1DICT("MM12","E")
December
^W1DICT("MM12","H")
xanavc
^W1DICT("MM2","E")
February
^W1DICT("MM2","H")
x`exat
^W1DICT("MM3","E")
March
^W1DICT("MM3","H")
uxn
^W1DICT("MM4","E")
April
^W1DICT("MM4","H")
lixt`
^W1DICT("MM5","E")
May
^W1DICT("MM5","H")
i`n
^W1DICT("MM6","E")
June
^W1DICT("MM6","H")
ipei
^W1DICT("MM7","E")
July
^W1DICT("MM7","H")
ilei
^W1DICT("MM8","E")
August
^W1DICT("MM8","H")
hqebe`
^W1DICT("MM9","E")
September
^W1DICT("MM9","H")
xanhtq
^W1DICT("MMITEMSREPORT","E")
Sales report items monthly by days
^W1DICT("MMITEMSREPORT","H")
mini itl iyceg mihixt zexikn g"ec
^W1DICT("MNLNETTABLE","E")
Administrator Permissions Table
^W1DICT("MNLNETTABLE","H")
mildpn ze`yxd zlah
^W1DICT("MNYALL","E")
Financial statements by business
^W1DICT("MNYALL","H")
miwqr itl miitqk zeg"ec zeizq
^W1DICT("MNYALLREP","E")
Financial statements from  $1 to  $2
^W1DICT("MNYALLREP","H")
$2 jix`z cr $1 jix`zn miitqk ze"gec zeizq
^W1DICT("MNYREP","E")
Financial statement reconciliation
^W1DICT("MNYREP","H")
miitqk zeg"ec zn`zd
^W1DICT("MNYREPORT","E")
Reconciling financial statements from $1 to $2
^W1DICT("MNYREPORT","H")
$2 jix`z cr $1 jix`zn miitqk ze"gec zn`zd
^W1DICT("MOBIL","E")
Mobile #
^W1DICT("MOBIL","H")
ciip 'lh
^W1DICT("MOBIL","R")
Mob.
^W1DICT("MODEL","E")
Model
^W1DICT("MODEL","H")
mbc
^W1DICT("MONTHCOMPARISONREPORT","E")
Comparative sales report month $1 vs month $2 by days
^W1DICT("MONTHCOMPARISONREPORT","H")
mini itl $2 yceg len $1 yceg iz`eeyd zexikn g"ec
^W1DICT("MONTHGRAPHCOMPARISON","E")
Comparative graph month $1 vs month $2 by days
^W1DICT("MONTHGRAPHCOMPARISON","H")
mini itl $2 yceg len $1 yceg iz`eeyd sxb
^W1DICT("MONTHITEMREPORT","E")
Sales items report to month $1 year $2
^W1DICT("MONTHITEMREPORT","H")
$2 dpy $1 ycegl mihixt zexikn g"ec
^W1DICT("MONTHPERDAYSREPORT","E")
Details of the monthly report according to weekdays
^W1DICT("MONTHPERDAYSREPORT","H")
reay ini itl iyceg g"ec hexit
^W1DICT("MONTHPROFITGRAPH","E")
Monthly sales graph by day
^W1DICT("MONTHPROFITGRAPH","H")
mini iti iyceg zexikn sxb
^W1DICT("MONTHS","E")
Months
^W1DICT("MONTHS","H")
miyceg
^W1DICT("MORNING","E")
Morning
^W1DICT("MORNING","H")
xwea
^W1DICT("MOSTINUSE","E")
Most used
^W1DICT("MOSTINUSE","H")
yeniya ikd
^W1DICT("MOTH","E")
To OTH Items Group
^W1DICT("MOTH","H")
mihixt zveawl OTH
^W1DICT("MOVCUST2HSVPROTOCOL","E")
Customer Data Transfer Protocol
^W1DICT("MOVCUST2HSVPROTOCOL","H")
zayaygl zegewl ipezp zxard lewehext
^W1DICT("MOVE","E")
Sort
^W1DICT("MOVE","H")
xard
^W1DICT("MOVE","R")
Peremestit!m
^W1DICT("MOVE2HSV","E")
Prepare file for transfer
^W1DICT("MOVE2HSV","H")
dxardl uaew oikd
^W1DICT("MOVEALLTABLETOBUSY","E")
The transfer of all the table to the engaged table
^W1DICT("MOVEALLTABLETOBUSY","H")
qetz ogleyl ogleyd lk dxard
^W1DICT("MOVEALLTABLETOFREE","E")
The transfer of all the table to the unoccupied table
^W1DICT("MOVEALLTABLETOFREE","H")
iept ogleyl ogleyd lk zxard
^W1DICT("MOVECARD","E")
Move Card
^W1DICT("MOVECARD","H")
qihxk xiard
^W1DICT("MOVECHANGE2ADDPRICE","E")
Transfer change to add.price
^W1DICT("MOVECHANGE2ADDPRICE","H")
xign ztqezl scer xiard
^W1DICT("MOVECHANGE2TIP","E")
Transfer to Tip
^W1DICT("MOVECHANGE2TIP","H")
tihl xiard
^W1DICT("MOVECHANGE2TLODEF","E")
Transfer Change to another gift slip
^W1DICT("MOVECHANGE2TLODEF","H")
sqep dpzn yelzl scer xiard
^W1DICT("MOVED2TABLE","E")
Was passed to the table $1 $2
^W1DICT("MOVED2TABLE","H")
$2 $1 ogleyl xared
^W1DICT("MOVEDFROMTABLE","E")
Was passed from table $1
^W1DICT("MOVEDFROMTABLE","H")
$1 ogleyn dxard
^W1DICT("MOVEITEMSTOOTHERTABLE","E")
A transfer of products to the other table
^W1DICT("MOVEITEMSTOOTHERTABLE","H")
xg` ogleyl mihixt zxard
^W1DICT("MOVEITRA2FIELD","E")
To transfer balance to a field, press [F4]
^W1DICT("MOVEITRA2FIELD","H")
[F4] ugl dcyl dxzi zxardl
^W1DICT("MOVELINE","E")
Click on the "Code" field in the row<BR>You want to put a line marked before it
^W1DICT("MOVELINE","H")
"xefg" ywn lr wilw e` <BR> diptl zpneqn dxey miyl dvex dz`y <BR> dxeya "cew" dcy lr wilw
^W1DICT("MOVEODEF2TIP","E")
Transfer a balance to tip
^W1DICT("MOVEODEF2TIP","H")
tihl dxzi xiard
^W1DICT("MOVEORDER2REST","E")
Transfer a order to restaurant
^W1DICT("MOVEORDER2REST","H")
dcrqnl dpnfd zxard
^W1DICT("MOVING2HASHAVSHEVETPROTOCOL","E")
Protocol of Transfer Data to "Hashavshevet"
^W1DICT("MOVING2HASHAVSHEVETPROTOCOL","H")
zayaygl mipezp zxard lewehext
^W1DICT("MOVINGCODESFROMJOB","E")
Changing codes from a process $1
^W1DICT("MOVINGCODESFROMJOB","H")
$1 jildzn micew iepiy mirvan
^W1DICT("MOVINGCODESFROMOTHERTERMINAL","E")
Changing codes from another terminal
^W1DICT("MOVINGCODESFROMOTHERTERMINAL","H")
! xg` seqnn micew iepiy mirvan
^W1DICT("MOVINGCODESPROTOCOL","E")
A code change protocol made in $1 $2
^W1DICT("MOVINGCODESPROTOCOL","H")
$2 $1 -a rveay micew iepiy lewehext
^W1DICT("MOVINGERROR","E")
Error moving table
^W1DICT("MOVINGERROR","H")
$1 ogley dxarda d`iby
^W1DICT("MOVINGFROMTABLE","E")
Was passed from table $1
^W1DICT("MOVINGFROMTABLE","H")
$1 ogleyn dxard
^W1DICT("MOVINGITEMNUMBERS","E")
Change group item codes
^W1DICT("MOVINGITEMNUMBERS","H")
izveaw mihixt ixtqn iepiy
^W1DICT("MOVINGITEMSFROMTABLE","E")
A transfer of products to table $1
^W1DICT("MOVINGITEMSFROMTABLE","H")
$1 ogleyn mihixt zxard
^W1DICT("MOVINGITEMSPROTOCOL","E")
Change Item Codes Protocol
^W1DICT("MOVINGITEMSPROTOCOL","H")
mihixt ixtqn iepiy lewehext
^W1DICT("MOVINGTABLE","E")
Transfer of table
^W1DICT("MOVINGTABLE","H")
ogley zxard
^W1DICT("MP","E")
Multipass
^W1DICT("MPMENU","E")
Multipass Menu
^W1DICT("MPMENU","H")
"qtihlen" ly hixtz
^W1DICT("MPREPORT","E")
MultiPass card payment report
^W1DICT("MPREPORT","H")
"qtihlen" iqihxka minelyz  g"ec
^W1DICT("MPREPORTS","E")
MultiPass Reports
^W1DICT("MPREPORTS","H")
"qtihlen" ly zeg"ec
^W1DICT("MR","E")
Mr
^W1DICT("MR","H")
oec`
^W1DICT("MRKGREPORT","E")
Income report by centers (lateral)
^W1DICT("MRKGREPORT","H")
( agexl ) mifkxn itl zeqpkd g"ec
^W1DICT("MRKMAN","E")
Interface for "MARKETMAN"
^W1DICT("MRKMAN","H")
"MARKETMAN" -l wynn
^W1DICT("MRKMANPRM","E")
Parameters for "MARKETMAN"
^W1DICT("MRKMANPRM","H")
"MARKETMAN" -l mixhnxt
^W1DICT("MRKMANPROT","E")
Data transmission protocol for "MARKETMAN"
^W1DICT("MRKMANPROT","H")
$1 dtewza "MARKETMAN" -l mipezp xeciy lewehext
^W1DICT("MRKMANPROTIT","E")
Item sales data sent to "MARKETMAN" on date $1
^W1DICT("MRKMANPROTIT","H")
$1 jix`z lr "MARKETMAN" -l exceyy mihixt zexikn ipezp
^W1DICT("MRKMREPORT","E")
Income report by centers
^W1DICT("MRKMREPORT","H")
( daebl ) mifkxn itl zeqpkd g"ec
^W1DICT("MRKZREPORT","E")
Closing Report - Concentration by Centers
^W1DICT("MRKZREPORT","H")
mifkxn itl mi - Z fekix g"ec
^W1DICT("MRS","E")
Mrs
^W1DICT("MRS","H")
zxab
^W1DICT("MSCP","E")
Mscp
^W1DICT("MSG&SALES","E")
Messages and sales
^W1DICT("MSG&SALES","H")
mirvane zerced
^W1DICT("MSG&SALES","R")
Ob!t!avleni!a
^W1DICT("MSG2SITE","E")
Messages to the site
^W1DICT("MSG2SITE","H")
xz`l zerced
^W1DICT("MSGDISC*","E")
Items with no discount are marked on *
^W1DICT("MSGDISC*","H")
* - a mipneqn dgpd `ll mihixt
^W1DICT("MSGRULE1","E")
In order to print words in the big characters there is to put them inside scalin
^W1DICT("MSGRULE1","H")
zeinleq jeza mze` miyl yi zelecb zeize`a milin qitcdl ick
^W1DICT("MSGRULE2","E")
Every big signal takes in printing of double place hundred normal
^W1DICT("MSGRULE2","H")
dlibx ze`n letk mewn dqtcda zgwel dlecb ze` lk
^W1DICT("MSHCA","E")
Mishloha (Credit Cards)
^W1DICT("MSHCA","H")
(`"k) dgelyn
^W1DICT("MSHORDNUMBER","E")
Mishloha orders number
^W1DICT("MSHORDNUMBER","H")
dgelyna dpnfd xtqn
^W1DICT("MSTR","E")
Mr
^W1DICT("MSTR","H")
oec`
^W1DICT("MTREPHD","E")
Meat sales report from $1 to date $2
^W1DICT("MTREPHD","H")
$2 jix`z cr $1 jix`zn mixya zxikn g"ec
^W1DICT("MULTYLINE","E")
Row duplication
^W1DICT("MULTYLINE","H")
dxey letky
^W1DICT("MULTYPASS","E")
Multipass
^W1DICT("MULTYPASS","H")
qtihlen
^W1DICT("MULTYPASSPARAMETERS","E")
Multipass parameters
^W1DICT("MULTYPASSPARAMETERS","H")
"qtihlen" ly mixhnxt
^W1DICT("MULTYWITHCOMMENTS","E")
Duplicate with notes
^W1DICT("MULTYWITHCOMMENTS","H")
zexrd mr ltky
^W1DICT("MULTYWITHOUTCOMMENTS","E")
Duplicate without comments
^W1DICT("MULTYWITHOUTCOMMENTS","H")
zexrd `ll ltky
^W1DICT("MUSTADD","E")
Required additions
^W1DICT("MUSTADD","H")
daeg zetqez
^W1DICT("MUSTAUTHNO","E")
Reference required
^W1DICT("MUSTAUTHNO","H")
daeg `zknq`
^W1DICT("MUSTBETABLEBUSY","E")
In this allowable option to pass to the engaged table only
^W1DICT("MUSTBETABLEBUSY","H")
cala qetz ogleyl xiardl xzen z`f divte`a
^W1DICT("MUSTBETABLEFREE","E")
In this allowable option to pass to the unoccupied table only
^W1DICT("MUSTBETABLEFREE","H")
cala iept ogleyl xiardl xzen z`f divte`a
^W1DICT("MUSTBETEXT","E")
Must key a text of note
^W1DICT("MUSTBETEXT","H")
dxrd hqwh cilwdl miaiig
^W1DICT("MUSTCBEXIT","E")
Exit only by clicking on the "Exit",otherwise a receipt ill not be created
^W1DICT("MUSTCBEXIT","H")
xveez `l dlaw zxg` <BR> "d`ivi" ywn lr <BR> dvigla wx z`vl daeg
^W1DICT("MUSTCHOICEDATE","E")
Date must be selected
^W1DICT("MUSTCHOICEDATE","H")
jix`z xegal yi
^W1DICT("MUSTCHOICERECEIVER","E")
You must select a recipient number !
^W1DICT("MUSTCHOICERECEIVER","H")
! lawn 'qn xegal yi 
^W1DICT("MUSTCHOICETABLE","E")
You must choose a table number !
^W1DICT("MUSTCHOICETABLE","H")
! ogley 'qn xegal yi
^W1DICT("MUSTCLOSEDBYCREDIT","E")
The credit customer must close the "Credit" option
^W1DICT("MUSTCLOSEDBYCREDIT","H")
ixeg` cxyn jxc melyz rvale 'dtwd' divte`a xebql yi dtwd gewl
^W1DICT("MUSTEQTAX","E")
For a correct calculation, there should be no VAT changes during the period.
^W1DICT("MUSTEQTAX","H")
dtewza n"rn iiepiy zeidl mixen` `l oekp aeyigl
^W1DICT("MUSTPAYMENT","E")
Please select a type of payment
^W1DICT("MUSTPAYMENT","H")
melyz beq zpniq `l
^W1DICT("MUSTPAYMENT","R")
Ukajite vid plateja
^W1DICT("MUSTREGISTRY","E")
Please Login first and press Submit
^W1DICT("MUSTTERMINATEINPUT","E")
Please finish an product selection
^W1DICT("MUSTTERMINATEINPUT","H")
hixt ipezp ly dhilw miiql `p
^W1DICT("MUSTTERMINATEINPUT","R")
Zakon!4ite vvod dannyh
^W1DICT("MUSTUSER","E")
Please type a login ID
^W1DICT("MUSTUSER","H")
ynzyn cew cilwdl `p
^W1DICT("MUSTUSER","R")
Ukajite kod pol!mzovatel!a
^W1DICT("MUTAG","E")
Brand
^W1DICT("MUTAG","H")
bzen
^W1DICT("MV2DLV","E")
Transfer to delivery system
^W1DICT("MV2DLV","H")
migelyn zkxrnl dxard
^W1DICT("MV2REST","E")
Transfer to restaurant system
^W1DICT("MV2REST","H")
dcrqn zkxrnl dxard
^W1DICT("MVBANK","E")
Bank transfer
^W1DICT("MVBANK","H")
zi`wpa dxard
^W1DICT("MVEMVCARD","E")
Swipe card on device and click "Confirm"
^W1DICT("MVEMVCARD","H")
"xy`" ugle xiykna qihxk xiard
^W1DICT("MVERROR","E")
Transfer error $1
^W1DICT("MVERROR","H")
$1 dxard z`iby
^W1DICT("MVIT2TBDEL","E")
Transfer items to the cancellation table
^W1DICT("MVIT2TBDEL","H")
lehia ogleyl mihixt zxard
^W1DICT("MVQUANT","E")
How many to transfer
^W1DICT("MVQUANT","H")
xiardl dnk
^W1DICT("MVSD","E")
How many diners to transfer?
^W1DICT("MVSD","H")
? mixaer zegewl dnk
^W1DICT("MVTBPROT","E")
Table transfer protocol
^W1DICT("MVTBPROT","H")
zepgley zxard lewehext
^W1DICT("MVTBPROTOCOL","E")
Table transfer protocol for date $1
^W1DICT("MVTBPROTOCOL","H")
$1 jix`zl zepgley zxard lewehext
^W1DICT("MVTIME","E")
Transfer time
^W1DICT("MVTIME","H")
dxard onf
^W1DICT("MYACCOUNT","E")
Account for deposit
^W1DICT("MYACCOUNT","H")
dcwtdl oeayg
^W1DICT("MYADDR","E")
My address is
^W1DICT("MYADDR","H")
`ed ily zaezk
^W1DICT("MYADDRESS","E")
My address
^W1DICT("MYADDRESS","H")
ily zaezk
^W1DICT("MYADDRESSIS","E")
My address is : $1
^W1DICT("MYADDRESSIS","H")
$1 : `ed ily zaezk
^W1DICT("MYCHCODE","E")
Type "My Check" code
^W1DICT("MYCHCODE","H")
cew <E>My Check<E> clwd
^W1DICT("MYCHCODEINORDER","E")
In Order $1 "My Check" code is $1
^W1DICT("MYCHCODEINORDER","H")
$1 `ed dpnfda <E>My Check<E> cew
^W1DICT("MYCHCODEINORDERNOTFOUND","E")
Code of My Checknot found in order
^W1DICT("MYCHCODEINORDERNOTFOUND","H")
dpnfda `vnp `l <E>My Check<E> cew
^W1DICT("MYCHCODENOTDEFINED","E")
Code of My Check not defined
^W1DICT("MYCHCODENOTDEFINED","H")
xcbed `l <E>My Check<E> cew
^W1DICT("MYCHECKPARAMETERS","E")
My Check system parameters
^W1DICT("MYCHECKPARAMETERS","H")
<E>"MY CHECK"<E> zkxrn ly mixhnxt
^W1DICT("MYCHECKREPORT","E")
My Check Report
^W1DICT("MYCHECKREPORT","H")
"w'iv iin" g"ec
^W1DICT("MYCHNAME","E")
Customer Name
^W1DICT("MYCHNAME","H")
gewl my
^W1DICT("MYCHNUMBER","E")
Customer Code
^W1DICT("MYCHNUMBER","H")
gewl ly cew
^W1DICT("MYESEK","E")
Licensed dealer
^W1DICT("MYESEK","H")
dyxen wqer
^W1DICT("MYHP","E")
A.D
^W1DICT("MYHP","H")
.t.g/n.r
^W1DICT("MYORDERS","E")
My Orders
^W1DICT("MYORDERS","H")
ily zepnfd
^W1DICT("MYSTAMP","E")
Software was developed by the company "Lev On Line" tel/054-4380608
^W1DICT("MYSTAMP","H")
<E>lev1957@gmail.com<E> l"`ec 08-6812270 qwt 054-4380608,08-6881815 'lh.<BR> "oiil oe` al" dxag ici lr dgzet dpkez
^W1DICT("MZSMPARAMETERS","E")
Smart Drawer Parameters
^W1DICT("MZSMPARAMETERS","H")
dnkg dxibnl mixhnxt
^W1DICT("NAME","E")
Name
^W1DICT("NAME","H")
my
^W1DICT("NAME","R")
Im!a
^W1DICT("NAME1","E")
Contact Man
^W1DICT("NAME1","H")
xyw yi`
^W1DICT("NAMEEXIST","E")
Name belong to code $1
^W1DICT("NAMEEXIST","H")
$1 cewl jiiy my
^W1DICT("NAMEEXIST","R")
Naim-e prinadlejit kodu $1
^W1DICT("NARROWPRINTREPORTS","E")
Reports to a narrow printer
^W1DICT("NARROWPRINTREPORTS","H")
dxv zqtcnl zeg"ec
^W1DICT("NCHECK","E")
Number of check
^W1DICT("NCHECK","H")
wiy 'qn
^W1DICT("NCHECKCRCARD","E")
Check No. / Cr.Card / Cash
^W1DICT("NCHECKCRCARD","H")
onefn/`"k/wiy 'qn
^W1DICT("NDIGITSONLY","E")
$1 digits exactly
^W1DICT("NDIGITSONLY","H")
zextq $1 
^W1DICT("NDIGITSONLY","R")
$1 cifry
^W1DICT("NEKUDOT","E")
Points
^W1DICT("NEKUDOT","H")
zecewp
^W1DICT("NETCASHDELREPORT","E")
Cash Cancellations Report by Branch
^W1DICT("NETCASHDELREPORT","H")
mitipq itl onefn ilehia g"ec
^W1DICT("NETCASHREPORT","E")
Cash report by branches
^W1DICT("NETCASHREPORT","H")
mitipq itl onefn g"ec
^W1DICT("NETCREDREPORT","E")
Network Cash Sales Report
^W1DICT("NETCREDREPORT","H")
izyx dtwda zexikn g"ec
^W1DICT("NETITEMSREPORT","E")
Network Item Report
^W1DICT("NETITEMSREPORT","H")
izyx mihixt g"ec
^W1DICT("NETMANAGMENT","E")
Network management
^W1DICT("NETMANAGMENT","H")
zyx ledip
^W1DICT("NETO","E")
Netto
^W1DICT("NETO","H")
ehp
^W1DICT("NETPLACE","E")
Place on the net
^W1DICT("NETPLACE","H")
zyxa mewn
^W1DICT("NETSALES","E")
Network sales
^W1DICT("NETSALES","H")
zyx zexikn
^W1DICT("NETSALESREPORT","E")
Chain Sales report
^W1DICT("NETSALESREPORT","H")
itqk izyx zexikn g"ec
^W1DICT("NETSALESSRCREPORT","E")
Chaine Sales Report by Source
^W1DICT("NETSALESSRCREPORT","H")
xewn itl izyx zexikn g"ec
^W1DICT("NETTFKOVDREPORT","E")
Chain Employee Productivity Report
^W1DICT("NETTFKOVDREPORT","H")
izyx micaer zwetz g"ec
^W1DICT("NETTO","E")
Netto
^W1DICT("NETTO","H")
ehp
^W1DICT("NETTOACCUM","E")
Cumulative revenue
^W1DICT("NEWBACKINVOICEASSEMBLY","E")
Compose Invoice from Return Docs
^W1DICT("NEWBACKINVOICEASSEMBLY","H")
xfgd zecerzn zipeayg akxd
^W1DICT("NEWCELLCOL","E")
Column
^W1DICT("NEWCELLCOL","H")
xeh
^W1DICT("NEWCELLLINE","E")
New Line
^W1DICT("NEWCELLLINE","H")
dycg dxey
^W1DICT("NEWCLIENTS","E")
New vlients
^W1DICT("NEWCLIENTS","H")
miycg zegewl
^W1DICT("NEWCLIENTS","R")
Novye klienty
^W1DICT("NEWCOUNTING","E")
New count
^W1DICT("NEWCOUNTING","H")
dycg dxitq
^W1DICT("NEWCUSREPORT","E")
New Customers Report
^W1DICT("NEWCUSREPORT","H")
miycg zegewl g"ec
^W1DICT("NEWCUST","E")
New customer!
^W1DICT("NEWCUST","H")
!ycg gewl
^W1DICT("NEWCUST","R")
Novy!i klient
^W1DICT("NEWCUSTQN","E")
Number of new customers
^W1DICT("NEWCUSTQN","H")
miycg zegewl 'qn
^W1DICT("NEWDEP","E")
A new department
^W1DICT("NEWDEP","H")
dycg dwlgn
^W1DICT("NEWDEPOSITION","E")
New deposit
^W1DICT("NEWDEPOSITION","H")
dycg dcwtd
^W1DICT("NEWDISCOUNT","E")
New discount
^W1DICT("NEWDISCOUNT","H")
dycg dgpd
^W1DICT("NEWDLVBACKDOC","E")
Issuing a new return certificate
^W1DICT("NEWDLVBACKDOC","H")
dycg xfgd zcerz zwtd
^W1DICT("NEWDLVDOC","E")
Producing a new delivery certificate
^W1DICT("NEWDLVDOC","H")
dycg gelyn zcerz zwtd
^W1DICT("NEWDLVSPDOC","E")
Type a new delivery note
^W1DICT("NEWDLVSPDOC","H")
dycg gelyn zcerz zclwd
^W1DICT("NEWDOC","E")
Issuing new document
^W1DICT("NEWDOC","H")
dycg dcerz zwtd
^W1DICT("NEWDOCUMENT","E")
New Document
^W1DICT("NEWDOCUMENT","H")
ycg jnqn
^W1DICT("NEWINVEST","E")
New deposit
^W1DICT("NEWINVEST","H")
dycg dcwtd
^W1DICT("NEWINVOICE","E")
A production of new invoice
^W1DICT("NEWINVOICE","H")
dycg zipeayg zwtd
^W1DICT("NEWINVOICEASSEMBLY","E")
Compose Invoice from Delivery Docs
^W1DICT("NEWINVOICEASSEMBLY","H")
gelyn zecerzn zipeayg akxd
^W1DICT("NEWINVOICERECEIPT","E")
Issuing New Invoice / Receipt
^W1DICT("NEWINVOICERECEIPT","H")
dycg dlaw/qn 'yg zwtd
^W1DICT("NEWINVOICESISSUE","E")
A production of invoices to the customer base
^W1DICT("NEWINVOICESISSUE","H")
zegewl zveawl zeipeayg zwtd
^W1DICT("NEWINVOICETYPING","E")
Typing New Invoice
^W1DICT("NEWINVOICETYPING","H")
dycg zipeayg zclwd
^W1DICT("NEWMENU","E")
New Menu
^W1DICT("NEWMENU","H")
ycg hixtz
^W1DICT("NEWMENUNAME","E")
New Menu Description
^W1DICT("NEWMENUNAME","H")
ycg hixtz xe`z
^W1DICT("NEWMSG","E")
New message
^W1DICT("NEWMSG","H")
dycg drced
^W1DICT("NEWORD","E")
New order
^W1DICT("NEWORD","H")
dycg dpnfd
^W1DICT("NEWORD","R")
Novy!i zakaz
^W1DICT("NEWORDDATE","E")
Date of new order
^W1DICT("NEWORDDATE","H")
dycg dpnfd ly jix`z 
^W1DICT("NEWORDER","E")
New Order
^W1DICT("NEWORDER","H")
dycg dpnfd
^W1DICT("NEWORDINUMBER","E")
New #
^W1DICT("NEWORDINUMBER","H")
ycg ixeciq 'qn
^W1DICT("NEWORDINUMBER","R")
Novy!i por. nomer
^W1DICT("NEWORDTIME","E")
Time of new order
^W1DICT("NEWORDTIME","H")
 gcyd dpnfd ly onf
^W1DICT("NEWPASSWORD","E")
New password
^W1DICT("NEWPASSWORD","H")
dycg dnqiq
^W1DICT("NEWPASSWORDEQOLD","E")
New supposed password to be different from old
^W1DICT("NEWPASSWORDEQOLD","H")
dpyin dpey zeidl dxen` dycg dnqiq
^W1DICT("NEWPASSWORDMUSTBEALPHANUMERIC","E")
New supposed password to be Alpnomri
^W1DICT("NEWPASSWORDMUSTBEALPHANUMERIC","H")
ixneptl` zeidl dxen` dycg dnqiq
^W1DICT("NEWPASSWORDTOOSHORT","E")
New supposed password to be at least 6 characters Alphbtim
^W1DICT("NEWPASSWORDTOOSHORT","H")
mizadtl` mieez 6 zegtl zeidl dxen` dycg dnqiq
^W1DICT("NEWPAYMENT","E")
New payment
^W1DICT("NEWPAYMENT","H")
ycg melyz
^W1DICT("NEWPRCOFR","E")
New Bid
^W1DICT("NEWPRCOFR","H")
dycg xign zrvd
^W1DICT("NEWPRICE","E")
New Price
^W1DICT("NEWPRICE","H")
ycg xign
^W1DICT("NEWPRICELIST","E")
Update Vendor Price List
^W1DICT("NEWPRICELIST","H")
wtq oexign okcr
^W1DICT("NEWRECEIPT","E")
A production of new receipt
^W1DICT("NEWRECEIPT","H")
dycg dlaw zwtd
^W1DICT("NEWREGISTRY","E")
Sign Up new client
^W1DICT("NEWREGISTRY","H")
ycg gewl meyix
^W1DICT("NEWREGISTRY","R")
Registraci!a novogo pol!mzovatel!a
^W1DICT("NEWSERVICECARD","E")
New receipt
^W1DICT("NEWSERVICECARD","H")
dycg dlaw zcerz
^W1DICT("NEWSET","E")
New set
^W1DICT("NEWSET","H")
ycg hq 
^W1DICT("NEWSET","R")
Novy!i
^W1DICT("NEWSORT","E")
New sort.
^W1DICT("NEWSORT","H")
ycgn oiin
^W1DICT("NEWTXT","E")
New text
^W1DICT("NEWTXT","H")
dycg dxrd
^W1DICT("NEWTXT","R")
Novy!i text
^W1DICT("NEXT","E")
Next
^W1DICT("NEXT","H")
`ad
^W1DICT("NEXTORDER","E")
Next Order
^W1DICT("NEXTORDER","H")
d`ad dpnfd
^W1DICT("NEXTPAY","E")
Next payment
^W1DICT("NEXTPAY","H")
`ad melyz
^W1DICT("NIKMAS","E")
Deduction of tax at source
^W1DICT("NIKMAS","H")
xewn qn iekip
^W1DICT("NIKMASAD","E")
Validity of tax until
^W1DICT("NIKMASAD","H")
cr qn iekip swez
^W1DICT("NIS","E")
NIS
^W1DICT("NIS","H")
g"y
^W1DICT("NKHZM","E")
Order point
^W1DICT("NKHZM","H")
dpnfd zcewp
^W1DICT("NO","E")
No
^W1DICT("NO","H")
`l
^W1DICT("NO","R")
Net
^W1DICT("NOADR","E")
Invalid IP Address !
^W1DICT("NOADR","H")
dpekp `l IP zaezk
^W1DICT("NOANSWER","E")
No answer
^W1DICT("NOANSWER","H")
daeyz oi`
^W1DICT("NOBANK","E")
Does was not keyed a number of bank
^W1DICT("NOBANK","H")
wpa 'qn clwed `l
^W1DICT("NOBCKURL","H")
CALLBACK URL NOT DEFINED
^W1DICT("NOBITCAJ","E")
To cancel a credit card charged on the site, Please call the site or customer
^W1DICT("NOBITCAJ","H")
ilily melyz rval f`e <BR> i`xy` qihxk xtqn xxale <BR> gewl e` xz`l xywzdl `p <BR> xz`a aiiegy `"k lehial
^W1DICT("NOCARD","E")
Blank card number
^W1DICT("NOCARD","H")
wix qihxk 'qn
^W1DICT("NOCASHIER","E")
This is not Cashier !
^W1DICT("NOCASHIER","H")
! (z)i`tew `l df
^W1DICT("NOCB","E")
A receipt with $1 does not exist in the system
^W1DICT("NOCB","H")
zkxrna zniiw `l $1 'qn mr dlaw
^W1DICT("NOCD","E")
Code of field was not defined
^W1DICT("NOCD","H")
xcbed `l dcy cew
^W1DICT("NOCHANGEITEM","E")
Product was printed -changing impossible! You can delete product and input again
^W1DICT("NOCHANGEITEM","H")
ycgn cilwdle lhal xyt` ! zepyl ozip `l - qtced hixt
^W1DICT("NOCHANGEITEM","R")
Nel!mz!a izmenit!m ! Mojno udalit!m i vvesti zanovo
^W1DICT("NOCHECK","E")
Does was not keyed a number of check
^W1DICT("NOCHECK","H")
wiy 'qn clwed `l
^W1DICT("NOCHECKPRINTERS","E")
Cancel Ready Printers Checking
^W1DICT("NOCHECKPRINTERS","H")
zeqtcn zepken zwica lehia
^W1DICT("NOCITIES","E")
Cities Table is empty !
^W1DICT("NOCITIES","H")
dwix mixr zlah
^W1DICT("NOCLOSEDINVOICES","E")
There are no invoices that have been closed constrainedly
^W1DICT("NOCLOSEDINVOICES","H")
ueli`a exbqpy zeipeayg oi`
^W1DICT("NOCOMMENT","E")
No comment
^W1DICT("NOCOMMENT","H")
dxrd `ll
^W1DICT("NOCOURIER","E")
There is no courier
^W1DICT("NOCOURIER","H")
gily oi`
^W1DICT("NOCPW","E")
No cashier password set
^W1DICT("NOCPW","H")
(z)i`tew znqiq dxcbed `l
^W1DICT("NOCUSN","E")
Customer number not typed !
^W1DICT("NOCUSN","H")
! hlwed `l gewl 'qn
^W1DICT("NOCUSNAME","E")
Customer name not typed !
^W1DICT("NOCUSNAME","H")
! hlwed `l gewl my
^W1DICT("NOCUST","E")
Nonexistent customer in the system!
^W1DICT("NOCUST","H")
! zkxrna miiw `l gewl
^W1DICT("NOCUSTNMB","E")
Customer Id Not assigned
^W1DICT("NOCUSTNMB","H")
gewl 'qn xcbed `l
^W1DICT("NODATA!","E")
There are not data!
^W1DICT("NODATA!","H")
! mipezp oi`
^W1DICT("NODATAPROTOCOL","E")
Protocol for lack of data
^W1DICT("NODATAPROTOCOL","H")
mipezp xqeg lewehxt
^W1DICT("NODATPR","E")
Does was not keyed a date to the repayment
^W1DICT("NODATPR","H")
oerxtl jix`z clwed `l
^W1DICT("NODAYITEMS","E")
Products not for sale in day range
^W1DICT("NODAYITEMS","H")
xgapd mini geeha mi`vnp `ly mihixt
^W1DICT("NODELDIRECT","E")
It is not possible to cancel an instant debit credit transaction.
^W1DICT("NODELDIRECT","H")
iciin aeig i`xy` zwqr lhal xyt` i`
^W1DICT("NODELETECURRENTMENU","E")
Do not cancel the current menu
^W1DICT("NODELETECURRENTMENU","H")
igkep hixtz lhal oi`
^W1DICT("NODEPREPORT","E")
Report items that have not been assigned a class number
^W1DICT("NODEPREPORT","H")
dwlgn 'qn mdl xcbed `ly mihixt g"ec
^W1DICT("NODESCRIPTION","E")
Product description not entered
^W1DICT("NODESCRIPTION","H")
dpn xe`iz oi`
^W1DICT("NODISTRICTED","E")
Unlimited
^W1DICT("NODISTRICTED","H")
laben `l
^W1DICT("NODLV","E")
Not delivered
^W1DICT("NODLV","H")
eglyp `l
^W1DICT("NODLV","R")
Ne otprav.
^W1DICT("NODOCDESCRIPTION","E")
No document description was typed
^W1DICT("NODOCDESCRIPTION","H")
jnqn xe`z clwed `l
^W1DICT("NOEM","E")
No measure was specified
^W1DICT("NOEM","H")
dcin dxcbed `l
^W1DICT("NOEXIT2KITCHEN","E")
Products don't came out from the kitchen
^W1DICT("NOEXIT2KITCHEN","H")
gahndn e`vi `l mihixt
^W1DICT("NOFIRE","E")
Cancel Fire
^W1DICT("NOFIRE","H")
FIRE lehia
^W1DICT("NOFULLPAID","E")
Order not paid in full!
^W1DICT("NOFULLPAID","H")
! `ln ote`a dnley `l dpnfd
^W1DICT("NOGIFT","E")
It is not a gift slip
^W1DICT("NOGIFT","H")
dpzn yelz `l df
^W1DICT("NOGROUP","E")
Without group assignment
^W1DICT("NOGROUP","H")
dveaw `ll
^W1DICT("NOGROUP","R")
Bez gruppy
^W1DICT("NOHEAD","E")
Untitled
^W1DICT("NOHEAD","H")
zxzek `ll
^W1DICT("NOHESH","E")
Account field not entered
^W1DICT("NOHESH","H")
oeayg 'qn clwed `l
^W1DICT("NOISCH","E")
Allow payment by check!
^W1DICT("NOISCH","H")
! wiya melyzl xey` oi` gewll
^W1DICT("NOISCR","E")
Allow credit
^W1DICT("NOISCR","H")
! dtwdl xey` oi` gewll
^W1DICT("NOISSUEINVOICE2CASUAL","E")
Do not issue an invoice or delivery note to an occasional customer !
^W1DICT("NOISSUEINVOICE2CASUAL","H")
! oncfn gewll gelyn zcerz e` zipeayg `ivedl oi`
^W1DICT("NOIT4SALE11","E")
No discount item has been defined for the sale 1+1
^W1DICT("NOIT4SALE11","H")
1+1 rvanl dgpd hixt xcbed `l
^W1DICT("NOITCOMMENTS","E")
No comments on items
^W1DICT("NOITCOMMENTS","H")
mihixtl zexrd `ll
^W1DICT("NOITCOUNTLIST","E")
List of items without counting on the order
^W1DICT("NOITCOUNTLIST","H")
dpnfda dxitq `ll mihixt zniyx
^W1DICT("NOITDISC","E")
This item cannot be discounted.
^W1DICT("NOITDISC","H")
dgpd zzl zexyt` oi` df hixtl
^W1DICT("NOITEMS","E")
No products in product table !
^W1DICT("NOITEMS","H")
mipezp oi`
^W1DICT("NOITEMS","R")
Men!u ne zapolneno !
^W1DICT("NOITEMS4DEL","E")
No items selected for cancellation!
^W1DICT("NOITEMS4DEL","H")
! lehial mihixt exgap `l
^W1DICT("NOKCCD","H")
lawzd `l dipw cew
^W1DICT("NOKCQR","H")
lawzd `l cew QR
^W1DICT("NOKFMD","E")
No conversion coefficient was set in $1 to $2
^W1DICT("NOKFMD","H")
$2 -l $1 -oiia dxnd mcwn xcbed `l
^W1DICT("NOMAIN","E")
Main Item nott defined
^W1DICT("NOMAIN","H")
iy`x hixt xcbed `l
^W1DICT("NOMAM","E")
Without VAT
^W1DICT("NOMAM","H")
n"rn `ll
^W1DICT("NOMAMITLIST","E")
List of items without VAT
^W1DICT("NOMAMITLIST","H")
n"rn `ll mihixt zniyx
^W1DICT("NOMISKA","E")
Number of deal
^W1DICT("NOMISKA","H")
dwqr 'qn
^W1DICT("NOMOD","E")
Unchangeable
^W1DICT("NOMOD","H")
iepiyl ozip `l
^W1DICT("NOMODST","E")
Item already printed. Do not change
^W1DICT("NOMODST","H")
zepyl oi` . qtced xak hixt
^W1DICT("NOMOVEALLGUESTS","E")
Transfere all the products in this action not allowed
^W1DICT("NOMOVEALLGUESTS","H")
z`f divte`a mihixtd lk xiardl oi`
^W1DICT("NOMSDR","E")
Restaurant group number not defined
^W1DICT("NOMSDR","H")
xcbed `l zecrqn zveaw 'qn
^W1DICT("NOMUST","E")
Optional
^W1DICT("NOMUST","H")
daeg `l
^W1DICT("NONAME","E")
Name field not entered
^W1DICT("NONAME","H")
clwed `l my
^W1DICT("NONEWPASSWORD","E")
New password not entered
^W1DICT("NONEWPASSWORD","H")
dycg dnqiq zpiiv `l
^W1DICT("NONOMCB","E")
No receipt number typed
^W1DICT("NONOMCB","H")
dlaw 'qn dclwed `l
^W1DICT("NONOMTL","E")
A gift slip with a number $1 does not exist on the system
^W1DICT("NONOMTL","H")
zkxrna miiw `l $1 xtqn mr dpzn yelz
^W1DICT("NONOTHING","E")
Enter a given
^W1DICT("NONOTHING","H")
oezp cilwdl `p
^W1DICT("NOOPENINVOICESFORTHISCUSTOMER","E")
There are no open invoices for this customer
^W1DICT("NOOPENINVOICESFORTHISCUSTOMER","H")
df gewll zegezt zeipeayg oi`
^W1DICT("NOORD","E")
Order number not defined
^W1DICT("NOORD","H")
xcbed `l dpnfd 'qn
^W1DICT("NOORDERITEMS","E")
No products
^W1DICT("NOORDERITEMS","H")
dpnfda mihixt oi`
^W1DICT("NOORDERITEMS","R")
Zakaz pust
^W1DICT("NOOUTANS","E")
No answer from the ABS terminal
^W1DICT("NOOUTANS","H")
`ay seqnn daeyz oi`
^W1DICT("NOOUTIND","E")
Tranzaction number not defined
^W1DICT("NOOUTIND","H")
xcbed `l drepz 'qn
^W1DICT("NOOUTPSW","E")
Password not set
^W1DICT("NOOUTPSW","H")
dxcbed `l dnqiq
^W1DICT("NOOUTSUM","E")
Transaction amount not defined
^W1DICT("NOOUTSUM","H")
xcbed `l dwqr mekq
^W1DICT("NOOUTUSR","E")
User code not set
^W1DICT("NOOUTUSR","H")
xcbed `l ynzyn cew
^W1DICT("NOPADONLY","E")
Only uncashed checks
^W1DICT("NOPADONLY","H")
ectp `ly miwiy wx
^W1DICT("NOPAID","E")
Not paid
^W1DICT("NOPAID","H")
enley `l
^W1DICT("NOPAYED","E")
No paid
^W1DICT("NOPAYED","H")
enliy `l
^W1DICT("NOPAYED","R")
Ne opla!4eny
^W1DICT("NOPERMISSION","E")
Sorry, no permission to do
^W1DICT("NOPERMISSION","H")
dyib oi`, dgilq
^W1DICT("NOPERMISSION","R")
Net dostupa
^W1DICT("NOPOSID","E")
No restaurant number specified
^W1DICT("NOPOSID","H")
dcrqn xtqn xcbed `l
^W1DICT("NOPOSPW","E")
No restaurant password set
^W1DICT("NOPOSPW","H")
dcrqn znqiq dxcbed `l
^W1DICT("NOPRCSALE","E")
No price has been set for the sale item.
^W1DICT("NOPRCSALE","H")
rvan hixtl xign xcbed `l
^W1DICT("NOPRESENTINWORK","E")
Employee not present !
^W1DICT("NOPRESENTINWORK","H")
! gkep `l caer
^W1DICT("NOPRINT","E")
Do not print
^W1DICT("NOPRINT","H")
qitcdl `l
^W1DICT("NOPRMSHVA","E")
Does was not defined an option to receive credit cards
^W1DICT("NOPRMSHVA","H")
i`xy` iqihxk lawl divte` dxcbed `l
^W1DICT("NOPULLITOUT","E")
Do not perform !
^W1DICT("NOPULLITOUT","H")
!`ivedl `l
^W1DICT("NOQN2DEL","E")
Does were not chosen products to the cancellation
^W1DICT("NOQN2DEL","H")
lehial mihixt exgap `l 
^W1DICT("NOQN2MOVE","E")
Does were not chosen products to the transfer
^W1DICT("NOQN2MOVE","H")
dxardl mihixt exgap `l 
^W1DICT("NORD","E")
No:
^W1DICT("NORD","H")
'qn
^W1DICT("NORECEIVER","E")
This not phone receiver !
^W1DICT("NORECEIVER","H")
! otlh `l df
^W1DICT("NOREST","E")
Restaurant number not defined
^W1DICT("NOREST","H")
xcbed `l dcrqn 'qn
^W1DICT("NORMAL","E")
Normal
^W1DICT("NORMAL","H")
libx
^W1DICT("NORMALDEP","E")
Class of a group
^W1DICT("NORMALDEP","H")
dveaw ly dwlgn
^W1DICT("NORMALPAYMENT","E")
Normal payment
^W1DICT("NORMALPAYMENT","H")
libx melyz
^W1DICT("NORMALPRICE","E")
Normal price
^W1DICT("NORMALPRICE","H")
libx xign
^W1DICT("NOSCR","E")
Not Hogdor code of screen
^W1DICT("NOSCR","H")
jqn cew xecbed `l
^W1DICT("NOSEND","E")
Do not send
^W1DICT("NOSEND","H")
xcyl `l
^W1DICT("NOSENDED","E")
No sended
^W1DICT("NOSENDED","H")
excey `l
^W1DICT("NOSENDED","R")
Ne poslany
^W1DICT("NOSHOWCUSTIMD","E")
No invoices are shown to the customer with immediate billing
^W1DICT("NOSHOWCUSTIMD","H")
iciin aeig mr gewll zeipeayg zbvd oi`
^W1DICT("NOSHOWDELZICORDS","E")
Do not display cancellations and credits
^W1DICT("NOSHOWDELZICORDS","H")
miiekife milehia bivdl `l
^W1DICT("NOSHOWDEPITLIST","E")
List of items without counting in a work plan
^W1DICT("NOSHOWDEPITLIST","H")
 dcear zipkeza dxitq `ll mihixt zniyx
^W1DICT("NOSHOWITCODES","E")
Without codes
^W1DICT("NOSHOWITCODES","H")
micew `ll
^W1DICT("NOSHOWPICTURES","E")
No pictures
^W1DICT("NOSHOWPICTURES","H")
zepenz `ll
^W1DICT("NOSHOWPRICES","E")
No prices
^W1DICT("NOSHOWPRICES","H")
mixign `ll
^W1DICT("NOSNIF","E")
Does was not keyed a number of subsidiary
^W1DICT("NOSNIF","H")
sipq 'qn clwed `l
^W1DICT("NOSUM","E")
Amount was not keyed
^W1DICT("NOSUM","H")
clwed `l mekq
^W1DICT("NOSUM2PAY","H")
melyzl mekq xcbed `l
^W1DICT("NOTAWCMNT","E")
Undo take
^W1DICT("NOTAWCMNT","H")
zgwl lha
^W1DICT("NOTBID","E")
This is not a price quote !
^W1DICT("NOTBID","H")
! xign zrvd `l df
^W1DICT("NOTCDBID","E")
Bid code not defined !
^W1DICT("NOTCDBID","H")
! "xign zrvd" cew xcbed `l
^W1DICT("NOTCHANGESAMELINE","E")
It's the same line !
^W1DICT("NOTCHANGESAMELINE","H")
! dxey eze` df
^W1DICT("NOTCHARGEDNOW","E")
Order totals are approximate ! We'll  contact You for payment clarification
^W1DICT("NOTDATE","E")
Date was not defined
^W1DICT("NOTDATE","H")
xcbed `l jix`z
^W1DICT("NOTDEFINED","E")
Not defined
^W1DICT("NOTDEFINED","H")
xcbed `l
^W1DICT("NOTDELETINGDELETEDORDER","E")
Canceled order should not be canceled
^W1DICT("NOTDELETINGDELETEDORDER","H")
dlheay dpnfd lhal oi`
^W1DICT("NOTDOCNMB","E")
A document with such a number does not exist in the system
^W1DICT("NOTDOCNMB","H")
zkxrna miiw `l dfk xtqn mr jnqn
^W1DICT("NOTENOUGHPOINTS","E")
Not enough points
^W1DICT("NOTENOUGHPOINTS","H")
zecewp witqn `l 
^W1DICT("NOTENTRANCENOTEXIT","E")
Is not an entrance and not departure
^W1DICT("NOTENTRANCENOTEXIT","H")
d`ivi `le dqipk `l
^W1DICT("NOTES","E")
Comments
^W1DICT("NOTES","H")
zexrd
^W1DICT("NOTFOUND","E")
No search results found.
^W1DICT("NOTFOUND","H")
yetig ze`vez e`vnp `l
^W1DICT("NOTINCLUDETIPS","E")
Do not display tips and service charges
^W1DICT("NOTINCLUDETIPS","H")
zexy ince mitih bivdl `l
^W1DICT("NOTITEMCODE","E")
Item code not typed
^W1DICT("NOTITEMCODE","H")
clwed `l hixt cew
^W1DICT("NOTMYOUT","E")
Incompatible answer to the position
^W1DICT("NOTMYOUT","H")
dcnrl dni`zn `l daeyz
^W1DICT("NOTOPENORDERS","E")
There are no open orders
^W1DICT("NOTOPENORDERS","H")
zegezt zepnfd oi`
^W1DICT("NOTORDER","E")
Order number not defined
^W1DICT("NOTORDER","H")
xcbed `l dpnfd 'qn
^W1DICT("NOTORDERFROM","E")
No order has been specified to transfer dishes
^W1DICT("NOTORDERFROM","H")
zepn xiardl dpnfd dfi`n xcbed `l
^W1DICT("NOTORDERSTOSHOW","E")
No orders to show
^W1DICT("NOTORDERSTOSHOW","H")
dbvdl zepnfd oi`
^W1DICT("NOTORDERTO","E")
No order has been specified for dishes transfer
^W1DICT("NOTORDERTO","H")
zepn xiardl dpnfd dfi`l xcbed `l
^W1DICT("NOTORDERWITHTHISCUSTNUMBER","E")
There is no open order with such customer number
^W1DICT("NOTORDERWITHTHISCUSTNUMBER","H")
dfk gewl xtqn mr dqetz dpnfd oi` 
^W1DICT("NOTOUT","E")
There is not an answer
^W1DICT("NOTOUT","H")
daeyz oi`
^W1DICT("NOTPICTURE","E")
No picture
^W1DICT("NOTPICTURE","H")
dpenz oi`
^W1DICT("NOTRID","H")
TRANSACTION ID xcbed `l
^W1DICT("NOTSALE","E")
Sale not set
^W1DICT("NOTSALE","H")
xcbed `l rvan
^W1DICT("NOTSALEDISCOUNT","E")
No discount percentage set for sale
^W1DICT("NOTSALEDISCOUNT","H")
rvanl dgpd feg` xcbed `l
^W1DICT("NOTSALEITEMCODE","E")
Sale item code not set
^W1DICT("NOTSALEITEMCODE","H")
xcbed `l rvanl hixt cew
^W1DICT("NOTSALEITEMNAME","E")
Sale item name not set
^W1DICT("NOTSALEITEMNAME","H")
rvanl hixt my xcbed `l
^W1DICT("NOTSUCCESSSENDSONLY","E")
Only unsuccessful transmissions are shown !
^W1DICT("NOTSUCCESSSENDSONLY","H")
! miglven `l mixeciy wx mibven
^W1DICT("NOTSUITLUNCH","E")
No proper meal
^W1DICT("NOTSUITLUNCH","H")
dni`zn dgex` oi`
^W1DICT("NOTTABLE","E")
Table does not exist
^W1DICT("NOTTABLE","H")
miiw `l ogley
^W1DICT("NOTTABLEFROM","E")
Not defined from which table to transfer dishes
^W1DICT("NOTTABLEFROM","H")
zepn xiardl ogley dfi`n xcbed `l
^W1DICT("NOTTABLETO","E")
No table has been set up to transfer dishes
^W1DICT("NOTTABLETO","H")
zepn xiardl ogley dfi`l xcbed `l
^W1DICT("NOTTODAY","E")
Date is not today
^W1DICT("NOTTODAY","H")
meid ly `l jix`z
^W1DICT("NOTTODAY","R")
Ne segody!a!6y!a!a data
^W1DICT("NOTTZ","E")
Interpellation was not defined
^W1DICT("NOTTZ","H")
n.r/.t.g./.f.z xcbed `l
^W1DICT("NOTUSERNUMBER","E")
No user number
^W1DICT("NOTUSERNUMBER","H")
ynzyn xtqn oi`
^W1DICT("NOTWAITERFROM","E")
No waiter specified in original order
^W1DICT("NOTWAITERFROM","H")
zixewn dpnfda xvln 'qn xcbed `l
^W1DICT("NOTWAITERTO","E")
Not specified from which waiter you need to transfer order
^W1DICT("NOTWAITERTO","H")
dpnfd xiardl xvln dfi`n xcbed `l
^W1DICT("NOTZ","E")
Does was not keyed tells ' identity
^W1DICT("NOTZ","H")
zedf 'z 'qn clwed `l
^W1DICT("NOVALIDCUSTOMERS","E")
Customers are not in use
^W1DICT("NOVALIDCUSTOMERS","H")
milirt `l zegewl
^W1DICT("NOVIDU","E")
Without confirmation
^W1DICT("NOVIDU","H")
`ecie `ll
^W1DICT("NOVLDADD","E")
Addons quantity incorrect
^W1DICT("NOVLDADD","H")
zetqez exgap `l
^W1DICT("NOVLDADD","R")
Neverno ukazano koli!4estvo dobavok
^W1DICT("NOVP","E")
Type of interpellation was not defined
^W1DICT("NOVP","H")
xcbed `l `zli`y beq
^W1DICT("NOVZ","E")
Interpellation was not defined
^W1DICT("NOVZ","H")
dxcbed `l `zli`y
^W1DICT("NOW!","E")
Now !
^W1DICT("NOW!","H")
! segc
^W1DICT("NOW!","R")
Sro!4no !
^W1DICT("NOWAITER","E")
This not a waiter
^W1DICT("NOWAITER","H")
! xvln `l df
^W1DICT("NOWHOCOUNT","E")
The counter's name is incorrect.
^W1DICT("NOWHOCOUNT","H")
oekp `l xteqd my
^W1DICT("NOZERO","E")
Must be different number off 0
^W1DICT("NOZERO","H")
0 -n dpey xtqn zeidl aiig
^W1DICT("NPP","E")
No.
^W1DICT("NPP","H")
'qn
^W1DICT("NUMBER","E")
Number
^W1DICT("NUMBER","H")
'qn
^W1DICT("NUMBER","R")
Nomer
^W1DICT("NUMBERADDSFREE","E")
Number of free add-ons
^W1DICT("NUMBERADDSFREE","H")
mpiga zetqez 'qn
^W1DICT("NUMBERISWRONG","E")
Wrong number
^W1DICT("NUMBERISWRONG","H")
ieby xtqn
^W1DICT("NUMBEROFDOC","E")
Doc.Number
^W1DICT("NUMBEROFDOC","H")
dcerz 'qn
^W1DICT("NUMBEROFDOC","R")
Nomer doc.
^W1DICT("NUMBEROFPAYMENTSTOOBIG","E")
Number of payments is too big
^W1DICT("NUMBEROFPAYMENTSTOOBIG","H")
icin lecb minelyz 'qn
^W1DICT("NUMBERONLY","E")
(number only)
^W1DICT("NUMBERONLY","H")
(cala xtqn)
^W1DICT("NUMBERONLY","R")
(tol!mko cifry)
^W1DICT("NUMBERONLY1","E")
(Numeric)
^W1DICT("NUMBERONLY1","H")
(zixtqn)
^W1DICT("NUMBERRESERVED","E")
Reserved number
^W1DICT("NUMBERRESERVED","H")
xeny xtqn
^W1DICT("NUMBERSORT","E")
Sort by group number
^W1DICT("NUMBERSORT","H")
dveaw xtqn itl oein
^W1DICT("NUMBERTOOSHORT","E")
Too short number
^W1DICT("NUMBERTOOSHORT","H")
icin xvw 'qn
^W1DICT("ODEF","E")
Change
^W1DICT("ODEF","H")
scer
^W1DICT("ODEF","R")
Sda!4a
^W1DICT("OFPDYON","E")
From redemption
^W1DICT("OFPDYON","H")
oeictn
^W1DICT("OK","E")
Operation completed successfully
^W1DICT("OK","H")
dglvda dnlyed dlert
^W1DICT("OLDMLYPRM","E")
Parameters for external inventory interface
^W1DICT("OLDMLYPRM","H")
ipevig i`ln wynnl mixhnxt
^W1DICT("OLDORDCOPY","E")
Copy from previous
^W1DICT("OLDORDCOPY","H")
zncew dpnfdn okez wzrd
^W1DICT("OLDORDCOPY","R")
Skopir-t!m predyd. zakaz
^W1DICT("OLDPASSWORD","E")
Old password
^W1DICT("OLDPASSWORD","H")
dpyi dnqiq
^W1DICT("OLDSHOW","E")
Display in table form
^W1DICT("OLDSHOW","H")
dlah zxeva dbvd
^W1DICT("ONECASHIERREPORT","E")
A single cashier report
^W1DICT("ONECASHIERREPORT","H")
ccea (z)i`tew g"ec
^W1DICT("ONECOURIERORDERSREPORT","E")
Single courier report by orders
^W1DICT("ONECOURIERORDERSREPORT","H")
zepnfd itl ccea gily g"ec
^W1DICT("ONECOURIERREPORT","E")
Report of alone courier
^W1DICT("ONECOURIERREPORT","H")
ccea gily g"ec
^W1DICT("ONEITEMONLY","E")
Only one item
^W1DICT("ONEITEMONLY","H")
cala cg` hixt
^W1DICT("ONEONESALE","E")
Sale 1 (or more) + 1
^W1DICT("ONEONESALE","H")
1 + (xzei e`) 1 rvan
^W1DICT("ONERECEIVERREPORT","E")
Receiver report
^W1DICT("ONERECEIVERREPORT","H")
lawnd g"ec
^W1DICT("ONESETITEMONLY","E")
Only one item from a set can be selected.
^W1DICT("ONESETITEMONLY","H")
hqn cg` hixt wx xegal ozip
^W1DICT("ONEUSETABLE","E")
Disposable items table
^W1DICT("ONEUSETABLE","H")
miinrt cg mihixt zlah
^W1DICT("ONEWAITERREPORT","E")
Report by  waiter
^W1DICT("ONEWAITERREPORT","H")
ccea xvln g"ec
^W1DICT("ONLY","E")
Only
^W1DICT("ONLY","H")
cala
^W1DICT("ONLY","R")
tol!mko
^W1DICT("ONOFFJET","E")
On/off jetty
^W1DICT("ONOFFJET","H")
sivx uega/jeza
^W1DICT("ONWARDFLIGHT","E")
Please write onward flight nbr for tt here:
^W1DICT("OPEN","E")
Open
^W1DICT("OPEN","H")
gzt
^W1DICT("OPENALL","E")
Open all
^W1DICT("OPENALL","H")
lekd gzt
^W1DICT("OPENALLOPTIONS","E")
Open all options
^W1DICT("OPENALLOPTIONS","H")
zeivte`d lk gzt
^W1DICT("OPENARCH","E")
Open from archive
^W1DICT("OPENARCH","H")
oeikx`n gzt
^W1DICT("OPENCREDITORDERSREPORT","E")
Report on credit orders for which did not come out invoice
^W1DICT("OPENCREDITORDERSREPORT","H")
zipeayg odl d`vi `ly dtwd zepnfd g"ec
^W1DICT("OPENDEL","E")
The screen of cancellations
^W1DICT("OPENDEL","H")
milehia bvd
^W1DICT("OPENDRAW","E")
Opening of drawer
^W1DICT("OPENDRAW","H")
dxibn zgizt
^W1DICT("OPENMAIL","E")
Open an email
^W1DICT("OPENMAIL","H")
liin gzt
^W1DICT("OPENORDERS","E")
Open orders
^W1DICT("OPENORDERS","H")
zegezt zepnfd
^W1DICT("OPENPRINTEDITEMS","E")
Whether to open items that have been printed to change ?
^W1DICT("OPENPRINTEDITEMS","H")
? ( gahnl aey exbeyi mihixtd lk ) iepiyl eqtcedy mihixt geztl m`d
^W1DICT("OPENVIEW","E")
Display with addons
^W1DICT("OPENVIEW","H")
zetqez hexit bvd
^W1DICT("OPERATORBUSINESSID","E")
ID of the payee
^W1DICT("OPERATORBUSINESSID","H")
melyz lawn ly .f.z
^W1DICT("OPERATORNAME","E")
Performer name
^W1DICT("OPERATORNAME","H")
rvand my
^W1DICT("OPERATORNAMEISWRONG","E")
The performer name is incorrect
^W1DICT("OPERATORNAMEISWRONG","H")
ieby rvand my
^W1DICT("OPRTRTZ","E")
ID of the payee
^W1DICT("OPRTRTZ","H")
melyz lawn ly .f.z
^W1DICT("OPTIONNOTVALID","E")
Option $1 is incorrect
^W1DICT("OPTIONNOTVALID","H")
dpekp `l $1 divte`
^W1DICT("OPTIONSFORYOU","E")
Service options
^W1DICT("OPTIONSFORYOU","H")
jzexiyl zeivte`
^W1DICT("OPTIONSFORYOU","R")
Servisnye funkcii
^W1DICT("ORDBECANCELLED","E")
Cancel all changes to the order ?
^W1DICT("ORDBECANCELLED","H")
? dpnfda miepiyd lk lhal
^W1DICT("ORDBELONG2DOC","E")
An order belongs to a certificate $1
^W1DICT("ORDBELONG2DOC","H")
$1 dcerzl zkiiy dpnfd
^W1DICT("ORDCNCBYBUYER","H")
dpew ici lr lhea melyz
^W1DICT("ORDCNCBYMERCH","H")
i`tew ici lr lhea melyz
^W1DICT("ORDCNCBYMRCH","H")
(z)i`tew ici lr dlhea dpnfd
^W1DICT("ORDDATE","E")
Order date
^W1DICT("ORDDATE","H")
dpnfd jix`z
^W1DICT("ORDER","E")
Order
^W1DICT("ORDER","H")
dpnfd
^W1DICT("ORDER","R")
Zakaz
^W1DICT("ORDER2SUPPLIER","E")
Purchase Order
^W1DICT("ORDER2SUPPLIER","H")
ykx zpnfd
^W1DICT("ORDER2SUPPLIERLIST","E")
List of orders to vendor
^W1DICT("ORDER2SUPPLIERLIST","H")
wtql zepnfd zniyx
^W1DICT("ORDERALREADYDELETED","E")
Order already was canceled
^W1DICT("ORDERALREADYDELETED","H")
dlhea xak dpnfd
^W1DICT("ORDERCONFIRMED","E")
Order confirmed
^W1DICT("ORDERCONFIRMED","H")
dxye` dpnfd
^W1DICT("ORDERCOPY","E")
Order Copy
^W1DICT("ORDERCOPY","H")
dpnfd wzrd
^W1DICT("ORDERDATE","E")
Order date is $1 after $2
^W1DICT("ORDERDELETEBY","E")
Cancelled by $1
^W1DICT("ORDERDELETEBY","H")
$1 ici lr lhea
^W1DICT("ORDERDELETED","E")
Order canceled
^W1DICT("ORDERDELETED","H")
dlhea dpnfd
^W1DICT("ORDERDELETEDANDRESTORED","E")
Order canceled and restored
^W1DICT("ORDERDELETEDANDRESTORED","H")
dxfgeye dlhea dpnfd
^W1DICT("ORDEREDTO","E")
Ordered to $1
^W1DICT("ORDEREDTO","H")
$1 -l onfed
^W1DICT("ORDEREDTOTIME","E")
Ordered for an hour
^W1DICT("ORDEREDTOTIME","H")
dryl onfed
^W1DICT("ORDERFAXED","E")
Order sended to fax
^W1DICT("ORDERFAXED","H")
qwta dxcey dpnfd
^W1DICT("ORDERHASOTHERITEMS","E")
An order already has items! A gift slip could be sold only on a separate order
^W1DICT("ORDERHASOTHERITEMS","H")
zcxtp dpnfda wx xeknl ezip dpzn yelz <BR> mihixt zllek xak dpnfd
^W1DICT("ORDERINPROCESS","E")
Order in process
^W1DICT("ORDERINPROCESS","H")
jildza dpnfd
^W1DICT("ORDERINPROCESS","R")
Zakaz v processe obrabotki
^W1DICT("ORDERINWAITING","E")
Order pending
^W1DICT("ORDERINWAITING","H")
dpznda dpnfd
^W1DICT("ORDERIT","E")
Order It
^W1DICT("ORDERIT","H")
onfd
^W1DICT("ORDERLIST","E")
Show orders list
^W1DICT("ORDERLIST","H")
zepnfd zniyx bvd
^W1DICT("ORDERLIST","R")
Pokazat!m spisok zakazov
^W1DICT("ORDERLIST4ITEM","E")
List of orders in which an item was sold
^W1DICT("ORDERLIST4ITEM","H")
hixt xknp mda zepnfd zniyx 
^W1DICT("ORDERLISTTOSEND","E")
List of orders to be send
^W1DICT("ORDERLISTTOSEND","H")
xebiyl zepnfd zniyx
^W1DICT("ORDERMGR","E")
Order manager
^W1DICT("ORDERMGR","H")
dpnfd i`xg`
^W1DICT("ORDERNOK","E")
Not sended
^W1DICT("ORDERNOK","H")
excey `l
^W1DICT("ORDERNOK","R")
Ne poslano
^W1DICT("ORDERNOTCLOSED","E")
Order not closed
^W1DICT("ORDERNOTCLOSED","H")
dxebq `l dpnfd
^W1DICT("ORDERNOTEXIST","E")
Nonexistent order
^W1DICT("ORDERNOTEXIST","H")
zniiw `l dpnfd
^W1DICT("ORDERNOTPRINTED","E")
Order was'nt printed
^W1DICT("ORDERNOTPRINTED","H")
dqtced `l dpnfd
^W1DICT("ORDERNOTTYPED","E")
Order $1 was not typed in the system! Are you sure ?
^W1DICT("ORDERNOTTYPED","H")
geha (d)z` ! zkxrna dclwed `l $1 dpnfd
^W1DICT("ORDERNUMBER","E")
Order #
^W1DICT("ORDERNUMBER","H")
dpnfd 'qn
^W1DICT("ORDERNUMBER","R")
!%N!% zakaza
^W1DICT("ORDERNUMBERISWRONG","E")
Number of order is incorrect
^W1DICT("ORDERNUMBERISWRONG","H")
ieby dpnfd 'qn
^W1DICT("ORDERNUMBERNOTDEFINED","E")
Order number not set
^W1DICT("ORDERNUMBERNOTDEFINED","H")
xcbed `l dpnfd 'qn
^W1DICT("ORDERPLACE","E")
Reservation
^W1DICT("ORDERPLACE","H")
mewn zpnfd
^W1DICT("ORDERPRINTED","E")
Order is sent to printing
^W1DICT("ORDERPRINTED","H")
dqtcdl dglyp dpnfd
^W1DICT("ORDERPROCESSPARAMETERS","E")
Parameters for the ordering process
^W1DICT("ORDERPROCESSPARAMETERS","H")
dpnfd jildzl mixhnxt
^W1DICT("ORDERQN","E")
Number of orders
^W1DICT("ORDERQN","H")
zepnfd xtqn
^W1DICT("ORDERQN","R")
Kol-vo zakazov
^W1DICT("ORDERRECEIVE","E")
Order accepted
^W1DICT("ORDERRECEIVE","H")
zepnfd zlaw
^W1DICT("ORDERRECEIVE","R")
Priem zakazov
^W1DICT("ORDERS","E")
Orders
^W1DICT("ORDERS","H")
zepnfd
^W1DICT("ORDERS4KTCPRINT","E")
Kitchen printing orders
^W1DICT("ORDERS4KTCPRINT","H")
gahna dqtcdl zepnfd
^W1DICT("ORDERSAVEERROR","E")
Error by guarding of order
^W1DICT("ORDERSAVEERROR","H")
dpnfd zxinya d`iby
^W1DICT("ORDERSDLV","E")
Delivery orders
^W1DICT("ORDERSDLV","H")
migelyn zepnfd
^W1DICT("ORDERSDLVTIME","E")
Total OTD Time
^W1DICT("ORDERSDLVTIME","H")
gewll dwtq` onf k"dq
^W1DICT("ORDERSENDED2BRANCH","E")
An order was sent to the branch $1 $2
^W1DICT("ORDERSENDED2BRANCH","H")
$2 $1 sipql dglyp dpnfd
^W1DICT("ORDERSENDED2RSD","H")
c.y.xl dxcey
^W1DICT("ORDERSINLOCAL","E")
Orders on the spot
^W1DICT("ORDERSINLOCAL","H")
mewna zepnfd
^W1DICT("ORDERSLIST","E")
Breakdown of orders
^W1DICT("ORDERSLIST","H")
$1 'qn $2 qn zipeaygl zepnfd hexit
^W1DICT("ORDERSLIST2DAY","E")
Order list for the date
^W1DICT("ORDERSLIST2DAY","H")
$1 jix`zl zepnfd zniyx
^W1DICT("ORDERSLIST2PERIOD","E")
Order list for the period from $1 to $2
^W1DICT("ORDERSLIST2PERIOD","H")
$2 cr $1 -n dtewzl zepnfd zniyx
^W1DICT("ORDERSMAKOR","E")
Source of orders
^W1DICT("ORDERSMAKOR","H")
zepnfd xewn
^W1DICT("ORDERSMUSTBECHOICED","E")
Must to choose orders
^W1DICT("ORDERSMUSTBECHOICED","H")
zepnfd xegal miaiig
^W1DICT("ORDERSNUMBER","E")
Total Orders
^W1DICT("ORDERSNUMBER","H")
zepnfd zenk
^W1DICT("ORDERSORT","E")
Sort by order number
^W1DICT("ORDERSORT","H")
dpnfd 'qn itl oiin
^W1DICT("ORDERSOURCE","E")
Order source
^W1DICT("ORDERSOURCE","H")
dpnfd xewn
^W1DICT("ORDERSRCV2DAY","E")
List of orders received on $1
^W1DICT("ORDERSRCV2DAY","H")
$1 jix`za elawzdy zepnfd zniyx
^W1DICT("ORDERSRCV2PERIOD","E")
List of orders received in the period from $1 to $2
^W1DICT("ORDERSRCV2PERIOD","H")
$2 cr $1 -n dtewza elawzdy zepnfd zniyx
^W1DICT("ORDERSRECEIVING","E")
Receiving orders
^W1DICT("ORDERSRECEIVING","H")
zepnfd zlaw
^W1DICT("ORDERSREPORT","E")
Periodic Orders Report
^W1DICT("ORDERSREPORT","H")
iztewz zepnfd g"ec
^W1DICT("ORDERSTATUS","E")
Order status
^W1DICT("ORDERSTATUS","H")
dpnfd avn
^W1DICT("ORDERSTATUS","R")
Status zakaza
^W1DICT("ORDERSTAW","E")
TAW orders
^W1DICT("ORDERSTAW","H")
TA zepnfd
^W1DICT("ORDERSUM","E")
Order Amount
^W1DICT("ORDERSUM","H")
dpnfd mekq
^W1DICT("ORDERTO","E")
Ordered to
^W1DICT("ORDERTO","H")
-l dpnfd
^W1DICT("ORDERTO","R")
Zakaz na
^W1DICT("ORDERTREATMENT","E")
Order treatments
^W1DICT("ORDERTREATMENT","H")
miletih zpnfd
^W1DICT("ORDERWAITTIME","E")
Waiting time for an order
^W1DICT("ORDERWAITTIME","H")
dpnfdl dpznd onf
^W1DICT("ORDHISTORY","E")
Order history
^W1DICT("ORDHISTORY","H")
zepnfd ly dixehqd
^W1DICT("ORDINALNUMBER","E")
Ordinal #
^W1DICT("ORDINALNUMBER","H")
ixeciq 'qn
^W1DICT("ORDINALNUMBER","R")
No.
^W1DICT("ORDISCORPERCENT","E")
Please note or discount in NIS or discount percent
^W1DICT("ORDISCORPERCENT","H")
mifeg` dgpd e` milwya dgpd e` oiivl yi
^W1DICT("ORDLIST","E")
Orders List
^W1DICT("ORDLIST","H")
zepnfd zniyx
^W1DICT("ORDNUMBERINVALID","E")
Order number incorrect
^W1DICT("ORDNUMBERINVALID","H")
ieby dpnfd 'qn
^W1DICT("ORDNUMBERINVALID","R")
Nomer zakaza ukazan neverno
^W1DICT("ORDPARTITIONCOLORDEFINITION","E")
Ord. part. def-n
^W1DICT("ORDPARTITIONCOLORDEFINITION","H")
dpnfd wlgl mirav zxcbd
^W1DICT("ORDPLACESUM","E")
Order amount on the spot
^W1DICT("ORDPLACESUM","H")
mewna zepnfd mekq
^W1DICT("ORDQN","E")
Number of orders
^W1DICT("ORDQN","H")
zepnfd 'qn
^W1DICT("ORDRCVDATE","E")
Date received order
^W1DICT("ORDRCVDATE","H")
dpnfd zlaw jix`z
^W1DICT("ORDSTATUS","E")
Order status
^W1DICT("ORDSTATUS","H")
dpnfd qehhq
^W1DICT("ORDWASSENDED","E")
An order has been sent
^W1DICT("ORDWASSENDED","H")
dpnfd dglyp
^W1DICT("ORGANIZATION","E")
Organization
^W1DICT("ORGANIZATION","H")
oebxi`
^W1DICT("ORIGDOCNUMBER","E")
Source document number
^W1DICT("ORIGDOCNUMBER","H")
xewn jnqn 'qn
^W1DICT("ORIGINAL","E")
Source
^W1DICT("ORIGINAL","H")
xewn
^W1DICT("ORIGINALTIME","E")
Date a production of source $1
^W1DICT("ORIGINALTIME","H")
$1 -a wted xewnd
^W1DICT("ORSETORGROUP","E")
Select or set or group
^W1DICT("ORSETORGROUP","H")
dveaw e` hq e` xegal yi
^W1DICT("OTDORDERSNUMBER","E")
OTD Orders Count
^W1DICT("OTDORDERSNUMBER","H")
onfa eribdy migelyn 'qn
^W1DICT("OTHERCAUSES","E")
Other reasons
^W1DICT("OTHERCAUSES","H")
zexg` zeaiq
^W1DICT("OTHERINVOICES","E")
Other invoices
^W1DICT("OTHERINVOICES","H")
zexg` zeipeayg
^W1DICT("OTHERPAYMENTS","E")
Other payments
^W1DICT("OTHERPAYMENTS","H")
mixg` minelyz
^W1DICT("OTHERREPORTS","E")
Other reports
^W1DICT("OTHERREPORTS","H")
mixg` zegec
^W1DICT("OTHERREPORTS","R")
Drugie ot!4ety
^W1DICT("OUR","E")
Cancellation on our account
^W1DICT("OUR","H")
eply oeayg lr lehia
^W1DICT("OURCLIENTS","E")
Our customers
^W1DICT("OURCLIENTS","H")
eply zegewl
^W1DICT("OURDEL","E")
Cancellation on our account
^W1DICT("OURDEL","H")
eply oeayg lr lehia
^W1DICT("OURHKADDRESS","E")
Our address : 20th Floor, Methodist House , 36 Hennessy Road, Wan Chai, Hong Kong
^W1DICT("OUT","E")
Came out
^W1DICT("OUT","H")
EXIT d`ivi
^W1DICT("OUT!","E")
Out
^W1DICT("OUT!","H")
`v
^W1DICT("OUTOFRANGE!","E")
Out of range
^W1DICT("OUTOFRANGE!","H")
! megzl uegn 
^W1DICT("OUTPUT","E")
Exit
^W1DICT("OUTPUT","H")
d`ivi
^W1DICT("OVER40TIME","E")
Percentage of orders delivered in over 40 minutes.
^W1DICT("OVER40TIME","H")
zewc 40 -n xzei dpznd mr zepnfd feg`
^W1DICT("OVER8MIN","E")
Over 8 minutes
^W1DICT("OVER8MIN","H")
zewc 8 lrn
^W1DICT("OVERMIN","E")
Over $1 min
^W1DICT("OVERMIN","H")
zewc $1 lrn
^W1DICT("OVPNIM","E")
Number of interior workers
^W1DICT("OVPNIM","H")
mipt icaer 'qn
^W1DICT("OVTFKAREP","E")
Employee Productivity Report from $1 to $2
^W1DICT("OVTFKAREP","H")
$2 cr $1 jix`zn micaer zwetz g"ec
^W1DICT("OVTFKREP","E")
Employee productivity report
^W1DICT("OVTFKREP","H")
micaer zwetz g"ec
^W1DICT("Order","E")
Order
^W1DICT("Order","H")
dpnfd
^W1DICT("Order","R")
Zakaz
^W1DICT("P1","E")
First payment
^W1DICT("P1","H")
oey`x melyz
^W1DICT("P1","R")
Pervy!i platej
^W1DICT("PAD","E")
How much was redeemed
^W1DICT("PAD","H")
dctp dnk
^W1DICT("PADDAT","E")
When redeemed
^W1DICT("PADDAT","H")
dctp izn
^W1DICT("PADONLY","E")
Cashed checks only
^W1DICT("PADONLY","H")
ectpy miwiy wx
^W1DICT("PAGE","E")
Page $1 $2
^W1DICT("PAGE","H")
$2 $1 sc
^W1DICT("PAGTOKEF","E")
Expired
^W1DICT("PAGTOKEF","H")
swez bt
^W1DICT("PAGTOKEF","R")
Srok istek
^W1DICT("PAID","E")
Paid
^W1DICT("PAID","H")
mley
^W1DICT("PAID","R")
Opla!4eno
^W1DICT("PAIDBEFORE","E")
Paid before
^W1DICT("PAIDBEFORE","H")
mcew mley
^W1DICT("PAIDBY","E")
Paid by
^W1DICT("PAIDBY","H")
-a mley
^W1DICT("PAIDCASH","E")
Paid by cash
^W1DICT("PAIDCASH","H")
onefna mley
^W1DICT("PAIDCASH","R")
Opla!4eno nali!4nymi
^W1DICT("PAIDCHECK","E")
Paid by check
^W1DICT("PAIDCHECK","H")
wiya mley
^W1DICT("PAIDCHECK","R")
Opla!4eno !4ekom
^W1DICT("PAIDCRCARD","E")
Paid by credit card
^W1DICT("PAIDCRCARD","H")
i`xy`a mley
^W1DICT("PAIDCRCARD","R")
Opla!4eno kreditno!i karto!4ko!i
^W1DICT("PAIDCREDIT","E")
Paid by credit
^W1DICT("PAIDCREDIT","H")
dtwd
^W1DICT("PAIDCREDIT","R")
Opla!4eno v kredit
^W1DICT("PAIDED","E")
Already paid
^W1DICT("PAIDED","H")
mley xak
^W1DICT("PAIDINPAYMENT","E")
Paid
^W1DICT("PAIDINPAYMENT","H")
melyza mley
^W1DICT("PAIDINRECEIPT","E")
Was paid previous
^W1DICT("PAIDINRECEIPT","H")
dlawa mley
^W1DICT("PAIDINSYSTEM","E")
Total Paid
^W1DICT("PAIDINVOICES","E")
Invoice(s) Cover
^W1DICT("PAIDINVOICES","H")
( zei- ) zipeayg ieqik
^W1DICT("PAIDORDER","E")
Order not paid
^W1DICT("PAIDORDER","H")
! dnley `l dpnfd
^W1DICT("PAIDOUT","E")
Paid in credit card outside the system
^W1DICT("PAIDOUT","H")
zkxrnl uega `"ka mley
^W1DICT("PAIDTOOMUCH","E")
Paid too much !
^W1DICT("PAIDTOOMUCH","H")
! icin xzei mley
^W1DICT("PAIL","E")
Active
^W1DICT("PAIL","H")
lirt
^W1DICT("PAINTDISTRICTFIRST","E")
Draw areas in the beginning !
^W1DICT("PAINTDISTRICTFIRST","H")
! dlgza mixef` xiiv
^W1DICT("PAPERCUT","E")
Cut of paper
^W1DICT("PAPERCUT","H")
xiip jezig
^W1DICT("PAPERFEED","E")
Advancement of paper
^W1DICT("PAPERFEED","H")
xiip meciw
^W1DICT("PARAMETERSNOTDEFINED","E")
Parameters not defined
^W1DICT("PARAMETERSNOTDEFINED","H")
excbed `l mixhnxt
^W1DICT("PARAMETERSRECEIVED","E")
Parameters successfully accepted
^W1DICT("PARAMETERSRECEIVED","H")
dglvda elawzd mixhnxt
^W1DICT("PARENTHESISNUMBERISWRONG","E")
Number of parentheses is odd
^W1DICT("PARENTHESISNUMBERISWRONG","H")
ibef `l miixbeq 'qn
^W1DICT("PARTDELETING","E")
Partial cancellation
^W1DICT("PARTDELETING","H")
iwlg lehia
^W1DICT("PARTNHZG","E")
Displays item movements
^W1DICT("PARTNHZG","H")
hixt ly zerepz zbvd
^W1DICT("PASSWORD","E")
Password
^W1DICT("PASSWORD","H")
dnqiq
^W1DICT("PASSWORD","R")
Parol!m
^W1DICT("PASSWORDMUSTBEFILLED","E")
Password field must be filled in
^W1DICT("PASSWORDMUSTBEFILLED","H")
dnqiq dcy `lnl yi
^W1DICT("PASSWORDSDEFINITION","E")
A definition of passwords
^W1DICT("PASSWORDSDEFINITION","H")
ze`nqiq zxcbd
^W1DICT("PAST!","E")
Past !
^W1DICT("PAST!","H")
! xar
^W1DICT("PASTDATE","E")
Date passed !
^W1DICT("PASTDATE","H")
! xar jix`z
^W1DICT("PAY","E")
Pay
^W1DICT("PAY","H")
mly
^W1DICT("PAY","R")
Platej
^W1DICT("PAY10BIS","E")
Pay at Ten Bits
^W1DICT("PAY10BIS","H")
qia oz-a mly
^W1DICT("PAY4CREDIT","E")
Pay at Credit
^W1DICT("PAY4CREDIT","H")
dtwd lr mly
^W1DICT("PAYANDSUBMIT","E")
Select a type  of payment and and confirm an order
^W1DICT("PAYANDSUBMIT","H")
df oelg xebq <BR> "xefg" ywn i/ugl <BR> dpnfd iepiyl <BR> dpnfd xy`le <BR> melyz beq xegal `p 
^W1DICT("PAYANDSUBMIT","R")
Vyberite vid plateja i kliknite klavi!6u "Podtv-t!m" . Esli klavi!6u ne vidno na !ekrane, prokrutite stranicu vniz
^W1DICT("PAYCASH","E")
Pay by cash
^W1DICT("PAYCASH","H")
onefna mly
^W1DICT("PAYCIBUS","E")
Pay at SODEXO
^W1DICT("PAYCIBUS","H")
SODEXO-a mly
^W1DICT("PAYCRCARD","E")
Pay by credit card
^W1DICT("PAYCRCARD","H")
i`xy` qihxka mly
^W1DICT("PAYDATE","E")
Paym. date
^W1DICT("PAYDATE","H")
melyz jix`z
^W1DICT("PAYDATE","R")
Data plateja
^W1DICT("PAYERNAME","E")
Customer name (payer)
^W1DICT("PAYERNAME","H")
( mlynd ) gewl my
^W1DICT("PAYERNMB","E")
Customer number
^W1DICT("PAYERNMB","H")
gewl 'qn
^W1DICT("PAYERTEL","E")
Customer Phone (Payer)
^W1DICT("PAYERTEL","H")
( mlynd ) gewl 'lh
^W1DICT("PAYMDIVIDE","E")
Payments Dividing
^W1DICT("PAYMDIVIDE","H")
minelyz levit
^W1DICT("PAYMENT","E")
Payment
^W1DICT("PAYMENT","H")
melyz
^W1DICT("PAYMENTALREADYDELETED","E")
Payment has already been canceled
^W1DICT("PAYMENTALREADYDELETED","H")
lhea xak melyz
^W1DICT("PAYMENTDAT","E")
Date of payment
^W1DICT("PAYMENTDAT","H")
melyz jix`z
^W1DICT("PAYMENTDATE","E")
Payment up to
^W1DICT("PAYMENTDATE","H")
cr melyzl
^W1DICT("PAYMENTDELETED","E")
Payment canceled
^W1DICT("PAYMENTDELETED","H")
lhea melyz
^W1DICT("PAYMENTDELETEDBYORDER","E")
Payment canceled  ! Cancel Order No. $1
^W1DICT("PAYMENTDELETEDBYORDER","H")
dbvdl ugl <BR> $2 dpnfda melyz oewiz <BR> $1 lehia zpnfd <BR> ! lhea melyz
^W1DICT("PAYMENTDELETINGERROR","E")
Error canceling payments ! Cancel order $ 1 has been left open
^W1DICT("PAYMENTDELETINGERROR","H")
dgezt dx`yp $1 lehia zpnfd <BR> minelyz lehiaa d`iby
^W1DICT("PAYMENTDETAILS","E")
Details of payment
^W1DICT("PAYMENTDETAILS","H")
melyz ihxt
^W1DICT("PAYMENTFROM","E")
Payment made from
^W1DICT("PAYMENTFROM","H")
-in rvea melyz
^W1DICT("PAYMENTGREATAMOUNT","E")
Total payments ($1) more than an invoice amount ($2)
^W1DICT("PAYMENTGREATAMOUNT","H")
( g"y $2 ) zipeayga mekqn xzei ( g"y $1 ) minelyz jq
^W1DICT("PAYMENTKIND","E")
Payment type
^W1DICT("PAYMENTKIND","H")
melyz beq
^W1DICT("PAYMENTLESSAMOUNT","E")
Total payments ($1) more than an invoice amount ($2)
^W1DICT("PAYMENTLESSAMOUNT","H")
( g"y $2 ) zipeayga mekqn zegt ( g"y $1 ) minelyz jq
^W1DICT("PAYMENTNOTEQCREDIT","E")
Payment amount differs from invoice amount
^W1DICT("PAYMENTNOTEQCREDIT","H")
zipeayga mekqn dpey melyz mekq
^W1DICT("PAYMENTNUMBER","E")
Payment No.
^W1DICT("PAYMENTNUMBER","H")
melyz 'qn
^W1DICT("PAYMENTS","E")
Payment
^W1DICT("PAYMENTS","H")
minelyz
^W1DICT("PAYMENTS2SUPPLIERS","E")
Payments to suppliers
^W1DICT("PAYMENTS2SUPPLIERS","H")
miwtql minelyz
^W1DICT("PAYMENTS2SUPPLIERSINADVANCE","E")
Payments to suppliers in advance
^W1DICT("PAYMENTS2SUPPLIERSINADVANCE","H")
y`xn miwtql minelyz
^W1DICT("PAYMENTSLIST","E")
Payments List
^W1DICT("PAYMENTSLIST","H")
minelyz zniyx
^W1DICT("PAYMENTSNUMBER","E")
Payments Number
^W1DICT("PAYMENTSNUMBER","H")
minelyz xtqn
^W1DICT("PAYMENTSNUMBERISWRONG","E")
Wrong number of payments
^W1DICT("PAYMENTSNUMBERISWRONG","H")
ieby minelyz 'qn
^W1DICT("PAYMENTSUM","E")
Payment amount
^W1DICT("PAYMENTSUM","H")
melyz mekq
^W1DICT("PAYMENTTOOBIG","E")
Payment too large
^W1DICT("PAYMENTTOOBIG","H")
icin lecb melyz
^W1DICT("PAYMINLOCAL","E")
Will be paid in place
^W1DICT("PAYMINLOCAL","H")
mewna mleyii
^W1DICT("PAYMPARAMETERS","E")
Parameters for calculating bills and payments
^W1DICT("PAYMPARAMETERS","H")
minelyze oeayg aeyigl mixhnxt
^W1DICT("PAYMSUMNOTEQ2ORDSUM","E")
Total payments $1 is not worth $2
^W1DICT("PAYMSUMNOTEQ2ORDSUM","H")
g"y $2 melyzl mekql deey `l g"y $1 minelyz jq
^W1DICT("PAYMTOTAL","E")
Concentration of payments
^W1DICT("PAYMTOTAL","H")
minelyz fekix
^W1DICT("PAYNOW","E")
Pay now
^W1DICT("PAYNOW","H")
eiykr mly
^W1DICT("PAYREPORT","E")
General Report by Types of Payment
^W1DICT("PAYREPORT","H")
melyz ibeq itl illk g"ec
^W1DICT("PAYSUMTOOBIG","E")
Too much to pay
^W1DICT("PAYSUMTOOBIG","H")
icin lecb melyzl mekq
^W1DICT("PAYTIME","E")
Payment time
^W1DICT("PAYTIME","H")
melyz onf
^W1DICT("PAYTIME","R")
Vrem!a plateja
^W1DICT("PC","E")
Permanent payment
^W1DICT("PC","H")
reaw melyz
^W1DICT("PC","R")
Post. platej
^W1DICT("PCBCODE","E")
Print stickers with a barcode
^W1DICT("PCBCODE","H")
cew xa mr zewacn qtcd
^W1DICT("PCBIGTM","E")
Print delivery document to report's printer
^W1DICT("PCBIGTM","H")
zeg"ec zqtcnl gelyn 'rz qtcd
^W1DICT("PCHBLAST","E")
Print a customer's last invoice
^W1DICT("PCHBLAST","H")
gewl ly  dpexg` zipeayg zqtcd
^W1DICT("PDFFILE","E")
PDF file
^W1DICT("PDFFILE","H")
PDF uaew
^W1DICT("PDYON","E")
Redemption
^W1DICT("PDYON","H")
oeict
^W1DICT("PELE","E")
Mobile phone
^W1DICT("PELE","H")
ciip
^W1DICT("PELE","R")
Mobil. tel.
^W1DICT("PELE1","E")
Phone 1
^W1DICT("PELE1","H")
g"ldpd ly lh
^W1DICT("PELE1","R")
Tel.1
^W1DICT("PELEWRONG","E")
Incorrect mobile phone number !
^W1DICT("PELEWRONG","H")
! ieby ciip oetlh ly xtqn
^W1DICT("PERAUTHDATE","E")
By date of approval
^W1DICT("PERAUTHDATE","H")
xeyi` jix`z itl
^W1DICT("PERCENT30","E")
Percentage of deliveries under 30 minutes
^W1DICT("PERCENT30","H")
zewc 30 zgzn zewtq` feg`
^W1DICT("PERDLVDATE","E")
By release date
^W1DICT("PERDLVDATE","H")
d`ved jix`z itl
^W1DICT("PERIOD","E")
Period
^W1DICT("PERIOD","H")
dtewz
^W1DICT("PERORDDAT","E")
[By date of receipt of order]
^W1DICT("PERORDDAT","H")
[ dpnfd zlaw jix`z itl ]
^W1DICT("PERPAYDAT","E")
[By date of payment]
^W1DICT("PERPAYDAT","H")
[ melyz jix`z itl ]
^W1DICT("PERPAYDATE","E")
By payment date
^W1DICT("PERPAYDATE","H")
melyz jix`z itl
^W1DICT("PERQN","E")
By Quantity
^W1DICT("PERQN","H")
zenk itl
^W1DICT("PERSNDDAT","E")
[by date of shippment]
^W1DICT("PERSNDDAT","H")
[ xebiy jix`z itl ]
^W1DICT("PERSONALAREA","E")
Personal area
^W1DICT("PERSONALAREA","H")
iyi` xef`
^W1DICT("PERSUM","E")
By Amount
^W1DICT("PERSUM","H")
mekq itl
^W1DICT("PGDN","E")
Page Down
^W1DICT("PGDN","H")
`ad sc
^W1DICT("PGDN","R")
Sled. stranica
^W1DICT("PGUP","E")
Page Up
^W1DICT("PGUP","H")
mcew sc
^W1DICT("PGUP","R")
Pred. stranica
^W1DICT("PHONE","E")
Phone #
^W1DICT("PHONE","H")
oetlh
^W1DICT("PHONE","R")
Tel.
^W1DICT("PHONEBOOK","E")
Phone book
^W1DICT("PHONEBOOK","H")
mipetlh xtq
^W1DICT("PHONEMUST","E")
Phone # must be filled
^W1DICT("PHONEMUST","H")
`lnl daeg oetlh xtqn
^W1DICT("PHONEMUST","R")
Nomer tel.
^W1DICT("PHONENUMBERINVALID","E")
Phone number incorrect
^W1DICT("PHONENUMBERINVALID","H")
ieby oetlh 'qn
^W1DICT("PHONENUMBERINVALID","R")
Nomer tel. ukazan neverno 
^W1DICT("PHONEOFMEMBER","E")
This number belong to member
^W1DICT("PHONEOFMEMBER","H")
meyx gewll jiiy df xtqn
^W1DICT("PHONEOFMEMBER","R")
Telefon zaregistrirovan na drugogo pol!mzovatel!a
^W1DICT("PHONES","E")
Phones
^W1DICT("PHONES","H")
mipetlh
^W1DICT("PICTURE","E")
Picture
^W1DICT("PICTURE","H")
dpenz
^W1DICT("PICTURE","R")
Kartinka
^W1DICT("PICTURES2MISHLOHIM","E")
Transmission images to "Deliveries"
^W1DICT("PICTURES2MISHLOHIM","H")
'migelyn'-l zepenz xeciy
^W1DICT("PICTURES4GROUPS","E")
Images for groups
^W1DICT("PICTURES4GROUPS","H")
mihixt zeveawl zepenz
^W1DICT("PICUL","E")
Split
^W1DICT("PICUL","H")
minelyz levit
^W1DICT("PINCODE","E")
Pin-code
^W1DICT("PINCODE","H")
cew-oit
^W1DICT("PIZUIM","E")
Compensation
^W1DICT("PIZUIM","H")
mievit
^W1DICT("PIZUIM!","E")
The customer deserves compensation !
^W1DICT("PIZUIM!","H")
! mievit ribn
^W1DICT("PIZUL","E")
Split
^W1DICT("PIZUL","H")
levit
^W1DICT("PIZULGROUPDEFINITION","E")
Setting up a group for split items
^W1DICT("PIZULGROUPDEFINITION","H")
levit ihixtl dveaw zxcbd
^W1DICT("PIZULOF","E")
Split of
^W1DICT("PIZULOF","H")
ly levit
^W1DICT("PIZZA","E")
Pizza
^W1DICT("PIZZA","H")
dvit
^W1DICT("PIZZA","R")
Picca
^W1DICT("PIZZAPRICE22","E")
Price for half a pizza
^W1DICT("PIZZAPRICE22","H")
dvit ivgl ztqez xign 
^W1DICT("PIZZAPRICE24","E")
Price extra for a quarter of a pizza
^W1DICT("PIZZAPRICE24","H")
dvit raxl ztqez xign 
^W1DICT("PLACEORDER","E")
Place reservation
^W1DICT("PLACEORDER","H")
mewn zepnfd
^W1DICT("PLUSMININVOICES","E")
Invoice Positions [+] - Standard Invoice; [-] - Refund Invoice
^W1DICT("PLUSMININVOICES","H")
xfgd zipeayg - [-] , dlibx zipeayg - [+] zipeayg zecnra
^W1DICT("PN","E")
# payments (except first)
^W1DICT("PN","H")
oey`x llek `l <BR> minelyz 'qn
^W1DICT("PN","R")
K-vo plateje!i (krome pervogo)
^W1DICT("PN1","E")
# payments
^W1DICT("PN1","H")
minelyz 'qn
^W1DICT("PN1","R")
K-vo plateje!i
^W1DICT("PODNOS","E")
On a tray
^W1DICT("PODNOS","H")
ybn lr
^W1DICT("POLYGONPAINTING","E")
Painting of areas
^W1DICT("POLYGONPAINTING","H")
mixef` xeiv
^W1DICT("POPITEND","E")
Enter a password 2
^W1DICT("POPITEND","H")
2 dnqiq ywd
^W1DICT("PORTNUMBER","E")
No. Port
^W1DICT("PORTNUMBER","H")
hxet 'qn
^W1DICT("POSATRTABLE","E")
POS - Site Table
^W1DICT("POSATRTABLE","H")
"xz` - dcnr" zlah
^W1DICT("POSBIOTABLE","E")
Table "Position - Biometric Device"
^W1DICT("POSBIOTABLE","H")
"ixhne`ia xiykn  - dcnr" dlah
^W1DICT("POSDEFINITION","E")
Defining POS positions
^W1DICT("POSDEFINITION","H")
dtew zecnr zxcbd
^W1DICT("POSEMVTABLE","E")
Table "POS - EMV"
^W1DICT("POSEMVTABLE","H")
" EMV - dncr " dlah
^W1DICT("POSGRTTABLE","E")
Table "
^W1DICT("POSGRTTABLE","H")
"ogley beq - dcnr" zlah
^W1DICT("POSITIONS","E")
Positions
^W1DICT("POSITIONS","H")
zecnr
^W1DICT("POSNAME","E")
Position description
^W1DICT("POSNAME","H")
dcnr xe`z
^W1DICT("POSNOTDEF4CSRCREATE","E")
Cash register position not defined. Set automatically?
^W1DICT("POSNOTDEF4CSRCREATE","H")
? ihnehe` xicbdl . zxcben `l dtew zcnr
^W1DICT("POSNUMBER","E")
POS
^W1DICT("POSNUMBER","H")
dcnr
^W1DICT("POSNUMBER","R")
Kassa
^W1DICT("POSNUMBERNOTDEFINED","E")
Position number not defined
^W1DICT("POSNUMBERNOTDEFINED","H")
xcbed `l dcnr 'qn
^W1DICT("POSPRN","E")
Printer to POS $1
^W1DICT("POSPRN","H")
$1 dcnrl zqtcn
^W1DICT("POSREPORT","E")
Report by POS
^W1DICT("POSREPORT","H")
dcnr g"ec
^W1DICT("POSTADDRESS","E")
Address to send mail
^W1DICT("POSTADDRESS","H")
x`ec zgilyl zaezk
^W1DICT("POSULMTABLE","E")
Table "POS - kind of table"
^W1DICT("POSULMTABLE","H")
"mle` - dcnr" dlah
^W1DICT("PRAON","E")
Payoff
^W1DICT("PRAON","H")
oerxtl
^W1DICT("PRAONREPORT","E")
Deploying checks report
^W1DICT("PRAONREPORT","H")
miwiy zqixt g"ec
^W1DICT("PRCCSR","E")
CSR Price
^W1DICT("PRCCSR","H")
dtew xign
^W1DICT("PRCOFR","H")
df oelg xebq <BR> mcwda jil` xefgi epcxyn <BR> ! dpnfd `l ! <BR> ! cala xign zrvd z`f ! <BR> ! ycg zexiy !
^W1DICT("PRCOFRLIST","E")
Bids List
^W1DICT("PRCOFRLIST","H")
xign zervd zniyx
^W1DICT("PRCOFRNMB","E")
Bid No.
^W1DICT("PRCOFRNMB","H")
'qn xign zrvd
^W1DICT("PREPIN","E")
Entry time for preparation
^W1DICT("PREPIN","H")
dpkdl dqipk onf
^W1DICT("PREPPRINT","E")
Prepare to print
^W1DICT("PREPPRINT","H")
dqtcdl okd
^W1DICT("PREPTIME","E")
Preparation time
^W1DICT("PREPTIME","H")
dpkd onf
^W1DICT("PREPTIMEREPORT","E")
Delivery preparation time report
^W1DICT("PREPTIMEREPORT","H")
migelyn zpkd ipnf g"ec
^W1DICT("PRESENTWATCH","E")
Clock of presence
^W1DICT("PRESENTWATCH","H")
zegkep oery
^W1DICT("PRESENTWORKERSREPORT","E")
List of present employees
^W1DICT("PRESENTWORKERSREPORT","H")
migkep micaer zniyx
^W1DICT("PRESS2BACKNORMAL","E")
Click to return to normal view
^W1DICT("PRESS2BACKNORMAL","H")
dlibx dbvdl dxfgl ugl
^W1DICT("PRESS2CHANGEORDER","E")
Click here to change the order of unprinted lines
^W1DICT("PRESS2CHANGEORDER","H")
zeqtcen `l zexey xcq iepiyl dt ugl
^W1DICT("PRESS2COMMENT2KITCHEN","E")
To add preparatory notes, click on the "Update" icon.
^W1DICT("PRESS2COMMENT2KITCHEN","H")
"okcr" oewii` lr uegll yi dpkd zexrd ztqedl
^W1DICT("PRESS4BSLCARD","E")
Click to receive a Business Logic card
^W1DICT("PRESS4BSLCARD","H")
"wi'bel qpfia" ly qihxk zhilwl ugl
^W1DICT("PRESS4LKMCARD","E")
Click to receive a customer club card
^W1DICT("PRESS4LKMCARD","H")
zegewl oecren ly qihxk zhilwl ugl
^W1DICT("PRESSENTER4TLMLST","E")
Clicking the 'Confirm' button without a slip number displays a list of slips.
^W1DICT("PRESSENTER4TLMLST","H")
miyelz zniyx dbivn yelz 'qn `ll 'xy`' ywn lr dvigl
^W1DICT("PRESSLINE2MOVEBEFORE","E")
Click on a row to move a line marked before it
^W1DICT("PRESSLINE2MOVEBEFORE","H")
dlibx dbvdl xefgl ick df ywn lr ugl e` <BR> ( dxrd `le ztqez `l , zqtcen `l) <BR> diptl zpneqn dxey zxardl dxey lr ugl
^W1DICT("PRESSONFIELDFORDETAILS","E")
Click on field for details
^W1DICT("PRESSONFIELDFORDETAILS","H")
hexitl dcyd lr ugl
^W1DICT("PRESSONITEMCMTN","E")
To update a comment press on product name, please
^W1DICT("PRESSONITEMCMTN","H")
hixt ly dxey lr ugl dxrd oewizl
^W1DICT("PRESSONITEMCMTN","R")
!04toby ispravit!m prime!4anie najmite na naimenovanie porcii
^W1DICT("PRESSONITEMNAME","E")
To choice product click on product name, please
^W1DICT("PRESSONITEMNAME","H")
hixt my wilwdl `p dpnfdl hixt ztqedl
^W1DICT("PRESSONITEMNAME","R")
!04toby vybrat!m bl!udo kliknete naimenovanie porcii^W1DICT("PRESSONITEMNAME","R")=!04toby vybrat!m bl!udo kliknete naimenovanie porcii
^W1DICT("PRESSUPDATE","E")
For Change Settings Press the Update button
^W1DICT("PRESSUPDATE","H")
"okcr" ywn ugl zexcbd iepiyl
^W1DICT("PREVIOUSZINPROGRESS","E")
Previous Z Report still in action !
^W1DICT("PREVIOUSZINPROGRESS","H")
xnbp `l oiicr mcew Z g"ec
^W1DICT("PREVORDER","E")
Previous Order
^W1DICT("PREVORDER","H")
zncew dpnfd
^W1DICT("PREVPAY","E")
Previous payment
^W1DICT("PREVPAY","H")
mcew melyz
^W1DICT("PREVPAYMDETAILS","E")
Breakdown of previous payments
^W1DICT("PREVPAYMDETAILS","H")
mincew minelyz hexit
^W1DICT("PRICE","E")
Price
^W1DICT("PRICE","H")
xign
^W1DICT("PRICE","R")
Cena
^W1DICT("PRICE2ONE","E")
Price to $1
^W1DICT("PRICE2ONE","H")
$1 -l xign
^W1DICT("PRICE2ONEDISH","E")
Price for one dish
^W1DICT("PRICE2ONEDISH","H")
zg` dpnl xign
^W1DICT("PRICEAFTERDISCOUNT","E")
Price after discount
^W1DICT("PRICEAFTERDISCOUNT","H")
dgpd ixg` xign
^W1DICT("PRICECNC","E")
Total cancel delivery fee is $1
^W1DICT("PRICECNC","H")
g"y $1 `ed gelyn inc lhan mekq
^W1DICT("PRICECNC","R")
Dostavka bespl. pri summe $1 rub
^W1DICT("PRICEDLV","E")
Shipping price
^W1DICT("PRICEDLV","H")
gelynl xign
^W1DICT("PRICEINCLUDEDTAX","E")
Price including VAT
^W1DICT("PRICEINCLUDEDTAX","H")
n"rn llek xign
^W1DICT("PRICELIST","E")
Bid
^W1DICT("PRICELIST","H")
xign zrvd
^W1DICT("PRICELISTFAXED","E")
A quotation was transmitted by fax
^W1DICT("PRICELISTFAXED","H")
qwta dxcey xign zrvd
^W1DICT("PRICELISTNUMBER","E")
Price list number
^W1DICT("PRICELISTNUMBER","H")
oexign xtqn
^W1DICT("PRICELISTPRICE","E")
Price of price list
^W1DICT("PRICELISTPRICE","H")
oexign xign
^W1DICT("PRICELISTS","E")
Prices list
^W1DICT("PRICELISTS","H")
mipexign
^W1DICT("PRICELISTSHISTORY","E")
Price History of Item $1
^W1DICT("PRICELISTSHISTORY","H")
'$1' hixt ly mipexign dixehqd
^W1DICT("PRICEMIN","E")
Minimum order value is $1 $2
^W1DICT("PRICEMIN","H")
$2 $1 `ed dpnfd menipin
^W1DICT("PRICEMIN","R")
Min.summa zakaza $1 $2
^W1DICT("PRICEMINIMUM","E")
Price minimum
^W1DICT("PRICEMINIMUM","H")
menipin xign
^W1DICT("PRICENOTINCLUDEDTAX","E")
Price not including VAT
^W1DICT("PRICENOTINCLUDEDTAX","H")
n"rn llek `l xign
^W1DICT("PRICEOFFER","E")
Bid
^W1DICT("PRICEOFFER","H")
xign zrvd
^W1DICT("PRICEOFFERS","E")
Bids
^W1DICT("PRICEOFFERS","H")
xign zervd
^W1DICT("PRICEOFFERSLIST","E")
Bid List $1 $2
^W1DICT("PRICEOFFERSLIST","H")
$2 $1 xign zervd zniyx
^W1DICT("PRICEOFFERSUBMIT","E")
It's price offer only - not to payment . Click "Submit" button in bottom page. If You don't see button, scroll page down
^W1DICT("PRICEOFFERSUBMIT","H")
df oelg xebq <BR> mihxtd z` wiicl jil` xefgp ep` <BR> melyzl `l - cala xign zrvd z`f  
^W1DICT("PRICEOFFERSUBMIT","R")
Eto tol!mko predlojenie ceny . Podtverdite ego ili vernites!m na korrektirovku zakaza
^W1DICT("PRICESLISTDATE","E")
Price List Date
^W1DICT("PRICESLISTDATE","H")
oexign jix`z
^W1DICT("PRICESWITHOUTTAX","E")
Prices do not include VAT
^W1DICT("PRICESWITHOUTTAX","H")
n"rn millek `l mixign
^W1DICT("PRICESWITHTAX","E")
Prices include VAT
^W1DICT("PRICESWITHTAX","H")
n"rn millek mixign
^W1DICT("PRICETAW","E")
Price "to take"
^W1DICT("PRICETAW","H")
"zgwl" xign
^W1DICT("PRINT","E")
Print
^W1DICT("PRINT","H")
qtcd
^W1DICT("PRINT","R")
Raspe!4atat!m
^W1DICT("PRINT2BIG","E")
Print  to big printer
^W1DICT("PRINT2BIG","H")
zeg"ec zqtcnl qtcd
^W1DICT("PRINT2BOOKKEEPING","E")
Print for bookkeeping
^W1DICT("PRINT2BOOKKEEPING","H")
zepeayg zldpdl qtcd
^W1DICT("PRINT2DEPOSIT","E")
Print to deposit
^W1DICT("PRINT2DEPOSIT","H")
dcwtdl qtcd
^W1DICT("PRINT2DISPAGAIN?","E")
Print a document to send again - 1, cancel printing mark - 2, return - 0
^W1DICT("PRINT2DISPAGAIN?","H")
0 - xefgl , 2 - dqtcd oeniq lhal , 1 - aey glynl jnqn qitcdl
^W1DICT("PRINT2DISPATCHER","E")
Print for dispatcher
^W1DICT("PRINT2DISPATCHER","H")
glynl qtcd
^W1DICT("PRINT2DISPATHER?","E")
Should print a document for shipment ?
^W1DICT("PRINT2DISPATHER?","H")
? glynl jnqn qitcdl m`d
^W1DICT("PRINT2KITCHEN","E")
Do print bon for the kitchen ?
^W1DICT("PRINT2KITCHEN","H")
? gahnl oea qitcdl m`d
^W1DICT("PRINT2SMALL","E")
Print to a narrow printer
^W1DICT("PRINT2SMALL","H")
dxv zqtcnl qtcd
^W1DICT("PRINTACCOUNT","E")
Print a Bill
^W1DICT("PRINTACCOUNT","H")
oeayg qtcd
^W1DICT("PRINTACCOUNT","R")
Raspe!4atat!m s!4et
^W1DICT("PRINTALLKOTMDB","E")
Print per each order stickers to the trunk
^W1DICT("PRINTALLKOTMDB","H")
fbx`l zewacn dpnfd lkl qtcd
^W1DICT("PRINTALLORDER","E")
Print the entire order
^W1DICT("PRINTALLORDER","H")
dpnfdd lk qtcd
^W1DICT("PRINTALLORDS","E")
Print all orders for tomorrow
^W1DICT("PRINTALLORDS","H")
xgnl zepnfdd lk qtcd
^W1DICT("PRINTALLORDSMDB","E")
Print all orders for tomorrow with stickers
^W1DICT("PRINTALLORDSMDB","H")
zewacn mr xgnl zepnfdd lk qtcd
^W1DICT("PRINTALLORDSNOMDB","E")
Print all orders for tomorrow without stickers
^W1DICT("PRINTALLORDSNOMDB","H")
zewacn `ll xgnl zepnfdd lk qtcd
^W1DICT("PRINTBILL","E")
Print Bill
^W1DICT("PRINTBILL","H")
oeayg qtcd
^W1DICT("PRINTBILLCOPY","E")
Print Bill Copy
^W1DICT("PRINTBILLCOPY","H")
oeayg wzrd qtcd
^W1DICT("PRINTBILLCOPYCONC","E")
Print a centralized bill copy
^W1DICT("PRINTBILLCOPYCONC","H")
fkexn oeayg wzrd qtcd
^W1DICT("PRINTBILLCOPYDET","E")
Print Detailed Bill Copy
^W1DICT("PRINTBILLCOPYDET","H")
hxetn oeayg wzrd qtcd
^W1DICT("PRINTCARD?","E")
Print transaction ?
^W1DICT("PRINTCARD?","H")
drepz qitcdl ?
^W1DICT("PRINTCHECKS?","E")
Print checks?
^W1DICT("PRINTCHECKS?","H")
? miwiy qitcdl
^W1DICT("PRINTCHK","E")
Print checks
^W1DICT("PRINTCHK","H")
miwiy qtcd
^W1DICT("PRINTCOPY2DISPATCHER","E")
Print Copy a document to the sender
^W1DICT("PRINTCOPY2DISPATCHER","H")
glynl jnqn wzrd qtcd
^W1DICT("PRINTCSR","E")
Print to POS Printer
^W1DICT("PRINTCSR","H")
dtew zqtcnl qtcd
^W1DICT("PRINTCSRORBIG","E")
Print to Wide Printer - 1; POS Printer - 2
^W1DICT("PRINTCSRORBIG","H")
2 - dtew zqtcnl , 1 - dagx zqtcnl qtcd
^W1DICT("PRINTDLVDOC","E")
Print a delivery note
^W1DICT("PRINTDLVDOC","H")
gelyn zcerz qtcd
^W1DICT("PRINTDLVDOCCOPY","E")
Print Copy Shipping Document
^W1DICT("PRINTDLVDOCCOPY","H")
gelyn zcerz wzrd qtcd
^W1DICT("PRINTDLVDOCWITHOUTPRICE","E")
Print delivery note without prices
^W1DICT("PRINTDLVDOCWITHOUTPRICE","H")
mixign `ll gelyn zcerz qtcd
^W1DICT("PRINTDOCS","E")
Printing documents
^W1DICT("PRINTDOCS","H")
miknqn zqtcd
^W1DICT("PRINTED","E")
Printed
^W1DICT("PRINTED","H")
qtced
^W1DICT("PRINTER","E")
Printer
^W1DICT("PRINTER","H")
zqtcn
^W1DICT("PRINTERCONDITIONSIGNES1","E")
Formula: Condition: Printer Number; Condition: Printer No. & ... & Printer Numbe
^W1DICT("PRINTERCONDITIONSIGNES1","H")
zqtcn 'qn&...&zqtcn 'qn:i`pz;zqtcn 'qn:i`pz : dgqep
^W1DICT("PRINTERCONDITIONSIGNES2","E")
Condition: Position No. or  Condition marks
^W1DICT("PRINTERCONDITIONSIGNES2","H")
i`pz ipnpiq e` dcnr 'qn : i`pz
^W1DICT("PRINTERCONDITIONSIGNES3","E")
Hall - U; Table Type - S; Table No. - T; TAW Restaurant - TAW
^W1DICT("PRINTERCONDITIONSIGNES3","H")
M - migelyn, TAWM - migelyn TAW zepgley lk, TAW - dcrqn TAW zepgley lk, T - ogley 'qn, S - ogley beq, U - mle` 'qn : i`pz ipniq
^W1DICT("PRINTERCONFIGURATIONS","E")
Configuration of building printers
^W1DICT("PRINTERCONFIGURATIONS","H")
mipea zeqtcn ly divxebitpew
^W1DICT("PRINTERNAME","E")
Printer Description
^W1DICT("PRINTERNAME","H")
zqtcn xe`z
^W1DICT("PRINTERNOTDEFINED","E")
The printer has not been set to this POS
^W1DICT("PRINTERNOTDEFINED","H")
z`f dcnrl dxcbed `l zqtcn
^W1DICT("PRINTERNUMBER","E")
Printer number
^W1DICT("PRINTERNUMBER","H")
zqtcn xtqn
^W1DICT("PRINTERROR","E")
Print failed
^W1DICT("PRINTERROR","H")
dlykp dqtcd
^W1DICT("PRINTERS","E")
Printers
^W1DICT("PRINTERS","H")
zeqtcn
^W1DICT("PRINTERSTEST","E")
Printers check
^W1DICT("PRINTERSTEST","H")
zeqtcn zwica
^W1DICT("PRINTINORGANDCOPY","E")
Print in source and copy
^W1DICT("PRINTINORGANDCOPY","H")
wzrdae xewna qtcd
^W1DICT("PRINTINORGONLY","E")
Only in the original
^W1DICT("PRINTINORGONLY","H")
xewna wx
^W1DICT("PRINTINVOICECOPY","E")
Print the invoice copy
^W1DICT("PRINTINVOICECOPY","H")
zipeayg wzrd qtcd
^W1DICT("PRINTINVOICECOPY","R")
Raspe!4atat!m kopi!u s!4eta
^W1DICT("PRINTINVOICEDETAILCOPY","E")
Print copy with details
^W1DICT("PRINTINVOICEDETAILCOPY","H")
hexit mr wzrd qtcd
^W1DICT("PRINTINVOICENOTDETAILCOPY","E")
Print copy without details
^W1DICT("PRINTINVOICENOTDETAILCOPY","H")
hexit `ll wzrd qtcd
^W1DICT("PRINTINVOICES4CUST","E")
Print all invoices to customers by name
^W1DICT("PRINTINVOICES4CUST","H")
zeny itl zegewll zeipeaygd lk qtcd
^W1DICT("PRINTINVOICESCOPY","E")
Printing copies of invoices
^W1DICT("PRINTINVOICESCOPY","H")
zeipeayg ly miwzrd zqtcd
^W1DICT("PRINTITRA","E")
Print Balance to POS Printer
^W1DICT("PRINTITRA","H")
dtew zqtcnl dxzi qtcd
^W1DICT("PRINTLASTPARTORDER","E")
Print copy of last order slip
^W1DICT("PRINTLASTPARTORDER","H")
dpnfd ly oexg` oea qtcd
^W1DICT("PRINTMDBKOT","E")
Printing labels for box
^W1DICT("PRINTMDBKOT","H")
fbx`l zewacn zqtcd
^W1DICT("PRINTMDBNOORDER","E")
Print stickers only
^W1DICT("PRINTMDBNOORDER","H")
dpnfd `ll zewacn qtcd
^W1DICT("PRINTMOVINGITEMS?","E")
Print moved items in the kitchen ?
^W1DICT("PRINTMOVINGITEMS?","H")
? gahna mihixt zxard qitcdl
^W1DICT("PRINTMSG","E")
Print the reference
^W1DICT("PRINTMSG","H")
z`f drced qtcd
^W1DICT("PRINTMSG","R")
Raspe!4atat!m 
^W1DICT("PRINTOK","E")
Document sent for printing
^W1DICT("PRINTOK","H")
dqtcdl glyp jnqn
^W1DICT("PRINTORD","E")
Print the order
^W1DICT("PRINTORD","H")
dpnfd qitcdl
^W1DICT("PRINTORD","R")
Raspe!4atat!m zakaz
^W1DICT("PRINTORDERCOPY","E")
Print a copy of order
^W1DICT("PRINTORDERCOPY","H")
dpnfd wzrd qtcd
^W1DICT("PRINTORDERCOPYMDB","E")
Print order copy with stickers
^W1DICT("PRINTORDERCOPYMDB","H")
zewacn mr dpnfd wzrd qtcd
^W1DICT("PRINTORDERCOPYNOMDB","E")
Print order copy without stickers
^W1DICT("PRINTORDERCOPYNOMDB","H")
zewacn ila dpnfd wzrd qtcd
^W1DICT("PRINTORDERLIST","E")
Print an orders list
^W1DICT("PRINTORDERLIST","H")
zepnfd zniyx qitcdl
^W1DICT("PRINTORDERLIST","R")
Raspe!4atat!m spisok zakazov
^W1DICT("PRINTORDERSCONTENT","E")
Print orders content
^W1DICT("PRINTORDERSCONTENT","H")
zepnfd okez qitcdl
^W1DICT("PRINTPARAMETERSDEFINITION","E")
Printing Definitions
^W1DICT("PRINTPARAMETERSDEFINITION","H")
dqtcdl mixhnxt
^W1DICT("PRINTSHORT","E")
Print in a short form
^W1DICT("PRINTSHORT","H")
zxvewn dxeva qtcd / bvd
^W1DICT("PRINTSHOWTABLE","E")
Show/display table
^W1DICT("PRINTSHOWTABLE","H")
dlah qtcd / bvd
^W1DICT("PRINTSTATUS","E")
Print Status to POS Printer
^W1DICT("PRINTSTATUS","H")
dtew zqtcnl qehhq qtcd
^W1DICT("PRINTTIME","H")
dqtcd onf
^W1DICT("PRINTWHERE","E")
Which printer to print ?
^W1DICT("PRINTWHERE","H")
? qitcdl zqtcn dfi`l
^W1DICT("PRINTWITHOUTDETAILS","E")
Print without detail
^W1DICT("PRINTWITHOUTDETAILS","H")
hexit `ll qtcd
^W1DICT("PRINTWITHOUTPRICE","E")
Print without prices
^W1DICT("PRINTWITHOUTPRICE","H")
mixign `ll qtcd
^W1DICT("PRIVATE","H")
ihxt
^W1DICT("PRIVATEINF","E")
Internal information
^W1DICT("PRIVATEINF","H")
inipt rcin
^W1DICT("PRIZECODE","E")
Gift code
^W1DICT("PRIZECODE","H")
dpzn cew
^W1DICT("PRIZENAME","E")
Gift description
^W1DICT("PRIZENAME","H")
dpzn xe`z
^W1DICT("PRMPZMPARAMETERS","E")
Item code for compensation
^W1DICT("PRMPZMPARAMETERS","H")
miievitl hixt cew
^W1DICT("PRMWRONG","E")
Invalid parameters
^W1DICT("PRMWRONG","H")
mieby mixhnxt
^W1DICT("PRODUCT","E")
Product
^W1DICT("PRODUCT","H")
xven
^W1DICT("PRODUCTADDS","E")
Product - adds
^W1DICT("PRODUCTADDS","H")
zetqez - hixt
^W1DICT("PRODUCTADDSGROUP","E")
Product - Group of Adds
^W1DICT("PRODUCTADDSGROUP","H")
zetqez zveaw - hixt
^W1DICT("PRODUCTCOMMENTS","E")
Product - Comments
^W1DICT("PRODUCTCOMMENTS","H")
zexrd - hixt
^W1DICT("PRODUCTMULTICHOICEADDS","E")
Product with multi-choice adds
^W1DICT("PRODUCTMULTICHOICEADDS","H")
dxixa ax zetqez - hixt
^W1DICT("PRODUCTTREE","E")
Product tree
^W1DICT("PRODUCTTREE","H")
xven ur
^W1DICT("PROFIT","E")
Profit
^W1DICT("PROFIT","H")
geex
^W1DICT("PROFITANDRATEREPORT","E")
Income and expenses report
^W1DICT("PROFITANDRATEREPORT","H")
ze`vede zeqpkd g"ec
^W1DICT("PROFITKIND","E")
Type of income
^W1DICT("PROFITKIND","H")
dqpkd beq
^W1DICT("PROFITPERCENT","E")
% Profit
^W1DICT("PROFITPERCENT","H")
geex %
^W1DICT("PROFITPERCENTTABLE","E")
Profit percentage table
^W1DICT("PROFITPERCENTTABLE","H")
geex ifeg` zlah
^W1DICT("PROFITSUM","E")
Income Amount
^W1DICT("PROFITSUM","H")
dqpkd mekq
^W1DICT("PROGRAMMERROR","E")
Error in the software
^W1DICT("PROGRAMMERROR","H")
dpkeza d`iby
^W1DICT("PROTECTIONITEMS","E")
List of items that are protected by password
^W1DICT("PROTECTIONITEMS","H")
`nqiqa mipbeny mihixt zniyx
^W1DICT("PROTIBON","E")
Order transmission protocol for IBON
^W1DICT("PROTIBON","H")
IBON - l zepnfd ixeciy lewehext
^W1DICT("PRTSFREPORT","E")
Item and Add-On Sales Report
^W1DICT("PRTSFREPORT","H")
zetqeze mihixt zxikn g"ec
^W1DICT("PSWCOUP","E")
To external slip
^W1DICT("PSWCOUP","H")
ipevig yelzl
^W1DICT("PSWDELPY","E")
Type password 2
^W1DICT("PSWDELPY","H")
2 dnqiq clwd
^W1DICT("PSWINVALID","E")
Password typed incorrect
^W1DICT("PSWINVALID","H")
dnqiqa  d`iby
^W1DICT("PSWINVALID","R")
Parol!m neveren !
^W1DICT("PSWLEVELWRONG","E")
Wrong rank
^W1DICT("PSWLEVELWRONG","H")
dni`zn `l dbxc
^W1DICT("PSWLOST","E")
Sorry, please  again
^W1DICT("PSWLOST","H")
dgilq jnr . aey myxdl jxev yi zxya dlwz awr
^W1DICT("PSWLOST","R")
Iz-za tehni!4esko!i neispravnosti Vam sleduet zaregistrirovat!ms!a snova. Prinosim svoi izvineni!a
^W1DICT("PSWMIN","E")
Length of password is $1 digits minimum
^W1DICT("PSWMIN","H")
menipin zextq $1 `ed dnqiq jxe`
^W1DICT("PSWMIN","R")
Dlina parol!a $1 cifry minimum
^W1DICT("PSWORDINVALID","E")
Password typed incorrect
^W1DICT("PSWORDINVALID","H")
oinfdl ozip z`f lka - znyxp `l m` !dnqiqa  d`iby
^W1DICT("PSWORDINVALID","R")
Parol!m neveren !
^W1DICT("PSWORUSRINVALID","E")
Error in password or phone number
^W1DICT("PSWORUSRINVALID","H")
oetlh 'qn e` dnqiqa d`iby
^W1DICT("PSWPREFIX","E")
Number of digits before the card code
^W1DICT("PSWPREFIX","H")
qihixka cew iptl zextq xtqn
^W1DICT("PSWREMOTE","E")
Remote login password
^W1DICT("PSWREMOTE","H")
wegxn dqipkl dnqiq
^W1DICT("PSWSRV","E")
Password to enter service programs
^W1DICT("PSWSRV","H")
zexiy zeipkezl dqipkl dnqiq
^W1DICT("PULLITOUT","E")
Do It !
^W1DICT("PULLITOUT","H")
!`ivedl
^W1DICT("PULLOUTITEMS","E")
Take items out of the kitchen ?
^W1DICT("PULLOUTITEMS","H")
? gahnn mihixt `ivedl
^W1DICT("PUTCASH","E")
Depositing money into a drawer
^W1DICT("PUTCASH","H")
dxibnl sqk zcwtd
^W1DICT("PUTITEM2WEIGHT","E")
Wait for weighing results
^W1DICT("PUTITEM2WEIGHT","H")
dliwy ze`vezl dkg
^W1DICT("PUTYOURFINGER2DEV","E")
Put your finger on the device.
^W1DICT("PUTYOURFINGER2DEV","H")
xiyknd lr rav`d miy
^W1DICT("QN","E")
Qn.
^W1DICT("QN2PAY","E")
Amount to be paid
^W1DICT("QN2PAY","H")
melyzl zenk
^W1DICT("QNALL","E")
All quant.
^W1DICT("QNALL","H")
d`ln zenk
^W1DICT("QNALL","R")
Vse k-vo
^W1DICT("QNAT","E")
No. of meals
^W1DICT("QNAT","H")
zegex` 'qn
^W1DICT("QNATDF","E")
No. of meals
^W1DICT("QNATDF","H")
zegex` 'qn
^W1DICT("QNATED","E")
Change the number of meals
^W1DICT("QNATED","H")
zegex` 'qn dpy
^W1DICT("QNCLOSEDLVORDERS","E")
Orders are closed and shipped
^W1DICT("QNCLOSEDLVORDERS","H")
migelyn zexebq zepnfd
^W1DICT("QNCLOSEORDERS","E")
Closed restaurant orders
^W1DICT("QNCLOSEORDERS","H")
zexebq zepnfd
^W1DICT("QNCLOSERESTORDERS","E")
Closed restaurant orders
^W1DICT("QNCLOSERESTORDERS","H")
dcrqna zexebq zepnfd
^W1DICT("QNCOMP","E")
Quantity according to calculation
^W1DICT("QNCOMP","H")
aeyig itl zenk
^W1DICT("QNDA","E")
How much to cancel
^W1DICT("QNDA","H")
lhal dnk
^W1DICT("QNDEF","E")
Quant (dflt).
^W1DICT("QNDEF","H")
lcgn'xa zenk
^W1DICT("QNDEF","R")
!K-vo po um-!u
^W1DICT("QNDEL","E")
Several to cancel
^W1DICT("QNDEL","H")
lhal dnk
^W1DICT("QNDELTOOBIG","E")
Amount for cancellation is too big
^W1DICT("QNDELTOOBIG","H")
icin dlecb lehial zenk
^W1DICT("QNDIF","E")
Difference
^W1DICT("QNDIF","H")
yxtd
^W1DICT("QNDLVRY","E")
Deliveries number
^W1DICT("QNDLVRY","H")
migelyn 'qn
^W1DICT("QNDLVRYEVENING","E")
No. of evening deliveries
^W1DICT("QNDLVRYEVENING","H")
axr migelyn 'qn
^W1DICT("QNDLVRYMORNING","E")
No. of morning deliveries
^W1DICT("QNDLVRYMORNING","H")
xwea migelyn 'qn
^W1DICT("QNETTO","E")
Net amount
^W1DICT("QNETTO","H")
ehp zenk
^W1DICT("QNEXACTLY","E")
$1 products exactly
^W1DICT("QNEXACTLY","H")
weica mibeq $1
^W1DICT("QNEXACTLY","R")
$1 vid'
^W1DICT("QNEXACTLY1","E")
Choice 1 product only
^W1DICT("QNEXACTLY1","H")
cala 1 dpn jzxigal
^W1DICT("QNEXACTLY1","R")
Sleduet vybrat!m 1 vid
^W1DICT("QNFAX","E")
Number of faxes
^W1DICT("QNFAX","H")
miqwt xtqn
^W1DICT("QNITEMS","E")
A number of items
^W1DICT("QNITEMS","H")
mihixt xtqn
^W1DICT("QNLABS","E")
Number of stickers to print
^W1DICT("QNLABS","H")
dqtcdl zewacn xtqn
^W1DICT("QNMAX","E")
Until $1 it.
^W1DICT("QNMAX","H")
zepn $1 cr
^W1DICT("QNMAX","R")
do $1 vidov 
^W1DICT("QNMAX1","E")
Choice until $1 products
^W1DICT("QNMAX1","H")
cg` beqn xzei `l dxigal
^W1DICT("QNMAX1","R")
Mojno vybrat!m ne bolee odnogo vida
^W1DICT("QNMEAT","E")
Amount of meat per item (Kg)
^W1DICT("QNMEAT","H")
(b"w) hixta xya zenk 
^W1DICT("QNMEATG","E")
Amount of meat per item (G)
^W1DICT("QNMEATG","H")
(b) hixta xya zenk 
^W1DICT("QNMIN","E")
At least $1 meals
^W1DICT("QNMIN","H")
zepn $1 zegtl
^W1DICT("QNMSD","E")
No. of diners
^W1DICT("QNMSD","H")
micreq 'qn
^W1DICT("QNMSL","E")
No. of deliveries
^W1DICT("QNMSL","H")
migelyn 'qn
^W1DICT("QNMTSOLD","E")
Amount of meat sold (kg)
^W1DICT("QNMTSOLD","H")
(b"w) xknpy xya zenk 
^W1DICT("QNNOTMATCH2GROUPS","E")
The number of items in the content is not suitable for meals amount
^W1DICT("QNNOTMATCH2GROUPS","H")
zegex` xtqnl mi`zn `l okeza mihixt 'qn
^W1DICT("QNNOTVALID","E")
Incorrect quantity
^W1DICT("QNNOTVALID","H")
dpekp `l zenk
^W1DICT("QNOPENDLVORDERS","E")
Open shipment orders
^W1DICT("QNOPENDLVORDERS","H")
migelyn zegezt zepnfd
^W1DICT("QNOPENORDERS","E")
Open orders
^W1DICT("QNOPENORDERS","H")
zegezt zepnfd
^W1DICT("QNOPENRESTORDERS","E")
Open orders at the restaurant
^W1DICT("QNOPENRESTORDERS","H")
dcrqna zegezt zepnfd
^W1DICT("QNPAY","E")
Number of payments
^W1DICT("QNPAY","H")
minelyz 'qn
^W1DICT("QNREAL","E")
Actual quantity
^W1DICT("QNREAL","H")
lreta zenk
^W1DICT("QNSOLD","E")
Quantity of items sold
^W1DICT("QNSOLD","H")
exknpy mihixt zenk
^W1DICT("QNTA","E")
No. of TA
^W1DICT("QNTA","H")
TA 'qn
^W1DICT("QNTAEVENING","E")
TA evening
^W1DICT("QNTAEVENING","H")
axr TA 'qn
^W1DICT("QNTAMORNING","E")
TA morning
^W1DICT("QNTAMORNING","H")
xwea TA 'qn
^W1DICT("QNTAW","E")
No. of TA
^W1DICT("QNTAW","H")
T.A.W 'qn
^W1DICT("QNTD","E")
Quantity in certificate
^W1DICT("QNTD","H")
dcerza zenk 
^W1DICT("QNTOOMUCH","E")
Too much !
^W1DICT("QNTOOMUCH","H")
icin xzei xgap
^W1DICT("QNTOOMUCH","R")
Vybrano sli!6kom mnogo
^W1DICT("QUANT","E")
Qn.
^W1DICT("QUANT","H")
zenk
^W1DICT("QUANT","R")
Kol.
^W1DICT("QUANTGRMIN","E")
The minimum selection is $1 items
^W1DICT("QUANTGRMIN","H")
mihixt $1 `ed dxigal menipin
^W1DICT("QUANTGRWRONG","E")
Wrong quantity ! should be $1 instead $2
^W1DICT("QUANTGRWRONG","H")
$2 clwede $1 zeidl xen` ! ookp `l dveawa mihixt xtqn
^W1DICT("QUANTGRWRONG","R")
K-vo ukazano neverno ! Doljno byt!m $1 vmesto $2
^W1DICT("QUANTITY","E")
Quantity
^W1DICT("QUANTITY","H")
zenk
^W1DICT("QUANTITY","R")
Kol-vo
^W1DICT("QUDEL","E")
Several to cancel
^W1DICT("QUDEL","H")
lhal dnk
^W1DICT("QUERIESANDREPORTS","E")
Query and reports
^W1DICT("QUERIESANDREPORTS","H")
zegece zezli`y
^W1DICT("RANDOMUSER","E")
Guest
^W1DICT("RANDOMUSER","H")
gxe`
^W1DICT("RANDOMUSER","R")
Gost!m
^W1DICT("RANGENOTVALID","E")
Wrong range
^W1DICT("RANGENOTVALID","H")
oekp `l geeh
^W1DICT("RATE","E")
Expense
^W1DICT("RATE","H")
d`ved
^W1DICT("RATESUM","E")
Expense amount
^W1DICT("RATESUM","H")
d`ved mekq
^W1DICT("RCMDTIME","E")
It is recommended to go out
^W1DICT("RCMDTIME","H")
z`vl ulnen
^W1DICT("RCPNMB","E")
Reception number
^W1DICT("RCPNMB","H")
dlaw 'qn
^W1DICT("RCPPRINTED","E")
Receipt printed
^W1DICT("RCPPRINTED","H")
dqtcdl dglyp dlaw
^W1DICT("RCVCMPFILE","E")
Getting a companies file
^W1DICT("RCVCMPFILE","H")
... zexag uaew zlaw
^W1DICT("RCVCMPFILEERR","E")
Error getting companies file
^W1DICT("RCVCMPFILEERR","H")
zexag uaew zlawa d`iby
^W1DICT("RCVIT4WEB","E")
Receiving a menu from a website
^W1DICT("RCVIT4WEB","H")
xz`n hixtz zhilw
^W1DICT("RCVITPROTOCOL","E")
Protocol for receiving a menu from a website
^W1DICT("RCVITPROTOCOL","H")
xz`n hixtz zhilw lewehext
^W1DICT("RCVMSGFILE","E")
Getting a message file
^W1DICT("RCVMSGFILE","H")
... zerced uaew zlaw
^W1DICT("RCVMSGFILEERR","E")
Error getting messages file
^W1DICT("RCVMSGFILEERR","H")
zerced uaew zlawa d`iby
^W1DICT("RCVPRMFILE","E")
Getting a parameters file
^W1DICT("RCVPRMFILE","H")
... mixhnxt uaew zlaw
^W1DICT("RCVPRMFILEERR","E")
Error getting parameters file
^W1DICT("RCVPRMFILEERR","H")
mixhnxt uaew zlawa d`iby
^W1DICT("RCVREPFILE","E")
Receiving a reports file
^W1DICT("RCVREPFILE","H")
... zeg"ec uaew zlaw
^W1DICT("RCVREPFILEERR","E")
Error getting reports file
^W1DICT("RCVREPFILEERR","H")
zeg"ec uaew zlawa d`iby
^W1DICT("READY","E")
Ready
^W1DICT("READY","H")
oken
^W1DICT("READY?","E")
Is ready ?
^W1DICT("READY?","H")
oken m`d
^W1DICT("READYORDS","E")
Only ready orders
^W1DICT("READYORDS","H")
zepken zepnfd wx
^W1DICT("READYTIME","E")
Preparation completion time
^W1DICT("READYTIME","H")
dpkd meiq onf
^W1DICT("REALLYPAID","E")
In practice; $ 1 was paid only
^W1DICT("REALLYPAID","H")
cala g"y $1 mley lreta
^W1DICT("RECEIPT","E")
Reception
^W1DICT("RECEIPT","H")
dlaw
^W1DICT("RECEIPTEDLIST","E")
Receipt List
^W1DICT("RECEIPTEDLIST","H")
zelaw zniyx
^W1DICT("RECEIPTES","E")
Receptions
^W1DICT("RECEIPTES","H")
zelaw
^W1DICT("RECEIPTESLIST","E")
A list of receipts
^W1DICT("RECEIPTESLIST","H")
zelaw zniyx
^W1DICT("RECEIPTESREPORT","E")
Receipt Report
^W1DICT("RECEIPTESREPORT","H")
zelaw g"ec
^W1DICT("RECEIPTIREPORT2DATE","E")
Receipts Report to date
^W1DICT("RECEIPTIREPORT2PERIOD","E")
Receipts Report to period
^W1DICT("RECEIPTNMB","E")
Receipt number:
^W1DICT("RECEIPTNMB","H")
'qn dlaw
^W1DICT("RECEIPTNUMBERISWROMG","E")
Wrong Receipt number
^W1DICT("RECEIPTNUMBERISWROMG","H")
ieby dlaw 'qn
^W1DICT("RECEIPTPAYMENT","E")
Receiving payment
^W1DICT("RECEIPTPAYMENT","H")
melyz zlaw
^W1DICT("RECEIPTSUMNOTEQINVOICESPAYMENTS","E")
Amount in the receipt ( $1 ) more screen of payments ( $2) . You are sure
^W1DICT("RECEIPTSUMNOTEQINVOICESPAYMENTS","H")
geha dz` . ($2) minelyz jqn xzei ($1) dlawa mekq 
^W1DICT("RECEIVED","E")
Accepted
^W1DICT("RECEIVED","H")
lawzd
^W1DICT("RECEIVED","R")
Prin!ato
^W1DICT("RECEIVEDORDERS","E")
Received orders
^W1DICT("RECEIVEDORDERS","H")
zepnfd zbvd
^W1DICT("RECEIVEDORDERS","R")
Prin!atye zakazy
^W1DICT("RECEIVER","E")
Receiver
^W1DICT("RECEIVER","H")
lawnd
^W1DICT("RECEIVERNAME","E")
Receiver Name
^W1DICT("RECEIVERNAME","H")
lawnd my
^W1DICT("RECEIVERNUMBER","E")
Receiver Number
^W1DICT("RECEIVERNUMBER","H")
lawn 'qn
^W1DICT("RECEIVERSREPORT","E")
Receivers Report
^W1DICT("RECEIVERSREPORT","H")
zepnfdd ilawn itl g"ec
^W1DICT("RECEIVERSTABLE","E")
Table of Order Receivers
^W1DICT("RECEIVERSTABLE","H")
zepnfd ilawn zlah
^W1DICT("RECIPIENTNAME","E")
Gift Receiver Name
^W1DICT("RECIPIENTNAME","H")
dpzn lawnd my
^W1DICT("RECLOSEINVOICES","E")
Mark New Invoice
^W1DICT("RECLOSEINVOICES","H")
ycgn zeipeayg onq
^W1DICT("RECOMMENDED2CUST","E")
Get a recommended price
^W1DICT("RECOMMENDED2CUST","H")
ulnen xign law
^W1DICT("RECOMMENDEDPRICE","E")
Recommended Price
^W1DICT("RECOMMENDEDPRICE","H")
ulnen xign
^W1DICT("RECORDSLISTFORHASHAVSHEVET","E")
Movements List from
^W1DICT("RECORDSLISTFORHASHAVSHEVET","H")
$2 jix`z cr $1 jix`zn zerepz zniyx
^W1DICT("RECORDSLISTFORHSVL","E")
A list of clients to transfer to "Hashavshevet"
^W1DICT("RECORDSLISTFORHSVL","H")
$1 zayaygl dxardl zegewl zniyx
^W1DICT("REDUCE","E")
Reduce
^W1DICT("REDUCE","H")
jinpz
^W1DICT("REDUCESETQN","E")
Please first reduce the amount of items selected !
^W1DICT("REDUCESETQN","H")
! mixgap mihixt zenk dligz oihwdl `p
^W1DICT("REFRESH","E")
Refresh
^W1DICT("REFRESH","H")
oprx
^W1DICT("REFRESHDISPLAY","E")
Please refresh screen
^W1DICT("REFRESHDISPLAY","H")
jqn oprxl `p
^W1DICT("REFRESHNEWORDERS","E")
There are new orders - please refresh the screen
^W1DICT("REFRESHNEWORDERS","H")
jqn oprxl `p - zeycg zepnfd yi
^W1DICT("REFUNDS","E")
Refunds
^W1DICT("REFUNDS","H")
milehia
^W1DICT("REGION","E")
District
^W1DICT("REGION","H")
xef`
^W1DICT("REGION","R")
Ra!ion
^W1DICT("REGISTRY","E")
Sign Up
^W1DICT("REGISTRY","H")
dnyxd
^W1DICT("REGISTRY","R")
Zareg-s!a
^W1DICT("REGISTRYORCHANGEPROFILE","E")
Register or change profile
^W1DICT("REGISTRYORCHANGEPROFILE","H")
litext iepiy e` dnyxd
^W1DICT("REGISTRYORORDER","E")
If You not member You can Sign Up now or at the end of order
^W1DICT("REGISTRYORORDER","H")
df oelg xebq .dpnfdl mihixt i/xgazy ixg` e` eiykr myxidl xyt` , ycg gewl d/z` m`
^W1DICT("REGISTRYORORDER","R")
Esli Vy e!se ne zaregistrirovalis!m , mojete sdelat!m !eto se!i!4as ili posle vybora zakaza
^W1DICT("REGMZSM","E")
Cash Driver Registration
^W1DICT("REGMZSM","H")
onefn zpekn meyix
^W1DICT("REMAIND","E")
Remaind
^W1DICT("REMAIND","H")
dxzi
^W1DICT("REMAIND","R")
Ostatok
^W1DICT("REMAINDBILL","E")
The rest of the bill
^W1DICT("REMAINDBILL","H")
oeaygd x`y
^W1DICT("REMEMBERME","E")
Remember
^W1DICT("REMEMBERME","H")
ize` xekf
^W1DICT("REMEMBERME","R")
Zapomnit!m
^W1DICT("REMINDER","E")
Reminder
^W1DICT("REMINDER","H")
zxekfz
^W1DICT("REPAUTHOR2DAT","E")
Report to authorities for $1
^W1DICT("REPAUTHOR2DAT","H")
$1 -l zeieyxl g"ec
^W1DICT("REPAUTHOR2PERIOD","E")
Report to authorities from $1 to $2
^W1DICT("REPAUTHOR2PERIOD","H")
$2 cr $1 -n zeieyxl g"ec
^W1DICT("REPCA","E")
Credit card report by issuers and brands
^W1DICT("REPCA","H")
mibzene miwleq itl i`xy` iqihxk g"ec
^W1DICT("REPCADT","E")
Credit card report by acquirers and issuers from $1 to $2
^W1DICT("REPCADT","H")
$2  jix`z cr  $1 jix`zn miwitpne miwleq itl i`xy` iqihxk g"ec
^W1DICT("REPDEPTRH","E")
Report according to the date of issue of items
^W1DICT("REPDEPTRH","H")
mihixt z`ved ikix`z itl zewlgn g"ec
^W1DICT("REPDEPTRHMEAD","E")
Department report by shipment issue dates valid from $1 to $2
^W1DICT("REPDEPTRHMEAD","H")
$2 cr $1 -n dtweza migelyn z`ved ikix`z itl zewlgn g"ec
^W1DICT("REPEZMHD","E")
Selling inventory items from $1 to $2
^W1DICT("REPEZMHD","H")
$2 cr $1 n i`ln ihixt zxikn 
^W1DICT("REPEZMHD1","E")
Selling inventory items to $1
^W1DICT("REPEZMHD1","H")
$1 l i`ln ihixt zxikn 
^W1DICT("REPEZMREPORT","E")
Inventory item sales report by product tree
^W1DICT("REPEZMREPORT","H")
xven ur itl i`ln ihixt zxikn g"ec
^W1DICT("REPITEMSTRH","E")
Item report by issue dates
^W1DICT("REPITEMSTRH","H")
d`ved ikix`z itl mihixt g"ec
^W1DICT("REPITEMSTRHMEAD","E")
Item report by shipment issue dates valid from $1 to $2
^W1DICT("REPITEMSTRHMEAD","H")
$2 cr $1 -n dtweza migelyn z`ved ikix`z itl mihixt g"ec
^W1DICT("REPORTCSRDRW","E")
Cash Drawer Report
^W1DICT("REPORTCSRDRW2DATE","E")
Cash Drawer Report to date
^W1DICT("REPORTCSRDRW2PERIOD","E")
Cash Drawer Report to period
^W1DICT("REPORTDEPSALES","E")
Department Sales Report
^W1DICT("REPORTFORM","E")
Report Form
^W1DICT("REPORTFORM","H")
g"ec ly dxeva
^W1DICT("REPORTS","E")
Reports
^W1DICT("REPORTS","H")
zeg"ec
^W1DICT("REPORTSENDED2PRINTER","E")
Report sent for printing
^W1DICT("REPORTSENDED2PRINTER","H")
dqtcdl glyp g"ec
^W1DICT("REPORTX","E")
Report X
^W1DICT("REPORTX","H")
X g"ec
^W1DICT("REPORTXTODAY","E")
Report X
^W1DICT("REPORTXTODAY","H")
meidl X g"ec
^W1DICT("REPORTY","E")
Report Y
^W1DICT("REPORTY","H")
Y g"ec
^W1DICT("REPORTZ","E")
Report Z
^W1DICT("REPORTZ","H")
Z g"ec
^W1DICT("REPORTZCUST","E")
Customers Report
^W1DICT("REPPZM","E")
Compensation Report
^W1DICT("REPPZM","H")
miievit g"ec
^W1DICT("REPRVHHD","E")
Selling profitable items from $1 to $2
^W1DICT("REPRVHHD","H")
$2 cr $1 n igeeix mihixt zxikn 
^W1DICT("REPRVHHD1","E")
Selling profitable items from $1 to
^W1DICT("REPRVHHD1","H")
$1 -l igeeix mihixt zxikn 
^W1DICT("REPRVHREPORT","E")
Profitable item sales report
^W1DICT("REPRVHREPORT","H")
igeeix mihixt zxikn g"ec
^W1DICT("REPTL","E")
Gift Coupons Report
^W1DICT("REPTL","H")
dpzn iyelz g"ec
^W1DICT("REPTODATE","E")
Sales Report to date
^W1DICT("REPTODATE","H")
jix`zl zexikn g"ec
^W1DICT("REPTOPERIOD","E")
Report to period
^W1DICT("REPTOPERIOD","H")
dtewzl g"ec
^W1DICT("REPTRHMEAD","E")
A report according to the dates of issue of items from $1 to $2
^W1DICT("REPYEARMONTH","E")
Annual report by months
^W1DICT("REPYEARMONTH","H")
miyceg itl izpy g"ec
^W1DICT("REPZCIB","E")
"SODEXO" Report
^W1DICT("REQUESTINPROGRESS","H")
dniizqd `l zncew `zli`y
^W1DICT("RESETPARAMETERS","E")
Reset parameters
^W1DICT("RESETPARAMETERS","H")
mixhnxt qeti`
^W1DICT("RESQN","E")
Number of orders on place
^W1DICT("RESQN","H")
mewna zepnfd 'qn
^W1DICT("REST36","E")
There was no break for 36 hours a week !
^W1DICT("REST36","H")
! reaya zery 36 dwqtd dziid `l
^W1DICT("RESTANDDLV","E")
Restaurant and deliveries
^W1DICT("RESTANDDLV","H")
migelyne dcrqn
^W1DICT("RESTAURANT","E")
Restaurant
^W1DICT("RESTAURANT","H")
dcrqn
^W1DICT("RESTAURANT","R")
Restoran
^W1DICT("RESTAURANTPARAMETERS","E")
Restaurant parameters
^W1DICT("RESTAURANTPARAMETERS","H")
dcrqnl mixhnxt
^W1DICT("RESTAURANTPARAMETERSDEFINITION","E")
Restaurant parameters
^W1DICT("RESTAURANTPARAMETERSDEFINITION","H")
dcrqnl mixhnxt 
^W1DICT("RESTAURANTSTABLE","E")
Restaurants table
^W1DICT("RESTAURANTSTABLE","H")
zecrqn zlah
^W1DICT("RESTAURANTTABLES","E")
Restaurant tables
^W1DICT("RESTAURANTTABLES","H")
dcrqn ly ze`lah
^W1DICT("RESTAURANTTABLES","R")
Restorannye spravo!4niki
^W1DICT("RESTCLOSED","E")
The restaurant is now closed
^W1DICT("RESTCLOSED","H")
zrk dxebq dcrqn
^W1DICT("RESTCODE","E")
Restaurant code
^W1DICT("RESTCODE","H")
sipq cew
^W1DICT("RESTCODE","R")
Kod restorana
^W1DICT("RESTCUSTREPORT","E")
Restaurant report by customers
^W1DICT("RESTCUSTREPORT","H")
zegewl itl zecrqn g"ec
^W1DICT("RESTDEL","E")
Cancellation on restaurant account
^W1DICT("RESTDEL","H")
dcrqn oeayg lr lehia
^W1DICT("RESTEMV?","E")
Card charge did not arrive on computer. Do you want to restore?
^W1DICT("RESTEMV?","H")
? xfgyl m`d . aygnl dribd `l qihxk ly aeig
^W1DICT("RESTEMVPAYM","E")
Credit card payment recovery
^W1DICT("RESTEMVPAYM","H")
i`xy` qihxka melyz xefgy
^W1DICT("RESTEXIST","E")
Exist !
^W1DICT("RESTEXIST","H")
zniiw dcrqn
^W1DICT("RESTEXIST","R")
Uje prisutstvuet
^W1DICT("RESTIGOPARAMETERS","E")
"RESTIGO" Parameters
^W1DICT("RESTIGOPARAMETERS","H")
"RESTIGO" ly mixhnxt
^W1DICT("RESTITEMS","E")
The rest of the items
^W1DICT("RESTITEMS","H")
mihixtd x`y
^W1DICT("RESTMANAGING","E")
Restaurants Management
^W1DICT("RESTMANAGING","H")
zecrqn ledip
^W1DICT("RESTMZV","E")
Restaurant Status
^W1DICT("RESTMZV","H")
dtew avn
^W1DICT("RESTNAME","E")
Rest.name
^W1DICT("RESTNAME","H")
sipq my
^W1DICT("RESTNAME","R")
Im!a rest.
^W1DICT("RESTNETTO","E")
Total net spot sales
^W1DICT("RESTNETTO","H")
ehp mewna zexikn k"dq
^W1DICT("RESTNOTEXIST","E")
Restaurant not exist
^W1DICT("RESTNOTEXIST","H")
zniiw `l dcrqn
^W1DICT("RESTNUMBER","E")
Restaurant No
^W1DICT("RESTNUMBER","H")
dcrqn 'qn
^W1DICT("RESTORANPARAMETERS","E")
Parameters for the system 'Restoran'
^W1DICT("RESTORANPARAMETERS","H")
'o`xehqx' zkxrnl mixhnxt
^W1DICT("RESTORDERS","E")
Orders of Restaurant
^W1DICT("RESTORDERS","H")
dcrqn zepnfd
^W1DICT("RESTORDERSNUMBER","E")
Dine-In Orders Number
^W1DICT("RESTORDERSNUMBER","H")
dtewa zepnfd zenk
^W1DICT("RESTORDERSREPORT","E")
Restaurant Orders Report
^W1DICT("RESTORDERSREPORT","H")
dcrqn zepnfd g"ec
^W1DICT("RESTORE","E")
Restore
^W1DICT("RESTORE","H")
xfgy
^W1DICT("RESTOREDFROMORDER","E")
Restore order $1
^W1DICT("RESTOREDFROMORDER","H")
$1 dpnfd xefgy
^W1DICT("RESTOREORDER","E")
Resore Order
^W1DICT("RESTOREORDER","H")
dpnfd xfgy
^W1DICT("RESTPARAMETERS","E")
Work parameters in the restaurant
^W1DICT("RESTPARAMETERS","H")
dcrqna dcear ixhnxt
^W1DICT("RESTPAYMENTSREPORT","E")
Report by types of payment [Restaurant]
^W1DICT("RESTPAYMENTSREPORT","H")
[ dcrqn ] melyz ibeq itl g"ec
^W1DICT("RESTPERIODREPORT","E")
$1 report to period
^W1DICT("RESTQDAY","E")
Restoring an order to an order queue
^W1DICT("RESTQDAY","H")
zepnfd xezl dpnfd xefgiy
^W1DICT("RESTREGISTRY","E")
A Restaurant Profile
^W1DICT("RESTREGISTRY","H")
sipq znyxd
^W1DICT("RESTREGISTRY","R")
Registraci!a restorana
^W1DICT("RESTREPORT","E")
$1 report to date $2
^W1DICT("RESTREPORT","H")
melyz ibeq itl zecrqn g"ec
^W1DICT("RESTREPORTS","E")
Restaurant reports
^W1DICT("RESTREPORTS","H")
mewna dxikn zeg"ec
^W1DICT("RESTRICTITEMSLISTFORDER","E")
List of items sold on order in limited quantities
^W1DICT("RESTRICTITEMSLISTFORDER","H")
zlaben zenka dpnfda mixknpy mihixt zniyx
^W1DICT("RESTSALES","E")
Dine In Sales
^W1DICT("RESTSALES","H")
dtewa zexikn
^W1DICT("RESTSHVAPRM","E")
Parameters for ABS terminals by restaurants
^W1DICT("RESTSHVAPRM","H")
zecrqn itl `ay iteqnl mixhnxt
^W1DICT("RESTSITE","E")
Site of deliveries of restaurants Israel
^W1DICT("RESTSITE","H")
l`xyi zecrqn ly migelyn xz`
^W1DICT("RESTSORT","E")
Sort by restaurant number
^W1DICT("RESTSORT","H")
dcrqn 'qn itl oiin
^W1DICT("RESTSSTATUS","E")
Restaurants status to $1 $2
^W1DICT("RESTSSTATUS","H")
$2 $1 -l miwqr avn
^W1DICT("RESTSTATUS","E")
Restaurant status to $1 $2
^W1DICT("RESTSTDY","E")
It is forbidden to work more than 3 consecutive Saturdays
^W1DICT("RESTSTDY","H")
! sevx zezay 3-n xzei cearl xeq`
^W1DICT("RESULT","E")
Result
^W1DICT("RESULT","H")
d`vez
^W1DICT("RESULT","R")
Rezul!mtat
^W1DICT("RESULTCODE","E")
Result code
^W1DICT("RESULTCODE","H")
d`vez cew
^W1DICT("RESULTMSG","E")
Result description
^W1DICT("RESULTMSG","H")
d`vez xe`z
^W1DICT("RESULTOFLOOKINGFORORDERS","E")
Results of search of orders
^W1DICT("RESULTOFLOOKINGFORORDERS","H")
zepnfd yetig ze`vez
^W1DICT("RETRY","E")
Attempt $1
^W1DICT("RETRY","H")
$1 oeiqip
^W1DICT("RETYPEPSW","E")
Retype
^W1DICT("RETYPEPSW","H")
aey ecilwz
^W1DICT("RETYPEPSW","R")
Podtverdite
^W1DICT("RIGHT","E")
Right
^W1DICT("RIGHT","H")
dpini
^W1DICT("RIKUZPRITIM","E")
Grouping products
^W1DICT("RIKUZPRITIM","H")
mihixt fewix
^W1DICT("RMMLYREPORT","E")
Report items under reorder point
^W1DICT("RMMLYREPORT","H")
dpnfd zcewp zgz mi`vnpy mihixt g"ec
^W1DICT("ROLE","E")
Role
^W1DICT("ROLE","H")
ciwtz
^W1DICT("ROOM","E")
Room
^W1DICT("ROOM","H")
xcg
^W1DICT("RPTCUSTQN","E")
Number of returning customers
^W1DICT("RPTCUSTQN","H")
mixfeg zegewl 'qn
^W1DICT("RSTGCR","E")
RESTIGO Credit
^W1DICT("RSTGCR","H")
ebihqx dtwd
^W1DICT("RSTGNETPROTOCOL","E")
RESTIGO Protocol
^W1DICT("RSTGNETPROTOCOL","H")
ebihqx lewehext
^W1DICT("RSTGNETREPORT","E")
Data transfer protocol for Restigo from $1 to $2
^W1DICT("RSTGNETREPORT","H")
$2 cr $1 -n ebihqxl mipezp zxard lewehext
^W1DICT("RSTGODEPS","E")
Restigo departments
^W1DICT("RSTGODEPS","H")
ebihqx zewlgn
^W1DICT("RSTGOGROUPS","E")
Table "Groups - Restigo Departments"
^W1DICT("RSTGOGROUPS","H")
"ebihqx zewlgn - zeveaw" dlah
^W1DICT("RSTGPD","E")
Restigo Redemption
^W1DICT("RSTGPD","H")
ebihqx oeict
^W1DICT("RSTGPROT","E")
Transmission protocol for "RESTIGO"
^W1DICT("RSTGPROT","H")
"ebihqx" l mixeciy lewehext
^W1DICT("RSTGSENDINGPROTOCOL","E")
Transmission protocol for "RESTIGO" from $1 to $2
^W1DICT("RSTGSENDINGPROTOCOL","H")
$2 jix`z cr $1  jix`zn "ebihqx" l mixeciy lewehext
^W1DICT("RSTRNERROR","E")
Error in restaurant code
^W1DICT("RSTRNERROR","H")
dcrqn cewa d`iby
^W1DICT("RSTRNERROR","R")
O!6ibka v kode restorana
^W1DICT("RSTRNLIST","E")
List of restaurants $1
^W1DICT("RSTRNLIST","H")
$1 zecrqn zniyx
^W1DICT("RSTRNLIST","R")
Spisok restoranov $1
^W1DICT("RSTRNNAME","E")
Name of restaurant
^W1DICT("RSTRNNAME","H")
dcrqn my
^W1DICT("RSTRNNAME","R")
Nazvanie restorana
^W1DICT("RUNTIME","E")
Time of work
^W1DICT("RUNTIME","H")
dcear onf
^W1DICT("RUNTIME","R")
Vrem!a raboty
^W1DICT("RUSSIAN","E")
Russian
^W1DICT("RUSSIAN","H")
ziqex
^W1DICT("RUSSIAN","R")
Russki!i
^W1DICT("RVNBEFOREVAT","E")
Income before VAT
^W1DICT("RVNBEFOREVAT","H")
n"rn iptl zeqpkd
^W1DICT("RVNTOTWITHVAT","E")
Income incl. VAT
^W1DICT("RVNTOTWITHVAT","H")
n"rn llek zeqpkd
^W1DICT("RVNWITHOUTVAT","E")
Income before VAT
^W1DICT("RVNWITHOUTVAT","H")
n"rn `ll zeqpkd
^W1DICT("S100","E")
Total bills of 100 NIS
^W1DICT("S100","H")
g"y 100 ly zexhy k"dq
^W1DICT("S20","E")
Total bills of 20 NIS
^W1DICT("S20","H")
g"y 20 ly zexhy k"dq
^W1DICT("S200","E")
Total bills of 200 NIS
^W1DICT("S200","H")
g"y 200 ly zexhy k"dq
^W1DICT("S50","E")
Total bills of 50 NIS
^W1DICT("S50","H")
g"y 50 ly zexhy k"dq
^W1DICT("SAKIOT","E")
Number of bags
^W1DICT("SAKIOT","H")
zeiwy 'qn
^W1DICT("SAKN","E")
Bags
^W1DICT("SAKN","H")
'wy
^W1DICT("SAKNUMBERNOTVALID","E")
Number of bags you marked incorrectly
^W1DICT("SAKNUMBERNOTVALID","H")
oekp `l zpniqy zeiwy 'qn
^W1DICT("SAKSQN","E")
Number of bags
^W1DICT("SAKSQN","H")
zeiwy 'qn
^W1DICT("SAKSTOTAL","E")
Total bags
^W1DICT("SAKSTOTAL","H")
zeiwy k"dq
^W1DICT("SALARY","E")
Salary
^W1DICT("SALARY","H")
dcear xky
^W1DICT("SALE","E")
Sale "$1"
^W1DICT("SALE","H")
"$1" rvan
^W1DICT("SALE!","E")
Sale !
^W1DICT("SALE!","H")
! rvan
^W1DICT("SALE1+1","E")
Sale "1+1" : instead $1 NIS - Free !
^W1DICT("SALE1+1","H")
! mpig - g"y $1 mewna : 1+1 rvan
^W1DICT("SALE11","E")
Confirm sale $1 + 1 ?
^W1DICT("SALE11","H")
? $1+1 rvan xy`l
^W1DICT("SALEASK","E")
Sale query
^W1DICT("SALEASK","H")
rvan `zli`y
^W1DICT("SALECODE","E")
Code of sale
^W1DICT("SALECODE","H")
rvan cew
^W1DICT("SALECODE","R")
Kod mer-!a
^W1DICT("SALECODEISWRONG","E")
Code jf sale incorrect
^W1DICT("SALECODEISWRONG","H")
ieby rvan cew
^W1DICT("SALEDISCOUNT","E")
Sale Discount
^W1DICT("SALEDISCOUNT","H")
rvan zgpd
^W1DICT("SALEHAPPYHOUER","E")
Sale "Happy Hours"
^W1DICT("SALEHAPPYHOUER","H")
"<E>HAPPY HOURS<E>" rvan
^W1DICT("SALEITEM","E")
Item on sale "$1"
^W1DICT("SALEITEM","H")
"$1" rvana hixt 
^W1DICT("SALENAME","E")
Sale description
^W1DICT("SALENAME","H")
rvan xe`z
^W1DICT("SALENAME","R")
Opisanie
^W1DICT("SALENAMEMUSTBEFILLED","E")
The sale name must be filled
^W1DICT("SALENAMEMUSTBEFILLED","H")
rvan my `lnl yi
^W1DICT("SALEPERQN","E")
Sale based on quantity of items in order
^W1DICT("SALEPERQN","H")
dpnfda mihixt zenk itl rvan
^W1DICT("SALEPERSUM","E")
Sale by order amount
^W1DICT("SALEPERSUM","H")
dpnfd mekq itl rvan
^W1DICT("SALEPERSUMAH","E")
Sale based on order amount - percentage discount
^W1DICT("SALEPERSUMAH","H")
dgpd feg` - dpnfd mekq itl rvan
^W1DICT("SALEPRICE","E")
Sale price
^W1DICT("SALEPRICE","H")
rvan xign
^W1DICT("SALERANGE","E")
Area of â`kâ`koperation
^W1DICT("SALERANGE","H")
rvan megz
^W1DICT("SALES","E")
Sales
^W1DICT("SALES","H")
mirvan
^W1DICT("SALES","R")
Meropri!ati!a
^W1DICT("SALESNETTO","E")
Total net sales
^W1DICT("SALESNETTO","H")
ehp zexikn k"dq
^W1DICT("SAMECELL","E")
Do not copy / move to the same slot
^W1DICT("SAMECELL","H")
zvayn eze`l xiardl / wizrdl oi`
^W1DICT("SAMECHECK","E")
Checks with identical numbers were discovered
^W1DICT("SAMECHECK","H")
midf mixtqn mr miwiy elbzd
^W1DICT("SAMECODE","E")
A code has already been defined in the table
^W1DICT("SAMECODE","H")
dlaha xcbed xak cew
^W1DICT("SAVE","E")
Save
^W1DICT("SAVE","H")
xeny
^W1DICT("SAVE","R")
Sohranit!m
^W1DICT("SAVE2EXCELNOSUM","E")
Save report to Excel without summaries
^W1DICT("SAVE2EXCELNOSUM","H")
minekiq `ll EXCEL-l g"ec xeny
^W1DICT("SAVE2EXCELWITHSUM","E")
Save report to Excel with summaries
^W1DICT("SAVE2EXCELWITHSUM","H")
minekiq mr EXCEL-l g"ec xeny
^W1DICT("SAVEANDBACK","E")
Save and live
^W1DICT("SAVEANDBACK","H")
`ve xeny
^W1DICT("SAVEANDSHOW","E")
Save and view
^W1DICT("SAVEANDSHOW","H")
bvde xeny
^W1DICT("SAVEANDSHOWOFRPRC","E")
Save and display
^W1DICT("SAVEANDSHOWOFRPRC","H")
xign zrvd bvde xeny
^W1DICT("SAVEANDSHOWORD","E")
Save and display
^W1DICT("SAVEANDSHOWORD","H")
bvde qtcd
^W1DICT("SAVEARCH","E")
Save to archive
^W1DICT("SAVEARCH","H")
oeikx`a xeny
^W1DICT("SAVEBYNAME","E")
Save as
^W1DICT("SAVEBYNAME","H")
mya xeny
^W1DICT("SAVECHANGES","E")
Save changes
^W1DICT("SAVECHANGES","H")
? miepiy xenyl
^W1DICT("SAVECHANGES","R")
Sohranit!m
^W1DICT("SAVECUSTDETAILS","E")
Save customer information ?
^W1DICT("SAVECUSTDETAILS","H")
gewl qihxka miepiy xenyl
^W1DICT("SAVED","E")
Saved
^W1DICT("SAVED","H")
xeny
^W1DICT("SAVED","R")
Sohraneno
^W1DICT("SAVEERROR","E")
Error saving
^W1DICT("SAVEERROR","H")
dxinya d`iby
^W1DICT("SAVEITEM","E")
Save adds to $1 $2
^W1DICT("SAVEITEM","H")
$2 $1 l zetqez xenyl
^W1DICT("SAVELUNCH","E")
Save the meal to $1 $2
^W1DICT("SAVELUNCH","H")
 $2 $1 dgex` xenyl
^W1DICT("SAVEORDMSG","E")
Your order has been launched. Please write your order number and phone number
^W1DICT("SAVEORDMSG","H")
'dpnfd avn' divte`a ze`xl lkez dpnfd avn . awrnl da meyx oetlhe dpnfd 'qn meyxl `p .rvanl dxbey jly dpnfd
^W1DICT("SAVEPAYMDATA?","E")
Save payment details ?
^W1DICT("SAVEPAYMDATA?","H")
? melyz ihxt xenyl
^W1DICT("SAVEPRODUCTTREE","E")
Save product tree to $1 $2
^W1DICT("SAVEPRODUCTTREE","H")
$2 $1 -l xven ur xenyl
^W1DICT("SAVESET","E")
Save Set $1 $2
^W1DICT("SAVESET","H")
 $2 $1 hq xenyl
^W1DICT("SAVEYOURDETAILS","E")
Remember Your order number & phone number for checking a status the order
^W1DICT("SAVEYOURDETAILS","H")
! dpnfda oievy oetlha oinf zeidl `p
^W1DICT("SAVEYOURDETAILS","R")
Zapomnite nomer telefona ukazanny!i v zakaze dl!a dal!mne!i!6e!i proverki
^W1DICT("SAVEYOURPROFILE","E")
Save Your Profile
^W1DICT("SAVEYOURPROFILE","H")
`adl jly mihxt xenyl
^W1DICT("SAVEYOURPROFILE","R")
Sohranit!m Va!6i dannye ?
^W1DICT("SAVINGCANCELLED","E")
Saving canceled
^W1DICT("SAVINGCANCELLED","H")
dlhea dxiny
^W1DICT("SAVINGFINISHED","E")
Backup completed
^W1DICT("SAVINGFINISHED","H")
miizqd ieaib
^W1DICT("SAVINGOLDMENU","E")
Saving old menu
^W1DICT("SAVINGOLDMENU","H")
oyid hixtz dxiny
^W1DICT("SBM","E")
Submit Orders
^W1DICT("SBM","H")
zexye`n
^W1DICT("SBM","R")
Podtv-e zakazy
^W1DICT("SBMALL","E")
All Orders
^W1DICT("SBMALL","H")
zepnfdd lk
^W1DICT("SBMALL","R")
Vse zakazy
^W1DICT("SBMDEL","E")
Confirm cancellation
^W1DICT("SBMDEL","H")
lehia xy`
^W1DICT("SBMNO","E")
Cancelled Orders
^W1DICT("SBMNO","H")
zelhean
^W1DICT("SBMNO","R")
Cn!atye zakazy
^W1DICT("SBMSTREETNOTFOUND","E")
Street not in list !  Do you approve?
^W1DICT("SBMSTREETNOTFOUND","H")
? xy`l m`d ! dniyxa `vnp `l aegx
^W1DICT("SCANERTEST","E")
Scanner test
^W1DICT("SCANERTEST","H")
xp`wq zwica
^W1DICT("SCOREBUSINESS","E")
Business registration
^W1DICT("SCOREBUSINESS","H")
wqr oeiv
^W1DICT("SD","E")
Cl.
^W1DICT("SD","H")
'eq
^W1DICT("SD","R")
Kl.
^W1DICT("SE.NOK","E")
ServerExec error
^W1DICT("SE.NOK","H")
serverExec error
^W1DICT("SE.NOK","R")
serverExec error
^W1DICT("SEARCH","E")
Search
^W1DICT("SEARCH","H")
ytg
^W1DICT("SEARCH","R")
Poisk
^W1DICT("SEARCH3","E")
Search for item by code or name [0 - free item]
^W1DICT("SEARCH3","H")
[ iyteg hixt - 0 ] my e` cew itl hixt ytg
^W1DICT("SEARCHADDONS","E")
Search addons
^W1DICT("SEARCHADDONS","H")
ztqez ytg
^W1DICT("SEARCHADDONS","R")
Na!iti dobavku
^W1DICT("SEARCHBYNAME","E")
Search by name
^W1DICT("SEARCHBYNAME","H")
my itl ytg
^W1DICT("SEARCHBYNAME","R")
Poisk po naim-!u
^W1DICT("SEARCHCOMMENT","E")
Search of note
^W1DICT("SEARCHCOMMENT","H")
dxrd ytg
^W1DICT("SEARCHDISH","E")
Search dish
^W1DICT("SEARCHDISH","H")
dpn ytg
^W1DICT("SEARCHDISH","R")
Na!iti bl!udo
^W1DICT("SEARCHEMP","E")
Search works
^W1DICT("SEARCHEMP","H")
caer ytg
^W1DICT("SEARCHEMPL","E")
Search works
^W1DICT("SEARCHEMPL","H")
caer ytg
^W1DICT("SEARCHGROUP","E")
Search group
^W1DICT("SEARCHGROUP","H")
dveaw ytg
^W1DICT("SEARCHITEM","E")
Search Product
^W1DICT("SEARCHITEM","H")
hixt ytg
^W1DICT("SEARCHITEM","R")
Iskat!m bl!udo
^W1DICT("SEARCHITEMALLGROUPS","E")
Search Product in all groups
^W1DICT("SEARCHITEMALLGROUPS","H")
hixtza hixt ytg
^W1DICT("SEARCHITEMALLGROUPS","R")
Iskat!m vo vsem men!u
^W1DICT("SEARCHITEMBYCODE","E")
Search product by code
^W1DICT("SEARCHITEMBYCODE","H")
cew itl hixt ytg
^W1DICT("SEARCHITEMBYNAME","E")
Search  product by name
^W1DICT("SEARCHITEMBYNAME","H")
my itl hixt ytg
^W1DICT("SEARCHITEMSGROUP","E")
Search item group
^W1DICT("SEARCHITEMSGROUP","H")
mihixt zveaw ytg
^W1DICT("SEARCHLUNCH","E")
Search lunch
^W1DICT("SEARCHLUNCH","H")
dgex` ytg
^W1DICT("SEARCHLUNCH","R")
Iskat!m k/obed
^W1DICT("SEARCHNAMEORCODE","E")
Search
^W1DICT("SEARCHNAMEORCODE","H")
hixt ytg
^W1DICT("SEARCHNAMEORCODE","R")
Poisk
^W1DICT("SEARCHORDER","E")
Search order
^W1DICT("SEARCHORDER","H")
dpnfd ytg
^W1DICT("SEARCHORDER","R")
Poisk zakaza
^W1DICT("SEARCHPRODUCT","E")
Search product
^W1DICT("SEARCHPRODUCT","H")
xven ytg
^W1DICT("SEARCHSET","E")
Search set
^W1DICT("SEARCHSET","H")
hq ytg
^W1DICT("SEARCHSET","R")
Iskat!m set
^W1DICT("SEARCHSTOCKITEM","E")
Search stock item
^W1DICT("SEARCHSTOCKITEM","H")
i`ln hixt ytg
^W1DICT("SELLPRICEZEROITEM?","E")
Will sell item with price 0
^W1DICT("SELLPRICEZEROITEM?","H")
0 xign mr hixt xeknl m`d
^W1DICT("SELMAP","E")
Select a map
^W1DICT("SELMAP","H")
dtn xga
^W1DICT("SEND","E")
Send
^W1DICT("SEND","H")
xcy
^W1DICT("SEND","R")
Otpravit!m
^W1DICT("SEND2BOLET","E")
Interface to "Bolet"
^W1DICT("SEND2BOLET","H")
"hlea" -l wynn
^W1DICT("SEND2BZBRA","E")
Interface to "Bizobra"
^W1DICT("SEND2BZBRA","H")
"dxaefia" -l wynn
^W1DICT("SEND2CUST","E")
Sent
^W1DICT("SEND2CUST","H")
-a glyp
^W1DICT("SEND2CUST","R")
Otpravlen v
^W1DICT("SEND2DLV","E")
Send a menu to a delivery site
^W1DICT("SEND2DLV","H")
migelyn xz`l hixtz xeciy
^W1DICT("SEND2FAX","E")
Send to fax
^W1DICT("SEND2FAX","H")
qwtl gly
^W1DICT("SEND2KITCHEN","E")
Send to kitchen and exit
^W1DICT("SEND2KITCHEN","H")
`ve gahnl xby
^W1DICT("SEND2KTCH","E")
Send to kitchen
^W1DICT("SEND2KTCH","H")
gahnl xby
^W1DICT("SEND2MAIL","E")
Send to e-mail
^W1DICT("SEND2MAIL","H")
l"`ecl gly
^W1DICT("SEND2MAIL?","E")
Send to e-mail ?
^W1DICT("SEND2MAIL?","H")
? l"`ecl gelyl
^W1DICT("SEND2OTHERBRANCH","E")
Send order to other branch
^W1DICT("SEND2OTHERBRANCH","H")
xg` sipql dpnfd xcy
^W1DICT("SEND2SELF","E")
Send to yourself
^W1DICT("SEND2SELF","H")
jnvrl gly
^W1DICT("SEND2SHVA","E")
Send to ABS
^W1DICT("SEND2SHVA","H")
`"ayl xeciy
^W1DICT("SEND2WHATSAPP","E")
Send to "WhatsApp"
^W1DICT("SEND2WHATSAPP","H")
"t`qh`ee" -l gly
^W1DICT("SENDAGAIN","E")
Send again
^W1DICT("SENDAGAIN","H")
aey xcy
^W1DICT("SENDALLBID2MAIL","E")
Send all quotes to email
^W1DICT("SENDALLBID2MAIL","H")
l"`ecl xign zervd lk gly
^W1DICT("SENDDLV","E")
Send Deliveries
^W1DICT("SENDDLV","H")
migelyn xby
^W1DICT("SENDED","E")
Sent
^W1DICT("SENDED","H")
xcey
^W1DICT("SENDED2PRINT","E")
Sent to print at $1
^W1DICT("SENDED2PRINT","H")
$1 -a dqtcdl glyp
^W1DICT("SENDEDORDS","E")
Orders sent
^W1DICT("SENDEDORDS","H")
eglypy zepnfd
^W1DICT("SENDEDORDSONLY","E")
Only orders sent
^W1DICT("SENDEDORDSONLY","H")
eglypy zepnfd wx
^W1DICT("SENDEDTIME","E")
Transmit time
^W1DICT("SENDEDTIME","H")
xebiy onf
^W1DICT("SENDING2SHVADOING","E")
Transmission to ABS in progress ...
^W1DICT("SENDING2SHVADOING","H")
`"ayl xeciy rvazn
^W1DICT("SENDINGDATALIST","E")
List of data transmissions to websites
^W1DICT("SENDINGDATALIST","H")
mixz`l mipezp ixeciy zniyx
^W1DICT("SENDINGFAILURE","E")
Connection  faild
^W1DICT("SENDINGFAILURE","H")
lykp xeciy
^W1DICT("SENDINGINPROGRESS","E")
Previous transmission not yet finished
^W1DICT("SENDINGINPROGRESS","H")
miizqd `l cer mcew xeciy
^W1DICT("SENDINGORDER2BL","E")
Send order to "Buisness Logic"
^W1DICT("SENDINGORDER2BL","H")
"wi'bel qpfia"-l dpnfd xebiy
^W1DICT("SENDINGPROTOCOL","E")
Data transmission protocol
^W1DICT("SENDINGPROTOCOL","H")
mipezp xeciy lewehext
^W1DICT("SENDINGSTARTED","E")
Transmission started! transmission results can be seen  in a protocol
^W1DICT("SENDINGSTARTED","H")
mipezp xeciy lwehexta zewc dnk ixg` ze`xl ozip xeciy ze`vez ! ligzd xeciy
^W1DICT("SENDINGSUCCESSFULL","E")
Transmition passed
^W1DICT("SENDINGSUCCESSFULL","H")
dglvda xar xeciy
^W1DICT("SENDITEMS2CIBUS","E")
Send Menu to SODEXO
^W1DICT("SENDITEMS2CIBUS","H")
SODEXO - l hixtz xeciy
^W1DICT("SENDITEMS2NET","E")
Transmission of items to the server
^W1DICT("SENDITEMS2NET","H")
yicex txihim lxyz
^W1DICT("SENDITEMS2WEB","E")
Send Items to Site
^W1DICT("SENDITEMS2WEB","H")
mixz`l mihixt xeciy
^W1DICT("SENDKASHRUT","E")
Attach a kashrut certificate
^W1DICT("SENDKASHRUT","H")
zexyk zcerz sxv
^W1DICT("SENDMAIL2CUST","E")
Send a message to a group of customers
^W1DICT("SENDMAIL2CUST","H")
zegewl zveawl drced xebiy
^W1DICT("SENDMAILPROTOCOL","E")
Protocol of emails sending
^W1DICT("SENDMAILPROTOCOL","H")
miliin xeciy lewehext
^W1DICT("SENDMENU","E")
Attach a menu
^W1DICT("SENDMENU","H")
hixtz sxv
^W1DICT("SENDNMB","E")
Transmission number
^W1DICT("SENDNMB","H")
xeciy 'qn
^W1DICT("SENDNOPRINT","E")
Save without printing
^W1DICT("SENDNOPRINT","H")
dqtcd `ll xeny
^W1DICT("SENDORDERS","E")
Sending shipments
^W1DICT("SENDORDERS","H")
migelyn xebiy
^W1DICT("SENDORDERS2KITCHEN","E")
Sending orders to kitchen
^W1DICT("SENDORDERS2KITCHEN","H")
gahnl zepnfd xebiy 
^W1DICT("SENDORDERSPROTOCOL","E")
Sending orders protocol
^W1DICT("SENDORDERSPROTOCOL","H")
zepnfd ixeciy g"ec
^W1DICT("SENDORDERSPROTOCOL","R")
Protokol sv!azi
^W1DICT("SENDORPRINT","E")
Print / Email
^W1DICT("SENDORPRINT","H")
l"`ecl gly / qtcd
^W1DICT("SENDPSW","E")
You'll receive your password to e-mail address written in Your user card
^W1DICT("SENDPSW","H")
dnyxda zpiivy liin-i` zaezkl jlyiz dnqiq
^W1DICT("SENDPSW","R")
Vy polu!4ite parol!m na !%e-mail!% ukazanny!i v registracii
^W1DICT("SENDTHROUGHPELECARD","E")
Transmission to the ABS is done via the Pelecard system.
^W1DICT("SENDTHROUGHPELECARD","H")
cxw`lt zkxrn jxc rvazn `"ayl xeciy
^W1DICT("SENDTIME","E")
Transmission time
^W1DICT("SENDTIME","H")
xeciy onf
^W1DICT("SENDTO","E")
Send to
^W1DICT("SENDTO","H")
zaezkl xcey 
^W1DICT("SENDTO","R")
Poslan po adresu
^W1DICT("SENDZIC","E")
Should send a credit to the customer?
^W1DICT("SENDZIC","H")
gewll iekif gelyl m`d
^W1DICT("SENDZMAIL","E")
Send closing day data to E-mail
^W1DICT("SENDZMAIL","H")
mei zxibq ipezp l"`ecl xeciy
^W1DICT("SERIAL","E")
Serial #
^W1DICT("SERIAL","H")
il`ixq 'qn
^W1DICT("SERKUPREPORT","E")
View Printouts
^W1DICT("SERKUPREPORT","H")
dtew hxq zbvd
^W1DICT("SERVICE","E")
Service
^W1DICT("SERVICE","H")
zexiy
^W1DICT("SERVICECARD","E")
Receipt certificate for repairing
^W1DICT("SERVICECARD","H")
oewizl dlaw zcerz
^W1DICT("SERVICEINVOICE","E")
Service Invoice (free text)
^W1DICT("SERVICEINVOICE","H")
( iyteg hqwh ) zexiy zipeayg
^W1DICT("SERVICEINVOICES","E")
Service Invoice
^W1DICT("SERVICEINVOICES","H")
zexiy zeipeayg
^W1DICT("SERVICEPARAMETERS","E")
Customer service parameters
^W1DICT("SERVICEPARAMETERS","H")
zegewl zexiyl mixhnxt
^W1DICT("SERVICEPROGRAMMS","E")
Service Programms
^W1DICT("SERVICEPROGRAMMS","H")
zexiy zeipkez
^W1DICT("SERVICESIGN","E")
Signature of recipient
^W1DICT("SERVICESIGN","H")
lawnd znizg
^W1DICT("SET","E")
Set
^W1DICT("SET","H")
$1 hq
^W1DICT("SET","R")
Set
^W1DICT("SETCODE","E")
Set id
^W1DICT("SETCODE","H")
hq cew
^W1DICT("SETCODE","R")
Kod seta
^W1DICT("SETCONTENT","E")
Content of set $1 $2
^W1DICT("SETCONTENT","H")
$2 $1 hq okez
^W1DICT("SETINUSE","E")
Set in use in following deals
^W1DICT("SETINUSE","H")
ze`ad zegex`a yeniya hq
^W1DICT("SETITEMSTABLE","E")
Products to Set relation
^W1DICT("SETITEMSTABLE","H")
"mihixt - hq" dlah
^W1DICT("SETITEMSTABLE","R")
Tablica "Set - bl!uda"
^W1DICT("SETITEMSTOSALE","E")
Table "set items for the offer"
^W1DICT("SETITEMSTOSALE","H")
"rvanl mihixt hq" dlah
^W1DICT("SETMAX","E")
Maximum quantity
^W1DICT("SETMAX","H")
dxigal iaxin xtqn
^W1DICT("SETMAX","R")
Maksimal!mnoe zna!4enie vybora
^W1DICT("SETMEATTABLE","E")
List of meat items
^W1DICT("SETMEATTABLE","H")
xya ihixt zniyx
^W1DICT("SETMX","E")
Maximum quantity
^W1DICT("SETMX","H")
iaxin zenk
^W1DICT("SETNAME","E")
Set description
^W1DICT("SETNAME","H")
hq my
^W1DICT("SETNAME","R")
Naim-e
^W1DICT("SETNUMBERISWRONG","E")
Wrong set number
^W1DICT("SETNUMBERISWRONG","H")
ieby hq 'qn
^W1DICT("SETORGROUPMUSTBEFILLED","E")
Select a group or set
^W1DICT("SETORGROUPMUSTBEFILLED","H")
hq e` dveaw xegal yi
^W1DICT("SETREPORT","E")
Report by sets
^W1DICT("SETREPORT","H")
hq itl g"ec
^W1DICT("SETREPORTTABLE","E")
Set of products for reports
^W1DICT("SETREPORTTABLE","H")
g"ecl mihixt hq
^W1DICT("SETSALETABLE","E")
Items set for a sale
^W1DICT("SETSALETABLE","H")
rvanl mihixt hq
^W1DICT("SETSTABLE","E")
Form product sets
^W1DICT("SETSTABLE","H")
mihq zlah
^W1DICT("SETSTABLE","R")
Tablica setim
^W1DICT("SETUP","E")
Setup
^W1DICT("SETUP","H")
dpwzd
^W1DICT("SHABAT","E")
Restaurant is close at this date. Shabat shalom !
^W1DICT("SHABAT","H")
mlekl mely zay<>dxebq dcrqnd dfd jix`za
^W1DICT("SHABAT","R")
V !etot den!m restoran ne rabotaet. Priyatnyh vyhodnyh
^W1DICT("SHABAT1","E")
Time  after Shabbat ended.
^W1DICT("SHABAT1","H")
zay z`v ixg` dry
^W1DICT("SHABAT2","E")
Two hours after sabbath ended.
^W1DICT("SHABAT2","H")
zay z`v ixg` miizry
^W1DICT("SHAKIL","E")
Weighted
^W1DICT("SHAKIL","H")
liwy
^W1DICT("SHIFTHOWMUCH","E")
How much to move
^W1DICT("SHIFTHOWMUCH","H")
d`ld
^W1DICT("SHIFTINVALID","E")
Incorrect shift value
^W1DICT("SHIFTINVALID","H")
dekp `l d`ld
^W1DICT("SHIFTMINIMUM","E")
Minimum of shift is $1
^W1DICT("SHIFTMINIMUM","H")
$1 `id ilnipin d`ld
^W1DICT("SHIFTREPORT","E")
Report by shifts
^W1DICT("SHIFTREPORT","H")
zexnyn itl g"ec
^W1DICT("SHIMUSHIT","E")
S h i m u s h i t
^W1DICT("SHIMUSHIT","H")
z i y e n i y
^W1DICT("SHIMUSHITPRINTED","E")
Document produced by software "Shimushit" version 1/0
^W1DICT("SHIMUSHITPRINTED","H")
1.0 dqxib "ziyeniy" dpkez ici lr wted jnqn
^W1DICT("SHIPPINGBACKRECORDS","E")
Customer return certificate
^W1DICT("SHIPPINGBACKRECORDS","H")
gewll xfgd zcerz
^W1DICT("SHIPPINGBACKRECORDSISSUE","E")
Producing customer return certificates
^W1DICT("SHIPPINGBACKRECORDSISSUE","H")
gewll xfgd zecerz zwtd
^W1DICT("SHIPPINGRECORDS","E")
Delivery Note
^W1DICT("SHIPPINGRECORDS","H")
gewll gelyn zcerz
^W1DICT("SHIPPINGRECORDSCSR","E")
Customer delivery note (POS items)
^W1DICT("SHIPPINGRECORDSCSR","H")
(dtew ihixt) gewll gelyn zcerz
^W1DICT("SHIPPINGRECORDSISSUE","E")
Issue of delivery documents
^W1DICT("SHIPPINGRECORDSISSUE","H")
gelyn zecerz zwtd
^W1DICT("SHIPPINGRECORDSMLY","E")
Customer delivery note (stock items)
^W1DICT("SHIPPINGRECORDSMLY","H")
(i`ln ihixt) gewll gelyn zcerz
^W1DICT("SHLUHA","E")
Extension
^W1DICT("SHLUHA","H")
dgely
^W1DICT("SHNH","E")
Sum of Discounts : $1 shekels
^W1DICT("SHNH","H")
g"y $1 : zegpd k"dq
^W1DICT("SHNH1","E")
Sum of extra Discounts : $1 shekels
^W1DICT("SHNH1","H")
g"y $1 : zetqep zegpd k"dq
^W1DICT("SHNHA","E")
Sum of Discounts
^W1DICT("SHNHA","H")
zegpd k"dq
^W1DICT("SHORTASR","E")
Cr
^W1DICT("SHORTASR","H")
d
^W1DICT("SHORTCA","E")
CrC
^W1DICT("SHORTCA","H")
`
^W1DICT("SHORTCASH","E")
Csh
^W1DICT("SHORTCASH","H")
n
^W1DICT("SHORTCHECK","E")
Ch
^W1DICT("SHORTCHECK","H")
v
^W1DICT("SHORTMANYPERIOD","E")
Sales report for the period $1
^W1DICT("SHORTMANYPERIOD","H")
$1 dtewzl zexikn g"ec
^W1DICT("SHORTMANYREPORT","E")
Short financial report (before VAT)
^W1DICT("SHORTMANYREPORT","H")
( n"rn iptl ) xvewn itqk g"ec
^W1DICT("SHORTSHOW","E")
Limited presentation
^W1DICT("SHORTSHOW","H")
znvnevn dbvd
^W1DICT("SHORTWATCHREPORT","E")
Report of workers hours (general)
^W1DICT("SHORTWATCHREPORT","H")
xvewn micaer zery g"ec
^W1DICT("SHOTEF","E")
Payment current +
^W1DICT("SHOTEF","H")
+ shey melyz
^W1DICT("SHOW","E")
Display
^W1DICT("SHOW","H")
bvd
^W1DICT("SHOW","R")
Pokazat!m
^W1DICT("SHOW3DAYS","E")
Show next 3 days
^W1DICT("SHOW3DAYS","H")
miaexwd mini 3 bvd
^W1DICT("SHOWACTIVEMSGONLY","E")
Show active messages only
^W1DICT("SHOWACTIVEMSGONLY","H")
cala zelirt zerced bvd
^W1DICT("SHOWACTWORKERSONLY","E")
Show only active employees
^W1DICT("SHOWACTWORKERSONLY","H")
cala milirt micaer bvd
^W1DICT("SHOWALLCALLBIDS","E")
Show all quotes with a reminder to call
^W1DICT("SHOWALLCALLBIDS","H")
xywzdl zxekfz mr xign zervdd lk bvd
^W1DICT("SHOWALLDOCS","E")
Show all documents
^W1DICT("SHOWALLDOCS","H")
miknqnd lk bvd
^W1DICT("SHOWALLITEMS","E")
Show all items
^W1DICT("SHOWALLITEMS","H")
mihixt lk bvd
^W1DICT("SHOWALLKINDORDS","E")
Show all types of orders
^W1DICT("SHOWALLKINDORDS","H")
zepnfdd ibeq lk bvd
^W1DICT("SHOWALLMOVEMENTS","E")
Display all transactions
^W1DICT("SHOWALLMOVEMENTS","H")
zerepzd lk bvd
^W1DICT("SHOWALLORDERS","E")
Display all orders
^W1DICT("SHOWALLORDERS","H")
zepnfdd lk bvd
^W1DICT("SHOWALLORDS","E")
Show all orders
^W1DICT("SHOWALLORDS","H")
zepnfdd lk bvd
^W1DICT("SHOWALLREPORTS","E")
Show all reports
^W1DICT("SHOWALLREPORTS","H")
zeg"ecd lk bvd
^W1DICT("SHOWALLREST","E")
Show all restaurants
^W1DICT("SHOWALLREST","H")
zecrqnd lk bvd
^W1DICT("SHOWANDPAYORD","E")
Show Order
^W1DICT("SHOWANDPAYORD","H")
dpnfd mlye bvd
^W1DICT("SHOWARCHIV","E")
Show archive
^W1DICT("SHOWARCHIV","H")
oeikx` bvd
^W1DICT("SHOWBIDS","E")
Bids
^W1DICT("SHOWBIDS","H")
xign zervd
^W1DICT("SHOWBIDTB","E")
10 Bis Bids
^W1DICT("SHOWBIDTB","H")
10BIS xign zervd
^W1DICT("SHOWBONUS","E")
Display all
^W1DICT("SHOWBONUS","H")
zeahd bvd
^W1DICT("SHOWCHOICE","E")
Display selection
^W1DICT("SHOWCHOICE","H")
dxigaa bvd
^W1DICT("SHOWCLOSEDITEMS","E")
Show locked items
^W1DICT("SHOWCLOSEDITEMS","H")
milerp mihixt bvd
^W1DICT("SHOWCLOSEDITEMSONLY","E")
Show only items not shown in the menu
^W1DICT("SHOWCLOSEDITEMSONLY","H")
hixtza mibven `l mihixt wx bvd
^W1DICT("SHOWCOLOR","E")
Color in view
^W1DICT("SHOWCOLOR","H")
dbvda rav
^W1DICT("SHOWCOMMENTS","E")
Show comments
^W1DICT("SHOWCOMMENTS","H")
zexrd bvd
^W1DICT("SHOWCONCDEP","E")
Concentration of departments
^W1DICT("SHOWCONCDEP","H")
zewlgn fekix
^W1DICT("SHOWCONT","E")
Show content
^W1DICT("SHOWCONT","H")
okez bvd
^W1DICT("SHOWCREDITCUSTOMERS","E")
Display customers paied by credit
^W1DICT("SHOWCREDITCUSTOMERS","H")
dtwda mipewy zegewl bvd
^W1DICT("SHOWCREDITCUSTOMERS","R")
Pokazat!m klientov pokupa!u!sih v credit
^W1DICT("SHOWCSRFILM","E")
Viewing a POS transactions
^W1DICT("SHOWCSRFILM","H")
zxewia hxq zbvd
^W1DICT("SHOWCUSTLIST","E")
Show receivers list
^W1DICT("SHOWCUSTLIST","H")
milawn zniyx bvd
^W1DICT("SHOWCUSTOMERSDELIVERYFREE","E")
Display clients exempted from delivery fees
^W1DICT("SHOWCUSTOMERSDELIVERYFREE","H")
gelyn incn mixeht zegewl bvd
^W1DICT("SHOWCUSTOMERSDELIVERYFREE","R")
Pokazat!m klientov osv-h ot uplaty za dostavku
^W1DICT("SHOWCUSTOMERSGROUPSWITHPRICESLISTONLY","E")
Display only groups of clients with price list
^W1DICT("SHOWCUSTOMERSGROUPSWITHPRICESLISTONLY","H")
oexign mr 'wl zeveaw wx bvd
^W1DICT("SHOWCUSTOMERSWITHPRICESLISTONLY","E")
Display only clients with price list
^W1DICT("SHOWCUSTOMERSWITHPRICESLISTONLY","H")
oexign mr zegewl wx bvd
^W1DICT("SHOWCUSTREPORT","E")
Display clients report
^W1DICT("SHOWCUSTREPORT","H")
zqhxk bvd
^W1DICT("SHOWCUSTWITHBALANCEONLY","E")
Show only customers with a balance
^W1DICT("SHOWCUSTWITHBALANCEONLY","H")
dxzi mr zegewl wx bvd
^W1DICT("SHOWDAYS","E")
Display days
^W1DICT("SHOWDAYS","H")
mini bvd
^W1DICT("SHOWDEAL","E")
Show a deal
^W1DICT("SHOWDEAL","H")
dwqr bvd
^W1DICT("SHOWDELETEDORDS","E")
Show canceled orders
^W1DICT("SHOWDELETEDORDS","H")
zelhean
^W1DICT("SHOWDETAILFORM","E")
List of transmissions in detail
^W1DICT("SHOWDETAILFORM","H")
zhxetn dxeva mixeciy zniyx
^W1DICT("SHOWDETAILREP","E")
View detailed report
^W1DICT("SHOWDETAILREP","H")
hxetn g"ec bvd
^W1DICT("SHOWDLVPAY","E")
Delivery fee list
^W1DICT("SHOWDLVPAY","H")
gelyn inc zlah
^W1DICT("SHOWDLVPAY","R")
Stoimost!m dostavki
^W1DICT("SHOWDOCSWITHOUTINVOICES","E")
View non-invoiced documents
^W1DICT("SHOWDOCSWITHOUTINVOICES","H")
zipeayg mdl dwted `ly miknqn bvd
^W1DICT("SHOWDOCUMENT","E")
View Document
^W1DICT("SHOWDOCUMENT","H")
jnqn bvd
^W1DICT("SHOWDOTS","E")
Show points
^W1DICT("SHOWDOTS","H")
zecewp bvd
^W1DICT("SHOWEXISTTABLES","E")
Show existing tables
^W1DICT("SHOWEXISTTABLES","H")
miniiw zepgley zbvd
^W1DICT("SHOWEXISTTREEONLY","E")
Show only existing sets
^W1DICT("SHOWEXISTTREEONLY","H")
miniiw mihq wx bvd
^W1DICT("SHOWFASTGR","E")
"Speed" groups
^W1DICT("SHOWFASTGR","H")
"zexidn" zeveaw
^W1DICT("SHOWFILE","E")
Show file
^W1DICT("SHOWFILE","H")
uaew bvd
^W1DICT("SHOWFIRELIST","E")
Do you view a list of printers to send FIRE
^W1DICT("SHOWFIRELIST","H")
FIRE xebiya zeqtcn zniyx bivdl m`d
^W1DICT("SHOWFULLHD","E")
Show full header
^W1DICT("SHOWFULLHD","H")
d`ln zxzek bvd
^W1DICT("SHOWFULLLIST","E")
Show all
^W1DICT("SHOWFULLLIST","H")
lkd bvd
^W1DICT("SHOWFUTUREORDS","E")
Show future orders
^W1DICT("SHOWFUTUREORDS","H")
zeicizr zepnfd
^W1DICT("SHOWGALLERY","E")
To see photos; place a marker on the "Eye" or click "Gallery"
^W1DICT("SHOWGALLERY","H")
"dixlb" wilw e` "oir" lr onq miy zepenz ze`xl ick
^W1DICT("SHOWGALLERY","R")
Dl!a pokaza kartinok kliknite na "gallere!u"
^W1DICT("SHOWHEADER","E")
Show a Header
^W1DICT("SHOWHEADER","H")
zxzek bvd
^W1DICT("SHOWHISTORY","E")
Display history
^W1DICT("SHOWHISTORY","H")
dixehqd bvd
^W1DICT("SHOWHISTORYFROMDATE","E")
View history from date
^W1DICT("SHOWHISTORYFROMDATE","H")
jix`zn dixehqd bvd
^W1DICT("SHOWHISTORYSNDMAIL2CUST","E")
History transmissions email to customers
^W1DICT("SHOWHISTORYSNDMAIL2CUST","H")
zegewll l"`ec ixeciy dixehqd
^W1DICT("SHOWHISTVC","E")
Valuecard customer history
^W1DICT("SHOWHISTVC","H")
cxweilee gewl ly dixehqd
^W1DICT("SHOWHOURDECIMAL","E")
Show total hours in decimal form
^W1DICT("SHOWHOURDECIMAL","H")
zipexyr dxeva zery k"dq bvd
^W1DICT("SHOWINMENU","E")
Show in Menu
^W1DICT("SHOWINMENU","H")
hixtza bvd
^W1DICT("SHOWINVOICECOPY","E")
View Invoice / Order
^W1DICT("SHOWINVOICECOPY","H")
dpnfd / zipeayg bvd
^W1DICT("SHOWINVOICES","E")
The screen of invoices
^W1DICT("SHOWINVOICES","H")
zeipeayg bvd
^W1DICT("SHOWINVOICESNOTPAIDEDINTIME","E")
Show only invoices that have not been paid on time
^W1DICT("SHOWINVOICESNOTPAIDEDINTIME","H")
onfa enley `ly zeipeayg wx bvd
^W1DICT("SHOWITCMNTONLY","E")
Display products with comments relation  only
^W1DICT("SHOWITCMNTONLY","H")
zexrd mr mihixt wx bivdl
^W1DICT("SHOWITCODES","E")
Show item codes
^W1DICT("SHOWITCODES","H")
mihixt ly micew bvd
^W1DICT("SHOWITEMCARD","E")
View item card
^W1DICT("SHOWITEMCARD","H")
hixt qihxk bvd
^W1DICT("SHOWITEMGROUPSACCORDINGTOTIME","E")
Set product groups activation  by week days and hours
^W1DICT("SHOWITEMGROUPSACCORDINGTOTIME","H")
reay inie zery itl mihixt zeveaw zbvd
^W1DICT("SHOWITEMSACCORDINGTOTIME","E")
Set products  activation  by week days and hours
^W1DICT("SHOWITEMSACCORDINGTOTIME","H")
reay inie zery itl mihixt zbvd
^W1DICT("SHOWITEMSADDSONLY","E")
Display Products with additions relation only
^W1DICT("SHOWITEMSADDSONLY","H")
zetqez mr mihixt wx bivdl
^W1DICT("SHOWITEMSADDSONLY","R")
Pokazat!m tol!mko bl!uda s dobavkami
^W1DICT("SHOWITEMSDESCSHORT","E")
Show item description in abbreviated form
^W1DICT("SHOWITEMSDESCSHORT","H")
zxvewn dxeva mihixt akxd xe`z bvd
^W1DICT("SHOWITEMSGROUPACCORDINGTOTIME","E")
Set product groups activation  by week days and hours
^W1DICT("SHOWITEMSGROUPACCORDINGTOTIME","H")
reay inie zery itl mihixt zeveaw zbvd
^W1DICT("SHOWITEMSINDOC","E")
Show Items in Document
^W1DICT("SHOWITEMSINDOC","H")
dcerza mihixt bvd
^W1DICT("SHOWITEMSINDOCAB","E")
Display items in the document in alphabetical order
^W1DICT("SHOWITEMSINDOCAB","H")
iza`tl` xcqa dcerza mihixt bvd
^W1DICT("SHOWITEMSINDOCNUM","E")
Display items in the document in numerical order
^W1DICT("SHOWITEMSINDOCNUM","H")
ixnep xcqa dcerza mihixt bvd
^W1DICT("SHOWITEMSTREEONLY","E")
Display product trees only
^W1DICT("SHOWITEMSTREEONLY","H")
cala xven ivr bivdl
^W1DICT("SHOWITEMTREE","E")
Display product tree
^W1DICT("SHOWITEMTREE","H")
xven ur bvd
^W1DICT("SHOWITTREE","E")
Display product tree
^W1DICT("SHOWITTREE","H")
xven ur bvd
^W1DICT("SHOWKASHRUTFILE","E")
Show kosher certificate
^W1DICT("SHOWKASHRUTFILE","H")
zexyk zcerz bvd
^W1DICT("SHOWLASTCUST","E")
Show last customer
^W1DICT("SHOWLASTCUST","H")
oexg` gewl bvd
^W1DICT("SHOWLASTDOCUMENTS","E")
Show $1 recent documents
^W1DICT("SHOWLASTDOCUMENTS","H")
mipexg` miknqn $1 bvd
^W1DICT("SHOWLASTORDS","E")
Show recent orders
^W1DICT("SHOWLASTORDS","H")
zepexg` zepnfd bvd
^W1DICT("SHOWLUNCHSONLY","E")
Display deal products only
^W1DICT("SHOWLUNCHSONLY","H")
cala zegex` bivdl
^W1DICT("SHOWLUNCHSONLY","R")
Pokazat!m tol!mko kompleksnye obedy
^W1DICT("SHOWMAILINVCUST","E")
Show customers who receive email invoices
^W1DICT("SHOWMAILINVCUST","H")
l"`ecl zeipeayg milawny zegewl bvd
^W1DICT("SHOWMAINCUSTOMS","E")
Display head clients only
^W1DICT("SHOWMAINCUSTOMS","H")
cala miiy`x zegewl bvd
^W1DICT("SHOWMAPLOCATION","E")
Show address on map
^W1DICT("SHOWMAPLOCATION","H")
dtna zaezk bvd
^W1DICT("SHOWMENU","E")
To Menu
^W1DICT("SHOWMENU","H")
hixtzl
^W1DICT("SHOWMENUPERDAYS","E")
Menu table by days
^W1DICT("SHOWMENUPERDAYS","H")
mini itl mihixtz zlah
^W1DICT("SHOWNOPAIDORDERS","E")
Display unpaid orders only
^W1DICT("SHOWNOPAIDORDERS","H")
enley `ly zepnfd bvd
^W1DICT("SHOWNOPAIDORDS","E")
Not paid
^W1DICT("SHOWNOPAIDORDS","H")
zenleyn `l
^W1DICT("SHOWNOSENDEDORDERS","E")
Display not sent orders only
^W1DICT("SHOWNOSENDEDORDERS","H")
exbey `ly zepnfd bvd
^W1DICT("SHOWNOSENDEDORDS","E")
Not sent
^W1DICT("SHOWNOSENDEDORDS","H")
eglyp `l
^W1DICT("SHOWNOTDLVORDS","E")
Show unsent invitations
^W1DICT("SHOWNOTDLVORDS","H")
eglyp `ly zepnfd bvd
^W1DICT("SHOWNOTSUPPLORDS","E")
Show undeliveried orders
^W1DICT("SHOWNOTSUPPLORDS","H")
ewteq `ly zepnfd bvd
^W1DICT("SHOWOPENDEALSONLY","E")
Show deal invoices not closed by tax invoices
^W1DICT("SHOWOPENDEALSONLY","H")
qn zeipeayg ici lr zexebq `ly dwqr ziepeayg bvd
^W1DICT("SHOWOPENINVOICESONLY","E")
Display open invoices only
^W1DICT("SHOWOPENINVOICESONLY","H")
cala zegezt ziepeayg bvd
^W1DICT("SHOWOPENITEMSONLY","E")
Show only items displayed in the menu
^W1DICT("SHOWOPENITEMSONLY","H")
hixtza mibven mihixt wx bvd
^W1DICT("SHOWOPENORDERSONLY","E")
Display open orders only
^W1DICT("SHOWOPENORDERSONLY","H")
cala zegezt zepnfd bvd
^W1DICT("SHOWORD","E")
View Order
^W1DICT("SHOWORD","H")
dpnfd bvd
^W1DICT("SHOWORD","R")
Pokazat!m zakaz
^W1DICT("SHOWORDERCOPY","E")
Show order copy
^W1DICT("SHOWORDERCOPY","H")
dpnfd wzrd bvd
^W1DICT("SHOWORDERHEADER","E")
View order header
^W1DICT("SHOWORDERHEADER","H")
dpnfd zxzek bvd
^W1DICT("SHOWORDERS","E")
Show Orders
^W1DICT("SHOWORDERS","H")
zepnfd bvd
^W1DICT("SHOWORDERSNOTREADY","E")
Not ready
^W1DICT("SHOWORDERSNOTREADY","H")
zepken `l
^W1DICT("SHOWORDERSREADY","E")
Ready
^W1DICT("SHOWORDERSREADY","H")
zepken
^W1DICT("SHOWPAIDORDS","E")
Paid
^W1DICT("SHOWPAIDORDS","H")
zenleyn
^W1DICT("SHOWPAYMENTS","E")
View payments
^W1DICT("SHOWPAYMENTS","H")
minelyz bvd
^W1DICT("SHOWPICTURES","E")
Show Pictures
^W1DICT("SHOWPICTURES","H")
zepenz bvd 
^W1DICT("SHOWPRICES","E")
Show Prices
^W1DICT("SHOWPRICES","H")
mixign bvd
^W1DICT("SHOWPRINT","E")
View & print
^W1DICT("SHOWPRINT","H")
qtcd/bvd
^W1DICT("SHOWPRINT","R")
Raspe!4atat!m
^W1DICT("SHOWPRSNLAREA","E")
Show Personal Area
^W1DICT("SHOWPRSNLAREA","H")
iyi` xef` bvd
^W1DICT("SHOWREADY2TRANSMIT","E")
Display transactions for transmit
^W1DICT("SHOWREADY2TRANSMIT","H")
xeciyl zepken zerepz bvd
^W1DICT("SHOWREPORT","E")
Show Report
^W1DICT("SHOWREPORT","H")
g"ec bvd
^W1DICT("SHOWREPORTTODATE","E")
Dispay report for
^W1DICT("SHOWREPORTTODATE","H")
jix`zl g"ec bvd
^W1DICT("SHOWRESTREPORTS","E")
Show restaurant reports
^W1DICT("SHOWRESTREPORTS","H")
dcrqn zeg"ec bvd
^W1DICT("SHOWSALARY","E")
Show Salary
^W1DICT("SHOWSALARY","H")
zxekyn bvd
^W1DICT("SHOWSCREENPARAMETERS","E")
Set parameters to display
^W1DICT("SHOWSCREENPARAMETERS","H")
dbvdl mixhnxt zxcbd
^W1DICT("SHOWSENDEDORDS","E")
Sent
^W1DICT("SHOWSENDEDORDS","H")
eglyp
^W1DICT("SHOWSET","E")
Display set
^W1DICT("SHOWSET","H")
hq bvd
^W1DICT("SHOWSET","R")
Pokazat!m
^W1DICT("SHOWSETCONTENT","E")
View set details
^W1DICT("SHOWSETCONTENT","H")
hq okez bivdl
^W1DICT("SHOWSETCONTENT","R")
Pok-t!m sod-e seta
^W1DICT("SHOWSHORTFORM","E")
Shortlist of transmissions
^W1DICT("SHOWSHORTFORM","H")
zxvewn dxeva mixeciy zniyx
^W1DICT("SHOWSNDPROT","E")
Show transmission protocol
^W1DICT("SHOWSNDPROT","H")
mixeciy lewehext bvd
^W1DICT("SHOWSUPPLIERSWITHPRICESLISTONLY","E")
Show only vendors with price list
^W1DICT("SHOWSUPPLIERSWITHPRICESLISTONLY","H")
oexign mr miwtq wx bvd
^W1DICT("SHOWSUPPLORD","E")
Open orders list of vendor $1 $2
^W1DICT("SHOWSUPPLORD","H")
$2 $1 wtq ly zegezt zepnfd zniyx
^W1DICT("SHOWSUPPLREPORT","E")
Show Vendor Catalog
^W1DICT("SHOWSUPPLREPORT","H")
wtq zqhxk bvd
^W1DICT("SHOWTAW","E")
TAW
^W1DICT("SHOWTAW","H")
"zgwl"
^W1DICT("SHOWTEL","E")
Show Phone Numbers
^W1DICT("SHOWTEL","H")
miptlh bvd
^W1DICT("SHOWTIME","E")
Show time $1 $2
^W1DICT("SHOWTIME","H")
$2 $1 dbvd onf
^W1DICT("SHOWUNITORDER","E")
Collective order
^W1DICT("SHOWUNITORDER","H")
bivdl . zcge`n dpnfd zniiw
^W1DICT("SHOWUNITORDER","R")
Pokazat!m ob!tedinenny!i zakaz
^W1DICT("SHOWUNTILDATE","E")
Until date
^W1DICT("SHOWUNTILDATE","H")
jix`z cr
^W1DICT("SHOWUNTILDATE","R")
DO DATY
^W1DICT("SHOWVIRTKB","E")
Enable Virtual Keyboard
^W1DICT("SHOWVIRTKB","H")
zil`ehxie zclwn lrtd
^W1DICT("SHOWWEBMENU","E")
Show Menu
^W1DICT("SHOWWEBMENU","H")
hixtz bvd
^W1DICT("SHOWWEBSITE","E")
Show Web Site
^W1DICT("SHOWWEBSITE","H")
xz`l xear
^W1DICT("SHOWWORKERMONTHTIME","E")
View employee arrivals and departures within a month
^W1DICT("SHOWWORKERMONTHTIME","H")
yceg jeza caer ly ze`ivie zeqipk bivdl
^W1DICT("SHOWWORKERMONTHTIME?","E")
Show employee arrivals and departures within a month?
^W1DICT("SHOWWORKERMONTHTIME?","H")
? yceg jeza caer ly ze`ivie zeqipk bivdl
^W1DICT("SHOWYONLY","E")
Show Report Y
^W1DICT("SHOWYONLY","H")
Y g"ec wx bvd
^W1DICT("SHOWZMANY","E")
Show only Z sales report
^W1DICT("SHOWZMANY","H")
Z ly zexikn g"ec wx bvd
^W1DICT("SHOWZONLY","E")
Show only Z  report
^W1DICT("SHOWZONLY","H")
Z g"ec wx bvd
^W1DICT("SHTL","E")
Was paid in the slips
^W1DICT("SHTL","H")
miyelza mley
^W1DICT("SHTLAL","E")
Was paid actually
^W1DICT("SHTLAL","H")
lreta mley
^W1DICT("SHULHAN","E")
Table
^W1DICT("SHULHAN","H")
ogley
^W1DICT("SHULHAN","R")
Stol
^W1DICT("SHULHANMUSTBENUMBER","E")
Table No. must be numeric
^W1DICT("SHULHANMUSTBENUMBER","H")
izxtqiq ziedl xen` ogley 'qn
^W1DICT("SHULHANNUMBERMAX3","E")
Table number up to 3 digits
^W1DICT("SHULHANNUMBERMAX3","H")
zextq 3 cr ogley 'qn
^W1DICT("SHULHANNUMBERNOTDEFINED","E")
A table with this number is not defined in a table
^W1DICT("SHULHANNUMBERNOTDEFINED","H")
zepgley zlaha xcbed `l dfk xtqnd mr ogley
^W1DICT("SHULHANOT","E")
Tables
^W1DICT("SHULHANOT","H")
zepgley
^W1DICT("SHULHANPRM","E")
Tables parameters
^W1DICT("SHULHANPRM","H")
zepgley mixhnxt
^W1DICT("SHURECANCEL","E")
An order going to be  erased ! Are You shure ?
^W1DICT("SHURECANCEL","H")
 xy`l ! wgnz dpnfdd 
^W1DICT("SHURECANCEL","R")
Zakaz budet udalen ! Vy uvereny
^W1DICT("SHVA","E")
Working with SHVA
^W1DICT("SHVA","H")
`"ay mr dcear
^W1DICT("SHVADETAILS","E")
SHVA Report detailed
^W1DICT("SHVADETAILS","H")
hxetn `"ay g"ec
^W1DICT("SHVAEMVINIT","E")
Initialization of EMV devices
^W1DICT("SHVAEMVINIT","H")
EMV ixiykn qeti`
^W1DICT("SHVAREPORTS","E")
SHVA reports
^W1DICT("SHVAREPORTS","H")
`"ay zegec
^W1DICT("SHVATERMINAL","E")
No. of SHVA Terminal
^W1DICT("SHVATERMINAL","H")
`"ay seqn 'qn
^W1DICT("SIGN","E")
Select
^W1DICT("SIGN","H")
onq
^W1DICT("SIGN","R")
Pometit!m
^W1DICT("SIGN2DELETE","E")
Mark to cancel
^W1DICT("SIGN2DELETE","H")
lehial onq
^W1DICT("SIGNALL","E")
Select everything
^W1DICT("SIGNALL","H")
lkd onq
^W1DICT("SIGNATURE","E")
Signature
^W1DICT("SIGNATURE","H")
dnizg
^W1DICT("SIGNCHECKS4DEPOSITION","E")
Mark cheks for deposite
^W1DICT("SIGNCHECKS4DEPOSITION","H")
dcwtdl miwiy onq
^W1DICT("SIGNCOLUMNSFORSHOW","E")
Mark columns to display
^W1DICT("SIGNCOLUMNSFORSHOW","H")
dbvdl zecenr onq
^W1DICT("SIGNCOLUMNSFORSHOW","R")
Otmet!mte kolonki dl!a pokaza
^W1DICT("SIGNCOMPENSATION","E")
Sign compensation
^W1DICT("SIGNCOMPENSATION","H")
miievit myx
^W1DICT("SIGNDISHNUMBER","E")
Mark dish number
^W1DICT("SIGNDISHNUMBER","H")
dpn 'qn onq
^W1DICT("SIGNDOCUMENTS","E")
Mark documents
^W1DICT("SIGNDOCUMENTS","H")
miknqn onql `p
^W1DICT("SIGNEDITEMSNODISCOUNT","E")
Items marked with '*' - no discount
^W1DICT("SIGNEDITEMSNODISCOUNT","H")
! dgpd oi` '*'-a mipneqn mihixtd lr
^W1DICT("SIGNGUESTNUMBERS","E")
Mark the diners
^W1DICT("SIGNGUESTNUMBERS","H")
micreq onq
^W1DICT("SIGNINVOICE2PAY","E")
Mark invoices for payment
^W1DICT("SIGNINVOICE2PAY","H")
melyzl zeipeayg onq
^W1DICT("SIGNITEMORBACK2NORMAL","E")
Click a row that you need to move
^W1DICT("SIGNITEMORBACK2NORMAL","H")
dlibx dbvdl xefgl ick df ywnl ugl e` <BR> ( dxrd `le ztqez `l, zqtcen `l ) <BR> xiardl jilry dxey lr ugl
^W1DICT("SIGNITEMS4OTH","E")
Mark items for OTH discount
^W1DICT("SIGNITEMS4OTH","H")
OTH zgpdl mihixt onq
^W1DICT("SIGNLUNCH2ASC","E")
Mark suitable meal
^W1DICT("SIGNLUNCH2ASC","H")
jeiy lehial <BR> "jeiy" zvayn lr aey ugl e`<BR> ( bxan lr ugl ) dni`zn dgex` onq
^W1DICT("SIGNMAINITEM","H")
iy`x hixt dligz onq
^W1DICT("SIGNPAD","E")
Is Check redeemed
^W1DICT("SIGNPAD","H")
dctp wiy m`d
^W1DICT("SIGNSALEITEM","E")
You deserve an item on sale ! If you are interested; please mark
^W1DICT("SIGNSALEITEM","H")
onql `p (zp)oiipern (d)z` m` <BR> !!! rvana hixt jl ribn
^W1DICT("SINGLECUSTOMARMINVOICE","E")
Issue a service invoice (free text) for a single customer
^W1DICT("SINGLECUSTOMARMINVOICE","H")
ccea gewll ( iyteg hqwh ) zexiy zipeayg zwtd
^W1DICT("SINGLECUSTOMINVOICE","E")
Issue a concentrated invoice for a single customer
^W1DICT("SINGLECUSTOMINVOICE","H")
ccea gewll zfkxn zipeayg zwtd
^W1DICT("SINGLESUPPLARMINVOICE","E")
Purchase Invoice
^W1DICT("SINGLESUPPLARMINVOICE","H")
ykx zipeayg
^W1DICT("SISPTM","E")
Password to open a drawer
^W1DICT("SISPTM","H")
dxibn zgiztl dnqiq
^W1DICT("SITE","E")
Web Site
^W1DICT("SITE","H")
xz`
^W1DICT("SITE","R")
Sa!it
^W1DICT("SITEREP2DAT","E")
Report by sites for $1
^W1DICT("SITEREP2DAT","H")
$1 -l mixz` itl g"ec
^W1DICT("SITEREP2PERIOD","E")
Report by sites from $1 to $2
^W1DICT("SITEREP2PERIOD","H")
$2 cr $1 -n mixz` itl g"ec
^W1DICT("SITINLOCAL","E")
Sitting in place
^W1DICT("SITINLOCAL","H")
mewna daiyi
^W1DICT("SIZE","E")
Size
^W1DICT("SIZE","H")
dcin
^W1DICT("SIZETABLE","E")
Sizes Table
^W1DICT("SIZETABLE","H")
zecin zlah
^W1DICT("SKIOSKCA","E")
Credit kiosk
^W1DICT("SKIOSKCA","H")
wqeiw i`xy`
^W1DICT("SKIP","E")
Skip
^W1DICT("SKIP","H")
blc
^W1DICT("SKIP","R")
Propustit!m
^W1DICT("SLHFKMZM","E")
Depositing cash from the couriers to POS
^W1DICT("SLHFKMZM","H")
dtewa migilydn onefn zcwtd
^W1DICT("SLKHNH","E")
Total discounts to the customers on credit $1 shekels
^W1DICT("SLKHNH","H")
g"y $1 dtwda zegewll zegpd k"dq
^W1DICT("SLKHNHDETAILS","E")
Breakdown of discounts is possible/given to see in detail payments of the coffee
^W1DICT("SLKHNHDETAILS","H")
dtwd inelyz hexita ze`xl ozip zegpd hexit
^W1DICT("SLRADD1","E")
Salary to extra hours 1
^W1DICT("SLRADD1","H")
1 zetqep dryl zxekyn
^W1DICT("SLRADD2","E")
Salary to extra hours 2
^W1DICT("SLRADD2","H")
2 zetqep dryl zxekyn
^W1DICT("SLRDAY","E")
Dayly salary
^W1DICT("SLRDAY","H")
inei zxekyn
^W1DICT("SLRDAYSHBT","E")
Saturday salary
^W1DICT("SLRDAYSHBT","H")
zay mei zxekyn
^W1DICT("SLRMONTH","E")
Monthly salary
^W1DICT("SLRMONTH","H")
iyceg zxekyn
^W1DICT("SLRMSHM1","E")
Salary of shift 1
^W1DICT("SLRMSHM1","H")
1 zxnyn zxekyn
^W1DICT("SLRMSHM2","E")
Salary of shift 2
^W1DICT("SLRMSHM2","H")
2 zxnyn zxekyn
^W1DICT("SLRMSHM3","E")
Salary of shift 3
^W1DICT("SLRMSHM3","H")
3 zxnyn zxekyn
^W1DICT("SLRNORMAL","E")
Hourly salary
^W1DICT("SLRNORMAL","H")
dryl zxekyn
^W1DICT("SLRSHBT","E")
Saturday hourly salary
^W1DICT("SLRSHBT","H")
zay zryl zxekyn
^W1DICT("SMARTCASH2CSR","E")
Depositing money into a smart drawer
^W1DICT("SMARTCASH2CSR","H")
dnkg dxibnl sqk zcwtd
^W1DICT("SMARTCASH4CSR","E")
Unloading money from the smart drawer
^W1DICT("SMARTCASH4CSR","H")
dnkg dxibndn sqk zwixt
^W1DICT("SND2CIBPROTOCOL","E")
Menu transmission protocol for SODEXO
^W1DICT("SND2CIBPROTOCOL","H")
SODEXO - l hixtz ixeciy ly lewehext
^W1DICT("SND2MAIL","E")
Where to send an order/invoice?
^W1DICT("SND2MAIL","H")
zipeayg/dpnfd xcyl o`l
^W1DICT("SND2SRVAGAIN","E")
Retransmit to server
^W1DICT("SND2SRVAGAIN","H")
zxyl xfeg xeciy
^W1DICT("SNDOUT","E")
Transfer of data to the "Marketman"
^W1DICT("SNDOUT","H")
"onhwxn" dpkezl mipezp zxard
^W1DICT("SNDOUTPRM","E")
Parameters for transferring data to external system
^W1DICT("SNDOUTPRM","H")
zipevig dpkezl mipezp zxardl mixhnxt
^W1DICT("SNDYPARAMETERS","E")
Parameters for the "SENDYMAN" system
^W1DICT("SNDYPARAMETERS","H")
"SENDYMAN" zkxrnl mixhnxt
^W1DICT("SNIF","E")
Branch $1
^W1DICT("SNIF","H")
$1 sipq
^W1DICT("SNIFIM","E")
Branches
^W1DICT("SNIFIM","H")
mitipq
^W1DICT("SNIFNUMBER","E")
Branch No
^W1DICT("SNIFNUMBER","H")
sipq 'qn
^W1DICT("SNIFPRICELIST","E")
Price list of branches
^W1DICT("SNIFPRICELIST","H")
mitipql mihixt oexign
^W1DICT("SNOU1","E")
Data transfer to "Market"
^W1DICT("SNOU1","H")
weyl mipezp zxard
^W1DICT("SNOU1PRM","E")
Parameters for data transfer to "Market"
^W1DICT("SNOU1PRM","H")
weyl mipezp zxardl mixhnxt
^W1DICT("SOAD","E")
Diners
^W1DICT("SOAD","H")
'eq
^W1DICT("SOADIM","E")
Guests #
^W1DICT("SOADIM","H")
micreq 'qn
^W1DICT("SOADIM","R")
K-vo goste!i
^W1DICT("SOADZERO","E")
Type password 2
^W1DICT("SOADZERO","H")
2 dnqiq clwd
^W1DICT("SOLD","E")
Sold for cash
^W1DICT("SOLD","H")
onefna xknp
^W1DICT("SOLEK","E")
Solek
^W1DICT("SOLEK","H")
wleq
^W1DICT("SORT","E")
To sort
^W1DICT("SORT","H")
oein
^W1DICT("SORTBY","E")
Sort by
^W1DICT("SORTBY","H")
itl oein
^W1DICT("SORTBYCOMMENT","E")
Sort by comment
^W1DICT("SORTBYCOMMENT","H")
dxrd itl oein
^W1DICT("SORTBYSUPPLIERS","E")
Sort by vendors
^W1DICT("SORTBYSUPPLIERS","H")
miwtq itl oiin
^W1DICT("SORTINGPERCODE","E")
Sort by Code
^W1DICT("SORTINGPERCODE","H")
cew itl oein
^W1DICT("SORTINGPERNAME","E")
Sort by Name
^W1DICT("SORTINGPERNAME","H")
my itl oein
^W1DICT("SORTPERABC","E")
Sort by Alphabet
^W1DICT("SORTPERABC","H")
za-sl` itl oein
^W1DICT("SORTPERGRCODE","E")
Sort by group code
^W1DICT("SORTPERGRCODE","H")
dveaw cew itl oein
^W1DICT("SORTPERGRSID","E")
Sort by group order
^W1DICT("SORTPERGRSID","H")
zeveaw xeciq itl oein
^W1DICT("SORTPERITEMCODE","E")
Sort by Product Name
^W1DICT("SORTPERITEMCODE","H")
hixt cew itl oein
^W1DICT("SORTPERITEMORDERING","E")
Sort by predefined order
^W1DICT("SORTPERITEMORDERING","H")
mihixt xeciq itl oein
^W1DICT("SORTPERQN","E")
Sort by quantity
^W1DICT("SORTPERQN","H")
zenk itl oein
^W1DICT("SORTPERSUM","E")
Sort by amount
^W1DICT("SORTPERSUM","H")
mekq itl oein
^W1DICT("SOURCEORDER","E")
Source order - $1
^W1DICT("SOURCEORDER","H")
$1 xewn zpnfd - 
^W1DICT("SPECDLVITEMSTABLE","E")
Table of special items for deliveries
^W1DICT("SPECDLVITEMSTABLE","H")
migelynl micgein mihixt zlah
^W1DICT("SPECIALITEMSFORREST","E")
Special items for a restaurant
^W1DICT("SPECIALITEMSFORREST","H")
dcrqnl micgein mihixt
^W1DICT("SPKCLOSED","E")
Vendor closed
^W1DICT("SPKCLOSED","H")
xebq wtq
^W1DICT("SPKNAME","E")
Vendor Name
^W1DICT("SPKNAME","H")
wtq my
^W1DICT("SPKNUMBER","E")
Vendor Number
^W1DICT("SPKNUMBER","H")
wtq 'qn
^W1DICT("SPLAST","E")
Last Vendor
^W1DICT("SPLAST","H")
oexg` wtq
^W1DICT("SRVCARDLIST","E")
List of repair certificates
^W1DICT("SRVCARDLIST","H")
oewiz zecerz zniyx
^W1DICT("SRVCARDNMB","E")
Receipt certificate for repair device
^W1DICT("SRVCARDNMB","H")
'qn oewizl xiykn zlaw zcerz
^W1DICT("SRVCOMMENT1","E")
* For repair of an device for which the repair cost does not exceed $1
^W1DICT("SRVCOMMENT1","H")
oewizl xeyi` yxcp `l g"y $1 lr dler dpi` oewizd zelr xy` xiykn oewiz lr*
^W1DICT("SRVCOMMENT2","E")
* A device that can be repaired will be under the responsibility of the stor
^W1DICT("SRVCOMMENT2","H")
dxiqnd mein mei $1 cr zepgd zeixg`a didi oewizl ozipy xiykn*
^W1DICT("SRVCOMMENT3","E")
* No device will be returned to the customer without the repair form
^W1DICT("SRVCOMMENT3","H")
oewizd qteh `ll gewll xiykn xfgei `l*
^W1DICT("SRVCOMMENT3","R")
Pribor budet vozvra!sen zakaz!4iku tol!mko pri pred!t!avlenii kvitancii
^W1DICT("SRVFEES","E")
Service charge %1$
^W1DICT("SRVFEES","H")
$1% zexiy
^W1DICT("SRVPAYCHANGE","E")
Service Fee Change (NIS)
^W1DICT("SRVPAYCHANGE","H")
(g"y) zexiy inc iepiy
^W1DICT("SRVPAYPRCCHANGE","E")
Service Fee Change (%)
^W1DICT("SRVPAYPRCCHANGE","H")
(%) zexiy inc iepiy
^W1DICT("SSAKS","E")
Bags
^W1DICT("SSAKS","H")
zeiwy
^W1DICT("SSOAD","E")
Num of diners
^W1DICT("SSOAD","H")
micreq k"dq
^W1DICT("SSOAD","R")
K-vo klientov
^W1DICT("STAFFNAME","E")
Staff name
^W1DICT("STAFFNO","E")
Staff no.
^W1DICT("STANDNO","E")
POS #
^W1DICT("STANDNO","H")
dcnr 'qn
^W1DICT("STANDNO","R")
Nom. terminala
^W1DICT("START","E")
Start
^W1DICT("START","H")
lgzd
^W1DICT("START","R")
Na!4alo
^W1DICT("STARTPREPTIME","E")
Preparation start time
^W1DICT("STARTPREPTIME","H")
dpkd zligz onf
^W1DICT("STARTSENDINGTIME","E")
Transmission start time
^W1DICT("STARTSENDINGTIME","H")
xeciy zligz onf
^W1DICT("STATISTIKA","E")
Statistics
^W1DICT("STATISTIKA","H")
dwihqihhq
^W1DICT("STATUS","E")
Status
^W1DICT("STATUS","H")
qehhq
^W1DICT("STAY","E")
Stay
^W1DICT("STAY","H")
zayl
^W1DICT("STAY2SALE","E")
Stay for sale
^W1DICT("STAY2SALE","H")
dxiknl x`yp
^W1DICT("STAYINCSR","E")
Stays in the drawer
^W1DICT("STAYINCSR","H")
dxibna x`yp
^W1DICT("STAYORTAKE","E")
Sit or take
^W1DICT("STAYORTAKE","H")
zgwl e` zayl
^W1DICT("STIP","E")
Total tip
^W1DICT("STIP","H")
tih k"dq
^W1DICT("STIPCALC","E")
Total tips
^W1DICT("STIPCALC","H")
mitih k"dq
^W1DICT("STOCKITEMSTABLE","E")
Inventory Items Table
^W1DICT("STOCKITEMSTABLE","H")
i`ln ihixt zlah
^W1DICT("STOCKITEMTREETABLE","E")
Products tree "Stock - stock" table
^W1DICT("STOCKITEMTREETABLE","H")
"i`ln - i`ln" xven ur zlah
^W1DICT("STREET","E")
Street
^W1DICT("STREET","H")
aegx
^W1DICT("STREET","R")
Ulica
^W1DICT("STREETNAME","E")
Street
^W1DICT("STREETNAME","H")
aegx my
^W1DICT("STREETNAME","R")
Nazv. ulicy
^W1DICT("STREETNOTFOUND","E")
Not in list - write in comment
^W1DICT("STREETNOTFOUND","H")
dxrda aezk - dniyxa oi`
^W1DICT("STREETNOTFOUND","R")
Net v spiske - ukajite v prime!4anii
^W1DICT("STREETSTABLE","E")
 $1 list of streets 
^W1DICT("STREETSTABLE","H")
$1 ly zeaegx zlah
^W1DICT("STREETSTABLE","R")
Tablica ulic g.$1
^W1DICT("SUBBILL","E")
Sub-Bill $1
^W1DICT("SUBBILL","H")
$1 oeayg zz
^W1DICT("SUBGRCODE","E")
Subgroup code
^W1DICT("SUBGRCODE","H")
dveaw zz cew
^W1DICT("SUBGRNAME","E")
Subgroup name
^W1DICT("SUBGRNAME","H")
dveaw zz my
^W1DICT("SUBGROUPEXIST","E")
A subgroup already exists
^W1DICT("SUBGROUPEXIST","H")
zniiw xak dveaw zz
^W1DICT("SUBGROUPS","E")
Subgroups
^W1DICT("SUBGROUPS","H")
zeveaw zz
^W1DICT("SUBM","E")
Submit
^W1DICT("SUBM","H")
xy`l
^W1DICT("SUBM","R")
Podtv-t!m
^W1DICT("SUBMIT","E")
Submit
^W1DICT("SUBMIT","H")
xy`
^W1DICT("SUBMIT","R")
Podtv-t!m
^W1DICT("SUBMIT?","E")
To submit an action?
^W1DICT("SUBMIT?","H")
? dlert xy`l
^W1DICT("SUBMIT?","R")
Potverdit!m ?
^W1DICT("SUBMITANDBACK","E")
Submit
^W1DICT("SUBMITANDBACK","H")
hixtzl xefge xy` 
^W1DICT("SUBMITANDBACK","R")
Podtverdit!m vybor
^W1DICT("SUBMITANDCSRPRINT","E")
Confirm and print to POS printer
^W1DICT("SUBMITANDCSRPRINT","H")
dtew zqtcnl qtcde xy` 
^W1DICT("SUBMITANDPRINT","E")
Submit and print
^W1DICT("SUBMITANDPRINT","H")
qtcde xy` 
^W1DICT("SUBMITANDPRINT","R")
Potverdit!m i raspe!4atat!m
^W1DICT("SUBMITANDSHOWORD","E")
Submit and Show Order
^W1DICT("SUBMITANDSHOWORD","H")
dpnfd bvde xy`
^W1DICT("SUBMITCHANGES","E")
Submit Changes
^W1DICT("SUBMITCHANGES","H")
miepiy xy`
^W1DICT("SUBMITCHANGES","R")
Podtverdite izmeneni!a
^W1DICT("SUBMITCREDIT","E")
Confirm (for customers who buy on credit)
^W1DICT("SUBMITCREDIT","H")
( dtwd zegewll ) xy`
^W1DICT("SUBMITDEL","E")
Confirm cancellation $1 . Please specify a reason for cancellation
^W1DICT("SUBMITDEL","H")
lehia zaiq oiiv <BR> $1 lehia xyi`
^W1DICT("SUBMITDISCOUNT","E")
Confirm discount $1 . Please specify a reason for discount
^W1DICT("SUBMITDISCOUNT","H")
dgpd zaiq oiiv <BR> $1 dgpd xyi`
^W1DICT("SUBMITITEMSET","E")
Move a set of selected items
^W1DICT("SUBMITITEMSET","H")
mixgaen mihixt hq xiard
^W1DICT("SUBMITTIME","E")
Submit time
^W1DICT("SUBMITTIME","H")
xye`n onf
^W1DICT("SUBMITTIME","R")
Podtverdit!m vrem!a
^W1DICT("SUGASR","E")
Type of credit
^W1DICT("SUGASR","H")
i`xy` beq
^W1DICT("SUGASR","R")
Vid kredita
^W1DICT("SUGISKA","E")
Type of deal
^W1DICT("SUGISKA","H")
dwqr beq
^W1DICT("SUGISKA","R")
Vid tranzakcii
^W1DICT("SUGMTB","E")
Select a currency type
^W1DICT("SUGMTB","H")
rahn beq xga
^W1DICT("SUM","E")
Sum
^W1DICT("SUM","H")
mekq
^W1DICT("SUM","R")
Summa
^W1DICT("SUM2FULL","E")
Amount to be completed
^W1DICT("SUM2FULL","H")
dnlydl mekq
^W1DICT("SUM2PAYNOTVALID","E")
Incorrect payment amount
^W1DICT("SUM2PAYNOTVALID","H")
oekp `l melyzl mekq
^W1DICT("SUM2PAYNOTVALID","R")
Summa k oplate o!6ibo!4na
^W1DICT("SUMALLPROFIT","E")
Total income
^W1DICT("SUMALLPROFIT","H")
zeqpkd k"dq
^W1DICT("SUMALLPROFIT","R")
Summa dohodov
^W1DICT("SUMBEFOREDEL","E")
Amount before cancellation
^W1DICT("SUMBEFOREDEL","H")
lehia iptl mekq
^W1DICT("SUMCOMP","E")
Amount according to calculation
^W1DICT("SUMCOMP","H")
aeyig itl mekq
^W1DICT("SUMDLPPROFIT","E")
T.A. Revenue
^W1DICT("SUMDLPPROFIT","H")
T.A.W zeqpkd
^W1DICT("SUMDLPPROFIT","R")
Dohody T.!%A.W
^W1DICT("SUMMSDPROFIT","E")
Revenue from restaurant
^W1DICT("SUMMSDPROFIT","H")
dcrqn zeqpkd
^W1DICT("SUMMSDPROFIT","R")
Dohody restorana
^W1DICT("SUMMSLPROFIT","E")
Revenue from shipments
^W1DICT("SUMMSLPROFIT","H")
migelyn zeqpkd
^W1DICT("SUMMSLPROFIT","R")
Dohody ot dostavok
^W1DICT("SUMMTB","E")
Payment amount in selected currency
^W1DICT("SUMMTB","H")
xgap rahna melyz mekq
^W1DICT("SUMMVBNK","E")
Bank transfer amount
^W1DICT("SUMMVBNK","H")
zi`wpa dxard mekq
^W1DICT("SUMNOTEQRCP","E")
The amount typed is not the amount recorded on the receipt
^W1DICT("SUMNOTEQRCP","H")
dlawa meyxy mekql mi`zn `l clwedy mekq
^W1DICT("SUMNOTVALID","E")
Wrong sum
^W1DICT("SUMNOTVALID","H")
oekp `l mekq
^W1DICT("SUMNOTVALID","R")
Summa neverna
^W1DICT("SUMOFDOC","E")
Doc.Sum
^W1DICT("SUMOFDOC","H")
dcerz mekq
^W1DICT("SUMOFDOC","R")
Summa v d-te
^W1DICT("SUMREAL","E")
Actual amount
^W1DICT("SUMREAL","H")
lreta mekq
^W1DICT("SUMTOOBIG","E")
Value to big
^W1DICT("SUMTOOBIG","H")
icin lecb mekq
^W1DICT("SUMTOOBIG","R")
Sli!6kom bol!moe zna!4enie
^W1DICT("SUMTOOMUCH","E")
Value to big
^W1DICT("SUMTOOMUCH","H")
icin lecb mekq
^W1DICT("SUMTOOSMALL","E")
Amount too small
^W1DICT("SUMTOOSMALL","H")
icin ohw mekq
^W1DICT("SUMVC","E")
Payment amount on Valuecard
^W1DICT("SUMVC","H")
cxweileea melyz mekq
^W1DICT("SUMWRONG","E")
Wrong amount !
^W1DICT("SUMWRONG","H")
! ieby mekq
^W1DICT("SUPPLCODE","E")
Vendor number
^W1DICT("SUPPLCODE","H")
wtq 'qn
^W1DICT("SUPPLCODE","R")
Nom. postav!sika
^W1DICT("SUPPLDEBINVOICE","E")
Purchase Credit Invoice
^W1DICT("SUPPLDEBINVOICE","H")
iekif ykx zipeayg
^W1DICT("SUPPLDEBINVOICE","R")
Nakladna!a na vozvrat postav!siku
^W1DICT("SUPPLDISCOUNT","E")
Vendor discount
^W1DICT("SUPPLDISCOUNT","H")
wtq ly dgpd
^W1DICT("SUPPLDLVBACKDOCLIST","E")
List of return certificates
^W1DICT("SUPPLDLVBACKDOCLIST","H")
xfgd zecerz zniyx
^W1DICT("SUPPLDLVDOC","E")
Purchase delivery note
^W1DICT("SUPPLDLVDOC","H")
ykx gelyn zcerz
^W1DICT("SUPPLDLVDOC","R")
Priholny!i order
^W1DICT("SUPPLDLVDOCLIST","E")
A list of purchase delivery notes
^W1DICT("SUPPLDLVDOCLIST","H")
ykx gelyn zecerz zniyx
^W1DICT("SUPPLDLVDOCLIST","R")
Spisok prihodnyh orderov
^W1DICT("SUPPLIED","E")
Provided
^W1DICT("SUPPLIED","H")
wteq
^W1DICT("SUPPLIEDORDS","E")
Only delivered orders
^W1DICT("SUPPLIEDORDS","H")
ewteqy zepnfd wx
^W1DICT("SUPPLIEDTIME","E")
Delivery time
^W1DICT("SUPPLIEDTIME","H")
dwtq` onf
^W1DICT("SUPPLIER","E")
Supplier
^W1DICT("SUPPLIER","H")
wtq
^W1DICT("SUPPLIERNUMBER","E")
Supplier No
^W1DICT("SUPPLIERNUMBER","H")
wtq 'qn
^W1DICT("SUPPLIERPRICE","E")
Supplier price
^W1DICT("SUPPLIERPRICE","H")
wtq xign
^W1DICT("SUPPLIERPRICES","E")
Prices by suppliers
^W1DICT("SUPPLIERPRICES","H")
miwtq itl mixign
^W1DICT("SUPPLIERPRICESLIST","E")
Supplier list prices
^W1DICT("SUPPLIERPRICESLIST","H")
wtq ly mihixt oexign
^W1DICT("SUPPLINCOMEDEBETINVOICESLIST","E")
Purchase debit invoices list
^W1DICT("SUPPLINCOMEDEBETINVOICESLIST","H")
wtq ly iekif ykx zeipeayg zniyx
^W1DICT("SUPPLINCOMEDEBETINVOICESLIST","R")
Spisok nakladnyh na vozvrat postav!siku
^W1DICT("SUPPLINCOMEDLVBACKLIST","E")
List of return certificates
^W1DICT("SUPPLINCOMEDLVBACKLIST","H")
xfgd zecerz zniyx
^W1DICT("SUPPLINVOICE","E")
Purchase Invoice
^W1DICT("SUPPLINVOICE","H")
ykx zipeayg
^W1DICT("SUPPLINVOICE","R")
Prihodna!a nakladna!a
^W1DICT("SUPPLINVOICESLIST","E")
Purchase Invoices List
^W1DICT("SUPPLINVOICESLIST","H")
ykx zeipeayg zniyx
^W1DICT("SUPPLINVOICESLIST","R")
Spisok prihodnyh nakladnyh
^W1DICT("SUPPLITEMCODE","E")
Vendor Item Code
^W1DICT("SUPPLITEMCODE","H")
wtq lv` hixt cew
^W1DICT("SUPPLLIST","E")
Suppliers list
^W1DICT("SUPPLLIST","H")
miwtq zniyx
^W1DICT("SUPPLLIST","R")
Spisok postav!sikov
^W1DICT("SUPPLNAME","E")
Vendor Name
^W1DICT("SUPPLNAME","H")
wtq my
^W1DICT("SUPPLNUMBERISWRONG","E")
Wrong vendor number
^W1DICT("SUPPLNUMBERISWRONG","H")
ieby wtq 'qn
^W1DICT("SUPPLORCUST","E")
Supplier or customer
^W1DICT("SUPPLORCUST","H")
gewl e` wtq
^W1DICT("SUPPLORDERLIST","E")
Purchase Order List
^W1DICT("SUPPLORDERLIST","H")
ykx zepnfd zniyx
^W1DICT("SUPPLORDERLIST2ITEM","E")
Purchase Order List for Item '$1'
^W1DICT("SUPPLORDERLIST2ITEM","H")
' $1 ' hixtl ykx zepnfd zniyx
^W1DICT("SUPPLORDERS","E")
Purchase Orders
^W1DICT("SUPPLORDERS","H")
ykx zepnfd
^W1DICT("SUPPLPAYMENTSLIST","E")
Payment list to supplier $1 $2
^W1DICT("SUPPLPAYMENTSLIST","H")
$2 $1 wtql minelyz zniyx
^W1DICT("SUPPLPAYMENTSLIST","R")
Spisok plateje!i postav!sika $1 $2
^W1DICT("SUPPLPRICESLIST","E")
List price of supplier $1 "$2" for the date $3
^W1DICT("SUPPLPRICESLIST","H")
$3 jix`zl "$2" $1 wtq ly mihixt oexign
^W1DICT("SUPPLSERVICEINVOICE","E")
Purchase Service Invoice
^W1DICT("SUPPLSERVICEINVOICE","H")
zexiy ykx zipeayg
^W1DICT("SUPPLSYSTEM","E")
Supply System
^W1DICT("SUPPLSYSTEM","H")
miwtq zkxrn
^W1DICT("SUPPLSYSTEMMLY","E")
Suppliers System (Inventory)
^W1DICT("SUPPLSYSTEMMLY","H")
i`ln zkxrn
^W1DICT("SUPPLTABLE","E")
Form of Suppliers
^W1DICT("SUPPLTABLE","H")
wtq qihxk
^W1DICT("SUPPLTABLE","R")
Spravo!4nik postav!sikov
^W1DICT("SURECANCEL","E")
An order going to be erased ! Are You shure ??
^W1DICT("SURECANCEL","H")
 xy`l ! wgnz dpnfdd 
^W1DICT("SURECANCEL","R")
Zakaz budet udalen ! Vy uvereny
^W1DICT("SURNAME","E")
Last Name
^W1DICT("SURNAME","H")
dgtyn my
^W1DICT("SURNAME","R")
Famili!a
^W1DICT("SYSTEMENTRANCE","E")
Login
^W1DICT("SYSTEMENTRANCE","H")
zkxrnl dqipk
^W1DICT("SYSTEMENTRANCE","R")
Vhod v sistemu
^W1DICT("SYSTEMMANAGER","E")
System manager
^W1DICT("SYSTEMMANAGER","H")
zkxrn ldpn
^W1DICT("SYSTEMMANAGER","R")
Administrator 
^W1DICT("SYSTEMOPENING","E")
System Initialization
^W1DICT("SYSTEMOPENING","H")
zkxrn zgizt
^W1DICT("SYSTEMOPENING","R")
Otkrytie sistemy
^W1DICT("SYSTEMPARAMETERS","E")
System parameters
^W1DICT("SYSTEMPARAMETERS","H")
zkxrn ly mixhnxt
^W1DICT("SYSTEMPARAMETERS","R")
Parametry sistemy
^W1DICT("T.A.W ORDERS","E")
Carryout Orders Number
^W1DICT("T.A.W ORDERS","H")
T.A.W zepnfd zenk
^W1DICT("T.A.W TOTAL","E")
Carryout Sales
^W1DICT("T.A.W TOTAL","H")
T.A.W zepnfd k"dq
^W1DICT("TABLE","E")
Table
^W1DICT("TABLE","H")
ogley
^W1DICT("TABLEBGCOLOR","E")
Table Background
^W1DICT("TABLEBGCOLOR","H")
( dpenz oi` m` ) <BR> ogley ly rwx
^W1DICT("TABLEBUSY","E")
Table busy
^W1DICT("TABLEBUSY","H")
qetz ogley
^W1DICT("TABLECREATED","E")
Table $ 1 - table created !
^W1DICT("TABLECREATED","H")
mwed ogley - $1 ogley
^W1DICT("TABLEEXIST","E")
Table $ 1 - table exist !
^W1DICT("TABLEEXIST","H")
! miiw ogley - $1 ogley
^W1DICT("TABLEHISTORY","E")
Table History $1
^W1DICT("TABLEHISTORY","H")
$1 ogley ly dixehqd
^W1DICT("TABLEHISTORY","R")
Istori!a stola $1
^W1DICT("TABLEISBUSY","E")
Table in use from P.O.S # $1
^W1DICT("TABLEISBUSY","H")
$1 dcnrn dpnfd mr micaer  
^W1DICT("TABLEISBUSY","R")
S!etim stolom rabota!ut s terminala $1
^W1DICT("TABLEISCLOSED","E")
A table is already closed
^W1DICT("TABLEISCLOSED","H")
xebq xak ogley
^W1DICT("TABLEISWRONG","E")
Wrong table number
^W1DICT("TABLEISWRONG","H")
ieby ogley 'qn
^W1DICT("TABLEKINDS","E")
Types of tables
^W1DICT("TABLEKINDS","H")
zepgley ibeq
^W1DICT("TABLENOTBUSY","E")
Table not in use
^W1DICT("TABLENOTBUSY","H")
qetz `l ogley
^W1DICT("TABLENOTEXIST","E")
The table not in form of tables
^W1DICT("TABLENOTEXIST","H")
zkxrna miiw `l $1 ogley
^W1DICT("TABLENOTEXIST","R")
Stol s !etim nomerom ne opredelen
^W1DICT("TABLENUMBER","E")
Table
^W1DICT("TABLENUMBER","H")
ogley
^W1DICT("TABLENUMBER","R")
Stol
^W1DICT("TABLENUMBERCOLORBUSY","E")
Color of busy table number
^W1DICT("TABLENUMBERCOLORBUSY","H")
qetz ogley xtqn rav
^W1DICT("TABLENUMBERCOLORFREE","E")
Color of free table number
^W1DICT("TABLENUMBERCOLORFREE","H")
iept ogley xtqn rav
^W1DICT("TABLENUMBERISWRONG","E")
Incorrect table value in order
^W1DICT("TABLENUMBERISWRONG","H")
ieby dpnfda ogley 'qn
^W1DICT("TABLENUMBERISWRONG","R")
Nomer stola v zakaze neverny!i
^W1DICT("TABLEOPENEDNOCOPY","E")
Table $1 currently open - no copy
^W1DICT("TABLEOPENEDNOCOPY","H")
wizrdl oi` - rbxk gezt $1 ogley
^W1DICT("TABLEOPENEDNODELETE","E")
Table in use.Cancellation not allowed
^W1DICT("TABLEOPENEDNODELETE","H")
lhal oi` - rbxk gezt $1 ogley
^W1DICT("TABLEOPENEDNODELETE","R")
Stol otkryt - nel!mz!a udal!at!m
^W1DICT("TABLEORCUST","E")
Table / Customer
^W1DICT("TABLEORCUST","H")
gewl / ogley
^W1DICT("TABLEORCUSTOMNUMBER","E")
Table or Customer Number
^W1DICT("TABLEORCUSTOMNUMBER","H")
( migelynl ) gewl 'qn e` ogley 'qn
^W1DICT("TABLERANGEWRONG","E")
Incorrect range of tables
^W1DICT("TABLERANGEWRONG","H")
oekp `l zepgley geeh
^W1DICT("TABLERANGEWRONG","R")
Neverny!i diapazon stolov
^W1DICT("TABLEREPORT","E")
Report by table
^W1DICT("TABLEREPORT","H")
ogley g"ec
^W1DICT("TABLEREPORT","R")
Ot!4et po stolu
^W1DICT("TABLES","E")
Tables
^W1DICT("TABLES","H")
ze`lah
^W1DICT("TABLES","R")
Tablicy
^W1DICT("TABLESHORT","E")
Table
^W1DICT("TABLESHORT","H")
y
^W1DICT("TABLESHORT","R")
St.
^W1DICT("TABLESSAVINGINPROCESS","E")
Backing up data tables ... Please Wait
^W1DICT("TABLESSAVINGINPROCESS","H")
... oznd `p` ... ze`lah ieaib
^W1DICT("TABLESSAVINGINPROCESS","R")
Idet sohranenie tablic ... Podojdite ...
^W1DICT("TABLESTABLE","E")
Form of Tables
^W1DICT("TABLESTABLE","H")
zepgley zlah
^W1DICT("TABLESTABLE","R")
Spisok stolov
^W1DICT("TABLESWITHOUTGROUP","E")
Tables without table type
^W1DICT("TABLESWITHOUTGROUP","H")
ogley beq `ll zepgley
^W1DICT("TAFKID","E")
Role
^W1DICT("TAFKID","H")
ciwtz
^W1DICT("TAFKID","R")
Doljnost!m
^W1DICT("TAKE","E")
To take
^W1DICT("TAKE","H")
zgwl
^W1DICT("TAKEAWAY","E")
Take away
^W1DICT("TAKEAWAY","H")
`ea`
^W1DICT("TAKEAWAY","R")
Pridu zabrat!m
^W1DICT("TAKEAWAY!","E")
Take away
^W1DICT("TAKEAWAY!","H")
zgwl e`eai
^W1DICT("TAKEAWAYORDERS","E")
TAW Orders
^W1DICT("TAKEAWAYORDERS","H")
"zgwl" zepnfd
^W1DICT("TAKEAWAYPRICELIST","E")
Price list items "to take"
^W1DICT("TAKEAWAYPRICELIST","H")
"zgwl" mihixt oexign
^W1DICT("TAKED","E")
Collected
^W1DICT("TAKED","H")
sq`p
^W1DICT("TAKEDORDS","E")
Only collected orders
^W1DICT("TAKEDORDS","H")
etq`py zepnfd wx
^W1DICT("TAKEDTIME","E")
Pick up time
^W1DICT("TAKEDTIME","H")
seqi` onf
^W1DICT("TAKEMANYFROMCOURIER","E")
A courier$1  must be credited
^W1DICT("TAKEMANYFROMCOURIER","H")
$1 gily zekfl yi
^W1DICT("TAKEQRCODE","H")
cew QR mlv
^W1DICT("TAKEYOURHKORDER","E")
It's take away order ! Come to our office for an order
^W1DICT("TAWCMNT","E")
To take
^W1DICT("TAWCMNT","H")
zgwl
^W1DICT("TAWNETTO","E")
Total net "take"
^W1DICT("TAWNETTO","H")
ehp "zgwl" k"dq
^W1DICT("TAWORDERS","E")
TAW Orders
^W1DICT("TAWORDERS","H")
"zgwl" zepnfd
^W1DICT("TAWQN","E")
Number of "takeaway" orders
^W1DICT("TAWQN","H")
"zgwl" zepnfd 'qn
^W1DICT("TAX","E")
Vat $1
^W1DICT("TAX","H")
$1 n"rn
^W1DICT("TAX","R")
Nal.sbor $1
^W1DICT("TAXES","E")
Taxes
^W1DICT("TAXES","H")
n"rn
^W1DICT("TAXI","E")
Taxi
^W1DICT("TBCARD","E")
No. of  "10Bis" Card
^W1DICT("TBCARD","H")
"qia oz" qihxk 'qn
^W1DICT("TBCHECKREPORTS","E")
Comparative 10B Orders check report
^W1DICT("TBCHECKREPORTS","H")
gewl len qia oz zepnfd iz`eeyd
^W1DICT("TBLDETS","E")
$1 dinners $2 NIS
^W1DICT("TBLDETS","H")
gy $1 'q $2
^W1DICT("TBLMAKOR","E")
Order Sources Table
^W1DICT("TBLMAKOR","H")
zepnfd zexewn zlah
^W1DICT("TBLOC","E")
Location tables
^W1DICT("TBLOC","H")
mewin ze`lah
^W1DICT("TBLSLR","E")
Employees' salary table
^W1DICT("TBLSLR","H")
micaer zexekyn zlah
^W1DICT("TBLSLR","R")
Tablica ZP rabotnikov
^W1DICT("TBLSTAT","E")
Table status
^W1DICT("TBLSTAT","H")
ogley qehhq
^W1DICT("TBLSTATWRONG","E")
Incorrect table status
^W1DICT("TBLSTATWRONG","H")
ieby ogley qehhq
^W1DICT("TBLTYPEWRONG","E")
Incorrect table type
^W1DICT("TBLTYPEWRONG","H")
ieby ogley beq
^W1DICT("TBNOSF","E")
Order 10B orders list that is not in the Sandwich Factory
^W1DICT("TBNOSF","H")
ixehwt 'uieecpqa mi`vnp `ly qia oz zepnfd zniyx
^W1DICT("TBNOTB","E")
10B Orders List that is not in the 10B report
^W1DICT("TBNOTB","H")
qia oz g"ec mi`vnp `ly qia oz zepnfd zniyx
^W1DICT("TBORDNUMBER","E")
Tenbis order number
^W1DICT("TBORDNUMBER","H")
qia oza dpnfd 'qn
^W1DICT("TBREPORT","E")
Payments by 10B Report
^W1DICT("TBREPORT","H")
"qia oz" iqihxka minelyz  g"ec
^W1DICT("TEAVPROT","E")
"Bon Appetite" Transmission Protocol
^W1DICT("TEAVPROT","H")
"oea`za" mixeciy lewehext
^W1DICT("TEL","E")
Phone #
^W1DICT("TEL","H")
'lh
^W1DICT("TEL","R")
Tel.
^W1DICT("TEL1","E")
Phone 1
^W1DICT("TEL1","H")
1 'lh
^W1DICT("TEL1","R")
Tel.1
^W1DICT("TEL2","E")
Phone 2
^W1DICT("TEL2","H")
2 'lh
^W1DICT("TEL2","R")
Tel.2
^W1DICT("TELEPHONECENTER","E")
A telephony center
^W1DICT("TELEPHONECENTER","H")
dipetlh fkxn
^W1DICT("TELREC","E")
Phone number is recommended
^W1DICT("TELREC","H")
 ulnen 'lh 'qn
^W1DICT("TELREC","R")
Jelatel!mno nomer tel
^W1DICT("TELRECOMMEND","E")
(Phone # recommended)
^W1DICT("TELRECOMMEND","H")
 ulnen zneciw mr 'lh 'qn
^W1DICT("TELRECOMMEND","R")
Jelatel!mno nomer tel.
^W1DICT("TENBIS","E")
10bis
^W1DICT("TENBIS","H")
qia10
^W1DICT("TENBIS","R")
10bis
^W1DICT("TENBISPARAMETERS","E")
10B Parameters
^W1DICT("TENBISPARAMETERS","H")
"qia oz" zkxrnl mixhnxt
^W1DICT("TERMINATE","E")
To Proceed
^W1DICT("TERMINATE","H")
miiql
^W1DICT("TERMINATE","R")
Zaver!6it!m
^W1DICT("TERMNAME","E")
Terminal name
^W1DICT("TERMNAME","H")
seqn my
^W1DICT("TERMORD","E")
Continue
^W1DICT("TERMORD","H")
dpnfd mlyd
^W1DICT("TERMORD","R")
Prodoljit!m
^W1DICT("TERMORDER","E")
Save an order
^W1DICT("TERMORDER","H")
dpnfd meyx
^W1DICT("TERMPREVGROUP","E")
First confirm typing of set items
^W1DICT("TERMPREVGROUP","H")
mcew mihixt hq ly dclwd xy`l `p
^W1DICT("TERMPREVGROUP","R")
Podtverdite vybor iz predydu!se!i gruppy
^W1DICT("TERMTRANS","E")

^W1DICT("TEXT","E")
Text
^W1DICT("TEXT","H")
hqwh 
^W1DICT("TEXTTOOSHORT","E")
Entered text too short
^W1DICT("TEXTTOOSHORT","H")
icin xvw hqwh 
^W1DICT("TEXTTOOSHORT","R")
Sli!6kom korotki!i tekst
^W1DICT("TFKCOURIER","E")
Courier productivity
^W1DICT("TFKCOURIER","H")
migily zwetz
^W1DICT("TFKPNIM","E")
Productivity of interior workers
^W1DICT("TFKPNIM","H")
mipt icaer dwetz
^W1DICT("THANKS","E")
Thank you !
^W1DICT("THANKS","H")
! jzpnfd lr dax dcez
^W1DICT("THANKS","R")
Spasibo !
^W1DICT("THECOPY","E")
Copy
^W1DICT("THECOPY","H")
wzrd
^W1DICT("THECOPY","R")
Skop-t!m
^W1DICT("THESPECIALCODE4BL","E")
This code is used in the "Business Logic" system
^W1DICT("THESPECIALCODE4BL","H")
"wi'bel qpfia" zkxrna yeniya df cew
^W1DICT("THESPECIALCODEGCOUP","E")
This code is used to a gift goupon
^W1DICT("THESPECIALCODEGCOUP","H")
dpzn yelzl yeniya df cew
^W1DICT("THISKINDOFTABLENOTFINDED","E")
No tables to view
^W1DICT("THISKINDOFTABLENOTFINDED","H")
dbvdl zepgley oi`
^W1DICT("THISKINDOFTABLENOTFINDED","R")
Ne na!idena stolov dl!a prosmotra
^W1DICT("THISMAXIMUMOFPARTS","E")
You have reached the maximum number of splits
^W1DICT("THISMAXIMUMOFPARTS","H")
milevit ly iaxin xtqnl zrbd
^W1DICT("TIKYAD","E")
Password to fix employee hours
^W1DICT("TIKYAD","H")
micaer zery oewizl dnqiq
^W1DICT("TIME","E")
Time
^W1DICT("TIME","H")
dry
^W1DICT("TIME","R")
Vrem!a
^W1DICT("TIMEAFTERRCV","E")
Time after Receipt
^W1DICT("TIMEAFTERRCV","H")
dlaw ixg` onf
^W1DICT("TIMEAVRGPREP","E")
Average preparation time
^W1DICT("TIMEAVRGPREP","H")
rvenn dpkd onf
^W1DICT("TIMECALC","E")
Work time
^W1DICT("TIMECALC","H")
dcear onf
^W1DICT("TIMEEXPIRED","E")
The validity of using the software is over
^W1DICT("TIMEEXPIRED","H")
xnbp dpkeza yeniy swez
^W1DICT("TIMEJOBCOMP","E")
Time job completed
^W1DICT("TIMEJOBCOMP","H")
dcear meiq onf
^W1DICT("TIMEJOBCOMP","R")
Vrem!a okon!4ani!a raboty
^W1DICT("TIMEJOBDET","E")
Time job detailed
^W1DICT("TIMEJOBDET","H")
dcear jyn onf
^W1DICT("TIMEJOBDET","R")
Otrabotannoe vrem!a
^W1DICT("TIMEOUT","E")
Restaurant closed now
^W1DICT("TIMEOUT","H")
dxebq dcrqnd z`f drya
^W1DICT("TIMEOUT","R")
V !eto vrem!a restoran ne rabotaet
^W1DICT("TIMEPREPREPORT","E")
Preparation time report
^W1DICT("TIMEPREPREPORT","H")
dpkd ipnf g"ec
^W1DICT("TIMEREADY","E")
Preparation time
^W1DICT("TIMEREADY","H")
dpkd onf
^W1DICT("TIMESORT","E")
Sort by order time
^W1DICT("TIMESORT","H")
dpnfd onf itl oiin
^W1DICT("TIP","E")
Tip
^W1DICT("TIP","H")
tih
^W1DICT("TIP","R")
!04aevye
^W1DICT("TIPA","E")
Credit tip
^W1DICT("TIPA","H")
dtwd / i`xy`a tih
^W1DICT("TIPAS","E")
Tip by credit payment
^W1DICT("TIPAS","H")
dtwda tih
^W1DICT("TIPAS","R")
!04aevye po kreditu
^W1DICT("TIPCALC","E")
A calculated tip
^W1DICT("TIPCALC","H")
ayegn tih
^W1DICT("TIPEQ","E")
Tip value is $1 shekels
^W1DICT("TIPEQ","H")
g"y $1 deey tih
^W1DICT("TIPEQ","R")
!04aevye $1 rub
^W1DICT("TIPIN","E")
Tip inside
^W1DICT("TIPIN","H")
tih ekeza
^W1DICT("TIPMZ","E")
Tips by cash
^W1DICT("TIPMZ","H")
onefna mitih
^W1DICT("TIPMZ","R")
!04aevye nali!4nymi
^W1DICT("TIPREPORT","E")
Tips Report
^W1DICT("TIPREPORT","H")
mitih g"ec
^W1DICT("TIPS","E")
Tips
^W1DICT("TIPS","H")
mitih
^W1DICT("TIPS","R")
!04aevye
^W1DICT("TIPSSYSTEMDEFINITION","E")
Parameters for calculating tips system
^W1DICT("TIPSSYSTEMDEFINITION","H")
mitih aeyig zkxrnl mixhnxt
^W1DICT("TIPSTABLE","E")
Tips percentages table
^W1DICT("TIPSTABLE","H")
mitih ifeg` zlah
^W1DICT("TIPTYPING","E")
Typing Tips
^W1DICT("TIPTYPING","H")
mitih zclwd
^W1DICT("TIPTYPINGDT","E")
Typing tips for - $1
^W1DICT("TIPTYPINGDT","H")
$1 - l mitih zclwd
^W1DICT("TKDOC","E")
Stock update certificate
^W1DICT("TKDOC","H")
i`ln oekcr zcerz
^W1DICT("TKDOCLIST","E")
List of stock update certificates
^W1DICT("TKDOCLIST","H")
i`ln oekcr zecerz zniyx
^W1DICT("TKDOCLIST2ITEM","E")
List of stock update certificates for item '$1'
^W1DICT("TKDOCLIST2ITEM","H")
' $1 ' hixtl i`ln oekcr zecerz zniyx
^W1DICT("TKDOCS","E")
Stock update certificates
^W1DICT("TKDOCS","H")
i`ln oekcr zecerz
^W1DICT("TLAL","E")
Voucher cost
^W1DICT("TLAL","H")
yelz ly zelr
^W1DICT("TLAL","R")
Sebestoimost!m talona
^W1DICT("TLDFLT","E")
Fixed slip
^W1DICT("TLDFLT","H")
reaw yelz
^W1DICT("TLNMB","E")
Number of coupon - to external coupon type "-" before the number
^W1DICT("TLNMB","H")
xtqn iptl "-" ugl ipevig yelzl<BR> yelz 'qn
^W1DICT("TLUSH","E")
Voucher value
^W1DICT("TLUSH","H")
yelz ieey
^W1DICT("TLUSH","R")
Stoimost!m talona
^W1DICT("TMPREPREPORT","E")
Order preparation time report from $1 to $2
^W1DICT("TMPREPREPORT","H")
 $2 cr $1 - n zepnfd zpkd ipnf g"ec
^W1DICT("TNBCMPSUM","E")
Ten Bis Company
^W1DICT("TNBCMPSUM","H")
dxag qia oz
^W1DICT("TNBORDSUM","E")
Ten Bis System
^W1DICT("TNBORDSUM","H")
zkxrn qia oz
^W1DICT("TNCB","E")
Receipts
^W1DICT("TNCB","H")
zelaw
^W1DICT("TNHB","E")
Tax invoices
^W1DICT("TNHB","H")
qn zeipeayg
^W1DICT("TNHBZ","E")
Refund tax invoices
^W1DICT("TNHBZ","H")
iekif qn zeipeayg
^W1DICT("TNKUP","E")
POS transactions
^W1DICT("TNKUP","H")
dtew zerepz
^W1DICT("TO","E")
To
^W1DICT("TO","H")
cr
^W1DICT("TO","R")
Do
^W1DICT("TO TABLE","E")
To table
^W1DICT("TO TABLE","H")
ogleyl
^W1DICT("TO-","E")
To
^W1DICT("TO-","H")
-l
^W1DICT("TO-ISSUE-CONC-INVOICE-GO","E")
To issue centralized invoice go to option "Issue centralized invoice to single c
^W1DICT("TO-ISSUE-CONC-INVOICE-GO","H")
"ccea gewll zfkxn zipeayg zwtd" divte`l xear gelyn zecerz zfkxny zipeayg zwtdl
^W1DICT("TOASCPRESSHERE","E")
Click to associate
^W1DICT("TOASCPRESSHERE","H")
jeiyl ugl
^W1DICT("TOCHANGEORDERPRESS#","E")
To change the order, type a new number in the appropriate field and press the "#
^W1DICT("TOCHANGEORDERPRESS#","H")
"#" ywn welwe ycg 'qn mi`znd dcya clwd xcq iepiyl
^W1DICT("TOCHANGEPERSONALAREADORESET","E")
To activate changes to your personal area, please restart your main computer.
^W1DICT("TOCHANGEPERSONALAREADORESET","H")
iy`x aygna hxhqix rval `p iyi` xef`a miiepiy zlrtdl
^W1DICT("TOCHANGETBLCOLORPRESSKEY","E")
To change the color of a table click the "Tables Parameters"
^W1DICT("TOCHANGETBLCOLORPRESSKEY","H")
"zepgley zxcbdl mixhnxt" ywn lr ugl ogley ly rav iepiyl
^W1DICT("TOCSR","E")
To the cash register
^W1DICT("TOCSR","H")
dtewl
^W1DICT("TOCUSNAME","E")
In honor of
^W1DICT("TOCUSNAME","H")
ceakl
^W1DICT("TOCUSTERASEPRESS0","E")
To delete a previously typed customer number press 0
^W1DICT("TOCUSTERASEPRESS0","H")
0 ugl mcew clwedy gewl 'qn zwignl
^W1DICT("TODATE","E")
To date
^W1DICT("TODATE","H")
$1 jix`zl
^W1DICT("TODATE","R")
Zakaz na
^W1DICT("TODAY","E")
Today
^W1DICT("TODAY","H")
meid
^W1DICT("TODAY","R")
Segodn!a
^W1DICT("TODAY2TODAY","E")
From today to today
^W1DICT("TODAY2TODAY","H")
meidl meidn
^W1DICT("TODAYORDERSONLY","E")
Only orders received today
^W1DICT("TODAYORDERSONLY","H")
meid elawzdy zepnfd wx
^W1DICT("TODEFINECOLORPRESSHERE","E")
To set color click here
^W1DICT("TODEFINECOLORPRESSHERE","H")
dt ugl rav zxcbdl
^W1DICT("TODEFINECOLORPRESSONDEFTBLBUTTON","E")
To set a color; click the "Parameters for setting tables"
^W1DICT("TODEFINECOLORPRESSONDEFTBLBUTTON","H")
"zepgley zxcbdl mixhnxt" ywn lr ugl rav zxcbdl
^W1DICT("TODELETEPAYPRESSONTABLE","E")
To the cancellation of payment pressed on a line of payment
^W1DICT("TODELETEPAYPRESSONTABLE","H")
dlaha melyz zxey lr ugl melyz lehial
^W1DICT("TODELETEPAYPRESSONTABLE","R")
Dl!a ud-!a plateja kliknete sootv. stroku
^W1DICT("TODELETEPRESSDETAILS","E")
To  cancel  payment press on payment details and
^W1DICT("TODELETEPRESSDETAILS","H")
dlaha melyz zxey lr k"`e "hexit" ywn ugl melyz lehial
^W1DICT("TODELETEPRESSDETAILS","R")
Dl!a ud-!a plateja najm. klav. sod-e i dalee na stroku plateja
^W1DICT("TODELPREVCARDPRESSSUBMIT","E")
To cancel a previous card click "Confirm" without transferring a card
^W1DICT("TODELPREVCARDPRESSSUBMIT","H")
qihxk xiardl ila "xy`" lr ugl mcew qihxk lehial
^W1DICT("TODELWORKERPRESSONLINE","E")
To cancel an employee from a table, click on a row.
^W1DICT("TODELWORKERPRESSONLINE","H")
dxey lr ugl dlahn caer lehial
^W1DICT("TODLV","E")
To Delieveries
^W1DICT("TODLV","H")
migelynl
^W1DICT("TODT","E")
To
^W1DICT("TODT","H")
-l
^W1DICT("TODT","R")
na
^W1DICT("TOENDDAY","E")
To the end of the date
^W1DICT("TOENDDAY","H")
jix`z seql
^W1DICT("TOFINDTYPEBEGNAME","E")
To search type beginning of name
^W1DICT("TOFINDTYPEBEGNAME","H")
my zligz clwd yetigl
^W1DICT("TOFULLSCREEN","E")
To full screen
^W1DICT("TOFULLSCREEN","H")
`ln jqnl
^W1DICT("TOGO","E")
To go
^W1DICT("TOGO","H")
xear
^W1DICT("TOGO","R")
Pere!iti
^W1DICT("TOGROUP","E")
To group
^W1DICT("TOGROUP","H")
dveaw cr
^W1DICT("TOGROUP","R")
Do gruppy
^W1DICT("TOGROUPS","E")
Go to manage item groups
^W1DICT("TOGROUPS","H")
mihixt zeveaw ledipl xear
^W1DICT("TOHEIGHT","E")
To height
^W1DICT("TOHEIGHT","H")
daebl
^W1DICT("TOITEMS","E")
Go to Manage Items
^W1DICT("TOITEMS","H")
mihixt ledipl xear
^W1DICT("TOMAINMENU","E")
To main menu
^W1DICT("TOMAINMENU","H")
iy`x scl
^W1DICT("TOMAINMENU","R")
V glavnoe men!u
^W1DICT("TOMONTH","E")
To month
^W1DICT("TOMONTH","H")
yceg cr
^W1DICT("TOMORROWORDERS","E")
Tomorrow Orders
^W1DICT("TOMORROWORDERS","H")
xgnl zepnfd
^W1DICT("TOMOVEITEMCLICKIT","E")
To move an item; place a cursor on the code and draw to the desired direction
^W1DICT("TOMOVEITEMCLICKIT","H")
ievxd oeeikl jeynze cew lr onq miy hixt fifdl ick
^W1DICT("TOMOVELINECLICKCODE","E")
To move a line click on the "Code" field
^W1DICT("TOMOVELINECLICKCODE","H")
"cew" dcy lr wilw dxey zfefzl
^W1DICT("TOOMUCHCHECKS","E")
Max $1 checks
^W1DICT("TOOMUCHCHECKS","H")
miwiy $1 meniqwn
^W1DICT("TOOMUCHITEMSINGROUP","E")
Too many items in the group - please search by item code or name
^W1DICT("TOOMUCHITEMSINGROUP","H")
hixt my e` cew itl ytgl `p - dveawa mihixt icin xzei
^W1DICT("TOOMUCHLINES","E")
No more rows added ! Call an administrator
^W1DICT("TOOMUCHLINES","H")
zkxrn ldpnl xywzz <BR> ! zexey xzei siqedl oi`
^W1DICT("TOOMUCHOBJECTCOLS","E")
Too many columns
^W1DICT("TOOMUCHOBJECTCOLS","H")
icin lecb mixeh xtqn
^W1DICT("TOOMUCHOBJECTLINES","E")
Too many rows
^W1DICT("TOOMUCHOBJECTLINES","H")
icin lecb zexey xtqn
^W1DICT("TOORDER","E")
To order
^W1DICT("TOORDER","H")
onfd
^W1DICT("TOORDER","R")
Zakazat!m
^W1DICT("TOORDITEM","E")
Specify a desired quantity using the "+" and "+" keys
^W1DICT("TOORDITEM","H")
"-" -e "+" miywn zxfra ievx hixt ly zenk oiivl `p
^W1DICT("TOORDITEM","R")
Ukajite nujnoe k-vo pri pom. klavi!6e!i "+" i "-"
^W1DICT("TOP","E")
Up
^W1DICT("TOP","H")
dlrn
^W1DICT("TOPAY","E")
To pay
^W1DICT("TOPAY","H")
melyzl
^W1DICT("TOPAY","R")
K opl.
^W1DICT("TOPAYM","E")
To pay $1
^W1DICT("TOPAYM","H")
g"y $1 melyzl
^W1DICT("TOPAYM","R")
K oplate $1 rub.
^W1DICT("TOPAYMENT","E")
Total to pay
^W1DICT("TOPAYMENT","H")
melyzl k"dq
^W1DICT("TOPAYMENT","R")
K oplate
^W1DICT("TOPERIOD","E")
In range
^W1DICT("TOPERIOD","H")
geeha
^W1DICT("TOREST","E")
To the restaurant
^W1DICT("TOREST","H")
dcrqnl
^W1DICT("TOSUM","E")
To sum
^W1DICT("TOSUM","H")
mekql
^W1DICT("TOSUPPL","E")
Supply
^W1DICT("TOSUPPL","H")
wtql
^W1DICT("TOSUPPL","R")
K dostavke
^W1DICT("TOT","E")
Summary
^W1DICT("TOT","H")
mekiq
^W1DICT("TOT","R")
Itogo
^W1DICT("TOTABLE","E")
Up to a table
^W1DICT("TOTABLE","H")
ogley cr
^W1DICT("TOTAEXDRW","E")
Total Drower Am.Exp.
^W1DICT("TOTAL","E")
Total
^W1DICT("TOTAL","H")
k"dq
^W1DICT("TOTAL","R")
Vsego
^W1DICT("TOTAL4PAY","E")
Total to pay
^W1DICT("TOTAL4PAY","H")
melyzl k"dq
^W1DICT("TOTAL4PAY","R")
Summa k plateju
^W1DICT("TOTALALLCUSTOMERS","E")
Total all the customers
^W1DICT("TOTALALLCUSTOMERS","H")
zegewld lk k"dq
^W1DICT("TOTALALLCUSTOMERS","R")
Vsego po klientam
^W1DICT("TOTALALLHOURS","E")
Total of all hours
^W1DICT("TOTALALLHOURS","H")
zeryd lk ly k"dq
^W1DICT("TOTALBRUTTO","E")
Total Brutto
^W1DICT("TOTALCA","E")
Total Credit Cards
^W1DICT("TOTALCHECKS","E")
Total Checks
^W1DICT("TOTALCHECKS","H")
miwiy k"dq
^W1DICT("TOTALCLOSED","E")
Invoices were closed in an amount
^W1DICT("TOTALCLOSED","H")
mekqa zeipeayg exbqp
^W1DICT("TOTALCLOSED","R")
Vsego upla!4eno
^W1DICT("TOTALCREDIT","E")
Total Credit
^W1DICT("TOTALDATE","E")
Total by date
^W1DICT("TOTALDATE","H")
jix`z itl k"dq
^W1DICT("TOTALDEL","E")
Total Cancelations
^W1DICT("TOTALDISC","E")
Total Discounts
^W1DICT("TOTALDLV","E")
Total Shippments
^W1DICT("TOTALDLV","H")
migelyn k"dq
^W1DICT("TOTALDLVBACKDOCS","E")
Total return certificates
^W1DICT("TOTALDLVBACKDOCS","H")
xfgd zecerz k"dq
^W1DICT("TOTALDLVDOCS","E")
Total delivery certificates
^W1DICT("TOTALDLVDOCS","H")
gelyn zecerz k"dq
^W1DICT("TOTALDLVDOCS","R")
Vsego rashodnyh orderov
^W1DICT("TOTALDRW","E")
Total Drawer
^W1DICT("TOTALGUESTS","E")
Total diners
^W1DICT("TOTALGUESTS","H")
micreq
^W1DICT("TOTALHMK","E")
Total Invoices / Receipts
^W1DICT("TOTALHOURS","E")
Sum of hours
^W1DICT("TOTALHOURS","H")
zery k"dq
^W1DICT("TOTALHOURS","R")
Vsego !4asov
^W1DICT("TOTALHRBASE","E")
Up to $1 hours
^W1DICT("TOTALHRBASE","H")
zery $1 cr
^W1DICT("TOTALHREXTRA","E")
Over $1 hours
^W1DICT("TOTALHREXTRA","H")
zery $1 lrn
^W1DICT("TOTALINDEPOSITION","E")
Total deposit
^W1DICT("TOTALINDEPOSITION","H")
dcwtda k"dq
^W1DICT("TOTALINLOCAL","E")
Total in place
^W1DICT("TOTALINLOCAL","H")
mewna k"dq
^W1DICT("TOTALINORDER","E")
Total in order
^W1DICT("TOTALINORDER","H")
dpnfda k"dq
^W1DICT("TOTALINRECEIPT","E")
Receipt grand total
^W1DICT("TOTALINRECEIPT","H")
dlawa k"dq
^W1DICT("TOTALINRECEIPT","R")
Vsego polu!4eno
^W1DICT("TOTALINVOICESTX","E")
Total tax invoices
^W1DICT("TOTALINVOICESTX","H")
qn zeipeayg
^W1DICT("TOTALITEMSALES","E")
Total Items Sales
^W1DICT("TOTALL","E")
Total
^W1DICT("TOTALL","H")
illk k"dq
^W1DICT("TOTALMAM","E")
Amount subject to VAT
^W1DICT("TOTALMAM","H")
n"rn aiigy mekq
^W1DICT("TOTALMM","E")
Total of currently month
^W1DICT("TOTALMM","H")
yceg zligzn xahvn k"dq
^W1DICT("TOTALMM0","E")
Total of previous month
^W1DICT("TOTALMM0","H")
mcew yceg k"dq
^W1DICT("TOTALMMC","E")
Total cumulative by closed orders
^W1DICT("TOTALMMC","H")
zexebq zepnfd itl xahvn k"dq
^W1DICT("TOTALMUTAG","E")
Total by brand
^W1DICT("TOTALMUTAG","H")
bzen itl k"dq
^W1DICT("TOTALNETTO","E")
Total Netto
^W1DICT("TOTALNIS","E")
Total NIS
^W1DICT("TOTALNIS","H")
g"y k"dq
^W1DICT("TOTALNOMAM","E")
Free tax amount
^W1DICT("TOTALNOMAM","H")
n"rt xeht mekq
^W1DICT("TOTALOPENED","E")
Invoices were opened in an amount
^W1DICT("TOTALOPENED","H")
mekqa zeipeayg egztp
^W1DICT("TOTALOPENED","R")
Summa otkrytyh nakladnyh
^W1DICT("TOTALORDERS","E")
Orders total
^W1DICT("TOTALORDERS","H")
zepnfd k"dq
^W1DICT("TOTALORDERS","R")
Vsego zakazov
^W1DICT("TOTALORDQN","E")
Number of orders
^W1DICT("TOTALORDQN","H")
zepnfd xtqn
^W1DICT("TOTALORDS","E")
Orders
^W1DICT("TOTALORDS","H")
zepnfd
^W1DICT("TOTALORDSUM","E")
Amount of orders
^W1DICT("TOTALORDSUM","H")
zepnfd mekq 
^W1DICT("TOTALPAID","E")
Paid
^W1DICT("TOTALPAID","H")
mley k"dq
^W1DICT("TOTALPAID","R")
Vsego zapla!4eno
^W1DICT("TOTALPREV","E")
Total previous day's revenue
^W1DICT("TOTALPREV","H")
mcew mei ly zeqpkd k"dq
^W1DICT("TOTALREPORT","E")
Summary from date $1 to date $2
^W1DICT("TOTALREPORT","H")
$2 jix`z cr  $1 jix`zn mekiq
^W1DICT("TOTALREST","E")
Total Restaurant
^W1DICT("TOTALROUNDED","E")
Rounded grand total
^W1DICT("TOTALROUNDED","H")
lebir ixg` k"dq
^W1DICT("TOTALROUNDED","R")
Posle okrugleni!a
^W1DICT("TOTALSIGNED","E")
Total marked
^W1DICT("TOTALSIGNED","H")
oneq k"dq
^W1DICT("TOTALSOLEK","E")
Total by payer
^W1DICT("TOTALSOLEK","H")
wleq itl k"dq
^W1DICT("TOTALSONLY","E")
Summaries only
^W1DICT("TOTALSONLY","H")
minekiq wx
^W1DICT("TOTALSONLY","R")
Tol!mko itogi
^W1DICT("TOTALTAW","E")
Total T.A.W
^W1DICT("TOTALTAW","H")
TA k"dq
^W1DICT("TOTALTIME2PREP","E")
Total preparation time
^W1DICT("TOTALTIME2PREP","H")
dpkdl onf k"dq
^W1DICT("TOTALUT","E")
Total cost of components
^W1DICT("TOTALUT","H")
miaikxn zelr k"dq
^W1DICT("TOTALUT2ONE","E")
Cost per serving
^W1DICT("TOTALUT2ONE","H")
dpnl zelr
^W1DICT("TOTALZIC","E")
Total Promotional
^W1DICT("TOTAV","E")
Average by all orders
^W1DICT("TOTAV","H")
zepnfdd lk itl rvenn
^W1DICT("TOTAVCSR","E")
Average total per customer
^W1DICT("TOTAVCSR","H")
gewll rvenn k""dq
^W1DICT("TOTAVMSD","E")
Total average per person
^W1DICT("TOTAVMSD","H")
creql rvenn k""dq
^W1DICT("TOTAVRGDLV","E")
Average to Shippment
^W1DICT("TOTCASHDRW","E")
Total Drower Cash
^W1DICT("TOTCHKDRW","E")
Total Drower Checks
^W1DICT("TOTCIBDISC","E")
Total SODEXO Discounts
^W1DICT("TOTCLORDERS","E")
Total by closed orders
^W1DICT("TOTCLORDERS","H")
zexebq zepnfd itl k"dq
^W1DICT("TOTCOUP","E")
Total Drawer Coupons
^W1DICT("TOTCOUPDRW","E")
Total Coupons
^W1DICT("TOTCRED","E")
Total Credit
^W1DICT("TOTCREDCA","E")
Total Credit Cards
^W1DICT("TOTCREDDISC","E")
Total Credit Discounts
^W1DICT("TOTCREDDLV","E")
Credit Delieveries
^W1DICT("TOTCREDIT","E")
Total Credit
^W1DICT("TOTCREDIT","H")
dtwd k"dq
^W1DICT("TOTCREDREST","E")
Credit Restaurant
^W1DICT("TOTCREDTAW","E")
Credit T.A.W
^W1DICT("TOTDEL","E")
Canceled value
^W1DICT("TOTDEL","H")
mekqa lhea 
^W1DICT("TOTDEL","R")
Udaleno na summu
^W1DICT("TOTDLVFEE","E")
Total Deliv. Fee
^W1DICT("TOTDLVRY","E")
Shipments Total (NIS)
^W1DICT("TOTDLVRY","H")
itqk migelyn
^W1DICT("TOTDLVRYWITHOUTTIPS","E")
Shipments Total without Tips (NIS)
^W1DICT("TOTDLVRYWITHOUTTIPS","H")
mitih `ll itqk migelyn
^W1DICT("TOTDNRDRW","E")
Total Drower Diners
^W1DICT("TOTIME","E")
To hour
^W1DICT("TOTIME","H")
dryl
^W1DICT("TOTIME","R")
Vrem!a
^W1DICT("TOTINBILL","E")
Bill Total
^W1DICT("TOTINBILL","H")
oeayga k"dq
^W1DICT("TOTINCLUDETIPS","E")
Total without Tips
^W1DICT("TOTINCLUDETIPS","H")
mitih llek xefgn
^W1DICT("TOTISRDRW","E")
Total Drower Isracard
^W1DICT("TOTITEMDISC","E")
Total Items Discounts
^W1DICT("TOTJCBDRW","E")
Total Drower JCB
^W1DICT("TOTLEUMIDRW","E")
Total Drawer Leumi
^W1DICT("TOTLMAM","E")
Total before VAT
^W1DICT("TOTLMAM","H")
n"rn iptl k"dq
^W1DICT("TOTM","E")
Total reported revenue
^W1DICT("TOTM","H")
zegeecn zeqpkd k"dq
^W1DICT("TOTMANY","E")
Total according to all orders
^W1DICT("TOTMANY","H")
zepnfdd lk itl k""dq
^W1DICT("TOTMKLINE","E")
Total orders in MacLine
^W1DICT("TOTMKLINE","H")
oiilwna zepnfd k"dq
^W1DICT("TOTMOVE","E")
Tranfered value
^W1DICT("TOTMOVE","H")
mekqa xared
^W1DICT("TOTMOVE","R")
Perevod v summe
^W1DICT("TOTNETTO","E")
Total net revenue
^W1DICT("TOTNETTO","H")
ehp oeict k"dq
^W1DICT("TOTNETTODLV","E")
Netto Delieveries
^W1DICT("TOTNETTOREST","E")
Netto Restaurant
^W1DICT("TOTNETTOTAW","E")
Netto T.A.W
^W1DICT("TOTOPNDRW","E")
Total drawer oprenings
^W1DICT("TOTORD","E")
Order Total
^W1DICT("TOTORD","H")
dpnfda k"dq
^W1DICT("TOTORD","R")
Summa zakaza
^W1DICT("TOTORDLTMIN","E")
Total order items less <BR> than minimum $1 NIS
^W1DICT("TOTORDLTMIN","H")
g"y $1 menipinn <BR> zegt dpnfda mihixt k"dq
^W1DICT("TOTORDLTMIN1","E")
Total items in order less than $1 minimum NIS
^W1DICT("TOTORDLTMIN1","H")
g"y $1 menipinn zegt dpnfda mihixt k"dq
^W1DICT("TOTORDLTMINBAR","E")
Total Bar order less than minimum $1 NIS
^W1DICT("TOTORDLTMINBAR","H")
g"y $1 menipinn zegt xa zpnfda k"dq
^W1DICT("TOTORDQN30","E")
Total deliveries under 30 minutes
^W1DICT("TOTORDQN30","H")
zewc 30 zgzn zewtq` k"dq
^W1DICT("TOTPD","E")
Total revenue
^W1DICT("TOTPD","H")
oeict k"dq
^W1DICT("TOTPREVMONTH","E")
Previous month summary
^W1DICT("TOTPREVMONTH","H")
mcew yceg mekiq
^W1DICT("TOTQN","E")
Quantity sum
^W1DICT("TOTQN","H")
izenk k"dq
^W1DICT("TOTQN","R")
Vsego k-vo
^W1DICT("TOTQNDLV","E")
Delieveries Amount
^W1DICT("TOTQNSITORD","E")
"Sit" Orders Amount
^W1DICT("TOTQNTAKEORD","E")
"Take" Orders Amount
^W1DICT("TOTREADY","E")
Total ready orders
^W1DICT("TOTREADY","H")
zepken zepnfd k"dq
^W1DICT("TOTREST","E")
Revenue from restaurant
^W1DICT("TOTREST","H")
dcrqn zeqpkd
^W1DICT("TOTRESTEVENING","E")
Revenue from restaurant ( evening )
^W1DICT("TOTRESTEVENING","H")
axr dcrqn zeqpkd
^W1DICT("TOTRESTMORNING","E")
Revenue from restaurant ( morning )
^W1DICT("TOTRESTMORNING","H")
xwea dcrqn zeqpkd
^W1DICT("TOTSALES","E")
Total Sales
^W1DICT("TOTSALES","H")
zexikn k"dq
^W1DICT("TOTSALESDLV","E")
Total Delieveries
^W1DICT("TOTSITORD","E")
Total "Sit" Orders
^W1DICT("TOTSUM","E")
Grand Total
^W1DICT("TOTSUM","H")
itqk k"dq
^W1DICT("TOTSUM","R")
Summa
^W1DICT("TOTTAKEORD","E")
Total "Take" Orders
^W1DICT("TOTTAW","E")
Total TA
^W1DICT("TOTTAW","H")
TA itqk
^W1DICT("TOTTAWEVENING","E")
TA ( evening )
^W1DICT("TOTTAWEVENING","H")
axr TA
^W1DICT("TOTTAWMORNING","E")
TA ( morning )
^W1DICT("TOTTAWMORNING","H")
xwea TA
^W1DICT("TOTVISDRW","E")
Total Drower Visa
^W1DICT("TOTWITHOUTTIPS","E")
Total without tips and shipping fees
^W1DICT("TOTWITHOUTTIPS","H")
gelyn ince mitih `ll xefgn
^W1DICT("TOVIEWVIRTKBPRESSONFIELD","E")
To view a virtual keyboard click on a field
^W1DICT("TOVIEWVIRTKBPRESSONFIELD","H")
dcy lr ugl zil`ehxie zclwn zbvdl
^W1DICT("TOWEEKDAY","E")
Until the day
^W1DICT("TOWEEKDAY","H")
mein cr
^W1DICT("TOWEEKDAY","R")
do
^W1DICT("TOWIDTH","E")
To the width
^W1DICT("TOWIDTH","H")
agexl
^W1DICT("TO_DAY","E")
To day
^W1DICT("TO_DAY","H")
mei cr
^W1DICT("TO_DAY","R")
do
^W1DICT("TRANSFERCUSTOMSWITHCREDIT","E")
Transferring a client file with a certificate to a credit
^W1DICT("TRANSFERCUSTOMSWITHCREDIT","H")
dtwdl xeyi` mr zegewl uaew zxard
^W1DICT("TRANSFERITEMDATA","E")
Transfer sales data
^W1DICT("TRANSFERITEMDATA","H")
mihixt zexikn ipezp zxard
^W1DICT("TRANSFERMANYDATA","E")
Transfer of financial data
^W1DICT("TRANSFERMANYDATA","H")
miitqk mipezp zxard
^W1DICT("TRANSFERNEWCUSTOM","E")
New customer file
^W1DICT("TRANSFERNEWCUSTOM","H")
miycg zegewl uaew
^W1DICT("TRANSUM","E")
Tranzaction sum
^W1DICT("TRANSUM","H")
dwqr mekq
^W1DICT("TRANSUM","R")
Summa k oplate
^W1DICT("TREE11","E")
Product tree "1-1"
^W1DICT("TREE11","H")
"1-1" xven ur
^W1DICT("TREETABLE","E")
Busyness lunch table
^W1DICT("TREETABLE","H")
"zepn-dgex`" dlah
^W1DICT("TREETABLE","R")
Tablica "biznes-lan!4"
^W1DICT("TRICKERPARAMETERS","E")
Parameters for the "Trakker" system
^W1DICT("TRICKERPARAMETERS","H")
"xwxh" zkxrnl mixhnxt
^W1DICT("TRYAGAIN","E")
Try again
^W1DICT("TRYAGAIN","H")
aey dqp
^W1DICT("TVPARAMETERS","E")
Parameters of the "BonAppetite" system
^W1DICT("TVPARAMETERS","H")
"oea`iza" zkxrn ly mixhnxt
^W1DICT("TVPROT","E")
Protocol for the date $1
^W1DICT("TVPROT","H")
$1 jix`zl lewehext 
^W1DICT("TYPE","E")
Type
^W1DICT("TYPE","H")
beq
^W1DICT("TYPE","R")
Vid
^W1DICT("TYPEBCPRINTER","E")
Type a port number
^W1DICT("TYPEBCPRINTER","H")
hxet xtqn clwd
^W1DICT("TYPECARD","E")
Type a card number
^W1DICT("TYPECARD","H")
qihxk 'qn clwd
^W1DICT("TYPECARDNUMBER","E")
Enter the card number
^W1DICT("TYPECARDNUMBER","H")
qihxk 'qn `lnl `p
^W1DICT("TYPECARDNUMBER","R")
Vvedite nomer karto!4ki
^W1DICT("TYPECCPAYMENT","E")
Fill out credit card details
^W1DICT("TYPECCPAYMENT","H")
i`xy` iqihxk ly mihxt `lnl `p
^W1DICT("TYPECIBPAYMENT","E")
Fill in the details of the SODEXO cards
^W1DICT("TYPECIBPAYMENT","H")
qeaiq iqihxk ly mihxt `lnl `p
^W1DICT("TYPECODE","E")
Please enter the client id
^W1DICT("TYPECODE","H")
gewl 'qn cilwdl `p
^W1DICT("TYPECODE","R")
Vvedite nom. klienta
^W1DICT("TYPECOMPANYNUMBER","E")
Please enter the Business ID
^W1DICT("TYPECOMPANYNUMBER","H")
dxag 'qn `lnl `p
^W1DICT("TYPECOMPANYNUMBER","R")
Vvedite nomer kompanii
^W1DICT("TYPECVVNUMBER","E")
Type CVV
^W1DICT("TYPECVVNUMBER","H")
CVV cilwdl `p
^W1DICT("TYPEDISPATHPRINTER","E")
Type printer port number
^W1DICT("TYPEDISPATHPRINTER","H")
hxet 'qn clwd
^W1DICT("TYPEDLVDATE","E")
Enter delivery date
^W1DICT("TYPEDLVDATE","H")
dwtq` jix`z clwd
^W1DICT("TYPEDLVTIME","E")
Type a delivery time
^W1DICT("TYPEDLVTIME","H")
dwtq` zry clwd
^W1DICT("TYPEINTPRINTER","E")
Type a printer number for online invoices
^W1DICT("TYPEINTPRINTER","H")
hpxhpi`n zeipeaygl zqtcn 'qn clwd
^W1DICT("TYPEITEMSINDOC","E")
Type items in the certificate
^W1DICT("TYPEITEMSINDOC","H")
dcerza mihixt clwd
^W1DICT("TYPEORDERTIME","E")
Type an order delivery time for the customer
^W1DICT("TYPEORDERTIME","H")
gewll dpnfd zrbd onf clwd
^W1DICT("TYPEPRICELISTNUMBER","E")
Please fill in the price list
^W1DICT("TYPEPRICELISTNUMBER","H")
oexign 'qn `lnl `p
^W1DICT("TYPEREADYTIME","E")
Enter preparation end time
^W1DICT("TYPEREADYTIME","H")
dpkd meiq onf clwd
^W1DICT("TYPESUM","E")
Type an amount
^W1DICT("TYPESUM","H")
mekq clwd
^W1DICT("TYPESUPPLIEDTIME","E")
Enter delivery time
^W1DICT("TYPESUPPLIEDTIME","H")
dwtq` onf clwd
^W1DICT("TYPETAKEDTIME","E")
Enter a pickup time.
^W1DICT("TYPETAKEDTIME","H")
seqi` onf clwd
^W1DICT("TYPETNBPAYMENT","E")
Fill details of the 10B cards
^W1DICT("TYPETNBPAYMENT","H")
qia oz iqihxk ly mihxt `lnl `p
^W1DICT("TYPEWAITERNUMBER","E")
Type an employee number
^W1DICT("TYPEWAITERNUMBER","H")
caer xtqn clwd
^W1DICT("TYPINGTIME","E")
Time of input
^W1DICT("TYPINGTIME","H")
dclwd onf
^W1DICT("TYPINGTIME","R")
Vrem!a vvoda dok-ta
^W1DICT("TZ","E")
Business ID
^W1DICT("TZ","H")
.n.r/.t.g/.f.z
^W1DICT("TZ","R")
Id-!i nomer
^W1DICT("TZINUSE","E")
ID card used by an employee $1
^W1DICT("TZINUSE","H")
$1 caer lv` yeniya .f.z
^W1DICT("TZWRONG","E")
Wrong ID
^W1DICT("TZWRONG","H")
! ieby zedf 'z
^W1DICT("ULAM","E")
Hall
^W1DICT("ULAM","H")
mle`
^W1DICT("ULAMNAME","E")
Hall Name
^W1DICT("ULAMNAME","H")
mle` my
^W1DICT("ULAMREPORT","E")
Report by halls
^W1DICT("ULAMREPORT","H")
mixz` itl g"ec
^W1DICT("UNDER30TIME","E")
Percentage of orders delivered in under 30 minutes.
^W1DICT("UNDER30TIME","H")
zewc 30 cr dpznd mr zepnfd feg`
^W1DICT("UNGD","E")
Ungd
^W1DICT("UNITEDGRAPH","E")
Consolidated graph
^W1DICT("UNITEDGRAPH","H")
cge`n sxb
^W1DICT("UNITHELP1","E")
In this option the customer types items that will be transmitted later
^W1DICT("UNITHELP1","H")
glyn - jk lr i`xg` mc` oa ici lr xzei xge`n exceyiy mihixt cilwn oinfnd z`f divte`a
^W1DICT("UNITHELP1","R")
V !etom rejime vvod!ats!a dannye po zakazu kot. budut poslany pozdnee
^W1DICT("UNITORDER","E")
Collective Order
^W1DICT("UNITORDER","H")
zcge`n dpnfd
^W1DICT("UNITORDER","R")
Svodny!i zakaz
^W1DICT("UNMIN","E")
From
^W1DICT("UNTIL","E")
To
^W1DICT("UNTIL","H")
cr
^W1DICT("UNTIL","R")
do
^W1DICT("UNTIL3MIN","E")
Until 3 min
^W1DICT("UNTIL3MIN","H")
zewc 3 cr
^W1DICT("UNTIL8MIN","E")
Until 8 min
^W1DICT("UNTIL8MIN","H")
zewc 8 cr
^W1DICT("UNTILCSR","E")
To POS
^W1DICT("UNTILCSR","H")
dtew cr
^W1DICT("UNTILCSR","R")
do nom. kassy
^W1DICT("UNTILCUSTOM","E")
To Client
^W1DICT("UNTILCUSTOM","H")
gewl cr
^W1DICT("UNTILCUSTOM","R")
do nom. klienta
^W1DICT("UNTILDATE","E")
To date
^W1DICT("UNTILDATE","H")
cr
^W1DICT("UNTILDATE","R")
po
^W1DICT("UNTILITEMS","E")
Up to $1 products
^W1DICT("UNTILITEMS","H")
mihixt $1 cr
^W1DICT("UNTILITEMS","R")
do $1 bl!ud
^W1DICT("UNTILMIN","E")
Up to $1 min
^W1DICT("UNTILMIN","H")
zewc $1 cr
^W1DICT("UNTILMMYY","E")
Until
^W1DICT("UNTILMMYY","H")
cr swez
^W1DICT("UNTILMMYY","R")
De!istvitel!mna do
^W1DICT("UNTILORDER","E")
Until order
^W1DICT("UNTILORDER","H")
dpnfd cr
^W1DICT("UNTILSUM","E")
To amount
^W1DICT("UNTILSUM","H")
mekq cr 
^W1DICT("UNTILSUM","R")
do
^W1DICT("UNTILTABLE","E")
To table
^W1DICT("UNTILTABLE","H")
ogley cr
^W1DICT("UNTILTABLE","R")
do stola
^W1DICT("UP","E")
Up
^W1DICT("UP","H")
dlrn
^W1DICT("UP","R")
vverh
^W1DICT("UPDATE","E")
Update
^W1DICT("UPDATE","H")
okcr
^W1DICT("UPDATE","R")
Izm-t!m
^W1DICT("UPDATECUSTOMDETAILS","E")
Update customer information
^W1DICT("UPDATECUSTOMDETAILS","H")
gewl ihxt okcr
^W1DICT("UPDATEPROFILE","E")
Update profile
^W1DICT("UPDATEPROFILE","H")
litext oekcr
^W1DICT("UPDATEPROFILE","R")
Obnovit!m dannye pol!mzovatel!a
^W1DICT("UPDATETOKENPLEASE","E")
Please update token to receive allocation number.
^W1DICT("UPDATETOKENPLEASE","H")
052-6923399,054-4380608 dpkez wtql xywzdl `p mixexial . oweh zlaw iptl jiyndl `l .d`vwd 'qn zlawl oweh okcrl `p
^W1DICT("UPLOADPICTURE","E")
Upload Picture
^W1DICT("UPLOADPICTURE","H")
dpenz oerhl
^W1DICT("UPLOADPICTURE","R")
Zagruzit!m foto 
^W1DICT("URGENT","E")
Urgent !
^W1DICT("URGENT","H")
! segc
^W1DICT("USEBONUS","E")
Realizing budget
^W1DICT("USEBONUS","H")
aivwz yenin
^W1DICT("USERACCOUNTSTABLE","E")
Form of user bank accounts
^W1DICT("USERACCOUNTSTABLE","H")
ynzyn ly wpa zepeayg zlah
^W1DICT("USERACCOUNTSTABLE","R")
Tablica nomerov bank. s!4etov pol!mzovatel!a
^W1DICT("USERCODE","E")
User Id
^W1DICT("USERCODE","H")
ynzyn cew
^W1DICT("USERCODE","R")
Kod p-l!a
^W1DICT("USERERROR","E")
Invalid user id
^W1DICT("USERERROR","H")
oekp `l ynzyn cew
^W1DICT("USERERROR","R")
O!6ibo!4ny!i kod pol!mzovatel!a
^W1DICT("USERNAME","E")
User name
^W1DICT("USERNAME","H")
ynzyn my
^W1DICT("USERNAME","R")
Im!a pol!mzovatel!a
^W1DICT("USERPSWINVALID","E")
Wrong User id or password
^W1DICT("USERPSWINVALID","H")
dnqiqa e` ynzyn cewa d`iby
^W1DICT("USERPSWINVALID","R")
Kod pol!mzovatel!a ili parol!m ukazany neverno
^W1DICT("UTERM","E")
Your order will be send as part of collective order
^W1DICT("UTERM","H")
zcge`n dpnfdn wlgk glyz jly dpnfd
^W1DICT("UTERM","R")
Va!6 zakaz budet poslan<>kak !4ast!m ob!sego zakaza
^W1DICT("UTERM1","E")
By Dispatcher
^W1DICT("UTERM1","H")
glyn ici lr
^W1DICT("UTERM1","R")
dispet!4erom $1
^W1DICT("VALIDCUSTOMERS","E")
Active Customers
^W1DICT("VALIDCUSTOMERS","H")
milirt zegewl
^W1DICT("VALIOCARDMENU","E")
Menu of ValueCard
^W1DICT("VALIOCARDMENU","H")
cxweile ly hixtz
^W1DICT("VALIOCARDPARAMETERS","E")
ValueCard Parameters
^W1DICT("VALIOCARDPARAMETERS","H")
cx`weileel mixhnxt 
^W1DICT("VALIOREGISTRATION","E")
Register for Valuecard membership
^W1DICT("VALIOREGISTRATION","H")
cxweilee mixagl dnyxd
^W1DICT("VALUECARD","E")
ValueCard
^W1DICT("VALUECARD","H")
cx`weile
^W1DICT("VALUEPRICE","E")
Price value
^W1DICT("VALUEPRICE","H")
jxr xign
^W1DICT("VATLKMUST","E")
Company Registration No. / VAT No. / Personal ID is required !
^W1DICT("VATLKMUST","H")
! daeg gewl ly f.z/n.r/t.g
^W1DICT("VCLREPORT","E")
ValueCard customers charging report
^W1DICT("VCLREPORT","H")
"cx`weilee" zegewl ly zepirh g"ec 
^W1DICT("VCPAYMENT","E")
Payment on the VLC
^W1DICT("VCPAYMENT","H")
cx`weileea melyz
^W1DICT("VCREPORT","E")
VLC Customers Payment and Benefits Report
^W1DICT("VCREPORT","H")
"cx`weilee" zegewl zeahde minelyz g"ec 
^W1DICT("VCSITE","E")
To the VLC site
^W1DICT("VCSITE","H")
"cx`weilee" xz`l
^W1DICT("VIDU","E")
Verification
^W1DICT("VIDU","H")
`ecie
^W1DICT("VIDUAUTO","E")
Automatic verification
^W1DICT("VIDUAUTO","H")
ihnehe` `ecie
^W1DICT("VIDUHZ","E")
Confirmation of receipt of invitation
^W1DICT("VIDUHZ","H")
dpnfd zlaw `ecie
^W1DICT("VIDUYAD","E")
Verification by an employee
^W1DICT("VIDUYAD","H")
ipici `ecie
^W1DICT("VISA","E")
Visa
^W1DICT("VISA","H")
dfie
^W1DICT("VTNODEL","E")
This payment should not be canceled after closing an order
^W1DICT("VTNODEL","H")
dpnfd zxibq ixg` df melyz lhal oi`
^W1DICT("VVOD","E")
Input
^W1DICT("VVOD","R")
Vvod
^W1DICT("VWCOLORDEFINITION","E")
CSS of other screens
^W1DICT("VWCOLORDEFINITION","H")
mi`ad mitcl mirav zxcbd
^W1DICT("VWCOLORDEFINITION","R")
Cveta dl!a posledu!u!sih stranic
^W1DICT("W6SIGNITEMS","E")
If you are interested, please mark
^W1DICT("W6SIGNITEMS","H")
onql `p (z)oiipern (d)z` m`
^W1DICT("WAIT","E")
Please Wait ...
^W1DICT("WAIT","H")
... oznd `p`
^W1DICT("WAIT","R")
Pojalu!ista, podojdite
^W1DICT("WAIT4CODE","H")
cew zlawl zekgl `p
^W1DICT("WAIT4DELORD","E")
Please wait for cancellation to complete.
^W1DICT("WAIT4DELORD","H")
lehia meiql zekgl `p
^W1DICT("WAIT4ENTERCODE","H")
cew zclwdl zekgl `p
^W1DICT("WAIT4PAYMENT","E")
Please wait for payment to complete.
^W1DICT("WAIT4PAYMENT","H")
melyz meiql zekgl `p
^W1DICT("WAIT4QRCODE","H")
cew QR zlawl zekgl `p
^W1DICT("WAITCARDTEST","E")
Wait for the test results of the card
^W1DICT("WAITCARDTEST","H")
qihxk ly dwica ze`vezl zekgl `p 
^W1DICT("WAITCIBCARDTEST","E")
Please wait for card verification.
^W1DICT("WAITCIBCARDTEST","H")
qihxk zwical oznd `p`
^W1DICT("WAITCRCARDTEST","E")
Wait for results from credit card company ...
^W1DICT("WAITCRCARDTEST","H")
i`xy` qihxk ly dwica ze`vezl zekgl `p 
^W1DICT("WAITCRCARDTEST","R")
Podojdite rezul!mtaty proverki kr. karto!4ki
^W1DICT("WAITCSHTEST","H")
dwica ze`vezl zekgl `p
^W1DICT("WAITER","E")
Waiter
^W1DICT("WAITER","H")
xvln
^W1DICT("WAITER","R")
Ofic-t
^W1DICT("WAITERNAME","E")
Waiter name
^W1DICT("WAITERNAME","H")
xvln my
^W1DICT("WAITERNAME","R")
Im!a ofic-ta
^W1DICT("WAITERNUMBER","E")
Waiter id
^W1DICT("WAITERNUMBER","H")
xvln 'qn
^W1DICT("WAITERNUMBER","R")
Nom. oficianta
^W1DICT("WAITERORCOURIER","E")
Worker
^W1DICT("WAITERORCOURIER","H")
caer
^W1DICT("WAITERORCOURIER","R")
Rabotnik
^W1DICT("WAITERORCOURIERNAME","E")
Worker name
^W1DICT("WAITERORCOURIERNAME","H")
caer my
^W1DICT("WAITERORCOURIERNAME","R")
Im!a rabotnika
^W1DICT("WAITERORCOURIERNUMBER","E")
Worker
^W1DICT("WAITERORCOURIERNUMBER","H")
caer
^W1DICT("WAITERORCOURIERNUMBER","R")
Nom. rabotnika
^W1DICT("WAITERREPORT","E")
Waiters Report
^W1DICT("WAITERSREPORT","E")
Waiters report
^W1DICT("WAITERSREPORT","H")
zepnfd ilawn itl g"ec
^W1DICT("WAITERSREPORT","R")
Ot!4et po oficiantam
^W1DICT("WAITERSTABLE","E")
Form of waiters
^W1DICT("WAITERSTABLE","H")
mixvln zlah
^W1DICT("WAITERSTABLE","R")
Spr-k oficiantov
^W1DICT("WAITING","E")
On hold
^W1DICT("WAITING","H")
dpznda
^W1DICT("WAITING","R")
V ojidanii
^W1DICT("WAITREPORTCREATING","E")
Please wait for a report to be produced
^W1DICT("WAITREPORTCREATING","H")
g"ec zwtdl oznd `p`
^W1DICT("WANT2BACK","E")
At Final
^W1DICT("WANT2BACK","H")
seq-seqe
^W1DICT("WANT2BACK","R")
i nakonec
^W1DICT("WANT2GUEST","E")
Not Registred ? Proceed  as guest
^W1DICT("WANT2GUEST","H")
gxe`k i/qpk ? myxdl dvex `l
^W1DICT("WANT2GUEST","R")
Ne hotite registrirovat!ms!a ? Vo!idite kak gost!m
^W1DICT("WANT2REGISTRY","E")
Not yet Signed UP  ? Please
^W1DICT("WANT2REGISTRY","H")
`p meyx `l oiicr dz` m`
^W1DICT("WANT2REGISTRY","R")
Esli Vy ne zaregistrirovany
^W1DICT("WANT2STATUS","E")
And then check
^W1DICT("WANT2STATUS","H")
wecal k"g`e
^W1DICT("WANT2STATUS","R")
i potom proverit!m
^W1DICT("WARNING","E")
Attention !
^W1DICT("WARNING","H")
! dxdfd
^W1DICT("WARRANTY","E")
Warranty
^W1DICT("WARRANTY","H")
zeixg`
^W1DICT("WARRANTY","R")
Garanti!a
^W1DICT("WARRDOCNMB","E")
No. warranty or purchase invoice
^W1DICT("WARRDOCNMB","H")
dipw zipeayg e` zeixg` 'z 'qn
^W1DICT("WARRDOCNMB","R")
Nomer garantii ili nakladno!i
^W1DICT("WASDATAERRORS","E")
Errors found in data! Continue typing order ?
^W1DICT("WASDATAERRORS","H")
? dpnfd zclwd jiyndl m`d ! mipezpa ze`iby elbzd
^W1DICT("WASDATAERRORS!","E")
Errors found in data!
^W1DICT("WASDATAERRORS!","H")
! mipezpa ze`iby elbzd
^W1DICT("WASSALE2END","E")
The item that is shared in the order - will be moved to the end of the order.
^W1DICT("WASSALE2END","H")
dpnfd seql xarei - rvqna szhyd hixt
^W1DICT("WATCHREPORTPERDATES","E")
Report hours of employees by dates
^W1DICT("WATCHREPORTPERDATES","H")
mikix`z itl micaer zery g"ec
^W1DICT("WCHC","E")
Wch c
^W1DICT("WCHR","E")
Wch r
^W1DICT("WCHS","E")
Wch s
^W1DICT("WEB ORDERS","E")
Online Orders Number
^W1DICT("WEB ORDERS","H")
hpxhpi`n zepnfd zenk
^W1DICT("WEB T.A.W","E")
Online Carryout Sales
^W1DICT("WEB T.A.W","H")
hpxhpi`n elawzdy T.A.W. zepnfd
^W1DICT("WEB T.A.W TOTAL","E")
Online Carryout Sales
^W1DICT("WEB T.A.W TOTAL","H")
T.A.W hpxhpi`n zepnfd k"dq
^W1DICT("WEB TAW ORDERS","E")
Online Carryout Orders Number
^W1DICT("WEB TAW ORDERS","H")
hpxhpi`n T.A.W zepnfd zenk
^W1DICT("WEBCENTERSTABLE","E")
Table of data transmission centers
^W1DICT("WEBCENTERSTABLE","H")
mipezp xeciyl mifkxn zlah
^W1DICT("WEBORDERSNUMBER","E")
Online Orders Number
^W1DICT("WEBORDERSNUMBER","H")
hpxhpi`n eribdy zepnfd zenk
^W1DICT("WEBORDNUMBER","E")
Server order number
^W1DICT("WEBORDNUMBER","H")
zxya dpnfd xtqn
^W1DICT("WEBPARAMETERS","E")
Setting parameters for receiving orders from the Internet
^W1DICT("WEBPARAMETERS","H")
hpxhpi`n zepnfd zlawl mixhnxt zxcbd
^W1DICT("WEBSALES","E")
Online Sales
^W1DICT("WEBSALES","H")
hpxhpi` jxc zexikn
^W1DICT("WECONNECT","E")
For payment with credit card by phone  ,leave the fields empty.
^W1DICT("WECONNECT","H")
melyzd xcqdl ipetlh xyw jnr xevip ep` qihxkd ihxt z` cilwdl jpevxa oi` m`
^W1DICT("WECONNECT","R")
Esli ne jelaete vvodit!m dannye karto!4ki my sv!ajems!a s Vami dl!a uto!4neni!a detale!i plateja
^W1DICT("WECONNECT1","E")
Our representative will contact with you to settlement of the payment
^W1DICT("WECONNECT1","H")
melyzd xcqdl ipetlh xyw jnr xevip ep`
^W1DICT("WECONNECT1","R")
My sv!ajems!a s Vami dl!a uto!4neni!a dannyh plateja
^W1DICT("WECONNECT2","E")
For information security reasons; we will contact you by credit card settlement
^W1DICT("WECONNECT2","H")
i`xy` qihxka melyzd xcqdl ipetlh xyw jnr xevip ep` rcin zghad inrhn
^W1DICT("WEEKDAY6","E")
Friday
^W1DICT("WEEKDAY6","H")
'e mei
^W1DICT("WEEKDAY7","E")
Saturday
^W1DICT("WEEKDAY7","H")
'y mei
^W1DICT("WEEKDAYS","E")
Days of week
^W1DICT("WEEKDAYS","H")
reay ini
^W1DICT("WEEKDAYS","R")
Dni nedeli
^W1DICT("WEEKDAYS1","E")
Weekdays
^W1DICT("WEEKDAYS1","H")
leg ini
^W1DICT("WEEKORDERS","E")
Orders for next week
^W1DICT("WEEKORDERS","H")
`ad reayl zepnfd
^W1DICT("WEIGHT","E")
Weight
^W1DICT("WEIGHT","H")
lwyn
^W1DICT("WEIGHTERROR","E")
Error weighing
^W1DICT("WEIGHTERROR","H")
$1 lwyna d`iby
^W1DICT("WEIGHTORDER","E")
Weight order $1
^W1DICT("WEIGHTORDER","H")
$1 lwyn zpnfd
^W1DICT("WEIGHTORDERLIST","E")
List of weight orders made at position $1
^W1DICT("WEIGHTORDERLIST","H")
$1 dcnra eyrpy lwyn zepnfd zniyx
^W1DICT("WEIGHTPOSTABLE","E")
Table of weight positions
^W1DICT("WEIGHTPOSTABLE","H")
zetewe zecnr zlah
^W1DICT("WELCOME","E")
Welcome to our site !
^W1DICT("WELCOME","H")
! mi`ad mikexa
^W1DICT("WELCOME","R")
Dobro pojalovat!m na na!6 sa!it !
^W1DICT("WELCOMETOONLINE","E")
Welcome to the online orders system
^W1DICT("WELCOMETOONLINE","H")
! oiil oe` zepnfd zkxrnl `ad jexa
^W1DICT("WELCOMETOREGISTRY","E")
An unregistered customer must first register
^W1DICT("WELCOMETOREGISTRY","H")
myxidl dligz yi meyx `l gewll
^W1DICT("WHATBALANCE","E")
Balance inquiry
^W1DICT("WHATBALANCE","H")
dxzi xexia
^W1DICT("WHATNOW","E")
Status now
^W1DICT("WHATNOW","H")
eiykr avn
^W1DICT("WHATPRINTERTOBESEND","E")
Select printer to print the message
^W1DICT("WHATPRINTERTOBESEND","H")
? drced xbyl zqtcn dfi`l
^W1DICT("WHATPRINTERTOBESEND","R")
Na kako!i printer poslat!m soob!senie ?
^W1DICT("WHATSAPPERROR","E")
Error sending document to WhatsApp
^W1DICT("WHATSAPPERROR","H")
t`qheel jnqn xeciya d`iby
^W1DICT("WHATSAPPNUMBER","E")
Phone to WhatsApp
^W1DICT("WHATSAPPNUMBER","H")
t`qheel 'lh
^W1DICT("WHATSAPPNUMBERWRONG","E")
The phone number for sending to WhatsApp is incorrect !
^W1DICT("WHATSAPPNUMBERWRONG","H")
! ieby t`qheel xebiyl oetlh 'qn
^W1DICT("WHATSAPPSENDED","E")
Document sent to WhatsApp
^W1DICT("WHATSAPPSENDED","H")
t`qheel glyp jnqn
^W1DICT("WHATTODO","E")
What do you want to do ?
^W1DICT("WHATTODO","H")
?zeyrl jpevxa dn
^W1DICT("WHATTODO","R")
!4to jelaete ?
^W1DICT("WHATYOUDESIRE","E")
Do you want
^W1DICT("WHATYOUDESIRE","H")
jpevxa m`d
^W1DICT("WHATYOUDESIRE","R")
!4to pojelaete ?
^W1DICT("WHATYOURMIND","E")
Please leave a feedback
^W1DICT("WHATYOURMIND","H")
? jzrc dn
^W1DICT("WHATYOURMIND","R")
Va!6e mnenie
^W1DICT("WHATYOUWHANT","E")
What do you want?
^W1DICT("WHATYOUWHANT","H")
? jpevx dn
^W1DICT("WHENCOMMUNICATE","E")
When to call
^W1DICT("WHENCOMMUNICATE","H")
xywzdl izn
^W1DICT("WHENSENDFAX","E")
When to send a fax
^W1DICT("WHENSENDFAX","H")
qwt gelyl izn
^W1DICT("WHERESEND","E")
Where to send
^W1DICT("WHERESEND","H")
gelyl o`l
^W1DICT("WHOCOUNT","E")
Name of counter
^W1DICT("WHOCOUNT","H")
xteqd my
^W1DICT("WHODEL","E")
The name of the canceler
^W1DICT("WHODEL","H")
lhand my
^W1DICT("WHODELETE","E")
Deleted by
^W1DICT("WHODELETE","H")
? lhan in
^W1DICT("WHODELETE","R")
Kto udal!aet ?
^W1DICT("WHOINVEST","E")
Depositor name
^W1DICT("WHOINVEST","H")
ciwtn my
^W1DICT("WHOPERMIT","E")
Who approves ?
^W1DICT("WHOPERMIT","H")
? xy`n in
^W1DICT("WHOSUBMIT","E")
Approver number
^W1DICT("WHOSUBMIT","H")
xy`n ly xtqn
^W1DICT("WHOSUBMNM","E")
Approver
^W1DICT("WHOSUBMNM","H")
xy`nd
^W1DICT("WHOSURE","E")
Who made sure
^W1DICT("WHOSURE","H")
`ciee in
^W1DICT("WIDTH","E")
Width
^W1DICT("WIDTH","H")
agex
^W1DICT("WILLFREECOURIERS","E")
Couriers are about to become available
^W1DICT("WILLFREECOURIERS","H")
zeptzdl micner
^W1DICT("WILLPAYASR","E")
Will be paid on credit
^W1DICT("WILLPAYASR","H")
dtwda mleyi
^W1DICT("WILLPAYCA","E")
Will be paid by credit card
^W1DICT("WILLPAYCA","H")
i`xy` qihxka mleyi
^W1DICT("WILLPAYCASH","E")
Will be paid in cash
^W1DICT("WILLPAYCASH","H")
onefna mleyi
^W1DICT("WILLPAYCHECK","E")
Will be paid by check
^W1DICT("WILLPAYCHECK","H")
wiya mleyi
^W1DICT("WITHADDS","E")
Includes adds
^W1DICT("WITHADDS","H")
zetqez llek
^W1DICT("WITHOUTTIPS","E")
Without tips
^W1DICT("WITHOUTTIPS","H")
mitih `ll
^W1DICT("WORKCLOCKDEFINITION","E")
Workers Timetable definitions
^W1DICT("WORKCLOCKDEFINITION","H")
zegkep oeryl zexcbd
^W1DICT("WORKCLOCKDEFINITION","R")
Opredeleni!a dl!a u!4eta !4asov
^W1DICT("WORKER","E")
Employee
^W1DICT("WORKER","H")
caer
^W1DICT("WORKERABSENCECAUSES","E")
Reasons for absence from work of working $1 $2 from $3 to $4
^W1DICT("WORKERABSENCECAUSES","H")
$4 jix`z cr $3 jix`zn $2 $1 caer ly dcearn zexcrd zeaiq 
^W1DICT("WORKERCARD","E")
Employee Card
^W1DICT("WORKERCARD","H")
caer qihxk
^W1DICT("WORKERCLOCKREPORT","E")
Employee hours report
^W1DICT("WORKERCLOCKREPORT","H")
micaer zery g"ec
^W1DICT("WORKEREXPIRED","E")
Employee is inactive
^W1DICT("WORKEREXPIRED","H")
lirt `l caer
^W1DICT("WORKERIN","E")
Worker $2 entered at $1
^W1DICT("WORKERIN","H")
$1 drya qpkp $2 caer
^W1DICT("WORKERIN","R")
Rabotnik $2 vo!6el v $1
^W1DICT("WORKERISNOTPRESENT","E")
Worker  not yet entered in.Call the manager
^W1DICT("WORKERISNOTPRESENT","H")
ldpnl `xw. gkep `l caer
^W1DICT("WORKERISNOTPRESENT","R")
Rabotnik ne prisutstvuet . Obratites!m k na!4al!mniku
^W1DICT("WORKERISPRESENTTOOMUCHTIME","E")
Worker  not yet entered out.Call the manager
^W1DICT("WORKERISPRESENTTOOMUCHTIME","H")
ldpnl `xw. onf icin xzei gkep caer
^W1DICT("WORKERISPRESENTTOOMUCHTIME","R")
Rabotnik prisutstvuet sli!6kom dolgo. Obratites!m k na!4al!mniku
^W1DICT("WORKERISPRESENTYET","E")
Worker already entered in.Call the manager
^W1DICT("WORKERISPRESENTYET","H")
ldpnl `xw. gkep xak caer
^W1DICT("WORKERISPRESENTYET","R")
Rabotnik prisutstvuet . Obratites!m k na!4al!mniku
^W1DICT("WORKERNAME","E")
Worker name
^W1DICT("WORKERNAME","H")
(NAME) caer my
^W1DICT("WORKERNAME","R")
Im!a rabotnika
^W1DICT("WORKERNOTACTIVE","E")
Employee is inactive
^W1DICT("WORKERNOTACTIVE","H")
lirt `l caer
^W1DICT("WORKERNOTDEFINED","E")
An employee has not been set up in the system
^W1DICT("WORKERNOTDEFINED","H")
zkxrna xcbed `l caer
^W1DICT("WORKERNOTINBIOTABLE","E")
Employee not found in biometric table
^W1DICT("WORKERNOTINBIOTABLE","H")
ixhne`ia dlaha `vnp `l caer
^W1DICT("WORKERNUMBER","E")
Worker number
^W1DICT("WORKERNUMBER","H")
(ID) caer 'qn
^W1DICT("WORKERNUMBER","R")
Nom. rabotnika
^W1DICT("WORKERNUMBERISWRONG","E")
Wrong worker number
^W1DICT("WORKERNUMBERISWRONG","H")
ieby caer 'qn
^W1DICT("WORKERNUMBERISWRONG","R")
Neverny!i nom. rabotnika
^W1DICT("WORKERNUMBERNOTINUSE","E")
Employee is inactive
^W1DICT("WORKERNUMBERNOTINUSE","H")
lirt `l caer
^W1DICT("WORKEROUT","E")
Worker $2 is out at  $1
^W1DICT("WORKEROUT","H")
$1 drya d`vi $2 caer
^W1DICT("WORKEROUT","R")
Rabotnik $2 vy!6el v $1
^W1DICT("WORKEROWEOPNORDS","H")
zegezt zepnfd yi $1 caerl
^W1DICT("WORKEROWESMANY","E")
The messenger did not return money
^W1DICT("WORKEROWESMANY","H")
sqk xifgd `l gily
^W1DICT("WORKEROWESMANYCONTINUE","H")
? jiyndl . sqk xifgd `l $1 gily
^W1DICT("WORKERSCLOCKSYSTEM","E")
Employee details and presence reports
^W1DICT("WORKERSCLOCKSYSTEM","H")
zegkep ze"gece micaer ihxt
^W1DICT("WORKERSCLOSING","E")
Closing employees' hours
^W1DICT("WORKERSCLOSING","H")
micaer zery zxibq
^W1DICT("WORKERSGROUPTABLE","E")
Form of workers groups
^W1DICT("WORKERSGROUPTABLE","H")
micaer zeveaw zlah
^W1DICT("WORKERSGROUPTABLE","R")
Tablica grupp rabotnikov
^W1DICT("WORKERSLIST","E")
Employee list
^W1DICT("WORKERSLIST","H")
micaer zniyx
^W1DICT("WORKERSPASSWORDS","E")
Employees passwords
^W1DICT("WORKERSPASSWORDS","H")
micaer ze`nqiq
^W1DICT("WORKERSREPORTS","E")
Employees reports
^W1DICT("WORKERSREPORTS","H")
micaer zeg"ec
^W1DICT("WORKERSSENDINGSTATUS","E")
Employee attendance data transmission protocol
^W1DICT("WORKERSSENDINGSTATUS","H")
micaer zegkep ipezp ly mixeciy lewehext
^W1DICT("WORKERSTABLE","E")
Form of workers
^W1DICT("WORKERSTABLE","H")
micaer zlah
^W1DICT("WORKERSTABLE","R")
Tablica rabotnikov
^W1DICT("WORKERSTIPTABLE","E")
Workers list
^W1DICT("WORKERSTIPTABLE","H")
zfkexn micaer zlah
^W1DICT("WORKERSTIPTABLE","R")
Svodna!a tablica rabotnikov
^W1DICT("WORKERSYSTEM","E")
Workers System
^W1DICT("WORKERSYSTEM","H")
micaer zkxrn
^W1DICT("WORKERWORKED","E")
Worked for $1 hours
^W1DICT("WORKERWORKED","H")
zery $1 car
^W1DICT("WORKERWXPIRED","E")
Employee is inactive
^W1DICT("WORKERWXPIRED","H")
lirt `l caer
^W1DICT("WORKFROMOTHERTERMINAL","E")
In use from terminal $1
^W1DICT("WORKFROMOTHERTERMINAL","H")
$1 seqnn dpkezd mr micaer
^W1DICT("WORKFROMOTHERTERMINAL","R")
S programmo!i rabota!ut s dr. terminala
^W1DICT("WORKPROGRAMM","E")
Work Plan
^W1DICT("WORKPROGRAMM","H")
dcear zipkez
^W1DICT("WORKPROGRAMM2DISPATH","E")
Work plan to sending
^W1DICT("WORKPROGRAMM2DISPATH","H")
xebiyl dcear zipkez
^W1DICT("WORKPROGRAMM2DISPATHDEP","E")
Dispatch work plan by department
^W1DICT("WORKPROGRAMM2DISPATHDEP","H")
zewlgn itl xebiyl dcear zipkez
^W1DICT("WORKTIME","E")
Working hours
^W1DICT("WORKTIME","H")
dcear zery
^W1DICT("WORKTIME","R")
!04asy raboty
^W1DICT("WORKTIMEGROUPREPAIR","E")
Repair of working hours for a group of employees
^W1DICT("WORKTIMEGROUPREPAIR","H")
micaer zveawl dcear zery oewiz
^W1DICT("WORKTIMEREPAIR","E")
Correct   working hours
^W1DICT("WORKTIMEREPAIR","H")
ccea caerl dcear zery oewiz
^W1DICT("WORKTIMEREPAIR","R")
Izm-e !4asov raboty
^W1DICT("WORKWITHCODES","E")
Working with codes
^W1DICT("WORKWITHCODES","H")
micew mr dcear
^W1DICT("WORKWITHCUST4OTHERPOS","E")
Working with a client from a position $1
^W1DICT("WORKWITHCUST4OTHERPOS","H")
$1 dcnrn gewl mr micaer
^W1DICT("WRITEFEEDBACK","E")
Thanks you for visiting our site ! <BR> Feedback will be appreciated
^W1DICT("WRITEFEEDBACK","H")
epl i/aezkz ,dywaa <BR> dpnfdd jildz iabl zervd / zexrd jl yi m` <BR> ! eplv` zxwiay dcez
^W1DICT("WRITEFEEDBACK","R")
Spasibo za pose!senie ! Esli u Vas est!m kakie-to zame!4ani!a , napi!6ite nam !
^W1DICT("WRONGCARDNUMBER","E")
Incorrect Card number
^W1DICT("WRONGCARDNUMBER","H")
ieby qihxk 'qn
^W1DICT("WRONGCARDNUMBER","R")
Neverny!i nomer karto!4ki
^W1DICT("WRONGCOMPANYNUMBER","E")
Incorrect Company ID
^W1DICT("WRONGCOMPANYNUMBER","H")
ieby dxag 'qn
^W1DICT("WRONGCOMPANYNUMBER","R")
Neverny!i nomer kompanii
^W1DICT("WRONGCSRNUMBER","E")
Wrong POS number
^W1DICT("WRONGCSRNUMBER","H")
ieby dtew 'qn
^W1DICT("WRONGCUSTNUMBER","E")
Wrong customer number
^W1DICT("WRONGCUSTNUMBER","H")
ieby gewl 'qn
^W1DICT("WRONGCVVNUMBER","E")
Incorrect CVV
^W1DICT("WRONGCVVNUMBER","H")
ieby CVV
^W1DICT("WRONGDATE","E")
Wrong date
^W1DICT("WRONGDATE","H")
ieby jix`z
^W1DICT("WRONGFIELDVALUE","E")
Wrong value "$1"
^W1DICT("WRONGFIELDVALUE","H")
ieby "$1" dcy jxr
^W1DICT("WRONGFIELDVALUE","R")
Zn-e pol!a "$1" o!6ibo!4n.
^W1DICT("WRONGGROUPCODE","E")
Wrong group number
^W1DICT("WRONGGROUPCODE","H")
ieby dveaw 'qn
^W1DICT("WRONGIDNUMBER","E")
Incorrect ID
^W1DICT("WRONGIDNUMBER","H")
dpekp `l zxewia zxtiq
^W1DICT("WRONGIDNUMBER","R")
O!6ibo!4ny!i nomer
^W1DICT("WRONGORG","E")
Incorrect provider / customer number
^W1DICT("WRONGORG","H")
ieby gewl / wtq xtqn
^W1DICT("WRONGPICTURETYPE","E")
Unsupported picture type
^W1DICT("WRONGPICTURETYPE","H")
oekp `l dpenz beq
^W1DICT("WRONGPICTURETYPE","R")
Neverny!i tip kartinki
^W1DICT("WRONGRECEIVER","E")
The receiver name is incorrect
^W1DICT("WRONGRECEIVER","H")
! ieby lawnd my
^W1DICT("WRONGSUM","H")
ieby mekq
^W1DICT("WRONGTABLENUMBER","E")
Wrong table number
^W1DICT("WRONGTABLENUMBER","H")
ieby ogley 'qn
^W1DICT("WRONGVALUE","E")
Incorrect value
^W1DICT("WRONGVALUE","H")
ieby jxr
^W1DICT("WRONGVALUE","R")
O!6ib-e zna!4enie
^W1DICT("YEARCOMPARISONGRAPH","E")
Comparative Graph Year $1 vs. Year $2 by Months
^W1DICT("YEARCOMPARISONGRAPH","H")
miyceg itl $2 dpy len $1 dpy iz`eeyd sxb
^W1DICT("YEARMONTHDLVREPORT","E")
Shipping report per year $1 per month $2 per month $3
^W1DICT("YEARMONTHDLVREPORT","H")
$3 yceg cr $2 ycegn $1 dpyl migelyn g"ec
^W1DICT("YEARMONTHREPORT","E")
Annual report $1 per month $2 per month $3
^W1DICT("YEARMONTHREPORT","H")
$3 yceg cr $2 ycegn $1 dpyl g"ec
^W1DICT("YEARMONTHRESTREPORT","E")
Restaurant report per year $1 per month $2 per month $3
^W1DICT("YEARMONTHRESTREPORT","H")
$3 yceg cr $2 ycegn $1 dpyl dcrqn g"ec
^W1DICT("YEARPROFITDEPSGRAPH","E")
Report and Graphs Sales Items by Departments [Yearly by Month]
^W1DICT("YEARPROFITDEPSGRAPH","H")
[ miyceg itl izpy ] zewlgn itl mihixt zexikn mitxbe g"ec
^W1DICT("YEARPROFITGRAPH","E")
Annual Sales Graph by Months
^W1DICT("YEARPROFITGRAPH","H")
miyceg itl izpy zexikn sxb
^W1DICT("YEARPROFITGROUPSGRAPH","E")
Report and Graphs Sales Items by Groups [Annual by Month]
^W1DICT("YEARPROFITGROUPSGRAPH","H")
[ miyceg itl izpy ] zeveaw itl mihixt zexikn mitxbe g"ec
^W1DICT("YEARS","E")
Years
^W1DICT("YEARS","H")
mipy
^W1DICT("YEARSPROFITGRAPH","E")
Sales Graph by Years
^W1DICT("YEARSPROFITGRAPH","H")
mipy itl zexikn sxb
^W1DICT("YES","E")
Yes
^W1DICT("YES","H")
ok
^W1DICT("YES","R")
Da
^W1DICT("YOUAREWELCOME","E")
Welcome to our site !
^W1DICT("YOUAREWELCOME","H")
! `ad jexa
^W1DICT("YOUAREWELCOME","R")
Dobro pojalovat!m !
^W1DICT("YOURNETPLACE","E")
Average prep. time $1 min. $2 sec, net position $3 [first place $4 with $5:$6 ]
^W1DICT("YOURNETPLACE","H")
[zeipy $6 zewc $5 onf mr $4 oey`x mewn ] $3 zyxa mewn ,zeipy $2 zewc $1 rvenn dpkd onf
^W1DICT("YOURORDERNUMBER","E")
Your order number is
^W1DICT("YOURORDERNUMBER","H")
- dpnfd 'qn
^W1DICT("YOURORDERNUMBER","R")
Va!6 nomer zakaza
^W1DICT("YY","E")
Year
^W1DICT("YY","H")
dpy
^W1DICT("YY","R")
God
^W1DICT("YY1","E")
From Year
^W1DICT("YY1","H")
dpyn
^W1DICT("YY2","E")
To Year
^W1DICT("YY2","H")
dpy cr
^W1DICT("ZAGNUMBER","E")
Monitor No
^W1DICT("ZAGNUMBER","H")
bv 'qn
^W1DICT("ZAGTABLE","E")
Table of monitors
^W1DICT("ZAGTABLE","H")
mibv zlah
^W1DICT("ZERODOCSUM","E")
Document value should be greater than 0
^W1DICT("ZERODOCSUM","H")
0 -n dpey zeidl aiig jnqna mekq
^W1DICT("ZERODOCSUM","R")
Summa po dok-tu doljna otli!4at!ms!a ot 0
^W1DICT("ZERONAME","E")
Enter product name
^W1DICT("ZERONAME","H")
hixt my clwd
^W1DICT("ZERONAME","R")
Vvedite naim-e
^W1DICT("ZEROPAYSUM","E")
Total should be greater than 0
^W1DICT("ZEROPAYSUM","H")
"rva" ywn lr ueglle minelyz xtqn oiivl `p ,onefnn dpey melyz beq m` <> 0 -n dpey zeidl aiig melyza mekq
^W1DICT("ZEROPAYSUM","R")
Summa plateja doljna otli!4at!ms!a ot 0
^W1DICT("ZEROPRICE","E")
Enter Product price
^W1DICT("ZEROPRICE","H")
xign clwd
^W1DICT("ZEROPRICE","R")
Vvedite cenu
^W1DICT("ZHUT","E")
Credit
^W1DICT("ZHUT","H")
zekf
^W1DICT("ZHUT","R")
Debet
^W1DICT("ZIC","E")
Credits
^W1DICT("ZIC","H")
miiekif
^W1DICT("ZIP","E")
Zip Code
^W1DICT("ZIP","H")
cewin
^W1DICT("ZIP","R")
Index
^W1DICT("ZMANK","E")
Order receive time
^W1DICT("ZMANK","H")
dpnfd zlaw onf
^W1DICT("ZMANK","R")
Vrem!a polu!4eni!a zakaza
^W1DICT("ZNUMBER","E")
Z number
^W1DICT("ZNUMBER","H")
Z 'qn
^W1DICT("ZOOMPARAMETERS","E")
Parameters to system "ZOOM"
^W1DICT("ZOOMPARAMETERS","H")
"ZOOM" zkxrnl mixhnxt
^W1DICT("ZOPNDELREPORT","E")
Automatic cancellation report before Z
^W1DICT("ZOPNDELREPORT","H")
Z iptl ihnehe` elheay zepnfd g"ec
^W1DICT("ZREPCR","E")
Z credit
^W1DICT("ZREPCR","H")
Z dtwd
^W1DICT("ZREPORT","E")
Z-s concentration report
^W1DICT("ZREPORT","H")
miZ- fekix g"ec
^W1DICT("ZREPPD","E")
Z Redemption
^W1DICT("ZREPPD","H")
Z oeict
^W1DICT("ZRKZSHORT","E")
Z-s concentration report -  shortened
^W1DICT("ZRKZSHORT","H")
xvewn mi - Z fekix g"ec
^W1DICT("ZSTRPARAMETERS","E")
System parameters for "ZESTER"
^W1DICT("ZSTRPARAMETERS","H")
"ZESTER" zkxrn ly mixhnxt
^W1DICT("ZSTRPROT","E")
Transmission protocol for "ZESTER"
^W1DICT("ZSTRPROT","H")
"ZESTER" -l mixeciy ly lowehext
^W1DICT("ZSTRSENDINGPROTOCOL","E")
Transmission protocol for "ZESTER" from $1 to $2
^W1DICT("ZSTRSENDINGPROTOCOL","H")
$2 jix`z cr $1 jix`zn "ZESTER" - l mipezp xeciy ly lewehext
^W1DICT("zeaeyze zel`y","E")
FAQ
^W1REP("E")
mixvln itl mihixt g"ec
^W1REP("E","AH")
zegex` g"ec
^W1REP("E","AH",0,"OVED")
caer;5.
^W1REP("E","AH",0,"OVED","FILE")
^NAME
^W1REP("E","AH",0,"OVED","M2")
S OVED1=$G(^NAME(OVED,1))
^W1REP("E","AH",0,"OVED","OUT")
OVED1
^W1REP("E","AH",0,"OVED","SET")
1
^W1REP("E","AH",0,"OVED1")
caer my;12H
^W1REP("E","AH",0,"OVED1","SET")
0
^W1REP("E","AH",0,"OVED1","SH")
1
^W1REP("E","AH",0,"SUG")
dgex` beq;10H
^W1REP("E","AH",0,"SUG","SET")
0
^W1REP("E","AH",0,"SUG","SH")
1
^W1REP("E","AH",0,"TRH")
jix`z;8D
^W1REP("E","AH",0,"TRH","SET")
0
^W1REP("E","AH",0,"TRH","SH")
1
^W1REP("E","AH",0,"x1")
zenk;5,0
^W1REP("E","AH",0,"x2")
;,
^W1REP("E","AH","COD")
TRH*OVED*OVED1*SUG*x1
^W1REP("E","AH","CT")
0*0*0
^W1REP("E","AH","FLD")
TRH*OVED*SUG*x1
^W1REP("E","AH","FLD0")

^W1REP("E","AH","GLOB1")
^AH
^W1REP("E","AH","GLOB2")
^AH(OVED,DT,IND)
^W1REP("E","AH","LPT")
B
^W1REP("E","AH","MIUN")
2*1*3
^W1REP("E","AH","QUERY","micaer itl g""ec","CT")
0*0*0
^W1REP("E","AH","QUERY","micaer itl g""ec","FLD0")

^W1REP("E","AH","QUERY","micaer itl g""ec","MIUN")
2*1*3
^W1REP("E","AH","QUERY","micaer itl g""ec","SIK0")
0*1*0
^W1REP("E","AH","QUERY","mikix`z itl g""ec","CT")
0*0*0
^W1REP("E","AH","QUERY","mikix`z itl g""ec","FLD0")

^W1REP("E","AH","QUERY","mikix`z itl g""ec","MIUN")
1*2*3
^W1REP("E","AH","QUERY","mikix`z itl g""ec","SIK0")
1*0*0
^W1REP("E","AH","SIK")
1*
^W1REP("E","AH","SIK0")
0*1*0
^W1REP("E","AH","US",2)
S TRH=$$^%L1DC(DT,1)
^W1REP("E","AH","US",3)
S SUG=$G(^AHSUG(IND)),x1=1
^W1REP("E","BIT")
mihixt milehia g"ec
^W1REP("E","BIT",0,"HB")
zipeayg;8
^W1REP("E","BIT",0,"HZM")
dpnfd;7
^W1REP("E","BIT",0,"HZM","SH")
1
^W1REP("E","BIT",0,"LKH")
gewl 'qn;10
^W1REP("E","BIT",0,"LKH","FILE")
^LKH
^W1REP("E","BIT",0,"LKH","OUT")
LKH1
^W1REP("E","BIT",0,"LKH1")
gewl my;20H
^W1REP("E","BIT",0,"NAME")
gewl my;12H
^W1REP("E","BIT",0,"NAME","SH")
1
^W1REP("E","BIT",0,"NCAB")
zipeayg;6
^W1REP("E","BIT",0,"NCAB","SH")
0
^W1REP("E","BIT",0,"NMB")
gewl xtqn;10
^W1REP("E","BIT",0,"NMB","FILE")
^LKH
^W1REP("E","BIT",0,"NMB","OUT")
NAME
^W1REP("E","BIT",0,"PAR")
hixt 'qn;8
^W1REP("E","BIT",0,"PAR","FILE")
^PAR
^W1REP("E","BIT",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","BIT",0,"PAR","OUT")
PAR1
^W1REP("E","BIT",0,"PAR1")
hixt xe`z;16H
^W1REP("E","BIT",0,"PAR1","SH")
1
^W1REP("E","BIT",0,"PSL")
gily cew;3
^W1REP("E","BIT",0,"PSL","FILE")
^P1SL
^W1REP("E","BIT",0,"PSL","OUT")
PSL1
^W1REP("E","BIT",0,"PSL1")
gily my;10H
^W1REP("E","BIT",0,"PSL1","SH")
1
^W1REP("E","BIT",0,"SHAA")
dryl;5
^W1REP("E","BIT",0,"SHAA","SH")
1
^W1REP("E","BIT",0,"SL")
gily cew;5
^W1REP("E","BIT",0,"SL","FILE")
^P1SL
^W1REP("E","BIT",0,"SL","OUT")
SL1
^W1REP("E","BIT",0,"SL1")
gily my;12H
^W1REP("E","BIT",0,"SUGT")
melyz beq;5
^W1REP("E","BIT",0,"SUGT","SH")
1
^W1REP("E","BIT",0,"TRH")
jix`z;8D
^W1REP("E","BIT",0,"TRH","M2")
S TRH=$$^%L1DC(DT,1)
^W1REP("E","BIT",0,"TRH","SH")
1
^W1REP("E","BIT",0,"TS")
melyzl;8
^W1REP("E","BIT",0,"TSHL")
melyzl;8
^W1REP("E","BIT",0,"TSHL","OUT")
TSHL
^W1REP("E","BIT",0,"x1")
lhea;4,0
^W1REP("E","BIT",0,"x2")
mekqa;8,2
^W1REP("E","BIT",0,"x3")
;,
^W1REP("E","BIT","COD")
TRH*SHAA*HZM*PAR*PAR1*x1*x2
^W1REP("E","BIT","CT")
0*0*0*0*0*0
^W1REP("E","BIT","FLD")
TRH*SHAA*HZM*PAR*x1*x2
^W1REP("E","BIT","FLD0")
*-*-***
^W1REP("E","BIT","GLOB1")
^VRM($J)
^W1REP("E","BIT","GLOB2")
^VRM($J,DT,SHAA,HZM,PAR)
^W1REP("E","BIT","LPT")
B
^W1REP("E","BIT","MIUN")
1*3*1*2*0*0
^W1REP("E","BIT","MIUN","PROG")
TRH^P1DPBIT
^W1REP("E","BIT","QUERY","(gahndn e`vi `ly mihixt itl) fkexn","CT")
0*0*0*0*0*0
^W1REP("E","BIT","QUERY","(gahndn e`vi `ly mihixt itl) fkexn","FLD0")
*-*-***
^W1REP("E","BIT","QUERY","(gahndn e`vi `ly mihixt itl) fkexn","MIUN")
1*3*1*2*0*0
^W1REP("E","BIT","QUERY","(gahndn e`vi `ly mihixt itl) fkexn","SIK0")
1*0*0*0*0*0
^W1REP("E","BIT","QUERY","(gahndn e`vi `ly mihixt itl) hxetn","CT")
0*0*0*0*0*0
^W1REP("E","BIT","QUERY","(gahndn e`vi `ly mihixt itl) hxetn","FLD0")
*****
^W1REP("E","BIT","QUERY","(gahndn e`vi `ly mihixt itl) hxetn","MIUN")
2*4*3*1*0*0
^W1REP("E","BIT","QUERY","(gahndn e`vi `ly mihixt itl) hxetn","SIK0")
0*0*0*1*0*0
^W1REP("E","BIT","QUERY","(gahndn e`viy mihixt itl) fkexn","CT")
0*0*0*0*0*0
^W1REP("E","BIT","QUERY","(gahndn e`viy mihixt itl) fkexn","FLD0")
*-*-***
^W1REP("E","BIT","QUERY","(gahndn e`viy mihixt itl) fkexn","MIUN")
1*3*1*2*0*0
^W1REP("E","BIT","QUERY","(gahndn e`viy mihixt itl) fkexn","SIK0")
1*0*0*0*0*0
^W1REP("E","BIT","QUERY","(gahndn e`viy mihixt itl) hxetn","CT")
0*0*0*0*0*0
^W1REP("E","BIT","QUERY","(gahndn e`viy mihixt itl) hxetn","FLD0")
*****
^W1REP("E","BIT","QUERY","(gahndn e`viy mihixt itl) hxetn","MIUN")
2*4*3*1*0*0
^W1REP("E","BIT","QUERY","(gahndn e`viy mihixt itl) hxetn","SIK0")
0*0*0*1*0*0
^W1REP("E","BIT","QUERY","gahndn e`vi `ly mihixt itl fkexn","CT")
0*0*0*0*0*0
^W1REP("E","BIT","QUERY","gahndn e`vi `ly mihixt itl fkexn","FLD0")
*-*-***
^W1REP("E","BIT","QUERY","gahndn e`vi `ly mihixt itl fkexn","MIUN")
1*3*1*2*0*0
^W1REP("E","BIT","QUERY","gahndn e`vi `ly mihixt itl fkexn","SIK0")
1*0*0*0*0*0
^W1REP("E","BIT","QUERY","gahndn e`vi `ly mihixt itl hxetn","CT")
0*0*0*0*0*0
^W1REP("E","BIT","QUERY","gahndn e`vi `ly mihixt itl hxetn","FLD0")
*****
^W1REP("E","BIT","QUERY","gahndn e`vi `ly mihixt itl hxetn","MIUN")
2*4*3*1*0*0
^W1REP("E","BIT","QUERY","gahndn e`vi `ly mihixt itl hxetn","SIK0")
0*0*0*1*0*0
^W1REP("E","BIT","QUERY","gahndn e`viy mihixt itl fkexn","CT")
0*0*0*0*0*0
^W1REP("E","BIT","QUERY","gahndn e`viy mihixt itl fkexn","FLD0")
*-*-***
^W1REP("E","BIT","QUERY","gahndn e`viy mihixt itl fkexn","MIUN")
1*3*1*2*0*0
^W1REP("E","BIT","QUERY","gahndn e`viy mihixt itl fkexn","SIK0")
1*0*0*0*0*0
^W1REP("E","BIT","QUERY","gahndn e`viy mihixt itl hxetn","CT")
0*0*0*0*0*0
^W1REP("E","BIT","QUERY","gahndn e`viy mihixt itl hxetn","FLD0")
*****
^W1REP("E","BIT","QUERY","gahndn e`viy mihixt itl hxetn","MIUN")
2*4*3*1*0*0
^W1REP("E","BIT","QUERY","gahndn e`viy mihixt itl hxetn","SIK0")
0*0*0*1*0*0
^W1REP("E","BIT","SHP","KOD")
P1HZH
^W1REP("E","BIT","SIK")
1*1*
^W1REP("E","BIT","SIK0")
1*0*0*0*0*0
^W1REP("E","BIT","US",2)
S TRH=$$^%L1DC(DT,1)
^W1REP("E","BIT","US",5)
D PAR^P1DPBIT
^W1REP("E","BITS")
zeaiq itl mihixt milehia g"ec
^W1REP("E","BITS",0,"HZM")
dpnfd;7
^W1REP("E","BITS",0,"HZM","SH")
1
^W1REP("E","BITS",0,"MLZR")
xvln;5
^W1REP("E","BITS",0,"MLZR","FILE")
^NAME
^W1REP("E","BITS",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("E","BITS",0,"MLZR","OUT")
MLZR1
^W1REP("E","BITS",0,"MLZR1")
xvln my;10H
^W1REP("E","BITS",0,"MLZR1","SH")
1
^W1REP("E","BITS",0,"PAR")
hixt 'qn;8
^W1REP("E","BITS",0,"PAR","FILE")
^PAR
^W1REP("E","BITS",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","BITS",0,"PAR","OUT")
PAR1
^W1REP("E","BITS",0,"PAR1")
hixt xe`z;16H
^W1REP("E","BITS",0,"PAR1","SH")
1
^W1REP("E","BITS",0,"SHAA")
dryl;5
^W1REP("E","BITS",0,"SHAA","SH")
1
^W1REP("E","BITS",0,"SIBA")
daiq;4
^W1REP("E","BITS",0,"SIBA","FILE")
^P1SBIT
^W1REP("E","BITS",0,"SIBA","OUT")
SIBA1
^W1REP("E","BITS",0,"SIBA1")
daiq xe`z;10H
^W1REP("E","BITS",0,"SIBA1","SH")
1
^W1REP("E","BITS",0,"TRH")
jix`z;8D
^W1REP("E","BITS",0,"TRH","SH")
1
^W1REP("E","BITS",0,"x1")
lhea;4,0
^W1REP("E","BITS",0,"x2")
mekqa;8,2
^W1REP("E","BITS",0,"x3")
;,
^W1REP("E","BITS","COD")
SIBA1*MLZR*MLZR1*TRH*SHAA*HZM*PAR*PAR1*x1*x2
^W1REP("E","BITS","CT")
2*0*0*0*0*0
^W1REP("E","BITS","FLD")
SIBA1*MLZR*TRH*SHAA*HZM*PAR*x1*x2
^W1REP("E","BITS","FLD0")
*-**-****
^W1REP("E","BITS","GLOB1")
^VRM($J)
^W1REP("E","BITS","GLOB2")
^VRM($J,SIBA1,MLZR,DT,SHAA,HZM,PAR)
^W1REP("E","BITS","LPT")
B
^W1REP("E","BITS","MIUN")
1*2*3*2*4*2
^W1REP("E","BITS","MIUN","PROG")
TRH^P1DPBITS
^W1REP("E","BITS","QUERY","1.  hxetn mihixt itl zeaiq","CT")
2*0*0*0*0*0
^W1REP("E","BITS","QUERY","1.  hxetn mihixt itl zeaiq","FLD0")
*-**-****
^W1REP("E","BITS","QUERY","1.  hxetn mihixt itl zeaiq","MIUN")
1*2*3*2*4*2
^W1REP("E","BITS","QUERY","1.  hxetn mihixt itl zeaiq","SIK0")
1*0*0*0*0*1
^W1REP("E","BITS","QUERY","2.  fkexn mihixt itl zeaiq","CT")
0*0*0*0*0*0
^W1REP("E","BITS","QUERY","2.  fkexn mihixt itl zeaiq","FLD0")
*-*-*-*-***
^W1REP("E","BITS","QUERY","2.  fkexn mihixt itl zeaiq","MIUN")
1*2*3*2*4*2
^W1REP("E","BITS","QUERY","2.  fkexn mihixt itl zeaiq","SIK0")
1*0*0*0*0*1
^W1REP("E","BITS","QUERY","3.       mikix`z itl zeaiq","CT")
2*0*0*0*0*0
^W1REP("E","BITS","QUERY","3.       mikix`z itl zeaiq","FLD0")
*-**-****
^W1REP("E","BITS","QUERY","3.       mikix`z itl zeaiq","MIUN")
1*2*2*2*3*4
^W1REP("E","BITS","QUERY","3.       mikix`z itl zeaiq","SIK0")
1*0*0*0*0*1
^W1REP("E","BITS","QUERY","4.       zeaiq itl mikix`z","CT")
0*0*2*0*0*0
^W1REP("E","BITS","QUERY","4.       zeaiq itl mikix`z","FLD0")
*-**-****
^W1REP("E","BITS","QUERY","4.       zeaiq itl mikix`z","MIUN")
2*2*1*2*3*4
^W1REP("E","BITS","QUERY","4.       zeaiq itl mikix`z","SIK0")
1*0*1*0*0*1
^W1REP("E","BITS","QUERY","5.        mixvln itl zeaiq","CT")
2*0*0*0*0*0
^W1REP("E","BITS","QUERY","5.        mixvln itl zeaiq","FLD0")
***-****
^W1REP("E","BITS","QUERY","5.        mixvln itl zeaiq","MIUN")
1*2*3*2*4*5
^W1REP("E","BITS","QUERY","5.        mixvln itl zeaiq","SIK0")
1*1*0*0*0*0
^W1REP("E","BITS","QUERY","6.        zeaiq itl mixvln","CT")
2*1*0*0*0*0
^W1REP("E","BITS","QUERY","6.        zeaiq itl mixvln","FLD0")
***-****
^W1REP("E","BITS","QUERY","6.        zeaiq itl mixvln","MIUN")
2*1*3*2*4*5
^W1REP("E","BITS","QUERY","6.        zeaiq itl mixvln","SIK0")
1*1*1*0*0*0
^W1REP("E","BITS","SHP","KOD")
P1HZH
^W1REP("E","BITS","SHP","PROG")
S MAS(5)=$S($G(EXIT)=1:"gahndn e`viy mihixt",$G(EXIT)=2:"gahndn e`vi `ly mihixt",1:" mihixtd lk")_" itl g""ec"
^W1REP("E","BITS","SIK")
1*1*
^W1REP("E","BITS","SIK0")
1*0*0*0*0*1
^W1REP("E","BITS","US",4)
S TRH=$$^%L1DC(DT,1)
^W1REP("E","BITS","US",7)
D PAR^P1DPBITS
^W1REP("E","CHMA")
miwiy ihxt 
^W1REP("E","CHMA",0,"ASMA")
`zknq`;6
^W1REP("E","CHMA",0,"ASMA","SH")
1
^W1REP("E","CHMA",0,"BANK")
wpa;3
^W1REP("E","CHMA",0,"BANK","SH")
1
^W1REP("E","CHMA",0,"CHEK")
wiy 'qn;9
^W1REP("E","CHMA",0,"CHEK","SH")
1
^W1REP("E","CHMA",0,"DAT")
dlaw jix`z;8D
^W1REP("E","CHMA",0,"DAT","SH")
1
^W1REP("E","CHMA",0,"DATE")
dlaw jix`z;8D
^W1REP("E","CHMA",0,"HESH")
oeayg 'qn;10
^W1REP("E","CHMA",0,"HESH","SH")
1
^W1REP("E","CHMA",0,"LPR")
oerxtl;8D
^W1REP("E","CHMA",0,"LPR","SH")
1
^W1REP("E","CHMA",0,"SNIF")
sipq;4
^W1REP("E","CHMA",0,"SNIF","SH")
1
^W1REP("E","CHMA",0,"SUM")
mekq;7
^W1REP("E","CHMA",0,"TZ")
zedf 'qn;9
^W1REP("E","CHMA",0,"TZ","SH")
1
^W1REP("E","CHMA",0,"x1")
mekq;7,2
^W1REP("E","CHMA",0,"x2")
;,
^W1REP("E","CHMA","COD")
DAT*LPR*HESH*SNIF*BANK*CHEK*TZ*ASMA*x1
^W1REP("E","CHMA","CT")
0*0*0*0*0*0*0*0
^W1REP("E","CHMA","FLD")
DAT*LPR*HESH*SNIF*BANK*CHEK*TZ*ASMA*x1
^W1REP("E","CHMA","FLD0")
********
^W1REP("E","CHMA","GLOB1")
^CHECK
^W1REP("E","CHMA","GLOB2")
^CHECK(DAT,KUP,MSHM,NSID)
^W1REP("E","CHMA","LPT")
B
^W1REP("E","CHMA","MIUN")
1*2*3*4*5*6*7*8
^W1REP("E","CHMA","QUERY","dlaw jix`z itl","CT")
0*0*0*0*0*0*0*0
^W1REP("E","CHMA","QUERY","dlaw jix`z itl","FLD0")
********
^W1REP("E","CHMA","QUERY","dlaw jix`z itl","MIUN")
1*2*3*4*5*6*7*8
^W1REP("E","CHMA","QUERY","dlaw jix`z itl","SIK0")
1*0*0*0*0*0*0*0
^W1REP("E","CHMA","QUERY","oerxtl jix`z itl","CT")
0*0*0*0*0*0*0*0
^W1REP("E","CHMA","QUERY","oerxtl jix`z itl","FLD0")

^W1REP("E","CHMA","QUERY","oerxtl jix`z itl","MIUN")
2*1*3*4*5*6*7*8
^W1REP("E","CHMA","QUERY","oerxtl jix`z itl","SIK0")
0*1*0*0*0*0*0*0
^W1REP("E","CHMA","SIK")
1*
^W1REP("E","CHMA","SIK0")
1*0*0*0*0*0*0*0
^W1REP("E","CHMA","US",1)
D DAT^PLCHMA ; S OK=1 I DAT<MEDAT!(DAT>ADDAT) S OK=0
^W1REP("E","CHMA","US",2)
S OK=1
^W1REP("E","CHMA","US",3)
S OK=1
^W1REP("E","CHMA","US",4)
D SET^PLCHMA
^W1REP("E","DCIB")
qeaiq zegewl ly ninelyz g"ec
^W1REP("E","DCIB",0,"CARD")
'qn;0
^W1REP("E","DCIB",0,"CARD","SET")
1
^W1REP("E","DCIB",0,"CARD","SH")
1
^W1REP("E","DCIB",0,"CMP")
dxag 'qn;8
^W1REP("E","DCIB",0,"CMP","SET")
1
^W1REP("E","DCIB",0,"CMP","SH")
1
^W1REP("E","DCIB",0,"HZ")
dpnfd 'qn;9
^W1REP("E","DCIB",0,"HZ","SET")
1
^W1REP("E","DCIB",0,"HZ","SH")
1
^W1REP("E","DCIB",0,"HZLK")
gewl zpnfd;10
^W1REP("E","DCIB",0,"HZLK","SET")
1
^W1REP("E","DCIB",0,"HZLK","SH")
1
^W1REP("E","DCIB",0,"TRH")
melyz jix`z;8D
^W1REP("E","DCIB",0,"TRH","SET")
0
^W1REP("E","DCIB",0,"TRH","SH")
1
^W1REP("E","DCIB",0,"x1")
qihxk 'qn;22,0
^W1REP("E","DCIB",0,"x2")
melyz mekq;10,2
^W1REP("E","DCIB",0,"x3")
;,
^W1REP("E","DCIB","COD")
TRH*HZ*CMP*HZLK*x1*x2
^W1REP("E","DCIB","CT")
0*0*0*0
^W1REP("E","DCIB","FLD")
TRH*HZ*CMP*HZLK*x1*x2
^W1REP("E","DCIB","FLD0")

^W1REP("E","DCIB","GLOB1")
^VRM($J)
^W1REP("E","DCIB","GLOB2")
^VRM($J,DT,HZ,CMP,HZLK)
^W1REP("E","DCIB","LPT")
B
^W1REP("E","DCIB","MIUN")
2*3*1*4
^W1REP("E","DCIB","QUERY","fkexn mikix`z itl","CT")
0*0*0*0
^W1REP("E","DCIB","QUERY","fkexn mikix`z itl","FLD0")
*-*-*-*-*
^W1REP("E","DCIB","QUERY","fkexn mikix`z itl","MIUN")
1*2*3*4
^W1REP("E","DCIB","QUERY","fkexn mikix`z itl","SIK0")
0*0*0*0
^W1REP("E","DCIB","QUERY","fkexn zexag itl","CT")
0*0*0*0
^W1REP("E","DCIB","QUERY","fkexn zexag itl","FLD0")
*-**-*-*
^W1REP("E","DCIB","QUERY","fkexn zexag itl","MIUN")
2*3*1*4
^W1REP("E","DCIB","QUERY","fkexn zexag itl","SIK0")
0*0*1*0
^W1REP("E","DCIB","QUERY","hxetn mikix`z itl","CT")
0*0*0*0
^W1REP("E","DCIB","QUERY","hxetn mikix`z itl","FLD0")

^W1REP("E","DCIB","QUERY","hxetn mikix`z itl","MIUN")
1*2*3*4
^W1REP("E","DCIB","QUERY","hxetn mikix`z itl","SIK0")
1*0*0*0
^W1REP("E","DCIB","QUERY","hxetn zexag itl","CT")
0*0*0*0
^W1REP("E","DCIB","QUERY","hxetn zexag itl","FLD0")

^W1REP("E","DCIB","QUERY","hxetn zexag itl","MIUN")
2*3*1*4
^W1REP("E","DCIB","QUERY","hxetn zexag itl","SIK0")
1*0*1*0
^W1REP("E","DCIB","SIK")
0*1*
^W1REP("E","DCIB","SIK0")
1*0*1*0
^W1REP("E","DCIB","US",2)
S TRH=$$^%L1DC(DT,1)
^W1REP("E","DCIB","US",5)
D HZLK^P1DCIB
^W1REP("E","DCIB","US",6)
D HZLK^P1DCIB
^W1REP("E","DMVC")
rvana zeipw zxiav g"ec
^W1REP("E","DMVC",0,"JOMH")
dcil 'z;8
^W1REP("E","DMVC",0,"JOMH","SH")
1
^W1REP("E","DMVC",0,"KTV")
zaezk;20H
^W1REP("E","DMVC",0,"KTV","SH")
0
^W1REP("E","DMVC",0,"LKH")
gewl;10
^W1REP("E","DMVC",0,"LKH","FILE")
^LKH
^W1REP("E","DMVC",0,"LKH","OUT")
LKH1
^W1REP("E","DMVC",0,"LKH1")
gewl my;16H
^W1REP("E","DMVC",0,"LKH1","SH")
0
^W1REP("E","DMVC",0,"MVC")
rvan;4
^W1REP("E","DMVC",0,"MVC","SH")
1
^W1REP("E","DMVC",0,"PRT")
hixt;8
^W1REP("E","DMVC",0,"PRT","FILE")
^PAR
^W1REP("E","DMVC",0,"PRT","M2")
S PRT1=$$SHEM^P1P(PRT)
^W1REP("E","DMVC",0,"PRT","OUT")
PRT1
^W1REP("E","DMVC",0,"PRT1")
hixt my;16
^W1REP("E","DMVC",0,"PRT1","SH")
0
^W1REP("E","DMVC",0,"SHR")
dxey;4
^W1REP("E","DMVC",0,"SHR","SH")
1
^W1REP("E","DMVC",0,"SHURA")
dxey;3
^W1REP("E","DMVC",0,"SHURA","SH")
1
^W1REP("E","DMVC",0,"TRH")
jix`z;8D
^W1REP("E","DMVC",0,"TRH","SH")
1
^W1REP("E","DMVC",0,"x1")
zenk;4,0
^W1REP("E","DMVC",0,"x2")
mekq;8,2
^W1REP("E","DMVC",0,"x3")
;,
^W1REP("E","DMVC","COD")
MVC*LKH*LKH1*TRH*PRT*PRT1*SHR*x1*x2
^W1REP("E","DMVC","CT")
0*0*0*0*0
^W1REP("E","DMVC","FLD")
MVC*LKH*TRH*PRT*SHR*x1*x2
^W1REP("E","DMVC","FLD0")
*-*-****
^W1REP("E","DMVC","GLOB1")
^P1MVCL1
^W1REP("E","DMVC","GLOB2")
^P1MVCL1(MVC,LKH,SHR,DT,PRT)
^W1REP("E","DMVC","LPT")
B
^W1REP("E","DMVC","MIUN")
1*4*5*2*3
^W1REP("E","DMVC","QUERY","gewl itl oein","CT")
0*0*0*0*0
^W1REP("E","DMVC","QUERY","gewl itl oein","FLD0")
**-***
^W1REP("E","DMVC","QUERY","gewl itl oein","MIUN")
1*2*5*3*4
^W1REP("E","DMVC","QUERY","gewl itl oein","SIK0")
1*1*0*0*0
^W1REP("E","DMVC","QUERY","hixt itl oein","CT")
0*0*0*0*0
^W1REP("E","DMVC","QUERY","hixt itl oein","FLD0")
*-*-****
^W1REP("E","DMVC","QUERY","hixt itl oein","MIUN")
1*4*5*2*3
^W1REP("E","DMVC","QUERY","hixt itl oein","SIK0")
1*0*0*1*0
^W1REP("E","DMVC","SIK")
1*1*
^W1REP("E","DMVC","SIK0")
1*0*0*1*0
^W1REP("E","DMVC","US",-1)
I MVC'=1,MVC'=3 S OK=0
^W1REP("E","DMVC","US",1)
I MVC'=1,MVC'=3 S OK=0
^W1REP("E","DMVC","US",4)
S TRH=$$^%L1DC(DT,1)
^W1REP("E","DMVC","US",5)
D PRT^P1DMVC1
^W1REP("E","DOHT")
mitih g"ec
^W1REP("E","DOHT",0,"HZ")
dpnfd;7
^W1REP("E","DOHT",0,"HZ","SET")
1
^W1REP("E","DOHT",0,"HZ","SH")
1
^W1REP("E","DOHT",0,"HZM")
dpnfd;7
^W1REP("E","DOHT",0,"HZM","SET")
1
^W1REP("E","DOHT",0,"HZM","SH")
1
^W1REP("E","DOHT",0,"MLZ")
xvln;5
^W1REP("E","DOHT",0,"MLZ","SET")
1
^W1REP("E","DOHT",0,"MLZ","SH")
1
^W1REP("E","DOHT",0,"MLZ1")
xvln my;12H
^W1REP("E","DOHT",0,"MLZ1","SET")
0
^W1REP("E","DOHT",0,"MLZ1","SH")
1
^W1REP("E","DOHT",0,"TRH")
jix`z;8D
^W1REP("E","DOHT",0,"TRH","SET")
0
^W1REP("E","DOHT",0,"TRH","SH")
1
^W1REP("E","DOHT",0,"x1")
`"ka mitih;10,2
^W1REP("E","DOHT",0,"x2")
dtwda mitih;10,2
^W1REP("E","DOHT",0,"x3")
w'v mitih;10,2
^W1REP("E","DOHT",0,"x4")
onefna mitih;10,2
^W1REP("E","DOHT",0,"x5")
mitih k"dq;10,2
^W1REP("E","DOHT",0,"x6")
;,
^W1REP("E","DOHT","COD")
MLZ*MLZ1*TRH*HZ*x1*x2*x3*x4*x5
^W1REP("E","DOHT","CT")
2*2*0*0
^W1REP("E","DOHT","FLD")
MLZ*MLZ1*TRH*HZ*x1*x2*x3*x4*x5
^W1REP("E","DOHT","GLOB1")
^VRM($J)
^W1REP("E","DOHT","GLOB2")
^VRM($J,DT,MLZ,HZ)
^W1REP("E","DOHT","LPT")
B
^W1REP("E","DOHT","MIUN")
1*2*3*4
^W1REP("E","DOHT","SIK")
1*1*1*1*1*
^W1REP("E","DOHT","SIK0")
1*0*0*0
^W1REP("E","DOHT","US",0)
D HZM^P1DOHTIP
^W1REP("E","DOHT","US",2)
D DT^P1DOHTIP
^W1REP("E","DOHT","US",3)
D MLZ1^P1DOHTIP
^W1REP("E","DOHT","US",4)
D HZ^P1DOHTIP
^W1REP("E","DPAR")
mihixt zexikn g"ec
^W1REP("E","DPAR",0,"IR")
xir;12H
^W1REP("E","DPAR",0,"IR","SET")
1
^W1REP("E","DPAR",0,"IR","SH")
1
^W1REP("E","DPAR",0,"LKH")
gewl cew;11
^W1REP("E","DPAR",0,"LKH","FILE")
^[$$^W3MAIN]LKH
^W1REP("E","DPAR",0,"LKH","OUT")
LKH1
^W1REP("E","DPAR",0,"LKH","SET")
1
^W1REP("E","DPAR",0,"LKH1")
gewl my;20
^W1REP("E","DPAR",0,"LKH1","SET")
0
^W1REP("E","DPAR",0,"LKH1","SH")
1
^W1REP("E","DPAR",0,"PAR")
hixt cew;8
^W1REP("E","DPAR",0,"PAR","FILE")
^PAR
^W1REP("E","DPAR",0,"PAR","M2")
S PAR1=$$SHEM^W3P(PAR)
^W1REP("E","DPAR",0,"PAR","OUT")
PAR1
^W1REP("E","DPAR",0,"PAR","SET")
1
^W1REP("E","DPAR",0,"PAR1")
hixt my;20H
^W1REP("E","DPAR",0,"PAR1","SET")
0
^W1REP("E","DPAR",0,"PAR1","SH")
1
^W1REP("E","DPAR",0,"REST")
dcrqn cew;5
^W1REP("E","DPAR",0,"REST","FILE")
^[$$^W3MAIN]W3MSD
^W1REP("E","DPAR",0,"REST","OUT")
REST1
^W1REP("E","DPAR",0,"REST","SET")
1
^W1REP("E","DPAR",0,"REST1")
dcrqn my;12
^W1REP("E","DPAR",0,"REST1","SET")
0
^W1REP("E","DPAR",0,"REST1","SH")
1
^W1REP("E","DPAR",0,"SNIF")
sipq cew;3
^W1REP("E","DPAR",0,"SNIF","FILE")
^W3SNIF
^W1REP("E","DPAR",0,"SNIF","OUT")
SNIF1
^W1REP("E","DPAR",0,"SNIF","SET")
1
^W1REP("E","DPAR",0,"SNIF1")
sipq my;12
^W1REP("E","DPAR",0,"SNIF1","SET")
0
^W1REP("E","DPAR",0,"SNIF1","SH")
1
^W1REP("E","DPAR",0,"x1")
zenk;5,0
^W1REP("E","DPAR",0,"x2")
mekq;8,2
^W1REP("E","DPAR",0,"x3")
oexg` xign;7,2
^W1REP("E","DPAR",0,"x4")
;,
^W1REP("E","DPAR","COD")
REST*REST1*SNIF*SNIF1*IR*LKH*LKH1*PAR*PAR1*x1*x2*x3
^W1REP("E","DPAR","CT")
1*1*2*2*0*0
^W1REP("E","DPAR","FLD")
REST*SNIF*IR*LKH*PAR*x1*x2*x3
^W1REP("E","DPAR","FLD0")
*-*-*-****
^W1REP("E","DPAR","GLOB1")
^VRM(PRTN)
^W1REP("E","DPAR","GLOB2")
^VRM(PRTN,REST,SNIF,IR,LKH,PAR)
^W1REP("E","DPAR","LPT")
B
^W1REP("E","DPAR","MIUN")
1*2*3*4*5*6
^W1REP("E","DPAR","QUERY","cala mihixt itl","CT")
1*1*2*2*0*0
^W1REP("E","DPAR","QUERY","cala mihixt itl","FLD0")
-*-*-*-****
^W1REP("E","DPAR","QUERY","cala mihixt itl","MIUN")
1*2*3*4*5*6
^W1REP("E","DPAR","QUERY","cala mihixt itl","SIK0")
1*1*1*1*0*0
^W1REP("E","DPAR","QUERY","mitipqe zecrqn itl","CT")
1*1*2*2*0*0
^W1REP("E","DPAR","QUERY","mitipqe zecrqn itl","FLD0")
**-*-****
^W1REP("E","DPAR","QUERY","mitipqe zecrqn itl","MIUN")
1*2*3*4*3*6
^W1REP("E","DPAR","QUERY","mitipqe zecrqn itl","SIK0")
1*1*1*1*0*0
^W1REP("E","DPAR","QUERY","mixr itl","CT")
1*1*2*2*0*0
^W1REP("E","DPAR","QUERY","mixr itl","FLD0")
*-**-****
^W1REP("E","DPAR","QUERY","mixr itl","MIUN")
1*2*2*4*3*6
^W1REP("E","DPAR","QUERY","mixr itl","SIK0")
1*1*1*1*0*0
^W1REP("E","DPAR","QUERY","zecrqn itl","CT")
1*1*2*2*0*0
^W1REP("E","DPAR","QUERY","zecrqn itl","FLD0")
*-*-*-****
^W1REP("E","DPAR","QUERY","zecrqn itl","MIUN")
1*2*3*4*5*6
^W1REP("E","DPAR","QUERY","zecrqn itl","SIK0")
1*1*1*1*0*0
^W1REP("E","DPAR","QUERY","zegewl itl","CT")
1*1*2*2*0*0
^W1REP("E","DPAR","QUERY","zegewl itl","FLD0")
-*-*-*****
^W1REP("E","DPAR","QUERY","zegewl itl","MIUN")
1*2*3*1*2*6
^W1REP("E","DPAR","QUERY","zegewl itl","SIK0")
1*1*1*1*0*0
^W1REP("E","DPAR","QUERY","zegewle mixr ,mitipq,zecrqn itl","CT")
1*1*2*2*0*0
^W1REP("E","DPAR","QUERY","zegewle mixr ,mitipq,zecrqn itl","FLD0")

^W1REP("E","DPAR","QUERY","zegewle mixr ,mitipq,zecrqn itl","MIUN")
1*2*3*4*5*6
^W1REP("E","DPAR","QUERY","zegewle mixr ,mitipq,zecrqn itl","SIK0")
1*1*1*1*0*0
^W1REP("E","DPAR","SIK")
1*1**
^W1REP("E","DPAR","SIK0")
1*1*1*1*0*0
^W1REP("E","DPAR","US",6)
D PAR^P1DPAR
^W1REP("E","DPARC")
mihixt zxikn g"ec
^W1REP("E","DPARC",0,"LKH")
gewl 'qn;11
^W1REP("E","DPARC",0,"LKH","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("E","DPARC",0,"LKH","OUT")
LKH1
^W1REP("E","DPARC",0,"LKH","SET")
1
^W1REP("E","DPARC",0,"LKH1")
gewl my;20
^W1REP("E","DPARC",0,"LKH1","SET")
0
^W1REP("E","DPARC",0,"LKH1","SH")
1
^W1REP("E","DPARC",0,"PRT")
hixt 'qn;8
^W1REP("E","DPARC",0,"PRT","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("E","DPARC",0,"PRT","M2")
S PRT1=$$SHEM^W4P(PRT)
^W1REP("E","DPARC",0,"PRT","OUT")
PRT1
^W1REP("E","DPARC",0,"PRT","SET")
1
^W1REP("E","DPARC",0,"PRT1")
hixt my;20H
^W1REP("E","DPARC",0,"PRT1","SET")
0
^W1REP("E","DPARC",0,"PRT1","SH")
1
^W1REP("E","DPARC",0,"TRH")
jix`z;8D
^W1REP("E","DPARC",0,"TRH","SET")
0
^W1REP("E","DPARC",0,"TRH","SH")
1
^W1REP("E","DPARC",0,"x1")
zenk;5,0
^W1REP("E","DPARC",0,"x2")
n"rn iptl mekq;9,2
^W1REP("E","DPARC",0,"x3")
n"rn llek mekq;9,2
^W1REP("E","DPARC",0,"x4")
igkep xign;7,2
^W1REP("E","DPARC",0,"x5")
;,
^W1REP("E","DPARC","COD")
LKH*LKH1*PRT*PRT1*x1*x2*x3*x4
^W1REP("E","DPARC","CT")
0
^W1REP("E","DPARC","DPARC","LPT")
B
^W1REP("E","DPARC","FLD")
LKH*PRT*x1*x2*x3*x4
^W1REP("E","DPARC","FLD0")
-*****
^W1REP("E","DPARC","GLOB1")
^|$$^W3MAIN|VRM($$^%W1JB)
^W1REP("E","DPARC","GLOB2")
^|$$^W3MAIN|VRM($$^%W1JB,LKH,PRT)
^W1REP("E","DPARC","LPT")
B
^W1REP("E","DPARC","MIUN")

^W1REP("E","DPARC","QUERY","cala mihixt itl g""ec","CT")
0
^W1REP("E","DPARC","QUERY","cala mihixt itl g""ec","FLD0")
-*****
^W1REP("E","DPARC","QUERY","cala mihixt itl g""ec","MIUN")

^W1REP("E","DPARC","QUERY","cala mihixt itl g""ec","SIK0")
0
^W1REP("E","DPARC","QUERY","mihixte zegewl itl g""ec","CT")
2*0
^W1REP("E","DPARC","QUERY","mihixte zegewl itl g""ec","FLD0")
*****
^W1REP("E","DPARC","QUERY","mihixte zegewl itl g""ec","MIUN")
1*2
^W1REP("E","DPARC","QUERY","mihixte zegewl itl g""ec","SIK0")
1*0
^W1REP("E","DPARC","SIK")
1*1*1**
^W1REP("E","DPARC","SIK0")
0
^W1REP("E","DPARC","US",3)
D PRT^W3DPARC
^W1REP("E","DPARC","US",4)
D PRT^W3DPARC
^W1REP("E","DPMH")
mixign itl zexikn
^W1REP("E","DPMH",0,"DAT")
jix`z;8D
^W1REP("E","DPMH",0,"DAT","SH")
1
^W1REP("E","DPMH",0,"DATT")
jix`z;8D
^W1REP("E","DPMH",0,"DATT","SET")
0
^W1REP("E","DPMH",0,"DATT","SH")
1
^W1REP("E","DPMH",0,"MH")
xign;7
^W1REP("E","DPMH",0,"MH","SH")
1
^W1REP("E","DPMH",0,"MH1")
xign;8
^W1REP("E","DPMH",0,"MH1","SET")
0
^W1REP("E","DPMH",0,"MH1","SH")
1
^W1REP("E","DPMH",0,"MHL")
dwlgn;5
^W1REP("E","DPMH",0,"MHL","FILE")
^DEP
^W1REP("E","DPMH",0,"MHL","OUT")
MHL1
^W1REP("E","DPMH",0,"MHL","SET")
0
^W1REP("E","DPMH",0,"MHL1")
xe`z;12H
^W1REP("E","DPMH",0,"MHL1","SET")
0
^W1REP("E","DPMH",0,"MHL1","SH")
0
^W1REP("E","DPMH",0,"PARIT")
hixt cew;8
^W1REP("E","DPMH",0,"PARIT","FILE")
^PAR
^W1REP("E","DPMH",0,"PARIT","M2")
D PAR1^P1DPMH
^W1REP("E","DPMH",0,"PARIT","OUT")
PARIT1
^W1REP("E","DPMH",0,"PARIT","SET")
1
^W1REP("E","DPMH",0,"PARIT1")
hixt xe`z;18H
^W1REP("E","DPMH",0,"PARIT1","SET")
0
^W1REP("E","DPMH",0,"PARIT1","SH")
0
^W1REP("E","DPMH",0,"SUGP")
dveaw;5
^W1REP("E","DPMH",0,"SUGP","FILE")
^PARSUG
^W1REP("E","DPMH",0,"SUGP","OUT")
SUGP1
^W1REP("E","DPMH",0,"SUGP","SET")
0
^W1REP("E","DPMH",0,"SUGP1")
dveaw xe`z;12H
^W1REP("E","DPMH",0,"SUGP1","SET")
0
^W1REP("E","DPMH",0,"SUGP1","SH")
0
^W1REP("E","DPMH",0,"x1")
zenk;7,0
^W1REP("E","DPMH",0,"x2")
dgpd;6,1
^W1REP("E","DPMH",0,"x3")
mekq;9,1
^W1REP("E","DPMH",0,"x4")
n"rn iptl;9,1
^W1REP("E","DPMH",0,"x5")
;,
^W1REP("E","DPMH","COD")
MHL*MHL1*SUGP*SUGP1*PARIT*PARIT1*MH1*DATT*x1*x2*x3*x4
^W1REP("E","DPMH","CT")
1*2*0*0*2*0*0
^W1REP("E","DPMH","FLD")
MHL*SUGP*PARIT*MH1*DATT*x1*x2*x3*x4
^W1REP("E","DPMH","FLD0")
****-***
^W1REP("E","DPMH","GLOB1")
^TEMPMH($P)
^W1REP("E","DPMH","GLOB2")
^TEMPMH($P,DAT,MRK,PARIT,MH)
^W1REP("E","DPMH","LPT")
B
^W1REP("E","DPMH","MIUN")
1*2*3*4*3*4**0
^W1REP("E","DPMH","QUERY","iztewz","CT")
1*2*0*0*2*0*0
^W1REP("E","DPMH","QUERY","iztewz","FLD0")
****-***
^W1REP("E","DPMH","QUERY","iztewz","MIUN")
1*2*3*4*3*4**0
^W1REP("E","DPMH","QUERY","iztewz","SIK0")
1*1*0*0*1*0*0
^W1REP("E","DPMH","QUERY","mini itl hxetn","CT")
1*1*0*0*2*0*0
^W1REP("E","DPMH","QUERY","mini itl hxetn","FLD0")
*******
^W1REP("E","DPMH","QUERY","mini itl hxetn","MIUN")
1*2*4*5*3*4**0
^W1REP("E","DPMH","QUERY","mini itl hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("E","DPMH","QUERY","zeveaw `ll iztewz","CT")
1*2*0*0*2*0*0
^W1REP("E","DPMH","QUERY","zeveaw `ll iztewz","FLD0")
*-***-***
^W1REP("E","DPMH","QUERY","zeveaw `ll iztewz","MIUN")
1*2*2*3*3*4**0
^W1REP("E","DPMH","QUERY","zeveaw `ll iztewz","SIK0")
1*1*0*0*1*0*0
^W1REP("E","DPMH","QUERY","zewlgne zeveaw `ll iztewz","CT")
1*2*0*0*2*0*0
^W1REP("E","DPMH","QUERY","zewlgne zeveaw `ll iztewz","FLD0")
-*-***-***
^W1REP("E","DPMH","QUERY","zewlgne zeveaw `ll iztewz","MIUN")
1*2*1*2*3*4**0
^W1REP("E","DPMH","QUERY","zewlgne zeveaw `ll iztewz","SIK0")
1*1*0*0*1*0*0
^W1REP("E","DPMH","SHP","KOD")
DPMH
^W1REP("E","DPMH","SHP","PROG")
S MAS(5)=SSOAD
^W1REP("E","DPMH","SIK")
1*1*1*1**1*0*
^W1REP("E","DPMH","SIK0")
1*1*0*0*1*0*0
^W1REP("E","DPMH","US",2)
D DAT^P1DPMH
^W1REP("E","DPMH","US",4)
D PAR^P1DPMH
^W1REP("E","DPMH","US",5)
D MH^P1DPMH
^W1REP("E","DPMN")
mihixt zeny itl zexikn
^W1REP("E","DPMN",0,"DAT")
jix`z;8D
^W1REP("E","DPMN",0,"DAT","SH")
1
^W1REP("E","DPMN",0,"DATT")
jix`z;8D
^W1REP("E","DPMN",0,"DATT","SET")
0
^W1REP("E","DPMN",0,"DATT","SH")
1
^W1REP("E","DPMN",0,"MH")
xign;7
^W1REP("E","DPMN",0,"MH","SH")
1
^W1REP("E","DPMN",0,"MH1")
xign;8
^W1REP("E","DPMN",0,"MH1","SET")
0
^W1REP("E","DPMN",0,"MH1","SH")
1
^W1REP("E","DPMN",0,"MHL")
dwlgn;5
^W1REP("E","DPMN",0,"MHL","FILE")
^DEP
^W1REP("E","DPMN",0,"MHL","OUT")
MHL1
^W1REP("E","DPMN",0,"MHL","SET")
0
^W1REP("E","DPMN",0,"MHL1")
xe`z;12H
^W1REP("E","DPMN",0,"MHL1","SET")
0
^W1REP("E","DPMN",0,"MHL1","SH")
0
^W1REP("E","DPMN",0,"PARIT")
hixt cew;8
^W1REP("E","DPMN",0,"PARIT","FILE")
^PAR
^W1REP("E","DPMN",0,"PARIT","SET")
1
^W1REP("E","DPMN",0,"PARIT","SH")
1
^W1REP("E","DPMN",0,"PARIT1")
hixt xe`z;18H
^W1REP("E","DPMN",0,"PARIT1","SET")
1
^W1REP("E","DPMN",0,"PARIT1","SH")
1
^W1REP("E","DPMN",0,"SUGP")
dveaw;5
^W1REP("E","DPMN",0,"SUGP","FILE")
^PARSUG
^W1REP("E","DPMN",0,"SUGP","OUT")
SUGP1
^W1REP("E","DPMN",0,"SUGP","SET")
0
^W1REP("E","DPMN",0,"SUGP1")
dveaw xe`z;12H
^W1REP("E","DPMN",0,"SUGP1","SET")
0
^W1REP("E","DPMN",0,"SUGP1","SH")
0
^W1REP("E","DPMN",0,"x1")
zenk;7,0
^W1REP("E","DPMN",0,"x2")
dgpd;6,1
^W1REP("E","DPMN",0,"x3")
mekq;9,1
^W1REP("E","DPMN",0,"x4")
n"rn iptl;9,1
^W1REP("E","DPMN",0,"x5")
;,
^W1REP("E","DPMN","COD")
MHL*MHL1*SUGP*SUGP1*PARIT1*PARIT*MH1*DATT*x1*x2*x3*x4
^W1REP("E","DPMN","CT")
1*2*0*0*0*0*0
^W1REP("E","DPMN","FLD")
MHL*SUGP*PARIT1*PARIT*MH1*DATT*x1*x2*x3*x4
^W1REP("E","DPMN","FLD0")
*****-****
^W1REP("E","DPMN","GLOB1")
^TEMPMH($P)
^W1REP("E","DPMN","GLOB2")
^TEMPMH($P,DAT,MRK,PARIT1,PARIT,MH)
^W1REP("E","DPMN","LPT")
B
^W1REP("E","DPMN","MIUN")
1*2*3*4*5*4**0
^W1REP("E","DPMN","QUERY","iztewz","CT")
1*2*0*0*0*0*0
^W1REP("E","DPMN","QUERY","iztewz","FLD0")
*****-****
^W1REP("E","DPMN","QUERY","iztewz","MIUN")
1*2*3*4*5*4**0
^W1REP("E","DPMN","QUERY","iztewz","SIK0")
1*1*1*0*0*0*0
^W1REP("E","DPMN","QUERY","mini itl hxetn","CT")
1*2*0*0*0*0*0
^W1REP("E","DPMN","QUERY","mini itl hxetn","FLD0")
*******
^W1REP("E","DPMN","QUERY","mini itl hxetn","MIUN")
1*3*4*5*6*2**0
^W1REP("E","DPMN","QUERY","mini itl hxetn","SIK0")
1*1*1*0*0*0*0
^W1REP("E","DPMN","QUERY","zeveaw `ll iztewz","CT")
1*2*2*0*0*0*0
^W1REP("E","DPMN","QUERY","zeveaw `ll iztewz","FLD0")
*-****-****
^W1REP("E","DPMN","QUERY","zeveaw `ll iztewz","MIUN")
1*2*2*3*4*4**0
^W1REP("E","DPMN","QUERY","zeveaw `ll iztewz","SIK0")
1*1*1*0*0*0*0
^W1REP("E","DPMN","QUERY","zewlgne zeveaw `ll iztewz","CT")
1*2*0*0*0*0*0
^W1REP("E","DPMN","QUERY","zewlgne zeveaw `ll iztewz","FLD0")
-*-****-****
^W1REP("E","DPMN","QUERY","zewlgne zeveaw `ll iztewz","MIUN")
1*2*1*2*3*4**0
^W1REP("E","DPMN","QUERY","zewlgne zeveaw `ll iztewz","SIK0")
1*1*1*0*0*0*0
^W1REP("E","DPMN","SHP","KOD")
DPMH
^W1REP("E","DPMN","SHP","PROG")
S MAS(5)=SSOAD
^W1REP("E","DPMN","SIK")
1*1*1*1**1*0*
^W1REP("E","DPMN","SIK0")
1*1*1*0*0*0*0
^W1REP("E","DPMN","US",2)
D DAT^P1DPMH
^W1REP("E","DPMN","US",6)
D MH^P1DPMN
^W1REP("E","DPNO")
exknp `ly mihixt g"ec
^W1REP("E","DPNO",0,"PAR")
hixt 'qn;8
^W1REP("E","DPNO",0,"PAR","FILE")
^PAR
^W1REP("E","DPNO",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","DPNO",0,"PAR","OUT")
PAR1
^W1REP("E","DPNO",0,"PAR1")
hixt my;24H
^W1REP("E","DPNO",0,"PAR1","SH")
1
^W1REP("E","DPNO",0,"TRH")
jix`z;8D
^W1REP("E","DPNO",0,"TRH","SH")
1
^W1REP("E","DPNO",0,"x1")
xign;8,2
^W1REP("E","DPNO",0,"x2")
;,
^W1REP("E","DPNO","COD")
TRH*PAR*PAR1*x1
^W1REP("E","DPNO","CT")
0*0
^W1REP("E","DPNO","FLD")
TRH*PAR*x1
^W1REP("E","DPNO","FLD0")
-**
^W1REP("E","DPNO","GLOB1")
^PAR
^W1REP("E","DPNO","GLOB2")
^PAR(PAR)
^W1REP("E","DPNO","LPT")
B
^W1REP("E","DPNO","MIUN")
1*1
^W1REP("E","DPNO","SIK")
*
^W1REP("E","DPNO","SIK0")
0*0
^W1REP("E","DPNO","US",-1)
D PAR^P1DPNO
^W1REP("E","DPNO","US",1)
D PAR^P1DPNO
^W1REP("E","DPSP")
zeveaw itl mihixt g"ec
^W1REP("E","DPSP",0,"PAR")
hixt cew;8
^W1REP("E","DPSP",0,"PAR","M2")
S PRT1=$$SHEM^P1P(PAR)
^W1REP("E","DPSP",0,"PAR","OUT")
PRT1
^W1REP("E","DPSP",0,"PRT")
hixt 'qn;8
^W1REP("E","DPSP",0,"PRT","FILE")
^PAR
^W1REP("E","DPSP",0,"PRT","M2")
D PRT1^P1DPSP
^W1REP("E","DPSP",0,"PRT","OUT")
PRT1
^W1REP("E","DPSP",0,"PRT1")
hixt xe`z;20H
^W1REP("E","DPSP",0,"PRT1","SH")
0
^W1REP("E","DPSP",0,"SUGP")
mihixt zveaw;5
^W1REP("E","DPSP",0,"SUGP","FILE")
^PARSUG
^W1REP("E","DPSP",0,"SUGP","OUT")
SUGP1
^W1REP("E","DPSP",0,"SUGP1")
dveaw xe`z;8
^W1REP("E","DPSP",0,"SUGP1","SH")
0
^W1REP("E","DPSP",0,"TRH")
jix`z;8D
^W1REP("E","DPSP",0,"TRH","SH")
1
^W1REP("E","DPSP",0,"x1")
zenk;5,0
^W1REP("E","DPSP",0,"x2")
mekq;8,2
^W1REP("E","DPSP",0,"x3")
dgpd;7,2
^W1REP("E","DPSP",0,"x4")
ehp k"dq;8,2
^W1REP("E","DPSP",0,"x5")
oexg` xign;7,2
^W1REP("E","DPSP",0,"x6")
dveawn %;5,2
^W1REP("E","DPSP",0,"x7")
ehp k"dqn%;8,2
^W1REP("E","DPSP",0,"x8")
;,
^W1REP("E","DPSP","COD")
SUGP*SUGP1*PRT*PRT1*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","DPSP","CT")
2*0*0
^W1REP("E","DPSP","FLD")
SUGP*PRT*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","DPSP","FLD0")
*******-*-
^W1REP("E","DPSP","GLOB1")
^VRM($J)
^W1REP("E","DPSP","GLOB2")
^VRM($J,SUGP,PRT)
^W1REP("E","DPSP","LPT")
B
^W1REP("E","DPSP","MIUN")
1*2*3
^W1REP("E","DPSP","SHP","KOD")
DPSP
^W1REP("E","DPSP","SIK")
1*1*1*1****
^W1REP("E","DPSP","SIK0")
1*0*0
^W1REP("E","DPSP","US",3)
D PRT^P1DPSP
^W1REP("E","HBMK")
dlaw 'qn zeipeayg g"ec
^W1REP("E","HBMK",0,"HB")
dlaw qn 'ayg;9
^W1REP("E","HBMK",0,"HB","SH")
1
^W1REP("E","HBMK",0,"HZM")
dpnfd;8
^W1REP("E","HBMK",0,"HZM","SH")
1
^W1REP("E","HBMK",0,"MLZ")
xvln 'qn;5
^W1REP("E","HBMK",0,"MLZ","FILE")
^NAME
^W1REP("E","HBMK",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^W1REP("E","HBMK",0,"MLZ","OUT")
MLZ1
^W1REP("E","HBMK",0,"MLZ1")
xvln my;12H
^W1REP("E","HBMK",0,"MLZ1","SH")
1
^W1REP("E","HBMK",0,"NMB")
ogley;8
^W1REP("E","HBMK",0,"NMB","SH")
1
^W1REP("E","HBMK",0,"SHAA")
dry;5
^W1REP("E","HBMK",0,"SHAA","SH")
1
^W1REP("E","HBMK",0,"SHULH")
ogley;5
^W1REP("E","HBMK",0,"SHULH","SH")
1
^W1REP("E","HBMK",0,"SUGS")
ogley beq;5
^W1REP("E","HBMK",0,"SUGS","FILE")
^SUGS
^W1REP("E","HBMK",0,"SUGS","OUT")
SUGS1
^W1REP("E","HBMK",0,"SUGS1")
beq xe`z;6H
^W1REP("E","HBMK",0,"SUGS1","SH")
1
^W1REP("E","HBMK",0,"TRH")
jix`z;8D
^W1REP("E","HBMK",0,"TRH","SH")
1
^W1REP("E","HBMK",0,"TRHT")
jix`z;8D
^W1REP("E","HBMK",0,"TRHT","SH")
1
^W1REP("E","HBMK",0,"x1")
melyzl;8,2
^W1REP("E","HBMK",0,"x2")
onefn;8,2
^W1REP("E","HBMK",0,"x3")
wiy;8,2
^W1REP("E","HBMK",0,"x4")
`"k;8,2
^W1REP("E","HBMK",0,"x5")
dtwd;8,2
^W1REP("E","HBMK",0,"x6")
yelz;8,2
^W1REP("E","HBMK",0,"x7")
tih;7,2
^W1REP("E","HBMK",0,"x8")
;,
^W1REP("E","HBMK","COD")
TRHT*HB*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","HBMK","CT")
2*0*0*0*0*0
^W1REP("E","HBMK","FLD")
TRHT*HB*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","HBMK","FLD0")
********-*
^W1REP("E","HBMK","GLOB1")
^P1HBI
^W1REP("E","HBMK","GLOB2")
^P1HBI(DATH,HB)
^W1REP("E","HBMK","LPT")
B
^W1REP("E","HBMK","MIUN")
1*2*3*4*2*3
^W1REP("E","HBMK","QUERY","hxetn zepgleye zepgley ibeq itl","CT")
1*1*2*0*0*0
^W1REP("E","HBMK","QUERY","hxetn zepgleye zepgley ibeq itl","FLD0")
-***-********-*
^W1REP("E","HBMK","QUERY","hxetn zepgleye zepgley ibeq itl","MIUN")
1*1*2*4*3*4
^W1REP("E","HBMK","QUERY","hxetn zepgleye zepgley ibeq itl","SIK0")
1*1*1*0*0*0
^W1REP("E","HBMK","SIK")
1*1*1*1*1*1*1*
^W1REP("E","HBMK","SIK0")
1*0*0*0*0*0
^W1REP("E","HBMK","US",-1)
D DATH^P1HBMK
^W1REP("E","HBMK","US",1)
D DATH^P1HBMK
^W1REP("E","HBMK","US",2)
D HB^P1HBMK
^W1REP("E","HNHS")
zeaiq itl zegpd g"ec
^W1REP("E","HNHS",0,"HZM")
dpnfd;7
^W1REP("E","HNHS",0,"HZM","SET")
1
^W1REP("E","HNHS",0,"HZM","SH")
1
^W1REP("E","HNHS",0,"MLZR")
xvln;5
^W1REP("E","HNHS",0,"MLZR","FILE")
^NAME
^W1REP("E","HNHS",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("E","HNHS",0,"MLZR","OUT")
MLZR1
^W1REP("E","HNHS",0,"MLZR","SET")
1
^W1REP("E","HNHS",0,"MLZR1")
xvln my;10H
^W1REP("E","HNHS",0,"MLZR1","SET")
0
^W1REP("E","HNHS",0,"MLZR1","SH")
1
^W1REP("E","HNHS",0,"PAR")
hixt 'qn;8
^W1REP("E","HNHS",0,"PAR","FILE")
^PAR
^W1REP("E","HNHS",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","HNHS",0,"PAR","OUT")
PAR1
^W1REP("E","HNHS",0,"PAR","SET")
1
^W1REP("E","HNHS",0,"PAR1")
hixt xe`z;16H
^W1REP("E","HNHS",0,"PAR1","SET")
0
^W1REP("E","HNHS",0,"PAR1","SH")
1
^W1REP("E","HNHS",0,"SHAA")
dryl;5
^W1REP("E","HNHS",0,"SHAA","SET")
1
^W1REP("E","HNHS",0,"SHAA","SH")
1
^W1REP("E","HNHS",0,"SIBA")
daiq xe`z;12H
^W1REP("E","HNHS",0,"SIBA","SET")
1
^W1REP("E","HNHS",0,"SIBA","SH")
1
^W1REP("E","HNHS",0,"SIBA1")
daiq xe`z;10H
^W1REP("E","HNHS",0,"SIBA1","SET")
0
^W1REP("E","HNHS",0,"SIBA1","SH")
1
^W1REP("E","HNHS",0,"TRH")
jix`z;8D
^W1REP("E","HNHS",0,"TRH","SET")
0
^W1REP("E","HNHS",0,"TRH","SH")
1
^W1REP("E","HNHS",0,"x1")
dgpd iptl;9,2
^W1REP("E","HNHS",0,"x2")
dgpd;9,2
^W1REP("E","HNHS",0,"x3")
dgpd ixg`;9,2
^W1REP("E","HNHS",0,"x4")
%-a;6,2
^W1REP("E","HNHS",0,"x5")
;,
^W1REP("E","HNHS","COD")
SIBA*MLZR*MLZR1*TRH*SHAA*HZM*x1*x2*x3
^W1REP("E","HNHS","CT")
0*0*0*0*0*0
^W1REP("E","HNHS","FLD")
SIBA*MLZR*TRH*SHAA*HZM*x1*x2*x3
^W1REP("E","HNHS","FLD0")
*-**-****
^W1REP("E","HNHS","GLOB1")
^VRM($J)
^W1REP("E","HNHS","GLOB2")
^VRM($J,SIBA,MLZR,DT,SHAA,HZM)
^W1REP("E","HNHS","LPT")
B
^W1REP("E","HNHS","MIUN")
2*2*1*2*3*4
^W1REP("E","HNHS","MIUN","PROG")
TRH^P1DPHNHS
^W1REP("E","HNHS","QUERY","1.       mikix`z itl zeaiq","CT")
0*0*0*0*0*0
^W1REP("E","HNHS","QUERY","1.       mikix`z itl zeaiq","FLD0")
*-**-****
^W1REP("E","HNHS","QUERY","1.       mikix`z itl zeaiq","MIUN")
1*2*2*2*3*4
^W1REP("E","HNHS","QUERY","1.       mikix`z itl zeaiq","SIK0")
1*0*0*0*0*1
^W1REP("E","HNHS","QUERY","2.       zeaiq itl mikix`z","CT")
0*0*0*0*0*0
^W1REP("E","HNHS","QUERY","2.       zeaiq itl mikix`z","FLD0")
*-**-****
^W1REP("E","HNHS","QUERY","2.       zeaiq itl mikix`z","MIUN")
2*2*1*2*3*4
^W1REP("E","HNHS","QUERY","2.       zeaiq itl mikix`z","SIK0")
1*0*1*0*0*1
^W1REP("E","HNHS","QUERY","3.        mixvln itl zeaiq","CT")
2*0*0*0*0*0
^W1REP("E","HNHS","QUERY","3.        mixvln itl zeaiq","FLD0")
***-****
^W1REP("E","HNHS","QUERY","3.        mixvln itl zeaiq","MIUN")
1*2*3*2*4*5
^W1REP("E","HNHS","QUERY","3.        mixvln itl zeaiq","SIK0")
1*1*0*0*0*0
^W1REP("E","HNHS","QUERY","4.        zeaiq itl mixvln","CT")
0*2*0*0*0*0
^W1REP("E","HNHS","QUERY","4.        zeaiq itl mixvln","FLD0")
***-****
^W1REP("E","HNHS","QUERY","4.        zeaiq itl mixvln","MIUN")
2*1*3*2*4*5
^W1REP("E","HNHS","QUERY","4.        zeaiq itl mixvln","SIK0")
1*1*1*0*0*0
^W1REP("E","HNHS","SIK")
1*1*1**
^W1REP("E","HNHS","SIK0")
1*0*1*0*0*1
^W1REP("E","HNHS","US",4)
S TRH=$$^%L1DC(DT,1)
^W1REP("E","HNHS","US",6)
D HZM^P1DPHNHS
^W1REP("E","HZCA")
`"k itl zepnfd g"ec
^W1REP("E","HZCA",0,"HB")
zipeayg;8
^W1REP("E","HZCA",0,"HZM")
dpnfd;7
^W1REP("E","HZCA",0,"HZM","SH")
1
^W1REP("E","HZCA",0,"LKH")
gewl 'qn;10
^W1REP("E","HZCA",0,"LKH","FILE")
^LKH
^W1REP("E","HZCA",0,"LKH","OUT")
LKH1
^W1REP("E","HZCA",0,"LKH1")
gewl my;20H
^W1REP("E","HZCA",0,"MKBL")
xvln;5
^W1REP("E","HZCA",0,"MKBL","FILE")
^NAME
^W1REP("E","HZCA",0,"MKBL","M2")
S MKBL1=$$^P1NAME(MKBL)
^W1REP("E","HZCA",0,"MKBL","OUT")
MKBL1
^W1REP("E","HZCA",0,"MKBL1")
xvln my;12H
^W1REP("E","HZCA",0,"MKBL1","SH")
0
^W1REP("E","HZCA",0,"MLZR")
xvln 'qn;5
^W1REP("E","HZCA",0,"MLZR",2)
I MLZR S MLZR1=$G(^NAME(MLZR,1))
^W1REP("E","HZCA",0,"MLZR","OUT")
MLZR1
^W1REP("E","HZCA",0,"MLZR1")
xvln my;12H
^W1REP("E","HZCA",0,"MLZR1","SH")
1
^W1REP("E","HZCA",0,"NAME")
gewl my;12H
^W1REP("E","HZCA",0,"NAME","SH")
1
^W1REP("E","HZCA",0,"NCAB")
zipeayg;6
^W1REP("E","HZCA",0,"NCAB","SH")
0
^W1REP("E","HZCA",0,"NMB")
ogley;5
^W1REP("E","HZCA",0,"NMB","SH")
1
^W1REP("E","HZCA",0,"PSL")
gily cew;3
^W1REP("E","HZCA",0,"PSL","FILE")
^P1SL
^W1REP("E","HZCA",0,"PSL","OUT")
PSL1
^W1REP("E","HZCA",0,"PSL1")
gily my;10H
^W1REP("E","HZCA",0,"PSL1","SH")
1
^W1REP("E","HZCA",0,"SHAA")
dry;5
^W1REP("E","HZCA",0,"SHAA","SH")
1
^W1REP("E","HZCA",0,"SL")
gily cew;5
^W1REP("E","HZCA",0,"SL","FILE")
^P1SL
^W1REP("E","HZCA",0,"SL","OUT")
SL1
^W1REP("E","HZCA",0,"SL1")
gily my;12H
^W1REP("E","HZCA",0,"SOAD")
micreq;6
^W1REP("E","HZCA",0,"SOAD","SH")
1
^W1REP("E","HZCA",0,"SUGS")
ogley beq;8
^W1REP("E","HZCA",0,"SUGS","FILE")
^SUGS
^W1REP("E","HZCA",0,"SUGS","OUT")
SUGS1
^W1REP("E","HZCA",0,"SUGS1")
xe`z;12H
^W1REP("E","HZCA",0,"SUGS1","SH")
1
^W1REP("E","HZCA",0,"SUGT")
melyz beq;9
^W1REP("E","HZCA",0,"SUGT","SH")
1
^W1REP("E","HZCA",0,"TRH")
jix`z;8D
^W1REP("E","HZCA",0,"TRH","SH")
1
^W1REP("E","HZCA",0,"TS")
melyzl;8
^W1REP("E","HZCA",0,"TSHL")
melyzl;8
^W1REP("E","HZCA",0,"TSHL","OUT")
TSHL
^W1REP("E","HZCA",0,"x1")
milehia;9,2
^W1REP("E","HZCA",0,"x2")
zegpd;9,2
^W1REP("E","HZCA",0,"x3")
melyzl;9,2
^W1REP("E","HZCA",0,"x4")
micreq;6,0
^W1REP("E","HZCA",0,"x5")
;,
^W1REP("E","HZCA","COD")
TRH*HZM*SHAA*CA*x1
^W1REP("E","HZCA","CT")
0*0*0*0*0*0*0*0
^W1REP("E","HZCA","FLD")
MKBL*SUGS*NMB*TRH*SHAA*HZM*SUGT*x1*x2*x3*x4
^W1REP("E","HZCA","FLD0")
-*-*-*****-*-**-
^W1REP("E","HZCA","GLOB1")
^P1H
^W1REP("E","HZCA","GLOB2")
^P1H(DATH,HZM)
^W1REP("E","HZCA","LPT")
B
^W1REP("E","HZCA","MIUN")
2*3*4*2*4*3*1*7
^W1REP("E","HZCA","QUERY","dpnfd 'qn itl","CT")
0*0*0*0*0*0*0*0
^W1REP("E","HZCA","QUERY","dpnfd 'qn itl","FLD0")
*-*****-*-*-**
^W1REP("E","HZCA","QUERY","dpnfd 'qn itl","MIUN")
2*3*4*3*5*1*6*7
^W1REP("E","HZCA","QUERY","dpnfd 'qn itl","SIK0")
0*0*0*0*0*0*0*0
^W1REP("E","HZCA","QUERY","ogley beq itl","CT")
2*1*0*0*0*0*0
^W1REP("E","HZCA","QUERY","ogley beq itl","FLD0")
-******-****
^W1REP("E","HZCA","QUERY","ogley beq itl","MIUN")
3*1*2*3*4*5*6
^W1REP("E","HZCA","QUERY","ogley beq itl","SIK0")
0*1*1*0*0*0*0
^W1REP("E","HZCA","QUERY","xvln 'qn itl","CT")
1*0*0*0*0*0*0
^W1REP("E","HZCA","QUERY","xvln 'qn itl","FLD0")
*-*****-****
^W1REP("E","HZCA","QUERY","xvln 'qn itl","MIUN")
1*3*2*3*5*4*6
^W1REP("E","HZCA","QUERY","xvln 'qn itl","SIK0")
1*0*0*0*0*0*0
^W1REP("E","HZCA","SHP","KOD")
P1HZH
^W1REP("E","HZCA","SIK")
1*1*1*1*
^W1REP("E","HZCA","SIK0")
0*0*0*1*0*0*1*0
^W1REP("E","HZCA","US",-1)
D TRH^P1HZHC
^W1REP("E","HZCA","US",0)
D HZM^P1HZHC
^W1REP("E","HZCA","US",1)
D TRH^P1HZHC
^W1REP("E","HZCA","US",2)
D HZM^P1HZHC
^W1REP("E","HZH")
zepnfd g"ec
^W1REP("E","HZH",0,"HB")
zipeayg;8
^W1REP("E","HZH",0,"HZM")
dpnfd;7
^W1REP("E","HZH",0,"HZM","SH")
1
^W1REP("E","HZH",0,"LKH")
gewl 'qn;10
^W1REP("E","HZH",0,"LKH","FILE")
^LKH
^W1REP("E","HZH",0,"LKH","OUT")
LKH1
^W1REP("E","HZH",0,"LKH1")
gewl my;20H
^W1REP("E","HZH",0,"MKBL")
lawn 'qn;8
^W1REP("E","HZH",0,"MKBL","FILE")
^NAME
^W1REP("E","HZH",0,"MKBL","M2")
S MKBL1="" I $G(MKBL) S MKBL1=$G(^NAME(MKBL,1))
^W1REP("E","HZH",0,"MKBL","OUT")
MKBL1
^W1REP("E","HZH",0,"MKBL1")
lawnd my;12H
^W1REP("E","HZH",0,"MKBL1","SH")
1
^W1REP("E","HZH",0,"NAME")
gewl my;12H
^W1REP("E","HZH",0,"NAME","SH")
1
^W1REP("E","HZH",0,"NCAB")
zipeayg;6
^W1REP("E","HZH",0,"NCAB","SH")
0
^W1REP("E","HZH",0,"NMB")
gewl xtqn;10
^W1REP("E","HZH",0,"NMB","FILE")
^LKH
^W1REP("E","HZH",0,"NMB","OUT")
NAME
^W1REP("E","HZH",0,"PSL")
gily cew;3
^W1REP("E","HZH",0,"PSL","FILE")
^P1SL
^W1REP("E","HZH",0,"PSL","OUT")
PSL1
^W1REP("E","HZH",0,"PSL1")
gily my;10H
^W1REP("E","HZH",0,"PSL1","SH")
1
^W1REP("E","HZH",0,"SHAA")
dryl;5
^W1REP("E","HZH",0,"SHAA","SH")
1
^W1REP("E","HZH",0,"SL")
gily cew;5
^W1REP("E","HZH",0,"SL","FILE")
^P1SL
^W1REP("E","HZH",0,"SL","OUT")
SL1
^W1REP("E","HZH",0,"SL1")
gily my;12H
^W1REP("E","HZH",0,"SUGT")
melyz beq;8
^W1REP("E","HZH",0,"SUGT","SH")
1
^W1REP("E","HZH",0,"SUGT1")
xe`z;8H
^W1REP("E","HZH",0,"SUGT1","SH")
0
^W1REP("E","HZH",0,"TRH")
jix`z;8D
^W1REP("E","HZH",0,"TRH","SH")
1
^W1REP("E","HZH",0,"TS")
melyzl;8
^W1REP("E","HZH",0,"TSHL")
melyzl;8
^W1REP("E","HZH",0,"TSHL","OUT")
TSHL
^W1REP("E","HZH",0,"x1")
zexy inc;7,2
^W1REP("E","HZH",0,"x2")
melyzl;8,2
^W1REP("E","HZH",0,"x3")
;,
^W1REP("E","HZH","COD")
PSL*PSL1*MKBL*MKBL1*NMB*NAME*TRH*SHAA*HZM*SUGT*x1*x2
^W1REP("E","HZH","CT")
2*0*0*0*0*0*0
^W1REP("E","HZH","FLD")
PSL*MKBL*NMB*TRH*SHAA*HZM*SUGT*x1*x2
^W1REP("E","HZH","FLD0")
*-*******
^W1REP("E","HZH","GLOB1")
^P1H
^W1REP("E","HZH","GLOB2")
^P1H(DATH,HZM)
^W1REP("E","HZH","LPT")
B
^W1REP("E","HZH","MIUN")
1*5*4*2*3*5*6
^W1REP("E","HZH","QUERY","dpnfd ilawn itl oein","CT")
2*2*0*0*0*0*0
^W1REP("E","HZH","QUERY","dpnfd ilawn itl oein","FLD0")
-********
^W1REP("E","HZH","QUERY","dpnfd ilawn itl oein","MIUN")
1*1*2*3*4*5*6
^W1REP("E","HZH","QUERY","dpnfd ilawn itl oein","SIK0")
1*1*0*0*0*0*0
^W1REP("E","HZH","QUERY","migily itl oein","CT")
2*0*0*0*0*0*0
^W1REP("E","HZH","QUERY","migily itl oein","FLD0")
*-*******
^W1REP("E","HZH","QUERY","migily itl oein","MIUN")
1*5*4*2*3*5*6
^W1REP("E","HZH","QUERY","migily itl oein","SIK0")
1*0*0*1*0*0*0
^W1REP("E","HZH","QUERY","mikix`z itl oein","CT")
2*0*0*2*0*0*0
^W1REP("E","HZH","QUERY","mikix`z itl oein","FLD0")
-*-*******
^W1REP("E","HZH","QUERY","mikix`z itl oein","MIUN")
2*4*2*1*3*4*5
^W1REP("E","HZH","QUERY","mikix`z itl oein","SIK0")
0*0*0*1*0*0*0
^W1REP("E","HZH","QUERY","zegewl itl oein","CT")
2*0*2*0*0*0*0
^W1REP("E","HZH","QUERY","zegewl itl oein","FLD0")
-*-*******
^W1REP("E","HZH","QUERY","zegewl itl oein","MIUN")
1*5*1*2*3*4*5
^W1REP("E","HZH","QUERY","zegewl itl oein","SIK0")
1*0*1*0*0*0*0
^W1REP("E","HZH","QUERY","zerye mikix`z itl oein","CT")
2*0*0*2*0*0*0
^W1REP("E","HZH","QUERY","zerye mikix`z itl oein","FLD0")
-*-*******
^W1REP("E","HZH","QUERY","zerye mikix`z itl oein","MIUN")
2*4*3*1*2*4*5
^W1REP("E","HZH","QUERY","zerye mikix`z itl oein","SIK0")
0*0*0*1*0*0*0
^W1REP("E","HZH","SIK")
1*1*
^W1REP("E","HZH","SIK0")
1*0*0*1*0*0*0
^W1REP("E","HZH","US",0)
D HZM^P1HZHC
^W1REP("E","HZH","US",1)
D TRH^P1HZHC
^W1REP("E","HZH","US",2)
D HZM^P1HZHC
^W1REP("E","HZHL")
zepnfd itl dtwd zegewl g"ec
^W1REP("E","HZHL",0,"HB")
dtwd oeayg;8
^W1REP("E","HZHL",0,"HB","SET")
1
^W1REP("E","HZHL",0,"HB","SH")
1
^W1REP("E","HZHL",0,"HZM")
dpnfd;7
^W1REP("E","HZHL",0,"HZM","SET")
0
^W1REP("E","HZHL",0,"HZM","SH")
1
^W1REP("E","HZHL",0,"LKH")
gewl 'qn;11
^W1REP("E","HZHL",0,"LKH","FILE")
^LKH
^W1REP("E","HZHL",0,"LKH","OUT")
LKH1
^W1REP("E","HZHL",0,"LKH","SET")
0
^W1REP("E","HZHL",0,"LKH1")
ge'l my;12
^W1REP("E","HZHL",0,"LKH1","SET")
0
^W1REP("E","HZHL",0,"LKH1","SH")
1
^W1REP("E","HZHL",0,"LKHR")
iy`x gewl;10
^W1REP("E","HZHL",0,"LKHR","FILE")
^LKH
^W1REP("E","HZHL",0,"LKHR","OUT")
LKHR1
^W1REP("E","HZHL",0,"LKHR","SET")
0
^W1REP("E","HZHL",0,"LKHR1")
gewl my;12H
^W1REP("E","HZHL",0,"LKHR1","SET")
0
^W1REP("E","HZHL",0,"LKHR1","SH")
1
^W1REP("E","HZHL",0,"SUGL")
zegewl zveaw;8
^W1REP("E","HZHL",0,"SUGL","FILE")
^SUGL
^W1REP("E","HZHL",0,"SUGL","OUT")
SUGL1
^W1REP("E","HZHL",0,"SUGL","SET")
0
^W1REP("E","HZHL",0,"SUGL1")
dveaw xe`z;12H
^W1REP("E","HZHL",0,"SUGL1","SET")
0
^W1REP("E","HZHL",0,"SUGL1","SH")
1
^W1REP("E","HZHL",0,"TRH")
jix`z;8D
^W1REP("E","HZHL",0,"TRH","SET")
0
^W1REP("E","HZHL",0,"TRH","SH")
1
^W1REP("E","HZHL",0,"x1")
dgpd iptl;8,2
^W1REP("E","HZHL",0,"x2")
dgpd;7,2
^W1REP("E","HZHL",0,"x3")
dgpd ixg`;8,2
^W1REP("E","HZHL",0,"x4")
;,
^W1REP("E","HZHL","COD")
SUGL*SUGL1*LKHR*LKHR1*LKH*LKH1*TRH*HZM*HB*x1*x2*x3
^W1REP("E","HZHL","CT")
2*2*2*0*0*0
^W1REP("E","HZHL","FLD")
SUGL*LKHR*LKH*TRH*HZM*HB*x1*x2*x3
^W1REP("E","HZHL","FLD0")
-*-*******
^W1REP("E","HZHL","GLOB1")
^P1HB2I
^W1REP("E","HZHL","GLOB2")
^P1HB2I(DT,HB)
^W1REP("E","HZHL","LPT")
B
^W1REP("E","HZHL","MIUN")
2*3*1*2*3*4
^W1REP("E","HZHL","QUERY","mikix`ze zegewl itl","CT")
2*2*2*0*0*0
^W1REP("E","HZHL","QUERY","mikix`ze zegewl itl","FLD0")
-*-*******
^W1REP("E","HZHL","QUERY","mikix`ze zegewl itl","MIUN")
2*3*1*2*3*4
^W1REP("E","HZHL","QUERY","mikix`ze zegewl itl","SIK0")
1*1*1*1*0*0
^W1REP("E","HZHL","QUERY","zegewle mikix`z itl","CT")
2*2*2*2*0*0
^W1REP("E","HZHL","QUERY","zegewle mikix`z itl","FLD0")
-*-*******
^W1REP("E","HZHL","QUERY","zegewle mikix`z itl","MIUN")
2*3*1*2*3*4
^W1REP("E","HZHL","QUERY","zegewle mikix`z itl","SIK0")
1*1*1*1*0*0
^W1REP("E","HZHL","QUERY","zepnfde zegewl itl","CT")
1*1*2*0*0*0
^W1REP("E","HZHL","QUERY","zepnfde zegewl itl","FLD0")
********
^W1REP("E","HZHL","QUERY","zepnfde zegewl itl","MIUN")
1*2*3*4*5*6
^W1REP("E","HZHL","QUERY","zepnfde zegewl itl","SIK0")
1*1*1*0*0*0
^W1REP("E","HZHL","SIK")
1*1*1*
^W1REP("E","HZHL","SIK0")
1*1*1*1*0*0
^W1REP("E","HZHL","US",1)
D DT^P1HZHL
^W1REP("E","HZHL","US",2)
D HB^P1HZHL
^W1REP("E","HZHM")
dcrqnl zepnfd g"ec
^W1REP("E","HZHM",0,"HB")
zipeayg;8
^W1REP("E","HZHM",0,"HZM")
dpnfd;7
^W1REP("E","HZHM",0,"HZM","SH")
1
^W1REP("E","HZHM",0,"LKH")
gewl 'qn;10
^W1REP("E","HZHM",0,"LKH","FILE")
^LKH
^W1REP("E","HZHM",0,"LKH","OUT")
LKH1
^W1REP("E","HZHM",0,"LKH1")
gewl my;20H
^W1REP("E","HZHM",0,"MKBL")
xvln;5
^W1REP("E","HZHM",0,"MKBL","FILE")
^NAME
^W1REP("E","HZHM",0,"MKBL","M2")
S MKBL1=$$^P1NAME(MKBL)
^W1REP("E","HZHM",0,"MKBL","OUT")
MKBL1
^W1REP("E","HZHM",0,"MKBL1")
xvln my;12H
^W1REP("E","HZHM",0,"MKBL1","SH")
0
^W1REP("E","HZHM",0,"MLZR")
xvln 'qn;5
^W1REP("E","HZHM",0,"MLZR",2)
I MLZR S MLZR1=$G(^NAME(MLZR,1))
^W1REP("E","HZHM",0,"MLZR","OUT")
MLZR1
^W1REP("E","HZHM",0,"MLZR1")
xvln my;12H
^W1REP("E","HZHM",0,"MLZR1","SH")
1
^W1REP("E","HZHM",0,"NAME")
gewl my;12H
^W1REP("E","HZHM",0,"NAME","SH")
1
^W1REP("E","HZHM",0,"NCAB")
zipeayg;6
^W1REP("E","HZHM",0,"NCAB","SH")
0
^W1REP("E","HZHM",0,"NMB")
ogley;5
^W1REP("E","HZHM",0,"NMB","SH")
1
^W1REP("E","HZHM",0,"PSL")
gily cew;3
^W1REP("E","HZHM",0,"PSL","FILE")
^P1SL
^W1REP("E","HZHM",0,"PSL","OUT")
PSL1
^W1REP("E","HZHM",0,"PSL1")
gily my;10H
^W1REP("E","HZHM",0,"PSL1","SH")
1
^W1REP("E","HZHM",0,"SHAA")
dry;5
^W1REP("E","HZHM",0,"SHAA","SH")
1
^W1REP("E","HZHM",0,"SL")
gily cew;5
^W1REP("E","HZHM",0,"SL","FILE")
^P1SL
^W1REP("E","HZHM",0,"SL","OUT")
SL1
^W1REP("E","HZHM",0,"SL1")
gily my;12H
^W1REP("E","HZHM",0,"SOAD")
micreq;6
^W1REP("E","HZHM",0,"SOAD","SH")
1
^W1REP("E","HZHM",0,"SUGS")
ogley beq;8
^W1REP("E","HZHM",0,"SUGS","FILE")
^SUGS
^W1REP("E","HZHM",0,"SUGS","OUT")
SUGS1
^W1REP("E","HZHM",0,"SUGS1")
xe`z;12H
^W1REP("E","HZHM",0,"SUGS1","SH")
1
^W1REP("E","HZHM",0,"SUGT")
melyz beq;9
^W1REP("E","HZHM",0,"SUGT","SH")
1
^W1REP("E","HZHM",0,"TRH")
jix`z;8D
^W1REP("E","HZHM",0,"TRH","SH")
1
^W1REP("E","HZHM",0,"TS")
melyzl;8
^W1REP("E","HZHM",0,"TSHL")
melyzl;8
^W1REP("E","HZHM",0,"TSHL","OUT")
TSHL
^W1REP("E","HZHM",0,"x1")
milehia;8,2
^W1REP("E","HZHM",0,"x2")
zegpd;8,2
^W1REP("E","HZHM",0,"x3")
zexy;8,2
^W1REP("E","HZHM",0,"x4")
melyzl;9,2
^W1REP("E","HZHM",0,"x5")
micreq;6,0
^W1REP("E","HZHM",0,"x6")
;,
^W1REP("E","HZHM","COD")
MKBL*MKBL1*SUGS*SUGS1*NMB*TRH*SHAA*HZM*SUGT*x1*x2*x3*x4*x5
^W1REP("E","HZHM","CT")
2*1*0*2*0*0*0
^W1REP("E","HZHM","FLD")
MKBL*SUGS*NMB*TRH*SHAA*HZM*SUGT*x1*x2*x3*x4*x5
^W1REP("E","HZHM","FLD0")
-******-****
^W1REP("E","HZHM","GLOB1")
^P1H
^W1REP("E","HZHM","GLOB2")
^P1H(DATH,HZM)
^W1REP("E","HZHM","LPT")
B
^W1REP("E","HZHM","MIUN")
3*1*3*2*4*5*6
^W1REP("E","HZHM","QUERY","dpnfd 'qn itl","CT")
0*0*0*0*0*0*0*0
^W1REP("E","HZHM","QUERY","dpnfd 'qn itl","FLD0")
*-*****-*-*-**
^W1REP("E","HZHM","QUERY","dpnfd 'qn itl","MIUN")
2*3*4*3*5*1*6*7
^W1REP("E","HZHM","QUERY","dpnfd 'qn itl","SIK0")
0*0*0*0*0*0*0*0
^W1REP("E","HZHM","QUERY","fkexn ogley beq itl","CT")
2*2*0*0*0*0*0
^W1REP("E","HZHM","QUERY","fkexn ogley beq itl","FLD0")
-**-**-*-*-*****
^W1REP("E","HZHM","QUERY","fkexn ogley beq itl","MIUN")
3*1*3*2*4*5*6
^W1REP("E","HZHM","QUERY","fkexn ogley beq itl","SIK0")
0*1*1*0*0*0*0
^W1REP("E","HZHM","QUERY","hxetn ogley beq itl","CT")
2*1*0*2*0*0*0
^W1REP("E","HZHM","QUERY","hxetn ogley beq itl","FLD0")
-******-****
^W1REP("E","HZHM","QUERY","hxetn ogley beq itl","MIUN")
3*1*3*2*4*5*6
^W1REP("E","HZHM","QUERY","hxetn ogley beq itl","SIK0")
0*1*1*1*0*0*0
^W1REP("E","HZHM","QUERY","xvln 'qn itl","CT")
1*0*0*0*0*0*0
^W1REP("E","HZHM","QUERY","xvln 'qn itl","FLD0")
*-*****-****
^W1REP("E","HZHM","QUERY","xvln 'qn itl","MIUN")
1*3*2*3*5*4*6
^W1REP("E","HZHM","QUERY","xvln 'qn itl","SIK0")
1*0*0*0*0*0*0
^W1REP("E","HZHM","SHP","KOD")
P1HZH
^W1REP("E","HZHM","SIK")
1*1*1*1*1*
^W1REP("E","HZHM","SIK0")
0*1*1*1*0*0*0
^W1REP("E","HZHM","US",-1)
D TRH^P1HZHC
^W1REP("E","HZHM","US",0)
D HZM^P1HZHC
^W1REP("E","HZHM","US",1)
D TRH^P1HZHC
^W1REP("E","HZHM","US",2)
D HZM^P1HZHC
^W1REP("E","HZMM")
zecrqn itl itqk migelyn g"ec
^W1REP("E","HZMM",0,"HZM")
xtqn;7
^W1REP("E","HZMM",0,"HZM","SH")
0
^W1REP("E","HZMM",0,"MSD")
dcrqn;5
^W1REP("E","HZMM",0,"MSD","FILE")
^P1MSD
^W1REP("E","HZMM",0,"MSD","OUT")
MSD1
^W1REP("E","HZMM",0,"MSD1")
dcrqn my;12H
^W1REP("E","HZMM",0,"MSD1","SH")
1
^W1REP("E","HZMM",0,"TD")
dcerz;7
^W1REP("E","HZMM",0,"TD","SH")
1
^W1REP("E","HZMM",0,"TD1")
dcerz;7
^W1REP("E","HZMM",0,"TD1","SH")
0
^W1REP("E","HZMM",0,"TRH")
jix`z;8D
^W1REP("E","HZMM",0,"TRH","SH")
0
^W1REP("E","HZMM",0,"VT")
melyz beq;2
^W1REP("E","HZMM",0,"VT","SH")
1
^W1REP("E","HZMM",0,"VT1")
melyz beq;8
^W1REP("E","HZMM",0,"VT1","SH")
0
^W1REP("E","HZMM",0,"x1")
mley;8,2
^W1REP("E","HZMM",0,"x2")
zexy inc;8,2
^W1REP("E","HZMM",0,"x3")
dxzi;8,2
^W1REP("E","HZMM",0,"x4")
;0,0
^W1REP("E","HZMM",0,"x5")
;,
^W1REP("E","HZMM","COD")
MSD*MSD1*VT1*TRH*TD1*HZM*x1*x2*x3*x4
^W1REP("E","HZMM","CT")
1*2*0*0*0*
^W1REP("E","HZMM","FLD")
MSD*VT1*TRH*TD1*HZM*x1*x2*x3*x4
^W1REP("E","HZMM","GLOB1")
^VRM($J)
^W1REP("E","HZMM","GLOB2")
^VRM($J,MSD,DD,TD,HZM,VT)
^W1REP("E","HZMM","LPT")
B
^W1REP("E","HZMM","MIUN")
1*2*3*4*5*6
^W1REP("E","HZMM","SIK")
1*1*1**
^W1REP("E","HZMM","SIK0")
1*1*0*0*0*
^W1REP("E","HZMM","US",3)
D DD^P1SUMM
^W1REP("E","HZMM","US",4)
D TD^P1SUMM
^W1REP("E","HZMM","US",6)
D VT^P1SUMM
^W1REP("E","LEVD")
xvewn illk micaer g"ec
^W1REP("E","LEVD",0,"KV")
micaer zveaw;12
^W1REP("E","LEVD",0,"KV","FILE")
^|$$^%W1UCI(JB)|LEVSUG
^W1REP("E","LEVD",0,"KV","OUT")
KV1
^W1REP("E","LEVD",0,"KV","SET")
0
^W1REP("E","LEVD",0,"KV1")
dveaw my;12H
^W1REP("E","LEVD",0,"KV1","SET")
0
^W1REP("E","LEVD",0,"KV1","SH")
1
^W1REP("E","LEVD",0,"NOM")
dxey;5
^W1REP("E","LEVD",0,"NOM","SET")
0
^W1REP("E","LEVD",0,"NOM","SH")
1
^W1REP("E","LEVD",0,"STRING")
caer 'qn;8
^W1REP("E","LEVD",0,"STRING","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("E","LEVD",0,"STRING","M2")
S STRING1=$$^P1NAME(STRING)
^W1REP("E","LEVD",0,"STRING","OUT")
STRING1
^W1REP("E","LEVD",0,"STRING","SET")
0
^W1REP("E","LEVD",0,"STRING1")
caer my;16H
^W1REP("E","LEVD",0,"STRING1","SET")
0
^W1REP("E","LEVD",0,"STRING1","SH")
1
^W1REP("E","LEVD",0,"x1")
dqipk jix`z;11,0
^W1REP("E","LEVD",0,"x2")
mei;3,0
^W1REP("E","LEVD",0,"x3")
dry;5,0
^W1REP("E","LEVD",0,"x4")
d`ivi jix`z;11,0
^W1REP("E","LEVD",0,"x5")
mei;3,0
^W1REP("E","LEVD",0,"x6")
dry;5,0
^W1REP("E","LEVD",0,"x7")
zery k"dq;9,2
^W1REP("E","LEVD","COD")
KV*KV1*STRING*STRING1*NOM*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","LEVD","CT")
2*0
^W1REP("E","LEVD","FLD")
KV*STRING*NOM*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","LEVD","FLD0")
*****-*-**
^W1REP("E","LEVD","GLOB1")
^|$$^%W1UCI(JB)|TEMP($P)
^W1REP("E","LEVD","GLOB2")
^|$$^%W1UCI(JB)|TEMP($P,KV,STRING,NOM)
^W1REP("E","LEVD","LPT")
B
^W1REP("E","LEVD","MIUN")
1*2
^W1REP("E","LEVD","QUERY","inei micaer g""ec","CT")
2*0
^W1REP("E","LEVD","QUERY","inei micaer g""ec","FLD0")
*****-*-**
^W1REP("E","LEVD","QUERY","inei micaer g""ec","MIUN")
1*2
^W1REP("E","LEVD","QUERY","inei micaer g""ec","SIK0")
1*0
^W1REP("E","LEVD","QUERY","iztewz micaer g""ec","CT")
2*0
^W1REP("E","LEVD","QUERY","iztewz micaer g""ec","FLD0")
********
^W1REP("E","LEVD","QUERY","iztewz micaer g""ec","MIUN")
1*2
^W1REP("E","LEVD","QUERY","iztewz micaer g""ec","SIK0")
1*0
^W1REP("E","LEVD","SIK")
******1*
^W1REP("E","LEVD","SIK0")
1*0
^W1REP("E","LEVD","US",3)
S STRING1=$$^W4NAME(STRING)
^W1REP("E","LEVD","US",4)
D TM^W4LEVD
^W1REP("E","MBPR")
zepnfd ilawn itl mihixt g"ec
^W1REP("E","MBPR",0,"MLZR")
xvln;9
^W1REP("E","MBPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("E","MBPR",0,"MLZR","OUT")
MLZR1
^W1REP("E","MBPR",0,"MLZR1")
xvln my;12H
^W1REP("E","MBPR",0,"MLZR1","SH")
0
^W1REP("E","MBPR",0,"PAR")
hixt;8
^W1REP("E","MBPR",0,"PAR","FILE")
^PAR
^W1REP("E","MBPR",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","MBPR",0,"PAR","OUT")
PAR1
^W1REP("E","MBPR",0,"PAR1")
hixt xe`z;20H
^W1REP("E","MBPR",0,"PAR1","SH")
1
^W1REP("E","MBPR",0,"SUGP")
hixt beq;3
^W1REP("E","MBPR",0,"SUGP","FILE")
^PARSUG
^W1REP("E","MBPR",0,"SUGP","OUT")
SUGP1
^W1REP("E","MBPR",0,"SUGP1")
beq xe`z;10H
^W1REP("E","MBPR",0,"SUGP1","SH")
0
^W1REP("E","MBPR",0,"SUGS")
lawn;5.
^W1REP("E","MBPR",0,"SUGS","FILE")
^NAME
^W1REP("E","MBPR",0,"SUGS","M2")
S SUGS1=$G(^NAME(SUGS,1))
^W1REP("E","MBPR",0,"SUGS","OUT")
SUGS1
^W1REP("E","MBPR",0,"SUGS1")
lawnd my;12H
^W1REP("E","MBPR",0,"SUGS1","SH")
1
^W1REP("E","MBPR",0,"x1")
zenk;5,0
^W1REP("E","MBPR",0,"x2")
dgpd iptl;10,2
^W1REP("E","MBPR",0,"x3")
hixtl dgpd;10,2
^W1REP("E","MBPR",0,"x4")
k"dq;8,2
^W1REP("E","MBPR",0,"x5")
;,
^W1REP("E","MBPR",0,"x6")
;,
^W1REP("E","MBPR","COD")
SUGS*SUGS1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4
^W1REP("E","MBPR","CT")
1*2*0*0*0*0*0
^W1REP("E","MBPR","FLD")
SUGS*SUGP*PAR*x1*x2*x3*x4
^W1REP("E","MBPR","FLD0")
*******
^W1REP("E","MBPR","GLOB1")
^VRM(PRTN)
^W1REP("E","MBPR","GLOB2")
^VRM(PRTN,SUGS,SUGP,PAR)
^W1REP("E","MBPR","LPT")
S
^W1REP("E","MBPR","MIUN")
1*2*3*4*2*0*0
^W1REP("E","MBPR","QUERY","mihixt itl milawn","CT")
1*2*0*0*0*0*0
^W1REP("E","MBPR","QUERY","mihixt itl milawn","FLD0")
*******
^W1REP("E","MBPR","QUERY","mihixt itl milawn","MIUN")
1*2*3*4*2*0*0
^W1REP("E","MBPR","QUERY","mihixt itl milawn","SIK0")
1*0*0*0*0*0*0
^W1REP("E","MBPR","QUERY","milawn itl mihixt","CT")
0*1*2*0*0*0*0
^W1REP("E","MBPR","QUERY","milawn itl mihixt","FLD0")
*******
^W1REP("E","MBPR","QUERY","milawn itl mihixt","MIUN")
3*1*2*4*2*0*0
^W1REP("E","MBPR","QUERY","milawn itl mihixt","SIK0")
0*0*0*0*0*0*0
^W1REP("E","MBPR","SHP","KOD")
P1DPMKB
^W1REP("E","MBPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("E","MBPR","SIK")
1*1*1*1**
^W1REP("E","MBPR","SIK0")
1*0*0*0*0*0*0
^W1REP("E","MBPR","US",4)
D PAR^P1DPMKB
^W1REP("E","MDBL")
zeveaw itl zegewl zbvd
^W1REP("E","MDBL",0,"EMAIL")
E-MAIL;30
^W1REP("E","MDBL",0,"EMAIL","SET")
0
^W1REP("E","MDBL",0,"EMAIL","SH")
0
^W1REP("E","MDBL",0,"IR")
xir;12H
^W1REP("E","MDBL",0,"IR","SH")
0
^W1REP("E","MDBL",0,"KTV")
zaezk;20H
^W1REP("E","MDBL",0,"KTV","SH")
0
^W1REP("E","MDBL",0,"LKH")
gewl 'qn;10
^W1REP("E","MDBL",0,"LKH","FILE")
^LKH
^W1REP("E","MDBL",0,"LKH","OUT")
LKH1
^W1REP("E","MDBL",0,"LKH","SET")
1
^W1REP("E","MDBL",0,"LKH1")
gewl xe`z;32H
^W1REP("E","MDBL",0,"LKH1","SET")
0
^W1REP("E","MDBL",0,"LKH1","SH")
1
^W1REP("E","MDBL",0,"MANUJ")
dcil jix`z;8D
^W1REP("E","MDBL",0,"MANUJ","SH")
1
^W1REP("E","MDBL",0,"MIKUD")
cewin;5
^W1REP("E","MDBL",0,"MIKUD","SH")
1
^W1REP("E","MDBL",0,"SUGL")
gewl beq;8
^W1REP("E","MDBL",0,"SUGL","FILE")
^SUGL
^W1REP("E","MDBL",0,"SUGL","OUT")
SUGL1
^W1REP("E","MDBL",0,"SUGL","SET")
0
^W1REP("E","MDBL",0,"SUGL1")
xe`z;12H
^W1REP("E","MDBL",0,"SUGL1","SET")
0
^W1REP("E","MDBL",0,"SUGL1","SH")
1
^W1REP("E","MDBL",0,"TEL")
oetlh;10
^W1REP("E","MDBL",0,"TEL","SH")
0
^W1REP("E","MDBL",0,"x1")
oetlh;10,0
^W1REP("E","MDBL",0,"x2")
zaezk;22,0
^W1REP("E","MDBL",0,"x3")
xir;12,0
^W1REP("E","MDBL",0,"x4")
cewin;5,0
^W1REP("E","MDBL",0,"x5")
;,
^W1REP("E","MDBL",0,"x6")
cewin;5,0
^W1REP("E","MDBL",0,"x7")
;,
^W1REP("E","MDBL","COD")
SUGL*SUGL1*LKH*LKH1*x1*x2*x3*x4
^W1REP("E","MDBL","CT")
1*0*0*0*0*0
^W1REP("E","MDBL","FLD")
SUGL*LKH*x1*x2*x3*x4
^W1REP("E","MDBL","FLD0")
****
^W1REP("E","MDBL","GLOB1")
^LKH
^W1REP("E","MDBL","GLOB2")
^LKH(LKH)
^W1REP("E","MDBL","LPT")
B
^W1REP("E","MDBL","MIUN")
1*2*3*4*4*5
^W1REP("E","MDBL","QUERY","cewin itl ","CT")
1*0*0*0*0*0
^W1REP("E","MDBL","QUERY","cewin itl ","FLD0")
*****
^W1REP("E","MDBL","QUERY","cewin itl ","MIUN")
1*2*3*4*4*5
^W1REP("E","MDBL","QUERY","cewin itl ","SIK0")
0*0*0*0*0*0
^W1REP("E","MDBL","SIK")
****
^W1REP("E","MDBL","SIK0")
0*0*0*0*0*0
^W1REP("E","MDBL","US",-1)
D LKH^KLMADB
^W1REP("E","MDBL","US",1)
D LKH^KLMADB
^W1REP("E","MDBL0")
zeveaw itl zegewl zbvd
^W1REP("E","MDBL0",0,"IR")
xir;12H
^W1REP("E","MDBL0",0,"IR","SH")
0
^W1REP("E","MDBL0",0,"KTV")
zaezk;20H
^W1REP("E","MDBL0",0,"KTV","SH")
0
^W1REP("E","MDBL0",0,"LKH")
gewl 'qn;10
^W1REP("E","MDBL0",0,"LKH","FILE")
^LKH
^W1REP("E","MDBL0",0,"LKH","OUT")
LKH1
^W1REP("E","MDBL0",0,"LKH1")
gewl xe`z;32H
^W1REP("E","MDBL0",0,"LKH1","SH")
1
^W1REP("E","MDBL0",0,"MANUJ")
dcil jix`z;8D
^W1REP("E","MDBL0",0,"MANUJ","SH")
1
^W1REP("E","MDBL0",0,"MIKUD")
cewin;5
^W1REP("E","MDBL0",0,"MIKUD","SH")
1
^W1REP("E","MDBL0",0,"SUGL")
gewl beq;8
^W1REP("E","MDBL0",0,"SUGL","FILE")
^SUGL
^W1REP("E","MDBL0",0,"SUGL","OUT")
SUGL1
^W1REP("E","MDBL0",0,"SUGL1")
xe`z;12H
^W1REP("E","MDBL0",0,"SUGL1","SH")
1
^W1REP("E","MDBL0",0,"TEL")
oetlh;10
^W1REP("E","MDBL0",0,"TEL","SH")
0
^W1REP("E","MDBL0",0,"x1")
oetlh;10,0
^W1REP("E","MDBL0",0,"x2")
zaezk;22,0
^W1REP("E","MDBL0",0,"x3")
xir;12,0
^W1REP("E","MDBL0",0,"x4")
cewin;5,0
^W1REP("E","MDBL0",0,"x5")
;,
^W1REP("E","MDBL0","COD")
SUGL*SUGL1*LKH*LKH1*x1*x2*x3*x4
^W1REP("E","MDBL0","CT")
1*0*0*0*0*0
^W1REP("E","MDBL0","FLD")
SUGL*LKH*x1*x2*x3*x4
^W1REP("E","MDBL0","FLD0")
*****
^W1REP("E","MDBL0","GLOB1")
^LKH
^W1REP("E","MDBL0","GLOB2")
^LKH(LKH)
^W1REP("E","MDBL0","LPT")
B
^W1REP("E","MDBL0","MIUN")
1*2*3*4*4*5
^W1REP("E","MDBL0","QUERY","cewin itl ","CT")
1*0*0*0*0*0
^W1REP("E","MDBL0","QUERY","cewin itl ","FLD0")
*****
^W1REP("E","MDBL0","QUERY","cewin itl ","MIUN")
1*2*3*4*4*5
^W1REP("E","MDBL0","QUERY","cewin itl ","SIK0")
0*0*0*0*0*0
^W1REP("E","MDBL0","SIK")
****
^W1REP("E","MDBL0","SIK0")
0*0*0*0*0*0
^W1REP("E","MDBL0","US",-1)
D LKH^KLMADB
^W1REP("E","MDBL0","US",1)
D LKH^KLMADB
^W1REP("E","MHAL")
zelr xign mr zewlgn itl zexikn
^W1REP("E","MHAL",0,"DAT")
jix`z;8D
^W1REP("E","MHAL",0,"DAT","SH")
1
^W1REP("E","MHAL",0,"DATT")
jix`z;8D
^W1REP("E","MHAL",0,"DATT","SET")
0
^W1REP("E","MHAL",0,"DATT","SH")
1
^W1REP("E","MHAL",0,"MHL")
dwlgn;5
^W1REP("E","MHAL",0,"MHL","FILE")
^DEP
^W1REP("E","MHAL",0,"MHL","OUT")
MHL1
^W1REP("E","MHAL",0,"MHL","SET")
0
^W1REP("E","MHAL",0,"MHL1")
xe`z;12H
^W1REP("E","MHAL",0,"MHL1","SET")
0
^W1REP("E","MHAL",0,"MHL1","SH")
0
^W1REP("E","MHAL",0,"PAR")
hixt;8
^W1REP("E","MHAL",0,"PAR","FILE")
^PAR
^W1REP("E","MHAL",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","MHAL",0,"PAR","OUT")
PAR1
^W1REP("E","MHAL",0,"PAR","SET")
0
^W1REP("E","MHAL",0,"PAR1")
hixt my;12H
^W1REP("E","MHAL",0,"PAR1","SET")
0
^W1REP("E","MHAL",0,"PAR1","SH")
1
^W1REP("E","MHAL",0,"PARIT")
hixt cew;8.
^W1REP("E","MHAL",0,"PARIT","FILE")
^PAR
^W1REP("E","MHAL",0,"PARIT","M2")
D PAR1^L2MHIRA
^W1REP("E","MHAL",0,"PARIT","OUT")
PARIT1
^W1REP("E","MHAL",0,"PARIT1")
hixt xe`z;18H
^W1REP("E","MHAL",0,"PARIT1","SH")
0
^W1REP("E","MHAL",0,"SUGP")
dveaw;5
^W1REP("E","MHAL",0,"SUGP","FILE")
^PARSUG
^W1REP("E","MHAL",0,"SUGP","OUT")
SUGP1
^W1REP("E","MHAL",0,"SUGP","SET")
0
^W1REP("E","MHAL",0,"SUGP1")
dveaw xe`z;12H
^W1REP("E","MHAL",0,"SUGP1","SET")
0
^W1REP("E","MHAL",0,"SUGP1","SH")
0
^W1REP("E","MHAL",0,"x1")
zenk;7,1
^W1REP("E","MHAL",0,"x2")
dxikn xign;7,2
^W1REP("E","MHAL",0,"x3")
zelr xign;7,2
^W1REP("E","MHAL",0,"x4")
n"rn iptl;9,1
^W1REP("E","MHAL",0,"x5")
zelr;9,1
^W1REP("E","MHAL",0,"x6")
geex;8,1
^W1REP("E","MHAL",0,"x7")
;,
^W1REP("E","MHAL","COD")
MHL*MHL1*SUGP*SUGP1*PAR*PAR1*DATT*x1*x2*x3*x4*x5*x6
^W1REP("E","MHAL","CT")
1*2*0*2*2*0*0
^W1REP("E","MHAL","FLD")
MHL*SUGP*PAR*DATT*x1*x2*x3*x4*x5*x6
^W1REP("E","MHAL","FLD0")
*******
^W1REP("E","MHAL","GLOB1")
^PLUTOT
^W1REP("E","MHAL","GLOB2")
^PLUTOT(DAT,MRK,PARIT)
^W1REP("E","MHAL","LPT")
B
^W1REP("E","MHAL","MIUN")
1*3*4*2*3*4**0
^W1REP("E","MHAL","QUERY","mini itl fkexn","CT")
1*2*0*0*2*0*0
^W1REP("E","MHAL","QUERY","mini itl fkexn","FLD0")
-*-*-***-*-***
^W1REP("E","MHAL","QUERY","mini itl fkexn","MIUN")
1*3*4*1*3*4**0
^W1REP("E","MHAL","QUERY","mini itl fkexn","SIK0")
1*1*0*0*1*0*0
^W1REP("E","MHAL","QUERY","mini itl hxetn","CT")
1*2*0*2*2*0*0
^W1REP("E","MHAL","QUERY","mini itl hxetn","FLD0")
*******
^W1REP("E","MHAL","QUERY","mini itl hxetn","MIUN")
1*3*4*2*3*4**0
^W1REP("E","MHAL","QUERY","mini itl hxetn","SIK0")
1*1*0*1*1*0*0
^W1REP("E","MHAL","QUERY","zeveaw ila hxetn","CT")
1*2*0*0*2*0*0
^W1REP("E","MHAL","QUERY","zeveaw ila hxetn","FLD0")
*-**-****
^W1REP("E","MHAL","QUERY","zeveaw ila hxetn","MIUN")
1*2*3*4*3*4**0
^W1REP("E","MHAL","QUERY","zeveaw ila hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("E","MHAL","QUERY","zeveawe zewlgn itl fkexn","CT")
2*0*0*0*2*0*0
^W1REP("E","MHAL","QUERY","zeveawe zewlgn itl fkexn","FLD0")
**-*-****
^W1REP("E","MHAL","QUERY","zeveawe zewlgn itl fkexn","MIUN")
1*2*3*4*3*4**0
^W1REP("E","MHAL","QUERY","zeveawe zewlgn itl fkexn","SIK0")
1*0*0*0*1*0*0
^W1REP("E","MHAL","QUERY","zeveawe zewlgn itl hxetn","CT")
1*2*0*0*2*0*0
^W1REP("E","MHAL","QUERY","zeveawe zewlgn itl hxetn","FLD0")
***-****
^W1REP("E","MHAL","QUERY","zeveawe zewlgn itl hxetn","MIUN")
1*2*3*4*3*4**0
^W1REP("E","MHAL","QUERY","zeveawe zewlgn itl hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("E","MHAL","SIK")
1***1*1*1**
^W1REP("E","MHAL","SIK0")
1*1*0*1*1*0*0
^W1REP("E","MHAL","US",-1)
D DAT^L2MHIRA
^W1REP("E","MHAL","US",1)
D DAT^L2MHIRA
^W1REP("E","MHAL","US",3)
D PAR^L2MHIRA
^W1REP("E","MHMK")
mifkxn itl zexikn
^W1REP("E","MHMK",0,"DAT")
jix`z;8D
^W1REP("E","MHMK",0,"DAT","SH")
1
^W1REP("E","MHMK",0,"DATT")
jix`z;8D
^W1REP("E","MHMK",0,"DATT","SH")
1
^W1REP("E","MHMK",0,"MHL")
dwlgn;5
^W1REP("E","MHMK",0,"MHL","FILE")
^DEP
^W1REP("E","MHMK",0,"MHL","OUT")
MHL1
^W1REP("E","MHMK",0,"MHL1")
xe`z;12H
^W1REP("E","MHMK",0,"MHL1","SH")
0
^W1REP("E","MHMK",0,"MRKZ")
fkxn;4
^W1REP("E","MHMK",0,"MRKZ","FILE")
^MRKZ
^W1REP("E","MHMK",0,"MRKZ","OUT")
MRKZ1
^W1REP("E","MHMK",0,"MRKZ1")
fkxn my;12H
^W1REP("E","MHMK",0,"MRKZ1","SH")
1
^W1REP("E","MHMK",0,"PARIT")
hixt cew;8.
^W1REP("E","MHMK",0,"PARIT","FILE")
^PAR
^W1REP("E","MHMK",0,"PARIT","M2")
D PAR1^L2MHIRA
^W1REP("E","MHMK",0,"PARIT","OUT")
PARIT1
^W1REP("E","MHMK",0,"PARIT1")
hixt xe`z;18H
^W1REP("E","MHMK",0,"PARIT1","SH")
0
^W1REP("E","MHMK",0,"SUGP")
dveaw;5
^W1REP("E","MHMK",0,"SUGP","FILE")
^PARSUG
^W1REP("E","MHMK",0,"SUGP","OUT")
SUGP1
^W1REP("E","MHMK",0,"SUGP1")
dveaw xe`z;12H
^W1REP("E","MHMK",0,"SUGP1","SH")
0
^W1REP("E","MHMK",0,"x1")
zenk;7,2
^W1REP("E","MHMK",0,"x2")
mekq;10,2
^W1REP("E","MHMK",0,"x3")
dxikn xign;10,2
^W1REP("E","MHMK",0,"x4")
n"rn iptl;10,2
^W1REP("E","MHMK",0,"x5")
;,
^W1REP("E","MHMK","COD")
MRKZ*MRKZ1*MHL*MHL1*SUGP*SUGP1*PARIT*PARIT1*DATT*x1*x2*x3*x4
^W1REP("E","MHMK","CT")
0*2*2*2*2*0*0
^W1REP("E","MHMK","FLD")
MRKZ*MHL*SUGP*PARIT*DATT*x1*x2*x3*x4
^W1REP("E","MHMK","FLD0")
*-*-**-****
^W1REP("E","MHMK","GLOB1")
^PLUMRK
^W1REP("E","MHMK","GLOB2")
^PLUMRK(DAT,MRKZ,PARIT)
^W1REP("E","MHMK","LPT")
S
^W1REP("E","MHMK","MIUN")
2*1*2*1*3*4**0
^W1REP("E","MHMK","MIUN","PROG")
CP^L2MHIRA
^W1REP("E","MHMK","QUERY","fkexn mifkxn itl mihixt g""ec","CT")
0*2*2*0*2*0*0
^W1REP("E","MHMK","QUERY","fkexn mifkxn itl mihixt g""ec","FLD0")
-*-*-**-****
^W1REP("E","MHMK","QUERY","fkexn mifkxn itl mihixt g""ec","MIUN")
2*1*2*1*3*4**0
^W1REP("E","MHMK","QUERY","fkexn mifkxn itl mihixt g""ec","SIK0")
0*1*1*0*1*0*0
^W1REP("E","MHMK","QUERY","hxetn mifkxn itl mihixt g""ec","CT")
0*2*2*2*2*0*0
^W1REP("E","MHMK","QUERY","hxetn mifkxn itl mihixt g""ec","FLD0")
*-*-**-****
^W1REP("E","MHMK","QUERY","hxetn mifkxn itl mihixt g""ec","MIUN")
2*1*2*1*3*4**0
^W1REP("E","MHMK","QUERY","hxetn mifkxn itl mihixt g""ec","SIK0")
0*1*1*1*1*0*0
^W1REP("E","MHMK","QUERY","mihixte zeveaw ,zewlgn itl g""ec","CT")
1*2*2*0*2*0*0
^W1REP("E","MHMK","QUERY","mihixte zeveaw ,zewlgn itl g""ec","FLD0")
****-****
^W1REP("E","MHMK","QUERY","mihixte zeveaw ,zewlgn itl g""ec","MIUN")
1*2*3*4*3*4**0
^W1REP("E","MHMK","QUERY","mihixte zeveaw ,zewlgn itl g""ec","SIK0")
1*1*1*0*1*0*0
^W1REP("E","MHMK","QUERY","mini itl g""ec","CT")
1*2*0*0*2*0*0
^W1REP("E","MHMK","QUERY","mini itl g""ec","FLD0")
**-******
^W1REP("E","MHMK","QUERY","mini itl g""ec","MIUN")
1*3*3*4*2*4**0
^W1REP("E","MHMK","QUERY","mini itl g""ec","SIK0")
1*1*0*0*1*0*0
^W1REP("E","MHMK","QUERY","zeveawe zewlgn itl fkexn g""ec","CT")
1*2*0*0*2*0*0
^W1REP("E","MHMK","QUERY","zeveawe zewlgn itl fkexn g""ec","FLD0")
***-*-****
^W1REP("E","MHMK","QUERY","zeveawe zewlgn itl fkexn g""ec","MIUN")
1*2*3*4*3*4**0
^W1REP("E","MHMK","QUERY","zeveawe zewlgn itl fkexn g""ec","SIK0")
1*0*0*0*1*0*0
^W1REP("E","MHMK","QUERY","zewlgn `ll mini itl g""ec","CT")
1*2*0*0*2*0*0
^W1REP("E","MHMK","QUERY","zewlgn `ll mini itl g""ec","FLD0")
*-*-******
^W1REP("E","MHMK","QUERY","zewlgn `ll mini itl g""ec","MIUN")
1*3*3*3*2*4**0
^W1REP("E","MHMK","QUERY","zewlgn `ll mini itl g""ec","SIK0")
1*1*0*0*1*0*0
^W1REP("E","MHMK","QUERY","zewlgne mifkxn itl fkexn g""ec","CT")
2*0*0*0*2*0*0
^W1REP("E","MHMK","QUERY","zewlgne mifkxn itl fkexn g""ec","FLD0")
**-*-*-****
^W1REP("E","MHMK","QUERY","zewlgne mifkxn itl fkexn g""ec","MIUN")
1*2*3*4*3*4**0
^W1REP("E","MHMK","QUERY","zewlgne mifkxn itl fkexn g""ec","SIK0")
1*0*0*0*1*0*0
^W1REP("E","MHMK","SIK")
1*1*0*1**1*0*
^W1REP("E","MHMK","SIK0")
0*1*1*1*1*0*0
^W1REP("E","MHMK","US",1)
D DAT^L2MHIRA
^W1REP("E","MHMK","US",3)
D PAR^L2MHIRA
^W1REP("E","MHRA")
zewlgn itl zexikn
^W1REP("E","MHRA",0,"DAT")
jix`z;8D
^W1REP("E","MHRA",0,"DAT","SH")
1
^W1REP("E","MHRA",0,"DATT")
jix`z;8D
^W1REP("E","MHRA",0,"DATT","SET")
0
^W1REP("E","MHRA",0,"DATT","SH")
1
^W1REP("E","MHRA",0,"MHL")
dwlgn;5
^W1REP("E","MHRA",0,"MHL","FILE")
^DEP
^W1REP("E","MHRA",0,"MHL","OUT")
MHL1
^W1REP("E","MHRA",0,"MHL","SET")
0
^W1REP("E","MHRA",0,"MHL1")
xe`z;12H
^W1REP("E","MHRA",0,"MHL1","SET")
0
^W1REP("E","MHRA",0,"MHL1","SH")
0
^W1REP("E","MHRA",0,"PAR")
hixt;8
^W1REP("E","MHRA",0,"PAR","FILE")
^PAR
^W1REP("E","MHRA",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","MHRA",0,"PAR","OUT")
PAR1
^W1REP("E","MHRA",0,"PAR","SET")
0
^W1REP("E","MHRA",0,"PAR1")
hixt my;12H
^W1REP("E","MHRA",0,"PAR1","SET")
0
^W1REP("E","MHRA",0,"PAR1","SH")
1
^W1REP("E","MHRA",0,"PARIT")
hixt cew;8.
^W1REP("E","MHRA",0,"PARIT","FILE")
^PAR
^W1REP("E","MHRA",0,"PARIT","M2")
D PAR1^L2MHIRA
^W1REP("E","MHRA",0,"PARIT","OUT")
PARIT1
^W1REP("E","MHRA",0,"PARIT1")
hixt xe`z;18H
^W1REP("E","MHRA",0,"PARIT1","SH")
0
^W1REP("E","MHRA",0,"PRT")
;0
^W1REP("E","MHRA",0,"PRT","SET")
0
^W1REP("E","MHRA",0,"PRT","SH")
1
^W1REP("E","MHRA",0,"PRT1")
;0
^W1REP("E","MHRA",0,"PRT1","SET")
0
^W1REP("E","MHRA",0,"PRT1","SH")
1
^W1REP("E","MHRA",0,"SUGP")
dveaw;5
^W1REP("E","MHRA",0,"SUGP","FILE")
^PARSUG
^W1REP("E","MHRA",0,"SUGP","OUT")
SUGP1
^W1REP("E","MHRA",0,"SUGP","SET")
0
^W1REP("E","MHRA",0,"SUGP1")
dveaw xe`z;12H
^W1REP("E","MHRA",0,"SUGP1","SET")
0
^W1REP("E","MHRA",0,"SUGP1","SH")
0
^W1REP("E","MHRA",0,"x1")
zenk;7,2
^W1REP("E","MHRA",0,"x2")
mekq;10,2
^W1REP("E","MHRA",0,"x3")
dxikn xign;10,2
^W1REP("E","MHRA",0,"x4")
n"rn iptl;10,2
^W1REP("E","MHRA",0,"x5")
;,
^W1REP("E","MHRA","COD")
MHL*MHL1*SUGP*SUGP1*PAR*PAR1*DATT*x1*x2*x3*x4
^W1REP("E","MHRA","CT")
1*2*0*0*2*0*0
^W1REP("E","MHRA","FLD")
MHL*SUGP*PAR*DATT*x1*x2*x3*x4
^W1REP("E","MHRA","FLD0")
-*-*-****-*
^W1REP("E","MHRA","GLOB1")
^PLUTOT
^W1REP("E","MHRA","GLOB2")
^PLUTOT(DAT,MRK,PARIT)
^W1REP("E","MHRA","LPT")
S
^W1REP("E","MHRA","MIUN")
1*3*4*1*3*4**0
^W1REP("E","MHRA","QUERY","mini itl fkexn","CT")
1*2*0*0*2*0*0
^W1REP("E","MHRA","QUERY","mini itl fkexn","FLD0")
-*-*-****-*
^W1REP("E","MHRA","QUERY","mini itl fkexn","MIUN")
1*3*4*1*3*4**0
^W1REP("E","MHRA","QUERY","mini itl fkexn","SIK0")
1*1*0*0*1*0*0
^W1REP("E","MHRA","QUERY","mini itl hxetn","CT")
1*2*0*2*2*0*0
^W1REP("E","MHRA","QUERY","mini itl hxetn","FLD0")
*******
^W1REP("E","MHRA","QUERY","mini itl hxetn","MIUN")
1*3*4*2*3*4**0
^W1REP("E","MHRA","QUERY","mini itl hxetn","SIK0")
1*1*0*1*1*0*0
^W1REP("E","MHRA","QUERY","zeveaw ila hxetn","CT")
1*2*0*0*2*0*0
^W1REP("E","MHRA","QUERY","zeveaw ila hxetn","FLD0")
*-**-****
^W1REP("E","MHRA","QUERY","zeveaw ila hxetn","MIUN")
1*2*3*4*3*4**0
^W1REP("E","MHRA","QUERY","zeveaw ila hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("E","MHRA","QUERY","zeveawe zewlgn itl fkexn","CT")
2*0*0*0*2*0*0
^W1REP("E","MHRA","QUERY","zeveawe zewlgn itl fkexn","FLD0")
**-*-****
^W1REP("E","MHRA","QUERY","zeveawe zewlgn itl fkexn","MIUN")
1*2*3*4*3*4**0
^W1REP("E","MHRA","QUERY","zeveawe zewlgn itl fkexn","SIK0")
1*0*0*0*1*0*0
^W1REP("E","MHRA","QUERY","zeveawe zewlgn itl hxetn","CT")
1*2*0*0*2*0*0
^W1REP("E","MHRA","QUERY","zeveawe zewlgn itl hxetn","FLD0")
***-****
^W1REP("E","MHRA","QUERY","zeveawe zewlgn itl hxetn","MIUN")
1*2*3*4*3*4**0
^W1REP("E","MHRA","QUERY","zeveawe zewlgn itl hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("E","MHRA","SIK")
1*1*0*1**1*0*
^W1REP("E","MHRA","SIK0")
1*1*0*0*1*0*0
^W1REP("E","MHRA","US",1)
D DAT^L2MHIRA
^W1REP("E","MHRA","US",3)
D PAR^L2MHIRA
^W1REP("E","MLZT")
melyz ibeq itl g"ec
^W1REP("E","MLZT",0,"EMDA")
dcnr;4
^W1REP("E","MLZT",0,"EMDA","SET")
0
^W1REP("E","MLZT",0,"EMDA","SH")
1
^W1REP("E","MLZT",0,"HZM")
dpnfd;8
^W1REP("E","MLZT",0,"HZM","SET")
1
^W1REP("E","MLZT",0,"HZM","SH")
1
^W1REP("E","MLZT",0,"MLZ")
xvln 'qn;5
^W1REP("E","MLZT",0,"MLZ","FILE")
^NAME
^W1REP("E","MLZT",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^W1REP("E","MLZT",0,"MLZ","OUT")
MLZ1
^W1REP("E","MLZT",0,"MLZ","SET")
0
^W1REP("E","MLZT",0,"MLZ1")
xvln my;12H
^W1REP("E","MLZT",0,"MLZ1","SET")
0
^W1REP("E","MLZT",0,"MLZ1","SH")
1
^W1REP("E","MLZT",0,"NMB")
ogley;8
^W1REP("E","MLZT",0,"NMB","SET")
0
^W1REP("E","MLZT",0,"NMB","SH")
1
^W1REP("E","MLZT",0,"PART")
dcnr;4
^W1REP("E","MLZT",0,"PART","FILE")
^PLUK
^W1REP("E","MLZT",0,"PART","SH")
1
^W1REP("E","MLZT",0,"SHAA")
dry;5
^W1REP("E","MLZT",0,"SHAA","SET")
0
^W1REP("E","MLZT",0,"SHAA","SH")
1
^W1REP("E","MLZT",0,"SHULH")
ogley;5
^W1REP("E","MLZT",0,"SHULH","SH")
1
^W1REP("E","MLZT",0,"SUGS")
ogley beq;5
^W1REP("E","MLZT",0,"SUGS","FILE")
^SUGS
^W1REP("E","MLZT",0,"SUGS","OUT")
SUGS1
^W1REP("E","MLZT",0,"SUGS","SET")
0
^W1REP("E","MLZT",0,"SUGS1")
beq xe`z;6H
^W1REP("E","MLZT",0,"SUGS1","SET")
0
^W1REP("E","MLZT",0,"SUGS1","SH")
1
^W1REP("E","MLZT",0,"TRH")
jix`z;8D
^W1REP("E","MLZT",0,"TRH","SH")
1
^W1REP("E","MLZT",0,"TRHT")
jix`z;8D
^W1REP("E","MLZT",0,"TRHT","SET")
0
^W1REP("E","MLZT",0,"TRHT","SH")
1
^W1REP("E","MLZT",0,"x1")
melyzl;8,2
^W1REP("E","MLZT",0,"x2")
onefn;8,2
^W1REP("E","MLZT",0,"x3")
wiy;8,2
^W1REP("E","MLZT",0,"x4")
`"k;8,2
^W1REP("E","MLZT",0,"x5")
dtwd;8,2
^W1REP("E","MLZT",0,"x6")
dpzn 'lz;8,2
^W1REP("E","MLZT",0,"x7")
tih;7,2
^W1REP("E","MLZT",0,"x8")
;,
^W1REP("E","MLZT","COD")
MLZ*MLZ1*SUGS*SUGS1*EMDA*NMB*SHAA*TRHT*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","MLZT","CT")
1*2*0*0*0*2*0
^W1REP("E","MLZT","FLD")
MLZ*SUGS*EMDA*NMB*SHAA*TRHT*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","MLZT","FLD0")
*-*-*-*-*********
^W1REP("E","MLZT","GLOB1")
^P1H
^W1REP("E","MLZT","GLOB2")
^P1H(DATH,HZM)
^W1REP("E","MLZT","LPT")
B
^W1REP("E","MLZT","MIUN")
1*2*3*4*2*2*3
^W1REP("E","MLZT","QUERY","1.                fkexn mixvln itl","CT")
2*2*0*0*2*0*0
^W1REP("E","MLZT","QUERY","1.                fkexn mixvln itl","FLD0")
*-*-*-*-**-*******
^W1REP("E","MLZT","QUERY","1.                fkexn mixvln itl","MIUN")
1*2*3*4*1*2*3
^W1REP("E","MLZT","QUERY","1.                fkexn mixvln itl","SIK0")
1*0*0*0*1*0*0
^W1REP("E","MLZT","QUERY","2.                hxetn mixvln itl","CT")
1*2*0*0*0*2*0
^W1REP("E","MLZT","QUERY","2.                hxetn mixvln itl","FLD0")
*-*-*-*-*********
^W1REP("E","MLZT","QUERY","2.                hxetn mixvln itl","MIUN")
1*2*3*4*2*2*3
^W1REP("E","MLZT","QUERY","2.                hxetn mixvln itl","SIK0")
1*0*0*0*0*1*0
^W1REP("E","MLZT","QUERY","3. fkexn zepgleye zepgley ibeq itl","CT")
1*1*0*2*2*0*0
^W1REP("E","MLZT","QUERY","3. fkexn zepgleye zepgley ibeq itl","FLD0")
-**-**-**-*******
^W1REP("E","MLZT","QUERY","3. fkexn zepgleye zepgley ibeq itl","MIUN")
1*1*3*2*1*3*3
^W1REP("E","MLZT","QUERY","3. fkexn zepgleye zepgley ibeq itl","SIK0")
1*1*0*1*1*0*0
^W1REP("E","MLZT","QUERY","4. hxetn zepgleye zepgley ibeq itl","CT")
1*1*2*0*0*2*0
^W1REP("E","MLZT","QUERY","4. hxetn zepgleye zepgley ibeq itl","FLD0")
-**-*-*-*********
^W1REP("E","MLZT","QUERY","4. hxetn zepgleye zepgley ibeq itl","MIUN")
1*1*2*4*4*2*3
^W1REP("E","MLZT","QUERY","4. hxetn zepgleye zepgley ibeq itl","SIK0")
1*1*1*0*0*1*0
^W1REP("E","MLZT","QUERY","5.        fkexn zecnre mikix`z itl","CT")
1*2*2*0*0*0*0
^W1REP("E","MLZT","QUERY","5.        fkexn zecnre mikix`z itl","FLD0")
-*-**-*-**-*******
^W1REP("E","MLZT","QUERY","5.        fkexn zecnre mikix`z itl","MIUN")
1*2*1*4*3*2*3
^W1REP("E","MLZT","QUERY","5.        fkexn zecnre mikix`z itl","SIK0")
1*0*1*0*0*0*0
^W1REP("E","MLZT","QUERY","6.        hxetn zecnre mikix`z itl","CT")
1*2*1*0*0*2*0
^W1REP("E","MLZT","QUERY","6.        hxetn zecnre mikix`z itl","FLD0")
-*-**-*-*********
^W1REP("E","MLZT","QUERY","6.        hxetn zecnre mikix`z itl","MIUN")
1*2*1*4*3*2*3
^W1REP("E","MLZT","QUERY","6.        hxetn zecnre mikix`z itl","SIK0")
1*0*1*0*0*1*0
^W1REP("E","MLZT","QUERY","7.               fkexn mikix`z itl","CT")
1*2*0*0*0*0*0
^W1REP("E","MLZT","QUERY","7.               fkexn mikix`z itl","FLD0")
-*-*-*-*-**-*******
^W1REP("E","MLZT","QUERY","7.               fkexn mikix`z itl","MIUN")
1*2*3*4*3*1*2
^W1REP("E","MLZT","QUERY","7.               fkexn mikix`z itl","SIK0")
1*0*0*0*0*0*0
^W1REP("E","MLZT","QUERY","8.               hxetn mikix`z itl","CT")
1*2*0*0*0*2*0
^W1REP("E","MLZT","QUERY","8.               hxetn mikix`z itl","FLD0")
-*-*-*-*-*********
^W1REP("E","MLZT","QUERY","8.               hxetn mikix`z itl","MIUN")
1*2*3*4*3*1*2
^W1REP("E","MLZT","QUERY","8.               hxetn mikix`z itl","SIK0")
1*0*0*0*0*1*0
^W1REP("E","MLZT","SIK")
1*1*1*1*1*1*1*
^W1REP("E","MLZT","SIK0")
1*0*0*0*0*1*0
^W1REP("E","MLZT","US",-1)
D DATH^P1MLZT
^W1REP("E","MLZT","US",1)
D DATH^P1MLZT
^W1REP("E","MLZT","US",2)
D HZM^P1MLZT
^W1REP("E","MMPR")
zecrqn itl mihixt g"ec
^W1REP("E","MMPR",0,"DAT1")
jix`z;8D
^W1REP("E","MMPR",0,"DAT1","SH")
1
^W1REP("E","MMPR",0,"HZM")
dpnfd;9
^W1REP("E","MMPR",0,"HZM","SH")
1
^W1REP("E","MMPR",0,"MLZR")
xvln;9
^W1REP("E","MMPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("E","MMPR",0,"MLZR","OUT")
MLZR1
^W1REP("E","MMPR",0,"MLZR1")
xvln my;12H
^W1REP("E","MMPR",0,"MLZR1","SH")
0
^W1REP("E","MMPR",0,"MSD")
dcrqn;5
^W1REP("E","MMPR",0,"MSD","FILE")
^P1MSD
^W1REP("E","MMPR",0,"MSD","OUT")
MSD1
^W1REP("E","MMPR",0,"MSD1")
dcrqn my;12
^W1REP("E","MMPR",0,"MSD1","SH")
1
^W1REP("E","MMPR",0,"PAR")
hixt;8
^W1REP("E","MMPR",0,"PAR","FILE")
^PAR
^W1REP("E","MMPR",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","MMPR",0,"PAR","OUT")
PAR1
^W1REP("E","MMPR",0,"PAR1")
hixt xe`z;20H
^W1REP("E","MMPR",0,"PAR1","SH")
1
^W1REP("E","MMPR",0,"SUGP")
mihixt zveaw;9
^W1REP("E","MMPR",0,"SUGP","FILE")
^PARSUG
^W1REP("E","MMPR",0,"SUGP","OUT")
SUGP1
^W1REP("E","MMPR",0,"SUGP1")
dveaw xe`z;12H
^W1REP("E","MMPR",0,"SUGP1","SH")
0
^W1REP("E","MMPR",0,"x1")
zenk;5,0
^W1REP("E","MMPR",0,"x2")
hixtl dgpd;10,2
^W1REP("E","MMPR",0,"x3")
ehp mekq;10,2
^W1REP("E","MMPR",0,"x4")
;,
^W1REP("E","MMPR","COD")
MSD*MSD1*DAT1*HZM*PAR*PAR1*x1*x2*x3
^W1REP("E","MMPR","CT")
0*0*0*0*0*0*0
^W1REP("E","MMPR","FLD")
MSD*DAT1*HZM*PAR*x1*x2*x3
^W1REP("E","MMPR","FLD0")
***-*-***
^W1REP("E","MMPR","GLOB1")
^VRM(PRTN)
^W1REP("E","MMPR","GLOB2")
^VRM(PRTN,MSD,HZM,PAR)
^W1REP("E","MMPR","LPT")
S
^W1REP("E","MMPR","MIUN")
1*2*3*4*2*0*0
^W1REP("E","MMPR","QUERY","zecrqn itl fekix","CT")
0*0*0*0*0*0*0
^W1REP("E","MMPR","QUERY","zecrqn itl fekix","FLD0")
*-*-*-*-***
^W1REP("E","MMPR","QUERY","zecrqn itl fekix","MIUN")
1*2*3*4*2*0*0
^W1REP("E","MMPR","QUERY","zecrqn itl fekix","SIK0")
0*0*0*0*0*0*0
^W1REP("E","MMPR","QUERY","zecrqn itl mihixt zxikn","CT")
2*0*0*0*0*0*0
^W1REP("E","MMPR","QUERY","zecrqn itl mihixt zxikn","FLD0")
*-*-***-*
^W1REP("E","MMPR","QUERY","zecrqn itl mihixt zxikn","MIUN")
1*2*3*2*2*0*0
^W1REP("E","MMPR","QUERY","zecrqn itl mihixt zxikn","SIK0")
1*1*0*0*0*0*0
^W1REP("E","MMPR","QUERY","zepnfd itl g""ec","CT")
0*0*0*0*0*0*0
^W1REP("E","MMPR","QUERY","zepnfd itl g""ec","FLD0")
***-*-***
^W1REP("E","MMPR","QUERY","zepnfd itl g""ec","MIUN")
1*2*3*4*2*0*0
^W1REP("E","MMPR","QUERY","zepnfd itl g""ec","SIK0")
0*1*0*0*0*0*0
^W1REP("E","MMPR","SHP","KOD")
P1DMZPR
^W1REP("E","MMPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("E","MMPR","SIK")
1*1*1*
^W1REP("E","MMPR","SIK0")
0*1*0*0*0*0*0
^W1REP("E","MMPR","US",3)
D DAT^P1DMM
^W1REP("E","MMPR","US",4)
D PAR^P1DMM
^W1REP("E","MSHT")
melyz ibeq itl migily g"ec
^W1REP("E","MSHT",0,"HZM")
dpnfd;7
^W1REP("E","MSHT",0,"HZM","SH")
1
^W1REP("E","MSHT",0,"MLZ")
xvln 'qn;5
^W1REP("E","MSHT",0,"MLZ","FILE")
^NAME
^W1REP("E","MSHT",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^W1REP("E","MSHT",0,"MLZ","OUT")
MLZ1
^W1REP("E","MSHT",0,"MLZ1")
xvln my;12H
^W1REP("E","MSHT",0,"MLZ1","SH")
1
^W1REP("E","MSHT",0,"PSL")
gily 'qn;5
^W1REP("E","MSHT",0,"PSL","FILE")
^P1SL
^W1REP("E","MSHT",0,"PSL","OUT")
PSL1
^W1REP("E","MSHT",0,"PSL1")
gily my;12H
^W1REP("E","MSHT",0,"PSL1","SH")
1
^W1REP("E","MSHT",0,"TRH")
jix`z;8D
^W1REP("E","MSHT",0,"TRH","SH")
1
^W1REP("E","MSHT",0,"x1")
melyzl;8,2
^W1REP("E","MSHT",0,"x2")
onefn;8,2
^W1REP("E","MSHT",0,"x3")
wiy;8,2
^W1REP("E","MSHT",0,"x4")
`"k;8,2
^W1REP("E","MSHT",0,"x5")
dtwd;8,2
^W1REP("E","MSHT",0,"x6")
yelz;8,2
^W1REP("E","MSHT",0,"x7")
tih;7,2
^W1REP("E","MSHT",0,"x8")
;,
^W1REP("E","MSHT","COD")
PSL*PSL1*TRH*HZM*x1*x2*x3*x4*x5*x6
^W1REP("E","MSHT","CT")
0*2*0
^W1REP("E","MSHT","FLD")
PSL*TRH*HZM*x1*x2*x3*x4*x5*x6
^W1REP("E","MSHT","FLD0")
**-******
^W1REP("E","MSHT","GLOB1")
^P1H
^W1REP("E","MSHT","GLOB2")
^P1H(DATH,HZM)
^W1REP("E","MSHT","LPT")
B
^W1REP("E","MSHT","MIUN")
2*1*3
^W1REP("E","MSHT","QUERY","fkexn","CT")
0*2*0
^W1REP("E","MSHT","QUERY","fkexn","FLD0")
**-******
^W1REP("E","MSHT","QUERY","fkexn","MIUN")
2*1*3
^W1REP("E","MSHT","QUERY","fkexn","SIK0")
0*1*0
^W1REP("E","MSHT","QUERY","hxetn","CT")
1*0*0
^W1REP("E","MSHT","QUERY","hxetn","FLD0")

^W1REP("E","MSHT","QUERY","hxetn","MIUN")
1*2*3
^W1REP("E","MSHT","QUERY","hxetn","SIK0")
1*0*0
^W1REP("E","MSHT","SIK")
1*1*1*1*1*1*1*
^W1REP("E","MSHT","SIK0")
0*1*0
^W1REP("E","MSHT","US",-1)
D DATH^P1MSHT
^W1REP("E","MSHT","US",1)
D DATH^P1MSHT
^W1REP("E","MSHT","US",2)
D HZM^P1MSHT
^W1REP("E","MZP")
mihixt itl mixvln g"ec
^W1REP("E","MZP",0,"DAT")
jix`z;8D
^W1REP("E","MZP",0,"DAT","SH")
1
^W1REP("E","MZP",0,"HZM")
dpnfd;7
^W1REP("E","MZP",0,"HZM","SH")
1
^W1REP("E","MZP",0,"MLZ")
xvln 'qn;8
^W1REP("E","MZP",0,"MLZ","FILE")
^NAME
^W1REP("E","MZP",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^W1REP("E","MZP",0,"MLZ","OUT")
MLZ1
^W1REP("E","MZP",0,"MLZ1")
xvln my;16H
^W1REP("E","MZP",0,"MLZ1","SH")
1
^W1REP("E","MZP",0,"PAR")
hixt 'qn;8
^W1REP("E","MZP",0,"PAR","FILE")
^PAR
^W1REP("E","MZP",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","MZP",0,"PAR","OUT")
PAR1
^W1REP("E","MZP",0,"PAR1")
hixt xe`z;20H
^W1REP("E","MZP",0,"PAR1","SH")
1
^W1REP("E","MZP",0,"x1")
zenk;5,0
^W1REP("E","MZP",0,"x2")
mekq;8,2
^W1REP("E","MZP",0,"x3")
dgpd;7,2
^W1REP("E","MZP",0,"x4")
k"dq;8,2
^W1REP("E","MZP",0,"x5")
;,
^W1REP("E","MZP","COD")
MLZ*MLZ1*DAT*HZM*PAR*PAR1*x1*x2*x3*x4
^W1REP("E","MZP","CT")
1*2*0*0
^W1REP("E","MZP","FLD")
MLZ*DAT*HZM*PAR*x1*x2*x3*x4
^W1REP("E","MZP","FLD0")
**-*****
^W1REP("E","MZP","GLOB1")
^P1MLZ
^W1REP("E","MZP","GLOB2")
^P1MLZ(HZM,MLZ,PAR)
^W1REP("E","MZP","LPT")
B
^W1REP("E","MZP","MIUN")
1*2*3*3
^W1REP("E","MZP","QUERY","hxetn","CT")
1*2*0*0
^W1REP("E","MZP","QUERY","hxetn","FLD0")

^W1REP("E","MZP","QUERY","hxetn","MIUN")
1*2*3*4
^W1REP("E","MZP","QUERY","hxetn","SIK0")
1*0*1*0
^W1REP("E","MZP","QUERY","mihixt itl fkexn","CT")
1*2*0*0
^W1REP("E","MZP","QUERY","mihixt itl fkexn","FLD0")
**-*****
^W1REP("E","MZP","QUERY","mihixt itl fkexn","MIUN")
1*2*3*3
^W1REP("E","MZP","QUERY","mihixt itl fkexn","SIK0")
1*0*1*0
^W1REP("E","MZP","SIK")
1*1*1*1*
^W1REP("E","MZP","SIK0")
1*0*1*0
^W1REP("E","MZP","US",-1)
D DAT^P1MZP
^W1REP("E","MZP","US",1)
D DAT^P1MZP
^W1REP("E","MZP","US",3)
D PAR^P1MZP
^W1REP("E","MZPR")
mixvln itl mihixt g"ec
^W1REP("E","MZPR",0,"MLZR")
xvln;5.
^W1REP("E","MZPR",0,"MLZR","FILE")
^NAME
^W1REP("E","MZPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("E","MZPR",0,"MLZR","OUT")
MLZR1
^W1REP("E","MZPR",0,"MLZR1")
xvln my;12H
^W1REP("E","MZPR",0,"MLZR1","SH")
1
^W1REP("E","MZPR",0,"PAR")
hixt;8
^W1REP("E","MZPR",0,"PAR","FILE")
^PAR
^W1REP("E","MZPR",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","MZPR",0,"PAR","OUT")
PAR1
^W1REP("E","MZPR",0,"PAR1")
hixt xe`z;20H
^W1REP("E","MZPR",0,"PAR1","SH")
0
^W1REP("E","MZPR",0,"SUGP")
hixt beq;3
^W1REP("E","MZPR",0,"SUGP","FILE")
^PARSUG
^W1REP("E","MZPR",0,"SUGP","OUT")
SUGP1
^W1REP("E","MZPR",0,"SUGP1")
beq xe`z;10H
^W1REP("E","MZPR",0,"SUGP1","SH")
1
^W1REP("E","MZPR",0,"x1")
zenk;5,0
^W1REP("E","MZPR",0,"x2")
hixtl dgpd;10,2
^W1REP("E","MZPR",0,"x3")
ehp mekq;10,2
^W1REP("E","MZPR",0,"x4")
;,
^W1REP("E","MZPR","COD")
MLZR*MLZR1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3
^W1REP("E","MZPR","CT")
1*2*0*0*0*0*0
^W1REP("E","MZPR","FLD")
MLZR*SUGP*PAR*x1*x2*x3
^W1REP("E","MZPR","FLD0")
******
^W1REP("E","MZPR","GLOB1")
^VRM(PRTN)
^W1REP("E","MZPR","GLOB2")
^VRM(PRTN,MLZR,SUGP,PAR)
^W1REP("E","MZPR","LPT")
S
^W1REP("E","MZPR","MIUN")
1*2*3*4*2*0*0
^W1REP("E","MZPR","QUERY","mihixt itl mixvln","CT")
1*2*0*0*0*0*0
^W1REP("E","MZPR","QUERY","mihixt itl mixvln","FLD0")
******
^W1REP("E","MZPR","QUERY","mihixt itl mixvln","MIUN")
1*2*3*4*2*0*0
^W1REP("E","MZPR","QUERY","mihixt itl mixvln","SIK0")
1*0*0*0*0*0*0
^W1REP("E","MZPR","QUERY","mixvln itl mihixt","CT")
0*2*0*0*0*0*0
^W1REP("E","MZPR","QUERY","mixvln itl mihixt","FLD0")
*****
^W1REP("E","MZPR","QUERY","mixvln itl mihixt","MIUN")
3*1*2*4*2*0*0
^W1REP("E","MZPR","QUERY","mixvln itl mihixt","SIK0")
0*1*1*0*0*0*0
^W1REP("E","MZPR","SHP","KOD")
P1DMZPR
^W1REP("E","MZPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("E","MZPR","SIK")
1*1*1*
^W1REP("E","MZPR","SIK0")
1*0*0*0*0*0*0
^W1REP("E","MZPR","US",4)
D PAR^P1DMZPR
^W1REP("E","MZPS")
zerye mixvln itl mihixt g"ec
^W1REP("E","MZPS",0,"MLZR")
xvln;5.
^W1REP("E","MZPS",0,"MLZR","FILE")
^NAME
^W1REP("E","MZPS",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("E","MZPS",0,"MLZR","OUT")
MLZR1
^W1REP("E","MZPS",0,"MLZR1")
xvln my;12H
^W1REP("E","MZPS",0,"MLZR1","SH")
1
^W1REP("E","MZPS",0,"PAR")
hixt;8
^W1REP("E","MZPS",0,"PAR","FILE")
^PAR
^W1REP("E","MZPS",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","MZPS",0,"PAR","OUT")
PAR1
^W1REP("E","MZPS",0,"PAR1")
hixt xe`z;20H
^W1REP("E","MZPS",0,"PAR1","SH")
1
^W1REP("E","MZPS",0,"SHAA")
dry;5
^W1REP("E","MZPS",0,"SHAA","SH")
1
^W1REP("E","MZPS",0,"SHAA1")
dry;7
^W1REP("E","MZPS",0,"SHAA1","SH")
1
^W1REP("E","MZPS",0,"SUGP")
hixt beq;3
^W1REP("E","MZPS",0,"SUGP","FILE")
^PARSUG
^W1REP("E","MZPS",0,"SUGP","OUT")
SUGP1
^W1REP("E","MZPS",0,"SUGP1")
beq xe`z;10H
^W1REP("E","MZPS",0,"SUGP1","SH")
1
^W1REP("E","MZPS",0,"x1")
zenk;5,0
^W1REP("E","MZPS",0,"x2")
hixtl dgpd;10,2
^W1REP("E","MZPS",0,"x3")
ehp mekq;10,2
^W1REP("E","MZPS",0,"x4")
;,
^W1REP("E","MZPS","COD")
MLZR*MLZR1*SHAA1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3
^W1REP("E","MZPS","CT")
1*2*0*0*0*0*0
^W1REP("E","MZPS","FLD")
MLZR*SHAA1*SUGP*PAR*x1*x2*x3
^W1REP("E","MZPS","FLD0")
*-*****
^W1REP("E","MZPS","GLOB1")
^VRM(PRTN)
^W1REP("E","MZPS","GLOB2")
^VRM(PRTN,MLZR,SHAA,SUGP,PAR)
^W1REP("E","MZPS","LPT")
S
^W1REP("E","MZPS","MIUN")
1*2*2*3*2*0*0
^W1REP("E","MZPS","SHP","KOD")
P1DMZPRS
^W1REP("E","MZPS","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT,MAS(15)=MESHAA1,MAS(20)=ADSHAA1
^W1REP("E","MZPS","SIK")
1*1*1*
^W1REP("E","MZPS","SIK0")
1*1*0*0*0*0*0
^W1REP("E","MZPS","US",3)
D SHAA^P1DMZPRS
^W1REP("E","MZPS","US",5)
D PAR^P1DMZPRS
^W1REP("E","OTH")
OTH zepnfd g"ec
^W1REP("E","OTH",0,"HB")
zipeayg;8
^W1REP("E","OTH",0,"HZM")
dpnfd;5
^W1REP("E","OTH",0,"HZM","SH")
1
^W1REP("E","OTH",0,"LKH")
gewl 'qn;10
^W1REP("E","OTH",0,"LKH","FILE")
^LKH
^W1REP("E","OTH",0,"LKH","OUT")
LKH1
^W1REP("E","OTH",0,"LKH1")
gewl my;20H
^W1REP("E","OTH",0,"MKBL")
xvln 'qn;8
^W1REP("E","OTH",0,"MKBL","M2")
S MKBL1=$$^P1NAME(MKBL)
^W1REP("E","OTH",0,"MKBL","OUT")
MKBL1
^W1REP("E","OTH",0,"MKBL1")
xvln my;12H
^W1REP("E","OTH",0,"MKBL1","SH")
0
^W1REP("E","OTH",0,"MLZR")
xvln 'qn;5
^W1REP("E","OTH",0,"MLZR",2)
I MLZR S MLZR1=$G(^NAME(MLZR,1))
^W1REP("E","OTH",0,"MLZR","OUT")
MLZR1
^W1REP("E","OTH",0,"MLZR1")
xvln my;12H
^W1REP("E","OTH",0,"MLZR1","SH")
1
^W1REP("E","OTH",0,"NAME")
gewl my;12H
^W1REP("E","OTH",0,"NAME","SH")
1
^W1REP("E","OTH",0,"NCAB")
zipeayg;6
^W1REP("E","OTH",0,"NCAB","SH")
0
^W1REP("E","OTH",0,"NMB")
ogley;5
^W1REP("E","OTH",0,"NMB","SH")
1
^W1REP("E","OTH",0,"PSL")
gily cew;3
^W1REP("E","OTH",0,"PSL","FILE")
^P1SL
^W1REP("E","OTH",0,"PSL","OUT")
PSL1
^W1REP("E","OTH",0,"PSL1")
gily my;10H
^W1REP("E","OTH",0,"PSL1","SH")
1
^W1REP("E","OTH",0,"SHAA")
dry;5
^W1REP("E","OTH",0,"SHAA","SH")
1
^W1REP("E","OTH",0,"SL")
gily cew;5
^W1REP("E","OTH",0,"SL","FILE")
^P1SL
^W1REP("E","OTH",0,"SL","OUT")
SL1
^W1REP("E","OTH",0,"SL1")
gily my;12H
^W1REP("E","OTH",0,"SUGT")
melyz beq;9
^W1REP("E","OTH",0,"SUGT","SH")
1
^W1REP("E","OTH",0,"TRH")
jix`z;8D
^W1REP("E","OTH",0,"TRH","SH")
1
^W1REP("E","OTH",0,"TS")
melyzl;8
^W1REP("E","OTH",0,"TSHL")
melyzl;8
^W1REP("E","OTH",0,"TSHL","OUT")
TSHL
^W1REP("E","OTH",0,"x1")
dgpd iptl;9,2
^W1REP("E","OTH",0,"x2")
dgpd;9,2
^W1REP("E","OTH",0,"x3")
dgpd ixg`;9,2
^W1REP("E","OTH",0,"x4")
;,
^W1REP("E","OTH","COD")
NMB*MKBL*MKBL1*TRH*SHAA*HZM*x1*x2*x3
^W1REP("E","OTH","CT")
0*0*0*0*0*0*0
^W1REP("E","OTH","FLD")
NMB*MKBL*TRH*SHAA*HZM*x1*x2*x3
^W1REP("E","OTH","FLD0")
**-*-****
^W1REP("E","OTH","GLOB1")
^P1H
^W1REP("E","OTH","GLOB2")
^P1H(DATH,HZM)
^W1REP("E","OTH","LPT")
S
^W1REP("E","OTH","MIUN")
1*2*3*4*3*6*0
^W1REP("E","OTH","SIK")
1*1*1*
^W1REP("E","OTH","SIK0")
1*1*0*0*0*0*0
^W1REP("E","OTH","US",0)
D HZM^P1OTH
^W1REP("E","OTH","US",1)
D TRH^P1OTH
^W1REP("E","OTH","US",2)
D HZM^P1OTH
^W1REP("E","P1Z")
Z fekix
^W1REP("E","P1Z",0,"TRH")
jix`z;8D
^W1REP("E","P1Z",0,"TRH","SH")
0
^W1REP("E","P1Z",0,"x1")
onefn;8,2
^W1REP("E","P1Z",0,"x10")
dtwd;8,2
^W1REP("E","P1Z",0,"x11")
n"rn;8,2
^W1REP("E","P1Z",0,"x12")
;,
^W1REP("E","P1Z",0,"x2")
wiy;8,2
^W1REP("E","P1Z",0,"x3")
hxk`xyi;8,2
^W1REP("E","P1Z",0,"x4")
dfie;8,2
^W1REP("E","P1Z",0,"x5")
qxpiic;8,2
^W1REP("E","P1Z",0,"x6")
AM.EX.;8,2
^W1REP("E","P1Z",0,"x7")
`"k k"dq;8,2
^W1REP("E","P1Z",0,"x8")
tih;8,2
^W1REP("E","P1Z",0,"x9")
oeict k"dq;10,2
^W1REP("E","P1Z","COD")
TRH*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11
^W1REP("E","P1Z","CT")

^W1REP("E","P1Z","FLD")
TRH*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11
^W1REP("E","P1Z","FLD0")
*******-**-**-
^W1REP("E","P1Z","GLOB1")
^TEMP($P)
^W1REP("E","P1Z","GLOB2")
^TEMP($P,I)
^W1REP("E","P1Z","LPT")
B
^W1REP("E","P1Z","MIUN")
1
^W1REP("E","P1Z","SIK")
1*1*1*1*1*1*1*1*1*1*1*
^W1REP("E","P1Z","SIK0")

^W1REP("E","P1Z","US",2)
D Z^P1Z
^W1REP("E","PAR")
mihixt gec
^W1REP("E","PAR",0,"DAT")
jix`z;8D
^W1REP("E","PAR",0,"PAR")
hixt cew;4
^W1REP("E","PAR",0,"PAR",2)
S PAR1=$P($G(^PAR(PAR)),"**")
^W1REP("E","PAR",0,"PAR","OUT")
PAR1
^W1REP("E","PAR",0,"PAR1")
hixt xe`z;20H
^W1REP("E","PAR",0,"x1")
zenk;6,0
^W1REP("E","PAR",0,"x2")
mekq;8,2
^W1REP("E","PAR",0,"x3")
xign;7,2
^W1REP("E","PAR",0,"x4")
;,
^W1REP("E","PAR","COD")
DAT*PAR*PAR1*x1*x2*x3
^W1REP("E","PAR","CT")
0*0
^W1REP("E","PAR","FLD")
DAT*PAR*x1*x2*x3
^W1REP("E","PAR","GLOB1")
^PLUTOT
^W1REP("E","PAR","GLOB2")
^PLUTOT(DAT,MRK,PAR)
^W1REP("E","PAR","LPT")
B
^W1REP("E","PAR","MIUN")
2*1
^W1REP("E","PAR","SHP","KOD")
PAR
^W1REP("E","PAR","SIK")
1*1*0*
^W1REP("E","PAR","SIK0")
1*1
^W1REP("E","PAR","US",-1)
B  S x1=$P(@GLOB,"*"),x2=$P(@GLOB,"*",2),x3=$P(@GLOB,"*",3)
^W1REP("E","PAR","US",3)
D PAR^P1DP
^W1REP("E","PARK")
zeveaw itl mihixt zxikn gec
^W1REP("E","PARK",0,"PAR")
hixt;8
^W1REP("E","PARK",0,"PAR","FILE")
^PAR
^W1REP("E","PARK",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","PARK",0,"PAR","OUT")
PAR1
^W1REP("E","PARK",0,"PAR1")
hixt xe`z;20H
^W1REP("E","PARK",0,"PAR1","SH")
1
^W1REP("E","PARK",0,"SUGP")
dveaw;5
^W1REP("E","PARK",0,"SUGP","FILE")
^PARSUG
^W1REP("E","PARK",0,"SUGP","OUT")
SUGP1
^W1REP("E","PARK",0,"SUGP1")
dveaw xe`z;14H
^W1REP("E","PARK",0,"SUGP1","SH")
1
^W1REP("E","PARK",0,"TRH")
jix`z;8D
^W1REP("E","PARK",0,"TRH","SH")
1
^W1REP("E","PARK",0,"x1")
zenk;5,0
^W1REP("E","PARK",0,"x2")
oexg` xign;7,2
^W1REP("E","PARK",0,"x3")
mekq;8,2
^W1REP("E","PARK",0,"x4")
dgpd;7,2
^W1REP("E","PARK",0,"x5")
k"dq;9,2
^W1REP("E","PARK",0,"x6")
;,
^W1REP("E","PARK","COD")
SUGP*SUGP1*PAR*PAR1*TRH*x1*x2*x3*x4*x5
^W1REP("E","PARK","CT")
2*0
^W1REP("E","PARK","FLD")
SUGP*PAR*TRH*x1*x2*x3*x4*x5
^W1REP("E","PARK","FLD0")
**-*****
^W1REP("E","PARK","GLOB1")
^PLUTOT
^W1REP("E","PARK","GLOB2")
^PLUTOT(DAT,MRK,PAR)
^W1REP("E","PARK","LPT")
B
^W1REP("E","PARK","MIUN")
1*2
^W1REP("E","PARK","SIK")
1**1*1*1*
^W1REP("E","PARK","SIK0")
1*0
^W1REP("E","PARK","US",-1)
D DAT^P1DPARK
^W1REP("E","PARK","US",1)
D DAT^P1DPARK
^W1REP("E","PARK","US",3)
D PAR^P1DPARK
^W1REP("E","PARS")
zery itl mihixt g"ec
^W1REP("E","PARS",0,"DAT")
;0
^W1REP("E","PARS",0,"DAT","SH")
1
^W1REP("E","PARS",0,"DEP")
dwlgn;5
^W1REP("E","PARS",0,"DEP","FILE")
^DEP
^W1REP("E","PARS",0,"DEP","OUT")
DEP1
^W1REP("E","PARS",0,"DEP","SET")
0
^W1REP("E","PARS",0,"DEP1")
dwlgn my;12H
^W1REP("E","PARS",0,"DEP1","SET")
0
^W1REP("E","PARS",0,"DEP1","SH")
1
^W1REP("E","PARS",0,"PAR")
hixt;8
^W1REP("E","PARS",0,"PAR","FILE")
^PAR
^W1REP("E","PARS",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","PARS",0,"PAR","OUT")
PAR1
^W1REP("E","PARS",0,"PAR","SET")
1
^W1REP("E","PARS",0,"PAR1")
hixt xe`z;20H
^W1REP("E","PARS",0,"PAR1","SET")
0
^W1REP("E","PARS",0,"PAR1","SH")
0
^W1REP("E","PARS",0,"SHAA")
dry;5
^W1REP("E","PARS",0,"SHAA","SH")
1
^W1REP("E","PARS",0,"SHAA1")
dry;6
^W1REP("E","PARS",0,"SHAA1","SET")
0
^W1REP("E","PARS",0,"SHAA1","SH")
1
^W1REP("E","PARS",0,"SUGP")
dveaw;5
^W1REP("E","PARS",0,"SUGP","FILE")
^PARSUG
^W1REP("E","PARS",0,"SUGP","OUT")
SUGP1
^W1REP("E","PARS",0,"SUGP","SET")
0
^W1REP("E","PARS",0,"SUGP1")
dveaw xe`z;11H
^W1REP("E","PARS",0,"SUGP1","SET")
0
^W1REP("E","PARS",0,"SUGP1","SH")
1
^W1REP("E","PARS",0,"TRH")
jix`z;8D
^W1REP("E","PARS",0,"TRH","SET")
0
^W1REP("E","PARS",0,"TRH","SH")
1
^W1REP("E","PARS",0,"x1")
zenk;6,0
^W1REP("E","PARS",0,"x2")
mekq;9,2
^W1REP("E","PARS",0,"x3")
dgpd;8,2
^W1REP("E","PARS",0,"x4")
k"dq;9,2
^W1REP("E","PARS",0,"x5")
;,
^W1REP("E","PARS","COD")
DEP*DEP1*SHAA1*TRH*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4
^W1REP("E","PARS","CT")
2*2*2*2*0
^W1REP("E","PARS","FLD")
DEP*SHAA1*TRH*SUGP*PAR*x1*x2*x3*x4
^W1REP("E","PARS","FLD0")
**-******
^W1REP("E","PARS","GLOB1")
^PLUTOT
^W1REP("E","PARS","GLOB2")
^PLUTOT(DAT,MRK,PAR,SHAA)
^W1REP("E","PARS","LPT")
B
^W1REP("E","PARS","MIUN")
2*1*2*3*4
^W1REP("E","PARS","QUERY",".mihixte zery itl hxetn","CT")
2*2*2*2*0
^W1REP("E","PARS","QUERY",".mihixte zery itl hxetn","FLD0")
**-******
^W1REP("E","PARS","QUERY",".mihixte zery itl hxetn","MIUN")
2*1*2*3*4
^W1REP("E","PARS","QUERY",".mihixte zery itl hxetn","SIK0")
1*1*1*1*0
^W1REP("E","PARS","QUERY",".zerye mihixt itl hxetn","CT")
1*1*2*2*0
^W1REP("E","PARS","QUERY",".zerye mihixt itl hxetn","FLD0")
**-******
^W1REP("E","PARS","QUERY",".zerye mihixt itl hxetn","MIUN")
1*2*2*3*4
^W1REP("E","PARS","QUERY",".zerye mihixt itl hxetn","SIK0")
1*1*1*1*0
^W1REP("E","PARS","QUERY","fkexn","CT")
1*0*2*2*0
^W1REP("E","PARS","QUERY","fkexn","FLD0")
-**-*-*-*-***
^W1REP("E","PARS","QUERY","fkexn","MIUN")
1*1*1*2*3
^W1REP("E","PARS","QUERY","fkexn","SIK0")
1*0*1*1*0
^W1REP("E","PARS","QUERY","fkexn mihixt itl g""ec","CT")
1*0*2*2*0
^W1REP("E","PARS","QUERY","fkexn mihixt itl g""ec","FLD0")
*-*-******
^W1REP("E","PARS","QUERY","fkexn mihixt itl g""ec","MIUN")
1*2*1*2*3
^W1REP("E","PARS","QUERY","fkexn mihixt itl g""ec","SIK0")
1*0*1*1*0
^W1REP("E","PARS","QUERY","mikix`z itl hxetn","CT")
1*1*2*2*0
^W1REP("E","PARS","QUERY","mikix`z itl hxetn","FLD0")
*******
^W1REP("E","PARS","QUERY","mikix`z itl hxetn","MIUN")
1*2*3*4*5
^W1REP("E","PARS","QUERY","mikix`z itl hxetn","SIK0")
1*1*1*1*0
^W1REP("E","PARS","SHP","KOD")
PARS
^W1REP("E","PARS","SHP","PROG")
S MAS(5)=$$^%L1DC(METRH,1),MAS(10)=$$^%L1DC(ADTRH,1),MAS(15)=MESHAA1#24,MAS(20)=$S(ADSHAA1<40:ADSHAA1#24,1:ADSHAA1)
^W1REP("E","PARS","SIK")
1*1*1*1*
^W1REP("E","PARS","SIK0")
1*1*1*1*0
^W1REP("E","PARS","US",-1)
D DAT^P1DPARS
^W1REP("E","PARS","US",1)
D DAT^P1DPARS
^W1REP("E","PARS","US",3)
D PAR^P1DPARS
^W1REP("E","PARS","US",4)
D SHAA^P1DPARS
^W1REP("E","PRER")
mihixt jxr g"ec
^W1REP("E","PRER",0,"DEP")
dwlgn;5
^W1REP("E","PRER",0,"DEP","FILE")
^DEP
^W1REP("E","PRER",0,"DEP","OUT")
DEP1
^W1REP("E","PRER",0,"DEP","SET")
0
^W1REP("E","PRER",0,"DEP1")
dwlgn my;15H
^W1REP("E","PRER",0,"DEP1","SET")
0
^W1REP("E","PRER",0,"DEP1","SH")
1
^W1REP("E","PRER",0,"HB")
zipeayg;8
^W1REP("E","PRER",0,"HZM")
dpnfd;7
^W1REP("E","PRER",0,"HZM","SET")
1
^W1REP("E","PRER",0,"HZM","SH")
1
^W1REP("E","PRER",0,"LKH")
gewl 'qn;10
^W1REP("E","PRER",0,"LKH","FILE")
^LKH
^W1REP("E","PRER",0,"LKH","OUT")
LKH1
^W1REP("E","PRER",0,"LKH1")
gewl my;20H
^W1REP("E","PRER",0,"MRK")
sipq;4
^W1REP("E","PRER",0,"MRK","FILE")
^["MLY"]YZRN
^W1REP("E","PRER",0,"MRK","OUT")
MRK1
^W1REP("E","PRER",0,"MRK1")
sipq my;15H
^W1REP("E","PRER",0,"MRK1","SH")
1
^W1REP("E","PRER",0,"NAME")
gewl my;12H
^W1REP("E","PRER",0,"NAME","SH")
1
^W1REP("E","PRER",0,"NCAB")
zipeayg;6
^W1REP("E","PRER",0,"NCAB","SH")
0
^W1REP("E","PRER",0,"NMB")
gewl xtqn;10
^W1REP("E","PRER",0,"NMB","FILE")
^LKH
^W1REP("E","PRER",0,"NMB","OUT")
NAME
^W1REP("E","PRER",0,"PAR")
hixt 'qn;8
^W1REP("E","PRER",0,"PAR","FILE")
^PAR
^W1REP("E","PRER",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","PRER",0,"PAR","OUT")
PAR1
^W1REP("E","PRER",0,"PAR","SET")
1
^W1REP("E","PRER",0,"PAR1")
hixt xe`z;16H
^W1REP("E","PRER",0,"PAR1","SET")
0
^W1REP("E","PRER",0,"PAR1","SH")
1
^W1REP("E","PRER",0,"PSL")
gily cew;3
^W1REP("E","PRER",0,"PSL","FILE")
^P1SL
^W1REP("E","PRER",0,"PSL","OUT")
PSL1
^W1REP("E","PRER",0,"PSL1")
gily my;10H
^W1REP("E","PRER",0,"PSL1","SH")
1
^W1REP("E","PRER",0,"SHAA")
dryl;7
^W1REP("E","PRER",0,"SHAA","SH")
1
^W1REP("E","PRER",0,"SHL")
ogley;3
^W1REP("E","PRER",0,"SHL","SET")
1
^W1REP("E","PRER",0,"SHL","SH")
1
^W1REP("E","PRER",0,"SL")
gily cew;5
^W1REP("E","PRER",0,"SL","FILE")
^P1SL
^W1REP("E","PRER",0,"SL","OUT")
SL1
^W1REP("E","PRER",0,"SL1")
gily my;12H
^W1REP("E","PRER",0,"SUGL")
gewl beq;8
^W1REP("E","PRER",0,"SUGL","FILE")
^SUGL
^W1REP("E","PRER",0,"SUGL","OUT")
SUGL1
^W1REP("E","PRER",0,"SUGL1")
gewl beq xe`z;15H
^W1REP("E","PRER",0,"SUGL1","SH")
1
^W1REP("E","PRER",0,"SUGP")
mihixt zveaw;12
^W1REP("E","PRER",0,"SUGP","FILE")
^PARSUG
^W1REP("E","PRER",0,"SUGP","OUT")
SUGP1
^W1REP("E","PRER",0,"SUGP","SET")
0
^W1REP("E","PRER",0,"SUGP1")
mihixt zveaw my;15H
^W1REP("E","PRER",0,"SUGP1","SET")
0
^W1REP("E","PRER",0,"SUGP1","SH")
1
^W1REP("E","PRER",0,"SUGS")
ogley beq;5
^W1REP("E","PRER",0,"SUGS","FILE")
^SUGS
^W1REP("E","PRER",0,"SUGS","OUT")
SUGS1
^W1REP("E","PRER",0,"SUGS","SET")
0
^W1REP("E","PRER",0,"SUGS1")
'ley beq xe`z;12
^W1REP("E","PRER",0,"SUGS1","OUT")
1
^W1REP("E","PRER",0,"SUGS1","SET")
0
^W1REP("E","PRER",0,"SUGT")
melyz beq;5
^W1REP("E","PRER",0,"SUGT","SH")
1
^W1REP("E","PRER",0,"TRH")
jix`z;8D
^W1REP("E","PRER",0,"TRH","M2")
S TRH=$ZD(DT,3)
^W1REP("E","PRER",0,"TRH","SET")
0
^W1REP("E","PRER",0,"TRH","SH")
1
^W1REP("E","PRER",0,"TRH1")
YYYYMMDD;8
^W1REP("E","PRER",0,"TRH1","SH")
1
^W1REP("E","PRER",0,"TS")
melyzl;8
^W1REP("E","PRER",0,"TSHL")
melyzl;8
^W1REP("E","PRER",0,"TSHL","OUT")
TSHL
^W1REP("E","PRER",0,"x1")
zenk;4,0
^W1REP("E","PRER",0,"x2")
mekq;8,2
^W1REP("E","PRER",0,"x3")
`ln xign;8,2
^W1REP("E","PRER",0,"x4")
yxtd;8,2
^W1REP("E","PRER",0,"x5")
;,
^W1REP("E","PRER","COD")
TRH*SUGS*SUGS1*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*HZM*x1*x2*x3*x4
^W1REP("E","PRER","CT")
1*1*1*2*0*0*1*2*0*0
^W1REP("E","PRER","FLD")
TRH*SUGS*DEP*SUGP*PAR*HZM*x1*x2*x3*x4
^W1REP("E","PRER","FLD0")
*******
^W1REP("E","PRER","GLOB1")
^VRM($J)
^W1REP("E","PRER","GLOB2")
^VRM($J,DT,HZM,PAR)
^W1REP("E","PRER","LPT")
B
^W1REP("E","PRER","MIUN")
1*2*3*4*5*6*3*4*8*5
^W1REP("E","PRER","MIUN","PROG")
TRH^P1PRER
^W1REP("E","PRER","QUERY","fkexn iztewz zewlgne ogley ibeq itl","CT")
0*1*1*2*0*0*1*2*0*0
^W1REP("E","PRER","QUERY","fkexn iztewz zewlgne ogley ibeq itl","FLD0")
*****-**
^W1REP("E","PRER","QUERY","fkexn iztewz zewlgne ogley ibeq itl","MIUN")
5*1*2*3*4*6*3*4*8*5
^W1REP("E","PRER","QUERY","fkexn iztewz zewlgne ogley ibeq itl","SIK0")
0*1*1*1*0*0*0*0*0*0
^W1REP("E","PRER","QUERY","fkexn mihixt zeveawe zewlgn itl","CT")
0*0*1*2*0*0*1*2*0*0
^W1REP("E","PRER","QUERY","fkexn mihixt zeveawe zewlgn itl","FLD0")
*-****-**
^W1REP("E","PRER","QUERY","fkexn mihixt zeveawe zewlgn itl","MIUN")
4*4*1*2*3*5*2*3*5*6
^W1REP("E","PRER","QUERY","fkexn mihixt zeveawe zewlgn itl","SIK0")
0*1*1*1*0*0*1*1*1*0
^W1REP("E","PRER","QUERY","fkexn zewlgne ogley ibeq , mikix`z itl","CT")
1*1*1*2*0*0*1*2*0*0
^W1REP("E","PRER","QUERY","fkexn zewlgne ogley ibeq , mikix`z itl","FLD0")
*****-**
^W1REP("E","PRER","QUERY","fkexn zewlgne ogley ibeq , mikix`z itl","MIUN")
1*2*3*4*5*6*3*4*8*5
^W1REP("E","PRER","QUERY","fkexn zewlgne ogley ibeq , mikix`z itl","SIK0")
1*1*1*1*0*0*0*0*0*0
^W1REP("E","PRER","QUERY","hxetn iztewz zewlgne ogley ibeq itl","CT")
0*1*1*2*0*0*1*2*0*0
^W1REP("E","PRER","QUERY","hxetn iztewz zewlgne ogley ibeq itl","FLD0")
*******
^W1REP("E","PRER","QUERY","hxetn iztewz zewlgne ogley ibeq itl","MIUN")
5*1*2*3*4*6*3*4*8*5
^W1REP("E","PRER","QUERY","hxetn iztewz zewlgne ogley ibeq itl","SIK0")
0*1*1*1*0*0*0*0*0*0
^W1REP("E","PRER","QUERY","hxetn mihixt zeveawe zewlgn itl","CT")
0*0*1*2*0*0*1*2*0*0
^W1REP("E","PRER","QUERY","hxetn mihixt zeveawe zewlgn itl","FLD0")
*-******
^W1REP("E","PRER","QUERY","hxetn mihixt zeveawe zewlgn itl","MIUN")
4*4*1*2*3*5*2*3*5*6
^W1REP("E","PRER","QUERY","hxetn mihixt zeveawe zewlgn itl","SIK0")
0*1*1*1*0*0*1*1*1*0
^W1REP("E","PRER","QUERY","hxetn zewlgne ogley ibeq , mikix`z itl","CT")
1*1*1*2*0*0*1*2*0*0
^W1REP("E","PRER","QUERY","hxetn zewlgne ogley ibeq , mikix`z itl","FLD0")
*******
^W1REP("E","PRER","QUERY","hxetn zewlgne ogley ibeq , mikix`z itl","MIUN")
1*2*3*4*5*6*3*4*8*5
^W1REP("E","PRER","QUERY","hxetn zewlgne ogley ibeq , mikix`z itl","SIK0")
1*1*1*1*0*0*0*0*0*0
^W1REP("E","PRER","SIK")
1*1**1*
^W1REP("E","PRER","SIK0")
1*1*1*1*0*0*0*0*0*0
^W1REP("E","PRER","US",2)
D DT^P1PRER
^W1REP("E","PRER","US",3)
D HZM1^P1PRER
^W1REP("E","PRER","US",4)
D PAR^P1PRER
^W1REP("E","PRER","US",5)
D PAR^P1PRBT
^W1REP("E","PRER","US",6)
D PAR^P1PRPP
^W1REP("E","PRHZ")
zepnfd itl mihixt zxikn g"ec 
^W1REP("E","PRHZ",0,"HB")
zipeayg;8
^W1REP("E","PRHZ",0,"HZM")
dpnfd;7
^W1REP("E","PRHZ",0,"HZM","SET")
1
^W1REP("E","PRHZ",0,"HZM","SH")
1
^W1REP("E","PRHZ",0,"LKH")
gewl 'qn;10
^W1REP("E","PRHZ",0,"LKH","FILE")
^LKH
^W1REP("E","PRHZ",0,"LKH","OUT")
LKH1
^W1REP("E","PRHZ",0,"LKH1")
gewl my;20H
^W1REP("E","PRHZ",0,"LKHN")
gewl 'qn;11
^W1REP("E","PRHZ",0,"LKHN","FILE")
^LKH
^W1REP("E","PRHZ",0,"LKHN","OUT")
LKHN1
^W1REP("E","PRHZ",0,"LKHN","SET")
1
^W1REP("E","PRHZ",0,"LKHN1")
gewl my;14H
^W1REP("E","PRHZ",0,"LKHN1","SET")
0
^W1REP("E","PRHZ",0,"LKHN1","SH")
1
^W1REP("E","PRHZ",0,"NAME")
gewl my;12H
^W1REP("E","PRHZ",0,"NAME","SH")
1
^W1REP("E","PRHZ",0,"NCAB")
zipeayg;6
^W1REP("E","PRHZ",0,"NCAB","SH")
0
^W1REP("E","PRHZ",0,"NMB")
gewl xtqn;10
^W1REP("E","PRHZ",0,"NMB","FILE")
^LKH
^W1REP("E","PRHZ",0,"NMB","OUT")
NAME
^W1REP("E","PRHZ",0,"PAR")
hixt 'qn;8
^W1REP("E","PRHZ",0,"PAR","FILE")
^PAR
^W1REP("E","PRHZ",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","PRHZ",0,"PAR","OUT")
PAR1
^W1REP("E","PRHZ",0,"PAR","SET")
1
^W1REP("E","PRHZ",0,"PAR1")
hixt xe`z;16H
^W1REP("E","PRHZ",0,"PAR1","SET")
0
^W1REP("E","PRHZ",0,"PAR1","SH")
1
^W1REP("E","PRHZ",0,"PSL")
gily cew;3
^W1REP("E","PRHZ",0,"PSL","FILE")
^P1SL
^W1REP("E","PRHZ",0,"PSL","OUT")
PSL1
^W1REP("E","PRHZ",0,"PSL1")
gily my;10H
^W1REP("E","PRHZ",0,"PSL1","SH")
1
^W1REP("E","PRHZ",0,"SHAA")
dryl;7
^W1REP("E","PRHZ",0,"SHAA","SET")
1
^W1REP("E","PRHZ",0,"SHAA","SH")
1
^W1REP("E","PRHZ",0,"SL")
gily cew;5
^W1REP("E","PRHZ",0,"SL","FILE")
^P1SL
^W1REP("E","PRHZ",0,"SL","OUT")
SL1
^W1REP("E","PRHZ",0,"SL1")
gily my;12H
^W1REP("E","PRHZ",0,"SUGL")
zegewl zveaw;8
^W1REP("E","PRHZ",0,"SUGL","FILE")
^SUGL
^W1REP("E","PRHZ",0,"SUGL","OUT")
SUGL1
^W1REP("E","PRHZ",0,"SUGL","SET")
1
^W1REP("E","PRHZ",0,"SUGL1")
dveaw my;12H
^W1REP("E","PRHZ",0,"SUGL1","SET")
0
^W1REP("E","PRHZ",0,"SUGL1","SH")
1
^W1REP("E","PRHZ",0,"SUGT")
melyz beq;5
^W1REP("E","PRHZ",0,"SUGT","SH")
1
^W1REP("E","PRHZ",0,"TRH")
jix`z;8D
^W1REP("E","PRHZ",0,"TRH","M2")
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("E","PRHZ",0,"TRH","SET")
0
^W1REP("E","PRHZ",0,"TRH","SH")
1
^W1REP("E","PRHZ",0,"TS")
melyzl;8
^W1REP("E","PRHZ",0,"TSHL")
melyzl;8
^W1REP("E","PRHZ",0,"TSHL","OUT")
TSHL
^W1REP("E","PRHZ",0,"x1")
zenk;4,0
^W1REP("E","PRHZ",0,"x2")
mekq;8,2
^W1REP("E","PRHZ",0,"x3")
hixtl dgpd;8,2
^W1REP("E","PRHZ",0,"x4")
dgpd ixg`;8,2
^W1REP("E","PRHZ",0,"x5")
;,
^W1REP("E","PRHZ","COD")
TRH*SHAA*SUGL*SUGL1*LKHN*LKHN1*HZM*PAR*PAR1*x1*x2*x3*x4
^W1REP("E","PRHZ","CT")
0*0*0*0*0*2
^W1REP("E","PRHZ","FLD")
TRH*SHAA*SUGL*LKHN*HZM*PAR*x1*x2*x3*x4
^W1REP("E","PRHZ","FLD0")
**-*-******
^W1REP("E","PRHZ","GLOB1")
^VRM($J)
^W1REP("E","PRHZ","GLOB2")
^VRM($J,DT,SHAA,SUGL,LKHN,HZM,PAR)
^W1REP("E","PRHZ","LPT")
B
^W1REP("E","PRHZ","MIUN")
3*4*3*1*2*1
^W1REP("E","PRHZ","MIUN","PROG")
TRH^P1PRHZ
^W1REP("E","PRHZ","QUERY","(mihixt itl oein) hxetn","CT")
0*0*0*0*2*0
^W1REP("E","PRHZ","QUERY","(mihixt itl oein) hxetn","FLD0")
**-*-****
^W1REP("E","PRHZ","QUERY","(mihixt itl oein) hxetn","MIUN")
3*4*3*2*1*2
^W1REP("E","PRHZ","QUERY","(mihixt itl oein) hxetn","SIK0")
0*0*0*0*1*0
^W1REP("E","PRHZ","QUERY","(mikix`z itl oein) hxetn","CT")
2*0*0*0*0*0
^W1REP("E","PRHZ","QUERY","(mikix`z itl oein) hxetn","FLD0")
*-*-*-******
^W1REP("E","PRHZ","QUERY","(mikix`z itl oein) hxetn","MIUN")
1*3*1*3*2*4
^W1REP("E","PRHZ","QUERY","(mikix`z itl oein) hxetn","SIK0")
1*0*0*0*0*0
^W1REP("E","PRHZ","QUERY","(zepnfd itl oein) hxetn","CT")
0*0*0*0*0*2
^W1REP("E","PRHZ","QUERY","(zepnfd itl oein) hxetn","FLD0")
**-*-******
^W1REP("E","PRHZ","QUERY","(zepnfd itl oein) hxetn","MIUN")
3*4*3*1*2*1
^W1REP("E","PRHZ","QUERY","(zepnfd itl oein) hxetn","SIK0")
0*0*0*1*0*1
^W1REP("E","PRHZ","SHP","KOD")
P1HZH
^W1REP("E","PRHZ","SHP","PROG")
S MAS(5)="zepnfd itl mihixt g""ec"
^W1REP("E","PRHZ","SIK")
1*1*1*1*
^W1REP("E","PRHZ","SIK0")
0*0*0*1*0*1
^W1REP("E","PRHZ","US",2)
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("E","PRHZ","US",7)
D PAR^P1PRHZ
^W1REP("E","PROT")
OTH ihixt zexikn g"ec
^W1REP("E","PROT",0,"HB")
zipeayg;8
^W1REP("E","PROT",0,"HZM")
dpnfd;7
^W1REP("E","PROT",0,"HZM","SH")
1
^W1REP("E","PROT",0,"LKH")
gewl 'qn;10
^W1REP("E","PROT",0,"LKH","FILE")
^LKH
^W1REP("E","PROT",0,"LKH","OUT")
LKH1
^W1REP("E","PROT",0,"LKH1")
gewl my;20H
^W1REP("E","PROT",0,"LKHN")
gewl 'qn;11
^W1REP("E","PROT",0,"LKHN","FILE")
^LKH
^W1REP("E","PROT",0,"LKHN","OUT")
LKHN1
^W1REP("E","PROT",0,"LKHN1")
gewl my;14H
^W1REP("E","PROT",0,"LKHN1","SH")
1
^W1REP("E","PROT",0,"NAME")
gewl my;12H
^W1REP("E","PROT",0,"NAME","SH")
1
^W1REP("E","PROT",0,"NCAB")
zipeayg;6
^W1REP("E","PROT",0,"NCAB","SH")
0
^W1REP("E","PROT",0,"NMB")
gewl xtqn;10
^W1REP("E","PROT",0,"NMB","FILE")
^LKH
^W1REP("E","PROT",0,"NMB","OUT")
NAME
^W1REP("E","PROT",0,"PAR")
hixt 'qn;8
^W1REP("E","PROT",0,"PAR","FILE")
^PAR
^W1REP("E","PROT",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","PROT",0,"PAR","OUT")
PAR1
^W1REP("E","PROT",0,"PAR1")
hixt xe`z;16H
^W1REP("E","PROT",0,"PAR1","SH")
1
^W1REP("E","PROT",0,"PSL")
gily cew;3
^W1REP("E","PROT",0,"PSL","FILE")
^P1SL
^W1REP("E","PROT",0,"PSL","OUT")
PSL1
^W1REP("E","PROT",0,"PSL1")
gily my;10H
^W1REP("E","PROT",0,"PSL1","SH")
1
^W1REP("E","PROT",0,"SHAA")
dryl;7
^W1REP("E","PROT",0,"SHAA","SH")
1
^W1REP("E","PROT",0,"SL")
gily cew;5
^W1REP("E","PROT",0,"SL","FILE")
^P1SL
^W1REP("E","PROT",0,"SL","OUT")
SL1
^W1REP("E","PROT",0,"SL1")
gily my;12H
^W1REP("E","PROT",0,"SUGL")
zegewl zveaw;8
^W1REP("E","PROT",0,"SUGL","FILE")
^SUGL
^W1REP("E","PROT",0,"SUGL","OUT")
SUGL1
^W1REP("E","PROT",0,"SUGL1")
dveaw my;12H
^W1REP("E","PROT",0,"SUGL1","SH")
1
^W1REP("E","PROT",0,"SUGT")
melyz beq;5
^W1REP("E","PROT",0,"SUGT","SH")
1
^W1REP("E","PROT",0,"TRH")
jix`z;8D
^W1REP("E","PROT",0,"TRH","M2")
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("E","PROT",0,"TRH","SH")
1
^W1REP("E","PROT",0,"TS")
melyzl;8
^W1REP("E","PROT",0,"TSHL")
melyzl;8
^W1REP("E","PROT",0,"TSHL","OUT")
TSHL
^W1REP("E","PROT",0,"x1")
zenk;4,0
^W1REP("E","PROT",0,"x2")
mekq;8,2
^W1REP("E","PROT",0,"x3")
`ln mekq;8,2
^W1REP("E","PROT",0,"x4")
;,
^W1REP("E","PROT","COD")
TRH*SHAA*SUGL*SUGL1*LKHN*LKHN1*HZM*PAR*PAR1*x1*x2*x3
^W1REP("E","PROT","CT")
0*0*0*0*2*0
^W1REP("E","PROT","FLD")
TRH*SHAA*SUGL*LKHN*HZM*PAR*x1*x2*x3
^W1REP("E","PROT","FLD0")
**-*-*****
^W1REP("E","PROT","GLOB1")
^VRM($J)
^W1REP("E","PROT","GLOB2")
^VRM($J,DT,SHAA,SUGL,LKHN,HZM,PAR)
^W1REP("E","PROT","LPT")
B
^W1REP("E","PROT","MIUN")
3*4*3*2*1*2
^W1REP("E","PROT","MIUN","PROG")
TRH^P1PRHZ
^W1REP("E","PROT","QUERY","(mihixt itl oein) hxetn","CT")
0*0*0*0*2*0
^W1REP("E","PROT","QUERY","(mihixt itl oein) hxetn","FLD0")
**-*-*****
^W1REP("E","PROT","QUERY","(mihixt itl oein) hxetn","MIUN")
3*4*3*2*1*2
^W1REP("E","PROT","QUERY","(mihixt itl oein) hxetn","SIK0")
0*0*0*0*1*0
^W1REP("E","PROT","QUERY","(mikix`z itl oein) hxetn","CT")
2*0*0*0*0*0
^W1REP("E","PROT","QUERY","(mikix`z itl oein) hxetn","FLD0")
*-*-*-*****
^W1REP("E","PROT","QUERY","(mikix`z itl oein) hxetn","MIUN")
1*3*1*3*2*3
^W1REP("E","PROT","QUERY","(mikix`z itl oein) hxetn","SIK0")
1*0*0*0*0*0
^W1REP("E","PROT","QUERY","(zegewl zveaw itl oein) hxetn","CT")
0*0*1*2*0*0
^W1REP("E","PROT","QUERY","(zegewl zveaw itl oein) hxetn","FLD0")
-*-***-****
^W1REP("E","PROT","QUERY","(zegewl zveaw itl oein) hxetn","MIUN")
2*5*1*2*4*3
^W1REP("E","PROT","QUERY","(zegewl zveaw itl oein) hxetn","SIK0")
1*0*1*0*0*0
^W1REP("E","PROT","QUERY","(zepnfd itl oein) hxetn","CT")
0*0*0*0*0*2
^W1REP("E","PROT","QUERY","(zepnfd itl oein) hxetn","FLD0")
**-*-*****
^W1REP("E","PROT","QUERY","(zepnfd itl oein) hxetn","MIUN")
3*4*3*1*2*1
^W1REP("E","PROT","QUERY","(zepnfd itl oein) hxetn","SIK0")
0*0*0*1*0*1
^W1REP("E","PROT","SHP","KOD")
P1HZH
^W1REP("E","PROT","SHP","PROG")
S MAS(5)=$S($D(PAROTH):"zepnfd itl OTH ihixt g""ec",1:"zepnfd mihixt g""ec")
^W1REP("E","PROT","SIK")
1*1*1*
^W1REP("E","PROT","SIK0")
0*0*0*0*1*0
^W1REP("E","PROT","US",2)
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("E","PROT","US",7)
D PAR^P1PRHZ
^W1REP("E","PRPP")
hxetn hixt zxikn g"ec
^W1REP("E","PRPP",0,"DEP")
dwlgn;5
^W1REP("E","PRPP",0,"DEP","FILE")
^DEP
^W1REP("E","PRPP",0,"DEP","OUT")
DEP1
^W1REP("E","PRPP",0,"DEP1")
dwlgn my;15H
^W1REP("E","PRPP",0,"DEP1","SH")
1
^W1REP("E","PRPP",0,"HB")
zipeayg;8
^W1REP("E","PRPP",0,"HZM")
dpnfd;7
^W1REP("E","PRPP",0,"HZM","SH")
1
^W1REP("E","PRPP",0,"LKH")
gewl 'qn;10
^W1REP("E","PRPP",0,"LKH","FILE")
^LKH
^W1REP("E","PRPP",0,"LKH","OUT")
LKH1
^W1REP("E","PRPP",0,"LKH1")
gewl my;20H
^W1REP("E","PRPP",0,"MRK")
sipq;4
^W1REP("E","PRPP",0,"MRK","FILE")
^[^UCI("MLG")]YZRN
^W1REP("E","PRPP",0,"MRK","OUT")
MRK1
^W1REP("E","PRPP",0,"MRK1")
sipq my;15H
^W1REP("E","PRPP",0,"MRK1","SH")
1
^W1REP("E","PRPP",0,"NAME")
gewl my;12H
^W1REP("E","PRPP",0,"NAME","SH")
1
^W1REP("E","PRPP",0,"NCAB")
zipeayg;6
^W1REP("E","PRPP",0,"NCAB","SH")
0
^W1REP("E","PRPP",0,"NMB")
gewl xtqn;10
^W1REP("E","PRPP",0,"NMB","FILE")
^LKH
^W1REP("E","PRPP",0,"NMB","OUT")
NAME
^W1REP("E","PRPP",0,"PAR")
hixt 'qn;8
^W1REP("E","PRPP",0,"PAR","FILE")
^PAR
^W1REP("E","PRPP",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","PRPP",0,"PAR","OUT")
PAR1
^W1REP("E","PRPP",0,"PAR1")
hixt xe`z;16H
^W1REP("E","PRPP",0,"PAR1","SH")
1
^W1REP("E","PRPP",0,"PSL")
gily cew;3
^W1REP("E","PRPP",0,"PSL","FILE")
^P1SL
^W1REP("E","PRPP",0,"PSL","OUT")
PSL1
^W1REP("E","PRPP",0,"PSL1")
gily my;10H
^W1REP("E","PRPP",0,"PSL1","SH")
1
^W1REP("E","PRPP",0,"SHAA")
dryl;7
^W1REP("E","PRPP",0,"SHAA","SH")
1
^W1REP("E","PRPP",0,"SL")
gily cew;5
^W1REP("E","PRPP",0,"SL","FILE")
^P1SL
^W1REP("E","PRPP",0,"SL","OUT")
SL1
^W1REP("E","PRPP",0,"SL1")
gily my;12H
^W1REP("E","PRPP",0,"SUGL")
gewl beq;8
^W1REP("E","PRPP",0,"SUGL","FILE")
^SUGL
^W1REP("E","PRPP",0,"SUGL","OUT")
SUGL1
^W1REP("E","PRPP",0,"SUGL1")
gewl beq xe`z;15H
^W1REP("E","PRPP",0,"SUGL1","SH")
1
^W1REP("E","PRPP",0,"SUGP")
mihixt zveaw;12
^W1REP("E","PRPP",0,"SUGP","FILE")
^PARSUG
^W1REP("E","PRPP",0,"SUGP","OUT")
SUGP1
^W1REP("E","PRPP",0,"SUGP1")
mihixt zveaw my;15H
^W1REP("E","PRPP",0,"SUGP1","SH")
1
^W1REP("E","PRPP",0,"SUGS")
ogley beq;5
^W1REP("E","PRPP",0,"SUGS","FILE")
^SUGS
^W1REP("E","PRPP",0,"SUGS","OUT")
SUGS1
^W1REP("E","PRPP",0,"SUGS1")
'ley beq xe`z;12
^W1REP("E","PRPP",0,"SUGS1","OUT")
1
^W1REP("E","PRPP",0,"SUGT")
melyz beq;5
^W1REP("E","PRPP",0,"SUGT","SH")
1
^W1REP("E","PRPP",0,"TRH")
jix`z;8D
^W1REP("E","PRPP",0,"TRH","M2")
S TRH=$ZD(DT,3)
^W1REP("E","PRPP",0,"TRH","SH")
1
^W1REP("E","PRPP",0,"TRH1")
YYYYMMDD;8
^W1REP("E","PRPP",0,"TRH1","SH")
1
^W1REP("E","PRPP",0,"TS")
melyzl;8
^W1REP("E","PRPP",0,"TSHL")
melyzl;8
^W1REP("E","PRPP",0,"TSHL","OUT")
TSHL
^W1REP("E","PRPP",0,"x1")
zenk;4,0
^W1REP("E","PRPP",0,"x2")
mekq;8,2
^W1REP("E","PRPP",0,"x3")
;,
^W1REP("E","PRPP","COD")
MRK*MRK1*TRH*TRH1*SHAA*SUGL*SUGL1*SUGS*SUGS1*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*HZM*x1*x2
^W1REP("E","PRPP","CT")
0*0*0*0*0*1*1*2*0*0
^W1REP("E","PRPP","FLD")
MRK*TRH*TRH1*SHAA*SUGL*SUGS*DEP*SUGP*PAR*HZM*x1*x2
^W1REP("E","PRPP","FLD0")
*-****-******
^W1REP("E","PRPP","GLOB1")
^VRM($J)
^W1REP("E","PRPP","GLOB2")
^VRM($J,DT,SHAA,SUGL,HZM,PAR)
^W1REP("E","PRPP","LPT")
B
^W1REP("E","PRPP","MIUN")
1*4*6*7*2*1*3*4*8*5
^W1REP("E","PRPP","MIUN","PROG")
TRH^P1PRPP
^W1REP("E","PRPP","QUERY","zewlgne zegewl ibeq , mitipq itl","CT")
0*0*0*0*0*1*1*2*0*0
^W1REP("E","PRPP","QUERY","zewlgne zegewl ibeq , mitipq itl","FLD0")
*-****-******
^W1REP("E","PRPP","QUERY","zewlgne zegewl ibeq , mitipq itl","MIUN")
1*5*6*7*2*3*3*4*8*5
^W1REP("E","PRPP","QUERY","zewlgne zegewl ibeq , mitipq itl","SIK0")
0*0*0*0*0*0*0*0*0*0
^W1REP("E","PRPP","SHP","KOD")
P1HZH
^W1REP("E","PRPP","SIK")
1*1*
^W1REP("E","PRPP","SIK0")
0*1*0*0*0*1*0*0*0*0
^W1REP("E","PRPP","US",2)
D DT^P1PRPP
^W1REP("E","PRPP","US",5)
D HZM1^P1PRPP
^W1REP("E","PRPP","US",6)
D PAR^P1PRPP
^W1REP("E","PRTH")
iz`eeyd mihixt zxikn g"ec
^W1REP("E","PRTH",0,"DEP")
dwlgn;5
^W1REP("E","PRTH",0,"DEP","FILE")
^DEP
^W1REP("E","PRTH",0,"DEP","OUT")
DEP1
^W1REP("E","PRTH",0,"DEP","SET")
0
^W1REP("E","PRTH",0,"DEP1")
dwlgn my;12H
^W1REP("E","PRTH",0,"DEP1","SET")
0
^W1REP("E","PRTH",0,"DEP1","SH")
1
^W1REP("E","PRTH",0,"KVZ")
dveaw;5
^W1REP("E","PRTH",0,"KVZ","FILE")
^PARSUG
^W1REP("E","PRTH",0,"KVZ","OUT")
KVZ1
^W1REP("E","PRTH",0,"KVZ","SET")
1
^W1REP("E","PRTH",0,"KVZ1")
dveaw xe`z;12H
^W1REP("E","PRTH",0,"KVZ1","SET")
0
^W1REP("E","PRTH",0,"KVZ1","SH")
1
^W1REP("E","PRTH",0,"PRT")
hixt cew;8
^W1REP("E","PRTH",0,"PRT","FILE")
^PAR
^W1REP("E","PRTH",0,"PRT","M2")
S PRT1=$$SHEM^P1P(PRT)
^W1REP("E","PRTH",0,"PRT","OUT")
PRT1
^W1REP("E","PRTH",0,"PRT","SET")
1
^W1REP("E","PRTH",0,"PRT1")
hixt my;16H
^W1REP("E","PRTH",0,"PRT1","SET")
0
^W1REP("E","PRTH",0,"PRT1","SH")
1
^W1REP("E","PRTH",0,"x1")
1 zenk;6,0
^W1REP("E","PRTH",0,"x2")
2 zenk;6,0
^W1REP("E","PRTH",0,"x3")
zenka yxtd;10S,0
^W1REP("E","PRTH",0,"x4")
%-a yxtd;10S,2
^W1REP("E","PRTH",0,"x5")
1 mekq;9,2
^W1REP("E","PRTH",0,"x6")
2 mekq;9,2
^W1REP("E","PRTH",0,"x7")
mekqa yxtd;10S,2
^W1REP("E","PRTH",0,"x8")
%-a yxtd;8S,2
^W1REP("E","PRTH",0,"x9")
;,
^W1REP("E","PRTH","COD")
DEP*DEP1*KVZ*KVZ1*PRT*PRT1*x1*x2*x3*x4*x5*x6*x7*x8
^W1REP("E","PRTH","CT")
1*2*0
^W1REP("E","PRTH","FLD")
DEP*KVZ*PRT*x1*x2*x3*x4*x5*x6*x7*x8
^W1REP("E","PRTH","FLD0")
**********
^W1REP("E","PRTH","GLOB1")
^VRM($J)
^W1REP("E","PRTH","GLOB2")
^VRM($J,KVZ,PRT)
^W1REP("E","PRTH","LPT")
S
^W1REP("E","PRTH","MIUN")
1*2*3
^W1REP("E","PRTH","QUERY","fkexn","CT")
2*0*0
^W1REP("E","PRTH","QUERY","fkexn","FLD0")
**-********
^W1REP("E","PRTH","QUERY","fkexn","MIUN")
1*2*3
^W1REP("E","PRTH","QUERY","fkexn","SIK0")
1*0*0
^W1REP("E","PRTH","QUERY","hxetn","CT")
1*2*0
^W1REP("E","PRTH","QUERY","hxetn","FLD0")
**********
^W1REP("E","PRTH","QUERY","hxetn","MIUN")
1*2*3
^W1REP("E","PRTH","QUERY","hxetn","SIK0")
1*1*0
^W1REP("E","PRTH","SHP","KOD")
PRTH
^W1REP("E","PRTH","SHP","PROG")
S MAS(1)=YY1,MAS(2)=MM10,MAS(3)=MM11,MAS(5)=YY2,MAS(7)=MM20,MAS(8)=MM21
^W1REP("E","PRTH","SIK")
1*1*1*0*1*1*1**
^W1REP("E","PRTH","SIK0")
1*1*0
^W1REP("E","PRTH","SIX")
S SUM(K,4)="" S:SUM(K,1) SUM(K,4)=$J(SUM(K,3)/SUM(K,1)*100,2,2) S SUM(K,8)="" I SUM(K,5) S SUM(K,8)=$J(SUM(K,7)/SUM(K,5)*100,2,2)
^W1REP("E","PRTH","US",2)
D KVZ^P1DPSV
^W1REP("E","PRTH","US",3)
D PRT^P1DPSV
^W1REP("E","SHPM")
mixvlne 'gley itl mihixt g"ec
^W1REP("E","SHPM",0,"DEP")
dwlgn;5
^W1REP("E","SHPM",0,"DEP","FILE")
^DEP
^W1REP("E","SHPM",0,"DEP","OUT")
DEP1
^W1REP("E","SHPM",0,"DEP1")
xe`z;12H
^W1REP("E","SHPM",0,"DEP1","SH")
1
^W1REP("E","SHPM",0,"MLZ")
xvln 'qn;5.
^W1REP("E","SHPM",0,"MLZ","FILE")
^NAME
^W1REP("E","SHPM",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^W1REP("E","SHPM",0,"MLZ","OUT")
MLZ1
^W1REP("E","SHPM",0,"MLZ1")
xvln my;12H
^W1REP("E","SHPM",0,"MLZ1","SH")
1
^W1REP("E","SHPM",0,"MLZR")
xvln;9
^W1REP("E","SHPM",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("E","SHPM",0,"MLZR","OUT")
MLZR1
^W1REP("E","SHPM",0,"MLZR1")
xvln my;12H
^W1REP("E","SHPM",0,"MLZR1","SH")
0
^W1REP("E","SHPM",0,"PAR")
hixt;8
^W1REP("E","SHPM",0,"PAR","FILE")
^PAR
^W1REP("E","SHPM",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","SHPM",0,"PAR","OUT")
PAR1
^W1REP("E","SHPM",0,"PAR1")
hixt xe`z;20H
^W1REP("E","SHPM",0,"PAR1","SH")
1
^W1REP("E","SHPM",0,"SHULH")
ogley;3
^W1REP("E","SHPM",0,"SHULH","SH")
1
^W1REP("E","SHPM",0,"SUGP")
hixt beq;3
^W1REP("E","SHPM",0,"SUGP","FILE")
^PARSUG
^W1REP("E","SHPM",0,"SUGP","OUT")
SUGP1
^W1REP("E","SHPM",0,"SUGP1")
beq xe`z;10H
^W1REP("E","SHPM",0,"SUGP1","SH")
0
^W1REP("E","SHPM",0,"SUGS")
ogley beq;8
^W1REP("E","SHPM",0,"SUGS","FILE")
^SUGS
^W1REP("E","SHPM",0,"SUGS","OUT")
SUGS1
^W1REP("E","SHPM",0,"SUGS1")
xe`z;12H
^W1REP("E","SHPM",0,"SUGS1","SH")
1
^W1REP("E","SHPM",0,"x1")
zenk;7,0
^W1REP("E","SHPM",0,"x2")
dgpd iptl;9,2
^W1REP("E","SHPM",0,"x3")
dgpd;8,2
^W1REP("E","SHPM",0,"x4")
dgpd ixg`;9,2
^W1REP("E","SHPM",0,"x5")
;,
^W1REP("E","SHPM",0,"x6")
;,
^W1REP("E","SHPM","COD")
SUGS*SUGS1*MLZ*MLZ1*SHULH*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4
^W1REP("E","SHPM","CT")
1*2*0*2*0*0*0
^W1REP("E","SHPM","FLD")
SUGS*MLZ*SHULH*DEP*SUGP*PAR*x1*x2*x3*x4
^W1REP("E","SHPM","FLD0")
**-*-*-******
^W1REP("E","SHPM","GLOB1")
^VRM(PRTN)
^W1REP("E","SHPM","GLOB2")
^VRM(PRTN,SUGS,MLZ,SHULH,DEP,SUGP,PAR)
^W1REP("E","SHPM","LPT")
S
^W1REP("E","SHPM","MIUN")
1*2*3*2*3*3*0
^W1REP("E","SHPM","SHP","KOD")
P1DPMS
^W1REP("E","SHPM","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("E","SHPM","SIK")
1*1*1*1**
^W1REP("E","SHPM","SIK0")
1*1*0*1*0*0*0
^W1REP("E","SHPM","US",7)
D PAR^P1DPSHLM
^W1REP("E","SHPR")
ogley beq itl mihixt g"ec
^W1REP("E","SHPR",0,"DEP")
dwlgn;5
^W1REP("E","SHPR",0,"DEP","FILE")
^DEP
^W1REP("E","SHPR",0,"DEP","OUT")
DEP1
^W1REP("E","SHPR",0,"DEP1")
xe`z;12H
^W1REP("E","SHPR",0,"DEP1","SH")
1
^W1REP("E","SHPR",0,"MLZR")
xvln;9
^W1REP("E","SHPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("E","SHPR",0,"MLZR","OUT")
MLZR1
^W1REP("E","SHPR",0,"MLZR1")
xvln my;12H
^W1REP("E","SHPR",0,"MLZR1","SH")
0
^W1REP("E","SHPR",0,"PAR")
hixt;8
^W1REP("E","SHPR",0,"PAR","FILE")
^PAR
^W1REP("E","SHPR",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","SHPR",0,"PAR","OUT")
PAR1
^W1REP("E","SHPR",0,"PAR1")
hixt xe`z;20H
^W1REP("E","SHPR",0,"PAR1","SH")
1
^W1REP("E","SHPR",0,"SHULH")
ogley;3
^W1REP("E","SHPR",0,"SHULH","SH")
1
^W1REP("E","SHPR",0,"SUGP")
hixt beq;3
^W1REP("E","SHPR",0,"SUGP","FILE")
^PARSUG
^W1REP("E","SHPR",0,"SUGP","OUT")
SUGP1
^W1REP("E","SHPR",0,"SUGP1")
beq xe`z;10H
^W1REP("E","SHPR",0,"SUGP1","SH")
0
^W1REP("E","SHPR",0,"SUGS")
ogley beq;8
^W1REP("E","SHPR",0,"SUGS","FILE")
^SUGS
^W1REP("E","SHPR",0,"SUGS","OUT")
SUGS1
^W1REP("E","SHPR",0,"SUGS1")
xe`z;12H
^W1REP("E","SHPR",0,"SUGS1","SH")
1
^W1REP("E","SHPR",0,"x1")
zenk;5,0
^W1REP("E","SHPR",0,"x2")
dgpd iptl;10,2
^W1REP("E","SHPR",0,"x3")
hixtl dgpd;10,2
^W1REP("E","SHPR",0,"x4")
OTH dgpd;8,2
^W1REP("E","SHPR",0,"x5")
zegpd ixg`;10,2
^W1REP("E","SHPR",0,"x6")
;,
^W1REP("E","SHPR","COD")
SUGS*SUGS1*SHULH*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4*x5
^W1REP("E","SHPR","CT")
1*2*2*2*0*0*0
^W1REP("E","SHPR","FLD")
SUGS*SHULH*DEP*SUGP*PAR*x1*x2*x3*x4*x5
^W1REP("E","SHPR","FLD0")
*-*-*******
^W1REP("E","SHPR","GLOB1")
^VRM(PRTN)
^W1REP("E","SHPR","GLOB2")
^VRM(PRTN,SUGS,SHULH,DEP,SUGP,PAR)
^W1REP("E","SHPR","LPT")
S
^W1REP("E","SHPR","MIUN")
1*2*2*2*3*0*0
^W1REP("E","SHPR","SHP","KOD")
P1DMZPR
^W1REP("E","SHPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("E","SHPR","SIK")
1*1*1*1*1*
^W1REP("E","SHPR","SIK0")
1*0*1*1*0*0*0
^W1REP("E","SHPR","US",6)
D PAR^P1DPSHL
^W1REP("E","SUGM")
zerahn ixry dixehqid
^W1REP("E","SUGM",0,"DAT1")
jix`z;8D
^W1REP("E","SUGM",0,"DAT1","SH")
1
^W1REP("E","SUGM",0,"SUGM")
rahn beq;8
^W1REP("E","SUGM",0,"SUGM","FILE")
^P1SUGM
^W1REP("E","SUGM",0,"SUGM","M2")
D SUGM^PLMATBS
^W1REP("E","SUGM",0,"SUGM","OUT")
SUGM1
^W1REP("E","SUGM",0,"SUGM1")
beq xe`z;8H
^W1REP("E","SUGM",0,"SUGM1","SH")
1
^W1REP("E","SUGM",0,"x1")
rahn xry;8,3
^W1REP("E","SUGM",0,"x2")
;,
^W1REP("E","SUGM","COD")
DAT1*SUGM*SUGM1*x1
^W1REP("E","SUGM","CT")
2*0
^W1REP("E","SUGM","FLD")
DAT1*SUGM*x1
^W1REP("E","SUGM","GLOB1")
^P1SUGM("H")
^W1REP("E","SUGM","GLOB2")
^P1SUGM("H",DT,SUGM)
^W1REP("E","SUGM","LPT")
B
^W1REP("E","SUGM","MIUN")
1*2
^W1REP("E","SUGM","SIK")
*
^W1REP("E","SUGM","SIK0")
0*0
^W1REP("E","SUGM","US",2)
S DAT1=$$^%L1DC(DT,1)
^W1REP("E","SUGM","US",3)
D SUGM^PLMATBS
^W1REP("E","SUGP")
zeveaw itl mihixt zniyx
^W1REP("E","SUGP",0,"PAR")
hixt 'qn;8
^W1REP("E","SUGP",0,"PAR","FILE")
^PAR
^W1REP("E","SUGP",0,"PAR","M2")
D PAR1^P1DSUGP
^W1REP("E","SUGP",0,"PAR","OUT")
PAR1
^W1REP("E","SUGP",0,"PAR1")
hixt xe`z;24H
^W1REP("E","SUGP",0,"PAR1","SH")
0
^W1REP("E","SUGP",0,"SUGP")
dveaw;5
^W1REP("E","SUGP",0,"SUGP","FILE")
^PARSUG
^W1REP("E","SUGP",0,"SUGP","OUT")
SUGP1
^W1REP("E","SUGP",0,"SUGP1")
dveaw xe`z;18H
^W1REP("E","SUGP",0,"SUGP1","SH")
0
^W1REP("E","SUGP",0,"x1")
dxikn xign;10,2
^W1REP("E","SUGP",0,"x2")
;,
^W1REP("E","SUGP","COD")
SUGP*SUGP1*PAR*PAR1*x1
^W1REP("E","SUGP","CT")
2*0*
^W1REP("E","SUGP","FLD")
SUGP*PAR*x1
^W1REP("E","SUGP","FLD0")
***
^W1REP("E","SUGP","GLOB1")
^PAR
^W1REP("E","SUGP","GLOB2")
^PAR(PAR)
^W1REP("E","SUGP","LPT")
B
^W1REP("E","SUGP","MIUN")
1*2*3
^W1REP("E","SUGP","SIK")
*
^W1REP("E","SUGP","SIK0")
0*0*
^W1REP("E","SUGP","US",-1)
S x1=$$MH^P1P(PAR)
^W1REP("E","SUGP","US",1)
D PAR^P1DSUGP
^W1REP("E","TIPM")
mixvlnl mitih g"ec
^W1REP("E","TIPM",0,"MLZ")
xvln;5.
^W1REP("E","TIPM",0,"MLZ","FILE")
^NAME
^W1REP("E","TIPM",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^W1REP("E","TIPM",0,"MLZ","OUT")
MLZ1
^W1REP("E","TIPM",0,"MLZ1")
xvln my;20H
^W1REP("E","TIPM",0,"MLZ1","SH")
1
^W1REP("E","TIPM",0,"TRH")
jix`z;8D
^W1REP("E","TIPM",0,"TRH","SH")
1
^W1REP("E","TIPM",0,"x1")
xky;8,2
^W1REP("E","TIPM",0,"x2")
i`xy`a tih;9,2
^W1REP("E","TIPM",0,"x3")
k"dq;8,2
^W1REP("E","TIPM",0,"x4")
;,
^W1REP("E","TIPM","COD")
MLZ*MLZ1*TRH*x1*x2*x3
^W1REP("E","TIPM","CT")
0*0
^W1REP("E","TIPM","FLD")
MLZ*TRH*x1*x2*x3
^W1REP("E","TIPM","GLOB1")
^P1TIPM
^W1REP("E","TIPM","GLOB2")
^P1TIPM(DT,MLZ)
^W1REP("E","TIPM","LPT")
B
^W1REP("E","TIPM","MIUN")
1*2
^W1REP("E","TIPM","SIK")
1*1*1*
^W1REP("E","TIPM","SIK0")
1*0
^W1REP("E","TIPM","US",-1)
S TRH=$$^%L1DC(TIP,1)
^W1REP("E","TIPM","US",1)
D REPTRH^P1TIPM
^W1REP("E","TIPM","US",2)
D REPMLZ^P1TIPM
^W1REP("E","TMSH")
zery itl migelyn gec
^W1REP("E","TMSH",0,"SHAA")
dry;8
^W1REP("E","TMSH",0,"SHAA","SH")
1
^W1REP("E","TMSH",0,"TRH")
jix`z;8D
^W1REP("E","TMSH",0,"TRH","SH")
1
^W1REP("E","TMSH",0,"x1")
zepnfd zenk;12,0
^W1REP("E","TMSH",0,"x2")
melyzl k"dq;12,2
^W1REP("E","TMSH",0,"x3")
;,
^W1REP("E","TMSH",0,"x4")
;,
^W1REP("E","TMSH","COD")
TRH*SHAA*x1*x2
^W1REP("E","TMSH","CT")
0*0
^W1REP("E","TMSH","FLD")
TRH*SHAA*x1*x2
^W1REP("E","TMSH","FLD0")

^W1REP("E","TMSH","GLOB1")
^P1TMI
^W1REP("E","TMSH","GLOB2")
^P1TMI(DT,TM)
^W1REP("E","TMSH","LPT")
B
^W1REP("E","TMSH","MIUN")
1*2
^W1REP("E","TMSH","QUERY","zery itl fkexn migelyn g""ec","CT")
0*0
^W1REP("E","TMSH","QUERY","zery itl fkexn migelyn g""ec","FLD0")
-***
^W1REP("E","TMSH","QUERY","zery itl fkexn migelyn g""ec","MIUN")
1*1
^W1REP("E","TMSH","QUERY","zery itl fkexn migelyn g""ec","SIK0")
1*0
^W1REP("E","TMSH","QUERY","zerye migix`z itl fkexn migelyn g""ec","CT")
0*0
^W1REP("E","TMSH","QUERY","zerye migix`z itl fkexn migelyn g""ec","FLD0")

^W1REP("E","TMSH","QUERY","zerye migix`z itl fkexn migelyn g""ec","MIUN")
1*2
^W1REP("E","TMSH","QUERY","zerye migix`z itl fkexn migelyn g""ec","SIK0")
1*0
^W1REP("E","TMSH","SIK")
1*1**
^W1REP("E","TMSH","SIK0")
1*0
^W1REP("E","TMSH","US",-1)
D DT^P1DTMSH
^W1REP("E","TMSH","US",1)
D DT^P1DTMSH
^W1REP("E","TMSH","US",2)
D SHAA^P1DTMSH
^W1REP("E","TPDH")
mitih aeyig g"ec
^W1REP("E","TPDH",0,"MISHM")
zxnyn;5
^W1REP("E","TPDH",0,"MISHM","SH")
1
^W1REP("E","TPDH",0,"OV")
xtqn;5.
^W1REP("E","TPDH",0,"OV","FILE")
^NAME
^W1REP("E","TPDH",0,"OV","M2")
S OV1=$$^P1NAME(OV)
^W1REP("E","TPDH",0,"OV","OUT")
OV1
^W1REP("E","TPDH",0,"OV1")
caer my;12H
^W1REP("E","TPDH",0,"OV1","SH")
1
^W1REP("E","TPDH",0,"TRH")
jix`z;8D
^W1REP("E","TPDH",0,"TRH","SH")
1
^W1REP("E","TPDH",0,"x1")
tih;8,2
^W1REP("E","TPDH",0,"x2")
zexy inc;8,2
^W1REP("E","TPDH",0,"x3")
zery;8,2
^W1REP("E","TPDH",0,"x4")
ehp;8,2
^W1REP("E","TPDH",0,"x5")
zxekyn;8,2
^W1REP("E","TPDH",0,"x6")
dnlyd;8,2
^W1REP("E","TPDH",0,"x7")
dtewa cwted;8,2
^W1REP("E","TPDH",0,"x8")
;,
^W1REP("E","TPDH","COD")
OV*OV1*TRH*MISHM*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","TPDH","CT")
1*2*0
^W1REP("E","TPDH","FLD")
OV*TRH*MISHM*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","TPDH","FLD0")

^W1REP("E","TPDH","GLOB1")
^TEMP($P)
^W1REP("E","TPDH","GLOB2")
^TEMP($P,I)
^W1REP("E","TPDH","LPT")
B
^W1REP("E","TPDH","MIUN")
1*2*3
^W1REP("E","TPDH","MIUN","PROG")
PREP^P1TIPDOH
^W1REP("E","TPDH","QUERY","fkexn g""ec","CT")
2*2*0
^W1REP("E","TPDH","QUERY","fkexn g""ec","FLD0")
*-*-*******
^W1REP("E","TPDH","QUERY","fkexn g""ec","MIUN")
1*2*3
^W1REP("E","TPDH","QUERY","fkexn g""ec","SIK0")
1*0*0
^W1REP("E","TPDH","QUERY","micaer itl mikix`z g""ec","CT")
2*1*0
^W1REP("E","TPDH","QUERY","micaer itl mikix`z g""ec","FLD0")

^W1REP("E","TPDH","QUERY","micaer itl mikix`z g""ec","MIUN")
2*1*3
^W1REP("E","TPDH","QUERY","micaer itl mikix`z g""ec","SIK0")
0*0*0
^W1REP("E","TPDH","QUERY","mikix`z itl micaer g""ec","CT")
1*2*0
^W1REP("E","TPDH","QUERY","mikix`z itl micaer g""ec","FLD0")

^W1REP("E","TPDH","QUERY","mikix`z itl micaer g""ec","MIUN")
1*2*3
^W1REP("E","TPDH","QUERY","mikix`z itl micaer g""ec","SIK0")
1*0*0
^W1REP("E","TPDH","SIK")
1*1*1*1*1*1*1*
^W1REP("E","TPDH","SIK0")
1*0*0
^W1REP("E","TPDH","US",2)
D FRM^P1TIPDOH
^W1REP("E","TRRD")
excey `l oiicry  mihixt zniyx
^W1REP("E","TRRD",0,"MRK")
fkxn 'qn;4
^W1REP("E","TRRD",0,"MRK","FILE")
^PARSEND
^W1REP("E","TRRD",0,"MRK","M2")
D MRK^P1TR
^W1REP("E","TRRD",0,"MRK","OUT")
MRK1
^W1REP("E","TRRD",0,"MRK1")
fkxn my;16H
^W1REP("E","TRRD",0,"MRK1","SH")
1
^W1REP("E","TRRD",0,"PAR")
hixt 'qn;8
^W1REP("E","TRRD",0,"PAR","FILE")
^PAR
^W1REP("E","TRRD",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","TRRD",0,"PAR","OUT")
PAR1
^W1REP("E","TRRD",0,"PAR1")
hixt xe`z;20H
^W1REP("E","TRRD",0,"PAR1","SH")
1
^W1REP("E","TRRD",0,"ZMAN")
dpkd onf;14
^W1REP("E","TRRD",0,"ZMAN","SH")
1
^W1REP("E","TRRD",0,"x1")
xign;8,2
^W1REP("E","TRRD",0,"x2")
;,
^W1REP("E","TRRD","COD")
MRK*MRK1*PAR*PAR1*x1
^W1REP("E","TRRD","CT")
2*0*0
^W1REP("E","TRRD","FLD")
MRK*PAR*x1
^W1REP("E","TRRD","GLOB1")
^PARSEND
^W1REP("E","TRRD","GLOB2")
^PARSEND(MRK,PAR)
^W1REP("E","TRRD","LPT")
B
^W1REP("E","TRRD","MIUN")
1*2*3
^W1REP("E","TRRD","SHP","KOD")
TRRD
^W1REP("E","TRRD","SHP","PROG")
N A S A=$G(^PARSEND) I A S MAS(5)=$$^%L1DC(A,1)_" "_$$T^%L1TIME($P(A,",",2))
^W1REP("E","TRRD","SIK")
*
^W1REP("E","TRRD","SIK0")
0*0*0
^W1REP("E","TRRD","US",1)
D ZMAN^P1TR
^W1REP("E","TRRD","US",2)
D PAR^P1TR
^W1REP("E","TRRL")
excey `l oiicry  zegewl zniyx
^W1REP("E","TRRL",0,"LKH")
gewl 'qn;10
^W1REP("E","TRRL",0,"LKH","FILE")
^LKH
^W1REP("E","TRRL",0,"LKH","OUT")
LKH1
^W1REP("E","TRRL",0,"LKH1")
gewl my;30H
^W1REP("E","TRRL",0,"LKH1","SH")
1
^W1REP("E","TRRL",0,"MRK")
fkxn 'qn;4
^W1REP("E","TRRL",0,"MRK","FILE")
^LKHSEND
^W1REP("E","TRRL",0,"MRK","M2")
D MRK^P1TR
^W1REP("E","TRRL",0,"MRK","OUT")
MRK1
^W1REP("E","TRRL",0,"MRK1")
fkxn my;16H
^W1REP("E","TRRL",0,"MRK1","SH")
1
^W1REP("E","TRRL",0,"PAR")
hixt 'qn;8
^W1REP("E","TRRL",0,"PAR","FILE")
^PAR
^W1REP("E","TRRL",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","TRRL",0,"PAR","OUT")
PAR1
^W1REP("E","TRRL",0,"PAR1")
hixt xe`z;20H
^W1REP("E","TRRL",0,"PAR1","SH")
1
^W1REP("E","TRRL",0,"ZMAN")
dpkd onf;14
^W1REP("E","TRRL",0,"ZMAN","SH")
1
^W1REP("E","TRRL",0,"x1")
xign;8,2
^W1REP("E","TRRL",0,"x2")
;,
^W1REP("E","TRRL","COD")
MRK*MRK1*LKH*LKH1
^W1REP("E","TRRL","CT")
2*0*0
^W1REP("E","TRRL","FLD")
MRK*LKH
^W1REP("E","TRRL","GLOB1")
^LKHSEND
^W1REP("E","TRRL","GLOB2")
^LKHSEND(MRK,LKH)
^W1REP("E","TRRL","LPT")
B
^W1REP("E","TRRL","MIUN")
1*2*3
^W1REP("E","TRRL","SHP","KOD")
TRRL
^W1REP("E","TRRL","SHP","PROG")
N A S A=$G(^LKHSEND) I A S MAS(5)=$$^%L1DC(A,1)_" "_$$T^%L1TIME($P(A,",",2))
^W1REP("E","TRRL","SIK")
*
^W1REP("E","TRRL","SIK0")
0*0*0
^W1REP("E","TRRL","US",-1)
D ZMAN^P1TR
^W1REP("E","TRRL","US",1)
D ZMAN^P1TR
^W1REP("E","TRRM")
excey `l oiicry zerced zniyx
^W1REP("E","TRRM",0,"DAT")
oekcr jix`z;11D
^W1REP("E","TRRM",0,"DAT","SH")
0
^W1REP("E","TRRM",0,"MRK")
fkxn 'qn;4
^W1REP("E","TRRM",0,"MRK","FILE")
^PARSEND
^W1REP("E","TRRM",0,"MRK","M2")
D MRK^P1TR
^W1REP("E","TRRM",0,"MRK","OUT")
MRK1
^W1REP("E","TRRM",0,"MRK1")
fkxn my;16H
^W1REP("E","TRRM",0,"MRK1","SH")
1
^W1REP("E","TRRM",0,"MSG")
drced cew;9
^W1REP("E","TRRM",0,"MSG","FILE")
^SC
^W1REP("E","TRRM",0,"MSG","M2")
D MSG^P1TR
^W1REP("E","TRRM",0,"MSG","OUT")
MSG1
^W1REP("E","TRRM",0,"MSG1")
drced xe`z;22H
^W1REP("E","TRRM",0,"MSG1","SH")
1
^W1REP("E","TRRM",0,"PAR")
hixt 'qn;8
^W1REP("E","TRRM",0,"PAR","FILE")
^PAR
^W1REP("E","TRRM",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("E","TRRM",0,"PAR","OUT")
PAR1
^W1REP("E","TRRM",0,"PAR1")
hixt xe`z;20H
^W1REP("E","TRRM",0,"PAR1","SH")
1
^W1REP("E","TRRM",0,"ZMAN")
dpkd onf;14
^W1REP("E","TRRM",0,"ZMAN","SH")
1
^W1REP("E","TRRM",0,"x1")
xign;8,2
^W1REP("E","TRRM",0,"x2")
;,
^W1REP("E","TRRM","COD")
MRK*MRK1*MSG*MSG1*DAT
^W1REP("E","TRRM","CT")
2*0*0
^W1REP("E","TRRM","FLD")
MRK*MSG*DAT
^W1REP("E","TRRM","GLOB1")
^MSGSEND
^W1REP("E","TRRM","GLOB2")
^MSGSEND(MRK,MSG)
^W1REP("E","TRRM","LPT")
B
^W1REP("E","TRRM","MIUN")
1*2*3
^W1REP("E","TRRM","SHP","KOD")
TRRD
^W1REP("E","TRRM","SHP","PROG")
N A S A=$G(^PARSEND) I A S MAS(5)=$$^%L1DC(A,1)_" "_$$T^%L1TIME($P(A,",",2))
^W1REP("E","TRRM","SIK")
*
^W1REP("E","TRRM","SIK0")
0*0*0
^W1REP("E","TRRM","US",1)
S MRK1=$G(^MRKZ(MRK))
^W1REP("E","TRRM","US",2)
D MSG^P1TR
^W1REP("E","W3DPAR")
Items sales report
^W1REP("E","W3DPAR",0,"IR")
City;12H
^W1REP("E","W3DPAR",0,"IR","SET")
1
^W1REP("E","W3DPAR",0,"IR","SH")
1
^W1REP("E","W3DPAR",0,"LKH")
Customer Code;11
^W1REP("E","W3DPAR",0,"LKH","FILE")
^|$$^W3MAIN|LKH
^W1REP("E","W3DPAR",0,"LKH","OUT")
LKH1
^W1REP("E","W3DPAR",0,"LKH","SET")
1
^W1REP("E","W3DPAR",0,"LKH1")
Customer Name;20
^W1REP("E","W3DPAR",0,"LKH1","SET")
0
^W1REP("E","W3DPAR",0,"LKH1","SH")
1
^W1REP("E","W3DPAR",0,"PAR")
Item Code;8
^W1REP("E","W3DPAR",0,"PAR","FILE")
^PAR
^W1REP("E","W3DPAR",0,"PAR","M2")
S PAR1=$$SHEM^W3P(PAR)
^W1REP("E","W3DPAR",0,"PAR","OUT")
PAR1
^W1REP("E","W3DPAR",0,"PAR","SET")
1
^W1REP("E","W3DPAR",0,"PAR1")
Item Name;20H
^W1REP("E","W3DPAR",0,"PAR1","SET")
0
^W1REP("E","W3DPAR",0,"PAR1","SH")
1
^W1REP("E","W3DPAR",0,"REST")
Rest. Code;5
^W1REP("E","W3DPAR",0,"REST","FILE")
^|$$^W3MAIN|W3MSD
^W1REP("E","W3DPAR",0,"REST","OUT")
REST1
^W1REP("E","W3DPAR",0,"REST","SET")
1
^W1REP("E","W3DPAR",0,"REST1")
Rest. Name;12
^W1REP("E","W3DPAR",0,"REST1","SET")
0
^W1REP("E","W3DPAR",0,"REST1","SH")
1
^W1REP("E","W3DPAR",0,"SNIF")
Branch Code;3
^W1REP("E","W3DPAR",0,"SNIF","FILE")
^W3SNIF
^W1REP("E","W3DPAR",0,"SNIF","OUT")
SNIF1
^W1REP("E","W3DPAR",0,"SNIF","SET")
1
^W1REP("E","W3DPAR",0,"SNIF1")
Branch Name;12
^W1REP("E","W3DPAR",0,"SNIF1","SET")
0
^W1REP("E","W3DPAR",0,"SNIF1","SH")
1
^W1REP("E","W3DPAR",0,"x1")
Qn.;5,0
^W1REP("E","W3DPAR",0,"x2")
Sum.;8,2
^W1REP("E","W3DPAR",0,"x3")
Last Price;7,2
^W1REP("E","W3DPAR",0,"x4")
;,
^W1REP("E","W3DPAR","COD")
REST*REST1*SNIF*SNIF1*IR*LKH*LKH1*PAR*PAR1*x1*x2*x3
^W1REP("E","W3DPAR","CT")
1*1*2*2*0*0
^W1REP("E","W3DPAR","FLD")
REST*SNIF*IR*LKH*PAR*x1*x2*x3
^W1REP("E","W3DPAR","FLD0")
-*-*-*-****
^W1REP("E","W3DPAR","GLOB1")
^VRM(PRTN)
^W1REP("E","W3DPAR","GLOB2")
^VRM(PRTN,REST,SNIF,IR,LKH,PAR)
^W1REP("E","W3DPAR","LPT")
S
^W1REP("E","W3DPAR","MIUN")
1*2*3*4*5*6
^W1REP("E","W3DPAR","QUERY","By cities","CT")
1*1*2*2*0*0
^W1REP("E","W3DPAR","QUERY","By cities","FLD0")
*-**-****
^W1REP("E","W3DPAR","QUERY","By cities","MIUN")
1*2*2*4*3*6
^W1REP("E","W3DPAR","QUERY","By cities","SIK0")
1*1*1*1*0*0
^W1REP("E","W3DPAR","QUERY","By customers","CT")
1*1*2*2*0*0
^W1REP("E","W3DPAR","QUERY","By customers","FLD0")
-*-*-*****
^W1REP("E","W3DPAR","QUERY","By customers","MIUN")
1*2*3*1*2*6
^W1REP("E","W3DPAR","QUERY","By customers","SIK0")
1*1*1*1*0*0
^W1REP("E","W3DPAR","QUERY","By items only","CT")
1*1*2*2*0*0
^W1REP("E","W3DPAR","QUERY","By items only","FLD0")
-*-*-*-****
^W1REP("E","W3DPAR","QUERY","By items only","MIUN")
1*2*3*4*5*6
^W1REP("E","W3DPAR","QUERY","By items only","SIK0")
1*1*1*1*0*0
^W1REP("E","W3DPAR","QUERY","By rest-s","CT")
1*1*2*2*0*0
^W1REP("E","W3DPAR","QUERY","By rest-s","FLD0")
*-*-*-****
^W1REP("E","W3DPAR","QUERY","By rest-s","MIUN")
1*2*3*4*5*6
^W1REP("E","W3DPAR","QUERY","By rest-s","SIK0")
1*1*1*1*0*0
^W1REP("E","W3DPAR","QUERY","By rest-s and branches","CT")
1*1*2*2*0*0
^W1REP("E","W3DPAR","QUERY","By rest-s and branches","FLD0")
**-*-****
^W1REP("E","W3DPAR","QUERY","By rest-s and branches","MIUN")
1*2*3*4*3*6
^W1REP("E","W3DPAR","QUERY","By rest-s and branches","SIK0")
1*1*1*1*0*0
^W1REP("E","W3DPAR","QUERY","By rest-s, branches, cities & customers","CT")
1*1*2*2*0*0
^W1REP("E","W3DPAR","QUERY","By rest-s, branches, cities & customers","FLD0")

^W1REP("E","W3DPAR","QUERY","By rest-s, branches, cities & customers","MIUN")
1*2*3*4*5*6
^W1REP("E","W3DPAR","QUERY","By rest-s, branches, cities & customers","SIK0")
1*1*1*1*0*0
^W1REP("E","W3DPAR","SIK")
1*1**
^W1REP("E","W3DPAR","SIK0")
1*1*1*1*0*0
^W1REP("E","W3DPAR","US",6)
D PAR^W3DPAR
^W1REP("E","W4CSPR")
(ze)mi`tew itl mihixt g"ec
^W1REP("E","W4CSPR",0,"MLZR")
(z)i`tew;5.
^W1REP("E","W4CSPR",0,"MLZR","FILE")
^NAME
^W1REP("E","W4CSPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("E","W4CSPR",0,"MLZR","OUT")
MLZR1
^W1REP("E","W4CSPR",0,"MLZR","SET")
1
^W1REP("E","W4CSPR",0,"MLZR1")
(z)i`tew my;12H
^W1REP("E","W4CSPR",0,"MLZR1","SET")
0
^W1REP("E","W4CSPR",0,"MLZR1","SH")
1
^W1REP("E","W4CSPR",0,"PAR")
hixt;8
^W1REP("E","W4CSPR",0,"PAR","FILE")
^PAR
^W1REP("E","W4CSPR",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("E","W4CSPR",0,"PAR","OUT")
PAR1
^W1REP("E","W4CSPR",0,"PAR","SET")
1
^W1REP("E","W4CSPR",0,"PAR1")
hixt xe`z;20H
^W1REP("E","W4CSPR",0,"PAR1","SET")
0
^W1REP("E","W4CSPR",0,"PAR1","SH")
0
^W1REP("E","W4CSPR",0,"SUGP")
hixt beq;3
^W1REP("E","W4CSPR",0,"SUGP","FILE")
^PARSUG
^W1REP("E","W4CSPR",0,"SUGP","OUT")
SUGP1
^W1REP("E","W4CSPR",0,"SUGP","SET")
1
^W1REP("E","W4CSPR",0,"SUGP1")
beq xe`z;10H
^W1REP("E","W4CSPR",0,"SUGP1","SET")
0
^W1REP("E","W4CSPR",0,"SUGP1","SH")
1
^W1REP("E","W4CSPR",0,"x1")
zenk;5,0
^W1REP("E","W4CSPR",0,"x2")
hixtl dgpd;10,2
^W1REP("E","W4CSPR",0,"x3")
ehp mekq;10,2
^W1REP("E","W4CSPR",0,"x4")
;,
^W1REP("E","W4CSPR","COD")
MLZR*MLZR1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3
^W1REP("E","W4CSPR","CT")
1*2*0*0*0*0*0
^W1REP("E","W4CSPR","FLD")
MLZR*SUGP*PAR*x1*x2*x3
^W1REP("E","W4CSPR","FLD0")
******
^W1REP("E","W4CSPR","GLOB1")
^VRM(PRTN)
^W1REP("E","W4CSPR","GLOB2")
^VRM(PRTN,MLZR,SUGP,PAR)
^W1REP("E","W4CSPR","LPT")
S
^W1REP("E","W4CSPR","MIUN")
1*2*3*4*2*0*0
^W1REP("E","W4CSPR","QUERY","mihixt itl ze|mi`tew","CT")
1*2*0*0*0*0*0
^W1REP("E","W4CSPR","QUERY","mihixt itl ze|mi`tew","FLD0")
******
^W1REP("E","W4CSPR","QUERY","mihixt itl ze|mi`tew","MIUN")
1*2*3*4*2*0*0
^W1REP("E","W4CSPR","QUERY","mihixt itl ze|mi`tew","SIK0")
1*0*0*0*0*0*0
^W1REP("E","W4CSPR","QUERY","ze|mi`tew itl mihixt","CT")
0*2*0*0*0*0*0
^W1REP("E","W4CSPR","QUERY","ze|mi`tew itl mihixt","FLD0")
*****
^W1REP("E","W4CSPR","QUERY","ze|mi`tew itl mihixt","MIUN")
3*1*2*4*2*0*0
^W1REP("E","W4CSPR","QUERY","ze|mi`tew itl mihixt","SIK0")
0*1*1*0*0*0*0
^W1REP("E","W4CSPR","SHP","KOD")
P1DMZPR
^W1REP("E","W4CSPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("E","W4CSPR","SIK")
1*1*1*
^W1REP("E","W4CSPR","SIK0")
1*0*0*0*0*0*0
^W1REP("E","W4CSPR","US",4)
D PAR^W4DMZPR
^W1REP("E","W4DCIB")
qeaiq zegewl ly minelyz g"ec 
^W1REP("E","W4DCIB",0,"CARD")
'qn;0
^W1REP("E","W4DCIB",0,"CARD","SET")
1
^W1REP("E","W4DCIB",0,"CARD","SH")
1
^W1REP("E","W4DCIB",0,"CMP")
dxag 'qn;8
^W1REP("E","W4DCIB",0,"CMP","SET")
1
^W1REP("E","W4DCIB",0,"CMP","SH")
1
^W1REP("E","W4DCIB",0,"HZ")
dpnfd 'qn;9
^W1REP("E","W4DCIB",0,"HZ","SET")
1
^W1REP("E","W4DCIB",0,"HZ","SH")
1
^W1REP("E","W4DCIB",0,"HZLK")
gewl zpnfd;10
^W1REP("E","W4DCIB",0,"HZLK","SET")
1
^W1REP("E","W4DCIB",0,"HZLK","SH")
1
^W1REP("E","W4DCIB",0,"TRH")
melyz jix`z;8D
^W1REP("E","W4DCIB",0,"TRH","SET")
0
^W1REP("E","W4DCIB",0,"TRH","SH")
1
^W1REP("E","W4DCIB",0,"x1")
qihxk 'qn;22,0
^W1REP("E","W4DCIB",0,"x2")
melyz mekq;10,2
^W1REP("E","W4DCIB",0,"x3")
;,
^W1REP("E","W4DCIB","COD")
TRH*HZ*CMP*HZLK*x1*x2
^W1REP("E","W4DCIB","CT")
0*0*0*0
^W1REP("E","W4DCIB","FLD")
TRH*HZ*CMP*HZLK*x1*x2
^W1REP("E","W4DCIB","FLD0")

^W1REP("E","W4DCIB","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("E","W4DCIB","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,DT,HZ,CMP,HZLK)
^W1REP("E","W4DCIB","LPT")
B
^W1REP("E","W4DCIB","MIUN")
1*2*3*4
^W1REP("E","W4DCIB","QUERY","fkexn mikix`z itl","CT")
0*0*0*0
^W1REP("E","W4DCIB","QUERY","fkexn mikix`z itl","FLD0")
*-*-*-*-*
^W1REP("E","W4DCIB","QUERY","fkexn mikix`z itl","MIUN")
1*2*3*4
^W1REP("E","W4DCIB","QUERY","fkexn mikix`z itl","SIK0")
0*0*0*0
^W1REP("E","W4DCIB","QUERY","fkexn zexag itl","CT")
0*0*0*0
^W1REP("E","W4DCIB","QUERY","fkexn zexag itl","FLD0")
*-**-*-*
^W1REP("E","W4DCIB","QUERY","fkexn zexag itl","MIUN")
2*3*1*4
^W1REP("E","W4DCIB","QUERY","fkexn zexag itl","SIK0")
0*0*1*0
^W1REP("E","W4DCIB","QUERY","hxetn mikix`z itl","CT")
0*0*0*0
^W1REP("E","W4DCIB","QUERY","hxetn mikix`z itl","FLD0")

^W1REP("E","W4DCIB","QUERY","hxetn mikix`z itl","MIUN")
1*2*3*4
^W1REP("E","W4DCIB","QUERY","hxetn mikix`z itl","SIK0")
1*0*0*0
^W1REP("E","W4DCIB","QUERY","hxetn zexag itl","CT")
0*0*0*0
^W1REP("E","W4DCIB","QUERY","hxetn zexag itl","FLD0")

^W1REP("E","W4DCIB","QUERY","hxetn zexag itl","MIUN")
2*3*1*4
^W1REP("E","W4DCIB","QUERY","hxetn zexag itl","SIK0")
1*0*1*0
^W1REP("E","W4DCIB","SIK")
0*1*
^W1REP("E","W4DCIB","SIK0")
1*0*0*0
^W1REP("E","W4DCIB","US",2)
S TRH=$$^%L1DC(DT,1)
^W1REP("E","W4DCIB","US",5)
D HZLK^W4DCIB
^W1REP("E","W4LEVD")
xvewn micaer g"ec
^W1REP("E","W4LEVD",0,"KV")
dveaw 'qn;9
^W1REP("E","W4LEVD",0,"KV","FILE")
^|$$^%W1UCI(JB)|LEVKVZ
^W1REP("E","W4LEVD",0,"KV","M2")
S KV1=$G(@$$^W4GL("LEVKVZ")@(KV))
^W1REP("E","W4LEVD",0,"KV","OUT")
KV1
^W1REP("E","W4LEVD",0,"KV","SET")
0
^W1REP("E","W4LEVD",0,"KV1")
dveaw my;12H
^W1REP("E","W4LEVD",0,"KV1","SET")
0
^W1REP("E","W4LEVD",0,"KV1","SH")
1
^W1REP("E","W4LEVD",0,"NOM")
dxey;5
^W1REP("E","W4LEVD",0,"NOM","SET")
1
^W1REP("E","W4LEVD",0,"NOM","SH")
1
^W1REP("E","W4LEVD",0,"STRING")
caer 'qn;8
^W1REP("E","W4LEVD",0,"STRING","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("E","W4LEVD",0,"STRING","M2")
S STRING1=$$^W4NAME(STRING)
^W1REP("E","W4LEVD",0,"STRING","OUT")
STRING1
^W1REP("E","W4LEVD",0,"STRING","SET")
1
^W1REP("E","W4LEVD",0,"STRING1")
caer my;16H
^W1REP("E","W4LEVD",0,"STRING1","SET")
0
^W1REP("E","W4LEVD",0,"STRING1","SH")
1
^W1REP("E","W4LEVD",0,"x1")
dqipk jix`z;11,0
^W1REP("E","W4LEVD",0,"x2")
mei;3,0
^W1REP("E","W4LEVD",0,"x3")
dry;5,0
^W1REP("E","W4LEVD",0,"x4")
d`ivi jix`z;11,0
^W1REP("E","W4LEVD",0,"x5")
mei;3,0
^W1REP("E","W4LEVD",0,"x6")
dry;5,0
^W1REP("E","W4LEVD",0,"x7")
zery k"dq;9,2
^W1REP("E","W4LEVD",0,"x8")
;,
^W1REP("E","W4LEVD","COD")
KV*KV1*STRING*STRING1*NOM*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","W4LEVD","CT")
2*0
^W1REP("E","W4LEVD","FLD")
KV*STRING*NOM*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","W4LEVD","GLOB1")
^|$$^%W1UCI(JB)|TEMP(PRTN)
^W1REP("E","W4LEVD","GLOB2")
^|$$^%W1UCI(JB)|TEMP(PRTN,KV,STRING,NOM)
^W1REP("E","W4LEVD","LPT")
B
^W1REP("E","W4LEVD","MIUN")
1*2
^W1REP("E","W4LEVD","SIK")
******1*
^W1REP("E","W4LEVD","SIK0")
1*0
^W1REP("E","W4LEVD","US",2)
S KV1=$G(@$$^W4GL("LEVKVZ")@(KV))
^W1REP("E","W4LEVD","US",4)
D TM^W4LEVD
^W1REP("E","W4MHRA")
zewlgn itl zexikn
^W1REP("E","W4MHRA",0,"DAT")
jix`z;8D
^W1REP("E","W4MHRA",0,"DAT","SH")
1
^W1REP("E","W4MHRA",0,"DATT")
jix`z;8D
^W1REP("E","W4MHRA",0,"DATT","SET")
0
^W1REP("E","W4MHRA",0,"DATT","SH")
1
^W1REP("E","W4MHRA",0,"MHL")
dwlgn;5
^W1REP("E","W4MHRA",0,"MHL","FILE")
^DEP
^W1REP("E","W4MHRA",0,"MHL","OUT")
MHL1
^W1REP("E","W4MHRA",0,"MHL","SET")
0
^W1REP("E","W4MHRA",0,"MHL1")
xe`z;12H
^W1REP("E","W4MHRA",0,"MHL1","SET")
0
^W1REP("E","W4MHRA",0,"MHL1","SH")
0
^W1REP("E","W4MHRA",0,"PAR")
hixt;8
^W1REP("E","W4MHRA",0,"PAR","FILE")
^PAR
^W1REP("E","W4MHRA",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("E","W4MHRA",0,"PAR","OUT")
PAR1
^W1REP("E","W4MHRA",0,"PAR","SET")
0
^W1REP("E","W4MHRA",0,"PAR1")
hixt my;12H
^W1REP("E","W4MHRA",0,"PAR1","SET")
0
^W1REP("E","W4MHRA",0,"PAR1","SH")
1
^W1REP("E","W4MHRA",0,"PARIT")
hixt cew;8.
^W1REP("E","W4MHRA",0,"PARIT","FILE")
^PAR
^W1REP("E","W4MHRA",0,"PARIT","M2")
D PAR1^L2MHIRA
^W1REP("E","W4MHRA",0,"PARIT","OUT")
PARIT1
^W1REP("E","W4MHRA",0,"PARIT1")
hixt xe`z;18H
^W1REP("E","W4MHRA",0,"PARIT1","SH")
0
^W1REP("E","W4MHRA",0,"SUGP")
dveaw;5
^W1REP("E","W4MHRA",0,"SUGP","FILE")
^PARSUG
^W1REP("E","W4MHRA",0,"SUGP","OUT")
SUGP1
^W1REP("E","W4MHRA",0,"SUGP","SET")
0
^W1REP("E","W4MHRA",0,"SUGP1")
dveaw xe`z;12H
^W1REP("E","W4MHRA",0,"SUGP1","SET")
0
^W1REP("E","W4MHRA",0,"SUGP1","SH")
0
^W1REP("E","W4MHRA",0,"x1")
zenk;7,2
^W1REP("E","W4MHRA",0,"x2")
mekq;10,2
^W1REP("E","W4MHRA",0,"x3")
dxikn xign;10,2
^W1REP("E","W4MHRA",0,"x4")
n"rn iptl;10,2
^W1REP("E","W4MHRA",0,"x5")
;,
^W1REP("E","W4MHRA","COD")
MHL*MHL1*SUGP*SUGP1*PAR*PAR1*DATT*x1*x2*x3*x4
^W1REP("E","W4MHRA","CT")
1*2*0*0*2*0*0
^W1REP("E","W4MHRA","FLD")
MHL*SUGP*PAR*DATT*x1*x2*x3*x4
^W1REP("E","W4MHRA","FLD0")
-*-*-****-*
^W1REP("E","W4MHRA","GLOB1")
^PLUTOT
^W1REP("E","W4MHRA","GLOB2")
^PLUTOT(DAT,MRK,PARIT)
^W1REP("E","W4MHRA","LPT")
S
^W1REP("E","W4MHRA","MIUN")
1*3*4*1*3*4**0
^W1REP("E","W4MHRA","QUERY","mini itl fkexn","CT")
1*2*0*0*2*0*0
^W1REP("E","W4MHRA","QUERY","mini itl fkexn","FLD0")
-*-*-****-*
^W1REP("E","W4MHRA","QUERY","mini itl fkexn","MIUN")
1*3*4*1*3*4**0
^W1REP("E","W4MHRA","QUERY","mini itl fkexn","SIK0")
1*1*0*0*1*0*0
^W1REP("E","W4MHRA","QUERY","mini itl hxetn","CT")
1*2*0*2*2*0*0
^W1REP("E","W4MHRA","QUERY","mini itl hxetn","FLD0")
*******
^W1REP("E","W4MHRA","QUERY","mini itl hxetn","MIUN")
1*3*4*2*3*4**0
^W1REP("E","W4MHRA","QUERY","mini itl hxetn","SIK0")
1*1*0*1*1*0*0
^W1REP("E","W4MHRA","QUERY","zeveaw ila hxetn","CT")
1*2*0*0*2*0*0
^W1REP("E","W4MHRA","QUERY","zeveaw ila hxetn","FLD0")
*-**-****
^W1REP("E","W4MHRA","QUERY","zeveaw ila hxetn","MIUN")
1*2*3*4*3*4**0
^W1REP("E","W4MHRA","QUERY","zeveaw ila hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("E","W4MHRA","QUERY","zeveawe zewlgn itl fkexn","CT")
2*0*0*0*2*0*0
^W1REP("E","W4MHRA","QUERY","zeveawe zewlgn itl fkexn","FLD0")
**-*-****
^W1REP("E","W4MHRA","QUERY","zeveawe zewlgn itl fkexn","MIUN")
1*2*3*4*3*4**0
^W1REP("E","W4MHRA","QUERY","zeveawe zewlgn itl fkexn","SIK0")
1*0*0*0*1*0*0
^W1REP("E","W4MHRA","QUERY","zeveawe zewlgn itl hxetn","CT")
1*2*0*0*2*0*0
^W1REP("E","W4MHRA","QUERY","zeveawe zewlgn itl hxetn","FLD0")
***-****
^W1REP("E","W4MHRA","QUERY","zeveawe zewlgn itl hxetn","MIUN")
1*2*3*4*3*4**0
^W1REP("E","W4MHRA","QUERY","zeveawe zewlgn itl hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("E","W4MHRA","SIK")
1*1*0*1**1*0*
^W1REP("E","W4MHRA","SIK0")
1*1*0*0*1*0*0
^W1REP("E","W4MHRA","US",1)
D DAT^W4DEPGR
^W1REP("E","W4MHRA","US",3)
D PAR^W4DEPGR
^W1REP("E","W4MZPR")
mixvln itl mihixt g"ec
^W1REP("E","W4MZPR",0,"MLZR")
xvln;5.
^W1REP("E","W4MZPR",0,"MLZR","FILE")
^NAME
^W1REP("E","W4MZPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("E","W4MZPR",0,"MLZR","OUT")
MLZR1
^W1REP("E","W4MZPR",0,"MLZR","SET")
1
^W1REP("E","W4MZPR",0,"MLZR1")
xvln my;12H
^W1REP("E","W4MZPR",0,"MLZR1","SET")
0
^W1REP("E","W4MZPR",0,"MLZR1","SH")
1
^W1REP("E","W4MZPR",0,"PAR")
hixt;8
^W1REP("E","W4MZPR",0,"PAR","FILE")
^PAR
^W1REP("E","W4MZPR",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("E","W4MZPR",0,"PAR","OUT")
PAR1
^W1REP("E","W4MZPR",0,"PAR","SET")
1
^W1REP("E","W4MZPR",0,"PAR1")
hixt xe`z;20H
^W1REP("E","W4MZPR",0,"PAR1","SET")
0
^W1REP("E","W4MZPR",0,"PAR1","SH")
0
^W1REP("E","W4MZPR",0,"SUGP")
hixt beq;3
^W1REP("E","W4MZPR",0,"SUGP","FILE")
^PARSUG
^W1REP("E","W4MZPR",0,"SUGP","OUT")
SUGP1
^W1REP("E","W4MZPR",0,"SUGP","SET")
1
^W1REP("E","W4MZPR",0,"SUGP1")
beq xe`z;10H
^W1REP("E","W4MZPR",0,"SUGP1","SET")
0
^W1REP("E","W4MZPR",0,"SUGP1","SH")
1
^W1REP("E","W4MZPR",0,"x1")
zenk;5,0
^W1REP("E","W4MZPR",0,"x2")
hixtl dgpd;10,2
^W1REP("E","W4MZPR",0,"x3")
ehp mekq;10,2
^W1REP("E","W4MZPR",0,"x4")
;,
^W1REP("E","W4MZPR","COD")
MLZR*MLZR1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3
^W1REP("E","W4MZPR","CT")
1*2*0*0*0*0*0
^W1REP("E","W4MZPR","FLD")
MLZR*SUGP*PAR*x1*x2*x3
^W1REP("E","W4MZPR","FLD0")
******
^W1REP("E","W4MZPR","GLOB1")
^VRM(PRTN)
^W1REP("E","W4MZPR","GLOB2")
^VRM(PRTN,MLZR,SUGP,PAR)
^W1REP("E","W4MZPR","LPT")
S
^W1REP("E","W4MZPR","MIUN")
1*2*3*4*2*0*0
^W1REP("E","W4MZPR","QUERY","mihixt itl mixvln","CT")
1*2*0*0*0*0*0
^W1REP("E","W4MZPR","QUERY","mihixt itl mixvln","FLD0")
******
^W1REP("E","W4MZPR","QUERY","mihixt itl mixvln","MIUN")
1*2*3*4*2*0*0
^W1REP("E","W4MZPR","QUERY","mihixt itl mixvln","SIK0")
1*0*0*0*0*0*0
^W1REP("E","W4MZPR","QUERY","mixvln itl mihixt","CT")
0*2*0*0*0*0*0
^W1REP("E","W4MZPR","QUERY","mixvln itl mihixt","FLD0")
*****
^W1REP("E","W4MZPR","QUERY","mixvln itl mihixt","MIUN")
3*1*2*4*2*0*0
^W1REP("E","W4MZPR","QUERY","mixvln itl mihixt","SIK0")
0*1*1*0*0*0*0
^W1REP("E","W4MZPR","SHP","KOD")
P1DMZPR
^W1REP("E","W4MZPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("E","W4MZPR","SIK")
1*1*1*
^W1REP("E","W4MZPR","SIK0")
1*0*0*0*0*0*0
^W1REP("E","W4MZPR","US",4)
D PAR^W4DMZPR
^W1REP("E","W4PARS")
zery itl mihixt g"ec
^W1REP("E","W4PARS",0,"DAT")
;0
^W1REP("E","W4PARS",0,"DAT","SH")
1
^W1REP("E","W4PARS",0,"DEP")
dwlgn;5
^W1REP("E","W4PARS",0,"DEP","FILE")
^DEP
^W1REP("E","W4PARS",0,"DEP","OUT")
DEP1
^W1REP("E","W4PARS",0,"DEP","SET")
0
^W1REP("E","W4PARS",0,"DEP1")
dwlgn my;12H
^W1REP("E","W4PARS",0,"DEP1","SET")
0
^W1REP("E","W4PARS",0,"DEP1","SH")
1
^W1REP("E","W4PARS",0,"PAR")
hixt;8
^W1REP("E","W4PARS",0,"PAR","FILE")
^PAR
^W1REP("E","W4PARS",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("E","W4PARS",0,"PAR","OUT")
PAR1
^W1REP("E","W4PARS",0,"PAR","SET")
1
^W1REP("E","W4PARS",0,"PAR1")
hixt xe`z;20H
^W1REP("E","W4PARS",0,"PAR1","SET")
0
^W1REP("E","W4PARS",0,"PAR1","SH")
0
^W1REP("E","W4PARS",0,"SHAA")
dry;5
^W1REP("E","W4PARS",0,"SHAA","SH")
1
^W1REP("E","W4PARS",0,"SHAA1")
dry;6
^W1REP("E","W4PARS",0,"SHAA1","SET")
0
^W1REP("E","W4PARS",0,"SHAA1","SH")
1
^W1REP("E","W4PARS",0,"SUGP")
dveaw;5
^W1REP("E","W4PARS",0,"SUGP","FILE")
^PARSUG
^W1REP("E","W4PARS",0,"SUGP","OUT")
SUGP1
^W1REP("E","W4PARS",0,"SUGP","SET")
0
^W1REP("E","W4PARS",0,"SUGP1")
dveaw xe`z;11H
^W1REP("E","W4PARS",0,"SUGP1","SET")
0
^W1REP("E","W4PARS",0,"SUGP1","SH")
1
^W1REP("E","W4PARS",0,"TRH")
jix`z;8D
^W1REP("E","W4PARS",0,"TRH","SET")
0
^W1REP("E","W4PARS",0,"TRH","SH")
1
^W1REP("E","W4PARS",0,"x1")
zenk;6,0
^W1REP("E","W4PARS",0,"x2")
mekq;9,2
^W1REP("E","W4PARS",0,"x3")
dgpd;8,2
^W1REP("E","W4PARS",0,"x4")
k"dq;9,2
^W1REP("E","W4PARS",0,"x5")
;,
^W1REP("E","W4PARS","COD")
DEP*DEP1*SHAA1*TRH*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4
^W1REP("E","W4PARS","CT")
2*2*2*2*0
^W1REP("E","W4PARS","FLD")
DEP*SHAA1*TRH*SUGP*PAR*x1*x2*x3*x4
^W1REP("E","W4PARS","FLD0")
**-******
^W1REP("E","W4PARS","GLOB1")
^PLUTOT
^W1REP("E","W4PARS","GLOB2")
^PLUTOT(DAT,MRK,PAR,SHAA)
^W1REP("E","W4PARS","LPT")
B
^W1REP("E","W4PARS","MIUN")
2*1*2*3*4
^W1REP("E","W4PARS","QUERY",".mihixte zery itl hxetn","CT")
2*2*2*2*0
^W1REP("E","W4PARS","QUERY",".mihixte zery itl hxetn","FLD0")
**-******
^W1REP("E","W4PARS","QUERY",".mihixte zery itl hxetn","MIUN")
2*1*2*3*4
^W1REP("E","W4PARS","QUERY",".mihixte zery itl hxetn","SIK0")
1*1*1*1*0
^W1REP("E","W4PARS","QUERY",".zerye mihixt itl hxetn","CT")
1*1*2*2*0
^W1REP("E","W4PARS","QUERY",".zerye mihixt itl hxetn","FLD0")
**-******
^W1REP("E","W4PARS","QUERY",".zerye mihixt itl hxetn","MIUN")
1*2*2*3*4
^W1REP("E","W4PARS","QUERY",".zerye mihixt itl hxetn","SIK0")
1*1*1*1*0
^W1REP("E","W4PARS","QUERY","fkexn","CT")
1*0*2*2*0
^W1REP("E","W4PARS","QUERY","fkexn","FLD0")
-**-*-*-*-***
^W1REP("E","W4PARS","QUERY","fkexn","MIUN")
1*1*1*2*3
^W1REP("E","W4PARS","QUERY","fkexn","SIK0")
1*0*1*1*0
^W1REP("E","W4PARS","QUERY","fkexn mihixt itl g""ec","CT")
1*0*2*2*0
^W1REP("E","W4PARS","QUERY","fkexn mihixt itl g""ec","FLD0")
*-*-******
^W1REP("E","W4PARS","QUERY","fkexn mihixt itl g""ec","MIUN")
1*2*1*2*3
^W1REP("E","W4PARS","QUERY","fkexn mihixt itl g""ec","SIK0")
1*0*1*1*0
^W1REP("E","W4PARS","QUERY","mikix`z itl hxetn","CT")
1*1*2*2*0
^W1REP("E","W4PARS","QUERY","mikix`z itl hxetn","FLD0")
*******
^W1REP("E","W4PARS","QUERY","mikix`z itl hxetn","MIUN")
1*2*3*4*5
^W1REP("E","W4PARS","QUERY","mikix`z itl hxetn","SIK0")
1*1*1*1*0
^W1REP("E","W4PARS","SHP","KOD")
PARS
^W1REP("E","W4PARS","SHP","PROG")
S MAS(5)=$$^%L1DC(METRH,1),MAS(10)=$$^%L1DC(ADTRH,1),MAS(15)=MESHAA1#24,MAS(20)=$S(ADSHAA1<40:ADSHAA1#24,1:ADSHAA1)
^W1REP("E","W4PARS","SIK")
1*1*1*1*
^W1REP("E","W4PARS","SIK0")
1*1*1*1*0
^W1REP("E","W4PARS","US",1)
D DAT^W4DPARS
^W1REP("E","W4PARS","US",3)
D PAR^W4DPARS
^W1REP("E","W4PARS","US",4)
D SHAA^W4DPARS
^W1REP("E","W4PRHZ")
zepnfd itl mihixt zxikn g"ec 
^W1REP("E","W4PRHZ",0,"HB")
zipeayg;8
^W1REP("E","W4PRHZ",0,"HZM")
dpnfd;7
^W1REP("E","W4PRHZ",0,"HZM","SET")
1
^W1REP("E","W4PRHZ",0,"HZM","SH")
1
^W1REP("E","W4PRHZ",0,"LKH")
gewl 'qn;10
^W1REP("E","W4PRHZ",0,"LKH","FILE")
^LKH
^W1REP("E","W4PRHZ",0,"LKH","OUT")
LKH1
^W1REP("E","W4PRHZ",0,"LKH1")
gewl my;20H
^W1REP("E","W4PRHZ",0,"LKHN")
gewl 'qn;11
^W1REP("E","W4PRHZ",0,"LKHN","FILE")
^LKH
^W1REP("E","W4PRHZ",0,"LKHN","OUT")
LKHN1
^W1REP("E","W4PRHZ",0,"LKHN","SET")
1
^W1REP("E","W4PRHZ",0,"LKHN1")
gewl my;14H
^W1REP("E","W4PRHZ",0,"LKHN1","SET")
0
^W1REP("E","W4PRHZ",0,"LKHN1","SH")
1
^W1REP("E","W4PRHZ",0,"NAME")
gewl my;12H
^W1REP("E","W4PRHZ",0,"NAME","SH")
1
^W1REP("E","W4PRHZ",0,"NCAB")
zipeayg;6
^W1REP("E","W4PRHZ",0,"NCAB","SH")
0
^W1REP("E","W4PRHZ",0,"NMB")
gewl xtqn;10
^W1REP("E","W4PRHZ",0,"NMB","FILE")
^LKH
^W1REP("E","W4PRHZ",0,"NMB","OUT")
NAME
^W1REP("E","W4PRHZ",0,"PAR")
hixt 'qn;8
^W1REP("E","W4PRHZ",0,"PAR","FILE")
^PAR
^W1REP("E","W4PRHZ",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("E","W4PRHZ",0,"PAR","OUT")
PAR1
^W1REP("E","W4PRHZ",0,"PAR","SET")
1
^W1REP("E","W4PRHZ",0,"PAR1")
hixt xe`z;16H
^W1REP("E","W4PRHZ",0,"PAR1","SET")
0
^W1REP("E","W4PRHZ",0,"PAR1","SH")
1
^W1REP("E","W4PRHZ",0,"PSL")
gily cew;3
^W1REP("E","W4PRHZ",0,"PSL","FILE")
^P1SL
^W1REP("E","W4PRHZ",0,"PSL","OUT")
PSL1
^W1REP("E","W4PRHZ",0,"PSL1")
gily my;10H
^W1REP("E","W4PRHZ",0,"PSL1","SH")
1
^W1REP("E","W4PRHZ",0,"SHAA")
dryl;7
^W1REP("E","W4PRHZ",0,"SHAA","SET")
1
^W1REP("E","W4PRHZ",0,"SHAA","SH")
1
^W1REP("E","W4PRHZ",0,"SL")
gily cew;5
^W1REP("E","W4PRHZ",0,"SL","FILE")
^P1SL
^W1REP("E","W4PRHZ",0,"SL","OUT")
SL1
^W1REP("E","W4PRHZ",0,"SL1")
gily my;12H
^W1REP("E","W4PRHZ",0,"SUGL")
zegewl zveaw;8
^W1REP("E","W4PRHZ",0,"SUGL","FILE")
^SUGL
^W1REP("E","W4PRHZ",0,"SUGL","OUT")
SUGL1
^W1REP("E","W4PRHZ",0,"SUGL","SET")
1
^W1REP("E","W4PRHZ",0,"SUGL1")
dveaw my;12H
^W1REP("E","W4PRHZ",0,"SUGL1","SET")
0
^W1REP("E","W4PRHZ",0,"SUGL1","SH")
1
^W1REP("E","W4PRHZ",0,"SUGT")
melyz beq;5
^W1REP("E","W4PRHZ",0,"SUGT","SH")
1
^W1REP("E","W4PRHZ",0,"TRH")
jix`z;8D
^W1REP("E","W4PRHZ",0,"TRH","M2")
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("E","W4PRHZ",0,"TRH","SET")
0
^W1REP("E","W4PRHZ",0,"TRH","SH")
1
^W1REP("E","W4PRHZ",0,"TS")
melyzl;8
^W1REP("E","W4PRHZ",0,"TSHL")
melyzl;8
^W1REP("E","W4PRHZ",0,"TSHL","OUT")
TSHL
^W1REP("E","W4PRHZ",0,"x1")
zenk;4,0
^W1REP("E","W4PRHZ",0,"x2")
mekq;8,2
^W1REP("E","W4PRHZ",0,"x3")
hixtl dgpd;8,2
^W1REP("E","W4PRHZ",0,"x4")
dgpd ixg`;8,2
^W1REP("E","W4PRHZ",0,"x5")
;,
^W1REP("E","W4PRHZ","COD")
TRH*SHAA*SUGL*SUGL1*LKHN*LKHN1*HZM*PAR*PAR1*x1*x2*x3*x4
^W1REP("E","W4PRHZ","CT")
0*0*0*0*0*2
^W1REP("E","W4PRHZ","FLD")
TRH*SHAA*SUGL*LKHN*HZM*PAR*x1*x2*x3*x4
^W1REP("E","W4PRHZ","FLD0")
**-*-****
^W1REP("E","W4PRHZ","GLOB1")
^VRM(PRTN)
^W1REP("E","W4PRHZ","GLOB2")
^VRM(PRTN,DT,SHAA,SUGL,LKHN,HZM,PAR)
^W1REP("E","W4PRHZ","LPT")
B
^W1REP("E","W4PRHZ","MIUN")
3*4***2*1
^W1REP("E","W4PRHZ","MIUN","PROG")
TRH^W4PRHZ
^W1REP("E","W4PRHZ","QUERY","mihixt itl oein -  hxetn","CT")
0*0*0*0*0*2
^W1REP("E","W4PRHZ","QUERY","mihixt itl oein -  hxetn","FLD0")
**-*-****
^W1REP("E","W4PRHZ","QUERY","mihixt itl oein -  hxetn","MIUN")
3*4***2*1
^W1REP("E","W4PRHZ","QUERY","mihixt itl oein -  hxetn","SIK0")
0*0*0*0*0*1
^W1REP("E","W4PRHZ","QUERY","mikix`z itl oein -  hxetn","CT")
2*0*0*0*0*0
^W1REP("E","W4PRHZ","QUERY","mikix`z itl oein -  hxetn","FLD0")
*-*-*-******
^W1REP("E","W4PRHZ","QUERY","mikix`z itl oein -  hxetn","MIUN")
1****2*3
^W1REP("E","W4PRHZ","QUERY","mikix`z itl oein -  hxetn","SIK0")
1*0*0*0*0*0
^W1REP("E","W4PRHZ","QUERY","zepnfd itl oein -  hxetn","CT")
0*0*0*0*2*0
^W1REP("E","W4PRHZ","QUERY","zepnfd itl oein -  hxetn","FLD0")
**-*-******
^W1REP("E","W4PRHZ","QUERY","zepnfd itl oein -  hxetn","MIUN")
3*4***1*2
^W1REP("E","W4PRHZ","QUERY","zepnfd itl oein -  hxetn","SIK0")
0*0*0*0*1*0
^W1REP("E","W4PRHZ","SHP","KOD")
P1HZH
^W1REP("E","W4PRHZ","SHP","PROG")
S MAS(5)="zepnfd itl mihixt g""ec"
^W1REP("E","W4PRHZ","SIK")
1*1*1*1*
^W1REP("E","W4PRHZ","SIK0")
0*0*0*0*0*1
^W1REP("E","W4PRHZ","US",2)
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("E","W4PRHZ","US",7)
D PAR^W4PRHZ
^W1REP("E","W4SHPR")
ogley beq itl mihixt g"ec
^W1REP("E","W4SHPR",0,"DEP")
dwlgn;5
^W1REP("E","W4SHPR",0,"DEP","FILE")
^DEP
^W1REP("E","W4SHPR",0,"DEP","OUT")
DEP1
^W1REP("E","W4SHPR",0,"DEP","SET")
1
^W1REP("E","W4SHPR",0,"DEP1")
xe`z;12H
^W1REP("E","W4SHPR",0,"DEP1","SET")
0
^W1REP("E","W4SHPR",0,"DEP1","SH")
1
^W1REP("E","W4SHPR",0,"MLZR")
xvln;9
^W1REP("E","W4SHPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("E","W4SHPR",0,"MLZR","OUT")
MLZR1
^W1REP("E","W4SHPR",0,"MLZR1")
xvln my;12H
^W1REP("E","W4SHPR",0,"MLZR1","SH")
0
^W1REP("E","W4SHPR",0,"PAR")
hixt;8
^W1REP("E","W4SHPR",0,"PAR","FILE")
^PAR
^W1REP("E","W4SHPR",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("E","W4SHPR",0,"PAR","OUT")
PAR1
^W1REP("E","W4SHPR",0,"PAR","SET")
1
^W1REP("E","W4SHPR",0,"PAR1")
hixt xe`z;20H
^W1REP("E","W4SHPR",0,"PAR1","SET")
0
^W1REP("E","W4SHPR",0,"PAR1","SH")
1
^W1REP("E","W4SHPR",0,"SHULH")
ogley;3
^W1REP("E","W4SHPR",0,"SHULH","SET")
1
^W1REP("E","W4SHPR",0,"SHULH","SH")
1
^W1REP("E","W4SHPR",0,"SUGP")
hixt beq;3
^W1REP("E","W4SHPR",0,"SUGP","FILE")
^PARSUG
^W1REP("E","W4SHPR",0,"SUGP","OUT")
SUGP1
^W1REP("E","W4SHPR",0,"SUGP","SET")
1
^W1REP("E","W4SHPR",0,"SUGP1")
beq xe`z;10H
^W1REP("E","W4SHPR",0,"SUGP1","SET")
0
^W1REP("E","W4SHPR",0,"SUGP1","SH")
0
^W1REP("E","W4SHPR",0,"SUGS")
ogley beq;8
^W1REP("E","W4SHPR",0,"SUGS","FILE")
^SUGS
^W1REP("E","W4SHPR",0,"SUGS","OUT")
SUGS1
^W1REP("E","W4SHPR",0,"SUGS","SET")
1
^W1REP("E","W4SHPR",0,"SUGS1")
xe`z;12H
^W1REP("E","W4SHPR",0,"SUGS1","SET")
0
^W1REP("E","W4SHPR",0,"SUGS1","SH")
1
^W1REP("E","W4SHPR",0,"x1")
zenk;5,0
^W1REP("E","W4SHPR",0,"x2")
dgpd iptl;10,2
^W1REP("E","W4SHPR",0,"x3")
hixtl dgpd;10,2
^W1REP("E","W4SHPR",0,"x4")
OTH dgpd;8,2
^W1REP("E","W4SHPR",0,"x5")
zegpd ixg`;10,2
^W1REP("E","W4SHPR",0,"x6")
;,
^W1REP("E","W4SHPR","COD")
SUGS*SUGS1*SHULH*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4*x5
^W1REP("E","W4SHPR","CT")
1*2*2*2*0*0*0
^W1REP("E","W4SHPR","FLD")
SUGS*SHULH*DEP*SUGP*PAR*x1*x2*x3*x4*x5
^W1REP("E","W4SHPR","FLD0")
*-*-*******
^W1REP("E","W4SHPR","GLOB1")
^VRM(PRTN)
^W1REP("E","W4SHPR","GLOB2")
^VRM(PRTN,SUGS,SHULH,DEP,SUGP,PAR)
^W1REP("E","W4SHPR","LPT")
S
^W1REP("E","W4SHPR","MIUN")
1*2*2*2*3*0*0
^W1REP("E","W4SHPR","SHP","KOD")
P1DMZPR
^W1REP("E","W4SHPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("E","W4SHPR","SIK")
1*1*1*1*1*
^W1REP("E","W4SHPR","SIK0")
1*0*1*1*0*0*0
^W1REP("E","W4SHPR","US",6)
D PAR^W4DPSHL
^W1REP("E","ZMRK")
mifkxn itl Z-im fekix
^W1REP("E","ZMRK",0,"DAT")
jix`z;8D
^W1REP("E","ZMRK",0,"DAT","SH")
1
^W1REP("E","ZMRK",0,"MRK")
fkxn;4
^W1REP("E","ZMRK",0,"MRK","FILE")
^MRKZ
^W1REP("E","ZMRK",0,"MRK","OUT")
MRKZ1
^W1REP("E","ZMRK",0,"MRK1")
fkxn my;12H
^W1REP("E","ZMRK",0,"MRKZ")
fkxn;6
^W1REP("E","ZMRK",0,"MRKZ","FILE")
^MRKZ
^W1REP("E","ZMRK",0,"MRKZ","OUT")
MRKZ1
^W1REP("E","ZMRK",0,"MRKZ1")
fkxn my;12H
^W1REP("E","ZMRK",0,"MRKZ1","SH")
1
^W1REP("E","ZMRK",0,"TRH")
jix`z;8D
^W1REP("E","ZMRK",0,"TRH","SH")
1
^W1REP("E","ZMRK",0,"x1")
onefn;9,1
^W1REP("E","ZMRK",0,"x2")
scer;9,1
^W1REP("E","ZMRK",0,"x3")
wiy;9,1
^W1REP("E","ZMRK",0,"x4")
`"k;9,1
^W1REP("E","ZMRK",0,"x5")
oeict k"dq;9,1
^W1REP("E","ZMRK",0,"x6")
dtwd;9,1
^W1REP("E","ZMRK",0,"x7")
zexiknd k"dq;9,1
^W1REP("E","ZMRK",0,"x8")
;,
^W1REP("E","ZMRK","COD")
TRH*MRKZ*MRKZ1*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","ZMRK","CT")
2*2
^W1REP("E","ZMRK","FLD")
TRH*MRKZ*x1*x2*x3*x4*x5*x6*x7
^W1REP("E","ZMRK","FLD0")
-********
^W1REP("E","ZMRK","GLOB1")
^Z1MRK
^W1REP("E","ZMRK","GLOB2")
^Z1MRK(DAT,MRKZ,NM,VT)
^W1REP("E","ZMRK","LPT")
B
^W1REP("E","ZMRK","MIUN")
2*1
^W1REP("E","ZMRK","MIUN","PROG")
CP^P1ZMRK
^W1REP("E","ZMRK","QUERY","iztewz mekiq mifkxn","CT")
2*2
^W1REP("E","ZMRK","QUERY","iztewz mekiq mifkxn","FLD0")
-********
^W1REP("E","ZMRK","QUERY","iztewz mekiq mifkxn","MIUN")
2*1
^W1REP("E","ZMRK","QUERY","iztewz mekiq mifkxn","SIK0")
1*1
^W1REP("E","ZMRK","QUERY","mifkxn itl mikix`z","CT")
2*2
^W1REP("E","ZMRK","QUERY","mifkxn itl mikix`z","FLD0")

^W1REP("E","ZMRK","QUERY","mifkxn itl mikix`z","MIUN")
1*2
^W1REP("E","ZMRK","QUERY","mifkxn itl mikix`z","SIK0")
1*0
^W1REP("E","ZMRK","QUERY","mikix`z itl mifkxn","CT")
2*2
^W1REP("E","ZMRK","QUERY","mikix`z itl mifkxn","FLD0")
********
^W1REP("E","ZMRK","QUERY","mikix`z itl mifkxn","MIUN")
2*1
^W1REP("E","ZMRK","QUERY","mikix`z itl mifkxn","SIK0")
1*1
^W1REP("E","ZMRK","SIK")
1*1*1*1*1*1*1*
^W1REP("E","ZMRK","SIK0")
1*1
^W1REP("E","ZMRK","US",1)
D DAT^P1ZMRK
^W1REP("E","ZMRK","US",4)
D VT^P1ZMRK
^W1REP("H")
mixvln itl mihixt g"ec
^W1REP("H","AH")
zegex` g"ec
^W1REP("H","AH",0,"OVED")
caer;5.
^W1REP("H","AH",0,"OVED","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","AH",0,"OVED","M2")
S OVED1=$G(^NAME(OVED,1))
^W1REP("H","AH",0,"OVED","OUT")
OVED1
^W1REP("H","AH",0,"OVED","SET")
1
^W1REP("H","AH",0,"OVED1")
caer my;12H
^W1REP("H","AH",0,"OVED1","SET")
0
^W1REP("H","AH",0,"OVED1","SH")
1
^W1REP("H","AH",0,"SUG")
dgex` beq;10H
^W1REP("H","AH",0,"SUG","SET")
0
^W1REP("H","AH",0,"SUG","SH")
1
^W1REP("H","AH",0,"TRH")
jix`z;8D
^W1REP("H","AH",0,"TRH","SET")
0
^W1REP("H","AH",0,"TRH","SH")
1
^W1REP("H","AH",0,"x1")
zenk;5,0
^W1REP("H","AH",0,"x2")
;,
^W1REP("H","AH","COD")
TRH*OVED*OVED1*SUG*x1
^W1REP("H","AH","CT")
0*0*0
^W1REP("H","AH","FLD")
TRH*OVED*SUG*x1
^W1REP("H","AH","FLD0")

^W1REP("H","AH","GLOB1")
^|$$^%W1UCI(JB)|AH
^W1REP("H","AH","GLOB2")
^|$$^%W1UCI(JB)|AH(OVED,DT,IND)
^W1REP("H","AH","LPT")
B
^W1REP("H","AH","MIUN")
2*1*3
^W1REP("H","AH","QUERY","micaer itl g""ec","CT")
0*0*0
^W1REP("H","AH","QUERY","micaer itl g""ec","FLD0")

^W1REP("H","AH","QUERY","micaer itl g""ec","MIUN")
2*1*3
^W1REP("H","AH","QUERY","micaer itl g""ec","SIK0")
0*1*0
^W1REP("H","AH","QUERY","mikix`z itl g""ec","CT")
0*0*0
^W1REP("H","AH","QUERY","mikix`z itl g""ec","FLD0")

^W1REP("H","AH","QUERY","mikix`z itl g""ec","MIUN")
1*2*3
^W1REP("H","AH","QUERY","mikix`z itl g""ec","SIK0")
1*0*0
^W1REP("H","AH","SIK")
1*
^W1REP("H","AH","SIK0")
0*1*0
^W1REP("H","AH","US",2)
S TRH=$$^%L1DC(DT,1)
^W1REP("H","AH","US",3)
S SUG=$G(^AHSUG(IND)),x1=1
^W1REP("H","BIT")
mihixt milehia g"ec
^W1REP("H","BIT",0,"HB")
zipeayg;8
^W1REP("H","BIT",0,"HZM")
dpnfd;7
^W1REP("H","BIT",0,"HZM","SET")
0
^W1REP("H","BIT",0,"HZM","SH")
1
^W1REP("H","BIT",0,"LKH")
gewl 'qn;10
^W1REP("H","BIT",0,"LKH","FILE")
^LKH
^W1REP("H","BIT",0,"LKH","OUT")
LKH1
^W1REP("H","BIT",0,"LKH1")
gewl my;20H
^W1REP("H","BIT",0,"NAME")
gewl my;12H
^W1REP("H","BIT",0,"NAME","SH")
1
^W1REP("H","BIT",0,"NCAB")
zipeayg;6
^W1REP("H","BIT",0,"NCAB","SH")
0
^W1REP("H","BIT",0,"NMB")
gewl xtqn;10
^W1REP("H","BIT",0,"NMB","FILE")
^LKH
^W1REP("H","BIT",0,"NMB","OUT")
NAME
^W1REP("H","BIT",0,"PAR")
hixt 'qn;8
^W1REP("H","BIT",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","BIT",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","BIT",0,"PAR","OUT")
PAR1
^W1REP("H","BIT",0,"PAR","SET")
0
^W1REP("H","BIT",0,"PAR1")
hixt xe`z;16H
^W1REP("H","BIT",0,"PAR1","SET")
0
^W1REP("H","BIT",0,"PAR1","SH")
1
^W1REP("H","BIT",0,"PSL")
gily cew;3
^W1REP("H","BIT",0,"PSL","FILE")
^P1SL
^W1REP("H","BIT",0,"PSL","OUT")
PSL1
^W1REP("H","BIT",0,"PSL1")
gily my;10H
^W1REP("H","BIT",0,"PSL1","SH")
1
^W1REP("H","BIT",0,"SHAA")
dryl;5
^W1REP("H","BIT",0,"SHAA","SET")
0
^W1REP("H","BIT",0,"SHAA","SH")
1
^W1REP("H","BIT",0,"SL")
gily cew;5
^W1REP("H","BIT",0,"SL","FILE")
^P1SL
^W1REP("H","BIT",0,"SL","OUT")
SL1
^W1REP("H","BIT",0,"SL1")
gily my;12H
^W1REP("H","BIT",0,"SUGT")
melyz beq;5
^W1REP("H","BIT",0,"SUGT","SH")
1
^W1REP("H","BIT",0,"TRH")
jix`z;8D
^W1REP("H","BIT",0,"TRH","M2")
S TRH=$$^%L1DC(DT,1)
^W1REP("H","BIT",0,"TRH","SET")
0
^W1REP("H","BIT",0,"TRH","SH")
1
^W1REP("H","BIT",0,"TS")
melyzl;8
^W1REP("H","BIT",0,"TSHL")
melyzl;8
^W1REP("H","BIT",0,"TSHL","OUT")
TSHL
^W1REP("H","BIT",0,"x1")
lhea;4,0
^W1REP("H","BIT",0,"x2")
mekqa;8,2
^W1REP("H","BIT",0,"x3")
;,
^W1REP("H","BIT","COD")
TRH*SHAA*HZM*PAR*PAR1*x1*x2
^W1REP("H","BIT","CT")
0*0*0*0*0*0
^W1REP("H","BIT","FLD")
TRH*SHAA*HZM*PAR*x1*x2
^W1REP("H","BIT","FLD0")
*-*-***
^W1REP("H","BIT","GLOB1")
^|$$^%W1UCI(JB)|VRM($J)
^W1REP("H","BIT","GLOB2")
^|$$^%W1UCI(JB)|VRM($J,DT,SHAA,HZM,PAR)
^W1REP("H","BIT","LPT")
B
^W1REP("H","BIT","MIUN")
1*3*1*2*0*0
^W1REP("H","BIT","MIUN","PROG")
TRH^P1DPBIT
^W1REP("H","BIT","QUERY","(gahndn e`vi `ly mihixt itl) fkexn","CT")
0*0*0*0*0*0
^W1REP("H","BIT","QUERY","(gahndn e`vi `ly mihixt itl) fkexn","FLD0")
*-*-***
^W1REP("H","BIT","QUERY","(gahndn e`vi `ly mihixt itl) fkexn","MIUN")
1*3*1*2*0*0
^W1REP("H","BIT","QUERY","(gahndn e`vi `ly mihixt itl) fkexn","SIK0")
1*0*0*0*0*0
^W1REP("H","BIT","QUERY","(gahndn e`vi `ly mihixt itl) hxetn","CT")
0*0*0*0*0*0
^W1REP("H","BIT","QUERY","(gahndn e`vi `ly mihixt itl) hxetn","FLD0")
*****
^W1REP("H","BIT","QUERY","(gahndn e`vi `ly mihixt itl) hxetn","MIUN")
2*4*3*1*0*0
^W1REP("H","BIT","QUERY","(gahndn e`vi `ly mihixt itl) hxetn","SIK0")
0*0*0*1*0*0
^W1REP("H","BIT","QUERY","(gahndn e`viy mihixt itl) fkexn","CT")
0*0*0*0*0*0
^W1REP("H","BIT","QUERY","(gahndn e`viy mihixt itl) fkexn","FLD0")
*-*-***
^W1REP("H","BIT","QUERY","(gahndn e`viy mihixt itl) fkexn","MIUN")
1*3*1*2*0*0
^W1REP("H","BIT","QUERY","(gahndn e`viy mihixt itl) fkexn","SIK0")
1*0*0*0*0*0
^W1REP("H","BIT","QUERY","(gahndn e`viy mihixt itl) hxetn","CT")
0*0*0*0*0*0
^W1REP("H","BIT","QUERY","(gahndn e`viy mihixt itl) hxetn","FLD0")
*****
^W1REP("H","BIT","QUERY","(gahndn e`viy mihixt itl) hxetn","MIUN")
2*4*3*1*0*0
^W1REP("H","BIT","QUERY","(gahndn e`viy mihixt itl) hxetn","SIK0")
0*0*0*1*0*0
^W1REP("H","BIT","SHP","KOD")
P1HZH
^W1REP("H","BIT","SIK")
1*1*
^W1REP("H","BIT","SIK0")
1*0*0*0*0*0
^W1REP("H","BIT","US",2)
S TRH=$$^%L1DC(DT,1)
^W1REP("H","BIT","US",5)
D PAR^P1DPBIT
^W1REP("H","BITS")
zeaiq itl mihixt milehia g"ec
^W1REP("H","BITS",0,"HZM")
dpnfd;7
^W1REP("H","BITS",0,"HZM","SET")
0
^W1REP("H","BITS",0,"HZM","SH")
1
^W1REP("H","BITS",0,"MLZR")
xvln;5
^W1REP("H","BITS",0,"MLZR","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","BITS",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("H","BITS",0,"MLZR","OUT")
MLZR1
^W1REP("H","BITS",0,"MLZR","SET")
0
^W1REP("H","BITS",0,"MLZR1")
xvln my;10H
^W1REP("H","BITS",0,"MLZR1","SET")
0
^W1REP("H","BITS",0,"MLZR1","SH")
1
^W1REP("H","BITS",0,"PAR")
hixt 'qn;8
^W1REP("H","BITS",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","BITS",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","BITS",0,"PAR","OUT")
PAR1
^W1REP("H","BITS",0,"PAR","SET")
0
^W1REP("H","BITS",0,"PAR1")
hixt xe`z;16H
^W1REP("H","BITS",0,"PAR1","SET")
0
^W1REP("H","BITS",0,"PAR1","SH")
1
^W1REP("H","BITS",0,"SHAA")
dryl;5
^W1REP("H","BITS",0,"SHAA","SET")
0
^W1REP("H","BITS",0,"SHAA","SH")
1
^W1REP("H","BITS",0,"SIBA")
daiq;4
^W1REP("H","BITS",0,"SIBA","FILE")
^P1SBIT
^W1REP("H","BITS",0,"SIBA","OUT")
SIBA1
^W1REP("H","BITS",0,"SIBA1")
daiq xe`z;18H
^W1REP("H","BITS",0,"SIBA1","SET")
0
^W1REP("H","BITS",0,"SIBA1","SH")
1
^W1REP("H","BITS",0,"TRH")
jix`z;8D
^W1REP("H","BITS",0,"TRH","SET")
0
^W1REP("H","BITS",0,"TRH","SH")
1
^W1REP("H","BITS",0,"x1")
lhea;4,0
^W1REP("H","BITS",0,"x2")
mekqa;8,2
^W1REP("H","BITS",0,"x3")
;,
^W1REP("H","BITS","COD")
SIBA1*MLZR*MLZR1*TRH*SHAA*HZM*PAR*PAR1*x1*x2
^W1REP("H","BITS","CT")
2*0*0*0*0*0
^W1REP("H","BITS","FLD")
SIBA1*MLZR*TRH*SHAA*HZM*PAR*x1*x2
^W1REP("H","BITS","FLD0")
*-**-****
^W1REP("H","BITS","GLOB1")
^|$$^%W1UCI(JB)|VRM($J)
^W1REP("H","BITS","GLOB2")
^|$$^%W1UCI(JB)|VRM($J,SIBA1,MLZR,DT,SHAA,HZM,PAR)
^W1REP("H","BITS","LPT")
B
^W1REP("H","BITS","MIUN")
1*2*3*2*4*2
^W1REP("H","BITS","MIUN","PROG")
TRH^P1DPBITS
^W1REP("H","BITS","QUERY","1.  hxetn mihixt itl zeaiq","CT")
2*0*0*0*0*0
^W1REP("H","BITS","QUERY","1.  hxetn mihixt itl zeaiq","FLD0")
*-**-****
^W1REP("H","BITS","QUERY","1.  hxetn mihixt itl zeaiq","MIUN")
1*2*3*2*4*2
^W1REP("H","BITS","QUERY","1.  hxetn mihixt itl zeaiq","SIK0")
1*0*0*0*0*1
^W1REP("H","BITS","QUERY","2.  fkexn mihixt itl zeaiq","CT")
0*0*0*0*0*0
^W1REP("H","BITS","QUERY","2.  fkexn mihixt itl zeaiq","FLD0")
*-*-*-*-***
^W1REP("H","BITS","QUERY","2.  fkexn mihixt itl zeaiq","MIUN")
1*2*3*2*4*2
^W1REP("H","BITS","QUERY","2.  fkexn mihixt itl zeaiq","SIK0")
1*0*0*0*0*1
^W1REP("H","BITS","QUERY","3.       mikix`z itl zeaiq","CT")
2*0*0*0*0*0
^W1REP("H","BITS","QUERY","3.       mikix`z itl zeaiq","FLD0")
*-**-****
^W1REP("H","BITS","QUERY","3.       mikix`z itl zeaiq","MIUN")
1*2*2*2*3*4
^W1REP("H","BITS","QUERY","3.       mikix`z itl zeaiq","SIK0")
1*0*0*0*0*1
^W1REP("H","BITS","QUERY","4.       zeaiq itl mikix`z","CT")
0*0*2*0*0*0
^W1REP("H","BITS","QUERY","4.       zeaiq itl mikix`z","FLD0")
*-**-****
^W1REP("H","BITS","QUERY","4.       zeaiq itl mikix`z","MIUN")
2*2*1*2*3*4
^W1REP("H","BITS","QUERY","4.       zeaiq itl mikix`z","SIK0")
1*0*1*0*0*1
^W1REP("H","BITS","QUERY","5.        mixvln itl zeaiq","CT")
2*0*0*0*0*0
^W1REP("H","BITS","QUERY","5.        mixvln itl zeaiq","FLD0")
***-****
^W1REP("H","BITS","QUERY","5.        mixvln itl zeaiq","MIUN")
1*2*3*2*4*5
^W1REP("H","BITS","QUERY","5.        mixvln itl zeaiq","SIK0")
1*1*0*0*0*0
^W1REP("H","BITS","QUERY","6.        zeaiq itl mixvln","CT")
2*1*0*0*0*0
^W1REP("H","BITS","QUERY","6.        zeaiq itl mixvln","FLD0")
***-****
^W1REP("H","BITS","QUERY","6.        zeaiq itl mixvln","MIUN")
2*1*3*2*4*5
^W1REP("H","BITS","QUERY","6.        zeaiq itl mixvln","SIK0")
1*1*1*0*0*0
^W1REP("H","BITS","SHP","KOD")
P1HZH
^W1REP("H","BITS","SHP","PROG")
S MAS(5)=$S($G(EXIT)=1:"gahndn e`viy mihixt",$G(EXIT)=2:"gahndn e`vi `ly mihixt",1:" mihixtd lk")_" itl g""ec"
^W1REP("H","BITS","SIK")
1*1*
^W1REP("H","BITS","SIK0")
1*0*0*0*0*1
^W1REP("H","BITS","US",4)
S TRH=$$^%L1DC(DT,1)
^W1REP("H","BITS","US",7)
D PAR^P1DPBITS
^W1REP("H","CHMA")
miwiy ihxt 
^W1REP("H","CHMA",0,"ASMA")
`zknq`;6
^W1REP("H","CHMA",0,"ASMA","SH")
1
^W1REP("H","CHMA",0,"BANK")
wpa;3
^W1REP("H","CHMA",0,"BANK","SH")
1
^W1REP("H","CHMA",0,"CHEK")
wiy 'qn;9
^W1REP("H","CHMA",0,"CHEK","SH")
1
^W1REP("H","CHMA",0,"DAT")
dlaw jix`z;8D
^W1REP("H","CHMA",0,"DAT","SH")
1
^W1REP("H","CHMA",0,"DATE")
dlaw jix`z;8D
^W1REP("H","CHMA",0,"HESH")
oeayg 'qn;10
^W1REP("H","CHMA",0,"HESH","SH")
1
^W1REP("H","CHMA",0,"LPR")
oerxtl;8D
^W1REP("H","CHMA",0,"LPR","SH")
1
^W1REP("H","CHMA",0,"SNIF")
sipq;4
^W1REP("H","CHMA",0,"SNIF","SH")
1
^W1REP("H","CHMA",0,"SUM")
mekq;7
^W1REP("H","CHMA",0,"TZ")
zedf 'qn;9
^W1REP("H","CHMA",0,"TZ","SH")
1
^W1REP("H","CHMA",0,"x1")
mekq;7,2
^W1REP("H","CHMA",0,"x2")
;,
^W1REP("H","CHMA","COD")
DAT*LPR*HESH*SNIF*BANK*CHEK*TZ*ASMA*x1
^W1REP("H","CHMA","CT")
0*0*0*0*0*0*0*0
^W1REP("H","CHMA","FLD")
DAT*LPR*HESH*SNIF*BANK*CHEK*TZ*ASMA*x1
^W1REP("H","CHMA","FLD0")
********
^W1REP("H","CHMA","GLOB1")
^CHECK
^W1REP("H","CHMA","GLOB2")
^CHECK(DAT,KUP,MSHM,NSID)
^W1REP("H","CHMA","LPT")
B
^W1REP("H","CHMA","MIUN")
1*2*3*4*5*6*7*8
^W1REP("H","CHMA","QUERY","dlaw jix`z itl","CT")
0*0*0*0*0*0*0*0
^W1REP("H","CHMA","QUERY","dlaw jix`z itl","FLD0")
********
^W1REP("H","CHMA","QUERY","dlaw jix`z itl","MIUN")
1*2*3*4*5*6*7*8
^W1REP("H","CHMA","QUERY","dlaw jix`z itl","SIK0")
1*0*0*0*0*0*0*0
^W1REP("H","CHMA","QUERY","oerxtl jix`z itl","CT")
0*0*0*0*0*0*0*0
^W1REP("H","CHMA","QUERY","oerxtl jix`z itl","FLD0")

^W1REP("H","CHMA","QUERY","oerxtl jix`z itl","MIUN")
2*1*3*4*5*6*7*8
^W1REP("H","CHMA","QUERY","oerxtl jix`z itl","SIK0")
0*1*0*0*0*0*0*0
^W1REP("H","CHMA","SIK")
1*
^W1REP("H","CHMA","SIK0")
1*0*0*0*0*0*0*0
^W1REP("H","CHMA","US",1)
D DAT^PLCHMA ; S OK=1 I DAT<MEDAT!(DAT>ADDAT) S OK=0
^W1REP("H","CHMA","US",2)
S OK=1
^W1REP("H","CHMA","US",3)
S OK=1
^W1REP("H","CHMA","US",4)
D SET^PLCHMA
^W1REP("H","DCIB")
qeaiq zegewl ly ninelyz g"ec
^W1REP("H","DCIB",0,"CARD")
'qn;0
^W1REP("H","DCIB",0,"CARD","SET")
1
^W1REP("H","DCIB",0,"CARD","SH")
1
^W1REP("H","DCIB",0,"CMP")
dxag 'qn;8
^W1REP("H","DCIB",0,"CMP","SET")
1
^W1REP("H","DCIB",0,"CMP","SH")
1
^W1REP("H","DCIB",0,"HZ")
dpnfd 'qn;9
^W1REP("H","DCIB",0,"HZ","SET")
1
^W1REP("H","DCIB",0,"HZ","SH")
1
^W1REP("H","DCIB",0,"HZLK")
gewl zpnfd;10
^W1REP("H","DCIB",0,"HZLK","SET")
1
^W1REP("H","DCIB",0,"HZLK","SH")
1
^W1REP("H","DCIB",0,"TRH")
melyz jix`z;8D
^W1REP("H","DCIB",0,"TRH","SET")
0
^W1REP("H","DCIB",0,"TRH","SH")
1
^W1REP("H","DCIB",0,"x1")
qihxk 'qn;22,0
^W1REP("H","DCIB",0,"x2")
melyz mekq;10,2
^W1REP("H","DCIB",0,"x3")
;,
^W1REP("H","DCIB","COD")
TRH*HZ*CMP*HZLK*x1*x2
^W1REP("H","DCIB","CT")
0*0*0*0
^W1REP("H","DCIB","FLD")
TRH*HZ*CMP*HZLK*x1*x2
^W1REP("H","DCIB","FLD0")

^W1REP("H","DCIB","GLOB1")
^VRM($J)
^W1REP("H","DCIB","GLOB2")
^VRM($J,DT,HZ,CMP,HZLK)
^W1REP("H","DCIB","LPT")
B
^W1REP("H","DCIB","MIUN")
2*3*1*4
^W1REP("H","DCIB","QUERY","fkexn mikix`z itl","CT")
0*0*0*0
^W1REP("H","DCIB","QUERY","fkexn mikix`z itl","FLD0")
*-*-*-*-*
^W1REP("H","DCIB","QUERY","fkexn mikix`z itl","MIUN")
1*2*3*4
^W1REP("H","DCIB","QUERY","fkexn mikix`z itl","SIK0")
0*0*0*0
^W1REP("H","DCIB","QUERY","fkexn zexag itl","CT")
0*0*0*0
^W1REP("H","DCIB","QUERY","fkexn zexag itl","FLD0")
*-**-*-*
^W1REP("H","DCIB","QUERY","fkexn zexag itl","MIUN")
2*3*1*4
^W1REP("H","DCIB","QUERY","fkexn zexag itl","SIK0")
0*0*1*0
^W1REP("H","DCIB","QUERY","hxetn mikix`z itl","CT")
0*0*0*0
^W1REP("H","DCIB","QUERY","hxetn mikix`z itl","FLD0")

^W1REP("H","DCIB","QUERY","hxetn mikix`z itl","MIUN")
1*2*3*4
^W1REP("H","DCIB","QUERY","hxetn mikix`z itl","SIK0")
1*0*0*0
^W1REP("H","DCIB","QUERY","hxetn zexag itl","CT")
0*0*0*0
^W1REP("H","DCIB","QUERY","hxetn zexag itl","FLD0")

^W1REP("H","DCIB","QUERY","hxetn zexag itl","MIUN")
2*3*1*4
^W1REP("H","DCIB","QUERY","hxetn zexag itl","SIK0")
1*0*1*0
^W1REP("H","DCIB","SIK")
0*1*
^W1REP("H","DCIB","SIK0")
1*0*1*0
^W1REP("H","DCIB","US",2)
S TRH=$$^%L1DC(DT,1)
^W1REP("H","DCIB","US",5)
D HZLK^P1DCIB
^W1REP("H","DCIB","US",6)
D HZLK^P1DCIB
^W1REP("H","DHBN")
qn zeipeayg g"ec
^W1REP("H","DHBN",0,"HB")
zipeayg;8
^W1REP("H","DHBN",0,"HB","SET")
0
^W1REP("H","DHBN",0,"HB","SH")
1
^W1REP("H","DHBN",0,"HB1")
zipeayg;8
^W1REP("H","DHBN",0,"HB1","SET")
0
^W1REP("H","DHBN",0,"HB1","SH")
1
^W1REP("H","DHBN",0,"KVL")
'wl zveaw;7
^W1REP("H","DHBN",0,"KVL","FILE")
^|$$^%W1UCI(JB)|P1SUGL
^W1REP("H","DHBN",0,"KVL","OUT")
KVL1
^W1REP("H","DHBN",0,"KVL","SET")
0
^W1REP("H","DHBN",0,"KVL1")
dveaw my;10H
^W1REP("H","DHBN",0,"KVL1","SET")
0
^W1REP("H","DHBN",0,"KVL1","SH")
1
^W1REP("H","DHBN",0,"LK")
gewl 'qn;10
^W1REP("H","DHBN",0,"LK","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","DHBN",0,"LK","OUT")
LK1
^W1REP("H","DHBN",0,"LK","SET")
0
^W1REP("H","DHBN",0,"LK1")
gewl my;22H
^W1REP("H","DHBN",0,"LK1","SET")
0
^W1REP("H","DHBN",0,"LK1","SH")
1
^W1REP("H","DHBN",0,"LKH")
gewl 'qn;11
^W1REP("H","DHBN",0,"LKH","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","DHBN",0,"LKH","OUT")
LKH1
^W1REP("H","DHBN",0,"LKH","SET")
0
^W1REP("H","DHBN",0,"LKH1")
gewl my;20H
^W1REP("H","DHBN",0,"LKH1","SET")
0
^W1REP("H","DHBN",0,"LKH1","SH")
1
^W1REP("H","DHBN",0,"SUGH")
'yg beq;5
^W1REP("H","DHBN",0,"SUGH","FILE")
^|$$^%W1UCI(JB)|W4SUGH
^W1REP("H","DHBN",0,"SUGH","OUT")
SUGH1
^W1REP("H","DHBN",0,"SUGH","SET")
0
^W1REP("H","DHBN",0,"SUGH1")
beq xe`z;10H
^W1REP("H","DHBN",0,"SUGH1","SET")
0
^W1REP("H","DHBN",0,"SUGH1","SH")
1
^W1REP("H","DHBN",0,"SUGL")
gewl beq;5
^W1REP("H","DHBN",0,"SUGL","FILE")
^|$$^%W1UCI(JB)|SUGL
^W1REP("H","DHBN",0,"SUGL","OUT")
SUGL1
^W1REP("H","DHBN",0,"SUGL","SET")
0
^W1REP("H","DHBN",0,"SUGL1")
beq xe`z;12H
^W1REP("H","DHBN",0,"SUGL1","SET")
0
^W1REP("H","DHBN",0,"SUGL1","SH")
1
^W1REP("H","DHBN",0,"TRH")
jix`zl;8D
^W1REP("H","DHBN",0,"TRH","SET")
0
^W1REP("H","DHBN",0,"TRH","SH")
1
^W1REP("H","DHBN",0,"TZ")
n.r/t.g/f.z;9
^W1REP("H","DHBN",0,"TZ","SET")
0
^W1REP("H","DHBN",0,"TZ","SH")
1
^W1REP("H","DHBN",0,"VD")
'yg beq;5
^W1REP("H","DHBN",0,"VD","FILE")
^|$$^%W1UCI(JB)|W4VDHB
^W1REP("H","DHBN",0,"VD","OUT")
VD1
^W1REP("H","DHBN",0,"VD","SET")
0
^W1REP("H","DHBN",0,"VD1")
xe`z;5H
^W1REP("H","DHBN",0,"VD1","SET")
0
^W1REP("H","DHBN",0,"VD1","SH")
1
^W1REP("H","DHBN",0,"x1")
n"rn iptl;9,1
^W1REP("H","DHBN",0,"x2")
n"rn;8,1
^W1REP("H","DHBN",0,"x3")
n"rn llek;9,1
^W1REP("H","DHBN",0,"x4")
+ / -;8,1
^W1REP("H","DHBN",0,"x5")
xg` yceg ly zepnfd;8,1
^W1REP("H","DHBN",0,"x6")
;,
^W1REP("H","DHBN","COD")
TRH*VD*VD1*SUGL*SUGL1*HB1*LKH*LKH1*x1*x2*x3*x4*x5
^W1REP("H","DHBN","CT")
0*0**0*0*0****
^W1REP("H","DHBN","FLD")
TRH*VD*SUGL*HB1*LKH*x1*x2*x3*x4*x5
^W1REP("H","DHBN","FLD0")
**-*******
^W1REP("H","DHBN","GLOB1")
^|$$^%W1UCI(JB)|KLIN
^W1REP("H","DHBN","GLOB2")
^|$$^%W1UCI(JB)|KLIN(VDKL,HB)
^W1REP("H","DHBN","LPT")
B
^W1REP("H","DHBN","MAM")
*****
^W1REP("H","DHBN","MIUN")
3*2**1*4*5****
^W1REP("H","DHBN","QUERY","gewl beq itl","CT")
0*0*2*0*0*0****
^W1REP("H","DHBN","QUERY","gewl beq itl","FLD0")
*********
^W1REP("H","DHBN","QUERY","gewl beq itl","MIUN")
3*5*1*4*2*6****
^W1REP("H","DHBN","QUERY","gewl beq itl","SIK0")
0*0*1*0*1*0****
^W1REP("H","DHBN","QUERY","zipeayg 'qn itl","CT")
0*0**0*0*0****
^W1REP("H","DHBN","QUERY","zipeayg 'qn itl","FLD0")
**-*******
^W1REP("H","DHBN","QUERY","zipeayg 'qn itl","MIUN")
3*2**1*4*5****
^W1REP("H","DHBN","QUERY","zipeayg 'qn itl","SIK0")
0*0**0*0*0****
^W1REP("H","DHBN","QUERY","zipeayg 'qne jix`z itl","CT")
2*0**0*0*0****
^W1REP("H","DHBN","QUERY","zipeayg 'qne jix`z itl","FLD0")
**-*******
^W1REP("H","DHBN","QUERY","zipeayg 'qne jix`z itl","MIUN")
1*3**2*4*5****
^W1REP("H","DHBN","QUERY","zipeayg 'qne jix`z itl","SIK0")
1*0**0*0*0****
^W1REP("H","DHBN","QUERY","zipeayg beq itl","CT")
0*2**0*0*0****
^W1REP("H","DHBN","QUERY","zipeayg beq itl","FLD0")
**-*******
^W1REP("H","DHBN","QUERY","zipeayg beq itl","MIUN")
3*1**2*4*5****
^W1REP("H","DHBN","QUERY","zipeayg beq itl","SIK0")
0*1**0*0*0****
^W1REP("H","DHBN","QUERY","zipeayg beqe jix`z itl","CT")
2*0**0*0*0****
^W1REP("H","DHBN","QUERY","zipeayg beqe jix`z itl","FLD0")
**-*******
^W1REP("H","DHBN","QUERY","zipeayg beqe jix`z itl","MIUN")
1*2**3*4*5****
^W1REP("H","DHBN","QUERY","zipeayg beqe jix`z itl","SIK0")
1*1**0*0*0****
^W1REP("H","DHBN","SIK")
1*1*1*1*1*
^W1REP("H","DHBN","SIK0")
0*0**0*0*0****
^W1REP("H","DHBN","US",1)
D VD^W4DHBN
^W1REP("H","DHBN","US",2)
D HB^W4DHBN
^W1REP("H","DHNH")

^W1REP("H","DLVLK")
zegewl itl migelyn g"ec 
^W1REP("H","DLVLK",0,"HB")
zipeayg;8
^W1REP("H","DLVLK",0,"HZM")
dpnfd;7
^W1REP("H","DLVLK",0,"HZM","SET")
1
^W1REP("H","DLVLK",0,"HZM","SH")
1
^W1REP("H","DLVLK",0,"KTV")
zaezk;24H
^W1REP("H","DLVLK",0,"KTV","SET")
0
^W1REP("H","DLVLK",0,"KTV","SH")
1
^W1REP("H","DLVLK",0,"LKH")
gewl 'qn;10
^W1REP("H","DLVLK",0,"LKH","FILE")
^LKH
^W1REP("H","DLVLK",0,"LKH","OUT")
LKH1
^W1REP("H","DLVLK",0,"LKH1")
gewl my;20H
^W1REP("H","DLVLK",0,"LKHN")
gewl 'qn;12
^W1REP("H","DLVLK",0,"LKHN","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","DLVLK",0,"LKHN","OUT")
LKHN1
^W1REP("H","DLVLK",0,"LKHN","SET")
1
^W1REP("H","DLVLK",0,"LKHN1")
gewl my;14H
^W1REP("H","DLVLK",0,"LKHN1","SET")
0
^W1REP("H","DLVLK",0,"LKHN1","SH")
1
^W1REP("H","DLVLK",0,"NAME")
gewl my;12H
^W1REP("H","DLVLK",0,"NAME","SH")
1
^W1REP("H","DLVLK",0,"NCAB")
zipeayg;6
^W1REP("H","DLVLK",0,"NCAB","SH")
0
^W1REP("H","DLVLK",0,"NMB")
gewl xtqn;10
^W1REP("H","DLVLK",0,"NMB","FILE")
^LKH
^W1REP("H","DLVLK",0,"NMB","OUT")
NAME
^W1REP("H","DLVLK",0,"PAR")
hixt 'qn;8
^W1REP("H","DLVLK",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","DLVLK",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("H","DLVLK",0,"PAR","OUT")
PAR1
^W1REP("H","DLVLK",0,"PAR","SET")
1
^W1REP("H","DLVLK",0,"PAR1")
hixt xe`z;16H
^W1REP("H","DLVLK",0,"PAR1","SET")
0
^W1REP("H","DLVLK",0,"PAR1","SH")
1
^W1REP("H","DLVLK",0,"PSL")
gily cew;3
^W1REP("H","DLVLK",0,"PSL","FILE")
^P1SL
^W1REP("H","DLVLK",0,"PSL","OUT")
PSL1
^W1REP("H","DLVLK",0,"PSL1")
gily my;10H
^W1REP("H","DLVLK",0,"PSL1","SH")
1
^W1REP("H","DLVLK",0,"SHAA")
dryl;7
^W1REP("H","DLVLK",0,"SHAA","SET")
1
^W1REP("H","DLVLK",0,"SHAA","SH")
1
^W1REP("H","DLVLK",0,"SL")
gily cew;5
^W1REP("H","DLVLK",0,"SL","FILE")
^P1SL
^W1REP("H","DLVLK",0,"SL","OUT")
SL1
^W1REP("H","DLVLK",0,"SL1")
gily my;12H
^W1REP("H","DLVLK",0,"SUGL")
zegewl zveaw;8
^W1REP("H","DLVLK",0,"SUGL","FILE")
^|$$^%W1UCI(JB)|SUGL
^W1REP("H","DLVLK",0,"SUGL","OUT")
SUGL1
^W1REP("H","DLVLK",0,"SUGL","SET")
1
^W1REP("H","DLVLK",0,"SUGL1")
dveaw my;12H
^W1REP("H","DLVLK",0,"SUGL1","SET")
0
^W1REP("H","DLVLK",0,"SUGL1","SH")
1
^W1REP("H","DLVLK",0,"SUGT")
melyz beq;5
^W1REP("H","DLVLK",0,"SUGT","SH")
1
^W1REP("H","DLVLK",0,"TEL")
;0
^W1REP("H","DLVLK",0,"TEL","SET")
0
^W1REP("H","DLVLK",0,"TEL","SH")
1
^W1REP("H","DLVLK",0,"TEL1")
oetlh;10
^W1REP("H","DLVLK",0,"TEL1","SET")
0
^W1REP("H","DLVLK",0,"TEL1","SH")
1
^W1REP("H","DLVLK",0,"TEL2")
ciip 'lh;10
^W1REP("H","DLVLK",0,"TEL2","SET")
0
^W1REP("H","DLVLK",0,"TEL2","SH")
1
^W1REP("H","DLVLK",0,"TRH")
jix`z;8D
^W1REP("H","DLVLK",0,"TRH","M2")
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("H","DLVLK",0,"TRH","SET")
0
^W1REP("H","DLVLK",0,"TRH","SH")
1
^W1REP("H","DLVLK",0,"TS")
melyzl;8
^W1REP("H","DLVLK",0,"TSHL")
melyzl;8
^W1REP("H","DLVLK",0,"TSHL","OUT")
TSHL
^W1REP("H","DLVLK",0,"x1")
zenk;5,0
^W1REP("H","DLVLK",0,"x2")
mekq;8,2
^W1REP("H","DLVLK",0,"x3")
hixtl dgpd;8,2
^W1REP("H","DLVLK",0,"x4")
dgpd ixg`;8,2
^W1REP("H","DLVLK",0,"x5")
;,
^W1REP("H","DLVLK","COD")
LKHN*LKHN1*KTV*TEL1*TEL2*SUGL*SUGL1*TRH*HZM*x1*x2
^W1REP("H","DLVLK","CT")
0*0*0*0*1****
^W1REP("H","DLVLK","FLD")
LKHN*KTV*TEL1*TEL2*SUGL*TRH*HZM*x1*x2
^W1REP("H","DLVLK","FLD0")
*****-*-**
^W1REP("H","DLVLK","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","DLVLK","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,LKHN,DT,HZM)
^W1REP("H","DLVLK","LPT")
B
^W1REP("H","DLVLK","MIUN")
2*3*4*5*1****
^W1REP("H","DLVLK","MIUN","PROG")
TRH^W4DLVLK
^W1REP("H","DLVLK","QUERY","fkexn zegewl itl g""ec","CT")
0*0*0*0*****
^W1REP("H","DLVLK","QUERY","fkexn zegewl itl g""ec","FLD0")
****-*-*-**
^W1REP("H","DLVLK","QUERY","fkexn zegewl itl g""ec","MIUN")
1********
^W1REP("H","DLVLK","QUERY","fkexn zegewl itl g""ec","SIK0")
0*0*0*0*****
^W1REP("H","DLVLK","QUERY","mikix`ze zegewl itl zepnfd g""ec","CT")
0*0*0*0*1****
^W1REP("H","DLVLK","QUERY","mikix`ze zegewl itl zepnfd g""ec","FLD0")
********
^W1REP("H","DLVLK","QUERY","mikix`ze zegewl itl zepnfd g""ec","MIUN")
2*3*4*5*1****
^W1REP("H","DLVLK","QUERY","mikix`ze zegewl itl zepnfd g""ec","SIK0")
1*0*0*0*1****
^W1REP("H","DLVLK","QUERY","zegewle zegewl zeveaw itl migelyn g""ec","CT")
0*0*0*0*1****
^W1REP("H","DLVLK","QUERY","zegewle zegewl zeveaw itl migelyn g""ec","FLD0")
*****-*-**
^W1REP("H","DLVLK","QUERY","zegewle zegewl zeveaw itl migelyn g""ec","MIUN")
2*3*4*5*1****
^W1REP("H","DLVLK","QUERY","zegewle zegewl zeveaw itl migelyn g""ec","SIK0")
0*0*0*0*1****
^W1REP("H","DLVLK","SHP","KOD")
DLVLK
^W1REP("H","DLVLK","SHP","PROG")
S MAS(1)=$S($$GETP^%W1PRM("KINDDAT")=1:"dpnfd zlaw jix`z itl",$$GETP^%W1PRM("KINDDAT")=2:"melyz jix`z itl",1:"xebiy jix`z itl")
^W1REP("H","DLVLK","SIK")
1*1*1*1*
^W1REP("H","DLVLK","SIK0")
0*0*0*0*1****
^W1REP("H","DLVLK","US",2)
D LKHN^W4DLVLK
^W1REP("H","DLVLK","US",3)
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("H","DLVLK","US",4)
D HZM^W4DLVLK
^W1REP("H","DLVLK","US",5)
D HZM^W4DLVLK
^W1REP("H","DLVLK","US",6)
D PAR^W4PRHL
^W1REP("H","DMVC")
rvana zeipw zxiav g"ec
^W1REP("H","DMVC",0,"JOMH")
dcil 'z;8
^W1REP("H","DMVC",0,"JOMH","SH")
1
^W1REP("H","DMVC",0,"KTV")
zaezk;20H
^W1REP("H","DMVC",0,"KTV","SH")
0
^W1REP("H","DMVC",0,"LKH")
gewl;10
^W1REP("H","DMVC",0,"LKH","FILE")
^LKH
^W1REP("H","DMVC",0,"LKH","OUT")
LKH1
^W1REP("H","DMVC",0,"LKH1")
gewl my;16H
^W1REP("H","DMVC",0,"LKH1","SH")
0
^W1REP("H","DMVC",0,"MVC")
rvan;4
^W1REP("H","DMVC",0,"MVC","SH")
1
^W1REP("H","DMVC",0,"PRT")
hixt;8
^W1REP("H","DMVC",0,"PRT","FILE")
^PAR
^W1REP("H","DMVC",0,"PRT","M2")
S PRT1=$$SHEM^P1P(PRT)
^W1REP("H","DMVC",0,"PRT","OUT")
PRT1
^W1REP("H","DMVC",0,"PRT1")
hixt my;16
^W1REP("H","DMVC",0,"PRT1","SH")
0
^W1REP("H","DMVC",0,"SHR")
dxey;4
^W1REP("H","DMVC",0,"SHR","SH")
1
^W1REP("H","DMVC",0,"SHURA")
dxey;3
^W1REP("H","DMVC",0,"SHURA","SH")
1
^W1REP("H","DMVC",0,"TRH")
jix`z;8D
^W1REP("H","DMVC",0,"TRH","SH")
1
^W1REP("H","DMVC",0,"x1")
zenk;4,0
^W1REP("H","DMVC",0,"x2")
mekq;8,2
^W1REP("H","DMVC",0,"x3")
;,
^W1REP("H","DMVC","COD")
MVC*LKH*LKH1*TRH*PRT*PRT1*SHR*x1*x2
^W1REP("H","DMVC","CT")
0*0*0*0*0
^W1REP("H","DMVC","FLD")
MVC*LKH*TRH*PRT*SHR*x1*x2
^W1REP("H","DMVC","FLD0")
*-*-****
^W1REP("H","DMVC","GLOB1")
^P1MVCL1
^W1REP("H","DMVC","GLOB2")
^P1MVCL1(MVC,LKH,SHR,DT,PRT)
^W1REP("H","DMVC","LPT")
B
^W1REP("H","DMVC","MIUN")
1*4*5*2*3
^W1REP("H","DMVC","QUERY","gewl itl oein","CT")
0*0*0*0*0
^W1REP("H","DMVC","QUERY","gewl itl oein","FLD0")
**-***
^W1REP("H","DMVC","QUERY","gewl itl oein","MIUN")
1*2*5*3*4
^W1REP("H","DMVC","QUERY","gewl itl oein","SIK0")
1*1*0*0*0
^W1REP("H","DMVC","QUERY","hixt itl oein","CT")
0*0*0*0*0
^W1REP("H","DMVC","QUERY","hixt itl oein","FLD0")
*-*-****
^W1REP("H","DMVC","QUERY","hixt itl oein","MIUN")
1*4*5*2*3
^W1REP("H","DMVC","QUERY","hixt itl oein","SIK0")
1*0*0*1*0
^W1REP("H","DMVC","SIK")
1*1*
^W1REP("H","DMVC","SIK0")
1*0*0*1*0
^W1REP("H","DMVC","US",-1)
I MVC'=1,MVC'=3 S OK=0
^W1REP("H","DMVC","US",1)
I MVC'=1,MVC'=3 S OK=0
^W1REP("H","DMVC","US",4)
S TRH=$$^%L1DC(DT,1)
^W1REP("H","DMVC","US",5)
D PRT^P1DMVC1
^W1REP("H","DNHB")

^W1REP("H","DOHMSD")
iztewz zepnfd g"ec
^W1REP("H","DOHMSD",0,"HZ")
dpnfd 'qn;9
^W1REP("H","DOHMSD",0,"HZ","SET")
0
^W1REP("H","DOHMSD",0,"HZ","SH")
1
^W1REP("H","DOHMSD",0,"NMB")
gewl / ogley ;11
^W1REP("H","DOHMSD",0,"NMB","SET")
0
^W1REP("H","DOHMSD",0,"NMB","SH")
1
^W1REP("H","DOHMSD",0,"TRH")
jix`z;8D
^W1REP("H","DOHMSD",0,"TRH","SET")
0
^W1REP("H","DOHMSD",0,"TRH","SH")
1
^W1REP("H","DOHMSD",0,"x1")
dnly dpnfd lehia;7,2
^W1REP("H","DOHMSD",0,"x10")
tih;7,2
^W1REP("H","DOHMSD",0,"x11")
tih+mley;7,2
^W1REP("H","DOHMSD",0,"x12")
`"ka iekif;7,2
^W1REP("H","DOHMSD",0,"x13")
onefna iekif;7,2
^W1REP("H","DOHMSD",0,"x14")
;,
^W1REP("H","DOHMSD",0,"x2")
zegpd k"dq;7,2
^W1REP("H","DOHMSD",0,"x3")
dgpd %;5,2
^W1REP("H","DOHMSD",0,"x4")
%-a dgpd k"dq;7,2
^W1REP("H","DOHMSD",0,"x5")
e`vi `ly milehia;7,2
^W1REP("H","DOHMSD",0,"x6")
e`viy milehia;7,2
^W1REP("H","DOHMSD",0,"x7")
mihixtl zegpd k"dq;7,2
^W1REP("H","DOHMSD",0,"x8")
melyzl;7,2
^W1REP("H","DOHMSD",0,"x9")
mley;7,2
^W1REP("H","DOHMSD","COD")
TRH*HZ*NMB*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11*x12*x13
^W1REP("H","DOHMSD","CT")
2*0*0
^W1REP("H","DOHMSD","FLD")
TRH*HZ*NMB*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11*x12*x13
^W1REP("H","DOHMSD","FLD0")
TRH*HZ*NMB
^W1REP("H","DOHMSD","GLOB1")
^|$$^%W1UCI(JB)|P1H
^W1REP("H","DOHMSD","GLOB2")
^|$$^%W1UCI(JB)|P1H(DT,HZ)
^W1REP("H","DOHMSD","LPT")
B
^W1REP("H","DOHMSD","MAM")
************
^W1REP("H","DOHMSD","MIUN")
1*2*3
^W1REP("H","DOHMSD","QUERY","zepnfd itl oein","CT")
2*0*0
^W1REP("H","DOHMSD","QUERY","zepnfd itl oein","FLD0")
TRH*HZ*NMB
^W1REP("H","DOHMSD","QUERY","zepnfd itl oein","MIUN")
1*2*3
^W1REP("H","DOHMSD","QUERY","zepnfd itl oein","SIK0")
1*0*0
^W1REP("H","DOHMSD","SIK")
1*1**1*1*1*1*1*1*1*1*1*1*
^W1REP("H","DOHMSD","SIK0")
1*0*0
^W1REP("H","DOHMSD","US",1)
D DT^W4DOHMSD
^W1REP("H","DOHMSD","US",2)
D HZ^W4DOHMSD
^W1REP("H","DOHT")
mitih g"ec
^W1REP("H","DOHT",0,"HZ")
dpnfd;7
^W1REP("H","DOHT",0,"HZ","SET")
1
^W1REP("H","DOHT",0,"HZ","SH")
1
^W1REP("H","DOHT",0,"HZM")
dpnfd;7
^W1REP("H","DOHT",0,"HZM","SET")
1
^W1REP("H","DOHT",0,"HZM","SH")
1
^W1REP("H","DOHT",0,"MLZ")
xvln;5
^W1REP("H","DOHT",0,"MLZ","SET")
1
^W1REP("H","DOHT",0,"MLZ","SH")
1
^W1REP("H","DOHT",0,"MLZ1")
xvln my;12H
^W1REP("H","DOHT",0,"MLZ1","SET")
0
^W1REP("H","DOHT",0,"MLZ1","SH")
1
^W1REP("H","DOHT",0,"TRH")
jix`z;8D
^W1REP("H","DOHT",0,"TRH","SET")
0
^W1REP("H","DOHT",0,"TRH","SH")
1
^W1REP("H","DOHT",0,"x1")
`"ka mitih;10,2
^W1REP("H","DOHT",0,"x2")
dtwda mitih;10,2
^W1REP("H","DOHT",0,"x3")
w'v mitih;10,2
^W1REP("H","DOHT",0,"x4")
onefna mitih;10,2
^W1REP("H","DOHT",0,"x5")
mitih k"dq;10,2
^W1REP("H","DOHT",0,"x6")
;,
^W1REP("H","DOHT","COD")
MLZ*MLZ1*TRH*HZ*x1*x2*x3*x4*x5
^W1REP("H","DOHT","CT")
2*2*0*0
^W1REP("H","DOHT","FLD")
MLZ*MLZ1*TRH*HZ*x1*x2*x3*x4*x5
^W1REP("H","DOHT","GLOB1")
^VRM($J)
^W1REP("H","DOHT","GLOB2")
^VRM($J,DT,MLZ,HZ)
^W1REP("H","DOHT","LPT")
B
^W1REP("H","DOHT","MIUN")
1*2*3*4
^W1REP("H","DOHT","SIK")
1*1*1*1*1*
^W1REP("H","DOHT","SIK0")
1*0*0*0
^W1REP("H","DOHT","US",0)
D HZM^P1DOHTIP
^W1REP("H","DOHT","US",2)
D DT^P1DOHTIP
^W1REP("H","DOHT","US",3)
D MLZ1^P1DOHTIP
^W1REP("H","DOHT","US",4)
D HZ^P1DOHTIP
^W1REP("H","DPAR")
mihixt zexikn g"ec
^W1REP("H","DPAR",0,"IR")
xir;12H
^W1REP("H","DPAR",0,"IR","SET")
1
^W1REP("H","DPAR",0,"IR","SH")
1
^W1REP("H","DPAR",0,"LKH")
gewl cew;11
^W1REP("H","DPAR",0,"LKH","FILE")
^|$$^W3MAIN|LKH
^W1REP("H","DPAR",0,"LKH","OUT")
LKH1
^W1REP("H","DPAR",0,"LKH","SET")
1
^W1REP("H","DPAR",0,"LKH1")
gewl my;20
^W1REP("H","DPAR",0,"LKH1","SET")
0
^W1REP("H","DPAR",0,"LKH1","SH")
1
^W1REP("H","DPAR",0,"PAR")
hixt cew;8
^W1REP("H","DPAR",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","DPAR",0,"PAR","M2")
S PAR1=$$SHEM^W3P(PAR)
^W1REP("H","DPAR",0,"PAR","OUT")
PAR1
^W1REP("H","DPAR",0,"PAR","SET")
1
^W1REP("H","DPAR",0,"PAR1")
hixt my;20H
^W1REP("H","DPAR",0,"PAR1","SET")
0
^W1REP("H","DPAR",0,"PAR1","SH")
1
^W1REP("H","DPAR",0,"REST")
dcrqn cew;5
^W1REP("H","DPAR",0,"REST","FILE")
^|$$^W3MAIN|W3MSD
^W1REP("H","DPAR",0,"REST","OUT")
REST1
^W1REP("H","DPAR",0,"REST","SET")
1
^W1REP("H","DPAR",0,"REST1")
dcrqn my;12
^W1REP("H","DPAR",0,"REST1","SET")
0
^W1REP("H","DPAR",0,"REST1","SH")
1
^W1REP("H","DPAR",0,"SNIF")
sipq cew;3
^W1REP("H","DPAR",0,"SNIF","FILE")
^|$$^%W1UCI(JB)|W3SNIF
^W1REP("H","DPAR",0,"SNIF","OUT")
SNIF1
^W1REP("H","DPAR",0,"SNIF","SET")
1
^W1REP("H","DPAR",0,"SNIF1")
sipq my;12
^W1REP("H","DPAR",0,"SNIF1","SET")
0
^W1REP("H","DPAR",0,"SNIF1","SH")
1
^W1REP("H","DPAR",0,"x1")
zenk;5,0
^W1REP("H","DPAR",0,"x2")
mekq;8,2
^W1REP("H","DPAR",0,"x3")
oexg` xign;7,2
^W1REP("H","DPAR",0,"x4")
;,
^W1REP("H","DPAR","COD")
REST*REST1*SNIF*SNIF1*IR*LKH*LKH1*PAR*PAR1*x1*x2*x3
^W1REP("H","DPAR","CT")
1*1*2*2*0*0
^W1REP("H","DPAR","FLD")
REST*SNIF*IR*LKH*PAR*x1*x2*x3
^W1REP("H","DPAR","FLD0")
*-*-*-****
^W1REP("H","DPAR","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","DPAR","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,REST,SNIF,IR,LKH,PAR)
^W1REP("H","DPAR","LPT")
B
^W1REP("H","DPAR","MAM")
*1*
^W1REP("H","DPAR","MIUN")
1*2*3*4*5*6
^W1REP("H","DPAR","QUERY","cala mihixt itl","CT")
1*1*2*2*0*0
^W1REP("H","DPAR","QUERY","cala mihixt itl","FLD0")
-*-*-*-****
^W1REP("H","DPAR","QUERY","cala mihixt itl","MIUN")
1*2*3*4*5*6
^W1REP("H","DPAR","QUERY","cala mihixt itl","SIK0")
1*1*1*1*0*0
^W1REP("H","DPAR","QUERY","mitipqe zecrqn itl","CT")
1*1*2*2*0*0
^W1REP("H","DPAR","QUERY","mitipqe zecrqn itl","FLD0")
**-*-****
^W1REP("H","DPAR","QUERY","mitipqe zecrqn itl","MIUN")
1*2*3*4*3*6
^W1REP("H","DPAR","QUERY","mitipqe zecrqn itl","SIK0")
1*1*1*1*0*0
^W1REP("H","DPAR","QUERY","mixr itl","CT")
1*1*2*2*0*0
^W1REP("H","DPAR","QUERY","mixr itl","FLD0")
*-**-****
^W1REP("H","DPAR","QUERY","mixr itl","MIUN")
1*2*2*4*3*6
^W1REP("H","DPAR","QUERY","mixr itl","SIK0")
1*1*1*1*0*0
^W1REP("H","DPAR","QUERY","zecrqn itl","CT")
1*1*2*2*0*0
^W1REP("H","DPAR","QUERY","zecrqn itl","FLD0")
*-*-*-****
^W1REP("H","DPAR","QUERY","zecrqn itl","MIUN")
1*2*3*4*5*6
^W1REP("H","DPAR","QUERY","zecrqn itl","SIK0")
1*1*1*1*0*0
^W1REP("H","DPAR","QUERY","zegewl itl","CT")
1*1*2*2*0*0
^W1REP("H","DPAR","QUERY","zegewl itl","FLD0")
-*-*-*****
^W1REP("H","DPAR","QUERY","zegewl itl","MIUN")
1*2*3*1*2*6
^W1REP("H","DPAR","QUERY","zegewl itl","SIK0")
1*1*1*1*0*0
^W1REP("H","DPAR","QUERY","zegewle mixr ,mitipq,zecrqn itl","CT")
1*1*2*2*0*0
^W1REP("H","DPAR","QUERY","zegewle mixr ,mitipq,zecrqn itl","FLD0")

^W1REP("H","DPAR","QUERY","zegewle mixr ,mitipq,zecrqn itl","MIUN")
1*2*3*4*5*6
^W1REP("H","DPAR","QUERY","zegewle mixr ,mitipq,zecrqn itl","SIK0")
1*1*1*1*0*0
^W1REP("H","DPAR","SIK")
1*1**
^W1REP("H","DPAR","SIK0")
1*1*1*1*0*0
^W1REP("H","DPAR","US",6)
D PAR^P1DPAR
^W1REP("H","DPARC")
mihixt zxikn g"ec
^W1REP("H","DPARC",0,"LKH")
gewl 'qn;11
^W1REP("H","DPARC",0,"LKH","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","DPARC",0,"LKH","OUT")
LKH1
^W1REP("H","DPARC",0,"LKH","SET")
1
^W1REP("H","DPARC",0,"LKH1")
gewl my;20
^W1REP("H","DPARC",0,"LKH1","SET")
0
^W1REP("H","DPARC",0,"LKH1","SH")
1
^W1REP("H","DPARC",0,"PRT")
hixt 'qn;8
^W1REP("H","DPARC",0,"PRT","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","DPARC",0,"PRT","M2")
S PRT1=$$SHEM^W4P(PRT)
^W1REP("H","DPARC",0,"PRT","OUT")
PRT1
^W1REP("H","DPARC",0,"PRT","SET")
1
^W1REP("H","DPARC",0,"PRT1")
hixt my;20H
^W1REP("H","DPARC",0,"PRT1","SET")
0
^W1REP("H","DPARC",0,"PRT1","SH")
1
^W1REP("H","DPARC",0,"TRH")
jix`z;8D
^W1REP("H","DPARC",0,"TRH","SET")
0
^W1REP("H","DPARC",0,"TRH","SH")
1
^W1REP("H","DPARC",0,"x1")
zenk;5,0
^W1REP("H","DPARC",0,"x2")
n"rn iptl mekq;9,2
^W1REP("H","DPARC",0,"x3")
n"rn llek mekq;9,2
^W1REP("H","DPARC",0,"x4")
igkep xign;7,2
^W1REP("H","DPARC",0,"x5")
;,
^W1REP("H","DPARC","COD")
LKH*LKH1*PRT*PRT1*x1*x2*x3*x4
^W1REP("H","DPARC","CT")
2*0
^W1REP("H","DPARC","DPARC","LPT")
B
^W1REP("H","DPARC","FLD")
LKH*PRT*x1*x2*x3*x4
^W1REP("H","DPARC","FLD0")
*****
^W1REP("H","DPARC","GLOB1")
^|$$^W3MAIN|VRM($$^%W1JB)
^W1REP("H","DPARC","GLOB2")
^|$$^W3MAIN|VRM($$^%W1JB,LKH,PRT)
^W1REP("H","DPARC","LPT")
B
^W1REP("H","DPARC","MIUN")
1*2
^W1REP("H","DPARC","QUERY","cala mihixt itl g""ec","CT")
0
^W1REP("H","DPARC","QUERY","cala mihixt itl g""ec","FLD0")
-*****
^W1REP("H","DPARC","QUERY","cala mihixt itl g""ec","MIUN")

^W1REP("H","DPARC","QUERY","cala mihixt itl g""ec","SIK0")
0
^W1REP("H","DPARC","QUERY","mihixte zegewl itl g""ec","CT")
2*0
^W1REP("H","DPARC","QUERY","mihixte zegewl itl g""ec","FLD0")
*****
^W1REP("H","DPARC","QUERY","mihixte zegewl itl g""ec","MIUN")
1*2
^W1REP("H","DPARC","QUERY","mihixte zegewl itl g""ec","SIK0")
1*0
^W1REP("H","DPARC","SIK")
1*1*1**
^W1REP("H","DPARC","SIK0")
1*0
^W1REP("H","DPARC","US",3)
D PRT^W3DPARC
^W1REP("H","DPAYD")
melyz ibeq itl migily g"ec
^W1REP("H","DPAYD",0,"HZM")
dpnfd;7
^W1REP("H","DPAYD",0,"HZM","SET")
0
^W1REP("H","DPAYD",0,"HZM","SH")
1
^W1REP("H","DPAYD",0,"MLZ")
xvln 'qn;5
^W1REP("H","DPAYD",0,"MLZ","FILE")
^NAME
^W1REP("H","DPAYD",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^W1REP("H","DPAYD",0,"MLZ","OUT")
MLZ1
^W1REP("H","DPAYD",0,"MLZ1")
xvln my;12H
^W1REP("H","DPAYD",0,"MLZ1","SH")
1
^W1REP("H","DPAYD",0,"PSL")
gily 'qn;5
^W1REP("H","DPAYD",0,"PSL","FILE")
^|$$^%W1UCI(JB)|P1SL
^W1REP("H","DPAYD",0,"PSL","OUT")
PSL1
^W1REP("H","DPAYD",0,"PSL","SET")
0
^W1REP("H","DPAYD",0,"PSL1")
gily my;12H
^W1REP("H","DPAYD",0,"PSL1","SET")
0
^W1REP("H","DPAYD",0,"PSL1","SH")
1
^W1REP("H","DPAYD",0,"TRH")
jix`z;8D
^W1REP("H","DPAYD",0,"TRH","SET")
0
^W1REP("H","DPAYD",0,"TRH","SH")
1
^W1REP("H","DPAYD",0,"x1")
melyzl;8,2
^W1REP("H","DPAYD",0,"x2")
onefn;8,2
^W1REP("H","DPAYD",0,"x3")
wiy;8,2
^W1REP("H","DPAYD",0,"x4")
`"k;8,2
^W1REP("H","DPAYD",0,"x5")
dtwd;8,2
^W1REP("H","DPAYD",0,"x6")
zexy inc;8,2
^W1REP("H","DPAYD",0,"x7")
tih;8,2
^W1REP("H","DPAYD",0,"x8")
;,
^W1REP("H","DPAYD","COD")
PSL*PSL1*TRH*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","DPAYD","CT")
1*0*0
^W1REP("H","DPAYD","FLD")
PSL*TRH*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","DPAYD","FLD0")
PSL*TRH*HZM
^W1REP("H","DPAYD","GLOB1")
^|$$^%W1UCI(JB)|P1H
^W1REP("H","DPAYD","GLOB2")
^|$$^%W1UCI(JB)|P1H(DATH,HZM)
^W1REP("H","DPAYD","LPT")
B
^W1REP("H","DPAYD","MIUN")
1*2*3
^W1REP("H","DPAYD","QUERY","fkexn","CT")
0*2*0
^W1REP("H","DPAYD","QUERY","fkexn","FLD0")
**-******
^W1REP("H","DPAYD","QUERY","fkexn","MIUN")
2*1*3
^W1REP("H","DPAYD","QUERY","fkexn","SIK0")
0*1*0
^W1REP("H","DPAYD","QUERY","migily itl hxetn","CT")
1*0*0
^W1REP("H","DPAYD","QUERY","migily itl hxetn","FLD0")
PSL*TRH*HZM
^W1REP("H","DPAYD","QUERY","migily itl hxetn","MIUN")
1*2*3
^W1REP("H","DPAYD","QUERY","migily itl hxetn","SIK0")
1*0*0
^W1REP("H","DPAYD","QUERY","zepnfde mikix`z itl hxetn","CT")
0*2*0
^W1REP("H","DPAYD","QUERY","zepnfde mikix`z itl hxetn","FLD0")
PSL*TRH*HZM
^W1REP("H","DPAYD","QUERY","zepnfde mikix`z itl hxetn","MIUN")
3*1*2
^W1REP("H","DPAYD","QUERY","zepnfde mikix`z itl hxetn","SIK0")
0*1*0
^W1REP("H","DPAYD","SIK")
1*1*1*1*1*1*1*
^W1REP("H","DPAYD","SIK0")
1*0*0
^W1REP("H","DPAYD","US",-1)
D DATH^P1MSHT
^W1REP("H","DPAYD","US",1)
D DATH^W4DPAYD
^W1REP("H","DPAYD","US",2)
D HZM^W4DPAYD
^W1REP("H","DPAYM")
melyz ibeq itl g"ec
^W1REP("H","DPAYM",0,"ATAR")
xz` 'qn;2
^W1REP("H","DPAYM",0,"ATAR","FILE")
^|$$^%W1UCI(JB)|W4ATAR
^W1REP("H","DPAYM",0,"ATAR","OUT")
ATAR1
^W1REP("H","DPAYM",0,"ATAR","SET")
0
^W1REP("H","DPAYM",0,"ATAR1")
xz` my;12H
^W1REP("H","DPAYM",0,"ATAR1","SET")
0
^W1REP("H","DPAYM",0,"ATAR1","SH")
1
^W1REP("H","DPAYM",0,"EMDA")
dcnr;4
^W1REP("H","DPAYM",0,"EMDA","SET")
0
^W1REP("H","DPAYM",0,"EMDA","SH")
1
^W1REP("H","DPAYM",0,"HZM")
dpnfd;8
^W1REP("H","DPAYM",0,"HZM","SET")
1
^W1REP("H","DPAYM",0,"HZM","SH")
1
^W1REP("H","DPAYM",0,"MLZ")
xvln 'qn;5
^W1REP("H","DPAYM",0,"MLZ","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","DPAYM",0,"MLZ","M2")
S MLZ1=$$^W4NAME(MLZ)
^W1REP("H","DPAYM",0,"MLZ","OUT")
MLZ1
^W1REP("H","DPAYM",0,"MLZ","SET")
0
^W1REP("H","DPAYM",0,"MLZ1")
xvln my;12H
^W1REP("H","DPAYM",0,"MLZ1","SET")
0
^W1REP("H","DPAYM",0,"MLZ1","SH")
1
^W1REP("H","DPAYM",0,"NMB")
ogley;8
^W1REP("H","DPAYM",0,"NMB","SET")
0
^W1REP("H","DPAYM",0,"NMB","SH")
1
^W1REP("H","DPAYM",0,"PART")
dcnr;4
^W1REP("H","DPAYM",0,"PART","FILE")
^PLUK
^W1REP("H","DPAYM",0,"PART","SH")
1
^W1REP("H","DPAYM",0,"SHAA")
dry;5
^W1REP("H","DPAYM",0,"SHAA","SET")
0
^W1REP("H","DPAYM",0,"SHAA","SH")
1
^W1REP("H","DPAYM",0,"SHULH")
ogley;5
^W1REP("H","DPAYM",0,"SHULH","SH")
1
^W1REP("H","DPAYM",0,"SUGS")
ogley beq;5
^W1REP("H","DPAYM",0,"SUGS","FILE")
^|$$^%W1UCI(JB)|SUGS
^W1REP("H","DPAYM",0,"SUGS","OUT")
SUGS1
^W1REP("H","DPAYM",0,"SUGS","SET")
0
^W1REP("H","DPAYM",0,"SUGS1")
beq xe`z;6H
^W1REP("H","DPAYM",0,"SUGS1","SET")
0
^W1REP("H","DPAYM",0,"SUGS1","SH")
1
^W1REP("H","DPAYM",0,"TRH")
jix`z;8D
^W1REP("H","DPAYM",0,"TRH","SH")
1
^W1REP("H","DPAYM",0,"TRHT")
jix`z;8D
^W1REP("H","DPAYM",0,"TRHT","SET")
0
^W1REP("H","DPAYM",0,"TRHT","SH")
1
^W1REP("H","DPAYM",0,"x1")
melyzl;8,2
^W1REP("H","DPAYM",0,"x2")
onefn;8,2
^W1REP("H","DPAYM",0,"x3")
wiy;8,2
^W1REP("H","DPAYM",0,"x4")
`"k;8,2
^W1REP("H","DPAYM",0,"x5")
dtwd;8,2
^W1REP("H","DPAYM",0,"x6")
dpzn 'lz;8,2
^W1REP("H","DPAYM",0,"x7")
tih;7,2
^W1REP("H","DPAYM",0,"x8")
;,
^W1REP("H","DPAYM","COD")
MLZ*MLZ1*SUGS*SUGS1*NMB*ATAR*ATAR1*EMDA*SHAA*TRHT*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","DPAYM","CT")
******0********
^W1REP("H","DPAYM","FLD")
MLZ*SUGS*NMB*ATAR*EMDA*SHAA*TRHT*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","DPAYM","FLD0")
-*-*-*-*-*-**-*******
^W1REP("H","DPAYM","GLOB1")
^|$$^%W1UCI(JB)|P1H
^W1REP("H","DPAYM","GLOB2")
^|$$^%W1UCI(JB)|P1H(DATH,HZM)
^W1REP("H","DPAYM","LPT")
B
^W1REP("H","DPAYM","MIUN")
******1********
^W1REP("H","DPAYM","QUERY","fkexn mikix`z itl","CT")
******0********
^W1REP("H","DPAYM","QUERY","fkexn mikix`z itl","FLD0")
-*-*-*-*-*-**-*******
^W1REP("H","DPAYM","QUERY","fkexn mikix`z itl","MIUN")
******1********
^W1REP("H","DPAYM","QUERY","fkexn mikix`z itl","SIK0")
******0**0*0*****
^W1REP("H","DPAYM","QUERY","fkexn mixvln itl","CT")
2******0********
^W1REP("H","DPAYM","QUERY","fkexn mixvln itl","FLD0")
*-*-*-*-*-**-*******
^W1REP("H","DPAYM","QUERY","fkexn mixvln itl","MIUN")
1**************
^W1REP("H","DPAYM","QUERY","fkexn mixvln itl","SIK0")
1******0********
^W1REP("H","DPAYM","QUERY","fkexn mixz`e mikix`z itl","CT")
***2***0********
^W1REP("H","DPAYM","QUERY","fkexn mixz`e mikix`z itl","FLD0")
-*-*-**-*-**-*******
^W1REP("H","DPAYM","QUERY","fkexn mixz`e mikix`z itl","MIUN")
***1***2********
^W1REP("H","DPAYM","QUERY","fkexn mixz`e mikix`z itl","SIK0")
***1***0********
^W1REP("H","DPAYM","QUERY","fkexn zecnre mikix`z itl","CT")
****2**0********
^W1REP("H","DPAYM","QUERY","fkexn zecnre mikix`z itl","FLD0")
-*-*-*-**-**-*******
^W1REP("H","DPAYM","QUERY","fkexn zecnre mikix`z itl","MIUN")
****1**2********
^W1REP("H","DPAYM","QUERY","fkexn zecnre mikix`z itl","SIK0")
****1**0********
^W1REP("H","DPAYM","QUERY","fkexn zecnre mixz` itl","CT")
***1*2**0********
^W1REP("H","DPAYM","QUERY","fkexn zecnre mixz` itl","FLD0")
-*-*-***-**-*******
^W1REP("H","DPAYM","QUERY","fkexn zecnre mixz` itl","MIUN")
***1*2**3********
^W1REP("H","DPAYM","QUERY","fkexn zecnre mixz` itl","SIK0")
***1*1**0********
^W1REP("H","DPAYM","QUERY","fkexn zecnre mixz` mikix`z itl","CT")
***2*0**2********
^W1REP("H","DPAYM","QUERY","fkexn zecnre mixz` mikix`z itl","FLD0")
-*-*-***-**-*******
^W1REP("H","DPAYM","QUERY","fkexn zecnre mixz` mikix`z itl","MIUN")
***2*3**1********
^W1REP("H","DPAYM","QUERY","fkexn zecnre mixz` mikix`z itl","SIK0")
***1*0**0********
^W1REP("H","DPAYM","QUERY","fkexn zepgleye zepgley ibeq itl","CT")
*1*0****0********
^W1REP("H","DPAYM","QUERY","fkexn zepgleye zepgley ibeq itl","FLD0")
-***-*-*-**-*******
^W1REP("H","DPAYM","QUERY","fkexn zepgleye zepgley ibeq itl","MIUN")
*1*2****3********
^W1REP("H","DPAYM","QUERY","fkexn zepgleye zepgley ibeq itl","SIK0")
*1*1****0********
^W1REP("H","DPAYM","QUERY","hxetn mikix`z itl","CT")
******2*0*******
^W1REP("H","DPAYM","QUERY","hxetn mikix`z itl","FLD0")
-*-*-*-*-*-*********
^W1REP("H","DPAYM","QUERY","hxetn mikix`z itl","MIUN")
******1*2*******
^W1REP("H","DPAYM","QUERY","hxetn mikix`z itl","SIK0")
******1*0*******
^W1REP("H","DPAYM","QUERY","hxetn mixvln itl","CT")
1******0*0*******
^W1REP("H","DPAYM","QUERY","hxetn mixvln itl","FLD0")
*-*-*-*-*-*********
^W1REP("H","DPAYM","QUERY","hxetn mixvln itl","MIUN")
1******2*3*******
^W1REP("H","DPAYM","QUERY","hxetn mixvln itl","SIK0")
1******2*0*******
^W1REP("H","DPAYM","QUERY","hxetn zecnre mikix`z itl","CT")
**0**2*0*1*0*******
^W1REP("H","DPAYM","QUERY","hxetn zecnre mikix`z itl","FLD0")
-*-**-***********
^W1REP("H","DPAYM","QUERY","hxetn zecnre mikix`z itl","MIUN")
**3**2*5*1*4*******
^W1REP("H","DPAYM","QUERY","hxetn zecnre mikix`z itl","SIK0")
**0**1*0*1*0*******
^W1REP("H","DPAYM","QUERY","hxetn zecnre mixz`e mikix`z itl","CT")
***2*2**2*0*******
^W1REP("H","DPAYM","QUERY","hxetn zecnre mixz`e mikix`z itl","FLD0")
-*-*-***-*********
^W1REP("H","DPAYM","QUERY","hxetn zecnre mixz`e mikix`z itl","MIUN")
***2*3**1*4*******
^W1REP("H","DPAYM","QUERY","hxetn zecnre mixz`e mikix`z itl","SIK0")
***1*1**1*0*******
^W1REP("H","DPAYM","QUERY","hxetn zepgleye zepgley ibeq itl","CT")
*1*2***0*0*0*******
^W1REP("H","DPAYM","QUERY","hxetn zepgleye zepgley ibeq itl","FLD0")
-***-*-**********
^W1REP("H","DPAYM","QUERY","hxetn zepgleye zepgley ibeq itl","MIUN")
*1*2***5*3*4*******
^W1REP("H","DPAYM","QUERY","hxetn zepgleye zepgley ibeq itl","SIK0")
*1*1***0*1*0*******
^W1REP("H","DPAYM","QUERY","hxetn zerye mikix`z itl","CT")
*****0*2*0*******
^W1REP("H","DPAYM","QUERY","hxetn zerye mikix`z itl","FLD0")
-*-*-*-*-**********
^W1REP("H","DPAYM","QUERY","hxetn zerye mikix`z itl","MIUN")
*****2*1*3*******
^W1REP("H","DPAYM","QUERY","hxetn zerye mikix`z itl","SIK0")
*****1*1*0*******
^W1REP("H","DPAYM","SIK")
1*1*1*1*1*1*1*
^W1REP("H","DPAYM","SIK0")
******0**0*0*****
^W1REP("H","DPAYM","US",-1)
D DATH^W4DPAYM
^W1REP("H","DPAYM","US",1)
D DATH^W4DPAYM
^W1REP("H","DPAYM","US",2)
D HZM^W4DPAYM
^W1REP("H","DPMH")
mixign itl zexikn
^W1REP("H","DPMH",0,"DAT")
jix`z;8D
^W1REP("H","DPMH",0,"DAT","SH")
1
^W1REP("H","DPMH",0,"DATT")
jix`z;8D
^W1REP("H","DPMH",0,"DATT","SET")
0
^W1REP("H","DPMH",0,"DATT","SH")
1
^W1REP("H","DPMH",0,"MH")
xign;7
^W1REP("H","DPMH",0,"MH","SH")
1
^W1REP("H","DPMH",0,"MH1")
xign;8
^W1REP("H","DPMH",0,"MH1","SET")
0
^W1REP("H","DPMH",0,"MH1","SH")
1
^W1REP("H","DPMH",0,"MHL")
dwlgn;5
^W1REP("H","DPMH",0,"MHL","FILE")
^|$$^%W1UCI(JB)|DEP
^W1REP("H","DPMH",0,"MHL","OUT")
MHL1
^W1REP("H","DPMH",0,"MHL","SET")
0
^W1REP("H","DPMH",0,"MHL1")
xe`z;12H
^W1REP("H","DPMH",0,"MHL1","SET")
0
^W1REP("H","DPMH",0,"MHL1","SH")
0
^W1REP("H","DPMH",0,"PARIT")
hixt cew;8
^W1REP("H","DPMH",0,"PARIT","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","DPMH",0,"PARIT","M2")
D PAR1^P1DPMH
^W1REP("H","DPMH",0,"PARIT","OUT")
PARIT1
^W1REP("H","DPMH",0,"PARIT","SET")
1
^W1REP("H","DPMH",0,"PARIT1")
hixt xe`z;18H
^W1REP("H","DPMH",0,"PARIT1","SET")
0
^W1REP("H","DPMH",0,"PARIT1","SH")
0
^W1REP("H","DPMH",0,"SUGP")
dveaw;5
^W1REP("H","DPMH",0,"SUGP","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","DPMH",0,"SUGP","OUT")
SUGP1
^W1REP("H","DPMH",0,"SUGP","SET")
0
^W1REP("H","DPMH",0,"SUGP1")
dveaw xe`z;12H
^W1REP("H","DPMH",0,"SUGP1","SET")
0
^W1REP("H","DPMH",0,"SUGP1","SH")
0
^W1REP("H","DPMH",0,"x1")
zenk;7,0
^W1REP("H","DPMH",0,"x2")
hixtl dgpd;6,1
^W1REP("H","DPMH",0,"x3")
zillk dgpd;9,1
^W1REP("H","DPMH",0,"x4")
mekq;9,1
^W1REP("H","DPMH",0,"x5")
n"rn iptl;9,1
^W1REP("H","DPMH",0,"x6")
;,
^W1REP("H","DPMH","COD")
MHL*MHL1*SUGP*SUGP1*PARIT*PARIT1*MH1*DATT*x1*x2*x3*x4*x5
^W1REP("H","DPMH","CT")
1*2*0*0*2*0*0
^W1REP("H","DPMH","FLD")
MHL*SUGP*PARIT*MH1*DATT*x1*x2*x3*x4*x5
^W1REP("H","DPMH","FLD0")
****-***
^W1REP("H","DPMH","GLOB1")
^|$$^%W1UCI(JB)|TEMPMH($P)
^W1REP("H","DPMH","GLOB2")
^|$$^%W1UCI(JB)|TEMPMH($P,DAT,MRK,PARIT,MH)
^W1REP("H","DPMH","LPT")
B
^W1REP("H","DPMH","MIUN")
1*2*3*4*3*4**0
^W1REP("H","DPMH","QUERY","iztewz","CT")
1*2*0*0*2*0*0
^W1REP("H","DPMH","QUERY","iztewz","FLD0")
****-***
^W1REP("H","DPMH","QUERY","iztewz","MIUN")
1*2*3*4*3*4**0
^W1REP("H","DPMH","QUERY","iztewz","SIK0")
1*1*0*0*1*0*0
^W1REP("H","DPMH","QUERY","mini itl hxetn","CT")
1*1*0*0*2*0*0
^W1REP("H","DPMH","QUERY","mini itl hxetn","FLD0")
*******
^W1REP("H","DPMH","QUERY","mini itl hxetn","MIUN")
1*2*4*5*3*4**0
^W1REP("H","DPMH","QUERY","mini itl hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("H","DPMH","QUERY","zeveaw `ll iztewz","CT")
1*2*0*0*2*0*0
^W1REP("H","DPMH","QUERY","zeveaw `ll iztewz","FLD0")
*-***-***
^W1REP("H","DPMH","QUERY","zeveaw `ll iztewz","MIUN")
1*2*2*3*3*4**0
^W1REP("H","DPMH","QUERY","zeveaw `ll iztewz","SIK0")
1*1*0*0*1*0*0
^W1REP("H","DPMH","QUERY","zewlgne zeveaw `ll iztewz","CT")
1*2*0*0*2*0*0
^W1REP("H","DPMH","QUERY","zewlgne zeveaw `ll iztewz","FLD0")
-*-***-***
^W1REP("H","DPMH","QUERY","zewlgne zeveaw `ll iztewz","MIUN")
1*2*1*2*3*4**0
^W1REP("H","DPMH","QUERY","zewlgne zeveaw `ll iztewz","SIK0")
1*1*0*0*1*0*0
^W1REP("H","DPMH","SHP","KOD")
DPMH
^W1REP("H","DPMH","SHP","PROG")
S MAS(5)=SSOAD
^W1REP("H","DPMH","SIK")
1*1*1*1*1**0*
^W1REP("H","DPMH","SIK0")
1*1*0*0*1*0*0
^W1REP("H","DPMH","US",-1)
D MH^P1DPMH
^W1REP("H","DPMH","US",0)
D PAR^P1DPMH
^W1REP("H","DPMH","US",1)
D MH^P1DPMH
^W1REP("H","DPMH","US",2)
D PAR^P1DPMH
^W1REP("H","DPMH","US",3)
D MH^P1DPMH
^W1REP("H","DPMH","US",4)
D PAR^P1DPMH
^W1REP("H","DPMH","US",5)
D MH^P1DPMH
^W1REP("H","DPMN")
mihixt zeny itl zexikn
^W1REP("H","DPMN",0,"DAT")
jix`z;8D
^W1REP("H","DPMN",0,"DAT","SH")
1
^W1REP("H","DPMN",0,"DATT")
jix`z;8D
^W1REP("H","DPMN",0,"DATT","SET")
0
^W1REP("H","DPMN",0,"DATT","SH")
1
^W1REP("H","DPMN",0,"MH")
xign;7
^W1REP("H","DPMN",0,"MH","SH")
1
^W1REP("H","DPMN",0,"MH1")
xign;8
^W1REP("H","DPMN",0,"MH1","SET")
0
^W1REP("H","DPMN",0,"MH1","SH")
1
^W1REP("H","DPMN",0,"MHL")
dwlgn;5
^W1REP("H","DPMN",0,"MHL","FILE")
^DEP
^W1REP("H","DPMN",0,"MHL","OUT")
MHL1
^W1REP("H","DPMN",0,"MHL","SET")
0
^W1REP("H","DPMN",0,"MHL1")
xe`z;12H
^W1REP("H","DPMN",0,"MHL1","SET")
0
^W1REP("H","DPMN",0,"MHL1","SH")
0
^W1REP("H","DPMN",0,"PARIT")
hixt cew;8
^W1REP("H","DPMN",0,"PARIT","FILE")
^PAR
^W1REP("H","DPMN",0,"PARIT","SET")
1
^W1REP("H","DPMN",0,"PARIT","SH")
1
^W1REP("H","DPMN",0,"PARIT1")
hixt xe`z;18H
^W1REP("H","DPMN",0,"PARIT1","SET")
1
^W1REP("H","DPMN",0,"PARIT1","SH")
1
^W1REP("H","DPMN",0,"SUGP")
dveaw;5
^W1REP("H","DPMN",0,"SUGP","FILE")
^PARSUG
^W1REP("H","DPMN",0,"SUGP","OUT")
SUGP1
^W1REP("H","DPMN",0,"SUGP","SET")
0
^W1REP("H","DPMN",0,"SUGP1")
dveaw xe`z;12H
^W1REP("H","DPMN",0,"SUGP1","SET")
0
^W1REP("H","DPMN",0,"SUGP1","SH")
0
^W1REP("H","DPMN",0,"x1")
zenk;7,0
^W1REP("H","DPMN",0,"x2")
dgpd;6,1
^W1REP("H","DPMN",0,"x3")
mekq;9,1
^W1REP("H","DPMN",0,"x4")
n"rn iptl;9,1
^W1REP("H","DPMN",0,"x5")
;,
^W1REP("H","DPMN","COD")
MHL*MHL1*SUGP*SUGP1*PARIT1*PARIT*MH1*DATT*x1*x2*x3*x4
^W1REP("H","DPMN","CT")
1*2*0*0*0*0*0
^W1REP("H","DPMN","FLD")
MHL*SUGP*PARIT1*PARIT*MH1*DATT*x1*x2*x3*x4
^W1REP("H","DPMN","FLD0")
*****-****
^W1REP("H","DPMN","GLOB1")
^TEMPMH($P)
^W1REP("H","DPMN","GLOB2")
^TEMPMH($P,DAT,MRK,PARIT1,PARIT,MH)
^W1REP("H","DPMN","LPT")
B
^W1REP("H","DPMN","MIUN")
1*2*3*4*5*4**0
^W1REP("H","DPMN","QUERY","iztewz","CT")
1*2*0*0*0*0*0
^W1REP("H","DPMN","QUERY","iztewz","FLD0")
*****-****
^W1REP("H","DPMN","QUERY","iztewz","MIUN")
1*2*3*4*5*4**0
^W1REP("H","DPMN","QUERY","iztewz","SIK0")
1*1*1*0*0*0*0
^W1REP("H","DPMN","QUERY","mini itl hxetn","CT")
1*2*0*0*0*0*0
^W1REP("H","DPMN","QUERY","mini itl hxetn","FLD0")
*******
^W1REP("H","DPMN","QUERY","mini itl hxetn","MIUN")
1*3*4*5*6*2**0
^W1REP("H","DPMN","QUERY","mini itl hxetn","SIK0")
1*1*1*0*0*0*0
^W1REP("H","DPMN","QUERY","zeveaw `ll iztewz","CT")
1*2*2*0*0*0*0
^W1REP("H","DPMN","QUERY","zeveaw `ll iztewz","FLD0")
*-****-****
^W1REP("H","DPMN","QUERY","zeveaw `ll iztewz","MIUN")
1*2*2*3*4*4**0
^W1REP("H","DPMN","QUERY","zeveaw `ll iztewz","SIK0")
1*1*1*0*0*0*0
^W1REP("H","DPMN","QUERY","zewlgne zeveaw `ll iztewz","CT")
1*2*0*0*0*0*0
^W1REP("H","DPMN","QUERY","zewlgne zeveaw `ll iztewz","FLD0")
-*-****-****
^W1REP("H","DPMN","QUERY","zewlgne zeveaw `ll iztewz","MIUN")
1*2*1*2*3*4**0
^W1REP("H","DPMN","QUERY","zewlgne zeveaw `ll iztewz","SIK0")
1*1*1*0*0*0*0
^W1REP("H","DPMN","SHP","KOD")
DPMH
^W1REP("H","DPMN","SHP","PROG")
S MAS(5)=SSOAD
^W1REP("H","DPMN","SIK")
1*1*1*1**1*0*
^W1REP("H","DPMN","SIK0")
1*1*1*0*0*0*0
^W1REP("H","DPMN","US",2)
D DAT^P1DPMH
^W1REP("H","DPMN","US",6)
D MH^P1DPMN
^W1REP("H","DPNO")
exknp `ly mihixt g"ec
^W1REP("H","DPNO",0,"PAR")
hixt 'qn;8
^W1REP("H","DPNO",0,"PAR","FILE")
^PAR
^W1REP("H","DPNO",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","DPNO",0,"PAR","OUT")
PAR1
^W1REP("H","DPNO",0,"PAR1")
hixt my;24H
^W1REP("H","DPNO",0,"PAR1","SH")
1
^W1REP("H","DPNO",0,"TRH")
jix`z;8D
^W1REP("H","DPNO",0,"TRH","SH")
1
^W1REP("H","DPNO",0,"x1")
xign;8,2
^W1REP("H","DPNO",0,"x2")
;,
^W1REP("H","DPNO","COD")
TRH*PAR*PAR1*x1
^W1REP("H","DPNO","CT")
0*0
^W1REP("H","DPNO","FLD")
TRH*PAR*x1
^W1REP("H","DPNO","FLD0")
-**
^W1REP("H","DPNO","GLOB1")
^PAR
^W1REP("H","DPNO","GLOB2")
^PAR(PAR)
^W1REP("H","DPNO","LPT")
B
^W1REP("H","DPNO","MIUN")
1*1
^W1REP("H","DPNO","SIK")
*
^W1REP("H","DPNO","SIK0")
0*0
^W1REP("H","DPNO","US",-1)
D PAR^P1DPNO
^W1REP("H","DPNO","US",1)
D PAR^P1DPNO
^W1REP("H","DPSP")
zeveaw itl mihixt g"ec
^W1REP("H","DPSP",0,"PAR")
hixt cew;8
^W1REP("H","DPSP",0,"PAR","M2")
S PRT1=$$SHEM^P1P(PAR)
^W1REP("H","DPSP",0,"PAR","OUT")
PRT1
^W1REP("H","DPSP",0,"PRT")
hixt 'qn;8
^W1REP("H","DPSP",0,"PRT","FILE")
^PAR
^W1REP("H","DPSP",0,"PRT","M2")
D PRT1^P1DPSP
^W1REP("H","DPSP",0,"PRT","OUT")
PRT1
^W1REP("H","DPSP",0,"PRT1")
hixt xe`z;20H
^W1REP("H","DPSP",0,"PRT1","SH")
0
^W1REP("H","DPSP",0,"SUGP")
mihixt zveaw;5
^W1REP("H","DPSP",0,"SUGP","FILE")
^PARSUG
^W1REP("H","DPSP",0,"SUGP","OUT")
SUGP1
^W1REP("H","DPSP",0,"SUGP1")
dveaw xe`z;8
^W1REP("H","DPSP",0,"SUGP1","SH")
0
^W1REP("H","DPSP",0,"TRH")
jix`z;8D
^W1REP("H","DPSP",0,"TRH","SH")
1
^W1REP("H","DPSP",0,"x1")
zenk;5,0
^W1REP("H","DPSP",0,"x2")
mekq;8,2
^W1REP("H","DPSP",0,"x3")
dgpd;7,2
^W1REP("H","DPSP",0,"x4")
ehp k"dq;8,2
^W1REP("H","DPSP",0,"x5")
oexg` xign;7,2
^W1REP("H","DPSP",0,"x6")
dveawn %;5,2
^W1REP("H","DPSP",0,"x7")
ehp k"dqn%;8,2
^W1REP("H","DPSP",0,"x8")
;,
^W1REP("H","DPSP","COD")
SUGP*SUGP1*PRT*PRT1*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","DPSP","CT")
2*0*0
^W1REP("H","DPSP","FLD")
SUGP*PRT*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","DPSP","FLD0")
*******-*-
^W1REP("H","DPSP","GLOB1")
^VRM($J)
^W1REP("H","DPSP","GLOB2")
^VRM($J,SUGP,PRT)
^W1REP("H","DPSP","LPT")
B
^W1REP("H","DPSP","MIUN")
1*2*3
^W1REP("H","DPSP","SHP","KOD")
DPSP
^W1REP("H","DPSP","SIK")
1*1*1*1****
^W1REP("H","DPSP","SIK0")
1*0*0
^W1REP("H","DPSP","US",3)
D PRT^P1DPSP
^W1REP("H","HBMK")
dlaw 'qn zeipeayg g"ec
^W1REP("H","HBMK",0,"HB")
dlaw qn 'ayg;9
^W1REP("H","HBMK",0,"HB","SH")
1
^W1REP("H","HBMK",0,"HZM")
dpnfd;8
^W1REP("H","HBMK",0,"HZM","SH")
1
^W1REP("H","HBMK",0,"MLZ")
xvln 'qn;5
^W1REP("H","HBMK",0,"MLZ","FILE")
^NAME
^W1REP("H","HBMK",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^W1REP("H","HBMK",0,"MLZ","OUT")
MLZ1
^W1REP("H","HBMK",0,"MLZ1")
xvln my;12H
^W1REP("H","HBMK",0,"MLZ1","SH")
1
^W1REP("H","HBMK",0,"NMB")
ogley;8
^W1REP("H","HBMK",0,"NMB","SH")
1
^W1REP("H","HBMK",0,"SHAA")
dry;5
^W1REP("H","HBMK",0,"SHAA","SH")
1
^W1REP("H","HBMK",0,"SHULH")
ogley;5
^W1REP("H","HBMK",0,"SHULH","SH")
1
^W1REP("H","HBMK",0,"SUGS")
ogley beq;5
^W1REP("H","HBMK",0,"SUGS","FILE")
^SUGS
^W1REP("H","HBMK",0,"SUGS","OUT")
SUGS1
^W1REP("H","HBMK",0,"SUGS1")
beq xe`z;6H
^W1REP("H","HBMK",0,"SUGS1","SH")
1
^W1REP("H","HBMK",0,"TRH")
jix`z;8D
^W1REP("H","HBMK",0,"TRH","SH")
1
^W1REP("H","HBMK",0,"TRHT")
jix`z;8D
^W1REP("H","HBMK",0,"TRHT","SH")
1
^W1REP("H","HBMK",0,"x1")
melyzl;8,2
^W1REP("H","HBMK",0,"x2")
onefn;8,2
^W1REP("H","HBMK",0,"x3")
wiy;8,2
^W1REP("H","HBMK",0,"x4")
`"k;8,2
^W1REP("H","HBMK",0,"x5")
dtwd;8,2
^W1REP("H","HBMK",0,"x6")
yelz;8,2
^W1REP("H","HBMK",0,"x7")
tih;7,2
^W1REP("H","HBMK",0,"x8")
;,
^W1REP("H","HBMK","COD")
TRHT*HB*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","HBMK","CT")
2*0*0*0*0*0
^W1REP("H","HBMK","FLD")
TRHT*HB*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","HBMK","FLD0")
********-*
^W1REP("H","HBMK","GLOB1")
^P1HBI
^W1REP("H","HBMK","GLOB2")
^P1HBI(DATH,HB)
^W1REP("H","HBMK","LPT")
B
^W1REP("H","HBMK","MIUN")
1*2*3*4*2*3
^W1REP("H","HBMK","QUERY","hxetn zepgleye zepgley ibeq itl","CT")
1*1*2*0*0*0
^W1REP("H","HBMK","QUERY","hxetn zepgleye zepgley ibeq itl","FLD0")
-***-********-*
^W1REP("H","HBMK","QUERY","hxetn zepgleye zepgley ibeq itl","MIUN")
1*1*2*4*3*4
^W1REP("H","HBMK","QUERY","hxetn zepgleye zepgley ibeq itl","SIK0")
1*1*1*0*0*0
^W1REP("H","HBMK","SIK")
1*1*1*1*1*1*1*
^W1REP("H","HBMK","SIK0")
1*0*0*0*0*0
^W1REP("H","HBMK","US",-1)
D DATH^P1HBMK
^W1REP("H","HBMK","US",1)
D DATH^P1HBMK
^W1REP("H","HBMK","US",2)
D HB^P1HBMK
^W1REP("H","HNHS")
zeaiq itl zegpd g"ec
^W1REP("H","HNHS",0,"HZM")
dpnfd;7
^W1REP("H","HNHS",0,"HZM","SET")
1
^W1REP("H","HNHS",0,"HZM","SH")
1
^W1REP("H","HNHS",0,"MLZR")
xvln;5
^W1REP("H","HNHS",0,"MLZR","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","HNHS",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("H","HNHS",0,"MLZR","OUT")
MLZR1
^W1REP("H","HNHS",0,"MLZR","SET")
1
^W1REP("H","HNHS",0,"MLZR1")
xvln my;10H
^W1REP("H","HNHS",0,"MLZR1","SET")
0
^W1REP("H","HNHS",0,"MLZR1","SH")
1
^W1REP("H","HNHS",0,"PAR")
hixt 'qn;8
^W1REP("H","HNHS",0,"PAR","FILE")
^PAR
^W1REP("H","HNHS",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","HNHS",0,"PAR","OUT")
PAR1
^W1REP("H","HNHS",0,"PAR","SET")
1
^W1REP("H","HNHS",0,"PAR1")
hixt xe`z;16H
^W1REP("H","HNHS",0,"PAR1","SET")
0
^W1REP("H","HNHS",0,"PAR1","SH")
1
^W1REP("H","HNHS",0,"SHAA")
dryl;5
^W1REP("H","HNHS",0,"SHAA","SET")
1
^W1REP("H","HNHS",0,"SHAA","SH")
1
^W1REP("H","HNHS",0,"SIBA")
daiq xe`z;24H
^W1REP("H","HNHS",0,"SIBA","SET")
1
^W1REP("H","HNHS",0,"SIBA","SH")
1
^W1REP("H","HNHS",0,"SIBA1")
daiq xe`z;10H
^W1REP("H","HNHS",0,"SIBA1","SET")
0
^W1REP("H","HNHS",0,"SIBA1","SH")
1
^W1REP("H","HNHS",0,"TRH")
jix`z;8D
^W1REP("H","HNHS",0,"TRH","SET")
0
^W1REP("H","HNHS",0,"TRH","SH")
1
^W1REP("H","HNHS",0,"x1")
dgpd iptl;9,2
^W1REP("H","HNHS",0,"x2")
dgpd;9,2
^W1REP("H","HNHS",0,"x3")
dgpd ixg`;9,2
^W1REP("H","HNHS",0,"x4")
%-a;6,2
^W1REP("H","HNHS",0,"x5")
;,
^W1REP("H","HNHS","COD")
SIBA*MLZR*MLZR1*TRH*SHAA*HZM*x1*x2*x3
^W1REP("H","HNHS","CT")
0*0*0*0*0*0
^W1REP("H","HNHS","FLD")
SIBA*MLZR*TRH*SHAA*HZM*x1*x2*x3
^W1REP("H","HNHS","FLD0")
*-**-****
^W1REP("H","HNHS","GLOB1")
^|$$^%W1UCI(JB)|VRM($J)
^W1REP("H","HNHS","GLOB2")
^|$$^%W1UCI(JB)|VRM($J,SIBA,MLZR,DT,SHAA,HZM)
^W1REP("H","HNHS","LPT")
B
^W1REP("H","HNHS","MIUN")
2*2*1*2*3*4
^W1REP("H","HNHS","MIUN","PROG")
TRH^P1DPHNHS
^W1REP("H","HNHS","QUERY","1.       mikix`z itl zeaiq","CT")
0*0*0*0*0*0
^W1REP("H","HNHS","QUERY","1.       mikix`z itl zeaiq","FLD0")
*-**-****
^W1REP("H","HNHS","QUERY","1.       mikix`z itl zeaiq","MIUN")
1*2*2*2*3*4
^W1REP("H","HNHS","QUERY","1.       mikix`z itl zeaiq","SIK0")
1*0*0*0*0*1
^W1REP("H","HNHS","QUERY","2.       zeaiq itl mikix`z","CT")
0*0*0*0*0*0
^W1REP("H","HNHS","QUERY","2.       zeaiq itl mikix`z","FLD0")
*-**-****
^W1REP("H","HNHS","QUERY","2.       zeaiq itl mikix`z","MIUN")
2*2*1*2*3*4
^W1REP("H","HNHS","QUERY","2.       zeaiq itl mikix`z","SIK0")
1*0*1*0*0*1
^W1REP("H","HNHS","QUERY","3.        mixvln itl zeaiq","CT")
2*0*0*0*0*0
^W1REP("H","HNHS","QUERY","3.        mixvln itl zeaiq","FLD0")
***-****
^W1REP("H","HNHS","QUERY","3.        mixvln itl zeaiq","MIUN")
1*2*3*2*4*5
^W1REP("H","HNHS","QUERY","3.        mixvln itl zeaiq","SIK0")
1*1*0*0*0*0
^W1REP("H","HNHS","QUERY","4.        zeaiq itl mixvln","CT")
0*2*0*0*0*0
^W1REP("H","HNHS","QUERY","4.        zeaiq itl mixvln","FLD0")
***-****
^W1REP("H","HNHS","QUERY","4.        zeaiq itl mixvln","MIUN")
2*1*3*2*4*5
^W1REP("H","HNHS","QUERY","4.        zeaiq itl mixvln","SIK0")
1*1*1*0*0*0
^W1REP("H","HNHS","SIK")
1*1*1**
^W1REP("H","HNHS","SIK0")
1*0*1*0*0*1
^W1REP("H","HNHS","US",4)
S TRH=$$^%L1DC(DT,1)
^W1REP("H","HNHS","US",6)
D HZM^P1DPHNHS
^W1REP("H","HZCA")
`"k itl zepnfd g"ec
^W1REP("H","HZCA",0,"HB")
zipeayg;8
^W1REP("H","HZCA",0,"HZM")
dpnfd;7
^W1REP("H","HZCA",0,"HZM","SH")
1
^W1REP("H","HZCA",0,"LKH")
gewl 'qn;10
^W1REP("H","HZCA",0,"LKH","FILE")
^LKH
^W1REP("H","HZCA",0,"LKH","OUT")
LKH1
^W1REP("H","HZCA",0,"LKH1")
gewl my;20H
^W1REP("H","HZCA",0,"MKBL")
xvln;5
^W1REP("H","HZCA",0,"MKBL","FILE")
^NAME
^W1REP("H","HZCA",0,"MKBL","M2")
S MKBL1=$$^P1NAME(MKBL)
^W1REP("H","HZCA",0,"MKBL","OUT")
MKBL1
^W1REP("H","HZCA",0,"MKBL1")
xvln my;12H
^W1REP("H","HZCA",0,"MKBL1","SH")
0
^W1REP("H","HZCA",0,"MLZR")
xvln 'qn;5
^W1REP("H","HZCA",0,"MLZR",2)
I MLZR S MLZR1=$G(^NAME(MLZR,1))
^W1REP("H","HZCA",0,"MLZR","OUT")
MLZR1
^W1REP("H","HZCA",0,"MLZR1")
xvln my;12H
^W1REP("H","HZCA",0,"MLZR1","SH")
1
^W1REP("H","HZCA",0,"NAME")
gewl my;12H
^W1REP("H","HZCA",0,"NAME","SH")
1
^W1REP("H","HZCA",0,"NCAB")
zipeayg;6
^W1REP("H","HZCA",0,"NCAB","SH")
0
^W1REP("H","HZCA",0,"NMB")
ogley;5
^W1REP("H","HZCA",0,"NMB","SH")
1
^W1REP("H","HZCA",0,"PSL")
gily cew;3
^W1REP("H","HZCA",0,"PSL","FILE")
^P1SL
^W1REP("H","HZCA",0,"PSL","OUT")
PSL1
^W1REP("H","HZCA",0,"PSL1")
gily my;10H
^W1REP("H","HZCA",0,"PSL1","SH")
1
^W1REP("H","HZCA",0,"SHAA")
dry;5
^W1REP("H","HZCA",0,"SHAA","SH")
1
^W1REP("H","HZCA",0,"SL")
gily cew;5
^W1REP("H","HZCA",0,"SL","FILE")
^P1SL
^W1REP("H","HZCA",0,"SL","OUT")
SL1
^W1REP("H","HZCA",0,"SL1")
gily my;12H
^W1REP("H","HZCA",0,"SOAD")
micreq;6
^W1REP("H","HZCA",0,"SOAD","SH")
1
^W1REP("H","HZCA",0,"SUGS")
ogley beq;8
^W1REP("H","HZCA",0,"SUGS","FILE")
^SUGS
^W1REP("H","HZCA",0,"SUGS","OUT")
SUGS1
^W1REP("H","HZCA",0,"SUGS1")
xe`z;12H
^W1REP("H","HZCA",0,"SUGS1","SH")
1
^W1REP("H","HZCA",0,"SUGT")
melyz beq;9
^W1REP("H","HZCA",0,"SUGT","SH")
1
^W1REP("H","HZCA",0,"TRH")
jix`z;8D
^W1REP("H","HZCA",0,"TRH","SH")
1
^W1REP("H","HZCA",0,"TS")
melyzl;8
^W1REP("H","HZCA",0,"TSHL")
melyzl;8
^W1REP("H","HZCA",0,"TSHL","OUT")
TSHL
^W1REP("H","HZCA",0,"x1")
milehia;9,2
^W1REP("H","HZCA",0,"x2")
zegpd;9,2
^W1REP("H","HZCA",0,"x3")
melyzl;9,2
^W1REP("H","HZCA",0,"x4")
micreq;6,0
^W1REP("H","HZCA",0,"x5")
;,
^W1REP("H","HZCA","COD")
TRH*HZM*SHAA*CA*x1
^W1REP("H","HZCA","CT")
0*0*0*0*0*0*0*0
^W1REP("H","HZCA","FLD")
MKBL*SUGS*NMB*TRH*SHAA*HZM*SUGT*x1*x2*x3*x4
^W1REP("H","HZCA","FLD0")
-*-*-*****-*-**-
^W1REP("H","HZCA","GLOB1")
^P1H
^W1REP("H","HZCA","GLOB2")
^P1H(DATH,HZM)
^W1REP("H","HZCA","LPT")
B
^W1REP("H","HZCA","MIUN")
2*3*4*2*4*3*1*7
^W1REP("H","HZCA","QUERY","dpnfd 'qn itl","CT")
0*0*0*0*0*0*0*0
^W1REP("H","HZCA","QUERY","dpnfd 'qn itl","FLD0")
*-*****-*-*-**
^W1REP("H","HZCA","QUERY","dpnfd 'qn itl","MIUN")
2*3*4*3*5*1*6*7
^W1REP("H","HZCA","QUERY","dpnfd 'qn itl","SIK0")
0*0*0*0*0*0*0*0
^W1REP("H","HZCA","QUERY","ogley beq itl","CT")
2*1*0*0*0*0*0
^W1REP("H","HZCA","QUERY","ogley beq itl","FLD0")
-******-****
^W1REP("H","HZCA","QUERY","ogley beq itl","MIUN")
3*1*2*3*4*5*6
^W1REP("H","HZCA","QUERY","ogley beq itl","SIK0")
0*1*1*0*0*0*0
^W1REP("H","HZCA","QUERY","xvln 'qn itl","CT")
1*0*0*0*0*0*0
^W1REP("H","HZCA","QUERY","xvln 'qn itl","FLD0")
*-*****-****
^W1REP("H","HZCA","QUERY","xvln 'qn itl","MIUN")
1*3*2*3*5*4*6
^W1REP("H","HZCA","QUERY","xvln 'qn itl","SIK0")
1*0*0*0*0*0*0
^W1REP("H","HZCA","SHP","KOD")
P1HZH
^W1REP("H","HZCA","SIK")
1*1*1*1*
^W1REP("H","HZCA","SIK0")
0*0*0*1*0*0*1*0
^W1REP("H","HZCA","US",-1)
D TRH^P1HZHC
^W1REP("H","HZCA","US",0)
D HZM^P1HZHC
^W1REP("H","HZCA","US",1)
D TRH^P1HZHC
^W1REP("H","HZCA","US",2)
D HZM^P1HZHC
^W1REP("H","HZH")
migelyn zepnfd g"ec
^W1REP("H","HZH",0,"AZOR")
xef`;4
^W1REP("H","HZH",0,"AZOR","FILE")
^|$$^W3MAIN|TMPAZ
^W1REP("H","HZH",0,"AZOR","OUT")
AZOR1
^W1REP("H","HZH",0,"AZOR","SET")
0
^W1REP("H","HZH",0,"AZOR1")
xef` xe`z;12H
^W1REP("H","HZH",0,"AZOR1","SET")
0
^W1REP("H","HZH",0,"AZOR1","SH")
1
^W1REP("H","HZH",0,"HB")
zipeayg;8
^W1REP("H","HZH",0,"HZM")
dpnfd;7
^W1REP("H","HZH",0,"HZM","SET")
0
^W1REP("H","HZH",0,"HZM","SH")
1
^W1REP("H","HZH",0,"HZMLAK")
dzknq`;8
^W1REP("H","HZH",0,"HZMLAK","SET")
0
^W1REP("H","HZH",0,"HZMLAK","SH")
1
^W1REP("H","HZH",0,"IR")
xir;12H
^W1REP("H","HZH",0,"IR","FILE")
^|$$^%W1UCI(JB)|P1IR
^W1REP("H","HZH",0,"IR","SET")
0
^W1REP("H","HZH",0,"IR","SH")
1
^W1REP("H","HZH",0,"LKH")
gewl 'qn;10
^W1REP("H","HZH",0,"LKH","FILE")
^LKH
^W1REP("H","HZH",0,"LKH","OUT")
LKH1
^W1REP("H","HZH",0,"LKH1")
gewl my;20H
^W1REP("H","HZH",0,"MKBL")
lawn 'qn;8
^W1REP("H","HZH",0,"MKBL","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","HZH",0,"MKBL","M2")
S MKBL1=$$^W4NAME(MKBL)
^W1REP("H","HZH",0,"MKBL","OUT")
MKBL1
^W1REP("H","HZH",0,"MKBL","SET")
0
^W1REP("H","HZH",0,"MKBL1")
lawnd my;12H
^W1REP("H","HZH",0,"MKBL1","SET")
0
^W1REP("H","HZH",0,"MKBL1","SH")
1
^W1REP("H","HZH",0,"MKR")
xewn;2
^W1REP("H","HZH",0,"MKR","FILE")
^|$$^%W1UCI(JB)|W3MKR
^W1REP("H","HZH",0,"MKR","OUT")
MKR1
^W1REP("H","HZH",0,"MKR","SET")
0
^W1REP("H","HZH",0,"MKR1")
xewn xe`z;10H
^W1REP("H","HZH",0,"MKR1","SET")
0
^W1REP("H","HZH",0,"MKR1","SH")
1
^W1REP("H","HZH",0,"NAME")
gewl my;12H
^W1REP("H","HZH",0,"NAME","SET")
0
^W1REP("H","HZH",0,"NAME","SH")
1
^W1REP("H","HZH",0,"NCAB")
zipeayg;6
^W1REP("H","HZH",0,"NCAB","SH")
0
^W1REP("H","HZH",0,"NMB")
gewl xtqn;12
^W1REP("H","HZH",0,"NMB","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","HZH",0,"NMB","OUT")
NAME
^W1REP("H","HZH",0,"NMB","SET")
0
^W1REP("H","HZH",0,"PSL")
gily cew;3
^W1REP("H","HZH",0,"PSL","FILE")
^|$$^%W1UCI(JB)|P1SL
^W1REP("H","HZH",0,"PSL","OUT")
PSL1
^W1REP("H","HZH",0,"PSL","SET")
0
^W1REP("H","HZH",0,"PSL1")
gily my;10H
^W1REP("H","HZH",0,"PSL1","SET")
0
^W1REP("H","HZH",0,"PSL1","SH")
1
^W1REP("H","HZH",0,"SHAA")
dryl;5
^W1REP("H","HZH",0,"SHAA","SET")
0
^W1REP("H","HZH",0,"SHAA","SH")
1
^W1REP("H","HZH",0,"SL")
gily cew;5
^W1REP("H","HZH",0,"SL","FILE")
^P1SL
^W1REP("H","HZH",0,"SL","OUT")
SL1
^W1REP("H","HZH",0,"SL1")
gily my;12H
^W1REP("H","HZH",0,"SUGT")
melyz cew;4
^W1REP("H","HZH",0,"SUGT","FILE")
^|$$^%W1UCI(JB)|W3SUGTS
^W1REP("H","HZH",0,"SUGT","M2")
S SUGT1=$$SUGT1^W4HZHC(SUGT)
^W1REP("H","HZH",0,"SUGT","OUT")
SUGT1
^W1REP("H","HZH",0,"SUGT","SET")
0
^W1REP("H","HZH",0,"SUGT1")
melyz beq;8H
^W1REP("H","HZH",0,"SUGT1","SET")
0
^W1REP("H","HZH",0,"SUGT1","SH")
1
^W1REP("H","HZH",0,"TRH")
jix`z;8D
^W1REP("H","HZH",0,"TRH","SET")
0
^W1REP("H","HZH",0,"TRH","SH")
1
^W1REP("H","HZH",0,"TS")
melyzl;8
^W1REP("H","HZH",0,"TSHL")
melyzl;8
^W1REP("H","HZH",0,"TSHL","OUT")
TSHL
^W1REP("H","HZH",0,"x1")
zexy inc;7,2
^W1REP("H","HZH",0,"x2")
melyzl;8,2
^W1REP("H","HZH",0,"x3")
zenk;5,0
^W1REP("H","HZH",0,"x4")
tih;6,2
^W1REP("H","HZH",0,"x5")
;,
^W1REP("H","HZH","COD")
PSL*PSL1*MKBL*MKBL1*MKR*MKR1*NMB*NAME*HZMLAK*IR*AZOR*AZOR1*TRH*SHAA*HZM*SUGT*SUGT1*x1*x2*x3*x4
^W1REP("H","HZH","CT")
*2**0*0*0*0*0*0*0*0**
^W1REP("H","HZH","FLD")
PSL*MKBL*MKR*NMB*HZMLAK*IR*AZOR*TRH*SHAA*HZM*SUGT*x1*x2*x3*x4
^W1REP("H","HZH","FLD0")
-**-**********
^W1REP("H","HZH","GLOB1")
^|$$^%W1UCI(JB)|W4LINKD
^W1REP("H","HZH","GLOB2")
^|$$^%W1UCI(JB)|W4LINKD(DATH,HZM)
^W1REP("H","HZH","LPT")
B
^W1REP("H","HZH","MAM")
1*1**1*
^W1REP("H","HZH","MIUN")
*1**5*7*3*4*2*6*8*9**
^W1REP("H","HZH","QUERY","dpnfd ilawn itl oein","CT")
*2**0*0*0*0*0*0*0*0**
^W1REP("H","HZH","QUERY","dpnfd ilawn itl oein","FLD0")
-**-**********
^W1REP("H","HZH","QUERY","dpnfd ilawn itl oein","MIUN")
*1**5*7*3*4*2*6*8*9**
^W1REP("H","HZH","QUERY","dpnfd ilawn itl oein","SIK0")
*1**0*0*0*0*1*0*0*0**
^W1REP("H","HZH","QUERY","migily itl oein","CT")
2***0*0*0*0*0*0*0*0**
^W1REP("H","HZH","QUERY","migily itl oein","FLD0")
*-*-**********
^W1REP("H","HZH","QUERY","migily itl oein","MIUN")
1***7*8*3*4*2*5*6*9**
^W1REP("H","HZH","QUERY","migily itl oein","SIK0")
1***0*0*1*0*1*0*0*0**
^W1REP("H","HZH","QUERY","mixef`e mixr mikix`z itl oein","CT")
***0*0*0*0*2*0*0*0**
^W1REP("H","HZH","QUERY","mixef`e mixr mikix`z itl oein","FLD0")
-*-*-**********
^W1REP("H","HZH","QUERY","mixef`e mixr mikix`z itl oein","MIUN")
***4*5*2*3*1*6*7*8**
^W1REP("H","HZH","QUERY","mixef`e mixr mikix`z itl oein","SIK0")
***0*0*0*0*1*0*0*0**
^W1REP("H","HZH","QUERY","mixr itl oein","CT")
***0*0*2*2*0*0*0*0**
^W1REP("H","HZH","QUERY","mixr itl oein","FLD0")
-*-*-**********
^W1REP("H","HZH","QUERY","mixr itl oein","MIUN")
***3*4*1*2*5*6*7*8**
^W1REP("H","HZH","QUERY","mixr itl oein","SIK0")
***0*0*1*1*0*0*0*0**
^W1REP("H","HZH","QUERY","mixre migily itl oein","CT")
2*****0*0*0**0****
^W1REP("H","HZH","QUERY","mixre migily itl oein","FLD0")
*-*-*-*-****-**-***
^W1REP("H","HZH","QUERY","mixre migily itl oein","MIUN")
1*****2*4*3**5****
^W1REP("H","HZH","QUERY","mixre migily itl oein","SIK0")
1*****1*0*0**0****
^W1REP("H","HZH","QUERY","xewn itl oein","CT")
**2*0*0*0*0*0*0*0*0**
^W1REP("H","HZH","QUERY","xewn itl oein","FLD0")
-*-***********
^W1REP("H","HZH","QUERY","xewn itl oein","MIUN")
**1*5*8*3*4*2*6*7*9**
^W1REP("H","HZH","QUERY","xewn itl oein","SIK0")
**1*0*0*0*0*1*0*0*0**
^W1REP("H","HZH","QUERY","zegewl itl oein","CT")
***2*0*0*0*0*0*0*0**
^W1REP("H","HZH","QUERY","zegewl itl oein","FLD0")
-*-*-**********
^W1REP("H","HZH","QUERY","zegewl itl oein","MIUN")
***1*5*3*4*2*6*7*8**
^W1REP("H","HZH","QUERY","zegewl itl oein","SIK0")
***1*0*0*0*0*0*0*0**
^W1REP("H","HZH","QUERY","zepnfde mikix`z itl oein","CT")
***0*0*0*0*2*0*0*0**
^W1REP("H","HZH","QUERY","zepnfde mikix`z itl oein","FLD0")
-*-*-**********
^W1REP("H","HZH","QUERY","zepnfde mikix`z itl oein","MIUN")
***3*5*6*7*1*4*2*8**
^W1REP("H","HZH","QUERY","zepnfde mikix`z itl oein","SIK0")
***0*0*0*0*1*0*0*0**
^W1REP("H","HZH","QUERY","zerye mikix`z itl oein","CT")
***0*0*0*0*0*0*0*0**
^W1REP("H","HZH","QUERY","zerye mikix`z itl oein","FLD0")
-*-*-**********
^W1REP("H","HZH","QUERY","zerye mikix`z itl oein","MIUN")
***5*6*3*4*1*2*7*8**
^W1REP("H","HZH","QUERY","zerye mikix`z itl oein","SIK0")
***0*0*0*0*1*0*0*0**
^W1REP("H","HZH","SIK")
1*1*1*1*
^W1REP("H","HZH","SIK0")
*1**0*0*0*0*1*0*0*0**
^W1REP("H","HZH","US",-1)
D TRH^W4HZHC
^W1REP("H","HZH","US",0)
D HZM^P1HZHC
^W1REP("H","HZH","US",1)
D TRH^W4HZHC
^W1REP("H","HZH","US",2)
D HZM^W4HZHC
^W1REP("H","HZHL")
zepnfd itl dtwd zegewl g"ec
^W1REP("H","HZHL",0,"ASM")
`zknq`;8
^W1REP("H","HZHL",0,"ASM","SET")
0
^W1REP("H","HZHL",0,"ASM","SH")
1
^W1REP("H","HZHL",0,"HB")
dtwd oeayg;8N
^W1REP("H","HZHL",0,"HB","SET")
1
^W1REP("H","HZHL",0,"HB","SH")
1
^W1REP("H","HZHL",0,"HZM")
dpnfd;7
^W1REP("H","HZHL",0,"HZM","SET")
0
^W1REP("H","HZHL",0,"HZM","SH")
1
^W1REP("H","HZHL",0,"LKH")
gewl 'qn;11
^W1REP("H","HZHL",0,"LKH","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","HZHL",0,"LKH","OUT")
LKH1
^W1REP("H","HZHL",0,"LKH","SET")
0
^W1REP("H","HZHL",0,"LKH1")
gewl my;12
^W1REP("H","HZHL",0,"LKH1","SET")
0
^W1REP("H","HZHL",0,"LKH1","SH")
1
^W1REP("H","HZHL",0,"LKHR")
iy`x gewl;10
^W1REP("H","HZHL",0,"LKHR","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","HZHL",0,"LKHR","OUT")
LKHR1
^W1REP("H","HZHL",0,"LKHR","SET")
0
^W1REP("H","HZHL",0,"LKHR1")
gewl my;12H
^W1REP("H","HZHL",0,"LKHR1","SET")
0
^W1REP("H","HZHL",0,"LKHR1","SH")
1
^W1REP("H","HZHL",0,"SUGL")
zegewl zveaw;8
^W1REP("H","HZHL",0,"SUGL","FILE")
^|$$^%W1UCI(JB)|SUGL
^W1REP("H","HZHL",0,"SUGL","OUT")
SUGL1
^W1REP("H","HZHL",0,"SUGL","SET")
0
^W1REP("H","HZHL",0,"SUGL1")
dveaw xe`z;12H
^W1REP("H","HZHL",0,"SUGL1","SET")
0
^W1REP("H","HZHL",0,"SUGL1","SH")
1
^W1REP("H","HZHL",0,"SUGORD")
dpnfd beq;1
^W1REP("H","HZHL",0,"SUGORD","FILE")
^|$$^%W1UCI(JB)|W4SUGORD
^W1REP("H","HZHL",0,"SUGORD","OUT")
SUGORD1
^W1REP("H","HZHL",0,"SUGORD","SET")
0
^W1REP("H","HZHL",0,"SUGORD1")
beq xe`z;8
^W1REP("H","HZHL",0,"SUGORD1","SET")
0
^W1REP("H","HZHL",0,"SUGORD1","SH")
1
^W1REP("H","HZHL",0,"TRH")
jix`z;8D
^W1REP("H","HZHL",0,"TRH","SET")
0
^W1REP("H","HZHL",0,"TRH","SH")
1
^W1REP("H","HZHL",0,"x1")
ehexa;8,2
^W1REP("H","HZHL",0,"x2")
dgpd;7,2
^W1REP("H","HZHL",0,"x3")
gelyn inc;8,2
^W1REP("H","HZHL",0,"x4")
melyzl;8,2
^W1REP("H","HZHL",0,"x5")
;,
^W1REP("H","HZHL","COD")
SUGORD*SUGORD1*SUGL*SUGL1*LKHR*LKHR1*LKH*LKH1*TRH*HZM*HB*ASM*x1*x2*x3*x4
^W1REP("H","HZHL","CT")
1*1*2*2*0*0*0*0*
^W1REP("H","HZHL","FLD")
SUGORD*SUGL*LKHR*LKH*TRH*HZM*HB*ASM*x1*x2*x3*x4
^W1REP("H","HZHL","FLD0")
********
^W1REP("H","HZHL","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","HZHL","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,NHB)
^W1REP("H","HZHL","LPT")
B
^W1REP("H","HZHL","MAM")
***
^W1REP("H","HZHL","MIUN")
1*2*3*4*5*6*7*8*
^W1REP("H","HZHL","MIUN","PROG")
TRH^W4HZHL
^W1REP("H","HZHL","QUERY","1 mikix`ze zegewl dpnfd beq itl","CT")
2***2*0*0*0*0****
^W1REP("H","HZHL","QUERY","1 mikix`ze zegewl dpnfd beq itl","FLD0")
*-*-*********
^W1REP("H","HZHL","QUERY","1 mikix`ze zegewl dpnfd beq itl","MIUN")
1***2*3*4*5*6****
^W1REP("H","HZHL","QUERY","1 mikix`ze zegewl dpnfd beq itl","SIK0")
1***1*1*0*0*0****
^W1REP("H","HZHL","QUERY","2 mikix`ze zegewl itl","CT")
0***2*0*0*0*0****
^W1REP("H","HZHL","QUERY","2 mikix`ze zegewl itl","FLD0")
*-*-*********
^W1REP("H","HZHL","QUERY","2 mikix`ze zegewl itl","MIUN")
3***1*2*4*5*6****
^W1REP("H","HZHL","QUERY","2 mikix`ze zegewl itl","SIK0")
1***1*1*0*0*0****
^W1REP("H","HZHL","QUERY","3 zegewle mikix`z itl","CT")
0***0*2*0*0*0****
^W1REP("H","HZHL","QUERY","3 zegewle mikix`z itl","FLD0")
*-*-*********
^W1REP("H","HZHL","QUERY","3 zegewle mikix`z itl","MIUN")
3***2*1*4*5*6****
^W1REP("H","HZHL","QUERY","3 zegewle mikix`z itl","SIK0")
1***1*1*0*0*0****
^W1REP("H","HZHL","QUERY","4 miiy`x zegewle zeveaw itl","CT")
1*1*2*2*0*0*0*0*
^W1REP("H","HZHL","QUERY","4 miiy`x zegewle zeveaw itl","FLD0")
********
^W1REP("H","HZHL","QUERY","4 miiy`x zegewle zeveaw itl","MIUN")
1*2*3*4*5*6*7*8*
^W1REP("H","HZHL","QUERY","4 miiy`x zegewle zeveaw itl","SIK0")
1*1*1*1*0*0*0*0*
^W1REP("H","HZHL","SIK")
1*1*1*1*
^W1REP("H","HZHL","SIK0")
1*1*1*1*0*0*0*0*
^W1REP("H","HZHL","US",2)
D NHB^W4HZHL
^W1REP("H","HZHL2")
zipeayg odl wted `ly dtwd zepnfd g"ec
^W1REP("H","HZHL2",0,"HB")
dtwd oeayg;8
^W1REP("H","HZHL2",0,"HB","SET")
1
^W1REP("H","HZHL2",0,"HB","SH")
1
^W1REP("H","HZHL2",0,"HZM")
dpnfd;7
^W1REP("H","HZHL2",0,"HZM","SET")
0
^W1REP("H","HZHL2",0,"HZM","SH")
1
^W1REP("H","HZHL2",0,"LKH")
gewl 'qn;11
^W1REP("H","HZHL2",0,"LKH","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","HZHL2",0,"LKH","OUT")
LKH1
^W1REP("H","HZHL2",0,"LKH","SET")
0
^W1REP("H","HZHL2",0,"LKH1")
gewl my;12
^W1REP("H","HZHL2",0,"LKH1","SET")
0
^W1REP("H","HZHL2",0,"LKH1","SH")
1
^W1REP("H","HZHL2",0,"LKHR")
iy`x gewl;10
^W1REP("H","HZHL2",0,"LKHR","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","HZHL2",0,"LKHR","OUT")
LKHR1
^W1REP("H","HZHL2",0,"LKHR","SET")
0
^W1REP("H","HZHL2",0,"LKHR1")
iy`x gewl my;12H
^W1REP("H","HZHL2",0,"LKHR1","SET")
0
^W1REP("H","HZHL2",0,"LKHR1","SH")
1
^W1REP("H","HZHL2",0,"SUGL")
zegewl zveaw;8
^W1REP("H","HZHL2",0,"SUGL","FILE")
^|$$^%W1UCI(JB)|SUGL
^W1REP("H","HZHL2",0,"SUGL","OUT")
SUGL1
^W1REP("H","HZHL2",0,"SUGL","SET")
0
^W1REP("H","HZHL2",0,"SUGL1")
dveaw xe`z;12H
^W1REP("H","HZHL2",0,"SUGL1","SET")
0
^W1REP("H","HZHL2",0,"SUGL1","SH")
1
^W1REP("H","HZHL2",0,"TRH")
jix`z;8D
^W1REP("H","HZHL2",0,"TRH","SET")
0
^W1REP("H","HZHL2",0,"TRH","SH")
1
^W1REP("H","HZHL2",0,"x1")
dgpd iptl;8,2
^W1REP("H","HZHL2",0,"x2")
dgpd;7,2
^W1REP("H","HZHL2",0,"x3")
dgpd ixg`;8,2
^W1REP("H","HZHL2",0,"x4")
;,
^W1REP("H","HZHL2","COD")
SUGL*SUGL1*LKHR*LKHR1*LKH*LKH1*TRH*HZM*HB*x1*x2*x3
^W1REP("H","HZHL2","CT")
0*2*0*0*0****
^W1REP("H","HZHL2","FLD")
SUGL*LKHR*LKH*TRH*HZM*HB*x1*x2*x3
^W1REP("H","HZHL2","FLD0")
********
^W1REP("H","HZHL2","GLOB1")
^|$$^%W1UCI(JB)|P1HL2
^W1REP("H","HZHL2","GLOB2")
^|$$^%W1UCI(JB)|P1HL2(LKH,HZM)
^W1REP("H","HZHL2","LPT")
B
^W1REP("H","HZHL2","MIUN")
1*2*3*4*5****
^W1REP("H","HZHL2","QUERY","zepnfde zegewl itl","CT")
0*2*0*0*0****
^W1REP("H","HZHL2","QUERY","zepnfde zegewl itl","FLD0")
********
^W1REP("H","HZHL2","QUERY","zepnfde zegewl itl","MIUN")
1*2*3*4*5****
^W1REP("H","HZHL2","QUERY","zepnfde zegewl itl","SIK0")
1*1*0*0*0****
^W1REP("H","HZHL2","SIK")
1*1*1*
^W1REP("H","HZHL2","SIK0")
1*1*0*0*0****
^W1REP("H","HZHL2","US",0)
D HB^W4HZHL
^W1REP("H","HZHL2","US",2)
D HZM^W4HZHL2
^W1REP("H","HZHM")
dcrqnl zepnfd g"ec
^W1REP("H","HZHM",0,"HB")
zipeayg;8
^W1REP("H","HZHM",0,"HZM")
dpnfd;7
^W1REP("H","HZHM",0,"HZM","SET")
0
^W1REP("H","HZHM",0,"HZM","SH")
1
^W1REP("H","HZHM",0,"LKH")
gewl 'qn;10
^W1REP("H","HZHM",0,"LKH","FILE")
^LKH
^W1REP("H","HZHM",0,"LKH","OUT")
LKH1
^W1REP("H","HZHM",0,"LKH1")
gewl my;20H
^W1REP("H","HZHM",0,"MKBL")
xvln;5
^W1REP("H","HZHM",0,"MKBL","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","HZHM",0,"MKBL","M2")
S MKBL1=$$^W4NAME(MKBL)
^W1REP("H","HZHM",0,"MKBL","OUT")
MKBL1
^W1REP("H","HZHM",0,"MKBL","SET")
0
^W1REP("H","HZHM",0,"MKBL1")
xvln my;12H
^W1REP("H","HZHM",0,"MKBL1","SET")
0
^W1REP("H","HZHM",0,"MKBL1","SH")
0
^W1REP("H","HZHM",0,"NAME")
gewl my;12H
^W1REP("H","HZHM",0,"NAME","SH")
1
^W1REP("H","HZHM",0,"NCAB")
zipeayg;6
^W1REP("H","HZHM",0,"NCAB","SH")
0
^W1REP("H","HZHM",0,"NMB")
ogley;5
^W1REP("H","HZHM",0,"NMB","SET")
0
^W1REP("H","HZHM",0,"NMB","SH")
1
^W1REP("H","HZHM",0,"SHAA")
dry;5
^W1REP("H","HZHM",0,"SHAA","SET")
0
^W1REP("H","HZHM",0,"SHAA","SH")
1
^W1REP("H","HZHM",0,"SHAASG")
dxibq zry;8
^W1REP("H","HZHM",0,"SHAASG","SET")
0
^W1REP("H","HZHM",0,"SHAASG","SH")
1
^W1REP("H","HZHM",0,"SOAD")
micreq;6
^W1REP("H","HZHM",0,"SOAD","SH")
1
^W1REP("H","HZHM",0,"SUGS")
ogley beq;8
^W1REP("H","HZHM",0,"SUGS","FILE")
^|$$^%W1UCI(JB)|SUGS
^W1REP("H","HZHM",0,"SUGS","OUT")
SUGS1
^W1REP("H","HZHM",0,"SUGS","SET")
0
^W1REP("H","HZHM",0,"SUGS1")
xe`z;12H
^W1REP("H","HZHM",0,"SUGS1","SET")
0
^W1REP("H","HZHM",0,"SUGS1","SH")
1
^W1REP("H","HZHM",0,"SUGT")
melyz cew;4
^W1REP("H","HZHM",0,"SUGT","FILE")
^|$$^%W1UCI(JB)|W3SUGTS
^W1REP("H","HZHM",0,"SUGT","OUT")
SUGT1
^W1REP("H","HZHM",0,"SUGT","SET")
0
^W1REP("H","HZHM",0,"SUGT1")
melyz beq;12H
^W1REP("H","HZHM",0,"SUGT1","SET")
0
^W1REP("H","HZHM",0,"SUGT1","SH")
1
^W1REP("H","HZHM",0,"TRH")
jix`z;8D
^W1REP("H","HZHM",0,"TRH","SET")
0
^W1REP("H","HZHM",0,"TRH","SH")
1
^W1REP("H","HZHM",0,"TRLK")
gewl xe`z;10H
^W1REP("H","HZHM",0,"TRLK","SET")
0
^W1REP("H","HZHM",0,"TRLK","SH")
1
^W1REP("H","HZHM",0,"TS")
melyzl;8
^W1REP("H","HZHM",0,"TSHL")
melyzl;8
^W1REP("H","HZHM",0,"TSHL","OUT")
TSHL
^W1REP("H","HZHM",0,"x1")
milehia;8,2
^W1REP("H","HZHM",0,"x2")
mihixtl zegpd;8,2
^W1REP("H","HZHM",0,"x3")
zexg` zegpd;8,2
^W1REP("H","HZHM",0,"x4")
zexiy;6,2
^W1REP("H","HZHM",0,"x5")
melyzl;8,2
^W1REP("H","HZHM",0,"x6")
llek dgpd%;6,2
^W1REP("H","HZHM",0,"x7")
micreq;6,0
^W1REP("H","HZHM",0,"x8")
;,
^W1REP("H","HZHM","COD")
MKBL*MKBL1*SUGS*SUGS1*NMB*TRH*SHAA*SHAASG*HZM*TRLK*SUGT*SUGT1*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","HZHM","CT")
1**0*2*0*0*0*0********
^W1REP("H","HZHM","FLD")
MKBL*SUGS*NMB*TRH*SHAA*SHAASG*HZM*TRLK*SUGT*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","HZHM","FLD0")
*-*******-*******
^W1REP("H","HZHM","GLOB1")
^|$$^%W1UCI(JB)|P1H
^W1REP("H","HZHM","GLOB2")
^|$$^%W1UCI(JB)|P1H(DATH,HZM)
^W1REP("H","HZHM","LPT")
B
^W1REP("H","HZHM","MAM")
1*1*1*1*1***
^W1REP("H","HZHM","MIUN")
1**3*2*5*6*4*7********
^W1REP("H","HZHM","QUERY","dpnfd 'qn itl","CT")
0**0*2*0*0*0*0********
^W1REP("H","HZHM","QUERY","dpnfd 'qn itl","FLD0")
*-*******-****-***
^W1REP("H","HZHM","QUERY","dpnfd 'qn itl","MIUN")
3**4*1*6*7*2*5********
^W1REP("H","HZHM","QUERY","dpnfd 'qn itl","SIK0")
0**0*1*0*0*0*0********
^W1REP("H","HZHM","QUERY","fkexn ogley beq itl","CT")
2*2*0*0*0*0*0
^W1REP("H","HZHM","QUERY","fkexn ogley beq itl","FLD0")
-**-**-*-*-*****
^W1REP("H","HZHM","QUERY","fkexn ogley beq itl","MIUN")
3*1*3*2*4*5*6
^W1REP("H","HZHM","QUERY","fkexn ogley beq itl","SIK0")
0*1*1*0*0*0*0
^W1REP("H","HZHM","QUERY","hxetn ogley beq itl","CT")
*1*0*2*0*0*0*0********
^W1REP("H","HZHM","QUERY","hxetn ogley beq itl","FLD0")
-********-****-***
^W1REP("H","HZHM","QUERY","hxetn ogley beq itl","MIUN")
*1*3*2*4*5*6*7********
^W1REP("H","HZHM","QUERY","hxetn ogley beq itl","SIK0")
*1*1*1*0*0*0*0********
^W1REP("H","HZHM","QUERY","xvln 'qn itl","CT")
1**0*2*0*0*0*0********
^W1REP("H","HZHM","QUERY","xvln 'qn itl","FLD0")
*-*******-*******
^W1REP("H","HZHM","QUERY","xvln 'qn itl","MIUN")
1**3*2*5*6*4*7********
^W1REP("H","HZHM","QUERY","xvln 'qn itl","SIK0")
1**0*1*0*0*0*0********
^W1REP("H","HZHM","SHP","KOD")
P1HZH
^W1REP("H","HZHM","SIK")
1*1*1*1*1**1*
^W1REP("H","HZHM","SIK0")
1**0*1*0*0*0*0********
^W1REP("H","HZHM","SIX")
I $G(SUM(K,2))+$G(SUM(K,3))+$G(SUM(K,5)) S SUM(K,6)=$J($G(SUM(K,2))+$G(SUM(K,3))/($G(SUM(K,5))+$G(SUM(K,2))+$G(SUM(K,3)))*100,2,2)
^W1REP("H","HZHM","US",1)
D TRH^W4HZHC
^W1REP("H","HZHM","US",2)
D HZM^W4HZHC
^W1REP("H","HZHMM")
migelyn zepnfd g"ec
^W1REP("H","HZHMM",0,"AZOR")
xef`;4
^W1REP("H","HZHMM",0,"AZOR","FILE")
^|$$^W3MAIN|TMPAZ
^W1REP("H","HZHMM",0,"AZOR","OUT")
AZOR1
^W1REP("H","HZHMM",0,"AZOR","SET")
0
^W1REP("H","HZHMM",0,"AZOR1")
xef` xe`z;12H
^W1REP("H","HZHMM",0,"AZOR1","SET")
0
^W1REP("H","HZHMM",0,"AZOR1","SH")
1
^W1REP("H","HZHMM",0,"HB")
zipeayg;8
^W1REP("H","HZHMM",0,"HZM")
dpnfd;10
^W1REP("H","HZHMM",0,"HZM","SET")
1
^W1REP("H","HZHMM",0,"HZM","SH")
1
^W1REP("H","HZHMM",0,"HZMLAK")
dzknq`;8
^W1REP("H","HZHMM",0,"HZMLAK","SET")
0
^W1REP("H","HZHMM",0,"HZMLAK","SH")
1
^W1REP("H","HZHMM",0,"IR")
xir;12H
^W1REP("H","HZHMM",0,"IR","FILE")
^|$$^%W1UCI(JB)|P1IR
^W1REP("H","HZHMM",0,"IR","SET")
0
^W1REP("H","HZHMM",0,"IR","SH")
1
^W1REP("H","HZHMM",0,"LKH")
gewl 'qn;10
^W1REP("H","HZHMM",0,"LKH","FILE")
^LKH
^W1REP("H","HZHMM",0,"LKH","OUT")
LKH1
^W1REP("H","HZHMM",0,"LKH1")
gewl my;20H
^W1REP("H","HZHMM",0,"MKBL")
lawn 'qn;8
^W1REP("H","HZHMM",0,"MKBL","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","HZHMM",0,"MKBL","M2")
S MKBL1=$$^W4NAME(MKBL)
^W1REP("H","HZHMM",0,"MKBL","OUT")
MKBL1
^W1REP("H","HZHMM",0,"MKBL","SET")
0
^W1REP("H","HZHMM",0,"MKBL1")
lawnd my;12H
^W1REP("H","HZHMM",0,"MKBL1","SET")
0
^W1REP("H","HZHMM",0,"MKBL1","SH")
1
^W1REP("H","HZHMM",0,"MKR")
xewn;2
^W1REP("H","HZHMM",0,"MKR","FILE")
^|$$^%W1UCI(JB)|W3MKR
^W1REP("H","HZHMM",0,"MKR","OUT")
MKR1
^W1REP("H","HZHMM",0,"MKR","SET")
0
^W1REP("H","HZHMM",0,"MKR1")
xewn xe`z;10H
^W1REP("H","HZHMM",0,"MKR1","SET")
0
^W1REP("H","HZHMM",0,"MKR1","SH")
1
^W1REP("H","HZHMM",0,"MSDHZ")
sipq;6
^W1REP("H","HZHMM",0,"MSDHZ","FILE")
^|$$^W3MAIN|W3MSD
^W1REP("H","HZHMM",0,"MSDHZ","OUT")
MSDHZ1
^W1REP("H","HZHMM",0,"MSDHZ","SET")
0
^W1REP("H","HZHMM",0,"MSDHZ1")
sipq my;14H
^W1REP("H","HZHMM",0,"MSDHZ1","SET")
0
^W1REP("H","HZHMM",0,"MSDHZ1","SH")
1
^W1REP("H","HZHMM",0,"NAME")
gewl my;12H
^W1REP("H","HZHMM",0,"NAME","SET")
0
^W1REP("H","HZHMM",0,"NAME","SH")
1
^W1REP("H","HZHMM",0,"NCAB")
zipeayg;6
^W1REP("H","HZHMM",0,"NCAB","SH")
0
^W1REP("H","HZHMM",0,"NMB")
gewl xtqn;12
^W1REP("H","HZHMM",0,"NMB","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","HZHMM",0,"NMB","OUT")
NAME
^W1REP("H","HZHMM",0,"NMB","SET")
0
^W1REP("H","HZHMM",0,"PSL")
gily cew;3
^W1REP("H","HZHMM",0,"PSL","FILE")
^|$$^%W1UCI(JB)|P1SL
^W1REP("H","HZHMM",0,"PSL","OUT")
PSL1
^W1REP("H","HZHMM",0,"PSL","SET")
0
^W1REP("H","HZHMM",0,"PSL1")
gily my;10H
^W1REP("H","HZHMM",0,"PSL1","SET")
0
^W1REP("H","HZHMM",0,"PSL1","SH")
1
^W1REP("H","HZHMM",0,"SHAA")
dryl;5
^W1REP("H","HZHMM",0,"SHAA","SET")
0
^W1REP("H","HZHMM",0,"SHAA","SH")
1
^W1REP("H","HZHMM",0,"SL")
gily cew;5
^W1REP("H","HZHMM",0,"SL","FILE")
^P1SL
^W1REP("H","HZHMM",0,"SL","OUT")
SL1
^W1REP("H","HZHMM",0,"SL1")
gily my;12H
^W1REP("H","HZHMM",0,"SUGT")
melyz cew;4
^W1REP("H","HZHMM",0,"SUGT","FILE")
^|$$^%W1UCI(JB)|W3SUGTS
^W1REP("H","HZHMM",0,"SUGT","M2")
S SUGT1=$$SUGT1^W4HZMMCC(SUGT)
^W1REP("H","HZHMM",0,"SUGT","OUT")
SUGT1
^W1REP("H","HZHMM",0,"SUGT","SET")
0
^W1REP("H","HZHMM",0,"SUGT1")
melyz beq;8H
^W1REP("H","HZHMM",0,"SUGT1","SET")
0
^W1REP("H","HZHMM",0,"SUGT1","SH")
1
^W1REP("H","HZHMM",0,"TRH")
jix`z;8D
^W1REP("H","HZHMM",0,"TRH","SET")
0
^W1REP("H","HZHMM",0,"TRH","SH")
1
^W1REP("H","HZHMM",0,"TS")
melyzl;8
^W1REP("H","HZHMM",0,"TSHL")
melyzl;8
^W1REP("H","HZHMM",0,"TSHL","OUT")
TSHL
^W1REP("H","HZHMM",0,"x1")
gelyn inc;7,2
^W1REP("H","HZHMM",0,"x2")
melyzl;8,2
^W1REP("H","HZHMM",0,"x3")
zenk;5,0
^W1REP("H","HZHMM",0,"x4")
;,
^W1REP("H","HZHMM","COD")
MKBL*MKBL1*TRH*MSDHZ*MSDHZ1*SHAA*HZM*x1*x2*x3
^W1REP("H","HZHMM","CT")
0*0*0*0*0****
^W1REP("H","HZHMM","FLD")
MKBL*TRH*MSDHZ*SHAA*HZM*x1*x2*x3
^W1REP("H","HZHMM","FLD0")
********
^W1REP("H","HZHMM","GLOB1")
^|$$^W3MAIN|W3LINKD
^W1REP("H","HZHMM","GLOB2")
^|$$^W3MAIN|W3LINKD(DATH,HZM)
^W1REP("H","HZHMM","LPT")
B
^W1REP("H","HZHMM","MAM")
1*1**
^W1REP("H","HZHMM","MIUN")
1*2*3*4*5****
^W1REP("H","HZHMM","QUERY","dpnfd ilawn itl oein","CT")
0*0*0*0*0****
^W1REP("H","HZHMM","QUERY","dpnfd ilawn itl oein","FLD0")
********
^W1REP("H","HZHMM","QUERY","dpnfd ilawn itl oein","MIUN")
1*2*3*4*5****
^W1REP("H","HZHMM","QUERY","dpnfd ilawn itl oein","SIK0")
1*1*0*0*0****
^W1REP("H","HZHMM","QUERY","zepnfde mikix`z itl oein","CT")
0*0*0*0*0****
^W1REP("H","HZHMM","QUERY","zepnfde mikix`z itl oein","FLD0")
********
^W1REP("H","HZHMM","QUERY","zepnfde mikix`z itl oein","MIUN")
3*1*2*4*5****
^W1REP("H","HZHMM","QUERY","zepnfde mikix`z itl oein","SIK0")
1*1*1*0*0****
^W1REP("H","HZHMM","SIK")
1*1*1*
^W1REP("H","HZHMM","SIK0")
1*1*0*0*0****
^W1REP("H","HZHMM","US",1)
D TRH^W4HZMMCC
^W1REP("H","HZHMM","US",2)
D HZM^W4HZMMCC
^W1REP("H","HZHQ")
izenk migily itl g"ec
^W1REP("H","HZHQ",0,"ADR")
zaezk;16H
^W1REP("H","HZHQ",0,"ADR","SET")
0
^W1REP("H","HZHQ",0,"ADR","SH")
0
^W1REP("H","HZHQ",0,"HB")
zipeayg;8
^W1REP("H","HZHQ",0,"HZM")
dpnfd;7
^W1REP("H","HZHQ",0,"HZM","SET")
0
^W1REP("H","HZHQ",0,"HZM","SH")
1
^W1REP("H","HZHQ",0,"HZMLAK")
dzknq`;8
^W1REP("H","HZHQ",0,"HZMLAK","SET")
0
^W1REP("H","HZHQ",0,"HZMLAK","SH")
1
^W1REP("H","HZHQ",0,"IR")
xir;12H
^W1REP("H","HZHQ",0,"IR","FILE")
^|$$^%W1UCI(JB)|P1IR
^W1REP("H","HZHQ",0,"IR","SET")
0
^W1REP("H","HZHQ",0,"IR","SH")
1
^W1REP("H","HZHQ",0,"KTV")
zaezk;14H
^W1REP("H","HZHQ",0,"KTV","SET")
0
^W1REP("H","HZHQ",0,"KTV","SH")
0
^W1REP("H","HZHQ",0,"LKH")
gewl 'qn;10
^W1REP("H","HZHQ",0,"LKH","FILE")
^LKH
^W1REP("H","HZHQ",0,"LKH","OUT")
LKH1
^W1REP("H","HZHQ",0,"LKH1")
gewl my;20H
^W1REP("H","HZHQ",0,"MKBL")
lawn 'qn;8
^W1REP("H","HZHQ",0,"MKBL","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","HZHQ",0,"MKBL","M2")
S MKBL1=$$^W4NAME(MKBL)
^W1REP("H","HZHQ",0,"MKBL","OUT")
MKBL1
^W1REP("H","HZHQ",0,"MKBL","SET")
0
^W1REP("H","HZHQ",0,"MKBL1")
lawnd my;12H
^W1REP("H","HZHQ",0,"MKBL1","SET")
0
^W1REP("H","HZHQ",0,"MKBL1","SH")
1
^W1REP("H","HZHQ",0,"NAME")
gewl my;12H
^W1REP("H","HZHQ",0,"NAME","SET")
0
^W1REP("H","HZHQ",0,"NAME","SH")
1
^W1REP("H","HZHQ",0,"NCAB")
zipeayg;6
^W1REP("H","HZHQ",0,"NCAB","SH")
0
^W1REP("H","HZHQ",0,"NMB")
gewl xtqn;10
^W1REP("H","HZHQ",0,"NMB","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","HZHQ",0,"NMB","OUT")
NAME
^W1REP("H","HZHQ",0,"NMB","SET")
0
^W1REP("H","HZHQ",0,"PSL")
gily cew;3
^W1REP("H","HZHQ",0,"PSL","FILE")
^|$$^%W1UCI(JB)|P1SL
^W1REP("H","HZHQ",0,"PSL","OUT")
PSL1
^W1REP("H","HZHQ",0,"PSL","SET")
0
^W1REP("H","HZHQ",0,"PSL1")
gily my;10H
^W1REP("H","HZHQ",0,"PSL1","SET")
0
^W1REP("H","HZHQ",0,"PSL1","SH")
1
^W1REP("H","HZHQ",0,"SHAA")
dryl;5
^W1REP("H","HZHQ",0,"SHAA","SET")
0
^W1REP("H","HZHQ",0,"SHAA","SH")
1
^W1REP("H","HZHQ",0,"SL")
gily cew;5
^W1REP("H","HZHQ",0,"SL","FILE")
^P1SL
^W1REP("H","HZHQ",0,"SL","OUT")
SL1
^W1REP("H","HZHQ",0,"SL1")
gily my;12H
^W1REP("H","HZHQ",0,"SUGT")
melyz beq;8
^W1REP("H","HZHQ",0,"SUGT","SET")
0
^W1REP("H","HZHQ",0,"SUGT","SH")
1
^W1REP("H","HZHQ",0,"SUGT1")
melyz beq;8
^W1REP("H","HZHQ",0,"SUGT1","SET")
0
^W1REP("H","HZHQ",0,"SUGT1","SH")
1
^W1REP("H","HZHQ",0,"TRH")
jix`z;8D
^W1REP("H","HZHQ",0,"TRH","SET")
0
^W1REP("H","HZHQ",0,"TRH","SH")
1
^W1REP("H","HZHQ",0,"TS")
melyzl;8
^W1REP("H","HZHQ",0,"TSHL")
melyzl;8
^W1REP("H","HZHQ",0,"TSHL","OUT")
TSHL
^W1REP("H","HZHQ",0,"x1")
zepnfd xtqn;7,0
^W1REP("H","HZHQ",0,"x2")
;,
^W1REP("H","HZHQ",0,"x3")
zenk;5,0
^W1REP("H","HZHQ",0,"x4")
;,
^W1REP("H","HZHQ","COD")
PSL*PSL1*MKBL*MKBL1*NMB*NAME*ADR*IR*TRH*SHAA*HZM*x1
^W1REP("H","HZHQ","CT")
2**0*0*0*0*0*0*
^W1REP("H","HZHQ","FLD")
PSL*MKBL*NMB*ADR*IR*TRH*SHAA*HZM*x1
^W1REP("H","HZHQ","FLD0")
*-*******
^W1REP("H","HZHQ","GLOB1")
^|$$^%W1UCI(JB)|W4LINKD
^W1REP("H","HZHQ","GLOB2")
^|$$^%W1UCI(JB)|W4LINKD(DATH,HZM)
^W1REP("H","HZHQ","LPT")
B
^W1REP("H","HZHQ","MIUN")
1**4*5*3*2*6*7*
^W1REP("H","HZHQ","QUERY","dpnfd onfe migily itl oein","CT")
2**0*0*0*0*0*0*
^W1REP("H","HZHQ","QUERY","dpnfd onfe migily itl oein","FLD0")
*-*******
^W1REP("H","HZHQ","QUERY","dpnfd onfe migily itl oein","MIUN")
1**5*6*4*2*3*7*
^W1REP("H","HZHQ","QUERY","dpnfd onfe migily itl oein","SIK0")
1**0*0*0*0*0*0*
^W1REP("H","HZHQ","QUERY","zegewle migily itl oein","CT")
2**0*0*0*0*0*0*
^W1REP("H","HZHQ","QUERY","zegewle migily itl oein","FLD0")
*-*******
^W1REP("H","HZHQ","QUERY","zegewle migily itl oein","MIUN")
1**4*5*3*2*6*7*
^W1REP("H","HZHQ","QUERY","zegewle migily itl oein","SIK0")
1**0*0*0*0*0*0*
^W1REP("H","HZHQ","SIK")
1**1*
^W1REP("H","HZHQ","SIK0")
1**0*0*0*0*0*0*
^W1REP("H","HZHQ","US",-1)
D TRH^W4HZHC
^W1REP("H","HZHQ","US",0)
D HZM^P1HZHC
^W1REP("H","HZHQ","US",1)
D TRH^W4HZHC
^W1REP("H","HZHQ","US",2)
D HZM^W4HZHC
^W1REP("H","HZHQ1")
izenk migily itl g"ec
^W1REP("H","HZHQ1",0,"ADR")
zaezk;16H
^W1REP("H","HZHQ1",0,"ADR","SET")
0
^W1REP("H","HZHQ1",0,"ADR","SH")
1
^W1REP("H","HZHQ1",0,"HB")
zipeayg;8
^W1REP("H","HZHQ1",0,"HZM")
dpnfd;7
^W1REP("H","HZHQ1",0,"HZM","SET")
0
^W1REP("H","HZHQ1",0,"HZM","SH")
1
^W1REP("H","HZHQ1",0,"HZMLAK")
dzknq`;8
^W1REP("H","HZHQ1",0,"HZMLAK","SET")
0
^W1REP("H","HZHQ1",0,"HZMLAK","SH")
1
^W1REP("H","HZHQ1",0,"IR")
xir;12H
^W1REP("H","HZHQ1",0,"IR","FILE")
^|$$^%W1UCI(JB)|P1IR
^W1REP("H","HZHQ1",0,"IR","SET")
0
^W1REP("H","HZHQ1",0,"IR","SH")
1
^W1REP("H","HZHQ1",0,"KTV")
zaezk;14H
^W1REP("H","HZHQ1",0,"KTV","SET")
0
^W1REP("H","HZHQ1",0,"KTV","SH")
0
^W1REP("H","HZHQ1",0,"MKBL")
lawn 'qn;8
^W1REP("H","HZHQ1",0,"MKBL","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","HZHQ1",0,"MKBL","M2")
S MKBL1=$$^W4NAME(MKBL)
^W1REP("H","HZHQ1",0,"MKBL","OUT")
MKBL1
^W1REP("H","HZHQ1",0,"MKBL","SET")
0
^W1REP("H","HZHQ1",0,"MKBL1")
lawnd my;12H
^W1REP("H","HZHQ1",0,"MKBL1","SET")
0
^W1REP("H","HZHQ1",0,"MKBL1","SH")
1
^W1REP("H","HZHQ1",0,"NCAB")
zipeayg;6
^W1REP("H","HZHQ1",0,"NCAB","SH")
0
^W1REP("H","HZHQ1",0,"PSL")
gily cew;3
^W1REP("H","HZHQ1",0,"PSL","FILE")
^|$$^%W1UCI(JB)|P1SL
^W1REP("H","HZHQ1",0,"PSL","OUT")
PSL1
^W1REP("H","HZHQ1",0,"PSL","SET")
0
^W1REP("H","HZHQ1",0,"PSL1")
gily my;10H
^W1REP("H","HZHQ1",0,"PSL1","SET")
0
^W1REP("H","HZHQ1",0,"PSL1","SH")
1
^W1REP("H","HZHQ1",0,"SHAA")
dryl;5
^W1REP("H","HZHQ1",0,"SHAA","SET")
0
^W1REP("H","HZHQ1",0,"SHAA","SH")
1
^W1REP("H","HZHQ1",0,"SL")
gily cew;5
^W1REP("H","HZHQ1",0,"SL","FILE")
^P1SL
^W1REP("H","HZHQ1",0,"SL","OUT")
SL1
^W1REP("H","HZHQ1",0,"SL1")
gily my;12H
^W1REP("H","HZHQ1",0,"SUGT")
melyz beq;8
^W1REP("H","HZHQ1",0,"SUGT","SET")
0
^W1REP("H","HZHQ1",0,"SUGT","SH")
1
^W1REP("H","HZHQ1",0,"SUGT1")
melyz beq;8
^W1REP("H","HZHQ1",0,"SUGT1","SET")
0
^W1REP("H","HZHQ1",0,"SUGT1","SH")
1
^W1REP("H","HZHQ1",0,"TRH")
jix`z;8D
^W1REP("H","HZHQ1",0,"TRH","SET")
0
^W1REP("H","HZHQ1",0,"TRH","SH")
1
^W1REP("H","HZHQ1",0,"TS")
melyzl;8
^W1REP("H","HZHQ1",0,"TSHL")
melyzl;8
^W1REP("H","HZHQ1",0,"TSHL","OUT")
TSHL
^W1REP("H","HZHQ1",0,"x1")
zepnfd xtqn;7,0
^W1REP("H","HZHQ1",0,"x2")
;,
^W1REP("H","HZHQ1",0,"x3")
zenk;5,0
^W1REP("H","HZHQ1",0,"x4")
;,
^W1REP("H","HZHQ1","COD")
PSL*PSL1*ADR*IR*TRH*SHAA*HZM*x1
^W1REP("H","HZHQ1","CT")
2*0*0*0*0**
^W1REP("H","HZHQ1","FLD")
PSL*ADR*IR*TRH*SHAA*HZM*x1
^W1REP("H","HZHQ1","FLD0")
******
^W1REP("H","HZHQ1","GLOB1")
^|$$^%W1UCI(JB)|W4LINKD
^W1REP("H","HZHQ1","GLOB2")
^|$$^%W1UCI(JB)|W4LINKD(DATH,HZM)
^W1REP("H","HZHQ1","LPT")
B
^W1REP("H","HZHQ1","MIUN")
1*2*3*4*5**
^W1REP("H","HZHQ1","SIK")
1**1*
^W1REP("H","HZHQ1","SIK0")
1*0*0*0*0**
^W1REP("H","HZHQ1","US",1)
D TRH^W4HZHC1
^W1REP("H","HZHQ1","US",2)
D HZM^W4HZHC1
^W1REP("H","HZHQ2")
dxv zqtcnl migily itl g"ec
^W1REP("H","HZHQ2",0,"ADR")
zaezk;16H
^W1REP("H","HZHQ2",0,"ADR","SET")
0
^W1REP("H","HZHQ2",0,"ADR","SH")
0
^W1REP("H","HZHQ2",0,"HB")
zipeayg;8
^W1REP("H","HZHQ2",0,"HZM")
dpnfd;7
^W1REP("H","HZHQ2",0,"HZM","SET")
0
^W1REP("H","HZHQ2",0,"HZM","SH")
1
^W1REP("H","HZHQ2",0,"HZMLAK")
dzknq`;8
^W1REP("H","HZHQ2",0,"HZMLAK","SET")
0
^W1REP("H","HZHQ2",0,"HZMLAK","SH")
1
^W1REP("H","HZHQ2",0,"IR")
xir;12H
^W1REP("H","HZHQ2",0,"IR","FILE")
^|$$^%W1UCI(JB)|P1IR
^W1REP("H","HZHQ2",0,"IR","SET")
0
^W1REP("H","HZHQ2",0,"IR","SH")
1
^W1REP("H","HZHQ2",0,"KTV")
zaezk;14H
^W1REP("H","HZHQ2",0,"KTV","SET")
0
^W1REP("H","HZHQ2",0,"KTV","SH")
0
^W1REP("H","HZHQ2",0,"LKH")
gewl 'qn;10
^W1REP("H","HZHQ2",0,"LKH","FILE")
^LKH
^W1REP("H","HZHQ2",0,"LKH","OUT")
LKH1
^W1REP("H","HZHQ2",0,"LKH1")
gewl my;20H
^W1REP("H","HZHQ2",0,"MKBL")
lawn 'qn;8
^W1REP("H","HZHQ2",0,"MKBL","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","HZHQ2",0,"MKBL","M2")
S MKBL1=$$^W4NAME(MKBL)
^W1REP("H","HZHQ2",0,"MKBL","OUT")
MKBL1
^W1REP("H","HZHQ2",0,"MKBL","SET")
0
^W1REP("H","HZHQ2",0,"MKBL1")
lawnd my;12H
^W1REP("H","HZHQ2",0,"MKBL1","SET")
0
^W1REP("H","HZHQ2",0,"MKBL1","SH")
1
^W1REP("H","HZHQ2",0,"NAME")
gewl my;12H
^W1REP("H","HZHQ2",0,"NAME","SET")
0
^W1REP("H","HZHQ2",0,"NAME","SH")
1
^W1REP("H","HZHQ2",0,"NCAB")
zipeayg;6
^W1REP("H","HZHQ2",0,"NCAB","SH")
0
^W1REP("H","HZHQ2",0,"NMB")
gewl xtqn;10
^W1REP("H","HZHQ2",0,"NMB","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","HZHQ2",0,"NMB","OUT")
NAME
^W1REP("H","HZHQ2",0,"NMB","SET")
0
^W1REP("H","HZHQ2",0,"PSL")
gily cew;3
^W1REP("H","HZHQ2",0,"PSL","FILE")
^|$$^%W1UCI(JB)|P1SL
^W1REP("H","HZHQ2",0,"PSL","OUT")
PSL1
^W1REP("H","HZHQ2",0,"PSL","SET")
0
^W1REP("H","HZHQ2",0,"PSL1")
gily my;10H
^W1REP("H","HZHQ2",0,"PSL1","SET")
0
^W1REP("H","HZHQ2",0,"PSL1","SH")
1
^W1REP("H","HZHQ2",0,"SHAA")
dryl;5
^W1REP("H","HZHQ2",0,"SHAA","SET")
0
^W1REP("H","HZHQ2",0,"SHAA","SH")
1
^W1REP("H","HZHQ2",0,"SL")
gily cew;5
^W1REP("H","HZHQ2",0,"SL","FILE")
^P1SL
^W1REP("H","HZHQ2",0,"SL","OUT")
SL1
^W1REP("H","HZHQ2",0,"SL1")
gily my;12H
^W1REP("H","HZHQ2",0,"SUGT")
melyz beq;8
^W1REP("H","HZHQ2",0,"SUGT","SET")
0
^W1REP("H","HZHQ2",0,"SUGT","SH")
1
^W1REP("H","HZHQ2",0,"SUGT1")
melyz beq;8
^W1REP("H","HZHQ2",0,"SUGT1","SET")
0
^W1REP("H","HZHQ2",0,"SUGT1","SH")
1
^W1REP("H","HZHQ2",0,"TRH")
jix`z;8D
^W1REP("H","HZHQ2",0,"TRH","SET")
0
^W1REP("H","HZHQ2",0,"TRH","SH")
1
^W1REP("H","HZHQ2",0,"TS")
melyzl;8
^W1REP("H","HZHQ2",0,"TSHL")
melyzl;8
^W1REP("H","HZHQ2",0,"TSHL","OUT")
TSHL
^W1REP("H","HZHQ2",0,"x1")
zenk;3,0
^W1REP("H","HZHQ2",0,"x2")
mekq;7,2
^W1REP("H","HZHQ2",0,"x3")
mley;7,2
^W1REP("H","HZHQ2",0,"x4")
dxzi;7,2
^W1REP("H","HZHQ2",0,"x5")
;,
^W1REP("H","HZHQ2","COD")
TRH*PSL*PSL1*SHAA*HZM*x1*x2*x3*x4
^W1REP("H","HZHQ2","CT")
2**0*0*0*0*0*0*0
^W1REP("H","HZHQ2","FLD")
TRH*PSL*SHAA*HZM*x1*x2*x3*x4
^W1REP("H","HZHQ2","FLD0")
*-*******
^W1REP("H","HZHQ2","GLOB1")
^|$$^%W1UCI(JB)|W4LINKD
^W1REP("H","HZHQ2","GLOB2")
^|$$^%W1UCI(JB)|W4LINKD(DATH,HZM)
^W1REP("H","HZHQ2","LPT")
B
^W1REP("H","HZHQ2","MIUN")
1**4*5*3*2*6*7*8
^W1REP("H","HZHQ2","QUERY","migily itl oein","CT")
2**0*0*0*0*0*0*0
^W1REP("H","HZHQ2","QUERY","migily itl oein","FLD0")
*-*******
^W1REP("H","HZHQ2","QUERY","migily itl oein","MIUN")
1**4*5*3*2*6*7*8
^W1REP("H","HZHQ2","QUERY","migily itl oein","SIK0")
1**0*0*0*0*0*0*0
^W1REP("H","HZHQ2","SIK")
1*1*1*1*
^W1REP("H","HZHQ2","SIK0")
1**0*0*0*0*0*0*0
^W1REP("H","HZHQ2","US",-1)
D TRH^W4HZHC
^W1REP("H","HZHQ2","US",0)
D HZM^P1HZHC
^W1REP("H","HZHQ2","US",1)
D TRH^W4HZHC2 
^W1REP("H","HZHQ2","US",2)
D HZM^W4HZHC2
^W1REP("H","HZMKR")
xewn itl migelyn zepnfd g"ec
^W1REP("H","HZMKR",0,"HB")
zipeayg;8
^W1REP("H","HZMKR",0,"HZM")
dpnfd;7
^W1REP("H","HZMKR",0,"HZM","SET")
0
^W1REP("H","HZMKR",0,"HZM","SH")
1
^W1REP("H","HZMKR",0,"HZMLAK")
dzknq`;8
^W1REP("H","HZMKR",0,"HZMLAK","SET")
0
^W1REP("H","HZMKR",0,"HZMLAK","SH")
1
^W1REP("H","HZMKR",0,"IR")
xir;12H
^W1REP("H","HZMKR",0,"IR","FILE")
^|$$^%W1UCI(JB)|P1IR
^W1REP("H","HZMKR",0,"IR","SET")
0
^W1REP("H","HZMKR",0,"IR","SH")
1
^W1REP("H","HZMKR",0,"LKH")
gewl 'qn;10
^W1REP("H","HZMKR",0,"LKH","FILE")
^LKH
^W1REP("H","HZMKR",0,"LKH","OUT")
LKH1
^W1REP("H","HZMKR",0,"LKH1")
gewl my;20H
^W1REP("H","HZMKR",0,"MKBL")
lawn 'qn;8
^W1REP("H","HZMKR",0,"MKBL","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","HZMKR",0,"MKBL","M2")
S MKBL1=$$^W4NAME(MKBL)
^W1REP("H","HZMKR",0,"MKBL","OUT")
MKBL1
^W1REP("H","HZMKR",0,"MKBL","SET")
0
^W1REP("H","HZMKR",0,"MKBL1")
lawnd my;12H
^W1REP("H","HZMKR",0,"MKBL1","SET")
0
^W1REP("H","HZMKR",0,"MKBL1","SH")
1
^W1REP("H","HZMKR",0,"MKR")
xewn;2
^W1REP("H","HZMKR",0,"MKR","FILE")
^|$$^%W1UCI(JB)|W3MKR
^W1REP("H","HZMKR",0,"MKR","OUT")
MKR1
^W1REP("H","HZMKR",0,"MKR","SET")
0
^W1REP("H","HZMKR",0,"MKR1")
xewn xe`z;12H
^W1REP("H","HZMKR",0,"MKR1","SET")
0
^W1REP("H","HZMKR",0,"MKR1","SH")
1
^W1REP("H","HZMKR",0,"NAME")
gewl my;12H
^W1REP("H","HZMKR",0,"NAME","SET")
0
^W1REP("H","HZMKR",0,"NAME","SH")
1
^W1REP("H","HZMKR",0,"NCAB")
zipeayg;6
^W1REP("H","HZMKR",0,"NCAB","SH")
0
^W1REP("H","HZMKR",0,"NMB")
gewl xtqn;10
^W1REP("H","HZMKR",0,"NMB","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","HZMKR",0,"NMB","OUT")
NAME
^W1REP("H","HZMKR",0,"NMB","SET")
0
^W1REP("H","HZMKR",0,"PSL")
gily cew;3
^W1REP("H","HZMKR",0,"PSL","FILE")
^|$$^%W1UCI(JB)|P1SL
^W1REP("H","HZMKR",0,"PSL","OUT")
PSL1
^W1REP("H","HZMKR",0,"PSL","SET")
0
^W1REP("H","HZMKR",0,"PSL1")
gily my;10H
^W1REP("H","HZMKR",0,"PSL1","SET")
0
^W1REP("H","HZMKR",0,"PSL1","SH")
1
^W1REP("H","HZMKR",0,"SHAA")
dryl;5
^W1REP("H","HZMKR",0,"SHAA","SET")
0
^W1REP("H","HZMKR",0,"SHAA","SH")
1
^W1REP("H","HZMKR",0,"SL")
gily cew;5
^W1REP("H","HZMKR",0,"SL","FILE")
^P1SL
^W1REP("H","HZMKR",0,"SL","OUT")
SL1
^W1REP("H","HZMKR",0,"SL1")
gily my;12H
^W1REP("H","HZMKR",0,"SUGT")
melyz beq;8
^W1REP("H","HZMKR",0,"SUGT","SET")
0
^W1REP("H","HZMKR",0,"SUGT","SH")
1
^W1REP("H","HZMKR",0,"SUGT1")
melyz beq;8
^W1REP("H","HZMKR",0,"SUGT1","SET")
0
^W1REP("H","HZMKR",0,"SUGT1","SH")
1
^W1REP("H","HZMKR",0,"TRH")
jix`z;8D
^W1REP("H","HZMKR",0,"TRH","SET")
0
^W1REP("H","HZMKR",0,"TRH","SH")
1
^W1REP("H","HZMKR",0,"TS")
melyzl;8
^W1REP("H","HZMKR",0,"TSHL")
melyzl;8
^W1REP("H","HZMKR",0,"TSHL","OUT")
TSHL
^W1REP("H","HZMKR",0,"x1")
zexy inc;7,2
^W1REP("H","HZMKR",0,"x2")
melyzl;8,2
^W1REP("H","HZMKR",0,"x3")
zenk;5,0
^W1REP("H","HZMKR",0,"x4")
;,
^W1REP("H","HZMKR","COD")
MKR*MKR1*PSL*PSL1*NMB*NAME*HZMLAK*IR*TRH*SHAA*HZM*SUGT1*x1*x2*x3
^W1REP("H","HZMKR","CT")
**0*0*0*2*0*0*0
^W1REP("H","HZMKR","FLD")
MKR*PSL*NMB*HZMLAK*IR*TRH*SHAA*HZM*SUGT1*x1*x2*x3
^W1REP("H","HZMKR","FLD0")
***********
^W1REP("H","HZMKR","GLOB1")
^|$$^%W1UCI(JB)|W4LINKD
^W1REP("H","HZMKR","GLOB2")
^|$$^%W1UCI(JB)|W4LINKD(DATH,HZM)
^W1REP("H","HZMKR","LPT")
B
^W1REP("H","HZMKR","MIUN")
**3*4*2*1*5*6*7
^W1REP("H","HZMKR","QUERY","xewn itl migelyn g""ec","CT")
0*0*0*0*0*2*0*0*0***
^W1REP("H","HZMKR","QUERY","xewn itl migelyn g""ec","FLD0")
***********
^W1REP("H","HZMKR","QUERY","xewn itl migelyn g""ec","MIUN")
**3*4*2*1*5*6*7***
^W1REP("H","HZMKR","QUERY","xewn itl migelyn g""ec","SIK0")
0*0*0*0*0*1*0*0*0***
^W1REP("H","HZMKR","SIK")
1*1*1*
^W1REP("H","HZMKR","SIK0")
**0*0*0*1*0*0*0
^W1REP("H","HZMKR","US",-1)
D TRH^W4HZHC
^W1REP("H","HZMKR","US",0)
D HZM^P1HZHC
^W1REP("H","HZMKR","US",1)
D TRH^W4HZHC
^W1REP("H","HZMKR","US",2)
D HZM^W4HZHC
^W1REP("H","HZMM")
zecrqn itl itqk migelyn g"ec
^W1REP("H","HZMM",0,"HZM")
xtqn;7
^W1REP("H","HZMM",0,"HZM","SH")
0
^W1REP("H","HZMM",0,"MSD")
dcrqn;5
^W1REP("H","HZMM",0,"MSD","FILE")
^P1MSD
^W1REP("H","HZMM",0,"MSD","OUT")
MSD1
^W1REP("H","HZMM",0,"MSD1")
dcrqn my;12H
^W1REP("H","HZMM",0,"MSD1","SH")
1
^W1REP("H","HZMM",0,"TD")
dcerz;7
^W1REP("H","HZMM",0,"TD","SH")
1
^W1REP("H","HZMM",0,"TD1")
dcerz;7
^W1REP("H","HZMM",0,"TD1","SH")
0
^W1REP("H","HZMM",0,"TRH")
jix`z;8D
^W1REP("H","HZMM",0,"TRH","SH")
0
^W1REP("H","HZMM",0,"VT")
melyz beq;2
^W1REP("H","HZMM",0,"VT","SH")
1
^W1REP("H","HZMM",0,"VT1")
melyz beq;8
^W1REP("H","HZMM",0,"VT1","SH")
0
^W1REP("H","HZMM",0,"x1")
mley;8,2
^W1REP("H","HZMM",0,"x2")
zexy inc;8,2
^W1REP("H","HZMM",0,"x3")
dxzi;8,2
^W1REP("H","HZMM",0,"x4")
;0,0
^W1REP("H","HZMM",0,"x5")
;,
^W1REP("H","HZMM","COD")
MSD*MSD1*VT1*TRH*TD1*HZM*x1*x2*x3*x4
^W1REP("H","HZMM","CT")
1*2*0*0*0*
^W1REP("H","HZMM","FLD")
MSD*VT1*TRH*TD1*HZM*x1*x2*x3*x4
^W1REP("H","HZMM","GLOB1")
^VRM($J)
^W1REP("H","HZMM","GLOB2")
^VRM($J,MSD,DD,TD,HZM,VT)
^W1REP("H","HZMM","LPT")
B
^W1REP("H","HZMM","MIUN")
1*2*3*4*5*6
^W1REP("H","HZMM","SIK")
1*1*1**
^W1REP("H","HZMM","SIK0")
1*1*0*0*0*
^W1REP("H","HZMM","US",3)
D DD^P1SUMM
^W1REP("H","HZMM","US",4)
D TD^P1SUMM
^W1REP("H","HZMM","US",6)
D VT^P1SUMM
^W1REP("H","ITREP")
izyx mihixt zxikn g"ec
^W1REP("H","ITREP",0,"MSD")
sipq;5
^W1REP("H","ITREP",0,"MSD","FILE")
^|$$^%W1UCI(JB)|TMPMSD
^W1REP("H","ITREP",0,"MSD","M2")
S MSD1=$$MSD^W3R(MSD)
^W1REP("H","ITREP",0,"MSD","OUT")
MSD1
^W1REP("H","ITREP",0,"MSD","SET")
1
^W1REP("H","ITREP",0,"MSD1")
sipq my;15H
^W1REP("H","ITREP",0,"MSD1","SET")
0
^W1REP("H","ITREP",0,"MSD1","SH")
0
^W1REP("H","ITREP",0,"PAR")
hixt cew;8
^W1REP("H","ITREP",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","ITREP",0,"PAR","OUT")
PAR1
^W1REP("H","ITREP",0,"PAR","SET")
0
^W1REP("H","ITREP",0,"PAR1")
hixt my;20H
^W1REP("H","ITREP",0,"PAR1","SET")
0
^W1REP("H","ITREP",0,"PAR1","SH")
0
^W1REP("H","ITREP",0,"PRT")
hixt cew;8
^W1REP("H","ITREP",0,"PRT","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","ITREP",0,"PRT","OUT")
PRT1
^W1REP("H","ITREP",0,"PRT","SET")
0
^W1REP("H","ITREP",0,"PRT1")
hixt my;20H
^W1REP("H","ITREP",0,"PRT1","SET")
0
^W1REP("H","ITREP",0,"PRT1","SH")
0
^W1REP("H","ITREP",0,"SUG")
dveaw 'qn;7
^W1REP("H","ITREP",0,"SUG","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","ITREP",0,"SUG","OUT")
SUG1
^W1REP("H","ITREP",0,"SUG","SET")
0
^W1REP("H","ITREP",0,"SUG1")
dveaw my;12H
^W1REP("H","ITREP",0,"SUG1","SET")
0
^W1REP("H","ITREP",0,"SUG1","SH")
0
^W1REP("H","ITREP",0,"TRH")
jix`z;8D
^W1REP("H","ITREP",0,"TRH","SET")
0
^W1REP("H","ITREP",0,"TRH","SH")
1
^W1REP("H","ITREP",0,"YYMM")
ycege dpy;4
^W1REP("H","ITREP",0,"YYMM","SET")
0
^W1REP("H","ITREP",0,"YYMM","SH")
1
^W1REP("H","ITREP",0,"x1")
zenk;6,0
^W1REP("H","ITREP",0,"x2")
mekq;7,2
^W1REP("H","ITREP",0,"x3")
;,
^W1REP("H","ITREP","COD")
YYMM*TRH*MSD*MSD1*SUG*SUG1*PRT*PRT1*x1*x2
^W1REP("H","ITREP","CT")
0**0*0*0**
^W1REP("H","ITREP","FLD")
YYMM*TRH*MSD*SUG*PRT*x1*x2
^W1REP("H","ITREP","FLD0")
*-*****
^W1REP("H","ITREP","GLOB1")
^|$$^W3MAIN|W4ITREP(MSDR)
^W1REP("H","ITREP","GLOB2")
^|$$^W3MAIN|W4ITREP(MSDR,DT,MSD,PAR)
^W1REP("H","ITREP","LPT")
B
^W1REP("H","ITREP","MAM")
0*1*
^W1REP("H","ITREP","MIUN")
1**2*3*4**
^W1REP("H","ITREP","QUERY",". iztewz mitipqe mihixt itl","CT")
0*2*0*0***
^W1REP("H","ITREP","QUERY",". iztewz mitipqe mihixt itl","FLD0")
*M*P****
^W1REP("H","ITREP","QUERY",". iztewz mitipqe mihixt itl","MIUN")
3*1*2****
^W1REP("H","ITREP","QUERY",". iztewz mitipqe mihixt itl","SIK0")
0*1*1*0***
^W1REP("H","ITREP","QUERY","iztewz mihixte mitipq itl","CT")
**1*0*0*0*
^W1REP("H","ITREP","QUERY","iztewz mihixte mitipq itl","FLD0")
-*-*P****
^W1REP("H","ITREP","QUERY","iztewz mihixte mitipq itl","MIUN")
**1*2*3**
^W1REP("H","ITREP","QUERY","iztewz mihixte mitipq itl","SIK0")
**1*1*0*0*
^W1REP("H","ITREP","QUERY","iztewz zeveaw itl","CT")
**0*0**0*
^W1REP("H","ITREP","QUERY","iztewz zeveaw itl","FLD0")
-*-*P**-**
^W1REP("H","ITREP","QUERY","iztewz zeveaw itl","MIUN")
**2*1***
^W1REP("H","ITREP","QUERY","iztewz zeveaw itl","SIK0")
**0*1**0*0
^W1REP("H","ITREP","QUERY","mihixte mikix`z mitipq itl","CT")
0*0*0**0**
^W1REP("H","ITREP","QUERY","mihixte mikix`z mitipq itl","FLD0")
T*M**-***
^W1REP("H","ITREP","QUERY","mihixte mikix`z mitipq itl","MIUN")
2*1*3****
^W1REP("H","ITREP","QUERY","mihixte mikix`z mitipq itl","SIK0")
1*1*0**0**
^W1REP("H","ITREP","QUERY","mihixte miyceg mitipq itl","CT")
0**0**0*0*
^W1REP("H","ITREP","QUERY","mihixte miyceg mitipq itl","FLD0")
T*-**-***
^W1REP("H","ITREP","QUERY","mihixte miyceg mitipq itl","MIUN")
2**1**3**
^W1REP("H","ITREP","QUERY","mihixte miyceg mitipq itl","SIK0")
1**1**0*0*
^W1REP("H","ITREP","QUERY","mihixte zeveaw mitipq miyceg itl","CT")
0**0*0*0**
^W1REP("H","ITREP","QUERY","mihixte zeveaw mitipq miyceg itl","FLD0")
*-*****
^W1REP("H","ITREP","QUERY","mihixte zeveaw mitipq miyceg itl","MIUN")
1**2*3*4**
^W1REP("H","ITREP","QUERY","mihixte zeveaw mitipq miyceg itl","SIK0")
1**0*1*0**
^W1REP("H","ITREP","QUERY","mitipqe mihixt mikix`z itl","CT")
0*0*0**0**
^W1REP("H","ITREP","QUERY","mitipqe mihixt mikix`z itl","FLD0")
***-***
^W1REP("H","ITREP","QUERY","mitipqe mihixt mikix`z itl","MIUN")
1*3*2****
^W1REP("H","ITREP","QUERY","mitipqe mihixt mikix`z itl","SIK0")
1*0*1**0**
^W1REP("H","ITREP","QUERY","mitipqe mihixt miyceg itl","CT")
0**0**0*0*
^W1REP("H","ITREP","QUERY","mitipqe mihixt miyceg itl","FLD0")
*-**-***
^W1REP("H","ITREP","QUERY","mitipqe mihixt miyceg itl","MIUN")
1**3**2**
^W1REP("H","ITREP","QUERY","mitipqe mihixt miyceg itl","SIK0")
1**0**1*0*
^W1REP("H","ITREP","QUERY","mitipqe mihixt zeveaw miyceg itl","CT")
0**0*0***
^W1REP("H","ITREP","QUERY","mitipqe mihixt zeveaw miyceg itl","FLD0")
*-*****
^W1REP("H","ITREP","QUERY","mitipqe mihixt zeveaw miyceg itl","MIUN")
1**3*2***
^W1REP("H","ITREP","QUERY","mitipqe mihixt zeveaw miyceg itl","SIK0")
1**0*1***
^W1REP("H","ITREP","QUERY","mitipqe mikix`z mihixt itl","CT")
0*0*2**0**
^W1REP("H","ITREP","QUERY","mitipqe mikix`z mihixt itl","FLD0")
T*M**-***
^W1REP("H","ITREP","QUERY","mitipqe mikix`z mihixt itl","MIUN")
2*3*1****
^W1REP("H","ITREP","QUERY","mitipqe mikix`z mihixt itl","SIK0")
1*0*1**0**
^W1REP("H","ITREP","QUERY","mitipqe miyceg mihixt itl","CT")
0**0**2*0*
^W1REP("H","ITREP","QUERY","mitipqe miyceg mihixt itl","FLD0")
T*-**-***
^W1REP("H","ITREP","QUERY","mitipqe miyceg mihixt itl","MIUN")
2**3**1**
^W1REP("H","ITREP","QUERY","mitipqe miyceg mihixt itl","SIK0")
1**0**1*0*
^W1REP("H","ITREP","QUERY","zeveawe mikix`z itl","CT")
0*0*0*0***
^W1REP("H","ITREP","QUERY","zeveawe mikix`z itl","FLD0")
**P**-**
^W1REP("H","ITREP","QUERY","zeveawe mikix`z itl","MIUN")
1*3*2****
^W1REP("H","ITREP","QUERY","zeveawe mikix`z itl","SIK0")
1*0*1*0***
^W1REP("H","ITREP","QUERY","zeveawe miyceg itl","CT")
0**0*0**0*
^W1REP("H","ITREP","QUERY","zeveawe miyceg itl","FLD0")
*-*P**-**
^W1REP("H","ITREP","QUERY","zeveawe miyceg itl","MIUN")
1**3*2***
^W1REP("H","ITREP","QUERY","zeveawe miyceg itl","SIK0")
1**0*1**0*
^W1REP("H","ITREP","SIK")
1*1*
^W1REP("H","ITREP","SIK0")
1**0*1*0**
^W1REP("H","ITREP","US",2)
D DAT^W4ITREP
^W1REP("H","ITREP","US",3)
D MSD^W4ITREP
^W1REP("H","ITREP","US",4)
D PAR^W4ITREP
^W1REP("H","LEVD")
xvewn illk micaer g"ec
^W1REP("H","LEVD",0,"KV")
micaer zveaw;12
^W1REP("H","LEVD",0,"KV","FILE")
^|$$^%W1UCI(JB)|LEVSUG
^W1REP("H","LEVD",0,"KV","OUT")
KV1
^W1REP("H","LEVD",0,"KV","SET")
0
^W1REP("H","LEVD",0,"KV1")
dveaw my;12H
^W1REP("H","LEVD",0,"KV1","SET")
0
^W1REP("H","LEVD",0,"KV1","SH")
1
^W1REP("H","LEVD",0,"NOM")
dxey;5
^W1REP("H","LEVD",0,"NOM","SET")
0
^W1REP("H","LEVD",0,"NOM","SH")
1
^W1REP("H","LEVD",0,"STRING")
caer 'qn;8
^W1REP("H","LEVD",0,"STRING","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","LEVD",0,"STRING","M2")
S STRING1=$$^P1NAME(STRING)
^W1REP("H","LEVD",0,"STRING","OUT")
STRING1
^W1REP("H","LEVD",0,"STRING","SET")
0
^W1REP("H","LEVD",0,"STRING1")
caer my;16H
^W1REP("H","LEVD",0,"STRING1","SET")
0
^W1REP("H","LEVD",0,"STRING1","SH")
1
^W1REP("H","LEVD",0,"x1")
dqipk jix`z;11,0
^W1REP("H","LEVD",0,"x2")
mei;3,0
^W1REP("H","LEVD",0,"x3")
dry;5,0
^W1REP("H","LEVD",0,"x4")
d`ivi jix`z;11,0
^W1REP("H","LEVD",0,"x5")
mei;3,0
^W1REP("H","LEVD",0,"x6")
dry;5,0
^W1REP("H","LEVD",0,"x7")
zery k"dq;9,2
^W1REP("H","LEVD","COD")
KV*KV1*STRING*STRING1*NOM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","LEVD","CT")
2*0
^W1REP("H","LEVD","FLD")
KV*STRING*NOM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","LEVD","FLD0")
*****-*-**
^W1REP("H","LEVD","GLOB1")
^|$$^%W1UCI(JB)|TEMP($P)
^W1REP("H","LEVD","GLOB2")
^|$$^%W1UCI(JB)|TEMP($P,KV,STRING,NOM)
^W1REP("H","LEVD","LPT")
B
^W1REP("H","LEVD","MIUN")
1*2
^W1REP("H","LEVD","QUERY","inei micaer g""ec","CT")
2*0
^W1REP("H","LEVD","QUERY","inei micaer g""ec","FLD0")
*****-*-**
^W1REP("H","LEVD","QUERY","inei micaer g""ec","MIUN")
1*2
^W1REP("H","LEVD","QUERY","inei micaer g""ec","SIK0")
1*0
^W1REP("H","LEVD","QUERY","iztewz micaer g""ec","CT")
2*0
^W1REP("H","LEVD","QUERY","iztewz micaer g""ec","FLD0")
********
^W1REP("H","LEVD","QUERY","iztewz micaer g""ec","MIUN")
1*2
^W1REP("H","LEVD","QUERY","iztewz micaer g""ec","SIK0")
1*0
^W1REP("H","LEVD","SIK")
******1*
^W1REP("H","LEVD","SIK0")
1*0
^W1REP("H","LEVD","US",3)
S STRING1=$$^W4NAME(STRING)
^W1REP("H","LEVD","US",4)
D TM^W4LEVD
^W1REP("H","MBPR")
zepnfd ilawn itl mihixt g"ec
^W1REP("H","MBPR",0,"MLZR")
xvln;9
^W1REP("H","MBPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("H","MBPR",0,"MLZR","OUT")
MLZR1
^W1REP("H","MBPR",0,"MLZR1")
xvln my;12H
^W1REP("H","MBPR",0,"MLZR1","SH")
0
^W1REP("H","MBPR",0,"PAR")
hixt;8
^W1REP("H","MBPR",0,"PAR","FILE")
^PAR
^W1REP("H","MBPR",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","MBPR",0,"PAR","OUT")
PAR1
^W1REP("H","MBPR",0,"PAR1")
hixt xe`z;20H
^W1REP("H","MBPR",0,"PAR1","SH")
1
^W1REP("H","MBPR",0,"SUGP")
hixt beq;3
^W1REP("H","MBPR",0,"SUGP","FILE")
^PARSUG
^W1REP("H","MBPR",0,"SUGP","OUT")
SUGP1
^W1REP("H","MBPR",0,"SUGP1")
beq xe`z;10H
^W1REP("H","MBPR",0,"SUGP1","SH")
0
^W1REP("H","MBPR",0,"SUGS")
lawn;5.
^W1REP("H","MBPR",0,"SUGS","FILE")
^NAME
^W1REP("H","MBPR",0,"SUGS","M2")
S SUGS1=$G(^NAME(SUGS,1))
^W1REP("H","MBPR",0,"SUGS","OUT")
SUGS1
^W1REP("H","MBPR",0,"SUGS1")
lawnd my;12H
^W1REP("H","MBPR",0,"SUGS1","SH")
1
^W1REP("H","MBPR",0,"x1")
zenk;5,0
^W1REP("H","MBPR",0,"x2")
dgpd iptl;10,2
^W1REP("H","MBPR",0,"x3")
hixtl dgpd;10,2
^W1REP("H","MBPR",0,"x4")
k"dq;8,2
^W1REP("H","MBPR",0,"x5")
;,
^W1REP("H","MBPR",0,"x6")
;,
^W1REP("H","MBPR","COD")
SUGS*SUGS1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4
^W1REP("H","MBPR","CT")
1*2*0*0*0*0*0
^W1REP("H","MBPR","FLD")
SUGS*SUGP*PAR*x1*x2*x3*x4
^W1REP("H","MBPR","FLD0")
*******
^W1REP("H","MBPR","GLOB1")
^VRM(PRTN)
^W1REP("H","MBPR","GLOB2")
^VRM(PRTN,SUGS,SUGP,PAR)
^W1REP("H","MBPR","LPT")
S
^W1REP("H","MBPR","MIUN")
1*2*3*4*2*0*0
^W1REP("H","MBPR","QUERY","mihixt itl milawn","CT")
1*2*0*0*0*0*0
^W1REP("H","MBPR","QUERY","mihixt itl milawn","FLD0")
*******
^W1REP("H","MBPR","QUERY","mihixt itl milawn","MIUN")
1*2*3*4*2*0*0
^W1REP("H","MBPR","QUERY","mihixt itl milawn","SIK0")
1*0*0*0*0*0*0
^W1REP("H","MBPR","QUERY","milawn itl mihixt","CT")
0*1*2*0*0*0*0
^W1REP("H","MBPR","QUERY","milawn itl mihixt","FLD0")
*******
^W1REP("H","MBPR","QUERY","milawn itl mihixt","MIUN")
3*1*2*4*2*0*0
^W1REP("H","MBPR","QUERY","milawn itl mihixt","SIK0")
0*0*0*0*0*0*0
^W1REP("H","MBPR","SHP","KOD")
P1DPMKB
^W1REP("H","MBPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("H","MBPR","SIK")
1*1*1*1**
^W1REP("H","MBPR","SIK0")
1*0*0*0*0*0*0
^W1REP("H","MBPR","US",4)
D PAR^P1DPMKB
^W1REP("H","MDBL")
zeveaw itl zegewl zbvd
^W1REP("H","MDBL",0,"EMAIL")
E-MAIL;30
^W1REP("H","MDBL",0,"EMAIL","SET")
0
^W1REP("H","MDBL",0,"EMAIL","SH")
0
^W1REP("H","MDBL",0,"IR")
xir;12H
^W1REP("H","MDBL",0,"IR","SH")
0
^W1REP("H","MDBL",0,"KTV")
zaezk;20H
^W1REP("H","MDBL",0,"KTV","SH")
0
^W1REP("H","MDBL",0,"LKH")
gewl 'qn;10
^W1REP("H","MDBL",0,"LKH","FILE")
^LKH
^W1REP("H","MDBL",0,"LKH","OUT")
LKH1
^W1REP("H","MDBL",0,"LKH","SET")
1
^W1REP("H","MDBL",0,"LKH1")
gewl xe`z;32H
^W1REP("H","MDBL",0,"LKH1","SET")
0
^W1REP("H","MDBL",0,"LKH1","SH")
1
^W1REP("H","MDBL",0,"MANUJ")
dcil jix`z;8D
^W1REP("H","MDBL",0,"MANUJ","SH")
1
^W1REP("H","MDBL",0,"MIKUD")
cewin;5
^W1REP("H","MDBL",0,"MIKUD","SH")
1
^W1REP("H","MDBL",0,"SUGL")
gewl beq;8
^W1REP("H","MDBL",0,"SUGL","FILE")
^SUGL
^W1REP("H","MDBL",0,"SUGL","OUT")
SUGL1
^W1REP("H","MDBL",0,"SUGL","SET")
0
^W1REP("H","MDBL",0,"SUGL1")
xe`z;12H
^W1REP("H","MDBL",0,"SUGL1","SET")
0
^W1REP("H","MDBL",0,"SUGL1","SH")
1
^W1REP("H","MDBL",0,"TEL")
oetlh;10
^W1REP("H","MDBL",0,"TEL","SH")
0
^W1REP("H","MDBL",0,"x1")
oetlh;10,0
^W1REP("H","MDBL",0,"x2")
zaezk;22,0
^W1REP("H","MDBL",0,"x3")
xir;12,0
^W1REP("H","MDBL",0,"x4")
cewin;5,0
^W1REP("H","MDBL",0,"x5")
;,
^W1REP("H","MDBL",0,"x6")
cewin;5,0
^W1REP("H","MDBL",0,"x7")
;,
^W1REP("H","MDBL","COD")
SUGL*SUGL1*LKH*LKH1*x1*x2*x3*x4
^W1REP("H","MDBL","CT")
1*0*0*0*0*0
^W1REP("H","MDBL","FLD")
SUGL*LKH*x1*x2*x3*x4
^W1REP("H","MDBL","FLD0")
****
^W1REP("H","MDBL","GLOB1")
^LKH
^W1REP("H","MDBL","GLOB2")
^LKH(LKH)
^W1REP("H","MDBL","LPT")
B
^W1REP("H","MDBL","MIUN")
1*2*3*4*4*5
^W1REP("H","MDBL","QUERY","cewin itl ","CT")
1*0*0*0*0*0
^W1REP("H","MDBL","QUERY","cewin itl ","FLD0")
*****
^W1REP("H","MDBL","QUERY","cewin itl ","MIUN")
1*2*3*4*4*5
^W1REP("H","MDBL","QUERY","cewin itl ","SIK0")
0*0*0*0*0*0
^W1REP("H","MDBL","SIK")
****
^W1REP("H","MDBL","SIK0")
0*0*0*0*0*0
^W1REP("H","MDBL","US",-1)
D LKH^KLMADB
^W1REP("H","MDBL","US",1)
D LKH^KLMADB
^W1REP("H","MDBL0")
zeveaw itl zegewl zbvd
^W1REP("H","MDBL0",0,"IR")
xir;12H
^W1REP("H","MDBL0",0,"IR","SH")
0
^W1REP("H","MDBL0",0,"KTV")
zaezk;20H
^W1REP("H","MDBL0",0,"KTV","SH")
0
^W1REP("H","MDBL0",0,"LKH")
gewl 'qn;10
^W1REP("H","MDBL0",0,"LKH","FILE")
^LKH
^W1REP("H","MDBL0",0,"LKH","OUT")
LKH1
^W1REP("H","MDBL0",0,"LKH1")
gewl xe`z;32H
^W1REP("H","MDBL0",0,"LKH1","SH")
1
^W1REP("H","MDBL0",0,"MANUJ")
dcil jix`z;8D
^W1REP("H","MDBL0",0,"MANUJ","SH")
1
^W1REP("H","MDBL0",0,"MIKUD")
cewin;5
^W1REP("H","MDBL0",0,"MIKUD","SH")
1
^W1REP("H","MDBL0",0,"SUGL")
gewl beq;8
^W1REP("H","MDBL0",0,"SUGL","FILE")
^SUGL
^W1REP("H","MDBL0",0,"SUGL","OUT")
SUGL1
^W1REP("H","MDBL0",0,"SUGL1")
xe`z;12H
^W1REP("H","MDBL0",0,"SUGL1","SH")
1
^W1REP("H","MDBL0",0,"TEL")
oetlh;10
^W1REP("H","MDBL0",0,"TEL","SH")
0
^W1REP("H","MDBL0",0,"x1")
oetlh;10,0
^W1REP("H","MDBL0",0,"x2")
zaezk;22,0
^W1REP("H","MDBL0",0,"x3")
xir;12,0
^W1REP("H","MDBL0",0,"x4")
cewin;5,0
^W1REP("H","MDBL0",0,"x5")
;,
^W1REP("H","MDBL0","COD")
SUGL*SUGL1*LKH*LKH1*x1*x2*x3*x4
^W1REP("H","MDBL0","CT")
1*0*0*0*0*0
^W1REP("H","MDBL0","FLD")
SUGL*LKH*x1*x2*x3*x4
^W1REP("H","MDBL0","FLD0")
*****
^W1REP("H","MDBL0","GLOB1")
^LKH
^W1REP("H","MDBL0","GLOB2")
^LKH(LKH)
^W1REP("H","MDBL0","LPT")
B
^W1REP("H","MDBL0","MIUN")
1*2*3*4*4*5
^W1REP("H","MDBL0","QUERY","cewin itl ","CT")
1*0*0*0*0*0
^W1REP("H","MDBL0","QUERY","cewin itl ","FLD0")
*****
^W1REP("H","MDBL0","QUERY","cewin itl ","MIUN")
1*2*3*4*4*5
^W1REP("H","MDBL0","QUERY","cewin itl ","SIK0")
0*0*0*0*0*0
^W1REP("H","MDBL0","SIK")
****
^W1REP("H","MDBL0","SIK0")
0*0*0*0*0*0
^W1REP("H","MDBL0","US",-1)
D LKH^KLMADB
^W1REP("H","MDBL0","US",1)
D LKH^KLMADB
^W1REP("H","MHAL")
zelr xign mr zewlgn itl zexikn
^W1REP("H","MHAL",0,"DAT")
jix`z;8D
^W1REP("H","MHAL",0,"DAT","SH")
1
^W1REP("H","MHAL",0,"DATT")
jix`z;8D
^W1REP("H","MHAL",0,"DATT","SET")
0
^W1REP("H","MHAL",0,"DATT","SH")
1
^W1REP("H","MHAL",0,"MHL")
dwlgn;5
^W1REP("H","MHAL",0,"MHL","FILE")
^DEP
^W1REP("H","MHAL",0,"MHL","OUT")
MHL1
^W1REP("H","MHAL",0,"MHL","SET")
0
^W1REP("H","MHAL",0,"MHL1")
xe`z;12H
^W1REP("H","MHAL",0,"MHL1","SET")
0
^W1REP("H","MHAL",0,"MHL1","SH")
0
^W1REP("H","MHAL",0,"PAR")
hixt;8
^W1REP("H","MHAL",0,"PAR","FILE")
^PAR
^W1REP("H","MHAL",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","MHAL",0,"PAR","OUT")
PAR1
^W1REP("H","MHAL",0,"PAR","SET")
0
^W1REP("H","MHAL",0,"PAR1")
hixt my;12H
^W1REP("H","MHAL",0,"PAR1","SET")
0
^W1REP("H","MHAL",0,"PAR1","SH")
1
^W1REP("H","MHAL",0,"PARIT")
hixt cew;8.
^W1REP("H","MHAL",0,"PARIT","FILE")
^PAR
^W1REP("H","MHAL",0,"PARIT","M2")
D PAR1^L2MHIRA
^W1REP("H","MHAL",0,"PARIT","OUT")
PARIT1
^W1REP("H","MHAL",0,"PARIT1")
hixt xe`z;18H
^W1REP("H","MHAL",0,"PARIT1","SH")
0
^W1REP("H","MHAL",0,"SUGP")
dveaw;5
^W1REP("H","MHAL",0,"SUGP","FILE")
^PARSUG
^W1REP("H","MHAL",0,"SUGP","OUT")
SUGP1
^W1REP("H","MHAL",0,"SUGP","SET")
0
^W1REP("H","MHAL",0,"SUGP1")
dveaw xe`z;12H
^W1REP("H","MHAL",0,"SUGP1","SET")
0
^W1REP("H","MHAL",0,"SUGP1","SH")
0
^W1REP("H","MHAL",0,"x1")
zenk;7,1
^W1REP("H","MHAL",0,"x2")
dxikn xign;7,2
^W1REP("H","MHAL",0,"x3")
zelr xign;7,2
^W1REP("H","MHAL",0,"x4")
n"rn iptl;9,1
^W1REP("H","MHAL",0,"x5")
zelr;9,1
^W1REP("H","MHAL",0,"x6")
geex;8,1
^W1REP("H","MHAL",0,"x7")
;,
^W1REP("H","MHAL","COD")
MHL*MHL1*SUGP*SUGP1*PAR*PAR1*DATT*x1*x2*x3*x4*x5*x6
^W1REP("H","MHAL","CT")
1*2*0*2*2*0*0
^W1REP("H","MHAL","FLD")
MHL*SUGP*PAR*DATT*x1*x2*x3*x4*x5*x6
^W1REP("H","MHAL","FLD0")
*******
^W1REP("H","MHAL","GLOB1")
^PLUTOT
^W1REP("H","MHAL","GLOB2")
^PLUTOT(DAT,MRK,PARIT)
^W1REP("H","MHAL","LPT")
B
^W1REP("H","MHAL","MIUN")
1*3*4*2*3*4**0
^W1REP("H","MHAL","QUERY","mini itl fkexn","CT")
1*2*0*0*2*0*0
^W1REP("H","MHAL","QUERY","mini itl fkexn","FLD0")
-*-*-***-*-***
^W1REP("H","MHAL","QUERY","mini itl fkexn","MIUN")
1*3*4*1*3*4**0
^W1REP("H","MHAL","QUERY","mini itl fkexn","SIK0")
1*1*0*0*1*0*0
^W1REP("H","MHAL","QUERY","mini itl hxetn","CT")
1*2*0*2*2*0*0
^W1REP("H","MHAL","QUERY","mini itl hxetn","FLD0")
*******
^W1REP("H","MHAL","QUERY","mini itl hxetn","MIUN")
1*3*4*2*3*4**0
^W1REP("H","MHAL","QUERY","mini itl hxetn","SIK0")
1*1*0*1*1*0*0
^W1REP("H","MHAL","QUERY","zeveaw ila hxetn","CT")
1*2*0*0*2*0*0
^W1REP("H","MHAL","QUERY","zeveaw ila hxetn","FLD0")
*-**-****
^W1REP("H","MHAL","QUERY","zeveaw ila hxetn","MIUN")
1*2*3*4*3*4**0
^W1REP("H","MHAL","QUERY","zeveaw ila hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("H","MHAL","QUERY","zeveawe zewlgn itl fkexn","CT")
2*0*0*0*2*0*0
^W1REP("H","MHAL","QUERY","zeveawe zewlgn itl fkexn","FLD0")
**-*-****
^W1REP("H","MHAL","QUERY","zeveawe zewlgn itl fkexn","MIUN")
1*2*3*4*3*4**0
^W1REP("H","MHAL","QUERY","zeveawe zewlgn itl fkexn","SIK0")
1*0*0*0*1*0*0
^W1REP("H","MHAL","QUERY","zeveawe zewlgn itl hxetn","CT")
1*2*0*0*2*0*0
^W1REP("H","MHAL","QUERY","zeveawe zewlgn itl hxetn","FLD0")
***-****
^W1REP("H","MHAL","QUERY","zeveawe zewlgn itl hxetn","MIUN")
1*2*3*4*3*4**0
^W1REP("H","MHAL","QUERY","zeveawe zewlgn itl hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("H","MHAL","SIK")
1***1*1*1**
^W1REP("H","MHAL","SIK0")
1*1*0*1*1*0*0
^W1REP("H","MHAL","US",-1)
D DAT^L2MHIRA
^W1REP("H","MHAL","US",1)
D DAT^L2MHIRA
^W1REP("H","MHAL","US",3)
D PAR^L2MHIRA
^W1REP("H","MHMK")
mifkxn itl zexikn
^W1REP("H","MHMK",0,"DAT")
jix`z;8D
^W1REP("H","MHMK",0,"DAT","SH")
1
^W1REP("H","MHMK",0,"DATT")
jix`z;8D
^W1REP("H","MHMK",0,"DATT","SH")
1
^W1REP("H","MHMK",0,"MHL")
dwlgn;5
^W1REP("H","MHMK",0,"MHL","FILE")
^DEP
^W1REP("H","MHMK",0,"MHL","OUT")
MHL1
^W1REP("H","MHMK",0,"MHL1")
xe`z;12H
^W1REP("H","MHMK",0,"MHL1","SH")
0
^W1REP("H","MHMK",0,"MRKZ")
fkxn;4
^W1REP("H","MHMK",0,"MRKZ","FILE")
^MRKZ
^W1REP("H","MHMK",0,"MRKZ","OUT")
MRKZ1
^W1REP("H","MHMK",0,"MRKZ1")
fkxn my;12H
^W1REP("H","MHMK",0,"MRKZ1","SH")
1
^W1REP("H","MHMK",0,"PARIT")
hixt cew;8.
^W1REP("H","MHMK",0,"PARIT","FILE")
^PAR
^W1REP("H","MHMK",0,"PARIT","M2")
D PAR1^L2MHIRA
^W1REP("H","MHMK",0,"PARIT","OUT")
PARIT1
^W1REP("H","MHMK",0,"PARIT1")
hixt xe`z;18H
^W1REP("H","MHMK",0,"PARIT1","SH")
0
^W1REP("H","MHMK",0,"SUGP")
dveaw;5
^W1REP("H","MHMK",0,"SUGP","FILE")
^PARSUG
^W1REP("H","MHMK",0,"SUGP","OUT")
SUGP1
^W1REP("H","MHMK",0,"SUGP1")
dveaw xe`z;12H
^W1REP("H","MHMK",0,"SUGP1","SH")
0
^W1REP("H","MHMK",0,"x1")
zenk;7,2
^W1REP("H","MHMK",0,"x2")
mekq;10,2
^W1REP("H","MHMK",0,"x3")
dxikn xign;10,2
^W1REP("H","MHMK",0,"x4")
n"rn iptl;10,2
^W1REP("H","MHMK",0,"x5")
;,
^W1REP("H","MHMK","COD")
MRKZ*MRKZ1*MHL*MHL1*SUGP*SUGP1*PARIT*PARIT1*DATT*x1*x2*x3*x4
^W1REP("H","MHMK","CT")
0*2*2*2*2*0*0
^W1REP("H","MHMK","FLD")
MRKZ*MHL*SUGP*PARIT*DATT*x1*x2*x3*x4
^W1REP("H","MHMK","FLD0")
*-*-**-****
^W1REP("H","MHMK","GLOB1")
^PLUMRK
^W1REP("H","MHMK","GLOB2")
^PLUMRK(DAT,MRKZ,PARIT)
^W1REP("H","MHMK","LPT")
S
^W1REP("H","MHMK","MIUN")
2*1*2*1*3*4**0
^W1REP("H","MHMK","MIUN","PROG")
CP^L2MHIRA
^W1REP("H","MHMK","QUERY","fkexn mifkxn itl mihixt g""ec","CT")
0*2*2*0*2*0*0
^W1REP("H","MHMK","QUERY","fkexn mifkxn itl mihixt g""ec","FLD0")
-*-*-**-****
^W1REP("H","MHMK","QUERY","fkexn mifkxn itl mihixt g""ec","MIUN")
2*1*2*1*3*4**0
^W1REP("H","MHMK","QUERY","fkexn mifkxn itl mihixt g""ec","SIK0")
0*1*1*0*1*0*0
^W1REP("H","MHMK","QUERY","hxetn mifkxn itl mihixt g""ec","CT")
0*2*2*2*2*0*0
^W1REP("H","MHMK","QUERY","hxetn mifkxn itl mihixt g""ec","FLD0")
*-*-**-****
^W1REP("H","MHMK","QUERY","hxetn mifkxn itl mihixt g""ec","MIUN")
2*1*2*1*3*4**0
^W1REP("H","MHMK","QUERY","hxetn mifkxn itl mihixt g""ec","SIK0")
0*1*1*1*1*0*0
^W1REP("H","MHMK","QUERY","mihixte zeveaw ,zewlgn itl g""ec","CT")
1*2*2*0*2*0*0
^W1REP("H","MHMK","QUERY","mihixte zeveaw ,zewlgn itl g""ec","FLD0")
****-****
^W1REP("H","MHMK","QUERY","mihixte zeveaw ,zewlgn itl g""ec","MIUN")
1*2*3*4*3*4**0
^W1REP("H","MHMK","QUERY","mihixte zeveaw ,zewlgn itl g""ec","SIK0")
1*1*1*0*1*0*0
^W1REP("H","MHMK","QUERY","mini itl g""ec","CT")
1*2*0*0*2*0*0
^W1REP("H","MHMK","QUERY","mini itl g""ec","FLD0")
**-******
^W1REP("H","MHMK","QUERY","mini itl g""ec","MIUN")
1*3*3*4*2*4**0
^W1REP("H","MHMK","QUERY","mini itl g""ec","SIK0")
1*1*0*0*1*0*0
^W1REP("H","MHMK","QUERY","zeveawe zewlgn itl fkexn g""ec","CT")
1*2*0*0*2*0*0
^W1REP("H","MHMK","QUERY","zeveawe zewlgn itl fkexn g""ec","FLD0")
***-*-****
^W1REP("H","MHMK","QUERY","zeveawe zewlgn itl fkexn g""ec","MIUN")
1*2*3*4*3*4**0
^W1REP("H","MHMK","QUERY","zeveawe zewlgn itl fkexn g""ec","SIK0")
1*0*0*0*1*0*0
^W1REP("H","MHMK","QUERY","zewlgn `ll mini itl g""ec","CT")
1*2*0*0*2*0*0
^W1REP("H","MHMK","QUERY","zewlgn `ll mini itl g""ec","FLD0")
*-*-******
^W1REP("H","MHMK","QUERY","zewlgn `ll mini itl g""ec","MIUN")
1*3*3*3*2*4**0
^W1REP("H","MHMK","QUERY","zewlgn `ll mini itl g""ec","SIK0")
1*1*0*0*1*0*0
^W1REP("H","MHMK","QUERY","zewlgne mifkxn itl fkexn g""ec","CT")
2*0*0*0*2*0*0
^W1REP("H","MHMK","QUERY","zewlgne mifkxn itl fkexn g""ec","FLD0")
**-*-*-****
^W1REP("H","MHMK","QUERY","zewlgne mifkxn itl fkexn g""ec","MIUN")
1*2*3*4*3*4**0
^W1REP("H","MHMK","QUERY","zewlgne mifkxn itl fkexn g""ec","SIK0")
1*0*0*0*1*0*0
^W1REP("H","MHMK","SIK")
1*1*0*1**1*0*
^W1REP("H","MHMK","SIK0")
0*1*1*1*1*0*0
^W1REP("H","MHMK","US",1)
D DAT^L2MHIRA
^W1REP("H","MHMK","US",3)
D PAR^L2MHIRA
^W1REP("H","MLTNIN")
i`ln zeqpkd g"ec
^W1REP("H","MLTNIN",0,"DAT")
jix`z;8D
^W1REP("H","MLTNIN",0,"DAT","SET")
0
^W1REP("H","MLTNIN",0,"DAT","SH")
1
^W1REP("H","MLTNIN",0,"DEP")
dwlgn;5
^W1REP("H","MLTNIN",0,"DEP","FILE")
^|$$^%W1UCI(JB)|MLDEP
^W1REP("H","MLTNIN",0,"DEP","OUT")
DEP1
^W1REP("H","MLTNIN",0,"DEP","SET")
0
^W1REP("H","MLTNIN",0,"DEP1")
dwlgn my;12H
^W1REP("H","MLTNIN",0,"DEP1","SET")
0
^W1REP("H","MLTNIN",0,"DEP1","SH")
1
^W1REP("H","MLTNIN",0,"EM1")
dcin 'gi;5
^W1REP("H","MLTNIN",0,"EM1","SET")
0
^W1REP("H","MLTNIN",0,"EM1","SH")
1
^W1REP("H","MLTNIN",0,"KVZ")
dveaw;5
^W1REP("H","MLTNIN",0,"KVZ","FILE")
^|$$^%W1UCI(JB)|MLSUGP
^W1REP("H","MLTNIN",0,"KVZ","OUT")
KVZ1
^W1REP("H","MLTNIN",0,"KVZ","SET")
0
^W1REP("H","MLTNIN",0,"KVZ1")
dveaw my;16H
^W1REP("H","MLTNIN",0,"KVZ1","SET")
0
^W1REP("H","MLTNIN",0,"KVZ1","SH")
1
^W1REP("H","MLTNIN",0,"PRT")
hixt cew;8
^W1REP("H","MLTNIN",0,"PRT","FILE")
^|$$^%W1UCI(JB)|MLPAR
^W1REP("H","MLTNIN",0,"PRT","OUT")
PRT1
^W1REP("H","MLTNIN",0,"PRT","SET")
0
^W1REP("H","MLTNIN",0,"PRT1")
hixt my;18H
^W1REP("H","MLTNIN",0,"PRT1","SET")
0
^W1REP("H","MLTNIN",0,"PRT1","SH")
1
^W1REP("H","MLTNIN",0,"SP")
wtq;5
^W1REP("H","MLTNIN",0,"SP","FILE")
^|$$^%W1UCI(JB)|W4SPK
^W1REP("H","MLTNIN",0,"SP","OUT")
SP1
^W1REP("H","MLTNIN",0,"SP","SET")
0
^W1REP("H","MLTNIN",0,"SP1")
wtq my;12H
^W1REP("H","MLTNIN",0,"SP1","SET")
0
^W1REP("H","MLTNIN",0,"SP1","SH")
1
^W1REP("H","MLTNIN",0,"TRH")
jix`z;8D
^W1REP("H","MLTNIN",0,"TRH","SET")
0
^W1REP("H","MLTNIN",0,"TRH","SH")
1
^W1REP("H","MLTNIN",0,"x1")
dcin 'gi;12,0
^W1REP("H","MLTNIN",0,"x2")
zenk;7,2
^W1REP("H","MLTNIN",0,"x3")
mekq;7,2
^W1REP("H","MLTNIN",0,"x4")
xfgd;7,2
^W1REP("H","MLTNIN",0,"x5")
xfgd mekq;7,2
^W1REP("H","MLTNIN",0,"x6")
ehp zenk;7,2
^W1REP("H","MLTNIN",0,"x7")
ehp mekq;7,2
^W1REP("H","MLTNIN",0,"x8")
;,
^W1REP("H","MLTNIN","COD")
SP*SP1*DEP*DEP1*KVZ*KVZ1*DAT*PRT*PRT1*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","MLTNIN","CT")
****0*******
^W1REP("H","MLTNIN","FLD")
SP*DEP*KVZ*DAT*PRT*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","MLTNIN","FLD0")
-*-*-*-*P*******
^W1REP("H","MLTNIN","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","MLTNIN","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,SP,DT,PRT)
^W1REP("H","MLTNIN","LPT")
B
^W1REP("H","MLTNIN","MIUN")
****1*******
^W1REP("H","MLTNIN","MIUN","PROG")
GET^W4MLTNIN
^W1REP("H","MLTNIN","QUERY","1 - mihixt itl i`ln zeqpkd g""ec","CT")
****0*******
^W1REP("H","MLTNIN","QUERY","1 - mihixt itl i`ln zeqpkd g""ec","FLD0")
-*-*-*-*P*******
^W1REP("H","MLTNIN","QUERY","1 - mihixt itl i`ln zeqpkd g""ec","MIUN")
****1*******
^W1REP("H","MLTNIN","QUERY","1 - mihixt itl i`ln zeqpkd g""ec","SIK0")
****0*1*1*0****
^W1REP("H","MLTNIN","QUERY","2 - mihixte mikix`z itl i`ln zeqpkd g""ec","CT")
***2*0*******
^W1REP("H","MLTNIN","QUERY","2 - mihixte mikix`z itl i`ln zeqpkd g""ec","FLD0")
-*-*-*D*P*******
^W1REP("H","MLTNIN","QUERY","2 - mihixte mikix`z itl i`ln zeqpkd g""ec","MIUN")
***1*2*******
^W1REP("H","MLTNIN","QUERY","2 - mihixte mikix`z itl i`ln zeqpkd g""ec","SIK0")
***1*0*1*0*****
^W1REP("H","MLTNIN","QUERY","3 - miwtq itl i`ln zeqpkd g""ec","CT")
2****0*******
^W1REP("H","MLTNIN","QUERY","3 - miwtq itl i`ln zeqpkd g""ec","FLD0")
*-*-*-*P*******
^W1REP("H","MLTNIN","QUERY","3 - miwtq itl i`ln zeqpkd g""ec","MIUN")
1***********
^W1REP("H","MLTNIN","QUERY","3 - miwtq itl i`ln zeqpkd g""ec","SIK0")
1****0*1*0*****
^W1REP("H","MLTNIN","QUERY","4 - mikix`ze miwtq itl i`ln zeqpkd g""ec","CT")
2***0*0*******
^W1REP("H","MLTNIN","QUERY","4 - mikix`ze miwtq itl i`ln zeqpkd g""ec","FLD0")
*-*-*D*P*******
^W1REP("H","MLTNIN","QUERY","4 - mikix`ze miwtq itl i`ln zeqpkd g""ec","MIUN")
1***2*3*******
^W1REP("H","MLTNIN","QUERY","4 - mikix`ze miwtq itl i`ln zeqpkd g""ec","SIK0")
1***1*0*0******
^W1REP("H","MLTNIN","QUERY","5 - zeveawe zewlgn , miwtq itl i`ln zeqpkd g""ec","CT")
1*2*2**0*******
^W1REP("H","MLTNIN","QUERY","5 - zeveawe zewlgn , miwtq itl i`ln zeqpkd g""ec","FLD0")
S*D*K*-*P*******
^W1REP("H","MLTNIN","QUERY","5 - zeveawe zewlgn , miwtq itl i`ln zeqpkd g""ec","MIUN")
1*2*3**4*******
^W1REP("H","MLTNIN","QUERY","5 - zeveawe zewlgn , miwtq itl i`ln zeqpkd g""ec","SIK0")
1*1*1**0*******
^W1REP("H","MLTNIN","QUERY","6 - mikix`ze zeveaw, zewlgn, miwtq itl i`ln zeqpkd g""ec","CT")
1*2*2*0*0
^W1REP("H","MLTNIN","QUERY","6 - mikix`ze zeveaw, zewlgn, miwtq itl i`ln zeqpkd g""ec","FLD0")
SP*DEP*KVZ*DAT*PRT
^W1REP("H","MLTNIN","QUERY","6 - mikix`ze zeveaw, zewlgn, miwtq itl i`ln zeqpkd g""ec","MIUN")
1*2*3*4*5
^W1REP("H","MLTNIN","QUERY","6 - mikix`ze zeveaw, zewlgn, miwtq itl i`ln zeqpkd g""ec","SIK0")
1*1*1*1*0
^W1REP("H","MLTNIN","QUERY","7 - zeveawe zewlgn itl i`ln zeqpkd g""ec","CT")
*1*2*0*0*******
^W1REP("H","MLTNIN","QUERY","7 - zeveawe zewlgn itl i`ln zeqpkd g""ec","FLD0")
-***D*P*******
^W1REP("H","MLTNIN","QUERY","7 - zeveawe zewlgn itl i`ln zeqpkd g""ec","MIUN")
*1*2*3*4*******
^W1REP("H","MLTNIN","QUERY","7 - zeveawe zewlgn itl i`ln zeqpkd g""ec","SIK0")
*1*1*1*0*0******
^W1REP("H","MLTNIN","QUERY","8 - mikix`ze zeveaw, zewlgn itl i`ln zeqpkd g""ec","CT")
*1*2*0*0*******
^W1REP("H","MLTNIN","QUERY","8 - mikix`ze zeveaw, zewlgn itl i`ln zeqpkd g""ec","FLD0")
-***D*P*******
^W1REP("H","MLTNIN","QUERY","8 - mikix`ze zeveaw, zewlgn itl i`ln zeqpkd g""ec","MIUN")
*1*2*3*4*******
^W1REP("H","MLTNIN","QUERY","8 - mikix`ze zeveaw, zewlgn itl i`ln zeqpkd g""ec","SIK0")
*1*1*1*0*0******
^W1REP("H","MLTNIN","SIK")
*1*1*1*1*1*1*
^W1REP("H","MLTNIN","SIK0")
****0*1*1*0****
^W1REP("H","MLTNIN","US",2)
D SP^W4MLTNIN
^W1REP("H","MLTNIN","US",3)
D DT^W4MLTNIN
^W1REP("H","MLTNIN","US",4)
D PRT^W4MLTNIN
^W1REP("H","MLZT")
melyz ibeq itl g"ec
^W1REP("H","MLZT",0,"EMDA")
dcnr;4
^W1REP("H","MLZT",0,"EMDA","SET")
0
^W1REP("H","MLZT",0,"EMDA","SH")
1
^W1REP("H","MLZT",0,"HZM")
dpnfd;8
^W1REP("H","MLZT",0,"HZM","SET")
1
^W1REP("H","MLZT",0,"HZM","SH")
1
^W1REP("H","MLZT",0,"MLZ")
xvln 'qn;5
^W1REP("H","MLZT",0,"MLZ","FILE")
^NAME
^W1REP("H","MLZT",0,"MLZ","M2")
S MLZ1=$$^W4NAME(MLZ)
^W1REP("H","MLZT",0,"MLZ","OUT")
MLZ1
^W1REP("H","MLZT",0,"MLZ","SET")
0
^W1REP("H","MLZT",0,"MLZ1")
xvln my;12H
^W1REP("H","MLZT",0,"MLZ1","SET")
0
^W1REP("H","MLZT",0,"MLZ1","SH")
1
^W1REP("H","MLZT",0,"NMB")
ogley;8
^W1REP("H","MLZT",0,"NMB","SET")
0
^W1REP("H","MLZT",0,"NMB","SH")
1
^W1REP("H","MLZT",0,"PART")
dcnr;4
^W1REP("H","MLZT",0,"PART","FILE")
^PLUK
^W1REP("H","MLZT",0,"PART","SH")
1
^W1REP("H","MLZT",0,"SHAA")
dry;5
^W1REP("H","MLZT",0,"SHAA","SET")
0
^W1REP("H","MLZT",0,"SHAA","SH")
1
^W1REP("H","MLZT",0,"SHULH")
ogley;5
^W1REP("H","MLZT",0,"SHULH","SH")
1
^W1REP("H","MLZT",0,"SUGS")
ogley beq;5
^W1REP("H","MLZT",0,"SUGS","FILE")
^SUGS
^W1REP("H","MLZT",0,"SUGS","OUT")
SUGS1
^W1REP("H","MLZT",0,"SUGS","SET")
0
^W1REP("H","MLZT",0,"SUGS1")
beq xe`z;6H
^W1REP("H","MLZT",0,"SUGS1","SET")
0
^W1REP("H","MLZT",0,"SUGS1","SH")
1
^W1REP("H","MLZT",0,"TRH")
jix`z;8D
^W1REP("H","MLZT",0,"TRH","SH")
1
^W1REP("H","MLZT",0,"TRHT")
jix`z;8D
^W1REP("H","MLZT",0,"TRHT","SET")
0
^W1REP("H","MLZT",0,"TRHT","SH")
1
^W1REP("H","MLZT",0,"x1")
melyzl;8,2
^W1REP("H","MLZT",0,"x2")
onefn;8,2
^W1REP("H","MLZT",0,"x3")
wiy;8,2
^W1REP("H","MLZT",0,"x4")
`"k;8,2
^W1REP("H","MLZT",0,"x5")
dtwd;8,2
^W1REP("H","MLZT",0,"x6")
dpzn 'lz;8,2
^W1REP("H","MLZT",0,"x7")
tih;7,2
^W1REP("H","MLZT",0,"x8")
;,
^W1REP("H","MLZT","COD")
MLZ*MLZ1*SUGS*SUGS1*EMDA*NMB*SHAA*TRHT*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","MLZT","CT")
1*2*0*0*0*2*0
^W1REP("H","MLZT","FLD")
MLZ*SUGS*EMDA*NMB*SHAA*TRHT*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","MLZT","FLD0")
*-*-*-*-*********
^W1REP("H","MLZT","GLOB1")
^P1H
^W1REP("H","MLZT","GLOB2")
^P1H(DATH,HZM)
^W1REP("H","MLZT","LPT")
B
^W1REP("H","MLZT","MIUN")
1*2*3*4*2*2*3
^W1REP("H","MLZT","QUERY","1.                fkexn mixvln itl","CT")
2*2*0*0*2*0*0
^W1REP("H","MLZT","QUERY","1.                fkexn mixvln itl","FLD0")
*-*-*-*-**-*******
^W1REP("H","MLZT","QUERY","1.                fkexn mixvln itl","MIUN")
1*2*3*4*1*2*3
^W1REP("H","MLZT","QUERY","1.                fkexn mixvln itl","SIK0")
1*0*0*0*1*0*0
^W1REP("H","MLZT","QUERY","2.                hxetn mixvln itl","CT")
1*2*0*0*0*2*0
^W1REP("H","MLZT","QUERY","2.                hxetn mixvln itl","FLD0")
*-*-*-*-*********
^W1REP("H","MLZT","QUERY","2.                hxetn mixvln itl","MIUN")
1*2*3*4*2*2*3
^W1REP("H","MLZT","QUERY","2.                hxetn mixvln itl","SIK0")
1*0*0*0*0*1*0
^W1REP("H","MLZT","QUERY","3. fkexn zepgleye zepgley ibeq itl","CT")
1*1*0*2*2*0*0
^W1REP("H","MLZT","QUERY","3. fkexn zepgleye zepgley ibeq itl","FLD0")
-**-**-**-*******
^W1REP("H","MLZT","QUERY","3. fkexn zepgleye zepgley ibeq itl","MIUN")
1*1*3*2*1*3*3
^W1REP("H","MLZT","QUERY","3. fkexn zepgleye zepgley ibeq itl","SIK0")
1*1*0*1*1*0*0
^W1REP("H","MLZT","QUERY","4. hxetn zepgleye zepgley ibeq itl","CT")
1*1*2*0*0*2*0
^W1REP("H","MLZT","QUERY","4. hxetn zepgleye zepgley ibeq itl","FLD0")
-**-*-*-*********
^W1REP("H","MLZT","QUERY","4. hxetn zepgleye zepgley ibeq itl","MIUN")
1*1*2*4*4*2*3
^W1REP("H","MLZT","QUERY","4. hxetn zepgleye zepgley ibeq itl","SIK0")
1*1*1*0*0*1*0
^W1REP("H","MLZT","QUERY","5.        fkexn zecnre mikix`z itl","CT")
1*2*2*0*0*0*0
^W1REP("H","MLZT","QUERY","5.        fkexn zecnre mikix`z itl","FLD0")
-*-**-*-**-*******
^W1REP("H","MLZT","QUERY","5.        fkexn zecnre mikix`z itl","MIUN")
1*2*1*4*3*2*3
^W1REP("H","MLZT","QUERY","5.        fkexn zecnre mikix`z itl","SIK0")
1*0*1*0*0*0*0
^W1REP("H","MLZT","QUERY","6.        hxetn zecnre mikix`z itl","CT")
1*2*1*0*0*2*0
^W1REP("H","MLZT","QUERY","6.        hxetn zecnre mikix`z itl","FLD0")
-*-**-*-*********
^W1REP("H","MLZT","QUERY","6.        hxetn zecnre mikix`z itl","MIUN")
1*2*1*4*3*2*3
^W1REP("H","MLZT","QUERY","6.        hxetn zecnre mikix`z itl","SIK0")
1*0*1*0*0*1*0
^W1REP("H","MLZT","QUERY","7.               fkexn mikix`z itl","CT")
1*2*0*0*0*0*0
^W1REP("H","MLZT","QUERY","7.               fkexn mikix`z itl","FLD0")
-*-*-*-*-**-*******
^W1REP("H","MLZT","QUERY","7.               fkexn mikix`z itl","MIUN")
1*2*3*4*3*1*2
^W1REP("H","MLZT","QUERY","7.               fkexn mikix`z itl","SIK0")
1*0*0*0*0*0*0
^W1REP("H","MLZT","QUERY","8.               hxetn mikix`z itl","CT")
1*2*0*0*0*2*0
^W1REP("H","MLZT","QUERY","8.               hxetn mikix`z itl","FLD0")
-*-*-*-*-*********
^W1REP("H","MLZT","QUERY","8.               hxetn mikix`z itl","MIUN")
1*2*3*4*3*1*2
^W1REP("H","MLZT","QUERY","8.               hxetn mikix`z itl","SIK0")
1*0*0*0*0*1*0
^W1REP("H","MLZT","SIK")
1*1*1*1*1*1*1*
^W1REP("H","MLZT","SIK0")
1*0*0*0*0*1*0
^W1REP("H","MLZT","US",-1)
D DATH^P1MLZT
^W1REP("H","MLZT","US",1)
D DATH^P1MLZT
^W1REP("H","MLZT","US",2)
D HZM^P1MLZT
^W1REP("H","MMPR")
zecrqn itl mihixt g"ec
^W1REP("H","MMPR",0,"DAT1")
jix`z;8D
^W1REP("H","MMPR",0,"DAT1","SH")
1
^W1REP("H","MMPR",0,"HZM")
dpnfd;9
^W1REP("H","MMPR",0,"HZM","SH")
1
^W1REP("H","MMPR",0,"MLZR")
xvln;9
^W1REP("H","MMPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("H","MMPR",0,"MLZR","OUT")
MLZR1
^W1REP("H","MMPR",0,"MLZR1")
xvln my;12H
^W1REP("H","MMPR",0,"MLZR1","SH")
0
^W1REP("H","MMPR",0,"MSD")
dcrqn;5
^W1REP("H","MMPR",0,"MSD","FILE")
^P1MSD
^W1REP("H","MMPR",0,"MSD","OUT")
MSD1
^W1REP("H","MMPR",0,"MSD1")
dcrqn my;12
^W1REP("H","MMPR",0,"MSD1","SH")
1
^W1REP("H","MMPR",0,"PAR")
hixt;8
^W1REP("H","MMPR",0,"PAR","FILE")
^PAR
^W1REP("H","MMPR",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","MMPR",0,"PAR","OUT")
PAR1
^W1REP("H","MMPR",0,"PAR1")
hixt xe`z;20H
^W1REP("H","MMPR",0,"PAR1","SH")
1
^W1REP("H","MMPR",0,"SUGP")
mihixt zveaw;9
^W1REP("H","MMPR",0,"SUGP","FILE")
^PARSUG
^W1REP("H","MMPR",0,"SUGP","OUT")
SUGP1
^W1REP("H","MMPR",0,"SUGP1")
dveaw xe`z;12H
^W1REP("H","MMPR",0,"SUGP1","SH")
0
^W1REP("H","MMPR",0,"x1")
zenk;5,0
^W1REP("H","MMPR",0,"x2")
hixtl dgpd;10,2
^W1REP("H","MMPR",0,"x3")
ehp mekq;10,2
^W1REP("H","MMPR",0,"x4")
;,
^W1REP("H","MMPR","COD")
MSD*MSD1*DAT1*HZM*PAR*PAR1*x1*x2*x3
^W1REP("H","MMPR","CT")
0*0*0*0*0*0*0
^W1REP("H","MMPR","FLD")
MSD*DAT1*HZM*PAR*x1*x2*x3
^W1REP("H","MMPR","FLD0")
***-*-***
^W1REP("H","MMPR","GLOB1")
^VRM(PRTN)
^W1REP("H","MMPR","GLOB2")
^VRM(PRTN,MSD,HZM,PAR)
^W1REP("H","MMPR","LPT")
S
^W1REP("H","MMPR","MIUN")
1*2*3*4*2*0*0
^W1REP("H","MMPR","QUERY","zecrqn itl fekix","CT")
0*0*0*0*0*0*0
^W1REP("H","MMPR","QUERY","zecrqn itl fekix","FLD0")
*-*-*-*-***
^W1REP("H","MMPR","QUERY","zecrqn itl fekix","MIUN")
1*2*3*4*2*0*0
^W1REP("H","MMPR","QUERY","zecrqn itl fekix","SIK0")
0*0*0*0*0*0*0
^W1REP("H","MMPR","QUERY","zecrqn itl mihixt zxikn","CT")
2*0*0*0*0*0*0
^W1REP("H","MMPR","QUERY","zecrqn itl mihixt zxikn","FLD0")
*-*-***-*
^W1REP("H","MMPR","QUERY","zecrqn itl mihixt zxikn","MIUN")
1*2*3*2*2*0*0
^W1REP("H","MMPR","QUERY","zecrqn itl mihixt zxikn","SIK0")
1*1*0*0*0*0*0
^W1REP("H","MMPR","QUERY","zepnfd itl g""ec","CT")
0*0*0*0*0*0*0
^W1REP("H","MMPR","QUERY","zepnfd itl g""ec","FLD0")
***-*-***
^W1REP("H","MMPR","QUERY","zepnfd itl g""ec","MIUN")
1*2*3*4*2*0*0
^W1REP("H","MMPR","QUERY","zepnfd itl g""ec","SIK0")
0*1*0*0*0*0*0
^W1REP("H","MMPR","SHP","KOD")
P1DMZPR
^W1REP("H","MMPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("H","MMPR","SIK")
1*1*1*
^W1REP("H","MMPR","SIK0")
0*1*0*0*0*0*0
^W1REP("H","MMPR","US",3)
D DAT^P1DMM
^W1REP("H","MMPR","US",4)
D PAR^P1DMM
^W1REP("H","MSHT")
melyz ibeq itl migily g"ec
^W1REP("H","MSHT",0,"HZM")
dpnfd;7
^W1REP("H","MSHT",0,"HZM","SH")
1
^W1REP("H","MSHT",0,"MLZ")
xvln 'qn;5
^W1REP("H","MSHT",0,"MLZ","FILE")
^NAME
^W1REP("H","MSHT",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^W1REP("H","MSHT",0,"MLZ","OUT")
MLZ1
^W1REP("H","MSHT",0,"MLZ1")
xvln my;12H
^W1REP("H","MSHT",0,"MLZ1","SH")
1
^W1REP("H","MSHT",0,"PSL")
gily 'qn;5
^W1REP("H","MSHT",0,"PSL","FILE")
^P1SL
^W1REP("H","MSHT",0,"PSL","OUT")
PSL1
^W1REP("H","MSHT",0,"PSL1")
gily my;12H
^W1REP("H","MSHT",0,"PSL1","SH")
1
^W1REP("H","MSHT",0,"TRH")
jix`z;8D
^W1REP("H","MSHT",0,"TRH","SH")
1
^W1REP("H","MSHT",0,"x1")
melyzl;8,2
^W1REP("H","MSHT",0,"x2")
onefn;8,2
^W1REP("H","MSHT",0,"x3")
wiy;8,2
^W1REP("H","MSHT",0,"x4")
`"k;8,2
^W1REP("H","MSHT",0,"x5")
dtwd;8,2
^W1REP("H","MSHT",0,"x6")
yelz;8,2
^W1REP("H","MSHT",0,"x7")
tih;7,2
^W1REP("H","MSHT",0,"x8")
;,
^W1REP("H","MSHT","COD")
PSL*PSL1*TRH*HZM*x1*x2*x3*x4*x5*x6
^W1REP("H","MSHT","CT")
0*2*0
^W1REP("H","MSHT","FLD")
PSL*TRH*HZM*x1*x2*x3*x4*x5*x6
^W1REP("H","MSHT","FLD0")
**-******
^W1REP("H","MSHT","GLOB1")
^P1H
^W1REP("H","MSHT","GLOB2")
^P1H(DATH,HZM)
^W1REP("H","MSHT","LPT")
B
^W1REP("H","MSHT","MIUN")
2*1*3
^W1REP("H","MSHT","QUERY","fkexn","CT")
0*2*0
^W1REP("H","MSHT","QUERY","fkexn","FLD0")
**-******
^W1REP("H","MSHT","QUERY","fkexn","MIUN")
2*1*3
^W1REP("H","MSHT","QUERY","fkexn","SIK0")
0*1*0
^W1REP("H","MSHT","QUERY","hxetn","CT")
1*0*0
^W1REP("H","MSHT","QUERY","hxetn","FLD0")

^W1REP("H","MSHT","QUERY","hxetn","MIUN")
1*2*3
^W1REP("H","MSHT","QUERY","hxetn","SIK0")
1*0*0
^W1REP("H","MSHT","SIK")
1*1*1*1*1*1*1*
^W1REP("H","MSHT","SIK0")
0*1*0
^W1REP("H","MSHT","US",-1)
D DATH^P1MSHT
^W1REP("H","MSHT","US",1)
D DATH^P1MSHT
^W1REP("H","MSHT","US",2)
D HZM^P1MSHT
^W1REP("H","MZP")
mihixt itl mixvln g"ec
^W1REP("H","MZP",0,"DAT")
jix`z;8D
^W1REP("H","MZP",0,"DAT","SH")
1
^W1REP("H","MZP",0,"HZM")
dpnfd;7
^W1REP("H","MZP",0,"HZM","SH")
1
^W1REP("H","MZP",0,"MLZ")
xvln 'qn;8
^W1REP("H","MZP",0,"MLZ","FILE")
^NAME
^W1REP("H","MZP",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^W1REP("H","MZP",0,"MLZ","OUT")
MLZ1
^W1REP("H","MZP",0,"MLZ1")
xvln my;16H
^W1REP("H","MZP",0,"MLZ1","SH")
1
^W1REP("H","MZP",0,"PAR")
hixt 'qn;8
^W1REP("H","MZP",0,"PAR","FILE")
^PAR
^W1REP("H","MZP",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","MZP",0,"PAR","OUT")
PAR1
^W1REP("H","MZP",0,"PAR1")
hixt xe`z;20H
^W1REP("H","MZP",0,"PAR1","SH")
1
^W1REP("H","MZP",0,"x1")
zenk;5,0
^W1REP("H","MZP",0,"x2")
mekq;8,2
^W1REP("H","MZP",0,"x3")
dgpd;7,2
^W1REP("H","MZP",0,"x4")
k"dq;8,2
^W1REP("H","MZP",0,"x5")
;,
^W1REP("H","MZP","COD")
MLZ*MLZ1*DAT*HZM*PAR*PAR1*x1*x2*x3*x4
^W1REP("H","MZP","CT")
1*2*0*0
^W1REP("H","MZP","FLD")
MLZ*DAT*HZM*PAR*x1*x2*x3*x4
^W1REP("H","MZP","FLD0")
**-*****
^W1REP("H","MZP","GLOB1")
^P1MLZ
^W1REP("H","MZP","GLOB2")
^P1MLZ(HZM,MLZ,PAR)
^W1REP("H","MZP","LPT")
B
^W1REP("H","MZP","MIUN")
1*2*3*3
^W1REP("H","MZP","QUERY","hxetn","CT")
1*2*0*0
^W1REP("H","MZP","QUERY","hxetn","FLD0")

^W1REP("H","MZP","QUERY","hxetn","MIUN")
1*2*3*4
^W1REP("H","MZP","QUERY","hxetn","SIK0")
1*0*1*0
^W1REP("H","MZP","QUERY","mihixt itl fkexn","CT")
1*2*0*0
^W1REP("H","MZP","QUERY","mihixt itl fkexn","FLD0")
**-*****
^W1REP("H","MZP","QUERY","mihixt itl fkexn","MIUN")
1*2*3*3
^W1REP("H","MZP","QUERY","mihixt itl fkexn","SIK0")
1*0*1*0
^W1REP("H","MZP","SIK")
1*1*1*1*
^W1REP("H","MZP","SIK0")
1*0*1*0
^W1REP("H","MZP","US",-1)
D DAT^P1MZP
^W1REP("H","MZP","US",1)
D DAT^P1MZP
^W1REP("H","MZP","US",3)
D PAR^P1MZP
^W1REP("H","MZPR")
mixvln itl mihixt g"ec
^W1REP("H","MZPR",0,"MLZR")
xvln;5.
^W1REP("H","MZPR",0,"MLZR","FILE")
^NAME
^W1REP("H","MZPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("H","MZPR",0,"MLZR","OUT")
MLZR1
^W1REP("H","MZPR",0,"MLZR1")
xvln my;12H
^W1REP("H","MZPR",0,"MLZR1","SH")
1
^W1REP("H","MZPR",0,"PAR")
hixt;8
^W1REP("H","MZPR",0,"PAR","FILE")
^PAR
^W1REP("H","MZPR",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","MZPR",0,"PAR","OUT")
PAR1
^W1REP("H","MZPR",0,"PAR1")
hixt xe`z;20H
^W1REP("H","MZPR",0,"PAR1","SH")
0
^W1REP("H","MZPR",0,"SUGP")
hixt beq;3
^W1REP("H","MZPR",0,"SUGP","FILE")
^PARSUG
^W1REP("H","MZPR",0,"SUGP","OUT")
SUGP1
^W1REP("H","MZPR",0,"SUGP1")
beq xe`z;10H
^W1REP("H","MZPR",0,"SUGP1","SH")
1
^W1REP("H","MZPR",0,"x1")
zenk;5,0
^W1REP("H","MZPR",0,"x2")
hixtl dgpd;10,2
^W1REP("H","MZPR",0,"x3")
ehp mekq;10,2
^W1REP("H","MZPR",0,"x4")
;,
^W1REP("H","MZPR","COD")
MLZR*MLZR1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3
^W1REP("H","MZPR","CT")
1*2*0*0*0*0*0
^W1REP("H","MZPR","FLD")
MLZR*SUGP*PAR*x1*x2*x3
^W1REP("H","MZPR","FLD0")
******
^W1REP("H","MZPR","GLOB1")
^VRM(PRTN)
^W1REP("H","MZPR","GLOB2")
^VRM(PRTN,MLZR,SUGP,PAR)
^W1REP("H","MZPR","LPT")
S
^W1REP("H","MZPR","MIUN")
1*2*3*4*2*0*0
^W1REP("H","MZPR","QUERY","mihixt itl mixvln","CT")
1*2*0*0*0*0*0
^W1REP("H","MZPR","QUERY","mihixt itl mixvln","FLD0")
******
^W1REP("H","MZPR","QUERY","mihixt itl mixvln","MIUN")
1*2*3*4*2*0*0
^W1REP("H","MZPR","QUERY","mihixt itl mixvln","SIK0")
1*0*0*0*0*0*0
^W1REP("H","MZPR","QUERY","mixvln itl mihixt","CT")
0*2*0*0*0*0*0
^W1REP("H","MZPR","QUERY","mixvln itl mihixt","FLD0")
*****
^W1REP("H","MZPR","QUERY","mixvln itl mihixt","MIUN")
3*1*2*4*2*0*0
^W1REP("H","MZPR","QUERY","mixvln itl mihixt","SIK0")
0*1*1*0*0*0*0
^W1REP("H","MZPR","SHP","KOD")
P1DMZPR
^W1REP("H","MZPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("H","MZPR","SIK")
1*1*1*
^W1REP("H","MZPR","SIK0")
1*0*0*0*0*0*0
^W1REP("H","MZPR","US",4)
D PAR^P1DMZPR
^W1REP("H","MZPS")
zerye mixvln itl mihixt g"ec
^W1REP("H","MZPS",0,"MLZR")
xvln;5.
^W1REP("H","MZPS",0,"MLZR","FILE")
^NAME
^W1REP("H","MZPS",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("H","MZPS",0,"MLZR","OUT")
MLZR1
^W1REP("H","MZPS",0,"MLZR1")
xvln my;12H
^W1REP("H","MZPS",0,"MLZR1","SH")
1
^W1REP("H","MZPS",0,"PAR")
hixt;8
^W1REP("H","MZPS",0,"PAR","FILE")
^PAR
^W1REP("H","MZPS",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","MZPS",0,"PAR","OUT")
PAR1
^W1REP("H","MZPS",0,"PAR1")
hixt xe`z;20H
^W1REP("H","MZPS",0,"PAR1","SH")
1
^W1REP("H","MZPS",0,"SHAA")
dry;5
^W1REP("H","MZPS",0,"SHAA","SH")
1
^W1REP("H","MZPS",0,"SHAA1")
dry;7
^W1REP("H","MZPS",0,"SHAA1","SH")
1
^W1REP("H","MZPS",0,"SUGP")
hixt beq;3
^W1REP("H","MZPS",0,"SUGP","FILE")
^PARSUG
^W1REP("H","MZPS",0,"SUGP","OUT")
SUGP1
^W1REP("H","MZPS",0,"SUGP1")
beq xe`z;10H
^W1REP("H","MZPS",0,"SUGP1","SH")
1
^W1REP("H","MZPS",0,"x1")
zenk;5,0
^W1REP("H","MZPS",0,"x2")
hixtl dgpd;10,2
^W1REP("H","MZPS",0,"x3")
ehp mekq;10,2
^W1REP("H","MZPS",0,"x4")
;,
^W1REP("H","MZPS","COD")
MLZR*MLZR1*SHAA1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3
^W1REP("H","MZPS","CT")
1*2*0*0*0*0*0
^W1REP("H","MZPS","FLD")
MLZR*SHAA1*SUGP*PAR*x1*x2*x3
^W1REP("H","MZPS","FLD0")
*-*****
^W1REP("H","MZPS","GLOB1")
^VRM(PRTN)
^W1REP("H","MZPS","GLOB2")
^VRM(PRTN,MLZR,SHAA,SUGP,PAR)
^W1REP("H","MZPS","LPT")
S
^W1REP("H","MZPS","MIUN")
1*2*2*3*2*0*0
^W1REP("H","MZPS","SHP","KOD")
P1DMZPRS
^W1REP("H","MZPS","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT,MAS(15)=MESHAA1,MAS(20)=ADSHAA1
^W1REP("H","MZPS","SIK")
1*1*1*
^W1REP("H","MZPS","SIK0")
1*1*0*0*0*0*0
^W1REP("H","MZPS","US",3)
D SHAA^P1DMZPRS
^W1REP("H","MZPS","US",5)
D PAR^P1DMZPRS
^W1REP("H","NEWCUS")
miycg zegewl g"ec
^W1REP("H","NEWCUS",0,"ASM")
l-a dzknq`;8
^W1REP("H","NEWCUS",0,"ASM","SET")
0
^W1REP("H","NEWCUS",0,"ASM","SH")
1
^W1REP("H","NEWCUS",0,"CARD")
qihxk 'qn;10
^W1REP("H","NEWCUS",0,"CARD","SET")
0
^W1REP("H","NEWCUS",0,"CARD","SH")
1
^W1REP("H","NEWCUS",0,"CLUB")
oecren 'qn;10
^W1REP("H","NEWCUS",0,"CLUB","FILE")
^|$$^%W1UCI(JB)|B1CLUB
^W1REP("H","NEWCUS",0,"CLUB","M2")
S CLUB1=$$CLUB1^WBREP(CLUB)
^W1REP("H","NEWCUS",0,"CLUB","OUT")
CLUB1
^W1REP("H","NEWCUS",0,"CLUB","SET")
1
^W1REP("H","NEWCUS",0,"CLUB1")
oecren my;12H
^W1REP("H","NEWCUS",0,"CLUB1","SET")
0
^W1REP("H","NEWCUS",0,"CLUB1","SH")
1
^W1REP("H","NEWCUS",0,"DAT")
;0
^W1REP("H","NEWCUS",0,"DAT","SET")
0
^W1REP("H","NEWCUS",0,"DAT","SH")
1
^W1REP("H","NEWCUS",0,"HB")
zipeayg;8
^W1REP("H","NEWCUS",0,"HZM")
dpnfd;8
^W1REP("H","NEWCUS",0,"HZM","SET")
1
^W1REP("H","NEWCUS",0,"HZM","SH")
1
^W1REP("H","NEWCUS",0,"LK")
gewl 'qn;10
^W1REP("H","NEWCUS",0,"LK","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","NEWCUS",0,"LK","OUT")
LK1
^W1REP("H","NEWCUS",0,"LK","SET")
1
^W1REP("H","NEWCUS",0,"LK1")
gewl my;12H
^W1REP("H","NEWCUS",0,"LK1","SET")
0
^W1REP("H","NEWCUS",0,"LK1","SH")
1
^W1REP("H","NEWCUS",0,"LKH")
gewl 'qn;10
^W1REP("H","NEWCUS",0,"LKH","FILE")
^LKH
^W1REP("H","NEWCUS",0,"LKH","OUT")
LKH1
^W1REP("H","NEWCUS",0,"LKH1")
gewl my;20H
^W1REP("H","NEWCUS",0,"NAME")
gewl my;12H
^W1REP("H","NEWCUS",0,"NAME","SET")
0
^W1REP("H","NEWCUS",0,"NAME","SH")
1
^W1REP("H","NEWCUS",0,"NCAB")
zipeayg;6
^W1REP("H","NEWCUS",0,"NCAB","SH")
0
^W1REP("H","NEWCUS",0,"NMB")
gewl xtqn;10
^W1REP("H","NEWCUS",0,"NMB","FILE")
^LKH
^W1REP("H","NEWCUS",0,"NMB","OUT")
NAME
^W1REP("H","NEWCUS",0,"NP")
dxey;8
^W1REP("H","NEWCUS",0,"NP","SET")
1
^W1REP("H","NEWCUS",0,"NP","SH")
1
^W1REP("H","NEWCUS",0,"PAR")
hixt 'qn;8
^W1REP("H","NEWCUS",0,"PAR","FILE")
^PAR
^W1REP("H","NEWCUS",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","NEWCUS",0,"PAR","OUT")
PAR1
^W1REP("H","NEWCUS",0,"PAR1")
hixt xe`z;16H
^W1REP("H","NEWCUS",0,"PAR1","SH")
1
^W1REP("H","NEWCUS",0,"PSL")
gily cew;3
^W1REP("H","NEWCUS",0,"PSL","FILE")
^P1SL
^W1REP("H","NEWCUS",0,"PSL","OUT")
PSL1
^W1REP("H","NEWCUS",0,"PSL1")
gily my;10H
^W1REP("H","NEWCUS",0,"PSL1","SH")
1
^W1REP("H","NEWCUS",0,"SHAA")
dryl;5
^W1REP("H","NEWCUS",0,"SHAA","SH")
1
^W1REP("H","NEWCUS",0,"SL")
gily cew;5
^W1REP("H","NEWCUS",0,"SL","FILE")
^P1SL
^W1REP("H","NEWCUS",0,"SL","OUT")
SL1
^W1REP("H","NEWCUS",0,"SL1")
gily my;12H
^W1REP("H","NEWCUS",0,"SUGT")
melyz beq;5
^W1REP("H","NEWCUS",0,"SUGT","SH")
1
^W1REP("H","NEWCUS",0,"TRH")
jix`z;8D
^W1REP("H","NEWCUS",0,"TRH","M2")
S TRH=$$^%L1DC(DT,1)
^W1REP("H","NEWCUS",0,"TRH","SET")
0
^W1REP("H","NEWCUS",0,"TRH","SH")
1
^W1REP("H","NEWCUS",0,"TS")
melyzl;8
^W1REP("H","NEWCUS",0,"TSHL")
melyzl;8
^W1REP("H","NEWCUS",0,"TSHL","OUT")
TSHL
^W1REP("H","NEWCUS",0,"x1")
dpnfd;7,0
^W1REP("H","NEWCUS",0,"x2")
mekq;8,2
^W1REP("H","NEWCUS",0,"x3")
rexi` jix`z;8,0
^W1REP("H","NEWCUS",0,"x4")
dxrd;20,0
^W1REP("H","NEWCUS",0,"x5")
qehhq;10,0
^W1REP("H","NEWCUS",0,"x6")
xewn;9,0
^W1REP("H","NEWCUS",0,"x7")
beq;7,0
^W1REP("H","NEWCUS",0,"x8")
zepnfd 'qn;5,0
^W1REP("H","NEWCUS",0,"x9")
;,
^W1REP("H","NEWCUS","COD")
TRH*LK*LK1*x1*x2*x3*x4*x5*x6*x7*x8
^W1REP("H","NEWCUS","CT")
0*0*0***
^W1REP("H","NEWCUS","FLD")
TRH*LK*x1*x2*x3*x4*x5*x6*x7*x8
^W1REP("H","NEWCUS","FLD0")
*****
^W1REP("H","NEWCUS","GLOB1")
^|$$^%W1UCI(JB)|W4NEWCUS
^W1REP("H","NEWCUS","GLOB2")
^|$$^%W1UCI(JB)|W4NEWCUS(DT,LK)
^W1REP("H","NEWCUS","LPT")
B
^W1REP("H","NEWCUS","MIUN")
1*2*3***
^W1REP("H","NEWCUS","QUERY","zegewl itl mikix`z","CT")
0*0*0***
^W1REP("H","NEWCUS","QUERY","zegewl itl mikix`z","FLD0")
*****
^W1REP("H","NEWCUS","QUERY","zegewl itl mikix`z","MIUN")
1*2*3***
^W1REP("H","NEWCUS","QUERY","zegewl itl mikix`z","SIK0")
1*0*0***
^W1REP("H","NEWCUS","SHP","KOD")
P1HZH
^W1REP("H","NEWCUS","SIK")
0*1*0**0***1*
^W1REP("H","NEWCUS","SIK0")
1*0*0***
^W1REP("H","NEWCUS","US",1)
D DAT^W4NEWCUS
^W1REP("H","NEWCUS","US",2)
D LK^W4NEWCUS
^W1REP("H","NEWCUS","US",3)
S CLUB1=$$CLUB1^WBREP(CLUB)
^W1REP("H","NEWCUS","US",4)
D HZM^WBREP
^W1REP("H","NEWCUS","US",5)
D NP^WBREP
^W1REP("H","OTH")
OTH zepnfd g"ec
^W1REP("H","OTH",0,"HB")
zipeayg;8
^W1REP("H","OTH",0,"HZM")
dpnfd;5
^W1REP("H","OTH",0,"HZM","SH")
1
^W1REP("H","OTH",0,"LKH")
gewl 'qn;10
^W1REP("H","OTH",0,"LKH","FILE")
^LKH
^W1REP("H","OTH",0,"LKH","OUT")
LKH1
^W1REP("H","OTH",0,"LKH1")
gewl my;20H
^W1REP("H","OTH",0,"MKBL")
xvln 'qn;8
^W1REP("H","OTH",0,"MKBL","M2")
S MKBL1=$$^P1NAME(MKBL)
^W1REP("H","OTH",0,"MKBL","OUT")
MKBL1
^W1REP("H","OTH",0,"MKBL1")
xvln my;12H
^W1REP("H","OTH",0,"MKBL1","SH")
0
^W1REP("H","OTH",0,"MLZR")
xvln 'qn;5
^W1REP("H","OTH",0,"MLZR",2)
I MLZR S MLZR1=$G(^NAME(MLZR,1))
^W1REP("H","OTH",0,"MLZR","OUT")
MLZR1
^W1REP("H","OTH",0,"MLZR1")
xvln my;12H
^W1REP("H","OTH",0,"MLZR1","SH")
1
^W1REP("H","OTH",0,"NAME")
gewl my;12H
^W1REP("H","OTH",0,"NAME","SH")
1
^W1REP("H","OTH",0,"NCAB")
zipeayg;6
^W1REP("H","OTH",0,"NCAB","SH")
0
^W1REP("H","OTH",0,"NMB")
ogley;5
^W1REP("H","OTH",0,"NMB","SH")
1
^W1REP("H","OTH",0,"PSL")
gily cew;3
^W1REP("H","OTH",0,"PSL","FILE")
^P1SL
^W1REP("H","OTH",0,"PSL","OUT")
PSL1
^W1REP("H","OTH",0,"PSL1")
gily my;10H
^W1REP("H","OTH",0,"PSL1","SH")
1
^W1REP("H","OTH",0,"SHAA")
dry;5
^W1REP("H","OTH",0,"SHAA","SH")
1
^W1REP("H","OTH",0,"SL")
gily cew;5
^W1REP("H","OTH",0,"SL","FILE")
^P1SL
^W1REP("H","OTH",0,"SL","OUT")
SL1
^W1REP("H","OTH",0,"SL1")
gily my;12H
^W1REP("H","OTH",0,"SUGT")
melyz beq;9
^W1REP("H","OTH",0,"SUGT","SH")
1
^W1REP("H","OTH",0,"TRH")
jix`z;8D
^W1REP("H","OTH",0,"TRH","SH")
1
^W1REP("H","OTH",0,"TS")
melyzl;8
^W1REP("H","OTH",0,"TSHL")
melyzl;8
^W1REP("H","OTH",0,"TSHL","OUT")
TSHL
^W1REP("H","OTH",0,"x1")
dgpd iptl;9,2
^W1REP("H","OTH",0,"x2")
dgpd;9,2
^W1REP("H","OTH",0,"x3")
dgpd ixg`;9,2
^W1REP("H","OTH",0,"x4")
;,
^W1REP("H","OTH","COD")
NMB*MKBL*MKBL1*TRH*SHAA*HZM*x1*x2*x3
^W1REP("H","OTH","CT")
0*0*0*0*0*0*0
^W1REP("H","OTH","FLD")
NMB*MKBL*TRH*SHAA*HZM*x1*x2*x3
^W1REP("H","OTH","FLD0")
**-*-****
^W1REP("H","OTH","GLOB1")
^P1H
^W1REP("H","OTH","GLOB2")
^P1H(DATH,HZM)
^W1REP("H","OTH","LPT")
S
^W1REP("H","OTH","MIUN")
1*2*3*4*3*6*0
^W1REP("H","OTH","SIK")
1*1*1*
^W1REP("H","OTH","SIK0")
1*1*0*0*0*0*0
^W1REP("H","OTH","US",0)
D HZM^P1OTH
^W1REP("H","OTH","US",1)
D TRH^P1OTH
^W1REP("H","OTH","US",2)
D HZM^P1OTH
^W1REP("H","P1Z")
Z fekix
^W1REP("H","P1Z",0,"TRH")
jix`z;8D
^W1REP("H","P1Z",0,"TRH","SH")
0
^W1REP("H","P1Z",0,"x1")
onefn;8,2
^W1REP("H","P1Z",0,"x10")
dtwd;8,2
^W1REP("H","P1Z",0,"x11")
n"rn;8,2
^W1REP("H","P1Z",0,"x12")
;,
^W1REP("H","P1Z",0,"x2")
wiy;8,2
^W1REP("H","P1Z",0,"x3")
hxk`xyi;8,2
^W1REP("H","P1Z",0,"x4")
dfie;8,2
^W1REP("H","P1Z",0,"x5")
qxpiic;8,2
^W1REP("H","P1Z",0,"x6")
AM.EX.;8,2
^W1REP("H","P1Z",0,"x7")
`"k k"dq;8,2
^W1REP("H","P1Z",0,"x8")
tih;8,2
^W1REP("H","P1Z",0,"x9")
oeict k"dq;10,2
^W1REP("H","P1Z","COD")
TRH*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11
^W1REP("H","P1Z","CT")

^W1REP("H","P1Z","FLD")
TRH*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11
^W1REP("H","P1Z","FLD0")
*******-**-**-
^W1REP("H","P1Z","GLOB1")
^TEMP($P)
^W1REP("H","P1Z","GLOB2")
^TEMP($P,I)
^W1REP("H","P1Z","LPT")
B
^W1REP("H","P1Z","MIUN")
1
^W1REP("H","P1Z","SIK")
1*1*1*1*1*1*1*1*1*1*1*
^W1REP("H","P1Z","SIK0")

^W1REP("H","P1Z","US",2)
D Z^P1Z
^W1REP("H","PAR")
mihixt gec
^W1REP("H","PAR",0,"DAT")
jix`z;8D
^W1REP("H","PAR",0,"PAR")
hixt cew;4
^W1REP("H","PAR",0,"PAR",2)
S PAR1=$P($G(^PAR(PAR)),"**")
^W1REP("H","PAR",0,"PAR","OUT")
PAR1
^W1REP("H","PAR",0,"PAR1")
hixt xe`z;20H
^W1REP("H","PAR",0,"x1")
zenk;6,0
^W1REP("H","PAR",0,"x2")
mekq;8,2
^W1REP("H","PAR",0,"x3")
xign;7,2
^W1REP("H","PAR",0,"x4")
;,
^W1REP("H","PAR","COD")
DAT*PAR*PAR1*x1*x2*x3
^W1REP("H","PAR","CT")
0*0
^W1REP("H","PAR","FLD")
DAT*PAR*x1*x2*x3
^W1REP("H","PAR","GLOB1")
^PLUTOT
^W1REP("H","PAR","GLOB2")
^PLUTOT(DAT,MRK,PAR)
^W1REP("H","PAR","LPT")
B
^W1REP("H","PAR","MIUN")
2*1
^W1REP("H","PAR","SHP","KOD")
PAR
^W1REP("H","PAR","SIK")
1*1*0*
^W1REP("H","PAR","SIK0")
1*1
^W1REP("H","PAR","US",-1)
B  S x1=$P(@GLOB,"*"),x2=$P(@GLOB,"*",2),x3=$P(@GLOB,"*",3)
^W1REP("H","PAR","US",3)
D PAR^P1DP
^W1REP("H","PARK")
zeveaw itl mihixt zxikn gec
^W1REP("H","PARK",0,"PAR")
hixt;8
^W1REP("H","PARK",0,"PAR","FILE")
^PAR
^W1REP("H","PARK",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","PARK",0,"PAR","OUT")
PAR1
^W1REP("H","PARK",0,"PAR1")
hixt xe`z;20H
^W1REP("H","PARK",0,"PAR1","SH")
1
^W1REP("H","PARK",0,"SUGP")
dveaw;5
^W1REP("H","PARK",0,"SUGP","FILE")
^PARSUG
^W1REP("H","PARK",0,"SUGP","OUT")
SUGP1
^W1REP("H","PARK",0,"SUGP1")
dveaw xe`z;14H
^W1REP("H","PARK",0,"SUGP1","SH")
1
^W1REP("H","PARK",0,"TRH")
jix`z;8D
^W1REP("H","PARK",0,"TRH","SH")
1
^W1REP("H","PARK",0,"x1")
zenk;5,0
^W1REP("H","PARK",0,"x2")
oexg` xign;7,2
^W1REP("H","PARK",0,"x3")
mekq;8,2
^W1REP("H","PARK",0,"x4")
dgpd;7,2
^W1REP("H","PARK",0,"x5")
k"dq;9,2
^W1REP("H","PARK",0,"x6")
;,
^W1REP("H","PARK","COD")
SUGP*SUGP1*PAR*PAR1*TRH*x1*x2*x3*x4*x5
^W1REP("H","PARK","CT")
2*0
^W1REP("H","PARK","FLD")
SUGP*PAR*TRH*x1*x2*x3*x4*x5
^W1REP("H","PARK","FLD0")
**-*****
^W1REP("H","PARK","GLOB1")
^PLUTOT
^W1REP("H","PARK","GLOB2")
^PLUTOT(DAT,MRK,PAR)
^W1REP("H","PARK","LPT")
B
^W1REP("H","PARK","MIUN")
1*2
^W1REP("H","PARK","SIK")
1**1*1*1*
^W1REP("H","PARK","SIK0")
1*0
^W1REP("H","PARK","US",-1)
D DAT^P1DPARK
^W1REP("H","PARK","US",1)
D DAT^P1DPARK
^W1REP("H","PARK","US",3)
D PAR^P1DPARK
^W1REP("H","PARS")
zery itl mihixt g"ec
^W1REP("H","PARS",0,"DAT")
;0
^W1REP("H","PARS",0,"DAT","SH")
1
^W1REP("H","PARS",0,"DEP")
dwlgn;5
^W1REP("H","PARS",0,"DEP","FILE")
^|$$^%W1UCI(JB)|DEP
^W1REP("H","PARS",0,"DEP","OUT")
DEP1
^W1REP("H","PARS",0,"DEP","SET")
0
^W1REP("H","PARS",0,"DEP1")
dwlgn my;12H
^W1REP("H","PARS",0,"DEP1","SET")
0
^W1REP("H","PARS",0,"DEP1","SH")
1
^W1REP("H","PARS",0,"PAR")
hixt;8
^W1REP("H","PARS",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","PARS",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","PARS",0,"PAR","OUT")
PAR1
^W1REP("H","PARS",0,"PAR","SET")
1
^W1REP("H","PARS",0,"PAR1")
hixt xe`z;20H
^W1REP("H","PARS",0,"PAR1","SET")
0
^W1REP("H","PARS",0,"PAR1","SH")
0
^W1REP("H","PARS",0,"SHAA")
dry;5
^W1REP("H","PARS",0,"SHAA","SH")
1
^W1REP("H","PARS",0,"SHAA1")
dry;6
^W1REP("H","PARS",0,"SHAA1","SET")
0
^W1REP("H","PARS",0,"SHAA1","SH")
1
^W1REP("H","PARS",0,"SUGP")
dveaw;5
^W1REP("H","PARS",0,"SUGP","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","PARS",0,"SUGP","OUT")
SUGP1
^W1REP("H","PARS",0,"SUGP","SET")
0
^W1REP("H","PARS",0,"SUGP1")
dveaw xe`z;11H
^W1REP("H","PARS",0,"SUGP1","SET")
0
^W1REP("H","PARS",0,"SUGP1","SH")
1
^W1REP("H","PARS",0,"TRH")
jix`z;8D
^W1REP("H","PARS",0,"TRH","SET")
0
^W1REP("H","PARS",0,"TRH","SH")
1
^W1REP("H","PARS",0,"x1")
zenk;6,0
^W1REP("H","PARS",0,"x2")
mekq;9,2
^W1REP("H","PARS",0,"x3")
dgpd;8,2
^W1REP("H","PARS",0,"x4")
k"dq;9,2
^W1REP("H","PARS",0,"x5")
;,
^W1REP("H","PARS","COD")
DEP*DEP1*SHAA1*TRH*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4
^W1REP("H","PARS","CT")
2*2*2*2*0
^W1REP("H","PARS","FLD")
DEP*SHAA1*TRH*SUGP*PAR*x1*x2*x3*x4
^W1REP("H","PARS","FLD0")
**-******
^W1REP("H","PARS","GLOB1")
^|$$^%W1UCI(JB)|PLUTOT
^W1REP("H","PARS","GLOB2")
^|$$^%W1UCI(JB)|PLUTOT(DAT,MRK,PAR,SHAA)
^W1REP("H","PARS","LPT")
B
^W1REP("H","PARS","MIUN")
2*1*2*3*4
^W1REP("H","PARS","QUERY",".mihixte zery itl hxetn","CT")
2*2*2*2*0
^W1REP("H","PARS","QUERY",".mihixte zery itl hxetn","FLD0")
**-******
^W1REP("H","PARS","QUERY",".mihixte zery itl hxetn","MIUN")
2*1*2*3*4
^W1REP("H","PARS","QUERY",".mihixte zery itl hxetn","SIK0")
1*1*1*1*0
^W1REP("H","PARS","QUERY",".zerye mihixt itl hxetn","CT")
1*1*2*2*0
^W1REP("H","PARS","QUERY",".zerye mihixt itl hxetn","FLD0")
**-******
^W1REP("H","PARS","QUERY",".zerye mihixt itl hxetn","MIUN")
1*2*2*3*4
^W1REP("H","PARS","QUERY",".zerye mihixt itl hxetn","SIK0")
1*1*1*1*0
^W1REP("H","PARS","QUERY","fkexn","CT")
1*0*2*2*0
^W1REP("H","PARS","QUERY","fkexn","FLD0")
-**-*-*-*-***
^W1REP("H","PARS","QUERY","fkexn","MIUN")
1*1*1*2*3
^W1REP("H","PARS","QUERY","fkexn","SIK0")
1*0*1*1*0
^W1REP("H","PARS","QUERY","fkexn mihixt itl g""ec","CT")
1*0*2*2*0
^W1REP("H","PARS","QUERY","fkexn mihixt itl g""ec","FLD0")
*-*-******
^W1REP("H","PARS","QUERY","fkexn mihixt itl g""ec","MIUN")
1*2*1*2*3
^W1REP("H","PARS","QUERY","fkexn mihixt itl g""ec","SIK0")
1*0*1*1*0
^W1REP("H","PARS","QUERY","mikix`z itl hxetn","CT")
1*1*2*2*0
^W1REP("H","PARS","QUERY","mikix`z itl hxetn","FLD0")
*******
^W1REP("H","PARS","QUERY","mikix`z itl hxetn","MIUN")
1*2*3*4*5
^W1REP("H","PARS","QUERY","mikix`z itl hxetn","SIK0")
1*1*1*1*0
^W1REP("H","PARS","SHP","KOD")
PARS
^W1REP("H","PARS","SHP","PROG")
S MAS(5)=$$^%L1DC(METRH,1),MAS(10)=$$^%L1DC(ADTRH,1),MAS(15)=MESHAA1#24,MAS(20)=$S(ADSHAA1<40:ADSHAA1#24,1:ADSHAA1)
^W1REP("H","PARS","SIK")
1*1*1*1*
^W1REP("H","PARS","SIK0")
1*1*1*1*0
^W1REP("H","PARS","US",-1)
D DAT^P1DPARS
^W1REP("H","PARS","US",1)
D DAT^P1DPARS
^W1REP("H","PARS","US",3)
D PAR^P1DPARS
^W1REP("H","PARS","US",4)
D SHAA^P1DPARS
^W1REP("H","PRER")
mihixt jxr g"ec
^W1REP("H","PRER",0,"DEP")
dwlgn;5
^W1REP("H","PRER",0,"DEP","FILE")
^DEP
^W1REP("H","PRER",0,"DEP","OUT")
DEP1
^W1REP("H","PRER",0,"DEP","SET")
0
^W1REP("H","PRER",0,"DEP1")
dwlgn my;15H
^W1REP("H","PRER",0,"DEP1","SET")
0
^W1REP("H","PRER",0,"DEP1","SH")
1
^W1REP("H","PRER",0,"HB")
zipeayg;8
^W1REP("H","PRER",0,"HZM")
dpnfd;7
^W1REP("H","PRER",0,"HZM","SET")
1
^W1REP("H","PRER",0,"HZM","SH")
1
^W1REP("H","PRER",0,"LKH")
gewl 'qn;10
^W1REP("H","PRER",0,"LKH","FILE")
^LKH
^W1REP("H","PRER",0,"LKH","OUT")
LKH1
^W1REP("H","PRER",0,"LKH1")
gewl my;20H
^W1REP("H","PRER",0,"MRK")
sipq;4
^W1REP("H","PRER",0,"MRK","FILE")
^["MLY"]YZRN
^W1REP("H","PRER",0,"MRK","OUT")
MRK1
^W1REP("H","PRER",0,"MRK1")
sipq my;15H
^W1REP("H","PRER",0,"MRK1","SH")
1
^W1REP("H","PRER",0,"NAME")
gewl my;12H
^W1REP("H","PRER",0,"NAME","SH")
1
^W1REP("H","PRER",0,"NCAB")
zipeayg;6
^W1REP("H","PRER",0,"NCAB","SH")
0
^W1REP("H","PRER",0,"NMB")
gewl xtqn;10
^W1REP("H","PRER",0,"NMB","FILE")
^LKH
^W1REP("H","PRER",0,"NMB","OUT")
NAME
^W1REP("H","PRER",0,"PAR")
hixt 'qn;8
^W1REP("H","PRER",0,"PAR","FILE")
^PAR
^W1REP("H","PRER",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","PRER",0,"PAR","OUT")
PAR1
^W1REP("H","PRER",0,"PAR","SET")
1
^W1REP("H","PRER",0,"PAR1")
hixt xe`z;16H
^W1REP("H","PRER",0,"PAR1","SET")
0
^W1REP("H","PRER",0,"PAR1","SH")
1
^W1REP("H","PRER",0,"PSL")
gily cew;3
^W1REP("H","PRER",0,"PSL","FILE")
^P1SL
^W1REP("H","PRER",0,"PSL","OUT")
PSL1
^W1REP("H","PRER",0,"PSL1")
gily my;10H
^W1REP("H","PRER",0,"PSL1","SH")
1
^W1REP("H","PRER",0,"SHAA")
dryl;7
^W1REP("H","PRER",0,"SHAA","SH")
1
^W1REP("H","PRER",0,"SHL")
ogley;3
^W1REP("H","PRER",0,"SHL","SET")
1
^W1REP("H","PRER",0,"SHL","SH")
1
^W1REP("H","PRER",0,"SL")
gily cew;5
^W1REP("H","PRER",0,"SL","FILE")
^P1SL
^W1REP("H","PRER",0,"SL","OUT")
SL1
^W1REP("H","PRER",0,"SL1")
gily my;12H
^W1REP("H","PRER",0,"SUGL")
gewl beq;8
^W1REP("H","PRER",0,"SUGL","FILE")
^SUGL
^W1REP("H","PRER",0,"SUGL","OUT")
SUGL1
^W1REP("H","PRER",0,"SUGL1")
gewl beq xe`z;15H
^W1REP("H","PRER",0,"SUGL1","SH")
1
^W1REP("H","PRER",0,"SUGP")
mihixt zveaw;12
^W1REP("H","PRER",0,"SUGP","FILE")
^PARSUG
^W1REP("H","PRER",0,"SUGP","OUT")
SUGP1
^W1REP("H","PRER",0,"SUGP","SET")
0
^W1REP("H","PRER",0,"SUGP1")
mihixt zveaw my;15H
^W1REP("H","PRER",0,"SUGP1","SET")
0
^W1REP("H","PRER",0,"SUGP1","SH")
1
^W1REP("H","PRER",0,"SUGS")
ogley beq;5
^W1REP("H","PRER",0,"SUGS","FILE")
^SUGS
^W1REP("H","PRER",0,"SUGS","OUT")
SUGS1
^W1REP("H","PRER",0,"SUGS","SET")
0
^W1REP("H","PRER",0,"SUGS1")
'ley beq xe`z;12
^W1REP("H","PRER",0,"SUGS1","OUT")
1
^W1REP("H","PRER",0,"SUGS1","SET")
0
^W1REP("H","PRER",0,"SUGT")
melyz beq;5
^W1REP("H","PRER",0,"SUGT","SH")
1
^W1REP("H","PRER",0,"TRH")
jix`z;8D
^W1REP("H","PRER",0,"TRH","M2")
S TRH=$ZD(DT,3)
^W1REP("H","PRER",0,"TRH","SET")
0
^W1REP("H","PRER",0,"TRH","SH")
1
^W1REP("H","PRER",0,"TRH1")
YYYYMMDD;8
^W1REP("H","PRER",0,"TRH1","SH")
1
^W1REP("H","PRER",0,"TS")
melyzl;8
^W1REP("H","PRER",0,"TSHL")
melyzl;8
^W1REP("H","PRER",0,"TSHL","OUT")
TSHL
^W1REP("H","PRER",0,"x1")
zenk;4,0
^W1REP("H","PRER",0,"x2")
mekq;8,2
^W1REP("H","PRER",0,"x3")
`ln xign;8,2
^W1REP("H","PRER",0,"x4")
yxtd;8,2
^W1REP("H","PRER",0,"x5")
;,
^W1REP("H","PRER","COD")
TRH*SUGS*SUGS1*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*HZM*x1*x2*x3*x4
^W1REP("H","PRER","CT")
1*1*1*2*0*0*1*2*0*0
^W1REP("H","PRER","FLD")
TRH*SUGS*DEP*SUGP*PAR*HZM*x1*x2*x3*x4
^W1REP("H","PRER","FLD0")
*******
^W1REP("H","PRER","GLOB1")
^VRM($J)
^W1REP("H","PRER","GLOB2")
^VRM($J,DT,HZM,PAR)
^W1REP("H","PRER","LPT")
B
^W1REP("H","PRER","MIUN")
1*2*3*4*5*6*3*4*8*5
^W1REP("H","PRER","MIUN","PROG")
TRH^P1PRER
^W1REP("H","PRER","QUERY","fkexn iztewz zewlgne ogley ibeq itl","CT")
0*1*1*2*0*0*1*2*0*0
^W1REP("H","PRER","QUERY","fkexn iztewz zewlgne ogley ibeq itl","FLD0")
*****-**
^W1REP("H","PRER","QUERY","fkexn iztewz zewlgne ogley ibeq itl","MIUN")
5*1*2*3*4*6*3*4*8*5
^W1REP("H","PRER","QUERY","fkexn iztewz zewlgne ogley ibeq itl","SIK0")
0*1*1*1*0*0*0*0*0*0
^W1REP("H","PRER","QUERY","fkexn mihixt zeveawe zewlgn itl","CT")
0*0*1*2*0*0*1*2*0*0
^W1REP("H","PRER","QUERY","fkexn mihixt zeveawe zewlgn itl","FLD0")
*-****-**
^W1REP("H","PRER","QUERY","fkexn mihixt zeveawe zewlgn itl","MIUN")
4*4*1*2*3*5*2*3*5*6
^W1REP("H","PRER","QUERY","fkexn mihixt zeveawe zewlgn itl","SIK0")
0*1*1*1*0*0*1*1*1*0
^W1REP("H","PRER","QUERY","fkexn zewlgne ogley ibeq , mikix`z itl","CT")
1*1*1*2*0*0*1*2*0*0
^W1REP("H","PRER","QUERY","fkexn zewlgne ogley ibeq , mikix`z itl","FLD0")
*****-**
^W1REP("H","PRER","QUERY","fkexn zewlgne ogley ibeq , mikix`z itl","MIUN")
1*2*3*4*5*6*3*4*8*5
^W1REP("H","PRER","QUERY","fkexn zewlgne ogley ibeq , mikix`z itl","SIK0")
1*1*1*1*0*0*0*0*0*0
^W1REP("H","PRER","QUERY","hxetn iztewz zewlgne ogley ibeq itl","CT")
0*1*1*2*0*0*1*2*0*0
^W1REP("H","PRER","QUERY","hxetn iztewz zewlgne ogley ibeq itl","FLD0")
*******
^W1REP("H","PRER","QUERY","hxetn iztewz zewlgne ogley ibeq itl","MIUN")
5*1*2*3*4*6*3*4*8*5
^W1REP("H","PRER","QUERY","hxetn iztewz zewlgne ogley ibeq itl","SIK0")
0*1*1*1*0*0*0*0*0*0
^W1REP("H","PRER","QUERY","hxetn mihixt zeveawe zewlgn itl","CT")
0*0*1*2*0*0*1*2*0*0
^W1REP("H","PRER","QUERY","hxetn mihixt zeveawe zewlgn itl","FLD0")
*-******
^W1REP("H","PRER","QUERY","hxetn mihixt zeveawe zewlgn itl","MIUN")
4*4*1*2*3*5*2*3*5*6
^W1REP("H","PRER","QUERY","hxetn mihixt zeveawe zewlgn itl","SIK0")
0*1*1*1*0*0*1*1*1*0
^W1REP("H","PRER","QUERY","hxetn zewlgne ogley ibeq , mikix`z itl","CT")
1*1*1*2*0*0*1*2*0*0
^W1REP("H","PRER","QUERY","hxetn zewlgne ogley ibeq , mikix`z itl","FLD0")
*******
^W1REP("H","PRER","QUERY","hxetn zewlgne ogley ibeq , mikix`z itl","MIUN")
1*2*3*4*5*6*3*4*8*5
^W1REP("H","PRER","QUERY","hxetn zewlgne ogley ibeq , mikix`z itl","SIK0")
1*1*1*1*0*0*0*0*0*0
^W1REP("H","PRER","SIK")
1*1**1*
^W1REP("H","PRER","SIK0")
1*1*1*1*0*0*0*0*0*0
^W1REP("H","PRER","US",2)
D DT^P1PRER
^W1REP("H","PRER","US",3)
D HZM1^P1PRER
^W1REP("H","PRER","US",4)
D PAR^P1PRER
^W1REP("H","PRER","US",5)
D PAR^P1PRBT
^W1REP("H","PRER","US",6)
D PAR^P1PRPP
^W1REP("H","PRHZ")
zepnfd itl mihixt zxikn g"ec 
^W1REP("H","PRHZ",0,"HB")
zipeayg;8
^W1REP("H","PRHZ",0,"HZM")
dpnfd;7
^W1REP("H","PRHZ",0,"HZM","SET")
1
^W1REP("H","PRHZ",0,"HZM","SH")
1
^W1REP("H","PRHZ",0,"LKH")
gewl 'qn;10
^W1REP("H","PRHZ",0,"LKH","FILE")
^LKH
^W1REP("H","PRHZ",0,"LKH","OUT")
LKH1
^W1REP("H","PRHZ",0,"LKH1")
gewl my;20H
^W1REP("H","PRHZ",0,"LKHN")
gewl 'qn;11
^W1REP("H","PRHZ",0,"LKHN","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","PRHZ",0,"LKHN","OUT")
LKHN1
^W1REP("H","PRHZ",0,"LKHN","SET")
1
^W1REP("H","PRHZ",0,"LKHN1")
gewl my;14H
^W1REP("H","PRHZ",0,"LKHN1","SET")
0
^W1REP("H","PRHZ",0,"LKHN1","SH")
1
^W1REP("H","PRHZ",0,"NAME")
gewl my;12H
^W1REP("H","PRHZ",0,"NAME","SH")
1
^W1REP("H","PRHZ",0,"NCAB")
zipeayg;6
^W1REP("H","PRHZ",0,"NCAB","SH")
0
^W1REP("H","PRHZ",0,"NMB")
gewl xtqn;10
^W1REP("H","PRHZ",0,"NMB","FILE")
^LKH
^W1REP("H","PRHZ",0,"NMB","OUT")
NAME
^W1REP("H","PRHZ",0,"PAR")
hixt 'qn;8
^W1REP("H","PRHZ",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","PRHZ",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","PRHZ",0,"PAR","OUT")
PAR1
^W1REP("H","PRHZ",0,"PAR","SET")
1
^W1REP("H","PRHZ",0,"PAR1")
hixt xe`z;16H
^W1REP("H","PRHZ",0,"PAR1","SET")
0
^W1REP("H","PRHZ",0,"PAR1","SH")
1
^W1REP("H","PRHZ",0,"PSL")
gily cew;3
^W1REP("H","PRHZ",0,"PSL","FILE")
^P1SL
^W1REP("H","PRHZ",0,"PSL","OUT")
PSL1
^W1REP("H","PRHZ",0,"PSL1")
gily my;10H
^W1REP("H","PRHZ",0,"PSL1","SH")
1
^W1REP("H","PRHZ",0,"SHAA")
dryl;7
^W1REP("H","PRHZ",0,"SHAA","SET")
1
^W1REP("H","PRHZ",0,"SHAA","SH")
1
^W1REP("H","PRHZ",0,"SL")
gily cew;5
^W1REP("H","PRHZ",0,"SL","FILE")
^P1SL
^W1REP("H","PRHZ",0,"SL","OUT")
SL1
^W1REP("H","PRHZ",0,"SL1")
gily my;12H
^W1REP("H","PRHZ",0,"SUGL")
zegewl zveaw;8
^W1REP("H","PRHZ",0,"SUGL","FILE")
^|$$^%W1UCI(JB)|SUGL
^W1REP("H","PRHZ",0,"SUGL","OUT")
SUGL1
^W1REP("H","PRHZ",0,"SUGL","SET")
1
^W1REP("H","PRHZ",0,"SUGL1")
dveaw my;12H
^W1REP("H","PRHZ",0,"SUGL1","SET")
0
^W1REP("H","PRHZ",0,"SUGL1","SH")
1
^W1REP("H","PRHZ",0,"SUGT")
melyz beq;5
^W1REP("H","PRHZ",0,"SUGT","SH")
1
^W1REP("H","PRHZ",0,"TRH")
jix`z;8D
^W1REP("H","PRHZ",0,"TRH","M2")
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("H","PRHZ",0,"TRH","SET")
0
^W1REP("H","PRHZ",0,"TRH","SH")
1
^W1REP("H","PRHZ",0,"TS")
melyzl;8
^W1REP("H","PRHZ",0,"TSHL")
melyzl;8
^W1REP("H","PRHZ",0,"TSHL","OUT")
TSHL
^W1REP("H","PRHZ",0,"x1")
zenk;4,0
^W1REP("H","PRHZ",0,"x2")
mekq;8,2
^W1REP("H","PRHZ",0,"x3")
hixtl dgpd;8,2
^W1REP("H","PRHZ",0,"x4")
dgpd ixg`;8,2
^W1REP("H","PRHZ",0,"x5")
;,
^W1REP("H","PRHZ","COD")
TRH*SHAA*SUGL*SUGL1*LKHN*LKHN1*HZM*PAR*PAR1*x1*x2*x3*x4
^W1REP("H","PRHZ","CT")
0*0*0*0*0*2
^W1REP("H","PRHZ","FLD")
TRH*SHAA*SUGL*LKHN*HZM*PAR*x1*x2*x3*x4
^W1REP("H","PRHZ","FLD0")
**-*-******
^W1REP("H","PRHZ","GLOB1")
^|$$^%W1UCI(JB)|VRM($J)
^W1REP("H","PRHZ","GLOB2")
^|$$^%W1UCI(JB)|VRM($J,DT,SHAA,SUGL,LKHN,HZM,PAR)
^W1REP("H","PRHZ","LPT")
B
^W1REP("H","PRHZ","MAM")
*1*1*1*
^W1REP("H","PRHZ","MIUN")
3*4*3*1*2*1
^W1REP("H","PRHZ","MIUN","PROG")
TRH^P1PRHZ
^W1REP("H","PRHZ","QUERY","(mihixt itl oein) hxetn","CT")
0*0*0*0*2*0
^W1REP("H","PRHZ","QUERY","(mihixt itl oein) hxetn","FLD0")
**-*-****
^W1REP("H","PRHZ","QUERY","(mihixt itl oein) hxetn","MIUN")
3*4*3*2*1*2
^W1REP("H","PRHZ","QUERY","(mihixt itl oein) hxetn","SIK0")
0*0*0*0*1*0
^W1REP("H","PRHZ","QUERY","(mikix`z itl oein) hxetn","CT")
2*0*0*0*0*0
^W1REP("H","PRHZ","QUERY","(mikix`z itl oein) hxetn","FLD0")
*-*-*-******
^W1REP("H","PRHZ","QUERY","(mikix`z itl oein) hxetn","MIUN")
1*3*1*3*2*4
^W1REP("H","PRHZ","QUERY","(mikix`z itl oein) hxetn","SIK0")
1*0*0*0*0*0
^W1REP("H","PRHZ","QUERY","(zepnfd itl oein) hxetn","CT")
0*0*0*0*0*2
^W1REP("H","PRHZ","QUERY","(zepnfd itl oein) hxetn","FLD0")
**-*-******
^W1REP("H","PRHZ","QUERY","(zepnfd itl oein) hxetn","MIUN")
3*4*3*1*2*1
^W1REP("H","PRHZ","QUERY","(zepnfd itl oein) hxetn","SIK0")
0*0*0*1*0*1
^W1REP("H","PRHZ","SHP","KOD")
P1HZH
^W1REP("H","PRHZ","SHP","PROG")
S MAS(5)="zepnfd itl mihixt g""ec"
^W1REP("H","PRHZ","SIK")
1*1*1*1*
^W1REP("H","PRHZ","SIK0")
0*0*0*1*0*1
^W1REP("H","PRHZ","US",2)
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("H","PRHZ","US",7)
D PAR^P1PRHZ
^W1REP("H","PROT")
OTH ihixt zexikn g"ec
^W1REP("H","PROT",0,"HB")
zipeayg;8
^W1REP("H","PROT",0,"HZM")
dpnfd;7
^W1REP("H","PROT",0,"HZM","SH")
1
^W1REP("H","PROT",0,"LKH")
gewl 'qn;10
^W1REP("H","PROT",0,"LKH","FILE")
^LKH
^W1REP("H","PROT",0,"LKH","OUT")
LKH1
^W1REP("H","PROT",0,"LKH1")
gewl my;20H
^W1REP("H","PROT",0,"LKHN")
gewl 'qn;11
^W1REP("H","PROT",0,"LKHN","FILE")
^LKH
^W1REP("H","PROT",0,"LKHN","OUT")
LKHN1
^W1REP("H","PROT",0,"LKHN1")
gewl my;14H
^W1REP("H","PROT",0,"LKHN1","SH")
1
^W1REP("H","PROT",0,"NAME")
gewl my;12H
^W1REP("H","PROT",0,"NAME","SH")
1
^W1REP("H","PROT",0,"NCAB")
zipeayg;6
^W1REP("H","PROT",0,"NCAB","SH")
0
^W1REP("H","PROT",0,"NMB")
gewl xtqn;10
^W1REP("H","PROT",0,"NMB","FILE")
^LKH
^W1REP("H","PROT",0,"NMB","OUT")
NAME
^W1REP("H","PROT",0,"PAR")
hixt 'qn;8
^W1REP("H","PROT",0,"PAR","FILE")
^PAR
^W1REP("H","PROT",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","PROT",0,"PAR","OUT")
PAR1
^W1REP("H","PROT",0,"PAR1")
hixt xe`z;16H
^W1REP("H","PROT",0,"PAR1","SH")
1
^W1REP("H","PROT",0,"PSL")
gily cew;3
^W1REP("H","PROT",0,"PSL","FILE")
^P1SL
^W1REP("H","PROT",0,"PSL","OUT")
PSL1
^W1REP("H","PROT",0,"PSL1")
gily my;10H
^W1REP("H","PROT",0,"PSL1","SH")
1
^W1REP("H","PROT",0,"SHAA")
dryl;7
^W1REP("H","PROT",0,"SHAA","SH")
1
^W1REP("H","PROT",0,"SL")
gily cew;5
^W1REP("H","PROT",0,"SL","FILE")
^P1SL
^W1REP("H","PROT",0,"SL","OUT")
SL1
^W1REP("H","PROT",0,"SL1")
gily my;12H
^W1REP("H","PROT",0,"SUGL")
zegewl zveaw;8
^W1REP("H","PROT",0,"SUGL","FILE")
^SUGL
^W1REP("H","PROT",0,"SUGL","OUT")
SUGL1
^W1REP("H","PROT",0,"SUGL1")
dveaw my;12H
^W1REP("H","PROT",0,"SUGL1","SH")
1
^W1REP("H","PROT",0,"SUGT")
melyz beq;5
^W1REP("H","PROT",0,"SUGT","SH")
1
^W1REP("H","PROT",0,"TRH")
jix`z;8D
^W1REP("H","PROT",0,"TRH","M2")
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("H","PROT",0,"TRH","SH")
1
^W1REP("H","PROT",0,"TS")
melyzl;8
^W1REP("H","PROT",0,"TSHL")
melyzl;8
^W1REP("H","PROT",0,"TSHL","OUT")
TSHL
^W1REP("H","PROT",0,"x1")
zenk;4,0
^W1REP("H","PROT",0,"x2")
mekq;8,2
^W1REP("H","PROT",0,"x3")
`ln mekq;8,2
^W1REP("H","PROT",0,"x4")
;,
^W1REP("H","PROT","COD")
TRH*SHAA*SUGL*SUGL1*LKHN*LKHN1*HZM*PAR*PAR1*x1*x2*x3
^W1REP("H","PROT","CT")
0*0*0*0*2*0
^W1REP("H","PROT","FLD")
TRH*SHAA*SUGL*LKHN*HZM*PAR*x1*x2*x3
^W1REP("H","PROT","FLD0")
**-*-*****
^W1REP("H","PROT","GLOB1")
^VRM($J)
^W1REP("H","PROT","GLOB2")
^VRM($J,DT,SHAA,SUGL,LKHN,HZM,PAR)
^W1REP("H","PROT","LPT")
B
^W1REP("H","PROT","MIUN")
3*4*3*2*1*2
^W1REP("H","PROT","MIUN","PROG")
TRH^P1PRHZ
^W1REP("H","PROT","QUERY","(mihixt itl oein) hxetn","CT")
0*0*0*0*2*0
^W1REP("H","PROT","QUERY","(mihixt itl oein) hxetn","FLD0")
**-*-*****
^W1REP("H","PROT","QUERY","(mihixt itl oein) hxetn","MIUN")
3*4*3*2*1*2
^W1REP("H","PROT","QUERY","(mihixt itl oein) hxetn","SIK0")
0*0*0*0*1*0
^W1REP("H","PROT","QUERY","(mikix`z itl oein) hxetn","CT")
2*0*0*0*0*0
^W1REP("H","PROT","QUERY","(mikix`z itl oein) hxetn","FLD0")
*-*-*-*****
^W1REP("H","PROT","QUERY","(mikix`z itl oein) hxetn","MIUN")
1*3*1*3*2*3
^W1REP("H","PROT","QUERY","(mikix`z itl oein) hxetn","SIK0")
1*0*0*0*0*0
^W1REP("H","PROT","QUERY","(zegewl zveaw itl oein) hxetn","CT")
0*0*1*2*0*0
^W1REP("H","PROT","QUERY","(zegewl zveaw itl oein) hxetn","FLD0")
-*-***-****
^W1REP("H","PROT","QUERY","(zegewl zveaw itl oein) hxetn","MIUN")
2*5*1*2*4*3
^W1REP("H","PROT","QUERY","(zegewl zveaw itl oein) hxetn","SIK0")
1*0*1*0*0*0
^W1REP("H","PROT","QUERY","(zepnfd itl oein) hxetn","CT")
0*0*0*0*0*2
^W1REP("H","PROT","QUERY","(zepnfd itl oein) hxetn","FLD0")
**-*-*****
^W1REP("H","PROT","QUERY","(zepnfd itl oein) hxetn","MIUN")
3*4*3*1*2*1
^W1REP("H","PROT","QUERY","(zepnfd itl oein) hxetn","SIK0")
0*0*0*1*0*1
^W1REP("H","PROT","SHP","KOD")
P1HZH
^W1REP("H","PROT","SHP","PROG")
S MAS(5)=$S($D(PAROTH):"zepnfd itl OTH ihixt g""ec",1:"zepnfd mihixt g""ec")
^W1REP("H","PROT","SIK")
1*1*1*
^W1REP("H","PROT","SIK0")
0*0*0*0*1*0
^W1REP("H","PROT","US",2)
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("H","PROT","US",7)
D PAR^P1PRHZ
^W1REP("H","PRPP")
hxetn hixt zxikn g"ec
^W1REP("H","PRPP",0,"DEP")
dwlgn;5
^W1REP("H","PRPP",0,"DEP","FILE")
^DEP
^W1REP("H","PRPP",0,"DEP","OUT")
DEP1
^W1REP("H","PRPP",0,"DEP1")
dwlgn my;15H
^W1REP("H","PRPP",0,"DEP1","SH")
1
^W1REP("H","PRPP",0,"HB")
zipeayg;8
^W1REP("H","PRPP",0,"HZM")
dpnfd;7
^W1REP("H","PRPP",0,"HZM","SH")
1
^W1REP("H","PRPP",0,"LKH")
gewl 'qn;10
^W1REP("H","PRPP",0,"LKH","FILE")
^LKH
^W1REP("H","PRPP",0,"LKH","OUT")
LKH1
^W1REP("H","PRPP",0,"LKH1")
gewl my;20H
^W1REP("H","PRPP",0,"MRK")
sipq;4
^W1REP("H","PRPP",0,"MRK","FILE")
^[^UCI("MLG")]YZRN
^W1REP("H","PRPP",0,"MRK","OUT")
MRK1
^W1REP("H","PRPP",0,"MRK1")
sipq my;15H
^W1REP("H","PRPP",0,"MRK1","SH")
1
^W1REP("H","PRPP",0,"NAME")
gewl my;12H
^W1REP("H","PRPP",0,"NAME","SH")
1
^W1REP("H","PRPP",0,"NCAB")
zipeayg;6
^W1REP("H","PRPP",0,"NCAB","SH")
0
^W1REP("H","PRPP",0,"NMB")
gewl xtqn;10
^W1REP("H","PRPP",0,"NMB","FILE")
^LKH
^W1REP("H","PRPP",0,"NMB","OUT")
NAME
^W1REP("H","PRPP",0,"PAR")
hixt 'qn;8
^W1REP("H","PRPP",0,"PAR","FILE")
^PAR
^W1REP("H","PRPP",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","PRPP",0,"PAR","OUT")
PAR1
^W1REP("H","PRPP",0,"PAR1")
hixt xe`z;16H
^W1REP("H","PRPP",0,"PAR1","SH")
1
^W1REP("H","PRPP",0,"PSL")
gily cew;3
^W1REP("H","PRPP",0,"PSL","FILE")
^P1SL
^W1REP("H","PRPP",0,"PSL","OUT")
PSL1
^W1REP("H","PRPP",0,"PSL1")
gily my;10H
^W1REP("H","PRPP",0,"PSL1","SH")
1
^W1REP("H","PRPP",0,"SHAA")
dryl;7
^W1REP("H","PRPP",0,"SHAA","SH")
1
^W1REP("H","PRPP",0,"SL")
gily cew;5
^W1REP("H","PRPP",0,"SL","FILE")
^P1SL
^W1REP("H","PRPP",0,"SL","OUT")
SL1
^W1REP("H","PRPP",0,"SL1")
gily my;12H
^W1REP("H","PRPP",0,"SUGL")
gewl beq;8
^W1REP("H","PRPP",0,"SUGL","FILE")
^SUGL
^W1REP("H","PRPP",0,"SUGL","OUT")
SUGL1
^W1REP("H","PRPP",0,"SUGL1")
gewl beq xe`z;15H
^W1REP("H","PRPP",0,"SUGL1","SH")
1
^W1REP("H","PRPP",0,"SUGP")
mihixt zveaw;12
^W1REP("H","PRPP",0,"SUGP","FILE")
^PARSUG
^W1REP("H","PRPP",0,"SUGP","OUT")
SUGP1
^W1REP("H","PRPP",0,"SUGP1")
mihixt zveaw my;15H
^W1REP("H","PRPP",0,"SUGP1","SH")
1
^W1REP("H","PRPP",0,"SUGS")
ogley beq;5
^W1REP("H","PRPP",0,"SUGS","FILE")
^SUGS
^W1REP("H","PRPP",0,"SUGS","OUT")
SUGS1
^W1REP("H","PRPP",0,"SUGS1")
'ley beq xe`z;12
^W1REP("H","PRPP",0,"SUGS1","OUT")
1
^W1REP("H","PRPP",0,"SUGT")
melyz beq;5
^W1REP("H","PRPP",0,"SUGT","SH")
1
^W1REP("H","PRPP",0,"TRH")
jix`z;8D
^W1REP("H","PRPP",0,"TRH","M2")
S TRH=$ZD(DT,3)
^W1REP("H","PRPP",0,"TRH","SH")
1
^W1REP("H","PRPP",0,"TRH1")
YYYYMMDD;8
^W1REP("H","PRPP",0,"TRH1","SH")
1
^W1REP("H","PRPP",0,"TS")
melyzl;8
^W1REP("H","PRPP",0,"TSHL")
melyzl;8
^W1REP("H","PRPP",0,"TSHL","OUT")
TSHL
^W1REP("H","PRPP",0,"x1")
zenk;4,0
^W1REP("H","PRPP",0,"x2")
mekq;8,2
^W1REP("H","PRPP",0,"x3")
;,
^W1REP("H","PRPP","COD")
MRK*MRK1*TRH*TRH1*SHAA*SUGL*SUGL1*SUGS*SUGS1*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*HZM*x1*x2
^W1REP("H","PRPP","CT")
0*0*0*0*0*1*1*2*0*0
^W1REP("H","PRPP","FLD")
MRK*TRH*TRH1*SHAA*SUGL*SUGS*DEP*SUGP*PAR*HZM*x1*x2
^W1REP("H","PRPP","FLD0")
*-****-******
^W1REP("H","PRPP","GLOB1")
^VRM($J)
^W1REP("H","PRPP","GLOB2")
^VRM($J,DT,SHAA,SUGL,HZM,PAR)
^W1REP("H","PRPP","LPT")
B
^W1REP("H","PRPP","MIUN")
1*4*6*7*2*1*3*4*8*5
^W1REP("H","PRPP","MIUN","PROG")
TRH^P1PRPP
^W1REP("H","PRPP","QUERY","zewlgne zegewl ibeq , mitipq itl","CT")
0*0*0*0*0*1*1*2*0*0
^W1REP("H","PRPP","QUERY","zewlgne zegewl ibeq , mitipq itl","FLD0")
*-****-******
^W1REP("H","PRPP","QUERY","zewlgne zegewl ibeq , mitipq itl","MIUN")
1*5*6*7*2*3*3*4*8*5
^W1REP("H","PRPP","QUERY","zewlgne zegewl ibeq , mitipq itl","SIK0")
0*0*0*0*0*0*0*0*0*0
^W1REP("H","PRPP","SHP","KOD")
P1HZH
^W1REP("H","PRPP","SIK")
1*1*
^W1REP("H","PRPP","SIK0")
0*1*0*0*0*1*0*0*0*0
^W1REP("H","PRPP","US",2)
D DT^P1PRPP
^W1REP("H","PRPP","US",5)
D HZM1^P1PRPP
^W1REP("H","PRPP","US",6)
D PAR^P1PRPP
^W1REP("H","PRTH")
iz`eeyd mihixt zxikn g"ec
^W1REP("H","PRTH",0,"DEP")
dwlgn;5
^W1REP("H","PRTH",0,"DEP","FILE")
^DEP
^W1REP("H","PRTH",0,"DEP","OUT")
DEP1
^W1REP("H","PRTH",0,"DEP","SET")
0
^W1REP("H","PRTH",0,"DEP1")
dwlgn my;12H
^W1REP("H","PRTH",0,"DEP1","SET")
0
^W1REP("H","PRTH",0,"DEP1","SH")
1
^W1REP("H","PRTH",0,"KVZ")
dveaw;5
^W1REP("H","PRTH",0,"KVZ","FILE")
^PARSUG
^W1REP("H","PRTH",0,"KVZ","OUT")
KVZ1
^W1REP("H","PRTH",0,"KVZ","SET")
1
^W1REP("H","PRTH",0,"KVZ1")
dveaw xe`z;12H
^W1REP("H","PRTH",0,"KVZ1","SET")
0
^W1REP("H","PRTH",0,"KVZ1","SH")
1
^W1REP("H","PRTH",0,"PRT")
hixt cew;8
^W1REP("H","PRTH",0,"PRT","FILE")
^PAR
^W1REP("H","PRTH",0,"PRT","M2")
S PRT1=$$SHEM^P1P(PRT)
^W1REP("H","PRTH",0,"PRT","OUT")
PRT1
^W1REP("H","PRTH",0,"PRT","SET")
1
^W1REP("H","PRTH",0,"PRT1")
hixt my;16H
^W1REP("H","PRTH",0,"PRT1","SET")
0
^W1REP("H","PRTH",0,"PRT1","SH")
1
^W1REP("H","PRTH",0,"x1")
1 zenk;6,0
^W1REP("H","PRTH",0,"x2")
2 zenk;6,0
^W1REP("H","PRTH",0,"x3")
zenka yxtd;10S,0
^W1REP("H","PRTH",0,"x4")
%-a yxtd;10S,2
^W1REP("H","PRTH",0,"x5")
1 mekq;9,2
^W1REP("H","PRTH",0,"x6")
2 mekq;9,2
^W1REP("H","PRTH",0,"x7")
mekqa yxtd;10S,2
^W1REP("H","PRTH",0,"x8")
%-a yxtd;8S,2
^W1REP("H","PRTH",0,"x9")
;,
^W1REP("H","PRTH","COD")
DEP*DEP1*KVZ*KVZ1*PRT*PRT1*x1*x2*x3*x4*x5*x6*x7*x8
^W1REP("H","PRTH","CT")
1*2*0
^W1REP("H","PRTH","FLD")
DEP*KVZ*PRT*x1*x2*x3*x4*x5*x6*x7*x8
^W1REP("H","PRTH","FLD0")
**********
^W1REP("H","PRTH","GLOB1")
^VRM($J)
^W1REP("H","PRTH","GLOB2")
^VRM($J,KVZ,PRT)
^W1REP("H","PRTH","LPT")
S
^W1REP("H","PRTH","MIUN")
1*2*3
^W1REP("H","PRTH","QUERY","fkexn","CT")
2*0*0
^W1REP("H","PRTH","QUERY","fkexn","FLD0")
**-********
^W1REP("H","PRTH","QUERY","fkexn","MIUN")
1*2*3
^W1REP("H","PRTH","QUERY","fkexn","SIK0")
1*0*0
^W1REP("H","PRTH","QUERY","hxetn","CT")
1*2*0
^W1REP("H","PRTH","QUERY","hxetn","FLD0")
**********
^W1REP("H","PRTH","QUERY","hxetn","MIUN")
1*2*3
^W1REP("H","PRTH","QUERY","hxetn","SIK0")
1*1*0
^W1REP("H","PRTH","SHP","KOD")
PRTH
^W1REP("H","PRTH","SHP","PROG")
S MAS(1)=YY1,MAS(2)=MM10,MAS(3)=MM11,MAS(5)=YY2,MAS(7)=MM20,MAS(8)=MM21
^W1REP("H","PRTH","SIK")
1*1*1*0*1*1*1**
^W1REP("H","PRTH","SIK0")
1*1*0
^W1REP("H","PRTH","SIX")
S SUM(K,4)="" S:SUM(K,1) SUM(K,4)=$J(SUM(K,3)/SUM(K,1)*100,2,2) S SUM(K,8)="" I SUM(K,5) S SUM(K,8)=$J(SUM(K,7)/SUM(K,5)*100,2,2)
^W1REP("H","PRTH","US",2)
D KVZ^P1DPSV
^W1REP("H","PRTH","US",3)
D PRT^P1DPSV
^W1REP("H","SHPM")
mixvlne 'gley itl mihixt g"ec
^W1REP("H","SHPM",0,"DEP")
dwlgn;5
^W1REP("H","SHPM",0,"DEP","FILE")
^DEP
^W1REP("H","SHPM",0,"DEP","OUT")
DEP1
^W1REP("H","SHPM",0,"DEP1")
xe`z;12H
^W1REP("H","SHPM",0,"DEP1","SH")
1
^W1REP("H","SHPM",0,"MLZ")
xvln 'qn;5.
^W1REP("H","SHPM",0,"MLZ","FILE")
^NAME
^W1REP("H","SHPM",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^W1REP("H","SHPM",0,"MLZ","OUT")
MLZ1
^W1REP("H","SHPM",0,"MLZ1")
xvln my;12H
^W1REP("H","SHPM",0,"MLZ1","SH")
1
^W1REP("H","SHPM",0,"MLZR")
xvln;9
^W1REP("H","SHPM",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("H","SHPM",0,"MLZR","OUT")
MLZR1
^W1REP("H","SHPM",0,"MLZR1")
xvln my;12H
^W1REP("H","SHPM",0,"MLZR1","SH")
0
^W1REP("H","SHPM",0,"PAR")
hixt;8
^W1REP("H","SHPM",0,"PAR","FILE")
^PAR
^W1REP("H","SHPM",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","SHPM",0,"PAR","OUT")
PAR1
^W1REP("H","SHPM",0,"PAR1")
hixt xe`z;20H
^W1REP("H","SHPM",0,"PAR1","SH")
1
^W1REP("H","SHPM",0,"SHULH")
ogley;3
^W1REP("H","SHPM",0,"SHULH","SH")
1
^W1REP("H","SHPM",0,"SUGP")
hixt beq;3
^W1REP("H","SHPM",0,"SUGP","FILE")
^PARSUG
^W1REP("H","SHPM",0,"SUGP","OUT")
SUGP1
^W1REP("H","SHPM",0,"SUGP1")
beq xe`z;10H
^W1REP("H","SHPM",0,"SUGP1","SH")
0
^W1REP("H","SHPM",0,"SUGS")
ogley beq;8
^W1REP("H","SHPM",0,"SUGS","FILE")
^SUGS
^W1REP("H","SHPM",0,"SUGS","OUT")
SUGS1
^W1REP("H","SHPM",0,"SUGS1")
xe`z;12H
^W1REP("H","SHPM",0,"SUGS1","SH")
1
^W1REP("H","SHPM",0,"x1")
zenk;7,0
^W1REP("H","SHPM",0,"x2")
dgpd iptl;9,2
^W1REP("H","SHPM",0,"x3")
dgpd;8,2
^W1REP("H","SHPM",0,"x4")
dgpd ixg`;9,2
^W1REP("H","SHPM",0,"x5")
;,
^W1REP("H","SHPM",0,"x6")
;,
^W1REP("H","SHPM","COD")
SUGS*SUGS1*MLZ*MLZ1*SHULH*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4
^W1REP("H","SHPM","CT")
1*2*0*2*0*0*0
^W1REP("H","SHPM","FLD")
SUGS*MLZ*SHULH*DEP*SUGP*PAR*x1*x2*x3*x4
^W1REP("H","SHPM","FLD0")
**-*-*-******
^W1REP("H","SHPM","GLOB1")
^VRM(PRTN)
^W1REP("H","SHPM","GLOB2")
^VRM(PRTN,SUGS,MLZ,SHULH,DEP,SUGP,PAR)
^W1REP("H","SHPM","LPT")
S
^W1REP("H","SHPM","MIUN")
1*2*3*2*3*3*0
^W1REP("H","SHPM","SHP","KOD")
P1DPMS
^W1REP("H","SHPM","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("H","SHPM","SIK")
1*1*1*1**
^W1REP("H","SHPM","SIK0")
1*1*0*1*0*0*0
^W1REP("H","SHPM","US",7)
D PAR^P1DPSHLM
^W1REP("H","SHPR")
ogley beq itl mihixt g"ec
^W1REP("H","SHPR",0,"DEP")
dwlgn;5
^W1REP("H","SHPR",0,"DEP","FILE")
^DEP
^W1REP("H","SHPR",0,"DEP","OUT")
DEP1
^W1REP("H","SHPR",0,"DEP1")
xe`z;12H
^W1REP("H","SHPR",0,"DEP1","SH")
1
^W1REP("H","SHPR",0,"MLZR")
xvln;9
^W1REP("H","SHPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("H","SHPR",0,"MLZR","OUT")
MLZR1
^W1REP("H","SHPR",0,"MLZR1")
xvln my;12H
^W1REP("H","SHPR",0,"MLZR1","SH")
0
^W1REP("H","SHPR",0,"PAR")
hixt;8
^W1REP("H","SHPR",0,"PAR","FILE")
^PAR
^W1REP("H","SHPR",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","SHPR",0,"PAR","OUT")
PAR1
^W1REP("H","SHPR",0,"PAR1")
hixt xe`z;20H
^W1REP("H","SHPR",0,"PAR1","SH")
1
^W1REP("H","SHPR",0,"SHULH")
ogley;3
^W1REP("H","SHPR",0,"SHULH","SH")
1
^W1REP("H","SHPR",0,"SUGP")
hixt beq;3
^W1REP("H","SHPR",0,"SUGP","FILE")
^PARSUG
^W1REP("H","SHPR",0,"SUGP","OUT")
SUGP1
^W1REP("H","SHPR",0,"SUGP1")
beq xe`z;10H
^W1REP("H","SHPR",0,"SUGP1","SH")
0
^W1REP("H","SHPR",0,"SUGS")
ogley beq;8
^W1REP("H","SHPR",0,"SUGS","FILE")
^SUGS
^W1REP("H","SHPR",0,"SUGS","OUT")
SUGS1
^W1REP("H","SHPR",0,"SUGS1")
xe`z;12H
^W1REP("H","SHPR",0,"SUGS1","SH")
1
^W1REP("H","SHPR",0,"x1")
zenk;5,0
^W1REP("H","SHPR",0,"x2")
dgpd iptl;10,2
^W1REP("H","SHPR",0,"x3")
hixtl dgpd;10,2
^W1REP("H","SHPR",0,"x4")
OTH dgpd;8,2
^W1REP("H","SHPR",0,"x5")
zegpd ixg`;10,2
^W1REP("H","SHPR",0,"x6")
;,
^W1REP("H","SHPR","COD")
SUGS*SUGS1*SHULH*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4*x5
^W1REP("H","SHPR","CT")
1*2*2*2*0*0*0
^W1REP("H","SHPR","FLD")
SUGS*SHULH*DEP*SUGP*PAR*x1*x2*x3*x4*x5
^W1REP("H","SHPR","FLD0")
*-*-*******
^W1REP("H","SHPR","GLOB1")
^VRM(PRTN)
^W1REP("H","SHPR","GLOB2")
^VRM(PRTN,SUGS,SHULH,DEP,SUGP,PAR)
^W1REP("H","SHPR","LPT")
S
^W1REP("H","SHPR","MIUN")
1*2*2*2*3*0*0
^W1REP("H","SHPR","SHP","KOD")
P1DMZPR
^W1REP("H","SHPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("H","SHPR","SIK")
1*1*1*1*1*
^W1REP("H","SHPR","SIK0")
1*0*1*1*0*0*0
^W1REP("H","SHPR","US",6)
D PAR^P1DPSHL
^W1REP("H","SHVREP")
`"ay ixeciy zniyx
^W1REP("H","SHVREP","GLOB1")
^|$$^%W1UCI(JB)|TMP
^W1REP("H","SUGM")
zerahn ixry dixehqid
^W1REP("H","SUGM",0,"DAT1")
jix`z;8D
^W1REP("H","SUGM",0,"DAT1","SH")
1
^W1REP("H","SUGM",0,"SUGM")
rahn beq;8
^W1REP("H","SUGM",0,"SUGM","FILE")
^P1SUGM
^W1REP("H","SUGM",0,"SUGM","M2")
D SUGM^PLMATBS
^W1REP("H","SUGM",0,"SUGM","OUT")
SUGM1
^W1REP("H","SUGM",0,"SUGM1")
beq xe`z;8H
^W1REP("H","SUGM",0,"SUGM1","SH")
1
^W1REP("H","SUGM",0,"x1")
rahn xry;8,3
^W1REP("H","SUGM",0,"x2")
;,
^W1REP("H","SUGM","COD")
DAT1*SUGM*SUGM1*x1
^W1REP("H","SUGM","CT")
2*0
^W1REP("H","SUGM","FLD")
DAT1*SUGM*x1
^W1REP("H","SUGM","GLOB1")
^P1SUGM("H")
^W1REP("H","SUGM","GLOB2")
^P1SUGM("H",DT,SUGM)
^W1REP("H","SUGM","LPT")
B
^W1REP("H","SUGM","MIUN")
1*2
^W1REP("H","SUGM","SIK")
*
^W1REP("H","SUGM","SIK0")
0*0
^W1REP("H","SUGM","US",2)
S DAT1=$$^%L1DC(DT,1)
^W1REP("H","SUGM","US",3)
D SUGM^PLMATBS
^W1REP("H","SUGP")
zeveaw itl mihixt zniyx
^W1REP("H","SUGP",0,"PAR")
hixt 'qn;8
^W1REP("H","SUGP",0,"PAR","FILE")
^PAR
^W1REP("H","SUGP",0,"PAR","M2")
D PAR1^P1DSUGP
^W1REP("H","SUGP",0,"PAR","OUT")
PAR1
^W1REP("H","SUGP",0,"PAR1")
hixt xe`z;24H
^W1REP("H","SUGP",0,"PAR1","SH")
0
^W1REP("H","SUGP",0,"SUGP")
dveaw;5
^W1REP("H","SUGP",0,"SUGP","FILE")
^PARSUG
^W1REP("H","SUGP",0,"SUGP","OUT")
SUGP1
^W1REP("H","SUGP",0,"SUGP1")
dveaw xe`z;18H
^W1REP("H","SUGP",0,"SUGP1","SH")
0
^W1REP("H","SUGP",0,"x1")
dxikn xign;10,2
^W1REP("H","SUGP",0,"x2")
;,
^W1REP("H","SUGP","COD")
SUGP*SUGP1*PAR*PAR1*x1
^W1REP("H","SUGP","CT")
2*0*
^W1REP("H","SUGP","FLD")
SUGP*PAR*x1
^W1REP("H","SUGP","FLD0")
***
^W1REP("H","SUGP","GLOB1")
^PAR
^W1REP("H","SUGP","GLOB2")
^PAR(PAR)
^W1REP("H","SUGP","LPT")
B
^W1REP("H","SUGP","MIUN")
1*2*3
^W1REP("H","SUGP","SIK")
*
^W1REP("H","SUGP","SIK0")
0*0*
^W1REP("H","SUGP","US",-1)
S x1=$$MH^P1P(PAR)
^W1REP("H","SUGP","US",1)
D PAR^P1DSUGP
^W1REP("H","TIMDLV")
migelyn zwtqd onf ly g"ec
^W1REP("H","TIMDLV",0,"DAT")
jix`z;8D
^W1REP("H","TIMDLV",0,"DAT","SET")
0
^W1REP("H","TIMDLV",0,"DAT","SH")
1
^W1REP("H","TIMDLV",0,"HZ")
dpnfd;7
^W1REP("H","TIMDLV",0,"HZ","SET")
1
^W1REP("H","TIMDLV",0,"HZ","SH")
1
^W1REP("H","TIMDLV",0,"IR")
xir;10H
^W1REP("H","TIMDLV",0,"IR","FILE")
^|$$^%W1UCI(JB)|P1IR
^W1REP("H","TIMDLV",0,"IR","SET")
0
^W1REP("H","TIMDLV",0,"IR","SH")
1
^W1REP("H","TIMDLV",0,"KTV")
zaezk;18H
^W1REP("H","TIMDLV",0,"KTV","SET")
0
^W1REP("H","TIMDLV",0,"KTV","SH")
1
^W1REP("H","TIMDLV",0,"MSL")
gily 'qn;5
^W1REP("H","TIMDLV",0,"MSL","FILE")
^|$$^%W1UCI(JB)|P1SL
^W1REP("H","TIMDLV",0,"MSL","OUT")
MSL1
^W1REP("H","TIMDLV",0,"MSL","SET")
0
^W1REP("H","TIMDLV",0,"MSL1")
gily my;12H
^W1REP("H","TIMDLV",0,"MSL1","SET")
0
^W1REP("H","TIMDLV",0,"MSL1","SH")
0
^W1REP("H","TIMDLV",0,"x1")
zepnfd 'qn;4,0
^W1REP("H","TIMDLV",0,"x2")
dwtqd onf;5,0
^W1REP("H","TIMDLV",0,"x3")
;,
^W1REP("H","TIMDLV","COD")
DAT*MSL*MSL1*IR*HZ*KTV*x1*x2
^W1REP("H","TIMDLV","CT")
0*0*0*0*0
^W1REP("H","TIMDLV","FLD")
DAT*MSL*IR*HZ*KTV*x1*x2
^W1REP("H","TIMDLV","FLD0")
DAT*MSL*IR*HZ*KTV
^W1REP("H","TIMDLV","GLOB1")
^|$$^W3MAIN|TMP(PRTN)
^W1REP("H","TIMDLV","GLOB2")
^|$$^W3MAIN|TMP(PRTN,DT,HZ)
^W1REP("H","TIMDLV","LPT")
B
^W1REP("H","TIMDLV","MAM")
*
^W1REP("H","TIMDLV","MIUN")
2*1*3*4*5
^W1REP("H","TIMDLV","MIUN","PROG")
PREP^W4TIMDLV
^W1REP("H","TIMDLV","QUERY","mixre migily mikix`z itl","CT")
0*0*0*0*0
^W1REP("H","TIMDLV","QUERY","mixre migily mikix`z itl","FLD0")
DAT*MSL*IR*HZ*KTV
^W1REP("H","TIMDLV","QUERY","mixre migily mikix`z itl","MIUN")
1*2*3*4*5
^W1REP("H","TIMDLV","QUERY","mixre migily mikix`z itl","SIK0")
1*1*1*0*0
^W1REP("H","TIMDLV","QUERY","mixre mikix`z migily itl","CT")
0*0*0*0*0
^W1REP("H","TIMDLV","QUERY","mixre mikix`z migily itl","FLD0")
DAT*MSL*IR*HZ*KTV
^W1REP("H","TIMDLV","QUERY","mixre mikix`z migily itl","MIUN")
2*1*3*4*5
^W1REP("H","TIMDLV","QUERY","mixre mikix`z migily itl","SIK0")
1*1*1*0*0
^W1REP("H","TIMDLV","SIK")
1*1*
^W1REP("H","TIMDLV","SIK0")
1*1*1*0*0
^W1REP("H","TIMDLV","SIX")
I $G(SUM(K,1)) S SUM(K,2)=$J(SUM(K,2)/SUM(K,1),2,2)
^W1REP("H","TIMDLV","US",0)
S DAT=$ZD(DT,"DD.MM.YY")
^W1REP("H","TIMDLV","US",2)
S DAT=$ZD(DT,"DD.MM.YY")
^W1REP("H","TIMDLV","US",3)
D HZ^W4TIMDLV
^W1REP("H","TIPM")
mixvlnl mitih g"ec
^W1REP("H","TIPM",0,"MLZ")
xvln;5.
^W1REP("H","TIPM",0,"MLZ","FILE")
^NAME
^W1REP("H","TIPM",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^W1REP("H","TIPM",0,"MLZ","OUT")
MLZ1
^W1REP("H","TIPM",0,"MLZ1")
xvln my;20H
^W1REP("H","TIPM",0,"MLZ1","SH")
1
^W1REP("H","TIPM",0,"TRH")
jix`z;8D
^W1REP("H","TIPM",0,"TRH","SH")
1
^W1REP("H","TIPM",0,"x1")
xky;8,2
^W1REP("H","TIPM",0,"x2")
i`xy`a tih;9,2
^W1REP("H","TIPM",0,"x3")
k"dq;8,2
^W1REP("H","TIPM",0,"x4")
;,
^W1REP("H","TIPM","COD")
MLZ*MLZ1*TRH*x1*x2*x3
^W1REP("H","TIPM","CT")
0*0
^W1REP("H","TIPM","FLD")
MLZ*TRH*x1*x2*x3
^W1REP("H","TIPM","GLOB1")
^|$$^%W1UCI(JB)|P1TIPM
^W1REP("H","TIPM","GLOB2")
^|$$^%W1UCI(JB)|P1TIPM(DT,MLZ)
^W1REP("H","TIPM","LPT")
B
^W1REP("H","TIPM","MIUN")
1*2
^W1REP("H","TIPM","SIK")
1*1*1*
^W1REP("H","TIPM","SIK0")
1*0
^W1REP("H","TIPM","US",-1)
S TRH=$$^%L1DC(TIP,1)
^W1REP("H","TIPM","US",1)
D REPTRH^P1TIPM
^W1REP("H","TIPM","US",2)
D REPMLZ^P1TIPM
^W1REP("H","TMSH")
zery itl migelyn gec
^W1REP("H","TMSH",0,"SHAA")
dry;8
^W1REP("H","TMSH",0,"SHAA","SH")
1
^W1REP("H","TMSH",0,"TRH")
jix`z;8D
^W1REP("H","TMSH",0,"TRH","SH")
1
^W1REP("H","TMSH",0,"x1")
zepnfd zenk;12,0
^W1REP("H","TMSH",0,"x2")
melyzl k"dq;12,2
^W1REP("H","TMSH",0,"x3")
;,
^W1REP("H","TMSH",0,"x4")
;,
^W1REP("H","TMSH","COD")
TRH*SHAA*x1*x2
^W1REP("H","TMSH","CT")
0*0
^W1REP("H","TMSH","FLD")
TRH*SHAA*x1*x2
^W1REP("H","TMSH","FLD0")

^W1REP("H","TMSH","GLOB1")
^P1TMI
^W1REP("H","TMSH","GLOB2")
^P1TMI(DT,TM)
^W1REP("H","TMSH","LPT")
B
^W1REP("H","TMSH","MIUN")
1*2
^W1REP("H","TMSH","QUERY","zery itl fkexn migelyn g""ec","CT")
0*0
^W1REP("H","TMSH","QUERY","zery itl fkexn migelyn g""ec","FLD0")
-***
^W1REP("H","TMSH","QUERY","zery itl fkexn migelyn g""ec","MIUN")
1*1
^W1REP("H","TMSH","QUERY","zery itl fkexn migelyn g""ec","SIK0")
1*0
^W1REP("H","TMSH","QUERY","zerye migix`z itl fkexn migelyn g""ec","CT")
0*0
^W1REP("H","TMSH","QUERY","zerye migix`z itl fkexn migelyn g""ec","FLD0")

^W1REP("H","TMSH","QUERY","zerye migix`z itl fkexn migelyn g""ec","MIUN")
1*2
^W1REP("H","TMSH","QUERY","zerye migix`z itl fkexn migelyn g""ec","SIK0")
1*0
^W1REP("H","TMSH","SIK")
1*1**
^W1REP("H","TMSH","SIK0")
1*0
^W1REP("H","TMSH","US",-1)
D DT^P1DTMSH
^W1REP("H","TMSH","US",1)
D DT^P1DTMSH
^W1REP("H","TMSH","US",2)
D SHAA^P1DTMSH
^W1REP("H","TPDH")
mitih aeyig g"ec
^W1REP("H","TPDH",0,"MISHM")
zxnyn;5
^W1REP("H","TPDH",0,"MISHM","SH")
1
^W1REP("H","TPDH",0,"OV")
xtqn;5.
^W1REP("H","TPDH",0,"OV","FILE")
^NAME
^W1REP("H","TPDH",0,"OV","M2")
S OV1=$$^P1NAME(OV)
^W1REP("H","TPDH",0,"OV","OUT")
OV1
^W1REP("H","TPDH",0,"OV1")
caer my;12H
^W1REP("H","TPDH",0,"OV1","SH")
1
^W1REP("H","TPDH",0,"TRH")
jix`z;8D
^W1REP("H","TPDH",0,"TRH","SH")
1
^W1REP("H","TPDH",0,"x1")
tih;8,2
^W1REP("H","TPDH",0,"x2")
zexy inc;8,2
^W1REP("H","TPDH",0,"x3")
zery;8,2
^W1REP("H","TPDH",0,"x4")
ehp;8,2
^W1REP("H","TPDH",0,"x5")
zxekyn;8,2
^W1REP("H","TPDH",0,"x6")
dnlyd;8,2
^W1REP("H","TPDH",0,"x7")
dtewa cwted;8,2
^W1REP("H","TPDH",0,"x8")
;,
^W1REP("H","TPDH","COD")
OV*OV1*TRH*MISHM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","TPDH","CT")
1*2*0
^W1REP("H","TPDH","FLD")
OV*TRH*MISHM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","TPDH","FLD0")

^W1REP("H","TPDH","GLOB1")
^TEMP($P)
^W1REP("H","TPDH","GLOB2")
^TEMP($P,I)
^W1REP("H","TPDH","LPT")
B
^W1REP("H","TPDH","MIUN")
1*2*3
^W1REP("H","TPDH","MIUN","PROG")
PREP^P1TIPDOH
^W1REP("H","TPDH","QUERY","fkexn g""ec","CT")
2*2*0
^W1REP("H","TPDH","QUERY","fkexn g""ec","FLD0")
*-*-*******
^W1REP("H","TPDH","QUERY","fkexn g""ec","MIUN")
1*2*3
^W1REP("H","TPDH","QUERY","fkexn g""ec","SIK0")
1*0*0
^W1REP("H","TPDH","QUERY","micaer itl mikix`z g""ec","CT")
2*1*0
^W1REP("H","TPDH","QUERY","micaer itl mikix`z g""ec","FLD0")

^W1REP("H","TPDH","QUERY","micaer itl mikix`z g""ec","MIUN")
2*1*3
^W1REP("H","TPDH","QUERY","micaer itl mikix`z g""ec","SIK0")
0*0*0
^W1REP("H","TPDH","QUERY","mikix`z itl micaer g""ec","CT")
1*2*0
^W1REP("H","TPDH","QUERY","mikix`z itl micaer g""ec","FLD0")

^W1REP("H","TPDH","QUERY","mikix`z itl micaer g""ec","MIUN")
1*2*3
^W1REP("H","TPDH","QUERY","mikix`z itl micaer g""ec","SIK0")
1*0*0
^W1REP("H","TPDH","SIK")
1*1*1*1*1*1*1*
^W1REP("H","TPDH","SIK0")
1*0*0
^W1REP("H","TPDH","US",2)
D FRM^P1TIPDOH
^W1REP("H","TRRD")
excey `l oiicry  mihixt zniyx
^W1REP("H","TRRD",0,"MRK")
fkxn 'qn;4
^W1REP("H","TRRD",0,"MRK","FILE")
^PARSEND
^W1REP("H","TRRD",0,"MRK","M2")
D MRK^P1TR
^W1REP("H","TRRD",0,"MRK","OUT")
MRK1
^W1REP("H","TRRD",0,"MRK1")
fkxn my;16H
^W1REP("H","TRRD",0,"MRK1","SH")
1
^W1REP("H","TRRD",0,"PAR")
hixt 'qn;8
^W1REP("H","TRRD",0,"PAR","FILE")
^PAR
^W1REP("H","TRRD",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","TRRD",0,"PAR","OUT")
PAR1
^W1REP("H","TRRD",0,"PAR1")
hixt xe`z;20H
^W1REP("H","TRRD",0,"PAR1","SH")
1
^W1REP("H","TRRD",0,"ZMAN")
dpkd onf;14
^W1REP("H","TRRD",0,"ZMAN","SH")
1
^W1REP("H","TRRD",0,"x1")
xign;8,2
^W1REP("H","TRRD",0,"x2")
;,
^W1REP("H","TRRD","COD")
MRK*MRK1*PAR*PAR1*x1
^W1REP("H","TRRD","CT")
2*0*0
^W1REP("H","TRRD","FLD")
MRK*PAR*x1
^W1REP("H","TRRD","GLOB1")
^PARSEND
^W1REP("H","TRRD","GLOB2")
^PARSEND(MRK,PAR)
^W1REP("H","TRRD","LPT")
B
^W1REP("H","TRRD","MIUN")
1*2*3
^W1REP("H","TRRD","SHP","KOD")
TRRD
^W1REP("H","TRRD","SHP","PROG")
N A S A=$G(^PARSEND) I A S MAS(5)=$$^%L1DC(A,1)_" "_$$T^%L1TIME($P(A,",",2))
^W1REP("H","TRRD","SIK")
*
^W1REP("H","TRRD","SIK0")
0*0*0
^W1REP("H","TRRD","US",1)
D ZMAN^P1TR
^W1REP("H","TRRD","US",2)
D PAR^P1TR
^W1REP("H","TRRL")
excey `l oiicry  zegewl zniyx
^W1REP("H","TRRL",0,"LKH")
gewl 'qn;10
^W1REP("H","TRRL",0,"LKH","FILE")
^LKH
^W1REP("H","TRRL",0,"LKH","OUT")
LKH1
^W1REP("H","TRRL",0,"LKH1")
gewl my;30H
^W1REP("H","TRRL",0,"LKH1","SH")
1
^W1REP("H","TRRL",0,"MRK")
fkxn 'qn;4
^W1REP("H","TRRL",0,"MRK","FILE")
^LKHSEND
^W1REP("H","TRRL",0,"MRK","M2")
D MRK^P1TR
^W1REP("H","TRRL",0,"MRK","OUT")
MRK1
^W1REP("H","TRRL",0,"MRK1")
fkxn my;16H
^W1REP("H","TRRL",0,"MRK1","SH")
1
^W1REP("H","TRRL",0,"PAR")
hixt 'qn;8
^W1REP("H","TRRL",0,"PAR","FILE")
^PAR
^W1REP("H","TRRL",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","TRRL",0,"PAR","OUT")
PAR1
^W1REP("H","TRRL",0,"PAR1")
hixt xe`z;20H
^W1REP("H","TRRL",0,"PAR1","SH")
1
^W1REP("H","TRRL",0,"ZMAN")
dpkd onf;14
^W1REP("H","TRRL",0,"ZMAN","SH")
1
^W1REP("H","TRRL",0,"x1")
xign;8,2
^W1REP("H","TRRL",0,"x2")
;,
^W1REP("H","TRRL","COD")
MRK*MRK1*LKH*LKH1
^W1REP("H","TRRL","CT")
2*0*0
^W1REP("H","TRRL","FLD")
MRK*LKH
^W1REP("H","TRRL","GLOB1")
^LKHSEND
^W1REP("H","TRRL","GLOB2")
^LKHSEND(MRK,LKH)
^W1REP("H","TRRL","LPT")
B
^W1REP("H","TRRL","MIUN")
1*2*3
^W1REP("H","TRRL","SHP","KOD")
TRRL
^W1REP("H","TRRL","SHP","PROG")
N A S A=$G(^LKHSEND) I A S MAS(5)=$$^%L1DC(A,1)_" "_$$T^%L1TIME($P(A,",",2))
^W1REP("H","TRRL","SIK")
*
^W1REP("H","TRRL","SIK0")
0*0*0
^W1REP("H","TRRL","US",-1)
D ZMAN^P1TR
^W1REP("H","TRRL","US",1)
D ZMAN^P1TR
^W1REP("H","TRRM")
excey `l oiicry zerced zniyx
^W1REP("H","TRRM",0,"DAT")
oekcr jix`z;11D
^W1REP("H","TRRM",0,"DAT","SH")
0
^W1REP("H","TRRM",0,"MRK")
fkxn 'qn;4
^W1REP("H","TRRM",0,"MRK","FILE")
^PARSEND
^W1REP("H","TRRM",0,"MRK","M2")
D MRK^P1TR
^W1REP("H","TRRM",0,"MRK","OUT")
MRK1
^W1REP("H","TRRM",0,"MRK1")
fkxn my;16H
^W1REP("H","TRRM",0,"MRK1","SH")
1
^W1REP("H","TRRM",0,"MSG")
drced cew;9
^W1REP("H","TRRM",0,"MSG","FILE")
^SC
^W1REP("H","TRRM",0,"MSG","M2")
D MSG^P1TR
^W1REP("H","TRRM",0,"MSG","OUT")
MSG1
^W1REP("H","TRRM",0,"MSG1")
drced xe`z;22H
^W1REP("H","TRRM",0,"MSG1","SH")
1
^W1REP("H","TRRM",0,"PAR")
hixt 'qn;8
^W1REP("H","TRRM",0,"PAR","FILE")
^PAR
^W1REP("H","TRRM",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","TRRM",0,"PAR","OUT")
PAR1
^W1REP("H","TRRM",0,"PAR1")
hixt xe`z;20H
^W1REP("H","TRRM",0,"PAR1","SH")
1
^W1REP("H","TRRM",0,"ZMAN")
dpkd onf;14
^W1REP("H","TRRM",0,"ZMAN","SH")
1
^W1REP("H","TRRM",0,"x1")
xign;8,2
^W1REP("H","TRRM",0,"x2")
;,
^W1REP("H","TRRM","COD")
MRK*MRK1*MSG*MSG1*DAT
^W1REP("H","TRRM","CT")
2*0*0
^W1REP("H","TRRM","FLD")
MRK*MSG*DAT
^W1REP("H","TRRM","GLOB1")
^MSGSEND
^W1REP("H","TRRM","GLOB2")
^MSGSEND(MRK,MSG)
^W1REP("H","TRRM","LPT")
B
^W1REP("H","TRRM","MIUN")
1*2*3
^W1REP("H","TRRM","SHP","KOD")
TRRD
^W1REP("H","TRRM","SHP","PROG")
N A S A=$G(^PARSEND) I A S MAS(5)=$$^%L1DC(A,1)_" "_$$T^%L1TIME($P(A,",",2))
^W1REP("H","TRRM","SIK")
*
^W1REP("H","TRRM","SIK0")
0*0*0
^W1REP("H","TRRM","US",1)
S MRK1=$G(^MRKZ(MRK))
^W1REP("H","TRRM","US",2)
D MSG^P1TR
^W1REP("H","W3DPAR")
mihixt zxikn g"ec
^W1REP("H","W3DPAR",0,"IR")
xir;12H
^W1REP("H","W3DPAR",0,"IR","FILE")
^|$$^W3MAIN|VRMIR(JB)
^W1REP("H","W3DPAR",0,"IR","SET")
1
^W1REP("H","W3DPAR",0,"IR","SH")
1
^W1REP("H","W3DPAR",0,"IR1")
;0
^W1REP("H","W3DPAR",0,"IR1","SET")
0
^W1REP("H","W3DPAR",0,"IR1","SH")
1
^W1REP("H","W3DPAR",0,"LKH")
gewl 'qn;10
^W1REP("H","W3DPAR",0,"LKH","FILE")
^|$$^W3MAIN|VRMLKH(JB)
^W1REP("H","W3DPAR",0,"LKH","M2")
D LKH1^W3DPAR
^W1REP("H","W3DPAR",0,"LKH","OUT")
LKH1
^W1REP("H","W3DPAR",0,"LKH","SET")
1
^W1REP("H","W3DPAR",0,"LKH1")
gewl my;20H
^W1REP("H","W3DPAR",0,"LKH1","SET")
0
^W1REP("H","W3DPAR",0,"LKH1","SH")
1
^W1REP("H","W3DPAR",0,"ORD")
dpnfd 'qn;9
^W1REP("H","W3DPAR",0,"ORD","SET")
1
^W1REP("H","W3DPAR",0,"ORD","SH")
1
^W1REP("H","W3DPAR",0,"PAR")
hixt 'qn;8
^W1REP("H","W3DPAR",0,"PAR","FILE")
^|$$^W3MAIN|VRMPAR(JB)
^W1REP("H","W3DPAR",0,"PAR","M2")
S PAR1=$G(^|$$^W3MAIN|VRMPAR(JB,PAR))
^W1REP("H","W3DPAR",0,"PAR","OUT")
PAR1
^W1REP("H","W3DPAR",0,"PAR","SET")
1
^W1REP("H","W3DPAR",0,"PAR1")
hixt my;20H
^W1REP("H","W3DPAR",0,"PAR1","SET")
0
^W1REP("H","W3DPAR",0,"PAR1","SH")
1
^W1REP("H","W3DPAR",0,"REST")
dcrqn 'qn;6
^W1REP("H","W3DPAR",0,"REST","M2")
S REST1=$$MSD^W3R(REST)
^W1REP("H","W3DPAR",0,"REST","OUT")
REST1
^W1REP("H","W3DPAR",0,"REST","SET")
1
^W1REP("H","W3DPAR",0,"REST1")
dcrqn my;20H
^W1REP("H","W3DPAR",0,"REST1","SET")
0
^W1REP("H","W3DPAR",0,"REST1","SH")
1
^W1REP("H","W3DPAR",0,"TRH")
jix`z;8D
^W1REP("H","W3DPAR",0,"TRH","SET")
0
^W1REP("H","W3DPAR",0,"TRH","SH")
1
^W1REP("H","W3DPAR",0,"x1")
zenk;7,0
^W1REP("H","W3DPAR",0,"x2")
mekq;8,2
^W1REP("H","W3DPAR",0,"x3")
oexg` xign;6,2
^W1REP("H","W3DPAR",0,"x4")
;,
^W1REP("H","W3DPAR","COD")
TRH*REST*REST1*IR*LKH*LKH1*ORD*PAR*PAR1*x1*x2*x3
^W1REP("H","W3DPAR","CT")
*0****0***
^W1REP("H","W3DPAR","FLD")
TRH*REST*IR*LKH*ORD*PAR*x1*x2*x3
^W1REP("H","W3DPAR","FLD0")
-**-*-*-****
^W1REP("H","W3DPAR","GLOB1")
^|$$^W3MAIN|VRM(PRTN)
^W1REP("H","W3DPAR","GLOB2")
^|$$^W3MAIN|VRM(PRTN,DT,REST,IR,LKH,ORD,PAR)
^W1REP("H","W3DPAR","LPT")
B
^W1REP("H","W3DPAR","MAM")
*1**
^W1REP("H","W3DPAR","MIUN")
*1****2***
^W1REP("H","W3DPAR","QUERY","fkexn iztewz g""ec","CT")
*****0*0**
^W1REP("H","W3DPAR","QUERY","fkexn iztewz g""ec","FLD0")
-*-*-*-*-****
^W1REP("H","W3DPAR","QUERY","fkexn iztewz g""ec","MIUN")
********
^W1REP("H","W3DPAR","QUERY","fkexn iztewz g""ec","SIK0")
*****0*0**
^W1REP("H","W3DPAR","QUERY","fkexn mikix`z itl g""ec","CT")
0*****0*0**
^W1REP("H","W3DPAR","QUERY","fkexn mikix`z itl g""ec","FLD0")
*-*-*-*-****
^W1REP("H","W3DPAR","QUERY","fkexn mikix`z itl g""ec","MIUN")
1*****2***
^W1REP("H","W3DPAR","QUERY","fkexn mikix`z itl g""ec","SIK0")
1*****0*0**
^W1REP("H","W3DPAR","QUERY","iztewz zecrqn itl g""ec","CT")
*0****0***
^W1REP("H","W3DPAR","QUERY","iztewz zecrqn itl g""ec","FLD0")
-**-*-*-****
^W1REP("H","W3DPAR","QUERY","iztewz zecrqn itl g""ec","MIUN")
*1****2***
^W1REP("H","W3DPAR","QUERY","iztewz zecrqn itl g""ec","SIK0")
*1****0*0**
^W1REP("H","W3DPAR","QUERY","mikix`ze zecrqn itl g""ec","CT")
0*0****0*0**
^W1REP("H","W3DPAR","QUERY","mikix`ze zecrqn itl g""ec","FLD0")
**-*-*-****
^W1REP("H","W3DPAR","QUERY","mikix`ze zecrqn itl g""ec","MIUN")
2*1****3***
^W1REP("H","W3DPAR","QUERY","mikix`ze zecrqn itl g""ec","SIK0")
1*1****0*0**
^W1REP("H","W3DPAR","QUERY","zecrqne mikix`z itl g""ec","CT")
0*0****0*0**
^W1REP("H","W3DPAR","QUERY","zecrqne mikix`z itl g""ec","FLD0")
**-*-*-****
^W1REP("H","W3DPAR","QUERY","zecrqne mikix`z itl g""ec","MIUN")
1*2****3***
^W1REP("H","W3DPAR","QUERY","zecrqne mikix`z itl g""ec","SIK0")
1*1****0*0**
^W1REP("H","W3DPAR","QUERY","zegewle mixr zecrqn mikix`z itl hxetn g""ec","CT")
0*0*0*0*0
^W1REP("H","W3DPAR","QUERY","zegewle mixr zecrqn mikix`z itl hxetn g""ec","FLD0")
TRH*REST*IR*LKH*PAR
^W1REP("H","W3DPAR","QUERY","zegewle mixr zecrqn mikix`z itl hxetn g""ec","MIUN")
1*2*3*4*5
^W1REP("H","W3DPAR","QUERY","zegewle mixr zecrqn mikix`z itl hxetn g""ec","SIK0")
1*1*1*1*0
^W1REP("H","W3DPAR","QUERY","zepnfde mikix`z zecrqn itl g""ec","CT")
0*0***0****
^W1REP("H","W3DPAR","QUERY","zepnfde mikix`z zecrqn itl g""ec","FLD0")
**-*-*****
^W1REP("H","W3DPAR","QUERY","zepnfde mikix`z zecrqn itl g""ec","MIUN")
2*1***3****
^W1REP("H","W3DPAR","QUERY","zepnfde mikix`z zecrqn itl g""ec","SIK0")
1*1***0*0***
^W1REP("H","W3DPAR","SIK")
1*1**
^W1REP("H","W3DPAR","SIK0")
*1****0*0**
^W1REP("H","W3DPAR","US",2)
D DAT^W3DPAR
^W1REP("H","W3DPAR","US",3)
D REST^W3DPAR
^W1REP("H","W3DPAR","US",4)
D IR^W3DPAR
^W1REP("H","W3DPAR","US",5)
D LKH^W3DPAR
^W1REP("H","W3DPAR","US",7)
D PAR^W3DPAR
^W1REP("H","W4BIT")
mihixt milehia g"ec
^W1REP("H","W4BIT",0,"HB")
zipeayg;8
^W1REP("H","W4BIT",0,"HZM")
dpnfd;7
^W1REP("H","W4BIT",0,"HZM","SET")
1
^W1REP("H","W4BIT",0,"HZM","SH")
1
^W1REP("H","W4BIT",0,"LKH")
gewl 'qn;10
^W1REP("H","W4BIT",0,"LKH","FILE")
^LKH
^W1REP("H","W4BIT",0,"LKH","OUT")
LKH1
^W1REP("H","W4BIT",0,"LKH1")
gewl my;20H
^W1REP("H","W4BIT",0,"LKHN")
gewl 'qn;11
^W1REP("H","W4BIT",0,"LKHN","FILE")
^LKH
^W1REP("H","W4BIT",0,"LKHN","OUT")
LKHN1
^W1REP("H","W4BIT",0,"LKHN","SET")
1
^W1REP("H","W4BIT",0,"LKHN1")
gewl my;14H
^W1REP("H","W4BIT",0,"LKHN1","SET")
0
^W1REP("H","W4BIT",0,"LKHN1","SH")
1
^W1REP("H","W4BIT",0,"NAME")
gewl my;12H
^W1REP("H","W4BIT",0,"NAME","SH")
1
^W1REP("H","W4BIT",0,"NCAB")
zipeayg;6
^W1REP("H","W4BIT",0,"NCAB","SH")
0
^W1REP("H","W4BIT",0,"NMB")
gewl xtqn;10
^W1REP("H","W4BIT",0,"NMB","FILE")
^LKH
^W1REP("H","W4BIT",0,"NMB","OUT")
NAME
^W1REP("H","W4BIT",0,"PAR")
hixt 'qn;8
^W1REP("H","W4BIT",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4BIT",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("H","W4BIT",0,"PAR","OUT")
PAR1
^W1REP("H","W4BIT",0,"PAR","SET")
1
^W1REP("H","W4BIT",0,"PAR1")
hixt xe`z;16H
^W1REP("H","W4BIT",0,"PAR1","SET")
0
^W1REP("H","W4BIT",0,"PAR1","SH")
1
^W1REP("H","W4BIT",0,"PSL")
gily cew;3
^W1REP("H","W4BIT",0,"PSL","FILE")
^P1SL
^W1REP("H","W4BIT",0,"PSL","OUT")
PSL1
^W1REP("H","W4BIT",0,"PSL1")
gily my;10H
^W1REP("H","W4BIT",0,"PSL1","SH")
1
^W1REP("H","W4BIT",0,"SHAA")
dryl;5
^W1REP("H","W4BIT",0,"SHAA","SET")
1
^W1REP("H","W4BIT",0,"SHAA","SH")
1
^W1REP("H","W4BIT",0,"SL")
gily cew;5
^W1REP("H","W4BIT",0,"SL","FILE")
^P1SL
^W1REP("H","W4BIT",0,"SL","OUT")
SL1
^W1REP("H","W4BIT",0,"SL1")
gily my;12H
^W1REP("H","W4BIT",0,"SUGL")
zegewl zveaw;8
^W1REP("H","W4BIT",0,"SUGL","FILE")
^SUGL
^W1REP("H","W4BIT",0,"SUGL","OUT")
SUGL1
^W1REP("H","W4BIT",0,"SUGL","SET")
1
^W1REP("H","W4BIT",0,"SUGL1")
dveaw my;12H
^W1REP("H","W4BIT",0,"SUGL1","SET")
0
^W1REP("H","W4BIT",0,"SUGL1","SH")
1
^W1REP("H","W4BIT",0,"SUGT")
melyz beq;5
^W1REP("H","W4BIT",0,"SUGT","SH")
1
^W1REP("H","W4BIT",0,"TRH")
jix`z;8D
^W1REP("H","W4BIT",0,"TRH","M2")
S TRH=$$^%L1DC(DT,1)
^W1REP("H","W4BIT",0,"TRH","SET")
0
^W1REP("H","W4BIT",0,"TRH","SH")
1
^W1REP("H","W4BIT",0,"TS")
melyzl;8
^W1REP("H","W4BIT",0,"TSHL")
melyzl;8
^W1REP("H","W4BIT",0,"TSHL","OUT")
TSHL
^W1REP("H","W4BIT",0,"x1")
lhea;4,0
^W1REP("H","W4BIT",0,"x2")
mekqa;8,2
^W1REP("H","W4BIT",0,"x3")
;,
^W1REP("H","W4BIT",0,"x4")
dgpd ixg`;8,2
^W1REP("H","W4BIT",0,"x5")
;,
^W1REP("H","W4BIT","COD")
TRH*SHAA*HZM*PAR*PAR1*x1*x2
^W1REP("H","W4BIT","CT")
0*0*0*0*0*0
^W1REP("H","W4BIT","FLD")
TRH*SHAA*HZM*PAR*x1*x2
^W1REP("H","W4BIT","FLD0")
*-*-***
^W1REP("H","W4BIT","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4BIT","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,DT,SHAA,HZM,PAR)
^W1REP("H","W4BIT","LPT")
B
^W1REP("H","W4BIT","MIUN")
1*3*1*2*0*0
^W1REP("H","W4BIT","MIUN","PROG")
TRH^W4DPBIT
^W1REP("H","W4BIT","QUERY","gahndn e`vi `ly mihixt itl fkexn","CT")
0*0*0*0*0*0
^W1REP("H","W4BIT","QUERY","gahndn e`vi `ly mihixt itl fkexn","FLD0")
*-*-***
^W1REP("H","W4BIT","QUERY","gahndn e`vi `ly mihixt itl fkexn","MIUN")
1*3*1*2*0*0
^W1REP("H","W4BIT","QUERY","gahndn e`vi `ly mihixt itl fkexn","SIK0")
1*0*0*0*0*0
^W1REP("H","W4BIT","QUERY","gahndn e`vi `ly mihixt itl hxetn","CT")
0*0*0*0*0*0
^W1REP("H","W4BIT","QUERY","gahndn e`vi `ly mihixt itl hxetn","FLD0")
*****
^W1REP("H","W4BIT","QUERY","gahndn e`vi `ly mihixt itl hxetn","MIUN")
2*4*3*1*0*0
^W1REP("H","W4BIT","QUERY","gahndn e`vi `ly mihixt itl hxetn","SIK0")
0*0*0*1*0*0
^W1REP("H","W4BIT","QUERY","gahndn e`viy mihixt itl fkexn","CT")
0*0*0*0*0*0
^W1REP("H","W4BIT","QUERY","gahndn e`viy mihixt itl fkexn","FLD0")
*-*-***
^W1REP("H","W4BIT","QUERY","gahndn e`viy mihixt itl fkexn","MIUN")
1*3*1*2*0*0
^W1REP("H","W4BIT","QUERY","gahndn e`viy mihixt itl fkexn","SIK0")
1*0*0*0*0*0
^W1REP("H","W4BIT","QUERY","gahndn e`viy mihixt itl hxetn","CT")
0*0*0*0*0*0
^W1REP("H","W4BIT","QUERY","gahndn e`viy mihixt itl hxetn","FLD0")
*****
^W1REP("H","W4BIT","QUERY","gahndn e`viy mihixt itl hxetn","MIUN")
2*4*3*1*0*0
^W1REP("H","W4BIT","QUERY","gahndn e`viy mihixt itl hxetn","SIK0")
0*0*0*1*0*0
^W1REP("H","W4BIT","QUERY","milehiad lk itl fkexn","CT")
0*0*0*0*0*0
^W1REP("H","W4BIT","QUERY","milehiad lk itl fkexn","FLD0")
*-*-***
^W1REP("H","W4BIT","QUERY","milehiad lk itl fkexn","MIUN")
1*3*1*2*0*0
^W1REP("H","W4BIT","QUERY","milehiad lk itl fkexn","SIK0")
1*0*0*0*0*0
^W1REP("H","W4BIT","QUERY","milehiad lk itl hxetn","CT")
0*0*0*0*0*0
^W1REP("H","W4BIT","QUERY","milehiad lk itl hxetn","FLD0")
*-*-***
^W1REP("H","W4BIT","QUERY","milehiad lk itl hxetn","MIUN")
2*4*3*1*0*0
^W1REP("H","W4BIT","QUERY","milehiad lk itl hxetn","SIK0")
0*0*0*1*0*0
^W1REP("H","W4BIT","SHP","KOD")
P1HZH
^W1REP("H","W4BIT","SHP","PROG")
S MAS(5)="zepnfd itl mihixt g""ec"
^W1REP("H","W4BIT","SIK")
1*1*
^W1REP("H","W4BIT","SIK0")
1*0*0*0*0*0
^W1REP("H","W4BIT","US",2)
S TRH=$$^%L1DC(DT,1)
^W1REP("H","W4BIT","US",5)
D PAR^W4DPBIT
^W1REP("H","W4BIT","US",7)
D PAR^W4PRHZ
^W1REP("H","W4BITS")
zeaiq itl mihixt milehia g"ec
^W1REP("H","W4BITS",0,"EXIT")
d`ivi cew ;8
^W1REP("H","W4BITS",0,"EXIT","FILE")
^|$$^%W1UCI(JB)|W4EX2K
^W1REP("H","W4BITS",0,"EXIT","OUT")
EXIT1
^W1REP("H","W4BITS",0,"EXIT","SET")
0
^W1REP("H","W4BITS",0,"EXIT1")
gahnn d`ivi;8H
^W1REP("H","W4BITS",0,"EXIT1","SET")
0
^W1REP("H","W4BITS",0,"EXIT1","SH")
1
^W1REP("H","W4BITS",0,"HZM")
dpnfd;7
^W1REP("H","W4BITS",0,"HZM","SET")
0
^W1REP("H","W4BITS",0,"HZM","SH")
1
^W1REP("H","W4BITS",0,"MLZR")
xvln;5
^W1REP("H","W4BITS",0,"MLZR","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4BITS",0,"MLZR","M2")
S MLZR1=$$^W4NAME(MLZR)
^W1REP("H","W4BITS",0,"MLZR","OUT")
MLZR1
^W1REP("H","W4BITS",0,"MLZR","SET")
0
^W1REP("H","W4BITS",0,"MLZR1")
xvln my;10H
^W1REP("H","W4BITS",0,"MLZR1","SET")
0
^W1REP("H","W4BITS",0,"MLZR1","SH")
1
^W1REP("H","W4BITS",0,"PAR")
hixt 'qn;8
^W1REP("H","W4BITS",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4BITS",0,"PAR","M2")
I $G(PAR) S PAR1=$$SHEM^W4P(PAR)
^W1REP("H","W4BITS",0,"PAR","OUT")
PAR1
^W1REP("H","W4BITS",0,"PAR","SET")
0
^W1REP("H","W4BITS",0,"PAR1")
hixt xe`z;16H
^W1REP("H","W4BITS",0,"PAR1","SET")
0
^W1REP("H","W4BITS",0,"PAR1","SH")
1
^W1REP("H","W4BITS",0,"SHAA")
dryl;5
^W1REP("H","W4BITS",0,"SHAA","SET")
0
^W1REP("H","W4BITS",0,"SHAA","SH")
1
^W1REP("H","W4BITS",0,"SIBA")
daiq cew;4
^W1REP("H","W4BITS",0,"SIBA","FILE")
^|$$^%W1UCI(JB)|P1SBIT
^W1REP("H","W4BITS",0,"SIBA","SET")
0
^W1REP("H","W4BITS",0,"SIBA","SH")
1
^W1REP("H","W4BITS",0,"SIBA1")
daiq xe`z;24H
^W1REP("H","W4BITS",0,"SIBA1","SET")
0
^W1REP("H","W4BITS",0,"SIBA1","SH")
0
^W1REP("H","W4BITS",0,"TRH")
jix`z;8D
^W1REP("H","W4BITS",0,"TRH","SET")
0
^W1REP("H","W4BITS",0,"TRH","SH")
1
^W1REP("H","W4BITS",0,"WHODEL")
lhia in;7
^W1REP("H","W4BITS",0,"WHODEL","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4BITS",0,"WHODEL","M2")
S WHODEL1=$$^W4NAME(WHODEL)
^W1REP("H","W4BITS",0,"WHODEL","OUT")
WHODEL1
^W1REP("H","W4BITS",0,"WHODEL","SET")
0
^W1REP("H","W4BITS",0,"WHODEL1")
my;12H
^W1REP("H","W4BITS",0,"WHODEL1","SET")
0
^W1REP("H","W4BITS",0,"WHODEL1","SH")
1
^W1REP("H","W4BITS",0,"x1")
lhea;4,0
^W1REP("H","W4BITS",0,"x2")
mekqa;8,2
^W1REP("H","W4BITS",0,"x3")
;,
^W1REP("H","W4BITS","COD")
SIBA*SIBA1*EXIT*EXIT1*WHODEL*WHODEL1*TRH*SHAA*HZM*PAR*PAR1*x1*x2
^W1REP("H","W4BITS","CT")
0*0**0*2***0**
^W1REP("H","W4BITS","FLD")
SIBA*SIBA1*EXIT*WHODEL*TRH*SHAA*HZM*PAR*x1*x2
^W1REP("H","W4BITS","FLD0")
**-***-*-***
^W1REP("H","W4BITS","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4BITS","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,SIBA,SIBA1,EXIT,WHODEL,DT,SHAA,HZM,PAR)
^W1REP("H","W4BITS","LPT")
B
^W1REP("H","W4BITS","MIUN")
2*3**4*1***5**
^W1REP("H","W4BITS","MIUN","PROG")
TRH^W4DPBITS
^W1REP("H","W4BITS","QUERY","fkexn mihixt itl zeaiq","CT")
2*2*0*****0**
^W1REP("H","W4BITS","QUERY","fkexn mihixt itl zeaiq","FLD0")
***-*-*-*-***
^W1REP("H","W4BITS","QUERY","fkexn mihixt itl zeaiq","MIUN")
1*2*3*****4**
^W1REP("H","W4BITS","QUERY","fkexn mihixt itl zeaiq","SIK0")
1*1*0*****0**
^W1REP("H","W4BITS","QUERY","fkexn zeaiq itl mixvln","CT")
2*2*0*1****0**
^W1REP("H","W4BITS","QUERY","fkexn zeaiq itl mixvln","FLD0")
****-*-*-***
^W1REP("H","W4BITS","QUERY","fkexn zeaiq itl mixvln","MIUN")
2*3*4*1****5**
^W1REP("H","W4BITS","QUERY","fkexn zeaiq itl mixvln","SIK0")
1*1*0*1****0**
^W1REP("H","W4BITS","QUERY","hxetn mihixt itl zeaiq","CT")
2*2*0*0*0*0*0*0**
^W1REP("H","W4BITS","QUERY","hxetn mihixt itl zeaiq","FLD0")
*********
^W1REP("H","W4BITS","QUERY","hxetn mihixt itl zeaiq","MIUN")
1*2*7*5*3*6*4*8**
^W1REP("H","W4BITS","QUERY","hxetn mihixt itl zeaiq","SIK0")
1*0*0*0*1*0*0*0**
^W1REP("H","W4BITS","QUERY","hxetn zeaiq itl mixvln","CT")
2*2*0*1*0*0*0*0**
^W1REP("H","W4BITS","QUERY","hxetn zeaiq itl mixvln","FLD0")
*********
^W1REP("H","W4BITS","QUERY","hxetn zeaiq itl mixvln","MIUN")
2*3*8*1*4*6*5*7**
^W1REP("H","W4BITS","QUERY","hxetn zeaiq itl mixvln","SIK0")
1*1*0*1*1*0*0*0**
^W1REP("H","W4BITS","QUERY","mikix`z itl zeaiq","CT")
2*2**0*0***0**
^W1REP("H","W4BITS","QUERY","mikix`z itl zeaiq","FLD0")
**-***-*-***
^W1REP("H","W4BITS","QUERY","mikix`z itl zeaiq","MIUN")
1*2**4*3***5**
^W1REP("H","W4BITS","QUERY","mikix`z itl zeaiq","SIK0")
1*1**0*1***0**
^W1REP("H","W4BITS","QUERY","mixvln itl zeaiq","CT")
2*2**0****0**
^W1REP("H","W4BITS","QUERY","mixvln itl zeaiq","FLD0")
**-**-*-*-***
^W1REP("H","W4BITS","QUERY","mixvln itl zeaiq","MIUN")
1*2**3****4**
^W1REP("H","W4BITS","QUERY","mixvln itl zeaiq","SIK0")
1*1**1****0*0*
^W1REP("H","W4BITS","QUERY","zeaiq itl mikix`z","CT")
0*0**0*2***0**
^W1REP("H","W4BITS","QUERY","zeaiq itl mikix`z","FLD0")
**-***-*-***
^W1REP("H","W4BITS","QUERY","zeaiq itl mikix`z","MIUN")
2*3**4*1***5**
^W1REP("H","W4BITS","QUERY","zeaiq itl mikix`z","SIK0")
1*0**0*1***0**
^W1REP("H","W4BITS","SIK")
1*1*
^W1REP("H","W4BITS","SIK0")
1*0**0*1***0**
^W1REP("H","W4BITS","US",4)
D EX^W4DPBITS
^W1REP("H","W4BITS","US",6)
S TRH=$$^%L1DC(DT,1)
^W1REP("H","W4BITS","US",9)
D PAR^W4DPBITS
^W1REP("H","W4CLKNET")
micaer zery ly izyx g"ec
^W1REP("H","W4CLKNET",0,"DAT")
jix`z;8D
^W1REP("H","W4CLKNET",0,"DAT","SET")
0
^W1REP("H","W4CLKNET",0,"DAT","SH")
1
^W1REP("H","W4CLKNET",0,"MSDR")
;0
^W1REP("H","W4CLKNET",0,"MSDR","SET")
1
^W1REP("H","W4CLKNET",0,"MSDR","SH")
1
^W1REP("H","W4CLKNET",0,"MSDR1")
;0
^W1REP("H","W4CLKNET",0,"MSDR1","SET")
0
^W1REP("H","W4CLKNET",0,"MSDR1","SH")
1
^W1REP("H","W4CLKNET",0,"NP")
ixeciq 'qn;5
^W1REP("H","W4CLKNET",0,"NP","SET")
1
^W1REP("H","W4CLKNET",0,"NP","SH")
1
^W1REP("H","W4CLKNET",0,"NP1")
ixeciq 'qn;4
^W1REP("H","W4CLKNET",0,"NP1","SET")
0
^W1REP("H","W4CLKNET",0,"NP1","SH")
1
^W1REP("H","W4CLKNET",0,"OV")
caer 'qn;5
^W1REP("H","W4CLKNET",0,"OV","OUT")
OV1
^W1REP("H","W4CLKNET",0,"OV","SET")
0
^W1REP("H","W4CLKNET",0,"OV1")
caer my;16H
^W1REP("H","W4CLKNET",0,"OV1","SET")
0
^W1REP("H","W4CLKNET",0,"OV1","SH")
1
^W1REP("H","W4CLKNET",0,"SNIF")
sipq;5
^W1REP("H","W4CLKNET",0,"SNIF","M2")
S SNIF1=$$MSD^W3R(SNIF)
^W1REP("H","W4CLKNET",0,"SNIF","OUT")
SNIF1
^W1REP("H","W4CLKNET",0,"SNIF","SET")
1
^W1REP("H","W4CLKNET",0,"SNIF1")
sipq xe`z;14H
^W1REP("H","W4CLKNET",0,"SNIF1","SET")
0
^W1REP("H","W4CLKNET",0,"SNIF1","SH")
1
^W1REP("H","W4CLKNET",0,"TEL")
oetlh;10
^W1REP("H","W4CLKNET",0,"TEL","SET")
0
^W1REP("H","W4CLKNET",0,"TEL","SH")
1
^W1REP("H","W4CLKNET",0,"x1")
caer 'qn;5,0
^W1REP("H","W4CLKNET",0,"x2")
caer my;14,0
^W1REP("H","W4CLKNET",0,"x3")
oetlh;10,0
^W1REP("H","W4CLKNET",0,"x4")
dqipk jix`z;8,0
^W1REP("H","W4CLKNET",0,"x5")
dqipk onf;5,0
^W1REP("H","W4CLKNET",0,"x6")
d`ivi jix`z;8,0
^W1REP("H","W4CLKNET",0,"x7")
d`ivi onf;5,0
^W1REP("H","W4CLKNET",0,"x8")
;,
^W1REP("H","W4CLKNET","COD")
DAT*SNIF*SNIF1*NP1*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4CLKNET","CT")
0*0*0
^W1REP("H","W4CLKNET","FLD")
DAT*SNIF*NP1*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4CLKNET","FLD0")
DAT*SNIF*NP
^W1REP("H","W4CLKNET","GLOB1")
^|$$^W3MAIN|W4CLKNET(MSDR)
^W1REP("H","W4CLKNET","GLOB2")
^|$$^W3MAIN|W4CLKNET(MSDR,DT,SNIF,OV,NP)
^W1REP("H","W4CLKNET","LPT")
B
^W1REP("H","W4CLKNET","MAM")
*******
^W1REP("H","W4CLKNET","MIUN")
2*1*3
^W1REP("H","W4CLKNET","QUERY","mitipqe mikix`z itl","CT")
0*0*0
^W1REP("H","W4CLKNET","QUERY","mitipqe mikix`z itl","FLD0")
DAT*SNIF*NP
^W1REP("H","W4CLKNET","QUERY","mitipqe mikix`z itl","MIUN")
1*2*3
^W1REP("H","W4CLKNET","QUERY","mitipqe mikix`z itl","SIK0")
0*0*0
^W1REP("H","W4CLKNET","SIK")
*******
^W1REP("H","W4CLKNET","SIK0")
0*0*0
^W1REP("H","W4CLKNET","US",-1)
S SNIF1=$$MSD^W3R(SNIF)
^W1REP("H","W4CLKNET","US",0)
D NP^W4CLKNET
^W1REP("H","W4CLKNET","US",2)
D DT^W4CLKNET
^W1REP("H","W4CLKNET","US",5)
D NP^W4CLKNET
^W1REP("H","W4CLKS")
micaer zery mekiq g"ec
^W1REP("H","W4CLKS",0,"DAT")
jix`z;8D
^W1REP("H","W4CLKS",0,"DAT","SET")
0
^W1REP("H","W4CLKS",0,"DAT","SH")
1
^W1REP("H","W4CLKS",0,"STRING")
caer 'qn;5
^W1REP("H","W4CLKS",0,"STRING","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4CLKS",0,"STRING","M2")
S STRING1=$$^W4NAME(STRING)
^W1REP("H","W4CLKS",0,"STRING","OUT")
STRING1
^W1REP("H","W4CLKS",0,"STRING","SET")
0
^W1REP("H","W4CLKS",0,"STRING1")
caer my;14H
^W1REP("H","W4CLKS",0,"STRING1","SET")
0
^W1REP("H","W4CLKS",0,"STRING1","SH")
1
^W1REP("H","W4CLKS",0,"SUG")
micaer zveaw;5
^W1REP("H","W4CLKS",0,"SUG","FILE")
^|$$^%W1UCI(JB)|LEVKVZ
^W1REP("H","W4CLKS",0,"SUG","OUT")
SUG1
^W1REP("H","W4CLKS",0,"SUG","SET")
0
^W1REP("H","W4CLKS",0,"SUG1")
dveaw my;12H
^W1REP("H","W4CLKS",0,"SUG1","SET")
0
^W1REP("H","W4CLKS",0,"SUG1","SH")
1
^W1REP("H","W4CLKS",0,"x1")
dcear zery;8,2
^W1REP("H","W4CLKS",0,"x10")
qepea;8,2
^W1REP("H","W4CLKS",0,"x11")
[-] dncwn;8,2
^W1REP("H","W4CLKS",0,"x12")
zxekyn;9,2
^W1REP("H","W4CLKS",0,"x13")
;,
^W1REP("H","W4CLKS",0,"x14")
;,
^W1REP("H","W4CLKS",0,"x2")
dcear ini;7,0
^W1REP("H","W4CLKS",0,"x3")
dlgn;5,0
^W1REP("H","W4CLKS",0,"x4")
micli zlgn;5,0
^W1REP("H","W4CLKS",0,"x5")
mielin;5,0
^W1REP("H","W4CLKS",0,"x6")
yteg;5,0
^W1REP("H","W4CLKS",0,"x7")
qepea;8,2
^W1REP("H","W4CLKS",0,"x8")
[-] dncwn;8,2
^W1REP("H","W4CLKS",0,"x9")
zxekyn;9,2
^W1REP("H","W4CLKS","COD")
SUG*SUG1*STRING*STRING1*x1*x2*x3*x4*x5*x6*x7*x8*x9
^W1REP("H","W4CLKS","CT")
2*0
^W1REP("H","W4CLKS","FLD")
SUG*STRING*x1*x2*x3*x4*x5*x6*x7*x8*x9
^W1REP("H","W4CLKS","FLD0")
SUG*STRING
^W1REP("H","W4CLKS","GLOB1")
^|$$^%W1UCI(JB)|TEMP(PRTN)
^W1REP("H","W4CLKS","GLOB2")
^|$$^%W1UCI(JB)|TEMP(PRTN,SH)
^W1REP("H","W4CLKS","LPT")
B
^W1REP("H","W4CLKS","MIUN")
1*2
^W1REP("H","W4CLKS","QUERY","micaer zery mekiq","CT")
2*0
^W1REP("H","W4CLKS","QUERY","micaer zery mekiq","FLD0")
SUG*STRING
^W1REP("H","W4CLKS","QUERY","micaer zery mekiq","MIUN")
1*2
^W1REP("H","W4CLKS","QUERY","micaer zery mekiq","SIK0")
1*0
^W1REP("H","W4CLKS","SIK")
1*1*1*1*1*1*1*1*1*1*1*1**
^W1REP("H","W4CLKS","SIK0")
1*0
^W1REP("H","W4CLKS","US",2)
D SH^W4CLKS
^W1REP("H","W4CLKT")
micaer zery mekiq g"ec
^W1REP("H","W4CLKT",0,"DAT")
jix`z;8D
^W1REP("H","W4CLKT",0,"DAT","SET")
0
^W1REP("H","W4CLKT",0,"DAT","SH")
1
^W1REP("H","W4CLKT",0,"STRING")
caer 'qn;5
^W1REP("H","W4CLKT",0,"STRING","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4CLKT",0,"STRING","M2")
S STRING1=$$^W4NAME(STRING)
^W1REP("H","W4CLKT",0,"STRING","OUT")
STRING1
^W1REP("H","W4CLKT",0,"STRING","SET")
0
^W1REP("H","W4CLKT",0,"STRING1")
caer my;14H
^W1REP("H","W4CLKT",0,"STRING1","SET")
0
^W1REP("H","W4CLKT",0,"STRING1","SH")
1
^W1REP("H","W4CLKT",0,"SUG")
micaer zveaw;5
^W1REP("H","W4CLKT",0,"SUG","FILE")
^|$$^%W1UCI(JB)|LEVKVZ
^W1REP("H","W4CLKT",0,"SUG","OUT")
SUG1
^W1REP("H","W4CLKT",0,"SUG","SET")
0
^W1REP("H","W4CLKT",0,"SUG1")
dveaw my;12H
^W1REP("H","W4CLKT",0,"SUG1","SET")
0
^W1REP("H","W4CLKT",0,"SUG1","SH")
1
^W1REP("H","W4CLKT",0,"x1")
qiqa zery;8,2
^W1REP("H","W4CLKT",0,"x10")
yteg;5,0
^W1REP("H","W4CLKT",0,"x11")
qepea;8,2
^W1REP("H","W4CLKT",0,"x12")
[-] dncwn;8,2
^W1REP("H","W4CLKT",0,"x13")
zxekyn;8,2
^W1REP("H","W4CLKT",0,"x14")
;,
^W1REP("H","W4CLKT",0,"x2")
1 zetqep zery;7,2
^W1REP("H","W4CLKT",0,"x3")
2 zetqep zery;7,2
^W1REP("H","W4CLKT",0,"x4")
zay zery;7,2
^W1REP("H","W4CLKT",0,"x5")
zery k"dq;8,2
^W1REP("H","W4CLKT",0,"x6")
dcear ini;5,0
^W1REP("H","W4CLKT",0,"x7")
dlgn;5,0
^W1REP("H","W4CLKT",0,"x8")
micli zlgn;5,0
^W1REP("H","W4CLKT",0,"x9")
mielin;5,0
^W1REP("H","W4CLKT","COD")
SUG*SUG1*STRING*STRING1*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11*x12*x13
^W1REP("H","W4CLKT","CT")
2*0
^W1REP("H","W4CLKT","FLD")
SUG*STRING*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11*x12*x13
^W1REP("H","W4CLKT","FLD0")
SUG*STRING
^W1REP("H","W4CLKT","GLOB1")
^|$$^%W1UCI(JB)|TEMP(PRTN)
^W1REP("H","W4CLKT","GLOB2")
^|$$^%W1UCI(JB)|TEMP(PRTN,SH)
^W1REP("H","W4CLKT","LPT")
B
^W1REP("H","W4CLKT","MIUN")
1*2
^W1REP("H","W4CLKT","QUERY","micaer zery mekiq","CT")
2*0
^W1REP("H","W4CLKT","QUERY","micaer zery mekiq","FLD0")
SUG*STRING
^W1REP("H","W4CLKT","QUERY","micaer zery mekiq","MIUN")
1*2
^W1REP("H","W4CLKT","QUERY","micaer zery mekiq","SIK0")
1*0
^W1REP("H","W4CLKT","SIK")
1*1*1*1*1*1*1*1*1*1*1*1*1*
^W1REP("H","W4CLKT","SIK0")
1*0
^W1REP("H","W4CLKT","US",2)
D SH^W4CLKT
^W1REP("H","W4CLKT1")
micaer zery mekiq g"ec
^W1REP("H","W4CLKT1",0,"DAT")
jix`z;8D
^W1REP("H","W4CLKT1",0,"DAT","SET")
0
^W1REP("H","W4CLKT1",0,"DAT","SH")
1
^W1REP("H","W4CLKT1",0,"STRING")
caer 'qn;5
^W1REP("H","W4CLKT1",0,"STRING","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4CLKT1",0,"STRING","M2")
S STRING1=$$^W4NAME(STRING)
^W1REP("H","W4CLKT1",0,"STRING","OUT")
STRING1
^W1REP("H","W4CLKT1",0,"STRING","SET")
0
^W1REP("H","W4CLKT1",0,"STRING1")
caer my;14H
^W1REP("H","W4CLKT1",0,"STRING1","SET")
0
^W1REP("H","W4CLKT1",0,"STRING1","SH")
1
^W1REP("H","W4CLKT1",0,"SUG")
micaer zveaw;5
^W1REP("H","W4CLKT1",0,"SUG","FILE")
^|$$^%W1UCI(JB)|LEVKVZ
^W1REP("H","W4CLKT1",0,"SUG","OUT")
SUG1
^W1REP("H","W4CLKT1",0,"SUG","SET")
0
^W1REP("H","W4CLKT1",0,"SUG1")
dveaw my;12H
^W1REP("H","W4CLKT1",0,"SUG1","SET")
0
^W1REP("H","W4CLKT1",0,"SUG1","SH")
1
^W1REP("H","W4CLKT1",0,"x1")
qiqa zery;8,2
^W1REP("H","W4CLKT1",0,"x10")
[-] dncwn;7,2
^W1REP("H","W4CLKT1",0,"x11")
zeriqp;7,2
^W1REP("H","W4CLKT1",0,"x12")
dcnzd;7,2
^W1REP("H","W4CLKT1",0,"x13")
akx;7,2
^W1REP("H","W4CLKT1",0,"x14")
d`xad;7,2
^W1REP("H","W4CLKT1",0,"x15")
cebia;7,2
^W1REP("H","W4CLKT1",0,"x16")
;,
^W1REP("H","W4CLKT1",0,"x2")
125% zery;7,2
^W1REP("H","W4CLKT1",0,"x3")
150% zery;7,2
^W1REP("H","W4CLKT1",0,"x4")
zay zery;7,2
^W1REP("H","W4CLKT1",0,"x5")
zery k"dq;8,2
^W1REP("H","W4CLKT1",0,"x6")
dcear ini;5,0
^W1REP("H","W4CLKT1",0,"x7")
dlgn;5,0
^W1REP("H","W4CLKT1",0,"x8")
yteg;5,0
^W1REP("H","W4CLKT1",0,"x9")
qepea;7,2
^W1REP("H","W4CLKT1","COD")
SUG*SUG1*STRING*STRING1*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11*x12*x13*x14*x15
^W1REP("H","W4CLKT1","CT")
2*0
^W1REP("H","W4CLKT1","FLD")
SUG*STRING*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11*x12*x13*x14*x15
^W1REP("H","W4CLKT1","FLD0")
SUG*STRING
^W1REP("H","W4CLKT1","GLOB1")
^|$$^%W1UCI(JB)|TEMP(PRTN)
^W1REP("H","W4CLKT1","GLOB2")
^|$$^%W1UCI(JB)|TEMP(PRTN,SH)
^W1REP("H","W4CLKT1","LPT")
B
^W1REP("H","W4CLKT1","MAM")
***************
^W1REP("H","W4CLKT1","MIUN")
1*2
^W1REP("H","W4CLKT1","QUERY","micaer zery mekiq","CT")
2*0
^W1REP("H","W4CLKT1","QUERY","micaer zery mekiq","FLD0")
SUG*STRING
^W1REP("H","W4CLKT1","QUERY","micaer zery mekiq","MIUN")
1*2
^W1REP("H","W4CLKT1","QUERY","micaer zery mekiq","SIK0")
1*0
^W1REP("H","W4CLKT1","SIK")
1*1*1*1*1*1*1*1*1*1*1*1*1*1*1*
^W1REP("H","W4CLKT1","SIK0")
1*0
^W1REP("H","W4CLKT1","US",2)
D SH^W4CLKT
^W1REP("H","W4CSPR")
(ze)mi`tew itl mihixt g"ec
^W1REP("H","W4CSPR",0,"MLZR")
(z)i`tew;5.
^W1REP("H","W4CSPR",0,"MLZR","FILE")
^NAME
^W1REP("H","W4CSPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("H","W4CSPR",0,"MLZR","OUT")
MLZR1
^W1REP("H","W4CSPR",0,"MLZR","SET")
1
^W1REP("H","W4CSPR",0,"MLZR1")
(z)i`tew my;12H
^W1REP("H","W4CSPR",0,"MLZR1","SET")
0
^W1REP("H","W4CSPR",0,"MLZR1","SH")
1
^W1REP("H","W4CSPR",0,"PAR")
hixt;8
^W1REP("H","W4CSPR",0,"PAR","FILE")
^PAR
^W1REP("H","W4CSPR",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("H","W4CSPR",0,"PAR","OUT")
PAR1
^W1REP("H","W4CSPR",0,"PAR","SET")
1
^W1REP("H","W4CSPR",0,"PAR1")
hixt xe`z;20H
^W1REP("H","W4CSPR",0,"PAR1","SET")
0
^W1REP("H","W4CSPR",0,"PAR1","SH")
0
^W1REP("H","W4CSPR",0,"SUGP")
hixt beq;3
^W1REP("H","W4CSPR",0,"SUGP","FILE")
^PARSUG
^W1REP("H","W4CSPR",0,"SUGP","OUT")
SUGP1
^W1REP("H","W4CSPR",0,"SUGP","SET")
1
^W1REP("H","W4CSPR",0,"SUGP1")
beq xe`z;10H
^W1REP("H","W4CSPR",0,"SUGP1","SET")
0
^W1REP("H","W4CSPR",0,"SUGP1","SH")
1
^W1REP("H","W4CSPR",0,"x1")
zenk;5,0
^W1REP("H","W4CSPR",0,"x2")
hixtl dgpd;10,2
^W1REP("H","W4CSPR",0,"x3")
ehp mekq;10,2
^W1REP("H","W4CSPR",0,"x4")
;,
^W1REP("H","W4CSPR","COD")
MLZR*MLZR1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3
^W1REP("H","W4CSPR","CT")
1*2*0*0*0*0*0
^W1REP("H","W4CSPR","FLD")
MLZR*SUGP*PAR*x1*x2*x3
^W1REP("H","W4CSPR","FLD0")
******
^W1REP("H","W4CSPR","GLOB1")
^VRM(PRTN)
^W1REP("H","W4CSPR","GLOB2")
^VRM(PRTN,MLZR,SUGP,PAR)
^W1REP("H","W4CSPR","LPT")
S
^W1REP("H","W4CSPR","MIUN")
1*2*3*4*2*0*0
^W1REP("H","W4CSPR","QUERY","mihixt itl ze|mi`tew","CT")
1*2*0*0*0*0*0
^W1REP("H","W4CSPR","QUERY","mihixt itl ze|mi`tew","FLD0")
******
^W1REP("H","W4CSPR","QUERY","mihixt itl ze|mi`tew","MIUN")
1*2*3*4*2*0*0
^W1REP("H","W4CSPR","QUERY","mihixt itl ze|mi`tew","SIK0")
1*0*0*0*0*0*0
^W1REP("H","W4CSPR","QUERY","ze|mi`tew itl mihixt","CT")
0*2*0*0*0*0*0
^W1REP("H","W4CSPR","QUERY","ze|mi`tew itl mihixt","FLD0")
*****
^W1REP("H","W4CSPR","QUERY","ze|mi`tew itl mihixt","MIUN")
3*1*2*4*2*0*0
^W1REP("H","W4CSPR","QUERY","ze|mi`tew itl mihixt","SIK0")
0*1*1*0*0*0*0
^W1REP("H","W4CSPR","SHP","KOD")
P1DMZPR
^W1REP("H","W4CSPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("H","W4CSPR","SIK")
1*1*1*
^W1REP("H","W4CSPR","SIK0")
1*0*0*0*0*0*0
^W1REP("H","W4CSPR","US",4)
D PAR^W4DMZPR
^W1REP("H","W4DCB")
zelaw g"ec
^W1REP("H","W4DCB",0,"CB")
dlaw 'qn;7
^W1REP("H","W4DCB",0,"CB","SET")
1
^W1REP("H","W4DCB",0,"CB","SH")
1
^W1REP("H","W4DCB",0,"DAT")
jix`z;8D
^W1REP("H","W4DCB",0,"DAT","SET")
0
^W1REP("H","W4DCB",0,"DAT","SH")
1
^W1REP("H","W4DCB",0,"LK")
gewl 'qn;11
^W1REP("H","W4DCB",0,"LK","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","W4DCB",0,"LK","M2")
S LK1=$$LK1^W4DCB(LK)
^W1REP("H","W4DCB",0,"LK","OUT")
LK1
^W1REP("H","W4DCB",0,"LK","SET")
0
^W1REP("H","W4DCB",0,"LK1")
gewl my;18H
^W1REP("H","W4DCB",0,"LK1","SET")
0
^W1REP("H","W4DCB",0,"LK1","SH")
1
^W1REP("H","W4DCB",0,"NOM")
dlaw 'qn;7
^W1REP("H","W4DCB",0,"NOM","SET")
0
^W1REP("H","W4DCB",0,"NOM","SH")
1
^W1REP("H","W4DCB",0,"SUGL")
gewl beq;5
^W1REP("H","W4DCB",0,"SUGL","FILE")
^|$$^%W1UCI(JB)|SUGL
^W1REP("H","W4DCB",0,"SUGL","M2")
S SUGL=$$SUGL^W4DCB(LK),SUGL1=$$SUGL1^W4DCB(LK)
^W1REP("H","W4DCB",0,"SUGL","OUT")
SUGL1
^W1REP("H","W4DCB",0,"SUGL","SET")
0
^W1REP("H","W4DCB",0,"SUGL1")
beq xe`z;12H
^W1REP("H","W4DCB",0,"SUGL1","SET")
0
^W1REP("H","W4DCB",0,"SUGL1","SH")
1
^W1REP("H","W4DCB",0,"x1")
k"dq;7,2
^W1REP("H","W4DCB",0,"x2")
onefn;7,2
^W1REP("H","W4DCB",0,"x3")
wiy;7,2
^W1REP("H","W4DCB",0,"x4")
zi`wpa dxard;7,2
^W1REP("H","W4DCB",0,"x5")
`"k;7,2
^W1REP("H","W4DCB",0,"x6")
qn iekip;7,2
^W1REP("H","W4DCB",0,"x7")
melyz xzi;7,2
^W1REP("H","W4DCB",0,"x8")
;,
^W1REP("H","W4DCB","COD")
DAT*CB*SUGL*SUGL1*LK*LK1*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4DCB","FLD")
DAT*CB*SUGL*LK*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4DCB","GLOB1")
^|$$^%W1UCI(JB)|KLIN("CB")
^W1REP("H","W4DCB","GLOB2")
^|$$^%W1UCI(JB)|KLIN("CB",CB)
^W1REP("H","W4DCB","LPT")
B
^W1REP("H","W4DCB","MAM")
*******
^W1REP("H","W4DCB","SIK")
1*1*1*1*1*1*1*
^W1REP("H","W4DCB","US",2)
D CB^W4DCB
^W1REP("H","W4DCB","US",3)
D CB^W4DCB
^W1REP("H","W4DCIB")
qeaiq zegewl ly minelyz g"ec 
^W1REP("H","W4DCIB",0,"CARD")
'qn;0
^W1REP("H","W4DCIB",0,"CARD","SET")
1
^W1REP("H","W4DCIB",0,"CARD","SH")
1
^W1REP("H","W4DCIB",0,"CMP")
dxag 'qn;8
^W1REP("H","W4DCIB",0,"CMP","SET")
1
^W1REP("H","W4DCIB",0,"CMP","SH")
1
^W1REP("H","W4DCIB",0,"HZ")
dpnfd 'qn;9
^W1REP("H","W4DCIB",0,"HZ","SET")
1
^W1REP("H","W4DCIB",0,"HZ","SH")
1
^W1REP("H","W4DCIB",0,"HZLK")
gewl zpnfd;10
^W1REP("H","W4DCIB",0,"HZLK","SET")
1
^W1REP("H","W4DCIB",0,"HZLK","SH")
1
^W1REP("H","W4DCIB",0,"TRH")
melyz jix`z;8D
^W1REP("H","W4DCIB",0,"TRH","SET")
0
^W1REP("H","W4DCIB",0,"TRH","SH")
1
^W1REP("H","W4DCIB",0,"x1")
qihxk 'qn;22,0
^W1REP("H","W4DCIB",0,"x2")
melyz mekq;10,2
^W1REP("H","W4DCIB",0,"x3")
qeaiq zlnr;8,2
^W1REP("H","W4DCIB",0,"x4")
ehp;8,2
^W1REP("H","W4DCIB",0,"x5")
;,
^W1REP("H","W4DCIB","COD")
TRH*HZ*CMP*HZLK*x1*x2*x3*x4
^W1REP("H","W4DCIB","CT")
0*0*0*0
^W1REP("H","W4DCIB","FLD")
TRH*HZ*CMP*HZLK*x1*x2*x3*x4
^W1REP("H","W4DCIB","FLD0")

^W1REP("H","W4DCIB","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4DCIB","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,DT,HZ,CMP,HZLK)
^W1REP("H","W4DCIB","LPT")
B
^W1REP("H","W4DCIB","MIUN")
1*2*3*4
^W1REP("H","W4DCIB","QUERY","fkexn mikix`z itl","CT")
0*0*0*0
^W1REP("H","W4DCIB","QUERY","fkexn mikix`z itl","FLD0")
*-*-*-*-*
^W1REP("H","W4DCIB","QUERY","fkexn mikix`z itl","MIUN")
1*2*3*4
^W1REP("H","W4DCIB","QUERY","fkexn mikix`z itl","SIK0")
0*0*0*0
^W1REP("H","W4DCIB","QUERY","fkexn zexag itl","CT")
0*0*0*0
^W1REP("H","W4DCIB","QUERY","fkexn zexag itl","FLD0")
*-**-*-*
^W1REP("H","W4DCIB","QUERY","fkexn zexag itl","MIUN")
2*3*1*4
^W1REP("H","W4DCIB","QUERY","fkexn zexag itl","SIK0")
0*0*1*0
^W1REP("H","W4DCIB","QUERY","hxetn mikix`z itl","CT")
0*0*0*0
^W1REP("H","W4DCIB","QUERY","hxetn mikix`z itl","FLD0")

^W1REP("H","W4DCIB","QUERY","hxetn mikix`z itl","MIUN")
1*2*3*4
^W1REP("H","W4DCIB","QUERY","hxetn mikix`z itl","SIK0")
1*0*0*0
^W1REP("H","W4DCIB","QUERY","hxetn zexag itl","CT")
0*0*0*0
^W1REP("H","W4DCIB","QUERY","hxetn zexag itl","FLD0")

^W1REP("H","W4DCIB","QUERY","hxetn zexag itl","MIUN")
2*3*1*4
^W1REP("H","W4DCIB","QUERY","hxetn zexag itl","SIK0")
1*0*1*0
^W1REP("H","W4DCIB","SIK")
0*1*1*1*
^W1REP("H","W4DCIB","SIK0")
1*0*0*0
^W1REP("H","W4DCIB","US",2)
S TRH=$$^%L1DC(DT,1)
^W1REP("H","W4DCIB","US",5)
D HZLK^W4DCIB
^W1REP("H","W4DCIBER")
qeaiq ze`iby g"ec 
^W1REP("H","W4DCIBER",0,"CARD")
'qn;0
^W1REP("H","W4DCIBER",0,"CARD","SET")
1
^W1REP("H","W4DCIBER",0,"CARD","SH")
1
^W1REP("H","W4DCIBER",0,"CMP")
dxag 'qn;8
^W1REP("H","W4DCIBER",0,"CMP","SET")
1
^W1REP("H","W4DCIBER",0,"CMP","SH")
1
^W1REP("H","W4DCIBER",0,"HZ")
dpnfd 'qn;9
^W1REP("H","W4DCIBER",0,"HZ","SET")
1
^W1REP("H","W4DCIBER",0,"HZ","SH")
1
^W1REP("H","W4DCIBER",0,"HZLK")
gewl zpnfd;10
^W1REP("H","W4DCIBER",0,"HZLK","SET")
1
^W1REP("H","W4DCIBER",0,"HZLK","SH")
1
^W1REP("H","W4DCIBER",0,"TRH")
jix`z;8D
^W1REP("H","W4DCIBER",0,"TRH","SET")
0
^W1REP("H","W4DCIBER",0,"TRH","SH")
1
^W1REP("H","W4DCIBER",0,"x1")
qihxk 'qn;22,0
^W1REP("H","W4DCIBER",0,"x2")
dxag cew;8,0
^W1REP("H","W4DCIBER",0,"x3")
mekq;8,2
^W1REP("H","W4DCIBER",0,"x4")
d`iby cew;7,0
^W1REP("H","W4DCIBER",0,"x5")
;,
^W1REP("H","W4DCIBER","COD")
TRH*x1*x2*x3*x4
^W1REP("H","W4DCIBER","CT")
0*0*0*0
^W1REP("H","W4DCIBER","FLD")
TRH*x1*x2*x3*x4
^W1REP("H","W4DCIBER","FLD0")

^W1REP("H","W4DCIBER","GLOB1")
^|$$^%W1UCI(JB)|W4CIBER
^W1REP("H","W4DCIBER","GLOB2")
^|$$^%W1UCI(JB)|W4CIBER(DT,NP)
^W1REP("H","W4DCIBER","LPT")
B
^W1REP("H","W4DCIBER","MAM")
****
^W1REP("H","W4DCIBER","MIUN")
1*2*3*4
^W1REP("H","W4DCIBER","QUERY","hxetn mikix`z itl","CT")
0*0*0*0
^W1REP("H","W4DCIBER","QUERY","hxetn mikix`z itl","FLD0")

^W1REP("H","W4DCIBER","QUERY","hxetn mikix`z itl","MIUN")
1*2*3*4
^W1REP("H","W4DCIBER","QUERY","hxetn mikix`z itl","SIK0")
1*0*0*0
^W1REP("H","W4DCIBER","SIK")
0**1**
^W1REP("H","W4DCIBER","SIK0")
1*0*0*0
^W1REP("H","W4DCIBER","US",1)
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("H","W4DCIBER","US",2)
D NP^W4DCIBER
^W1REP("H","W4DCIBER","US",5)
D HZLK^W4DCIB
^W1REP("H","W4DHNA")
illk zeaiq itl zegpd g"ec
^W1REP("H","W4DHNA",0,"HZM")
dpnfd;7
^W1REP("H","W4DHNA",0,"HZM","SET")
0
^W1REP("H","W4DHNA",0,"HZM","SH")
1
^W1REP("H","W4DHNA",0,"NST")
dxey;4
^W1REP("H","W4DHNA",0,"NST","SET")
0
^W1REP("H","W4DHNA",0,"NST","SH")
1
^W1REP("H","W4DHNA",0,"SIBA")
daiq cew;8
^W1REP("H","W4DHNA",0,"SIBA","FILE")
^|$$^%W1UCI(JB)|P1SHNH
^W1REP("H","W4DHNA",0,"SIBA","SET")
0
^W1REP("H","W4DHNA",0,"SIBA","SH")
1
^W1REP("H","W4DHNA",0,"SIBA1")
xe`z;16H
^W1REP("H","W4DHNA",0,"SIBA1","SET")
0
^W1REP("H","W4DHNA",0,"SIBA1","SH")
1
^W1REP("H","W4DHNA",0,"SUGH")
dgpd beq;6
^W1REP("H","W4DHNA",0,"SUGH","FILE")
^|$$^%W1UCI(JB)|W4SUGH
^W1REP("H","W4DHNA",0,"SUGH","OUT")
SUGH1
^W1REP("H","W4DHNA",0,"SUGH","SET")
0
^W1REP("H","W4DHNA",0,"SUGH1")
dgpd xe`z;12H
^W1REP("H","W4DHNA",0,"SUGH1","SET")
0
^W1REP("H","W4DHNA",0,"SUGH1","SH")
1
^W1REP("H","W4DHNA",0,"SUGS")
dgpd beq;6
^W1REP("H","W4DHNA",0,"SUGS","OUT")
SUGS1
^W1REP("H","W4DHNA",0,"SUGS","SET")
0
^W1REP("H","W4DHNA",0,"SUGS1")
xe`z;10H
^W1REP("H","W4DHNA",0,"SUGS1","SET")
0
^W1REP("H","W4DHNA",0,"SUGS1","SH")
1
^W1REP("H","W4DHNA",0,"TRH")
jix`z;8D
^W1REP("H","W4DHNA",0,"TRH","SET")
0
^W1REP("H","W4DHNA",0,"TRH","SH")
1
^W1REP("H","W4DHNA",0,"WHO")
wiprn;7
^W1REP("H","W4DHNA",0,"WHO","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4DHNA",0,"WHO","M2")
S WHO1=$$NAME^W4DPHNH(WHO)
^W1REP("H","W4DHNA",0,"WHO","OUT")
WHO1
^W1REP("H","W4DHNA",0,"WHO","SET")
0
^W1REP("H","W4DHNA",0,"WHO1")
my;12H
^W1REP("H","W4DHNA",0,"WHO1","SET")
0
^W1REP("H","W4DHNA",0,"WHO1","SH")
1
^W1REP("H","W4DHNA",0,"x1")
mihixt lr dgpd;10,2
^W1REP("H","W4DHNA",0,"x2")
dpnfd lr dgpd;10,2
^W1REP("H","W4DHNA",0,"x3")
zegpd k"dq;10,2
^W1REP("H","W4DHNA",0,"x4")
;,
^W1REP("H","W4DHNA","COD")
TRH*HZM*SIBA*SIBA1*x1*x2*x3
^W1REP("H","W4DHNA","CT")
0*0*0*0***
^W1REP("H","W4DHNA","FLD")
TRH*HZM*SIBA*SIBA1*x1*x2*x3
^W1REP("H","W4DHNA","FLD0")
TRH*WHO*HZM*SUGH1*NST*SIBA*SIBA1
^W1REP("H","W4DHNA","GLOB1")
^|$$^%W1UCI(JB)|VRM1(PRTN)
^W1REP("H","W4DHNA","GLOB2")
^|$$^%W1UCI(JB)|VRM1(PRTN,DT,SIBA,SIBA1,HZM)
^W1REP("H","W4DHNA","LPT")
B
^W1REP("H","W4DHNA","MIUN")
1*2*3*4***
^W1REP("H","W4DHNA","MIUN","PROG")
TRH^W4DHNHA
^W1REP("H","W4DHNA","QUERY","fkexn mikix`ze zeaiq itl","CT")
0**0*0***
^W1REP("H","W4DHNA","QUERY","fkexn mikix`ze zeaiq itl","FLD0")
*-*****
^W1REP("H","W4DHNA","QUERY","fkexn mikix`ze zeaiq itl","MIUN")
3**1*2***
^W1REP("H","W4DHNA","QUERY","fkexn mikix`ze zeaiq itl","SIK0")
0**1*1***
^W1REP("H","W4DHNA","QUERY","fkexn zeaiqe mikix`z itl","CT")
0**0*0***
^W1REP("H","W4DHNA","QUERY","fkexn zeaiqe mikix`z itl","FLD0")
*-*****
^W1REP("H","W4DHNA","QUERY","fkexn zeaiqe mikix`z itl","MIUN")
1**2*3***
^W1REP("H","W4DHNA","QUERY","fkexn zeaiqe mikix`z itl","SIK0")
1**1*0***
^W1REP("H","W4DHNA","QUERY","mikix`ze zeaiq itl","CT")
0*0*0*0***
^W1REP("H","W4DHNA","QUERY","mikix`ze zeaiq itl","FLD0")
******
^W1REP("H","W4DHNA","QUERY","mikix`ze zeaiq itl","MIUN")
3*4*1*2***
^W1REP("H","W4DHNA","QUERY","mikix`ze zeaiq itl","SIK0")
0*0*1*1***
^W1REP("H","W4DHNA","QUERY","zeaiqe mikix`z itl","CT")
0*0*0*0***
^W1REP("H","W4DHNA","QUERY","zeaiqe mikix`z itl","FLD0")
******
^W1REP("H","W4DHNA","QUERY","zeaiqe mikix`z itl","MIUN")
1*4*2*3***
^W1REP("H","W4DHNA","QUERY","zeaiqe mikix`z itl","SIK0")
1*0*1*1***
^W1REP("H","W4DHNA","QUERY","zepnfde mikix`z itl","CT")
0*0*0*0***
^W1REP("H","W4DHNA","QUERY","zepnfde mikix`z itl","FLD0")
TRH*WHO*HZM*SUGH1*NST*SIBA*SIBA1
^W1REP("H","W4DHNA","QUERY","zepnfde mikix`z itl","MIUN")
1*2*3*4***
^W1REP("H","W4DHNA","QUERY","zepnfde mikix`z itl","SIK0")
1*0*0*0***
^W1REP("H","W4DHNA","SIK")
1*1*1*
^W1REP("H","W4DHNA","SIK0")
1*0*0*0***
^W1REP("H","W4DHNA","US",2)
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("H","W4DHNA","US",5)
D HZM^W4DHNHA
^W1REP("H","W4DHNA","US",8)
D ST^W4DHNHA
^W1REP("H","W4DHNH")
zegpd g"ec
^W1REP("H","W4DHNH",0,"HZM")
dpnfd;7
^W1REP("H","W4DHNH",0,"HZM","SET")
0
^W1REP("H","W4DHNH",0,"HZM","SH")
1
^W1REP("H","W4DHNH",0,"NST")
dxey;4
^W1REP("H","W4DHNH",0,"NST","SET")
0
^W1REP("H","W4DHNH",0,"NST","SH")
1
^W1REP("H","W4DHNH",0,"SIBA")
daiq cew;8
^W1REP("H","W4DHNH",0,"SIBA","FILE")
^|$$^%W1UCI(JB)|P1SHNH
^W1REP("H","W4DHNH",0,"SIBA","SET")
0
^W1REP("H","W4DHNH",0,"SIBA","SH")
1
^W1REP("H","W4DHNH",0,"SIBA1")
xe`z;16H
^W1REP("H","W4DHNH",0,"SIBA1","SET")
0
^W1REP("H","W4DHNH",0,"SIBA1","SH")
0
^W1REP("H","W4DHNH",0,"SUGH")
dgpd beq;6
^W1REP("H","W4DHNH",0,"SUGH","FILE")
^|$$^%W1UCI(JB)|W4SUGH
^W1REP("H","W4DHNH",0,"SUGH","OUT")
SUGH1
^W1REP("H","W4DHNH",0,"SUGH","SET")
0
^W1REP("H","W4DHNH",0,"SUGH1")
dgpd xe`z;12H
^W1REP("H","W4DHNH",0,"SUGH1","SET")
0
^W1REP("H","W4DHNH",0,"SUGH1","SH")
1
^W1REP("H","W4DHNH",0,"SUGS")
dgpd beq;6
^W1REP("H","W4DHNH",0,"SUGS","OUT")
SUGS1
^W1REP("H","W4DHNH",0,"SUGS","SET")
0
^W1REP("H","W4DHNH",0,"SUGS1")
xe`z;10H
^W1REP("H","W4DHNH",0,"SUGS1","SET")
0
^W1REP("H","W4DHNH",0,"SUGS1","SH")
1
^W1REP("H","W4DHNH",0,"TRH")
jix`z;8D
^W1REP("H","W4DHNH",0,"TRH","SET")
0
^W1REP("H","W4DHNH",0,"TRH","SH")
1
^W1REP("H","W4DHNH",0,"WHO")
wiprn;7
^W1REP("H","W4DHNH",0,"WHO","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4DHNH",0,"WHO","M2")
S WHO1=$$NAME^W4DPHNH(WHO)
^W1REP("H","W4DHNH",0,"WHO","OUT")
WHO1
^W1REP("H","W4DHNH",0,"WHO","SET")
0
^W1REP("H","W4DHNH",0,"WHO1")
my;12H
^W1REP("H","W4DHNH",0,"WHO1","SET")
0
^W1REP("H","W4DHNH",0,"WHO1","SH")
1
^W1REP("H","W4DHNH",0,"x1")
dgpd iptl;7,2
^W1REP("H","W4DHNH",0,"x2")
dgpd %;6,2
^W1REP("H","W4DHNH",0,"x3")
dgpd;7,2
^W1REP("H","W4DHNH",0,"x4")
mihixt zegpd k"dq;7,2
^W1REP("H","W4DHNH",0,"x5")
oeaygl zegpd k"dq;7,2
^W1REP("H","W4DHNH",0,"x6")
;,
^W1REP("H","W4DHNH","COD")
TRH*WHO*WHO1*HZM*SUGH*SUGH1*NST*SIBA*SIBA1*x1*x2*x3*x4*x5
^W1REP("H","W4DHNH","CT")
1*0*0*0*0*2*2
^W1REP("H","W4DHNH","FLD")
TRH*WHO*HZM*SUGH*NST*SIBA*SIBA1*x1*x2*x3*x4*x5
^W1REP("H","W4DHNH","FLD0")
TRH*WHO*HZM*SUGH1*NST*SIBA*SIBA1
^W1REP("H","W4DHNH","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4DHNH","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,DT,WHO,HZM,SUGH,NST,SIBA,SIBA1)
^W1REP("H","W4DHNH","LPT")
B
^W1REP("H","W4DHNH","MAM")
*****
^W1REP("H","W4DHNH","MIUN")
1*4*5*6*7*2*3
^W1REP("H","W4DHNH","MIUN","PROG")
TRH^W4DPHNH
^W1REP("H","W4DHNH","QUERY","miwiprne zeaiq ,mikix`z itl","CT")
1*0*0*0*0*2*2
^W1REP("H","W4DHNH","QUERY","miwiprne zeaiq ,mikix`z itl","FLD0")
TRH*WHO*HZM*SUGH1*NST*SIBA*SIBA1
^W1REP("H","W4DHNH","QUERY","miwiprne zeaiq ,mikix`z itl","MIUN")
1*4*5*6*7*2*3
^W1REP("H","W4DHNH","QUERY","miwiprne zeaiq ,mikix`z itl","SIK0")
1*1*0*0*0*1*0
^W1REP("H","W4DHNH","QUERY","miwiprne zeaiq itl","CT")
0*0*0*0*0*2*2
^W1REP("H","W4DHNH","QUERY","miwiprne zeaiq itl","FLD0")
TRH*WHO*HZM*SUGH1*NST*SIBA*SIBA1
^W1REP("H","W4DHNH","QUERY","miwiprne zeaiq itl","MIUN")
4*3*5*6*7*1*2
^W1REP("H","W4DHNH","QUERY","miwiprne zeaiq itl","SIK0")
0*1*0*0*0*1*0
^W1REP("H","W4DHNH","QUERY","zeaiqe miwiprn ,mikix`z itl","CT")
1*2*0*0*0*0*0
^W1REP("H","W4DHNH","QUERY","zeaiqe miwiprn ,mikix`z itl","FLD0")
TRH*WHO*HZM*SUGH1*NST*SIBA*SIBA1
^W1REP("H","W4DHNH","QUERY","zeaiqe miwiprn ,mikix`z itl","MIUN")
1*2*5*6*7*3*4
^W1REP("H","W4DHNH","QUERY","zeaiqe miwiprn ,mikix`z itl","SIK0")
1*1*0*0*0*1*0
^W1REP("H","W4DHNH","QUERY","zeaiqe miwiprn itl","CT")
0*1*0*0*0*2*2
^W1REP("H","W4DHNH","QUERY","zeaiqe miwiprn itl","FLD0")
TRH*WHO*HZM*SUGH1*NST*SIBA*SIBA1
^W1REP("H","W4DHNH","QUERY","zeaiqe miwiprn itl","MIUN")
4*1*5*6*7*2*3
^W1REP("H","W4DHNH","QUERY","zeaiqe miwiprn itl","SIK0")
0*1*0*0*0*1*0
^W1REP("H","W4DHNH","QUERY","zepnfde mikix`z itl","CT")
2*0*0*0*0*0*0
^W1REP("H","W4DHNH","QUERY","zepnfde mikix`z itl","FLD0")
TRH*WHO*HZM*SUGH1*NST*SIBA*SIBA1
^W1REP("H","W4DHNH","QUERY","zepnfde mikix`z itl","MIUN")
1*3*2*4*5*6*7
^W1REP("H","W4DHNH","QUERY","zepnfde mikix`z itl","SIK0")
1*0*0*0*0*0*0
^W1REP("H","W4DHNH","QUERY","zepnfde mikix`z itl xvewn","CT")
0**0*******
^W1REP("H","W4DHNH","QUERY","zepnfde mikix`z itl xvewn","FLD0")
T*-*H*-*-*-*-***
^W1REP("H","W4DHNH","QUERY","zepnfde mikix`z itl xvewn","MIUN")
1**2*******
^W1REP("H","W4DHNH","QUERY","zepnfde mikix`z itl xvewn","SIK0")
1**0*******
^W1REP("H","W4DHNH","QUERY","zepnfde miwiprn itl","CT")
2*1*0*0*0*0*0
^W1REP("H","W4DHNH","QUERY","zepnfde miwiprn itl","FLD0")
TRH*WHO*HZM*SUGH1*NST*SIBA*SIBA1
^W1REP("H","W4DHNH","QUERY","zepnfde miwiprn itl","MIUN")
2*1*3*4*5*6*7
^W1REP("H","W4DHNH","QUERY","zepnfde miwiprn itl","SIK0")
1*1*0*0*0*0*0
^W1REP("H","W4DHNH","SIK")
1**1*1*1*
^W1REP("H","W4DHNH","SIK0")
1*1*0*0*0*1*0
^W1REP("H","W4DHNH","US",1)
4
^W1REP("H","W4DHNH","US",2)
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("H","W4DHNH","US",3)
S WHO1=$$NAME^W4DPHNH(WHO)
^W1REP("H","W4DHNH","US",5)
D SUGH^W4DPHNH
^W1REP("H","W4DHNH","US",8)
D ST^W4DPHNH
^W1REP("H","W4DHZ")
hxetn migelyn zepnfd g"ec
^W1REP("H","W4DHZMSL")
POWERLINK - l migelyn zepnfd g"ec
^W1REP("H","W4DHZMSL",0,"AZOR")
xef`;4
^W1REP("H","W4DHZMSL",0,"AZOR","FILE")
^|$$^W3MAIN|TMPAZ
^W1REP("H","W4DHZMSL",0,"AZOR","OUT")
AZOR1
^W1REP("H","W4DHZMSL",0,"AZOR","SET")
0
^W1REP("H","W4DHZMSL",0,"AZOR1")
xef` xe`z;12H
^W1REP("H","W4DHZMSL",0,"AZOR1","SET")
0
^W1REP("H","W4DHZMSL",0,"AZOR1","SH")
1
^W1REP("H","W4DHZMSL",0,"BAIT")
zia;5
^W1REP("H","W4DHZMSL",0,"BAIT","SET")
0
^W1REP("H","W4DHZMSL",0,"BAIT","SH")
1
^W1REP("H","W4DHZMSL",0,"DATCB")
lawzd;8D
^W1REP("H","W4DHZMSL",0,"DATCB","SET")
0
^W1REP("H","W4DHZMSL",0,"DATCB","SH")
1
^W1REP("H","W4DHZMSL",0,"EMAIL")
l"`ec;30
^W1REP("H","W4DHZMSL",0,"EMAIL","SET")
0
^W1REP("H","W4DHZMSL",0,"EMAIL","SH")
1
^W1REP("H","W4DHZMSL",0,"HB")
zipeayg;8
^W1REP("H","W4DHZMSL",0,"HZM")
dpnfd;7
^W1REP("H","W4DHZMSL",0,"HZM","SET")
0
^W1REP("H","W4DHZMSL",0,"HZM","SH")
1
^W1REP("H","W4DHZMSL",0,"HZMLAK")
dzknq`;8
^W1REP("H","W4DHZMSL",0,"HZMLAK","SET")
0
^W1REP("H","W4DHZMSL",0,"HZMLAK","SH")
1
^W1REP("H","W4DHZMSL",0,"IR")
xir;12H
^W1REP("H","W4DHZMSL",0,"IR","FILE")
^|$$^%W1UCI(JB)|P1IR
^W1REP("H","W4DHZMSL",0,"IR","SET")
0
^W1REP("H","W4DHZMSL",0,"IR","SH")
1
^W1REP("H","W4DHZMSL",0,"KTV")
zaezk;20H
^W1REP("H","W4DHZMSL",0,"KTV","SET")
0
^W1REP("H","W4DHZMSL",0,"KTV","SH")
1
^W1REP("H","W4DHZMSL",0,"LKH")
gewl 'qn;10
^W1REP("H","W4DHZMSL",0,"LKH","FILE")
^LKH
^W1REP("H","W4DHZMSL",0,"LKH","OUT")
LKH1
^W1REP("H","W4DHZMSL",0,"LKH1")
gewl my;20H
^W1REP("H","W4DHZMSL",0,"MKBL")
lawn 'qn;8
^W1REP("H","W4DHZMSL",0,"MKBL","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4DHZMSL",0,"MKBL","M2")
S MKBL1=$$^W4NAME(MKBL)
^W1REP("H","W4DHZMSL",0,"MKBL","OUT")
MKBL1
^W1REP("H","W4DHZMSL",0,"MKBL","SET")
0
^W1REP("H","W4DHZMSL",0,"MKBL1")
lawnd my;12H
^W1REP("H","W4DHZMSL",0,"MKBL1","SET")
0
^W1REP("H","W4DHZMSL",0,"MKBL1","SH")
1
^W1REP("H","W4DHZMSL",0,"MKR")
xewn;2
^W1REP("H","W4DHZMSL",0,"MKR","FILE")
^|$$^%W1UCI(JB)|W3MKR
^W1REP("H","W4DHZMSL",0,"MKR","OUT")
MKR1
^W1REP("H","W4DHZMSL",0,"MKR","SET")
0
^W1REP("H","W4DHZMSL",0,"MKR1")
xewn xe`z;10H
^W1REP("H","W4DHZMSL",0,"MKR1","SET")
0
^W1REP("H","W4DHZMSL",0,"MKR1","SH")
1
^W1REP("H","W4DHZMSL",0,"NAME")
gewl my;12H
^W1REP("H","W4DHZMSL",0,"NAME","SET")
0
^W1REP("H","W4DHZMSL",0,"NAME","SH")
1
^W1REP("H","W4DHZMSL",0,"NCAB")
zipeayg;6
^W1REP("H","W4DHZMSL",0,"NCAB","SH")
0
^W1REP("H","W4DHZMSL",0,"NMB")
gewl xtqn;12
^W1REP("H","W4DHZMSL",0,"NMB","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","W4DHZMSL",0,"NMB","OUT")
NAME
^W1REP("H","W4DHZMSL",0,"NMB","SET")
0
^W1REP("H","W4DHZMSL",0,"PSL")
gily cew;3
^W1REP("H","W4DHZMSL",0,"PSL","FILE")
^|$$^%W1UCI(JB)|P1SL
^W1REP("H","W4DHZMSL",0,"PSL","OUT")
PSL1
^W1REP("H","W4DHZMSL",0,"PSL","SET")
0
^W1REP("H","W4DHZMSL",0,"PSL1")
gily my;10H
^W1REP("H","W4DHZMSL",0,"PSL1","SET")
0
^W1REP("H","W4DHZMSL",0,"PSL1","SH")
1
^W1REP("H","W4DHZMSL",0,"SHAA")
rex` zry;5
^W1REP("H","W4DHZMSL",0,"SHAA","SET")
0
^W1REP("H","W4DHZMSL",0,"SHAA","SH")
1
^W1REP("H","W4DHZMSL",0,"SHAASHM")
xign zrvd zry;10
^W1REP("H","W4DHZMSL",0,"SHAASHM","SET")
0
^W1REP("H","W4DHZMSL",0,"SHAASHM","SH")
1
^W1REP("H","W4DHZMSL",0,"SL")
gily cew;5
^W1REP("H","W4DHZMSL",0,"SL","FILE")
^P1SL
^W1REP("H","W4DHZMSL",0,"SL","OUT")
SL1
^W1REP("H","W4DHZMSL",0,"SL1")
gily my;12H
^W1REP("H","W4DHZMSL",0,"STAT")
qehhq;5
^W1REP("H","W4DHZMSL",0,"STAT","FILE")
^|$$^%W1UCI(JB)|W4PWRSTA
^W1REP("H","W4DHZMSL",0,"STAT","M2")
S STAT1=$G(@$$^W4GL("W4PWRSTA")@(STAT))
^W1REP("H","W4DHZMSL",0,"STAT","OUT")
STAT1
^W1REP("H","W4DHZMSL",0,"STAT","SET")
0
^W1REP("H","W4DHZMSL",0,"STAT1")
qehhq xe`z;10H
^W1REP("H","W4DHZMSL",0,"STAT1","SET")
0
^W1REP("H","W4DHZMSL",0,"STAT1","SH")
1
^W1REP("H","W4DHZMSL",0,"SUGT")
melyz cew;4
^W1REP("H","W4DHZMSL",0,"SUGT","FILE")
^|$$^%W1UCI(JB)|W3SUGTS
^W1REP("H","W4DHZMSL",0,"SUGT","M2")
S SUGT1=$$SUGT1^W4HZHC(SUGT)
^W1REP("H","W4DHZMSL",0,"SUGT","OUT")
SUGT1
^W1REP("H","W4DHZMSL",0,"SUGT","SET")
0
^W1REP("H","W4DHZMSL",0,"SUGT1")
melyz beq;8H
^W1REP("H","W4DHZMSL",0,"SUGT1","SET")
0
^W1REP("H","W4DHZMSL",0,"SUGT1","SH")
1
^W1REP("H","W4DHZMSL",0,"TIMHM")
xign zrvd xeciy;8D
^W1REP("H","W4DHZMSL",0,"TIMHM","SET")
0
^W1REP("H","W4DHZMSL",0,"TIMHM","SH")
1
^W1REP("H","W4DHZMSL",0,"TRH")
rex` jix`z ;8D
^W1REP("H","W4DHZMSL",0,"TRH","SET")
0
^W1REP("H","W4DHZMSL",0,"TRH","SH")
1
^W1REP("H","W4DHZMSL",0,"TRHIS")
xeyi` jix`z;8D
^W1REP("H","W4DHZMSL",0,"TRHIS","SET")
0
^W1REP("H","W4DHZMSL",0,"TRHIS","SH")
1
^W1REP("H","W4DHZMSL",0,"TRHSHM")
xign zrvd jix`z;8D
^W1REP("H","W4DHZMSL",0,"TRHSHM","SET")
0
^W1REP("H","W4DHZMSL",0,"TRHSHM","SH")
1
^W1REP("H","W4DHZMSL",0,"TS")
melyzl;8
^W1REP("H","W4DHZMSL",0,"TSHL")
melyzl;8
^W1REP("H","W4DHZMSL",0,"TSHL","OUT")
TSHL
^W1REP("H","W4DHZMSL",0,"x1")
aegx;14,
^W1REP("H","W4DHZMSL",0,"x2")
zia;4,
^W1REP("H","W4DHZMSL",0,"x3")
l`ec;30,
^W1REP("H","W4DHZMSL",0,"x4")
mekq;8,2
^W1REP("H","W4DHZMSL",0,"x5")
;,
^W1REP("H","W4DHZMSL","COD")
DATCB*TRH*STAT*STAT1*MKBL*MKBL1*NMB*NAME*HZM*SHAA*TRHIS*TRHSHM*SHAASHM*IR*x1*x2*x3*x4
^W1REP("H","W4DHZMSL","CT")
0*0*0*0*0*0*0*0*0*0*0*****
^W1REP("H","W4DHZMSL","FLD")
DATCB*TRH*STAT*MKBL*NMB*HZM*SHAA*TRHIS*TRHSHM*SHAASHM*IR*x1*x2*x3*x4
^W1REP("H","W4DHZMSL","FLD0")
***************
^W1REP("H","W4DHZMSL","GLOB1")
^|$$^%W1UCI(JB)|W4LINKD
^W1REP("H","W4DHZMSL","GLOB2")
^|$$^%W1UCI(JB)|W4LINKD(DATH,HZM)
^W1REP("H","W4DHZMSL","LPT")
B
^W1REP("H","W4DHZMSL","MAM")
***1*
^W1REP("H","W4DHZMSL","MIUN")
1*2*3*4*5*6*7*8*9*10*11*****
^W1REP("H","W4DHZMSL","QUERY","dpnfd ilawn itl oein","CT")
0*0*0*0*0*0*0*0*0*0*0*****
^W1REP("H","W4DHZMSL","QUERY","dpnfd ilawn itl oein","FLD0")
***************
^W1REP("H","W4DHZMSL","QUERY","dpnfd ilawn itl oein","MIUN")
2*3*4*1*5*6*7*8*9*10*11*****
^W1REP("H","W4DHZMSL","QUERY","dpnfd ilawn itl oein","SIK0")
0*0*0*0*0*0*0*0*0*0*0*****
^W1REP("H","W4DHZMSL","QUERY","zepnfde mikix`z itl oein","CT")
0*0*0*0*0*0*0*0*0*0*0*****
^W1REP("H","W4DHZMSL","QUERY","zepnfde mikix`z itl oein","FLD0")
***************
^W1REP("H","W4DHZMSL","QUERY","zepnfde mikix`z itl oein","MIUN")
1*2*3*4*5*6*7*8*9*10*11*****
^W1REP("H","W4DHZMSL","QUERY","zepnfde mikix`z itl oein","SIK0")
0*0*0*0*0*0*0*0*0*0*0*****
^W1REP("H","W4DHZMSL","SIK")
***1*
^W1REP("H","W4DHZMSL","SIK0")
0*0*0*0*0*0*0*0*0*0*0*****
^W1REP("H","W4DHZMSL","US",-1)
D TRH^W4HZHC
^W1REP("H","W4DHZMSL","US",0)
D HZM^P1HZHC
^W1REP("H","W4DHZMSL","US",1)
D TRH^W4DHZMSL
^W1REP("H","W4DHZMSL","US",2)
D HZM^W4DHZMSL
^W1REP("H","W4DKC")
"y`w yw" -a minelyz g"ec
^W1REP("H","W4DKC",0,"CARD")
'qn;0
^W1REP("H","W4DKC",0,"CARD","SET")
1
^W1REP("H","W4DKC",0,"CARD","SH")
1
^W1REP("H","W4DKC",0,"CMP")
dxag 'qn;8
^W1REP("H","W4DKC",0,"CMP","SET")
1
^W1REP("H","W4DKC",0,"CMP","SH")
1
^W1REP("H","W4DKC",0,"HZ")
dpnfd 'qn;9
^W1REP("H","W4DKC",0,"HZ","SET")
1
^W1REP("H","W4DKC",0,"HZ","SH")
1
^W1REP("H","W4DKC",0,"HZLK")
gewl zpnfd;10
^W1REP("H","W4DKC",0,"HZLK","SET")
1
^W1REP("H","W4DKC",0,"HZLK","SH")
1
^W1REP("H","W4DKC",0,"SH")
melyz 'qn;2
^W1REP("H","W4DKC",0,"SH","SET")
0
^W1REP("H","W4DKC",0,"SH","SH")
1
^W1REP("H","W4DKC",0,"TRH")
melyz jix`z;8D
^W1REP("H","W4DKC",0,"TRH","SET")
0
^W1REP("H","W4DKC",0,"TRH","SH")
1
^W1REP("H","W4DKC",0,"x1")
melyz onf;14,0
^W1REP("H","W4DKC",0,"x2")
melyz mekq;10,2
^W1REP("H","W4DKC",0,"x3")
;,
^W1REP("H","W4DKC",0,"x4")
ehp;8,2
^W1REP("H","W4DKC",0,"x5")
;,
^W1REP("H","W4DKC","COD")
TRH*HZ*SH*x1*x2
^W1REP("H","W4DKC","CT")
0***0*
^W1REP("H","W4DKC","FLD")
TRH*HZ*SH*x1*x2
^W1REP("H","W4DKC","FLD0")
*-*-**
^W1REP("H","W4DKC","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4DKC","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,DT,HZ,SH)
^W1REP("H","W4DKC","LPT")
B
^W1REP("H","W4DKC","MAM")
*1*
^W1REP("H","W4DKC","MIUN")
1***2*
^W1REP("H","W4DKC","QUERY","fkexn mikix`z itl","CT")
0***0*
^W1REP("H","W4DKC","QUERY","fkexn mikix`z itl","FLD0")
*-*-**
^W1REP("H","W4DKC","QUERY","fkexn mikix`z itl","MIUN")
1***2*
^W1REP("H","W4DKC","QUERY","fkexn mikix`z itl","SIK0")
1***0*
^W1REP("H","W4DKC","QUERY","hxetn mikix`z itl","CT")
0*0
^W1REP("H","W4DKC","QUERY","hxetn mikix`z itl","FLD0")
TRH*HZ
^W1REP("H","W4DKC","QUERY","hxetn mikix`z itl","MIUN")
1*2
^W1REP("H","W4DKC","QUERY","hxetn mikix`z itl","SIK0")
1*0
^W1REP("H","W4DKC","SIK")
0*1**1*
^W1REP("H","W4DKC","SIK0")
1***0*
^W1REP("H","W4DKC","US",2)
S TRH=$$^%L1DC(DT,1)
^W1REP("H","W4DKC","US",4)
D HZ^W4DKC
^W1REP("H","W4DKC","US",5)
D HZLK^W4DCIB
^W1REP("H","W4DLVP")
migelyn zepnfd itl mihixt g"ec
^W1REP("H","W4DLVP",0,"MKBL")
lawn;5.
^W1REP("H","W4DLVP",0,"MKBL","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4DLVP",0,"MKBL","M2")
S MKBL1=$$^W4NAME(MKBL)
^W1REP("H","W4DLVP",0,"MKBL","OUT")
MKBL1
^W1REP("H","W4DLVP",0,"MKBL","SET")
1
^W1REP("H","W4DLVP",0,"MKBL1")
lawnd my;12H
^W1REP("H","W4DLVP",0,"MKBL1","SET")
0
^W1REP("H","W4DLVP",0,"MKBL1","SH")
1
^W1REP("H","W4DLVP",0,"MKR")
xewn;5
^W1REP("H","W4DLVP",0,"MKR","FILE")
^|$$^%W1UCI(JB)|W3MKR
^W1REP("H","W4DLVP",0,"MKR","OUT")
MKR1
^W1REP("H","W4DLVP",0,"MKR","SET")
0
^W1REP("H","W4DLVP",0,"MKR1")
xewn xe`z;12H
^W1REP("H","W4DLVP",0,"MKR1","SET")
0
^W1REP("H","W4DLVP",0,"MKR1","SH")
1
^W1REP("H","W4DLVP",0,"MLZR")
xvln;5.
^W1REP("H","W4DLVP",0,"MLZR","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4DLVP",0,"MLZR","M2")
S MLZR1=$$^W4NAME(MLZR)
^W1REP("H","W4DLVP",0,"MLZR","OUT")
MLZR1
^W1REP("H","W4DLVP",0,"MLZR","SET")
1
^W1REP("H","W4DLVP",0,"MLZR1")
xvln my;12H
^W1REP("H","W4DLVP",0,"MLZR1","SET")
0
^W1REP("H","W4DLVP",0,"MLZR1","SH")
1
^W1REP("H","W4DLVP",0,"PAR")
hixt;8
^W1REP("H","W4DLVP",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4DLVP",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("H","W4DLVP",0,"PAR","OUT")
PAR1
^W1REP("H","W4DLVP",0,"PAR","SET")
1
^W1REP("H","W4DLVP",0,"PAR1")
hixt xe`z;20H
^W1REP("H","W4DLVP",0,"PAR1","SET")
0
^W1REP("H","W4DLVP",0,"PAR1","SH")
0
^W1REP("H","W4DLVP",0,"SUGP")
hixt beq;3
^W1REP("H","W4DLVP",0,"SUGP","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","W4DLVP",0,"SUGP","OUT")
SUGP1
^W1REP("H","W4DLVP",0,"SUGP","SET")
1
^W1REP("H","W4DLVP",0,"SUGP1")
beq xe`z;10H
^W1REP("H","W4DLVP",0,"SUGP1","SET")
0
^W1REP("H","W4DLVP",0,"SUGP1","SH")
1
^W1REP("H","W4DLVP",0,"x1")
zenk;5,0
^W1REP("H","W4DLVP",0,"x2")
hixtl dgpd;10,2
^W1REP("H","W4DLVP",0,"x3")
ehp mekq;10,2
^W1REP("H","W4DLVP",0,"x4")
;,
^W1REP("H","W4DLVP","COD")
MKBL*MKBL1*SUGP*SUGP1*MKR*MKR1*PAR*PAR1*x1*x2*x3
^W1REP("H","W4DLVP","CT")
*2*2*0***
^W1REP("H","W4DLVP","FLD")
MKBL*SUGP*MKR*PAR*x1*x2*x3
^W1REP("H","W4DLVP","FLD0")
-******
^W1REP("H","W4DLVP","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4DLVP","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,MKR,MKBL,SUGP,PAR)
^W1REP("H","W4DLVP","LPT")
B
^W1REP("H","W4DLVP","MIUN")
*2*1*3***
^W1REP("H","W4DLVP","QUERY","( mihixt ibeq itl dwelg `ll ) miptlh itl mihixt","CT")
1***0*0**
^W1REP("H","W4DLVP","QUERY","( mihixt ibeq itl dwelg `ll ) miptlh itl mihixt","FLD0")
*-*-****
^W1REP("H","W4DLVP","QUERY","( mihixt ibeq itl dwelg `ll ) miptlh itl mihixt","MIUN")
1***2***
^W1REP("H","W4DLVP","QUERY","( mihixt ibeq itl dwelg `ll ) miptlh itl mihixt","SIK0")
1***0*0**
^W1REP("H","W4DLVP","QUERY","( mihixt ibeq itl dwelg mr ) illk","CT")
*2**0*0**
^W1REP("H","W4DLVP","QUERY","( mihixt ibeq itl dwelg mr ) illk","FLD0")
-**-****
^W1REP("H","W4DLVP","QUERY","( mihixt ibeq itl dwelg mr ) illk","MIUN")
*1**2***
^W1REP("H","W4DLVP","QUERY","( mihixt ibeq itl dwelg mr ) illk","SIK0")
*1**0*0**
^W1REP("H","W4DLVP","QUERY","( mihixt ibeq itl dwelg mr) miptlh itl mihixt","CT")
1*2**0*0**
^W1REP("H","W4DLVP","QUERY","( mihixt ibeq itl dwelg mr) miptlh itl mihixt","FLD0")
**-****
^W1REP("H","W4DLVP","QUERY","( mihixt ibeq itl dwelg mr) miptlh itl mihixt","MIUN")
1*2**3***
^W1REP("H","W4DLVP","QUERY","( mihixt ibeq itl dwelg mr) miptlh itl mihixt","SIK0")
1*1**0*0**
^W1REP("H","W4DLVP","QUERY","(dpnfd xewne mihixt ibeq itl dwelg `ll ) illk","CT")
***0***
^W1REP("H","W4DLVP","QUERY","(dpnfd xewne mihixt ibeq itl dwelg `ll ) illk","FLD0")
-*-*-****
^W1REP("H","W4DLVP","QUERY","(dpnfd xewne mihixt ibeq itl dwelg `ll ) illk","MIUN")
******
^W1REP("H","W4DLVP","QUERY","(dpnfd xewne mihixt ibeq itl dwelg `ll ) illk","SIK0")
***0***
^W1REP("H","W4DLVP","QUERY","(hixt beqe dpnfd xewn itl dwelg mr ) illk","CT")
*2*1*0***
^W1REP("H","W4DLVP","QUERY","(hixt beqe dpnfd xewn itl dwelg mr ) illk","FLD0")
-******
^W1REP("H","W4DLVP","QUERY","(hixt beqe dpnfd xewn itl dwelg mr ) illk","MIUN")
*2*1*3***
^W1REP("H","W4DLVP","QUERY","(hixt beqe dpnfd xewn itl dwelg mr ) illk","SIK0")
*1*1*0***
^W1REP("H","W4DLVP","SHP","KOD")
P1DMZPR
^W1REP("H","W4DLVP","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("H","W4DLVP","SIK")
1*1*1*
^W1REP("H","W4DLVP","SIK0")
*1*1*0***
^W1REP("H","W4DLVP","US",5)
D PAR^W4DLVP
^W1REP("H","W4DMC")
w'v iin zegewl ly minelyz g"ec 
^W1REP("H","W4DMC",0,"CARD")
'qn;0
^W1REP("H","W4DMC",0,"CARD","SET")
1
^W1REP("H","W4DMC",0,"CARD","SH")
1
^W1REP("H","W4DMC",0,"CARDTYP1")
beq xe`z;10H
^W1REP("H","W4DMC",0,"CARDTYP1","SET")
0
^W1REP("H","W4DMC",0,"CARDTYP1","SH")
1
^W1REP("H","W4DMC",0,"CARDTYPE")
qihxk beq;9
^W1REP("H","W4DMC",0,"CARDTYPE","SET")
0
^W1REP("H","W4DMC",0,"CARDTYPE","SH")
1
^W1REP("H","W4DMC",0,"CLN")
gewl cew;8
^W1REP("H","W4DMC",0,"CLN","SET")
0
^W1REP("H","W4DMC",0,"CLN","SH")
1
^W1REP("H","W4DMC",0,"CMP")
dxag 'qn;8
^W1REP("H","W4DMC",0,"CMP","SET")
1
^W1REP("H","W4DMC",0,"CMP","SH")
1
^W1REP("H","W4DMC",0,"HZ")
dpnfd 'qn;9
^W1REP("H","W4DMC",0,"HZ","SET")
1
^W1REP("H","W4DMC",0,"HZ","SH")
1
^W1REP("H","W4DMC",0,"HZLK")
gewl zpnfd;10
^W1REP("H","W4DMC",0,"HZLK","SET")
1
^W1REP("H","W4DMC",0,"HZLK","SH")
1
^W1REP("H","W4DMC",0,"TRH")
jix`z;8D
^W1REP("H","W4DMC",0,"TRH","SET")
0
^W1REP("H","W4DMC",0,"TRH","SH")
1
^W1REP("H","W4DMC",0,"x1")
gewl my;12,0
^W1REP("H","W4DMC",0,"x2")
`zknq`;7,0
^W1REP("H","W4DMC",0,"x3")
dgpd beq;8,0
^W1REP("H","W4DMC",0,"x4")
dgpd mekq;8,2
^W1REP("H","W4DMC",0,"x5")
melyz mekq;8,2
^W1REP("H","W4DMC",0,"x6")
tih ekeza;8,2
^W1REP("H","W4DMC",0,"x7")
;,
^W1REP("H","W4DMC","COD")
TRH*HZ*CARDTYPE*CARDTYP1*CLN*x1*x2*x3*x4*x5*x6
^W1REP("H","W4DMC","CT")
0*0*0*0*0
^W1REP("H","W4DMC","FLD")
TRH*HZ*CARDTYPE*CARDTYP1*CLN*x1*x2*x3*x4*x5*x6
^W1REP("H","W4DMC","FLD0")
TRH*HZ*CARDTYPE*CARDTYP1*CLN
^W1REP("H","W4DMC","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4DMC","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,DT,HZ,NOM)
^W1REP("H","W4DMC","LPT")
B
^W1REP("H","W4DMC","MIUN")
1*2*3*4*5
^W1REP("H","W4DMC","QUERY","fkexn mikix`z itl","CT")
0**********
^W1REP("H","W4DMC","QUERY","fkexn mikix`z itl","FLD0")
*-*-*-*-*-*-****
^W1REP("H","W4DMC","QUERY","fkexn mikix`z itl","MIUN")
1**********
^W1REP("H","W4DMC","QUERY","fkexn mikix`z itl","SIK0")
0**********
^W1REP("H","W4DMC","QUERY","hxetn mikix`z itl","CT")
0*0*0*0*0
^W1REP("H","W4DMC","QUERY","hxetn mikix`z itl","FLD0")
TRH*HZ*CARDTYPE*CARDTYP1*CLN
^W1REP("H","W4DMC","QUERY","hxetn mikix`z itl","MIUN")
1*2*3*4*5
^W1REP("H","W4DMC","QUERY","hxetn mikix`z itl","SIK0")
1*0*0*0*0
^W1REP("H","W4DMC","SIK")
0*0*0*1*1*1*
^W1REP("H","W4DMC","SIK0")
1*0*0*0*0
^W1REP("H","W4DMC","US",2)
S TRH=$$^%L1DC(DT,1)
^W1REP("H","W4DMC","US",4)
D ST^WMCREP
^W1REP("H","W4DMC","US",5)
D HZLK^W4DCIB
^W1REP("H","W4DMSD")
melyz ibeq itl zecrqn g"ec
^W1REP("H","W4DMSD",0,"ATAR")
xz` 'qn;2
^W1REP("H","W4DMSD",0,"ATAR","FILE")
^|$$^%W1UCI(JB)|W4ATAR
^W1REP("H","W4DMSD",0,"ATAR","OUT")
ATAR1
^W1REP("H","W4DMSD",0,"ATAR","SET")
0
^W1REP("H","W4DMSD",0,"ATAR1")
xz` my;12H
^W1REP("H","W4DMSD",0,"ATAR1","SET")
0
^W1REP("H","W4DMSD",0,"ATAR1","SH")
1
^W1REP("H","W4DMSD",0,"EMDA")
dcnr;4
^W1REP("H","W4DMSD",0,"EMDA","SET")
0
^W1REP("H","W4DMSD",0,"EMDA","SH")
1
^W1REP("H","W4DMSD",0,"HZM")
dpnfd;8
^W1REP("H","W4DMSD",0,"HZM","SET")
1
^W1REP("H","W4DMSD",0,"HZM","SH")
1
^W1REP("H","W4DMSD",0,"MLZ")
lawn 'qn;5
^W1REP("H","W4DMSD",0,"MLZ","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4DMSD",0,"MLZ","M2")
S MLZ1=$$^W4NAME(MLZ)
^W1REP("H","W4DMSD",0,"MLZ","OUT")
MLZ1
^W1REP("H","W4DMSD",0,"MLZ","SET")
0
^W1REP("H","W4DMSD",0,"MLZ1")
lawn my;12H
^W1REP("H","W4DMSD",0,"MLZ1","SET")
0
^W1REP("H","W4DMSD",0,"MLZ1","SH")
1
^W1REP("H","W4DMSD",0,"MSD")
dcrqn cew;7
^W1REP("H","W4DMSD",0,"MSD","FILE")
^|$$^%W1UCI(JB)|W3MSD
^W1REP("H","W4DMSD",0,"MSD","OUT")
MSD1
^W1REP("H","W4DMSD",0,"MSD","SET")
0
^W1REP("H","W4DMSD",0,"MSD1")
dcrqn my;12H
^W1REP("H","W4DMSD",0,"MSD1","SET")
0
^W1REP("H","W4DMSD",0,"MSD1","SH")
0
^W1REP("H","W4DMSD",0,"NMB")
ogley;8
^W1REP("H","W4DMSD",0,"NMB","SET")
0
^W1REP("H","W4DMSD",0,"NMB","SH")
1
^W1REP("H","W4DMSD",0,"PART")
dcnr;4
^W1REP("H","W4DMSD",0,"PART","FILE")
^PLUK
^W1REP("H","W4DMSD",0,"PART","SH")
1
^W1REP("H","W4DMSD",0,"SHAA")
dry;5
^W1REP("H","W4DMSD",0,"SHAA","SET")
0
^W1REP("H","W4DMSD",0,"SHAA","SH")
1
^W1REP("H","W4DMSD",0,"SHULH")
ogley;5
^W1REP("H","W4DMSD",0,"SHULH","SH")
1
^W1REP("H","W4DMSD",0,"SUGS")
ogley beq;5
^W1REP("H","W4DMSD",0,"SUGS","FILE")
^|$$^%W1UCI(JB)|SUGS
^W1REP("H","W4DMSD",0,"SUGS","OUT")
SUGS1
^W1REP("H","W4DMSD",0,"SUGS","SET")
0
^W1REP("H","W4DMSD",0,"SUGS1")
beq xe`z;6H
^W1REP("H","W4DMSD",0,"SUGS1","SET")
0
^W1REP("H","W4DMSD",0,"SUGS1","SH")
1
^W1REP("H","W4DMSD",0,"TRH")
jix`z;8D
^W1REP("H","W4DMSD",0,"TRH","SH")
1
^W1REP("H","W4DMSD",0,"TRHT")
jix`z;8D
^W1REP("H","W4DMSD",0,"TRHT","SET")
0
^W1REP("H","W4DMSD",0,"TRHT","SH")
1
^W1REP("H","W4DMSD",0,"x1")
i`xy`;8,2
^W1REP("H","W4DMSD",0,"x10")
liaen zgpd;7,2
^W1REP("H","W4DMSD",0,"x11")
dcrqnl ehp;8,2
^W1REP("H","W4DMSD",0,"x12")
;,
^W1REP("H","W4DMSD",0,"x2")
onefn;8,2
^W1REP("H","W4DMSD",0,"x3")
dtwd;8,2
^W1REP("H","W4DMSD",0,"x4")
melyzl;8,2
^W1REP("H","W4DMSD",0,"x5")
dlnr;7,2
^W1REP("H","W4DMSD",0,"x6")
i`xy` zlnr;7,2
^W1REP("H","W4DMSD",0,"x7")
ehp i`xy`;8,2
^W1REP("H","W4DMSD",0,"x8")
ehp onefn;8,2
^W1REP("H","W4DMSD",0,"x9")
ehp dtwd;8,2
^W1REP("H","W4DMSD","COD")
MSD*MSD1*TRHT*HZM*SHAA*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11
^W1REP("H","W4DMSD","CT")
2*0********
^W1REP("H","W4DMSD","FLD")
MSD*TRHT*HZM*SHAA*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11
^W1REP("H","W4DMSD","FLD0")
**-*-******
^W1REP("H","W4DMSD","GLOB1")
^|$$^%W1UCI(JB)|P1H
^W1REP("H","W4DMSD","GLOB2")
^|$$^%W1UCI(JB)|P1H(DATH,HZM)
^W1REP("H","W4DMSD","LPT")
B
^W1REP("H","W4DMSD","MIUN")
1*2********
^W1REP("H","W4DMSD","QUERY","mikix`z itl g""ec","CT")
2*0********
^W1REP("H","W4DMSD","QUERY","mikix`z itl g""ec","FLD0")
**-*-******
^W1REP("H","W4DMSD","QUERY","mikix`z itl g""ec","MIUN")
1*2********
^W1REP("H","W4DMSD","QUERY","mikix`z itl g""ec","SIK0")
1*0********
^W1REP("H","W4DMSD","QUERY","zepnfd itl g""ec","CT")
2*0*0******
^W1REP("H","W4DMSD","QUERY","zepnfd itl g""ec","FLD0")
********
^W1REP("H","W4DMSD","QUERY","zepnfd itl g""ec","MIUN")
1*2*3******
^W1REP("H","W4DMSD","QUERY","zepnfd itl g""ec","SIK0")
1*0*0******
^W1REP("H","W4DMSD","SIK")
1*1*1*1*1*1*1*1*1*1*1*
^W1REP("H","W4DMSD","SIK0")
1*0********
^W1REP("H","W4DMSD","US",-1)
D DATH^W4DPAYM
^W1REP("H","W4DMSD","US",1)
D DATH^W4DMSD
^W1REP("H","W4DMSD","US",2)
D HZM^W4DMSD
^W1REP("H","W4DMSDL")
zegewl itl zecrqn g"ec
^W1REP("H","W4DMSDL",0,"ATAR")
xz` 'qn;2
^W1REP("H","W4DMSDL",0,"ATAR","FILE")
^|$$^%W1UCI(JB)|W4ATAR
^W1REP("H","W4DMSDL",0,"ATAR","OUT")
ATAR1
^W1REP("H","W4DMSDL",0,"ATAR","SET")
0
^W1REP("H","W4DMSDL",0,"ATAR1")
xz` my;12H
^W1REP("H","W4DMSDL",0,"ATAR1","SET")
0
^W1REP("H","W4DMSDL",0,"ATAR1","SH")
1
^W1REP("H","W4DMSDL",0,"EMDA")
dcnr;4
^W1REP("H","W4DMSDL",0,"EMDA","SET")
0
^W1REP("H","W4DMSDL",0,"EMDA","SH")
1
^W1REP("H","W4DMSDL",0,"HZM")
dpnfd;8
^W1REP("H","W4DMSDL",0,"HZM","SET")
1
^W1REP("H","W4DMSDL",0,"HZM","SH")
1
^W1REP("H","W4DMSDL",0,"LKH")
gewl 'qn;10
^W1REP("H","W4DMSDL",0,"LKH","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","W4DMSDL",0,"LKH","OUT")
LKH1
^W1REP("H","W4DMSDL",0,"LKH","SET")
0
^W1REP("H","W4DMSDL",0,"LKH1")
gewl my;20
^W1REP("H","W4DMSDL",0,"LKH1","SET")
0
^W1REP("H","W4DMSDL",0,"LKH1","SH")
1
^W1REP("H","W4DMSDL",0,"MLZ")
lawn 'qn;5
^W1REP("H","W4DMSDL",0,"MLZ","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4DMSDL",0,"MLZ","M2")
S MLZ1=$$^W4NAME(MLZ)
^W1REP("H","W4DMSDL",0,"MLZ","OUT")
MLZ1
^W1REP("H","W4DMSDL",0,"MLZ","SET")
0
^W1REP("H","W4DMSDL",0,"MLZ1")
lawn my;12H
^W1REP("H","W4DMSDL",0,"MLZ1","SET")
0
^W1REP("H","W4DMSDL",0,"MLZ1","SH")
1
^W1REP("H","W4DMSDL",0,"MSD")
dcrqn cew;7
^W1REP("H","W4DMSDL",0,"MSD","FILE")
^|$$^%W1UCI(JB)|W3MSD
^W1REP("H","W4DMSDL",0,"MSD","OUT")
MSD1
^W1REP("H","W4DMSDL",0,"MSD","SET")
0
^W1REP("H","W4DMSDL",0,"MSD1")
dcrqn my;12H
^W1REP("H","W4DMSDL",0,"MSD1","SET")
0
^W1REP("H","W4DMSDL",0,"MSD1","SH")
0
^W1REP("H","W4DMSDL",0,"NMB")
ogley;8
^W1REP("H","W4DMSDL",0,"NMB","SET")
0
^W1REP("H","W4DMSDL",0,"NMB","SH")
1
^W1REP("H","W4DMSDL",0,"PART")
dcnr;4
^W1REP("H","W4DMSDL",0,"PART","FILE")
^PLUK
^W1REP("H","W4DMSDL",0,"PART","SH")
1
^W1REP("H","W4DMSDL",0,"SHAA")
dry;5
^W1REP("H","W4DMSDL",0,"SHAA","SET")
0
^W1REP("H","W4DMSDL",0,"SHAA","SH")
1
^W1REP("H","W4DMSDL",0,"SHULH")
ogley;5
^W1REP("H","W4DMSDL",0,"SHULH","SH")
1
^W1REP("H","W4DMSDL",0,"SUGS")
ogley beq;5
^W1REP("H","W4DMSDL",0,"SUGS","FILE")
^|$$^%W1UCI(JB)|SUGS
^W1REP("H","W4DMSDL",0,"SUGS","OUT")
SUGS1
^W1REP("H","W4DMSDL",0,"SUGS","SET")
0
^W1REP("H","W4DMSDL",0,"SUGS1")
beq xe`z;6H
^W1REP("H","W4DMSDL",0,"SUGS1","SET")
0
^W1REP("H","W4DMSDL",0,"SUGS1","SH")
1
^W1REP("H","W4DMSDL",0,"TRH")
jix`z;8D
^W1REP("H","W4DMSDL",0,"TRH","SH")
1
^W1REP("H","W4DMSDL",0,"TRHT")
jix`z;8D
^W1REP("H","W4DMSDL",0,"TRHT","SET")
0
^W1REP("H","W4DMSDL",0,"TRHT","SH")
1
^W1REP("H","W4DMSDL",0,"x1")
melyzl;8,2
^W1REP("H","W4DMSDL",0,"x10")
liaen zgpd;7,2
^W1REP("H","W4DMSDL",0,"x11")
dcrqnl ehp;8,2
^W1REP("H","W4DMSDL",0,"x12")
;,
^W1REP("H","W4DMSDL",0,"x2")
dlnr;7,2
^W1REP("H","W4DMSDL",0,"x3")
i`xy` zlnr;7,2
^W1REP("H","W4DMSDL",0,"x4")
liaen zgpd;7,2
^W1REP("H","W4DMSDL",0,"x5")
dcrqnl ehp;8,2
^W1REP("H","W4DMSDL",0,"x6")
i`xy` zlnr;7,2
^W1REP("H","W4DMSDL",0,"x7")
ehp i`xy`;8,2
^W1REP("H","W4DMSDL",0,"x8")
ehp onefn;8,2
^W1REP("H","W4DMSDL",0,"x9")
ehp dtwd;8,2
^W1REP("H","W4DMSDL","COD")
MSD*MSD1*TRHT*LKH*LKH1*HZM*x1*x2*x3*x4*x5
^W1REP("H","W4DMSDL","CT")
2*0*0******
^W1REP("H","W4DMSDL","FLD")
MSD*TRHT*LKH*HZM*x1*x2*x3*x4*x5
^W1REP("H","W4DMSDL","FLD0")
********
^W1REP("H","W4DMSDL","GLOB1")
^|$$^%W1UCI(JB)|P1H
^W1REP("H","W4DMSDL","GLOB2")
^|$$^%W1UCI(JB)|P1H(DATH,HZM)
^W1REP("H","W4DMSDL","LPT")
B
^W1REP("H","W4DMSDL","MIUN")
1*2*3******
^W1REP("H","W4DMSDL","QUERY","mikix`z itl g""ec","CT")
2*0*0******
^W1REP("H","W4DMSDL","QUERY","mikix`z itl g""ec","FLD0")
***-*****
^W1REP("H","W4DMSDL","QUERY","mikix`z itl g""ec","MIUN")
1*2*3******
^W1REP("H","W4DMSDL","QUERY","mikix`z itl g""ec","SIK0")
1*1*0******
^W1REP("H","W4DMSDL","QUERY","zepnfd itl g""ec","CT")
2*0*0*0*****
^W1REP("H","W4DMSDL","QUERY","zepnfd itl g""ec","FLD0")
********
^W1REP("H","W4DMSDL","QUERY","zepnfd itl g""ec","MIUN")
1*2*3*4*****
^W1REP("H","W4DMSDL","QUERY","zepnfd itl g""ec","SIK0")
1*1*0*0*****
^W1REP("H","W4DMSDL","SIK")
1*1*1*1*1*1*1*1*1*1*1*
^W1REP("H","W4DMSDL","SIK0")
1*0*0******
^W1REP("H","W4DMSDL","US",-1)
D DATH^W4DMSDL
^W1REP("H","W4DMSDL","US",0)
D HZM^W4DMSDL
^W1REP("H","W4DMSDL","US",1)
D DATH^W4DMSDL
^W1REP("H","W4DMSDL","US",2)
D HZM^W4DMSDL
^W1REP("H","W4DPAY")
melyz ibeq itl illk g"ec
^W1REP("H","W4DPAY",0,"ATAR")
xz` 'qn;2
^W1REP("H","W4DPAY",0,"ATAR","FILE")
^|$$^%W1UCI(JB)|W4ATAR
^W1REP("H","W4DPAY",0,"ATAR","OUT")
ATAR1
^W1REP("H","W4DPAY",0,"ATAR","SET")
0
^W1REP("H","W4DPAY",0,"ATAR1")
xz` my;12H
^W1REP("H","W4DPAY",0,"ATAR1","SET")
0
^W1REP("H","W4DPAY",0,"ATAR1","SH")
1
^W1REP("H","W4DPAY",0,"EMDA")
dcnr;4
^W1REP("H","W4DPAY",0,"EMDA","SET")
0
^W1REP("H","W4DPAY",0,"EMDA","SH")
1
^W1REP("H","W4DPAY",0,"HZM")
dpnfd;8
^W1REP("H","W4DPAY",0,"HZM","SET")
1
^W1REP("H","W4DPAY",0,"HZM","SH")
1
^W1REP("H","W4DPAY",0,"MLZ")
lawn 'qn;5
^W1REP("H","W4DPAY",0,"MLZ","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4DPAY",0,"MLZ","M2")
S MLZ1=$$^W4NAME(MLZ)
^W1REP("H","W4DPAY",0,"MLZ","OUT")
MLZ1
^W1REP("H","W4DPAY",0,"MLZ","SET")
0
^W1REP("H","W4DPAY",0,"MLZ1")
lawn my;12H
^W1REP("H","W4DPAY",0,"MLZ1","SET")
0
^W1REP("H","W4DPAY",0,"MLZ1","SH")
1
^W1REP("H","W4DPAY",0,"NMB")
ogley;8
^W1REP("H","W4DPAY",0,"NMB","SET")
0
^W1REP("H","W4DPAY",0,"NMB","SH")
1
^W1REP("H","W4DPAY",0,"PART")
dcnr;4
^W1REP("H","W4DPAY",0,"PART","FILE")
^PLUK
^W1REP("H","W4DPAY",0,"PART","SH")
1
^W1REP("H","W4DPAY",0,"SHAA")
dry;5
^W1REP("H","W4DPAY",0,"SHAA","SET")
0
^W1REP("H","W4DPAY",0,"SHAA","SH")
1
^W1REP("H","W4DPAY",0,"SHULH")
ogley;5
^W1REP("H","W4DPAY",0,"SHULH","SH")
1
^W1REP("H","W4DPAY",0,"SUGS")
ogley beq;5
^W1REP("H","W4DPAY",0,"SUGS","FILE")
^|$$^%W1UCI(JB)|SUGS
^W1REP("H","W4DPAY",0,"SUGS","OUT")
SUGS1
^W1REP("H","W4DPAY",0,"SUGS","SET")
0
^W1REP("H","W4DPAY",0,"SUGS1")
beq xe`z;6H
^W1REP("H","W4DPAY",0,"SUGS1","SET")
0
^W1REP("H","W4DPAY",0,"SUGS1","SH")
1
^W1REP("H","W4DPAY",0,"TRH")
jix`z;8D
^W1REP("H","W4DPAY",0,"TRH","SH")
1
^W1REP("H","W4DPAY",0,"TRHT")
jix`z;8D
^W1REP("H","W4DPAY",0,"TRHT","SET")
0
^W1REP("H","W4DPAY",0,"TRHT","SH")
1
^W1REP("H","W4DPAY",0,"x1")
melyzl;8,2
^W1REP("H","W4DPAY",0,"x2")
onefn;8,2
^W1REP("H","W4DPAY",0,"x3")
wiy;8,2
^W1REP("H","W4DPAY",0,"x4")
'a dxard;8,2
^W1REP("H","W4DPAY",0,"x5")
`"k;8,2
^W1REP("H","W4DPAY",0,"x6")
dtwd;8,2
^W1REP("H","W4DPAY",0,"x7")
dpzn yelz;7,2
^W1REP("H","W4DPAY",0,"x8")
tih;7,2
^W1REP("H","W4DPAY",0,"x9")
;,
^W1REP("H","W4DPAY","COD")
MLZ*MLZ1*TRHT*HZM*x1*x2*x3*x4*x5*x6*x7*x8
^W1REP("H","W4DPAY","CT")
*2*0*******
^W1REP("H","W4DPAY","FLD")
MLZ*TRHT*HZM*x1*x2*x3*x4*x5*x6*x7*x8
^W1REP("H","W4DPAY","FLD0")
-*********
^W1REP("H","W4DPAY","GLOB1")
^|$$^%W1UCI(JB)|P1H
^W1REP("H","W4DPAY","GLOB2")
^|$$^%W1UCI(JB)|P1H(DATH,HZM)
^W1REP("H","W4DPAY","LPT")
B
^W1REP("H","W4DPAY","MAM")
********
^W1REP("H","W4DPAY","MIUN")
*1*2*******
^W1REP("H","W4DPAY","QUERY","fkexn mikix`z itl","CT")
*********
^W1REP("H","W4DPAY","QUERY","fkexn mikix`z itl","FLD0")
-**-*******
^W1REP("H","W4DPAY","QUERY","fkexn mikix`z itl","MIUN")
*********
^W1REP("H","W4DPAY","QUERY","fkexn mikix`z itl","SIK0")
*********
^W1REP("H","W4DPAY","QUERY","fkexn milawn itl","CT")
2*0********
^W1REP("H","W4DPAY","QUERY","fkexn milawn itl","FLD0")
**-*-*-*-****
^W1REP("H","W4DPAY","QUERY","fkexn milawn itl","MIUN")
1*2********
^W1REP("H","W4DPAY","QUERY","fkexn milawn itl","SIK0")
1*0********
^W1REP("H","W4DPAY","QUERY","hxetn mikix`z itl","CT")
*2*0*******
^W1REP("H","W4DPAY","QUERY","hxetn mikix`z itl","FLD0")
-*********
^W1REP("H","W4DPAY","QUERY","hxetn mikix`z itl","MIUN")
*1*2*******
^W1REP("H","W4DPAY","QUERY","hxetn mikix`z itl","SIK0")
*1*0*******
^W1REP("H","W4DPAY","QUERY","hxetn milawn itl","CT")
1*0*0*******
^W1REP("H","W4DPAY","QUERY","hxetn milawn itl","FLD0")
*********
^W1REP("H","W4DPAY","QUERY","hxetn milawn itl","MIUN")
1*2*3*******
^W1REP("H","W4DPAY","QUERY","hxetn milawn itl","SIK0")
1*1*0*******
^W1REP("H","W4DPAY","SIK")
1*1*1*1*1*1*1*1*
^W1REP("H","W4DPAY","SIK0")
*1*0*******
^W1REP("H","W4DPAY","US",-1)
D DATH^W4DPAYM
^W1REP("H","W4DPAY","US",1)
D DATH^W4DPAY
^W1REP("H","W4DPAY","US",2)
D HZM^W4DPAY
^W1REP("H","W4DPAYK")
melyz ibeq itl illk g"ec
^W1REP("H","W4DPAYK",0,"ATAR")
xz` 'qn;2
^W1REP("H","W4DPAYK",0,"ATAR","FILE")
^|$$^%W1UCI(JB)|W4ATAR
^W1REP("H","W4DPAYK",0,"ATAR","OUT")
ATAR1
^W1REP("H","W4DPAYK",0,"ATAR","SET")
0
^W1REP("H","W4DPAYK",0,"ATAR1")
xz` my;12H
^W1REP("H","W4DPAYK",0,"ATAR1","SET")
0
^W1REP("H","W4DPAYK",0,"ATAR1","SH")
1
^W1REP("H","W4DPAYK",0,"EMDA")
dcnr;4
^W1REP("H","W4DPAYK",0,"EMDA","SET")
0
^W1REP("H","W4DPAYK",0,"EMDA","SH")
1
^W1REP("H","W4DPAYK",0,"HZM")
dpnfd;8
^W1REP("H","W4DPAYK",0,"HZM","SET")
1
^W1REP("H","W4DPAYK",0,"HZM","SH")
1
^W1REP("H","W4DPAYK",0,"MLZ")
lawn 'qn;5
^W1REP("H","W4DPAYK",0,"MLZ","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4DPAYK",0,"MLZ","M2")
S MLZ1=$$^W4NAME(MLZ)
^W1REP("H","W4DPAYK",0,"MLZ","OUT")
MLZ1
^W1REP("H","W4DPAYK",0,"MLZ","SET")
0
^W1REP("H","W4DPAYK",0,"MLZ1")
lawn my;12H
^W1REP("H","W4DPAYK",0,"MLZ1","SET")
0
^W1REP("H","W4DPAYK",0,"MLZ1","SH")
1
^W1REP("H","W4DPAYK",0,"NMB")
ogley;8
^W1REP("H","W4DPAYK",0,"NMB","SET")
0
^W1REP("H","W4DPAYK",0,"NMB","SH")
1
^W1REP("H","W4DPAYK",0,"PART")
dcnr;4
^W1REP("H","W4DPAYK",0,"PART","FILE")
^PLUK
^W1REP("H","W4DPAYK",0,"PART","SH")
1
^W1REP("H","W4DPAYK",0,"SHAA")
dry;5
^W1REP("H","W4DPAYK",0,"SHAA","SET")
0
^W1REP("H","W4DPAYK",0,"SHAA","SH")
1
^W1REP("H","W4DPAYK",0,"SHULH")
ogley;5
^W1REP("H","W4DPAYK",0,"SHULH","SH")
1
^W1REP("H","W4DPAYK",0,"SUGS")
ogley beq;5
^W1REP("H","W4DPAYK",0,"SUGS","FILE")
^|$$^%W1UCI(JB)|SUGS
^W1REP("H","W4DPAYK",0,"SUGS","OUT")
SUGS1
^W1REP("H","W4DPAYK",0,"SUGS","SET")
0
^W1REP("H","W4DPAYK",0,"SUGS1")
beq xe`z;6H
^W1REP("H","W4DPAYK",0,"SUGS1","SET")
0
^W1REP("H","W4DPAYK",0,"SUGS1","SH")
1
^W1REP("H","W4DPAYK",0,"TRH")
jix`z;8D
^W1REP("H","W4DPAYK",0,"TRH","SH")
1
^W1REP("H","W4DPAYK",0,"TRHT")
jix`z;8D
^W1REP("H","W4DPAYK",0,"TRHT","SET")
0
^W1REP("H","W4DPAYK",0,"TRHT","SH")
1
^W1REP("H","W4DPAYK",0,"x1")
melyzl;8,2
^W1REP("H","W4DPAYK",0,"x2")
onefn;8,2
^W1REP("H","W4DPAYK",0,"x3")
wiy;8,2
^W1REP("H","W4DPAYK",0,"x4")
`"k;8,2
^W1REP("H","W4DPAYK",0,"x5")
dtwd;8,2
^W1REP("H","W4DPAYK",0,"x6")
dpzn 'lz;8,2
^W1REP("H","W4DPAYK",0,"x7")
tih;7,2
^W1REP("H","W4DPAYK",0,"x8")
;,
^W1REP("H","W4DPAYK","COD")
MLZ*MLZ1*TRHT*EMDA*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4DPAYK","CT")
*2**0*0******
^W1REP("H","W4DPAYK","FLD")
MLZ*TRHT*EMDA*HZM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4DPAYK","FLD0")
-**-********-
^W1REP("H","W4DPAYK","GLOB1")
^|$$^%W1UCI(JB)|P1H
^W1REP("H","W4DPAYK","GLOB2")
^|$$^%W1UCI(JB)|P1H(DATH,HZM)
^W1REP("H","W4DPAYK","LPT")
B
^W1REP("H","W4DPAYK","MIUN")
*1**2*******
^W1REP("H","W4DPAYK","QUERY","fkexn mikix`z itl","CT")
*0***0******
^W1REP("H","W4DPAYK","QUERY","fkexn mikix`z itl","FLD0")
-**-*-*******-
^W1REP("H","W4DPAYK","QUERY","fkexn mikix`z itl","MIUN")
**********
^W1REP("H","W4DPAYK","QUERY","fkexn mikix`z itl","SIK0")
*0***0******
^W1REP("H","W4DPAYK","QUERY","fkexn milawn itl","CT")
0*0*0********
^W1REP("H","W4DPAYK","QUERY","fkexn milawn itl","FLD0")
***-*******-
^W1REP("H","W4DPAYK","QUERY","fkexn milawn itl","MIUN")
1*2*3********
^W1REP("H","W4DPAYK","QUERY","fkexn milawn itl","SIK0")
1*0*0********
^W1REP("H","W4DPAYK","QUERY","fkexn zecnr itl","CT")
*0*0********
^W1REP("H","W4DPAYK","QUERY","fkexn zecnr itl","FLD0")
-***-*******-
^W1REP("H","W4DPAYK","QUERY","fkexn zecnr itl","MIUN")
*2*1********
^W1REP("H","W4DPAYK","QUERY","fkexn zecnr itl","SIK0")
*0*1********
^W1REP("H","W4DPAYK","QUERY","hxetn mikix`z itl","CT")
*2**0*0******
^W1REP("H","W4DPAYK","QUERY","hxetn mikix`z itl","FLD0")
-**-********-
^W1REP("H","W4DPAYK","QUERY","hxetn mikix`z itl","MIUN")
*1**2*******
^W1REP("H","W4DPAYK","QUERY","hxetn mikix`z itl","SIK0")
*1**0*0******
^W1REP("H","W4DPAYK","QUERY","hxetn milawn itl","CT")
1*0*0*0*******
^W1REP("H","W4DPAYK","QUERY","hxetn milawn itl","FLD0")
**********-
^W1REP("H","W4DPAYK","QUERY","hxetn milawn itl","MIUN")
1*2*3*4*******
^W1REP("H","W4DPAYK","QUERY","hxetn milawn itl","SIK0")
1*1*0*0*******
^W1REP("H","W4DPAYK","QUERY","hxetn zecnr itl","CT")
*1*0*0*******
^W1REP("H","W4DPAYK","QUERY","hxetn zecnr itl","FLD0")
-**********-
^W1REP("H","W4DPAYK","QUERY","hxetn zecnr itl","MIUN")
*1*2*3*******
^W1REP("H","W4DPAYK","QUERY","hxetn zecnr itl","SIK0")
*1*1*0*******
^W1REP("H","W4DPAYK","SIK")
1*1*1*1*1*1*1*
^W1REP("H","W4DPAYK","SIK0")
*1**0*0******
^W1REP("H","W4DPAYK","US",-1)
D DATH^W4DPAYM
^W1REP("H","W4DPAYK","US",1)
D DATH^W4DPAYK
^W1REP("H","W4DPAYK","US",2)
D HZM^W4DPAYK
^W1REP("H","W4DPMH")
zeveawe zewlgn itl zexikn
^W1REP("H","W4DPMH",0,"DAT")
jix`z;8D
^W1REP("H","W4DPMH",0,"DAT","SH")
1
^W1REP("H","W4DPMH",0,"DATT")
jix`z;8D
^W1REP("H","W4DPMH",0,"DATT","SET")
0
^W1REP("H","W4DPMH",0,"DATT","SH")
1
^W1REP("H","W4DPMH",0,"HZM")
dpnfd;7
^W1REP("H","W4DPMH",0,"HZM","SET")
0
^W1REP("H","W4DPMH",0,"HZM","SH")
1
^W1REP("H","W4DPMH",0,"MH")
xign;7
^W1REP("H","W4DPMH",0,"MH","SH")
1
^W1REP("H","W4DPMH",0,"MH1")
xign;8
^W1REP("H","W4DPMH",0,"MH1","SET")
0
^W1REP("H","W4DPMH",0,"MH1","SH")
1
^W1REP("H","W4DPMH",0,"MHL")
dwlgn;5
^W1REP("H","W4DPMH",0,"MHL","FILE")
^|$$^%W1UCI(JB)|DEP
^W1REP("H","W4DPMH",0,"MHL","OUT")
MHL1
^W1REP("H","W4DPMH",0,"MHL","SET")
0
^W1REP("H","W4DPMH",0,"MHL1")
xe`z;12H
^W1REP("H","W4DPMH",0,"MHL1","SET")
0
^W1REP("H","W4DPMH",0,"MHL1","SH")
0
^W1REP("H","W4DPMH",0,"PARIT")
hixt cew;8
^W1REP("H","W4DPMH",0,"PARIT","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4DPMH",0,"PARIT","M2")
D PAR1^W4DPMH
^W1REP("H","W4DPMH",0,"PARIT","OUT")
PARIT1
^W1REP("H","W4DPMH",0,"PARIT","SET")
1
^W1REP("H","W4DPMH",0,"PARIT1")
hixt xe`z;18H
^W1REP("H","W4DPMH",0,"PARIT1","SET")
0
^W1REP("H","W4DPMH",0,"PARIT1","SH")
0
^W1REP("H","W4DPMH",0,"SUGP")
dveaw;5
^W1REP("H","W4DPMH",0,"SUGP","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","W4DPMH",0,"SUGP","OUT")
SUGP1
^W1REP("H","W4DPMH",0,"SUGP","SET")
0
^W1REP("H","W4DPMH",0,"SUGP1")
dveaw xe`z;12H
^W1REP("H","W4DPMH",0,"SUGP1","SET")
0
^W1REP("H","W4DPMH",0,"SUGP1","SH")
0
^W1REP("H","W4DPMH",0,"x1")
e`viy milehia zenk;8,1
^W1REP("H","W4DPMH",0,"x2")
milehia mekq;8,1
^W1REP("H","W4DPMH",0,"x3")
ehp zenk;8,1
^W1REP("H","W4DPMH",0,"x4")
hixtl zegpd;9,1
^W1REP("H","W4DPMH",0,"x5")
zeillk zegpd;9,1
^W1REP("H","W4DPMH",0,"x6")
zexye mitih;9,1
^W1REP("H","W4DPMH",0,"x7")
ehp mekq;9,1
^W1REP("H","W4DPMH",0,"x8")
n"rn iptl;9,1
^W1REP("H","W4DPMH",0,"x9")
;,
^W1REP("H","W4DPMH","COD")
MHL*MHL1*SUGP*SUGP1*PARIT*PARIT1*MH1*DATT*HZM*x1*x2*x3*x4*x5*x6*x7*x8
^W1REP("H","W4DPMH","CT")
1*1*0*0*2*********
^W1REP("H","W4DPMH","FLD")
MHL*SUGP*PARIT*MH1*DATT*HZM*x1*x2*x3*x4*x5*x6*x7*x8
^W1REP("H","W4DPMH","FLD0")
*****-********
^W1REP("H","W4DPMH","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4DPMH","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,DAT,MRK,PARIT,MH,HZM)
^W1REP("H","W4DPMH","LPT")
B
^W1REP("H","W4DPMH","MIUN")
1*2*4*5*3*********
^W1REP("H","W4DPMH","QUERY","iztewz","CT")
1*2*0*0**********
^W1REP("H","W4DPMH","QUERY","iztewz","FLD0")
****-*-******-**
^W1REP("H","W4DPMH","QUERY","iztewz","MIUN")
1*2*3*4**********
^W1REP("H","W4DPMH","QUERY","iztewz","SIK0")
1*1*0*0**********
^W1REP("H","W4DPMH","QUERY","mikix`z itl hxetn","CT")
1*1*0*0*2*********
^W1REP("H","W4DPMH","QUERY","mikix`z itl hxetn","FLD0")
*****-********
^W1REP("H","W4DPMH","QUERY","mikix`z itl hxetn","MIUN")
1*2*4*5*3*********
^W1REP("H","W4DPMH","QUERY","mikix`z itl hxetn","SIK0")
1*1*0*0*1*********
^W1REP("H","W4DPMH","QUERY","zepnfde mikix`z itl hxetn","CT")
1*1*0*0*2*0********
^W1REP("H","W4DPMH","QUERY","zepnfde mikix`z itl hxetn","FLD0")
***********-**
^W1REP("H","W4DPMH","QUERY","zepnfde mikix`z itl hxetn","MIUN")
1*2*4*5*3*6********
^W1REP("H","W4DPMH","QUERY","zepnfde mikix`z itl hxetn","SIK0")
1*1*1*0*1*0********
^W1REP("H","W4DPMH","QUERY","zeveaw `ll iztewz","CT")
1**0*0********
^W1REP("H","W4DPMH","QUERY","zeveaw `ll iztewz","FLD0")
*-***-*-******
^W1REP("H","W4DPMH","QUERY","zeveaw `ll iztewz","MIUN")
1**2*3********
^W1REP("H","W4DPMH","QUERY","zeveaw `ll iztewz","SIK0")
1**0*0***0*****
^W1REP("H","W4DPMH","QUERY","zewlgne zeveaw `ll iztewz","CT")
**0*0********
^W1REP("H","W4DPMH","QUERY","zewlgne zeveaw `ll iztewz","FLD0")
-*-***-*-******
^W1REP("H","W4DPMH","QUERY","zewlgne zeveaw `ll iztewz","MIUN")
**1*2********
^W1REP("H","W4DPMH","QUERY","zewlgne zeveaw `ll iztewz","SIK0")
**0*0***0*0****
^W1REP("H","W4DPMH","SHP","KOD")
DPMH
^W1REP("H","W4DPMH","SHP","PROG")
S MAS(5)=SSOAD
^W1REP("H","W4DPMH","SIK")
1*1*1*1*1*1*1*1*
^W1REP("H","W4DPMH","SIK0")
1*1*0*0*1*********
^W1REP("H","W4DPMH","US",2)
D DAT^W4DPMH
^W1REP("H","W4DPMH","US",4)
D PAR^W4DPMH
^W1REP("H","W4DPMH","US",5)
D MH^W4DPMH
^W1REP("H","W4DPMH","US",6)
D HZM^W4DPMH
^W1REP("H","W4DTIP")
mitih itl g"ec
^W1REP("H","W4DTIP",0,"ATAR")
xz` 'qn;2
^W1REP("H","W4DTIP",0,"ATAR","FILE")
^|$$^%W1UCI(JB)|W4ATAR
^W1REP("H","W4DTIP",0,"ATAR","OUT")
ATAR1
^W1REP("H","W4DTIP",0,"ATAR","SET")
0
^W1REP("H","W4DTIP",0,"ATAR1")
xz` my;12H
^W1REP("H","W4DTIP",0,"ATAR1","SET")
0
^W1REP("H","W4DTIP",0,"ATAR1","SH")
1
^W1REP("H","W4DTIP",0,"EMDA")
dcnr;4
^W1REP("H","W4DTIP",0,"EMDA","SET")
0
^W1REP("H","W4DTIP",0,"EMDA","SH")
1
^W1REP("H","W4DTIP",0,"HZM")
dpnfd;8
^W1REP("H","W4DTIP",0,"HZM","SET")
1
^W1REP("H","W4DTIP",0,"HZM","SH")
1
^W1REP("H","W4DTIP",0,"MKBL")
lawn 'qn;5
^W1REP("H","W4DTIP",0,"MKBL","M2")
S MKBL1=$$^W4NAME(MKBL)
^W1REP("H","W4DTIP",0,"MKBL","OUT")
MKBL1
^W1REP("H","W4DTIP",0,"MKBL","SET")
0
^W1REP("H","W4DTIP",0,"MKBL1")
lawn my;12H
^W1REP("H","W4DTIP",0,"MKBL1","SET")
0
^W1REP("H","W4DTIP",0,"MKBL1","SH")
1
^W1REP("H","W4DTIP",0,"MLZ")
lawn 'qn;5
^W1REP("H","W4DTIP",0,"MLZ","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4DTIP",0,"MLZ","M2")
S MLZ1=$$^W4NAME(MLZ)
^W1REP("H","W4DTIP",0,"MLZ","OUT")
MLZ1
^W1REP("H","W4DTIP",0,"MLZ","SET")
0
^W1REP("H","W4DTIP",0,"MLZ1")
lawn my;12H
^W1REP("H","W4DTIP",0,"MLZ1","SET")
0
^W1REP("H","W4DTIP",0,"MLZ1","SH")
1
^W1REP("H","W4DTIP",0,"NMB")
ogley;8
^W1REP("H","W4DTIP",0,"NMB","SET")
0
^W1REP("H","W4DTIP",0,"NMB","SH")
1
^W1REP("H","W4DTIP",0,"PART")
dcnr;4
^W1REP("H","W4DTIP",0,"PART","FILE")
^PLUK
^W1REP("H","W4DTIP",0,"PART","SH")
1
^W1REP("H","W4DTIP",0,"SHAA")
dry;5
^W1REP("H","W4DTIP",0,"SHAA","SET")
0
^W1REP("H","W4DTIP",0,"SHAA","SH")
1
^W1REP("H","W4DTIP",0,"SHULH")
ogley;5
^W1REP("H","W4DTIP",0,"SHULH","SH")
1
^W1REP("H","W4DTIP",0,"SUGS")
ogley beq;5
^W1REP("H","W4DTIP",0,"SUGS","FILE")
^|$$^%W1UCI(JB)|SUGS
^W1REP("H","W4DTIP",0,"SUGS","OUT")
SUGS1
^W1REP("H","W4DTIP",0,"SUGS","SET")
0
^W1REP("H","W4DTIP",0,"SUGS1")
beq xe`z;6H
^W1REP("H","W4DTIP",0,"SUGS1","SET")
0
^W1REP("H","W4DTIP",0,"SUGS1","SH")
1
^W1REP("H","W4DTIP",0,"TRH")
jix`z;8D
^W1REP("H","W4DTIP",0,"TRH","SET")
0
^W1REP("H","W4DTIP",0,"TRH","SH")
1
^W1REP("H","W4DTIP",0,"TRHT")
jix`z;8D
^W1REP("H","W4DTIP",0,"TRHT","SET")
0
^W1REP("H","W4DTIP",0,"TRHT","SH")
1
^W1REP("H","W4DTIP",0,"x1")
mitih k"dq;8,2
^W1REP("H","W4DTIP",0,"x2")
onefna mitih;8,2
^W1REP("H","W4DTIP",0,"x3")
wiya mitih;8,2
^W1REP("H","W4DTIP",0,"x4")
`"ka mitih;8,2
^W1REP("H","W4DTIP",0,"x5")
dtwda mitih;8,2
^W1REP("H","W4DTIP",0,"x6")
;,
^W1REP("H","W4DTIP",0,"x7")
tih;7,2
^W1REP("H","W4DTIP",0,"x8")
;,
^W1REP("H","W4DTIP","COD")
MKBL*MKBL1*SHAA*TRH*HZM*x1*x2*x3*x4*x5
^W1REP("H","W4DTIP","CT")
0**0******
^W1REP("H","W4DTIP","FLD")
MKBL*SHAA*TRH*HZM*x1*x2*x3*x4*x5
^W1REP("H","W4DTIP","FLD0")
*-**-*****
^W1REP("H","W4DTIP","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4DTIP","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,DT,MKBL,HZM)
^W1REP("H","W4DTIP","LPT")
B
^W1REP("H","W4DTIP","MAM")
****
^W1REP("H","W4DTIP","MIUN")
2**1******
^W1REP("H","W4DTIP","MIUN","PROG")
TRH^W4DTIP
^W1REP("H","W4DTIP","QUERY","fkexn mikix`z itl","CT")
0**0******
^W1REP("H","W4DTIP","QUERY","fkexn mikix`z itl","FLD0")
*-**-*****
^W1REP("H","W4DTIP","QUERY","fkexn mikix`z itl","MIUN")
2**1******
^W1REP("H","W4DTIP","QUERY","fkexn mikix`z itl","SIK0")
0**1******
^W1REP("H","W4DTIP","QUERY","fkexn milawn itl","CT")
0**0******
^W1REP("H","W4DTIP","QUERY","fkexn milawn itl","FLD0")
*-**-*****
^W1REP("H","W4DTIP","QUERY","fkexn milawn itl","MIUN")
1**2******
^W1REP("H","W4DTIP","QUERY","fkexn milawn itl","SIK0")
1**0******
^W1REP("H","W4DTIP","QUERY","hxetn mikix`z itl","CT")
0*0*0*0*****
^W1REP("H","W4DTIP","QUERY","hxetn mikix`z itl","FLD0")
********
^W1REP("H","W4DTIP","QUERY","hxetn mikix`z itl","MIUN")
2*3*1*4*****
^W1REP("H","W4DTIP","QUERY","hxetn mikix`z itl","SIK0")
0*0*1*0*****
^W1REP("H","W4DTIP","QUERY","hxetn milawn itl","CT")
2*0*0*0*****
^W1REP("H","W4DTIP","QUERY","hxetn milawn itl","FLD0")
********
^W1REP("H","W4DTIP","QUERY","hxetn milawn itl","MIUN")
1*3*2*4*****
^W1REP("H","W4DTIP","QUERY","hxetn milawn itl","SIK0")
1*0*1*0*****
^W1REP("H","W4DTIP","SIK")
1*1*1*1*1**1*
^W1REP("H","W4DTIP","SIK0")
0**1******
^W1REP("H","W4DTIP","US",-1)
D DATH^W4DPAYM
^W1REP("H","W4DTIP","US",2)
D DT^W4DTIP
^W1REP("H","W4DTIP","US",3)
D MKBL^W4DTIP
^W1REP("H","W4DTIP","US",4)
D HZM^W4DTIP
^W1REP("H","W4GAPNTD")
mitipq itl zexikn g"ec
^W1REP("H","W4GAPNTD",0,"DAT")
jix`z;8D
^W1REP("H","W4GAPNTD",0,"DAT","SET")
0
^W1REP("H","W4GAPNTD",0,"DAT","SH")
1
^W1REP("H","W4GAPNTD",0,"MSD")
sipq;5
^W1REP("H","W4GAPNTD",0,"MSD","FILE")
^|$$^W3MAIN|TMPSN
^W1REP("H","W4GAPNTD",0,"MSD","M2")
S MSD1=$$MSD^W3R(MSD)
^W1REP("H","W4GAPNTD",0,"MSD","OUT")
MSD1
^W1REP("H","W4GAPNTD",0,"MSD","SET")
1
^W1REP("H","W4GAPNTD",0,"MSD1")
sipq my;15H
^W1REP("H","W4GAPNTD",0,"MSD1","OUT")
1
^W1REP("H","W4GAPNTD",0,"MSD1","SET")
0
^W1REP("H","W4GAPNTD",0,"x1")
zegpd iptl zexikn;7,2
^W1REP("H","W4GAPNTD",0,"x10")
mewna zepnfd 'qn;5,0
^W1REP("H","W4GAPNTD",0,"x11")
zgwl zepnfd 'qn;5,0
^W1REP("H","W4GAPNTD",0,"x12")
zelhean zepnfd k"dq;7,2
^W1REP("H","W4GAPNTD",0,"x13")
zegpd;7,2
^W1REP("H","W4GAPNTD",0,"x14")
miiekif;7,2
^W1REP("H","W4GAPNTD",0,"x15")
;,
^W1REP("H","W4GAPNTD",0,"x2")
ehp zexikn;7,2
^W1REP("H","W4GAPNTD",0,"x3")
hpxhpi` zexikn;7,2
^W1REP("H","W4GAPNTD",0,"x4")
migelyn k"dq;7,2
^W1REP("H","W4GAPNTD",0,"x5")
mewna k"dq;7,2
^W1REP("H","W4GAPNTD",0,"x6")
zgwl k"dq;7,2
^W1REP("H","W4GAPNTD",0,"x7")
zepnfd 'qn;5,0
^W1REP("H","W4GAPNTD",0,"x8")
hpxhpi` zepnfd 'qn;5,0
^W1REP("H","W4GAPNTD",0,"x9")
migelyn 'qn;5,0
^W1REP("H","W4GAPNTD","COD")
DAT*MSD*MSD1*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11*x12*x13*x14
^W1REP("H","W4GAPNTD","CT")
*0*0************
^W1REP("H","W4GAPNTD","FLD")
DAT*MSD*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11*x12*x13*x14
^W1REP("H","W4GAPNTD","FLD0")
-*M*************
^W1REP("H","W4GAPNTD","GLOB1")
^|$$^W3MAIN|TMP(PRTN)
^W1REP("H","W4GAPNTD","GLOB2")
^|$$^W3MAIN|TMP(PRTN,DT,MSD)
^W1REP("H","W4GAPNTD","LPT")
B
^W1REP("H","W4GAPNTD","MAM")
1*1*1*1*1*1*******1*1*
^W1REP("H","W4GAPNTD","MIUN")
**************
^W1REP("H","W4GAPNTD","QUERY","iztewz g""ec","CT")
*0*0************
^W1REP("H","W4GAPNTD","QUERY","iztewz g""ec","FLD0")
-*M*************
^W1REP("H","W4GAPNTD","QUERY","iztewz g""ec","MIUN")
**************
^W1REP("H","W4GAPNTD","QUERY","iztewz g""ec","SIK0")
*0*0************
^W1REP("H","W4GAPNTD","QUERY","mikix`z itl hxetn g""ec","CT")
0*0
^W1REP("H","W4GAPNTD","QUERY","mikix`z itl hxetn g""ec","FLD0")
DAT*MSD
^W1REP("H","W4GAPNTD","QUERY","mikix`z itl hxetn g""ec","MIUN")
1*2
^W1REP("H","W4GAPNTD","QUERY","mikix`z itl hxetn g""ec","SIK0")
1*0
^W1REP("H","W4GAPNTD","SIK")
1*1*1*1*1*1*1*1*1*1*1*1*1*1**1*1*1*1*1*1*1*
^W1REP("H","W4GAPNTD","SIK0")
*0*0************
^W1REP("H","W4GAPNTD","US",2)
D DAT^W4GAPNTD
^W1REP("H","W4GAPNTD","US",3)
D MSD^W4GAPNTD
^W1REP("H","W4GAPNTM")
drbd xewn itl zexikn g"ec
^W1REP("H","W4GAPNTM",0,"DAT")
jix`z;8D
^W1REP("H","W4GAPNTM",0,"DAT","SET")
0
^W1REP("H","W4GAPNTM",0,"DAT","SH")
1
^W1REP("H","W4GAPNTM",0,"MKR")
xewn cew;5
^W1REP("H","W4GAPNTM",0,"MKR","FILE")
^|$$^W3MAIN|W3MKR
^W1REP("H","W4GAPNTM",0,"MKR","OUT")
MKR1
^W1REP("H","W4GAPNTM",0,"MKR","SET")
1
^W1REP("H","W4GAPNTM",0,"MKR1")
xewn my;14H
^W1REP("H","W4GAPNTM",0,"MKR1","SET")
0
^W1REP("H","W4GAPNTM",0,"MKR1","SH")
1
^W1REP("H","W4GAPNTM",0,"MSD")
sipq;5
^W1REP("H","W4GAPNTM",0,"MSD","FILE")
^|$$^W3MAIN|TMPSN
^W1REP("H","W4GAPNTM",0,"MSD","M2")
S MSD1=$$MSD^W3R(MSD)
^W1REP("H","W4GAPNTM",0,"MSD","OUT")
MSD1
^W1REP("H","W4GAPNTM",0,"MSD","SET")
1
^W1REP("H","W4GAPNTM",0,"MSD1")
sipq my;15H
^W1REP("H","W4GAPNTM",0,"MSD1","SET")
0
^W1REP("H","W4GAPNTM",0,"MSD1","SH")
0
^W1REP("H","W4GAPNTM",0,"x1")
zenk;5,0
^W1REP("H","W4GAPNTM",0,"x10")
mewna zepnfd 'qn;5,0
^W1REP("H","W4GAPNTM",0,"x11")
zgwl zepnfd 'qn;5,0
^W1REP("H","W4GAPNTM",0,"x12")
milehia;7,2
^W1REP("H","W4GAPNTM",0,"x13")
zegpd;7,2
^W1REP("H","W4GAPNTM",0,"x14")
p;7,2
^W1REP("H","W4GAPNTM",0,"x15")
t;7,2
^W1REP("H","W4GAPNTM",0,"x16")
x;7,2
^W1REP("H","W4GAPNTM",0,"x17")
q;7,2
^W1REP("H","W4GAPNTM",0,"x18")
x;7,2
^W1REP("H","W4GAPNTM",0,"x19")
y;7,2
^W1REP("H","W4GAPNTM",0,"x2")
mekq;7,2
^W1REP("H","W4GAPNTM",0,"x20")
z;7,2
^W1REP("H","W4GAPNTM",0,"x21")
``;7,2
^W1REP("H","W4GAPNTM",0,"x22")
aa;7,2
^W1REP("H","W4GAPNTM",0,"x23")
;,
^W1REP("H","W4GAPNTM",0,"x3")
;,
^W1REP("H","W4GAPNTM",0,"x4")
hlee k"dq;7,2
^W1REP("H","W4GAPNTM",0,"x5")
zepnfd 'qn qia oz;5,0
^W1REP("H","W4GAPNTM",0,"x6")
qia oz k"dq;7,2
^W1REP("H","W4GAPNTM",0,"x7")
;,
^W1REP("H","W4GAPNTM",0,"x8")
hpxhpi` zepnfd 'qn;5,0
^W1REP("H","W4GAPNTM",0,"x9")
migelyn 'qn;5,0
^W1REP("H","W4GAPNTM","COD")
DAT*MSD*MSD1*MKR*MKR1*x1*x2
^W1REP("H","W4GAPNTM","CT")
*0*0************
^W1REP("H","W4GAPNTM","FLD")
DAT*MSD*MKR*x1*x2
^W1REP("H","W4GAPNTM","FLD0")
-*M*************
^W1REP("H","W4GAPNTM","GLOB1")
^|$$^W3MAIN|TMP(PRTN)
^W1REP("H","W4GAPNTM","GLOB2")
^|$$^W3MAIN|TMP(PRTN,DT,MSD,MKR)
^W1REP("H","W4GAPNTM","LPT")
B
^W1REP("H","W4GAPNTM","MAM")
*1**1**1*
^W1REP("H","W4GAPNTM","MIUN")
*2*1************
^W1REP("H","W4GAPNTM","QUERY","iztewz - mitipqe zexewn itl","CT")
*0*0************
^W1REP("H","W4GAPNTM","QUERY","iztewz - mitipqe zexewn itl","FLD0")
-*M*************
^W1REP("H","W4GAPNTM","QUERY","iztewz - mitipqe zexewn itl","MIUN")
*2*1************
^W1REP("H","W4GAPNTM","QUERY","iztewz - mitipqe zexewn itl","SIK0")
*0*1************
^W1REP("H","W4GAPNTM","QUERY","iztewz - zexewne mitipq itl","CT")
*0*0************
^W1REP("H","W4GAPNTM","QUERY","iztewz - zexewne mitipq itl","FLD0")
-*M*************
^W1REP("H","W4GAPNTM","QUERY","iztewz - zexewne mitipq itl","MIUN")
*1*2************
^W1REP("H","W4GAPNTM","QUERY","iztewz - zexewne mitipq itl","SIK0")
*1*0************
^W1REP("H","W4GAPNTM","QUERY","mikix`ze drbd zexewn , mitipq itl","CT")
0*0
^W1REP("H","W4GAPNTM","QUERY","mikix`ze drbd zexewn , mitipq itl","FLD0")
DAT*MSD
^W1REP("H","W4GAPNTM","QUERY","mikix`ze drbd zexewn , mitipq itl","MIUN")
1*2
^W1REP("H","W4GAPNTM","QUERY","mikix`ze drbd zexewn , mitipq itl","SIK0")
1*1
^W1REP("H","W4GAPNTM","QUERY","mikix`ze mitipq drbd zexewn itl","CT")
0*0*0**
^W1REP("H","W4GAPNTM","QUERY","mikix`ze mitipq drbd zexewn itl","FLD0")
****
^W1REP("H","W4GAPNTM","QUERY","mikix`ze mitipq drbd zexewn itl","MIUN")
1*3*2**
^W1REP("H","W4GAPNTM","QUERY","mikix`ze mitipq drbd zexewn itl","SIK0")
0*0*1**
^W1REP("H","W4GAPNTM","SIK")
1*1**1*1*1**1*1*1*1*1*1*1*1*1*1*1*1*1*1*1*
^W1REP("H","W4GAPNTM","SIK0")
*0*1************
^W1REP("H","W4GAPNTM","US",2)
D DAT^W4GAPNTM
^W1REP("H","W4GAPNTM","US",3)
D MSD^W4GAPNTM
^W1REP("H","W4GAPNTM","US",4)
D MKR^W4GAPNTM
^W1REP("H","W4HZC")
i`xy` iqihxk g"ec
^W1REP("H","W4HZC",0,"ASM")
`zknq`;7
^W1REP("H","W4HZC",0,"ASM","SET")
0
^W1REP("H","W4HZC",0,"ASM","SH")
1
^W1REP("H","W4HZC",0,"DAT")
jix`z;8D
^W1REP("H","W4HZC",0,"DAT","SET")
0
^W1REP("H","W4HZC",0,"DAT","SH")
1
^W1REP("H","W4HZC",0,"NCA")
i`xy` qihxk 'qn;19
^W1REP("H","W4HZC",0,"NCA","SET")
0
^W1REP("H","W4HZC",0,"NCA","SH")
1
^W1REP("H","W4HZC",0,"NDOC")
jnqn 'qn;7
^W1REP("H","W4HZC",0,"NDOC","SET")
0
^W1REP("H","W4HZC",0,"NDOC","SH")
1
^W1REP("H","W4HZC",0,"NISKA")
dwqr 'qn;7
^W1REP("H","W4HZC",0,"NISKA","SET")
0
^W1REP("H","W4HZC",0,"NISKA","SH")
1
^W1REP("H","W4HZC",0,"SUG1")
jnqn beq;10H
^W1REP("H","W4HZC",0,"SUG1","SET")
0
^W1REP("H","W4HZC",0,"SUG1","SH")
1
^W1REP("H","W4HZC",0,"SUGCA")
`"k beq;8H
^W1REP("H","W4HZC",0,"SUGCA","SET")
0
^W1REP("H","W4HZC",0,"SUGCA","SH")
1
^W1REP("H","W4HZC",0,"x1")
mekq;8,2
^W1REP("H","W4HZC",0,"x2")
;,
^W1REP("H","W4HZC","COD")
DAT*SUG1*NDOC*NISKA*NCA*ASM*SUGCA*x1
^W1REP("H","W4HZC","FLD")
DAT*SUG1*NDOC*NISKA*NCA*ASM*SUGCA*x1
^W1REP("H","W4HZC","GLOB1")
^|$$^W3MAIN|VRM(PRTN)
^W1REP("H","W4HZC","GLOB2")
^|$$^W3MAIN|VRM(PRTN,DT,SUG,IND)
^W1REP("H","W4HZC","LPT")
B
^W1REP("H","W4HZC","MAM")
1*
^W1REP("H","W4HZC","MIUN","PROG")
GET^W4HZC
^W1REP("H","W4HZC","SIK")
1*
^W1REP("H","W4HZC","US",2)
D DT^W4HZC
^W1REP("H","W4HZC","US",4)
D IND^W4HZC
^W1REP("H","W4HZCA")

^W1REP("H","W4HZHQ")

^W1REP("H","W4LEVD")
xvewn micaer g"ec
^W1REP("H","W4LEVD",0,"KV")
dveaw 'qn;9
^W1REP("H","W4LEVD",0,"KV","FILE")
^|$$^%W1UCI(JB)|LEVKVZ
^W1REP("H","W4LEVD",0,"KV","M2")
S KV1=$G(@$$^W4GL("LEVKVZ")@(KV))
^W1REP("H","W4LEVD",0,"KV","OUT")
KV1
^W1REP("H","W4LEVD",0,"KV","SET")
1
^W1REP("H","W4LEVD",0,"KV1")
dveaw my;12H
^W1REP("H","W4LEVD",0,"KV1","SET")
0
^W1REP("H","W4LEVD",0,"KV1","SH")
1
^W1REP("H","W4LEVD",0,"NOM")
dxey;5
^W1REP("H","W4LEVD",0,"NOM","SET")
1
^W1REP("H","W4LEVD",0,"NOM","SH")
1
^W1REP("H","W4LEVD",0,"OV")
caer 'qn;5
^W1REP("H","W4LEVD",0,"OV","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4LEVD",0,"OV","OUT")
STRING1
^W1REP("H","W4LEVD",0,"OV","SET")
0
^W1REP("H","W4LEVD",0,"STRING")
caer 'qn;8
^W1REP("H","W4LEVD",0,"STRING","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4LEVD",0,"STRING","M2")
S STRING1=$$^W4NAME(STRING)
^W1REP("H","W4LEVD",0,"STRING","OUT")
STRING1
^W1REP("H","W4LEVD",0,"STRING","SET")
1
^W1REP("H","W4LEVD",0,"STRING1")
caer my;16H
^W1REP("H","W4LEVD",0,"STRING1","SET")
0
^W1REP("H","W4LEVD",0,"STRING1","SH")
1
^W1REP("H","W4LEVD",0,"x1")
dqipk jix`z;11,0
^W1REP("H","W4LEVD",0,"x2")
mei;3,0
^W1REP("H","W4LEVD",0,"x3")
dry;5,0
^W1REP("H","W4LEVD",0,"x4")
d`ivi jix`z;11,0
^W1REP("H","W4LEVD",0,"x5")
mei;3,0
^W1REP("H","W4LEVD",0,"x6")
dry;5,0
^W1REP("H","W4LEVD",0,"x7")
zery k"dq;9,2
^W1REP("H","W4LEVD",0,"x8")
;,
^W1REP("H","W4LEVD","COD")
KV*KV1*OV*STRING1*NOM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4LEVD","CT")
2*0*0
^W1REP("H","W4LEVD","FLD")
KV*OV*NOM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4LEVD","FLD0")
*********
^W1REP("H","W4LEVD","GLOB1")
^|$$^W3MAIN|TEMP(PRTN)
^W1REP("H","W4LEVD","GLOB2")
^|$$^W3MAIN|TEMP(PRTN,KV,STRING,NOM)
^W1REP("H","W4LEVD","LPT")
B
^W1REP("H","W4LEVD","MIUN")
1*2*3
^W1REP("H","W4LEVD","QUERY","xvewn micaer g""ec","CT")
2*0*0
^W1REP("H","W4LEVD","QUERY","xvewn micaer g""ec","FLD0")
KV*STRING*NOM
^W1REP("H","W4LEVD","QUERY","xvewn micaer g""ec","MIUN")
1*2*3
^W1REP("H","W4LEVD","QUERY","xvewn micaer g""ec","SIK0")
1*1*0
^W1REP("H","W4LEVD","SIK")
******1*
^W1REP("H","W4LEVD","SIK0")
1*1*0
^W1REP("H","W4LEVD","US",2)
D KV^W4LEVD
^W1REP("H","W4LEVD","US",3)
D OV^W4LEVD
^W1REP("H","W4LEVD","US",4)
D TM^W4LEVD
^W1REP("H","W4LKHZ")
zegewl itl migelyn gec
^W1REP("H","W4LKHZ",0,"EMAIL")
l"`ec;30
^W1REP("H","W4LKHZ",0,"EMAIL","SET")
0
^W1REP("H","W4LKHZ",0,"EMAIL","SH")
1
^W1REP("H","W4LKHZ",0,"KTV")
zaezk;25H
^W1REP("H","W4LKHZ",0,"KTV","SET")
0
^W1REP("H","W4LKHZ",0,"KTV","SH")
1
^W1REP("H","W4LKHZ",0,"LK")
gewl 'qn;10
^W1REP("H","W4LKHZ",0,"LK","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","W4LKHZ",0,"LK","OUT")
LK1
^W1REP("H","W4LKHZ",0,"LK","SET")
0
^W1REP("H","W4LKHZ",0,"LK1")
gewl my;25H
^W1REP("H","W4LKHZ",0,"LK1","SET")
0
^W1REP("H","W4LKHZ",0,"LK1","SH")
1
^W1REP("H","W4LKHZ",0,"TEL")
'lh;21
^W1REP("H","W4LKHZ",0,"TEL","SET")
0
^W1REP("H","W4LKHZ",0,"TEL","SH")
1
^W1REP("H","W4LKHZ",0,"x1")
zepnfd 'qn;5,0
^W1REP("H","W4LKHZ",0,"x2")
mekq;8,2
^W1REP("H","W4LKHZ",0,"x3")
;,
^W1REP("H","W4LKHZ","COD")
LK*LK1*KTV*TEL*EMAIL*x1*x2
^W1REP("H","W4LKHZ","FLD")
LK*KTV*TEL*EMAIL*x1*x2
^W1REP("H","W4LKHZ","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4LKHZ","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,LK)
^W1REP("H","W4LKHZ","SIK")
1*1*
^W1REP("H","W4LKHZ","US",2)
D LK^W4DLKHZ
^W1REP("H","W4LKTN")
zyx itipqa dtwda zexikn g"ec
^W1REP("H","W4LKTN",0,"HZ")
dpnfd;7
^W1REP("H","W4LKTN",0,"HZ","SET")
1
^W1REP("H","W4LKTN",0,"HZ","SH")
1
^W1REP("H","W4LKTN",0,"LK")
gewl zz 'qn;10
^W1REP("H","W4LKTN",0,"LK","FILE")
^|$$^W3MAIN|W4LK
^W1REP("H","W4LKTN",0,"LK","M2")
S LK1=$$LK1^W4LKTN(LK,$G(MSD))
^W1REP("H","W4LKTN",0,"LK","OUT")
LK1
^W1REP("H","W4LKTN",0,"LK","SET")
1
^W1REP("H","W4LKTN",0,"LK1")
gewl zz my;15H
^W1REP("H","W4LKTN",0,"LK1","SET")
0
^W1REP("H","W4LKTN",0,"LK1","SH")
1
^W1REP("H","W4LKTN",0,"LKG")
zegewl zveaw;5
^W1REP("H","W4LKTN",0,"LKG","FILE")
^|$$^W3MAIN|TMPLKG(PRTN)
^W1REP("H","W4LKTN",0,"LKG","OUT")
LKG1
^W1REP("H","W4LKTN",0,"LKG","SET")
0
^W1REP("H","W4LKTN",0,"LKG1")
dveaw my;12H
^W1REP("H","W4LKTN",0,"LKG1","SET")
0
^W1REP("H","W4LKTN",0,"LKG1","SH")
0
^W1REP("H","W4LKTN",0,"LKR")
gewl 'qn;10
^W1REP("H","W4LKTN",0,"LKR","FILE")
^|$$^W3MAIN|W4LK
^W1REP("H","W4LKTN",0,"LKR","M2")
S LKR1=$$LK1^W4LKTN(LKR,$G(MSD))
^W1REP("H","W4LKTN",0,"LKR","OUT")
LKR1
^W1REP("H","W4LKTN",0,"LKR","SET")
1
^W1REP("H","W4LKTN",0,"LKR1")
gewl my;15
^W1REP("H","W4LKTN",0,"LKR1","SET")
0
^W1REP("H","W4LKTN",0,"LKR1","SH")
1
^W1REP("H","W4LKTN",0,"MAZMIN")
oinfnd my;12H
^W1REP("H","W4LKTN",0,"MAZMIN","SET")
0
^W1REP("H","W4LKTN",0,"MAZMIN","SH")
1
^W1REP("H","W4LKTN",0,"MSD")
sipq;5
^W1REP("H","W4LKTN",0,"MSD","FILE")
^|$$^W3MAIN|TMPMSD(PRTN)
^W1REP("H","W4LKTN",0,"MSD","M2")
S MSD1=$$MSD^W3R(MSD)
^W1REP("H","W4LKTN",0,"MSD","OUT")
MSD1
^W1REP("H","W4LKTN",0,"MSD","SET")
1
^W1REP("H","W4LKTN",0,"MSD1")
sipq my;12H
^W1REP("H","W4LKTN",0,"MSD1","SET")
0
^W1REP("H","W4LKTN",0,"MSD1","SH")
1
^W1REP("H","W4LKTN",0,"TRH")
jix`z;8D
^W1REP("H","W4LKTN",0,"TRH","SET")
0
^W1REP("H","W4LKTN",0,"TRH","SH")
1
^W1REP("H","W4LKTN",0,"x1")
mekq;8,2
^W1REP("H","W4LKTN",0,"x2")
oinfnd my;12,0
^W1REP("H","W4LKTN",0,"x3")
oetlh;11,0
^W1REP("H","W4LKTN",0,"x4")
;,
^W1REP("H","W4LKTN","COD")
LKG*LKG1*LKR*LKR1*LK*LK1*TRH*MSD*MSD1*HZ*x1*x2*x3
^W1REP("H","W4LKTN","CT")
2*0*0*0
^W1REP("H","W4LKTN","FLD")
LKG*LKR*LK*TRH*MSD*HZ*x1*x2*x3
^W1REP("H","W4LKTN","FLD0")
LK*TRH*MSD*HZ
^W1REP("H","W4LKTN","GLOB1")
^|$$^W3MAIN|W4LKTN(MSDR)
^W1REP("H","W4LKTN","GLOB2")
^|$$^W3MAIN|W4LKTN(MSDR,DT,MSD,LKR,LK,HZ)
^W1REP("H","W4LKTN","LPT")
B
^W1REP("H","W4LKTN","MAM")
1***
^W1REP("H","W4LKTN","MIUN")
1*2*3*4
^W1REP("H","W4LKTN","QUERY","fkexn mikix`z itl zegewl","CT")
2*0*0*0**0
^W1REP("H","W4LKTN","QUERY","fkexn mikix`z itl zegewl","FLD0")
L*T*M*H*-*
^W1REP("H","W4LKTN","QUERY","fkexn mikix`z itl zegewl","MIUN")
1*2*3*4**
^W1REP("H","W4LKTN","QUERY","fkexn mikix`z itl zegewl","SIK0")
1*1*1*0**0
^W1REP("H","W4LKTN","QUERY","fkexn zegewl itl mikix`z","CT")
0*0*2*0**0
^W1REP("H","W4LKTN","QUERY","fkexn zegewl itl mikix`z","FLD0")
L*T*M*H*-*
^W1REP("H","W4LKTN","QUERY","fkexn zegewl itl mikix`z","MIUN")
2*3*1*4**
^W1REP("H","W4LKTN","QUERY","fkexn zegewl itl mikix`z","SIK0")
1*1*1*0**0
^W1REP("H","W4LKTN","QUERY","zepnfde mikix`z itl zegewl","CT")
2*0*0*0
^W1REP("H","W4LKTN","QUERY","zepnfde mikix`z itl zegewl","FLD0")
LK*TRH*MSD*HZ
^W1REP("H","W4LKTN","QUERY","zepnfde mikix`z itl zegewl","MIUN")
1*2*3*4
^W1REP("H","W4LKTN","QUERY","zepnfde mikix`z itl zegewl","SIK0")
1*1*1*0
^W1REP("H","W4LKTN","QUERY","zepnfde zegewl itl mikix`z","CT")
0*0*2*0
^W1REP("H","W4LKTN","QUERY","zepnfde zegewl itl mikix`z","FLD0")
LK*TRH*MSD*HZ
^W1REP("H","W4LKTN","QUERY","zepnfde zegewl itl mikix`z","MIUN")
2*3*1*4
^W1REP("H","W4LKTN","QUERY","zepnfde zegewl itl mikix`z","SIK0")
1*1*1*0
^W1REP("H","W4LKTN","SIK")
1***
^W1REP("H","W4LKTN","SIK0")
1*1*1*0
^W1REP("H","W4LKTN","US",-1)
D MSDR^W4LKTN
^W1REP("H","W4LKTN","US",2)
D DT^W4LKTN
^W1REP("H","W4LKTN","US",3)
D MSD^W4LKTN
^W1REP("H","W4LKTN","US",4)
D LKR^W4LKTN
^W1REP("H","W4LKTN","US",5)
D LK^W4LKTN
^W1REP("H","W4LKTN","US",6)
D HZ^W4LKTN
^W1REP("H","W4LVDT")
mikix`z itl micaer g"ec
^W1REP("H","W4LVDT",0,"DAT")
dqipk jix`z;8D
^W1REP("H","W4LVDT",0,"DAT","SET")
0
^W1REP("H","W4LVDT",0,"DAT","SH")
1
^W1REP("H","W4LVDT",0,"KV")
dveaw 'qn;9
^W1REP("H","W4LVDT",0,"KV","FILE")
^|$$^%W1UCI(JB)|LEVKVZ
^W1REP("H","W4LVDT",0,"KV","M2")
S KV1=$G(@$$^W4GL("LEVKVZ")@(KV))
^W1REP("H","W4LVDT",0,"KV","OUT")
KV1
^W1REP("H","W4LVDT",0,"KV","SET")
0
^W1REP("H","W4LVDT",0,"KV1")
dveaw my;12H
^W1REP("H","W4LVDT",0,"KV1","SET")
0
^W1REP("H","W4LVDT",0,"KV1","SH")
1
^W1REP("H","W4LVDT",0,"NOM")
dxey;5
^W1REP("H","W4LVDT",0,"NOM","SET")
1
^W1REP("H","W4LVDT",0,"NOM","SH")
1
^W1REP("H","W4LVDT",0,"OV")
caer 'qn;5
^W1REP("H","W4LVDT",0,"OV","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4LVDT",0,"OV","OUT")
STRING1
^W1REP("H","W4LVDT",0,"OV","SET")
0
^W1REP("H","W4LVDT",0,"STRING")
caer 'qn;8
^W1REP("H","W4LVDT",0,"STRING","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4LVDT",0,"STRING","M2")
S STRING1=$$^W4NAME(STRING)
^W1REP("H","W4LVDT",0,"STRING","OUT")
STRING1
^W1REP("H","W4LVDT",0,"STRING","SET")
1
^W1REP("H","W4LVDT",0,"STRING1")
caer my;16H
^W1REP("H","W4LVDT",0,"STRING1","SET")
0
^W1REP("H","W4LVDT",0,"STRING1","SH")
1
^W1REP("H","W4LVDT",0,"x1")
mei;3,0
^W1REP("H","W4LVDT",0,"x2")
dry;5,0
^W1REP("H","W4LVDT",0,"x3")
d`ivi jix`z;11,0
^W1REP("H","W4LVDT",0,"x4")
mei;3,0
^W1REP("H","W4LVDT",0,"x5")
dry;5,0
^W1REP("H","W4LVDT",0,"x6")
zery k"dq;7,2
^W1REP("H","W4LVDT",0,"x7")
xky;7,2
^W1REP("H","W4LVDT",0,"x8")
;,
^W1REP("H","W4LVDT","COD")
DAT*OV*STRING1*NOM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4LVDT","CT")
2*0*0
^W1REP("H","W4LVDT","FLD")
DAT*OV*NOM*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4LVDT","FLD0")
K*S*N******
^W1REP("H","W4LVDT","GLOB1")
^|$$^%W1UCI(JB)|TEMP(PRTN)
^W1REP("H","W4LVDT","GLOB2")
^|$$^%W1UCI(JB)|TEMP(PRTN,DT,STRING,NOM)
^W1REP("H","W4LVDT","LPT")
B
^W1REP("H","W4LVDT","MIUN")
1*2*3
^W1REP("H","W4LVDT","QUERY","mikix`z itl micaer g""ec","CT")
2*0*0
^W1REP("H","W4LVDT","QUERY","mikix`z itl micaer g""ec","FLD0")
KV*STRING*NOM
^W1REP("H","W4LVDT","QUERY","mikix`z itl micaer g""ec","MIUN")
1*2*3
^W1REP("H","W4LVDT","QUERY","mikix`z itl micaer g""ec","SIK0")
1*0*0
^W1REP("H","W4LVDT","SIK")
*****1*1*
^W1REP("H","W4LVDT","SIK0")
1*0*0
^W1REP("H","W4LVDT","US",0)
D DT^W4LVDT
^W1REP("H","W4LVDT","US",2)
D DT^W4LVDT
^W1REP("H","W4LVDT","US",3)
D OV^W4LVDT
^W1REP("H","W4LVDT","US",4)
D TM^W4LVDT
^W1REP("H","W4MHRA")
zewlgn itl zexikn
^W1REP("H","W4MHRA",0,"DAT")
jix`z;8D
^W1REP("H","W4MHRA",0,"DAT","SH")
1
^W1REP("H","W4MHRA",0,"DATT")
jix`z;8D
^W1REP("H","W4MHRA",0,"DATT","SET")
0
^W1REP("H","W4MHRA",0,"DATT","SH")
1
^W1REP("H","W4MHRA",0,"MHL")
dwlgn;5
^W1REP("H","W4MHRA",0,"MHL","FILE")
^|$$^%W1UCI(JB)|DEP
^W1REP("H","W4MHRA",0,"MHL","OUT")
MHL1
^W1REP("H","W4MHRA",0,"MHL","SET")
0
^W1REP("H","W4MHRA",0,"MHL1")
xe`z;12H
^W1REP("H","W4MHRA",0,"MHL1","SET")
0
^W1REP("H","W4MHRA",0,"MHL1","SH")
0
^W1REP("H","W4MHRA",0,"PAR")
hixt;8
^W1REP("H","W4MHRA",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4MHRA",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("H","W4MHRA",0,"PAR","OUT")
PAR1
^W1REP("H","W4MHRA",0,"PAR","SET")
0
^W1REP("H","W4MHRA",0,"PAR1")
hixt my;12H
^W1REP("H","W4MHRA",0,"PAR1","SET")
0
^W1REP("H","W4MHRA",0,"PAR1","SH")
1
^W1REP("H","W4MHRA",0,"PARIT")
hixt cew;8.
^W1REP("H","W4MHRA",0,"PARIT","FILE")
^PAR
^W1REP("H","W4MHRA",0,"PARIT","M2")
D PAR1^L2MHIRA
^W1REP("H","W4MHRA",0,"PARIT","OUT")
PARIT1
^W1REP("H","W4MHRA",0,"PARIT1")
hixt xe`z;18H
^W1REP("H","W4MHRA",0,"PARIT1","SH")
0
^W1REP("H","W4MHRA",0,"SUGP")
dveaw;5
^W1REP("H","W4MHRA",0,"SUGP","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","W4MHRA",0,"SUGP","OUT")
SUGP1
^W1REP("H","W4MHRA",0,"SUGP","SET")
0
^W1REP("H","W4MHRA",0,"SUGP1")
dveaw xe`z;12H
^W1REP("H","W4MHRA",0,"SUGP1","SET")
0
^W1REP("H","W4MHRA",0,"SUGP1","SH")
0
^W1REP("H","W4MHRA",0,"x1")
zenk;7,2
^W1REP("H","W4MHRA",0,"x2")
mekq;10,2
^W1REP("H","W4MHRA",0,"x3")
zegpd;7,2
^W1REP("H","W4MHRA",0,"x4")
zegpd ixg`;10,2
^W1REP("H","W4MHRA",0,"x5")
rvenn xign;10,2
^W1REP("H","W4MHRA",0,"x6")
n"rn iptl;10,2
^W1REP("H","W4MHRA",0,"x7")
;,
^W1REP("H","W4MHRA","COD")
MHL*MHL1*SUGP*SUGP1*PAR*PAR1*DATT*x1*x2*x3*x4*x5*x6
^W1REP("H","W4MHRA","CT")
1*2*0*0*2*0*0
^W1REP("H","W4MHRA","FLD")
MHL*SUGP*PAR*DATT*x1*x2*x3*x4*x5*x6
^W1REP("H","W4MHRA","FLD0")
***-****
^W1REP("H","W4MHRA","GLOB1")
^|$$^%W1UCI(JB)|PLUTOT
^W1REP("H","W4MHRA","GLOB2")
^|$$^%W1UCI(JB)|PLUTOT(DAT,MRK,PARIT)
^W1REP("H","W4MHRA","LPT")
S
^W1REP("H","W4MHRA","MIUN")
1*2*3*4*3*4**0
^W1REP("H","W4MHRA","QUERY","mini itl fkexn","CT")
1*2*0*0*2*0*0
^W1REP("H","W4MHRA","QUERY","mini itl fkexn","FLD0")
-*-*-******-*
^W1REP("H","W4MHRA","QUERY","mini itl fkexn","MIUN")
1*3*4*1*3*4**0
^W1REP("H","W4MHRA","QUERY","mini itl fkexn","SIK0")
1*1*0*0*1*0*0
^W1REP("H","W4MHRA","QUERY","mini itl hxetn","CT")
1*2*0*2*2*0*0
^W1REP("H","W4MHRA","QUERY","mini itl hxetn","FLD0")
*******
^W1REP("H","W4MHRA","QUERY","mini itl hxetn","MIUN")
1*3*4*2*3*4**0
^W1REP("H","W4MHRA","QUERY","mini itl hxetn","SIK0")
1*1*0*1*1*0*0
^W1REP("H","W4MHRA","QUERY","zeveaw ila hxetn","CT")
1*2*0*0*2*0*0
^W1REP("H","W4MHRA","QUERY","zeveaw ila hxetn","FLD0")
*-**-****
^W1REP("H","W4MHRA","QUERY","zeveaw ila hxetn","MIUN")
1*2*3*4*3*4**0
^W1REP("H","W4MHRA","QUERY","zeveaw ila hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("H","W4MHRA","QUERY","zeveawe zewlgn itl fkexn","CT")
2*0*0*0*2*0*0
^W1REP("H","W4MHRA","QUERY","zeveawe zewlgn itl fkexn","FLD0")
**-*-*****-*
^W1REP("H","W4MHRA","QUERY","zeveawe zewlgn itl fkexn","MIUN")
1*2*3*4*3*4**0
^W1REP("H","W4MHRA","QUERY","zeveawe zewlgn itl fkexn","SIK0")
1*0*0*0*1*0*0
^W1REP("H","W4MHRA","QUERY","zeveawe zewlgn itl hxetn","CT")
1*2*0*0*2*0*0
^W1REP("H","W4MHRA","QUERY","zeveawe zewlgn itl hxetn","FLD0")
***-****
^W1REP("H","W4MHRA","QUERY","zeveawe zewlgn itl hxetn","MIUN")
1*2*3*4*3*4**0
^W1REP("H","W4MHRA","QUERY","zeveawe zewlgn itl hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("H","W4MHRA","SIK")
1*1*1*1*0*1**
^W1REP("H","W4MHRA","SIK0")
1*1*0*0*1*0*0
^W1REP("H","W4MHRA","US",1)
D DAT^W4DEPGR
^W1REP("H","W4MHRA","US",3)
D PAR^W4DEPGR
^W1REP("H","W4MHRB")
zewlgn itl zexikn
^W1REP("H","W4MHRB",0,"DAT")
jix`z;8D
^W1REP("H","W4MHRB",0,"DAT","SH")
1
^W1REP("H","W4MHRB",0,"DATT")
jix`z;8D
^W1REP("H","W4MHRB",0,"DATT","SET")
0
^W1REP("H","W4MHRB",0,"DATT","SH")
1
^W1REP("H","W4MHRB",0,"MHL")
dwlgn;5
^W1REP("H","W4MHRB",0,"MHL","FILE")
^|$$^%W1UCI(JB)|DEP
^W1REP("H","W4MHRB",0,"MHL","OUT")
MHL1
^W1REP("H","W4MHRB",0,"MHL","SET")
0
^W1REP("H","W4MHRB",0,"MHL1")
xe`z;12H
^W1REP("H","W4MHRB",0,"MHL1","SET")
0
^W1REP("H","W4MHRB",0,"MHL1","SH")
0
^W1REP("H","W4MHRB",0,"PAR")
hixt;8
^W1REP("H","W4MHRB",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4MHRB",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("H","W4MHRB",0,"PAR","OUT")
PAR1
^W1REP("H","W4MHRB",0,"PAR","SET")
0
^W1REP("H","W4MHRB",0,"PAR1")
hixt my;12H
^W1REP("H","W4MHRB",0,"PAR1","SET")
0
^W1REP("H","W4MHRB",0,"PAR1","SH")
1
^W1REP("H","W4MHRB",0,"PARIT")
hixt cew;8.
^W1REP("H","W4MHRB",0,"PARIT","FILE")
^PAR
^W1REP("H","W4MHRB",0,"PARIT","M2")
D PAR1^L2MHIRA
^W1REP("H","W4MHRB",0,"PARIT","OUT")
PARIT1
^W1REP("H","W4MHRB",0,"PARIT1")
hixt xe`z;18H
^W1REP("H","W4MHRB",0,"PARIT1","SH")
0
^W1REP("H","W4MHRB",0,"SUGP")
dveaw;5
^W1REP("H","W4MHRB",0,"SUGP","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","W4MHRB",0,"SUGP","OUT")
SUGP1
^W1REP("H","W4MHRB",0,"SUGP","SET")
0
^W1REP("H","W4MHRB",0,"SUGP1")
dveaw xe`z;12H
^W1REP("H","W4MHRB",0,"SUGP1","SET")
0
^W1REP("H","W4MHRB",0,"SUGP1","SH")
0
^W1REP("H","W4MHRB",0,"x1")
e`viy milehia;7,1
^W1REP("H","W4MHRB",0,"x2")
ehp zenk;7,1
^W1REP("H","W4MHRB",0,"x3")
mekq;10,2
^W1REP("H","W4MHRB",0,"x4")
zepnl zegpd;10,2
^W1REP("H","W4MHRB",0,"x5")
zegpd ixg`;10,2
^W1REP("H","W4MHRB",0,"x6")
rvenn xign;10,2
^W1REP("H","W4MHRB",0,"x7")
n"rn iptl;9,2
^W1REP("H","W4MHRB",0,"x8")
n"rn iptl;9,2
^W1REP("H","W4MHRB",0,"x9")
;,
^W1REP("H","W4MHRB","COD")
MHL*MHL1*SUGP*SUGP1*PAR*PAR1*DATT*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4MHRB","CT")
1*2*0*0*2*0*0
^W1REP("H","W4MHRB","FLD")
MHL*SUGP*PAR*DATT*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4MHRB","FLD0")
***-****
^W1REP("H","W4MHRB","GLOB1")
^|$$^%W1UCI(JB)|PLUTOT
^W1REP("H","W4MHRB","GLOB2")
^|$$^%W1UCI(JB)|PLUTOT(DAT,MRK,PARIT)
^W1REP("H","W4MHRB","LPT")
S
^W1REP("H","W4MHRB","MIUN")
1*2*3*4*3*4**0
^W1REP("H","W4MHRB","QUERY","mini itl fkexn","CT")
1*2*0*0*2*0*0
^W1REP("H","W4MHRB","QUERY","mini itl fkexn","FLD0")
-*-*-******-*
^W1REP("H","W4MHRB","QUERY","mini itl fkexn","MIUN")
1*3*4*1*3*4**0
^W1REP("H","W4MHRB","QUERY","mini itl fkexn","SIK0")
1*1*0*0*1*0*0
^W1REP("H","W4MHRB","QUERY","mini itl hxetn","CT")
1*2*0*2*2*0*0
^W1REP("H","W4MHRB","QUERY","mini itl hxetn","FLD0")
*******
^W1REP("H","W4MHRB","QUERY","mini itl hxetn","MIUN")
1*3*4*2*3*4**0
^W1REP("H","W4MHRB","QUERY","mini itl hxetn","SIK0")
1*1*0*1*1*0*0
^W1REP("H","W4MHRB","QUERY","zeveaw ila hxetn","CT")
1*2*0*0*2*0*0
^W1REP("H","W4MHRB","QUERY","zeveaw ila hxetn","FLD0")
*-**-****
^W1REP("H","W4MHRB","QUERY","zeveaw ila hxetn","MIUN")
1*2*3*4*3*4**0
^W1REP("H","W4MHRB","QUERY","zeveaw ila hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("H","W4MHRB","QUERY","zeveawe zewlgn itl fkexn","CT")
2*0*0*0*2*0*0
^W1REP("H","W4MHRB","QUERY","zeveawe zewlgn itl fkexn","FLD0")
**-*-*****-*
^W1REP("H","W4MHRB","QUERY","zeveawe zewlgn itl fkexn","MIUN")
1*2*3*4*3*4**0
^W1REP("H","W4MHRB","QUERY","zeveawe zewlgn itl fkexn","SIK0")
1*0*0*0*1*0*0
^W1REP("H","W4MHRB","QUERY","zeveawe zewlgn itl hxetn","CT")
1*2*0*0*2*0*0
^W1REP("H","W4MHRB","QUERY","zeveawe zewlgn itl hxetn","FLD0")
***-****
^W1REP("H","W4MHRB","QUERY","zeveawe zewlgn itl hxetn","MIUN")
1*2*3*4*3*4**0
^W1REP("H","W4MHRB","QUERY","zeveawe zewlgn itl hxetn","SIK0")
1*1*0*0*1*0*0
^W1REP("H","W4MHRB","SIK")
1*1*1*1*1*0*1*1*
^W1REP("H","W4MHRB","SIK0")
1*1*0*0*1*0*0
^W1REP("H","W4MHRB","US",1)
D DAT^W4DEPGR
^W1REP("H","W4MHRB","US",3)
D PAR^W4DEPGR
^W1REP("H","W4MLMIN")
menipin i`ln zgz mi`vnp mihixt g"ec
^W1REP("H","W4MLMIN",0,"DEP")
dwlgn 'qn;5
^W1REP("H","W4MLMIN",0,"DEP","FILE")
^|$$^%W1UCI(JB)|MLDEP
^W1REP("H","W4MLMIN",0,"DEP","M2")
S DEP1=$$DEP1^W4RMMLY(PAR)
^W1REP("H","W4MLMIN",0,"DEP","OUT")
DEP1
^W1REP("H","W4MLMIN",0,"DEP","SET")
0
^W1REP("H","W4MLMIN",0,"DEP1")
dwlgn xe`z;16H
^W1REP("H","W4MLMIN",0,"DEP1","SET")
0
^W1REP("H","W4MLMIN",0,"DEP1","SH")
1
^W1REP("H","W4MLMIN",0,"KVZ")
dveaw 'qn;7
^W1REP("H","W4MLMIN",0,"KVZ","FILE")
^|$$^%W1UCI(JB)|MLSUGP
^W1REP("H","W4MLMIN",0,"KVZ","M2")
S KVZ1=$$KVZ1^W4RMMLY(PAR)
^W1REP("H","W4MLMIN",0,"KVZ","OUT")
KVZ1
^W1REP("H","W4MLMIN",0,"KVZ","SET")
0
^W1REP("H","W4MLMIN",0,"KVZ1")
dveaw my;16H
^W1REP("H","W4MLMIN",0,"KVZ1","SET")
0
^W1REP("H","W4MLMIN",0,"KVZ1","SH")
1
^W1REP("H","W4MLMIN",0,"PAR")
hixt 'qn;8
^W1REP("H","W4MLMIN",0,"PAR","FILE")
^|$$^%W1UCI(JB)|MLPAR
^W1REP("H","W4MLMIN",0,"PAR","OUT")
PAR1
^W1REP("H","W4MLMIN",0,"PAR","SET")
0
^W1REP("H","W4MLMIN",0,"PAR1")
hixt my;18H
^W1REP("H","W4MLMIN",0,"PAR1","SET")
0
^W1REP("H","W4MLMIN",0,"PAR1","SH")
1
^W1REP("H","W4MLMIN",0,"SPK")
wtq 'qn;7
^W1REP("H","W4MLMIN",0,"SPK","FILE")
^|$$^%W1UCI(JB)|W4SPK
^W1REP("H","W4MLMIN",0,"SPK","OUT")
SPK1
^W1REP("H","W4MLMIN",0,"SPK","SET")
0
^W1REP("H","W4MLMIN",0,"SPK1")
wtq my;18H
^W1REP("H","W4MLMIN",0,"SPK1","SET")
0
^W1REP("H","W4MLMIN",0,"SPK1","SH")
1
^W1REP("H","W4MLMIN",0,"x1")
dcin zcigi;10,0
^W1REP("H","W4MLMIN",0,"x2")
menipin i`ln;7,2
^W1REP("H","W4MLMIN",0,"x3")
lreta zenk;7,2
^W1REP("H","W4MLMIN",0,"x4")
yxtd;7,2
^W1REP("H","W4MLMIN",0,"x5")
;,
^W1REP("H","W4MLMIN","COD")
SPK*SPK1*DEP*DEP1*KVZ*KVZ1*PAR*PAR1*x1*x2*x3*x4
^W1REP("H","W4MLMIN","CT")
1*2*2*0
^W1REP("H","W4MLMIN","FLD")
SPK*DEP*KVZ*PAR*x1*x2*x3*x4
^W1REP("H","W4MLMIN","FLD0")
SPK*DEP*KVZ*PAR
^W1REP("H","W4MLMIN","GLOB1")
^|$$^%W1UCI(JB)|MLPAR
^W1REP("H","W4MLMIN","GLOB2")
^|$$^%W1UCI(JB)|MLPAR(PAR)
^W1REP("H","W4MLMIN","LPT")
B
^W1REP("H","W4MLMIN","MAM")
****
^W1REP("H","W4MLMIN","MIUN")
1*2*3*4
^W1REP("H","W4MLMIN","QUERY","i`lnd znx zgz mi`vnpy mihixt g""ec","CT")
1*2*2*0
^W1REP("H","W4MLMIN","QUERY","i`lnd znx zgz mi`vnpy mihixt g""ec","FLD0")
SPK*DEP*KVZ*PAR
^W1REP("H","W4MLMIN","QUERY","i`lnd znx zgz mi`vnpy mihixt g""ec","MIUN")
1*2*3*4
^W1REP("H","W4MLMIN","QUERY","i`lnd znx zgz mi`vnpy mihixt g""ec","SIK0")
1*1*1*0
^W1REP("H","W4MLMIN","SIK")
*1*1*1*
^W1REP("H","W4MLMIN","SIK0")
1*1*1*0
^W1REP("H","W4MLMIN","US",1)
D PAR^W4RMMLY
^W1REP("H","W4MLTNQ")
izenk i`ln zerepz g"ec
^W1REP("H","W4MLTNQ",0,"DAT")
jix`z;8D
^W1REP("H","W4MLTNQ",0,"DAT","SET")
0
^W1REP("H","W4MLTNQ",0,"DAT","SH")
1
^W1REP("H","W4MLTNQ",0,"DAT1")
FF;0
^W1REP("H","W4MLTNQ",0,"DAT1","SET")
0
^W1REP("H","W4MLTNQ",0,"DAT1","SH")
1
^W1REP("H","W4MLTNQ",0,"DEP")
dwlgn 'qn;5
^W1REP("H","W4MLTNQ",0,"DEP","FILE")
^|$$^%W1UCI(JB)|MLDEP
^W1REP("H","W4MLTNQ",0,"DEP","OUT")
DEP1
^W1REP("H","W4MLTNQ",0,"DEP","SET")
0
^W1REP("H","W4MLTNQ",0,"DEP1")
dwlgn my;16H
^W1REP("H","W4MLTNQ",0,"DEP1","SET")
0
^W1REP("H","W4MLTNQ",0,"DEP1","SH")
1
^W1REP("H","W4MLTNQ",0,"EM")
dcin 'gi;7H
^W1REP("H","W4MLTNQ",0,"EM","SET")
0
^W1REP("H","W4MLTNQ",0,"EM","SH")
1
^W1REP("H","W4MLTNQ",0,"PAR")
hixt cew;8
^W1REP("H","W4MLTNQ",0,"PAR","FILE")
^|$$^%W1UCI(JB)|MLPRT
^W1REP("H","W4MLTNQ",0,"PAR","M2")
S PAR1=$$MLNAME^W4MLPRT(PAR)
^W1REP("H","W4MLTNQ",0,"PAR","OUT")
PAR1
^W1REP("H","W4MLTNQ",0,"PAR","SET")
1
^W1REP("H","W4MLTNQ",0,"PAR1")
hixt my;18H
^W1REP("H","W4MLTNQ",0,"PAR1","SET")
0
^W1REP("H","W4MLTNQ",0,"PAR1","SH")
1
^W1REP("H","W4MLTNQ",0,"SUG")
dveaw 'qn;5
^W1REP("H","W4MLTNQ",0,"SUG","FILE")
^|$$^%W1UCI(JB)|MLSUGP
^W1REP("H","W4MLTNQ",0,"SUG","OUT")
SUG1
^W1REP("H","W4MLTNQ",0,"SUG","SET")
0
^W1REP("H","W4MLTNQ",0,"SUG1")
dveaw my;14
^W1REP("H","W4MLTNQ",0,"SUG1","SET")
0
^W1REP("H","W4MLTNQ",0,"SUG1","SH")
1
^W1REP("H","W4MLTNQ",0,"x1")
dcin 'gi;8,0
^W1REP("H","W4MLTNQ",0,"x2")
okxvl xign;7,1
^W1REP("H","W4MLTNQ",0,"x3")
zizlgzd dxzi;7,1
^W1REP("H","W4MLTNQ",0,"x4")
dqpkd;7,1
^W1REP("H","W4MLTNQ",0,"x5")
xfgd;7,1
^W1REP("H","W4MLTNQ",0,"x6")
d`ved;7,1
^W1REP("H","W4MLTNQ",0,"x7")
ziteq dxzi;7,1
^W1REP("H","W4MLTNQ","COD")
DEP*DEP1*SUG*SUG1*PAR*PAR1*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4MLTNQ","CT")
2*0*0
^W1REP("H","W4MLTNQ","FLD")
DEP*SUG*PAR*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","W4MLTNQ","FLD0")
DEP*SUG*PAR
^W1REP("H","W4MLTNQ","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4MLTNQ","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,PAR)
^W1REP("H","W4MLTNQ","LPT")
B
^W1REP("H","W4MLTNQ","MAM")
******
^W1REP("H","W4MLTNQ","MIUN")
1*2*3
^W1REP("H","W4MLTNQ","QUERY","izenk i`ln zerepz g""ec","CT")
2*0*0
^W1REP("H","W4MLTNQ","QUERY","izenk i`ln zerepz g""ec","FLD0")
DEP*SUG*PAR
^W1REP("H","W4MLTNQ","QUERY","izenk i`ln zerepz g""ec","MIUN")
1*2*3
^W1REP("H","W4MLTNQ","QUERY","izenk i`ln zerepz g""ec","SIK0")
1*1*0
^W1REP("H","W4MLTNQ","SIK")
*1*1*1*1*1*1
^W1REP("H","W4MLTNQ","SIK0")
1*1*0
^W1REP("H","W4MLTNQ","US",2)
D PAR^W4MLTNQ
^W1REP("H","W4MNYA")
mitipq itl itqk dwica g"ec
^W1REP("H","W4MNYA",0,"DAT")
jix`z;8D
^W1REP("H","W4MNYA",0,"DAT","SET")
0
^W1REP("H","W4MNYA",0,"DAT","SH")
1
^W1REP("H","W4MNYA",0,"MSD")
dcrqn;6
^W1REP("H","W4MNYA",0,"MSD","FILE")
^|$$^W3MAIN|W3MSD
^W1REP("H","W4MNYA",0,"MSD","OUT")
MSD1
^W1REP("H","W4MNYA",0,"MSD","SET")
1
^W1REP("H","W4MNYA",0,"MSD1")
dcrqn my;10H
^W1REP("H","W4MNYA",0,"MSD1","SET")
0
^W1REP("H","W4MNYA",0,"MSD1","SH")
0
^W1REP("H","W4MNYA",0,"MSDR")
zyx;6
^W1REP("H","W4MNYA",0,"MSDR","FILE")
^["/home/www2order/app/mumps/mumps.gld"]TMPMSDR("JB1")
^W1REP("H","W4MNYA",0,"MSDR","OUT")
MSDR1
^W1REP("H","W4MNYA",0,"MSDR","SET")
0
^W1REP("H","W4MNYA",0,"MSDR1")
zyx my;12H
^W1REP("H","W4MNYA",0,"MSDR1","SET")
0
^W1REP("H","W4MNYA",0,"MSDR1","SH")
1
^W1REP("H","W4MNYA",0,"TRH")
jix`z;8D
^W1REP("H","W4MNYA",0,"TRH","SET")
0
^W1REP("H","W4MNYA",0,"TRH","SH")
1
^W1REP("H","W4MNYA",0,"x1")
itqk g"ec oeict;8,2
^W1REP("H","W4MNYA",0,"x10")
xcey;7,2
^W1REP("H","W4MNYA",0,"x11")
CAJ;7,2
^W1REP("H","W4MNYA",0,"x12")
yxtd;7,2
^W1REP("H","W4MNYA",0,"x13")
;,
^W1REP("H","W4MNYA",0,"x14")
;,
^W1REP("H","W4MNYA",0,"x2")
cf oeict;8,2
^W1REP("H","W4MNYA",0,"x3")
yxtd;7,2
^W1REP("H","W4MNYA",0,"x4")
itqk g"ec dtwd;8,2
^W1REP("H","W4MNYA",0,"x5")
cf ztwd;8,2
^W1REP("H","W4MNYA",0,"x6")
yxtd;7,2
^W1REP("H","W4MNYA",0,"x7")
zyx zexikn;8,2
^W1REP("H","W4MNYA",0,"x8")
yxtd;7,2
^W1REP("H","W4MNYA",0,"x9")
`"k;7,2
^W1REP("H","W4MNYA","COD")
TRH*MSDR*MSDR1*MSD*MSD1*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11*x12
^W1REP("H","W4MNYA","CT")
0*2*0
^W1REP("H","W4MNYA","FLD")
TRH*MSDR*MSD*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11*x12
^W1REP("H","W4MNYA","FLD0")
TRH*MSDR*MSD
^W1REP("H","W4MNYA","GLOB1")
^|$$^W3MAIN|W4MNYALL
^W1REP("H","W4MNYA","GLOB2")
^|$$^W3MAIN|W4MNYALL(DT,MSD)
^W1REP("H","W4MNYA","LPT")
B
^W1REP("H","W4MNYA","MAM")
1*1*1*1*1*1*1*1*1*1*1*1**
^W1REP("H","W4MNYA","MIUN")
3*1*2
^W1REP("H","W4MNYA","QUERY","mikix`ze zecrqn itl oein","CT")
0*2*0
^W1REP("H","W4MNYA","QUERY","mikix`ze zecrqn itl oein","FLD0")
TRH*MSDR*MSD
^W1REP("H","W4MNYA","QUERY","mikix`ze zecrqn itl oein","MIUN")
3*1*2
^W1REP("H","W4MNYA","QUERY","mikix`ze zecrqn itl oein","SIK0")
0*1*1
^W1REP("H","W4MNYA","QUERY","zecrqne mikix`z itl oein","CT")
2*0*0
^W1REP("H","W4MNYA","QUERY","zecrqne mikix`z itl oein","FLD0")
TRH*MSDR*MSD
^W1REP("H","W4MNYA","QUERY","zecrqne mikix`z itl oein","MIUN")
1*2*3
^W1REP("H","W4MNYA","QUERY","zecrqne mikix`z itl oein","SIK0")
1*1*0
^W1REP("H","W4MNYA","SIK")
1*1*1*1*1*1*1*1*1*1*1*1**
^W1REP("H","W4MNYA","SIK0")
0*1*1
^W1REP("H","W4MNYA","US",1)
D DT^W4MNYA
^W1REP("H","W4MNYA","US",2)
D MSD^W4MNYA
^W1REP("H","W4MNYZ")
mitipq itl onefn g"ec
^W1REP("H","W4MNYZ",0,"DAT")
jix`z;8D
^W1REP("H","W4MNYZ",0,"DAT","SET")
0
^W1REP("H","W4MNYZ",0,"DAT","SH")
1
^W1REP("H","W4MNYZ",0,"MSD")
sipq;5
^W1REP("H","W4MNYZ",0,"MSD","FILE")
^|$$^W3MAIN|TMPSN
^W1REP("H","W4MNYZ",0,"MSD","M2")
S MSD1=$$MSD^W3R(MSD)
^W1REP("H","W4MNYZ",0,"MSD","OUT")
MSD1
^W1REP("H","W4MNYZ",0,"MSD","SET")
1
^W1REP("H","W4MNYZ",0,"MSD1")
sipq my;15H
^W1REP("H","W4MNYZ",0,"MSD1","OUT")
1
^W1REP("H","W4MNYZ",0,"MSD1","SET")
0
^W1REP("H","W4MNYZ",0,"x1")
ehp oeict;8,2
^W1REP("H","W4MNYZ",0,"x10")
mewna zepnfd 'qn;5,0
^W1REP("H","W4MNYZ",0,"x11")
zgwl zepnfd 'qn;5,0
^W1REP("H","W4MNYZ",0,"x12")
zelhean zepnfd k"dq;7,2
^W1REP("H","W4MNYZ",0,"x13")
zegpd;7,2
^W1REP("H","W4MNYZ",0,"x14")
miiekif;7,2
^W1REP("H","W4MNYZ",0,"x15")
;,
^W1REP("H","W4MNYZ",0,"x2")
dtew onefn;7,2
^W1REP("H","W4MNYZ",0,"x3")
zelaw onefn;7,2
^W1REP("H","W4MNYZ",0,"x4")
onefn k"dq;7,2
^W1REP("H","W4MNYZ",0,"x5")
;,
^W1REP("H","W4MNYZ",0,"x6")
zgwl k"dq;7,2
^W1REP("H","W4MNYZ",0,"x7")
zepnfd 'qn;5,0
^W1REP("H","W4MNYZ",0,"x8")
hpxhpi` zepnfd 'qn;5,0
^W1REP("H","W4MNYZ",0,"x9")
migelyn 'qn;5,0
^W1REP("H","W4MNYZ","COD")
DAT*MSD*MSD1*x1*x2*x3*x4
^W1REP("H","W4MNYZ","CT")
0*0
^W1REP("H","W4MNYZ","FLD")
DAT*MSD*x1*x2*x3*x4
^W1REP("H","W4MNYZ","FLD0")
DAT*MSD
^W1REP("H","W4MNYZ","GLOB1")
^|$$^W3MAIN|W4MNYZ
^W1REP("H","W4MNYZ","GLOB2")
^|$$^W3MAIN|W4MNYZ(DT,MSD)
^W1REP("H","W4MNYZ","LPT")
B
^W1REP("H","W4MNYZ","MAM")
1*1*1*1**1*******1*1*
^W1REP("H","W4MNYZ","MIUN")
1*2
^W1REP("H","W4MNYZ","QUERY","iztewz g""ec","CT")
*0*0************
^W1REP("H","W4MNYZ","QUERY","iztewz g""ec","FLD0")
-*M*************
^W1REP("H","W4MNYZ","QUERY","iztewz g""ec","MIUN")
**************
^W1REP("H","W4MNYZ","QUERY","iztewz g""ec","SIK0")
*0*0************
^W1REP("H","W4MNYZ","QUERY","mikix`z itl hxetn g""ec","CT")
0*0
^W1REP("H","W4MNYZ","QUERY","mikix`z itl hxetn g""ec","FLD0")
DAT*MSD
^W1REP("H","W4MNYZ","QUERY","mikix`z itl hxetn g""ec","MIUN")
1*2
^W1REP("H","W4MNYZ","QUERY","mikix`z itl hxetn g""ec","SIK0")
1*0
^W1REP("H","W4MNYZ","SIK")
1*1*1*1**1*1*1*1*1*1*1*1*1**1*1*1*1*1*1*1*
^W1REP("H","W4MNYZ","SIK0")
1*0
^W1REP("H","W4MNYZ","US",1)
D DAT^W4MNYZ
^W1REP("H","W4MNYZ","US",2)
D MSD^W4MNYZ
^W1REP("H","W4MNYZ","US",3)
D MSD^W4GAPNTD
^W1REP("H","W4MZB")
(onefn) zepnfd ilehia g"ec
^W1REP("H","W4MZB",0,"DAT")
jix`z;8D
^W1REP("H","W4MZB",0,"DAT","SET")
0
^W1REP("H","W4MZB",0,"DAT","SH")
1
^W1REP("H","W4MZB",0,"HZ")
dpnfd;7
^W1REP("H","W4MZB",0,"HZ","SET")
1
^W1REP("H","W4MZB",0,"HZ","SH")
1
^W1REP("H","W4MZB",0,"MSD")
sipq;5
^W1REP("H","W4MZB",0,"MSD","FILE")
^|$$^W3MAIN|TMPMSD(PRTN)
^W1REP("H","W4MZB",0,"MSD","M2")
S MSD1=$$MSD^W3R(MSD)
^W1REP("H","W4MZB",0,"MSD","OUT")
MSD1
^W1REP("H","W4MZB",0,"MSD","SET")
1
^W1REP("H","W4MZB",0,"MSD1")
sipq my;12H
^W1REP("H","W4MZB",0,"MSD1","SET")
0
^W1REP("H","W4MZB",0,"MSD1","SH")
1
^W1REP("H","W4MZB",0,"MSDR")
zecrqn zveaw;5
^W1REP("H","W4MZB",0,"MSDR","FILE")
^|$$^W3MAIN|W3MSDR
^W1REP("H","W4MZB",0,"MSDR","OUT")
MSDR1
^W1REP("H","W4MZB",0,"MSDR","SET")
1
^W1REP("H","W4MZB",0,"MSDR1")
dveaw my;12H
^W1REP("H","W4MZB",0,"MSDR1","SET")
0
^W1REP("H","W4MZB",0,"MSDR1","SH")
1
^W1REP("H","W4MZB",0,"x1")
dry;5,
^W1REP("H","W4MZB",0,"x2")
oinfnd my;12,
^W1REP("H","W4MZB",0,"x3")
oetlh;10,
^W1REP("H","W4MZB",0,"x4")
lehia mekq;8,2
^W1REP("H","W4MZB",0,"x5")
;,
^W1REP("H","W4MZB","COD")
DAT*MSD*MSD1*HZ*x1*x2*x3*x4
^W1REP("H","W4MZB","CT")
0*0*0
^W1REP("H","W4MZB","FLD")
DAT*MSD*HZ*x1*x2*x3*x4
^W1REP("H","W4MZB","FLD0")
DAT*MSD*HZ
^W1REP("H","W4MZB","GLOB1")
^|$$^W3MAIN|W4MZB(MSDR)
^W1REP("H","W4MZB","GLOB2")
^|$$^W3MAIN|W4MZB(MSDR,DT,MSD,HZ)
^W1REP("H","W4MZB","LPT")
B
^W1REP("H","W4MZB","MAM")
***1*
^W1REP("H","W4MZB","MIUN")
2*1*3
^W1REP("H","W4MZB","QUERY","mikix`ze mitipq itl","CT")
0*0*0
^W1REP("H","W4MZB","QUERY","mikix`ze mitipq itl","FLD0")
DAT*MSD*HZ
^W1REP("H","W4MZB","QUERY","mikix`ze mitipq itl","MIUN")
2*1*3
^W1REP("H","W4MZB","QUERY","mikix`ze mitipq itl","SIK0")
1*1*0
^W1REP("H","W4MZB","QUERY","mitipqe mikix`z itl","CT")
0*0*0
^W1REP("H","W4MZB","QUERY","mitipqe mikix`z itl","FLD0")
DAT*MSD*HZ
^W1REP("H","W4MZB","QUERY","mitipqe mikix`z itl","MIUN")
1*2*3
^W1REP("H","W4MZB","QUERY","mitipqe mikix`z itl","SIK0")
1*1*0
^W1REP("H","W4MZB","SIK")
***1*
^W1REP("H","W4MZB","SIK0")
1*1*0
^W1REP("H","W4MZB","US",0)
D DT^W4MZB
^W1REP("H","W4MZB","US",2)
D DT^W4MZB
^W1REP("H","W4MZB","US",3)
D MSD^W4MZB
^W1REP("H","W4MZB","US",4)
D HZ^W4MZB
^W1REP("H","W4MZPR")
mixvln itl mihixt g"ec
^W1REP("H","W4MZPR",0,"MLZR")
xvln;5.
^W1REP("H","W4MZPR",0,"MLZR","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4MZPR",0,"MLZR","M2")
S MLZR1=$$^W4NAME(MLZR)
^W1REP("H","W4MZPR",0,"MLZR","OUT")
MLZR1
^W1REP("H","W4MZPR",0,"MLZR","SET")
1
^W1REP("H","W4MZPR",0,"MLZR1")
xvln my;12H
^W1REP("H","W4MZPR",0,"MLZR1","SET")
0
^W1REP("H","W4MZPR",0,"MLZR1","SH")
1
^W1REP("H","W4MZPR",0,"PAR")
hixt;8
^W1REP("H","W4MZPR",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4MZPR",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("H","W4MZPR",0,"PAR","OUT")
PAR1
^W1REP("H","W4MZPR",0,"PAR","SET")
1
^W1REP("H","W4MZPR",0,"PAR1")
hixt xe`z;20H
^W1REP("H","W4MZPR",0,"PAR1","SET")
0
^W1REP("H","W4MZPR",0,"PAR1","SH")
0
^W1REP("H","W4MZPR",0,"SUGP")
hixt beq;3
^W1REP("H","W4MZPR",0,"SUGP","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","W4MZPR",0,"SUGP","OUT")
SUGP1
^W1REP("H","W4MZPR",0,"SUGP","SET")
1
^W1REP("H","W4MZPR",0,"SUGP1")
beq xe`z;10H
^W1REP("H","W4MZPR",0,"SUGP1","SET")
0
^W1REP("H","W4MZPR",0,"SUGP1","SH")
1
^W1REP("H","W4MZPR",0,"x1")
zenk;5,0
^W1REP("H","W4MZPR",0,"x2")
hixtl dgpd;10,2
^W1REP("H","W4MZPR",0,"x3")
ehp mekq;10,2
^W1REP("H","W4MZPR",0,"x4")
;,
^W1REP("H","W4MZPR","COD")
MLZR*MLZR1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3
^W1REP("H","W4MZPR","CT")
0*2*0*0*0*0*0
^W1REP("H","W4MZPR","FLD")
MLZR*SUGP*PAR*x1*x2*x3
^W1REP("H","W4MZPR","FLD0")
*****
^W1REP("H","W4MZPR","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4MZPR","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,MLZR,SUGP,PAR)
^W1REP("H","W4MZPR","LPT")
S
^W1REP("H","W4MZPR","MIUN")
3*1*2*4*2*0*0
^W1REP("H","W4MZPR","QUERY","mihixt itl mixvln","CT")
1*0*0****
^W1REP("H","W4MZPR","QUERY","mihixt itl mixvln","FLD0")
******
^W1REP("H","W4MZPR","QUERY","mihixt itl mixvln","MIUN")
1*2*3****
^W1REP("H","W4MZPR","QUERY","mihixt itl mixvln","SIK0")
1*1*0****
^W1REP("H","W4MZPR","QUERY","mixvln itl mihixt","CT")
0*2*0*0*0*0*0
^W1REP("H","W4MZPR","QUERY","mixvln itl mihixt","FLD0")
*****
^W1REP("H","W4MZPR","QUERY","mixvln itl mihixt","MIUN")
3*1*2*4*2*0*0
^W1REP("H","W4MZPR","QUERY","mixvln itl mihixt","SIK0")
0*1*1*0*0*0*0
^W1REP("H","W4MZPR","SHP","KOD")
P1DMZPR
^W1REP("H","W4MZPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("H","W4MZPR","SIK")
1*1*1*
^W1REP("H","W4MZPR","SIK0")
0*1*1*0*0*0*0
^W1REP("H","W4MZPR","US",4)
D PAR^W4DMZPR
^W1REP("H","W4PAR")
mihixt zlah
^W1REP("H","W4PAR",0,"KVZ")
mihixt zveaw;8
^W1REP("H","W4PAR",0,"KVZ","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","W4PAR",0,"KVZ","OUT")
KVZ1
^W1REP("H","W4PAR",0,"KVZ","SET")
0
^W1REP("H","W4PAR",0,"KVZ1")
dveaw my;14H
^W1REP("H","W4PAR",0,"KVZ1","SET")
0
^W1REP("H","W4PAR",0,"KVZ1","SH")
1
^W1REP("H","W4PAR",0,"MH")
xign;8
^W1REP("H","W4PAR",0,"MH","SET")
0
^W1REP("H","W4PAR",0,"MH","SH")
1
^W1REP("H","W4PAR",0,"PAR")
hixt 'qn;8
^W1REP("H","W4PAR",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4PAR",0,"PAR","OUT")
PAR1
^W1REP("H","W4PAR",0,"PAR","SET")
0
^W1REP("H","W4PAR",0,"PAR1")
hixt my;22H
^W1REP("H","W4PAR",0,"PAR1","SET")
0
^W1REP("H","W4PAR",0,"PAR1","SH")
1
^W1REP("H","W4PAR","COD")
KVZ*KVZ1*PAR*PAR1*MH
^W1REP("H","W4PAR","FLD")
KVZ*PAR*MH
^W1REP("H","W4PAR","GLOB1")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4PAR","GLOB2")
^|$$^%W1UCI(JB)|PAR(PAR)
^W1REP("H","W4PARS")
zery itl mihixt g"ec
^W1REP("H","W4PARS",0,"DAT")
;0
^W1REP("H","W4PARS",0,"DAT","SH")
1
^W1REP("H","W4PARS",0,"DEP")
dwlgn;5
^W1REP("H","W4PARS",0,"DEP","FILE")
^|$$^%W1UCI(JB)|DEP
^W1REP("H","W4PARS",0,"DEP","OUT")
DEP1
^W1REP("H","W4PARS",0,"DEP","SET")
0
^W1REP("H","W4PARS",0,"DEP1")
dwlgn my;12H
^W1REP("H","W4PARS",0,"DEP1","SET")
0
^W1REP("H","W4PARS",0,"DEP1","SH")
1
^W1REP("H","W4PARS",0,"PAR")
hixt;8
^W1REP("H","W4PARS",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4PARS",0,"PAR","M2")
S PAR1=$$SHEM1^W4P(PAR)
^W1REP("H","W4PARS",0,"PAR","OUT")
PAR1
^W1REP("H","W4PARS",0,"PAR","SET")
1
^W1REP("H","W4PARS",0,"PAR1")
hixt xe`z;20H
^W1REP("H","W4PARS",0,"PAR1","SET")
0
^W1REP("H","W4PARS",0,"PAR1","SH")
0
^W1REP("H","W4PARS",0,"SHAA")
dry;5
^W1REP("H","W4PARS",0,"SHAA","SH")
1
^W1REP("H","W4PARS",0,"SHAA1")
dry;8
^W1REP("H","W4PARS",0,"SHAA1","SET")
0
^W1REP("H","W4PARS",0,"SHAA1","SH")
1
^W1REP("H","W4PARS",0,"SUGP")
dveaw;5
^W1REP("H","W4PARS",0,"SUGP","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","W4PARS",0,"SUGP","OUT")
SUGP1
^W1REP("H","W4PARS",0,"SUGP","SET")
0
^W1REP("H","W4PARS",0,"SUGP1")
dveaw xe`z;11H
^W1REP("H","W4PARS",0,"SUGP1","SET")
0
^W1REP("H","W4PARS",0,"SUGP1","SH")
1
^W1REP("H","W4PARS",0,"TRH")
jix`z;8D
^W1REP("H","W4PARS",0,"TRH","SET")
0
^W1REP("H","W4PARS",0,"TRH","SH")
1
^W1REP("H","W4PARS",0,"x1")
zenk;6,0
^W1REP("H","W4PARS",0,"x2")
mekq;9,2
^W1REP("H","W4PARS",0,"x3")
dgpd;8,2
^W1REP("H","W4PARS",0,"x4")
k"dq;9,2
^W1REP("H","W4PARS",0,"x5")
;,
^W1REP("H","W4PARS","COD")
DEP*DEP1*SHAA1*TRH*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4
^W1REP("H","W4PARS","CT")
1*1*2*2*0***
^W1REP("H","W4PARS","FLD")
DEP*SHAA1*TRH*SUGP*PAR*x1*x2*x3*x4
^W1REP("H","W4PARS","FLD0")
*******
^W1REP("H","W4PARS","GLOB1")
^|$$^%W1UCI(JB)|PLUTOT
^W1REP("H","W4PARS","GLOB2")
^|$$^%W1UCI(JB)|PLUTOT(DAT,MRK,PAR,SHAA)
^W1REP("H","W4PARS","LPT")
B
^W1REP("H","W4PARS","MIUN")
1*2*3*4*5***
^W1REP("H","W4PARS","QUERY",".mihixte zery itl hxetn","CT")
2*2**2*0****
^W1REP("H","W4PARS","QUERY",".mihixte zery itl hxetn","FLD0")
**-******
^W1REP("H","W4PARS","QUERY",".mihixte zery itl hxetn","MIUN")
2*1**3*4****
^W1REP("H","W4PARS","QUERY",".mihixte zery itl hxetn","SIK0")
1*1**1*0****
^W1REP("H","W4PARS","QUERY",".zerye mihixt itl hxetn","CT")
1*1**2*0****
^W1REP("H","W4PARS","QUERY",".zerye mihixt itl hxetn","FLD0")
**-******
^W1REP("H","W4PARS","QUERY",".zerye mihixt itl hxetn","MIUN")
1*2**3*4****
^W1REP("H","W4PARS","QUERY",".zerye mihixt itl hxetn","SIK0")
1*1**1*0****
^W1REP("H","W4PARS","QUERY","fkexn","CT")
1*0*2*2*0
^W1REP("H","W4PARS","QUERY","fkexn","FLD0")
-**-*-*-*-***
^W1REP("H","W4PARS","QUERY","fkexn","MIUN")
1*1*1*2*3
^W1REP("H","W4PARS","QUERY","fkexn","SIK0")
1*0*1*1*0
^W1REP("H","W4PARS","QUERY","fkexn mihixt itl g""ec","CT")
1***2*0****
^W1REP("H","W4PARS","QUERY","fkexn mihixt itl g""ec","FLD0")
*-*-******
^W1REP("H","W4PARS","QUERY","fkexn mihixt itl g""ec","MIUN")
1***2*3****
^W1REP("H","W4PARS","QUERY","fkexn mihixt itl g""ec","SIK0")
1***1*0*0***
^W1REP("H","W4PARS","QUERY","mikix`z itl hxetn","CT")
1*1*2*2*0***
^W1REP("H","W4PARS","QUERY","mikix`z itl hxetn","FLD0")
*******
^W1REP("H","W4PARS","QUERY","mikix`z itl hxetn","MIUN")
1*2*3*4*5***
^W1REP("H","W4PARS","QUERY","mikix`z itl hxetn","SIK0")
1*1*1*1*0***
^W1REP("H","W4PARS","SHP","KOD")
PARS
^W1REP("H","W4PARS","SHP","PROG")
S MAS(5)=$$^%L1DC(METRH,1),MAS(10)=$$^%L1DC(ADTRH,1),MAS(15)=MESHAA1#24,MAS(20)=$S(ADSHAA1<40:ADSHAA1#24,1:ADSHAA1)
^W1REP("H","W4PARS","SIK")
1*1*1*1*
^W1REP("H","W4PARS","SIK0")
1*1*1*1*0***
^W1REP("H","W4PARS","US",1)
D DAT^W4DPARS
^W1REP("H","W4PARS","US",3)
D PAR^W4DPARS
^W1REP("H","W4PARS","US",4)
D SHAA^W4DPARS
^W1REP("H","W4PRHL")
zegewl itl mihixt zxikn g"ec 
^W1REP("H","W4PRHL",0,"HB")
zipeayg;8
^W1REP("H","W4PRHL",0,"HZM")
dpnfd;7
^W1REP("H","W4PRHL",0,"HZM","SET")
1
^W1REP("H","W4PRHL",0,"HZM","SH")
1
^W1REP("H","W4PRHL",0,"LKH")
gewl 'qn;10
^W1REP("H","W4PRHL",0,"LKH","FILE")
^LKH
^W1REP("H","W4PRHL",0,"LKH","OUT")
LKH1
^W1REP("H","W4PRHL",0,"LKH1")
gewl my;20H
^W1REP("H","W4PRHL",0,"LKHN")
gewl 'qn;11
^W1REP("H","W4PRHL",0,"LKHN","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","W4PRHL",0,"LKHN","OUT")
LKHN1
^W1REP("H","W4PRHL",0,"LKHN","SET")
1
^W1REP("H","W4PRHL",0,"LKHN1")
gewl my;14H
^W1REP("H","W4PRHL",0,"LKHN1","SET")
0
^W1REP("H","W4PRHL",0,"LKHN1","SH")
1
^W1REP("H","W4PRHL",0,"NAME")
gewl my;12H
^W1REP("H","W4PRHL",0,"NAME","SH")
1
^W1REP("H","W4PRHL",0,"NCAB")
zipeayg;6
^W1REP("H","W4PRHL",0,"NCAB","SH")
0
^W1REP("H","W4PRHL",0,"NMB")
gewl xtqn;10
^W1REP("H","W4PRHL",0,"NMB","FILE")
^LKH
^W1REP("H","W4PRHL",0,"NMB","OUT")
NAME
^W1REP("H","W4PRHL",0,"PAR")
hixt 'qn;8
^W1REP("H","W4PRHL",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4PRHL",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("H","W4PRHL",0,"PAR","OUT")
PAR1
^W1REP("H","W4PRHL",0,"PAR","SET")
1
^W1REP("H","W4PRHL",0,"PAR1")
hixt xe`z;16H
^W1REP("H","W4PRHL",0,"PAR1","SET")
0
^W1REP("H","W4PRHL",0,"PAR1","SH")
1
^W1REP("H","W4PRHL",0,"PSL")
gily cew;3
^W1REP("H","W4PRHL",0,"PSL","FILE")
^P1SL
^W1REP("H","W4PRHL",0,"PSL","OUT")
PSL1
^W1REP("H","W4PRHL",0,"PSL1")
gily my;10H
^W1REP("H","W4PRHL",0,"PSL1","SH")
1
^W1REP("H","W4PRHL",0,"SHAA")
dryl;7
^W1REP("H","W4PRHL",0,"SHAA","SET")
1
^W1REP("H","W4PRHL",0,"SHAA","SH")
1
^W1REP("H","W4PRHL",0,"SL")
gily cew;5
^W1REP("H","W4PRHL",0,"SL","FILE")
^P1SL
^W1REP("H","W4PRHL",0,"SL","OUT")
SL1
^W1REP("H","W4PRHL",0,"SL1")
gily my;12H
^W1REP("H","W4PRHL",0,"SUGL")
zegewl zveaw;8
^W1REP("H","W4PRHL",0,"SUGL","FILE")
^|$$^%W1UCI(JB)|SUGL
^W1REP("H","W4PRHL",0,"SUGL","OUT")
SUGL1
^W1REP("H","W4PRHL",0,"SUGL","SET")
1
^W1REP("H","W4PRHL",0,"SUGL1")
dveaw my;12H
^W1REP("H","W4PRHL",0,"SUGL1","SET")
0
^W1REP("H","W4PRHL",0,"SUGL1","SH")
1
^W1REP("H","W4PRHL",0,"SUGT")
melyz beq;5
^W1REP("H","W4PRHL",0,"SUGT","SH")
1
^W1REP("H","W4PRHL",0,"TRH")
jix`z;8D
^W1REP("H","W4PRHL",0,"TRH","M2")
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("H","W4PRHL",0,"TRH","SET")
0
^W1REP("H","W4PRHL",0,"TRH","SH")
1
^W1REP("H","W4PRHL",0,"TS")
melyzl;8
^W1REP("H","W4PRHL",0,"TSHL")
melyzl;8
^W1REP("H","W4PRHL",0,"TSHL","OUT")
TSHL
^W1REP("H","W4PRHL",0,"x1")
zenk;4,0
^W1REP("H","W4PRHL",0,"x2")
mekq;8,2
^W1REP("H","W4PRHL",0,"x3")
hixtl dgpd;8,2
^W1REP("H","W4PRHL",0,"x4")
dgpd ixg`;8,2
^W1REP("H","W4PRHL",0,"x5")
;,
^W1REP("H","W4PRHL","COD")
SUGL*SUGL1*LKHN*LKHN1*TRH*HZM*PAR*PAR1*x1*x2*x3*x4
^W1REP("H","W4PRHL","CT")
1*1*0**0****
^W1REP("H","W4PRHL","FLD")
SUGL*LKHN*TRH*HZM*PAR*x1*x2*x3*x4
^W1REP("H","W4PRHL","FLD0")
***-*****
^W1REP("H","W4PRHL","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4PRHL","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,SUGL,LKHN,DT,HZM,PAR)
^W1REP("H","W4PRHL","LPT")
B
^W1REP("H","W4PRHL","MAM")
*1*1*1*
^W1REP("H","W4PRHL","MIUN")
1*2*3**4****
^W1REP("H","W4PRHL","MIUN","PROG")
TRH^W4PRHL
^W1REP("H","W4PRHL","QUERY","mikix`ze zegewl itl mihixt g""ec","CT")
1*1*0**0****
^W1REP("H","W4PRHL","QUERY","mikix`ze zegewl itl mihixt g""ec","FLD0")
***-*****
^W1REP("H","W4PRHL","QUERY","mikix`ze zegewl itl mihixt g""ec","MIUN")
1*2*3**4****
^W1REP("H","W4PRHL","QUERY","mikix`ze zegewl itl mihixt g""ec","SIK0")
1*1*1**0****
^W1REP("H","W4PRHL","QUERY","zegewl itl mihixt g""ec","CT")
1*2***0****
^W1REP("H","W4PRHL","QUERY","zegewl itl mihixt g""ec","FLD0")
**-*-*****
^W1REP("H","W4PRHL","QUERY","zegewl itl mihixt g""ec","MIUN")
1*2***3****
^W1REP("H","W4PRHL","QUERY","zegewl itl mihixt g""ec","SIK0")
1*1***0****
^W1REP("H","W4PRHL","QUERY","zepnfde mikix`z zegewl itl mihixt g""ec","CT")
1*1*0*0*0****
^W1REP("H","W4PRHL","QUERY","zepnfde mikix`z zegewl itl mihixt g""ec","FLD0")
********
^W1REP("H","W4PRHL","QUERY","zepnfde mikix`z zegewl itl mihixt g""ec","MIUN")
1*2*3*4*5****
^W1REP("H","W4PRHL","QUERY","zepnfde mikix`z zegewl itl mihixt g""ec","SIK0")
1*1*1*0*0****
^W1REP("H","W4PRHL","SHP","KOD")
P1HZH
^W1REP("H","W4PRHL","SHP","PROG")
S MAS(5)="zegewl itl mihixt g""ec"
^W1REP("H","W4PRHL","SIK")
1*1*1*1*
^W1REP("H","W4PRHL","SIK0")
1*1*1**0****
^W1REP("H","W4PRHL","US",4)
  S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("H","W4PRHL","US",6)
D PAR^W4PRHL
^W1REP("H","W4PRHZ")
zepnfd itl mihixt zxikn g"ec 
^W1REP("H","W4PRHZ",0,"HB")
zipeayg;8
^W1REP("H","W4PRHZ",0,"HZM")
dpnfd;7
^W1REP("H","W4PRHZ",0,"HZM","SET")
1
^W1REP("H","W4PRHZ",0,"HZM","SH")
1
^W1REP("H","W4PRHZ",0,"LKH")
gewl 'qn;10
^W1REP("H","W4PRHZ",0,"LKH","FILE")
^LKH
^W1REP("H","W4PRHZ",0,"LKH","OUT")
LKH1
^W1REP("H","W4PRHZ",0,"LKH1")
gewl my;20H
^W1REP("H","W4PRHZ",0,"LKHN")
gewl 'qn;11
^W1REP("H","W4PRHZ",0,"LKHN","FILE")
^|$$^%W1UCI(JB)|LKH
^W1REP("H","W4PRHZ",0,"LKHN","OUT")
LKHN1
^W1REP("H","W4PRHZ",0,"LKHN","SET")
1
^W1REP("H","W4PRHZ",0,"LKHN1")
gewl my;14H
^W1REP("H","W4PRHZ",0,"LKHN1","SET")
0
^W1REP("H","W4PRHZ",0,"LKHN1","SH")
1
^W1REP("H","W4PRHZ",0,"NAME")
gewl my;12H
^W1REP("H","W4PRHZ",0,"NAME","SH")
1
^W1REP("H","W4PRHZ",0,"NCAB")
zipeayg;6
^W1REP("H","W4PRHZ",0,"NCAB","SH")
0
^W1REP("H","W4PRHZ",0,"NMB")
gewl xtqn;10
^W1REP("H","W4PRHZ",0,"NMB","FILE")
^LKH
^W1REP("H","W4PRHZ",0,"NMB","OUT")
NAME
^W1REP("H","W4PRHZ",0,"PAR")
hixt 'qn;8
^W1REP("H","W4PRHZ",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4PRHZ",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("H","W4PRHZ",0,"PAR","OUT")
PAR1
^W1REP("H","W4PRHZ",0,"PAR","SET")
1
^W1REP("H","W4PRHZ",0,"PAR1")
hixt xe`z;16H
^W1REP("H","W4PRHZ",0,"PAR1","SET")
0
^W1REP("H","W4PRHZ",0,"PAR1","SH")
1
^W1REP("H","W4PRHZ",0,"PSL")
gily cew;3
^W1REP("H","W4PRHZ",0,"PSL","FILE")
^P1SL
^W1REP("H","W4PRHZ",0,"PSL","OUT")
PSL1
^W1REP("H","W4PRHZ",0,"PSL1")
gily my;10H
^W1REP("H","W4PRHZ",0,"PSL1","SH")
1
^W1REP("H","W4PRHZ",0,"SHAA")
dryl;7
^W1REP("H","W4PRHZ",0,"SHAA","SET")
1
^W1REP("H","W4PRHZ",0,"SHAA","SH")
1
^W1REP("H","W4PRHZ",0,"SHAA1")
dry;5
^W1REP("H","W4PRHZ",0,"SHAA1","SET")
0
^W1REP("H","W4PRHZ",0,"SHAA1","SH")
1
^W1REP("H","W4PRHZ",0,"SL")
gily cew;5
^W1REP("H","W4PRHZ",0,"SL","FILE")
^P1SL
^W1REP("H","W4PRHZ",0,"SL","OUT")
SL1
^W1REP("H","W4PRHZ",0,"SL1")
gily my;12H
^W1REP("H","W4PRHZ",0,"SUGL")
zegewl zveaw;8
^W1REP("H","W4PRHZ",0,"SUGL","FILE")
^|$$^%W1UCI(JB)|SUGL
^W1REP("H","W4PRHZ",0,"SUGL","OUT")
SUGL1
^W1REP("H","W4PRHZ",0,"SUGL","SET")
1
^W1REP("H","W4PRHZ",0,"SUGL1")
dveaw my;12H
^W1REP("H","W4PRHZ",0,"SUGL1","SET")
0
^W1REP("H","W4PRHZ",0,"SUGL1","SH")
1
^W1REP("H","W4PRHZ",0,"SUGP")
hixt beq;5
^W1REP("H","W4PRHZ",0,"SUGP","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","W4PRHZ",0,"SUGP","M2")
S SUGP1=$$SUG1^W4P(SUGP)
^W1REP("H","W4PRHZ",0,"SUGP","OUT")
SUGP1
^W1REP("H","W4PRHZ",0,"SUGP","SET")
0
^W1REP("H","W4PRHZ",0,"SUGP1")
beq xe`z;12H
^W1REP("H","W4PRHZ",0,"SUGP1","SET")
0
^W1REP("H","W4PRHZ",0,"SUGP1","SH")
1
^W1REP("H","W4PRHZ",0,"SUGT")
melyz beq;5
^W1REP("H","W4PRHZ",0,"SUGT","SH")
1
^W1REP("H","W4PRHZ",0,"TRH")
jix`z;8D
^W1REP("H","W4PRHZ",0,"TRH","M2")
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("H","W4PRHZ",0,"TRH","SET")
0
^W1REP("H","W4PRHZ",0,"TRH","SH")
1
^W1REP("H","W4PRHZ",0,"TS")
melyzl;8
^W1REP("H","W4PRHZ",0,"TSHL")
melyzl;8
^W1REP("H","W4PRHZ",0,"TSHL","OUT")
TSHL
^W1REP("H","W4PRHZ",0,"x1")
zenk;8,3
^W1REP("H","W4PRHZ",0,"x2")
mekq;8,2
^W1REP("H","W4PRHZ",0,"x3")
hixtl dgpd;8,2
^W1REP("H","W4PRHZ",0,"x4")
dgpd ixg`;8,2
^W1REP("H","W4PRHZ",0,"x5")
;,
^W1REP("H","W4PRHZ","COD")
TRH*SHAA1*HZM*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4
^W1REP("H","W4PRHZ","CT")
***0*0****
^W1REP("H","W4PRHZ","FLD")
TRH*SHAA1*HZM*SUGP*PAR*x1*x2*x3*x4
^W1REP("H","W4PRHZ","FLD0")
-*-*-******
^W1REP("H","W4PRHZ","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4PRHZ","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,DT,SHAA,HZM,PAR)
^W1REP("H","W4PRHZ","LPT")
B
^W1REP("H","W4PRHZ","MAM")
*1*1*1*
^W1REP("H","W4PRHZ","MIUN")
***1*2****
^W1REP("H","W4PRHZ","MIUN","PROG")
TRH^W4PRHZ
^W1REP("H","W4PRHZ","QUERY","iztewz mihixt itl","CT")
***0*0****
^W1REP("H","W4PRHZ","QUERY","iztewz mihixt itl","FLD0")
-*-*-******
^W1REP("H","W4PRHZ","QUERY","iztewz mihixt itl","MIUN")
***1*2****
^W1REP("H","W4PRHZ","QUERY","iztewz mihixt itl","SIK0")
***1*0****
^W1REP("H","W4PRHZ","QUERY","mikix`z itl mihixt zxikn","CT")
0***0*0***
^W1REP("H","W4PRHZ","QUERY","mikix`z itl mihixt zxikn","FLD0")
*-*-*****
^W1REP("H","W4PRHZ","QUERY","mikix`z itl mihixt zxikn","MIUN")
1***2*3***
^W1REP("H","W4PRHZ","QUERY","mikix`z itl mihixt zxikn","SIK0")
1***1*0***
^W1REP("H","W4PRHZ","QUERY","zepnfde mihixt mikix`z itl oein -  hxetn","CT")
0**0*0*0***
^W1REP("H","W4PRHZ","QUERY","zepnfde mihixt mikix`z itl oein -  hxetn","FLD0")
*-******
^W1REP("H","W4PRHZ","QUERY","zepnfde mihixt mikix`z itl oein -  hxetn","MIUN")
1**4*2*3***
^W1REP("H","W4PRHZ","QUERY","zepnfde mihixt mikix`z itl oein -  hxetn","SIK0")
1**0*1*0***
^W1REP("H","W4PRHZ","QUERY","zepnfde mikix`z itl oein -  hxetn","CT")
0**0*0****
^W1REP("H","W4PRHZ","QUERY","zepnfde mikix`z itl oein -  hxetn","FLD0")
*-******
^W1REP("H","W4PRHZ","QUERY","zepnfde mikix`z itl oein -  hxetn","MIUN")
1**2*3****
^W1REP("H","W4PRHZ","QUERY","zepnfde mikix`z itl oein -  hxetn","SIK0")
1**0*0****
^W1REP("H","W4PRHZ","QUERY","zepnfde zery , mikix`z itl oein -  hxetn","CT")
2*0*0**0*0***
^W1REP("H","W4PRHZ","QUERY","zepnfde zery , mikix`z itl oein -  hxetn","FLD0")
***-*****
^W1REP("H","W4PRHZ","QUERY","zepnfde zery , mikix`z itl oein -  hxetn","MIUN")
1*2*3**4****
^W1REP("H","W4PRHZ","QUERY","zepnfde zery , mikix`z itl oein -  hxetn","SIK0")
1*1*0**0*0***
^W1REP("H","W4PRHZ","SHP","KOD")
P1HZH
^W1REP("H","W4PRHZ","SHP","PROG")
S MAS(5)="zepnfd itl mihixt g""ec"
^W1REP("H","W4PRHZ","SIK")
1*1*1*1*
^W1REP("H","W4PRHZ","SIK0")
***1*0****
^W1REP("H","W4PRHZ","US",2)
S TRH=$ZD(DT,"DD.MM.YY")
^W1REP("H","W4PRHZ","US",4)
D HZM^W4PRHZ
^W1REP("H","W4PRHZ","US",5)
D PAR^W4PRHZ
^W1REP("H","W4PRHZ","US",7)
D PAR^W4PRHZ
^W1REP("H","W4PRPS")
migily itl mihixt g"ec
^W1REP("H","W4PRPS",0,"MKBL")
lawn;5.
^W1REP("H","W4PRPS",0,"MKBL","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4PRPS",0,"MKBL","M2")
S MLZR1=$$^W4NAME(MLZR)
^W1REP("H","W4PRPS",0,"MKBL","OUT")
MLZR1
^W1REP("H","W4PRPS",0,"MKBL","SET")
1
^W1REP("H","W4PRPS",0,"MKBL1")
lawnd my;12H
^W1REP("H","W4PRPS",0,"MKBL1","SET")
0
^W1REP("H","W4PRPS",0,"MKBL1","SH")
1
^W1REP("H","W4PRPS",0,"MLZR")
xvln;5.
^W1REP("H","W4PRPS",0,"MLZR","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4PRPS",0,"MLZR","M2")
S MLZR1=$$^W4NAME(MLZR)
^W1REP("H","W4PRPS",0,"MLZR","OUT")
MLZR1
^W1REP("H","W4PRPS",0,"MLZR","SET")
1
^W1REP("H","W4PRPS",0,"MLZR1")
xvln my;12H
^W1REP("H","W4PRPS",0,"MLZR1","SET")
0
^W1REP("H","W4PRPS",0,"MLZR1","SH")
1
^W1REP("H","W4PRPS",0,"PAR")
hixt;8
^W1REP("H","W4PRPS",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4PRPS",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("H","W4PRPS",0,"PAR","OUT")
PAR1
^W1REP("H","W4PRPS",0,"PAR","SET")
1
^W1REP("H","W4PRPS",0,"PAR1")
hixt xe`z;20H
^W1REP("H","W4PRPS",0,"PAR1","SET")
0
^W1REP("H","W4PRPS",0,"PAR1","SH")
0
^W1REP("H","W4PRPS",0,"PSL")
gily;4
^W1REP("H","W4PRPS",0,"PSL","FILE")
^|$$^%W1UCI(JB)|P1SL
^W1REP("H","W4PRPS",0,"PSL","M2")
D PSL1^W4DLVP
^W1REP("H","W4PRPS",0,"PSL","OUT")
PSL1
^W1REP("H","W4PRPS",0,"PSL","SET")
1
^W1REP("H","W4PRPS",0,"PSL1")
gily my;12H
^W1REP("H","W4PRPS",0,"PSL1","SET")
0
^W1REP("H","W4PRPS",0,"PSL1","SH")
1
^W1REP("H","W4PRPS",0,"SUGP")
hixt beq;3
^W1REP("H","W4PRPS",0,"SUGP","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","W4PRPS",0,"SUGP","OUT")
SUGP1
^W1REP("H","W4PRPS",0,"SUGP","SET")
1
^W1REP("H","W4PRPS",0,"SUGP1")
beq xe`z;10H
^W1REP("H","W4PRPS",0,"SUGP1","SET")
0
^W1REP("H","W4PRPS",0,"SUGP1","SH")
1
^W1REP("H","W4PRPS",0,"x1")
zenk;5,0
^W1REP("H","W4PRPS",0,"x2")
hixtl dgpd;10,2
^W1REP("H","W4PRPS",0,"x3")
ehp mekq;10,2
^W1REP("H","W4PRPS",0,"x4")
;,
^W1REP("H","W4PRPS","COD")
PSL*PSL1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3
^W1REP("H","W4PRPS","CT")
1**0***
^W1REP("H","W4PRPS","FLD")
PSL*SUGP*PAR*x1*x2*x3
^W1REP("H","W4PRPS","FLD0")
*-****
^W1REP("H","W4PRPS","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4PRPS","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,PSL,SUGP,PAR)
^W1REP("H","W4PRPS","LPT")
S
^W1REP("H","W4PRPS","MIUN")
1*****
^W1REP("H","W4PRPS","QUERY","( hixt beq `ll ) migily itl mihixt","CT")
1**0***
^W1REP("H","W4PRPS","QUERY","( hixt beq `ll ) migily itl mihixt","FLD0")
*-****
^W1REP("H","W4PRPS","QUERY","( hixt beq `ll ) migily itl mihixt","MIUN")
1*****
^W1REP("H","W4PRPS","QUERY","( hixt beq `ll ) migily itl mihixt","SIK0")
1**0***
^W1REP("H","W4PRPS","QUERY","( mihixt ibeq itl dwelg ) migily itl mihixt","CT")
1*2*0***
^W1REP("H","W4PRPS","QUERY","( mihixt ibeq itl dwelg ) migily itl mihixt","FLD0")
*****
^W1REP("H","W4PRPS","QUERY","( mihixt ibeq itl dwelg ) migily itl mihixt","MIUN")
1*2*3***
^W1REP("H","W4PRPS","QUERY","( mihixt ibeq itl dwelg ) migily itl mihixt","SIK0")
1*1*0***
^W1REP("H","W4PRPS","SHP","KOD")
P1DMZPR
^W1REP("H","W4PRPS","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("H","W4PRPS","SIK")
1*1*1*
^W1REP("H","W4PRPS","SIK0")
1**0***
^W1REP("H","W4PRPS","US",2)
I PSL=9999 S PSL1="dpznda"
^W1REP("H","W4PRPS","US",4)
D PAR^W4DLVP
^W1REP("H","W4REPCA")
SOLEK REPORT
^W1REP("H","W4REPCA",0,"ATAR")
xz` 'qn;2
^W1REP("H","W4REPCA",0,"ATAR","FILE")
^|$$^%W1UCI(JB)|W4ATAR
^W1REP("H","W4REPCA",0,"ATAR","OUT")
ATAR1
^W1REP("H","W4REPCA",0,"ATAR","SET")
0
^W1REP("H","W4REPCA",0,"ATAR1")
xz` my;12H
^W1REP("H","W4REPCA",0,"ATAR1","SET")
0
^W1REP("H","W4REPCA",0,"ATAR1","SH")
1
^W1REP("H","W4REPCA",0,"EMDA")
dcnr;4
^W1REP("H","W4REPCA",0,"EMDA","SET")
0
^W1REP("H","W4REPCA",0,"EMDA","SH")
1
^W1REP("H","W4REPCA",0,"HZM")
dpnfd;8
^W1REP("H","W4REPCA",0,"HZM","SET")
1
^W1REP("H","W4REPCA",0,"HZM","SH")
1
^W1REP("H","W4REPCA",0,"MKBL")
lawn 'qn;5
^W1REP("H","W4REPCA",0,"MKBL","M2")
S MKBL1=$$^W4NAME(MKBL)
^W1REP("H","W4REPCA",0,"MKBL","OUT")
MKBL1
^W1REP("H","W4REPCA",0,"MKBL","SET")
0
^W1REP("H","W4REPCA",0,"MKBL1")
lawn my;12H
^W1REP("H","W4REPCA",0,"MKBL1","SET")
0
^W1REP("H","W4REPCA",0,"MKBL1","SH")
1
^W1REP("H","W4REPCA",0,"MLZ")
lawn 'qn;5
^W1REP("H","W4REPCA",0,"MLZ","FILE")
^|$$^%W1UCI(JB)|NAME
^W1REP("H","W4REPCA",0,"MLZ","M2")
S MLZ1=$$^W4NAME(MLZ)
^W1REP("H","W4REPCA",0,"MLZ","OUT")
MLZ1
^W1REP("H","W4REPCA",0,"MLZ","SET")
0
^W1REP("H","W4REPCA",0,"MLZ1")
lawn my;12H
^W1REP("H","W4REPCA",0,"MLZ1","SET")
0
^W1REP("H","W4REPCA",0,"MLZ1","SH")
1
^W1REP("H","W4REPCA",0,"NMB")
ogley;8
^W1REP("H","W4REPCA",0,"NMB","SET")
0
^W1REP("H","W4REPCA",0,"NMB","SH")
1
^W1REP("H","W4REPCA",0,"PART")
dcnr;4
^W1REP("H","W4REPCA",0,"PART","FILE")
^PLUK
^W1REP("H","W4REPCA",0,"PART","SH")
1
^W1REP("H","W4REPCA",0,"SHAA")
dry;5
^W1REP("H","W4REPCA",0,"SHAA","SET")
0
^W1REP("H","W4REPCA",0,"SHAA","SH")
1
^W1REP("H","W4REPCA",0,"SHULH")
ogley;5
^W1REP("H","W4REPCA",0,"SHULH","SH")
1
^W1REP("H","W4REPCA",0,"SUGS")
ogley beq;5
^W1REP("H","W4REPCA",0,"SUGS","FILE")
^|$$^%W1UCI(JB)|SUGS
^W1REP("H","W4REPCA",0,"SUGS","OUT")
SUGS1
^W1REP("H","W4REPCA",0,"SUGS","SET")
0
^W1REP("H","W4REPCA",0,"SUGS1")
beq xe`z;6H
^W1REP("H","W4REPCA",0,"SUGS1","SET")
0
^W1REP("H","W4REPCA",0,"SUGS1","SH")
1
^W1REP("H","W4REPCA",0,"TRH")
jix`z;8D
^W1REP("H","W4REPCA",0,"TRH","SET")
0
^W1REP("H","W4REPCA",0,"TRH","SH")
1
^W1REP("H","W4REPCA",0,"TRHT")
jix`z;8D
^W1REP("H","W4REPCA",0,"TRHT","SET")
0
^W1REP("H","W4REPCA",0,"TRHT","SH")
1
^W1REP("H","W4REPCA",0,"x1")
mitih k"dq;8,2
^W1REP("H","W4REPCA",0,"x2")
onefna mitih;8,2
^W1REP("H","W4REPCA",0,"x3")
wiya mitih;8,2
^W1REP("H","W4REPCA",0,"x4")
`"ka mitih;8,2
^W1REP("H","W4REPCA",0,"x5")
dtwda mitih;8,2
^W1REP("H","W4REPCA",0,"x6")
;,
^W1REP("H","W4REPCA",0,"x7")
tih;7,2
^W1REP("H","W4REPCA",0,"x8")
;,
^W1REP("H","W4REPCA","COD")
TRH*SOLEK*MANP*x1*x2
^W1REP("H","W4REPCA","CT")
0*0*0*0*****
^W1REP("H","W4REPCA","FLD")
MKBL*SHAA*TRH*HZM*x1*x2*x3*x4*x5
^W1REP("H","W4REPCA","FLD0")
********
^W1REP("H","W4REPCA","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4REPCA","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,DT,MKBL,HZM)
^W1REP("H","W4REPCA","LPT")
B
^W1REP("H","W4REPCA","MIUN")
2*3*1*4*****
^W1REP("H","W4REPCA","MIUN","PROG")
TRH^W4DTIP
^W1REP("H","W4REPCA","QUERY","fkexn mikix`z itl","CT")
0**0******
^W1REP("H","W4REPCA","QUERY","fkexn mikix`z itl","FLD0")
*-**-*****
^W1REP("H","W4REPCA","QUERY","fkexn mikix`z itl","MIUN")
2**1******
^W1REP("H","W4REPCA","QUERY","fkexn mikix`z itl","SIK0")
0**1******
^W1REP("H","W4REPCA","QUERY","fkexn milawn itl","CT")
0**0******
^W1REP("H","W4REPCA","QUERY","fkexn milawn itl","FLD0")
*-**-*-*-**-*
^W1REP("H","W4REPCA","QUERY","fkexn milawn itl","MIUN")
1**2******
^W1REP("H","W4REPCA","QUERY","fkexn milawn itl","SIK0")
1**0******
^W1REP("H","W4REPCA","QUERY","hxetn mikix`z itl","CT")
0*0*0*0*****
^W1REP("H","W4REPCA","QUERY","hxetn mikix`z itl","FLD0")
********
^W1REP("H","W4REPCA","QUERY","hxetn mikix`z itl","MIUN")
2*3*1*4*****
^W1REP("H","W4REPCA","QUERY","hxetn mikix`z itl","SIK0")
0*0*1*0*****
^W1REP("H","W4REPCA","QUERY","hxetn milawn itl","CT")
2*0*0*0*****
^W1REP("H","W4REPCA","QUERY","hxetn milawn itl","FLD0")
********
^W1REP("H","W4REPCA","QUERY","hxetn milawn itl","MIUN")
1*3*2*4*****
^W1REP("H","W4REPCA","QUERY","hxetn milawn itl","SIK0")
1*0*1*0*****
^W1REP("H","W4REPCA","SIK")
1*1*1*1*1**1*
^W1REP("H","W4REPCA","SIK0")
0*0*1*0*****
^W1REP("H","W4REPCA","US",-1)
D DATH^W4DPAYM
^W1REP("H","W4REPCA","US",2)
D DT^W4DTIP
^W1REP("H","W4REPCA","US",3)
D MKBL^W4DTIP
^W1REP("H","W4REPCA","US",4)
D HZM^W4DTIP
^W1REP("H","W4REPT")
dpzn iyelz g"ec
^W1REP("H","W4RMLMIN")

^W1REP("H","W4RMLMIN",0,"DEP")
dwlgn 'qn;5
^W1REP("H","W4RMLMIN",0,"DEP","FILE")
^|$$^%W1UCI(JB)|MLDEP
^W1REP("H","W4RMLMIN",0,"DEP","OUT")
DEP1
^W1REP("H","W4RMLMIN",0,"DEP","SET")
0
^W1REP("H","W4RMLMIN",0,"DEP1")
dwlgn xe`z;16H
^W1REP("H","W4RMLMIN",0,"DEP1","SET")
0
^W1REP("H","W4RMLMIN",0,"DEP1","SH")
1
^W1REP("H","W4RMLMIN",0,"KVZ")
dveaw 'qn;7
^W1REP("H","W4RMLMIN",0,"KVZ","FILE")
^|$$^%W1UCI(JB)|MLSUG
^W1REP("H","W4RMLMIN",0,"KVZ","OUT")
KVZ1
^W1REP("H","W4RMLMIN",0,"KVZ","SET")
0
^W1REP("H","W4RMLMIN",0,"KVZ1")
dveaw my;16H
^W1REP("H","W4RMLMIN",0,"KVZ1","SET")
0
^W1REP("H","W4RMLMIN",0,"KVZ1","SH")
1
^W1REP("H","W4RMLMIN",0,"PAR")
hixt 'qn;8
^W1REP("H","W4RMLMIN",0,"PAR","FILE")
^|$$^%W1UCI(JB)|MLPAR
^W1REP("H","W4RMLMIN",0,"PAR","OUT")
PAR1
^W1REP("H","W4RMLMIN",0,"PAR","SET")
0
^W1REP("H","W4RMLMIN",0,"PAR1")
hixt my;18H
^W1REP("H","W4RMLMIN",0,"PAR1","SET")
0
^W1REP("H","W4RMLMIN",0,"PAR1","SH")
1
^W1REP("H","W4RMLMIN",0,"SPK")
wtq 'qn;7
^W1REP("H","W4RMLMIN",0,"SPK","FILE")
^|$$^%W1UCI(JB)|W4SPK
^W1REP("H","W4RMLMIN",0,"SPK","OUT")
SPK1
^W1REP("H","W4RMLMIN",0,"SPK","SET")
0
^W1REP("H","W4RMLMIN",0,"SPK1")
wtq my;18H
^W1REP("H","W4RMLMIN",0,"SPK1","SET")
0
^W1REP("H","W4RMLMIN",0,"SPK1","SH")
1
^W1REP("H","W4RMLMIN",0,"x1")
i`gn menipin;7,2
^W1REP("H","W4RMLMIN",0,"x2")
lreta zenk;7,2
^W1REP("H","W4RMLMIN",0,"x3")
yxtd;7,2
^W1REP("H","W4RMLMIN",0,"x4")
;,
^W1REP("H","W4RMLMIN","COD")
SPK*SPK1*DEP*DEP1*KVZ*KVZ1*PAR*PAR1*x1*x2*x3
^W1REP("H","W4RMLMIN","FLD")
SPK*DEP*KVZ*PAR*x1*x2*x3
^W1REP("H","W4RMLMIN","GLOB1")
^|$$^%W1UCI(JB)|MLPAR
^W1REP("H","W4RMLMIN","GLOB2")
^|$$^%W1UCI(JB)|MLPAR(PAR)
^W1REP("H","W4RMLMIN","MAM")
***
^W1REP("H","W4RMLMIN","SIK")
***
^W1REP("H","W4RMMLY")
dpnfd zcewp zgz mi`vnp mihixt g"ec
^W1REP("H","W4RMMLY",0,"DEP")
dwlgn 'qn;5
^W1REP("H","W4RMMLY",0,"DEP","FILE")
^|$$^%W1UCI(JB)|MLDEP
^W1REP("H","W4RMMLY",0,"DEP","M2")
S DEP1=$$DEP1^W4RMMLY(PAR)
^W1REP("H","W4RMMLY",0,"DEP","OUT")
DEP1
^W1REP("H","W4RMMLY",0,"DEP","SET")
0
^W1REP("H","W4RMMLY",0,"DEP1")
dwlgn xe`z;16H
^W1REP("H","W4RMMLY",0,"DEP1","SET")
0
^W1REP("H","W4RMMLY",0,"DEP1","SH")
1
^W1REP("H","W4RMMLY",0,"KVZ")
dveaw 'qn;7
^W1REP("H","W4RMMLY",0,"KVZ","FILE")
^|$$^%W1UCI(JB)|MLSUGP
^W1REP("H","W4RMMLY",0,"KVZ","M2")
S KVZ1=$$KVZ1^W4RMMLY(PAR)
^W1REP("H","W4RMMLY",0,"KVZ","OUT")
KVZ1
^W1REP("H","W4RMMLY",0,"KVZ","SET")
0
^W1REP("H","W4RMMLY",0,"KVZ1")
dveaw my;16H
^W1REP("H","W4RMMLY",0,"KVZ1","SET")
0
^W1REP("H","W4RMMLY",0,"KVZ1","SH")
1
^W1REP("H","W4RMMLY",0,"PAR")
hixt 'qn;8
^W1REP("H","W4RMMLY",0,"PAR","FILE")
^|$$^%W1UCI(JB)|MLPAR
^W1REP("H","W4RMMLY",0,"PAR","OUT")
PAR1
^W1REP("H","W4RMMLY",0,"PAR","SET")
0
^W1REP("H","W4RMMLY",0,"PAR1")
hixt my;18H
^W1REP("H","W4RMMLY",0,"PAR1","SET")
0
^W1REP("H","W4RMMLY",0,"PAR1","SH")
1
^W1REP("H","W4RMMLY",0,"SPK")
wtq 'qn;7
^W1REP("H","W4RMMLY",0,"SPK","FILE")
^|$$^%W1UCI(JB)|W4SPK
^W1REP("H","W4RMMLY",0,"SPK","OUT")
SPK1
^W1REP("H","W4RMMLY",0,"SPK","SET")
0
^W1REP("H","W4RMMLY",0,"SPK1")
wtq my;18H
^W1REP("H","W4RMMLY",0,"SPK1","SET")
0
^W1REP("H","W4RMMLY",0,"SPK1","SH")
1
^W1REP("H","W4RMMLY",0,"x1")
dcin zcigi;10,
^W1REP("H","W4RMMLY",0,"x2")
i`lnd znx;7,2
^W1REP("H","W4RMMLY",0,"x3")
lreta zenk;7,2
^W1REP("H","W4RMMLY",0,"x4")
yxtd;7,2
^W1REP("H","W4RMMLY",0,"x5")
;,
^W1REP("H","W4RMMLY","COD")
SPK*SPK1*DEP*DEP1*KVZ*KVZ1*PAR*PAR1*x1*x2*x3*x4
^W1REP("H","W4RMMLY","CT")
1*2*2*0
^W1REP("H","W4RMMLY","FLD")
SPK*DEP*KVZ*PAR*x1*x2*x3*x4
^W1REP("H","W4RMMLY","FLD0")
SPK*DEP*KVZ*PAR
^W1REP("H","W4RMMLY","GLOB1")
^|$$^%W1UCI(JB)|MLPAR
^W1REP("H","W4RMMLY","GLOB2")
^|$$^%W1UCI(JB)|MLPAR(PAR)
^W1REP("H","W4RMMLY","LPT")
B
^W1REP("H","W4RMMLY","MAM")
****
^W1REP("H","W4RMMLY","MIUN")
1*2*3*4
^W1REP("H","W4RMMLY","QUERY","i`lnd znx zgz mi`vnpy mihixt g""ec","CT")
1*2*2*0
^W1REP("H","W4RMMLY","QUERY","i`lnd znx zgz mi`vnpy mihixt g""ec","FLD0")
SPK*DEP*KVZ*PAR
^W1REP("H","W4RMMLY","QUERY","i`lnd znx zgz mi`vnpy mihixt g""ec","MIUN")
1*2*3*4
^W1REP("H","W4RMMLY","QUERY","i`lnd znx zgz mi`vnpy mihixt g""ec","SIK0")
1*1*1*0
^W1REP("H","W4RMMLY","SIK")
*1*1*1*
^W1REP("H","W4RMMLY","SIK0")
1*1*1*0
^W1REP("H","W4RMMLY","US",1)
D PAR^W4RMMLY
^W1REP("H","W4SHPR")
zepgley itl mihixt g"ec
^W1REP("H","W4SHPR",0,"DEP")
dwlgn;5
^W1REP("H","W4SHPR",0,"DEP","FILE")
^|$$^%W1UCI(JB)|DEP
^W1REP("H","W4SHPR",0,"DEP","OUT")
DEP1
^W1REP("H","W4SHPR",0,"DEP","SET")
1
^W1REP("H","W4SHPR",0,"DEP1")
xe`z;12H
^W1REP("H","W4SHPR",0,"DEP1","SET")
0
^W1REP("H","W4SHPR",0,"DEP1","SH")
1
^W1REP("H","W4SHPR",0,"MLZR")
xvln;9
^W1REP("H","W4SHPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^W1REP("H","W4SHPR",0,"MLZR","OUT")
MLZR1
^W1REP("H","W4SHPR",0,"MLZR1")
xvln my;12H
^W1REP("H","W4SHPR",0,"MLZR1","SH")
0
^W1REP("H","W4SHPR",0,"PAR")
hixt;8
^W1REP("H","W4SHPR",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4SHPR",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("H","W4SHPR",0,"PAR","OUT")
PAR1
^W1REP("H","W4SHPR",0,"PAR","SET")
1
^W1REP("H","W4SHPR",0,"PAR1")
hixt xe`z;20H
^W1REP("H","W4SHPR",0,"PAR1","SET")
0
^W1REP("H","W4SHPR",0,"PAR1","SH")
1
^W1REP("H","W4SHPR",0,"SHULH")
ogley;3
^W1REP("H","W4SHPR",0,"SHULH","SET")
1
^W1REP("H","W4SHPR",0,"SHULH","SH")
1
^W1REP("H","W4SHPR",0,"SUGP")
hixt beq;3
^W1REP("H","W4SHPR",0,"SUGP","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","W4SHPR",0,"SUGP","OUT")
SUGP1
^W1REP("H","W4SHPR",0,"SUGP","SET")
1
^W1REP("H","W4SHPR",0,"SUGP1")
beq xe`z;10H
^W1REP("H","W4SHPR",0,"SUGP1","SET")
0
^W1REP("H","W4SHPR",0,"SUGP1","SH")
0
^W1REP("H","W4SHPR",0,"SUGS")
ogley beq;8
^W1REP("H","W4SHPR",0,"SUGS","FILE")
^|$$^%W1UCI(JB)|SUGS
^W1REP("H","W4SHPR",0,"SUGS","OUT")
SUGS1
^W1REP("H","W4SHPR",0,"SUGS","SET")
1
^W1REP("H","W4SHPR",0,"SUGS1")
xe`z;12H
^W1REP("H","W4SHPR",0,"SUGS1","SET")
0
^W1REP("H","W4SHPR",0,"SUGS1","SH")
1
^W1REP("H","W4SHPR",0,"x1")
zenk;5,0
^W1REP("H","W4SHPR",0,"x2")
dgpd iptl;10,2
^W1REP("H","W4SHPR",0,"x3")
hixtl dgpd;10,2
^W1REP("H","W4SHPR",0,"x4")
OTH dgpd;8,2
^W1REP("H","W4SHPR",0,"x5")
zegpd ixg`;10,2
^W1REP("H","W4SHPR",0,"x6")
;,
^W1REP("H","W4SHPR","COD")
SUGS*SUGS1*SHULH*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4*x5
^W1REP("H","W4SHPR","CT")
1****0*****
^W1REP("H","W4SHPR","FLD")
SUGS*SHULH*DEP*SUGP*PAR*x1*x2*x3*x4*x5
^W1REP("H","W4SHPR","FLD0")
*-*-*-******
^W1REP("H","W4SHPR","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","W4SHPR","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,SUGS,SHULH,DEP,SUGP,PAR)
^W1REP("H","W4SHPR","LPT")
S
^W1REP("H","W4SHPR","MIUN")
1*********
^W1REP("H","W4SHPR","QUERY","mihixt ibeqe ogley beq itl","CT")
1***2*0*****
^W1REP("H","W4SHPR","QUERY","mihixt ibeqe ogley beq itl","FLD0")
*-*-*******
^W1REP("H","W4SHPR","QUERY","mihixt ibeqe ogley beq itl","MIUN")
1***3******
^W1REP("H","W4SHPR","QUERY","mihixt ibeqe ogley beq itl","SIK0")
1***1*0*****
^W1REP("H","W4SHPR","QUERY","mihixte ogley beq itl","CT")
1****0*****
^W1REP("H","W4SHPR","QUERY","mihixte ogley beq itl","FLD0")
*-*-*-******
^W1REP("H","W4SHPR","QUERY","mihixte ogley beq itl","MIUN")
1*********
^W1REP("H","W4SHPR","QUERY","mihixte ogley beq itl","SIK0")
1****0*0****
^W1REP("H","W4SHPR","QUERY","zepgley itl","CT")
1*2***0*****
^W1REP("H","W4SHPR","QUERY","zepgley itl","FLD0")
**-*-******
^W1REP("H","W4SHPR","QUERY","zepgley itl","MIUN")
1*2********
^W1REP("H","W4SHPR","QUERY","zepgley itl","SIK0")
1*1***0*****
^W1REP("H","W4SHPR","SHP","KOD")
P1DMZPR
^W1REP("H","W4SHPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^W1REP("H","W4SHPR","SIK")
1*1*1*1*1*
^W1REP("H","W4SHPR","SIK0")
1****0*0****
^W1REP("H","W4SHPR","US",6)
D PAR^W4DPSHL
^W1REP("H","W4SNOU")
zipevig dpkezl dxardl mipezp zpkd
^W1REP("H","W4SNOU",0,"DEP")
dwlgn;5
^W1REP("H","W4SNOU",0,"DEP","FILE")
^|$$^%W1UCI(JB)|DEP
^W1REP("H","W4SNOU",0,"DEP","OUT")
DEP1
^W1REP("H","W4SNOU",0,"DEP","SET")
0
^W1REP("H","W4SNOU",0,"DEP1")
dwlgn my;15H
^W1REP("H","W4SNOU",0,"DEP1","SET")
0
^W1REP("H","W4SNOU",0,"DEP1","SH")
1
^W1REP("H","W4SNOU",0,"HB")
zipeayg;8
^W1REP("H","W4SNOU",0,"HZM")
dpnfd;7
^W1REP("H","W4SNOU",0,"HZM","SET")
1
^W1REP("H","W4SNOU",0,"HZM","SH")
1
^W1REP("H","W4SNOU",0,"LKH")
gewl 'qn;10
^W1REP("H","W4SNOU",0,"LKH","FILE")
^LKH
^W1REP("H","W4SNOU",0,"LKH","OUT")
LKH1
^W1REP("H","W4SNOU",0,"LKH1")
gewl my;20H
^W1REP("H","W4SNOU",0,"MRK")
sipq;7
^W1REP("H","W4SNOU",0,"MRK","FILE")
^|$$^%W1UCI(JB)|MRKZ
^W1REP("H","W4SNOU",0,"MRK","OUT")
MRK1
^W1REP("H","W4SNOU",0,"MRK","SET")
0
^W1REP("H","W4SNOU",0,"MRK1")
sipq my;15H
^W1REP("H","W4SNOU",0,"MRK1","SET")
0
^W1REP("H","W4SNOU",0,"MRK1","SH")
1
^W1REP("H","W4SNOU",0,"NAME")
gewl my;12H
^W1REP("H","W4SNOU",0,"NAME","SH")
1
^W1REP("H","W4SNOU",0,"NCAB")
zipeayg;6
^W1REP("H","W4SNOU",0,"NCAB","SH")
0
^W1REP("H","W4SNOU",0,"NMB")
gewl xtqn;10
^W1REP("H","W4SNOU",0,"NMB","FILE")
^LKH
^W1REP("H","W4SNOU",0,"NMB","OUT")
NAME
^W1REP("H","W4SNOU",0,"PAR")
hixt 'qn;8
^W1REP("H","W4SNOU",0,"PAR","FILE")
^|$$^%W1UCI(JB)|PAR
^W1REP("H","W4SNOU",0,"PAR","M2")
S PAR1=$$SHEM^W4P(PAR)
^W1REP("H","W4SNOU",0,"PAR","OUT")
PAR1
^W1REP("H","W4SNOU",0,"PAR","SET")
1
^W1REP("H","W4SNOU",0,"PAR1")
hixt xe`z;16H
^W1REP("H","W4SNOU",0,"PAR1","SET")
0
^W1REP("H","W4SNOU",0,"PAR1","SH")
1
^W1REP("H","W4SNOU",0,"PSL")
gily cew;3
^W1REP("H","W4SNOU",0,"PSL","FILE")
^P1SL
^W1REP("H","W4SNOU",0,"PSL","OUT")
PSL1
^W1REP("H","W4SNOU",0,"PSL1")
gily my;10H
^W1REP("H","W4SNOU",0,"PSL1","SH")
1
^W1REP("H","W4SNOU",0,"SHAA")
dryl;7
^W1REP("H","W4SNOU",0,"SHAA","SET")
1
^W1REP("H","W4SNOU",0,"SHAA","SH")
1
^W1REP("H","W4SNOU",0,"SL")
gily cew;5
^W1REP("H","W4SNOU",0,"SL","FILE")
^P1SL
^W1REP("H","W4SNOU",0,"SL","OUT")
SL1
^W1REP("H","W4SNOU",0,"SL1")
gily my;12H
^W1REP("H","W4SNOU",0,"SUGL")
gewl beq;8
^W1REP("H","W4SNOU",0,"SUGL","FILE")
^|$$^%W1UCI(JB)|SUGL
^W1REP("H","W4SNOU",0,"SUGL","OUT")
SUGL1
^W1REP("H","W4SNOU",0,"SUGL","SET")
1
^W1REP("H","W4SNOU",0,"SUGL1")
gewl beq xe`z;15H
^W1REP("H","W4SNOU",0,"SUGL1","SET")
0
^W1REP("H","W4SNOU",0,"SUGL1","SH")
1
^W1REP("H","W4SNOU",0,"SUGP")
mihixt zveaw;12
^W1REP("H","W4SNOU",0,"SUGP","FILE")
^|$$^%W1UCI(JB)|PARSUG
^W1REP("H","W4SNOU",0,"SUGP","OUT")
SUGP1
^W1REP("H","W4SNOU",0,"SUGP","SET")
0
^W1REP("H","W4SNOU",0,"SUGP1")
mihixt zveaw my;15H
^W1REP("H","W4SNOU",0,"SUGP1","SET")
0
^W1REP("H","W4SNOU",0,"SUGP1","SH")
1
^W1REP("H","W4SNOU",0,"SUGS")
ogley beq;5
^W1REP("H","W4SNOU",0,"SUGS","FILE")
^|$$^%W1UCI(JB)|SUGS
^W1REP("H","W4SNOU",0,"SUGS","OUT")
SUGS1
^W1REP("H","W4SNOU",0,"SUGS","SET")
0
^W1REP("H","W4SNOU",0,"SUGS1")
'ley beq xe`z;12
^W1REP("H","W4SNOU",0,"SUGS1","OUT")
1
^W1REP("H","W4SNOU",0,"SUGS1","SET")
0
^W1REP("H","W4SNOU",0,"SUGT")
melyz beq;5
^W1REP("H","W4SNOU",0,"SUGT","SH")
1
^W1REP("H","W4SNOU",0,"TRH")
jix`z;8D
^W1REP("H","W4SNOU",0,"TRH","M2")
S TRH=$ZD(DT,3)
^W1REP("H","W4SNOU",0,"TRH","SET")
0
^W1REP("H","W4SNOU",0,"TRH","SH")
1
^W1REP("H","W4SNOU",0,"TRH1")
YYYYMMDD;8
^W1REP("H","W4SNOU",0,"TRH1","SET")
0
^W1REP("H","W4SNOU",0,"TRH1","SH")
1
^W1REP("H","W4SNOU",0,"TS")
melyzl;8
^W1REP("H","W4SNOU",0,"TSHL")
melyzl;8
^W1REP("H","W4SNOU",0,"TSHL","OUT")
TSHL
^W1REP("H","W4SNOU",0,"x1")
zenk;4,0
^W1REP("H","W4SNOU",0,"x2")
mekq;8,2
^W1REP("H","W4SNOU",0,"x3")
;,
^W1REP("H","W4SNOU","COD")
MRK*MRK1*TRH*TRH1*SHAA*SUGL*SUGL1*SUGS*SUGS1*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*HZM*x1*x2
^W1REP("H","W4SNOU","CT")
0*0*0*0*0*1*1*2*0*0
^W1REP("H","W4SNOU","FLD")
MRK*TRH*TRH1*SHAA*SUGL*SUGS*DEP*SUGP*PAR*HZM*x1*x2
^W1REP("H","W4SNOU","FLD0")
*-****-******
^W1REP("H","W4SNOU","GLOB1")
^|$$^W3MAIN|VRM(PRTN)
^W1REP("H","W4SNOU","GLOB2")
^|$$^W3MAIN|VRM(PRTN,DT,SHAA,SUGL,HZM,PAR)
^W1REP("H","W4SNOU","LPT")
B
^W1REP("H","W4SNOU","MIUN")
1*4*6*7*2*1*3*4*8*5
^W1REP("H","W4SNOU","MIUN","PROG")
TRH^W4SNDOUT
^W1REP("H","W4SNOU","QUERY","zewlgne zegewl ibeq , mitipq itl","CT")
0*0*0*0*0*1*1*2*0*0
^W1REP("H","W4SNOU","QUERY","zewlgne zegewl ibeq , mitipq itl","FLD0")
*-****-******
^W1REP("H","W4SNOU","QUERY","zewlgne zegewl ibeq , mitipq itl","MIUN")
1*5*6*7*2*3*3*4*8*5
^W1REP("H","W4SNOU","QUERY","zewlgne zegewl ibeq , mitipq itl","SIK0")
0*0*0*0*0*0*0*0*0*0
^W1REP("H","W4SNOU","SHP","KOD")
P1HZH
^W1REP("H","W4SNOU","SIK")
1*1*
^W1REP("H","W4SNOU","SIK0")
0*1*0*0*0*1*0*0*0*0
^W1REP("H","W4SNOU","US",2)
D DT^W4SNDOUT
^W1REP("H","W4SNOU","US",5)
D HZM1^W4SNDOUT
^W1REP("H","W4SNOU","US",6)
D PAR^W4SNDOUT
^W1REP("H","W4TFKNET")
izyx micaer zwetz g"ec
^W1REP("H","W4TFKNET",0,"DAT")
jix`z;8D
^W1REP("H","W4TFKNET",0,"DAT","SET")
0
^W1REP("H","W4TFKNET",0,"DAT","SH")
1
^W1REP("H","W4TFKNET",0,"MSD")
sipq;5
^W1REP("H","W4TFKNET",0,"MSD","FILE")
^|$$^W3MAIN|TMPSN
^W1REP("H","W4TFKNET",0,"MSD","M2")
S MSD1=$$MSD^W3R(MSD)
^W1REP("H","W4TFKNET",0,"MSD","OUT")
MSD1
^W1REP("H","W4TFKNET",0,"MSD","SET")
1
^W1REP("H","W4TFKNET",0,"MSD1")
sipq my;12H
^W1REP("H","W4TFKNET",0,"MSD1","SET")
0
^W1REP("H","W4TFKNET",0,"MSD1","SH")
1
^W1REP("H","W4TFKNET",0,"NP")
dxey 'qn;4
^W1REP("H","W4TFKNET",0,"NP","SET")
1
^W1REP("H","W4TFKNET",0,"NP","SH")
1
^W1REP("H","W4TFKNET",0,"NP1")
dxey 'qn;4
^W1REP("H","W4TFKNET",0,"NP1","SET")
0
^W1REP("H","W4TFKNET",0,"NP1","SH")
1
^W1REP("H","W4TFKNET",0,"x1")
zery;11,0
^W1REP("H","W4TFKNET",0,"x10")
mipt icaer zwetz;5,2
^W1REP("H","W4TFKNET",0,"x11")
migily zwetz;5,2
^W1REP("H","W4TFKNET",0,"x12")
;,
^W1REP("H","W4TFKNET",0,"x2")
mewna k"dq;7,2
^W1REP("H","W4TFKNET",0,"x3")
mewna zepnfd;5,0
^W1REP("H","W4TFKNET",0,"x4")
TA k"dq;7,2
^W1REP("H","W4TFKNET",0,"x5")
TA zeppnfd;5,0
^W1REP("H","W4TFKNET",0,"x6")
migelyn k"dq;7,2
^W1REP("H","W4TFKNET",0,"x7")
migelyn zepnfd;5,0
^W1REP("H","W4TFKNET",0,"x8")
mipt icaer 'qn;5,0
^W1REP("H","W4TFKNET",0,"x9")
migily 'qn;5,0
^W1REP("H","W4TFKNET","COD")
DAT*MSD*MSD1*NP1*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11
^W1REP("H","W4TFKNET","CT")
0*0
^W1REP("H","W4TFKNET","FLD")
DAT*MSD*NP1*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11
^W1REP("H","W4TFKNET","FLD0")
DAT*MSD
^W1REP("H","W4TFKNET","GLOB1")
^|$$^W3MAIN|W4TFKNET(MSDR)
^W1REP("H","W4TFKNET","GLOB2")
^|$$^W3MAIN|W4TFKNET(MSDR,DT,MSD,NP)
^W1REP("H","W4TFKNET","LPT")
B
^W1REP("H","W4TFKNET","MAM")
*1**1**1******
^W1REP("H","W4TFKNET","MIUN")
1*2
^W1REP("H","W4TFKNET","QUERY","mikix`ze mitipq itl","CT")
0*0
^W1REP("H","W4TFKNET","QUERY","mikix`ze mitipq itl","FLD0")
DAT*MSD
^W1REP("H","W4TFKNET","QUERY","mikix`ze mitipq itl","MIUN")
2*1
^W1REP("H","W4TFKNET","QUERY","mikix`ze mitipq itl","SIK0")
1*1
^W1REP("H","W4TFKNET","QUERY","mitipqe mikix`z itl","CT")
0*0
^W1REP("H","W4TFKNET","QUERY","mitipqe mikix`z itl","FLD0")
DAT*MSD
^W1REP("H","W4TFKNET","QUERY","mitipqe mikix`z itl","MIUN")
1*2
^W1REP("H","W4TFKNET","QUERY","mitipqe mikix`z itl","SIK0")
1*1
^W1REP("H","W4TFKNET","SIK")
*1*1*1**1******
^W1REP("H","W4TFKNET","SIK0")
1*1
^W1REP("H","W4TFKNET","US",2)
D DAT^W4TFKNET
^W1REP("H","W4TFKNET","US",4)
D NP^W4TFKNET
^W1REP("H","WBREP")
wi'bel qpfia ly zeahde minelyz
^W1REP("H","WBREP",0,"ASM")
l-a dzknq`;8
^W1REP("H","WBREP",0,"ASM","SET")
0
^W1REP("H","WBREP",0,"ASM","SH")
1
^W1REP("H","WBREP",0,"CARD")
qihxk 'qn;10
^W1REP("H","WBREP",0,"CARD","SET")
0
^W1REP("H","WBREP",0,"CARD","SH")
1
^W1REP("H","WBREP",0,"CLUB")
oecren 'qn;10
^W1REP("H","WBREP",0,"CLUB","FILE")
^|$$^%W1UCI(JB)|B1CLUB
^W1REP("H","WBREP",0,"CLUB","M2")
S CLUB1=$$CLUB1^WBREP(CLUB)
^W1REP("H","WBREP",0,"CLUB","OUT")
CLUB1
^W1REP("H","WBREP",0,"CLUB","SET")
1
^W1REP("H","WBREP",0,"CLUB1")
oecren my;12H
^W1REP("H","WBREP",0,"CLUB1","SET")
0
^W1REP("H","WBREP",0,"CLUB1","SH")
1
^W1REP("H","WBREP",0,"HB")
zipeayg;8
^W1REP("H","WBREP",0,"HZM")
dpnfd;8
^W1REP("H","WBREP",0,"HZM","SET")
1
^W1REP("H","WBREP",0,"HZM","SH")
1
^W1REP("H","WBREP",0,"LKH")
gewl 'qn;10
^W1REP("H","WBREP",0,"LKH","FILE")
^LKH
^W1REP("H","WBREP",0,"LKH","OUT")
LKH1
^W1REP("H","WBREP",0,"LKH1")
gewl my;20H
^W1REP("H","WBREP",0,"NAME")
gewl my;12H
^W1REP("H","WBREP",0,"NAME","SET")
0
^W1REP("H","WBREP",0,"NAME","SH")
1
^W1REP("H","WBREP",0,"NCAB")
zipeayg;6
^W1REP("H","WBREP",0,"NCAB","SH")
0
^W1REP("H","WBREP",0,"NMB")
gewl xtqn;10
^W1REP("H","WBREP",0,"NMB","FILE")
^LKH
^W1REP("H","WBREP",0,"NMB","OUT")
NAME
^W1REP("H","WBREP",0,"NP")
dxey;8
^W1REP("H","WBREP",0,"NP","SET")
1
^W1REP("H","WBREP",0,"NP","SH")
1
^W1REP("H","WBREP",0,"PAR")
hixt 'qn;8
^W1REP("H","WBREP",0,"PAR","FILE")
^PAR
^W1REP("H","WBREP",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^W1REP("H","WBREP",0,"PAR","OUT")
PAR1
^W1REP("H","WBREP",0,"PAR1")
hixt xe`z;16H
^W1REP("H","WBREP",0,"PAR1","SH")
1
^W1REP("H","WBREP",0,"PSL")
gily cew;3
^W1REP("H","WBREP",0,"PSL","FILE")
^P1SL
^W1REP("H","WBREP",0,"PSL","OUT")
PSL1
^W1REP("H","WBREP",0,"PSL1")
gily my;10H
^W1REP("H","WBREP",0,"PSL1","SH")
1
^W1REP("H","WBREP",0,"SHAA")
dryl;5
^W1REP("H","WBREP",0,"SHAA","SH")
1
^W1REP("H","WBREP",0,"SL")
gily cew;5
^W1REP("H","WBREP",0,"SL","FILE")
^P1SL
^W1REP("H","WBREP",0,"SL","OUT")
SL1
^W1REP("H","WBREP",0,"SL1")
gily my;12H
^W1REP("H","WBREP",0,"SUGT")
melyz beq;5
^W1REP("H","WBREP",0,"SUGT","SH")
1
^W1REP("H","WBREP",0,"TRH")
jix`z;8D
^W1REP("H","WBREP",0,"TRH","M2")
S TRH=$$^%L1DC(DT,1)
^W1REP("H","WBREP",0,"TRH","SET")
0
^W1REP("H","WBREP",0,"TRH","SH")
1
^W1REP("H","WBREP",0,"TS")
melyzl;8
^W1REP("H","WBREP",0,"TSHL")
melyzl;8
^W1REP("H","WBREP",0,"TSHL","OUT")
TSHL
^W1REP("H","WBREP",0,"x1")
gewl my;12,0
^W1REP("H","WBREP",0,"x2")
qihxk 'qn;12,0
^W1REP("H","WBREP",0,"x3")
`zknq`;10,0
^W1REP("H","WBREP",0,"x4")
zegpd;7,1
^W1REP("H","WBREP",0,"x5")
'wp yenin;7,1
^W1REP("H","WBREP",0,"x6")
mley;7,1
^W1REP("H","WBREP",0,"x7")
;,
^W1REP("H","WBREP","COD")
TRH*CLUB*CLUB1*HZM*NP*x1*x2*x3*x4*x5*x6
^W1REP("H","WBREP","CT")
2*1*0*0*0*0
^W1REP("H","WBREP","FLD")
TRH*CLUB*HZM*NP*x1*x2*x3*x4*x5*x6
^W1REP("H","WBREP","FLD0")
********
^W1REP("H","WBREP","GLOB1")
^|$$^%W1UCI(JB)|VRM(PRTN)
^W1REP("H","WBREP","GLOB2")
^|$$^%W1UCI(JB)|VRM(PRTN,DT,CLUB,HZM,NP)
^W1REP("H","WBREP","LPT")
S
^W1REP("H","WBREP","MIUN")
2*1*3*4*5*6
^W1REP("H","WBREP","QUERY","mikix`z itl mipecren","CT")
2*1*0*0*0*0
^W1REP("H","WBREP","QUERY","mikix`z itl mipecren","FLD0")
********
^W1REP("H","WBREP","QUERY","mikix`z itl mipecren","MIUN")
2*1*3*4*5*6
^W1REP("H","WBREP","QUERY","mikix`z itl mipecren","SIK0")
1*1*0*0*0*0
^W1REP("H","WBREP","QUERY","mipecren itl mikix`z","CT")
1*2*0*0*0*0
^W1REP("H","WBREP","QUERY","mipecren itl mikix`z","FLD0")
*****
^W1REP("H","WBREP","QUERY","mipecren itl mikix`z","MIUN")
1*2*3*4*0*0
^W1REP("H","WBREP","QUERY","mipecren itl mikix`z","SIK0")
1*1*0*0*0*0
^W1REP("H","WBREP","SHP","KOD")
P1HZH
^W1REP("H","WBREP","SIK")
0*0*0*1*1*1*
^W1REP("H","WBREP","SIK0")
1*1*0*0*0*0
^W1REP("H","WBREP","US",2)
D HZM^WBREP
^W1REP("H","WBREP","US",3)
S CLUB1=$$CLUB1^WBREP(CLUB)
^W1REP("H","WBREP","US",4)
D HZM^WBREP
^W1REP("H","WBREP","US",5)
D NP^WBREP
^W1REP("H","WTIP")

^W1REP("H","ZMRK")
mifkxn itl Z-im fekix
^W1REP("H","ZMRK",0,"DAT")
jix`z;8D
^W1REP("H","ZMRK",0,"DAT","SH")
1
^W1REP("H","ZMRK",0,"MRK")
fkxn;4
^W1REP("H","ZMRK",0,"MRK","FILE")
^MRKZ
^W1REP("H","ZMRK",0,"MRK","OUT")
MRKZ1
^W1REP("H","ZMRK",0,"MRK1")
fkxn my;12H
^W1REP("H","ZMRK",0,"MRKZ")
fkxn;6
^W1REP("H","ZMRK",0,"MRKZ","FILE")
^MRKZ
^W1REP("H","ZMRK",0,"MRKZ","OUT")
MRKZ1
^W1REP("H","ZMRK",0,"MRKZ1")
fkxn my;12H
^W1REP("H","ZMRK",0,"MRKZ1","SH")
1
^W1REP("H","ZMRK",0,"TRH")
jix`z;8D
^W1REP("H","ZMRK",0,"TRH","SH")
1
^W1REP("H","ZMRK",0,"x1")
onefn;9,1
^W1REP("H","ZMRK",0,"x2")
scer;9,1
^W1REP("H","ZMRK",0,"x3")
wiy;9,1
^W1REP("H","ZMRK",0,"x4")
`"k;9,1
^W1REP("H","ZMRK",0,"x5")
oeict k"dq;9,1
^W1REP("H","ZMRK",0,"x6")
dtwd;9,1
^W1REP("H","ZMRK",0,"x7")
zexiknd k"dq;9,1
^W1REP("H","ZMRK",0,"x8")
;,
^W1REP("H","ZMRK","COD")
TRH*MRKZ*MRKZ1*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","ZMRK","CT")
2*2
^W1REP("H","ZMRK","FLD")
TRH*MRKZ*x1*x2*x3*x4*x5*x6*x7
^W1REP("H","ZMRK","FLD0")
-********
^W1REP("H","ZMRK","GLOB1")
^Z1MRK
^W1REP("H","ZMRK","GLOB2")
^Z1MRK(DAT,MRKZ,NM,VT)
^W1REP("H","ZMRK","LPT")
B
^W1REP("H","ZMRK","MIUN")
2*1
^W1REP("H","ZMRK","MIUN","PROG")
CP^P1ZMRK
^W1REP("H","ZMRK","QUERY","iztewz mekiq mifkxn","CT")
2*2
^W1REP("H","ZMRK","QUERY","iztewz mekiq mifkxn","FLD0")
-********
^W1REP("H","ZMRK","QUERY","iztewz mekiq mifkxn","MIUN")
2*1
^W1REP("H","ZMRK","QUERY","iztewz mekiq mifkxn","SIK0")
1*1
^W1REP("H","ZMRK","QUERY","mifkxn itl mikix`z","CT")
2*2
^W1REP("H","ZMRK","QUERY","mifkxn itl mikix`z","FLD0")

^W1REP("H","ZMRK","QUERY","mifkxn itl mikix`z","MIUN")
1*2
^W1REP("H","ZMRK","QUERY","mifkxn itl mikix`z","SIK0")
1*0
^W1REP("H","ZMRK","QUERY","mikix`z itl mifkxn","CT")
2*2
^W1REP("H","ZMRK","QUERY","mikix`z itl mifkxn","FLD0")
********
^W1REP("H","ZMRK","QUERY","mikix`z itl mifkxn","MIUN")
2*1
^W1REP("H","ZMRK","QUERY","mikix`z itl mifkxn","SIK0")
1*1
^W1REP("H","ZMRK","SIK")
1*1*1*1*1*1*1*
^W1REP("H","ZMRK","SIK0")
1*1
^W1REP("H","ZMRK","US",1)
D DAT^P1ZMRK
^W1REP("H","ZMRK","US",4)
D VT^P1ZMRK
^W1REP("H","w4mltnq")

^W3KASHER("H",1)

^W3KASHER("H",2)
xyk
^W3KASHER("H",3)
oixcdnl xyk
^W3KKIND

^W3KKIND("H","`ihlwi")
iwlhi`
^W3KKIND("H","`nxiw`i")
i`wixn`
^W3KKIND("H","`xbphip`i")
i`pihpbx`
^W3KKIND("H","ace`i")
i`eca
^W3KKIND("H","aelbxi")
ixblea
^W3KKIND("H","aexwq")
qwxea
^W3KKIND("H","alwpi")
ipwla
^W3KKIND("H","ayxi")
ixya
^W3KKIND("H","bxefipi")
ipifexb
^W3KKIND("H","bxil ax")
xa lixb
^W3KKIND("H","cbim")
mibc
^W3KKIND("H","cim q`m")
m`q mic
^W3KKIND("H","cxefi")
ifexc
^W3KKIND("H","deci")
iced
^W3KKIND("H","depcxi")
ixcped
^W3KKIND("H","dnaexbx")
xbxeand
^W3KKIND("H","geneq")
qeneg
^W3KKIND("H","glai")
ialg
^W3KKIND("H","hexwi")
iwxeh
^W3KKIND("H","ideci")
icedi
^W3KKIND("H","ieepi")
ipeei
^W3KKIND("H","itpi")
ipti
^W3KKIND("H","iyx`li")
il`xyi
^W3KKIND("H","kexci")
icxek
^W3KKIND("H","nfxg `ixet`i")
i`texi` gxfn
^W3KKIND("H","nfxgi")
igxfn
^W3KKIND("H","nwqiwpi")
ipwiqwn
^W3KKIND("H","nxew`i")
i`wexn
^W3KKIND("H","qeyi")
iyeq
^W3KKIND("H","qipi")
ipiq
^W3KKIND("H","qpceeiu' ax")
xa 'uieecpq
^W3KKIND("H","qtxci")
icxtq
^W3KKIND("H","rixwi")
iwxir
^W3KKIND("H","tivxid")
dixvit
^W3KKIND("H","tixez im")
mi zexit
^W3KKIND("H","tl`tl")
lt`lt
^W3KKIND("H","tqhd")
dhqt
^W3KKIND("H","txqi")
iqxt
^W3KKIND("H","vngepi")
ipegnv
^W3KKIND("H","vxtzi")
iztxv
^W3KKIND("H","wepcihexid")
dixehicpew
^W3KKIND("H","xenpi")
ipnex
^W3KKIND("H","xeqi")
iqex
^W3KKIND("H","yeexnd")
dnxeey
^W3KKIND("H","yitecid")
dicetiy
^W3KKIND("H","ypivl ax")
xa lvipy
^W3KKIND("H","z`ilpci")
icpli`z
^W3KKIND("H","ziinpi")
ipniiz
^W3KKIND("R","!aponska!a")
!aponska!a
^W3KKIND("R","!kita!iska!a")
kita!iska!a
^W3KKIND("R","arm!anska!a")
arm!anska!a
^W3KKIND("R","evrope!iska!a")
evrope!iska!a
^W3KKIND("R","fast-fud")
fast-fud
^W3KKIND("R","francuzska!a")
francuzska!a
^W3KKIND("R","gre!4eska!a")
gre!4eska!a
^W3KKIND("R","gruzinska!a")
gruzinska!a
^W3KKIND("R","ital!manska!a")
ital!m!anska!a
^W3KKIND("R","konditerska!a")
konditerska!a
^W3KKIND("R","meksikanska!a")
meksikanska!a
^W3KKIND("R","nacional!mna!a")
nacional!mna!a
^W3KKIND("R","nemecka!a")
nemecka!a
^W3KKIND("R","picceri!a")
picceri!a
^W3KKIND("R","russka!a")
russka!a
^W3KKIND("R","s!endvi!4 bar")
s!endvi!4 bar
^W3KKIND("R","ta!iska!a")
ta!iska!a
^W3KKIND("R","turecka!a")
turecka!a
^W3KKIND("R","ukrainska!a")
ukrainska!a
^W3KKIND("R","v!metnamska!a")
v!metnamska!a
^W3PRICE

^W3PRICE("IS",1)
25-50
^W3PRICE("IS",2)
50-100
^W3PRICE("IS",3)
100-150
^W3PRICE("IS",4)
150-200
^W3PRICE("IS",5)
200-250
^W3PRICE("IS",6)
250-300
^W3PRICE("IS",7)
300-350
^W3PRICE("IS",8)
350-400
^W3PRICE("IS",9)
400-450
^W3PRICE("IS",10)
450-500
^W3PRICE("RU",1)
50-100
^W3PRICE("RU",2)
100-150
^W3PRICE("RU",3)
150-200
^W3PRICE("RU",4)
250-300
^W3PRICE("RU",5)
350-400
^W3PRICE("RU",6)
400-500
^W3PRICE("RU",7)
500-600
^W3PRICE("RU",8)
600-700
^W3PRICE("RU",9)
700-800
^W3PRICE("RU",10)
800-1000
^W3SUGTS

^W3SUGTS(1)
onefn
^W3SUGTS(2)
wiy
^W3SUGTS(3)
i`xy` qihxk
^W3SUGTS(4)
dtwd
^W3SUGTS(8)
qeaiq
^W3SUGTS(10)
qia oz
^W3SUGTS(12)
PAIDIT
^W4ABS("HAG")
bg
^W4ABS("HF")
yteg
^W4ABS("HT")
zexcrd
^W4ABS("MHL")
dlgn
^W4ABS("MHLY")
cli zlgn
^W4ABS("ML")
mie`lin
^W4ASK

^W4ASK("ADDCHN","ASK",1)
COMMENTEXIST;1;;<;;
^W4ASK("ADDCHN","ASK",1,1)
CHANGE;1;
^W4ASK("ADDCHN","ASK",1,2)
ADD;2;
^W4ASK("ADVPAY","PAY",1)
CUSTOMNUMBER;11;;;CUST^W4ADVPAY
^W4ASK("ADVPAY","PAY",2)
SUM;7,2;;;NOZERO^W4SCASK
^W4ASK("BSL","PAY",1)
SUM;7,2;1;;;1;
^W4ASK("CLK","ADDWORKERS2BIO",1)
WORKERNUMBER;7;;;WRKNMB^W4CLKVW
^W4ASK("CLK","ADDWORKERS2BIO",2)
WORKERNAME;14;;O;
^W4ASK("CLK","INOUT",1)
ENTRANCEOREXIT?;1;;<;;
^W4ASK("CLK","INOUT",1,1)
ENTER;1;
^W4ASK("CLK","INOUT",1,2)
OUT;2;
^W4ASK("CLK","SHOWTMP",1)
WORKERNUMBER;5;
^W4ASK("CLK","SHOWTMP",2)
WORKERNAME;14;
^W4ASK("CLK","WORKERNUMBER",1)
WORKERNUMBER;$S($$ASKWAITERNUMBER^W4PRM:18,1:5);;;WRKNMB^W4CLKVW
^W4ASK("CLK","WORKERNUMBER",2)
WORKERNAME;14;;O;
^W4ASK("COPY","ASK",1)
PRINT2KITCHEN;1;;<;;
^W4ASK("COPY","ASK",1,1)
YES;1;
^W4ASK("COPY","ASK",1,2)
NO;0;
^W4ASK("CSNM","ASK",1)
CUSTOMNAME;20H;;;VLDNAME^W4CSNM
^W4ASK("CSNM","ASK",2)
PHONE;10;;;VLDPELE^W4CSNM;$$QUESMS^W4PRM;
^W4ASK("CUSDET","PAY",1)
CUSTOMNUM;11;;;VLDCUSN^W4CUSDET
^W4ASK("CUSDET","PAY",2)
CUSTOMNAME;18H;$$DFLTNAME^W4CUSDET;;VLDNAME^W4CUSDET;1
^W4ASK("CUSDET","PAY",3)
CUSTOMTEL;11;$$DFLTEL^W4CUSDET;;VLDTEL^W4CUSDET;1
^W4ASK("CUSDET","PAY",4)
TZ;9;$$DFLTZ^W4CUSDET;;TZ^W4PAYKB;1;
^W4ASK("DEL","ASK",1)
WHOSUBMIT;7!;$$GETP^%W1PRM("MNL");;VLDWHO^W4SCASK
^W4ASK("DEL","ASK",2)
CAUSEDEL;1;;<;;;$$^W4GL("P1SBIT")
^W4ASK("DEL","ASK",3)
EXIT2KITCHEN?;1;;<;;
^W4ASK("DEL","ASK",3,1)
EXIT2KITCHEN;1;
^W4ASK("DEL","ASK",3,2)
NOEXIT2KITCHEN;0;
^W4ASK("DEL","ASK",4)
DELETE?;1;1;<;;
^W4ASK("DEL","ASK",4,1)
DELETEITEM;1;
^W4ASK("DEL","ASK",4,2)
DELETEANDRESTITEM;2;
^W4ASK("DELPAYM","ASK",1)
WHOSUBMIT;7!;;;VLDWHO^W4SCASK
^W4ASK("DISCIT","ASK",1)
DISCPERCENT;1;;<20;;;$$^W4GL("P1HNH");;$$USDISCIT^W4SCASK
^W4ASK("DISCIT","ASK",2)
WHOSUBMIT;7;;;VLDWHO^W4SCASK
^W4ASK("DISCIT","ASK",3)
CAUSEDISC;1;;<20;;;$$^W4GL("P1SHNH")
^W4ASK("DISCNIS","ASK",1)
DISCNIS;6;;;VLDDISCNIS^W4SCASK
^W4ASK("DISCNIS","ASK",2)
WHOSUBMIT;7!;;;VLDWHO^W4SCASK
^W4ASK("DISCNIS","ASK",3)
CAUSEDISC;1;;<20;;;$$^W4GL("P1SHNH")
^W4ASK("DISCOTH","ASK",1)
WHOSUBMIT;7;;;VLDWHO^W4SCASK
^W4ASK("DISCOTH","ASK",2)
CAUSEDISC;1;;<20;;;$$^W4GL("P1SHNH")
^W4ASK("DISCOUNT","ASK",1)
DISCPERCENT;1;;<20;;;$$^W4GL("P1HNH");$$USDISC^W4SCASK
^W4ASK("DISCOUNT","ASK",2)
WHOSUBMIT;7!;;;VLDWHO^W4SCASK
^W4ASK("DISCOUNT","ASK",3)
CAUSEDISC;1;;<20;;;$$^W4GL("P1SHNH")
^W4ASK("EDOPT","ASK",1)
EDITOPTION;1;;<;;
^W4ASK("EDOPT","ASK",1,1)
COMMENT;1;
^W4ASK("EDOPT","ASK",1,2)
DELETEITEM;0;
^W4ASK("FIRE","ASK",1)
WHATPRINTERTOBESEND;1;;<;;;$$^W4MAIN("TMPMDP")
^W4ASK("FNDORD","DOP",1)
KINDOFORDER;1;;<;
^W4ASK("FNDORD","DOP",1,1)
ALLORDERS;0;
^W4ASK("FNDORD","DOP",1,2)
CLOSEDORDERS;1;
^W4ASK("FNDORD","DOP",1,3)
OPENORDERS;2;
^W4ASK("FNDORD","DOP",2)
HZMLK;8;;;;
^W4ASK("FNDORD","DOP",3)
KINDOFPAYMENT;1;;<;;
^W4ASK("FNDORD","DOP",3,1)
ALLKINDOFPAYMENTS;0;
^W4ASK("FNDORD","DOP",3,2)
CASH;1;
^W4ASK("FNDORD","DOP",3,3)
CHECK;2;
^W4ASK("FNDORD","DOP",3,4)
CRCARD;3;
^W4ASK("FNDORD","DOP",3,5)
CREDIT;4;
^W4ASK("FNDORD","DOP",3,6)
TLUSH;5;
^W4ASK("FNDORD","FROMUNTIL",1)
FROMTABLE;$S($$^W4DLVCSR:11,1:3);$S($$^W4DLVCSR:1000,1:1);;FROMTABLE^W4FNDORD;
^W4ASK("FNDORD","FROMUNTIL",2)
UNTILTABLE;$S($$^W4DLVCSR:11,1:3);$S($$^W4DLVCSR:99999999999,1:999);;UNTILTABLE^W4FNDORD;
^W4ASK("FNDORD","FROMUNTIL",3)
MEDATE;6;$TR($$^%L1DC($$^W4DZ,1),".","");;FROMDATE^W4FNDORD;
^W4ASK("FNDORD","FROMUNTIL",4)
ADDATE;6;$TR($$^%L1DC($$^W4DZ,1),".","");;UNTILDATE^W4FNDORD;
^W4ASK("FNDORD","FROMUNTIL",5)
FROMSUM;7,2;-99999;;FROMSUM^W4FNDORD;
^W4ASK("FNDORD","FROMUNTIL",6)
UNTILSUM;7,2;99999;;FROMSUM^W4FNDORD;
^W4ASK("FNDORD","FROMUNTIL",7)
CREDITCARD4;19;;;CRCARD^W4FNDORD;
^W4ASK("FNDORD","HISTDATE",1)
MEDATE;6;$TR($$^%L1DC($$^W4DZ,1),".","");;FROMDATE^W4FNDORD;
^W4ASK("FNDORD","ORDNMB",1)
ORDERNUMBER;9;;;ORDNMB^W4FNDORD;;FindOrdNmb()
^W4ASK("FNDORD","SHOWTMP",1)
FROMTABLE;3;
^W4ASK("FNDORD","SHOWTMP",2)
UNTILTABLE;3;
^W4ASK("FNDORD","SHOWTMP",3)
MEDATE;6D;
^W4ASK("FNDORD","SHOWTMP",4)
ADDATE;6D;
^W4ASK("FNDORD","SHOWTMP",5)
FROMSUM;7,2;
^W4ASK("FNDORD","SHOWTMP",6)
UNTILSUM;7,2;
^W4ASK("GCOUP","PAY",1)
SUM;7,2;;;SUM^W4GCOUP
^W4ASK("GCOUP","PAY",2)
PAYERTEL;11;;;TEL^W4GCOUP
^W4ASK("GCOUP","PAY",3)
PAYERNAME;16H;;;PAYER^W4GCOUP
^W4ASK("GCOUP","PAY",4)
RECIPIENTNAME;16H;;;
^W4ASK("GCOUPA","PAY",1)
CUSTOMNUMBER;11;;;CUST^W4GCOUP
^W4ASK("GCOUPA","PAY",2)
PAYERNAME;16H;;;PAYER^W4GCOUP
^W4ASK("GCOUPA","PAY",3)
PAYERTEL;11;;;TEL^W4GCOUP
^W4ASK("GCOUPA","PAY",4)
RECIPIENTNAME;16H;;;
^W4ASK("GCOUPA","PAY",5)
SUM;7,2;;;SUM^W4GCOUP
^W4ASK("GCOUPC","PAY",1)
SUM;7,2;;;SUM^W4GCOUP
^W4ASK("GCOUPC","PAY",2)
COUPNUMBER;7;;;COUPNUMBER^W4GCOUP
^W4ASK("GCOUPC","PAY",3)
PAYERTEL;11;;;TEL^W4GCOUP
^W4ASK("GCOUPC","PAY",4)
PAYERNAME;16H;;;PAYER^W4GCOUP
^W4ASK("GCOUPC","PAY",5)
RECIPIENTNAME;16H;;;
^W4ASK("GCOUPT","PAY",1)
SUM;7,2;;;SUM^W4GCOUP
^W4ASK("GCOUPT","PAY",2)
CUSTOMNUMBER;11;;;CUST^W4GCOUP
^W4ASK("GCOUPT","PAY",3)
PAYERNAME;16H;;;PAYER^W4GCOUP
^W4ASK("HBLAST","ASK",1)
CUSTOMNUMBER;11;;;CUST^W4HBLAST
^W4ASK("ITRA","ITRA",1)
CUSTOMNUMBER;11;;;CUST^W4LKITRA
^W4ASK("LL","ASK",1)
WHATYOUWHANT;1;;<;
^W4ASK("LL","ASK",1,1)
STAY;1;
^W4ASK("LL","ASK",1,2)
TAKE;2;
^W4ASK("LL","ASK",1,3)
PODNOS;3;;;;;;$$PODNOS^W4PRM;
^W4ASK("LL","ASK",2)
CUSTOMNAME;20H;;;VLDNAME^W4LL
^W4ASK("LL","ASK",3)
PHONE;14;;;;$$QUESMS^W4PRM
^W4ASK("MAXHMK","PAY",1)
SUM;7,2;
^W4ASK("MCCLORD","ORDNMB",1)
ORDERNUMBER;7;;;ORDNMB^WMCCLORD
^W4ASK("MCCLORD","ORDNMB",2)
MYCHCODE;4;;;MYCHCODE^WMCCLORD
^W4ASK("MULTY","ASK",1)
MULTYLINE;1;;<;;
^W4ASK("MULTY","ASK",1,1)
MULTYWITHCOMMENTS;1;
^W4ASK("MULTY","ASK",1,2)
MULTYWITHOUTCOMMENTS;2;
^W4ASK("PRNORD","ASK",1)
PRINTORDER;1;;<;;
^W4ASK("PRNORD","ASK",1,1)
PRINTALLORDER;1;
^W4ASK("PRNORD","ASK",1,2)
PRINTLASTPARTOFORDER;2;
^W4ASK("TELMENU","ASK",1)
KINDOFREPORT;1;;<20;;
^W4ASK("TELMENU","ASK",1,.5)
RESTMZV;MZV;1
^W4ASK("TELMENU","ASK",1,1)
REPORTXTODAY;XMENU;1
^W4ASK("TELMENU","ASK",1,2)
MANYREPORT;MNY;1
^W4ASK("TELMENU","ASK",1,2.5)
SHORTMANYREPORT;MNS;1
^W4ASK("TELMENU","ASK",1,2.7)
GAPZREPORT;GAPZ;1
^W4ASK("TELMENU","ASK",1,3)
WAITERSREPORT;MLZ;$$MSDT^W4PRM
^W4ASK("TELMENU","ASK",1,4)
ONEWAITERREPORT;MLZ1;$$MSDT^W4PRM
^W4ASK("TELMENU","ASK",1,5)
COURIERSMANYREPORT;MSH;$$MSL^W4PRM
^W4ASK("TELMENU","ASK",1,6)
ONECOURIERREPORT;MSH1;$$MSL^W4PRM
^W4ASK("TELMENU","ASK",1,6.2)
COURIERSORDERSREPORT;MSHD;$$MSL^W4PRM
^W4ASK("TELMENU","ASK",1,6.4)
ONECOURIERORDERSREPORT;MSHD1;$$MSL^W4PRM
^W4ASK("TELMENU","ASK",1,6.6)
CLOCKWORKERSREPORT;DCLK;
^W4ASK("TELMENU","ASK",1,8)
POSREPORT;POS;$$MSDT^W4PRM
^W4ASK("TELMENU","ASK",1,9)
ULAMREPORT;ULM;$$MSD^W4PRM
^W4ASK("TELMENU","ASK",1,10)
DELETEREPORTCONC;BIT
^W4ASK("TELMENU","ASK",1,11)
DELETEREPORTDET;BITD
^W4ASK("TELMENU","ASK",1,12)
DISCOUNTREPORTCONC;HNH
^W4ASK("TELMENU","ASK",1,13)
DISCOUNTREPORTDET;HNHD
^W4ASK("TELMENU","ASK",1,14)
ITEMSREPORT;PAR
^W4ASK("TELMENU","ASK",1,15)
DEPARTREPORT;DEP
^W4ASK("TELMENU","ASK",2)
MEDATE;6;$TR($$^%L1DC($$^W4DZ,1),".","");;FROMDATE^W4FNDORD;
^W4ASK("TELMENU","ASK",3)
ADDATE;6;$TR($$^%L1DC($$^W4DZ,1),".","");;UNTILDATE^W4FNDORD;
^W4ASK("TELMENU","MLZ1",1)
CHOICEWAITER;5;;<;;;$$^W4MAIN("TMPMLZ")
^W4ASK("TELMENU","MSH1",1)
CHOICEMESSENGER;4;;<;;;$$^W4MAIN("TMPMLZ")
^W4ASK("TELMENU","MSHD1",1)
CHOICEMESSENGER;4;;<;;;$$^W4MAIN("TMPMLZ")
^W4ASK("TELMENU","POS",1)
CHOICEPOSITION;3;;<20;;;$$^W4MAIN("TMPPOS")
^W4ASK("TELMENU","TBL",1)
CHOICETABLE;3;;;TBL^W4SGYOM;
^W4ASK("TELMENU","ULM",1)
CHOICEATAR;3;;<;;;$$^W4MAIN("TMPATAR")
^W4ASK("TIPMZ","TIPMZ",1)
TIPMZ;7,2;;;TIPMZ^W4SCASK
^W4ASK("VCARD","ACT",1)
CARDNUMBER;48;
^W4ASK("VCARD","BONUS",1)
CARDNUMBER;48;;
^W4ASK("VCARD","BONUS",2)
COUPON;16;;
^W4ASK("VCARD","BONUS1",1)
CARDNUMBER;48;;
^W4ASK("VCARD","DEACT",1)
CARDNUMBER;48;;
^W4ASK("VCARD","DELLOAD",1)
CARDNUMBER;48;;;NONOTHING^W4CARDKB
^W4ASK("VCARD","DETAILS",1)
CARDNUMBER;48;;
^W4ASK("VCARD","LOADC",1)
CARDNUMBER;48;;;NONOTHING^W4CARDKB
^W4ASK("VCARD","LOADC",2)
LOADSUM;7,2;;;SUM^W4CARDKB
^W4ASK("VCARD","PAY",1)
CARDNUMBER;48;;
^W4ASK("VCARD","PAY",2)
SUM;7,2;$$ITRA^W4HZMST($$GETP^%W1PRM("HZM"));;PAYSUM^W4CARDKB
^W4ASK("VCARD","SHOWHIST",1)
CARDNUMBER;48;
^W4ASK("VCARD","SHOWTMP",1)
CARDNUMBER
^W4ASK("VCARD","SHOWTMP",2)
EMP
^W4ASK("VCARD","SHOWTMP",3)
BUDG
^W4ASK("VCARD","SHOWTMP",4)
ZMAN
^W4ASK("VCARD","SHOWTMP",5)
DISC
^W4ASK("VCARD","SHOWTMP",6)
MSG
^W4ASK("XMENU","ASK",1)
KINDOFREPORTX;1;;<9;;
^W4ASK("XMENU","ASK",1,1)
ALLREPORTS;1;1
^W4ASK("XMENU","ASK",1,2)
MANYREPORT;2;1
^W4ASK("XMENU","ASK",1,3)
WAITERSREPORT;3;$$MSDT^W4PRM
^W4ASK("XMENU","ASK",1,4)
ONEWAITERREPORT;4;$$MSDT^W4PRM
^W4ASK("XMENU","ASK",1,5)
COURIERSMANYREPORT;5;$$MSL^W4PRM
^W4ASK("XMENU","ASK",1,6)
ONECOURIERREPORT;6;$$MSL^W4PRM
^W4ASK("XMENU","ASK",1,6.2)
COURIERSORDERSREPORT;6.2;$$MSL^W4PRM
^W4ASK("XMENU","ASK",1,6.4)
ONECOURIERORDERSREPORT;6.4;$$MSL^W4PRM
^W4ASK("XMENU","ASK",1,8)
POSREPORT;8;$$MSDT^W4PRM
^W4ASK("XMENU","ASK",1,9)
ULAMREPORT;9;$$MSD^W4PRM
^W4ASK("XMENU","ASK",2)
KINDOFSHOW;1;;<;;
^W4ASK("XMENU","ASK",2,1)
PRINT;0;
^W4ASK("XMENU","ASK",2,2)
DISPLAY;1;
^W4ASK("XMENU","ATAR",1)
CHOICEATAR;3;;<;;;$$^W4MAIN("TMPATAR")
^W4ASK("XMENU","MLZ",1)
CHOICEWAITER;5;;<;;;$$^W4MAIN("TMPMLZ")
^W4ASK("XMENU","MSH",1)
CHOICEMESSENGER;4;;<;;;$$^W4MAIN("TMPMLZ")
^W4ASK("XMENU","POS",1)
CHOICEPOSITION;3;;<20;;;$$^W4MAIN("TMPPOS")
^W4ASK("XMENU","TBL",1)
CHOICETABLE;3;;;TBL^W4SGYOM;
^W4ASK("XMENU1","ASK",1)
KINDOFREPORTX;1;;<5;;
^W4ASK("XMENU1","ASK",1,1)
ALLREPORTS;1;1
^W4ASK("XMENU1","ASK",1,1.5)
POSREPORT;8;$$MSDT^W4PRM!$$SUPER^W3PRM
^W4ASK("XMENU1","ASK",1,2)
MANYREPORT;2;1
^W4ASK("XMENU1","ASK",1,3)
WAITERSREPORT;3;$$MSDT^W4PRM!$$SUPER^W3PRM
^W4ASK("XMENU1","ASK",1,4)
ONEWAITERREPORT;4;$$MSDT^W4PRM!$$SUPER^W3PRM
^W4ASK("XMENU1","ASK",2)
KINDOFSHOW;1;;<;;
^W4ASK("XMENU1","ASK",2,1)
PRINT;0;
^W4ASK("XMENU1","ASK",2,2)
DISPLAY;1;
^W4ASK("XMENU1","MLZ",1)
CHOICEWAITER;5;;<;;;$$^W4MAIN("TMPMLZ")
^W4ASK("XMENU1","POS",1)
CHOICEPOSITION;3;;<20;;;$$^W4MAIN("TMPPOS")
^W4ASK("XMENULK","ASK",1)
KINDOFSHOW;1;;<;;
^W4ASK("XMENULK","ASK",1,1)
PRINT;0;
^W4ASK("XMENULK","ASK",1,2)
DISPLAY;1;
^W4ASK("YESNO","ASK",1)
SUBMIT?;1;;<;;
^W4ASK("YESNO","ASK",1,1)
YES;1;
^W4ASK("YESNO","ASK",1,2)
NO;0;
^W4CPERR

^W4CPERR(1000)
zkxrna miiw `l qihxk^iekif revia zra d`iby drxi`
^W4CPERR(1001)
yeniyl meqg qihxkd^d`vnp `l divwfpxh
^W4CPERR(1002)
igkepd zery geeha xearl dyxen `l qihxkd
^W4CPERR(1003)
oetpewl dpt `p` - mi`zn `l df qihxkd
^W4CPERR(1004)
zyweand ziwqir d`vnp `l
^W4CPERR(1005)
df qihxkl reaw xign `vnp `l
^W4CPERR(1006)
xzen xtqndn bxeg zegex` xtqn
^W4CPERR(1007)
g"y $1 xzend ineid aivwzdn zbxeg jzywa
^W4CPERR(1008)
g"y $1 xzend iycegd aivwzdn zbxeg jzywa
^W4CPERR(1009)
oetpetewl dpt `p` - dreci `l d`iby
^W4CPERR(1010)
oetpetewl dpt `p` - qihxkd zexcbda d`iby
^W4CPERR(1011)
oetpetewl dpt `p` - zkxrn z`iby
^W4CPERR(1012)
ef dcrqna lirt epi` df qihxk
^W4CPERR(1013)
df qihxkl zexcbd e`vnp `l
^W4CPERR(1014)
miqihxka ynzydl dyxen `l ef dxag
^W4CPERR(1016)
g"y $1 df qihxkl xcbedy aivwzdn zbxeg jzywa
^W4CPERR(2000)
dglvda dxar dlertd
^W4MTB

^W4MTB(1)
&#8362; NIS
^W4MTB(2)
&#36; DOLLAR
^W4MTB(3)
&#8364; EURO
^W4MTB(4)
&#163; POUND
^W4MTB(5)
&#8355; FRANC
^W4MTB(6)
&#8356; LIRA IT
^W4MTB(7)
&#165; YEN
^W4OPT

^W4OPT("ASHRAM")
MAINMENU;4;1;1;12
^W4OPT("ASHRAM",0)
1;EXIT;Exit();red;white;
^W4OPT("ASHRAM",1)
1;CRCARDPAYMENT;CrCardPayment()
^W4OPT("ASHRAM",2)
1;SEND2SHVA;Send2Shva()
^W4OPT("ASHRAM",3)
1;SHVAREPORTS;ShvaReports()
^W4OPT("ASHRAM",4)
1;SERVICEPROGRAMMS;ServiceProgramms()
^W4OPT("ASHRSRV")
SERVICEPROGRAMMS;4;1;1;12
^W4OPT("ASHRSRV",0)
1;EXIT;Exit();red;white;
^W4OPT("ASHRSRV",1)
1;CHANGEPASSWORDSHVA;ChangePasswordShva()
^W4OPT("ASHRSRV",2)
1;GETSHVAPARAMETERS;GetShvaParam()
^W4OPT("ASHRSRV",3)
1;SYSTEMMANAGER;MgrPrm()
^W4OPT("ASHRSRV",4)
1;BUSINESSPARAMETERS;Parameters()
^W4OPT("ASHRSRV",5)
1;DATABASESAVING;DatabaseSaving()
^W4OPT("ASHRSRV",6)
1;PASSWORDSDEFINITION;Passwords()
^W4OPT("BO")
MAINMENU;4;1;1;12
^W4OPT("BO",0)
1;EXIT;Exit();red;white;
^W4OPT("BO",0,"PSWLVL")
2
^W4OPT("BO",.5)
1;CSRSTATUS;CSRStatus()
^W4OPT("BO",1)
1;FINDORDER;ShowOrder()
^W4OPT("BO",1,"PSWLVL")
2
^W4OPT("BO",2)
1;FINDINGOTHERDOCUMENTS;FindingDocuments()
^W4OPT("BO",2,"PSWLVL")
2
^W4OPT("BO",3)
1;DAYCLOSING;CloseDay()
^W4OPT("BO",3,"PSWLVL")
2
^W4OPT("BO",4)
1;COPYZREPORT;CopyZReport()
^W4OPT("BO",4,"PSWLVL")
2
^W4OPT("BO",5)
(+$$MM^W4PRM=0);SHOWCSRFILM;ShowCSRFilm()
^W4OPT("BO",5,"PSWLVL")
2
^W4OPT("BO",6)
$$^W4SNDEMV;SEND2SHVA;Send2Shva()
^W4OPT("BO",6,"PSWLVL")
2
^W4OPT("BO",7)
1;SHVAREPORTS;ShvaReports()
^W4OPT("BO",7,"PSWLVL")
3
^W4OPT("BO",8)
1;QUERIESANDREPORTS>;QueriesAndReports()
^W4OPT("BO",8,"PSWLVL")
3
^W4OPT("BO",9)
1;GRAPHS>;Diagramms()
^W4OPT("BO",9,"PSWLVL")
3
^W4OPT("BO",9.5)
(+$$MM^W4PRM=0)&($$SUPER^W3PRM=0);ORDERPLACE;OrderPlace()
^W4OPT("BO",9.5,"PSWLVL")
2
^W4OPT("BO",10)
1;ITEMSSYSTEM>;Items()
^W4OPT("BO",10,"PSWLVL")
2
^W4OPT("BO",11)
1;CUSTOMERSSYSTEM>;Customers()
^W4OPT("BO",11,"PSWLVL")
2
^W4OPT("BO",12)
'$$NEWMLY^W3PRM&(+$$MM^W4PRM=0);SUPPLSYSTEM>;SupplSystem()
^W4OPT("BO",12,"PSWLVL")
3
^W4OPT("BO",12.5)
$$NEWMLY^W3PRM&(+$$MM^W4PRM=0);SUPPLSYSTEMMLY>;SupplSystem()
^W4OPT("BO",13)
1;CHECKSYSTEM>;CheckSystem()
^W4OPT("BO",13,"PSWLVL")
3
^W4OPT("BO",14)
1;WORKERSYSTEM>;WorkersClockSystem()
^W4OPT("BO",14,"PSWLVL")
4
^W4OPT("BO",15)
1;TABLES>;Tables()
^W4OPT("BO",15,"PSWLVL")
2
^W4OPT("BO",16)
1;MEMSHAKIM>;Memshakim()
^W4OPT("BO",16,"PSWLVL")
3
^W4OPT("BO",19)
1;SERVICEPROGRAMMS>;ServiceProgramms()
^W4OPT("BO",19,"PSWLVL")
3
^W4OPT("BO",20)
1;DATABASESAVING;DatabaseSaving()
^W4OPT("BO",20,"PSWLVL")
2
^W4OPT("BO1",0)
1;EXIT;Exit();red;white;
^W4OPT("BO1",1)
1;RESTREGISTRY;RestRegistry()
^W4OPT("BO1",2)
1;RESTMANAGING;RestManaging()
^W4OPT("CHECKS")
CHECKSYSTEM
^W4OPT("CHECKS",0)
1;BACK;Back();red;white;
^W4OPT("CHECKS",1)
1;USERACCOUNTSTABLE;UserAccountsTable();
^W4OPT("CHECKS",2)
1;DEPOSITIONPREPARATION;DepositionPreparation()
^W4OPT("CHECKS",3)
1;CHECKPOWERCLOSING;CheckPowerClosing('0')
^W4OPT("CHECKS",4)
1;CHECKCLOSINGLIST;CheckPowerClosing('1')
^W4OPT("CMPNCARD",0)
1;BACK;Back();red;white;
^W4OPT("CMPNCARD",1)
$G(@$$^W4PRM@("CIBUS"));CIBUSREPORT;CibusReport()
^W4OPT("CMPNCARD",2)
$G(@$$^W4PRM@("VCARD"));VCREPORT;ValueCardReport()
^W4OPT("CMPNCARD",3)
$G(@$$^W4PRM@("VCARD"));VCLREPORT;ValueCardLoadReport()
^W4OPT("CMPNCARD",4)
$G(@$$^W4PRM@("10BIS"));TBREPORT;TenbisReport()
^W4OPT("CMPNCARD",4.5)
$G(@$$^W4PRM@("COUPPH"));CPREPORT;CouponPhoneReport()
^W4OPT("CMPNCARD",5)
$G(@$$^W4PRM@("MYCHECK"));MYCHECKREPORT;MyCheckReport()
^W4OPT("CMPNCARD",6)
$$BSL^W4PRM;BSLREPORT;BLReport()
^W4OPT("CMPNCARD",7)
$$MP^W4PRM;MPREPORT;MPReport()
^W4OPT("CMPNCARD",7.5)
$$KSHCSH^W4PRM;KSHCSHREPORT;KashCashReport()
^W4OPT("CMPNCARD",8)
$G(@$$^W4PRM@("CIBUS"))!$G(@$$^W4PRM@("10BIS"));CMPRCMPNREPORT;CmprCmpnReport()
^W4OPT("CMPNCARD",9)
$G(@$$^W4PRM@("CIBUS"));CIBUSERRORREPORT;CibusErrorReport()
^W4OPT("CUSREP")
CUSTOMERREPORTS
^W4OPT("CUSREP",0)
1;BACK;Back();red;white;
^W4OPT("CUSREP",1)
1;CUSTOMSREPORT;CustomsReport()
^W4OPT("CUSREP",2)
1;CUSTOMSCONCREPORT;CustomsConcReport()
^W4OPT("CUSREP",3)
1;DEBTREPORT;DebtReport()
^W4OPT("CUSREP",4)
1;INVOICESREPORT;InvoicesReport()
^W4OPT("CUSREP",5)
1;RECEIPTESREPORT;ReceiptesReport()
^W4OPT("CUSREP",6)
$$^W4LKH;INVOICERECEIPTESREPORT;InvoiceReceiptesReport()
^W4OPT("CUSREP",7)
$$^W4LKH;DLVDOCSREPORT;DlvDocsReport()
^W4OPT("CUSREP",8)
'$$^W4LKH;CREDITORDERSREPORT;CreditOrdersReport()
^W4OPT("CUSREP",9)
1;PRAONREPORT;PraonReport()
^W4OPT("CUSREP",10)
1;OPENCREDITORDERSREPORT;OpenCreditOrdersReport()
^W4OPT("CUST",0)
1;BACK;Back();
^W4OPT("CUST",1)
1;CUSTOMERSREPORTS>;CustomersReports();
^W4OPT("CUST",2)
1;SINGLECUSTOMINVOICE;SingleInvoiceIssue();
^W4OPT("CUST",3)
'$G(%ARG("DLV"));GROUPCUSTOMINVOICES;GroupInvoicesIssue();
^W4OPT("CUST",4)
1;SINGLECUSTOMARMINVOICE;SingleInvoiceArmIssue();
^W4OPT("CUST",4.5)
0;CUSTOMERORDERMLY;CustOrder('0');
^W4OPT("CUST",4.51)
0;CUSTOMERORDERCSR;CustOrder('1');
^W4OPT("CUST",4.6)
0;SHIPPINGRECORDSMLY;ShippingRecords('0');
^W4OPT("CUST",4.61)
1;SHIPPINGRECORDSCSR;ShippingRecords('1');
^W4OPT("CUST",4.7)
0;ITEMSINVOICEMLY;ItemsInvoiceIssue('0');
^W4OPT("CUST",4.71)
0;ITEMSINVOICECSR;ItemsInvoiceIssue('1');
^W4OPT("CUST",4.8)
0;DEBETITEMSINVOICEMLY;DebetItemsInvoice('0');
^W4OPT("CUST",4.81)
0;DEBETITEMSINVOICECSR;DebetItemsInvoice('1');
^W4OPT("CUST",5)
1;DEBETINVOICE;DebetInvoice();
^W4OPT("CUST",5.2)
1;SHIPPINGBACKRECORDS;ShippingBackRecords();
^W4OPT("CUST",5.5)
0;CONCENTRATEDBACKINVOICEISSUE;ConcentratedBackInvoiceIssue();
^W4OPT("CUST",6)
1;RECEIPTES;Receiptes();
^W4OPT("CUST",6.5)
0;ITEMSINVOICERECEIPT;ItemsInvoiceReceipt();
^W4OPT("CUST",7)
'$G(%ARG("DLV"));CUSTOMERGROUPSTABLE;CustomerGroupsTable()
^W4OPT("CUST",8)
1;FULLCUSTCARD;CustomTable();
^W4OPT("CUST",8.5)
1;EDITCUSTFIELDS;EditCustFields();
^W4OPT("CUST",9)
'$G(%ARG("DLV"));CUSTOMLIST;CustomList();
^W4OPT("CUST",9.1)
'$G(%ARG("DLV"));CREDITANDSERVISTABLE;CreditAndServisTable();
^W4OPT("CUST",9.5)
'$G(%ARG("DLV"));DMSPECTABLE;DmSpecTable();
^W4OPT("CUST",9.7)
'$G(%ARG("DLV"))&$$LKWEEK^W4PRM;CUSTWEEKTABLE;CustWeekTable();
^W4OPT("CUST",10)
1;CUSTOMUNION;CustomUnion();
^W4OPT("CUST",10.1)
'$G(%ARG("DLV"))&$G(@$$^W4PRM@("MAILGR"));SENDMAIL2CUST;SendMail2Cust()
^W4OPT("CUST",10.5)
1;SENDMAILPROTOCOL;SendMailProtocol();
^W4OPT("CUST",11)
'$G(%ARG("DLV"));SYSTEMOPENING;SystemOpening()
^W4OPT("CUST",12)
'$$DEMO^W3PRM;INVOICESPOWERCLOSING;InvoicesPowerClosing()
^W4OPT("CUST",13)
'$$DEMO^W3PRM;INVOICESCLOSINGLIST;InvoicesClosingList()
^W4OPT("DELREP")
DELETINGREPORTS
^W4OPT("DELREP",0)
1;EXIT;Exit();red;white;
^W4OPT("DELREP",1)
1;DELETINGREPORT;ShowDel()
^W4OPT("DELREP",2)
1;ITEMSDELETINGREPORTPEREXIT;ItemsDeletingReport()
^W4OPT("DELREP",3)
1;ITEMSCAUSEDELETINGREPORT;ItemsCauseDeletingReport()
^W4OPT("DELREP",4)
$$ZOPNDEL^W4PRM;ZOPNDELREPORT;ZOpnDelRep()
^W4OPT("DLVREPORTS")
DLVREPORTS;4;1;1;12;
^W4OPT("DLVREPORTS",0)
1;BACK;Back();red;white;
^W4OPT("DLVREPORTS",1)
1;DLVORDERSREPORT;DlvOrdersReport()
^W4OPT("DLVREPORTS",2)
1;DLVPAYMENTSREPORT;DlvPaymReport()
^W4OPT("DLVREPORTS",3)
1;DLVQNORDERSREPORT;DlvQnOrdersReport()
^W4OPT("DLVREPORTS",4)
1;DLVCUSTREPORT;DlvCustReport()
^W4OPT("DLVREPORTS",4.5)
1;DLVNOREPORT;DlvCustNoReport()
^W4OPT("DLVREPORTS",5)
1;COMPENSATIONREPORT;CompensationReport()
^W4OPT("DLVREPORTS",6)
1;DELETEDBIDSLIST;DeletedBidsList()
^W4OPT("DLVREPORTS",7)
1;NEWCUSREPORT;NewCusReport()
^W4OPT("DLVREPORTS",8)
1;DLVTIMEREPORT;DlvTimeReport()
^W4OPT("DLVREPORTS",9)
$$PAPJ^W4PRM;PREPTIMEREPORT;PrepTimeReport()
^W4OPT("DLVREPORTS",10)
1;DLVREPYEARMONTH;DlvRepYearMonth()
^W4OPT("DLVREPORTS",11)
$$PWRLNK^W4PRM;DLVPWRLNKREP;DlvPwrLnkRep()
^W4OPT("DP")
ITEMS-SALES-REPORTS;4;1;1;12
^W4OPT("DP",0)
1;BACK;Back();red;white;
^W4OPT("DP",1)
1;ITEMSSALEREPORT;ItemsSaleReport()
^W4OPT("DP",1.5)
1;MMITEMSREPORT;MMItemsReport()
^W4OPT("DP",1.6)
1;DEPREPORTPERMONTH;DepReportPerMonth()
^W4OPT("DP",1.7)
1;GROUPREPORTPERMONTH;GroupReportPerMonth()
^W4OPT("DP",2)
1;ITEMSSALEPERHOUERSREPORT;ItemsSalePerHouersReport()
^W4OPT("DP",2.5)
$$MSL^W4PRM;REPDEPTRH;RepTrh('0')
^W4OPT("DP",2.7)
$$MSL^W4PRM;REPITEMSTRH;RepTrh('1')
^W4OPT("DP",3)
(+$$MM^W4PRM=0);ITEMSSALEPERWAITERSREPORT;ItemsSalePerWaitersReport()
^W4OPT("DP",3.5)
1;ITEMSDELIVERYREPORTS;ItemsDeliveryReports()
^W4OPT("DP",3.7)
1;ITEMSCOURIERREPORT;ItemsCourierReport()
^W4OPT("DP",4)
1;ITEMSSALEPERORDERSREPORT;ItemsSalePerOrdersReport()
^W4OPT("DP",4.5)
1;ITEMSSALEPERCUSTOMREPORT;ItemsSalePerCustomReport()
^W4OPT("DP",5)
2;ITEMSSALEPERDEPGRREPORT;ItemsSalePerDepGrReport()
^W4OPT("DP",6)
$$MSDT^W4PRM;ITEMSSALEPERTABLESREPORT;ItemsSalePerTablesReport()
^W4OPT("DP",7)
(+$$MM^W4PRM=0);ITEMSDELETINGREPORTPEREXIT;ItemsDeletingReport()
^W4OPT("DP",8)
1;ITEMSCAUSEDELETINGREPORT;ItemsCauseDeletingReport()
^W4OPT("DP",9)
'$G(@$$^W4PRM@("NOIT0REP"));ITEM0REPORT;Item0Report()
^W4OPT("DP",10)
1;ITEMSENDEDREPORT;ItemsEndedReport()
^W4OPT("DP",11)
$G(@$$^W4PRM@("BASAR"));MEATREPORT;MeatReport()
^W4OPT("DP",12)
1;PRTSFREPORT;PrtTsfReport()
^W4OPT("DP",13)
$$NEWMLY^W4PRM;REPEZMREPORT;RepEzm()
^W4OPT("DP",14)
$$NEWMLY^W4PRM;REPRVHREPORT;RepRvh()
^W4OPT("GRAPH",0)
1;BACK;Back();
^W4OPT("GRAPH",1)
1;MONTHPROFITGRAPH;MonthProfitGraph();
^W4OPT("GRAPH",1.5)
0;MONTHGRAPHCOMPARISON;MonthGraphComparison();
^W4OPT("GRAPH",2)
1;YEARPROFITGRAPH;YearProfitGraph();
^W4OPT("GRAPH",3)
1;YEARSPROFITGRAPH;YearsProfitGraph();
^W4OPT("GRAPH",3.5)
1;YEARCOMPARISONGRAPH;YearComparisonGraph();
^W4OPT("GRAPH",4)
1;YEARPROFITDEPSGRAPH;YearProfitDepsGraph();
^W4OPT("GRAPH",5)
1;YEARPROFITGROUPSGRAPH;YearProfitGroupsGraph();
^W4OPT("LKH",0)
1;BACK;Back();
^W4OPT("LKH",.1)
1;~DOCUMENTSISSUE;
^W4OPT("LKH",.2)
$$^W4LKHCSR;ITEMSINVOICERECEIPT;ItemsInvoiceReceipt();
^W4OPT("LKH",.3)
$$^W4LKHCSR;ARMINVOICERECEIPT;ArmInvoiceReceipt();
^W4OPT("LKH",.4)
1;PRICEOFFER;PriceOffer()
^W4OPT("LKH",.5)
1;CUSTOMERORDER;CustOrder();
^W4OPT("LKH",.8)
1;ITEMSINVOICE;ItemsInvoiceIssue();
^W4OPT("LKH",1)
1;SERVICEINVOICE;SingleInvoiceArmIssue();
^W4OPT("LKH",1.5)
1;DEALARMINVOICE;DealArmInvoice();
^W4OPT("LKH",2)
1;DEBETITEMSINVOICE;DebetItemsInvoice();
^W4OPT("LKH",3)
1;DEBETINVOICE;DebetInvoice();
^W4OPT("LKH",5)
1;RECEIPT;Receiptes();
^W4OPT("LKH",6)
'$$^W4LKHCSR;ARMINVOICERECEIPT;ArmInvoiceReceipt();
^W4OPT("LKH",7)
'$$^W4LKHCSR;ITEMSINVOICERECEIPT;ItemsInvoiceReceipt();
^W4OPT("LKH",8)
1;SHIPPINGRECORDS;ShippingRecords();
^W4OPT("LKH",9)
1;CONCENTRATEDINVOICEISSUE;ConcentratedInvoiceIssue();
^W4OPT("LKH",10)
1;SHIPPINGBACKRECORDS;ShippingBackRecords();
^W4OPT("LKH",10.5)
1;CONCENTRATEDBACKINVOICEISSUE;ConcentratedBackInvoiceIssue();
^W4OPT("LKH",11)
1;SERVICECARD;ServiceCard()
^W4OPT("LKH",11.1)
1;SENDMAIL2CUST;SendMail2Cust()
^W4OPT("LKH",12.1)
1;~INCOMEDOCUMENTS;
^W4OPT("LKH",12.5)
$$NEWMLY^W3PRM;ORDER2SUPPLIER;Order2Supplier()
^W4OPT("LKH",12.8)
$$NEWMLY^W3PRM;INCOMEDLVDOC;IncomeDlvDoc()
^W4OPT("LKH",13)
'$$NEWMLY^W3PRM;INCOMEARMINVOICE;IncomeInvoices('0')
^W4OPT("LKH",13.05)
$$NEWMLY^W3PRM;INCOMEDETAILINVOICE;IncomeInvoices('1')
^W4OPT("LKH",14)
'$$NEWMLY^W3PRM;INCOMEDEBETARMINVOICE;IncomeDebetInvoices('0')
^W4OPT("LKH",14.05)
$$NEWMLY^W3PRM;INCOMEDLVBACKDOC;IncomeDlvBackDoc()
^W4OPT("LKH",14.1)
$$NEWMLY^W3PRM;INCOMEDEBETINVOICE;IncomeDebetInvoices('1')
^W4OPT("LKH",14.2)
$$NEWMLY^W3PRM;TKDOC;TkDocs()
^W4OPT("LKH",15)
1;PAYMENTS2SUPPLIERS;Payments()
^W4OPT("LKH",15.05)
$$NEWMLY^W3PRM;INVENTORYBALANCESREPAIRING;InventoryBalancesRepairing();
^W4OPT("LKH",15.1)
1;~TABLES;
^W4OPT("LKH",16)
1;CUSTOMERGROUPSTABLE;CustomerGroupsTable()
^W4OPT("LKH",17)
1;FULLCUSTCARD;CustomTable();
^W4OPT("LKH",18)
1;CUSTOMLIST;CustomList();
^W4OPT("LKH",19)
'$$NEWMLY^W3PRM;FULLSUPPLCARD;SupplTable();
^W4OPT("LKH",20)
'$$NEWMLY^W3PRM;SUPPLLIST;SupplList();
^W4OPT("LKH",20.5)
1;DEPARTMENTSTABLE;DepartmentsTable();
^W4OPT("LKH",21)
1;ITEMSGROUPTABLE;ItemsGroupTable();
^W4OPT("LKH",22)
1;ITEMSTABLE;ItemsTable();
^W4OPT("LKH",23)
1;USERACCOUNTSTABLE;UserAccountsTable();
^W4OPT("LKH",23.01)
$$COLOR^W4LKH;COLORTABLE;ColorTable()
^W4OPT("LKH",23.02)
$$SIZE^W4LKH;SIZETABLE;SizeTable()
^W4OPT("LKH",24)
$$NEWMLY^W3PRM;~MLYTABLES;
^W4OPT("LKH",24.2)
$$NEWMLY^W3PRM;SUPPLTABLE;SupplTable()
^W4OPT("LKH",24.3)
$$NEWMLY^W3PRM;SUPPLLIST;SupplList();
^W4OPT("LKH",24.4)
$$NEWMLY^W3PRM;DEPARTMENTSTABLE;DepartmentsTable();
^W4OPT("LKH",24.5)
$$NEWMLY^W3PRM;ITEMSGROUPTABLE;ItemsGroupTable();
^W4OPT("LKH",24.6)
$$NEWMLY^W3PRM;ITEMCARD;ItemCard();
^W4OPT("LKH",24.7)
$$NEWMLY^W3PRM;STOCKITEMSTABLE;ItemsTable();
^W4OPT("LKH",24.8)
$$NEWMLY^W3PRM;MEASURETABLE;MeasureTable();
^W4OPT("LKH",24.9)
$$NEWMLY^W3PRM;COEFFICIENTSTABLE;CoefficientsTable();
^W4OPT("LKH",24.95)
$$NEWMLY^W3PRM;SUPPLIERPRICESLIST;SupplierPricesList();
^W4OPT("LKH",24.96)
$$NEWMLY^W3PRM&$$COLOR^W4LKH;COLORTABLE;ColorTable()
^W4OPT("LKH",24.97)
$$NEWMLY^W3PRM&$$SIZE^W4LKH;SIZETABLE;SizeTable()
^W4OPT("LKH",25.01)
1;~CHECKSYSTEM;
^W4OPT("LKH",25.03)
1;USERACCOUNTSTABLE;UserAccountsTable();
^W4OPT("LKH",25.05)
1;DEPOSITIONPREPARATION;DepositionPreparation()
^W4OPT("LKH",25.1)
1;~REPORTS;
^W4OPT("LKH",25.2)
$$^W4LKHCSR;REPORTX;ReportX();
^W4OPT("LKH",25.3)
$$^W4LKHCSR;CLOSINGREPORTZ;ReportZ();
^W4OPT("LKH",25.4)
$$^W4LKHCSR;ZREPORT;ZReport()
^W4OPT("LKH",25.5)
$$^W4LKHCSR;COPYZREPORT;CopyZReport()
^W4OPT("LKH",25.6)
1;MANYREPORT;ManyReport()
^W4OPT("LKH",25.7)
1;CUSTOMERSREPORTS>;CustomersReports();
^W4OPT("LKH",25.8)
1;ITEMSREPORT;ItemsReport()
^W4OPT("LKH",25.9)
$$NEWMLY^W3PRM;MLTNQREPORT;MlTnQReport()
^W4OPT("LKH",25.95)
$$NEWMLY^W3PRM;PARTNHZG;ParTnReport()
^W4OPT("LKH",27)
1;PROFITANDRATEREPORT;ProfitAndRateReport()
^W4OPT("LKH",28)
1;CASHREPORT;CashReport()
^W4OPT("LKH",28.01)
$$^W4LKHCSR;SHOWCSRFILM;ShowCSRFilm()
^W4OPT("LKH",28.1)
1;~SHVA;
^W4OPT("LKH",29)
1;SEND2SHVA;Send2Shva()
^W4OPT("LKH",30)
1;SHVAREPORTS;ShvaReports()
^W4OPT("LKH",31.1)
1;~SERVICEPROGRAMMS;
^W4OPT("LKH",31.2)
'$$DEMO^W3PRM;SYSTEMMANAGER;MgrPrm()
^W4OPT("LKH",32)
'$$DEMO^W3PRM;BUSINESSPARAMETERS;Parameters()
^W4OPT("LKH",34)
'$$DEMO^W3PRM;SYSTEMPARAMETERS>;SysPrm()
^W4OPT("LKH",34.1)
$$^W4LKHCSR;DELETEPRINTFILE;DeletePrintFile()
^W4OPT("LKH",34.2)
$$DOCCSR^W4LKHCSR;LOADPRINTPROGRAMMS;LoadPrintProgramms()
^W4OPT("LKH",34.3)
$$DOCCSR^W4LKHCSR;PRINTERSTEST;CheckPrinters()
^W4OPT("LKH",36)
'$$DEMO^W3PRM;CHANGEPASSWORDSHVA;ChangePasswordShva()
^W4OPT("LKH",37)
'$$DEMO^W3PRM;SYSTEMOPENING;SystemOpening()
^W4OPT("LKH",38)
'$$DEMO^W3PRM;INVOICESPOWERCLOSING;InvoicesPowerClosing()
^W4OPT("LKH",39)
'$$DEMO^W3PRM;INVOICESCLOSINGLIST;InvoicesClosingList()
^W4OPT("LKH",39.1)
'$$DEMO^W3PRM;CHECKPOWERCLOSING;CheckPowerClosing('0')
^W4OPT("LKH",39.2)
'$$DEMO^W3PRM;CHECKCLOSINGLIST;CheckPowerClosing('1')
^W4OPT("LKH",39.5)
$$HSHV^W4LKH;FILECREATINGFORHASHAVSHEVET;FileForHashavshevet()
^W4OPT("LKH",40)
1;FILECREATINGFORTAXESCONTROL;FileForTaxes()
^W4OPT("LKH",41)
1;DATABASESAVING;DatabaseSaving()
^W4OPT("LKHSYS",0)
1;BACK;Back();red;white;
^W4OPT("LKHSYS",.5)
1;MYADDRESS;MyAddress()
^W4OPT("LKHSYS",1)
1;AHMAM;AhMam()
^W4OPT("LKHSYS",2)
$$DOCCSR^W4LKHCSR;DEVICESDEFINITION;DevicesDefinition()
^W4OPT("LKHSYS",3)
$$DOCCSR^W4LKHCSR;POSDEFINITION;AccountPrintersDefinition()
^W4OPT("LKHSYS",4)
$$^W4LKHCSR;CSRPARAMETERS;CSRParameters()
^W4OPT("LKHSYS",5)
0;DOWNHEADERDEFINITION;DownHeaderDefinition()
^W4OPT("LKHSYS",6)
1;HASHAVSHEVETPARAMETERS;HashavshevetParameters()
^W4OPT("LKHSYS",7)
1;SERVICEPARAMETERS;CustSrvPrm()
^W4OPT("MEMSHAKIM")
MEMSHAKIM
^W4OPT("MEMSHAKIM",0)
1;BACK;Back();red;white;
^W4OPT("MEMSHAKIM",1)
1;FILECREATINGFORTAXESCONTROL;FileForTaxes()
^W4OPT("MEMSHAKIM",2)
1;FILECREATINGFORHASHAVSHEVET;FileForHashavshevet()
^W4OPT("MEMSHAKIM",3)
1;FILECREATINGFORZOOM;FileForZoom()
^W4OPT("MEMSHAKIM",3.5)
0;FILECREATINGFORGAP;FileForGap()
^W4OPT("MEMSHAKIM",4)
1;MRKMAN;SndMrkMan()
^W4OPT("MEMSHAKIM",4.5)
1;RSTGPROT;RstgProt()
^W4OPT("MEMSHAKIM",5)
1;SNOU1;SnOu1()
^W4OPT("MEMSHAKIM",6)
1;SEND2BZBRA;Send2Bzbra()
^W4OPT("MEMSHAKIM",7)
1;SEND2BOLET;Send2Bzbra('1')
^W4OPT("MEMSHAKIM",8)
1;SEND2DLV;Send2Dlv()
^W4OPT("MEMSHAKIM",9)
$$IT4WEB^W4PRM;RCVIT4WEB;RcvIt4Web()
^W4OPT("MEMSHAKIM",10)
$$IT4WEB^W4PRM;RCVITPROTOCOL;RcvItProtocol()
^W4OPT("MEMSHAKIM",11)
$$IBON^W4PRM;PROTIBON;IBonProt()
^W4OPT("MEMSHAKIM",11.5)
1;SENDITEMS2CIBUS;SendItems2Cibus()
^W4OPT("MEMSHAKIM",12)
1;SND2CIBPROTOCOL;Snd2CibProt()
^W4OPT("MEMSHAKIM",13)
1;ZSTRPROT;ZstrProt()
^W4OPT("MEMSHAKIM",14)
1;TEAVPROT;TeavProt()
^W4OPT("MEMSHAKIM",15)
1;DAPROT;DAProt()
^W4OPT("MITEMS")
ITEMSSYSTEM;
^W4OPT("MITEMS",0)
1;BACK;Back();
^W4OPT("MITEMS",1)
1;DEPARTMENTSTABLE;DepartmentsTable();
^W4OPT("MITEMS",2)
1;ITEMSGROUPTABLE;ItemsGroupTable();
^W4OPT("MITEMS",2.2)
1;GROUPSUBGROUPSTABLE;GroupSubGroupsTable();
^W4OPT("MITEMS",2.5)
1;PICTURES4GROUPS;Pictures4Groups();
^W4OPT("MITEMS",3)
$$^W4TABLET'=2!$$ZAHI^W4PRM;ITEMSTABLE;ItemsTable();
^W4OPT("MITEMS",3.2)
$$SUPER^W3PRM!($$^W4TABLET=2);ITEMCARD;ItemCard();
^W4OPT("MITEMS",3.5)
'$$SUPER^W3PRM;ITEMDEFINEDCOMMENTTABLE;ItemDefinedCommentTable();
^W4OPT("MITEMS",4)
$$^W4NETM;SNIFPRICELIST;SnifPriceList();
^W4OPT("MITEMS",4.1)
'$$^W4NETM&'$$SUPER^W3PRM;GROUPPRINTERSTABLE;GroupPrintersTable();
^W4OPT("MITEMS",4.3)
'$$^W4NETM&'$$SUPER^W3PRM;ITEMSPRINTERSTABLE;ItemsPrintersTable();
^W4OPT("MITEMS",5)
'$$PRTNET^W4PRM;GROUPITEMSTABLE;GroupItemsTable();
^W4OPT("MITEMS",6)
1;ITEMSGROUPORDERING;ItemsGroupOrdering();
^W4OPT("MITEMS",7)
1;ITEMSORDERING;ItemsOrdering();
^W4OPT("MITEMS",8)
'$$^W4NETM&'$$SUPER^W3PRM;SHOWITEMGROUPSACCORDINGTOTIME;ShowItemGroupsAccordingToTime()
^W4OPT("MITEMS",9)
'$$^W4NETM&'$$SUPER^W3PRM;SHOWITEMSACCORDINGTOTIME;ShowItemsAccordingToTime()
^W4OPT("MITEMS",9.2)
1;GROUPPOSITIONSTABLE;GrPosTable();
^W4OPT("MITEMS",9.3)
'$$SUPER^W3PRM;GROUPTABLEKINDSTABLE;GrSugSTable();
^W4OPT("MITEMS",10)
'$$PRTNET^W4PRM&'$$SUPER^W3PRM;ITEMADDSTABLE;ItemAddsTable();
^W4OPT("MITEMS",11)
'$$PRTNET^W4PRM&'$$SUPER^W3PRM;ITEMSGROUPADDSTABLE;ItemsGroupAddsTable();
^W4OPT("MITEMS",11.5)
$$ZAHI^W4PRM;ADDSORDERING;AddsOrdering();
^W4OPT("MITEMS",12)
'$$PRTNET^W4PRM&'$$SUPER^W3PRM;ITEMCOMMENTSTABLE;ItemCommentsTable();
^W4OPT("MITEMS",13)
'$$PRTNET^W4PRM&'$$SUPER^W3PRM;ITEMSGROUPCOMMENTSTABLE;ItemsGroupCommentsTable();
^W4OPT("MITEMS",14)
'$$PRTNET^W4PRM&'$$SUPER^W3PRM;SETITEMSTABLE;SetItemsTable();
^W4OPT("MITEMS",15)
'$$PRTNET^W4PRM&'$$SUPER^W3PRM;LUNCHSETSTABLE;LunchSetTable();
^W4OPT("MITEMS",15.1)
'$$PRTNET^W4PRM&'$$SUPER^W3PRM;ITEMADDGROUPTABLE;ItemAddGroupTable();
^W4OPT("MITEMS",16)
'$$^W4NETM;SETREPORTTABLE;SetReportTable();
^W4OPT("MITEMS",16.2)
'$$SUPER^W3PRM;ITEMSREPORTTREE;ItemsReportTree();
^W4OPT("MITEMS",16.5)
1;SETSALETABLE;SetSaleTable();
^W4OPT("MITEMS",16.6)
$G(@$$^W4PRM@("BASAR"));SETMEATTABLE;SetMeatTable();
^W4OPT("MITEMS",16.7)
1;ITEMDISCOUNTNISSALE;ItemDiscountNisSale();
^W4OPT("MITEMS",16.75)
1;ITEMDISCOUNTPERCENTSALE;ItemDiscountPercentSale();
^W4OPT("MITEMS",16.8)
1;ONEONESALE;OneOneSale();
^W4OPT("MITEMS",16.9)
1;SALEHAPPYHOUER;HappyHouer()
^W4OPT("MITEMS",16.94)
1;SALEPERQN;SalePerQn()
^W4OPT("MITEMS",16.95)
1;SALEPERSUM;SalePerSum()
^W4OPT("MITEMS",16.97)
0;SALEPERSUMAH;SalePerSumAh()
^W4OPT("MITEMS",17)
'$$^W4NETM;CUSTOMERITEMSPRICESLIST;CustomerItemsPricesList()
^W4OPT("MITEMS",18)
'$$^W4NETM;CUSTOMERSGROUPITEMSPRICESLIST;CustomersGroupItemsPricesList()
^W4OPT("MITEMS",19)
'$$^W4NETM&'$$SUPER^W3PRM;ITEMSPERHOUERSPRICELIST;ItemsPerHouersPriceList()
^W4OPT("MITEMS",19.1)
'$$^W4NETM&'$$SUPER^W3PRM;TAKEAWAYPRICELIST;TakeAwayPriceList()
^W4OPT("MITEMS",19.2)
$$SYS^W4DLVCSR&'$$^W4NETM&'$$SUPER^W3PRM;DELIVERYITEMSPRICELIST;DeliveryItemsPriceList()
^W4OPT("MITEMS",20)
1;ITEMSWITHOUTDISCOUNTTABLE;ItemsWithoutDiscount()
^W4OPT("MITEMS",20.5)
1;PROTECTIONITEMS;ProtectionItems()
^W4OPT("MITEMS",20.7)
1;ITEMSWITHVARIABLEPRICE;ItemsWithVariablePrice()
^W4OPT("MITEMS",20.9)
$$NOMAM^W4PRM;ITEMSWITHOUTTAXES;ItemsWithoutTaxes()
^W4OPT("MITEMS",21)
'$$^W4NETM&'$$SUPER^W3PRM;ITEMSTOBEENDEDTABLE;ItemsToBeEndedTable()
^W4OPT("MITEMS",21.5)
'$$^W4NETM;ITFASTTABLE;ItFastTable()
^W4OPT("MITEMS",21.8)
'$$^W4NETM;FASTGROUPSLIST;FastGroupsList()
^W4OPT("MITEMS",21.9)
'$$^W4NETM&'$$SUPER^W3PRM;ITDGSHTABLE;ItDgshTable()
^W4OPT("MITEMS",22)
'$$SUPER^W3PRM;ITEMSDIAP;RestOrDlvItems()
^W4OPT("MITEMS",23)
'$$SUPER^W3PRM;COMMENTSTABLE;CommentsTable()
^W4OPT("MITEMS",24)
'$$PRTNET^W4PRM&'$$SUPER^W3PRM;MOVINGITEMNUMBERS;MovingItemNumbers()
^W4OPT("MITEMS",24.5)
1;ASCITEMS2OTHERDEPS;AscItemsToOtherDeps()
^W4OPT("MITEMS",24.6)
$$DELIS^W4PRM;ASCITEMS2ADDDEP;AscItemsToAddDep()
^W4OPT("MITEMS",24.7)
'$$SUPER^W3PRM;BCODETABLE;BCodeTable()
^W4OPT("MITEMS",25)
$$IT2WEB^W4PRM;ASCGROUPS2WEB;AscGroups2Web()
^W4OPT("MITEMS",26)
$$IT2WEB^W4PRM;ASCITEMS2WEB;AscItems2Web()
^W4OPT("MITEMS",27)
$$IT2WEB^W4PRM;SENDITEMS2WEB;SendItems2Web()
^W4OPT("MITEMS",28)
$$IT2WEB^W4PRM;SENDINGPROTOCOL;SendingProtocol()
^W4OPT("MITEMS",28.3)
$$IT4WEB^W4PRM;RCVIT4WEB;RcvIt4Web()
^W4OPT("MITEMS",28.5)
$$IT4WEB^W4PRM;RCVITPROTOCOL;RcvItProtocol()
^W4OPT("MITEMS",29)
$$RSTGO^W4PRM;RSTGODEPS;RestigoDeps()
^W4OPT("MITEMS",30)
$$RSTGO^W4PRM;RSTGOGROUPS;RestigoGroups()
^W4OPT("MITEMS",31)
1;ENDORDITEMSLIST;EndOrdItemsList()
^W4OPT("MITEMS",32)
1;ENDORDRESTITEMSLIST;EndOrdItemsListRest()
^W4OPT("MITEMS",33)
$$MOUSEORD^W4DLVNPR;GROUP4PIZUL;Group4Pizul();
^W4OPT("MITEMS",34)
$$MOUSEORD^W4DLVNPR;GROUP4DLM;Group4Dlm();
^W4OPT("MITEMS",35)
'$$SUPER^W3PRM;ITEMTIMELIST;ItemsTimeList();
^W4OPT("MITEMS",36)
0;KIOSKITEMSLIST;KioskItemsList();
^W4OPT("MITEMS",37)
$$IT2NET^W4PRM;SENDITEMS2NET;SendItems2Net()
^W4OPT("MITEMS",37.5)
1;SENDITEMS2CIBUS;SendItems2Cibus()
^W4OPT("MITEMS",38)
1;NOITCOUNTLIST;NoItCountList();
^W4OPT("MITEMS",39)
$$DELIS^W4PRM;SPECDLVITEMSTABLE;SpecDlvItemsTable();
^W4OPT("MITEMS",39.5)
$$DELIS^W4PRM;NOSHOWDEPITLIST;NoShowDepItList();
^W4OPT("MITEMS",40)
$$KVZRKZ^W4PRM!$$PAPJ^W4PRM;GRCTABLE;GrCTable();
^W4OPT("MITEMS",41)
$$KVZRKZ^W4PRM!$$PAPJ^W4PRM;ITEMS4GRC;Items4GrC();
^W4OPT("MITEMS",42)
$$BONNEW^W4PRM;FRAMECOLOR4GROUPS;BonCvg()
^W4OPT("MITEMS",43)
$$GETP^%W1PRM("NET");MGRTABLE;MgrTable()
^W4OPT("MITEMS",44)
$$DELIS^W4PRM;ACCESSORIESTABLE;AccessoriesTable()
^W4OPT("MITEMS",45)
$$DELIS^W4PRM;ONEUSETABLE;OneUseTable()
^W4OPT("MITEMS",46)
1;RESTRICTITEMSLISTFORDER;RestrictItemListForOrder()
^W4OPT("MITEMS",47)
1;FIRSTITEMSSALE;FirstItemsSale()
^W4OPT("MLYTBL",0)
1;BACK;Back();red;white;
^W4OPT("MLYTBL",1)
1;SUPPLTABLE;SupplTable()
^W4OPT("MLYTBL",2)
1;SUPPLLIST;SupplList();
^W4OPT("MLYTBL",3)
1;DEPARTMENTSTABLE;DepartmentsTable();
^W4OPT("MLYTBL",4)
1;ITEMSGROUPTABLE;ItemsGroupTable();
^W4OPT("MLYTBL",4.5)
1;ITEMCARD;ItemCard();
^W4OPT("MLYTBL",5)
1;STOCKITEMSTABLE;ItemsTable();
^W4OPT("MLYTBL",6)
1;MEASURETABLE;MeasureTable();
^W4OPT("MLYTBL",7)
1;COEFFICIENTSTABLE;CoefficientsTable();
^W4OPT("MLYTBL",8)
1;SUPPLIERPRICESLIST;SupplierPricesList();
^W4OPT("NETTIM",0)
1;EXIT;Exit();red;white;
^W4OPT("NETTIM",1)
1;DETAILTIMEREPORT;DetailTimeReport()
^W4OPT("NETTIM",2)
1;CONCTIMEREPORT;ConcTimeReport()
^W4OPT("POP",1)
$$USPRT^W4MENUBT;DISCPERCENT;DiscountPercent();yellow;black;
^W4OPT("POP",1.2)
$$USPRT^W4MENUBT;DISCNIS;Discount();yellow;black;
^W4OPT("POP",2)
'$$SUPER^W3PRM&$$FIRE^W4OPT&($$GETP^%W1PRM("HZM")>0);FIRE;Fire();red;black;
^W4OPT("POP",3)
'$$SUPER^W3PRM&$$FIRE^W4OPT&($$GETP^%W1PRM("HZM")>0);NOFIRE;NoFire();red;black;
^W4OPT("POP",4)
'$$MZSM^W4PRM;OPENDRAW;OpenDraw()
^W4OPT("POP",5)
1;PAPERFEED;PaperFeed()
^W4OPT("POP",6)
1;PAPERCUT;PaperCut()
^W4OPT("POP",7)
'$$SHAONMGR^W4PRM;PRESENTWATCH;PresentWatch();yellow;black;
^W4OPT("POP",7.5)
1;LOADPRINTPROGRAMMS;LoadPrintProgramms();orange;black;
^W4OPT("POP",7.8)
1;CATALOGUPDATE;CatalogUpdate();orange;black;
^W4OPT("POP",8)
$$USPRT^W4MENUBT&'$$INPCODE^W4PRM;SEARCHITEMBYCODE;SearchItemByCode();lightblue;black;
^W4OPT("POP",9)
$$USPRT^W4MENUBT;SEARCHITEMBYNAME;SearchItemByName();lightblue;black;
^W4OPT("POP",10)
0;DISCPERCENTPERITEM;DiscPercentPerItem();lightblue;black;
^W4OPT("POP",11)
$$USPRT^W4MENUBT;ITEMZERO;ItemZero();lightblue;black;
^W4OPT("POP",12)
1;ITEMSTOBEENDEDTABLE;ItemsRemainderTable();pink;black;
^W4OPT("POP",12.2)
$$SUPER^W3PRM;ITEMCARD;ItemCard();lightyellow;brown
^W4OPT("POP",12.4)
$$MITEMS^W4PRM;ITEMSTABLE;ItemsTable();lightyellow;brown
^W4OPT("POP",13)
1;CALCULATOR;Calculator();green;white;
^W4OPT("POP",13.5)
0;PHONEBOOK;PhoneBook();green;white;
^W4OPT("POP",13.8)
$G(@$$^W4PRM@("VCARD"));VALIOREGISTRATION;ValioRegistration();lightgreen;darkgreen;
^W4OPT("POP",14)
$G(@$$^W4PRM@("VCARD"));VALIOCARDMENU;ValioCardMenu();lightgreen;darkgreen;
^W4OPT("POP",14.5)
0;$$BSL^W4PRM;BUSINESSLOGICMENU;BusinessLogicMenu();lightgreen;darkgreen;
^W4OPT("POP",14.6)
$$BSL^W4PRM;BLCUSTOMDATA;BLCustomStatus();
^W4OPT("POP",14.7)
$$MP^W4PRM;MPMENU;MPMenu();lightgreen;darkgreen;
^W4OPT("POP",14.8)
0;GIFTCOUPON;GiftCoupon();pink;red;
^W4OPT("POP",15)
1;CUSTOMBALANCE;CustomBalance();lightyellow;red;
^W4OPT("POP",16)
$$SYS^W4DLVCSR&'$$MGR^W4KOTMLZ;SENDORDERS;SendOrders();white;red;
^W4OPT("POP",17)
($$DLV^W4DLVCSR!$$DMSHMSD^W4PRM)&'$$MGR^W4KOTMLZ;DLVPAYCHANGE;ChangeDlvPay();white;red;
^W4OPT("POP",18)
$$DMSHMSD^W4PRM&'$$MGR^W4KOTMLZ;DLVPAYPRCCHANGE;ChangeDlvPrcPay();white;red;
^W4OPT("POP",18.5)
$$DLV^W4DLVCSR&'$$PRTNET^W4PRM;ITEMCARD;ItemCard();lightyellow;brown
^W4OPT("POP",19)
$$MGR^W4KOTMLZ;CHANGEPRINTERSCONFIGURATION;ChangePrintersConfiguration();red;white;
^W4OPT("POP",20)
$$TLDFLT^W4PRM&'$$MM^W4PRM;TLDFLT;DfltCoupon();pink;red;
^W4OPT("POP3",1)
$$USPRT^W3MENUBT;DISCPERCENT;DiscountPercent();yellow;black;
^W4OPT("POP3",2)
1;PRESENTWATCH;PresentWatch();yellow;black;
^W4OPT("POP3",3)
1;CALCULATOR;Calculator();green;white;
^W4OPT("POP3",5)
1;DLVPAYCHANGE;ChangeDlvPay();white;red;
^W4OPT("POPBO")
;;;;;BACK;Back2Table();
^W4OPT("POPBO",1)
'$$MM^W4PRM;OPENDRAW;OpenDraw()
^W4OPT("POPBO",2)
'$$MM^W4PRM;PAPERFEED;PaperFeed()
^W4OPT("POPBO",3)
'$$MM^W4PRM;PAPERCUT;PaperCut()
^W4OPT("POPBO",4)
$$SG^W4KOTMLZ&'$$POS^W4MTAW&'$$NOTIPALL^W4PRM;TIPTYPING;TipMz()
^W4OPT("POPBO",4.5)
$$TIPMZM^W4PRM&'$$SG^W4KOTMLZ&'$$NOTIPALL^W4PRM;TIPMZ;TipMz('1');yellow;red;
^W4OPT("POPBO",4.6)
$$SG^W4KOTMLZ&'$$MZSM^W4PRM;CASHINVST2CSR;CashInvest2CSR()
^W4OPT("POPBO",4.7)
$$SG^W4KOTMLZ&'$$MZSM^W4PRM;CASHCOUNTING;CashCounting()
^W4OPT("POPBO",4.73)
0;REGMZSM;RegMzSm()
^W4OPT("POPBO",4.75)
$$SG^W4KOTMLZ&$$MZSM^W4PRM;SMARTCASH2CSR;SmartCash('2')
^W4OPT("POPBO",4.77)
$$SG^W4KOTMLZ&$$MZSM^W4PRM;SMARTCASH4CSR;SmartCash('4')
^W4OPT("POPBO",4.8)
$$SG^W4KOTMLZ;HBMASAUTH;HbMasAuth();lightgreen;black;
^W4OPT("POPBO",4.9)
$$SG^W4KOTMLZ;HBMASVVOD;HbMasVvod();lightgreen;black;
^W4OPT("POPBO",4.95)
$$SG^W4KOTMLZ;HBMASTOKEN;HbMasToken();lightgreen;black;
^W4OPT("POPBO",4.96)
$$SG^W4KOTMLZ;HBMASVVTOKEN;HbMasVvToken();lightgreen;black;
^W4OPT("POPBO",5)
$$SG^W4KOTMLZ&'$G(%ARG("SGYOM"))&'$G(@$$^W4PRM@("NOCLSMGR"));DAYCLOSING;CloseDay();red;white
^W4OPT("POPBO",6)
$$SG^W4KOTMLZ&$$^W4SNDEMV;SEND2SHVA;AskTrans();red;white;
^W4OPT("POPBO",7)
0;SHVAREPORTS;ShvaReports()
^W4OPT("POPBO",8)
$$MGR^W4KOTMLZ&'$$MM^W4PRM;DELETEPRINTFILE;DeletePrintFile();orange;black;
^W4OPT("POPBO",9)
1;LOADPRINTPROGRAMMS;LoadPrintProgramms();orange;black;
^W4OPT("POPBO",10)
$$MGR^W4KOTMLZ;PRINTERSTEST;CheckPrinters();orange;black;
^W4OPT("POPBO",12)
$$USERSTB^W4PRM;ERASETABLE;EraseTbl();orange;black;
^W4OPT("POPBO",12.5)
$$MM^W4PRM'=2&$$MSL^W4PRM;ERASEDLV;EraseTbl('1');orange;black;
^W4OPT("POPBO",12.55)
$$EMV^W4PRM'=4;ERSCREDWORK;ErsCredWork();orange;black;
^W4OPT("POPBO",12.57)
$$USRESTEMV^W4OPT;RESTEMVPAYM;RestEMV();orange;black;
^W4OPT("POPBO",12.6)
$$GETP^%W1PRM("MLZR")&'$$MM^W4PRM&'$$MTAW^W4MTAW;MVTBPROT;MvTbProtocol();orange;black
^W4OPT("POPBO",12.7)
$$MGR^W4KOTMLZ;NOCHECKPRINTERS;DelChkPrn();orange;black;
^W4OPT("POPBO",13)
$$MGR^W4KOTMLZ&$$SHAONMGR^W4PRM!'$$SHAONMGR^W4PRM;PRESENTWATCH;PresentWatch();yellow;black;
^W4OPT("POPBO",14)
'$$MM^W4PRM&'$$MTAW^W4MTAW;ITEMSTOBEENDEDTABLE;ItemsRemainderTable();pink;black;
^W4OPT("POPBO",15)
1;CALCULATOR;Calculator();green;white;
^W4OPT("POPBO",15.5)
0;PHONEBOOK;PhoneBook();green;white;
^W4OPT("POPBO",15.8)
$G(@$$^W4PRM@("VCARD"));VALIOREGISTRATION;ValioRegistration();lightgreen;darkgreen;
^W4OPT("POPBO",16)
$G(@$$^W4PRM@("VCARD"));VALIOCARDMENU;ValioCardMenu();lightgreen;darkgreen;
^W4OPT("POPBO",16.3)
0;$$BSL^W4PRM;BUSINESSLOGICMENU;BusinessLogicMenu();lightgreen;darkgreen;
^W4OPT("POPBO",16.35)
$$BSL^W4PRM;BLCUSTOMDATA;BLCustomStatus();
^W4OPT("POPBO",16.4)
$$MP^W4PRM;MPMENU;MPMenu();lightgreen;darkgreen;
^W4OPT("POPBO",16.5)
0;CLOSEMYCHECKWAITERCALLS;CloseMyCheckWaiterCalls();lightgreen;darkgreen;
^W4OPT("POPBO",16.6)
0;DELETEMYCHECKORDERS;DelMyCheckOrder();lightgreen;darkgreen;
^W4OPT("POPBO",16.7)
0;CLOSEMYCHECKORDERS;CloseMyCheckOrder();lightgreen;darkgreen;
^W4OPT("POPBO",18)
$$TLDFLT^W4PRM&'$$MM^W4PRM&$$MLZRDFLT^W4OPT;TLDFLT;DfltCoupon();pink;red;
^W4OPT("POPBO",19)
0;ADVANCEPAYMENT;AdvancePayment();pink;darkred;
^W4OPT("POPBO",20)
1;CUSTOMBALANCE;CustomBalance();lightyellow;red;
^W4OPT("POPBO",21)
$$MGR^W4KOTMLZ;PRESENTWORKERSREPORT;PresentWorkersReport();yellow;green;
^W4OPT("POPBO",22)
$$SYS^W4DLVCSR&'$$MGR^W4KOTMLZ&'$$MM^W4PRM;SENDORDERS;SendOrders();white;red;
^W4OPT("POPBO",22.5)
'$$MGR^W4KOTMLZ&'$$MM^W4PRM&'$$SUPER^W3PRM;TAKEAWAYORDERS;TAWOrders();white;red;
^W4OPT("POPSH")
;;;;;BACK;Back2Table();
^W4OPT("POPSH",1)
'$$MM^W4PRM;OPENDRAW;OpenDraw()
^W4OPT("POPSH",2)
'$$MM^W4PRM;PAPERFEED;PaperFeed()
^W4OPT("POPSH",3)
'$$MM^W4PRM;PAPERCUT;PaperCut()
^W4OPT("POPSH",4)
$$SG^W4KOTMLZ&'$$POS^W4MTAW&'$$NOTIPALL^W4PRM;TIPTYPING;TipMz()
^W4OPT("POPSH",4.5)
$$TIPMZM^W4PRM&'$$SG^W4KOTMLZ&'$$NOTIPALL^W4PRM;TIPMZ;TipMz('1');yellow;red;
^W4OPT("POPSH",4.6)
$$SG^W4KOTMLZ&'$$MZSM^W4PRM;CASHINVST2CSR;CashInvest2CSR()
^W4OPT("POPSH",4.7)
$$SG^W4KOTMLZ&'$$MZSM^W4PRM;CASHCOUNTING;CashCounting()
^W4OPT("POPSH",4.73)
0;REGMZSM;RegMzSm()
^W4OPT("POPSH",4.75)
$$SG^W4KOTMLZ&$$MZSM^W4PRM;SMARTCASH2CSR;SmartCash('2')
^W4OPT("POPSH",4.77)
$$SG^W4KOTMLZ&$$MZSM^W4PRM;SMARTCASH4CSR;SmartCash('4')
^W4OPT("POPSH",4.8)
$$SG^W4KOTMLZ;HBMASAUTH;HbMasAuth();lightgreen;black;
^W4OPT("POPSH",4.9)
$$SG^W4KOTMLZ;HBMASVVOD;HbMasVvod();lightgreen;black;
^W4OPT("POPSH",4.95)
$$SG^W4KOTMLZ;HBMASTOKEN;HbMasToken();lightgreen;black;
^W4OPT("POPSH",4.96)
$$SG^W4KOTMLZ;HBMASVVTOKEN;HbMasVvToken();lightgreen;black;
^W4OPT("POPSH",5)
$$SG^W4KOTMLZ&'$G(%ARG("SGYOM"))&'$G(@$$^W4PRM@("NOCLSMGR"));DAYCLOSING;CloseDay();red;white
^W4OPT("POPSH",6)
$$SG^W4KOTMLZ&$$^W4SNDEMV;SEND2SHVA;AskTrans();red;white;
^W4OPT("POPSH",7)
0;SHVAREPORTS;ShvaReports()
^W4OPT("POPSH",8)
$$MGR^W4KOTMLZ&'$$MM^W4PRM;DELETEPRINTFILE;DeletePrintFile();orange;black;
^W4OPT("POPSH",9)
1;LOADPRINTPROGRAMMS;LoadPrintProgramms();orange;black;
^W4OPT("POPSH",10)
$$MGR^W4KOTMLZ;PRINTERSTEST;CheckPrinters();orange;black;
^W4OPT("POPSH",12)
$$USERSTB^W4PRM;ERASETABLE;EraseTbl();orange;black;
^W4OPT("POPSH",12.5)
$$MM^W4PRM'=2&$$MSL^W4PRM;ERASEDLV;EraseTbl('1');orange;black;
^W4OPT("POPSH",12.55)
$$EMV^W4PRM'=4;ERSCREDWORK;ErsCredWork();orange;black;
^W4OPT("POPSH",12.57)
$$USRESTEMV^W4OPT;RESTEMVPAYM;RestEMV();orange;black;
^W4OPT("POPSH",12.6)
$$GETP^%W1PRM("MLZR")&'$$MM^W4PRM&'$$MTAW^W4MTAW;MVTBPROT;MvTbProtocol();orange;black
^W4OPT("POPSH",12.7)
$$MGR^W4KOTMLZ;NOCHECKPRINTERS;DelChkPrn();orange;black;
^W4OPT("POPSH",13)
$$MGR^W4KOTMLZ&$$SHAONMGR^W4PRM!'$$SHAONMGR^W4PRM;PRESENTWATCH;PresentWatch();yellow;black;
^W4OPT("POPSH",14)
'$$MM^W4PRM&'$$MTAW^W4MTAW;ITEMSTOBEENDEDTABLE;ItemsRemainderTable();pink;black;
^W4OPT("POPSH",15)
1;CALCULATOR;Calculator();green;white;
^W4OPT("POPSH",15.5)
0;PHONEBOOK;PhoneBook();green;white;
^W4OPT("POPSH",15.8)
$G(@$$^W4PRM@("VCARD"));VALIOREGISTRATION;ValioRegistration();lightgreen;darkgreen;
^W4OPT("POPSH",16)
$G(@$$^W4PRM@("VCARD"));VALIOCARDMENU;ValioCardMenu();lightgreen;darkgreen;
^W4OPT("POPSH",16.3)
0;$$BSL^W4PRM;BUSINESSLOGICMENU;BusinessLogicMenu();lightgreen;darkgreen;
^W4OPT("POPSH",16.35)
$$BSL^W4PRM;BLCUSTOMDATA;BLCustomStatus();
^W4OPT("POPSH",16.4)
$$MP^W4PRM;MPMENU;MPMenu();lightgreen;darkgreen;
^W4OPT("POPSH",16.5)
0;CLOSEMYCHECKWAITERCALLS;CloseMyCheckWaiterCalls();lightgreen;darkgreen;
^W4OPT("POPSH",16.6)
0;DELETEMYCHECKORDERS;DelMyCheckOrder();lightgreen;darkgreen;
^W4OPT("POPSH",16.7)
0;CLOSEMYCHECKORDERS;CloseMyCheckOrder();lightgreen;darkgreen;
^W4OPT("POPSH",18)
$$TLDFLT^W4PRM&'$$MM^W4PRM&$$MLZRDFLT^W4OPT;TLDFLT;DfltCoupon();pink;red;
^W4OPT("POPSH",19)
0;ADVANCEPAYMENT;AdvancePayment();pink;darkred;
^W4OPT("POPSH",20)
1;CUSTOMBALANCE;CustomBalance();lightyellow;red;
^W4OPT("POPSH",21)
$$MGR^W4KOTMLZ;PRESENTWORKERSREPORT;PresentWorkersReport();yellow;green;
^W4OPT("POPSH",22)
$$SYS^W4DLVCSR&'$$MGR^W4KOTMLZ&'$$MM^W4PRM;SENDORDERS;SendOrders();white;red;
^W4OPT("POPSH",22.5)
'$$MGR^W4KOTMLZ&'$$MM^W4PRM&'$$SUPER^W3PRM;TAKEAWAYORDERS;TAWOrders();white;red;
^W4OPT("POPSH",22.7)
0;CLOSETABLE;CloseTable();white;red;
^W4OPT("POPSH",25)
1;SHOWCSRFILM;ShowCSRFilm();lightyellow;brown
^W4OPT("POPSH",25.5)
$$MGR^W4KOTMLZ;COPYZREPORT;CopyZReport();lightyellow;brown
^W4OPT("POPSH",26)
'$$PRTNET^W4PRM&$$MITEMS^W4PRM;ITEMSSYSTEM;ItemsSystem();lightyellow;brown
^W4OPT("POPSH",26.2)
'$$PRTNET^W4PRM&$$MITEMS^W4PRM;ITEMSTABLE;ItemsTable();lightyellow;brown
^W4OPT("POPSH",26.5)
$$MGR^W4OPT;CUSTOMERSSYSTEM;CustomersSystem();lightyellow;brown;
^W4OPT("POPSH",27)
1;FULLCUSTCARD;CustomTable();lightyellow;brown
^W4OPT("POPSH",27.2)
'$$PRTNET^W4PRM;ITEMCARD;ItemCard();lightyellow;brown
^W4OPT("POPSH",27.3)
1;CATALOGUPDATE;CatalogUpdate();lightyellow;brown
^W4OPT("POPSH",27.5)
$$^%W1LNG="H"&'$$MTAW^W4MTAW;PLACEORDER;PlaceOrder();lightyellow;brown
^W4OPT("POPSH",27.6)
$$MGR^W4KOTMLZ;WORKERCARD;WorkerCard();lightyellow;brown
^W4OPT("POPSH",27.7)
$$LKM^W4PRM;CLUBCUSTCARD;ClubCustCard();lightgreen;darkgreen
^W4OPT("POPSH",27.9)
$$MGR^W4KOTMLZ&'$G(@$$^W4PRM@("NOTIKSHA"));WORKTIMEREPAIR;WorkTimeRepair();lightyellow;brown
^W4OPT("POPSH",28)
$$MITEMS^W4PRM;TABLES;Tables();lightyellow;brown
^W4OPT("POPSH",28.02)
0;$$MGR^W4KOTMLZ&($D(@$$^W4GL("W4ORDRDY"))>9);RESTQUEDAY;RestQueDay();lightgreen;darkgreen;
^W4OPT("POPSH",28.2)
$$MGR^W4OPT&'$$MITEMS^W4PRM;TABLES;Tables();red;white;
^W4OPT("POPSH",28.3)
$$MGR^W4OPT;QUERIESANDREPORTS;QueriesAndReports();red;white;
^W4OPT("POPSH",28.5)
$$MGR^W4OPT;WORKERSYSTEM;WorkersClockSystem();red;white;
^W4OPT("POPSH",28.7)
0;SLHFKMZM;SlHfkMzm();red;white;
^W4OPT("POPSH",28.9)
$$MGR^W4OPT&'$$MITEMS^W4PRM&'$$PRTNET^W4PRM;ITEMSSYSTEM;ItemsSystem();red;white;
^W4OPT("POPSH",29)
$$MGR^W4OPT;SYSTEMPARAMETERS;SystemParameters();red;white;
^W4OPT("POPSH",30)
$$MGR^W4OPT&'$$SUPER^W3PRM&'$$MM^W4PRM;HOWEVERPAINTING;HoweverPainting();red;white;
^W4OPT("POPSH",31)
$$MGR^W4KOTMLZ;CHANGEPRINTERSCONFIGURATION;ChangePrintersConfiguration();red;white;
^W4OPT("POPSH",32)
$$MGR^W4OPT;BACKOFFICE;BackOffice();red;white;
^W4OPT("POPSH",33)
$$MGR^W4OPT&$$TEAV^W4PRM;TEAVPROT;TeavProt();red;white;
^W4OPT("POPSH",33.5)
$$MGR^W4OPT&$$DA^W4PRM;DAPROT;DAProt();red;white;
^W4OPT("POPSH",34)
$$MGR^W4OPT;EMVNPR;EmvnProt();red;white;
^W4OPT("POPSH",35)
$$MGR^W4OPT;HBMASPROT;HbMasProt();red;white;
^W4OPT("POPSH",36)
$G(@$$^W4PRM@("MGRSHIFT"));MGRSHIFT;MgrShift();lightblue;black;
^W4OPT("POPSH",37)
$G(@$$^W4PRM@("PCHBLAST"));PCHBLAST;PCHBLast();lightblue;black;
^W4OPT("POPVW",2)
'$$MTAW^W4MTAW&$$FIRE^W4OPT;NOFIRE;NoFire();red;black;
^W4OPT("POPVW",3)
1;OPENDRAW;OpenDraw()
^W4OPT("POPVW",4)
1;PAPERFEED;PaperFeed()
^W4OPT("POPVW",5)
1;PAPERCUT;PaperCut()
^W4OPT("POPVW",6)
1;PRESENTWATCH;PresentWatch();yellow;black;
^W4OPT("POPVW",6.4)
$$USERSTB^W4PRM;ERASETABLE;EraseTbl();orange;black;
^W4OPT("POPVW",6.5)
$$MSL^W4PRM;ERASEDLV;EraseTbl('1');orange;black;
^W4OPT("POPVW",6.55)
1;ERSCREDWORK;ErsCredWork();orange;black;
^W4OPT("POPVW",6.7)
1;LOADPRINTPROGRAMMS;LoadPrintProgramms();orange;black;
^W4OPT("POPVW",7)
1;ITEMSTOBEENDEDTABLE;ItemsRemainderTable();pink;black;
^W4OPT("POPVW",8)
1;CALCULATOR;Calculator();green;white;
^W4OPT("POPVW",8.5)
0;PHONEBOOK;PhoneBook();green;white;
^W4OPT("POPVW",9)
$G(@$$^W4PRM@("VCARD"));VALIOCARDMENU;ValioCardMenu();lightgreen;darkgreen;
^W4OPT("POPVW",9.5)
0;$$BSL^W4PRM;BUSINESSLOGICMENU;BusinessLogicMenu();lightgreen;darkgreen;
^W4OPT("POPVW",9.6)
$$BSL^W4PRM;BLCUSTOMDATA;BLCustomStatus();
^W4OPT("POPVW",9.7)
$$MP^W4PRM;MPMENU;MPMenu();lightgreen;darkgreen;
^W4OPT("POPVW",10)
1;SHOWCSRFILM;ShowCSRFilmVw();lightyellow;brown
^W4OPT("POPVW",10.01)
1;FULLCUSTCARD;CustomTable();lightyellow;brown
^W4OPT("POPVW",10.05)
'$$PRTNET^W4PRM;ITEMCARD;ItemCard();lightyellow;brown
^W4OPT("POPVW",10.1)
1;COPYZREPORT;CopyZReport();lightyellow;brown
^W4OPT("POPVW",10.2)
1;CUSTOMBALANCE;CustomBalance();lightyellow;red;
^W4OPT("POPVW",10.5)
$$SYS^W4DLVCSR&'$$MGR^W4KOTMLZ;SENDORDERS;SendOrders();white;red;
^W4OPT("POPVW",11)
($$DLV^W4DLVCSR!$$DMSHMSD^W4PRM)&'$$MGR^W4KOTMLZ&'$$CLOSE^W4HZMST(+$$GETP^%W1PRM("HZM"));DLVPAYCHANGE;ChangeDlvPay();white;red;
^W4OPT("POPVW",12)
$$DMSHMSD^W4PRM&'$$MGR^W4KOTMLZ&'$$CLOSE^W4HZMST(+$$GETP^%W1PRM("HZM"));DLVPAYPRCCHANGE;ChangeDlvPrcPay();white;red;
^W4OPT("POPVW",12.57)
$$USRESTEMV^W4OPT;RESTEMVPAYM;RestEMV();orange;black;
^W4OPT("POPVW",13)
$$MGR^W4OPT;SYSTEMPARAMETERS;SystemParameters();red;white;
^W4OPT("POPVW",14)
$$MGR^W4KOTMLZ;CHANGEPRINTERSCONFIGURATION;ChangePrintersConfiguration();red;white;
^W4OPT("REP")
QUERIESANDREPORTS;4;1;1;12;
^W4OPT("REP",0)
1;BACK;Back();red;white;
^W4OPT("REP",1)
1;MANYREPORT;ManyReport()
^W4OPT("REP",2)
1;INCOMEREPORT;IncomeReport()
^W4OPT("REP",2.5)
1;DEPREPORTPERMONTH;DepReportPerMonth()
^W4OPT("REP",3)
1;ZREPORT;ZReport()
^W4OPT("REP",3.05)
1;PAYREPORT;PayReport(); 
^W4OPT("REP",3.07)
$$MM^W4PRM;RESTREPORT;RestReport(); 
^W4OPT("REP",3.09)
$$MM^W4PRM;RESTCUSTREPORT;RestCustReport(); 
^W4OPT("REP",3.1)
1;SHIFTREPORT;ShiftReport(); 
^W4OPT("REP",3.15)
$$MSL^W4PRM;REPDEPTRH;RepTrh('0')
^W4OPT("REP",3.17)
$$MSL^W4PRM;REPITEMSTRH;RepTrh('1')
^W4OPT("REP",3.2)
'$$SUPER^W3PRM;ORDERSREPORT;OrdersReport(); 
^W4OPT("REP",3.4)
'$$SUPER^W3PRM;TIPREPORT;TipReport()
^W4OPT("REP",4)
1;MONTHPERDAYSREPORT;MonthPerDaysReport()
^W4OPT("REP",4.05)
1;MONTHCOMPARISONREPORT;MonthComparisonReport()
^W4OPT("REP",4.07)
1;REPYEARMONTH;RepYearMonth()
^W4OPT("REP",4.1)
$$NEWMLY^W3PRM;PROFITANDRATEREPORT;ProfitAndRateReport()
^W4OPT("REP",5)
1;HZCAREPORT;CreditCardReport()
^W4OPT("REP",5.5)
1;REPCA;CreditCardManpikReport()
^W4OPT("REP",6)
1;CASHREPORT;CashReport()
^W4OPT("REP",7)
1;DELETINGREPORTS>;DeletingReports()
^W4OPT("REP",8)
1;DISCOUNTREPORT;DiscountsReport()
^W4OPT("REP",8.5)
1;DISCOUNTGENREPORT;DiscountsGenReport()
^W4OPT("REP",9)
1;DISCOUNTSHOW;DiscountsShow()
^W4OPT("REP",10)
(+$$MM^W4PRM=0)&(+$$SUPER^W3PRM=0);RESTREPORTS>;RestReports()
^W4OPT("REP",11)
$$SYS^W4DLVCSR;DLVREPORTS>;DlvReports()
^W4OPT("REP",12)
1;ITEMSREPORTS>;ItemsReports()
^W4OPT("REP",13)
1;CUSTOMERSREPORTS>;CustomersReports();
^W4OPT("REP",14)
1;WORKERSREPORTS>;WorkersReports();
^W4OPT("REP",15)
'$$SUPER^W3PRM;COMPANYCARDSREPORTS>;CmpnCardsReports()
^W4OPT("REP",15.5)
$$BONSCR^W4PRM;TIMEPREPREPORT;TimePrepReport()
^W4OPT("REP",15.7)
$$BONSCR^W4PRM;DLVTIMEREPORT;DlvTimeReport()
^W4OPT("REP",16)
1;NARROWPRINTREPORTS>;NarrowPrintReports()
^W4OPT("REPNET")
REPORTS;4;1;1;12;
^W4OPT("REPNET",0)
1;BACK;Back();red;white;
^W4OPT("REPNET",1)
1;MRKMREPORT;MrkmReport()
^W4OPT("REPNET",1.1)
1;MRKGREPORT;MrkgReport()
^W4OPT("REPNET",2)
1;MRKZREPORT;MrkZReport()
^W4OPT("REPNET",3)
1;ITEMSSYSTEM>;Items()
^W4OPT("RESTREPORTS")
RESTREPORTS;4;1;1;12;
^W4OPT("RESTREPORTS",0)
1;BACK;Back();red;white;
^W4OPT("RESTREPORTS",1)
1;RESTORDERSREPORT;RestOrdersReport()
^W4OPT("RESTREPORTS",2)
1;RESTPAYMENTSREPORT;RestPaymReport()
^W4OPT("RESTREPORTS",3)
1;GIFTREPORT;GiftReport()
^W4OPT("SERV")
SERVICEPROGRAMMS
^W4OPT("SERV",0)
1;BACK;Back();red;white;
^W4OPT("SERV",1)
1;SYSTEMPARAMETERS>;SystemParameters()
^W4OPT("SERV",2)
1;DELETEPRINTFILE;DeletePrintFile()
^W4OPT("SERV",3)
1;LOADPRINTPROGRAMMS;LoadPrintProgramms()
^W4OPT("SERV",4)
1;PRINTERSTEST;CheckPrinters()
^W4OPT("SERV",4.5)
1;SCANERTEST;ScanerTest()
^W4OPT("SERV",5)
1;ERASETABLE;EraseTable()
^W4OPT("SERV",6)
$$EMV^W4PRM'=4;ERSCREDWORK;ErsCredWork();orange;black;
^W4OPT("SERV",7)
'$G(@$$^W4PRM@("NOTIKSHA"));WORKTIMEREPAIR;WorkTimeRepair()
^W4OPT("SERV",8)
'$$SUPER^W3PRM&'$$MM^W4PRM;HOWEVERPAINTING;HoweverPainting()
^W4OPT("SERV",8.2)
$$POLYGON^W4PRM;MAPPARAMETERS;MapParameters()
^W4OPT("SERV",8.5)
$$POLYGON^W4PRM;POLYGONPAINTING;PolygonPainting()
^W4OPT("SERV",9)
1;CREATEPRINTERCONFIGURATIONS;CreatePrinterConfigurations()
^W4OPT("SERV",9.5)
'$$EMV^W4PRM;CHANGEPASSWORDSHVA;ChangePasswordShva()
^W4OPT("SERV",10)
'$$EMV^W4PRM;GETSHVAPARAMETERS;GetShvaParam()
^W4OPT("SERV",11)
$$EMV^W4PRM&($$EMV^W4PRM'=4);DEFSHVAPARAMETERS;DefShvaParameters()
^W4OPT("SERV",12)
$$EMV^W4PRM&($$EMV^W4PRM'=4);CREATESHVATERM;CreateShvaTerm()
^W4OPT("SERV",12.5)
$$EMV^W4PRM;POSEMVTABLE;PosEmvTable()
^W4OPT("SERV",13)
$$EMV^W4PRM&($$EMV^W4PRM'=4);SHVAEMVINIT;ShvaEmvInit()
^W4OPT("SERV",14)
1;CRSHVKOD;CrShvKod()
^W4OPT("SERV",14.5)
1;MNYREP;MnyRep()
^W4OPT("SERV",14.7)
1;SENDZMAIL;SendZMail()
^W4OPT("SERV",15)
1;CREATEPRSNLAREA;SetPersonalArea()
^W4OPT("SERV",16)
$$GAP^W4PRM;SND2SRVAGAIN;Snd2SrvAgain()
^W4OPT("SERV",17)
1;CIBMVCPARAMETERS;CibMvcParameters()
^W4OPT("SERV",18)
1;CHANGEPRICEGR;ChangePriceGr()
^W4OPT("SIDE",1)
1;ITEMSTABLE;SideItemsTable();
^W4OPT("SIDE",1.5)
1;ITEMSSALEREPORT;SideItemsSaleReport();
^W4OPT("SIDE",2)
1;MANYREPORT;SideManyReport()
^W4OPT("SIDE",2.5)
$$PAPJ^W4PRM;GAPZREPORT;SideGapZReport()
^W4OPT("SIDE",3)
1;ZREPORT;SideZReport()
^W4OPT("SIDE",4)
1;PAYREPORT;SidePayReport(); 
^W4OPT("SIDE",5)
+$$GETP^%W1PRM("SISALL");SYSTEMPARAMETERS;SideSystemParameters(); 
^W4OPT("SIDE1",.5)
1;SHOWCSRFILM;ShowCSRFilm()
^W4OPT("SIDE1",1)
1;ITEMSTABLE;SideItemsTable();
^W4OPT("SUPPL",0)
1;BACK;Back();
^W4OPT("SUPPL",.01)
1;~REPORTS;
^W4OPT("SUPPL",.1)
$$NEWMLY^W3PRM;MLTNQREPORT;MlTnQReport()
^W4OPT("SUPPL",.3)
$$NEWMLY^W3PRM;MLTNINREPORT;MlTnInReport()
^W4OPT("SUPPL",.5)
$$NEWMLY^W3PRM;PARTNHZG;ParTnReport()
^W4OPT("SUPPL",.6)
$$NEWMLY^W3PRM;RMMLYREPORT;RamatMlayReport()
^W4OPT("SUPPL",.7)
$$NEWMLY^W3PRM;MLMINREPORT;MlayMinReport()
^W4OPT("SUPPL",.75)
$$NEWMLY^W3PRM;~DOCUMENTS
^W4OPT("SUPPL",.8)
$$NEWMLY^W3PRM;ORDER2SUPPLIER;Order2Supplier()
^W4OPT("SUPPL",1)
'$$NEWMLY^W3PRM;INCOMEARMINVOICE;IncomeInvoices('0')
^W4OPT("SUPPL",1.5)
$$NEWMLY^W3PRM;INCOMEDLVDOC;IncomeDlvDoc()
^W4OPT("SUPPL",1.6)
$$NEWMLY^W3PRM;INCOMEDLVBACKDOC;IncomeDlvBackDoc()
^W4OPT("SUPPL",2)
$$NEWMLY^W3PRM;INCOMEDETAILINVOICE;IncomeInvoices('1')
^W4OPT("SUPPL",4)
'$$NEWMLY^W3PRM;INCOMEDEBETARMINVOICE;IncomeDebetInvoices('0')
^W4OPT("SUPPL",5)
$$NEWMLY^W3PRM;INCOMEDEBETINVOICE;IncomeDebetInvoices('1')
^W4OPT("SUPPL",7)
$$NEWMLY^W3PRM;TKDOC;TkDocs()
^W4OPT("SUPPL",8)
1;PAYMENTS2SUPPLIERS;Payments()
^W4OPT("SUPPL",8.2)
1;PAYMENTS2SUPPLIERSINADVANCE;Payments('1')
^W4OPT("SUPPL",8.5)
1;CHKSPKREPORT;ChkSpkReport()
^W4OPT("SUPPL",9)
'$$NEWMLY^W3PRM;SUPPLTABLE;SupplTable();
^W4OPT("SUPPL",10)
'$$NEWMLY^W3PRM;SUPPLLIST;SupplList();
^W4OPT("SUPPL",11)
'$$NEWMLY^W3PRM;USERACCOUNTSTABLE;UserAccountsTable();
^W4OPT("SUPPL",11.5)
$$NEWMLY^W3PRM;INVENTORYBALANCESREPAIRING;InventoryBalancesRepairing();
^W4OPT("SUPPL",12)
$$NEWMLY^W3PRM;~MLYTABLES;
^W4OPT("SUPPL",13)
$$NEWMLY^W3PRM;SUPPLTABLE;SupplTable();
^W4OPT("SUPPL",14)
$$NEWMLY^W3PRM;SUPPLLIST;SupplList();
^W4OPT("SUPPL",15)
$$NEWMLY^W3PRM;DEPARTMENTSTABLE;DepartmentsTable();
^W4OPT("SUPPL",16)
$$NEWMLY^W3PRM&'$$ONEGLPAR^W3PRM;ITEMSGROUPTABLE;ItemsGroupTable();
^W4OPT("SUPPL",16.5)
$$NEWMLY^W3PRM&$$ONEGLPAR^W3PRM;PROFITPERCENTTABLE;ProfitPercentTable();
^W4OPT("SUPPL",17)
$$NEWMLY^W3PRM;ITEMCARD;ItemCard();
^W4OPT("SUPPL",18)
$$NEWMLY^W3PRM;STOCKITEMSTABLE;ItemsTable();
^W4OPT("SUPPL",19)
$$NEWMLY^W3PRM;MEASURETABLE;MeasureTable();
^W4OPT("SUPPL",20)
$$NEWMLY^W3PRM;COEFFICIENTSTABLE;CoefficientsTable();
^W4OPT("SUPPL",21)
$$NEWMLY^W3PRM;SUPPLIERPRICESLIST;SupplierPricesList();
^W4OPT("SUPPL",22)
$$NEWMLY^W3PRM;ITEMTREETABLE;ItemTreeTable();
^W4OPT("SUPPL",23)
$$NEWMLY^W3PRM;STOCKITEMTREETABLE;StockItemTreeTable();
^W4OPT("SUPPL",24)
1;BANKACCOUNTSTABLE;BankAccountsTable();
^W4OPT("SYSPRM",0)
1;BACK;Back();red;white;
^W4OPT("SYSPRM",1)
1;MYADDRESS;MyAddress()
^W4OPT("SYSPRM",2)
1;PASSWORDSDEFINITION;PasswordsDefinition()
^W4OPT("SYSPRM",2.2)
$$PSWDRG^W4PRM;WORKERSPASSWORDS;WorkersPasswords()
^W4OPT("SYSPRM",2.5)
1;MENUPASSWORDLEVELS;MenuPasswordLevels()
^W4OPT("SYSPRM",4)
1;DEVICESDEFINITION;DevicesDefinition()
^W4OPT("SYSPRM",5)
'$$SUPER^W3PRM&'$$MM^W4PRM;KITCHENPRINTERSDEFINITION;KitchenPrintersDefinition()
^W4OPT("SYSPRM",7)
1;ACCOUNTPRINTERSDEFINITION;AccountPrintersDefinition()
^W4OPT("SYSPRM",7.1)
$$MSL^W4PRM;DISPATHPRINTERDEFINITION;DispathPrinterDefinition()
^W4OPT("SYSPRM",7.15)
$$MSL^W4PRM;INTERNETPRINTERDEFINITION;InternetPrinterDefinition()
^W4OPT("SYSPRM",7.18)
1;BARCODEPRINTERDEFINITION;BarCodePrinterDefinition()
^W4OPT("SYSPRM",7.2)
1;ALLPARAMETERSLIST;AllParametersList()
^W4OPT("SYSPRM",7.3)
'$$SUPER^W3PRM&'$$MM^W4PRM;BONWNDPARAMETERS;BonWndParameters()
^W4OPT("SYSPRM",7.4)
1;SHOWSCREENPARAMETERS;ShowScreenParameters()
^W4OPT("SYSPRM",8)
1;GENERALPARAMETERS;GeneralParameters()
^W4OPT("SYSPRM",8.3)
1;MAILPARAMETERS;MailParameters()
^W4OPT("SYSPRM",8.5)
1;WORKCLOCKDEFINITION;WorkClockDefinition()
^W4OPT("SYSPRM",8.7)
1;LIMITHOURSDEFINITION;LimitHoursDefinition()
^W4OPT("SYSPRM",9)
'$$SUPER^W3PRM;RESTAURANTPARAMETERS;RestParameters()
^W4OPT("SYSPRM",9.1)
$$SYS^W4DLVCSR;DELIVERYPARAMETERS;DeliveryParameters()
^W4OPT("SYSPRM",10)
1;PRINTPARAMETERSDEFINITION;PrintParametersDefinition()
^W4OPT("SYSPRM",11)
1;MANYREPORTPARAMETERSDEFINITION;ManyReportParametersDefinition()
^W4OPT("SYSPRM",12)
1;DOWNHEADERDEFINITION;DownHeaderDefinition()
^W4OPT("SYSPRM",17)
1;BUSINESSPARAMETERS;BusinessParameters()
^W4OPT("SYSPRM",18)
1;BUSINESSWORKTIME;BusinessWorkTime()
^W4OPT("SYSPRM",18.5)
$$MSF^W4PRM;MASEFONPARAMETERS;MasefonParameters()
^W4OPT("SYSPRM",19.5)
1;GCOUPPARAMETERS;GCoupParameters()
^W4OPT("SYSPRM",20)
1;INTERFACEPARAMETERS>;InterfaceParameters()
^W4OPT("SYSPRM",20.5)
1;WEBPARAMETERS;WebParameters()
^W4OPT("SYSPRM",20.7)
1;KIOSKPARAMETERS;KioskParameters()
^W4OPT("SYSPRM",20.8)
1;DATETIMEREPAIR;DateTimeRepair()
^W4OPT("SYSPRM",21)
1;ADMINPARAMETERS;AdminParameters()
^W4OPT("SYSPRM",22)
$$^W4TABLET'=2;SHELL;Shell()
^W4OPT("SYSPRMC",0)
1;BACK;Back();red;white;
^W4OPT("SYSPRMC",1)
1;MYADDRESS;MyAddress()
^W4OPT("SYSPRMC",2)
1;PASSWORDSDEFINITION;PasswordsDefinition()
^W4OPT("SYSPRMC",4)
1;DEVICESDEFINITION;DevicesDefinition()
^W4OPT("SYSPRMC",5)
1;POSDEFINITION;PosDefinition()
^W4OPT("SYSPRMC",6)
1;WORKCLOCKDEFINITION;WorkClockDefinition()
^W4OPT("SYSPRMC",8)
1;MAPPARAMETERS;MapParameters()
^W4OPT("SYSPRMC",9)
1;BUSINESSPARAMETERS;BusinessParameters()
^W4OPT("SYSPRMC",10)
1;BUSINESSWORKTIME;BusinessWorkTime()
^W4OPT("SYSPRMC",11)
0;ADMINPARAMETERS;AdminParameters()
^W4OPT("SYSPRMM",0)
1;BACK;Back();red;white;
^W4OPT("SYSPRMM",1)
1;CIBUSPARAMETERS;CibusParameters()
^W4OPT("SYSPRMM",2)
1;VALIOCARDPARAMETERS;ValioCardParameters()
^W4OPT("SYSPRMM",3)
1;TENBISPARAMETERS;TenbisParameters()
^W4OPT("SYSPRMM",4)
0;MYCHECKPARAMETERS;MyCheckParameters()
^W4OPT("SYSPRMM",5)
1;BUSINESSLOGICPARAMETERS;BusinessLogicParameters()
^W4OPT("SYSPRMM",6)
1;BUSINESSLOGICCLUBS;BusinessLogicClubs()
^W4OPT("SYSPRMM",6.5)
1;MULTYPASSPARAMETERS;MultyPassParameters()
^W4OPT("SYSPRMM",6.8)
1;COUPPHPARAMETERS;CouponPhoneParameters()
^W4OPT("SYSPRMM",7)
1;HASHAVSHEVETPARAMETERS;HashavshevetParameters()
^W4OPT("SYSPRMM",7.5)
$$MGR^W4OPT;HSVDOPPARAMETERS;HsvDopParameters()
^W4OPT("SYSPRMM",8)
0;ZOOMPARAMETERS;ZoomParameters()
^W4OPT("SYSPRMM",9)
$$RESTORAN^W4PRM;RESTORANPARAMETERS;RestoranParameters()
^W4OPT("SYSPRMM",10)
0;OLDMLYPRM;OldMlyParameters()
^W4OPT("SYSPRMM",11)
0;SNOU1PRM;SnOu1Prm()
^W4OPT("SYSPRMM",12)
1;MRKMANPRM;MrkManPrm()
^W4OPT("SYSPRMM",12.5)
1;RESTIGOPARAMETERS;RestigoParameters()
^W4OPT("SYSPRMM",13)
1;GAPPARAMETERS;GapParameters()
^W4OPT("SYSPRMM",14)
0;IBONPARAMETERS;IBonParameters()
^W4OPT("SYSPRMM",14.5)
1;SNDYPARAMETERS;SndyParameters()
^W4OPT("SYSPRMM",15)
1;IT4WEBPARAMETERS;It4WebParameters()
^W4OPT("SYSPRMM",16)
1;TRICKERPARAMETERS;TrickerParameters()
^W4OPT("SYSPRMM",17)
1;TVPARAMETERS;TeavonParameters()
^W4OPT("SYSPRMM",17.5)
1;DAPARAMETERS;DlvAppParameters()
^W4OPT("SYSPRMM",18)
1;ZSTRPARAMETERS;ZstrParameters()
^W4OPT("SYSPRMM",19)
1;HBMASPARAMETERS;HbMasParameters()
^W4OPT("SYSPRMM",20)
1;MZSMPARAMETERS;MzSmParameters()
^W4OPT("SYSPRMM",21)
1;KSHCSHPARAMETERS;KashCashParameters()
^W4OPT("TBL")
TABLES;
^W4OPT("TBL",0)
1;BACK;Back();red;white;
^W4OPT("TBL",1)
0;WORKERSGROUPTABLE;WorkersGroupTable()
^W4OPT("TBL",2)
$$CALLCENTER^W4PRM!$$MM^W4PRM;RESTAURANTSTABLE;RestaurantsTable()
^W4OPT("TBL",3)
$$CALLCENTER^W4PRM!$$MM^W4PRM;RSTRNLIST;RestList()
^W4OPT("TBL",4)
0;WORKERSTIPTABLE;WorkersAndTipTable()
^W4OPT("TBL",5)
$$SYS^W4DLVCSR;COURIERSTABLE;CouriersTable()
^W4OPT("TBL",6)
0;TBLSLR;SalaryTable();3;
^W4OPT("TBL",7)
'$$SUPER^W3PRM;COMMENTSTABLE;CommentsTable()
^W4OPT("TBL",7.1)
'$$MMOUT^W4PRM&'$$SUPER^W3PRM;TIPSTABLE;TipsTable()
^W4OPT("TBL",8)
'$$MMOUT^W4PRM;DISCOUNTSTABLE;DiscountsTable()
^W4OPT("TBL",9)
'$$MMOUT^W4PRM;DISCOUNTSPERDAYSANDHOUERS;HappyHouer()
^W4OPT("TBL",10)
'$$MMOUT^W4PRM;DISCOUNTCAUSES;DiscountCauses()
^W4OPT("TBL",11)
'$$MMOUT^W4PRM;DELETINGCAUSES;DeletingCauses()
^W4OPT("TBL",12)
+$$MSDT^W4PRM!$$SUPER^W3PRM;KINDSOFTABLES;KindsOfTables()
^W4OPT("TBL",12.5)
+$$MSDT^W4PRM;CREATEGROUPTABLES;CreateGroupTables()
^W4OPT("TBL",13)
+$$MSDT^W4PRM!$$SUPER^W3PRM;TABLESTABLE;TablesTable()
^W4OPT("TBL",13.1)
+$$MSDT^W4PRM!$$SUPER^W3PRM;WEIGHTPOSTABLE;WeightPosTable()
^W4OPT("TBL",13.2)
$$ULAM^W4PRM&$$MSDT^W4PRM;POSULMTABLE;PosUlmTable()
^W4OPT("TBL",13.3)
+$$MSDT^W4PRM;ATRTABLE;AtrTable()
^W4OPT("TBL",13.4)
+$$MSDT^W4PRM;POSATRTABLE;PosAtrTable()
^W4OPT("TBL",13.5)
+$$MSDT^W4PRM;POSGRTTABLE;PosGrtTable()
^W4OPT("TBL",13.7)
$$EMV^W4PRM'=2;POSEMVTABLE;PosEmvTable()
^W4OPT("TBL",13.8)
$$BIO^W4PRM;POSBIOTABLE;PosBioTable()
^W4OPT("TBL",14)
0;PHONEBOOK;PhoneBook()
^W4OPT("TBL",14.2)
1;TBLMAKOR;TblMakor()
^W4OPT("TBL",14.3)
$D(@$$^W4PRM@("WEB"))>9;WEBCENTERSTABLE;WebCentersTable()
^W4OPT("TBL",14.5)
0;ZAGTABLE;ZagTable()
^W4OPT("TBL",15)
1;TBLOC>;TBLoc()
^W4OPT("TBL",16)
$$SF^W4PRM;MSG2SITE;Msg2Site();
^W4OPT("TBL",17)
0;DISTRICTSTREETSTABLE;DistrictStreetsTable()
^W4OPT("TBL",18)
$$CALLCENTER^W4PRM;RESTAURANTSTABLE;RestaurantsTable()
^W4OPT("TBL",19)
$D(@$$^W4PRM@("WEB"))>9;WEBCENTERSTABLE;WebCentersTable()
^W4OPT("TBL",20)
$$DELIS^W4PRM;MGRDEPTABLE;MgrDepTable()
^W4OPT("TBL",21)
$$MATB^W4PRM;CURRENCYTABLE;CurrencyTable()
^W4OPT("TBLOC",0)
1;BACK;Back();red;white;
^W4OPT("TBLOC",1)
1;CITIESTABLE;CitiesTable()
^W4OPT("TBLOC",2)
$$SYS^W4DLVCSR&'$$MMOUT^W4PRM;CITYDISTRICTSTABLE;CityDistrictsTable()
^W4OPT("TBLOC",3)
$$SYS^W4DLVCSR&'$$POLYGON^W4PRM&'$$MMOUT^W4PRM;DISTRICTSTREETSTABLE;DistrictStreetsTable()
^W4OPT("TBLOC",4)
$$POLYGON^W4PRM;MAPTABLE;MapPrmTable()
^W4OPT("TBLOC",5)
$$POLYGON^W4PRM;DISTRICTPAINTING;PaintMap()
^W4OPT("TBREP")
TBCHECKREPORTS
^W4OPT("TBREP",0)
1;BACK;Back();red;white;
^W4OPT("TBREP",1)
1;TBNOTB;TbNoTb();
^W4OPT("TBREP",2)
1;TBNOSF;TbNoSF();
^W4OPT("TELMENU",0)
1;EXIT;Exit();red;white;
^W4OPT("TELMENU",1)
1;MANYREPORT;Report(\'MNY\',\'MANYREPORT\');
^W4OPT("TELMENU",1.5)
1;SHORTMANYREPORT;Report(\'MNS\',\'SHORTMANYREPORT\');
^W4OPT("TELMENU",1.7)
1;GAPZREPORT;Report(\'GAPZ\',\'GAPZREPORT\');
^W4OPT("TELMENU",2)
1;ZRKZSHORT;Report(\'ZRS\',\'ZRKZSHORT\');
^W4OPT("TELMENU",3)
$$MSDT^W4PRM&(+$$SUPER^W3PRM=0);WAITERSREPORT;Report(\'MLZ\',\'WAITERSREPORT\')
^W4OPT("TELMENU",4)
$$MSDT^W4PRM&(+$$SUPER^W3PRM=0);ONEWAITERREPORT;Report(\'MLZ1\',\'ONEWAITERREPORT\')
^W4OPT("TELMENU",5)
$$MSL^W4PRM;COURIERSMANYREPORT;Report(\'MSH\',\'COURIERSMANYREPORT\')
^W4OPT("TELMENU",6)
$$MSL^W4PRM;ONECOURIERREPORT;Report(\'MSH1\',\'ONECOURIERREPORT\')
^W4OPT("TELMENU",6.2)
$$MSL^W4PRM;COURIERSORDERSREPORT;Report(\'MSHD\',\'COURIERSORDERSREPORT\')
^W4OPT("TELMENU",6.4)
$$MSL^W4PRM;ONECOURIERORDERSREPORT;Report(\'MSHD1\',\'ONECOURIERORDERSREPORT\')
^W4OPT("TELMENU",6.6)
1;CLOCKWORKERSREPORT;Report(\'DCLK\',\'CLOCKWORKERSREPORT\')
^W4OPT("TELMENU",7)
$$MSDT^W4PRM;TABLEREPORT;Report(\'TBL\',\'TABLEREPORT\')
^W4OPT("TELMENU",8)
$$MSDT^W4PRM;POSREPORT;Report(\'POS\',\'POSREPORT\')
^W4OPT("TELMENU",9)
$$MSD^W4PRM&(+$$SUPER^W3PRM=0);ULAMREPORT;Report(\'ULM\',\'ULAMREPORT\')
^W4OPT("TELMENU",10)
1;DELETEREPORTCONC;Report(\'BIT\',\'DELETEREPORTCONC\')
^W4OPT("TELMENU",11)
1;DELETEREPORTDET;Report(\'BITD\',\'DELETEREPORTDET\')
^W4OPT("TELMENU",12)
1;DISCOUNTREPORTCONC;Report(\'HNH\',\'DISCOUNTREPORTCONC\')
^W4OPT("TELMENU",13)
1;DISCOUNTREPORTDET;Report(\'HNHD\',\'DISCOUNTREPORTDET\')
^W4OPT("TELMENU",14)
1;ITEMSREPORT;Report(\'PAR\',\'ITEMSREPORT\')
^W4OPT("TELMENU",15)
1;DEPARTREPORT;Report(\'DEP\',\'DEPARTREPORT\')
^W4OPT("TELMENU",16)
1;DLVGAPREPORT;Report(\'DLVGAP\',\'DLVGAPREPORT\')
^W4OPT("WBPOP",1)
1;ASCCARD2CUSTOMER;BLInitCard();
^W4OPT("WBPOP",2)
1;CANCELLINGCARD;BLCancelCard();
^W4OPT("WBPOP",3)
1;CUSTOMSTATUS;BLCustomStatus();
^W4OPT("WBPOP",4)
1;GETCUSTOMDETAILS;BLGetCustomDetails();
^W4OPT("WBPOP",5)
1;UPDATECUSTOMDETAILS;BLUpdateCustomDetails();
^W4OPT("WBPOP",6)
1;CREATENEWCUSTOM;BLCreateNewCustom();
^W4OPT("WBPOP",7)
1;GETCARDBALANCE;BLGetCardBalance();
^W4OPT("WBPOP",8)
1;LOADBUDGET2CARD;BLLoadBudget2Card();
^W4OPT("WBPOP",9)
1;DELETELOADING;BLDeleteLoading();
^W4OPT("WBPOP",10)
1;EXIT;BLExit();red;white;
^W4OPT("WMPOP",1)
1;INITCARD;MPInitCard();
^W4OPT("WMPOP",2)
1;WHATBALANCE;MPBalance();
^W4OPT("WMPOP",3)
1;GETCARDDETAILS;MPStatus();
^W4OPT("WMPOP",4)
'$$CASHBACK^WMPRM;LOADBUDGET2CARD;MPLoadBudget2Card();
^W4OPT("WMPOP",5)
'$$CASHBACK^WMPRM;DELETELOADING;MPDeleteLoading();
^W4OPT("WMPOP",6)
1;INITDAY;MPInitDay();
^W4OPT("WMPOP",7)
1;MPREPORTS;MPReports();
^W4OPT("WMPOP",10)
1;EXIT;MPExit();red;white;
^W4OPT("WORKCC",0)
1;BACK;Back();red;white;
^W4OPT("WORKCC",2)
1;SHORTWATCHREPORT;ShortWatchReport()
^W4OPT("WORKCC",3)
1;DETAILWATCHREPORT;DetailWatchReport()
^W4OPT("WORKCC",5)
1;PRESENTWORKERSREPORT;PresentWorkersReport()
^W4OPT("WORKCLOCK",0)
1;BACK;Back();red;white;
^W4OPT("WORKCLOCK",.1)
1;REPORTS>;Reports()
^W4OPT("WORKCLOCK",1)
1;WORKERSGROUPTABLE;WorkersGroupTable()
^W4OPT("WORKCLOCK",2)
1;WORKERSTABLE;WorkersTable()
^W4OPT("WORKCLOCK",3)
1;GROUPEMPTABLE;GroupWorkersTable()
^W4OPT("WORKCLOCK",4)
1;WORKERSTIPTABLE;WorkersAndTipTable()
^W4OPT("WORKCLOCK",5)
1;TBLSLR;SalaryTable();3;
^W4OPT("WORKCLOCK",6)
'$G(@$$^W4PRM@("NOTIKSHA"));WORKTIMEREPAIR;WorkTimeRepair()
^W4OPT("WORKCLOCK",6.5)
'$G(@$$^W4PRM@("NOTIKSHA"));WORKTIMEGROUPREPAIR;WorkTimeGroupRepair()
^W4OPT("WORKCLOCK",7)
1;HOLIDAYSTABLE;HolidaysTable()
^W4OPT("WORKCLOCK",8)
1;ABSENCEPERCAUSES;AbsencePerCauses()
^W4OPT("WORKCLOCK",9)
1;ADDPAYMENTS;AddPayments()
^W4OPT("WORKCLOCK",10)
$$SYS^W4DLVCSR;COURIERSTABLE;CouriersTable()
^W4OPT("WORKCLOCK",11)
$$BIO^W4PRM;ADDWORKERS2BIO;AddWorkers2Bio()
^W4OPT("WORKCLOCK",12)
$$BIO^W4PRM;BIOWORKERSLIST;BioWorkersList()
^W4OPT("WORKCLOCK",13)
$$TEAV^W4PRM;TEAVPROT;TeavProt()
^W4OPT("WORKER",0)
1;BACK;Back();red;white;
^W4OPT("WORKER",1)
1;WAITERSREPORT;WaitersReport()
^W4OPT("WORKER",2)
1;SHORTWATCHREPORT;ShortWatchReport()
^W4OPT("WORKER",2.5)
1;WATCHREPORTPERDATES;WatchReportPerDates()
^W4OPT("WORKER",3)
1;DETAILWATCHREPORT;DetailWatchReport()
^W4OPT("WORKER",4)
1;CLKTOTREPORT;ClkTotReport()
^W4OPT("WORKER",5)
1;PRESENTWORKERSREPORT;PresentWorkersReport()
^W4OPT("WORKER",6)
1;OVTFKREP;OvTfkRep()
^W4OPT("WVPOP",1)
1;INITCARD;InitCardVC();
^W4OPT("WVPOP",2)
1;CANCELINITCARD;CancelInitCardVC();
^W4OPT("WVPOP",3)
1;GETDETAILSCARD;GetDetailsCardVC();
^W4OPT("WVPOP",4)
1;LOADBUDGET2CARD;LoadBudget2CardVC();
^W4OPT("WVPOP",5)
1;DELETELOADING;DeleteLoading();
^W4OPT("WVPOP",5.3)
1;VCSITE;VCSite();
^W4OPT("WVPOP",6)
1;EXIT;ExitVC();red;white;
^W4PAY

^W4PAY("IS",1,"SHOW",1)
SUM;7;1;
^W4PAY("IS",1,"SHOW",2)
TIPIN;6,2;6;
^W4PAY("IS",1,"SHOW",3)
ODEF;6,2;5-6;
^W4PAY("IS",1,"SHOW",4)
TIME;14;2;;D TIME^W4PAYKB
^W4PAY("IS",1,"SHOW",5)
WAITER;14;3;;D MLZR^W4PAYKB
^W4PAY("IS",1,"SHOW",6)
POSNUMBER;3;4;
^W4PAY("IS",1,"SUM",1)
SUM;7,2;1;;;1;
^W4PAY("IS",1,"SUMMTB",1)
SUGMTB;1;1;<;;1;$$^W4GL("P1SUGM")
^W4PAY("IS",1,"SUMMTB",2)
SUMMTB;1;1;;;1;
^W4PAY("IS",2,"SHOW",1)
CHS;7,2;1;;D CHS^W4PAYKB;1;
^W4PAY("IS",2,"SHOW",2)
TIPIN;6,2;12;
^W4PAY("IS",2,"SHOW",2.5)
TIME;14;29;;D TIME^W4PAYKB
^W4PAY("IS",2,"SHOW",3)
NCHECK;7;2;;D NCHECK^W4PAYKB;1;
^W4PAY("IS",2,"SHOW",4)
TZ;9;3;;;1;
^W4PAY("IS",2,"SHOW",5)
BSN;5;4;;;1;
^W4PAY("IS",2,"SHOW",6)
HESH;9;5;;;1;
^W4PAY("IS",2,"SHOW",7)
DATP;9;6;;;1;
^W4PAY("IS",2,"SUM",1)
CHS;7,2;1;;D CHS^W4PAYKB;1;
^W4PAY("IS",2,"SUM",2)
NCHECK;7;2;;D NCHECK^W4PAYKB;1;
^W4PAY("IS",2,"SUM",3)
TZ;9;3;;D TZ^W4PAYKB;$$GET^W4TMPPAY(2,"NCHECK");
^W4PAY("IS",2,"SUM",4)
BSN;5;4;;D BSN^W4PAYKB;$$GET^W4TMPPAY(2,"NCHECK");
^W4PAY("IS",2,"SUM",5)
HESH;9;5;;D HESH^W4PAYKB;$$GET^W4TMPPAY(2,"NCHECK");
^W4PAY("IS",2,"SUM",6)
DATP;9;6;;D DATP^W4PAYKB;1;
^W4PAY("IS",2.5,"SUM",1)
SUMMVBNK;7,2;1;;D CHS^W4PAYKB;1;
^W4PAY("IS",2.5,"SUM",2)
DATP;9;6;;D DATP^W4PAYKB;1;
^W4PAY("IS",3,"CRCARD",1)
CREDITCARDNUMBER;37;2;;D CA^W4PAYKB;1;
^W4PAY("IS",3,"CRCARD",2)
MM;2.;14,/,1;;D MM^W4PAYKB;$$ARM^W4PAYKB;
^W4PAY("IS",3,"CRCARD",3)
YY;2.;14,/,2;;D YY^W4PAYKB;$$ARM^W4PAYKB;
^W4PAY("IS",3,"CRCARD",4)
CVV;3;24;;D CVV^W4PAYKB;$$ARM^W4PAYKB&($$CVVTZ^W4PRM!$$CVV^W4PRM);
^W4PAY("IS",3,"CRCARD",5)
IDNUMBER;9;23;;D TZ^W4PAYKB;$$ARM^W4PAYKB&($$CVVTZ^W4PRM!$$TZ^W4PRM);
^W4PAY("IS",3,"CRCARDEMV",1)
CREDITCARDNUMBER;37;2;;D CA^W4PAYKB;$$CRCARDEMV^W4PAYKB;
^W4PAY("IS",3,"DOP",3,1)
AUTHNO;7;12;;;1
^W4PAY("IS",3,"DOP",6,1)
CVV;3;24;;D CVV^W4PAYKB
^W4PAY("IS",3,"DOP",17,1)
ASH4;
^W4PAY("IS",3,"DOP",57,1)
IDNUMBER;9;23;;D TZ^W4PAYKB
^W4PAY("IS",3,"DOP",58,1)
CVV;3;24;;D CVV^W4PAYKB
^W4PAY("IS",3,"DOP",59,1)
CVV;3;24;;D CVV^W4PAYKB
^W4PAY("IS",3,"DOP",59,2)
IDNUMBER;9;23;;D TZ^W4PAYKB
^W4PAY("IS",3,"DOP",160,1)
AUTHNO;7;12;;;1
^W4PAY("IS",3,"DOP",166,1)
CLUBCARDRANGE;
^W4PAY("IS",3,"DOP",458,1)
AUTHNO;7;12;;;1
^W4PAY("IS",3,"DOP",901,1)
ZIP;7;32;;D ZIP^W4PAYKB
^W4PAY("IS",3,"DOP",902,1)
AUTHNO;7;12;;;1
^W4PAY("IS",3,"PAYM",5,1)
PN1;7,2;;;D PN^W4PAYKB
^W4PAY("IS",3,"PAYM",5,2)
PC;2;;O;
^W4PAY("IS",3,"PAYM",6,1)
PN1;7,2;;;D PN^W4PAYKB
^W4PAY("IS",3,"PAYM",6,2)
PC;2;;O;
^W4PAY("IS",3,"PAYM",8,1)
PN1;7,2;;;D PN^W4PAYKB
^W4PAY("IS",3,"PAYM",8,2)
PC;2;;O;
^W4PAY("IS",3,"PAYM",9,1)
P1;7;;;D P1^W4PAYKB
^W4PAY("IS",3,"PAYM",9,2)
PN;7,2;;;D PN^W4PAYKB
^W4PAY("IS",3,"PAYM",9,3)
PC;2;;O;
^W4PAY("IS",3,"SHOW",1)
SUM;7,2;7;;;1;
^W4PAY("IS",3,"SHOW",2)
TIPIN;6,2;27;;;1;
^W4PAY("IS",3,"SHOW",3)
DISCAST;7,2;18;;
^W4PAY("IS",3,"SHOW",4)
CREDITCARDNUMBER;37;2;;;1;
^W4PAY("IS",3,"SHOW",5)
MM;2.;14;;D MM^W4PAYVW;;
^W4PAY("IS",3,"SHOW",6)
YY;2.;14;;D YY^W4PAYVW;;
^W4PAY("IS",3,"SHOW",7)
AUTHNO;7;12;;;1
^W4PAY("IS",3,"SHOW",8)
CVV;3;24;;;1
^W4PAY("IS",3,"SHOWTMP",1)
SUM
^W4PAY("IS",3,"SHOWTMP",2)
TIPCA
^W4PAY("IS",3,"SHOWTMP",3)
DISCAST
^W4PAY("IS",3,"SHOWTMP",4)
CREDITCARDNUMBER
^W4PAY("IS",3,"SHOWTMP",5)
MM
^W4PAY("IS",3,"SHOWTMP",6)
YY
^W4PAY("IS",3,"SHOWTMP",7)
P1
^W4PAY("IS",3,"SHOWTMP",8)
PN
^W4PAY("IS",3,"SHOWTMP",9)
PC
^W4PAY("IS",3,"SHOWTMP",10)
AUTHNO
^W4PAY("IS",3,"SHOWTMP",11)
PAYTIME
^W4PAY("IS",3,"SUM",1)
SUM;7,2;6+7;;D SUM^W4PAYKB;1;
^W4PAY("IS",3,"SUM",2)
DISCAST;7,2;6+7;;D SUM^W4PAYKB;$G(@$$^W4PL("KOHAV"))
^W4PAY("IS",3,"SUMCAJ",1)
SUM;7,2;;;D SUM^W4PAYKB;1;
^W4PAY("IS",3,"SUMCAJ",2)
SOLEK;1;;<;;1
^W4PAY("IS",3,"SUMCAJ",2,1)
ISRACARD;1;
^W4PAY("IS",3,"SUMCAJ",2,2)
VISA;2;
^W4PAY("IS",3,"SUMCAJ",2,3)
DINERS;3;
^W4PAY("IS",3,"SUMCAJ",2,4)
AEX;4;
^W4PAY("IS",3,"SUMCAJ",2,6)
LEUMI;6;
^W4PAY("IS",4,"CUST",1)
LKHN;11;1;;D LKHN^W4PAYKB;1;
^W4PAY("IS",4,"CUST",2)
LKHN1;20;12;O;;1;
^W4PAY("IS",4,"CUST",3)
LKHR;11;6;O;;1;
^W4PAY("IS",4,"CUST",4)
LKHR1;20;13;O;;1;
^W4PAY("IS",4,"CUST",5)
GODAS;7,2;;O;;1;
^W4PAY("IS",4,"CUST",6)
ITRAS;7,2;;O;;1;
^W4PAY("IS",4,"SHOW",1)
LKHN;11;1;
^W4PAY("IS",4,"SHOW",2)
LKHN1;20;12;;D NAME^W4PAYKB
^W4PAY("IS",4,"SHOW",3)
LKHR;11;6;
^W4PAY("IS",4,"SHOW",4)
LKHR1;20;13;
^W4PAY("IS",4,"SHOW",5)
ASRL;7,2;4+3;;
^W4PAY("IS",4,"SHOW",6)
TIPIN;7,2;20;
^W4PAY("IS",4,"SHOW",7)
LKAH;5,2;2;
^W4PAY("IS",4,"SHOW",8)
LKHNH;7,2;3;
^W4PAY("IS",4,"SHOW",9)
ASR;7,2;4;
^W4PAY("IS",4,"SHOW",10)
HZMLK;7;7;;D HZMLK^W4PAYKB
^W4PAY("IS",4,"SHOW",11)
TLUSH;7,2;8;
^W4PAY("IS",4,"SHOW",12)
KMTL;5,2;9;
^W4PAY("IS",4,"SHOWTMP",1)
LKHN
^W4PAY("IS",4,"SHOWTMP",2)
LKHN1
^W4PAY("IS",4,"SHOWTMP",3)
LKHR
^W4PAY("IS",4,"SHOWTMP",4)
LKHR1
^W4PAY("IS",4,"SHOWTMP",5)
GODAS
^W4PAY("IS",4,"SHOWTMP",6)
ITRAS
^W4PAY("IS",4,"SHOWTMP",7)
ASRL
^W4PAY("IS",4,"SHOWTMP",8)
TIPAS
^W4PAY("IS",4,"SHOWTMP",9)
LKAH
^W4PAY("IS",4,"SHOWTMP",10)
LKHNH
^W4PAY("IS",4,"SHOWTMP",11)
ASR
^W4PAY("IS",4,"SHOWTMP",12)
HZMLK
^W4PAY("IS",4,"SUM",1)
ASRL;7,2;;;D ASRL^W4PAYKB;1;
^W4PAY("IS",4,"SUM",2)
LKAH;5,2;2;O;;1;
^W4PAY("IS",4,"SUM",3)
LKHNH;7,2;3;O;;1;
^W4PAY("IS",4,"SUM",4)
ASR;7,2;4;O;;1;
^W4PAY("IS",4,"SUM",5)
HZMLK;7;7;;;$$ASM^W4PAYKB;
^W4PAY("IS",4,"TL",1)
TLUSH;7,2;8;;D TLAS^W4PAYKB;1;
^W4PAY("IS",4,"TL",2)
KMTL;5,2;9;;D KMTL^W4PAYKB;1;
^W4PAY("IS",4,"TL",3)
SHTL;7,2;;O;;1;
^W4PAY("IS",4,"TL",4)
SHTLAL;7,2;4;O;;1;
^W4PAY("IS",4,"TL",5)
TIPAS;6,2;20;O;;1;
^W4PAY("IS",6,"SHOW",1)
HNH;7,2;1;
^W4PAY("IS",6,"SHOW",2)
TIME;14;2;;D TIME^W4PAYKB
^W4PAY("IS",6,"SHOW",3)
WHOSUBMNM;14;3;;D MLZR^W4PAYKB
^W4PAY("IS",6,"SHOW",4)
POSNUMBER;3;4;
^W4PAY("IS",6,"SHOW",6)
CAUSEDISC;18;5;
^W4PAY("IS",6,"SUM",1)
WHOSUBMIT;7!;;;S VL=$$DOP^W4NAME(VL)
^W4PAY("IS",6,"SUM",2)
HNH;7,2;;;D HNH^W4PAYKB;1;
^W4PAY("IS",7,"CIBCARD",1)
CARDNUMBER;48;;;;1
^W4PAY("IS",7,"CMPCARD",1)
COMPANYNUMBER;12;;;D CMP^W4PAYKB;1
^W4PAY("IS",7,"CMPCARD",2)
CARDNUMBER;48;;;;1
^W4PAY("IS",7,"HOW",1)
CIBKIND;1;;<;;1
^W4PAY("IS",7,"HOW",1,1)
CIBUSCARD;1;
^W4PAY("IS",7,"HOW",1,2)
COMPANYCARD;2;
^W4PAY("IS",7,"HOW",1,3)
INPUTCARD;3;
^W4PAY("IS",7,"INPCARD",1)
CARDNUMBER;12;;;;1
^W4PAY("IS",7,"SHOWTMP",1)
SUM
^W4PAY("IS",7,"SHOWTMP",2)
CIBKIND
^W4PAY("IS",7,"SUM",1)
SUM;7,2;;;;1;
^W4PAY("IS",8,"HOW",1)
ACTIONKIND;1;;<;;1
^W4PAY("IS",8,"HOW",1,1)
PAYMENT;PAY;;;;;;'$$VCPREPAY^W4PRM
^W4PAY("IS",8,"HOW",1,2)
BONUS;BONUS;;;;;;'$$WASBON^WV($$GET^%W1PRM("HZM"))
^W4PAY("IS",8,"HOW",1,3)
CANCELBONUS;CANCELBONUS;;;;;;$$ISDISC^WV($$GET^%W1PRM("HZM"))=1
^W4PAY("IS",8,"HOW",1,4)
SHOWBONUS;SHOWBONUS;;;;;;$$ISDISC^WV($$GET^%W1PRM("HZM"))=1
^W4PAY("IS",8,"HOW",1,5)
SHOWHISTORY;SHOWHIST;;;;;;1
^W4PAY("IS",9,"SHOW",1)
SUM;7;1;
^W4PAY("IS",9,"SHOW",2)
TIPIN;6,2;6;
^W4PAY("IS",9,"SHOW",3)
ODEF;6,2;5-6;
^W4PAY("IS",9,"SHOW",4)
TIME;14;2;;D TIME^W4PAYKB
^W4PAY("IS",9,"SHOW",5)
WAITER;14;3;;D MLZR^W4PAYKB
^W4PAY("IS",9,"SHOW",6)
POSNUMBER;3;4;
^W4PAY("IS",9,"SUM",1)
SUM;7,2;1;;;1;
^W4PAY("IS",9,"SUM",2)
CSHCODE;5;;;;1;
^W4PAY("IS",10,"SUM",1)
SUM;7,2;;;;1;
^W4PAY("IS",10,"SUM",2)
CARDNUMBER;48;;;;1
^W4PAY("IS",11,"RCPNMB",1)
TLNMB;7;;;;1;
^W4PAY("IS",11,"RCPNMB",2)
SUM;7,2;;;;1;
^W4PAY("IS",12,"SUM",1)
SUM;7,2;;;;1;
^W4PAY("IS",14,"SUM",1)
SUM;7,2;;;;1;
^W4PAY("IS",15,"SUM",1)
SUM;7,2;;;;1;
^W4PAY("IS",15,"SUM",2)
CARDNUMBER;48;;;;1
^W4PAYS

^W4PAYS("IS","MB")
rahn beq
^W4PAYS("IS","MB",1)
milwy
^W4PAYS("IS","MB",2)
xlec
^W4PAYS("IS","MB",4)
xlec cenv
^W4PAYS("IS","MB",8)
ccn cenv
^W4PAYS("IS","SA")
i`xy` beq
^W4PAYS("IS","SA",1)
libx
^W4PAYS("IS","SA",2)
30+/sicr-ine`l,qxpiic,l`k,hicxw qwn`,hicxw`xyi
^W4PAYS("IS","SA",3)
iciin aeig
^W4PAYS("IS","SA",4)
oecren i`xy`
^W4PAYS("IS","SA",5)
(cxw ine`l,qwn`,hxk`xyi) hicxw xteq
^W4PAYS("IS","SA",6)
(mireaw minelyz) hicxw
^W4PAYS("IS","SA",8)
minelyz
^W4PAYS("IS","SA",9)
(qw`n`, hxk`xyi) minelyza oecren
^W4PAYS("IS","SI")
dwqr beq
^W4PAYS("IS","SI",1)
daeg zwqr
^W4PAYS("IS","SI",3)
zekf zwqr
^W4REP

^W4REP("W4CPREP")
S4B
^W4REP("W4CPREP","ASK","H",1)
MEDAT;jix`zn;D;
^W4REP("W4CPREP","ASK","H",2)
ADDAT;jix`z cr;D;
^W4REP("W4CPREP","ASK","H",3)
VT;0 - zepnfdd lk, 2 - migelyn , 1 - dcrqn;N;1;
^W4REP("W4CPREP","HD","H")
"iceb" iqihxk g"ec
^W4REP("W4CPREP","REP","H",1)
DAT;jix`z;D;8;
^W4REP("W4CPREP","REP","H",2)
HZM;dpnfd 'qn;H;7;
^W4REP("W4CPREP","REP","H",2,"PROC")
CallIfr("w4ordvw.jsp?JB="+GetJB()+"&ORD="+ClearNum(this.innerHTML)+"&FIRST=1&VIEW=1&WIN=IFR","ifr",self,100,"90%","90%")
^W4REP("W4CPREP","REP","H",3)
CARD;qihxk 'qn;E;16;
^W4REP("W4CPREP","REP","H",4)
ASM;`zknq`;E;7;
^W4REP("W4CPREP","REP","H",5)
SUM;dwqr mekq;N;9,2;
^W4REP("W4CPREP","REP","H",6)
HNHM;dcrqn zgpd;N;8,2;
^W4REP("W4CPREP","REP","H",7)
SUMCP;dxag aeig;N;8,2;
^W4REP("W4DCSR")
S4B
^W4REP("W4DCSR","ASK","H",1)
MEDAT;jix`zn;D;
^W4REP("W4DCSR","ASK","H",2)
ADDAT;jix`z cr;D;
^W4REP("W4DCSR","ASK","H",3)
MESHAA;dryn;T;
^W4REP("W4DCSR","ASK","H",4)
ADSHAA;dry cr;T;
^W4REP("W4DCSR","ASK","H",7)
SGR;2- itqk dxibq itl, 1 - mihixt zxikn itl;N;1;
^W4REP("W4DCSR","HD","H")
(ze)mi`tew g"ec
^W4REP("W4DCSR","REP","H",1)
MLZ;(z)i`tew 'qn;E;5;
^W4REP("W4DCSR","REP","H",2)
NAME;(z)i`tew my;H;14;
^W4REP("W4DCSR","REP","H",3)
HZM;zepeayg;N;6;
^W4REP("W4DCSR","REP","H",4)
PDN;zexikn;N;9,2;
^W4REP("W4DCSR","REP","H",5)
AVR;oeaygl rvenn;N;9,2;
^W4REP("W4DCSR","REP","H",6)
ZIC;miekif;N;8,2;
^W4REP("W4DCSR","REP","H",7)
BTL;milehia;N;8,2;
^W4REP("W4DCSR","REP","H",8)
HNH;zegpd;N;8,2;
^W4REP("W4DMLZ")
S4B
^W4REP("W4DMLZ","ASK","H",1)
MEDAT;jix`zn;D;
^W4REP("W4DMLZ","ASK","H",2)
ADDAT;jix`z cr;D;
^W4REP("W4DMLZ","ASK","H",3)
MESHAA;dryn;T;
^W4REP("W4DMLZ","ASK","H",4)
ADSHAA;dry cr;T;
^W4REP("W4DMLZ","ASK","H",5)
MESUGS;ogley beqn;E;SUGS;
^W4REP("W4DMLZ","ASK","H",6)
ADSUGS;ogley beq cr;E;SUGS
^W4REP("W4DMLZ","ASK","H",7)
SGR;2- itqk dxibq itl, 1 - mihixt zxikn itl;N;1;
^W4REP("W4DMLZ","HD","H")
mixvln g"ec
^W4REP("W4DMLZ","REP","H",1)
MLZ;xvln 'qn;E;5;
^W4REP("W4DMLZ","REP","H",2)
NAME;xvln my;H;14;
^W4REP("W4DMLZ","REP","H",3)
HZM;zepnfd;N;6;
^W4REP("W4DMLZ","REP","H",4)
PDN;zexikn;N;9,2;
^W4REP("W4DMLZ","REP","H",5)
SOAD;micreq;N;7,1;
^W4REP("W4DMLZ","REP","H",6)
AVR;creql rvenn;N;9,2;
^W4REP("W4DMLZ","REP","H",7)
TIP;mitih;N;8,2;
^W4REP("W4DMLZ","REP","H",8)
ZIC;miekif;N;8,2;
^W4REP("W4DMLZ","REP","H",9)
BTL;milehia;N;8,2;
^W4REP("W4DMLZ","REP","H",10)
HNH;zegpd;N;8,2;
^W4REP("W4DMLZ","REP","H",11)
CIBHNH;qeaiq zegpd;N;8,2;
^W4REP("W4REPPZM")
S4B
^W4REP("W4REPPZM","ASK","H",1)
METRH;jix`zn;D;
^W4REP("W4REPPZM","ASK","H",2)
ADTRH;jix`z cr;D;
^W4REP("W4REPPZM","ASK","H",3)
VD;2 - yenin jix`z itl, 1 - mievit ozn jix`z itl;N;1;
^W4REP("W4REPPZM","REP","H",1)
HZM;ievit dpnfd dfi` lr;E;12;
^W4REP("W4REPPZM","REP","H",1,"PROC")
CallIfr("w4ordvw.jsp?JB="+GetJB()+"&ORD="+ClearNum(this.innerHTML)+"&FIRST=1&VIEW=1&WIN=IFR","ifr",self,100,"90%","90%")
^W4REP("W4REPPZM","REP","H",2)
DATPZ;dpnfd jix`z;D;8;
^W4REP("W4REPPZM","REP","H",3)
MZMN;oinfnd my;E;10;
^W4REP("W4REPPZM","REP","H",4)
PELE;oinfn ly ciip;H;10;
^W4REP("W4REPPZM","REP","H",5)
CMPN;dxag;H;16;
^W4REP("W4REPPZM","REP","H",6)
CAUSE;daiq;H;16;
^W4REP("W4REPPZM","REP","H",7)
CONT;mievit okez;H;24;
^W4REP("W4REPPZM","REP","H",8)
AD;cr lirt;D;
^W4REP("W4REPPZM","REP","H",9)
HZMTS;yenin zpnfd;E;7;
^W4REP("W4REPPZM","REP","H",9,"PROC")
CallIfr("w4ordvw.jsp?JB="+GetJB()+"&ORD="+ClearNum(this.innerHTML)+"&FIRST=1&VIEW=1&WIN=IFR","ifr",self,100,"90%","90%")
^W4REP("W4REPPZM","REP","H",10)
DATTS;yenin jix`z;D;
^W4REP("W4REPTL1")
S4B
^W4REP("W4REPTL1","ASK","H",1)
METRH;jix`zn;D;
^W4REP("W4REPTL1","ASK","H",2)
ADTRH;jix`z cr;D;
^W4REP("W4REPTL1","ASK","H",3)
VD;2 - yenin jix`z itl, 1 - dyikx jix`z itl;N;1;
^W4REP("W4REPTL1","REP","H",1)
TL;yelz/dlaw 'qn;E;7;
^W4REP("W4REPTL1","REP","H",2)
HZMKN;dyikx zpnfd;E;7;
^W4REP("W4REPTL1","REP","H",2,"PROC")
CallIfr("w4ordvw.jsp?JB="+GetJB()+"&ORD="+ClearNum(this.innerHTML)+"&FIRST=1&VIEW=1&WIN=IFR","ifr",self,100,"90%","90%")
^W4REP("W4REPTL1","REP","H",3)
DATKN;jix`z;D;8;
^W4REP("W4REPTL1","REP","H",4)
LKH;mlynd 'qn;E;11;
^W4REP("W4REPTL1","REP","H",5)
LKH1;mlynd my;H;17;
^W4REP("W4REPTL1","REP","H",6)
RCP;inl;H;16;
^W4REP("W4REPTL1","REP","H",7)
SUMKN;mekq;N;8,2;
^W4REP("W4REPTL1","REP","H",8)
HZMTS;yenin zpnfd;E;7;
^W4REP("W4REPTL1","REP","H",8,"PROC")
CallIfr("w4ordvw.jsp?JB="+GetJB()+"&ORD="+ClearNum(this.innerHTML)+"&FIRST=1&VIEW=1&WIN=IFR","ifr",self,100,"90%","90%")
^W4REP("W4REPTL1","REP","H",9)
DATTS;yenin jix`z;D;
^W4REP("W4REPTL1","REP","H",10)
SUMTS;yenin mekq;N;8,2;
^W4REP("W4REPTL1","REP","H",11)
ODEFFROM;'qn yelzn scer;E;7
^W4REP("WMPREP")
S4B
^W4REP("WMPREP","ASK","H",1)
DAT1;jix`zn;D;
^W4REP("WMPREP","ASK","H",2)
DAT2;jix`z cr;D;
^W4REP("WMPREP","ASK","H",3)
VT;0 - minelyzd lk, 2 - dtwda minelyz , 1 - milibx melyz;N;1;
^W4REP("WMPREP","HD","H")
"qtihlen" iqihxka minelyz g"ec
^W4REP("WMPREP","REP","H",1)
DAT;jix`z;D;8;
^W4REP("WMPREP","REP","H",2)
HZM;dpnfd 'qn;H;7;
^W4REP("WMPREP","REP","H",2,"PROC")
CallIfr("w4ordvw.jsp?JB="+GetJB()+"&ORD="+ClearNum(this.innerHTML)+"&FIRST=1&VIEW=1&WIN=IFR","ifr",self,100,"90%","90%")
^W4REP("WMPREP","REP","H",3)
LKH;gewl 'qn;H;7;
^W4REP("WMPREP","REP","H",4)
LKH1;gewl my;H;7;
^W4REP("WMPREP","REP","H",5)
CARD;qihxk 'qn;E;16;
^W4REP("WMPREP","REP","H",6)
ASM;`zknq`;E;7;
^W4REP("WMPREP","REP","H",7)
SUM;dwqr mekq;N;8,2;
^W4REP("WMPREP","REP","H",8)
HNH;zillk zgpd;N;8,2;
^W4REP("WMPREP","REP","H",9)
HNHMPP;mihixtl dgpd;N;8,2;
^W4REP("WMPREP","REP","H",10)
SHUL;mley;N;8,2;
^W4REP("WMPREP","REP","H",11)
CRED1;meylz beq;H;7;
^W4REP("WTBREP")
S4B
^W4REP("WTBREP","ASK","H",1)
MEDAT;jix`zn;D;
^W4REP("WTBREP","ASK","H",2)
ADDAT;jix`z cr;D;
^W4REP("WTBREP","ASK","H",3)
VT;0 - zepnfdd lk, 2 - migelyn , 1 - dcrqn;N;1;
^W4REP("WTBREP","HD","H")
"qia oz" iqihxka minelyz g"ec
^W4REP("WTBREP","REP","H",1)
DAT;jix`z;D;8;
^W4REP("WTBREP","REP","H",2)
HZM;dpnfd 'qn;H;7;
^W4REP("WTBREP","REP","H",2,"PROC")
CallIfr("w4ordvw.jsp?JB="+GetJB()+"&ORD="+ClearNum(this.innerHTML)+"&FIRST=1&VIEW=1&WIN=IFR","ifr",self,100,"90%","90%")
^W4REP("WTBREP","REP","H",3)
CARD;qihxk 'qn;E;16;
^W4REP("WTBREP","REP","H",4)
ASM;`zknq`;E;9;
^W4REP("WTBREP","REP","H",5)
SUM;dwqr mekq;N;9,2;
^W4REP("WTBREP","REP","H",6)
HNHM;dcrqn zgpd;N;8,2;
^W4REP("WTBREP","REP","H",7)
SUMTB;qia oz aeig;N;8,2;
^W4REP("WTBREP","REP","H",8)
HNHT;qia oz zgpd;N;8,2;
^W4REP("WTBREP","REP","H",9)
SUMCA;`"ka aiieg;N;8,2;
^W4REP("WTBREP","REP","H",10)
SUMLK;gewl aeig;N;8,2;
^W4REPSCR

^W4REPSCR("CLKTOT")
CLKTOTREPORT;$$CHKPRM^W4CLKTOT;$$SCRN^W4CLKTOT;W4CLKTOT
^W4REPSCR("TBNOSF")
TBNOSF;$$CHKPRM^TBNOSF;$$SCRN^TBNOSF;TBNOSF
^W4REPSCR("TBNOTB")
TBNOTB;$$CHKPRM^TBNOTB;$$SCRN^TBNOTB;TBNOTB
^W4REPSCR("W4CLKTO1","GTR")
D TR^W4CLKTOT
^W4REPSCR("W4CLKTOT","GTR")
D TR^W4CLKTOT
^W4REPSCR("W4CPREP","GTR")
D TR^W4CPREP
^W4REPSCR("W4DCB")
RECEIPTESREPORT;$$CHKPRM^W4DCB;$$SCRN^W4DCB;W4DCB
^W4REPSCR("W4DCB","GTD",1)
D TD^W4DCB
^W4REPSCR("W4DCB","GTR")
D TR^W4DCB
^W4REPSCR("W4DHB")
INVOICESREPORT;$$CHKPRM^W4DHB;$$SCRN^W4DHB;W4DHB
^W4REPSCR("W4DHB","GTD",1)
D TD^W4DHB
^W4REPSCR("W4DHB","GTR")
D TR^W4DHB
^W4REPSCR("W4DHMK")
INVOICERECEIPTESREPORT;$$CHKPRM^W4DHMK;$$SCRN^W4DHMK;W4DHMK
^W4REPSCR("W4DHMK","GTD",1)
D TD^W4DHMK
^W4REPSCR("W4DHMK","GTR")
D TR^W4DHMK
^W4REPSCR("W4DITEMS")
ITEMSREPORT;$$CHKPRM^W4DP1;$$SCRN^W4DP1;W4DITEMS
^W4REPSCR("W4DMEAT")
MEATREPORT;$$CHKPRM^W4DMEAT;$$SCRN^W4DMEAT;W4DMEAT
^W4REPSCR("W4DPRTEN")
ITEMSENDEDREPORT;$$CHKPRM^W4DPRTEN;$$SCRN^W4DPRTEN;W4DPRTEN
^W4REPSCR("W4DTM")
DLVDOCSREPORT;$$CHKPRM^W4DTM;$$SCRN^W4DTM;W4DTM
^W4REPSCR("W4DTM","GTD",1)
D TD^W4DTM
^W4REPSCR("W4DTM","GTR")
D TR^W4DTM
^W4REPSCR("W4HIPUS")
FINDINGDOCUMENTS;$$CHKPRM^W4HIPUS;$$SCRN^W4HIPUS;W4HIPUS
^W4REPSCR("W4HIPUS","GTD",1)
D TD^W4HIPUS
^W4REPSCR("W4HIPUS","GTR")
D TR^W4HIPUS
^W4REPSCR("W4HIPUS1","GTD",1)
D TD^W4HIPUS
^W4REPSCR("W4HIPUS1","GTR")
D TR^W4HIPUS
^W4REPSCR("W4HZCA")
HZCAREPORT;$$CHKPRM^W4HZCA;$$SCRN^W4HZCA;W4HZCA
^W4REPSCR("W4HZCA","GTR")
D TR^W4HZCA
^W4REPSCR("W4LEVSPR")
PRESENTWORKERSREPORT;$$CHKPRM^W4LEVSPR;$$SCRN^W4LEVSPR;W4LEVSPR
^W4REPSCR("W4MLTNQ")
MLTNQREPORT;$$CHKPRM^W4MLTNQ;$$SCRN^W4MLTNQ;W4MLTNQ
^W4REPSCR("W4MLTNQ","GTR")
D TR^W4MLTNQ
^W4REPSCR("W4REPTL")
GIFTREPORT;$$CHKPRM^W4REPTL;$$SCRN^W4REPTL;W4REPTL
^W4REPSCR("W4REPTL","GTD",1)
D TDCB^W4REPTL
^W4REPSCR("W4REPTL","GTD",8)
D TDHZ^W4REPTL
^W4REPSCR("W4VCLREP")
VCLREPORT;$$CHKPRM^W4VCLREP;$$SCRN^W4VCLREP;W4VCLREP
^W4REPSCR("W4VCLREP","GTD",1)
D TD^W4VCLREP
^W4REPSCR("W4VCLREP","GTD",4)
D TD^W4VCLREP
^W4REPSCR("W4VCLREP","GTD",5)
D TD^W4VCLREP
^W4REPSCR("W4VCLREP","GTR")
D TR^W4VCLREP
^W4REPSCR("W4VCREP")
VCREPORT;$$CHKPRM^W4VCREP;$$SCRN^W4VCREP;W4VCREP
^W4REPSCR("W4VCREP","GTD",1)
D TD^W4VCREP
^W4REPSCR("W4VCREP","GTD",4)
D TD^W4VCREP
^W4REPSCR("W4VCREP","GTD",5)
D TD^W4VCREP
^W4REPSCR("W4VCREP","GTR")
D TR^W4VCREP
^W4SHVER

^W4SHVER("IS")

^W4SHVER("IS",0)
dpiwz dwqr
^W4SHVER("IS",1)
qihxk mxgd meqg
^W4SHVER("IS",2)
qihxk mxgd aepb 
^W4SHVER("IS",3)
i`xy`d zxagl xywzd
^W4SHVER("IS",4)
aexiq
^W4SHVER("IS",5)
qihxk mxgd siefn
^W4SHVER("IS",6)
mipiwz `l zedf zcerz e`/e CVV2
^W4SHVER("IS",7)
i`xy` zxagl xywzdl daeg
^W4SHVER("IS",8)
mineqg uaewl dyib gztn ziipaa dlwz
^W4SHVER("IS",9)
i`xy` zxagl xywzz,xywzdl gilvd `l
^W4SHVER("IS",10)
(ESC) lirtnd z`xed i"tr dwqted zipkez
^W4SHVER("IS",11)
d`iby
^W4SHVER("IS",12)
d`iby
^W4SHVER("IS",13)
d`iby
^W4SHVER("IS",14)
d`iby
^W4SHVER("IS",15)
ihpbn qtl clwedy xtqnd oia dn`zd oi`
^W4SHVER("IS",16)
d`iby
^W4SHVER("IS",17)
zepexg` zextq 4 eclwed `l
^W4SHVER("IS",18)
d`iby
^W4SHVER("IS",19)
mieez 16-n dxvw INT_IN uaewa dneyx
^W4SHVER("IS",20)
miiw `l (INT_IN) hlw uaew
^W4SHVER("IS",21)
dwqir lk xear xeyi`l dywa e` xeciy rva - okcern `l e` miiw `l (NEG) mineqg uaew
^W4SHVER("IS",22)
miiw `l mixhwee e` mixhnxt ivawn cg`
^W4SHVER("IS",23)
miiw `l (DATA) mikix`z uaew
^W4SHVER("IS",24)
miiw `l (START) legz` uaew
^W4SHVER("IS",25)
dwqir lk xear xeyi`l dywa e` xeciy rva - icn lecb mineqg zhilwa minia yxtd
^W4SHVER("IS",26)
dwqir lk xear xeyi`l dywa e`xeciy rva - icn lecb mineqg zhilwa zexec yxtd
^W4SHVER("IS",27)
cala dnizg zwqirk e` zipetlh dwqirk dwqir xcbd elek ihpbn qt qpked `l xy`k
^W4SHVER("IS",28)
wtq axk dcearl xcbend seqnl qpked `l ifkxn seqn xtqn
^W4SHVER("IS",29)
ahen axk dcearl xcbend sqenl qpked `l ahen xtqn
^W4SHVER("IS",30)
ahen 'qn/wtq 'qn clwede ahen ax/wtq axk okcern epi`y seqn
^W4SHVER("IS",31)
ahen 'qn mb clwede wtq axk okcern seqn
^W4SHVER("IS",32)
xcyl yi zepyi zerepz
^W4SHVER("IS",33)
oiwz `l qihxk
^W4SHVER("IS",34)
z`fk dwqirl xeyi` oi` e` df seqna rval i`yx `l qihxk
^W4SHVER("IS",35)
df i`xy` beq mr dwqir rval i`yx `l qihxk
^W4SHVER("IS",36)
swez bt
^W4SHVER("IS",37)
(minelyz 'qn letk reaw melyz) + oey`x melyz deey zeidl jixv dwqir k"dq - minelyza d`iby
^W4SHVER("IS",38)
iciin aeig qihxkl dxwz lrn dwqir rval ozip `l
^W4SHVER("IS",39)
dpiwz `l zxewia zxtiq
^W4SHVER("IS",40)
wtq 'qn mb clwed ahen axk okcerny seqn
^W4SHVER("IS",41)
(xywzdl xeq`) J1 e` J2 e` J3 likn hlwd uaew j` dxwz lrn
^W4SHVER("IS",42)
(xywzdl xeq`) J1 e` J2 e` J3 likn hlwd uaew j` wtqa meqg qihxk
^W4SHVER("IS",43)
(xywzdl xeq`) J1 e` J2 e` J3 likn hlwd uaew j` zi`xw`
^W4SHVER("IS",44)
(J5) likn hlwd uaew j` dwqir `ll xeyi` ywal i`yx `l seqn
^W4SHVER("IS",45)
(J6) likn hlwd uaew j` i`pernw znfeia xeyi` ywal i`yx `l seqn
^W4SHVER("IS",46)
(xywzdl xeq`) J1 e` J2 e` J3 likn hlwd uaew j` xeyi` ywal aiig seqn
^W4SHVER("IS",47)
(xywzdl xeq`) J1 e` J2 e` J3 likn hlwd uaew j`,iceq xtqn cilwdl aiig
^W4SHVER("IS",48)
d`iby
^W4SHVER("IS",49)
d`iby
^W4SHVER("IS",50)
daeyz oi`
^W4SHVER("IS",51)
oiwz `l akx xtqn
^W4SHVER("IS",52)
clwed `l wgxn cn
^W4SHVER("IS",53)
wlc zpgzk xcben `l seqn
^W4SHVER("IS",57)
zedf zcerz 'qn clwed `l 
^W4SHVER("IS",58)
CVV2 clwed `l
^W4SHVER("IS",59)
CVV2-de zedf zcerz 'qn eclwed `l
^W4SHVER("IS",60)
oexkifa hlw ipezp zlgzda `vnp `l ABS sexiv
^W4SHVER("IS",61)
miinrt `vnp e` `vnp `l qihxk xtqn
^W4SHVER("IS",62)
oiwz `l dwqir beq
^W4SHVER("IS",63)
oiwz `l dwqir cew
^W4SHVER("IS",64)
oiwz `l i`xy` beq
^W4SHVER("IS",65)
oiwz `l rahn
^W4SHVER("IS",66)
minelyzn dpey i`xy` beql reaw melyz e`/e oey`x melyz miiw
^W4SHVER("IS",67)
df yxec epi`y i`xy` beql minelyz xtqn miiw
^W4SHVER("IS",68)
minelyzn dpey i`xy` beql ccnl e` xlecl cinvdl ozip `l
^W4SHVER("IS",69)
icin xvw ihpbnd qtd jxe`
^W4SHVER("IS",70)
iceq xtqn zywdl xiykn xcben `l
^W4SHVER("IS",71)
iceq 'qn cilwdl daeg
^W4SHVER("IS",72)
ihpbn qihxk xard - oinf `l g"kw
^W4SHVER("IS",73)
g"kwa qihxk xiardl daeg
^W4SHVER("IS",74)
lerp qihxk - diigc
^W4SHVER("IS",75)
ie`xd onfa dniizqd `l g"kw mr dlert - diigc
^W4SHVER("IS",76)
zkxrna mixcben mpi` g"kwn elawzd xy` mipezp - diigc
^W4SHVER("IS",77)
ieby iceq xtqn ywed
^W4SHVER("IS",80)
mi`zn `l i`xy` beql "oecren cew" qpked
^W4SHVER("IS",99)
TRAN uaew geztl/aezkl/`exwl gilvn `l
^W4SHVER("IS",100)
iceq xtqn zywdl xiykn miiw `l
^W4SHVER("IS",101)
dcearl i`xy` zxagn xeyi` oi`
^W4SHVER("IS",106)
iciin aeiig i`xy`l `zli`y revial xey` oi` seqnl
^W4SHVER("IS",107)
ze`wqrd xtqna wlgl - icn lecb dwqrd mekq
^W4SHVER("IS",108)
zevle`n ze`wqir rval xeyi` oi` seqnl
^W4SHVER("IS",109)
587 zexyd cew mr qihxkl xeyi` oi` seqnl
^W4SHVER("IS",110)
iciin aeig qihxkl xeyi` oi` seqnl
^W4SHVER("IS",111)
minelyza dwqirl xeyi` oi` seqnl
^W4SHVER("IS",112)
minelyza cala dnizg/oetlh dwqirl xeyi` oi` seqnl
^W4SHVER("IS",113)
zipetlh dwqirl xeyi` oi` seqnl
^W4SHVER("IS",114)
"cala dnizg" dwqirl xeyi` oi` seqnl
^W4SHVER("IS",115)
mixleca dwqirl xeyi` oi` seqnl
^W4SHVER("IS",116)
oecren zwqrl xeyi` oi` seqnl
^W4SHVER("IS",117)
miliin/zecewp/miakek zwqrl xeyi` oi` seqnl
^W4SHVER("IS",118)
hicxw`xyi i`xy`l xeyi` oi` seqnl
^W4SHVER("IS",119)
hicxw qwn` i`xy`l xeyi` oi` seqnl
^W4SHVER("IS",120)
xlecl dcnvdl xeyi` oi` seqnl
^W4SHVER("IS",121)
ccnl dcnvdl xeyi` oi` seqnl
^W4SHVER("IS",122)
l"eg iqihxkl dcnvdl xeyi` oi` seqnl
^W4SHVER("IS",123)
df i`xy` beql miakek zwqrl xeyi` oi` seqnl
^W4SHVER("IS",124)
minelyza hicxw i`xy`l xeyi` oi` seqnl
^W4SHVER("IS",125)
minelyza hicxw i`xy`l xeyi` oi` seqnl
^W4SHVER("IS",126)
df oecren cewl xeyi` oi` seqnl
^W4SHVER("IS",127)
iciin aeig iqihxkl hxt iciin aeig zwqrl xeyi` oi` seqnl
^W4SHVER("IS",128)
3 - a miligzn xy` dfie iqihxk lawl xeyi` oi` seqnl
^W4SHVER("IS",129)
dxwz lrn zekf zwqr rval xeyi` oi` seqnl
^W4SHVER("IS",130)
oecren zwqr rval i`yx `l qihxk
^W4SHVER("IS",131)
miakek zwqr rval i`yx `l qihxk
^W4SHVER("IS",132)
mixleca ze`wqr rval i`yx `l qihxk
^W4SHVER("IS",133)
hk`xyxi ly mitwz miqihxk zniyx it lr oiwz `l qihxk
^W4SHVER("IS",134)
ieby- qihxka zextqd xtqn-(hxk`xyi ly VECTOR1) zkxrnd zxcbd it lr oiwz `l qihxk
^W4SHVER("IS",135)
(hxk`xyi ly VECTOR1) zkxrnd zxcbd it lr zeixlec ze`wqr rval iy`x `l qihxk
^W4SHVER("IS",136)
(dfie ly VECTOR20) zkxrnd zxcbd it lr ze`wqr rval zi`yx dpi` xy` miqihxk zveawl jiiy qihxkd
^W4SHVER("IS",137)
(qxpiic ly VECTOR21) zkxrnd zxcbd it lr dtwz `l (zextq 7) qihxkd zneciw
^W4SHVER("IS",138)
hxk`xyi ly mitwz miqihxk zniyx it lr minelyza ze`wqr rval i`yx `l qihxk
^W4SHVER("IS",139)
hxk`xyi ly mitwz miqihxk zniyx it lr icn lecb minelyz xtqn
^W4SHVER("IS",140)
minelyza oecren ze`wqr rval mi`yx `l qxpiice dfie iqihxk
^W4SHVER("IS",141)
(hxk`xyi ly VECTOR5) zkxrnd zxcbd it lr dtwz `l miqihxk zxciq
^W4SHVER("IS",142)
(hxk`xyi ly VECTOR6) zkxrnd zxcbd it lr swz `l zexy cew
^W4SHVER("IS",143)
(hxk`xyi ly VECTOR7) zkxrnd zxcbd it lr dtwz `l(zextq 2) qihxkd zneciw
^W4SHVER("IS",144)
(dfie ly VECTOR12) zkxrnd zxcbd it lr swz `l zexy cew
^W4SHVER("IS",145)
(dfie ly VECTOR13) zkxrnd zxcbd it lr swz `l zexy cew
^W4SHVER("IS",146)
zekf zwqr rval xeq` iciin aeig qihxkl
^W4SHVER("IS",147)
`tl` ly 31 xehwee it lr minelyza ze`wqr rval i`yx `l qihxk
^W4SHVER("IS",148)
`tl` ly 31 xehwee it lr cala dnizge zeipetlh ze`wqr rval i`yx `l qihxk
^W4SHVER("IS",149)
`tl` ly 31 xehwee it lr zeipetlh ze`wqr rval i`yx epi` qihxk
^W4SHVER("IS",150)
iciin aeig iqihxkl xye`n `l i`xy`
^W4SHVER("IS",151)
l"eg iqihxkl xye`n `l i`xy`
^W4SHVER("IS",152)
oiwz `l oecren cew
^W4SHVER("IS",153)
(qxpiic ly VECTOR21) zkxrnd zxcbd it lr 30 sicr) yinb i`xy` ze`wqr rvali`yx `l qihxk
^W4SHVER("IS",154)
(qxpiic ly VECTOR21) zkxrnd zxcbd it lr iciin aeig ze`wqr rval i`yx `l qihxk
^W4SHVER("IS",155)
icin ohw hicxw zwqra melyzl mekq
^W4SHVER("IS",156)
oiwz `l hicxw zwqrl minelyz xtqn
^W4SHVER("IS",157)
hicxw e` libx i`xy` mr dwqira df qihxk beql 0 dxwz
^W4SHVER("IS",158)
iciin aeig i`xy` mr zwqra df qihxk beql 0 dxwz
^W4SHVER("IS",159)
mixleca iciin aeig dwqira df qihxk beql 0 dxwz
^W4SHVER("IS",160)
zipetlh zwqra df qihxk beql 0 dxwz
^W4SHVER("IS",161)
zekf zwqra df qihxk beql 0 dxwz 
^W4SHVER("IS",162)
minelyz zwqra df qihxk beql 0 dxwz
^W4SHVER("IS",163)
minelyza ze`wqr rval i`yx `l l"ega wtped xy`qxtqw` owixn` qihxk
^W4SHVER("IS",164)
libx i`xy`a wx ze`wqr rval i`yx JCB iqihxk
^W4SHVER("IS",165)
dwqird mekqn lecb miakeka mekq
^W4SHVER("IS",166)
seqnd ly megza `l oecren qihxk
^W4SHVER("IS",167)
mixleca miakek zwqr rval ozip `l
^W4SHVER("IS",168)
df i`xy` beq mr mixleca dwqir rval ozip `l
^W4SHVER("IS",169)
libxdn dpey i`xy` mr zekf zwqr rval ozip `l
^W4SHVER("IS",170)
xzendn lecb miakeka dgpd mekq
^W4SHVER("IS",171)
iciin aeig i`xy`/qihxkl zvle`n dwqir rval ozip `l
^W4SHVER("IS",172)
(ddf epi` qihxk xtqn e` zekf zwqir) zncew dwqir lhal ozip `l
^W4SHVER("IS",173)
dletk dwqir
^W4SHVER("IS",174)
df i`xy`l ccnl dcnvdl xeyi` oi` seqnl
^W4SHVER("IS",175)
df i`xy`l xlecl dcnvdl xeyi` oi` seqnl
^W4SHVER("IS",176)
(hxk`xyi ly 1 xehwe) zkxrnd zxcbd it lr swz epi` qihxk
^W4SHVER("IS",177)
"wlc zepgzainvr zexy" `l` "invr zexiy" rval ozip `l wlc zepgza
^W4SHVER("IS",178)
miliin/zecewp/miakeka zekf zwqr rval xeq`
^W4SHVER("IS",179)
xiiz qihxka xleca zekf zwqr rval xeq`
^W4SHVER("IS",180)
zipetlh dwqr rval ozip `l oecren qihxka
^W4SHVER("IS",200)
zineyii d`iby
^W4SHVER("IS",257)
xeciyl zerepz oi`
^W4SHVER("IS",999)
zxeywza d`iby
^W4SP

^W4SP("LEVHAG","GET")
D GET^W4LEVHAG
^W4SP("LEVHAG","PUT")
D SAVE^W4LEVHAG
^W4SP("LEVHAG","SAVE")
D PUT^W4LEVHAG(PRM)
^W4SP("PARSUG","GET",1)
$$GETLZ^W4PARSUG(N)
^W4SP("PARSUG","GET",2)
$$GETDEP^W4PARSUG(N)
^W4SP("PARSUG","GET",3)
$$GETBG^W4PARSUG(N)
^W4SP("PARSUG","GET",4)
$$GETFG^W4PARSUG(N)
^W4SP("PARSUG","GET",5)
$$GETDG^W4PARSUG(N)
^W4SP("PARSUG","GET",6)
$$GET^W4PARSUG(N)
^W4SP("PARSUG","GET",7)
$$GETMN^W4PARSUG(N)
^W4SP("PARSUG","PUT",1)
D PUTLZ^W4PARSUG(CD,NM)
^W4SP("PARSUG","PUT",2)
D PUTDEP^W4PARSUG(CD,NM)
^W4SP("PARSUG","PUT",3)
D PUTBG^W4PARSUG(CD,NM)
^W4SP("PARSUG","PUT",4)
D PUTFG^W4PARSUG(CD,NM)
^W4SP("PARSUG","PUT",5)
D PUTDG^W4PARSUG(CD,NM)
^W4SP("PARSUG","PUT",6)
D PUT^W4PARSUG(CD,NM)
^W4SP("PARSUG","PUT",7)
D PUTMN^W4PARSUG(CD,NM)
^W4SP("SHULHAN","GET",1)
$$SUGL^W4L(N)
^W4SP("SHULHAN","GET",2)
$$AH^W4L(N)
^W4SP("SHULHAN","PUT",1)
D SHULHAN1^W4SPIDK(CD,NM)
^W4SP("SHULHAN","PUT",2)
D SHULHAN2^W4SPIDK(CD,NM)
^W4SP("SHULHAN","PUT",5)
S @$$^W4GL("W3SUG")@(CD)=NM
^W4SP("TMPGRT","GET")
D GET^W4POSGRT
^W4SP("TMPGRT","PUT")
D PUT^W4POSGRT
^W4SP("W3PLCPRM","GET")
D GETPLCPRM^W4SPIDK
^W4SP("W3PLCPRM","GET",0)
$$MSD^W3R(N)
^W4SP("W3PLCPRM","GET",0,"OU")
1
^W4SP("W3PLCPRM","NODEL")
1
^W4SP("W3PLCPRM","PUT")
D PUTPLCPRM^W4SPIDK
^W4SP("W4ACNT","GET")
D GETACNT^W4SPIDK
^W4SP("W4ACNT","PUT")
D SAVEACNT^W4SPIDK
^W4SP("W4ACNT","SAVE")
D PUTACNT^W4SPIDK(PRM)
^W4SP("W4ASHMGR","GET")
D GET^W4ASHMGR
^W4SP("W4COUPPH","GET")
D GET^W4COUPPH
^W4SP("W4CSRPRM","GET")
D GET^W4CSRPRM
^W4SP("W4DEV","GET")
D GET^W4DEV
^W4SP("W4DEV","PUT")
D PUT^W4DEV
^W4SP("W4ESEK","GET")
D GET^W4ESEK
^W4SP("W4KSHCSH","GET")
D GET^W4KSHCSH
^W4SP("W4LEVTB","GET",0)
$$^W4NAME(N)
^W4SP("W4LEVTB","GET",0,"OU")
""
^W4SP("W4LEVTB","GET",1)
$P($G(@$$^W4GL("NAME")@(N)),"\")
^W4SP("W4LEVTB","GET",2)
$P($G(@$$^W4GL("NAME")@(N)),"\",2)
^W4SP("W4LEVTB","GET",3)
$$GET1^W4LEVPR(N,"MTIP")
^W4SP("W4LEVTB","GET",4)
$$GET1^W4LEVPR(N,"PAIL")
^W4SP("W4LEVTB","GET",5)
$$GET1^W4LEVPR(N,"MAKESURE")
^W4SP("W4LEVTB","SAVE")
D SAVELEVTB^W4SPIDK(PRM)
^W4SP("W4LKHACM","GET")
D GET^W4LKHACM
^W4SP("W4LKHACM","HEADFUNC")
D HEADFUNC^W4LKHACM
^W4SP("W4LKHACM","PUT")
D SAVEND^W4LKHACM
^W4SP("W4LKHMGR","GET")
D GET^W4LKHMGR
^W4SP("W4LKHPRM","GET")
D GET^W4LKHPRM
^W4SP("W4LKHSRV","GET")
D GET^W4LKHSRV
^W4SP("W4LMTHR","GET")
D GET^W4LMTHR
^W4SP("W4MDP","GET")
D GETMDP^W4SPIDK
^W4SP("W4MDP","PUT")
D MDP^W4SPIDK
^W4SP("W4MDPH","GET")
D GETMDPH^W4SPIDK
^W4SP("W4MDPH","PUT")
D MDPH^W4SPIDK
^W4SP("W4MDPH1","GET")
D GETMDPH^W4SPIDK
^W4SP("W4MDPH1","PUT")
D MDPH^W4SPIDK
^W4SP("W4MDPK","GET")
D GETMDPK^W4SPIDK
^W4SP("W4MDPK","PUT")
D MDPK^W4SPIDK
^W4SP("W4MLOPRM","GET")
D GET^W4MLOPRM
^W4SP("W4MNSIS","GET")
D GET^W4MNSIS
^W4SP("W4MNSIS","PUT")
D PUT^W4MNSIS
^W4SP("W4MRK","GET")
D GET^W4MRK
^W4SP("W4MRK","PUT")
D SAVE^W4MRK
^W4SP("W4MRKMAN","GET")
D GETPRM^W4MRKMAN
^W4SP("W4MVC1","GET")
D GET^W4MVC1
^W4SP("W4MVC1","PUT")
D SAVEND^W4MVC1
^W4SP("W4MVC11","GET")
D GET^W4MVC11
^W4SP("W4MVC11","PUT")
D SAVEND^W4MVC11
^W4SP("W4MVC3","GET")
D GET^W4MVC3
^W4SP("W4MVC3","PUT")
D SAVEND^W4MVC3
^W4SP("W4MVC4","GET",0)
$$SHEM^W4P(N)
^W4SP("W4MVC4","GET",0,"OU")
1
^W4SP("W4MVC4","GET",1)
$$GETMAX^W4MVC4(N)
^W4SP("W4MVC4","GET",2)
$$GETMEDAT^W4MVC4(N)
^W4SP("W4MVC4","GET",3)
$$GETADDAT^W4MVC4(N)
^W4SP("W4MVC4","SAVE")
D SAVE^W4MVC4(PRM)
^W4SP("W4MVC5","GET",0)
$$GETNM^W4MVC5(N)
^W4SP("W4MVC5","GET",1)
$$GETSET^W4MVC5(N)
^W4SP("W4MVC5","GET",2)
$$GETMH^W4MVC5(N)
^W4SP("W4MVC5","GET",3)
$$GETMAX^W4MVC5(N)
^W4SP("W4MVC5","GET",4)
$$GETMEDAT^W4MVC5(N)
^W4SP("W4MVC5","GET",5)
$$GETADDAT^W4MVC5(N)
^W4SP("W4MVC5","SAVE")
D SAVE^W4MVC5(PRM)
^W4SP("W4MVCAH","GET")
D GET^W4MVCAH
^W4SP("W4MVCAH","PUT")
D SAVEND^W4MVCAH
^W4SP("W4ORDPLC","GET")
D GET^W4ORDPLC
^W4SP("W4ORDPLC","PUT")
D PUT^W4ORDPLC
^W4SP("W4ORDTRT","GET")
D GET^W4ORDTRT
^W4SP("W4ORDTRT","PUT")
D PUT^W4ORDTRT
^W4SP("W4OUTPRM","GET")
D GET^W4OUTPRM
^W4SP("W4POSMSK","GET")
D GETPOSMSK^W4SPIDK
^W4SP("W4POSMSK","PUT")
D PUTPOSMSK^W4SPIDK
^W4SP("W4PRMADM","GET")
D GET^W4PRMADM
^W4SP("W4PRMAIL","GET")
D GET^W4PRMAIL
^W4SP("W4PRMBON","GET")
D GET^W4PRMBON
^W4SP("W4PRMD","GET")
D GET^W4PRMD
^W4SP("W4PRMDA","GET")
D GET^W4PRMDA
^W4SP("W4PRMGEN","GET")
D GET^W4PRMGEN
^W4SP("W4PRMGN1","GET")
D ^W4PRMGN("W4PRMGN1")
^W4SP("W4PRMGN2","GET")
D ^W4PRMGN("W4PRMGN2")
^W4SP("W4PRMGN3","GET")
D ^W4PRMGN("W4PRMGN3")
^W4SP("W4PRMGN4","GET")
D ^W4PRMGN("W4PRMGN4")
^W4SP("W4PRMHDP","GET")
D GET^W4PRMHDP
^W4SP("W4PRMHMS","GET")
D GET^W4PRMHMS
^W4SP("W4PRMHSV","GET")
D GET^W4PRMHSV
^W4SP("W4PRMHTN","GET")
D GET^W4PRMHTN
^W4SP("W4PRMHZG","GET")
D GET^W4PRMHZG
^W4SP("W4PRMMAP","GET")
D GET^W4PRMMAP
^W4SP("W4PRMMSD","GET")
D GET^W4PRMMSD
^W4SP("W4PRMMSL","GET")
D GET^W4PRMMSL
^W4SP("W4PRMPC","GET")
D GET^W4PRMPC
^W4SP("W4PRMPC1","GET")
D ^W4PRMPC("W4PRMPC1")
^W4SP("W4PRMPC2","GET")
D ^W4PRMPC("W4PRMPC2")
^W4SP("W4PRMPC3","GET")
D ^W4PRMPC("W4PRMPC3")
^W4SP("W4PRMPC4","GET")
D ^W4PRMPC("W4PRMPC4")
^W4SP("W4PRMTD","GET")
D GET^W4PRMTD
^W4SP("W4PRMTLM","GET")
D GET^W4PRMTLM
^W4SP("W4PRMTRC","GET")
D GET^W4PRMTRC
^W4SP("W4PRMTV","GET")
D GET^W4PRMTV
^W4SP("W4PRMWEB","GET")
D GET^W4PRMWEB
^W4SP("W4PRMZSM","GET")
D GET^W4PRMZSM
^W4SP("W4PSWASH","GET")
D GET^W4PSWASH
^W4SP("W4PSWDRG","GET",0)
$$^W4NAME(N)
^W4SP("W4PSWDRG","GET",0,"OU")
""
^W4SP("W4PSWDRG","GET",1)
$$H2U^%L1FRM($$SUG1^W4LEVSUG(N))
^W4SP("W4PSWDRG","GET",1,"OU")
""
^W4SP("W4PSWDRG","GET",2)
$$GET1^W4LEVPR(N,"PAIL")
^W4SP("W4PSWDRG","GET",2,"OU")
""
^W4SP("W4PSWDRG","GET",3)
$$GET^W4PSWDRG(N,"LEVEL")
^W4SP("W4PSWDRG","GET",4)
$$GET^W4PSWDRG(N,"PASSWORD")
^W4SP("W4PSWDRG","PUT",3)
D PUT^W4PSWDRG(CD,"LEVEL",NM)
^W4SP("W4PSWDRG","PUT",4)
D PUT^W4PSWDRG(CD,"PASSWORD",NM)
^W4SP("W4RSTPRM","GET")
D GET^W4RSTPRM
^W4SP("W4SNOU1","GET")
D GETPRM^W4SNOU1
^W4SP("W4SPKACM","GET")
D GET^W4SPKACM
^W4SP("W4SPKACM","HEADFUNC")
D HEADFUNC^W4SPKACM
^W4SP("W4SPKACM","PUT")
D SAVEND^W4SPKACM
^W4SP("W4TBMNL","GET",1)
$$^W4NAME(N)
^W4SP("W4TBMNL","GET",1,"OU")
""
^W4SP("W4TBSLR","COND")
D COND^W4TBSLR(N)
^W4SP("W4TBSLR","GET",0)
$$^W4NAME(N)
^W4SP("W4TBSLR","GET",0,"OU")
""
^W4SP("W4TBSLR","GET",1)
$$GETPAIL^W4TBSLR(N)
^W4SP("W4TBSLR","GET",1,"OU")
""
^W4SP("W4TBSLR","GET",2)
$$GET1^W4LEVPR(N,"TFK")
^W4SP("W4TBSLR","GET",2,"OU")
""
^W4SP("W4TBSLR","GET",3)
$$GET1^W4LEVPR(N,"DATS")
^W4SP("W4TBSLR","GET",3,"OU")
""
^W4SP("W4TBSLR","GET",4)
$$GET1^W4LEVPR(N,"AHPENS")
^W4SP("W4TBSLR","GET",5)
$$GET1^W4TBSLR(N)
^W4SP("W4TBSLR","GET",6)
$$GET2^W4TBSLR(N)
^W4SP("W4TBSLR","GET",7)
$$GET3^W4TBSLR(N)
^W4SP("W4TBSLR","GET",8)
$$GET4^W4TBSLR(N)
^W4SP("W4TBSLR","HEADFUNC")
D HEADFUNC^W4TBSLR
^W4SP("W4TBSLR","NODEL")

^W4SP("W4TBSLR","PUT",4)
D PUT1^W4LEVPR(CD,"AHPENS",NM)
^W4SP("W4TBSLR","PUT",5)
D PUT1^W4TBSLR(CD,NM)
^W4SP("W4TBSLR","PUT",6)
D PUT2^W4TBSLR(CD,NM)
^W4SP("W4TBSLR","PUT",7)
D PUT3^W4TBSLR(CD,NM)
^W4SP("W4TBSLR","PUT",8)
D PUT4^W4TBSLR(CD,NM)
^W4SP("W4TBSLR","PUTMUST")

^W4SP("W4TBSLR","SETPRM")
D SETPRM^W4TBSLR
^W4SP("W4ZOOMIN","GET")
D GET^W4ZOOMIN
^W4SP("WBLKH","GET")
D GET^WBLKH
^W4SP("WBLKH","PUT")
D SAVE^WBLKH
^W4SP("WBPRM","GET")
D GET^WBPRM
^W4SP("WCSETUP","GET")
D GET^WCSETUP
^W4SP("WMCSETUP","GET")
D GET^WMCSETUP
^W4SP("WMSETUP","GET")
D GET^WMSETUP
^W4SP("WTBINIT","GET")
D GET^WTBINIT
^W4SP("WVSETUP","GET")
D GET^WVSETUP
^W4SUGH

^W4SUGH(1)
y 'aygl dgpd
^W4SUGH(2)
% 'aygl dgpd
^W4SUGH(3)
gewll dgpd
^W4SUGH(4)
oeayg lebir
^W4SUGH(5)
hixtl dgpd
^W4SUGH(6)
OTH dgpd
^W4SUGH(7)
dry itl dgpd
^W4SUGH(9)
rvan zgpd
^W4TAB("W4PRMGN",1)
GENERALPARAMETERS;w4prmgn1.jsp
^W4TAB("W4PRMGN",2)
PAYMPARAMETERS;w4prmgn2.jsp
^W4TAB("W4PRMGN",3)
ORDERPROCESSPARAMETERS;w4prmgn3.jsp
^W4TAB("W4PRMGN",4)
DELDISCPARAMETERS;w4prmgn4.jsp
^W4TAB("W4PRMPC",1)
BONPARAMETERSDEFINITION;w4prmpc1.jsp
^W4TAB("W4PRMPC",2)
CSRPARAMETERSDEFINITION;w4prmpc2.jsp
^W4TAB("W4PRMPC",3)
BIGPRINTPARAMETERSDEFINITION;w4prmpc3.jsp
^W4TAB("W4PRMPC",4)
DLVPRINTPARAMETERS;w4prmpc4.jsp
^W4VDHB(1)
zfkxn
^W4VDHB(2)
zipci
^W4VDHB(3)
iekif
^W4VWGR(1)
bivdl
^W4VWGR(2)
bivdl `l 
^W4VWGR(3)
dcrqn hixtza wx
^W4VWGR(4)
migelyn hixtza wx
^W4ZOOM(12)

^W4ZOOM(13)

^W4ZOOM(14)

^W4ZOOM(15)

^W4ZOOM(16)

^W4ZOOM(17)

^W4ZOOM(18)

^W4ZOOM(19)

^WO1P("DIR")
OPENFRMT/51688182.25/03191720/
^WO1P("DIR0")
/home/gtmuser/app/tomcat/webapps/mumps-examples/jsp/1/
^WO1P("DIRW")
./1/
^WO1P("DT1")
67283
^WO1P("DT2")
67283
^WO1P("DTBG")
67283
^WO1P("HP")
516881828
^WO1P("NMDOC","A100")
1
^WO1P("NP")
1
^WO1P("TMBG")
17:20
^WO1P("TO")

^WO1VM

^WO1VM(100)
dpnfd
^WO1VM(200)
gelyn zcerz
^WO1VM(210)
dxfgd zcerz
^WO1VM(300)
dwqr zipeayg/zipeayg
^WO1VM(305)
qn zipeayg
^WO1VM(310)
fekix zipeayg
^WO1VM(320)
dlaw qn zipeayg
^WO1VM(330)
iekif qn zipeayg
^WO1VM(340)
oeixy zipeayg
^WO1VM(400)
dlaw
^WO1VM(405)
zenexz lr dlaw
^WO1VM(410)
dtewn d`ivi
^WO1VM(420)
wpa zcwtd
^WO1VM(500)
ykx zpnfd
^WO1VM(600)
ygx gelyn zcerz
^WO1VM(610)
ykx zxfgd
^WO1VM(700)
ykx qn zipeayg
^WO1VM(710)
ykx iekif
^WO1VM(800)
dgizt zxzi
^WO1VM(810)
i`lnl zillk dqipk
^WO1VM(820)
i`lndn zillk d`ivi
^WO1VM(830)
mipqgn oia dxard
^WO1VM(840)
dxitq zeawra oekcr
^WO1VM(900)
dqipk xevii g""ec
^WO1VM(910)
d`ivi xevii g""ec
^ZT
U $P N $ZT S $ZT="",^er(+$H)=$ZS_"|"_$ZPOS I $ZS'["CTRAP"!$D(^DEB("CTRAP")) U $P D:'$D(%CLI) ^%L1C W #,$ZS,!! ZSHOW "S" W !,%CLI,$ZPOS,%CCL,! ZP @$ZPOS X ^ZT(1) 
^ZT(1)
S zp=$O(^er(+$H,$P,"")) S:+zp=0 zp=1000 X:$P($ZS,",",2)'["^%L1X" ^ZT(2)
^ZT(2)
S (^ZE($P),^er(+$H,$P,zp-1))=$P($ZS,",",2)_"~"_$P($ZS,",",4)_"~"_$G(zr) X ^ZT(3) ;;X:$G(^S2VDB) ^ZT(5)
^ZT(3)
ZSHOW "S":^er(+$H,$P,zp-1) X ^ZT(4) I $D(^DEB("ZHOWV")) ZSHOW "V":^er(+$H,$P,zp-1)
^ZT(4)
I $D(zr)#2 S ^er(+$H,$P,zp-1,"R")=zr
^ZT(5)
O "S2VFIFO":FIFO U "S2VFIFO" W $ZPOS,! U $P
^rep
mixvln itl mihixt g"ec
^rep("AH")
zegex` g"ec
^rep("AH",0,"OVED")
caer;5.
^rep("AH",0,"OVED","FILE")
^NAME
^rep("AH",0,"OVED","M2")
S OVED1=$G(^NAME(OVED,1))
^rep("AH",0,"OVED","OUT")
OVED1
^rep("AH",0,"OVED","SET")
1
^rep("AH",0,"OVED1")
caer my;12H
^rep("AH",0,"OVED1","SET")
0
^rep("AH",0,"OVED1","SH")
1
^rep("AH",0,"SUG")
dgex` beq;10H
^rep("AH",0,"SUG","SET")
0
^rep("AH",0,"SUG","SH")
1
^rep("AH",0,"TRH")
jix`z;8D
^rep("AH",0,"TRH","SET")
0
^rep("AH",0,"TRH","SH")
1
^rep("AH",0,"x1")
zenk;5,0
^rep("AH",0,"x2")
;,
^rep("AH","COD")
TRH*OVED*OVED1*SUG*x1
^rep("AH","CT")
0*0*0
^rep("AH","FLD")
TRH*OVED*SUG*x1
^rep("AH","FLD0")

^rep("AH","GLOB1")
^AH
^rep("AH","GLOB2")
^AH(OVED,DT,IND)
^rep("AH","LPT")
B
^rep("AH","MIUN")
2*1*3
^rep("AH","QUERY","micaer itl g""ec","CT")
0*0*0
^rep("AH","QUERY","micaer itl g""ec","FLD0")

^rep("AH","QUERY","micaer itl g""ec","MIUN")
2*1*3
^rep("AH","QUERY","micaer itl g""ec","SIK0")
0*1*0
^rep("AH","QUERY","mikix`z itl g""ec","CT")
0*0*0
^rep("AH","QUERY","mikix`z itl g""ec","FLD0")

^rep("AH","QUERY","mikix`z itl g""ec","MIUN")
1*2*3
^rep("AH","QUERY","mikix`z itl g""ec","SIK0")
1*0*0
^rep("AH","SIK")
1*
^rep("AH","SIK0")
0*1*0
^rep("AH","US",2)
S TRH=$$^%L1DC(DT,1)
^rep("AH","US",3)
S SUG=$G(^AHSUG(IND)),x1=1
^rep("BIT")
mihixt milehia g"ec
^rep("BIT",0,"HB")
zipeayg;8
^rep("BIT",0,"HZM")
dpnfd;7
^rep("BIT",0,"HZM","SH")
1
^rep("BIT",0,"LKH")
gewl 'qn;10
^rep("BIT",0,"LKH","FILE")
^LKH
^rep("BIT",0,"LKH","OUT")
LKH1
^rep("BIT",0,"LKH1")
gewl my;20H
^rep("BIT",0,"NAME")
gewl my;12H
^rep("BIT",0,"NAME","SH")
1
^rep("BIT",0,"NCAB")
zipeayg;6
^rep("BIT",0,"NCAB","SH")
0
^rep("BIT",0,"NMB")
gewl xtqn;10
^rep("BIT",0,"NMB","FILE")
^LKH
^rep("BIT",0,"NMB","OUT")
NAME
^rep("BIT",0,"PAR")
hixt 'qn;8
^rep("BIT",0,"PAR","FILE")
^PAR
^rep("BIT",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("BIT",0,"PAR","OUT")
PAR1
^rep("BIT",0,"PAR1")
hixt xe`z;16H
^rep("BIT",0,"PAR1","SH")
1
^rep("BIT",0,"PSL")
gily cew;3
^rep("BIT",0,"PSL","FILE")
^P1SL
^rep("BIT",0,"PSL","OUT")
PSL1
^rep("BIT",0,"PSL1")
gily my;10H
^rep("BIT",0,"PSL1","SH")
1
^rep("BIT",0,"SHAA")
dryl;5
^rep("BIT",0,"SHAA","SH")
1
^rep("BIT",0,"SL")
gily cew;5
^rep("BIT",0,"SL","FILE")
^P1SL
^rep("BIT",0,"SL","OUT")
SL1
^rep("BIT",0,"SL1")
gily my;12H
^rep("BIT",0,"SUGT")
melyz beq;5
^rep("BIT",0,"SUGT","SH")
1
^rep("BIT",0,"TRH")
jix`z;8D
^rep("BIT",0,"TRH","M2")
S TRH=$$^%L1DC(DT,1)
^rep("BIT",0,"TRH","SH")
1
^rep("BIT",0,"TS")
melyzl;8
^rep("BIT",0,"TSHL")
melyzl;8
^rep("BIT",0,"TSHL","OUT")
TSHL
^rep("BIT",0,"x1")
lhea;4,0
^rep("BIT",0,"x2")
mekqa;8,2
^rep("BIT",0,"x3")
;,
^rep("BIT","COD")
TRH*SHAA*HZM*PAR*PAR1*x1*x2
^rep("BIT","CT")
0*0*0*0*0*0
^rep("BIT","FLD")
TRH*SHAA*HZM*PAR*x1*x2
^rep("BIT","FLD0")
*-*-***
^rep("BIT","GLOB1")
^VRM($J)
^rep("BIT","GLOB2")
^VRM($J,DT,SHAA,HZM,PAR)
^rep("BIT","LPT")
B
^rep("BIT","MIUN")
1*3*1*2*0*0
^rep("BIT","MIUN","PROG")
TRH^P1DPBIT
^rep("BIT","QUERY","(gahndn e`vi `ly mihixt itl) fkexn","CT")
0*0*0*0*0*0
^rep("BIT","QUERY","(gahndn e`vi `ly mihixt itl) fkexn","FLD0")
*-*-***
^rep("BIT","QUERY","(gahndn e`vi `ly mihixt itl) fkexn","MIUN")
1*3*1*2*0*0
^rep("BIT","QUERY","(gahndn e`vi `ly mihixt itl) fkexn","SIK0")
1*0*0*0*0*0
^rep("BIT","QUERY","(gahndn e`vi `ly mihixt itl) hxetn","CT")
0*0*0*0*0*0
^rep("BIT","QUERY","(gahndn e`vi `ly mihixt itl) hxetn","FLD0")
*****
^rep("BIT","QUERY","(gahndn e`vi `ly mihixt itl) hxetn","MIUN")
2*4*3*1*0*0
^rep("BIT","QUERY","(gahndn e`vi `ly mihixt itl) hxetn","SIK0")
0*0*0*1*0*0
^rep("BIT","QUERY","(gahndn e`viy mihixt itl) fkexn","CT")
0*0*0*0*0*0
^rep("BIT","QUERY","(gahndn e`viy mihixt itl) fkexn","FLD0")
*-*-***
^rep("BIT","QUERY","(gahndn e`viy mihixt itl) fkexn","MIUN")
1*3*1*2*0*0
^rep("BIT","QUERY","(gahndn e`viy mihixt itl) fkexn","SIK0")
1*0*0*0*0*0
^rep("BIT","QUERY","(gahndn e`viy mihixt itl) hxetn","CT")
0*0*0*0*0*0
^rep("BIT","QUERY","(gahndn e`viy mihixt itl) hxetn","FLD0")
*****
^rep("BIT","QUERY","(gahndn e`viy mihixt itl) hxetn","MIUN")
2*4*3*1*0*0
^rep("BIT","QUERY","(gahndn e`viy mihixt itl) hxetn","SIK0")
0*0*0*1*0*0
^rep("BIT","SHP","KOD")
P1HZH
^rep("BIT","SIK")
1*1*
^rep("BIT","SIK0")
1*0*0*0*0*0
^rep("BIT","US",2)
S TRH=$$^%L1DC(DT,1)
^rep("BIT","US",5)
D PAR^P1DPBIT
^rep("BITS")
zeaiq itl mihixt milehia g"ec
^rep("BITS",0,"HZM")
dpnfd;7
^rep("BITS",0,"HZM","SH")
1
^rep("BITS",0,"MLZR")
xvln;5
^rep("BITS",0,"MLZR","FILE")
^NAME
^rep("BITS",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^rep("BITS",0,"MLZR","OUT")
MLZR1
^rep("BITS",0,"MLZR1")
xvln my;10H
^rep("BITS",0,"MLZR1","SH")
1
^rep("BITS",0,"PAR")
hixt 'qn;8
^rep("BITS",0,"PAR","FILE")
^PAR
^rep("BITS",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("BITS",0,"PAR","OUT")
PAR1
^rep("BITS",0,"PAR1")
hixt xe`z;16H
^rep("BITS",0,"PAR1","SH")
1
^rep("BITS",0,"SHAA")
dryl;5
^rep("BITS",0,"SHAA","SH")
1
^rep("BITS",0,"SIBA")
daiq;4
^rep("BITS",0,"SIBA","FILE")
^P1SBIT
^rep("BITS",0,"SIBA","OUT")
SIBA1
^rep("BITS",0,"SIBA1")
daiq xe`z;10H
^rep("BITS",0,"SIBA1","SH")
1
^rep("BITS",0,"TRH")
jix`z;8D
^rep("BITS",0,"TRH","SH")
1
^rep("BITS",0,"x1")
lhea;4,0
^rep("BITS",0,"x2")
mekqa;8,2
^rep("BITS",0,"x3")
;,
^rep("BITS","COD")
SIBA1*MLZR*MLZR1*TRH*SHAA*HZM*PAR*PAR1*x1*x2
^rep("BITS","CT")
2*0*0*0*0*0
^rep("BITS","FLD")
SIBA1*MLZR*TRH*SHAA*HZM*PAR*x1*x2
^rep("BITS","FLD0")
*-**-****
^rep("BITS","GLOB1")
^VRM($J)
^rep("BITS","GLOB2")
^VRM($J,SIBA1,MLZR,DT,SHAA,HZM,PAR)
^rep("BITS","LPT")
B
^rep("BITS","MIUN")
1*2*3*2*4*2
^rep("BITS","MIUN","PROG")
TRH^P1DPBITS
^rep("BITS","QUERY","1.  hxetn mihixt itl zeaiq","CT")
2*0*0*0*0*0
^rep("BITS","QUERY","1.  hxetn mihixt itl zeaiq","FLD0")
*-**-****
^rep("BITS","QUERY","1.  hxetn mihixt itl zeaiq","MIUN")
1*2*3*2*4*2
^rep("BITS","QUERY","1.  hxetn mihixt itl zeaiq","SIK0")
1*0*0*0*0*1
^rep("BITS","QUERY","2.  fkexn mihixt itl zeaiq","CT")
0*0*0*0*0*0
^rep("BITS","QUERY","2.  fkexn mihixt itl zeaiq","FLD0")
*-*-*-*-***
^rep("BITS","QUERY","2.  fkexn mihixt itl zeaiq","MIUN")
1*2*3*2*4*2
^rep("BITS","QUERY","2.  fkexn mihixt itl zeaiq","SIK0")
1*0*0*0*0*1
^rep("BITS","QUERY","3.       mikix`z itl zeaiq","CT")
2*0*0*0*0*0
^rep("BITS","QUERY","3.       mikix`z itl zeaiq","FLD0")
*-**-****
^rep("BITS","QUERY","3.       mikix`z itl zeaiq","MIUN")
1*2*2*2*3*4
^rep("BITS","QUERY","3.       mikix`z itl zeaiq","SIK0")
1*0*0*0*0*1
^rep("BITS","QUERY","4.       zeaiq itl mikix`z","CT")
0*0*2*0*0*0
^rep("BITS","QUERY","4.       zeaiq itl mikix`z","FLD0")
*-**-****
^rep("BITS","QUERY","4.       zeaiq itl mikix`z","MIUN")
2*2*1*2*3*4
^rep("BITS","QUERY","4.       zeaiq itl mikix`z","SIK0")
1*0*1*0*0*1
^rep("BITS","QUERY","5.        mixvln itl zeaiq","CT")
2*0*0*0*0*0
^rep("BITS","QUERY","5.        mixvln itl zeaiq","FLD0")
***-****
^rep("BITS","QUERY","5.        mixvln itl zeaiq","MIUN")
1*2*3*2*4*5
^rep("BITS","QUERY","5.        mixvln itl zeaiq","SIK0")
1*1*0*0*0*0
^rep("BITS","QUERY","6.        zeaiq itl mixvln","CT")
2*1*0*0*0*0
^rep("BITS","QUERY","6.        zeaiq itl mixvln","FLD0")
***-****
^rep("BITS","QUERY","6.        zeaiq itl mixvln","MIUN")
2*1*3*2*4*5
^rep("BITS","QUERY","6.        zeaiq itl mixvln","SIK0")
1*1*1*0*0*0
^rep("BITS","SHP","KOD")
P1HZH
^rep("BITS","SHP","PROG")
S MAS(5)=$S($G(EXIT)=1:"gahndn e`viy mihixt",$G(EXIT)=2:"gahndn e`vi `ly mihixt",1:" mihixtd lk")_" itl g""ec"
^rep("BITS","SIK")
1*1*
^rep("BITS","SIK0")
1*0*0*0*0*1
^rep("BITS","US",4)
S TRH=$$^%L1DC(DT,1)
^rep("BITS","US",7)
D PAR^P1DPBITS
^rep("CHMA")
miwiy ihxt 
^rep("CHMA",0,"ASMA")
`zknq`;6
^rep("CHMA",0,"ASMA","SH")
1
^rep("CHMA",0,"BANK")
wpa;3
^rep("CHMA",0,"BANK","SH")
1
^rep("CHMA",0,"CHEK")
wiy 'qn;9
^rep("CHMA",0,"CHEK","SH")
1
^rep("CHMA",0,"DAT")
dlaw jix`z;8D
^rep("CHMA",0,"DAT","SH")
1
^rep("CHMA",0,"DATE")
dlaw jix`z;8D
^rep("CHMA",0,"HESH")
oeayg 'qn;10
^rep("CHMA",0,"HESH","SH")
1
^rep("CHMA",0,"LPR")
oerxtl;8D
^rep("CHMA",0,"LPR","SH")
1
^rep("CHMA",0,"SNIF")
sipq;4
^rep("CHMA",0,"SNIF","SH")
1
^rep("CHMA",0,"SUM")
mekq;7
^rep("CHMA",0,"TZ")
zedf 'qn;9
^rep("CHMA",0,"TZ","SH")
1
^rep("CHMA",0,"x1")
mekq;7,2
^rep("CHMA",0,"x2")
;,
^rep("CHMA","COD")
DAT*LPR*HESH*SNIF*BANK*CHEK*TZ*ASMA*x1
^rep("CHMA","CT")
0*0*0*0*0*0*0*0
^rep("CHMA","FLD")
DAT*LPR*HESH*SNIF*BANK*CHEK*TZ*ASMA*x1
^rep("CHMA","FLD0")
********
^rep("CHMA","GLOB1")
^CHECK
^rep("CHMA","GLOB2")
^CHECK(DAT,KUP,MSHM,NSID)
^rep("CHMA","LPT")
B
^rep("CHMA","MIUN")
1*2*3*4*5*6*7*8
^rep("CHMA","QUERY","dlaw jix`z itl","CT")
0*0*0*0*0*0*0*0
^rep("CHMA","QUERY","dlaw jix`z itl","FLD0")
********
^rep("CHMA","QUERY","dlaw jix`z itl","MIUN")
1*2*3*4*5*6*7*8
^rep("CHMA","QUERY","dlaw jix`z itl","SIK0")
1*0*0*0*0*0*0*0
^rep("CHMA","QUERY","oerxtl jix`z itl","CT")
0*0*0*0*0*0*0*0
^rep("CHMA","QUERY","oerxtl jix`z itl","FLD0")

^rep("CHMA","QUERY","oerxtl jix`z itl","MIUN")
2*1*3*4*5*6*7*8
^rep("CHMA","QUERY","oerxtl jix`z itl","SIK0")
0*1*0*0*0*0*0*0
^rep("CHMA","SIK")
1*
^rep("CHMA","SIK0")
1*0*0*0*0*0*0*0
^rep("CHMA","US",1)
D DAT^PLCHMA ; S OK=1 I DAT<MEDAT!(DAT>ADDAT) S OK=0
^rep("CHMA","US",2)
S OK=1
^rep("CHMA","US",3)
S OK=1
^rep("CHMA","US",4)
D SET^PLCHMA
^rep("DCIB")
qeaiq zegewl ly ninelyz g"ec
^rep("DCIB",0,"CARD")
'qn;0
^rep("DCIB",0,"CARD","SET")
1
^rep("DCIB",0,"CARD","SH")
1
^rep("DCIB",0,"CMP")
dxag 'qn;8
^rep("DCIB",0,"CMP","SET")
1
^rep("DCIB",0,"CMP","SH")
1
^rep("DCIB",0,"HZ")
dpnfd 'qn;9
^rep("DCIB",0,"HZ","SET")
1
^rep("DCIB",0,"HZ","SH")
1
^rep("DCIB",0,"HZLK")
gewl zpnfd;10
^rep("DCIB",0,"HZLK","SET")
1
^rep("DCIB",0,"HZLK","SH")
1
^rep("DCIB",0,"TRH")
melyz jix`z;8D
^rep("DCIB",0,"TRH","SET")
0
^rep("DCIB",0,"TRH","SH")
1
^rep("DCIB",0,"x1")
qihxk 'qn;22,0
^rep("DCIB",0,"x2")
melyz mekq;10,2
^rep("DCIB",0,"x3")
;,
^rep("DCIB","COD")
TRH*HZ*CMP*HZLK*x1*x2
^rep("DCIB","CT")
0*0*0*0
^rep("DCIB","FLD")
TRH*HZ*CMP*HZLK*x1*x2
^rep("DCIB","FLD0")

^rep("DCIB","GLOB1")
^VRM($J)
^rep("DCIB","GLOB2")
^VRM($J,DT,HZ,CMP,HZLK)
^rep("DCIB","LPT")
B
^rep("DCIB","MIUN")
1*2*3*4
^rep("DCIB","QUERY","fkexn mikix`z itl","CT")
0*0*0*0
^rep("DCIB","QUERY","fkexn mikix`z itl","FLD0")
*-*-*-*-*
^rep("DCIB","QUERY","fkexn mikix`z itl","MIUN")
1*2*3*4
^rep("DCIB","QUERY","fkexn mikix`z itl","SIK0")
0*0*0*0
^rep("DCIB","QUERY","fkexn zexag itl","CT")
0*0*0*0
^rep("DCIB","QUERY","fkexn zexag itl","FLD0")
*-**-*-*
^rep("DCIB","QUERY","fkexn zexag itl","MIUN")
2*3*1*4
^rep("DCIB","QUERY","fkexn zexag itl","SIK0")
0*0*1*0
^rep("DCIB","QUERY","hxetn mikix`z itl","CT")
0*0*0*0
^rep("DCIB","QUERY","hxetn mikix`z itl","FLD0")

^rep("DCIB","QUERY","hxetn mikix`z itl","MIUN")
1*2*3*4
^rep("DCIB","QUERY","hxetn mikix`z itl","SIK0")
1*0*0*0
^rep("DCIB","QUERY","hxetn zexag itl","CT")
0*0*0*0
^rep("DCIB","QUERY","hxetn zexag itl","FLD0")

^rep("DCIB","QUERY","hxetn zexag itl","MIUN")
2*3*1*4
^rep("DCIB","QUERY","hxetn zexag itl","SIK0")
1*0*1*0
^rep("DCIB","SIK")
0*1*
^rep("DCIB","SIK0")
1*0*0*0
^rep("DCIB","US",2)
S TRH=$$^%L1DC(DT,1)
^rep("DCIB","US",5)
D HZLK^P1DCIB
^rep("DCIB","US",6)
D HZLK^P1DCIB
^rep("DLKP")
hxetn zegewl g"ec
^rep("DLKP",0,"DAT")
qwcpi`;0
^rep("DLKP",0,"DAT","SET")
1
^rep("DLKP",0,"DAT","SH")
0
^rep("DLKP",0,"KTV")
zaezk;24H
^rep("DLKP",0,"KTV","SET")
0
^rep("DLKP",0,"KTV","SH")
1
^rep("DLKP",0,"NOMTD")
dcerz 'qn;9
^rep("DLKP",0,"NOMTD","SET")
1
^rep("DLKP",0,"NOMTD","SH")
1
^rep("DLKP",0,"STRING")
gewl 'qn;11
^rep("DLKP",0,"STRING","FILE")
^LKH
^rep("DLKP",0,"STRING","OUT")
STRING1
^rep("DLKP",0,"STRING","SET")
1
^rep("DLKP",0,"STRING1")
gewl my;24H
^rep("DLKP",0,"STRING1","SET")
0
^rep("DLKP",0,"STRING1","SH")
1
^rep("DLKP",0,"SUGTD")
dcerz ceq;0
^rep("DLKP",0,"SUGTD","SET")
1
^rep("DLKP",0,"SUGTD","SH")
1
^rep("DLKP",0,"SUGTD1")
xe`z;11H
^rep("DLKP",0,"SUGTD1","SET")
0
^rep("DLKP",0,"SUGTD1","SH")
0
^rep("DLKP",0,"TRH")
jix`z;8D
^rep("DLKP",0,"TRH","SET")
0
^rep("DLKP",0,"TRH","SH")
1
^rep("DLKP",0,"x1")
dcerza mekq;12,0
^rep("DLKP",0,"x2")
daeg;8,2
^rep("DLKP",0,"x3")
zekf;8,2
^rep("DLKP",0,"x4")
dxzi;8,2
^rep("DLKP",0,"x5")
;,
^rep("DLKP","COD")
STRING*STRING1*KTV*DAT*TRH*SUGTD*SUGTD1*NOMTD*x1*x2*x3*x4
^rep("DLKP","CT")
1*1*0*0*0*0*0
^rep("DLKP","FLD")
STRING*KTV*DAT*TRH*SUGTD*SUGTD1*NOMTD*x1*x2*x3*x4
^rep("DLKP","GLOB1")
^VRM(PRTN)
^rep("DLKP","GLOB2")
^VRM(PRTN,STRING,DAT,SUGTD,NOMTD,NP)
^rep("DLKP","LPT")
B
^rep("DLKP","MIUN")
1*2*3*4*5*6*7
^rep("DLKP","MIUN","PROG")
FRM^W4DLKP
^rep("DLKP","SIK")
*1*1**
^rep("DLKP","SIK0")
1*0*0*0*0*0*0
^rep("DLKP","US",0)
D STRING^W4DLKP
^rep("DLKP","US",2)
D STRING^W4DLKP
^rep("DLKP","US",3)
D TRH^W4DLKP
^rep("DLKP","US",4)
D SUGTD^W4DLKP
^rep("DLKP","US",6)
D NP^W4DLKP
^rep("DMVC")
rvana zeipw zxiav g"ec
^rep("DMVC",0,"JOMH")
dcil 'z;8
^rep("DMVC",0,"JOMH","SH")
1
^rep("DMVC",0,"KTV")
zaezk;20H
^rep("DMVC",0,"KTV","SH")
0
^rep("DMVC",0,"LKH")
gewl;10
^rep("DMVC",0,"LKH","FILE")
^LKH
^rep("DMVC",0,"LKH","OUT")
LKH1
^rep("DMVC",0,"LKH1")
gewl my;16H
^rep("DMVC",0,"LKH1","SH")
0
^rep("DMVC",0,"MVC")
rvan;4
^rep("DMVC",0,"MVC","SH")
1
^rep("DMVC",0,"PRT")
hixt;5
^rep("DMVC",0,"PRT","FILE")
^PAR
^rep("DMVC",0,"PRT","M2")
S PRT1=$$SHEM^P1P(PRT)
^rep("DMVC",0,"PRT","OUT")
PRT1
^rep("DMVC",0,"PRT1")
hixt my;16
^rep("DMVC",0,"PRT1","SH")
0
^rep("DMVC",0,"SHR")
dxey;4
^rep("DMVC",0,"SHR","SH")
1
^rep("DMVC",0,"SHURA")
dxey;3
^rep("DMVC",0,"SHURA","SH")
1
^rep("DMVC",0,"TRH")
jix`z;8D
^rep("DMVC",0,"TRH","SH")
1
^rep("DMVC",0,"x1")
zenk;4,0
^rep("DMVC",0,"x2")
mekq;8,2
^rep("DMVC",0,"x3")
;,
^rep("DMVC","COD")
MVC*LKH*LKH1*TRH*PRT*PRT1*SHR*x1*x2
^rep("DMVC","CT")
0*0*0*0*0
^rep("DMVC","FLD")
MVC*LKH*TRH*PRT*SHR*x1*x2
^rep("DMVC","FLD0")
*-*-****
^rep("DMVC","GLOB1")
^P1MVCL1
^rep("DMVC","GLOB2")
^P1MVCL1(MVC,LKH,SHR,DT,PRT)
^rep("DMVC","LPT")
B
^rep("DMVC","MIUN")
1*4*5*2*3
^rep("DMVC","QUERY","gewl itl oein","CT")
0*0*0*0*0
^rep("DMVC","QUERY","gewl itl oein","FLD0")
**-***
^rep("DMVC","QUERY","gewl itl oein","MIUN")
1*2*5*3*4
^rep("DMVC","QUERY","gewl itl oein","SIK0")
1*1*0*0*0
^rep("DMVC","QUERY","hixt itl oein","CT")
0*0*0*0*0
^rep("DMVC","QUERY","hixt itl oein","FLD0")
*-*-****
^rep("DMVC","QUERY","hixt itl oein","MIUN")
1*4*5*2*3
^rep("DMVC","QUERY","hixt itl oein","SIK0")
1*0*0*1*0
^rep("DMVC","SIK")
1*1*
^rep("DMVC","SIK0")
1*0*0*1*0
^rep("DMVC","US",-1)
I MVC'=1,MVC'=3 S OK=0
^rep("DMVC","US",1)
I MVC'=1,MVC'=3 S OK=0
^rep("DMVC","US",4)
S TRH=$$^%L1DC(DT,1)
^rep("DMVC","US",5)
D PRT^P1DMVC1
^rep("DOHT")
mitih g"ec
^rep("DOHT",0,"HZ")
dpnfd;7
^rep("DOHT",0,"HZ","SET")
1
^rep("DOHT",0,"HZ","SH")
1
^rep("DOHT",0,"HZM")
dpnfd;7
^rep("DOHT",0,"HZM","SET")
1
^rep("DOHT",0,"HZM","SH")
1
^rep("DOHT",0,"MLZ")
xvln;5
^rep("DOHT",0,"MLZ","SET")
1
^rep("DOHT",0,"MLZ","SH")
1
^rep("DOHT",0,"MLZ1")
xvln my;12H
^rep("DOHT",0,"MLZ1","SET")
0
^rep("DOHT",0,"MLZ1","SH")
1
^rep("DOHT",0,"TRH")
jix`z;8D
^rep("DOHT",0,"TRH","SET")
0
^rep("DOHT",0,"TRH","SH")
1
^rep("DOHT",0,"x1")
`"ka mitih;10,2
^rep("DOHT",0,"x2")
dtwda mitih;10,2
^rep("DOHT",0,"x3")
w'v mitih;10,2
^rep("DOHT",0,"x4")
onefna mitih;10,2
^rep("DOHT",0,"x5")
mitih k"dq;10,2
^rep("DOHT",0,"x6")
;,
^rep("DOHT","COD")
MLZ*MLZ1*TRH*HZ*x1*x2*x3*x4*x5
^rep("DOHT","CT")
2*2*0*0
^rep("DOHT","FLD")
MLZ*MLZ1*TRH*HZ*x1*x2*x3*x4*x5
^rep("DOHT","GLOB1")
^VRM($J)
^rep("DOHT","GLOB2")
^VRM($J,DT,MLZ,HZ)
^rep("DOHT","LPT")
B
^rep("DOHT","MIUN")
1*2*3*4
^rep("DOHT","SIK")
1*1*1*1*1*
^rep("DOHT","SIK0")
1*0*0*0
^rep("DOHT","US",0)
D HZM^P1DOHTIP
^rep("DOHT","US",2)
D DT^P1DOHTIP
^rep("DOHT","US",3)
D MLZ1^P1DOHTIP
^rep("DOHT","US",4)
D HZ^P1DOHTIP
^rep("DPARC","FLD0")
-*-*****
^rep("DPMH")
mixign itl zexikn
^rep("DPMH",0,"DAT")
jix`z;8D
^rep("DPMH",0,"DAT","SH")
1
^rep("DPMH",0,"DATT")
jix`z;8D
^rep("DPMH",0,"DATT","SET")
0
^rep("DPMH",0,"DATT","SH")
1
^rep("DPMH",0,"MH")
xign;7
^rep("DPMH",0,"MH","SH")
1
^rep("DPMH",0,"MH1")
xign;8
^rep("DPMH",0,"MH1","SET")
0
^rep("DPMH",0,"MH1","SH")
1
^rep("DPMH",0,"MHL")
dwlgn;5
^rep("DPMH",0,"MHL","FILE")
^DEP
^rep("DPMH",0,"MHL","OUT")
MHL1
^rep("DPMH",0,"MHL","SET")
0
^rep("DPMH",0,"MHL1")
xe`z;12H
^rep("DPMH",0,"MHL1","SET")
0
^rep("DPMH",0,"MHL1","SH")
0
^rep("DPMH",0,"PARIT")
hixt cew;8
^rep("DPMH",0,"PARIT","FILE")
^PAR
^rep("DPMH",0,"PARIT","M2")
D PAR1^P1DPMH
^rep("DPMH",0,"PARIT","OUT")
PARIT1
^rep("DPMH",0,"PARIT","SET")
1
^rep("DPMH",0,"PARIT1")
hixt xe`z;18H
^rep("DPMH",0,"PARIT1","SET")
0
^rep("DPMH",0,"PARIT1","SH")
0
^rep("DPMH",0,"SUGP")
dveaw;5
^rep("DPMH",0,"SUGP","FILE")
^PARSUG
^rep("DPMH",0,"SUGP","OUT")
SUGP1
^rep("DPMH",0,"SUGP","SET")
0
^rep("DPMH",0,"SUGP1")
dveaw xe`z;12H
^rep("DPMH",0,"SUGP1","SET")
0
^rep("DPMH",0,"SUGP1","SH")
0
^rep("DPMH",0,"x1")
zenk;7,0
^rep("DPMH",0,"x2")
dgpd;6,1
^rep("DPMH",0,"x3")
mekq;9,1
^rep("DPMH",0,"x4")
n"rn iptl;9,1
^rep("DPMH",0,"x5")
;,
^rep("DPMH","COD")
MHL*MHL1*SUGP*SUGP1*PARIT*PARIT1*MH1*DATT*x1*x2*x3*x4
^rep("DPMH","CT")
1*1*0*0*2*0*0
^rep("DPMH","FLD")
MHL*SUGP*PARIT*MH1*DATT*x1*x2*x3*x4
^rep("DPMH","FLD0")
*******
^rep("DPMH","GLOB1")
^TEMPMH($P)
^rep("DPMH","GLOB2")
^TEMPMH($P,DAT,MRK,PARIT,MH)
^rep("DPMH","LPT")
B
^rep("DPMH","MIUN")
1*2*4*5*3*4**0
^rep("DPMH","QUERY","iztewz","CT")
1*2*0*0*2*0*0
^rep("DPMH","QUERY","iztewz","FLD0")
****-***
^rep("DPMH","QUERY","iztewz","MIUN")
1*2*3*4*3*4**0
^rep("DPMH","QUERY","iztewz","SIK0")
1*1*0*0*1*0*0
^rep("DPMH","QUERY","mini itl hxetn","CT")
1*1*0*0*2*0*0
^rep("DPMH","QUERY","mini itl hxetn","FLD0")
*******
^rep("DPMH","QUERY","mini itl hxetn","MIUN")
1*2*4*5*3*4**0
^rep("DPMH","QUERY","mini itl hxetn","SIK0")
1*1*0*0*1*0*0
^rep("DPMH","QUERY","zeveaw `ll iztewz","CT")
1*2*0*0*2*0*0
^rep("DPMH","QUERY","zeveaw `ll iztewz","FLD0")
*-***-***
^rep("DPMH","QUERY","zeveaw `ll iztewz","MIUN")
1*2*2*3*3*4**0
^rep("DPMH","QUERY","zeveaw `ll iztewz","SIK0")
1*1*0*0*1*0*0
^rep("DPMH","QUERY","zewlgne zeveaw `ll iztewz","CT")
1*2*0*0*2*0*0
^rep("DPMH","QUERY","zewlgne zeveaw `ll iztewz","FLD0")
-*-***-***
^rep("DPMH","QUERY","zewlgne zeveaw `ll iztewz","MIUN")
1*2*1*2*3*4**0
^rep("DPMH","QUERY","zewlgne zeveaw `ll iztewz","SIK0")
1*1*0*0*1*0*0
^rep("DPMH","SHP","KOD")
DPMH
^rep("DPMH","SHP","PROG")
S MAS(5)=SSOAD
^rep("DPMH","SIK")
1*1*1*1**1*0*
^rep("DPMH","SIK0")
1*1*0*0*1*0*0
^rep("DPMH","US",2)
D DAT^P1DPMH
^rep("DPMH","US",4)
D PAR^P1DPMH
^rep("DPMH","US",5)
D MH^P1DPMH
^rep("DPMN")
mihixt zeny itl zexikn
^rep("DPMN",0,"DAT")
jix`z;8D
^rep("DPMN",0,"DAT","SH")
1
^rep("DPMN",0,"DATT")
jix`z;8D
^rep("DPMN",0,"DATT","SET")
0
^rep("DPMN",0,"DATT","SH")
1
^rep("DPMN",0,"MH")
xign;7
^rep("DPMN",0,"MH","SH")
1
^rep("DPMN",0,"MH1")
xign;8
^rep("DPMN",0,"MH1","SET")
0
^rep("DPMN",0,"MH1","SH")
1
^rep("DPMN",0,"MHL")
dwlgn;5
^rep("DPMN",0,"MHL","FILE")
^DEP
^rep("DPMN",0,"MHL","OUT")
MHL1
^rep("DPMN",0,"MHL","SET")
0
^rep("DPMN",0,"MHL1")
xe`z;12H
^rep("DPMN",0,"MHL1","SET")
0
^rep("DPMN",0,"MHL1","SH")
0
^rep("DPMN",0,"PARIT")
hixt cew;8
^rep("DPMN",0,"PARIT","FILE")
^PAR
^rep("DPMN",0,"PARIT","SET")
1
^rep("DPMN",0,"PARIT","SH")
1
^rep("DPMN",0,"PARIT1")
hixt xe`z;18H
^rep("DPMN",0,"PARIT1","SET")
1
^rep("DPMN",0,"PARIT1","SH")
1
^rep("DPMN",0,"SUGP")
dveaw;5
^rep("DPMN",0,"SUGP","FILE")
^PARSUG
^rep("DPMN",0,"SUGP","OUT")
SUGP1
^rep("DPMN",0,"SUGP","SET")
0
^rep("DPMN",0,"SUGP1")
dveaw xe`z;12H
^rep("DPMN",0,"SUGP1","SET")
0
^rep("DPMN",0,"SUGP1","SH")
0
^rep("DPMN",0,"x1")
zenk;7,0
^rep("DPMN",0,"x2")
dgpd;6,1
^rep("DPMN",0,"x3")
mekq;9,1
^rep("DPMN",0,"x4")
n"rn iptl;9,1
^rep("DPMN",0,"x5")
;,
^rep("DPMN","COD")
MHL*MHL1*SUGP*SUGP1*PARIT1*PARIT*MH1*DATT*x1*x2*x3*x4
^rep("DPMN","CT")
1*2*0*0*0*0*0
^rep("DPMN","FLD")
MHL*SUGP*PARIT1*PARIT*MH1*DATT*x1*x2*x3*x4
^rep("DPMN","FLD0")
*******
^rep("DPMN","GLOB1")
^TEMPMH($P)
^rep("DPMN","GLOB2")
^TEMPMH($P,DAT,MRK,PARIT1,PARIT,MH)
^rep("DPMN","LPT")
B
^rep("DPMN","MIUN")
1*3*4*5*6*2**0
^rep("DPMN","QUERY","iztewz","CT")
1*2*0*0*0*0*0
^rep("DPMN","QUERY","iztewz","FLD0")
*****-****
^rep("DPMN","QUERY","iztewz","MIUN")
1*2*3*4*5*4**0
^rep("DPMN","QUERY","iztewz","SIK0")
1*1*1*0*0*0*0
^rep("DPMN","QUERY","mini itl hxetn","CT")
1*2*0*0*0*0*0
^rep("DPMN","QUERY","mini itl hxetn","FLD0")
*******
^rep("DPMN","QUERY","mini itl hxetn","MIUN")
1*3*4*5*6*2**0
^rep("DPMN","QUERY","mini itl hxetn","SIK0")
1*1*1*0*0*0*0
^rep("DPMN","QUERY","zeveaw `ll iztewz","CT")
1*2*2*0*0*0*0
^rep("DPMN","QUERY","zeveaw `ll iztewz","FLD0")
*-****-****
^rep("DPMN","QUERY","zeveaw `ll iztewz","MIUN")
1*2*2*3*4*4**0
^rep("DPMN","QUERY","zeveaw `ll iztewz","SIK0")
1*1*1*0*0*0*0
^rep("DPMN","QUERY","zewlgne zeveaw `ll iztewz","CT")
1*2*0*0*0*0*0
^rep("DPMN","QUERY","zewlgne zeveaw `ll iztewz","FLD0")
-*-****-****
^rep("DPMN","QUERY","zewlgne zeveaw `ll iztewz","MIUN")
1*2*1*2*3*4**0
^rep("DPMN","QUERY","zewlgne zeveaw `ll iztewz","SIK0")
1*1*1*0*0*0*0
^rep("DPMN","SHP","KOD")
DPMH
^rep("DPMN","SHP","PROG")
S MAS(5)=SSOAD
^rep("DPMN","SIK")
1*1*1*1**1*0*
^rep("DPMN","SIK0")
1*1*1*0*0*0*0
^rep("DPMN","US",2)
D DAT^P1DPMH
^rep("DPMN","US",6)
D MH^P1DPMN
^rep("DPNO")
exknp `ly mihixt g"ec
^rep("DPNO",0,"PAR")
hixt 'qn;8
^rep("DPNO",0,"PAR","FILE")
^PAR
^rep("DPNO",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("DPNO",0,"PAR","OUT")
PAR1
^rep("DPNO",0,"PAR1")
hixt my;24H
^rep("DPNO",0,"PAR1","SH")
1
^rep("DPNO",0,"TRH")
jix`z;8D
^rep("DPNO",0,"TRH","SH")
1
^rep("DPNO",0,"x1")
xign;8,2
^rep("DPNO",0,"x2")
;,
^rep("DPNO","COD")
TRH*PAR*PAR1*x1
^rep("DPNO","CT")
0*0
^rep("DPNO","FLD")
TRH*PAR*x1
^rep("DPNO","FLD0")
-**
^rep("DPNO","GLOB1")
^PAR
^rep("DPNO","GLOB2")
^PAR(PAR)
^rep("DPNO","LPT")
B
^rep("DPNO","MIUN")
1*1
^rep("DPNO","SIK")
*
^rep("DPNO","SIK0")
0*0
^rep("DPNO","US",-1)
D PAR^P1DPNO
^rep("DPNO","US",1)
D PAR^P1DPNO
^rep("DPSP")
zeveaw itl mihixt g"ec
^rep("DPSP",0,"PAR")
hixt cew;8
^rep("DPSP",0,"PAR","M2")
S PRT1=$$SHEM^P1P(PAR)
^rep("DPSP",0,"PAR","OUT")
PRT1
^rep("DPSP",0,"PRT")
hixt 'qn;8
^rep("DPSP",0,"PRT","FILE")
^PAR
^rep("DPSP",0,"PRT","M2")
D PRT1^P1DPSP
^rep("DPSP",0,"PRT","OUT")
PRT1
^rep("DPSP",0,"PRT1")
hixt xe`z;20H
^rep("DPSP",0,"PRT1","SH")
0
^rep("DPSP",0,"SUGP")
mihixt zveaw;5
^rep("DPSP",0,"SUGP","FILE")
^PARSUG
^rep("DPSP",0,"SUGP","OUT")
SUGP1
^rep("DPSP",0,"SUGP1")
dveaw xe`z;8
^rep("DPSP",0,"SUGP1","SH")
0
^rep("DPSP",0,"TRH")
jix`z;8D
^rep("DPSP",0,"TRH","SH")
1
^rep("DPSP",0,"x1")
zenk;5,0
^rep("DPSP",0,"x2")
mekq;8,2
^rep("DPSP",0,"x3")
dgpd;7,2
^rep("DPSP",0,"x4")
ehp k"dq;8,2
^rep("DPSP",0,"x5")
oexg` xign;7,2
^rep("DPSP",0,"x6")
dveawn %;5,2
^rep("DPSP",0,"x7")
ehp k"dqn%;8,2
^rep("DPSP",0,"x8")
;,
^rep("DPSP","COD")
SUGP*SUGP1*PRT*PRT1*x1*x2*x3*x4*x5*x6*x7
^rep("DPSP","CT")
2*0*0
^rep("DPSP","FLD")
SUGP*PRT*x1*x2*x3*x4*x5*x6*x7
^rep("DPSP","FLD0")
*******-*-
^rep("DPSP","GLOB1")
^VRM($J)
^rep("DPSP","GLOB2")
^VRM($J,SUGP,PRT)
^rep("DPSP","LPT")
B
^rep("DPSP","MIUN")
1*2*3
^rep("DPSP","SHP","KOD")
DPSP
^rep("DPSP","SIK")
1*1*1*1****
^rep("DPSP","SIK0")
1*0*0
^rep("DPSP","US",3)
D PRT^P1DPSP
^rep("HBMK")
dlaw 'qn zeipeayg g"ec
^rep("HBMK",0,"HB")
dlaw qn 'ayg;9
^rep("HBMK",0,"HB","SET")
1
^rep("HBMK",0,"HB","SH")
1
^rep("HBMK",0,"HZM")
dpnfd;8
^rep("HBMK",0,"HZM","SET")
0
^rep("HBMK",0,"HZM","SH")
1
^rep("HBMK",0,"MLZ")
xvln 'qn;5
^rep("HBMK",0,"MLZ","FILE")
^NAME
^rep("HBMK",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^rep("HBMK",0,"MLZ","OUT")
MLZ1
^rep("HBMK",0,"MLZ1")
xvln my;12H
^rep("HBMK",0,"MLZ1","SH")
1
^rep("HBMK",0,"NMB")
ogley;8
^rep("HBMK",0,"NMB","SH")
1
^rep("HBMK",0,"SHAA")
dry;5
^rep("HBMK",0,"SHAA","SH")
1
^rep("HBMK",0,"SHULH")
ogley;5
^rep("HBMK",0,"SHULH","SH")
1
^rep("HBMK",0,"SUGS")
ogley beq;5
^rep("HBMK",0,"SUGS","FILE")
^SUGS
^rep("HBMK",0,"SUGS","OUT")
SUGS1
^rep("HBMK",0,"SUGS1")
beq xe`z;6H
^rep("HBMK",0,"SUGS1","SH")
1
^rep("HBMK",0,"TRH")
jix`z;8D
^rep("HBMK",0,"TRH","SH")
1
^rep("HBMK",0,"TRHT")
jix`z;8D
^rep("HBMK",0,"TRHT","SET")
0
^rep("HBMK",0,"TRHT","SH")
1
^rep("HBMK",0,"x1")
melyzl;8,2
^rep("HBMK",0,"x2")
onefn;8,2
^rep("HBMK",0,"x3")
wiy;8,2
^rep("HBMK",0,"x4")
`"k;8,2
^rep("HBMK",0,"x5")
dtwd;8,2
^rep("HBMK",0,"x6")
yelz;8,2
^rep("HBMK",0,"x7")
tih;7,2
^rep("HBMK",0,"x8")
;,
^rep("HBMK","COD")
TRHT*HB*HZM*x1*x2*x3*x4*x5*x6*x7
^rep("HBMK","CT")
0*0*0*0*0*0
^rep("HBMK","FLD")
TRHT*HB*HZM*x1*x2*x3*x4*x5*x6*x7
^rep("HBMK","FLD0")
********-*
^rep("HBMK","GLOB1")
^P1HBI
^rep("HBMK","GLOB2")
^P1HBI(DATH,HB)
^rep("HBMK","LPT")
B
^rep("HBMK","MIUN")
1*2*3*4*2*3
^rep("HBMK","QUERY","hxetn zepgleye zepgley ibeq itl","CT")
1*1*2*0*0*0
^rep("HBMK","QUERY","hxetn zepgleye zepgley ibeq itl","FLD0")
-***-********-*
^rep("HBMK","QUERY","hxetn zepgleye zepgley ibeq itl","MIUN")
1*1*2*4*3*4
^rep("HBMK","QUERY","hxetn zepgleye zepgley ibeq itl","SIK0")
1*1*1*0*0*0
^rep("HBMK","SIK")
1*1*1*1*1*1*1*
^rep("HBMK","SIK0")
1*0*0*0*0*0
^rep("HBMK","US",-1)
D DATH^P1HBMK
^rep("HBMK","US",1)
D DATH^P1HBMK
^rep("HBMK","US",2)
D HB^P1HBMK
^rep("HNHS")
zeaiq itl zegpd g"ec
^rep("HNHS",0,"HZM")
dpnfd;7
^rep("HNHS",0,"HZM","SET")
1
^rep("HNHS",0,"HZM","SH")
1
^rep("HNHS",0,"MLZR")
xvln;5
^rep("HNHS",0,"MLZR","FILE")
^NAME
^rep("HNHS",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^rep("HNHS",0,"MLZR","OUT")
MLZR1
^rep("HNHS",0,"MLZR","SET")
1
^rep("HNHS",0,"MLZR1")
xvln my;10H
^rep("HNHS",0,"MLZR1","SET")
0
^rep("HNHS",0,"MLZR1","SH")
1
^rep("HNHS",0,"PAR")
hixt 'qn;8
^rep("HNHS",0,"PAR","FILE")
^PAR
^rep("HNHS",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("HNHS",0,"PAR","OUT")
PAR1
^rep("HNHS",0,"PAR","SET")
1
^rep("HNHS",0,"PAR1")
hixt xe`z;16H
^rep("HNHS",0,"PAR1","SET")
0
^rep("HNHS",0,"PAR1","SH")
1
^rep("HNHS",0,"SHAA")
dryl;5
^rep("HNHS",0,"SHAA","SET")
1
^rep("HNHS",0,"SHAA","SH")
1
^rep("HNHS",0,"SIBA")
daiq xe`z;12H
^rep("HNHS",0,"SIBA","SET")
1
^rep("HNHS",0,"SIBA","SH")
1
^rep("HNHS",0,"SIBA1")
daiq xe`z;10H
^rep("HNHS",0,"SIBA1","SET")
0
^rep("HNHS",0,"SIBA1","SH")
1
^rep("HNHS",0,"TRH")
jix`z;8D
^rep("HNHS",0,"TRH","SET")
0
^rep("HNHS",0,"TRH","SH")
1
^rep("HNHS",0,"x1")
dgpd iptl;9,2
^rep("HNHS",0,"x2")
dgpd;9,2
^rep("HNHS",0,"x3")
dgpd ixg`;9,2
^rep("HNHS",0,"x4")
%-a;6,2
^rep("HNHS",0,"x5")
;,
^rep("HNHS","COD")
SIBA*MLZR*MLZR1*TRH*SHAA*HZM*x1*x2*x3
^rep("HNHS","CT")
0*0*0*0*0*0
^rep("HNHS","FLD")
SIBA*MLZR*TRH*SHAA*HZM*x1*x2*x3
^rep("HNHS","FLD0")
*-**-****
^rep("HNHS","GLOB1")
^VRM($J)
^rep("HNHS","GLOB2")
^VRM($J,SIBA,MLZR,DT,SHAA,HZM)
^rep("HNHS","LPT")
B
^rep("HNHS","MIUN")
2*2*1*2*3*4
^rep("HNHS","MIUN","PROG")
TRH^P1DPHNHS
^rep("HNHS","QUERY","1.       mikix`z itl zeaiq","CT")
0*0*0*0*0*0
^rep("HNHS","QUERY","1.       mikix`z itl zeaiq","FLD0")
*-**-****
^rep("HNHS","QUERY","1.       mikix`z itl zeaiq","MIUN")
1*2*2*2*3*4
^rep("HNHS","QUERY","1.       mikix`z itl zeaiq","SIK0")
1*0*0*0*0*1
^rep("HNHS","QUERY","2.       zeaiq itl mikix`z","CT")
0*0*0*0*0*0
^rep("HNHS","QUERY","2.       zeaiq itl mikix`z","FLD0")
*-**-****
^rep("HNHS","QUERY","2.       zeaiq itl mikix`z","MIUN")
2*2*1*2*3*4
^rep("HNHS","QUERY","2.       zeaiq itl mikix`z","SIK0")
1*0*1*0*0*1
^rep("HNHS","QUERY","3.        mixvln itl zeaiq","CT")
2*0*0*0*0*0
^rep("HNHS","QUERY","3.        mixvln itl zeaiq","FLD0")
***-****
^rep("HNHS","QUERY","3.        mixvln itl zeaiq","MIUN")
1*2*3*2*4*5
^rep("HNHS","QUERY","3.        mixvln itl zeaiq","SIK0")
1*1*0*0*0*0
^rep("HNHS","QUERY","4.        zeaiq itl mixvln","CT")
0*2*0*0*0*0
^rep("HNHS","QUERY","4.        zeaiq itl mixvln","FLD0")
***-****
^rep("HNHS","QUERY","4.        zeaiq itl mixvln","MIUN")
2*1*3*2*4*5
^rep("HNHS","QUERY","4.        zeaiq itl mixvln","SIK0")
1*1*1*0*0*0
^rep("HNHS","SIK")
1*1*1**
^rep("HNHS","SIK0")
1*0*1*0*0*1
^rep("HNHS","US",4)
S TRH=$$^%L1DC(DT,1)
^rep("HNHS","US",6)
D HZM^P1DPHNHS
^rep("HZCA")
`"k itl zepnfd g"ec
^rep("HZCA",0,"HB")
zipeayg;8
^rep("HZCA",0,"HZM")
dpnfd;7
^rep("HZCA",0,"HZM","SH")
1
^rep("HZCA",0,"LKH")
gewl 'qn;10
^rep("HZCA",0,"LKH","FILE")
^LKH
^rep("HZCA",0,"LKH","OUT")
LKH1
^rep("HZCA",0,"LKH1")
gewl my;20H
^rep("HZCA",0,"MKBL")
xvln;5
^rep("HZCA",0,"MKBL","FILE")
^NAME
^rep("HZCA",0,"MKBL","M2")
S MKBL1=$$^P1NAME(MKBL)
^rep("HZCA",0,"MKBL","OUT")
MKBL1
^rep("HZCA",0,"MKBL1")
xvln my;12H
^rep("HZCA",0,"MKBL1","SH")
0
^rep("HZCA",0,"MLZR")
xvln 'qn;5
^rep("HZCA",0,"MLZR",2)
I MLZR S MLZR1=$G(^NAME(MLZR,1))
^rep("HZCA",0,"MLZR","OUT")
MLZR1
^rep("HZCA",0,"MLZR1")
xvln my;12H
^rep("HZCA",0,"MLZR1","SH")
1
^rep("HZCA",0,"NAME")
gewl my;12H
^rep("HZCA",0,"NAME","SH")
1
^rep("HZCA",0,"NCAB")
zipeayg;6
^rep("HZCA",0,"NCAB","SH")
0
^rep("HZCA",0,"NMB")
ogley;5
^rep("HZCA",0,"NMB","SH")
1
^rep("HZCA",0,"PSL")
gily cew;3
^rep("HZCA",0,"PSL","FILE")
^P1SL
^rep("HZCA",0,"PSL","OUT")
PSL1
^rep("HZCA",0,"PSL1")
gily my;10H
^rep("HZCA",0,"PSL1","SH")
1
^rep("HZCA",0,"SHAA")
dry;5
^rep("HZCA",0,"SHAA","SH")
1
^rep("HZCA",0,"SL")
gily cew;5
^rep("HZCA",0,"SL","FILE")
^P1SL
^rep("HZCA",0,"SL","OUT")
SL1
^rep("HZCA",0,"SL1")
gily my;12H
^rep("HZCA",0,"SOAD")
micreq;6
^rep("HZCA",0,"SOAD","SH")
1
^rep("HZCA",0,"SUGS")
ogley beq;8
^rep("HZCA",0,"SUGS","FILE")
^SUGS
^rep("HZCA",0,"SUGS","OUT")
SUGS1
^rep("HZCA",0,"SUGS1")
xe`z;12H
^rep("HZCA",0,"SUGS1","SH")
1
^rep("HZCA",0,"SUGT")
melyz beq;9
^rep("HZCA",0,"SUGT","SH")
1
^rep("HZCA",0,"TRH")
jix`z;8D
^rep("HZCA",0,"TRH","SH")
1
^rep("HZCA",0,"TS")
melyzl;8
^rep("HZCA",0,"TSHL")
melyzl;8
^rep("HZCA",0,"TSHL","OUT")
TSHL
^rep("HZCA",0,"x1")
milehia;9,2
^rep("HZCA",0,"x2")
zegpd;9,2
^rep("HZCA",0,"x3")
melyzl;9,2
^rep("HZCA",0,"x4")
micreq;6,0
^rep("HZCA",0,"x5")
;,
^rep("HZCA","COD")
TRH*HZM*SHAA*CA*x1
^rep("HZCA","CT")
0*0*0*0*0*0*0*0
^rep("HZCA","FLD")
MKBL*SUGS*NMB*TRH*SHAA*HZM*SUGT*x1*x2*x3*x4
^rep("HZCA","FLD0")
-*-*-*****-*-**-
^rep("HZCA","GLOB1")
^P1H
^rep("HZCA","GLOB2")
^P1H(DATH,HZM)
^rep("HZCA","LPT")
B
^rep("HZCA","MIUN")
2*3*4*2*4*3*1*7
^rep("HZCA","QUERY","dpnfd 'qn itl","CT")
0*0*0*0*0*0*0*0
^rep("HZCA","QUERY","dpnfd 'qn itl","FLD0")
*-*****-*-*-**
^rep("HZCA","QUERY","dpnfd 'qn itl","MIUN")
2*3*4*3*5*1*6*7
^rep("HZCA","QUERY","dpnfd 'qn itl","SIK0")
0*0*0*0*0*0*0*0
^rep("HZCA","QUERY","ogley beq itl","CT")
2*1*0*0*0*0*0
^rep("HZCA","QUERY","ogley beq itl","FLD0")
-******-****
^rep("HZCA","QUERY","ogley beq itl","MIUN")
3*1*2*3*4*5*6
^rep("HZCA","QUERY","ogley beq itl","SIK0")
0*1*1*0*0*0*0
^rep("HZCA","QUERY","xvln 'qn itl","CT")
1*0*0*0*0*0*0
^rep("HZCA","QUERY","xvln 'qn itl","FLD0")
*-*****-****
^rep("HZCA","QUERY","xvln 'qn itl","MIUN")
1*3*2*3*5*4*6
^rep("HZCA","QUERY","xvln 'qn itl","SIK0")
1*0*0*0*0*0*0
^rep("HZCA","SHP","KOD")
P1HZH
^rep("HZCA","SIK")
1*1*1*1*
^rep("HZCA","SIK0")
0*0*0*1*0*0*1*0
^rep("HZCA","US",-1)
D TRH^P1HZHC
^rep("HZCA","US",0)
D HZM^P1HZHC
^rep("HZCA","US",1)
D TRH^P1HZHC
^rep("HZCA","US",2)
D HZM^P1HZHC
^rep("HZH")
zepnfd g"ec
^rep("HZH",0,"HB")
zipeayg;8
^rep("HZH",0,"HZM")
dpnfd;7
^rep("HZH",0,"HZM","SET")
1
^rep("HZH",0,"HZM","SH")
1
^rep("HZH",0,"LKH")
gewl 'qn;10
^rep("HZH",0,"LKH","FILE")
^LKH
^rep("HZH",0,"LKH","OUT")
LKH1
^rep("HZH",0,"LKH1")
gewl my;20H
^rep("HZH",0,"MKBL")
lawn 'qn;8
^rep("HZH",0,"MKBL","FILE")
^NAME
^rep("HZH",0,"MKBL","M2")
S MKBL1="" I $G(MKBL) S MKBL1=$G(^NAME(MKBL,1))
^rep("HZH",0,"MKBL","OUT")
MKBL1
^rep("HZH",0,"MKBL","SET")
0
^rep("HZH",0,"MKBL1")
lawnd my;12H
^rep("HZH",0,"MKBL1","SET")
0
^rep("HZH",0,"MKBL1","SH")
1
^rep("HZH",0,"NAME")
gewl my;12H
^rep("HZH",0,"NAME","SET")
0
^rep("HZH",0,"NAME","SH")
1
^rep("HZH",0,"NCAB")
zipeayg;6
^rep("HZH",0,"NCAB","SH")
0
^rep("HZH",0,"NMB")
gewl xtqn;10
^rep("HZH",0,"NMB","FILE")
^LKH
^rep("HZH",0,"NMB","OUT")
NAME
^rep("HZH",0,"NMB","SET")
0
^rep("HZH",0,"PSL")
gily cew;3
^rep("HZH",0,"PSL","FILE")
^P1SL
^rep("HZH",0,"PSL","OUT")
PSL1
^rep("HZH",0,"PSL","SET")
0
^rep("HZH",0,"PSL1")
gily my;10H
^rep("HZH",0,"PSL1","SET")
0
^rep("HZH",0,"PSL1","SH")
1
^rep("HZH",0,"SHAA")
dryl;5
^rep("HZH",0,"SHAA","SET")
0
^rep("HZH",0,"SHAA","SH")
1
^rep("HZH",0,"SL")
gily cew;5
^rep("HZH",0,"SL","FILE")
^P1SL
^rep("HZH",0,"SL","OUT")
SL1
^rep("HZH",0,"SL1")
gily my;12H
^rep("HZH",0,"SUGT")
melyz beq;8
^rep("HZH",0,"SUGT","SET")
0
^rep("HZH",0,"SUGT","SH")
1
^rep("HZH",0,"SUGT1")
xe`z;8H
^rep("HZH",0,"SUGT1","SH")
0
^rep("HZH",0,"TRH")
jix`z;8D
^rep("HZH",0,"TRH","SET")
0
^rep("HZH",0,"TRH","SH")
1
^rep("HZH",0,"TS")
melyzl;8
^rep("HZH",0,"TSHL")
melyzl;8
^rep("HZH",0,"TSHL","OUT")
TSHL
^rep("HZH",0,"x1")
zexy inc;7,2
^rep("HZH",0,"x2")
melyzl;8,2
^rep("HZH",0,"x3")
;,
^rep("HZH","COD")
PSL*PSL1*MKBL*MKBL1*NMB*NAME*TRH*SHAA*HZM*SUGT*x1*x2
^rep("HZH","CT")
2*0*0*0*0*0*0
^rep("HZH","FLD")
PSL*MKBL*NMB*TRH*SHAA*HZM*SUGT*x1*x2
^rep("HZH","FLD0")
*-*******
^rep("HZH","GLOB1")
^P1H
^rep("HZH","GLOB2")
^P1H(DATH,HZM)
^rep("HZH","LPT")
B
^rep("HZH","MIUN")
1*5*4*2*3*5*6
^rep("HZH","QUERY","dpnfd ilawn itl oein","CT")
2*2*0*0*0*0*0
^rep("HZH","QUERY","dpnfd ilawn itl oein","FLD0")
-********
^rep("HZH","QUERY","dpnfd ilawn itl oein","MIUN")
1*1*2*3*4*5*6
^rep("HZH","QUERY","dpnfd ilawn itl oein","SIK0")
1*1*0*0*0*0*0
^rep("HZH","QUERY","migily itl oein","CT")
2*0*0*0*0*0*0
^rep("HZH","QUERY","migily itl oein","FLD0")
*-*******
^rep("HZH","QUERY","migily itl oein","MIUN")
1*5*4*2*3*5*6
^rep("HZH","QUERY","migily itl oein","SIK0")
1*0*0*1*0*0*0
^rep("HZH","QUERY","mikix`z itl oein","CT")
2*0*0*2*0*0*0
^rep("HZH","QUERY","mikix`z itl oein","FLD0")
-*-*******
^rep("HZH","QUERY","mikix`z itl oein","MIUN")
2*4*2*1*3*4*5
^rep("HZH","QUERY","mikix`z itl oein","SIK0")
0*0*0*1*0*0*0
^rep("HZH","QUERY","zegewl itl oein","CT")
2*0*2*0*0*0*0
^rep("HZH","QUERY","zegewl itl oein","FLD0")
-*-*******
^rep("HZH","QUERY","zegewl itl oein","MIUN")
1*5*1*2*3*4*5
^rep("HZH","QUERY","zegewl itl oein","SIK0")
1*0*1*0*0*0*0
^rep("HZH","QUERY","zerye mikix`z itl oein","CT")
2*0*0*2*0*0*0
^rep("HZH","QUERY","zerye mikix`z itl oein","FLD0")
-*-*******
^rep("HZH","QUERY","zerye mikix`z itl oein","MIUN")
2*4*3*1*2*4*5
^rep("HZH","QUERY","zerye mikix`z itl oein","SIK0")
0*0*0*1*0*0*0
^rep("HZH","SIK")
1*1*
^rep("HZH","SIK0")
1*0*0*1*0*0*0
^rep("HZH","US",0)
D HZM^P1HZHC
^rep("HZH","US",1)
D TRH^P1HZHC
^rep("HZH","US",2)
D HZM^P1HZHC
^rep("HZHA")
mixef` itl zepnfd g"ec
^rep("HZHA",0,"AZOR")
xef`;7
^rep("HZHA",0,"AZOR","SET")
0
^rep("HZHA",0,"AZOR","SH")
1
^rep("HZHA",0,"HB")
zipeayg;8
^rep("HZHA",0,"HZM")
dpnfd;7
^rep("HZHA",0,"HZM","SET")
1
^rep("HZHA",0,"HZM","SH")
1
^rep("HZHA",0,"IR")
xir;11H
^rep("HZHA",0,"IR","SET")
0
^rep("HZHA",0,"IR","SH")
1
^rep("HZHA",0,"KH")
zenk;4
^rep("HZHA",0,"KH","SET")
0
^rep("HZHA",0,"KH","SH")
1
^rep("HZHA",0,"KTV")
zaezk;13H
^rep("HZHA",0,"KTV","SET")
0
^rep("HZHA",0,"KTV","SH")
1
^rep("HZHA",0,"LKH")
gewl 'qn;10
^rep("HZHA",0,"LKH","FILE")
^LKH
^rep("HZHA",0,"LKH","OUT")
LKH1
^rep("HZHA",0,"LKH1")
gewl my;20H
^rep("HZHA",0,"MKBL")
lawn 'qn;8
^rep("HZHA",0,"MKBL","FILE")
^NAME
^rep("HZHA",0,"MKBL","M2")
S MKBL1="" I $G(MKBL) S MKBL1=$G(^NAME(MKBL,1))
^rep("HZHA",0,"MKBL","OUT")
MKBL1
^rep("HZHA",0,"MKBL1")
lawnd my;12H
^rep("HZHA",0,"MKBL1","SH")
1
^rep("HZHA",0,"NAME")
gewl my;12H
^rep("HZHA",0,"NAME","SET")
0
^rep("HZHA",0,"NAME","SH")
1
^rep("HZHA",0,"NCAB")
zipeayg;6
^rep("HZHA",0,"NCAB","SH")
0
^rep("HZHA",0,"NMB")
gewl xtqn;10
^rep("HZHA",0,"NMB","FILE")
^LKH
^rep("HZHA",0,"NMB","OUT")
NAME
^rep("HZHA",0,"NMB","SET")
0
^rep("HZHA",0,"PSL")
gily cew;3
^rep("HZHA",0,"PSL","FILE")
^P1SL
^rep("HZHA",0,"PSL","OUT")
PSL1
^rep("HZHA",0,"PSL","SET")
0
^rep("HZHA",0,"PSL1")
gily my;10H
^rep("HZHA",0,"PSL1","SET")
0
^rep("HZHA",0,"PSL1","SH")
1
^rep("HZHA",0,"SHAA")
dryl;5
^rep("HZHA",0,"SHAA","SET")
0
^rep("HZHA",0,"SHAA","SH")
1
^rep("HZHA",0,"SL")
gily cew;5
^rep("HZHA",0,"SL","FILE")
^P1SL
^rep("HZHA",0,"SL","OUT")
SL1
^rep("HZHA",0,"SL1")
gily my;12H
^rep("HZHA",0,"SUGT")
yz beq;2
^rep("HZHA",0,"SUGT","SET")
0
^rep("HZHA",0,"SUGT","SH")
1
^rep("HZHA",0,"SUGT1")
xe`z;8H
^rep("HZHA",0,"SUGT1","SH")
0
^rep("HZHA",0,"TRH")
jix`z;8D
^rep("HZHA",0,"TRH","SET")
0
^rep("HZHA",0,"TRH","SH")
1
^rep("HZHA",0,"TS")
melyzl;8
^rep("HZHA",0,"TSHL")
melyzl;8
^rep("HZHA",0,"TSHL","OUT")
TSHL
^rep("HZHA",0,"x1")
zenk;5,0
^rep("HZHA",0,"x2")
zexy inc;8,2
^rep("HZHA",0,"x3")
melyzl;8,2
^rep("HZHA",0,"x4")
gilyl;7,2
^rep("HZHA",0,"x5")
;,
^rep("HZHA","COD")
PSL*PSL1*IR*AZOR*NMB*NAME*KTV*TRH*SHAA*HZM*SUGT*x1*x2*x3*x4
^rep("HZHA","CT")
1*2*2*0*2*2*0*0*0*0*0
^rep("HZHA","FLD")
PSL*IR*AZOR*NMB*KTV*TRH*SHAA*HZM*SUGT*x1*x2*x3*x4
^rep("HZHA","FLD0")
**********
^rep("HZHA","GLOB1")
^P1H
^rep("HZHA","GLOB2")
^P1H(DATH,HZM)
^rep("HZHA","LPT")
B
^rep("HZHA","MIUN")
1*3*4*6*5*2*7*8*9*8*9
^rep("HZHA","QUERY","fkexn","CT")
1*2*2*0*2*0*0*0*0*0
^rep("HZHA","QUERY","fkexn","FLD0")
*****-*-****
^rep("HZHA","QUERY","fkexn","MIUN")
1*2*3*5*4*5*6*6*7*8
^rep("HZHA","QUERY","fkexn","SIK0")
1*0*1*0*0*0*0*0*0*0
^rep("HZHA","QUERY","hxetn","CT")
1*2*2*0*2*2*0*0*0*0*0
^rep("HZHA","QUERY","hxetn","FLD0")
**********
^rep("HZHA","QUERY","hxetn","MIUN")
1*3*4*6*5*2*7*8*9*8*9
^rep("HZHA","QUERY","hxetn","SIK0")
1*0*1*0*0*1*0*0*0*0*0
^rep("HZHA","SIK")
1*1*1*1*
^rep("HZHA","SIK0")
1*0*1*0*0*1*0*0*0*0*0
^rep("HZHA","US",0)
D HZM^P1HZHC
^rep("HZHA","US",1)
D TRH^P1HZHCA
^rep("HZHA","US",2)
D HZM^P1HZHCA
^rep("HZHL")
zepnfd itl dtwd zegewl g"ec
^rep("HZHL",0,"HB")
dtwd oeayg;8
^rep("HZHL",0,"HB","SET")
1
^rep("HZHL",0,"HB","SH")
1
^rep("HZHL",0,"HZM")
dpnfd;7
^rep("HZHL",0,"HZM","SET")
0
^rep("HZHL",0,"HZM","SH")
1
^rep("HZHL",0,"LKH")
gewl 'qn;11
^rep("HZHL",0,"LKH","FILE")
^LKH
^rep("HZHL",0,"LKH","OUT")
LKH1
^rep("HZHL",0,"LKH","SET")
0
^rep("HZHL",0,"LKH1")
ge'l my;12
^rep("HZHL",0,"LKH1","SET")
0
^rep("HZHL",0,"LKH1","SH")
1
^rep("HZHL",0,"LKHR")
iy`x gewl;10
^rep("HZHL",0,"LKHR","FILE")
^LKH
^rep("HZHL",0,"LKHR","OUT")
LKHR1
^rep("HZHL",0,"LKHR","SET")
0
^rep("HZHL",0,"LKHR1")
gewl my;12H
^rep("HZHL",0,"LKHR1","SET")
0
^rep("HZHL",0,"LKHR1","SH")
1
^rep("HZHL",0,"SUGL")
zegewl zveaw;8
^rep("HZHL",0,"SUGL","FILE")
^SUGL
^rep("HZHL",0,"SUGL","OUT")
SUGL1
^rep("HZHL",0,"SUGL","SET")
0
^rep("HZHL",0,"SUGL1")
dveaw xe`z;12H
^rep("HZHL",0,"SUGL1","SET")
0
^rep("HZHL",0,"SUGL1","SH")
1
^rep("HZHL",0,"TRH")
jix`z;8D
^rep("HZHL",0,"TRH","SET")
0
^rep("HZHL",0,"TRH","SH")
1
^rep("HZHL",0,"x1")
dgpd iptl;8,2
^rep("HZHL",0,"x2")
dgpd;7,2
^rep("HZHL",0,"x3")
dgpd ixg`;8,2
^rep("HZHL",0,"x4")
;,
^rep("HZHL","COD")
SUGL*SUGL1*LKHR*LKHR1*LKH*LKH1*TRH*HZM*HB*x1*x2*x3
^rep("HZHL","CT")
2*2*2*2*0*0
^rep("HZHL","FLD")
SUGL*LKHR*LKH*TRH*HZM*HB*x1*x2*x3
^rep("HZHL","FLD0")
-*-*******
^rep("HZHL","GLOB1")
^P1HB2I
^rep("HZHL","GLOB2")
^P1HB2I(DT,HB)
^rep("HZHL","LPT")
B
^rep("HZHL","MIUN")
2*3*1*2*3*4
^rep("HZHL","QUERY","mikix`ze zegewl itl","CT")
2*2*2*0*0*0
^rep("HZHL","QUERY","mikix`ze zegewl itl","FLD0")
-*-*******
^rep("HZHL","QUERY","mikix`ze zegewl itl","MIUN")
2*3*1*2*3*4
^rep("HZHL","QUERY","mikix`ze zegewl itl","SIK0")
1*1*1*1*0*0
^rep("HZHL","QUERY","zegewle mikix`z itl","CT")
2*2*2*2*0*0
^rep("HZHL","QUERY","zegewle mikix`z itl","FLD0")
-*-*******
^rep("HZHL","QUERY","zegewle mikix`z itl","MIUN")
2*3*1*2*3*4
^rep("HZHL","QUERY","zegewle mikix`z itl","SIK0")
1*1*1*1*0*0
^rep("HZHL","QUERY","zepnfde zegewl itl","CT")
1*1*2*0*0*0
^rep("HZHL","QUERY","zepnfde zegewl itl","FLD0")
********
^rep("HZHL","QUERY","zepnfde zegewl itl","MIUN")
1*2*3*4*5*6
^rep("HZHL","QUERY","zepnfde zegewl itl","SIK0")
1*1*1*0*0*0
^rep("HZHL","SIK")
1*1*1*
^rep("HZHL","SIK0")
1*1*1*1*0*0
^rep("HZHL","US",1)
D DT^P1HZHL
^rep("HZHL","US",2)
D HB^P1HZHL
^rep("HZHL2")
zegezt zepnfd g"ec
^rep("HZHL2","COD")

^rep("HZHL2","GLOB1")
^P1HL2
^rep("HZHL2","GLOB2")
^P1HL2(LKH,HZM)
^rep("HZHM")
dcrqnl zepnfd g"ec
^rep("HZHM",0,"HB")
zipeayg;8
^rep("HZHM",0,"HZM")
dpnfd;7
^rep("HZHM",0,"HZM","SH")
1
^rep("HZHM",0,"LKH")
gewl 'qn;10
^rep("HZHM",0,"LKH","FILE")
^LKH
^rep("HZHM",0,"LKH","OUT")
LKH1
^rep("HZHM",0,"LKH1")
gewl my;20H
^rep("HZHM",0,"MKBL")
xvln;5
^rep("HZHM",0,"MKBL","FILE")
^NAME
^rep("HZHM",0,"MKBL","M2")
S MKBL1=$$^P1NAME(MKBL)
^rep("HZHM",0,"MKBL","OUT")
MKBL1
^rep("HZHM",0,"MKBL1")
xvln my;12H
^rep("HZHM",0,"MKBL1","SH")
0
^rep("HZHM",0,"MLZR")
xvln 'qn;5
^rep("HZHM",0,"MLZR",2)
I MLZR S MLZR1=$G(^NAME(MLZR,1))
^rep("HZHM",0,"MLZR","OUT")
MLZR1
^rep("HZHM",0,"MLZR1")
xvln my;12H
^rep("HZHM",0,"MLZR1","SH")
1
^rep("HZHM",0,"NAME")
gewl my;12H
^rep("HZHM",0,"NAME","SH")
1
^rep("HZHM",0,"NCAB")
zipeayg;6
^rep("HZHM",0,"NCAB","SH")
0
^rep("HZHM",0,"NMB")
ogley;5
^rep("HZHM",0,"NMB","SH")
1
^rep("HZHM",0,"PSL")
gily cew;3
^rep("HZHM",0,"PSL","FILE")
^P1SL
^rep("HZHM",0,"PSL","OUT")
PSL1
^rep("HZHM",0,"PSL1")
gily my;10H
^rep("HZHM",0,"PSL1","SH")
1
^rep("HZHM",0,"SHAA")
dry;5
^rep("HZHM",0,"SHAA","SH")
1
^rep("HZHM",0,"SL")
gily cew;5
^rep("HZHM",0,"SL","FILE")
^P1SL
^rep("HZHM",0,"SL","OUT")
SL1
^rep("HZHM",0,"SL1")
gily my;12H
^rep("HZHM",0,"SOAD")
micreq;6
^rep("HZHM",0,"SOAD","SH")
1
^rep("HZHM",0,"SUGS")
ogley beq;8
^rep("HZHM",0,"SUGS","FILE")
^SUGS
^rep("HZHM",0,"SUGS","OUT")
SUGS1
^rep("HZHM",0,"SUGS1")
xe`z;12H
^rep("HZHM",0,"SUGS1","SH")
1
^rep("HZHM",0,"SUGT")
melyz beq;9
^rep("HZHM",0,"SUGT","SH")
1
^rep("HZHM",0,"TRH")
jix`z;8D
^rep("HZHM",0,"TRH","SH")
1
^rep("HZHM",0,"TS")
melyzl;8
^rep("HZHM",0,"TSHL")
melyzl;8
^rep("HZHM",0,"TSHL","OUT")
TSHL
^rep("HZHM",0,"x1")
milehia;8,2
^rep("HZHM",0,"x2")
zegpd;8,2
^rep("HZHM",0,"x3")
zexy;8,2
^rep("HZHM",0,"x4")
melyzl;9,2
^rep("HZHM",0,"x5")
micreq;6,0
^rep("HZHM",0,"x6")
;,
^rep("HZHM","COD")
MKBL*MKBL1*SUGS*SUGS1*NMB*TRH*SHAA*HZM*SUGT*x1*x2*x3*x4*x5
^rep("HZHM","CT")
0*0*0*0*0*0*0*0
^rep("HZHM","FLD")
MKBL*SUGS*NMB*TRH*SHAA*HZM*SUGT*x1*x2*x3*x4*x5
^rep("HZHM","FLD0")
*-*****-*-*-**
^rep("HZHM","GLOB1")
^P1H
^rep("HZHM","GLOB2")
^P1H(DATH,HZM)
^rep("HZHM","LPT")
B
^rep("HZHM","MIUN")
2*3*4*3*5*1*6*7
^rep("HZHM","QUERY","dpnfd 'qn itl","CT")
0*0*0*0*0*0*0*0
^rep("HZHM","QUERY","dpnfd 'qn itl","FLD0")
*-*****-*-*-**
^rep("HZHM","QUERY","dpnfd 'qn itl","MIUN")
2*3*4*3*5*1*6*7
^rep("HZHM","QUERY","dpnfd 'qn itl","SIK0")
0*0*0*0*0*0*0*0
^rep("HZHM","QUERY","fkexn ogley beq itl","CT")
2*2*0*0*0*0*0
^rep("HZHM","QUERY","fkexn ogley beq itl","FLD0")
-**-**-*-*-*****
^rep("HZHM","QUERY","fkexn ogley beq itl","MIUN")
3*1*3*2*4*5*6
^rep("HZHM","QUERY","fkexn ogley beq itl","SIK0")
0*1*1*0*0*0*0
^rep("HZHM","QUERY","hxetn ogley beq itl","CT")
2*1*0*2*0*0*0
^rep("HZHM","QUERY","hxetn ogley beq itl","FLD0")
-******-****
^rep("HZHM","QUERY","hxetn ogley beq itl","MIUN")
3*1*3*2*4*5*6
^rep("HZHM","QUERY","hxetn ogley beq itl","SIK0")
0*1*1*1*0*0*0
^rep("HZHM","QUERY","xvln 'qn itl","CT")
1*0*0*0*0*0*0
^rep("HZHM","QUERY","xvln 'qn itl","FLD0")
*-*****-****
^rep("HZHM","QUERY","xvln 'qn itl","MIUN")
1*3*2*3*5*4*6
^rep("HZHM","QUERY","xvln 'qn itl","SIK0")
1*0*0*0*0*0*0
^rep("HZHM","SHP","KOD")
P1HZH
^rep("HZHM","SIK")
1*1*1*1*1*
^rep("HZHM","SIK0")
0*0*0*0*0*0*0*0
^rep("HZHM","US",-1)
D TRH^P1HZHC
^rep("HZHM","US",0)
D HZM^P1HZHC
^rep("HZHM","US",1)
D TRH^P1HZHC
^rep("HZHM","US",2)
D HZM^P1HZHC
^rep("HZMM")
zecrqn itl itqk migelyn g"ec
^rep("HZMM",0,"HZM")
xtqn;7
^rep("HZMM",0,"HZM","SH")
0
^rep("HZMM",0,"MSD")
dcrqn;5
^rep("HZMM",0,"MSD","FILE")
^P1MSD
^rep("HZMM",0,"MSD","OUT")
MSD1
^rep("HZMM",0,"MSD1")
dcrqn my;12H
^rep("HZMM",0,"MSD1","SH")
1
^rep("HZMM",0,"TD")
dcerz;7
^rep("HZMM",0,"TD","SH")
1
^rep("HZMM",0,"TD1")
dcerz;7
^rep("HZMM",0,"TD1","SH")
0
^rep("HZMM",0,"TRH")
jix`z;8D
^rep("HZMM",0,"TRH","SH")
0
^rep("HZMM",0,"VT")
melyz beq;2
^rep("HZMM",0,"VT","SH")
1
^rep("HZMM",0,"VT1")
melyz beq;8
^rep("HZMM",0,"VT1","SH")
0
^rep("HZMM",0,"x1")
mley;8,2
^rep("HZMM",0,"x2")
zexy inc;8,2
^rep("HZMM",0,"x3")
dxzi;8,2
^rep("HZMM",0,"x4")
;0,0
^rep("HZMM",0,"x5")
;,
^rep("HZMM","COD")
MSD*MSD1*VT1*TRH*TD1*HZM*x1*x2*x3*x4
^rep("HZMM","CT")
1*2*0*0*0*
^rep("HZMM","FLD")
MSD*VT1*TRH*TD1*HZM*x1*x2*x3*x4
^rep("HZMM","GLOB1")
^VRM($J)
^rep("HZMM","GLOB2")
^VRM($J,MSD,DD,TD,HZM,VT)
^rep("HZMM","LPT")
B
^rep("HZMM","MIUN")
1*2*3*4*5*6
^rep("HZMM","SIK")
1*1*1**
^rep("HZMM","SIK0")
1*1*0*0*0*
^rep("HZMM","US",3)
D DD^P1SUMM
^rep("HZMM","US",4)
D TD^P1SUMM
^rep("HZMM","US",6)
D VT^P1SUMM
^rep("LEVD")
xvewn illk micaer g"ec
^rep("LEVD",0,"NOM")
dxey;5
^rep("LEVD",0,"NOM","SH")
1
^rep("LEVD",0,"STRING")
caer 'qn;8
^rep("LEVD",0,"STRING","FILE")
^NAME
^rep("LEVD",0,"STRING","M2")
S STRING1=$$^P1NAME(STRING)
^rep("LEVD",0,"STRING","OUT")
STRING1
^rep("LEVD",0,"STRING1")
caer my;16H
^rep("LEVD",0,"STRING1","SH")
1
^rep("LEVD",0,"x1")
dqipk jix`z;11,0
^rep("LEVD",0,"x2")
mei;3,0
^rep("LEVD",0,"x3")
dry;5,0
^rep("LEVD",0,"x4")
d`ivi jix`z;11,0
^rep("LEVD",0,"x5")
mei;3,0
^rep("LEVD",0,"x6")
dry;5,0
^rep("LEVD",0,"x7")
zery k"dq;9,2
^rep("LEVD","COD")
STRING*STRING1*NOM*x1*x2*x3*x4*x5*x6*x7
^rep("LEVD","CT")
2*0
^rep("LEVD","FLD")
STRING*NOM*x1*x2*x3*x4*x5*x6*x7
^rep("LEVD","FLD0")
********
^rep("LEVD","GLOB1")
^TEMP($P)
^rep("LEVD","GLOB2")
^TEMP($P,STRING,NOM)
^rep("LEVD","LPT")
B
^rep("LEVD","MIUN")
1*2
^rep("LEVD","QUERY","inei micaer g""ec","CT")
2*0
^rep("LEVD","QUERY","inei micaer g""ec","FLD0")
*****-*-**
^rep("LEVD","QUERY","inei micaer g""ec","MIUN")
1*2
^rep("LEVD","QUERY","inei micaer g""ec","SIK0")
1*0
^rep("LEVD","QUERY","iztewz micaer g""ec","CT")
2*0
^rep("LEVD","QUERY","iztewz micaer g""ec","FLD0")
********
^rep("LEVD","QUERY","iztewz micaer g""ec","MIUN")
1*2
^rep("LEVD","QUERY","iztewz micaer g""ec","SIK0")
1*0
^rep("LEVD","SIK")
******1*
^rep("LEVD","SIK0")
1*0
^rep("LEVD","US",2)
S STRING1=$$^P1NAME(STRING)
^rep("LEVD","US",3)
D TM^LEVD
^rep("MBPR")
zepnfd ilawn itl mihixt g"ec
^rep("MBPR",0,"MLZR")
xvln;9
^rep("MBPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^rep("MBPR",0,"MLZR","OUT")
MLZR1
^rep("MBPR",0,"MLZR1")
xvln my;12H
^rep("MBPR",0,"MLZR1","SH")
0
^rep("MBPR",0,"PAR")
hixt;5
^rep("MBPR",0,"PAR","FILE")
^PAR
^rep("MBPR",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("MBPR",0,"PAR","OUT")
PAR1
^rep("MBPR",0,"PAR1")
hixt xe`z;20H
^rep("MBPR",0,"PAR1","SH")
1
^rep("MBPR",0,"SUGP")
hixt beq;3
^rep("MBPR",0,"SUGP","FILE")
^PARSUG
^rep("MBPR",0,"SUGP","OUT")
SUGP1
^rep("MBPR",0,"SUGP1")
beq xe`z;10H
^rep("MBPR",0,"SUGP1","SH")
0
^rep("MBPR",0,"SUGS")
lawn;5.
^rep("MBPR",0,"SUGS","FILE")
^NAME
^rep("MBPR",0,"SUGS","M2")
S SUGS1=$G(^NAME(SUGS,1))
^rep("MBPR",0,"SUGS","OUT")
SUGS1
^rep("MBPR",0,"SUGS1")
lawnd my;12H
^rep("MBPR",0,"SUGS1","SH")
1
^rep("MBPR",0,"x1")
zenk;5,0
^rep("MBPR",0,"x2")
dgpd iptl;10,2
^rep("MBPR",0,"x3")
hixtl dgpd;10,2
^rep("MBPR",0,"x4")
k"dq;8,2
^rep("MBPR",0,"x5")
;,
^rep("MBPR",0,"x6")
;,
^rep("MBPR","COD")
SUGS*SUGS1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4
^rep("MBPR","CT")
1*2*0*0*0*0*0
^rep("MBPR","FLD")
SUGS*SUGP*PAR*x1*x2*x3*x4
^rep("MBPR","FLD0")
*-*****
^rep("MBPR","GLOB1")
^VRM(PRTN)
^rep("MBPR","GLOB2")
^VRM(PRTN,SUGS,SUGP,PAR)
^rep("MBPR","LPT")
S
^rep("MBPR","MIUN")
1*2*3*4*2*0*0
^rep("MBPR","QUERY","hixt beq `ll","CT")
1*2*0*0*0*0*0
^rep("MBPR","QUERY","hixt beq `ll","FLD0")
*-*****
^rep("MBPR","QUERY","hixt beq `ll","MIUN")
1*2*3*4*2*0*0
^rep("MBPR","QUERY","hixt beq `ll","SIK0")
1*0*0*0*0*0*0
^rep("MBPR","QUERY","hixt beq itl","CT")
2*1*0*0*0*0*0
^rep("MBPR","QUERY","hixt beq itl","FLD0")
******
^rep("MBPR","QUERY","hixt beq itl","MIUN")
1*1*2*4*2*0*0
^rep("MBPR","QUERY","hixt beq itl","SIK0")
0*0*0*0*0*0*0
^rep("MBPR","SHP","KOD")
P1DPMKB
^rep("MBPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^rep("MBPR","SIK")
1*1*1*1**
^rep("MBPR","SIK0")
1*0*0*0*0*0*0
^rep("MBPR","US",4)
D PAR^P1DPMKB
^rep("MDBL")
zeveaw itl zegewl zbvd
^rep("MDBL",0,"EMAIL")
E-MAIL;30
^rep("MDBL",0,"EMAIL","SET")
0
^rep("MDBL",0,"EMAIL","SH")
0
^rep("MDBL",0,"IR")
xir;12H
^rep("MDBL",0,"IR","SH")
0
^rep("MDBL",0,"KTV")
zaezk;20H
^rep("MDBL",0,"KTV","SH")
0
^rep("MDBL",0,"LKH")
gewl 'qn;10
^rep("MDBL",0,"LKH","FILE")
^LKH
^rep("MDBL",0,"LKH","OUT")
LKH1
^rep("MDBL",0,"LKH","SET")
1
^rep("MDBL",0,"LKH1")
gewl xe`z;32H
^rep("MDBL",0,"LKH1","SET")
0
^rep("MDBL",0,"LKH1","SH")
1
^rep("MDBL",0,"MANUJ")
dcil jix`z;8D
^rep("MDBL",0,"MANUJ","SH")
1
^rep("MDBL",0,"MIKUD")
cewin;5
^rep("MDBL",0,"MIKUD","SH")
1
^rep("MDBL",0,"SUGL")
gewl beq;8
^rep("MDBL",0,"SUGL","FILE")
^SUGL
^rep("MDBL",0,"SUGL","OUT")
SUGL1
^rep("MDBL",0,"SUGL","SET")
0
^rep("MDBL",0,"SUGL1")
xe`z;12H
^rep("MDBL",0,"SUGL1","SET")
0
^rep("MDBL",0,"SUGL1","SH")
1
^rep("MDBL",0,"TEL")
oetlh;10
^rep("MDBL",0,"TEL","SH")
0
^rep("MDBL",0,"x1")
oetlh;10,0
^rep("MDBL",0,"x2")
zaezk;22,0
^rep("MDBL",0,"x3")
xir;12,0
^rep("MDBL",0,"x4")
cewin;5,0
^rep("MDBL",0,"x5")
;,
^rep("MDBL",0,"x6")
cewin;5,0
^rep("MDBL",0,"x7")
;,
^rep("MDBL","COD")
SUGL*SUGL1*LKH*LKH1*x1*x2*x3*x4
^rep("MDBL","CT")
1*0*0*0*0*0
^rep("MDBL","FLD")
SUGL*LKH*x1*x2*x3*x4
^rep("MDBL","FLD0")
*****
^rep("MDBL","GLOB1")
^LKH
^rep("MDBL","GLOB2")
^LKH(LKH)
^rep("MDBL","LPT")
B
^rep("MDBL","MIUN")
1*2*3*4*4*5
^rep("MDBL","QUERY","cewin itl ","CT")
1*0*0*0*0*0
^rep("MDBL","QUERY","cewin itl ","FLD0")
*****
^rep("MDBL","QUERY","cewin itl ","MIUN")
1*2*3*4*4*5
^rep("MDBL","QUERY","cewin itl ","SIK0")
0*0*0*0*0*0
^rep("MDBL","SIK")
****
^rep("MDBL","SIK0")
0*0*0*0*0*0
^rep("MDBL","US",-1)
D LKH^KLMADB
^rep("MDBL","US",1)
D LKH^KLMADB
^rep("MDBL0")
zeveaw itl zegewl zbvd
^rep("MDBL0",0,"IR")
xir;12H
^rep("MDBL0",0,"IR","SH")
0
^rep("MDBL0",0,"KTV")
zaezk;20H
^rep("MDBL0",0,"KTV","SH")
0
^rep("MDBL0",0,"LKH")
gewl 'qn;10
^rep("MDBL0",0,"LKH","FILE")
^LKH
^rep("MDBL0",0,"LKH","OUT")
LKH1
^rep("MDBL0",0,"LKH1")
gewl xe`z;32H
^rep("MDBL0",0,"LKH1","SH")
1
^rep("MDBL0",0,"MANUJ")
dcil jix`z;8D
^rep("MDBL0",0,"MANUJ","SH")
1
^rep("MDBL0",0,"MIKUD")
cewin;5
^rep("MDBL0",0,"MIKUD","SH")
1
^rep("MDBL0",0,"SUGL")
gewl beq;8
^rep("MDBL0",0,"SUGL","FILE")
^SUGL
^rep("MDBL0",0,"SUGL","OUT")
SUGL1
^rep("MDBL0",0,"SUGL1")
xe`z;12H
^rep("MDBL0",0,"SUGL1","SH")
1
^rep("MDBL0",0,"TEL")
oetlh;10
^rep("MDBL0",0,"TEL","SH")
0
^rep("MDBL0",0,"x1")
oetlh;10,0
^rep("MDBL0",0,"x2")
zaezk;22,0
^rep("MDBL0",0,"x3")
xir;12,0
^rep("MDBL0",0,"x4")
cewin;5,0
^rep("MDBL0",0,"x5")
;,
^rep("MDBL0","COD")
SUGL*SUGL1*LKH*LKH1*x1*x2*x3*x4
^rep("MDBL0","CT")
1*0*0*0*0*0
^rep("MDBL0","FLD")
SUGL*LKH*x1*x2*x3*x4
^rep("MDBL0","FLD0")
*****
^rep("MDBL0","GLOB1")
^LKH
^rep("MDBL0","GLOB2")
^LKH(LKH)
^rep("MDBL0","LPT")
B
^rep("MDBL0","MIUN")
1*2*3*4*4*5
^rep("MDBL0","QUERY","cewin itl ","CT")
1*0*0*0*0*0
^rep("MDBL0","QUERY","cewin itl ","FLD0")
*****
^rep("MDBL0","QUERY","cewin itl ","MIUN")
1*2*3*4*4*5
^rep("MDBL0","QUERY","cewin itl ","SIK0")
0*0*0*0*0*0
^rep("MDBL0","SIK")
****
^rep("MDBL0","SIK0")
0*0*0*0*0*0
^rep("MDBL0","US",-1)
D LKH^KLMADB
^rep("MDBL0","US",1)
D LKH^KLMADB
^rep("MHAL")
zelr xign mr zewlgn itl zexikn
^rep("MHAL",0,"DAT")
jix`z;8D
^rep("MHAL",0,"DAT","SH")
1
^rep("MHAL",0,"DATT")
jix`z;8D
^rep("MHAL",0,"DATT","SET")
0
^rep("MHAL",0,"DATT","SH")
1
^rep("MHAL",0,"MHL")
dwlgn;5
^rep("MHAL",0,"MHL","FILE")
^DEP
^rep("MHAL",0,"MHL","OUT")
MHL1
^rep("MHAL",0,"MHL","SET")
0
^rep("MHAL",0,"MHL1")
xe`z;12H
^rep("MHAL",0,"MHL1","SET")
0
^rep("MHAL",0,"MHL1","SH")
0
^rep("MHAL",0,"PAR")
hixt;8
^rep("MHAL",0,"PAR","FILE")
^PAR
^rep("MHAL",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("MHAL",0,"PAR","OUT")
PAR1
^rep("MHAL",0,"PAR","SET")
0
^rep("MHAL",0,"PAR1")
hixt my;12H
^rep("MHAL",0,"PAR1","SET")
0
^rep("MHAL",0,"PAR1","SH")
1
^rep("MHAL",0,"PARIT")
hixt cew;8.
^rep("MHAL",0,"PARIT","FILE")
^PAR
^rep("MHAL",0,"PARIT","M2")
D PAR1^L2MHIRA
^rep("MHAL",0,"PARIT","OUT")
PARIT1
^rep("MHAL",0,"PARIT1")
hixt xe`z;18H
^rep("MHAL",0,"PARIT1","SH")
0
^rep("MHAL",0,"SUGP")
dveaw;5
^rep("MHAL",0,"SUGP","FILE")
^PARSUG
^rep("MHAL",0,"SUGP","OUT")
SUGP1
^rep("MHAL",0,"SUGP","SET")
0
^rep("MHAL",0,"SUGP1")
dveaw xe`z;12H
^rep("MHAL",0,"SUGP1","SET")
0
^rep("MHAL",0,"SUGP1","SH")
0
^rep("MHAL",0,"x1")
zenk;7,1
^rep("MHAL",0,"x2")
dxikn xign;7,2
^rep("MHAL",0,"x3")
zelr xign;7,2
^rep("MHAL",0,"x4")
n"rn iptl;9,1
^rep("MHAL",0,"x5")
zelr;9,1
^rep("MHAL",0,"x6")
geex;8,1
^rep("MHAL",0,"x7")
;,
^rep("MHAL","COD")
MHL*MHL1*SUGP*SUGP1*PAR*PAR1*DATT*x1*x2*x3*x4*x5*x6
^rep("MHAL","CT")
1*2*0*2*2*0*0
^rep("MHAL","FLD")
MHL*SUGP*PAR*DATT*x1*x2*x3*x4*x5*x6
^rep("MHAL","FLD0")
*******
^rep("MHAL","GLOB1")
^PLUTOT
^rep("MHAL","GLOB2")
^PLUTOT(DAT,MRK,PARIT)
^rep("MHAL","LPT")
B
^rep("MHAL","MIUN")
1*3*4*2*3*4**0
^rep("MHAL","QUERY","mini itl fkexn","CT")
1*2*0*0*2*0*0
^rep("MHAL","QUERY","mini itl fkexn","FLD0")
-*-*-***-*-***
^rep("MHAL","QUERY","mini itl fkexn","MIUN")
1*3*4*1*3*4**0
^rep("MHAL","QUERY","mini itl fkexn","SIK0")
1*1*0*0*1*0*0
^rep("MHAL","QUERY","mini itl hxetn","CT")
1*2*0*2*2*0*0
^rep("MHAL","QUERY","mini itl hxetn","FLD0")
*******
^rep("MHAL","QUERY","mini itl hxetn","MIUN")
1*3*4*2*3*4**0
^rep("MHAL","QUERY","mini itl hxetn","SIK0")
1*1*0*1*1*0*0
^rep("MHAL","QUERY","zeveaw ila hxetn","CT")
1*2*0*0*2*0*0
^rep("MHAL","QUERY","zeveaw ila hxetn","FLD0")
*-**-****
^rep("MHAL","QUERY","zeveaw ila hxetn","MIUN")
1*2*3*4*3*4**0
^rep("MHAL","QUERY","zeveaw ila hxetn","SIK0")
1*1*0*0*1*0*0
^rep("MHAL","QUERY","zeveawe zewlgn itl fkexn","CT")
2*0*0*0*2*0*0
^rep("MHAL","QUERY","zeveawe zewlgn itl fkexn","FLD0")
**-*-****
^rep("MHAL","QUERY","zeveawe zewlgn itl fkexn","MIUN")
1*2*3*4*3*4**0
^rep("MHAL","QUERY","zeveawe zewlgn itl fkexn","SIK0")
1*0*0*0*1*0*0
^rep("MHAL","QUERY","zeveawe zewlgn itl hxetn","CT")
1*2*0*0*2*0*0
^rep("MHAL","QUERY","zeveawe zewlgn itl hxetn","FLD0")
***-****
^rep("MHAL","QUERY","zeveawe zewlgn itl hxetn","MIUN")
1*2*3*4*3*4**0
^rep("MHAL","QUERY","zeveawe zewlgn itl hxetn","SIK0")
1*1*0*0*1*0*0
^rep("MHAL","SIK")
1***1*1*1**
^rep("MHAL","SIK0")
1*1*0*1*1*0*0
^rep("MHAL","US",-1)
D DAT^L2MHIRA
^rep("MHAL","US",1)
D DAT^L2MHIRA
^rep("MHAL","US",3)
D PAR^L2MHIRA
^rep("MHMK")
mifkxn itl zexikn
^rep("MHMK",0,"DAT")
jix`z;8D
^rep("MHMK",0,"DAT","SH")
1
^rep("MHMK",0,"DATT")
jix`z;8D
^rep("MHMK",0,"DATT","SET")
0
^rep("MHMK",0,"DATT","SH")
1
^rep("MHMK",0,"MHL")
dwlgn;5
^rep("MHMK",0,"MHL","FILE")
^DEP
^rep("MHMK",0,"MHL","OUT")
MHL1
^rep("MHMK",0,"MHL","SET")
0
^rep("MHMK",0,"MHL1")
xe`z;12H
^rep("MHMK",0,"MHL1","SET")
0
^rep("MHMK",0,"MHL1","SH")
0
^rep("MHMK",0,"MRKZ")
fkxn;4
^rep("MHMK",0,"MRKZ","FILE")
^MRKZ
^rep("MHMK",0,"MRKZ","OUT")
MRKZ1
^rep("MHMK",0,"MRKZ","SET")
1
^rep("MHMK",0,"MRKZ1")
fkxn my;12H
^rep("MHMK",0,"MRKZ1","SET")
0
^rep("MHMK",0,"MRKZ1","SH")
1
^rep("MHMK",0,"PAR")
hixt;8
^rep("MHMK",0,"PAR","FILE")
^PAR
^rep("MHMK",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("MHMK",0,"PAR","OUT")
PAR1
^rep("MHMK",0,"PAR","SET")
1
^rep("MHMK",0,"PAR1")
hixt my;12H
^rep("MHMK",0,"PAR1","SET")
0
^rep("MHMK",0,"PAR1","SH")
1
^rep("MHMK",0,"PARIT")
hixt cew;8.
^rep("MHMK",0,"PARIT","FILE")
^PAR
^rep("MHMK",0,"PARIT","M2")
D PAR1^L2MHIRA
^rep("MHMK",0,"PARIT","OUT")
PARIT1
^rep("MHMK",0,"PARIT","SET")
1
^rep("MHMK",0,"PARIT1")
hixt xe`z;18H
^rep("MHMK",0,"PARIT1","SET")
0
^rep("MHMK",0,"PARIT1","SH")
0
^rep("MHMK",0,"PRT")
hixt 'qn;8
^rep("MHMK",0,"PRT","FILE")
^PAR
^rep("MHMK",0,"PRT","M2")
S PRT1=$$SHEM^P1P(PRT)
^rep("MHMK",0,"PRT","OUT")
PRT1
^rep("MHMK",0,"PRT","SET")
0
^rep("MHMK",0,"PRT1")
hixt my;12H
^rep("MHMK",0,"PRT1","SET")
0
^rep("MHMK",0,"PRT1","SH")
1
^rep("MHMK",0,"SUGP")
dveaw;5
^rep("MHMK",0,"SUGP","FILE")
^PARSUG
^rep("MHMK",0,"SUGP","OUT")
SUGP1
^rep("MHMK",0,"SUGP","SET")
0
^rep("MHMK",0,"SUGP1")
dveaw xe`z;12H
^rep("MHMK",0,"SUGP1","SET")
0
^rep("MHMK",0,"SUGP1","SH")
0
^rep("MHMK",0,"x1")
zenk;7,2
^rep("MHMK",0,"x2")
mekq;10,2
^rep("MHMK",0,"x3")
dxikn xign;10,2
^rep("MHMK",0,"x4")
n"rn iptl;10,2
^rep("MHMK",0,"x5")
;,
^rep("MHMK","COD")
MRKZ*MRKZ1*MHL*MHL1*SUGP*SUGP1*PRT*PRT1*DATT*x1*x2*x3*x4
^rep("MHMK","CT")
0*2*2*0*2*0*0
^rep("MHMK","FLD")
MRKZ*MHL*SUGP*PRT*DATT*x1*x2*x3*x4
^rep("MHMK","FLD0")
-*-*-**-****
^rep("MHMK","GLOB1")
^PLUMRK
^rep("MHMK","GLOB2")
^PLUMRK(DAT,MRKZ,PAR)
^rep("MHMK","LPT")
S
^rep("MHMK","MIUN")
2*1*2*1*3*4**0
^rep("MHMK","MIUN","PROG")
CP^L2MHIRA
^rep("MHMK","QUERY","fkexn mifkxn itl mihixt g""ec","CT")
0*2*2*0*2*0*0
^rep("MHMK","QUERY","fkexn mifkxn itl mihixt g""ec","FLD0")
-*-*-**-****
^rep("MHMK","QUERY","fkexn mifkxn itl mihixt g""ec","MIUN")
2*1*2*1*3*4**0
^rep("MHMK","QUERY","fkexn mifkxn itl mihixt g""ec","SIK0")
0*1*1*0*1*0*0
^rep("MHMK","QUERY","hxetn mifkxn itl mihixt g""ec","CT")
0*2*2*2*2*0*0
^rep("MHMK","QUERY","hxetn mifkxn itl mihixt g""ec","FLD0")
*-*-**-****
^rep("MHMK","QUERY","hxetn mifkxn itl mihixt g""ec","MIUN")
2*1*2*1*3*4**0
^rep("MHMK","QUERY","hxetn mifkxn itl mihixt g""ec","SIK0")
0*1*1*1*1*0*0
^rep("MHMK","QUERY","mihixte zeveaw ,zewlgn itl g""ec","CT")
1*2*2*0*2*0*0
^rep("MHMK","QUERY","mihixte zeveaw ,zewlgn itl g""ec","FLD0")
****-****
^rep("MHMK","QUERY","mihixte zeveaw ,zewlgn itl g""ec","MIUN")
1*2*3*4*3*4**0
^rep("MHMK","QUERY","mihixte zeveaw ,zewlgn itl g""ec","SIK0")
1*1*1*0*1*0*0
^rep("MHMK","QUERY","mini itl g""ec","CT")
1*2*0*0*2*0*0
^rep("MHMK","QUERY","mini itl g""ec","FLD0")
**-******
^rep("MHMK","QUERY","mini itl g""ec","MIUN")
1*3*3*4*2*4**0
^rep("MHMK","QUERY","mini itl g""ec","SIK0")
1*1*0*0*1*0*0
^rep("MHMK","QUERY","zeveawe zewlgn itl fkexn g""ec","CT")
1*2*0*0*2*0*0
^rep("MHMK","QUERY","zeveawe zewlgn itl fkexn g""ec","FLD0")
***-*-****
^rep("MHMK","QUERY","zeveawe zewlgn itl fkexn g""ec","MIUN")
1*2*3*4*3*4**0
^rep("MHMK","QUERY","zeveawe zewlgn itl fkexn g""ec","SIK0")
1*0*0*0*1*0*0
^rep("MHMK","QUERY","zewlgn `ll mini itl g""ec","CT")
1*2*0*0*2*0*0
^rep("MHMK","QUERY","zewlgn `ll mini itl g""ec","FLD0")
*-*-******
^rep("MHMK","QUERY","zewlgn `ll mini itl g""ec","MIUN")
1*3*3*3*2*4**0
^rep("MHMK","QUERY","zewlgn `ll mini itl g""ec","SIK0")
1*1*0*0*1*0*0
^rep("MHMK","QUERY","zewlgne mifkxn itl fkexn g""ec","CT")
2*0*0*0*2*0*0
^rep("MHMK","QUERY","zewlgne mifkxn itl fkexn g""ec","FLD0")
**-*-*-****
^rep("MHMK","QUERY","zewlgne mifkxn itl fkexn g""ec","MIUN")
1*2*3*4*3*4**0
^rep("MHMK","QUERY","zewlgne mifkxn itl fkexn g""ec","SIK0")
1*0*0*0*1*0*0
^rep("MHMK","SIK")
1*1*0*1**1*0*
^rep("MHMK","SIK0")
0*1*1*0*1*0*0
^rep("MHMK","US",1)
D DAT^L2MHIRA
^rep("MHMK","US",3)
D PAR^L2MHIRA
^rep("MHRA")
zewlgn itl zexikn
^rep("MHRA",0,"DAT")
jix`z;8D
^rep("MHRA",0,"DAT","SH")
1
^rep("MHRA",0,"DATT")
jix`z;8D
^rep("MHRA",0,"DATT","SET")
0
^rep("MHRA",0,"DATT","SH")
1
^rep("MHRA",0,"MHL")
dwlgn;5
^rep("MHRA",0,"MHL","FILE")
^DEP
^rep("MHRA",0,"MHL","OUT")
MHL1
^rep("MHRA",0,"MHL","SET")
0
^rep("MHRA",0,"MHL1")
xe`z;12H
^rep("MHRA",0,"MHL1","SET")
0
^rep("MHRA",0,"MHL1","SH")
0
^rep("MHRA",0,"PAR")
hixt;8
^rep("MHRA",0,"PAR","FILE")
^PAR
^rep("MHRA",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("MHRA",0,"PAR","OUT")
PAR1
^rep("MHRA",0,"PAR","SET")
0
^rep("MHRA",0,"PAR1")
hixt my;12H
^rep("MHRA",0,"PAR1","SET")
0
^rep("MHRA",0,"PAR1","SH")
1
^rep("MHRA",0,"PARIT")
hixt cew;8.
^rep("MHRA",0,"PARIT","FILE")
^PAR
^rep("MHRA",0,"PARIT","M2")
D PAR1^L2MHIRA
^rep("MHRA",0,"PARIT","OUT")
PARIT1
^rep("MHRA",0,"PARIT1")
hixt xe`z;18H
^rep("MHRA",0,"PARIT1","SH")
0
^rep("MHRA",0,"SUGP")
dveaw;5
^rep("MHRA",0,"SUGP","FILE")
^PARSUG
^rep("MHRA",0,"SUGP","OUT")
SUGP1
^rep("MHRA",0,"SUGP","SET")
0
^rep("MHRA",0,"SUGP1")
dveaw xe`z;12H
^rep("MHRA",0,"SUGP1","SET")
0
^rep("MHRA",0,"SUGP1","SH")
0
^rep("MHRA",0,"x1")
zenk;7,2
^rep("MHRA",0,"x2")
mekq;10,2
^rep("MHRA",0,"x3")
dxikn xign;10,2
^rep("MHRA",0,"x4")
n"rn iptl;10,2
^rep("MHRA",0,"x5")
;,
^rep("MHRA","COD")
MHL*MHL1*SUGP*SUGP1*PAR*PAR1*DATT*x1*x2*x3*x4
^rep("MHRA","CT")
1*2*0*0*2*0*0
^rep("MHRA","FLD")
MHL*SUGP*PAR*DATT*x1*x2*x3*x4
^rep("MHRA","FLD0")
-*-*-****-*
^rep("MHRA","GLOB1")
^PLUTOT
^rep("MHRA","GLOB2")
^PLUTOT(DAT,MRK,PARIT)
^rep("MHRA","LPT")
S
^rep("MHRA","MIUN")
1*3*4*1*3*4**0
^rep("MHRA","QUERY","mini itl fkexn","CT")
1*2*0*0*2*0*0
^rep("MHRA","QUERY","mini itl fkexn","FLD0")
-*-*-****-*
^rep("MHRA","QUERY","mini itl fkexn","MIUN")
1*3*4*1*3*4**0
^rep("MHRA","QUERY","mini itl fkexn","SIK0")
1*1*0*0*1*0*0
^rep("MHRA","QUERY","mini itl hxetn","CT")
1*2*0*2*2*0*0
^rep("MHRA","QUERY","mini itl hxetn","FLD0")
*******
^rep("MHRA","QUERY","mini itl hxetn","MIUN")
1*3*4*2*3*4**0
^rep("MHRA","QUERY","mini itl hxetn","SIK0")
1*1*0*1*1*0*0
^rep("MHRA","QUERY","zeveaw ila hxetn","CT")
1*2*0*0*2*0*0
^rep("MHRA","QUERY","zeveaw ila hxetn","FLD0")
*-**-****
^rep("MHRA","QUERY","zeveaw ila hxetn","MIUN")
1*2*3*4*3*4**0
^rep("MHRA","QUERY","zeveaw ila hxetn","SIK0")
1*1*0*0*1*0*0
^rep("MHRA","QUERY","zeveawe zewlgn itl fkexn","CT")
2*0*0*0*2*0*0
^rep("MHRA","QUERY","zeveawe zewlgn itl fkexn","FLD0")
**-*-****
^rep("MHRA","QUERY","zeveawe zewlgn itl fkexn","MIUN")
1*2*3*4*3*4**0
^rep("MHRA","QUERY","zeveawe zewlgn itl fkexn","SIK0")
1*0*0*0*1*0*0
^rep("MHRA","QUERY","zeveawe zewlgn itl hxetn","CT")
1*2*0*0*2*0*0
^rep("MHRA","QUERY","zeveawe zewlgn itl hxetn","FLD0")
***-****
^rep("MHRA","QUERY","zeveawe zewlgn itl hxetn","MIUN")
1*2*3*4*3*4**0
^rep("MHRA","QUERY","zeveawe zewlgn itl hxetn","SIK0")
1*1*0*0*1*0*0
^rep("MHRA","SIK")
1*1*0*1**1*0*
^rep("MHRA","SIK0")
1*1*0*0*1*0*0
^rep("MHRA","US",1)
D DAT^L2MHIRA
^rep("MHRA","US",3)
D PAR^L2MHIRA
^rep("MLZT")
melyz ibeq itl g"ec
^rep("MLZT",0,"EMDA")
dcnr;4
^rep("MLZT",0,"EMDA","SET")
0
^rep("MLZT",0,"EMDA","SH")
1
^rep("MLZT",0,"HZM")
dpnfd;8
^rep("MLZT",0,"HZM","SET")
1
^rep("MLZT",0,"HZM","SH")
1
^rep("MLZT",0,"MLZ")
xvln 'qn;5
^rep("MLZT",0,"MLZ","FILE")
^NAME
^rep("MLZT",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^rep("MLZT",0,"MLZ","OUT")
MLZ1
^rep("MLZT",0,"MLZ","SET")
0
^rep("MLZT",0,"MLZ1")
xvln my;12H
^rep("MLZT",0,"MLZ1","SET")
0
^rep("MLZT",0,"MLZ1","SH")
1
^rep("MLZT",0,"NMB")
ogley;8
^rep("MLZT",0,"NMB","SET")
0
^rep("MLZT",0,"NMB","SH")
1
^rep("MLZT",0,"PART")
dcnr;4
^rep("MLZT",0,"PART","FILE")
^PLUK
^rep("MLZT",0,"PART","SH")
1
^rep("MLZT",0,"SHAA")
dry;5
^rep("MLZT",0,"SHAA","SET")
0
^rep("MLZT",0,"SHAA","SH")
1
^rep("MLZT",0,"SHULH")
ogley;5
^rep("MLZT",0,"SHULH","SH")
1
^rep("MLZT",0,"SUGS")
ogley beq;5
^rep("MLZT",0,"SUGS","FILE")
^SUGS
^rep("MLZT",0,"SUGS","OUT")
SUGS1
^rep("MLZT",0,"SUGS","SET")
0
^rep("MLZT",0,"SUGS1")
beq xe`z;6H
^rep("MLZT",0,"SUGS1","SET")
0
^rep("MLZT",0,"SUGS1","SH")
1
^rep("MLZT",0,"TRH")
jix`z;8D
^rep("MLZT",0,"TRH","SH")
1
^rep("MLZT",0,"TRHT")
jix`z;8D
^rep("MLZT",0,"TRHT","SET")
0
^rep("MLZT",0,"TRHT","SH")
1
^rep("MLZT",0,"x1")
melyzl;8,2
^rep("MLZT",0,"x2")
onefn;8,2
^rep("MLZT",0,"x3")
wiy;8,2
^rep("MLZT",0,"x4")
`"k;8,2
^rep("MLZT",0,"x5")
dtwd;8,2
^rep("MLZT",0,"x6")
dpzn 'lz;8,2
^rep("MLZT",0,"x7")
tih;7,2
^rep("MLZT",0,"x8")
;,
^rep("MLZT","COD")
MLZ*MLZ1*SUGS*SUGS1*EMDA*NMB*SHAA*TRHT*HZM*x1*x2*x3*x4*x5*x6*x7
^rep("MLZT","CT")
1*2*0*0*0*2*0
^rep("MLZT","FLD")
MLZ*SUGS*EMDA*NMB*SHAA*TRHT*HZM*x1*x2*x3*x4*x5*x6*x7
^rep("MLZT","FLD0")
-*-*-*-*-********-*
^rep("MLZT","GLOB1")
^P1H
^rep("MLZT","GLOB2")
^P1H(DATH,HZM)
^rep("MLZT","LPT")
B
^rep("MLZT","MIUN")
1*2*3*4*3*1*2
^rep("MLZT","QUERY","1.                fkexn mixvln itl","CT")
2*2*0*0*2*0*0
^rep("MLZT","QUERY","1.                fkexn mixvln itl","FLD0")
*-*-*-*-**-*******
^rep("MLZT","QUERY","1.                fkexn mixvln itl","MIUN")
1*2*3*4*1*2*3
^rep("MLZT","QUERY","1.                fkexn mixvln itl","SIK0")
1*0*0*0*1*0*0
^rep("MLZT","QUERY","2.                hxetn mixvln itl","CT")
1*2*0*0*0*2*0
^rep("MLZT","QUERY","2.                hxetn mixvln itl","FLD0")
*-*-*-*-*********
^rep("MLZT","QUERY","2.                hxetn mixvln itl","MIUN")
1*2*3*4*2*2*3
^rep("MLZT","QUERY","2.                hxetn mixvln itl","SIK0")
1*0*0*0*0*1*0
^rep("MLZT","QUERY","3. fkexn zepgleye zepgley ibeq itl","CT")
1*1*0*2*2*0*0
^rep("MLZT","QUERY","3. fkexn zepgleye zepgley ibeq itl","FLD0")
-**-**-**-*******
^rep("MLZT","QUERY","3. fkexn zepgleye zepgley ibeq itl","MIUN")
1*1*3*2*1*3*3
^rep("MLZT","QUERY","3. fkexn zepgleye zepgley ibeq itl","SIK0")
1*1*0*1*1*0*0
^rep("MLZT","QUERY","4. hxetn zepgleye zepgley ibeq itl","CT")
1*1*2*0*0*2*0
^rep("MLZT","QUERY","4. hxetn zepgleye zepgley ibeq itl","FLD0")
-**-*-*-*********
^rep("MLZT","QUERY","4. hxetn zepgleye zepgley ibeq itl","MIUN")
1*1*2*4*4*2*3
^rep("MLZT","QUERY","4. hxetn zepgleye zepgley ibeq itl","SIK0")
1*1*1*0*0*1*0
^rep("MLZT","QUERY","5.        fkexn zecnre mikix`z itl","CT")
1*2*2*0*0*0*0
^rep("MLZT","QUERY","5.        fkexn zecnre mikix`z itl","FLD0")
-*-**-*-**-*******
^rep("MLZT","QUERY","5.        fkexn zecnre mikix`z itl","MIUN")
1*2*1*4*3*2*3
^rep("MLZT","QUERY","5.        fkexn zecnre mikix`z itl","SIK0")
1*0*1*0*0*0*0
^rep("MLZT","QUERY","6.        hxetn zecnre mikix`z itl","CT")
1*2*1*0*0*2*0
^rep("MLZT","QUERY","6.        hxetn zecnre mikix`z itl","FLD0")
-*-**-*-*********
^rep("MLZT","QUERY","6.        hxetn zecnre mikix`z itl","MIUN")
1*2*1*4*3*2*3
^rep("MLZT","QUERY","6.        hxetn zecnre mikix`z itl","SIK0")
1*0*1*0*0*1*0
^rep("MLZT","QUERY","7.               fkexn mikix`z itl","CT")
1*2*0*0*0*0*0
^rep("MLZT","QUERY","7.               fkexn mikix`z itl","FLD0")
-*-*-*-*-**-*******
^rep("MLZT","QUERY","7.               fkexn mikix`z itl","MIUN")
1*2*3*4*3*1*2
^rep("MLZT","QUERY","7.               fkexn mikix`z itl","SIK0")
1*0*0*0*0*0*0
^rep("MLZT","QUERY","8.               hxetn mikix`z itl","CT")
1*2*0*0*0*2*0
^rep("MLZT","QUERY","8.               hxetn mikix`z itl","FLD0")
-*-*-*-*-*********
^rep("MLZT","QUERY","8.               hxetn mikix`z itl","MIUN")
1*2*3*4*3*1*2
^rep("MLZT","QUERY","8.               hxetn mikix`z itl","SIK0")
1*0*0*0*0*1*0
^rep("MLZT","SIK")
1*1*1*1*1*1*1*
^rep("MLZT","SIK0")
1*0*0*0*0*1*0
^rep("MLZT","US",-1)
D DATH^P1MLZT
^rep("MLZT","US",1)
D DATH^P1MLZT
^rep("MLZT","US",2)
D HZM^P1MLZT
^rep("MMPR")
zecrqn itl mihixt g"ec
^rep("MMPR",0,"DAT1")
jix`z;8D
^rep("MMPR",0,"DAT1","SH")
1
^rep("MMPR",0,"HZM")
dpnfd;9
^rep("MMPR",0,"HZM","SH")
1
^rep("MMPR",0,"MLZR")
xvln;9
^rep("MMPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^rep("MMPR",0,"MLZR","OUT")
MLZR1
^rep("MMPR",0,"MLZR1")
xvln my;12H
^rep("MMPR",0,"MLZR1","SH")
0
^rep("MMPR",0,"MSD")
dcrqn;5
^rep("MMPR",0,"MSD","FILE")
^P1MSD
^rep("MMPR",0,"MSD","OUT")
MSD1
^rep("MMPR",0,"MSD1")
dcrqn my;12
^rep("MMPR",0,"MSD1","SH")
1
^rep("MMPR",0,"PAR")
hixt;5
^rep("MMPR",0,"PAR","FILE")
^PAR
^rep("MMPR",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("MMPR",0,"PAR","OUT")
PAR1
^rep("MMPR",0,"PAR1")
hixt xe`z;20H
^rep("MMPR",0,"PAR1","SH")
1
^rep("MMPR",0,"SUGP")
mihixt zveaw;9
^rep("MMPR",0,"SUGP","FILE")
^PARSUG
^rep("MMPR",0,"SUGP","OUT")
SUGP1
^rep("MMPR",0,"SUGP1")
dveaw xe`z;12H
^rep("MMPR",0,"SUGP1","SH")
0
^rep("MMPR",0,"x1")
zenk;5,0
^rep("MMPR",0,"x2")
hixtl dgpd;10,2
^rep("MMPR",0,"x3")
ehp mekq;10,2
^rep("MMPR",0,"x4")
;,
^rep("MMPR","COD")
MSD*MSD1*DAT1*HZM*PAR*PAR1*x1*x2*x3
^rep("MMPR","CT")
0*0*0*0*0*0*0
^rep("MMPR","FLD")
MSD*DAT1*HZM*PAR*x1*x2*x3
^rep("MMPR","FLD0")
***-*-***
^rep("MMPR","GLOB1")
^VRM(PRTN)
^rep("MMPR","GLOB2")
^VRM(PRTN,MSD,HZM,PAR)
^rep("MMPR","LPT")
S
^rep("MMPR","MIUN")
1*2*3*4*2*0*0
^rep("MMPR","QUERY","zecrqn itl fekix","CT")
0*0*0*0*0*0*0
^rep("MMPR","QUERY","zecrqn itl fekix","FLD0")
*-*-*-*-***
^rep("MMPR","QUERY","zecrqn itl fekix","MIUN")
1*2*3*4*2*0*0
^rep("MMPR","QUERY","zecrqn itl fekix","SIK0")
0*0*0*0*0*0*0
^rep("MMPR","QUERY","zecrqn itl mihixt zxikn","CT")
2*0*0*0*0*0*0
^rep("MMPR","QUERY","zecrqn itl mihixt zxikn","FLD0")
*-*-***-*
^rep("MMPR","QUERY","zecrqn itl mihixt zxikn","MIUN")
1*2*3*2*2*0*0
^rep("MMPR","QUERY","zecrqn itl mihixt zxikn","SIK0")
1*1*0*0*0*0*0
^rep("MMPR","QUERY","zepnfd itl g""ec","CT")
0*0*0*0*0*0*0
^rep("MMPR","QUERY","zepnfd itl g""ec","FLD0")
***-*-***
^rep("MMPR","QUERY","zepnfd itl g""ec","MIUN")
1*2*3*4*2*0*0
^rep("MMPR","QUERY","zepnfd itl g""ec","SIK0")
0*1*0*0*0*0*0
^rep("MMPR","SHP","KOD")
P1DMZPR
^rep("MMPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^rep("MMPR","SIK")
1*1*1*
^rep("MMPR","SIK0")
0*1*0*0*0*0*0
^rep("MMPR","US",3)
D DAT^P1DMM
^rep("MMPR","US",4)
D PAR^P1DMM
^rep("MSHT")
melyz ibeq itl migily g"ec
^rep("MSHT",0,"HZM")
dpnfd;7
^rep("MSHT",0,"HZM","SH")
1
^rep("MSHT",0,"MLZ")
xvln 'qn;5
^rep("MSHT",0,"MLZ","FILE")
^NAME
^rep("MSHT",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^rep("MSHT",0,"MLZ","OUT")
MLZ1
^rep("MSHT",0,"MLZ1")
xvln my;12H
^rep("MSHT",0,"MLZ1","SH")
1
^rep("MSHT",0,"PSL")
gily 'qn;5
^rep("MSHT",0,"PSL","FILE")
^P1SL
^rep("MSHT",0,"PSL","OUT")
PSL1
^rep("MSHT",0,"PSL1")
gily my;12H
^rep("MSHT",0,"PSL1","SH")
1
^rep("MSHT",0,"TRH")
jix`z;8D
^rep("MSHT",0,"TRH","SH")
1
^rep("MSHT",0,"x1")
melyzl;8,2
^rep("MSHT",0,"x2")
onefn;8,2
^rep("MSHT",0,"x3")
wiy;8,2
^rep("MSHT",0,"x4")
`"k;8,2
^rep("MSHT",0,"x5")
dtwd;8,2
^rep("MSHT",0,"x6")
yelz;8,2
^rep("MSHT",0,"x7")
tih;7,2
^rep("MSHT",0,"x8")
;,
^rep("MSHT","COD")
PSL*PSL1*TRH*HZM*x1*x2*x3*x4*x5*x6
^rep("MSHT","CT")
1*0*0
^rep("MSHT","FLD")
PSL*TRH*HZM*x1*x2*x3*x4*x5*x6
^rep("MSHT","FLD0")

^rep("MSHT","GLOB1")
^P1H
^rep("MSHT","GLOB2")
^P1H(DATH,HZM)
^rep("MSHT","LPT")
B
^rep("MSHT","MIUN")
1*2*3
^rep("MSHT","QUERY","fkexn","CT")
0*2*0
^rep("MSHT","QUERY","fkexn","FLD0")
**-******
^rep("MSHT","QUERY","fkexn","MIUN")
2*1*3
^rep("MSHT","QUERY","fkexn","SIK0")
0*1*0
^rep("MSHT","QUERY","hxetn","CT")
1*0*0
^rep("MSHT","QUERY","hxetn","FLD0")

^rep("MSHT","QUERY","hxetn","MIUN")
1*2*3
^rep("MSHT","QUERY","hxetn","SIK0")
1*0*0
^rep("MSHT","SIK")
1*1*1*1*1*1*1*
^rep("MSHT","SIK0")
1*0*0
^rep("MSHT","US",-1)
D DATH^P1MSHT
^rep("MSHT","US",1)
D DATH^P1MSHT
^rep("MSHT","US",2)
D HZM^P1MSHT
^rep("MZP")
mihixt itl mixvln g"ec
^rep("MZP",0,"DAT")
jix`z;8D
^rep("MZP",0,"DAT","SH")
1
^rep("MZP",0,"HZM")
dpnfd;7
^rep("MZP",0,"HZM","SH")
1
^rep("MZP",0,"MLZ")
xvln 'qn;8
^rep("MZP",0,"MLZ","FILE")
^NAME
^rep("MZP",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^rep("MZP",0,"MLZ","OUT")
MLZ1
^rep("MZP",0,"MLZ1")
xvln my;16H
^rep("MZP",0,"MLZ1","SH")
1
^rep("MZP",0,"PAR")
hixt 'qn;8
^rep("MZP",0,"PAR","FILE")
^PAR
^rep("MZP",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("MZP",0,"PAR","OUT")
PAR1
^rep("MZP",0,"PAR1")
hixt xe`z;20H
^rep("MZP",0,"PAR1","SH")
1
^rep("MZP",0,"x1")
zenk;5,0
^rep("MZP",0,"x2")
mekq;8,2
^rep("MZP",0,"x3")
dgpd;7,2
^rep("MZP",0,"x4")
k"dq;8,2
^rep("MZP",0,"x5")
;,
^rep("MZP","COD")
MLZ*MLZ1*DAT*HZM*PAR*PAR1*x1*x2*x3*x4
^rep("MZP","CT")
1*2*0*0
^rep("MZP","FLD")
MLZ*DAT*HZM*PAR*x1*x2*x3*x4
^rep("MZP","FLD0")
**-*****
^rep("MZP","GLOB1")
^P1MLZ
^rep("MZP","GLOB2")
^P1MLZ(HZM,MLZ,PAR)
^rep("MZP","LPT")
B
^rep("MZP","MIUN")
1*2*3*3
^rep("MZP","QUERY","hxetn","CT")
1*2*0*0
^rep("MZP","QUERY","hxetn","FLD0")

^rep("MZP","QUERY","hxetn","MIUN")
1*2*3*4
^rep("MZP","QUERY","hxetn","SIK0")
1*0*1*0
^rep("MZP","QUERY","mihixt itl fkexn","CT")
1*2*0*0
^rep("MZP","QUERY","mihixt itl fkexn","FLD0")
**-*****
^rep("MZP","QUERY","mihixt itl fkexn","MIUN")
1*2*3*3
^rep("MZP","QUERY","mihixt itl fkexn","SIK0")
1*0*1*0
^rep("MZP","SIK")
1*1*1*1*
^rep("MZP","SIK0")
1*0*1*0
^rep("MZP","US",-1)
D DAT^P1MZP
^rep("MZP","US",1)
D DAT^P1MZP
^rep("MZP","US",3)
D PAR^P1MZP
^rep("MZPR")
mixvln itl mihixt g"ec
^rep("MZPR",0,"MLZR")
xvln;5.
^rep("MZPR",0,"MLZR","FILE")
^NAME
^rep("MZPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^rep("MZPR",0,"MLZR","OUT")
MLZR1
^rep("MZPR",0,"MLZR1")
xvln my;12H
^rep("MZPR",0,"MLZR1","SH")
1
^rep("MZPR",0,"PAR")
hixt;5
^rep("MZPR",0,"PAR","FILE")
^PAR
^rep("MZPR",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("MZPR",0,"PAR","OUT")
PAR1
^rep("MZPR",0,"PAR1")
hixt xe`z;20H
^rep("MZPR",0,"PAR1","SH")
0
^rep("MZPR",0,"SUGP")
hixt beq;3
^rep("MZPR",0,"SUGP","FILE")
^PARSUG
^rep("MZPR",0,"SUGP","OUT")
SUGP1
^rep("MZPR",0,"SUGP1")
beq xe`z;10H
^rep("MZPR",0,"SUGP1","SH")
1
^rep("MZPR",0,"x1")
zenk;5,0
^rep("MZPR",0,"x2")
hixtl dgpd;10,2
^rep("MZPR",0,"x3")
ehp mekq;10,2
^rep("MZPR",0,"x4")
;,
^rep("MZPR","COD")
MLZR*MLZR1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3
^rep("MZPR","CT")
1*2*0*0*0*0*0
^rep("MZPR","FLD")
MLZR*SUGP*PAR*x1*x2*x3
^rep("MZPR","FLD0")
******
^rep("MZPR","GLOB1")
^VRM(PRTN)
^rep("MZPR","GLOB2")
^VRM(PRTN,MLZR,SUGP,PAR)
^rep("MZPR","LPT")
S
^rep("MZPR","MIUN")
1*2*3*4*2*0*0
^rep("MZPR","QUERY","mihixt itl mixvln","CT")
1*2*0*0*0*0*0
^rep("MZPR","QUERY","mihixt itl mixvln","FLD0")
******
^rep("MZPR","QUERY","mihixt itl mixvln","MIUN")
1*2*3*4*2*0*0
^rep("MZPR","QUERY","mihixt itl mixvln","SIK0")
1*0*0*0*0*0*0
^rep("MZPR","QUERY","mixvln itl mihixt","CT")
0*2*0*0*0*0*0
^rep("MZPR","QUERY","mixvln itl mihixt","FLD0")
*****
^rep("MZPR","QUERY","mixvln itl mihixt","MIUN")
3*1*2*4*2*0*0
^rep("MZPR","QUERY","mixvln itl mihixt","SIK0")
0*1*1*0*0*0*0
^rep("MZPR","SHP","KOD")
P1DMZPR
^rep("MZPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^rep("MZPR","SIK")
1*1*1*
^rep("MZPR","SIK0")
1*0*0*0*0*0*0
^rep("MZPR","US",4)
D PAR^P1DMZPR
^rep("MZPS")
zerye mixvln itl mihixt g"ec
^rep("MZPS",0,"MLZR")
xvln;5.
^rep("MZPS",0,"MLZR","FILE")
^NAME
^rep("MZPS",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^rep("MZPS",0,"MLZR","OUT")
MLZR1
^rep("MZPS",0,"MLZR1")
xvln my;12H
^rep("MZPS",0,"MLZR1","SH")
1
^rep("MZPS",0,"PAR")
hixt;5
^rep("MZPS",0,"PAR","FILE")
^PAR
^rep("MZPS",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("MZPS",0,"PAR","OUT")
PAR1
^rep("MZPS",0,"PAR1")
hixt xe`z;20H
^rep("MZPS",0,"PAR1","SH")
1
^rep("MZPS",0,"SHAA")
dry;5
^rep("MZPS",0,"SHAA","SH")
1
^rep("MZPS",0,"SHAA1")
dry;7
^rep("MZPS",0,"SHAA1","SH")
1
^rep("MZPS",0,"SUGP")
hixt beq;3
^rep("MZPS",0,"SUGP","FILE")
^PARSUG
^rep("MZPS",0,"SUGP","OUT")
SUGP1
^rep("MZPS",0,"SUGP1")
beq xe`z;10H
^rep("MZPS",0,"SUGP1","SH")
1
^rep("MZPS",0,"x1")
zenk;5,0
^rep("MZPS",0,"x2")
hixtl dgpd;10,2
^rep("MZPS",0,"x3")
ehp mekq;10,2
^rep("MZPS",0,"x4")
;,
^rep("MZPS","COD")
MLZR*MLZR1*SHAA1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3
^rep("MZPS","CT")
1*2*0*0*0*0*0
^rep("MZPS","FLD")
MLZR*SHAA1*SUGP*PAR*x1*x2*x3
^rep("MZPS","FLD0")
*-*****
^rep("MZPS","GLOB1")
^VRM(PRTN)
^rep("MZPS","GLOB2")
^VRM(PRTN,MLZR,SHAA,SUGP,PAR)
^rep("MZPS","LPT")
S
^rep("MZPS","MIUN")
1*2*2*3*2*0*0
^rep("MZPS","SHP","KOD")
P1DMZPRS
^rep("MZPS","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT,MAS(15)=MESHAA1,MAS(20)=ADSHAA1
^rep("MZPS","SIK")
1*1*1*
^rep("MZPS","SIK0")
1*1*0*0*0*0*0
^rep("MZPS","US",3)
D SHAA^P1DMZPRS
^rep("MZPS","US",5)
D PAR^P1DMZPRS
^rep("OTH")
OTH zepnfd g"ec
^rep("OTH",0,"HB")
zipeayg;8
^rep("OTH",0,"HZM")
dpnfd;5
^rep("OTH",0,"HZM","SH")
1
^rep("OTH",0,"LKH")
gewl 'qn;10
^rep("OTH",0,"LKH","FILE")
^LKH
^rep("OTH",0,"LKH","OUT")
LKH1
^rep("OTH",0,"LKH1")
gewl my;20H
^rep("OTH",0,"MKBL")
xvln 'qn;8
^rep("OTH",0,"MKBL","M2")
S MKBL1=$$^P1NAME(MKBL)
^rep("OTH",0,"MKBL","OUT")
MKBL1
^rep("OTH",0,"MKBL1")
xvln my;12H
^rep("OTH",0,"MKBL1","SH")
0
^rep("OTH",0,"MLZR")
xvln 'qn;5
^rep("OTH",0,"MLZR",2)
I MLZR S MLZR1=$G(^NAME(MLZR,1))
^rep("OTH",0,"MLZR","OUT")
MLZR1
^rep("OTH",0,"MLZR1")
xvln my;12H
^rep("OTH",0,"MLZR1","SH")
1
^rep("OTH",0,"NAME")
gewl my;12H
^rep("OTH",0,"NAME","SH")
1
^rep("OTH",0,"NCAB")
zipeayg;6
^rep("OTH",0,"NCAB","SH")
0
^rep("OTH",0,"NMB")
ogley;5
^rep("OTH",0,"NMB","SH")
1
^rep("OTH",0,"PSL")
gily cew;3
^rep("OTH",0,"PSL","FILE")
^P1SL
^rep("OTH",0,"PSL","OUT")
PSL1
^rep("OTH",0,"PSL1")
gily my;10H
^rep("OTH",0,"PSL1","SH")
1
^rep("OTH",0,"SHAA")
dry;5
^rep("OTH",0,"SHAA","SH")
1
^rep("OTH",0,"SL")
gily cew;5
^rep("OTH",0,"SL","FILE")
^P1SL
^rep("OTH",0,"SL","OUT")
SL1
^rep("OTH",0,"SL1")
gily my;12H
^rep("OTH",0,"SUGT")
melyz beq;9
^rep("OTH",0,"SUGT","SH")
1
^rep("OTH",0,"TRH")
jix`z;8D
^rep("OTH",0,"TRH","SH")
1
^rep("OTH",0,"TS")
melyzl;8
^rep("OTH",0,"TSHL")
melyzl;8
^rep("OTH",0,"TSHL","OUT")
TSHL
^rep("OTH",0,"x1")
dgpd iptl;9,2
^rep("OTH",0,"x2")
dgpd;9,2
^rep("OTH",0,"x3")
dgpd ixg`;9,2
^rep("OTH",0,"x4")
;,
^rep("OTH","COD")
NMB*MKBL*MKBL1*TRH*SHAA*HZM*x1*x2*x3
^rep("OTH","CT")
0*0*0*0*0*0*0
^rep("OTH","FLD")
NMB*MKBL*TRH*SHAA*HZM*x1*x2*x3
^rep("OTH","FLD0")
**-*-****
^rep("OTH","GLOB1")
^P1H
^rep("OTH","GLOB2")
^P1H(DATH,HZM)
^rep("OTH","LPT")
S
^rep("OTH","MIUN")
1*2*3*4*3*6*0
^rep("OTH","SIK")
1*1*1*
^rep("OTH","SIK0")
1*1*0*0*0*0*0
^rep("OTH","US",0)
D HZM^P1OTH
^rep("OTH","US",1)
D TRH^P1OTH
^rep("OTH","US",2)
D HZM^P1OTH
^rep("P1Z")
Z fekix
^rep("P1Z",0,"TRH")
jix`z;8D
^rep("P1Z",0,"TRH","SH")
0
^rep("P1Z",0,"x1")
onefn;8,2
^rep("P1Z",0,"x10")
dtwd;8,2
^rep("P1Z",0,"x11")
n"rn;8,2
^rep("P1Z",0,"x12")
;,
^rep("P1Z",0,"x2")
wiy;8,2
^rep("P1Z",0,"x3")
hxk`xyi;8,2
^rep("P1Z",0,"x4")
dfie;8,2
^rep("P1Z",0,"x5")
qxpiic;8,2
^rep("P1Z",0,"x6")
AM.EX.;8,2
^rep("P1Z",0,"x7")
`"k k"dq;8,2
^rep("P1Z",0,"x8")
tih;8,2
^rep("P1Z",0,"x9")
oeict k"dq;10,2
^rep("P1Z","COD")
TRH*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11
^rep("P1Z","CT")

^rep("P1Z","FLD")
TRH*x1*x2*x3*x4*x5*x6*x7*x8*x9*x10*x11
^rep("P1Z","FLD0")
*******-**-**-
^rep("P1Z","GLOB1")
^TEMP($P)
^rep("P1Z","GLOB2")
^TEMP($P,I)
^rep("P1Z","LPT")
B
^rep("P1Z","MIUN")
1
^rep("P1Z","SIK")
1*1*1*1*1*1*1*1*1*1*1*
^rep("P1Z","SIK0")

^rep("P1Z","US",2)
D Z^P1Z
^rep("PAR")
mihixt gec
^rep("PAR",0,"DAT")
jix`z;8D
^rep("PAR",0,"PAR")
hixt cew;4
^rep("PAR",0,"PAR",2)
S PAR1=$P($G(^PAR(PAR)),"**")
^rep("PAR",0,"PAR","OUT")
PAR1
^rep("PAR",0,"PAR1")
hixt xe`z;20H
^rep("PAR",0,"x1")
zenk;6,0
^rep("PAR",0,"x2")
mekq;8,2
^rep("PAR",0,"x3")
xign;7,2
^rep("PAR",0,"x4")
;,
^rep("PAR","COD")
DAT*PAR*PAR1*x1*x2*x3
^rep("PAR","CT")
0*0
^rep("PAR","FLD")
DAT*PAR*x1*x2*x3
^rep("PAR","GLOB1")
^PLUTOT
^rep("PAR","GLOB2")
^PLUTOT(DAT,MRK,PAR)
^rep("PAR","LPT")
B
^rep("PAR","MIUN")
2*1
^rep("PAR","SHP","KOD")
PAR
^rep("PAR","SIK")
1*1*0*
^rep("PAR","SIK0")
1*1
^rep("PAR","US",-1)
B  S x1=$P(@GLOB,"*"),x2=$P(@GLOB,"*",2),x3=$P(@GLOB,"*",3)
^rep("PAR","US",3)
D PAR^P1DP
^rep("PARK")
zeveaw itl mihixt zxikn gec
^rep("PARK",0,"PAR")
hixt;6
^rep("PARK",0,"PAR","FILE")
^PAR
^rep("PARK",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("PARK",0,"PAR","OUT")
PAR1
^rep("PARK",0,"PAR1")
hixt xe`z;20H
^rep("PARK",0,"PAR1","SH")
1
^rep("PARK",0,"SUGP")
dveaw;5
^rep("PARK",0,"SUGP","FILE")
^PARSUG
^rep("PARK",0,"SUGP","OUT")
SUGP1
^rep("PARK",0,"SUGP1")
dveaw xe`z;14H
^rep("PARK",0,"SUGP1","SH")
1
^rep("PARK",0,"TRH")
jix`z;8D
^rep("PARK",0,"TRH","SH")
1
^rep("PARK",0,"x1")
zenk;5,0
^rep("PARK",0,"x2")
oexg` xign;7,2
^rep("PARK",0,"x3")
mekq;8,2
^rep("PARK",0,"x4")
dgpd;7,2
^rep("PARK",0,"x5")
k"dq;9,2
^rep("PARK",0,"x6")
;,
^rep("PARK","COD")
SUGP*SUGP1*PAR*PAR1*TRH*x1*x2*x3*x4*x5
^rep("PARK","CT")
2*0
^rep("PARK","FLD")
SUGP*PAR*TRH*x1*x2*x3*x4*x5
^rep("PARK","FLD0")
**-*****
^rep("PARK","GLOB1")
^PLUTOT
^rep("PARK","GLOB2")
^PLUTOT(DAT,MRK,PAR)
^rep("PARK","LPT")
B
^rep("PARK","MIUN")
1*2
^rep("PARK","SIK")
1**1*1*1*
^rep("PARK","SIK0")
1*0
^rep("PARK","US",-1)
D DAT^P1DPARK
^rep("PARK","US",1)
D DAT^P1DPARK
^rep("PARK","US",3)
D PAR^P1DPARK
^rep("PARS")
zery itl mihixt g"ec
^rep("PARS",0,"DAT")
;0
^rep("PARS",0,"DAT","SH")
1
^rep("PARS",0,"DEP")
dwlgn;5
^rep("PARS",0,"DEP","FILE")
^DEP
^rep("PARS",0,"DEP","OUT")
DEP1
^rep("PARS",0,"DEP1")
dwlgn my;12H
^rep("PARS",0,"DEP1","SH")
1
^rep("PARS",0,"PAR")
hixt;8
^rep("PARS",0,"PAR","FILE")
^PAR
^rep("PARS",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("PARS",0,"PAR","OUT")
PAR1
^rep("PARS",0,"PAR1")
hixt xe`z;20H
^rep("PARS",0,"PAR1","SH")
0
^rep("PARS",0,"SHAA")
dry;5
^rep("PARS",0,"SHAA","SH")
1
^rep("PARS",0,"SHAA1")
dry;6
^rep("PARS",0,"SHAA1","SH")
1
^rep("PARS",0,"SUGP")
dveaw;5
^rep("PARS",0,"SUGP","FILE")
^PARSUG
^rep("PARS",0,"SUGP","OUT")
SUGP1
^rep("PARS",0,"SUGP1")
dveaw xe`z;11H
^rep("PARS",0,"SUGP1","SH")
1
^rep("PARS",0,"TRH")
jix`z;8D
^rep("PARS",0,"TRH","SH")
1
^rep("PARS",0,"x1")
zenk;6,0
^rep("PARS",0,"x2")
mekq;9,2
^rep("PARS",0,"x3")
dgpd;8,2
^rep("PARS",0,"x4")
k"dq;9,2
^rep("PARS",0,"x5")
;,
^rep("PARS","COD")
DEP*DEP1*SHAA1*TRH*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4
^rep("PARS","CT")
1*1*2*2*0
^rep("PARS","FLD")
DEP*SHAA1*TRH*SUGP*PAR*x1*x2*x3*x4
^rep("PARS","FLD0")
*******
^rep("PARS","GLOB1")
^PLUTOT
^rep("PARS","GLOB2")
^PLUTOT(DAT,MRK,PAR,SHAA)
^rep("PARS","LPT")
B
^rep("PARS","MIUN")
1*2*3*4*5
^rep("PARS","QUERY",".mihixte zery itl hxetn","CT")
1*1*2*2*0
^rep("PARS","QUERY",".mihixte zery itl hxetn","FLD0")
**-******
^rep("PARS","QUERY",".mihixte zery itl hxetn","MIUN")
2*1*2*3*4
^rep("PARS","QUERY",".mihixte zery itl hxetn","SIK0")
1*1*1*1*0
^rep("PARS","QUERY",".zerye mihixt itl hxetn","CT")
1*1*2*2*0
^rep("PARS","QUERY",".zerye mihixt itl hxetn","FLD0")
**-******
^rep("PARS","QUERY",".zerye mihixt itl hxetn","MIUN")
1*2*2*3*4
^rep("PARS","QUERY",".zerye mihixt itl hxetn","SIK0")
1*1*1*1*0
^rep("PARS","QUERY","fkexn","CT")
1*0*2*2*0
^rep("PARS","QUERY","fkexn","FLD0")
-**-*-*-*-***
^rep("PARS","QUERY","fkexn","MIUN")
1*1*1*2*3
^rep("PARS","QUERY","fkexn","SIK0")
1*0*1*1*0
^rep("PARS","QUERY","fkexn mihixt itl g""ec","CT")
1*0*2*2*0
^rep("PARS","QUERY","fkexn mihixt itl g""ec","FLD0")
*-*-******
^rep("PARS","QUERY","fkexn mihixt itl g""ec","MIUN")
1*2*1*2*3
^rep("PARS","QUERY","fkexn mihixt itl g""ec","SIK0")
1*0*1*1*0
^rep("PARS","QUERY","mikix`z itl hxetn","CT")
1*1*2*2*0
^rep("PARS","QUERY","mikix`z itl hxetn","FLD0")
*******
^rep("PARS","QUERY","mikix`z itl hxetn","MIUN")
1*2*3*4*5
^rep("PARS","QUERY","mikix`z itl hxetn","SIK0")
1*1*1*1*0
^rep("PARS","SHP","KOD")
PARS
^rep("PARS","SHP","PROG")
S MAS(5)=$$^%L1DC(METRH,1),MAS(10)=$$^%L1DC(ADTRH,1),MAS(15)=MESHAA1#24,MAS(20)=$S(ADSHAA1<40:ADSHAA1#24,1:ADSHAA1)
^rep("PARS","SIK")
1*1*1*1*
^rep("PARS","SIK0")
1*1*1*1*0
^rep("PARS","US",-1)
D DAT^P1DPARS
^rep("PARS","US",1)
D DAT^P1DPARS
^rep("PARS","US",3)
D PAR^P1DPARS
^rep("PARS","US",4)
D SHAA^P1DPARS
^rep("PRER")
mihixt jxr g"ec
^rep("PRER",0,"DEP")
dwlgn;5
^rep("PRER",0,"DEP","FILE")
^DEP
^rep("PRER",0,"DEP","OUT")
DEP1
^rep("PRER",0,"DEP","SET")
0
^rep("PRER",0,"DEP1")
dwlgn my;15H
^rep("PRER",0,"DEP1","SET")
0
^rep("PRER",0,"DEP1","SH")
1
^rep("PRER",0,"HB")
zipeayg;8
^rep("PRER",0,"HZM")
dpnfd;7
^rep("PRER",0,"HZM","SET")
1
^rep("PRER",0,"HZM","SH")
1
^rep("PRER",0,"LKH")
gewl 'qn;10
^rep("PRER",0,"LKH","FILE")
^LKH
^rep("PRER",0,"LKH","OUT")
LKH1
^rep("PRER",0,"LKH1")
gewl my;20H
^rep("PRER",0,"MRK")
sipq;4
^rep("PRER",0,"MRK","FILE")
^["MLY"]YZRN
^rep("PRER",0,"MRK","OUT")
MRK1
^rep("PRER",0,"MRK1")
sipq my;15H
^rep("PRER",0,"MRK1","SH")
1
^rep("PRER",0,"NAME")
gewl my;12H
^rep("PRER",0,"NAME","SH")
1
^rep("PRER",0,"NCAB")
zipeayg;6
^rep("PRER",0,"NCAB","SH")
0
^rep("PRER",0,"NMB")
gewl xtqn;10
^rep("PRER",0,"NMB","FILE")
^LKH
^rep("PRER",0,"NMB","OUT")
NAME
^rep("PRER",0,"PAR")
hixt 'qn;8
^rep("PRER",0,"PAR","FILE")
^PAR
^rep("PRER",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("PRER",0,"PAR","OUT")
PAR1
^rep("PRER",0,"PAR","SET")
1
^rep("PRER",0,"PAR1")
hixt xe`z;16H
^rep("PRER",0,"PAR1","SET")
0
^rep("PRER",0,"PAR1","SH")
1
^rep("PRER",0,"PSL")
gily cew;3
^rep("PRER",0,"PSL","FILE")
^P1SL
^rep("PRER",0,"PSL","OUT")
PSL1
^rep("PRER",0,"PSL1")
gily my;10H
^rep("PRER",0,"PSL1","SH")
1
^rep("PRER",0,"SHAA")
dryl;7
^rep("PRER",0,"SHAA","SH")
1
^rep("PRER",0,"SHL")
ogley;3
^rep("PRER",0,"SHL","SET")
1
^rep("PRER",0,"SHL","SH")
1
^rep("PRER",0,"SL")
gily cew;5
^rep("PRER",0,"SL","FILE")
^P1SL
^rep("PRER",0,"SL","OUT")
SL1
^rep("PRER",0,"SL1")
gily my;12H
^rep("PRER",0,"SUGL")
gewl beq;8
^rep("PRER",0,"SUGL","FILE")
^SUGL
^rep("PRER",0,"SUGL","OUT")
SUGL1
^rep("PRER",0,"SUGL1")
gewl beq xe`z;15H
^rep("PRER",0,"SUGL1","SH")
1
^rep("PRER",0,"SUGP")
mihixt zveaw;12
^rep("PRER",0,"SUGP","FILE")
^PARSUG
^rep("PRER",0,"SUGP","OUT")
SUGP1
^rep("PRER",0,"SUGP","SET")
0
^rep("PRER",0,"SUGP1")
mihixt zveaw my;15H
^rep("PRER",0,"SUGP1","SET")
0
^rep("PRER",0,"SUGP1","SH")
1
^rep("PRER",0,"SUGS")
ogley beq;5
^rep("PRER",0,"SUGS","FILE")
^SUGS
^rep("PRER",0,"SUGS","OUT")
SUGS1
^rep("PRER",0,"SUGS","SET")
0
^rep("PRER",0,"SUGS1")
'ley beq xe`z;12
^rep("PRER",0,"SUGS1","OUT")
1
^rep("PRER",0,"SUGS1","SET")
0
^rep("PRER",0,"SUGT")
melyz beq;5
^rep("PRER",0,"SUGT","SH")
1
^rep("PRER",0,"TRH")
jix`z;8D
^rep("PRER",0,"TRH","M2")
S TRH=$ZD(DT,3)
^rep("PRER",0,"TRH","SET")
0
^rep("PRER",0,"TRH","SH")
1
^rep("PRER",0,"TRH1")
YYYYMMDD;8
^rep("PRER",0,"TRH1","SH")
1
^rep("PRER",0,"TS")
melyzl;8
^rep("PRER",0,"TSHL")
melyzl;8
^rep("PRER",0,"TSHL","OUT")
TSHL
^rep("PRER",0,"x1")
zenk;4,0
^rep("PRER",0,"x2")
mekq;8,2
^rep("PRER",0,"x3")
`ln xign;8,2
^rep("PRER",0,"x4")
yxtd;8,2
^rep("PRER",0,"x5")
;,
^rep("PRER","COD")
TRH*SUGS*SUGS1*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*HZM*x1*x2*x3*x4
^rep("PRER","CT")
1*1*1*2*0*0*1*2*0*0
^rep("PRER","FLD")
TRH*SUGS*DEP*SUGP*PAR*HZM*x1*x2*x3*x4
^rep("PRER","FLD0")
*******
^rep("PRER","GLOB1")
^VRM($J)
^rep("PRER","GLOB2")
^VRM($J,DT,HZM,PAR)
^rep("PRER","LPT")
B
^rep("PRER","MIUN")
1*2*3*4*5*6*3*4*8*5
^rep("PRER","MIUN","PROG")
TRH^P1PRER
^rep("PRER","QUERY","fkexn iztewz zewlgne ogley ibeq itl","CT")
0*1*1*2*0*0*1*2*0*0
^rep("PRER","QUERY","fkexn iztewz zewlgne ogley ibeq itl","FLD0")
*****-**
^rep("PRER","QUERY","fkexn iztewz zewlgne ogley ibeq itl","MIUN")
5*1*2*3*4*6*3*4*8*5
^rep("PRER","QUERY","fkexn iztewz zewlgne ogley ibeq itl","SIK0")
0*1*1*1*0*0*0*0*0*0
^rep("PRER","QUERY","fkexn mihixt zeveawe zewlgn itl","CT")
0*0*1*2*0*0*1*2*0*0
^rep("PRER","QUERY","fkexn mihixt zeveawe zewlgn itl","FLD0")
*-****-**
^rep("PRER","QUERY","fkexn mihixt zeveawe zewlgn itl","MIUN")
4*4*1*2*3*5*2*3*5*6
^rep("PRER","QUERY","fkexn mihixt zeveawe zewlgn itl","SIK0")
0*1*1*1*0*0*1*1*1*0
^rep("PRER","QUERY","fkexn zewlgne ogley ibeq , mikix`z itl","CT")
1*1*1*2*0*0*1*2*0*0
^rep("PRER","QUERY","fkexn zewlgne ogley ibeq , mikix`z itl","FLD0")
*****-**
^rep("PRER","QUERY","fkexn zewlgne ogley ibeq , mikix`z itl","MIUN")
1*2*3*4*5*6*3*4*8*5
^rep("PRER","QUERY","fkexn zewlgne ogley ibeq , mikix`z itl","SIK0")
1*1*1*1*0*0*0*0*0*0
^rep("PRER","QUERY","hxetn iztewz zewlgne ogley ibeq itl","CT")
0*1*1*2*0*0*1*2*0*0
^rep("PRER","QUERY","hxetn iztewz zewlgne ogley ibeq itl","FLD0")
*******
^rep("PRER","QUERY","hxetn iztewz zewlgne ogley ibeq itl","MIUN")
5*1*2*3*4*6*3*4*8*5
^rep("PRER","QUERY","hxetn iztewz zewlgne ogley ibeq itl","SIK0")
0*1*1*1*0*0*0*0*0*0
^rep("PRER","QUERY","hxetn mihixt zeveawe zewlgn itl","CT")
0*0*1*2*0*0*1*2*0*0
^rep("PRER","QUERY","hxetn mihixt zeveawe zewlgn itl","FLD0")
*-******
^rep("PRER","QUERY","hxetn mihixt zeveawe zewlgn itl","MIUN")
4*4*1*2*3*5*2*3*5*6
^rep("PRER","QUERY","hxetn mihixt zeveawe zewlgn itl","SIK0")
0*1*1*1*0*0*1*1*1*0
^rep("PRER","QUERY","hxetn zewlgne ogley ibeq , mikix`z itl","CT")
1*1*1*2*0*0*1*2*0*0
^rep("PRER","QUERY","hxetn zewlgne ogley ibeq , mikix`z itl","FLD0")
*******
^rep("PRER","QUERY","hxetn zewlgne ogley ibeq , mikix`z itl","MIUN")
1*2*3*4*5*6*3*4*8*5
^rep("PRER","QUERY","hxetn zewlgne ogley ibeq , mikix`z itl","SIK0")
1*1*1*1*0*0*0*0*0*0
^rep("PRER","SIK")
1*1**1*
^rep("PRER","SIK0")
1*1*1*1*0*0*0*0*0*0
^rep("PRER","US",2)
D DT^P1PRER
^rep("PRER","US",3)
D HZM1^P1PRER
^rep("PRER","US",4)
D PAR^P1PRER
^rep("PRER","US",5)
D PAR^P1PRBT
^rep("PRER","US",6)
D PAR^P1PRPP
^rep("PRHZ")
zepnfd itl mihixt zxikn g"ec 
^rep("PRHZ",0,"HB")
zipeayg;8
^rep("PRHZ",0,"HZM")
dpnfd;7
^rep("PRHZ",0,"HZM","SH")
1
^rep("PRHZ",0,"LKH")
gewl 'qn;10
^rep("PRHZ",0,"LKH","FILE")
^LKH
^rep("PRHZ",0,"LKH","OUT")
LKH1
^rep("PRHZ",0,"LKH1")
gewl my;20H
^rep("PRHZ",0,"LKHN")
gewl 'qn;11
^rep("PRHZ",0,"LKHN","FILE")
^LKH
^rep("PRHZ",0,"LKHN","OUT")
LKHN1
^rep("PRHZ",0,"LKHN1")
gewl my;14H
^rep("PRHZ",0,"LKHN1","SH")
1
^rep("PRHZ",0,"NAME")
gewl my;12H
^rep("PRHZ",0,"NAME","SH")
1
^rep("PRHZ",0,"NCAB")
zipeayg;6
^rep("PRHZ",0,"NCAB","SH")
0
^rep("PRHZ",0,"NMB")
gewl xtqn;10
^rep("PRHZ",0,"NMB","FILE")
^LKH
^rep("PRHZ",0,"NMB","OUT")
NAME
^rep("PRHZ",0,"PAR")
hixt 'qn;8
^rep("PRHZ",0,"PAR","FILE")
^PAR
^rep("PRHZ",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("PRHZ",0,"PAR","OUT")
PAR1
^rep("PRHZ",0,"PAR1")
hixt xe`z;16H
^rep("PRHZ",0,"PAR1","SH")
1
^rep("PRHZ",0,"PSL")
gily cew;3
^rep("PRHZ",0,"PSL","FILE")
^P1SL
^rep("PRHZ",0,"PSL","OUT")
PSL1
^rep("PRHZ",0,"PSL1")
gily my;10H
^rep("PRHZ",0,"PSL1","SH")
1
^rep("PRHZ",0,"SHAA")
dryl;7
^rep("PRHZ",0,"SHAA","SH")
1
^rep("PRHZ",0,"SL")
gily cew;5
^rep("PRHZ",0,"SL","FILE")
^P1SL
^rep("PRHZ",0,"SL","OUT")
SL1
^rep("PRHZ",0,"SL1")
gily my;12H
^rep("PRHZ",0,"SUGL")
zegewl zveaw;8
^rep("PRHZ",0,"SUGL","FILE")
^SUGL
^rep("PRHZ",0,"SUGL","OUT")
SUGL1
^rep("PRHZ",0,"SUGL1")
dveaw my;12H
^rep("PRHZ",0,"SUGL1","SH")
1
^rep("PRHZ",0,"SUGT")
melyz beq;5
^rep("PRHZ",0,"SUGT","SH")
1
^rep("PRHZ",0,"TRH")
jix`z;8D
^rep("PRHZ",0,"TRH","M2")
S TRH=$ZD(DT,"DD.MM.YY")
^rep("PRHZ",0,"TRH","SH")
1
^rep("PRHZ",0,"TS")
melyzl;8
^rep("PRHZ",0,"TSHL")
melyzl;8
^rep("PRHZ",0,"TSHL","OUT")
TSHL
^rep("PRHZ",0,"x1")
zenk;4,0
^rep("PRHZ",0,"x2")
mekq;8,2
^rep("PRHZ",0,"x3")
hixtl dgpd;8,2
^rep("PRHZ",0,"x4")
dgpd ixg`;8,2
^rep("PRHZ",0,"x5")
;,
^rep("PRHZ","COD")
TRH*SHAA*SUGL*SUGL1*LKHN*LKHN1*HZM*PAR*PAR1*x1*x2*x3*x4
^rep("PRHZ","CT")
0*0*0*0*0*2
^rep("PRHZ","FLD")
TRH*SHAA*SUGL*LKHN*HZM*PAR*x1*x2*x3*x4
^rep("PRHZ","FLD0")
**-*-******
^rep("PRHZ","GLOB1")
^VRM($J)
^rep("PRHZ","GLOB2")
^VRM($J,DT,SHAA,SUGL,LKHN,HZM,PAR)
^rep("PRHZ","LPT")
B
^rep("PRHZ","MIUN")
3*4*3*1*2*1
^rep("PRHZ","MIUN","PROG")
TRH^P1PRHZ
^rep("PRHZ","QUERY","(mihixt itl oein) hxetn","CT")
0*0*0*0*2*0
^rep("PRHZ","QUERY","(mihixt itl oein) hxetn","FLD0")
**-*-****
^rep("PRHZ","QUERY","(mihixt itl oein) hxetn","MIUN")
3*4*3*2*1*2
^rep("PRHZ","QUERY","(mihixt itl oein) hxetn","SIK0")
0*0*0*0*1*0
^rep("PRHZ","QUERY","(mikix`z itl oein) hxetn","CT")
2*0*0*0*0*0
^rep("PRHZ","QUERY","(mikix`z itl oein) hxetn","FLD0")
*-*-*-******
^rep("PRHZ","QUERY","(mikix`z itl oein) hxetn","MIUN")
1*3*1*3*2*4
^rep("PRHZ","QUERY","(mikix`z itl oein) hxetn","SIK0")
1*0*0*0*0*0
^rep("PRHZ","QUERY","(zepnfd itl oein) hxetn","CT")
0*0*0*0*0*2
^rep("PRHZ","QUERY","(zepnfd itl oein) hxetn","FLD0")
**-*-******
^rep("PRHZ","QUERY","(zepnfd itl oein) hxetn","MIUN")
3*4*3*1*2*1
^rep("PRHZ","QUERY","(zepnfd itl oein) hxetn","SIK0")
0*0*0*1*0*1
^rep("PRHZ","SHP","KOD")
P1HZH
^rep("PRHZ","SHP","PROG")
S MAS(5)="zepnfd itl mihixt g""ec"
^rep("PRHZ","SIK")
1*1*1*1*
^rep("PRHZ","SIK0")
0*0*0*1*0*1
^rep("PRHZ","US",2)
S TRH=$ZD(DT,"DD.MM.YY")
^rep("PRHZ","US",7)
D PAR^P1PRHZ
^rep("PROT")
OTH ihixt zexikn g"ec
^rep("PROT",0,"HB")
zipeayg;8
^rep("PROT",0,"HZM")
dpnfd;7
^rep("PROT",0,"HZM","SH")
1
^rep("PROT",0,"LKH")
gewl 'qn;10
^rep("PROT",0,"LKH","FILE")
^LKH
^rep("PROT",0,"LKH","OUT")
LKH1
^rep("PROT",0,"LKH1")
gewl my;20H
^rep("PROT",0,"LKHN")
gewl 'qn;11
^rep("PROT",0,"LKHN","FILE")
^LKH
^rep("PROT",0,"LKHN","OUT")
LKHN1
^rep("PROT",0,"LKHN1")
gewl my;14H
^rep("PROT",0,"LKHN1","SH")
1
^rep("PROT",0,"NAME")
gewl my;12H
^rep("PROT",0,"NAME","SH")
1
^rep("PROT",0,"NCAB")
zipeayg;6
^rep("PROT",0,"NCAB","SH")
0
^rep("PROT",0,"NMB")
gewl xtqn;10
^rep("PROT",0,"NMB","FILE")
^LKH
^rep("PROT",0,"NMB","OUT")
NAME
^rep("PROT",0,"PAR")
hixt 'qn;8
^rep("PROT",0,"PAR","FILE")
^PAR
^rep("PROT",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("PROT",0,"PAR","OUT")
PAR1
^rep("PROT",0,"PAR1")
hixt xe`z;16H
^rep("PROT",0,"PAR1","SH")
1
^rep("PROT",0,"PSL")
gily cew;3
^rep("PROT",0,"PSL","FILE")
^P1SL
^rep("PROT",0,"PSL","OUT")
PSL1
^rep("PROT",0,"PSL1")
gily my;10H
^rep("PROT",0,"PSL1","SH")
1
^rep("PROT",0,"SHAA")
dryl;7
^rep("PROT",0,"SHAA","SH")
1
^rep("PROT",0,"SL")
gily cew;5
^rep("PROT",0,"SL","FILE")
^P1SL
^rep("PROT",0,"SL","OUT")
SL1
^rep("PROT",0,"SL1")
gily my;12H
^rep("PROT",0,"SUGL")
zegewl zveaw;8
^rep("PROT",0,"SUGL","FILE")
^SUGL
^rep("PROT",0,"SUGL","OUT")
SUGL1
^rep("PROT",0,"SUGL1")
dveaw my;12H
^rep("PROT",0,"SUGL1","SH")
1
^rep("PROT",0,"SUGT")
melyz beq;5
^rep("PROT",0,"SUGT","SH")
1
^rep("PROT",0,"TRH")
jix`z;8D
^rep("PROT",0,"TRH","M2")
S TRH=$ZD(DT,"DD.MM.YY")
^rep("PROT",0,"TRH","SH")
1
^rep("PROT",0,"TS")
melyzl;8
^rep("PROT",0,"TSHL")
melyzl;8
^rep("PROT",0,"TSHL","OUT")
TSHL
^rep("PROT",0,"x1")
zenk;4,0
^rep("PROT",0,"x2")
mekq;8,2
^rep("PROT",0,"x3")
`ln mekq;8,2
^rep("PROT",0,"x4")
;,
^rep("PROT","COD")
TRH*SHAA*SUGL*SUGL1*LKHN*LKHN1*HZM*PAR*PAR1*x1*x2*x3
^rep("PROT","CT")
0*0*0*0*2*0
^rep("PROT","FLD")
TRH*SHAA*SUGL*LKHN*HZM*PAR*x1*x2*x3
^rep("PROT","FLD0")
**-*-*****
^rep("PROT","GLOB1")
^VRM($J)
^rep("PROT","GLOB2")
^VRM($J,DT,SHAA,SUGL,LKHN,HZM,PAR)
^rep("PROT","LPT")
B
^rep("PROT","MIUN")
3*4*3*2*1*2
^rep("PROT","MIUN","PROG")
TRH^P1PRHZ
^rep("PROT","QUERY","(mihixt itl oein) hxetn","CT")
0*0*0*0*2*0
^rep("PROT","QUERY","(mihixt itl oein) hxetn","FLD0")
**-*-*****
^rep("PROT","QUERY","(mihixt itl oein) hxetn","MIUN")
3*4*3*2*1*2
^rep("PROT","QUERY","(mihixt itl oein) hxetn","SIK0")
0*0*0*0*1*0
^rep("PROT","QUERY","(mikix`z itl oein) hxetn","CT")
2*0*0*0*0*0
^rep("PROT","QUERY","(mikix`z itl oein) hxetn","FLD0")
*-*-*-*****
^rep("PROT","QUERY","(mikix`z itl oein) hxetn","MIUN")
1*3*1*3*2*3
^rep("PROT","QUERY","(mikix`z itl oein) hxetn","SIK0")
1*0*0*0*0*0
^rep("PROT","QUERY","(zegewl zveaw itl oein) hxetn","CT")
0*0*1*2*0*0
^rep("PROT","QUERY","(zegewl zveaw itl oein) hxetn","FLD0")
-*-***-****
^rep("PROT","QUERY","(zegewl zveaw itl oein) hxetn","MIUN")
2*5*1*2*4*3
^rep("PROT","QUERY","(zegewl zveaw itl oein) hxetn","SIK0")
1*0*1*0*0*0
^rep("PROT","QUERY","(zepnfd itl oein) hxetn","CT")
0*0*0*0*0*2
^rep("PROT","QUERY","(zepnfd itl oein) hxetn","FLD0")
**-*-*****
^rep("PROT","QUERY","(zepnfd itl oein) hxetn","MIUN")
3*4*3*1*2*1
^rep("PROT","QUERY","(zepnfd itl oein) hxetn","SIK0")
0*0*0*1*0*1
^rep("PROT","SHP","KOD")
P1HZH
^rep("PROT","SHP","PROG")
S MAS(5)=$S($D(PAROTH):"zepnfd itl OTH ihixt g""ec",1:"zepnfd mihixt g""ec")
^rep("PROT","SIK")
1*1*1*
^rep("PROT","SIK0")
0*0*0*0*1*0
^rep("PROT","US",2)
S TRH=$ZD(DT,"DD.MM.YY")
^rep("PROT","US",7)
D PAR^P1PRHZ
^rep("PRPP")
hxetn hixt zxikn g"ec
^rep("PRPP",0,"DEP")
dwlgn;5
^rep("PRPP",0,"DEP","FILE")
^DEP
^rep("PRPP",0,"DEP","OUT")
DEP1
^rep("PRPP",0,"DEP1")
dwlgn my;15H
^rep("PRPP",0,"DEP1","SH")
1
^rep("PRPP",0,"HB")
zipeayg;8
^rep("PRPP",0,"HZM")
dpnfd;7
^rep("PRPP",0,"HZM","SH")
1
^rep("PRPP",0,"LKH")
gewl 'qn;10
^rep("PRPP",0,"LKH","FILE")
^LKH
^rep("PRPP",0,"LKH","OUT")
LKH1
^rep("PRPP",0,"LKH1")
gewl my;20H
^rep("PRPP",0,"MRK")
sipq;4
^rep("PRPP",0,"MRK","FILE")
^[^UCI("MLG")]YZRN
^rep("PRPP",0,"MRK","OUT")
MRK1
^rep("PRPP",0,"MRK1")
sipq my;15H
^rep("PRPP",0,"MRK1","SH")
1
^rep("PRPP",0,"NAME")
gewl my;12H
^rep("PRPP",0,"NAME","SH")
1
^rep("PRPP",0,"NCAB")
zipeayg;6
^rep("PRPP",0,"NCAB","SH")
0
^rep("PRPP",0,"NMB")
gewl xtqn;10
^rep("PRPP",0,"NMB","FILE")
^LKH
^rep("PRPP",0,"NMB","OUT")
NAME
^rep("PRPP",0,"PAR")
hixt 'qn;8
^rep("PRPP",0,"PAR","FILE")
^PAR
^rep("PRPP",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("PRPP",0,"PAR","OUT")
PAR1
^rep("PRPP",0,"PAR1")
hixt xe`z;16H
^rep("PRPP",0,"PAR1","SH")
1
^rep("PRPP",0,"PSL")
gily cew;3
^rep("PRPP",0,"PSL","FILE")
^P1SL
^rep("PRPP",0,"PSL","OUT")
PSL1
^rep("PRPP",0,"PSL1")
gily my;10H
^rep("PRPP",0,"PSL1","SH")
1
^rep("PRPP",0,"SHAA")
dryl;7
^rep("PRPP",0,"SHAA","SH")
1
^rep("PRPP",0,"SL")
gily cew;5
^rep("PRPP",0,"SL","FILE")
^P1SL
^rep("PRPP",0,"SL","OUT")
SL1
^rep("PRPP",0,"SL1")
gily my;12H
^rep("PRPP",0,"SUGL")
gewl beq;8
^rep("PRPP",0,"SUGL","FILE")
^SUGL
^rep("PRPP",0,"SUGL","OUT")
SUGL1
^rep("PRPP",0,"SUGL1")
gewl beq xe`z;15H
^rep("PRPP",0,"SUGL1","SH")
1
^rep("PRPP",0,"SUGP")
mihixt zveaw;12
^rep("PRPP",0,"SUGP","FILE")
^PARSUG
^rep("PRPP",0,"SUGP","OUT")
SUGP1
^rep("PRPP",0,"SUGP1")
mihixt zveaw my;15H
^rep("PRPP",0,"SUGP1","SH")
1
^rep("PRPP",0,"SUGS")
ogley beq;5
^rep("PRPP",0,"SUGS","FILE")
^SUGS
^rep("PRPP",0,"SUGS","OUT")
SUGS1
^rep("PRPP",0,"SUGS1")
'ley beq xe`z;12
^rep("PRPP",0,"SUGS1","OUT")
1
^rep("PRPP",0,"SUGT")
melyz beq;5
^rep("PRPP",0,"SUGT","SH")
1
^rep("PRPP",0,"TRH")
jix`z;8D
^rep("PRPP",0,"TRH","M2")
S TRH=$ZD(DT,3)
^rep("PRPP",0,"TRH","SH")
1
^rep("PRPP",0,"TRH1")
YYYYMMDD;8
^rep("PRPP",0,"TRH1","SH")
1
^rep("PRPP",0,"TS")
melyzl;8
^rep("PRPP",0,"TSHL")
melyzl;8
^rep("PRPP",0,"TSHL","OUT")
TSHL
^rep("PRPP",0,"x1")
zenk;4,0
^rep("PRPP",0,"x2")
mekq;8,2
^rep("PRPP",0,"x3")
;,
^rep("PRPP","COD")
MRK*MRK1*TRH*TRH1*SHAA*SUGL*SUGL1*SUGS*SUGS1*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*HZM*x1*x2
^rep("PRPP","CT")
0*0*0*0*0*1*1*2*0*0
^rep("PRPP","FLD")
MRK*TRH*TRH1*SHAA*SUGL*SUGS*DEP*SUGP*PAR*HZM*x1*x2
^rep("PRPP","FLD0")
*-****-******
^rep("PRPP","GLOB1")
^VRM($J)
^rep("PRPP","GLOB2")
^VRM($J,DT,SHAA,SUGL,HZM,PAR)
^rep("PRPP","LPT")
B
^rep("PRPP","MIUN")
1*4*6*7*2*1*3*4*8*5
^rep("PRPP","MIUN","PROG")
TRH^P1PRPP
^rep("PRPP","QUERY","zewlgne zegewl ibeq , mitipq itl","CT")
0*0*0*0*0*1*1*2*0*0
^rep("PRPP","QUERY","zewlgne zegewl ibeq , mitipq itl","FLD0")
*-****-******
^rep("PRPP","QUERY","zewlgne zegewl ibeq , mitipq itl","MIUN")
1*5*6*7*2*3*3*4*8*5
^rep("PRPP","QUERY","zewlgne zegewl ibeq , mitipq itl","SIK0")
0*0*0*0*0*0*0*0*0*0
^rep("PRPP","SHP","KOD")
P1HZH
^rep("PRPP","SIK")
1*1*
^rep("PRPP","SIK0")
0*1*0*0*0*1*0*0*0*0
^rep("PRPP","US",2)
D DT^P1PRPP
^rep("PRPP","US",5)
D HZM1^P1PRPP
^rep("PRPP","US",6)
D PAR^P1PRPP
^rep("PRTH")
iz`eeyd mihixt zxikn g"ec
^rep("PRTH",0,"DEP")
dwlgn;5
^rep("PRTH",0,"DEP","FILE")
^DEP
^rep("PRTH",0,"DEP","OUT")
DEP1
^rep("PRTH",0,"DEP","SET")
0
^rep("PRTH",0,"DEP1")
dwlgn my;12H
^rep("PRTH",0,"DEP1","SET")
0
^rep("PRTH",0,"DEP1","SH")
1
^rep("PRTH",0,"KVZ")
dveaw;5
^rep("PRTH",0,"KVZ","FILE")
^PARSUG
^rep("PRTH",0,"KVZ","OUT")
KVZ1
^rep("PRTH",0,"KVZ","SET")
1
^rep("PRTH",0,"KVZ1")
dveaw xe`z;12H
^rep("PRTH",0,"KVZ1","SET")
0
^rep("PRTH",0,"KVZ1","SH")
1
^rep("PRTH",0,"PRT")
hixt cew;8
^rep("PRTH",0,"PRT","FILE")
^PAR
^rep("PRTH",0,"PRT","M2")
S PRT1=$$SHEM^P1P(PRT)
^rep("PRTH",0,"PRT","OUT")
PRT1
^rep("PRTH",0,"PRT","SET")
1
^rep("PRTH",0,"PRT1")
hixt my;16H
^rep("PRTH",0,"PRT1","SET")
0
^rep("PRTH",0,"PRT1","SH")
1
^rep("PRTH",0,"x1")
1 zenk;6,0
^rep("PRTH",0,"x2")
2 zenk;6,0
^rep("PRTH",0,"x3")
zenka yxtd;10S,0
^rep("PRTH",0,"x4")
%-a yxtd;10S,2
^rep("PRTH",0,"x5")
1 mekq;9,2
^rep("PRTH",0,"x6")
2 mekq;9,2
^rep("PRTH",0,"x7")
mekqa yxtd;10S,2
^rep("PRTH",0,"x8")
%-a yxtd;8S,2
^rep("PRTH",0,"x9")
;,
^rep("PRTH","COD")
DEP*DEP1*KVZ*KVZ1*PRT*PRT1*x1*x2*x3*x4*x5*x6*x7*x8
^rep("PRTH","CT")
1*2*0
^rep("PRTH","FLD")
DEP*KVZ*PRT*x1*x2*x3*x4*x5*x6*x7*x8
^rep("PRTH","FLD0")
**********
^rep("PRTH","GLOB1")
^VRM($J)
^rep("PRTH","GLOB2")
^VRM($J,KVZ,PRT)
^rep("PRTH","LPT")
S
^rep("PRTH","MIUN")
1*2*3
^rep("PRTH","QUERY","fkexn","CT")
2*0*0
^rep("PRTH","QUERY","fkexn","FLD0")
**-********
^rep("PRTH","QUERY","fkexn","MIUN")
1*2*3
^rep("PRTH","QUERY","fkexn","SIK0")
1*0*0
^rep("PRTH","QUERY","hxetn","CT")
1*2*0
^rep("PRTH","QUERY","hxetn","FLD0")
**********
^rep("PRTH","QUERY","hxetn","MIUN")
1*2*3
^rep("PRTH","QUERY","hxetn","SIK0")
1*1*0
^rep("PRTH","SHP","KOD")
PRTH
^rep("PRTH","SHP","PROG")
S MAS(1)=YY1,MAS(2)=MM10,MAS(3)=MM11,MAS(5)=YY2,MAS(7)=MM20,MAS(8)=MM21
^rep("PRTH","SIK")
1*1*1*0*1*1*1**
^rep("PRTH","SIK0")
1*1*0
^rep("PRTH","SIX")
S SUM(K,4)="" S:SUM(K,1) SUM(K,4)=$J(SUM(K,3)/SUM(K,1)*100,2,2) S SUM(K,8)="" I SUM(K,5) S SUM(K,8)=$J(SUM(K,7)/SUM(K,5)*100,2,2)
^rep("PRTH","US",2)
D KVZ^P1DPSV
^rep("PRTH","US",3)
D PRT^P1DPSV
^rep("SHPM")
mixvlne 'gley itl mihixt g"ec
^rep("SHPM",0,"DEP")
dwlgn;5
^rep("SHPM",0,"DEP","FILE")
^DEP
^rep("SHPM",0,"DEP","OUT")
DEP1
^rep("SHPM",0,"DEP1")
xe`z;12H
^rep("SHPM",0,"DEP1","SH")
1
^rep("SHPM",0,"MLZ")
xvln 'qn;5.
^rep("SHPM",0,"MLZ","FILE")
^NAME
^rep("SHPM",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^rep("SHPM",0,"MLZ","OUT")
MLZ1
^rep("SHPM",0,"MLZ1")
xvln my;12H
^rep("SHPM",0,"MLZ1","SH")
1
^rep("SHPM",0,"MLZR")
xvln;9
^rep("SHPM",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^rep("SHPM",0,"MLZR","OUT")
MLZR1
^rep("SHPM",0,"MLZR1")
xvln my;12H
^rep("SHPM",0,"MLZR1","SH")
0
^rep("SHPM",0,"PAR")
hixt;6
^rep("SHPM",0,"PAR","FILE")
^PAR
^rep("SHPM",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("SHPM",0,"PAR","OUT")
PAR1
^rep("SHPM",0,"PAR1")
hixt xe`z;20H
^rep("SHPM",0,"PAR1","SH")
1
^rep("SHPM",0,"SHULH")
ogley;3
^rep("SHPM",0,"SHULH","SH")
1
^rep("SHPM",0,"SUGP")
hixt beq;3
^rep("SHPM",0,"SUGP","FILE")
^PARSUG
^rep("SHPM",0,"SUGP","OUT")
SUGP1
^rep("SHPM",0,"SUGP1")
beq xe`z;10H
^rep("SHPM",0,"SUGP1","SH")
0
^rep("SHPM",0,"SUGS")
ogley beq;8
^rep("SHPM",0,"SUGS","FILE")
^SUGS
^rep("SHPM",0,"SUGS","OUT")
SUGS1
^rep("SHPM",0,"SUGS1")
xe`z;12H
^rep("SHPM",0,"SUGS1","SH")
1
^rep("SHPM",0,"x1")
zenk;7,0
^rep("SHPM",0,"x2")
dgpd iptl;9,2
^rep("SHPM",0,"x3")
dgpd;8,2
^rep("SHPM",0,"x4")
dgpd ixg`;9,2
^rep("SHPM",0,"x5")
;,
^rep("SHPM",0,"x6")
;,
^rep("SHPM","COD")
SUGS*SUGS1*MLZ*MLZ1*SHULH*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4
^rep("SHPM","CT")
1*2*0*2*0*0*0
^rep("SHPM","FLD")
SUGS*MLZ*SHULH*DEP*SUGP*PAR*x1*x2*x3*x4
^rep("SHPM","FLD0")
**-*-*-******
^rep("SHPM","GLOB1")
^VRM(PRTN)
^rep("SHPM","GLOB2")
^VRM(PRTN,SUGS,MLZ,SHULH,DEP,SUGP,PAR)
^rep("SHPM","LPT")
S
^rep("SHPM","MIUN")
1*2*3*2*3*3*0
^rep("SHPM","SHP","KOD")
P1DPMS
^rep("SHPM","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^rep("SHPM","SIK")
1*1*1*1**
^rep("SHPM","SIK0")
1*1*0*1*0*0*0
^rep("SHPM","US",7)
D PAR^P1DPSHLM
^rep("SHPR")
ogley beq itl mihixt g"ec
^rep("SHPR",0,"DEP")
dwlgn;5
^rep("SHPR",0,"DEP","FILE")
^DEP
^rep("SHPR",0,"DEP","OUT")
DEP1
^rep("SHPR",0,"DEP1")
xe`z;12H
^rep("SHPR",0,"DEP1","SH")
1
^rep("SHPR",0,"MLZR")
xvln;9
^rep("SHPR",0,"MLZR","M2")
S MLZR1=$$^P1NAME(MLZR)
^rep("SHPR",0,"MLZR","OUT")
MLZR1
^rep("SHPR",0,"MLZR1")
xvln my;12H
^rep("SHPR",0,"MLZR1","SH")
0
^rep("SHPR",0,"PAR")
hixt;5
^rep("SHPR",0,"PAR","FILE")
^PAR
^rep("SHPR",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("SHPR",0,"PAR","OUT")
PAR1
^rep("SHPR",0,"PAR1")
hixt xe`z;20H
^rep("SHPR",0,"PAR1","SH")
1
^rep("SHPR",0,"SHULH")
ogley;3
^rep("SHPR",0,"SHULH","SH")
1
^rep("SHPR",0,"SUGP")
hixt beq;3
^rep("SHPR",0,"SUGP","FILE")
^PARSUG
^rep("SHPR",0,"SUGP","OUT")
SUGP1
^rep("SHPR",0,"SUGP1")
beq xe`z;10H
^rep("SHPR",0,"SUGP1","SH")
0
^rep("SHPR",0,"SUGS")
ogley beq;8
^rep("SHPR",0,"SUGS","FILE")
^SUGS
^rep("SHPR",0,"SUGS","OUT")
SUGS1
^rep("SHPR",0,"SUGS1")
xe`z;12H
^rep("SHPR",0,"SUGS1","SH")
1
^rep("SHPR",0,"x1")
zenk;5,0
^rep("SHPR",0,"x2")
dgpd iptl;10,2
^rep("SHPR",0,"x3")
hixtl dgpd;10,2
^rep("SHPR",0,"x4")
OTH dgpd;8,2
^rep("SHPR",0,"x5")
zegpd ixg`;10,2
^rep("SHPR",0,"x6")
;,
^rep("SHPR","COD")
SUGS*SUGS1*SHULH*DEP*DEP1*SUGP*SUGP1*PAR*PAR1*x1*x2*x3*x4*x5
^rep("SHPR","CT")
1*2*2*2*0*0*0
^rep("SHPR","FLD")
SUGS*SHULH*DEP*SUGP*PAR*x1*x2*x3*x4*x5
^rep("SHPR","FLD0")
*-*-*******
^rep("SHPR","GLOB1")
^VRM(PRTN)
^rep("SHPR","GLOB2")
^VRM(PRTN,SUGS,SHULH,DEP,SUGP,PAR)
^rep("SHPR","LPT")
S
^rep("SHPR","MIUN")
1*2*2*2*3*0*0
^rep("SHPR","SHP","KOD")
P1DMZPR
^rep("SHPR","SHP","PROG")
S MAS(5)=MEDAT,MAS(10)=ADDAT
^rep("SHPR","SIK")
1*1*1*1*1*
^rep("SHPR","SIK0")
1*0*1*1*0*0*0
^rep("SHPR","US",6)
D PAR^P1DPSHL
^rep("SUGM")
zerahn ixry dixehqid
^rep("SUGM",0,"DAT1")
jix`z;8D
^rep("SUGM",0,"DAT1","SH")
1
^rep("SUGM",0,"SUGM")
rahn beq;8
^rep("SUGM",0,"SUGM","FILE")
^P1SUGM
^rep("SUGM",0,"SUGM","M2")
D SUGM^PLMATBS
^rep("SUGM",0,"SUGM","OUT")
SUGM1
^rep("SUGM",0,"SUGM1")
beq xe`z;8H
^rep("SUGM",0,"SUGM1","SH")
1
^rep("SUGM",0,"x1")
rahn xry;8,3
^rep("SUGM",0,"x2")
;,
^rep("SUGM","COD")
DAT1*SUGM*SUGM1*x1
^rep("SUGM","CT")
2*0
^rep("SUGM","FLD")
DAT1*SUGM*x1
^rep("SUGM","GLOB1")
^P1SUGM("H")
^rep("SUGM","GLOB2")
^P1SUGM("H",DT,SUGM)
^rep("SUGM","LPT")
B
^rep("SUGM","MIUN")
1*2
^rep("SUGM","SIK")
*
^rep("SUGM","SIK0")
0*0
^rep("SUGM","US",2)
S DAT1=$$^%L1DC(DT,1)
^rep("SUGM","US",3)
D SUGM^PLMATBS
^rep("SUGP")
zeveaw itl mihixt zniyx
^rep("SUGP",0,"PAR")
hixt 'qn;8
^rep("SUGP",0,"PAR","FILE")
^PAR
^rep("SUGP",0,"PAR","M2")
D PAR1^P1DSUGP
^rep("SUGP",0,"PAR","OUT")
PAR1
^rep("SUGP",0,"PAR1")
hixt xe`z;24H
^rep("SUGP",0,"PAR1","SH")
0
^rep("SUGP",0,"SUGP")
dveaw;5
^rep("SUGP",0,"SUGP","FILE")
^PARSUG
^rep("SUGP",0,"SUGP","OUT")
SUGP1
^rep("SUGP",0,"SUGP1")
dveaw xe`z;18H
^rep("SUGP",0,"SUGP1","SH")
0
^rep("SUGP",0,"x1")
dxikn xign;10,2
^rep("SUGP",0,"x2")
;,
^rep("SUGP","COD")
SUGP*SUGP1*PAR*PAR1*x1
^rep("SUGP","CT")
2*0*
^rep("SUGP","FLD")
SUGP*PAR*x1
^rep("SUGP","FLD0")
***
^rep("SUGP","GLOB1")
^PAR
^rep("SUGP","GLOB2")
^PAR(PAR)
^rep("SUGP","LPT")
B
^rep("SUGP","MIUN")
1*2*3
^rep("SUGP","SIK")
*
^rep("SUGP","SIK0")
0*0*
^rep("SUGP","US",-1)
S x1=$$MH^P1P(PAR)
^rep("SUGP","US",1)
D PAR^P1DSUGP
^rep("TIPM")
mixvlnl mitih g"ec
^rep("TIPM",0,"MLZ")
xvln;5.
^rep("TIPM",0,"MLZ","FILE")
^NAME
^rep("TIPM",0,"MLZ","M2")
S MLZ1=$$^P1NAME(MLZ)
^rep("TIPM",0,"MLZ","OUT")
MLZ1
^rep("TIPM",0,"MLZ1")
xvln my;20H
^rep("TIPM",0,"MLZ1","SH")
1
^rep("TIPM",0,"TRH")
jix`z;8D
^rep("TIPM",0,"TRH","SH")
1
^rep("TIPM",0,"x1")
xky;8,2
^rep("TIPM",0,"x2")
i`xy`a tih;9,2
^rep("TIPM",0,"x3")
k"dq;8,2
^rep("TIPM",0,"x4")
;,
^rep("TIPM","COD")
MLZ*MLZ1*TRH*x1*x2*x3
^rep("TIPM","CT")
0*0
^rep("TIPM","FLD")
MLZ*TRH*x1*x2*x3
^rep("TIPM","GLOB1")
^P1TIPM
^rep("TIPM","GLOB2")
^P1TIPM(DT,MLZ)
^rep("TIPM","LPT")
B
^rep("TIPM","MIUN")
1*2
^rep("TIPM","SIK")
1*1*1*
^rep("TIPM","SIK0")
1*0
^rep("TIPM","US",-1)
S TRH=$$^%L1DC(TIP,1)
^rep("TIPM","US",1)
D REPTRH^P1TIPM
^rep("TIPM","US",2)
D REPMLZ^P1TIPM
^rep("TMSH")
zery itl migelyn gec
^rep("TMSH",0,"SHAA")
dry;8
^rep("TMSH",0,"SHAA","SET")
0
^rep("TMSH",0,"SHAA","SH")
1
^rep("TMSH",0,"TRH")
jix`z;8D
^rep("TMSH",0,"TRH","SET")
0
^rep("TMSH",0,"TRH","SH")
1
^rep("TMSH",0,"x1")
zepnfd zenk;12,0
^rep("TMSH",0,"x2")
melyzl k"dq;12,2
^rep("TMSH",0,"x3")
;,
^rep("TMSH",0,"x4")
;,
^rep("TMSH","COD")
TRH*SHAA*x1*x2
^rep("TMSH","CT")
0*0
^rep("TMSH","FLD")
TRH*SHAA*x1*x2
^rep("TMSH","FLD0")

^rep("TMSH","GLOB1")
^P1TMI
^rep("TMSH","GLOB2")
^P1TMI(DT,TM)
^rep("TMSH","LPT")
B
^rep("TMSH","MIUN")
1*2
^rep("TMSH","QUERY","zery itl fkexn migelyn g""ec","CT")
0*0
^rep("TMSH","QUERY","zery itl fkexn migelyn g""ec","FLD0")
-***
^rep("TMSH","QUERY","zery itl fkexn migelyn g""ec","MIUN")
1*1
^rep("TMSH","QUERY","zery itl fkexn migelyn g""ec","SIK0")
1*0
^rep("TMSH","QUERY","zerye migix`z itl fkexn migelyn g""ec","CT")
0*0
^rep("TMSH","QUERY","zerye migix`z itl fkexn migelyn g""ec","FLD0")

^rep("TMSH","QUERY","zerye migix`z itl fkexn migelyn g""ec","MIUN")
1*2
^rep("TMSH","QUERY","zerye migix`z itl fkexn migelyn g""ec","SIK0")
1*0
^rep("TMSH","SIK")
1*1**
^rep("TMSH","SIK0")
1*0
^rep("TMSH","US",-1)
D DT^P1DTMSH
^rep("TMSH","US",1)
D DT^P1DTMSH
^rep("TMSH","US",2)
D SHAA^P1DTMSH
^rep("TPDH")
mitih aeyig g"ec
^rep("TPDH",0,"MISHM")
zxnyn;5
^rep("TPDH",0,"MISHM","SH")
1
^rep("TPDH",0,"OV")
xtqn;5.
^rep("TPDH",0,"OV","FILE")
^NAME
^rep("TPDH",0,"OV","M2")
S OV1=$$^P1NAME(OV)
^rep("TPDH",0,"OV","OUT")
OV1
^rep("TPDH",0,"OV1")
caer my;12H
^rep("TPDH",0,"OV1","SH")
1
^rep("TPDH",0,"TRH")
jix`z;8D
^rep("TPDH",0,"TRH","SH")
1
^rep("TPDH",0,"x1")
tih;8,2
^rep("TPDH",0,"x2")
zexy inc;8,2
^rep("TPDH",0,"x3")
zery;8,2
^rep("TPDH",0,"x4")
ehp;8,2
^rep("TPDH",0,"x5")
zxekyn;8,2
^rep("TPDH",0,"x6")
dnlyd;8,2
^rep("TPDH",0,"x7")
dtewa cwted;8,2
^rep("TPDH",0,"x8")
;,
^rep("TPDH","COD")
OV*OV1*TRH*MISHM*x1*x2*x3*x4*x5*x6*x7
^rep("TPDH","CT")
1*2*0
^rep("TPDH","FLD")
OV*TRH*MISHM*x1*x2*x3*x4*x5*x6*x7
^rep("TPDH","FLD0")

^rep("TPDH","GLOB1")
^TEMP($P)
^rep("TPDH","GLOB2")
^TEMP($P,I)
^rep("TPDH","LPT")
B
^rep("TPDH","MIUN")
1*2*3
^rep("TPDH","MIUN","PROG")
PREP^P1TIPDOH
^rep("TPDH","QUERY","fkexn g""ec","CT")
2*2*0
^rep("TPDH","QUERY","fkexn g""ec","FLD0")
*-*-*******
^rep("TPDH","QUERY","fkexn g""ec","MIUN")
1*2*3
^rep("TPDH","QUERY","fkexn g""ec","SIK0")
1*0*0
^rep("TPDH","QUERY","micaer itl mikix`z g""ec","CT")
2*1*0
^rep("TPDH","QUERY","micaer itl mikix`z g""ec","FLD0")

^rep("TPDH","QUERY","micaer itl mikix`z g""ec","MIUN")
2*1*3
^rep("TPDH","QUERY","micaer itl mikix`z g""ec","SIK0")
0*0*0
^rep("TPDH","QUERY","mikix`z itl micaer g""ec","CT")
1*2*0
^rep("TPDH","QUERY","mikix`z itl micaer g""ec","FLD0")

^rep("TPDH","QUERY","mikix`z itl micaer g""ec","MIUN")
1*2*3
^rep("TPDH","QUERY","mikix`z itl micaer g""ec","SIK0")
1*0*0
^rep("TPDH","SIK")
1*1*1*1*1*1*1*
^rep("TPDH","SIK0")
1*0*0
^rep("TPDH","US",2)
D FRM^P1TIPDOH
^rep("TRRD")
excey `l oiicry  mihixt zniyx
^rep("TRRD",0,"MRK")
fkxn 'qn;4
^rep("TRRD",0,"MRK","FILE")
^PARSEND
^rep("TRRD",0,"MRK","M2")
D MRK^P1TR
^rep("TRRD",0,"MRK","OUT")
MRK1
^rep("TRRD",0,"MRK1")
fkxn my;16H
^rep("TRRD",0,"MRK1","SH")
1
^rep("TRRD",0,"PAR")
hixt 'qn;8
^rep("TRRD",0,"PAR","FILE")
^PAR
^rep("TRRD",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("TRRD",0,"PAR","OUT")
PAR1
^rep("TRRD",0,"PAR1")
hixt xe`z;20H
^rep("TRRD",0,"PAR1","SH")
1
^rep("TRRD",0,"ZMAN")
dpkd onf;14
^rep("TRRD",0,"ZMAN","SH")
1
^rep("TRRD",0,"x1")
xign;8,2
^rep("TRRD",0,"x2")
;,
^rep("TRRD","COD")
MRK*MRK1*PAR*PAR1*x1
^rep("TRRD","CT")
2*0*0
^rep("TRRD","FLD")
MRK*PAR*x1
^rep("TRRD","GLOB1")
^PARSEND
^rep("TRRD","GLOB2")
^PARSEND(MRK,PAR)
^rep("TRRD","LPT")
B
^rep("TRRD","MIUN")
1*2*3
^rep("TRRD","SHP","KOD")
TRRD
^rep("TRRD","SHP","PROG")
N A S A=$G(^PARSEND) I A S MAS(5)=$$^%L1DC(A,1)_" "_$$T^%L1TIME($P(A,",",2))
^rep("TRRD","SIK")
*
^rep("TRRD","SIK0")
0*0*0
^rep("TRRD","US",1)
D ZMAN^P1TR
^rep("TRRD","US",2)
D PAR^P1TR
^rep("TRRL")
excey `l oiicry  zegewl zniyx
^rep("TRRL",0,"LKH")
gewl 'qn;10
^rep("TRRL",0,"LKH","FILE")
^LKH
^rep("TRRL",0,"LKH","OUT")
LKH1
^rep("TRRL",0,"LKH1")
gewl my;30H
^rep("TRRL",0,"LKH1","SH")
1
^rep("TRRL",0,"MRK")
fkxn 'qn;4
^rep("TRRL",0,"MRK","FILE")
^LKHSEND
^rep("TRRL",0,"MRK","M2")
D MRK^P1TR
^rep("TRRL",0,"MRK","OUT")
MRK1
^rep("TRRL",0,"MRK1")
fkxn my;16H
^rep("TRRL",0,"MRK1","SH")
1
^rep("TRRL",0,"PAR")
hixt 'qn;8
^rep("TRRL",0,"PAR","FILE")
^PAR
^rep("TRRL",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("TRRL",0,"PAR","OUT")
PAR1
^rep("TRRL",0,"PAR1")
hixt xe`z;20H
^rep("TRRL",0,"PAR1","SH")
1
^rep("TRRL",0,"ZMAN")
dpkd onf;14
^rep("TRRL",0,"ZMAN","SH")
1
^rep("TRRL",0,"x1")
xign;8,2
^rep("TRRL",0,"x2")
;,
^rep("TRRL","COD")
MRK*MRK1*LKH*LKH1
^rep("TRRL","CT")
2*0*0
^rep("TRRL","FLD")
MRK*LKH
^rep("TRRL","GLOB1")
^LKHSEND
^rep("TRRL","GLOB2")
^LKHSEND(MRK,LKH)
^rep("TRRL","LPT")
B
^rep("TRRL","MIUN")
1*2*3
^rep("TRRL","SHP","KOD")
TRRL
^rep("TRRL","SHP","PROG")
N A S A=$G(^LKHSEND) I A S MAS(5)=$$^%L1DC(A,1)_" "_$$T^%L1TIME($P(A,",",2))
^rep("TRRL","SIK")
*
^rep("TRRL","SIK0")
0*0*0
^rep("TRRL","US",-1)
D ZMAN^P1TR
^rep("TRRL","US",1)
D ZMAN^P1TR
^rep("TRRM")
excey `l oiicry zerced zniyx
^rep("TRRM",0,"DAT")
oekcr jix`z;11D
^rep("TRRM",0,"DAT","SH")
0
^rep("TRRM",0,"MRK")
fkxn 'qn;4
^rep("TRRM",0,"MRK","FILE")
^PARSEND
^rep("TRRM",0,"MRK","M2")
D MRK^P1TR
^rep("TRRM",0,"MRK","OUT")
MRK1
^rep("TRRM",0,"MRK1")
fkxn my;16H
^rep("TRRM",0,"MRK1","SH")
1
^rep("TRRM",0,"MSG")
drced cew;9
^rep("TRRM",0,"MSG","FILE")
^SC
^rep("TRRM",0,"MSG","M2")
D MSG^P1TR
^rep("TRRM",0,"MSG","OUT")
MSG1
^rep("TRRM",0,"MSG1")
drced xe`z;22H
^rep("TRRM",0,"MSG1","SH")
1
^rep("TRRM",0,"PAR")
hixt 'qn;8
^rep("TRRM",0,"PAR","FILE")
^PAR
^rep("TRRM",0,"PAR","M2")
S PAR1=$$SHEM^P1P(PAR)
^rep("TRRM",0,"PAR","OUT")
PAR1
^rep("TRRM",0,"PAR1")
hixt xe`z;20H
^rep("TRRM",0,"PAR1","SH")
1
^rep("TRRM",0,"ZMAN")
dpkd onf;14
^rep("TRRM",0,"ZMAN","SH")
1
^rep("TRRM",0,"x1")
xign;8,2
^rep("TRRM",0,"x2")
;,
^rep("TRRM","COD")
MRK*MRK1*MSG*MSG1*DAT
^rep("TRRM","CT")
2*0*0
^rep("TRRM","FLD")
MRK*MSG*DAT
^rep("TRRM","GLOB1")
^MSGSEND
^rep("TRRM","GLOB2")
^MSGSEND(MRK,MSG)
^rep("TRRM","LPT")
B
^rep("TRRM","MIUN")
1*2*3
^rep("TRRM","SHP","KOD")
TRRD
^rep("TRRM","SHP","PROG")
N A S A=$G(^PARSEND) I A S MAS(5)=$$^%L1DC(A,1)_" "_$$T^%L1TIME($P(A,",",2))
^rep("TRRM","SIK")
*
^rep("TRRM","SIK0")
0*0*0
^rep("TRRM","US",1)
S MRK1=$G(^MRKZ(MRK))
^rep("TRRM","US",2)
D MSG^P1TR
^rep("W4DHNH")
zegpd g"ec
^rep("W4DHNH",0,"HZM")
dpnfd;7
^rep("W4DHNH",0,"HZM","SET")
1
^rep("W4DHNH",0,"HZM","SH")
1
^rep("W4DHNH",0,"NST")
dxey;4
^rep("W4DHNH",0,"NST","SET")
1
^rep("W4DHNH",0,"NST","SH")
1
^rep("W4DHNH",0,"SIBA")
daiq;3
^rep("W4DHNH",0,"SIBA","SET")
1
^rep("W4DHNH",0,"SIBA","SH")
1
^rep("W4DHNH",0,"SIBA1")
daiq xe`z;12H
^rep("W4DHNH",0,"SIBA1","SET")
1
^rep("W4DHNH",0,"SIBA1","SH")
1
^rep("W4DHNH",0,"SUGH")
dgpd beq;6
^rep("W4DHNH",0,"SUGH","SET")
1
^rep("W4DHNH",0,"SUGH","SH")
1
^rep("W4DHNH",0,"SUGH1")
beq xe`z;10H
^rep("W4DHNH",0,"SUGH1","SET")
0
^rep("W4DHNH",0,"SUGH1","SH")
1
^rep("W4DHNH",0,"TRH")
jix`z;8D
^rep("W4DHNH",0,"TRH","SET")
0
^rep("W4DHNH",0,"TRH","SH")
1
^rep("W4DHNH",0,"WHO")
lhan;5
^rep("W4DHNH",0,"WHO","FILE")
^NAME
^rep("W4DHNH",0,"WHO","M2")
S WHO1=$$^W4NAME(WHO)
^rep("W4DHNH",0,"WHO","OUT")
WHO1
^rep("W4DHNH",0,"WHO","SET")
1
^rep("W4DHNH",0,"WHO1")
lhan my;12H
^rep("W4DHNH",0,"WHO1","SET")
0
^rep("W4DHNH",0,"WHO1","SH")
1
^rep("W4DHNH",0,"x1")
;,
^rep("W4DHNH","COD")
TRH*WHO*WHO1*SUGH*SUGH1*HZM*NST*SIBA*SIBA1*x1*x2*x3
^rep("W4DHNH","FLD")
TRH*WHO*SUGH*SUGH1*HZM*NST*SIBA*SIBA1*x1*x2*x3
^rep("W4DHNH","GLOB1")
^VRM(PRTN)
^rep("W4DHNH","GLOB2")
^VRM(PRTN,DT,WHO,SUGH,HZM,NST,SIBA,SIBA1)
^rep("W4DHNH","LPT")
B
^rep("W4DHNH","SIK")

^rep("W4LEVD")
xvewn micaer g"ec
^rep("W4LEVD",0,"NOM")
dxey;5
^rep("W4LEVD",0,"NOM","SET")
1
^rep("W4LEVD",0,"NOM","SH")
1
^rep("W4LEVD",0,"STRING")
caer 'qn;8
^rep("W4LEVD",0,"STRING","FILE")
^NAME
^rep("W4LEVD",0,"STRING","M2")
S STRING1=$$^W4NAME(STRING)
^rep("W4LEVD",0,"STRING","OUT")
STRING1
^rep("W4LEVD",0,"STRING","SET")
1
^rep("W4LEVD",0,"STRING1")
caer my;16H
^rep("W4LEVD",0,"STRING1","SET")
0
^rep("W4LEVD",0,"STRING1","SH")
1
^rep("W4LEVD",0,"x1")
dqipk jix`z;11,0
^rep("W4LEVD",0,"x2")
mei;3,0
^rep("W4LEVD",0,"x3")
dry;5,0
^rep("W4LEVD",0,"x4")
d`ivi jix`z;11,0
^rep("W4LEVD",0,"x5")
mei;3,0
^rep("W4LEVD",0,"x6")
dry;5,0
^rep("W4LEVD",0,"x7")
zery k"dq;9,2
^rep("W4LEVD",0,"x8")
;,
^rep("W4LEVD","COD")
STRING*STRING1*NOM*x1*x2*x3*x4*x5*x6*x7
^rep("W4LEVD","FLD")
STRING*NOM*x1*x2*x3*x4*x5*x6*x7
^rep("W4LEVD","GLOB1")
^TEMP(PRTN)
^rep("W4LEVD","GLOB2")
^TEMP(PRTN,STRING,NOM)
^rep("W4LEVD","LPT")
B
^rep("W4LEVD","SIK")
******1*
^rep("W4LEVD","US",3)
D TM^W4LEVD
^rep("W4LKDP")
hxetn zegewl g"ec
^rep("ZMRK")
mifkxn itl Z-im fekix
^rep("ZMRK",0,"DAT")
jix`z;8D
^rep("ZMRK",0,"DAT","SH")
1
^rep("ZMRK",0,"MRK")
fkxn;4
^rep("ZMRK",0,"MRK","FILE")
^MRKZ
^rep("ZMRK",0,"MRK","OUT")
MRKZ1
^rep("ZMRK",0,"MRK1")
fkxn my;12H
^rep("ZMRK",0,"MRKZ")
fkxn;6
^rep("ZMRK",0,"MRKZ","FILE")
^MRKZ
^rep("ZMRK",0,"MRKZ","OUT")
MRKZ1
^rep("ZMRK",0,"MRKZ1")
fkxn my;12H
^rep("ZMRK",0,"MRKZ1","SH")
1
^rep("ZMRK",0,"TRH")
jix`z;8D
^rep("ZMRK",0,"TRH","SH")
1
^rep("ZMRK",0,"x1")
onefn;9,1
^rep("ZMRK",0,"x2")
scer;9,1
^rep("ZMRK",0,"x3")
wiy;9,1
^rep("ZMRK",0,"x4")
`"k;9,1
^rep("ZMRK",0,"x5")
oeict k"dq;9,1
^rep("ZMRK",0,"x6")
dtwd;9,1
^rep("ZMRK",0,"x7")
zexiknd k"dq;9,1
^rep("ZMRK",0,"x8")
;,
^rep("ZMRK","COD")
TRH*MRKZ*MRKZ1*x1*x2*x3*x4*x5*x6*x7
^rep("ZMRK","CT")
2*2
^rep("ZMRK","FLD")
TRH*MRKZ*x1*x2*x3*x4*x5*x6*x7
^rep("ZMRK","FLD0")
********
^rep("ZMRK","GLOB1")
^Z1MRK
^rep("ZMRK","GLOB2")
^Z1MRK(DAT,MRKZ,NM,VT)
^rep("ZMRK","LPT")
B
^rep("ZMRK","MIUN")
2*1
^rep("ZMRK","MIUN","PROG")
CP^P1ZMRK
^rep("ZMRK","QUERY","iztewz mekiq mifkxn","CT")
2*2
^rep("ZMRK","QUERY","iztewz mekiq mifkxn","FLD0")
-********
^rep("ZMRK","QUERY","iztewz mekiq mifkxn","MIUN")
2*1
^rep("ZMRK","QUERY","iztewz mekiq mifkxn","SIK0")
1*1
^rep("ZMRK","QUERY","mifkxn itl mikix`z","CT")
2*2
^rep("ZMRK","QUERY","mifkxn itl mikix`z","FLD0")

^rep("ZMRK","QUERY","mifkxn itl mikix`z","MIUN")
1*2
^rep("ZMRK","QUERY","mifkxn itl mikix`z","SIK0")
1*0
^rep("ZMRK","QUERY","mikix`z itl mifkxn","CT")
2*2
^rep("ZMRK","QUERY","mikix`z itl mifkxn","FLD0")
********
^rep("ZMRK","QUERY","mikix`z itl mifkxn","MIUN")
2*1
^rep("ZMRK","QUERY","mikix`z itl mifkxn","SIK0")
1*1
^rep("ZMRK","SIK")
1*1*1*1*1*1*1*
^rep("ZMRK","SIK0")
1*1
^rep("ZMRK","US",1)
D DAT^P1ZMRK
^rep("ZMRK","US",4)
D VT^P1ZMRK