Code: Alles auswählen.
data g_obj_rolea like borident.
data g_obj_roleb like borident.
data g_reltype like breltyp-reltype.
move i_viqmel-qmnum to g_obj_rolea-objkey.
move 'BUS2078' to g_obj_rolea-objtype.
move i_viqmel-coaufnr to g_obj_roleb-objkey.
move 'BUS2075' to g_obj_roleb-objtype.
move 'VONA' to g_reltype.
call function 'QMLR_CREATE_DOCUMENT_FLOW'
exporting
role_a = g_obj_rolea
role_b = g_obj_roleb
reltype = g_reltype
exceptions
no_logical_system = 1
no_relation_create = 2
others = 3.