<> Õ G 63WFBBJ1 - EDIT PRO5 PROGRAM VIA A WEB PAGE/TEXT EDITOR@ö@¤3BEGIN ; LET TESTING=1; LET WFDIR$="/u/whp/tss/PGM/",PG$="RCC0830"; DIM CGI$:"WF:C(1*=0),STEP:C(1*=0),PG:C(1*=0)"; LET CGI$="JBCONTROL"+$00$+"1"+$00$+"RCC0830"+$00$(3RCC 5/10/200523send PG$=PROGRAM FILE< 3SEND WFDIR$=ROOT OF PROGRAM DIRF3wfcgi$=action string for formP+3WFDIR$/archive/ holds copies of programsZN3WFDIR$/diffs/ holds text version of changes made in PROGRAM_DATE_TIME.txtdi$ÅðÑnl$ÅðÑdPro/5 Docs
x$Å ðÅ@ ‚$ÅðÅÛÑpgm/Œ Å@áÑ1ýêöЖ Å@áÑ2ýêö ¸è31000ò3Ð3^1000Ú"3------------------- edit templateä3IF WF_ISADMIN=0 THEN GOTO 1010îÅÛÑtmp/editme.txt±öøøM$Äð¨ÓÑcat ÛÅÛÅ ÛÑ | /usr/local/bin/pro5lst >ÛÅÛÑtmp/editme.txtû:$Äð¨$ó,ÓÄûÅÛÑtmp/editme.txtó1úÓĸÈ"àûÅ óÓÄû d$ÅðÒ ÛÑ"Admin Functions - Edit Program
ÛÒ ÛÑ
ÛÒ Ž$ÅðÅÛÑk
 m$ÅðÅÛÑ&*E$ÅðÅÛÑ94>$ÅðÅÛÑ'>9$ÅðÅÛÑ-H7$ÅðÅÛÑ+
R$ÅðÅ\ö#( ¸3^1000 Â3------------------ users do Ì!$Å ð© ÓÆ÷Ñ%Y%Mz%Dz_%Hz%mz%Szû ÖI$Äð¨ÓÑcp ÛÅÛÅ ÛÑ ÛÅÛÑarchive/ÛÅ ÛÑ_ÛÅ ÛÑ 2>/dev/nullû àI$Äð¨$ó,ÓÄ·ÑO_TRUNC,O_CREATEûÅÛÑtmp/editme1.txtóLÓÄûÅ@óÓÄû 3^100 0b$ÅðÑ/usr/local/bin/pro5cpl -eÛÅÛÑtmp/errorlog1.txt ÛÅÛÑtmp/editme1.txt >/dev/null 2>&1 : $Äð¨ÓÅû D=$Äð¨$ó,ÓÄûÅÛÑtmp/errorlog1.txtó1úÓĸÈ"àûÅóÓÄû N= ÅâÑýê1$ÅðÅÛÑ

ERROR LOG

ÛÅÛÑ
 3^1000ª2$ÅðÅÛÑEdit of Program ÛÅ ÛÑ Complete!
´P$ÅðÅÛÑ0
ÛÅ@ÛÑ�
¾$ÅðÑúö#(@ 38000 "ERRORJ8$Å ðÑERROR Û©(Ó¨ ûÛÑ AT Û©(Ó¨"ÓÆûûÛÑ IN Û©#ÓÚÆûTEó2#(39000 "OUTTA HERE#2ÿÿCWFSHOWWFCGIWFPGMTEXTA CGI.STEPWFDIRPG PGVERSIONPGTXT CGI.PGERRORAT WFDIRPGM CGI.PGTXTDOCLINKDOITETEXTCGI?È