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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBDF9A

Package: Automated Information Collection System

Routine: IBDF9A


Information

IBDF9A ;ALB/CJM - ENCOUNTER FORM - (create,edit,delete selection list) ;FEB 1,1993

Source Information

Source file <IBDF9A.m>

Entry Points

Name Comments DBIA/ICR reference
LIST ;Create, Edit, or Delete a selection list from the form
NOSUCH ;
EDITLIST ;allows editing of the structure of a list
COLUMNS ;allows the user to place and size the columns of the list
SELECT ;
AGAIN
MSG1 ;called by the input template
MSG2 ;called by the input template
MSG3 ;called by the input template
DATASIZE(RTN) ;IBLEN() stores the lengths of the pieces of the record returned by the package interface
NEWNAME() ;
SWITCH(IBLIST,IBARRY) ;FOR loops thru selection list and changes all subcolumn numbers from old to new (called only once)
RTN() ;does a lookup on the package interface file using the E cross-reference, which uses the name with the prefix=namespace removed
DLTLIST ;expects IBBLK to be defined
LISTTYPE(RTN) ;sets IBDYN=1 if the rtn is dynamic selection,IBINPUT to the input interface
OTHEROK(PI) ;returns 1 if the selection interface=PI allows 'other', 0 otherwise

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,DIR("?",1),!,DIR("?"),!
  • Line Location: LIST+9
Function Call: WRITE
  • Prompt: !,"There is no selection list!"
  • Line Location: SELECT+3
Function Call: WRITE
  • Prompt: !!,"Entering the number of list columns is optional. By default the list will be",!,"given as many columns as the block has space for.",!
  • Line Location: MSG1+1
Function Call: WRITE
  • Prompt: !!,"Entering the information on the position of the columns and their",!,"height is optional. Appropriate default values will be used. However,",!,"you may specify your own values for up to 4 coulmns.",!
  • Line Location: MSG2+1
Function Call: WRITE
  • Prompt: !!,"You can now specify the subcolumns the list should contain.",!,"There can be at most 6 subcolumns, numbered 1-6.",!
  • Line Location: MSG3+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(357.2 - [#357.2] Classic Fileman Calls
^IBE(357.3 - [#357.3] Classic Fileman Calls
^IBE(357.6 - [#357.6] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call