VistA Analysis » VistA Reference » RPCs » ORWORR GETBYIFN

ORWORR GETBYIFN

Returns the fields for a single order in the format: 1 2 3 4 5 6 7 8 9 10 11 12 .LST=~IFN^Grp^ActTm^StrtTm^StopTm^Sts^Sig^Nrs^Clk^PrvID^PrvNam^ActDA

Properties

Property Value
Label GETBYIFN
MUMPS Implementation ORWORR
Return Type ARRAY

MUMPS Method Description

Property Value
Method GETBYIFN^ORWORR
Method Comment procedure
Input Parameters IFN
First Comment 
 get fields for single order
 .LST(n)=described above in GET
  IFN=internal entry # for order
Code 
 I 'IFN Q
 N ACT,IDX,X0,X3,X8,PRV,ID,LN,TXT,STRT,STOP,CSTS,ACTID,ORIGVIEW,ORYD,TXTVW,DEA ;PKI
 S IDX=0,LST=0,ORYD=0
 S X0=$G(^OR(100,+IFN,0)),X3=$G(^(3))
 S ACT=$S($P(IFN,";",2):$P(IFN,";",2),$P(X3,U,7):$P(X3,U,7),1:1)
 S IFN=+IFN,X8=$G(^OR(100,IFN,8,ACT,0))

CPRS

File Type Description
Pascal File Orders/rOrders.pas


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