ENWOUTL ;(WCIOFO)/SAB-Work Order Utilities ;10/21/1998
Source file <ENWOUTL.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Engineering | 12 | ENPMCLOSE ENPRI001 ENWO1 ENWO2 ENWOBIOCLSE ENWOCLOSE ENWOD ENWOEDIT ENWONEW ENWONEW1 ^ENG(6920 TECHNICIANS ASSIGNED |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ASKCC(ENWODA) | ; Ask Condition Code Extrinsic Function
; Input ENWODA - ien of work order ; Output - 0 (don't ask) or 1 (ask) condition code |
|
| WO | ; select work order entry point
; called from various places where work orders are selected ; Input ; DIC("S") - (optional and not returned) ; Output ; Y - "ien^.01 value" or "-1" if unsuccessful |
|
| WOA | ; ask user
|
|
| WOR | ; Result of DIC call
|
|
| WOX | ; Exit
|
|
| CDATE(Y) | ; Check on COMPLETION DATE (field 36, file 6920)
|
|
| LBRCST(ENFLAG) | ; Calculate work order TOTAL HOURS and the TOTAL LABOR COST
; based on the TECHNICIANS ASSIGNED multiple in file 6920 ; Called by MUMPS X-REFs in file 6920, fields .01 and 1 in multiple ; Input ENFLAG (1 for SET LOGIC or 2 for KILL LOGIC) ; Expects DA(1) as work order IEN ; DA as ASSIGNED TECH IEN [within DA(1)] |
| Name | Line Occurrences |
|---|---|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^ENG(6920 - [#6920] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(6910 - [#6910] | LBRCST+14 |
| ^DIC(6922 - [#6922] | ASKCC+7 |
| ^ENG("EMP" - [#6929] | LBRCST+13 |
| ^ENG(6914 - [#6914] | ASKCC+8 |
| ^ENG(6920 - [#6920] | ASKCC+5, ASKCC+6, CDATE+15, CDATE+17, CDATE+19, CDATE+21*, LBRCST+9, LBRCST+11, LBRCST+12, LBRCST+14 , LBRCST+19* |
| Name | Field # of Occurrence |
|---|---|
| ^(5 | LBRCST+19* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| COST | LBRCST+7~, LBRCST+8*, LBRCST+17*, LBRCST+18*, LBRCST+19 |
| COST( | LBRCST+15*, LBRCST+17 |
| D | WO+6~, WOA+2, WOA+3*, WOA+4*, WOA+5* |
| >> DA | CDATE+15, CDATE+17, CDATE+19, CDATE+21, LBRCST+10 |
| >> DA(1 | LBRCST+9, LBRCST+11, LBRCST+12, LBRCST+14, LBRCST+19 |
| DELYR | CDATE+18~, CDATE+20* |
| DIC | WO+7*, WOX+1! |
| DIC(0 | WOA+2*, WOA+9* |
| DT | CDATE+20 |
| DTIME | WOA+1 |
| >> EN("BAD COMPL | ETION DATE" , CDATE+14*, CDATE+22* |
| ENASK | ASKCC+3~, ASKCC+4*, ASKCC+8*, ASKCC+9 |
| ENEQDA | ASKCC+3~, ASKCC+5*, ASKCC+8 |
| ENFLAG | LBRCST~, LBRCST+10 |
| ENSHKEY | ASKCC+3~, ASKCC+6*, ASKCC+7 |
| ENSHPAR | ASKCC+3~, ASKCC+7*, ASKCC+8 |
| ENWODA | ASKCC~, ASKCC+5, ASKCC+6 |
| ENX | WO+6~, WOA+1*, WOA+2, WOA+4, WOA+5, WOA+6, WOA+9 |
| HOURS | LBRCST+7~, LBRCST+8*, LBRCST+17*, LBRCST+19 |
| HOURS( | LBRCST+11*, LBRCST+15, LBRCST+17 |
| NOMDATE | CDATE+18~, CDATE+19*, CDATE+20*, CDATE+21 |
| REQDATE | CDATE+15~*, CDATE+16 |
| U | ASKCC+5, ASKCC+6, ASKCC+7, ASKCC+8, CDATE+15, CDATE+17, CDATE+19, CDATE+21, LBRCST+11, LBRCST+12 , LBRCST+13, LBRCST+14, LBRCST+19 |
| WAGE | LBRCST+7~, LBRCST+8* |
| WAGE( | LBRCST+13*, LBRCST+14*, LBRCST+15 |
| X | WO+6~, WOA+2*, WOA+9*, CDATE+14*, CDATE+15~, CDATE+16*, CDATE+17, CDATE+21*, CDATE+22*, CDATE+23* , CDATE+24, LBRCST+7~, LBRCST+8*, LBRCST+9*, LBRCST+10, LBRCST+11, LBRCST+12, LBRCST+13, LBRCST+14, LBRCST+15 , LBRCST+16*, LBRCST+17* |
| X(0 | LBRCST+12*, LBRCST+13 |
| Y | WOA+1*, WOR+1, CDATE~, CDATE+14, CDATE+16, CDATE+21 |
