1. Alfredo Santibanez
  2. PowerBuilder
  3. Sunday, 29 October 2023 07:26 PM UTC

Hi

I am trying to achieve a lock method to edit records (rows) and notify users which user has the record locked, using SQL Server.  For that it would requiere to:

  • Use WITH (UPDLOCK) in the select of the datawindow
  • Have the id of the row with the non documented feature

select %%lockres%% ,* from <table>

  • Use a select like this:

select l.*
from sys.dm_tran_locks as l
where l.resource_type in ('KEY', 'RID')

  • I would need also the name of the user in the Host or other field en in dbtrans, thats no problem

Also the dbid and objectid from SQL, thats no problem either.

  • A time out to ROLLBACK an  release in case of huge delay from the user.

 

But I was trying to do it without changing or copying a lot of datawindows so I am dynamically modifying the SQL select in my ancestor dw object, with dw.SetSQLselect, but seems not to work for a DW.

 

I have tried:

  • check the correct change in retrievestart and retrieveend events.
  • checking the dbtrace.

It seems that the build it method dw.retrieve ignores the WITH clause. As it does not executres the select with lock, as per the next trace results.

 

(09821818):   SELECT  co_asientos.IdAsiento ,           co_asientos.compania ,           co_asientos.IdTipoDocumento ,           co_asientos.IdOficina ,           co_asientos.Documento ,           left(ge_tipodocumento.nombre,5)+' '+co_asientos.Documento as display    FROM co_asientos ,           ge_tipodocumento     WHERE ( co_asientos.IdTipoDocumento = ge_tipodocumento.IdTipoDocumento ) and          ( ( co_asientos.IdAsiento IS NULL ) )  (DBI_PREPARE) (0.292 MS / 592.450 MS)

But it do works with in line sql statements like, using the same transaction object:+

Trace when stoped at event retrieve start:

(08C00C10): PREPARE:
(08C00C10): SELECT co_asientos.IdAsiento , co_asientos.compania , co_asientos.IdTipoDocumento , co_asientos.Documento , co_asientos.fecha ,

.....

co_asientos.idModulo , co_asientos.IdOficina , space(100) as ColChange FROM CO_ASIENTOS WITH (UPDLOCK) WHERE ((co_asientos.IdAsiento = 72208)) (DBI_PREPARE) (0.081 MS / 213.591 MS)

BUT trace at retrieve end:

(08C00C10): PREPARE:
(08C00C10): SELECT co_asientos.IdAsiento , co_asientos.compania , co_asientos.IdTipoDocumento , co_asientos.Documento , co_asientos.fecha ,

.........

FROM co_asientos WHERE ((co_asientos.IdAsiento = 72208)) (DBI_PREPARE) (0.437 MS / 214.638 MS) (THE UPDLOCK DISAPEARS)
(08C00C10): DESCRIBE:(DBI_DESCRIBE) (0.040 MS / 214.678 MS)

THEN THE RECORD IS NOT LOCKED

 select idasiento INTO :IDASIENTO from co_asientos with (UPdLOCK) where idasiento=72208;

IN the rade:

(03C12420): select idasiento from co_asientos with ( UPdLOCK ) where idasiento =72208 (DBI_PREPARE) (0.275 MS / 233.661 MS)
(03C12420): GET AFFECTED ROWS:(DBI_GET_AFFECTED_ROWS) (0.000 MS / 233.661 MS)
(03C12420): ^ 1 Rows Affected

THE RECORD NOW IS LOCKED

By this result, I would guess is not the driver, I am using PB126 with SNC 11.

 

Am I missing something? Is this a known issue?

 

 

Best Regards

Alfredo

 

 

 

 

 


Responses (1)
  1. Likes
  2. Latest
  3. Oldest
Loading...

Find Questions by Tag

