The following lines contain the word 'select', 'insert', 'update' or 'delete':
VF_UPDATE_BUT_CAPTION constant varchar2(100) := XNP_WSGL.MsgGetText(6,XNP_WSGLM.CAP006_VF_UPDATE);
VF_DELETE_BUT_CAPTION constant varchar2(100) := XNP_WSGL.MsgGetText(7,XNP_WSGLM.CAP007_VF_DELETE);
VF_UPDATE_BUT_ACTION constant varchar2(10) := 'UPDATE';
VF_DELETE_BUT_ACTION constant varchar2(10) := 'DELETE';
VF_VERIFIED_DELETE constant varchar2(100) := 'VerifiedDelete';
L_QRY_FIRST_ACTION varchar2(12) := 'INSERTIFNONE';
I_QUERY := 'SELECT count(*)' ||
substr(ZONE_SQL, I_FROM_POS);
ZONE_SQL := 'SELECT XNP_SV_SOA_VL.PORTING_ID,
XNP_SV_SOA_VL.SUBSCRIPTION_TN,
XNP_SV_SOA_VL.STATUS_DISPLAY_NAME,
XNP_SV_SOA_VL.SV_SOA_ID
FROM XNP_SV_SOA_VL XNP_SV_SOA_VL';
XNP_WSGL.DisplayMessage(XNP_WSGL.MESS_SUCCESS, XNP_WSGL.MsgGetText(207, XNP_WSGLM.MSG207_ROW_UPDATED),
'Monitor Ordering Subscriptions'||' : '||'Porting Ordering Subscriptions', VF_BODY_ATTRIBUTES);
XNP_WSGL.DisplayMessage(XNP_WSGL.MESS_SUCCESS, XNP_WSGL.MsgGetText(208, XNP_WSGLM.MSG208_ROW_INSERTED),
'Monitor Ordering Subscriptions'||' : '||'Porting Ordering Subscriptions', VF_BODY_ATTRIBUTES);
XNP_WSGL.LayoutData(htf.bold('Update Allowed?:'));
SELECT XNP_SV_SOA_VL.PORTING_ID,
XNP_SV_SOA_VL.SUBSCRIPTION_TYPE,
XNP_SV_SOA_VL.SUBSCRIPTION_TN,
XNP_SV_SOA_VL.PRE_SPLIT_SUBSCRIPTION_TN,
XNP_SV_SOA_VL.ROUTING_NUMBER,
XNP_SV_SOA_VL.STATUS_PHASE,
XNP_SV_SOA_VL.STATUS_DISPLAY_NAME,
XNP_SV_SOA_VL.STATUS_CHANGE_DATE,
XNP_SV_SOA_VL.STATUS_CHANGE_CAUSE_CODE,
XNP_SV_SOA_VL.CUSTOMER_ID,
XNP_SV_SOA_VL.CUSTOMER_NAME,
XNP_SV_SOA_VL.CONTACT_NAME,
XNP_SV_SOA_VL.PHONE,
XNP_SV_SOA_VL.EMAIL,
XNP_SV_SOA_VL.ACTIVATION_DUE_DATE,
XNP_SV_SOA_VL.ORDER_PRIORITY,
XNP_SV_SOA_VL.PREORDER_AUTHORIZATION_CODE,
XNP_SV_SOA_VL.REC_CODE,
XNP_SV_SOA_VL.REC_NAME,
XNP_SV_SOA_VL.REC_EMAIL,
XNP_SV_SOA_VL.DON_CODE,
XNP_SV_SOA_VL.DON_NAME,
XNP_SV_SOA_VL.DON_EMAIL,
XNP_SV_SOA_VL.NRC_CODE,
XNP_SV_SOA_VL.NRC_NAME,
XNP_SV_SOA_VL.NRC_EMAIL,
XNP_SV_SOA_VL.NEW_SP_AUTHORIZATION_FLAG,
XNP_SV_SOA_VL.NEW_SP_DUE_DATE,
XNP_SV_SOA_VL.OLD_SP_AUTHORIZATION_FLAG,
XNP_SV_SOA_VL.OLD_SP_DUE_DATE,
XNP_SV_SOA_VL.OLD_SP_CUTOFF_DUE_DATE,
XNP_SV_SOA_VL.INVOICE_DUE_DATE,
XNP_SV_SOA_VL.RETAIN_DIR_INFO_FLAG,
XNP_SV_SOA_VL.LOCKED_FLAG,
XNP_SV_SOA_VL.CONCURRENCE_FLAG,
XNP_SV_SOA_VL.PTO_FLAG,
XNP_SV_SOA_VL.DISCONNECT_DUE_DATE,
XNP_SV_SOA_VL.EFFECTIVE_RELEASE_DUE_DATE,
XNP_SV_SOA_VL.RETAIN_TN_FLAG,
XNP_SV_SOA_VL.BLOCKED_FLAG,
XNP_SV_SOA_VL.NUMBER_RETURNED_DUE_DATE,
XNP_SV_SOA_VL.CLASS_ADDRESS,
XNP_SV_SOA_VL.CLASS_SUBSYSTEM,
XNP_SV_SOA_VL.CNAM_ADDRESS,
XNP_SV_SOA_VL.CNAM_SUBSYSTEM,
XNP_SV_SOA_VL.ISVM_ADDRESS,
XNP_SV_SOA_VL.ISVM_SUBSYSTEM,
XNP_SV_SOA_VL.LIDB_ADDRESS,
XNP_SV_SOA_VL.LIDB_SUBSYSTEM,
XNP_SV_SOA_VL.WSMSC_ADDRESS,
XNP_SV_SOA_VL.WSMSC_SUBSYSTEM,
XNP_SV_SOA_VL.RN_ADDRESS,
XNP_SV_SOA_VL.RN_SUBSYSTEM,
XNP_SV_SOA_VL.SV_SOA_ID
INTO CURR_VAL.PORTING_ID,
CURR_VAL.SUBSCRIPTION_TYPE,
CURR_VAL.SUBSCRIPTION_TN,
CURR_VAL.PRE_SPLIT_SUBSCRIPTION_TN,
CURR_VAL.ROUTING_NUMBER,
CURR_VAL.STATUS_PHASE,
CURR_VAL.STATUS_DISPLAY_NAME,
CURR_VAL.STATUS_CHANGE_DATE,
CURR_VAL.STATUS_CHANGE_CAUSE_CODE,
CURR_VAL.CUSTOMER_ID,
CURR_VAL.CUSTOMER_NAME,
CURR_VAL.CONTACT_NAME,
CURR_VAL.PHONE,
CURR_VAL.EMAIL,
CURR_VAL.ACTIVATION_DUE_DATE,
CURR_VAL.ORDER_PRIORITY,
CURR_VAL.PREORDER_AUTHORIZATION_CODE,
CURR_VAL.REC_CODE,
CURR_VAL.REC_NAME,
CURR_VAL.REC_EMAIL,
CURR_VAL.DON_CODE,
CURR_VAL.DON_NAME,
CURR_VAL.DON_EMAIL,
CURR_VAL.NRC_CODE,
CURR_VAL.NRC_NAME,
CURR_VAL.NRC_EMAIL,
CURR_VAL.NEW_SP_AUTHORIZATION_FLAG,
CURR_VAL.NEW_SP_DUE_DATE,
CURR_VAL.OLD_SP_AUTHORIZATION_FLAG,
CURR_VAL.OLD_SP_DUE_DATE,
CURR_VAL.OLD_SP_CUTOFF_DUE_DATE,
CURR_VAL.INVOICE_DUE_DATE,
CURR_VAL.RETAIN_DIR_INFO_FLAG,
CURR_VAL.LOCKED_FLAG,
CURR_VAL.CONCURRENCE_FLAG,
CURR_VAL.PTO_FLAG,
CURR_VAL.DISCONNECT_DUE_DATE,
CURR_VAL.EFFECTIVE_RELEASE_DUE_DATE,
CURR_VAL.RETAIN_TN_FLAG,
CURR_VAL.BLOCKED_FLAG,
CURR_VAL.NUMBER_RETURNED_DUE_DATE,
CURR_VAL.CLASS_ADDRESS,
CURR_VAL.CLASS_SUBSYSTEM,
CURR_VAL.CNAM_ADDRESS,
CURR_VAL.CNAM_SUBSYSTEM,
CURR_VAL.ISVM_ADDRESS,
CURR_VAL.ISVM_SUBSYSTEM,
CURR_VAL.LIDB_ADDRESS,
CURR_VAL.LIDB_SUBSYSTEM,
CURR_VAL.WSMSC_ADDRESS,
CURR_VAL.WSMSC_SUBSYSTEM,
CURR_VAL.RN_ADDRESS,
CURR_VAL.RN_SUBSYSTEM,
CURR_VAL.SV_SOA_ID
FROM XNP_SV_SOA_VL XNP_SV_SOA_VL
WHERE XNP_SV_SOA_VL.SV_SOA_ID = CURR_VAL.SV_SOA_ID
;
XNP_WSGL.DisplayMessage(XNP_WSGL.MESS_ERROR, XNP_WSGL.MsgGetText(204, XNP_WSGLM.MSG204_ROW_DELETED),
'Monitor Ordering Subscriptions'||' : '||'Porting Ordering Subscriptions', VF_BODY_ATTRIBUTES);