Print icon not working

Hi All,
I have developed a program to display two alv reports. The program when executed displays the first report and on the click of a push button it wud display the second report. The standard icons are all working in the first report but few icons like print, local file save are not working in the second screen. Can anyone help me on this?
REPORT  ZMY20FCORD    MESSAGE-ID 8I.
ALV
TYPE-POOLS: SLIS.
DATA: TXT_REPORT LIKE DOKHL-OBJECT.   "Reportname für Erläuterungsaufruf
DATA: GT_FIELDCAT         TYPE SLIS_T_FIELDCAT_ALV,
      GT_EVENTS           TYPE SLIS_T_EVENT,
      GT_SORT             TYPE SLIS_T_SORTINFO_ALV,
      GT_LIST_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER,
      GS_LAYOUT           TYPE SLIS_LAYOUT_ALV.
TABLES                 ABAP Internal     Table definitions
TABLES : T001, T001W, T005, TVST, ZMY20PROD, ZMY20WKFC, TVKO, ZMY20RMRK,
         ZMY20FCVER,    ZMY20GP, VBAK, VBAP, VBEP, VBPA, KNA1.
INTERNAL TABLES (i_):  ABAP Internal     Internal Table definitions
DATA: I_ZMY20WKFC LIKE ZMY20WKFC OCCURS 0 WITH HEADER LINE.
DATA: BEGIN OF I_VBAK OCCURS 0,
        VBELN    LIKE VBAK-VBELN,
        KUNNR    LIKE VBAK-KUNNR,    " Sold-to-Party
      END OF I_VBAK.
DATA: BEGIN OF I_ORDER OCCURS 0,
        VBELN    LIKE VBAK-VBELN,
        POSNR    LIKE VBAP-POSNR,
        ETENR    LIKE VBEP-ETENR,
        KUNNR    LIKE VBAK-KUNNR,    " Sold-to-Party
        MATNR    LIKE VBAP-MATNR,
        WERKS    LIKE VBAP-WERKS,
        VSTEL    LIKE VBAP-VSTEL,
        WMENG    LIKE VBEP-WMENG,
        VRKME    LIKE VBEP-VRKME,
        LDDAT    LIKE VBEP-LDDAT,
        SHIPTO   LIKE VBPA-KUNNR,
        SOLDCN   LIKE KNA1-LAND1,
        SHIPCN   LIKE KNA1-LAND1,
        PRODUCT  LIKE ZMY20PROD-PRODUCT,
        STCSTP   LIKE ZMY20WKFC-STCSTP,
        SPMON    LIKE ZMY20WKFC-SPMON,
        WEEK     LIKE SCAL-WEEK,
        UPDFLG(1) TYPE C,
      END OF I_ORDER.
DATA: BEGIN OF I_SHIPTO OCCURS 0,
        CUSTOMER(20) TYPE C,
        SHIPTO       LIKE VBPA-KUNNR,
      END OF I_SHIPTO.
DATA: BEGIN OF I_OUTPUT OCCURS 0,
        SORTKEY(1) TYPE C,
        STCSTP   LIKE ZMY20WKFC-STCSTP,
        WERKS    LIKE ZMY20WKFC-WERKS,
        SHPPOINT LIKE ZMY20WKFC-SHPPOINT,
        PRODUCT  LIKE ZMY20WKFC-PRODUCT,
        MAKTX    LIKE ZMY20PROD-MAKTX,
        QTY01    LIKE ZMY20WKFC-QTY01,
        ORD01    LIKE ZMY20WKFC-QTY01,
        QTY02    LIKE ZMY20WKFC-QTY01,
        ORD02    LIKE ZMY20WKFC-QTY01,
        QTY03    LIKE ZMY20WKFC-QTY01,
        ORD03    LIKE ZMY20WKFC-QTY01,
        QTY04    LIKE ZMY20WKFC-QTY01,
        ORD04    LIKE ZMY20WKFC-QTY01,
        QTY05    LIKE ZMY20WKFC-QTY01,
        ORD05    LIKE ZMY20WKFC-QTY01,
        QTY06    LIKE ZMY20WKFC-QTY01,
        ORD06    LIKE ZMY20WKFC-QTY01,
        TOTFC1   LIKE ZMY20WKFC-QTY01,
        TOTORD1  LIKE ZMY20WKFC-QTY01,
        FCORD1(5) TYPE P DECIMALS 2,
        QTY07    LIKE ZMY20WKFC-QTY01,
        ORD07    LIKE ZMY20WKFC-QTY01,
        QTY08    LIKE ZMY20WKFC-QTY01,
        ORD08    LIKE ZMY20WKFC-QTY01,
        QTY09    LIKE ZMY20WKFC-QTY01,
        ORD09    LIKE ZMY20WKFC-QTY01,
        QTY10    LIKE ZMY20WKFC-QTY01,
        ORD10    LIKE ZMY20WKFC-QTY01,
        QTY11    LIKE ZMY20WKFC-QTY01,
        ORD11    LIKE ZMY20WKFC-QTY01,
        QTY12    LIKE ZMY20WKFC-QTY01,
        ORD12    LIKE ZMY20WKFC-QTY01,
        TOTFC2   LIKE ZMY20WKFC-QTY01,
        TOTORD2  LIKE ZMY20WKFC-QTY01,
        FCORD2(5) TYPE P DECIMALS 2,
        CELLCOLOR TYPE SLIS_T_SPECIALCOL_ALV,
        DUMMY(1)  TYPE C,
      END OF I_OUTPUT.
DATA: I_COLOUR TYPE LVC_T_SCOL WITH HEADER LINE.
DATA: BEGIN OF I_PRDWISE OCCURS 0,
        SORTKEY(1) TYPE C,
        STCSTP     LIKE ZMY20WKFC-STCSTP,
        PRODUCT    LIKE ZMY20WKFC-PRODUCT,
        MAKTX      LIKE ZMY20PROD-MAKTX,
        TOTFC1     LIKE ZMY20WKFC-QTY01,
        TOTORD1    LIKE ZMY20WKFC-QTY01,
        FCORD1(5)  TYPE P DECIMALS 2,
        DIFF1      LIKE ZMY20WKFC-QTY01,
        TOTFC2     LIKE ZMY20WKFC-QTY01,
        TOTORD2    LIKE ZMY20WKFC-QTY01,
        FCORD2(5)  TYPE P DECIMALS 2,
        DIFF2      LIKE ZMY20WKFC-QTY01,
      END OF I_PRDWISE.
DATA: BEGIN OF I_TVST OCCURS 0,
        VSTEL LIKE TVST-VSTEL,
      END OF I_TVST.
DATA: BEGIN OF T_STCP OCCURS 0,
        SORTKEY(1) TYPE C,
        STCSTP LIKE ZMY20WKFC-STCSTP,
      END OF T_STCP.
DATA: BEGIN OF T_PROD OCCURS 0,
        PRODUCT LIKE ZMY20PROD-PRODUCT,
        MAKTX   LIKE ZMY20PROD-MAKTX,
      END OF T_PROD.
DATA: BEGIN OF T_USER OCCURS 0,
        UNAME LIKE SY-UNAME,
      END OF T_USER.
DATA: I_FIELDS LIKE SVAL OCCURS 0 WITH HEADER LINE.
VARIABLES (v_):          ABAP Internal   Variables definitions
DATA : V_ENDMTH LIKE S125-SPMON,
       V_STRDT1 LIKE SY-DATUM,
       V_STRDT2 LIKE SY-DATUM,
       V_ENDDT1 LIKE SY-DATUM,
       V_ENDDT2 LIKE SY-DATUM,
       V_STRWK1 LIKE SCAL-WEEK,
       V_STRWK2 LIKE SCAL-WEEK,
       V_ENDWK1 LIKE SCAL-WEEK,
       V_ENDWK2 LIKE SCAL-WEEK,
       V_STRMTH LIKE S125-SPMON.    " Only for Report Header
DATA : BEGIN OF I_WEEKS OCCURS 0,
        SLNO       TYPE I,
        WEEKS      LIKE SCAL-WEEK,
        MONTH(2)   TYPE C,
        HDRWK(13)  TYPE C,
       END OF I_WEEKS.
DATA : V_TABIX  LIKE SY-TABIX,
       V_VERSN  LIKE ZMY20WKFC-VERSN,
       V_VKORG  LIKE TVKO-VKORG.
DATA : V_REMARK1    LIKE ZMY20RMRK-REMARK1,
       V_REMARK2    LIKE ZMY20RMRK-REMARK2,
       V_RETCODE    TYPE C,
       V_FNAME(30)  TYPE C,
       V_UPDFLAG(1) TYPE C.
WORKING VARIABLES (w_):  ABAP Internal   Working Variables definitions
DATA: W_TOT(5)      TYPE N,
      W_SLNO        TYPE I.
DATA: W_WEEKS       LIKE SCAL-WEEK.
DATA: W_WKHDR01(13) TYPE C,
      W_WKHDR02(13) TYPE C,
      W_WKHDR03(13) TYPE C,
      W_WKHDR04(13) TYPE C,
      W_WKHDR05(13) TYPE C,
      W_WKHDR06(13) TYPE C,
      W_WKHDR07(13) TYPE C,
      W_WKHDR08(13) TYPE C,
      W_WKHDR09(13) TYPE C,
      W_WKHDR10(13) TYPE C,
      W_WKHDR11(13) TYPE C,
      W_WKHDR12(13) TYPE C.
