Halaman utama Jelajahi Bantuan
Masuk
bn
/
se
2
0
Fork 0
Berkas Masalah 0 Permintaan Tarik 0 Wiki
Pohon: 8b7df66d96
Ranting Tag
se
/
SE
/
KSIEG_DOKUMENTY_ZASOB1182_SUBIEKT_MSSQL_IMPORT.php

KSIEG_DOKUMENTY_ZASOB1182_SUBIEKT_MSSQL_IMPORT.php 32 KB
Riwayat Mentahan

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868 
  1. <html>
    2. 

  2. 

  3. <head>
    4. 

  4. <style type="text/css">
    5. 

  5. 

  6. element {
    7. 

  7. }
    8. 

  8. 

  9. element1 {
    10. 

  10. }
    11. 

  11. 

  12. </style>
    13. 

  13. </head>
    14. 

  14. </html><?php
    15. 

  15. 

  16. //Plan dzialania - skrypt KSIEG_DOKUMENTY_ZASOB1182_SUBIEKT_MSSQL_IMPORT.php
    17. 

  17. // I - import z subiekta - koszty
    18. 

  18. //1. Import z SUBIEKTA do FAKTUR wszelkich faktur kosztowych -> ID_PROJECT
    19. 

  19. //
    20. 

  20. //2. Import z Subiekta do FAKTUR wszelkich wielkosci amortyzacji -> ID_PROJECT (inwestycje)
    21. 

  21. //3. Import z Subiekta do FAKTUR wszelkich wielkosci nakladow -> ID_PROJECT - (wielkosci nadane na konta 0-80)
    22. 

  22. // II - analiza sprzedazy
    23. 

  23. //1. Nalezy w SERVICES dac znacznik ID_PROJECT i powiazac jego nadawanie z identyfikacja typu zasobu mieszkaniowego
    24. 

  24. // III - do wdrozenia w "http://se.dev.webone.pl/budynki.php?ANALIZA_HISTORII_USERS2=1"
    25. 

  25. //(1). Nalezy importowac sprzedaz do analizy czynnikow w innych skryptach ( analiza )
    26. 

  26. //(2). Nalezy w systemach analizowac parametry wspolczynniki 
    27. 

  27. //(3). HP-HC/ID_PROJECT ( Podlaczeni do Zasiegu sieci) - na podstawie telboxes--U2_marketing - TARGET HANDLOWY/
    28. 

  28. //(4). Naklady/HC (Naklady do ilosci abonentow) - TARGET INWESTYCJI
    29. 

  29. //(5). Naklady/Suma calkowitej sprzedazy  + suma aktualnych kontraktow (wartosci podpisane)/ID_PROJECT - TARGET HANDLOWY
    30. 

  30. //(6). Wydatki calego marketingu - Pracownicy, reklamy, (sprawy podlegle pod marketing) (minus) Cala wartosc nowej sprzedazy * wspolczynnik , jezeli wiecej niz 3000 PLN, to jest to premia dla dzialu marketingowego TARGET HANDLOWY  
    31. 

  31. 

  32. 

  33. 

  34. 

  35. if ($_FILES["file1182"]["error"] > 0)
    36. 

  36.   {
    37. 

  37.   echo "Error: " . $_FILES["file1182"]["error"] . "<br />";
    38. 

  38.   print_r($_FILES);
    39. 

  39.   }
    40. 

  40. else if(isset($_FILES["file1182"]["name"]))
    41. 

  41.   {
    42. 

  42.   echo "Upload: " . $_FILES["file1182"]["name"] . "<br />";
    43. 

  43.   echo "Type: " . $_FILES["file1182"]["type"] . "<br />";
    44. 

  44.   echo "Size: " . ($_FILES["file1182"]["size"] / 1024) . " Kb<br />";
    45. 

  45.   echo "Stored in: " . $_FILES["file1182"]["tmp_name"];
    46. 

  46. 

  47. 

  48. /*
    49. 

  49. 		//$ourFileName = "testFile.txt";
    50. 

  50. 		$fh = fopen($_FILES["file1182"]["tmp_name"], 'r') or die("Can't open file");
    51. 

  51. 		$theData = fread($fh, filesize($_FILES["file1182"]["tmp_name"]));
    52. 

  52. 		fclose($fh);
    53. 

  53. 		echo "<br>the data is<br>\n";
    54. 

  54. 		//echo $theData;
    55. 

  55. 		echo "<br>the data was<br>\n";
    56. 

  56. 		fclose($fh);
    57. 

  57. */		
    58. 

  58. 		 $xml = simplexml_load_file($_FILES["file1182"]["tmp_name"]);
    59. 

  59. 		 
    60. 

  60. 		 //tutaj kasujemy stare importy
    61. 

  61. 		 if(isset($xml)) {
    62. 

  62. 		 $ZAP_SQL="delete from KSIEG_DOKUMENTY where 
    63. 

  63. 		 	unix_timestamp(DATA_DOK)>unix_timestamp('".$_REQUEST['START_ROK']."-".$_REQUEST['START_MIESIAC']."-".$_REQUEST['START_DZIEN']."') and
    64. 

  64. 		 	unix_timestamp(DATA_DOK)<unix_timestamp('".$_REQUEST['KONIEC_ROK']."-".$_REQUEST['KONIEC_MIESIAC']."-".$_REQUEST['KONIEC_DZIEN']."') 
    65. 

  65. 		 	and TYP_DOKUMENTU='IMPORT' ;
    66. 

  66. 		 	";
    67. 

  67. 		 	include(".config.php");
    68. 

  68. 		//	ZAP_SQL('select 1+1');
    69. 

  69. 

  70. 		 	ZAP_SQL($ZAP_SQL);
    71. 

  71. 		 	echo "<br>".$ZAP_SQL;
    72. 

  72. 

  73. //			print_r($_SESSION);
    74. 

  74. 		 
    75. 

  75. 		 }
    76. 

  76. 		 
    77. 

  77. echo "<pre>";
    78. 

  78. //	    var_dump($xml);
    79. 

  79. //	    print_r($xml->FormattedReport->FormattedAreaPair->FormattedAreaPair->FormattedArea);
    80. 

  80. //		foreach($xml->FormattedReport->FormattedAreaPair->FormattedAreaPair->FormattedArea as $A => $V ) {
    81. 

  81. 

  82.  echo "<table border=1>";
    83. 

  83. 

  84.  echo "<tr><td>Konto:</td><td>Opis Konta</td><td>BO Wn</td><td> BO Ma</td><td> Obroty Wn </td><td>Obroty Ma </td><td>Obroty NWn </td><td>Obroty NMa</td><td>
    85. 

  85.   Saldo Wn </td><td>Saldo Ma</td></tr>"; 
    86. 

  86.   
    87. 

  87.   
    88. 

  88. 	foreach($xml->FormattedAreaPair->FormattedAreaPair as $A2 => $V2) {
    89. 

  89. 

  90. //	    echo "<tr><td>A1:".$A1." </td></tr>\n";
    91. 

  91. 	  
    92. 

  92. 		foreach($V2->FormattedArea->FormattedSections->FormattedSection->FormattedReportObjects->FormattedReportObject as $A => $V ) {
    93. 

  93. //		echo "###1 A:".$A." \n V: ".$V->ObjectName."\n";
    94. 

  94. //		echo "A:".$A." \n V: ".$V->FormattedValue."\n";
    95. 

  95. //		echo "A:".$A." \n V: ".$V->Value."\n";
    96. 

  96. 		//print_r($V);		
    97. 

  97. 		$INDNAME=(string)$V->ObjectName;
    98. 

  98. 		$KDI[$INDNAME]=$V->Value;		
    99. 

  99. 		}
    100. 

  100. 		
    101. 

  101. 	//	print_r($KD);
    102. 

  102. 	echo "<tr><td>".$KDI['z1f1']."</td><td>".$KDI['Field2']."</td><td>".$KDI['Field3']."</td><td>".$KDI['Field4']."</td>
    103. 

  103. 	<td>".$KDI['Field5']."</td><td>".$KDI['Field6']."</td><td>".$KDI['Field7']."</td><td>".$KDI['Field8']."</td><td>
    104. 

  104.   ".$KDI['Field9']."</td><td>".$KDI['Field10']."</td></tr>"; 
    105. 

  105. 

  106. 		unset($KD);
    107. 

  107. 		foreach($V2->FormattedAreaPair as $A3 => $V3) {
    108. 

  108. 			foreach($V3->FormattedArea->FormattedSections->FormattedSection->FormattedReportObjects->FormattedReportObject as $A => $V ) {
    109. 

  109. ///			echo " ###2 A:".$A." \n V: ".$V->ObjectName."\n";
    110. 

  110. //			echo "A:".$A." \n V: ".$V->FormattedValue."\n";
    111. 

  111. ///			echo " A:".$A." \n V: ".$V->Value."\n";
    112. 

  112. 			//print_r($V);		
    113. 

  113. 			$INDNAME=(string)$V->ObjectName;
    114. 

  114. 			$KD[$INDNAME]=$V->Value;	
    115. 

  115. 			
    116. 

  116. 			}
    117. 

  117. 			echo "<tr><td>".$KD['Field44']."</td><td>".$KD['Field45']."</td><td>".$KD['Field46']."</td><td>".$KD['Field47']."</td>
    118. 

  118. 			<td>".$KD['Field48']."</td><td>".$KD['Field49']."</td><td>".$KD['Field50']."</td><td>"."</td><td>
    119. 

  119. 		  "."</td><td>"."</td></tr>"; 
    120. 

  120. 		//print_r($KD);
    121. 

  121. 

  122. 			if(($KD['Field44']<>'BO-1')||(!isset($_REQUEST['IGNORE_BO']))) {
    123. 

  123. 			
    124. 

  124. 						if(strlen($KD['Field46'])>strlen($KD['Field47'])) { 
    125. 

  125. 							//echo "<br>\n WINIEN"; 
    126. 

  126. 								 $WINIEN_MA='WINIEN'; 
    127. 

  127. 								$KWOTA=$KD['Field46'];
    128. 

  128. 							} else {
    129. 

  129. 								$WINIEN_MA='MA'; 
    130. 

  130. 								$KWOTA=$KD['Field47'];
    131. 

  131. 							}
    132. 

  132. 				$ZAP_SQL="insert into KSIEG_DOKUMENTY (A_RECORD_CREATE_DATE,A_RECORD_CREATE_AUTHOR, DATA_DOK, NUMER_DOK , SPRZEDAWCA , 
    133. 

  133. 						ID_SPRZEDAWCA , ILOSC , CENA_JEDN_NETTO , STAWKA_VAT , wartosc , CZY_URZADZENIE , TYP_DOKUMENTU, ID_PROJECT, 							ID_BUDZET,A_STATUS,KONTO_KSIEG , WINIEN_MA) values ( 
    134. 

  134. 						now() , '".$_SESSION['AUTHORIZE_USER']."' , 
    135. 

  135. 						'".$KD['Field45']."','".$KD['Field44']."--".$KD['Field48']."',
    136. 

  136. 						'SPRZEDAWCA','ID_SPRZEDAWCA','1','".$KWOTA."','0','".$KWOTA."','NOT_DEVICE',
    137. 

  137. 						'IMPORT','ID_PROJECT','ID_BUDZET','NORMAL','".$KDI['z1f1']."', '".$WINIEN_MA."')";
    138. 

  138. 					//	echo "<br>\n".$ZAP_SQL;
    139. 

  139. 				ZAP_SQL($ZAP_SQL);
    140. 

  140. 				//die();
    141. 

  141. 			}
    142. 

  142. 		unset($KD);
    143. 

  143. 

  144. 		}
    145. 

  145. 

  146. 			
    147. 

  147. 

  148. 	}
    149. 

  149. 

  150. //foreach($xml->FormattedAreaPair as $a=>$b) {
    151. 

  151. //    echo $a,'="',$b,"\"\n";
    152. 

  152. //}
    153. 

  153. 

  154. 

  155. echo "</pre>";
    156. 

  156. 

  157.   }
    158. 

  158. 

  159. //print_r($_FILES);
    160. 

  160. 

  161. //phpinfo();
    162. 

  162. 

  163. 

  164. SEF('TRIM_ZERO');
    165. 

  165. 

  166. 

  167. if($_REQUEST['UPDATE_MAPA_DEKRETOW']) {
    168. 

  168. 

  169. //	$ZAP_SQL="update KSIEG_DOKUMENTY set ID_BUDZET='39-INWESTYCJE' where 
    170. 

  170. //		 and TYP_DOKUMENTU='IMPORT'  ";	
    171. 

  171.     ZAP_SQL('select 1+1;');
    172. 

  172. 	$ZAP_SQL="select * from KSIEG_DOKUMENTY where TYP_DOKUMENTU='IMPORT'
    173. 

  173.          and (	  KONTO_KSIEG like 'XXXX011-%' or
    174. 

  174. 		  KONTO_KSIEG like '071-%' or
    175. 

  175. 		  KONTO_KSIEG like '080-%' or
    176. 

  176.   		  KONTO_KSIEG like 'XXXX138-%' or
    177. 

  177.   		  KONTO_KSIEG like 'XXXX139-%' or
    178. 

  178. 		  KONTO_KSIEG like '2%-%' or
    179. 

  179. 		  KONTO_KSIEG like '310-%' or
    180. 

  180. 

  181. 		  KONTO_KSIEG like 'XXXX202-%' or
    182. 

  182. 		  KONTO_KSIEG like 'XXXX220-%' or
    183. 

  183. 		  KONTO_KSIEG like 'XXXX221-%' or
    184. 

  184. 		  KONTO_KSIEG like 'XXXX230-%' or		  
    185. 

  185. 		  KONTO_KSIEG like '750-%' or	
    186. 

  186. 		  KONTO_KSIEG like '751-%' or	
    187. 

  187. 		  KONTO_KSIEG like '761-%' or	
    188. 

  188. 		  KONTO_KSIEG like '703-%' or		 
    189. 

  189. 	  
    190. 

  190. 	  
    191. 

  191. 		  KONTO_KSIEG like '4%-%'  )	; ";
    192. 

  192. 	   $r=mysql_query($ZAP_SQL) or die('Error z zap_sql'.$ZAP_SQL);
    193. 

  193. 		echo "<pre>";
    194. 

  194. 	   while($h=mysql_fetch_array($r)) {
    195. 

  195. 	   		echo "\n";
    196. 

  196. 			echo "/".$h['ID'];
    197. 

  197. 			echo "/".$h['DATA_DOK'];	
    198. 

  198. 			echo "/".$h['KONTO_KSIEG'];	
    199. 

  199. 			echo "/".$h['ID_PROJECT'];	
    200. 

  200. 			echo "/".$h['BUDZET'];	
    201. 

  201. 			echo "/".$h['ID_BUDZET'];	
    202. 

  202. 			
    203. 

  203. 			if(isset($t)) unset($t);
    204. 

  204. 

  205. 				//preg_match_all("/^([[:digit:]]{2,5}-/", $h['KONTO_KSIEG'], $matches, PREG_SET_ORDER);   
    206. 

  206. 				$m=explode('-',$h['KONTO_KSIEG']);
    207. 

  207. 				$m[0]=TRIM_ZERO($m[0]);
    208. 

  208. 				$m[1]=TRIM_ZERO($m[1]);
    209. 

  209. 

  210. 					if(($m[0]>=310)&&($m[0]<=310)) { //konta 4xx
    211. 

  211. 				//	$t['ID_BUDZET']=TRIM_ZERO($m[2]);
    212. 

  212. 				//	$t['ID_PROJECT']=TRIM_ZERO($m[3]);
    213. 

  213. 					$t['KONTO_SYN']=$m[0];
    214. 

  214. 

  215. 

  216. 

  217. 				} else if(($m[0]>=400)&&($m[0]<=499)) { //konta 4xx
    218. 

  218. 

  219. 				    if($m[3]=="0000")$m[3]=$m[2];
    220. 

  220. 					$t['ID_BUDZET']=TRIM_ZERO($m[2]);
    221. 

  221. 					$t['ID_PROJECT']=TRIM_ZERO($m[3]);
    222. 

  222. 					$t['KONTO_SYN']=$m[0][0];
    223. 

  223. 

  224. 				} else 	if(($m[0]>=71)&&($m[0]<=71)) { //konta 80
    225. 

  225. 					$t['KONTO_SYN']=TRIM_ZERO($m[0]);
    226. 

  226. 					//$t['ID_BUDZET']=TRIM_ZERO($m[2]);
    227. 

  227. //					$t['ID_PROJECT']=TRIM_ZERO($m[1]);
    228. 

  228. 					//print_r($m);
    229. 

  229. 				} else 	if(($m[0]>=80)&&($m[0]<=80)) { //konta 80
    230. 

  230. 					$t['KONTO_SYN']=TRIM_ZERO($m[0]);
    231. 

  231. 					//$t['ID_BUDZET']=TRIM_ZERO($m[2]);
    232. 

  232. 					$t['ID_PROJECT']=TRIM_ZERO($m[1]);
    233. 

  233. 					//print_r($m);
    234. 

  234. 				} else 	if(($m[0]>=201)&&($m[0]<=201)) { //naleznosci od klientow 201
    235. 

  235. 					$t['KONTO_SYN']=TRIM_ZERO($m[0]);
    236. 

  236. 					//$t['ID_BUDZET']=TRIM_ZERO($m[2]);
    237. 

  237. 					if($h['WINIEN_MA']=='WINIEN') $t['201_WINIEN']=$h['wartosc'];
    238. 

  238. 					if($h['WINIEN_MA']=='MA') $t['201_MA']=$h['wartosc'];
    239. 

  239. 					//print_r($m);
    240. 

  240. 				} else 	if(($m[0]>=202)&&($m[0]<=299)) { //naleznosci od dostawcow 202
    241. 

  241. 					$t['KONTO_SYN']=TRIM_ZERO($m[0]);
    242. 

  242. 

  243. 					if($h['WINIEN_MA']=='WINIEN') $t['202_WINIEN']=$h['wartosc'];
    244. 

  244. 					if($h['WINIEN_MA']=='MA') $t['202_MA']=$h['wartosc'];
    245. 

  245. 

  246. 				} else 	if(($m[0]>=703)&&($m[0]<=703)) { //odsetki od kredytow i odsetki
    247. 

  247. 					$t['KONTO_SYN']=TRIM_ZERO($m[0]);
    248. 

  248. 				} else 	if(($m[0]>=750)&&($m[0]<=750)) { //pozostale koszty operacyjne
    249. 

  249. 					$t['KONTO_SYN']=TRIM_ZERO($m[0]);
    250. 

  250. 

  251. 				} else 	if(($m[0]>=751)&&($m[0]<=751)) { //pozostale koszty operacyjne
    252. 

  252. 					$t['KONTO_SYN']=TRIM_ZERO($m[0]);
    253. 

  253. 

  254. 				}   else 	if(($m[0]>=761)&&($m[0]<=761)) { //pozostale koszty operacyjne
    255. 

  255. 					$t['KONTO_SYN']=TRIM_ZERO($m[0]);
    256. 

  256. 					//$t['ID_BUDZET']=TRIM_ZERO($m[2]);
    257. 

  257. 					if($h['WINIEN_MA']=='WINIEN') $t['202_WINIEN']=$h['wartosc'];
    258. 

  258. 					if($h['WINIEN_MA']=='MA') $t['202_MA']=$h['wartosc'];
    259. 

  259. 					//print_r($m);
    260. 

  260. 				} else 	if(($m[0]>=751)&&($m[0]<=751)) { //odsetki od kredytow i odsetki
    261. 

  261. 				
    262. 

  262. 					$t['KONTO_SYN']=TRIM_ZERO($m[0]);
    263. 

  263. 

  264. 					//$t['ID_BUDZET']=TRIM_ZERO($m[2]);
    265. 

  265. 					if($h['WINIEN_MA']=='WINIEN') $t['202_WINIEN']=$h['wartosc'];
    266. 

  266. 					if($h['WINIEN_MA']=='MA') $t['202_MA']=$h['wartosc'];
    267. 

  267. 					//print_r($m);
    268. 

  268. 				}
    269. 

  269. 

  270. 

  271. 

  272. 				
    273. 

  273. 

  274. 				//print_r($t);
    275. 

  275. 				if(isset($t)) { //update do bazy
    276. 

  276. 					$ZAP_UPD="update KSIEG_DOKUMENTY set KONTO_SYN='".$t['KONTO_SYN']."', ID_BUDZET='".$t['ID_BUDZET']."' , ID_PROJECT='".$t['ID_PROJECT']."' , 
    277. 

  277. 							 201_WINIEN='".$t['201_WINIEN']."', 201_MA='".$t['201_MA']."' ,
    278. 

  278. 							  202_WINIEN='".$t['202_WINIEN']."' , 202_MA='".$t['202_MA']."'   where ID='".$h['ID']."' limit 1";
    279. 

  279. 					//echo "\n ".$ZAP_UPD;
    280. 

  280. 					ZAP_SQL($ZAP_UPD);
    281. 

  281. 				}
    282. 

  282. 				
    283. 

  283. 				
    284. 

  284. 	   }
    285. 

  285. 

  286. 	   	echo "</pre>";
    287. 

  287. 

  288. }
    289. 

  289. 

  290. if($_REQUEST['ANALIZUJ_PLYNNOSC_KONT_2XX']) {
    291. 

  291. 	echo "<pre>";
    292. 

  292. 	
    293. 

  293. 	
    294. 

  294. 	
    295. 

  295. 	
    296. 

  296. 	
    297. 

  297. 	//1. Budowa tabeli slownikowej INDEKS24
    298. 

  298. 

  299. echo "<br>//Tworze slownikowa tabele od 0 do 24 miesiecy w przeszlosc\n";
    300. 

  300.  $ZAP_SQL=" drop  table  if exists   INDEKS24 ;"; //echo "<br> $ZAP_SQL  <br>\n";
    301. 

  301.  ZAP_SQL($ZAP_SQL);
    302. 

  302.  $ZAP_SQL=" create   table INDEKS24 (ID int(3)  , DATA date ) ;";
    303. 

  303. // echo "<br> $ZAP_SQL  <br>\n";
    304. 

  304.  ZAP_SQL($ZAP_SQL);
    305. 

  305.  $i=-24;
    306. 

  306.  $LP=24;
    307. 

  307.   while ($i < 48 ) {
    308. 

  308.   $i++;
    309. 

  309.   $LP--;
    310. 

  310.  //echo "Nas            z miesiac to $i<br>";
    311. 

  311.  $ZAP_SQL="insert into INDEKS24 SELECT '".$LP."', DATE_FORMAT(concat(PERIOD_ADD( DATE_FORMAT(now(), '%Y%m') ,-$i),'01'),'%Y-%m-%d'); ";
    312. 

  312.  ZAP_SQL($ZAP_SQL);
    313. 

  313. 

  314.   // echo " $ZAP_SQL \n <br>";
    315. 

  315. //EOF Tworze slownikowa tabele od 0 do 24
    316. 

  316.  }
    317. 

  317. 

  318. 

  319. 	
    320. 

  320. 	
    321. 

  321. 	
    322. 

  322. 	
    323. 

  323. 	
    324. 

  324. 	
    325. 

  325. 	
    326. 

  326. 		ZAP_SQL("select t1.ID as LP , t1.DATA as DATA , count(t2.ID) as COUNT,
    327. 

  327. 		
    328. 

  328. 					t2.ID, t2.DATA_DOK, t2.KONTO_KSIEG, t2.wartosc, t2.TYP_DOKUMENTU, t2.ID_PROJECT, t2.WINIEN_MA , 
    329. 

  329. 					sum(201_WINIEN) as A201_WINIEN_S , sum(201_MA) as A201_MA_S ,  
    330. 

  330. 						sum(202_WINIEN) as A202_WINIEN_S , sum(202_MA) as A202_MA_S   
    331. 

  331. 				 from INDEKS24 as t1 
    332. 

  332. 				 left join KSIEG_DOKUMENTY as t2 on ( YEAR(t1.DATA)=year(t2.DATA_DOK) and MONTH(t1.DATA)=MONTH(t2.DATA_DOK) )
    333. 

  333. 				 
    334. 

  334. 				 where t2.TYP_DOKUMENTU='IMPORT' or t2.TYP_DOKUMENTU is NULL or TYP_DOKUMENTU='IMPORT-KOSZTORYS'				 
    335. 

  335. 				 group by year(t1.DATA) , month(t1.DATA) 
    336. 

  336. 				 
    337. 

  337. 				  order by t1.ID  "); //, t2.ID_PROJECT,t2.KONTO_SYN
    338. 

  338. 				  echo "<table border=1>";
    339. 

  339. 				  	echo "<tr><td>LP</td><td>DATA</td><td>COUNT</td><td>KONT_KSIEG</td>
    340. 

  340. 				<td>ID_PROJECT</td><td>A201_WINIEN_S</td><td>A201_MA_S</td><td>A202_WINIEN_S</td>
    341. 

  341. 				<td>A202_MA_S</td><td>ZOB_KLIENT</td>
    342. 

  342. 				<td>ZOB_DOST</td> <td>ZOB_ALL</td> 
    343. 

  343. 				 <td>ZOB_KLIENT_S</td><td>ZOB_DOST_S</td><td>ZOB_ALL_S</td>
    344. 

  344. 				</tr>";
    345. 

  345. 				  
    346. 

  346. 		while ($h=mysql_fetch_object($result )) {
    347. 

  347. 			echo "\n";
    348. 

  348. 			//print_r($h);
    349. 

  349. 				$ZOB_KLIENT=$h->A201_WINIEN_S-$h->A201_MA_S;
    350. 

  350. 				$ZOB_DOST=$h->A202_WINIEN_S-$h->A202_MA_S;
    351. 

  351. 				$ZOB_ALL=$ZOB_DOST-$ZOB_KLIENT;
    352. 

  352. 				$ZOB_KLIENT_S+=$ZOB_KLIENT;
    353. 

  353. 				$ZOB_DOST_S+=$ZOB_DOST;
    354. 

  354. 				$ZOB_ALL_S+=$ZOB_ALL;
    355. 

  355. 				
    356. 

  356. 				echo "<tr><td>".$h->LP."</td><td>".$h->DATA."</td><td>".$h->COUNT."</td><td>".$h->KONT_KSIEG."</td>
    357. 

  357. 				<td>".$h->ID_PROJECT."</td><td>".$h->A201_WINIEN_S."</td><td>".$h->A201_MA_S."</td><td>".$h->A202_WINIEN_S."</td>
    358. 

  358. 				<td>".$h->A202_MA_S."</td><td>".$ZOB_KLIENT."</td>
    359. 

  359. 				<td>".$ZOB_DOST."</td> <td>".$ZOB_ALL."</td> 
    360. 

  360. 				 <td>".$ZOB_KLIENT_S."</td><td>".$ZOB_DOST_S."</td><td>".$ZOB_ALL_S."</td>
    361. 

  361. 				</tr>";
    362. 

  362. 

  363. 		}
    364. 

  364. 				echo "</table>";
    365. 

  365. 

  366. 	echo "\n </pre>";
    367. 

  367. } //eof if($_REQUEST['ANALIZUJ_PLYNNOSC_KONT_2XX']) {
    368. 

  368. 

  369. 

  370. 

  371. 

  372. 

  373. if($_REQUEST['AKTUALIZACJA_ZAMOWIEN_ZD_SUBIEKT']) {
    374. 

  374. 	echo "<pre>";
    375. 

  375. 	
    376. 

  376. 		echo "<br>Lacze sie do bazy IS";
    377. 

  377. 		$db=mssql_connect($CNF_ZASOB['1182']['INTERFACE_ADDR'],$CNF_ZASOB['1182']['SQL_USER'],$CNF_ZASOB['1182']['SQL_USER_PASS']);
    378. 

  378. 		mssql_select_db($CNF_ZASOB['1182']['SQL_DATABASE'],$db);
    379. 

  379. 

  380. 		$query="select *, CONVERT(varchar(10), dok_DataWyst , 20) as dok_DataWyst ,
    381. 

  381. 				 CONVERT(varchar(10), dok_DataMag , 20) as dok_DataMag , 
    382. 

  382. 				 CONVERT(varchar(10), dok_PlatTermin , 20) as dok_PlatTermin , 
    383. 

  383. 				 CONVERT(varchar(10), dok_TerminRealizacji , 20) as dok_TerminRealizacji 	
    384. 

  384. 				 				 				 
    385. 

  385. 		
    386. 

  386. 		  from dok__Dokument where dok_NrPelny  like 'ZD%'   ; ";
    387. 

  387. 		//$query=" convert(datetime, '2016-10-23 20:44:11.500',  121)";
    388. 

  388. 		ZAP_SQL("delete from KSIEG_DOKUMENTY where TYP_DOKUMENTU='IMPORT-KOSZTORYS' ");
    389. 

  389. 		$R=mssql_query($query);
    390. 

  390.  			while ($r=mssql_fetch_object($R)) {			
    391. 

  391.  				//print_r($r);
    392. 

  392.  				if(isset($t)) unset($t);
    393. 

  393.  				//list('',$t['ID_PROJECT_GUESS'])=
    394. 

  394.  				list(,$t['ID_PROJECT_SGT'])=explode('/',$r->dok_NrPelny);
    395. 

  395.  					$ZAP_SQL="select ID from IN7_MK_BAZA_DYSTRYBUCJI where ID like '".$t['ID_PROJECT_SGT']."'";// echo "\n".$ZAP_SQL;
    396. 

  396. 					//if($t['ID_PROJECT_SGT'])  
    397. 

  397. 					 ZAP_SQL($ZAP_SQL);
    398. 

  398. //						$RES=mysql_fetch_array($result);
    399. 

  399. //						print_r($RES);
    400. 

  400. 						list($t['ID_PROJECT_GUESS'])=mysql_fetch_array($result);
    401. 

  401. 						if($t['ID_PROJECT_GUESS']==$t['ID_PROJECT_SGT']) $t['ID_PROJECT']=$t['ID_PROJECT_GUESS'];
    402. 

  402. 								$ZAP_SQL="select ID from IN7_MK_BAZA_DYSTRYBUCJI where M_DIST_DESC like '%(magazyn_".$t['ID_PROJECT_SGT'].")%'";
    403. 

  403. 						if(!isset($t['ID_PROJECT'])) ZAP_SQL($ZAP_SQL);
    404. 

  404. 						list($t['ID_PROJECT_GUESS'])=mysql_fetch_array($result);
    405. 

  405. 					  	if(mysql_num_rows($result)>1) die("<br> Za duzo powiazanych projektow o tym samym oznaczeniu magazynu w opisie  : ".$t['ID_PROJECT_SGT'].".<br>Dokument : ".$r->dok_NrPelny."<br> w opisie projektu musi byc tylko 1 magazyn opisany w sposob : (magazyn ".$t['ID_PROJECT_SGT']."), a jest:".mysql_num_rows($result)); 
    406. 

  406. 						if($t['ID_PROJECT_GUESS']) $t['ID_PROJECT']=$t['ID_PROJECT_GUESS'];
    407. 

  407. 						if(!isset($t['ID_PROJECT'])) die("<br> Nie mozna rozpoznac magazynu dla rekordu ze wskazanym magazynem : ".$t['ID_PROJECT_SGT'].".<br>Dokument : ".$r->dok_NrPelny."<br> w opisie projektu musi byc magazyn opisany w sposob : (magazyn ".$t['ID_PROJECT_SGT'].")");
    408. 

  408. 						//tu szukamy glownego numeru sprawy budzetu!
    409. 

  409. 						$safe=10;
    410. 

  410. 						if($t['ID_PROJECT']) $t['ID_PROJECT_GUESS']=$t['ID_PROJECT'];
    411. 

  411. 						$t['ID_PROJECT_ROOT_GUESS']=$t['ID_PROJECT_GUESS'];$t['ID_PROJECT_ROOT_LAST']=$t['ID_PROJECT_ROOT_GUESS'];
    412. 

  412. 

  413. 							while($safe>0) {
    414. 

  414. 						   		$ZAP_SQL="select P_ID from IN7_MK_BAZA_DYSTRYBUCJI where ID='".$t['ID_PROJECT_ROOT_GUESS']."'";
    415. 

  415. 						   ZAP_SQL($ZAP_SQL); //echo "\n".$ZAP_SQL;
    416. 

  416. 							list($t['ID_PROJECT_ROOT_LAST'])=mysql_fetch_array($result);
    417. 

  417. 								if($t['ID_PROJECT_ROOT_LAST']=='0') { 
    418. 

  418. 								unset($t['ID_PROJECT_ROOT_LAST']);
    419. 

  419. 								break;
    420. 

  420. 								} else $t['ID_PROJECT_ROOT_GUESS']=$t['ID_PROJECT_ROOT_LAST'];
    421. 

  421. 								
    422. 

  422. 								$safe--;
    423. 

  423. 								echo ".";
    424. 

  424. 							}
    425. 

  425. 							//if(!)
    426. 

  426. 						
    427. 

  427.  						print_r($t);
    428. 

  428. 

  429. 

  430. 				$ZAP_SQL="insert into KSIEG_DOKUMENTY (A_RECORD_CREATE_DATE,A_RECORD_CREATE_AUTHOR, DATA_DOK, NUMER_DOK , SPRZEDAWCA , 
    431. 

  431. 						ID_SPRZEDAWCA , ILOSC , CENA_JEDN_NETTO , STAWKA_VAT , wartosc , CZY_URZADZENIE , TYP_DOKUMENTU, ID_PROJECT, 
    432. 

  432. 						ID_BUDZET,A_STATUS,KONTO_KSIEG , WINIEN_MA , 202_WINIEN) values ( 
    433. 

  433. 						now() , '".$_SESSION['AUTHORIZE_USER']."' , 
    434. 

  434. 						'".$r->dok_TerminRealizacji."','".$r->dok_NrPelny."',
    435. 

  435. 						'".$r->dok_PlatnikId."','".$r->dok_PlatnikId."','1','".$r->dok_WartNetto."','0','".$r->dok_WartNetto."','NOT_DEVICE',
    436. 

  436. 						'IMPORT-KOSZTORYS','".$t['ID_PROJECT_GUESS']."','".$t['ID_PROJECT_ROOT_GUESS']."','NORMAL','400-00-".$t['ID_PROJECT_ROOT_GUESS']."-".$t['ID_PROJECT_GUESS']."', 'WINIEN' , '".$r->dok_WartBrutto."')";
    437. 

  437. 						echo "<br>\n".$ZAP_SQL;
    438. 

  438. 				 		ZAP_SQL($ZAP_SQL);
    439. 

  439. 

  440. 

  441. 			}
    442. 

  442. 		echo "</pre>";
    443. 

  443. 	
    444. 

  444. 

  445. 	
    446. 

  446. 	
    447. 

  447. } //eof  if($_REQUEST['AKTUALIZACJA_ZAMOWIEN_ZD_SUBIEKT']) {
    448. 

  448. 

  449. 

  450. 

  451. //print_r($_SESSION);
    452. 

  452. 

  453. if($_REQUEST['IMPORT_FAKTUR_Z_ZASOB_719']) {
    454. 

  454. 	echo "<pre>";
    455. 

  455. 	
    456. 

  456. 		//$ZAP_SQL="select * from BILLS_FVAT_POS limit 100";
    457. 

  457. 		//$res719 = mysql_query($ZAP_SQL,$conn719) or die("Blad zapytania ZAP_SQL. *$ZAP_SQL*!");
    458. 

  458. 		//$numrows719=mysql_numrows($res719);
    459. 

  459. 		//echo "\n".$numrows719;
    460. 

  460. 

  461. 		SEF('SYNC_MYDATABASE_SQIX');
    462. 

  462. 		$sync_tables=array('BILLS_FVAT_POS','BILLS_FVAT');
    463. 

  463. //		$sync_tables=array('BILLS_FVAT_X');
    464. 

  464. 		//$sync_tables=array('SERVICES');
    465. 

  465. 

  466. 

  467. SYNC_MYDATABASE_SQIX('719',$sync_tables,$DATABASE_ROOT_ZASOB_ID);
    468. 

  468. 		//print_r($_SESSION);
    469. 

  469. //		$sync_tables=array('SES_VOIP_A','SES_USERS2_A','SERVICES');
    470. 

  470. //		$sync_tables=array('SES_VOIP_A','SERVICES');
    471. 

  471. 

  472. //		SYNC_MYDATABASE_SQIX('695',$sync_tables,'14');
    473. 

  473. //2012-01-05 wywalone by Bzyk & plabudda	
    474. 

  474. 		
    475. 

  475. 	echo "</pre>";
    476. 

  476. 	
    477. 

  477. }//eof IMPORT_FAKTUR_Z_ZASOB_719
    478. 

  478. 

  479. 

  480. 

  481. 

  482. 

  483. 

  484. if($_REQUEST['RAPORT_WYNIKOWY_ala_Cyperska']) {
    485. 

  485. 

  486. //funkcja napisana @2012-09-05 na potrzeby analizy kosztow projektow
    487. 

  487. 	echo "<pre>";
    488. 

  488. 	
    489. 

  489. 	
    490. 

  490. 	
    491. 

  491. 		//1. Budowa tabeli slownikowej INDEKS24
    492. 

  492. 

  493. echo "<br>//Tworze slownikowa tabele od 0 do 24 miesiecy w przeszlosc\n";
    494. 

  494.  $ZAP_SQL=" drop  table  if exists   INDEKS24 ;"; //echo "<br> $ZAP_SQL  <br>\n";
    495. 

  495.  ZAP_SQL($ZAP_SQL);
    496. 

  496.  $ZAP_SQL=" create   table INDEKS24 (ID int(3)  , DATA date ) ;";
    497. 

  497. // echo "<br> $ZAP_SQL  <br>\n";
    498. 

  498.  ZAP_SQL($ZAP_SQL);
    499. 

  499.  $i=-24;
    500. 

  500.  $LP=24;
    501. 

  501.   while ($i < 24 ) {
    502. 

  502.   $i++;
    503. 

  503.   $LP--;
    504. 

  504.  //echo "Nas            z miesiac to $i<br>";
    505. 

  505.  $ZAP_SQL="insert into INDEKS24 SELECT '".$LP."', DATE_FORMAT(concat(PERIOD_ADD( DATE_FORMAT(now(), '%Y%m') ,-$i),'01'),'%Y-%m-%d'); ";
    506. 

  506.  ZAP_SQL($ZAP_SQL);
    507. 

  507. 

  508. //   echo " $ZAP_SQL \n <br>";
    509. 

  509.    }
    510. 

  510. //EOF Tworze slownikowa tabele od 0 do 24
    511. 

  511. 	
    512. 

  512. 	//jedziemy po datach biezacy rok //   
    513. 

  513. 	$ZAP_SQL="select DATA from INDEKS24 where year(DATA) like year(now()) or year(DATA) like year(DATE_ADD(date(now()),INTERVAL -1 YEAR)) order by DATA limit 24 ";
    514. 

  514. 	$result_date=mysql_query($ZAP_SQL);
    515. 

  515. 	while($res=mysql_fetch_object($result_date)) {
    516. 

  516. 	
    517. 

  517. 

  518. 				$DATA=$res->DATA;
    519. 

  519. 			//koszty dotyczace czworek 4
    520. 

  520. 				$CYP_RAP_RODZAJE=array(703=>'PR '.$DATA ,750=>'PR '.$DATA,760=>'PR '.$DATA,4=>'KO '.$DATA,751=>'KO '.$DATA,761=>'KO '.$DATA,80=>'IN '.$DATA,310=>'IN '.$DATA);
    521. 

  521. 				
    522. 

  522. 				  foreach($CYP_RAP_RODZAJE as $CYP_RAP_RODZAJ=>$CYP_RAP_KOSZT_INWEST) {
    523. 

  523. 				
    524. 

  524. 				$zap_sql="select KD.ID, KD.KONTO_SYN, KD.KONTO_KSIEG, KD.DATA_DOK,KD.NUMER_DOK, KD.wartosc, 
    525. 

  525. 					KD.WINIEN_MA, KD.201_WINIEN,KD.201_MA,KD.202_WINIEN,KD.202_MA,KD.TYP_DOKUMENTU,KD.BUDZET,KD.ID_PROJECT
    526. 

  526. 					, PR.M_DIST_TYPE , PR.M_DISTRIBUTOR, PR.M_DIST_DESC ,KD.ID_BUDZET
    527. 

  527. 				 from KSIEG_DOKUMENTY as KD 
    528. 

  528. 				   left join IN7_MK_BAZA_DYSTRYBUCJI as PR on PR.ID=KD.ID_PROJECT
    529. 

  529. 				 where month(KD.DATA_DOK) like month('".$DATA."') and year(KD.DATA_DOK) like year('".$DATA."') and KD.TYP_DOKUMENTU='IMPORT'
    530. 

  530. 				 and KD.KONTO_SYN='".$CYP_RAP_RODZAJ."'	
    531. 

  531. 				 -- and PR.ID='629'
    532. 

  532. 				 order by KD.ID_BUDZET,PR.M_DIST_TYPE ";
    533. 

  533. 				ZAP_SQL($zap_sql);
    534. 

  534. 				
    535. 

  535. 				$CYP_RAP[$CYP_RAP_KOSZT_INWEST][$CYP_RAP_RODZAJ]=array();
    536. 

  536. 				while($h=mysql_fetch_object($result)){
    537. 

  537. 					 if($h->ID_BUDZET=="") $h->ID_BUDZET="0";
    538. 

  538. 					 if($h->ID_PROJECT=="") $h->ID_PROJECT="0";
    539. 

  539. 					$CYP_RAP[$CYP_RAP_KOSZT_INWEST][$CYP_RAP_RODZAJ]['detale']['analityka-projekty'][$h->ID_PROJECT]+=$h->wartosc;
    540. 

  540. 						$KONTO_RODZAJ=split('-',$h->KONTO_KSIEG);
    541. 

  541. 					$CYP_RAP[$CYP_RAP_KOSZT_INWEST][$CYP_RAP_RODZAJ]['detale']['analityka-1'][$KONTO_RODZAJ[0]]+=$h->wartosc;	
    542. 

  542. 					$CYP_RAP[$CYP_RAP_KOSZT_INWEST][$CYP_RAP_RODZAJ]['detale']['analityka-2'][$KONTO_RODZAJ[1]]+=$h->wartosc;	
    543. 

  543. 					$CYP_RAP[$CYP_RAP_KOSZT_INWEST][$CYP_RAP_RODZAJ]['detale']['analityka-2-M_DIST'][$h->M_DIST_TYPE][$KONTO_RODZAJ[1]]+=$h->wartosc;		
    544. 

  544. 				    $CYP_RAP[$CYP_RAP_KOSZT_INWEST][$CYP_RAP_RODZAJ]['detale']['analityka-2-M_DIST-ID_PROJ'][$KONTO_RODZAJ[1]][$h->M_DIST_TYPE][$h->ID_PROJECT]+=$h->wartosc;		
    545. 

  545. 				
    546. 

  546. 					$CYP_RAP[$CYP_RAP_KOSZT_INWEST][$CYP_RAP_RODZAJ]['detale']['M_DIST_TYPE'][$h->M_DIST_TYPE]+=$h->wartosc;		
    547. 

  547. 

  548. 					$RYP_CAP_PREFIX=$KONTO_RODZAJ[0]."--".$KONTO_RODZAJ[1]."--".$h->ID_BUDZET;
    549. 

  549. 					//$RYP_CAP_SUFFIX="</b></nobr>";
    550. 

  550. 

  551. 					$CYP_RAP_USED[$RYP_CAP_PREFIX.$h->ID_PROJECT.$RYP_CAP_SUFFIX]['DATA'][$CYP_RAP_KOSZT_INWEST]+=$h->wartosc;
    552. 

  552. 					$CYP_RAP_USED[$RYP_CAP_PREFIX.$h->ID_PROJECT.$RYP_CAP_SUFFIX]['KONTO_RODZAJ0']=$KONTO_RODZAJ[0];
    553. 

  553. 					$CYP_RAP_USED[$RYP_CAP_PREFIX.$h->ID_PROJECT.$RYP_CAP_SUFFIX]['KONTO_RODZAJ1']=$KONTO_RODZAJ[1];
    554. 

  554. 					$CYP_RAP_USED[$RYP_CAP_PREFIX.$h->ID_PROJECT.$RYP_CAP_SUFFIX]['ID_PROJECT']=$h->ID_PROJECT;
    555. 

  555. 					$CYP_RAP_USED[$RYP_CAP_PREFIX.$h->ID_PROJECT.$RYP_CAP_SUFFIX]['ID_BUDZET']=$h->ID_BUDZET;
    556. 

  556. 

  557. 

  558. 

  559. 

  560. 					$CYP_RAP_DATA['ID_PROJECT'][$RYP_CAP_PREFIX.$h->ID_PROJECT.$RYP_CAP_SUFFIX]['ID_PROJECT']=$h->ID_PROJECT;
    561. 

  561. 					$CYP_RAP_DATA['ID_PROJECT'][$RYP_CAP_PREFIX.$h->ID_PROJECT.$RYP_CAP_SUFFIX]['M_DIST_TYPE']=$h->M_DIST_TYPE;
    562. 

  562. 					$CYP_RAP_DATA['ID_PROJECT'][$RYP_CAP_PREFIX.$h->ID_PROJECT.$RYP_CAP_SUFFIX]['M_DIST_DESC']=$h->M_DIST_DESC;
    563. 

  563. 					$CYP_RAP_DATA['ID_PROJECT'][$RYP_CAP_PREFIX.$h->ID_PROJECT.$RYP_CAP_SUFFIX]['M_DISTRIBUTOR']=$h->M_DISTRIBUTOR;
    564. 

  564. 					$CYP_RAP_DATA['ID_PROJECT'][$RYP_CAP_PREFIX.$h->ID_PROJECT.$RYP_CAP_SUFFIX]['ID_BUDZET'][$h->ID_BUDZET]=1;
    565. 

  565. 				
    566. 

  566. 					$CYP_RAP_DATA['ID_PROJECT'][$RYP_CAP_PREFIX.$h->ID_PROJECT.$RYP_CAP_SUFFIX]['WYSTEPUJE_W_RODZAJACH'][$KONTO_RODZAJ[1]]=1;
    567. 

  567. 					$CYP_RAP_DATA['ID_PROJECT'][$RYP_CAP_PREFIX.$h->ID_PROJECT.$RYP_CAP_SUFFIX]['WYSTEPUJE_W_DZIALACH'][$KONTO_RODZAJ[0]]=1;
    568. 

  568. 					$CYP_RAP_DATA['ID_PROJECT'][$RYP_CAP_PREFIX.$h->ID_PROJECT.$RYP_CAP_SUFFIX]['SUMA_KOSZTOW']+=$h->wartosc;
    569. 

  569. 

  570. 				
    571. 

  571.     				$CYP_RAP[$CYP_RAP_KOSZT_INWEST][$CYP_RAP_RODZAJ]['detale']['syntetyka']+=$h->wartosc;
    572. 

  572. 				    $CYP_RAP[$CYP_RAP_KOSZT_INWEST]['suma']+=$h->wartosc;
    573. 

  573. 

  574. 

  575. 				}
    576. 

  576. 				
    577. 

  577. 			 } //foreach   foreach($CYP_RAP_RODZAJE as $CYP_RAP_RODZAJ) {
    578. 

  578. 

  579. 	} //foreach $result_date
    580. 

  580. 	//			print_r($CYP_RAP);
    581. 

  581. 				
    582. 

  582. 				echo "</pre>";
    583. 

  583. 				
    584. 

  584. 				//algin wszystkich projektow z bazy
    585. 

  585. //				$zap_sql="select PR.M_DIST_TYPE , PR.M_DISTRIBUTOR, PR.M_DIST_DESC  from IN7_MK_BAZA_DYSTRYBYCJI as PR where PR.A_STATUS!='DELETED' "
    586. 

  586. 				
    587. 

  587. 	$LP=1;
    588. 

  588. echo "<table border=1><tr><td>Lp.</td><td>Konto</td><td>Rodzaj</td><td>Dzial-ID</td><td>PROJEKT</td><td>Typ Projektu</td><td>Opis</td><td>Koszta dzialach/rodzajach</td><td>Koszta w dzialach</td><td>Suma na prawo</td>";
    589. 

  589. 

  590. 	//malujemy naglowek
    591. 

  591. 	foreach($CYP_RAP as $RCI=>$RCA) {
    592. 

  592. 		  echo "<td>".$RCI."</td>";
    593. 

  593.     }
    594. 

  594. //malujemy w dol
    595. 

  595. 	echo "</tr>";
    596. 

  596. echo "<tr>><td>".$LP."</td><td>.</td><td>.</td><td>.</td><td>.</td><td>.</td><td>.</td><td>.</td><td>Sumy Przychodow</td><td>";
    597. 

  597. 			$LP++;
    598. 

  598. 			$NAG=0;
    599. 

  599. 			foreach($CYP_RAP as $RCI=>$RCA) {
    600. 

  600. 			$NAG++;
    601. 

  601. 			if($NAG==1) $SUMY['PR']+=$RCA['suma'];
    602. 

  602. 			if($NAG==3) $NAG=0;
    603. 

  603. 		    }
    604. 

  604. 		echo $SUMY['PR'];
    605. 

  605. 	echo "</td>";
    606. 

  606. //PRZYCHOD
    607. 

  607. 			$NAG=0;
    608. 

  608. foreach($CYP_RAP as $RCI=>$RCA) {
    609. 

  609. 		  echo "<td>";
    610. 

  610. 			$NAG++;
    611. 

  611. 			if($NAG==1) echo "<b>".str_replace('.',',',$RCA['suma'])."<b>";
    612. 

  612. 			if($NAG==3) $NAG=0;
    613. 

  613. 		  echo "</td>";
    614. 

  614.     }
    615. 

  615.     echo "</tr>";
    616. 

  616. //KOSZTY
    617. 

  617. 	echo "<tr><td>".$LP."</td><td>.</td><td>.</td><td>.</td><td>.</td><td>.</td><td>.</td><td>.</td><td>Sumy Kosztow</td><td>";
    618. 

  618. 	$NAG=0; $LP++;
    619. 

  619. 			foreach($CYP_RAP as $RCI=>$RCA) {
    620. 

  620. 			$NAG++;
    621. 

  621. 			if($NAG==2) $SUMY['KO']+=$RCA['suma'];
    622. 

  622. 			if($NAG==3) $NAG=0;
    623. 

  623. 		    }
    624. 

  624. 		echo $SUMY['KO'];
    625. 

  625. 	
    626. 

  626. 	
    627. 

  627. 	echo "</td>";
    628. 

  628. 				$NAG=0;
    629. 

  629. foreach($CYP_RAP as $RCI=>$RCA) {
    630. 

  630. 		  echo "<td>";
    631. 

  631. 			$NAG++;
    632. 

  632. 			if($NAG==2) echo "<b>".str_replace('.',',',$RCA['suma'])."<b>";
    633. 

  633. 			if($NAG==3) $NAG=0;
    634. 

  634. 		  echo "</td>";
    635. 

  635.     }
    636. 

  636.     echo "</tr>";
    637. 

  637. //INWESTYCJE    
    638. 

  638. echo "<tr><td>".$LP."</td><td>.</td><td>.</td><td>.</td><td>.</td><td>.</td><td>.</td><td>.</td><td>Sumy Inwestycji</td><td>";
    639. 

  639. 		foreach($CYP_RAP as $RCI=>$RCA) {
    640. 

  640. 			$NAG++;$LP++;
    641. 

  641. 			if($NAG==3) $SUMY['IN']+=$RCA['suma'];
    642. 

  642. 			if($NAG==3) $NAG=0;
    643. 

  643. 		    }
    644. 

  644. 		echo $SUMY['IN'];
    645. 

  645. echo "</td>";
    646. 

  646. 			$NAG=0;
    647. 

  647. foreach($CYP_RAP as $RCI=>$RCA) {
    648. 

  648. 		  echo "<td>";
    649. 

  649. 		 	 $NAG++;
    650. 

  650. 			if($NAG==3) echo "<b>".str_replace('.',',',$RCA['suma'])."<b>";
    651. 

  651. 			if($NAG==3) $NAG=0;
    652. 

  652. 		  echo "</td>";
    653. 

  653.     }
    654. 

  654.     echo "</tr>";
    655. 

  655. 

  656. 

  657.  	foreach($CYP_RAP_USED as $RPUI1=>$RPUA1) {
    658. 

  658. 	echo "<tr>";//"<td>".$RPUI1."</td>";
    659. 

  659. 	echo "<td>".$LP."</td>";$LP++;
    660. 

  660. 	echo "<td>".$RPUA1['KONTO_RODZAJ0']."</td>";
    661. 

  661. 		echo "<td>".$RPUA1['KONTO_RODZAJ1']."</td>";
    662. 

  662. 					echo "<td>".$RPUA1['ID_BUDZET']."</td>";
    663. 

  663. 			echo "<td>".$RPUA1['ID_PROJECT']."</td>";
    664. 

  664. 		echo "<td>".str_replace('_',' ',$CYP_RAP_DATA['ID_PROJECT'][$RPUI1]['M_DIST_TYPE'])."</td>";
    665. 

  665. 				echo "<td>".$CYP_RAP_DATA['ID_PROJECT'][$RPUI1]['M_DIST_DESC']." ".$CYP_RAP_DATA['ID_PROJECT'][$RPUI1]['M_DISTRIBUTOR']."</td>";
    666. 

  666. 				echo "<td>";
    667. 

  667.  			 	foreach ($CYP_RAP_DATA['ID_PROJECT'][$RPUI1]['WYSTEPUJE_W_DZIALACH'] as $ind=>$arr) echo $ind.", ";
    668. 

  668.  				echo "--";
    669. 

  669. 				foreach ($CYP_RAP_DATA['ID_PROJECT'][$RPUI1]['WYSTEPUJE_W_RODZAJACH'] as $ind=>$arr) echo $ind.", ";
    670. 

  670. 				echo "</td>";
    671. 

  671. 				echo "<td>";
    672. 

  672. 				  foreach ($CYP_RAP_DATA['ID_PROJECT'][$RPUI1]['ID_BUDZET'] as $ind=>$arr) echo $ind.", ";
    673. 

  673. 

  674. 				echo "</td><td><b>".str_replace('.',',',$CYP_RAP_DATA['ID_PROJECT'][$RPUI1]['SUMA_KOSZTOW'])."</b></td>";
    675. 

  675. 				$BGCOL_IND=0;
    676. 

  676. 		foreach($CYP_RAP as $CRAI1=>$CRAA1) {
    677. 

  677. 				$BGCOL_IND++;
    678. 

  678. 				if($BGCOL_IND==1) $BGCOLOR="bgcolor='#ccffff'";
    679. 

  679. 				else if($BGCOL_IND==2) $BGCOLOR="bgcolor='#ffccff'";
    680. 

  680. 				else if($BGCOL_IND==3) { $BGCOLOR="bgcolor='#ffffcc'"; $BGCOL_IND=0;	 }
    681. 

  681. 

  682. 			echo "<td ".$BGCOLOR.">".str_replace('.',',',$RPUA1['DATA'][$CRAI1])."</td>";
    683. 

  683. 		
    684. 

  684. 		}	 
    685. 

  685. 	echo "</tr>";
    686. 

  686. 		 	}
    687. 

  687. 		
    688. 

  688.     
    689. 

  689. 	//echo "</tr>";
    690. 

  690.    
    691. 

  691.     
    692. 

  692. 

  693. 	
    694. 

  694. 	echo "</table>";
    695. 

  695. 	
    696. 

  696. 	
    697. 

  697. 	
    698. 

  698. } //eof if($_REQUEST['RAPORT_WYNIKOWY_ala_Cyperska']) ###############################################
    699. 

  699. 

  700. 

  701. 

  702. 

  703. 

  704. 

  705. echo "<form method=\"post\" enctype=\"multipart/form-data\"> \n
    706. 

  706. <input type=hidden name=KSIEG_DOKUMENTY_ZASOB1182_SUBIEKT_MSSQL_IMPORT value=1>
    707. 

  707. <input type=hidden name=UPDATE_MAPA_DEKRETOW value=1>
    708. 

  708. <input type=submit value='AKTUALIZUJ_MAPE_DEKRETOW ( po imporcie XML)'></form><br>
    709. 

  709. ";
    710. 

  710. 

  711. 

  712. 

  713. echo "<form method=\"post\" enctype=\"multipart/form-data\"> \n
    714. 

  714. <input type=hidden name=KSIEG_DOKUMENTY_ZASOB1182_SUBIEKT_MSSQL_IMPORT value=1>
    715. 

  715. <input type=hidden name=RAPORT_WYNIKOWY_ala_Cyperska value=1>
    716. 

  716. <input type=submit value=RAPORT_WYNIKOWY_ala_Cyperska></form><br>
    717. 

  717. ";
    718. 

  718. 

  719. 

  720. 

  721. echo "<form method=\"post\" enctype=\"multipart/form-data\"> \n
    722. 

  722. <input type=hidden name=KSIEG_DOKUMENTY_ZASOB1182_SUBIEKT_MSSQL_IMPORT value=1>
    723. 

  723. <input type=hidden name=ANALIZUJ_PLYNNOSC_KONT_2XX value=1>
    724. 

  724. <input type=submit value=ANALIZUJ_PLYNNOSC_KONT_2XX></form><br>
    725. 

  725. ";
    726. 

  726. 

  727. 

  728. echo "<form method=\"post\" enctype=\"multipart/form-data\"> \n
    729. 

  729. <input type=hidden name=KSIEG_DOKUMENTY_ZASOB1182_SUBIEKT_MSSQL_IMPORT value=1>
    730. 

  730. <input type=hidden name=AKTUALIZACJA_ZAMOWIEN_ZD_SUBIEKT value=1>
    731. 

  731. <input type=submit value=AKTUALIZACJA_ZAMOWIEN_ZD_SUBIEKT></form><br>
    732. 

  732. ";
    733. 

  733. 

  734. 

  735. 

  736. echo "<form method=\"post\" enctype=\"multipart/form-data\"> \n
    737. 

  737. <input type=hidden name=KSIEG_DOKUMENTY_ZASOB1182_SUBIEKT_MSSQL_IMPORT value=1>
    738. 

  738. <input type=hidden name=IMPORT_FAKTUR_Z_ZASOB_719 value=1>
    739. 

  739. <input type=submit value=IMPORT_FAKTUR_Z_ZASOB_719></form><br>
    740. 

  740. ";
    741. 

  741. 

  742. 

  743. 

  744. 

  745. echo "<form method=\"post\" enctype=\"multipart/form-data\"> \n
    746. 

  746. <table border=1><tr><td colspan=2>
    747. 

  747. <input type=hidden name=KSIEG_DOKUMENTY_ZASOB1182_SUBIEKT_MSSQL_IMPORT value=1>
    748. 

  748. <br>wkaz lokalizacje ZSO - szczegolowe w postaci XML (analityka 4)
    749. 

  749. <label for=\"file\">Filename:</label>
    750. 

  750. <input type=\"file\" name=\"file1182\" id=\"file1182\">\n
    751. 

  751. </td></tr>
    752. 

  752. <tr><td>POCZATEK OKRESU IMPORTOWANYCH DANYCH</td><td>DATA KONCA IMPORTU DANYCH</td></tr> 
    753. 

  753. <tr><td><br>ROK YYYY<input type=text size=4 name=START_ROK value=".$_REQUEST['START_ROK']."> \n
    754. 

  754. <br>MIESIAC MM<input type=text size=2 name=START_MIESIAC value=".$_REQUEST['START_MIESIAC']."> \n
    755. 

  755. <br>DZIEN DD<input type=text size=2 name=START_DZIEN value=".$_REQUEST['START_DZIEN']."> \n
    756. 

  756. </td><td><br>ROK YYYY<input type=text size=4 name=KONIEC_ROK value=".$_REQUEST['KONIEC_ROK']."> \n
    757. 

  757. <br>MIESIAC MM<input type=text size=2 name=KONIEC_MIESIAC value=".$_REQUEST['KONIEC_MIESIAC']."> \n
    758. 

  758. <br>DZIEN DD<input type=text size=2 name=KONIEC_DZIEN value=".$_REQUEST['KONIEC_DZIEN']."> \n
    759. 

  759. </td></tr>
    760. 

  760. 

  761. <tr><td colspan=2>Ignorowanie Bilansow Otwarcia - BO-1 <input type=CHECKBOX name=IGNORE_BO";
    762. 

  762.  if($_REQUEST['IGNORE_BO']) echo " checked=1 ";
    763. 

  763. echo "></td></tr>
    764. 

  764. 

  765. <tr><td colspan=2>Wgranie pliku skasuje wszystkie TYP_DOKUMENTU=IMPORT danych w FAKTURY dla  <input type=submit value=wyslij></td></tr>
    766. 

  766. 

  767. </table>
    768. 

  768. 

  769. </form>";
    770. 

  770. 

  771. //phpinfo();
    772. 

  772. 

  773. /*
    774. 

  774. 

  775. echo "TEST";
    776. 

  776. 

  777. $db=mssql_connect($myServer,$myUser,$myPass);
    778. 

  778. mssql_select_db($myDB,$db);
    779. 

  779. 

  780. $query="
    781. 

  781. SELECT KhEw.kh_Id,KhEw.kh_Zablokowany,KhEw.kh_Osoba,KhEw.kh_Rodzaj,KhEw.kh_Symbol,AdrEwid.adr_Id,AdrEwid.adr_Nazwa,AdrEwid.adr_NIP,AdrEwid.adr_Adres,AdrEwid.adr_Miejscowosc,AdrEwid.adr_NazwaPelna,case
    782. 

  782. 

  783. when kh_NrAnalitykaO<>'' and kh_NrAnalitykaD<>'' and kh_NrAnalitykaO <> kh_NrAnalitykaD
    784. 

  784. 

  785. then 'BLAD w analitykach '+kh_NrAnalitykaO + ' ' + kh_NrAnalitykaD
    786. 

  786. 

  787. when kh_NrAnalitykaD<>''        then kh_NrAnalitykaD
    788. 

  788. 

  789. when kh_NrAnalitykaO<>''        then kh_NrAnalitykaO
    790. 

  790. 

  791. else        ''
    792. 

  792. end as Analityka,Flagi.flg_Numer,FlagiWartosci.flw_CzasOstatniejZmiany,FlagaUzytk.uz_Identyfikator,FlagiWartosci.flw_Komentarz,FlagiWartosci.flw_IdFlagi,Flagi.flg_Text,Flagi.flg_Id FROM kh__Kontrahent AS KhEw LEFT JOIN adr__Ewid AS AdrEwid ON KhEw.kh_Id=AdrEwid.adr_IdObiektu LEFT JOIN sl_Wojewodztwo AS WojEwid ON AdrEwid.adr_IdWojewodztwo=WojEwid.woj_Id LEFT JOIN (SELECT adr_IdObiektu as kdk_IdKontrahenta, COUNT(adr_IdObiektu) AS IleDokBibl FROM bib_Dokument LEFT JOIN adr__Ewid ON adr_Id = bib_IdObiektu WHERE bib_TypObiektu = 1 GROUP BY adr_IdObiektu) AS BiblDok ON KhEw.kh_Id=BiblDok.kdk_IdKontrahenta LEFT JOIN (SELECT zdk_IdKlienta,COUNT(zdk_IdZadania) AS LiczbaNotatek FROM zd_Uczestnik INNER JOIN zd__Zadanie ON zd_Id=zdk_IdZadania AND zd_Rodzaj=4 GROUP BY zdk_IdKlienta) AS KhNotatka ON AdrEwid.adr_Id=KhNotatka.zdk_IdKlienta LEFT JOIN fl_Wartosc AS FlagiWartosci ON KhEw.kh_Id=FlagiWartosci.flw_IdObiektu AND flw_IdGrupyFlag = 18 LEFT JOIN pd_Uzytkownik AS FlagaUzytk ON FlagiWartosci.flw_IdUzytkownika=FlagaUzytk.uz_Id LEFT JOIN fl__Flagi AS Flagi ON FlagiWartosci.flw_IdFlagi=Flagi.flg_Id";
    793. 

  793. // WHERE kh_Jednorazowy=0 AND ((adr_Id is NULL) OR (adr_TypAdresu = 1)) AND KhEw.kh_IdGrupa=4";
    794. 

  794. 

  795. $query="select * from sys.Tables";
    796. 

  796. 

  797. //$query="SELECT column_name , data_type + COALESCE( '(' + CAST(character_maximum_length AS VARCHAR) + ')' , '(' + CAST(numeric_precision AS VARCHAR) + ')' , '' ) , column_default, is_nullable FROM information_schema.columns WHERE table_name = '__BeforeDropOldTables';";
    798. 

  798. 

  799. $query="nz__Finanse";
    800. 

  800. 

  801. $result=mssql_query($query);
    802. 

  802. 

  803. if ($result_arr=mssql_fetch_array($result)) {
    804. 

  804. 	echo "<table border=1><tr>";
    805. 

  805. 	for ($i=0;$i<mssql_num_fields($result);$i++) {
    806. 

  806. 		$fields_name[]=mssql_field_name($result,$i);
    807. 

  807. 		echo "<td>".mssql_field_name($result,$i)."</td>";
    808. 

  808. 	}
    809. 

  809. 	echo "</tr>";
    810. 

  810. 	do {
    811. 

  811. 		echo "<tr>";
    812. 

  812. 		foreach ($fields_name as $field_name)
    813. 

  813. 			echo "<td>".$result_arr[$field_name]."</td>";                 
    814. 

  814.        		
    815. 

  815.               
    816. 

  816. 		echo "</tr>";
    817. 

  817. 		
    818. 

  818. 

  819. /*		 //###
    820. 

  820.        		$query2="SELECT                                      column_name
    821. 

  821. 						,         data_type +
    822. 

  822.                          COALESCE(
    823. 

  823.                                          '(' + CAST(character_maximum_length AS VARCHAR) + ')'
    824. 

  824.                                       ,  '(' + CAST(numeric_precision AS VARCHAR) + ')'
    825. 

  825.                                       ,  ''
    826. 

  826.                                       ) ,         column_default,         is_nullable FROM information_schema.columns
    827. 

  827.                             			WHERE
    828. 

  828.                                       table_name = '".$result_arr[0]."';";
    829. 

  829.        		
    830. 

  830.        			//echo "<tr><td colspan=20>".$query2."<br>";
    831. 

  831. 

  832. 				$result2=mssql_query($query2);
    833. 

  833. 				
    834. 

  834. 				
    835. 

  835. 				if ($result_arr2=mssql_fetch_array($result2)) {
    836. 

  836.  						echo "<tr><td colspan=20><table border=1><tr>";
    837. 

  837.  						for ($i=0;$i<mssql_num_fields($result2);$i++) {
    838. 

  838.  							$fields_name2[]=mssql_field_name($result2,$i);
    839. 

  839.  							echo "<td>".mssql_field_name($result2,$i)."</td>";
    840. 

  840.  						}
    841. 

  841.  						echo "</tr>";
    842. 

  842.  						do {
    843. 

  843.  							echo "<tr>";
    844. 

  844.  							foreach ($fields_name2 as $field_name)
    845. 

  845.  								echo "<td>".$result_arr2[$field_name]."</td>";                 
    846. 

  846.  					       		
    847. 

  847.  					              
    848. 

  848.  							echo "</tr>";
    849. 

  849.  							
    850. 

  850. 							} while ($result_arr2=mssql_fetch_array($result2));
    851. 

  851. 							echo "</table></td></tr>";
    852. 

  852. 				}
    853. 

  853. 				
    854. 

  854. 			       			
    855. 

  855.        		
    856. 

  856.        		//###
    857. 

  857. 		 
    858. 

  858. 		
    859. 

  859. 	} while ($result_arr=mssql_fetch_array($result));
    860. 

  860. 	echo "</table>";
    861. 

  861. }
    862. 

  862. 

  863. 

  864. */
    865. 

  865. 

  866. 

  867. 

  868. ?></body></html>
    869.