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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: APCM25E7

Package: Patient Care Component Table Maintiance

Routine: APCM25E7


Information

APCM25E7 ;IHS/CMI/LAB - IHS MU; ; 28 Jul 2016 2:42 PM

Source Information

Source file <APCM25E7.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Patient Care Component Table Maintiance 4 $$DATE^APCM1UTL  (S,SETLIST)^APCM25E1  $$HOSER^APCM25E6  ALLLAB^APCM25EB  
Patient Care Component Reports 3 ALLV^APCLAPIU  $$DEMO^APCLUTL  ($$CLINIC,$$PRIMPROV,$$VD,$$VDTM)^APCLV  
Kernel 2 $$FMADD^XLFDT  $$UP^XLFSTR  
IHS Personal Health Record 1 PHR^BPHRMUPM  
IHS VA Utilities 1 ($$VAL,$$VALI)^XBDIQ1  
VA Fileman 1 $$GET1^DIQ  

Entry Points

Name Comments DBIA/ICR reference
TOTRX ;EP -SET ARRAY APCMRXS to APCMRXS(FACILITY)=denom^numer
TOTLAB ;EP - ep LAB
D ;set denominator value into field
HASMMR(P,BDD,EDD) ;does patient have a m-mr ON this visit in v updated/reviewed
SNN
TOTMEDR ;EP - ep MR
ERX ;EPRESCRIBING HOSPITAL
MEDREC ;EP
TOTLAB1 ;
HASCOM(L) ;ARE THERE ANY COMMENTS
NUM
CPT(V) ;was there a 99201-99205 or 99381-99387 on this visit
LAB ;EP - CALCULATE LAB
IMAGE(V,R) ;WAS THERE AN IMAGE BEFORE VISIT DATE AND IF SO WAS THIS THE FIRST VISIT AFTER THE IMAGE DATE
SEM ;EP
TOTMEDR1 ;
ST1 ;set denominator value into field

External References

