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

Package: Registration

Routine: DGPFLMA3


Information

DGPFLMA3 ;ALB/KCL - PRF ASSIGNMENT LM PROTOCOL ACTIONS CONT. ; 6/2/05 3:24pm

Source Information

Source file <DGPFLMA3.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
Registration 9 ($$GETASGN,$$STOALL)^DGPFAA  $$EDTOK^DGPFAA2  ($$GETRDT,$$LOCK,UNLOCK)^DGPFAA3  $$SNDORU^DGPFHLS  BLDLIST^DGPFLMU  $$P2ON^DGPFPARM  ($$ANSWER,$$CKWP,$$CONTINUE)^DGPFUT  REVIEW^DGPFUT3  
($$DBRSEDIT,EIE)^DGPFUT6  
VA FileMan 4 (BLD,MSG)^DIALOG  $$OREF^DILF  $$GET1^DIQ  EN^DIWE  
List Manager 2 (FULL,PAUSE)^VALM1  EN^VALM2  
Kernel 1 ($$FMTE,$$NOW)^XLFDT  

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 DGPF EDIT ASSIGNMENT  

Entry Points

Name Comments DBIA/ICR reference
EF ;Entry point for DGPF EDIT ASSIGNMENT action protocol.
BEH() ;
EIE() ; was this action ENTERED IN ERROR
EIEARR ;
; Reset DGPFA() and DGPFAH() for DBRS EIE action

External References

Name Field # of Occurrence
$$GETASGN^DGPFAA EF+63
$$STOALL^DGPFAA EF+224
$$EDTOK^DGPFAA2 EF+75
$$GETRDT^DGPFAA3 EF+194
$$LOCK^DGPFAA3 EF+53
UNLOCK^DGPFAA3 EF+239
$$SNDORU^DGPFHLS EF+229
BLDLIST^DGPFLMU EF+235
$$P2ON^DGPFPARM EF+89
$$ANSWER^DGPFUT EF+98, EF+119, EF+160, EF+204, EF+220
$$CKWP^DGPFUT EF+132, EF+175
$$CONTINUE^DGPFUT EF+135, EF+147, EF+179
REVIEW^DGPFUT3 EF+215
$$DBRSEDIT^DGPFUT6 EF+110
EIE^DGPFUT6 EF+218
BLD^DIALOG EF+36
MSG^DIALOG EF+37, EF+77
$$OREF^DILF EF+126, EF+169
$$GET1^DIQ EF+125
EN^DIWE EF+131, EF+174
FULL^VALM1 EF+30
PAUSE^VALM1 EF+38, EF+55, EF+65, EF+72, EF+78, EF+233
EN^VALM2 EF+43
$$FMTE^XLFDT EF+202
$$NOW^XLFDT EF+190

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: EF+37
Function Call: WRITE
  • Prompt: !!,"Record flag assignment currently in use, cannot be edited!"
  • Line Location: EF+54
Function Call: WRITE
  • Prompt: !!,"Unable to retrieve the record flag assignment selected."
  • Line Location: EF+64
Function Call: WRITE
  • Prompt: !!
  • Line Location: EF+69
Function Call: WRITE
  • Prompt: !!,"The URGENT ADDRESS AS FEMALE Flag assignment cannot be edited."
  • Line Location: EF+70
Function Call: WRITE
  • Prompt: !!
  • Line Location: EF+71
Function Call: WRITE
  • Prompt: !!,"Assignment can not be edited..."
  • Line Location: EF+76
Function Call: WRITE
  • Prompt: !,"Assignment Narrative Text is required!"_$C(7)
  • Line Location: EF+133
Function Call: WRITE
  • Prompt: !,DGTX(I)
  • Line Location: EF+134
Function Call: WRITE
  • Prompt: !!,"No editing was found to the Narrative text."
  • Line Location: EF+145
Function Call: WRITE
  • Prompt: !,"For 'Entered in Error' Action, you must edit the Assignment Narrative Text."_$C(7),!
  • Line Location: EF+146
Function Call: WRITE
  • Prompt: !!,"Enter the reason for editing this assignment:"
  • Line Location: EF+168
Function Call: WRITE
  • Prompt: !,"Edit Reason is required!"_$C(7)
  • Line Location: EF+177
Function Call: WRITE
  • Prompt: !,DGTX(I)
  • Line Location: EF+178
Function Call: WRITE
  • Prompt: !,"Updating the patient's record flag assignment..."
  • Line Location: EF+223
Function Call: WRITE
  • Prompt: !?5,X
  • Line Location: EF+226
Function Call: WRITE
  • Prompt: !?5,"Message sent...updating patient's sites of record."
  • Line Location: EF+230
Routine Call
  • DIALOG
  • Line Location:
    • EF+36
