Author |
Message |
Topic: data layer, architecture, idms and transactions |
vkrishna2001
Replies: 2
Views: 1752
|
Forum: Application Programming Posted: Mon Mar 14, 2005 3:16 am Subject: data layer, architecture, idms and transactions |
Hi Crox,
Is it the online transaction system that you are describing or batch? What are programming languages used?
Regards,
Vijay |
Topic: Right justifying alpha numeric data |
vkrishna2001
Replies: 8
Views: 11550
|
Forum: Application Programming Posted: Mon Mar 07, 2005 11:25 am Subject: Right justifying alpha numeric data |
Hi Kolusu,
When I compile the code I receive the following error messages
IGYPS2121-S "FUNCTION" was not defined as a data-name. The statement was discarded.
"REVERSE" was found in the ... |
Topic: Right justifying alpha numeric data |
vkrishna2001
Replies: 8
Views: 11550
|
Forum: Application Programming Posted: Mon Mar 07, 2005 10:30 am Subject: Right justifying alpha numeric data |
Hi Kolusu,
In the application program I need to right justify 17 byte alphanumeric data.
Sample input is
1H9651216T1011003
1GDG6H1P6MJ520593
2081
1A9AU4036YP463004
1A9AU4031YP4630 ... |
Topic: Right justifying alpha numeric data |
vkrishna2001
Replies: 8
Views: 11550
|
Forum: Application Programming Posted: Fri Mar 04, 2005 4:50 am Subject: Right justifying alpha numeric data |
We have VS Cobol II Release 4.0 on mainframe. Though this compiler accepts defining a alpha numeric data item as right justified in the data division it does not right justify a value in the procedur ... |
Topic: OLQ query with dbkey |
vkrishna2001
Replies: 1
Views: 1498
|
Forum: Database Posted: Wed Sep 01, 2004 9:55 am Subject: OLQ query with dbkey |
Ayush,
Use the command
OBT RECORD NAME WHE DBKEY= page number : line number
Also the command
HELP COMMANDS
can provide you the SYNTAX details
Regards,
Vijay |
Topic: Totalling an amount field value. |
vkrishna2001
Replies: 1
Views: 1508
|
Forum: Utilities Posted: Wed Sep 01, 2004 9:11 am Subject: Totalling an amount field value. |
Hi
I have a input file with the layout mentioned below
01 INPUT-RECORD.
05 INPUT-TEXT PIC X(10).
05 INPUT-AMOUNT PIC -9(13).9(2).
I nee ... |
Topic: Help Needed for DB-Key in IDMS |
vkrishna2001
Replies: 5
Views: 6435
|
Forum: Database Posted: Thu Aug 05, 2004 9:07 am Subject: Help Needed for DB-Key in IDMS |
Ayush,
In the Cobol application program if you are trying to obtain a record instance with DBKEY the data item which has DBKEY should have picture clause of S9(08 ) COMP. In Easytrieve it s ... |
Topic: Help Needed for DB-Key in IDMS |
vkrishna2001
Replies: 5
Views: 6435
|
Forum: Database Posted: Wed Aug 04, 2004 8:34 pm Subject: Help Needed for DB-Key in IDMS |
Ayush,
To get the page number Divide 780810305 by 256.
780810305 / 256 = 3050040.25390625
Page number is 3050040
To get line number multiply fraction with 256
.25390625 *256 = 65 ... |
Topic: Connnect Direct for UNIX reference manual |
vkrishna2001
Replies: 1
Views: 2113
|
Forum: Other Technical Topics Posted: Sat Jul 31, 2004 3:49 pm Subject: Connnect Direct for UNIX reference manual |
Hi,
Probably this is not the right forum to post this question. I remember that long time back URL for reference manual for Connect Direct on MVS was provided. Is there a site where the sam ... |
Topic: Parallel to ICETOOL in SYNCSORT |
vkrishna2001
Replies: 3
Views: 2518
|
Forum: Utilities Posted: Thu May 20, 2004 4:48 pm Subject: Parallel to ICETOOL in SYNCSORT |
Taurian,
It is easy to do it in Cobol or Easytrieve if the records in both the files are sorted in either ascending or descending order of the key. If you have Focus at your shop the same can ... |
Topic: ADSO screen abort |
vkrishna2001
Replies: 4
Views: 5634
|
Forum: Problem Determination Posted: Thu May 20, 2004 4:40 pm Subject: ADSO screen abort |
Solitude Bliss,
You can run ADSO report on the dialog in test region to find the sequence number and instruction that caused the abend.
Vijay |
Topic: Eqvivalent field in Easytrieve PLUS |
vkrishna2001
Replies: 2
Views: 2213
|
Forum: Application Programming Posted: Thu May 20, 2004 4:23 pm Subject: Eqvivalent field in Easytrieve PLUS |
Kolusu,
Thanks for confirming this. I was trying to rewrite a Cobol program in Easytrieve. The Cobol program writes a file and record has this field.
Vijay |
Topic: Eqvivalent field in Easytrieve PLUS |
vkrishna2001
Replies: 2
Views: 2213
|
Forum: Application Programming Posted: Sun May 16, 2004 3:47 pm Subject: Eqvivalent field in Easytrieve PLUS |
Hi,
What is the Easytrieve equivalent field of S9(16) COMP field of Cobol? This field needs 8 bytes of storage but Easytrieve seems to have a limitation on the number of bytes for a binar ... |
Topic: Appending system date to the record |
vkrishna2001
Replies: 7
Views: 4225
|
Forum: Utilities Posted: Wed Jan 28, 2004 1:22 pm Subject: Appending system date to the record |
Hi Kolusu,
I am sorry I did not respond to your solution. The first solution is overwhelming. It may be difficult to understand for the people here whoever is going to maintain this. I t ... |
Topic: Focus creating reports manuals |
vkrishna2001
Replies: 2
Views: 2708
|
Forum: Other Technical Topics Posted: Wed Jan 28, 2004 11:44 am Subject: Focus creating reports manuals |
Kolusu,
Sorry, I did not get time to see your solution. I will try that today. Thanks a lot for the quick reply.
Thanks,
Vijay |
|