× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Here's a redacted source member.  It looks cryptic because it is.  That's
the main drawback to it.  The manual is available on the IBM web site.  I
have to look things up every time I use FMTDTA unless I'm just copying a
source member.  SEU will prompt FMTDTA source, but it's not as helpful as it
could be.

This defines a four position key composed of the 11th, ninth, twenty third
bytes in the file record in a 144 byte file.  I can't remember what the
details like the X in the first line mean. <g>  

  01.00      *  Sort specification

0002.00      *  Randomizes FILENAME for creating Nth selects.

0003.00      *  Sorts FILENAME

0004.00      *

0005.00      HSORTR     4A         X

0006.00      FNC  11  11

0007.00      FNC   9  10

0008.00      FNC  23  23

0009.00      FDC   1 144


> -----Original Message-----
> From: Tracy Ball [mailto:TBall@xxxxxxxxxxxxxxxx]
> Sent: Tuesday, February 25, 2003 12:25 PM
> To: RPG programming on the AS400 / iSeries
> Subject: RE: FMTDTA
> 
> 
> I have never heard of the FMTDTA command, however, just 
> looked it up.  What would a sample FMTDTA source look like?   
> I believe I have had some instances where this would have 
> simplified a process.
> 
> Tracy L. Ball
> The Jackson Group
> Sr. Programmer/Analyst 
> (317) 781-4600 ext. 3107
> 
> 
> 
> -----Original Message-----
> From: Joel Fritz [mailto:JFritz@xxxxxxxxxxxxxxxx]
> Sent: Tuesday, February 25, 2003 3:11 PM
> To: 'RPG programming on the AS400 / iSeries'
> Subject: RE: FMTDTA
> 
> 
> FMTDTA is still the easiest way to sort a file by totally 
> bizarre composite
> keys like substrings of fields.  We use it to shuffle file records for
> selecting "random" samples.  Here's a sample key that's 
> similar to one we
> use--check digit of account number, fourth position of ZIP 
> code, fifth digit
> of account number.
> 
> I'm not sure it's any faster than a sort query for sorting by 
> conventional
> keys.     
> 
> > -----Original Message-----
> > From: Booth Martin [mailto:Booth@xxxxxxxxxxxx]
> > Sent: Tuesday, February 25, 2003 11:37 AM
> > To: rpg400-l@xxxxxxxxxxxx
> > Subject: RE: FMTDTA
> > 
> > 
> > Tried and true won't leave you bruised and blue.
> >  
> > Which is fastest when there's a need?  FMTDTA still blows 
> > away the new young
> > bucks so far as I know.
> >  
> > yes, yes, the new stuff is good, no doubt about it, but lets 
> > be kind to the
> > old methods that built the empire in the first place.
> >  
> >  
> > ---------------------------------------------------------
> > Booth Martin   http://www.MartinVT.com
> > Booth@xxxxxxxxxxxx
> > ---------------------------------------------------------
> >  
> > -------Original Message-------
> >  
> > From: RPG programming on the AS400 / iSeries
> > Date: Tuesday, February 25, 2003 12:42:40
> > To: 'RPG programming on the AS400 / iSeries'
> > Subject: RE: FMTDTA
> >  
> > OPNQRYF? LFs? <g> Old school....... Now we've got SQL, Stored 
> > procedures,
> > and UDFs! <GDR>
> >  
> > Eric DeLong
> > Sally Beauty Company
> > MIS-Project Manager (BSG)
> > 940-898-7863 or ext. 1863
> >  
> >  
> >  
> > -----Original Message-----
> > From: Ric A. LuBell [mailto:rlubell@xxxxxxxxxxxxxxxxxxx]
> > Sent: Tuesday, February 25, 2003 10:55 AM
> > To: RPG programming on the AS400 / iSeries
> > Subject: RE: FMTDTA
> >  
> >  
> > Old science... use OPNQRYF instead, or build LFs as alternative.
> > Sincerely, 
> >  
> > Ric LuBell
> >  
> > -----Original Message-----
> > From: Venkatesh, Vijayendra (Cognizant) 
> > [mailto:VVijay1@xxxxxxxxxxxxxxxxx]
> > Sent: Monday, February 24, 2003 11:55 PM
> > To: rpg400-l@xxxxxxxxxxxx
> > Subject: FMTDTA
> >  
> > Hi all,
> > Can any body let me know "What FMTDTA command does" . I 
> > understand that it
> > processes series of sort spec stored in the SRCPF.
> > What does series of sort specs mean. Can you illustrate with 
> > an example
> >  
> > TIA
> > Vjiayendra
> > 
> > _______________________________________________
> > This is the RPG programming on the AS400 / iSeries (RPG400-L) 
> > mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> > 
> NOTICE:
> All e-mail sent to or from this e-mail address will be 
> received or otherwise
> recorded 
> by The Sharper Image corporate e-mail system and is subject 
> to archival, 
> monitoring, review by and/or disclosure to Sharper Image 
> security and other 
> management. This message is intended only for the use of the 
> addressee and
> may 
> contain information that is privileged and confidential. The 
> contents of
> this message 
> may contain personal views which are not the views of The 
> Sharper Image. If
> you are 
> not the intended recipient, dissemination of this communication is
> prohibited.
> 
> 
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) 
> mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
> 
> 
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) 
> mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
> 
NOTICE:
All e-mail sent to or from this e-mail address will be received or otherwise
recorded 
by The Sharper Image corporate e-mail system and is subject to archival, 
monitoring, review by and/or disclosure to Sharper Image security and other 
management. This message is intended only for the use of the addressee and
may 
contain information that is privileged and confidential. The contents of
this message 
may contain personal views which are not the views of The Sharper Image. If
you are 
not the intended recipient, dissemination of this communication is
prohibited.



As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.