|
I could think of a trigger program doing this also. Do a *READ *AFTER and have the trigger program do a ctoi (Character to Integer) or ctof (Character to Float) on each of the fields that is supposed to be numeric. For any field that is *Zero initialize the field value to 0. Then exit the trigger program. Any new numeric fields would have to be added to the trigger program though. Hmm.. coming to think of it, this could get rid of all my decimal data errors in my S36 Flat files too! Regards, Jim Langston Marco Facchinetti wrote: > > You can record the lenght of the last ds wrote on the file > and move back only the left part untill the stored lenght > thi prevent decimal error but don't clear the new fileds. > Once you write the ds again you got the new lenght. +--- | This is the RPG/400 Mailing List! | To submit a new message, send your mail to RPG400-L@midrange.com. | To subscribe to this list send email to RPG400-L-SUB@midrange.com. | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.