TRIM - HP Records Manager

[Mick99]

Hi all, I am currently using Access 2013 DB to open up a specific record in TRIM - HP Records Manager which works fine. I am now trying to find the container number that this record/Document comes from as I will at times need to update the container number for this record/document to a new container number. Below is the code that works to actually open an instance of TRIM and return the record number selected from the database. I have been looking for the SDK guide but have only found a couple of pages that are not much help at all. Any help would be greatly appreciated.



Cheers Mick


Private Sub Command63_Click()
Dim strTRIMRef As String
Dim dbTRIM As TRIMSDK.Database
Dim oSearch As TRIMSDK.RecordSearch
Dim oRecords As TRIMSDK.Records, hWnd As Long
Dim oRecord As TRIMSDK.Record
Dim oRecordType As TRIMSDK.RecordType


Set dbTRIM = New TRIMSDK.Database
If dbTRIM.IsConnected Then
dbTRIM.Disconnect
End If
strTRIMRef = Me.[Agenda Report] ‘This is the record number to lookup ie D15/275151’
Set dbTRIM = New TRIMSDK.Database
dbTRIM.Connect
If dbTRIM.IsConnected Then
Set oSearch = dbTRIM.NewRecordSearch
Call oSearch.AddTitleWordClause(strTRIMRef)
Set oRecords = oSearch.GetRecords
Call oRecords.DisplayUI(hWnd)
End If
End Sub

[June7]

So if you have a connection to this TRIM database, does that mean you can build queries of its tables? Can you do a DLookup()?

What is container number? Is this a field in TRIM table?

[Mick99]

Yes I have a connection however, I have no idea about the table structure field names etc, I am kinda flying blind and attempting to develop a few simple items. The container number is the folder that the document sits in. So if I have a document that is called "D15/275151" and it resides in Container '14/4257/09' (Folder) I would like to change the container (Folder) number to '14/4257/10' it kinda of a workflow thing.

[June7]

AFAIK, would need to know field name and then run an UPDATE sql action. This does assume you are actually connected to the db and can manipulate its tables. What you are doing now is manipulating properties and methods of the TRIM db object you opened in VBA. How would you make this data edit if you worked directly with TRIM?

[Mick99]

I'm sure you are corrSo when i run the code it actually opens an instance of TRIM and then I can click on the document to open it, so not sure if that is a connection or not. I am still looking on the web to see if I can find out what the field name is.

[Mick99]

Not sure if this helps but I have also attached a screen shot of what I see when i run the code.

[June7]

This is not the same as making a connection to another database, such as setting links to tables in another Access file or setting up an ODBC for an SQL or Oracle db and linking to those tables.

Knowing the fieldname might not be much help since can't run an UPDATE sql on the VBA TRIM object.

[Mick99]

I am currently looking for how I can link into the table, will let you know how I go. I have just found an application called DataPort for HP Records Management so I'll see if i can use that to help me.

[June7]

I found a posting that says it is easy for Access to link to HP Records Manager but I cannot find anything that explains how. Might have to set up ODBC.

[Mick99]

Good morning, I'll contact our IT department this morning to find the location of the DB and see if I can create the ODBC I did start looking yesterday afternoon but could not find it and HP - TRIM properties is not showing me where the back end is.

[Mick99]

I am currently waiting on a call from IT rep to assist in gaining the connection. I might keep this thread going so we can help anyone else out in the future that maybe trying to do the same thing. Hopefully I will be able to give some good examples.

[ItsMe]

I did a couiple of Google searches, not that I know anything about HP. Anyway, seems like there is an SDK available. This document explains the SDK is an option during the install of HP TRIM Software Version 6.2
http://community.hpe.com/hpeb/attach...RIMInstall.pdf

It looks like there are newer versions of HP TRIM. So the SDK support may no longer exist. You might be able to find some SDK documentation in this forum here ...

http://community.hpe.com/t5/HPE-Reco...5#.Vmn8FXmFPL8

[Mick99]

Hi thank you for that, I have the SDK installed for version 8.1 and can call the window and get the associated record. I am currently awaiting our IT department to get back to me so I can get to the tables.

[Mick99]

Happy New year, I just can't seem to work this out. I have added some screen shots in the attached Word Doc to show the Access 2013 DB and the result of running the code below. I really need to get the code so it retrieves the Document and also returns the Container number so I can potentially update the last 2 numbers. The attached example has a container number of 14/4207/2/4 and I would potentially want to change the last 2 numbers to be something like 14/4207/2/10 any guidance or help would be greatly appreciated, happy to pay for help also. I am unable to get direct access via the ODBC as this is on a private server and there are security issues as well as data integrity which is fair enough. Therefore i need to find the code to action this as I am doing to pull the document up in the window.

Cheers Mick



Private Sub CODE_Click()

Dim objTRIM As TRIMSDK.Database
Dim objSearch As RecordSearch
Dim colRecords As Records
Dim strTRIMRef As String

Set objTRIM = New TRIMSDK.Database
objTRIM.Connect
strTRIMRef = Me.[Field1] ' [Field1] = Data Entry field in MS Access DB
Set objSearch = objTRIM.NewRecordSearch
Call objSearch.AddRecordNumberClause(Trim(strTRIMRef)) 'For Record Number
Set colRecords = objSearch.GetRecords
Call colRecords.ChooseManyUI(hWnd)
'get the parent container
objTRIM.Disconnect

End Sub