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: PRCSEC2

Package: IFCAP

Routine: PRCSEC2


Information

PRCSEC2 ;WISC/DJM-CONTINUATION OF PRCSEC ;4/30/93 3:08 PM

Source Information

Source file <PRCSEC2.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
CAP(XX) ;FIND OUT NUMBER OF REQUESTS TO APPROVE FOR SUPPLY FUND, TOTAL AMOUNT OF OF REQUESTS, AND CHECK FOR SUFFICIENT $S TO PURCHASE. INFORM USER OF RESULTS.
OK ;THIS IS WHERE THE SUPPLY FUND CAP INFORMATION IS UPDATED. THE CONTROL POINT OFFICIAL HAS APPROVED THE TRANSACTION AND THERE ARE SUFFICIENT FUNDS TO PURCHASE THE ITEMS DESIRED.
W1
W2
W3
PRCB ;The option PRCB CAP EDIT uses this entry point to enter or edit the SUPPLY FUND CAP.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There are no funds available to approve requests at this time.",!,"Please try later."
  • Line Location: CAP+10
Function Call: WRITE
  • Prompt: !!,"You have "_CT_" request"_$S(CT:"s",1:"")_" to be approved for SUPPLY FUND. Estimated $: "_$J(AMT,9,2)_"."
  • Line Location: CAP+11
Function Call: WRITE
  • Prompt: !,?5,"The TOTAL dollar CAP available is $"_$J(AA,9,2)_".",!
  • Line Location: CAP+13
Function Call: WRITE
  • Prompt: !,?5,"TRANSACTION",?30,"$ AMOUNT TO APPROVE"
  • Line Location: CAP+14
Function Call: WRITE
  • Prompt: !,?5,$P(^PRCS(410,$P(@X1,U),0),U),?30,"$"_$J($P(@X1,U,2),9,2)
  • Line Location: CAP+14
Function Call: WRITE
  • Prompt: !
  • Line Location: CAP+15
Function Call: WRITE
  • Prompt: !!,"AN ERROR HAS OCCURRED."
  • Line Location: W1+0
Function Call: WRITE
  • Prompt: !!,"YOUR SITE IS UNDEFINED."
  • Line Location: W2+0
Function Call: WRITE
  • Prompt: " PLEASE CONTACT YOUR APPLICATIONS COORDINATOR",!,"TO RESOLVE THIS PROBLEM."
  • Line Location: W3+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRCB+1
Function Call: WRITE
  • Prompt: !!!,?15,"SIGNATURE CODE FAILURE"
  • Line Location: PRCB+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PRCB+6
Function Call: WRITE
  • Prompt: !!!,?7,"The Supply Fund Cap for your Station is now: $",$FN(+$P($G(^PRC(420,+DA,0)),"^",3),",",2)
  • Line Location: PRCB+9

FileMan Files Accessed Via FileMan Db Call

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