DGJSUM ;ALB/MAF - Interface routine with Discharge Summary Package - Jan 26 1993
Source file <DGJSUM.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
CHECK(DFN,DGJTDT,DGJPARM,DGJIRTDA,DGJT,DGJFLG,DGJTYP) | ;Check to see if there is an IRT entry for a deficiency type.
|
|
ADD | ;Create an IRT entry
|
|
EDIT(DGJIRTDA,DGJVDD,DGJVDB,DGJVDT,DGJVTB,DGJPARM) | ;Edit an IRT file entry.
|
|
DCSDEL(DGJIRTDA,DGJPARM) | ;If DCS is Deleted, IRT Rec should just contain a stub
|
|
SIGUP(DGJIRTDA,DGJDS,DGJSB,DGJDR,DGJRB,DGJPARM) | ;Update Signed and Reviewed fields.
|
|
STAT1 | ;check on the status of the report after a change has been made.
|
|
STAT | ||
DOC | ;provider resp.
|
FileNo | Call Tags |
---|---|
^VAS(393 - [#393] | Classic Fileman Calls |