nfoworm

(bez virsraksta)

Jun. 15., 2004 | 12:48 pm
No:: nfoworm

Tagad veel aizvien chakareejos ar taam Formulaam... Kods tipa shitaads:
@If(Tips = "Juridiskā persona";@Do(
    JurPersonasKonti := 0;
    @Set("JurPersonasKonti"; @DbLookup("" : "NoCache"; @DbName; "RegNrKonti"; JurPerRegNr; 2));
    Konts1 := KontaNodala + "-" + KontaNumurs + "-" + KontaSufiks;
    @If(KN2!="" & KNum2 !="" & KS2 !="";Konts2 := KN2 + "-" + KNum2+"-"+KS2;Konts2 := "");
    @If(KN3!="" & KNum3 !="" & KS3 !="";Konts3 := KN3 + "-" + KNum3+"-"+KS2;Konts3 := "");
    @If(JurPersonasKonti != "";@Do(
        @If(@IsMember(Konts1;JurPersonasKonti);@Failure("Lūdzu pārskatiet ievadītās juridiskās personas kontus, jo tāda juridiskā persona vai tādi konta numuri jau ir ievadīti!");@Prompt([Ok];"Konts1";"Viss kedā - šitā konta nav!"));
        @If(Konts2 != "" & @IsMember(Konts2;JurPersonasKonti);@Failure("Lūdzu pārskatiet ievadītās juridiskās personas kontus, jo tāda juridiskā persona vai tādi konta numuri jau ir ievadīti!");@Prompt([Ok];"Konts2";"Viss kedā - šitā konta nav!"));
        @If(Konts3 != "" & @IsMember(Konts3;JurPersonasKonti);@Failure("Lūdzu pārskatiet ievadītās juridiskās personas kontus, jo tāda juridiskā persona vai tādi konta numuri jau ir ievadīti!");@Prompt([Ok];"Konts3";"Viss kedā - šitā konta nav!"))
         );
     "")
     );"")

Karoch viss tiek jauki nodetekteets, ka 1.konts eksistee - bet Failures message netiek izdota... BLJODA! Piebesiijis jaut tas viss :)

Link | view all comments


Reply

No:
Lietotājvārds:
Parole:
Ievadi te 'qws' (liidzeklis pret spambotiem):
Temats:
Tematā HTML ir aizliegts
  
Ziņa:

Gandrīz jau aizmirsu pateikt – šis lietotājs ir ieslēdzis IP adrešu noglabāšanu. Operatore Nr. 65.