Perguntas MTA105LIN
- admin
- Desconectado
- Administrador
Menos
Mais
- Postagens: 297
- Obrigados Recebidos: 21
- diegoo_martins
- Autor do Tópico
- Desconectado
- Membro Dourado
Menos
Mais
- Postagens: 175
- Obrigados Recebidos: 0
7 anos 3 meses atrás #32309
por diegoo_martins
Respondido por diegoo_martins no tópico MTA105LIN
Por favor Acessar ou Registrar para participar da conversa.
- admin
- Desconectado
- Administrador
Menos
Mais
- Postagens: 297
- Obrigados Recebidos: 21
7 anos 3 meses atrás - 7 anos 3 meses atrás #32310
por admin
// soma as quantidade dos produtos
For nX := 1 To Len( aCols )
If !(aCols[nX,Len(aCols[nX])])
cCodProd := aCols[ nX, nPosPrd ]
nQtdProd := aCols[ nX, nPosQtd ]
nPos := aScan( aReq, { |x| x[1] = cCodProd } )
if nPos == 0
aAdd( aReq, { cCodProd, 0 } )
nPos := len( aReq )
endif
aReq[ nPos,2 ] += nQtdProd
Endif
Next nX
For nX := 1 To Len( aCols )
If !(aCols[nX,Len(aCols[nX])])
cCodProd := aCols[ nX, nPosPrd ]
nQtdProd := aCols[ nX, nPosQtd ]
nPos := aScan( aReq, { |x| x[1] = cCodProd } )
if nPos == 0
aAdd( aReq, { cCodProd, 0 } )
nPos := len( aReq )
endif
aReq[ nPos,2 ] += nQtdProd
Endif
Next nX
Ultima edição: 7 anos 3 meses atrás por admin.
Por favor Acessar ou Registrar para participar da conversa.
- diegoo_martins
- Autor do Tópico
- Desconectado
- Membro Dourado
Menos
Mais
- Postagens: 175
- Obrigados Recebidos: 0
7 anos 3 meses atrás #32311
por diegoo_martins
Respondido por diegoo_martins no tópico MTA105LIN
Funcionou perfeitamente.
Muito obrigado.
Muito obrigado.
Por favor Acessar ou Registrar para participar da conversa.
Tempo para a criação da página:0.083 segundos