DATA: W_FCHDR01(13) TYPE C,
      W_FCHDR02(13) TYPE C,
      W_FCHDR03(13) TYPE C,
      W_FCHDR04(13) TYPE C,
      W_FCHDR05(13) TYPE C,
      W_FCHDR06(13) TYPE C,
      W_FCHDR07(13) TYPE C,
      W_FCHDR08(13) TYPE C,
      W_FCHDR09(13) TYPE C,
      W_FCHDR10(13) TYPE C,
      W_FCHDR11(13) TYPE C,
      W_FCHDR12(13) TYPE C,
      W_FCHDRT1(13) TYPE C,
      W_FCHDRT2(13) TYPE C,
      W_ORHDR01(13) TYPE C,
      W_ORHDR02(13) TYPE C,
      W_ORHDR03(13) TYPE C,
      W_ORHDR04(13) TYPE C,
      W_ORHDR05(13) TYPE C,
      W_ORHDR06(13) TYPE C,
      W_ORHDR07(13) TYPE C,
      W_ORHDR08(13) TYPE C,
      W_ORHDR09(13) TYPE C,
      W_ORHDR10(13) TYPE C,
      W_ORHDR11(13) TYPE C,
      W_ORHDR12(13) TYPE C,
      W_ORHDRT1(13) TYPE C,
      W_ORHDRT2(13) TYPE C,
      W_HDR%1(13)   TYPE C,
      W_HDR%2(13)   TYPE C,
      W_DIFF1(13)   TYPE C,
      W_DIFF2(13)   TYPE C.
DATA: W_WKTBL01 LIKE SCAL-WEEK,
      W_WKTBL02 LIKE SCAL-WEEK,
      W_WKTBL03 LIKE SCAL-WEEK,
      W_WKTBL04 LIKE SCAL-WEEK,
      W_WKTBL05 LIKE SCAL-WEEK,
      W_WKTBL06 LIKE SCAL-WEEK,
      W_WKTBL07 LIKE SCAL-WEEK,
      W_WKTBL08 LIKE SCAL-WEEK,
      W_WKTBL09 LIKE SCAL-WEEK,
      W_WKTBL10 LIKE SCAL-WEEK,
      W_WKTBL11 LIKE SCAL-WEEK,
      W_WKTBL12 LIKE SCAL-WEEK.
DATA: W_SHIPTO  LIKE VBPA-KUNNR,
      W_SOLDCN  LIKE KNA1-LAND1,
      W_SHIPCN  LIKE KNA1-LAND1,
      W_PRODUCT LIKE ZMY20PROD-PRODUCT.
DATA: W_ORD01   LIKE ZMY20WKFC-QTY01,
      W_ORD02   LIKE ZMY20WKFC-QTY01,
      W_ORD03   LIKE ZMY20WKFC-QTY01,
      W_ORD04   LIKE ZMY20WKFC-QTY01,
      W_ORD05   LIKE ZMY20WKFC-QTY01,
      W_ORD06   LIKE ZMY20WKFC-QTY01,
      W_ORD07   LIKE ZMY20WKFC-QTY01,
      W_ORD08   LIKE ZMY20WKFC-QTY01,
      W_ORD09   LIKE ZMY20WKFC-QTY01,
      W_ORD10   LIKE ZMY20WKFC-QTY01,
      W_ORD11   LIKE ZMY20WKFC-QTY01,
      W_ORD12   LIKE ZMY20WKFC-QTY01,
      W_ORDT1   LIKE ZMY20WKFC-QTY01,
      W_ORDT2   LIKE ZMY20WKFC-QTY01.
SELECTION SCREEN DATA : ABAP Internal      Select Options&Parameters
          SELECT-OPTIONS (s_)              definitions
          PARAMETERS     (p_)
SELECTION-SCREEN BEGIN OF BLOCK MYSEL1 WITH FRAME TITLE TEXT-001.
PARAMETERS     : P_BUKRS  LIKE T001-BUKRS OBLIGATORY DEFAULT 'MY20',
                 P_STRMTH LIKE S125-SPMON OBLIGATORY DEFAULT '200608'.
SELECT-OPTIONS : S_STCSTP  FOR ZMY20WKFC-STCSTP,
                 S_WERKS   FOR T001W-WERKS,
                 S_PROD    FOR ZMY20PROD-PRODUCT,
                 S_SHP     FOR VBAP-VSTEL.
SELECTION-SCREEN END OF BLOCK MYSEL1.
SELECTION-SCREEN BEGIN OF BLOCK MYSEL2 WITH FRAME.
PARAMETER      : P_ZERO AS CHECKBOX.
SELECTION-SCREEN END OF BLOCK MYSEL2.
AT SELECTION-SCREEN
Begin of Addition by T.Karthikeyan - UIS on 18/01/2007 - Req No - BA3K986971
AT SELECTION-SCREEN ON P_BUKRS.
  AUTHORITY-CHECK OBJECT 'Z_BASF_SD'
             ID 'BUKRS'   FIELD P_BUKRS
             ID 'VKORG'   DUMMY
             ID 'ZZ_UB'   DUMMY
             ID 'ZZ_SBU'  DUMMY
             ID 'WERKS'   DUMMY
             ID 'ZZ_PROG' FIELD SY-CPROG.
  IF SY-SUBRC NE 0.
    MESSAGE ID 'SD' TYPE 'E' NUMBER '836' WITH
    TEXT-E02 SY-CPROG.
    RETURN.
  ENDIF.
End of Addition by T.Karthikeyan - UIS on 18/01/2007 - Req No - BA3K986971
At selection screen F4 help
AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_STCSTP-LOW.
  PERFORM F4_HELP_STCSTP.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_STCSTP-HIGH.
  PERFORM F4_HELP_STCSTP.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_PROD-LOW.
  PERFORM F4_HELP_PRODUCT.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_PROD-HIGH.
  PERFORM F4_HELP_PRODUCT.
START-OF-SELECTION
START-OF-SELECTION.
  PERFORM 1000_GET_WEEK_DETAILS.
  PERFORM 1500_GET_SHIPTO_CUSTOMER.
  PERFORM 2000_GET_FORECAST_DATA.
  PERFORM 3000_GET_ORDER_DATA.
  PERFORM 4000_CONSOLIDATE_DATA.
END-OF-SELECTION
END-OF-SELECTION.
  REFRESH : GT_FIELDCAT, GT_LIST_TOP_OF_PAGE, GT_EVENTS, GT_SORT.
  PERFORM FIELDCAT_INIT USING GT_FIELDCAT[].
  PERFORM LAYOUT_INIT USING GS_LAYOUT.
  PERFORM COMMENT_BUILD USING GT_LIST_TOP_OF_PAGE[].
  PERFORM EVENTTAB_BUILD USING GT_EVENTS[].
  PERFORM SORT_BUILD USING GT_SORT[].
  PERFORM MAIN.
*&      Form  1000_GET_WEEK_DETAILS
      text
