Query modification

Question

hi
i have this query taken from the data model of report named "prepayment status report"
the rdf is APXINPSR.rdf
the query
SELECT     AID.invoice_id      C_prepay_inv_id,
     AID.distribution_line_number          C_prepay_dist_number,
     nvl(AID.prepay_amount_remaining,AID.amount) C_prepay_amount_remaining,
     AP_UTILITIES_PKG.Get_Charge_Account( AID.dist_code_combination_id,
          :P_chart_of_accounts_id, 'APXINPSR')      c_prepay_charge_account,
     PH.segment1                C_prepay_po_number,
     RSH.receipt_num               C_prepay_receipt_number
FROM      AP_INVOICES AI,
     AP_INVOICE_DISTRIBUTIONS AID,
     PO_DISTRIBUTIONS PD,
     PO_HEADERS PH,
     PO_LINES PL,
     PO_LINE_LOCATIONS PLL,
     RCV_TRANSACTIONS RTXNS,
     RCV_SHIPMENT_HEADERS RSH,
     RCV_SHIPMENT_LINES RSL
WHERE AI.INVOICE_ID = AID.INVOICE_ID
AND AID.LINE_TYPE_LOOKUP_CODE = 'ITEM'
AND AI.INVOICE_TYPE_LOOKUP_CODE = 'PREPAYMENT'
AND AI.PAYMENT_STATUS_FLAG||'' = 'Y'
AND nvl(AID.PREPAY_AMOUNT_REMAINING,AID.AMOUNT) > 0
AND nvl(AID.REVERSAL_FLAG,'N') != 'Y'
AND AID.PO_DISTRIBUTION_ID = PD.PO_DISTRIBUTION_ID (+)
AND PD.PO_HEADER_ID = PH.PO_HEADER_ID (+)
AND PD.LINE_LOCATION_ID = PLL.LINE_LOCATION_ID (+)
AND PLL.PO_LINE_ID = PL.PO_LINE_ID (+)
AND AID.RCV_TRANSACTION_ID = RTXNS.TRANSACTION_ID (+)
AND RTXNS.SHIPMENT_LINE_ID = RSL.SHIPMENT_LINE_ID (+)
AND RSL.SHIPMENT_HEADER_ID = RSH.SHIPMENT_HEADER_ID (+)
AND :P_prepayment_dist_flag = 'Y'can some on eguide me on
how to modify the c_prepay_charge_account in the query so output doesnt get affected , i need it in olap report so i have to get rid of the bind parameters
what do i replace :P_chart_of_accounts_id with
if i comment AND :P_prepayment_dist_flag = 'Y' will the output differ or what do i have to relace it with
both the bind parametes are specified in user parameters but no values mentioned
the code of the function
FUNCTION get_charge_account
                          ( p_ccid                 IN  NUMBER,
                            p_chart_of_accounts_id IN  NUMBER,
                            p_calling_sequence     IN  VARCHAR2)
RETURN VARCHAR2 IS
    current_calling_sequence        VARCHAR2(2000);
    debug_info                      VARCHAR2(500);
    l_return_val                    VARCHAR2(2000);
BEGIN
    -- Update the calling sequence
    current_calling_sequence := 'AP_UTILITIES_PKG.get_charge_account<-'||p_calling_sequence;
    debug_info := 'Calling fnd function to validate ccid';
      if p_ccid <> -1 then
            l_return_val := FND_FLEX_EXT.GET_SEGS(
                               APPLICATION_SHORT_NAME => 'SQLGL',
                               KEY_FLEX_CODE          => 'GL#',
                               STRUCTURE_NUMBER       => P_CHART_OF_ACCOUNTS_ID,
                               COMBINATION_ID         => P_CCID);
       else
  l_return_val := null;
     end if;
                return (l_return_val);
EXCEPTION
WHEN OTHERS THEN
    if (SQLCODE <> -20001) then
        FND_MESSAGE.SET_NAME('SQLAP', 'AP_DEBUG');
        FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
        FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
        FND_MESSAGE.SET_TOKEN('DEBUG_INFO', debug_info);
    end if;
        return NULL;
