what is the use of filler in cobol programing?
Answers were Sorted based on User's Feedback
Answer / anubhav
FILLER can be used to align numeric variables to word
boundaries for performance improvement.
When you intialize a group variable, filler fields are
unaffected. This can be used to our advantage. for example
in date fields-
Code:
01 date-fl.
05 mm pic xx.
05 filler pic x value '/'.
05 dd pic xx.
05 filler pic x value '/'.
05 yy pic xx.
By declaring this variable we need not move '/' as a
separator even if we use and initialize date-fl in program
many times.
| Is This Answer Correct ? | 50 Yes | 8 No |
Answer / vinod
filler is used when we declaring the files supose if u give
record length 80 while declaring in file rec given the size
only 60 for filling the gap of the record in to the spaces
we use the filler.
ex:
01 file1-rec.
02 file-name pic x(60).
02 filler pix x(20).
| Is This Answer Correct ? | 45 Yes | 4 No |
Answer / ganesh
in simple, for decoration purpose.... as well as for clarity
output
| Is This Answer Correct ? | 21 Yes | 9 No |
How arrays can be defined in COBOL?
What is difference between static and dynamic call in cobol?
In an array processing what is the thing that can be done by using subscripts but not by using index
What will happen if we move SPACES to numeric field and ZEROES to alphabetic field?
what are the working storage fields in BMS macro?
IF I mention stop run in CICS what happens?
How do you reference the following file formats from cobol programs?
have in 100 records in a file i want to move only matched records to one output_file1 and nonmathed records are moved to another output_file2 ... any one can provide logic code
how can we get current dat and time thru cobol pgm
how do you reference the variable unblock file formats from cobol programs
Suppose, file A has 100 records and file B has 500 records. We want to write records common to both A and B into file C and records which are present only in either A or B into another file D. What should be the logic of Cobol program to achieve this?
7 Answers Bank Of America, Mind Tree,
I have PS flat file with 14 records. I want to read from 4th to 9th record and want to write those 6 records (4th record to 9th record) to another PS file (output file). there is no key defined in the input file. I just want read a certain Consecutive records. can any one please give me the procedure division Coding for this. I have coded the below coding but the READ-PARA is performing only 1 time even though I have 14 records in my input file (i.e FILE-1): PROCEDURE DIVISION. A000-SECTION. MOVE 0 TO I. OPEN INPUT FILE-1. IF CHECK-KEY1 > 0 DISPLAY "OPEN ERROR FOR FILE-1, CODE IS:" CHECK-KEY1 END-IF. OPEN EXTEND NEWFILE-1 IF CHECK-KEY3 > 0 DISPLAY "OPEN ERROR FOR NEWFILE-1 COD IS" CHECK-KEY3 END-IF. PERFORM READ-PARA THRU EXIT-PARA UNTIL EOF-REC = 'YES'. DISPLAY " FINALLY OUT OF LOOP" CLOSE FILE-1 CLOSE NEWFILE-1 STOP RUN. READ-PARA. ADD 1 TO I READ FILE-1 AT END MOVE 'YES' TO EOF-REC IF I > 3 AND < 10 PERFORM WRITE-PARA ELSE DISPLAY "NOT IN RANGE" END-IF. EXIT-PARA. EXIT. WRITE-PARA. WRITE NEW-REC FROM FILE1-REC.