-->  p1        text
<--  p2        text
FORM 1000_GET_WEEK_DETAILS .
  REFRESH : I_WEEKS.
  V_STRMTH = P_STRMTH.
  V_ENDMTH = P_STRMTH + 1.
  IF V_ENDMTH+4(2) GT '12'.
    MOVE '01' TO V_ENDMTH+4(2).
    ADD 1 TO V_ENDMTH+0(4).
  ENDIF.
  CONCATENATE P_STRMTH0(4) P_STRMTH4(2) '01' INTO V_STRDT1.
  CONCATENATE V_ENDMTH0(4) V_ENDMTH4(2) '01' INTO V_ENDDT1.
  CALL FUNCTION 'BKK_GET_MONTH_LASTDAY'
    EXPORTING
      I_DATE = V_STRDT1
    IMPORTING
      E_DATE = V_STRDT2.
  CALL FUNCTION 'BKK_GET_MONTH_LASTDAY'
    EXPORTING
      I_DATE = V_ENDDT1
    IMPORTING
      E_DATE = V_ENDDT2.
  CALL FUNCTION 'DATE_GET_WEEK'
    EXPORTING
      DATE = V_STRDT1
    IMPORTING
      WEEK = V_STRWK1.
  CALL FUNCTION 'DATE_GET_WEEK'
    EXPORTING
      DATE = V_STRDT2
    IMPORTING
      WEEK = V_STRWK2.
  CALL FUNCTION 'DATE_GET_WEEK'
    EXPORTING
      DATE = V_ENDDT1
    IMPORTING
      WEEK = V_ENDWK1.
  CALL FUNCTION 'DATE_GET_WEEK'
    EXPORTING
      DATE = V_ENDDT2
    IMPORTING
      WEEK = V_ENDWK2.
  CLEAR : W_WEEKS, W_SLNO.
  MOVE V_STRWK1 TO W_WEEKS.
  MOVE '1'      TO W_SLNO.
  DO.
    CLEAR : I_WEEKS.
    MOVE W_SLNO  TO I_WEEKS-SLNO.
    MOVE W_WEEKS TO I_WEEKS-WEEKS.
    MOVE P_STRMTH+4(2) TO I_WEEKS-MONTH.
    CONCATENATE I_WEEKS-MONTH '-' W_WEEKS+4(2) INTO I_WEEKS-HDRWK.
    APPEND I_WEEKS.
    ADD 1 TO W_SLNO.
    CALL FUNCTION 'NEXT_WEEK'
      EXPORTING
        CURRENT_WEEK = W_WEEKS
      IMPORTING
        NEXT_WEEK    = W_WEEKS.
    IF W_WEEKS GT V_STRWK2.
      EXIT.
    ENDIF.
  ENDDO.
  CLEAR : W_WEEKS, W_SLNO.
  MOVE V_ENDWK1 TO W_WEEKS.
  MOVE '7'      TO W_SLNO.
  DO.
    CLEAR : I_WEEKS.
    MOVE W_SLNO  TO I_WEEKS-SLNO.
    MOVE W_WEEKS TO I_WEEKS-WEEKS.
    MOVE V_ENDMTH+4(2) TO I_WEEKS-MONTH.
    CONCATENATE I_WEEKS-MONTH '-' W_WEEKS+4(2) INTO I_WEEKS-HDRWK.
    APPEND I_WEEKS.
    ADD 1 TO W_SLNO.
    CALL FUNCTION 'NEXT_WEEK'
      EXPORTING
        CURRENT_WEEK = W_WEEKS
      IMPORTING
        NEXT_WEEK    = W_WEEKS.
    IF W_WEEKS GT V_ENDWK2.
      EXIT.
    ENDIF.
  ENDDO.
  LOOP AT I_WEEKS.
    IF     I_WEEKS-SLNO = '1'.
      MOVE I_WEEKS-HDRWK TO W_WKHDR01.
      MOVE I_WEEKS-WEEKS TO W_WKTBL01.
    ELSEIF I_WEEKS-SLNO = '2'.
      MOVE I_WEEKS-HDRWK TO W_WKHDR02.
      MOVE I_WEEKS-WEEKS TO W_WKTBL02.
    ELSEIF I_WEEKS-SLNO = '3'.
      MOVE I_WEEKS-HDRWK TO W_WKHDR03.
      MOVE I_WEEKS-WEEKS TO W_WKTBL03.
    ELSEIF I_WEEKS-SLNO = '4'.
      MOVE I_WEEKS-HDRWK TO W_WKHDR04.
      MOVE I_WEEKS-WEEKS TO W_WKTBL04.
    ELSEIF I_WEEKS-SLNO = '5'.
      MOVE I_WEEKS-HDRWK TO W_WKHDR05.
      MOVE I_WEEKS-WEEKS TO W_WKTBL05.
    ELSEIF I_WEEKS-SLNO = '6'.
      MOVE I_WEEKS-HDRWK TO W_WKHDR06.
      MOVE I_WEEKS-WEEKS TO W_WKTBL06.
    ELSEIF I_WEEKS-SLNO = '7'.
      MOVE I_WEEKS-HDRWK TO W_WKHDR07.
      MOVE I_WEEKS-WEEKS TO W_WKTBL07.
    ELSEIF I_WEEKS-SLNO = '8'.
      MOVE I_WEEKS-HDRWK TO W_WKHDR08.
      MOVE I_WEEKS-WEEKS TO W_WKTBL08.
    ELSEIF I_WEEKS-SLNO = '9'.
      MOVE I_WEEKS-HDRWK TO W_WKHDR09.
      MOVE I_WEEKS-WEEKS TO W_WKTBL09.
    ELSEIF I_WEEKS-SLNO = '10'.
      MOVE I_WEEKS-HDRWK TO W_WKHDR10.
      MOVE I_WEEKS-WEEKS TO W_WKTBL10.
    ELSEIF I_WEEKS-SLNO = '11'.
      MOVE I_WEEKS-HDRWK TO W_WKHDR11.
      MOVE I_WEEKS-WEEKS TO W_WKTBL11.
    ELSEIF I_WEEKS-SLNO = '12'.
      MOVE I_WEEKS-HDRWK TO W_WKHDR12.
      MOVE I_WEEKS-WEEKS TO W_WKTBL12.
    ENDIF.
  ENDLOOP.
  CONCATENATE W_WKHDR01 'F' INTO W_FCHDR01.
  CONCATENATE W_WKHDR02 'F' INTO W_FCHDR02.
  CONCATENATE W_WKHDR03 'F' INTO W_FCHDR03.
  CONCATENATE W_WKHDR04 'F' INTO W_FCHDR04.
  CONCATENATE W_WKHDR05 'F' INTO W_FCHDR05.
  CONCATENATE W_WKHDR06 'F' INTO W_FCHDR06.
  CONCATENATE W_WKHDR07 'F' INTO W_FCHDR07.
  CONCATENATE W_WKHDR08 'F' INTO W_FCHDR08.
  CONCATENATE W_WKHDR09 'F' INTO W_FCHDR09.
  CONCATENATE W_WKHDR10 'F' INTO W_FCHDR10.
  CONCATENATE W_WKHDR11 'F' INTO W_FCHDR11.
  CONCATENATE W_WKHDR12 'F' INTO W_FCHDR12.
  CONCATENATE W_WKHDR01 'O' INTO W_ORHDR01.
  CONCATENATE W_WKHDR02 'O' INTO W_ORHDR02.
  CONCATENATE W_WKHDR03 'O' INTO W_ORHDR03.
  CONCATENATE W_WKHDR04 'O' INTO W_ORHDR04.
  CONCATENATE W_WKHDR05 'O' INTO W_ORHDR05.
  CONCATENATE W_WKHDR06 'O' INTO W_ORHDR06.
  CONCATENATE W_WKHDR07 'O' INTO W_ORHDR07.
  CONCATENATE W_WKHDR08 'O' INTO W_ORHDR08.
  CONCATENATE W_WKHDR09 'O' INTO W_ORHDR09.
  CONCATENATE W_WKHDR10 'O' INTO W_ORHDR10.
  CONCATENATE W_WKHDR11 'O' INTO W_ORHDR11.
  CONCATENATE W_WKHDR12 'O' INTO W_ORHDR12.
  CONCATENATE P_STRMTH4(2) '/' P_STRMTH0(4) 'F-TOT' INTO W_FCHDRT1.
  CONCATENATE V_ENDMTH4(2) '/' V_ENDMTH0(4) 'F-TOT' INTO W_FCHDRT2.
  CONCATENATE P_STRMTH4(2) '/' P_STRMTH0(4) 'O-TOT' INTO W_ORHDRT1.
  CONCATENATE V_ENDMTH4(2) '/' V_ENDMTH0(4) 'O-TOT' INTO W_ORHDRT2.
  CONCATENATE P_STRMTH4(2) '/' P_STRMTH0(4) '-%'    INTO W_HDR%1.
  CONCATENATE V_ENDMTH4(2) '/' V_ENDMTH0(4) '-%'    INTO W_HDR%2.
  CONCATENATE P_STRMTH4(2) '/' P_STRMTH0(4) '-DIFF' INTO W_DIFF1.
  CONCATENATE V_ENDMTH4(2) '/' V_ENDMTH0(4) '-DIFF' INTO W_DIFF2.
ENDFORM.                    " 1000_GET_WEEK_DETAILS
*&      Form  1500_GET_SHIPTO_CUSTOMER
      text
-->  p1        text
<--  p2        text
FORM 1500_GET_SHIPTO_CUSTOMER .
  REFRESH : I_SHIPTO.
  SELECT * FROM ZMY20GP WHERE ZZKEY1 = 'ZMY20FCUP'
                                 AND   ZZKEY3 = 'SHIPTOCUST'.
    CLEAR : I_SHIPTO.
    MOVE ZMY20GP-ZZKEY2 TO I_SHIPTO-CUSTOMER.
    IF ZMY20GP-ZZVAL1 NE SPACE.
      MOVE ZMY20GP-ZZVAL1+0(10) TO I_SHIPTO-SHIPTO.
      APPEND I_SHIPTO.
    ENDIF.
    IF ZMY20GP-ZZVAL2 NE SPACE.
      MOVE ZMY20GP-ZZVAL2+0(10) TO I_SHIPTO-SHIPTO.
      APPEND I_SHIPTO.
    ENDIF.
    IF ZMY20GP-ZZVAL3 NE SPACE.
      MOVE ZMY20GP-ZZVAL3+0(10) TO I_SHIPTO-SHIPTO.
      APPEND I_SHIPTO.
    ENDIF.
    IF ZMY20GP-ZZVAL4 NE SPACE.
      MOVE ZMY20GP-ZZVAL4+0(10) TO I_SHIPTO-SHIPTO.
      APPEND I_SHIPTO.
    ENDIF.
  ENDSELECT.
  PERFORM GET_REMARKENTRY_USER.
ENDFORM.                    " 1500_GET_SHIPTO_CUSTOMER
*&      Form  2000_GET_FORECAST_DATA
      text
-->  p1        text
<--  p2        text
FORM 2000_GET_FORECAST_DATA .
Get the Forecast data for the give input
  REFRESH : I_ZMY20WKFC.
  SELECT * INTO CORRESPONDING FIELDS OF TABLE I_ZMY20WKFC FROM ZMY20WKFC
           WHERE BUKRS    EQ P_BUKRS
           AND   STCSTP   IN S_STCSTP
           AND   WERKS    IN S_WERKS
           AND   PRODUCT  IN S_PROD
           AND   SHPPOINT IN S_SHP
           AND   SPMON    GE P_STRMTH
           AND   SPMON    LE V_ENDMTH.
Filter the final version of the forecast data
  LOOP AT I_ZMY20WKFC.
    V_TABIX = SY-TABIX.
    SELECT SINGLE VERSN INTO V_VERSN FROM ZMY20FCVER
                        WHERE BUKRS EQ I_ZMY20WKFC-BUKRS
                        AND   STCSTP EQ I_ZMY20WKFC-STCSTP
                        AND   WERKS  EQ I_ZMY20WKFC-WERKS
                        AND   SPMON  EQ I_ZMY20WKFC-SPMON.
    IF I_ZMY20WKFC-VERSN EQ V_VERSN.
    ELSE.
      DELETE I_ZMY20WKFC INDEX V_TABIX.
    ENDIF.
  ENDLOOP.
ENDFORM.                    " 2000_GET_FORECAST_DATA
*&      Form  3000_GET_ORDER_DATA
      text
