home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Archive Magazine 1995
/
ARCHIVE95.iso
/
discs
/
pipeline
/
3_07
/
Ducat
/
BUILDSOC
next >
Wrap
Text File
|
1990-02-22
|
3KB
|
243 lines
%OP%TH1
%OP%DFT
%OP%PL68
%OP%BM4
%OP%LM5
%OP%HE///@d@/
%OP%FO//-@p@-//
%CO:A,4,0%
DAY
%V%%R%choose(round(mod(B9-1.1.0+1,7)+1,2),"Sat","Sun","Mon","Tue","Wed","Thu","Fri")
%V%%R%choose(round(mod(B10-1.1.0+1,7)+1,2),"Sat","Sun","Mon","Tue","Wed","Thu","Fri")
%V%%R%choose(round(mod(B11-1.1.0+1,7)+1,2),"Sat","Sun","Mon","Tue","Wed","Thu","Fri")
%V%%R%choose(round(mod(B12-1.1.0+1,7)+1,2),"Sat","Sun","Mon","Tue","Wed","Thu","Fri")
%V%%R%choose(round(mod(B13-1.1.0+1,7)+1,2),"Sat","Sun","Mon","Tue","Wed","Thu","Fri")
%V%%R%choose(round(mod(B14-1.1.0+1,7)+1,2),"Sat","Sun","Mon","Tue","Wed","Thu","Fri")
%V%%R%choose(round(mod(B15-1.1.0+1,7)+1,2),"Sat","Sun","Mon","Tue","Wed","Thu","Fri")
%V%%R%choose(round(mod(B16-1.1.0+1,7)+1,2),"Sat","Sun","Mon","Tue","Wed","Thu","Fri")
%V%%R%choose(round(mod(B17-1.1.0+1,7)+1,2),"Sat","Sun","Mon","Tue","Wed","Thu","Fri")
%V%%R%choose(round(mod(B18-1.1.0+1,7)+1,2),"Sat","Sun","Mon","Tue","Wed","Thu","Fri")
%V%%R%choose(round(mod(B19-1.1.0+1,7)+1,2),"Sat","Sun","Mon","Tue","Wed","Thu","Fri")
ANN.
DAILY
%CO:B,10,73%
BUILDING SOCIETY ACCOUNT
------------------------
DATE
%V%%R%22.7.89
%V%%R%28.7.89
%V%%R%21.8.89
%V%%R%16.9.89
%V%%R%23.9.89
%V%%R%30.9.89
%V%%R%14.10.89
%V%%R%14.10.89
%V%%R%16.11.89
%V%%R%16.12.89
%V%%R%date
INT RATE Y
Y INT
%CO:C,8,61%
TIME
ELAP-
SED
%V%%C%%D0%B10-B9
%V%%C%%D0%B11-B10
%V%%C%%D0%B12-B11
%V%%C%%D0%B13-B12
%V%%C%%D0%B14-B13
%V%%C%%D0%B15-B14
%V%%C%%D0%B16-B15
%V%%C%%D0%B17-B16
%V%%C%%D0%B18-B17
%V%%C%%D0%B19-B18
%V%%R%%TC%12
%V%%C%%TC%%D4%(C22/100)/365
%CO:D,12,49%
INVESTMENT
%V%%R%150
%V%%R%400
%V%%R%200
%V%%R%1.5
%CO:E,12,37%
%R%WITHDRAWAL
%V%%R%90
%V%%R%100
%V%%R%25
%V%%R%150
%V%%R%130
%V%%R%250
%CO:F,9,25%
%L% BALANCE
%V%%R%150
%V%%R%if(D10=0,F9-E10,F9+D10)
%V%%R%if(D11=0,F10-E11,F10+D11)
%V%%R%if(D12=0,F11-E12,F11+D12)
%V%%R%if(D13=0,F12-E13,F12+D13)
%V%%R%if(D14=0,F13-E14,F13+D14)
%V%%R%if(D15=0,F14-E15,F14+D15)
%V%%R%if(D16=0,F15-E16,F15+D16)
%V%%R%if(D17=0,F16-E17,F16+D17)
%V%%R%if(D18=0,F17-E18,F17+D18)
%V%%R%if(D19=0,F18-E19,F18+D19)
%CO:G,8,13%
%L% INT
EARNED
%V%%R%%D2%F9*(C10*$C$23)+G9
%V%%R%%D2%F10*(C11*$C$23)+G10
%V%%R%%D2%F11*(C12*$C$23)+G11
%V%%R%%D2%F12*(C13*$C$23)+G12
%V%%R%%D2%F13*(C14*$C$23)+G13
%V%%R%%D2%F14*(C15*$C$23)+G14
%V%%R%%D2%F15*(C16*$C$23)+G15
%V%%R%%D2%F16*(C17*$C$23)+G16
%V%%R%%D2%F17*(C18*$C$23)+G17
%V%%R%%D2%F18*(C19*$C$23)+G18
%CO:H,9,0%
NEW BAL.
%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%F19+G19
%CO:I,12,0%
%CO:J,12,0%
%CO:K,12,0%