G CGI_SYMBOLSV1.0 4-NOV-2021 10:10 VSI C V7.4-002  $READONLY$i4$CODE$ $LITERAL$0$LINK$@$DATA$(JpMAIN(J__MAIN @6= =<4#G8^~ _#0"@^4GHcGG#]("0[8b "G@Zk(=0b#@BG4Gb@ZkcG8]@]HP#k///#_&&F"8#8^~@^H~PX`޴hpG G}B^GGE#^ ^?&T F>4G$ ~  /BG%""tGb@ZkpB"="0]"0tGxb@Zk0=B4Gb0 @@Zk0=PBG8="TGXbC8.TJ8>@Zk/ 0@@  "]"pBxbtGG13_J0]"4 JtF=="@Zk0// B4GbC80.Q0J80>8"@ZkG BG ="TG(b@Zk=`@/BGTG ="b@Zk=`@//("]`@0E"0,G0H2D/`/8"0BGTGG8b@ZkBOG@"TGb@Zkf,@B4G"HbfHN`@ZkBG 4Gb/@ZkG//tGA/tG>//pBH%"PE"tGxb@ZkBG"4Gb@ZkG, ///G @B8"DTGbG@ZkPBG8"G4GGGXb&@@Zk/BG4Gb@Zk `BG4Ghb@Zk,Gb#H`@4GG8]@]H}PX`ݤhp#k/B4Gb"@Zk@BG4GHb@Zk//#TGh^~p^x~޴P[>^~޵G {$#"G,>CXbG0Hh"(4~@Zk`BTG#"h"hb@ZkB4Gh"b@Zk@B4G4G"Lh @=4Hb/@ZkB//G4Gb@ZkG/GB4Gb G0 B/@ZkB.GGGTGb@ZkP/@B4GHb"@ZkB GG4Gb/@ZkB0@4GbP@ZkPBGGGTGXb@ZkPGP A0@ ,) s JHD/PI.RIJSFI>PL Gh"h"BBG G GX`/.0B:B 4A AG AJCB7G/ ] /. GxIJUJxeFF/`>0`C tCR"?BG ="bTG GG@Zk  A ,A //N.B4Gn"bNJRSJFGJ//@Zk.DGqHDuNJPJF>TJ/F> 0`A lA!f`91@;1@h= 9@/XK?8 //C`,HD[he.eJqCG1@GgFD(//."JR"uF;`.JF0 B0AF"2@.JR"F/,t.tJ0 B0A"gF/$R/RKR"vF`.JF0 B0A",HR"F.JgF0 B0A" /KR"xF`.JgF0 B0A/@.CJFhQ/QK%BC8F ;1`C"/B//B#  h" =4Gb@ZkAG4vI1vI?B0JFC3JtF}0Bh"2vJtG8bh="@Zkݡ0Bh G@8btG.vI2A@Zkh pB2vIh "}"=xbG1?J2F8]"=="/@Zkd8bù?CGCG h0.r0H0@Q0J2Fh0>he.eJh#CGJ`gFG`(/ApxJ0A E8,DAA8H#0D8< . J C'Bg8JF00AA/1x/[xK#gGx? , HC'@t8H yF`0AA!@.VJF#>.JC@sH :F 0A/`8/Y8K3G#8?@.@JCgBF/Ch.GWJh>L0})iA'A'vH;K2vIgG@C0}@9?K2G0=0=0B2v HXGtG8b@Zk8ݡ lAGAC0A'@t2J@'E/hr.SrJtFhr>88ݢ0B A+Ah#C21`AtG7"8b@Zk8= +A)1 A8=(8B,I%vH Eh 0"(="@]"tGb(,@ZkB#"GtGb@Zk GPGJ! A/GB ¥H4Gb@ZkΥC!Bne-h,/Ih"IoIb4G$I&vHH cEdHD hEDne=h<@Zk vHh=!B0",=(="tG@]"0b-I E0($HD(/@ZkGh]p]x}ݤ=]}ݥ#/k43HGd DECC$MAIN44Lb# DECC$MAIN43`@d DECC$MAIN 4+tG DECC$EXIT4,b# DECC$EXIT4+@ DECC$EXIT4!PGlDECC$GXSPRINTF4"db#pDECC$GXSPRINTF4!h@lDECC$GXSPRINTF4lGLIB$GET_SYMBOL4b#pLIB$GET_SYMBOL4@LIB$GET_SYMBOL4G DECC$MALLOC4b#p DECC$MALLOC4@ DECC$MALLOC4G DECC$STRCPY4b#p DECC$STRCPY4@ DECC$STRCPY4G4LIB$GET_SYMBOL4b#pLIB$GET_SYMBOL40@4LIB$GET_SYMBOL4DGl DECC$ATOI4Lb#p DECC$ATOI4h@l DECC$ATOI4'pG CGI_INIT_ENV4(b#p CGI_INIT_ENV4'@ CGI_INIT_ENV4%GCGI_INIT4&b#pCGI_INIT4%@CGI_INIT4)G DECC$STRCHR4*b#p DECC$STRCHR4)@ DECC$STRCHR4G8CGI_SET_CLI_ENV40b#pCGI_SET_CLI_ENV44@8CGI_SET_CLI_ENV4<GXCGI_INFO4Hb#pCGI_INFO4T@XCGI_INFO4XGt DECC$ATOI4hb#p DECC$ATOI4p@t DECC$ATOI41G DECC$FOPEN42b#p DECC$FOPEN41@ DECC$FOPEN4G DECC$PERROR4b#p DECC$PERROR4@ DECC$PERROR4GCGI_READ4b#pCGI_READ4@CGI_READ4-G< DECC$FWRITE4.0b#p DECC$FWRITE4-8@< DECC$FWRITE4HG\ DECC$FCLOSE4 Tb#p DECC$FCLOSE4X@\ DECC$FCLOSE4/`GtCGI_SET_DCL_ENV40lb#pCGI_SET_DCL_ENV4/p@tCGI_SET_DCL_ENV4#G DECC$GXPRINTF4$b#p DECC$GXPRINTF4#@ DECC$GXPRINTF4+G DECC$EXIT4,b#p DECC$EXIT4+@ DECC$EXIT4G| DECC$STRCPY4\b#p DECC$STRCPY4x@| DECC$STRCPY4|G DECC$STRCAT4b#p DECC$STRCAT4@ DECC$STRCAT4 G DECC$STRLEN4 b#p DECC$STRLEN4 @ DECC$STRLEN4GCGI_INFO4b#pCGI_INFO4@CGI_INFO4G DECC$ATOI4b#p DECC$ATOI4@ DECC$ATOI 4G$ DECC$MALLOC4 b#p DECC$MALLOC4 @$ DECC$MALLOC4$GDCGI_READ4<b#pCGI_READ4@@DCGI_READ4PGdCGI_INFO4Xb#pCGI_INFO4`@dCGI_INFO4 dG DECC$STRLEN4 xb#p DECC$STRLEN4 @ DECC$STRLEN4G DECC$MALLOC4b#p DECC$MALLOC4@ DECC$MALLOC4G DECC$STRCPY4b#p DECC$STRCPY4@ DECC$STRCPY<GNET_UNESCAPE_STRING<b#pNET_UNESCAPE_STRING<@NET_UNESCAPE_STRING4G$ DECC$TOUPPER4b#p DECC$TOUPPER4 @$ DECC$TOUPPER4 @ Gl DECC$STRLEN4 d b#p DECC$STRLEN4 h @l DECC$STRLEN4  G DECC$STRNCPY4 b#p DECC$STRNCPY4  @ DECC$STRNCPY4  G DECC$STRNCPY4 b#p DECC$STRNCPY4  @ DECC$STRNCPY4 G4 LIB$GET_SYMBOL4 b#pLIB$GET_SYMBOL40 @4 LIB$GET_SYMBOL4  G$ DECC$STRNCPY4 b#p DECC$STRNCPY4  @$ DECC$STRNCPY4 p G DECC$STRNCPY4 b#p DECC$STRNCPY4  @ DECC$STRNCPY4  G LIB$SET_SYMBOL4  b#pLIB$SET_SYMBOL4  @ LIB$SET_SYMBOL4 GDECC$GXFPRINTF4b#pDECC$GXFPRINTF4@DECC$GXFPRINTF4 $G< DECC$STRLEN4 4b#p DECC$STRLEN4 8@< DECC$STRLEN4 HG DECC$STRLEN4 db#p DECC$STRLEN4 @ DECC$STRLEN4 GLIB$SET_SYMBOL4 b#pLIB$SET_SYMBOL4 @LIB$SET_SYMBOL CGI_READDECC$GXFPRINTF DECC$ATOI DECC$MALLOC LIB$SET_SYMBOL7DECC$GA_STDERR` DECC$STRLEN=0h ;=T h; DECC$STRNCPYCGI_INFO DECC$STRCPY DECC$STRCATLIB$GET_SYMBOL DECC$TOUPPER NET_UNESCAPE_STRING DECC$PERROR CGI_SET_CLI_ENV DECC$FCLOSE!DECC$GXSPRINTF# DECC$GXPRINTF%CGI_INIT=08";=D ' CGI_INIT_ENV) DECC$STRCHR+ DECC$EXIT- DECC$FWRITE /CGI_SET_DCL_ENV1 DECC$FOPEN=08";=P0 7DECC$$SHELL_HANDLER=3 DECC$MAIN ===P%d= =P4(=0=WWW_8=@=H=wP=mbc=64X=`=h=p=x=FLD_=FIELDS=XOToo many arguments, this program must be run from a DCL script CONTENT_LENGTH=(Error creating content file =CONTENT_LENGTH= QUERY_STRING=,$Error defining CGI form symbol: %d A=1)( CGI_SYMBOLSVSI C V7.4-002 ?= p4=TRANSFER$BREAK$GO = 4p4= main4=y   *         + * ( 0 2 6 7 . ? @ B C I L P O Q Rq X b i i k h h0   = @ $=  add_symbol =  = 4p4=set_form_symbols4=3+                               .   (        x    r               0             \       M                    P           4 ( ) ) ) ) , * *P Z=  t4=  e4=  =/vt4= 4= @4= $ 4=  4= DT = D s= 44= __main4=  =  =  DECC$GA_STDERR DECC$FWRITE DECC$FCLOSEDECC$GXFPRINTF DECC$PERROR DECC$GXPRINTFDECC$GXSPRINTF DECC$FOPEN DECC$STRCAT DECC$STRCHR DECC$STRCPY DECC$STRNCPY DECC$STRLEN DECC$ATOI DECC$EXIT DECC$MALLOC DECC$TOUPPER NET_UNESCAPE_STRINGCGI_INITCGI_INFOCGI_READCGI_SET_DCL_ENVCGI_SET_CLI_ENV CGI_INIT_ENVLIB$GET_SYMBOLLIB$SET_SYMBOL DECC$MAIN DECC$$SHELL_HANDLER C$GA