Bom dia.. Pessoal... vou precisar criar ordens de compra cotada e não cotado, via api ou BO's algume ja precisou fazer algo do tipo ? tem exemplo ?
Segue um exemplo simples, Mais informações na pasta ems2\docapi\ccapi302.doc {fontes/ccp/ccapi202.i} {fontes/ccp/ccapi207.i} create tt-ordem-compra. assign tt-ordem-compra.numero-ordem = ordem-compra.numero-ordem + i-seq tt-ordem-compra.impr-ficha = param-compra.imprime-fich tt-ordem-compra.it-codigo = c-it-codigo tt-ordem-compra.cod-estabel = "11" tt-ordem-compra.natureza = 1 /* Compra */ tt-ordem-compra.situacao = 1 /* Não Confirmada */ tt-ordem-compra.origem = 1 /* Manual */ tt-ordem-compra.requisitante = c-seg-usuario tt-ordem-compra.narrativa = narrativa-ad tt-ordem-compra.usuario = c-seg-usuario tt-ordem-compra.data-atualiz = today tt-ordem-compra.hora-atualiz = string(time,"hh:mm:ss":U) tt-ordem-compra.data-emissao = today //tt-ordem-compra.ct-codigo = ord-prod.ct-codigo //tt-ordem-compra.sc-codigo = ord-prod.sc-codigo tt-ordem-compra.ind-tipo-movto = 1 tt-ordem-compra.qt-solic = qtde-ordem //tt-ordem-compra.conta-contabil = ord-prod.conta-ordem tt-ordem-compra.tp-despesa = item.tp-desp-padrao tt-ordem-compra.cod-comprado = item.cod-comprado tt-ordem-compra.dep-almoxar = "REC". /*--------------------------- Prazo-Compra ----------------------------------*/ create tt-prazo-compra. assign tt-prazo-compra.parcela = 1 tt-prazo-compra.numero-ordem = tt-ordem-compra.numero-ordem tt-prazo-compra.it-codigo = tt-ordem-compra.it-codigo tt-prazo-compra.natureza = 1 /* Compra */ tt-prazo-compra.quantidade = qtde-ordem tt-prazo-compra.quantid-orig = qtde-ordem tt-prazo-compra.quant-saldo = qtde-ordem tt-prazo-compra.data-entrega = d-dt-entrega tt-prazo-compra.data-orig = d-dt-entrega tt-prazo-compra.un = item.un tt-prazo-compra.ind-tipo-movto = tt-ordem-compra.ind-tipo-movto. create tt-versao-integr. assign tt-versao-integr.cod-versao-integracao = 001 tt-versao-integr.ind-origem-msg = 01. run ccp/ccapi302.p (input table tt-versao-integr, output table tt-erros-geral, input table tt-ordem-compra, input table tt-prazo-compra, input table tt-cotacao-item, &if defined(bf_mat_despesa_fase_II) &then input table tt-desp-cotacao-item, &endif &if '{&bf_mat_versao_ems}' >= '2.04' &then input table tt-matriz-rat-med, &endif input "").
Segue um exemplo simples, Mais informações na pasta ems2\docapi\ccapi302.doc {fontes/ccp/ccapi202.i} {fontes/ccp/ccapi207.i} create tt-ordem-compra. assign tt-ordem-compra.numero-ordem = ordem-compra.numero-ordem + i-seq tt-ordem-compra.impr-ficha = param-compra.imprime-fich tt-ordem-compra.it-codigo = c-it-codigo tt-ordem-compra.cod-estabel = "11" tt-ordem-compra.natureza = 1 /* Compra */ tt-ordem-compra.situacao = 1 /* Não Confirmada */ tt-ordem-compra.origem = 1 /* Manual */ tt-ordem-compra.requisitante = c-seg-usuario tt-ordem-compra.narrativa = narrativa-ad tt-ordem-compra.usuario = c-seg-usuario tt-ordem-compra.data-atualiz = today tt-ordem-compra.hora-atualiz = string(time,"hh:mm:ss":U) tt-ordem-compra.data-emissao = today //tt-ordem-compra.ct-codigo = ord-prod.ct-codigo //tt-ordem-compra.sc-codigo = ord-prod.sc-codigo tt-ordem-compra.ind-tipo-movto = 1 tt-ordem-compra.qt-solic = qtde-ordem //tt-ordem-compra.conta-contabil = ord-prod.conta-ordem tt-ordem-compra.tp-despesa = item.tp-desp-padrao tt-ordem-compra.cod-comprado = item.cod-comprado tt-ordem-compra.dep-almoxar = "REC". /*--------------------------- Prazo-Compra ----------------------------------*/ create tt-prazo-compra. assign tt-prazo-compra.parcela = 1 tt-prazo-compra.numero-ordem = tt-ordem-compra.numero-ordem tt-prazo-compra.it-codigo = tt-ordem-compra.it-codigo tt-prazo-compra.natureza = 1 /* Compra */ tt-prazo-compra.quantidade = qtde-ordem tt-prazo-compra.quantid-orig = qtde-ordem tt-prazo-compra.quant-saldo = qtde-ordem tt-prazo-compra.data-entrega = d-dt-entrega tt-prazo-compra.data-orig = d-dt-entrega tt-prazo-compra.un = item.un tt-prazo-compra.ind-tipo-movto = tt-ordem-compra.ind-tipo-movto. create tt-versao-integr. assign tt-versao-integr.cod-versao-integracao = 001 tt-versao-integr.ind-origem-msg = 01. run ccp/ccapi302.p (input table tt-versao-integr, output table tt-erros-geral, input table tt-ordem-compra, input table tt-prazo-compra, input table tt-cotacao-item, &if defined(bf_mat_despesa_fase_II) &then input table tt-desp-cotacao-item, &endif &if '{&bf_mat_versao_ems}' >= '2.04' &then input table tt-matriz-rat-med, &endif input "").
Bom dia. Segue um exemplo simples, Mais informações na pasta ems2\docapi\ccapi302.doc {fontes/ccp/ccapi202.i} {fontes/ccp/ccapi207.i} create tt-ordem-compra. assign tt-ordem-compra.numero-ordem = ordem-compra.numero-ordem + i-seq tt-ordem-compra.impr-ficha = param-compra.imprime-fich tt-ordem-compra.it-codigo = c-it-codigo tt-ordem-compra.cod-estabel = "11" tt-ordem-compra.natureza = 1 /* Compra */ tt-ordem-compra.situacao = 1 /* Não Confirmada */ tt-ordem-compra.origem = 1 /* Manual */ tt-ordem-compra.requisitante = c-seg-usuario tt-ordem-compra.narrativa = narrativa-ad tt-ordem-compra.usuario = c-seg-usuario tt-ordem-compra.data-atualiz = today tt-ordem-compra.hora-atualiz = string(time,"hh:mm:ss":U) tt-ordem-compra.data-emissao = today //tt-ordem-compra.ct-codigo = ord-prod.ct-codigo //tt-ordem-compra.sc-codigo = ord-prod.sc-codigo tt-ordem-compra.ind-tipo-movto = 1 tt-ordem-compra.qt-solic = qtde-ordem //tt-ordem-compra.conta-contabil = ord-prod.conta-ordem tt-ordem-compra.tp-despesa = item.tp-desp-padrao tt-ordem-compra.cod-comprado = item.cod-comprado tt-ordem-compra.dep-almoxar = "REC". /*--------------------------- Prazo-Compra ----------------------------------*/ create tt-prazo-compra. assign tt-prazo-compra.parcela = 1 tt-prazo-compra.numero-ordem = tt-ordem-compra.numero-ordem tt-prazo-compra.it-codigo = tt-ordem-compra.it-codigo tt-prazo-compra.natureza = 1 /* Compra */ tt-prazo-compra.quantidade = qtde-ordem tt-prazo-compra.quantid-orig = qtde-ordem tt-prazo-compra.quant-saldo = qtde-ordem tt-prazo-compra.data-entrega = d-dt-entrega tt-prazo-compra.data-orig = d-dt-entrega tt-prazo-compra.un = item.un tt-prazo-compra.ind-tipo-movto = tt-ordem-compra.ind-tipo-movto. create tt-versao-integr. assign tt-versao-integr.cod-versao-integracao = 001 tt-versao-integr.ind-origem-msg = 01. run ccp/ccapi302.p (input table tt-versao-integr, output table tt-erros-geral, input table tt-ordem-compra, input table tt-prazo-compra, input table tt-cotacao-item, &if defined(bf_mat_despesa_fase_II) &then input table tt-desp-cotacao-item, &endif &if '{&bf_mat_versao_ems}' >= '2.04' &then input table tt-matriz-rat-med, &endif input "").
