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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: APCHS8

Package: Patient Care Component

Routine: APCHS8


Information

APCHS8 ; IHS/CMI/LAB - PART 8 OF APCHS -- SUMMARY PRODUCTION COMPONENTS ;

Source Information

Source file <APCHS8.m>

Call Graph

Call Graph Total: 10

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
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All