Search found 9 matches

by srinivas
Mon Oct 09, 2006 2:34 pm
Forum: COBOL
Topic: Comp, Comp3 etc
Replies: 2
Views: 6213

Comp, Comp3 etc

Hi,

While writing a new COBOL program, how do you decide upon whether a varaible should be declared as COMP, COMP-1, COMP-2, COMP-3?
What is the basis and justification?


Regards,

Srinivas.
by srinivas
Mon Oct 09, 2006 2:21 pm
Forum: JCL
Topic: SORT query
Replies: 3
Views: 10278

SORT query

Hi, I have 3 i/p files having same header and tailer. My requirement is to copy all the three files to a single o/p with only one trailer and hearder.Pls find the below example. File1 ------ Hearder 01433435466 01213232322 04354574585 Trailer File2 ------ Header 47934739748 49574957498 57457495448 3...
by srinivas
Wed Jul 05, 2006 2:45 pm
Forum: COBOL
Topic: solve it
Replies: 10
Views: 27483

Evaluate

Hi,

It displays CASE1. Once evaluate founds any match it executes the same and skips to next statement of end-evaluate.
by srinivas
Wed May 31, 2006 3:48 pm
Forum: COBOL
Topic: Searching GDG versions
Replies: 6
Views: 13479

searching GDG versions

Sorry I misunderstood the question in diff way. Arrbee u r correct.
by srinivas
Tue May 30, 2006 3:07 pm
Forum: DB2 SQL - DB2 PROGRAMMING
Topic: Inserting NULL
Replies: 5
Views: 17601

NULL value

Hi,

Yes u r right, by moving -1 value to null-indicator we can insert null values.
by srinivas
Tue May 30, 2006 2:46 pm
Forum: JCL
Topic: Submit a JCL thru Cobol - sysout=(INTRDR,*)
Replies: 13
Views: 41148

Code for submitting jcl thru cobol

Hi, Define a file in your cobol prog as below. File-control. Select file1 assign to dd1. File section. FD file1. 01 cobol-rec. 05 rec1 pic x(80). procedure division. para1. Move '\\jobname job time,notify.....' to cobol-rec. write cobol-rec. move '\\step01 exec pgm=xxxx.....' to cobol-rec. write cob...
by srinivas
Tue May 30, 2006 2:26 pm
Forum: JCL
Topic: How many MAXIMUM Jobs can be submitted in a single JCL
Replies: 3
Views: 13473

MAX no. of JOBS in a single JCL

Hi,

There is no limit for number of JOBS in a single JCL but in one JOB MAX no. of steps u can write is 255.

Regards,

Srinivas.
by srinivas
Tue May 30, 2006 12:52 pm
Forum: COBOL
Topic: Searching GDG versions
Replies: 6
Views: 13479

gdg versions

Hi,

Yes we can do it in REXX by using outtrap function as below.

x=outtrap('stem.')
"listcat gdg ent("gdg name") all"
Do I= 9 to stem.0
say stem.i
end

The above code displays all the current versions belongs to that particular gdg. Pls let me know If you have any questions.
by srinivas
Wed Feb 08, 2006 3:54 pm
Forum: COBOL
Topic: How to get the actual storage of a cobol varibale
Replies: 2
Views: 10520

How to get the actual storage of a cobol varibale

Hi,

Im new to this group.
I have a scenario like, one varibale whose length is X(16).
Suppose if the variable has value 'IBM' means I want to get the value as 3.
Suppose if the variable has value 'MAINFRAMES' means 10 and so on......

Can anyone Pls help me regarding this.