Interested to Buy Any Domain ? << Click Here >> for more details...
what is the use of filler in cobol programing?
- 4 Answers
- 39417 Views
- MAT, I also Faced
- E-Mail Answers
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 |
Have you used the sort in your project?for this type of questions any working on real time project give the eg. with real time scenario.
What are the various section in data division and briefly explain them.
here is my compile and link edit steps in a jcl //COMPILE1 JOB (3CUS,S),'CCDM TEST' //STEPNAME EXEC PGM=IGYCRCTL,PARM='DYNAM,RENT,LIB,OBJECT, // OFFSET,APOST,OPTIMIZE',REGION=4096K //STEPLIB DD DSNAME=PM7351.TEST2.COB,DISP=SHR //SYSIN DD DSNAME=PM7351.TEST2.COB(PGM1),DISP=SHR //SYSUT1 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT2 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT3 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT4 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT5 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT6 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT7 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSPRINT DD SYSOUT=* //SYSLIN DD DSNAME=&&LOAD,DISP=(MOD,PASS),UNIT=SYSDA, // SPACE=(10,(10,10)),DCB=BLKSIZE=400 //LKED EXEC PGM=IEWL,REGION=1024K //SYSPRINT DD SYSOUT=A //SYSLIB DD DSN=PM7351.TEST2.LOADLIB,DISP=SHR // DD DSN=PM7351.TEST2.COB(PGM1),DISP=SHR //SYSLMOD DD DSN=PM7351.TEST2.LOADLIB, // DISP=SHR //SYSUT1 DD UNIT=SYSDA,DCB=BLKSIZE=1024,SPACE=(CYL,(1,1)) //SYSTERM DD SYSOUT=* //SYSLIN DD DSN=&&LOAD,DISP=(OLD,DELETE) //SYSIN DD DUMMY i am getting IEW2013I 0F08 NO MEMBER NAME WAS SPECIFIED. MODULE WAS SAVED USING TEMPNAM1. could any one tell me the resolution for this..?
What will happen if you code GO BACK instead of STOP RUN in a stand alone COBOL program ?
8 Answers Arigo Infotech, IBM,
What is Static,Dynamic linking ?
What is 66 level number and where it is used in real time by software developers?
2 Answers ITC Indian Tobacco Company, TCS,
How to delete leading spaces/blank in COBOL ? Example:- 01 data-name-1 pic x(220) " English is a language". I would like to delete leading spaces.
what are the control characters used in reports
There are 5 fields and 1000 records in a file. Unload it into an array. Write the syntax for declaration and how will you unload it.
can we declare occurs in 01 level?
I hav vari declaration like..... 77 a pic s9(9).99. 77 b pic s9(9).99 comp. 77 c pic s9(9).99 comp-3. if i use MOVE 123456789.99 to a,b,c what happen every one working fine ?
How many times the loop runs here 01 a pic 9(2) value 1. perform para1 until a=10 move 1 to a. stop run. para1: move 10 to a.
COBOL 
