!", 0, "Увага!")
ENDIF
Процедура перегляду "Рахунки-фактури":
PROCEDURE sfaktrCOMM sh_fak1.TXT NOED
Процедура перегляду "Книги продажів"
PROCEDURE knig
MODI COMM kniga.TXT NOED
Процедура перегляду "Ведомости"
PROCEDURE obortFORM ost.frx PREVIEW
close data ​​p>
2.3 Програми та їх опис
2.3.1 Алгоритм і текст програми меню
SET SYSMENU TO
SET SYSMENU AUTOMATICPAD vvod OF _MSYSMENU PROMPT "Введення даних" COLOR SCHEME 3PAD redakt OF _MSYSMENU PROMPT "Редагування БД" COLOR SCHEME 3PAD vixodinf OF _MSYSMENU PROMPT "Вихідна інформація" COLOR SCHEME 3PAD serv OF _MSYSMENU PROMPT "Сервіс" COLOR SCHEME 3PAD instryk OF _MSYSMENU PROMPT "Інструкція користувачеві" COLOR SCHEME 3PAD vixod OF _MSYSMENU PROMPT "Вихід" COLOR SCHEME 3PAD vvod OF _MSYSMENU ACTIVATE POPUP вводданнихPAD redakt OF _MSYSMENU ACTIVATE POPUP редактіровPAD vixodinf OF _MSYSMENU ACTIVATE POPUP виходнаяінPAD serv OF _MSYSMENU ACTIVATE POPUP сервісSELECTION PAD INSTRYK OF _MSYSMENU DO INSPAD vixod OF _MSYSMENU ACTIVATE POPUP виходPOPUP вводданних MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF вводданних PROMPT "Відомості про покупця"
DEFINE BAR 2 OF вводданних PROMPT "Відвантаження продукції" BAR 3 OF вводданних PROMPT "Рахунок-фактура" BAR 4 OF вводданних PROMPT "Прихід" SELECTION BAR 1 OF вводданних do form pokyp.scxSELECTION BAR 2 OF вводданних do form otg.scxSELECTION BAR 3 OF вводданних do form shfakt.scxSELECTION BAR 4 OF вводданних DO form prixod .. scxPOPUP редагування MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF редагування PROMPT "Відомостей про покупця" BAR 2 OF редагування PROMPT "Даних про відвантаження" BAR 3 OF редагування PROMPT "Рахунок-фактури"
DEFINE BAR 4 OF редагування PROMPT "Прихід" SELECTION BAR 1 OF редагування DO pokSELECTION BAR 2 OF редагування DO otgruzkaSELECTION BAR 3 OF редагування DO shfakSELECTION BAR 4 OF редагування DO prixodPOPUP виходнаяін MARGIN RELATIVE SHADOW COLOR SCHEME 4BAR 1 OF виходнаяін PROMPT "Рахунок-фактура" BAR 2 OF виходнаяін PROMPT "Книга продаж"
DEFINE BAR 3 OF виходнаяін PROMPT "Оборотно-сальдова відомість"
ON SELECTION BAR 1 OF виходнаяін do sh_fak.prgSELECTION BAR 2 OF виходнаяін Do kniga.prgSELECTION BAR 3 OF виходнаяін do oborotkaPOPUP сервіс MARGIN RELATIVE SHADOW COLOR SCHEME 4BAR 1 OF сервіс PROMPT "Друк" BAR 2 OF сервіс PROMPT "Перегляд документів" BAR 3 OF сервіс PROMPT "Архів" BAR 1 OF сервіс ACTIVATE POPUP печатьBAR 2 OF сервіс ACTIVATE POPUP просмотрдоSELECTION BAR 3 OF сервіс do form "form1....