Help with credit report after texts!

Ahhhhh!!!
How do i stop my phone telling me my credit every single time i send a messege its getting rather annoying.
Thanks in advance :-)

This is quite a common problem but easily solved.
All you have to do is give your network a call and ask them to disable the balance notification. It's a network feature so they are the only people who can stop it.

Similar Messages

Bank of America and JPM Chase Agree to Erase Debts From Credit Reports After Bankruptcies

http://www.nytimes.com/2015/05/08/business/dealbook/bank-of-america-and-jpmorgan-chase-agree-to-erase-debts-from-credit-reports-after-bankruptcies.html?hp&action=click&pgtype=Homepage&module=first-column-region&region=top-news&WT.nav=top-news&_r=1 Two of the nation’s biggest banks will finally put to rest the zombies of consumer debt — bills that are still alive on credit reports although legally eliminated in bankruptcy — potentially providing relief to more than a million Americans.Bank of America and JPMorgan Chase have agreed to update borrowers’ credit reports within the next three months to reflect that the debts were extinguished.

gdale6 wrote:
http://www.nytimes.com/2015/05/08/business/dealbook/bank-of-america-and-jpmorgan-chase-agree-to-erase-debts-from-credit-reports-after-bankruptcies.html?hp&action=click&pgtype=Homepage&module=first-column-region&region=top-news&WT.nav=top-news&_r=1 Two of the nation’s biggest banks will finally put to rest the zombies of consumer debt — bills that are still alive on credit reports although legally eliminated in bankruptcy — potentially providing relief to more than a million Americans.Bank of America and JPMorgan Chase have agreed to update borrowers’ credit reports within the next three months to reflect that the debts were extinguished.From that NY Times article:Under federal law, once a borrower has erased a debt in bankruptcy, banks are required to update the credit reports to indicate that the debt is no longer owed, and remove any notation of “past due” or “charged off.” - I had a bunch of those, showing 60-90-120 late & then CO (charge off) after filing, and some even showing CLS (closed) in 9/2010 when I filed, but then resumed late & CO reporting after that, mostly from Chase & Citi & the 1 BoA account. I disputed every one saying that reporting late after I filed was an attempt to collect a debt under automatic stay jurisdiction of a U.S. Federal BK Court. TU & EQ promptly cleaned them all up, while EX refused. As a result I get an "A" for payment history on TU & EQ with no lates, while I get an "F" on EX w/30 some lates. Hopefully this will get EX to clean up their act.

Banks Agree to Erase Debts From Credit Reports After Bankruptcies

FYI - "Under federal law, once a borrower has erased a debt in bankruptcy, banks are required to update the credit reports to indicate that the debt is no longer owed, and remove any notation of “past due” or “charged off.”" http://www.nytimes.com/2015/05/08/business/dealbook/bank-of-america-and-jpmorgan-chase-agree-to-erase-debts-from-credit-reports-after-ban

It still doesn't work It says "page not found)

Help with Upgrade report in FI

Hey All Gurus,
Im in a thick soup here. I am trying to do something like this -
if you see the selection screen i have rep and super rep, when a user enters a rep value --- it should use the same value to pull all open items for the super rep as well, since they are essentially the same. please help! this one needs to be done fast. i am pasting the code so that it will be easier ...
thanks a million!
*& Report ZFDOFW04_NEW
REPORT ZFDOFW04_NEW MESSAGE-ID FR
                     LINE-SIZE 132
                     LINE-COUNT 60.
*==================================================================
Program: ZFDOFW03 -      Aged Trial Balance Report
         This produces an Accounts Receivable Past Due Aging Report
         in a more simplified/condensed format than the
         SAP supplied aging report program - RFDOPR10.
         This program is a modified copy of RFDOFW00, - a SAP
         Future-Due Report.
         This was a 'rush' job - program probably should be
         rewritten someday not using logical databases as that
         maybe why this runs so slowly!
Original: Feb 1997.
MAINTENANCE HISTORY:
NES071797   Copied from ZFDOFW03. Adding parameter for saeles rep.
JDEDERER - changed header text so it is differnet from ZFDORW03. 9/23
*TEXT SYMBOLS :
001 Open items per
002 O p e n
003 D u e o n
004    cc   ba     in total
005 until
006 Days until
007 Days over
008 Days
009 over
011 valid until........
012 Insurance limit.....
016 F u t u r e
017 + days
018 D u e
020 Last dunn.notice...
021 Dunning level....
030   S U M M A R Y S H E E T
031 =====================
050 Name           Page
051 Burton Snowboard
SELECTION TEXTS:
SUMMEN   Output totals only
TAGE1    Due date I until
TAGE2    Due date II until
TAGE3    Due date III until
TAGE4    Due date IV until
TABLES: T001, KNA1, KNB1, KNB5, BSID, BSEGA, RFPDO1, KNVP,
         T014,                     "credit control areas              JAM
         KNVK,                     "cust master - contact partner     JAM
         T014T, "Credit control areas names
         BKPF,   "TONY ISSUE 4743
         TVKO,   "TONY ISSUE 4743
         KNKK.                     "cust master - credit mgmt         JAM
TYPES: BEGIN OF TOT_TYPE,                                  "DEVK939546
          BUKRS LIKE LFB1-BUKRS,                            "DEVK939546
          GSBER LIKE BSIK-GSBER,                            "DEVK939546
          KKBER LIKE BSID-KKBER,
          RAST1 TYPE P,                                     "DEVK939546
          RAST2 TYPE P,                                     "DEVK939546
          RAST3 TYPE P,                                     "DEVK939546
          RAST4 TYPE P,                                     "DEVK939546
          RAST5 TYPE P,                                     "DEVK939546
          RAST6 TYPE P,                                     "DEVK939546
          RAST7 TYPE P,                                     "DEVK939546
        END OF TOT_TYPE,                                    "DEVK939546
        TOT_TAB TYPE TOT_TYPE OCCURS 0.                     "DEVK939546
CONSTANTS:
         C_FALSE    TYPE I VALUE 0,                                  "JAM
         C_TRUE     TYPE I VALUE 1.
DATA: BEGIN OF GTAB OCCURS 1000,
          SUPER(10) TYPE C,                                         "TONYC
          REP(10) TYPE C,                                           "TONYC
          FILKD(10),        "tonyc show buying groups
          LAND1 LIKE KNA1-LAND1,
          GSBER LIKE BSIK-GSBER,
          REGIO LIKE KNA1-REGIO,
          NAME1 LIKE KNA1-NAME1,
          NAME2 LIKE KNA1-NAME2,
          ORT01 LIKE KNA1-ORT01,
          TELF1      LIKE KNVK-TELF1,       "telephone number         JAM
          CONT_NAME1 LIKE KNVK-NAME1,       "contact name             JAM
          NAMEV      LIKE KNVK-NAMEV,       "contact name             JAM
          KUNNR LIKE KNA1-KUNNR,                                   "TONYC
          BUKRS LIKE LFB1-BUKRS,                                   "TONYC
          KKBER LIKE BSID-KKBER,     "tonyc issue #2500
          ZTERM LIKE KNB1-ZTERM,     "tonyc issue #2500
          KLIMK_TXT(22)   TYPE C,           "credit limit             JAM
          WAERS      LIKE T014-WAERS,       "currency                 JAM
          SORT_GSB,                                               "TONYC
          RAST1 TYPE P,
          RAST2 TYPE P,
          RAST3 TYPE P,
          RAST4 TYPE P,
          RAST5 TYPE P,
          RAST6 TYPE P,
          RAST7 TYPE P,
          T_IND,
       END OF GTAB.
DATA HOLD_NAME(40).
DATA HOLD_BUKRS LIKE T001-BUKRS.                                 "tonyc
DATA GOOD_SUPER_REP.                                             "tonyc
DATA: HOLD_REP LIKE KNA1-KUNNR,                                   "tonyc
       SUPER_NAME LIKE KNA1-NAME1,                                 "tonyc
       REP_NAME LIKE KNA1-NAME1.                                   "tonyc
