X0 S()0C DATAPLAN-FOCAL73?MYABJE?MCCNYD 8.2;T "TAETIGKEIT NR. MITARBEITER STD DM/STD KOSTEN?M]:NZG 7.31?M :OLS H1=;S H2=;F H=1,20;S H1=H1+SY(H);S H2=H2+SJ(H)?MKOOPD 8.02;T "SUMME IM MONAT":35,H4;I (H4-.01)7.81;T :42,H5 H4,:60,H5?MD+ORD 8.02;T "SUMME ENDE MONAT":35,H4+H1?MI0OSI (H1+H4-.01)7.84;T :42,(H2+H5)/(H1+H4),:60,H2+H5?MEPPBT !;S J=J+1?MLIPDI (60-J)8.06;R?ME$PJT !!!;S J=J+3?MXUPTT !!;S J=J+2?MEAR?MH+>JO I TTY:,E?M7>LO O TTY:?M 4> C?M ?>"C?M K>$C?MPD^A !!"AUSDRUCK MITARBEITER "AM?M%>F^S M=1?MJ MFF K=1,AZ;A H,H4,H5,H8?MW N8G 7.4?MCIOIG 7.45?MEGOTD 7.3?M\!DJA !!!"AUSWERTUNG FUER MONAT(ZB. 10.74)"MO;I (MO-12.99)2.15;T " FEHLER";G 2.1?M"LNJD 28.05;D 28.1;S J=4;S H4=;S H5=;S H=;S H8=;S H9=;S SZ=;S SK=?MW)N>D 8.02;F I=1,70;T "-?MDOOQD 8.02;F I=1,70;T "=?MBXNVD 8.02;F I=1,70; "=?MZUN"A AZ;S ZA=1?M 2OBD 8.2?M ^KR?MIVL*^S K=FIN()?MUBRJS K=12*H-11?MUQRTS DU=FOUT(FX(K));S K=K+1?MU&R^I (FX(K)-159.1)9.99;I (K-12*H-.1)9.2?ME-SR?MN&HO R I;S SZ=;A H1,H2,H,H3;I (H2)4.35;D 8.02;G 4.6?MVOH*A H1;I (H1)4.9?MN5H.A H2,H,H ;I (H2)4.4;I (FABS(H1-H4)-.01)4.6?MO?H>S SZ=SZ+H2;S H4=H1;G 4.4?M$$JLS N=I1;D 31.4;D 31.42;D 31.44;D 31.45?MYIJRA AZ;F M=1,AZ;D 20?MM)JDOS M=FITR(MO);S I1=FITR(((MO-M)*100-74)*12+M+.01);S MO=M?M]K DI (58-J)16.06;R?MX FD 28.05;D 28.1;S J=4;D 8.02;D 4.2;D 4.22;D 7.22;D 4.3;D 16.02;D 16.02;R?M (>^C?M V>(C?MRNN^C?M^R8ET !;S J=FOUT(140);F J=1,400;S J=J?M^<8JT "BUERO FUER INGENIEURBAUWESEN OTTO PAULER SCHWAEBISCH GMUEND T.07171/2000"!!?M K8TT %6,"AUFTRAG-NR."AU(1)?M Z8^T %6.01,:30,"POS.:"AU(2)?MH 8(T :65,"SEITE"!!;S J=6?MH2> CO I DTA1:RNK0(N)?MH6>!O I SYS:RNK0(N)?MH:>CO I DTA1:RNK1(N)?M]6>%O I SYS:RNK1(N)?M >*O A DSK:RNK2?M )>,CO I DTA0:RNK3?M$=>-O I DSK:RNK3?M!UOFS H=H+1;I (20.1-H)7.76;S SZ=SY(H);S SK=SJ(H);I (SJ(H)-.001)7.45?M!>OGD 8;D 9;T :21,"UEBERTRAG"%8.02,:35,SY(H);I (SY(H)-.01)7.72;T :42,SJ(H)/SY(H)?MI*OHT :60,SJ(H)?MPGJ^A N?M.NOD 8.02;T "DATA-PLAN P OGRAMM RNKPA: NACHKALKULATION IM TECHNISCHEN BUERO?MI6BTT !!!"DATA-PLAN PROGR. RNKP1?MBTBAC PR. RNKP1?MWF2S M=M+2;G 3.4?MM4FNO O LPT:?M^LTA AU(1);I (NZ)6.4;I (.01-FABS(AU(1)-N1))6.4;S NZ=-1?M LLS NA=NA+2;S N1=AU(NA);S N2=AU(NA+1);S NZ=1?M FLJI (-NZ)6.2;I (N2-.1)6.12;I (.01-FABS(AU(1)-N2))6.2?MC$OND 8;T "SUMME UEBERTRAG"%8.02,:35,H1;I (H1-.01)7.8;T :42,H2 H1,:60,H2?M+1L S RNKP1?M? UEBERTRAG"%8.02,:35,H1;I (H1-.01)7.8;T :42,H2/H1,:60,H2?M+1)?M(NE 5. ?KV/2OEJCBBBTBHBA%^%"J;F^F$L:K7MQ Note: Lines longer than 256 characters were wrapped