
/*------ ATD 456301 ------*/

DECLARE v_count NUMBER:=0;

BEGIN

SELECT Count(1) INTO v_count FROM USER_TAB_COLUMNS WHERE UPPER(table_name) = 'DOCDEORIGEM' and UPPER(column_name) = 'TWIDFONTERECEITA';

IF v_count = 0 THEN

EXECUTE IMMEDIATE 'ALTER TABLE DOCDEORIGEM ADD TWIDFONTERECEITA INT';
EXECUTE IMMEDIATE 'CREATE INDEX IDX_DOCDEORIGEM_IDFR ON DOCDEORIGEM(TWIDFONTERECEITA)';

END IF;

END;
/

create or replace view CONTAARECEBER_R (
    VENCIMENTO,
    PAGAMENTO,
    LIMITECARTORIO,
    COTACAODATA,
    CODIGOINTERNO,
    CREDITOACUMULADO,
    COTACAODAMOEDA2,
    SITUACAOPROTESTO,
    SITUACAOPREVISAO,
    AUTORIZADO,
    NUMEROCOTACAOPEDIDO,
    ULTIMABAIXAPARCIAL,
    RCONTADECOBRANCA,
    RTIPODECOBRANCA,
    RPORTADOR,
    RDOCDEORIGEM,
    RTIPODEVENCIMENTO,
    RBORDEROARECEBER,
    CHEGADA,
    EMISSAO,
    SERIE,
    FORMULA,
    VALORNAMOEDA2,
    VALORNAMOEDA1,
    DIRETO,
    STATUSEMISSAO,
    CODIGOBARRA,
    PROGRAMACAO,
    VALORDEDUCAO,
    NFELETRONICA,
    TWIDFONTERECEITA,
    RENDERECO,
    RSITUACAO,
    RREPRESENTANTE,
    RFORNECEDOR,
    RFORMADEPAGAR,
    RTPO,
    RMOEDA2,
    RMOEDA1,
    RDESTINATARIO,
    REMITENTE,
    RTIPO,
    RCLIENTE,
    RREVENDA,
    CRIADOEM,
    CID,
    ATUALIZADOEM,
    CODIGO,
    OBSERVACAO,
    NOME,
    OID,
    RESCOPO,
    CRIADOPOR,
    ATUALIZADOPOR)
as select
    CONTAARECEBER.VENCIMENTO,
    CONTAARECEBER.PAGAMENTO,
    CONTAARECEBER.LIMITECARTORIO,
    CONTAARECEBER.COTACAODATA,
    CONTAARECEBER.CODIGOINTERNO,
    CONTAARECEBER.CREDITOACUMULADO,
    CONTAARECEBER.COTACAODAMOEDA2,
    CONTAARECEBER.SITUACAOPROTESTO,
    CONTAARECEBER.SITUACAOPREVISAO,
    CONTAARECEBER.AUTORIZADO,
    CONTAARECEBER.NUMEROCOTACAOPEDIDO,
    CONTAARECEBER.ULTIMABAIXAPARCIAL,
    CONTAARECEBER.RCONTADECOBRANCA,
    CONTAARECEBER.RTIPODECOBRANCA,
    CONTAARECEBER.RPORTADOR,
    CONTAARECEBER.RDOCDEORIGEM,
    CONTAARECEBER.RTIPODEVENCIMENTO,
    CONTAARECEBER.RBORDEROARECEBER,
    DOCDEORIGEM.CHEGADA,
    DOCDEORIGEM.EMISSAO,
    DOCDEORIGEM.SERIE,
    DOCDEORIGEM.FORMULA,
    DOCDEORIGEM.VALORNAMOEDA2,
    DOCDEORIGEM.VALORNAMOEDA1,
    DOCDEORIGEM.DIRETO,
    DOCDEORIGEM.STATUSEMISSAO,
    DOCDEORIGEM.CODIGOBARRA,
    DOCDEORIGEM.PROGRAMACAO,
    DOCDEORIGEM.VALORDEDUCAO,
    DOCDEORIGEM.NFELETRONICA,
    DOCDEORIGEM.TWIDFONTERECEITA,
    DOCDEORIGEM.RENDERECO,
    DOCDEORIGEM.RSITUACAO,
    DOCDEORIGEM.RREPRESENTANTE,
    DOCDEORIGEM.RFORNECEDOR,
    DOCDEORIGEM.RFORMADEPAGAR,
    DOCDEORIGEM.RTPO,
    DOCDEORIGEM.RMOEDA2,
    DOCDEORIGEM.RMOEDA1,
    DOCDEORIGEM.RDESTINATARIO,
    DOCDEORIGEM.REMITENTE,
    DOCDEORIGEM.RTIPO,
    DOCDEORIGEM.RCLIENTE,
    DOCDEORIGEM.RREVENDA,
    ITEM.CRIADOEM,
    ITEM.CID,
    ITEM.ATUALIZADOEM,
    ITEM.CODIGO,
    ITEM.OBSERVACAO,
    ITEM.NOME,
    ITEM.OID,
    ITEM.RESCOPO,
    ITEM.CRIADOPOR,
    ITEM.ATUALIZADOPOR
