All posts by m.ogun

[APEX] Session Sharing

Siz de benim gibi aynı workspace üzerinde birden fazla application sunuyorsanız muhtemelen kullanıcılarınız uygulamalar arasındaki geçişlerde tekrar login sayfasına yönlendirildiklerinden şikayetçilerdir :)

Bu rahatsız edici kimlik doğrulama adımını bypass etmenin bir kaç yolundan ilki tabii ki SSO (single sign-on)

Hemen uygulayabileceğiniz basitlikte olan bir diğeri ise session sharing..

Bu attribute kabaca kullanıcıya “bir kez kendini tanıttın, artık session expire olana kadar bu workspace üzerindeki diğer uygulamalarda sana tekrar login bilgilerini sormam” demenizi sağlıyor.

Shared Components/Authentication Schemes altından CURRENT olarak işaretli doğrulama yönteminize tıklayın ve SESSION SHARING bölümünü bulun. TYPE menüsünden Workspace Sharing seçerek değişiklikleri kaydedin.

Artık uygulama dışından bu uygulamaya verdiğiniz direct url ‘lerde veya apex_page.get_url ‘le hazırladığınız adreslerde kullanıcı yeniden kendini tanıtmak zorunda kalmayacak.

*tabii &SESSION. bilgisini gönderiyorsanız*

Örnek:

340 numaralı application içindesiniz ve 350 numaralı application’ın 1. sayfasına link vermek istiyorsunuz. Kullanıcınız 340 numaralı uygulamada zaten authenticated ise söz gelimi

javascript:var x=window.open('f?p=350:1:&SESSION.','_blank');

gibi oluşturduğunuz bir linke tıkladığında yeni bir sekmede, 340 numaralı uygulamadan üretilen session ID ile 350 numaralı uygulama açılacak.

Oracle APEX datepicker /*no weekend*/

Haftasonları seçilemesin istiyorsanız şöyle bir java script işinize yarayacaktır.

$('.hasDatepicker').datepicker("option", "beforeShowDay", $.datepicker.noWeekends).next('button').addClass('a-Button a-Button--calendar');

Bunu ilgili sayfanın JAVA SCRIPT:Execute when page loads alanına yazarsanız o sayfadaki tüm datepicker item’larınızda cumartesi ve pazar günlerinin silik çıktığını göreceksiniz.

Yok tümü olmasın, yalnızca belirli bir tarih seçim kutucuğu etkilensin istiyorsanız .hasDatepicker yerine substitution string formatıyla item adını yazın.

Mesela #P1_TARIH_1# gibi.

Detayları için https://askmax.blog/2018/03/01/datepicker-customization/

Windows ile macOS kurulum USB'si hazırlamak

Aslında MacBook da olsa MacMini de olsa işletim sistemini baştan kurmak özel bir çaba ya da bilgi gerektirmiyor. Cihazınızı güç düğmesinden açarken klavyenizdeki belirli tuşlara basılı tutarsanız sizi bu işlemleri yapabileceğiniz bir ön yüz karşılayacaktır.

Sonra menüden seçimler ve bir kaç tıkla cihazınıza en uygun macOS sürümü indirilir ve kurulur. Ama normal şartlar altında.. Çünkü bazen de kurulmaz :)

Sizin bu yazıyı okuma sebebiniz bu ya da başka bir şey olabilir. Bir şekilde MacOS işletim sistemini indirmek, bu imajı USB stick’inize kopyalayıp MAC ‘inize kurmak istiyorsanız ve bu işlemleri Windows yüklü bir bilgisayar ile yapmak zorundaysanız doğru yerdesiniz.

Bunu yapmak için ihtiyacınız olanlar şunlar:

  • Yeterli hacimde bir USB Stick
  • Kurmak istediğiniz işletim sisteminin imajı (muhtemelen .dmg uzantılı bir dosya olacak)
  • Bu imajı USB stick’e yazmak için kullanacağımız bir yazılım. Ben TransMac isimli yazılımı kullandım. Ücretli bir uygulama fakat denemek için bir süre kullanmanıza müsade ediyor.

TransMac Uygulamasının Kullanımı

  • Bilgisayarınızda ADMIN yetkilerine sahipseniz uygulamayı indirin ve bilgisayarınıza kurun.
  • Kurulum tamamlandıktan sonra uygulamayı yine ADMIN haklarıyla açın.
  • USB Stick ‘inizi bilgisayarınıza takın

