DICM0 ;SF/XAK,TKW - LOOKUP WHEN INPUT MUST BE TRANSFORMED ;2/15/00 14:40
Source file <DICM0.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 |
|---|---|---|
| P | ;Pointers, called by ^DICM1
|
|
| AST | ; Process screens on pointers.
|
|
| P1 | ; Build screen to make sure selected entry is pointed-to.
|
|
| L1 | ||
| R | ||
| L2 | ||
| RETRY | ||
| BLDC(DIGBL,DIXNAM,DIXNO,DIFILEI,DIPGBL,DICODE,DICR) | ; Build screening logic to loop through compound index, making sure pointed-to file is pointed-to by entry in index
|
|
| CHKTMP(DIC,DICR,DIFILEI,DIVAR) | ; If DIC(0)["T", add check to make sure entry hasn't already been presented once before.
|
|
| SETSCR(DICODE,DICR,DIC,D,DICALL,DID,DF,DIFILEI) | ; Execute screening logic for screened pointers and var.ptrs.
|
|
| SETIX(D,DIC,DID,DF,DICR,DIFILEI) | ; If user passes list of indexes to use on pointed-to file, set up to use them.
|
|
| NO | ||
| OKTOADD(DIFILEI,DINDEX,DIFINDER) | ; Return 1 if index is OK for LAYGO.
|
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | P1+4*, P1+6, P1+7, L1+6, L1+8*, R+1*, L2, BLDC+1~, BLDC+3*, BLDC+6 , BLDC+8, BLDC+10*, BLDC+12, SETIX+3~*, SETIX+4, SETIX+6, SETIX+9 |
| C | BLDC+1~, BLDC+7*, BLDC+8*, BLDC+9 |
| D | P+1*, AST+5, P1+14*, P1+15*, RETRY+1*, RETRY+5, SETSCR~, SETSCR+3*, SETSCR+5, SETSCR+6 , SETSCR+7, SETSCR+8, SETIX~, SETIX+4~*, SETIX+5, SETIX+8, SETIX+10, SETIX+11, SETIX+12*, SETIX+13 , SETIX+15*, SETIX+16, SETIX+17* |
| DA | RETRY+4~* |
| DA(1 | RETRY+4 |
| >> DDH | L2 |
| >> DDS | L1+8, L2 |
| DF | AST+1~, AST+5, P1+14, RETRY+1*, RETRY+5*, SETSCR~, SETSCR+6, SETSCR+7, SETIX~, SETIX+15* , SETIX+17* |
| DIASKOK | P+1~ |
| DIC | P+2*, AST+5, P1+7, P1+8, P1+9, P1+14, L1+6, R+1*, BLDC+12, CHKTMP~ , SETSCR~, SETSCR+6, SETSCR+7, SETIX~ |
| DIC( | P+8!, R+2* |
| DIC("P" | R+3 |
| DIC("PTRIX" | P+9 |
| DIC("S" | P1+12*, L1!, L1+3*, L1+5*, R!, L2*, SETSCR+4 |
| DIC("W" | R! |
| DIC(0 | P+2*, P+3, P+4, P+6*, P+7*, R+1*, R+3*, RETRY+2*, CHKTMP+1, SETSCR+1* , SETSCR+3, SETSCR+6, SETIX+12, SETIX+14*, SETIX+18* |
| DICALL | SETSCR~, SETSCR+6, SETSCR+7 |
| DICODE | P+1~, AST+2*, AST+3, AST+4, AST+5, P1+2*, P1+3*, P1+4*, P1+5, P1+6 , P1+7*, P1+8*, P1+9*, P1+10*, P1+11*, P1+12, BLDC~, BLDC+4*, BLDC+5*, BLDC+6* , SETSCR~, SETSCR+2 |
| DICR | P+2, P+3, P+4, P+5, P+6, P+8, AST+1, AST+5, P1+1, P1+2 , P1+3, P1+6, P1+7, P1+8, P1+9, P1+11, P1+14, L1, L1+2, L1+3 , L1+4, L1+5, L1+6, L1+7, R+1, R+2, L2, RETRY+1, RETRY+2, RETRY+4 , RETRY+5, RETRY+6, BLDC~, BLDC+4, BLDC+5, BLDC+6, BLDC+8, BLDC+9, BLDC+11, BLDC+12 , BLDC+13, BLDC+14, CHKTMP~, CHKTMP+1, SETSCR~, SETSCR+4, SETSCR+6, SETSCR+7, SETSCR+8, SETIX~ , SETIX+1~*, SETIX+2, SETIX+3, SETIX+6, SETIX+7, SETIX+9, SETIX+10, SETIX+11 |
| DICR( | P+2*, P+3*, P+4*, P+6*, P+8*, AST+1, P1+1, P1+3, P1+11, L1+2 , L1+3, L1+4, L1+5, L1+6, R+1, R+2, L2, RETRY!, RETRY+1, RETRY+2 , RETRY+4, RETRY+5, RETRY+6!, BLDC+5, BLDC+9*, BLDC+13, BLDC+14*, SETSCR+4*, SETSCR+8*, SETIX+3 , SETIX+6*, SETIX+7!, SETIX+9*, SETIX+10*, SETIX+11* |
| DICR("^" | OKTOADD+5 |
| DICS | R! |
| DICW | R! |
| DID | AST+1~, AST+5, P1+14, RETRY+5*, SETSCR~, SETSCR+6, SETSCR+7, SETIX~, SETIX+15!, SETIX+17* |
| DID(1 | RETRY+5*, SETIX+17* |
| DIFILEI | P+3, P+9, P1+6, P1+7, P1+8, P1+9, P1+16~, RETRY+3~, BLDC~, BLDC+12 , CHKTMP~, CHKTMP+2, SETSCR~, SETSCR+6, SETSCR+7, SETIX~, OKTOADD~, OKTOADD+5, OKTOADD+6 |
| DIFINDER | P+3, OKTOADD~, OKTOADD+2 |
| DIGBL | BLDC~, BLDC+3, BLDC+12 |
| DINDEX | P+3, P1+16~, RETRY+3~, OKTOADD~, OKTOADD+3 |
| DINDEX("#" | P1+3, P1+6, P1+11, OKTOADD+4 |
| DINDEX(1 | P+9, OKTOADD+1, OKTOADD+6, OKTOADD+7 |
| DIPGBL | BLDC~, BLDC+2 |
| DIPTRIX | P+1~, P+9*, P1+14 |
| >> DIROUT | L1+1 |
| DISAV0 | SETSCR+1~*, SETSCR+2~ |
| DISB | BLDC+1~ |
| DIVAR | CHKTMP~, CHKTMP+2 |
| DIVPSEL | P+5~ |
| DIVPSEL( | P+5*, L1+6, L1+7* |
| DIXNAM | BLDC~, BLDC+3 |
| DIXNO | BLDC~, BLDC+7, BLDC+14 |
| DO | P1+1!, R! |
| DO(2 | RETRY |
| DS | P+2, P+4, P+9, AST+1, AST+3, AST+4, AST+5, P1+8, P1+9, P1+14 , P1+16~, RETRY+3~, RETRY+4*! |
| DST | L1+8*, L2+1! |
| >> DTOUT | L1+1 |
| I | AST+4~*, AST+5, P1+2*, P1+4, P1+7, P1+8, P1+9, P1+11, L1+7~*, BLDC+1~ , BLDC+7*, BLDC+8, BLDC+9, BLDC+10, BLDC+11*, BLDC+12, BLDC+13, SETIX+4 |
| U | P+2, P+4, P+9, AST+1, AST+4, AST+5, P1+9, P1+14, L1+6, RETRY , SETSCR+6, SETSCR+7, SETIX+4, SETIX+5, SETIX+8, SETIX+11, SETIX+12, SETIX+13, SETIX+15, SETIX+16 , SETIX+17 |
| X | R+2*, R+4*!, L2*, RETRY+2*, BLDC+1~, BLDC+12*, BLDC+13*, BLDC+14 |
| Y | P+2*, P+3, P+4, P+8*, AST+3*, AST+4, P1+1*, P1+4, P1+6, P1+7 , P1+8, P1+15*, L1+1, L1+2, R+4, L2, BLDC+1~*, BLDC+2*, BLDC+3, NO* |
