• Subject: RE: Non-Join multi-PF logical file format
  • From: "Dias, Armando" <Adias@xxxxxxxxxxxxxxxxxxxx>
  • Date: Wed, 24 May 2000 10:54:12 -0400

Dear  Domenico Finucci:
 
Allow me to introduce myself.  My name is Armando G. Dias and I am a
programmer in the COBOL environment for almost 6 yrs.  In the United States,
COBOL is disappearing, because of the constant new languages coming up such
as C, C++, Java, etc.
 
Looking at your e-mail address and your name, your must be in Italy, Europe,
am I right?
 
I would like to know, if you don't mind, how's the popularity of the
programming language COBOL being used in other countries besides America
..... in your case Europe.  Is this still a very popular language  or is
COBOL 400 (COBOL on AS400) still much alive.  
 
I could not or almost impossible find text books etc. on the topics of COBOL
400 not to say COBOL.  The reason is that when IBM put the AS400 out, IBM
was gearing towards RPG 400 and now, the ILE concepts, etc. 
 
It is extremelly hard to find a job as a COBOL programmer in the AS400 arena
- because the skills are considered dead.  It is not marketable, and almost
all the major companies which uses AS400, use RPG 400 as their main
programming language.  Almost nobody has good experience in COBOL400.  How
about the same scenario in Italy?
 
Can you please share me some of your thoughts?
 
Thank you.
 
Sincerely
Armando G. Dias
(410) 706-1664 (W) 9a.m. - 4 p.m. Eastern Standard Time
 
 

-----Original Message-----
From: Finucci Domenico [mailto:finucci@fiditalia.it]
Sent: Wednesday, May 24, 2000 9:10 AM
To: 'COBOL400-L@midrange.com'
Subject: R: Non-Join multi-PF logical file format


yes, it does. 
Let's take an example and suppose we have the following LF
R    RFILE1    PFILE(PF01)
A    K    Field01
A    K    Field02

R    RFILE2    PFILE(PF02)
A    K    Field01
A    K    Field02

R    RFILE3    PFILE(PF03)
A    K    Field01
A    K    Field02
(the three PF share the same key structure ). 
 
Your Cobol program is able to read such an LF with SEQUENTIAL, DYNAMIC and
RANDOM Access as with a normal one. Remember that COBOL/400 supplies the
register variable DB-FORMAT-NAME which hosts the name of the last format
read. 
 
Let me know if it's clear enough.
Yours sincerely.
 

Domenico Finucci 

-----Messaggio originale-----
Da: David Keck [mailto:dkeck@idt.net]
Inviato: mercoledý 24 maggio 2000 17.47
A: cobol400-l@midrange.com
Oggetto: Non-Join multi-PF logical file format


Can a COBOL program work with a non-join logical file record format which
references more than one PF (more than one PF in the DDS PFILE entry) ?  I
know RPG programs can NOT compile if they reference such a file.  Thanks.


+---
| This is the COBOL/400 Mailing List!
| To submit a new message, send your mail to COBOL400-L@midrange.com.
| To subscribe to this list send email to COBOL400-L-SUB@midrange.com.
| To unsubscribe from this list send email to COBOL400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---END



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