Routine: PRCEN

Package	Total	Call Graph
IFCAP	10	YN^PRC0A DELETE^PRC0B1 $$EN1^PRCE0A NODE^PRCS58OB ^PRCSDIC (W1,W6)^PRCSEB SCPC0^PRCSED PRF1^PRCSP1 (EN,EN3)^PRCSUT (EN1,EN2,EN2B)^PRCSUT3
VA FileMan	5	EN^DDIOL ^DIC YN^DICN ^DIE ^DIR

Package	Total	Caller Graph
IFCAP	7	PRCE NEW 1358S PRCEADJ PRCEC EDIT PRCEC NEW PRCSAPP1 PRCSECP PRCSUT2

Entry Points

Name	Comments	DBIA/ICR reference
V	;;5.1;IFCAP;23,148,150,196,204,209;Oct 20, 2000;Build 3
EN	;new 1358 request
EN0
ED	;edit 1358
ED0
ED1
SCPE	;sub control point edit
REV
OUT
CHECK(PRC410)	; - Check out a 1358 410 entry for required fields
CKEX
CKER(X)	;
Q1358(PRCSTA,PRCFCP,PRCTT,PRCDA)	; Quit 1358 Process ; This API warns a control point offical that they will be set as ; the requestor on the 1358 and thus cannot also approve it. ; The API will return 1 (true) if the user decided to quit the ; current process before being set as the requestor.
COMCHK	;Check Committed Date to insure it is within the FY/FQ range during option entry for 'NEW 1358' ;PRC5.1196

External References