END get_charge_account;kindly guide me
kindly help me
Edited by: makdutakdu on Jul 4, 2010 2:19 PM

Answer 1

hi
for get_segments
FUNCTION get_segments(application_short_name      IN  VARCHAR2,
               key_flex_code            IN  VARCHAR2,
               structure_number     IN  NUMBER,
               combination_id            IN  NUMBER,
               concat_segment_values     OUT VARCHAR2)
                                   RETURN BOOLEAN IS
    n_segs_out     NUMBER;
    segs_out     SegmentArray;
    catvals_out VARCHAR2(2000);
  BEGIN
     init_message;
--  Call version that returns segments in array, then concatenate them.
    if(get_segments(application_short_name, key_flex_code, structure_number,
               combination_id, n_segs_out, segs_out) and
       concat_segs(n_segs_out, segs_out, delim, catvals_out)) then
       return(output_string(catvals_out, concat_segment_values));
    end if;
    set_failed;
    return(FALSE);
  EXCEPTION
    WHEN OTHERS then
      FND_MESSAGE.set_name('FND', 'FLEX-SSV EXCEPTION');
      FND_MESSAGE.set_token('MSG', 'get_segments() exception:  ' || SQLERRM);
      set_failed;
      return(FALSE);
  END get_segments;set_name and set_Token
    procedure SET_NAME(APPLICATION in varchar2, NAME in varchar2) is
    begin
        MSGAPP  := APPLICATION;
        MSGNAME := NAME;
        MSGDATA := '';
        FND_LOG_MODULE := DEFAULT_FND_LOG_MODULE;
        MSGSET  := TRUE;
    end;
    **  ### OVERLOADED (new private version) ###
    **     SET_TOKEN - define a message token with a value
    **  Private:  This procedure is only to be called by the ATG
    **            not for external use
    **  Arguments:
    **   token    - message token
    **   value    - value to substitute for token
    **   ttype    - type of token substitution:
    **                 'Y' translated, or "Yes, translated"
    **                 'N' constant, or "No, not translated"
    **                 'S' SQL query
    procedure SET_TOKEN(TOKEN in varchar2,
                        VALUE in varchar2,
                        TTYPE in varchar2 default 'N') is
    tok_type varchar2(1);
    begin
        if ( TTYPE not in ('Y','N','S')) then
           tok_type := 'N';
        else
           tok_type := TTYPE;
        end if;
        /* Note that we are intentionally using chr(0) rather than */
        /* FND_GLOBAL.LOCAL_CHR() for a performance bug (982909) */
     /* 3722358 - replace chr(0) in VALUE with spaces */
        MSGDATA := MSGDATA||tok_type||chr(0)||TOKEN||chr(0)||
                   replace(VALUE,chr(0),' ')||chr(0);
    end set_token;
    **  ### OVERLOADED (original version) ###
    **     SET_TOKEN - define a message token with a value,
    **              either constant or translated
    **  Public:  This procedure to be used by all
    procedure SET_TOKEN(TOKEN in varchar2,
                        VALUE in varchar2,
                        TRANSLATE in boolean default false) is
    TTYPE varchar2(1);
    begin
        if TRANSLATE then
            TTYPE := 'Y';
        else
            TTYPE := 'N';
        end if;
        SET_TOKEN(TOKEN, VALUE, TTYPE);
    end set_token;
    ** SET_TOKEN_SQL - define a message token with a SQL query value
    ** Description:
    **   Like SET_TOKEN, except here the value is a SQL statement which
    **   returns a single varchar2 value.  (e.g. A translated concurrent
    **   manager name.)  This statement is run when the message text is
    **   resolved, and the result is used in the token substitution.
    ** Arguments:
    **   token - Token name
    **   value - Token value.  A SQL statement
    procedure SET_TOKEN_SQL (TOKEN in varchar2,
                             VALUE in varchar2) is
    TTYPE  varchar2(1) := 'S';  -- SQL Query
    begin
        SET_TOKEN(TOKEN, VALUE, TTYPE );
    end set_token_sql;kindly guide