Devido à descontinuação da versão 5.10.3, que ocorrerá em 30/09/2025, informamos que este manual não receberá atualizações a partir desta data. Para mais informações sobre a evolução do Gestão Empresarial | ERP, acesse a documentação sobre a PCVV - Política do Ciclo de Vida das Versões.

Informamos que as funcionalidades da Reforma Tributária estão disponíveis apenas a partir da versão 5.10.4 do Gestão Empresarial.
Acesse o Portal de Exigências Legais da Senior para saber como preparar o seu negócio!

RecalcularOCServico

Recalcular as ordens de compra com as quantidades sobressalentes.

Sintaxe: Funcao RecalcularOCServico(Alfa pParam, Alfa End Retorno);

Parâmetros: O parâmetro pParam é um valor alfanumérico onde devem ser concatenados os valores listados na tabela abaixo:

Nome Tipo Descrição
CodEmp Alfa Empresa da ordem de compra.
CodOri Alfa Origem do produto da OP.
NumOrp Alfa Número da OP que gerou a OC.
CodEtg Alfa Código do estágio.
SeqRot Alfa Sequência do roteiro.
SeqSop Alfa Sequência (opcional).
QtdSbr Alfa Quantidade sobressalente da quantidade que gerou a OC.
TipRec Alfa Define se o tipo de recalculo é "P" (Positivo, aumenta OC Serviço) ou "N" (Negativo, diminui OC Serviço).

Por esta razão, todos os itens acima estão listados como "Alfa". Estes valores devem estar entre aspas duplas e ser separados por vírgula. O uso destes parâmetros pode ser visto no exemplo abaixo.

Exemplo:

pParam = "CodOri="+VSCodOri+",NumOrp="+stralfNumOrp+",codetg="+stralfCodEtg+",seqrot="+stralfSeqRot+",codpro=" +vscodpro+",\"codder="+vscodder+"\",qtdsbr="+striqtdexc;
RecalcularOCServico(pParam,Retorno);
se (Retorno <> "OK")
geralog ( "não alterou OC serviço" );

Este artigo ajudou você?