# ***********
# CDS MVOCXX
# ***********
my ($sqlquery3, @list3);
# PREPARE SQLQUERY3 CDS_MVOCXX**********************************
$sqlquery3=$CDS->prepare("
SELECT distinct cds_mvocxx.id, cds_mvocxx.text
	FROM cds_mvocxx, (
		SELECT cds_mspecxx.* 
			FROM cds_mspecxx, (
				SELECT prodid
					FROM cds_prod
					WHERE catid = 'AC')vt1
			WHERE cds_mspecxx.prodid = vt1.prodid)vt2
	WHERE id = vt2.hdrid or
	id = vt2.bodyid");
# RUN SQLQUERY3 CDS_MVOCXX***********************************	
$sqlquery3->execute() || die "couldn't execute query: $DBI::errstr\n";
print "run\n";
while (( my $id1, my $text) = $sqlquery3->fetchrow_array) 
	{
		push @list3, "$id1\t$text\n";
	}	
# WRITE CDS_MVOCXX to a file***************************************		 
open cds_mvocxx, "> c:/splitcat/components/mvocxx.txt" or die "i'm dying can't open log file";
print cds_mvocxx @list3;
$sqlquery3 ->finish();
close cds_mvocxx;