-->  p1        text
<--  p2        text
FORM 3000_GET_ORDER_DATA .
  REFRESH : I_VBAK, I_ORDER.
  CLEAR   : V_VKORG.
  SELECT SINGLE VKORG INTO V_VKORG FROM TVKO WHERE BUKRS EQ P_BUKRS.
  SELECT VBELN KUNNR INTO CORRESPONDING FIELDS OF TABLE I_VBAK FROM VBAK
         WHERE VKORG    EQ V_VKORG
         AND   AUART    EQ 'TA'              "Type OR
         AND   BUKRS_VF EQ P_BUKRS.
  SORT I_VBAK BY VBELN.
  LOOP AT I_VBAK.
    CLEAR : W_SHIPTO, W_SOLDCN, W_SHIPCN.
    SELECT SINGLE KUNNR INTO W_SHIPTO FROM VBPA WHERE VBELN EQ I_VBAK-VBELN
                                                AND   PARVW EQ 'WE'.
    SELECT SINGLE LAND1 INTO W_SOLDCN FROM KNA1 WHERE KUNNR EQ I_VBAK-KUNNR.
    SELECT SINGLE LAND1 INTO W_SHIPCN FROM KNA1 WHERE KUNNR EQ W_SHIPTO.
    SELECT * FROM VBAP WHERE VBELN EQ I_VBAK-VBELN AND WERKS IN S_WERKS
                       AND   ABGRU EQ SPACE
                       AND   VSTEL IN S_SHP.
      CLEAR : W_PRODUCT.
      SELECT SINGLE PRODUCT INTO W_PRODUCT FROM ZMY20PROD WHERE SAPMATL EQ VBAP-MATNR.
      SELECT * FROM VBEP WHERE VBELN EQ I_VBAK-VBELN
                         AND   POSNR EQ VBAP-POSNR
                         AND   LDDAT GE V_STRDT1
                         AND   LDDAT LE V_ENDDT2
                         AND   WMENG GT 0.
        CLEAR : I_ORDER.
        MOVE I_VBAK-VBELN    TO I_ORDER-VBELN.
        MOVE I_VBAK-KUNNR    TO I_ORDER-KUNNR.
        MOVE W_SHIPTO        TO I_ORDER-SHIPTO.
        MOVE W_SOLDCN        TO I_ORDER-SOLDCN.
        MOVE VBAP-POSNR      TO I_ORDER-POSNR.
        MOVE VBAP-MATNR      TO I_ORDER-MATNR.
        MOVE VBAP-WERKS      TO I_ORDER-WERKS.
        MOVE VBAP-VSTEL      TO I_ORDER-VSTEL.
        MOVE W_PRODUCT       TO I_ORDER-PRODUCT.
        MOVE VBEP-ETENR      TO I_ORDER-ETENR.
        MOVE VBEP-LDDAT+0(6) TO I_ORDER-SPMON.
        MOVE VBEP-WMENG      TO I_ORDER-WMENG.
        MOVE VBEP-VRKME      TO I_ORDER-VRKME.
        MOVE VBEP-LDDAT      TO I_ORDER-LDDAT.
        CALL FUNCTION 'DATE_GET_WEEK'
          EXPORTING
            DATE = VBEP-LDDAT
          IMPORTING
            WEEK = I_ORDER-WEEK.
        READ TABLE I_SHIPTO WITH KEY SHIPTO = I_ORDER-SHIPTO.
        IF SY-SUBRC EQ 0.
          MOVE I_SHIPTO-CUSTOMER TO I_ORDER-STCSTP.
        ELSE.
          MOVE I_ORDER-SOLDCN    TO I_ORDER-STCSTP.
        ENDIF.
        IF W_SOLDCN = 'CN' OR W_SOLDCN = 'HK'.
          MOVE 'CN&HK' TO I_ORDER-STCSTP.
        ENDIF.
        IF I_ORDER-STCSTP IN S_STCSTP AND I_ORDER-PRODUCT IN S_PROD.
          APPEND I_ORDER.
        ENDIF.
      ENDSELECT.
    ENDSELECT.
  ENDLOOP.
ENDFORM.                    " 3000_GET_ORDER_DATA
*&      Form  4000_CONSOLIDATE_DATA
      text
-->  p1        text
<--  p2        text
FORM 4000_CONSOLIDATE_DATA .
  REFRESH : I_OUTPUT, I_PRDWISE.
  LOOP AT I_ZMY20WKFC.
    CLEAR : W_ORD01, W_ORD02, W_ORD03, W_ORD04, W_ORD05, W_ORD06,
            W_ORD07, W_ORD08, W_ORD09, W_ORD10, W_ORD11, W_ORD12,
            W_ORDT1, W_ORDT2.
    LOOP AT I_ORDER WHERE STCSTP  EQ I_ZMY20WKFC-STCSTP
                    AND   WERKS   EQ I_ZMY20WKFC-WERKS
                    AND   PRODUCT EQ I_ZMY20WKFC-PRODUCT
                    AND   SPMON   EQ I_ZMY20WKFC-SPMON.
*BEGIN OF CHANGES BY FAIZAL ON 26/01/07 TR# BA3K987278
     IF I_ORDER-VSTEL CA I_ZMY20WKFC-SHPPOINT.
      IF I_ZMY20WKFC-SHPPOINT CS I_ORDER-VSTEL.
*END OF CHANGES BY FAIZAL ON 26/01/2007 TR# BA3K987278
      ELSE.
        CONTINUE.
      ENDIF.
      IF I_ORDER-SPMON EQ P_STRMTH.
        IF     I_ORDER-WEEK EQ W_WKTBL01.
          W_ORD01 = W_ORD01 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL02.
          W_ORD02 = W_ORD02 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL03.
          W_ORD03 = W_ORD03 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL04.
          W_ORD04 = W_ORD04 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL05.
          W_ORD05 = W_ORD05 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL06.
          W_ORD06 = W_ORD06 + I_ORDER-WMENG.
        ENDIF.
        W_ORDT1  = W_ORDT1 + I_ORDER-WMENG.
      ELSE.
        IF I_ORDER-WEEK EQ W_WKTBL07.
          W_ORD07 = W_ORD07 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL08.
          W_ORD08 = W_ORD08 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL09.
          W_ORD09 = W_ORD09 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL10.
          W_ORD10 = W_ORD10 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL11.
          W_ORD11 = W_ORD11 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL12.
          W_ORD12 = W_ORD12 + I_ORDER-WMENG.
        ENDIF.
        W_ORDT2  = W_ORDT2 + I_ORDER-WMENG.
      ENDIF.
      MOVE 'X' TO I_ORDER-UPDFLG.
      MODIFY I_ORDER INDEX SY-TABIX.
    ENDLOOP.
    READ TABLE I_OUTPUT WITH KEY STCSTP   = I_ZMY20WKFC-STCSTP
                                 WERKS    = I_ZMY20WKFC-WERKS
                                 PRODUCT  = I_ZMY20WKFC-PRODUCT
                                 SHPPOINT = I_ZMY20WKFC-SHPPOINT.
    IF SY-SUBRC EQ 0.
      IF I_ZMY20WKFC-SPMON EQ P_STRMTH.
        MOVE I_ZMY20WKFC-QTY01  TO I_OUTPUT-QTY01.
        MOVE I_ZMY20WKFC-QTY02  TO I_OUTPUT-QTY02.
        MOVE I_ZMY20WKFC-QTY03  TO I_OUTPUT-QTY03.
        MOVE I_ZMY20WKFC-QTY04  TO I_OUTPUT-QTY04.
        MOVE I_ZMY20WKFC-QTY05  TO I_OUTPUT-QTY05.
        MOVE I_ZMY20WKFC-QTY06  TO I_OUTPUT-QTY06.
        MOVE I_ZMY20WKFC-TOTQTY TO I_OUTPUT-TOTFC1.
        MOVE W_ORD01          TO I_OUTPUT-ORD01.
        MOVE W_ORD02          TO I_OUTPUT-ORD02.
        MOVE W_ORD03          TO I_OUTPUT-ORD03.
        MOVE W_ORD04          TO I_OUTPUT-ORD04.
        MOVE W_ORD05          TO I_OUTPUT-ORD05.
        MOVE W_ORD06          TO I_OUTPUT-ORD06.
        MOVE W_ORDT1          TO I_OUTPUT-TOTORD1.
      ELSE.
        MOVE I_ZMY20WKFC-QTY01  TO I_OUTPUT-QTY07.
        MOVE I_ZMY20WKFC-QTY02  TO I_OUTPUT-QTY08.
        MOVE I_ZMY20WKFC-QTY03  TO I_OUTPUT-QTY09.
        MOVE I_ZMY20WKFC-QTY04  TO I_OUTPUT-QTY10.
        MOVE I_ZMY20WKFC-QTY05  TO I_OUTPUT-QTY11.
        MOVE I_ZMY20WKFC-QTY06  TO I_OUTPUT-QTY12.
        MOVE I_ZMY20WKFC-TOTQTY TO I_OUTPUT-TOTFC2.
        MOVE W_ORD07          TO I_OUTPUT-ORD07.
        MOVE W_ORD08          TO I_OUTPUT-ORD08.
        MOVE W_ORD09          TO I_OUTPUT-ORD09.
        MOVE W_ORD10          TO I_OUTPUT-ORD10.
        MOVE W_ORD11          TO I_OUTPUT-ORD11.
        MOVE W_ORD12          TO I_OUTPUT-ORD12.
        MOVE W_ORDT2          TO I_OUTPUT-TOTORD2.
      ENDIF.
      MODIFY I_OUTPUT INDEX SY-TABIX.
    ELSE.
      CLEAR : I_OUTPUT.
      MOVE I_ZMY20WKFC-STCSTP   TO I_OUTPUT-STCSTP.
      MOVE I_ZMY20WKFC-WERKS    TO I_OUTPUT-WERKS.
      MOVE I_ZMY20WKFC-PRODUCT  TO I_OUTPUT-PRODUCT.
      MOVE I_ZMY20WKFC-SHPPOINT TO I_OUTPUT-SHPPOINT.
      IF I_ZMY20WKFC-SPMON EQ P_STRMTH.
        MOVE I_ZMY20WKFC-QTY01  TO I_OUTPUT-QTY01.
        MOVE I_ZMY20WKFC-QTY02  TO I_OUTPUT-QTY02.
        MOVE I_ZMY20WKFC-QTY03  TO I_OUTPUT-QTY03.
        MOVE I_ZMY20WKFC-QTY04  TO I_OUTPUT-QTY04.
        MOVE I_ZMY20WKFC-QTY05  TO I_OUTPUT-QTY05.
        MOVE I_ZMY20WKFC-QTY06  TO I_OUTPUT-QTY06.
        MOVE I_ZMY20WKFC-TOTQTY TO I_OUTPUT-TOTFC1.
        MOVE W_ORD01          TO I_OUTPUT-ORD01.
        MOVE W_ORD02          TO I_OUTPUT-ORD02.
        MOVE W_ORD03          TO I_OUTPUT-ORD03.
        MOVE W_ORD04          TO I_OUTPUT-ORD04.
        MOVE W_ORD05          TO I_OUTPUT-ORD05.
        MOVE W_ORD06          TO I_OUTPUT-ORD06.
        MOVE W_ORDT1          TO I_OUTPUT-TOTORD1.
      ELSE.
        MOVE I_ZMY20WKFC-QTY01  TO I_OUTPUT-QTY07.
        MOVE I_ZMY20WKFC-QTY02  TO I_OUTPUT-QTY08.
        MOVE I_ZMY20WKFC-QTY03  TO I_OUTPUT-QTY09.
        MOVE I_ZMY20WKFC-QTY04  TO I_OUTPUT-QTY10.
        MOVE I_ZMY20WKFC-QTY05  TO I_OUTPUT-QTY11.
        MOVE I_ZMY20WKFC-QTY06  TO I_OUTPUT-QTY12.
        MOVE I_ZMY20WKFC-TOTQTY TO I_OUTPUT-TOTFC2.
        MOVE W_ORD07          TO I_OUTPUT-ORD07.
        MOVE W_ORD08          TO I_OUTPUT-ORD08.
        MOVE W_ORD09          TO I_OUTPUT-ORD09.
        MOVE W_ORD10          TO I_OUTPUT-ORD10.
        MOVE W_ORD11          TO I_OUTPUT-ORD11.
        MOVE W_ORD12          TO I_OUTPUT-ORD12.
        MOVE W_ORDT2          TO I_OUTPUT-TOTORD2.
      ENDIF.
      APPEND I_OUTPUT.
    ENDIF.
  ENDLOOP.
