I have a requirment where i need to read a sequencial file and compare field 1 and field 2 and if field 1 > field 2 then i need to send an email where message body should contain field1 and field2 values respectively.
I am thinking of writing a routine as below but how do i get f1 and f2 values into message body.
Code: Select all
openseq SourceFile to filevar
readseq fileline from filevar
f1=field(fileline, ",",1)
f2=field(fileline,",",2)
if f1 > f2
then
Call DSSendMail(x@abc.com,y@abc.com,Hello,server,f1 and f2 values)
closeseq rfilevar
Thanks
Nag.