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

Package: PAID

Routine: PRSPSRC


Information

PRSPSRC ;WOIFO/MGD - PTP SELECT RECONCILIATION CHOICE ;04/22/05

Source Information

Source file <PRSPSRC.m>

Entry Points

Name Comments DBIA/ICR reference
MAIN(PRSIEN,MIEN) ; Main Driver
; PRSIEN optional parameter-employee file 450 ien
; MIEN optional parameter-ien of memo that needs ptps reconcile choice
PTPRC ; PTP Reconciliation Choice
RO
PTPRCOM ; Prompt for PTP's Reconciliation Comments if paper form was used
SAVE ; Save PTP info into #458.7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: MAIN+12
Function Call: WRITE
  • Prompt: !!,"Memorandum status is not Reconciliation Started."
  • Line Location: MAIN+13
Function Call: WRITE
  • Prompt: !!,"You have already selected the following reconciliation option:"
  • Line Location: MAIN+24
Function Call: WRITE
  • Prompt: !!,"Reconciliation Option: ",$$EXTERNAL^DILFD(458.7,17,"",+DATA2)
  • Line Location: MAIN+25
Function Call: WRITE
  • Prompt: !,"Reconciliation Comments: ",$P(DATA2,U,2)
  • Line Location: MAIN+26
Function Call: WRITE
  • Prompt: !!,"Enter Reconciliation Choice: "
  • Line Location: RO+0
Function Call: WRITE
  • Prompt: !!,"Enter a number between 1 and ",END," or ^ to exit"
  • Line Location: RO+6
Function Call: WRITE
  • Prompt: !!,"Enter 1 or ^ to exit"
  • Line Location: RO+8
Function Call: WRITE
  • Prompt: " "_PTPRCE
  • Line Location: RO+10
Function Call: WRITE
  • Prompt: !!,"Your Reconciliation Choice was not saved."
  • Line Location: SAVE+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRST(458.7 - [#458.7] EXTERNAL^DILFD
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call