Tweet
Necesito ayuda, no tengo ni idea de como sacar la informacion de PY (payroll), ya he podido ver muchas tablas pero las PCL1 y PCL2 que es donde supuestamente queda la informacion de la liquidacion de la nomina no se como hacerlo, necesito sacar un listado de todos los empleados y poner en frente el salario liquidado con todos los conceptos, por favor el que sepa me da una mano, de como consultar, que lineas de codigo debo incluir, gracias
-
-
Aqui te dejo un paste de como acceder a los resultados de nomina
*DECLARACIONES
************************************************** *********************
* TABLAS Y POOLS *
************************************************** *********************
TABLES: pcl1,
pcl2,
bnka,
pernr.
INFOTYPES 0001.
TYPE-POOLS: pesu0,
pest0.
************************************************** *********************
* INCLUDES *
************************************************** *********************
INCLUDE rpppxd00.
INCLUDE rpppxd10.
INCLUDE rpc2cd09.
INCLUDE rpc2rx00.
INCLUDE rpppxm00.
INCLUDE rpc2ree0.
INCLUDE rpcmgr00.
**TE TRAES LOS RESULTADOS DE NOMINA
FORM lee_nomina.
CLEAR rgdir.
REFRESH rgdir.
PERFORM cd_manager USING pernr-pernr "Nº Personal
space "Payroll subunit
p_period "Período
space "Inicio del Período
space "Final del Período
space "payroll subunit in
space "Modificador de perídos
space "PerEn (Con Retros)
space "FinalEn
space "Legal Entity
'A' "Actual, Previous, Old
space "CD-TYPE
'R' "action
cod. "Código de retorno
ENDFORM. " lee_nomina
**ACCEDER A LAS TABLAS CLUSTER RT,BT....
LOOP AT rgdir WHERE fpper = p_period AND srtza = 'A'.
rp-init-buffer.
rx-key-pernr = pernr-pernr.
UNPACK rgdir-seqnr TO rx-key-seqno.
rp-imp-c2-re.
*LECTURA DE LA RT POR UN DETERMINADO CONCEPTO.
LOOP AT rt WHERE lgart = i_t512z-lgart.
ENDLOOP.
ENDLOP
Espero que te sirva de ayuda!
Saludos.
Comentario