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 |