DDSVALM ;SFISC/MKO-PUT FOR MULTIPLES (SELECT PROMPT) ;10:45 AM 9 Sep 1994
Source file <DDSVALM.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETWP | ;Merge wp field into ^TMP, return root in DDSANS
|
|
| PUTWP | ;File wp field from @DDSVAL into @DDSREFT
|
|
| REL(DDP,DA,DDSFLD,DDSPARM) | ;Relational syntax
|
|
| ERR(DDSVEP) | ;Print error messages
|
|
| MULT | ;Put multiple or wp field
|
|
| PUTMULT | ;Put for multiples
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | MULT+3, MULT+4 |
| ^TMP("DDSWP" | GETWP+3 |
| Name | Line Occurrences |
|---|---|
| PUTMULT | MULT+8 |
| PUTWP | MULT+7 |
| Name | Field # of Occurrence |
|---|---|
| ^("GL" | PUTWP+9* |
| ^("M" | PUTMULT+10*, PUTWP+8* |
| ^(0 | MULT+4, PUTMULT+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | MULT+5, PUTMULT+11, GETWP+2, REL~ |
| DDP | PUTMULT+10, PUTMULT+11, PUTWP+2, GETWP+3, REL~, REL+2 |
| >> DDS | ERR+2 |
| >> DDSANS | GETWP+3*, GETWP+5, GETWP+6 |
| DDSCD | REL+1~, REL+2, REL+3 |
| DDSCD( | REL+3 |
| >> DDSCHG | PUTWP+10* |
| >> DDSDA | PUTWP+2, GETWP+3 |
| >> DDSER | ERR+4* |
| DDSFLD | PUTMULT+10, PUTMULT+11, PUTWP+5, PUTWP+6, PUTWP+8, PUTWP+10*, GETWP+3, REL~, REL+2 |
| DDSGL | GETWP+1~, GETWP+2*, GETWP+6 |
| DDSI | REL+1~, REL+3* |
| DDSPARM | PUTWP+5, REL~, REL+2 |
| >> DDSPG | PUTMULT+11 |
| >> DDSREFT | PUTMULT+10, PUTWP+2 |
| DDSTMP | PUTWP+1~, PUTWP+2*, PUTWP+5, PUTWP+6, PUTWP+8, PUTWP+9, PUTWP+10* |
| >> DDSV0 | MULT+2 |
| >> DDSV02 | MULT+3 |
| >> DDSVAL | PUTMULT+2, PUTWP+4, PUTWP+5 |
| >> DDSVDA | PUTMULT+10, PUTMULT+11 |
| DDSVDIC | MULT+1~, MULT+5*, PUTMULT+2, PUTMULT+5, PUTMULT+10, PUTWP+8 |
| DDSVDV | MULT+1~, MULT+4*, MULT+7, MULT+8, PUTMULT+6 |
| DDSVEP | ERR~, ERR+5 |
| DDSVMSG | ERR+3~ |
| DDSVMSG(1 | ERR+6 |
| DDSVND | MULT+1~, MULT+2*, MULT+5, GETWP+2 |
| DDSVPC | MULT+1~, MULT+2* |
| DDSVRN | PUTMULT+1~, PUTMULT+2*, PUTMULT+5, PUTMULT+7, PUTMULT+8 |
| DDSVSUB | MULT+1~, MULT+3*, MULT+4, PUTMULT+7, PUTMULT+10, PUTWP+8 |
| >> DIE | MULT+5, PUTWP+9, GETWP+2 |
| >> DIERR | PUTWP+4, ERR+1, ERR+4 |
| U | MULT+2, MULT+4, PUTMULT+5, PUTMULT+10, PUTWP+8 |
| X | MULT+4*, REL+1~, REL+4 |
| Y | PUTMULT+4!*, PUTMULT+8*, PUTMULT+11 |
| Y(0 | PUTMULT+4*, PUTMULT+5*, PUTMULT+7* |