VistA Analysis » VistA Reference » RPCs » ORWPCE GET EXAM TYPE

ORWPCE GET EXAM TYPE

Returns the list of active exam types.

Properties

Property	Value
Label	EXAMTYPE
MUMPS Implementation	ORWPCE2
Return Type	ARRAY

MUMPS Method Description

Property Value

Method EXAMTYPE^ORWPCE2

Method Comment get the list of active exams

Code

Property	Value
Method	EXAMTYPE^ORWPCE2
Method Comment	get the list of active exams
Code	`N IEN,CNT,BINDEX S (IEN,CNT,BINDEX)=0 F S BINDEX=$O(^AUTTEXAM("B",BINDEX)) Q:BINDEX']"" F S IEN=$O(^(BINDEX,IEN)) Q:'+IEN I $D(^AUTTEXAM(IEN,0))#2,+$P(^(0),"^",4)=0 S CNT=CNT+1,ORWLST(CNT)=IEN_"^"_$P(^(0),"^")`

 N IEN,CNT,BINDEX S (IEN,CNT,BINDEX)=0
 F  S BINDEX=$O(^AUTTEXAM("B",BINDEX)) Q:BINDEX']""  F  S IEN=$O(^(BINDEX,IEN)) Q:'+IEN  I $D(^AUTTEXAM(IEN,0))#2,+$P(^(0),"^",4)=0 S CNT=CNT+1,ORWLST(CNT)=IEN_"^"_$P(^(0),"^")

CPRS

File Type	Description
Pascal File	Encounter/rPCE.pas

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