TansMac uygulamasında, aşağıdaki örnekten de görebileceğiniz gibi cihazınızdaki depolama üniteleri listeleniyor olacaktır.

Bu listeden USB Stick ‘inize sağ tıklayın ve Format Disk For Mac diyin. Sonra aynı USB Stick ‘e tekrar sağ tıklayarak bu kez Restore With Disk Image diyin.

Bu aşamada TransMac uygulaması size daha önce bilgisayarınıza indirdiğiniz MacOS imajının yerini soracaktır. DMG uzantılı dosyanızı gösterin.

Ve Bekleyin. Uzun süren bir işlem. Ama bittiğinde bir bootable MacOS kurulum USB Stick ‘iniz olacak:)

OCI APEX Güncellemesi

Oracle Geçtiğimiz hafta OCI üyelerine bu günlerde buluttaki APEX ‘in 19.1 ‘den 19.2 ‘ye yükseltileceği bilgisini veren bir e-posta atmıştı.

Frankfurt hub’ınde bu güncelleme dün gerçekleşti.

İlk göze çarpan, birden fazla display value atayabildiğimiz Select List LOV ‘ler :-)

Conditional Column Formatting in APEX

Tyler Muth's Blog

I wanted to share a little trick I’ve used in APEX for a while now to conditionally format report columns based on their values. I’m sure there are plenty of alternatives to this trick, including the 4 built-in conditional alternatives for a row when using a named column template.

At a high level, this technique uses the following components:

  1. A hidden column in the query that returns the formatting attributes for a column. I’m going to return the color or padding-left in my examples later in this post.
  2. Edit the Report Attributes > Column Attributes > Column Formatting > HTML Expression of a visible column and use the hidden column to change it’s formatting. This is the same section you apply a date or number format.

Example 1 – Color Code Salary

Query

Report Attributes > Column Attributes for “SAL” > Column Formatting > HTML Expression

Result
salary_color

Example 2 –…

View original post 17 more words

neler var

Oracle bulutta bedava!

Zaten apex.oracle.com adresinden üye olup APEX kullanabiliyorduk. Fakat şimdi Oracle, kullanıcılarına Oracle Cloud ‘da ücretsiz, daima ücretsiz bir alan vaadediyor: Oracle Cloud Free Tier.

Sizin bulunduğunuz ülkeye göre sunulanlar küçük farklar gösterebilir ama bana deneme periyodu süresince kullanmam için 250EUR verildi. Bu “çek” tutarını harcayıp bitirince, ya da 30 gün dolunca deneme süresi sona ermiş oluyor. Bu aşamada dilerseniz ücretli devam ediyorsunuz, dilerseniz “daima ücretsiz sınırlı sürüm” ile devam edebiliyorsunuz.

Oracle ‘ın sürekli ücretsiz olacağını söylediği bu alanda neler yapabiliriz? Küçük ve orta ölçekte bence gayet başarılı işler çıkarılabilir. Bunu dilerseniz bir “ısınma turu” olarak alın, dilerseniz bir göz atayım diyin, ya da daha iyisi startup fikrinizi bu yapı üzerinde modelleyin.

Kabaca; bu alanda bir instance oluşturabilir,

sanal makinanıza ücretli bir Windows Server kurabilir ya da ücretsiz LINUX dağıtımları arasından dilediğiniz bir imajı kurabilir,

ORACLE DB oluşturabilir,

veri tabanınıza SQL Developer ile olduğu gibi, web arayüzünden de erişebilir

uygulama geliştirmek için APEX yükleyebilirsiniz.

Bir sanal makine kurduktan, bu kadar pratik şekilde Oracle veri tabanı ve APEX ‘e sahip olduktan sonra yapabilecekleriniz artık neredeyse sınırsız tabii ki.

