Цитата:
froguz wrote: Блин, сборище ботанов программистов...
По моему корел нужен, чтобы в нем рисовать а не заниматься программингом, хотя ента возможность там тоже есть, но не таким же фанатизмом?
Работал на фотовыводе, этикеточные спуски в CorelDraw. Объёмы большие, поток. Если по твоей вине брак, высчитывают из зарплаты 40% от всего допущенного брака. К примеру, 700 тысячный тираж пантонной этикетки с тиснением и когревом, а резчик не может порезать твой спуск для высечки, потому что ты ошибся с наложением высечных элементов. А всё уже отпечатано, оттиснено и отконгревлено. Или у тебя погадился векторный текст под линзой на оооочень срочном и важном заказе. Или Scale With Image на RIP'е погадились и обводка получилась рваной, а ты не заметил, потому что работы больше, чем до хера. Или проскочил объект, кторый ты ручками перекрашивал, но он, засранец этакий, не перекрасился и остался в RegistrationColor, а эта обводочка тооонкая, и при печати видно, что не чёрный цвет у тебя, а полный... CMYK. Да много ещё чего может быть такого, что с помощью VBA делается легко и ненапряжно, а ручками - геморройно и криво.
Так что любители потрендеть про сборище ботанов-программистов могут засунуть себе язычок куда подальше.
Можешь - помоги, не можешь - не мешай.
Цитата:
aus_gift wrote:
оффтоп:
Я про новый год - в том смысле что сравнение не будет работать по дате.
И я только сейчас въехал насчет газеты. Вы кстати наши конкуренты, только в другом городе и в другой стране ))
вопрос:
Так я так понимаю что база даных есть или текстовый фаил откуда береться и как опеределять к какому изданию относится фаил? И что такое перерегистрация?
Конечно есть база данных.
Где занесены даты выхода - макет 25104000 должен выйти 10 февраля, а макет 25104001 - 12 февраля.
мы запускаем отчет на 10 февраля и получаем список (текстовый файл) только тех макетов которые выходят 10 февраля.
Моя прога работает при переходе через Новый год - поэтому проблем нет.
Например сейчас 15.
02.08
перерегистрация: из 10
124000 (явно сделана 2007 г, обозначим Старый год) сделать 14
025000 (новый год)
'Определение года
god_star = CStr(Year(Date))
god_new = CStr(Year(Date))
If Month(Date) < Val(Mid(hstar, n, 2)) And Val(Mid(hstar, n, 2)) <= Val(Mid(hnew, n, 2)) Then
god_star = CStr(Year(Date) - 1)
god_new = CStr(Year(Date) - 1)
End If
If Month(Date) < Val(Mid(hstar, n, 2)) And Val(Mid(hstar, n, 2)) > Val(Mid(hnew, n, 2)) Then
god_star = CStr(Year(Date) - 1)
god_new = CStr(Year(Date))
End If
А перерегистрация - это по сути просто переименование макета (для чего это надо - в.ч. для бухгалтерии, номера счетов содержат эти номера, новый договор - новый номер. Также необходимо, переодически обновлять номера - типо не будеш же использовать номера годовалой давности (тем более больше))