from
    CONTAARECEBER,DOCDEORIGEM,ITEM
where (ITEM.EXCLUIDO = 0) AND
    CONTAARECEBER.OID = DOCDEORIGEM.OID AND
    DOCDEORIGEM.OID = ITEM.OID;
/

create or replace view CONTAARECEBER_V (
    RCONTADECOBRANCA,
    RTIPODECOBRANCA,
    RPORTADOR,
    RDOCDEORIGEM,
    RTIPODEVENCIMENTO,
    RBORDEROARECEBER,
    VENCIMENTO,
    PAGAMENTO,
    LIMITECARTORIO,
    COTACAODATA,
    CODIGOINTERNO,
    CREDITOACUMULADO,
    COTACAODAMOEDA2,
    SITUACAOPROTESTO,
    SITUACAOPREVISAO,
    AUTORIZADO,
    NUMEROCOTACAOPEDIDO,
    ULTIMABAIXAPARCIAL,
    RENDERECO,
    RSITUACAO,
    RREPRESENTANTE,
    RFORNECEDOR,
    RFORMADEPAGAR,
    RTPO,
    RMOEDA2,
    RMOEDA1,
    RDESTINATARIO,
    REMITENTE,
    RTIPO,
    RCLIENTE,
    RREVENDA,
    CHEGADA,
    EMISSAO,
    SERIE,
    FORMULA,
    VALORNAMOEDA2,
    VALORNAMOEDA1,
    DIRETO,
    STATUSEMISSAO,
    CODIGOBARRA,
    PROGRAMACAO,
    VALORDEDUCAO,
    NFELETRONICA,
    TWIDFONTERECEITA,
    RESCOPO,
    CRIADOEM,
    CID,
    ATUALIZADOEM,
    CODIGO,
    OBSERVACAO,
    NOME,
    OID,
    NCONTADECOBRANCA,
    NTIPODECOBRANCA,
    NPORTADOR,
    NDOCDEORIGEM,
    NTIPODEVENCIMENTO,
    NBORDEROARECEBER,
    NENDERECO,
    NSITUACAO,
    NREPRESENTANTE,
    NFORNECEDOR,
    NFORMADEPAGAR,
    NTPO,
    NMOEDA2,
    NMOEDA1,
    NDESTINATARIO,
    NEMITENTE,
    NTIPO,
    NCLIENTE,
    NREVENDA,
    NESCOPO
) as select
    CONTAARECEBER.RCONTADECOBRANCA,
    CONTAARECEBER.RTIPODECOBRANCA,
    CONTAARECEBER.RPORTADOR,
    CONTAARECEBER.RDOCDEORIGEM,
    CONTAARECEBER.RTIPODEVENCIMENTO,
    CONTAARECEBER.RBORDEROARECEBER,
    CONTAARECEBER.VENCIMENTO,
    CONTAARECEBER.PAGAMENTO,
    CONTAARECEBER.LIMITECARTORIO,
    CONTAARECEBER.COTACAODATA,
    CONTAARECEBER.CODIGOINTERNO,
    CONTAARECEBER.CREDITOACUMULADO,
    CONTAARECEBER.COTACAODAMOEDA2,
    CONTAARECEBER.SITUACAOPROTESTO,
    CONTAARECEBER.SITUACAOPREVISAO,
    CONTAARECEBER.AUTORIZADO,
    CONTAARECEBER.NUMEROCOTACAOPEDIDO,
    CONTAARECEBER.ULTIMABAIXAPARCIAL,
    DOCDEORIGEM.RENDERECO,
    DOCDEORIGEM.RSITUACAO,
    DOCDEORIGEM.RREPRESENTANTE,
    DOCDEORIGEM.RFORNECEDOR,
    DOCDEORIGEM.RFORMADEPAGAR,
    DOCDEORIGEM.RTPO,
    DOCDEORIGEM.RMOEDA2,
    DOCDEORIGEM.RMOEDA1,
    DOCDEORIGEM.RDESTINATARIO,
    DOCDEORIGEM.REMITENTE,
    DOCDEORIGEM.RTIPO,
    DOCDEORIGEM.RCLIENTE,
    DOCDEORIGEM.RREVENDA,
    DOCDEORIGEM.CHEGADA,
    DOCDEORIGEM.EMISSAO,
    DOCDEORIGEM.SERIE,
    DOCDEORIGEM.FORMULA,
    DOCDEORIGEM.VALORNAMOEDA2,
    DOCDEORIGEM.VALORNAMOEDA1,
    DOCDEORIGEM.DIRETO,
    DOCDEORIGEM.STATUSEMISSAO,
    DOCDEORIGEM.CODIGOBARRA,
    DOCDEORIGEM.PROGRAMACAO,
    DOCDEORIGEM.VALORDEDUCAO,
    DOCDEORIGEM.NFELETRONICA,
    DOCDEORIGEM.TWIDFONTERECEITA,
    ITEM.RESCOPO,
    ITEM.CRIADOEM,
    ITEM.CID,
    ITEM.ATUALIZADOEM,
    ITEM.CODIGO,
    ITEM.OBSERVACAO,
    ITEM.NOME,
    ITEM.OID,
    T1.NOME,
    T2.NOME,
    T3.NOME,
    T4.NOME,
    T5.NOME,
    T6.NOME,
    T7.NOME,
    T8.NOME,
    T9.NOME,
    T10.NOME,
    T11.NOME,
    T12.NOME,
    T13.NOME,
    T14.NOME,
    T15.NOME,
    T16.NOME,
    T17.NOME,
    T18.NOME,
    T19.NOME,
    T20.NOME
