OpenJournal
Oracle Smart View for OfficeのVBA関数、OpenJournalについて説明します。
説明
OpenJournal()は、指定された仕訳を開きます。
構文
Function OpenJournal(
jrnID As String,
dims() As String,
dimVals () As String
) As Long
パラメータ
jrnlID: 入力引数。開く仕訳の仕訳IDを指定します。仕訳IDは、ListJournals()を呼び出すことで取得できます。
dims: 入力引数。ディメンションのリストを文字列の配列として指定します。
dimVals: 入力引数。ディメンション値のリストを文字列の配列として指定します。
戻り値
正常に終了した場合は0を戻し、それ以外の場合は該当するエラー・コードを戻します。
例
Sub OpenJournal
‘Firstly, get the list of Journals
ListJournals
Dim jrnlID As String
jrnlID = 1
retVal = jObj.OpenJournal(jrnlID, dims, dimVals)
If retVal = 0 Then
Debug.Print "OpenJournal Succeeded"
Else
Debug.Print "OpenJournal Failed!!!"
End If
End Sub