VistA Analysis » VistA Reference » RPCs » ORQQCN ADDCMT

ORQQCN ADDCMT

Allows addition of a comment to a consult request/consult without changingits status. Optionally, allows sending of an alert to the requestingprovider and others.

Properties

Property Value
Label CMT
MUMPS Implementation ORQQCN2
Return Type SINGLE VALUE

Input Parameters

Name Type Maximum Data Length Required Description
Consult ID LITERAL 16 true Internal entry number of the consult in file 123, REQUEST/CONSULT.
Comments LIST 80 true Array of comments in the form ARRAY(0)..ARRAY(n).
Alert LITERAL 5 true If '1', send an alert to the requesting provider. Otherwise, don't.
Alert to LITERAL 80 true Contains pointers to NEW PERSON FILE (200) for those to receive alert forthis addition of a comment.

MUMPS Method Description

Property Value
Method CMT^ORQQCN2
Method Comment Add comment to existing consult without changing status
Input Parameters ORIEN, ORCOM, ORALRT, ORALTO, ORDATE
First Comment 
ORIEN - IEN of consult from File 123
ORERR - return array for results/errors
ORCOM is the comments array to be added
     passed in as ORCOM(1)="Xxxx Xxxxx...",ORCOM(2)="Xxxx Xx Xxx...", ORCOM(3)="Xxxxx Xxx Xx...", etc.
ORALRT - should alerts be sent to anyone?
ORALTO - array of alert recipient IENs
Code 
 N ORAD,ORDUZ,ORNP,X
 S ORERR=0,ORAD=$S($D(ORDATE):ORDATE,1:$$NOW^XLFDT),ORNP=""
 I '$D(ORCOM) S ORERR="1^Comments required - no action taken" Q
 I '$D(^GMR(123,ORIEN)) S ORERR="1^No such consult" Q
 I $G(ORALRT)=1 D
 .F I=1:1  S X=$P(ORALTO,";",I) Q:X=""  S ORDUZ(X)=""
 D CMT^GMRCGUIB(ORIEN,.ORCOM,.ORDUZ,ORAD,DUZ)

CPRS

File Type Description
Pascal File Consults/rConsults.pas


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