int DMR_DEMIRBAS_KARTI::GET_RECORD ( int record_id ) { SQL_QUERY select_query ( DB ); select_query.PREPARE_SELECT ( "dmr_demirbaslar ","demirbas_kodu,demirbas_adi,grup_id,muh_hesap_id,alis_tarihi,alis_bedeli," "uretici_firma,marka,model,seri_numarasi,garanti_suresi," "amortisman_orani,amortisman_suresi,yeniden_degerleme_yapilacak_mi,kist_amortisman," "demirbasin_degeri,amortisman_yontemi,personel_id," "grup_id,fatura_id ,bir_amor_hesap_id , " "amor_gider_hesap_id , dmr_satis_kar_hesap_id ,amortisman_ayrilacak_mi,dmr_satis_zarar_hesap_id", "demirbas_id = :demirbas_id" ); select_query.SET_VALUE ( ":demirbas_id" , record_id ); if ( select_query.SELECT() EQ 0 ) { return ADAK_FAIL; } select_query.NEXT(); m_ui->lineedit_demirbas_kodu->setText ( select_query.VALUE(0).toString() ); m_ui->lineedit_demirbas_adi->setText ( select_query.VALUE(1).toString() ); m_ui->searchedit_muh_hesap_kodu->SET_TEXT ( MUH_GET_HESAP_KODU(select_query.VALUE(3).toInt() ) ); m_ui->lineedit_muh_hesap_ismi->setText ( MUH_GET_HESAP_ISMI(select_query.VALUE(3).toInt() ) ); m_ui->adakDate_alis_tarihi->SET_DATE(select_query.VALUE(4).toString() ); m_ui->commaEdit_alis_fiyati->SET_DOUBLE ( select_query.VALUE(5).toDouble() ); m_ui->lineEdit_uretici_firma->setText(select_query.VALUE(6).toString() ); m_ui->lineEdit_marka->setText(select_query.VALUE(7).toString() ); m_ui->lineEdit_model->setText(select_query.VALUE(8).toString() ); m_ui->lineEdit_seri_no->setText(select_query.VALUE(9).toString() ); m_ui->lineedit_garanti_suresi->setText(select_query.VALUE(10).toString() ); m_ui->commaEdit_amortisman_orani->SET_DOUBLE(select_query.VALUE(11).toDouble() ); m_ui->lineedit_amortisman_suresi->setText(select_query.VALUE(12).toString() ); m_ui->checkBox_yeniden_degerleme->setChecked(select_query.VALUE(13).toBool() ); m_ui->checkBox_kist_amortisman->setChecked(select_query.VALUE(14).toBool() ); m_ui->commaEdit_demirbasin_degeri->SET_DOUBLE(select_query.VALUE(15).toDouble() ); m_ui->checkBox_amortisman_ayrilacak_mi->setChecked(QVariant(select_query.VALUE("amortisman_ayrilacak_mi")).toBool()); QList<int> m_grup_idleri; m_grup_id = select_query.VALUE("grup_id").toInt(); m_muh_hesap_id = select_query.VALUE(3).toInt(); m_grup_idleri << select_query.VALUE("grup_id").toInt(); if (m_grup_idleri.isEmpty() EQ false) { m_ui->search_edit_gruplar->SET_TEXT(GRP_GRUP_ADLARINI_BUL(&m_grup_idleri , new QStringList() , new QStringList())); } m_ui->textEdit_rapor_isl_gruplari->setText ( GRP_KAYDIN_GRUPLARINI_BUL ( E9_PROGRAMI , DEMIRBAS_GRUP_MODULU, record_id, &m_rpr_isl_grubu_idler, new QStringList, new QStringList ) ); double birikmis_amortisman_tutari = DMR_GET_BIRIKMIS_AMORTISMAN_TUTARI ( record_id, MALI_YIL_ARRAY_INDIS ( QDate::currentDate())); double net_deger = select_query.VALUE(15).toDouble() - birikmis_amortisman_tutari; m_ui->commaEdit_net_deger->SET_DOUBLE ( net_deger ); m_ui->commaEdit_birikmis_amortisman->SET_DOUBLE ( birikmis_amortisman_tutari ); m_ui->comboBox_amortisman_yontemi->setCurrentIndex ( m_ui->comboBox_amortisman_yontemi->findText ( DMR_GET_AMORTISMAN_SEKLI_STRING(select_query.VALUE("amortisman_yontemi").toInt()))); m_fatura_id = select_query.VALUE("fatura_id").toInt(); m_ui->lineedit_fatura_bilgileri->setText(DMR_GET_FATURA_BILGILERI(m_fatura_id)); m_bir_amor_hesap_id = select_query.VALUE("bir_amor_hesap_id").toInt(); m_amor_gider_hesap_id = select_query.VALUE("amor_gider_hesap_id").toInt(); m_dmr_satis_kar_hesap_id = select_query.VALUE("dmr_satis_kar_hesap_id").toInt(); m_dmr_satis_zarar_hesap_id = select_query.VALUE("dmr_satis_zarar_hesap_id").toInt(); int personel_id = select_query.VALUE(17).toInt(); int cari_hesap_id = PRS_GET_PERSONEL_CARI_HESAP_ID( personel_id ); QString cari_hesap_kodu, cari_hesap_ismi; int result = CARI_GET_HESAP_KODU_ISMI_PARA_BIRIM_ID( cari_hesap_id, &cari_hesap_kodu, &cari_hesap_ismi ); if ( result NE 0 ) { m_ui->searchEdit_personel_adi->SET_TEXT( cari_hesap_kodu ); m_ui->lineEdit_personel_soyadi->setText( cari_hesap_ismi ); m_cari_hesap_id = cari_hesap_id; } QString tam_hesap_kodu,hesap_ismi; MUH_GET_HESAP_KODU_HESAP_ISMI(m_amor_gider_hesap_id , tam_hesap_kodu ,hesap_ismi); m_ui->searchedit_amor_gdr_hesap_kodu->SET_TEXT(tam_hesap_kodu); m_ui->lineEdit_amor_gdr_hesap_ismi->setText(hesap_ismi); MUH_GET_HESAP_KODU_HESAP_ISMI(m_bir_amor_hesap_id , tam_hesap_kodu ,hesap_ismi); m_ui->searchedit_bir_amortisman_hesap_kodu->SET_TEXT(tam_hesap_kodu); m_ui->lineEdit_bir_amortisman_hesap_ismi->setText(hesap_ismi); MUH_GET_HESAP_KODU_HESAP_ISMI(m_dmr_satis_kar_hesap_id , tam_hesap_kodu ,hesap_ismi); m_ui->searchedit_dmr_satis_kar_hesap_kodu->SET_TEXT(tam_hesap_kodu); m_ui->lineEdit_dmr_satis_kar_hesap_ismi->setText(hesap_ismi); MUH_GET_HESAP_KODU_HESAP_ISMI(m_dmr_satis_zarar_hesap_id , tam_hesap_kodu ,hesap_ismi); m_ui->searchedit_dmr_satis_zarar_hesap_kodu->SET_TEXT(tam_hesap_kodu); m_ui->lineEdit_dmr_satis_zarar_hesap_ismi->setText(hesap_ismi); return ADAK_OK; }
void DMR_DEMIRBAS_LISTESI::FILL_YAZDIRILACAK_SATIRLAR_LIST() { double amortisman_tutari_array [ K9_ARRAY_SIZE ]; M_DEMIRBASLAR_ID_LISTESI = GRP_GRUBA_EKLI_KAYITLARI_BUL(K9_PROGRAMI, DEMIRBAS_GRUP_MODULU, M_DMR_RV->grup_id_list ); SQL_QUERY select_query ( DB ); select_query.PREPARE_SELECT("dmr_demirbaslar","demirbas_adi,alis_tarihi,demirbasin_degeri,amortisman_orani," "demirbasin_yeni_degeri,yeni_brkms_amortisman_tutari,amortisman_yontemi," "muh_yili_ayrilacak_amor_tutari,demirbas_id,amortisman_tutari_array,personel_id" , "") ; if (M_DEMIRBASLAR_ID_LISTESI.isEmpty() EQ false) { select_query.AND_MULTI_EKLE("demirbas_id" , select_query.TO_QVARIANT(M_DEMIRBASLAR_ID_LISTESI) , ADAK_OR);; } if ( M_DMR_RV->sube_id > 0 ) { select_query.AND_EKLE("sube_id = :sube_id"); select_query.SET_VALUE(":sube_id" , M_DMR_RV->sube_id ); } if ( M_DMR_RV->bas_dmr_kodu.isEmpty() EQ false ) { select_query.AND_EKLE("demirbas_kodu BETWEEN :bas_dmr_kodu AND :bts_dmr_kodu"); select_query.SET_VALUE(":bas_dmr_kodu" , M_DMR_RV->bas_dmr_kodu); select_query.SET_VALUE(":bts_dmr_kodu" , M_DMR_RV->bts_dmr_kodu); } if ( select_query.SELECT() EQ 0 ) { return; } QStringList YAZDIRILACAK_SATIR; while ( select_query.NEXT() EQ true ) { int demirbas_id = select_query.VALUE(8).toInt(); int demirbas_giris_yili = QDate::fromString ( select_query.VALUE(1).toString(),"yyyy.MM.dd").year(); double demirbasin_degeri = select_query.VALUE(2).toDouble(); // demirbasin degerleme oncesi degerini gosterir m_degerleme_oncesi_demirbas_toplami += demirbasin_degeri; double amortisman_orani = select_query.VALUE(3).toDouble(); double demirbasin_yeni_degeri = select_query.VALUE(4).toDouble(); m_degerleme_sonrasi_demirbas_toplami += demirbasin_yeni_degeri; double birikmis_amortisman_yeni_degeri = select_query.VALUE(5).toDouble(); m_degerleme_sonrasi_birikmis_amortisman_toplami += birikmis_amortisman_yeni_degeri; int amortisman_sekli = select_query.VALUE(6).toInt(); if ( amortisman_sekli EQ AZALAN_BAKIYE ) { amortisman_orani = amortisman_orani * 2; } int personel_id = select_query.VALUE("personel_id").toInt(); int cari_hesap_id = PRS_GET_PERSONEL_CARI_HESAP_ID( personel_id ); QString cari_hesap_kodu, cari_hesap_ismi; CARI_GET_HESAP_KODU_ISMI_PARA_BIRIM_ID( cari_hesap_id, &cari_hesap_kodu, &cari_hesap_ismi ); //Yeniden Degerleme oncesi birikmis amortismanlari,amortisman tutari arrayinin 0.indisinden aliyoruz. UNPACK_DOUBLE_ARRAY ( select_query.VALUE("amortisman_tutari_array").toString(),amortisman_tutari_array,K9_ARRAY_SIZE); double degerleme_oncesi_birikmis_amortisman = amortisman_tutari_array[0]; double degerleme_oncesi_net_deger = demirbasin_degeri - degerleme_oncesi_birikmis_amortisman; m_degerleme_oncesi_net_deger_toplami += degerleme_oncesi_net_deger; double degerleme_sonrasi_net_deger = demirbasin_yeni_degeri - birikmis_amortisman_yeni_degeri; m_degerleme_sonrasi_net_deger_toplami += degerleme_sonrasi_net_deger; //Amortisman tutarini,amortisman tutari arrayinin rapor tarihine denk gelen gun indisinden 0.gunu(devir bakiyesini) cikararak buluruz. double amortisman_tutari = amortisman_tutari_array[MALI_YIL_ARRAY_INDIS(QDate::currentDate() ) ] - degerleme_oncesi_birikmis_amortisman; m_donem_amortisman_toplami += amortisman_tutari; SQL_QUERY sql_query ( DB ); sql_query.PREPARE_SELECT ( "dmr_fisler,dmr_fis_satirlari","degerleme_orani", "demirbas_id = :demirbas_id AND dmr_fisler.fis_id = dmr_fis_satirlari.fis_id " "AND fis_turu = :fis_turu" ); sql_query.SET_VALUE ( ":demirbas_id" , demirbas_id ); sql_query.SET_VALUE ( ":fis_turu" , YENIDEN_DEGERLEME_FISI ); double degerleme_orani = 1.0; if ( sql_query.SELECT() NE 0 ) { sql_query.NEXT(); degerleme_orani = sql_query.VALUE(0).toDouble(); } m_sira_no++; //Birikmis amortisman tutari ,amortisman tutari arrayinin muhasebe yilinin son gunune denk gelen indisinden alinir.(31 Aralik) double birikmis_amortisman_tutari = amortisman_tutari_array [ MALI_YIL_ARRAY_INDIS ( MALI_YIL_FIRST_DATE())]; m_birikmis_amortisman_toplami += birikmis_amortisman_tutari; //Ayrilmamis amortismani gostermek icin muhasebe yili icin ayrilacak toplam amortismandan, ayrilmis amortismani cikaririz. double muhasebe_yili_ayrilacak_toplam_amortisman_tutari = select_query.VALUE(7).toDouble(); double muhasebe_yili_ayrilmamis_amortisman_tutari = muhasebe_yili_ayrilacak_toplam_amortisman_tutari - amortisman_tutari; m_ayrilmamis_amortisman_toplami += muhasebe_yili_ayrilmamis_amortisman_tutari; YAZDIRILACAK_SATIR.clear(); YAZDIRILACAK_SATIR.append(QVariant ( m_sira_no ).toString() + "\t" + select_query.VALUE(0).toString()+ "\t" + QVariant ( demirbas_giris_yili).toString() + "\t" +VIRGUL_EKLE ( QVariant (demirbasin_degeri ).toString(),2,false )+ "\t" + VIRGUL_EKLE ( QVariant ( ROUND(degerleme_oncesi_birikmis_amortisman) ).toString(),2,false )+ "\t" + VIRGUL_EKLE ( QVariant ( ROUND(degerleme_oncesi_net_deger ) ).toString(),2,false )+ "\t % " + VIRGUL_EKLE ( QVariant ( ROUND ( amortisman_orani ) ).toString()) + "\t % " + VIRGUL_EKLE ( QVariant ( ROUND(degerleme_orani ) ).toString() ) + "\t" + VIRGUL_EKLE ( QVariant ( ROUND ( demirbasin_yeni_degeri ) ).toString(),2,false )+ "\t" + VIRGUL_EKLE ( QVariant ( ROUND ( birikmis_amortisman_yeni_degeri ) ).toString(),2,false )+ "\t" + VIRGUL_EKLE ( QVariant ( ROUND ( degerleme_sonrasi_net_deger ) ).toString(),2,false )+ "\t" + VIRGUL_EKLE ( QVariant ( ROUND ( amortisman_tutari ) ).toString(),2,false ) + "\t" + VIRGUL_EKLE ( QVariant ( ROUND ( birikmis_amortisman_tutari ) ).toString(),2,false) + "\t" + VIRGUL_EKLE ( QVariant ( ROUND ( muhasebe_yili_ayrilmamis_amortisman_tutari ) ).toString(),2,false ) + "\t" + cari_hesap_ismi ); M_YAZDIRILACAK_SATIRLAR << YAZDIRILACAK_SATIR; } }