PromptOK(" Lets go ");
	
	VectorMap<String,int> vm;
	
	Vector<int> v4;
	Sql sql(m3_session);
	sql.Clear();

	int y = 0;	
	int n, n1 = 1;


	sql.SetStatement("SELECT DISTINCT PFIELD,  COUNT(*)  from accounts GROUP BY GROUPING SETS (PFIELD) ");
	sql.Execute();
	while (sql.Fetch()) {
	    vm.Add(sql[0],sql[1]);
	    PromptOK(sql[0].ToString());
	}
	
	for (auto a: vm)
		PromptOK(AsString(vm.GetCount()));
		
	
	
	sql.SetStatement(Select(ACCTNUM, ACCTNAME).From(ACCOUNTS).OrderBy(ACCTNUM));
	sql.Execute();
	while (sql.Fetch()){
	
		 
		if ( vm.Find(sql[0])==1){			
				optree.Add(y, AsString(sql[1]));
				PromptOK("okay");
			//	PromptOK(AsString(n));
		} else {
			optree.Add(0 , AsString(sql[1]));
	}
	
		    ++n;
			++y;
	
	}


	
	PromptOK("Lets stop");
}

void MyMain::RunSQL(){
	
	Sql sql(m3_session);
	sql.Clear();

	int y = -0;	
	int n = 0; 
	int n1 = 1;
	String mystr;

	sql.SetStatement("SELECT DISTINCT PFIELD, COUNT(*)  from accounts GROUP BY GROUPING SETS (PFIELD) order by pfield");
	sql.Execute();
	while (sql.Fetch()) {
		
		mystr=sql[0];
		if (mystr.Find('*') != -1){	
		
	
	    vm.Add(sql[0],sql[1]);
	   // PromptOK(sql[0].ToString());
		}
	



}
		

}

void MyMain::SlingTv() {
	
	int n = 0; 
	int n1 = 0;
	String mystr;
	
	Sql sql(m3_session);
	sql.Clear();

	
	sql.SetStatement(Select(PFIELD,ACCTNUM, ACCTNAME).From(ACCOUNTS).OrderBy(ACCTNUM));
	sql.Execute();
	while (sql.Fetch()){
		
		mystr=sql[0];
		if (  mystr.Find('*') != -1){
			//PromptOK(AsString(n1));
				optree.Add(0, sql[2].ToString());				
		
			
		} 
	}
		
	
	sql.SetStatement(Select(PFIELD,ACCTNUM, ACCTNAME).From(ACCOUNTS).OrderBy(ACCTNUM));
	sql.Execute();
	while (sql.Fetch()){
		
		mystr=sql[0];
		if (  mystr.Find('*') != -1){
			//PromptOK(AsString(n1));
			
		
		n1 = 0;				
		PromptOK(AsString(n)+":n");
		++n;
		continue;
			
		} else {
		optree.Insert(n,n1,sql[2].ToString());
		n1++;;
		PromptOK(AsString(n1 )+":n1");
		}
		

	}
	
//	optree.Insert(5,0,"foo");
//	optree.Insert(5,1,"foo2");
   		
	//	optree.Add( 

}