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

Package: Surgery

Routine: SROKEY


Information

SROKEY ;B'HAM ISC/MAM - UPDATE KEYS RESTRICTING ENTRIES ; 9 JAN 1992

Source Information

Source file <SROKEY.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 4 ^DIC  FILE^DICN  ^DIE  DI^DIU  
Surgery 1 ^SRSKILL  

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
Surgery 1 SROKEY ENTER  

Entry Points

Name Comments DBIA/ICR reference
EXIST ; edit existing entry
ANOTHER
END
RET
ADD ; add entry in PERSON FIELD RESTRICTION file

External References

Name Field # of Occurrence
^DIC SROKEY+2, ANOTHER+3
FILE^DICN ANOTHER+5, ADD+4
^DIE ADD+5
DI^DIU SROKEY+3
^SRSKILL END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"Add 'PERSON' Field Restrictions: ",!
  • Line Location: SROKEY+2
Function Call: WRITE
  • Prompt: !!,"Keys Currently used to Restrict Entries: "
  • Line Location: EXIST+2
Function Call: WRITE
  • Prompt: !!,"There are no keys restricting entries in this field."
  • Line Location: EXIST+3
Function Call: WRITE
  • Prompt: !
  • Condition for execution: CNT=1
  • Line Location: EXIST+4
Function Call: WRITE
  • Prompt: !,?2,CNT_".",?5,$P(SRKEY(CNT),"^")
  • Line Location: EXIST+4
Function Call: READ
  • Variable: SRYN
  • Timeout: DTIME
  • Line Location: ANOTHER+0
Function Call: WRITE
  • Prompt: !!,"Enter 'YES' or RETURN to enter a key which will be used to restrict",!,"access to this field, or 'NO' if no additional keys are required."
  • Line Location: ANOTHER+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ANOTHER+3
Function Call: WRITE
  • Prompt: !!,"Entering Keys..."
  • Line Location: ANOTHER+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: RET+0
Function Call: READ
  • Variable: SRYN
  • Timeout: DTIME
  • Line Location: ADD+1
Function Call: WRITE
  • Prompt: !!,"Enter RETURN or 'YES' to add this entry to the file so that restrictions may",!,"be applied, or 'NO' to quit this option."
  • Line Location: ADD+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ADD+5
Routine Call
  • DIC
  • Line Location:
    • SROKEY+2
    • ANOTHER+3
Routine Call
  • DIE
  • Line Location:
    • ADD+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SRP - [#131] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRP - [#131] EXIST+1*, EXIST+2, EXIST+3, EXIST+4
^SRP("B" SROKEY+5, SROKEY+6

Label References

Name Line Occurrences
ADD SROKEY+5, ADD+2
ANOTHER ANOTHER+2
END SROKEY+2, SROKEY+3, SROKEY+5, ANOTHER

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ADDKEY( ANOTHER+3*, ANOTHER+5
>> ADDKEY(1 ANOTHER+4
>> CNT EXIST+4*, ANOTHER+3*, ANOTHER+5*
DA SROKEY+2!, ANOTHER+5!, ADD+4!, ADD+5!*
DA(1 ANOTHER+5*
DD ANOTHER+5!, ADD+4!
>> DI SROKEY+3*, SROKEY+4
DIC SROKEY+2!*, ANOTHER+3!*, ANOTHER+5!*, ADD+4!*
DIC("A" SROKEY+2*, ANOTHER+3*
DIC(0 SROKEY+2*, ANOTHER+3*, ANOTHER+5*, ADD+4*
DIE ADD+5!*
DINUM ADD+4!
DLAYGO ANOTHER+5*!, ADD+4*
DO SROKEY+2!, ANOTHER+5!, ADD+4!
DR ADD+5!*
DTIME ANOTHERRETADD+1
IOF SROKEY+2, END
>> KEY EXIST+4*
>> N SROKEY+3*
>> SRENTRY SROKEY+4*, SROKEY+5, SROKEY+6, ADD+4
>> SRFIELD SROKEY+4*
>> SRFILE SROKEY+3*, SROKEY+4*
>> SRKEY( EXIST+4*
>> SRP SROKEY+6*, EXIST+1, EXIST+2, EXIST+3, EXIST+4, ANOTHER+5, ADD+4*, ADD+5
>> SRSOUT SROKEY+2*, SROKEY+3*, ANOTHER*, RET*, ADD+1*, ADD+3*
>> SRYN ANOTHER*, ANOTHER+1*, ANOTHER+2, ANOTHER+3, ADD+1*, ADD+2*, ADD+3
>> X ANOTHER+5*, RET*, ADD+4*
>> Y SROKEY+2, SROKEY+3, SROKEY+4, ANOTHER+3*, ADD+4
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