hexagon logo

Set Flag if Dimension Out-of-Tolerance

Here's what I'm trying to do - Display a message, prior to printing results, that says "There are N dimensions out-of-tolerance, do you still want to print the report?" Of course, I could accomplish this by doing a whole lot of computations with expressions, but I'd thought I'd first inquire if PC-DMIS can set a flag, based upon the Dimension command, that I can convert into a counter.
Parents
  • So dph51, I tried the assignment I mentionned upon under PC-DMIS 2014, and it works well !!!
    Here are the commands I use at the end of my program :

    But I have another question : Is it possible to visualize the report when we get OOT dims ? Because the report window shows nothing when its finished, we have to click "redraw the report". Is there an automatic command that able to doing this ?


    ASSIGN/V1=0
    ASSIGN/V2=GETPROGRAMINFO("NUMOOT","")
    IF/V2==0
    PRINT/REPORT,EXEC MODE=END,$
    TO_FILE=ON,AUTO=6,$
    TO_PRINTER=OFF,$
    TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
    REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$
    TO_EXCEL_OUTPUT=OFF,
    PREVIOUS_RUNS=DELETE_INSTANCES
    END_IF/
    ELSE_IF/V2>0
    C1 =COMMENT/INPUT,NO,FULL SCREEN=NO,
    You have OOT dimensions, try again !
    PRINT/REPORT,EXEC MODE=END,$
    TO_FILE=OFF,AUTO=3,$
    TO_PRINTER=OFF,$
    TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
    REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$
    TO_EXCEL_OUTPUT=OFF,
    PREVIOUS_RUNS=DELETE_INSTANCES
    END_ELSEIF/
Reply
  • So dph51, I tried the assignment I mentionned upon under PC-DMIS 2014, and it works well !!!
    Here are the commands I use at the end of my program :

    But I have another question : Is it possible to visualize the report when we get OOT dims ? Because the report window shows nothing when its finished, we have to click "redraw the report". Is there an automatic command that able to doing this ?


    ASSIGN/V1=0
    ASSIGN/V2=GETPROGRAMINFO("NUMOOT","")
    IF/V2==0
    PRINT/REPORT,EXEC MODE=END,$
    TO_FILE=ON,AUTO=6,$
    TO_PRINTER=OFF,$
    TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
    REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$
    TO_EXCEL_OUTPUT=OFF,
    PREVIOUS_RUNS=DELETE_INSTANCES
    END_IF/
    ELSE_IF/V2>0
    C1 =COMMENT/INPUT,NO,FULL SCREEN=NO,
    You have OOT dimensions, try again !
    PRINT/REPORT,EXEC MODE=END,$
    TO_FILE=OFF,AUTO=3,$
    TO_PRINTER=OFF,$
    TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
    REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$
    TO_EXCEL_OUTPUT=OFF,
    PREVIOUS_RUNS=DELETE_INSTANCES
    END_ELSEIF/
Children
No Data