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: ACMGTPZ

Package: Case Management System

Routine: ACMGTPZ


Information

ACMGTPZ ; IHS/TUCSON/TMJ - LOOKUP & EDIT REGISTER W/O SCREEN ;

Source Information

Source file <ACMGTPZ.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 5 ^DIC  WAIT^DICD  FILE^DICN  ^DIE  ^DIR  
Case Management System 2 ^ACMCTRL  HEAD^ACMMENU  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Case Management System 1 ACMDALLR  

Entry Points

Name Comments DBIA/ICR reference
RGTP ;EP;TO SELECT AND CREATE A REGISTER
ALL
EN
SLCT
DIE
RGTPA
DIC
RGTPX ;EP;TO SELECT AND CREATE A REGISTER WITHOUT GETTING HEADER
SET
EXIT
LOOP
USR1
RGTP2
SLCT1
RGTP1
SELECT
USER

External References

Name Field # of Occurrence
^ACMCTRL RGTP1+11
HEAD^ACMMENU RGTP+1, SELECT, USER
^DIC DIC
WAIT^DICD LOOP+1, ALL
FILE^DICN SET+5
^DIE DIE
^DIR SLCT1+2, SLCT1+10

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: ?68,"<=="
  • Line Location: SELECT+15
Function Call: WRITE
  • Prompt: !?10
  • Line Location: SELECT+17
Function Call: WRITE
  • Prompt: ?45
  • Line Location: SELECT+18
Function Call: WRITE
  • Prompt: $J(ACMU1,3)_")"," All data types"
  • Line Location: SELECT+19
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+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SLCT1+9
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: !
  • Line Location: USER+6
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
Routine Call
  • DIE
  • Line Location:
    • DIE
Routine Call
  • DIC
  • Line Location:
    • DIC
Routine Call
  • DIR
  • Line Location:
    • SLCT1+2
    • SLCT1+10

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.1 - [#9002241.1] RGTPX+9, RGTPA, RGTP1+8, RGTP2, SELECT+9, SELECT+15, SET+4*, USER+4
^ACM(56 - [#9002256] SELECT+4
^VA(200 - [#200] USR1, USR1+1

Label References

Name Line Occurrences
ALL SLCT1+14
DIC RGTP1+6
DIE RGTP2, SET+6
EXIT RGTPX+11
RGTP EN
RGTP1 RGTPX+11
RGTPA RGTPX+9
SELECT SLCT
SET LOOP+2, ALL+1
SLCT RGTP2+1
USER RGTP2
USR1 USER+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACM EXIT!, SELECT+6*, SELECT+7, SELECT+10
>> ACMCNT LOOP*, LOOP+2
>> ACMDELRG RGTP1+10
>> ACMEP RGTP1+11*
>> ACMES RGTP1+11*
ACMI EXIT!, RGTPX+10!
ACMJ EXIT!, RGTPX+9*, RGTPX+10!
>> ACMLI LOOP+2*
>> ACMPP RGTP1+11*
ACMQK EXIT!, SLCT1+4*, SLCT1+7, SLCT1+12*, SLCT1+13*, SLCT1+14, LOOP, LOOP+2*, SET, SET+2
, ALL+1*
>> ACMQK1 LOOP*, LOOP+2
ACMQKI EXIT!
ACMQUIT EXIT+1!, RGTP1+7*, RGTP2+1, SLCT, SLCT+1!, SLCT1+3*, SLCT1+11*
ACMRG EXIT+2!, RGTPX+10!, RGTPA*, RGTP1+7!, RGTP1+8*, RGTP2, SELECT+9, SELECT+15, SET+2, SET+3
, SET+4, USER+4
ACMRGCUS EXIT!, RGTPX+3!, RGTPX+5!, RGTPX+6, RGTP1+1*, RGTP2+1
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+2, RGTPA+3, RGTP1+2, RGTP1+5, RGTP1+10*
, RGTP1+11, RGTP2
ACMRGUSR EXIT!, RGTPX+3!, RGTPX+4!, RGTPX+5, RGTPX+6!, RGTP1*, RGTP2
ACMRGX RGTPX+8*, RGTPX+9*, RGTPX+10!, RGTPA
ACMRGX(3 RGTPX+7*
ACMRGX(4 RGTPX+7*, RGTPA+2
ACMRGX(5 RGTPX+7*, RGTPA+3
>> ACMTRN RGTP1+9, RGTP1+11
ACMU1 EXIT!, SELECT+2*, SELECT+4*, SELECT+5, SELECT+7*, SELECT+8, SELECT+10*, SELECT+12*, SELECT+13, SELECT+14
, SELECT+16*, SELECT+17, SELECT+19, SLCT1+8, SLCT1+14, SET, ALL+1, USER+4*, USER+5!, USR1+2
ACMU11 EXIT!, SELECT+5*, SELECT+6, SELECT+10
ACMX EXIT!, RGTPX+1*, RGTPX+2, SELECT+2*, SELECT+4*, USER+1*, USER+2, USER+3*, USER+4*, USER+5!
, USR1, USR1+1
ACMX( SELECT+4*, SELECT+8, SELECT+14
ACMY EXIT!, SELECT+4*, SELECT+7*, SELECT+9, SELECT+13*, SELECT+15, USER+5!, USR1+1*, USR1+2
ACMZ EXIT+1!
ACMZ( SELECT+4*, SELECT+7, SELECT+12, SELECT+13, SET+2
DA RGTP1+8*, SET+2*, DIE!
DA(1 SET+2*
DD SET+3!, SET+5!, DIC!
DIC RGTP1+4*, SET+3!*, SET+5!, DIC!, DIE!
DIC("A" RGTP1+4*
DIC(0 RGTP1*, RGTP1+1*, RGTP1+2*, RGTP1+3*, SET+3*
DIC(1 RGTP1+5*
DIE RGTP1+4*, SET+3*, DIE!
>> DINUM SET+2*
DIR SLCT1+2!, SLCT1+10!
DIR("?" SLCT1*, SLCT1+8*
DIR("A" SLCT1*, SLCT1+8*
DIR(0 SLCT1*, SLCT1+8*
DO SET+5!
DR RGTP2*, SLCT1+6!, SLCT1+7*, SET+5!, SET+6, DIC!
DUZ RGTP1, RGTP1+1, RGTP1+3
U RGTP1+7, RGTP1+8, SLCT1+3, SLCT1+11, USR1+1
>> X RGTP1+7, SLCT1+3, SLCT1+11, SET+2*
>> XQUIT RGTP1+7*
>> Y RGTP1+7, RGTP1+8, SLCT1+4, SLCT1+12
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