> > >>finish my printing work. the whole file is here:
> > >>
> > >>******* BEGIN *************
> > >>SET COMPATIBLE OFF
> > >>SET DEVICE TO PRINTER
> > >>SET PRINTER TO LPT1
> > >>??? CHR(27)+CHR(48)
> > >>??? CHR(27)+CHR(67)+CHR(68)
> > >>??? chr(27)+chr(14)
> > >>
> > >>IF !USED(sq_bq)
> > >> USE sq_bq
> > >> ELSE
> > >> select sq_bq
> > >>ENDIF
> > >>
> > >>max_line_NUM=20
> > >>page_no=1
> > >>go top
> > >>do while .not.eof()
> > >> line_no=6
> > >> @2,0 say "
>
> > ·ç ±© ³± ±í"
> > >> @4,0 say
> >
>
"©°©¤©¤©¤©¤©Ð©¤©¤©¤©¤©Ð©¤©¤©¤©¤©Ð©¤©¤©¤©Ð©¤©¤©¤©Ð©¤©¤©¤©¤©¤©¤©Ð©¤©¤©¤©Ð©¤©¤©
>
>
>
> > ¤©Ð©¤©¤©¤©¤©Ð©¤©¤©¤©¤©´"
> > >> @5,0 say "©¦ Õ¾ ºÅ ©¦ Õ¾ Ãû ©¦ ºÓ Ãû ©¦
Ê¡
>
> > ©¦µØ¡¢ÊЩ¦ ʱ ¼ä ©¦ ³±Î» ©¦ Æøѹ ©¦ÈÕ¾ù¸ß³±©¦ÈÕ¾ùµÍ³±©¦"
> > >> do while line_no<=2*max_line_num+5)
> > >> if eof()
> > >> @line_no,0 say
> >
>
"©À©¤©¤©¤©¤©à©¤©¤©¤©¤©à©¤©¤©¤©¤©à©¤©¤©¤©à©¤©¤©¤©à©¤©¤©¤©¤©¤©¤©à©¤©¤©¤©à©¤©¤©
>
>
>
> > ¤©à©¤©¤©¤©¤©à©¤©¤©¤©¤©È"
> > >> @line_no+1,0 say "©¦ ©¦ ©¦ ©¦
>
> > ©¦ ©¦ ©¦ ©¦ ©¦ ©¦ ©¦"
> > >> else
> > >> @line_no,0 say
> >
>
"©À©¤©¤©¤©¤©à©¤©¤©¤©¤©à©¤©¤©¤©¤©à©¤©¤©¤©à©¤©¤©¤©à©¤©¤©¤©¤©¤©¤©à©¤©¤©¤©à©¤©¤©
>
>
>
> > ¤©à©¤©¤©¤©¤©à©¤©¤©¤©¤©È"
> > >> @line_no+1,0 say "©¦"+stcd+"©¦" +zm+ "©¦" +hl+
> > "©¦"+sm+"©¦"+dd+"©¦"
> >
>
+ymdhm+"©¦"+str(zt,6,3)+"©¦"+str(p,6)+"©¦"+str(dayhz,8,3)+"©¦"+str(daylz,8,3
>
>
>
> > )+"©¦"
> > >> endif
> > >> line_no=line_no+2
> > >> if .not.eof()
> > >> skip
> > >> endif
> > >> enddo
> > >> @line_no,0 say
> >
>
"©¸©¤©¤©¤©¤©Ø©¤©¤©¤©¤©Ø©¤©¤©¤©¤©Ø©¤©¤©¤©Ø©¤©¤©¤©Ø©¤©¤©¤©¤©¤©¤©Ø©¤©¤©¤©Ø©¤©¤©
>
>
>
> > ¤©Ø©¤©¤©¤©¤©Ø©¤©¤©¤©¤©¼"
> > >> @line_no+1,60 say "µÚ"+str(page_no,2)+"Ò³"
> > >> page_no=page_no+1
> > >> eject page
> > >>enddo
> > >>??? CHR(27)+CHR(64)
> > >>SET DEVICE TO SCREEN
> > >>SET COMPATIBLE ON
> > >>CLEAR
> > >>RETURN
> > >>*************** THE END ********************
> > >>
> > >>When I run the program, the printer begin to print the table,but it
> never
> > print the last line and the page number of the last page. So the report
> is
> > not entire! I don't know how to solve the problem.
> > >> wait your help.
> >
>
i have tried your code again,i works,and I pass your report to you without
your table in last letter, I insert a text file for your report named
"demo.txt"
behind my back letter, perhaps they don't like what i do as it, so this
file has
cuted.
if you need it ,please give me e-mail direct, I will post it to you,and you
can give
your table to me, i will try again.
joseph
--------------------------------------------------------------------
Best regards,
f.joseph
xinjiang electric power company
Tele : 86-0991-2920415
E-Mail :
net0040@public.wl.xj.cnmail address: jian she lu st. 10
urumqi,xinjiang province,republic of china
zip: 830002
--------------------------------------------------------------------