IBDF4C ;ALB/DHH - CPT MODIFIER SELECTION ;26-MAY-1999
Source file <IBDF4C.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 | CPT MODIFIER IBDF4 IBDF4A IBDFQEA |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MOD | ;Entry point for selecting or modifying modifiers
; -- this is called by the input transform (fileman file: selection) ; ; slctn -- is the ien of selection file and should be cpt code ; $$modp^icptmod -- screens appropriate modifiers for a cpt code ; $p($$mod^icptmod,"^",7) -- check status of the modifier |
|
| ADD | ;add cpt modifiers to the selection file
|
|
| LOOKUP | ;response to ?? while entering CPT Modifiers
|
| FileNo | Call Tags |
|---|---|
| ^IBE(357.3 - [#357.3] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IBE(357.2 - [#357.2] | ADD+7 |
| ^IBE(357.3 - [#357.3] | MOD+9, LOOKUP+5 |
| ^IBE(357.6 - [#357.6] | ADD+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CPT | MOD+7~, MOD+9*, MOD+10, LOOKUP+3~, LOOKUP+5*, LOOKUP+6 |
| DA | ADD+13~, ADD+15* |
| DIC | MOD+7~, MOD+12*, LOOKUP+3~, LOOKUP+9* |
| DIC("S" | MOD+15*, LOOKUP+12* |
| DIC(0 | MOD+16*, LOOKUP+13* |
| DIE | ADD+13~, ADD+14* |
| >> DIX | MOD+17* |
| DO | MOD+7~, LOOKUP+3~ |
| DR | ADD+13~, ADD+16* |
| >> IBLIST | ADD+7 |
| >> SLCTN | MOD+8, MOD+9, ADD+15, LOOKUP+4, LOOKUP+5 |
| U | ADD+7 |
| >> X | MOD+17*, LOOKUP+9* |
| Y | MOD+7~, MOD+17, MOD+18 |
