VistA Analysis » VistA Reference » RPCs » ORWDBA1 ORPKGTYP

ORWDBA1 ORPKGTYP

Array of Order Package Types

Properties

Property Value
Label ORPKGTYP
MUMPS Implementation ORWDBA1
Return Type ARRAY

Input Parameters

Name Type Maximum Data Length Required Description
ORLST LIST 255 true List of Order IENs

MUMPS Method Description

Property Value
Method ORPKGTYP^ORWDBA1
Method Comment Build BA supported packages array
Input Parameters ORLST
First Comment 
 GMRC=Prosthetics, LR=Lab, PSO=Pharmacy, RA=Radiology
Code 
 N OIREC,OIV,OIVN
 F I=1:1 S ORPKG=$P("GMRC;LR;PSO;RA",";",I) Q:ORPKG=""  D
 . S ORPKG(+$O(^DIC(9.4,"C",ORPKG,0)))=ORPKG  ; ^DIC(9.4) is package file
 S GMRCPROS=+$O(^DIC(9.4,"C","GMRC",0))
 D ORPKG1(.Y,.ORLST)

CPRS

File Type Description
Pascal File BA/UBACore.pas


Document generated on August 31st 2022, 2:55:43 pm