Government consumption preprocessor

Series read

SeriesGovtMil%GDPSIPRI	Government, Conflict	Expenditure	SIPRI, Stockholm International Peace Research Institute	Military expenditures as percent of GDP (SIPRI)
SeriesGovtMil%GDP	Government, Infrastructure, Conflict	Expenditure	ACDA www.state.gov/global/arms/bureau_ac/reports_ac.html + asst earlier volumes	Military expenditures as percent of GDP (ACDA)
SeriesGovtHl%GDP	Government, Health, Infrastructure	Expenditure	WDI  BATCH PULL	Health expenditures as percent of GDP, public
SeriesHealthExpPriv%Tot	Population, Health	Expenditure	WHO Global Health Expenditure Database	Private expenditure on health (PvtHE) as % of Total Health Expenditure
SeriesHealthExpTot%GDP	Population, Health	Expenditure	WHO Global Health Expenditure Database	Total health expenditure (THE) % Gross Domestic Product (GDP)
SeriesGovtEdPub%GDP	Government	Expenditure	WDI  BATCH PULL	Educational expenditures (public) as percent of GDP
SeriesR&DGovt%GDP	Government	Research and Development	UNESCO	Gross R&D expenditure by government
SeriesR&D%GDPWDI	Science Technology, Infrastructure, Knowledge	R&D	Constructed from multiple WDI vol;CD incl 01, 02, 04,05,06,07; 2006-2008 Update from UIS Website	R&D as % of GDP (in some earlier years was GNI)
SeriesGovtCalcHealthCen%GDP	Economic	Finance	IMF GFS 2013 BATCH PULL	Health spending, government, Central government, as % of GDP
SeriesGovtCalcHealthTot%GDP	Economic	Finance	IMF GFS 2013 BATCH PULL	Health spending, government, total, as % of GDP
SeriesGovtCalcEdCen%GDP	Economic	Finance	IMF GFS 2013 BATCH PULL	Education spending, government, Central government, as % of GDP
SeriesGovtCalcEdTot%GDP	Economic	Finance	IMF GFS 2013 BATCH PULL	Education spending, government, total, as % of GDP

Initializations

Defense

• Initialize defense expenditures using SeriesGovtMil%GDPSIPRI. If null, then use SeriesGovtMil%GDP.
• If null estimate using GDPPCP: TbName$ = "GDP/Capita (PPP) Versus Govt Exp Mil as % of GDP (" & CStr(BaseYear) & ") - linear"
  • This equation is using: GDP/Capita (PPP) Versus Govt Exp Mil as % of GDP (2000) - linear

Health

• Initialize public health expenditures using SeriesGovtHl%GDP.
• If null estimate using GDPPCP:  TbName$ = "GDP/Capita (PPP) Versus Govt Exp Hlth as % of GDP (" & CStr(BaseYear) & ") - log"
  • This equation is using: GDP/Capita (PPP) Versus Govt Exp Hlth as % of GDP (2000) - log

• Initialize private health expenditures using SeriesHealthExpPriv%Tot. If no data, but there is data on total health expenditures (SeriesHealthExpTot%GDP) then set private as the difference between total and public.
  • If no data on total health expenditure then estimate private using:

                    'Estimate Private
                    Call AnalFunc("Private Health Expenditures % of GDP (2012)", _
                    Array(CGDPPCP(ICount%), CEDYRSAGE25T(ICount%)), cVal, _
                    Array("GDP2005PCPPP(MOSTRECENT)/ 1000 (Log)", "EdYearsAge25(MOSTRECENT) (Linear)"))

• If no data on total expenditures, then it is the sum of private and public.

Education

• Initialize public spending on education using SeriesGovtEdPub%GDP. If null then use:                
  • Call XYTABL("GDP/Capita (PPP) Versus Govt Exp Educ as % of GDP (2002) - log", Amin(40, CGDPPCP(ICount%)), GExpEd(ICount%))
• Bound as 1.5% as a minimum. Set Uzbekistan to 3%.

R & D

• Initialize public R&D spending using SeriesR&DGovt%GDP (GExpRandD) and SeriesR&D%GDPWDI (ExpRandDTot).
• If ExpRandDTot is null then estimate using:                
  • TbName$ = "GDP/Capita (PPP) Versus R&D Total  as % of GNI (" & CStr(BaseYear) & ") - linear"
  • This equation is using: GDP/Capita (PPP) Versus R&D Total  as % of GNI (2000) - linear
• If GExpRandD is null then estimate using:                 TbName$ = "GDP/Capita (PPP) Versus Govt Exp R&D as % of GNP (" & CStr(BaseYear) & ") - linear"
  • This equation is using: GDP/Capita (PPP) Versus Govt Exp R&D as % of GNP (2000) - linear 

• Initialize central government health expenditures (GExpHlCen) using SeriesGovtCalcHealthCen%GDP
• Initialize total government health expenditures (GExpHlTot) using SeriesGovtCalcHealthTot%GDP
• Initialize central government education expenditures (GExpEdCen) using SeriesGovtCalcEdCen%GDP
• Initialize total government education expenditures (GExpEdTot) using SeriesGovtCalcEdTot%GDP
• Note: These initializations should probably be moved to health and education

Infrastructure

        '-- Infrastructure Expenditure : Build up from components calculated in DataInfra: for historical and regular base--

        'switch to turn infrastructure finance on and off

• Note: default setting of infrastructure finance is on (1) - changing this to off (0) in global parameters (IFs.mdb) means that infrastructure spending is initialized at zero. 
• If infrastructure finance is on (default) then sum up new construction and maintenance from all sub-types of infrastructure. Cap at 10% of GDP.

InfraOther

        'non-core or 'other' infrastructure as a % of GDP - using function estimated by DSR

•         GExpInfraOther(ICount%) = 1.8162 + 0.061 * Log(CGDPPCP(ICount%))

Output

• Read everything to GovConsumptionOutput

Cap Infra spending

Private Function CalcInfraPubSpendCap

'procedure for capping infrastructure fund demand as a % of GDP;
'uses inverted V suggested by BBH