.EXE .NET 6.0 .NET Assembly .NET Core 3.1 .NET Core Framework .NET DataStore .NET Std Framework 32-bit 64-bit ADO.NET AEM AI Algorithm Amazon AWS Android Apache API APK App Store App Store (Apple) Appeon Workspace Appeon Xcelerator Plug-in Architecture Array ASE Asynchronous Methods Authentication AutoBuild AutoCompiler Automated Testing Automation AutoScript Azure Barcode Base64 Batch BigData BLOB Branch & Merge Browser Bug Build Button C# C# Class Importer C# Editor C# Model generator Calendar Camera Certificate Chrome Citrix Class Client Client/Server Cloud Cluster Collection COM Command Line Compiler Compression Computed Field Configuration Controls Cookies Cordova Crash Cross-Platform Crosstab CSharpAssembly CSharpObject CSS CSV Cursor Data Database Database Driver Database Painter Database Profile Database Provider DataObject DataSource DataStore DataStore (C#) DataStore (PS) DataType DataWindow DATE DATETIME DB2 Debug Debugger Debugging Deployment Design DLL DO-WHILE Dockable Docker Documentation DOUBLE Download DragDrop Edge Edit Style Editor Elevate Conference Email Embedded SQL Emulator Encoding Encryption Enhancement Request Entity Entity Framework ERP Error Event Event Handler Event Handling Excel Exception Export Expression External Functions F# Field File File Access Filter Firefox Firewall Font FOR-NEXT Foreground Format Function Garbage Collection GeoLocation Git Graph HANA Hash Header HTML/5 HTTP/S HTTPClient Icon IDE Identity IIS IMAPI Import InfoMaker Inheritance Installation Integer IntelliSense Interface Internet Internet Explorer iOS IPA iPad iPhone IWA J# Java JavaScript JBoss JDBC JOIN JSON JSONGenerator JSONParser Kestrel Label Lambda Large File LDAP Library License LINQ Linux OS Load Balancing Localization Localized PBVM Log In Log Out Logging LONG LONGLONG macOS MAPI Maps MDI Memory Memory Leak Menu Merge MessageBox Messagging Method Migration MIME TYPE Mobile Model ModelStore ModelStore (C#) MSOLEDBSQL Multi Threading MVC MySQL n-Tier Namespace NativePDF NVO OAuth ODATA ODBC Office Offline OLE OLEDB Online Open Source OpenAPI OpenSSL Oracle OrcaScript Other Outlook Output Package Parameter Patch PayPal PB Classic PB Native PB.NET PBC PBD PBDOM PBG PBJVM PBL PBNI PBORCA PBVM PBX PDF Performance Permission PFC Picture Pipeline Play Store (Google) Plugin Popup Port POST PostgreSQL PowerBuilder PowerBuilder (Appeon) PowerBuilder (SAP) PowerBuilder Compiler PowerBuilder Runtime PowerClient PowerScript (PS) PowerScript IDE PowerScript Migrator PowerServer PowerServer Mobile PowerServer Toolkit PowerServer Web PowerServerLabel Print Properties Proxy Publish PULL PUSH Query Regression Release Renew Resize Response REST Retrieve RibbonBar RibbonBar Builder Rich Text Roadmap RPC Runtime Packager SaaS Scaffolding Script SDI SDK Security Server Service Session Single Sign-on Size SMTP SMTPClient SnapDevelop SOAP Sort Source Code Speech Recognition SQL SQL Anywhere SQL Server SqlBuilder SqlExecutor SQLite SqlModelMapper Storage Stored Procedure Subscription SVN Swagger Syntax TabbedBar TabbedView Tablet TabPage Target TE Control Testing Text TFS Theme TIME Timer TLS/SSL Tomcat TortoiseGit TortoiseSVN Transaction Transparency Trial Trigger TRY-CATCH TX Control Type UI ULONG UltraLite Uninstall Unit Test Unit Testing UNIX OS Update Upgrade Upload URL User Center User Object UWP Validation VARCHAR Variable Versioning Visual Studio Visual Studio Code VM Voice Warning WCF Web API Web Extensions Web Service WebBrowser WebForms WebLogic WebSphere WildFly WinAPI Window Windows OS WinForms Wizard Workgroup Workspace WPF XCODE XHTML XML Zoom

Helpful?

If a reply or comment is helpful for you, please don’t hesitate to click the Helpful button. This action is further confirmation of their invaluable contribution to the Appeon Community.