HMPXGSD ; ASMR/hrubovcak - Scheduling data retrieval ;Nov 20, 2015 01:49:50
Source file <HMPXGSD.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CLINLOC(RSLT,FROM,DIR) | ; return list of clinics from HOSPITAL LOCATION file (#44)
; all 3 arguments required ; RSLT=returned list (passed by reference), FROM=text to $ORDER from, DIR=$ORDER direction ; RSLT(counter) = IEN^location name |
|
| ACTLOC(LOC) | ; Boolean function, TRUE if active hospital location
; LOC - IEN in HOSPITAL LOCATION file, ICR 10040 ; IND - the "I" node, ^SC(D0,I) = (#2505) INACTIVATE DATE [1D] ^ (#2506) REACTIVATE DATE [2D] ^ ; D0, X - used by WIN^DGPMDDCF |
