Does anyone see the problem with the following format?
Thank you in advance for any help...
John W Moon
127
128 format ADJRPT =
129 @<<<<<<... @>>>>> @| @<<<<<<< @<<<<<<<<<<<<<<<<<<<<<...
@<<<<<<<<<<<<<<<<<<<<<<... @>>>>>>>>>>>>>>>
130 $account_num, $adj_id, $adj_type, $adj_period,
$requested_by_name, $product_title, IFormat_num($adj_qty,6)
131 ~ ~>>> ~<<<<<<<<<<<<<<<<<<<<<...
132 $invoice_prev_num, $requested_by_email
133 @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
134 $adj_desc
135 ~ ~<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
136 $adj_desc
137 ~ ~<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<...
138 $adj_desc
139 .
140
Printing ...
01506 00970 DB System Other
1.000000 7.550000
$invoice_prev_num, $requested_by_email
Automatic system adjustment for minimum charge
$adj_desc
$adj_desc
02324 00964 CR system generated - Hos... Distrib
Mirrored Tier 3... 41.245299 0.178900
$invoice_prev_num, $requested_by_email
Ref WEB/FTP Host Services for Server SUN25
$adj_desc
$adj_desc
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
