report

[Former Member]

i hav to display one field by using logic:Logic 1 - Pass the value of PSP_NR(QMEL) as the field PSPNR(PRPS) and get PSPHI(PRPS) and pass the value as input for field PSPNR(PROJ) and display the value of POST(PROJ) kan someone help me out ..how to do this

[Former Member]

Hi,

check this logic,

***********

select psp_nr from qmel into table it_qmel.

select psphi pspnr from prps into table it_prps for all entries in it_qmel where pspnr = it_qmel-psp_nr.

select pspnr post from proj into table it_proj for all entries in it_prps where pspnr = it_prps-pspnr.

****************

Reward if it is helpful.

Regards,

Bhanu

[Former Member]

hi do like this ...

you can relate the tables PRPS and QMEL with the field OBJNR

and use the fields to combine two tables PRPS and PROJ with PSPNR and POST1 fileds.

regards,

venkat

[Former Member]

kan you give me code please

[Former Member]

REFRESH gt_qmel.

SELECT qmnum

qmart

qmtxt

erdat

qwrnum

psp_nr

fertaufnr

ebeln

ebelp

matnr

mblnr

arbpl

ekorg

bkgrp

objnr

pnlkn

fertaufpl

qmcod

qmnam

ernam

zz_short_text

prueflos

FROM qmel

INTO CORRESPONDING FIELDS OF TABLE gt_qmel

WHERE qmnum EQ p_qmnum.

SELECT vornr

ltxa1

aufpl

plnkn

FROM afvc INTO CORRESPONDING FIELDS OF TABLE gt_afvc FOR

ALL ENTRIES IN gt_qmel WHERE

aufpl EQ gt_qmel-fertaufpl AND

plnkn EQ gt_qmel-pnlkn.

SELECT maktx

matnr

FROM makt INTO CORRESPONDING FIELDS OF TABLE gt_makt FOR

ALL ENTRIES IN gt_qmel WHERE

matnr EQ gt_qmel-matnr AND

spras EQ sy-langu.

SELECT qmartx

qmart

FROM tq80_t INTO CORRESPONDING FIELDS OF TABLE gt_tq80_t

FOR ALL ENTRIES IN gt_qmel WHERE

qmart EQ gt_qmel-qmart AND

spras EQ sy-langu.

SELECT code

katalogart

codegruppe

kurztext

FROM qpct INTO CORRESPONDING FIELDS OF TABLE gt_qpct

FOR ALL ENTRIES IN gt_qmel WHERE

code EQ gt_qmel-qmcod

AND katalogart EQ 'T'

AND codegruppe EQ 'INSPTYPE'.

SELECT pspnr

psphi

FROM prps INTO CORRESPONDING FIELDS OF TABLE gt_prps

FOR ALL ENTRIES IN gt_qmel WHERE

pspnr EQ gt_qmel-psp_nr.

IF sy-subrc EQ 0.

SELECT pspnr

post1

FROM proj INTO CORRESPONDING FIELDS OF TABLE gt_proj

FOR ALL ENTRIES IN gt_prps WHERE

pspnr EQ gt_prps-psphi.

ENDIF.

SELECT stat

FROM jest INTO CORRESPONDING FIELDS OF TABLE gt_jest FOR

ALL ENTRIES IN gt_qmel WHERE

objnr EQ gt_qmel-objnr

AND stat EQ 'E*'

AND inact <> 'X'.

SELECT stsma FROM jsto INTO CORRESPONDING FIELDS OF TABLE gt_jsto

FOR ALL ENTRIES IN gt_qmel WHERE

objnr EQ gt_qmel-objnr.

SELECT txt04

txt30

• estat

FROM tj30t INTO CORRESPONDING FIELDS OF TABLE

gt_tj30t FOR ALL ENTRIES IN gt_jsto

WHERE stsma EQ gt_jsto-stsma

• AND estat EQ gt_jest-stat

AND spras EQ sy-langu.