DIR3 ;SFISC/DCM,RDS-READER-MAID (PROCESS RANGE/LIST) ;3MAY2010
Source file <DIR3.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 |
|---|---|---|
| L | ; LIST OR RANGE
|
|
| EGP | ||
| LL | ; handle uncompressed lists & screened compressed lists
|
|
| L0 | ||
| L1 | ||
| LCK | ||
| LCD | ; determine increment size for ranges (handle decimals)
|
|
| LC | ; handle unscreened compressed lists (no DIR("S"))
; LC to LIST checks the user's list in X, building ^TMP($J,"DIR") |
|
| LIST | ; transfer output list from ^TMP($J,"DIR") to Y
|
|
| LC0 | ; check one list element, calls LC1 to put it in ^TMP($J,"DIR")
|
|
| LC1 | ; modify ^TMP($J,"DIR") to incorporate a list element, handle overlap
|
|
| 1 | ;;Response should be no less than ; and no greater than;;212;;**CCO/NI thru 4 ERROR MESSAGES
|
|
| 2 | ;;Response must be no more than ; decimal digit;;211
|
|
| 3 | ;;Response must be a positive number;;210
|
|
| 4 | ;;Invalid number or range;;208
|
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | L+1~, L1+5*, L1+6, LCK+1~*, LCK+2, LCK+3*, LCK+4, LCK+6, LCK+7, LCD+1* , LC+3* |
| %1 | L+1~, L1+2*, LCD+1*, LCD+2, LC+3*, LIST+1*, LIST+2*, LIST+3, LIST+5, LC0+1* , LC0+2*, LC0+3*, LC1+1, LC1+2*, LC1+3*, LC1+6*, LC1+7, LC1+8, LC1+9 |
| %2 | L+1~, L1+2*, LC0+1*, LC0+2*, LC0+3*, LC1+1, LC1+4, LC1+5*, LC1+6*, LC1+7 , LC1+8 |
| %3 | L+1~, LCK+3~*, LC1+1*, LC1+2, LC1+3, LC1+4*, LC1+5, LC1+6, LC1+7* |
| %4 | L+1~, LC1+3*, LC1+6* |
| >> %A | L+9, LL+4, L1, LCK+2, LCK+3 |
| >> %B1 | EGP+1, LCK+4, LCK+5, LCK+8 |
| >> %B2 | EGP+1, LCK+4, LCK+6, LCK+8 |
| >> %B3 | L+8, EGP+2, LL+1, L0+3, LCK+7, LCK+9, LCD+1, LC+2, LC1+4 |
| %BA | L+1~, L+3*, L1+1, L1+6 |
| %C | L+1~, L+3*, L+10, L1+4*, L1+5, L1+6, LIST+1, LIST+3, LIST+4*, LIST+5 , LIST+6, LIST+7, LIST+8* |
| >> %E | L+4, L+5*, L+6*, L+7*, L+8*, L+9, L+10*, L+11, EGP+1, EGP+2 , EGP+4, LL+2, LL+3, L0+2, LCK+1*, LCK+2*, LCK+4*, LCK+5*, LCK+6*, LCK+7* , LCK+8*, LCK+9*, LC+3, LIST+6, LIST+7*, LC0+1* |
| %I | L+1~, L+4*, LL+2* |
| %I1 | L+1~, L+3*, L0+4, L0+5, LCD+2*, LC1+2, LC1+4, LC1+5, LC1+6, LC1+7 |
| %I2 | L+1~, L+3*, LCD+2*, LC1+1 |
| %J | L0~, L0+2*, L0+4*, L0+5*, L0+6*, L1+1, L1+2, L1+4, L1+5, L1+6 |
| >> %N | L+11 |
| >> %W | EGP*, EGP+3* |
| %X | L+1~, L+4*, L+5, L+6, L+7, L+8, LL+2*, L0+2, L0+4*, L0+5 , L0+6, LCK, LCK+1, LCK+2, LCK+3*, LCK+4, LCK+5, LCK+7, LCK+8, LCK+9 , LC0+1* |
| >> DIR("S" | L+3, L+9 |
| I | EGP~, EGP+3 |
| I(1 | EGP+1*, EGP+2* |
| I(2 | EGP+1* |
| >> X | L+4, LL+2, LC+3 |
| Y | EGP+4!*, EGP+5*, L1+1*, L1+6* |
| Y( | L+10, L1+4*, L1+5, L1+6*, LIST+1*, LIST+3*, LIST+4*, LIST+5*, LIST+6, LIST+8! |
| Y(0 | L+3*, EGP+5 |
| Name | Field # of Occurrence |
|---|---|
| $T(@(1) | EGP |