APSQLAB ;IHS/ITSC/ENM/POC - PRINT MOST RECENT LAB VALUE ON PROFILE ; 5/6/94 [ 11/13/2003 4:13 PM ]
Source file <APSQLAB.m>
| Package | Total | Call Graph | 
|---|---|---|
| Kernel | 2 | ENDR^%ZISS ($$FMADD,$$FMTE)^XLFDT | 
| VA Fileman | 2 | ^%DT $$GET1^DIQ | 
| Patient Care Component Reports | 1 | $$START1^APCLDF | 
| Package | Total | Caller Graph | 
|---|---|---|
| Outpatient Pharmacy | 3 | PSODRG PSOREF0 PSORENW0 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| BEG | ||
| TWO | ; | |
| CLEAN | ||
| ;EP - Prints most recent lab test value on profile. | ||
| ONE | ; | |
| EDATE | ||
| HILO(TST,TSTSP) | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^AUPNVLAB - [#9000010.09] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DPT - [#2] | TWO+4, TWO+5 | 
| ^LAB(60 - [#60] | ONE+14, TWO+10, TWO+12, BEG+6, BEG+10, HILO+1 | 
| ^LR - [#63] | BEG, BEG+1, BEG+3, BEG+4, BEG+5, BEG+6, BEG+10 | 
| ^PSDRUG - [#50] | PRINT+9, TWO+8 | 
| Name | Line Occurrences | 
|---|---|
| $$HILO | ONE+20, ONE+24, BEG+6, BEG+10 | 
| CLEAN | PRINT+10, PRINT+14 | 
| ONE | PRINT+11 | 
| TWO | PRINT+11 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | TWO+10 | 
| ^("CLOZ" | PRINT+9, TWO+8 | 
| ^(0 | TWO+10, BEG+1, BEG+3, BEG+4, HILO+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| %DT | EDATE! | 
| ARRAY | PRINT+2~, ONE+2*, ONE+9, CLEAN+2! | 
| BDL | BEG*, BEG+1, BEG+3, BEG+4, BEG+5, BEG+6, BEG+10, CLEAN! | 
| DATE | PRINT+2~, ONE+12*, ONE+17, ONE+20, ONE+24, CLEAN+2! | 
| DATELR | PRINT+3~, PRINT+12, TWO+4*, BEG+11*, CLEAN+1! | 
| DATEPCC | PRINT+3~, PRINT+12, ONE+11*, ONE+12, ONE+25*, CLEAN+1! | 
| DT | ONE+1, ONE+6 | 
| DTBACK | PRINT+2~, ONE+1*, ONE+6, CLEAN+2! | 
| EDL | EDATE*, BEG, CLEAN! | 
| EDT | EDATE*, BEG+12, CLEAN! | 
| ERR | PRINT+2~, ONE+9*, CLEAN+2! | 
| HI | PRINT+3~, ONE+21, BEG+7, HILO+1*, HILO+3*, HILO+4, CLEAN+3! | 
| INDIC | EDATE*, BEG, BEG+6*, BEG+10*, BEG+12, CLEAN! | 
| INFO | PRINT+2~, ONE+6*, ONE+7*, ONE+9, CLEAN+2! | 
| INFOLR | PRINT+3~, PRINT+13, TWO+4*, TWO+12*, BEG+6*, BEG+10*, BEG+12*, CLEAN+1! | 
| INFOPCC | PRINT+3~, PRINT+12, ONE+17*, ONE+19*, ONE+20*, ONE+24*, CLEAN+1! | 
| >> IORVOFF | ONE+24, BEG+10 | 
| >> IORVON | ONE+24, BEG+10 | 
| LDN | TWO+10*, BEG+1, BEG+5, BEG+6, BEG+10, CLEAN! | 
| LO | PRINT+3~, ONE+21, BEG+7, HILO+1*, HILO+2*, HILO+4, CLEAN+3! | 
| LRDFN | TWO+5*, BEG, BEG+1, BEG+3, BEG+4, BEG+5, BEG+6, BEG+10, CLEAN! | 
| MDAYS | PRINT+3~, PRINT+9*, PRINT+10, ONE+1, ONE+7, TWO+8*, TWO+9, EDATE, CLEAN! | 
| MDRUG | PRINT+9*, ONE+7, TWO+8*, CLEAN! | 
| >> PSODFN | PRINT+5*, PRINT+6, ONE+6, ONE+7, TWO+4, TWO+5 | 
| >> PSODRUG("IEN" | PRINT+9, TWO+8 | 
| >> PSOREF("DRUG | IEN" , PRINT+9, TWO+8 | 
| >> PSOREF("PSODFN" | PRINT+5 | 
| >> PSORENW("DRUG | IEN" , PRINT+9, TWO+8 | 
| >> PSORENW("PSODFN" | PRINT+5 | 
| RETURN | PRINT+2~, CLEAN+2! | 
| RETURN(1 | ONE+10, ONE+11, ONE+13, ONE+15 | 
| >> SITE | ONE+16*, ONE+18 | 
| TEST | PRINT+2~, ONE+14*, ONE+17, ONE+20, ONE+24, CLEAN+2! | 
| TST | PRINT+3~, PRINT+9*, PRINT+10, ONE+6, ONE+14, ONE+20, ONE+24, TWO+8*, TWO+9, TWO+10 , TWO+12, BEG+6, BEG+10, HILO~, HILO+1, CLEAN! | 
| TSTN | TWO+10*, BEG+6, BEG+10, BEG+12, CLEAN! | 
| TSTSP | PRINT+3~, PRINT+9*, PRINT+10, ONE+18, ONE+20, ONE+24, TWO+8*, TWO+9, BEG+3, BEG+6 , BEG+10, HILO~, HILO+1, CLEAN! | 
| VALUE | PRINT+2~, ONE+13*, ONE+17, ONE+20, ONE+21, ONE+24, BEG+5*, BEG+7, CLEAN+2! | 
| >> VLABIEN | ONE+15*, ONE+16 | 
| X | ONE+22*, EDATE*, BEG+8*, CLEAN! | 
| Y | EDATE, BEG+4*, BEG+6, BEG+10, BEG+11, CLEAN! |