Routine: APCHS8

Package	Total	Call Graph
Patient Care Component	3	REPHX^APCHS85 $$DATE^APCHSMU GETSITEV^APCHSUTL
IHS VA Utilities	2	$$VAL^XBDIQ1 $$EXTSET^XBFUNC
Kernel	2	$$FMTE^XLFDT $$STRIP^XLFSTR
VA Fileman	2	$$GET1^DIQ ^DIWP
IHS Patient	1	$$AGE^AUPNPAT

Entry Points

Name	Comments	DBIA/ICR reference
TRTCHK
NNC
NRDSP3	;get NRS type
BRTHX
TRTMTX
RPASS1	;
TXCX
RPASS2	;
TRTMT	; ********** TREATMENTS * 9000010.15 ********** ; <SETUP>
NRDSP13	;get NRS test DFN
REPHX	; ********** REPRODUCTIVE HISTORY * 9000017 ********** ; <SETUP>
TXC	;EP - called from component ; <SETUP>
OFFHDR
OFFHXX
IMAGING	;
TXDSP23	;
SVR(DFN,MAX,START,LINE)
OFFHX	; ********** OFFSPRING HISTORY * 9000012 ********** ; <SETUP>
TXDSP6	;get contract type
PRINT(LINE)	; EP-PRINT RESULTS
ONEDATE
BIRTHM	; ******** BIRTH MEASUREMENTS 9000024 AND V INFANT FEEDING 9000010.44 ******** ; <SETUP>
NRDSP23	;compile data & display NRS test
NRS3X
TXDSP13	;
OUTC
OFFDSP	;
NRS	; ******************* NRS - LAST 3 * 9000010.49 ******* ; <SETUP>
PNC

External References

