Visual Basic :: Read Cobol FIles

Accessing MF COBOL Isam Files With VB6
In order to utilize the user interface capabilities of VB I must be able to access, read, write and update many files within current COBOL Isam files. Some of these files will continue to also be accessed by COBOL applications. I am looking for ideas, or more specifically some form of .ock or .dll that could isolate the handling of the isam routines from the VB programer.

When I Make A (install) CD-Rom All Attributs Files Changed To Read Only Why? Read Only
I would like to my attributs files look the same after the installation. But when I create the cd all the files took the properties read only.

And in my programme,I need to write in some files.

Who can help me ?

Sorry for my bad english.

Redg
Thanks a lot.

COBOL, Anyone Can Help Me????
Hi all!!!
Anyone can help me with Object-Oriented Cobol??
I need to integrate database interface into a program...
anyone knows?

Cobol To VB
I am able to look at a record from a data file created with a Cobol Compiler, in the record I have a name, an address and a telephone number, I can put the whole record in a VB text box, but I can not split them by fields, how can I do it in VB?, the fields in Cobol are not separeted by (,) like in VB. For Example:

Cobol Joe Black 123 Center St 3054442222

VB "Joe Black","123 Center St",3054442222

Thanks

Luis

VB And COBOL
<html><div style='background-color:'><DIV>
<P><BR>Hi!</P>
<P>Does any one know of a way to connect VB and COBOL directly?</P>
<P>I need help for a project where all the backoffice would run in COBOL and the frontends would be VB? Does anyone know if it's possible? </P>
<P>Thanks</P></DIV></div><br clear=all><hr>Get your FREE download of MSN Explorer at <a href='http://go.msn.com/bql/hmtag_itl_EN.asp'>http: //explorer.msn.com</a><br></html>

COBOL And VB
I have a Net Express 3.0 COBOL dll that is to be called from a Visual Basic 6 program. The problem is that I cannot get the VB program to recognize the entry point on the dll.

Is there anybody that is familiar on how I can set up the VB program to find the entry point?

Vb & Cobol
Hi ,

Is There any way to read cobol data files from vb ?

Thanks ..

Read PDF Files / Extract Data From PDF Files
I wondering IF it's possible to read data from pdf files?

This because I would like to write a sub for pdf files like below:

Code:

Text = ReadWordDocument("C:TempTest.doc")

Public Function ReadWordDocument(strFileName As String) As String

Set oWordApp = CreateObject("Word.Application")
If oWordApp Is Nothing Then Exit Function

Set oWordDoc = oWordApp.Documents.Open(strFileName)

oWordApp.Selection.WholeStory
ReadWordDocument = oWordApp.Selection.Text

oWordApp.Quit

Set oWordDoc = Nothing
Set oWordApp = Nothing

End Function

LOGO And COBOL??
heya,

I don't know if anyone can help but I am trying to find out the advantages and disadvantages of both COBOL and LOGO...can anyone help?? thankies

Where Can I Ask The Question Of COBOL?
To whom it may concern,

I wonder if you can help me, that is where can I ask the questions of COBOL. I am a new COBOL learner and I keep having a lot of questions about COBOL to ask. Please guide me do. Thanks!

Best Regards,
John Wen
3-Sept-2005

VB6 ActiveX Dll And RM/Cobol-85
Hi all.

I have no problem creating and using a dll with VB6. I want to create a Dll that can be accessed by RM/Cobol-85 programe..could someone provide a few tips (most welcome) on the process or let me know if it is even possible?

Thanks in advance

Brent

Edit: Moved from General

For Anybody Who Remembers COBOL
I have to generate a text file which will be input into a mainframe. Im pretty sure they use COBOL because within their file layout definition they are using X(5) which I remember from COBOL class is a string of 5 characters, and 9(2) which is a number of 2 digits. But I dont remember what is 9(7)V99

So if any of you paid attention in class (unlike yours truly) and remember this please lemme know? Thanx!

Download Cobol
hi guys
where can i get cobol on the net??
any version will do
thanx
sid

VB And COBOL Question
Is it possible to connect to a COBOL database with VB? I found a ODBC driver for COBOL but it is quite expensive. I just want to export data out of a COBOL database into something more user friendly.

Thanks,

Shannan

Using NetExpress 3.1 COBOL Dll's In VB6?
I have a legacy COBOL system that I maintain in NetExpress 3.1. I am planning on converting the whole system to Visual Basic 6 (long irrelevant story). The legacy system has HUNDREDS of batch reports that I would like to access from my new GUI.

