Routine: APCHS4

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
DRG Grouper	1	$$ICDDX^ICDEX
IHS Patient	1	$$CAT^AUPNVPLC
IHS VA Utilities	1	$$VAL^XBDIQ1
Kernel	1	$$FMTE^XLFDT
Patient Care Component	1	($$WANTPN,GETICDDX,GETSITE,PRTICD,PRTICDE,PRTTXT)^APCHSUTL
Patient Care Component Reports	1	($$LASTNAP,$$LASTPLR,$$LASTPLU)^APCLAPI6
VA Fileman	1	$$GET1^DIQ

Package

Total

Call Graph

$$ICDDX^ICDEX

$$CAT^AUPNVPLC

$$VAL^XBDIQ1

$$FMTE^XLFDT

Patient Care Component

($$WANTPN,GETICDDX,GETSITE,PRTICD,PRTICDE,PRTTXT)^APCHSUTL

Patient Care Component Reports

($$LASTNAP,$$LASTPLR,$$LASTPLU)^APCLAPI6

VA Fileman

$$GET1^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
EPROB
PROBDSP	; ; <SETUP PROBLEM>
IPROB
NOTEDSP	; DISPLAY NOTES UNDER APCHSPRBLEM
OPROB
RPROB
CPROB
APROB
PROBSCH	;
COMMON1	;additional stuff for CHHIT bjpc 2.0 patch 5
DSPFACN	; DISPLAY NOTES FOR SELECTED APSHCFACILITY
COMMON	;
PROBX
ECODEDSP	;
DSPN	; DISPLAY SINGLE NOTE
PROBST	;EP - problems by status
SPROB
PROB	; ******************** PROBLEM / NOTES * 9000011 *********

External References

Name	Field # of Occurrence
$$WANTPN^APCHSUTL	PROBDSP+6
GETICDDX^APCHSUTL	PROBDSP+5, ECODEDSP+8
GETSITE^APCHSUTL	PROBDSP+9, DSPFACN+2
PRTICD^APCHSUTL	PROBDSP+21
PRTICDE^APCHSUTL	ECODEDSP+12
PRTTXT^APCHSUTL	DSPN+7
$$LASTNAP^APCLAPI6	COMMON1+9
$$LASTPLR^APCLAPI6	COMMON1+2
$$LASTPLU^APCLAPI6	COMMON1+5
$$CAT^AUPNVPLC	PROBDSP+15
$$GET1^DIQ	PROBDSP+7, PROBDSP+8, PROBDSP+28, PROBDSP+34, PROBDSP+40
$$ICDDX^ICDEX	ECODEDSP+7, ECODEDSP+9
$$VAL^XBDIQ1	PROBDSP+14, PROBDSP+18
$$FMTE^XLFDT	COMMON1+4, COMMON1+7, COMMON1+12

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ?13,"ENT. MODIFIED",! Line Location: COMMON+6
Function Call: WRITE	Prompt: !,"Problem List Reviewed On: ",?36,$$FMTE^XLFDT($P(APCHSX,U,1)) Line Location: COMMON1+4
Function Call: WRITE	Prompt: ?51,"By: ",?54,$E($S($P(APCHSX,U,3):$P($G(^VA(200,$P(APCHSX,U,3),0)),U),1:""),1,25),! Line Location: COMMON1+4
Function Call: WRITE	Prompt: "Problem List Updated On: ",?36,$$FMTE^XLFDT($P(APCHSX,U,1)) Line Location: COMMON1+7
Function Call: WRITE	Prompt: ?51,"By: ",?54,$E($S($P(APCHSX,U,3):$P($G(^VA(200,$P(APCHSX,U,3),0)),U),1:""),1,25),! Line Location: COMMON1+7
Function Call: WRITE	Prompt: !,"No Active Problems: ",?24,$$FMTE^XLFDT($P(APCHSX,U,1)) Line Location: COMMON1+11
Function Call: WRITE	Prompt: ?39,"Documented By: ",?54,$E($P($G(^VA(200,$P(APCHSX,U,3),0)),U),1,25),! Line Location: COMMON1+11
Function Call: WRITE	Prompt: ?51,"By: ",$E($S($P(APCHSX,U,3):$P($G(^VA(200,$P(APCHSX,U,3),0)),U),1:""),1,25),! Line Location: COMMON1+12
Function Call: WRITE	Prompt: APCHSPLN Line Location: PROBDSP+21
Function Call: WRITE	Prompt: ?30,"CAUSE: ",! Line Location: ECODEDSP+1
Function Call: WRITE	Prompt: APCHSPNM,APCHSFCN,$P(APCHSN,U) Line Location: DSPN+6

