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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRCFALCK

Package: IFCAP

Routine: PRCFALCK


Information

PRCFALCK ;WISC@ALTOONA/CTB-CHECK FISCAL LOCK FILE ; 03/21/94 10:30 AM

Source Information

Source file <PRCFALCK.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 3 DD^%DT  NOW^%DTC  ^DIC  
IFCAP 2 (D,MSG)^PRCFQ  ^PRCFYN  

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

Package Total Caller Graph
IFCAP 9 PRCB CLEAR LOCK  PRCBCS  PRCBR  PRCBR0  PRCBR1  PRCBR2  PRCFA CLEAR LOCK  PRCFACB  
PRCFACP1  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
LOCK
OUT
FAIL
CLEAR ;Clear a lock
NA
UNLOCK ;INTERNAL ENTRY TO CLEAR LOCK. REQUIRES VARIABLE X EQUAL TO LOCK NAME

External References

Name Field # of Occurrence
DD^%DT LOCK+7
NOW^%DTC LOCK+2
^DIC CLEAR+1
D^PRCFQ CLEAR+4
MSG^PRCFQ CLEAR+8, NA
^PRCFYN CLEAR+6, CLEAR+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,X," lock was set by ",X3
  • Line Location: LOCK+7
Function Call: WRITE
  • Prompt: " on ",Y,"."
  • Condition for execution: Y]""
  • Line Location: LOCK+7
Function Call: WRITE
  • Prompt: !,"No further action taken. Contact your supervisor to clear the lock."
  • Line Location: LOCK+8
Function Call: WRITE
  • Prompt: !!!,"Corruption exists in the FISCAL LOCK file.",!,"PLEASE CONTACT YOUR SITE MANAGER.",!!!!!
  • Line Location: FAIL+0
Function Call: WRITE
  • Prompt: !!,$P(Y(0),"^")," Lock is not in use. No action taken."
  • Line Location: CLEAR+2
Function Call: WRITE
  • Prompt: !
  • Line Location: CLEAR+5
Function Call: WRITE
  • Prompt: !!,"OK, I will now clear the ",X(1)," lock."
  • Line Location: CLEAR+8
Routine Call
  • DIC
  • Line Location:
    • CLEAR+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCF(421.4 - [#421.4] LOCK+1, LOCK+2*, LOCK+3, OUT, CLEAR+2*, CLEAR+8*, UNLOCK+1
^VA(200 - [#200] LOCK+4, CLEAR+4

Label References

Name Line Occurrences
FAIL LOCK+1
NA CLEAR+6, CLEAR+7
OUT LOCK+6

Naked Globals

Name Field # of Occurrence
^(0 LOCK+4, CLEAR+4, UNLOCK+1*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LOCK+1*, LOCK+2*, LOCK+5*, FAIL*, CLEAR+6*, CLEAR+7*
>> %A CLEAR+5*, CLEAR+7*
>> %A(1 CLEAR+6*
>> %A(2 CLEAR+6*
>> %B CLEAR+6*, CLEAR+7*
>> DA CLEAR+3*, CLEAR+8
DIC CLEAR+1*!
DIC(0 CLEAR+1*
DUZ LOCK+2
>> I CLEAR+3*
X LOCK+1, LOCK+7, CLEAR+8!*, NA*!, UNLOCK+1!
X( CLEAR+3*
X(1 CLEAR+6, CLEAR+8
X(3 CLEAR+4*, CLEAR+5
X(4 CLEAR+4
X0 LOCK~, LOCK+2*, LOCK+3*, LOCK+4, LOCK+7
X1 LOCK~, LOCK+1*, LOCK+2, LOCK+3, OUT, UNLOCK+1*!
X2 LOCK~
X3 LOCK~, LOCK+4*, LOCK+5*, LOCK+7
Y LOCK~, LOCK+7*, CLEAR+1, CLEAR+2!, CLEAR+3, CLEAR+4*, CLEAR+5, CLEAR+8!, NA!
Y(0 CLEAR+2, CLEAR+3
>> ZTIO LOCK+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All