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

Package: PAID

Routine: PRSRL1


Information

PRSRL1 ;HISC/JH,WCIOFO/JAH,SAB-ONE OR ALL EMPLOYEE LEAVE USE REPORT. ;7-AUG-2000

Source Information

Source file <PRSRL1.m>

Entry Points

Name Comments DBIA/ICR reference
EMP ; employee entry point
SUP ;T&A supervisor entry point: select T&L unit & set up TLE array
LKUPEMP ;user selects 1 employee or all. PRSRY and Y1 ="" if all selected.
FIS
FIS1
EN1
EN2
ASK
START ; queued entry point
IND ; report results
Q ;
Q1
MSG1
MSG2
MSG3
LOOP
INXR(TLCODE,IEN450) ;check if IEN is in T&L cross reference of 450

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: LKUPEMP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: FIS1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EN2+0
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+12
Function Call: WRITE
  • Prompt: $C(7),!!,"*** Employee name not found."
  • Line Location: MSG1+0
Function Call: WRITE
  • Prompt: $C(7),!!,"The Date was invalid."
  • Line Location: MSG2+0
Function Call: WRITE
  • Prompt: $C(7),!!,"Date not found in file."
  • Line Location: MSG3+0

FileMan Files Accessed Via FileMan Db Call

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