Perguntas MTA105LIN
- admin
-
- Desconectado
- Administrador
-
Menos
Mais
- Postagens: 293
- Obrigados Recebidos: 19
- diegoo_martins
- Autor do Tópico
- Desconectado
- Membro Dourado
-
Menos
Mais
- Postagens: 175
- Obrigados Recebidos: 0
9 anos 2 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: 293
- Obrigados Recebidos: 19
9 anos 2 meses atrás - 9 anos 2 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: 9 anos 2 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
9 anos 2 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.032 segundos

