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


  1.  Home
  2. MIDRANGE-L
  3. March 2006

Re: passing param to CL


On 22/03/2006, at 1:34 AM, rob@xxxxxxxxx wrote:
Is there anyone, who hasn't worked on a S/36 or a S/34, who uses the LDA?
When it really gets to be a hoot is when you have two applications, let's say one is from ERP vendor "A" and one is from accounting vendor "B" and 
you write interface programs between the two of them.  Too bad they all
didn't get together and come up with stringent industry standards on the 
use of LDA.  (Actually, neither package uses it either.  Just pointing
that out as a possible nightmare scenario.)
Using the LDA within a job instead of CALL/PARM just sucks if for no other reason than obscurity.
It is useful between jobs--specifically between the submitting job and the submitted job. In this case it can avoid the cause of all those appends we see with questions like "Why does my SBMJOB get junk in the parameters?". For this sort of use you don't care what may currently be in the LDA. Just save the entire LDA, replace it with whatever you need, submit the job, then restore the LDA.
Having said that I haven't used the LDA in over 10 years and would always think three times before using it. I think it is an archaic hangover from ancient systems and there are better ways of accomplishing the same goal.
Your point about different vendors clashing in their use of the LDA is accurate. I've seen it happen and at one point in the distant past had to normalise the use of the LDA between disparate vendor packages. All were really S/34 or S/36 code 'ported' to S/38--yeah right, like running code through the compiler constitutes porting. 

Regards,
Simon Coulter.
--------------------------------------------------------------------
   FlyByNight Software         AS/400 Technical Specialists

   http://www.flybynight.com.au/
   Phone: +61 3 9419 0175   Mobile: +61 0411 091 400        /"\
   Fax:   +61 3 9419 0175                                   \ /
                                                             X
                 ASCII Ribbon campaign against HTML E-Mail  / \
--------------------------------------------------------------------

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.