Gözden kaçırmamanız gereken ayrıntı şu: Oracle Cloud ‘da oluşturacağınız ücretsiz ve her zaman ücretsiz bu hesabı profesyonel amaçlarla kullanabilirsiniz. Oracle ‘ın bu konuda bir kısıtlaması yok, aksine startup ‘ları teşvik ediyor. Ölçeğiniz büyüdükçe standart ücretsiz paketinizi güçlendirmek, söz gelimi sanal makinenizin CPU ya da belleğini artırmak istediğiniz takdirde ücretsiz paketten çıkmanız gerekecek, hepsi bu. Vakit Buldukça;

  • üyeliğin başlatılması,
  • veri tabanı kurulumu,
  • APEX kurulumu,
  • örnek bir APEX uygulaması hazırlama,
  • sanal makine
  • ve sanal makinemize Oracle ya da Ubuntu Linux kurulumu

konularını detaylarıyla anlatmaya çalışacağım.

Active Directory kullanıcılarını bir tablodan SELECT etmek:

Oracle veri tabanından domain sunucunuza erişip kullanıcıları görme konusunu detaylı örneklerle anlatan sayısız doküman var.

Bu örnekler genel anlamda DBMS_LDAP paketini kullanarak domain sunucunuza nasıl erişeceğinizi, eriştikten sonra nasıl browse edeceğinizi gösteriyor.

Test etmek için domain sunucunuzun adres ve port bilgilerini edinmelisiniz. Tabii bir de username/password.

Ben bu örneklerde tarif edilen yöntemi kendi tablomu doldurmasını sağlayacak şekilde biraz değiştirdim. Bunu yaparken de neredeyse tamamen Billy~Verreynne ‘in https://community.oracle.com/thread/4064849 adresindeki önerilerini kullandım.

Eklediğim bir kaç küçük şey oldu:

  • ldap_host, ldap_user, ldap_passw gibi değişkenleri plain-text göndermek yerine encrypt etmek istedim.
  • bu örnek attribute_name ve attribute_value isimli iki kolonda alt alta sıralıyordu oysa ben isim, email, departman, title, telefon gibi bilgileri de içeren bir tablom olsun, bu tablo ben her sorguladığımda canlı olarak LDAP üzerinden beslensin istiyordum.

Yaptıklarımsa şunlar;

  • önce objelerimi hazırladım.
    • TLDAPATTR için kullandığım kolonları özelleştirebilirsiniz. Ama tabii bu durumda DBMS_LDAP kullandığımız fonksiyonda da uygun değişiklikler yapmamız gerekecek.
CREATE OR REPLACE TYPE tstrings IS TABLE OF VARCHAR2(4000);
 
