| Line 30... |
Line 30... |
| 30 |
last_errorMsg = ""
|
30 |
last_errorMsg = ""
|
| 31 |
End Sub
|
31 |
End Sub
|
| 32 |
|
32 |
|
| 33 |
'-----------------------------------------------------------------------------------------------------------------
|
33 |
'-----------------------------------------------------------------------------------------------------------------
|
| 34 |
' Queue up an action to be performed by a task running on the pkg_archive server
|
34 |
' Queue up an action to be performed by a task running on the pkg_archive server
|
| 35 |
' Decouples the Database from the filserver
|
35 |
' Decouples the Database from the File Server
|
| 36 |
'
|
36 |
'
|
| 37 |
Private Sub trigger_action(rtag_id, pv_id, sChange)
|
37 |
Private Sub trigger_action(rtag_id, pv_id, sChange)
|
| 38 |
|
38 |
|
| 39 |
' OraDatabase.Parameters.Add "RTAG_ID", rtag_id, ORAPARM_INPUT, ORATYPE_NUMBER
|
39 |
' OraDatabase.Parameters.Add "RTAG_ID", rtag_id, ORAPARM_INPUT, ORATYPE_NUMBER
|
| 40 |
' OraDatabase.Parameters.Add "PV_ID", pv_id, ORAPARM_INPUT, ORATYPE_NUMBER
|
40 |
' OraDatabase.Parameters.Add "PV_ID", pv_id, ORAPARM_INPUT, ORATYPE_NUMBER
|