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

Package: Automated Information Collection System

Routine: IBDF10


Information

IBDF10 ;ALB/CJM - ENCOUNTER FORM - (shift block contents) ;APRIL 22,1993

Source Information

Source file <IBDF10.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Automated Information Collection System 3 (BLOCKS,FLDS,HFLDS,LINES,MFLDS,TXT)^IBDF10A  LSTS^IBDF10B  $$MAX^IBDF10C  
List Manager 1 RE^VALM4  
VA FileMan 1 ^DIR  

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

Package Total Caller Graph
Automated Information Collection System 7 IBDF SHIFT BLOCK CONTENTS  IBDF5  IBDF9  IBDF9B  IBDF9B2  IBDF9B3  IBDF9B4  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
SHIFT(TYPE) ;shifts contents of blocks - prompts user for what to shift (unless TYPE is defined), and how much to shift
TYPE ;asks user for what should be shifted
TYPEHELP ;help for TYPE
DIRECTN ;asks user for direction of shift - returns WAY
AMOUNT(MAX) ;now ask user how far to shift - returns AMOUNT
RANGE(HT,WIDTH) ;asks the user for the range - returns TOP,BOTTOM,LEFT,RIGHT
E ;shift everything
D ;shift data fields
M ;shift multiple choice fields
H ;shift hand print fields
S ;shift selection lists
T ;shift text areas
L ;shift lines
B ;shift blocks

External References

Name Field # of Occurrence
^DIR TYPE+4, DIRECTN+2, AMOUNT+4, RANGE+6, RANGE+12, RANGE+17, RANGE+24
BLOCKS^IBDF10A B+1
FLDS^IBDF10A E+1, D+1
HFLDS^IBDF10A E+6, H+1
LINES^IBDF10A E+4, L+1
MFLDS^IBDF10A E+5, M+1
TXT^IBDF10A E+3, T+1
LSTS^IBDF10B E+2, S+1
$$MAX^IBDF10C SHIFT+11
RE^VALM4 SHIFT+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"You can choose what should be shifted. Select one of the following:",!," [E]verything, [D]isplay fields, [S]election lists, [L]ines, [T]ext areas,",!," [M]ultiple choice fields, [H]and print fields"
  • Line Location: TYPEHELP+1
Routine Call
  • DIR
  • Line Location:
    • TYPE+4
    • DIRECTN+2
    • AMOUNT+4
    • RANGE+6
    • RANGE+12
    • RANGE+17
    • RANGE+24

Label References

Name Line Occurrences
@( SHIFT+13
AMOUNT SHIFT+12
DIRECTN SHIFT+7
RANGE SHIFT+9
TYPE SHIFT+4
TYPEHELP TYPE+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AMOUNT SHIFT+2~, SHIFT+13, AMOUNT+5*, E+1, E+2, E+3, E+4, E+5, E+6, D+1
, M+1, H+1, S+1, T+1, L+1, B+1
BOTTOM SHIFT+2~, SHIFT+10, SHIFT+11, RANGE+13*, RANGE+29*, E+1, E+2, E+3, E+4, E+5
, E+6, D+1, M+1, H+1, S+1, T+1, L+1, B+1
DIR TYPE+2!, TYPE+4!, DIRECTN+2!, AMOUNT+4!, RANGE+2!, RANGE+6!, RANGE+12!, RANGE+17!, RANGE+24!
DIR("?" TYPE+3*, DIRECTN+1*, RANGE+9*, RANGE+21*
DIR("A" TYPE+2*, DIRECTN+1*, AMOUNT+3*, RANGE+4*, RANGE+9*, RANGE+15*, RANGE+20*
DIR("B" TYPE+2*, DIRECTN+1*, RANGE+5*, RANGE+10!, RANGE+16*, RANGE+22!
DIR(0 TYPE+2*, DIRECTN+1*, AMOUNT+2*, RANGE+5*, RANGE+11*, RANGE+16*, RANGE+23*
>> DIRUT TYPE+4, DIRECTN+2, AMOUNT+4, RANGE+6, RANGE+17
>> DTOUT RANGE+12, RANGE+24
>> DUOUT RANGE+12, RANGE+24
HT SHIFT+2~, SHIFT+5*, SHIFT+6*, SHIFT+9, SHIFT+10, RANGE~, RANGE+5, RANGE+11
I RANGE+1~
>> IBBLK("H" SHIFT+5
>> IBBLK("W" SHIFT+5
>> IBFORM("HT" SHIFT+6
>> IBFORM("WIDTH" SHIFT+6
LEFT SHIFT+2~, SHIFT+10, SHIFT+11, RANGE+18*, RANGE+23, RANGE+28*, E+1, E+2, E+3, E+4
, E+5, E+6, D+1, M+1, H+1, S+1, T+1, L+1, B+1
MAX SHIFT+2~, SHIFT+10*, SHIFT+11*, SHIFT+12, AMOUNT~, AMOUNT+2
QUIT SHIFT+2~, SHIFT+3*, SHIFT+7, SHIFT+9, SHIFT+10, SHIFT+11, SHIFT+12, SHIFT+13, TYPE+4*, DIRECTN+2*
, AMOUNT+4*, RANGE+6*, RANGE+12*, RANGE+17*, RANGE+24*
RIGHT SHIFT+2~, SHIFT+10, SHIFT+11, RANGE+25*, RANGE+30*, E+1, E+2, E+3, E+4, E+5
, E+6, D+1, M+1, H+1, S+1, T+1, L+1, B+1
TOP SHIFT+2~, SHIFT+10, SHIFT+11, RANGE+7*, RANGE+11, RANGE+28*, E+1, E+2, E+3, E+4
, E+5, E+6, D+1, M+1, H+1, S+1, T+1, L+1, B+1
TYPE SHIFT~, SHIFT+4~, SHIFT+5, SHIFT+6, SHIFT+11, SHIFT+13, TYPE+5*
>> VALMBCK SHIFT+3*, SHIFT+14*
WAY SHIFT+2~, SHIFT+10, SHIFT+11, DIRECTN+3*, AMOUNT+3, E+1, E+2, E+3, E+4, E+5
, E+6, D+1, M+1, H+1, S+1, T+1, L+1, B+1
WIDTH SHIFT+2~, SHIFT+5*, SHIFT+6*, SHIFT+9, SHIFT+10, RANGE~, RANGE+16, RANGE+23
>> Y TYPE+4, TYPE+5, DIRECTN+2, DIRECTN+3, AMOUNT+4, AMOUNT+5, RANGE+6, RANGE+7, RANGE+12, RANGE+13
, RANGE+17, RANGE+18, RANGE+24, RANGE+25
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All