Name Field # of Occurrence
ALLV^APCLAPIU TOTMEDR1+3, IMAGE+15
$$DEMO^APCLUTL TOTRX+23
$$CLINIC^APCLV TOTMEDR1+11, IMAGE+24
$$PRIMPROV^APCLV TOTMEDR1+7, IMAGE+22
$$VD^APCLV NUM+4
$$VDTM^APCLV IMAGE+5, IMAGE+17
$$DATE^APCM1UTL ST1+7, ST1+18
S^APCM25E1 LAB+12, LAB+26, MEDREC+9, MEDREC+13, MEDREC+22, SEM+5, SEM+10, ST1+2, ST1+4, ST1+6
, ST1+20, ST1+22, ST1+24, ERX+11, D+3, D+17
SETLIST^APCM25E1 LAB+17, LAB+22, MEDREC+17, MEDREC+18, ST1+25, D+8, D+13
$$HOSER^APCM25E6 TOTLAB1+11
ALLLAB^APCM25EB TOTLAB1+3
PHR^BPHRMUPM ST1+11
$$GET1^DIQ CPT+4, IMAGE+7, IMAGE+9, HASMMR+9, TOTRX+6, TOTRX+25, TOTRX+26
$$VAL^XBDIQ1 TOTLAB1+15, TOTLAB1+20, TOTLAB1+25
$$VALI^XBDIQ1 IMAGE+8
$$FMADD^XLFDT IMAGE+15, TOTRX+3
$$UP^XLFSTR TOTLAB1+15, TOTLAB1+16, TOTLAB1+23, IMAGE+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,DFN," ",V
  • Line Location: ST1+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSRX - [#52] GET1^DIQ
^PS(59 - [#59] GET1^DIQ
^AUPNVCPT - [#9000010.18] GET1^DIQ
^AUPNVRUP - [#9000010.54] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCM25OB - [#9001304.02] LAB+10, LAB+24, MEDREC+9, MEDREC+11, MEDREC+20, SEM+5, SEM+8, SEM+9, ERX+9, ERX+10
, D+1, D+15
^APCMMUCN - [#9001300.01] TOTMEDR1+13, IMAGE+26
^APCMMUCN("B" TOTMEDR+5, IMAGE+13
^ATXLAB - [#9002228] TOTLAB1+14
^ATXLAB("B" TOTLAB+8
^AUPNVCPT("AD" CPT+3
^AUPNVLAB - [#9000010.09] TOTLAB1+13, TOTLAB1+16, TOTLAB1+22, TOTLAB1+23, HASCOM+1, HASCOM+4
^AUPNVMED - [#9000010.14] TOTRX+9
^AUPNVRUP - [#9000010.54] HASMMR+6, HASMMR+7
^AUPNVRUP("AC" HASMMR+5
^AUPNVSIT - [#9000010] TOTLAB1+9, TOTLAB1+10, TOTLAB1+11, TOTLAB1+12, TOTMEDR1+6, TOTMEDR1+10, IMAGE+2, IMAGE+21, IMAGE+23, TOTRX+9
^AUPNVSIT("AA" TOTLAB+9, TOTMEDR+7
^LAB(60 - [#60] TOTLAB1+17
^MAG(2005 IMAGE+3, IMAGE+6
^OR(100 - [#100] TOTRX+35, TOTRX+37, TOTRX+38
^PSDRUG - [#50] TOTRX+13
^PSRX - [#52] TOTRX+8, TOTRX+11, TOTRX+12, TOTRX+21, TOTRX+28, TOTRX+32, TOTRX+33, TOTRX+42, TOTRX+43, TOTRX+44
, TOTRX+45, TOTRX+46, TOTRX+47
^PSRX("AC" TOTRX+4, TOTRX+5
^TMP($J LAB+2!, LAB+14, LAB+16, LAB+19, LAB+20, LAB+22, LAB+27!, TOTLAB1+20*, TOTLAB1+25*, MEDREC+2!
, MEDREC+15, MEDREC+16, MEDREC+18, MEDREC+23!, NUM+3*, NUM+4*, NUM+7*, NUM+9*, NUM+10*, ERX+3!
, D+5, D+7, D+10, D+11, D+13, D+18!, TOTRX+28*, TOTRX+42*, TOTRX+47*

Label References

Name Line Occurrences
$$CPT TOTMEDR1+15
$$HASCOM TOTLAB1+23
$$HASMMR NUM+6
$$IMAGE TOTMEDR1+17
NUM TOTMEDR1+16
ST1 SEM+7
TOTLAB LAB+4
TOTLAB1 TOTLAB+9
TOTMEDR MEDREC+4
TOTMEDR1 TOTMEDR+7
TOTRX ERX+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A TOTLAB+3~, TOTLAB1+13*, TOTLAB1+14, TOTLAB1+17, CPT+1~, CPT+2*, CPT+3, CPT+5*, CPT+6*, CPT+7
, IMAGE+1~, TOTRX+1~, TOTRX+37*, TOTRX+38, TOTRX+44*, TOTRX+45, TOTRX+46
>> APCMATTE( SEM+10, ERX+10
>> APCMATTE("S2.026.EP" SEM+5
>> APCMBDAT TOTLAB+4, TOTLAB1+3, TOTMEDR1+3, NUM+6, ST1+9, TOTRX+3
>> APCMD1 LAB+6*, MEDREC+6*, SEM+2*, ERX+7*
>> APCMDEMO TOTRX+23
>> APCMEDAT TOTLAB+5, TOTLAB1+3, TOTMEDR1+3, NUM+6, ST1+10, TOTRX+4
>> APCMFAC LAB+7, TOTLAB1+10, TOTLAB1+11, TOTLAB1+18, TOTLAB1+19, TOTLAB1+20, TOTLAB1+24, TOTLAB1+25, ERX+8, TOTRX+10
, TOTRX+27, TOTRX+28, TOTRX+42, TOTRX+47
>> APCMHVTP( SEM+6, ST1+7
>> APCMIC LAB+10, LAB+12, LAB+24, LAB+26, MEDREC+9, MEDREC+11, MEDREC+13, MEDREC+20, MEDREC+22, SEM+5
, SEM+8, SEM+9, SEM+10, ST1+2, ST1+4, ST1+6, ST1+20, ST1+22, ST1+24, ERX+9
, ERX+10, ERX+11, D+1, D+3, D+15, D+17
APCML TOTLAB+3~
APCMLAB TOTLAB+3~, TOTLAB1+1~, TOTLAB1+2*, TOTLAB1+3, TOTMEDR1+1~, TOTMEDR1+2*, TOTMEDR1+3
APCMLAB( TOTLAB1+6, TOTLAB1+7, TOTLAB1+8, TOTMEDR1+4, TOTMEDR1+5
APCMLAB1 TOTLAB1+1~, TOTLAB1+5!
APCMLABS LAB+3!, MEDREC+3~
APCMLABS( LAB+11, LAB+25, TOTLAB1+18*, TOTLAB1+19*, TOTLAB1+24*
>> APCMMETH TOTLAB1+11, TOTLAB1+12, TOTRX+9
>> APCMN1 LAB+6*, MEDREC+6*, SEM+2*, ERX+7*
APCMP LAB+5~, LAB+7*, LAB+11, LAB+12, LAB+14, LAB+16, LAB+19, LAB+20, LAB+22, LAB+25
, LAB+26, MEDREC+5~, MEDREC+7*, MEDREC+8, MEDREC+9, MEDREC+12, MEDREC+13, MEDREC+15, MEDREC+16, MEDREC+18
, MEDREC+21, MEDREC+22, SEM+1~, SEM+4*, SEM+5, SEM+6, SEM+10, ST1+2, ST1+4, ST1+6
, ST1+7, ST1+11, ST1+20, ST1+22, ST1+24, ERX+6~, ERX+8*, ERX+10, ERX+11, D+2
, D+3, D+5, D+7, D+10, D+11, D+13, D+16, D+17
>> APCMPRV( MEDREC+7, TOTMEDR1+9, SEM+4
>> APCMRPT LAB+12, LAB+26, MEDREC+9, MEDREC+13, MEDREC+22, SEM+5, SEM+10, ST1+2, ST1+4, ST1+6
, ST1+20, ST1+22, ST1+24, ERX+11, D+3, D+17
>> APCMRPTT LAB+7, LAB+12, LAB+26, MEDREC+7, MEDREC+9, MEDREC+13, MEDREC+22, SEM+3, SEM+5, SEM+10
, ST1+2, ST1+4, ST1+6, ST1+20, ST1+22, ST1+24, ERX+8, ERX+11, D+3, D+17
APCMRXS ERX+4!
APCMRXS( D+2, D+16, TOTRX+10*, TOTRX+28*, TOTRX+42*, TOTRX+47*
>> APCMSEME ST1+13*
>> APCMTIME LAB+12, LAB+26, MEDREC+9, MEDREC+13, MEDREC+22, SEM+5, SEM+10, ST1+2, ST1+4, ST1+6
, ST1+20, ST1+22, ST1+24, ERX+11, D+3, D+17
>> APCMVALU LAB+16*, LAB+18*, LAB+21*, LAB+22*, MEDREC+16*, MEDREC+18*, ST1+7*, ST1+14*, ST1+15*, ST1+18*
, D+7*, D+9*, D+12*, D+13*
APCMX TOTLAB+3~, TOTLAB1+6*, TOTLAB1+7, TOTLAB1+8, TOTMEDR+3~, TOTMEDR1+4*, TOTMEDR1+5
B TOTLAB+3~, HASCOM+2~, HASCOM+4*, IMAGE+1~, IMAGE+6*, IMAGE+7, IMAGE+8, IMAGE+9, HASMMR+2~, HASMMR+4*
, ST1+9*, ST1+11, ST1+16, TOTRX+1~, TOTRX+35*, TOTRX+36, TOTRX+38*, TOTRX+39, TOTRX+40, TOTRX+43*
, TOTRX+44, TOTRX+45*, TOTRX+46*, TOTRX+47
BB IMAGE+1~, IMAGE+19*, IMAGE+20
BDD HASMMR~, HASMMR+10
C TOTLAB+3~, TOTLAB+6*, TOTMEDR+3~, TOTMEDR+4*, TOTMEDR1+11*, TOTMEDR1+12, TOTMEDR1+13, CPT+1~, CPT+4*, CPT+5
, CPT+6, IMAGE+1~, IMAGE+9*, IMAGE+10, IMAGE+12, IMAGE+15, IMAGE+24*, IMAGE+25, IMAGE+26, TOTRX+1~
, TOTRX+2*
D TOTLAB+3~, IMAGE+1~, IMAGE+5*, IMAGE+10, IMAGE+15, HASMMR+2~, HASMMR+9*, HASMMR+10, HASMMR+11, TOTRX+1~
, TOTRX+12*, TOTRX+13
>> DFN LAB+17*, LAB+22*, MEDREC+17*, MEDREC+18*, ST1+11, D+8*, D+13*
DIVI TOTRX+1~, TOTRX+26*, TOTRX+27
E HASMMR+2~, HASMMR+8*, ST1+10*, ST1+11, ST1+17
ED TOTLAB+3~, TOTLAB+4*
EDD HASMMR~, HASMMR+11
F LAB+5~, LAB+10*, LAB+12, LAB+24*, LAB+26, MEDREC+5~, MEDREC+9*, MEDREC+11*, MEDREC+13, MEDREC+20*
, MEDREC+22, SEM+5*, SEM+9*, SEM+10, ST1+1*, ST1+2, ST1+3*, ST1+4, ST1+5*, ST1+6
, ST1+19*, ST1+20, ST1+21*, ST1+22, ST1+23*, ST1+24, ERX+6~, ERX+10*, ERX+11, D+1*
, D+3, D+15*, D+17
G HASCOM+2~, HASCOM+3*, HASCOM+4*, HASCOM+5, TOTMEDR+3~, TOTMEDR1+15*, TOTMEDR1+16, TOTMEDR1+17*, TOTMEDR1+18, NUM+6*
, NUM+7, IMAGE+1~, IMAGE+4*, IMAGE+6, IMAGE+18, IMAGE+19, IMAGE+28*, IMAGE+29, TOTRX+1~, TOTRX+31*
, TOTRX+37*, TOTRX+41*, TOTRX+42
>> I SEM+8*, SEM+10, ERX+9*, ERX+10
ID TOTLAB+3~, TOTRX+1~, TOTRX+3*, TOTRX+4*, TOTRX+5
L HASCOM~, HASCOM+1, HASCOM+4
>> LABSNO TOTLAB+7*
MMR MEDREC+3~
MMR( MEDREC+8, MEDREC+12, MEDREC+21, NUM+1*, NUM+2*, NUM+8*
N LAB+5~, LAB+11*, LAB+12, LAB+25*, LAB+26, TOTLAB+3~, TOTLAB+6*, MEDREC+5~, MEDREC+12*, MEDREC+13
, MEDREC+21*, MEDREC+22, TOTMEDR+3~, TOTMEDR+4*, ERX+6~, D+2*, D+3, D+16*, D+17, TOTRX+1~
, TOTRX+2*
>> O TOTRX+33*, TOTRX+34, TOTRX+35, TOTRX+37, TOTRX+38
OS TOTRX+1~, TOTRX+25*, TOTRX+26
P LAB+14*, LAB+16, LAB+17, LAB+19, LAB+20, LAB+22, MEDREC+15*, MEDREC+16, MEDREC+17, MEDREC+18
, IMAGE+1~, IMAGE+2*, IMAGE+3, IMAGE+6, IMAGE+15, HASMMR~, HASMMR+5, D+5*, D+7, D+8
, D+10, D+11, D+13
PAR TOTLAB+3~
PAT TOTLAB+3~, TOTLAB+6*, TOTLAB+9*, TOTLAB1+3, TOTLAB1+20, TOTLAB1+25, TOTMEDR+3~, TOTMEDR+4*, TOTMEDR+7*, TOTMEDR1+3
, NUM+3, NUM+4, NUM+6, NUM+7, NUM+9, NUM+10, TOTRX+1~, TOTRX+21*, TOTRX+23, TOTRX+28
, TOTRX+42, TOTRX+47
R TOTLAB+3~, TOTMEDR+3~, TOTMEDR1+7*, TOTMEDR1+8, TOTMEDR1+9, TOTMEDR1+17, NUM+1, NUM+2, NUM+3, NUM+4
, NUM+7, NUM+8, NUM+9, NUM+10, IMAGE~, IMAGE+22, TOTRX+1~
S LAB+18*, LAB+19*, LAB+20, LAB+21, TOTLAB+3~, D+9*, D+10*, D+11, D+12, TOTRX+1~
, TOTRX+13*, TOTRX+14, TOTRX+15, TOTRX+16, TOTRX+17, TOTRX+18
>> SD TOTLAB+5*
T TOTLAB+8*, TOTLAB1+14, TOTMEDR+3~, TOTMEDR+5*, TOTMEDR1+13, IMAGE+1~, IMAGE+13*, IMAGE+26, HASMMR+2~
U LAB+10, LAB+11, LAB+16, LAB+22, LAB+24, LAB+25, TOTLAB1+7, TOTLAB1+8, TOTLAB1+10, TOTLAB1+11
, TOTLAB1+12, TOTLAB1+13, TOTLAB1+16, TOTLAB1+19, TOTLAB1+20, TOTLAB1+22, TOTLAB1+23, TOTLAB1+24, TOTLAB1+25, MEDREC+8
, MEDREC+9, MEDREC+11, MEDREC+12, MEDREC+16, MEDREC+18, MEDREC+20, MEDREC+21, TOTMEDR1+5, TOTMEDR1+10, NUM+2
, NUM+3, NUM+4, NUM+7, NUM+8, NUM+9, NUM+10, IMAGE+2, IMAGE+17, IMAGE+23, HASMMR+7
, SEM+5, SEM+8, SEM+9, SEM+10, ST1+13, ST1+15, ST1+16, ST1+17, ST1+18, ST1+20
, ST1+22, ST1+24, ERX+9, ERX+10, D+1, D+2, D+7, D+13, D+15, D+16
, TOTRX+8, TOTRX+9, TOTRX+12, TOTRX+13, TOTRX+21, TOTRX+28, TOTRX+32, TOTRX+33, TOTRX+35, TOTRX+38
, TOTRX+42, TOTRX+43, TOTRX+45, TOTRX+46, TOTRX+47
V TOTLAB1+7*, TOTLAB1+9, TOTLAB1+10, TOTLAB1+11, TOTLAB1+12, TOTMEDR1+5*, TOTMEDR1+6, TOTMEDR1+7, TOTMEDR1+10, TOTMEDR1+11
, TOTMEDR1+15, TOTMEDR1+17, NUM+4, CPT~, CPT+3, IMAGE~, IMAGE+2, IMAGE+5, IMAGE+27, ST1+11*
, ST1+13, ST1+15, ST1+16, ST1+17, ST1+18, ST1+20, ST1+22, ST1+24, TOTRX+8*, TOTRX+9*
VST IMAGE+1~, IMAGE+14!
VST( IMAGE+17
VST("DTM" IMAGE+17*, IMAGE+18, IMAGE+19, IMAGE+20
W HASMMR+2~, HASMMR+5*, HASMMR+6, HASMMR+7, HASMMR+9
X TOTLAB+3~, CPT+1~, CPT+3*, CPT+4, IMAGE+1~, IMAGE+12*, IMAGE+17*, HASMMR+2~, TOTRX+1~, TOTRX+5*
, TOTRX+6, TOTRX+8, TOTRX+11, TOTRX+12, TOTRX+21, TOTRX+25, TOTRX+28, TOTRX+32, TOTRX+33, TOTRX+42
, TOTRX+43, TOTRX+44, TOTRX+45, TOTRX+46, TOTRX+47
Y TOTLAB+3~, TOTLAB1+8*, TOTLAB1+13, TOTLAB1+15, TOTLAB1+16, TOTLAB1+20, TOTLAB1+22, TOTLAB1+23, TOTLAB1+25, IMAGE+1~
, IMAGE+18*, IMAGE+19, IMAGE+20, HASMMR+2~, HASMMR+6*, HASMMR+7, TOTRX+1~
Z IMAGE+1~, IMAGE+20*, IMAGE+21, IMAGE+22, IMAGE+23, IMAGE+24, IMAGE+27, HASMMR+2~, HASMMR+4*, HASMMR+5
, HASMMR+6, SNN*, SNN+1

Marked Items

Name Field # of Occurrence
$T(PHR^BPHRMUPM ST1+11
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All