Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRCSEB1

Package: IFCAP

Routine: PRCSEB1


Information

PRCSEB1 ;WISC/SAW,DGL-CONTROL POINT ACTIVITY EDITS CON'T; [7/21/98 3:35pm]

Source Information

Source file <PRCSEB1.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
IFCAP 10 EDIT^PRC0B  $$QTRDATE^PRC0D  (BBFY,FCP,FY,QTR,SITE,SUBSITE)^PRCB0C  $$UPPER^PRCFFU5  ^PRCSDIC  OBL^PRCSES2  EBAL^PRCSEZ  TRANK^PRCSEZZ  
(EN,EN3)^PRCSUT  (EN1,EN2)^PRCSUT3  
VA FileMan 5 NOW^%DTC  EN^DDIOL  YN^DICN  ^DIE  ^DIK  
MailMan 1 ^XMD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
IFCAP 7 PRCB1A  PRCHSP  PRCSEB  PRCSEB0  PRCSECP  PRCSENA  PRCSENA FISCAL  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
ENOD ;ENTER OBLIGATION DATA
ENOD1 ;
ENCAD ;ENTER FMS DATA
ENA ;ENTER AN ADJUSTMENT
ADDADJ
ENA1
ENA2
ENA3 ;D:$O(^PRCS(410,DA,12,0)) SCPC0^PRCSED
ENFIS ;from fiscal's option
CT ;CANCEL AN ADJUSTMENT TRANSACTION
ENC ;ENTER CEILING TRANSACTION
CPU ;ENTER/EDIT CONTROL POINT USERS
CPU1
TUSER(CP) ;Check for IFCAP terminated users
TUSER1
SENDIT2 ;
W
W1
W2
W3
EXIT

External References

Name Field # of Occurrence
NOW^%DTC TUSER+7
EN^DDIOL CPU1+1
YN^DICN W3
^DIE ENOD1+3, ENCAD+4, ADDADJ, ENA1, ENA2+1, ENA3+1, ENFIS+9, ENC+1
^DIK TUSER1
EDIT^PRC0B CPU1
$$QTRDATE^PRC0D ADDADJ
BBFY^PRCB0C ENFIS+6
FCP^PRCB0C ENFIS+6
FY^PRCB0C ENFIS+5
QTR^PRCB0C ENFIS+5
SITE^PRCB0C ENFIS+3
SUBSITE^PRCB0C ENFIS+4
$$UPPER^PRCFFU5 ENA1+2
^PRCSDIC ENCAD+3
OBL^PRCSES2 ENA1+2
EBAL^PRCSEZ CT+2
TRANK^PRCSEZZ CT+5
EN^PRCSUT ENA+2, ENC+1
EN3^PRCSUT ENCAD+1, CPU+2
EN1^PRCSUT3 ENA+3, ENFIS+8, ENC+1
EN2^PRCSUT3 ENA+3, ENFIS+8, ENC+1
^XMD SENDIT2+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This option is no longer in use."
  • Line Location: ENOD+1
Function Call: WRITE
  • Prompt: !,"Committed (Estimated) Cost: "
  • Line Location: ENOD1+1
Function Call: WRITE
  • Prompt: ?28,$J($P(^(4),U),0,2)
  • Line Location: ENOD1+1
Function Call: WRITE
  • Prompt: ?28,"None entered."
  • Line Location: ENOD1+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: ENCAD+4
Function Call: WRITE
  • Prompt: L
  • Line Location: ENA+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: ENA+5
Function Call: WRITE
  • Prompt: L
  • Line Location: ENA+7
Function Call: WRITE
  • Prompt: $C(7),!,"You must enter an Adjustment $ Amount for this transaction.",!
  • Line Location: ENA2+1
Function Call: WRITE
  • Prompt: $C(7),!,"Adjustment $ Amount does not equal the total of BOC $ Amounts.",!,"Please correct the error.",!
  • Line Location: ENA2+3
Function Call: WRITE
  • Prompt: L
  • Line Location: ENFIS+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: ENFIS+11
Function Call: WRITE
  • Prompt: !!,"This adjustment has been cancelled."
  • Line Location: CT+6
Function Call: WRITE
  • Prompt: L
  • Line Location: ENC+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: ENC+2
