SDECCONSJSON ;ALB/ANU,MGD,LAB/BLB - VISTA SCHEDULING RPCS ;MAR 31, 2022@14:39
Source file <SDECCONSJSON.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
JSONCONSLIST(SDCONJSON,DFN) | ;Return a list of ACTIVE or PENDING CONSULTS for patient
|
|
INIT | ; initialize values needed
|
|
VALIDATE | ; validate incoming parameters
|
|
JSONSELCONS | ;selection all open consults - those consults in PENDING and ACTIVE status
|
|
BLDCONSULTREC | ;Build a consult record for every consult
|
|
GETPID(SDCONSID) | ;
|
|
BLDJSON | ;
|
|
JSONCONSLIST1(SDCONJSON,SDCONSID) | ;Return a single ACTIVE or PENDING CONSULT for a patient
|
|
VALIDATE1 | ;
; *Add validation of IEN |
FileNo | Call Tags |
---|---|
^GMR(123 - [#123] | GET1^DIQ, GETS^DIQ |
123.5688 | GET1^DIQ |
409.871 | GET1^DIQ |
^SC - [#44] | GET1^DIQ |