Месяц: Апрель 2016

Динамический список удобен для использования в интерфейсе, но когда дело касается получения данных, отображаемых в списке для программной обработки, то приходится пользоваться средствами СКД, как это делать приведено ниже:

&НаСервере
Функция Получить_ТЗ_Из_ДинамическогоСписка()
// получаем схему
Схема = Элементы.Список.ПолучитьИсполняемуюСхемуКомпоновкиДанных();
// получаем настройки
Настройки = Элементы.Список.ПолучитьИсполняемыеНастройкиКомпоновкиДанных();
// можем добавлять произвольные отборы дополнительно
// НовыйЭлементОтбора = Настройки.Отбор.Элементы.Добавить(Тип(«ЭлементОтбораКомпоновкиДанных»));
// НовыйЭлементОтбора .ЛевоеЗначение = …
// УстанавливаемыйЭлементОтбора.ВидСравнения = …
//УстанавливаемыйЭлементОтбора.ПравоеЗначение =
// УстанавливаемыйЭлементОтбора.Использование = Истина;

// создаем компоновщик макета и формируем выборку в ТЗ
КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных();
МакетКомпоновки = КомпоновщикМакета.Выполнить(Схема, Настройки, , , Тип(«ГенераторМакетаКомпоновкиДанныхДляКоллекцииЗначений»));

ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
ПроцессорКомпоновки.Инициализировать(МакетКомпоновки);

ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВКоллекциюЗначений;

ТЗ = Новый ТаблицаЗначений;
ПроцессорВывода.УстановитьОбъект(ТЗ);
ПроцессорВывода.Вывести(ПроцессорКомпоновки);
Возврат ТЗ;

КонецФункции

Иногда необходимо знать дату создания документа, ошибочно полагать, что поле «Дата» содержит именно дату создания, тут можно проанализировать идентификатор объекта:

Функция ДатаСозданияСсылки(Ссылка)
// любая ссылка хранит в себе уникальный идентификатор
ГУИД = Ссылка.УникальныйИдентификатор();
// идентфикатор хранит в себе дату и время создания
Строка16 = Сред(ГУИД, 16, 3) + Сред(ГУИД, 10, 4) + Сред(ГУИД, 1, 8);
Разрядность = СтрДлина(Строка16);
ЧислоСек = 0;
// время создания хранится в секундах 
// от 15 октября 1582 года 
// в шестнадцатиричной системе
Для Позиция = 1 По Разрядность Цикл
     ЧислоСек = ЧислоСек +
          Найти(«123456789abcdef»,Сред(Строка16, Позиция, 1))*
          Pow(16, Разрядность — Позиция);
КонецЦикла;
ЧислоСек = ЧислоСек / 10000000;
// вычисляем смещение от начальной точки
датаТ = Дата(1582, 10, 15, 04, 00, 00) + ЧислоСек;
// составляем только дату 
датаТ = Дата( Год(датаТ), Месяц(датаТ), День(датаТ), 00, 00, 00);
Возврат датаТ;

КонецФункции

Интернет пестрит курсами, предлагающими рассказать вам все о бухгалтерском учете буквально за 15 минут. Как правило, предлагаемые варианты похожи друг на друга и созданы теми кто знает бухгалтерский учет для тех, кто, опять же, знает бухгалтерский учет, новички тут остаются как бы за бортом. Получается замкнутый круг — что бы изучить бухгалтерию надо знать бухгалтерию. Стоит сделать еще одно замечание, сам по себе бухгалтерский учет представляет только половину общей картины, а вот бухгалтерский и налоговый учет уже составляют полную картину ситуации на предприятии. Нигде вы не найдете пособие или интернет-страницу, человеческим языком рассказывающую что же это за зверь такой бухгалтерский учет и почему на нем свет сошелся клином. Если вы хотите гарантировано не понять ничего — смотрите бесконечные заунывные курсы, где по экрану бегает, как обезумевший, курсор мыши, открыта пара десятков таблиц и закадровый усыпляющий голос несет не пойми что. Такую скукотищу никак нельзя назвать остросюжетной.
Для тех, кто жаждет знаний и бережет свою человечность, ниже простым языком будет рассказано что такое а главное зачем вообще и кому нужен бухгалтерский учет.

