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 |  Marked Items  | All
Print Page as PDF
Routine: PRSDV459

Package: PAID

Routine: PRSDV459


Information

PRSDV459 ;HISC/MGD-VIEW PAID PAYRUN DATA ;09/09/04

Source Information

Source file <PRSDV459.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 4 ^DIC  WAIT^DICD  EN^DIQ1  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
PAID 3 OT^PRSDUTIL  ^PRSDV459  DESC^PRSDW450  

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 PRSD 04 PAYRUN DATA INQUIRY  PRSDV459  

Entry Points

Name Comments DBIA/ICR reference
PP ;select pay period
EMP
CAT
SAN
DISPLAY ;display payrun data
KILL1 ;kill most variables and close the device
KILL2 ;kill the remaining variables
WRITE ;write the data
CHECK
PRTC ;press return to continue
HEADER ;print header
LD ; Display Labor Distribution codes
DESC ;write description
TABLE ;set subfile dr variable
P1 ;;1;GENERAL INFORMATION;P1;1
P2 ;;2;EARNINGS;P2;2
P3 ;;3;DEDUCTIONS;P3;4
P4 ;;4;LEAVE;P4;1
P5 ;;5;LABOR DISTRIBUTION;

External References

Name Field # of Occurrence
^%ZIS SAN+17
^%ZISC SAN+24, DISPLAY+11
^%ZTLOAD SAN+20
^DIC PP+1, EMP+1
WAIT^DICD SAN+21
EN^DIQ1 DISPLAY+5, LD+8
^DIR SAN+3, PRTC+1
OT^PRSDUTIL LD+15
^PRSDV459 SAN+9
DESC^PRSDW450 LD+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,NAME,?TAB,CCORG,?61,"DUTY STATION: ",STATION_DS
  • Line Location: CAT+1
Function Call: WRITE
  • Prompt: !,SSN,?71,"T&L: ",TLU,!,DASHES,!,"PAY PERIOD: ",PPNAME
  • Line Location: CAT+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: CAT+3
Function Call: WRITE
  • Prompt: !,?20,$P(CHOICE(LOOP),";",3),?23,$P(CHOICE(LOOP),";",4)
  • Line Location: CAT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: SAN+0
Function Call: WRITE
  • Prompt: !!,*7,DIR("?")_"."
  • Line Location: SAN+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SAN+25
Function Call: WRITE
  • Prompt: !,$P(NODEDD,U,1)
  • Line Location: WRITE+6