from
    CONTAARECEBER,DOCDEORIGEM,ITEM,ITEM T1,ITEM T2,ITEM T3,ITEM T4,ITEM T5,ITEM T6,ITEM T7,ITEM T8,ITEM T9,ITEM T10,ITEM T11,ITEM T12,ITEM T13,ITEM T14,ITEM T15,ITEM T16,ITEM T17,ITEM T18,ITEM T19,ITEM T20
where (ITEM.EXCLUIDO = 0) AND
    CONTAARECEBER.OID = DOCDEORIGEM.OID AND
    DOCDEORIGEM.OID = ITEM.OID AND
    CONTAARECEBER.RCONTADECOBRANCA = T1.OID AND
    CONTAARECEBER.RTIPODECOBRANCA = T2.OID AND
    CONTAARECEBER.RPORTADOR = T3.OID AND
    CONTAARECEBER.RDOCDEORIGEM = T4.OID AND
    CONTAARECEBER.RTIPODEVENCIMENTO = T5.OID AND
    CONTAARECEBER.RBORDEROARECEBER = T6.OID AND
    DOCDEORIGEM.RENDERECO = T7.OID AND
    DOCDEORIGEM.RSITUACAO = T8.OID AND
    DOCDEORIGEM.RREPRESENTANTE = T9.OID AND
    DOCDEORIGEM.RFORNECEDOR = T10.OID AND
    DOCDEORIGEM.RFORMADEPAGAR = T11.OID AND
    DOCDEORIGEM.RTPO = T12.OID AND
    DOCDEORIGEM.RMOEDA2 = T13.OID AND
    DOCDEORIGEM.RMOEDA1 = T14.OID AND
    DOCDEORIGEM.RDESTINATARIO = T15.OID AND
    DOCDEORIGEM.REMITENTE = T16.OID AND
    DOCDEORIGEM.RTIPO = T17.OID AND
    DOCDEORIGEM.RCLIENTE = T18.OID AND
    DOCDEORIGEM.RREVENDA = T19.OID AND
    ITEM.RESCOPO = T20.OID;
