OPEN DATA "E:\phd\research\RATS\charts\canada.xls"
CALENDAR(A) 1999:1
DATA(FORMAT=XLS,ORG=COLUMNS) 1999:01 2009:01 Provisions Loans

FILTER(REMOVE=TREND) PROVISIONS / PROVISIONS_Can
FILTER(REMOVE=TREND) LOANS / LOANS_Can

OPEN DATA "E:\phd\research\RATS\charts\france.xls"
DATA(FORMAT=XLS,ORG=COLUMNS) 1999:01 2009:01 Provisions Loans
CALENDAR(A) 1999:1

FILTER(REMOVE=TREND) PROVISIONS / PROVISIONS_Fr
FILTER(REMOVE=TREND) LOANS / LOANS_Fr

OPEN DATA "E:\phd\research\RATS\charts\germany.xls"
DATA(FORMAT=XLS,ORG=COLUMNS) 1999:01 2009:01 Provisions Loans
CALENDAR(A) 1999:1

FILTER(REMOVE=TREND) PROVISIONS / PROVISIONS_Ger
FILTER(REMOVE=TREND) LOANS / LOANS_Ger

OPEN DATA "E:\phd\research\RATS\charts\russia.xls"
DATA(FORMAT=XLS,ORG=COLUMNS) 1999:01 2009:01 Provisions Loans
CALENDAR(A) 1999:1

FILTER(REMOVE=TREND) PROVISIONS / PROVISIONS_Rus
FILTER(REMOVE=TREND) LOANS / LOANS_Rus

OPEN DATA "E:\phd\research\RATS\charts\korea.xls"
DATA(FORMAT=XLS,ORG=COLUMNS) 1999:01 2009:01 Provisions Loans
CALENDAR(A) 1999:1

FILTER(REMOVE=TREND) PROVISIONS / PROVISIONS_Kor
FILTER(REMOVE=TREND) LOANS / LOANS_Kor

OPEN DATA "E:\phd\research\RATS\charts\spain.xls"
DATA(FORMAT=XLS,ORG=COLUMNS) 1999:01 2009:01 Provisions Loans
CALENDAR(A) 1999:1

FILTER(REMOVE=TREND) PROVISIONS / PROVISIONS_sp
FILTER(REMOVE=TREND) LOANS / LOANS_sp


OPEN DATA "E:\phd\research\RATS\charts\usa.xls"
DATA(FORMAT=XLS,ORG=COLUMNS) 1999:01 2009:01 Provisions Loans
CALENDAR(A) 1999:1

FILTER(REMOVE=TREND) PROVISIONS / PROVISIONS_us
FILTER(REMOVE=TREND) LOANS / LOANS_us


OPEN DATA "E:\phd\research\RATS\charts\chile.xls"
DATA(FORMAT=XLS,ORG=COLUMNS) 1999:01 2009:01 Provisions Loans
CALENDAR(A) 1999:1

FILTER(REMOVE=TREND) PROVISIONS / PROVISIONS_Ch
FILTER(REMOVE=TREND) LOANS / LOANS_Ch


OPEN DATA "E:\phd\research\RATS\charts\japan.xls"
DATA(FORMAT=XLS,ORG=COLUMNS) 1999:01 2009:01 Provisions Loans
CALENDAR(A) 1999:1

FILTER(REMOVE=TREND) PROVISIONS / PROVISIONS_JAP
FILTER(REMOVE=TREND) LOANS / LOANS_JAP



spgraph(hfields=3,vfields=3,$
header="Figure 1: Cross-Country Trends in Provisions")

graph(header="Canada")  2
#provisions_Can
#loans_Can

graph(header="France")  2
#provisions_Fr
#loans_Fr

graph(header="Germany") 2
#provisions_Ger
#loans_Ger

graph(header="USA")  2
#provisions_us
#loans_us

graph(header="Japan")   2
#provisions_JAP
#loans_JAP

graph(header="Spain")   2
#provisions_sp
#loans_sp

graph(header="Korea")   2
#provisions_Kor
#loans_Kor

graph(header="Russia")  2
#provisions_Rus
#loans_Rus

graph(header="Chile")   2
#provisions_Ch
#loans_Ch
spgraph(done)