herkese hayırlı hafta sonları üstadlarım projemde rapor bölümüne chatgpt de hazırladığım scriptin sonuna geldim fakat şu satırdan sonrasını bir türlü yazamadım. chat gpt den kopyala yapıştır da yapılmıyor script saatlerdir bu satırda takıldım kaldım.
Set Field [ Evaluate ( $BaslangicTarihiField ) ; $BaslangicTarihi & "..." & $BitisTarihi ]
Set Field [ Evaluate ( $DurumField ) ; $Durum ] Perform Find
# Bulunan Kayıtları Rapor Tablosuna Taşı Go to Record/Request/Page [ First ] Loop Exit Loop If [ Get ( FoundCount ) = 0 ]
# Yeni Rapor Kaydı Oluştur Go to Layout [ “RaporLayout” (Rapor) ]
New Record/Request Set Field [ Rapor::PartiNo ; Evaluate ( $PartiNoField ) ] Set Field [ Rapor::BaşlamaTarihi ; Evaluate ( $BaslangicTarihiField ) ]
Set Field [ Rapor::BitişTarihi ; Evaluate ( $BitisTarihiField ) ]
Set Field [ Rapor::Müşteri ; Evaluate ( $MusteriField ) ] Set Field [ Rapor::Adet ; Evaluate ( $AdetField ) ]
Set Field [ Rapor::Operasyon ; $Tablo ] # Orijinal Tabloya Dön ve Sonraki Kayda Git Go to Layout [ $Layout ] Go to Record/Request/Page [ Next ; Exit after last ] End Loop