Problemas com dosprint

[JuniorVaz]

Ola, criei um relatório, e fiz a impressão atraves do dosprint, ja ta funcionando certinho, mas o programa não está chamando o dosprint, eu tenho que abrir o dosprint, e depois ir no programa mandar imprimir, vou colar o codigo abaixo, gostaria que alguem podesse me ajudar...

if cs="J"
set device to print
set print to "notafisc.txt"
for i = 1 to xvias
do imp_nfj
eject
next
set device to screen
swpruncmd("dosprint.exe notafisc.txt")
exit
endif

O problema é só que o programa não abre o dosprint, eu tenho que abri-lo antes, depois iniciar o programa e fazer as impressões normalmente, gostaria de saber como faço para abri-lo automaticamente... VLW

[Dudu_XBase]

Bom eu resolvi meu problema fazendo isso...como eu gerava o arquivo depois o deletava em seguinda....debugando...eu vi q ele deletava o arquivo antes de executar o dosprint.....ai coloquei um inkey(1) ...para esperar um segundo...antes de executar o dosprint....

Código: Selecionar todos

   set printer to
   fclose("dudu.txt")
   inkeY(1)
   if (!swpruncmd("DOS_PRN.EXE " + alltrim(diskname() + ":\" + curdir() ;
		+ "\dudu.txt"),,"",""))
	     save screen
	     ? "Erro numero " + alltrim(Str(swperrmaj())) + ;
		" ao executar dosprint ! Tecle algo."
	     InKey(0)
	     restore screen
    endif
    inkeY(1)