VistA Analysis » VistA Reference » RPCs » ORWPCE HASCPT

ORWPCE HASCPT

Returns the passed array with the second piece set to 0 or 1.

Properties

Property	Value
Label	HASCPT
MUMPS Implementation	ORWPCE2
Return Type	ARRAY

Input Parameters

Name	Type	Maximum Data Length	Required	Description
ORLIST	LIST			This array contains the values that would be present in the 811.1 file's"B" cross reference. Since the .01 field of this file is a variablepointer, it should appear as follows:PCE Data Type Array ValueExam IEN;AUTTEXAM(Health Factor IEN;AUTTHF(Immunization IEN;AUTTIMM(Education Topic IEN;AUTTEDT(Skin Test IEN;AUTTSK(

MUMPS Method Description

Property	Value
Method	HASCPT^ORWPCE2
Method Comment	Returns true if there are any mapped CPT Codes
Input Parameters	ORLIST
Code	`N IEN,IDX,FOUND S IDX=0 F S IDX=$O(ORLIST(IDX)) Q:'+IDX D . S FOUND=0 . S IEN=$$FIND1^DIC(811.1,"","QX",ORLIST(IDX)) . I +IEN S FOUND=+$$GET1^DIQ(811.1,IEN,.05,"I") . S ORY(IDX)=ORLIST(IDX)_"="_FOUND`

CPRS

File Type	Description
Pascal File	Encounter/rPCE.pas

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