DGREGEEWS ;ALB/MCF - E&E Web Service ;9 September 2020 9:00 AM
Source file <DGREGEEWS.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(DGKEY,DGREQNAM,DGENSTAT,DGWSHTOE,DGCOMP) | ; Main entry point function call
; Input : DGKEY (Required) - patient full ICN with checksum -> ICN_"V"_CHECKSUM ; DGREQNAM (Required) - Requester name. Ex: "VistAData" ; Output: DGENSTAT (Pass by reference) - Contains the enrollment status. NULL = ICN is unknown to ES ; DGWSHTOE (Pass by reference) - Contains the "Do You Wish To Enroll?" value. ; DGCOMP (Pass by reference) - Contains the "COMPACT Act Eligible?" value. ; Return: DGRESP - the response in the format "N^Descriptive text". ; 1 - An enrollment status exists. Descriptive text=Enrollment Status ; 0 - No enrollment status exists OR Invalid ICN OR Network error. |
|
GETSUMM(DGSUMMARY) | ; Set up web service object through HWSC.
; Output: DGSUMMARY object |
|
RESULTS(DGSUMMARY) | ; get enrollment status and "do you wish to enroll value?"
; Input: DGSUMMARY object |
|
STATCODE | ; http response status code
|
|
ERR | ; error trapping code
|
|
QUIT | ;
|
FileNo | Call Tags |
---|---|
^XOB(18.02 - [#18.02] | FIND1^DIC |
^XOB(18.12 - [#18.12] | FIND1^DIC |