Что же такое организация и зачем она нужна?

Организацию можно сравнить с деревенской коровой, дающей молоко (деньги или товар). За коровой следят, ее лечат и оберегают от нападок диких животных. У каждой коровы есть один или несколько хозяев, есть пастбище, пастухи и охранные собаки. Коров никто не кормит, они сами ищут корм на пастбище. От коров, не дающих молоко, хозяева быстро избавляются. Что бы стадо не посягнуло на территорию, где ему быть не следует, существует пастух и собаки. Они же оберегают стадо от желающих легкой наживы. Если пастуху не перепадает что-то от хозяев какой либо коровы, то с этой коровой, как правило, случается что-то непредвиденное. Никто не будет работать за просто так. Незаменимых персон в этой системе нет, могут быть заменены коровы, пастухи и собаки. Коровы могут вступать в конфликт друг с другом и с охраняющими их пастухами и собаками. Дело даже может закончиться плачевно для одной или другой стороны, но для основного стада все останется как было. Все участники знают свои роли и придерживаются правил поведения. Каждая корова обладает своим характером и хозяева стараются учитывать это для повышения удоя, но любая наглость со стороны коровы как и со стороны хозяев пресекается. Стоит заметить, что корова и ее хозяин это не одно и то же! Хозяин может пустить в расход корову, при этом оставшись невредим.
Выводы
1. Организация должна уметь приносить прибыль;
2. У любой организации есть хозяева;
3. Чтобы организация могла заниматься делом ей необходимо обеспечить необходимые условия;
4. Организация подчиняется определенным правилам игры.

Зачем нам бух учет если есть корова и все идет хорошо?

Итак, мы счастливые обладатели коровы, приносящей молоко. Наш бизнес устроен не хитро: раз в день корова доится, часть молока оставляем себе, часть продаем или меняем на другие ценности у участников рынка. Что дальше? Неужели этого мало? Корову нельзя просто так вывести на пастбище,  это территория государства, за пользование пастбищем и услугами пастуха надо платить, без пастуха за корову никто не отвечает. Более того, плата зависит от удоя: чем больше удой тем больше плати и оплата не может быть ниже определенного уровня. Бедолагам тут не место.

Продолжение следует …

Напишите нам что вызывает у вас трудности в понимании бухучета и мы опубликуем ответ на этой странице
info@disk1c.ru

Фирма 1С решила отказаться от модальных форм в интерфейсах web и Такси, это значит, что попытка просто сохранить файл через диалог потребует больше усилий чем раньше. В примере ниже надо НА КЛИЕНТЕ просто создать текстовый файл и сохранить его куда укажет пользователь:

&НаКлиенте
Процедура НажатиеКнопкиСохранитьФайл() 

// создаем на клиенте текстовый файл
ИмяВременногоФайла = ПолучитьИмяВременногоФайла(«txt»);
// создаем документ который надо записать
ТД = новый ТекстовыйДокумент;
ТД.ДобавитьСтроку(«Некоторый текст»);
ТД.Записать(ИмяВременногоФайла);
// помещаем файл в хранилище
Адрес = ПоместитьВоВременноеХранилище(новый ДвоичныеДанные(ИмяВременногоФайла ));
// описание события после выбора файла пользователем
ОписаниеОповещения = Новый ОписаниеОповещения(«ОбработкаСохраненияФайлов», ЭтаФорма);
// место хранения файла в 1С
Файл = Новый ОписаниеПередаваемогоФайла(,Адрес);
// создаем перечень файлов
ПолучаемыеФайлы = Новый Массив;
ПолучаемыеФайлы.Добавить(Файл);
// создаем диалог сохранения файла
ДиалогОткрытияФайла = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Сохранение);
ДиалогОткрытияФайла.МножественныйВыбор = Ложь;
// выводим диалог на экран, после выбора файла 
// вызовется процедура ОбработкаСохраненияФайлов
НачатьПолучениеФайлов(ОписаниеОповещения,ПолучаемыеФайлы, ДиалогОткрытияФайла, Истина);

КонецПроцедуры

&НаКлиенте
Процедура ОбработкаСохраненияФайлов(ПомещенныеФайлы, ДополнительныеПараметры) Экспорт
// какие-то действия
// …
КонецПроцедуры

