©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
BKMILK ;PRXM/HC/CLT - LOOKUP ROUTINE FOR ICARE REGISTRY ; 14 Jul 2005 8:06 PM ;
Source file <BKMILK.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 3 | EN^DDIOL ^DIE $$GET1^DIQ |
| IHS HIV Management System | 2 | $$PAUSE^BKMIXX3 $$PAD^BKMIXX4 |
| MailMan | 1 | ^XMD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DXBUL | ;EP
|
|
| AIDSDT | ;CHECK TO BE SURE AIDS DATE IS NOT BEFORE THE HIV DATE
; CALLED from File 90451, Input Transform ; Y, DA and DA(1) set by calling process and must be preserved ; QUIT must be set on exit |
|
| ID1 | ;BUILD OF NUMBER PORTION OF ID
|
|
| HIVDT | ;CHECK TO BE SURE HIV DATE IS BEFORE THE AIDS DATE, IF IT EXISTS
; CALLED from File 90451, Input Transform ; Y, DA and DA(1) set by calling process and must be preserved ; QUIT must be set on exit |
|
| XIT | ;EXIT THE LOOKUP PROCEDURE
|
|
| ;
|
||
| STATBUL | ;EP
|
|
| ETIXHLP | ; EP - Executable help for Etiology field
|
|
| ID | ;DETERMINE AND/OR CREATE A PATIENT ID
|
| Name | Field # of Occurrence |
|---|---|
| $$PAUSE^BKMIXX3 | ETIXHLP+11 |
| $$PAD^BKMIXX4 | ETIXHLP+9 |
| EN^DDIOL | ETIXHLP+2, ETIXHLP+9 |
| ^DIE | ID1+8 |
| $$GET1^DIQ | ID+4, AIDSDT+5, AIDSDT+9, AIDSDT+10, AIDSDT+11, HIVDT+5, HIVDT+8, HIVDT+10, HIVDT+11, STATBUL+3 , STATBUL+4, STATBUL+5, DXBUL+3, DXBUL+4, DXBUL+5 |
| ^XMD | STATBUL+10, DXBUL+10, MAIL+10 |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
| ^BKM(90451 - [#90451] | Classic Fileman Calls, GET1^DIQ |
| 90451.01 | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BKM(90451 - [#90451] | ID+3, ID1+4 |
| ^BKM(90451.5 - [#90451.5] | ETIXHLP+4, ETIXHLP+6, ETIXHLP+7 |
| ^TMP($J | STATBUL+8*, STATBUL+11!, DXBUL+8*, DXBUL+11! |
| Name | Line Occurrences |
|---|---|
| ID1 | ID1+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AIDSDT | AIDSDT+4~, AIDSDT+8*, AIDSDT+9, HIVDT+4~, HIVDT+8*, HIVDT+9 |
| BKMBUL | STATBUL+11!, DXBUL+11! |
| BKMCNT | ETIXHLP+1~, ETIXHLP+3*, ETIXHLP+8*, ETIXHLP+10, ETIXHLP+14* |
| BKMDATA | ETIXHLP+1~, ETIXHLP+7*, ETIXHLP+9 |
| BKMH1 | ID+2~, ID1+2*, XIT+1! |
| BKMH2 | ID+2~, ID1+2*, XIT+1! |
| BKMH3 | ID+2~, ID1+2*, ID1+3, ID1+4*, XIT+1! |
| BKMID | ID+2~, ID1+3*, ID1+4*, ID1+6, XIT+1! |
| BKMIEN | ETIXHLP+1~, ETIXHLP+5*, ETIXHLP+6*, ETIXHLP+7 |
| BKMLOC | ID+2~, ID+4*, ID1+3, XIT+1! |
| BKMMN | ETIXHLP+1~, ETIXHLP+3*, ETIXHLP+4*, ETIXHLP+6 |
| BKMNDX | DXBUL+5*, DXBUL+8, DXBUL+11! |
| BKMNEW | XIT+1! |
| BKMNSTAT | STATBUL+5*, STATBUL+8, STATBUL+11! |
| BKMODX | DXBUL+4*, DXBUL+8, DXBUL+11! |
| BKMOSTAT | STATBUL+4*, STATBUL+8, STATBUL+11! |
| BKMPT | STATBUL+3*, STATBUL+8, STATBUL+11!, DXBUL+3*, DXBUL+8, DXBUL+11! |
| BKMRD | ETIXHLP+1~ |
| DA | ID+3, AIDSDT+5, AIDSDT+9, HIVDT+5, HIVDT+8, STATBUL+4, STATBUL+5, DXBUL+4, DXBUL+5, XIT+1! |
| DA(1 | AIDSDT+5, AIDSDT+9, AIDSDT+10, HIVDT+5, HIVDT+8, HIVDT+10, STATBUL+3, STATBUL+4, STATBUL+5, DXBUL+3 , DXBUL+4, DXBUL+5 |
| DFN | AIDSDT+4~, AIDSDT+10*, AIDSDT+11, HIVDT+4~, HIVDT+10*, HIVDT+11 |
| DIC | XIT+1! |
| DIE | ID+2~, ID1+7*, XIT+1! |
| DOB | AIDSDT+4~, AIDSDT+11*, AIDSDT+12, HIVDT+4~, HIVDT+11*, HIVDT+12 |
| DR | ID+2~, ID1+6* |
| DUOUT | ETIXHLP+1~, ETIXHLP+4, ETIXHLP+6, ETIXHLP+10, ETIXHLP+11* |
| DUZ(2 | ID+4 |
| >> DV | ETIXHLP+16* |
| HIVDT | HIVDT+4~, HIVDT+7*, HIVDT+9 |
| >> QUIT | AIDSDT+6*, AIDSDT+9*, AIDSDT+12*, HIVDT+6*, HIVDT+9*, HIVDT+12* |
| U | ID+3, ETIXHLP+9 |
| X | XIT+1! |
| XMSUB | STATBUL+7*, STATBUL+11!, DXBUL+7*, DXBUL+11! |
| XMTEXT | STATBUL+9*, STATBUL+11!, DXBUL+9*, DXBUL+11! |
| XMY | STATBUL+11!, DXBUL+11! |
| XMY("G.BKMI A | LERT" , STATBUL+6*, DXBUL+6* |
| Y | AIDSDT+5*, AIDSDT+8, AIDSDT+12, HIVDT+5*, HIVDT+7, HIVDT+12, XIT+1! |