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

Package: IFCAP

Routine: PRCSEA


Information

PRCSEA ;WISC/SAW/DXH/BM/SC/DAP - CONTROL POINT ACTIVITY EDITS ;5/8/13 15:31

Source Information

Source file <PRCSEA.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
IFCAP 9 ERS410^PRC0G  ^PRCSCK  ^PRCSDIC  CKPRM^PRCSEB  TRANK^PRCSEZZ  ($$BBFY,EN1F,EN3,EX,FY,IP,QT)^PRCSUT  RL^PRCSUT1  EN2A^PRCSUT3  
EN^PRCVTCA  
VA FileMan 5 ^%DT  ^DIC  YN^DICN  ^DIE  ^DIK  
Toolkit 1 $$GET^XPAR  

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

Package Total Caller Graph
IFCAP 4 PRCSCT  PRCSDT  PRCSEDRS  PRCSENRS  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**81,147,150,174,196,204**;Oct 20, 2000;Build 14
ENRS ;ENTER REQ
ENRS0
TYPE ;
EN1
CMDAT
EDRS ;EDIT REQ
; following line commented out by PRC*5*140 - user responses not used to limit selection of txn and sometimes resulted in bad info being set into the selected txn
; S PRCSK=1 D EN1F^PRCSUT(1) G W2:'$D(PRC("SITE")),EXIT:Y<0 ; ask sta,FY,QRTR,CP ; prc*5*197
; if the above line is reactivated, programmer should note that the transaction selected may not be of the same FY,QRTR,sta, subst, and CP specified by the user
ED1
COMDT
CT ;CANCEL A (PERMANENT) TRANS
CT1
DT ;DELETE A (TEMPORARY) TRANS
DT1
DOR ; Date of Request
FORM ;*81 Allow user to change txn to a valid form and check site parameter to see if issue books are allowed
BACKOUT(TRNNAME,TRNDA) ;
W2
W3
W4
W5
W6
CKPRM
EXIT

External References

Name Field # of Occurrence
^%DT DOR+2
^DIC TYPE+4, FORM+8
YN^DICN CT1, DT1, BACKOUT+3, W4, W5
^DIE EN1+1, CMDAT+2, ED1+1, COMDT+2, CT1+3, CT1+19
^DIK CT1+7, CT1+23, DT1+7, BACKOUT+8
ERS410^PRC0G CT1+16
^PRCSCK CMDAT+5, COMDT+5
^PRCSDIC ENRS0+3, EDRS+8, CT+7, DT+5
CKPRM^PRCSEB ENRS0+8
TRANK^PRCSEZZ CT1+15
$$BBFY^PRCSUT EDRS+18
EN1F^PRCSUT ENRS+2
EN3^PRCSUT CT+1
EX^PRCSUT EDRS+16, EDRS+17, EDRS+18
FY^PRCSUT EDRS+16
IP^PRCSUT EDRS+20
QT^PRCSUT EDRS+17
RL^PRCSUT1 CMDAT+4, COMDT+4
EN2A^PRCSUT3 ENRS0+13
EN^PRCVTCA CT1+21
$$GET^XPAR CKPRM

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7)," Must be a new (unique) entry."
  • Line Location: ENRS0+6
Function Call: WRITE
  • Prompt: !!,PRCVY,!
  • Line Location: ENRS0+9
Function Call: WRITE
  • Prompt: !,"File is being accessed...try a different transaction number or try later"
  • Line Location: ENRS0+11
Function Call: WRITE
  • Prompt: !!,"This transaction is assigned temporary transaction number: ",T(2)
  • Line Location: TYPE+1
Function Call: WRITE
  • Prompt: "??"
  • Line Location: TYPE+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: CMDAT+9
Function Call: WRITE
  • Prompt: !,"File is being accessed...please try later"
  • Line Location: EDRS+10
Function Call: WRITE
  • Prompt: !,"The form type for this transaction is ",$P($G(^PRCS(410.5,X,0)),"^"),!
  • Line Location: EDRS+28
Function Call: WRITE
  • Prompt: !!
  • Line Location: EDRS+29
Function Call: WRITE
  • Prompt: !!
  • Line Location: COMDT+9
Function Call: WRITE
  • Prompt: !,"File is being accessed...please try later"
  • Line Location: CT1+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: CT1+5
Function Call: WRITE
  • Prompt: !,"Enter comments for this cancellation",!
  • Line Location: CT1+17
Function Call: WRITE
  • Prompt: !!
  • Line Location: CT1+25
Function Call: WRITE
  • Prompt: !,"File is being accessed...please try later"
  • Line Location: DT+8
Function Call: WRITE
  • Prompt: !,"Okay....."
  • Line Location: DT1+6
Function Call: WRITE
  • Prompt: "It's deleted"
  • Line Location: DT1+14
Function Call: WRITE
  • Prompt: !!
  • Line Location: DT1+16
Function Call: WRITE
  • Prompt: !,PRCVY1,!
  • Line Location: FORM+4