I know that my NetExpress suite can create .dll files so I was thinking of packaging the batch reports as dlls and calling those dlls from VB. My question is whether or not I will need the NetExpress COBOL runtime in order to process those dlls when called from VB? Has anyone ever tried this?

BTW, I already know how to convert the data types when passing parameters.

Thanks,

Christopher

Cobol Archive From VB6
Hi, I need read a file (database) generate from COBOL, but I not know structure of this file!.

It is posible With Visual Basic 6?. Exist any "viewer for Cobol"?

Thanks in advance

Luis

Hola: Necesito leer un archivo de datos generado con Cobol. Yo estoy usando Visual Basic 6 y además no conozco la estructura del archivo cobol. Es posible?. Existe algun "visualizador" de archivos cobol?

Gracias,
Luis

Calling VB From COBOL
I want to call visual basic code from a cobol program....can this be done? If yes, how?

Anyone With COBOL Exp?? COBOL Datatype-> VB Datatype
Hi all,

We have this problem now where we need to convert COBOL Comp-3 datatype to a VB datatype.

The database used is Pervasive (Btrieve) and many of the types are COBOL Comp-3 (decimal) with sizes ranging from 6 to 9

When the size of a filed is 8, we can use a Double. We are not sure for size 6, 7, and 9.

Does anyone know how to make the conversion?

COBOL Comp-3 -> EBCDIC -> VB or some other way?
Some website I can look at?

Cheers,
Laurent

Data Format Cobol To VB
Hi All,

I need to convert from Cobol structured text string to VB user defined variable. But, I do not know How to convert
from Cobol PIC 9(?) COMP data type to VB LONG data type?

Thanks and best regards,
Amaraa

Reading A Cobol File
Hi there,

I'm trying to read a micro focus cobol file into a text file using VB6 and have been unsuccessful. I'm unfamiliar with the format and just using the basic file handing in VB pulls in garbage and tries to read it like a regular text file. Here is what the cobol file structure looks like:

03 CA-KEY.
05 CA-COMPANY-NO PIC X(06).
05 CA-ACCOUNT-NO PIC X(15).
02 CA-DATA.
03 CA-BASIC-INFORMATION.
05 CA-LAST-UPDATED PIC X(08).
05 CA-RECORD-STATUS PIC X(01).
05 CA-ACCOUNT-NAME PIC X(30).
05 CA-BANK-NAME PIC X(30).
05 CA-BANK-ADDRESS-1 PIC X(30).
05 CA-BANK-ADDRESS-2 PIC X(30).
05 CA-BANK-CITY PIC X(15).
05 CA-BANK-STATE PIC X(02).
05 CA-ACCOUNT-TYPE PIC X(01).
05 CA-TRANSIT-ROUTING PIC X(09).
05 CA-EFT-ORIGINATOR-ID PIC X(10).
03 CA-ACCOUNT-CONTROLS.
05 CA-ACCOUNT-BALANCE PIC S9(9)V99 COMP-3.

Is there some kind of conversion that needs to be done on the file in order to read it?
Any help would be greatly appreciated, thanks.

Call Cobol DLL From VB Com Object
I have a VB com object as a wrapper for executing a cobol dll from an asp. I am new to asp, and also new to vb as well although I do learn quickly.

My asp calls the vb com object, which in turn should call the cobol dll but I get the following error

WrapEXINCOR error '800a0035'
File not found: KyposEXINCOR.DLL

Here is the code from my vb .cls file
Private Declare Sub JMPCINT2 Lib "f3biprct.dll" ()
Private Declare Sub JMPCINT3 Lib "f3biprct.dll" ()
Private Declare Sub ADJCLAIM Lib "KyposEXINCOR.DLL" (Lactcode As String, Lclmrec As String)

Private Sub Class_Initialize()

Call JMPCINT2

End Sub

Private Sub Class_Terminate()

Call JMPCINT3

End Sub

Public Function CallExincor(actcode As String, clmrec As String)

Call JMPCINT2

Dim Cactcode As String
Dim Cclmrec As String
Cactcode = actcode
Cclmrec = clmrec
Call ADJCLAIM(Cactcode, Cclmrec)
clmrec = Cclmrec

Call JMPCINT3

End Function

I have tried everything under the sun. Permissions, Full Path names, putting the dll in the local folder and calling for it there ....... im pulling my hair out.

Help please.

