COMMENT/REPT, CODE1 auto file and print on out tol, Promps opperator for print if in tol. ASSIGN/V1=GETPROGRAMINFO("NUMOOT","") IF/V1>"0" PRINT/REPORT,EXEC MODE=END,$ TO_FILE=ON,AUTO=1,$ TO_PRINTER=ON,$ TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$ REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$ PREVIOUS_RUNS=DELETE_INSTANCES END_IF/ IF/V1=="0" C1 =COMMENT/YESNO,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO, No features are out of tolerence, would you like to print this report? END_IF/ IF/C1.INPUT=="YES" PRINT/REPORT,EXEC MODE=END,$ TO_FILE=ON,AUTO=1,$ TO_PRINTER=ON,$ TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$ REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$ PREVIOUS_RUNS=DELETE_INSTANCES END_IF/ IF/C1.INPUT=="NO" PRINT/REPORT,EXEC MODE=END,$ TO_FILE=ON,AUTO=1,$ TO_PRINTER=OFF,$ TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$ REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$ PREVIOUS_RUNS=DELETE_INSTANCES END_IF/ PRINT/REPORT,EXEC MODE=END,$ TO_FILE=OFF,AUTO=1,$ TO_PRINTER=OFF,$ TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$ REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$ PREVIOUS_RUNS=DELETE_INSTANCES $$ NO, xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx $$ NO, CODE2 will print the report on any OOT....... ASSIGN/V2=GETPROGRAMINFO("NUMOOT","") IF/V2>"0" PRINT/REPORT,EXEC MODE=END,$ TO_FILE=ON,AUTO=1,$ TO_PRINTER=ON,$ TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$ REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$ PREVIOUS_RUNS=DELETE_INSTANCES END_IF/ IF/V2=="0" PRINT/REPORT,EXEC MODE=END,$ TO_FILE=ON,AUTO=1,$ TO_PRINTER=OFF,$ TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$ REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$ PREVIOUS_RUNS=DELETE_INSTANCES END_IF/ PRINT/REPORT,EXEC MODE=END,$ TO_FILE=OFF,AUTO=1,$ TO_PRINTER=OFF,$ TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$ REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$ PREVIOUS_RUNS=DELETE_INSTANCES $$ NO, xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx $$ NO, CODE 3 Prompt to file, prompt to print C3 =COMMENT/YESNO,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO, Check report before saving. Would you like to save this report? IF/C3.INPUT=="YES" PRINT/REPORT,EXEC MODE=END,$ TO_FILE=ON,AUTO=603,$ TO_PRINTER=OFF,$ TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$ REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$ PREVIOUS_RUNS=DELETE_INSTANCES END_IF/ C4 =COMMENT/YESNO,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO, Would you like to print this report IF/C4.INPUT=="YES" PRINT/REPORT,EXEC MODE=END,$ TO_FILE=OFF,AUTO=1,$ TO_PRINTER=ON,$ TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$ REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$ PREVIOUS_RUNS=DELETE_INSTANCES END_IF/ PRINT/REPORT,EXEC MODE=END,$ TO_FILE=OFF,AUTO=1,$ TO_PRINTER=OFF,$ TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$ REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$ PREVIOUS_RUNS=DELETE_INSTANCES