angros47 wrote: ↑Jul 24, 2022 21:59
Without the source code, we cannot replicate the issue, so we can't answer. Why don't you place some PRINT instructions in your application, at each step of initialization, so you can see how long it goes before crashing (and locate the instruction that causes the issue)?
I have tried that but it is not even initialization the graphical part of my app it starts and then quits right away
Code: Select all
' © 2014 - 2022, algPoS, Northampton
' Coded by : Andrew Gable
' Desgined by : Andrew Gable
' Software owned by : Andrew Gable and algPoS, Northampton
' This version USES THE MySQL interface to a local Database that is Kept in sync with the back office via DataSync Program
' This is currently written in Gambas 3 (AT some point ALL Linux appliations are moving to Gambas 3 ONCE i work out how to
' Create the linux version of the promtions DLL)
'Include Files
#Include Once "mysql\mysql.bi"
#include Once "declaresubs.bi"
'Defines
#Define NULL 0
Using FB
Dim StartOption As string = *__FB_ARGV__[1] ' either normal or fullscreen or console if booting from the text only interface
Select Case StartOption
Case "normal", "Normal", ""
'Screen 19, 32, 2, (GFX_WINDOWED Or GFX_NO_FRAME Or fb.GFX_ALWAYS_ON_TOP)
ScreenRes 800, 600, 32, 2, (GFX_WINDOWED Or GFX_NO_FRAME Or fb.GFX_ALWAYS_ON_TOP)
SetMouse ,,0
Case "fullscreen", "Fullscreen"
'Screen 19, 32, 2, (GFX_NO_FRAME or GFX_NO_SWITCH Or fb.GFX_FULLSCREEN)
ScreenRes 800, 600, 32, 2, (GFX_NO_FRAME Or fb.GFX_ALWAYS_ON_TOP Or fb.GFX_FULLSCREEN)
SetMouse ,,0
End Select
ApplicationVersion = "6.0.0.1" 'change me when ever a new function is active and STABLE
DebugMode = 1
ESC = Chr$(&H1B)
DebugConsole = 22
SaleMode = "Sale"
CashierOverrideAccess = 0
DisplayWidth = 62
RecipitClear = "Yes"
DisplayTenderIcon = "£"
ItemQty = 1
ShowTaskBarItems = 0
SubTotalPressed = 0
MenuBeingDisplayed = "None"
PrinterRecipitWidth = 56 'Set the Width Ready to load the data in from the Settings.ini file
'Remove this option once card intergration has been done
'StoreMerchentSlip = 0 ' DO not store
' BarcodeRefund = 0
StoreEFTSlip = 0 ' No EFT Slip to store
' Start Of program
' Boot up
declare Sub StartUp
StartUp
This is the StartUp Function
Code: Select all
Private Sub StartUp
StartupScreenBackground("BootUp")
Sleep 1000
UpdateScreen_Loading("Loading PoS settings file","BootUp")
LoadPoSSettings
UpdateScreen_Loading("Loading Printer Language file","BootUp")
LoadPrinterLanguae
Select Case RecipitOption
Case "Always"
UpdateScreen_Loading("Recipit is set to print at end of the transaction","BootUp")
Case "Request"
UpdateScreen_Loading("Recipit is set to print only when required","BootUp")
End Select
UpdateScreen_Loading("Loading PoS tender figures","BootUp")
LoadPoSFigures
UpdateScreen_Loading("Loading PoS transaction number","BootUp")
LoadTransNumber
UpdateScreen_Loading("Next transaction number is : " & PoSTransacationNumber,"BootUp")
UpdateScreen_Loading("Initializing Hardware connections","BootUp")
UpdateScreen_Loading(" Initializing Printer Connection","BootUp")
EstablishPrinterConnection
Select Case CustomerDisplayInterface
Case "COM", "Com", "com"
UpdateScreen_Loading(" Initializing Customer Display","BootUp")
EstablishCustomerDisplayConnection
If CustomerDisplayType = "NCR" Then SelectCustomerMessage("NCRStartUp", "",0, "", 0)
PleaseWaitMessage
Case "ViaPrinter"
UpdateScreen_Loading(" Initializing Customer Display","BootUp")
Print #PoSPrinter, Chr$(&H1B); "="; Chr$(2);
Print #PoSPrinter, Chr$(&H1B); "@";
Print #PoSPrinter, Chr$(&H1B);"R"; CHR$(3);
Print #PoSPrinter, Chr$(&H1B); "US"; Chr$(0); 'Turn off Line
SelectCustomerMessage("PleaseWait","",0,"",0)
End Select
Select Case ScannerType
Case "COM", "com", "Com"
UpdateScreen_Loading(" Initializing Serial Barcode Reader","BootUp")
EstablishScannerConnection
'Case "USB"
' UpdateScreen_Loading(" USB Barcode Reader settings loaded","BootUp")
' EstablishScannerConnection
End Select
If RecipitPrintTest = "Yes" Then
UpdateScreen_Loading(" Printing Test Recipit....","BootUp")
TestPagePrint
EndIf
ImageDestroy(BackGround_Loading)
ClearScreenList
SignedOffScreen
End Sub
Before adding the -exx flag the software would boot and run