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

Package: Registration

Routine: DGPREP0


Information

DGPREP0 ;Boise/WRL/ALB/SCK-Program to Display Pre-Registration List ; 2/24/04 2:11pm

Source Information

Source file <DGPREP0.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point
ENQ
HDR ; -- header code
; Variables
; DGPSRT - Sort Method for call list display
INIT ; -- Retrieve data from call list and build TMP global for sorting Call lsit
; Variables
; DGPNR -
; DGPDATA - 0 Node from ^DGS(41.42,X
; DGPDATA1 - 1 Node from ^DGS(41.42,X
; DGPDIV - Division IEN from ^DGS(41.42,
; DGPDVN - Division Name
; DGPSV - Medical Service for appointment clinic
; DGPAT - Appt. date/time
; DGPPN - Patients name
; DGPNR - Index No. for LM
; DGPSRT - Call list sort method
; DGPN0,DGPN1,DGPNX - Local Var's for $O
HELP ; -- help code
EXIT ; -- Exit code
BLDHIST ; Build history of call attempts from ^DGS(41.43, Call log

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"You do not have the requisite key allocated, contact your Supervisor."
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!,"Sorting Entries..."
  • Line Location: INIT+19
Function Call: WRITE
  • Prompt: !,"NO SERVICE ENTRY FOR RECORD# ",DGPN1
  • Line Location: INIT+38
Function Call: WRITE
  • Prompt: !,"NO PATIENT ENTRY FOR RECORD# ",DGPN1
  • Line Location: INIT+42
Function Call: WRITE
  • Prompt: !,"NO PATIENT ENTRY FOR RECORD# ",DGPN1
  • Line Location: INIT+46
Function Call: WRITE
  • Prompt: "."
  • Line Location: INIT+48
Function Call: WRITE
  • Prompt: !!,"Loading Sorted Entries into List..."
  • Line Location: INIT+50
Function Call: WRITE
  • Prompt: *7,!!,"No appointments were found for the selected divisions"
  • Line Location: INIT+52
Function Call: WRITE
  • Prompt: "."
  • Line Location: INIT+83
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Info |  Source |  Entry Points |  Interaction Calls