FileNo	Call Tags
^AUPNPROB - [#9000011]	GET1^DIQ
9000011.13	GET1^DIQ
9000011.17	GET1^DIQ
9000011.18	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APCHSCTL - [#9001015]	APROB, PROBDSP+8
^AUPNPROB - [#9000011]	PROBST+7, PROBSCH+1, PROBDSP+3, PROBDSP+4, PROBDSP+24, PROBDSP+26, PROBDSP+30, PROBDSP+32, PROBDSP+36, PROBDSP+38 , NOTEDSP+1, DSPFACN+1, DSPFACN+2, DSPFACN+3
^AUPNPROB("AA"	PROBST+4, PROBST+5, PROBST+6, COMMON+2, PROBSCH+1
^VA(200 - [#200]	COMMON1+4, COMMON1+7, COMMON1+12

Name	Line Occurrences
COMMON	APROB, CPROB, SPROB, OPROB, EPROB, RPROB
COMMON1	PROBST+12, PROBST+15, COMMON+4
DSPFACN	NOTEDSP+1
DSPN	DSPFACN+3
ECODEDSP	PROBDSP+22
NOTEDSP	PROBDSP+41
PROBDSP	PROBST+14, COMMON+7
PROBSCH	COMMON+2
PROBX	PROBST+11, COMMON+3

Name	Field # of Occurrence
^(	PROBSCH+1, DSPFACN+3
^(0	DSPFACN+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APCHCSVD	PROBX+2!, PROBDSP+4*
APCHPBST	PROBST+1~
>> APCHSAX	PROBDSP+26, PROBDSP+27, PROBDSP+32, PROBDSP+33, PROBDSP+38*, PROBDSP+39
>> APCHSBRK	PROBST+11, COMMON+3
>> APCHSCKP	PROBST+11, COMMON+3, COMMON+6, COMMON1+3, COMMON1+6, COMMON1+10, PROBDSP+20, ECODEDSP+1, ECODEDSP+3, DSPN+6
>> APCHSCL	PROBDSP+14*, PROBDSP+15
>> APCHSCVD	PROBDSP+12, PROBDSP+13, PROBDSP+16, DSPN+3
APCHSDFN	PROBST+6, PROBST+7, PROBST+10, PROBST+14, COMMON+7, PROBX!, PROBSCH+1, PROBDSP+3, PROBDSP+4, PROBDSP+7 , PROBDSP+8, PROBDSP+14, PROBDSP+18, PROBDSP+24, PROBDSP+26, PROBDSP+27, PROBDSP+30, PROBDSP+32, PROBDSP+33, PROBDSP+36 , PROBDSP+38, PROBDSP+39, NOTEDSP+1, DSPFACN+1, DSPFACN+2, DSPFACN+3
APCHSDFT	COMMON+1!, PROBX!
APCHSDFT(	PROBST+10, PROBST+14, COMMON+7, PROBSCH+1
APCHSDOO	PROBX!, PROBDSP+16*, PROBDSP+17
APCHSDTM	PROBX!, PROBDSP+12*, PROBDSP+19
APCHSDTN	PROBX!, PROBDSP+13*, PROBDSP+19
APCHSFAC	PROBST+4, PROBST+5, PROBST+6, PROBST+10, COMMON+2, PROBX!, PROBSCH+1
APCHSFCN	PROBX!, DSPFACN+2, DSPN+5, DSPN+6
APCHSFPP	PROBST+14, COMMON+7, PROBX!
APCHSICD	PROBX!, PROBDSP+5, ECODEDSP+5, ECODEDSP+6, ECODEDSP+9, ECODEDSP+10
>> APCHSICF	ECODEDSP+7, ECODEDSP+9, ECODEDSP+10
APCHSICL	PROBX+1!, PROBDSP+21, ECODEDSP+11, DSPN+7*
APCHSILN	PROBX+1!, PROBDSP+21, ECODEDSP+11
APCHSITE	PROBX+2!, PROBDSP+9, DSPFACN+2
APCHSN	PROBX+1!, PROBDSP+3, PROBDSP+5, PROBDSP+9, PROBDSP+10, PROBDSP+12, PROBDSP+13, PROBDSP+15, PROBDSP+16, PROBDSP+22 , ECODEDSP+5, ECODEDSP+7, ECODEDSP+9, DSPFACN+3, DSPN+1, DSPN+2, DSPN+6
APCHSNAB	PROBX+2!, PROBDSP+11, DSPFACN+2
APCHSNAR	PROBX+1!, DSPN+2, DSPN+4, DSPN+7
APCHSNDF	PROBST+3, PROBST+10, PROBST+12, COMMON+1, COMMON+4, PROBX!, PROBSCH+1, DSPFACN+3*
APCHSNFL	PROBX+2!
APCHSNFP	PROBX!, NOTEDSP+1*, DSPFACN+1, DSPFACN+2, DSPFACN+3
>> APCHSNPG	PROBST+11, COMMON+3, PROBDSP+20, ECODEDSP+3
APCHSNRQ	PROBX!, PROBDSP+6, PROBDSP+7, PROBDSP+8, ECODEDSP+7, ECODEDSP+9, ECODEDSP+10
APCHSNSH	PROBX+2!
APCHSNTE	PROBX+1!, PROBDSP+2, PROBDSP+15, PROBDSP+17, PROBDSP+18
>> APCHSP	ECODEDSP+2*, ECODEDSP+5, ECODEDSP+7, ECODEDSP+9
>> APCHSPAT	PROBST+4, PROBST+5, PROBST+6, COMMON+2, COMMON1+2, COMMON1+5, COMMON1+9, PROBSCH+1
APCHSPBN	PROBX!
APCHSPLN	PROBX!, PROBDSP+19*, PROBDSP+21
APCHSPNM	PROBX!, PROBDSP+10, PROBDSP+11, PROBDSP+19, DSPN+6
APCHSPRB	PROBST+5, PROBST+6, PROBST+10, PROBX!, PROBSCH+1
>> APCHSQ	PROBST+4, PROBST+5, PROBST+14, COMMON+2, COMMON+7, PROBSCH+1, NOTEDSP+1, DSPFACN+3, DSPN+5*
>> APCHSQIT	PROBST+11, COMMON+3, COMMON+6, COMMON+7, COMMON1+3, COMMON1+6, COMMON1+10, PROBDSP+20, ECODEDSP+1, ECODEDSP+2 , ECODEDSP+3, DSPN+6
APCHST	PROBST+1~, PROBST+7, PROBST+8, PROBST+9, PROBST+10, PROBST+13, PROBST+14
APCHSTAT	PROBST+2, APROB, CPROB, SPROB, OPROB, EPROB, RPROB, IPROB, COMMON1+8, PROBX! , PROBSCH+1
>> APCHSTXT	ECODEDSP+4, DSPN+7
>> APCHSTYP	APROB, PROBDSP+6, PROBDSP+8
APCHSVSC	PROBX+2!
APCHSX	COMMON1+2, COMMON1+4, COMMON1+5, COMMON1+7, COMMON1+9*, COMMON1+12, PROBX+2!
DT	COMMON1+2, COMMON1+5, COMMON1+9
>> I	PROBDSP+27, PROBDSP+28, PROBDSP+33, PROBDSP+34, PROBDSP+39*, PROBDSP+40
U	PROBST+7, APROB, COMMON1+4, COMMON1+7, COMMON1+12, PROBSCH+1, PROBDSP+4, PROBDSP+5, PROBDSP+8, PROBDSP+9 , PROBDSP+10, PROBDSP+12, PROBDSP+13, PROBDSP+15, PROBDSP+16, PROBDSP+22, ECODEDSP+5, ECODEDSP+7, ECODEDSP+9, DSPN+1 , DSPN+2, DSPN+6
>> X	PROBDSP+8*
Y	PROBX+2!, PROBDSP+12, PROBDSP+13, PROBDSP+16, DSPN+2, DSPN+3*, DSPN+4

Customize PDF page

Package: Patient Care Component

Routine: APCHS4

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: