Histórico da Página
Rotina Automatica OMSA010
Produto: | PROTHEUS ADVPL |
Versões: | Todas |
Ocorrência: | A situação que ocorre é que quando vou inserir um item pela rotina automática, o item é inserido, mas o item da primeira linha é apagado. |
Ambiente: | Todos |
Passo a passo: |
|
Segue exemplo de customização #include 'protheus.ch' user function EOSA010() local aCab := {} |
PREPARE ENVIRONMENT EMPRESA '99' FILIAL '01' aAdd(aCab, {"DA0_CODTAB" , cCodTab , NIL}) //aItem:={} aAdd(aItem,{ {"DA1_ITEM" , cItem , NIL},; // Para incluir um unico item não é necessario os itens LINPOS e |
AUTDELETA usa-se somente na Alteração ou exclusão {"LINPOS","DA1_ITEM" ,'0001'},; //aadd(aItens, aItem) // Para excluir um unico item é os itens LINPOS e |
AUTDELETA sendo que o Autodeleta receberá o valor "N" //{"LINPOS","DA1_ITEM" ,'0002'},; //aadd(aItens, aItem) Omsa010(aCab,aItem,nOpc) If lMsErroAuto DisarmTransaction() Obs Verifique nOpc := 4 - Alteração / 3 - Inclusão | |
Observações: |