source: WorldVistAEHR/trunk/r/PAID-PRS/PRSDLD20.m@ 1789

PRSDLD20 ;HISC/MGD-PAID INITIAL DOWNLOAD RECORD 20 LAYOUT ;11/19/2003
 ;;4.0;PAID;**82,86**;Sep 21, 1995
 F CC=1:1 S FLD=$T(RECORD+CC) Q:FLD=""  D LDSET^PRSDSET
 Q
RECORD ;;Record 20;18
 ;;LD-CODE1;LABOR DIST CODE-1;LD;2;S MULT=1,MFLD=1;;;;;450.0757.1-#1
 ;;LD-PERCENT1;LABOR DIST CODE-1 PCT;LD;3;S MULT=1,MFLD=2 D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;450.0757.2-#1
 ;;LD-CODE2;LABOR DIST CODE-2;LD;2;S MULT=2,MFLD=1;;;;;450.0757.1-#2
 ;;LD-PERCENT2;LABOR DIST CODE-2 PCT;LD;3;S MULT=2,MFLD=2 D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;450.0757.2-#2
 ;;LD-MHORGCOD2;LABOR DIST CODE-2 COST CENTER;LD;4;S MULT=2,MFLD=3;;;;;450.0757.3-#2
 ;;LD-MHFUNDCP2;LABOR DIST CODE-2 FUND CTRL PNT;LD;5;S MULT=2,MFLD=4;;;;;450.0757.4-#2
 ;;LD-CODE3;LABOR DIST CODE-3;LD;2;S MULT=3,MFLD=1;;;;;450.0757.1-#3
 ;;LD-PERCENT3;LABOR DIST CODE-3 PCT;LD;3;S MULT=3,MFLD=2 D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;450.0757.2-#3
 ;;LD-MHORGCOD3;LABOR DIST CODE-3 COST CENTER;LD;4;S MULT=3,MFLD=3;;;;;450.0757.3-#3
 ;;LD-MHFUNDCP3;LABOR DIST CODE-3 FUND CTRL PNT;LD;5;S MULT=3,MFLD=4;;;;;450.0757.4-#3
 ;;LD-CODE4;LABOR DIST CODE-4;LD;2;S MULT=4,MFLD=1;;;;;450.0757.1-#4
 ;;LD-PERCENT4;LABOR DIST CODE-4 PCT;LD;3;S MULT=4,MFLD=2 D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;450.0757.2-#4
 ;;LD-MHORGCOD4;LABOR DIST CODE-4 COST CENTER;LD;4;S MULT=4,MFLD=3;;;;;450.0757.3-#4
 ;;LD-MHFUNDCP4;LABOR DIST CODE-4 FUND CTRL PNT;LD;5;S MULT=4,MFLD=4;;;;;450.0757.4-#4
 ;;FSA-HEALTH-CARE-AMT;HLTH CARE FLEX SPEND ACCT CPPD;FSA;2;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;759
 ;;FSA-HEALTH-CARE-AMT-YTD;HLTH CARE FLEX SPEND ACCT YTD;FSA;1;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;758
 ;;FSA-DEP-CARE-AMT;DPNT CARE FLEX SPEND ACCT CPPD;FSA;4;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;761
 ;;FSA-DEP-CARE-AMT-YTD;DPNT CARE FLEX SPEND ACCT YTD;FSA;3;D SIGN^PRSDUTIL,DD^PRSDUTIL;;;;;760