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

Package: PAID

Routine: PRSPBRP


Information

PRSPBRP ;WOIFO/MGD - PTP BEGIN RECONCILIATION OF MEMORANDUM ;01/29/07

Source Information

Source file <PRSPBRP.m>

Entry Points

Name Comments DBIA/ICR reference
MAIN ; Prompt for Part Time Physician
DRIVER ; Main Driver
MEM ; Find any memorandums that meet the begin reconciliation qualifications
ASK
DISPLAY ; Display memorandum info to validate the correct employee was chosen
SUM ; Display Summary information - Screen #2
ROPT ; Reconciliation Options
ASK2 ; Prompt to e-mail or print.
ESIG ; Prompt for Electronic Signature and store fields in #458.7
DEV
PRINT ; Print the paper version of the Reconciliation form
KILL ; Clean up variables

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No memorandums meet the reconciliation qualifications for the "
  • Line Location: MEM+20
Function Call: WRITE
  • Prompt: "selected employee."
  • Line Location: MEM+21
Function Call: WRITE
  • Prompt: !!,"# ",?5,"STARTS ENDS"
  • Line Location: MEM+27
Function Call: WRITE
  • Prompt: !,MEM,?5,START," ",END
  • Line Location: MEM+36
Function Call: WRITE
  • Prompt: !!,"Enter a number between 1 and ",END," :"
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !!,"Enter a number between 1 and ",END," or ^ to exit"
  • Line Location: ASK+7
Function Call: WRITE
  • Prompt: !
  • Line Location: SUM+46
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ROPT+2
Function Call: WRITE
  • Prompt: $P(^PRSPC(PRSIEN,0),U,1)_" - Memorandum Summary"
  • Line Location: ROPT+3
Function Call: WRITE
  • Prompt: !!,"Would you like to use a (H)ard copy or (E)lectronic reconciliation form: "
  • Line Location: ASK2+2
Function Call: WRITE
  • Prompt: !!,"Enter H or E or ^ to Quit."
  • Line Location: ASK2+7
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+3
Function Call: WRITE
  • Prompt: !,$S($D(ZTSK):"Request Queued!",1:"Request Canceled!")
  • Line Location: DEV+10
Function Call: WRITE
  • Prompt: !!,"Memorandum Status updated to: RECONCILIATION STARTED",!
  • Line Location: DEV+19
Function Call: WRITE
  • Prompt: !,TEXT
  • Line Location: PRINT+5
Info |  Source |  Entry Points |  Interaction Calls