Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: DGPFDIV

Package: Registration

Routine: DGPFDIV


Information

DGPFDIV ;ALB/KCL - PRF ENABLE MEDICAL CENTER DIVISIONS ; 9/19/05 4:03pm

Source Information

Source file <DGPFDIV.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;Main entry point for DGPF ENABLE DIVISIONS option.
SET(DGSEL,DGDIV) ;enable/disable medical center divisions
ASKACT(DGSEL) ;select division action
ASKDIV(DGSEL,DGDIV) ;select medical center divisions

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+14
Function Call: WRITE
  • Prompt: !,"This option allows multi-divisional facilities to enable, disable, and view"
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: !,"individual medical center divisions as patient record flag assignment owners."
  • Line Location: EN+16
Function Call: WRITE
  • Prompt: !!,"Preparing to '"_$P(DGACT,U,2)_"' the selected medical center divisions as"
  • Line Location: SET+26
Function Call: WRITE
  • Prompt: !,"patient record flag assignment owners...",!
  • Line Location: SET+27
Function Call: WRITE
  • Prompt: !?2,">>> "_$$EZBLD^DIALOG(261131)_".",!
  • Line Location: SET+35
Function Call: WRITE
  • Prompt: !?2,">>> "_$$EZBLD^DIALOG(261131)_": Record is currently locked.",!
  • Line Location: SET+40
Function Call: WRITE
  • Prompt: !?2,">>> Medical center division has been "_$$EXTERNAL^DILFD(40.8,26.01,"",+DGACT),!
  • Line Location: SET+43
Function Call: WRITE
  • Prompt: !?2,">>> "_$$EZBLD^DIALOG(261131)_"Unable to file changes.",!
  • Line Location: SET+44
Function Call: WRITE
  • Prompt: !!,"Enter each medical center division that you would like to "_$P(DGACT,U,2)_".",!
  • Line Location: ASKDIV+26

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(40.8 - [#40.8] EXTERNAL^DILFD,  GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call