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

Package: Registration

Routine: DGRPP


Information

DGRPP ;ALB/MRL,AEG,LBD,ASF,LEG,RN - REGISTRATION SCREEN PROCESSOR ;Apr 05, 2020@15:16

Source Information

Source file <DGRPP.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
JUMP ;
Q
QQ
Q1
SENSCHK ; check whether patient record should be made sensitive
SEC ;if patient type says make record sensitive, add to security log file
CHOICE ;parse out which items were selected for edit
NEXT ;find next available screen...goto
SCRX ;goto screen X
W ;write highlighted text on screen (if parameter on)
SCR9 ; see if MT is completed. Allow only selective editing if so

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: @IOF,!!!
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: W
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: "=ENTER new "_(DGISYR+1)_" data,"
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: W
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: " to ",$S(DGRPS<DGRPLAST:"CONTINUE",1:"QUIT"),", "
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: D
  • Line Location: EN+14
Function Call: WRITE
  • Prompt: " or "
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: ": "
  • Line Location: EN+18
Function Call: READ
  • Variable: DGRPANN
  • Timeout: DTIME
  • Line Location: EN+21
Function Call: WRITE
  • Prompt: @IOF,
  • Line Location: EN+22
Function Call: WRITE
  • Prompt: @IOF,!!!
  • Line Location: EN+23
Function Call: WRITE
  • Prompt: !!,"===> Record has been classified as sensitive."
  • Line Location: SEC+2
Function Call: WRITE
  • Prompt: Z
  • Line Location: W+1
Function Call: WRITE
  • Prompt: @DGVI,Z,@DGVO
  • Line Location: W+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGSL(38.1 - [#38.1] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call