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

    global Database.QueryLocator start(Database.BatchableContext bc) {
        query = 'select Id,(select id,IF_Coverage_Target_Asset__c,IF_Coverage_Real_Asset__c,CurrentContract__r.Contract_End_Date__c,CurrentContract__r.Contract_Conclusion_Date__c,Product2.Category4__c,Product2.ServiceCategory__c,Product2.Category3__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);
                    }
                }
            }
        }

        // 实际设备合同时间区间1H(4,9);2H(10,3)
            if (toDayTime.month() >= 4 && toDayTime.month() <= 9) {
                start_dateH1 = Date.newInstance(toDayTime.year(),9,1);
                end_dateH1 = Date.newInstance(toDayTime.year(),9,30);
            }else{
                start_dateH1 = Date.newInstance(toDayTime.year(),3,1);
                end_dateH1 = Date.newInstance(toDayTime.year()+1,3,31);
            }
            for (Account acc1 : Accounts) {
                 Account_Service_Of_Target__c asot = new Account_Service_Of_Target__c();

                // 实际覆盖数（硬）：泌尿科用硬性镜
                Integer mirror_4 = 0;
                // 实际覆盖数（硬）：妇科用硬性镜
                Integer mirror_5 = 0;
                // 实际覆盖数（周边）：光源
                Integer mirror_6 = 0;
                // 实际覆盖数（软）：电子镜
                Integer mirror_7 = 0;
                List<Asset> AssetsReal = new List<Asset>();
                for (Asset ass1 : acc1.Asset_Hospital__r) {
                    // 标记是否覆盖率实际设备
                    if (ass1.CurrentContract__r.Contract_End_Date__c >= start_dateH1 && ass1.CurrentContract__r.Contract_Conclusion_Date__c <= end_dateH1) {
                        ass1.IF_Coverage_Real_Asset__c = '1';
                        AssetsReal.add(ass1);
                    }
                }
                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(acc1.id+'1H');
                        }else{
                            asotOne = asotMap.get(acc1.id+'2H'); 
                        }
                    if (asotOne != null) {
                        asotOne.Finish_Rigid_Mirror_2__c = mirror_4;
                        asotOne.Finish_Rigid_Mirror_3__c = mirror_5;
                        asotOne.Finish_Correlation_Lightsource__c = mirror_6;
                        asotOne.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 = acc1.id;
                    asot1.Finish_Rigid_Mirror_2__c = mirror_4;
                    asot1.Finish_Rigid_Mirror_3__c = mirror_5;
                    asot1.Finish_Correlation_Lightsource__c = mirror_6;
                    asot1.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 += '\nEquipmentRealCoverageBatch 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;
    }
}