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

Package: Patient Care Component Reports

Routine: APCLCH2S


Information

APCLCH2S ; IHS/CMI/LAB - community health profile print ;

Source Information

Source file <APCLCH2S.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
DRG Grouper 1 $$ICDDX^ICDEX  
Patient Care Component Reports 1 HEAD^APCLCH2P  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Patient Care Component Reports 1 APCLCH2P  

Entry Points

Name Comments DBIA/ICR reference
ISCAT ;
IDX ;
IDXSUB ;
ILCAT ;
IS ;
IT ;
IDXCAT ;
ITCAT ;
WOCAT ;write inpatient diagnoses/pov's
IL ;
PRINT ;
WIDX ;write inpatient diagnoses/pov's
INPT ;EP

External References

Name Field # of Occurrence
HEAD^APCLCH2P PRINT+1, WIDX+2, IDXCAT+2, WOCAT+2
$$ICDDX^ICDEX IL+4, IS+4, IT+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?3,$E($P(APCLL(APCLI),U),1,20),?30,"(",$P(APCLL(APCLI),U,3),")",?35,$J($P(APCLL(APCLI),U,2),6)
  • Line Location: WIDX+4
Function Call: WRITE
  • Prompt: ?46,$E($P(APCLS(APCLI),U),1,20),?68,"(",$P(APCLS(APCLI),U,3),")",?78,$J($P(APCLS(APCLI),U,2),6)
  • Line Location: WIDX+5
Function Call: WRITE
  • Prompt: ?89,$E($P(APCLT(APCLI),U),1,20),?111,"(",$P(APCLT(APCLI),U,3),")",?121,$J($P(APCLT(APCLI),U,2),6)
  • Line Location: WIDX+6
Function Call: WRITE
  • Prompt: !!!
  • Line Location: IDXCAT+3
Function Call: WRITE
  • Prompt: ?3,$E($P(APCLL(APCLI),U),1,30),?35,$J($P(APCLL(APCLI),U,2),6)
  • Line Location: WOCAT+4
Function Call: WRITE
  • Prompt: ?46,$E($P(APCLS(APCLI),U),1,30),?78,$J($P(APCLS(APCLI),U,2),6)
  • Line Location: WOCAT+5
Function Call: WRITE
  • Prompt: ?89,$E($P(APCLT(APCLI),U),1,30),?121,$J($P(APCLT(APCLI),U,2),6)
  • Line Location: WOCAT+6
Function Call: WRITE
  • Prompt: !,?(132-$L(X)/2),X,!
  • Line Location: IDXSUB+1
Function Call: WRITE
  • Prompt: !?8,$P(^DIC(4,APCLLFAC,0),U),?51,$P(^DIC(4,APCLSFAC,0),U),?94,$P(^DIC(4,APCLTFAC,0),U),!
  • Line Location: IDXSUB+2
Function Call: WRITE
  • Prompt: !?3,"DIAGNOSIS/POV (ICD CODES)",?46,"DIAGNOSIS/POV (ICD CODES)",?89,"DIAGNOSIS/POV (ICD CODES)",!?3,"-------------",?46,"------------",?89,"------------"
  • Line Location: IDXSUB+3
Function Call: WRITE
  • Prompt: !?3,"DIAGNOSTIC CATEGORY",?46,"DIAGNOSTIC CATEGORY",?89,"DIAGNOSTIC CATEGORY",!?3,"-------------------",?46,"-------------------",?89,"-------------------"
  • Line Location: IDXSUB+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] IDXSUB+2
^ICM - [#80.3] ILCAT+3, ISCAT+3, ITCAT+3
^XTMP("APCLCH2" IL+1, IL+2, IL+4, IS+1, IS+2, IS+4, IT+1, IT+2, IT+4, ILCAT+1
, ILCAT+2, ILCAT+3, ISCAT+1, ISCAT+2, ISCAT+3, ITCAT+1, ITCAT+2, ITCAT+3

Label References

Name Line Occurrences
IDXSUB IDX+2, WIDX+2, IDXCAT+3, WOCAT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCLBTH IL+1, IL+2, IL+4, IS+1, IS+2, IS+4, IT+1, IT+2, IT+4, ILCAT+1
, ILCAT+2, ILCAT+3, ISCAT+1, ISCAT+2, ISCAT+3, ITCAT+1, ITCAT+2, ITCAT+3
>> APCLCOM IL+1, IL+2, IL+4, IS+1, IS+2, IS+4, IT+1, IT+2, IT+4, ILCAT+1
, ILCAT+2, ILCAT+3, ISCAT+1, ISCAT+2, ISCAT+3, ITCAT+1, ITCAT+2, ITCAT+3
>> APCLI WIDX+1*, WIDX+4, WIDX+5, WIDX+6, WOCAT+1*, WOCAT+4, WOCAT+5, WOCAT+6
>> APCLJOB IL+1, IL+2, IL+4, IS+1, IS+2, IS+4, IT+1, IT+2, IT+4, ILCAT+1
, ILCAT+2, ILCAT+3, ISCAT+1, ISCAT+2, ISCAT+3, ITCAT+1, ITCAT+2, ITCAT+3
APCLL IL+1!, ILCAT+1!
APCLL( IL+4*, WIDX+4, ILCAT+3*, WOCAT+4
>> APCLLFAC IL+1, IL+2, IL+4, ILCAT+1, ILCAT+2, ILCAT+3, IDXSUB+2
>> APCLQUIT PRINT+1, WIDX+1, WIDX+2, IDXCAT+2, WOCAT+1, WOCAT+2
APCLS IS+1!, ISCAT+1!
APCLS( IS+4*, WIDX+5, ISCAT+3*, WOCAT+5
>> APCLSFAC IS+1, IS+2, IS+4, ISCAT+1, ISCAT+2, ISCAT+3, IDXSUB+2
APCLT IT+1!, ITCAT+1!
APCLT( IT+4*, WIDX+6, ITCAT+3*, WOCAT+6
>> APCLTFAC IT+1, IT+2, IT+4, ITCAT+1, ITCAT+2, ITCAT+3, IDXSUB+2
>> APCLTYPE IDX+1*, IDXCAT+1*, IDXSUB+1, IDXSUB+3, IDXSUB+4
>> APCLX IL+1*, IL+2, IL+4, IS+1*, IS+2, IS+4, IT+1*, IT+2, IT+4, ILCAT+1*
, ILCAT+2, ILCAT+3, ISCAT+1*, ISCAT+2, ISCAT+3, ITCAT+1*, ITCAT+2, ITCAT+3
>> APCLY IL+2*, IL+4, IS+2*, IS+4, IT+2*, IT+4, ILCAT+2*, ILCAT+3, ISCAT+2*, ISCAT+3
, ITCAT+2*, ITCAT+3
>> C IL+1*, IL+4*, IL+5, IS+1*, IS+4*, IS+5, IS+6, IT+1*, IT+4*, IT+5
, IT+6, ILCAT+1*, ILCAT+3*, ILCAT+4, ISCAT+1*, ISCAT+3*, ISCAT+4, ITCAT+1*, ITCAT+3*, ITCAT+4
IOSL WIDX+2, IDXCAT+2, WOCAT+2
>> M IL+5*, IS+5*, IS+6*, IT+5*, IT+6*, WIDX+1, ILCAT+4*, ISCAT+4*, ITCAT+4*, WOCAT+1
U IL+4, IS+4, IT+4, WIDX+4, WIDX+5, WIDX+6, ILCAT+3, ISCAT+3, ITCAT+3, WOCAT+4
, WOCAT+5, WOCAT+6, IDXSUB+2
>> X IDXSUB+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All