ANETIOV1.0 4-NOV-2021 10:02 VSI C V7.4-002  $READONLY$i$CODE$/ $LITERAL$$LINK$$BSS$$DATA$0J NETIOBEGIN0JppNETIOPROXYBEGIN0J0 NETIOCANCEL0J0NETIOEND0JpNETIOQIOMAXSEG8J NETIOCLOSESOCKET0JX  NETIOREAD0J  NETIOREADAST0JpNETIOREADSTATUS0J( NETIOWRITE0JP NETIOWRITEAST8J NETIOWRITESTATUS0JPNETIOINPROGRESS @6= =#`^~G>"^ ~GG(08GGP[ (Xb/@Zk$DG(pB0b"GxbGGBFG/ G/@Zk$ @cD G/GLC"@/BG""0B"GGb/@Zk @B0"4GHb@Zk}%H#v`HD `G]] }(08@#k//#4GG~^[{G@Zk?  G] #k///#4G~^^~ GGG/ 08b^~ 0#/k///B4Gb0vH@Zk GG(b]""]4G} tG0#k/#4G~^^~ (GGG@" 0[8b$ @ZkBG4Gb/@Zk/G4GpBxb@Zk#/#_" #2@`C /"5@///#CGX"@PBaGXb. (C .CDJQ JFGG""VH`F" G]]} (0#k/G]]} (0#/k///#GGG~^G_"^~tG (0޴8GG#GG@:F""_GB/`b/("@ZkHB?"B""Gb"Pb@Zk /,0#4㳈㲠òG GGGG8B@bG@Zk//HBGGPbtGG@Zk//$#XBGTG`b / //@Zk$/Gb#@$///(`(Bb0.P.CD0JR PJ2FO_"""vJpF",0â$B#@F¦>G4G"G@Zk,#GTGBb@@Zk0 4 KàP¤) ,C0"GBGbTB4B;FGB1vK^ GG(@ZkG/4'Gb#Q@4!@/,#Gc"CâGB$@b@AB1vJGG> ( @ZkG//"4 BDG4Gb@ZkB*"4Gb@Zk!vHTGXB`b  HDC1v>J#G@ZkGb# @GG]]} (0ݤ8@#k//#~^^~ G#GG$0 0!?H1v J1DC0;v~Kp# v H!v H8D4# ,c`0"B`(âq..G 1"DDqJT J_"tF4G"V!J"/ ,C#0c0""5v KR KR K~bYCB>TG@Zk , HD///`(CGcâ0""BG_"bG~5vJG"@Zk# bG v JR J+p,c`hæxC#R JBqB""pGGAB,#`Ghöx#I 0 BGGDG]]} 0#f//G]]} 0#k/8#<0 @8#C2v@J<C<" "," "0# ?#@@@@@@@CFFGzG!? FXG@"G"F# P 11FGCpB1v@JG "GB"0b"xbG@Zkc㳤G]]}4G 0#k///#G^~ ^(~08GGGG["> ^?"G~ {"b/@ZkB="B""4"Gb@Zk 㳸uSHBGTG4vJFC7vJ8KG},0`b/@Zk//Gb#_G] ](}08@#/k///#tG^~^~ (0޴8[@GGG#%`H"m_";"b@ZkB?""GGb"b@ZkB?"]"p"b"G b@Zk /// 㳄c#CG4G#8B@b @Zk/#XBGG`bGtG/ @Zk/#`(h"#b`B#0.P.CD0JR PJ2F_"""VJpF" âJG#6KF޶h"GGBX"4G@Zk$(BGTG0b/#// @Zk$G8b#@${/// #" / O/C"Bc"6JG6D@CB!4@5@BuG1v@J (4GG>b@ZkG/N+K ⤰ 6H #C =4,GGâhBpb%F12BB7vJ4B^ (4GFGG>G@ZkGG8b#1@!BD G4Gb@ZkxB*"4Gb@Zk㠐 vHG(B0bTG'HDC0vJ@Zk/G8b# @GG]]} (0ݤ8@P#k/#~^^~ G#GG$0 0!?H1v J1DC0;v~Kp0vH vH8F# C@P@`. .(â " G0" D&_"JQ JF?"6$JD"D. cR`KKG0BR`K;v`K(""AG`B~>tG> G""hb/@ZkP@BTGHb. . JQ JFvHcRJtB/@Zk#XbG v JR J1Pc@HæXC#R JB"qBP""6JGAB#@GHöX#F DHG0BGDG=G]]} 0#g///G]]} 0#k/#0 @#C2v@JCD\ t""h "#x #@#FF?GDF_G " ""Gc/`P {{GGCB1v@JG]"GPB"b"bG@Zkc㳔G]]}4G 0#k///#G^`[~ ^(~0GGG"> ^?"G~P{" hb//@ZkB"="PB""Gb@Zk ]@ 㳄ݢvSJpGb7vJF=C9v K:_KYGTGCB@Zk/Gb#_G] ](}0@#k//0#4G~^0[^GG G8b@Zk /0 B4G(b G@ZkàP@PCG]] #k//P#0"G~^4G^GG$p @ (b^ #/k///0BG4G8b @Zk/G]] #k//1/?1@GHb]]0v J4G #/k///#4G4G^~^ ~(GGG#00[8b! p4G2v`J0v`J@/@Zk @B0J2.2J `(G PB""G_"4G XbG@Zk G]] }(0#k4<GT SYS$ASSIGN4Hb# SYS$ASSIGN4P@T SYS$ASSIGN4hG ERRORNOTICED4tb# ERRORNOTICED4@ ERRORNOTICED<GERROREXITVMSSTATUS<b#ERROREXITVMSSTATUS<@ERROREXITVMSSTATUS,G$VMGET,b#VMGET, @$VMGET,GVMGET,{#pVMGET,@VMGET47G SESOLANETEND48b#0 SESOLANETEND47 SESOLANETEND4 $G8 SYS$DASSGN4 ,b#0 SYS$DASSGN4 4@8 SYS$DASSGN,58GlVMFREE,6Db#0VMFREE,5hlVMFREE4/G SYSTRNLNM40b# SYSTRNLNM4/@ SYSTRNLNM43G DECC$ATOI44b# DECC$ATOI43@ DECC$ATOI<1GTCPIPSOCKETBUFFERSIZE<2b#TCPIPSOCKETBUFFERSIZE<1@TCPIPSOCKETBUFFERSIZE4 lG WATCHTHIS4 xb# WATCHTHIS4  WATCHTHIS4xGHTTPDSTACKTRACE4b#(HTTPDSTACKTRACE 4@HTTPDSTACKTRACE4G ERRORNOTICED4b#( ERRORNOTICED4@ ERRORNOTICED4+GHTTP2NETIOWRITE4,b#(HTTP2NETIOWRITE4+@HTTP2NETIOWRITE<-$GDSESOLANETIOWRITE<.0b#(SESOLANETIOWRITE<-@@DSESOLANETIOWRITE4!TG SYSDCLAST4"`b#( SYSDCLAST4!@ SYSDCLAST4 G8 WATCHTHIS4 b#( WATCHTHIS4 4@8 WATCHTHIS4HGX WATCHDATADUMP4Lb#( WATCHDATADUMP4T@X WATCHDATADUMP4'GSYS$QIOW4(b#(SYS$QIOW4'@SYS$QIOW,@GSYS$QIO,Hb#(SYS$QIO,@SYS$QIO4G SYS$CANEXH4b#( SYS$CANEXH4@ SYS$CANEXH4)GSYS$EXIT4*b#(SYS$EXIT4)@SYS$EXIT4!G  SYSDCLAST4"b#( SYSDCLAST4!@  SYSDCLAST4 P b# WATCHTHIS4 X Gh WATCHTHIS4 d @h WATCHTHIS4  G WATCHTHIS4  b# WATCHTHIS4  @ WATCHTHIS4D Gl ERRORNOTICED4` b# ERRORNOTICED4h @l ERRORNOTICED4 G FAOTOBUFFER4  b# FAOTOBUFFER4 @ FAOTOBUFFER< G4 ERROREXITVMSSTATUS<, b#ERROREXITVMSSTATUS<0 @4 ERROREXITVMSSTATUS4!T G SYSDCLAST4" b# SYSDCLAST4! @ SYSDCLAST4 GT HTTPDSTACKTRACE4L b#XHTTPDSTACKTRACE4P @T HTTPDSTACKTRACE4T Gx FAOTOBUFFER4 p b#X FAOTOBUFFER4t @x FAOTOBUFFER4x G ERRORNOTICED4 b#X ERRORNOTICED4 @ ERRORNOTICED4# G HTTP2NETIOREAD4$ b#XHTTP2NETIOREAD4# @ HTTP2NETIOREAD4% GSESOLANETIOREAD4&b#XSESOLANETIOREAD4%@SESOLANETIOREAD4 0b#X WATCHTHIS4 G WATCHTHIS4 @ WATCHTHIS4!G SYSDCLAST4"b#X SYSDCLAST4!@ SYSDCLAST,dGSYS$QIO,b#XSYS$QIO,@SYS$QIO4'G<SYS$QIOW4(b#XSYS$QIOW p 4'8@<SYS$QIOW4hG SYS$CANEXH4|b#X SYS$CANEXH4@ SYS$CANEXH4)GSYS$EXIT4*b#XSYS$EXIT4)@SYS$EXIT4!G SYSDCLAST4"b#X SYSDCLAST4!@ SYSDCLAST4 $GT WATCHTHIS4 Hb# WATCHTHIS4 P@T WATCHTHIS4XG WATCHDATADUMP4`b# WATCHDATADUMP4@ WATCHDATADUMP4G, ERRORNOTICED4 b# ERRORNOTICED4(@, ERRORNOTICED4G FAOTOBUFFER4 b# FAOTOBUFFER4@ FAOTOBUFFER<GERROREXITVMSSTATUS<b#ERROREXITVMSSTATUS<@ERROREXITVMSSTATUS4"(b# SYSDCLAST4!XGh SYSDCLAST4!d@h SYSDCLAST<GHTTP2NETIOINPROGRESS<b#PHTTP2NETIOINPROGRESS<@HTTP2NETIOINPROGRESS<GSESOLANETIOINPROGRESS<b#PSESOLANETIOINPROGRESS<@SESOLANETIOINPROGRESS< dGHTTP2REQUESTCANCEL<lb#HTTP2REQUESTCANCEL< HTTP2REQUESTCANCEL<GSESOLANETIOCANCEL<b#SESOLANETIOCANCEL<@SESOLANETIOCANCEL4G SYS$CANCEL4b# SYS$CANCEL4 SYS$CANCEL4 XG SYS$DASSGN4 \b# SYS$DASSGN4 @ SYS$DASSGN4 G WATCHTHIS4 b# WATCHTHIS4 @ WATCHTHIS = CLOSE channel !UL !&S=H9!AZ !&S !UL (!UL/!UL) bytes (!&?non-blocking blocking )X=8/!AZ !UL/!UL bytes (!&?non-blocking blocking )=8)NETWORK !&S (!&?non-blocking blocking )=H;WRITE !&S !UL (!UL/!UL) bytes (!&?non-blocking blocking )=?7WRITE !UL (!UL/!UL) bytes (!&?non-blocking blocking ) =02;=@8< ;7HTTPDTICKSECOND=NETIO@VMGET SYS$ASSIGN7TCPIPDEVICEDSCp ERRORNOTICED=sys$assign() ERROREXITVMSSTATUS=02 ;=0$ ; SYS$DASSGNWATCH Pe5 WATCHTHIS=000;= ( HTTP2REQUESTCANCEL SESOLANETIOCANCEL SYS$CANCEL=02;= $ SESOLANETIOINPROGRESS HTTP2NETIOINPROGRESS=00 ;=(0 (none)FILL=READ WATCHDATADUMP=!AZX; SYS$CANEXH7 EFNNOWAITSYS$QIO HTTPDSTACKTRACE=!&A@ FAOTOBUFFER;=02 ;=P4 7EFNWAIT! SYSDCLAST#HTTP2NETIOREAD= NetIoRead() %SESOLANETIOREAD'SYS$QIOW)SYS$EXIT=00p;=@, =00P;=0 (;=02;=@@| ;=NetIoWrite()` +HTTP2NETIOWRITE -SESOLANETIOWRITE=02 ;=@$ =00p;=0$ ;/ SYSTRNLNM= WASD_QIO_MAXSEG=QIO maxseg:!UL 1TCPIPSOCKETBUFFERSIZE3 DECC$ATOI=00;=0 5VMFREE7 SESOLANETEND=02p;= $ $=  0 TCPIPSOCKETBUFFERSIZE ERROREXITVMSSTATUS ERRORNOTICED FAOTOBUFFERHTTP2NETIOREADHTTP2NETIOWRITE HTTP2NETIOINPROGRESS HTTP2REQUESTCANCELHTTPDSTACKTRACE SYSTRNLNMVMGETVMFREE WATCHDATADUMP WATCHTHIS DECC$ATOIEFNWAIT EFNNOWAITHTTPDTICKSECONDTCPIPDEVICEDSCWATCH SYS$ASSIGN SESOLANETEND SYS$DASSGN SESOLANETIOWRITE SYSDCLASTSYS$QIOSYS$QIOW SYS$CANEXHSYS$EXITSESOLANETIOREAD SESOLANETIOINPROGRESS SESOLANETIOCANCEL SYS$CANCEL IPSO