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

Package: PAID

Routine: PRSPTM


Information

PRSPTM ;WOIFO/MGD - PTP TERMINATE MEMORANDUM ;06/15/05

Source Information

Source file <PRSPTM.m>

Entry Points

Name Comments DBIA/ICR reference
MAIN ; Main Driver
TERM ; Issue Terminate Memorandum prompt
PTP ; Prompt for Part Time Physician
MEM ; Find any memorandums that meet the termination qualifications
ASK
DISPLAY ; Display memorandum info to validate the correct employee was chosen
TDATE ; Prompt for Termination Date
TCOM ; Termination Comments
ESIG ; Prompt for Electronic Signature and store fields in #458.7
KILL ; Clean up variables

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: TERM+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PTP+1
Function Call: WRITE
  • Prompt: !!,"No memorandums meet the termination qualifications for the "
  • Line Location: MEM+25
Function Call: WRITE
  • Prompt: "selected employee."
  • Line Location: MEM+26
Function Call: WRITE
  • Prompt: !!," # ",?5,"STARTS ENDS"
  • Line Location: MEM+32
Function Call: WRITE
  • Prompt: !!,MEM,?5,START," TO ",END
  • Line Location: MEM+37
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: !!,"Termination date must be the last day of a pay period."
  • Line Location: TDATE+10
Function Call: WRITE
  • Prompt: !,"Start Date: ",STDAT," End Date: ",ENDAT,!
  • Line Location: TDATE+11
Function Call: WRITE
  • Prompt: !!,"The Termination Date must be the last day of a Pay Period."
  • Line Location: TDATE+24
Function Call: WRITE
  • Prompt: !,"Please re-enter.",!
  • Line Location: TDATE+25
Function Call: WRITE
  • Prompt: !!,"The Termination Date can not be prior to the Start Date: ",STDAT
  • Line Location: TDATE+27
Function Call: WRITE
  • Prompt: !,"Please re-enter.",!
  • Line Location: TDATE+28
Function Call: WRITE
  • Prompt: !!,"The Termination Date must be prior to the End Date: ",ENDAT
  • Line Location: TDATE+30
Function Call: WRITE
  • Prompt: !,"Please re-enter.",!
  • Line Location: TDATE+31
Function Call: WRITE
  • Prompt: !,$P($G(^PRST(458,PPI,0)),U),?10,STATEX
  • Line Location: TDATE+46
Function Call: WRITE
  • Prompt: !!,"You cannot select this Pay Period because there "
  • Line Location: TDATE+50
Function Call: WRITE
  • Prompt: $S(FPPESR=1:"is ",1:"are "),FPPESR," Pay Period"
  • Line Location: TDATE+51
Function Call: WRITE
  • Prompt: $S(FPPESR>1:"s ",1:" "),"after this"
  • Line Location: TDATE+52
Function Call: WRITE
  • Prompt: !,"Pay Period where the timecard",$S(FPPESR=1:" has ",1:"s have ")
  • Line Location: TDATE+53
Function Call: WRITE
  • Prompt: "a status other than Timekeeper.",!!
  • Line Location: TDATE+54
Function Call: WRITE
  • Prompt: !
  • Line Location: TCOM+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRSPC - [#450] Classic Fileman Calls
458.01 EXTERNAL^DILFD
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call