Autoname and save file as .pdf

Longtime reader, first-time poster. Thanks to all for the help this forum has provided to me thus far.

I am new to PCDMIS, but an experienced programmer with GeoMeasure (MTI). GeoMeasure is a DMIS language, but vastly different from PCDMIS. I have programmed (10 years) and even taught programming at a local community college (2 yrs). I was away from CMM's for a couple years until I moved to MA from MI last year and took this job, where I first encountered the Demon.

So now that you all have a little background info on me, here is the problem that searching the forum archives has failed to find a solution to.

I had a fixture fabricated that holds up to 16 parts in a 4X4 configuration. I took an existing program that measures a couple hundred points for flatness and created a nested loop to get my vertical and horizontal offsets. I can execute the program without a problem and everything runs fine except for one minor issue: the report needs to print out with a custom report name for each part before the loop completes.

I found a few threads that address using variables to assign the printpath to and then insert the variable into the print command. What I end up with when running is a prompt to save the file (I am not using the print setup from the "file>printing>edit print window setup" dialog box; all of those options are left unchecked). I think the problem may be network related because when I change the file location to the local C: drive, it works flawlessly.

I have attached the program for reference and I appreciate any and all comments that may be helpful.

Also, I am working a 12:30pm to midnight shift and 7:00am-noon on Saturdays, so outside of those hours I may be a bit unresponsive.

Attached Files

378A47 Rev D Flatness - Array_test.zip

Parents

NEWeizen over 14 years ago

PART NAME  : 378A47 Rev D Flatness
REV NUMBER : 1
SER NUMBER : 
STATS COUNT : 1
 
STARTUP    =ALIGNMENT/START,RECALL:, LIST= YES
            ALIGNMENT/END
            MODE/MANUAL
            CHECK/ 0.3,1
            TOUCHSPEED/ 2
            MOVESPEED/ 100
            MANRETRACT/1
            LOADPROBE/2BY20WITH10MM
            TIP/T1A0B0, SHANKIJK=0, 0, 1, ANGLE=0
            FLY/ON,0.118
            FORMAT/TEXT,OPTIONS, , ,SYMBOLS, ;MEAS,NOM,TOL,DEV,OUTTOL, , 
VER_COMMENT =COMMENT/INPUT,NO,'How many parts are in the tallest vertical column?'
            ASSIGN/VER_QTY = VER_COMMENT.INPUT
HORIZ_COMMENT =COMMENT/INPUT,NO,'How many parts are in the longest horizontal row?'
            ASSIGN/HORIZ_QTY = HORIZ_COMMENT.INPUT 
SO_COMMENT =COMMENT/INPUT,NO,'Enter the shop order number'
            ASSIGN/SO = SO_COMMENT.INPUT
SN_COMMENT =COMMENT/INPUT,NO,'Enter all of the nameplate serial numbers'
            ASSIGN/SN = SN_COMMENT.INPUT
CASE_SN_COMMENT =COMMENT/INPUT,NO,'Enter all of the case serial numbers'
            ASSIGN/CASE_SN = CASE_SN_COMMENT.INPUT
            ASSIGN/V1 = 1
            MODE/DCC
            RECALL/ALIGNMENT,EXTERNAL,BV_ARRAY,
HORIZONTAL =LOOP/START, ID = YES, NUMBER = HORIZ_QTY, START = 1, SKIP = ,
               OFFSET: XAXIS = -6.5, YAXIS = 0, ZAXIS = 0, ANGLE = 0
VERTICAL   =LOOP/START, ID = YES, NUMBER = VER_QTY, START = 1, SKIP = ,
               OFFSET: XAXIS = 0, YAXIS = 6, ZAXIS = 0, ANGLE = 0
            COMMENT/REPT,"This report is for downstream assy flatness for plate position #" + V1
            COMMENT/REPT,
            COMMENT/REPT,"This report is for shop order " + SO
            COMMENT/REPT,
            COMMENT/REPT,Downstream assy case serial numbers in this sample:
            COMMENT/REPT,CASE_SN
            COMMENT/REPT,
            COMMENT/REPT,Nameplate serial numbers in this sample:
            COMMENT/REPT,SN
            COMMENT/REPT,
            CLEARP/ZPLUS,0.25,ZPLUS,0
            ONERROR/PROBE_MISS,GOTO MISSED_PROBE_HIT
