| Line 457... |
Line 457... |
| 457 |
OraDatabase.Parameters.Remove "BOM_ID"
|
457 |
OraDatabase.Parameters.Remove "BOM_ID"
|
| 458 |
rsQry.Close
|
458 |
rsQry.Close
|
| 459 |
Set rsQry = Nothing
|
459 |
Set rsQry = Nothing
|
| 460 |
End Sub
|
460 |
End Sub
|
| 461 |
'-----------------------------------------------------------------------------------------------------------------------------
|
461 |
'-----------------------------------------------------------------------------------------------------------------------------
|
| - |
|
462 |
Sub RaiseMsg ( SSerrFile, SSerrDesc )
|
| - |
|
463 |
' Usage: enumERROR, parval1 &"|"& parval2 &"|"& parval3 ...
|
| - |
|
464 |
Session( "DEPMGR_ERRDESCRIPTION" ) = SSerrDesc
|
| - |
|
465 |
Response.Redirect ("messages/"& SSerrFile )
|
| - |
|
466 |
End Sub
|
| - |
|
467 |
'-----------------------------------------------------------------------------------------------------------------------------
|
| 462 |
Function Wiki2HTML ( ByVal sWikiString )
|
468 |
Function Wiki2HTML ( ByVal sWikiString )
|
| 463 |
'=== Definition ===
|
469 |
'=== Definition ===
|
| 464 |
sWikiString = Replace ( sWikiString, "[BREAKLINE]", "<hr noshade size='1' color='#DAD7C8'>" )
|
470 |
sWikiString = Replace ( sWikiString, "[BREAKLINE]", "<hr noshade size='1' color='#DAD7C8'>" )
|
| 465 |
sWikiString = Replace ( sWikiString, "[NEWLINE]", "<br>" )
|
471 |
sWikiString = Replace ( sWikiString, "[NEWLINE]", "<br>" )
|
| 466 |
|
472 |
|