Skip to Content
0
Former Member
Jan 07, 2008 at 07:51 AM

Code not working

35 Views

Hi All,

Please help me. The below code is not displaying the report.

AT SELECTION-SCREEN.

CASE sy-ucomm.

WHEN 'UACR'.

PERFORM PROCESS_UACR.

ENDCASE.

.

form PROCESS_UACR .

DATA: lt_dupreg_new TYPE TABLE OF zdvmt_dupreg WITH HEADER LINE,

ls_dupreg_new TYPE zdvmt_dupreg,

lt_irnum TYPE TABLE OF zdvmt_i_record WITH HEADER LINE,

lt_product TYPE TABLE OF zdvmt_product WITH HEADER LINE,

ls_email TYPE zdvmt_emailid.

SELECT * FROM zdvmt_dupreg

INTO TABLE lt_dupreg_new

WHERE acr = 'U'.

SORT lt_dupreg_new BY bpsetno .

FORMAT COLOR COL_POSITIVE.

WRITE: /1 'RECNO',

8 'SETNO',

17 'BPNO',

28 'BPGUID',

68 'FIRSTNAME',

88 'LASTNAME',

108 'BU_SORT1',

128 'BU_SORT2',

  • 148 'EMAIL',

148 'TELEPHONE1',

163 'TELEPHONE2',

178 'TELEPHONE3',

193 'COUNTRY',

201 'CreateUser',

218 'CreateDate',

235 'CreateTime',

250 'CHANGEDBY',

266 'CHANGEDDate',

284 'CHANGEDTIME',

300 'CIDNUMBER',

320 'ACR',

325 'SETCODE',

333 'EMAIL',

363 'STD_NO',

370 'PRODUCTGUID',

405 'PRODCUTNO',

420 'SERIALNO',

430 'CREATEDBY',

445 'CREATEDAT',

465 'IRNUMBER',

480 'CREATED_BY',

495 'CREATED_AT'.

SORT lt_dupreg_new BY bpsetno bpno.

LOOP AT lt_dupreg_new INTO ls_dupreg_new.

AT NEW BPSETNO.

FORMAT COLOR COL_BACKGROUND.

ENDAT.

WRITE: /1 ls_dupreg_new-recno,

8 ls_dupreg_new-bpsetno, 17 ls_dupreg_new-bpno, 28

ls_dupreg_new-bpguid, 68 ls_dupreg_new-firstname, 88

ls_dupreg_new-lastname,

108 ls_dupreg_new-bu_sort1, 128 ls_dupreg_new-bu_sort2,

148 ls_dupreg_new-phone1, 163

ls_dupreg_new-phone2, 178 ls_dupreg_new-phone3,

193 ls_dupreg_new-country, 201 ls_dupreg_new-crusr,

218 ls_dupreg_new-crdat, 235 ls_dupreg_new-crtim,

250 ls_dupreg_new-chusr, 266 ls_dupreg_new-chdat,

284 ls_dupreg_new-chtim, 300 ls_dupreg_new-cidnumber,

320 ls_dupreg_new-acr, 325 ls_dupreg_new-setcode.

lv_setno = ls_dupreg_new-bpsetno.

ENDLOOP.

ENDFORM.