- in PanelSaw piccolo refactoring
This commit is contained in:
@@ -32,6 +32,7 @@ local function GetPanelList()
|
||||
PanelList[i].dWidth = EgtGetInfo( idMachGroup, 'PANELWIDTH', 'd')
|
||||
PanelList[i].dThickness = EgtGetInfo( idMachGroup, 'PANELHEIGHT', 'd')
|
||||
PanelList[i].sMaterialFullName = EgtGetInfo( idMachGroup, 'MATERIAL', 's') or '0000-MATERIAL'
|
||||
PanelList[i].sMaterialPlusThickness = PanelList[i].sMaterialFullName .. '_' .. tostring( string.format( '%.1f', PanelList[i].dThickness))
|
||||
local vMaterialInfo = EgtSplitString( PanelList[i].sMaterialFullName, '-')
|
||||
PanelList[i].idMaterial = vMaterialInfo[1]
|
||||
PanelList[i].idProd = EgtGetInfo( idMachGroup, 'PRODID', 'i')
|
||||
@@ -277,7 +278,6 @@ local function BuildCuttingList_Homag( PanelList, ActualSheetList, ProjectInfo)
|
||||
local LinesToWriteList = {}
|
||||
local sExtension = 'csv'
|
||||
local Lines = {}
|
||||
local dRequiredThickness = PanelList[1].dThickness
|
||||
|
||||
local Header = {
|
||||
Values = { 'Description', 'Quantity', 'Length', 'Width', 'Material', 'Grain', 'EdgeLeft', 'EdgeRight', 'EdgeTop', 'EdgeBottom', 'OrderNumber', 'BarCode'},
|
||||
@@ -289,9 +289,7 @@ local function BuildCuttingList_Homag( PanelList, ActualSheetList, ProjectInfo)
|
||||
ValuesPlaceholders = { '%s', '%d', '%.1f', '%.1f', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s' }
|
||||
}
|
||||
for i = 1, #PanelList do
|
||||
-- TODO questo deve essere un campo del Panel comune a tutte le esportazioni
|
||||
local sMaterialPlusThickness = PanelList[i].sMaterialFullName .. '_' .. tostring( string.format( '%.1f', dRequiredThickness))
|
||||
Panels.ValuesList[i] = { PanelList[i].sDescription, PanelList[i].nQuantity, PanelList[i].dLength, PanelList[i].dWidth, sMaterialPlusThickness, PanelList[i].sGrain, PanelList[i].sEdgeMaterialLeft, PanelList[i].sEdgeMaterialRight, PanelList[i].sEdgeMaterialTop, PanelList[i].sEdgeMaterialBottom, ProjectInfo.sProjectName, PanelList[i].sBarcode}
|
||||
Panels.ValuesList[i] = { PanelList[i].sDescription, PanelList[i].nQuantity, PanelList[i].dLength, PanelList[i].dWidth, PanelList[i].sMaterialPlusThickness, PanelList[i].sGrain, PanelList[i].sEdgeMaterialLeft, PanelList[i].sEdgeMaterialRight, PanelList[i].sEdgeMaterialTop, PanelList[i].sEdgeMaterialBottom, ProjectInfo.sProjectName, PanelList[i].sBarcode}
|
||||
end
|
||||
|
||||
-- Intestazione
|
||||
|
||||
Reference in New Issue
Block a user