Rocket® COBOL

Hi, Now I can log on to the FTP Server whats the COBOL code to send a small text file. Thanks Neil.

Hi, Does any one know of any cobol code to check if a local pc has an internet connection? Many thanks Neil.

Hi All, Found how to call an FTP site from with in a Visual Cobol program, but can any one advise how to add a username password so it logs in? set cFtpWebRequest to type "System.Net.FtpWebRequest"::"Create"("ftp://ftp.TestSite.com") as type "System.Net.FtpWebRequest" Thanks in advance. Neil.

I would like to open the main COBOL program and drill down to the copybooks, then the IDE “remembers” the variables used in the main program and don’t mark them as unused (strikethrough), but if this feature is “faraway” I would suggest to be able to turn off the feature only for copybooks.

[Migrated content. Thread originally posted on 08 May 2012]Have a problem with x"91" call outs in managed code.Code reads as... 01 command-lin-string pic x(80) value "dir/w". 01 RESULT PIC X COMP-X. 01 FUNC PIC X COMP-X VALUE 35. 01 COMMAND-LIN. 03 COMMAND-LIN-LENGTH PIC X COMP-X VALUE 0.:: DISPLAY COMMAND-LIN-STRING UPON COMMAND-LINE. CALL x"91" USING RESULT, FUNC, COMMAND-LIN. IF RESULT = 0 MOVE "01" to lnk-error-status END-IF.No DOS box appears showing a directory listing (as it does in UNMANAGED code) but RESULT comes back as 0! Managed code as defined by Application (program) output as Class library under .Net Framework 4.0

Hello friends, I'm obtaining the follow error when trying to access a cgi program through IE "I/O error : file '\\\\SERVER01\\payroll\\FP014.TXT' error code: 3/7 (ANS85), pc=0, call=1, seg=0" What does this error code means? I created a group "HR" wich can acess the folder payroll and its contents. The program called FP014H.exe is trying to read the "FP014.txt" file on \\\\server01\\payroll. The program is located on C:\\Inetpub\\intranet\\CGI-BIN\\FP014H.exe, i'm acessing on IE:  "server01/.../FP014H.exe" This problem occurs wheter i call the program on IE, when logged on a HR group user or not.

Thanks to all those for attending the Visual COBOL webinar on Thursday. Here's the Q & A transcript from the webinar: Q: I’m currently using Object COBOL on Server Express in a Linux environment. We use a main menu program and then via linkage call in up to 1000 other programs. All is good except that still limited to 80 char line displays @ 24 rows and want to break out. A: Visual COBOL character applications can use more than the standard 80 cols by 24 rows, see our ACCEPT/DISPLAY documentation for more details. If you really want to breakout, then it’s time to switch to a more graphical presentation. As Mike demonstrated on the webinar, .NET has some great options for you. Amongst other things, the effort involved will depend upon how many screens you have, how coupled the business logic is to the user interface and whether you want web or thick client access to the application. Good news is, we can help assess and advise. If you want to know more, please contact me directly: sc

[Migrated content. Thread originally posted on 31 May 2012]Hi,i download the new Visual Cobol 2.0 for Windows to test.Whats news in Visual Cobol 2.0 ?

The following code works in our NET EXPRESS code...              $set ooctrl( P)       ENVIRONMENT DIVISION.                                                   INPUT-OUTPUT SECTION.                                                   FILE-CONTROL.                             &n

Hello folks, I am dealing with quite a lot of fields in the CALL "PC_PRINTER_DEFAULT_FONT" and in the CALL "PC_PRINT_FILE" but I have never worked  with COMP-5 format. Would please send a couple of examples or explanations to me. I did not succeed in the first seaches throgh the Internet. Thanks a lot, in advance, Cheers. Rui Natal  

Hello folks, I could see that in the properties of a CALL "PC_PRINTER_DEFAULT_PROPERTIES" we have a field named cblte-pp-paperwidth. I could observe that the printing keeps a little margin at the left and at the right. My customer would like to print in all the width of the paper, with no margin. Please do not ask me why, OK ? The question is: How do I have to code this ? Any sample, example or hints and tips ?  Looking forward to hearing from you soon, Cheers. Rui Natal   

Hi Guys, I have a programmer that is stuggling with a few concepts.  We have InstantSQL configured and working beautifully.  We would like to perform a query and then insert the result of the query into COBOL variables to then compare and do some business logic within Cobol's files. The below query returns about 50 lines each with 8 columns.  What would be the most efficient way for cobol to use this data and apply business logic for example does the invoice id exist in cobol's data files? My programmer is going down the track of using a work file for this rather than processing in memory. Any help with concepts on feeding a result of a query into cobol variables to apply business logic for such things like does the invoice already exist in the cobol data (index seq. files) or not, if not, write to the data to the file. Regards Magishme See below for example code... -------------------------- 01 ws-emp-data.          05 ws-index  

Using Visual Cobol 2.0 I am getting a return-code value of 255 when calling a .DLL module.   I get this return code immediately after calling the module (I display return-code as the first line in the sub-routine).    Is this some kind of run time error?  I've tried changing compiler directives and it doesn't seem to help.  Any clues as to how I figure out what the error is?  Thanks!#visualcobolreturn-code255