/

create or replace view DOCDEORIGEM_R (
    CHEGADA,
    EMISSAO,
    SERIE,
    FORMULA,
    VALORNAMOEDA2,
    VALORNAMOEDA1,
    DIRETO,
    STATUSEMISSAO,
    CODIGOBARRA,
    PROGRAMACAO,
    VALORDEDUCAO,
    NFELETRONICA,
    TWIDFONTERECEITA,
    RENDERECO,
    RSITUACAO,
    RREPRESENTANTE,
    RFORNECEDOR,
    RFORMADEPAGAR,
    RTPO,
    RMOEDA2,
    RMOEDA1,
    RDESTINATARIO,
    REMITENTE,
    RTIPO,
    RCLIENTE,
    RREVENDA,
    CRIADOEM,
    CID,
    ATUALIZADOEM,
    CODIGO,
    OBSERVACAO,
    NOME,
    OID,
    RESCOPO,
    CRIADOPOR,
    ATUALIZADOPOR)
as select
    DOCDEORIGEM.CHEGADA,
    DOCDEORIGEM.EMISSAO,
    DOCDEORIGEM.SERIE,
    DOCDEORIGEM.FORMULA,
    DOCDEORIGEM.VALORNAMOEDA2,
    DOCDEORIGEM.VALORNAMOEDA1,
    DOCDEORIGEM.DIRETO,
    DOCDEORIGEM.STATUSEMISSAO,
    DOCDEORIGEM.CODIGOBARRA,
    DOCDEORIGEM.PROGRAMACAO,
    DOCDEORIGEM.VALORDEDUCAO,
    DOCDEORIGEM.NFELETRONICA,
    DOCDEORIGEM.TWIDFONTERECEITA,
    DOCDEORIGEM.RENDERECO,
    DOCDEORIGEM.RSITUACAO,
    DOCDEORIGEM.RREPRESENTANTE,
    DOCDEORIGEM.RFORNECEDOR,
    DOCDEORIGEM.RFORMADEPAGAR,
    DOCDEORIGEM.RTPO,
    DOCDEORIGEM.RMOEDA2,
    DOCDEORIGEM.RMOEDA1,
    DOCDEORIGEM.RDESTINATARIO,
    DOCDEORIGEM.REMITENTE,
    DOCDEORIGEM.RTIPO,
    DOCDEORIGEM.RCLIENTE,
    DOCDEORIGEM.RREVENDA,
    ITEM.CRIADOEM,
    ITEM.CID,
    ITEM.ATUALIZADOEM,
    ITEM.CODIGO,
    ITEM.OBSERVACAO,
    ITEM.NOME,
    ITEM.OID,
    ITEM.RESCOPO,
    ITEM.CRIADOPOR,
    ITEM.ATUALIZADOPOR
from
    DOCDEORIGEM,ITEM
where (ITEM.EXCLUIDO = 0) AND
    DOCDEORIGEM.OID = ITEM.OID;
/

