VistA Analysis » VistA Reference » RPCs » ORCNOTE GET TOTAL

ORCNOTE GET TOTAL

Properties

Property Value
Label GETTOT
MUMPS Implementation ORCNOTE
Return Type SINGLE VALUE

MUMPS Method Description

Property Value
Method GETTOT^ORCNOTE
Method Comment get total count of progress notes
Input Parameters DFN
First Comment 
 ^TIU(8925,"ACLPT",3) refers to progress notes class
Code 
 N ORTIDT,ORTIFN
 S ORY=0
 Q:'$G(DFN)
 F ORTIDT=0:0 S ORTIDT=$O(^TIU(8925,"ACLPT",3,DFN,ORTIDT)) Q:ORTIDT<1  D
 .F ORTIFN=0:0 S ORTIFN=$O(^TIU(8925,"ACLPT",3,DFN,ORTIDT,ORTIFN)) Q:ORTIFN<1  S ORY=ORY+1

CPRS

File Type Description
Pascal File fNotes.pas


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