Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

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

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
Info |  Source |  Entry Points |  Interaction Calls