DGENUPL5 ;ALB/KCL/GSN - PROCESS INCOMING (Z11 EVENT TYPE) HL7 MESSAGES ; 5/6/03 2:45pm
Source file <DGENUPL5.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETLOCKS(DFN) | ;
; Description - Locks first the patient enrollment history, then the patient record. Used to synchronize the upload with registration and load/edit. |
|
| UNLOCK(DFN) | ;
; Description: releases the locks obtained by GETLOCKS() |
|
| SECUPLD(DFN,DGSEC,OLDSEC) | ;
; Description: Upload a patient security record receieved from the ; HEC. The consistency checks on the record are assumed ; to have been completed. |
| Name | Field # of Occurrence |
|---|---|
| $$LOCK^DGENA1 | GETLOCKS+8 |
| UNLOCK^DGENA1 | UNLOCK+8 |
| $$LOCK^DGENPTA1 | GETLOCKS+9 |
| UNLOCK^DGENPTA1 | UNLOCK+9 |
| $$FINDSEC^DGENSEC | SECUPLD+18 |
| $$GET^DGENSEC | SECUPLD+21 |
| $$STORE^DGENSEC | SECUPLD+26 |
| $$UPDATE^DGENSEC | SECUPLD+31 |
| $$BEGUPLD^DGENUPL3 | GETLOCKS+7 |
| ENDUPLD^DGENUPL3 | UNLOCK+7 |
| $$LOCK^DGOTHUT1 | GETLOCKS+10 |
| UNLOCK^DGOTHUT1 | UNLOCK+10 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGOTH(33 - [#33] | GETLOCKS+10, UNLOCK+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| COUNT | GETLOCKS+6~, GETLOCKS+7*, GETLOCKS+8*, GETLOCKS+9*, GETLOCKS+10* |
| DFN | GETLOCKS~, GETLOCKS+7, GETLOCKS+8, GETLOCKS+9, GETLOCKS+10, UNLOCK~, UNLOCK+7, UNLOCK+8, UNLOCK+9, UNLOCK+10 , SECUPLD~, SECUPLD+18, SECUPLD+31 |
| DGIEN33 | GETLOCKS+6~, GETLOCKS+10*, UNLOCK+6~, UNLOCK+10* |
| DGSEC | SECUPLD~, SECUPLD+26, SECUPLD+31, SECUPLD+35* |
| DGSEC("LEVEL" | SECUPLD+30 |
| OLDSEC | SECUPLD~, SECUPLD+21, SECUPLD+35 |
| OLDSEC("LEVEL" | SECUPLD+30 |
| SECIEN | SECUPLD+15~, SECUPLD+18*, SECUPLD+21, SECUPLD+25 |
