Vendors block list

hi
i need logic to develop vendors block list

Hi,
use the below code for vendor block list.
REPORT ZMMUVEND NO STANDARD PAGE HEADING LINE-SIZE 70
MESSAGE-ID ZM.
**-- DATA DECLARATIONS
DATA: V_PATH LIKE RLGRAP-FILENAME,
      V_MODE VALUE 'N'.
**- INTERNAL TABLE DECLARATIONS
DATA: BEGIN OF IT_DATA OCCURS 0,
      LIFNR(10),
      END OF IT_DATA.
DATA: BEGIN OF BDCDATA OCCURS 0.
        INCLUDE STRUCTURE BDCDATA.
DATA: END OF BDCDATA.
DATA: BEGIN OF IT_OUTPUT OCCURS 0,
      LIFNR(10),
      V_TEXT(70),
      END OF IT_OUTPUT.
**-- SELECTION-SCREEN
SELECTION-SCREEN: BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETERS: P_PATH LIKE IBIPPARMS-PATH OBLIGATORY.
SELECTION-SCREEN: END OF BLOCK B1.
PARAMETERS: P_CHECK AS CHECKBOX.
AT SELECTION-SCREEN
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_PATH.
CALL FUNCTION 'F4_FILENAME'
       EXPORTING
            PROGRAM_NAME = SYST-REPID
            DYNPRO_NUMBER = SYST-DYNNR
            FIELD_NAME    = 'P_PATH '
       IMPORTING
            FILE_NAME     = P_PATH.
**-- START-OF-SELECTION.
START-OF-SELECTION.
**- Authorization Check
AUTHORITY-CHECK OBJECT 'ZMMUVEND'
            ID 'ACTVT' FIELD '16'.
IF SY-SUBRC NE 0 .
MESSAGE E398(00) WITH TEXT-012.
ENDIF.
**- Read File
PERFORM READ_DATA.
IF P_CHECK IS INITIAL.
**- Update the data
PERFORM UPDATE_DATA.
ENDIF.
**-- TOP-OF-PAGE
PERFORM WRITE_HEADER.
**-- END-OF-SELECTION
END-OF-SELECTION.
IF P_CHECK IS INITIAL.
PERFORM WRITE_OUTPUT.
ELSE.
FORMAT COLOR COL_NORMAL ON.
LOOP AT IT_DATA.
WRITE:/1 '|',
       2 IT_DATA-LIFNR,
      14 '|',
      70 '|'.
ENDLOOP.
ULINE.
ENDIF.
*&      Form READ_DATA
FORM READ_DATA.
CLEAR: V_PATH.
MOVE P_PATH TO V_PATH.
CALL FUNCTION 'WS_UPLOAD'
       EXPORTING
            FILENAME = V_PATH
            FILETYPE = 'DAT'
       TABLES
            DATA_TAB = IT_DATA.
IF SY-SUBRC <> 0.
    MESSAGE E001 WITH TEXT-002.
ENDIF.
ENDFORM.
*&      Form UPDATE_DATA
FORM UPDATE_DATA.
LOOP AT IT_DATA.
CLEAR: BDCDATA. REFRESH: BDCDATA.
**- Block Vendors
perform bdc_dynpro      using 'SAPMF02K' '0500'.
perform bdc_field       using 'BDC_OKCODE'
                              '/00'.
perform bdc_field       using 'BDC_CURSOR'
                              'RF02K-LIFNR'.
perform bdc_field       using 'RF02K-LIFNR'
                              IT_DATA-LIFNR.
perform bdc_dynpro      using 'SAPMF02K' '0510'.
perform bdc_field       using 'BDC_OKCODE'
                              'UPDA'.
perform bdc_field       using 'BDC_CURSOR'
                              'LFA1-SPERM'.
perform bdc_field       using 'LFA1-SPERR'
                              'X'.
perform bdc_field       using 'LFA1-SPERM'
                              'X'.
CALL TRANSACTION 'XK05' USING BDCDATA MODE V_MODE.
CLEAR: IT_OUTPUT.
IF SY-SUBRC = 0.
MOVE IT_DATA-LIFNR TO IT_OUTPUT-LIFNR.
MOVE TEXT-005 TO IT_OUTPUT-V_TEXT.
ELSE.
MOVE IT_DATA-LIFNR TO IT_OUTPUT-LIFNR.
MOVE TEXT-006 TO IT_OUTPUT-V_TEXT.
ENDIF.
**- Vendor - Mark for deletion
CLEAR: BDCDATA. REFRESH: BDCDATA.
perform bdc_dynpro      using 'SAPMF02K' '0500'.
perform bdc_field       using 'BDC_OKCODE'
                              '/00'.
perform bdc_field       using 'BDC_CURSOR'
                              'RF02K-LIFNR'.
perform bdc_field       using 'RF02K-LIFNR'
                            IT_DATA-LIFNR.
perform bdc_dynpro      using 'SAPMF02K' '0520'.
perform bdc_field       using 'BDC_OKCODE'
                              '/00'.
perform bdc_field       using 'BDC_CURSOR'
                              'LFA1-LOEVM'.
perform bdc_field       using 'LFA1-LOEVM'
                              'X'.
perform bdc_dynpro      using 'SAPMF02K' '0520'.
perform bdc_field       using 'BDC_OKCODE'
                              'UPDA'.
perform bdc_field       using 'BDC_CURSOR'
                              'RF02K-LIFNR'.
