I wrote this to create a CSV file, but for some reason the lines in the resulting text file are wrapped to 133 characters
def library Fnwritecsvline(Mat Dc_Data$,Mat Dc_Data,Csvfile;___,longstring$*10000,Counter)
for Counter=1 to Udim(Mat Dc_Data$)
let longstring$(Inf:Inf)=trim$(Dc_Data$(Counter))
if counter><Udim(Mat Dc_Data$) then
let longstring$(Inf:Inf)="," !append comma if not last
end if
next Counter
for Counter=1 to Udim(Mat Dc_Data)
let longstring$(Inf:Inf)=trim$(Str$(Dc_Data(Counter)))
if Counter><Udim(Mat Dc_Data) then
let longstring$(Inf:Inf)="," !append comma if not last
end if
next Counter
print #Csvfile : longstring$
fnend
The word wrapping is turned off in the text editor. Any clues?
Post generated using Mail2Forum (http://www.mail2forum.com)
[BR_forum] PRINT word wrapping
Moderators: Susan Smith, admin, Gabriel
[BR_forum] PRINT word wrapping
Hi Mikhail,
Here is a perfect chance to use the Debugger in MyEditBR.
Start a debug process and either set a breakpoint in this function
or step into it and then using the Debug Status window check the
record length of the CSV file.
Ryan.
Mikhail Zheleznov wrote:
BR_forum mailing list
BR_forum@maillist.ads.net
http://maillist.ads.net/mailman/listinfo/br_forum
Post generated using Mail2Forum (http://www.mail2forum.com)
Here is a perfect chance to use the Debugger in MyEditBR.
Start a debug process and either set a breakpoint in this function
or step into it and then using the Debug Status window check the
record length of the CSV file.
Ryan.
Mikhail Zheleznov wrote:
_______________________________________________I wrote this to create a CSV file, but for some reason the lines in the
resulting text file are wrapped to 133 characters
def library Fnwritecsvline(Mat Dc_Data$,Mat
Dc_Data,Csvfile;___,longstring$*10000,Counter)
for Counter=1 to Udim(Mat Dc_Data$)
let longstring$(Inf:Inf)=trim$(Dc_Data$(Counter))
if counter><Udim(Mat Dc_Data$) then
let longstring$(Inf:Inf)="," !append comma if not last
end if
next Counter
for Counter=1 to Udim(Mat Dc_Data)
let longstring$(Inf:Inf)=trim$(Str$(Dc_Data(Counter)))
if Counter><Udim(Mat Dc_Data) then
let longstring$(Inf:Inf)="," !append comma if not last
end if
next Counter
print #Csvfile : longstring$
fnend
The word wrapping is turned off in the text editor. Any clues?
!DSPAM:48ecc886142951120185820!
------------------------------------------------------------------------
_______________________________________________
BR_forum mailing list
BR_forum@maillist.ads.net
http://maillist.ads.net/mailman/listinfo/br_forum
!DSPAM:48ecc886142951120185820!
BR_forum mailing list
BR_forum@maillist.ads.net
http://maillist.ads.net/mailman/listinfo/br_forum
Post generated using Mail2Forum (http://www.mail2forum.com)
[BR_forum] PRINT word wrapping
What does your open #Csvfile: line look like? Sounds like it may not have a
recl set and it's defaulting to 133... Just a guess.
-jbowman
-----Original Message-----
From: br_forum-bounces@maillist.ads.net
[mailto:br_forum-bounces@maillist.ads.net] On Behalf Of Ryan J. Mills
Sent: Wednesday, October 08, 2008 11:14 AM
To: Business Rules Forum
Subject: Re: [BR_forum] PRINT word wrapping
Hi Mikhail,
Here is a perfect chance to use the Debugger in MyEditBR.
Start a debug process and either set a breakpoint in this function or step into
it and then using the Debug Status window check the record length of the CSV
file.
Ryan.
Mikhail Zheleznov wrote:
BR_forum mailing list
BR_forum@maillist.ads.net
http://maillist.ads.net/mailman/listinfo/br_forum
_______________________________________________
BR_forum mailing list
BR_forum@maillist.ads.net
http://maillist.ads.net/mailman/listinfo/br_forum
Post generated using Mail2Forum (http://www.mail2forum.com)
recl set and it's defaulting to 133... Just a guess.
-jbowman
-----Original Message-----
From: br_forum-bounces@maillist.ads.net
[mailto:br_forum-bounces@maillist.ads.net] On Behalf Of Ryan J. Mills
Sent: Wednesday, October 08, 2008 11:14 AM
To: Business Rules Forum
Subject: Re: [BR_forum] PRINT word wrapping
Hi Mikhail,
Here is a perfect chance to use the Debugger in MyEditBR.
Start a debug process and either set a breakpoint in this function or step into
it and then using the Debug Status window check the record length of the CSV
file.
Ryan.
Mikhail Zheleznov wrote:
_______________________________________________I wrote this to create a CSV file, but for some reason the lines in
the resulting text file are wrapped to 133 characters
def library Fnwritecsvline(Mat Dc_Data$,Mat
Dc_Data,Csvfile;___,longstring$*10000,Counter)
for Counter=1 to Udim(Mat Dc_Data$)
let longstring$(Inf:Inf)=trim$(Dc_Data$(Counter))
if counter><Udim(Mat Dc_Data$) then
let longstring$(Inf:Inf)="," !append comma if not last
end if
next Counter
for Counter=1 to Udim(Mat Dc_Data)
let longstring$(Inf:Inf)=trim$(Str$(Dc_Data(Counter)))
if Counter><Udim(Mat Dc_Data) then
let longstring$(Inf:Inf)="," !append comma if not last
end if
next Counter
print #Csvfile : longstring$
fnend
The word wrapping is turned off in the text editor. Any clues?
!DSPAM:48ecc886142951120185820!
----------------------------------------------------------------------
--
_______________________________________________
BR_forum mailing list
BR_forum@maillist.ads.net
http://maillist.ads.net/mailman/listinfo/br_forum
!DSPAM:48ecc886142951120185820!
BR_forum mailing list
BR_forum@maillist.ads.net
http://maillist.ads.net/mailman/listinfo/br_forum
_______________________________________________
BR_forum mailing list
BR_forum@maillist.ads.net
http://maillist.ads.net/mailman/listinfo/br_forum
Post generated using Mail2Forum (http://www.mail2forum.com)
[BR_forum] PRINT word wrapping
You might also try adding a form statement to your print, like:
print #Csvfile,using 'form pos 1,C 10000' : longstring$
-john
-----Original Message-----
From: br_forum-bounces@maillist.ads.net
[mailto:br_forum-bounces@maillist.ads.net] On Behalf Of Ryan J. Mills
Sent: Wednesday, October 08, 2008 11:14 AM
To: Business Rules Forum
Subject: Re: [BR_forum] PRINT word wrapping
Hi Mikhail,
Here is a perfect chance to use the Debugger in MyEditBR.
Start a debug process and either set a breakpoint in this function or step into
it and then using the Debug Status window check the record length of the CSV
file.
Ryan.
Mikhail Zheleznov wrote:
BR_forum mailing list
BR_forum@maillist.ads.net
http://maillist.ads.net/mailman/listinfo/br_forum
_______________________________________________
BR_forum mailing list
BR_forum@maillist.ads.net
http://maillist.ads.net/mailman/listinfo/br_forum
Post generated using Mail2Forum (http://www.mail2forum.com)
print #Csvfile,using 'form pos 1,C 10000' : longstring$
-john
-----Original Message-----
From: br_forum-bounces@maillist.ads.net
[mailto:br_forum-bounces@maillist.ads.net] On Behalf Of Ryan J. Mills
Sent: Wednesday, October 08, 2008 11:14 AM
To: Business Rules Forum
Subject: Re: [BR_forum] PRINT word wrapping
Hi Mikhail,
Here is a perfect chance to use the Debugger in MyEditBR.
Start a debug process and either set a breakpoint in this function or step into
it and then using the Debug Status window check the record length of the CSV
file.
Ryan.
Mikhail Zheleznov wrote:
_______________________________________________I wrote this to create a CSV file, but for some reason the lines in
the resulting text file are wrapped to 133 characters
def library Fnwritecsvline(Mat Dc_Data$,Mat
Dc_Data,Csvfile;___,longstring$*10000,Counter)
for Counter=1 to Udim(Mat Dc_Data$)
let longstring$(Inf:Inf)=trim$(Dc_Data$(Counter))
if counter><Udim(Mat Dc_Data$) then
let longstring$(Inf:Inf)="," !append comma if not last
end if
next Counter
for Counter=1 to Udim(Mat Dc_Data)
let longstring$(Inf:Inf)=trim$(Str$(Dc_Data(Counter)))
if Counter><Udim(Mat Dc_Data) then
let longstring$(Inf:Inf)="," !append comma if not last
end if
next Counter
print #Csvfile : longstring$
fnend
The word wrapping is turned off in the text editor. Any clues?
!DSPAM:48ecc886142951120185820!
----------------------------------------------------------------------
--
_______________________________________________
BR_forum mailing list
BR_forum@maillist.ads.net
http://maillist.ads.net/mailman/listinfo/br_forum
!DSPAM:48ecc886142951120185820!
BR_forum mailing list
BR_forum@maillist.ads.net
http://maillist.ads.net/mailman/listinfo/br_forum
_______________________________________________
BR_forum mailing list
BR_forum@maillist.ads.net
http://maillist.ads.net/mailman/listinfo/br_forum
Post generated using Mail2Forum (http://www.mail2forum.com)
[BR_forum] PRINT word wrapping
Yeah, it was a record length issue. It's all peachy now. Thanks, Ryan!
Post generated using Mail2Forum (http://www.mail2forum.com)
Post generated using Mail2Forum (http://www.mail2forum.com)