22.01.2018 (М) Ф3: СТАНДАРТНАЯ СХЕМА ЗАПОЛНЕНИЯ БАЛАНСОВОЙ ФОРМЫ 3 ОТЧЁТ ОБ ИЗМЕНЕНИЯХ КАПИТАЛА
строки 3210,3310: Длюбой К80,81,83,82,84 строки 3220,3320: Д80,81,83,82,84 Клюбой
строка 3211: Д99 К84 строка 3212,3312: Дначинается на 0 К83,84 строка 3221: Д84 К99 строка 3222,3322: Д83 Кначинается на 0
gg3_2_inc_84_B:=GetGPRV(,'84',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1) //3210
gg3_2_inc_84_B_1:=GetGPRV('99','84',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1) //3211
gg3_2_inc_84_B_2:=GetGPRV('0','84',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1) //3212 // из формы 2 if gg3_99_from_gf2
pp:=selectSQL('select '+SQLField('C190')+' C190, '+SQLField('L190')+' L190 from DOCS'+Ret_f_ext()+; " where KINDDOC='GF2' and LVLNUM='1' and NUMDOC='"+space(10)+"'", OpDataPath) c843311:=round((pp)->C190/prcsn,0) //для 3311 if !Empty((pp)->L190); gg3_2_inc_84_B_1:=round((pp)->L190/prcsn,0); endif //для 3211 CloseTable(pp)
endif
gg3_2_dec_84_B:=GetGPRV('84',,old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1) //3220
gg3_2_dec_84_B_1:=GetGPRV('84','99',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1) //3221
gg3_2_dec_84_B_2:=GetGPRV('84','0',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1) //3222
gg3_2_div_84_B:=0 //3227 for ii:=1 to len(div_acnts)
gg3_2_div_84_B:=gg3_2_div_84_B+GetGPRV('84',div_acnts[ii],old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)
next
gg3_2_inc_84_E:=GetGPRV(,'84',jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1) //3310 gg3_2_inc_84_E_1:=GetGPRV('99','84',jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1) //3311 gg3_2_inc_84_E_2:=GetGPRV('0','84',jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1) //3312
gg3_2_dec_84_E:=GetGPRV('84',,jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1) //3320 if FactoryId='OTR'
gg3_2_dec_84_E_1:=GetGPRV('84-1',,jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1) //3321 gg3_2_dec_84_E_2:=GetGPRV('84-2',,jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1) //3322
else
gg3_2_dec_84_E_1:=GetGPRV('84','99',jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1) //3321 gg3_2_dec_84_E_2:=GetGPRV('84','0',jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1) //3322
endif
gg3_2_div_84_E:=0 //3327 for ii:=1 to len(div_acnts)
gg3_2_div_84_E:=gg3_2_div_84_E+GetGPRV('84',div_acnts[ii],jan_dt,endyear_dt,DOCS1->DANAL1,'GPRV',1)
next
//Разделы 2,3 if FactoryId!='VLK'
gg3_3_all_before_P:=GetGSLD({'8',,,.t.},old_jan_dt-1,,DOCS1->DANAL1,'PRPRGSLD') //декабрь позапрошлого gg3_3_all_before_B:=GetGSLD({'8',,,.t.},jan_dt-1,,DOCS1->DANAL1,'PREVGSLD') //декабрь прошлого gg3_3_all_after_P:=GetGSLD({'8',,.t.,.t.},old_jan_dt,,DOCS1->DANAL1,'PREVGSLD') //январь прошлого gg3_3_all_after_B:=GetGSLD({'8',,.t.,.t.},jan_dt,,DOCS1->DANAL1,'GSLD') //январь отчётного
gg3_3_all_accpol_I:=0 //18.03.2014 GetGPRV('99','8',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)-GetGPRV('8','99',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1) gg3_3_all_accpol_O:=0 gg3_3_all_err_I:=0 gg3_3_all_err_O:=0
gg3_3_income_before_P:=GetGSLD({'84',,,.t.},old_jan_dt-1,,DOCS1->DANAL1,'PRPRGSLD') //декабрь позапрошлого gg3_3_income_before_B:=GetGSLD({'84',,,.t.},jan_dt-1,,DOCS1->DANAL1,'PREVGSLD') //декабрь прошлого gg3_3_income_after_P:=GetGSLD({'84',,.t.,.t.},old_jan_dt,,DOCS1->DANAL1,'PREVGSLD') //январь прошлого gg3_3_income_after_B:=GetGSLD({'84',,.t.,.t.},jan_dt,,DOCS1->DANAL1,'GSLD') //январь отчётного
gg3_3_income_accpol_I:=GetGPRV('99','84',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)-GetGPRV('84','99',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1) gg3_3_income_accpol_O:=0 gg3_3_income_err_I:=0 gg3_3_income_err_O:=0
gg3_3_item1_before_P:=GetGSLD({'8?',,,.t.},old_jan_dt-1,,DOCS1->DANAL1,'PRPRGSLD') //декабрь позапрошлого gg3_3_item1_before_B:=GetGSLD({'8?',,,.t.},jan_dt-1,,DOCS1->DANAL1,'PREVGSLD') //декабрь прошлого gg3_3_item1_after_P:=GetGSLD({'8?',,.t.,.t.},old_jan_dt,,DOCS1->DANAL1,'PREVGSLD') //январь прошлого gg3_3_item1_after_B:=GetGSLD({'8?',,.t.,.t.},jan_dt,,DOCS1->DANAL1,'GSLD') //январь отчётного
gg3_3_item1_accpol_I:=GetGPRV('99','8?',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)-GetGPRV('8?','99',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1) gg3_3_item1_accpol_O:=0 gg3_3_item1_err_I:=0 gg3_3_item1_err_O:=0
gg3_3_item2_before_P:=GetGSLD({'8?',,,.t.},old_jan_dt-1,,DOCS1->DANAL1,'PRPRGSLD') //декабрь позапрошлого gg3_3_item2_before_B:=GetGSLD({'8?',,,.t.},jan_dt-1,,DOCS1->DANAL1,'PREVGSLD') //декабрь прошлого gg3_3_item2_after_P:=GetGSLD({'8?',,.t.,.t.},old_jan_dt,,DOCS1->DANAL1,'PREVGSLD') //январь прошлого gg3_3_item2_after_B:=GetGSLD({'8?',,.t.,.t.},jan_dt,,DOCS1->DANAL1,'GSLD') //январь отчётного
gg3_3_item2_accpol_I:=GetGPRV('99','8?',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1)-GetGPRV('8?','99',old_jan_dt,jan_dt-1,DOCS1->DANAL1,'PREVGPRV',1) gg3_3_item2_accpol_O:=0 gg3_3_item2_err_I:=0 gg3_3_item2_err_O:=0
endif