826a827,842
> 	/* INICIALIZACE fooi a foot */
> 	PLpgSQL_var *var;
> 
> 	var = (PLpgSQL_var *) (estate->datums[block->sqlcode_varno]);
> 	var->isnull = false;
> 	var->freeval = false;
> 	var->value = DirectFunctionCall1(textin, CStringGetDatum("000000"));
> 
> 	var = (PLpgSQL_var *) (estate->datums[block->sqlerrm_varno]);
> 
> 	var->isnull = false;
> 	var->freeval = false;
> 	var->value = DirectFunctionCall1(textin, CStringGetDatum("Sucessful completion"));
> 
> 
> 
931a948,966
> 			/* unpack MAKE_SQLSTATE code */
> 			char		tbuf[12];
> 			int			ssval;
> 			int			i;
> 
> 			ssval = edata->sqlerrcode;
> 			for (i = 0; i < 5; i++)
> 			  {
> 			    tbuf[i] = PGUNSIXBIT(ssval);
> 			    ssval >>= 6;
> 			  }
> 			tbuf[i] = '\0';
> 			var = (PLpgSQL_var *) (estate->datums[block->sqlcode_varno]);
> 			var->value = DirectFunctionCall1(textin, CStringGetDatum(tbuf));
> 
> 			var = (PLpgSQL_var *) (estate->datums[block->sqlerrm_varno]);
> 			var->value = DirectFunctionCall1(textin, CStringGetDatum(edata->message));
> 
>