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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: DGRP3

Package: Registration

Routine: DGRP3


Information

DGRP3 ;ALB/MRL,JAM - REGISTRATION SCREEN 3/CONTACT INFORMATION ;06 JUN 88@2300

Source Information

Source file <DGRP3.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Registration 3 ^DGRPP  (AL,H)^DGRPU  (WW,WW1)^DGRPV  

Entry Points

Name Comments DBIA/ICR reference
Q
SET
AW ;W !?4,"Relation: ",$E($P(X,"^",2),1,25),?43,"Relation: ",$E($P(X1,"^",2),1,25) F I=0:0 S I=$O(DGA(I)) Q:'I S Z=$E(DGA(I),1,27) S:(I#2) Z=" "_Z W:(I#2)!($X>50) ! W:(I#2) Z I '(I#2) W ?53,Z
; DG*5.3*997;jam; address fields have been expanded 10 chars - move the address lines output over 10 spaces to accommodate this

External References

Name Field # of Occurrence
^DGRPP Q+1
AL^DGRPU DGRP3+7, DGRP3+11, DGRP3+15
H^DGRPU DGRP3+5
WW^DGRPV DGRP3+9, DGRP3+13, DGRP3+15
WW1^DGRPV DGRP3+9, DGRP3+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " NOK: "
  • Line Location: DGRP3+9
Function Call: WRITE
  • Prompt: " NOK-2: ",$E($P(X1,"^",1),1,25)
  • Line Location: DGRP3+9
Function Call: WRITE
  • Prompt: " E-Cont.: "
  • Line Location: DGRP3+13
Function Call: WRITE
  • Prompt: " E2-Cont.: ",$E($P(X1,"^",1),1,25)
  • Line Location: DGRP3+13
Function Call: WRITE
  • Prompt: " Designee: ",$E($P(X,"^",1),1,25),?50,"Relation: ",$E($P(X,"^",2),1,25)
  • Line Location: DGRP3+15
Function Call: WRITE
  • Prompt: !,Z
  • Line Location: DGRP3+17
Function Call: WRITE
  • Prompt: !?7,"Phone: ",$P(X,"^",3),?41,"Work Phone: ",$P(X,"^",4)
  • Line Location: DGRP3+18
Function Call: WRITE
  • Prompt: ?53,Z
  • Line Location: AW+0
Function Call: WRITE
  • Prompt: !?4,"Relation: ",$E($P(X,"^",2),1,25),?43,"Relation: ",$E($P(X1,"^",2),1,25)
  • Line Location: AW+2
Function Call: WRITE
  • Prompt: ?43,Z
  • Line Location: AW+2
Function Call: WRITE
  • Prompt: !?7,"Phone: ",$P(X,"^",3),?46,"Phone: ",$P(X1,"^",3)
  • Line Location: AW+3
Function Call: WRITE
  • Prompt: !?2,"Work Phone: ",$P(X,"^",4),?41,"Work Phone: ",$P(X1,"^",4)
  • Line Location: AW+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] DGRP3+5

Label References

Name Line Occurrences
AW DGRP3+9, DGRP3+13
SET DGRP3+8, DGRP3+12, DGRP3+15

Naked Globals

Name Field # of Occurrence
^( DGRP3+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN DGRP3+5
DGA DGRP3+15!, AW+5!
DGA( DGRP3+17, AW+2
>> DGA1 DGRP3+7*, DGRP3+11*, DGRP3+15*
>> DGA2 DGRP3+7*, DGRP3+11*, DGRP3+15*
>> DGAD DGRP3+7*, DGRP3+11*, DGRP3+15*
>> DGRP( DGRP3+5*, DGRP3+7, DGRP3+11, DGRP3+15, SET+1
DGRPI DGRP3+8*, DGRP3+12*, DGRP3+15*, Q!, SET+1
DGRPI1 DGRP3+8*, DGRP3+12*, DGRP3+15*, Q!, SET+2
>> DGRPS DGRP3+5*
>> DGRPU SET
>> DGRPW DGRP3+5*, DGRP3+9*, DGRP3+11*, DGRP3+13*, DGRP3+15*
DGRPX SET*, SET+1*, SET+2, SET+3!
DGRPX1 SET+1*, SET+3!
>> I DGRP3+5*, DGRP3+17*, AW+2*
>> X DGRP3+9, DGRP3+13, DGRP3+15, DGRP3+18, AW+2, AW+3, AW+4
>> X1 DGRP3+9, DGRP3+13, AW+2, AW+3, AW+4
>> Z DGRP3+9*, DGRP3+13*, DGRP3+15*, DGRP3+17*, AW+2*
>> Z1 DGRP3+9*, DGRP3+13*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All