proc report data=recon_error missing split='?' spanrows;
	columns pno cno patno c_guid1 rguid1 c_guid2 rguid2 c_guid3 rguid3 c_uid1 ruid1 c_uid2 ruid2 c_uid3 ruid3 CONTCSDT rcontcsdt; 
	
	define pno/ display width=8 "Study"; 
	define cno/ display width=4 "Site";
	define patno/ display width=4 "Subj";
	define c_guid1/ display width=4 "GUID1";
	define c_guid2/ display width=4 "GUID2";
	define c_guid3/ display width=4 "GUID3";
	define c_uid1/ display width=4 "UID1";
	define c_uid2/ display width=4 "UID2";
	define c_uid3/ display width=4 "UID3";
	define rguid1/ display width=4 "R-GUID1";
	define rguid2/ display width=4 "R-GUID2";
	define rguid3/ display width=4 "R-GUID3";
	define ruid1/ display width=4 "R-UID1";
	define ruid2/ display width=4 "R-UID2";
	define ruid3/ display width=4 "R-UID3";
	define CONTCSDT / display width=10 'Consent?Date';
	define rcontcsdt / display width=10 'R-Consent?Date';
	
	compute c_guid1;
		if c_guid1 ne rguid1 or missing (c_guid1) then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if c_guid1 = rguid1 then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	
		compute c_guid2;
		if c_guid2 ne rguid2 or missing (c_guid2)then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if c_guid2 = rguid2 then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	
		compute c_guid3;
		if c_guid3 ne rguid3 or missing (c_guid3) then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if c_guid3 = rguid3 then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	
		compute c_uid1;
		if c_uid1 ne ruid1 or missing(c_uid1) then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if c_uid1 = ruid1 then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	
	compute c_uid2;
		if c_uid2 ne ruid2 or missing(c_uid2) then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if c_uid2 = ruid2 then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	
	compute c_uid3;
		if c_uid3 ne ruid3 or missing(c_uid3) then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if c_uid3 = ruid3 then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	
	compute rguid1;
		if c_guid1 ne rguid1 or missing(rguid1) then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if c_guid1 = rguid1 then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	
		compute rguid2;
		if c_guid2 ne rguid2 or missing(rguid2) then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if c_guid2 = rguid2 then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	
		compute rguid3;
		if c_guid3 ne rguid3 or missing(rguid3) then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if c_guid3 = rguid3 then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	
		compute ruid1;
		if c_uid1 ne ruid1 or missing(ruid1) then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if c_uid1 = ruid1 then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	
	compute ruid2;
		if c_uid2 ne ruid2 or missing(ruid2) then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if c_uid2 = ruid2 then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	
	compute ruid3;
		if c_uid3 ne ruid3 or missing(ruid3) then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if c_uid3 = ruid3 then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	compute CONTCSDT;
		if CONTCSDT ne rcontcsdt or missing (CONTCSDT) then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if CONTCSDT = rcontcsdt then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	
	compute rcontcsdt;
		if CONTCSDT ne rcontcsdt or missing(rcontcsdt) then 
			call define(_col_,'style','style=[background=#fbbcff]');
		else if CONTCSDT = rcontcsdt then 
			call define(_col_,'style','style=[background=#bcffcd]');
	endcomp;
	
	
  run;