Reading A Cobol Copybook In VB?
I'm looking into reading Cobol copybooks into VB so that I can use that information to make files through VB that follow the copybook. I've searched around to see if there is any code that would read through one and extract the PIC information from the copybook. It's fairly easy to do until you get to and OCCURS statement (which is doable) but the REDEFINES statements would be killers in my opinion. Is there any code out there that anybody knows of that might accomplish this feat? I can get it to work on simple copybooks but some of the ones I'm trying to parse are pretty daunting. Even if the VB reformatted the copybook or something that'd work too.

Thanks!

Chris

VB Front For COBOL Programs
I want to create a front end in VB to access the programs written in COBOL. This front end should accept some parameters from the user and replace some of the variables in the COBOL template program.

Has anybody done similar work like this? Sample code will be of great help.

Thanks in advance.

Ascii To Cobol Comp-3 Format
ASCII to COMP-3 FORMAT (cobol??)
Does any one know how to convert ascii to COMP-3 format?
For example what would be "12345" converted to COMP-3,
and how is it done ?

Connection Of VB Code With COBOL Interface
we have developed an application in VB. Now our clients want us to run half the application using VB interface and half in COBOL. Actually the application is a payroll system. They want to utilise the interface in COBOL for the income tax part. Is it possible to use the VB code with COBOL interface?

Check If File Open By COBOL Program Before Using In VB App
Hello,

I have browsed through Tek-Tips using "Check if File Open" in VB 5&6 Forum as well as extensive searching out on the web for find an answer to my challenge.
In my VB program, I need to first check to see if a COBOL program is done writing data to a file before I go and list the file as ready to use in my app.
thread222-1437198: File Lock Problem has a code snippet I tried to use which did not work.
The way I am testing is to open up a simple .TXT file with Notepad, leave it open, then I run my VB program which will search for the file name in a directory and if present list it. I need to further filter to see if the file is open before I throw it as an option in a list box.
Using the code snippets found in the above mentioned thread and other similar snippets on the web, the file opens in my VB app as if it were not already open by Notepad.
Does anyone know how to code in VB to check for a file being already opened by a non-VB program (such as Notepad or a COBOL program)?

Thanks.
Dave

Reading A Indexed Cobol File With Visual Basic
Just wondering if it's possible to read a indexed .dat file with visual basic. I'm converting a old cobol program to visual basic.
the select statment for the cobol program was "ORGANIZATION IS INDEXED, ACCESS IS DYNAMIC
RECORD KEY IS month-srce-loc". They were also using the start and low values command to read the file. I've tried reading the file randomly in visual basic but doesn't turn out right. Any help would be awesome.

Read Files By Using Get #
I'm trying to get this method to work, but I'm pretty sure that a made a lot of fauls.
Can anyone please correct this sub?

Code:
Private Sub Command1_Click()
Dim Buffer() As Byte
OpenedFile = FreeFile

Open "C:file.txt" For Binary Access Read As #OpenedFile
ReDim Buffer(1 To 4096) As Byte

Do While Not EOF(OpenedFile)
Get #OpenedFile, 4096, Buffer()
DoEvents
Loop
Close #OpenedFile

Text1.Text = Buffer
End Sub

Read Only Files
I have two problems, first is opening a word document in a VB form and not as an Word application and another is opening this file in read-only format...please help...thanks!

Zip Files (read Them)
Does anyone know if it's possible to open up a .zip file, read it like if it was a .txt file, and add it to a text box. Then put it back in a new file and add a zip extension and it would still work with winzip etc....

Read Only Files...
Ok, for a game, i want im saving all the stats of the user and game stuff into a text file. Is there a way to make this file read only? Like, certin windows files wont let you delete them, nor edit the data inside them. Is there a registry path i can add or something to add this file to that list?

VB6 Won't Read My Mdb Files
my VB won't read my MDB databases but will let me open databases saved in an older version of access. is there anyway of making the newer databases i save compatible
or is there any solution for this?

thanks
ScOrP

I Don't Read DAT Files
Hi everyone

I have a problem

i want the data in DAT files but i dont

DAT.zip attach in existence OCAK08.DAT - dbFiles.xls - FIS.DEF files
OCAK08.dat = Database file
dbFiles.xls = DAT file transfer to XLS (XLS file my accounting software transfer modül receipt)
FIS.DEF = DAT file in existence Field name and character digit.

my accounting software writen MSDOS C compiler

what i want

i want to read dat file in VB 6 according as dbFiles.xls

how can i do.
Please help me

How To Read Pdf Files
hello
i have 40 PDF files... how can i read text from it one by one....?
ram

