achment 1.1.4  Read File 4 (adjustments) of IBES data

* read adjustment file (File 4) of IBES data ;

libname ibes '$HOME/IBES' ;
options ls=72 ps=57 obs = 1000 ;

data ibes.adjust ;
	infile '/u82/IBES/IBESSUM/4ADJ9608' ;
	input 	ticker   $ 1-6
		adjustf	   6.3
		splityy    13-14 
		splitmm    15-16
		splitdd    17-18
		statpyy    19-20
		statpmm    21-22
	;
	if splitdd = 0 then splitdd = . ;

proc print ;
	title  'IBES Data' ;
	title3 'Adjustment Factors' ;
	title5 'First 100 Observations' ;
	var 	ticker 
		adjustf	
		splityy   
		splitmm    
		splitdd    
		statpyy    
		statpmm    
	;
run ;

This page hosted by Get your own Free Home Page