| CHECK |
Access to
CHECK^DGJSUM(DFN,DGJTDT,DGJPARM,DGJIRTDA,DGJT,DGJFLG,DJGSUM) to check to see
if the IRT package is enabled. If it is enabled to find and return a pointer
to the matching IRT record for the given Patient and Admission. When a
matching IRT record isn't found, a new record will need to be created. This
entry point will be passed the DFN, Discharge Date (DGJTDT), pointer to the
IRT record (DGJIRTDA) if previously passed to the Discharge Summary file, and
an array (DGJT) with Division (DGJT("DIV")), Admission IFN (DGJT("AD#")), Ward
(DGJT("WARD")), and Treating Specialty (DGJT("TS")). In addition, the IRT TYPE
OF DEFICIENCY may be passed in DGJTYP (parameter is optional.) The default
value will be "DISCHARGE SUMMARGY".
Parameter passing by reference will return the IRT parameter (DGJPARM) which
contains a number greater than zero in the first piece if IRT is enabled and a
number greater than zero in the 3rd piece if Review Discharge Summary Required
is enabled, the pointer to the IRT record (DGJIRTDA) and a Flag (DGJFLG) equal
to 1 if a new record is created. In all cases, this entry point will be
accessed to check to see if the IRT package is enabled and if so retrieve the
pointer to the IRT record. If the IRT package isn't enabled or a pointer to
the IRT record isn't returned then no other entry points will be accessed to
update the IRT file.
|
EDIT |
Access to
EDIT^DGJSUM(DGJIRTDA,DGJVDD,DGJVDB,DGJVDT,DGJVTB,DGJPARM) to update the
following fields in the IRT record: Date Dictated, Dictated By, Date
Transcribed, and Transcribed by. This entry point will be passed Date
Dictated (DGJVDD) , Dictated By (DGJVDB), Date Transcribed (DGJVDT) and
Transcribed By (DGJVTB), as well as the following variables returned from the
entry point described in item #1: the pointer to the IRT record (DGJIRTDA)
and the IRT parameter (DGJPARM). Nothing needs to be returned.
|
SIGUP |
Access to
SIGUP^DGJSUM(DGJIRTDA,DGJDS,DGJSB,DGJDR,DGJRB,DGJPARM) to update the following
fields in the IRT record: Date Signed and Signed By, Date Reviewed and
Reviewed By. This entry point will be passed Date Signed (DGJDS), Signed By
(DGJSB), Date Reviewed (DGJDR) and Reviewed By (DGJRB). If the IRT package
parameter is set to review Discharge Summaries (determine by 3rd field of
DGJPARM being greater than 1, then Date Reviewed and Reviewed By will be
passed with what is in the Discharge Summary record other wise the "@" will be
passed. The following variables returned from the entry point described in
item #1 will also be passed: the pointer to the IRT record (DGJIRTDA) and the
IRT parameter (DGJPARM). Nothing is returned.
|
DCSDEL |
Access to DCSDEL^DGJSUM(DGJIRTDA,DGJPARM) to delete
the following fields in the IRT file: Date Dictated, Dictated By, Date
Transcribed, Transcribed by, Date Signed, Signed By, Date Reviewed, and
Reviewed By. This entry point will be passed the pointer to the IRT record
(DGJIRTDA) and the IRT parameter (DGJPARM) returned from the entry point
described in item #1. Nothing is returned. This is necessary in case a
Discharge Summary is accidently entered for the wrong admission or patient.
|