Name	Field # of Occurrence
REPHX^APCHS85	REPHX+2
$$DATE^APCHSMU	BIRTHM+32
GETSITEV^APCHSUTL	TRTCHK+2
$$AGE^AUPNPAT	BIRTHM+25
$$GET1^DIQ	BIRTHM+39, BIRTHM+40
^DIWP	NRDSP23+18
$$VAL^XBDIQ1	TXDSP23+3, TXDSP23+4, BIRTHM+25, NRDSP23+3, NRDSP23+5
$$EXTSET^XBFUNC	TXC+5
$$FMTE^XLFDT	RPASS1+3
$$STRIP^XLFSTR	BIRTHM+7, BIRTHM+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: Y,?10,$P(APCHSN,U,4),?20,$P(APCHSN,U,5),?24,$J(+$P(APCHSN,U,6),5,2),?31,$P(APCHSN,U,7) Line Location: OFFDSP+3
Function Call: WRITE	Prompt: ?35,$P(APCHSN,U,8),"/",$S($P(APCHSN,U,9):$P(APCHSN,U,9),1:"-") Line Location: OFFDSP+4
Function Call: WRITE	Prompt: ?42,$E(Y,1,36) Line Location: OFFDSP+5
Function Call: WRITE	Prompt: ! Line Location: OFFDSP+6
Function Call: WRITE	Prompt: "DOB",?10,"NAME",?20,"SEX",?25,"BWT",?31,"EGA",?35,"APGAR",?42,"DEATH",! Line Location: OFFHDR+0
Function Call: WRITE	Prompt: ?34,Y,! Line Location: OUTC+1
Function Call: WRITE	Prompt: APCHSDTT Line Location: TRTCHK+4
Function Call: WRITE	Prompt: APCHSDTT Condition for execution: APCHSNPG Line Location: TRTCHK+12
Function Call: WRITE	Prompt: ?10,$E(APCHSFAC,1,10),?21,APCHST," (",APCHSNT,")",APCHSLVT,! Line Location: TRTCHK+12
Function Call: WRITE	Prompt: ! Line Location: TXDSP6+2
Function Call: WRITE	Prompt: APCHSTX Line Location: TXDSP6+2
Function Call: WRITE	Prompt: APCHSTX Condition for execution: APCHSNPG Line Location: TXDSP23+5
Function Call: WRITE	Prompt: ?20,APCHSDI,?40,APCHSPI,! Line Location: TXDSP23+5
Function Call: WRITE	Prompt: "BIRTH WEIGHT (kg)",?30,$$STRIP^XLFSTR($J($P(APCHX,U,18),10,3)) Line Location: BIRTHM+7
Function Call: WRITE	Prompt: "BIRTH LENGTH (inches)",?30,$$STRIP^XLFSTR($J($P(APCHX,U,22),6,2)) Line Location: BIRTHM+10
Function Call: WRITE	Prompt: !,"BIRTH ORDER" Line Location: BIRTHM+12
Function Call: WRITE	Prompt: ?30,X Line Location: BIRTHM+12
Function Call: WRITE	Prompt: !,"FORMULA STARTED (age)" Line Location: BIRTHM+14
Function Call: WRITE	Prompt: ?30,X Line Location: BIRTHM+14
Function Call: WRITE	Prompt: !,"BREAST STOPPED (age)" Line Location: BIRTHM+16
Function Call: WRITE	Prompt: ?30,X Line Location: BIRTHM+16
Function Call: WRITE	Prompt: !,"SOLIDS BEGUN (age)" Line Location: BIRTHM+18
Function Call: WRITE	Prompt: ?30,X Line Location: BIRTHM+18
Function Call: WRITE	Prompt: !!,"VISIT DATE",?20,"AGE",?32,"FEEDING CHOICE",! Line Location: BIRTHM+29
Function Call: WRITE	Prompt: ?40,$$GET1^DIQ(9000010.4413,APCHIENS,.01),! Line Location: BIRTHM+39
Function Call: WRITE	Prompt: ?10,"COMMENT: ",$$GET1^DIQ(9000010.4413,APCHIENS,.02),! Line Location: BIRTHM+40
Function Call: WRITE	Prompt: ?1,"DATE",?12,"PROVIDER",?32,"RISK",?72,"RD ",!?72,"REFERRAL",!! Line Location: NRDSP3+3
Function Call: WRITE	Prompt: ?1,APCHSDAT,?12,APCHSPR Line Location: NRDSP23+17
Function Call: WRITE	Prompt: ?32,^UTILITY($J,"W",0,1,0) Line Location: NRDSP23+19
Function Call: WRITE	Prompt: ?74,APCHSREF,! Line Location: NRDSP23+20
Function Call: WRITE	Prompt: ! Line Location: PRINT+4
Function Call: WRITE	Prompt: X Line Location: PRINT+7

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
9000010.4413	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNBMSR - [#9000024]	BIRTHM+5
^AUPNBMSR("B"	BIRTHM+2
^AUPNOFFH - [#9000012]	OFFDSP+1, PNC, NNC
^AUPNOFFH("AA"	OFFHX+3, OFFHX+7
^AUPNVIF - [#9000010.44]	BIRTHM+21, BIRTHM+34, BIRTHM+36, BIRTHM+39, BIRTHM+40
^AUPNVIF("AC"	BIRTHM+2, BIRTHM+19, BIRTHM+20
^AUPNVNTS - [#9000010.49]	NRDSP23+2, NRDSP23+4, NRDSP23+6, NRDSP23+8, NRDSP23+9, NRDSP23+10, NRDSP23+11, NRDSP23+12, NRDSP23+13, NRDSP23+14 , NRDSP23+15
^AUPNVNTS("AA"	NRS+2, NRDSP3+5, NRDSP3+6, NRDSP13+2
^AUPNVSIT - [#9000010]	BIRTHM+23
^AUPNVTRT - [#9000010.15]	TRTCHK
^AUPNVTRT("AA"	TRTMT+2, TRTMT+5, ONEDATE
^AUPNVTXC - [#9000010.39]	TXDSP23+2
^AUPNVTXC("AA"	TXC+2, TXC+5, TXDSP6+2, TXDSP13+2
^AUTTTRT - [#9999999.17]	TRTCHK+1, TRTCHK+8
^DD(9000010.15	TRTCHK+11
^DPT - [#2]	OFFHX+2
^ICPT - [#81]	RPASS1+20
^RA(72 - [#72]	RPASS1+13
^RADPT - [#70]	IMAGING+1, SVR+7
^RAMIS(71 - [#71]	RPASS1+17
^RAMIS(71.2 - [#71.2]	RPASS1+24
^RARPT - [#74]	RPASS1+8, RPASS1+32, RPASS1+34
^UTILITY($J	NRDSP23+18!, NRDSP23+19, NRDSP23+21, NRDSP23+23, NRDSP23+24!
^VA(200 - [#200]	RPASS1+15

Label References

Name	Line Occurrences
NRDSP13	NRDSP3+6
NRDSP23	NRDSP13+2
NRDSP3	NRS+5
OFFDSP	OFFHX+7
OFFHDR	OFFHX+5, OFFDSP+2, OUTC
ONEDATE	TRTMT+5
OUTC	PNC, NNC
PRINT	IMAGING+5
SVR	IMAGING+4
TRTCHK	ONEDATE
TXDSP13	TXDSP6+2
TXDSP23	TXDSP13+2
TXDSP6	TXC+5

Naked Globals

Name	Field # of Occurrence
^(	PNC, NNC

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	BIRTHM+6, BIRTHM+9, SVR+3~, RPASS1+8, RPASS1+9, RPASS1+12, RPASS1+13, RPASS1+24*, RPASS1+26
APCHAX	BIRTHM+36*, BIRTHM+38, BIRTHM+39, BIRTHM+40, BRTHX!
APCHD	BIRTHM+30*, BIRTHM+32, BRTHX!
APCHIENS	BIRTHM+38*, BIRTHM+39, BIRTHM+40, BRTHX!
>> APCHRISK	NRDSP23+5, NRDSP23+6, NRDSP23+8, NRDSP23+9, NRDSP23+10, NRDSP23+11, NRDSP23+12, NRDSP23+13, NRDSP23+14, NRDSP23+15 , NRDSP23+18
APCHS	TXCX!, NRS3X!
APCHSARR	IMAGING+3!, IMAGING+4, IMAGING+5, IMAGING+6!
>> APCHSBRK	OFFHX+4, TRTMT+3, TXC+3, BIRTHM+3, NRS+3, IMAGING+2
>> APCHSCKP	OFFHX+4, OFFHX+5, OFFDSP+2, OUTC, TRTMT+3, TRTCHK+3, TRTCHK+12, TXC+5, TXDSP6+2, TXDSP23+5 , BIRTHM+3, BIRTHM+8, BIRTHM+11, BIRTHM+13, BIRTHM+15, BIRTHM+17, BIRTHM+28, BIRTHM+31, BIRTHM+37, NRDSP3+1 , NRDSP23+16, NRDSP23+22, PRINT+5
APCHSCNT	TXCX!, TXDSP6+1, TXDSP6+2, TXDSP13+2, NRS3X!, NRDSP3+4, NRDSP3+5, NRDSP3+6, NRDSP13+2
>> APCHSCVD	OFFDSP+3, OFFDSP+5, TRTMT+5, TXDSP13+1, TXDSP23+1, NRDSP13+1, NRDSP23+1
APCHSDAT	OFFHX+7, OFFHXX!, OFFDSP+3, TXCX!, TXDSP13+1, TXDSP23+1, BRTHX!, NRS3X!, NRDSP13+1, NRDSP23+1* , NRDSP23+17
APCHSDFN	OFFHX+7, OFFHXX!, OFFDSP+1, PNC, NNC, TRTMTX!, ONEDATE, TRTCHK, TXCX!, TXDSP13+2* , TXDSP23+2, TXDSP23+3, TXDSP23+4, BRTHX!, NRS3X!, NRDSP13+2*, NRDSP23+2, NRDSP23+3, NRDSP23+4, NRDSP23+5 , NRDSP23+6, NRDSP23+8, NRDSP23+9, NRDSP23+10, NRDSP23+11, NRDSP23+12, NRDSP23+13, NRDSP23+14, NRDSP23+15
APCHSDI	TXCX!, TXDSP23+3*, TXDSP23+5
>> APCHSDLM	TRTMT+5, IMAGING+4
APCHSDTT	TRTMT+5*, TRTMTX!, TRTCHK+4, TRTCHK+12
APCHSDTU	TRTMT+5, TRTMTX!, TRTCHK+3, TRTCHK+4, TRTCHK+7*
>> APCHSEX	NRDSP3+4, NRDSP3+5, NRDSP3+6, NRDSP13+2
APCHSFAC	TRTMTX!, TRTCHK+5, TRTCHK+6, TRTCHK+12
APCHSFN	NRS+7!
APCHSFO	TRTMTX!, TRTCHK+4, TRTCHK+5, TRTCHK+6
APCHSITE	TRTMTX+1!, TXCX+1!, NRS3X+1!
APCHSIVD	TRTMT+5, TRTMTX!, ONEDATE, TXCX!, TXDSP6+2, TXDSP13+1, TXDSP13+2, TXDSP23+1, NRS3X!, NRDSP3+6* , NRDSP13+1, NRDSP13+2, NRDSP23+1
APCHSLVL	TRTMTX!, TRTCHK+10*, TRTCHK+11
APCHSLVT	TRTMTX!, TRTCHK+10, TRTCHK+11, TRTCHK+12
APCHSN	OFFHXX!, OFFDSP+1, OFFDSP+3, OFFDSP+4, OFFDSP+5, TRTMTX!, TRTCHK, TRTCHK+1, TRTCHK+2, TRTCHK+8 , TRTCHK+9, TRTCHK+10, BRTHX!
APCHSNAB	TRTMTX+1!, TXCX+1!, NRS3X+1!
>> APCHSNDM	TRTMT+5*, IMAGING+4
APCHSNFL	TRTMTX+1!, TXCX+1!, NRS3X+1!
>> APCHSNPG	OFFHX+4, OFFDSP+2, OUTC, TRTMT+3, TRTCHK+3, TRTCHK+12, TXDSP23+5, BIRTHM+3
APCHSNSH	TRTMTX+1!, TRTCHK+5, TRTCHK+6, TXCX+1!, NRS3X+1!
APCHSNT	TRTMTX!, TRTCHK+9*, TRTCHK+12
APCHSP	OFFHXX!, PNC, NNC, BRTHX!
>> APCHSPAT	OFFHX+2, OFFHX+3, OFFHX+7, TRTMT+2, TRTMT+5, ONEDATE, TXC+2, TXC+5, TXDSP6+2, TXDSP13+2 , BIRTHM+2, BIRTHM+5, BIRTHM+19, BIRTHM+20, BIRTHM+25, NRS+2, NRDSP3+5, NRDSP3+6, NRDSP13+2, IMAGING+1 , IMAGING+4
>> APCHSPI	TXDSP23+4*, TXDSP23+5
>> APCHSPR	NRDSP23+3*, NRDSP23+17
>> APCHSQ	OFFHX+7, TRTMT+5, ONEDATE, TXC+5, TXDSP6+2, TXDSP13+2, NRDSP3+6, NRDSP13+2
>> APCHSQIT	OFFHX+4, OFFHX+5, OFFHX+7, OFFDSP+2, PNC, PNC+1, NNC, OUTC, TRTMT+3, TRTMT+5 , ONEDATE, TRTCHK+3, TRTCHK+12, TXC+5, TXDSP6+2, TXDSP23+5, BIRTHM+3, BIRTHM+8, BIRTHM+11, BIRTHM+13 , BIRTHM+15, BIRTHM+17, BIRTHM+28, BIRTHM+30, BIRTHM+31, BIRTHM+37, NRDSP3+2, NRDSP3+5, NRDSP3+6, NRDSP13+2 , NRDSP23+16, NRDSP23+21, NRDSP23+22, PRINT+3, PRINT+5
APCHSRDG	NRS3X!
>> APCHSREF	NRDSP23+4*, NRDSP23+20
APCHST	TRTMTX!, TRTCHK+8, TRTCHK+12, TXC+5, TXCX!, TXDSP6+2, TXDSP13+2, NRS+7!, NRS3X!
APCHSTL	TXC+5*, TXCX!, NRS3X!
APCHSTX	TXC+5*, TXCX!, TXDSP6+2, TXDSP23+5, NRS3X!
APCHSVDF	TRTMTX!, TRTCHK+2, TXCX!, TXDSP23+2, NRS3X!
APCHSVSC	TRTMTX+1!, TRTCHK+2, TXCX+1!, NRS3X+1!
>> APCHSX	NRDSP23+21*, NRDSP23+23
APCHT	BIRTHM+20!, BRTHX!
APCHT(	BIRTHM+25*, BIRTHM+30, BIRTHM+32
APCHX	BIRTHM+5, BIRTHM+6, BIRTHM+7, BIRTHM+9, BIRTHM+10, BIRTHM+12, BIRTHM+14, BIRTHM+16, BIRTHM+18, BIRTHM+20 , BIRTHM+21, BIRTHM+25, BIRTHM+30*, BIRTHM+32, BIRTHM+34, BIRTHM+36, BIRTHM+38, BIRTHM+39, BIRTHM+40, BRTHX!
ARR	SVR+3~, RPASS2+1*, RPASS2+7
ARR(	RPASS1+28, RPASS1+30, RPASS1+32, RPASS1+34, RPASS2+3, RPASS2+4, RPASS2+6, RPASS2+7, RPASS2+14, RPASS2+16 , RPASS2+21, RPASS2+23, RPASS2+28, RPASS2+30
>> C	NRDSP23+6, NRDSP23+8, NRDSP23+9, NRDSP23+10, NRDSP23+11, NRDSP23+12, NRDSP23+13, NRDSP23+14, NRDSP23+15*
CASE	SVR+4~, RPASS1+11*, RPASS1+28
CNT	SVR+4~, SVR+5, RPASS1+1, RPASS1+10, RPASS1+28, RPASS1+30, RPASS1+32, RPASS1+34, RPASS2+2, RPASS2+3 , RPASS2+4, RPASS2+6, RPASS2+7, RPASS2+14, RPASS2+16, RPASS2+21, RPASS2+23, RPASS2+28, RPASS2+30, PRINT+1~ , PRINT+2, PRINT+3, PRINT+6
CPT	SVR+4~, RPASS1+20*, RPASS1+28
CPTIEN	SVR+4~, RPASS1+19*, RPASS1+20
DFN	SVR~, SVR+1, SVR+7
>> DIWL	NRDSP23+18*
>> DIWR	NRDSP23+18*
EDT	SVR+3~, RPASS1+2*, RPASS1+3
ESTAT	SVR+4~, RPASS1+12, RPASS1+13, RPASS1+28
EXDT	SVR+3~, RPASS1+3*, RPASS1+28
GBL	SVR+3~, SVR+7*, RPASS1+1, RPASS1+2, RPASS1+5, RPASS1+6, RPASS1+22, RPASS1+23, RPASS1+30
IDT	SVR+3~, SVR+5, RPASS1+1, RPASS1+2, RPASS1+5, RPASS1+6, RPASS1+22, RPASS1+23, RPASS1+30
IDT2	SVR+3~, SVR+6*, RPASS1+1
LINE	SVR~, RPASS2+2, RPASS2+8, RPASS2+9, RPASS2+11, RPASS2+12, RPASS2+15, RPASS2+16, RPASS2+18, RPASS2+19 , RPASS2+22, RPASS2+23, RPASS2+25, RPASS2+26, RPASS2+29, RPASS2+30, PRINT~
LINE(	RPASS2+9, RPASS2+11, RPASS2+12, RPASS2+16, RPASS2+18, RPASS2+19, RPASS2+23, RPASS2+25, RPASS2+26, RPASS2+30 , PRINT+3, PRINT+6
LINE(1	RPASS2+2*
MAX	SVR~, SVR+1, RPASS1+1
>> MIEN	RPASS1+21, RPASS1+22, RPASS1+23
MOD	SVR+4~, RPASS1+21, RPASS1+25, RPASS1+26*, RPASS1+28
PCC	SVR+3~
PCE	SVR+4~, RPASS2+5, RPASS2+6, RPASS2+7
PMIEN	SVR+4~, RPASS1+23*, RPASS1+24
PRIEN	SVR+4~, RPASS1+16*, RPASS1+17
PROC	SVR+4~, RPASS1+18*, RPASS1+28
RCIEN	SVR+4~, RPASS1+4, RPASS1+5, RPASS1+6, RPASS1+22, RPASS1+23, RPASS1+30
RDFN	SVR+4~, RPASS1+14*, RPASS1+15
RDOC	SVR+4~, RPASS1+14, RPASS1+15, RPASS1+28
RIEN	SVR+3~, RPASS1+7*, RPASS1+8, RPASS1+32, RPASS1+34
RSTAT	SVR+4~, RPASS1+8, RPASS1+9, RPASS1+28
START	SVR~, SVR+1, SVR+6
T	SVR+3~, SVR+5*, RPASS1+28, RPASS2+1, RPASS2+4, RPASS2+6, RPASS2+7
TAB	SVR+4~, RPASS2+2*, RPASS2+7, RPASS2+12, RPASS2+16, RPASS2+19, RPASS2+23, RPASS2+26, RPASS2+30
TOT	SVR+4~, RPASS2+4*, RPASS2+5
U	OFFHX+2, OFFDSP+3, OFFDSP+4, OFFDSP+5, TRTCHK+1, TRTCHK+2, TRTCHK+8, TRTCHK+9, TRTCHK+10, TRTCHK+11 , TXDSP23+2, BIRTHM+6, BIRTHM+7, BIRTHM+9, BIRTHM+10, BIRTHM+12, BIRTHM+14, BIRTHM+16, BIRTHM+18, BIRTHM+21 , BIRTHM+23, BIRTHM+25, BIRTHM+32, BIRTHM+39, BIRTHM+40, NRDSP23+4, NRDSP23+6, NRDSP23+8, NRDSP23+9, NRDSP23+10 , NRDSP23+11, NRDSP23+12, NRDSP23+13, NRDSP23+14, NRDSP23+15, RPASS1+7, RPASS1+8, RPASS1+11, RPASS1+12, RPASS1+13 , RPASS1+14, RPASS1+15, RPASS1+16, RPASS1+18, RPASS1+19, RPASS1+20, RPASS1+24
>> V	BIRTHM+21, BIRTHM+22, BIRTHM+23, BIRTHM+24, BIRTHM+25
X	OFFHXX!, TXCX!, BIRTHM+12, BIRTHM+14, BIRTHM+16, BIRTHM+18, BIRTHM+39, BRTHX!, NRS3X!, NRDSP23+18 , SVR+3~, RPASS1+6, RPASS1+7, RPASS1+11, RPASS1+12, RPASS1+14, RPASS1+16, RPASS2+6, RPASS2+7, RPASS2+9 , PRINT+6, PRINT+7
Y	OFFHXX!, OFFDSP+3, OFFDSP+5, PNC, NNC, OUTC+1, TRTMT+5, TXCX!, TXDSP13+1, TXDSP23+1* , BRTHX!, NRS3X!, NRDSP13+1, NRDSP23+1, SVR+3~, RPASS1+17*, RPASS1+18, RPASS1+19
Z	SVR+3~, RPASS1+29, RPASS1+30, RPASS1+31, RPASS1+32, RPASS1+33, RPASS1+34, RPASS2+13, RPASS2+14, RPASS2+16 , RPASS2+20, RPASS2+21, RPASS2+23, RPASS2+27, RPASS2+28, RPASS2+30

Customize PDF page

Package: Patient Care Component

Routine: APCHS8

Information

Source Information

Call Graph

Call Graph Total: 10

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: