XUPSPAID ;CS/GRR/RAM/DW - New Person file Update & Report ; 1 Jan 2004
Source file <XUPSPAID.m>
Package | Total | Caller Graph |
---|---|---|
Kernel | 2 | XUPS PREUPDATE NPF REPORTS XUPS UPDATE NEW PERSON FILE |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; - entry point
|
|
HD(NODE) | ; -- Report header
|
|
UPDSEX | ;Update SEX if NPF SEX is null
|
|
UPDDOB | ;Update DOB if NPF DOB is null
|
|
RECORD | ;Process the record
|
|
EN1 | ;
|
|
FL1(NODE,DATA) | ; -- format line
|
|
DOB(DOB) | ; format DOB
|
|
QUE | ;Que the task
|
|
REPORT | ;Pre-update reports
|
|
NAME(NAME) | ; Return "LastName,FirstName".
|
|
XM(XMSUB,X) | ;Email the report
|
|
PSDT() | ; format date
|
|
HD1(NODE) | ; -- Report header
|
|
FL(NODE,DATA) | ; -- format line
|
Name | Field # of Occurrence |
---|---|
DD^%DT | PSDT+4 |
NOW^%DTC | PSDT+4 |
HOME^%ZIS | QUE+9 |
^%ZISC | QUE+9 |
^%ZTLOAD | QUE+8 |
^DIE | UPDSEX+7, UPDDOB+7 |
^DIR | EN+14 |
$$FORMAT^XLFNAME7 | NAME+7 |
$$CJ^XLFSTR | HD+18, HD+27, HD+36, FL+19, FL+29, HD1+29, FL1+16 |
$$LJ^XLFSTR | HD+17, HD+19, HD+20, HD+26, HD+28, HD+29, HD+35, HD+37, HD+38, FL+18 , FL+20, FL+21, FL+28, FL+30, FL+31, HD1+18, HD1+19, HD1+20, HD1+21, HD1+27 , HD1+28, HD1+30, FL1+14, FL1+15, FL1+18 |
$$RJ^XLFSTR | HD+21, HD+30, HD+39, FL+22, FL+32, HD1+22, HD1+31, FL1+19 |
^XMD | XM+7 |
NOTICE^XUPSPD1 | EN1+21 |
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 |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PRSPC( | EN1+17, RECORD+7, RECORD+13 |
^TMP( | HD+4*, HD+8*, HD+10*, HD+12*, HD+15*, HD+24*, HD+33*, HD+42*, HD+45*, FL+25* , FL+35*, FL+38*, HD1+5*, HD1+9*, HD1+11*, HD1+13*, HD1+16*, HD1+25*, HD1+34*, HD1+37* , FL1+22*, FL1+25* |
^TMP("XUPS DIFF" | EN1+5!, REPORT+13*, REPORT+15*, REPORT+17*, REPORT+19*, REPORT+21*, REPORT+23*, REPORT+48! |
^TMP("XUPS PAID" | EN1+4!, REPORT+8, REPORT+9, REPORT+29, REPORT+30, REPORT+47!, RECORD+37*, RECORD+43*, RECORD+49*, RECORD+55* , RECORD+61* |
^TMP("XUPS UPD" | EN1+6!, REPORT+34*, REPORT+36*, REPORT+38*, REPORT+40*, REPORT+42*, REPORT+49! |
^VA(200 - [#200] | RECORD+22, RECORD+23 |
Name | Line Occurrences |
---|---|
$$DOB | FL+20, FL+30, FL1+18 |
$$NAME | RECORD+35 |
FL | REPORT+10 |
FL1 | REPORT+31 |
HD | REPORT+6 |
HD1 | REPORT+27 |
QUE | EN+17 |
RECORD | EN1+17 |
REPORT | EN1+23 |
UPDDOB | RECORD+57 |
UPDSEX | RECORD+45 |
XM | REPORT+44, REPORT+45 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | PSDT+2~, PSDT+4, XM+2~ |
C1 | HD+1~, HD+17*, HD+24, HD+26*, HD+33, HD+35*, HD+42, FL+15~, FL+18*, FL+25 , FL+28*, FL+35, HD1+2~, HD1+18*, HD1+25, HD1+27*, HD1+34, FL1+11~, FL1+14*, FL1+22 |
C2 | HD+1~, HD+18*, HD+24, HD+27*, HD+33, HD+36*, HD+42, FL+15~, FL+19*, FL+25 , FL+29*, FL+35, HD1+2~, HD1+19*, HD1+25, HD1+28*, HD1+34, FL1+11~, FL1+15*, FL1+22 |
C3 | HD+1~, HD+19*, HD+24, HD+28*, HD+33, HD+37*, HD+42, FL+15~, FL+20*, FL+25 , FL+30*, FL+35, HD1+2~, HD1+20*, HD1+25, HD1+29*, HD1+34, FL1+11~, FL1+16*, FL1+22 |
C4 | HD+1~, HD+20*, HD+24, HD+29*, HD+33, HD+38*, HD+42, FL+15~, FL+21*, FL+25 , FL+31*, FL+35, HD1+2~, HD1+21*, HD1+25, HD1+30*, HD1+34, FL1+11~, FL1+17*, FL1+18* , FL1+22 |
C5 | HD+1~, HD+21*, HD+24, HD+30*, HD+33, HD+39*, HD+42, FL+15~, FL+22*, FL+25 , FL+32*, FL+35, HD1+2~, HD1+22*, HD1+25, HD1+31*, HD1+34, FL1+11~, FL1+19*, FL1+22 |
CNT | REPORT+2~, REPORT+3*, REPORT+12*, REPORT+13, REPORT+14*, REPORT+15, REPORT+16*, REPORT+17, REPORT+18*, REPORT+19 , REPORT+20*, REPORT+21, REPORT+22*, REPORT+23, REPORT+26*, REPORT+33*, REPORT+34, REPORT+35*, REPORT+36, REPORT+37* , REPORT+38, REPORT+39*, REPORT+40, REPORT+41*, REPORT+42, HD+3*, HD+4, HD+7*, HD+8, HD+9* , HD+10, HD+11*, HD+12, HD+14*, HD+15, HD+23*, HD+24, HD+32*, HD+33, HD+41* , HD+42, HD+44*, HD+45, FL+24*, FL+25, FL+34*, FL+35, FL+37*, FL+38, HD1+4* , HD1+5, HD1+8*, HD1+9, HD1+10*, HD1+11, HD1+12*, HD1+13, HD1+15*, HD1+16, HD1+24* , HD1+25, HD1+33*, HD1+34, HD1+36*, HD1+37, FL1+21*, FL1+22, FL1+24*, FL1+25 |
CNTD | REPORT+2~, REPORT+3*, REPORT+11*, REPORT+23 |
CNTG | REPORT+2~, REPORT+3* |
CNTU | REPORT+2~, REPORT+3*, REPORT+32*, REPORT+42 |
DA | UPDSEX+3~, UPDSEX+4*, UPDDOB+3~, UPDDOB+4* |
DATA | REPORT+2~, REPORT+9*, REPORT+10, REPORT+30*, REPORT+31, RECORD+2~, RECORD+13*, RECORD+14, RECORD+15, RECORD+16 , RECORD+17, RECORD+22*, RECORD+24, RECORD+25, RECORD+26, RECORD+30*, RECORD+31*, RECORD+37, RECORD+49, RECORD+61 , FL~, FL+5, FL+6, FL+7, FL+8, FL+9, FL+10, FL+11, FL+12, FL+13 , FL1~, FL1+4, FL1+5, FL1+6, FL1+8, FL1+9 |
DATA1 | REPORT+2~, RECORD+2~, RECORD+33*, RECORD+41*, RECORD+43, RECORD+53*, RECORD+55 |
DIE | UPDSEX+3~, UPDSEX+4*, UPDDOB+3~, UPDDOB+4* |
DIFROM | XM+2~ |
DIR | EN+14! |
DIR("?" | EN+13* |
DIR("A" | EN+12* |
DIR("B" | EN+12* |
DIR(0 | EN+12* |
DIRUT | EN+2~, EN+15 |
DOB | DOB~, DOB+2, DOB+4 |
DR | UPDSEX+3~, UPDSEX+6*, UPDDOB+3~, UPDDOB+6* |
DUZ | XM+5 |
ERR | QUE+1~ |
IEN | EN1+1~, EN1+16*, EN1+17*, REPORT+2~, REPORT+7*, REPORT+8*, REPORT+9, REPORT+28*, REPORT+29*, REPORT+30 , RECORD+7, RECORD+13 |
IEN200 | RECORD+2~, RECORD+7*, RECORD+9, RECORD+22, RECORD+23, RECORD+31, RECORD+33, RECORD+37, RECORD+43, RECORD+49 , RECORD+55, RECORD+61, UPDSEX+4, UPDDOB+4 |
IOP | QUE+1~ |
NAME | NAME~, NAME+7 |
NODE | HD~, HD+4, HD+6, HD+8, HD+10, HD+12, HD+15, HD+24, HD+33, HD+42 , HD+45, FL~, FL+25, FL+35, FL+38, HD1~, HD1+5, HD1+7, HD1+9, HD1+11 , HD1+13, HD1+16, HD1+25, HD1+34, HD1+37, FL1~, FL1+22, FL1+25 |
NPFDOB | RECORD+4~, RECORD+25*, RECORD+30, RECORD+52, RECORD+59, FL+2~, FL+7*, FL+20, FL1+2~, FL1+8* , FL1+17, FL1+18, UPDDOB+5 |
NPFIEN | FL+2~, FL+9*, FL+22, FL1+2~, FL1+9*, FL1+19 |
NPFNM | RECORD+4~, RECORD+23*, RECORD+30, RECORD+33, RECORD+35, FL+2~, FL+5*, FL+18, FL1+2~, FL1+5* , FL1+15 |
NPFSEX | RECORD+4~, RECORD+24*, RECORD+30, RECORD+40, RECORD+47, FL+2~, FL+6*, FL+19, FL1+2~, FL1+6* , FL1+7*, FL1+16, UPDSEX+5 |
NPFSSN | RECORD+4~, RECORD+26*, RECORD+28, RECORD+30, RECORD+33, FL+2~, FL+8*, FL+21, FL1+2~, FL1+4* , FL1+14 |
PAIDDOB | RECORD+15*, RECORD+31, RECORD+51, RECORD+53, RECORD+59, FL+3~, FL+12*, FL+30 |
PAIDNM | RECORD+3~, RECORD+14*, RECORD+31, RECORD+35, FL+3~, FL+10*, FL+28 |
PAIDOB | RECORD+3~ |
PAIDSEX | RECORD+3~, RECORD+17*, RECORD+19*, RECORD+31, RECORD+39, RECORD+41, RECORD+47, FL+3~, FL+11*, FL+29 |
PAIDSSN | RECORD+3~, RECORD+16*, RECORD+28, RECORD+31, FL+3~, FL+13*, FL+31 |
POP | QUE+1~ |
RESULT | NAME+2~, NAME+4*, NAME+10*, NAME+12 |
STDNM | NAME+2~, NAME+7*, NAME+10 |
U | RECORD+23, RECORD+30, RECORD+31, RECORD+33, RECORD+41, RECORD+53, FL+5, FL+6, FL+7, FL+8 , FL+9, FL+10, FL+11, FL+12, FL+13, FL1+4, FL1+5, FL1+6, FL1+8, FL1+9 |
X | EN+2~, QUE+1~, XM~, XM+6 |
XMDUZ | XM+4~, XM+5* |
XMSUB | XM~ |
XMTEXT | XM+4~, XM+6* |
XMY | XM+4~ |
XMY( | XM+5* |
XUNPFT | EN1+1~, EN1+2*, EN1+19, RECORD+10* |
XUPSACT | EN+4, EN+19!, QUE+6, QUE+7, EN1+21, RECORD+44, RECORD+56, UPDSEX+1, UPDDOB+1 |
XUPSDIFF | EN1+1~ |
XUPSDIFF("DOB" | EN1+11*, REPORT+21, RECORD+60* |
XUPSDIFF("NAME" | EN1+9*, REPORT+17, RECORD+36* |
XUPSDIFF("SEX" | EN1+10*, REPORT+19, RECORD+48* |
XUPSDIFF("SSN" | EN1+8* |
XUPSUPD | EN1+1~ |
XUPSUPD("DOB" | EN1+14*, REPORT+40, RECORD+54* |
XUPSUPD("SEX" | EN1+13*, REPORT+38, RECORD+42* |
XUT | EN1+1~, EN1+21 |
XUT(1 | EN1+19* |
XUT(2 | EN1+20* |
XUUPDT | EN1+1~, EN1+2*, EN1+20, RECORD+46*, RECORD+58* |
Y | EN+2~, EN+15, PSDT+4*, PSDT+6 |
ZTDESC | QUE+1~, QUE+6*, QUE+7* |
ZTIO | QUE+1~, QUE+3* |
>> ZTQUEUED | XM+2 |
ZTRTN | QUE+1~, QUE+4* |
ZTSAVE | QUE+1~ |
ZTSAVE("XUPSACT" | QUE+5* |
ZTSK | QUE+1~, QUE+10 |
ZUSR | QUE+1~ |