XT73P136 ;RSD/OAKLAND - Test Routine for XT*7.3*136
Source file <XT73P136.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN | ;Display "PASSED" or "FAILED" | |
| ENDD | ;end of document call back | |
| TST1 | ; create test message | 
| Name | Field # of Occurrence | 
|---|---|
| EN^MXMLPRSE | EN+9 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^TMP($J | EN+2!, EN+5*, EN+6*, EN+10! | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| CB | EN+1~, EN+9 | 
| CB("ENDDOCUMENT" | EN+8* | 
| I | EN+1~, EN+4* | 
| TEST | EN+1~, EN+3*, EN+9, ENDD+1* | 
| U | EN+3* | 
| Y | EN+1~, EN+4*, EN+5*, EN+6*, EN+8*, EN+9 | 
| Z | EN+1~, EN+3*, EN+5*, EN+6 | 
| Name | Field # of Occurrence | 
|---|---|
| $T(TST1+I | EN+4 |