DIR2 ;SFISC/XAK - READER (SETUP VARS,REPLACE...WITH) ;2DEC2016
Source file <DIR2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FIELD | ||
| NN | ||
| S0(%B) | ;CREATE PROMPT FOR READING A 'SET' TYPE. %B is the SET OF CODES
|
|
| EO | ||
| DIR(DIALA) | ;** INSERTS DIALOGS INTO DIR ARRAY
|
|
| RW | ; Replace...With... ENTER WITH 'Y', EXIT WITH 'Y' CHANGED. CALLED FROM MANY ROUTINES
|
|
| A | ||
| H | ||
| WITH | ||
| B | ||
| Q | ||
| F | ;;Enter response: ;8051
|
|
| S | ;;Enter response: ;8051
|
|
| Y | ;;Enter Yes or No: ;8052
|
|
| E | ;;Press RETURN to continue or '^' to exit: ;8053
|
|
| N | ;;Enter a number;8054
|
|
| D | ;;Enter a date;8055
|
|
| L | ;;Enter a list or range of numbers;8056
|
|
| P | ;;Select: ;8057
|
|
| F1 | ;;;This response can be free text;9031
|
|
| S1 | ;;;Enter a code from the list.;9032
|
|
| Y1 | ;;;Enter either 'Y' or 'N'.;9040
|
|
| E1 | ;;;Enter either RETURN or '^';9033
|
|
| N1 | ;;;This response must be a number;9034
|
|
| D1 | ;;;This response must be a date;9035
|
|
| L1 | ;;;This response must be a list or range, e.g., 1,3,5 or 2-4,8;9036
|
| Name | Line Occurrences |
|---|---|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | FIELD+1, FIELD+15 |
| ^DD("STRING_LIMIT" | WITH+1 |
| ^DI( | FIELD+6, DIR+3 |
| ^DIC - [#1] | FIELD+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | DIR2+7!, FIELD+14!, RW+1~, A+2, A+3, A+4, WITH*, WITH+1*, WITH+2 |
| %A | DIR2+13*, FIELD, FIELD+1!, FIELD+2!, FIELD+4*, FIELD+6, NN, NN+2, S0+1, S0+2 |
| >> %A0 | DIR2+16* |
| %B | DIR2+13*, FIELD+2*, FIELD+6, FIELD+8, FIELD+11*, FIELD+14, NN, S0~, S0+4, S0+8 , S0+9 |
| >> %B1 | FIELD*, FIELD+1, FIELD+4, FIELD+6, FIELD+8*, FIELD+14*, FIELD+15*, NN+6 |
| >> %B2 | FIELD*, FIELD+1, FIELD+4, FIELD+6, FIELD+8*, FIELD+9*, FIELD+10*, FIELD+14*, NN+6 |
| >> %B3 | FIELD+2*, FIELD+4, FIELD+8*, FIELD+12, FIELD+13, NN+3 |
| >> %D1 | FIELD+14* |
| >> %D2 | FIELD+14* |
| >> %DT | FIELD+12* |
| %H | FIELD+14! |
| %I | FIELD+14!, S0+4*, S0+5, S0+8*, S0+9 |
| >> %N | DIR2+13* |
| >> %P | FIELD+4*, FIELD+15*, NN+1, NN+2*, NN+3*, NN+4*, NN+6*, NN+7*, S0+1*, S0+3* , S0+7*, S0+11*, S0+12* |
| >> %T | DIR2+13*, DIR2+15, FIELD+5*, FIELD+7, FIELD+9, FIELD+10, FIELD+11, FIELD+12, FIELD+13, FIELD+14 , FIELD+15, NN, NN+3, NN+4, NN+5, NN+6, EO* |
| >> %W0 | DIR2+15*, FIELD+13* |
| >> D | A+3*, A+4* |
| >> DA | FIELD+3 |
| >> DG | RW+1*, B |
| >> DH | A+4* |
| DIALA | DIR~, DIR+2, DIR+4, DIR+5 |
| DIALN | DIR+1~, DIR+2*, DIR+3, DIR+5 |
| DIALP | DIR+1~, DIR+4*, DIR+5 |
| DIMAX | H~, WITH+1*, WITH+2 |
| DINAKED | DIR2+9~*, DIR2+11*, RW+1~*, B+1* |
| >> DIR( | DIR+5! |
| >> DIR("?" | DIR2+14!, DIR2+15, FIELD+13 |
| >> DIR("A" | DIR2+14!, FIELD+4, FIELD+15, NN+2, NN+3, NN+4, S0+1 |
| >> DIR("B" | FIELD+3 |
| >> DIR("C" | S0+4, S0+5 |
| >> DIR("DIALOG" | DIR+2, DIR+4 |
| >> DIR("S" | S0+6, S0+10 |
| >> DIR(0 | DIR2+13 |
| >> DIRWP | A+1 |
| DT | FIELD+14* |
| DTIME | RW+1*, A, WITH |
| DTOUT | A!*, A+2, A+3, A+4, WITH*, B |
| I | FIELD+6~* |
| L | RW+1~, A+2*, A+3*, A+4*, WITH+1, WITH+2 |
| U | DIR2+7*, DIR2+13, FIELD+2, FIELD+4, FIELD+6, FIELD+15, A+1, WITH+2 |
| >> X | FIELD+14, A*, A+1, A+2, A+3, A+4*, WITH*, WITH+1, WITH+2, WITH+3 , B* |
| Y | DIR2+7!, S0+5~*, S0+7, S0+9~*, S0+11, EO*, RW+1, A+1, A+2*, A+3* , A+4*, WITH+1, WITH+2, B |