CALL TRANSACTION 'XK06' USING BDCDATA MODE V_MODE.
IF SY-SUBRC = 0.
CONCATENATE IT_OUTPUT-V_TEXT TEXT-007 INTO IT_OUTPUT-V_TEXT.
ELSE.
CONCATENATE IT_OUTPUT-V_TEXT TEXT-008 INTO IT_OUTPUT-V_TEXT.
ENDIF.
APPEND IT_OUTPUT.
ENDLOOP.
ENDFORM.                    " UPDATE_DATA
FORM BDC_DYNPRO USING PROGRAM DYNPRO.
CLEAR BDCDATA.
BDCDATA-PROGRAM = PROGRAM.
BDCDATA-DYNPRO   = DYNPRO.
BDCDATA-DYNBEGIN = 'X'.
APPEND BDCDATA.
ENDFORM.
FORM BDC_FIELD USING FNAM FVAL.
CLEAR BDCDATA.
BDCDATA-FNAM = FNAM.
BDCDATA-FVAL = FVAL.
APPEND BDCDATA.
ENDFORM.
*&      Form WRITE_OUTPUT
FORM WRITE_OUTPUT.
FORMAT COLOR COL_NORMAL ON.
LOOP AT IT_OUTPUT.
WRITE:/1 '|',
       2 IT_OUTPUT-LIFNR,
      14 '|',
      15 IT_OUTPUT-V_TEXT,
      70 '|'.
ENDLOOP.
ULINE.
FORMAT COLOR OFF.
ENDFORM.                    " WRITE_OUTPUT
*&      Form WRITE_HEADER
FORM WRITE_HEADER.
FORMAT COLOR COL_TOTAL ON.
WRITE:/2 TEXT-009.
FORMAT COLOR OFF.
FORMAT COLOR COL_HEADING ON.
ULINE.
WRITE:/1 '|',
       2 TEXT-010,
      14 '|',
      15 TEXT-011,
      70 '|'.
ULINE.
ENDFORM.                    " WRITE_HEADER
if this code is useful to u please reward points.
Regards,
Koti

Similar Messages

Vendor block list

Hi,
1. When new vendor transfer to GTS system, for SPL which scenario need to run A1 or B1,
2. I want to get all vendor block list due to result of B1 scenario, it has to go User mail Id
regards
satish

Hi Satish,
When business partners are transferred to GTS, the first screen must be A1. This can be configured to happen automatically or manually. The system should not allow a B1 screening on "new" master data.
Easiest way to get result you need in item 2 of your question is to execute the report "Display Audit Trail for Business Partners". Select "Check Scenario" = 'B1' and select a variable for "Outcome of System Check" that will show blocked partners. When the report displays, you can export it in excel format. If you want to automate that process and email it to someone, you can execute the report in a batch mode, then use the suggestion provided by Tobias with transaction SUGR.
Cheers !
-Greg

Doubt in block list display

hi all,
in my object i have displayed the output using alv block list ... when i print that one i am geting each block in seperate page ... but i need to print all in a single page ... please help me out in solving this
thanks in advance
lokesh

Hi Lokesh,
Refer the sample code:
CLEAR w_event.
w_event-name = slis_ev_top_of_page.
w_event-form = 'TOP_OF_PAGE'.
APPEND w_event TO i_events1.
CLEAR w_event.
w_event-name = slis_ev_top_of_page.
w_event-form = 'XTOP_OF_PAGE'.
APPEND w_event TO i_events2.
DATA: lv_repid LIKE sy-repid.
lv_repid = sy-repid.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
       EXPORTING
            i_callback_program       = lv_repid
            i_callback_user_command = 'USER_COMMAND'
            i_callback_pf_status_set = 'PF_STATUS'.
*-- Vendor Schedule List
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
       EXPORTING
            it_fieldcat = i_field_cat1
            is_layout   = w_lay_out1
            i_tabname   = '<I_TABLE>'
            it_events   = i_events1
       TABLES
            t_outtab    = <i_table>.
*-- Error Lsit display
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
       EXPORTING
            it_fieldcat = i_field_cat2
            is_layout   = w_lay_out2
            i_tabname   = 'I_ERROR'
            it_events   = i_events2
       TABLES
            t_outtab    = i_error[].
w_print-reserve_lines = 2.
w_print-no_print_listinfos = c_x.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'
       EXPORTING
            is_print = w_print.
ENDFORM.                    " f0504_create_list
Reward points if this Helps.
Manish

Block List Display

Hi Friends,
How can I add blocks dynamically depending on different vendor. please can you tell any1 how to add blocks dynamically to the list in block list.and I dont know how many blocks can be there....as it depends on vendors they give in selection screen.......................
Depending on the vendor I have to create different block.
Please revert back......
requirement is to display the debitnote report. if more vendors are given in selection screen then i have to display the blocks different for different vendors..................
Thanks in Advance...................please revert its urgent............

You should do this way
DATA: SORT TYPE SLIS_SORTINFO_ALV,
      IT_SORT TYPE SLIS_T_SORTINFO_ALV.
SORT-FIELDNAME = 'VBELN'.
SORT-SPOS = '1'.
SORT-GROUP = '*'.
SORT-UP = 'X'.
APPEND SORT TO IT_SORT.
if you do this way it will dynamically do block display based on the field you sepecify.
Still if you face problem you check this sample code
REPORT ZALV_LIST_SUBTOTAL                      .
type-pools: slis.
data: f_fldcat type slis_fieldcat_alv,
      t_fldcat type slis_t_fieldcat_alv,
      l_layout type slis_layout_alv,
      f_event type slis_alv_event,
      t_event type slis_t_event.
data: begin of itab occurs 0,
      vbeln like vbap-vbeln,
      posnr like vbap-posnr,
      zmeng like vbap-zmeng,
      text(35),
      end of itab.
select vbeln posnr zmeng from vbap
       into table itab up to 20 rows.
