fName=open('H:/CSC/Programs/CobolTran/Empcobol.dat')
WriteToo=open('H:/CSC/Employee.dat','w')
Trash='Start'
 
while Trash != EOF
	ID=fName.read(5)
	FullName=fName.read(26)
	Territory=fName.read(2)
	Office=fName.read(2)
	Salary=fName.read(6)
	SSN=fName.read(9)
	Dep=fName.read(2)
	JClass=fName.read(2)
	Trash=fName.readline()
	WriteToo.write(ID ','FullName','Territory',')
 

file = open('file.txt','r')
data = file.readlines()
while data:
      fname = data[0][5:10] #reads first line 5th to 10th characters
      data = data[1:] #chops of first line of data.

# slicing operator seq[begin : end(exclusive) : step]
# step is optional
# defaults are index begin=0, index end=len(seq), step=1
"""
separate info in line into
ID#,Last,First,Territory#,Office#,Salary,SSN,Department#,JobClass
00001,ADAMSON,JAMES,01,01,40000.00,145503242,01,02
"""
 
line = "00001JAMES ADAMSON 010104000014550324201021500067500040010011593"
# extract the id using slicing
id = line[0:5]
# test
print id, type(id)
 
# slice out the id and extract name and rest of data
# have to do it this way, because firstname and lastname is not
# of fixed length, but terminated with a space character
no_id = line[5:].split()
first = no_id[0]
last = no_id[1]
rest = no_id[2]
# test
print first, last, rest
 
# assume that next 6 data items are fixed in length
territory = rest[0:2]
office = rest[2:4]
salary = "%0.2f" % float(rest[4:10])
print territory, office, salary, type(salary)
# keep going ...
ssn = rest[10:19]
department = rest[19:21]
jobclass = rest[21:23]
# test
print ssn, department, jobclass
"""
my output so far -->
00001 <type 'str'>
JAMES ADAMSON 010104000014550324201021500067500040010011593
01 01 40000.00 <type 'str'>
145503242 01 02
"""
 
# the 9 extracted data variables look ok
# now form a comma separated string
format = "%s,%s,%s,%s,%s,%s,%s,%s,%s"
data = format % (id,first,last,territory,office,salary,ssn,department,jobclass)
# test it
print data
"""
my output -->
00001,JAMES,ADAMSON,01,01,40000.00,145503242,01,02
"""

# You can use a for loop
for line in open(fname, "r"):           ## One line at a time
     print line
#
# or a while loop
fp=open(fname, "r")
line = fp.readline()
while line:
     print line
     line = fp.readline()
fp.close()

# convert a COBOL data file to a csv file
 
def cobol2csv(line):
    """
    separate COBOL type info in line
    eg. 00001JAMES ADAMSON 010104000014550324201021500067500040010011593
    to a csv string
    ID#,Last,First,Territory#,Office#,Salary,SSN,Department#,JobClass
    eg. 00001,ADAMSON,JAMES,01,01,40000.00,145503242,01,02
    """
    # extract the id using slicing
    id = line[0:5]
    # slice out the id and extract name and rest of data
    # have to do it this way, because firstname and lastname is not
    # of fixed length, but terminated with a space character
    no_id = line[5:].split()
    first = no_id[0]
    last = no_id[1]
    rest = no_id[2]
    # assume that next 6 data items are fixed in length
    territory = rest[0:2]
    office = rest[2:4]
    salary = "%0.2f" % float(rest[4:10])
    ssn = rest[10:19]
    department = rest[19:21]
    jobclass = rest[21:23]
    # now form a comma separated string and return it
    format = "%s,%s,%s,%s,%s,%s,%s,%s,%s"
    data = format % (id,first,last,territory,office,salary,ssn,department,jobclass)
    return data
 
#infile = open(r'H:/CSC/Programs/CobolTran/Empcobol.dat')
#outfile = open(r'H:/CSC/Employee.dat','w')
# for test only ...
infile = open("empcobol.dat","r")
outfile = open("empcsv.dat", "w")
 
for cobol_line in infile:
    csv_line = cobol2csv(cobol_line) + '\n'  # add a new line char
    outfile.write(csv_line)
    # test
    print cobol_line
    print csv_line