Process the Order data which Forecast not available
  LOOP AT I_ORDER WHERE UPDFLG NE 'X'.
    READ TABLE I_OUTPUT WITH KEY STCSTP   = I_ORDER-STCSTP
                                 WERKS    = I_ORDER-WERKS
                                 PRODUCT  = I_ORDER-PRODUCT
                                 SHPPOINT = I_ORDER-VSTEL.
    IF SY-SUBRC EQ 0.
      IF I_ORDER-SPMON EQ P_STRMTH.
        IF     I_ORDER-WEEK EQ W_WKTBL01.
          I_OUTPUT-ORD01 = I_OUTPUT-ORD01 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL02.
          I_OUTPUT-ORD02 = I_OUTPUT-ORD02 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL03.
          I_OUTPUT-ORD03 = I_OUTPUT-ORD03 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL04.
          I_OUTPUT-ORD04 = I_OUTPUT-ORD04 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL05.
          I_OUTPUT-ORD05 = I_OUTPUT-ORD05 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL06.
          I_OUTPUT-ORD06 = I_OUTPUT-ORD06 + I_ORDER-WMENG.
        ENDIF.
        I_OUTPUT-TOTORD1  = I_OUTPUT-TOTORD1 + I_ORDER-WMENG.
      ELSE.
        IF     I_ORDER-WEEK EQ W_WKTBL07.
          I_OUTPUT-ORD07 = I_OUTPUT-ORD07 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL08.
          I_OUTPUT-ORD08 = I_OUTPUT-ORD08 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL09.
          I_OUTPUT-ORD09 = I_OUTPUT-ORD09 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL10.
          I_OUTPUT-ORD10 = I_OUTPUT-ORD10 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL11.
          I_OUTPUT-ORD11 = I_OUTPUT-ORD11 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL12.
          I_OUTPUT-ORD12 = I_OUTPUT-ORD12 + I_ORDER-WMENG.
        ENDIF.
        I_OUTPUT-TOTORD2  = I_OUTPUT-TOTORD2 + I_ORDER-WMENG.
      ENDIF.
      MODIFY I_OUTPUT INDEX SY-TABIX.
    ELSE.
      CLEAR : I_OUTPUT.
      MOVE I_ORDER-STCSTP   TO I_OUTPUT-STCSTP.
      MOVE I_ORDER-WERKS    TO I_OUTPUT-WERKS.
      MOVE I_ORDER-PRODUCT  TO I_OUTPUT-PRODUCT.
      MOVE I_ORDER-VSTEL    TO I_OUTPUT-SHPPOINT.
      IF I_ORDER-SPMON EQ P_STRMTH.
        IF     I_ORDER-WEEK EQ W_WKTBL01.
          I_OUTPUT-ORD01 = I_OUTPUT-ORD01 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL02.
          I_OUTPUT-ORD02 = I_OUTPUT-ORD02 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL03.
          I_OUTPUT-ORD03 = I_OUTPUT-ORD03 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL04.
          I_OUTPUT-ORD04 = I_OUTPUT-ORD04 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL05.
          I_OUTPUT-ORD05 = I_OUTPUT-ORD05 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL06.
          I_OUTPUT-ORD06 = I_OUTPUT-ORD06 + I_ORDER-WMENG.
        ENDIF.
        I_OUTPUT-TOTORD1  = I_OUTPUT-TOTORD1 + I_ORDER-WMENG.
      ELSE.
        IF     I_ORDER-WEEK EQ W_WKTBL07.
          I_OUTPUT-ORD07 = I_OUTPUT-ORD07 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL08.
          I_OUTPUT-ORD08 = I_OUTPUT-ORD08 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL09.
          I_OUTPUT-ORD09 = I_OUTPUT-ORD09 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL10.
          I_OUTPUT-ORD10 = I_OUTPUT-ORD10 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL11.
          I_OUTPUT-ORD11 = I_OUTPUT-ORD11 + I_ORDER-WMENG.
        ELSEIF I_ORDER-WEEK EQ W_WKTBL12.
          I_OUTPUT-ORD12 = I_OUTPUT-ORD12 + I_ORDER-WMENG.
        ENDIF.
        I_OUTPUT-TOTORD2  = I_OUTPUT-TOTORD2 + I_ORDER-WMENG.
      ENDIF.
      APPEND I_OUTPUT.
    ENDIF.
  ENDLOOP.
Convert the Order Qty from KG to MT and calculate the %
  LOOP AT I_OUTPUT.
    V_TABIX = SY-TABIX.
    SELECT SINGLE MAKTX INTO I_OUTPUT-MAKTX FROM ZMY20PROD WHERE PRODUCT EQ I_OUTPUT-PRODUCT.
    I_OUTPUT-ORD01   = I_OUTPUT-ORD01 / 1000.
    I_OUTPUT-ORD02   = I_OUTPUT-ORD02 / 1000.
    I_OUTPUT-ORD03   = I_OUTPUT-ORD03 / 1000.
    I_OUTPUT-ORD04   = I_OUTPUT-ORD04 / 1000.
    I_OUTPUT-ORD05   = I_OUTPUT-ORD05 / 1000.
    I_OUTPUT-ORD06   = I_OUTPUT-ORD06 / 1000.
    I_OUTPUT-ORD07   = I_OUTPUT-ORD07 / 1000.
    I_OUTPUT-ORD08   = I_OUTPUT-ORD08 / 1000.
    I_OUTPUT-ORD09   = I_OUTPUT-ORD09 / 1000.
    I_OUTPUT-ORD10   = I_OUTPUT-ORD10 / 1000.
    I_OUTPUT-ORD11   = I_OUTPUT-ORD11 / 1000.
    I_OUTPUT-ORD12   = I_OUTPUT-ORD12 / 1000.
    I_OUTPUT-TOTORD1 = I_OUTPUT-TOTORD1 / 1000.
    I_OUTPUT-TOTORD2 = I_OUTPUT-TOTORD2 / 1000.
    IF I_OUTPUT-TOTFC1 GT 0.
      I_OUTPUT-FCORD1 = I_OUTPUT-TOTORD1 / I_OUTPUT-TOTFC1 * 100.
    ENDIF.
    IF I_OUTPUT-TOTFC2 GT 0.
      I_OUTPUT-FCORD2 = I_OUTPUT-TOTORD2 / I_OUTPUT-TOTFC2 * 100.
    ENDIF.
    MOVE '1'   TO I_OUTPUT-SORTKEY.
    SELECT SINGLE * FROM ZMY20GP WHERE ZZKEY1 EQ 'ZMY20FCUP'
                                          AND   ZZKEY2 EQ I_OUTPUT-STCSTP
                                          AND   ZZKEY3 EQ 'SHIPTOCUST'.
    IF SY-SUBRC EQ 0.
      MOVE '2' TO I_OUTPUT-SORTKEY.
    ENDIF.
    MODIFY I_OUTPUT INDEX SY-TABIX.
  ENDLOOP.
  LOOP AT I_OUTPUT.
    READ TABLE I_PRDWISE WITH KEY SORTKEY = I_OUTPUT-SORTKEY
                                  STCSTP  = I_OUTPUT-STCSTP
                                  PRODUCT = I_OUTPUT-PRODUCT.
    IF SY-SUBRC EQ 0.
      I_PRDWISE-TOTFC1  = I_PRDWISE-TOTFC1  + I_OUTPUT-TOTFC1.
      I_PRDWISE-TOTORD1 = I_PRDWISE-TOTORD1 + I_OUTPUT-TOTORD1.
      I_PRDWISE-TOTFC2  = I_PRDWISE-TOTFC2  + I_OUTPUT-TOTFC2.
      I_PRDWISE-TOTORD2 = I_PRDWISE-TOTORD2 + I_OUTPUT-TOTORD2.
      MODIFY I_PRDWISE INDEX SY-TABIX.
    ELSE.
      CLEAR : I_PRDWISE.
      MOVE I_OUTPUT-SORTKEY TO I_PRDWISE-SORTKEY.
      MOVE I_OUTPUT-STCSTP  TO I_PRDWISE-STCSTP.
      MOVE I_OUTPUT-PRODUCT TO I_PRDWISE-PRODUCT.
      MOVE I_OUTPUT-MAKTX   TO I_PRDWISE-MAKTX.
      I_PRDWISE-TOTFC1  = I_PRDWISE-TOTFC1  + I_OUTPUT-TOTFC1.
      I_PRDWISE-TOTORD1 = I_PRDWISE-TOTORD1 + I_OUTPUT-TOTORD1.
      I_PRDWISE-TOTFC2  = I_PRDWISE-TOTFC2  + I_OUTPUT-TOTFC2.
      I_PRDWISE-TOTORD2 = I_PRDWISE-TOTORD2 + I_OUTPUT-TOTORD2.
      APPEND I_PRDWISE.
    ENDIF.
  ENDLOOP.
  LOOP AT I_PRDWISE.
    IF I_PRDWISE-TOTFC1 GT 0.
      I_PRDWISE-FCORD1 = I_PRDWISE-TOTORD1 / I_PRDWISE-TOTFC1 * 100.
    ENDIF.
    IF I_PRDWISE-TOTFC2 GT 0.
      I_PRDWISE-FCORD2 = I_PRDWISE-TOTORD2 / I_PRDWISE-TOTFC2 * 100.
    ENDIF.
    I_PRDWISE-DIFF1 = I_PRDWISE-TOTORD1 - I_PRDWISE-TOTFC1.
    I_PRDWISE-DIFF2 = I_PRDWISE-TOTORD2 - I_PRDWISE-TOTFC2.
    MODIFY I_PRDWISE INDEX SY-TABIX.
  ENDLOOP.
  SORT I_OUTPUT BY SORTKEY STCSTP WERKS PRODUCT.
