Routine: PRSAPPO

Package	Total	Call Graph
PAID	7	(,E)^PRSAPPH (DTP,NX,PP)^PRSAPPU $$TWE^PRSATE0 PEAPP^PRSPEAA PLPP^PRSPLVA $$MIEN^PRSPUT1 ESRUPDT^PRSPUT3
VA FileMan	6	(C,NOW)^%DTC MSG^DIALOG FIND^DIC FILE^DICN FILE^DIE $$GET1^DIQ
Kernel	2	$$KSP^XUPARAM KILL^XUSCLEAN
MailMan	1	^XMD

Package

Total

Call Graph

PAID

(,E)^PRSAPPH (DTP,NX,PP)^PRSAPPU $$TWE^PRSATE0 PEAPP^PRSPEAA PLPP^PRSPLVA $$MIEN^PRSPUT1 ESRUPDT^PRSPUT3

VA FileMan

(C,NOW)^%DTC MSG^DIALOG FIND^DIC FILE^DICN FILE^DIE $$GET1^DIQ

Kernel

$$KSP^XUPARAM KILL^XUSCLEAN

MailMan

^XMD

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 2

Package	Total	Caller Graph
PAID	2	PRSA PP OPEN PRSAPRE

Name

Comments

DBIA/ICR reference

RES

; Re-start/Re-open a Pay Period

MOV

; Create PP entry for Employee

; Set a day

Name	Field # of Occurrence
C^%DTC	PRSAPPO+4, PRSAPPO+5, A2+2
NOW^%DTC	A3
MSG^DIALOG	A3+31
FIND^DIC	A3+25
FILE^DICN	A1+5
FILE^DIE	A3+31, MOV+13
$$GET1^DIQ	A3+27, A3+28, A3+32
^PRSAPPH	A3
E^PRSAPPH	A3+13
DTP^PRSAPPU	PRSAPPO+6, A2+3
NX^PRSAPPU	PRSAPPO+4
PP^PRSAPPU	PRSAPPO+6
$$TWE^PRSATE0	M1+6
PEAPP^PRSPEAA	A3+19
PLPP^PRSPLVA	A3+16
$$MIEN^PRSPUT1	A3+12
ESRUPDT^PRSPUT3	MOV+19
^XMD	A3+35
$$KSP^XUPARAM	A3+25
KILL^XUSCLEAN	EX

Name

Field # of Occurrence

C^%DTC

PRSAPPO+4, PRSAPPO+5, A2+2

A3+31

A3+25

A1+5

A3+31, MOV+13

A3+27, A3+28, A3+32

A3+13

PRSAPPO+6, A2+3

PRSAPPO+4

PRSAPPO+6

M1+6

A3+19

A3+16

A3+12

MOV+19

^XMD

A3+35

$$KSP^XUPARAM

A3+25

KILL^XUSCLEAN

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: *7,!!,"You cannot open a Pay Period more than 7 days in advance!" Line Location: PRSAPPO+5
Function Call: WRITE	Prompt: !!,"Do you wish to Open Pay Period ",PPE," beginning ",Y," ? " Line Location: A1+0
Function Call: READ	Variable: X Timeout: DTIME Line Location: A1+1
Function Call: WRITE	Prompt: !?5,*7,"Answer YES or NO" Line Location: A1+2
Function Call: WRITE	Prompt: !!,*7,"That Pay Period is already open!" Line Location: A1+4
Function Call: WRITE	Prompt: !!,"Moving Current Employees into Pay Period ... " Line Location: A3+1
Function Call: WRITE	Prompt: !!,N," Employee Records created.",! Line Location: A3+36
Routine Call	DIALOG Line Location: A3+31
Routine Call	DIC Line Location: A3+25
Routine Call	DIE Line Location: A3+31 MOV+13

