Download BAPI User Guide CA-BFA)

BAPI User Guide CA-BFA)
SAP AG
Calling BAPIs from Visual Basic
oMsgReturn.Value("MESSAGE") + _
". " + _
oMsgReturn.Value("MESSAGE_V1") + _
". " + _
oMsgReturn.Value("MESSAGE_V2") + _
". " + _
oMsgReturn.Value("MESSAGE_V3") + _
". " + _
oMsgReturn.Value("MESSAGE_V4") + _
". " + _
oMsgReturn.Value("LOG_NO") + _
". " + _
oMsgReturn.Value("LOG_MSG_NO")
Else
'
fill form fields
txtMsgShorttext = strMsgShorttext
arrayText
'
= oMsgText.Data
handling of non RTF texts
If cboMsgTextformat.Text <> "RTF" Then
For intCounter = 1 To oMsgText.RowCount
If intCounter = 1 Then
rtfMsgLongtext.Text = arrayText(intCounter, 1)
Else
rtfMsgLongtext.Text = rtfMsgLongtext.Text + _
Chr(13) + Chr(10) + _
arrayText(intCounter, 1)
End If
Next intCounter
End If
'
handling of RTF texts
If cboMsgTextformat.Text = "RTF" Then
74
April 2001