loop at itab.
itab-zmeng = sy-tabix.
modify itab index sy-TABIX.
endloop.
f_fldcat-fieldname = 'text'.
f_fldcat-col_pos = 1.
f_fldcat-outputlen = 15.
*f_fldcat-checkbox = 'X'.
*f_fldcat-edit = ''.
append f_fldcat to t_fldcat.
clear f_fldcat.
f_fldcat-fieldname = 'VBELN'.
f_fldcat-taBname = 'itab'.
f_fldcat-seltext_l = 'VBELN'.
f_fldcat-col_pos = 2.
f_fldcat-outputlen = 30.
f_fldcat-just = 'C'.
f_fldcat-edit = 'X'.
append f_fldcat to t_fldcat.
clear f_fldcat.
f_fldcat-fieldname = 'POSNR'.
f_fldcat-tabname = 'itab'.
f_fldcat-seltext_l = 'POSNR'.
f_fldcat-col_pos = 3.
f_fldcat-edit = 'X'.
append f_fldcat to t_fldcat.
clear f_fldcat.
f_fldcat-fieldname = 'ZMENG'.
f_fldcat-tabname = 'itab'.
f_fldcat-seltext_l = 'ZMENG'.
f_fldcat-col_pos = 4.
f_fldcat-edit = 'X'.
f_fldcat-do_sum = 'X'.
append f_fldcat to t_fldcat.
clear f_fldcat.
DATA: SORT TYPE SLIS_SORTINFO_ALV,
      IT_SORT TYPE SLIS_T_SORTINFO_ALV.
SORT-FIELDNAME = 'VBELN'.
SORT-SPOS = '1'.
SORT-GROUP = '*'.
SORT-UP = 'X'.
SORT-SUBTOT = 'X'.
*SORT-OBLIGATORY = 'UL'.
APPEND SORT TO IT_SORT.
l_layout-TOTALS_TEXT = 'total text'.
l_layout-SUBTOTALS_TEXT = 'subtotal text'.
*l_layout-totals_only = 'X'.
data: prg type sy-repid.
prg = sy-repid.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
*   I_INTERFACE_CHECK              = ' '
*   I_BYPASSING_BUFFER             =
*   I_BUFFER_ACTIVE                = ' '
   I_CALLBACK_PROGRAM             = SY-REPID
*   I_CALLBACK_PF_STATUS_SET       = ' '
*   I_CALLBACK_USER_COMMAND        = ' '
*   I_STRUCTURE_NAME               =
   IS_LAYOUT                      = L_LAYOUT
   IT_FIELDCAT                    = T_FLDCAT
*   IT_EXCLUDING                   =
*   IT_SPECIAL_GROUPS              =
   IT_SORT                        = IT_SORT[]
*   IT_FILTER                      =
*   IS_SEL_HIDE                    =
*   I_DEFAULT                      = 'X'
*   I_SAVE                         = ' '
*   IS_VARIANT                     =
   IT_EVENTS                      = T_EVENT
*   IT_EVENT_EXIT                  =
*   IS_PRINT                       =
*   IS_REPREP_ID                   =
*   I_SCREEN_START_COLUMN          = 0
*   I_SCREEN_START_LINE            = 0
*   I_SCREEN_END_COLUMN            = 0
*   I_SCREEN_END_LINE              = 0
* IMPORTING
*   E_EXIT_CAUSED_BY_CALLER        =
*   ES_EXIT_CAUSED_BY_USER         =
TABLES
    T_OUTTAB                       = ITAB
* EXCEPTIONS
*   PROGRAM_ERROR                  = 1
*   OTHERS                         = 2
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

Mass Vendor Block

Hello experts
XK05 is use for vendor block one at a time. Is there any way we can block Mas vendor in one time?

ok you are talking abbount account group, the forth field from top in XK01 transaction
A block can be set at general level or for a spcific purchasing organisation.
If you want set the block at general level, then you have to choose LFA1 table in XK99, for the purchasing org specific block you need to choose LFM1 table.
Example for general level block:
go XK99,
select table LFA1 and execute.
Then you come to the selection screen, which shows only the vendor number, but you can add many more fields as selection fields by clicking the button for selection fields below the selection.
Select the fields of your choice and copy.
Then enter your selections and execute.
you now get the found records with some columns. you probably will not directly see the field for blocking there. Hence click the button "choose fields" and copy the field to the display.
Now enter the new value above the list. then click the header of this field to select the filed as relevant to be changed.
then click button change field values.
Finally save.

ALV Block list. Field name at user command not getting populated

Hi All,
I'm trying to use ALN block list. Field catalog is built using the REUSEALVMERGE FM.
I've put hot spot on some fields. When I'm trying to capture the data when user clicks on the hotspot field the structure that comes in the user_command subroutine is not getting populated with the fieldname. But it is getting populated with the tabname and value is also coming properly.
FORM user_command
          USING
          ucomm    TYPE sy-ucomm
                selfield TYPE kkblo_selfield.
What could be the possible reason?
I appreciate your inputs.

Hi Surya,
         Did you find the solution for this?
Best Regards.

Issue with Secondary list display in ALV BLocked List

Hi all,
I am using ALV Blocked List consissting of 3 blocks.
For my requirement, in the 1st block, I need to make a colum clickable, for which I have used the User_Command Event.
But this is not working. The second list is not gettin displayed.
Here'z my code:
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
      EXPORTING
        i_callback_program             = v_repid
       i_callback_top_of_page       = 'TOP-OF-PAGE'            "see FORM
I_CALLBACK_PF_STATUS_SET       = ' '
   I_CALLBACK_USER_COMMAND        = 'USER_COMMAND'
IT_EXCLUDING                   =
REFRESH: it_events[].
wa_events-name = slis_ev_top_of_list.
wa_events-form = 'FIRST_HEADING'.
APPEND wa_events TO it_events.
wa_events-name = slis_ev_user_command.
wa_events-form = 'USER_COMMAND'.
APPEND wa_events TO it_events.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
    EXPORTING
      is_layout                        = v_layout
      it_fieldcat                      = it_disptab_field[]
      i_tabname                        = 'DISPTAB'
      it_events                        = it_events[]                  " Call 1st BLOCK TO BE APPENDED For SALES ANALYSIS
IT_SORT                          =
I_TEXT                           = ' '
    TABLES
      t_outtab                         = it_disptab
   EXCEPTIONS
     program_error                    = 1
     maximum_of_appends_reached       = 2
     OTHERS                           = 3.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'.
FORM user_command USING r_ucomm LIKE sy-ucomm
                  rs_selfield TYPE slis_selfield.
