Die Liste "Meine Kunden" ermittelt CIS mobile standardmäßig wie folgt:
Über SAP HR, Infotyp 0015, wird die Personalnummer zu dem angemeldeten Benutzer gelesen. "Meine Kunden" sind dann alle Kunden, für die als "Vertriebsbeauftragter" (Partnerrolle VE) in den Vertriebsbereichsdaten diese Personalnummer eingetragen ist.
Sie können stattdessen eine eigene Zuordnung definieren, indem Sie in der VB.NET-Methode "MyClients" des CIS-Add-On Programms eine Liste von Kundennummern zurückgeben:
VB.net
Als Parameter erhält die Methode das CIS-Dictionary-Objekt, dem Sie den Benutzernamen, die Organisationsdaten und, falls über SAP HR verfügbar, die Personalnummer entnehmen können. Die Kundennummern stellen Sie dann in den Parameter "customernumbers", der in VB.NET als Array von Strings parametrisiert ist. Sie liefern in der Methode "True" zurück, wenn CIS mobile Ihre Kundenliste verwenden soll.
Als Beispiel implementieren wir wie in CIS mobile die Zuordnung über die VE-Partnerrolle. Zum Lesen der Daten benutzen wir eine ABAP Routine "MYCLIENTS" in dem Add-On-Funktionsbaustein "/GUIXT/CISADDON_INTERFACE".
Erläuterungen zur hier verwendeten Technik finden Sie im Abschnitt "Daten aus dem SAP-System lesen".
VB.net
Die ABAP-Routine "MYCLIENTS" im Funktionsbaustein "/GUIXT/CISADDON_INTERFACE":
ABAP
* Read my clients SAMPLE CODING
* 1 Personal number
* 2 VKORG xxxx
* 3 VTWEG xx
* 4 SPART xx
*
* Out
* List of KUNNR
form MYCLIENTS tables reqparm resparm changing rc type c msg type c.
data: pernr like pa0105-pernr.
data: vkorg like knvp-vkorg.
data: vtweg like knvp-vtweg.
data: spart like knvp-spart.
Read Table reqparm index 1 into pernr.
Read Table reqparm index 2 into vkorg.
Read Table reqparm index 3 into vtweg.
Read Table reqparm index 4 into spart.
* Customer numbers
data: begin of customers occurs 10,
kunnr like kna1-kunnr,
end of customers.
Select kunnr
from KNVP
into table customers
where vkorg = vkorg
and vtweg = vtweg
and spart = spart
and pernr = pernr
and parvw = 'VE'.
* return customers
Loop at customers.
resparm = customers-kunnr.
Append resparm.
Endloop.
Endform.