MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Search found 70 matches
MVSFORUMS.com Forum Index
Author Message
  Topic: Cobol between
shuko

Replies: 5
Views: 4409

PostForum: Application Programming   Posted: Fri Apr 18, 2014 5:23 am   Subject: Cobol between
Thank you Kolusu
I did it like this as I read somewhere that a SEARCH is faster than a PERFORM varying. Maybe for a small table it does not make a difference.


SET Ridx TO 1
SEARCH sX5nC1
...
  Topic: Cobol between
shuko

Replies: 5
Views: 4409

PostForum: Application Programming   Posted: Thu Apr 17, 2014 9:11 am   Subject: Cobol between
Hello
What I am trying to do is to get the amount from the internal table
if input year is a between nDevYrFrom and nDevyrTo.

if the input nDevYr = 10 for example, I should get the amount 300 an ...
  Topic: ICE083A D RESOURCES WERE UNAVAILABLE FOR DYNAMIC ALLOCATION
shuko

Replies: 3
Views: 6857

PostForum: Utilities   Posted: Tue Sep 28, 2010 9:14 am   Subject: ICE083A D RESOURCES WERE UNAVAILABLE FOR DYNAMIC ALLOCATION
Manged to sort with the following statements. Files were defined with LRECL=516, but the max record length in the file was just 113.


OPTION DYNALLOC=(,00100),FILSZ=E1173857154,AVGRLEN=11 ...
  Topic: ICE083A D RESOURCES WERE UNAVAILABLE FOR DYNAMIC ALLOCATION
shuko

Replies: 3
Views: 6857

PostForum: Utilities   Posted: Tue Sep 28, 2010 3:49 am   Subject: ICE083A D RESOURCES WERE UNAVAILABLE FOR DYNAMIC ALLOCATION
The JCL messatges


13.42.22 J0414943 ---- MONDAY, 27 SEP 2010 ----
13.42.22 J0414943 IEF677I WARNING MESSAGE(S ...
  Topic: ICE083A D RESOURCES WERE UNAVAILABLE FOR DYNAMIC ALLOCATION
shuko

Replies: 3
Views: 6857

PostForum: Utilities   Posted: Tue Sep 28, 2010 12:33 am   Subject: ICE083A D RESOURCES WERE UNAVAILABLE FOR DYNAMIC ALLOCATION
I am trying to sort large volume of data and keep getting the following error. What can I do different to get my sort through? Any tips would be great.



ICE805I 1 JOBNAME: G11252T5 , STEPNA ...
  Topic: COBOL compare two internal tables
shuko

Replies: 9
Views: 9289

PostForum: Application Programming   Posted: Sun Nov 16, 2008 7:27 am   Subject: COBOL compare two internal tables
I have a solution now. I search the contents of table1 with Table2 and vice versa and set the flag accordingly.

Thank you
  Topic: COBOL compare two internal tables
shuko

Replies: 9
Views: 9289

PostForum: Application Programming   Posted: Fri Nov 14, 2008 2:23 am   Subject: COBOL compare two internal tables
The information for these two tables are got from two seperate Modules
in the main program. The main program has to do this comparison and reach a decision.
  Topic: COBOL compare two internal tables
shuko

Replies: 9
Views: 9289

PostForum: Application Programming   Posted: Thu Nov 13, 2008 9:32 am   Subject: COBOL compare two internal tables
I would consider your example to be the same. I have a few examples here

Example 1


Table1

Name Value
-----------------------
Bill XY
John YZ
...
  Topic: COBOL compare two internal tables
shuko

Replies: 9
Views: 9289

PostForum: Application Programming   Posted: Thu Nov 13, 2008 5:07 am   Subject: COBOL compare two internal tables
To set the flag to Y when the Tab1Count and the Tab2Count are the same is easy.

It could be possible that the Tab1Count and Tab2count are the same but the Name and/or values are different or the Ta ...
  Topic: COBOL compare two internal tables
shuko

Replies: 9
Views: 9289

PostForum: Application Programming   Posted: Wed Nov 12, 2008 3:11 pm   Subject: COBOL compare two internal tables
Hello

I have two internal tables and I want to compare these two tables
If the name and value in both the tables and the Tab1Count and Tab2Count are also the same then set Flag = Y.

If Table 1 ...
  Topic: Insert new record in a detail record based on a condition
shuko

Replies: 4
Views: 2820

PostForum: Utilities   Posted: Mon Jun 02, 2008 12:50 pm   Subject: Insert new record in a detail record based on a condition
Thank you Kolusu.

Shuko
  Topic: Insert new record in a detail record based on a condition
shuko

Replies: 4
Views: 2820

PostForum: Utilities   Posted: Mon Jun 02, 2008 1:47 am   Subject: Insert new record in a detail record based on a condition
Thank you kolusu. I just had to make a few changes and the code worked as expected.


IFTHEN=(WHEN=(2,9,CH,EQ,C'WS-TITLE'),
BUILD=(01,80,/,1:C'2',53,6,34&# ...
  Topic: Insert new record in a detail record based on a condition
shuko

Replies: 4
Views: 2820

PostForum: Utilities   Posted: Wed May 28, 2008 3:49 am   Subject: Insert new record in a detail record based on a condition
I have a file with header and detail records. The header records always starts with 1 in postion 1 and detail records with 2 in position 2.
The file is FB with LRECL=68.

Example of a file with he ...
  Topic: Insert a new record in a detail record based on a condition.
shuko

Replies: 0
Views: 974

PostForum: Utilities   Posted: Tue May 27, 2008 7:22 am   Subject: Insert a new record in a detail record based on a condition.
I have a file with header and detail records.
The header records always starts with 1 in postion 1 and detail records with 2 in position 2. The file is FB with LRECL=68.

Example of a file with ...
  Topic: Add some values to existing records in a specific column
shuko

Replies: 8
Views: 3128

PostForum: Utilities   Posted: Thu Jan 24, 2008 1:51 am   Subject: Add some values to existing records in a specific column
Thank you very much Frank,works as expected.

Shuko
 
Page 1 of 5 Goto page 1, 2, 3, 4, 5  Next
All times are GMT - 5 Hours
Jump to:  


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group