[SQL]do language plpgsql $$
declare
_r record;
_id integer;
BEGIN


for i in 1..10
loop
for _r in (
select min(id) from sr_service where code not in (select "B"  from supp.service_load_tmp_20062017)
and org_id=23427
--and id = 65622
--and is_stomat=true
and to_dt is null
and is_stomat is true
GROUP BY code
HAVING count(*)>1
)
loop
    RAISE NOTICE 'закрываю id=%',_r.id;
    update sr_service set to_dt='31.03.2017' where id=_r.id;
end loop;
end loop;


for _r in (
select * from supp.service_load_tmp_20062017
                    where not exists(select 1 from sr_Service where code="B" and org_id=23427  and to_dt is null)
)
loop
select nextval('sr_service_id_seq') into _id;
    RAISE NOTICE 'новая id=%', _id;
    insert into sr_service(id, code, cul, duration, name, org_id, category_id, duration_unit_id, from_dt, type_id,
is_repeated,is_inherit_protocol, is_expendable_materials, is_actual_cul, is_paraclinical,accounting_id,is_autocopy_diagnoses,is_stomat)
values( "_id", _r."B", _r."E"::numeric(10,2), (_r."D"::numeric(10,2))::integer, _r."C", 23427 , 5, 1, '01.04.2017', 14,
false,false, false, false, false,1,false,true);
end loop;


for _r in (
select * from sr_Service ss
                join supp.service_load_tmp_20062017 tmp on  ss.code=tmp."B"
 where org_id=23427  --and from_dt='01.03.2017'
and ss.to_dt is null
and is_stomat is true
 --and id = 1640071
)
loop
    RAISE NOTICE 'новые параметры для id=%',_r.id;
    update sr_service set from_dt='01.04.2017'
,cul = replace(_r."E",' ', '')::numeric(10,2)
,duration = (replace(_r."D",' ', '')::numeric(10,2))::integer
,name = _r."C" || ' (' ||"_r"."Приложение 8" ||')'
,type_id = 14
,category_id = 5

 where id=_r.id;
end loop;


for _r in (
select * from sr_service where code not in (select "B"  from supp.service_load_tmp_20062017)
and org_id=23427
--and id = 65622
--and is_stomat=true
and to_dt is null
and is_stomat is true
)
loop
    RAISE NOTICE 'закрываю id=%',_r.id;
    update sr_service set to_dt='31.03.2017' where id=_r.id;
end loop;
end $$;

NOTICE:  новые параметры для id=1660237

NOTICE:  новые параметры для id=1650115

NOTICE:  новые параметры для id=1650134

NOTICE:  новые параметры для id=1670951

NOTICE:  новые параметры для id=1670955

NOTICE:  новые параметры для id=1670959

NOTICE:  новые параметры для id=1660190

NOTICE:  новые параметры для id=1660198

NOTICE:  новые параметры для id=1660200

NOTICE:  новые параметры для id=1660196

NOTICE:  новые параметры для id=1660204

NOTICE:  новые параметры для id=1660205

NOTICE:  новые параметры для id=1660210

NOTICE:  новые параметры для id=1660211

NOTICE:  новые параметры для id=1660212

NOTICE:  новые параметры для id=1660215

NOTICE:  новые параметры для id=1660217

NOTICE:  новые параметры для id=1660219

NOTICE:  новые параметры для id=1660222

NOTICE:  новые параметры для id=1660223

NOTICE:  новые параметры для id=1660224

NOTICE:  новые параметры для id=1660225

NOTICE:  новые параметры для id=1660226

NOTICE:  новые параметры для id=1660227

NOTICE:  новые параметры для id=1660213

NOTICE:  новые параметры для id=1660230

NOTICE:  новые параметры для id=1660231

NOTICE:  новые параметры для id=1660241

NOTICE:  новые параметры для id=1660243

NOTICE:  новые параметры для id=1660275

NOTICE:  новые параметры для id=1660276

NOTICE:  новые параметры для id=1660268

NOTICE:  новые параметры для id=1660317

NOTICE:  новые параметры для id=1660315

NOTICE:  новые параметры для id=1650023

NOTICE:  новые параметры для id=1650054

NOTICE:  новые параметры для id=1660195

NOTICE:  новые параметры для id=1660240

NOTICE:  новые параметры для id=1660250

NOTICE:  новые параметры для id=1660258

NOTICE:  новые параметры для id=1660278

NOTICE:  новые параметры для id=1660287