CASE r_ucomm.
    WHEN '&IC1'.
       READ TABLE it_disptab INTO w_disptab INDEX rs_selfield-tabindex.
       IF rs_selfield-fieldname = 'KUNAG'.
           WRITE:/1 'invoice',
             10   'Quantity in Base Unit',
             20   'Base Unit',
             30   'Qty in KL',
             40   'Price'.
      ENDIF.
   ENDCASE.
ENDFORM.                    " USER_COMMAND
Please Help..

Hi Ganesh,
Thanks for your reply. I have already used hotspot on the fieldcat of the clickable field. But it seems that except for the hand cursor appearing only on that field, the other columns are also clickable.
Moreover, only the fiirst block should be clickable but all the blocks are applying the user_command.
This might be due to the REUSE_ALV_BLOCK_LIST_INIT Function Module, which applies to all the blocks.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
      EXPORTING
        i_callback_program             = v_repid
       i_callback_top_of_page       = 'TOP-OF-PAGE'            "see FORM
I_CALLBACK_PF_STATUS_SET       = ' '
   i_callback_user_command        = 'USER_COMMAND'
IT_EXCLUDING                   =
In orser to avoid this, I am using the following code, which can be a temporary solution to the problem.
FORM user_command USING r_ucomm LIKE sy-ucomm
                  rs_selfield TYPE slis_selfield.
DATA: row_count TYPE sy-lilli.
CASE r_ucomm.
    WHEN '&IC1'.
      DESCRIBE TABLE it_disptab LINES row_count.
      READ TABLE it_disptab INTO w_disptab INDEX rs_selfield-tabindex.
      IF rs_selfield-tabindex LE row_count AND rs_selfield-tabindex ne 0 AND rs_selfield-tabname = 'DISPTAB'.
        PERFORM get_data.
        PERFORM build_fieldcat.
        PERFORM display_second_list.
      ELSE.
        EXIT.
      ENDIF.
ENDCASE.
ENDFORM.                    " USER_COMMAND

Problem in ALV Block List

Hi All,
I am trying to displaying BOM explosion for materials in ALV Block list.
I am taking the materials to be exploded from a local file. Taking the contents of the file in an internal table and then passing the parameters like material number bom application , alternative BOM to the function 'CS_BOM_EXPL_MAT_V2'
Then I am calling the functions for ALV Block display for each material.
But when I am displaying the data in the block display , only the BOM explosion for the last material is getting displayed.
I am pasting the code also for ur reference.
REPORT zcs13                                   .
TABLES:
        mara,
        stpo,
        t001w,
        stko.
TYPE-POOLS: slis.
DATA: BEGIN OF it_stb OCCURS 0.
        INCLUDE STRUCTURE zstpox.
DATA:END OF it_stb.
DATA: BEGIN OF it_matmaster OCCURS 0,
      matnr TYPE matnr,
      werks TYPE werks,
     stlal type stlal,
     capid type capid,
      emeng TYPE emeng,
      END OF it_matmaster.
DATA : ievent TYPE slis_t_event.
DATA: it_stb2 LIKE stpox OCCURS 0 WITH HEADER LINE,
it_stb3 LIKE stpox OCCURS 0 WITH HEADER LINE,
temp_cat TYPE slis_fieldcat_alv,
sline TYPE slis_listheader,
gt_list_top_of_page TYPE slis_t_listheader,
gs_layout TYPE slis_layout_alv ,
gt_events TYPE slis_t_event,
gt_sort TYPE slis_t_sortinfo_alv,
w_msg(255) TYPE c,
int TYPE i VALUE 0.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-002.
PARAMETERS:p_file LIKE rlgrap-filename OBLIGATORY.
SELECTION-SCREEN END OF BLOCK b1 .
CONSTANTS c_x VALUE 'X'.
DATA: w_topmat LIKE cstmat,
    fieldcat TYPE slis_t_fieldcat_alv,
     wa_fieldcat TYPE slis_fieldcat_alv.
DATA:v_file TYPE string.
*SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
CALL FUNCTION 'F4_FILENAME'
    EXPORTING
      program_name = syst-cprog
      dynpro_number = syst-dynnr
      field_name    = 'P_FILE'
    IMPORTING
      file_name     = p_file.
START-OF-SELECTION.
v_file = p_file.
CALL FUNCTION 'GUI_UPLOAD'
    EXPORTING
      filename                      = v_file
     filetype                      = 'ASC'
     has_field_separator           = 'X'
HEADER_LENGTH                 = 0
READ_BY_LINE                  = 'X'
DAT_MODE                      = ' '
IMPORTING
FILELENGTH                    =
HEADER                        =
    TABLES
      data_tab                      = it_matmaster
   EXCEPTIONS
     file_open_error               = 1
     file_read_error               = 2
     no_batch                      = 3
     gui_refuse_filetransfer       = 4
     invalid_type                  = 5
     no_authority                  = 6
     unknown_error                 = 7
     bad_data_format               = 8
     header_not_allowed            = 9
     separator_not_allowed         = 10
     header_too_long               = 11
     unknown_dp_error              = 12
     access_denied                 = 13
     dp_out_of_memory              = 14
     disk_full                     = 15
     dp_timeout                    = 16
     OTHERS                        = 17
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
LOOP AT it_matmaster.
    PERFORM explode_assembly.
   PERFORM f01_set_layo CHANGING gs_layout.
   PERFORM eventtab_build USING ievent.
perform fldcat.
    PERFORM display_grid.
ENDLOOP.
PERFORM display_grid.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'
EXPORTING
   i_interface_check             = 'x_print_layout'
IS_PRINT                      =
I_SCREEN_START_COLUMN         = 0
I_SCREEN_START_LINE           = 0
I_SCREEN_END_COLUMN           = 0
I_SCREEN_END_LINE             = 0
IMPORTING
E_EXIT_CAUSED_BY_CALLER       =
ES_EXIT_CAUSED_BY_USER        =
EXCEPTIONS
   program_error                 = 1
   OTHERS                        = 2
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
*&      Form EXPLODE_ASSEMBLY
      text
