/* CREATE RTA PAIRS */ /* merge in rta dates */ sort wbcode1 merge wbcode1 using "C:\Documents and Settings\syamarik\My Documents\My Research\Trade and Growth\Data\rta dates for country 1.dta" drop if _merge == 2 drop _merge temp sort wbcode2 merge wbcode2 using "C:\Documents and Settings\syamarik\My Documents\My Research\Trade and Growth\Data\rta dates for country 2.dta" drop if _merge == 2 drop _merge temp /* PTA */ g ecopair = 0 g acmpair = 0 g laiapair = 0 g can1pair = 0 g chlindpair = 0 g tripair = 0 g aptapair = 0 g spartecapair = 0 g saptapair = 0 g msgpair = 0 g laothapair = 0 g waemupair = 0 g ecowaspair = 0 g cemacpair = 0 g comesaptapair = 0 g ptaesapair = 0 /* Multilateral FTA */ g eupair = 0 g eftapair = 0 g eeapair = 0 g ceftapair = 0 g cispair = 0 g baftapair = 0 g cezpair = 0 g gccftapair = 0 g paftapair = 0 g naftapair = 0 g laftapair = 0 g g3pair = 0 g aseanpair = 0 g aftapair = 0 g patcrapair = 0 g cerpair = 0 g saftapair = 0 g pictapair = 0 g toseppair = 0 g udeacpair = 0 g eccaspair = 0 g eacpair = 0 g sadccpair = 0 g sadcpair = 0 g comesaftapair = 0 compress /* Bilateral FTA */ g czesvkpair = 0 g czeestpair = 0 g czelvapair = 0 g czeltupair = 0 g svkestpair = 0 g svklvapair = 0 g svkltupair = 0 g pollvapair = 0 g polltupair = 0 g svnhrvpair = 0 g svnestpair = 0 g svnlvapair = 0 g svnltupair = 0 g hunestpair = 0 g hunlvapair = 0 g hunltupair = 0 g bgralbpair = 0 g bgrbihpair = 0 g bgryugpair = 0 g bgrmkdpair = 0 g bgrmdapair = 0 g romalbpair = 0 g rombihpair = 0 g romyugpair = 0 g rommkdpair = 0 g rommdapair = 0 g isrusapair = 0 g isrcanpair = 0 g isrczepair = 0 g isrsvkpair = 0 g isrturpair = 0 g isrhunpair = 0 g isrpolpair = 0 g isrsvnpair = 0 g isrmexpair = 0 g isrrompair = 0 g isrbgrpair = 0 compress g turczepair = 0 g turhunpair = 0 g turrompair = 0 g tursvkpair = 0 g turbgrpair = 0 g turlvapair = 0 g turpolpair = 0 g tursvnpair = 0 g turmkdpair = 0 g turbihpair = 0 g turhrvpair = 0 g turpalpair = 0 g turtunpair = 0 g turmarpair = 0 g tursyrpair = 0 g egyturpair = 0 g turalbpair = 0 g turgeopair = 0 g usajorpair = 0 g usachlpair = 0 g usasgppair = 0 g usaauspair = 0 g usamarpair = 0 g usabhrpair = 0 g usaomnpair = 0 g canchlpair = 0 g cancripair = 0 g canperpair = 0 g mexbolpair = 0 g crimexpair = 0 g mexnicpair = 0 g chlmexpair = 0 g mextripair = 0 g panslvpair = 0 g pantwnpair = 0 g panchlpair = 0 g pancripair = 0 g panhndpair = 0 g pansgppair = 0 g chlcstpair = 0 g chlslvpair = 0 g korchlpair = 0 g chlhkgpair = 0 g chlmacpair = 0 g chlchnpair = 0 g chljpnpair = 0 g chlnzlpair = 0 g chlsgppair = 0 g auschlpair = 0 g chlcolpair = 0 compress g nzlsgppair = 0 g chnmacpair = 0 g chnhkgpair = 0 g indbgdpair = 0 g indnplpair = 0 g indlkapair = 0 g indsgppair = 0 g indbtnpair = 0 g jpnsgppair = 0 g jpnmexpair = 0 g jpnmyspair = 0 g jpnthapair = 0 g jpnidnpair = 0 g jpnphlpair = 0 g jpnchepair = 0 g jpnvnmpair = 0 g paklkapair = 0 g pakchnpair = 0 g pakmyspair = 0 g sgpauspair = 0 g jorsgppair = 0 g korsgppair = 0 g persgppair = 0 g thanzlpair = 0 g thaauspair = 0 /* Customs Union */ g eucupair = 0 g eaecpair = 0 g gcccupair = 0 g cacm1pair = 0 g cacm2pair = 0 g caricompair = 0 g can2pair = 0 g mercpair = 0 g waemucupair = 0 g ecowascupair = 0 g cemaccupair = 0 g eaccupair = 0 g sacu1pair = 0 g sacu2pair = 0 /* Political Organizations & Currency Unions */ g europair = 0 g oecspair = 0 g amupair = 0 g apecpair = 0 g wamupair = 0 compress replace eupair = 1 if eu1 <= year & eu2 <= year replace eucupair = 1 if eucu1 <= year & eucu2 <= year replace europair = 1 if euro1 <= year & euro2 <= year replace eftapair = 1 if efta1 <= year & efta2 <= year replace eftapair = 0 if wbcode1 == "AUS" & year > 1994 replace eftapair = 0 if wbcode2 == "AUS" & year > 1994 replace eftapair = 0 if wbcode1 == "DNK" & year > 1972 replace eftapair = 0 if wbcode2 == "DNK" & year > 1972 replace eftapair = 0 if wbcode1 == "FIN" & year > 1994 replace eftapair = 0 if wbcode2 == "FIN" & year > 1994 replace eftapair = 0 if wbcode1 == "PRT" & year > 1985 replace eftapair = 0 if wbcode2 == "PRT" & year > 1985 replace eftapair = 0 if wbcode1 == "SWE" & year > 1994 replace eftapair = 0 if wbcode2 == "SWE" & year > 1994 replace eftapair = 0 if wbcode1 == "GBR" & year > 1972 replace eftapair = 0 if wbcode2 == "GBR" & year > 1972 replace eeapair = 1 if eea1 <= year & eea2 <= year replace ecopair = 1 if eco1 <= year & eco2 <= year replace ceftapair = 1 if cefta1 <= year & cefta2 <= year replace cispair = 1 if cis1 <= year & cis2 <= year replace baftapair = 1 if bafta1 <= year & bafta2 <= year replace baftapair = 0 if year > 2004 replace eaecpair = 1 if eaec1 <= year & eaec2 <= year replace cezpair = 1 if cez1 <= year & cez2 <= year replace czesvkpair = 1 if czeest1 <= year & czeest2 <= year replace czesvkpair = 0 if year > 2004 replace czeestpair = 1 if czeest1 <= year & czeest2 <= year replace czeestpair = 0 if year > 2004 replace czelvapair = 1 if czelva1 <= year & czelva2 <= year replace czelvapair = 0 if year > 2004 replace czeltupair = 1 if czeltu1 <= year & czeltu2 <= year replace czeltupair = 0 if year > 2004 replace svkestpair = 1 if svkest1 <= year & svkest2 <= year replace svkestpair = 0 if year > 2004 replace svklvapair = 1 if svklva1 <= year & svklva2 <= year replace svklvapair = 0 if year > 2004 replace svkltupair = 1 if svkltu1 <= year & svkltu2 <= year replace svkltupair = 0 if year > 2004 replace pollvapair = 1 if pollva1 <= year & pollva2 <= year replace pollvapair = 0 if year > 2004 replace polltupair = 1 if polltu1 <= year & polltu2 <= year replace polltupair = 0 if year > 2004 replace svnhrvpair = 1 if svnhrv1 <= year & svnhrv2 <= year replace svnhrvpair = 0 if year > 2004 replace svnestpair = 1 if svnest1 <= year & svnest2 <= year replace svnestpair = 0 if year > 2004 replace svnlvapair = 1 if svnlva1 <= year & svnlva2 <= year replace svnlvapair = 0 if year > 2004 replace svnltupair = 1 if svnltu1 <= year & svnltu2 <= year replace svnltupair = 0 if year > 2004 replace svnestpair = 1 if svnest1 <= year & svnest2 <= year replace svnestpair = 0 if year > 2004 replace hunestpair = 1 if hunest1 <= year & hunest2 <= year replace hunestpair = 0 if year > 2004 replace hunlvapair = 1 if hunlva1 <= year & hunlva2 <= year replace hunlvapair = 0 if year > 2004 replace hunltupair = 1 if hunltu1 <= year & hunltu2 <= year replace hunltupair = 0 if year > 2004 replace bgralbpair = 1 if bgralb1 <= year & bgralb2 <= year replace bgralbpair = 0 if year > 2007 replace bgrbihpair = 1 if bgrbih1 <= year & bgrbih2 <= year replace bgrbihpair = 0 if year > 2007 replace bgryugpair = 1 if bgryug1 <= year & bgryug2 <= year replace bgryugpair = 0 if year > 2007 replace bgrmkdpair = 1 if bgrmkd1 <= year & bgrmkd2 <= year replace bgrmkdpair = 0 if year > 2007 replace bgrmdapair = 1 if bgrmda1 <= year & bgrmda2 <= year replace bgrmdapair = 0 if year > 2007 replace romalbpair = 1 if romalb1 <= year & romalb2 <= year replace romalbpair = 0 if year > 2007 replace rombihpair = 1 if rombih1 <= year & rombih2 <= year replace rombihpair = 0 if year > 2007 replace romyugpair = 1 if romyug1 <= year & romyug2 <= year replace romyugpair = 0 if year > 2007 replace rommkdpair = 1 if rommkd1 <= year & rommkd2 <= year replace rommkdpair = 0 if year > 2007 replace rommdapair = 1 if rommda1 <= year & rommda2 <= year replace rommdapair = 0 if year > 2007 replace isrusapair = 1 if isrusa1 <= year & isrusa2 <= year replace isrcanpair = 1 if isrcan1 <= year & isrcan2 <= year replace isrczepair = 1 if isrcze1 <= year & isrcze2 <= year replace isrczepair = 0 if year > 2004 replace isrsvkpair = 1 if isrsvk1 <= year & isrsvk2 <= year replace isrsvkpair = 0 if year > 2004 replace isrturpair = 1 if isrtur1 <= year & isrtur2 <= year replace isrhunpair = 1 if isrhun1 <= year & isrhun2 <= year replace isrhunpair = 0 if year > 2004 replace isrpolpair = 1 if isrpol1 <= year & isrpol2 <= year replace isrpolpair = 0 if year > 2004 replace isrsvnpair = 1 if isrsvn1 <= year & isrsvn2 <= year replace isrsvnpair = 0 if year > 2004 replace isrmexpair = 1 if isrmex1 <= year & isrmex2 <= year replace isrrompair = 1 if isrrom1 <= year & isrrom2 <= year replace isrrompair = 0 if year > 2007 replace isrbgrpair = 1 if isrbgr1 <= year & isrbgr2 <= year replace isrbgrpair = 0 if year > 2007 replace turczepair = 1 if turcze1 <= year & turcze2 <= year replace turczepair = 0 if year > 2004 replace turhunpair = 1 if turhun1 <= year & turhun2 <= year replace turhunpair = 0 if year > 2004 replace turrompair = 1 if turrom1 <= year & turrom2 <= year replace turrompair = 0 if year > 2007 replace tursvkpair = 1 if tursvk1 <= year & tursvk2 <= year replace tursvkpair = 0 if year > 2004 replace turbgrpair = 1 if turbgr1 <= year & turbgr2 <= year replace turbgrpair = 0 if year > 2007 replace turlvapair = 1 if turlva1 <= year & turlva2 <= year replace turpolpair = 1 if turpol1 <= year & turpol2 <= year replace turpolpair = 0 if year > 2004 replace tursvnpair = 1 if tursvn1 <= year & tursvn2 <= year replace tursvnpair = 0 if year > 2004 replace turmkdpair = 1 if turmkd1 <= year & turmkd2 <= year replace turbihpair = 1 if turbih1 <= year & turbih2 <= year replace turhrvpair = 1 if turhrv1 <= year & turhrv2 <= year replace turpalpair = 1 if turpal1 <= year & turpal2 <= year replace turtunpair = 1 if turtun1 <= year & turtun2 <= year replace turmarpair = 1 if turmar1 <= year & turmar2 <= year replace tursyrpair = 1 if tursyr1 <= year & tursyr2 <= year replace egyturpair = 1 if egytur1 <= year & egytur2 <= year replace turalbpair = 1 if turalb1 <= year & turalb2 <= year replace turgeopair = 1 if turgeo1 <= year & turgeo2 <= year replace gccftapair = 1 if gccfta1 <= year & gccfta2 <= year replace gcccupair = 1 if gcccu1 <= year & gcccu2 <= year replace paftapair = 1 if pafta1 <= year & pafta2 <= year replace acmpair = 1 if acm1 <= year & acm2 <= year replace naftapair = 1 if nafta1 <= year & nafta2 <= year replace usajorpair = 1 if usajor1 <= year & usajor2 <= year replace usachlpair = 1 if usachl1 <= year & usachl2 <= year replace usasgppair = 1 if usasgp1 <= year & usasgp2 <= year replace usaauspair = 1 if usaaus1 <= year & usaaus2 <= year replace usamarpair = 1 if usamar1 <= year & usamar2 <= year replace usabhrpair = 1 if usabhr1 <= year & usabhr2 <= year replace usaomnpair = 1 if usaomn1 <= year & usaomn2 <= year replace canchlpair = 1 if canchl1 <= year & canchl2 <= year replace cancripair = 1 if cancri1 <= year & cancri2 <= year replace canperpair = 1 if canper1 <= year & canper2 <= year replace cacm1pair = 1 if cacm11 <= year & cacm12 <= year replace cacm1pair = 0 if year > 1975 replace cacm2pair = 1 if cacm21 <= year & cacm22 <= year replace mexbolpair = 1 if mexbol1 <= year & mexbol2 <= year replace crimexpair = 1 if crimex1 <= year & crimex2 <= year replace mexnicpair = 1 if mexnic1 <= year & mexnic2 <= year replace chlmexpair = 1 if chlmex1 <= year & chlmex2 <= year replace mextripair = 1 if mextri1 <= year & mextri2 <= year replace panslvpair = 1 if panslv1 <= year & panslv2 <= year replace pantwnpair = 1 if pantwn1 <= year & pantwn2 <= year replace panchlpair = 1 if panchl1 <= year & panchl2 <= year replace pancripair = 1 if pancri1 <= year & pancri2 <= year replace panhndpair = 1 if panhnd1 <= year & panhnd2 <= year replace pansgppair = 1 if pansgp1 <= year & pansgp2 <= year replace caricompair = 1 if caricom1 <= year & caricom2 <= year replace laftapair = 1 if lafta1 <= year & lafta2 <= year replace laftapair = 0 if year > 2004 replace laiapair = 1 if laia1 <= year & laia2 <= year replace can1pair = 1 if can11 <= year & can12 <= year replace can1pair = 0 if wbcode1 == "CHL" & year > 1976 replace can1pair = 0 if wbcode2 == "CHL" & year > 1976 replace can2pair = 1 if can21 <= year & can22 <= year replace mercpair = 1 if merc1 <= year & merc2 <= year replace g3pair = 1 if g31 <= year & g32 <= year replace chlcstpair = 1 if chlcst1 <= year & chlcst2 <= year replace chlslvpair = 1 if chlslv1 <= year & chlslv2 <= year replace korchlpair = 1 if korchl1 <= year & korchl2 <= year replace chlhkgpair = 1 if chlhkg1 <= year & chlhkg2 <= year replace chlmacpair = 1 if chlmac1 <= year & chlmac2 <= year replace chlchnpair = 1 if chlchn1 <= year & chlchn2 <= year replace chlindpair = 1 if chlind1 <= year & chlind2 <= year replace chljpnpair = 1 if chljpn1 <= year & chljpn2 <= year replace chlnzlpair = 1 if chlnzl1 <= year & chlnzl2 <= year replace chlsgppair = 1 if chlsgp1 <= year & chlsgp2 <= year replace auschlpair = 1 if auschl1 <= year & auschl2 <= year replace chlcolpair = 1 if chlcol1 <= year & chlcol2 <= year replace aseanpair = 1 if asean1 <= year & asean2 <= year replace aftapair = 1 if afta1 <= year & afta2 <= year replace tripair = 1 if tri1 <= year & tri2 <= year replace tripair = 0 if year > 1991 replace aptapair = 1 if apta1 <= year & apta2 <= year replace patcrapair = 1 if patcra1 <= year & patcra2 <= year replace spartecapair = 1 if sparteca1 <= year & sparteca2 <= year replace cerpair = 1 if cer1 <= year & cer2 <= year replace saptapair = 1 if sapta1 <= year & sapta2 <= year replace saptapair = 0 if year > 2006 replace saftapair = 1 if safta1 <= year & safta2 <= year replace msgpair = 1 if msg1 <= year & msg2 <= year replace pictapair = 1 if picta1 <= year & picta2 <= year replace toseppair = 1 if tosep1 <= year & tosep2 <= year replace laothapair = 1 if laotha1 <= year & laotha2 <= year replace nzlsgppair = 1 if nzlsgp1 <= year & nzlsgp2 <= year replace chnmacpair = 1 if chnmac1 <= year & chnmac2 <= year replace chnhkgpair = 1 if chnhkg1 <= year & chnhkg2 <= year replace indbgdpair = 1 if indbgd1 <= year & indbgd2 <= year replace indnplpair = 1 if indnpl1 <= year & indnpl2 <= year replace indlkapair = 1 if indlka1 <= year & indlka2 <= year replace indsgppair = 1 if indsgp1 <= year & indsgp2 <= year replace indbtnpair = 1 if indbtn1 <= year & indbtn2 <= year replace jpnsgppair = 1 if jpnsgp1 <= year & jpnsgp2 <= year replace jpnmexpair = 1 if jpnmex1 <= year & jpnmex2 <= year replace jpnmyspair = 1 if jpnmys1 <= year & jpnmys2 <= year replace jpnthapair = 1 if jpntha1 <= year & jpntha2 <= year replace jpnidnpair = 1 if jpnidn1 <= year & jpnidn2 <= year replace jpnphlpair = 1 if jpnphl1 <= year & jpnphl2 <= year replace jpnchepair = 1 if jpnche1 <= year & jpnche2 <= year replace jpnvnmpair = 1 if jpnvnm1 <= year & jpnvnm2 <= year replace paklkapair = 1 if paklka1 <= year & paklka2 <= year replace pakchnpair = 1 if pakchn1 <= year & pakchn2 <= year replace pakmyspair = 1 if pakmys1 <= year & pakmys2 <= year replace sgpauspair = 1 if sgpaus1 <= year & sgpaus2 <= year replace jorsgppair = 1 if jorsgp1 <= year & jorsgp2 <= year replace korsgppair = 1 if korsgp1 <= year & korsgp2 <= year replace persgppair = 1 if persgp1 <= year & persgp2 <= year replace thanzlpair = 1 if thanzl1 <= year & thanzl2 <= year replace thaauspair = 1 if thaaus1 <= year & thaaus2 <= year replace wamupair = 1 if wamu1 <= year & wamu2 <= year replace waemupair = 1 if waemu1 <= year & waemu2 <= year replace waemupair = 0 if year > 2004 replace waemucupair = 1 if waemucu1 <= year & waemucu2 <= year replace ecowaspair = 1 if ecowas1 <= year & ecowas2 <= year replace ecowaspair = 0 if year > 1993 replace ecowascupair = 1 if ecowascu1 <= year & ecowascu2 <= year replace udeacpair = 1 if udeac1 <= year & udeac2 <= year replace udeacpair = 0 if year > 1999 replace cemacpair = 1 if cemac1 <= year & cemac2 <= year replace cemacpair = 0 if year > 2005 replace cemaccupair = 1 if cemaccu1 <= year & cemaccu2 <= year replace eccaspair = 1 if eccas1 <= year & eccas2 <= year replace eacpair = 1 if eac1 <= year & eac2 <= year replace eacpair = 0 if year > 2004 replace eaccupair = 1 if eaccu1 <= year & eaccu2 <= year replace sacu1pair = 1 if sacu11 <= year & sacu12 <= year replace sacu2pair = 1 if sacu21 <= year & sacu22 <= year replace sadccpair = 1 if sadcc1 <= year & sadcc2 <= year replace sadccpair = 0 if year > 2000 replace sadcpair = 1 if sadc1 <= year & sadc2 <= year replace ptaesapair = 1 if ptaesa1 <= year & ptaesa2 <= year replace ptaesapair = 0 if year > 1995 replace comesaptapair = 1 if comesapta1 <= year & comesapta2 <= year replace comesaftapair = 1 if comesafta1 <= year & comesafta2 <= year replace amupair = 1 if amu1 <= year & amu2 <= year replace apecpair = 1 if apec1 <= year & apec2 <= year replace oecspair = 1 if oecs1 <= year & oecs2 <= year drop eumem1-amu1 drop eumem2-amu2 g ptapair = ecopair + acmpair + laiapair + can1pair + chlindpair + tripair + aptapair + spartecapair + saptapair + msgpair + laothapair + waemupair + ecowaspair + cemacpair + comesaptapair + ptaesapair replace ptapair = 1 if ptapair > 1 label var ptapair "1 for any PTA pair" move ptapair contig g ftapair = eupair + eftapair + eeapair + ceftapair + cispair + baftapair + cezpair + gccftapair + paftapair + naftapair + laftapair + g3pair + aseanpair + aftapair + patcrapair + cerpair + saftapair + pictapair + toseppair + udeacpair + eccaspair + eacpair + sadccpair + sadcpair + comesaftapair + czesvkpair + czeestpair + czelvapair + czeltupair + svkestpair + svklvapair + svkltupair + pollvapair + polltupair + svnhrvpair + svnestpair + svnlvapair + svnltupair + hunestpair + hunlvapair + hunltupair + bgralbpair + bgrbihpair + bgrmkdpair + bgrmdapair + romalbpair + rombihpair + rommkdpair + rommdapair + isrusapair + isrcanpair + isrczepair + isrsvkpair + isrturpair + isrhunpair + isrpolpair + isrsvnpair + isrmexpair + isrrompair + isrbgrpair + turczepair + turhunpair + turrompair + tursvkpair + turbgrpair + turlvapair + turpolpair + tursvnpair + turmkdpair + turbihpair + turhrvpair + turpalpair + turtunpair + turmarpair + tursyrpair + egyturpair + turalbpair + turgeopair + usajorpair + usachlpair + usasgppair + usaauspair + usamarpair + usabhrpair + usaomnpair + canchlpair + cancripair + canperpair + mexbolpair + crimexpair + mexnicpair + chlmexpair + mextripair + panslvpair + pantwnpair + panchlpair + pancripair + panhndpair + pansgppair + chlcstpair + chlslvpair + korchlpair + chlhkgpair + chlmacpair + chlchnpair + chljpnpair + chlnzlpair + chlsgppair + auschlpair + chlcolpair + nzlsgppair + chnmacpair + chnhkgpair + indbgdpair + indlkapair + indlkapair + indsgppair + indbtnpair + jpnsgppair + jpnmexpair + jpnmyspair + jpnthapair + jpnidnpair + jpnphlpair + jpnchepair + jpnvnmpair + paklkapair + pakchnpair + pakmyspair + sgpauspair + jorsgppair + korsgppair + persgppair + thanzlpair + thaauspair replace ftapair = 1 if ftapair > 1 label var ftapair "1 for any FTA pair" move ftapair contig g cupair = eucupair + eaecpair + gcccupair + cacm1pair + cacm2pair + caricompair + can2pair + mercpair + waemucupair + ecowascupair + cemaccupair + eaccupair + sacu1pair + sacu2pair replace cupair = 1 if cupair > 1 label var cupair "1 for any Customs Union pair" move cupair contig g rtapair = ptapair + ftapair + cupair replace rtapair = 1 if rtapair > 1 label var rtapair "1 for any RTA pair" move rtapair contig g ftacupair = ftapair + cupair replace ftacupair = 1 if ftacupair > 1 label var ftacupair "1 for any FTA or CU pair" move ftacupair contig compress drop ecopair-wamupair /* CREATE COUNTRY DUMMIES */ gen ago = 0 gen alb = 0 gen ant = 0 gen are = 0 gen arg = 0 gen arm = 0 gen aus = 0 gen aut = 0 gen aze = 0 gen bdi = 0 gen bel = 0 gen ben = 0 gen bfa = 0 gen bgd = 0 gen bgr = 0 gen bhr = 0 gen bhs = 0 gen bih = 0 gen blr = 0 gen blx = 0 gen blz = 0 gen bol = 0 gen bra = 0 gen brb = 0 gen btn = 0 gen bwa = 0 gen caf = 0 gen can = 0 gen che = 0 gen chl = 0 gen chn = 0 gen civ = 0 gen cmr = 0 gen cog = 0 gen col = 0 gen com = 0 gen cri = 0 gen csk = 0 gen cub = 0 gen cyp = 0 gen cze = 0 gen ddr = 0 gen deu = 0 gen dfa = 0 gen dji = 0 gen dnk = 0 gen dom = 0 gen dza = 0 gen ecu = 0 gen egy = 0 gen eri = 0 gen esp = 0 gen est = 0 gen eth = 0 gen fin = 0 gen fji = 0 gen fra = 0 gen gab = 0 gen gbr = 0 gen geo = 0 gen gha = 0 gen gin = 0 gen gmb = 0 gen gnb = 0 gen gnq = 0 gen grc = 0 gen grd = 0 gen gtm = 0 gen guy = 0 gen hkg = 0 gen hnd = 0 gen hrv = 0 gen hti = 0 gen hun = 0 gen idn = 0 gen ind = 0 gen irl = 0 gen irn = 0 gen irq = 0 gen isl = 0 gen isr = 0 gen ita = 0 gen jam = 0 gen jor = 0 gen jpn = 0 gen kaz = 0 gen ken = 0 gen kgz = 0 gen khm = 0 gen kor = 0 gen kwt = 0 gen lao = 0 gen lbn = 0 gen lbr = 0 gen lby = 0 gen lka = 0 gen lso = 0 gen ltu = 0 gen lux = 0 gen lva = 0 gen mac = 0 gen mar = 0 gen mda = 0 gen mdg = 0 gen mex = 0 gen mkd = 0 gen mli = 0 gen mlt = 0 gen mmr = 0 gen mng = 0 gen moz = 0 gen mrt = 0 gen mus = 0 gen mwi = 0 gen mys = 0 gen nam = 0 gen ner = 0 gen nga = 0 gen nic = 0 gen nld = 0 gen nor = 0 gen npl = 0 gen nzl = 0 gen omn = 0 gen pak = 0 gen pan = 0 gen per = 0 gen phl = 0 gen png = 0 gen pol = 0 gen prk = 0 gen prt = 0 gen pry = 0 gen qat = 0 gen rom = 0 gen rus = 0 gen rwa = 0 gen sau = 0 gen sdn = 0 gen sen = 0 gen sgp = 0 gen slb = 0 gen sle = 0 gen slv = 0 gen som = 0 gen sun = 0 gen sur = 0 gen svk = 0 gen svn = 0 gen swe = 0 gen swz = 0 gen syr = 0 gen tcd = 0 gen tgo = 0 gen tha = 0 gen tjk = 0 gen tkm = 0 gen tto = 0 gen tun = 0 gen tur = 0 gen twn = 0 gen tza = 0 gen uga = 0 gen ukr = 0 gen ury = 0 gen usa = 0 gen uzb = 0 gen ven = 0 gen vnm = 0 gen vnn = 0 gen vns = 0 gen yar = 0 gen yem = 0 gen ymd = 0 gen ysr = 0 gen yug = 0 gen zaf = 0 gen zar = 0 gen zmb = 0 gen zwe = 0 replace ago = 1 if wbcode1 == "AGO" replace alb = 1 if wbcode1 == "ALB" replace ant = 1 if wbcode1 == "ANT" replace are = 1 if wbcode1 == "ARE" replace arg = 1 if wbcode1 == "ARG" replace arm = 1 if wbcode1 == "ARM" replace aus = 1 if wbcode1 == "AUS" replace aut = 1 if wbcode1 == "AUT" replace aze = 1 if wbcode1 == "AZE" replace bdi = 1 if wbcode1 == "BDI" replace bel = 1 if wbcode1 == "BEL" replace ben = 1 if wbcode1 == "BEN" replace bfa = 1 if wbcode1 == "BFA" replace bgd = 1 if wbcode1 == "BGD" replace bgr = 1 if wbcode1 == "BGR" replace bhr = 1 if wbcode1 == "BHR" replace bhs = 1 if wbcode1 == "BHS" replace bih = 1 if wbcode1 == "BIH" replace blr = 1 if wbcode1 == "BLR" replace blx = 1 if wbcode1 == "BLX" replace blz = 1 if wbcode1 == "BLZ" replace bol = 1 if wbcode1 == "BOL" replace bra = 1 if wbcode1 == "BRA" replace brb = 1 if wbcode1 == "BRB" replace btn = 1 if wbcode1 == "BTN" replace bwa = 1 if wbcode1 == "BWA" replace caf = 1 if wbcode1 == "CAF" replace can = 1 if wbcode1 == "CAN" replace che = 1 if wbcode1 == "CHE" replace chl = 1 if wbcode1 == "CHL" replace chn = 1 if wbcode1 == "CHN" replace civ = 1 if wbcode1 == "CIV" replace cmr = 1 if wbcode1 == "CMR" replace cog = 1 if wbcode1 == "COG" replace col = 1 if wbcode1 == "COL" replace com = 1 if wbcode1 == "COM" replace cri = 1 if wbcode1 == "CRI" replace csk = 1 if wbcode1 == "CSK" replace cub = 1 if wbcode1 == "CUB" replace cyp = 1 if wbcode1 == "CYP" replace cze = 1 if wbcode1 == "CZE" replace ddr = 1 if wbcode1 == "DDR" replace deu = 1 if wbcode1 == "DEU" replace dfa = 1 if wbcode1 == "DFA" replace dji = 1 if wbcode1 == "DJI" replace dnk = 1 if wbcode1 == "DNK" replace dom = 1 if wbcode1 == "DOM" replace dza = 1 if wbcode1 == "DZA" replace ecu = 1 if wbcode1 == "ECU" replace egy = 1 if wbcode1 == "EGY" replace eri = 1 if wbcode1 == "ERI" replace esp = 1 if wbcode1 == "ESP" replace est = 1 if wbcode1 == "EST" replace eth = 1 if wbcode1 == "ETH" replace fin = 1 if wbcode1 == "FIN" replace fji = 1 if wbcode1 == "FJI" replace fra = 1 if wbcode1 == "FRA" replace gab = 1 if wbcode1 == "GAB" replace gbr = 1 if wbcode1 == "GBR" replace geo = 1 if wbcode1 == "GEO" replace gha = 1 if wbcode1 == "GHA" replace gin = 1 if wbcode1 == "GIN" replace gmb = 1 if wbcode1 == "GMB" replace gnb = 1 if wbcode1 == "GNB" replace gnq = 1 if wbcode1 == "GNQ" replace grc = 1 if wbcode1 == "GRC" replace grd = 1 if wbcode1 == "GRD" replace gtm = 1 if wbcode1 == "GTM" replace guy = 1 if wbcode1 == "GUY" replace hkg = 1 if wbcode1 == "HKG" replace hnd = 1 if wbcode1 == "HND" replace hrv = 1 if wbcode1 == "HRV" replace hti = 1 if wbcode1 == "HTI" replace hun = 1 if wbcode1 == "HUN" replace idn = 1 if wbcode1 == "IDN" replace ind = 1 if wbcode1 == "IND" replace irl = 1 if wbcode1 == "IRL" replace irn = 1 if wbcode1 == "IRN" replace irq = 1 if wbcode1 == "IRQ" replace isl = 1 if wbcode1 == "ISL" replace isr = 1 if wbcode1 == "ISR" replace ita = 1 if wbcode1 == "ITA" replace jam = 1 if wbcode1 == "JAM" replace jor = 1 if wbcode1 == "JOR" replace jpn = 1 if wbcode1 == "JPN" replace kaz = 1 if wbcode1 == "KAZ" replace ken = 1 if wbcode1 == "KEN" replace kgz = 1 if wbcode1 == "KGZ" replace khm = 1 if wbcode1 == "KHM" replace kor = 1 if wbcode1 == "KOR" replace kwt = 1 if wbcode1 == "KWT" replace lao = 1 if wbcode1 == "LAO" replace lbn = 1 if wbcode1 == "LBN" replace lbr = 1 if wbcode1 == "LBR" replace lby = 1 if wbcode1 == "LBY" replace lka = 1 if wbcode1 == "LKA" replace lso = 1 if wbcode1 == "LSO" replace ltu = 1 if wbcode1 == "LTU" replace lux = 1 if wbcode1 == "LUX" replace lva = 1 if wbcode1 == "LVA" replace mac = 1 if wbcode1 == "MAC" replace mar = 1 if wbcode1 == "MAR" replace mda = 1 if wbcode1 == "MDA" replace mdg = 1 if wbcode1 == "MDG" replace mex = 1 if wbcode1 == "MEX" replace mkd = 1 if wbcode1 == "MKD" replace mli = 1 if wbcode1 == "MLI" replace mlt = 1 if wbcode1 == "MLT" replace mmr = 1 if wbcode1 == "MMR" replace mng = 1 if wbcode1 == "MNG" replace moz = 1 if wbcode1 == "MOZ" replace mrt = 1 if wbcode1 == "MRT" replace mus = 1 if wbcode1 == "MUS" replace mwi = 1 if wbcode1 == "MWI" replace mys = 1 if wbcode1 == "MYS" replace nam = 1 if wbcode1 == "NAM" replace ner = 1 if wbcode1 == "NER" replace nga = 1 if wbcode1 == "NGA" replace nic = 1 if wbcode1 == "NIC" replace nld = 1 if wbcode1 == "NLD" replace nor = 1 if wbcode1 == "NOR" replace npl = 1 if wbcode1 == "NPL" replace nzl = 1 if wbcode1 == "NZL" replace omn = 1 if wbcode1 == "OMN" replace pak = 1 if wbcode1 == "PAK" replace pan = 1 if wbcode1 == "PAN" replace per = 1 if wbcode1 == "PER" replace phl = 1 if wbcode1 == "PHL" replace png = 1 if wbcode1 == "PNG" replace pol = 1 if wbcode1 == "POL" replace prk = 1 if wbcode1 == "PRK" replace prt = 1 if wbcode1 == "PRT" replace pry = 1 if wbcode1 == "PRY" replace qat = 1 if wbcode1 == "QAT" replace rom = 1 if wbcode1 == "ROM" replace rus = 1 if wbcode1 == "RUS" replace rwa = 1 if wbcode1 == "RWA" replace sau = 1 if wbcode1 == "SAU" replace sdn = 1 if wbcode1 == "SDN" replace sen = 1 if wbcode1 == "SEN" replace sgp = 1 if wbcode1 == "SGP" replace slb = 1 if wbcode1 == "SLB" replace sle = 1 if wbcode1 == "SLE" replace slv = 1 if wbcode1 == "SLV" replace som = 1 if wbcode1 == "SOM" replace sun = 1 if wbcode1 == "SUN" replace sur = 1 if wbcode1 == "SUR" replace svk = 1 if wbcode1 == "SVK" replace svn = 1 if wbcode1 == "SVN" replace swe = 1 if wbcode1 == "SWE" replace swz = 1 if wbcode1 == "SWZ" replace syr = 1 if wbcode1 == "SYR" replace tcd = 1 if wbcode1 == "TCD" replace tgo = 1 if wbcode1 == "TGO" replace tha = 1 if wbcode1 == "THA" replace tjk = 1 if wbcode1 == "TJK" replace tkm = 1 if wbcode1 == "TKM" replace tto = 1 if wbcode1 == "TTO" replace tun = 1 if wbcode1 == "TUN" replace tur = 1 if wbcode1 == "TUR" replace twn = 1 if wbcode1 == "TWN" replace tza = 1 if wbcode1 == "TZA" replace uga = 1 if wbcode1 == "UGA" replace ukr = 1 if wbcode1 == "UKR" replace ury = 1 if wbcode1 == "URY" replace usa = 1 if wbcode1 == "USA" replace uzb = 1 if wbcode1 == "UZB" replace ven = 1 if wbcode1 == "VEN" replace vnm = 1 if wbcode1 == "VNM" replace vnn = 1 if wbcode1 == "VNN" replace vns = 1 if wbcode1 == "VNS" replace yar = 1 if wbcode1 == "YAR" replace yem = 1 if wbcode1 == "YEM" replace ymd = 1 if wbcode1 == "YMD" replace ysr = 1 if wbcode1 == "YSR" replace yug = 1 if wbcode1 == "YUG" replace zaf = 1 if wbcode1 == "ZAF" replace zar = 1 if wbcode1 == "ZAR" replace zmb = 1 if wbcode1 == "ZMB" replace zwe = 1 if wbcode1 == "ZWE" sum ago-zwe replace ago = 1 if wbcode2 == "AGO" replace alb = 1 if wbcode2 == "ALB" replace ant = 1 if wbcode2 == "ANT" replace are = 1 if wbcode2 == "ARE" replace arg = 1 if wbcode2 == "ARG" replace arm = 1 if wbcode2 == "ARM" replace aus = 1 if wbcode2 == "AUS" replace aut = 1 if wbcode2 == "AUT" replace aze = 1 if wbcode2 == "AZE" replace bdi = 1 if wbcode2 == "BDI" replace bel = 1 if wbcode2 == "BEL" replace ben = 1 if wbcode2 == "BEN" replace bfa = 1 if wbcode2 == "BFA" replace bgd = 1 if wbcode2 == "BGD" replace bgr = 1 if wbcode2 == "BGR" replace bhr = 1 if wbcode2 == "BHR" replace bhs = 1 if wbcode2 == "BHS" replace bih = 1 if wbcode2 == "BIH" replace blr = 1 if wbcode2 == "BLR" replace blx = 1 if wbcode2 == "BLX" replace blz = 1 if wbcode2 == "BLZ" replace bol = 1 if wbcode2 == "BOL" replace bra = 1 if wbcode2 == "BRA" replace brb = 1 if wbcode2 == "BRB" replace btn = 1 if wbcode2 == "BTN" replace bwa = 1 if wbcode2 == "BWA" replace caf = 1 if wbcode2 == "CAF" replace can = 1 if wbcode2 == "CAN" replace che = 1 if wbcode2 == "CHE" replace chl = 1 if wbcode2 == "CHL" replace chn = 1 if wbcode2 == "CHN" replace civ = 1 if wbcode2 == "CIV" replace cmr = 1 if wbcode2 == "CMR" replace cog = 1 if wbcode2 == "COG" replace col = 1 if wbcode2 == "COL" replace com = 1 if wbcode2 == "COM" replace cri = 1 if wbcode2 == "CRI" replace csk = 1 if wbcode2 == "CSK" replace cub = 1 if wbcode2 == "CUB" replace cyp = 1 if wbcode2 == "CYP" replace cze = 1 if wbcode2 == "CZE" replace ddr = 1 if wbcode2 == "DDR" replace deu = 1 if wbcode2 == "DEU" replace dfa = 1 if wbcode2 == "DFA" replace dji = 1 if wbcode2 == "DJI" replace dnk = 1 if wbcode2 == "DNK" replace dom = 1 if wbcode2 == "DOM" replace dza = 1 if wbcode2 == "DZA" replace ecu = 1 if wbcode2 == "ECU" replace egy = 1 if wbcode2 == "EGY" replace eri = 1 if wbcode2 == "ERI" replace esp = 1 if wbcode2 == "ESP" replace est = 1 if wbcode2 == "EST" replace eth = 1 if wbcode2 == "ETH" replace fin = 1 if wbcode2 == "FIN" replace fji = 1 if wbcode2 == "FJI" replace fra = 1 if wbcode2 == "FRA" replace gab = 1 if wbcode2 == "GAB" replace gbr = 1 if wbcode2 == "GBR" replace geo = 1 if wbcode2 == "GEO" replace gha = 1 if wbcode2 == "GHA" replace gin = 1 if wbcode2 == "GIN" replace gmb = 1 if wbcode2 == "GMB" replace gnb = 1 if wbcode2 == "GNB" replace gnq = 1 if wbcode2 == "GNQ" replace grc = 1 if wbcode2 == "GRC" replace grd = 1 if wbcode2 == "GRD" replace gtm = 1 if wbcode2 == "GTM" replace guy = 1 if wbcode2 == "GUY" replace hkg = 1 if wbcode2 == "HKG" replace hnd = 1 if wbcode2 == "HND" replace hrv = 1 if wbcode2 == "HRV" replace hti = 1 if wbcode2 == "HTI" replace hun = 1 if wbcode2 == "HUN" replace idn = 1 if wbcode2 == "IDN" replace ind = 1 if wbcode2 == "IND" replace irl = 1 if wbcode2 == "IRL" replace irn = 1 if wbcode2 == "IRN" replace irq = 1 if wbcode2 == "IRQ" replace isl = 1 if wbcode2 == "ISL" replace isr = 1 if wbcode2 == "ISR" replace ita = 1 if wbcode2 == "ITA" replace jam = 1 if wbcode2 == "JAM" replace jor = 1 if wbcode2 == "JOR" replace jpn = 1 if wbcode2 == "JPN" replace kaz = 1 if wbcode2 == "KAZ" replace ken = 1 if wbcode2 == "KEN" replace kgz = 1 if wbcode2 == "KGZ" replace khm = 1 if wbcode2 == "KHM" replace kor = 1 if wbcode2 == "KOR" replace kwt = 1 if wbcode2 == "KWT" replace lao = 1 if wbcode2 == "LAO" replace lbn = 1 if wbcode2 == "LBN" replace lbr = 1 if wbcode2 == "LBR" replace lby = 1 if wbcode2 == "LBY" replace lka = 1 if wbcode2 == "LKA" replace lso = 1 if wbcode2 == "LSO" replace ltu = 1 if wbcode2 == "LTU" replace lux = 1 if wbcode2 == "LUX" replace lva = 1 if wbcode2 == "LVA" replace mac = 1 if wbcode2 == "MAC" replace mar = 1 if wbcode2 == "MAR" replace mda = 1 if wbcode2 == "MDA" replace mdg = 1 if wbcode2 == "MDG" replace mex = 1 if wbcode2 == "MEX" replace mkd = 1 if wbcode2 == "MKD" replace mli = 1 if wbcode2 == "MLI" replace mlt = 1 if wbcode2 == "MLT" replace mmr = 1 if wbcode2 == "MMR" replace mng = 1 if wbcode2 == "MNG" replace moz = 1 if wbcode2 == "MOZ" replace mrt = 1 if wbcode2 == "MRT" replace mus = 1 if wbcode2 == "MUS" replace mwi = 1 if wbcode2 == "MWI" replace mys = 1 if wbcode2 == "MYS" replace nam = 1 if wbcode2 == "NAM" replace ner = 1 if wbcode2 == "NER" replace nga = 1 if wbcode2 == "NGA" replace nic = 1 if wbcode2 == "NIC" replace nld = 1 if wbcode2 == "NLD" replace nor = 1 if wbcode2 == "NOR" replace npl = 1 if wbcode2 == "NPL" replace nzl = 1 if wbcode2 == "NZL" replace omn = 1 if wbcode2 == "OMN" replace pak = 1 if wbcode2 == "PAK" replace pan = 1 if wbcode2 == "PAN" replace per = 1 if wbcode2 == "PER" replace phl = 1 if wbcode2 == "PHL" replace png = 1 if wbcode2 == "PNG" replace pol = 1 if wbcode2 == "POL" replace prk = 1 if wbcode2 == "PRK" replace prt = 1 if wbcode2 == "PRT" replace pry = 1 if wbcode2 == "PRY" replace qat = 1 if wbcode2 == "QAT" replace rom = 1 if wbcode2 == "ROM" replace rus = 1 if wbcode2 == "RUS" replace rwa = 1 if wbcode2 == "RWA" replace sau = 1 if wbcode2 == "SAU" replace sdn = 1 if wbcode2 == "SDN" replace sen = 1 if wbcode2 == "SEN" replace sgp = 1 if wbcode2 == "SGP" replace slb = 1 if wbcode2 == "SLB" replace sle = 1 if wbcode2 == "SLE" replace slv = 1 if wbcode2 == "SLV" replace som = 1 if wbcode2 == "SOM" replace sun = 1 if wbcode2 == "SUN" replace sur = 1 if wbcode2 == "SUR" replace svk = 1 if wbcode2 == "SVK" replace svn = 1 if wbcode2 == "SVN" replace swe = 1 if wbcode2 == "SWE" replace swz = 1 if wbcode2 == "SWZ" replace syr = 1 if wbcode2 == "SYR" replace tcd = 1 if wbcode2 == "TCD" replace tgo = 1 if wbcode2 == "TGO" replace tha = 1 if wbcode2 == "THA" replace tjk = 1 if wbcode2 == "TJK" replace tkm = 1 if wbcode2 == "TKM" replace tto = 1 if wbcode2 == "TTO" replace tun = 1 if wbcode2 == "TUN" replace tur = 1 if wbcode2 == "TUR" replace twn = 1 if wbcode2 == "TWN" replace tza = 1 if wbcode2 == "TZA" replace uga = 1 if wbcode2 == "UGA" replace ukr = 1 if wbcode2 == "UKR" replace ury = 1 if wbcode2 == "URY" replace usa = 1 if wbcode2 == "USA" replace uzb = 1 if wbcode2 == "UZB" replace ven = 1 if wbcode2 == "VEN" replace vnm = 1 if wbcode2 == "VNM" replace vnn = 1 if wbcode2 == "VNN" replace vns = 1 if wbcode2 == "VNS" replace yar = 1 if wbcode2 == "YAR" replace yem = 1 if wbcode2 == "YEM" replace ymd = 1 if wbcode2 == "YMD" replace ysr = 1 if wbcode2 == "YSR" replace yug = 1 if wbcode2 == "YUG" replace zaf = 1 if wbcode2 == "ZAF" replace zar = 1 if wbcode2 == "ZAR" replace zmb = 1 if wbcode2 == "ZMB" replace zwe = 1 if wbcode2 == "ZWE" compress sum ago-zwe