Основная надпись в isodraft

 
  • Where do i exactly put this new code and loop? The purpose of this macro is to use another backing sheet for pages 10 and up. Thanks for the reply.
  • ISODRAFTMODE
    $M/path to option file with underlayplot1
    DETAIL $!getCE
    var !isoCountSheets ISODRAW NUMBER
    if(!isoCountSheet gt 9)
    do !isoCountSheet from 1 to !isoCountSheets
     DETAIL SHEETN $!isoCountSheet $!getCE
    enddo
    endif

    $M/path to option file with underlayplot2


    I think this needs more modification, because sheet 1 to 9 uses underlayplot1, and sheets 10 and up must use underlayplot 2.
  • Something like this should work:


    !getCE = !!CE.Name
    !!lsaCEPipeName = !!CE.Namn.Replace('/','_')

    [COLOR=#333333]ISODRAFTMODE
    [/COLOR]
    [COLOR=#333333] $M/path to option file with underlayplot1[/COLOR]
    [COLOR=#333333] DETAIL $!getCE[/COLOR]
    [COLOR=#333333] var !isoCountSheets ISODRAW NUMBER[/COLOR][COLOR=#333333]

    [/COLOR][COLOR=#333333] $M/path to option file with underlayplot2[/COLOR]
    [COLOR=#333333] if(!isoCountSheet lt 9)[/COLOR]
    [COLOR=#333333]  do !isoCountSheet from 1 to !isoCountSheets
    [/COLOR]  !deleteFile = !!lsaIsoPipeFileName + '00' + [COLOR=#333333]!isoCountSheet[/COLOR]
     SYSCOM |del /q %STROUTPUT%\DRAWINGS\ISO\$!deleteFile|

    [COLOR=#333333]   DETAIL SHEETN $!isoCountSheet $!getCE[/COLOR]
    [COLOR=#333333]  enddo[/COLOR]
    [COLOR=#333333] endif
    [/COLOR]
    EXIT

    I don't have Pdms, so can't check this code..
  • I can try and let you know. Thank you btw for the help :)
  • getting an incomplete line error:

    (47,62)   CP: Incomplete command line
    if(!isoCountSheet gt 9)^^
  • I put 'then' after this line: if(!isoCountSheet gt 9)

    and changed all '!isoCountSheet' to '!isoCountSheets'

    and now i am getting this error:
    (2,779)   Method
  • modified the macro a little to suit me and it looks like this:

    ISODRAFTMODE
    var !NameIsometric :pipedrwgno of pipe

    $M/C:\temp\opt1
    DETAIL $!getCE
    var !isoCountSheets ISODRAW NUMBER

    $M/C:\temp\opt12
    if(!isoCountSheets gt 9) then
     do !isoCountSheets from 1 to !isoCountSheets
     !deleteFile = $!NameIsometric + '00' + !isoCountSheets
     SYSCOM |del /q C:\temp\PLOT\$!deleteFile|

      DETAIL SHEETN $!isoCountSheets $!getCE
     enddo
    endif

    EXIT

    the error still remains: (2,779) Method
  • when we use this command

    [COLOR=#0000ff]var !isoCountSheets ISODRAW NUMBER[/COLOR]

    !isoCountSheets is [COLOR=#ff0000]STRING[/COLOR]

    we can convert it to real like this

    if !isoCountSheets.[COLOR=#ff0000]real()[/COLOR].gt(1) then
     -- code here
    endif