You could use the ALLOW-DATE-TIME-OVERRIDE compiler configuration in conjunction with the RM_Y2K environment variable. See Chapter 10 of the RM/COBOL User's Guide for more information.
ALLOW-DATE-TIME-OVERRIDE. This keyword assists in testing for Year
2000 (Y2K) and other date/time problems...
Vitor,
Use this calculation to set a font to a specific point size. This is from the pexample.cbl program in the samples directory.
Set-Default-Font.
*
** Set Default Font Name and Height **
*
CALL "P$GetDeviceCapabilities" Using DC-LogicalPixelsYParam...
As Tom mentioned the problem has to do with the way Microsoft handles write-caching to disk drives.
I got a hotfix from http://www.citrix4ge.de/w2ksp4.htm Search for "DSKCACHE.EXE" on this page. The Dskcache.exe Tool is used to Configure the "Power Protected" Write Cache Option.
Microsoft's...
Webrabbit you are right!
"You should Preview your post before Subitting [sic] it." [smile]
Yeah, I noticed I had the slash wrong. I was previewing the post when I pushed the wrong button and submited the post instead of editing it. I hate it when that happens.
Tom's code is likely faster...
David,
Another way to find the SSN in the record would be to use the LIKE condition. This is a RM/COBOL extension that was included in version 7.50. Below is sample with some test data, give it a try.
[code]
IDENTIFICATION DIVISION.
PROGRAM-ID. SSN.
AUTHOR...
Hi Hammy,
Is this client/server or simply the DBMS?
If it is client/server is the customer is doing this on a slower network (like a 10Mb vs. 100Mb – there’s a 10 to 1 right there).
It looks like the easiest thing to do is disable the virus checker to see if that makes a difference...
Those two blanks you are seeing are the length of the parameter passed in with the A= command line option. They are not blanks, they are a two-byte binary number. See Chapter 7 of the RM/COBOL User's guide.
Try something like this:
01 WS-FILE-ARGUMENT.
02...
David,
Are you running on a Linux that allows large files (e.g. Linux 7.3 or higher)? Are you using the version of RM/COBOL for Large File Linux? The runtime banner will tell you this.
If the version of Linux you are running does not allow large files then the version of RM/COBOL you are...
David,
The RM/COBOL Version 8 User's Guide
http://www.liant.us/download/pdf/rmcug80.pdf
94, 67 - The file is too large. An attempt was made to open a file that is too large for this system. The file was probably created on another system using the LARGE-FILE-LOCK-LIMIT configuration keyword...
David,
You could use the od command to dump the file.
od -x (or -c) <file> | more
I think your problem is that the file is LINE SEQUENTIAL. TAB characters are not going to be read in. They will be changed to one or more spaces.
Another thing you can do is compile the program with Y...
Hi Zalmanp,
WOW! RM/COBOL 1.5D still running after 21 years! You've upgrade your operating systems a few times in the past two decades, maybe it's time to upgrade to version RM/COBOL 8.01 for 32-Bit Windows.
You will have to do some conversion to get from COBOL-74 to COBOL-85 but I think it...
David,
If your version of RM/COBOL is 7.50 or higher you could try using input pipes. I also used the RENAME internal subprogram to move the files to a different directory. Hope this helps.
-Robert Heady
Liant Software Corp.
[code]
IDENTIFICATION DIVISION.
PROGRAM-ID...
Hi David,
This won't be a solution to your particular problem but I think you might find it useful in the future. One of the new features in RM/COBOL version 8.00 is the use of Concatenation Expressions. See page 1-18 of the RM/COBOL v8.0 Language Reference Manual.
These expressions may be...
David,
I believe you have to have a process reading the other end of the pipe when you open it output. I have duplicated your behavior with RM/COBOL, MicroFocus COBOL, a C program and with UNIX shell commands.
For example, create a named pipe,
mknod pipefile p
Send something to it...
Try using the virtual key mappings that are available in 7.50. This configuration works for me.
-Rob
TERM-INTERFACE WINDOWS
/* Multiple Data-Character Definitions.
/* Example of new virtual key mapping names in version 7.50
/* remove period (46) and plus (43) from data-characters.
TERM-ATTR...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.