facing a problem

[arpit6111984]

1)if ($table == $ORDER_ALERTS_TABLE)
2){ my $errorMessage;
3) #2nd Command Line Param is AlertId
4) GetOrderNumber($ARGV[2]);
5) eval
6) {
7) my $AutoActionProc = $databaseHandle => (q{
BEGIN
ORDERACTIONS.GENERATEORDERACTIONS(:p_actionId,
:p_alertId,
:p_orderNo,
:p_foundbyId,
:p_foundbyUser,
:p_tableName,
:p_accountType,
:p_parameter,
:errorMsg);
END;
});
hi everyone m facing the problem at line 7 stating that useless use of the constant can anyone tell me what is the problem

[Stang02GT]

1)if ($table == $ORDER_ALERTS_TABLE)
2){ my $errorMessage;
3) #2nd Command Line Param is AlertId
4) GetOrderNumber($ARGV[2]);
5) eval
6) {
7) my $AutoActionProc = $databaseHandle => (q{
BEGIN
ORDERACTIONS.GENERATEORDERACTIONS(:p_actionId,
:p_alertId,
:p_orderNo,
:p_foundbyId,
:p_foundbyUser,
:p_tableName,
:p_accountType,
:p_parameter,
:errorMsg);
END;
});
hi everyone m facing the problem at line 7 stating that useless use of the constant can anyone tell me what is the problem

Welcome,

Please take a moment to look at the POSTING GUIDELINES .

Could you provide us with more detail about your problem? What is the error message you are getting?