Видео

Огромное спасибо за такие классные инструкции!

отлично

Интерфейс приложения ооочень похож на ТСД Инфо-Предприятие, или они на вас. Интересно. Это наверное фреймворк общий

Здорово

Софт очень симпатичный, но как же сложно здесь излагает молодой человек. Даже с нотками агрессии

Желаю дальнейшего продвижения

отлично

Отлично

Замечательно.

34-50 там он использует Ctrl + R для замены ( простите, но так как YOu tube с телефона плохо вжино придеться все писать)

потом проверяю на localhost:8080

MODULE Main; REQUIRE Time; CLASS Stock 'Склад'; name 'Наименование' = DATA STRING (Stock); address 'Адрес' = DATA STRING (Stock); FORM stocks 'Склады' OBJECTS s = Stock PROPERTIES (s) name, address, NEW, DELETE; CLASS Item 'ТОВАР'; name 'Наименование' = DATA STRING[50] (Item); barcode 'ШК' = DATA STRING[13] (Item); salePrice 'Цена продажи' = DATA NUMERIC[15,2] (Item); FORM items 'Товары' OBJECTS i = Item PROPERTIES (i) name, barcode, salePrice, NEW, DELETE ; CLASS LegalEntity 'Организация'; name 'Наименование' = DATA STRING (LegalEntity); inn 'ИНН' = DATA STRING (LegalEntity); LegalEntity 'Организация' (STRING inn) = GROUP AGGR LegalEntity le BY inn(le); FORM legalEntyties 'Организация' OBJECTS le = LegalEntity PROPERTIES (le) name, inn, NEW, DELETE ; CLASS Receipt 'Приход'; number 'Номер' = DATA INTEGER (Receipt); date 'Дата' = DATA DATE (Receipt); WHEN LOCAL SET(Receipt r IS Receipt) DO date(r) <- DATE(currentDateTime());///////////////// legalEntity 'Организация' = DATA LegalEntity (Receipt); nameLegalEntity 'Организация' (Receipt r) = name(legalEntity(r)); stock 'Склад' = DATA Stock (Receipt); nameStock 'Склад' (Receipt r) = name(stock(r)); CLASS ReceiptLine 'Строка прихода'; receipt 'Документ' = DATA Receipt (ReceiptLine) NONULL DELETE; //'22-03 хотим видеть номер строки'' index '№№' (ReceiptLine l) = PARTITION SUM 1 IF l IS ReceiptLine ORDER l BY receipt(l); item 'Товар' = DATA Item (ReceiptLine); nameItem 'Товар' (ReceiptLine l) = name(item(l)); quantity 'Количество' = DATA NUMERIC[15,3] (ReceiptLine); //'25-19 х FORM receipts 'Приходы' OBJECTS r = Receipt PROPERTIES (r) READONLY number, date, nameLegalEntity, nameStock PROPERTIES (r) NEWSESSION NEW, EDIT, DELETE ; FORM receipt 'Приход' OBJECTS r = Receipt PANEL PROPERTIES (r) number, date, nameLegalEntity, nameStock OBJECTS l = ReceiptLine PROPERTIES (l) index, nameItem, quantity EDIT Receipt OBJECT r ; CLASS Shipment 'Отгрузка'; CLASS ShipmentLine 'Строка отгрузки'; NAVIGATOR { NEW FOLDER masterData 'НСИ' FIRST WINDOW toolbar { NEW stocks; NEW items; NEW legalEntyties; } NEW FOLDER documents 'Документы' AFTER masterData WINDOW toolbar { NEW receipts; } }

новая ошибка nameItem 'Товар' (ReceiptLine) = name(item(l)); в 21-49 05-01-2023 вылезла L это l не может найти пишет Exception while starting logics instance: [error]: Main:60:45 parameter 'l' is not found Subsequent errors (if any) could not be found.

32-23 по времени код (если я не сделал ошибки) MODULE Main; REQUIRE Time; CLASS Stock 'Склад'; name 'Наименование' = DATA STRING (Stock); address 'Адрес' = DATA STRING (Stock); FORM stocks 'Склады' OBJECTS s = Stock PROPERTIES (s) name, address, NEW, DELETE; CLASS Item 'ТОВАР'; name 'Наименование' = DATA STRING[50] (Item); barcode 'ШК' = DATA STRING[13] (Item); salePrice 'Цена продажи' = DATA NUMERIC[15,2] (Item); FORM items 'Товары' OBJECTS i = Item PROPERTIES (i) name, barcode, salePrice, NEW, DELETE ; CLASS LegalEntity 'Организация'; name 'Наименование' = DATA STRING (LegalEntity); inn 'ИНН' = DATA STRING (LegalEntity); LegalEntity 'Организация' (STRING inn) = GROUP AGGR LegalEntity le BY inn(le); FORM legalEntyties 'Организация' OBJECTS le = LegalEntity PROPERTIES (le) name, inn, NEW, DELETE ; CLASS Receipt 'Приход'; number 'Номер' = DATA_INTEGER (Receipt); date 'Дата' = DATA DATE (Receipt); WHEN LOCAL SET(Receipt r IS Receipt) DO date(r) <- DATE(currentDateTime());///////////////// legalEntity 'Организация' = DATA LegalEntity (Receipt); nameLegalEntity 'Организация' (Receipt r) = name(legalEntity(r)); stock 'Склад' = DATA Stock (Receipt); nameStock 'Склад' (Receipt r) = name(stock(r)); CLASS ReceiptLine 'Строка прихода'; receipt 'Документ' = DATA Receipt (ReceiptLine) NONULL DELETE; //'22-03 хотим видеть номер строки'' index 'NN' (ReceiptLine l) = PARTITION SUM 1 IF l IS ReceiptLine ORDER l BY receipt(l); item 'Товар' = DATA Item (ReceiptLine); nameItem 'Товар' (ReceiptLine) = name(item(l)); quantity 'Количество' = DATA NUMERIC[15,3] (ReceiptLine); //'25-19 х FORM receipts 'Приходы' OBJECTS r = Receipt PROPERTIES (r) READONLY number, date, nameLegalEntity, nameStock PROPERTIES (r) NEWSESSION NEW, EDIT, DELETE ; FORM receipt 'Приход' OBJECTS r = Receipt PANEL PROPERTIES (r) number, date, nameLegalEntity, nameStock OBJECTS l = ReceiptLine PROPERTIES (l) index, nameItem, quantity EDIT Receipt OBJECT r ; CLASS Shipment 'Отгрузка'; CLASS ShipmentLine 'Строка отгрузки'; NAVIGATOR { NEW FOLDER masterData 'НСИ' FIRST WINDOW toolbar { NEW stocks; NEW items; NEW legalEntyties; } NEW FOLDER documents 'Документы' AFTER masterData WINDOW toolbar { NEW receipts; } }

