Autofacturacion - RFKORDES -

[akane]

Hola, en qué versión no funcionan los otros?
Si miro el código de programa en la 4.6C veo lo siguiente:

* Take only tax codes that are relevant for self invoices
SELECT * FROM bset
WHERE bukrs = bkpf-bukrs
AND belnr = bkpf-belnr
AND gjahr = bkpf-gjahr.

SELECT SINGLE * FROM t007a INTO l_t007a
WHERE kalsm = si_kalsm
AND mwskz = bset-mwskz.

IF ( l_t007a-egrkz CA '91378' AND sy-subrc = 0 ) "N612389
AND bset-ktosl = lwa_ides_si-ktosl." KtoSchl aus Cust.
MOVE-CORRESPONDING bset TO hbset.
APPEND hbset.
ENDIF.

ENDSELECT.

Parece que coge los siguientes: '91378'

Saludos,

[alxixon]

SELECT SINGLE * FROM t007a INTO l_t007a
WHERE kalsm = si_kalsm
AND mwskz = bset-mwskz.
* Changes acc. to Real Decree 1496/2003 - note 767548
IF ( l_t007a-egrkz CA ' 239' AND sy-subrc = 0 )
AND bset-ktosl = lwa_ides_si-ktosl." KtoSchl aus Cust.
MOVE-CORRESPONDING bset TO hbset.
APPEND hbset.
ENDIF.

* Article and law is different for Services and Waste Materials
* Define the text for the form
IF l_t007a-egrkz = '2' or l_t007a-egrkz = '3'. "services
MOVE 'IVA/84/2_SE' TO law_text.
ELSEIF l_t007a-egrkz = '9'. "waste materials
MOVE 'IVA/84/2_WA' TO law_text.
ENDIF.
ENDSELECT.

[ctr650]

Muchisimas gracias, me ha sido de mucha utilidad.

[almaffi]

Hola

He configurado la autofactura y puedo imprimir las cartas sin problema. La única duda que tengo es el comentario:


"1.Solicitar correspondencia por la FB12. De esta manera se rellena la tabla BKORM con la clase de correspondencia SAPE1."

Realmente yo esperaba que este paso fuese necesario para todas las autofacturas que se crean en el sistema. Pero realmente una vez hecho este paso para una compañía dada, ya nunca más lo has de hacer (al menos lo he comprobado en nuestro entorno de test).

¿A alguno de vosotros le pasa lo mismo? ¿Saben si hay alguna manera de hacer que este paso nunca sea necesario?

Gracias por la ayuda,
Almaffi