FORM explode_assembly.
CALL FUNCTION 'CS_BOM_EXPL_MAT_V2'
    EXPORTING
      capid                 = 'BEST'
      cuols                 = c_x
      datuv                 = sy-datum
      emeng                 = it_matmaster-emeng
      knfba                 = c_x
      ksbvo                 = c_x
      mehrs                 = c_x
      mbwls                 = c_x
     mdmps                 = c_x
      mktls                 = c_x
     stlal                 = it_matmaster-stlal
     stlan                 = p_bomap
      mtnrv                 = it_matmaster-matnr
      werks                 = it_matmaster-werks
     svwvo                 = 'X'
     vrsvo                 = 'X'
    IMPORTING
      topmat                = w_topmat
    TABLES
      stb                   = it_stb
    EXCEPTIONS
      alt_not_found         = 1
      call_invalid          = 2
      material_not_found    = 3
      missing_authorization = 4
      no_bom_found          = 5
      no_plant_data         = 6
      no_suitable_bom_found = 7
      conversion_error      = 8
      OTHERS                = 9.
IF sy-subrc <> 0.
   MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
           WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4
           INTO w_msg.
   WRITE: / w_msg.
   EXIT.
ENDIF.
ENDFORM.                    "explode_assembly
*&      Form display_grid
      text
--> p1        text
<-- p2        text
form display_grid .
*CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
    i_callback_program                = 'ZCS13'
i_callback_top_of_page            = 'TOP_OF_PAGE_GRID'
is_layout                         = gs_layout
    it_fieldcat                       = fieldcat
      IT_SORT                           = GT_SORT[]
       i_save                            = 'A'
     it_events                         = gt_events[]
   TABLES
     t_outtab                          = it_stb
EXCEPTIONS
PROGRAM_ERROR                     = 1
OTHERS                            = 2
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
EXPORTING
    i_callback_program             = 'ZALVTOTAL'
I_CALLBACK_PF_STATUS_SET       = PFSTATUS
   i_callback_user_command        = 'USER_COMMAND'(001)
IT_EXCLUDING                   =
*CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
   is_layout                        = gs_layout
   it_fieldcat                      = i_fieldcat
   i_tabname                        = 'IT_TAB[]'
   it_events                        = gt_events
it_sort                          = gt_sort
I_TEXT                           = ' '
TABLES
   t_outtab                         = it_tab[]
EXCEPTIONS
program_error                    = 1
maximum_of_appends_reached       = 2
OTHERS                           = 3
*IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
         WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
*ENDIF.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
    is_layout                        = gs_layout
    it_fieldcat                      = fieldcat
    i_tabname                        = 'IT_STB[]'
    it_events                        = gt_events
   it_sort                          = gt_sort
I_TEXT                           = ' '
TABLES
    t_outtab                         = it_stb[]
EXCEPTIONS
   program_error                    = 1
   maximum_of_appends_reached       = 2
   OTHERS                           = 3
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
clear it_stb[].
endform.                    " display_grid
*&      Form fldcat
      text
--> p1        text
<-- p2        text
form fldcat .
*DATA: wa_fieldcat TYPE slis_fieldcat_alv,
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
   EXPORTING
     i_program_name               = 'ZCS13'
I_INTERNAL_TABNAME           = 'IT_STB'
     i_structure_name             = 'ZSTPOX'
I_CLIENT_NEVER_DISPLAY       = 'X'
     i_inclname                   = 'ZCS13'
I_BYPASSING_BUFFER           =
I_BUFFER_ACTIVE              =
    CHANGING
      ct_fieldcat                  = fieldcat[]
EXCEPTIONS
INCONSISTENT_INTERFACE       = 1
PROGRAM_ERROR                = 2
OTHERS                       = 3
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
Pls Suggest
Thanks.

Hi All,
I am trying to displaying BOM explosion for materials in ALV Block list.
I am taking the materials to be exploded from a local file. Taking the contents of the file in an internal table and then passing the parameters like material number bom application , alternative BOM to the function 'CS_BOM_EXPL_MAT_V2'
Then I am calling the functions for ALV Block display for each material.
But when I am displaying the data in the block display , only the BOM explosion for the last material is getting displayed.
I am pasting the code also for ur reference.
REPORT zcs13                                   .
TABLES:
        mara,
        stpo,
        t001w,
        stko.
TYPE-POOLS: slis.
DATA: BEGIN OF it_stb OCCURS 0.
        INCLUDE STRUCTURE zstpox.
DATA:END OF it_stb.
DATA: BEGIN OF it_matmaster OCCURS 0,
      matnr TYPE matnr,
      werks TYPE werks,
     stlal type stlal,
     capid type capid,
      emeng TYPE emeng,
      END OF it_matmaster.
DATA : ievent TYPE slis_t_event.
DATA: it_stb2 LIKE stpox OCCURS 0 WITH HEADER LINE,
it_stb3 LIKE stpox OCCURS 0 WITH HEADER LINE,
temp_cat TYPE slis_fieldcat_alv,
sline TYPE slis_listheader,
gt_list_top_of_page TYPE slis_t_listheader,
gs_layout TYPE slis_layout_alv ,
gt_events TYPE slis_t_event,
gt_sort TYPE slis_t_sortinfo_alv,
w_msg(255) TYPE c,
int TYPE i VALUE 0.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-002.
PARAMETERS:p_file LIKE rlgrap-filename OBLIGATORY.
SELECTION-SCREEN END OF BLOCK b1 .
CONSTANTS c_x VALUE 'X'.
DATA: w_topmat LIKE cstmat,
    fieldcat TYPE slis_t_fieldcat_alv,
     wa_fieldcat TYPE slis_fieldcat_alv.
DATA:v_file TYPE string.
*SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
CALL FUNCTION 'F4_FILENAME'
    EXPORTING
      program_name = syst-cprog
      dynpro_number = syst-dynnr
      field_name    = 'P_FILE'
    IMPORTING
      file_name     = p_file.
