Changeset 157 for ccr/trunk/p


Ignore:
Timestamp:
Sep 21, 2008, 6:27:21 PM (16 years ago)
Author:
George Lilly
Message:

fixed XPATGPLCCR so it defaults last two parameters D XPATGPLCCR(dfn) works

File:
1 edited

Legend:

Unmodified
Added
Removed
  • ccr/trunk/p/GPLCCR.m

    r151 r157  
    3232       ; FN IS FILE NAME, DEFAULTS IF NULL
    3333       N CCRGLO
     34       I '$D(DIR) S DIR=""
     35       I '$D(FN) S FN=""
    3436       D CCRRPC(.CCRGLO,DFN,"CCR","","","")
    3537       S OARY=$NA(^TMP("GPLCCR",$J,DFN,"CCR",1))
     
    222224 ;;>>>D CCRRPC^GPLCCR(.GPL,"2","ALERTS","","","")
    223225 ;;>>?@GPL@(@GPL@(0))["</Alerts>"
    224  
     226
Note: See TracChangeset for help on using the changeset viewer.