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

엑셀추출

Bito

Sep 19, 20243m

import 'PMLFileBrowser'
handle Any
endhandle
import |GridControl|
handle ANY
endhandle
using namespace 'Aveva.Core.Presentation' 
!Browser = object PMLFileBrowser('SAVE')
!Browser.Show( )

!Browser.Show( 'C:', 'report' , 'Save File' ,false, 'Excel Documents|*.xlsx', 1)
!Savefile = object file(!browser.file())
$* !siteList = !!collectAllFor( 'Bran Mem','', CE)
!siteList = !!collectAllFor( 'Bran Mem','', WORL)
    !header = object array()
    !header[1] = 'SITE'
    !header[2] = 'ZONE'
    !header[3] = 'PIPE'
    !header[4] = 'BRAN'
    !header[5] = 'NAME'
    !header[6] = 'P1BORE'
    !header[7] = 'P2BORE'
    !header[8] = 'P3BORE'
!i = 1
DO !site values !siteList
    !branMemlist = !!collectAllFor( 'Bran Mem','', !SITE)
    !resultList = object array()
    !ii = 1
    DO !bran values !branMemlist
        SKIP IF(!bran.TYPE.EQ(|ATTA|))
        SKIP IF(!bran.TYPE.EQ(|WELD|))
        !resultList[!ii][1] = NAME OF SITE OF $!bran
        !resultList[!ii][2] = NAME OF ZONE OF $!bran
        !resultList[!ii][3] = NAME OF PIPE OF $!bran
        !resultList[!ii][4] = NAME OF BRAN OF $!bran
        !resultList[!ii][5] = !bran.FULLNAME
        !resultList[!ii][6] = !bran.PPBO[1].STRING()
        !resultList[!ii][7] = !bran.PPBO[2].STRING()
        HANDLE Any
            !resultList[!ii][7] = ||
        endhandle
        !resultList[!ii][8] = !bran.PPBO[3].STRING()
        HANDLE Any
            !resultList[!ii][8] = ||
        endhandle


        !ii = !ii + 1 
    ENDDO

    !grid = object NETGRIDCONTROL()
    !nds = object NETDATASOURCE('GridControl', !header, !resultList)
    !grid.bindToDataSource(!nds)
    if !grid.getNumberRows().eq(0) then
        skip
    else
        !savename = !Savefile.string()
        !grid.saveGridToExcel(!savename.replace(|.xlsx|, !i.STRING() + |.xlsx|)) 
    endif
    !i = !i + 1
ENDDO

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'!