topic Re: How to read Process Orders in Application Development and Automation Discussions

How to read Process Orders

Former Member — Thu, 23 Aug 2007 14:44:17 GMT

Hi Experts,

I got confusion in reading process orders for the list of material numbers which is in internal table, my functional gave the following tables and wants to me perform join..

caufv,afpo and just

what is the relation between this table,if any body give code sample i appreciate it.

Regards,

babu

Re: How to read Process Orders

Former Member — Thu, 23 Aug 2007 14:54:00 GMT

Hi babu,

do you mean jest OR just?

If you mean jest, try SQVI with a join and insert these tables than

you get the information.

I think it's aufnr and objnr.

Regards, Dieter

Re: How to read Process Orders

Former Member — Thu, 23 Aug 2007 14:54:22 GMT

SELECT * FROM CAUFV INTO TABLE T_CAUFV
                  FOR ALL ENTRIES IN T_ITAB
                      WHERE PLNBEZ = T_ITAB-MATNR.
IF SY-SUBRC = 0.
  SELECT * FROM AFPO INTO TABLE T_AFPO
        FOR ALL ENTRIES IN T_CAUFV
              WHERE AUFNR = T_CAUFV-AUFNR.
  
  SELECT * FROM JEST INTO TABLE T_JEST
       FOR ALL ENTRIES IN T_CAUFV
              WHERE OBJNR = T_CAUFV-OBJNR.
ENDIF.

Max

Re: How to read Process Orders

Former Member — Thu, 23 Aug 2007 15:02:00 GMT

Hi,

In addition to that i must read the process orders which does not have the status 'TECO' 'DLFL','CLSD' 'DLV', from where i will got these status.

Plz help me out.

Thanks and Regards

babu

Re: How to read Process Orders

Former Member — Thu, 23 Aug 2007 15:11:01 GMT

I believe the status code is in table TJ02T, it should be the short text TXT04.

So u should check the real code ISTAT linked to your status: TECO, DLFL, CLSD, DLV:

SELECT * FROM CAUFV INTO TABLE T_CAUFV
                  FOR ALL ENTRIES IN T_ITAB
                      WHERE PLNBEZ = T_ITAB-MATNR.
IF SY-SUBRC = 0.
  SELECT * FROM AFPO INTO TABLE T_AFPO
        FOR ALL ENTRIES IN T_CAUFV
              WHERE AUFNR = T_CAUFV-AUFNR.
    
  SELECT * FROM JEST INTO TABLE T_JEST
       FOR ALL ENTRIES IN T_CAUFV
              WHERE OBJNR = T_CAUFV-OBJNR.
ENDIF.

SELECT * FROM TJ02T WHERE SPRAS = SY-LANGU
                      AND ( TXT04 = 'TECO' OR 
                            TXT04 = 'DLFL' OR 
                            TXT04 = 'CLSD' OR
                            TXT04 = 'DLV' ).  
  R_STAT(3)  = 'IEQ'.
  R_STAT-LOW = TJ02T-ISTAT.
  APPEND R_STAT.
ENDSELECT.

LOOP AT T_CAUFV.
  LOOP AT T_JEST WHERE OBJNR = T_CAUFV-OBJNR
                   AND STAT  IN R_STAT.
    EXIT.
  ENDLOOP.
  IF SY-SUBRC = 0.
    DELETE T_AUFNR.
    DELETE T_JEST WHERE OBJNR = T_CAUFV-OBJNR.
    DELETE T_AFPO WHERE AUFNR = T_CAUFV-AUFNR. 
  ENDIF.
ENDLOOP.

Max

Re: How to read Process Orders

Former Member — Thu, 23 Aug 2007 15:21:34 GMT

Hi Max,

Thanks alot for the quick replies, how to join tj02t and the rest of table's i am not able to find any related fields.

Thanks and Regards,

babu

Re: How to read Process Orders

Former Member — Thu, 23 Aug 2007 15:25:05 GMT

SELECT * FROM CAUFV INTO TABLE T_CAUFV

FOR ALL ENTRIES IN T_ITAB

WHERE PLNBEZ = T_ITAB-MATNR.

IF SY-SUBRC = 0.

SELECT * FROM AFPO INTO TABLE T_AFPO

FOR ALL ENTRIES IN T_CAUFV

WHERE AUFNR = T_CAUFV-AUFNR.

SELECT * FROM JEST INTO TABLE T_JEST

FOR ALL ENTRIES IN T_CAUFV

<b> WHERE OBJNR = T_CAUFV-OBJNR

and stat in ('TECO' ,'DLFL','CLSD', 'DLV').</b>

ENDIF.

Re: How to read Process Orders

Former Member — Thu, 23 Aug 2007 15:32:36 GMT

The link between CAUFV and JEST is field OBJNR: JEST-OBJNR = CAUFV-OBJNR.

The link between JEST and TJ02T are the fields STAT and ISTAT:

TJ02T-ISTAT = JEST-STAT.

Max