START-OF-SELECTION.
v_file = p_file.
CALL FUNCTION 'GUI_UPLOAD'
    EXPORTING
      filename                      = v_file
     filetype                      = 'ASC'
     has_field_separator           = 'X'
HEADER_LENGTH                 = 0
READ_BY_LINE                  = 'X'
DAT_MODE                      = ' '
IMPORTING
FILELENGTH                    =
HEADER                        =
    TABLES
      data_tab                      = it_matmaster
   EXCEPTIONS
     file_open_error               = 1
     file_read_error               = 2
     no_batch                      = 3
     gui_refuse_filetransfer       = 4
     invalid_type                  = 5
     no_authority                  = 6
     unknown_error                 = 7
     bad_data_format               = 8
     header_not_allowed            = 9
     separator_not_allowed         = 10
     header_too_long               = 11
     unknown_dp_error              = 12
     access_denied                 = 13
     dp_out_of_memory              = 14
     disk_full                     = 15
     dp_timeout                    = 16
     OTHERS                        = 17
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
LOOP AT it_matmaster.
    PERFORM explode_assembly.
   PERFORM f01_set_layo CHANGING gs_layout.
   PERFORM eventtab_build USING ievent.
perform fldcat.
    PERFORM display_grid.
ENDLOOP.
PERFORM display_grid.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'
EXPORTING
   i_interface_check             = 'x_print_layout'
IS_PRINT                      =
I_SCREEN_START_COLUMN         = 0
I_SCREEN_START_LINE           = 0
I_SCREEN_END_COLUMN           = 0
I_SCREEN_END_LINE             = 0
IMPORTING
E_EXIT_CAUSED_BY_CALLER       =
ES_EXIT_CAUSED_BY_USER        =
EXCEPTIONS
   program_error                 = 1
   OTHERS                        = 2
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
*&      Form EXPLODE_ASSEMBLY
      text
FORM explode_assembly.
CALL FUNCTION 'CS_BOM_EXPL_MAT_V2'
    EXPORTING
      capid                 = 'BEST'
      cuols                 = c_x
      datuv                 = sy-datum
      emeng                 = it_matmaster-emeng
      knfba                 = c_x
      ksbvo                 = c_x
      mehrs                 = c_x
      mbwls                 = c_x
     mdmps                 = c_x
      mktls                 = c_x
     stlal                 = it_matmaster-stlal
     stlan                 = p_bomap
      mtnrv                 = it_matmaster-matnr
      werks                 = it_matmaster-werks
     svwvo                 = 'X'
     vrsvo                 = 'X'
    IMPORTING
      topmat                = w_topmat
    TABLES
      stb                   = it_stb
    EXCEPTIONS
      alt_not_found         = 1
      call_invalid          = 2
      material_not_found    = 3
      missing_authorization = 4
      no_bom_found          = 5
      no_plant_data         = 6
      no_suitable_bom_found = 7
      conversion_error      = 8
      OTHERS                = 9.
IF sy-subrc <> 0.
   MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
           WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4
           INTO w_msg.
   WRITE: / w_msg.
   EXIT.
ENDIF.
ENDFORM.                    "explode_assembly
*&      Form display_grid
      text
--> p1        text
<-- p2        text
form display_grid .
*CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
    i_callback_program                = 'ZCS13'
i_callback_top_of_page            = 'TOP_OF_PAGE_GRID'
is_layout                         = gs_layout
    it_fieldcat                       = fieldcat
      IT_SORT                           = GT_SORT[]
       i_save                            = 'A'
     it_events                         = gt_events[]
   TABLES
     t_outtab                          = it_stb
EXCEPTIONS
PROGRAM_ERROR                     = 1
OTHERS                            = 2
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
EXPORTING
    i_callback_program             = 'ZALVTOTAL'
I_CALLBACK_PF_STATUS_SET       = PFSTATUS
   i_callback_user_command        = 'USER_COMMAND'(001)
IT_EXCLUDING                   =
*CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
   is_layout                        = gs_layout
   it_fieldcat                      = i_fieldcat
   i_tabname                        = 'IT_TAB[]'
   it_events                        = gt_events
it_sort                          = gt_sort
I_TEXT                           = ' '
TABLES
   t_outtab                         = it_tab[]
EXCEPTIONS
program_error                    = 1
maximum_of_appends_reached       = 2
OTHERS                           = 3
*IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
         WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
*ENDIF.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_APPEND'
EXPORTING
    is_layout                        = gs_layout
    it_fieldcat                      = fieldcat
    i_tabname                        = 'IT_STB[]'
    it_events                        = gt_events
   it_sort                          = gt_sort
I_TEXT                           = ' '
TABLES
    t_outtab                         = it_stb[]
EXCEPTIONS
   program_error                    = 1
   maximum_of_appends_reached       = 2
   OTHERS                           = 3
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
clear it_stb[].
endform.                    " display_grid
*&      Form fldcat
      text
--> p1        text
<-- p2        text
form fldcat .
*DATA: wa_fieldcat TYPE slis_fieldcat_alv,
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
   EXPORTING
     i_program_name               = 'ZCS13'
I_INTERNAL_TABNAME           = 'IT_STB'
     i_structure_name             = 'ZSTPOX'
I_CLIENT_NEVER_DISPLAY       = 'X'
     i_inclname                   = 'ZCS13'
I_BYPASSING_BUFFER           =
I_BUFFER_ACTIVE              =
    CHANGING
      ct_fieldcat                  = fieldcat[]
EXCEPTIONS
INCONSISTENT_INTERFACE       = 1
PROGRAM_ERROR                = 2
OTHERS                       = 3
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
Pls Suggest
Thanks.

HOW TO TRIGGER CHECK BOX EVENT IN BLOCKED LIST OUT PUT

Hi Abapers,
I am developing ALV Blocked list using 3 internal tables.
in output list my requirement is if I click one check box in one intrrnal table the below internal table checkboxes should be checked.
how to solve this problem this is very urgent to me I hope somebody will help me.
Regards
Shashikumar.G

