Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: VENPCC1N

Package: PCC New Encounter Form

Routine: VENPCC1N


Information

VENPCC1N ; IHS/OIT/GIS - DISPLAY LAB TEST RESULTS ;

Source Information

Source file <VENPCC1N.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 2 ^DIC  YN^DICN  
IHS VA Utilities 1 ^XBFMK  
Kernel 1 ($$FMADD,$$FMTE)^XLFDT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
PCC New Encounter Form 1 VENPCC1L  

Entry Points

Name Comments DBIA/ICR reference
MAXIDT(MAXM) ; EP - GET LIMITING IDT
LAB1(DFN,DATA,LNAME,CPT,TOT,MAXL) ; EP-RETRUN TEST NAME, CPT CODE AND RESULTS
; PATCHED BY GIS/OIT 10/15/05 ; PCC+ 2.5 PATCH 1
LAB2(DFN,DATA,EP,LNAME,CPT,TOT) ; EP-SPECIAL DISPLAY CODE
; SPECIAL TESTS WILL ONLY WORK IF TEST NAMES APPEAR IN THE LAB(60) FILE
CX
PASS(LAB,TOT,MAXL) ; EP-FOR THIS PASS, GET LAB TESTS IN ORDER
COPY ; EP-COPY LAB TESTS FROM ONE TEMPLATE TO ANOTHER
LAB(DFN,DEFEF) ; EP-GET LAB INFO
INIT ; EP - INITIALIZE VARIABLES
CPT(LIEN) ; EP-GIVEN A LAB IEN RETURN THE CPT CODE
DEL ; EP-DELETE ALL LAB TESTS FROM A TEMPLATE
DX
ORD ; EP - PUT TEST NAMES IN ORDER
LABX ; EP - GET LAB RESULTS

External References

Name Field # of Occurrence
^DIC COPY+5, COPY+11, DEL+5
YN^DICN COPY+15, DEL+10
^XBFMK CX, DX
$$FMADD^XLFDT MAXIDT+4
$$FMTE^XLFDT LAB1+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?5,"***** COPY LAB TEST LIST FROM ONE TEMPLATE TO ANOTHER *****",!!
  • Line Location: COPY+2
Function Call: WRITE
  • Prompt: !,"There are ",TOT," tests associated with this template..."
  • Line Location: COPY+8
Function Call: WRITE
  • Prompt: !,"Request terminated..."
  • Line Location: COPY+9
Function Call: WRITE
  • Prompt: !,"Template ",$P(Y,U,2)," already has ",TOT," lab tests.",!,"These will be overwritten!"
  • Line Location: COPY+13
Function Call: WRITE
  • Prompt: !!,"Sure you want to copy ",TOT," lab tests to ",$P(Y,U,2)
  • Line Location: COPY+14
Function Call: WRITE
  • Prompt: !,"All lab tests have been successfully copied!"
  • Line Location: COPY+17
Function Call: WRITE
  • Prompt: !,?10,"***** REMOVE ALL LAB TESTS FROM A TEMPLATE *****",!!
  • Line Location: DEL+2
Function Call: WRITE
  • Prompt: !,"There are ",TOT," tests associated with this template..."
  • Line Location: DEL+7
Function Call: WRITE
  • Prompt: !,"Request terminated..."
  • Line Location: DEL+8
Function Call: WRITE
  • Prompt: !!,"Sure you want to remove all lab tests from ",$P(Y,U,2)
  • Line Location: DEL+9
Function Call: WRITE
  • Prompt: !,"All lab tests have been successfully removed from the template!"
  • Line Location: DEL+12