DATA NAME_LENGTH(2) TYPE C.                                      "tonyc
DATA BACKSLASH(3) VALUE ' / '.                                   "tonyc
DATA REPS_INFO(70) TYPE C.                                       "tonyc
DATA REPORT_TYPE(12) TYPE C.
DATA:   C_CREDIT_ABTNR LIKE KNVK-ABTNR.    "dept 003 = credit
DATA Z_HOLD_LIMIT(22) TYPE N. "tonyc issue#2216
DATA Z_DESCRIPTION(18).   "tonyc issue#2216
DATA WRITE_TOTAL.
DATA HOLD_KLIMK LIKE KNKK-KLIMK.
DATA HOLD_KLIMK2(22) TYPE C.
DATA HOLD-CTLPC LIKE KNKK-CTLPC.
DATA HOLD-CTLPC-TEXT LIKE T691T-RTEXT.
DATA HOLD_ZTERM LIKE KNVV-ZTERM.
DATA TOTAL_RAST7 TYPE P.
DATA TOTAL_RAST2 TYPE P.
DATA TOTAL_RAST3 TYPE P.
DATA TOTAL_RAST4 TYPE P.
DATA TOTAL_RAST5 TYPE P.
DATA TOTAL_RAST6 TYPE P.
DATA TOTAL_RAST1 TYPE P.
DATA HOLD_BUKRS2 LIKE T001-BUKRS.
DATA HOLD_KKBER LIKE BSID-KKBER.
DATA HOLD_KKBER_DESC LIKE T014T-KKBTX.
DATA HOLD_KKBER_DESC2 LIKE T014T-KKBTX.
DATA HOLD_KUNNR2 LIKE KNA1-KUNNR.
DATA L_FIRST_DAY_OF_FISCAL LIKE SY-DATUM. "tonyc issue #3047
DATA: STAB TYPE TOT_TAB WITH HEADER LINE,                  "DEVK939546
       RTOT TYPE TOT_TAB WITH HEADER LINE,                  "DEVK939546
       STOT TYPE TOT_TAB WITH HEADER LINE,                  "DEVK939546
       OP,
       MAXMANDT LIKE DD_STIDA,
       MAXMANST TYPE P,
    SUMKLIMB TYPE P,
       SUMVLIBB TYPE P,
       VERZUG TYPE P,
       OBAD TYPE P,
       BLOCK_CNT TYPE P,
       INTENS,
       ONEBYTE(1) TYPE C,
       TAGE1A LIKE RFPDO1-ALLGFAEL,
       TAGE2A LIKE RFPDO1-ALLGFAEL,
       TAGE3A LIKE RFPDO1-ALLGFAEL,
        HOLD_KUNNR LIKE KNA1-KUNNR,                          "tonyc
        HOLD_SUPER LIKE KNA1-KUNNR,                          "tonyc
        HOLD_REP2 LIKE KNA1-KUNNR,                          "tonyc
        SUPER_REP   LIKE KNA1-KUNNR,                          "tonyc
       TEMP_TELF1      LIKE KNA1-TELF1,                              "JAM
       IT_T014         LIKE T014 OCCURS 0 WITH HEADER LINE,          "JAM
       G_KLIMK_TXT     LIKE GTAB-KLIMK_TXT,                          "JAM
       G_WAERS         LIKE GTAB-WAERS,                              "JAM
       G_CONT_NAME(50) TYPE C.                                       "JA
DATA FILL_REP_INFO.
   BC     SUNILP      05/14/2007
DATA: BEGIN OF ITAB_VBRP OCCURS 0.
         INCLUDE STRUCTURE VBRP.
DATA: END OF ITAB_VBRP.
DATA: T_PERC TYPE F,
       SUM_NETWR LIKE VBRP-NETWR.
*DATA: GTAB_LINES LIKE GTAB OCCURS 0 WITH HEADER LINE.
DATA: BEGIN OF GTAB_LINES OCCURS 0.
         INCLUDE STRUCTURE GTAB.
DATA: IND(1),
        OBAD TYPE P.
DATA: END OF GTAB_LINES.
DATA: BEGIN OF ITAB_VBRP1 OCCURS 0,
       VBELN LIKE VBRP-VBELN,
       NETWR LIKE VBRP-NETWR,
       ZZMREP LIKE VBRP-ZZMREP,       "Super Rep
       ZZLREP LIKE VBRP-ZZLREP,       "Rep
       PERC TYPE F,
       END OF ITAB_VBRP1.
   EC     SUNILP      05/14/2007
BEGIN_OF_BLOCK 2.
PARAMETERS: REGIO LIKE KNA1-REGIO.
PARAMETERS: CONSOL AS CHECKBOX.                      "TONYC
PARAMETERS: P_KKBER AS CHECKBOX,                      "TONYC
             P_CONV AS CHECKBOX. "tonyc issue #3047
PARAMETERS: SUMMEN LIKE RFPDO1-ALLGSUMM,
             TAGE1 LIKE RFPDO1-ALLGFAEL DEFAULT '30',
             TAGE2 LIKE RFPDO1-ALLGFAEL DEFAULT '60',
             TAGE3 LIKE RFPDO1-ALLGFAEL DEFAULT '90',
             TAGE4 LIKE RFPDO1-ALLGFAEL DEFAULT '120'.
END_OF_BLOCK 2.
BEGIN_OF_BLOCK 3.
SELECT-OPTIONS:   P_SUPREP FOR KNVP-KUNNR,   "Super REP      "DEVK939546
                   P_REP FOR KNVP-KUNNR,   "SALES REP         "DEVK939546
                   P_VKORG FOR TVKO-VKORG, "TONYC ISSUE 4743
                   P_LOTKZ FOR BKPF-LOTKZ. "TONYC ISSUE 4743
END_OF_BLOCK 3.
INITIALIZATION.                                                     "JAM
   PERFORM LOAD_T014.                                                "JAM
     refresh dd_augdt.
     clear dd_augdt.
     dd_augdt-option = 'EQ'.
     dd_augdt-sign   = 'I'.
     dd_augdt-low    = ' '.
    append dd_augdt.
AT SELECTION-SCREEN.
   IF CONSOL = 'X'.
     IF NOT P_SUPREP[] IS INITIAL.                          "DEVK939546
       MESSAGE E999 WITH 'Consolidated report not allowed w/ Super Rep'.
     ENDIF.
   ENDIF.
CHECK IF THE REP INFO IS ADDED OR NOT - VS
   IF NOT P_SUPREP IS INITIAL OR"TONY ISSUE 4743
      NOT P_REP IS INITIAL."TONY ISSUE 4743
     FILL_REP_INFO = 'X'."TONY ISSUE 4743
   ENDIF."TONY ISSUE 4743
START-OF-SELECTION.
get_frame_title 2.
add function module to track usage   JD 10/13/98 *****
   CALL FUNCTION 'Z_RUN_LOG'
     EXCEPTIONS
       OTHERS = 1.
*IF NOT P_SUPREP IS INITIAL AND NOT P_REP IS INITIAL.
   P_SUPREP = ' '.
*ENDIF.
GET KNA1 FIELDS LAND1 REGIO KUNNR NAME1 NAME2 ORT01 TELF1.          "JAM
new-page.
skip.
   TEMP_TELF1 = KNA1-TELF1.
   MAXMANDT = '19000101'.
   MAXMANST = 0.
   SUMVLIBB = 0.
   PERFORM GET_CUST_CONTACT.                                         "JAM