Function Call: WRITE
  • Prompt: !,"You cannot use this option for this control point."
  • Line Location: CPU+3
Function Call: WRITE
  • Prompt: !!,"Checking for IFCAP terminated users...",!
  • Line Location: TUSER+2
Function Call: WRITE
  • Prompt: !?5,$P(A,"^",1)," is deactivated and was removed as a Control Point User *"
  • Line Location: TUSER+6
Function Call: WRITE
  • Prompt: !?5,$P(A,"^",1)," is terminated and was removed as a Control Point User **"
  • Line Location: TUSER+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: TUSER+9
Function Call: WRITE
  • Prompt: "* CONTACT THE IFCAP APPLICATION COORDINATOR TO REACTIVATE THE USER"
  • Line Location: TUSER+10
Function Call: WRITE
  • Prompt: "S"
  • Condition for execution: I>1
  • Line Location: TUSER+10
Function Call: WRITE
  • Prompt: " *",!
  • Line Location: TUSER+10
Function Call: WRITE
  • Prompt: "** CONTACT IRM TO REACTIVATE IN FILE 200 **",!
  • Line Location: TUSER+11
Function Call: WRITE
  • Prompt: ?5,"None found",!
  • Line Location: TUSER+12
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !!,"This transaction is assigned transaction number: ",X
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !!,"Sorry, you are not allowed to overcommit funds for control point ",$P(PRC("CP")," "),".",!,"Your current balance of $",PRCST1," is insufficient to cover the cost ($",PRCST,")",!,"of this request. Contact Fiscal Service.",$C(7)
  • 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: !!,"Would you like to enter another ",T(1)," transaction"
  • Line Location: W3+0
