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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ACMGTP

Package: Case Management System

Routine: ACMGTP


Information

ACMGTP ; IHS/TUCSON/TMJ - LOOKUP AND EDIT OF CMS REGISTER ; [ 02/10/2009 9:47 AM ]

Source Information

Source file <ACMGTP.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Case Management System 5 ^ACMCTRL  (NAMEREX,SECMSG)^ACMGTP1  ^ACMHELP  DECEASED^ACMLPAT  HEAD^ACMMENU  
VA Fileman 5 ^DIC  WAIT^DICD  FILE^DICN  ^DIE  ^DIR  
Kernel 1 ^%ZTLOAD  

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Case Management System 5 ACMADDM  ACMADDP  ACMDELPT  ACMDELRG  ACMTRANS  
Diabetes Registry 2 BDMFUTIL  BDMVRL6  
PCC Medical Query 1 AMQQREG  

Entry Points

Name Comments DBIA/ICR reference
SECMSG ;
RGTP ;EP;TO SELECT AND CREATE A REGISTER
ALL
EN ;PEP - SELECT AND CREATE A REGISTER
SLCT
DIE
RGTPA
DECEASED(ACMRGDA) ;PEP;PUBLISHED ENTRY POINT TO CHECK REGISTER PATIENTS FOR ;IHS/CIM/THL PATCH 5
DEC1 ;PEP;TO CHECK FOR DECEASED PATIENTS
DIC
RGTPX ;EP;SELECT/CREATE REG W/O HEADER
SET
EXIT
LOOP
USR1
RGTP2
SLCT1
RGTP1
NAMEREX ;
SELECT
USER

External References

Name Field # of Occurrence
^%ZTLOAD DECEASED+11
^ACMCTRL RGTP1+12
NAMEREX^ACMGTP1 NAMEREX+1
SECMSG^ACMGTP1 SECMSG+1
^ACMHELP SLCT1+5
DECEASED^ACMLPAT DEC1+7
HEAD^ACMMENU RGTP+1, SELECT, USER
^DIC DIC
WAIT^DICD LOOP+1, ALL
FILE^DICN SET+5
^DIE DIE
^DIR SLCT1+2, SLCT1+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?80-$L(ACMX)\2,ACMX,!
  • Line Location: RGTPX+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: SELECT+1
Function Call: WRITE
  • Prompt: ?37,"<**"
  • Line Location: SELECT+9
Function Call: WRITE
  • Prompt: ?37,"<=="
  • Line Location: SELECT+10
Function Call: WRITE
  • Prompt: ?68,"<**"
  • Line Location: SELECT+16
Function Call: WRITE
  • Prompt: ?68,"<=="
  • Line Location: SELECT+17
Function Call: WRITE
  • Prompt: !?10
  • Line Location: SELECT+19
Function Call: WRITE
  • Prompt: ?45
  • Line Location: SELECT+20
Function Call: WRITE
  • Prompt: $J(ACMU1,3)_")"," All data types"
  • Line Location: SELECT+21
Function Call: WRITE
  • Prompt: !!,?12,"<** Indicates automatic selection of Register Component"
  • Line Location: SELECT+22
Function Call: WRITE
  • Prompt: !!
  • Line Location: SLCT1+1
Function Call: WRITE
  • Prompt: !!?10,"'<==' indicates option already selected for this register.",!?10,"To select several data types separate them with commas.",!?10,"For example: ==> 1,3,7,9"
  • Line Location: SLCT1+6
Function Call: WRITE
  • Prompt: !
  • Line Location: SLCT1+10
Function Call: WRITE
  • Prompt: !
  • Line Location: LOOP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: LOOP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ALL+0
Function Call: WRITE
  • Prompt: !
  • Line Location: ALL+0
Function Call: WRITE
  • Prompt: !?80-$L(ACMX)\2,ACMX,!!
  • Line Location: USER+2
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),?20,"You are NOT the Creator of this Register",!,?19,"Therefore, you cannot Add Users!",!!
  • Line Location: USER+7
