



CREATE           procedure SP_INCLUI_ORCPED
(       @PKND_PEDIDO            float  ,
       @ATSV_STATUS            char (1)  ,
       @ATDT_ORCAM             datetime  ,
       @FKND_CODCLI            float  ,
       @ATSV_NOME_CLI_TMP      nvarchar (60)  ,
       @ATSV_FONE_CLI_TMP      nvarchar (12)  ,
       @ATSV_CONT_CLI_TMP      nvarchar (25)  ,
       @FKND_VENDEDOR          float  ,
       @ATND_PERC_COMISSAO     float  ,
       @ATND_VALOR_COMISSAO    float  ,
       @ATDT_FESTA             datetime  ,
       @ATSV_HORA_INI          nvarchar (8)  ,
       @ATSV_HORA_FIM          nvarchar (8)  ,
       @ATSV_LOCAL             nvarchar (200)  ,
       @ATND_MOTIVO            INT ,
       @FKND_CODEVT            float  ,
       @FKND_CODPAD            float  ,
       @ATND_NUMPES            float  ,
       @ATND_PROPAGANDA        INT ,
       @ATND_CUSTO_TOT         float  ,
       @ATND_VALOR_TOT         float  ,
       @ATND_DESCONTO          float  ,
       @ATND_PERIODICIDADE     numeric(18, 0)  ,
       @ATDT_VCTO_ORCAM        datetime  ,
       @ATDT_TELEMARK          datetime  ,
       @ATSV_OBS               nvarchar (200)  ,
       @ATSV_TEXTO_PAGTO       nvarchar (200)  ,
       @ATDT_APROVACAO         datetime  ,
       @ATND_PESS_REPR         float  ,
       @ATSV_USUARIO_ORCAM     nvarchar (8)  ,
       @ATSV_USUARIO_PEDIDO    nvarchar (8)  ,
       @ATND_ORCAM_ANTIGO      float  ,
       @ATSV_CREDITO           char (1)  ,
       @ATSV_GERENCIA          char(1)  ,
       @ATND_valor_SUGERIDO          float  ,
       @ATND_COBRAR            float  ,
       @ATND_MARGEM            float  ,
       @ATND_VALOR_PEDIDO      float,
       @ATND_TP_DESCONTO       NUMERIC ,
       @FKND_CODOCOR           NUMERIC)

as

declare @v_orc float
if (select count(*) from ven_pedido where pknd_pedido = @pknd_pedido) = 0
       BEGIN

       INSERT INTO VEN_PEDIDO

       (PKND_PEDIDO,           ATSV_STATUS,            ATDT_ORCAM,
       FKND_CODCLI,            ATSV_NOME_CLI_TMP,      ATSV_FONE_CLI_TMP,
       ATSV_CONT_CLI_TMP,      FKND_VENDEDOR,          ATND_PERC_COMISSAO,
       ATND_VALOR_COMISSAO,    ATDT_FESTA,             ATSV_HORA_INI,
       ATSV_HORA_FIM,          ATSV_LOCAL,             ATND_MOTIVO,
       FKND_CODEVT,            FKND_CODPAD,            ATND_NUMPES,
       ATND_PROPAGANDA,        ATND_CUSTO_TOT,         ATND_VALOR_TOT,
       ATND_DESCONTO,          ATND_PERIODICIDADE,     ATDT_VCTO_ORCAM,
       ATDT_TELEMARK,          ATSV_OBS,               ATSV_TEXTO_PAGTO,
       ATDT_APROVACAO,         ATND_PESS_REPR,         ATSV_USUARIO_ORCAM,
       ATSV_USUARIO_PEDIDO,    ATND_ORCAM_ANTIGO,      ATSV_CREDITO,
       ATSV_GERENCIA,          ATND_VALOR_SUGERIDO, 		ATND_COBRAR,            
	ATND_MARGEM,
       ATND_VALOR_PEDIDO       ,ATND_TP_DESCONTO, FKND_CODOCOR)
       VALUES
       (@PKND_PEDIDO,          @ATSV_STATUS,           @ATDT_ORCAM,
       @FKND_CODCLI,           @ATSV_NOME_CLI_TMP,     @ATSV_FONE_CLI_TMP,
       @ATSV_CONT_CLI_TMP,     @FKND_VENDEDOR,         @ATND_PERC_COMISSAO,
       @ATND_VALOR_COMISSAO,   @ATDT_FESTA,            @ATSV_HORA_INI,
       @ATSV_HORA_FIM,         @ATSV_LOCAL,            @ATND_MOTIVO,
       @FKND_CODEVT,           @FKND_CODEVT,           @ATND_NUMPES,
       @ATND_PROPAGANDA,       @ATND_CUSTO_TOT,        @ATND_VALOR_TOT,
       @ATND_DESCONTO,         @ATND_PERIODICIDADE,    @ATDT_VCTO_ORCAM,
       @ATDT_TELEMARK,         @ATSV_OBS,              @ATSV_TEXTO_PAGTO,
       @ATDT_APROVACAO,        @ATND_PESS_REPR,        @ATSV_USUARIO_ORCAM,
       @ATSV_USUARIO_PEDIDO,   @ATND_ORCAM_ANTIGO,     @ATSV_CREDITO,
       @ATSV_GERENCIA,         @ATND_VALOR_SUGERIDO,		@ATND_COBRAR,           
	@ATND_MARGEM,
       @ATND_VALOR_PEDIDO,     @ATND_TP_DESCONTO       ,@FKND_CODOCOR)

       INSERT  INTO VEN_PEDIDO_ITENS
               select (SELECT PKND_PEDIDO FROM VEN_PEDIDO WHERE PKND_PEDIDO = @PKND_PEDIDO),
                       pad.codpro,qtd, custo, pr_atac,pad.qtd_consig ,0
               FROM ven_pad_item pad INNER join cad_pro pro on
               pad.codpro = pro.codpro
               where pad.codigo = @FKND_CODEVT and pad.codpad = @FKND_CODPAD

       END
