topic Re: URGENT in Application Development and Automation Discussions

URGENT

harri_kishan — Mon, 16 Apr 2007 08:19:31 GMT

HI,

a sub-header is printed out for every change in MRP Type (DISMM). I WANT TO have the code inserted after the sub-header for every change in the MRP Controller (DISPO).SO HOW TO USE THE AT EVENT IN THE LOOP.

Re: URGENT

Former Member — Mon, 16 Apr 2007 08:23:10 GMT

i am not enough clear about your requirement but it seems to me you want to use control break statement...

try like this

loop at itab.

at new dispo.

write : / 'New item'.

endat.

endloop.

regards

shiba dutta

Re: URGENT

Former Member — Mon, 16 Apr 2007 08:29:41 GMT

Hi..

Loop at itab.

on change of DISPO. <write ur code>.

endon.

endloop.

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

ON CHANGE

Introduces a new branch.

Syntax

ON CHANGE OF <f> [OR <f1> OR <f2>...].Opens an ON control structure, which ends with ENDON. The statement block is executed whenever the contents of the field <f> or one of the other fields <fi> has changed since the statement was last executed.

Re: URGENT

Former Member — Mon, 16 Apr 2007 08:30:34 GMT

Hai,

loop at itab.

ON CHANGE OF ITAB-DISPO.

/* Insert your new code here.

ENDON.

endloop.

Hope your problem could be solved.

Reward points if it helps you.

Regds,

Rama.Pammi

Re: URGENT

harri_kishan — Mon, 16 Apr 2007 08:33:41 GMT

THE CODE IS THIS CAN U CORRECT IT SO THAT IT CHECKS FOR THE CONDITIONS OF PLANT, DISMM, DISPO. SO IF ANY OF THE FIELD CHANGES A SUB-HEADER SHUD BE GENERATED UNDER THE PLANT .

LOOP AT TA_MAT.

ON CHANGE OF TA_MAT-WERKS.

NEW-PAGE.

ON CHANGE OF TA_MAT-DISPO.

FORMAT COLOR 7.

NEW-LINE NO-SCROLLING.

WRITE : / 'Plant: ', TA_MAT-WERKS,

20 'MRP Ctlr: ', TA_MAT-DISPO,

40 'MRP Type: ', TA_MAT-DISMM, 224 ' '.

FORMAT RESET.

ENDON.

WRITE : /1 TA_MAT-MATNR COLOR 1,

TA_MAT-MAKTX COLOR 1,

61(4) TA_MAT-DISMM COLOR 1,

TA_MAT-MEINS COLOR 1,

TA_MAT-EISBE COLOR 1,

TA_MAT-MINBE COLOR 1,

WRITE : 106(4) TA_MAT-DISLS COLOR 1,

111 TA_MAT-PLIFZ COLOR 1,

TA_MAT-MTH1 COLOR 1,

TA_MAT-MTH2 COLOR 1,

TA_MAT-MTH3 COLOR 1,

TA_MAT-MTH4 COLOR 1,

TA_MAT-MTH5 COLOR 1,

TA_MAT-MTH6 COLOR 1.

loop at ta_tmp4 where matnr = ta_mat-matnr and

werks = ta_mat-werks.

if ta_tmp4-LMINB <> 0 or ta_tmp4-LBSTF <> 0.

write: /61 ta_tmp4-lgort color 1 intensified on,

65 ta_tmp4-lminb color 1 intensified on,

83 ta_tmp4-lbstf color 1 intensified on.

endif.

endloop.

ENDLOOP.

Re: URGENT

Former Member — Mon, 16 Apr 2007 08:39:56 GMT

if your int table fields are in PLANT, DISMM, DISPO oreder then you have to write at new dispo.. it will trigger if PLANT, DISMM, DISPO any one will change from its previous row...

data : wamat like ta_mat.

LOOP AT TA_MAT.

move-corresponding ta_mat to wamat

at new DISPO.

NEW-PAGE.

FORMAT COLOR 7.

NEW-LINE NO-SCROLLING.

WRITE : / 'Plant: ', wamat-WERKS,

20 'MRP Ctlr: ', wamat-DISPO,

40 'MRP Type: ', wamat-DISMM, 224 ' '.

FORMAT RESET.

endat.

WRITE : /1 TA_MAT-MATNR COLOR 1,

TA_MAT-MAKTX COLOR 1,

61(4) TA_MAT-DISMM COLOR 1,

TA_MAT-MEINS COLOR 1,

TA_MAT-EISBE COLOR 1,

TA_MAT-MINBE COLOR 1,

WRITE : 106(4) TA_MAT-DISLS COLOR 1,

111 TA_MAT-PLIFZ COLOR 1,

TA_MAT-MTH1 COLOR 1,

TA_MAT-MTH2 COLOR 1,

TA_MAT-MTH3 COLOR 1,

TA_MAT-MTH4 COLOR 1,

TA_MAT-MTH5 COLOR 1,

TA_MAT-MTH6 COLOR 1.

loop at ta_tmp4 where matnr = ta_mat-matnr and

werks = ta_mat-werks.

if ta_tmp4-LMINB <> 0 or ta_tmp4-LBSTF <> 0.

write: /61 ta_tmp4-lgort color 1 intensified on,

65 ta_tmp4-lminb color 1 intensified on,

83 ta_tmp4-lbstf color 1 intensified on.

endif.

endloop.

ENDLOOP.

regards

shiba dutta

Re: URGENT

harri_kishan — Mon, 16 Apr 2007 08:41:30 GMT

if we have to check more than one field in the condition so then how do we use ( on change ) like i have to check two fields simulataneously for outputing data.

Re: URGENT

harri_kishan — Tue, 17 Apr 2007 07:58:49 GMT

thanks a lot ur answers solved them thank you