Sas macro code for industry a simple classification into 15 industries

ivry

New Member
#1
************************************************************************************************************************;
* SAS MACRO CODE FOR INDUSTRY CLASSIFICATION INTO 15 INDUSTRIES (prepared by Yaniv Konchitchki, U.C. Berkeley).
The code is based on Konchitchki, Yaniv. 2011."Inflation and Nominal Financial Reporting:
Implications for Performance and Stock Prices.” The Accounting Review 86 (3), 1045–1085.

This classification is also used in Barth, Mary E., Yaniv Konchitchki, Wayne R. Landsman. 2013. “Cost of
Capital and Earnings Transparency.” Journal of Accounting and Economics 55 (2-3), 206–224.

Please cite if using it. This code creates a dataset "dataout" by adding to any existing dataset "datain" the
15-industry classification based on "varForSICcode". The new dataset adds to your dataset an industry variable
denoted as specified in "varForIndDescOutput".

A suggested use:
%Add15KonchitchkiIndustries(datain=cstat, dataout=cstat, varForSICcode=sic, varForIndDescOutput=ind)
Note: The variable SIC is directly from Compustat (used to be DNUM in the historical Compustat legacy format);

%macro Add15KonchitchkiIndustries(datain=,dataout=,varForSICcode=,varForIndDescOutput=);
data &dataout;
set &datain;
varForSICcodeNum = &varForSICcode*1;* Ensure that the input industry classification is a numeric variable;

if (1000<=varForSICcodeNum< 1300) or (1399< varForSICcodeNum<=1999) then &varForIndDescOutput = "Mining, constructi.";
else if (2000<=varForSICcodeNum<=2111) then &varForIndDescOutput = "Food";
else if (2200<=varForSICcodeNum<=2799) then &varForIndDescOutput = "Textiles, printing.";
else if (2800<=varForSICcodeNum<=2824) or (2840<=varForSICcodeNum<=2899) then &varForIndDescOutput = "Chemicals";
else if (2830<=varForSICcodeNum<=2836) then &varForIndDescOutput = "Pharmaceuticals";
else if (2900<=varForSICcodeNum<=2999) or (1300<=varForSICcodeNum<=1399) then &varForIndDescOutput = "Extractive Industr.";
else if (3000<=varForSICcodeNum< 3570) or (3579< varForSICcodeNum< 3670)
or (3679< varForSICcodeNum<=3999) then &varForIndDescOutput = "Durable";
else if (7370<=varForSICcodeNum<=7379) or (3570<=varForSICcodeNum<=3579)
or (3670<=varForSICcodeNum<=3679) then &varForIndDescOutput = "Computers";
else if (4000<=varForSICcodeNum<=4899) then &varForIndDescOutput = "Transportation";
else if (4900<=varForSICcodeNum<=4999) then &varForIndDescOutput = "Utilities";
else if (5000<=varForSICcodeNum<=5999) then &varForIndDescOutput = "Retail";
else if (6000<=varForSICcodeNum<=6411) then &varForIndDescOutput = "Financial Institut.";
else if (6500<=varForSICcodeNum<=6999) then &varForIndDescOutput = "Insurance, real es.";
else if (7000<=varForSICcodeNum< 7370) or (7379< varForSICcodeNum<=8999) then &varForIndDescOutput = "Services";
else if (9000<=varForSICcodeNum) then &varForIndDescOutput = "Other";
else &varForIndDescOutput = "Other";

drop varForSICcodeNum;
run;

%mend Add15KonchitchkiIndustries;
************************************************************************************************************************;
 

hlsmith

Less is more. Stay pure. Stay poor.
#2
Hate to be a pain, but it would help others if you described when this is used. The initial references to finance deter me from paying too much attention, since that is not my area. But, if this can be generalized to other areas that would be beneficial to know, along with a description of what this actually does or direct link to paper.

However, thanks for sharing this!