Hi
First you need to register the events of clicking of the checkbox.
Once registerred, you can capture that event and when occured, you can set the checkboxes for below internal table.
<a href="http://help.sap.com/saphelp_nw04/helpdata/en/95/34eb7feb6211d3a7270000e83dd863/frameset.htm">http://help.sap.com/saphelp_nw04/helpdata/en/95/34eb7feb6211d3a7270000e83dd863/frameset.htm</a>
Regards
Raj

How to download a Block List based ALV report to PDF file?

Hi Everyone,
I need to display a report in block list alv format using REUSE_ALV_BLOCK_LIST_DISPLAY... I have done this. But my problem comes next.
1. I need to download this report to a pdf file in the user given directory - in presentation server. How can I download this in PDF format.
2. My report has TOP_OF_LIST and END_OF_LIST events. The body of the report contains a table with some material data. There should be 1 table for each material no. There are around 50 records for each material no. So I am looping at the material no. and calling REUSE_ALV_BLOCK_LIST_APPEND.
Now my problem is that I should have only 20 records in each page. How can I determine this? How do I put a page-break?
Please anyone help me.

Hi Anwesha
You can send the report output to spool using the IS_PRINT parameter of REUSE_ALV_BLOCK_LIST_DISPLAY FM. Then read the spool number generated and pass it to CONVERT_ABAPSPOOLJOB_2_PDF to get the pdf content which could be downloaded to presentation server.
The splitting of records on count could be done by calling above method with different internal table filtered as per your requirement.
Regards
Ranganath

Can't send or receive email, network on block list?

i've set up exchange 2013 for the first time and when i log into the browser and send a email to my Microsoft account i get the following error:
BAY004-MC2F50.hotmail.com gave this error:
OU-002 (BAY004-MC2F50) Unfortunately, messages from 86.10.3.44 weren't sent. Please contact your Internet service provider since part of their network is on our block list.
when i send a email from my Microsoft account to my exchange i get the following error:
'[email protected]' on 27/03/2015 21:04
Server error: '550 relay not permitted'
i can send mail to my gmail account no problems. looks like Microsoft have blocked my ip, but maybe its something i've missed? this is the first time i've set up a exchange server. any feedback would be greatly appreciated.
cheers.
mike.

Hi mike,
Thank you for your question.
We could run the following command to check if the issue persist:
Set-SendConnector <sendconnnectorname> -IgnoreSTARTTLS $true
If other domains are well, we could refer to the following links:
http://answers.microsoft.com/en-us/outlook_com/forum/oemail-osend/please-contact-your-internet-service-provider/38318705-fb86-4f8d-9ebe-089c13bae099
https://social.technet.microsoft.com/forums/exchange/en-US/213288f3-b320-479a-b65d-39cafa81adba/mail-delivery-issue
If there are any questions regarding this issue, please be free to let me know.
Best Regard,
Jim
Please remember to mark the replies as answers if they help, and unmark the answers if they provide no help. If you have feedback for TechNet Support, contact [email protected]
Jim Xu
TechNet Community Support

Vendor block on goods receipt

When trying to do a goods receipt, i get a vednor block error message. I have checked the vendor master.. there are no blocks and i also checked the MP02 to see if there were any QI blocks... none. I am thinking this is the QI inf record...
Where else colud I check for a vendor block.
Thanks in advance

thanks for the response.
But here is the solution i found out. The po's were created on the MPN part numbers and the vendor in tcode MP02 for this part number was different from the vendor on the PO.
I was checking the blocks on the vendor on the PO, it was the vendor on the MPN number that need to be blocked

Exchange 2013 Realtime Block List is Kind of Working