PLN2       =FEAT/PLANE,RECT,TRIANGLE
            THEO/-4.003,8.017,0,-0.0000572,-0.000059,1
            ACTL/-4.003,8.017,0,-0.0000572,-0.000059,1
            MEAS/PLANE,4
            MOVE/CLEARPLANE
            HIT/BASIC,NORMAL,-6.622,6.167,0,-0.0000572,-0.000059,1,-6.622,6.167,0,USE THEO = YES
            HIT/BASIC,NORMAL,-1.372,6.164,0,-0.0000572,-0.000059,1,-1.372,6.164,0,USE THEO = YES
            HIT/BASIC,NORMAL,-1.369,9.867,0,-0.0000572,-0.000059,1,-1.369,9.867,0,USE THEO = YES
            HIT/BASIC,NORMAL,-6.651,9.87,0,-0.0000572,-0.000059,1,-6.651,9.87,0,USE THEO = YES
            ENDMEAS/
            MOVE/CLEARPLANE
CIR4       =AUTO/CIRCLE,SHOWALLPARAMS = NO,SHOWHITS = YES
            THEO/-6.5,6,0,0,0,1,0.19
            ACTL/-6.5,6,0,0,0,1,0.19
            TARG/-6.5,6,0,0,0,1
            MEAS/CIRCLE
            HIT/BASIC,-6.405,6,-0.1,-1,0,0,-6.405,6,-0.1
            HIT/BASIC,-6.5,6.095,-0.1,0,-1,0,-6.5,6.095,-0.1
            HIT/BASIC,-6.595,6,-0.1,1,0,0,-6.595,6,-0.1
            HIT/BASIC,-6.5,5.905,-0.1,0,1,0,-6.5,5.905,-0.1
            ENDMEAS/
            MOVE/CLEARPLANE
CIR5       =AUTO/CIRCLE,SHOWALLPARAMS = NO,SHOWHITS = YES
            THEO/-1.365,6,0,0,0,1,0.19
            ACTL/-1.365,6,0,0,0,1,0.19
            TARG/-1.365,6,0,0,0,1
            MEAS/CIRCLE
            HIT/BASIC,-1.27,6,-0.1,-1,0,0,-1.27,6,-0.1
            HIT/BASIC,-1.365,6.095,-0.1,0,-1,0,-1.365,6.095,-0.1
            HIT/BASIC,-1.46,6,-0.1,1,0,0,-1.46,6,-0.1
            HIT/BASIC,-1.365,5.905,-0.1,0,1,0,-1.365,5.905,-0.1
            ENDMEAS/
            MOVE/CLEARPLANE
CIR6       =AUTO/CIRCLE,SHOWALLPARAMS = NO,SHOWHITS = YES
            THEO/-6.5,10.03,0,0,0,1,0.19
            ACTL/-6.5,10.03,0,0,0,1,0.19
            TARG/-6.5,10.03,0,0,0,1
            MEAS/CIRCLE
            HIT/BASIC,-6.405,10.03,-0.1,-1,0,0,-6.405,10.03,-0.1
            HIT/BASIC,-6.5,10.125,-0.1,0,-1,0,-6.5,10.125,-0.1
            HIT/BASIC,-6.595,10.03,-0.1,1,0,0,-6.595,10.03,-0.1
            HIT/BASIC,-6.5,9.935,-0.1,0,1,0,-6.5,9.935,-0.1
            ENDMEAS/
LIN3       =FEAT/LINE,RECT,UNBND
            THEO/-6.5,6,0,1,0,0
            ACTL/-6.5,6,0,1,0,0
            CONSTR/LINE,BF,2D,CIR4,CIR5,,
            OUTLIER_REMOVAL/OFF,3
            FILTER/OFF,WAVELENGTH=0
LIN4       =FEAT/LINE,RECT,UNBND
            THEO/-6.5,6,0,0,1,0
            ACTL/-6.5,6,0,0,1,0
            CONSTR/LINE,BF,2D,CIR4,CIR6,,
            OUTLIER_REMOVAL/OFF,3
            FILTER/OFF,WAVELENGTH=0
ARRAY_POSITION_1=ALIGNMENT/START,RECALL:, LIST= YES
            ALIGNMENT/LEVEL,ZPLUS,PLN2
            ALIGNMENT/ROTATE,XPLUS,TO,LIN3,ABOUT,ZPLUS
            ALIGNMENT/TRANS,YAXIS,LIN3
            ALIGNMENT/TRANS,XAXIS,LIN4
            ALIGNMENT/TRANS,ZAXIS,PLN2
            ALIGNMENT/END
            FLY/ON,0.118
 
<<PART PROGRAM HERE........................................
 
