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 |  Local Variables |  All
Print Page as PDF
Routine: PRCNTICN

Package: Equipment Turn-In Request

Routine: PRCNTICN


Information

PRCNTICN ;SSI/SEB-Cancel equipment turn-in request ;[ 02/25/97 5:10 PM ]

Source Information

Source file <PRCNTICN.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 4 DD^%DT  ^DIC  YN^DICN  ^DIE  

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

Package Total Caller Graph
Equipment Turn-In Request 1 PRCN TURN CANCEL  

Entry Points

Name Comments DBIA/ICR reference
PR ; Prints the data for this transaction
ASK ; Ask if user is certain he/she wants to cancel request
EQUIP ; If there is an equip. request associated with this, prompt to cancel
QS
EXIT ; Kill variables and quit

External References

Name Field # of Occurrence
DD^%DT PR+5
^DIC PRCNTICN+6
YN^DICN ASK+1, QS+1
^DIE ASK+4, QS+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRCNTICN+2
Function Call: WRITE
  • Prompt: $P(^VA(200,PCMR,0),U)
  • Line Location: PR+3
Function Call: WRITE
  • Prompt: !,"Requestor: "
  • Line Location: PR+4
Function Call: WRITE
  • Prompt: $P(^VA(200,PREQ,0),U)
  • Condition for execution: PREQ
  • Line Location: PR+5
Function Call: WRITE
  • Prompt: ?41,"Date entered: ",Y
  • Line Location: PR+5
Function Call: WRITE
  • Prompt: !,"Line Items:"
  • Line Location: PR+6
Function Call: WRITE
  • Prompt: !,?5,"Number: ",D1,?41,"Description: ",$P(^ENG(6914,PD1,0),U,2)
  • Line Location: PR+9
Function Call: WRITE
  • Prompt: !,"CMR Explanation:"
  • Line Location: PR+10
Function Call: WRITE
  • Prompt: !,?4,^PRCN(413.1,D0,2,D1,0)
  • Line Location: PR+11
Function Call: WRITE
  • Prompt: !!,"Are you sure you want to cancel this turn-in"
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !!,"OK, the turn-in was not cancelled."
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !,"Please enter 'Y' to cancel the Turn-in request"
  • Line Location: ASK+3
Function Call: WRITE
  • Prompt: !!,"Transaction #",DA," has been cancelled."
  • Line Location: ASK+5
Function Call: WRITE
  • Prompt: !!,"Do you want to cancel the corresponding equipment request"
  • Line Location: QS+0
Function Call: WRITE
  • Prompt: !!,"OK, the equipment request was not cancelled."
  • Line Location: QS+1
Function Call: WRITE
  • Prompt: !,"Please enter 'Y' to cancel the equipment request."
  • Line Location: QS+2
Function Call: WRITE
  • Prompt: !!,"Equipment request #",$P(^PRCN(413,DA,0),U)," cancelled."
  • Line Location: QS+4
Routine Call
  • DIC
  • Line Location:
    • PRCNTICN+6
Routine Call
  • DIE
  • Line Location:
    • ASK+4
    • QS+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCN(413.1 - [#413.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(49 - [#49] PR+2
^ENG(6914 - [#6914] PR+9
^PRCN(413 - [#413] QS+4
^PRCN(413.1 - [#413.1] PRCNTICN+7, PR+7, PR+8, PR+11, ASK+6, ASK+7!, EQUIP+1, EQUIP+2
^VA(200 - [#200] PR+3, PR+5
^XUSEC("PRCNPPM" PRCNTICN+3

Label References

Name Line Occurrences
ASK ASK+3
EQUIP ASK+2
EXIT PRCNTICN+7, EQUIP+1, QS+1
QS QS+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ASK+1*, ASK+2, ASK+3, EQUIP+2*, QS+1, QS+2, EXIT+1!
C EXIT+1!
D0 PRCNTICN+7*, PR+7, PR+8, PR+11, ASK+4, EQUIP+1, EQUIP+2, EXIT+1!
D1 PR+6*, PR+7*, PR+8, PR+9, PR+10*, PR+11*, ASK+6*, ASK+7, EXIT+1!
DA ASK+4*, ASK+5, ASK+6, ASK+7, EQUIP+2*, QS+4, EXIT+1!
DIC PRCNTICN+2*, EXIT+1!
DIC("A" PRCNTICN+2*
DIC("S" PRCNTICN+4*, PRCNTICN+5*, PRCNTICN+7!
DIC(0 PRCNTICN+2*
DIE ASK+4*, QS+3*, EXIT+1!
DR ASK+4*, QS+3*, EXIT+1!
DUZ PRCNTICN+3
IOF PRCNTICN+2
NUM PRCNTICN+7*, EXIT+1!
>> PCMR PR+1*, PR+3
>> PD1 PR+8*, PR+9
PRCNDATA PRCNTICN+7*, PR+1, PR+4, EXIT+1!
PRCNPPM PRCNTICN+3*, PRCNTICN+4, PRCNTICN+5, EXIT+1!
>> PREQ PR+1*, PR+5
>> PSER PR+1*, PR+2
>> PTR ASK+7*
ST EXIT+1!
TRN EXIT+1!
U PRCNTICN+7, PR+1, PR+2, PR+3, PR+4, PR+5, PR+8, PR+9, ASK+7, EQUIP+1
, EQUIP+2, QS+4
X EXIT+1!
Y PRCNTICN+7, PR+4*, PR+5, EXIT+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 |  Local Variables |  All