Листинг 3
nPageStart = 1 ‘ номер ПЕРВОЙ страницы документа
nPageFinish = 16 ‘ номер ПОСЛЕДНЕЙ страницы документа
sPageStart = Str(nPageStart) ‘ представление номера ПЕРВОЙ страницы документа ‘ в СИМВОЛЬНОМ виде sPageFinish = Str(nPageFinish) ‘ представление номера ПОСЛЕДНЕЙ страницы документа ‘ в СИМВОЛЬНОМ виде sPagesPrint = ”” ‘ символьная строка с номерами пар страниц для каждого листа nPageMin = 0 ‘ МЕНЬШИЙ номер страницы документа в паре для печати на один лист nPageMax = 0 ‘ БОЛЬШИЙ номер страницы документа в паре для печати на один лист sPageMin = ”” ‘ символьное представление МЕНЬШЕГО номера страницы в паре sPageMax = ”” ‘ символьное представление БОЛЬШЕГО номера страницы в паре sDirIn = ”” ‘ имя каталога для записи PostScript-файла nCounter = 0 ‘ счетчик количества листов для печати
sListOfPages = ”” ‘ символьная строка со списком номеров страниц для печати sFileNamePS = ”” ‘ полное имя файла для записи в PostScript sFileNameDOC = ”” ‘ «короткое» имя документа для записи в PostScript