Check sales rep-                           NES071797
Get any valid record and exit.
IF NOT p_suprep[] IS INITIAL. "DEVK939546 "TONY ISSUE 4743 start
   good_super_rep = ' '.
   SELECT kunn2 INTO super_rep FROM knvp UP TO 1 ROWS
     WHERE
       kunnr = kna1-kunnr AND
       parvw = 'ZS' AND
       kunn2 IN p_suprep.
     EXIT.
   ENDSELECT.
   IF sy-subrc = 0.
     good_super_rep = 'X'.
     gtab-super = super_rep.
     super_rep = ' '.
   ENDIF.
   CHECK good_super_rep = 'X'.
   SELECT kunn2 INTO gtab-rep FROM knvp UP TO 1 ROWS
   WHERE
     kunnr = kna1-kunnr AND
     parvw = 'ZR' AND
     kunn2 IN p_rep.
     EXIT.
   ENDSELECT.
   CHECK sy-subrc = 0.
ELSEIF NOT p_rep[] IS INITIAL. "DEVK939546
   SELECT kunn2 INTO gtab-rep FROM knvp UP TO 1 ROWS
     WHERE
       kunnr = kna1-kunnr AND
       parvw = 'ZR' AND
       kunn2 IN p_rep.
     EXIT.
   ENDSELECT.
   CHECK sy-subrc = 0.
ENDIF.                      "TONY ISSUE 4743 end
GET KNB1 FIELDS BUKRS VLIBB ZTERM. "tonyc #2500
   GTAB-BUKRS = KNB1-BUKRS.
GTAB-ZTERM = KNB1-ZTERM.
   SUMVLIBB = SUMVLIBB + KNB1-VLIBB.
GET KNB5.
   IF KNB5-MADAT > MAXMANDT.
     MAXMANDT = KNB5-MADAT.
   ENDIF.
   IF KNB5-MAHNS > MAXMANST.
     MAXMANST = KNB5-MAHNS.
   ENDIF.
SUMKLIMB = SUMKLIMB + KLIMB.
GET BSID.
   CHECK BSID-BSTAT = SPACE.
field was intended for Business Area, changed to use Currency
   GTAB-GSBER = BSID-WAERS.
   IF P_KKBER = 'X'.                 "TONYC ISSUE #2500
     IF BSID-KKBER = ' '.
       GTAB-KKBER = BSID-BUKRS.
     ELSE.
       GTAB-KKBER       = BSID-KKBER. "TONYC ISSUE #2500
     ENDIF.
   ENDIF.                            "TONYC ISSUE #2500
   SELECT SINGLE * FROM BKPF "TONY ISSUE 4743
      WHERE BUKRS = BSID-BUKRS "TONY ISSUE 4743
        AND BELNR = BSID-BELNR "TONY ISSUE 4743
        AND GJAHR = BSID-GJAHR. "TONY ISSUE 4743
BC      SUNILP      05/14/2007
   IF BKPF-XREF2_HD IS NOT INITIAL.
     CHECK BKPF-XREF2_HD IN P_SUPREP. "TONY ISSUE 4743
   ELSE.
     IF P_REP[] IS INITIAL.
       REFRESH: ITAB_VBRP, ITAB_VBRP1.
       IF NOT BKPF-XBLNR IS INITIAL.
         SELECT * FROM VBRP INTO ITAB_VBRP WHERE VBELN = BKPF-XBLNR.
           APPEND ITAB_VBRP. CLEAR ITAB_VBRP.
         ENDSELECT.
        CHECK ITAB_VBRP[] IS NOT INITIAL.
         CLEAR: SUM_NETWR.
         LOOP AT ITAB_VBRP.
           CHECK ITAB_VBRP-ZZMREP IN P_SUPREP.
           CHECK ITAB_VBRP-ZZLREP IN P_REP.
           MOVE-CORRESPONDING ITAB_VBRP TO ITAB_VBRP1.
           COLLECT: ITAB_VBRP1.
           SUM_NETWR = SUM_NETWR + ITAB_VBRP-NETWR.
           CLEAR ITAB_VBRP.
         ENDLOOP.
        CHECK ITAB_VBRP1[] IS NOT INITIAL.
         LOOP AT ITAB_VBRP1.
           CLEAR: T_PERC.
           T_PERC = ( ITAB_VBRP1-NETWR / SUM_NETWR ).
           ITAB_VBRP1-PERC = T_PERC.
           MODIFY ITAB_VBRP1 INDEX SY-TABIX TRANSPORTING PERC.
         ENDLOOP.
       ENDIF.
     ENDIF.
   ENDIF.
EC      SUNILP      05/14/2007
   IF FILL_REP_INFO = 'X'.
     GTAB-SUPER = BKPF-XREF2_HD. "TONY ISSUE 4743   "MOVE THE CONTENTS OF XREF2_HD TO GTAB INTERNAL TABLE - VS
   ENDIF.
BC      SUNILP      05/14/2007
   IF BKPF-XREF1_HD IS NOT INITIAL.
     CHECK BKPF-XREF1_HD IN P_REP. "TONY ISSUE 4743 " ELSE MOVE THE CONTENTS OF - VS
   ELSE.
     REFRESH: ITAB_VBRP, ITAB_VBRP1.
     IF NOT BKPF-XBLNR IS INITIAL.
       SELECT * FROM VBRP INTO ITAB_VBRP WHERE VBELN = BKPF-XBLNR.
         APPEND ITAB_VBRP. CLEAR ITAB_VBRP.
       ENDSELECT.
        CHECK ITAB_VBRP[] IS NOT INITIAL.
       CLEAR: SUM_NETWR.
       LOOP AT ITAB_VBRP.
         CHECK ITAB_VBRP-ZZMREP IN P_SUPREP.
         CHECK ITAB_VBRP-ZZLREP IN P_REP.
         MOVE-CORRESPONDING ITAB_VBRP TO ITAB_VBRP1.
         COLLECT: ITAB_VBRP1.
         SUM_NETWR = SUM_NETWR + ITAB_VBRP-NETWR.
         CLEAR ITAB_VBRP.
       ENDLOOP.
        CHECK ITAB_VBRP1[] IS NOT INITIAL.
       LOOP AT ITAB_VBRP1.
         CLEAR: T_PERC.
         T_PERC = ( ITAB_VBRP1-NETWR / SUM_NETWR ).
         ITAB_VBRP1-PERC = T_PERC.
         MODIFY ITAB_VBRP1 INDEX SY-TABIX TRANSPORTING PERC.
       ENDLOOP.
     ENDIF.
   ENDIF.
EC      SUNILP      05/14/2007
   IF FILL_REP_INFO = 'X'.
     GTAB-REP = BKPF-XREF1_HD. "TONY ISSUE 4743
   ENDIF.
   CHECK BKPF-LOTKZ    IN P_LOTKZ. "TONY ISSUE 4743
   CHECK BKPF-BRNCH    IN P_VKORG. "TONY ISSUE 4743
   SELECT SINGLE FILKD INTO GTAB-FILKD FROM BSEG
      WHERE BUKRS = BSID-BUKRS
        AND BELNR = BSID-BELNR
        AND GJAHR = BSID-GJAHR
        AND BUZEI = BSID-BUZEI.
gtab-gsber = bsid-gsber.
get rep info for each bsid record
IF NOT P_SUPREP IS INITIAL.                                  "tonyc
    SELECT KUNNR FROM VBPA INTO HOLD_REP UP TO 1 ROWS         "tonyc
          WHERE VBELN = BSID-VBELN                            "tonyc
          AND PARVW = 'ZR'.                                   "tonyc
    ENDSELECT.                                                "tonyc
    IF NOT P_REP IS INITIAL.                                  "tonyc
      CHECK HOLD_REP = P_REP.                                 "tonyc
    ENDIF.                                                    "tonyc
    GTAB-REP = HOLD_REP.                                      "tonyc
    HOLD_REP = ' '.                                           "tonyc
