Routine: PRCBCPE

Information

PRCBCPE ;WISC@ALTOONA/CTB-CONTROL POINT EDIT ; 01/03/94 9:53 AM

Package	Total	Call Graph
IFCAP	4	RW^PRCBSA MSG^PRCFQ ^PRCFSITE ^PRCFYN
VA FileMan	3	^DIC FILE^DICN ^DIE

Name	Comments	DBIA/ICR reference
V	;;5.1;IFCAP;;Oct 20, 2000
OUT
ADD	;ADD NEW FUND CONTROL POINT
CPEDIT
C
AD2
AD1
Q
REA	;REACTIVATE AN INACTIVE FUND CONTROL POINT
REA1
DEA	;DEACTIVATE A CONTROL POINT
DEA1
NA

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: C+0
Function Call: WRITE	Prompt: ! Line Location: C+1
Function Call: WRITE	Prompt: !!,"Fund Control Point NAME: ",Y Line Location: AD2+0
Function Call: WRITE	Prompt: !?9 Condition for execution: $X>48 Line Location: AD2+0
Function Call: WRITE	Prompt: "// " Line Location: AD2+0
Function Call: READ	Variable: X Timeout: DTIME Line Location: AD2+2
Function Call: WRITE	Prompt: !,$C(7),"Enter FUND CONTROL POINT NAME, (up to ",30-$L(OLDNUM)," characters), do not include the NUMBER" Line Location: AD2+4
Function Call: WRITE	Prompt: ! Line Location: AD1+1
Function Call: WRITE	Prompt: !,$C(7) Line Location: REA1+1
Function Call: WRITE	Prompt: !,$C(7) Line Location: DEA1+1
Function Call: WRITE	Prompt: ! Line Location: DEA1+2
Routine Call	DIC Line Location: CPEDIT REA1 DEA1
Routine Call	DIE Line Location: ADD+3 AD1

FileNo	Call Tags
^PRC(420 - [#420]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^PRC(420 - [#420]	ADD+2, CPEDIT+7, AD2+8!, AD2+9, AD1, REA+2, REA1+2, DEA+2, DEA1+2*

Name	Field # of Occurrence
^(0	CPEDIT+7, REA1+2, DEA1+2*

Name	Field # of Occurrence
>> %	ADD+1, CPEDIT+3, CPEDIT+4, CPEDIT+5, CPEDIT+6, CPEDIT+7, C, C+1, AD2+5, AD2+6* , AD2+7, REA+1, REA1+1, DEA+1, DEA1+1
>> %A	CPEDIT+3, CPEDIT+5, C, C+1, AD2+5, AD2+6, REA1+1, DEA1+1
>> %A(1	CPEDIT+3, C+1, AD2+5*
>> %A(2	AD2+5*
>> %A(3	AD2+5*
>> %B	CPEDIT+3, CPEDIT+5, C, C+1, AD2+5, AD2+6, REA1+1, DEA1+1
C	OUT!
D	OUT!
D0	OUT!
DA	OUT!, ADD+3, CPEDIT+1, CPEDIT+7, AD2+8, AD2+9, AD1, REA1, REA1+2, DEA1 , DEA1+2
DA(1	CPEDIT, CPEDIT+7, AD2+8, AD2+9, AD1, REA1, REA1+2, DEA1*, DEA1+2
DD	ADD+2!
DI	OUT!
DIC	OUT!, ADD+2, CPEDIT, AD1, REA1!, DEA1!
DIC("A"	AD1+1, REA1+2, DEA1+2*
DIC("S"	CPEDIT*
DIC(0	ADD+2, CPEDIT, REA1, DEA1
DIE	OUT!, ADD+3, AD1
DINUM	OUT!, ADD+2*
DLAYGO	OUT!, ADD+2, CPEDIT
DO	ADD+2!
DQ	OUT!
DR	OUT!, ADD+3, AD1
DT	DEA1+2
DTIME	AD2+2
DUZ	DEA1+2
DWLW	OUT!
I	OUT!
J	OUT!
NEW	OUT!, AD2+5*, AD2+9
NEWNAME	OUT!, AD2+5*, AD2+9
OLD	OUT!, CPEDIT+1*, AD2+8
OLDNAME	OUT!, CPEDIT+1*, AD2, AD2+1, AD2+2, AD2+8
OLDNUM	OUT!, CPEDIT+1*, AD2+4, AD2+5
>> PRC("SITE"	ADD+2, ADD+3, CPEDIT, REA+2, REA1, DEA+2, DEA1
>> PRCF("X"	ADD+1, REA+1, DEA+1*
PRCFA	OUT!, ADD+1!, CPEDIT!, REA+1!, DEA+1!
PRCFA("ALL"	CPEDIT*
PRCFA("OUT"	ADD+3!, ADD+4!, CPEDIT, CPEDIT+4, CPEDIT+5, C, C+1, AD2+2, AD2+5, AD2+6
PRCFA("REACTIVATE"	REA1*
X	OUT!, ADD+2, CPEDIT, CPEDIT+6, CPEDIT+7, AD2+1, AD2+2, AD2+3, AD2+4, AD2+5 , AD2+7, AD2+9, Q!, REA1+2, DEA1+2, NA*
Y	OUT!, ADD+2, CPEDIT+1, AD2*, REA1, DEA1
Y(0	CPEDIT+1, CPEDIT+2