Histórico da Página
01. DADOS GERAIS
Produto: |
| ||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Linha de Produto: |
| ||||||||||||||||
Segmento: |
| ||||||||||||||||
Módulo: | SIGAOMS - Gestão de Distribuição | ||||||||||||||||
Função: | OMSA200 - Montagem de Carga | ||||||||||||||||
País: | Todos Países | ||||||||||||||||
Ticket: |
Não se aplica. |
Requisito/Story/Issue (informe o requisito relacionado) : |
---|
Não se aplica. |
02. DESCRIÇÃO
Este Ponto de Entrada permite
Sintaxe
OS200ES2 → Estorno da Carga ( < DAK->DAK_COD> , < DAK->DAK_SEQCAR> ) → Nil
03. LOCALIZAÇÃO
Este Ponto de Entrada é executado no final do estorno da carga da rotina OMSA200 (Montagem de Carga).
04. PARÂMETROS
Nome | Tipo | Descrição | Obrigatório |
---|---|---|---|
DAK→ DAK_COD | Array of Record | Sim | |
DAK->DAK_SEQCAR | Array of Record | Sequência da carga | Sim |
05. RETORNO
Nome | Tipo | Descrição |
---|---|---|
Nil | Nulo | Nil |
06
...
.
...
OBSERVAÇÃO
Não se aplica.
...
07.
...
EXEMPLO
User Function OS200ES2()
Local cCarga:= ParamIxb[1]
Local cSeqCar:= ParamIxb[1]
cQuery := "SELECT R_E_C_N_O_ RECNOSC9 "
cQuery += "FROM " + RetSqlName("SC9")
cQuery += "WHERE C9_FILIAL = '" + xFilial("SC9") + "'"
cQuery += " AND C9_CARGA = '" + cCarga + "'"
cQuery += " AND C9_SEQCAR = " + cSeqCar + "'"
cQuery += " AND D_E_L_E_T_ = '' "
cQuery := ChangeQuery(cQuery)
DbUseArea( .T., "TOPCONN", TCGENQRY(,,cQuery), cAliasQry, .F., .T. )
While (cAliasQry)→(!Eof())
SC9->(DbGoTo((cAliasQry)->RECNOSC9))
RecLock('SC9',.F.)
SC9->C9_TESTE := "CARGA EXCLUIDA"
SC9→(MsUnlock())
(cAliasQry)→(dbSkip())
EndDo
(cAliasQry)->(DbCloseArea())
Return
...
Templatedocumentos |
---|
HTML |
---|