ENDIF.                                                       "tonyc
   PERFORM GET_KNKK_INFO.                                            "JAM
   GTAB-KLIMK_TXT = G_KLIMK_TXT.
   GTAB-WAERS     = G_WAERS.
   GTAB-LAND1 = KNA1-LAND1.
   GTAB-REGIO = KNA1-REGIO.
   GTAB-KUNNR = KNA1-KUNNR.
   GTAB-NAME1 = KNA1-NAME1.
   GTAB-NAME2 = KNA1-NAME2.
   GTAB-ORT01 = KNA1-ORT01.
*if there is no phone number for the contact, pull the phone
*number from the sold-to
   IF KNVK-TELF1 = ' '.
     GTAB-TELF1      = TEMP_TELF1.
   ELSE.
     GTAB-TELF1      = KNVK-TELF1.                                 "JAM
   ENDIF.
   GTAB-CONT_NAME1 = KNVK-NAME1.
   GTAB-NAMEV      = KNVK-NAMEV.
verzug = bsega-netdt - dd_stida.
   VERZUG = DD_STIDA - BSEGA-NETDT.     "days past due calculation
   OP = 'X'.
   GTAB-RAST2 = GTAB-RAST3 = GTAB-RAST4 = 0.
   GTAB-RAST5 = GTAB-RAST6 = OBAD = GTAB-RAST7 = 0.
   IF VERZUG LE 0.                      "future due
     GTAB-RAST1 = BSEGA-WRSHB.
   ELSE.
     IF VERZUG LE TAGE1.                "past due 1 to tage1 days
       GTAB-RAST1 = BSEGA-WRSHB.
       GTAB-RAST2 = BSEGA-WRSHB.
       OBAD       = BSEGA-WRSHB.
     ELSE.
       IF VERZUG LE TAGE2.              "past due tage1 to tage2 days
         GTAB-RAST1 = BSEGA-WRSHB.
         GTAB-RAST3 = BSEGA-WRSHB.
         OBAD       = BSEGA-WRSHB.
       ELSE.
         IF VERZUG LE TAGE3.            "past due tage2 to tage3 days
           GTAB-RAST1 = BSEGA-WRSHB.
           GTAB-RAST4 = BSEGA-WRSHB.
           OBAD       = BSEGA-WRSHB.
         ELSE.
           IF VERZUG LE TAGE4.          "past due tage3 to tage4 days
             GTAB-RAST1 = BSEGA-WRSHB.
             GTAB-RAST5 = BSEGA-WRSHB.
             OBAD       = BSEGA-WRSHB.
           ELSE.
             IF VERZUG GT TAGE4.        "past due > tage4 days
               GTAB-RAST1 = BSEGA-WRSHB.
               GTAB-RAST6 = BSEGA-WRSHB.
               OBAD       = BSEGA-WRSHB.
             ENDIF.
           ENDIF.
         ENDIF.
       ENDIF.
     ENDIF.
   ENDIF.
   GTAB-RAST7 = GTAB-RAST1 - OBAD.
stab = gtab.
   MOVE-CORRESPONDING GTAB TO STAB.
BC     SUNILP       05/15/2007
   IF ITAB_VBRP1[] IS NOT INITIAL.
     GTAB-T_IND = 'X'.
     LOOP AT ITAB_VBRP1.
       MOVE-CORRESPONDING GTAB TO GTAB_LINES.
       GTAB_LINES-SORT_GSB = '1'.
       GTAB_LINES-SUPER = ITAB_VBRP1-ZZMREP.
       GTAB_LINES-REP = ITAB_VBRP1-ZZLREP.
       GTAB_LINES-RAST1 = GTAB_LINES-RAST1 * ITAB_VBRP1-PERC.
       GTAB_LINES-RAST2 = GTAB_LINES-RAST2 * ITAB_VBRP1-PERC.
       GTAB_LINES-RAST3 = GTAB_LINES-RAST3 * ITAB_VBRP1-PERC.
       GTAB_LINES-RAST4 = GTAB_LINES-RAST4 * ITAB_VBRP1-PERC.
       GTAB_LINES-RAST5 = GTAB_LINES-RAST5 * ITAB_VBRP1-PERC.
       GTAB_LINES-RAST6 = GTAB_LINES-RAST6 * ITAB_VBRP1-PERC.
       GTAB_LINES-RAST7 = GTAB_LINES-RAST7 * ITAB_VBRP1-PERC.
GTAB_LINES-OBAD = GTAB_LINES-OBAD * ITAB_VBRP1-PERC.
       COLLECT: GTAB_LINES.
     ENDLOOP.
   ELSE.
     MOVE-CORRESPONDING GTAB TO GTAB_LINES.
     GTAB_LINES-T_IND = 'X'.
     GTAB_LINES-SORT_GSB = '1'.
     IF GTAB_LINES-SUPER IN P_SUPREP OR GTAB_LINES-REP IN P_REP.
       COLLECT: GTAB_LINES.
     ENDIF.
   ENDIF.
EC     SUNILP       05/15/2007
gtab-sort_gsb = stab-sort_gsb = '0'.
collect: gtab, stab.
gtab-gsber = stab-gsber = '****'.
   GTAB-SORT_GSB = '1'.
   IF REGIO = SPACE OR REGIO = GTAB-REGIO.
     IF GTAB_LINES-SUPER IN P_SUPREP OR GTAB_LINES-REP IN P_REP.
       COLLECT: GTAB, STAB.
     ENDIF.
   ENDIF.
END-OF-SELECTION.
   TAGE1A = TAGE1 + 1.
   TAGE2A = TAGE2 + 1.
   TAGE3A = TAGE3 + 1.
   IF SUMMEN = ' '.
   sort gtab by bukrs land1 regio kunnr gsber sort_gsb.
sort gtab by bukrs land1 regio name1 kunnr gsber sort_gsb.      "JAM
     IF CONSOL = 'X'.
       SORT GTAB BY LAND1 REGIO NAME1 KUNNR BUKRS KKBER GSBER SORT_GSB.
       "TONYC
       REPORT_TYPE = 'consolidated'.
     ELSEIF NOT P_SUPREP[] IS INITIAL.                      "DEVK939546
       SORT GTAB
         BY SUPER REP NAME1 BUKRS KKBER LAND1 REGIO NAME1 GSBER SORT_GSB.
BC   SUNILP   05/15/2007
       SORT GTAB_LINES
         BY SUPER REP NAME1 BUKRS KKBER LAND1 REGIO NAME1 GSBER SORT_GSB.
EC   SUNILP   05/15/2007
       REPORT_TYPE = 'super rep'.
       CLEAR STAB.   "tonyc 03/06/2004
       REFRESH STAB. "tonyc 03/06/2004
     ELSEIF NOT P_REP[] IS INITIAL.                         "DEVK939546
       SORT GTAB                                            "DEVK939546
         BY REP NAME1 BUKRS KKBER LAND1 REGIO NAME1 GSBER SORT_GSB.
                                                            "DEVK939546
BC   SUNILP   05/15/2007
       SORT GTAB_LINES
         BY REP NAME1 BUKRS KKBER LAND1 REGIO NAME1 GSBER SORT_GSB.
EC   SUNILP   05/15/2007
       REPORT_TYPE = 'rep'.                                 "DEVK939546
       CLEAR STAB.   "tonyc 03/06/2004
       REFRESH STAB. "tonyc 03/06/2004
     ELSE.
       SORT GTAB BY BUKRS KKBER LAND1 REGIO NAME1 KUNNR GSBER SORT_GSB.
BC   SUNILP   05/15/2007
       SORT GTAB_LINES BY BUKRS KKBER LAND1 REGIO NAME1 KUNNR GSBER SORT_GSB.
EC   SUNILP   05/15/2007
       REPORT_TYPE = 'regular'.
     ENDIF.
