DIC11 ;SFISC/TKW-PROMPT USER FOR LOOKUP VALUES ;1:33 PM 26 Dec 2000 [ 04/02/2003 8:25 AM ]
Source file <DIC11.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PR1 | ||
| TRYADD(DIC,DIFILEI) | ; Return 1 if user should be allowed to attempt to add record ; when lookup value `ien and .01 is a pointer. | |
| PROMPT | ||
| GETPRMT(DIC,DO,DINDEX,DIPRMT) | ; Build list of prompts for each lookup value | 
| Name | Field # of Occurrence | 
|---|---|
| $$EZBLD^DIALOG | PR1+5, PR1+7, PR1+10, GETPRMT+10, GETPRMT+11, GETPRMT+15 | 
| 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 | 
| Name | Line Occurrences | 
|---|---|
| PR1 | PROMPT+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | TRYADD+3~*, TRYADD+4 | 
| >> D | GETPRMT+11 | 
| DIC | GETPRMT~, TRYADD~ | 
| DIC("A" | GETPRMT+1 | 
| DIC(0 | PR1+4, PR1+6, PR1+9, PR1+15*, GETPRMT+11, TRYADD+2 | 
| DICA | GETPRMT+1~* | 
| DICA( | GETPRMT+4, GETPRMT+6, GETPRMT+7, GETPRMT+10 | 
| DICA(1 | GETPRMT+1* | 
| DIFILEI | TRYADD~, TRYADD+3 | 
| DINDEX | GETPRMT~ | 
| DINDEX( | GETPRMT+12 | 
| DINDEX("#" | PROMPT+1, PROMPT+3, PR1+13, GETPRMT+3, GETPRMT+6, GETPRMT+11, GETPRMT+13, GETPRMT+19, GETPRMT+21 | 
| DIOUT | PROMPT~*, PROMPT+1, PR1+3*, PR1+8*, PR1+11*, PR1+12*, PR1+18* | 
| DIPRMT | GETPRMT~ | 
| DIPRMT( | PR1, GETPRMT+4, GETPRMT+5*, GETPRMT+7*, GETPRMT+11*, GETPRMT+15*, GETPRMT+16*, GETPRMT+18, GETPRMT+21* | 
| 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, GETPRMT+6, GETPRMT+7, GETPRMT+9, GETPRMT+10, GETPRMT+11, GETPRMT+12 , GETPRMT+13, GETPRMT+15, GETPRMT+16, GETPRMT+18, GETPRMT+21* | 
| 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~, GETPRMT+9 | 
| DO(2 | GETPRMT+11 | 
| DTIME | PR1+2 | 
| >> DTOUT | PR1+3* | 
| >> DUOUT | PR1+8*, PR1+18* | 
| I | GETPRMT+2~, GETPRMT+18*, GETPRMT+20*, GETPRMT+21 | 
| L | GETPRMT+2~*, GETPRMT+18*, GETPRMT+20, GETPRMT+21 | 
| P | GETPRMT+2~, GETPRMT+9*, GETPRMT+10*, GETPRMT+11, GETPRMT+13*, GETPRMT+14*, GETPRMT+15, GETPRMT+16 | 
| U | GETPRMT+9, 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, GETPRMT+12~*, GETPRMT+13, GETPRMT+14 | 
| X(0 | PROMPT+3! |