Routine: PRCSP1B

Package	Total	Call Graph
Kernel	5	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD ($$FMTE,$$NOW)^XLFDT $$UP^XLFSTR
VA FileMan	5	^%DT ^DIC YN^DICN EN1^DIP ^DIR
IFCAP	4	^PRCFYN ^PRCHDP1 ^PRCHQUE (CP,EN1,EN3,FY,STA)^PRCSUT

Package

Total

Call Graph

Kernel

(,HOME)^%ZIS ^%ZISC ^%ZTLOAD ($$FMTE,$$NOW)^XLFDT $$UP^XLFSTR

VA FileMan

^%DT ^DIC YN^DICN EN1^DIP ^DIR

IFCAP

^PRCFYN ^PRCHDP1 ^PRCHQUE (CP,EN1,EN3,FY,STA)^PRCSUT

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

Package	Total	Caller Graph
IFCAP	7	PRCEOPN PRCSLTT PRCSP1 PRCSP1F PRCSPNR PRCSPOS PRCSSCPR

Package

Total

Caller Graph

IFCAP

PRCEOPN PRCSLTT PRCSP1 PRCSP1F PRCSPNR PRCSPOS PRCSSCPR

Entry Points

Name	Comments	DBIA/ICR reference
V	;;5.1;IFCAP;150;Oct 20, 2000;Build 24
PROJ	;PROJECT NUMBER REPORT
TEMPT	;LIST OF TEMPORARY TRANSACTIONS
DATE
EDATE
QUE
TCMP	;COMPILE FCP TEMP REQUESTS
TC1
TC2
TPRT	;PRINT OF THE TEMP TX REPORT
PT1
PT2
TQUIT
TEXIT
HDR	;PRINT HEADING
EOP()	; end of page check - return 1 to quit, 0 to continue ;
NOW()	; return NOW in external format for print on reports
SUBCP	;SUB-CONTROL POINT REPORT
S1
S2
POS	;PURCHASE ORDER STATUS
POS1
POS2
S
DEV
W1
W2
NONE
W
EXIT

Name	Field # of Occurrence
^%DT	DATE, EDATE
^%ZIS	QUE, DEV
HOME^%ZIS	QUE+1
^%ZISC	TEXIT+2, W+1
^%ZTLOAD	QUE+1
^DIC	POS+2
YN^DICN	POS1, POS2
EN1^DIP	PROJ+4, S1+5, S2+5, S+1
^DIR	EOP+6
^PRCFYN	SUBCP+2
^PRCHDP1	POS1
^PRCHQUE	POS2+1
CP^PRCSUT	S2
EN1^PRCSUT	PROJ+1, S1
EN3^PRCSUT	TEMPT+3, POS+1
FY^PRCSUT	S2
STA^PRCSUT	S2
$$FMTE^XLFDT	PT2+4, NOW+2
$$NOW^XLFDT	NOW+2
$$UP^XLFSTR	NOW+3

Name

Field # of Occurrence

^%DT

DATE, EDATE

QUE, DEV

QUE+1

TEXIT+2, W+1

QUE+1

^DIC

POS+2

YN^DICN

POS1, POS2

EN1^DIP

PROJ+4, S1+5, S2+5, S+1

^DIR

EOP+6

SUBCP+2

POS2+1

PROJ+1, S1

TEMPT+3, POS+1

PT2+4, NOW+2

NOW+2