Routine Call
  • DIE
  • Line Location:
    • ENOD1+3
    • ENCAD+4
    • ADDADJ
    • ENA1
    • ENA2+1
    • ENA3+1
    • ENFIS+9
    • ENC+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(411 - [#411] ENFIS+4, TUSER+6
^PRC(420 - [#420] ENA2+2, CPU+3, TUSER+3
^PRC(442 - [#442] ENA3+1
^PRCS(410 - [#410] ENOD1+1, ENCAD+4, ENA+3*, ENA1+1*, ENA2+1, ENA2+3, ENA2+4*, ENA3+1, ENA3+2, ENFIS+8*
, CT+1!, CT+2, CT+4*, CT+5, ENC+1, ENC+2, SENDIT2+1
^VA(200 - [#200] TUSER+4

Label References

Name Line Occurrences
ADDADJ ENA+4, ENFIS+10
CT ENA1, ENA2+1, ENFIS+9
ENA ENA+3, ENA+5
ENA2 ENA2+1, ENA2+3
ENA3 ENA2+2
ENC ENC+1, ENC+2
ENCAD ENCAD+4
ENFIS ENFIS+8, ENFIS+11
EXIT ENOD1+3, ENCAD+1, ENCAD+3, ENCAD+4, ENA+2, ENA+5, ENFIS+3, ENFIS+4, ENFIS+5, ENFIS+6
, ENFIS+11, CT+6, ENC+1, ENC+2, CPU+2, CPU+3, W2
TUSER CPU1+2
TUSER1 TUSER+5, TUSER+6, TUSER+8
W ENA+3, ENFIS+8, ENC+1
W2 ENCAD+1, ENA+2, ENC+1, CPU+2
W3 ENCAD+4, ENA+5, ENFIS+11, ENC+2, W3

Naked Globals

Name Field # of Occurrence
^( CT+5
^(0 ENA2+2, CT+1*
^(11 CT+1*
^(3 ENA2+3
^(4 ENOD1+1, ENA2+3, CT+2
^(5 CT+1*
^(6 CT+1*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ENCAD+4, ENA+5, ENFIS+11, ENC+2, W3*
A ENFIS+2~, TUSER+1~, TUSER+4*, TUSER+5, TUSER+6, TUSER+8
AMOUNT ENA+1~, ENA2+4*, ENFIS+1~
B ENFIS+2~
C ENFIS+2~
CP TUSER~, TUSER+3, TUSER1
>> D ENCAD+2*
DA ENOD1+1, ENOD1+3, ENCAD+4*, ENA+3, ENA1+1, ENA2+1, ENA2+3, ENA2+4, ENA3+1, ENA3+2
, ENFIS+8, CT+1, CT+2, CT+4, CT+5*, ENC+1, ENC+2, CPU+2*, CPU1, TUSER1*
, EXIT!
DA(1 CT+5*, CPU+2*, CPU1, TUSER1*
DA(2 TUSER1*
DIC ENOD1+3, ENCAD+2*, ENCAD+4, ENA1, ENC+1, EXIT!
DIC("A" ENCAD+2*, ENCAD+3!
DIC("S" ENCAD+3*!
DIC(0 ENCAD+2*, ENCAD+4*, ENA1*, ENA1+3*, ENC+1*
DIE ENOD1+3*, ENCAD+4*, ADDADJ*, ENA1*, ENA1+3*, ENA3+1*, ENFIS+9*, ENC+1*, EXIT!
DIK TUSER1*!
DLAYGO EXIT!
DR ENOD1+3*, ENCAD+4*, ADDADJ*!, ENA1*!, ENA2!*, ENA3+1*, ENFIS+9*!, ENC+1*, EXIT!
DUZ ENA1+1, CPU+3
I CT+3*, TUSER+1~, TUSER+3*, TUSER+6*, TUSER+10, TUSER+12
J TUSER+1~, TUSER+3*, TUSER+8*, TUSER+11, TUSER+12
>> N CT+5*
PO ENA+1~, ENA3+1*, ENFIS+1~
PODATE ENA+1~, ENA3+1*, ENFIS+1~
PRC ENFIS+1~
PRC("BBFY" ENFIS+6
PRC("CP" ENA2+2, ENFIS+6, ENFIS+7, CT+1, CT+2, CPU+2, CPU+3, CPU1+2, W1
PRC("FY" ADDADJ, ENFIS+5, ENFIS+7, CT+2
PRC("QTR" ENA+2, ADDADJ, ENFIS+5, ENFIS+7, CT+2, ENC+1
PRC("SITE" ENCAD+1, ENA+2, ENA1+1, ENA2+2, ENFIS+3, ENFIS+4, ENFIS+7, CT+2, ENC+1, CPU+2
, CPU+3, TUSER+3
PRC("SST" ENFIS+4
>> PRCHSY SENDIT2+1
PRCS ENOD1+3*, EXIT!
PRCS58 ENA+5!, ENA2, ENFIS+11!, EXIT!
>> PRCSC CPU+3
PRCSL EXIT!
>> PRCSOB ENOD1+3
PRCSSC CPU+1~*, CPU+3*
>> PRCST W1
>> PRCST1 W1
PRCX442 ENA1+2~*
REC ENA+1~, ENA3+1*, ENFIS+1~
SITE ENA+1~, ENA1+1*, ENFIS+1~
ST TUSER+1~, TUSER+3*, TUSER+6, TUSER1
T CT+1*, EXIT!
T(1 ENCAD+4*, ENA+5*, ENFIS+11*, ENC+2*, W3
U ENOD1+1, ENA+3, ENA2+2, ENFIS+8
X ENA+3*, ENA1+2*, ENA2+3*, ENFIS+2~, ENFIS+7*, ENFIS+8*, CT+2*, CT+5*, ENC+1*, CPU1
, CPU1+1, TUSER+8, W, W2*, EXIT!
X1 ENA+3*, ENA2+3*, ENFIS+8*, ENC+1*, EXIT!
>> X2 ENA2+3*
XDA TUSER+1~, TUSER+3*, TUSER+4, TUSER+6, TUSER1
XMDUZ SENDIT2+1~*
XMSUB SENDIT2+1~, SENDIT2+2*
XMTEXT SENDIT2+1~, SENDIT2+2*
>> XMY( SENDIT2+2*
XX SENDIT2+1~*, SENDIT2+2
Y ENCAD+1, ENCAD+3, ENCAD+4, ENA+2, ENA1, ENA2+1, ENFIS+2~, ENFIS+9, ENC+1, CPU+2
Z ENFIS+2~, ENFIS+7*
ZX CT+2!*, CT+3*, CT+4!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All