Sorry, I am not coding just trying to understand what's going on. It critical
to get understanding.
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of rob@xxxxxxxxx
Sent: Wednesday, October 06, 2004 10:51 AM
To: Midrange Systems Technical Discussion
Subject: Re: Write statement
If you have to ask, then you're better off to convert this to
write(e) arrec;
if %error;
Select;
When %status(arrfile) = ....; // Replace status code with valid status
codes like file full or some such thing
// this error
When %status(arrfile) = x.x.x.x;
// that error
Other;
// catch all
EndSl;
EndIf;
Rob Berendt
--
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com
"Dwayne Allison" <Dwayne.Allison@xxxxxxxxx>
Sent by: midrange-l-bounces@xxxxxxxxxxxx
10/06/2004 10:42 AM
Please respond to
Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
To
"Midrange Systems Technical Discussion" <midrange-l@xxxxxxxxxxxx>
cc
Fax to
Subject
Write statement
Hello All,
What condition will cause '50' to equal '1'?
Operation Factor 2 LO
WRITE ARREC 50
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.
