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

Package: Patient Care Component Reports

Routine: APCLP16


Information

APCLP16 ; IHS/BJI/GRL - Routine to create bulletin [ 01/16/05 2:03 PM ]

Source Information

Source file <APCLP16.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 4 HOME^%ZIS  $$CJ^XLFSTR  ($$ADD,$$DELETE)^XPDMENU  MES^XPDUTL  
VA Fileman 4 (,IX)^DIC  DT^DICRW  ^DIE  (,IX1)^DIK  
MailMan 1 ^XMD  
Patient Care Component Reports 1 ^APCL1TX  

Entry Points

Name Comments DBIA/ICR reference
PRE ;EP
OPT ;add new options
IMES ;
SET ;
SENDER
SETTAXL ;
GETRECIP ;
WRITEMSG ;
TAX ;
LAB ;
TAXREAD ;
LAB1 ;
SORRY(X) ;
LABTAX ;
INSTALLD(APCLSTAL) ;EP - Determine if patch APCLSTAL was installed, where
; APCLSTAL is the name of the INSTALL. E.g "AG*6.0*11".
POST ;EP
SUBJECT

External References

Name Field # of Occurrence
HOME^%ZIS OPT+22
^APCL1TX OPT+19
^DIC LAB1+4, SETTAXL+14, INSTALLD+9, INSTALLD+12, TAXREAD+14
IX^DIC INSTALLD+6
DT^DICRW OPT+22
^DIE PRE+9
^DIK PRE+1, PRE+3, PRE+4, PRE+5, PRE+6, PRE+7
IX1^DIK LAB1+7
$$CJ^XLFSTR IMES+1, SORRY+4
^XMD SENDER+3
$$ADD^XPDMENU OPT+2, OPT+5, OPT+7, OPT+9, OPT+11, OPT+13, OPT+15
$$DELETE^XPDMENU OPT+4
MES^XPDUTL IMES+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "Attempt to add PATIENT REFUSAL LIST report option failed.."
  • Line Location: OPT+3
Function Call: WRITE
  • Prompt: "Attempt to add DV REPORTS menu option failed.."
  • Line Location: OPT+6
Function Call: WRITE
  • Prompt: "Attempt to add DV REPORTS menu option failed.."
  • Line Location: OPT+8
Function Call: WRITE
  • Prompt: "Attempt to add RETURNS TO CLINIC report option failed.."
  • Line Location: OPT+10
Function Call: WRITE
  • Prompt: "Attempt to add CPT BY PROVIDER REPORT menu option failed.."
  • Line Location: OPT+12
Function Call: WRITE
  • Prompt: "Attempt to add BMI MOVE menu option failed.."
  • Line Location: OPT+14
Function Call: WRITE
  • Prompt: "Attempt to add 2005 DM AUDIT menu option failed.."
  • Line Location: OPT+16
Function Call: WRITE
  • Prompt: !,"DUZ UNDEFINED OR ZERO.",!
  • Line Location: OPT+21
Function Call: WRITE
  • Prompt: !,"Sending Mailman message to holders of the"_" "_APCLKEY_" "_"security key."
  • Line Location: SENDER+2
Function Call: WRITE
  • Prompt: !,"Creating ",APCLX," Taxonomy..."
  • Line Location: LAB1+3
Function Call: WRITE
  • Prompt: !!,"ERROR IN CREATING ",APCLX," TAX"
  • Line Location: LAB1+5
Function Call: WRITE
  • Prompt: !,$P(APCLDATA,"|")
  • Line Location: SETTAXL+5
Function Call: WRITE
  • Prompt: !,"updating package multiple for ",APCLPP," entry ",$P(^ATXLAB(APCLDA,0),U)," failed"
  • Line Location: SETTAXL+15
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM)
  • Line Location: SORRY+4
Function Call: WRITE
  • Prompt: !,$P(APCLDATA,"|")
  • Line Location: TAXREAD+5
Function Call: WRITE
  • Prompt: !,"updating package multiple for ",APCLPP," entry ",$P(^ATXAX(APCLDA,0),U)," failed"
  • Line Location: TAXREAD+15
Function Call: WRITE
  • Prompt: !,Y
  • Line Location: SET+4
Routine Call
  • %ZIS
  • Line Location:
    • OPT+22
Routine Call
  • DIE
  • Line Location:
    • PRE+9
Routine Call
  • DIC
  • Line Location:
    • LAB1+4
    • SETTAXL+14
    • INSTALLD+9
    • INSTALLD+12
    • TAXREAD+14
