Hi. It is possible to do it the way you suggest. The 'VALUE'-clause in this context, only gives the variable an initial value when the program is loaded into memeory for execution. Later on, in the pgm, the variable can be given different values, and can be tested on in various ways. Mvh. Geir Kildal. -----Original Message----- From: cobol400-l-bounces@xxxxxxxxxxxx [mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of Santhamurthy_Veeraraghavan Sent: 26. august 2005 13:46 To: cobol400-l@xxxxxxxxxxxx Subject: [COBOL400-L] VALUE CLAUSE in working storage Hi, Is it possible to have the VALUES as '0 thru 99' for a variable in working storage and check for a condition in procedure division? Kindly clarify? Working-storage section. 77 VAR1 PIC 9(2) VALUES 0 THRU 99 Procedure division. . . . If var1 = 34 ...statemetns.. Endif Thanks & Regards, Santha DISCLAIMER: This email (including any attachments) is intended for the sole use of the intended recipient/s and may contain material that is CONFIDENTIAL AND PRIVATE COMPANY INFORMATION. Any review or reliance by others or copying or distribution or forwarding of any or all of the contents in this message is STRICTLY PROHIBITED. If you are not the intended recipient, please contact the sender by email and delete all copies; your cooperation in this regard is appreciated. -- This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing list To post a message email: COBOL400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/mailman/listinfo/cobol400-l or email: COBOL400-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/cobol400-l.
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.