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
Print Page as PDF
Routine: PRCSQR

Package: IFCAP

Routine: PRCSQR


Information

PRCSQR ;WISC/KMB-QUARTERLY REPORT ;10/17/94 9:00

Source Information

Source file <PRCSQR.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
START ;
PROCESS ;
PROCESS1 ;
PROCESS2 ;
HOLD ;
HDR ;
WRITE ;
W1 ;
W2 ;
EXIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: START+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !,L
  • Line Location: PROCESS+5
Function Call: WRITE
  • Prompt: !,$P($P(X,"^"),"-",5),?6,X1,?11,PONUM
  • Line Location: PROCESS2+3
Function Call: WRITE
  • Prompt: ?19,$J(ESTAMT,10,2),$P(PRCH,"^",1)
  • Line Location: PROCESS2+4
Function Call: WRITE
  • Prompt: ?29,$J(OBLAMT,10,2),$P(PRCH,"^",2)
  • Line Location: PROCESS2+5
Function Call: WRITE
  • Prompt: ?PLACE,Y
  • Line Location: PROCESS2+7
Function Call: WRITE
  • Prompt: !,?29,$J(PRCS("PRE"),10,2)
  • Line Location: PROCESS2+8
Function Call: WRITE
  • Prompt: ?44,$J(PRCS("C"),10,2)
  • Line Location: PROCESS2+9
Function Call: WRITE
  • Prompt: ?59,$J(PRCS("O"),10,2)
  • Line Location: PROCESS2+10
Function Call: WRITE
  • Prompt: !,$P($G(^PRCS(410,N(1),2)),"^")
  • Line Location: PROCESS2+11
Function Call: WRITE
  • Prompt: ?40,$E(STR,1,40)
  • Line Location: PROCESS2+12
Function Call: WRITE
  • Prompt: !,$G(^PRCS(410,N(1),"CO",1,0)),!
  • Line Location: PROCESS2+13
Function Call: READ
  • Variable: Z1
  • Timeout: DTIME
  • Line Location: HOLD+1
Function Call: WRITE
  • Prompt: !,"Press return to continue, uparrow (^) to exit: "
  • Line Location: HOLD+1
Function Call: WRITE
  • Prompt: @IOF,"QUARTERLY REPORT - ",Z(0)_" "_$E($P(PRC("CP")," ",2),1,15),?53,TY,?76,"PAGE: ",P
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,?21,"TRANS $",?33,"OBL/CEIL",?45,"DATE",?57,"DATE",?69,"DATE",!,"SEQ#",?6,"TYPE",?11,"PO/OBL#",?21,"AMOUNT",?33,"$ AMOUNT",?45,"REQ.",?57,"OBL.",?69,"REC'D."
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?29,"CONTROL POINT",?44,"UNCOMMITTED",?59,"UNOBLIGATED",!,?29,"REQUEST TOTAL",?44,"BALANCE",?59,"BALANCE"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"VENDOR",?40,"FIRST LINE DESCRIPTION",!,"COMMENT"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,L
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !!,"Total Request Amount: ",SIGN(1)_$J(PRCS("PRE"),0,2),!,"Control Point Official's Balance: ",SIGN(2)_$J(PRCS("C"),0,2),!,"Fiscal's Unobligated Balance: ",SIGN(3)_$J(PRCS("O"),0,2),!
  • Line Location: WRITE+2
Function Call: WRITE
  • Prompt: !,"Would you like to run another quarterly balance report"
  • Line Location: W1+1
Function Call: READ
  • Variable: X
  • Timeout: 5
  • Line Location: W2+1
Function Call: WRITE
  • Prompt: !,"You are not an authorized control point user.",!,"Contact your control point official."
  • Line Location: W2+1
Info |  Source |  Entry Points |  Interaction Calls