IPLCLOUD
/
IPLUPGRADE
11
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Compare commits

base: IPLCLOUD:59aec3dabf8f6aea03940ab1d3d33aacc691bdd0
Branches Tags
IPLCLOUD:master
..
compare: IPLCLOUD:3a79af8eb71f38905fb91bcc2c953584bbf26faa
Branches Tags
IPLCLOUD:master

No commits in common. '59aec3dabf8f6aea03940ab1d3d33aacc691bdd0' and '3a79af8eb71f38905fb91bcc2c953584bbf26faa' have entirely different histories.
59aec3dabf ... 3a79af8eb7

5 changed files with 0 additions and 236 deletions
Show Stats

60
CUSTOM_MENU/OBHOISTLK/Find_Parts/crm/model/crm/BusinessOpportunity-Cust.client
Unescape Escape View File

@ -1,60 +0,0 @@
client BusinessOpportunity;
component CRM;
layer Cust;
description "Put some useful description here ...";
--------------------------------- FRAGMENTS ---------------------------------
----------------------------- NAVIGATOR ENTRIES -----------------------------
-------------------------------- MAIN PAGES ---------------------------------
@Override
page OpportunityDetailPage using BusinessOpportunities {
command FindPartbyCharacteristics;
}
--------------------------------- COMMANDS ----------------------------------
command FindPartbyCharacteristics for BusinessOpportunity {
label = "Find Parts";
execute {
navigate "assistant/FindPartByCharacteristics/FindPartByCharacteristicsAssistant";
}
}
--------------------------------- SELECTORS ---------------------------------
---------------------------------- GROUPS -----------------------------------
----------------------------------- LISTS -----------------------------------
---------------------------------- DIALOGS ----------------------------------
-------------------------------- SINGLETONS ---------------------------------
---------------------------------- CHARTS -----------------------------------
--------------------------------- CALENDERS ---------------------------------
---------------------------------- SHEETS -----------------------------------
----------------------------- STATE INDICATORS ------------------------------
----------------------------------- TREES -----------------------------------
---------------------------------- PLUGINS ----------------------------------
------------------------------- IMAGE VIEWERS -------------------------------

59
CUSTOM_MENU/OBHOISTLK/Find_Parts/order/model/order/CustomerOrder-Cust.client
Unescape Escape View File

@ -1,59 +0,0 @@
client CustomerOrder;
component ORDER;
layer Cust;
description "Find parts customization - Cloud Uplift";
--------------------------------- FRAGMENTS ---------------------------------
----------------------------- NAVIGATOR ENTRIES -----------------------------
-------------------------------- MAIN PAGES ---------------------------------
@Override
page Form using CustomerOrderSet {
command FindPartbyCharacteristics;
}
--------------------------------- COMMANDS ----------------------------------
command FindPartbyCharacteristics for CustomerOrder {
label = "Find Parts";
execute {
navigate "assistant/FindPartByCharacteristics/FindPartByCharacteristicsAssistant";
}
}
--------------------------------- SELECTORS ---------------------------------
---------------------------------- GROUPS -----------------------------------
----------------------------------- LISTS -----------------------------------
---------------------------------- DIALOGS ----------------------------------
-------------------------------- SINGLETONS ---------------------------------
---------------------------------- CHARTS -----------------------------------
--------------------------------- CALENDERS ---------------------------------
---------------------------------- SHEETS -----------------------------------
----------------------------- STATE INDICATORS ------------------------------
----------------------------------- TREES -----------------------------------
---------------------------------- PLUGINS ----------------------------------
------------------------------- IMAGE VIEWERS -------------------------------

23
CUSTOM_MENU/OBHOISTLK/Find_Parts/order/model/order/CustomerOrderLineBaseList-Cust.fragment
Unescape Escape View File

@ -1,23 +0,0 @@
fragment CustomerOrderLineBaseList;
component ORDER;
layer Cust;
description "Put some useful description here ...";
--------------------------------- FRAGMENTS ---------------------------------
----------------------------- CLIENT FRAGMENTS ------------------------------
--------------------------------- COMMANDS ----------------------------------
command FindPartbyCharacteristics {
label = "Find Parts";
execute {
navigate "assistant/FindPartByCharacteristics/FindPartByCharacteristicsAssistant";
}
}
----------------------------------- LISTS -----------------------------------
@Override
list CustomerOrderLineBaseList for CustomerOrderLine {
command FindPartbyCharacteristics;
}
--------------------------- PROJECTION FRAGMENTS ----------------------------

59
CUSTOM_MENU/OBHOISTLK/Find_Parts/order/model/order/SalesQuotation-Cust.client
Unescape Escape View File

@ -1,59 +0,0 @@
client SalesQuotation;
component ORDER;
layer Cust;
description "Find parts customization - Cloud Uplift";
--------------------------------- FRAGMENTS ---------------------------------
----------------------------- NAVIGATOR ENTRIES -----------------------------
-------------------------------- MAIN PAGES ---------------------------------
@Override
page Form using OrderQuotationSet {
command FindPartbyCharacteristics;
}
--------------------------------- COMMANDS ----------------------------------
command FindPartbyCharacteristics for OrderQuotation {
label = "Find Parts";
execute {
navigate "assistant/FindPartByCharacteristics/FindPartByCharacteristicsAssistant";
}
}
--------------------------------- SELECTORS ---------------------------------
---------------------------------- GROUPS -----------------------------------
----------------------------------- LISTS -----------------------------------
---------------------------------- DIALOGS ----------------------------------
-------------------------------- SINGLETONS ---------------------------------
---------------------------------- CHARTS -----------------------------------
--------------------------------- CALENDERS ---------------------------------
---------------------------------- SHEETS -----------------------------------
----------------------------- STATE INDICATORS ------------------------------
----------------------------------- TREES -----------------------------------
---------------------------------- PLUGINS ----------------------------------
------------------------------- IMAGE VIEWERS -------------------------------

35
CUSTOM_MENU/OBHOISTLK/Send_Email_cpgSendEvaluationMail.sql
Unescape Escape View File

@ -1,35 +0,0 @@
DECLARE
from_mail_ VARCHAR2(400);
rowkey_ VARCHAR2(32000);
subject_ VARCHAR2(1000);
content_ VARCHAR2(32000);
CURSOR get_employye_list IS
SELECT company_id, emp_no
FROM Company_Person_CfV
WHERE NVL(CF$_online_pmp_db, 'FALSE') = 'TRUE';
CURSOR get_email_data IS
SELECT CF$_subject, CF$_content
FROM C_EVALUATION_MAIL_CLV
WHERE OBJKEY = rowkey_;
BEGIN
rowkey_ := substr('&NEW:ROWKEY', 2, INSTR('&NEW:ROWKEY', '$EVENT_ACTION_ROWKEY', 1, 1) - 3);
from_mail_ := 'sender@domain.com';
open get_email_data;
fetch get_email_data
into subject_, content_;
close get_email_data;
FOR rec_ IN get_employye_list LOOP
Command_SYS.Mail(sender_ => 'sender@domain.com',
from_ => from_mail_,
to_list_ => 'Pers_comms_Work_API.Get_Work_Email(rec_.company_id,
rec_.emp_no)',
cc_list_ => '',
bcc_list_ => '',
subject_ => subject_,
text_ => content_,
attach_ => '');
END LOOP;
END;
Write Preview
Loading…
Cancel
Save