%OP%TNN
%OP%BON
%OP%JUY
%OP%WRY
%OP%PL60
%OP%AMM
%OP%DP2
%OP%HM0
%OP%FM0
%OP%BM0
%OP%LM2
%CO:A,16,80%%R%%H2%WAGEPKT.CAL

%V%%R%"EMPLOYEES"
  
%V%%R%"H.SMITH"
%V%%R%"P.ROBINSON"
%V%%R%"T.H.EVANS"
%V%%R%"T.T.JONES"
%V%%R%"A.N.OTHER"
%V%%R%"A.N.OTHER"
%V%%R%"A.N.OTHER"
%V%%R%"A.N.OTHER"
%V%%R%"A.N.OTHER"
%V%%R%"A.N.OTHER"
%V%%R%"A.N.OTHER"
%V%%R%"A.N.OTHER"

%V%%R%"----------------"
%V%%R%" TOTAL"
%V%%R%"Checksum"

%V%%R%"----------------"

%C%%H2%PROCEDURE%H2% - Enter NAMES in Col A, WAGES in Col B.
%C%            Drop cursor down to "Checksum" and Calculate ( <>A ) TWICE.
%C%Ensure that the totals agree - TOTAL is vertical addition 
%C%Checksum is the sum of all note and coin totals.

%JR%NOTE - the table only covers 12 persons.  It is assumed that if there were more 
than this there would be a computor and a "payroll" program available.

%JL%HELP!! Would someone please tell me why the divisors in cells at Q and S have 
%JR%to be %H2%less%H2% than .02 and .01 respectively, as good mathematical practice would 
%JL%require.  Using these figures can result in two 1p coins being needed instead 
%JR%of one 2p coin, or one 2p and two 1p instead of two 2p  i.e. .02 divided by .02 
%JR%is NOT one nor is four divided by two equal to two!   Revealing Cols P and S 
%JR%does not give me a clue either!  Using .01 in the last column can result in a 
negative zero!  As I say - - HELPPPPPPPPP!!!!!

%JL%Do not remove unwanted rows - you may not like to see a lot of zeros but it 
could, and will be worse if you delete "live" cells.

%JR%To enter names in Col A simply type the name with the cursor in place BUT you 
must use quotes before and after or you get "typing error".


Jack Lawrie (4635)  15 Sycamore Grove, Southam, Leamington Spa, CV33 0EY.
%CO:B,8,8%

%V%%R%"WAGES"

%V%%R%%D2%45.87
%V%%R%%D2%45.87
%V%%R%%D2%44.78
%V%%R%41.24
%V%%R%37.87
%V%%R%35.88
%V%%R%40.98
%V%%R%38.76
%V%%R%34.29
%V%%R%38.96
%V%%R%23.65
%V%%R%33.65
%V%%R%"- - - -"
%V%%R%%D2%"--------"
%V%%R%%D2%sum(B5B17)
%V%%R%%D2%C19*10+E19*5+G19+I19*.5+K19*.2+M19*.1+O19*.05+Q19*.02+S19*.01

%V%%R%"--------"
%CO:C,8,48%

%V%%R%"£10"

%V%%R%%D0%int(B5/10)
%V%%R%%D0%int(B6/10)
%V%%R%%D0%int(B7/10)
%V%%R%%D0%int(B8/10)
%V%%R%%D0%int(B9/10)
%V%%R%%D0%int(B10/10)
%V%%R%%D0%int(B11/10)
%V%%R%%D0%int(B12/10)
%V%%R%%D0%int(B13/10)
%V%%R%%D0%int(B14/10)
%V%%R%%D0%int(B15/10)
%V%%R%%D0%int(B16/10)
%V%%R%%D0%int(B17/10)
%V%%R%%D0%INT(B18/10)
%V%%R%%D0%SUM(C5C17)

%V%%R%"£10"
%V%%R%"--------"
%CO:D,0,36%



