DuplicarProdutoServicoEmpresa

Duplicar produtos/serviços entre empresas distintas.

Sintaxe: DuplicarProdutoServicoEmpresa(Numero pEmpOri,Alfa pProSerOri, Alfa pTipo, Alfa pEmpDes, Alfa pParam, Alfa End Retorno);

Parâmetros:

Nome	Tipo	Descrição
pEmpOri	Numero	Empresa do produto/serviço original.
pProSerOri	Alfa	Código do produto/serviço original.
pTipo	Alfa	Indica se a duplicação a ser feita é de um produto (P) ou serviço (S).
pEmpDes	Alfa	Variável onde deverão ser informadas as empresas para as quais o produto/serviço deverá ser duplicado. Os códigos das empresas deverão aparecer separados por vírgula. Exemplo: "2,3" (duplicará para as empresas 2 e 3).
pParam	Alfa	Parâmetros diversos para a duplicação, que poderão ser concatenados em uma só variável, separados por vírgula. Quando pTipo for igual a P (produto), podem ser passados os seguintes parâmetros nesta variável: DupHis - Indica se os históricos devem ser duplicados ou não (S/N) DupEqu - Indica se os produtos equivalentes devem ser duplicados ou não (S/N) DupMod - Indica se o modelo do produto deve ser duplicado (S/N) DupRot - Indica se o roteiro do produto deve ser duplicado (S/N) DupCar - Indica se as características do produto devem ser duplicadas (S/N) AtuExi - Indica se o cadastro do produto deve ser atualizado na empresa destino caso já exista (S/N) DupFam - Permite duplicar a família para outra empresa. Quando pTipo for igual a S (serviço), podem ser passados os seguintes parâmetros nesta variável: DupCar - Indica se as características do serviço devem ser duplicadas (S/N) AtuExi - Indica se o cadastro do serviço deve ser atualizado na empresa destino caso já exista (S/N)

Tipo de retorno: a variável Retorno receberá o valor "OK" se a duplicação acontecer com sucesso

Exemplo:

Definir alfa param;
Definir alfa ret;

param = "DupFam=S,AtuExi=S";
DuplicarProdutoServicoEmpresa(1,"2133", "P", "2", param, ret);

Utilização da Função (dependentes): Nenhum dependente.

Observações:

Se a variável "DupFam" tiver o valor "S"(Sim), tanto as famílias de produtos quanto de serviços serão duplicadas.
Esta função não duplica para a nova empresa:
- campos de usuário;
- derivações do produto.

PORTAL DE DOCUMENTAÇÃO
Gestão Empresarial \| ERP - versão 5.10.2 (XTended)