В некоторых случаях удобно выгрузить из 1С какие либо данные в Access для дальнейшей работы. Работа осуществляется через ADODB.Connection, причем возможно использование языка запросов Transact SQL. Пример ниже:

adOpenForwardOnly = 0; // код состояния
adLockPessimistic = 2; // режим блокировок
adOpenStatic = 3; // режим открытия соединения
adStateOpen = 1; // код открытия соединения
ИмяФайла = «C:\MyFile.accdb»; // имя файла 

// строка подключения к файлу БД Access
conn_str = «Provider=Microsoft.ACE.OLEDB.12.0; Data Source=» + ИмяФайла + «;»»»;
cn = Новый COMОбъект(«ADODB.Connection»); // объект для соединения
cn.Open(conn_str); // соединяемся с БД Access
Если (cn.State <> adStateOpen ) тогда // проверка открытия соединения
     Сообщить(«Не удалось открыть ADODB.Connection»);
     Возврат;
КонецЕсли;
rs = Новый COMОбъект(«ADODB.Recordset»); // объект для обхода строк
rs_select = Новый COMОбъект(«ADODB.Recordset»);
strSQL = «customers»; // таблица Access, с которой имеем дело
rs.Open(strSQL, cn, adOpenStatic, adLockPessimistic); // открываем таблицу 
strSQL = «select name from customers where id=100»; // sql запрос к таблице
rs_select.Open(strSQL, cn, adOpenStatic, adLockPessimistic); // делаем выборку
Если rs_select.EOF = Ложь тогда // проверка наличия записей в выборке
     Сообщить(«Нет строки с таким идентификатором: «);
     rs_select.Close(); // закрываем выборку
     rs_select = Неопределено; // уничтожаем лишние данные
КонецЕсли;
Попытка
rs.AddNew(); // добавить новую строку в табл  customers
rs.Fields(0) .Value = 250; // имя нового контрагента
rs.Fields(1) .Value = «Новый контрагент»; // имя нового контрагента
rs.Update(); // записать новую строку в таблицу
// вывод на печать строки по колонкам
Для Каждого col Из rs.Fields Цикл
     Сообщить(«Колонка « + col.Name + » = « + Строка(col.Value));
КонецЦикла;
Исключение
// исключение может быть вызвано наличием сроки с таким же 
// идентификатором
Если  rs.ActiveConnection.Errors(0).Number = -2147217887  тогда
     Сообщить(«Такая запись уже есть в таблице»);
Иначе
     Сообщить(ОписаниеОшибки());// другая ошибка
КонецЕсли;
КонецПопытки;
// закрываем выборку, если она открыта
Если (rs.state = adStateOpen) тогда
      rs.Close();
КонецЕсли;
// закрываем соединение с БД, если оно открыто
Если cn.state = adStateOpen тогда
      cn.Close();
КонецЕсли;
// уничтожаем лишние данные
rs = Неопределено;
cn = Неопределено;

Часто на собеседованиях задают вопросы для проверки «на дурака». Ниже приведены подобные вопросы и ответы на них.

