|
Почистил код...но не выводит на экран | ☑ | ||
---|---|---|---|---|
0
msk-07
23.05.12
✎
08:46
|
Есть код для
Процедура КнопкаВыполнитьНажатие(Кнопка) Команды=Новый ТаблицаЗначений; Команды.Колонки.Добавить("НомерСтр", Новый ОписаниеТипов("Число")); Команды.Колонки.Добавить("СФ", Новый ОписаниеТипов(Документы.ТипВсеСсылки().Типы())); Команды.Колонки.Добавить("Сумма", Новый ОписаниеТипов("Число")); Команды.Колонки.Добавить("НДС", Новый ОписаниеТипов("Число")); Команды.Колонки.Добавить("Разница",Новый ОписаниеТипов ("Число")); Команды.Колонки.Добавить("Разница2", Новый ОписаниеТипов("Число")); Выборка = Документы.НДС_СчетФактураВыданный.Выбрать(Дата1, Дата2); Пока Выборка.Следующий() Цикл Если Выборка.ПолучитьОбъект() <> 1 Тогда Продолжить; КонецЕсли; Команды.НоваяСторока(); Команды.НомерСтр=Команды.НормерСтроки; Команды.СФ=Выборка.ПолучитьОбъект(); Команды.Сумма=Выборка.Итог("Сумма"); Команды.НДС=Выборка.Итог("НДС"); Команды.Разница=Выборка.Итог("Всего")*18/118-Выборка.Итог("НДС"); Команды.Разница2=Выборка.Итог("Всего")*18/100-Выборка.Итог("НДС"); КонецЦикла КонецПроцедуры Процедура ПриОткрытии() НачалоПериода=НачалоКвартала(ТекущаяДата()); КонецПериода=КонецКвартала(ТекущаяДата()); КонецПроцедуры Процедура ПроверкаЗКП () ИтогоОш=0; ИтогоОш2=0; ЗКП = Документы.НДС_СчетФактураВыданный.Выбрать(Дата1, Дата2); ЗКП.ВыбратьСтроки(); Пока ЗКП.ПолучитьСтроку()=1 Цикл Разн=Окр(ЗКП.СуммаНДС * 18/100,2)-ЗКП.СтавкаНДС; Если Разн < 0 Тогда Разн=-Разн; КонецЕсли; Если Разн > 0 Тогда Сообщить(Строка(ЗКП.КодВидаОперации)+" "+Строка(Окр(ЗКП.СуммаНДС * 18/100,2)-ЗКП.СтавкаНДС)); КонецЕсли; ИтогоОш=ИтогоОш+ЗКП.СуммаНДС * 18/100-ЗКП.СтавкаНДС; ИтогоОш2=ИтогоОш2+Окр(Зкп.СуммаНДС * 18/100,2)-ЗКП.СтавкаНДС; КонецЦикла; Сообщить("Ошибка итого" + ИтогоОш); Сообщить("Ошибка итого2" + ИтогоОш2); КонецПроцедуры вроде бы все подчистил...но не выводит ни чего на экран...наверное я что-то не так пишу в макете, не могу понять почему http://s017.radikal.ru/i435/1205/0c/9bfd90d0ecd9.jpg , а это как написано на 7.7 http://s019.radikal.ru/i618/1205/14/28a2396ce154.jpg |
|||
1
msk-07
23.05.12
✎
08:47
|
http://s017.radikal.ru/i435/1205/0c/9bfd90d0ecd9.jpg Так пишу я
а на 7.7 написано http://s019.radikal.ru/i618/1205/14/28a2396ce154.jpg |
|||
2
butterbean
23.05.12
✎
08:48
|
а где код вывода на экран??
|
|||
3
Tymoha
23.05.12
✎
08:49
|
Если Выборка.ПолучитьОбъект() <> 1 Тогда
Продолжить; КонецЕсли; Это чо? Объект у тебя равен 1? ))) |
|||
4
Homer
23.05.12
✎
08:49
|
таблица Команды и Таблица на форме это одно и тоже?
|
|||
5
msk-07
23.05.12
✎
08:50
|
(4) иначе ошибка(((
|
|||
6
PuhUfa
23.05.12
✎
08:50
|
Я так вообще не могу увязать макет в 8ке... с формой в 7ке и кодом в ТС -)))
|
|||
7
Tymoha
23.05.12
✎
08:51
|
ЗКП = Документы.НДС_СчетФактураВыданный.Выбрать(Дата1, Дата2);
ЗКП.ВыбратьСтроки(); Пока ЗКП.ПолучитьСтроку()=1 Цикл Это чо? ЗКП у тебя выборка документов. |
|||
8
msk-07
23.05.12
✎
08:52
|
(7) Да
|
|||
9
Пеппи
23.05.12
✎
08:53
|
(8) ты пишешь для 7.7 наверное. этот код не похож на 8й.
|
|||
10
msk-07
23.05.12
✎
08:53
|
нет. для 8.2
|
|||
11
Пеппи
23.05.12
✎
08:54
|
и ошибок не выдает?
|
|||
12
msk-07
23.05.12
✎
08:55
|
нет..все норм, вот только на экран ни чего не выводит, наверное это из-за макета(
|
|||
13
Пеппи
23.05.12
✎
08:56
|
ты куда хочешь вывести? на экран или в табличный документ?
|
|||
14
butterbean
23.05.12
✎
08:58
|
(10) не звизди, твоя процедура ПроверкаЗКП на 8.2 вся обругается... хотя может она просто не вызывается...
|
|||
15
butterbean
23.05.12
✎
08:58
|
(14)+ проблема у тебя в проверке Выборка.ПолучитьОбъект() <> 1
|
|||
16
salvator
23.05.12
✎
09:00
|
(0)
Если Выборка.ПолучитьОбъект() <> 1 Тогда Условие не сработает, учи матчасть! |
|||
17
Пеппи
23.05.12
✎
09:00
|
в процедуре КнопкаВыполнитьНажатие тоже полно непонятного кода.
|
|||
18
salvator
23.05.12
✎
09:00
|
+(16) Точнее, сработает, но ТЗ не заполнится
|
|||
19
Пеппи
23.05.12
✎
09:01
|
(0) отладчиком пользоваться умеешь?
|
|||
20
msk-07
23.05.12
✎
09:06
|
честно нет(
|
|||
21
salvator
23.05.12
✎
09:09
|
(12) Звездишь как дышишь. У тебя вот в этих 2-х строках только
Команды.НоваяСторока(); Команды.НомерСтр=Команды.НормерСтроки; уже 2 ошибки |
|||
22
msk-07
23.05.12
✎
09:12
|
Если бы мне кто нибудь посоветовал книгу или сайт где хорошо описана структура синтаксиса 1с, я тыкаюсь все на пишу и не понимаю смысла во многом. То есть где ссылку делать где сразу вызывать((
|
|||
23
ЧеловекДуши
23.05.12
✎
09:13
|
Автор походу запутался в коде :)
И 7.7 и 8.х наплел :) (22)А ты вообще программист или бухгалтер? Тут надо точно знать, а то не каждая книга по программированию понятно буху :) |
|||
24
Пеппи
23.05.12
✎
09:13
|
(22) в типовых конфигурациях можно посмотреть. Там столько кода, причем рабочего.
|
|||
25
salvator
23.05.12
✎
09:15
|
(22) Открой для себя сначала СП
|
|||
26
msk-07
23.05.12
✎
09:17
|
я закончил математический факультет, чистая математика
|
|||
27
Бледно Золотистый
23.05.12
✎
09:19
|
(26) Так мы хотя бы (2) увидим?
|
|||
28
msk-07
23.05.12
✎
09:20
|
как бы я добавил строчку в конце ЗКП.Показать();
без результатно( |
|||
29
Пеппи
23.05.12
✎
09:23
|
(26) почему пишешь семерочным кодом? ты переписываешь обработку для 7ки?
|
|||
30
msk-07
23.05.12
✎
09:23
|
(29) да, переписываю(((
|
|||
31
butterbean
23.05.12
✎
09:24
|
(28) у тебя процедура ПроверкаЗКП не вызывается, если бы вызывалась - ругалось бы на ошибки
|
|||
32
zak555
23.05.12
✎
09:25
|
(0) ты так бухам про округление и не рассказал ?
|
|||
33
Пеппи
23.05.12
✎
09:27
|
(32) рассказал, но они не поверили ему. :))
|
|||
34
msk-07
23.05.12
✎
09:31
|
неа..
|
|||
35
zak555
23.05.12
✎
09:31
|
(33) они не верят математике ?
|
|||
36
zak555
23.05.12
✎
09:31
|
(34) почему ?
|
|||
37
msk-07
23.05.12
✎
09:35
|
((((((
|
|||
38
msk-07
23.05.12
✎
09:38
|
так что мне делать?
|
|||
39
salvator
23.05.12
✎
09:38
|
(38) Учиться, учиться и еще раз учиться (с)
|
|||
40
butterbean
23.05.12
✎
09:38
|
(38) в чем проблема?? тебе уже все разжевали по нескольку раз
|
|||
41
zak555
23.05.12
✎
09:39
|
(38) какого хрена ты буха математику не рассказал и не спросил, зачем им эта херня ?
|
|||
42
msk-07
23.05.12
✎
09:39
|
блин..не понимаю, я сам закончил чистую математику
|
|||
43
msk-07
23.05.12
✎
09:43
|
(41)а им нужно это, им это бухам для подсчета погрешности при подсчете НДС
|
|||
44
msk-07
23.05.12
✎
10:23
|
(((( печаль
|
|||
45
zak555
23.05.12
✎
10:26
|
(43) ты им мой пример приводил ?
|
|||
46
msk-07
23.05.12
✎
10:32
|
Да, здесь кажется другая ситуация вот есть сумма документа мы умножаем на процент НДС *0,18, получается число где например после занятой четыре знака и машина это пропускает, но у нас же нет тысячных копеек, из-за этого мы округляем до десятых, то есть ,ХХ вот то они меняя просят
|
|||
47
zak555
23.05.12
✎
10:34
|
(46) объясни этим упырям, что на ставку умножать общую сумму документа НЕЛЬЗЯ !!!!!!!!!!!!!!!!!!!
|
|||
48
Бледно Золотистый
23.05.12
✎
10:34
|
(43) А если в СФ есть товары со ставкой НДС 10%, что делать будешь?
|
|||
49
msk-07
23.05.12
✎
10:35
|
не знаю, что делать(((
|
|||
50
zak555
23.05.12
✎
10:35
|
(49) отправь их читать Налоговый Кодекс (!)
|
|||
51
zak555
23.05.12
✎
10:35
|
давай телефон - ща ему популярно объясню
|
|||
52
zak555
23.05.12
✎
10:36
|
им
|
|||
53
msk-07
23.05.12
✎
10:39
|
http://i009.radikal.ru/1205/ea/b23fc681030a.jpg вот что обрабатывает эта обработка
|
|||
54
zak555
23.05.12
✎
10:39
|
кстати, вот ещё им что скажи :
сумма усеченных множеств не равна усечению множества |
|||
55
msk-07
23.05.12
✎
10:40
|
вот и получается отклонение на -4 рубля
|
|||
56
msk-07
23.05.12
✎
10:44
|
если честно я не понимаю зачем им это, но наверное для успокоения души((((
|
|||
57
MatrosoV AleXXXand_R
23.05.12
✎
10:58
|
Если Выборка.ПолучитьОбъект() <> 1 Тогда
Это не 7.7, это 8-ка ПолучитьОбъект() - возвращает [...]Объект |
|||
58
MatrosoV AleXXXand_R
23.05.12
✎
11:00
|
а вообще сразу косяк - запросом надо заполнять а не перебором, да и в колонку ты засовываешь СчетФактураОбъект, а надо СчетФактураСсылка
|
|||
59
zak555
23.05.12
✎
11:01
|
(55) отклонение у них в мозгу
|
|||
60
zak555
23.05.12
✎
11:02
|
(56) ты у них сейчас сидишь ?
принтер есть у них ? |
|||
61
msk-07
23.05.12
✎
11:05
|
да, есть
|
|||
62
msk-07
23.05.12
✎
11:13
|
((((
|
|||
63
zak555
23.05.12
✎
13:56
|
(61) распечатай им плакат следующего содержания :
сумма усеченных множеств не равна усечению множества (!) |
|||
64
EasyRider
23.05.12
✎
14:02
|
(63)А чей это закон?
|
|||
65
zak555
23.05.12
✎
14:04
|
(64) общеизвестный
|
|||
66
EasyRider
23.05.12
✎
14:07
|
(65)так-то оно так,но как-то вроде неловко аргументировать словами "это же всем известно!"
|
|||
67
Бледно Золотистый
23.05.12
✎
14:08
|
(63) Думаю они это понимают, раз требуют обработку от ТСа, вот только как они эту информацию хотят использовать не понятно.
|
|||
68
zak555
23.05.12
✎
14:09
|
(66) если бух этого не знает - пусть валит торговать колбасой
|
|||
69
zak555
23.05.12
✎
14:09
|
(67) если бы они это не понимали, то не просили автора делать сей бред
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |