Texto - Gravar e Recuperar

Texto - Gravar e Recuperar

---

---

---

EDT_MATERIAL_VALOR_GERAL=0
sMonta is string
sMonta = "|"

FOR ALL ROW OF TABLE_itens_vendidos
    EDT_MATERIAL_VALOR_GERAL+=TABLE_itens_vendidos.COL_VALOR_TOTAL
    sMonta+=["|"]+EDT_Material_Chave
    sMonta+=["|"]+EDT_material_Nome
    sMonta+=["|"]+EDT_MATERIAL_CODIGO_BARRA
    sMonta+=["|"]+EDT_MATERIAL_REFERENCIA
    sMonta+=["|"]+EDT_material_observacao
    sMonta+=["|"]+EDT_MATERIAL_Quantidade
    sMonta+=["|"]+EDT_MATERIAL_Valor_produto
    sMonta+=["|"]+EDT_MATERIAL_Valor_produtos
    sMonta+=["|"]+EDT_MATERIAL_Valor_percentual_ipi
    sMonta+=["|"]+EDT_MATERIAL_Valor_ipi
    sMonta+=["|"]+EDT_MATERIAL_Valor_total
    sMonta+=CR   
END
fSaveText("C:\amarildo\orcamento.txt",sMonta)