Name	Field # of Occurrence
EN^DDIOL	EN0+19, EN0+32, ED0+8
^DIC	EN0+11, EN0+12
YN^DICN	REV
^DIE	EN0+22, EN0+26, ED1, ED1+5, ED1+11, SCPE+1
^DIR	EN0+43, ED1+12, Q1358+35
YN^PRC0A	EN0+27
DELETE^PRC0B1	EN0+29
$$EN1^PRCE0A	ED1+6
NODE^PRCS58OB	ED0+10
^PRCSDIC	ED0+5
W1^PRCSEB	EN0+37
W6^PRCSEB	EN0+39, ED1+9, ED1+11
SCPC0^PRCSED	EN0+35, ED1+8
PRF1^PRCSP1	REV
EN^PRCSUT	EN0+2
EN3^PRCSUT	ED0+2
EN1^PRCSUT3	EN0+14
EN2^PRCSUT3	EN0+15
EN2B^PRCSUT3	ED0+12

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"You are not an authorized control point user.",!,"Contact your control point official." Line Location: EN0+2
Function Call: WRITE	Prompt: !!,"This transaction is assigned Transaction number: ",X Line Location: EN0+15
Function Call: WRITE	Prompt: !! Line Location: EN0+44
Function Call: WRITE	Prompt: !!,"You are not an authorized control point user.",!,"Contact your control point official." Line Location: ED0+2
Function Call: WRITE	Prompt: $C(7),!,"Adj $ Amt does not equal the total of BOC $ Amts.",!,"Please correct the error.",! Line Location: ED1+7
Function Call: WRITE	Prompt: !?5,PRCER(PRCER),"!!!" Line Location: CKEX+0
Function Call: WRITE	Prompt: !,"WARNING: The system will assign you as the CP Clerk (Requestor) of this 1358." Line Location: Q1358+26
Function Call: WRITE	Prompt: !,"You will be unable to approve a 1358 on which you are the REQUESTOR due to" Line Location: Q1358+27
Function Call: WRITE	Prompt: !,"segregation of duties." Line Location: Q1358+28
Function Call: WRITE	Prompt: !,"WARNING: The system will assign you as the CP Clerk (Requestor) of this 1358" Line Location: Q1358+30
Function Call: WRITE	Prompt: !,"Adjustment. You will be unable to approve a 1358 Adjustment on which you" Line Location: Q1358+31
Function Call: WRITE	Prompt: !,"are the REQUESTOR due to segregation of duties." Line Location: Q1358+32
Function Call: WRITE	Prompt: ! Line Location: Q1358+36
Function Call: WRITE	Prompt: !!," Date Committed must be specified for time ",!," period covered by fiscal year ",PRC("BBFY")," ",! Line Location: COMCHK+8
Routine Call	DIC Line Location: EN0+11 EN0+12
Routine Call	DIE Line Location: EN0+22 EN0+26 ED1 ED1+5 ED1+11 SCPE+1
Routine Call	DIR Line Location: EN0+43 ED1+12 Q1358+35

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PRC(420 - [#420]	EN0+21, Q1358+19, COMCHK+2, COMCHK+4
^PRCS(410 - [#410]	EN0+18, EN0+28, EN0+30*, EN0+35, EN0+38, EN0+42, ED0+7, ED0+11, ED0+13, ED1 , ED1+2, ED1+5, ED1+6, ED1+7, ED1+8, ED1+13, OUT, CHECK+5, CHECK+13, Q1358+23
^PRCS(410.9 - [#410.9]	EN0+12, EN0+25, CHECK+6, CHECK+20, CHECK+21

Label References

Name	Line Occurrences
$$CHECK	EN0+38, ED1+9, ED1+11
$$Q1358	EN0+6, ED1+2
CKER	CHECK+13, CHECK+19, CHECK+20, CHECK+21, CHECK+22, CHECK+23, CHECK+24, CHECK+25
CKEX	CHECK+16
ED0	ED0+6, ED1, ED1+2, ED1+5, ED1+14
ED1	ED1+6, ED1+7
EN0	EN0+17, EN0+44
OUT	ED0+13, ED1+9, ED1+12
REV	ED1+9, ED1+11, REV
SCPE	ED0+13

Naked Globals

Name	Field # of Occurrence
^(0	EN0+21
^(3	ED1+7
^(4	ED1+7
^(7	ED0+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	REV*
DA	EN0+16, EN0+17, EN0+18, EN0+19!, EN0+29, EN0+35, EN0+38, ED+1~, ED0!, ED0+5* , ED0+6, ED0+7, ED0+8!, ED0+10, ED0+11, ED0+13, ED1, ED1+2, ED1+5, ED1+7 , REV*, Q1358+20~
DIC	EN+1~, EN0!, EN0+10~, EN0+11, EN0+22, ED+1~, ED0!, ED0+4, ED1, ED1+5
DIC("A"	EN0+11, EN0+12
DIC("S"	EN0+11, EN0+12, ED0+4*, ED0+5!
DIC(0	EN0+11, EN0+22, ED0+4*
DIE	EN+1~, EN0!, EN0+22, ED+1~, ED0!, ED0+4, ED1, ED1+5
>> DILOCKTM	EN0+18, ED0+7
DIR	EN+1~, EN0!, ED+2~, ED0!, Q1358+20~, Q1358+35!
DIR("A"	EN0+43, ED1+12, Q1358+34*
DIR("B"	EN0+43, ED1+12, Q1358+34*
DIR(0	EN0+43, ED1+12, Q1358+34*
DIROUT	Q1358+20~
DIRUT	EN+1~, EN0!, EN0+43, ED1+12, Q1358+20~, Q1358+35
DR	EN+1~, EN0!, EN0+22, EN0+26, ED+2~, ED0!, ED1, ED1+5, ED1+7!, ED1+11* , SCPE+1*
DTOUT	EN0+10~, ED+2~, Q1358+20~
DUOUT	EN0+10~, Q1358+20~
DUZ	Q1358+19, Q1358+23
>> N	REV*
PRC	EN+1~, EN0!, ED+1~, ED0!
PRC("BBFY"	COMCHK+4*, COMCHK+5, COMCHK+8
PRC("CP"	EN0+6, EN0+21, ED1+2, COMCHK+2, COMCHK+4
PRC("FY"	ED0+11*, COMCHK+2, COMCHK+4
PRC("QTR"	EN0+3, ED0+11*, COMCHK+5
PRC("SITE"	EN0+2, EN0+6, EN0+21, ED0+2, ED1+2, COMCHK+2, COMCHK+4
PRC0	CHECK+1~, CHECK+10, CHECK+16
PRC1	CHECK+1~, CHECK+24, CHECK+25
PRC11	CHECK+1~, CHECK+6, CHECK+19, CHECK+20, CHECK+21
PRC3	CHECK+1~, CHECK+22, CHECK+23
PRC410	EN+2~, EN0+1!, EN0+16, EN0+38, EN0+42, ED+1~, ED0+10, ED1+6, ED1+9, ED1+11 , CHECK~, CHECK+2, CHECK+5, CHECK+13
PRC442	ED+1~, ED1+6*
PRCAED	EN0+1!, EN0+23, EN0+29, EN0+34
PRCAUTH	EN+2~, EN0+11*, EN0+12, EN0+25
PRCAUTHS	EN+2~, EN0+1!, EN0+12*, EN0+22, EN0+25
>> PRCBBMY	COMCHK+3
>> PRCCKERR	COMCHK+3, COMCHK+5, COMCHK+7*
>> PRCCOMDT	COMCHK+6
PRCDA	Q1358~, Q1358+23
PRCDT	COMCHK+1~, COMCHK+5*, COMCHK+6
PRCDT1	COMCHK+1~, COMCHK+5*, COMCHK+6
PRCER	CHECK+1~, CHECK+7, CKEX, CKER+1*, CKER+2
PRCER(	CKEX, CKER+2*
PRCER(0	CKEX+1
PRCFCP	Q1358~, Q1358+19
PRCHQ	ED+1~, ED0!
PRCIENCT	EN0+28*, EN0+30, EN0+31!
PRCONT	EN+2~, EN0+25*, ED+2~
PRCQ	EN+2~, EN0+9, EN0+11, EN0+12*, EN0+13
PRCS	EN+1~, EN0!, ED+1~, ED0!
PRCS2	EN+1~, EN0!, EN0+21*, EN0+38, EN0+44!
PRCSCP	EN+1~, EN0!
PRCSDA	ED+2~, ED0+1!, ED0+5*, ED1+13, OUT
PRCSDR	ED+1~, ED0!
PRCSF	EN0+36!, REV*!
PRCSIP	EN+1~, EN0!, EN0+22
PRCSL	EN+1~, EN0!, ED+2~, ED0+1!
PRCSN	EN+1~, EN0!, ED+1~, ED0!
PRCST	EN+2~, EN0+1!, ED+1~, ED0!
PRCST1	EN+2~, EN0+1!, ED+1~, ED0!
PRCSTA	Q1358~, Q1358+19
PRCSTT	EN+2~, EN0+1!
PRCSY	ED+2~, ED0!, ED0+5*, ED1, ED1+2, ED1+5, ED1+8
PRCSZ	REV*!
PRCTAPPR	COMCHK+1~, COMCHK+2*, COMCHK+4
PRCTT	Q1358~, Q1358+25, Q1358+29
PRCUA	EN+2~, EN0+1!, EN0+23, EN0+27, EN0+38
PRCVEN	EN+2~, EN0+25*, ED+2~
PRCX	CHECK+1~, CHECK+5, CHECK+6, CHECK+22, CHECK+23
RET	Q1358+15~, Q1358+16, Q1358+35, Q1358+38
T	ED+2~, ED0+1!
T1	ED+2~, ED0+1!
>> TRNODE	ED0+10
TT	ED+1~, ED0!, ED0+11*, ED1, ED1+2, ED1+5, ED1+6, ED1+7, ED1+8, ED1+9
U	ED0+13, ED1+6, ED1+7
X	EN+1~, EN0!, EN0+10~, EN0+14, EN0+15, EN0+27, EN0+29, EN0+30, EN0+32, ED+2~ , ED0+1!, ED0+11, ED1+7*, REV!, CKER~, CKER+2, Q1358+20~
X1	EN+1~, EN0!, EN0+15, ED+2~, ED0+1!, ED1+7
>> X4	EN0+22*
Y	EN0+3, EN0+10~, EN0+11, EN0+12, EN0+27, EN0+43, ED+1~, ED0!, ED0+3, ED0+5 , ED1+5, ED1+12, Q1358+20~, Q1358+35
Z	ED+2~, ED0+1!

Customize PDF page

Package: IFCAP

Routine: PRCEN

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: