- iliyan iliev
- SnapDevelop
- Thursday, 21 May 2020 01:06 PM UTC
private function long load_adres_dok (string asidf_dok, ref str_adrms adres);str_adrms ladr, empty_adr
adres = empty_adr
select first 1 trim(cod_ime_osi('eknm_d',eknm))||' ОБЩ.'||trim(cod_ime_obs(eknm))||' ОБЛ.'||trim(cod_ime_obl(eknm))||' '||cod_ime_ul(kod_ul)||' '||nvl(nomer,'')||' '||nvl(vhod,''),
fa.sid_f, fa.fact , (select eknm_5 from eknm_d where cod_z=adres.eknm and valid='0'), (select obstina from eknm_d where cod_z=adres.eknm and valid='0') obs,
(select oblast from eknm_d where cod_z=adres.eknm and valid='0') obl, cod_bulul(adres.kod_ul) bul_ul,
trim(cod_ime_osi('eknm_d',eknm)), trim(cod_ime_obs(eknm)), trim(cod_ime_obl(eknm)), cod_ime_ul(kod_ul),
nomer, vhod, fd.etaj, fd.apart, get_podel_eknm(eknm), trim(cod_ime_osi('podl_d',get_podel_eknm(eknm))), fa.sid_f
into :ladr.text, :ladr.faddop.sid_f, :ladr.faddop.vid_adr, :ladr.adr.eknm, :ladr.adr.obs, :ladr.adr.obl, :ladr.adr.kod_ul,:ladr.adr.eknm_text, :ladr.adr.obs_text, :ladr.adr.obl_text, :ladr.adr.ul_text,
:ladr.adr.nomer, :ladr.adr.vhod, :ladr.faddop.etaj, :ladr.faddop.apart, :ladr.faddop.cel_preb, :ladr.faddop.cel_text, :ladr.faddop.sid_f
from fbdk fa, adres, outer (fact_pr pr, outer fad_dop fd)
where fa.sid_f = :asidf_dok and fa.cod_t=17 and fa.rol_o=29 and
adres.sid_o=fa.sid_o and adres.pnr_o=fa.pnr_o and
pr.sid_f=fa.sid_f and pr.cod_t=64 and fd.sid_f = pr.sid_o and fd.mrk_akt='Y'
using shsqlca;
if shsqlca.sqlcode < 0 then
is_errmess='Error in n_ezvl::load_act_data Select from adres ['+string(shsqlca.sqldbcode)+']-'+shsqlca.sqlerrtext
_onerror(shsqlca.sqldbcode);
return -1
end if
if shsqlca.sqlcode = 100 then return 100
adres = ladr
return 0
end function
when i try this function translate to c# give me error - 'capacity' must greater than zero. Parameter name : capacity !
Find Questions by Tag
Helpful?
If a reply or comment is helpful for you, please don’t hesitate to click the Helpful button. This action is further confirmation of their invaluable contribution to the Appeon Community.