Function Call: WRITE
  • Prompt: !,"Please enter another form type",!
  • Line Location: FORM+5
Function Call: WRITE
  • Prompt: !!,"WARNING: WITHOUT A FORM TYPE, TRANSACTION """,TRNNAME,""" WILL BE DELETED!",$C(7)
  • Line Location: BACKOUT+2
Function Call: WRITE
  • Prompt: !,"Are you sure you want to delete this transaction"
  • Line Location: BACKOUT+3
Function Call: READ
  • Variable: X
  • Timeout: 5
  • Line Location: W2+0
Function Call: WRITE
  • Prompt: !!,"You are not an authorized control point user.",!,"Contact control point official"
  • Line Location: W2+0
Function Call: WRITE
  • Prompt: !!,"This transaction is assigned temporary transaction number: ",X
  • Line Location: W3+1
Function Call: WRITE
  • Prompt: !!,"Would you like to ",T," another transaction"
  • Line Location: W4+0
Function Call: WRITE
  • Prompt: !!,"Would you like to ",T," another request"
  • Line Location: W5+0
Function Call: WRITE
  • Prompt: !!,"For the transaction number, use an uppercase alpha as the first character,",!," and then 2-15 alphanumerics, as in 'ADP1'.",!
  • Line Location: W6+0
Routine Call
  • DIC
  • Line Location:
    • TYPE+4
    • FORM+8
Routine Call
  • DIE
  • Line Location:
    • EN1+1
    • CMDAT+2
    • ED1+1
    • COMDT+2
    • CT1+3
    • CT1+19

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(420 - [#420] ENRS0+18
^PRC(443 - [#443] CT1+23
^PRCS(410 - [#410] ENRS0+11, ENRS0+14*, ENRS0+15*, ENRS0+16*, TYPE+12*, TYPE+15*, EN1+3, CMDAT, CMDAT+1, CMDAT+7
, EDRS+10, EDRS+13, EDRS+14, EDRS+19, EDRS+21*, EDRS+22, ED1+3, COMDT, COMDT+1, COMDT+6*
, COMDT+7, CT1+2, CT1+4, CT1+6, CT1+8*, CT1+10*, CT1+11!, CT1+13, CT1+14*, CT1+15
, CT1+22, DT+8, DT1+4, DT1+8*, DT1+9, DOR+1, DOR+2*, FORM+10*, BACKOUT+7, BACKOUT+9*
^PRCS(410.5 - [#410.5] EDRS+28
^PRCS(420 TYPE+8
^VA(200 - [#200] ENRS0+15

Label References

Name Line Occurrences
$$BACKOUT TYPE+8
BACKOUT BACKOUT+4
CKPRM EDRS+25, FORM+1
CT CT1+2, CT1+5, CT1+25
CT1 CT1
DOR EN1+3, CMDAT+6
DT DT+8, DT1+16
DT1 DT1
ED1 COMDT+5
EDRS EDRS+10, EDRS+29, COMDT+10
EN1 CMDAT+5
ENRS CMDAT+10
ENRS0 ENRS0+6, ENRS0+11
EXIT ENRS+3, ENRS0+5, TYPE+8, EN1+3, CMDAT+8, EDRS+8, EDRS+29, ED1+3, COMDT+8, CT+2
, CT+7, CT1, CT1+5, CT1+24, DT+5, DT1, DT1+15, W2
FORM EDRS+22
TYPE TYPE+8, TYPE+10
W2 ENRS+3, CT+2
W4 CT1+9, CT1+24, DT1+15, W4
W5 CMDAT+8, EDRS+29, COMDT+8, W5
W6 ENRS+4, EDRS+4, DT+2

Naked Globals

Name Field # of Occurrence
^( CT1+15
^(0 ENRS0+18
^(4 CT1+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% CMDAT+8, EDRS+29, COMDT+8, CT1*, CT1+5, CT1+24, DT1*, DT1+15, BACKOUT+1~, BACKOUT+3*
, BACKOUT+4, BACKOUT+5, W4*, W5*, EXIT!
>> %DT DOR+2*
C EXIT!
D ENRS0*, EDRS+5*, DT+3*, EXIT!
DA ENRS0+10*, ENRS0+11, ENRS0+14, ENRS0+15, ENRS0+16, TYPE+5*, TYPE+8, TYPE+12, TYPE+15, EN1+2*
, EN1+3, CMDAT, CMDAT+1, CMDAT+7, EDRS+9*, EDRS+10, EDRS+21, EDRS+22, ED1+2*, ED1+3
, COMDT, COMDT+1, COMDT+6, COMDT+7, CT1+1*, CT1+2, CT1+4, CT1+10, CT1+11, CT1+13
, CT1+14, CT1+15*, CT1+16, CT1+21, CT1+22, CT1+23, DT+7*, DT+8, DT1+9, DOR+1
, DOR+2, FORM+6, FORM+10*, BACKOUT+1~, BACKOUT+6*, EXIT!
DA(1 CT1+15*
DIC ENRS0*, TYPE+2*, TYPE+17*, EDRS+5*, EDRS+31*, CT+3*, CT1+18, DT+3*, DT1+5, FORM+6*
, FORM+11!, EXIT!
DIC("A" ENRS0+1*, ENRS0+4!, TYPE+2*, EDRS+6*, EDRS+8!, CT+6*, CT+7!, DT+3*, DT+6!, FORM+6*
DIC("S" ENRS0+2*, ENRS0+4!, TYPE+3*, EDRS+7*, EDRS+8!, CT+5*, CT+7!, DT+4*, DT+6!, FORM+7*
DIC(0 ENRS0*, TYPE+2*, TYPE+17*, EDRS+5*, EDRS+31*, CT+3*, DT+3*, FORM+6*
DIE TYPE+17*, CMDAT+2*, EDRS+31*, COMDT+2*, CT1+3*!, CT1+18*, EXIT!
DIK CT1+6*, CT1+8!, CT1+23*!, DT1+5*, DT1+7!, BACKOUT+1~, BACKOUT+6*
DLAYGO ENRS0*, ENRS0+4!
DR TYPE+19*, CMDAT+2*, CMDAT+3*, EDRS+33*, COMDT+2*, COMDT+3*, CT1+3*!, CT1+18*, EXIT!
DT CMDAT+1, COMDT+1
DTOUT EN1!, EN1+3, ED1!, ED1+3
DUOUT EN1!, ED1!
DUZ ENRS0+14, ENRS0+15, COMDT+6
>> I CT1+13*, CT1+15*
>> N CT1+15*
PDA ENRS0+10*, TYPE+5, EN1+2, EDRS+9*, EDRS+13, EDRS+14, EDRS+19, ED1+2, EXIT!
>> PRC("CP" ENRS0+18, EDRS+14*, EDRS+18, CT1+11
>> PRC("FY" EDRS+16, EDRS+18
>> PRC("QTR" EDRS+17
>> PRC("SITE" ENRS+3, ENRS0+18, EDRS+13*, EDRS+18, CT+2
PRCIENCT CT1+6*, CT1+8!, DT1+4*, DT1+8!, BACKOUT+7*, BACKOUT+9!
PRCOMDT CMDAT+1*, COMDT+1*, EXIT!
PRCS ENRS0+17*, ENRS0+18*, TYPE+15, EXIT!
PRCS("SUB" CMDAT+9!, EDRS+29!, COMDT+9!
PRCSDA DT1+13!
>> PRCSDAA FORM+6*, FORM+10
>> PRCSDR TYPE+19*, CMDAT+3, EDRS+33*, COMDT+3
PRCSERR TYPE+16!, CMDAT+5, COMDT+5, COMDT+6!, EXIT+1!
PRCSIP ENRS0+16, EDRS+20~, EDRS+21
>> PRCSK ENRS+1*
PRCSL EXIT!
PRCSTYP TYPE+12*, TYPE+18*, CMDAT, EDRS+23*, COMDT, EXIT!
PRCVD EDRS+26, EDRS+27, FORM+2, FORM+3, FORM+11!, CKPRM*
PRCVX TYPE+3, TYPE+11!
PRCVX1 FORM+2*, FORM+3*, FORM+7, FORM+11!
PRCVY ENRS0+9, TYPE+11!
PRCVY1 FORM+2*, FORM+3*, FORM+4, FORM+11!
PRCVZ EDRS+26*, EDRS+27*, EDRS+29, EXIT!
T CMDAT+8*, EDRS+29*, COMDT+8*, CT1+4*, CT1+5, CT1+9*, CT1+11, CT1+24*, DT1+15*, W4
, W5, EXIT!
T(2 ENRS0+12*, TYPE+1, TYPE+8
T1 ENRS0+10*, EDRS+9*, EXIT!
TRNDA BACKOUT~, BACKOUT+6
TRNNAME BACKOUT~, BACKOUT+2
TYPE EXIT!
U ENRS0+6, ENRS0+12, CMDAT, CMDAT+1, EDRS+21, COMDT, COMDT+1
X TYPE+12*, TYPE+15*, TYPE+18, TYPE+19, EDRS+22*, EDRS+23, EDRS+28, EDRS+29, EDRS+33, CT1+13*
, CT1+15*, DOR+2*, FORM+10*, W2*, W3+1, EXIT!
X3 ENRS+1*, EDRS+5*, DT+1*, EXIT!
Y ENRS+3, ENRS0+5, ENRS0+6, ENRS0+10, ENRS0+12, TYPE+8, TYPE+10, TYPE+12, EN1!, EN1+3
, EDRS+8, EDRS+9, ED1!, ED1+3, CT+2, CT+7, CT1+1, DT+5, DT+7, DOR+2
, FORM+9*, FORM+10, BACKOUT+1~, EXIT!
Z EXIT!
ZX CT1+12!, CT1+13*, CT1+14!
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