Routine Call
  • DIALOG
  • Line Location:
    • EF+37
    • EF+77

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGPF(26.13 - [#26.13] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J EF+58, EF+59

Label References

Name Line Occurrences
$$BEH EF+110, EF+218
$$EIE EF+110, EF+118, EF+144, EF+211, EF+218
EIEARR EF+211

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DGABORT EF+11~, EF+113*, EF+115, EF+118, EF+120*, EF+135*, EF+147*, EF+152, EF+165*, EF+166
EF+179*, EF+184, EF+187
DGAROOT EF+9~, EF+58*, EF+60, EF+125*, EF+126, EF+132, EF+138, EF+142, EF+157
DGASK EF+12~, EF+119*, EF+120, EF+121
DGCODE EF+14~, EF+88*, EF+89*, EF+91*, EF+94*, EF+98
DGCROOT EF+10~, EF+59*, EF+60, EF+169, EF+175, EF+187
DGDFN EF+15~, EF+34, EF+50*, EF+235
DGERR EF+23~
DGETEXT EF+24~, EF+36
DGETEXT(1 EF+34*, EF+35*
DGIEN EF+16~, EF+42*, EF+49*, EF+53, EF+63, EF+125, EF+215, EF+239
DGOK EF+13~, EF+113*, EF+115, EF+138*, EF+141, EF+142*, EF+143, EF+144, EF+148*, EF+155
EF+165*, EF+166, EF+175*
DGPFA EF+17~, EF+63, EF+75, EF+215, EF+224
DGPFA( EIEARR+12!
DGPFA("ACTION" EF+212*
DGPFA("DBRS D ATE" , EIEARR+7
DGPFA("DBRS O THER" , EIEARR+6
DGPFA("DBRS S ITE" , EIEARR+9
DGPFA("DBRS#" EIEARR+4, EIEARR+5
DGPFA("FLAG" EF+68, EF+89, EF+90, EF+194, EF+229, BEH+1
DGPFA("NARR" EF+138, EF+141, EF+142, EF+156!, EF+157*
DGPFA("REVIEWDT" EF+204*, EF+206*, EF+208
DGPFA("STATUS" EF+87, EF+106*, EF+201
DGPFAH EF+18~, EF+215, EF+218, EF+224
DGPFAH("ACTION" EF+100*, EF+105, EF+106, EF+114, EF+200, EF+212, EIE+1
DGPFAH("APPRVBY" EF+160*, EF+161
DGPFAH("ASSIGNDT" EF+190*, EF+194
DGPFAH("COMMENT" EF+187*
DGPFAH("DBRS" EIEARR+3!, EIEARR+10*
DGPFAH("ENTERBY" EF+191*
DGPFERR EF+19~, EF+224
DGQ EF+20~, EF+113*, EF+115, EF+118, EF+121*
DGRDAT EF+21~, EF+194*, EF+201, EF+202, EF+203
DGRESULT EF+22~, EF+224*, EF+225, EF+229
DGSUB EF+25~, EF+140*, EF+141*, EF+142
DGTX EF+116~, EF+132, EF+134, EF+167~, EF+175, EF+178
DGTX( EF+134, EF+178
DGWPROOT EF+8~
DIC EF+8~, EF+126*, EF+167~, EF+169*
DIWESUB EF+8~, EF+128*, EF+167~, EF+171*
DIWETXT EF+8~, EF+127*, EF+167~, EF+170*
DT EF+203
DUZ EF+191
DUZ(2 EF+75
DWLW EF+8~, EF+129*, EF+167~, EF+172*
DWPK EF+8~, EF+130*, EF+167~, EF+173*
I EF+116~, EF+134*, EF+167~, EF+178*, EIEARR+2~, EIEARR+4*, EIEARR+5, EIEARR+6, EIEARR+7, EIEARR+9
J EIEARR+2~, EIEARR+4*, EIEARR+10*
SEL EF+26~, EF+46*, EF+47, EF+49, EF+50
U EF+49, EF+50, EF+90, EF+194, EF+212, BEH+2, EIEARR+5, EIEARR+6, EIEARR+7, EIEARR+8
EIEARR+9
>> VALMAR EF+33, EF+47, EF+49, EF+50
>> VALMBCK EF+39*, EF+42*, EF+242*
VALMY EF+27~
VALMY("" EF+46
X EF+8~, EF+48~, EF+98*, EF+99, EF+100*, EF+225*, EF+226, BEH+1~*, BEH+2, EIEARR+2~
EIEARR+5*, EIEARR+6*, EIEARR+7*, EIEARR+8*, EIEARR+9*, EIEARR+10
XDT EF+202~, EF+203*, EF+204
>> XQORNOD(0 EF+43, EF+215
>> XQY0 EF+215
Y EF+8~, EF+202~*, EF+204, BEH+1~, BEH+2*, BEH+3, EIEARR+2~, EIEARR+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