©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
VAFHUTL ;ALB/CM/PHH/EG/GAH UTILITIES ROUTINE ; 10/18/06
Source file <VAFHUTL.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 2 | $$SDAPI^SDAMA301 $$GETLAST^SDOE |
| VA Fileman | 2 | ^DIC ^DIE |
| Health Level Seven | 1 | $$HLDATE^HLFNC |
| Registration | 1 | $$SCE^DGSDU |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VPTR(TYPE,DFN,EDATE) | ;
|
|
| LTDQ | ||
| DPROTO(PNAM) | ;returns 0 if protocol disabled field is not null, ie disabled
; returns 1 if protocol is NOT disabled |
|
| UPDATE(PIVOT,ADATE,APTR,REMOVE) | ;
|
|
| LTD(DFN) | ;
|
|
| NOSEND() | ;function TURNS OFF the on/off parameter to send ADT messages.
; used by init to disable all ADT HL7 protocols ; |
|
| SEND(VAR1) | ;this function will test for the on/off parameter to send ADT messages.
|
|
| HLQ(DATA) | ;this function returns the value passed to it or HLQ
|
|
| GETF(SEG) | ;NOT USED ANY MORE
|
| FileNo | Call Tags |
|---|---|
| ^VAT(391.71 - [#391.71] | Classic Fileman Calls |
| ^HL(771 - [#771] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(43 - [#43] | SEND+6, SEND+7, NOSEND+7, NOSEND+8* |
| ^DGPM - [#405] | VPTR+9 |
| ^DGPM("APID" | VPTR+8 |
| ^DGPM("ATID1" | LTD+19 |
| ^DGPM("ATID3" | LTD+22 |
| ^DPT - [#2] | LTD+19, LTD+25 |
| ^HL(771 - [#771] | GETF+21, GETF+27 |
| ^ORD(101 - [#101] | DPROTO+2 |
| ^SCE - [#409.68] | VPTR+13 |
| ^SCE("ADFN" | VPTR+13, VPTR+14 |
| ^TMP($J | LTD+32, LTD+33, LTD+34, LTD+38! |
| ^VAT(391.71 - [#391.71] | UPDATE+15, UPDATE+21, UPDATE+26, UPDATE+28 |
| Name | Line Occurrences |
|---|---|
| $$VPTR | LTDQ+1 |
| LTDQ | LTD+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADATE | UPDATE~, UPDATE+23 |
| APTR | UPDATE~, UPDATE+17, UPDATE+18*, UPDATE+19*, UPDATE+20*, UPDATE+24 |
| DA | UPDATE+21*, UPDATE+26, UPDATE+28, UPDATE+29! |
| DATA | HLQ~, HLQ+1, HLQ+2 |
| DFN | LTD~, LTD+16, LTD+19, LTD+22, LTD+25, LTD+29, LTD+32, LTD+33, LTD+34, LTD+41 , LTDQ+1, VPTR~, VPTR+3, VPTR+8, VPTR+13, VPTR+14 |
| DIC | GETF+24*, GETF+25!, UPDATE+29! |
| DIC(0 | GETF+24*, UPDATE+22* |
| DIE | UPDATE+22*, UPDATE+29! |
| DR | UPDATE+22*, UPDATE+23*, UPDATE+24*, UPDATE+25*, UPDATE+29! |
| DT | LTD+19, LTD+22, LTD+32, LTD+33 |
| EDATE | VPTR~, VPTR+3 |
| ENT | GETF+17~, GETF+21*, GETF+22, GETF+27 |
| FLDS | GETF+17~, GETF+27*, GETF+28 |
| FLG | LTD+12~, LTD+14*, LTD+19*, LTD+22*, LTD+25*, LTD+36*, LTD+42*, LTDQ+1, LTDQ+3 |
| >> HL("SAN" | GETF+18, GETF+21 |
| >> HLQ | HLQ+1 |
| IND | VPTR+4~, VPTR+8* |
| LAST | LTD+12~, LTD+19*, LTD+22*, LTD+25*, LTD+36*, LTD+42*, LTDQ, LTDQ+1, LTDQ+3, VPTR+13 , VPTR+14 |
| LTD | LTD+12~, LTD+19*, LTD+22*, LTD+25*, LTD+29, LTD+36*, LTD+41, LTD+42* |
| PIVOT | UPDATE~, UPDATE+14, UPDATE+15, UPDATE+21 |
| PNAM | DPROTO~, DPROTO+2 |
| PTR | VPTR+4~, VPTR+8*, VPTR+9*, VPTR+10*, VPTR+13*, VPTR+14*, VPTR+15 |
| REMOVE | UPDATE~, UPDATE+16*, UPDATE+25 |
| SDARRAY | LTD+28~, LTD+30 |
| SDARRAY("FLDS" | LTD+29* |
| SDARRAY(4 | LTD+29* |
| SDCLIEN | LTD+28~, LTD+31*, LTD+32*, LTD+33, LTD+34 |
| SDDATE | LTD+28~, LTD+29*, LTD+32, LTD+33*, LTD+34, LTD+36 |
| SDSTAT | LTD+28~, LTD+34*, LTD+35 |
| SEG | GETF~, GETF+18, GETF+24 |
| TYPE | VPTR~, VPTR+3, VPTR+5, VPTR+6, VPTR+11 |
| VAR1 | SEND~, SEND+5~, SEND+6*, SEND+7*, SEND+8, NOSEND+6~, NOSEND+7*, NOSEND+8 |
| VARPTR | LTD+12~, LTD+25*, LTD+37!, LTD+42*, LTDQ+1*, LTDQ+2, LTDQ+3 |
| X | LTD+12~, LTD+25*, LTD+41*, LTD+42, GETF+24*, GETF+25!, UPDATE+29! |
| Y | GETF+26!, GETF+27!, UPDATE+29! |