Begin of Changes by Karthikeyan on 09/03/2007 - Req No -BA3K988704
SORT I_PRDWISE BY SORTKEY STCSTP PRODUCT.
  SORT I_PRDWISE BY PRODUCT STCSTP.
End of Changes by Karthikeyan on 09/03/2007 - Req No -BA3K988704
  IF P_ZERO = 'X'.
    DELETE I_OUTPUT  WHERE TOTFC1  EQ 0
                     AND   TOTORD1 EQ 0
                     AND   TOTFC2  EQ 0
                     AND   TOTORD2 EQ 0.
    DELETE I_PRDWISE WHERE TOTFC1  EQ 0
                     AND   TOTORD1 EQ 0
                     AND   TOTFC2  EQ 0
                     AND   TOTORD2 EQ 0.
  ENDIF.
Set Cell colour for Remark entries
  LOOP AT I_OUTPUT.
    V_TABIX = SY-TABIX.
    SELECT * FROM ZMY20RMRK  WHERE BUKRS    EQ P_BUKRS
                           AND   STCSTP   EQ I_OUTPUT-STCSTP
                           AND   WERKS    EQ I_OUTPUT-WERKS
                           AND   SHPPOINT EQ I_OUTPUT-SHPPOINT
                           AND   PRODUCT  EQ I_OUTPUT-PRODUCT.
      CLEAR : V_FNAME.
      IF ZMY20RMRK-SPMON = P_STRMTH.
        READ TABLE I_WEEKS WITH KEY WEEKS = ZMY20RMRK-WEEK
                                    MONTH = P_STRMTH+4(2).
        IF     I_WEEKS-SLNO = '1'.
          IF ZMY20RMRK-FC_ORDER = 'FC'.
            MOVE 'QTY01' TO V_FNAME.
          ELSE.
            MOVE 'ORD01' TO V_FNAME.
          ENDIF.
        ELSEIF I_WEEKS-SLNO = '2'.
          IF ZMY20RMRK-FC_ORDER = 'FC'.
            MOVE 'QTY02' TO V_FNAME.
          ELSE.
            MOVE 'ORD02' TO V_FNAME.
          ENDIF.
        ELSEIF I_WEEKS-SLNO = '3'.
          IF ZMY20RMRK-FC_ORDER = 'FC'.
            MOVE 'QTY03' TO V_FNAME.
          ELSE.
            MOVE 'ORD03' TO V_FNAME.
          ENDIF.
        ELSEIF I_WEEKS-SLNO = '4'.
          IF ZMY20RMRK-FC_ORDER = 'FC'.
            MOVE 'QTY04' TO V_FNAME.
          ELSE.
            MOVE 'ORD04' TO V_FNAME.
          ENDIF.
        ELSEIF I_WEEKS-SLNO = '5'.
          IF ZMY20RMRK-FC_ORDER = 'FC'.
            MOVE 'QTY05' TO V_FNAME.
          ELSE.
            MOVE 'ORD05' TO V_FNAME.
          ENDIF.
        ELSEIF I_WEEKS-SLNO = '6'.
          IF ZMY20RMRK-FC_ORDER = 'FC'.
            MOVE 'QTY06' TO V_FNAME.
          ELSE.
            MOVE 'ORD06' TO V_FNAME.
          ENDIF.
        ENDIF.
      ELSEIF ZMY20RMRK-SPMON = V_ENDMTH.
        READ TABLE I_WEEKS WITH KEY WEEKS = ZMY20RMRK-WEEK
                                    MONTH = V_ENDMTH+4(2).
        IF     I_WEEKS-SLNO = '7'.
          IF ZMY20RMRK-FC_ORDER = 'FC'.
            MOVE 'QTY07' TO V_FNAME.
          ELSE.
            MOVE 'ORD07' TO V_FNAME.
          ENDIF.
        ELSEIF I_WEEKS-SLNO = '8'.
          IF ZMY20RMRK-FC_ORDER = 'FC'.
            MOVE 'QTY08' TO V_FNAME.
          ELSE.
            MOVE 'ORD08' TO V_FNAME.
          ENDIF.
        ELSEIF I_WEEKS-SLNO = '9'.
          IF ZMY20RMRK-FC_ORDER = 'FC'.
            MOVE 'QTY09' TO V_FNAME.
          ELSE.
            MOVE 'ORD09' TO V_FNAME.
          ENDIF.
        ELSEIF I_WEEKS-SLNO = '10'.
          IF ZMY20RMRK-FC_ORDER = 'FC'.
            MOVE 'QTY10' TO V_FNAME.
          ELSE.
            MOVE 'ORD10' TO V_FNAME.
          ENDIF.
        ELSEIF I_WEEKS-SLNO = '11'.
          IF ZMY20RMRK-FC_ORDER = 'FC'.
            MOVE 'QTY11' TO V_FNAME.
          ELSE.
            MOVE 'ORD11' TO V_FNAME.
          ENDIF.
        ELSEIF I_WEEKS-SLNO = '12'.
          IF ZMY20RMRK-FC_ORDER = 'FC'.
            MOVE 'QTY12' TO V_FNAME.
          ELSE.
            MOVE 'ORD12' TO V_FNAME.
          ENDIF.
        ENDIF.
      ENDIF.
      IF V_FNAME NE SPACE.
        PERFORM ALV_COLOR USING V_FNAME 6 0 0 CHANGING I_OUTPUT-CELLCOLOR.
      ENDIF.
    ENDSELECT.
    MODIFY I_OUTPUT INDEX V_TABIX.
  ENDLOOP.
ENDFORM.                    " 4000_CONSOLIDATE_DATA
*&      Form  f4_help_stcstp
      text
-->  p1        text
<--  p2        text
FORM F4_HELP_STCSTP.
*Initialize screen values
  DATA: PROGNAME LIKE SY-REPID,
        DYNNUM   LIKE SY-DYNNR.
  PROGNAME = SY-REPID.
  DYNNUM   = SY-DYNNR.
  CLEAR   : T_STCP.
  REFRESH : T_STCP.
  SELECT * FROM  T005 WHERE LAND1 NE SPACE.
    CLEAR : T_STCP.
    MOVE T005-LAND1 TO T_STCP-STCSTP.
    MOVE '1'        TO T_STCP-SORTKEY.
    APPEND T_STCP.
  ENDSELECT.
  SELECT * FROM ZMY20GP WHERE ZZKEY1 = 'ZMY20FCUP'
                                 AND   ZZKEY3 = 'SHIPTOCUST'.
    CLEAR : T_STCP.
    MOVE ZMY20GP-ZZKEY2 TO T_STCP-STCSTP.
    MOVE '2'        TO T_STCP-SORTKEY.
    APPEND T_STCP.
  ENDSELECT.
  SORT T_STCP BY SORTKEY STCSTP.
  DELETE ADJACENT DUPLICATES FROM T_STCP COMPARING SORTKEY STCSTP.
  CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      RETFIELD    = 'STCSTP'
      DYNPPROG    = PROGNAME
      DYNPNR      = DYNNUM
      DYNPROFIELD = 'S_STCSTP'
      VALUE_ORG   = 'S'
    TABLES
      VALUE_TAB   = T_STCP.
ENDFORM.                    " f4_help_stcstp
*&      Form  f4_help_product
      text
-->  p1        text
<--  p2        text
FORM F4_HELP_PRODUCT.
*Initialize screen values
  DATA: PROGNAME LIKE SY-REPID,
        DYNNUM   LIKE SY-DYNNR.
  PROGNAME = SY-REPID.
  DYNNUM   = SY-DYNNR.
  CLEAR   : T_PROD.
  REFRESH : T_PROD.
  SELECT * INTO CORRESPONDING FIELDS OF TABLE T_PROD FROM ZMY20PROD
                                         WHERE PRODUCT NE SPACE.
  SORT T_PROD BY PRODUCT.
  DELETE ADJACENT DUPLICATES FROM T_PROD COMPARING PRODUCT.