BC   SUNILP   05/15/2007
     DELETE ADJACENT DUPLICATES FROM GTAB COMPARING BUKRS NAME1.
     LOOP AT GTAB_LINES.
       IF P_REP[] IS INITIAL.
         IF GTAB_LINES-SUPER NOT IN P_SUPREP.
           DELETE GTAB_LINES.
         ENDIF.
       ELSE.
         IF GTAB_LINES-SUPER NOT IN P_SUPREP OR GTAB_LINES-REP NOT IN P_REP.
           DELETE GTAB_LINES.
         ENDIF.
       ENDIF.
     ENDLOOP.
     LOOP AT GTAB.
       READ TABLE GTAB_LINES WITH KEY BUKRS = GTAB-BUKRS
                                      NAME1 = GTAB-NAME1.
       IF SY-SUBRC NE '0'.
         DELETE GTAB.
       ENDIF.
     ENDLOOP.
EC   SUNILP   05/15/2007
     LOOP AT GTAB.
       MOVE GTAB-BUKRS TO T001-BUKRS. READ TABLE T001.
       RESERVE 5 LINES.
       CASE REPORT_TYPE.
         WHEN 'regular'.
           IF HOLD_BUKRS <> GTAB-BUKRS.
             IF SY-TABIX > 1.                                   "TONYC
               NEW-PAGE. SKIP.                                 "TONYC
             ENDIF.                                             "TONYC
           ENDIF.
           PERFORM WRITE_CUST_INFO.                               "TONYC
           PERFORM WRITE_DETAIL.
         hold_bukrs = gtab-bukrs.                               "tonyc
         WHEN 'consolidated'.
           IF HOLD_KUNNR <> GTAB-KUNNR.                           "TONYC
             PERFORM WRITE_CUST_INFO.                           "TONYC
           ENDIF.                                                 "TONYC
           HOLD_KUNNR = GTAB-KUNNR.                               "TONYC
           PERFORM WRITE_DETAIL.
         WHEN 'super rep'.
          IF GTAB-T_IND NE 'X'.
   BC     SUNILP     05/22/2007
            READ TABLE GTAB_LINES WITH KEY BUKRS = GTAB-BUKRS
                                           NAME1 = GTAB-NAME1.
   EC     SUNILP     05/22/2007
            IF ( HOLD_SUPER <> GTAB_LINES-SUPER ) OR
               ( HOLD_REP2 <> GTAB_LINES-REP ).
              NEW-PAGE.
              PERFORM GET_AND_WRITE_SUPERINFO.
            ENDIF.
            HOLD_REP2 = GTAB_LINES-REP.
            HOLD_SUPER = GTAB_LINES-SUPER.
            IF HOLD_KUNNR <> GTAB-KUNNR.                           "TONYC
              WRITE :/.                                           "TONYC
              ULINE.                                              "TONYC
              PERFORM WRITE_CUST_INFO.                            "TONYC
            ENDIF.                                                 "TONYC
            HOLD_KUNNR = GTAB-KUNNR.                               "TONYC
            PERFORM WRITE_DETAIL.                                  "TONYC
            AT END OF REP.                                 "DEVK939546
              SKIP.                                        "DEVK939546
              RESERVE 7 LINES.                             "DEVK939546
              FORMAT COLOR COL_TOTAL INTENSIFIED.          "DEVK939546
              WRITE: / 'Summary for Rep:',                 "DEVK939546
                        GTAB-REP, '/', REP_NAME, 132 ONEBYTE."DEVK939546
              PERFORM WRITE_TOTS TABLES RTOT.              "DEVK939546
              REFRESH RTOT.                                "DEVK939546
            ENDAT.                                         "DEVK939546
            AT END OF SUPER.                               "DEVK939546
              CLEAR STAB.   "tonyc 03/06/2004
              REFRESH STAB. "tonyc 03/06/2004
              NEW-PAGE. SKIP.                              "DEVK939546
              FORMAT COLOR COL_TOTAL INTENSIFIED.          "DEVK939546
              WRITE: / 'Summary for Super Rep:',           "DEVK939546
                     GTAB-SUPER, '/', SUPER_NAME, 132 ONEBYTE."DEVK939546
              PERFORM WRITE_TOTS TABLES STOT.              "DEVK939546
              REFRESH STOT.                                "DEVK939546
            ENDAT.                                         "DEVK939546
          ELSE.
           LOOP AT GTAB_LINES WHERE BUKRS = GTAB-BUKRS
                                AND NAME1 = GTAB-NAME1.
             IF ( HOLD_SUPER <> GTAB_LINES-SUPER ) OR
                ( HOLD_REP2 <> GTAB_LINES-REP ).
               NEW-PAGE.
               PERFORM GET_AND_WRITE_SUPERINFO.
             ENDIF.
             HOLD_REP2 = GTAB_LINES-REP.
             HOLD_SUPER = GTAB_LINES-SUPER.
             IF HOLD_KUNNR <> GTAB_LINES-KUNNR.
               WRITE :/.
               ULINE.
               PERFORM WRITE_CUST_INFO.
             ENDIF.
             HOLD_KUNNR = GTAB_LINES-KUNNR.
             PERFORM WRITE_DETAIL.
             AT END OF REP.
               SKIP.
               RESERVE 7 LINES.
               FORMAT COLOR COL_TOTAL INTENSIFIED.
               WRITE: / 'Summary for Rep:',
                         GTAB_LINES-REP, '/', REP_NAME, 132 ONEBYTE.
               PERFORM WRITE_TOTS TABLES RTOT.
               REFRESH RTOT.
             ENDAT.
             AT END OF SUPER.
               CLEAR STAB.   "tonyc 03/06/2004
               REFRESH STAB. "tonyc 03/06/2004
               NEW-PAGE. SKIP.
               FORMAT COLOR COL_TOTAL INTENSIFIED.
               WRITE: / 'Summary for Super Rep:',
                      GTAB_LINES-SUPER, '/', SUPER_NAME, 132 ONEBYTE.
               PERFORM WRITE_TOTS TABLES STOT.
               REFRESH STOT.
             ENDAT.
           ENDLOOP.
          ENDIF.
         WHEN 'rep'.                                        "DEVK939546
           LOOP AT GTAB_LINES WHERE BUKRS = GTAB-BUKRS
                                AND NAME1 = GTAB-NAME1.
             IF HOLD_REP2 <> GTAB_LINES-REP.                "DEVK939546
               NEW-PAGE.                                    "DEVK939546
               PERFORM GET_AND_WRITE_REPINFO.               "DEVK939546
             ENDIF.                                         "DEVK939546
             HOLD_REP2 = GTAB_LINES-REP.                    "DEVK939546
             IF HOLD_KUNNR <> GTAB_LINES-KUNNR.             "DEVK939546
               WRITE :/.                                    "DEVK939546
               ULINE.                                       "DEVK939546
               PERFORM WRITE_CUST_INFO.                     "DEVK939546
             ENDIF.                                         "DEVK939546
             HOLD_KUNNR = GTAB_LINES-KUNNR.                 "DEVK939546
             PERFORM WRITE_DETAIL.                          "DEVK939546
             AT END OF REP.                                 "DEVK939546
               SKIP.                                        "DEVK939546
               RESERVE 7 LINES.                             "DEVK939546
               FORMAT COLOR COL_TOTAL INTENSIFIED.          "DEVK939546
               WRITE: / 'Summary for Rep:',                 "DEVK939546
                         GTAB_LINES-REP, '/', REP_NAME, 132 ONEBYTE."DEVK939546
               PERFORM WRITE_TOTS TABLES RTOT.              "DEVK939546
               REFRESH RTOT.                                "DEVK939546
             ENDAT.                                         "DEVK939546
           ENDLOOP.
       ENDCASE.
     ENDLOOP.
   ENDIF.
   OP = ' '.
   REFRESH GTAB.
   IF NOT REPORT_TYPE = 'super rep'.
     ULINE.
   ENDIF.
   SKIP 1.
   IF SUMMEN = ' '. "if 'output totals only' bypass new-page
     NEW-PAGE. SKIP.
   ENDIF.
   WRITE: /25 TEXT-030, 132 ONEBYTE, /25 TEXT-031, 132 ONEBYTE.
   PERFORM WRITE_TOTS TABLES STAB.                          "DEVK939546
