IBDF3 ;ALB/CJM - Edit Selection List ;11/16/92
Source file <IBDF3.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EDITLIST | ;expects IBBLK to be defined
|
|
ONENTRY | ;
|
|
ONEXIT | ;
|
|
SELECT | ;
; -- dic("s") passed in from ibdfgrp |
|
ADDBLANK() | ;
|
|
IDXGRP | ;build an index of groups in print order for list processor
|
|
LMGRPHDR | ;sets the screen hdr
|
|
DISPLAY(GRP,ROW) | ;
|
|
SLCTNCNT(GRP) | ;
|
|
LISTNAME() | ;
|
|
ADDGRP | ;
|
|
ADDEMPTY | ;adds a blank group - a place holder that takes up space on the form
|
|
EDTSLCTN | ;
|
|
EDITGRP | ;
|
|
DELSLCTN | ;deletes a group's selections
|
|
DELGRP | ;delete a group and all of its selections
|
Name | Field # of Occurrence |
---|---|
IX^DIC | SELECT+5 |
FILE^DICN | ADDBLANK+5, ADDGRP+7, ADDEMPTY+8 |
^DIE | ADDBLANK+7, ADDGRP+9, ADDEMPTY+10, EDITGRP+7 |
^DIK | DELSLCTN+3, DELGRP+9 |
IX^DIK | IDXGRP+8 |
^DIR | ADDGRP+4, ADDEMPTY+5 |
UNCMPBLK^IBDF19 | EDITLIST+16 |
SLCTNS^IBDF4 | EDTSLCTN+8 |
$$PADRIGHT^IBDFU | DISPLAY+6 |
$$LSTDSCR2^IBDFU1 | EDITLIST+7 |
IDXBLOCK^IBDFU4 | EDITLIST+18 |
$$RUSURE^IBDFU5 | DELGRP+8 |
PAUSE^IBDFU5 | EDITLIST+9 |
EN^VALM | EDITLIST+12 |
FULL^VALM1 | EDITLIST+2 |
PAUSE^VALM1 | ADDGRP+8, ADDEMPTY+9 |
FLDCTRL^VALM10 | IDXGRP+12 |
EN^VALM2 | EDTSLCTN+3, EDITGRP+3, DELGRP+3 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^IBE(357.2 - [#357.2] | Classic Fileman Calls |
^IBE(357.3 - [#357.3] | Classic Fileman Calls |
^IBE(357.4 - [#357.4] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IBE(357.2 - [#357.2] | LISTNAME+1 |
^IBE(357.3 - [#357.3] | EDITLIST+13, SLCTNCNT+3, DELSLCTN+3, DELGRP+5 |
^IBE(357.4 - [#357.4] | ADDBLANK+2, IDXGRP+4, IDXGRP+5, IDXGRP+8!, DISPLAY+2, DELGRP+8 |
^TMP("IBDF ADDSLCTN" | DELGRP+10 |
^TMP("IBDF DELETE SELECTION OPTION" | EDITLIST+5*, EDITLIST+13, DELGRP+10* |
^TMP("IBDF DELETED ALL SELECTIONS" | EDITLIST+14* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CNT | SLCTNCNT+1~, SLCTNCNT+2*, SLCTNCNT+3*, SLCTNCNT+4 |
>> D | SELECT+4* |
DA | ADDBLANK+7!*, IDXGRP+8!*, ADDGRP+7!, ADDGRP+9!*, ADDEMPTY+8!, ADDEMPTY+10!*, EDITGRP+7!*, EDITGRP+8, EDITGRP+9!, DELSLCTN+3!* , DELSLCTN+4!, DELGRP+9!* |
DD | ADDBLANK+4!, ADDGRP+6!, ADDEMPTY+7! |
DIC | SELECT+4*, SELECT+5!, ADDBLANK+4!*, ADDBLANK+5!, ADDGRP+6!*, ADDGRP+7!, ADDGRP+9!, ADDEMPTY+7!*, ADDEMPTY+8!, ADDEMPTY+10! , EDITGRP+9! |
DIC(0 | SELECT+4*, ADDBLANK+4*, ADDGRP+6*, ADDEMPTY+7* |
DIE | ADDBLANK+7!*, ADDGRP+7!, ADDGRP+9*!, ADDEMPTY+8!, ADDEMPTY+10*!, EDITGRP+7!*, EDITGRP+9! |
DIE("NO^" | ADDGRP+9*, ADDEMPTY+10* |
DIK | IDXGRP+8!*, DELSLCTN+2*, DELSLCTN+4!, DELGRP+9*! |
DINUM | ADDBLANK+4!, ADDGRP+6!, ADDEMPTY+7! |
DIR | ADDGRP+4!, ADDEMPTY+5! |
DIR("B" | ADDGRP+4*, ADDEMPTY+5* |
DIR(0 | ADDGRP+4*, ADDEMPTY+5* |
>> DIRUT | ADDGRP+4, ADDEMPTY+5 |
DO | ADDBLANK+4!, ADDGRP+6!, ADDEMPTY+7! |
DR | ADDBLANK+7*!, ADDGRP+9*!, ADDEMPTY+10*!, EDITGRP+7*, EDITGRP+9! |
GRP | ADDBLANK+2*, ADDBLANK+3, ADDBLANK+6*, ADDBLANK+7, ADDBLANK+8, IDXGRP+1~, IDXGRP+5*, IDXGRP+8, IDXGRP+11, DISPLAY~ , DISPLAY+2, DISPLAY+6, SLCTNCNT~, SLCTNCNT+3, ADDGRP+1~, ADDEMPTY+2~, EDITGRP+1~, EDITGRP+5*, EDITGRP+6, EDITGRP+7 , DELSLCTN+3, DELGRP+1~, DELGRP+7*, DELGRP+8, DELGRP+9 |
GRPODR | IDXGRP+1~, IDXGRP+4*, IDXGRP+5, IDXGRP+8 |
>> IBBLK | EDITLIST+16, SELECT+3, SELECT+4 |
IBDSEL | DELGRP+1~, DELGRP+4*, DELGRP+5*, DELGRP+10 |
>> IBFASTXT | EDITLIST+17 |
IBGRP | EDTSLCTN+1~, EDTSLCTN+6*, EDTSLCTN+7*, EDTSLCTN+8 |
IBLIST | EDITLIST+1~, EDITLIST+6, EDITLIST+7, EDITLIST+13, EDITLIST+15!, SELECT+2*, SELECT+6*, ADDBLANK+2, ADDBLANK+7, IDXGRP+4 , IDXGRP+5, IDXGRP+8, LISTNAME+1, ADDGRP+9, ADDEMPTY+10, DELGRP+5 |
IBLIST("CLRM" | EDITLIST+9, EDITLIST+11 |
IBLIST("DYNAMIC" | EDITLIST+9 |
IBLIST("EDITI | NG CLRM" , EDITLIST+11* |
IBVALMBG | EDITLIST+1~, EDITLIST+3*, EDITLIST+19 |
IGRP | ADDBLANK+1~ |
INV | DISPLAY+1~, DISPLAY+2*, DISPLAY+4, DISPLAY+5 |
NAME | DISPLAY+1~, DISPLAY+2*, DISPLAY+3*, DISPLAY+4*, DISPLAY+5*, DISPLAY+6, ADDGRP+1~, ADDGRP+5*, ADDGRP+6 |
NODE0 | DISPLAY+1~, DISPLAY+2*, DISPLAY+6 |
ORDER | ADDEMPTY+2~, ADDEMPTY+6*, ADDEMPTY+10 |
QUIT | ADDGRP+1~, ADDGRP+2*, ADDGRP+3, ADDGRP+4*, ADDGRP+8*, ADDEMPTY+2~, ADDEMPTY+3*, ADDEMPTY+4, ADDEMPTY+5*, ADDEMPTY+9* |
ROW | DISPLAY~, DISPLAY+6 |
SEL | EDTSLCTN+1~*, EDTSLCTN+4*, EDTSLCTN+5, EDTSLCTN+7, EDITGRP+1~, EDITGRP+4*, EDITGRP+5, DELGRP+1~, DELGRP+6*, DELGRP+7 |
SLCTN | SLCTNCNT+1~, SLCTNCNT+2*, SLCTNCNT+3*, DELSLCTN+1~, DELSLCTN+2*, DELSLCTN+3* |
>> VALMAR | ONEXIT+1, IDXGRP+2, IDXGRP+11, EDTSLCTN+7, EDITGRP+5, DELGRP+7 |
>> VALMBCK | EDITLIST+3*, EDITLIST+19*, ADDGRP+12*, ADDEMPTY+13*, EDTSLCTN+9*, EDITGRP+2*, EDITGRP+11*, DELGRP+2*, DELGRP+12* |
>> VALMBG | EDITLIST+3, EDITLIST+19* |
>> VALMCNT | IDXGRP+3*, IDXGRP+10*, IDXGRP+11, IDXGRP+12, EDTSLCTN+2 |
>> VALMHDR(1 | LMGRPHDR+1* |
>> VALMY( | EDITGRP+4, DELGRP+6 |
>> VALMY("" | EDTSLCTN+4 |
>> X | SELECT+4*, ADDBLANK+4*, ADDGRP+6*, ADDEMPTY+7* |
>> XQORNOD(0 | EDTSLCTN+3, EDITGRP+3, DELGRP+3 |
>> Y | SELECT+6, ADDBLANK+6, ADDGRP+5, ADDGRP+8, ADDGRP+9, ADDEMPTY+5, ADDEMPTY+6, ADDEMPTY+9, ADDEMPTY+10 |