©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
PSIVORLB ;BIR/MLM-PRINT OUT LABELS ;03-Apr-2013 14:13;PLS
Source file <PSIVORLB.m>
| Package | Total | Call Graph |
|---|---|---|
| Inpatient Medications | 2 | ORFLDS^PSIVEDT1 $$CONVER1^PSIVORE2 |
| Registration | 2 | DEM^VADPT FULL^VALM1 |
| Kernel | 1 | ($$DT,$$FMADD,$$FMTE)^XLFDT |
| VA Fileman | 1 | C^%DTC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| P | ||
| RE | ;
|
|
| MESS | ; PSJ*5*184 - make MESS a local array so all messages display for all additives.
|
|
| SOL | ||
| Q | ||
| START | ||
| OFFSET | ;IHS/MSC/PB - 2/11/13 code block added to compute the Beyond use date for printing on the sample label printed to the screen.
|
|
| ENX | ;Print example label
|
|
| INF | ||
| CONVER | ;Expand dose to date.dose and set in X
|
|
| SOL1 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(52.6 - [#52.6] | MESS+1 |
| ^PS(52.7 - [#52.7] | SOL |
| ^PS(55 - [#55] | OFFSET+3, OFFSET+4, OFFSET+5 |
| ^PS(59.5 - [#59.5] | INF+5, INF+9 |
| Name | Line Occurrences |
|---|---|
| CONVER | SOL+3 |
| INF | SOL+2 |
| MESS | RE+8, RE+10 |
| OFFSET | INF+16 |
| P | RE+6, RE+7, RE+8, RE+10, SOL, SOL+1, SOL+2, SOL+3, INF, INF+1 , INF+2, INF+4, INF+5, INF+6, INF+12, INF+17 |
| RE | START |
| SOL | RE+9 |
| SOL1 | SOL |
| Name | Field # of Occurrence |
|---|---|
| ^(4 | INF+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BAG | Q! |
| CX | Q! |
| >> DFN | RE+3, OFFSET+3, OFFSET+4, OFFSET+5 |
| >> DRG("AD" | RE+8, RE+10 |
| >> DRG("SOL" | SOL |
| DT | RE+6 |
| EXDT | OFFSET+1~, OFFSET+5*, OFFSET+6 |
| LINE | START*, Q!, P* |
| MESS | Q!, INF+4 |
| MESS( | INF+4, MESS+1* |
| >> ON | OFFSET+3, OFFSET+4, OFFSET+5 |
| >> P("MR" | ENX+2 |
| >> P("OFFSET" | INF+10, INF+11 |
| >> P("OPI" | INF |
| >> P("OT" | ENX+2 |
| >> P("PON" | RE+6 |
| >> P("SYRS" | SOL+1 |
| >> P(11 | INF+2 |
| >> P(15 | RE+2*, CONVER+1, CONVER+3 |
| >> P(16 | RE+2*, RE+10 |
| >> P(23 | SOL+1 |
| >> P(4 | RE+2, SOL+1, SOL+2 |
| >> P(5 | RE+2 |
| >> P(8 | INF |
| >> P(9 | INF+1 |
| P16 | Q!, RE+2 |
| PDATE | Q!, CONVER+2*, CONVER+3*, CONVER+4 |
| PDOSE | Q!, CONVER+2*, CONVER+3, CONVER+4 |
| PSIMESS | Q!, INF+4* |
| >> PSIV | RE+8*, RE+10*, SOL*, INF+5* |
| PSIV1 | START*, Q!, RE+2, SOL+2, SOL+3, INF+6, CONVER+1, CONVER+2, CONVER+3 |
| PSIV2 | Q! |
| PSIVCT | Q! |
| PSIVDOSE | Q!, SOL+3*, CONVER+1, CONVER+2, CONVER+3 |
| PSIVFLAG | ENX+2*, START, Q!, RE+8, RE+9 |
| >> PSIVNOL | START, INF+6 |
| PSIVRM | ENX+2*, Q!, P |
| >> PSIVSITE | ENX+2, START, RE+7, SOL+2, P |
| >> PSIVSN | INF+5, INF+9 |
| TEXT1 | INF+14~, INF+17, OFFSET+2*, OFFSET+6* |
| U | ENX+2, START, RE+6, RE+7, RE+8, RE+10, SOL, SOL+2, INF+5, INF+9 , SOL1, MESS+1, OFFSET+3, OFFSET+4, OFFSET+5 |
| >> VA("BID" | RE+6 |
| >> VADM(1 | RE+7 |
| >> VADM(2 | RE+1 |
| >> VAIN(4 | RE+6 |
| >> VAIN(5 | RE+7 |
| >> X | RE+6*, RE+7*, RE+8*, RE+10*, SOL*, SOL+1*, SOL+2*, SOL+3*, INF*, INF+1* , INF+2*, INF+4*, INF+5*, INF+6*, INF+11*, INF+12, INF+15*, INF+17*, P*, SOL1* , CONVER+1*, CONVER+2, CONVER+3*, CONVER+4* |
| >> X1 | CONVER+3* |
| >> X2 | CONVER+3* |
| XX1 | Q!, CONVER+3*, OFFSET+1~, OFFSET+5* |
| XX2 | Q!, CONVER+3* |
| >> Y | RE+8*, RE+10*, SOL*, INF+5*, SOL1, MESS+1 |
| ZZ | P! |