|
Why not just scan for a number only, make sure next two digits are also numbers, then scan prior to that position for a blank (to get the start position) and after those three numbers for a blank (to get the end pos) then you have the full len of the field and take it out altogether, then scan it again in case there is a second one..... seems easier enough and you don't have to worry about spelling.... Ron Power Programmer Information Services City Of St. John's, NL P.O. Box 908 St. John's, NL A1C 5M2 709-576-8132 rpower@xxxxxxxxxx http://www.stjohns.ca/ ___________________________________________________________________________ Success is going from failure to failure without a loss of enthusiasm. - Sir Winston Churchill "Holden Tommy" <Tommy.Holden@xxxxxxxxxxxxxxxxx> Sent by: rpg400-l-bounces@xxxxxxxxxxxx 2006/01/27 03:45 PM Please respond to RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> To "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx> cc Subject RE: having to find an inv. # in a comment field :( Ouchie... Unless there is some type of uniform standard in the text entries there is no way to ensure accuracy programmatically period. Is there any way you can convince them to standardize the way they key the data? Or better yet append an invoice number field to the end of the record?? Thanks, Tommy Holden -----Original Message----- From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of steema@xxxxxxxxxxxxx Sent: Friday, January 27, 2006 1:00 PM To: RPG programming on the AS400 / iSeries Subject: **SPAM** having to find an inv. # in a comment field :( Well this is the picture. Don't ask why, but we get some info from abroad. They put invoice numbers in a comment field. The comment field can have normal comment info (not invoice number) but when there is the invoice there, I need to put this in some other work file. The len. of this comment field is 40. It is not uniform. The ways it is there are: INVOICE# XKC03J143L INVOICE # XTG05K023L INVOICE # XSC06A016L INV# XKC03G091L INV. XTC05L053L INV 5400960 INVOICES XTC05F008L AND XTC05F012L (in this case, I want to write 2 records) INVOICE XTC05F009L INVOICE #'S 2107071, 2107073 & 2107079 INVOICE #'S XSC04H008L & XTC04H021L IN addition, there are several spelling mistakes on the word Invoice, but these are not my concern ( I was thinking how to take the file, run it in Microsoft spell check, perhaps someone has done this?). Any thoughts on the coding would be appreciated. Thanks, Steve INVOICES SHIPPED AFTER COST CHANGE (an example of a real comment)
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.