Автоматизация процесса складского учета в ООО "Альянс-Трейд"

Характеристика предприятия, его деятельности и используемых средств автоматизации. Обоснование проектных решений для складского учета, выбор стратегии. Информационная модель формирования заказа, ее описание, техническое и программное обеспечение.

Рубрика Экономика и экономическая теория
Вид дипломная работа
Язык русский
Дата добавления 12.04.2012
Размер файла 1,6 M

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

Если (ФлВыбиратьПрайсЛист = 1) Или (ПустоеЗначение(ПрайсЛист) = 1) Тогда

СписокКаталоговДляВыбора=СоздатьОбъект("СписокЗначений");

СписокКаталоговДляВыбора.ДобавитьЗначение("По справочнику 'Прайс-лист'");

СпрКаталогов=СоздатьОбъект("Справочник.Каталоги");

СпрКаталогов.ВыбратьЭлементы();

Пока СпрКаталогов.ПолучитьЭлемент() = 1 Цикл

Если СпрКаталогов.ЭтоГруппа() = 1 Тогда Продолжить КонецЕсли;

СписокКаталоговДляВыбора.ДобавитьЗначение(СпрКаталогов.ТекущийЭлемент());

КонецЦикла;

Зн = ""; Поз = "";

Если СписокКаталоговДляВыбора.ВыбратьЗначение(Зн, "", Поз,,1) = 0 Тогда

Возврат КонецЕсли;

ПрайсЛист=СписокКаталоговДляВыбора.ПолучитьЗначение(Поз);

СохранитьЗначение("ПрайсЛист", ПрайсЛист);

КонецЕсли;

Если ПрайсЛист = "По справочнику 'Прайс-лист'" Тогда

глПодбор(Контекст, "прайс_лист", "ДляПодбора");

Иначе

СписокПараметров=СоздатьОбъект("СписокЗначений");

СписокПараметров.ДобавитьЗначение(ПрайсЛист, "Каталог");

ОткрытьПодбор("Обработка.РаботаСКаталогомXML",,СписокПараметров, 1);

КонецЕсли;

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

//*************************************************************Процедура ПриЗаписи() //Предопределенная процедура

Если глМожноЗаписатьДокумент(Контекст)=0 Тогда

СтатусВозврата(0);

ИначеЕсли глКонтрольДатыДокумента(Контекст, НачальнаяДатаДокумента)=1 Тогда

СтатусВозврата(0);

КонецЕсли;

КонецПроцедуры// ПриЗаписи

//************************************************************

Процедура ПриЗакрытии() //Предопределенная процедура

КонецПроцедуры// ПриЗакрытии

//************************************************************

//Инициализирум список действий по кнопке "Действия"

СписокДействий = СоздатьОбъект("СписокЗначений");

СписокДействий.ДобавитьЗначение("Структура подчиненности");

СписокДействий.ДобавитьЗначение("Отчет о движениях документа");

//СписокДействий.ДобавитьЗначение("Отчет о бухгалтерских проводках");

СписокДействий.ДобавитьЗначение("Обновление цен в справочнике");

СписокДействий.ДобавитьЗначение("Ввести на основании");

СписокДействий.ДобавитьЗначение("Открыть в журнале");

СписокДействий.ДобавитьЗначение("Выгрузить (отправить по эл.почте)"). Размещено на Allbest.ru


Подобные документы

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.