|
Today's Topics: 1. Cobol Source Editor in PC (Sivasubrahmanian Ananthakrishnan) 2. Setting File pointer using Partial Keys (Ravi Prasanna Annasagara Nagarajan) 3. R: Setting File pointer using Partial Keys (Finucci Domenico) 4. Setting File pointer using Partial Keys (Finucci Domenico) 5. RE: Cobol Source Editor in PC (Jon Paris) 6. RE: Cobol Source Editor in PC (Sivasubrahmanian Ananthakrishnan) 7. Obtaining the record length of a file using a CL command(Dana Petrucelli) --__--__-- Message: 1 From: "Sivasubrahmanian Ananthakrishnan" <sivasubrahmanian.ananthakrishnan@wipro.com> To: <cobol400-l@midrange.com> Subject: Cobol Source Editor in PC Date: Fri, 6 Sep 2002 12:19:08 +0530 Organization: Wipro Technologies Reply-To: cobol400-l@midrange.com This is a multi-part message in MIME format. -- Hi all Any of you, use a Cobol/400 source editor in PC? Please suggest some good free / shareware version of Cobol/400 source code editor for PC. I think, CODE/400 supports my requirement. But, we don't have CODE/400 with us. Thanks & Regards Siva -- **************************Disclaimer************************************ Information contained in this E-MAIL being proprietary to Wipro Limited is 'privileged' and 'confidential' and intended for use only by the individual or entity to which it is addressed. You are notified that any use, copying or dissemination of the information contained in the E-MAIL in any manner whatsoever is strictly prohibited. *************************************************************************** --__--__-- Message: 2 From: "Ravi Prasanna Annasagara Nagarajan" <ravi.annasagara@wipro.com> To: <cobol400-l@midrange.com> Subject: Setting File pointer using Partial Keys Date: Fri, 6 Sep 2002 14:12:32 +0530 Organization: Wipro Technologies Ltd Reply-To: cobol400-l@midrange.com This is a multi-part message in MIME format. -- -- [ Picked text/plain from multipart/alternative ] Hello, Using Start statement, can we position the file pointer if we have values for a part of the key. For example If an Employee file has 3 keys say Dept number, Section number and Employee number, using just the Dept number can we position the file at the specified Dept number even though Section number and Employee number are not specified? Move 10 to Dept-number Start Employee File Key is equal to Dept-number Invalid key ----- Not invalid key ----- End-Start. I have tried this but it seems to fail. In RPG, we can actually do a Chain to the file with partial keys, so is there a provision for that in Cobol? Any thoughts on this issue would be very helpful? Many thanks in advance. Regards, Ravi Prasanna A.N. Wipro Technologies Ltd., mailto:ravi.annasagara@wipro.com -- -- **************************Disclaimer************************************ Information contained in this E-MAIL being proprietary to Wipro Limited is 'privileged' and 'confidential' and intended for use only by the individual or entity to which it is addressed. You are notified that any use, copying or dissemination of the information contained in the E-MAIL in any manner whatsoever is strictly prohibited. *************************************************************************** -- --__--__-- Message: 3 From: Finucci Domenico <Domenico.Finucci@Fiditalia.it> To: "'cobol400-l@midrange.com'" <cobol400-l@midrange.com> Subject: R: Setting File pointer using Partial Keys Date: Fri, 6 Sep 2002 10:55:05 +0200 Reply-To: cobol400-l@midrange.com This is exactly what START does. In an AS/400 fashion: initialize key-a key-b key-c move Dept to key-a START EmpFile Key NOT LESS externally-described-key You will get a 23 if no "Dept" exists, otherwise issuing a READ NEXT will get the first record having "Dept" in its key. Sincerely. Domenico Finucci Fiditalia , Milano, 02- 4301-2494 -----Messaggio originale----- Da: Ravi Prasanna Annasagara Nagarajan [mailto:ravi.annasagara@wipro.com] Inviato: venerd=EC 6 settembre 2002 10.43 A: cobol400-l@midrange.com Oggetto: Setting File pointer using Partial Keys This is a multi-part message in MIME format. -- -- [ Picked text/plain from multipart/alternative ] Hello, Using Start statement, can we position the file pointer if we have values for a part of the key. For example If an Employee file has 3 keys say Dept number, Section number and Employee number, using just the Dept number can we position the file at the specified Dept number even though Section number and Employee number are not specified? Move 10 to Dept-number Start Employee File Key is equal to Dept-number Invalid key ----- Not invalid key ----- End-Start. I have tried this but it seems to fail. In RPG, we can actually do a Chain to the file with partial keys, so is there a provision for that in Cobol? Any thoughts on this issue would be very helpful? Many thanks in advance. Regards, Ravi Prasanna A.N. Wipro Technologies Ltd., mailto:ravi.annasagara@wipro.com -- -- **************************Disclaimer************************************ Information contained in this E-MAIL being proprietary to Wipro Limited is 'privileged' and 'confidential' and intended for use only by the individual or entity to which it is addressed. You are notified that any use, copying or dissemination of the information contained in the E-MAIL in any manner whatsoever is strictly prohibited. *************************************************************************** -- _______________________________________________ This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing list To post a message email: COBOL400-L@midrange.com To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/cgi-bin/listinfo/cobol400-l or email: COBOL400-L-request@midrange.com Before posting, please take a moment to review the archives at http://archive.midrange.com/cobol400-l. --__--__-- Message: 4 From: Finucci Domenico <Domenico.Finucci@Fiditalia.it> To: "'cobol400-l@midrange.com'" <cobol400-l@midrange.com> Subject: Setting File pointer using Partial Keys Date: Fri, 6 Sep 2002 10:56:30 +0200 Reply-To: cobol400-l@midrange.com Don't forget to declare ACCESS DYNAMIC, organisation INDEXED. Sincerely Domenico Finucci Fiditalia , Milano, 02- 4301-2494 -----Messaggio originale----- Da: Ravi Prasanna Annasagara Nagarajan [mailto:ravi.annasagara@wipro.com] Inviato: venerd=EC 6 settembre 2002 10.43 A: cobol400-l@midrange.com Oggetto: Setting File pointer using Partial Keys This is a multi-part message in MIME format. -- -- [ Picked text/plain from multipart/alternative ] Hello, Using Start statement, can we position the file pointer if we have values for a part of the key. For example If an Employee file has 3 keys say Dept number, Section number and Employee number, using just the Dept number can we position the file at the specified Dept number even though Section number and Employee number are not specified? Move 10 to Dept-number Start Employee File Key is equal to Dept-number Invalid key ----- Not invalid key ----- End-Start. I have tried this but it seems to fail. In RPG, we can actually do a Chain to the file with partial keys, so is there a provision for that in Cobol? Any thoughts on this issue would be very helpful? Many thanks in advance. Regards, Ravi Prasanna A.N. Wipro Technologies Ltd., mailto:ravi.annasagara@wipro.com -- -- **************************Disclaimer************************************ Information contained in this E-MAIL being proprietary to Wipro Limited is 'privileged' and 'confidential' and intended for use only by the individual or entity to which it is addressed. You are notified that any use, copying or dissemination of the information contained in the E-MAIL in any manner whatsoever is strictly prohibited. *************************************************************************** -- _______________________________________________ This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing list To post a message email: COBOL400-L@midrange.com To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/cgi-bin/listinfo/cobol400-l or email: COBOL400-L-request@midrange.com Before posting, please take a moment to review the archives at http://archive.midrange.com/cobol400-l. --__--__-- Message: 5 From: "Jon Paris" <Jon.Paris@Partner400.com> To: <cobol400-l@midrange.com> Subject: RE: Cobol Source Editor in PC Date: Fri, 6 Sep 2002 09:38:53 -0400 Reply-To: cobol400-l@midrange.com >> But, we don't have CODE/400 with us. Why not? If you are using any release V4R5 or later, then you "own" a license to Code/400. Jon Paris Partner400 --__--__-- Message: 6 From: "Sivasubrahmanian Ananthakrishnan" <sivasubrahmanian.ananthakrishnan@wipro.com> To: <cobol400-l@midrange.com> Subject: RE: Cobol Source Editor in PC Date: Fri, 6 Sep 2002 22:12:53 +0530 Organization: Wipro Technologies Reply-To: cobol400-l@midrange.com This is a multi-part message in MIME format. -- Hi Jon Yeah... We have the CODE/400 installed. I am new to CODE/400. Is there some reference on how to use that? Do I need to start with STRCODE command? I'm not sure what parameters should be associated to this command. Please help me. Thanks & Regards Sivasubrahmanian. A Project Engineer Wipro Technologies (Finance & Insurance) Electronics City, Bangalore, India Phone - 8520408/8520416 x - 4364. -----Original Message----- From: cobol400-l-admin@midrange.com [mailto:cobol400-l-admin@midrange.com] On Behalf Of Jon Paris Sent: Friday, September 06, 2002 7:09 PM To: cobol400-l@midrange.com Subject: RE: Cobol Source Editor in PC >> But, we don't have CODE/400 with us. Why not? If you are using any release V4R5 or later, then you "own" a license to Code/400. Jon Paris Partner400 7. Hi all. This is not a Cobol question, but, does anyone know the CL command that obtains a physical files' record length, for example, CHKOBJ, which, I don't think supplies that kind of info. Thanks, D. petrucelli. _______________________________________________ This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing list To post a message email: COBOL400-L@midrange.com To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/cgi-bin/listinfo/cobol400-l or email: COBOL400-L-request@midrange.com Before posting, please take a moment to review the archives at http://archive.midrange.com/cobol400-l. -- **************************Disclaimer************************************ Information contained in this E-MAIL being proprietary to Wipro Limited is 'privileged' and 'confidential' and intended for use only by the individual or entity to which it is addressed. You are notified that any use, copying or dissemination of the information contained in the E-MAIL in any manner whatsoever is strictly prohibited. *************************************************************************** --__--__-- _______________________________________________ This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) digest list To post a message email: COBOL400-L@midrange.com To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/cgi-bin/listinfo/cobol400-l or email: COBOL400-L-request@midrange.com Before posting, please take a moment to review the archives at http://archive.midrange.com/cobol400-l. End of COBOL400-L Digest **************Internet Email Confidentiality Footer************** Privileged/Confidential Information may be contained in this message. If you are not the addressee indicated in this message (or responsible for delivery of the message to such person), you may not copy or deliver this message to anyone. In such case, you should destroy this message and kindly notify the sender by reply email. Please advise immediately if you or your employer do not consent to Internet email for messages of this kind. Opinions, conclusions and other information in this message that do not relate to the official business of HSS, Inc. shall be understood as neither given nor endorsed by it.
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.
midrange.com