Is there a way to obtain the folder wich i'm running an application? I have a program that is being used in two different folders. It uses the same logic for both, but i can't mix it's files. Altering the programs to select wich folder to run is not a option. I need to do this without user input. Thanks in advance

Sorry to bother woth this one again Chris. You wrote we should deinstall VisualCobol and VisualCobol_server and then reinstall VisualCobol. We havent got the setup file for VisualCobol any more. Would the VisualCobol for eclipse solve the problem too?

We're using VisualCobol on Cent OS (64-Bit) This message is received when trying to compile:  Load error : file 'bin/cobchecker64'error code: 173, pc=0, call=1, seg=0173 Called program file not found in drive/directory I've seen the answer in kb.microfocus.com/.../article.aspx where we are advised to get the product Server Express and I've also seen kb.microfocus.com/.../article.aspx in which it is suggested the $COBDIR should be first when setting the LD_LIBRARY_PATH. Even though the article was referring to another product, I gave it a try but it didn't solve the problem. I've also seen a further article: supportline.microfocus.com/.../KBdo278.HTM which advised to not install in several directories. We have a $HOME/VisualCobol directory and also a $HOME/VisualCobol_server directory. Whenever I tried to install to an already populated directory I got the error message that the directory is not empty. How then can we not install to 2 diff

This might sound complicated but... Our 'current' NET EXPRESS system is built using ONE .EXE which then calls .int files as required. We're trying to replicate this idea by having a single 'top level' .EXE file (A.EXE) which then calls out to .DLL files (representing the old .ints). Some of the .DLLs we've built contain a 'top level form program' which contains new 'managed code' which will then call out to 'non managed' code (old COBOL code in a VisCobol wrapper) which we've built as .DLL files in their own right but are referenced within the 'managed code .DLL). For test purposes and to make sure these new 'top level' .DLLs work we initially built them as .EXE's in their own right and they work perfectly well. We've then changed the output type for these top level programs, to 'Class Library', and built them as .DLLs. We've then attemped to 'build' these .DLLs into A.EXE as adde

Ladies and Gentlemen, I have used cobconfig.cfg Environment Variable and the output was just OK in a A4 style sheet. But now I have got to print a report in the landscape style. Any hints and tips. Thanks a lot in advance. Cheers. Rui Natal

Hi, Using the command DSDIR (in the NX Dialog) I can find and return to the program a filename from my PC, which works great. However is there a command that works like the Visual Cobol Toolbox option "FolderBrowserDialog" this can locate and return a Directory name? Many thanks Neil.

Hi,  I just got a new PC that has Windows 7 installed, and I am having issues compiling,  The compiler itself runs fine, but It seems the RMPATH is not being set because it cannot find my copy libraries.  my RMPATH is set correctly in the registry configuration: K:\\WOW\\8.0\\COPYLIB;C:\\PROGRA~2\\Liant\\RMCOBO~1;, but when I compile, I get 914 errors because the copylibraries are not found. Any ideas on what I can do, or what I have setup incorrectly?  Could it be my rights?  I am set as an Administrator...

When compiling for debugging, is there a setting somewhere to only compile source that has changed instead of compiling all source?#VisualStudio#VisualCOBOL

RM/COBOL Source program if compile version 12 then it takes more space but if compile version 8 than it takes less space for object file size. And version 12 takes time to load and execute but version 8 not take much time. Please give some suggestion why taking more space file size for version 12.

Almost 1000 of you downloaded the beta version and the full release is now generally available. www.microfocus.com/vs2012 Many thanks to those who have already taken a look and if you haven't done so already, now's a great time to try it out. Looking forward to your feedback.  Scot Nielsen

Good day, I am currently using WIN$PRINT to create documents from my ACUCOBOL programs. I need to be able to print portrait text on a landscape page. I know that I can change the font angle to achieve this and have managed to change the angle of the column but for some reason the text isn't printing. Has anybody ever tried this before? I have included the piece of code that sets the font, is there something that I am not doing correctly? DESTROY COL-FONT-HANDLE(COL-NUM).                                                                                 CALL "WIN$PRINTER" U

Hi, the error message in the subject appears when running the setup immediately after the following line: Installing product files to /opt/microfocus/VisualCOBOL_server. I'm trying to install Visual Cobol and keep getting this error. We're using 64-bit Cent OS which I realise is an unsupported platform, but as far as I can see the settings in cobopt and cobopt64 appear to be correct (dont contain dead links) with the exception of LPI_SEARCH_PATH. cobopt -C nolistset GCC_LIB=/usr/lib/gcc/x86_64-redhat-linux/4.1.1/32set GCC_SEARCH_PATH=$GCC_LIB:$GCC_LIB/..:/usr/lib:/libset GCC_EXCEP_LIB=gcc_sset LPI_SEARCH_PATH=${LPI_SEARCH_PATH:-/opt/lib/l cobopt64 -C nolistset GCC_LIB=/usr/lib/gcc/x86_64-redhat-linux/4.1.1set GCC_SEARCH_PATH=$GCC_LIB:/usr/lib64:/usr/libset GCC_EXCEP_LIB=gcc_sset LPI_SEARCH_PATH=${LPI_SEARCH_PATH:-/opt/lib/lib} I'd like to see what install.sh is actually doing but can't find it anywhere either.#VisualCOBOL