PRSDUTIL ;HISC/MGD-PAID DOWNLOAD UTILITY SUB-ROUTINES ;09/10/2003
Source file <PRSDUTIL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PIC9 | ;Replace 0s
|
|
SIGN | ;Sign conversion
|
|
D | ;.0
|
|
DD | ;.00
|
|
DDD | ;.000
|
|
DDDD | ;.0000
|
|
DDDDD | ;.00000
|
|
AHRS | ;Acct hrs
|
|
PCT | ;%
|
|
RZ | ;Remove leading 0s
|
|
DATE | ;Convert Austin Date to Fileman Date
|
|
LZ | ;Insert leading 0s
|
|
RTS | ;Remove trailing spaces
|
|
OT | ;Output trans
|
|
SOT | ;State
|
|
AC | ;Asgmnt code
|
|
TITLE | ;Title
|
|
NH | ;Norm Hrs
|
|
STEP | ;Step
|
|
ORGCC | ;Org/Cost Cntr
|
|
PVAE | ;Prior VA Exp
|
|
ZIP | ;Zip
|
|
NPLWOP | ;Nonpay & LWOP Hrs
|
|
NEWSSN | ;New SSN
|
|
COMP | ;0 out comp time bal
|
|
OST | ;Occupation Series & Title Output Transform
|
|
OSTOT | ||
OSTEX | ||
LD | ; Set Labor Distribution fields into Multiple.
|
|
PATCH32 | ;Subprograms LOOP450 and DTCMP are post-installation routines
|
|
LOOP450 | ;
|
|
DTCMP(IEN,NODE,DATANODE,PIECES) | ;
|
|
MSSG(FLAG) | ;OUT PUT POST INSTALLATION MESSAGE.
|
FileNo | Call Tags |
---|---|
^PRSP(454 - [#454] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(5 - [#5] | SOT+2, SOT+3 |
^PRSP(454 - [#454] | OT+1, OT+2, AC+3, AC+4, AC+5, AC+6, ORGCC+3 |
^PRSP(454.1 - [#454.1] | OT+2 |
^PRSPC - [#450] | AC+2, TITLE+2*, TITLE+3*, NH+1, NH+3*, ORGCC+1*, PVAE+1*, NPLWOP+1, NPLWOP+3*, NPLWOP+4* , COMP+1*, LOOP450+21, LOOP450+26, LOOP450+28, DTCMP+8* |
^PRSPC(0 | LOOP450+18 |
^PRST(459 - [#459] | NPLWOP+3*, NPLWOP+4* |
^TMP($J | ORGCC+3* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | LOOP450+6~, LOOP450+20*, LOOP450+22*, LOOP450+23 |
%DT | DATE+4~, DATE+6* |
ABC | PVAE+1*, PVAE+2!, COMP+1* |
AC | AC+2*, AC+3, AC+6*, AC+7, AC+8! |
AC1 | AC+2*, AC+5*, AC+7, AC+8! |
CCORG | ORGCC+2*, ORGCC+3, ORGCC+4! |
CHECK | LOOP450+6~ |
CHECK( | LOOP450+25, LOOP450+27 |
CHECK("BOND1" | LOOP450+14* |
CHECK("BOND2" | LOOP450+15* |
CHECK("MSD2" | LOOP450+13* |
CHECK("PCD" | LOOP450+12* |
CHECK("TSP1" | LOOP450+16* |
CHECK(0 | LOOP450+7* |
CHECK(1 | LOOP450+8* |
CHECK(2 | LOOP450+9* |
CHECK(3 | LOOP450+10* |
CHECK(4 | LOOP450+11* |
COST | ORGCC+1*, ORGCC+4! |
>> D0 | AC+2 |
DATA | SIGN+1, SIGN+3*, SIGN+4*, D+1*, DD+1*, DDD+1*, DDDD+1*, DDDDD+1*, AHRS+1, AHRS+3* , PCT+1*, PCT+2*, RZ+1*, RZ+2, RZ+3*, RZ+4*, DATE+2, DATE+3*, DATE+5, DATE+7* , LZ+1*, RTS+1, RTS+2*, TITLE+1*, TITLE+2, NH+1*, NH+2, STEP+1*, STEP+2*, ORGCC+1 , ORGCC+2, PVAE+1, ZIP+1*, ZIP+2*, ZIP+3*, NPLWOP+2, NEWSSN+1, COMP+1, LD+2*, LD+4* , DTCMP+3~, DTCMP+5*, DTCMP+6, DTCMP+7 |
DATANODE | DTCMP~, DTCMP+5 |
DB | NH+1*, NH+2, NH+4! |
>> DBNAME | ORGCC+1, NPLWOP+3, NPLWOP+4 |
DD | ORGCC+3! |
DIC | ORGCC+3*, ORGCC+4! |
DIC(0 | ORGCC+3* |
DIF | PIC9+1*, PIC9+2! |
DIV | LOOP450+6~, LOOP450+19*, LOOP450+23 |
DLAYGO | ORGCC+3*, ORGCC+4! |
DO | ORGCC+3! |
DTOUT | DATE+4~ |
FC | RZ+2*, RZ+4, RZ+5! |
FD | AHRS+1*, AHRS+3, AHRS+4! |
FF | PIC9+1*, PIC9+2! |
FLAG | MSSG~, MSSG+2 |
>> GRPVAL | PIC9+1* |
IEN | TITLE+2, TITLE+3, NH+1, NH+3, ORGCC+1, PVAE+1, NPLWOP+1, NPLWOP+3, NPLWOP+4, COMP+1 , DTCMP~, DTCMP+8 |
IEN454 | OT+1*, OT+2, OT+3! |
IEN5 | SOT+2*, SOT+3, SOT+4! |
L | SIGN+1*, SIGN+3, SIGN+5!, D+1*!, DD+1*!, DDD+1*!, DDDD+1*!, DDDDD+1*!, AHRS+1*, AHRS+4! , LZ+1, LZ+2!, NEWSSN+1* |
LC | SIGN+2*, SIGN+3, SIGN+5! |
LD | AHRS+1*, AHRS+2*, AHRS+3, AHRS+4!, TITLE+2*, TITLE+3, TITLE+4!, OST+1*, OST+2, OST+3 , OST+4, OSTOT+1, OSTOT+2, OSTOT+3, OSTEX! |
LLL | AC+3*, AC+4, AC+5, AC+6, AC+8! |
>> LTH | PIC9+1 |
LVGRP | NPLWOP+1*, NPLWOP+2, NPLWOP+5! |
MSSG | MSSG+1~, MSSG+2*, MSSG+3*, MSSG+4 |
ND | LOOP450+6~, LOOP450+24*, LOOP450+25*, LOOP450+26, LOOP450+27, LOOP450+28 |
NEWDATE | DTCMP+3~, DTCMP+7*, DTCMP+8 |
NEXT | DTCMP+3~, DTCMP+4* |
NH | NH+2*, NH+3, NH+4! |
NLD | OST+3*, OSTEX! |
NODE | PVAE+1, DTCMP~, DTCMP+8 |
NPLWOP | NPLWOP+2*, NPLWOP+3, NPLWOP+4, NPLWOP+5! |
OCCS | AC+4*, AC+5, AC+6, AC+8! |
OSC | AC+2*, AC+6, AC+8!, OST+1*, OSTEX! |
OSC14 | OST+1*, OST+3, OST+4, OSTOT+1, OSTOT+2, OSTOT+3, OSTEX! |
OSC15 | OST+1*, OST+3, OST+4, OSTEX! |
PIECE | PVAE+1*, DTCMP+3~, DTCMP+4*, DTCMP+5, DTCMP+8 |
PIECES | LOOP450+6~, LOOP450+27*, LOOP450+28, DTCMP~, DTCMP+4 |
>> PPIEN | NPLWOP+3, NPLWOP+4 |
PRSTMP | LD+1~, LD+2*, LD+4 |
PV | PVAE+1*, PVAE+2! |
REC | LOOP450+6~, LOOP450+21*, LOOP450+26, LOOP450+28 |
S | SIGN+1*, SIGN+2, SIGN+4, SIGN+5! |
SLOOP | RTS+2*, RTS+3! |
SUB454 | OT+1, OT+2, OT+3!, OSTOT*! |
SUF | OSTOT+3*, OSTEX! |
>> TYPE | NPLWOP+3, NPLWOP+4 |
U | OT+2, SOT+3, AC+2, AC+4, TITLE+2, TITLE+3, NH+1, NH+3, ORGCC+1, PVAE+1 , NPLWOP+1, NPLWOP+3, NPLWOP+4, COMP+1 |
UUU | LZ+1*, LZ+2! |
X | DATE+4~, DATE+5*, ORGCC+3*, ORGCC+4! |
XPDIDTOT | LOOP450+6~, LOOP450+18*, LOOP450+19 |
Y | DATE+4~, DATE+7, OT+1, OT+2*, SOT+1, SOT+2, SOT+3*, AC+1, AC+3, AC+7* , OST+1, OST+3*, OST+4*, OSTOT+1*, OSTOT+2*, OSTOT+3* |