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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: APCHS3B

Package: Patient Care Component

Routine: APCHS3B


Information

APCHS3B ; IHS/CMI/LAB - PART 3A OF APCHS -- SUMMARY PRODUCTION COMPONENTS ;

Source Information

Source file <APCHS3B.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Patient Care Component 2 DISPREF^APCHS3C  $$DATE^APCHSMU  
IHS VA Utilities 1 $$VALI^XBDIQ1  
Kernel 1 $$FMTE^XLFDT  
Patient Care Component Reports 1 $$START1^APCLDF  

Entry Points

Name Comments DBIA/ICR reference
LSET ;
MRLX
EKGLAB ;ENTRY POINT - EKG display in most recent lab panel
LPRT2 ;
LPRT1 ;ALTERNATE ROUTE IHS/OKCAO/POC 1/20/00
EKGLABX ;
MRL ; ******************** MOST RECENT LAB * 9000010.09 *******
EKGPRT ;computers/prints ekg info
LPRT11 ;
LBLD
REORDER ;reorder by accession, parent and child
LDATE

External References

Name Field # of Occurrence
DISPREF^APCHS3C MRL+9
$$DATE^APCHSMU LPRT2+2
$$START1^APCLDF EKGLAB+3
$$VALI^XBDIQ1 LSET+3
$$FMTE^XLFDT LPRT2+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?2,"TEST",?23,"RESULT DT/TIME",?39,"VISIT",?47,"RESULT",?60,"UNITS",?70,"REF RANGE",!
  • Line Location: LPRT1+2
Function Call: WRITE
  • Prompt: ?2,"TEST",?23,"RESULT DT/TIME",?39,"VISIT",?47,"RESULT",?60,"UNITS",?70,"REF RANGE",!
  • Line Location: LPRT2+3
Function Call: WRITE
  • Prompt: " "
  • Condition for execution: APCHCHIL
  • Line Location: LPRT2+4
Function Call: WRITE
  • Prompt: $E(APCHSLTX,1,20),?23,APCHSRDT,?38,APCHSLTD,?47,APCHSLR
  • Line Location: LPRT2+4
Function Call: WRITE
  • Prompt: ?60,$P($G(^AUPNVLAB(APCHSDFN,11)),U)
  • Line Location: LPRT2+5
Function Call: WRITE
  • Prompt: ?70,$P(^AUPNVLAB(APCHSDFN,11),U,4)_"-"_$P(^AUPNVLAB(APCHSDFN,11),U,5)
  • Line Location: LPRT2+6
Function Call: WRITE
  • Prompt: !
  • Line Location: LPRT2+7
Function Call: WRITE
  • Prompt: !
  • Line Location: LPRT2+16