TOP-OF-PAGE.
   INTENS = SPACE.
   FORMAT COLOR COL_HEADING INTENSIFIED ON.
   WRITE: / SY-VLINE, 1 TEXT-001, DD_STIDA, 75 TEXT-051, 132 SY-VLINE.
   ULINE.
   WRITE: / SY-VLINE, 13 SY-VLINE, 30 SY-VLINE,
                47 SY-VLINE, 58 TEXT-003, 81 SY-VLINE,
          92 TEXT-003, 115 SY-VLINE, 118 TEXT-003, 132 SY-VLINE,
          / SY-VLINE, 02 TEXT-004, 13 SY-VLINE, TEXT-002,
                30 SY-VLINE, 32 TEXT-018, 47 SY-VLINE,
              50 '1', 54 TEXT-040, 57 TAGE1, 64 SY-VLINE,   " 65 tage2,
              67 TAGE1A, 72 TEXT-040, 75 TAGE2,
            81 SY-VLINE, 83 TAGE2A, 89 TEXT-040, 91 TAGE3, 98 SY-VLINE,
           101 TAGE3A, 107 TEXT-040, 110 TAGE4, 115 SY-VLINE,
                               117 TAGE4, 123 TEXT-017, 132 SY-VLINE.
   ULINE.
   SKIP 1.
   SUMMARY.
   FORMAT COLOR COL_HEADING INTENSIFIED OFF.
      FORM write_tots                                               *
--> PTAB                                                          *
FORM WRITE_TOTS TABLES PTAB TYPE TOT_TAB.                  "DEVK939546
   CLEAR INTENS.                                            "DEVK939546
   FORMAT COLOR COL_HEADING INTENSIFIED OFF.                "DEVK939546
   IF P_CONV = 'X'. "tonyc issue #3047 begin
     WRITE /4 TEXT-101.
     WRITE: /4 TEXT-102,
            50 TEXT-100.
   ENDIF.           "tonyc issue #3047 end
   ULINE.                                                   "DEVK939546
   SORT PTAB BY BUKRS GSBER.                                "DEVK939546
   LOOP AT PTAB.                                            "DEVK939546
     IF SY-TABIX > 1.
       WRITE_TOTAL = 'X'.
     ENDIF.
     MOVE PTAB-BUKRS TO T001-BUKRS. READ TABLE T001.        "DEVK939546
     MOVE PTAB-GSBER TO T001-WAERS.                         "DEVK939546
     IF P_CONV = 'X'. "tonyc issue #3047 begin
       PERFORM CONVERT_VALUES USING STAB-RAST1
                                    STAB-GSBER.
       PERFORM CONVERT_VALUES USING STAB-RAST2
                                    STAB-GSBER.
       PERFORM CONVERT_VALUES USING STAB-RAST3
                                    STAB-GSBER.
       PERFORM CONVERT_VALUES USING STAB-RAST4
                                    STAB-GSBER.
       PERFORM CONVERT_VALUES USING STAB-RAST5
                                    STAB-GSBER.
       PERFORM CONVERT_VALUES USING STAB-RAST6
                                    STAB-GSBER.
       PERFORM CONVERT_VALUES USING STAB-RAST7
                                    STAB-GSBER.
     ENDIF. "TOnyc issue #3047 end
     MOVE-CORRESPONDING PTAB TO STAB.
     COLLECT STAB.
     IF P_KKBER = 'X'.        "TONYC ISSUE #2500
       CLEAR HOLD_KKBER_DESC2.
       SELECT SINGLE KKBTX INTO HOLD_KKBER_DESC2 FROM T014T
          WHERE KKBER = STAB-KKBER AND
                SPRAS = 'E'.
       IF SY-SUBRC <> '0'.
         HOLD_KKBER_DESC2 = 'Undetermined'.
       ENDIF.
       FORMAT COLOR OFF.
       WRITE: / SY-VLINE.
       FORMAT COLOR COL_HEADING INTENSIFIED OFF.
       WRITE: 6 STAB-GSBER, HOLD_KKBER_DESC2, SY-VLINE.
       ULINE.
       FORMAT COLOR OFF.
       WRITE: / SY-VLINE.
       FORMAT COLOR COL_HEADING INTENSIFIED OFF.
       IF P_CONV = 'X'. "tonyc issue #3047 begin
         T001-WAERS = 'USD'.
       ENDIF.           "tonyc issue #3047 end
       WRITE: 13 STAB-RAST1 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) STAB-RAST7 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) STAB-RAST2 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) STAB-RAST3 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) STAB-RAST4 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) STAB-RAST5 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) STAB-RAST6 NO-ZERO CURRENCY T001-WAERS, SY-VLINE.
       HOLD_BUKRS2 = STAB-BUKRS.      "TONYC ISSUE #2500
       ULINE.
       FORMAT COLOR OFF.
       TOTAL_RAST1 = STAB-RAST1 + TOTAL_RAST1.
       TOTAL_RAST2 = STAB-RAST2 + TOTAL_RAST2.
       TOTAL_RAST3 = STAB-RAST3 + TOTAL_RAST3.
       TOTAL_RAST4 = STAB-RAST4 + TOTAL_RAST4.
       TOTAL_RAST5 = STAB-RAST5 + TOTAL_RAST5.
       TOTAL_RAST6 = STAB-RAST6 + TOTAL_RAST6.
       TOTAL_RAST7 = STAB-RAST7 + TOTAL_RAST7.
     ELSE.
       FORMAT COLOR COL_NORMAL INTENSIFIED OFF.             "DEVK939546
       IF INTENS = SPACE.                                   "DEVK939546
         FORMAT COLOR COL_NORMAL INTENSIFIED OFF.           "DEVK939546
         INTENS = 'X'.                                      "DEVK939546
       ELSE.                                                "DEVK939546
         FORMAT COLOR COL_NORMAL INTENSIFIED ON.            "DEVK939546
         INTENS = SPACE.                                    "DEVK939546
       ENDIF.                                               "DEVK939546
       WRITE: / SY-VLINE, PTAB-BUKRS, PTAB-GSBER, SY-VLINE, "DEVK939546
        (14) PTAB-RAST1 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,"DEVK939546
        (14) PTAB-RAST7 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,"DEVK939546
        (14) PTAB-RAST2 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,"DEVK939546
        (14) PTAB-RAST3 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,"DEVK939546
        (14) PTAB-RAST4 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,"DEVK939546
        (14) PTAB-RAST5 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,"DEVK939546
        (14) PTAB-RAST6 NO-ZERO CURRENCY T001-WAERS, SY-VLINE."DEVK939546
       TOTAL_RAST1 = STAB-RAST1 + TOTAL_RAST1.
       TOTAL_RAST2 = STAB-RAST2 + TOTAL_RAST2.
       TOTAL_RAST3 = STAB-RAST3 + TOTAL_RAST3.
       TOTAL_RAST4 = STAB-RAST4 + TOTAL_RAST4.
       TOTAL_RAST5 = STAB-RAST5 + TOTAL_RAST5.
       TOTAL_RAST6 = STAB-RAST6 + TOTAL_RAST6.
       TOTAL_RAST7 = STAB-RAST7 + TOTAL_RAST7.
     ENDIF.
   ENDLOOP.                                                 "DEVK939546
   ULINE.                                                   "DEVK939546
   IF P_KKBER = 'X'.        "TONYC ISSUE #2500
     IF P_CONV = 'X'. "tonyc issue #3047 begin
       FORMAT COLOR OFF.
       FORMAT COLOR COL_HEADING INTENSIFIED OFF.
       WRITE: SY-VLINE,
            6 'TOTAL                                   ', SY-VLINE.
       ULINE.
       FORMAT COLOR OFF.
       WRITE: / SY-VLINE.
       FORMAT COLOR COL_HEADING INTENSIFIED OFF.
       WRITE: 13 TOTAL_RAST1 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) TOTAL_RAST7 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) TOTAL_RAST2 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) TOTAL_RAST3 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) TOTAL_RAST4 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) TOTAL_RAST5 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) TOTAL_RAST6 NO-ZERO CURRENCY T001-WAERS, SY-VLINE.
       ULINE.
     ENDIF. "tonyc issue #3047 end
   ELSE.
     IF P_CONV = 'X'.
       FORMAT COLOR OFF.
       FORMAT COLOR COL_HEADING INTENSIFIED OFF.
       WRITE: SY-VLINE,
            6 'TOTAL                                   ', SY-VLINE.
       ULINE.
       FORMAT COLOR OFF.
       WRITE: / SY-VLINE.
       FORMAT COLOR COL_HEADING INTENSIFIED OFF.
       WRITE: 13 TOTAL_RAST1 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) TOTAL_RAST7 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) TOTAL_RAST2 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) TOTAL_RAST3 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) TOTAL_RAST4 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) TOTAL_RAST5 NO-ZERO CURRENCY T001-WAERS, SY-VLINE,
       (14) TOTAL_RAST6 NO-ZERO CURRENCY T001-WAERS, SY-VLINE.
       ULINE.
     ENDIF.
   ENDIF.
   SKIP 1.                                                  "DEVK939546
