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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: DGPMGL5

Package: Registration

Routine: DGPMGL5


Information

DGPMGL5 ;ALB/MRL - G&L PARAMETER ENTRY/EDIT; 29 APR 2003

Source Information

Source file <DGPMGL5.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 DT^DICRW  ^DIE  ^DIR  
Kernel 1 ^%ZIS  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGPM G&L PARAMETER EDIT  

Entry Points

Name Comments DBIA/ICR reference
EN ;
DIS ; -- display params
ASK ;
EDIT ; -- edit params

External References

Name Field # of Occurrence
^%ZIS DIS+2
DT^DICRW DIS+1
^DIE EDIT+1
^DIR ASK+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!?27,"ENTER/EDIT G&L PARAMETERS",!
  • Line Location: DIS+3
Function Call: WRITE
  • Prompt: I
  • Line Location: DIS+3
Function Call: WRITE
  • Prompt: !,"G&L Initialization Date",?43,": "
  • Line Location: DIS+4
Function Call: WRITE
  • Prompt: $S(Y]"":Y,1:"NOT SPECIFIED")
  • Line Location: DIS+4
Function Call: WRITE
  • Prompt: !,"TSR Initialization Date",?43,": "
  • Line Location: DIS+5
Function Call: WRITE
  • Prompt: $S(Y]"":Y,1:"NOT SPECIFIED")
  • Line Location: DIS+5
Function Call: WRITE
  • Prompt: !,"SSN Format",?43,": DISPLAY ",$S($P(DGPM,"^",2)=6:"LAST FOUR ONLY",$P(DGPM,"^",2)=1:"ENTIRE SSN",1:"FORMAT UNSPECIFIED")
  • Line Location: DIS+6
Function Call: WRITE
  • Prompt: !,"Means Test Copay Applicability Display",?43,": ",$S($P(DGPM,"^",3):"YES",1:"NO")
  • Line Location: DIS+7
Function Call: WRITE
  • Prompt: !,"Patient's Treating Specialty (Display)",?43,": ",$S($P(DGPM,"^",4):"YES",1:"NO")
  • Line Location: DIS+8
Function Call: WRITE
  • Prompt: !,"Show Non-Movements on G&L",?43,": ",$S($P(DGPM,"^",6):"YES",1:"NO")
  • Line Location: DIS+10
Function Call: WRITE
  • Prompt: !,"Recalculate From (Earliest Date to Recalc)",?43,": "
  • Line Location: DIS+11
Function Call: WRITE
  • Prompt: $S(Y]"":Y,1:"UNSPECIFIED")
  • Line Location: DIS+11
Function Call: WRITE
  • Prompt: !,"Count Vietnam Vets Remaining",?43,": ",$S($P(DGPM,"^",8):"YES",1:"NO")
  • Line Location: DIS+12
Function Call: WRITE
  • Prompt: !,"Count Over 65'S Remaining (patients>65 y/o)",?43,": ",$S($P(DGPM,"^",9):"YES",1:"NO")
  • Line Location: DIS+13
Function Call: WRITE
  • Prompt: !,"Days to Maintain G&L Corrections",?43,": ",$S($D(^DG(43,1,0)):+$P(^(0),U,29),1:0)
  • Line Location: DIS+15
Function Call: WRITE
  • Prompt: !,I
  • Line Location: DIS+16
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+1
Routine Call
  • %ZIS
  • Line Location:
    • DIS+2
Routine Call
  • DIE
  • Line Location:
    • EDIT+1
Routine Call
  • DIR
  • Line Location:
    • ASK+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(43 - [#43] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" DIS+4, DIS+5, DIS+11
^DG(43 - [#43] DIS+1, DIS+15

Label References

Name Line Occurrences
ASK EN+1
DIS EN+1
EDIT EN+2
EN EN+2

Naked Globals

Name Field # of Occurrence
^("G" DIS+1
^(0 DIS+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EDIT+1*, EDIT+2!
DE EDIT+2!
DG EDIT+2!
DGPM DIS+1*, DIS+4, DIS+5, DIS+6, DIS+7, DIS+8, DIS+10, DIS+11, DIS+12, DIS+13
, DIS+17!
DIE EDIT+1*, EDIT+2!
DIR ASK+5!
DIR("?" ASK+2*, ASK+3*, ASK+4*
DIR("A" ASK+1*
DIR("B" ASK+1*
DIR(0 ASK+1*
DQ EDIT+2!
DR EDIT+1*, EDIT+2!
I DIS+3!*, DIS+16!*, DIS+17!
IOF DIS+3
IOP DIS+2*!
U DIS+1*, DIS+15
>> Y EN+2, DIS+4*, DIS+5*, DIS+11*
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 |  Naked Globals |  Local Variables  | All