Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Прблемы при печати отчетов / 1 сообщений из 1, страница 1 из 1
13.04.2007, 12:59
    #34458985
sianid
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прблемы при печати отчетов
Люди, пожалуйста подскажите!
есть программа для формирования и печати отчета
При печати на матричник (ОКИ) в конце затык принтера- пауза около 30 сек, что очень мешает.
Причем это стало при работе проги на ХР, до этого под старой виндой работало нормально!
настройти принтера- ставить в очередь и т п, программа работает давно( старая) и под разными компами и все было Ок, а счас прямо горе- и лезть что-то менять не хочется и не пойму - почему так, может есть варианты?

вот эта прога


procedure PR_KVIT
parameters ndog,dubl
private pr_dubl,tit
set device to print
set printer to kvit.txt
pr_dubl=' '
if dubl=1
pr_dubl='ДУБЛIКАТ'
endif
sele zalog
go top
locate for id_dog=ndog
sele client
locate for id_cl=zalog.id_cl
@prow()+1,5 say CHR(15)+chr(27)+chr(77)
@prow()+1,10 say ' Заповнюеться при поверненнi Заставодавцю предмета застави'
@prow()+1,10 say ' Предмет застави одержав (ла). Матерiальних, фiнансових, iнших претензiй до Заставодержателя не маю.'

@prow()+2,10 say ' ПОЗИЧАЛЬНИК/ЗАСТАВОДАВЕЦЬ/: __________________________ / П.I.Б./'+alltrim(client.f_cl)+'/ дата ______ ________2006 р.'
@prow()+1,10 say ' _______________________________________________________________________________________________________________________________________'


set device to screen
set console off
set printer to
=_FlView ('kvit.txt','N+','W') &&Посмотpеть на экpане

****Печать квитанции *************
do _PRINTKV with 'kvit.txt'

release wind picklist
deact window INZK
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Прблемы при печати отчетов / 1 сообщений из 1, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]