CREATE OR REPLACE TYPE tldapattr IS object 
(
attribute_name VARCHAR2(50), 
attribute_value VARCHAR2(4000), 
dispname VARCHAR2(255), 
email VARCHAR2(255), 
department VARCHAR2(255), 
memberof VARCHAR2(255), 
manager VARCHAR2(255), 
extension VARCHAR2(255
);
 
CREATE OR REPLACE TYPE tldapattrlist IS TABLE OF tldapattr;
  • sonra type objemde görmek istediğim kolonları besleyecek şekilde değiştirerek fonksiyonumu create ettim.
CREATE OR REPLACE FUNCTION ldapattr (filter VARCHAR2, attributes tstrings DEFAULT NULL) 
RETURN tldapattrlist pipelined AUTHID definer IS
 
ldap_host    VARCHAR2(256);
ldap_port    VARCHAR2(256) := '389';
ldap_user    VARCHAR2(256); 
ldap_passw   VARCHAR2(256);
ldap_base    VARCHAR2(256) := 'OU=buraya_Organization_Unit_bilgisi_yaz,dc=sizin_domain_controlleriniz,dc=muhtemelen_com'; 
LDAP_ATTR    CONSTANT tstrings := NEW tstrings('displayname' ,'mail', 'department', 'memberof', 'manager','telephonenumber');
 
retVal          INTEGER;  
ldapSession     DBMS_LDAP.SESSION;  
attrList        DBMS_LDAP.string_collection;  
valList         DBMS_LDAP.string_collection;  
ldapMessage     DBMS_LDAP.message;  
berElement      DBMS_LDAP.ber_element;  
ldapTimeout     DBMS_LDAP.timeval;  
 
attrName        VARCHAR2(256);  
attrDisplay     VARCHAR2(4000);  
name            VARCHAR2(256);  
attrNum         INTEGER;  
i               INTEGER; 
 
v_dispname     VARCHAR2(255);
v_email        VARCHAR2(255);  
v_department   VARCHAR2(255);
v_memberof     VARCHAR2(255);
v_manager      VARCHAR2(255);
v_extension    VARCHAR2(255);
BEGIN
SELECT 'foo' INTO ldap_host FROM dual;
SELECT 'goo' INTO ldap_user FROM dual;
SELECT 'hoo' INTO ldap_passw FROM dual;
 
pipe ROW(TLDAPATTR('PARAM.<filter>', filter, v_dispname, v_email, v_department, v_memberof, v_manager, v_extension));  
         DBMS_LDAP.USE_EXCEPTION := TRUE;
 
-- create LDAP session  
         ldapSession := DBMS_LDAP.init(hostname => LDAP_HOST, portnum  => LDAP_PORT);  
         retval := DBMS_LDAP.simple_bind_s(ld=> ldapSession,dn=> LDAP_USER,passwd=> LDAP_PASSW);  
 
-- build a distinct ordered list of attributes  
         i := 0;  
         FOR c IN (SELECT DISTINCT column_value AS ATTR FROM TABLE(NVL(attributes,LDAP_ATTR)) ORDER BY 1) LOOP  
                 i := i + 1;  
                 attrList(i) := c.attr;  
                 attrDisplay := attrDisplay || c.attr || ' ';  
         END LOOP;  
pipe ROW(TLDAPATTR('PARAM:<attribute list>', TRIM(attrDisplay), v_dispname, v_email, v_department, v_memberof, v_manager, v_extension));  
 
-- use supplied filter to search  
        ldapTimeout.seconds := 5;  
        ldapTimeout.useconds := 0;
 
        retval := DBMS_LDAP.search_st(
		ld => ldapSession,
		base => ldap_base,
		scope => DBMS_LDAP.SCOPE_SUBTREE,
		filter => filter,
		attrs => attrList,
		attronly => 0,
		tv => ldapTimeout,
		res => ldapMessage);
 
-- is the search successful?  
        retval := DBMS_LDAP.count_entries(ld => ldapSession, msg => ldapMessage);  
        IF retval = 0 THEN  
pipe ROW(TLDAPATTR('Error', 'No matches found for filter ['||filter||'].',v_dispname, v_email, v_department, v_memberof, v_manager, v_extension));  
retVal := DBMS_LDAP.unbind_s(ld => ldapSession);  
RETURN;  
        END IF;  
-- Get all the entries returned by our search.  
        ldapMessage := DBMS_LDAP.first_entry(ld  => ldapSession, msg => ldapMessage);  
 
        WHILE ldapMessage IS NOT NULL  
        LOOP  
-- Get all the attributes for this entry.  
        attrName := DBMS_LDAP.first_attribute(ld => ldapSession, ldapentry => ldapMessage, ber_elem  => berElement);  
--degerleri her defasinda resetle
v_dispname   := NULL;
v_email      := NULL;
v_department := NULL;
v_memberof   := NULL;
v_manager 	 := NULL;
v_extension  := NULL;
-- output a null row for formatting an empty line between records  
                pipe ROW( NULL );  
-- output DN as unique record identifier  
                pipe ROW(TLDAPATTR('distinguishedName', DBMS_LDAP.get_dn(ldapSession, ldapMessage), v_dispname, v_email, v_department, v_memberof, v_manager, v_extension));   
-- now output attribute name-values found for the DN  
attrNum := 1;
		LOOP  
		EXIT WHEN attrName IS NULL;
		EXIT WHEN attrNum > attrList.COUNT;   
-- Get all the values for this attribute.  
		valList := DBMS_LDAP.get_values (ld => ldapSession, ldapentry => ldapMessage, attr => attrName);
			FOR i IN valList.FIRST .. valList.LAST
			LOOP
				IF attrName    = 'displayName' THEN v_dispname := SUBSTR(valList(i),1,200);
				ELSIF attrName = 'mail' THEN v_email := SUBSTR(valList(i),1,200);
				ELSIF attrName = 'department' THEN v_department := SUBSTR(valList(i),1,200);
				ELSIF attrName = 'memberOf' THEN v_memberof := SUBSTR(valList(i),1,200);
				ELSIF attrName = 'manager' THEN v_manager := SUBSTR(valList(i),1,200);
				ELSIF attrName = 'telephoneNumber' THEN v_extension := SUBSTR(valList(i),1,200);
				END IF ;
			END LOOP values_loop;
name := valList.FIRST;  
WHILE name IS NOT NULL LOOP  
pipe ROW(TLDAPATTR(attrName,valList(name),v_dispname, v_email, v_department, v_memberof, v_manager, v_extension));  
name := valList.Next(name);  
END LOOP;  
 
attrName := DBMS_LDAP.next_attribute(ld => ldapSession, ldapentry => ldapMessage, ber_elem  => berElement);
attrNum := attrNum + 1;  
END LOOP;  
 
ldapMessage := DBMS_LDAP.next_entry(ld  => ldapSession, msg => ldapMessage);  
END LOOP;  
 
-- Disconnect from the LDAP server.  
retVal := DBMS_LDAP.unbind_s(ld => ldapSession);  
RETURN;  
END;

bunları yaptıktan sonra şöyle test edebiliyor olmalısınız:

SELECT * 
FROM TABLE(ldapattr(filter => '(&(objectclass=user) (!(useraccountcontrol=514)))'))

514 pasif kullanıcıları dışarıda bırakmak için. Search stringi kendi ihtiyaçlarınıza göre değiştirebilirsiniz. Son olarak datayı derli toplu görmek için bir VIEW oluşturun.

Böylece a/d kullanıcılarınız, bu kullanıcıların bağlı olduğu yöneticiler, departmanları, masa telefonları gibi bilgilere dilediğiniz zaman gerçek zamanlı olarak erişebilirsiniz.

APEX import. Bad Request?

The request could not be understood by server due to malformed syntax.

I needed to export one of my APEX application page to deploy it on another APEX environment.

But it raised this error: BAD REQUEST, malformed syntax.

It’s not self explanatory. Hard to understand what’s wrong at first glance. I checked .sql file to see if there is an ascii character, a non-unicode string and so on.

Better check your application logs

If you see an error like this and have used WIZARD template, perhaps the easiest work-around is: remove wizard region, export again, then import.

Finally!

APEX Page Validation: a global check for special characters

I’ve been struggling with a long form which has tens of text areas on my APEX env.

At some point I needed to apply some restrictions on input fields. Basically to refrain any unwanted non-unicode characters to be inserted into table.

APEX has great Built-in restrictions and they work like a charm. However, it has only a few options. It didn’t help my case when I had to set a restriction to reject all characters but a-Z letters, all the numbers, spaces AND punctuations.

Perhaps there are easier ways to do that. Actually I’m sure there are easier ways to do that. But here is what I ‘ve done and feel free to use & feedback.

DECLARE
l_query VARCHAR2(100);
l_res clob;
v_out clob;
v_special NUMBER;
CURSOR cur_main IS
SELECT item
FROM (
SELECT item_name item 
FROM APEX_APPLICATION_PAGE_ITEMS 
WHERE application_id = :app_id AND page_id = :app_page_id 
AND LOWER(display_as) LIKE '%text%'
);
BEGIN
v_out:= '';
   FOR rec_main IN cur_main LOOP
   l_query := 'select v('''||NVL(rec_main.item, 'null')||''') from dual';
   EXECUTE IMMEDIATE l_query INTO l_res;
   v_out := v_out||l_res;
   END LOOP;
SELECT COUNT(1) 
INTO v_special 
FROM dual 
WHERE regexp_like(REPLACE(v_out, CHR(13)||CHR(10), '_carriegeReturn_'), 
                 '[^a-zA-Z0-9 .,:;?%&+-_]');
   IF v_special >0 THEN
   RETURN FALSE;
   ELSE
   RETURN TRUE;
  END IF;
END;

let’s unwrap it a bit:

  1. cur_main is the cursor where I get all my text-based input fields on the page.
  2. l_query holds my dynamic sql string.
  3. v_out is concatenated string which consists of each item’s value on the screen for current page. note that it won’t work based on the data from session state.
  4. I simply hate being have to use regular expressions. So I copied a simple syntax and modified for my scenario.

Rest are just true/false conditions.

In my case it’s a Page Validation Process. To pass this validation no rows should be returned. Otherwise it will raise the error message.

Cheers!