IBDF6 ;ALB/CJM - ENCOUNTER FORM - ENTRY FOR BUILDING A FORM ;NOV 16,1992
Source file <IBDF6.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Automated Information Collection System | 4 | IBDF CHANGE CLINIC IBDF CLINIC FORM LIST IBDF CLINIC SETUP/EDIT FORMS IBDF EDIT FORM |
Kernel | 2 | ^DIC(19 ^ORD(101 |
Name | Comments | DBIA/ICR reference |
---|---|---|
FORMLIST | ;
|
|
ONENTRY | ;
|
|
ONEXIT | ;
|
|
EDITFORM | ;allows user to select a form, then displays it for edit
|
|
CLINIC | ;
|
|
IDXFORMS | ;build an array of forms used by IBCLINIC for the list processor
|
|
ENTRY | ;adds an entry to the array
|
|
HDR | ;
|
|
CLNCNAME() | ;
|
|
DISPLAY1(FORM,USE,ID) | ;
|
|
DISPLAY2(FORM) | ;
|
|
PR(STR,LEN) | ; pad right
|
|
SP(LEN) | ;
|
|
CHNGCLNC | ;allows the user to change the clinic
|
|
SELECT |
Name | Field # of Occurrence |
---|---|
KILL^%ZISS | ONEXIT+1 |
^DIR | EDITFORM+7, CLINIC+3 |
UNCMPL^IBDF19 | EDITFORM+10 |
PRNTPRMS^IBDFU1C | EDITFORM+10 |
CLINICS^IBDFU4 | EDITFORM+7 |
LIST^IBDFU4 | EDITFORM+7 |
$$LOCKFRM2^IBDFU7 | EDITFORM+9 |
FREEFRM2^IBDFU7 | EDITFORM+10 |
LOCKMSG2^IBDFU7 | EDITFORM+9 |
DEVICE^IBDFUA | FORMLIST+3 |
EN^VALM | FORMLIST+12, EDITFORM+10 |
FULL^VALM1 | CHNGCLNC+2 |
FLDCTRL^VALM10 | ENTRY+3 |
EN^VALM2 | SELECT+2 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IBE(357 - [#357] | IDXFORMS+7, DISPLAY1+3, DISPLAY2+3 |
^SC - [#44] | CLNCNAME+1 |
^SD(409.95 - [#409.95] | IDXFORMS+4, IDXFORMS+5 |
^TMP("IB" | ONEXIT+2! |
^TMP("IBDF" | ONEXIT+2! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARY | EDITFORM+1~, EDITFORM+2*, EDITFORM+4, EDITFORM+7, EDITFORM+8! |
B | PR+2~, PR+3*, PR+4 |
D0 | ONEXIT+2! |
DA | ONEXIT+2!, CLINIC+1~ |
DESCR | DISPLAY2+1~, DISPLAY2+4*, DISPLAY2+5 |
DFN | EDITFORM+1~ |
DIC | CLINIC+1~ |
DIE | CLINIC+1~ |
DIR | FORMLIST+9!, EDITFORM+7!, CLINIC+1~, CLINIC+4! |
DIR("A" | EDITFORM+7*, CLINIC+2* |
DIR("B" | EDITFORM+7* |
DIR(0 | EDITFORM+7*, CLINIC+2* |
>> DIRUT | EDITFORM+7, CLINIC+5 |
DR | CLINIC+1~ |
FORM | IDXFORMS+1~, IDXFORMS+6*, IDXFORMS+7, ENTRY+3, ENTRY+4, DISPLAY1~, DISPLAY1+3, DISPLAY2~, DISPLAY2+3 |
I | ONEXIT+2! |
IBAPI | FORMLIST+1~ |
IBAPI("INDEX" | FORMLIST+5*, CHNGCLNC+6 |
IBAPI("SELECT" | FORMLIST+6*, EDITFORM+6 |
IBAPPT | EDITFORM+1~ |
IBCLINIC | FORMLIST+10*, FORMLIST+12, ONEXIT+2!, CLINIC+6*, IDXFORMS+4, CLNCNAME+1, CHNGCLNC+1, CHNGCLNC+4* |
IBDEVICE | FORMLIST+1~, FORMLIST+3 |
IBFASTXT | FORMLIST+7~, FORMLIST+8* |
IBFORM | FORMLIST+1~, EDITFORM+1~, EDITFORM+7*, EDITFORM+9*, EDITFORM+10, SELECT+4* |
IBPRINT | EDITFORM+1~, EDITFORM+10 |
IBQUIT | ONEXIT+2! |
IBTKFORM | FORMLIST+1~, FORMLIST+4* |
ID | IDXFORMS+1~, IDXFORMS+3*, ENTRY+3*, ENTRY+4, DISPLAY1~, DISPLAY1+2 |
IOBLC | FORMLIST+1~ |
IOBRC | FORMLIST+1~ |
IOHL | FORMLIST+1~ |
IOTLC | FORMLIST+1~ |
IOTRC | FORMLIST+1~ |
IOVL | FORMLIST+1~ |
LEN | PR~, PR+1, PR+2, PR+3, SP~, SP+1, SP+2 |
NAME | DISPLAY1+1~, DISPLAY1+4*, DISPLAY1+5 |
NODE | IDXFORMS+1~, IDXFORMS+5*, IDXFORMS+6, DISPLAY1+1~, DISPLAY1+3*, DISPLAY1+4, DISPLAY2+1~, DISPLAY2+3*, DISPLAY2+4 |
RET | DISPLAY1+1~, DISPLAY1+2*, DISPLAY1+5*, DISPLAY1+6, DISPLAY2+1~, DISPLAY2+2*, DISPLAY2+5*, DISPLAY2+6 |
RTNLIST | EDITFORM+1~ |
S | SP+2~*, SP+3 |
SAVECLNC | CHNGCLNC+1~*, CHNGCLNC+4 |
SEL | SELECT+1~, SELECT+3*, SELECT+4 |
SETUP | IDXFORMS+1~, IDXFORMS+3*, IDXFORMS+4*, IDXFORMS+5 |
STR | PR~, PR+2*, PR+3, PR+4 |
SUB | IDXFORMS+1~, IDXFORMS+6*, ENTRY+1, ENTRY+2, ENTRY+4 |
SUBREC | IDXFORMS+1~ |
USE | IDXFORMS+1~, IDXFORMS+8*, ENTRY+1*, ENTRY+2*, ENTRY+3, DISPLAY1~, DISPLAY1+5 |
>> VALMAR | IDXFORMS+2, ENTRY+3, ENTRY+4, SELECT+4 |
VALMBCK | ONEXIT+2!, EDITFORM+5*, EDITFORM+11*, CHNGCLNC+3* |
>> VALMCNT | IDXFORMS+3*, ENTRY+3*, ENTRY+4* |
VALMEVL | FORMLIST+9! |
>> VALMHDR(1 | HDR+1* |
VALMY | ONEXIT+2! |
VALMY("" | SELECT+3 |
X | ONEXIT+2! |
>> XQORNOD(0 | SELECT+2 |
XQORS | FORMLIST+9! |
Y | ONEXIT+2!, EDITFORM+7, CLINIC+5, CLINIC+6 |