global class EquipmentRenewMoleculeBatch implements Database.Batchable<sObject>,Database.Stateful {
    public String query;
    public Date toDayTime = Date.today();
    private BatchIF_Log__c iflog;
    global EquipmentRenewMoleculeBatch() {
        this.query = query;
        iflog = new BatchIF_Log__c();
        iflog.Type__c = 'PushNotification';
        iflog.Log__c  = 'EquipmentRenewMoleculeBatch start\n';
        iflog.ErrorLog__c = '';
        insert iflog;
    }

    global Database.QueryLocator start(Database.BatchableContext bc) {
        // 保有设备不为零件停产
        query+='select Id,(select Id,CurrentContract_F__r.IF_Target_Renew__c,CurrentContract__c,CurrentContract__r.Contract_Conclusion_Date__c,CurrentContract__r.New_Contract_TypeF_Text__c,Product2.ServiceCategory__c,Product2.Category3__c,Product2.Category4__c from Asset_Hospital__r where IF_Parts_production__c != \'1\' ) from Account';
        return Database.getQueryLocator(query);
    }   

    global void execute(Database.BatchableContext BC, list<Account> Accounts) {

        List<Account_Service_Of_Target__c> asots = new List<Account_Service_Of_Target__c>();
        List<Id> accIds = new List<Id>();
        Map<String,Account_Service_Of_Target__c> asotMap = new Map<String,Account_Service_Of_Target__c>();
        for (Account acc1 : Accounts) {
            accIds.add(acc1.id);
        }
        List<Account_Service_Of_Target__c> asotList = [select Id,Account_HP__c,OCSM_Period_half__c from Account_Service_Of_Target__c where Account_HP__c in :accIds];
        if (asotList != null) {
            for (Account_Service_Of_Target__c asot : asotList) {
                for (Id accid : accIds) {
                    if (asot.Account_HP__c == accid) {
                        asotMap.put(accid+asot.OCSM_Period_half__c,asot);
                    }
                }
            }
        }

        for (Account acc : Accounts) {
            Account_Service_Of_Target__c asot = new Account_Service_Of_Target__c();
            List<Asset> AssetsReal = new List<Asset>();
            // 实际续签数（硬）：泌尿科用硬性镜
            Integer mirror_4 = 0;
            // 实际续签数（硬）：妇科用硬性镜
            Integer mirror_5 = 0;
            // 实际续签数（周边）：光源
            Integer mirror_6 = 0;
            // 实际续签数（软）：电子镜
            Integer mirror_7 = 0;
            for ( Asset ass : acc.Asset_Hospital__r ) {
                // 分子
                // 1. 设备关联的合同类型是“续签合同”，且上期合同属于续签目标清单内--回复内容：上期合同续签目标的清单由客户提供
                if (ass.CurrentContract_F__r.IF_Target_Renew__c == '1' && ass.CurrentContract__r.New_Contract_TypeF_Text__c == '续签合同') {
                    // 2. 在2023年3月31日前系统生效完毕：2023年3月31日是2H，1H是指2022年9月30日，
                    if (toDayTime.month() >= 4 && toDayTime.month() <= 9) {
                        if (ass.CurrentContract__r.Contract_Conclusion_Date__c <= Date.newInstance(toDayTime.year(),9,30)) {
                                    // 标记为是否续签实际设备
                            ass.IF_Renewalrate_Real_Asset__c = '1';
                            AssetsReal.add(ass);
                        }
                    }else{
                       if (ass.CurrentContract__r.Contract_Conclusion_Date__c <= Date.newInstance(toDayTime.year()+1,3,31)) {
                            ass.IF_Renewalrate_Real_Asset__c = '1';
                            AssetsReal.add(ass);
                       }
                    }
                }
            }
            if (AssetsReal!=null) {
                    try {
                        update AssetsReal;
                    }
                    catch (Exception e) {
                        iflog.ErrorLog__c += 'ERROR'+'['+'update AssetsReal:'+']'+e.getMessage()+'\n';
                     }
            }
            for (Asset AtoHp: AssetsReal) {
                    if (AtoHp.Product2.Category4__c == '泌尿科用硬性镜') {
                        mirror_4++;
                    }
                    if (AtoHp.Product2.Category4__c == '妇科用硬性镜') {
                        mirror_5++;
                    }
                    if (AtoHp.Product2.Category3__c == '光源') {
                        mirror_6++;
                    }
                    if (AtoHp.Product2.ServiceCategory__c =='软性镜') {
                        mirror_7++;
                    }
            }
            if (asotMap != null) {
                Account_Service_Of_Target__c asotOne = new Account_Service_Of_Target__c();
                if (toDayTime.month() >= 4 && toDayTime.month() <= 9) {
                    asotOne = asotMap.get(acc.id+'1H');
                }else{
                    asotOne = asotMap.get(acc.id+'2H'); 
                }
                if (asotOne != null) {
                    asotOne.Renew_Finish_Rigid_Mirror_2__c = mirror_4;
                    asotOne.Renew_Finish_Rigid_Mirror_3__c = mirror_5;
                    asotOne.Renew_Finish_Correlation_Lightsource__c = mirror_6;
                    asotOne.Renew_Finish_Rigid_Mirror_1__c = mirror_7;
                    asots.add(asotOne);
                }  
            }
            if (asotList.isEmpty()) {
                Account_Service_Of_Target__c asot1 = new Account_Service_Of_Target__c();
                asot1.Account_HP__c = acc.id;
                asot1.Renew_Finish_Rigid_Mirror_2__c = mirror_4;
                asot1.Renew_Finish_Rigid_Mirror_3__c = mirror_5;
                asot1.Renew_Finish_Correlation_Lightsource__c = mirror_6;
                asot1.Renew_Finish_Rigid_Mirror_1__c = mirror_7;
                if (toDayTime.year()<=2029 && toDayTime.year()>=2023) {
                    asot1.OCSM_Period__c =  'FY'+toDayTime.year();
                    if (toDayTime.month() >= 4 && toDayTime.month() <= 9) {
                        asot1.OCSM_Period_half__c =  '1H';
                    }else{
                        asot1.OCSM_Period_half__c =  '2H';
                    } 
                }
                asots.add(asot1);
            }
        }
        if (asots!=null) {
                try {
                    UpSert asots;
                }
                catch (Exception e) {
                    iflog.ErrorLog__c += 'ERROR'+'['+'UpSert asots:'+']'+e.getMessage()+'\n';
                }  
        } 
    }

    global void finish(Database.BatchableContext BC) {
        iflog.Log__c += '\nEquipmentRenewMoleculeBatch end';
        String tmp = iflog.ErrorLog__c;
        if (tmp.length() > 65000) {
            tmp = tmp.substring(0, 65000);
            tmp += ' ...have more lines...';
            iflog.ErrorLog__c = tmp;
        }
        update iflog;
    }
}