I can't seem to get my report output to look right.
Here's what I get:
Pella Se
Vendor:
Batches:
order glass error
item rbpart part batch code
-------------- ---------- ---------- ----- --------------------------------------------------
242E06508-043 7JK3STXX noinpart Q493 Add:11/02/05,No VendParts:11/08/05
242E06508-043 7JK3STXX nooutpart Q493 Add:11/02/05,No VendParts:11/08/05
242E06508-030 7JK3STXX noinpart Q493 Add:11/02/05,No VendParts:11/08/05
242E06508-030 7JK3STXX nooutprt Q493 Add:11/02/05,No VendParts:11/08/05
242E06508-033 7JK3STXX noinpart Q493 Add:11/02/05,No VendParts:11/08/05
242E06508-033 7JK3STXX nooutprt Q493 Add:11/02/05,No VendParts:11/08/05
343420309-090 7H52STXX 7940XXXX Q493 Add:11/02/05 , Error on Extract: 11/08/05
343420309-090 7H52STXX 79FBXXXX Q493 Add:11/02/05 , Error on Extract: 11/08/05
It appears to be cutting off the Header text.
Here's my code:
[FONT=r_ansi]PROCEDURE errors.ip.
message "begin errors.ip" view-as alert-box.
/*** create error file ***/
assign rpt-errors = fpsparms.data-dir + "/" + v-vendor + ".err".
output to value(rpt-errors).
display
"Pella Sequenced Glass Error Report - " + fpsparms.plant-id
+ " PLANT"
+ string(today) skip
"Vendor: " + caps(v-vendor) skip
"Batches: " + caps(v-allbatches) skip(2).
for each oiparts where index(v-allbatches,oiparts.batch-num) > 0
and oiparts.ordstat = "E" no-lock:
disp[FONT=r_ansi]
oiparts.order-item label "order"
oiparts.rbpart label "rbpart"
oiparts.part label "ordpart"
oiparts.batch-num label "batch"
oiparts.error-code label "error-code"
with width 200.
end.
output close.
Any ideas?
I'm tried using put and put unformatted, etc.
Thanks,
Jamie
[/FONT][/FONT]
Here's what I get:
Pella Se
Vendor:
Batches:
order glass error
item rbpart part batch code
-------------- ---------- ---------- ----- --------------------------------------------------
242E06508-043 7JK3STXX noinpart Q493 Add:11/02/05,No VendParts:11/08/05
242E06508-043 7JK3STXX nooutpart Q493 Add:11/02/05,No VendParts:11/08/05
242E06508-030 7JK3STXX noinpart Q493 Add:11/02/05,No VendParts:11/08/05
242E06508-030 7JK3STXX nooutprt Q493 Add:11/02/05,No VendParts:11/08/05
242E06508-033 7JK3STXX noinpart Q493 Add:11/02/05,No VendParts:11/08/05
242E06508-033 7JK3STXX nooutprt Q493 Add:11/02/05,No VendParts:11/08/05
343420309-090 7H52STXX 7940XXXX Q493 Add:11/02/05 , Error on Extract: 11/08/05
343420309-090 7H52STXX 79FBXXXX Q493 Add:11/02/05 , Error on Extract: 11/08/05
It appears to be cutting off the Header text.
Here's my code:
[FONT=r_ansi]PROCEDURE errors.ip.
message "begin errors.ip" view-as alert-box.
/*** create error file ***/
assign rpt-errors = fpsparms.data-dir + "/" + v-vendor + ".err".
output to value(rpt-errors).
display
"Pella Sequenced Glass Error Report - " + fpsparms.plant-id
+ " PLANT"
+ string(today) skip
"Vendor: " + caps(v-vendor) skip
"Batches: " + caps(v-allbatches) skip(2).
for each oiparts where index(v-allbatches,oiparts.batch-num) > 0
and oiparts.ordstat = "E" no-lock:
disp[FONT=r_ansi]
oiparts.order-item label "order"
oiparts.rbpart label "rbpart"
oiparts.part label "ordpart"
oiparts.batch-num label "batch"
oiparts.error-code label "error-code"
with width 200.
end.
output close.
Any ideas?
I'm tried using put and put unformatted, etc.
Thanks,
Jamie
[/FONT][/FONT]