ENDFORM.                                                   "DEVK939546
*&      Form GET_KNKK_INFO
      text
--> p1        text
<-- p2        text
FORM GET_KNKK_INFO.
   CLEAR: G_WAERS,
          G_KLIMK_TXT,
          KNKK-KLIMK.
get credit control area (KKBER) for comp code (BUKRS)
   SELECT SINGLE KLIMK
          INTO   KNKK-KLIMK
          FROM   KNKK
          WHERE KUNNR = KNA1-KUNNR AND
                 KKBER = T001-KKBER.
   IF SY-SUBRC = 0.
get currency for cred ctrl area
     CLEAR IT_T014.
     READ TABLE IT_T014 WITH KEY KKBER = T001-KKBER BINARY SEARCH.
     G_WAERS = IT_T014-WAERS.
     WRITE KNKK-KLIMK TO G_KLIMK_TXT CURRENCY G_WAERS.
   ENDIF.
ENDFORM.                    " GET_KNKK_INFO
*&      Form SELECT_KNKK
      text
     -->P_KKBER       Credit Limit Controlling Area

This is a FI Aging report.

Need HELP disputing credit reports I'm stuck & Nervous

Hi Guys,I'm working on my husband's and my credit. I'm drafting a dispute letter found on the MY Fico site and well, I'm a bit nervous! I'm hoping to get all the collections removed because of errors and the misrepresentation of reporting as Factoring companies and they are in fact Junk Debt Collectors! Debt was purchased after the charge off happened!
I could use a bit of help with what I've found. I'm stuck on how to dispute or if it's worth the time to do so. Thanks for any help. One Collections is with Calvary (has 1 Cap One account) because the DOFD is wrong and the last time they updated on his report was in May 2015. I don't really want to get them to report again! LOL The other Collector PRA has 2 Cap One accounts and doesn't include a DOFD! Also I noticed on the Cap One charge offs they have the last DOFD wrong on all 3! Last Payment made 12/15/2011 on payment history box it's Jan 2012 OK Feb 2012 30days late. 2 other CAP ONE Accounts have the Last Payment on 6/28/2012 and in payment history box it's July 2012 OK Augst 2012 30days late,
Plus for Fingerhut, the Date of last payment is July 12, 2012 and in pay history it has 9/12/12 OK 30 day late October 2012 then Nov and Dec with N/R and Jan 2013 120 days late then FEB N/R then Charge off in March 2013.

Try this:
1.Turn the Playbook
2. On your PC, open the BlackBerry Desktop Software
3. Use the USB cable, connect the BlackBerry to your PC
4. A message will appear saying BlackBerry Desktop Software can't connect to your BlackBerry PlayBook tablet. When this appears, click "Update". ◦ Please note that this notice will disappear when the tablet starts PlayBook completely. If this occurs, turn off the playbook and repeat the above steps
5. Enter your email address or uncheck the "Yes, send me an email when updates are available."

Help with exporting Deski to text file via Web Intelligence

We are currently converting from BO version 5 to BO XI rev2. I have a report that must be scheduled to a flie in plain text format. I am using a deski report. When I save as to text, the file is fine. When I schedule it in webi, the file seems to be missing the end of line character for each row in the table, so it cannot be used for an import to another program. Can anybody help with this?-

well, in that case you need to determine if this issue only happens with a perticular report or all of them, if it happens only with reports imported from 5.x or with newly created reports as well.
Looks like it is happening only when report is exported from Infoview, not in the Deski client. This might indicate a problem at the Web Apllication server (tomcat or one you use).
If this issue is happening with any report - it might be a bug. In that case you have no options as there are no more patches for XIR2.
On the other hand - if all you need is to extract data for consumption in another tool , why not use Data integrator instead ?
Also, if this desn't work in Deski - does it work if you convert your reports to webi and export from those ?

Needing help with crashing PhotoShop after Yosemite OS Update

I updated to the new Yosemite OS and was using PhotoShop CS5.1, and now the program crashes after trying to open more than one photo at a time. I have cleared all settings and updated everything I can update. I can't revert back to my old OS because it wasn't backed up before doing so. Is there a solution to this?

Chris, I was not able to help with this Yosemite CS3 problem, but I did ask for a crash report. If you have time can you go over it?
Another yosemite issue
Gene

Help with creating reports - Report Builder 6.0.8.11.3

Helllo!
I’m using report builder 6.0.8.11.3 and the operating system is Unix, and the result is a character text file.
Now imagine the following situation, I need to send to a letter to several companies. That letter has some lines of introduction, in the first page, as well as the company address. Below this introduction I pretend to put a list of employees and each one info. Each employee info has four lines of size. And the list can grow from one person to hundreds, which makes the letter grow from one page to more.
This is simple to do it. The problem is that I need to know and to use in the letter, the number of current page and the total number of pages for each company.
This letter has two kinds of pages (one with the introduction text and some employees and other with employees only), and I need to know the number of employees for each page, to calculate the total number of pages. I have the propriety “max register number per page” but is useful for a page. Assuming that I get the total number pages using some PL/SQL.
Can you have any other solution? Or give me some help with this one?
Thanks.

Hi
I have problem in RTF output.How can I get this patch3 file.I am
not able to log on to "ftp.oracle".
Please help.
Vijay

Help with CF Reports and Dates

Can anyone here help me with
This
post ? I have been waiting for 3 days and after 4 posts no one
has been able to answer, please help!! I'm stuck on my project only
because of this. Thank you very, very much.
Nelson.

Sorry, I don't use cfreport so I would not be any help with
what may be inside the total_sales_report_by_date.cfr template.
However, shouldn't you be executin your query inside of your .cfm
emplate, then passing the query result to your report as a query
parameter within your cfreport tag, rather than passing the date
parameters in cfreportparam tags?
Phil

Problem with BPS Reports after upgarding the system to BI.7

Dear Experts,
We are facing problem with the BPS Reports after upgarding the system to BI.7
In 3.5system the reports are dispalyingthe data.
we have copied the production system to X system and has migrated the same to BI.7.
in the X system the reports are not showing the data and even we generated the web interfaces in X system.
After giving the input to BPS Layout and when we go for output ,we are getting the message No Data has been found.
when we chekced the corresponding cube data was existing.
It would be a great help if any valuable suggestions to over come the problem.
Regards,
Sunil...

