Возможно ли сделать срок НМА службы в днях?

ПНР и сопровождение

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Иван
Местный житель
Сообщения: 200
Зарегистрирован: 28 апр 2009, 13:19
Откуда: Новороссийск

Возможно ли сделать срок НМА службы в днях?

Сообщение Иван »

Необходимо чтобы сумма по операции амортизации в карточке НМА рассчитывалась линейно не по месяцам, а по дням. Скажем есть общий срок службы установить не в месяцах, а в днях, пусть 260 дней. Далее если ее ввели в эксплуатацию 13 июля, то за июль амортизация считалась как (31-13)/260 ? Можно конечно по месяцам, но каждый раз приходиться делать операцию изменения стоимости.
Иван
Местный житель
Сообщения: 200
Зарегистрирован: 28 апр 2009, 13:19
Откуда: Новороссийск

Сообщение Иван »

может даже срок службы оставить в месяцах, но алгоритм расчета сумм за каждый месяц брать исходя из количества дней в месяце и общий срок задавать в днях
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5187
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

функцми
function CalcDaysBetweenDates (aDateFrom,
aDateTo : date;
aMinusNonWorkDays : Boolean
) : integer;
function Add_Months (d : date, m : integer) : date;
Параметры

d : date - исходная дата.

m : integer - количество прибавляемых месяцев
function Day (d : date) : byte;
function Last_Day (d : date) : byte;

вам помогут
Seybukan
Местный житель
Сообщения: 1357
Зарегистрирован: 29 мар 2005, 17:49
Откуда: СПб, ЭП-Аудит
Контактная информация:

Сообщение Seybukan »

Что-то у меня подозрения что в НМА учитывают расходы будуших периодов.

Сейчас есть документ во ФРО с одноименным названием-рекомендую посмотреть, если мои догадки верны.
Иван
Местный житель
Сообщения: 200
Зарегистрирован: 28 апр 2009, 13:19
Откуда: Новороссийск

Сообщение Иван »

подскажите как можно получить внешний аттрибут таблицы katos в описании алгоритма амортизации?
Иван
Местный житель
Сообщения: 200
Зарегистрирован: 28 апр 2009, 13:19
Откуда: Новороссийск

Сообщение Иван »

короче согласно поиску это невозможно :-(
Seybukan
Местный житель
Сообщения: 1357
Зарегистрирован: 29 мар 2005, 17:49
Откуда: СПб, ЭП-Аудит
Контактная информация:

Сообщение Seybukan »

Используйте функцию
TXOGetExtAttr
Поиск должен дать результаты.
Иван
Местный житель
Сообщения: 200
Зарегистрирован: 28 апр 2009, 13:19
Откуда: Новороссийск

Сообщение Иван »

пишет что нет такой функции
использовал coTXOGetExtAttr такая есть, но почему-то не отрабатывает, возвращает 0, хотя аттрибут заполнен
Seybukan
Местный житель
Сообщения: 1357
Зарегистрирован: 29 мар 2005, 17:49
Откуда: СПб, ЭП-Аудит
Контактная информация:

Сообщение Seybukan »

Тип атрибута какой?
Seybukan
Местный житель
Сообщения: 1357
Зарегистрирован: 29 мар 2005, 17:49
Откуда: СПб, ЭП-Аудит
Контактная информация:

Сообщение Seybukan »

Эти функции из функциональности ТХО.
Возможно надо запустить сервер ТХО.
пример вызова
if(initservtxo(0),TxoGetExClassCode1('katmc',46,???),'???')
Иван
Местный житель
Сообщения: 200
Зарегистрирован: 28 апр 2009, 13:19
Откуда: Новороссийск

Сообщение Иван »

тип вещественный
сделал так
if(initservtxo(0),coTXOGetExtAttr('KATOS','Срок службы карточки в днях',KATOS.NREC),0)
возвращает 0
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5187
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

зайдите в любую хозпоерацию, в алгоритме F3 - общниспользуемые функции - там будет мини мастер. "co" это comp (ссылка), для вещественно типа "do" будет(влом смотреть).
Ответить