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
Print Page as PDF
Routine: DGRPH

Package: Registration

Routine: DGRPH


Information

DGRPH ;ALB/MRL,TMK,JAM,ARF,ASF,LEG,ARF - REGISTRATION HELP ROUTINE ;Mar 10, 2020@19:19

Source Information

Source file <DGRPH.m>

Entry Points

Name Comments DBIA/ICR reference
M
1
A1
2
3
4
5
6
7
8
9
10
11
A2
12
13
14
15
S
W ;LEG; DG*5.3*1014 added C2L check for string too long if in column 2
C2L ;checks if string is too long for end of line display

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Enter '^' to stop the display ",$S(DGRPV:"",1:"and edit "),"of data, '^N' to jump to screen #N (see ",$S(DGRPV:"listing ",1:""),!,$S(DGRPV:"",1:"listing "),"below), <RET> to continue on to the next available screen"
  • Line Location: DGRPH+5
Function Call: WRITE
  • Prompt: "."
  • Line Location: DGRPH+6
Function Call: WRITE
  • Prompt: " or enter",!,"the field group number(s) you wish to edit using commas and dashes as",!,"delimiters. Those groups enclosed in brackets ""[]"" are editable while those",!,"enclosed in arrows ""<>"" are not."
  • Line Location: DGRPH+7
Function Call: WRITE
  • Prompt: " Enter 'ALL' to edit all editable data",!,"elements on the screen."
  • Line Location: DGRPH+8
Function Call: WRITE
  • Prompt: !!,"You may precede your selection with 'V' to denote veteran."
  • Line Location: M+0
Function Call: WRITE
  • Prompt: !!,"To edit a specific column, enter 'V'",$S($D(DGREL("S")):", 'S'",1:""),$S($D(DGREL("D")):", 'D'",1:"")," in front of the selected items."
  • Line Location: M+1
Function Call: WRITE
  • Prompt: !
  • Line Location: M+3
Function Call: WRITE
  • Prompt: D
  • Line Location: M+3
Function Call: WRITE
  • Prompt: D
  • Line Location: M+3
Function Call: WRITE
  • Prompt: D
  • Line Location: M+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: M+4
Function Call: WRITE
  • Prompt: " to EXIT Screen ",DGRPS," HELP "
  • Line Location: M+4
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: M+5
Function Call: WRITE
  • Prompt: "Press "
  • Line Location: M+5
Function Call: WRITE
  • Prompt: " KEY "
  • Line Location: M+5
Function Call: WRITE
  • Prompt: " KEY "
  • Line Location: M+5
Function Call: WRITE
  • Prompt: " KEY "
  • Line Location: M+5
Function Call: WRITE
  • Prompt: !,"Four most recent admission episodes on file for this applicant are displayed",!,"in inverse order."
  • Line Location: 12+0
Function Call: WRITE
  • Prompt: !,"Four most recent applications for care (registrations) are displayed in",!,"inverse order."
  • Line Location: 13+0
Function Call: WRITE
  • Prompt: !,"Sponsor information is displayed for patients."
  • Line Location: 15+0
Function Call: WRITE
  • Prompt: !
  • Line Location: S+0
Function Call: WRITE
  • Prompt: Z
  • Line Location: S+5
Function Call: WRITE
  • Prompt: Z
  • Line Location: S+17
Info |  Source |  Entry Points |  Interaction Calls