PML EXAMPLES

엑셀추출

Bito

2024/09/19 4:05 PM

특정 Type만 Delete

특정 Type 만 delete 하기 위해 생성했습니다 상황에 따라 수정하여 사용하면 될것같습니다.

Bito

2024/08/29 11:46 PM

Output CE(Type 하위 값만 Datal)

!!OutputCe() 의 경우 선택한 값을 DALTAL 하기위해서 사용하는데 선택한 위치에서 원하는 TYPE 하위의 값만 DALTAL 하기위해서 추가로 생성해보았습니다 기본적인 Output CE 하위 Type 만 Datal

Bito

2024/08/29 11:46 PM

Start TTY In E3D Module

간혹 E3D Design 모듈 내에서 TTY를 실행해야하는 경우가 있기에 만들어보았습니다

Bito

2024/08/29 11:45 PM

bittokki

PML EXAMPLES

Output CE(Type 하위 값만 Datal)

Bito

Aug 29, 20244m

!!OutputCe() 의 경우 선택한 값을 DALTAL 하기위해서 사용하는데

선택한 위치에서 원하는 TYPE 하위의 값만 DALTAL 하기위해서 추가로 생성해보았습니다

기본적인 Output CE

define function !!OutputCe()
VAR !BANNER BANNER
Import 'PMLFileBrowser'
handle Any
endhandle
if ( Match ( !BANNER , 'AVEVA PDMS Design' ) GT 0 ) then
    using namespace 'Aveva.Pdms.Presentation'
    !Browser = object PMLFileBrowser('OPEN')
    !Browser.Show( 'C:\' , '' , 'File Path' , False , 'All files (*.*)|*.*' , 1 )
    handle Any
    return
    endhandle
else   
    using namespace 'Aveva.Core.Presentation'
    !Browser = object PMLFileBrowser('OPEN')
    !Browser.Show( 'C:\' , '' , 'File Path' , False , 'All files (*.*)|*.*' , 1 )
    handle Any
    return
    endhandle
endif    
!File = Object File( !Browser.File() )
FILE $!FILE OVER
OUTPUT CE
TERM
syscom |$!FILE &|

하위 Type 만 Datal

define function !!OutputList(!TYPE IS ARRAY)
ONERROR continue

VAR !BANNER BANNER
Import 'PMLFileBrowser'
handle Any
endhandle
if ( Match ( !BANNER , 'AVEVA PDMS Design' ) GT 0 ) then
    using namespace 'Aveva.Pdms.Presentation'
    !Browser = object PMLFileBrowser('OPEN')
    !Browser.Show( 'C:\' , '' , 'File Path' , False , 'All files (*.*)|*.*' , 1 )
    handle Any
    return
    endhandle
else   
    using namespace 'Aveva.Core.Presentation'
    !Browser = object PMLFileBrowser('OPEN')
    !Browser.Show( 'C:\' , '' , 'File Path' , False , 'All files (*.*)|*.*' , 1 )
    handle Any
    return
    endhandle
endif    
!File = Object File( !Browser.File() )

FILE $!FILE OVER
!ITEM = OBJECT ARRAY()

$* EQUI 와 STRU 가져오기
DO !A VALUES !TYPE
VAR !ITEM APPEND COLL ALL $!A FOR CE
ENDDO

DO !A INDEX !ITEM
OUTPUT NOUDA $!ITEM[$!A]
--OUTPUT OLDFORMAT NOUDA $!ITEM[$!A]
ENDDO
term
syscom |C:\TTEMP.txt &|

Subscribe to 'bittokki'

Subscribe to my site to be the first to receive notifications and emails about the latest updates, including new posts.
Join SlashPage and subscribe to 'bittokki'!