NOW+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: " Start Date REQUIRED" Line Location: DATE+1
Function Call: WRITE	Prompt: " Go to Date REQUIRED" Line Location: EDATE+1
Function Call: WRITE	Prompt: !!,$C(7),"ENDING DATE RANGE IS LESS THAN BEGINNING DATE RANGE",! Line Location: EDATE+3
Function Call: WRITE	Prompt: !,$P(PRCR0,U),?19,PRCRDATE,?32,PRCREQTR,?43,PRCVEND,?54,$E(PRCFITEM,1,15),?70,$J($FN(PRCCOST,",",2),10) Line Location: PT2+5
Function Call: WRITE	Prompt: !!," << NO TEMPORARY TRANSACTIONS TO PRINT FOR TIME PERIOD SELECTED >>" Line Location: TQUIT+0
Function Call: WRITE	Prompt: @IOF Line Location: HDR+2
Function Call: WRITE	Prompt: @IOF,!,"TEMPORARY TRANSACTION LISTING - CONTROL POINT ",PRC("CP") Line Location: HDR+3
Function Call: WRITE	Prompt: !,?45,PRCNOW,"Page ",$J(PRCPAGE,3) Line Location: HDR+4
Function Call: WRITE	Prompt: !,"TEMPORARY",?19,"DATE OF",?54,"FIRST LINE ITEM COMM" Line Location: HDR+5
Function Call: WRITE	Prompt: !,"TRANSACTION #",?19,"REQUEST",?32,"REQUESTOR VENDOR",?54,"DESCRIPTION",?71,"COST" Line Location: HDR+6
Function Call: WRITE	Prompt: !,PRCDSH Line Location: HDR+7
Function Call: WRITE	Prompt: ! Line Location: EOP+4
Function Call: WRITE	Prompt: !,"Would you like the report printed for a full Fiscal Year" Line Location: SUBCP+1
Function Call: WRITE	Prompt: !!,"Purchase Order Status: ",$P(X,"^") Line Location: POS+3
Function Call: WRITE	Prompt: !!,"Would you like the purchase order display" Line Location: POS1+0
Function Call: WRITE	Prompt: !!,"Enter information for another report or an uparrow to return to the menu.",! Line Location: W1+0
Function Call: READ	Variable: X Timeout: 5 Line Location: W2+0
Function Call: WRITE	Prompt: !!,"You are not an authorized control point user.",!,"Contact your control point official." Line Location: W2+0
Function Call: WRITE	Prompt: !!,"A status has not yet been reported for this purchase order." Line Location: NONE+0
Function Call: WRITE	Prompt: W Line Location: W+0
Function Call: WRITE	Prompt: !!,"Press return to continue: " Line Location: W+0
Routine Call	DIC Line Location: POS+2
Routine Call	DIR Line Location: EOP+6
Routine Call	%ZIS Line Location: QUE DEV
Routine Call	%ZIS Line Location: QUE+1

FileNo	Call Tags
^PRCS(410 - [#410]	Classic Fileman Calls
^PRC(442 - [#442]	Classic Fileman Calls

FileNo

Call Tags

^PRCS(410 - [#410]

Classic Fileman Calls

^PRC(442 - [#442]

Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^PRC(442 - [#442]	POS+2
^PRCD(442.3 - [#442.3]	POS+3
^PRCS(410 - [#410]	TC1, TC2, TC2+1, TC2+2, TC2+4, PT2+2, PT2+4
^TMP($J	TEMPT+2!, TC2+6*, PT1, PT2, TEXIT+1!
^VA(200 - [#200]	PT2+4

Name

Line Occurrences (* Changed, ! Killed)

^PRC(442 - [#442]

POS+2

^PRCD(442.3 - [#442.3]

POS+3

^PRCS(410 - [#410]

TC1, TC2, TC2+1, TC2+2, TC2+4, PT2+2, PT2+4

^TMP($J

TEMPT+2!, TC2+6*, PT1, PT2, TEXIT+1!

^VA(200 - [#200]

PT2+4

Name	Line Occurrences
$$EOP	HDR+1
$$NOW	TPRT+1
DATE	DATE+1
EDATE	EDATE+1, EDATE+3
EXIT	PROJ+1, TEMPT+3, QUE, SUBCP+2, S1, S1+1, S2, S2+1, S2+5, POS+1 , POS+2, POS+3, POS1, POS2, POS2+1, W2, NONE
HDR	TPRT+2, PT2+6, TEXIT+1
POS	POS+3, POS1, POS2, POS2+1
POS1	POS1
POS2	POS1, POS2
PT1	PT2
PT2	PT2+7
S2	SUBCP+2
SUBCP	S1+6
TC1	TC2
TC2	TC2+1, TC2+2, TC2+3, TC2+4, TC2+5, TC2+7
TCMP	QUE
TEXIT	DATE, EDATE, QUE+1, PT2+6
TPRT	TC1
TQUIT	PT1
W1	POS1, POS2, POS2+1
W2	PROJ+1, TEMPT+3, S1, S2, POS+1

Name

Line Occurrences

$$EOP

HDR+1

$$NOW

TPRT+1

DATE

DATE+1

EDATE

EDATE+1, EDATE+3

EXIT