ENPLS2 ;WISC/SAB - Select Items from List ;12/4/07 13:24
Source file <ENPLS2.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 |
|---|---|---|
| EN | ; entry point
; input global ; ^TMP($J,"SCR)=number of entries in list^screen title ; ^TMP($J,"SCR",0)=col 1 x pos;col 1 hdr^...^col n x pos;col n hdr ; ^TMP($J,"SCR",id)=col 1 value^col 2 value^...^col n value ; output ; optional ENACL( selected items |
|
| BLD | ; build screen
|
|
| ACT | ; prompt for selection
|
|
| EXIT | ;
|
|
| EN2(ENGNOFF) | ;Entry point to suppress Form Feed at end
|
|
| SHD | ; Screen Header
|
|
| PYLIST | ; Progam and Year list of project applications
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Field # of Occurrence |
|---|---|
| ^( | PYLIST+18 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIR | ACT+4!, PYLIST+5!, PYLIST+11! |
| DIR("?" | PYLIST+4*, PYLIST+8*, PYLIST+9* |
| DIR("A" | ACT+2*, PYLIST+7* |
| DIR("B" | PYLIST+10* |
| DIR(0 | ACT+3*, PYLIST+3*, PYLIST+7* |
| >> DIRUT | PYLIST+5, PYLIST+11 |
| DT | PYLIST+10 |
| >> DTOUT | ACT+4 |
| >> DUOUT | ACT+4 |
| DX | EXIT+2! |
| DY | EXIT+2! |
| ENACL | EN+10!, ACT+6!, PYLIST+1~ |
| ENACL( | ACT+6*, PYLIST+23, PYLIST+24 |
| ENC | PYLIST+1~, PYLIST+23*, PYLIST+25*, PYLIST+26 |
| ENDA | PYLIST+1~, PYLIST+14*, PYLIST+15, PYLIST+16 |
| ENF | EN+9~ |
| ENF("C" | EN+20*, EN+21*, EN+22*, BLD+9, SHD+4, SHD+7 |
| ENF("CM" | EN+17*, EN+19*, BLD+9, SHD+4, SHD+7 |
| ENF("DASH" | EN+11*, SHD+7 |
| ENF("HD" | EN+15*, SHD+2 |
| ENF("IDM" | EN+14*, EN+23, BLD+3, ACT+2, ACT+3 |
| ENF("S" | EN+24*, BLD+2, BLD+3, ACT+2, ACT+5*, SHD+2 |
| ENF("SM" | EN+23*, ACT+2, ACT+5, SHD+2 |
| >> ENFY | PYLIST+26 |
| ENGNOFF | EXIT+1, EN2~ |
| ENI | EN+9~, EN+18*, EN+20, EN+21, EN+22, BLD+9*, ACT+6*, SHD+4*, SHD+7*, PYLIST+1~ , PYLIST+18*, PYLIST+19, PYLIST+24*, PYLIST+25 |
| ENID | EN+9~, BLD+6*, BLD+7, BLD+8 |
| ENIDX | PYLIST+1~, PYLIST+13*, PYLIST+14 |
| ENJ | PYLIST+1~, PYLIST+23*, PYLIST+24 |
| ENK | PYLIST+1~, PYLIST+24* |
| ENPN | PYLIST+1~, PYLIST+18* |
| ENPR | PYLIST+1~, PYLIST+6*, PYLIST+15, PYLIST+19 |
| ENS | EN+9~, BLD+1! |
| ENS("IDL" | BLD+2*, BLD+6 |
| ENS("IDM" | BLD+3*, BLD+6 |
| >> ENTY | PYLIST+26 |
| ENX | EN+9~, EN+13*, EN+14, EN+15, EN+17*, EN+18, BLD+7*, BLD+9 |
| ENY | EN+9~, EN+18*, EN+20, EN+21, EN+22, PYLIST+1~, PYLIST+25* |
| ENY0 | PYLIST+1~, PYLIST+15*, PYLIST+16 |
| ENYR | PYLIST+1~, PYLIST+12*, PYLIST+14, PYLIST+19 |
| IOF | EXIT+1, SHD+1 |
| U | EN+14, EN+15, EN+18, BLD+9, PYLIST+15, PYLIST+16, PYLIST+19, PYLIST+25, PYLIST+26 |
| >> X | ACT+5 |
| >> Y | PYLIST+6, PYLIST+12 |
| >> Y( | ACT+6 |