hexagon logo

How to get data from dimension of profile?

Hi, I first take five points and construct them to be a feature set. And then i caculate the profile.
how can i get the "T" for every point by the profile dimension with VB or VAB or C#? I use PCDMIS
2013. Thank you very much
Parents
  • In the edit window of PCDMIS

    TVAL's of points in a constructed feature set.


    The following code will:


    1) locate the feature set above the placement of the code
    2) pull out the individual feature by it's name
    3) calculate it's Tval
    4) FORMAT it to 4 decimal places
    5) and send it to the report screen

    The code must be placed below the feature set
    [FONT=UICTFontTextStyleBody]ASSIGN/COUNT=0
    [/FONT][FONT=UICTFontTextStyleBody]DO/[/FONT]
    [FONT=UICTFontTextStyleBody]ASSIGN/V1 = GETCOMMAND("CONSTRUCTED SET","UP",1)[/FONT]
    [FONT=UICTFontTextStyleBody]ASSIGN/COUNT = COUNT + 1
    [/FONT][FONT=UICTFontTextStyleBody]ASSIGN/V2 = GETTEXT(3,COUNT,V1)[/FONT]
    [FONT=UICTFontTextStyleBody]ASSIGN\T_VAL_1=DOT((V2.XYZ-V2.TXYZ),V2.TIJK)[/FONT]
    [FONT=UICTFontTextStyleBody]ASSIGN/T_VAL = FORMAT("%.4f",T_VAL)[/FONT]
    [FONT=UICTFontTextStyleBody]COMMENT/REPT,"TVAL "+V2+" = "+T_VAL[/FONT]
    [FONT=UICTFontTextStyleBody]UNTIL/COUNT>SCN1.NUMHITS-1
    
    [/FONT]
Reply
  • In the edit window of PCDMIS

    TVAL's of points in a constructed feature set.


    The following code will:


    1) locate the feature set above the placement of the code
    2) pull out the individual feature by it's name
    3) calculate it's Tval
    4) FORMAT it to 4 decimal places
    5) and send it to the report screen

    The code must be placed below the feature set
    [FONT=UICTFontTextStyleBody]ASSIGN/COUNT=0
    [/FONT][FONT=UICTFontTextStyleBody]DO/[/FONT]
    [FONT=UICTFontTextStyleBody]ASSIGN/V1 = GETCOMMAND("CONSTRUCTED SET","UP",1)[/FONT]
    [FONT=UICTFontTextStyleBody]ASSIGN/COUNT = COUNT + 1
    [/FONT][FONT=UICTFontTextStyleBody]ASSIGN/V2 = GETTEXT(3,COUNT,V1)[/FONT]
    [FONT=UICTFontTextStyleBody]ASSIGN\T_VAL_1=DOT((V2.XYZ-V2.TXYZ),V2.TIJK)[/FONT]
    [FONT=UICTFontTextStyleBody]ASSIGN/T_VAL = FORMAT("%.4f",T_VAL)[/FONT]
    [FONT=UICTFontTextStyleBody]COMMENT/REPT,"TVAL "+V2+" = "+T_VAL[/FONT]
    [FONT=UICTFontTextStyleBody]UNTIL/COUNT>SCN1.NUMHITS-1
    
    [/FONT]
Children
No Data