Пошук власне у білінгу (у поле пошуку набираємо =платіжнийкод)

/usr/local/nodeny/web/listuser.pl

шукаємо рядок

Код:

     ($f_name ne $FnameSql) && &Check_Sql('fio',"%$f_name%",$tr_name,'ФИО с транслитерацией','fio') && last;
   }

вставляємо нижче

Код:

	if( $Fname =~ m/=\d+/ )
	{
		my($l_id) = $Fname;
		$l_id =~ s/=//;
		$l_id=~s/^0+//;
		my ($l_id,$csum) = ($l_id=~/^(\d+)(\d)/);
		my $ppc=0;
		$ppc += $_ foreach(split //,$l_id);

		if( $ppc%10==$csum )
		{
			&Check_Sql('id',$l_id,$l_id,'платежный код','id') && last;
		}
	}

/usr/local/nodeny/web/pays.pl

Шукаємо рядок

Код:

"VALUES($Fmid,$cash,$type,$time,$Admin_id,INET_ATON('$ip'),$Admin_office,'$bonus','$reason','$coment',$category)";

Додаємо з нового рядка

Код:

if( $type eq 20 ){ &sql_do($dbh,"INSERT INTO pays (mid,cash,type,time,admin_id,admin_ip,office,bonus,reason,coment,category) VALUES($Fmid,0,50,$t,$Admin_id,INET_ATON('$ip'),$Admin_office,'','Временный платеж. Сумма: $cash грн. Срок: $Fdays дней','$coment',410)", ""); }

Возникла необходимость подружить NoDeny и фискальный регистратор (РРО). Есть ли у кого подобные наработки?

вот соответствующий кусок ф-ции HW_set_queue работающий в продакшене:

Код:

	&HW_set_tag();
	&hw_send_all($sock,[
	  "/queue/simple/add",
	  "=name=$id",
	  "=target=$ip",
	  "=limit-at=$speed_out/$speed_in",
	  "=max-limit=$speed_out/$speed_in",
	  "=burst-limit=$burst_limit_out/$burst_limit_in",
	  "=burst-time=$burst/$burst",
	  "=burst-threshold=$burst_threshold_out/$burst_threshold_in",
	  "=disabled=no",
	  "=queue=ethernet-default/ethernet-default",
	  ".tag=$HW_tag"
	]);
	usleep( 50000 );
	&HW_set_tag();
	&hw_send_all($sock,[
	  "/queue/simple/set",
	  "=.id=$id",
	  "=limit-at=$speed_out/$speed_in",
	  "=max-limit=$speed_out/$speed_in",
	  "=burst-limit=$burst_limit_out/$burst_limit_in",
	  "=burst-threshold=$burst_threshold_out/$burst_threshold_in",
	  "=burst-time=$burst/$burst",
	  "=queue=ethernet-default/ethernet-default",
	  ".tag=$HW_tag"
	]);

	usleep( 50000 );
}

версия мокротыка - 6.4 tile (ccr-1036)