Guys! help me iin finding the logic

Question

can any one help me in finding
1. inactive  customer
  1.1  - who did not have transaction for past 15day fianancial dept
  1.2 - who did not have transaction for past 15 days with sales dept
2. inactive vendors
2.1 - who did not have any transaction for past 15 days with finance dept
2.2 - who did not have transactions for past 15 days with material dept.
help me please asap.

Answer 1

Hi,
Inactive customers:
Use tables kna1, knb1, knkk, vbrk(past activity).
next activity - fplt, fpla, vbpa.
1. 1st get the payers from KNB1 based on selection screen on payer and company code.
2. KNKK logic
  select single kkber from t001 into v_kkber
                               where bukrs eq p_bukrs.
    select kunnr kkber knkli nxtrv from knkk into table knkk_it
           for all entries in knb1_it where kunnr = knb1_it-kunnr and
                                            kkber = v_kkber and
                                            sbgrp in s_sbgrp.
3.Last activity
    select vkorg erdat kunrg from vbrk into table vbrk_it
                       where vkorg = v_vkorg and
                             erdat in before_dt.
    sort vbrk_it by kunrg.
4. Next activity
select single vkorg from tvko into v_vkorg where bukrs = p_bukrs.
  if not v_vkorg is initial.
    select fplnr fpltr fkdat from fplt into table fplt_it
                                            where fksaf = space and
                                                  fkdat in after_dt.
    sort fplt_it by fplnr fpltr.
    if not fplt_it[] is initial.
      select fplnr vbeln from fpla into table fpla_it
             for all entries in fplt_it where fplnr = fplt_it-fplnr.
    endif.
    sort fpla_it by fplnr vbeln.
    if not fpla_it[] is initial.
      select vbeln kunnr from vbpa into table vbpa_it for all entries in
                              fpla_it where vbeln = fpla_it-vbeln and
                                            posnr = '000000' and
                                            parvw = 'RG'.
    endif.
    sort vbpa_it by kunnr.
  endif.
Later process all into final internal table.
If this helps you award points.
Thanks,
Deepak.
Message was edited by:
        KDeepak