IBDF9C ;ALB/CJM - ENCOUNTER FORM - (edit header block) ;FEB 1,1993
Source file <IBDF9C.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 | 1 | IBDF EDIT HEADER BLOCK |
Kernel | 1 | ^ORD(101 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EDITHDR | ;edit the header block
|
|
FINDBLK() | ;
|
|
MAKEBLK() | ;
|
|
FINDFLD() | ;
|
|
MAKEFLD() | ;
|
|
EDITFLD | ;allows the user to edit the header lines
|
|
EDITBLK | ;allows the user to position the header block & draw a box around it
|
|
DFLTCOL() | ;finds the column that would center the header block
|
|
MOVEFLD | ;centers each header line in the block
|
FileNo | Call Tags |
---|---|
^IBE(357.1 - [#357.1] | Classic Fileman Calls |
^IBE(357.5 - [#357.5] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IBE(357.1 - [#357.1] | FINDBLK+1, MOVEFLD+3 |
^IBE(357.5 - [#357.5] | FINDFLD+1, EDITFLD+5, MOVEFLD+5, MOVEFLD+6* |
Name | Field # of Occurrence |
---|---|
^( | EDITFLD+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BOT1 | EDITHDR+1~, EDITHDR+2*, EDITHDR+5, EDITHDR+10 |
BOT2 | EDITHDR+1~, EDITHDR+2*, EDITHDR+9, EDITHDR+10 |
DA | EDITFLD+2!*, EDITBLK+4!* |
DD | MAKEBLK+2!, MAKEFLD+1! |
DIC | MAKEBLK+2!*, MAKEBLK+3!, MAKEFLD+1!*, MAKEFLD+2! |
DIC("DR" | MAKEBLK+2*, MAKEFLD+1* |
DIC(0 | MAKEBLK+2*, MAKEFLD+1* |
DIE | MAKEBLK+3!, MAKEFLD+2!, EDITFLD+2!*, EDITBLK+4!* |
DIE("NO^" | EDITFLD+2*, EDITBLK+4* |
DINUM | MAKEBLK+2!, MAKEFLD+1! |
DO | MAKEBLK+2!, MAKEFLD+1! |
DR | EDITFLD+2*!, EDITBLK+4*! |
HDR | MOVEFLD+1~, MOVEFLD+5*, MOVEFLD+6 |
HDRBLK | EDITHDR+1~, EDITHDR+4*, EDITHDR+5, EDITHDR+9, FINDBLK+1*, FINDBLK+2, FINDFLD+1, MAKEFLD+1, EDITFLD+6*, EDITBLK+4 , EDITBLK+5, MOVEFLD+3 |
HDRFLD | EDITHDR+1~, EDITHDR+6*, FINDFLD+1*, FINDFLD+2, EDITFLD+2, EDITFLD+5, MOVEFLD+5, MOVEFLD+6 |
HDRLINES | EDITHDR+1~, EDITFLD+4*, EDITFLD+5* |
IBBOX | EDITBLK+1~, EDITBLK+2*, DFLTCOL+1 |
IBDELETE | EDITBLK+1~, EDITBLK+2*, EDITBLK+5 |
>> IBFORM | FINDBLK+1, MAKEBLK+2, EDITFLD+6, EDITBLK+5 |
>> IBFORM("WIDTH" | DFLTCOL+1 |
LINES | MOVEFLD+1~, MOVEFLD+2*, MOVEFLD+6* |
MAXLEN | EDITHDR+1~, EDITFLD+4*, EDITFLD+5*, EDITFLD+6, DFLTCOL+1, MOVEFLD+6 |
NEWBLOCK | EDITHDR+1~, EDITHDR+2*, MAKEBLK+1*, EDITBLK+5 |
NODE | EDITFLD+1~, EDITFLD+5*, MOVEFLD+5*, MOVEFLD+6* |
QUIT | EDITHDR+1~, EDITHDR+2*, EDITHDR+8, EDITFLD+6* |
START | MOVEFLD+1~, MOVEFLD+3*, MOVEFLD+6 |
SUBFLD | EDITFLD+1~, EDITFLD+5*, MOVEFLD+1~, MOVEFLD+4*, MOVEFLD+5*, MOVEFLD+6 |
TOP1 | EDITHDR+1~, EDITHDR+2*, EDITHDR+5, EDITHDR+10 |
TOP2 | EDITHDR+1~, EDITHDR+2*, EDITHDR+9, EDITHDR+10 |
>> VALMBCK | EDITHDR+2*, EDITHDR+11* |
>> X | MAKEBLK+2*, MAKEFLD+1* |
>> Y | MAKEBLK+4, MAKEFLD+3 |