create or replace view DOCDEORIGEM_V (
    RENDERECO,
    RSITUACAO,
    RREPRESENTANTE,
    RFORNECEDOR,
    RFORMADEPAGAR,
    RTPO,
    RMOEDA2,
    RMOEDA1,
    RDESTINATARIO,
    REMITENTE,
    RTIPO,
    RCLIENTE,
    RREVENDA,
    CHEGADA,
    EMISSAO,
    SERIE,
    FORMULA,
    VALORNAMOEDA2,
    VALORNAMOEDA1,
    DIRETO,
    STATUSEMISSAO,
    CODIGOBARRA,
    PROGRAMACAO,
    VALORDEDUCAO,
    NFELETRONICA,
    TWIDFONTERECEITA,
    RESCOPO,
    CRIADOEM,
    CID,
    ATUALIZADOEM,
    CODIGO,
    OBSERVACAO,
    NOME,
    OID,
    NENDERECO,
    NSITUACAO,
    NREPRESENTANTE,
    NFORNECEDOR,
    NFORMADEPAGAR,
    NTPO,
    NMOEDA2,
    NMOEDA1,
    NDESTINATARIO,
    NEMITENTE,
    NTIPO,
    NCLIENTE,
    NREVENDA,
    NESCOPO
) as select
    DOCDEORIGEM.RENDERECO,
    DOCDEORIGEM.RSITUACAO,
    DOCDEORIGEM.RREPRESENTANTE,
    DOCDEORIGEM.RFORNECEDOR,
    DOCDEORIGEM.RFORMADEPAGAR,
    DOCDEORIGEM.RTPO,
    DOCDEORIGEM.RMOEDA2,
    DOCDEORIGEM.RMOEDA1,
    DOCDEORIGEM.RDESTINATARIO,
    DOCDEORIGEM.REMITENTE,
    DOCDEORIGEM.RTIPO,
    DOCDEORIGEM.RCLIENTE,
    DOCDEORIGEM.RREVENDA,
    DOCDEORIGEM.CHEGADA,
    DOCDEORIGEM.EMISSAO,
    DOCDEORIGEM.SERIE,
    DOCDEORIGEM.FORMULA,
    DOCDEORIGEM.VALORNAMOEDA2,
    DOCDEORIGEM.VALORNAMOEDA1,
    DOCDEORIGEM.DIRETO,
    DOCDEORIGEM.STATUSEMISSAO,
    DOCDEORIGEM.CODIGOBARRA,
    DOCDEORIGEM.PROGRAMACAO,
    DOCDEORIGEM.VALORDEDUCAO,
    DOCDEORIGEM.NFELETRONICA,
    DOCDEORIGEM.TWIDFONTERECEITA,
    ITEM.RESCOPO,
    ITEM.CRIADOEM,
    ITEM.CID,
    ITEM.ATUALIZADOEM,
    ITEM.CODIGO,
    ITEM.OBSERVACAO,
    ITEM.NOME,
    ITEM.OID,
    T1.NOME,
    T2.NOME,
    T3.NOME,
    T4.NOME,
    T5.NOME,
    T6.NOME,
    T7.NOME,
    T8.NOME,
    T9.NOME,
    T10.NOME,
    T11.NOME,
    T12.NOME,
    T13.NOME,
    T14.NOME
from
    DOCDEORIGEM,ITEM,ITEM T1,ITEM T2,ITEM T3,ITEM T4,ITEM T5,ITEM T6,ITEM T7,ITEM T8,ITEM T9,ITEM T10,ITEM T11,ITEM T12,ITEM T13,ITEM T14
where (ITEM.EXCLUIDO = 0) AND
    DOCDEORIGEM.OID = ITEM.OID AND
    DOCDEORIGEM.RENDERECO = T1.OID AND
    DOCDEORIGEM.RSITUACAO = T2.OID AND
    DOCDEORIGEM.RREPRESENTANTE = T3.OID AND
    DOCDEORIGEM.RFORNECEDOR = T4.OID AND
    DOCDEORIGEM.RFORMADEPAGAR = T5.OID AND
    DOCDEORIGEM.RTPO = T6.OID AND
    DOCDEORIGEM.RMOEDA2 = T7.OID AND
    DOCDEORIGEM.RMOEDA1 = T8.OID AND
    DOCDEORIGEM.RDESTINATARIO = T9.OID AND
    DOCDEORIGEM.REMITENTE = T10.OID AND
    DOCDEORIGEM.RTIPO = T11.OID AND
    DOCDEORIGEM.RCLIENTE = T12.OID AND
    DOCDEORIGEM.RREVENDA = T13.OID AND
    ITEM.RESCOPO = T14.OID;
/
