Amear
Mechanical
- Dec 6, 2004
- 12
Transfering BRAVO files to Solid Edge, I was given this program by solid edge to complete the transformation. It does not seem to work with our system, but Solid Edge strongly opposes that. Can anyone find a problem? have the same problem? converting Bravo.dwg to Solid Edge.dwg?
---------------------------------------------------------
!
! Let's create a listing of all BDRAFT files in working directory
! Create list.bat file used to create DWG2DXF.DAT listing file of BDRAFT part files
out1 :== fopen file=list.bat write
write file_id=#out1 format="dir/b *.dwg >dwg2dxf.dat"
fclose file=#out1
! Run list.bat
system command ={list.bat}
! Just a simple little dwell used to give system time to create dwg2dxf.dat
! If file is not created in time adjust dwell
dwell :== 50000
count :==1
while (#count ~= #dwell)
count :== #count+1
end
! Must make sure DWG2DXF.DAT file has been created before going on
!prompt text=" Check for DWG2DXF.DAT File Then Enter <cr> to continue..." valid=string resp=note1
! Now tell system to open listing for read
dwgfile := fopen file=dwg2dxf.dat read
! Read in first part file from listing
status :== read file_id=#dwgfile format="%s" var=name
! Set looping conditions
while (#status ~= eof)
load file=#name ! load part file from listing
dxfext :== ("dxf") ! declare dxf file extension
dxfname:==(#name||#dxfext) ! add dxf file extension to part file
save file=#dxfname dxf ! save part file off in dxf format
clear all no_confirm ! clear open file from system
! Read in next part file from listing
status :== read file_id=#dwgfile format="%s" var=name
! If end of file has not been reached, back to start of while loop
! If end of file has been reached end loop
end
! Close read file
fclose #dwgfile
! Create cleanup.bat file to delete temp files, and fix file extensions
out2 :== fopen file=cleanup.bat write
write file_id=#out2 format="del list.bat\\n"
write file_id=#out2 format="del dwg2dxf.dat\\n"
write file_id=#out2 format="rename *.dwgdxf *.dxf\\n"
write file_id=#out2 format="del cleanup.bat\\n"
fclose file=#out2
! Run cleanup.bat file
system command ={cleanup.bat}
echo {Conversion Completed}
---------------------------------------------------------
!
! Let's create a listing of all BDRAFT files in working directory
! Create list.bat file used to create DWG2DXF.DAT listing file of BDRAFT part files
out1 :== fopen file=list.bat write
write file_id=#out1 format="dir/b *.dwg >dwg2dxf.dat"
fclose file=#out1
! Run list.bat
system command ={list.bat}
! Just a simple little dwell used to give system time to create dwg2dxf.dat
! If file is not created in time adjust dwell
dwell :== 50000
count :==1
while (#count ~= #dwell)
count :== #count+1
end
! Must make sure DWG2DXF.DAT file has been created before going on
!prompt text=" Check for DWG2DXF.DAT File Then Enter <cr> to continue..." valid=string resp=note1
! Now tell system to open listing for read
dwgfile := fopen file=dwg2dxf.dat read
! Read in first part file from listing
status :== read file_id=#dwgfile format="%s" var=name
! Set looping conditions
while (#status ~= eof)
load file=#name ! load part file from listing
dxfext :== ("dxf") ! declare dxf file extension
dxfname:==(#name||#dxfext) ! add dxf file extension to part file
save file=#dxfname dxf ! save part file off in dxf format
clear all no_confirm ! clear open file from system
! Read in next part file from listing
status :== read file_id=#dwgfile format="%s" var=name
! If end of file has not been reached, back to start of while loop
! If end of file has been reached end loop
end
! Close read file
fclose #dwgfile
! Create cleanup.bat file to delete temp files, and fix file extensions
out2 :== fopen file=cleanup.bat write
write file_id=#out2 format="del list.bat\\n"
write file_id=#out2 format="del dwg2dxf.dat\\n"
write file_id=#out2 format="rename *.dwgdxf *.dxf\\n"
write file_id=#out2 format="del cleanup.bat\\n"
fclose file=#out2
! Run cleanup.bat file
system command ={cleanup.bat}
echo {Conversion Completed}