Sel.al arkadaşlar.ssk nın welf elektronik faturalama sistemini devreye aldı.şimdi https://195.245.227.9/welfws/services/W ... sleri.wsdl bu linkteki wsdl i delphi ye aldım bi unit oluştu.fonksiyonlara rahatlıkla ulaşıp işlem yapabiliyorum.yalnız çözemediğim bi sorun var .doktor branşlarının listelendiği bi bölüm var .bu bölümün kodları şu şekilde.
BransAraKriterWS = class(TRemotable)
private
Fad: WideString;
FtesisKodu: Integer;
published
property ad: WideString read Fad write Fad;
property tesisKodu: Integer read FtesisKodu write FtesisKodu;
end;
BransWS = class(TRemotable)
private
FbransAdi: WideString;
FbransSbKodu: WideString;
published
property bransAdi: WideString read FbransAdi write FbransAdi;
property bransSbKodu: WideString read FbransSbKodu write FbransSbKodu;
end;
BransListDonusWS = class(TRemotable)
private
Faciklama: WideString;
Fbranslar: BransWS;
FsonucKodu: Integer;
public
destructor Destroy; override;
published
property aciklama: WideString read Faciklama write Faciklama;
property branslar: BransWS read Fbranslar write Fbranslar;
property sonucKodu: Integer read FsonucKodu write FsonucKodu;
end;
burda branslistdonusws aranan branşları liste halinde almaya yarıyor.ben gelen tek branşı ala biliyorum liste şeklinde alamıyorum.
benim yazdığım kodlarım şu şekilde.
procedure Tfbransara.Button1Click(Sender: TObject);
var
bransara:BransAraKriterWS;
sonuc:BransListDonusWS;
brans:bransws;
begin
bransara:=BransAraKriterWS.Create;
sonuc:=BransListDonusWS.Create;
brans:=bransws.Create;
bransara.ad:=bransadi.Text;
bransara.tesisKodu:=strtoint(fmuayeneislemleri.tesis.Text);
sonuc:= GetWelfWebServisleri.bransAra(bransara);
brans:=sonuc.branslar;
end;
burda branslistdonusws de listelenen kayıtların sayısını veren bi parametre yok tüm listelenen kayıtları nasıl alırım yardımlarınızı bekliyorum arkadaşlar.
web servisleri hakkında bi sorunum var.
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
Re: web servisleri hakkında bi sorunum var.
Merhabameron06 yazdı:Sel.al arkadaşlar.ssk nın welf elektronik faturalama sistemini devreye aldı.şimdi https://195.245.227.9/welfws/services/W ... sleri.wsdl bu linkteki wsdl i delphi ye aldım bi unit oluştu.fonksiyonlara rahatlıkla ulaşıp işlem yapabiliyorum.yalnız çözemediğim bi sorun var .doktor branşlarının listelendiği bi bölüm var .bu bölümün kodları şu şekilde.
bu konu hakkında biraz bilgi verebilirmisiniz. Hem kodunuz hemde konu hakkında öğrenmek istediğim konular var. Web servisleri konusunda ve nasıl kullandığınız hakkında bilgi verirseniz sevinirim.