Function Call: WRITE
  • Prompt: ?30,$S($P(NODEDD,U,5)["""$""":$J($FN(INTERNAL,",",2),14),$P(NODEDD,U,2)["NJ":$J(INTERNAL,14,2),$P(NODEDD,U,2)["D":$J(DESC,14),1:$J(INTERNAL,14))
  • Line Location: WRITE+7
Function Call: WRITE
  • Prompt: !
  • Line Location: PRTC+1
Function Call: WRITE
  • Prompt: !,NAME,?TAB,CCORG,?61,"DUTY STATION: ",STATION_DS
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,SSN,?71,"T&L: ",TLU,!,DASHES
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,"PAY PERIOD: ",PPNAME,?TAB,CATEGORY,?73,"PAGE ",PAGE
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !,DASHES
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !,"LABOR DIST CODE-",PRSLD," ",$P(NODEDD,U,1)
  • Line Location: LD+17
Function Call: WRITE
  • Prompt: ?30,$S($P(NODEDD,U,5)["""$""":$J($FN(INTERNAL,",",2),14),$P(NODEDD,U,2)["NJ":$J(INTERNAL,14,2),$P(NODEDD,U,2)["D":$J(DESC,14),1:$J(INTERNAL,14))
  • Line Location: LD+18
Function Call: WRITE
  • Prompt: ?47,DESC
  • Line Location: DESC+1
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $L($P(DESC," ",LOOP1))>(80-COLUMN)
  • Line Location: DESC+3
Function Call: WRITE
  • Prompt: ?COLUMN,$P(DESC," ",LOOP1)
  • Line Location: DESC+3
Routine Call
  • %ZIS
  • Line Location:
    • SAN+17
Routine Call
  • DIC
  • Line Location:
    • PP+1
    • EMP+1
Routine Call
  • DIR
  • Line Location:
    • SAN+3
    • PRTC+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(450 EMP+5
^DD(459.01 WRITE+1
^DD(459.1173 LD+10
^PRSPC - [#450] EMP+2, EMP+4, EMP+5, EMP+6
^PRST(459 - [#459] PP+2, EMP+2
^UTILITY("DIQ1" EMP+1!, KILL1+1!, WRITE+1, WRITE+3

Label References

Name Line Occurrences
CAT SAN+20, SAN+22, SAN+23, SAN+25
CHECK DISPLAY+10, WRITE+10
DESC WRITE+8
DISPLAY SAN+22
EMP SAN+3, SAN+5
HEADER DISPLAY+6, WRITE+5
KILL1 PP+1, SAN+3, SAN+17, SAN+20
KILL2 PP+1, SAN+17
LD DISPLAY+9
PP EMP+1
PRTC SAN+23, CHECK
SAN SAN+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS SAN+17!*, KILL1+1!
%ZIS("B" SAN+17*
CATEGORY SAN+7*, DISPLAY+7, DISPLAY+12, KILL2+1!, HEADER+5, HEADER+6
CCORG EMP+5*, CATCAT+1, KILL2+1!, HEADER+2, HEADER+3
CHOICE PRSDV459+3!, KILL2+1!
CHOICE( PRSDV459+3*, CAT+3, SAN+7, SAN+8
CLNGTH CAT*, KILL2+1!, HEADER+2*, HEADER+5*, HEADER+8!
COLUMN DESC+2*, DESC+3*, DESC+4!
D0 KILL1+1!
DA DISPLAY+4*, KILL2+1!, LD+1, LD+4*
DA( DISPLAY+4*, LD+5*, LD+6*
DASHES EMP!*, CAT+2, KILL2+1!, HEADER+4, HEADER+7
DESC WRITE+1*, WRITE+2!, WRITE+4!, WRITE+7, WRITE+8, WRITE+9!, LD+12*, LD+16*, LD+18, LD+19
DESC+1, DESC+3
DIC PP+1!*, EMP+1!*, DISPLAY+4*, KILL1+1!, LD+4*
DIC(0 PP+1*, EMP+1*
DIQ KILL1+1!, LD+7*
DIQ(0 DISPLAY+4*, LD+7*
DIQ2 KILL1+1!
DIR SAN!, KILL1+1!, PRTC+1!
DIR("?" SAN+2*, SAN+4
DIR("A" SAN+1*, PRTC+1*
DIR(0 SAN+1*, PRTC+1*
DIROUT SAN!, SAN+3, KILL1+1!, PRTC+1!
DIRUT SAN!, KILL1+1!, PRTC+1!
DR DISPLAY+4*, KILL1+1!, LD+4*
DR( DISPLAY+4*, LD+5*, LD+6*
DRIEN DISPLAY+1~, DISPLAY+2*, DISPLAY+3*, DISPLAY+4, DISPLAY+13*, DISPLAY+14*, DISPLAY+15
DRSUB KILL1+1!
DRSUB( SAN+9*, SAN+10, SAN+11*, SAN+12, SAN+13*, SAN+14, SAN+15*, DISPLAY+3, DISPLAY+4
DS EMP+6*, CAT+1, KILL2+1!, HEADER+3
DTOUT SAN!, SAN+3, KILL1+1!, PRTC+1!
DUOUT SAN!, SAN+3, KILL1+1!, PRTC+1!
EMP EMP+2*, EMP+4, EMP+5, EMP+6, DISPLAY+4, KILL2+1!, WRITE+1, WRITE+3, LD+5
FIELDN DISPLAY+6*, KILL1+1!, WRITE+1, WRITE+3
INTERNAL WRITE+3*, WRITE+4, WRITE+7, WRITE+8, WRITE+9!, LD+11*, LD+14, LD+18, LD+19
IO SAN+22
IO("Q" SAN+20
IOF CAT+1, SAN+16, SAN+18*, SAN+25, DISPLAY+6, HEADER+1
IOFSAV SAN+16*, SAN+18, KILL1+1!
ION SAN+20
IOP SAN+17!, KILL1+1!
IOSL CHECK
IOST SAN+21, SAN+23, SAN+24, DISPLAY+6, DISPLAY+10, DISPLAY+11, CHECK
L SAN+6~, SAN+9*, SAN+10, SAN+11, SAN+12, SAN+13, SAN+14, SAN+15
LAB SAN+6~, SAN+7*
LDCNT LD+2~, LD+9*, LD+10, LD+11, LD+12, LD+13
LDDATA LD+2~
LDDATA( LD+11, LD+12
LGTH DESC+2*, DESC+3*, DESC+4!
LOOP PRSDV459+3*, CAT+3*, SAN+19*, KILL1+1!
LOOP1 DESC+3*, DESC+4!
NAME EMP+2*, CAT+1, KILL2+1!, HEADER+3
NODEDD WRITE+1*, WRITE+2!, WRITE+4!, WRITE+6, WRITE+7, WRITE+8, WRITE+9!, LD+10*, LD+17, LD+18
LD+19
NOL SAN+6~, SAN+8*, SAN+9
PAGE SAN+8*, KILL2+1!, HEADER+1*, HEADER+6
POP SAN+17, KILL1+1!
PP PP+2*, EMP+1, EMP+2, DISPLAY+4, KILL2+1!, LD+4
PPNAME PP+2*, CAT+2, KILL2+1!, HEADER+6
PRNTORDR KILL1+1!
PRNTORDR( SAN+9*, DISPLAY+14, DISPLAY+15
PRNTVALS DISPLAY+15*, DISPLAY+16, KILL1+1!
PRSLD LD+2~, LD+3*, LD+6, LD+11, LD+12, LD+17
PRTC SAN+22, SAN+23, DISPLAY+8*, DISPLAY+13*, KILL2+1!, WRITE+5*, PRTC+1*
SSN EMP+3*, CAT+2, KILL2+1!, HEADER+4
STATION EMP+4*, CAT+1, KILL2+1!, HEADER+3
SUB454 LD+14*, LD+15!
TAB CAT*, CAT+1, KILL2+1!, HEADER+2*, HEADER+3, HEADER+5*, HEADER+6, HEADER+8!
TLU EMP+4*, CAT+2, KILL2+1!, HEADER+4
U PP+2, EMP+2, EMP+3, EMP+4, EMP+5, EMP+6, WRITE+4, WRITE+6, WRITE+7, WRITE+8
LD+17, LD+18, LD+19
X SAN+4, SAN+5, KILL1+1!
Y PP+1, PP+2, EMP+1, EMP+2, EMP+5*, SAN+7, SAN+8, KILL1+1!, PRTC+1, LD+2~
LD+14*, LD+16
ZERO EMP+2*, EMP+3, EMP+4, KILL1+1!
ZTDESC SAN+20*, KILL1+1!
ZTIO SAN+20*, KILL1+1!
ZTREQ SAN+20*, KILL2+1!
ZTRTN SAN+20*, KILL1+1!
ZTSAVE KILL1+1!
ZTSAVE( SAN+19*
ZTSAVE("ZTREQ" SAN+20*
ZTSK SAN+20, KILL1+1!

Marked Items

Name Field # of Occurrence
$T(@LAB+L^PRSDV459 SAN+9
$T(TABLE+LOOP PRSDV459+3
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 |  Marked Items  | All