IVM16PM ;HEC/KSD; Manual functions to fix some problems during BETA; ; 5/17/02 1:43pm
Source file <IVM16PM.m>
Package | Total | Call Graph |
---|---|---|
Health Level Seven | 1 | STATUS^HLTF0 |
Kernel | 1 | $$NOW^XLFDT |
Registration | 1 | $$UPD^DGENDBS |
VA FileMan | 1 | $$GET1^DIQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
COMPEND(QIEN) | ;
; Complete Pending HL7 transmissions. In the process of completing ; the HL7 transmission the transmission will also be removed from the ; outgoing queue. |
|
DGENDT | ;
; Date/Time fields in ^DGEN(27.12) were getting filled with 1. ; Change to be $$NOW^XLFDT. Updating fields ; .02 DT/TM SENT ; .09 FIRST DT/TM |
|
FIXQ | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DGEN(27.12 - [#27.12] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGEN(27.12 - [#27.12] | DGENDT+5, DGENDT+6, FIXQ+3, FIXQ+4*, FIXQ+5! |
^HL(772 - [#772] | COMPEND+15 |
^HLMA - [#773] | COMPEND+12, COMPEND+14 |
^HLMA("AC" | COMPEND+11 |
^TMP($J | COMPEND+21*, COMPEND+22* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> CNT | COMPEND+10*, COMPEND+20*, COMPEND+22, COMPEND+23 |
>> DATA | DGENDT+10, DGENDT+12 |
>> DATA( | DGENDT+8*, DGENDT+9*, DGENDT+11* |
DT | FIXQ+2*, FIXQ+4 |
>> END | DGENDT+5*, DGENDT+6 |
>> F772P1 | COMPEND+14*, COMPEND+15 |
>> F772R1 | COMPEND+15*, COMPEND+16, COMPEND+17 |
>> F773 | COMPEND+10*, COMPEND+11*, COMPEND+12, COMPEND+14, COMPEND+19, COMPEND+21 |
>> F773R1 | COMPEND+12*, COMPEND+13 |
>> HLTCP | COMPEND+18* |
>> IEN | DGENDT+5*, DGENDT+6*, DGENDT+7, DGENDT+8, DGENDT+9, DGENDT+12, FIXQ+1*, FIXQ+3*, FIXQ+4, FIXQ+5 |
>> P01 | DGENDT+7*, DGENDT+11 |
QIEN | COMPEND~, COMPEND+9*, COMPEND+11 |
>> X | DGENDT+12* |