Efendy
|
|
« Ответ #480 : 23 Мая 2013, 14:32:53 » |
|
Ну давай завтра наваяю, просто щас мы с челом опцию82 тестим
|
|
|
Записан
|
|
|
|
Efendy
|
|
« Ответ #481 : 23 Мая 2013, 15:16:54 » |
|
В общем, закоммитил я фичу повышения скорости по времени суток. Можете сделать услугу бесплатной и длительностью 31 день.
|
|
|
Записан
|
|
|
|
vddav
|
|
« Ответ #482 : 23 Мая 2013, 17:02:24 » |
|
В общем, закоммитил я фичу повышения скорости по времени суток. Можете сделать услугу бесплатной и длительностью 31 день.
кул, тока теперь каждому придется в ручную добовлять услугу, и при заводе в этой группе абона к тарифному плану добовлять еще услугу. как бы немного не то, но работать будет). у нас для этого района спец тарифы, ну и бонусом шло удвоение. а как то можно сделать услугу inet_ulim сразу с speed_up на борту?)) но в принципе работать будет, Большое СПАСИБО, челом бью)))
|
|
|
Записан
|
|
|
|
Efendy
|
|
« Ответ #483 : 23 Мая 2013, 18:22:04 » |
|
По простому сделай стоимость услуги 1коп и пусть клиенты сами ее закажут
|
|
|
Записан
|
|
|
|
vddav
|
|
« Ответ #484 : 27 Мая 2013, 12:31:04 » |
|
хотелка - в разделе карточек кнопочку экспорта в cvs как в v50.32, а то как то после генерации проблематично карточки распечатать. еще при заводе абона хотелка что б дата договора автоматом проставлялась.
в общем вот по поводу карточек чего я нацарапал)), корявенько, но как смог) в web/cards.pl после 388 строчки добавил " $actions .= $Url->a(' export', %url, act=>'cards_export_csv'); ": elsif( $last{adm_owner} == Adm->id ) { $actions .= $Url->a('п÷п╣я─п╣пЄп╟я┌я▄', %url, act=>'cards_move_step1'); $actions .= $Url->a(' export', %url, act=>'cards_export_csv'); foreach my $act( [ good => 'п▓ я─п╟п╠п╬я┌я┐'], [ stock => 'п²п╟ я│п╨п╩п╟пЄ'], [ bad => 'п▒п╩п╬п╨п╦я─п╬п╡п╟я┌я▄'],
в web/operations.pl после 18 строчки " cards_export_csv => 1, " my %subs = ( dontshowmess => 1, # я┐пЄп╟п╩п╦я┌я▄ я│п╬п╬п╠я┴п╣пҐп╦п╣ пЄп╩я▐ п╟пЄп╪п╦пҐп╟ п╬я┌ я│я┐п©п╣я─п╟пЄп╪п╦пҐп╟ cards_move_step1 => 1, # п╡я▀п╠п╬я─ п╟пЄп╪п╦пҐп╦я│я┌я─п╟я┌п╬я─п╟ пЄп╩я▐ п©п╣я─п╣пЄп╟я┤п╦ cards_move_step2 => 1, # пҐп╣п©п╬я│я─п╣пЄя│я┌п╡п╣пҐпҐп╟я▐ п©п╣я─п╣пЄп╟я┤п╟ п╨п╟я─я┌п╬я┤п╣п╨ cards_move_accept => 1, # п©п╬пЄя┌п╡п╣я─пІпЄп╣пҐп╦п╣ п©п╣я─п╣пЄп╟я┤п╦ п╨п╟я─я┌п╬я┤п╣п╨ п©я─п╦пҐп╦п╪п╟я▌я┴п╦п╪ п╟пЄп cards_change_alive => 1, # я│п╪п╣пҐп╟ я│п╬я│я┌п╬я▐пҐп╦я▐ п╨п╟я─я┌п╬я┤п╣п╨ (пҐп╟ я│п╨п╩п╟пЄп╣/п╪п╬пІпҐп╬ п╟п╨я┌п╦п╡п╦ del_ses_data => 1, cards_export_csv => 1, );
и в самом конце перед последней строчкой "1;" (код взят из 50.32 версии) sub cards_export_csv { my $dbh = Db->dbh; my $p; my $cards = cards_move_preload(); my($start, $end) = ($cards->{start}, $cards->{end}); my $body=''; #Запрашиваем идентификатор, активационный код, стоимость карточки my $sth=$dbh->prepare("SELECT `cid`, `cod`, `money` FROM `cards` WHERE cid>=$start AND cid<=$end"); $sth -> execute; while ($p=$sth->fetchrow_hashref) { #Закомментировать строку ниже, если нужно деньги привести к западному типу разделителя целой и дробной части $p->{money} =~ tr/./,/; #Генерируем ряды CSV для последующего экспорта например в MS Access $body.="\"$p->{cid}\";\"$p->{cod}\";\"$p->{money}\" \n"; } #Выводим данные в браузер на сохранение my $OUT="Content-Type: application/octet-stream\n". "Content-Disposition: attachment; filename=nocards.txt\n\n". "$body"; print $OUT; exit; }
в итоге текстовый фаил содержания с новой строки: "номер карты";"код карты";"номинал карты" З.Ы. делал в обнимку с гуглом, языков никаких не знаю, с перлом познакомился только из-за нодени))))
|
|
|
Записан
|
|
|
|
poxy.
NoDeny
Спец
Карма: 10
Offline
Сообщений: 844
|
|
« Ответ #485 : 28 Мая 2013, 07:44:28 » |
|
хотелка - в разделе карточек кнопочку экспорта в cvs как в v50.32, а то как то после генерации проблематично карточки распечатать. еще при заводе абона хотелка что б дата договора автоматом проставлялась.
в общем вот по поводу карточек чего я нацарапал)), корявенько, но как смог) в web/cards.pl после 388 строчки добавил " $actions .= $Url->a(' export', %url, act=>'cards_export_csv'); ": elsif( $last{adm_owner} == Adm->id ) { $actions .= $Url->a('п÷п╣я─п╣пЄп╟я┌я▄', %url, act=>'cards_move_step1'); $actions .= $Url->a(' export', %url, act=>'cards_export_csv'); foreach my $act( [ good => 'п▓ я─п╟п╠п╬я┌я┐'], [ stock => 'п²п╟ я│п╨п╩п╟пЄ'], [ bad => 'п▒п╩п╬п╨п╦я─п╬п╡п╟я┌я▄'],
в web/operations.pl после 18 строчки " cards_export_csv => 1, " my %subs = ( dontshowmess => 1, # я┐пЄп╟п╩п╦я┌я▄ я│п╬п╬п╠я┴п╣пҐп╦п╣ пЄп╩я▐ п╟пЄп╪п╦пҐп╟ п╬я┌ я│я┐п©п╣я─п╟пЄп╪п╦пҐп╟ cards_move_step1 => 1, # п╡я▀п╠п╬я─ п╟пЄп╪п╦пҐп╦я│я┌я─п╟я┌п╬я─п╟ пЄп╩я▐ п©п╣я─п╣пЄп╟я┤п╦ cards_move_step2 => 1, # пҐп╣п©п╬я│я─п╣пЄя│я┌п╡п╣пҐпҐп╟я▐ п©п╣я─п╣пЄп╟я┤п╟ п╨п╟я─я┌п╬я┤п╣п╨ cards_move_accept => 1, # п©п╬пЄя┌п╡п╣я─пІпЄп╣пҐп╦п╣ п©п╣я─п╣пЄп╟я┤п╦ п╨п╟я─я┌п╬я┤п╣п╨ п©я─п╦пҐп╦п╪п╟я▌я┴п╦п╪ п╟пЄп cards_change_alive => 1, # я│п╪п╣пҐп╟ я│п╬я│я┌п╬я▐пҐп╦я▐ п╨п╟я─я┌п╬я┤п╣п╨ (пҐп╟ я│п╨п╩п╟пЄп╣/п╪п╬пІпҐп╬ п╟п╨я┌п╦п╡п╦ del_ses_data => 1, cards_export_csv => 1, );
и в самом конце перед последней строчкой "1;" (код взят из 50.32 версии) sub cards_export_csv { my $dbh = Db->dbh; my $p; my $cards = cards_move_preload(); my($start, $end) = ($cards->{start}, $cards->{end}); my $body=''; #Запрашиваем идентификатор, активационный код, стоимость карточки my $sth=$dbh->prepare("SELECT `cid`, `cod`, `money` FROM `cards` WHERE cid>=$start AND cid<=$end"); $sth -> execute; while ($p=$sth->fetchrow_hashref) { #Закомментировать строку ниже, если нужно деньги привести к западному типу разделителя целой и дробной части $p->{money} =~ tr/./,/; #Генерируем ряды CSV для последующего экспорта например в MS Access $body.="\"$p->{cid}\";\"$p->{cod}\";\"$p->{money}\" \n"; } #Выводим данные в браузер на сохранение my $OUT="Content-Type: application/octet-stream\n". "Content-Disposition: attachment; filename=nocards.txt\n\n". "$body"; print $OUT; exit; }
в итоге текстовый фаил содержания с новой строки: "номер карты";"код карты";"номинал карты" З.Ы. делал в обнимку с гуглом, языков никаких не знаю, с перлом познакомился только из-за нодени)))) Добавить бы в подставку Н+...
|
|
|
Записан
|
|
|
|
vddav
|
|
« Ответ #486 : 28 Мая 2013, 16:36:54 » |
|
я так понимаю что абон не может самостоятельно выбрать себе пакет на следующий месяц из клиентской статистики, только закать услугу speed_up, разве что в случае когда у него не подключена ни одна услуга. как с этим быть?
|
|
|
Записан
|
|
|
|
Efendy
|
|
« Ответ #487 : 28 Мая 2013, 18:03:58 » |
|
я так понимаю что абон не может самостоятельно выбрать себе пакет на следующий месяц из клиентской статистики, только закать услугу speed_up, разве что в случае когда у него не подключена ни одна услуга. как с этим быть?
может. В насйтроках клиентской статистики подключен модуль "srv_info - Информация об услуге. Позволяет клиенту управлять автопродлением услуг"?
|
|
|
Записан
|
|
|
|
Redmen
NoDeny
Ветеран
Карма: 62
Offline
Сообщений: 546
Подяку в КАРМУ
|
|
« Ответ #488 : 28 Мая 2013, 18:43:23 » |
|
я так понимаю что абон не может самостоятельно выбрать себе пакет на следующий месяц из клиентской статистики, только закать услугу speed_up, разве что в случае когда у него не подключена ни одна услуга. как с этим быть?
может. В насйтроках клиентской статистики подключен модуль "srv_info - Информация об услуге. Позволяет клиенту управлять автопродлением услуг"? Может обьеденить 3 в 1 srv_add srv_info srv_select сделать это всё в одном файле и чтоб при заходе на "Подключение услуги" можно было вибрать смену услуги а то в наличии много тупых клиентов которые звонят и спрашивают: "куда зайти и как подключить?" 2 Efendyсегодня уезжаю в коммандировку на 3 недели, если будет время попробую наваять подобное; есть предложе по улутшению МММ модуля, переделаю и скину в ЛС; перезалъю мои модули(новие ссылки), посмотри, могет уже выставиш на продажу; сделал модуль ядра "мониторинг Юз. всегда онлайн" (с ним в модуле ДШЦП выставил аренду в 1 сутки, и всё летает, и хомроутеры не виснут)
|
|
|
Записан
|
|
|
|
Redmen
NoDeny
Ветеран
Карма: 62
Offline
Сообщений: 546
Подяку в КАРМУ
|
|
« Ответ #489 : 28 Мая 2013, 18:50:27 » |
|
кстати про ДШЦП: можно ли каким нибудь образом в конфиг ДШЦП пул адресов брать из SQL? было бы супер +добавить названия и разрешения пулам (к примеру для разделение на вланы) типа vlan1 range sql_pool "vlan1" при этом пропадут упоминаемые ранее проблемы типа "ДШЦП видает из пула зарезервирование ИПы"
|
|
|
Записан
|
|
|
|
Efendy
|
|
« Ответ #490 : 28 Мая 2013, 21:28:20 » |
|
Модуль ядра make_config можно подлампичить
|
|
|
Записан
|
|
|
|
vddav
|
|
« Ответ #491 : 28 Мая 2013, 22:32:16 » |
|
я так понимаю что абон не может самостоятельно выбрать себе пакет на следующий месяц из клиентской статистики, только закать услугу speed_up, разве что в случае когда у него не подключена ни одна услуга. как с этим быть?
может. В насйтроках клиентской статистики подключен модуль "srv_info - Информация об услуге. Позволяет клиенту управлять автопродлением услуг"? все три подключены: srv_select srv_add srv_info в офф демке такая же фигня: недоступно - уже подключена аналогичная, как бы логично что подключена аналогичная, ну на аналогичную и надо же изменить (быстрее, медленнее, дороже, дешевле...))
|
|
|
Записан
|
|
|
|
Redmen
NoDeny
Ветеран
Карма: 62
Offline
Сообщений: 546
Подяку в КАРМУ
|
|
« Ответ #492 : 29 Мая 2013, 09:07:04 » |
|
я так понимаю что абон не может самостоятельно выбрать себе пакет на следующий месяц из клиентской статистики, только закать услугу speed_up, разве что в случае когда у него не подключена ни одна услуга. как с этим быть?
может. В насйтроках клиентской статистики подключен модуль "srv_info - Информация об услуге. Позволяет клиенту управлять автопродлением услуг"? все три подключены: srv_select srv_add srv_info в офф демке такая же фигня: недоступно - уже подключена аналогичная, как бы логично что подключена аналогичная, ну на аналогичную и надо же изменить (быстрее, медленнее, дороже, дешевле...)) На главной странице клиентской статистики, там где написано:"01.05.2013 00:00 подключена услуга Имя услуги", нажми на имя услуги, и там дальше разберёшся!!! именно об этом я писал несколько постов назад!!! неудобно ИМХО!!!
|
|
|
Записан
|
|
|
|
vddav
|
|
« Ответ #493 : 29 Мая 2013, 09:49:37 » |
|
о_О как, что то даже не подумал туда посмотреть. абоны они ж как дети малые)) чуть что не на своих местах - потерялися))
|
|
|
Записан
|
|
|
|
vddav
|
|
« Ответ #494 : 30 Мая 2013, 12:12:31 » |
|
Сделать бы фичу к массовым сообщениям - "настаивать на прочтении".
up уже придумал как реализовать! будет готово примерно через 2 недели (много личной работы + командировка) ну так что там, есть какой прогресс?
|
|
|
Записан
|
|
|
|
|