DIC11 ;SFISC/TKW-PROMPT USER FOR LOOKUP VALUES ;05:33 PM 11 Aug 2002
Source file <DIC11.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 |
|---|---|---|
| PROMPT | ||
| PR1 | ||
| GETPRMT(DIC,DO,DINDEX,DIPRMT) | ; Build list of prompts for each lookup value
|
|
| ANOTHER | ||
| TRYADD(DIC,DIFILEI) | ; Return 1 if user should be allowed to attempt to add record
; when lookup value `ien and .01 is a pointer. |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | TRYADD+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | TRYADD+3~*, TRYADD+4 |
| >> D | ANOTHER+5 |
| DIC | GETPRMT~, TRYADD~ |
| DIC("A" | GETPRMT+1 |
| DIC(0 | PR1+4, PR1+6, PR1+9, PR1+15*, ANOTHER+5, TRYADD+2 |
| DICA | GETPRMT+1~* |
| DICA( | GETPRMT+4, ANOTHER, ANOTHER+1, ANOTHER+4 |
| DICA(1 | GETPRMT+1* |
| DIFILEI | TRYADD~, TRYADD+3 |
| DINDEX | GETPRMT~ |
| DINDEX( | ANOTHER+6 |
| DINDEX("#" | PROMPT+1, PROMPT+3, PR1+13, GETPRMT+3, ANOTHER, ANOTHER+5, ANOTHER+7, ANOTHER+13, ANOTHER+15 |
| DIOUT | PROMPT~*, PROMPT+1, PR1+3*, PR1+8*, PR1+11*, PR1+12*, PR1+18* |
| DIPRMT | GETPRMT~ |
| DIPRMT( | PR1, GETPRMT+4, GETPRMT+5*, ANOTHER+1*, ANOTHER+5*, ANOTHER+9*, ANOTHER+10*, ANOTHER+12, ANOTHER+15* |
| DISUB | PROMPT+1*, PR1, PR1+1, PR1+4*, PR1+6*, PR1+8, PR1+9*, PR1+14, PR1+15, PR1+16 , GETPRMT+2~, GETPRMT+3*, GETPRMT+4, GETPRMT+5, ANOTHER, ANOTHER+1, ANOTHER+3, ANOTHER+4, ANOTHER+5, ANOTHER+6 , ANOTHER+7, ANOTHER+9, ANOTHER+10, ANOTHER+12, ANOTHER+15* |
| DIVAL | PROMPT+3, PR1+3!, PR1+8!, PR1+11!, PR1+12! |
| DIVAL( | PR1*, PR1+14*, PR1+15*, PR1+16 |
| DIVAL(0 | PROMPT*, PR1+3*, PR1+8*, PR1+11*, PR1+12*, PR1+17* |
| DIVAL(1 | PROMPT+2, PROMPT+4, PR1+8*, PR1+11*, PR1+12* |
| >> DIY | PR1*, PR1+1*, PR1+2 |
| >> DIY( | PR1+1, PR1+15 |
| DO | GETPRMT~, ANOTHER+3 |
| DO(2 | ANOTHER+5 |
| DTIME | PR1+2 |
| >> DTOUT | PR1+3* |
| >> DUOUT | PR1+8*, PR1+18* |
| I | GETPRMT+2~, ANOTHER+12*, ANOTHER+14*, ANOTHER+15 |
| L | GETPRMT+2~*, ANOTHER+12*, ANOTHER+14, ANOTHER+15 |
| P | GETPRMT+2~, ANOTHER+3*, ANOTHER+4*, ANOTHER+5, ANOTHER+7*, ANOTHER+8*, ANOTHER+9, ANOTHER+10 |
| U | ANOTHER+3, TRYADD+3 |
| X | PROMPT+2*, PROMPT+3*, PROMPT+4!*, PR1~, PR1+2*, PR1+4, PR1+6, PR1+8, PR1+9, PR1+11 , PR1+12, PR1+14, PR1+15, PR1+18, ANOTHER+6~*, ANOTHER+7, ANOTHER+8 |
| X(0 | PROMPT+3! |
