Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Inserting a Formfeed into Capture

Status
Not open for further replies.

hankm3

Programmer
Jan 27, 2002
284
US
Hi,
Wondering if anyone has ever this. I access a Database and collect some Text Forms into a Capture File. I need to insert a Formfeed Character between Database Queries. I tried Termwrite "`f" but when I print out the Capture File I see the `f but no Formfeed.

Any Ideas ?? I'm using a HP Laser Printer and Quickview Plus.

Thanks
 
Skip this, Brain to keyboard Error. Wish my browser had a Un-Send Key...

Thank
 
Just for Info, this was the solution. Afterwards Quickview Saw the FormFeeds and printed out fine.

proc main
string sLine
string szName="INQ.cap" ; Create a Name for the Capture File
;clear ; Clear the Procomm Screen
set capture overwrite on ; Overwrite Existing INQ.cap File
set capture query off ; Do Not Request Query of File Name
set capture file szName ; Set the Capture File Name
Capture on ; Turn On the Capture File (Open)
fopen 1 "C:\TEXT FILES\numbers.txt" READ
while not feof 1 ; 1 = Fopen File ID. Number
fgets 1 sLine ; 1 = Fopen # sLine = TN Number String
Transmit "^M" ; Send a Carriage Return to FOMS System
Waitfor "[HF]FCR%" ; Prompt: Wire Center for Test Office
clear
capturestr "`f" ; Send FormFeed to Capture File
Transmit "INQ^M" ; Start INQ Process
Waitfor "_" ; FOMS System Prompt
Transmit "H TN " ; INQ ( Looking for TN )
Transmit sLine ; Transmit TN From Number.txt
Transmit "^M" ; Send a Carriage Return
Waitfor "_" ; FOMS System Prompt
Transmit ".^M" ; Send a Period and a Carriage Return
Pause 10 ; Pause 10 Seconds between INQ's
;clear ; Clear the Screen after Each INQ
endwhile ; End the While Loop
fclose 1 ; Close the Open FOPEN 1 File
capture off ; Turn Off the Capture File (Close)
Transmit "^M" ; Send a Carriage Return to FOMS
Waitfor "[HF]FCR%"
usermsg "Done with INQ" ; Open Alert Window when Finished
endproc
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top