-
What are the functions like c/c++ in cobol?
Senijor Mastrojani
- Oct 24th, 2006
In C/C++ you can define the function by the arguments taken and arguments returned and request an execution of function any neccessary number of times.In COBOL you simply use a PERFORM Paragraph-Name ...
techieheart
- Sep 11th, 2006
Intrinsic functions in COBOL can be coded this way:FUNCTION FunctionName(Parameters)If your installation is using LE/370 then you can access the following functions:1. Date functions: eg... CURRENT...
-
I submitted the batch job in jcl and i went to my home.the next day i came and i want to see 1- job submitted time,2- job execution time,3- cpu time, from TSO option but not into the jcl itself. Tell me TSO option for this?
rajalg05
- Apr 5th, 2009
Go to spool. Then option 1 (LOG). At the bottom you will get the total execution time. At the top yo will get the execution start time.
Vishaal
- Jun 22nd, 2006
There is no TSO option for that.Go to your spool and check for the details of the job
-
Is it possible to handle image file in COBOL only without using any third party vendor tools?
shriniv
- Jul 6th, 2007
It is very much possible to store and read images in COBOL files, using binary format. However for displaying the image, one needs to use third-party tools.
manoj
- Sep 28th, 2006
I think it is not possible to add an image using cobol prog. I have read more then 10 books on cobol but i am not getting this ans.if anyone knows , heartiest wel come.thanksmanoj
-
We have two files. and we want to write the matching records from both the files to a third file.There can be duplicate records in both the input files.
Sree
- Feb 2nd, 2007
sort the two files in assecding order.. with maching sequence take one file as master file and read the master file first and read the other file for matching compare the maching value if machval1...
-
What if Stop Run is missing in COBOL program?
Stop Run is last command in COBOL program.But if it is missing, will the program abend?
mail_mathewsonyc
- Sep 1st, 2007
"Stop Run" and "Go Back" both indicate to the program to end processing and in the latter case to transfer control to the calling program.If you dont specify either of these in you...
-
Reformat Output file
I have a file having 1000 records and each record having 8 fields, but i want to output having 1,3,5,7 fields only, then how can i achieve this criteria?
-
What if any, is the syntax error in the following piece of code 01 B PIC A(7) 02 C PIC 9(4) IF(B NUMERIC) ADD 10 TO C a.the condition in the if statement is wrong b.noting is wrong c.because C is initialised.ADD 10 TO C is wrong d.both B and C shoud have same size.
chandradutt
- Nov 20th, 2009
You are correct that it wont give any compilation or run time error but SYNTAX is definetly wrong. so the correct answer should be 'A.the condition in the if statement is wrong'
sharmilabit
- Jun 15th, 2006
ANS IS b. nothing is wrong....because it won't give any compilation or run time error. its just that the condition won't be satisfied and 10 will not be added to C and since C has not been assigned any value, nothing would be displayed. test it if u have doubt.
-
Consider the following FD FILE-1 01 REC-1 PIC X(80) ...... WORKING-STORAGE SECTION 01 W-REC PIC X(90) ........ PROCEDURE DIVISION FIRST-PARA ....... READ FILE-1 INTO W-REC AT END MOVE 1 TO EOF-FLAG which of the following is true with respect to the above? a.REC-1 will contain nothing and W-REC will contain the contains of the record read b.REC-1 and W-REC contain the same data c.syntex is invalid and error will occur d.REC-1 and W-REC must be of same size
-
-
Consider the follwoing IF condition:IF A LESS 1200 IF B GREATER 25 MOVE 47 TOC ELSE MOVE 57 TO C IF A GREATER 249 MOVE 67 TO C ELSE NEXT SENTENCE ELSE IF B LESS 67 MOVE 27 TO C What will be the value of C, when A is 137 and b is 25 (a) 27 (b) 57 (c) 67(d) none
thequestsailor
- Jun 25th, 2007
The answer is a. 27in the first if else statement the condition fulfills and it will move 57 to C and then gradually going to the 2nd loop the condition again fulfills and then it will replace the previously stored 57 and replace it by 27 as per the condition of the 2nd loop.
-
Identify the invalid dataname from the following: (a) SAVINGS-ACCOUNT (b) ANNUAL-ALLOCATION-FOR-OVERHEAD (c) SAMOUNT250 (d) 12DEMAND
-
Study the DATA DIVISION entries and the three PROCEDURE DIVISION entries given below: 01 END-OF-FILE-SWITCH PIC XXX. 88 NO-MORE-RECS VALUE "YES". 88 MORE-RECS VALUE "NO". (i) READ SAMPLE-FILE AT END MOVE "YES" TO NO-MORE-RECS. (ii) IF NO-MORE-RECS = "YES" GO TO LAST-PARA. (iii) IF NO-MORE-RECS GO TO LAST-PARA. Which are wrong? (a) (i) and (ii) (b) (ii) and (iii) (c) (i) and (iii) (d) all
gopalchand
- Nov 29th, 2009
Answer is (a)Clarification :(i) READ SAMPLE-FILE AT END MOVE "YES" TO NO-MORE-RECS.In the above statement, We can't move any information to 88 Level (This is Condit...
Karunagaran Molliya Gounder
- Dec 16th, 2006
answer is a) (i) and (ii)
-
What is wrong with the following data declaration? 01 W-DATE PIC X(6). 05 DD PIC 99. 05 MM PIC 99. 05 YY PIC 99. (a) Nothing is wrong. (b) Under W-DATE all level 05 items are having a PIC 99 but level 01 has PIC X(6). (c) PIC cant be specified for a group item. (d) DD, MM, and YY are invalid datanames.
-
Consider the following COBOL entries: 05 X PIC 99 VALUE 10. SUBTRACT 20 FROM X. The resultant value of X will be (a) 10 (b) 00 (c) compile-time error (d) none of these
-
If you were passing a table via linkage, which is preferable - a subscript or an index?
Wake up - you haven't been paying attention! It's not possible to pass an index via linkage. The index is not part of the calling programs working storage. Those of us who've made this mistake, appreciate the lesson more than others.
-
When is a scope terminator mandatory?
Scope terminators are mandatory for in-line PERFORMS and EVALUATE statements. For readability, it's recommended coding practice to always make scope terminators explicit.
ramesh4greek
- Jun 11th, 2010
The usage scope terminator exactly can get at Perform. For example if you are in Table creation, then you can use multiple paras in that one. But by In-line perform you can avoid to create multiple pa...
himanshu kaushik
- Dec 20th, 2006
In line perform & evaluate verb. in these two scope terminator is mandatory.
-
What is the need of using comp field in COBOL
mf.vannan
- Dec 22nd, 2009
1. When we want to store the datas in BINARY format.2. When we are receving the datas from the JCL. Regds,Rasipuram ManiVannan M
Avinash Sharma
- Apr 10th, 2007
We use comp field in cobol because when we want to store the data in binary form we use comp and the sign is placed in rightmost bit. c is used for +ve sign and d is used for -ve sign.
-
How do you encrypt passwords in MainFrames
richard
- Sep 16th, 2011
Can you give me an example of program c#.net that can be encrypt/decrypt password in the database.......
-
What is the diffrence between endeavor and changeman?
kiran_28
- May 26th, 2010
Change man cost more for company but time less.Endeavor saves money more but takes time to execute job more.
Dinesh
- Apr 13th, 2007
Both Endeavor and Changeman are version control tool in Mainframe where you can elevate your components into production. A pacakge can be created and stage the componets that to be elevated to prodcution.
-
How to include system time & date in the report generation in cobol programing?
mhiremath
- May 15th, 2008
Declare Working storage variable01 DISP-DATE PIC X(16).In procedure Division ... use the following code to move current date to disp-date. This will give you current date, month, day, hh,mm,ss ... MOVE FUNCTION CURRENT-DATE (1:16) TO DISP-DATEThank you,Milind
praleo
- Jul 12th, 2006
ACCEPT WS-ACCEPT-DATE FROM DATE. ACCEPT WS-ACCEPT-TIME FROM TIME.declare ws-accept-date and ws-accept-time in working-storage section
COBOL Interview Questions
Ans