%V%%R%B5-C5*10
%V%%R%B6-C6*10
%V%%R%B7-C7*10
%V%%R%B8-C8*10
%V%%R%B9-C9*10
%V%%R%B10-C10*10
%V%%R%B11-C11*10
%V%%R%B12-C12*10
%V%%R%B13-C13*10
%V%%R%B14-C14*10
%V%%R%B15-C15*10
%V%%R%B16-C16*10
%V%%R%B17-C17*10
%V%%R%B18-C18*10
%V%%R%%D0%SUM(D5D17)
%CO:E,6,24%

%V%%R%"£5"

%V%%R%%D0%INT(D5/5)
%V%%R%%D0%INT(D6/5)
%V%%R%%D0%INT(D7/5)
%V%%R%%D0%INT(D8/5)
%V%%R%%D0%INT(D9/5)
%V%%R%%D0%INT(D10/5)
%V%%R%%D0%INT(D11/5)
%V%%R%%D0%INT(D12/5)
%V%%R%%D0%INT(D13/5)
%V%%R%%D0%INT(D14/5)
%V%%R%%D0%INT(D15/5)
%V%%R%%D0%INT(D16/5)
%V%%R%%D0%INT(D17/5)
%V%%R%%D0%INT(D18/5)
%V%%R%%D0%SUM(E5E17)

%V%%R%"£5"
%V%%R%"------"
%CO:F,0,12%



%V%%R%D5-E5*5
%V%%R%D6-E6*5
%V%%R%D7-E7*5
%V%%R%D8-E8*5
%V%%R%D9-E9*5
%V%%R%D10-E10*5
%V%%R%D11-E11*5
%V%%R%D12-E12*5
%V%%R%D13-E13*5
%V%%R%D14-E14*5
%V%%R%D15-E15*5
%V%%R%D16-E16*5
%V%%R%D17-E17*5
%V%%R%D18-E18*5
%V%%R%%D0%SUM(F5F17)


%V%%R%"------"
%CO:G,6,0%

%V%%R%"£1"

%V%%R%%D0%INT(F5)
%V%%R%%D0%INT(F6)
%V%%R%%D0%INT(F7)
%V%%R%%D0%INT(F8)
%V%%R%%D0%INT(F9)
%V%%R%%D0%INT(F10)
%V%%R%%D0%INT(F11)
%V%%R%%D0%INT(F12)
%V%%R%%D0%INT(F13)
%V%%R%%D0%INT(F14)
%V%%R%%D0%INT(F15)
%V%%R%%D0%INT(F16)
%V%%R%%D0%INT(F17)
%V%%R%%D0%INT(F18)
%V%%R%%D0%SUM(G5G17)

%V%%R%"£1"
%V%%R%"------"
%CO:H,0,0%



%V%%R%F5-G5
%V%%R%F6-G6
%V%%R%F7-G7
%V%%R%F8-G8
%V%%R%F9-G9
%V%%R%F10-G10
%V%%R%F11-G11
%V%%R%F12-G12
%V%%R%F13-G13
%V%%R%F14-G14
%V%%R%F15-G15
%V%%R%F16-G16
%V%%R%F17-G17
%V%%R%F18-G18
%V%%R%%D0%SUM(H5H17)


%V%%R%"------"
%CO:I,6,0%

%V%%R%"50P"

%V%%R%%D0%INT(H5/.5)
%V%%R%%D0%INT(H6/.5)
%V%%R%%D0%INT(H7/.5)
%V%%R%%D0%INT(H8/.5)
%V%%R%%D0%INT(H9/.5)
%V%%R%%D0%INT(H10/.5)
%V%%R%%D0%INT(H11/.5)
%V%%R%%D0%INT(H12/.5)
%V%%R%%D0%INT(H13/.5)
%V%%R%%D0%INT(H14/.5)
%V%%R%%D0%INT(H15/.5)
%V%%R%%D0%INT(H16/.5)
%V%%R%%D0%INT(H17/.5)
%V%%R%%D0%INT(H18/.5)
%V%%R%%D0%SUM(I5I17)

