30.1.11

SAP The program RFUSVS10, which compiles the annual activity list for the Spanish tax authorities (form 347), does not group customers or vendors with

Symptom:

In der Rückrechnungsperiode werden generell alle Erstattungsanträge als "korrigiert" gekennzeichnet.
Laut Auskunft verschiedener Gebietskrankenkassen dürfen in der Rückrechnungsperiode nur jene Erstattungsanträge als "korrigiert" (als Berichtigung) gekennzeichnet werden, die in der Originalperiode bereits vorhanden waren.
Neu in der Rückrechnungsperiode hinzugekommene Abwesenheiten gelten somit als "neue Abwesenheiten".

Weitere Begriffe
Ursache und Voraussetzungen

Diese Meinung der Gebietskrankenkassen deckt sich nicht mit den Aussagen des Hauptverbandes der Sozialversicherungsträger und wurde bislang im Report nicht berücksichtigt.

Lösung
Bitte führen Sie die mit "<<<==========" besonders gekennzeichneten Änderungen durch und generieren Sie danach den Report RPCEFZA0.

Sonstiger Handlungsbedarf:
Bitte löschen Sie die betroffenen Abrechnungsperioden aus der Datenbank PCL2, Cluster EF, und erstellen Sie diese neu (mittels Report RPCEFZA0).

Betroff. Member: RPCEFCA0

FORM RECALCULATIONS.

* CORRID = STAR. "Korrektur kennz. <<<========

* nun werden alle AbrPerioden bis zur tiefsten Rueckrechnungsperiode
* naeher untersucht --->> Ermittlung eines Deltas
LOOP AT R549Q.
...
...
ENDFORM.
FORM GET_EFZ_DETAILS USING $DATE $FOUND.

$FOUND = FALSE. "assume - keine Daten gefunden

PERFORM CHECK_AUSVA USING ASVGR "SV-Anstalt bei DTA? <<<========
AUSVA SUCCESS. "<<<========
CHECK: SUCCESS = TRUE. "alles OK?

PERFORM GET_DYNARG USING RET_CODE. "Variables Argument bestimmen
...
...
ENDFORM.


FORM CHECK_AUSVA USING $ASVGR $AUSVA $FOUND. "<<<========

$FOUND = TRUE. "assume - alles OK

CHECK: NOT ASVGRDTA IS INITIAL AND "SV-Anstalt als Parameter
NOT AUSVADTA IS INITIAL, "vorgegeben?
* ASVGR <> ASVGRDTA OR <<<========
$ASVGR <> ASVGRDTA OR "SV mit aktueller <<<========
* AUSVA <> AUSVADTA. <<<========
$AUSVA <> AUSVADTA. "nicht identisch? <<<========

$FOUND = FALSE. "assume - nicht alles OK
ENDFORM.


FORM COMPARE_CLUSTER.

* alle bereits ausgestellten Erstattungsantraege bearbeiten
LOOP AT OFORML.
* Storno bei Datentraegeraustausch, nur falls auch <<<========
* richtige Sozialversicherungsanstalt vorhanden <<<========
PERFORM CHECK_AUSVA USING OFORML-ASVGR "<<<========
OFORML-AUSVA FOUND. "<<<========
CHECK: FOUND = TRUE. "richtige SV? <<<========

PERFORM COMPARE_ENTRY USING FOUND.
...
...
ENDFORM.
FORM COMPARE_ENTRY USING $EQUAL.

$EQUAL = FALSE. "assume: Ungleichheit

* Vergleich mit allen aktuellen Erstattungsantraegen
LOOP AT FORML
WHERE AVBEG = OFORML-AVBEG "gleiches Intervall
...
... gleiche Uhrzeit(en)
AND BETRG = OFORML-BETRG. "identischer Betrag
$EQUAL = TRUE. "Antraege identisch
* DELETE FORML. " <<<========
FORML-KORRK = 'D'. "Antraege markieren <<<========
MODIFY FORML. "und sichern <<<========
EXIT. "Verarbeitung beenden
ENDLOOP.
ENDFORM.


Betroff. Member: RPCEFLA0

FORM FILL_EXTRACT.

* alle Eintraege des Clusters EF bearbeiten
LOOP AT FORML " <<<========
WHERE KORRK <> 'D'. " <<<========
CLEAR: FORM.
...
...
ENDFORM.

No comments:

Post a Comment