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

Package: IFCAP

Routine: PRCSP1B


Information

PRCSP1B ;WISC/SAW-CONTROL POINT ACTIVITY ;10-11-91/10:24

Source Information

Source file <PRCSP1B.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Kernel 5 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  $$UP^XLFSTR  
VA FileMan 5 ^%DT  ^DIC  YN^DICN  EN1^DIP  ^DIR  
IFCAP 4 ^PRCFYN  ^PRCHDP1  ^PRCHQUE  (CP,EN1,EN3,FY,STA)^PRCSUT  

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 PRCEOPN  PRCSLTT  PRCSP1  PRCSP1F  PRCSPNR  PRCSPOS  PRCSSCPR  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**150**;Oct 20, 2000;Build 24
PROJ ;PROJECT NUMBER REPORT
TEMPT ;LIST OF TEMPORARY TRANSACTIONS
DATE
EDATE
QUE
TCMP ;COMPILE FCP TEMP REQUESTS
TC1
TC2
TPRT ;PRINT OF THE TEMP TX REPORT
PT1
PT2
TQUIT
TEXIT
HDR ;PRINT HEADING
EOP() ; end of page check - return 1 to quit, 0 to continue
;
NOW() ; return NOW in external format for print on reports
SUBCP ;SUB-CONTROL POINT REPORT
S1
S2
POS ;PURCHASE ORDER STATUS
POS1
POS2
S
DEV
W1
W2
NONE
W
EXIT

External References

Name Field # of Occurrence
^%DT DATEEDATE
^%ZIS QUEDEV
HOME^%ZIS QUE+1
^%ZISC TEXIT+2, W+1
^%ZTLOAD QUE+1
^DIC POS+2
YN^DICN POS1POS2
EN1^DIP PROJ+4, S1+5, S2+5, S+1
^DIR EOP+6
^PRCFYN SUBCP+2
^PRCHDP1 POS1
^PRCHQUE POS2+1
CP^PRCSUT S2
EN1^PRCSUT PROJ+1, S1
EN3^PRCSUT TEMPT+3, POS+1
FY^PRCSUT S2
STA^PRCSUT S2
$$FMTE^XLFDT PT2+4, NOW+2
$$NOW^XLFDT NOW+2
$$UP^XLFSTR NOW+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " Start Date REQUIRED"
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: " Go to Date REQUIRED"
  • Line Location: EDATE+1
Function Call: WRITE
  • Prompt: !!,$C(7),"ENDING DATE RANGE IS LESS THAN BEGINNING DATE RANGE",!
  • Line Location: EDATE+3
Function Call: WRITE
  • Prompt: !,$P(PRCR0,U),?19,PRCRDATE,?32,PRCREQTR,?43,PRCVEND,?54,$E(PRCFITEM,1,15),?70,$J($FN(PRCCOST,",",2),10)
  • Line Location: PT2+5
Function Call: WRITE
  • Prompt: !!," << NO TEMPORARY TRANSACTIONS TO PRINT FOR TIME PERIOD SELECTED >>"
  • Line Location: TQUIT+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: @IOF,!,"TEMPORARY TRANSACTION LISTING - CONTROL POINT ",PRC("CP")
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,?45,PRCNOW,"Page ",$J(PRCPAGE,3)
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,"TEMPORARY",?19,"DATE OF",?54,"FIRST LINE ITEM COMM"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,"TRANSACTION #",?19,"REQUEST",?32,"REQUESTOR VENDOR",?54,"DESCRIPTION",?71,"COST"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,PRCDSH
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !
  • Line Location: EOP+4
Function Call: WRITE
  • Prompt: !,"Would you like the report printed for a full Fiscal Year"
  • Line Location: SUBCP+1
Function Call: WRITE
  • Prompt: !!,"Purchase Order Status: ",$P(X,"^")
  • Line Location: POS+3
