DECLARE
TYPE RECORD IS REF CURSOR;
CurRec RECORD;

BEGIN

FOR CurRec IN (SELECT AD_CLIENT_ID, AD_ORG_ID, C_DOCTYPE_TRL_ID, NAME, PRINTNAME 
FROM C_DOCTYPE_TRL 
WHERE AD_LANGUAGE = 'es_ES' 
ORDER BY AD_CLIENT_ID) LOOP
IF (CurRec.NAME = '** New **') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = '** Nuevo**', PRINTNAME = '** Nuevo**' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'AP CreditMemo') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Factura de abono compra', PRINTNAME = 'Factura de abono compra' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'AP Invoice') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Factura de compra', PRINTNAME = 'Factura de compra' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'AR Credit Memo') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Factura de abono venta', PRINTNAME = 'Factura de abono venta' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'AR Invoice') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Factura de venta', PRINTNAME = 'Factura de venta' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Bank Statement') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Extracto bancario', PRINTNAME = 'Extracto bancario' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Cash Journal') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Diario de caja', PRINTNAME = 'Diario de caja' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Credit Order') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Pedido confirmado', PRINTNAME = 'Pedido confirmado' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Debt Payement Management' OR CurRec.NAME = 'Debt Payment Management') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Gestión de estado de efectos', PRINTNAME = 'Gestión de estado de efectos' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Depreciation') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Amortización', PRINTNAME = 'Amortización' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'GL Journal') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Asientos manuales', PRINTNAME = 'Asientos manuales' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Inventory Move') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Movimientos de inventario', PRINTNAME = 'Movimientos de inventario' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'MM Receipt') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Albarán de entrada', PRINTNAME = 'Albarán de entrada' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'MM Shipment') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Albarán de salida', PRINTNAME = 'Albarán de salida' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Manual Settlement') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Liquidación manual', PRINTNAME = 'Liquidación manual' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Matched Invoices') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Facturas cuadradas', PRINTNAME = 'Facturas cuadradas' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Matched Purchase Orders') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Pedidos de compra cuadrados', PRINTNAME = 'Pedidos de compra cuadrados' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'POS Order') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Pedido punto de venta', PRINTNAME = 'Pedido punto de venta' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Physical Inventory') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Conteo de inventario', PRINTNAME = 'Conteo de inventario' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Prepay Order') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Pedido pre-pago', PRINTNAME = 'Pedido pre-pago' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Production') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Producción', PRINTNAME = 'Producción' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Proposal') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Propuesta', PRINTNAME = 'Propuesta' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Purchase Order') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Pedido de compra', PRINTNAME = 'Pedido de compra' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Purchase Requisition') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Necesidades de compra', PRINTNAME = 'Necesidades de compra' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Quotation') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Presupuesto', PRINTNAME = 'Presupuesto' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Return Material') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Devolución de material', PRINTNAME = 'Devolución de material' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Settlement') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Liquidación', PRINTNAME = 'Liquidación' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Standard Order') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Pedido estándar', PRINTNAME = 'Pedido estándar' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
ELSIF (CurRec.NAME = 'Warehouse Order') THEN
  UPDATE C_DOCTYPE_TRL SET NAME = 'Pedido almacén', PRINTNAME = 'Pedido almacén' WHERE C_DOCTYPE_TRL_ID = CurRec.C_DOCTYPE_TRL_ID;
END IF;
END LOOP;

COMMIT;

END;