Function Call: WRITE
  • Prompt: !,APCHSLTX,?APCHSLW,APCHSLTD," ",APCHSLR,!
  • Line Location: EKGPRT+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCHSCTL - [#9001015] LPRT2+7
^AUPNVDXP("AC" EKGLAB+1
^AUPNVLAB - [#9000010.09] REORDER+4, REORDER+5, REORDER+6, LSET+1, LSET+2, LSET+3, LPRT2+2, LPRT2+5, LPRT2+6, LPRT2+9
, LPRT2+11, LPRT2+12, LPRT2+14
^AUPNVLAB("AA" MRL+1, LBLD+1, LDATE, LDATE+1
^LAB(60 - [#60] LSET+7, LPRT2+1
^TMP($J MRLX+1!, LBLD!, REORDER+1, REORDER+2, REORDER+3, REORDER+7*, REORDER+9!, LSET+5, LSET+7*, LPRT1+3
, LPRT11+1, LPRT11+2, LPRT11+3, LPRT11+4, LPRT11+5, LPRT11+6

Label References

Name Line Occurrences
EKGLAB MRL+1, MRL+7
EKGLABX EKGLAB+4
EKGPRT EKGLAB+11
LBLD MRL+6
LDATE LBLD+1
LPRT1 MRL+6
LPRT11 LPRT1+3
LPRT2 LPRT11+7
LSET LDATE+1
MRLX MRL+1
REORDER LBLD+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % REORDER+4*, REORDER+7
>> %1 REORDER+5*, REORDER+7
>> %2 REORDER+6*, REORDER+7
APCHCHIL LPRT11+3*, LPRT11+4, LPRT11+5, LPRT11+6, LPRT11+8!, LPRT2+4
>> APCHDATE LPRT1+3*, LPRT11+1, LPRT11+2, LPRT11+3, LPRT11+4, LPRT11+5, LPRT11+6
APCHS EKGLAB+2!
APCHS(1 EKGLAB+7, EKGLAB+10, EKGLABX+1!
APCHSACC LPRT11+1*, LPRT11+2, LPRT11+3, LPRT11+4, LPRT11+5, LPRT11+6, LPRT11+8!
>> APCHSBRK MRL+3
>> APCHSCKP MRL+2, LPRT2+3, LPRT2+10, LPRT2+13
>> APCHSCVD LPRT11+6, EKGPRT+1
APCHSDFN MRLX!, LDATE+1*, LSET+1, LSET+2, LSET+3, LSET+7, LPRT11+5*, LPRT2+2, LPRT2+5, LPRT2+6
, LPRT2+9, LPRT2+11, LPRT2+12, LPRT2+14
>> APCHSDLM LDATE+1, EKGLAB+8
APCHSERR EKGLAB+3*, EKGLAB+4, EKGLAB+6!, EKGLABX+1!
APCHSFN MRL+9*, MRL+10!
APCHSIVD MRLX!, LDATE*, LDATE+1, LSET+7, EKGLAB+7*, EKGLAB+8
APCHSLL MRLX!
APCHSLR MRLX!, LSET+2*, LSET+3, LSET+4*, LSET+5, LSET+7, LPRT11+6*, LPRT2+4, EKGPRT+2*, EKGPRT+3*
, EKGPRT+5
APCHSLRT MRLX!, LBLD+1*, LDATE, LDATE+1, LSET+5, LSET+7
APCHSLRT( EKGPRT+1, EKGPRT+2
APCHSLRT("EKG" EKGLAB+10*
APCHSLT MRLX!, LPRT11+4*, LPRT11+5, LPRT11+6, LPRT11+8!, LPRT2+1, EKGLAB+9*, EKGPRT+1, EKGPRT+2
APCHSLTD MRLX!, LPRT11+6*, LPRT2+4, EKGPRT+1*, EKGPRT+5
APCHSLTX MRLX!, LSET+7*, LPRT2+1*, LPRT2+4, EKGLAB+9*, EKGPRT+5
APCHSLW MRLX!, EKGPRT+4*, EKGPRT+5
APCHSN MRLX!, LSET+2*, LSET+3, LSET+4
APCHSNMX MRLX!
>> APCHSNPG MRL+3, LPRT2+3
APCHSPAR LPRT11+2*, LPRT11+3, LPRT11+4, LPRT11+5, LPRT11+6, LPRT11+8!
>> APCHSPAT MRL+1, LBLD+1, LDATE, LDATE+1, EKGLAB+1, EKGLAB+3
>> APCHSQ LBLD+1*
>> APCHSQIT MRL+2, LPRT1+3, LPRT11+1, LPRT11+2, LPRT2+3, LPRT2+9, LPRT2+10, LPRT2+12, LPRT2+13
>> APCHSRDT LPRT2+2*, LPRT2+4
APCHST MRL+9*, MRL+10!
>> APCHSTYP LPRT2+7
>> APCHSX LPRT2+9*, LPRT2+11, LPRT2+12*, LPRT2+14
>> D REORDER+3*, REORDER+7
U REORDER+2, REORDER+3, REORDER+4, REORDER+5, REORDER+6, LSET+2, LSET+3, LSET+4, LSET+5, LSET+7
, LPRT11+5, LPRT11+6, LPRT2+1, LPRT2+2, LPRT2+5, LPRT2+6, LPRT2+7, LPRT2+12, LPRT2+14, EKGLAB+7
, EKGLAB+10, EKGPRT+1, EKGPRT+2
>> X REORDER+1*, REORDER+2, REORDER+3, REORDER+7
Y MRLX!, REORDER+2*, REORDER+4, REORDER+5, REORDER+6, LPRT11+6*, EKGPRT+1*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All