ge-aerospace/shopdb
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

api.asp: archive stale PC->equipment relationships on new PC self-registration

Browse Source 
When a new PC POSTs updateCompleteAsset for a machine number, the previous
PC's "Controls" relationship to that equipment is now soft-archived
(isactive=0) before the new relationship is created. Prevents duplicate
active relationships when PCs are replaced floor-wide. Display pages
already filter on isactive=1 so archived rows just disappear from inventory
views (history preserved).

displaymachine.asp: added Controller field populated via the controllertypes
join.

displaypc.asp: fixed top-bar search bug - searching a machine number was
returning the PC row instead of the machine. Three lookup queries now scope
to pctypeid IS NOT NULL.

Co-Authored-By: Claude Opus 4.7 (1M context) <noreply@anthropic.com>
This commit is contained in:
Cameron Proudlock
2026-04-27 17:10:33 -04:00
parent 0f9aebf9c6
commit c1f4412a52
3 changed files with 31 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
displaypc.asp
View File

@@ -37,7 +37,7 @@
IF machinenumber <> "" THEN
' Look up machineid by machinenumber
Dim rsLookup, strLookupSQL
strLookupSQL = "SELECT machineid FROM machines WHERE machinenumber = ? AND isactive = 1"
strLookupSQL = "SELECT machineid FROM machines WHERE machinenumber = ? AND isactive = 1 AND pctypeid IS NOT NULL"
Set rsLookup = ExecuteParameterizedQuery(objConn, strLookupSQL, Array(machinenumber))
IF NOT rsLookup.EOF THEN
machineid = rsLookup("machineid")
@@ -49,13 +49,13 @@
' We have a machineid, but it might actually be a machine number
' Try to look it up as a machineid first
Dim rsCheck
strLookupSQL = "SELECT machineid FROM machines WHERE machineid = ? AND isactive = 1"
strLookupSQL = "SELECT machineid FROM machines WHERE machineid = ? AND isactive = 1 AND pctypeid IS NOT NULL"
Set rsCheck = ExecuteParameterizedQuery(objConn, strLookupSQL, Array(machineid))
' If no machine found with that machineid, try treating it as a machine number
IF rsCheck.EOF THEN
rsCheck.Close
strLookupSQL = "SELECT machineid FROM machines WHERE machinenumber = ? AND isactive = 1"
strLookupSQL = "SELECT machineid FROM machines WHERE machinenumber = ? AND isactive = 1 AND pctypeid IS NOT NULL"
Set rsCheck = ExecuteParameterizedQuery(objConn, strLookupSQL, Array(CStr(machineid)))
IF NOT rsCheck.EOF THEN
machineid = rsCheck("machineid")