ASUAUPON ;DSD/DFM - UTILITY ENTER PURCHASE ORDER NUMBER; [ 04/15/98 2:54 PM ]
Source file <ASUAUPON.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| REQD | ;EP ; READ PURCHASE ORDER NUMBER REQUIRED | |
| RDPON | ;EP ;READ PURCHASE ORDER NUMBER OPTIONAL | |
| EXIT | ;RETURN TO CALLING ROUTINE | |
| RDPORD | ; | |
| POEDIT | ;EP ;EDIT PURCHASE ORDER NUMBER | 
| Name | Field # of Occurrence | 
|---|---|
| ^DIR | RDPORD+4 | 
| Name | Line Occurrences | 
|---|---|
| EXIT | RDPORD+5 | 
| RDPORD | RDPON+1, RDPON+3, REQD+2 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> ASUSW("CHANGED" | RDPORD+7* | 
| >> ASUSW("OPTIONAL" | RDPORD+3*, RDPORD+4, EXIT+1!, RDPON+2*, REQD+1* | 
| >> ASUTRNS | RDPORD+6 | 
| >> ASUTRNS( | RDPORD+6* | 
| >> ASUTRNS("TRAN | SACTION CODE" , RDPORD+7, RDPON+1 | 
| DIR | EXIT+1! | 
| DIR("?" | RDPORD+2* | 
| DIR("A" | RDPORD+1* | 
| DIR(0 | RDPORD+4* | 
| >> DIROUT | RDPORD+5 | 
| >> DTOUT | RDPORD+5 | 
| >> DUOUT | RDPORD+5 | 
| X | RDPORD+6, EXIT+1!, POEDIT+1!, POEDIT+2! | 
| Y | EXIT+1! |