× 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.



// * 'SORT EXECUTING'                                       
// LOAD #GSORT                                              
// FILE NAME-INPUT,LABEL-APCHECK                            
// FILE NAME-OUTPUT,LABEL-APCHECKS,RECORDS-?F'A,APCHECK'?   
// RUN                                                      
     HSORTR     7A        3X  64                            
     FNC   2   8                       CODE & CHECK NUMBER  
     FDC   1  64                       RECORD               
// END                                                      
 
 
Tracy, that is Sys/36 OCL.  The non-// lines are what FMTDTA looks like
today, more or less.
The H line says "I am sorting records by a 7 character work field in
Ascending order and the output record will be 64 long"
The F lines say:  FNormalsortCharacter column 2 thru 8  (comment: Code
&Check Number)
FDataoutputCharacter Column 1 thru 64   (Comment: Record)

This is pretty close.  You can also omit or include based on column values,
you can create summary records,  and you can change values.

But as everyone says, this is old stuff.  There's some nifty new stuff out
there that FMTDTA can not do. 

---------------------------------------------------------
Booth Martin   http://www.MartinVT.com
Booth@xxxxxxxxxxxx
---------------------------------------------------------
 
-------Original Message-------
 
From: RPG programming on the AS400 / iSeries
Date: Tuesday, February 25, 2003 15:37:47
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

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

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.