XAPI에서 제공되지 않는 i-PORTAL6 Viewer 의 API를 호출 합니다.
| 코드 블럭 | ||||
|---|---|---|---|---|
| ||||
Public Function InvokeMethod ( name As String params As String ) As Void |
...
| 값 | 의미 | 비고 |
|---|---|---|
| Open | 보고서 열기 | Viewer 에서만 작동함작동. |
| AddGlobalParams | GlobalParam 추가 | Viewer 에서만 작동 |
| OpenEx | 보고서 열기 | Viewer 에서만 작동 |
| ReLoad | 보고서 재오픈 | Viewer 에서만 작동 |
params
type : String
실행하고자 하는 API에서 필요한 매개변수들의 문자열 집합(매개변수는 콤마(' , ') 구분자를 이용하여 생성)
ReportCode(
)(
isPopup
)(
isNewProcess
)(
OpenParam
)
| API명 | Param1 |
|---|
| Param2 |
|---|
| Param3 |
|---|
| Param4 |
|---|
| Open | ReportCode 열고자 하는 보고서 코드 | isPopup 보고서 출력 형식을 팝업창으로 지정 | isNewProcess 보고서 출력 형식을 새창으로 지정 | OpenParam Global Param 설정을 위한 값(값이 없으면 공백) ex) 변수명=값&변수명=값&..... |
| AddGlobalParams | name 변수명 | value 변수값 | - | - |
| OpenEx | ReportCode 열고자 하는 보고서 코드 | openType 보고서 출력 타입 0 : 현재 윈도우에 보고서 오픈 1 : 팝업으로 보고서 오픈 2 : 탭으로 보고서 오픈 | OpenParam Global Param 설정을 위한 값(값이 없으면 공백) ex) 변수명=값&변수명=값&..... |
반환 값
Type: void
해당 API의 반환값은 없습니다.
...
| 코드 블럭 | ||||||
|---|---|---|---|---|---|---|
| ||||||
//openParam이 없는 경우
Sub ReportOpen()
Dim mxmodule As Object
Set mxmodule = Application.COMAddIns.Item("iMATRIX6.ExcelModule").Object
mxmodule.xapi.InvokeMethod "Open", "REP1C8FEDFF5E4946F19A553091D76145C0,true,false,"
End Sub
//openParam이 있는 경우
Sub ReportOpen()
Dim mxmodule As Object
Set mxmodule = Application.COMAddIns.Item("iMATRIX6.ExcelModule").Object
mxmodule.xapi.InvokeMethod "Open", "REP1C8FEDFF5E4946F19A553091D76145C0,true,false,VS_YYYYMM=201906&VS_NAME=BIMATRIX"
End Sub
// GlobalParam 추가
Sub AddGlobal()
Dim mxmodule As Object
Set mxmodule = Application.COMAddIns.Item("iMATRIX6.ExcelModule").Object
mxmodule.xapi.InvokeMethod "AddGlobalParams", "VS_YYYYMM,201906"
mxmodule.xapi.InvokeMethod "AddGlobalParams", "VS_NAME,BIMATRIX"
End Sub
Sub OpenEx()
Dim mxmodule As Object
Set mxmodule = Application.COMAddIns.Item("iMATRIX6.ExcelModule").Object
mxmodule.xapi.InvokeMethod "OpenEx", "REP1C8FEDFF5E4946F19A553091D76145C0,2,VS_YYYYMM=201906&VS_NAME=BIMATRIX2BIMATRIX"
End Sub
Sub ReLoad()
Dim mxmodule As Object
Set mxmodule = Application.COMAddIns.Item("iMATRIX6.ExcelModule").Object
mxmodule.xapi.InvokeMethod "ReLoad", ""
End Sub |