Inhalt


 

Der Bericht "Änderungen" zeigt für die ausgewählten Kunden die Stammdatenänderungen innerhalb der letzten 12 Monate, absteigend sortiert nach Datum.

Datenbeschaffung und Layout

Wir verwenden die Ausgabe des SAP Reports "RFDABL00_NACC". Es ist kein eigenes ABAP-Coding erforderlich, da wir in VB.NET die Parameter für den Report setzen können und die Ausgabe in HTML-Format zurückerhalten.

Die Farbgestaltung für die HTML-Ausgabe von ABAP-Reports kann man im SAP-System definieren. Wir verwenden zunächst das Orginal SAP-Layout.

Generell ist die direkte Anzeige eines ABAP-Reports eine sehr schnell realisierbare Möglichkeit, vorhandene Funktionalität als CIS mobile Bericht zur Verfügung zu stellen, was sowohl SAP Standardreports als auch bereits bei Ihnen entwickelte eigene ABAP-Auswertungen umfaßt. Wenn auch das Layout meist nicht optimal für kleinere mobile Geräte geeignet ist, hat man damit die Informationen verfügbar gemacht.

VB.net
    ' Report Changes
    Public Function CreateReportChanges _
             (ByVal keys As Dictionary(Of String, String), _
              ByVal id As String, ByVal customernumbers() As String, _
              ByVal customernames() As String) As String


        ' We use ABAP report RFDABL00_NACC to display customer changes

        ' Clear input/output
        rfc_input.Clear()
        rfc_output.Clear()


        ' Build up report selections
        For Each knr As String In customernumbers
            add_report_selection(rfc_input, "KUNNR", knr, knr)
        Next

        Dim vkorg As String = GetItem(keys, "VKORG")
        Dim vtweg As String = GetItem(keys, "VTWKU")
        Dim spart As String = GetItem(keys, "SPART")

        Dim d2 As Date = Date.Today
        Dim d1 As Date = d2.AddYears(-1)
        add_report_selection(rfc_input, "DATUM", d_
               1.ToString("yyyyMMdd"), d2.ToString("yyyyMMdd"))
        add_report_selection(rfc_input, "XALG", " ")
        add_report_selection(rfc_input, "XALL", " ")
        add_report_selection(rfc_input, "XBUK", " ")
        add_report_selection(rfc_input, "XVKO", "X")
        add_report_selection(rfc_input, "VKORG", vkorg, vkorg)
        add_report_selection(rfc_input, "VTWEG", vtweg, vtweg)
        add_report_selection(rfc_input, "SPART", spart, spart)

        add_report_selection(rfc_input, "XDSCR", "X")


        ' Request data
        ic.RfcRequest("RFDABL00_NACC", "H", rfc_input, rfc_output)


        ' Buld up HTML output table
        Dim sb As New StringBuilder


        sb.Append("<div style='text-align:center; font-size:12pt;
            font-weight:bold; margin: 10px 0px 10px 5px; color:#606060;'>")
        AppendString(sb, _
                ic.MessageText("REPORT_CHANGES_TITLE", vkorg, vtweg, spart))
        sb.Append("<br>")
        sb.Append("<br>")
        sb.Append("</div>")

        For Each line As addonsimplestring In rfc_output
            sb.Append(line.content)
        Next

        ' Clear input/output
        rfc_input.Clear()
        rfc_output.Clear()


        Return sb.ToString

    End Function

Damit sieht die Ausgabe allerdings noch etwas blass aus:


Insbesondere auf dem iPad ist die Schrift in den SAP-Standard-Farben etwas schlecht lesbar. Wir definieren deshalb ein neues HTML-Layout für die Reportausgabe unter dem Namen /GUIXT/WEBREPORTING_CIS (vorgehen siehe nächster Abschnitt) und geben es beim Aufruf des Reports mit. Statt

' Request data
ic.RfcRequest(
"RFDABL00_NACC", "H", rfc_input, rfc_output)

heißt es dann

' Request data
ic.RfcRequest(
"RFDABL00_NACC./GUIXT/WEBREPORTING_CIS", "H", rfc_input, rfc_output)

d.h. Sie nennen das gewünschte Layout hinter dem Reportnamen, durch "." getrennt. Damit sieht es dann z.B. wie folgt aus:

 

Sie können auch ein reines schwarz-weiß Design "ZZ_CIS_GRAY"  definieren (siehe nächster Abschnitt), das zum Ausdrucken gut geeignet ist:

Aufruf dann mit

' Request data
ic.RfcRequest(
"RFDABL00_NACC.ZZ_CIS_GRAY", "H", rfc_input, rfc_output)

 

Anpassen des Standard-HTML-Layouts für ABAP-Reports in SAP

CIS mobile benutzt zum Erzeugen der HTML-Form die Funktionsbausteine des "Web Reporting" im SAP-Systems. Eine Beschreibung finden Sie z.B. in

Web Reporting



Es ist nicht nötig, das Umfeld des Web Reporting (ICF Service des ITS) zu aktivieren, da CIS mobile die Funktionsbausteine zum Erzeugen der HTML-Berichte direkt aufruft, nicht über einen Web Service.

Zum Anlegen eines eigenen Layouts gehen Sie wie folgt vor (siehe auch Attribute für Web-Reporting-

Templates ändern):

Starten Sie Transaktion SMW0, dort F8 (Suche) drücken.

 

Geben Sie die SAP Standardschablone WEBREPORTING_REPORT als Name ein, dann F8.

 

Wir ändern die Standardschablone nicht ab, sondern legen eine Kopie an. Dazu die Zeile mit WEBREPORTING_REPORT auswählen und den Kopieren-Button drücken.

 

Als Name z.B. ZZ_CIS_GRAY:

 

Dann zurück und ZZ_CIS_GRAY als Objektname eingeben. Die Zeile mit ZZ_CIS_GRAY auswählen und "Ändern" klicken. Es wird das Reporting-Template angezeigt:

 

 

Wir löschen alles bis auf die Zeile <!listbody!> und sichern anschliessend.

 

Al nächstes in der Toolbar das Icon für "Attribute" anklicken, oder Strg+F9:

 

Hier können Sie die gewünschten Farben als RGB-Werte definieren,z.B. alles in Grautöne verwandeln.  Die Beschreibung dazu bei SAP: Attribute für Web-Reporting-Templates

 

 

 

Zusatzparameter

Keine Zusatzparameter.