Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ACMRL2

Package: Case Management System

Routine: ACMRL2


Information

ACMRL2 ; IHS/TUCSON/TMJ - CONT OF ACMRL ; [ 06/01/1999 1:37 PM ]

Source Information

Source file <ACMRL2.m>

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Case Management System 1 ACMRL3  

Entry Points

Name Comments DBIA/ICR reference
PMENU ;EP
RMENU ;EP - SORT MENU
SMENU ;EP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"REGISTER: ",$P(^ACM(41.1,ACMRG,0),U)," USER: ",$E($P(^VA(200,DUZ,0),U),1,15),!
  • Line Location: PMENU+3
Function Call: WRITE
  • Prompt: ?((80-$L(ACMLHDR))/2),ACMLHDR,!
  • Line Location: PMENU+4
Function Call: WRITE
  • Prompt: "The following data items can be printed. You can use up to 132 characters.",!,"Choose the data items in the order you want them printed.",!
  • Line Location: PMENU+5
Function Call: WRITE
  • Prompt: "The following data items can be selected to be output to a '^' delimited file.",!,"Choose the data items in the order you want them to be output.",!
  • Line Location: PMENU+6
Function Call: WRITE
  • Prompt: ?15,"Total Report width (including column margins - 2 spaces): ",ACMTCW
  • Line Location: PMENU+7
Function Call: WRITE
  • Prompt: ?26,J,") ",$S($P(^ACM(58.1,ACMSEL(J),0),U,12)="":$E($P(^ACM(58.1,ACMSEL(J),0),U),1,20),1:$P(^(0),U,12))
  • Line Location: PMENU+17
Function Call: WRITE
  • Prompt: ?53,K,") ",$S($P(^ACM(58.1,ACMSEL(K),0),U,12)="":$E($P(^ACM(58.1,ACMSEL(K),0),U),1,20),1:$P(^(0),U,12))
  • Line Location: PMENU+18
Function Call: WRITE
  • Prompt: !?7,"<Enter a list or a range. E.g. 1-4,5,18 or 10,12,18,30>"
  • Line Location: PMENU+19
Function Call: WRITE
  • Prompt: !?7,"<<HIT RETURN to conclude selections or '^' to exit>>"
  • Line Location: PMENU+20
Function Call: WRITE
  • Prompt: !,"REGISTER: ",$P(^ACM(41.1,ACMRG,0),U)," USER: ",$E($P(^VA(200,DUZ,0),U),1,15)
  • Line Location: SMENU+4
Function Call: WRITE
  • Prompt: !!,"The Patients displayed can be SEARCHED based on any of the following criteria:",!
  • Line Location: SMENU+5
Function Call: WRITE
  • Prompt: ?28,J,") ",$S($P(^ACM(58.1,ACMSEL(J),0),U,12)="":$E($P(^ACM(58.1,ACMSEL(J),0),U),1,20),1:$P(^(0),U,12))
  • Line Location: SMENU+14
Function Call: WRITE
  • Prompt: ?55,K,") ",$S($P(^ACM(58.1,ACMSEL(K),0),U,12)="":$E($P(^ACM(58.1,ACMSEL(K),0),U),1,20),1:$P(^(0),U,12))
  • Line Location: SMENU+15
Function Call: WRITE
  • Prompt: !!?9,"<Enter a list or a range. E.g. 1-4,5,20 or 10,12,20,30>"
  • Line Location: SMENU+16
Function Call: WRITE
  • Prompt: !?9,"<<HIT RETURN to conclude selections or bypass screens>>"
  • Line Location: SMENU+17
Function Call: WRITE
  • Prompt: !,"REGISTER: ",$P(^ACM(41.1,ACMRG,0),U)," USER: ",$E($P(^VA(200,DUZ,0),U),1,15)
  • Line Location: RMENU+3
Function Call: WRITE
  • Prompt: !!,"The Patients displayed can be SORTED by any one of the following:",!
  • Line Location: RMENU+4
Function Call: WRITE
  • Prompt: ?40,J,") ",$P(^ACM(58.1,ACMSEL(J),0),U)
  • Line Location: RMENU+7
Function Call: WRITE
  • Prompt: !!,"<<If you don't select a sort criteria the report will be sorted by Patient Name.>>"
  • Line Location: RMENU+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACM(41.1 - [#9002241.1] PMENU+3, SMENU+4, RMENU+3
^ACM(58.1 - [#9002258.1] PMENU+8, PMENU+9, PMENU+10, PMENU+11, PMENU+16, PMENU+17, PMENU+18, SMENU+6, SMENU+7, SMENU+8
, SMENU+13, SMENU+14, SMENU+15, RMENU+5, RMENU+7
^VA(200 - [#200] PMENU+3, SMENU+4, RMENU+3

Naked Globals

Name Field # of Occurrence
^(0 PMENU+10, PMENU+16, PMENU+17, PMENU+18, SMENU+8, SMENU+13, SMENU+14, SMENU+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACMCTRLP PMENU+10, SMENU+8
>> ACMCTYP PMENU+5, PMENU+6, PMENU+7, PMENU+11
>> ACMCUT PMENU+14*, PMENU+17, PMENU+18, SMENU+11*, SMENU+14, SMENU+15, RMENU+6*, RMENU+7
ACMDISP PMENU+1!, SMENU+1!, RMENU+1!
ACMDISP( PMENU+15, PMENU+16*, PMENU+17*, PMENU+18*, SMENU+12, SMENU+13*, SMENU+14*, SMENU+15*, RMENU+7*
ACMHIGH PMENU+1!, PMENU+8*, PMENU+12*, PMENU+14, SMENU+1!, SMENU+6*, SMENU+9*, SMENU+11, RMENU+1!, RMENU+5*
, RMENU+6
>> ACMLHDR PMENU+4*
>> ACMRG PMENU+3, SMENU+4, RMENU+3
ACMSEL PMENU+1!, SMENU+1!, RMENU+1!
ACMSEL( PMENU+12*, PMENU+15, PMENU+16, PMENU+17, PMENU+18, SMENU+9*, SMENU+12, SMENU+13, SMENU+14, SMENU+15
, RMENU+5*, RMENU+7
>> ACMTCW PMENU+7
DUZ PMENU+3, SMENU+4, RMENU+3
>> I PMENU+15*, PMENU+16, PMENU+17, SMENU+12*, SMENU+13, SMENU+14, RMENU+7*
IOF PMENU+2, SMENU+2, SMENU+3, RMENU+2
IOSL SMENU+2
>> J PMENU+15*, PMENU+17*, PMENU+18, SMENU+12*, SMENU+14*, SMENU+15, RMENU+7*
>> K PMENU+15*, PMENU+18*, SMENU+12*, SMENU+15*, RMENU+7*
U PMENU+3, PMENU+9, PMENU+10, PMENU+11, PMENU+16, PMENU+17, PMENU+18, SMENU+4, SMENU+7, SMENU+8
, SMENU+13, SMENU+14, SMENU+15, RMENU+3, RMENU+5, RMENU+7
>> X PMENU+8*, SMENU+6*, RMENU+5*
>> Y PMENU+8*, PMENU+9, PMENU+10, PMENU+11, PMENU+12, SMENU+6*, SMENU+7, SMENU+8, SMENU+9
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All