%V%%R%"50p"
%V%%R%"------"
%CO:J,0,0%



%V%%R%H5-I5*.5
%V%%R%H6-I6*.5
%V%%R%H7-I7*.5
%V%%R%H8-I8*.5
%V%%R%H9-I9*.5
%V%%R%H10-I10*.5
%V%%R%H11-I11*.5
%V%%R%H12-I12*.5
%V%%R%H13-I13*.5
%V%%R%H14-I14*.5
%V%%R%H15-I15*.5
%V%%R%H16-I16*.5
%V%%R%H17-I17*.5
%V%%R%H18-I18*.5
%V%%R%%D0%SUM(J5J17)


%V%%R%"------"
%CO:K,6,0%

%V%%R%"20p"

%V%%R%%D0%INT(J5/.2)
%V%%R%%D0%INT(J6/.2)
%V%%R%%D0%INT(J7/.2)
%V%%R%%D0%INT(J8/.2)
%V%%R%%D0%INT(J9/.2)
%V%%R%%D0%INT(J10/.2)
%V%%R%%D0%INT(J11/.2)
%V%%R%%D0%INT(J12/.2)
%V%%R%%D0%INT(J13/.2)
%V%%R%%D0%INT(J14/.2)
%V%%R%%D0%INT(J15/.2)
%V%%R%%D0%INT(J16/.2)
%V%%R%%D0%INT(J17/.2)
%V%%R%%D0%INT(J18/.2)
%V%%R%%D0%SUM(K5K17)

%V%%R%"20p"
%V%%R%"------"
%CO:L,0,0%



%V%%R%J5-K5*.2
%V%%R%J6-K6*.2
%V%%R%J7-K7*.2
%V%%R%J8-K8*.2
%V%%R%J9-K9*.2
%V%%R%J10-K10*.2
%V%%R%J11-K11*.2
%V%%R%J12-K12*.2
%V%%R%J13-K13*.2
%V%%R%J14-K14*.2
%V%%R%J15-K15*.2
%V%%R%J16-K16*.2
%V%%R%J17-K17*.2
%V%%R%J18-K18*.2
%V%%R%%D0%SUM(L5L17)


%V%%R%"------"
%CO:M,6,0%

%V%%R%"10p"

%V%%R%%D0%INT(L5/.1)
%V%%R%%D0%INT(L6/.1)
%V%%R%%D0%INT(L7/.1)
%V%%R%%D0%INT(L8/.1)
%V%%R%%D0%INT(L9/.1)
%V%%R%%D0%INT(L10/.1)
%V%%R%%D0%INT(L11/.1)
%V%%R%%D0%INT(L12/.1)
%V%%R%%D0%INT(L13/.1)
%V%%R%%D0%INT(L14/.1)
%V%%R%%D0%INT(L15/.1)
%V%%R%%D0%INT(L16/.1)
%V%%R%%D0%INT(L17/.1)
%V%%R%%D0%INT(L18/.1)
%V%%R%%D0%SUM(M5M17)

%V%%R%"10p"
%V%%R%"------"
%CO:N,0,0%



%V%%R%L5-M5*.1
%V%%R%L6-M6*.1
%V%%R%L7-M7*.1
%V%%R%L8-M8*.1
%V%%R%L9-M9*.1
%V%%R%L10-M10*.1
%V%%R%L11-M11*.1
%V%%R%L12-M12*.1
%V%%R%L13-M13*.1
%V%%R%L14-M14*.1
%V%%R%L15-M15*.1
%V%%R%L16-M16*.1
%V%%R%L17-M17*.1
%V%%R%L18-M18*.1
%V%%R%%D0%SUM(N5N17)


%V%%R%"------"
%CO:O,6,0%

