OOPSPCA ;HIRMFO/YH-CA1/CA2 FORM PRINT ;2/19/98
Source file <OOPSPCA.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 |
|---|---|---|
| EN1(CASE,FORM) | ; ENTRY POINT TO PRINT THE REPORT OF ACCIDENT FORMS CA1 AND CA2
|
|
| DEV | ||
| START | ; START TO PRINT REPORT OF ACCIDENT FORM CA1 AND CA2
|
|
| Q1 | ||
| PRINTXT | ;PRINT
|
|
| WP(OOPSDIWL,OOPSDIWR,OOPSDIWF,OOPSBS,OOPSNODE,OOPSSEL,OOPSAT,OOPSLBL) | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %ZIS | DEV+3* |
| >> %ZIS("B" | DEV+3* |
| CASE | EN1~, EN1+5 |
| DIWF | PRINTXT+1~, PRINTXT+3*, WP+1~, WP+4* |
| DIWL | PRINTXT+1~, PRINTXT+3*, WP+1~, WP+4* |
| DIWR | PRINTXT+1~, PRINTXT+3*, WP+1~, WP+4* |
| FORM | EN1~, EN1+3, DEV+4, START+2, START+9 |
| >> I | PRINTXT+9*, PRINTXT+10, WP+20*, WP+21 |
| IEN | EN1+4~*, EN1+5*, START+6, START+12, WP+5, WP+8, WP+20, WP+21 |
| II | PRINTXT+1~, PRINTXT+5*, PRINTXT+6, WP+1~, WP+7*, WP+8, WP+13* |
| III | WP+1~ |
| IO | START+1 |
| IO("Q" | DEV+4, DEV+5 |
| IOF | Q1, PRINTXT+4, PRINTXT+12 |
| ION | DEV+4 |
| LINE | START+8*, START+14*, Q1!, PRINTXT+11*, PRINTXT+12* |
| NN | START+3*, START+4*, START+7, START+10*, START+13, Q1!, PRINTXT+5, WP+17*, WP+18, WP+19* , WP+21* |
| OOPSAT | WP~, WP+16 |
| OOPSBS | WP~, WP+6, WP+11, WP+12, WP+15 |
| OOPSDATA | Q1! |
| OOPSDIWF | WP~, WP+4 |
| OOPSDIWL | WP~, WP+4 |
| OOPSDIWR | WP~, WP+4 |
| OOPSFLAG | WP+1~, WP+2*, WP+11*, WP+15 |
| OOPSLBL | WP~, WP+18 |
| OOPSNODE | WP~, WP+5, WP+8, WP+20, WP+21 |
| OOPSNUM | WP+1~, WP+5*, WP+6, WP+7, WP+15 |
| OOPSP | Q1! |
| OOPSSEL | WP~, WP+14 |
| OOPSWP | PRINTXT+1~, PRINTXT+8*, PRINTXT+9, WP+1~, WP+10*, WP+11, WP+12, WP+13 |
| PAGE | START+8*, START+14*, Q1!, PRINTXT+4, PRINTXT+12* |
| >> POP | DEV+3 |
| X | PRINTXT+1~, PRINTXT+6*, WP+1~, WP+8* |
| >> ZTDESC | DEV+4* |
| ZTIO | DEV+4*, Q1! |
| >> ZTQUEUED | Q1 |
| >> ZTREQ | Q1* |
| >> ZTRTN | DEV+4* |
| >> ZTSAVE("FORM" | DEV+4* |
| >> ZTSAVE("IEN" | DEV+4* |
| ZTSK | Q1! |