at line selection con call transaction
Hola, buenas a todos:
Tengo una duda, estoy sacando un listado simple con varios registros y quiero que una vez sea pinchado uno determinado se haga un call transaction cogiendo un campo de ese registro seleccionado. El problema es que no me llega a lanzar el call transaction y no veo cual es el problema.
Os dejo el código, a ver si algún alma caritativa me puede ayudar.
Gracias.
tables: caufv, qals.
data: va_aufnr like caufv-aufnr.
data: begin of it_aufnr occurs 0,
aufnr like caufv-aufnr.
data: end of it_aufnr.
data: begin of it_trazbi_sem occurs 0,
charg like qals-charg,
prueflos like qals-prueflos.
data: end of it_trazbi_sem.
SELECTION-SCREEN BEGIN OF BLOCK B0 WITH FRAME.
PARAMETERS: Ciclo like caufv-cy_seqnr OBLIGATORY.
SELECTION-SCREEN END OF BLOCK B0.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR ciclo.
START-OF-SELECTION.
perform selection.
end-of-SELECTION.
set PF-STATUS 'ZSTATUSTRAZABILIDAD'.
perform write.
at LINE-SELECTION.
if not it_trazbi_sem-prueflos is initial.
SET PARAMETER ID 'QLS' FIELD it_trazbi_sem-prueflos.
call TRANSACTION 'QA13' and SKIP FIRST SCREEN.
else.
MESSAGE s001(z1).
endif.
form selection.
select aufnr
from caufv
into CORRESPONDING FIELDS OF TABLE it_aufnr
WHERE cy_seqnr = ciclo.
SELECT charg prueflos
from qals
into CORRESPONDING FIELDS OF table it_trazbi_sem
FOR ALL ENTRIES IN it_aufnr
where aufnr = it_aufnr-aufnr.
endform.
form write.
loop at it_trazbi_sem.
write: /, at 10 it_trazbi_sem-charg,
at 30 it_trazbi_sem-prueflos HOTSPOT.
hide it_trazbi_sem-prueflos.
endloop.
clear it_trazbi_sem.
endform.
|