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 |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: APCH2P16

Package: Patient Care Component

Routine: APCH2P16


Information

APCH2P16 ; IHS/TUCSON/LAB - PCC HEALTH SUMMARY POST INIT PATCH 12 ; [ 09/07/04 10:26 AM ]

Source Information

Source file <APCH2P16.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 $$CJ^XLFSTR  $$ADD^XPDMENU  MES^XPDUTL  
Patient Care Component 2 ^APCHBU16  ^APCHP16  
VA Fileman 2 (,IX)^DIC  ^DIE  

Entry Points

Name Comments DBIA/ICR reference
PRE ;EP
IMES ;
SET ;
INSTALLD(APCHSTAL) ;EP - Determine if patch APCHSTAL was installed, where
; APCHSTAL is the name of the INSTALL. E.g "AG*6.0*11".
TAX ;
CAT ;;
SORRY(X) ;
BUL ;
TAXREAD ;
POST ;EP

External References

Name Field # of Occurrence
^APCHBU16 BUL+1
^APCHP16 POST+5
^DIC INSTALLD+9, INSTALLD+12, POST+12, POST+17, TAXREAD+14
IX^DIC INSTALLD+6
^DIE PRE+3, PRE+6, PRE+9, PRE+12, PRE+15, POST+19
$$CJ^XLFSTR IMES+1, SORRY+4
$$ADD^XPDMENU POST+1, POST+3
MES^XPDUTL IMES+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM)
  • Line Location: SORRY+4
Function Call: WRITE
  • Prompt: "Attempt to add MAJOR CPT taxonomy option failed."
  • Line Location: POST+2
Function Call: WRITE
  • Prompt: "Attempt to add Minor CPT taxonomy option failed."
  • Line Location: POST+4
Function Call: WRITE
  • Prompt: !!,"could not update status on ",X," hmr"
  • Line Location: POST+13
Function Call: WRITE
  • Prompt: !,"category not updated. ",X
  • Line Location: POST+20
Function Call: WRITE
  • Prompt: !,$P(APCHDATA,"|")
  • Line Location: TAXREAD+5
Function Call: WRITE
  • Prompt: !,"updating package multiple for ",APCHPP," entry ",$P(^ATXAX(APCHDA,0),U)," failed"
  • Line Location: TAXREAD+15
Function Call: WRITE
  • Prompt: !,Y
  • Line Location: SET+4
Routine Call
  • DIE
  • Line Location:
    • PRE+3
    • PRE+6
    • PRE+9
    • PRE+12
    • PRE+15
    • POST+19
Routine Call
  • DIC
  • Line Location:
    • INSTALLD+9
    • INSTALLD+12
    • POST+12
    • POST+17
    • TAXREAD+14
Routine Call
  • DIC
  • Line Location:
    • INSTALLD+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(9.4 - [#9.4] Classic Fileman Calls
^APCHHMC - [#9001016.1] Classic Fileman Calls
^APCHSURV - [#9001018] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCHHMC("B" PRE+2
^APCHSURV - [#9001018] PRE+18, POST+14*
^APCHSURV("B" PRE+5, PRE+8, PRE+11, PRE+14
^APCHTMP("HMR STATUS" PRE+17!, PRE+18*, POST+11, POST+12
^ATXAX - [#9002226] POST+7*, POST+9*, TAXREAD+5*, TAXREAD+6*, TAXREAD+15, SET+1, SET+2, SET+4*
^ATXAX("B" POST+5, POST+6, POST+8, TAXREAD+3
^DD(9002226 TAXREAD+13
^DIC(9.4 - [#9.4] TAXREAD+11

Label References

Name Line Occurrences
$$INSTALLD APCH2P16+8
IMES INSTALLD+7, INSTALLD+10, INSTALLD+14
SORRY APCH2P16+8
TAXREAD POST+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCH1 POST+16*, POST+17, POST+19
>> APCHDA TAXREAD+3*, TAXREAD+4, TAXREAD+5, TAXREAD+6, TAXREAD+13, TAXREAD+15
>> APCHDATA TAXREAD+2*, TAXREAD+3, TAXREAD+5, TAXREAD+6, TAXREAD+9
>> APCHN TAXREAD+10*
>> APCHP TAXREAD+9*, TAXREAD+10
>> APCHPI TAXREAD+11*, TAXREAD+12, TAXREAD+13
>> APCHPNSP SET+3, SET+4
>> APCHPP TAXREAD+10*, TAXREAD+11, TAXREAD+15
>> APCHS POST+12*, POST+14
>> APCHST POST+16*
APCHSTAL INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
>> APCHSX POST+16*
>> APCHTEXT TAXREAD+2*
>> APCHX POST+11*, POST+12, TAXREAD+2*
APCHY INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> ATXPNSP TAXREAD+1*
>> D INSTALLD+5*
DA PRE+2*, PRE+3, PRE+4!, PRE+5*, PRE+6, PRE+7!, PRE+8*, PRE+9, PRE+10!, PRE+11*
, PRE+12, PRE+13!, PRE+14*, PRE+15, PRE+16!, POST+6*, POST+7, POST+8*, POST+9, POST+19*!
, TAXREAD+8!, TAXREAD+16!
DA(1 TAXREAD+13*
DIC INSTALLD+3~, INSTALLD+5*, INSTALLD+8*, INSTALLD+11*, POST+12*, POST+17!*, TAXREAD+8!, TAXREAD+13*, TAXREAD+16!
DIC("P" TAXREAD+13*
DIC(0 INSTALLD+5*, POST+12*, POST+17*, TAXREAD+13*
DIE PRE+3*, PRE+4!, PRE+6*, PRE+7!, PRE+9*, PRE+10!, PRE+12*, PRE+13!, PRE+15*, PRE+16!
, POST+19*!
DIFQ SORRY+1!
DR PRE+3*, PRE+4!, PRE+6*, PRE+7!, PRE+9*, PRE+10!, PRE+12*, PRE+13!, PRE+15*, PRE+16!
, POST+19*!, TAXREAD+8!
IOM IMES+1, SORRY+4
>> L SET+3*, SET+4
U PRE+18, POST+7, POST+9, POST+12, POST+14, TAXREAD+5, TAXREAD+6, TAXREAD+13, TAXREAD+15, SET+2
, SET+4
X APCH2P16+7*, INSTALLD+3~, INSTALLD+4*, INSTALLD+8*, INSTALLD+11*, SORRY~, SORRY+2, SORRY+3, PRE+18*, POST+1*
, POST+2, POST+3*, POST+4, POST+12*, POST+13, POST+17*, POST+20, TAXREAD+13*, TAXREAD+16!, SET+1*
, SET+2, SET+4
>> XPDDIQ( APCH2P16+7*
>> XPDDIQ("XPZ1" APCH2P16+6*
>> XPDDIQ("XPZ2" APCH2P16+6*
>> XPDENV APCH2P16+6
>> XPDQUIT SORRY+2*, SORRY+3*
Y INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10, INSTALLD+11, INSTALLD+13, IMES+1, POST+13, POST+14, POST+18
, POST+19, POST+20, TAXREAD+15, TAXREAD+16!, SET+2*, SET+4

Marked Items

Name Field # of Occurrence
$T(@APCHST+APCHSX POST+16
$T(@APCHTEXT+APCHX TAXREAD+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All