Thanks for all the responses. I still don't think I got it right. I am
getting gobly gook in my write file. However, when I see what is being sent
to the fwrite intrinsic, there is no gobly gook after my message body.
My fopen is fopen(sendmail_msgf_name,261,1411);
I put in writeln statements to determine if I am passing good data to the
fwrite intrinsic. Also, the message lenght of what I am passing looks good
at 105. But, when I perform a print of the write file, it increases the
size to 211 instead of the correct size of 105. I use a file equate in the
program with the following: FILE SENDMAIL.RUN=SENDMAIL.RUN.ALERTS
My question is this: using the build statement below, are my foptions and
aoptions correct?
Why does gobly gook get appended to my
message body in the write file SENDMAIL.RUN.ALERTS.
Thanks in advance....
:RUN EMAIL;LIB=P
PURGE SENDMAIL.RUN.ALERTS
BUILD SENDMAIL.RUN.ALERTS;REC=,,B;DISC=2147483647
STRLEN message_length 105
From: [log in to unmask]
To: [log in to unmask]
Ken ,You are doing a good job.
END OF PROGRAM
:LISTF SENDMAIL,2
ACCOUNT= ALERTS GROUP= RUN
FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE----
SIZE TYP EOF LIMIT R/B SECTORS #X MX
SENDMAIL 1B BA 211 2147483647 1 256 1 *
:PRINT SENDMAIL
From: [log in to unmask]
To: [log in to unmask]
Ken ,You are doing a good job. A !aa
oo yB |aIAd@ +?+?O PaI
:
-----Original Message-----
From: Ronald R Horner [mailto:[log in to unmask]]
Sent: Monday, April 23, 2001 1:00 PM
To: Born Ken
Cc: [log in to unmask]
Subject: Re: Foption and Aoptions in Files
If you go out to horner.horner.home.mindspring.com
<http://horner.horner.home.mindspring.com> . There is a page there that
will help you. Just figure out the bits you want to turn on. Select those
bits on the page. The bit you select are converted to a octal value. That
is what you use ing the FOPEN. Need help, let me know.
Later
"Born, Ken" wrote:
Is there a quick way to calculate what my Foptions and Aoptions will be in
my fopen ?
I always stumble on this part with byte positions like (14:2) domain, (13:1)
ascii/binary whether I start on the left side or right side and how it all
works.
:LISTF SENDMAIL,2
ACCOUNT= ALERTS GROUP= RUN
FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE----
SIZE TYP EOF LIMIT R/B SECTORS #X MX
SENDMAIL 80B FA 0 5000 3 0 0 *
Thanks...
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html
<http://raven.utc.edu/archives/hp3000-l.html> *
--
Ron Horner
HP3000 Systems Administrator
JCPenney Logistics
[log in to unmask]
(414) 259-2274
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|