IBDF9A3 ;ALB/CJM - ENCOUNTER FORM - (create,edit,delete selection list - continued) ;NOV 5,1994
Source file <IBDF9A3.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 | 5 | IBDF EDIT SELECTION LIST IBDF EDIT TEXT AREA IBDF9A IBDXI21 IBDXI25 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETSC(ARY,LIST) | ;makes a list of subcolumns having text
|
|
| DELSC(LIST,SC) | ;delete subcolumn=SC for selections on LIST
|
|
| ADDSC(LIST,SC) | ;ADD subcolumn=SC for selections on LIST if not already there, else set to blank
|
|
| OTHER | ;
|
|
| SCLOOP | ; -- Looping thru the subc setting up array(type of data)=subcolumn
|
|
| SCDEL | ; -- Deletes the new subcolumn if there is already a column for that
; type of data. |
|
| DIK | ; -- KILL SUBCOLUMN GLOBAL
|
|
| MSG1 | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^IBE(357.3 - [#357.3] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IBE(357.2 - [#357.2] | GETSC+2, SCLOOP+2, SCLOOP+3, SCDEL+4* |
| ^IBE(357.3 - [#357.3] | DELSC+3, DELSC+4, DELSC+7!, ADDSC+11, ADDSC+14, ADDSC+17* |
| ^IBE(357.6 - [#357.6] | OTHER+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARY | GETSC~ |
| ARY( | GETSC+2* |
| >> D0 | SCDEL+4, DIK+2 |
| >> D1 | SCDEL+4, DIK+2 |
| DA | DELSC+2!, DELSC+5*, DELSC+8*, DELSC+9!, ADDSC+13!*, ADDSC+20!, ADDSC+22!, SCDEL+2~, DIK+2* |
| DA(1 | DELSC+5*, DELSC+8*, ADDSC+21*, DIK+2* |
| DIC | ADDSC+20!, ADDSC+21*, ADDSC+22! |
| DIC(0 | ADDSC+21* |
| DIK | DELSC+2!, DELSC+5*, DELSC+8*, DELSC+9!, ADDSC+13!*, ADDSC+22!, SCDEL+2~, DIK+2* |
| DINUM | ADDSC+20! |
| DO | ADDSC+20!, ADDSC+22! |
| >> IBDFFLG | DIK+3* |
| >> IBLIST | SCLOOP+2, SCLOOP+3 |
| >> IBSC1 | SCDEL+4, SCDEL+5, DIK+1 |
| >> IBSC1( | SCDEL+4, SCDEL+5 |
| >> IBSC3 | SCLOOP+1*, SCLOOP+2* |
| >> IBSC4 | SCLOOP+1*, SCLOOP+2*, SCLOOP+3 |
| >> IBSCRAY( | SCLOOP+3*, SCDEL+7, DIK+1 |
| INPUT | OTHER+1~ |
| INPUT("CODE" | OTHER+3* |
| INPUT("NARRATIVE" | OTHER+3* |
| LIST | GETSC~, GETSC+2, DELSC~, DELSC+3, ADDSC~, ADDSC+11 |
| NODE | GETSC+1~, GETSC+2*, OTHER+1~, OTHER+2*, OTHER+3 |
| SC | GETSC+1~, GETSC+2*, DELSC~, DELSC+3, DELSC+4, DELSC+7, ADDSC~, ADDSC+14, ADDSC+21 |
| SCIEN | DELSC+1~, DELSC+3*, DELSC+4, DELSC+5, DELSC+7, DELSC+8, ADDSC+1~, ADDSC+14*, ADDSC+17 |
| SLCTN | DELSC+1~, DELSC+3*, DELSC+4, DELSC+5, DELSC+7, DELSC+8, ADDSC+1~, ADDSC+11*, ADDSC+13, ADDSC+14 , ADDSC+17, ADDSC+21 |
| >> X | ADDSC+21*, SCDEL+3, SCDEL+4*, SCDEL+7, DIK+1 |
