> db.system.js.save({_id:"getNextSequence", value:function(name){ var ret = db.counters.findAndModify({query: { _id: name },update: { $inc: { seq: 1 }},new: true});return ret.seq; }});

##</code><code>##

post "/commNew" => require_login sub {
	my $userh = logged_in_user;
	my $username=$userh->{username};
	my $adm=lc(config->{app}{commAdmin});
	if($username  =~ m/$adm/){
		info ("User is $username for comm 2b" );
		my $res=$comms->insert_one({"_id"=> getNextSequence("comm-id"),"year" => config->{app}{year}});
		my $lastid = $res->inserted_id;
		my @kuy = body_parameters->keys;
		info ("Insert int Mongo: ".$lastid);
		foreach my $oto ( @kuy ) {
			info ("key name value: " .$oto ." value: ".body_parameters->get($oto));
			$comms->update_one( {"_id" => $lastid},{'$set' => {$oto => body_parameters->get($oto)}});
		}
		info ("User is $username for comm 2z" );
	}else{
		return 404;
	}
};