NOTICE:  новые параметры для id=1650091

NOTICE:  новые параметры для id=1650112

NOTICE:  новые параметры для id=1650143

NOTICE:  новые параметры для id=1670952

NOTICE:  новые параметры для id=1670953

NOTICE:  новые параметры для id=1670954

NOTICE:  новые параметры для id=1670956

NOTICE:  новые параметры для id=1670957

NOTICE:  новые параметры для id=1650159

NOTICE:  новые параметры для id=1670958

NOTICE:  новые параметры для id=1660191

NOTICE:  новые параметры для id=1660193

NOTICE:  новые параметры для id=1660197

NOTICE:  новые параметры для id=1660201

NOTICE:  новые параметры для id=1650074

NOTICE:  новые параметры для id=1650094

NOTICE:  новые параметры для id=1650111

NOTICE:  новые параметры для id=1650132

NOTICE:  новые параметры для id=1650147

NOTICE:  новые параметры для id=1660177

NOTICE:  новые параметры для id=1660187

NOTICE:  новые параметры для id=1660192

NOTICE:  новые параметры для id=1660194

NOTICE:  новые параметры для id=1660199

NOTICE:  новые параметры для id=1660202

NOTICE:  новые параметры для id=1660203

NOTICE:  новые параметры для id=1660206

NOTICE:  новые параметры для id=1660207

NOTICE:  новые параметры для id=1660208

NOTICE:  новые параметры для id=1660209

NOTICE:  новые параметры для id=1660214

NOTICE:  новые параметры для id=1660216

NOTICE:  новые параметры для id=1660218

NOTICE:  новые параметры для id=1660220

NOTICE:  новые параметры для id=1660221

NOTICE:  новые параметры для id=1660228

NOTICE:  новые параметры для id=1660229

NOTICE:  новые параметры для id=1660232

NOTICE:  новые параметры для id=1660233

NOTICE:  новые параметры для id=1660234

NOTICE:  новые параметры для id=1660236

NOTICE:  новые параметры для id=1660238

NOTICE:  новые параметры для id=1660242

NOTICE:  новые параметры для id=1660244

NOTICE:  новые параметры для id=1660246

NOTICE:  новые параметры для id=1660247

NOTICE:  новые параметры для id=1660248

NOTICE:  новые параметры для id=1660252

NOTICE:  новые параметры для id=1660253

NOTICE:  новые параметры для id=1660255

NOTICE:  новые параметры для id=1660257

NOTICE:  новые параметры для id=1660259

NOTICE:  новые параметры для id=1660260

NOTICE:  новые параметры для id=1660262

NOTICE:  новые параметры для id=1660264

NOTICE:  новые параметры для id=1660266

NOTICE:  новые параметры для id=1660267

NOTICE:  новые параметры для id=1660280

NOTICE:  новые параметры для id=1660269

NOTICE:  новые параметры для id=1660271

NOTICE:  новые параметры для id=1660273

NOTICE:  новые параметры для id=1660281

NOTICE:  новые параметры для id=1660282

NOTICE:  новые параметры для id=1660283

NOTICE:  новые параметры для id=1660284

NOTICE:  новые параметры для id=1660285

NOTICE:  новые параметры для id=1660286

NOTICE:  новые параметры для id=1660288

NOTICE:  новые параметры для id=1660291

NOTICE:  новые параметры для id=1660292

NOTICE:  новые параметры для id=1660293

NOTICE:  новые параметры для id=1660297

NOTICE:  новые параметры для id=1660298

NOTICE:  новые параметры для id=1660299

NOTICE:  новые параметры для id=1660300

NOTICE:  новые параметры для id=1660301

NOTICE:  новые параметры для id=1660302

NOTICE:  новые параметры для id=1660303

NOTICE:  новые параметры для id=1660305

NOTICE:  новые параметры для id=1660306

NOTICE:  новые параметры для id=1660308

NOTICE:  новые параметры для id=1660310

NOTICE:  новые параметры для id=1660311

NOTICE:  новые параметры для id=1660312

NOTICE:  новые параметры для id=1660313

NOTICE:  новые параметры для id=1660314

NOTICE:  новые параметры для id=1660316

NOTICE:  новые параметры для id=1650053

NOTICE:  новые параметры для id=1650064

NOTICE:  новые параметры для id=1650070

NOTICE:  новые параметры для id=1660307

NOTICE:  новые параметры для id=1660277

Time: 0.620s

Affected rows: 0