22.01.2018 (М) Ф3: СТАНДАРТНАЯ СХЕМА ЗАПОЛНЕНИЯ БАЛАНСОВОЙ ФОРМЫ 3 ОТЧЁТ ОБ ИЗМЕНЕНИЯХ КАПИТАЛА

Материал из Фабиус wiki
Перейти к: навигация, поиск

 строки 3210,3310:  Длюбой  К80,81,83,82,84
строки 3220,3320: Д80,81,83,82,84 Клюбой
 Если положительный ответ на вопрос "Чистую прибыль/убыток брать из формы 2?"
 строка 3211,3311:  Д99  К84
строка 3221,3321: Д84 К99
 строка 3212,3312:  Дначинается на 0  К83,84
строка 3222,3322: Д83,84 Кначинается на 0


// из формы 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_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_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