Search found 65 matches

by DavidatK
Mon Apr 14, 2008 4:49 am
Forum: COBOL
Topic: for debugging , i need to display variables in hexadecimal
Replies: 6
Views: 12960

danig,

I think I know what you want to do, but before I start explaining how, maybe you can clarify exactly what you need, possibly with an example.

Thanks,

Dave
by DavidatK
Tue Mar 25, 2008 10:28 pm
Forum: COBOL
Topic: Checks on Cobol application
Replies: 5
Views: 7535

Reviewing a program for functionality and efficiency are two different but related activities. Let?s tackle the functionality side, which can be the most complicated in larger complex programs. ? You?ll need the original program specifications, plus all specification modifications that have been mad...
by DavidatK
Tue Mar 25, 2008 8:50 pm
Forum: DB2 SQL - DB2 PROGRAMMING
Topic: Hi, query for table structure?
Replies: 4
Views: 9902

The difference in names is most probably due to one being the actual table name and the other an alias for the table. This is not an uncommon practice. There are functions that you can perform on the actual table but cannot on the alias. Kind of a security feature of sorts.

Dave
by DavidatK
Fri Mar 14, 2008 9:48 pm
Forum: COBOL
Topic: COBOL CODES..
Replies: 2
Views: 3735

Hello again,

Also, try to use more discriptive subjects. A good on for this might be:
"LOGIC TO CONVERRT FROM OCTAL TO HEXADECIMAL NUMBER SYSTEM"

Dave
by DavidatK
Fri Mar 14, 2008 9:45 pm
Forum: COBOL
Topic: COBOL CODES..
Replies: 2
Views: 3735

Hello, Well, As you know, computers don?t run on Octal or Hex, they run on Binary, just 0 and 1. Octal and Hex are ways of displaying the value as a representation of binary. Octal groups together 3 binary digits, values 0-7, and Hex groups together 4 binary digits, values 0-15, displayed as 0-F. So...
by DavidatK
Fri Mar 14, 2008 12:32 am
Forum: DB2 SQL - DB2 PROGRAMMING
Topic: Hi, query for table structure?
Replies: 4
Views: 9902

HI Again, Here's a query for the indexes on the table SELECT KEYS.IXNAME ,IX.UNIQUERULE ,KEYS.COLNAME ,KEYS.COLNO ,KEYS.COLSEQ ,IX.TBNAME FROM SYSIBM.SYSINDEXES IX, SYSIBM.SYSKEYS KEYS WHERE IX.TBNAME = 'YOUR_TBL_NAME' AND KEYS.IXNAME = IX.NAME ORDER BY IX.TBNAME, KEYS.IXNAME, KEYS.COLSEQ
by DavidatK
Fri Mar 14, 2008 12:21 am
Forum: DB2 SQL - DB2 PROGRAMMING
Topic: Hi, query for table structure?
Replies: 4
Views: 9902

Hi Chechir, Give this query a try. SELECT NAME ,COLNO ,COLTYPE || '(' || CAST(LENGTH AS CHAR(5)) || ',' || CAST(SCALE AS CHAR(5)) || ')' ,CASE WHEN NULLS = 'N' THEN 'NOT NULL' ELSE ' ' END ,TBNAME FROM SYSIBM.SYSCOLUMNS WHERE TBCREATOR = 'TEST' -- < OR 'TEST' ...
by DavidatK
Thu Mar 06, 2008 9:36 pm
Forum: JCL
Topic: empty check and abend the JCL
Replies: 4
Views: 10651

No, both examples Krishna gives will read only a single record. If EOF on the first record then the file is emply, good rc on first read, file is not emply. You are not asking how many records

Dave
by DavidatK
Tue Feb 19, 2008 4:50 am
Forum: COBOL
Topic: At what method to see the printer is active or dead.
Replies: 1
Views: 2609

Through a COBOL program? I know of no way to check the status of a printer from a COBOL program. Maybe some specially written subroutine may be able to.
by DavidatK
Tue Feb 19, 2008 4:46 am
Forum: JCL
Topic: Cond codes.
Replies: 5
Views: 11755

chintu1680, Just to get this out of the way it?s COND=((8,GE),(80,LE,STEP1)) CONDition code processing is one of the strangest things IBM has done. You need to think ?backwards? . It is not if the COND is satisfied Execute the step, it?s if the COND is satisfied, Skip the step. And you need to read ...
by DavidatK
Sat Feb 16, 2008 5:08 am
Forum: ENDEVOR, COOLGEN , PANVALET and CA-7
Topic: Please help
Replies: 1
Views: 3342

Web site for ENDEVOR

Looks like this site may be OK for PANVALET
by DavidatK
Sat Feb 16, 2008 4:56 am
Forum: JCL
Topic: #JO - #JEND problem
Replies: 2
Views: 6213

I have never heard of #JO and #JEND, nor can I fine anything in the JCL manuals that look like that. I suspect that this is part of your scheduling package language, and not anything IBM

Let us know what you find

Dave
by DavidatK
Sat Feb 16, 2008 4:50 am
Forum: CICS
Topic: use of display
Replies: 3
Views: 7749

I would like to add an addendum to what Krishna posted. There is a drawback to using ?DISPLAY?s in a CICS program and most shop will not allow it on their production machine. The ?DISPLAY? verb invokes a MVS function that does a GETMAIN for the DISPLAY string, but does not release it until the MVS t...
by DavidatK
Sat Feb 16, 2008 4:33 am
Forum: COBOL
Topic: file section
Replies: 2
Views: 4056

Check out the COBOL MANUAL Chapters 4 and 5

If you have specific questions please come back.

Dave
by DavidatK
Sat Feb 16, 2008 4:14 am
Forum: COBOL
Topic: give me a code to reverse a COBOL string.
Replies: 4
Views: 21922

Are you looking to use the 'REVERSE' function, or do you want the logic to do this youself?

Dave