код на 27:03 --- MODULE Main; CLASS Stock 'Склад'; name 'Наименование' = DATA STRING (Stock); address 'Адрес' = DATA STRING (Stock); FORM stocks 'Склады' OBJECTS s = Stock PROPERTIES (s) name, address, NEW, DELETE; CLASS Item 'ТОВАР'; name 'Наименование' = DATA STRING[50] (Item); barcode 'ШК' = DATA STRING[13] (Item); salePrice 'Цена продажи' = DATA NUMERIC[15,2] (Item); FORM items 'Товары' OBJECTS i = Item PROPERTIES (i) name, barcode, salePrice, NEW, DELETE ; CLASS LegalEntity 'Организация'; name 'Наименование' = DATA STRING (LegalEntity); inn 'ИНН' = DATA STRING (LegalEntity); LegalEntity 'Организация' (STRING inn) = GROUP AGGR LegalEntity le BY inn(le); FORM legalEntyties 'Организация' OBJECTS le = LegalEntity PROPERTIES (le) name, inn, NEW, DELETE ; CLASS Receipt 'Приход'; number 'Номер' = DATA_INTEGER (Receipt); date 'Дата' = DATA DATE (Receipt); WHEN LOCAL SET(Receipt r IS Receipt) DO date(r) <- DATE(currentDateTime()); legalEntity 'Организация' = DATA LegalEntity (Receipt); nameLegalEntity 'Организация' (Receipt r) = name(legalEntity(r)); stock 'Склад' = DATA Stock (Receipt); nameStock 'Склад' (Receipt r) = name(stock(r)); CLASS ReceiptLine 'Строка прихода'; receipt 'Документ' = DATA Receipt (ReceiptLine); //'22-03 хотим видеть номер строки'' index 'NN' (ReceiptLine l) = PARTITION SUM 1 IF l IS ReceiptLine ORDER l BY receipt(l); item 'Товар' = DATA Item (Receiptline); nameItem 'Товар' (ReceiptLine) = name(item(l)); quantity 'Количество' = DATA NUMERIC[15,3] (ReceiptLine); //'25-19 х FORM receipts 'Приходы' OBJECTS r = Receipt PROPERTIES (r) READONLY number, date, nameLegalEntity, nameStock CLASS Shipment 'Отгрузка'; CLASS ShipmentLine 'Строка отгрузки'; NAVIGATOR { NEW FOLDER masterData 'НСИ' FIRST WINDOW toolbar { NEW stocks; NEW items; NEW legalEntyties; } NEW FOLDER documents 'Документы' AFTER masterData WINDOW toolbar { } }

16-40 04-01-2023 а во ту меня ошибку выдала inFusion при попытке сменить имя склада --

Добрый. ошибку выдавал , вот рабочий код ( который на будущее хорош бы выкладывать на ru tube и сам файлик) вот екст рабочего кода : MODULE Main; CLASS Stock 'Склад'; name 'Наименование' = DATA STRING (Stock); address 'Адрес' = DATA STRING (Stock); FORM stocks 'Склады' OBJECTS s = Stock PROPERTIES (s) name, address, NEW, DELETE; CLASS Item 'ТОВАР'; name 'Наименование' = DATA STRING[50] (Item); barcode 'ШК' = DATA STRING[13] (Item); salePrice 'Цена продажи' = DATA NUMERIC[15,2] (Item); FORM items 'Товары' OBJECTS i = Item PROPERTIES (i) name, barcode, salePrice, NEW, DELETE ; CLASS LegalEntity 'Организация'; name 'Наименование' = DATA STRING (LegalEntity); inn 'ИНН' = DATA STRING (LegalEntity); LegalEntity 'Организация' (STRING inn) = GROUP AGGR LegalEntity le BY inn(le); FORM legalEntyties 'Организация' OBJECTS le = LegalEntity PROPERTIES (le) name, inn, NEW, DELETE ; NAVIGATOR { NEW FOLDER masterData 'НСИ' FIRST WINDOW toolbar { NEW stocks; NEW items; NEW legalEntyties; } }

если что в 16:40 не указал но можно запустить из пуска Open Desktop Client

16:40 откуда скачал не указал .

desktop-client-5/1-assembly

Просто отличнейшее видео

супер) то что искал.

Есть реально работающие на этой платформе системы?

Верните пожалуйста всё обратно🙏

А для машиностроения применимо или только для пищевки?

Добрый день, будут ли видео-уроки по разработке на lsFusion? Платформа интересная, но порог вхождения кажется очень высоким из-за отсутствия уроков и активного сообщества какого-то

Привет,спасибо за видео! Можно ли как-то связаться с тобой ?

прога супер, альтернатив не вижу