Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PRS8TL

Package: PAID

Routine: PRS8TL


Information

PRS8TL ;HISC/MRL-DECOMPOSITION, SELECTIVE T&L ;2/19/93 13:12

Source Information

Source file <PRS8TL.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
PAID 4 PY^PRS8  ALL^PRS8CV  (,COVER,TOP)^PRS8TL1  ^PRS8UT  
VA FileMan 2 ^DIC  YN^DICN  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
PAID 2 PRS8  PRSA T&L DECOMP REPORT  

Entry Points

Name Comments DBIA/ICR reference
PP ; --- get Pay Period
SHOW ; --- show only
DECOM ; --- decompose even if done
ASK ; --- loop thru all T&L's
TL ; --- Specific T&L Selection
OK ; --- are the selections ok
TL1 ; --- T&L's are ok, let's go on
TL2 ; --- entry point from QUEUE for running specific T&L's
TLA ; --- entry point from QUEUE for running all T&L's
OUT ; --- write exit comment
DEV ; --- select output device
END ; --- all done here

External References

Name Field # of Occurrence
^DIC TL+5
YN^DICN SHOW+2, DECOM+1, ASK+1, OK+2
PY^PRS8 PP+1
ALL^PRS8CV END+1
^PRS8TL1 TL2+2, TLA+2
COVER^PRS8TL1 TL2+1, TLA+1
TOP^PRS8TL1 TL2+3, TLA+3
^PRS8UT DEV+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Want to just SEE what's stored already and not decompose"
  • Line Location: SHOW+1
Function Call: WRITE
  • Prompt: !?4,"Answer YES if you wish to display what's been previously decomposed."
  • Line Location: SHOW+4
Function Call: WRITE
  • Prompt: !?4,"Respond NO if you actually want to decompose records."
  • Line Location: SHOW+5
Function Call: WRITE
  • Prompt: !!,"Should I decompose only those records which have not been decomposed"
  • Line Location: DECOM+1
Function Call: WRITE
  • Prompt: !?4,"Answer YES if you wish to decompose only records not previously decomposed."
  • Line Location: DECOM+3
Function Call: WRITE
  • Prompt: !?4,"Respond NO to decompose all records which have been released to payroll but",!?4,"have not yet been transmitted."
  • Line Location: DECOM+4
Function Call: WRITE
  • Prompt: !!,"Want to ",SHOW(1)," all T&L's for Pay Period ",PY(0)
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !?4,"Answer YES if you wish to ",SHOW(1)," all records for PP ",PY(0),"."
  • Line Location: ASK+5
Function Call: WRITE
  • Prompt: !?4,"Respond NO if you wish to ",SHOW(1)," records for specific T&L's."
  • Line Location: ASK+6
Function Call: WRITE
  • Prompt: !
  • Line Location: TL+1
Function Call: WRITE
  • Prompt: !?4,"T&L has already been selected!!",*7
  • Line Location: TL+6
Function Call: WRITE
  • Prompt: !?4,"No T&L's have been selected!",*7
  • Line Location: TL+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: TL+9
Function Call: WRITE
  • Prompt: !
  • Line Location: TL+10
Function Call: WRITE
  • Prompt: ?X,J
  • Line Location: TL+11
Function Call: WRITE
  • Prompt: !!,$S(CT=1:"Is this the T&L",1:"Are these the T&L's")
  • Line Location: OK+1
Function Call: WRITE
  • Prompt: " to be processed"
  • Line Location: OK+2
Function Call: WRITE
  • Prompt: !?4,"Answer YES if these are the T&L's you want to ",SHOW(1),"."
  • Line Location: OK+5
Function Call: WRITE
  • Prompt: !?4,"Answer NO if you wish to select another T&L (or set of T&L's)."
  • Line Location: OK+6
Function Call: WRITE
  • Prompt: !?4,"You may enter an up-arrow [""^""] if you wish to QUIT now!",*7
  • Line Location: OUT+1
Function Call: WRITE
  • Prompt: !!,"WARNING: This report is designed to run with a 132-column Right Margin!"
  • Line Location: DEV+1
Routine Call
  • DIC
  • Line Location:
    • TL+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRST(455.5 - [#455.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRSPC - [#450] TLA+2
^PRST(455.5 - [#455.5] TL+7
^PRST(458 - [#458] PP+2

Label References

Name Line Occurrences
ASK SHOW+3, DECOM+2, ASK+7
DECOM SHOW+3, DECOM+4
DEV ASK+3, TL1+1
END PP+2, SHOW+2, DECOM+2, ASK+4, TL+8, OK+4, TL2+4, TLA+4
OK OK+7
OUT SHOW+6, DECOM+4, ASK+7, OK+7
SHOW SHOW+6
TL ASK+4, OK+4
TL1 OK+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % SHOW+2*, SHOW+3, DECOM+1*, DECOM+2, ASK+1*, ASK+2, ASK+3, ASK+4, OK+2*, OK+3
, OK+4
>> CT TL+1*, TL+4, TL+7*, TL+9*, TL+10*, OK+1
>> CT1 TL+9*, TL+10*, TL+11
>> DECOM SHOW+3*, DECOM+2*
>> DIC TL+3*
>> DIC("A" TL+3*, TL+4*
>> DIC(0 TL+3*
>> I TL+9*
>> J TL+9*, TL+11
>> NAME TL2+2*, TLA+2*
>> OK PP+2
>> PRS8 TL+2*
>> PRS8("DES" ASK+3*, TL1+1*, DEV+2*
>> PRS8("PGM" ASK+3*, TL1+1*
>> PRS8("QUIT" TL2+2, TL2+3*, TLA+2, TLA+3*
>> PRS8("VAR" DEV+2*
>> PY PP+2
>> PY(0 PP+2*, ASK+1, ASK+5, DEV+2
>> QUIT PRS8TL+9*, PP+2, ASK+2, TL+8, OK+3
>> SEE PP+1*
>> SHOW SHOW+3*
>> SHOW(1 SHOW+3*, ASK+1, ASK+5, ASK+6, OK+5
TLU TL+1!, TL2+2*, TLA+2*
TLU( TL+6, TL+7*, TL+9, TL2+2
TLU(0 TL+8
>> TLU1 TL2+2*, TLA+2*
>> X TL+11*
>> Y TL+2, TL+6, TL+7
>> Y(0 TL+6, TL+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All