1. Есть емкость 3 и 5 литра, надо переливая из одной в другую воду, получить 4 литра, итак: наливаем полностью 5 литров, из нее заполняем 3-х литровый сосуд, выливаем все из трехлитрового и заливаем туда оставшиеся 2 литра из 5-ти литровой. Заполняем полностью 5 литровую и отливаем из нее 1 литр что бы заполнить полностью 3-х литровую емкость, осталось 4 литра в 5-ти литровой емкости.
2. Есть три банки, в первой конфеты со вкусом яблока, во второй — конфеты со вкусом груши, в третьей — и те и те (микс). Каждая из банок подписана неправильно, т.е. например, на банке с яблочными конфетами «микс», на миксе — «груша», на груше — «яблоко». Вопрос: сколько раз надо выбрать конфету что бы определить в какой банке какие конфеты? Ответ: 1 раз. Выбираем конфету из банки с надписью «микс», мы знаем, что это точно не микс, поэтому определяем вид конфеты, например в «миксе» нашли яблоко, это яблочные конфеты, следовательно, в банке с надписью «груша» будет не груша, но и не яблоко, т.к. яблоко мы уже нашли, значит в банке с надписью «груша» будет микс, остается одна банка с надписью «яблоко» и это будет груша, т.к. больше ничего не остается.
3. На вопрос «Почему вы выбрали 1С» можете смело отвечать: «При помощи этой среды разработки можно за минимальное время получить готовую для внедрения систему для учета и обработки данных как на локальном компьютере, так и в глобальной сети.»
4. Перед тем как идти на собеседование посмотрите сайт организации, почитайте основную страницу, обратите внимание на продукцию или услуги, запомните основные. Вас обязательно спросят «Что вы знаете о нашей компании?».
5. Вас могут спросить о том как вы относитесь к фрилансу (заработку на стороне), это вопрос с подвохом, если вы будете говорить с радостью, что конечно соглашаетесь на дополнительную подработку, то скорее всего собеседование вам не пройти. Говорить что вы отказываетесь полностью от фриланса, в общем, может положительно отразиться на выбор в пользу вас. Как правило, люди отвечают «иногда бывает».
6. Если вы не знаете ответ на какой либо вопрос, говорите «На данный момент точно ответить на вопрос не могу, надо освежить его в памяти, не хочу врать».
7. Когда вас просят задавать вопросы по организации, спросите сперва как долго организация существует на рынке, количество сотрудников, как долго в среднем работает сотрудник, насколько устойчива организация на рынке, затем, самый главный вопрос: «Каким образом осуществляется получение, выполнение заявок на программирование/консультацию, как ведется учет заявок, расстановка приоритетов и распределение ответственности за результат выполнения заявок?». Ответ на этот вопрос покажет вам отношение организации к вопросам автоматизации, чем более бюрократизировано выполнение заявок тем серьезнее можно считать компанию, хотя бывают случаи избыточной бюрократизации.
8. Заканчиваться собеседование может двумя вариантами: «мы согласны вас взять» и «мы с вами свяжемся и сообщим о результате собеседования». Во втором случае смело ищите новые варианты трудоустройства, один/два предложения при упорном поиске должны поступить, обычно об отказе не сообщают.

Вопросы на знание 1С

1. Какие бывают регистры накопления?
   Ответ: Обороты и Остатки
2. В каких случаях для регистра сведений не создается временных таблиц?
   Ответ: для непериодического регистра
3. Для чего в запросе нужно выражение «Разрешенные»?
   Ответ: для активизации ограничения доступа в соответствии с правами пользователя
4. Для чего в виртуальных таблицах нужны параметры?
   Ответ: для ускорения выполнения выборки данных в сравнении с отбором после создания виртуальной таблицы
5. Как будет запрос работать быстрее: при использовании вложенных запросов или временных таблиц?
   Ответ: использовании временных таблиц, 1С не рекомендует использовать вложенные запросы.
6. Что такое РЛС (RLS)?
   Ответ: Система ограничения доступа к данным на уровне записей
7. Приведите пример бухгалтерских проводок по продаже товара?
   Ответ: Дт 62 (Расчеты с клиентами) Кт 90 (субсчет Выручка)
   Дт 90 (субсчет НДС) Кт 68 (НДС)
   Дт 90 (субсчет Себестоимость) Кт 41 (Товары)
8. На каком счете учитываются расчеты с поставщиками?
   Ответ: 60
9. На каком счете учитывается зарплата сотрудников?
   Ответ: 70
10. На каком счете учитываются основные средства?
    Ответ: 01
11. На каком счете учитывается финансовый результат?
    Ответ: 99
12. Что такое затратные счета?
    Ответ: счета, на которых собираются затраты, эти счета обнуляются в конце каждого месяца

Напишите нам какие вопросы вам задавали на собеседовании и
мы опубликуем ответ на этой странице
info@disk1c.ru

В некоторых случаях надо на клиенте не просто открыть форму элемента справочника или документа, но и получить саму форму для дальнейших действий с ней, для этого можно воспользоваться таким кодом:

ПараметрыФормы = Новый Структура(«Ключ», СсылкаНаНоменклатуру);
Форма = ПолучитьФорму(«Справочник.Номенклатура.ФормаОбъекта», ПараметрыФормы);
Форма.Открыть();