fix prgName x controlli 16/18

This commit is contained in:
Samuele E. Locatelli
2018-04-27 08:31:19 +02:00
parent b2b847e8e5
commit c61c815a58
4 changed files with 18 additions and 3 deletions
+13
View File
@@ -1536,12 +1536,15 @@ Namespace CNC
Dim nReturn As Integer
Dim prgName(244) As Char
Dim prgNum As Focas1.ODBPRO
' Fill array with a character.
For index As Integer = 0 To 243
prgName(index) = ""
Next
prgNum = New Focas1.ODBPRO
'leggo il numero del processo attivo
nPathIdx = GetActivePath()
@@ -1553,6 +1556,16 @@ Namespace CNC
If F_CheckRetError_Cnc(nReturn, "cnc_pdf_rdmain CNC.FANUC.CncLib") Then
Throw New NcException("ERR cnc_pdf_rdmain CNC.FANUC.CncLib")
End If
ElseIf Is16Series Then
' leggo tutto!!!
nReturn = Focas1.cnc_rdprgnum(nLibHandle(nPathIdx), prgNum)
prgName = "O" & prgNum.mdata.ToString()
If F_CheckRetError_Cnc(nReturn, "cnc_pdf_rdmain CNC.FANUC.CncLib") Then
Throw New NcException("ERR cnc_pdf_rdmain CNC.FANUC.CncLib")
End If
End If
+1 -1
View File
@@ -11,6 +11,6 @@ CMDREBO=/IOB/sendRebootGateway?GWIP=
CMDIOB2CALL=/IOB/getIob2call?GWIP=
[IOB]
STARTLIST=3000,2999
STARTLIST=3007
MAXCNC=4
;STARTLIST=3001,3002,3003,3004,3005
+3 -1
View File
@@ -167,7 +167,9 @@
<None Include="DATA\CONF\3006.ini">
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
</None>
<None Include="DATA\CONF\3007.ini" />
<None Include="DATA\CONF\3007.ini">
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
</None>
<None Include="DATA\CONF\3010.ini">
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
</None>
Vendored
+1 -1
View File
@@ -14,7 +14,7 @@ pipeline {
/* calcolo numero versione... diverso x branch MASTER/DEVELOP */
script {
withEnv(['NEXT_BUILD_NUMBER=257']) {
withEnv(['NEXT_BUILD_NUMBER=258']) {
// env.versionNumber = VersionNumber(versionNumberString : '1.18.${BUILD_DATE_FORMATTED, "yyMM"}.${BUILDS_ALL_TIME}', projectStartDate : '2006-01-01', skipFailedBuilds: true)
env.versionNumber = VersionNumber(versionNumberString : '1.18.${BUILD_DATE_FORMATTED, "yyMM"}.${BUILDS_ALL_TIME}', projectStartDate : '2006-01-01', skipFailedBuilds: true, overrideBuildsAllTime: '${NEXT_BUILD_NUMBER}')
env.APP_NAME = 'MAPO-IOB-WIN'