Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCS(410 - [#410] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call