DGPTFVC3 ;ALB/MTC,HIOFO/FT - VAILIDATION CHECK FOR PTF ADDITIONAL QUESTIONS ;10/21/14 1:59pm
Source file <DGPTFVC3.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 |
|---|---|---|
| EN | ;
|
|
| ENQ | ;
|
|
| 501 | ;-- check 501's for inconsistent data
|
|
| CHKFL5 | ;-- check field entries
|
|
| CHK5Q | ||
| 401 | ;-- check 401's for inconsistent data
|
|
| CHKFL4 | ;-- check field entries
|
|
| CHK4Q | ||
| 701 | ;-- process 701 load DGPTIT array
|
|
| CHK7Q | ;
|
|
| W401 | ;-- display error message for 401
|
|
| W501 | ;-- display error message for 501
|
|
| W701 | ;-- display error messages for 701
|
|
| INIT | ;
|
|
| INITQ | ||
| ERRMSG | ;-- error messages
|
| Name | Field # of Occurrence |
|---|---|
| HOME^%ZIS | INIT+4 |
| $$STR401^DGPTFUT | 401+2 |
| $$STR501^DGPTFUT | 501+2 |
| $$STR701^DGPTFUT | 701+2 |
| ANYPSY^DGPTSCAN | 701+4 |
| DC^DGPTSCAN | CHKFL5+2, CHKFL4+2, 701+4 |
| FLAGCHK^DGPTSCAN | 701+7 |
| GETNUM^DGPTSCAN | CHKFL5+5, 701+8 |
| SCAN^DGPTSCAN | CHKFL5+2, CHKFL4+2, 701+4 |
| LO^DGUTL | INIT+4 |
| $$FMTE^XLFDT | W401+1, W501+1 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DG701 | 701+7*, CHK7Q+1! |
| DGBPC | ENQ+1!, CHKFL5+3, CHK5Q!, CHKFL4+3, CHK4Q!, 701+5 |
| DGBPC( | CHKFL5+7, 701+10 |
| DGBPC(1 | CHKFL4+6 |
| >> DGERR | CHKFL5+7*, CHKFL4+6*, 701+10*, INIT+3* |
| DGFNUM | CHKFL5+7, CHK5Q!, 701+10, CHK7Q+1! |
| DGHOLD | ENQ+1!, 501+2*, CHKFL5+1, CHKFL5+4*, CHKFL5+7, 401+2*, CHKFL4+1, CHKFL4+4*, CHKFL4+6, CHK7Q+1! |
| DGI | 701+3*, CHK7Q+1! |
| DGII | CHKFL5+7*, CHK5Q!, 701+10*, CHK7Q+1! |
| DGJ | ENQ+1!, CHKFL5+1*, CHKFL4+1* |
| DGMOV | ENQ+1!, 501+2*, 501+3!, CHKFL5+3, CHKFL5+4, W501+1 |
| DGOUT | EN+1, ENQ+1!, INIT+1*, INIT+2*, INIT+3* |
| DGPTF | ENQ+1!, 501+2, CHKFL5+3, CHKFL5+4, 401+2, CHKFL4+3, CHKFL4+4, 701+2, 701+5, 701+6 , W401+1, W501+1, INIT+2*, INIT+3 |
| DGPTIT | ENQ+1!, 501+1!, CHK5Q!, 401+1!, CHK4Q!, 701+1! |
| DGPTIT( | CHKFL5+1*, CHKFL4+1*, 701+3* |
| DGREC | ENQ+1!, 701+2*, 701+3 |
| DGSUR | ENQ+1!, 401+2*, CHKFL4+3, CHKFL4+4, W401+1 |
| DGTREC | 701+6*, 701+10, CHK7Q+1! |
| >> PTF | INIT+1, INIT+2 |
| U | CHKFL5+1, CHKFL5+7, CHKFL4+1, CHKFL4+6, 701+3, 701+10 |
| X | W401+1~*, W401+2, W501+1~*, W501+2 |