Can Vb6 Read TGA Files
Hi All,
Just wondering if anyone has developed a Vb6 application that was able to read TGA files?

Read-only Files
How do I change a file property from within VB? For instance I want to open a MSWord document from a VB application and I want to make it Read-Only in some instances but full Read-Write in other instances. The choice will be made via a message box perhaps.

A Way To Read Pdf Files In VB
Anyone seen an examples of how to read a pdf file using good old VB? The adobe site just has a 600 page pdf document on the topic but i dont have 16 light years to read it.

REad All Files On CD
How can i read all the files on the cd with lot's of directory nested?

How can I get the filename,filesize, directory path? What is the fastest approach?

thanks

Have My App Read VB Files (frm, Bas)
How can I have my app open a specified vb file?? I have a common dialog which will get the the path of say, a module (*.bas), how can my app fill a text box with the code from that module? and can this be done with frm, cls etc etc...

Read-Only Files
Hello,
I made a CD of my works to transfer them to my other computer, but it happen then all the files was writen as Read Only. Since the number of files is important, I do not want to change this attibute for all my file. I was wondering if it was possible to change the read only attribute using VB?

Thanks for help.

How To READ From Files?
Hello, everyone... Well. I have a question about how to SET A FILE's STRING to a CoMMAND

Like in MSAGENT CONTROL.
MSAGENT1.characters("Bot").Commands.add "this","this","this",,False

Instead I want to read the stuff from a file that contains commands... How do I do that?

LIKE THIS???:

Open App.Path & " ext.txt" For Input As #1
Dim thecmd As String
Do Until EOF(cmdfilenum)
thecmd = Input$(LOF(1), #1)

Loop
Close #1
MSAGENT1.Characters("Bot").Commands.add thecmd

Is that right???

Read PDF Files
Is there an easy way to load pdf files into a text box.

PS: thanks for the help you guys/gals have been great!!!

How To Read From Files?
Hi..i am new here..
Currently i am doing my final semester project which requires to display characters on dot matrix array. I am going to use VB as my interfacing software.
I am a newbie to all VB stuff...hehe..hope you dont mind.

My project requires to read words from textfile (eg. notepad) and send them out to the serial port.

Thanks!!

Read DBX Files
Hi there!

Is there any way that I can read a DBX file...get the message from it also with the file attachements? would like to create a software just like thw MailNavigator software... My purpose for this is to avoid licensing....

Pleae Help

Regards,
Ian

How To Read .ini Files..
Gidday!
i have this code:Code: Open App.Path & "PROGRAMcurrent.dat" For Input As #2
Input #2, myVer
Close #2

Quote: current.dat = 1.0.0
what i would like to do is change current.dat to...
[database]
1.0.0
[pics]
1.0.0
[html]
1.0.0

i would like myVer to read under the [database] title the value 1.0.0 and assign the value to a string aswell for further usage.. also how the read the others all at once? then put them in 3 strings...

Edited by - Hopeless on 8/29/2004 5:40:28 PM

Help To Read From Files
In a Notepad file, amidst a jumble of text there are keywords and numbers associated to that keyword, specifically 2 keywords and 2 different sets of numbers that correspond to the keywords. For example, the keyword NUMBER precedes a 6 digit number, and the keyword ALPHA precedes an alpha-numeric number, both of which are contained within brackets. To illustrate:

texttexttexttexttexttexttext NUMBER [100001] texttexttexttexttexttexttexttext ALPHA [ABC123DEF] texttexttexttexttexttexttexttexttext NUMBER [100002] texttexttexttexttexttexttexttexttext ALPHA [ABC123DEG]... etc.

In this Notepad file, this means that ABC123DEF is the number that belongs to 100001 and ABC123DEG belongs to 100002, etc.

I have an Excel spreadsheet that has the 100001, 100002, 100003... etc. in a column. I am trying to write a program that will read through that Notepad file and find the ALPHA number, then put that number in the cell next to the corresponding NUMBER number in Excel. Hehe, sorry is this confusing? I can clarify further if need be.

When trying to write this program however, I am at a loss of how to start. I am trying to tell the program to read until the word ALPHA, but I don't know how to do that. I am not asking anyone to write this all out for me, but just looking for someone to guide me in the right direction. I would like to try this myself, as the concept seems pretty simple enough. It's just that I'm not sure exactly how to start. I also have many more questions but I will hold off until later. Any suggestions are most welcome. Thanks =).

Read Cobol FIles

Can anyone plz tell me...how can i migrate txt files created by a cobol program into access....!