DGREG0 ;ALB/JDS,AEG,JAM - REGISTER A PATIENT, CONT. ;03 OCT 85
Source file <DGREG0.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| REFILE | ||
| MOVE | ||
| W1 | ||
| Q | ||
| Q1 | ;If Send HL7 V2.3 messaging flag is set to SEND or SUSPEND and
|
|
| QE | ||
| DT | ||
| SSD | ||
| SSDK | ||
| CP | ;If not (autoexempt or MTested) & no CP test this year then
|
|
| QTCP | ||
| MT | ;Check if user requires a means test. Ask user if s/he wants to
|
|
| MTDT | ;Date of Test should be the same as the Registration Date
|
|
| MTDTQ | ||
| COMMENTS | ;DG*5.3*1111 comments moved here due to size limit of DGREG
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^DGMT(408.31 - [#408.31] | Classic Fileman Calls |
