завдання "sh_f.prg"
Мінлива Тип даних Призначення rCharacter (символьний) Привласнює "|" для шапки mNumeric (числовий) Для введення номера фактури a1Character (символьний) Для присвоєння реквізитів а2Character (символьний) Для присвоєння реквізитів а3Character (символьний) Для присвоєння реквізитів а4Character (символьний) Для присвоєння реквізитів К1Character (символьний) Для пошуку ІПН К2Character (символьний) Для пошуку ІПН з іншої таблиці аCharacter (символьний) Для присвоєння реквізитів
Змінні завдання "kniga.prg"
Мінлива Тип даннихПредназначеніе itogNumeric (числовий) Для підрахунку підсумків itog2Numeric (числовий) Для підрахунку підсумків itog3Numeric (числовий) Для підрахунку підсумків rCharacter (символьний) Привласнює "|"
Змінні завдання "oborotka.prg"
Мінлива Тип даннихПредназначеніе msNumeric (числовий) номер місяця g Data (датів) рік nmNumeric (числовий) дата yNumeric (числовий) для відображення суми u Numeric (числовий) для відображення різниці між y і t dNumeric (числовий ) дебет kNumeric (числовий) кредит pdNumeric (числовий) проміжний дебет pk Numeric (числовий) проміжний кредит dkNumeric (числовий) різниця між Д і К drNumeric (числовий) резултатівний дебет kr Numeric (числовий) результативний кредит tNumeric (числовий) для відображення оплати за товар vdNumeric (числовий) всього за Д vkNumeric (числовий) всього за К
Процедури програми меню
Процедура для відкриття допомоги:
PROCEDURE ins
t = "HELP.chm"/nc: windows hh.exe & t
Процедура відкриття таблиці "Відомості про покупця":
PROCEDURE pokpok.dbf TABLES ALL
Процедура відкриття таблиці "Відвантаження":
PROCEDURE otgruzkaotgruzka.dbf TABLES ALL
Процедура відкриття таблиці "Рахунок-фактура":
PROCEDURE shfaksh_fak.dbf
CLOSE TABLES ALL
Процедура відкриття таблиці "Прихід грошей":
PROCEDURE prixodprixod.dbf TABLES ALL
Процедура друку "Рахунок-фактури":
PROCEDURE sfakturPRINTSTATUS () PRINTER onsh_fak.txt TO printPRINTER off ("Печатка не можлива!", 0, "Увага!")
Процедура друку "Книги продажів":
PROCEDURE kniga
IF PRINTSTATUS () PRINTER onkniga.txt TO printPRINTER off ("Печатка не можлива!", 0, "Увага!")
Процедура друку "Оборотно-сальдової відомості":
PROCEDURE oborotPRINTSTATUS () PRINTER onvedom.txt TO printPRINTER off
MESSAGEBOX ("Печатка не можлива...