PRSDSERV ;WOIFO/MGD,PLT - PAID DOWNLOAD MESSAGE SERVER ;12/3/07
Source file <PRSDSERV.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 |
---|---|---|
SETPRS | ;start employee record
|
|
EXIT | ||
REMSB | ||
SSNLOOP | ||
START | ; Process download
; RTYPE is used to determine which series of routines to call to ; process the download |
|
PROC | ||
PROC2 | ||
TMPERR | ||
TMPERR1 | ||
UNL | ||
SSN | ||
SSNOUT | ||
ERR | ||
LDINIT | ; Load Initial Labor Distribution Values
|
|
LDFNL | ; Load Final Labor Distribution Values
|
|
LDLOAD() | ; Retrieve current Labor Distribution Values from #450
|
|
LDCMP | ; Compare Initial and Final Labor Distribution for changes
; and update audit trail in #458 if necessary. |
Name | Field # of Occurrence |
---|---|
C^%DTC | SSNLOOP+10 |
NOW^%DTC | PRSDSERV+3 |
FILE^DICN | PRSDSERV+23, ERR |
^DIE | LDCMP+15, LDCMP+17, LDCMP+19 |
UPDATE^DIE | LDCMP+28, LDCMP+46, LDCMP+74 |
^DIK | LDCMP+59 |
$$GET1^DIQ | LDLOAD+5, LDLOAD+6, LDLOAD+7, LDLOAD+8 |
^PRSDADD | SSN+3 |
^PRSDCOMP | PROC2 |
^PRSDDL | PRSDSERV+16 |
^PRSDERR | SSNLOOP+9 |
TRANSCK^PRSDERR | SSNLOOP+13 |
PROC^PRSDPROC | PRSDSERV+21 |
^PRSDPTYP | SSNOUT |
^PRSDSTAT | SSNLOOP+9 |
RTS^PRSDUTIL | SSN+2 |
REMSBMSG^XMA1C | REMSB |
REC^XMS3 | PRSDSERV+3, PRSDSERV+15, SSNLOOP, SSNLOOP+13 |
FileNo | Call Tags |
---|---|
^PRSPC - [#450] | Classic Fileman Calls |
450.0757 | GET1^DIQ |
^PRSD(450.11 - [#450.11] | Classic Fileman Calls |
^PRSD(450.12 - [#450.12] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PRSD(450.11 - [#450.11] | ERR* |
^PRSD(450.12 - [#450.12] | PRSDSERV+11, PRSDSERV+22, PRSDSERV+24*, PRSDSERV+25*, PRSDSERV+26*, SETPRS+3*, SSNLOOP+8* |
^PRSPC - [#450] | PROC2+1! |
^PRSPC("SSN" | SSN, SSN+3, SSN+4 |
^PRST(458 - [#458] | LDCMP+5, LDCMP+9, LDCMP+23, LDCMP+33, LDCMP+35, LDCMP+62 |
^TMP($J | PRSDSERV+20*, SSN+2* |
^VA(200 - [#200] | LDCMP+44 |
^XTMP("PRS" | PRSDSERV+19, SETPRS+2!, SSNLOOP+6!, SSNLOOP+7*, SSNLOOP+11*, SSNLOOP+13*, SSNLOOP+14!, START+4, START+5, START+7 , PROC, PROC2+2!, TMPERR+1*, TMPERR1!, UNL |
Name | Line Occurrences |
---|---|
$$LDLOAD | LDINIT+1, LDFNL+1 |
@( | PROC |
ERR | SSN |
EXIT | PRSDSERV+3, PRSDSERV+4, PRSDSERV+9, PRSDSERV+11, PRSDSERV+15, PRSDSERV+16, PRSDSERV+19, PRSDSERV+22 |
LDCMP | START+11 |
LDFNL | START+11 |
LDINIT | START+11 |
PROC | START+11 |
PROC2 | START+11 |
REMSB | SSNLOOP+9 |
SETPRS | PRSDSERV+21 |
SSN | START+10 |
SSNLOOP | SETPRS+1 |
SSNOUT | SSN+3 |
START | SSNLOOP+9 |
TMPERR | START+12 |
TMPERR1 | TMPERR |
UNL | START+12 |
Name | Field # of Occurrence |
---|---|
^( | START+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | PRSDSERV+3, EXIT! |
%H | EXIT! |
%I | EXIT! |
A | SETPRS+1*, EXIT! |
AA | EXIT! |
AAA | EXIT! |
ADDFLG | EXIT! |
B | EXIT!, SSNLOOP+13* |
BB | EXIT! |
CC | EXIT! |
CDATE | EXIT+6!, SSNLOOP+10*, SSNLOOP+11 |
DA | EXIT!, SSN+3!, LDCMP+13*, LDCMP+58* |
DA(1 | LDCMP+56*, LDCMP+58 |
DATA | EXIT!, PROC2+1*, SSN+2* |
DATE | PRSDSERV+8*, PRSDSERV+19, PRSDSERV+22, PRSDSERV+24, PRSDSERV+26, SETPRS+2, EXIT!, SSNLOOP+7, SSNLOOP+13, SSNLOOP+14 , START+4, START+5, START+7, PROC, PROC2+2, TMPERR+1, TMPERR1, UNL, ERR |
DBNAME | EXIT! |
DD | PRSDSERV+23!, ERR! |
DIC | PRSDSERV+23*, EXIT!, ERR* |
DIC(0 | PRSDSERV+23*, ERR* |
DIE | SSN+3!, LDCMP+13* |
DIK | EXIT!, LDCMP+58* |
DINUM | EXIT! |
DLAYGO | EXIT+1! |
DLID | EXIT+1! |
DO | PRSDSERV+23!, ERR! |
DR | SSN+3!, LDCMP+14*, LDCMP+16*, LDCMP+18* |
E1 | EXIT+1! |
E2 | EXIT+1! |
E458IEN | LDCMP+3~ |
E458IEN(1 | LDCMP+25* |
ECNT | EXIT+1!, SSNLOOP+9*, SSNOUT+1* |
ECOUNT | EXIT+1! |
EE | EXIT+1!, PROC2+1* |
EMPCNT | PRSDSERV+7*, SETPRS+1, EXIT+1! |
ERRCNT | EXIT+1! |
ERRFLG | EXIT+1!, START+9*, START+11, START+12, SSN+3, SSNOUT*, ERR+1* |
ERRID | EXIT+1! |
ERRIEN | EXIT+1! |
ERRMSG | EXIT+2!, SSN*, ERR |
FLD | EXIT+2! |
FLDNUM | EXIT+2! |
GNUM | EXIT+2! |
GRP | EXIT+2! |
GRPVAL | EXIT+2! |
I | LDCMP+3~, LDCMP+51*, LDCMP+52, LDCMP+54*, LDCMP+57*, LDCMP+58 |
IEN | EXIT+2!, PROC2+1, SSN+4*, LDLOAD+5, LDLOAD+6, LDLOAD+7, LDLOAD+8, LDCMP+9, LDCMP+13, LDCMP+23 , LDCMP+25, LDCMP+26, LDCMP+35, LDCMP+37, LDCMP+56, LDCMP+62 |
IENS | LDCMP+3~, LDCMP+24*, LDCMP+26, LDCMP+27, LDCMP+37*, LDCMP+42, LDCMP+43, LDCMP+44, LDCMP+45, LDCMP+65 |
IENS1 | LDCMP+3~, LDCMP+65*, LDCMP+69, LDCMP+70, LDCMP+71, LDCMP+72, LDCMP+73 |
II | EXIT+2! |
INDX | LDCMP+3~ |
J | LDCMP+3~, LDCMP+52*, LDCMP+53*, LDCMP+64*, LDCMP+65 |
KFLG | SSNLOOP+12!, SSNLOOP+14! |
LD | LDLOAD+2~, LDLOAD+3*, LDLOAD+9*, LDLOAD+10, LDCMP+62*, LDCMP+65 |
LDA | LDCMP+3~, LDCMP+9*, LDCMP+10*, LDCMP+35*, LDCMP+36*, LDCMP+42 |
LDCC | LDLOAD+2~, LDLOAD+7*, LDLOAD+9 |
LDCODE | LDLOAD+2~, LDLOAD+5*, LDLOAD+9 |
LDFCP | LDLOAD+2~, LDLOAD+8*, LDLOAD+9 |
LDFNL | LDFNL+1*, LDCMP+2, LDCMP+51, LDCMP+75! |
LDINIT | LDINIT+1*, LDCMP+2, LDCMP+53*, LDCMP+67, LDCMP+70, LDCMP+71, LDCMP+72, LDCMP+73, LDCMP+75! |
LDPCT | LDLOAD+2~, LDLOAD+6*, LDLOAD+9 |
LPE | PRSDSERV+4*, PRSDSERV+14*, EXIT+2!, SSNLOOP+13 |
LTH | EXIT+2! |
MFLD | EXIT+2! |
MNR | PRSDSERV+21*, EXIT+6! |
MO | EXIT+2! |
MTYPE | PRSDSERV+12*, PRSDSERV+20, EXIT+2! |
MULT | EXIT+2! |
NAME | EXIT+3!, SSN+1*, SSN+2* |
NODE | EXIT+3!, PROC2+1* |
NODE459 | EXIT+3! |
OLDSSN | SSN+3! |
PDATE | EXIT+6!, SSNLOOP+10*, SSNLOOP+11 |
PIC | EXIT+3! |
PIECE | EXIT+3! |
PIECE459 | EXIT+3! |
PP | EXIT+3!, PROC2, TMPERR, SSNOUT |
PP455 | EXIT+3! |
PPA | LDCMP+3~, LDCMP+5*, LDCMP+6, LDCMP+9, LDCMP+23, LDCMP+24, LDCMP+33*, LDCMP+34, LDCMP+35, LDCMP+37 , LDCMP+62 |
PPIEN | EXIT+3! |
PRSD | EXIT+3! |
PRSDIEN | PRSDSERV+24*, SETPRS+3, EXIT+3!, SSNLOOP+8 |
PRSFDA | LDCMP+3~, LDCMP+41!, LDCMP+55!, LDCMP+68! |
PRSFDA( | LDCMP+26*, LDCMP+27*, LDCMP+42*, LDCMP+43*, LDCMP+44*, LDCMP+45*, LDCMP+69*, LDCMP+70*, LDCMP+71*, LDCMP+72* , LDCMP+73* |
PRSLD | LDLOAD+2~, LDLOAD+4*, LDLOAD+5, LDLOAD+6, LDLOAD+7, LDLOAD+8, LDCMP+63*, LDCMP+64, LDCMP+67, LDCMP+69 , LDCMP+70, LDCMP+71, LDCMP+72, LDCMP+73 |
RCD | EXIT+3!, START+9*, PROC*, TMPERR+1*, SSN+1, SSN+2 |
RTN | EXIT+4!, PROC* |
RTNNUM | EXIT+4!, PROC* |
RTYPE | EXIT+4!, START+3*, PROC |
SEQNUM | PRSDSERV+7*, PRSDSERV+19, PRSDSERV+20, PRSDSERV+22, PRSDSERV+24, PRSDSERV+26, SETPRS+2, EXIT+4!, SSNLOOP+7 |
SSN | SETPRS+1, SETPRS+3, EXIT+4!, SSNLOOP+1*, SSNLOOP+2*, SSNLOOP+5, SSNLOOP+9*, SSNLOOP+13, SSNLOOP+14, START+3* , START+4*, START+5, START+7, PROC, PROC2+2, TMPERR+1, TMPERR1, UNL, SSN, SSN+2 , SSN+3, SSN+4 |
SSNLINE | EXIT+4! |
STA | PRSDSERV+8*, PRSDSERV+15*, PRSDSERV+19, PRSDSERV+22, PRSDSERV+24, PRSDSERV+26, SETPRS+2, EXIT+4!, SSNLOOP+7, SSNLOOP+13 , SSNLOOP+14, START+4, START+5, START+7, PROC, PROC2+2, TMPERR+1, TMPERR1, UNL, ERR |
STA450 | EXIT+4! |
SUB | PRSDSERV+8*, EXIT+1!, SSNLOOP+13, SSNLOOP+14, START+4, START+5, START+7, PROC, PROC2+2, TMPERR+1 , TMPERR1, UNL |
SUM | EXIT+4! |
TIME | PRSDSERV+3*, PRSDSERV+25, EXIT+5!, SSNLOOP+10, LDCMP+5, LDCMP+33, LDCMP+43 |
TLDPER | LDCMP+3~, LDCMP+50*, LDCMP+51* |
TMPIEN | EXIT+4!, START+7*, START+8, START+9, PROC*, TMPERR+1* |
TMPLINE | EXIT+4!, SSNLOOP+13* |
TYPE | PRSDSERV+7*, PRSDSERV+9, PRSDSERV+12, PRSDSERV+14, PRSDSERV+16, PRSDSERV+19, PRSDSERV+22, PRSDSERV+24, PRSDSERV+26, SETPRS+2 , EXIT+5!, SSNLOOP+1, SSNLOOP+6, SSNLOOP+7, SSNLOOP+13, SSNLOOP+14, START+3, START+4, START+5, START+7 , PROC, PROC2, PROC2+2, TMPERR, TMPERR+1, TMPERR1, UNL, SSN, SSN+1, SSN+2 , SSNOUT, ERR, LDCMP+45 |
U | PRSDSERV+24, PRSDSERV+25, SETPRS+3, SSNLOOP+8, PROC2+1, ERR, LDLOAD+9, LDCMP+5, LDCMP+33, LDCMP+51 , LDCMP+53, LDCMP+67, LDCMP+70, LDCMP+71, LDCMP+72, LDCMP+73 |
VAIEN | SSN+3! |
VANAME | SSN+3! |
X | PRSDSERV+23*, EXIT+5!, SSNLOOP+10, ERR* |
X1 | EXIT+6!, SSNLOOP+10* |
X2 | EXIT+6!, SSNLOOP+10* |
XCNP | EXIT+5! |
XMDUZ | EXIT+5! |
XMER | PRSDSERV+3, PRSDSERV+15, EXIT+5! |
XMLOC | EXIT+5! |
XMMG | EXIT+6! |
XMPOS | PRSDSERV+3*, SETPRS+1*, EXIT+5!, SSNLOOP+12*, SSNLOOP+13 |
XMRG | PRSDSERV+4, PRSDSERV+7, PRSDSERV+8, PRSDSERV+15, EXIT+5!, SSNLOOP+1, SSNLOOP+13 |
XMSER | REMSB*! |
XMSUB | EXIT+5! |
XMTEXT | EXIT+5! |
XMY | EXIT+5! |
>> XMZ | PRSDSERV+11, PRSDSERV+23, REMSB, SSNLOOP+13 |
Y | PRSDSERV+24, PRSDSERV+25, PRSDSERV+26, EXIT+5!, ERR |
YR | EXIT+5! |
Name | Field # of Occurrence |
---|---|
$T(@RTN | PROC |