ORDER BY TRANS_PRIORITY',null,null,null,null,to_date('25-05-26','DD-MM-RR'),'System ','System',null,null,'0:dist_route',1,null,null,null,null,null,null,'2',null,'2',null,null,null,'2 ',null,null,null,null,null,null,null);
InsertintoMESSAGES(MSG_NO,MSG_STR,MSG_DESCR,MSG_TYPE,MSG_OPT,MSG_TIME,ALARM,ERR_SOURCE,CHG_DATE,CHG_USER,CHG_TERM,OVERRIDE_INPUT,MAIL_OPTION)values('VTPRIBLK','Transporter Priority Empty!','The transporter Priority cannot be empty.','E','Y',null,null,null,to_date('22-10-00','DD-MM-RR'),'SUN ','HDP',null,null);
-- Saburi P. 10-JUN-26
InsertintoMESSAGES(MSG_NO,MSG_STR,MSG_DESCR,MSG_TYPE,MSG_OPT,MSG_TIME,ALARM,ERR_SOURCE,CHG_DATE,CHG_USER,CHG_TERM,OVERRIDE_INPUT,MAIL_OPTION)values('VTDUPPRI ','Transport Priority already exists','Duplicate Transport Priority is not allowed for this Distribution Route','E',null,null,null,null,to_date('22-05-26','DD-MM-RR'),'SYSTEM ','SYSTEM',null,null);
UPDATEPOPHELP
SETSQL_STR='SELECT TRAN_CODE, TRANS_PRIORITY
FROM DISTROUTEDET
...
...
@@ -93,3 +108,66 @@ WHERE FIELD_NAME = 'TRAN_CODE'
values('VTDISTRT01','Invalid Transporter','Please select a valid Transporter for the selected Distribution Route.','E',null,null,null,null,to_date('12-06-26','DD-MM-RR'),'SABURI','SYSTEM',null,null);
-- 19-JUN-26 Saburi P.
InsertintoGENMST(FLD_NAME,MOD_NAME,DESCR,ERROR_CD,BLANK_OPT,FLD_TYPE,FLD_MIN,FLD_MAX,VAL_TYPE,CHG_DATE,CHG_USER,CHG_TERM,VAL_TABLE,SQL_INPUT,FLD_WIDTH,UDF_USAGE_1,UDF_USAGE_2,UDF_USAGE_3,VAL_STAGE,OBJ_NAME,FORM_NO,ACTION,USER_ID,TRAN_ID,UDF_STR1_DESCR,UDF_STR2_DESCR,UDF_STR3_DESCR,EXEC_SEQ)values('TRANS_PRIORITY','W_DISTROUTE','Transport Priority cannot be blank','VTPRIBLK ','N','C','select case
when ? is null then 1
else 0
end
from dual','0','Q',to_date('18-06-26','DD-MM-RR'),'BASE ','BASE',null,':1.trans_priority',0,null,null,null,null,null,'2','Edit',null,'F0000000000000000781',null,null,null,null);
InsertintoGENMST(FLD_NAME,MOD_NAME,DESCR,ERROR_CD,BLANK_OPT,FLD_TYPE,FLD_MIN,FLD_MAX,VAL_TYPE,CHG_DATE,CHG_USER,CHG_TERM,VAL_TABLE,SQL_INPUT,FLD_WIDTH,UDF_USAGE_1,UDF_USAGE_2,UDF_USAGE_3,VAL_STAGE,OBJ_NAME,FORM_NO,ACTION,USER_ID,TRAN_ID,UDF_STR1_DESCR,UDF_STR2_DESCR,UDF_STR3_DESCR,EXEC_SEQ)values('TRANS_PRIORITY','W_DISTROUTE','Duplicate Transport Priority not allowed','VTDUPPRI ','N','C','select case
when length(trim(nvl(?,''''))) = 0
then 1
when (select count(*)
from DISTROUTEDET
where DIST_ROUTE = ?
and TRANS_PRIORITY = ?
and LINE_NO <> ?) > 0
then 1
else 0
end
from dual','0','Q',to_date('19-06-26','DD-MM-RR'),'BASE ','BASE',null,':1.trans_priority,:1.dist_route,:1.trans_priority,:1.line_no',0,null,null,null,null,null,'2','Edit',null,'F0000000000000000782',null,null,null,null);
UPDATEPOPHELP
SETSQL_STR=
'SELECT TRAN_CODE, TRANS_PRIORITY
FROM DISTROUTEDET
WHERE DIST_ROUTE = ?
AND TRANS_PRIORITY > 0
ORDER BY TRANS_PRIORITY'
WHEREFIELD_NAME='TRAN_CODE'
ANDMOD_NAME='W_SORDER';
InsertintoGENMST(FLD_NAME,MOD_NAME,DESCR,ERROR_CD,BLANK_OPT,FLD_TYPE,FLD_MIN,FLD_MAX,VAL_TYPE,CHG_DATE,CHG_USER,CHG_TERM,VAL_TABLE,SQL_INPUT,FLD_WIDTH,UDF_USAGE_1,UDF_USAGE_2,UDF_USAGE_3,VAL_STAGE,OBJ_NAME,FORM_NO,ACTION,USER_ID,TRAN_ID,UDF_STR1_DESCR,UDF_STR2_DESCR,UDF_STR3_DESCR,EXEC_SEQ)values('TRAN_CODE','W_DISPATCH','Invalid Transporter','VTDISTRT01','N','C','select (case when (length(trim(?)) > 0 and length(trim(?)) > 0)
then (select case when (select count(*)
from DISTROUTEDET
where DIST_ROUTE = ?
and TRAN_CODE = ?) > 0
then 1
else 0
end
from dual)
else 1
end)
from dual','0','Q',to_date('16-06-26','DD-MM-RR'),'BASE ','BASE',null,':0.dist_route,:0.tran_code,:0.dist_route,:0.tran_code',0,null,null,null,null,null,'1','Edit',null,'F0000000000000000780',null,null,null,null);
InsertintoGENMST(FLD_NAME,MOD_NAME,DESCR,ERROR_CD,BLANK_OPT,FLD_TYPE,FLD_MIN,FLD_MAX,VAL_TYPE,CHG_DATE,CHG_USER,CHG_TERM,VAL_TABLE,SQL_INPUT,FLD_WIDTH,UDF_USAGE_1,UDF_USAGE_2,UDF_USAGE_3,VAL_STAGE,OBJ_NAME,FORM_NO,ACTION,USER_ID,TRAN_ID,UDF_STR1_DESCR,UDF_STR2_DESCR,UDF_STR3_DESCR,EXEC_SEQ)values('TRAN_CODE','W_SORDER','Invalid Transporter','VTDISTRT01','N','C','select (case when (length(trim(?)) > 0 and length(trim(?)) > 0)
then (select case when (select count(*)
from DISTROUTEDET
where DIST_ROUTE = ?
and TRAN_CODE = ?) > 0
then 1
else 0
end
from dual)
else 1
end)
from dual','1','Q',to_date('16-06-26','DD-MM-RR'),'BASE ','BASE',null,':0.dist_route,:0.tran_code,:0.dist_route,:0.tran_code',0,null,null,null,null,null,'1','Edit',null,'F0000000000000000778',null,null,null,null);