DVMS_MAILV1.020-JAN-1994 11:48DEC C V1.3-000A  $READONLY$$BSS$$DATA$H$LINK$ $LITERAL$i $CODE$ $ABS$DECC$GA___CTYPEDECC$GA_STDERR DECC$GA_STDINDECC$GA_STDOUT DECC$FREE DECC$MALLOC DECC$STRLENDECC$GA_RMS_NAMDECC$GA_RMS_FABDECC$GA_RMS_RAB DECC$GA_RMS_XABALL DECC$GA_RMS_XABDAT DECC$GA_RMS_XABFHC DECC$GA_RMS_XABKEY DECC$GA_RMS_XABPRO DECC$GA_RMS_XABRDT DECC$GA_RMS_XABSUM DECC$GA_RMS_XABTRM PACKASM_NOTINSTAL PACKASM_CONFLICT PACKASM_INSVIRMEM PACKASM_INTERNERR PACKASM_INVQUAVAL PACKASM_UNSUPPORTED PACKASM_ERROUTFIL PACKASM_INVARTSPEC PACKASM_NOPACKAGEPACKASM_ABVERB PACKASM_DUPLICATE PACKASM_ERRINFILPACKASM_FALSANS PACKASM_INVALANS PACKASM_INVALDATE PACKASM_INVALIDPART PACKASM_INVEXPPART PACKASM_NOCONFIRMPACKASM_NOMATCHPACKASM_NOPARTS PACKASM_NOTALLPARTS PACKASM_PACKNOTASS PACKASM_PARTNOTEXPPACKASM_PARMDEL PACKASM_UNEXPSTATE PACKASM_ASSEMBLEDPACKASM_DELETE PACKASM_NOPACKFND PACKASM_PROCESSINGPACKASM_SUCCESS PACKASM_AUTHINFOERR PACKASM_CONNECTERR PACKASM_CONNECTFAIL PACKASM_NOXHDRSUP PACKASM_SOCKETERR PACKASM_UNKNOWNHOST PACKASM_UNKNOWNSERV PACKASM_GRPNOTSEL PACKASM_INVSERVRESP PACKASM_NOCURRENT PACKASM_NONEXTART PACKASM_NOSUCHART PACKASM_NOTEXISTPACKASM_RECVERRPACKASM_SENDERRPACKASM_CONNECTHANDLER8J0 LOAD_VMSMAIL_ROUTINES GET_USERNAMERAISE_EXCEPTION MAIL$MAILFILE_BEGIN MAIL$MAILFILE_OPEN MAIL$MAILFILE_CLOSE MAIL$MAILFILE_END MAIL$MESSAGE_BEGIN MAIL$MESSAGE_DELETE MAIL$MESSAGE_COPY MAIL$MESSAGE_INFO MAIL$MESSAGE_SELECT MAIL$MESSAGE_GET MAIL$MESSAGE_ENDMAIL$USER_BEGIN MAIL$USER_SET_INFO MAIL$USER_END PACK_CONNECTSELECT_ARTICLES SCAN_ARTICLES EXTRACT_ARTICLES CLEANUP_ARTICLES DISCONNECTGBLFLAGS DECC$$SHELL_HANDLER DECC$$SHELL_HANDLER DECC$$SHELL_HANDLER DECC$$SHELL_HANDLER DECC$$SHELL_HANDLER DECC$$SHELL_HANDLER DECC$$SHELL_HANDLER DECC$$SHELL_HANDLER q6666  U =666= 666666(=;6666666= 666=666666h6= 66= 666=666666=666666=6666666=56666666=666666=6666666=>666=B6666668=;6666666= 6666666=666666= 666666  =0;7DECC$GA___CTYPE7PACKASM_INTERNERR MAIL$USER_END= NEWMAIL@ GET_USERNAME;=08X ;=` 7DECC$$SHELL_HANDLER=(; MAIL$MESSAGE_SELECT7HANDLER MAIL$USER_SET_INFO MAIL$USER_BEGIN RAISE_EXCEPTION=0  ;=P< 7DECC$$SHELL_HANDLER= MAIL$MAILFILE_CLOSE MAIL$MESSAGE_END DECC$FREE MAIL$MAILFILE_END=0(;=@ 7DECC$$SHELL_HANDLER= MAIL$MESSAGE_DELETE=0(8;=p 7DECC$$SHELL_HANDLER= MAIL$MESSAGE_GET=00;= 7DECC$$SHELL_HANDLER= MAIL$MESSAGE_INFO=0(0;=@ 7DECC$$SHELL_HANDLER= DECC$STRLEN=0(0;=`< 7DECC$$SHELL_HANDLER=7PACKASM_INSVIRMEM DECC$MALLOC MAIL$MAILFILE_BEGIN !MAIL$MESSAGE_BEGIN #MAIL$MAILFILE_OPEN7EXTRACT_ARTICLES7PACKASM_SUCCESS7CLEANUP_ARTICLES7 PACK_CONNECTP;7SELECT_ARTICLES=00 ;;;;7 SCAN_ARTICLES7 DISCONNECTP;; = GkG;FapC;,;HdGk#~(^0^8~@HPcGG GPTGa3 H=16?J!F=@BGHb4G@ZkGTGG0"BbC@ZkGPBtGXbGG@Zk,8"`#,@1"#H BG@Zkq.tH"pFSqJtFq>%u8bGpBGxbtG@c G@Zk# p D%@`B"hb#"GtG@Zk4G Gc(]0]8}@HP`#kqFpFxyHWJ CF yHX KGq Dp D0rHQ3J`B2FP0 HR SJQFPG#G~(^0^8cGTGr3@J46JFx  "U"p@F 0AGG@Zku.tH"pFSuJtFu>!@6A"a5"GtG@Zk =4G"cG(]0]8@#kq@Fp@FvHTJBFӢ HV JFӲqFpFz;JPJ`CFW ;JZ [KPGWG#~0^8^@~HPX޴`hpcGGGGTGq3 J=!6?H1D=GG, reJ%.$% "0"Q%J(}"2F%>$%.rJ "Q!J2F!>pFA@ pDN@pDZ@pD ef@(G4G, CG0BE"8bGGtG@ZkG(=G!G }"C00.Q0J00>0="[G,]@Zk,0@,&@?4G_Gc0]8]@}HPXݤ`hp#kGGqFpF!rH "Q5JB2FA! HR UJ QFApD_qDpD!rJpDQ5JB2FA! JR UJQFA_qDpD 8z{JpDY;K`C:G$X 8 {JZ [KYG$X_qDpD(!rJQ4JB2F,A(! JR TJQF,AG#~(^0^8~@HP޴X`hcGG$=GGTGq3 J}36JqF}$ %"p FF 0B BG8bGtG@Zk?".e.t%J"pFSeJ(= tFe> "?pD5K $ _0B0%"8bE"GtG@ZkTG GE C G(Q.GRQJ(Q>(="[@ZkG?GG4GGc(]0]8}@HPݤX`hp#kq Fp FraHStJBaF2r HA 4H3D2qFpFx9HpDWJ CF 9HX KG?qDpD qJ@H@BD$;  JQ 2J F$;G#~(^0cG =PTGa3 H]26_JAF]8{  ps"3 p D0["[G8{tG@ZkcGG(]2D0@#Gkq Dp DQtHRUJBTFQ HT JFG#~8^@^H~PXcGG$HTGa3 H]26_JAF]0bG  #.rcJ"Q#JpF2F#>b"W# p Dc a8BG@b"#"GtG@Zk?$ڀ! D< BG TGb("@ZkGtGxBGbC@Zk$"hBtGpbGG@ZkG @C.sJD"pFRCJ(= SF@C> "=p`D5IPXB@#"`b$"GtG@ZktG Bb$"GG@ZkG2DGcG8]@]H}PX`#kqFpFբwH# p DVJCFղ HW JF?q Dp DQyzJRZJ@CYF1Q zJY :K2G1qFpFx9Hp`DWJ CF 9HX KGq`Dp`DPpJ@H BDTP JP JFTð#~ ^(^0~8@HcGGGTGa3 H=16?J!F=xb#pG4_"GG@BHbtG@ZktG0B8bGGG@ZktG`BhbGGG@Zk4GPBXbG@Zk4GGc ](]0}8@HP#k ;; (8; @;0 0;GCk4G DECC$MALLOC4b#P DECC$MALLOC4@ DECC$MALLOC4 GRAISE_EXCEPTION4 b#PRAISE_EXCEPTION4 @RAISE_EXCEPTION<GMAIL$MAILFILE_BEGIN< b#PMAIL$MAILFILE_BEGIN<@MAIL$MAILFILE_BEGIN4G DECC$STRLEN  4@ DECC$STRLEN<#4GPMAIL$MAILFILE_OPEN<$<b#PMAIL$MAILFILE_OPEN<#L@PMAIL$MAILFILE_OPEN<!dGMAIL$MESSAGE_BEGIN<"lb#PMAIL$MESSAGE_BEGIN<!|@MAIL$MESSAGE_BEGIN4G DECC$STRLEN4@ DECC$STRLEN<GMAIL$MESSAGE_SELECT<a#MAIL$MESSAGE_SELECT<@MAIL$MESSAGE_SELECT<GMAIL$MESSAGE_INFO<b#MAIL$MESSAGE_INFO<@MAIL$MESSAGE_INFO<GMAIL$MESSAGE_GET<b#MAIL$MESSAGE_GET<@MAIL$MESSAGE_GET<(GDMAIL$MESSAGE_GET<0b#MAIL$MESSAGE_GET<@@DMAIL$MESSAGE_GET<GMAIL$MESSAGE_DELETE<{#PMAIL$MESSAGE_DELETE<@MAIL$MESSAGE_DELETE< G MAIL$MESSAGE_SELECT< b#XMAIL$MESSAGE_SELECT< @ MAIL$MESSAGE_SELECT4$ GD GET_USERNAME44 b#X GET_USERNAME4@ @D GET_USERNAME4 T Gh RAISE_EXCEPTION4 \ b#XRAISE_EXCEPTION4 d @h RAISE_EXCEPTION4 p G MAIL$USER_BEGIN4 x b#XMAIL$USER_BEGIN4  @ MAIL$USER_BEGIN< G MAIL$USER_SET_INFO< b#XMAIL$USER_SET_INFO< @ MAIL$USER_SET_INFO4 G MAIL$USER_END4 b#X MAIL$USER_END4 @ MAIL$USER_END< G MAIL$MESSAGE_END< b#MAIL$MESSAGE_END< @ MAIL$MESSAGE_END<  G MAIL$MAILFILE_CLOSE< b#MAIL$MAILFILE_CLOSE<  @ MAIL$MAILFILE_CLOSE< G MAIL$MAILFILE_END< b#MAIL$MAILFILE_END< @ MAIL$MAILFILE_END4 G DECC$FREE4 b# DECC$FREE4 @ DECC$FREE ?=/'&VMS_MAILDEC C V1.3-000A u= 44= __iscntrl4= p0 = 0 = 04P4= mail_open04=med /  ? F F H M T( I< $= h4 =  = 044= mail_select_folder04=KCB p     < $= T4 = P A= 44= mail_scan_articles4=             H   @      @ $= 4 =  = !844="mail_extract_article84=               &    #  &  &  $ 8    @ $= 4 = H =  4P4=!mail_delete_article4=$ G  $ W < $= 4 =  +='mail_copy_article =  +='mail_move_article =  C= X 4X4= mail_newmail_countX 4=         ! ! ! ! !L ! ! ! !0   !< $=  4 =  =  44= mail_close 4=^VU 7! @! A! D! G! J! L!, $= T 4 =  = "0 44=#load_VMSmail_routines0 4=D<; i! i! j! k! l! m! = X =