FileNo	Call Tags
^DIC(4 - [#4]	GET1^DIQ
^PRST(456 - [#456]	FIND^DIC, GET1^DIQ
^PRST(458 - [#458]	Classic Fileman Calls

FileNo

Call Tags

^DIC(4 - [#4]

GET1^DIQ

^PRST(456 - [#456]

FIND^DIC, GET1^DIQ

^PRST(458 - [#458]

Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^PRSPC - [#450]	A3+3, A3+5, A3+6, A3+7, A3+8, MOV+3
^PRST(456 - [#456]	A3+26
^PRST(457.1 - [#457.1]	M1+3
^PRST(458 - [#458]	PRSAPPO+3, A1+4, A2, A2+4, A2+5, A3, A3+4, A3+36, RES+1, MOV+1 , MOV+2, MOV+4, MOV+5, MOV+9, MOV+16, M1+2, M1+4, M1+6*
^PRST(458.7 - [#458.7]	MOV+9
^TMP("DILIST"	A3+26

Name

Line Occurrences (* Changed, ! Killed)

^PRSPC - [#450]

A3+3, A3+5, A3+6, A3+7, A3+8, MOV+3

^PRST(456 - [#456]

A3+26

^PRST(457.1 - [#457.1]

M1+3

^PRST(458 - [#458]

PRSAPPO+3, A1+4, A2, A2+4*, A2+5*, A3*, A3+4, A3+36*, RES+1, MOV+1
, MOV+2, MOV+4*, MOV+5, MOV+9, MOV+16, M1+2, M1+4*, M1+6*

^PRST(458.7 - [#458.7]

MOV+9

^TMP("DILIST"

A3+26

Name	Line Occurrences
A1	A1+2
A2	A2
A3	RES+1
EX	PRSAPPO+5, A1+1, A1+3, A1+4, A1+5
M1	MOV+17
MOV	A3+13

Name

Line Occurrences

A1+2

RES+1

PRSAPPO+5, A1+1, A1+3, A1+4, A1+5

MOV+17

MOV

A3+13

Name	Field # of Occurrence
^(0	A3+26, MOV+1, MOV+5, M1+3, M1+4*
^(1	M1+4*
^(2	A2+4*
^(8	M1+2

Name

Field # of Occurrence

^(0

A3+26, MOV+1*, MOV+5*, M1+3, M1+4*

^(1

M1+4*

^(2

A2+4*

^(8

M1+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	A3
>> ATL	A3+3*
>> C0	A3+8*, A3+9, A3+10
>> CM36	A3+27*, A3+30
>> CM9	A3+27*, A3+29
>> CPI	MOV+2, MOV+3, MOV+4*
>> CT36	A3+10*, A3+24, A3+30
>> CT9	A3+9*, A3+23, A3+29
>> D1	PRSAPPO+4*, PRSAPPO+5, PRSAPPO+6, A2+2
>> DAY	MOV+16*, MOV+19, M1+2, M1+4, M1+6
DD	A1+5!
>> DFN	A3+3*, A3+4, A3+5, A3+6, A3+7, A3+8, A3+11, MOV+1, MOV+2, MOV+3 , MOV+4, MOV+5, MOV+16, MOV+19, M1+2, M1+4, M1+6
DIC	A1+5!*, A1+6!
DIC(0	A1+5*
DIERR	A3+28~
DLAYGO	A1+5*, A1+6!
DO	A1+5!
DT	PRSAPPO+5
DTIME	A1+1
>> DUP	A3+13*
FDA	A3+28~, A3+31
FDA(456	A3+29, A3+30
>> HOL	A3+13
IENS	MOV+10~, MOV+11*, MOV+12
>> IND	A3+26*, A3+27, A3+28, A3+29, A3+30
>> K	A2+2, A2+3, A2+5*
>> MAX	A3+28*, A3+29, A3+30
MDAT	A3+2~, A3+11*, A3+12
MIEN	A3+2~, A3+12*, A3+13, A3+16, A3+19, MOV+9, MOV+11, MOV+19
>> N	A3+1, A3+20, A3+36
>> NAM	A3+3*
>> NAWS	A3+9, A3+10, A3+22
>> NOW	A3*
>> PDT	A3+11
>> PPE	PRSAPPO+3*, A1, A1+4, A1+5
>> PPI	PRSAPPO+3, A1+6, A2+4, A2+5, A3, A3+4, A3+16, A3+19, A3+36, RES+1* , MOV+1, MOV+4, MOV+5, MOV+9, MOV+16, MOV+19, M1+4, M1+6
>> PPIP	A1+6, A2, RES+1*, MOV+2, M1+2
PRSFDA	MOV+10~, MOV+14!
PRSFDA(	MOV+12*
PRSIEN	A3+2~, A3+11*, A3+12, A3+16, A3+19
>> S	A3+25, A3+32, A3+33, A3+34
>> TD	M1+2*, M1+3, M1+4
>> TDH	M1+3*, M1+4
>> TLE	A3+3*
TMP	A3+35!
TMP(1	A3+23*
TMP(2	A3+24*
TMP(3	A3+33*
>> TT	A3+13*
U	A3+9, A3+10, A3+11, MOV+9, M1+2, M1+3, M1+6
>> X	PRSAPPO+4, PRSAPPO+5, PRSAPPO+6, A1+1, A1+2, A1+3, A1+5, A2+2, A2+3, A2+5* , M1+3*, M1+4
>> X1	PRSAPPO+4, PRSAPPO+5, A2+2*
>> X2	PRSAPPO+4, PRSAPPO+5, A2+2*
>> XMDUZ	A3+33*
>> XMSUB	A3+34*
>> XMTEXT	A3+32*
>> XMY("VHAOIPAIDETANAWSBULLETIN@DOMAIN.EXT"	A3+33*
Y	A1, A1+5, A1+6, A2+3, M1+1~, M1+2, M1+3*, M1+6
>> Y1	A2+2*, A2+3, A2+4, A2+5
>> Y2	A2+3*, A2+4
>> Z	M1+2*

Customize PDF page

Package: PAID

Routine: PRSAPPO

Information

Source Information

Call Graph

Call Graph Total: 16

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: