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

Package: Automated Information Collection System

Routine: IBDFU8


Information

IBDFU8 ;ALB/CJM - ENCOUNTER FORM - selection routines for form components;OCT 8,1993

Source Information

Source file <IBDFU8.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Automated Information Collection System 1 PAUSE^IBDFU5  
Kernel 1 $$UP^XLFSTR  
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: 7

Package Total Caller Graph
Automated Information Collection System 7 IBDE3  IBDE4  IBDF13  IBDF5  IBDF5B  IBDFGRP  IBDFQSL  

Entry Points

Name Comments DBIA/ICR reference
SLCTBLK(FORM,SCRNSIZE,EXCLUDE) ;SCRNSIZE is the number of lines available for scrolling
AGAIN ;
FINDALL() ;finds all of the blocks on FORM (except the one named EXCLUDE) and puts them on @ARY,returns the cound
CHOOSE() ;asks the user to select a blk - @ARY@("#", is the aray of blocks displayed so far(subscripted by the number on the list), @ARY@("NAME", the entire array (subscripted by name,ien)
HELP ;choosing help restarts the display (by setting NAME="")
MSG ;

External References

Name Field # of Occurrence
^DIR AGAIN+7
PAUSE^IBDFU5 HELP+2, MSG+2
$$UP^XLFSTR FINDALL+2, CHOOSE+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,COUNT," ",NAME,?38,$E($P($G(^IBE(357.1,BLK,0)),"^",13),1,42)
  • Line Location: AGAIN+4
Function Call: WRITE
  • Prompt: !,"You can choose a block by the number or by it's name.",!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,"You must enter the number or name of the block!"
  • Line Location: MSG+1
Routine Call
  • DIR
  • Line Location:
    • AGAIN+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBE(357.1 - [#357.1] AGAIN+4, FINDALL+2

Label References

Name Line Occurrences
$$CHOOSE AGAIN+5, AGAIN+6
$$FINDALL SLCTBLK+12
AGAIN AGAIN+7, AGAIN+8
HELP CHOOSE+10
MSG CHOOSE+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANS CHOOSE+2~, CHOOSE+5*, CHOOSE+7*, CHOOSE+8, CHOOSE+9, CHOOSE+10, CHOOSE+13*, CHOOSE+16, CHOOSE+19, CHOOSE+23
, CHOOSE+24
ARY SLCTBLK+9~, SLCTBLK+10*, SLCTBLK+11, SLCTBLK+15, AGAIN+2, AGAIN+3, AGAIN+4, AGAIN+9, FINDALL+2, CHOOSE+16
, CHOOSE+19, CHOOSE+23, CHOOSE+24, CHOOSE+26
BLK SLCTBLK+9~, AGAIN+3*, AGAIN+4, FINDALL+1~, FINDALL+2*
CNT SLCTBLK+9~, SLCTBLK+12*, SLCTBLK+15, CHOOSE+6
COUNT SLCTBLK+9~, AGAIN+1*, AGAIN+4*, AGAIN+5, AGAIN+6, FINDALL+1~, FINDALL+2*, FINDALL+3, CHOOSE+6, HELP+3*
DIR AGAIN+7!
DIR("A" AGAIN+7*
DIR("B" AGAIN+7*
DIR(0 AGAIN+7*
>> DIRUT AGAIN+7
DTIME CHOOSE+7
EXCLUDE SLCTBLK~, SLCTBLK+8*, FINDALL+2
FORM SLCTBLK~, SLCTBLK+5, FINDALL+2
NAME SLCTBLK+9~, SLCTBLK+15*, AGAIN+1*, AGAIN+2*, AGAIN+3, AGAIN+4, FINDALL+2*, HELP+3*
NEXT1 CHOOSE+2~, CHOOSE+23*, CHOOSE+24, CHOOSE+26
NEXT2 CHOOSE+2~, CHOOSE+24*
NODE FINDALL+1~, FINDALL+2*
PICK SLCTBLK+9~, AGAIN+1*, AGAIN+2, AGAIN+3, AGAIN+5*, AGAIN+6*, AGAIN+7, AGAIN+8, AGAIN+10, CHOOSE+2~
, CHOOSE+5*, CHOOSE+8*, CHOOSE+16*, CHOOSE+19*, CHOOSE+20, CHOOSE+26*, CHOOSE+27, HELP+3*
QUIT CHOOSE+2~, CHOOSE+3*, CHOOSE+4, CHOOSE+8*, CHOOSE+9*, CHOOSE+16*, CHOOSE+19*, CHOOSE+26*, HELP+3*
SCRNSIZE SLCTBLK~, SLCTBLK+6*, SLCTBLK+7*, AGAIN+5, AGAIN+6
>> Y AGAIN+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All