--      exec SP_ATU_REPR_PESS @PKND_PEDIDO
       IF @@ERROR > 0
       BEGIN
          -- Return 99 to the calling program to indicate failure.
          PRINT 'Ocorreu um erro na incluso do Oramento / Pedido'

          RETURN(99)
       END
else
       begin
       UPDATE VEN_PEDIDO
       SET
       PKND_PEDIDO             =@PKND_PEDIDO   ,
       ATSV_STATUS             =@ATSV_STATUS   ,
       ATDT_ORCAM              =@ATDT_ORCAM    ,
       FKND_CODCLI             =@FKND_CODCLI   ,
       ATSV_NOME_CLI_TMP       =@ATSV_NOME_CLI_TMP ,
       ATSV_FONE_CLI_TMP       =@ATSV_FONE_CLI_TMP,
       ATSV_CONT_CLI_TMP       =@ATSV_CONT_CLI_TMP,
       FKND_VENDEDOR           =@FKND_VENDEDOR ,
       ATND_PERC_COMISSAO      =@ATND_PERC_COMISSAO,
       ATND_VALOR_COMISSAO     =@ATND_VALOR_COMISSAO,
       ATDT_FESTA              =@ATDT_FESTA,
       ATSV_HORA_INI           =@ATSV_HORA_INI,
       ATSV_HORA_FIM           =@ATSV_HORA_FIM,
       ATSV_LOCAL              =@ATSV_LOCAL,
       ATND_MOTIVO             =@ATND_MOTIVO,
       FKND_CODEVT             =@FKND_CODEVT,
       FKND_CODPAD             =@FKND_CODPAD,
       ATND_NUMPES             =@ATND_NUMPES,
       ATND_PROPAGANDA         =@ATND_PROPAGANDA,
       ATND_CUSTO_TOT          =@ATND_CUSTO_TOT,
       ATND_VALOR_TOT          =@ATND_VALOR_TOT,
       ATND_DESCONTO           =@ATND_DESCONTO,
       ATND_PERIODICIDADE      =@ATND_PERIODICIDADE,
       ATDT_VCTO_ORCAM         =@ATDT_VCTO_ORCAM,
       ATDT_TELEMARK           =@ATDT_TELEMARK,
       ATSV_OBS                =@ATSV_OBS,
       ATSV_TEXTO_PAGTO        =@ATSV_TEXTO_PAGTO,
       ATDT_APROVACAO          =@ATDT_APROVACAO,
       ATND_PESS_REPR          =@ATND_PESS_REPR,
       ATSV_USUARIO_ORCAM      =@ATSV_USUARIO_ORCAM,
       ATSV_USUARIO_PEDIDO     =@ATSV_USUARIO_PEDIDO,
       ATND_ORCAM_ANTIGO       =@ATND_ORCAM_ANTIGO,
       ATSV_CREDITO            =@ATSV_CREDITO,
       ATSV_GERENCIA           =@ATSV_GERENCIA,
       ATND_VALOR_SUGERIDO     =@ATND_VALOR_SUGERIDO    ,        	
       ATND_COBRAR             =@ATND_COBRAR,
       ATND_MARGEM             =@ATND_MARGEM,
       ATND_VALOR_PEDIDO       =@ATND_VALOR_PEDIDO,
       ATND_TP_DESCONTO        =@ATND_TP_DESCONTO,
       FKND_CODOCOR            =@FKND_CODOCOR
       WHERE pknd_pedido       = @pknd_pedido
       end
begin
---	update cad_cliente set ult_mov_festa = @ATDT_ORCAM
---	where codigo = @FKND_CODCLI	

	update cad_cliente set ult_mov_festa =  @ATDT_FESTA             
	where codigo = @FKND_CODCLI	

end
exec SP_ATU_REPR_PESS @PKND_PEDIDO

----------------SET QUOTED_IDENTIFIER OFF
--------SET ANSI_NULLS ON

------------SET QUOTED_IDENTIFIER OFF
------SET ANSI_NULLS ON

--------SET QUOTED_IDENTIFIER OFF
----SET ANSI_NULLS ON

----SET QUOTED_IDENTIFIER OFF
--SET ANSI_NULLS ON
GO
