ECTPAS0 ;B'ham ISC/PTD-PAID Data for All Services - CONTINUED ;01/29/91 08:00
Source file <ECTPAS0.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
V | ;;1.05;INTERIM MANAGEMENT SUPPORT;**4,8,10**;
|
|
ENQ | ;ENTRY POINT WHEN QUEUED
|
|
LP1 | ;LOOP THROUGH ALL 'LOCAL' SERVICES AND THROUGH DATE/PAY PERIOD REQUESTED
|
|
LP2 | ;LOOP THROUGH ALL RECORDS FOR DATE/PAY PERIOD
|
|
EMP | ||
GTDTA | ;FOR SELECTED PAY PERIOD, EXTRACT DATA FOR INDIVIDUAL
|
|
CALC | ;COMPUTE FIRST AND SECOND WEEK TOTALS FOR PAY PERIOD
|
|
PHYS | ;IS INDIVIDUAL FULL-TIME PHYSICIAN OR RESIDENT
|
|
AL | ||
SL | ||
LWOP | ||
AA | ||
CTE | ||
CTU | ||
UNS | ||
OT | ||
SETPP | ;INCREMENT PAY PERIOD COUNTERS FOR THIS INDIVIDUAL
|
|
SETGL | ;SET TMP GLOBAL
|
|
CONV | ;CONVERT LEAVE DAYS INTO HOURS
|
|
RND | ;ROUND TO NEAREST QUARTER HOUR
|