Changeset 1056 for ccr/trunk


Ignore:
Timestamp:
Jan 6, 2011, 1:27:14 PM (14 years ago)
Author:
George Lilly
Message:

updates to EWD utilities for vistacom

Location:
ccr/trunk/p
Files:
1 added
1 edited

Legend:

Unmodified
Added
Removed

  • ccr/trunk/p/C0CEWD1.m

    r404 r1056  
    5757 q
    5858 ;
     59GET1URL0(URL) ;
     60 s ok=$$httpGET^%zewdGTM(URL,.gpl)
     61 D INDEX^C0CXPATH("gpl","gpl2")
     62 W !,"S URL=""",URL,"""",!
     63 S G=""
     64 F  S G=$O(gpl2(G)) Q:G=""  D  ;
     65 . W " S VDX(""",G,""")=""",gpl2(G),"""",!
     66 W !
     67 Q
Note: See TracChangeset for help on using the changeset viewer.