#MODE PRECOMPILE
#MODE EXECUTE
#MODE CONVERT TO {STANDARDSQL | FIREBIRD | POSTGRESQL | CSHARPORM} [STRICT]

STRICT yalnız o yönergenin parçasıdır: yazılmayan bir #MODE CONVERT TO <hedef> onu kaldırır; #MODE EXECUTE ve #MODE PRECOMPILE de kaldırır.

CONVERT TO kipi, aynı SQL'i başka bir motora taşımanın yoludur. Örnek:

#mode convert to postgresql

execute block
as
  i integer;
begin
  i = 5;
  i = i + 1;
end;

çıktısı:

do
$execute_block$
<<v_>>
declare
  i integer;
begin
  v_.i = 5;
  v_.i = v_.i + 1;
end
$execute_block$
;

NET.HttpServerRequest / NET.HttpServerResponse — uç yordamının imzası

Bir ENDPOINT (bkz. ENDPOINT — HTTP uçları) CONTENT RAW kipinde function f(request NET.HttpServerRequest) returns NET.HttpServerResponse ya da procedure p(request NET.HttpServerRequest) returns (response NET.HttpServerResponse) imzalı bir yordamı çağırır.

NET.Cache — bitiş zamanlı anahtar / değer önbelleği

Dış servis köprülerinin süreç belleğinde tuttuğu şeylerin motor karşılığı (ajanın işçileri ayrı süreçlerdir, istekler arası paylaşılan bellek yoktur): oturum anahtarı önbelleği, tek kullanımlık değer (OAuth state → kod), iş anahtarına göre sayaç. Sistem tablosu ivd$net_cache; yazımlar otonomdur (çağıranın işlemi geri alınsa da kalır), süresi dolan satırlar yazımda silinir. Değer metindir (JSON dâhil).

Depo tek bağlantılı olan veritabanında (sqlite) otonom yazım, oturumun kendi işlemi geri alınırsa onunla birlikte gider: depodaki iç işlemin bir sahibi vardır, öteki işlemler onun içinde kayıt noktasıdır. Yordamdan Put çağıran bir msql oturumu sonunda COMMIT verir; uç yordamları zaten işlemci tarafından commit edilir.

tok = NET.Cache.Get('GibAuthToken_' || kullanici);
if (tok is null) then
begin
  tok = json_value(NET.Http.PostJson(url, json_object('username', kullanici, 'password', parola)).body, '$.token');
  NET.Cache.Put('GibAuthToken_' || kullanici, tok, 19800);          --// 5,5 saat
end
if (NET.Cache.Increment('RateLimit_' || vkn || '_' || saat, kalanSaniye) > 8) then
  return NET.HttpServerResponse.Json(json_object('isSuccess', false, 'errorMessage', 'saatlik sınır'), 429);

NET servis ve işlem tanımları — ivd$net_service / ivd$net_operation ve NET.Http.Invoke

