ORWPFSS ; SLC/REV/GSS - CPRS PFSS Calls; 11/15/04 [11/15/04 11:43am]
Source file <ORWPFSS.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PFSSACTV(ORY) | ; Is PFSS active for this system/user/etc?
; RPC called by Delphi to determine if passing visit string |
|
ORACTREF(ORACTREF,ORIEN) | ;Return PFSS Account Reference Number (ARN)
; PFSS ARN in order file (#100) as field #97, i.e., ^OR(100,ORIEN,5.5) ; This API is covered under IA #4673 |
|
ORDERCK(ORIEN) | ; check validity of Order IEN (ORIEN)
; used by ORWPFSS & ORWPFSS1, access as $$ORDERCK^ORWPFSS(ORIEN) |
|
PKGTYP(ORIEN) | ; Build CPRS PFSS supported packages array
; returns 1 if order package type supported, otherwise returns 0 ; LR=Lab, RA=Radiology ; to add a package, include it above (documentation) & in For stmt below |
RPC Name | Call Tags |
---|---|
ORWPFSS IS PFSS ACTIVE? | PFSSACTV |
FileNo | Call Tags |
---|---|
^OR(100 - [#100] | GET1^DIQ |