MUNDOSAP

Regresar   MUNDOSAP > DESARROLLO > Programación ABAP IV
Nombre de Usuario
Contraseña
Home Descargas Registrar FAQ Miembros Calendario Buscar Temas de Hoy Marcar Foros Como Leídos




 
Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Viejo 14/06/10, 19:15:43
fespinosa fespinosa is offline
Junior Member
 
Fecha de Ingreso: ene 2009
Mensajes: 3
Reporte PM, problemas LEFT JOIN

Hola!!! Tengo el siguiente programa en el cual necesito hacer un reporte que contenga lo siguiente: numero de aviso, solicitud de pedido, petición oferta, pedido sin embargo si un equipo no tiene aun pedido necesito que aparezca en el listado

este es mi programa:

REPORT ZPM_CV_BIT.

TYPES: BEGIN OF struc_type,
EQUNR TYPE AFIH-EQUNR,
AUFNR TYPE AFIH-AUFNR,
* ADDAT TYPE AFIH-ADDAT,
QMNUM TYPE AFIH-QMNUM,
* STORT TYPE MCIPMIS-STORT,
* TPLNR TYPE MCIPMIS-TPLNR,
* BUKRS TYPE ANLA-BUKRS,
* ANLN1 TYPE ANLA-ANLN1,
* ANLN2 TYPE ANLA-ANLN2,
BANFN TYPE EKPO-BANFN,
ANFNR TYPE EKPO-ANFNR,
EBELN TYPE EKET-EBELN,
NETPR TYPE EKPO-NETPR,
EBELNK TYPE EKKO-EBELN,
END OF struc_type.


DATA : TI_TYPE TYPE TABLE OF struc_type,
wa_type TYPE struc_type.

SELECT A~EQUNR A~AUFNR A~QMNUM
* A~ADDAT M~STORT
* AN~BUKRS AN~ANLN1 AN~ANLN2
K~BANFN K~ANFNR T~EBELN K~NETPR
INTO CORRESPONDING FIELDS OF TABLE TI_TYPE
FROM MCIPMIS AS M
JOIN AFIH AS A ON A~EQUNR = M~EQUNR
JOIN ANLA AS AN ON AN~BUKRS = M~BUKRS AND AN~ANLN1 = M~ANLNR AND AN~ANLN2 = M~ANLUN
JOIN FLEET AS F ON F~OBJNR = M~OBJNR
JOIN EBKN AS E ON E~AUFNR = A~AUFNR
LEFT JOIN EKPO AS K ON K~BANFN = E~BANFN
LEFT JOIN EKET AS T ON T~BANFN = E~BANFN
JOIN EKKO AS KK ON K~EBELN = KK~EBELN
ORDER BY A~AUFNR.


LOOP AT TI_TYPE INTO WA_TYPE. WRITE:
WA_TYPE-EQUNR,
WA_TYPE-AUFNR,
* WA_TYPE-ADDAT,
WA_TYPE-QMNUM,
* WA_TYPE-STORT,
* WA_TYPE-TPLNR,
* WA_TYPE-BUKRS,
* WA_TYPE-ANLN1,
* WA_TYPE-ANLN2,
WA_TYPE-BANFN,
WA_TYPE-ANFNR,
* WA_TYPE-ANFNR,
WA_TYPE-EBELN,
WA_TYPE-NETPR,/
WA_TYPE-EBELNK.
endloop.

El resultado es:
AFIH-EQUNR AFIH-AUFNR AFIH-QMNUM EKPO-BANFN EKPO-ANFNR EKET-EBELN EKPO-NETPR
20001678 4000000 10000000 1700000000 6070000000 4710000315 6.00
20001678 4000000 10000000 1700000000 6070000000 6070000000 6.00
20001613 4000001 10000001 1700000001 6070000001 4710000651 7.00
20001613 4000001 10000001 1700000001 6070000001 6070000001 7.00
20001550 4000005 10000005 1700000005 6070000005 4710000268 11.00
20001550 4000005 10000005 1700000005 6070000005 6070000005 11.00
20001671 4000012 10000013 1700000012 6070000012 4710000127 5.00
20001671 4000012 10000013 1700000012 6070000012 6070000012 5.00

El resultado que necesito es:
AFIH-EQUNR AFIH-AUFNR AFIH-QMNUM EKPO-BANFN EKPO-ANFNR EKET-EBELN EKPO-NETPR
20001678 4000000 10000000 1700000000 6070000000 4710000315 6.00
20001613 4000001 10000001 1700000001 6070000001 4710000651 7.00
20001739 4000002 10000002 1700000002 6070000002
20001565 4000003 10000003 1700000003 6070000003
20001609 4000004 10000004 1700000004 6070000004
20001550 4000005 10000005 1700000005 6070000005 4710000268 11.00
20001545 4000006 10000006 1700000006 6070000006

Ojala q alguien pueda ayudarme.. gracias.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Reglas de Mensajes
no puedes crear nuevos temas
no puedes responder temas
no puedes adjuntar archivos
no puedes editar tus mensajes

El código vB está On
Las caritas están On
Código [IMG] está On
Código HTML está Off
Saltar a Foro


Husos Horarios son GMT. La hora en este momento es 12:54:18.


www.mundosap.com 2006 - Spain
software crm, crm on demand, software call center, crm act, crm solutions, crm gratis, crm web