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 |