| Composition Setup |
|---|
import.css=/download/attachments/327912/newLayout.css |
| Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: OX001ADP - Tratamento de Deleção de Linha do Acols de Peças
Descrição: Este Ponto de Entrada está localizado na rotina Orçamento de Peças e Serviços (OFIXX001), executado antes da deleção de linha do acols de peças, com a finalidade de definir se deseja abortar ou continuar a operação. Eventos User Function OX001ADP() lRet := MsgYesNo(“Deseja continuar ?”,”Atencao”) return lRet Programa Fonte OFIXX001.PRW Sintaxe OX001ADP - Tratamento de Deleção de Linha do Acols de Peças ( [ ] ) --> lRet Parâmetros:
Retorno
Observações Function OX001DELP() // Local nCntFor := 1 Local nValSeq := 0 Local lVerInconv Local lStatAnt Local nLinDup // Grava status atual, para voltar se nao executar o PE com sucesso lStatAnt := oGetPecas:aCols[oGetPecas:nAt,Len(oGetPecas:aCols[oGetPecas:nAt])] //P.E. para tratamento de delecao de linha do acols de pecas If ExistBlock("OX001ADP") If !(ExecBlock("OX001ADP",.F.,.F.)) Return .f. Endif EndIf Variáveis
|
