QAOC0 ;HISC/DAD-OCCURRENCE SCREEN AUTO ENROLLMENT ; 6/11/14 10:16am
Source file <QAOC0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TXSP(CARETYPE,TXSP) | ; Is TXSP of type CARETYPE ?
; Returns: -1 = No, >0 = Yes ; TXSP = A facility treating specialty file (#45.7) IEN ; CARETYPE = $S(A:Acute, S:Special, I:Intermediate, N:NHCU, P:Psych) |
|
| SCHED(DFN,DATE) | ; Is DATE a scheduled admission for DFN ?
; Returns: 1 = Yes, 0 = No ; DFN = Patient file (#2) IEN ; DATE = A date in internal FM form |
|
| SCHED2(DFN,DATE) | ; Is DATE a scheduled admission for DFN ? DATE includes TIME (QAO*3*9)
; Returns: 1 = Yes, 0 = No ; DFN = Patient file (#2) IEN ; DATE = A date in internal FM form |
|
| INACTIVE(SCRN) | ; Is SCRN national, local, or inactive ?
; Returns: $S(N:National, L:Local, 1:Inactive) ; SCRN = Screen file (#741.1) IEN |
|
| VADPT(DFN,IEN405) | ; For DFN get movement number IEN405 data
; DFN = Patient file (#2) IEN ; IEN405 = Patient movement file (#405) IEN |
