Hello there, we are trying to capture some measured values with the probe on our machine and would like to "write" the information to a file using the "write" capability of the machine. The probing process is working fine but the issues come into play when we get to the "write" to process. The machine alarms out and there is something with the logic that the machine doesn't like. This is a new process for us to try to accomplish, so any help in deciphering this is appreciated. The program info is as follows. If anything pops out as something that might be giving us fits please let me know. Any help is greatly appreciated.

N370 ;NOW THE PROBE WILL TOUCH OFF ON THE 730 BORE AND THE 508 BORE

N380 ;WILL MEASURE 2 BORES ON B0 SIDE
N390 G0 X0 Y0;730 DIA BORE FIRST
N400 G0 Z100 ;(SAFE PLANE IN FRONT OF PART)
N410 G1 Z=-110-15 F1000
N420 _MVAR=101 _SETVAL=730 _PRNUM=1001 _STA1=45 _INCA=90 _KNUM=0 _FA=30 _TSA=25 _VMS=0 _NMSP=1 _EVNUM=0 _CPA=0 _CPO=0
N430 CYCLE979
N440 STOPRE
N450 R60=_OVR[4];CAPTURES THE DIA IN VARIABLE R60
N460 R61=_OVR[5];CAPTURES THE X IN VARIABLE R61
N470 R62=_OVR[6];CAPTURES THE Y IN VARIABLE R62

N480 G0 X0 Y0;508 DIA BORE NEXT
N490 G1 Z=-229-15 F1000
N500 _MVAR=101 _SETVAL=508 _PRNUM=1001 _STA1=45 _INCA=90 _KNUM=0 _FA=30 _TSA=25 _VMS=0 _NMSP=1 _EVNUM=0 _CPA=0 _CPO=0
N510 CYCLE979
N520 STOPRE
N530 R63=_OVR[4];CAPTURES THE DIA IN VARIABLE R63
N540 R64=_OVR[5];CAPTURES THE X IN VARIABLE R64
N550 R65=_OVR[6];CAPTURES THE Y IN VARIABLE R65

N560 G75 Z1=0; Return Z axis to machine zero position

N570 ;NOW THE PROBE WILL TOUCH OFF ON THE 571.5 BORE
N580 G0 G90 G54 X0; CENTER PALLET IN MACHINE
N590 ;ROTATE TO B180 SIDE
N600 G0 G521 B=DC(180)
N610 STOPRE
N620 ZP=-150

N630 ;WILL MEASURE 1 BORE ON B180 SIDE
N640 G0 X0 Y0;571.5 DIA BORE
N650 G0 Z1200 ;(SAFE PLANE IN FRONT OF PART)
N660 G1 Z=1055-15 F1000
N670 _MVAR=101 _SETVAL=571.5 _PRNUM=1001 _STA1=45 _INCA=90 _KNUM=0 _FA=30 _TSA=25 _VMS=0 _NMSP=1 _EVNUM=0 _CPA=0 _CPO=0
N680 CYCLE979
N690 STOPRE
N700 R66=_OVR[4];CAPTURES THE DIA IN VARIABLE R66
N710 R67=_OVR[5];CAPTURES THE X IN VARIABLE R67
N720 R68=_OVR[6];CAPTURES THE Y IN VARIABLE R68

N730 ;NOW TO SET THE COMPARE VALUES FOR BORE ALIGNMENT
N740 ;R70 AND R71 ARE THE X AND Y COMPARE FOR B0 MEASURES BORES
N750 R70=ABS[R61]-ABS[R64];730X MINUS 508X CENTER VALUES
N760 R71=ABS[R62]-ABS[R65];730Y MINUS 508Y CENTER VALUES

N770 ;R72 AND R73 ARE THE X AND Y COMPARES OF B0 AND B180 ROTATION
N780 R72=ABS[R61]-ABS[R67];730X ON B0 MINUS 571.5X ON B180
N790 R73=ABS[R62]-ABS[R68];730Y ON B0 MINUS 571.5Y ON B180
N800 ;------------------------------------------------------------

N810 ;NEXT RUN OF INFO WILL 'WRITE' INFO TO 'WINERGYBORES' LOG

N820 DEF INT ERROR
N830 DEF STRING[10] TIME,DATE
N840 DEF STRING[40] FILENAME="/_N_WKS_DIR/_N_LOGDATA_WPD/WINERGYBORES"
N850 ;MACHINE INFO VARIABLE FOR 'DATE' IS
N860 ;MACHINE INFO VARIABLE FOR 'TIME' IS
N870 WRITE(ERROR,FILENAME,"-------------------------------------")
N880 WRITE(ERROR,FILENAME,"PROG NAME: "<<$P_PROG[0])
N890 WRITE(ERROR,FILENAME,"DATE: "<<$A_YEAR <<$A_MONTH <<$_DAY)
N900 WRITE(ERROR,FILENAME,"TIME: "<<$A_HOUR <<$A_MINUTE)
N910 WRITE(ERROR,FILENAME,"SEQUENCE NUMBER: "<<ANZPROT)
N920 WRITE(ERROR,FILENAME,"B0 730+.041-.007 BORE: "<<R60)
N930 WRITE(ERROR,FILENAME,"730 X AND Y POSITION: X"<<R61" Y"<<R62)
N940 WRITE(ERROR,FILENAME,"B0 508 BORE: "<<R63)
N950 WRITE(ERROR,FILENAME,"508 X AND Y POSITION: X"<<R64" Y"<<R65)
N960 WRITE(ERROR,FILENAME,"B180 571.5+.037-.007 BORE: "<<R66)
N970 WRITE(ERROR,FILENAME,"571.5 X AND Y POSITION: X"<<R67" Y"<<R68)
N980 WRITE(ERROR,FILENAME,"BORE ALIGNMENT FROM B0 SIDE: X"<<ABS[R70]" Y"<<ABS[R71])
N990 ;THIS COMPARES THE 730 BORE TO THE 508 BORE POSITIONS TO EACH OTHER
N1000 WRITE(ERROR,FILENAME,"BORE ALIGNMENT FROM B0 TO B180 SIDE: X"<<ABS[R72]" Y"<<ABS[R73])
N1010 ;THIS COMPARES THE B180 571.5 BORE TO THE B0 730 BORE FOR ALIGNMENT

N1020 R80=1;THIS IS TO JUMP BORE PROBING IF RE-RAN BECAUSE OF 1685 BORE PROCESS

N1030 PROBEDONE;
N1040 L321;TURN PROBE OFF