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

Package: Registration

Routine: DGPMBSAR


Information

DGPMBSAR ;ALB/LM/MJK - RECALC ENTRY POINTS; 16 JAN 91

Source Information

Source file <DGPMBSAR.m>

Entry Points

Name Comments DBIA/ICR reference
A
ASK
RPD ;W !!,"Recalculation of patient days could take up to 30 minutes longer per date..."
PR ;W !,"DO YOU WANT TO RECALCULATE PATIENT DAYS" S %=2 D YN^DICN
QUE ; Recalculation Queue
GO1
GO
Q
DAT ; -- get params and chk data
DATQ
CLEAN ; -- clean up corrections file
WDCHK ; -- chk first ward
RCCK ; Check for ReCalc already running
DEFS ; -- defaults for recalc
VAR ; RC=ReCalc from date ; RD=Report Date ;
; PD=Previous Date ; REM=Recalc patient days ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?4,*7,"Can't Recalculate data prior to ",Y,"!"
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !!,"Request Queued!"
  • Line Location: QUE+2
Function Call: WRITE
  • Prompt: !,"ReCalc Already Scheduled for ",Y,!
  • Line Location: RCCK+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(43 - [#43] Classic Fileman Calls
^DGS(43.5 - [#43.5] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call