Routine: PRCSP131

Information

PRCSP131 ;WISC/SAW-CPA PRINTS CON'T-TRANSACTION STATUS REPORT ;4/21/93 08:56

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
IFCAP	3	S^PRCSP13 (,RTS,SUBC)^PRCSP132 DIWP^PRCUTL

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

Package	Total	Caller Graph
IFCAP	1	PRCSP13

Entry Points

Name	Comments	DBIA/ICR reference
V	;;5.1;IFCAP;;Oct 20, 2000
COM

External References

Name	Field # of Occurrence
S^PRCSP13	V+2, V+15, V+17, COM, COM+3
^PRCSP132	V+22
RTS^PRCSP132	V+21
SUBC^PRCSP132	V+20
DIWP^PRCUTL	V+13, COM+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $P(^(0),"^") Line Location: V+4
Function Call: WRITE	Prompt: "NO NEW PERSON ENTRY" Line Location: V+4
Function Call: WRITE	Prompt: !,"Requestor: " Line Location: V+5
Function Call: WRITE	Prompt: $S($D(^VA(200,+PRCS7,0)):$P(^(0),U),1:"") Line Location: V+5
Function Call: WRITE	Prompt: ?41,"Form Type: ",$S($D(^PRCS(410.5,+$P(PRCS0,U,4),0)):$P(^(0),U),1:"") Line Location: V+6
Function Call: WRITE	Prompt: !,"Requestor's Title: ",$P(PRCS7,U,2) Line Location: V+7
Function Call: WRITE	Prompt: ?41,"Requesting Service: " Line Location: V+7
Function Call: WRITE	Prompt: ?41,"Requesting Service: " Line Location: V+7
Function Call: WRITE	Prompt: " ("_$P(^(0),U,8)_")" Condition for execution: $P(^(0),U,8)]"" Line Location: V+7
Function Call: WRITE	Prompt: !,"Approving Official: " Line Location: V+8
Function Call: WRITE	Prompt: $S($D(^VA(200,+$P(PRCS7,U,3),0)):$P(^(0),U),1:"") Line Location: V+8
Function Call: WRITE	Prompt: $S($D(^PRCP(445,$P(^(0),U,6),0)):$P($P(^(0),U,1),"-",2),1:"") Line Location: V+9
Function Call: WRITE	Prompt: !,"Appr. Official's Title: ",$P(PRCS7,U,4) Line Location: V+10
Function Call: WRITE	Prompt: ?41,"Cost Center: ",$S($D(^PRCS(410,DA,3)):$E($P(^(3),U,3),1,25),1:"") Line Location: V+10
Function Call: WRITE	Prompt: !,"Date Signed (Approved): " Line Location: V+11
Function Call: WRITE	Prompt: Y Line Location: V+11
Function Call: WRITE	Prompt: ! Line Location: V+15
Function Call: WRITE	Prompt: "Justification:" Condition for execution: J=1 Line Location: V+15
Function Call: WRITE	Prompt: ?15,^UTILITY($J,"W",DIWL,J,0) Line Location: V+15
Function Call: WRITE	Prompt: !,"Deliver To/Location: ",$P(PRCS9,U) Line Location: V+17
Function Call: WRITE	Prompt: !,"Classification of Request: " Line Location: V+18
Function Call: WRITE	Prompt: X Line Location: V+18
Function Call: WRITE	Prompt: !,"Sort Group: ",X Line Location: V+19
Function Call: WRITE	Prompt: ! Line Location: COM+3
Function Call: WRITE	Prompt: "Comments:" Condition for execution: J=1 Line Location: COM+3
Function Call: WRITE	Prompt: ?10,^UTILITY($J,"W",DIWL,J,0) Line Location: COM+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	V+11
^DD(410	V+5, V+8
^DIC(49 - [#49]	V+7
^PRCP(445 - [#445]	V+9
^PRCS(410 - [#410]	V+2, V+3, V+7, V+9, V+10, V+13, V+16, V+18, V+19, V+22 , COM+1
^PRCS(410.2 - [#410.2]	V+18
^PRCS(410.5 - [#410.5]	V+6
^UTILITY($J	V+12!, V+14, V+15, COM!, COM+2, COM+3
^VA(200 - [#200]	V+4, V+5, V+8

Label References

Name	Line Occurrences
COM	V+21

Naked Globals

Name	Field # of Occurrence
^(	V+13, V+14, COM+1, COM+2
^(0	V+4, V+5, V+6, V+7, V+8, V+9, V+18, V+19
^(1	V+18
^(11	V+19
^(3	V+7, V+10
^(7	V+2
^(9	V+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	V+2, V+3, V+7, V+9, V+10, V+13, V+16, V+18, V+19, V+22 , COM+1
>> DIWF	V+12, COM
>> DIWL	V+12, V+14, V+15, COM, COM+2, COM+3
>> DIWR	V+12, COM
>> I	V+14, V+15, COM+2, COM+3
IO	V+2
IO(0	V+2
>> J	V+15, COM+3
>> PRCS0	V+6, V+22
PRCS1	V+18*!
PRCS7	V+2*, V+5, V+7, V+8, V+10, V+11!
>> PRCS9	V+16*, V+17
>> PRCSDY	V+12, V+15, V+17, V+21, COM, COM+3*
>> PRCSEX	V+2, V+15, V+16, V+17, COM, COM+3
>> PRCSI	V+12, V+13, COM, COM+1
>> PRCSJ	V+13, COM+1
>> PRCSS	V+15, V+17, COM, COM+3
>> PRCSTC	V+22
PRCSX	V+16!
U	V+2, V+5, V+6, V+7, V+8, V+9, V+10, V+11, V+15, V+16 , V+17, V+18, V+19, COM, COM+3
>> X	V+5, V+7, V+8, V+13, V+18, V+19, COM+1*
XNAME	V+3~*, V+4
>> Y	V+11*

Customize PDF page

Package: IFCAP