DISPLAYPRECISION/4
DIM FLAT1= FLATNESS OF PLANE PLN3  UNITS=IN ,$
GRAPH=OFF  TEXT=ON  MULT=10.00  OUTPUT=BOTH
M      0.0000     0.0000     0.0020     0.0000     0.0000     0.0000 #--------
            [COLOR=blue]ASSIGN/PRINTPATH = "\\Lyt-srv-2\qual\New Insprpt\CMM - BROWN AND SHARPE\CMM Data\BLEED VALVE DATA\378A47 Flatness" + "\378A47 REV D FLATNESS " + SO + "-" + V1 + ".PDF"[/COLOR]
            PRINT/REPORT,EXEC MODE=END,$
              TO_FILE=ON,APPEND=PRINTPATH,$
              TO_PRINTER=OFF,DRAFTMODE=OFF,$
              TO_DMIS_REPORT=OFF,FILE_OPTION=OVERWRITE,FILENAME=,$
              REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$
              PREVIOUS_RUNS=DELETE_INSTANCES
            ASSIGN/V1 = V1 + 1
            LOOP/END
            LOOP/END
MISSED_PROBE_HIT=LABEL/
            MOVE/INCREMENT,0,0,15

Reply

NEWeizen over 14 years ago

PART NAME  : 378A47 Rev D Flatness
REV NUMBER : 1
SER NUMBER : 
STATS COUNT : 1
 
STARTUP    =ALIGNMENT/START,RECALL:, LIST= YES
            ALIGNMENT/END
            MODE/MANUAL
            CHECK/ 0.3,1
            TOUCHSPEED/ 2
            MOVESPEED/ 100
            MANRETRACT/1
            LOADPROBE/2BY20WITH10MM
            TIP/T1A0B0, SHANKIJK=0, 0, 1, ANGLE=0
            FLY/ON,0.118
            FORMAT/TEXT,OPTIONS, , ,SYMBOLS, ;MEAS,NOM,TOL,DEV,OUTTOL, , 
VER_COMMENT =COMMENT/INPUT,NO,'How many parts are in the tallest vertical column?'
            ASSIGN/VER_QTY = VER_COMMENT.INPUT
HORIZ_COMMENT =COMMENT/INPUT,NO,'How many parts are in the longest horizontal row?'
            ASSIGN/HORIZ_QTY = HORIZ_COMMENT.INPUT 
SO_COMMENT =COMMENT/INPUT,NO,'Enter the shop order number'
            ASSIGN/SO = SO_COMMENT.INPUT
SN_COMMENT =COMMENT/INPUT,NO,'Enter all of the nameplate serial numbers'
            ASSIGN/SN = SN_COMMENT.INPUT
CASE_SN_COMMENT =COMMENT/INPUT,NO,'Enter all of the case serial numbers'
            ASSIGN/CASE_SN = CASE_SN_COMMENT.INPUT
            ASSIGN/V1 = 1
            MODE/DCC
            RECALL/ALIGNMENT,EXTERNAL,BV_ARRAY,
HORIZONTAL =LOOP/START, ID = YES, NUMBER = HORIZ_QTY, START = 1, SKIP = ,
               OFFSET: XAXIS = -6.5, YAXIS = 0, ZAXIS = 0, ANGLE = 0
VERTICAL   =LOOP/START, ID = YES, NUMBER = VER_QTY, START = 1, SKIP = ,
               OFFSET: XAXIS = 0, YAXIS = 6, ZAXIS = 0, ANGLE = 0
            COMMENT/REPT,"This report is for downstream assy flatness for plate position #" + V1
            COMMENT/REPT,
            COMMENT/REPT,"This report is for shop order " + SO
            COMMENT/REPT,
            COMMENT/REPT,Downstream assy case serial numbers in this sample:
            COMMENT/REPT,CASE_SN
            COMMENT/REPT,
            COMMENT/REPT,Nameplate serial numbers in this sample:
            COMMENT/REPT,SN
            COMMENT/REPT,
            CLEARP/ZPLUS,0.25,ZPLUS,0
            ONERROR/PROBE_MISS,GOTO MISSED_PROBE_HIT
PLN2       =FEAT/PLANE,RECT,TRIANGLE
            THEO/-4.003,8.017,0,-0.0000572,-0.000059,1
            ACTL/-4.003,8.017,0,-0.0000572,-0.000059,1
            MEAS/PLANE,4
            MOVE/CLEARPLANE
            HIT/BASIC,NORMAL,-6.622,6.167,0,-0.0000572,-0.000059,1,-6.622,6.167,0,USE THEO = YES
            HIT/BASIC,NORMAL,-1.372,6.164,0,-0.0000572,-0.000059,1,-1.372,6.164,0,USE THEO = YES
            HIT/BASIC,NORMAL,-1.369,9.867,0,-0.0000572,-0.000059,1,-1.369,9.867,0,USE THEO = YES
            HIT/BASIC,NORMAL,-6.651,9.87,0,-0.0000572,-0.000059,1,-6.651,9.87,0,USE THEO = YES
            ENDMEAS/
            MOVE/CLEARPLANE