Function Call: WRITE
  • Prompt: !!,"Would you like the purchase order display"
  • Line Location: POS1+0
Function Call: WRITE
  • Prompt: !!,"Enter information for another report or an uparrow to return to the menu.",!
  • 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: !!,"A status has not yet been reported for this purchase order."
  • Line Location: NONE+0
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !!,"Press return to continue: "
  • Line Location: W+0
Routine Call
  • DIC
  • Line Location:
    • POS+2
Routine Call
  • DIR
  • Line Location:
    • EOP+6
Routine Call
  • %ZIS
  • Line Location:
    • QUE
    • DEV
Routine Call
  • %ZIS
  • Line Location:
    • QUE+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(442 - [#442] POS+2
^PRCD(442.3 - [#442.3] POS+3
^PRCS(410 - [#410] TC1TC2TC2+1, TC2+2, TC2+4, PT2+2, PT2+4
^TMP($J TEMPT+2!, TC2+6*, PT1PT2TEXIT+1!
^VA(200 - [#200] PT2+4

Label References

Name Line Occurrences
$$EOP HDR+1
$$NOW TPRT+1
DATE DATE+1
EDATE EDATE+1, EDATE+3
EXIT PROJ+1, TEMPT+3, QUESUBCP+2, S1S1+1, S2S2+1, S2+5, POS+1
POS+2, POS+3, POS1POS2POS2+1, W2NONE
HDR TPRT+2, PT2+6, TEXIT+1
POS POS+3, POS1POS2POS2+1
POS1 POS1
POS2 POS1POS2
PT1 PT2
PT2 PT2+7
S2 SUBCP+2
SUBCP S1+6
TC1 TC2
TC2 TC2+1, TC2+2, TC2+3, TC2+4, TC2+5, TC2+7
TCMP QUE
TEXIT DATEEDATEQUE+1, PT2+6
TPRT TC1
TQUIT PT1
W1 POS1POS2POS2+1
W2 PROJ+1, TEMPT+3, S1S2POS+1

Naked Globals

Name Field # of Occurrence
^(0 POS+3
^(7 POS+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% SUBCP+2*, POS1*, POS2*, EXIT!
%DT DATE*, EDATE*, TEXIT+3!, EXIT!
%DT("A" DATE*, EDATE*
%ZIS QUE*, TEXIT+4!, DEV*
%ZIS("B" DEV*
BY PROJ+3*, PROJ+4!, S1+4*, S2+3*, EXIT!
C EXIT!
C0 EXIT!
C2 EXIT!
D EXIT!
>> D0 POS+2*
DA EXIT!
DHD PROJ+3*, PROJ+4!, S1+3*, S2+2*, EXIT!
DIC PROJ+3*, PROJ+4!, S1+3*, S2+2*, POS+2*!, S*, EXIT!
DIC("A" POS+2*
DIC("S" POS+2*
DIC(0 POS+2*
DIE EXIT!
DIR EOP+2~
DIR(0 EOP+5*
DIROUT EOP+2~
DIRUT EOP+2~
DIS(0 S1+6!, S2+4*, S2+5!
DTIME W
DTOUT DATEEDATETEXIT+3!, EOP+2~
DUOUT EOP+2~
FLDS PROJ+3*, PROJ+4!, S1+4*, S2+2*, EXIT!
FR PROJ+3*, PROJ+4!, S1+4*, S2+3*, EXIT!
I EOP+4*, EXIT!
IO QUEWW+1
IO("Q" QUE, DEV!
>> IO(0 WW+1
IOF HDR+2, HDR+3
IOP POS2+1!
IOSL PT2+6, TEXIT*, EOP+4
IOST TEXITHDR+1, EOP+3
L PROJ+3*, PROJ+4!, S1+5*, S2+3*, S*, EXIT!
N EXIT!
NOW TEXIT+4!
POP QUETEXIT+4!
PRC("CP" PROJ+2, PROJ+3, PROJ+4!, TCMP+1, HDR+3, S1+1, S1+2, S1+3, S1+6!, S2+2
S2+3, S2+5!
PRC("FY" PROJ+2, S1+2, S1+3, S1+6!, S2S2+3, S2+5!
PRC("QTR" PROJ+2, S1+2, S1+3, S1+6!
PRC("SCP" S1+6!
>> PRC("SITE" PROJ+1, PROJ+2, TEMPT+3, S1S1+2, S2S2+3, POS+1
PRCANX TCMP+1*, TC1*, TC2TEXIT+3!
PRCANXH TCMP+1*, TC1TEXIT+3!
PRCCOST PT2+3*, PT2+5, TEXIT+4!
PRCDATE TEXIT+3!
PRCDATE(1 DATE+2*, EDATE+3, TC2+5
PRCDATE(2 EDATE+2*, EDATE+3, TC2+5
PRCDATEA TPRT+3*, PT1*, PT2TEXIT+3!
PRCDSH TPRT+1*, TEXIT+3!, HDR+7
PRCEND TCMP+1*, TPRT+2*, PT2+6, TEXIT+3!, HDR+1*
PRCEXIT TPRT+2*, PT1*, TEXIT+4!, HDR+2
PRCFITEM PT2+4*, PT2+5, TEXIT+4!
>> PRCHQ POS2+1*
>> PRCHQ("DEST" POS2+1*
PRCNOW TPRT+1*, TEXIT+3!, HDR+4
PRCPAGE TPRT+2*, TQUIT*, TEXIT+1, TEXIT+3!, HDR+1, HDR+3*, HDR+4
PRCR0 TC2+2*, TC2+3, PT2+2*, PT2+5, TEXIT+3!
PRCR1 TC2+4*, TC2+5, TC2+6, PT2+2*, PT2+3, TEXIT+3!
PRCR2 PT2+2*, PT2+3, TEXIT+3!
PRCR4 PT2+2*, PT2+3, TEXIT+3!
PRCR7 PT2+2*, PT2+3, TEXIT+3!
PRCRDATE PT2+3*, PT2+4*, PT2+5, TEXIT+4!
PRCREQTR PT2+3*, PT2+4*, PT2+5, TEXIT+4!
PRCS EXIT!
PRCS(1 S1+6!, S2+5!
PRCSAZ PROJ+2*, PROJ+3, PROJ+4!, S1+2*, S1+4, S1+5
PRCSIEN TC1*, TC2*, TC2+1, TC2+2, TC2+4, TC2+6, PT1*, PT2*, PT2+2, PT2+4
TEXIT+3!
>> PRCSX POS1POS2POS2+1
PRCTTOT TCMP+1*, TPRT+1*, PT2+1*, TQUITTEXIT+4!
PRCVEND PT2+3*, PT2+5, TEXIT+4!
Press return to continue:C3 EXIT!
TO PROJ+3*, PROJ+4!, S1+5*, S2+3*, EXIT!
U DATE*, EDATETC2+3, TC2+5, TC2+6, PT2+3, PT2+4, PT2+5
X DATEDATE+1, EDATEEDATE+1, TEXIT+3!, EOP+2~, NOW+1~, NOW+2*, NOW+3, POS+2*
POS+3*, W2*, W*, EXIT!
Y PROJ+1, TEMPT+3, DATE+2, EDATE+2, EOP+2~, EOP+7, S1S2S2+1, POS+1
POS+2, EXIT!
Z EXIT!
Z1 EXIT!
ZTDESC QUE+1*, TEXIT+3!
>> ZTQUEUED WW+1
ZTRTN QUE+1*, TEXIT+3!, EXIT!
ZTSAVE TEXIT+3!, EXIT!
ZTSAVE("DATE*" QUE+1*
ZTSAVE("PRC*" QUE+1*
ZTSK POS2+1!
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