Routine Call
  • DIC
  • Line Location:
    • COPY+5
    • COPY+11
    • DEL+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VEN(7.41 - [#19707.41] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVLAB - [#9000010.09] LAB1+13
^AUPNVLAB("AA" LAB1+8, LAB1+11
^BLRCPT - [#9009021] CPT+5, CPT+6, CPT+7
^BLRCPT("C" CPT+3, CPT+4
^DPT - [#2] LAB+2
^ICPT - [#81] CPT+8
^LAB(60 - [#60] ORD+7, CPT+2
^TMP("VEN LAB ORDER" INIT+3
^TMP("VEN PRNT" INIT+2
^VEN(7.41 - [#19707.41] LAB+3, INIT+1, INIT+5, ORD+2, ORD+3, ORD+4, ORD+6, ORD+12, PASS+4, PASS+12
, COPY+7, COPY+12, COPY+16!*, DEL+6, DEL+11!

Label References

Name Line Occurrences
$$CPT PASS+6
$$MAXIDT LAB1+6
CX COPY+5, COPY+9, COPY+11, COPY+15
DX DEL+5, DEL+8, DEL+10
LAB1 PASS+13
LAB2 PASS+14
PASS LABX+2, LABX+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% LAB+1~, INIT+5*, PASS+1~, LAB1+2~, LAB1+12*, MAXIDT+1~, MAXIDT+3*, MAXIDT+4, LAB2+2~, CPT+1~
, CPT+6*, CPT+7, COPY+15*, DEL+10*
AFLAG LAB+1~, INIT+1*, ORD+10, ORD+11
CIEN CPT+1~, CPT+7*, CPT+8
CNT LAB1+2~, LAB1+7*, LAB1+16*
CODE LAB2+2~, LAB2+5*, LAB2+6
CPT PASS+1~, PASS+6*, PASS+10, PASS+13, PASS+14, LAB1~, LAB1+18, LAB2~, CPT+1~, CPT+8*
, CPT+9
CPTIEN CPT+1~, CPT+4*, CPT+5, CPT+6, CPT+7
DATA PASS+1~, LAB1~, LAB1+3, LAB1+4, LAB1+5, LAB2~
DATE LAB1+2~, LAB1+12*, LAB1+14, MAXIDT+1~, MAXIDT+4*, MAXIDT+5
DEFEF LAB~, LAB+3, INIT+1, INIT+5, ORD+2, ORD+3, ORD+4, ORD+6, ORD+12, PASS+4
, PASS+12
DFN LAB~, LAB+2, PASS+13, PASS+14, LAB1~, LAB1+8, LAB1+11, LAB2~
DIC COPY+1~, COPY+4*, DEL+1~, DEL+4*
DIC("A" COPY+3*, COPY+10*, DEL+3*
DIC(0 COPY+4*, DEL+4*
DISPLAY PASS+1~
DT MAXIDT+2, MAXIDT+4
EP PASS+1~, PASS+12*, PASS+13, PASS+14, LAB2~, LAB2+3, LAB2+4, LAB2+5
FROM COPY+1~, COPY+6*, COPY+16
GBL LAB+1~, INIT+3*, ORD+10, ORD+11, ORD+14, ORD+15, LABX+2, LABX+3, LABX+7, LABX+8
IDT LAB1+2~, LAB1+7*, LAB1+8*, LAB1+9, LAB1+11, LAB1+12, MAXIDT+1~
LAB PASS~, PASS+2, PASS+3
LIEN LAB+1~, ORD+6*, ORD+7, PASS+1~, PASS+5*, PASS+6, LAB1+8, LAB1+11, CPT~, CPT+2
, CPT+4
LNAME LAB+1~, ORD+4*, ORD+5, ORD+7*, ORD+9, ORD+10, ORD+11, ORD+14, ORD+15, PASS+1~
, PASS+3*, PASS+9, PASS+13, PASS+14, LAB1~, LAB1+14, LAB2~
MAX LAB+1~, LAB1+2~, LAB1+4*, LAB1+16
MAXIDT LAB1+2~, LAB1+6*, LAB1+9, MAXIDT+1~, MAXIDT+5*, MAXIDT+6
MAXL LAB+1~, INIT+4*, INIT+5*, LABX+2, LABX+4, LABX+7, PASS~, PASS+13, LAB1~, LAB1+15
MAXM LAB1+2~, LAB1+5*, LAB1+6, MAXIDT~, MAXIDT+2, MAXIDT+3
NAME LAB+1~, LAB1+2~
ORD LAB+1~, ORD+12*, ORD+13*, ORD+14, ORD+15, LABX+2*, LABX+7*
POC LAB+1~, ORD+3*, ORD+10, ORD+14
POCFLAG LAB+1~
RES LAB1+2~, LAB1+14*, LAB1+17
SFIEN LAB+1~, ORD+1*, ORD+2*, ORD+3, ORD+4, ORD+6, ORD+10, ORD+11, ORD+12, ORD+13
, ORD+14, ORD+15, PASS+1~, PASS+2*, PASS+4, PASS+12
STG LAB+1~, PASS+1~, PASS+4*, PASS+5, PASS+6, PASS+7, PASS+13, PASS+14
STOP LAB1+2~, LAB1+7*, LAB1+8, LAB1+9*, LAB1+11, LAB1+15*, LAB1+16*
TMP LAB+1~, INIT+2*, LABX+6, PASS+9, PASS+10, LAB1+17, LAB1+18
TO COPY+1~, COPY+12*, COPY+16
TOT LAB+1~, LABX+1*, LABX+2, LABX+4, LABX+5*, LABX+6, LABX+7, PASS~, PASS+8*, PASS+9
, PASS+10, PASS+13, PASS+14, LAB1~, LAB1+15*, LAB1+17, LAB1+18, LAB2~, COPY+1~, COPY+7*
, COPY+8, COPY+9, COPY+12*, COPY+13, COPY+14, DEL+1~, DEL+6*, DEL+7, DEL+8
TXT LAB2+2~
U INIT+1, INIT+5, ORD+3, ORD+4, ORD+7, ORD+10, ORD+11, ORD+12, ORD+14, ORD+15
, PASS+3, PASS+6, PASS+7, LAB1+4, LAB1+5, LAB1+13, CPT+5, CPT+7, CPT+8, COPY+7
, COPY+12, COPY+13, COPY+14, DEL+6, DEL+9
VAL LAB1+2~, LAB1+13*, LAB1+14
VLIEN LAB1+2~, LAB1+10*, LAB1+11*, LAB1+13
X COPY+1~, DEL+1~
Y COPY+1~, COPY+5, COPY+6, COPY+7, COPY+11, COPY+12, COPY+13, COPY+14, DEL+1~, DEL+5
, DEL+6, DEL+9, DEL+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All