Function Call: WRITE
  • Prompt: !,"Contact the Register Developer- "_ACMRDEV_" -for more information.",!!
  • Line Location: USER+8
Function Call: WRITE
  • Prompt: !!!,$C(7),$C(7),?5,"You are NOT the Creator of this Register; therefore, you cannot Add Users!",!!
  • Line Location: USER+9
Function Call: WRITE
  • Prompt: !
  • Line Location: USER+12
Function Call: WRITE
  • Prompt: !?14
  • Condition for execution: ACMU1#2=1
  • Line Location: USR1+2
Function Call: WRITE
  • Prompt: ?45
  • Condition for execution: ACMU1#2=0
  • Line Location: USR1+2
Function Call: WRITE
  • Prompt: ACMY
  • Line Location: USR1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DIC+0
Function Call: WRITE
  • Prompt: !!,"Register being checked to update status of deceased patients."
  • Line Location: DECEASED+5
Routine Call
  • DIE
  • Line Location:
    • DIE
Routine Call
  • DIC
  • Line Location:
    • DIC
Routine Call
  • DIR
  • Line Location:
    • SLCT1+2
    • SLCT1+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ACM(41.1 - [#9002241.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACM(41 - [#9002241] DECEASED+4, DEC1+4, DEC1+5
^ACM(41.1 - [#9002241.1] RGTPX+9, RGTPA, RGTP1+8, RGTP2, RGTP2+2, RGTP2+3, RGTP2+5, SELECT+10, SELECT+17, SET+4*
, USER+5, USER+7, USER+8, USER+10
^ACM(56 - [#9002256] SELECT+4
^DPT - [#2] DEC1+6
^VA(200 - [#200] USER+6, USR1, USR1+1

Label References

Name Line Occurrences
ALL SLCT1+15
DECEASED RGTP1+9
DIC RGTP1+6
DIE RGTP2+4, SET+6
EN RGTP2+7
EXIT RGTPX+11
NAMEREX RGTP2+6
RGTP EN+1
RGTP1 RGTPX+11
RGTPA RGTPX+9
SECMSG RGTP2+2
SELECT SLCT
SET LOOP+2, ALL+1
SLCT RGTP2+8
USER RGTP2
USR1 USER+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACM EXIT!, SELECT+6*, SELECT+7, SELECT+11
>> ACMCNT LOOP*, LOOP+2
ACMDA DEC1+2~, DEC1+3*, DEC1+4*, DEC1+5, DEC1+7
>> ACMDELRG RGTP1+11
>> ACMEP RGTP1+12*
>> ACMES RGTP1+12*
ACMI EXIT!, RGTPX+10!
ACMJ EXIT!, RGTPX+9*, RGTPX+10!
>> ACMLI LOOP+2*
ACMNEWN EXIT!, RGTP2+5*, RGTP2+6
ACMOLDN EXIT!, RGTP2+3*, RGTP2+6
>> ACMPP RGTP1+12*
ACMQK EXIT!, SLCT1+4*, SLCT1+5, SLCT1+8, SLCT1+13*, SLCT1+14*, SLCT1+15, LOOP, LOOP+2*, SET
, SET+2, ALL+1*
>> ACMQK1 LOOP*, LOOP+2
ACMQKI EXIT!
ACMQUIT EXIT!, EXIT+1!, RGTP1+7*, RGTP2+1, RGTP2+2*, RGTP2+7!, RGTP2+8, SLCT, SLCT+1!, SLCT1+3*
, SLCT1+12*, USER+8*
>> ACMRDEV USER+5*, USER+6*, USER+8
ACMRG EXIT+2!, RGTPX+10!, RGTPA*, RGTP1+7!, RGTP1+8*, RGTP2, RGTP2+2, RGTP2+3, RGTP2+5, SELECT+10
, SELECT+17, SET+2, SET+3, SET+4, USER+5, USER+7, USER+8, USER+10
ACMRGCUS EXIT!, RGTPX+3!, RGTPX+5!, RGTPX+6, RGTP1+1*, RGTP2+8
ACMRGDA DECEASED~, DECEASED+3, DECEASED+4, DEC1+1, DEC1+4
ACMRGMGR EXIT!, RGTPX+3!, RGTPX+4, RGTPX+5!, RGTP1+3*, RGTP2
ACMRGNA EXIT+2!, RGTP1+7!, RGTP1+8*
ACMRGTP EXIT+2, RGTPX+3, RGTPX+4!, RGTPX+5!, RGTPX+6!, RGTPA+1, RGTPA+2, RGTPA+3, RGTP1+2, RGTP1+5
, RGTP1+11*, RGTP1+12, RGTP2
ACMRGUSR EXIT!, RGTPX+3!, RGTPX+4!, RGTPX+5, RGTPX+6!, RGTP1*, RGTP2, RGTP2+1, RGTP2+7
ACMRGX RGTPX+8*, RGTPX+9*, RGTPX+10!, RGTPA
ACMRGX(3 RGTPX+7*, RGTPA+1
ACMRGX(4 RGTPX+7*, RGTPA+2
ACMRGX(5 RGTPX+7*, RGTPA+3
>> ACMTRN RGTP1+10, RGTP1+12
ACMU1 EXIT!, SELECT+2*, SELECT+4*, SELECT+5, SELECT+7*, SELECT+8, SELECT+9, SELECT+11*, SELECT+13*, SELECT+14
, SELECT+15, SELECT+16, SELECT+18*, SELECT+19, SELECT+21, SLCT1+9, SLCT1+15, SET, ALL+1, USER+10*
, USER+11!, USR1+2
ACMU11 EXIT!, SELECT+5*, SELECT+6, SELECT+11
ACMX EXIT!, RGTPX+1*, RGTPX+2, SELECT+2*, SELECT+4*, USER+1*, USER+2, USER+3*, USER+10*, USER+11!
, USR1, USR1+1
ACMX( SELECT+4*, SELECT+8, SELECT+9, SELECT+15, SELECT+16
ACMY EXIT!, SELECT+4*, SELECT+7*, SELECT+10, SELECT+14*, SELECT+17, USER+11!, USR1+1*, USR1+2
ACMZ EXIT+1!
ACMZ( SELECT+4*, SELECT+7, SELECT+13, SELECT+14, SET+2
ACMZZDIC RGTP1+5*, RGTP1+6!
DA RGTP1+8*, SET+2*, DIE!
DA(1 SET+2*
DD SET+3!, SET+5!, DIC!
DFN DEC1+2~, DEC1+5*, DEC1+6, DEC1+7
DIC RGTP1+4*, SET+3!*, SET+5!, DIC!, DIE!
DIC("A" RGTP1+4*
DIC("S" RGTP1+5*
DIC(0 RGTP1*, RGTP1+1*, RGTP1+2*, RGTP1+3*, SET+3*
DIE RGTP1+4*, SET+3*, DIE!
>> DINUM SET+2*
DIR SLCT1+2!, SLCT1+11!
DIR("?" SLCT1*, SLCT1+9*
DIR("A" SLCT1*, SLCT1+9*
DIR(0 SLCT1*, SLCT1+9*
DLAYGO RGTP1+3*, DIC!
DO SET+5!
DR RGTP2*, SLCT1+7!, SLCT1+8*, SET+5!, SET+6, DIC!
DUZ RGTP1, RGTP1+1, RGTP1+3, RGTP2+2, USER+7, USER+8
U RGTP1+7, RGTP1+8, RGTP2+2, RGTP2+3, RGTP2+5, SELECT+4, SLCT1+3, SLCT1+12, USER+5, USER+6
, USER+7, USER+8, USR1+1, DEC1+5
>> X RGTP1+7, SLCT1+3, SLCT1+12, SET+2*
>> XQUIT RGTP1+7*
>> Y RGTP1+7, RGTP1+8, RGTP1+9, SLCT1+4, SLCT1+13
>> ZTDESC DECEASED+10*
>> ZTDTH DECEASED+8*
>> ZTIO DECEASED+9*
>> ZTRTN DECEASED+6*
>> ZTSAVE("ACM*" DECEASED+7*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All