NX Nastran DMAP Programmer's Guide - Kxcad.net

1439
TABEDIT
Performs editing operations on table data blocks
2. Repeat Example 1, assuming GEOM1 was saved on a previous run, by using
record substitution.
DTIIN DTI,DTINDX/CON,,,,,,,,, $
TABEDIT XGEOM1,CON,GEOM1,,/GEOM1X $
EQUIVX GEOM1X/GEOM1/ALWAYS $
END $
CEND
BEGIN BULK
DTI,CON,1,DR,1,ENDREC
DTI,CON,2,KRA,1,ENDREC
(all GRID entries, including the correction)
ENDDATA
3. Repeat Example 2 by using word substitution.
DTIIN DTI,DTINDX/CON,,,,,,,,, $
TABEDIT XGEOM1,CON,GEOM1,,/GEOM1X $
EQUIVX GEOM1X/GEOM1/ALWAYS $
END $
CEND
BEGIN BULK
DTI,CON,1,CR,1,DW,20,26,0
,SWA,3,KWA,7
GRID,30,0,2.0,2.0,0,3456,0
ENDDATA
4. Repeat Example 1, assuming GEOM1 was written onto a user file during the
previous run, by using the merge-edit feature.
DTIIN DTI,DTINDX/C,,,,,,,,, $
INPUTT2 GEOM1OLD,,,,/-1 $
TABEDIT GEOM1OLD,C,GEOM1,,/GEOM1X $
EQUIVX GEOM1X/GEOM1/ALWAYS $
END $
CEND
BEGIN BULK
DTI,C,1,MEA,1,8,ENDREC
GRID,30,0,2.0,2.0,0.0,0,3456,0
ENDDATA