%V%%R%"5p"

%V%%R%%D0%INT(N5/.05)
%V%%R%%D0%INT(N6/.05)
%V%%R%%D0%INT(N7/.05)
%V%%R%%D0%INT(N8/.05)
%V%%R%%D0%INT(N9/.05)
%V%%R%%D0%INT(N10/.05)
%V%%R%%D0%INT(N11/.05)
%V%%R%%D0%INT(N12/.05)
%V%%R%%D0%INT(N13/.05)
%V%%R%%D0%INT(N14/.05)
%V%%R%%D0%INT(N15/.05)
%V%%R%%D0%INT(N16/.05)
%V%%R%%D0%INT(N17/.05)
%V%%R%%D0%INT(N18/.05)
%V%%R%%D0%SUM(O5O17)

%V%%R%"5p"
%V%%R%"------"
%CO:P,0,0%



%V%%R%N5-O5*.05
%V%%R%N6-O6*.05
%V%%R%N7-O7*.05
%V%%R%N8-O8*.05
%V%%R%N9-O9*.05
%V%%R%N10-O10*.05
%V%%R%N11-O11*.05
%V%%R%N12-O12*.05
%V%%R%N13-O13*.05
%V%%R%N14-O14*.05
%V%%R%N15-O15*.05
%V%%R%N16-O16*.05
%V%%R%N17-O17*.05
%V%%R%N18-O18*.05
%V%%R%%D0%SUM(P5P17)


%V%%R%"------"
%CO:Q,6,0%

%V%%R%"2p"

%V%%R%%D0%INT(P5/.018)
%V%%R%%D0%INT(P6/.018)
%V%%R%%D0%INT(P7/.018)
%V%%R%%D0%INT(P8/.018)
%V%%R%%D0%INT(P9/.018)
%V%%R%%D0%INT(P10/.018)
%V%%R%%D0%INT(P11/.018)
%V%%R%%D0%INT(P12/.018)
%V%%R%%D0%INT(P13/.018)
%V%%R%%D0%INT(P14/.018)
%V%%R%%D0%INT(P15/.018)
%V%%R%%D0%INT(P16/.018)
%V%%R%%D0%INT(P17/.018)
%V%%R%%D0%INT(P18/.018)
%V%%R%%D0%SUM(Q5Q17)

%V%%R%"2p"
%V%%R%"------"
%CO:R,0,0%



%V%%R%ABS(P5-Q5*.02)
%V%%R%ABS(P6-Q6*.02)
%V%%R%ABS(P7-Q7*.02)
%V%%R%ABS(P8-Q8*.02)
%V%%R%ABS(P9-Q9*.02)
%V%%R%ABS(P10-Q10*.02)
%V%%R%ABS(P11-Q11*.02)
%V%%R%ABS(P12-Q12*.02)
%V%%R%ABS(P13-Q13*.02)
%V%%R%ABS(P14-Q14*.02)
%V%%R%ABS(P15-Q15*.02)
%V%%R%ABS(P16-Q16*.02)
%V%%R%ABS(P17-Q17*.02)
%V%%R%ABS(P18-Q18*.02)
%V%%R%%D0%SUM(R5R17)


%V%%R%"------"
%CO:S,6,0%

%V%%R%"1p"

%V%%R%%D0%R5*100
%V%%R%%D0%R6*100
%V%%R%%D0%R7*100
%V%%R%%D0%R8*100
%V%%R%%D0%R9*100
%V%%R%%D0%R10*100
%V%%R%%D0%R11*100
%V%%R%%D0%R12*100
%V%%R%%D0%R13*100
%V%%R%%D0%R14*100
%V%%R%%D0%R15*100
%V%%R%%D0%R16*100
%V%%R%%D0%R17*100
%V%%R%%D0%R18*100
%V%%R%%D0%SUM(S5S17)

%V%%R%"1p"
%V%%R%"------"