Dear Andrey,
i am facing an error while filling the set up table for 2LIS_11_VAITM in the source system.
The error was "Company code has not been maintained for the sales documnet 1296".
when i checked the document in the Header table VBAK,company code was blank for the document .
Company code was there in the selections for the setup table.
The error means that company code should be maintained for the sales document as per my knolwedge.i think document was not created properly in the source system.
Could you please help me out to over come the problem.
Regards,
Sunil...

Need advice/help with Derogatory reporting from Wells Fargo Bank (Wells Fargo is the DEVIL)

Hello Everyone! I am new to the forum & at the ripe (old) age of 36 have finally decided to take control of my credit and financial future. Thank you in advance to those of you who contribute on here. It’s a great site.. I wish I had found it earlier in life. In any event, I am trying to increase credit scores and have two *recent* derogatoriness reported by Wells Fargo Bank for past due STUDENT LOANS. The story goes like this … my monthly payment amount due suddenly changed from $150.00 (even) per month to $150.80. Because I obtain online only statements and was busy with life (taking care of mom with dementia etc) I didn’t realize the change and logged in for a few months and only paid $150.00. Wells Fargo subsequently reported me as “30 days past due" for the months of June & July 2014 for the $1.60 balance. Really Wells Fargo???? When I realized the derogatory reporting, I of course called Wells Fargo and protested. I then followed up with a “good faith request to remove letter” or whatever it's called. I sent it to: ATTENTION: Credit Bureau Dispute Resolution Department (CBDRU)301 East 58th Street NorthSioux Falls, SD 57117-5185 However, Wells Fargo responded with “the reporting is accurate and will remain as reported.” ***HOLES! All over $1.60??!? Before the incident I was frequently late (not a very good customer) but since Jan 2015 I have paid like clockwork and ON TIME every month. So, I am planning another course of action. I am wondering if anyone knows someone at Wells Fargo that I can address another letter to or call. I refuse to believe some human with a heart will let this stand. Any (backdoor info) or suggestions are GREATLY appreciated. Oh. It may be important to note that I was also 30 days past due back in Oct 2010. This was "valid" and I never contested that. Blessings to everyone!

LeeRivers wrote:
The story goes like this … my monthly payment amount due suddenly changed from $150.00 (even) per month to $150.80. Because I obtain online only statements and was busy with life (taking care of mom with dementia etc) I didn’t realize the change and logged in for a few months and only paid $150.00. Wells Fargo subsequently reported me as “30 days past due" for the months of June & July 2014 for the $1.60 balance. Really Wells Fargo????It is unfortunate but it is accurate and they're under no obligation to remove. All you can do is to try to escalate but that may not even lead to a removal. LeeRivers wrote:
Before the incident I was frequently late (not a very good customer) but since Jan 2015 I have paid like clockwork and ON TIME every month.That's not going to help your case. A few months on being on time is a plus but it's not going to overcome a track record of requently being late. Derogs tend to have a major impact in general but a creditor is probably less likely to consider goodwill in a case like this versus a customer that has always paid on time and just happened to misread the amount due a couple of times. Good luck with it.

F4 help in alv report ( after execution )

hi all,
i want f4 help in my alv report( after execute it) in a particular filed.
is this possible???
In Advance Thanks
Amit Singh

hi,
use ref_fieldname and ref_tabname
like below
wa_fieldcat-ref_fieldname= 'NAME1'.
wa_fieldcat-ref_tabname = 'KNA1'.
Hope this helps
Regards
Ritesh J

EE are fraudsters and will never help with Credit Files

EE, like many other businesses are complete fraudsters and do not have a clue what they are doing when it comes to customer service and dealing with Credit Files. They say they have Terms & Conditions but this is complete rubbish as they don't even know themselves what is in them when questioned. I suggest everyone just goes to Ofcom as the credit reference agencies can't do anything - contrary to what EE say in getting in contact with them, as they ca't do anything.... It is EE that has to change your personal data, which they do not seem to know what to do. anyone that is about to lose a mortgage offer or other large some of money or asset - Im sorry, but unless you take them to court you are helpless. Message me if you want help
ThanksMartyn Edwards

you post is just having ago it's not saying why your having ago. And Ofcon do not deal with individuals.
And what has EE got to do with a mortgage. ???

Help with Dropdown box autopopulating text

I have created a dropdown box and set-it up with scripting to populate text fields based upon selection. The problem that I am having is when you make your selection it does not automatically update the text box. I have to click on another form field once I make a selection, then click on the text in the dropdown box. This will then result in the text fields auto populating. Could you please help, so that these extra steps will not need to be taken. Below is the coding that I used.
var f = event.target;
if (f.value == "Blank")
{this.getField("TestMe").value = "";
this.getField("InsuranceCodes").value = "";}
if (f.value == "Aetna")
{this.getField("TestMe").value = "";
this.getField("InsuranceCodes").value = "90791 - Diagnostic Evaluation";
this.getField("InsuranceCodes2").value ="90832/ 90834/ 90837 - Psychotherapy";
this.getField("InsuranceCodes3").value ="90846 - Family Psychotherapy w/o Patient";
this.getField("InsuranceCodes4").value ="90847 - Family Psychotherapy w/ Patient";
this.getField("InsuranceCodes5").value ="96101 - Psychological Testing";
this.getField("InsuranceCodes6").value ="96103 - Computer Testing";
this.getField("InsuranceCodes7").value ="";
this.getField("InsuranceCodes8").value ="";
this.getField("InsuranceCodes9").value ="";}
if (f.value == "Anthem BC")
{this.getField("TestMe").value = "";
this.getField("InsuranceCodes").value = "90791 - Diagnostic Evaluation";
this.getField("InsuranceCodes2").value ="90832/ 90834/ 90837 - Psychotherapy";
this.getField("InsuranceCodes3").value ="90846 - Family Psychotherapy w/o Patient";
this.getField("InsuranceCodes4").value ="90847 - Family Psychotherapy w/ Patient";
this.getField("InsuranceCodes5").value ="96101 - Psychological Testing";
this.getField("InsuranceCodes6").value ="96103 - Computer Testing";
this.getField("InsuranceCodes7").value ="";
this.getField("InsuranceCodes8").value ="";
this.getField("InsuranceCodes9").value ="";}

I did move the coding to validation script and deleted it from the actions. I clicked also to commit the selected value immediately. However, when I change "event.target" to "event.value" it no longer works. If I do all the steps but leave "event.target" it does autopopluate, but the information is incorrect.

Help with oracle listner after trying to change the hostaname on Fedora 9

After searching high and low on the internet for help with this error I am coming here for a little assistance with this issue. A week ago I tried to change the hostname of my machine and the connection to my Db stopped working.
When I type lsnrctl status I get the following messages
TNS-12537: Tns Connection closed
TNS-12560: Tns protocol adapter error
TNS-00507 Tns connection closed
Linux Erro: 29 Illegal seek
Then when I try to run netca I get a java vm error sigsev. Can anyone provide assistance.
This is on an 11g installation
Thanks
Edited by: user5599027 on Jan 27, 2009 2:24 PM

Here is my /etc/hosts file
>
# Do not remove the following line, or various programs
# that require network functionality will fail.
127.0.0.1 localhost.localdomain localhost localhost
192.168.0.195 localhost
Ive reverted everything in an attempt to get it back and running to no avail. And the user I am using is the same user that installed the product
>
-rwxr-x--- 1 ldhasty ldhasty 187 2007-05-08 00:03 shrept.lst
drwxr-x--- 2 ldhasty ldhasty 4096 2008-06-08 15:53 samples
-rwxr-x--- 1 ldhasty ldhasty 200 2008-06-08 16:01 sqlnet.ora
-rwxr-x--- 1 ldhasty ldhasty 379 2009-01-27 11:07 listener.ora
-rwxr-x--- 1 ldhasty ldhasty 322 2009-01-27 17:11 tnsnames.ora
>
-rwxr-x--- 1 ldhasty ldhasty 136437 2008-06-08 16:01 lsnrctl

Help with credit report after texts!

Similar Messages

Maybe you are looking for