Hi Everyone.
I've been setting up a RBL in exchange 2013 using zen.spamhaus.org. The IPBlockListProviders require that the connection filtering agent be enabled. By default when running the installantispamagents.ps1, this script will not install that connection filtering
agent because it only installs on an "edge" server and since exchange 2013 did away with the "edge" role, it did not get installed. I had to modify the script so it installed that connection filtering agent with all the other anti-spam agents. (We are a one
exchange server shop so the CAS and Mailbox roles are on one box.)
I'm having a very weird response. The RBL list works and when I get a test email sent to me using the service at '[email protected]', I can see the Reject message getting sent back out in the agent logs and the SMTP logs. This is the message
I see in the logs. Notice that the originating IP and the RBL triggering IP are the same: 192.203.178.107.
2012-12-14T01:59:04.970Z,08CFA71A75A19B4B,10.10.3.50:2525,192.203.178.107:55186,192.203.178.107
,,<>,,t***********e@*****.org,1,Connection Filtering Agent,OnRcptCommand,RejectCommand,550
5.7.1 zen.spamhaus.org has blocked your IP address (192.203.178.107) using the list
'zen.spamhaus.org'. Please see http://www.spamhaus.org/query/bl?ip=192.203.178.107 for further
information. This organization has no control over this RBL (Realtime Blo,BlockListProvider,
zen.spamhaus.org,,,,Undefined
This is a correct message and that IP address matches the Test RBL IP address spamhaus has blacklisted to check RBL filters. The IP address is added dynamically to the message with a variable in the reject message settings and should list the IP address
of the SMTP server that triggered the RBL hit.
The VERY strange thing is when I trigger the RBL with the test message, exchange rejects all incoming mail for my account from any source for several minutes and rejects with that same message. I send a test message from my google account and I can clearly
see in the agent log that the SMTP connection is coming from a google IP but it still rejects and issues the message that was sent in response to my test using the nelson-'[email protected]'
This is the reject message sent to my google account after I sent myself an email following the RBL test message. Notice that the originating IP is a google IP and does not match the IP the the reject message claims the message came from. The log
shows the originating IP as 74.125.82.179 (A google IP) but im rejecting the message because 192.203.178.107 is blocked??? The message didn't come from that IP. :
2012-12-14T02:00:06.318Z,08CFA71A75A19B4B,10.10.3.50:2525,74.125.82.179:50654,74.125.82.179,,
t***t@******.net,,t*******te@******.org,1,Connection Filtering Agent,OnRcptCommand,
RejectCommand,550 5.7.1 zen.spamhaus.org has blocked your IP address (192.203.178.107) using
the list 'zen.spamhaus.org'. Please see http://www.spamhaus.org/query/bl?ip=192.203.178.107
for further information. This organization has no control over this RBL
(Realtime Blo,BlockListProvider,zen.spamhaus.org,,,,Undefined
After a couple minutes, it clears up and I can get mail again. I just can not for the life of me figure out why all messages are rejected for several minutes after I have an RBL hit and the reject message is always referencing the the SMTP transaction
that originally triggered the hit. Which in this case, is blocking my Gmail message thinking its coming forom the crynwr.com test even when the smtp logs show a completely different SMTP originating IP and Connection.
Here is my IPBlockListProvider:
RunspaceId : 068b87d2-9c34-4ce9-ab05-eedef928cb27
RejectionResponse : {1} has blocked your IP address ({0}) using the list '{2}'. Please see
http://www.spamhaus.org/query/bl?ip={0} for further information. This organization has no control
over this RBL (Realtime Block List).
LookupDomain : zen.spamhaus.org
Enabled : True
AnyMatch : True
BitmaskMatch :
IPAddressesMatch : {}
Priority : 1
AdminDisplayName :
ExchangeVersion : 0.1 (8.0.535.0)
Name : zen.spamhaus.org
DistinguishedName : CN=zen.spamhaus.org,CN=IPBlockListProviderConfig,CN=Message Hygiene,CN=Transport
Settings,CN=Bel******ch,CN=Microsoft
Exchange,CN=Services,CN=Configuration,DC=b******rk,DC=net
Identity : zen.spamhaus.org
Guid : 0c9b5eec-b19a-4ab5-9c6a-cb1666cf68d6
ObjectCategory : beltwaypark.net/Configuration/Schema/ms-Exch-Message-Hygiene-IP-Block-List-Provider
ObjectClass : {top, msExchMessageHygieneIPBlockListProvider}
WhenChanged : 12/12/2012 10:02:36 PM
WhenCreated : 12/12/2012 10:02:36 PM
WhenChangedUTC : 12/13/2012 4:02:36 AM
WhenCreatedUTC : 12/13/2012 4:02:36 AM
OrganizationId :
OriginatingServer : Lucas.*****.net
IsValid : True
ObjectState : Unchanged

When you install the Antispam agents on Exchange 2013 servers you get all of them installed like you did for previous versions of Exchange server. most of them will get installed on the mailbox role but not the Connection filtering agent aka. RBL, DNS Block
List etc.
The powershell script: install-AntispamAgents.ps1 will look for which server role is installed and will not install Connection filtering if the server hold the mailbox role. This is understandable since SMTP connection should come in from the CAS server
and then the original sending IP will not be show since CAS do Source-NAT. So the logic would be to install the connection filtering agent on CAS but the install script will not let you do that either. Connection Filtering will only install on Edge role.
I can only speculate why this is, but either Microsoft want it to be like this or they have found some trouble with the Connection Filtering Agent running on CAS.
I figured I will give this a try anyway, and here is how you get it to work.
Start Exchange Management Shell as administrator.
Change Directory to scripts folder.
cd $exscripts
Install the agent.
Install-TransportAgent -Name "Connection Filtering Agent" -TransportService FrontEnd -TransportAgentFactory "Microsoft.Exchange.Transport.Agent.ConnectionFiltering.ConnectionFilteringAgentFactory" -AssemblyPath "C:\Program Files\Microsoft\Exchange
Server\V15\TransportRoles\agents\Hygiene\Microsoft.Exchange.Transport.Agent.Hygiene.dll"
If you have multiple agents running on the frontend transport you must set them in the correct order with the priority parameter
Add a IPBlocklistprovider of your choice
Add-IPBlockListProvider -Name zen.spamhaus.org -LookupDomain zen.spamhaus.org -AnyMatch $true -Enabled $true
You can add more than one provider if you like. If you Don’t provide a custom response it will be “Recipient not authorized, your IP has been found on a block list”
Enable the agent
Enable-TransportAgent -TransportService FrontEnd -Identity "Connection Filtering Agent"
Restart FrontEnd transport service
Restart-Service MSExchangeFrontEndTransport
Now the agent should be live and kicking. Logging for the frontend agent is here
“C:\Program Files\Microsoft\Exchange Server\V15\TransportRoles\Logs\FrontEnd\AgentLog” instead of the directory for the backend transport “C:\Program Files\Microsoft\Exchange Server\V15\TransportRoles\Logs\Hub\AgentLog”
Since the script don’t install the Connection filtering agent on CAS it is probably unsupported to install the agent manually, but I had it running for months without any problem so make your own judgment.

Require Vendor Payment List with Payment Terms

hi how to get Require Vendor Payment List with Payment Terms

hi
You can go to FBL1N, (i.e vendor line items) and click change layout button. in the change layout menu, you have "Terms of Payament" field which show the tems of payment you had in the invoice..
You can use "terms of payment" field to display payment terms in the vendor masster data.
hope this will help
award points if helpful
Edited by: venu mamillapalli on Jun 12, 2008 9:35 AM

Vendor block code for release order creation but no purchase order creation

The client has a vendor block code which when applied to a vendor through vendor block screen should allow release order creations against existing contracts and ARC but it should not allow purchase order creation. However, it is allowing purchase order creation also. Can anyone tell how to achieve this selective treatment that allows RO creation against existing contracts and ARCs' but no PO creation.
Are there any settings or configurations that have to be made in SPRO and other areas to achieve this.I would appreiate if anyone could give in a detailed and step wise solution.

Hi
Take out all the blocks on company code and purchasing organization in XK05.
Only put block function as 01 (purchase order). It will not allow you to create purchase order but you can create contracts and release orders against contracts.
Thanks
Edited by: Praveen Raghavendra on Jan 8, 2009 2:30 PM

Vendors block list

Similar Messages

Maybe you are looking for