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 |  Global Variables Directly Accessed |  Local Variables |  All
Print Page as PDF
Routine: ACHSCPTX

Package: Contract Health Management Information System

Routine: ACHSCPTX


Information

ACHSCPTX ;IHS/ITSC/PMF - FIX CPT DANGLING X-REF;JUL 10, 2008

Source Information

Source file <ACHSCPTX.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 2 ^%ZIS  ^%ZISC  
DRG Grouper 1 $$CPT^ICPTCOD  

Entry Points

Name Comments DBIA/ICR reference
AZBADCPT ; ;[ 02/07/2001 11:31 AM ]
CHSFAC ;

External References

Name Field # of Occurrence
^%ZIS AZBADCPT+2
^%ZISC AZBADCPT+34
$$CPT^ICPTCOD AZBADCPT+10, AZBADCPT+18, AZBADCPT+22, AZBADCPT+28, AZBADCPT+30, AZBADCPT+32

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$P($G(^DIC(4,DUZ(2),0)),U),!!
  • Line Location: AZBADCPT+4
Function Call: WRITE
  • Prompt: !,"Node is: ",ICPTNODE," Code should be: ",Y,!,^ICPT(ICPTNODE,0),!
  • Line Location: AZBADCPT+17
Function Call: WRITE
  • Prompt: !,"Node is: ",ICPTNODE," Code should be: ",Y,!,$P($$CPT^ICPTCOD(ICPTNODE),U,2),!
  • Line Location: AZBADCPT+18
Function Call: WRITE
  • Prompt: " No Code should be here",!,$G(^ICPT(ICPTNODE,0)),!
  • Line Location: AZBADCPT+27
Function Call: WRITE
  • Prompt: " No Code should be here",!,$P($$CPT^ICPTCOD(ICPTNODE),U,2),!
  • Line Location: AZBADCPT+28
Function Call: WRITE
  • Prompt: " No Code should be here",!,$G(^ICPT(ICPTNODE,0)),!
  • Line Location: AZBADCPT+29
Function Call: WRITE
  • Prompt: " No Code should be here",!,$P($$CPT^ICPTCOD(ICPTNODE),U,2),!
  • Line Location: AZBADCPT+30
Function Call: WRITE
  • Prompt: !,"IN BAD CODE FILE ",CODE
  • Line Location: CHSFAC+17
Function Call: WRITE
  • Prompt: !,"POSSIBLE GOOD ENTRY TO BE FOUND ",CODE
  • Line Location: CHSFAC+18
Function Call: WRITE
  • Prompt: !,"IN BAD FILE ",CODE
  • Line Location: CHSFAC+23
Function Call: WRITE
  • Prompt: !,"POSSIBLE GOOD ENTRY TO BE FOUND ",CODE
  • Line Location: CHSFAC+24
Routine Call
  • %ZIS
  • Line Location:
    • AZBADCPT+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACHSCPTX( AZBADCPT+18*, AZBADCPT+28*, AZBADCPT+30*
^ACHSCPTX("GOOD CODE?" AZBADCPT+32*
^ACHSF - [#9002080] CHSFAC+4, CHSFAC+7, CHSFAC+10, CHSFAC+11
^DIC(4 - [#4] AZBADCPT+4
^ICPT - [#81] AZBADCPT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACHSCPTX("GOO D CODE?" , AZBADCPT+18*
>> BADCNT CHSFAC+2*
>> CODE CHSFAC+14*
>> CPTCNT CHSFAC+2*, CHSFAC+15*
>> CPTINFO CHSFAC+11*, CHSFAC+12, CHSFAC+13, CHSFAC+14
>> CPTMULT CHSFAC+9*, CHSFAC+10*, CHSFAC+11
>> DOCCNT CHSFAC+7*
>> DOCUMENT CHSFAC+6*, CHSFAC+7*, CHSFAC+10, CHSFAC+11
DUZ(2 AZBADCPT+4
>> FACILITY CHSFAC+3*, CHSFAC+4*, CHSFAC+7, CHSFAC+10, CHSFAC+11
>> FOUND CHSFAC+2*
>> ICPTNODE AZBADCPT+5*, AZBADCPT+6*, AZBADCPT+7, AZBADCPT+10, AZBADCPT+11, AZBADCPT+18, AZBADCPT+19, AZBADCPT+22, AZBADCPT+24, AZBADCPT+25
, AZBADCPT+28, AZBADCPT+30, AZBADCPT+32
IO AZBADCPT+3
>> MAYBECNT CHSFAC+2*
>> NPTFOUND CHSFAC+2*
U AZBADCPT+4, AZBADCPT+10, AZBADCPT+18, AZBADCPT+22, AZBADCPT+28, AZBADCPT+30, AZBADCPT+32, CHSFAC+1*, CHSFAC+14
>> UNKNOWN CHSFAC+2*
>> X AZBADCPT+10*, AZBADCPT+18, AZBADCPT+22*, AZBADCPT+23*, AZBADCPT+24
>> Y AZBADCPT+11*, AZBADCPT+12*, AZBADCPT+13*, AZBADCPT+14*, AZBADCPT+15*, AZBADCPT+18
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Local Variables |  All