Bir dış HTTP servisi kodla değil satırla tanımlanır: sys.ivd$net_service servisi (taban URL ya da credential'ın BASEURL etiketi, giriş biçimi, giriş şablonları, belirteç yolu ve süresi, varsayılan başlıklar, zaman aşımı), sys.ivd$net_operation her işlemi (yöntem, yol ve sorgu şablonu, gövde kipi ve şablonu, yanıt kipi, Accept) tutar. Şablonlardaki {ad} yer tutucuları çağrı parametrelerinden (JSON nesnesi) doldurulur: yol ve sorgu değerleri yüzde kodlanır, JSON şablonunda dizge kaçışlanır, sayı ve mantıksal olduğu gibi yazılır, eksik ya da NULL alan boş kalır.

insert into sys.ivd$net_service (ivd$service_name, ivd$credential_name, ivd$auth_kind, ivd$auth_path, ivd$auth_headers,
  ivd$auth_body, ivd$auth_ok_path, ivd$auth_ok_value, ivd$token_path, ivd$token_ttl_sec)
  values ('GIB_EBELGE', 'gib_ebelge', 'JSON_LOGIN', 'auth/login', '{"username": "{credential:gib_ebelge.identity}"}',
          '{"username": "{username}", "password": "{password}"}', '$.authenticationStatus', 'AUTHENTICATED', '$.token', 19800);
insert into sys.ivd$net_operation (ivd$service_name, ivd$operation_name, ivd$http_method, ivd$path, ivd$body_kind, ivd$accept)
  values ('GIB_EBELGE', 'invoice_list', 'POST', 'other/earsiv/adimaDuzenlenen', 'PARAM', 'application/json');

resp = NET.Http.Invoke('GIB_EBELGE', 'invoice_list', json_object('username', kullanici, 'password', parola, 'body', istekGovdesi));
if (resp.status = 401) then NET.Http.InvalidateServiceToken('GIB_EBELGE', json_object('username', kullanici));

10.5.1 ENDPOINT — HTTP uçları (REST işlemcisi)

ENDPOINT bir HTTP yöntemi ve yolunu bir PSQL yordamına bağlayan katalog nesnesidir. Ajanın (ve dağıtım sunucusunun) REST işlemcisi, conf'ta verilen veritabanının uçlarını kataloğundan okur ve istek geldiğinde yordamı çağırır; uç COMMIT anında yayındadır, hizmet yeniden başlatılmaz. Nesne her zaman IVEDI_ONLY'dir, hedef yordam bağımlılık olarak yazılır (DROP PROCEDURE RESTRICT'te reddedilir, CASCADE ucu da düşürür).

create or alter endpoint app.turmob_values
  method POST path '/turmob/values'               --// aynı yol için yöntem başına bir nesne
  host '*'                                        --// sanal konak süzgeci (öndeğer '*')
  anonymous                                       --// | login (Basic, MASTER login'i + EXECUTE hakkı) | role <rol> (MASTER rolü)
  allow from ('212.133.164.87', '10.0.0.0/8')     --// IPv4, IPv4/CIDR, IPv6; uymayan 403
  rate limit 120 per minute by ip                 --// aşan 429 + Retry-After; RATE LIMIT NONE kaldırır
  content raw                                     --// raw: HttpServerRequest -> HttpServerResponse | dataset: FASTAPI biçimi
  as call app.nws_turmob.values_endpoint
  attributes ("doc.summary" = 'TÜRMOB mükellef bilgisi');
commit;

grant execute on app.turmob_values to app_role;   --// LOGIN kipi için

• CONTENT RAW: yordam NET.HttpServerRequest alır, NET.HttpServerResponse döndürür; yanıt olduğu gibi yazılır (eski istemci sözleşmeleri — ham JSON dizisi, HTML, base64 PDF, SOAP — böyle korunur).
• CONTENT DATASET: yordamın skaler parametreleri istek gövdesindeki JSON nesnesinden ve sorgu parametrelerinden adla bağlanır; sonuç kümesi (yordam) ya da tek değer (işlev, kolon VALUE) {"result": true, "metadata": {…}, "dataset": [[…]]} biçiminde döner (/crud/fastapi ile aynı; gövdede "metadata": false / "dataValueOnly": false seçenekleri).
• Kimlik: ANONYMOUS kimliksiz koşar; LOGIN HTTP Basic ister, login motora itilir ve ucun EXECUTE hakkı aranır (sahip, SYSDBA, SYSADMIN ya da GRANT EXECUTE); ROLE rol Basic ve MASTER'daki rol üyeliğini ister. Kimliksiz / yanlış parola 401, haksız 403. Authorization: Basic değeri işlemcide kalır, yordama ulaşmaz; başka bir şema (Bearer <jwt>) ANONYMOUS uçta yordama gelir (request.Header('Authorization')), yordam onu NET.Http.JwtVerify ile kendisi doğrular.
• Hata: yordamın yakalanmayan istisnası 500 ve genel bir ileti verir, ayrıntı ajanın günlüğündedir; bilinmeyen yol 404, yolu bilinen ama yöntemi başka istek 405 (Allow başlığıyla).
• Katalog: IVD$V_ENDPOINTS görünümü (yöntem, yol, konak, kimlik kipi, rol, izinli adresler, sınır, içerik kipi, hedef, TARGET_ID, kaynak metin, doc.summary); seviye 4 paketiyle taşınır (UPGRADE LEVEL kod nesnesi gibi kaynağından kurar; hedef ad veritabanı adsız saklanır, paket başka adlı veritabanına da kurulur). Seviye 4 paketi, ürün domain'leriyle (ft*) tanımlı seviye 4 tablosunun domain satırlarını ad çözümlemesi için taşır; EKLENTI şemasındaki paket derlendiği andaki arama yoluyla (NETSIM görünümleri) yeniden derlenir.
• Yönetim: ajanın "WS Uç Noktaları" sayfasının "Motor uçları" sekmesi listeler ve test isteği gönderir.

10.5.2 IVEDI_ONLY nesneler

ATTRIBUTES (IVEDI_ONLY = TRUE) ile yaratılan yordam, işlev, tetikleyici, görünüm, paket ve nesne tipi yalnız IVEDI kataloğunda yaşar ve yalnız IVEDI motoru tarafından kullanılır:

• depoya DDL'i inmez: Firebird / PostgreSQL / ODBC veritabanında fiziksel karşılığı yoktur;
• metin çevriminde (#MODE CONVERT TO …, STRICT dâhil) onu yaratan, değiştiren, düşüren, yorumlayan ya da ona hak veren deyimler ve ona başvuran üst düzey deyimler (EXECUTE PROCEDURE, SELECT, INSERT …) hiç yazılmaz;
• EXECUTION STORAGE veritabanında da motor çalıştırır: çağrı depoya devredilmez; IVEDI_ONLY tetikleyici, satırı IVEDI yazdığında tetiklenir (depoya doğrudan bağlanan istemcide tetiklenmez);
• VERIFY LEVEL onu doğrulamaz, sayısını bir NOT satırında bildirir.

create function kdv_orani(tarih date) returns numeric(5,2) attributes (ivedi_only = true) as
begin
  return 20;
end;

create procedure fiyat_hesapla(tutar numeric(18,2)) returns (sonuc numeric(18,2))
  attributes (ivedi_only = true) as
begin
  sonuc = tutar * (1 + kdv_orani(current_date) / 100);
  suspend;
end;

create view v_ozet (id, toplam) attributes (ivedi_only = true) as select id, tutar from siparis;

create trigger siparis_iz for siparis after insert attributes (ivedi_only = true) as
begin
  insert into siparis_log (id) values (new.id);
end;

create package yardimci attributes (ivedi_only = true) as
  function kisalt(s varchar(100)) returns varchar(20);
end;

Yazım yeri: yordam ve işlevde parametre ve RETURNS'ten sonra, görünümde AS'tan önce, tetikleyicide olaydan sonra, paket ve nesne tipinde addan sonra. Nitelik öznitelik tablosunda değil, nesnenin tip bayrağında (IVD$TYPE_FLAGS, 0x00200000) tutulur. Bir paketin ya da tipin üyeleri ve bir görünümün tetikleyicileri sahibinin niteliğini taşır.

Kurallar (derlemede denetlenir, reddedilen nesne kataloğa girmez):

• Tablo, domain, istisna, dizi, harmanlama, kolon ve parametre IVEDI_ONLY olamaz; bunlar her zaman depoya gider (IVEDI_ONLY_NOT_ALLOWED, SQLSTATE 0A000).
• IVEDI_ONLY olmayan bir nesne IVEDI_ONLY bir nesneye başvuramaz, çünkü depoda ve çevrilmiş metinde o nesne yoktur (IVEDI_ONLY_REFERENCE, SQLSTATE 0A000). Ona başvuran nesne de IVEDI_ONLY yapılır.
• Nitelik SET ATTRIBUTES ile açılıp kapatılamaz; yeniden tanımda (CREATE OR ALTER, ALTER … AS) ATTRIBUTES (IVEDI_ONLY = TRUE) yeniden yazılır. Nesnenin nerede yaşadığını değiştirmek için nesne düşürülüp yeniden yaratılır.

set term ^ ;
create procedure p1(x integer) returns (n integer) as begin n = x + 1; suspend; end^
set term ; ^

10.5.3 Karşılığı olmayan deyimler

Bir deyimin hedef lehçede karşılığı yoksa sessizce düşmez: yerine, nedenini söyleyen bir yorum üretilir (STRICT ile hata). Böylece çevrilmiş betiği okuyan kişi neyin taşınmadığını görür. Aşağıdaki tablo, PostgreSQL hedefinin ne yaptığını özetler.