Laserfiche WebLink
<br />. <br /> <br />;~7. 1: <br />. REMOTE SITE PLOTTING <br />LDSETILIB=URCMISC,USE=UTPLOTfCCI051) <br />I.OAD,H26RAPH/HR,XSECPl/R. <br />EXECUTE . <br />GOTO,70. <br />. <br />. PROFILE PLOTTING <br />'" <br />~jO. * <br />IFINUMIDEV) .OR. .NOT .FIlElGCSLIB.lOl) GOTO.56. <br />IFIFILEIOCSRJE,LO)) 00TO,53. <br />IFIFILEIOCSC93,LO)) GOTO.52. <br />* TEKTRONIX PLOTTING <br />LDSETIUSEP=FLKDAT.LIB=URCMISCfGCSLIBfGCSDEV/6CSCDCI <br />LOAD,H26RAPH/HR,PROFPL/R. <br />EXECUTE. <br />GOTO,70. <br />52,* <br /> <br />. FOEING CALCOMP USING Ges <br />LDSETIUSEP=BLKDAT,LIB=URCMISC/GCSLIBfGCSDEV/GCSCDC,USE=CC1051) <br />LOAD,H2GRAPH/HR,PRDFPl/R. <br />EXECUTE , <br />GOTD,70. <br />~:i3, * <br />. R,EMOTE CALCOllf' PLOTTING USING GCS <br />LDSETIUSEP=BLKDAT,LIB=URCMISCfGCSlIBIGCSC9J/GCSDFV/GCSCDC.USE=UTPLoriCC1051) <br />LOAD.H20RAPHINR,PROFPl/R. <br />EXECUTE . <br />GOTO, 70. <br />~56" * <br />. CAlCOMP SOFTUARE <br />IFIFILEI6CSRJE,LO)) GOTO.57, <br /> <br />, <br /> <br />:+: <br /> <br />. CALLOMP PLOTTING AT HOE!NG <br />LDSETILIB=URCMISC.lISE=CCI051) <br />I.OAD.H26RAPH/NR.PROFPL/R. <br />EXECUIt. <br />GOTO,70. <br /> <br />~..)? .. ;f: <br /> <br />. <br /> <br />. REMOIE SITE PLOTTING <br />LDSETILIB=URCMISC,USE=UTPLUTICC1051 j <br />I.OAD.H2GRAPH/NR,PROFPL/R. <br />FAECDIE. <br />GOTO.70. <br /> <br />lO,:!" <br /> <br />EXIT.U. <br />IFIFILEIPROFPL,LO)) RETURN.TAPE2. <br />GOTO.l00. <br />90,* <br />. DUPLICATE HYDRAULIC MODULES EXISI <br />RETURN,XSECPL,PROFPL. <br />GOTO.5. <br />., 00.' <br />. RETURN TO USER CONTROL <br />Dl1.0. <br /> <br />23 <br />