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

Package: PAID

Routine: PRS8VW


Information

PRS8VW ;WCIOFO/JAH - DECOMPOSITION, VIEW RESULTS ;01/11/08

Source Information

Source file <PRS8VW.m>

Entry Points

Name Comments DBIA/ICR reference
CERT ; entry point to show supervisor result of decomp before certifying
E2 ; --- create E array
STUB ; --- show stub record
E ; --- create E array
CTID ; compressed tour indicator display
; in - PY (pay period ien), DFN (employee ien)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRS8VW+17
Function Call: WRITE
  • Prompt: ?(80-$L(X)/2),X,!
  • Line Location: PRS8VW+19
Function Call: WRITE
  • Prompt: !,X
  • Line Location: PRS8VW+24
Function Call: WRITE
  • Prompt: ?(79-$L(X)),$P(X,"^",1)
  • Line Location: PRS8VW+25
Function Call: WRITE
  • Prompt: !,DASH2
  • Line Location: PRS8VW+27
Function Call: WRITE
  • Prompt: !,"Loc.",?10,"Data Element",?44,"Code",?52,"Old Value",?67,"New Value"
  • Line Location: PRS8VW+28
Function Call: WRITE
  • Prompt: !,"----",?10,"------------",?44,"----",?52,"---------",?67,"---------"
  • Line Location: PRS8VW+29
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CERT+6
Function Call: WRITE
  • Prompt: ?(80-$L(X)/2),X,!
  • Line Location: CERT+8
Function Call: WRITE
  • Prompt: !,$J(H,40+($L(H)/2)),!
  • Line Location: CERT+13
Function Call: WRITE
  • Prompt: !,X
  • Line Location: CERT+14
Function Call: WRITE
  • Prompt: ?(79-$L(X)),$P(X,"^",1)
  • Line Location: CERT+15
Function Call: WRITE
  • Prompt: !,DASH2
  • Line Location: CERT+17
Function Call: WRITE
  • Prompt: !
  • Line Location: CERT+18
Function Call: WRITE
  • Prompt: !,"This is a ",$$EXTERNAL^DILFD(458.01,5,"",FLX)," tour!"
  • Line Location: CTID+6
Function Call: WRITE
  • Prompt: !,"Note: The Compressed Tour Indicator has been changed since"
  • Line Location: CTID+8
Function Call: WRITE
  • Prompt: !," the previous pay period (from "
  • Line Location: CTID+9
Function Call: WRITE
  • Prompt: $$EXTERNAL^DILFD(458.01,5,"",FLXP)
  • Line Location: CTID+10
Function Call: WRITE
  • Prompt: " to ",$$EXTERNAL^DILFD(458.01,5,"",FLX),")."
  • Line Location: CTID+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
458.01 EXTERNAL^DILFD
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call