PRSXP105 ;WCIOFO/RRG-CORRECT VCS ALLOTMENT ;11/18/2005
Source file <PRSXP105.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| READ | ; This module will run as a post install for *105
; It will update the read access value and the ; 'Date Last Updated' for 4 fields in #450 ; |
|
| DEVICE | ;Ask device or queue
|
|
| START | ; Main Driver
|
|
| 450 | ; Correct data in the PAID EMPLOYEE (#450) file
|
|
| 459 | ; Correct data in the PAID PAYRUN DATA (#459) file
|
|
| XMT | ; Send status via mail message
|
|
| TIME | ; Get current Time
|
|
| STAUCI | ||
| NAME | ; Format name
|
|
| LOCKED | ; Message for locked records
|
|
| WARN | ; Warning message if records were locked
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ |
| ^PRSPC - [#450] | GET1^DIQ |
| 459.01 | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("UCI" | STAUCI+6 |
| ^DD(450 | READ+4* |
| ^PRSPC - [#450] | 450+22, 450+28, 450+34 |
| ^PRST(459 - [#459] | 459+16, 459+17, 459+18, 459+29, 459+36, 459+43 |
| ^TMP($J | START+4, 450+5!, 450+9*, 450+11*, 450+12*, 450+13*, 450+15*, 450+17*, 450+18*, 450+37* , 450+38*, 450+39*, 450+40*, 450+42*, 450+44*, 450+45*, 450+46*, 450+47*, 450+50*, 459+5! , 459+9*, 459+11*, 459+13*, 459+14*, 459+19*, 459+20*, 459+21*, 459+22*, 459+24*, 459+26* , 459+27*, 459+45*, 459+47*, 459+48*, 459+49*, 459+51*, 459+52*, 459+53*, XMT+2, XMT+11! , TIME+7*, LOCKED+3*, WARN+2*, WARN+3*, WARN+4*, WARN+6, WARN+15! |
| ^XMB("NETNAME" | XMT+8, WARN+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | XMT+11!, TIME+3, WARN+15! |
| %ZIS | DEVICE+3!, DEVICE+4*, DEVICE+5! |
| %ZIS("A" | DEVICE+4* |
| CNT | 450+2~, 450+21*, 450+35*, 450+41, 459+2~, 459+28*, 459+42*, 459+46 |
| DA | 450+2~, 450+32* |
| DATA | 450+2~, 450+23*, 450+24, 450+26, 450+30, 450+36, 459+2~, 459+31*, 459+32, 459+34 , 459+38, 459+40, 459+44 |
| DIE | 450+2~, 450+32* |
| DIFROM | XMT+3~, WARN+7~ |
| DR | 450+2~, 450+32* |
| DT | READ+4 |
| DUZ | XMT+7, WARN+11 |
| EMP | 450+2~, 450+21*, 450+22*, 450+23, 450+28, 450+32, 450+34, 459+2~, 459+28*, 459+29* , 459+30, 459+36, 459+40, 459+43, NAME+3, NAME+4 |
| FILE | 450+3~, 450+21*, 459+3~, 459+4*, LOCKED+2 |
| I | READ+4*, 459+2~ |
| IENS | 459+2~, 459+30*, 459+31, 459+40* |
| IO("Q" | DEVICE+8 |
| IOP | DEVICE+3!, DEVICE+5! |
| LCNT | 450+2~, 450+4*, 450+9*, 450+11*, 450+12*, 450+13*, 450+15*, 450+17*, 450+18*, 450+37* , 450+38*, 450+39*, 450+40*, 450+42*, 450+44*, 450+45, 450+46*, 450+47*, 450+50*, 459+2~ , 459+4*, 459+9*, 459+11*, 459+13*, 459+14*, 459+19*, 459+20*, 459+21*, 459+22*, 459+24* , 459+26*, 459+27*, 459+45*, 459+47*, 459+48*, 459+49*, 459+51*, 459+52, 459+53*, TIME+7* |
| LINE | 450+2~, 450+4*, 450+18, 450+39, 459+2~, 459+4*, 459+27 |
| LINE2 | 450+2~, 450+4*, 450+13, 459+4*, 459+22 |
| LKCNT | 450+2~, 450+21*, 450+45, 459+52, LOCKED+3*, WARN+2*, WARN+3*, WARN+4* |
| MESS | 450+2~, 450+6*, 450+10*, 450+11, 450+14*, 450+15, 450+16*, 450+17, 450+36*, 450+37 , 450+41*, 450+42, 450+48*, 459+2~, 459+6*, 459+10*, 459+11, 459+12*, 459+13, 459+23* , 459+24, 459+25*, 459+26, 459+46*, 459+48, 459+54*, TIME+6*, TIME+7, LOCKED+2*, LOCKED+3 |
| MSG | 450+2~, 450+51*, 459+2~, 459+56*, XMT+5, STAUCI+2*, STAUCI+9* |
| MSG1 | 450+2~, 450+6*, 450+48*, 459+6*, 459+54*, TIME+6 |
| NAME | 450+3~, 450+36, 459+3~, 459+44*, 459+45, NAME+2*, NAME+5*, LOCKED+2 |
| POP | DEVICE+6, DEVICE+11! |
| PPE | 459+3~, 459+18*, 459+21 |
| PPI | 459+3~, 459+15*, 459+16*, 459+17 |
| PPIEN | 459+3~, 459+16*, 459+17*, 459+18, 459+29, 459+30, 459+36, 459+40, 459+43 |
| PRSALST | DEVICE+9*, DEVICE+11! |
| PRSAPGM | DEVICE+9*, DEVICE+11! |
| PRSFDA | 459+3~ |
| PRSFDA( | 459+40* |
| PVAL | 450+3~, 450+30*, 450+36, 459+3~, 459+38*, 459+44 |
| STANUM | 450+3~, 459+3~, STAUCI*, STAUCI+1*, STAUCI+2 |
| STATUS | 450+3~, 450+4*, 450+43, 450+51*, 459+3~, 459+4*, 459+50, 459+56*, LOCKED+4* |
| TIME | 450+3~, 459+3~, TIME+5*, TIME+6 |
| TNAME | 450+3~, 459+3~, 459+44, NAME+3*, NAME+4*, NAME+5 |
| U | 450+3~, 450+4*, 459+3~, 459+4* |
| UCIX | 450+3~, 459+3~, STAUCI+7*, STAUCI+8*, STAUCI+9 |
| XMDUZ | XMT+3~, XMT+4*, WARN+7~, WARN+8* |
| XMSUB | XMT+3~, XMT+5*, WARN+7~, WARN+9* |
| XMTEXT | XMT+3~, XMT+6*, WARN+7~, WARN+10* |
| XMY | XMT+3~, WARN+7~ |
| XMY( | XMT+7*, WARN+11* |
| XMY("G.PAD@" | XMT+8*, WARN+12* |
| XQY0 | DEVICE+9*, DEVICE+11! |
| Y | XMT+11!, TIME+3*, TIME+5, STAUCI+7, WARN+15! |