©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
BVPU ; IHS/ITSC/LJF - VPR UTILITY CALLS ;
Source file <BVPU.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | $$GET1^DIQ ^DIR |
| IHS VA Utilities | 1 | ENP^XBDIQ1 |
| Kernel | 1 | $$REPEAT^XLFSTR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VALMSG() | ;EP; called to reset message line - OK
|
|
| PKGCK(RTN,MSG) | ;EP; -- called to check if rtn and package are installed - OK
|
|
| PAUSE | ;EP; -- ask user to press return - no form feed
|
|
| PAD(D,L) | ;EP -- SUBRTN to pad length of data
; -- D=data L=length |
|
| SP(N) | ; -- SUBRTN to pad N number of spaces
|
|
| STATUS(PAT) | ;EP; -- returns current patient status
|
|
| READ(TYPE,PROMPT,DEFAULT,HELP,SCREEN,DIRA) | ;EP; calls reader, returns response
|
|
| CONFID(X) | ;EP; -- SUBRTN to return confidential message
|
|
| MSG(DATA,PRE,POST,BEEP) | ;EP; -- writes line to device - OK
|
|
| HRCN(X) | ;EP; -- returns patient's chart #
|
|
| USER() | ;EP -- returns user's initials
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | PKGCK+2 |
| ^AUPNPAT - [#9000001] | HRCN+1 |
| ^DPT - [#2] | STATUS+2 |
| Name | Line Occurrences |
|---|---|
| $$PAD | STATUS+4, STATUS+5, SP+1 |
| MSG | PKGCK+4 |
| PAUSE | PKGCK+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BEEP | MSG~, MSG+5 |
| BVPX | STATUS+1~, STATUS+3! |
| BVPX( | STATUS+4, STATUS+5 |
| D | PAD~, PAD+2 |
| DATA | MSG~, MSG+3 |
| DEFAULT | READ~, READ+5 |
| DIR | PAUSE+1~, READ+1~ |
| DIR("?" | READ+6* |
| DIR("A" | PAUSE+2*, READ+4*, READ+7* |
| DIR("B" | READ+5* |
| DIR("S" | READ+3* |
| DIR(0 | PAUSE+2*, READ+2* |
| DIRA | READ~ |
| DIRA( | READ+7 |
| DIRA(1 | READ+7 |
| DUZ | USER+1 |
| DUZ(2 | HRCN+1 |
| HELP | READ~, READ+6 |
| I | MSG+1~, MSG+2*, MSG+4*, MSG+5* |
| >> IORVOFF | USER+1 |
| >> IORVON | USER+1 |
| IOST | PAUSE+1 |
| L | PAD~, PAD+2 |
| LINE | STATUS+1~, STATUS+2, STATUS+4*, STATUS+5*, STATUS+7*, STATUS+8 |
| MSG | PKGCK~, PKGCK+3, PKGCK+4 |
| N | SP~, SP+1 |
| PAT | STATUS~, STATUS+2, STATUS+3 |
| POST | MSG~, MSG+4 |
| PRE | MSG~, MSG+2 |
| PROMPT | READ~, READ+4 |
| RTN | PKGCK~, PKGCK+2 |
| SCREEN | READ~, READ+3 |
| TYPE | READ~, READ+2 |
| U | HRCN+1 |
| X | CONFID~, CONFID+1, HRCN~, HRCN+1, STATUS+1~, PKGCK+1~, PKGCK+2* |
| Y | READ+1~, READ+7*, READ+9 |