/*
select * from c_acctschema_default ad
where ad.ad_client_id = 1000000;
select * from c_validcombination vc
where vc.c_validcombination_id = 1000204;
*/
-- select * from adempiere.fnt_getacctschema_default(1000769);
create or replace function fnt_getacctschema_default(p_account_id numeric(10,0))
returns varchar
as $$
declare
v_defaultacct varchar;
begin
with cte_defaultacct as
(
-- CB_ASSET_ACCT
select distinct
'CB_ASSET_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.cb_asset_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- B_ASSET_ACCT
select distinct
'B_ASSET_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.b_asset_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- B_INTRANSIT_ACCT
select distinct
'B_INTRANSIT_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.b_intransit_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- B_UNIDENTIFIED_ACCT
select distinct
'B_UNIDENTIFIED_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.b_unidentified_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- B_UNALLOCATEDCASH_ACCT
select distinct
'B_UNALLOCATEDCASH_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.b_unallocatedcash_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- C_RECEIVABLE_ACCT
select distinct
'C_RECEIVABLE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.c_receivable_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- P_ASSET_ACCT
select distinct
'P_ASSET_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.p_asset_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- NOTINVOICEDRECEIPTS_ACCT
select distinct
'NOTINVOICEDRECEIPTS_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.notinvoicedreceipts_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- W_DIFFERENCES_ACCT
select distinct
'W_DIFFERENCES_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.w_differences_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- V_PREPAYMENT_ACCT
select distinct
'V_PREPAYMENT_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.v_prepayment_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- T_CREDIT_ACCT
select distinct
'T_CREDIT_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.t_credit_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- W_REVALUATION_ACCT
select distinct
'W_REVALUATION_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.w_revaluation_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- V_LIABILITY_ACCT
select distinct
'V_LIABILITY_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.v_liability_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- WITHHOLDING_ACCT
select distinct
'WITHHOLDING_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.withholding_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- T_DUE_ACCT
select distinct
'T_DUE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.t_due_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- B_PAYMENTSELECT_ACCT
select distinct
'B_PAYMENTSELECT_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.b_paymentselect_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- P_REVENUE_ACCT
select distinct
'P_REVENUE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.p_revenue_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- REALIZEDGAIN_ACCT
select distinct
'REALIZEDGAIN_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.realizedgain_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- CB_RECEIPT_ACCT
select distinct
'CB_RECEIPT_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.cb_receipt_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- CH_REVENUE_ACCT
select distinct
'CH_REVENUE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.ch_revenue_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- P_COGS_ACCT
select distinct
'P_COGS_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.p_cogs_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- T_EXPENSE_ACCT
select distinct
'T_EXPENSE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.t_expense_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- REALIZEDLOSS_ACCT
select distinct
'REALIZEDLOSS_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.realizedloss_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- CB_DIFFERENCES_ACCT
select distinct
'CB_DIFFERENCES_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.cb_differences_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- CH_EXPENSE_ACCT
select distinct
'CH_EXPENSE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.ch_expense_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
/*union all
-- INCOMESUMMARY_ACCT
select distinct
'INCOMESUMMARY_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.incomesummary_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id*/
union all
-- CB_CASHTRANSFER_ACCT
select distinct
'CB_CASHTRANSFER_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.cb_cashtransfer_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- C_RECEIVABLE_SERVICES_ACCT
select distinct
'C_RECEIVABLE_SERVICES_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.c_receivable_services_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
/*union all
-- COMMITMENTOFFSET_ACCT
select distinct
'COMMITMENTOFFSET_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.commitmentoffset_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id*/
/*union all
-- INTERCOMPANYDUEFROM_ACCT
select distinct
'INTERCOMPANYDUEFROM_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.intercompanyduefrom_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id*/
union all
-- PJ_ASSET_ACCT
select distinct
'PJ_ASSET_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.pj_asset_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- PJ_WIP_ACCT
select distinct
'PJ_WIP_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.pj_wip_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- P_INVENTORYCLEARING_ACCT
select distinct
'P_INVENTORYCLEARING_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.p_inventoryclearing_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- V_LIABILITY_SERVICES_ACCT
select distinct
'V_LIABILITY_SERVICES_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.v_liability_services_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
/*union all
-- COMMITMENTOFFSETSALES_ACCT
select distinct
'COMMITMENTOFFSETSALES_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.commitmentoffsetsales_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id*/
/*union all
-- INTERCOMPANYDUETO_ACCT
select distinct
'INTERCOMPANYDUETO_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.intercompanydueto_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id*/
union all
-- C_PREPAYMENT_ACCT
select distinct
'C_PREPAYMENT_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.c_prepayment_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- B_INTERESTREV_ACCT
select distinct
'B_INTERESTREV_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.b_interestrev_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- P_TRADEDISCOUNTGRANT_ACCT
select distinct
'P_TRADEDISCOUNTGRANT_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.p_tradediscountgrant_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- PAYDISCOUNT_EXP_ACCT
select distinct
'PAYDISCOUNT_EXP_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.paydiscount_exp_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- UNEARNEDREVENUE_ACCT
select distinct
'UNEARNEDREVENUE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.unearnedrevenue_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
/*union all
-- SUSPENSEBALANCING_ACCT
select distinct
'SUSPENSEBALANCING_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.suspensebalancing_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id*/
union all
-- P_TRADEDISCOUNTREC_ACCT
select distinct
'P_TRADEDISCOUNTREC_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.p_tradediscountrec_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- WRITEOFF_ACCT
select distinct
'WRITEOFF_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.writeoff_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- B_INTERESTEXP_ACCT
select distinct
'B_INTERESTEXP_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.b_interestexp_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- UNREALIZEDLOSS_ACCT
select distinct
'UNREALIZEDLOSS_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.unrealizedloss_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- W_INVENTORY_ACCT
select distinct
'W_INVENTORY_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.w_inventory_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
/*union all
-- CURRENCYBALANCING_ACCT
select distinct
'CURRENCYBALANCING_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.currencybalancing_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id*/
union all
-- PAYDISCOUNT_REV_ACCT
select distinct
'PAYDISCOUNT_REV_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.paydiscount_rev_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- P_INVOICEPRICEVARIANCE_ACCT
select distinct
'P_INVOICEPRICEVARIANCE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.p_invoicepricevariance_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- P_AVERAGECOSTVARIANCE_ACCT
select distinct
'P_AVERAGECOSTVARIANCE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.p_averagecostvariance_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- P_RATEVARIANCE_ACCT
select distinct
'P_RATEVARIANCE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.p_ratevariance_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- CB_EXPENSE_ACCT
select distinct
'CB_EXPENSE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.cb_expense_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
/*union all
-- DEFAULT_ACCT
select distinct
'DEFAULT_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.default_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id*/
union all
-- P_COSTADJUSTMENT_ACCT
select distinct
'P_COSTADJUSTMENT_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.p_costadjustment_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- P_LANDEDCOSTCLEARING_ACCT
select distinct
'P_LANDEDCOSTCLEARING_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.p_landedcostclearing_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- P_EXPENSE_ACCT
select distinct
'P_EXPENSE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.p_expense_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- P_PURCHASEPRICEVARIANCE_ACCT
select distinct
'P_PURCHASEPRICEVARIANCE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.p_purchasepricevariance_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
/*union all
-- PPVOFFSET_ACCT
select distinct
'PPVOFFSET_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.ppvoffset_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id*/
union all
-- B_EXPENSE_ACCT
select distinct
'B_EXPENSE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.b_expense_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- B_REVALUATIONGAIN_ACCT
select distinct
'B_REVALUATIONGAIN_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.b_revaluationgain_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- B_REVALUATIONLOSS_ACCT
select distinct
'B_REVALUATIONLOSS_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.b_revaluationloss_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- B_SETTLEMENTGAIN_ACCT
select distinct
'B_SETTLEMENTGAIN_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.b_settlementgain_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- B_SETTLEMENTLOSS_ACCT
select distinct
'B_SETTLEMENTLOSS_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.b_settlementloss_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- E_EXPENSE_ACCT
select distinct
'E_EXPENSE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.e_expense_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- E_PREPAYMENT_ACCT
select distinct
'E_PREPAYMENT_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.e_prepayment_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- NOTINVOICEDRECEIVABLES_ACCT
select distinct
'NOTINVOICEDRECEIVABLES_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.notinvoicedreceivables_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- NOTINVOICEDREVENUE_ACCT
select distinct
'NOTINVOICEDREVENUE_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.notinvoicedrevenue_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
/*union all
-- RETAINEDEARNING_ACCT
select distinct
'RETAINEDEARNING_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.retainedearning_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id*/
/*union all
-- SUSPENSEERROR_ACCT
select distinct
'SUSPENSEERROR_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.suspenseerror_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id*/
union all
-- T_LIABILITY_ACCT
select distinct
'T_LIABILITY_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.t_liability_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- T_RECEIVABLES_ACCT
select distinct
'T_RECEIVABLES_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.t_receivables_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- UNREALIZEDGAIN_ACCT
select distinct
'UNREALIZEDGAIN_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.unrealizedgain_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
union all
-- W_INVACTUALADJUST_ACCT
select distinct
'W_INVACTUALADJUST_ACCT'::varchar as defaultacct
from c_acctschema_default ad
join c_validcombination vc
on ad.w_invactualadjust_acct = vc.c_validcombination_id
where ad.ad_client_id = 1000000
and vc.account_id = p_account_id
)
select distinct
da.defaultacct
into v_defaultacct
from cte_defaultacct da;
return v_defaultacct;
end;
$$ language plpgsql;
miércoles, 13 de julio de 2022
Get Accounting Schema Default
Suscribirse a:
Enviar comentarios (Atom)
No hay comentarios:
Publicar un comentario