CIR4       =AUTO/CIRCLE,SHOWALLPARAMS = NO,SHOWHITS = YES
            THEO/-6.5,6,0,0,0,1,0.19
            ACTL/-6.5,6,0,0,0,1,0.19
            TARG/-6.5,6,0,0,0,1
            MEAS/CIRCLE
            HIT/BASIC,-6.405,6,-0.1,-1,0,0,-6.405,6,-0.1
            HIT/BASIC,-6.5,6.095,-0.1,0,-1,0,-6.5,6.095,-0.1
            HIT/BASIC,-6.595,6,-0.1,1,0,0,-6.595,6,-0.1
            HIT/BASIC,-6.5,5.905,-0.1,0,1,0,-6.5,5.905,-0.1
            ENDMEAS/
            MOVE/CLEARPLANE
CIR5       =AUTO/CIRCLE,SHOWALLPARAMS = NO,SHOWHITS = YES
            THEO/-1.365,6,0,0,0,1,0.19
            ACTL/-1.365,6,0,0,0,1,0.19
            TARG/-1.365,6,0,0,0,1
            MEAS/CIRCLE
            HIT/BASIC,-1.27,6,-0.1,-1,0,0,-1.27,6,-0.1
            HIT/BASIC,-1.365,6.095,-0.1,0,-1,0,-1.365,6.095,-0.1
            HIT/BASIC,-1.46,6,-0.1,1,0,0,-1.46,6,-0.1
            HIT/BASIC,-1.365,5.905,-0.1,0,1,0,-1.365,5.905,-0.1
            ENDMEAS/
            MOVE/CLEARPLANE
CIR6       =AUTO/CIRCLE,SHOWALLPARAMS = NO,SHOWHITS = YES
            THEO/-6.5,10.03,0,0,0,1,0.19
            ACTL/-6.5,10.03,0,0,0,1,0.19
            TARG/-6.5,10.03,0,0,0,1
            MEAS/CIRCLE
            HIT/BASIC,-6.405,10.03,-0.1,-1,0,0,-6.405,10.03,-0.1
            HIT/BASIC,-6.5,10.125,-0.1,0,-1,0,-6.5,10.125,-0.1
            HIT/BASIC,-6.595,10.03,-0.1,1,0,0,-6.595,10.03,-0.1
            HIT/BASIC,-6.5,9.935,-0.1,0,1,0,-6.5,9.935,-0.1
            ENDMEAS/
LIN3       =FEAT/LINE,RECT,UNBND
            THEO/-6.5,6,0,1,0,0
            ACTL/-6.5,6,0,1,0,0
            CONSTR/LINE,BF,2D,CIR4,CIR5,,
            OUTLIER_REMOVAL/OFF,3
            FILTER/OFF,WAVELENGTH=0
LIN4       =FEAT/LINE,RECT,UNBND
            THEO/-6.5,6,0,0,1,0
            ACTL/-6.5,6,0,0,1,0
            CONSTR/LINE,BF,2D,CIR4,CIR6,,
            OUTLIER_REMOVAL/OFF,3
            FILTER/OFF,WAVELENGTH=0
ARRAY_POSITION_1=ALIGNMENT/START,RECALL:, LIST= YES
            ALIGNMENT/LEVEL,ZPLUS,PLN2
            ALIGNMENT/ROTATE,XPLUS,TO,LIN3,ABOUT,ZPLUS
            ALIGNMENT/TRANS,YAXIS,LIN3
            ALIGNMENT/TRANS,XAXIS,LIN4
            ALIGNMENT/TRANS,ZAXIS,PLN2
            ALIGNMENT/END
            FLY/ON,0.118
 
<<PART PROGRAM HERE........................................
 
DISPLAYPRECISION/4
DIM FLAT1= FLATNESS OF PLANE PLN3  UNITS=IN ,$
GRAPH=OFF  TEXT=ON  MULT=10.00  OUTPUT=BOTH
M      0.0000     0.0000     0.0020     0.0000     0.0000     0.0000 #--------
            [COLOR=blue]ASSIGN/PRINTPATH = "\\Lyt-srv-2\qual\New Insprpt\CMM - BROWN AND SHARPE\CMM Data\BLEED VALVE DATA\378A47 Flatness" + "\378A47 REV D FLATNESS " + SO + "-" + V1 + ".PDF"[/COLOR]
            PRINT/REPORT,EXEC MODE=END,$
              TO_FILE=ON,APPEND=PRINTPATH,$
              TO_PRINTER=OFF,DRAFTMODE=OFF,$
              TO_DMIS_REPORT=OFF,FILE_OPTION=OVERWRITE,FILENAME=,$
              REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$
              PREVIOUS_RUNS=DELETE_INSTANCES
            ASSIGN/V1 = V1 + 1
            LOOP/END
            LOOP/END
MISSED_PROBE_HIT=LABEL/
            MOVE/INCREMENT,0,0,15

Children

No Data