If there are two copybooks which have same variables and we
are using both the copybooks in our program. will there be
an error and if i move values to the variable which copybook
varibales gets the values i move in.
Answers were Sorted based on User's Feedback
Answer / lu
you write like this :
01 Copybook1.
02 ADDRESS pic x(03).
01 Copybook2.
02 ADDRESS pic x(03).
move 'AAA' to ADDRESS OF copybook1
move 'BBB' to Address OF copybook2
never forget the 'OF'
| Is This Answer Correct ? | 17 Yes | 1 No |
Answer / arpan
Or we can use replace option with the copybook in the COBOl
PGM.
For e.g..
Copy Copybook1.
Copy Copybook2 replacing ADDRESS with ADDRESS1.
Correct me if I am wrong.
| Is This Answer Correct ? | 9 Yes | 2 No |
Answer / jagan
There won't be any error if we have similar variables in
different copybooks and use them in a same program. One
thing i would like to ensure here is before using a copybook
variable in a program , you will need to mention the name of
the copybook followed by the variable...
eg., there are 2 copybooks. RESIDENT and OFFICE and both
of them have the variable ADDRESS in it .
(i) RESIDENT
(ii) OFFICE
We need to refer them in the program by
RESIDENT-ADDRESS and OFFICE-ADDRESS.
In case any data is to be moved to these fields then you can
do it by below stmts.
MOVE PERM-ADD TO RESIDENT-ADDRESS
MOVE TEMP-ADD TO OFFICE-ADDRESS
Hence there shouldn't be any problem in referring to similar
fields in different copybooks .
| Is This Answer Correct ? | 10 Yes | 6 No |
what is redefines? where it can be effectively use for the purpose of memory utilization? give an example?
wht is the diff b/w if and evaluate stmts ?
can internal sort be applied to sort ksds files?
What is different between variable length and fixed length?
How do you code Cobol to access a parameter that has been defined in JCL?
how to fetch the record before the last record in a cobol file( its a huge file and if the key field is not known)
have in 100 records in a flat file i want to move records like 1,3,5,7,9,11,.. to Output file1 and 2,4,6,8,10,12,14 .. records moved to Output file2..Pls Provide real time answer..
I have two questions here. 1. How to read a flat file in reverse order? 2. How to read a VSAM KSDS file in reverse order? In both the cases we donot know the total number of records.
which is faster either static call or dynamic call ? and specify the reasons for it ? reply fast
wht r the advantages of 77 level number ?
study the following 01 A PIC 99V0 VALUE 5 01 B PIC 9V9 VALUE 6 01 C PIC 99V9 VALUE 2.5 01 D PIC 99 VALUE 3 COMPUTE A ROUNDED B C = A+B*C/D ON SIZE ERROR PERFORM PRINT-ERROR the comments of A.B.C after execution of the above statement are a.A=10 B=0 C=10 b.A=10 B=9.9 C=9.9 c.A=10 B=0 C=9.9 d.A=10 B=6 C=10
how do u link sub pgm to main pgm ?