Routine: ECTPIND1

Information

ECTPIND1 ;B'ham ISC/PTD-Individual PAID Inquiry - CONTINUED ;01/29/91 08:00

Name	Line Occurrences
Function Call: WRITE	Prompt: !?14 Line Location: WRTOT+0
Function Call: WRITE	Prompt: "-" Line Location: WRTOT+0
Function Call: WRITE	Prompt: !?4,"TOTAL",?14,$J(TAL,6,2),?24,$J(TSL,6,2),?34,$J(TLWOP,6,2),?44,$J(TAA,6,2),?54,$J(TCE,6,2),?64,$J(TCU,6,2),?74,$J(TOT,6,2),!! Line Location: WRTOT+1
Function Call: WRITE	Prompt: @IOF Line Location: WRTOT+3
Function Call: WRITE	Prompt: @IOF,!?16,"INDIVIDUAL PAID DATA FOR "_NM,!?32,"SSN: "_$E(EMPSN,1,3)_"-"_$E(EMPSN,4,5)_"-"_$E(EMPSN,6,9),!?16,"FROM PAY PERIOD: "_BPP_" - '"_$E(BYR,2,3)_" TO PAY PERIOD: "_EPP_" - '"_$E(EYR,2,3) Line Location: HDR+1
Function Call: WRITE	Prompt: !!?45,Y,?70,"PAGE ",PGCT Line Location: HDR+2
Function Call: WRITE	Prompt: !!?57,"CT",?67,"CT",?75,"OVER",!,"PAY PERIOD",?17,"AL",?27,"SL",?36,"LWOP",?47,"AA",?55,"EARNED",?66,"USED",?75,"TIME",!,LN Line Location: HDR+2
Function Call: WRITE	Prompt: !?1,$E(YP,4,5)_" - '"_$E(YP,2,3),?15,$J($P(LOC,"^"),5,2),?25,$J($P(LOC,"^",2),5,2),?35,$J($P(LOC,"^",3),5,2),?45,$J($P(LOC,"^",4),5,2),?55,$J($P(LOC,"^",5),5,2) Line Location: WRTLN+0
Function Call: WRITE	Prompt: ?65,$J($P(LOC,"^",6),5,2),?75,$J($P(LOC,"^",7),5,2) Line Location: WRTLN+1