in st pf-status place the FCT code below the icon
for save - SAVE.
reward if useful.

Similar Messages

  • Smart Print icon not working in Bing Bar

    I have two Smart Print 2.1 icons; one in the Command bar and one in the Bing bar. I don't know why this is. However, the one in the Command bar works, but the one in the Bing bar doesn't.
    Any advice as to why this should be will be much appreciated.

    To clarify, are you wanting to remove the icon that is not functioning in the Bing Bar?  Or do you want to keep the one for Bing and remove the other one from the computer?  Here is a link to the latest version of the Smart print for Bing Bar.  I would uninstall both versions currently on the computer under Control Panel>> Programs and then use the link to download the latest version. I hope that this helps.
    I am a former employee of HP...
    How do I give Kudos?| How do I mark a post as Solved?

  • HP Printer Assistant not working for HP Envy 120

    Hi,
    I am running Windows 7 Home Premium Service Pack 1 with a 64-bit operating system and I am experiencing an issue with the HP Printer Assistant, in that it will not open when I click on the desktop icon, nor when I go to the HP folder located in All Programs and select it from there.
    My son's laptop, however, will open it without any problems at all. I have tried un-installing and re-installing the full feature software and drivers from the HP website, but that makes no difference whatsoever. The All-in-One device itself works fine; I can print from it and also use the scan icon in the HP folder in All Programs, but I prefer to use the Printer Assistant as it gives me many more options. The last time I ran it, it worked fine and that was only a couple of months ago.
    I would appreciate any help, as this is starting to get frustrating and irritating; this is the first time that I have had any sort of trouble with an HP product and, hopefully, there will be someone out there who can solve this issue.
    Thanks in advance
    Dags68 (Newbie)
    This question was solved.
    View Solution.

    Hi @Dags68 ,
    Sorry that didn't do the job. I checked into this further and my co-worker @Sunshyn2005  and provided me with this fix.
    Computer applicatio​n interface won't open.
    If this doesn't work try this please.
    Icon not working.
    Thank You.
    Please click “Accept as Solution ” if you feel my post solved your issue, it will help others find the solution.
    Click the “Kudos Thumbs Up" on the right to say “Thanks” for helping!
    Gemini02
    I work on behalf of HP

  • Printer will not work after update to Mavericks

    I have a macbook pro and an HP7280 printer connected wirelessly.  After upgrading to Mavericks the printer will not work.  The first time I used it the system upgraded automatically (I forget what it said but it just went ahead and did some upgrading)  When I clicked on something to print it did recognized the printer but just scrolled and scrolled and never printed.  So I deleted the printer and reset the system and then added the printer back on - same thing.   Any ideas??

    It means there is no issue with the driver you are using and with it working correctly on Mavericks. So you have a network issue with the printer queue you are using. Normally a reset of the printing system and re-adding the printer would be enough to get things working again. But since you have done this and your issue is not resolved, there must be some other gremlins in the system.
    With the HP connected to the network, if you know its IP address you can enter this as a URL into a web browser. This should result in you connecting to the internal web page of the HP. Does this work?

  • Redirect Printer is not working in windows 2008 R2 Server( Server Running as AD and Terminal Service(both role in single server))

    Dear Team
    i need solution from Microsoft for the issue;
    My infrastructure
    - Windows Server 2008 R2 (Role - AD and Terminal Service)- Updated
    - Client Machine running with windows 7 pro (Updated)
    - Client Using RDP Client to connect Windows 2008 Terminal Session
    - All are working fine, but Redirect Printing is not working (Through Windows 7 Pro) ... (HP Laser Jet 1020 plus - attached in Client PC)
    - it is working fine from Windows XP
    - i was done All terminal setting in both end, also try RDP Login with Administrator User, but issue is not resolve;
    What Microsoft can say about the issue;
    Thanks & Regards,
    VIMAL PRAJAPATI | 09824111686

    Have you checked the Print Service log in event viewer?
    Here's How.
    I have the Microsoft XPS driver on my clients, so I use that fact to my advantage below.
    Click Start Button/Administrative Tools/Remote Desktop Services/Remote Desktop Services Manager on the RDSH server
    Click the Sessions tab.  PC’s are listed Under Client Name by their computer name.  Take Note of the corresponding
    ID.  We will use this to locate the Printer information in the Event Log.  
    In the Event Log open Application and Services Logs/Microsoft/Windows/Print Service/Admin/ and Find the Event ID 823 entry that has the corresponding ID from the sessions tab you previously noted.  
    This Event Log Entry is created at Logon and you can only get the session ID when they are logged in.
    This tells you what client printer was mapped for the client.  The name that appears is the name of the Printer that was set on the client when the printer was installed.
    See if you see any errors here.
    If you see Event Id 823 with the following message “The default printer was changed to Microsoft XPS Document Writer,winspool,Ne00:. See the event user data for context information.”  Twice in a row with no other messages in between, and the first occurs
    at the time the user logged in, then their printer was not properly redirected.
    You see the Microsoft XPS driver mapped for each session prior to Easy Print redirecting the client machine’s Default Printer.
    Since your printer is the HP 1020 I would bet the driver on the client does not work with Easyprint.  I would try the  the HP Universal Print Driver or the driver for a printer that is very close, like the HP 1018.
    Thanks,
    Jeremy

  • HT204135 I update my Mac to version 10.9.2 and now my printer does not work anymore. I did all the software updates and I do not understand why my mac does not recognize the printer anymore?

    I update my Mac to version 10.9.2 and now my printer does not work anymore. I did all the software updates and I do not understand why my mac does not recognize the printer anymore?

    Go to the website of the manufacturer of your printer and check to see if they have released an updated driver for your particular model.

  • HP Photosmart C6300 printer/scanner not working after Snow Leopard install

    HP Photosmart C6300 printer/scanner not working after Snow Leopard install
    Reinstalling etc does not work - does anyone else have the same problem or a clue as to how to fix this?

    Keith,
    I got a C6280 and the scanner does not work anymore. I am for 6 days in contact with HP. The last printer driver install form the apple web site does not open the image of HewlettPackardPrinterDrivers.dmg because of an invalid checksum. The skipping of the validation gives and error in the install.

  • HP-2840 needs new drum (Q3964A) and I am told my printer will not work when I install a new drum

    My HP2840 laser jet All-InOne has been telling me for 6 months that I need a new drum. I was waiting until I saw an issue with my print quality (which I never had a problem) and now my printer will not work unless I replace the drum.
    A friend told me that even after installing a new OEM drum, that my printer will still not work unless I call HP and pay for them to tell me how to make it work.
    Is that true?
    I need help fast cause now my wife is really angry that I "broke" the printer!
    Thanks in advance!

    mmcnel01 wrote:
    Is this an official HP forum?
    If so, is there anyone from HP - maybe a moderator or someone, that will respond to my question?
    This is a user to user forum and is not an official link to HP support.  I would suggest that you contact HP as shown here. 
    Bob Headrick,  HP Expert
    I am not an employee of HP, I am a volunteer posting here on my own time.
    If your problem is solved please click the "Accept as Solution" button ------------V
    If my answer was helpful please click the "Thumbs Up" to say "Thank You"--V

  • Black ink cartridge on photosmart printer 7250 not working

    the black ink cartridge on my photosmart 7250 printer is not working.  I've tried everything.  I've aligned the cartridges and tried reprinting several times to see if the ink cartridge will start printing.  Everything has failed.  Does anyone know how to fix this problem?

    You're welcome, and thank you for the updated information
    I will recommend that you follow the steps within this Fixing Print Quality Problems document first. If that however does not resolve the issue and the black continues to not print, please try manually cleaning the printhead follow the steps in this 'Missing or Failed Printhead' document for your printer.
    If after both of those documents the black still isn't printing properly what I suggest next will depend on if your printer is in warranty or not. If the printer is still under warranty (use this warranty checker to find out) then please call our technical support team for further assistance. If the printer is no longer under warranty, you can try the printhead soaking steps from @Bob_Headrick.
    Let me know how things go for you
    Please click “Accept as Solution ” if you feel my post resolved your issue, as it will help others find the solution faster
    Click the “Kudos Thumbs Up" on the right to say “Thanks” for helping!
    **MissTeriLynn**
    I work on behalf of HP

  • Printer is not working properly after I updated OS

    My printer is not working after I updated my OS software. It will only print out pages as a mirror image. All the programs are not printing properly. Could really use some help fixing this issue.

    What software did you update?
    It is very difficult to offer troubleshooting suggestions when the "os version" you are using is unknown as each os has their own troubleshooting solutions. 
    Please describe in detail all you have attempted to do in order to resolve the issue.  Have you contacted the printer manufacturer tech support?  Read the printer's user manual?  Your printer drivers updated to match your updated software? 

  • Printer will not work: error code 0xc19a0022

    Printer will not work: error code 0xc19a0022

    Hello citizenED,
    Welcome to the HP Forums.
    I see that you are getting the error code " 0xc19a0022 " .
    I do have a few steps that we can try. 
    First off, please make sure that you have the printer power cable connected directly to a wall outlet and not a power bar/strip. Here is a document that uses a LaserJet printer as an example but it is meant for HP products in general. Please click on the following link that explains the Issues when Connected to an Uninterruptible Power Supply/Power Strip/Surge Protector.
    I have also located a document that deals with a 'Problem with Printhead,' 'Printer Failure,' 'Ink System Failure,' or a '0x...' or a 'C2...' Error ...
    If the troubleshooting does not help resolve your issue, I would then suggest calling HP's Technical Support to see about further options for you. If you are calling within North America, the number is 1-800-474-6836 and for all other regions, click here: click here.
    Thanks for your time.
    Cheers,  
    Click the “Kudos Thumbs Up" at the bottom of this post to say “Thanks” for helping!
    Please click “Accept as Solution ” if you feel my post solved your issue, it will help others find the solution.
    W a t e r b o y 71
    I work on behalf of HP

  • HP ProBook 440 G2, Finger print reader not working when I upgraded form Win 7 Pro to Win 8.1 Pro

    My HP ProBook 440 G2, Finger print reader not working when I upgraded form Win 7 Pro to Win 8.1 Pro.
    In device manager showing that biometric reader is working properly. But actually the finger printer reader is not reading or senseing. It seems like "dummy" part. Please help me to correctly configure step by step for this issue.
    thankyou
    Hillet
    This question was solved.
    View Solution.

    Have you installed the Validity Sensor Fingerprint driver software for Windows 8.1?
    http://h20564.www2.hp.com/hpsc/swd/public/detail?sp4ts.oid=6943811&swItemId=ob_134806_1&swEnvOid=415...
    See page 64 in the following Windows 8.1 user manual for Validity Fingerprint setup information
    http://h20565.www2.hp.com/hpsc/doc/public/display?sp4ts.oid=6943810&docId=emr_na-c04371762&docLocale...
    ****Please click on Accept As Solution if a suggestion solves your problem. It helps others facing the same problem to find a solution easily****
    2015 Microsoft MVP - Windows Experience Consumer

  • Flex Print Job not working with custom component

    Hi All,
    I have to print pages with header, body and footer. So the thought process was to create a custom component fro header, footer and body. Header component is based on Box, Body is a renderer (which will have fix value of items - and will decide the number of possible pages) and footer is again based on Box.
    But when i created a simple Custom component like this for header
    <?xml version="1.0" encoding="utf-8"?>
      <mx:VBox  xmlns:fx=http://ns.adobe.com/mxml/2009
      xmlns:s="library://ns.adobe.com/flex/spark"
      xmlns:mx="library://ns.adobe.com/flex/mx">
    <fx:Declarations>
    <!-- Place non-visual elements (e.g., services, value objects) here -->
    </fx:Declarations>
    <mx:HBox>      <mx:Label id="testLabel" text="Test Container"/>
    </mx:HBox> 
    </mx:VBox>
    Then when i try to add this to FlexPrintJob, and save it as 'xps' to see the print output, i get error message that this file is in use or damaged.
        var myPrintJob:FlexPrintJob = new FlexPrintJob();
      if(!myPrintJob.start()){
          return;
    var header:Header = new Header();
    header.width = myPrintJob.pageWidth;
    header.visible = false;
    FlexGlobals.topLevelApplication.addChild(panierPrintHeader);
    myPrintJob.addObject(header);
    myPrintJob.send();
    FlexGlobals.topLevelApplication.removeChild(panierPrintHeader);
     But this does not work and i get the above mentioned exception. Now when i not use the custom component and just have a label or HBox or anything on stage before the print functionality is invoked, it works fine. And this too haapens only if you have a mxml component, i tried by creating a new Label component using actionscript and then provide the same to the printJob, which did not work either. I need help on this, else i will have to take print functionality to server side(Java) which has some business implications, the reason why i am spending time on flex for printing. 
    Thanks and Regards,
    Jigar
    Looks like custom component print is not working fine with flex or i am doing something terribly wrong.
    Looking forward for help.

    Is there nobody in flex community who can help on this....
    Looks like a toothless class that adobe actionscript team has provided, which is not liked across much

  • Redirected Printer is not working

    Hello all,
    We have a Windows Server 2012 R2 terminal server. We have set up two Lenovo thin clients to remote access this terminal server. The problem is that the redirected printer is not working on one of the thin client but works on the other one. I have made the
    same settings on both of the thin clients.
    The difference between these two thin clients is like following.
    1. Printer: The one that is working is Canon printer and the one that is not working is HP printer.
    2. They use different ISPs.
    All other settings are the same. I did not find any error code from the event viewer too. The only thing that I have is this error message when I tried to print a test page. "Test page failed to print. Would you like to view the print troubleshooter
    for assistance?" And when I click "Yes", it said I did not have the related service installed and I could not find the error code for this issue.
    Does anyone have any ideas on this issue? Please share this.
    Thank you very much.

    Hi,
    Thank you for posting in Windows Server Forum.
    Based on your description it seems that there is issue with incompatible print driver. As you commented you can access for canon but not for HP. Please see that you have update version of HP driver is installed. If possible try to use RDS universal printer
    driver and verify.
    How to configure Microsoft RDS Universal Printing
    Does this happen for any specific user or for all users? If this happen for any particular user then there might be issue with user profile got corrupt so need to clear user profile cache or delete it and re-login to check the result.
    Hope it helps!
    Thanks.
    Dharmesh Solanki
    TechNet Community Support
    Please remember to mark the replies as answers if they help and unmark them if they provide no help. If you have feedback for TechNet Support, contact [email protected]

  • Converting WordPerfect to PDF with desktop printer tool: Not working

    I have been a monthly subscriber to Adobe CreatePDF for many years! I work mainly with Correl WordPerfect, but with the change to the Pack version it is not supported. I downloaded the desktop printer tool; it is installed. However, when I follow instructions and print, I get nothing. Where does the PDF go? What can I do? Please help! I cannot continue to pay monthly if I don't get service.

    Thank you very much. I have uninstall adobe desktop printer tool and my wordperfect. Next step is follow your suggestions but I am no computer anything, lol. 1. How do I know if I have a win 7 sp1? I have win 7 that much I know. 2. Where can download the hotfix? 3. With adobe createpdf, I didn't need adobe ps printer setup, I don't have a laser printer at home, I have an hp inkjet printer.
    Please help again and soon, :).
    Date: Tue, 7 Jan 2014 11:52:08 -0800
    From: [email protected]
    To: [email protected]
    Subject: Converting WordPerfect to PDF with desktop printer tool: Not working
        Re: Converting WordPerfect to PDF with desktop printer tool: Not working
        created by H.Spector in Adobe PDF Pack (formerly CreatePDF) - View the full discussion
    Please do following
    (A). If your system is Win 7 SP1 then install a hot fix to correct inetpp.dll version at C:\Windows\System32 folder.After installing the hot fix version will be 6.1.7601.21819 from 6.1.7601.17514.
    Note please uninstall CreatePDF Desktop printer then reinstall after applying the hot fix
    (B). If you have not installed Adobe Postscript driver yet then please install one as below:
    How to Install PS printer:
    1. Open Start menu > Devices and Printer ( or from control panel) and select "Add a printer"
    2. Select "Add a local printer"
    3. Select "Use an existing port: LPT1: (Printer port)
    4. Select any company and any PS printer with Adobe PS printer driver(not clone) such as Xerox and Xerox Phaser 6120PS
    Adobe PS driver files:
    http://forums.adobe.com/servlet/JiveServlet/downloadImage/2-5989811-532123/450-202/PagesfromHowToInstall_PS_PrinterDriver_onWin7.jpg
    (C) Go to the printer configure port and verify your Adobe ID and password
    1. Goto Start> Devices and Printers > Adobe CreatePDF Desktop Printer
    2. Click right mouse to open “Printer properties”.
    3. Select “Ports” tab
    4. Select ”Internet Port: Adobe CreatePDF Desktop printer”
    5. Click “Configure Port…” button at the bottom
      http://forums.adobe.com/servlet/JiveServlet/downloadImage/2-5989811-532115/410-417/IPP_Scr eenshot.png
    When printing to PDF you will see below and an email is delivered to your email inbox.  The converted PDF file will be stored at https//files.acrobat.com.
      http://forums.adobe.com/servlet/JiveServlet/downloadImage/2-5989811-532116/395-199/IPP_Scr eenshot_Queue.png
    Thank you
    Hisami
         Please note that the Adobe Forums do not accept email attachments. If you want to embed a screen image in your message please visit the thread in the forum to embed the image at http://forums.adobe.com/message/5989811#5989811
         Replies to this message go to everyone subscribed to this thread, not directly to the person who posted the message. To post a reply, either reply to this email or visit the message page: http://forums.adobe.com/message/5989811#5989811
         To unsubscribe from this thread, please visit the message page at http://forums.adobe.com/message/5989811#5989811. In the Actions box on the right, click the Stop Email Notifications link.
               Start a new discussion in Adobe PDF Pack (formerly CreatePDF) at Adobe Community
      For more information about maintaining your forum email notifications please go to http://forums.adobe.com/thread/416458?tstart=0.

Maybe you are looking for

  • Add user to sharepoint group using REST API

    I am trying to add a user to sharepoint group with following code serviceUrl= Appweb + "/_api/SP.AppContextSite(@target)/web/sitegroups("+GroupId+")/users?@target='host web'";     $.ajax({         url: serviceUrl,         type: "POST",         conten

  • How to deliver EJB to iPlanet6.5

    My IDE is Jdeveloper903 ,how to deliver EJB to iPlanet6.5 iAs?

  • Scarlett 2i2 - USB 2.0

    Hello, I'm with the following problem... When I turn on the audio device (scarlett 2i2) via USB to the iMac's the sound is often to click. I used garageband to play the audio in the iMac speakers. Tested the same device on a macbook pro and it worked

  • Running as a server without a screen

    Hi all, i have come to rely on these forums! I have recently got my G4 (details below) back off my dad (he's upgraded to a nice new iMac!) so i am going to upgrade the hard drive and use it as a server for appletv i currently have it hooked up withou

  • Iphone 4 is incredible slow with os7

    Hi, after updating to OS7 my iPhone 4 is incredible slow. Sometimes it takes 10s just to unlock. Calendar, switch between views is so slow, that I start to hate the device eveytime I use it. It was a big mistake to update and I would not have done it