Routine Call
  • DIC
  • Line Location:
    • INSTALLD+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(19 - [#19] Classic Fileman Calls
^DIC(9.4 - [#9.4] Classic Fileman Calls
^APCLCNTL - [#9001003] Classic Fileman Calls
^APCLVSTS - [#9001003.7] Classic Fileman Calls
^APCLBMI - [#9001003.9] Classic Fileman Calls
^APCLRECD - [#9001004.1] Classic Fileman Calls
^APCLDMTX - [#9001004.2] Classic Fileman Calls
^APCLPDES - [#9001004.5] Classic Fileman Calls
^ATXAX - [#9002226] Classic Fileman Calls
^ATXLAB - [#9002228] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCLBMI("H" PRE+8!
^APCLPDES - [#9001004.5] WRITEMSG+3
^APCLPDES("B" WRITEMSG+1
^ATXAX - [#9002226] TAXREAD+5*, TAXREAD+6*, TAXREAD+15, SET+1, SET+2, SET+4*
^ATXAX("B" TAXREAD+3
^ATXLAB - [#9002228] LAB1+2*, LAB1+6*, SETTAXL+5*, SETTAXL+6*, SETTAXL+15
^ATXLAB("B" LAB1+1, SETTAXL+3
^DD(9002226 TAXREAD+13
^DD(9002228 SETTAXL+1, SETTAXL+13
^DIC(19 - [#19] PRE+9
^DIC(9.4 - [#9.4] SETTAXL+11, TAXREAD+11
^TMP($J OPT+25!, SENDER+4!, WRITEMSG+3*
^XUSEC( GETRECIP+4

Label References

Name Line Occurrences
$$INSTALLD APCLP16+6
GETRECIP OPT+26
IMES INSTALLD+7, INSTALLD+10, INSTALLD+14
LAB OPT+18
LAB1 LAB+1, LAB+2, LAB+3
SORRY APCLP16+6
TAXREAD OPT+20
WRITEMSG OPT+26

Naked Globals

Name Field # of Occurrence
^(0 LAB1+6*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCLDA LAB1+1*, LAB1+2, SETTAXL+3*, SETTAXL+4, SETTAXL+5, SETTAXL+6, SETTAXL+13, SETTAXL+15, TAXREAD+3*, TAXREAD+4
, TAXREAD+5, TAXREAD+6, TAXREAD+13, TAXREAD+15
>> APCLDATA SETTAXL+2*, SETTAXL+3, SETTAXL+5, SETTAXL+6, SETTAXL+9, TAXREAD+2*, TAXREAD+3, TAXREAD+5, TAXREAD+6, TAXREAD+9
APCLKEY SENDER+2, SENDER+4!, GETRECIP+3*, GETRECIP+4
>> APCLN SETTAXL+10*, TAXREAD+10*
>> APCLP SETTAXL+9*, SETTAXL+10, TAXREAD+9*, TAXREAD+10
>> APCLPI SETTAXL+11*, SETTAXL+12, SETTAXL+13, TAXREAD+11*, TAXREAD+12, TAXREAD+13
>> APCLPNSP SET+3, SET+4
>> APCLPP SETTAXL+10*, SETTAXL+11, SETTAXL+15, TAXREAD+10*, TAXREAD+11, TAXREAD+15
APCLSTAL INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
>> APCLTEXT SETTAXL+2*, TAXREAD+2*
>> APCLTX LAB1+6*, LAB1+7
>> APCLX LAB+1*, LAB+2*, LAB+3*, LAB1+1, LAB1+3, LAB1+4, LAB1+5, LAB1+6, SETTAXL+2*, TAXREAD+2*
APCLY INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> ATXPNSP TAXREAD+1*
>> CTR GETRECIP+3*, GETRECIP+4*
>> D INSTALLD+5*
DA PRE+1*, PRE+3*, PRE+4*, PRE+5*, PRE+6*, PRE+7*, PRE+9*!, LAB1+4!, LAB1+7*, SETTAXL+8!
, SETTAXL+16!, TAXREAD+8!, TAXREAD+16!
DA(1 SETTAXL+13*, TAXREAD+13*
DIADD LAB1+4*!
DIC LAB1+4*!, SETTAXL+8!, SETTAXL+13*, SETTAXL+16!, INSTALLD+3~, INSTALLD+5*, INSTALLD+8*, INSTALLD+11*, TAXREAD+8!, TAXREAD+13*
, TAXREAD+16!
DIC("P" SETTAXL+13*, TAXREAD+13*
DIC(0 LAB1+4*, SETTAXL+13*, INSTALLD+5*, TAXREAD+13*
DIE PRE+9*!
DIFQ SORRY+1!
DIFROM OPT+24~
>> DIK PRE+1*, PRE+3*, PRE+4*, PRE+5*, PRE+6*, PRE+7*, LAB1+7*
DLAYGO LAB1+4*!
DR PRE+9*!, SETTAXL+8!, TAXREAD+8!
DT LAB1+6
DUZ OPT+21, SENDER+1, LAB1+6
I LAB1+4!
IOM IMES+1, SORRY+4
IOST SENDER+2
>> L SET+3*, SET+4
U LAB1+2, LAB1+6, SETTAXL+5, SETTAXL+6, SETTAXL+13, SETTAXL+15, TAXREAD+5, TAXREAD+6, TAXREAD+13, TAXREAD+15
, SET+2, SET+4
X APCLP16+5*, OPT+1~, OPT+2*, OPT+3, OPT+4*, OPT+5*, OPT+6, OPT+7*, OPT+8, OPT+9*
, OPT+10, OPT+11*, OPT+12, OPT+13*, OPT+14, OPT+15*, OPT+16, WRITEMSG+1*, WRITEMSG+2, WRITEMSG+3
, LAB1+4*, SETTAXL+13*, SETTAXL+16!, INSTALLD+3~, INSTALLD+4*, INSTALLD+8*, INSTALLD+11*, SORRY~, SORRY+2, SORRY+3
, TAXREAD+13*, TAXREAD+16!, SET+1*, SET+2, SET+4
XMDUZ OPT+24~, SENDER*
XMSUB OPT+24~, SUBJECT*
XMTEXT OPT+24~, SENDER+1*
XMY OPT+24~
XMY( SENDER+1*, GETRECIP+4*
XMY(1 SENDER+1*
>> XPDDIQ( APCLP16+5*
>> XPDQUIT SORRY+2*, SORRY+3*
Y WRITEMSG+3*, GETRECIP+4*, LAB1+5, LAB1+6, SETTAXL+15, SETTAXL+16!, INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10
, INSTALLD+11, INSTALLD+13, IMES+1, TAXREAD+15, TAXREAD+16!, SET+2*, SET+4

Marked Items

Name Field # of Occurrence
$T(@APCLTEXT+APCLX SETTAXL+2, 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 |  Naked Globals |  Local Variables |  Marked Items |  All