                      JURNALE DE VANZARI/IESIRI V8.DC

PARAMETRI:

  Parametrii de formare pret (trebuie scrise din prima coloana in Parametrii):
  --------------------------
    altv sau combinatiile: l, v, al, alvt
        a - adaos : (PuLiv-PuInit)/PuInit*100
        l - PuLiv : se propune fie pret din nomenclator, fie PuLivCat din lot
        t - TVA   : PuLiv*Tva/100
        v - PuVinz: PuLiv + TVA, se propune PuVinzCat din lot
        Obs. -PuInit la produse si servicii nu este reactualizat
              ramane PuInit = PuLivCat si astfel apare adaos

    E - factura de export
        se lucreaza cu PuLivVal si PuLiv
        pu propus: pu din nomenclator in valuta (daca aceeasi valuta)
                   pu din nomenclator in lei convertit in moneda facturii
                       la cursul facturii
                   PuLivCat convertit in moneda facturii la cursul facturii
        Obs. PuVin = PuLiv
             PuInit la produse si servicii este reactualizat la PuLiv

    LRV sau combinatiile VRL, LR, VR, L, V
        L - PuLiv : se propune pu din nomenclator sau PuLivCat din lot
        R - Rabat : se propune 0
            Relatia de calcul: Rabat = (VVinz-VLiv)/VVinz*100
        V - PuVinz: se propune acceasi valoare cu PuLiv
        Obs. -PuInit la produse si servicii este reactualizat la PuLiv
             -in cazul L sau V: PuLiv = PuVinz si Rabat = 0

    AV
        A - adaos : se propune 0
            adaosul se calculeaza fata de PuLiv: (VVinz-VLiv)/VLiv*100
        V - PuVinz: se propune pu din nomenclator sau PuLivCat,
        Obs. -adaosul fata de PuInit (adaos cumulat) apare afisat cu AdC,
             -PuLiv nu se modifica, ramine PuLivCat din lot
             -VBazaTva si VTva trebuie recalculat in validare

    fara parametru de formare pret la jurnale MVI si MVF:
        se lucreaza cu PuVin = PuLiv = PuCont si nu se poate modifica
        se utilizeaza pentru iesiri interne, iesire in custodie etc.

    fara parametru de formare pret la jurnalul MVR:
        preia parametrii de formare de pret din factura referita

  Altele (trebuie scrise dupa parametrii de formare pret):
  ------
    T - document cu T.V.A.
        daca lipseste documentul se considera cu ICM
    G - pret de vanzare en-gros   pe baza cota adaos din Grupe
    D - pret de vanzare en-detail pe baza cota adaos din Grupe
        Calcul: PuLiv = PuInit+PuInit*adaos/100

    d - se cere completare manuala delegat
        (presupune optiunea Campuri suplimentare)

    1 - se cere completare manuala cod centru pentru document
    2 - se cere completare manuala cod centru pentru lot iesire
        centrele (1,2) raman modificabile si dupa validare 
        pentru documentele cu data inregistrarii dupa data arhivei
        (1,2-presupune optiunea Centre de cost/profit)
        
    i - incasari in curs (trebuie sa existe campul INCCURS)
    
    C - se cere completare manuala numar comanda
    c - se cere completare manuala cod centru de cheltuieli-gestiune

    O - se cere completare manuala camp Grupa pt. ordonare randuri
    = - textul liber din precedentul document de acelasi tip al aceluiasi
        client se preia in textul liber al documentului nou adaugat

    s - data scadenta; (s) - numai in regim de vizualizare

    J - tip operatie TVA modificabil pe fereastra

    x - apare fereastra text liber     

    m - document cu pret cu amanuntul,
        este afisat cap tabel cu PuVanz, ValVanz in loc de PuLiv, ValLiv
        
    o - la editarea loturilor de iesire se afiseaza variabilele 
        facr_desc2, facr_desc3, facr_desc4 daca au valoare, 
        in regim de consultare. 
        Face posibila afisarea unor informatii suplimentare despre lot.
        Incarcarea variabilelor se implementeaza in scriptul FACRD 
        care se apeleaza inainte si dupa citirea campurilor din fisier, 
        precum si la modificarea codului de articol.
      - se afiseaza campurile OBS1, OBS2, OBS3 daca exista 
        (cu lungime modificabila)
        (presupune optiunea Campuri suplimentare) 

    g - alegerea automata a unui lot de iesire, implementat cu scriptul FACRL_
        Scriptul se apeleaza la schimbarea lotului (sectiunea CAUTA_LOT) si
        la sfarsit (parasirea campului, sectiunea LOT_ALES, care face 
        posibila inserarea unor taste pentru alegerea campului urmator
        in vederea facilitarii operarii)

    p - afisare, completare campuri suplimentare, 
        daca exista camp suplimentar in fisier
        Valabil si pentru antet document si pentru lotul de intrare.
       (presupune optiunea Campuri suplimentare)   
    
------------------------------------------------------------------------------
|    Denumire     |Format | Explicatii                                       |
|    variabila    |       |                                                  |
------------------------------------------------------------------------------

----------------------------
Formule de initializare
----------------------------
 xF_lOpTva                 lista OpTva admise in tip document
                           ex. := {"1Iz","1Ix","6Iz"}    
 xF_FiltLot                filtru de selectie Lot de intrare          
                           la adaugare lot de iesire 
                           ex. la amanunt:, numai marfuri cu amanuntul 
                               := 'lotm->TIPGEST="MA"'
                           ex. la ridicata: numai marfuri cu ridicata si
                               din gestiuni cu cod care incep cu MR
                               := '!(lotm->TIPGEST="MA").AND.lotm->GEST="MR"'

 xF_FiltLot2               filtru in fereastra de ajutor Loturi intrare/stoc,
                           apelat la introducerea loturilor de iesire, 
                           cu efect in coloana "D" din fereastra de ajutor.
                           Articolele pentru care filtrul returneaza .T. 
                           vor fi marcate cu "*" in coloana "D", deci si afisate.
                           Valoarea implicita pentru filtru:
                             "lotm->STOCI=0.OR.lotm->STOCI-lotm->IESIRI>0"
                               
---------------------------
#INCEPUT, #RIND, #SFIRSIT
---------------------------
 xF_Aplicatie      C,30    Identificator aplicatie
 xF_Jrn            C,5     Cod jurnal:
                           "MVF  "-facturi, "MVR  "-retururi, "MVI  "-interne

 xF_NrFac          C,6     Numar factura/doc.iesire
 xF_NrRegSp        C,10    Numar regim special
 xF_DataFac        D,8     Data factura/doc.iesire
 xF_DataScad       D,8     Data scadenta factura
 xF_TipFac         C,5     Tip document
 xF_StareFac       C,3     "V"-finala,"P"-proforma," "-anulata, "X"-incompleta
 xF_CodLista       C,10    F -se extrage in fisa client si facturi neincasate
 xF_OpTva          C,5     Operatii TVA
 xF_NrRef          C,6     Numar factura referita, este folosit doar la
                           retururi si contine nr.facturii la care se refera
                           returul
 xF_FacTva         L,1     .T. - factura cu TVA, .F. - factura cu ICM
 xF_NrCmd          C,12    Nr. comanda
 xF_CentDoc        C,11    Centru document
 xF_Delegat        C, 5    Delegat, condicionat de optiunea Campuri suplimentare
                           si campul DELEG 
 
 xF_CodClient      C,7     Cod client
 xF_TipClient      C,3     Tip client: "F..", "P  ", "G  ", "S  "
 xF_ContClient     C,3     Contul contabil al clientului
 xF_Client         C,30    Denumire client
 xF_CodFisC        C,15    Cod fiscal client
 xF_CodRcoC        C,15    Cod registrul comertului - client
 xF_CodPC          C,7     Cod postal client
 xF_LocC           C,20    Localitate client
 xF_CodJudC        C,2     Cod judet client
 xF_JudC           C,15    Judet client
 xF_CodTaraC       C,3     Cod tara client
 xF_TaraC          C,15    Tara client
 xF_Adr1C          C,40    Adresa client rindul 1
 xF_Adr2C          C,40    Adresa client rindul 2
 xF_ContC          C,20    Contul curent al clientului
 xF_BancaC         C,35    Banca la care este deschis contul xF_ContC

 xF_TotFac         N15.2   Total valoare factura in lei
 xF_Moneda         C3      Moneda facturii
 xF_CursSch        N 9.6   Cursul de schimb al facturii
 xF_TotFacVal      N12.2   Total valoare factura in valuta (moneda xF_Moneda)
 xF_TotVinz        N15.2   Total valoare vanzare
 xF_TotLiv         N15.2   Total valoare livrare
 xF_TotLivVal      N12.2   Total valoare livrare in valuta (moneda xF_Moneda)
 xF_TotCont        N15.2   Total valoare contabila: Cmp/Inr/VinzCat
 xF_TotTva         N15.2   Total valoare TVA
 xF_TotAcz         N15.2   Total valoare accize - varianta TVA
 xF_TotIcm         N15.2   Total valoare ICM
 xF_TotAcc         N15.2   Total valoare accize - varianta ICM
 xF_TotRabat       N15.2   Total valoare rabat = xF_TotVinz-xF_TotLiv

 xF_Linia1, ... ,  C, ...  Linia 1 din textul liber, ... ,
 xF_Linia9                 linia 9 din textul liber

 xF_NrEx           N       Numarul de exemplar curent (numai la model)
 xF_Sf             L,1     Sfarsit document ? (numai la model)
                           In sectiunile #INCEPUTPAGINA, #SFIRSITPAGINA indica
                           daca au fost apelate din sectiunea #RIND (.F.) sau
                           din sectiunea #SFIRSIT (.T.).

 xF_SfGrupa        L,1     Sfarsit grupa ? (numai la model)
                           In sectiunile #INCEPUTPAGINA, #SFIRSITPAGINA indica
                           daca au fost apelate din sectiunea #RIND (.F.) sau
                           din sectiunea #SFIRSITGRUPA (.T.).

 xF_Explicatii     C,40    Explicatii utilizabile in formule de contare

 xF_1, xF_2, ..., xF_9     Variabile utilizator
 
 x_1, x_2, ..., x_9        Variabile utilizator globale

 xF_TipTva         C,3     Tip TVA a primului lot
 xF_Tva            N,3     Cota TVA a primului lot
 
 xF_sDcm                   Numai la listare.
                           Contine imaginea documentului in curs de creare.
                           
 xF_lStocNeg       L,1     in functie de setare se trateaza stocul negativ                           
                           NIL - se accepta stocul negativ in conformitate cu
                                 optiunea operatorului (implicit),
                           .T. - se accepta stocul negativ neconditionat,
                           .F. - nu se accepta stocul negativ
                           
 xF_ExRiscEF       L,1     in doc.exista articole cu risc fiscal ridicat/e-Fac?   
 xF_IdInc          C,15    Cod incarcare   in SPV (daca mod incarcare H)
 xF_IdDes          C,15    Cod descarcare din SPV (daca mod incarcare H) 
 xF_EfTip          C,02    F este obligatorie e-Factra/e-Transport? 
 xF_EfStare        C,02    1,1*,...4,4* stare e-Factura (daca mod incarcare H)

 xF_ExRiscET       L,1     in doc.exista articole cu risc fiscal ridicat/e-Tran?   
 xF_UIT            C,16    cod UIT
 xF_EtTip          C,02    t - exista articole cu risc fiscal de transport
                           T - xF_EtMasa > 500 sau xF_EtVLiv > 10000
                               pentru articolele xF_RiscFT
                           D,tD,TD - este creat document e-Transport 
 xF_EtFaza         C,01    N-Notficare,C-Corectie,R-Confirmare,S-Stergere
 xF_EtStare        C,02    1,1*,...4,4* stare e-Transport (daca mod incarcare H)
 xF_EtMasa         N,15,6  Total masa bruta pentru e-Transport
 xF_EtVLiv         N,15,2  Total valoare livrare pentru e-Transport

----------------------------
#RIND   (numai)
----------------------------
 xF_CodM           C,15    Cod articol
 xF_Prov           C,1     Provenienta:
                           "I"-import "P"-productie, "S"-servicii,
                           "C"-de la producator/din comert intern
 xF_DenumM         C,30    Denumire articol
 xF_BarCod         C,15    Cod de bare
 xF_NrSGR          N,3     Numar amabalaje SGR (0-fara, 1-unu,..., 6-bax)
 xF_DescrM         C,max60 Descriere articol

 xF_Gest           C,4     Cod gestiune
 xF_CodGr          C,6     Cod grupa de articole (din Lot iesire)
 xF_DenumGr        C,30    Denumire grupa de articole
 xF_Cent           C,4     Cod centru de cheltuieli
 xF_CentLot        C,12    Cod centru lot
 xF_CentStoc       C,12    Cod centru stoc (cod centru de pe lotul de intrare)
 xF_TipM           C,2     "M"-marfa,"P"-produs,
                           "S"-lucrari/servicii, "G"-material etc.
 xF_MetStoc        C, 4    metoda de evaluare: CMPL sau cu pret fix,
 xF_ContM          C,11    Cont de stoc (identic cu xF_ContI)
 xF_ContV          C,11    Cont de venit (pe gupe de articole)

 xF_Cont (xF_Gest, xF_CodGr,
                            @xF_TipM,
                            @xF_ContI, @xF_ContId, @xF_ContE, @xF_ContEd,
                            @xF_GestI, @xF_GestId, @xF_GestE, @xF_GestEd)
               In contabilitatea generala:
 xF_ContI          C,11    Cont de intrare/stoc      [numai prin xF_Cont(..)]
 xF_ContId         C,11    Cont de diferente intrare [numai prin xF_Cont(..)]
 xF_ContE          C,11    Cont de iesire            [numai prin xF_Cont(..)]
 xF_ContEd         C,11    Cont de descarcare iesire [numai prin xF_Cont(..)]
               In contabilitatea de gestiune:
 xF_GestI          C,11    Cont de intrare/stoc      [numai prin xF_Cont(..)]
 xF_GestId         C,11    Cont de decontare intrari [numai prin xF_Cont(..)]
 xF_GestE          C,11    Cont de iesire            [numai prin xF_Cont(..)]
 xF_GestEd         C,11    Cont de descarcare/decont.[numai prin xF_Cont(..)]


 xF_NrRec          C,6     Numar receptie/transport

 xF_Um             C,3     Unitate de masura de facturare
 xF_UmN            C,3     Unitate de masura ECE
 xF_NC             C,12    Cod NC
 xF_CPV            C,12    Cod CPV 
 xF_RiscEF         L,1     Articol cu risc fiscal ridicat d.p.v. e-Factura
 xF_RiscET         L,1     Articol cu risc fiscal ridicat d.p.v. e-Transport
 
 xF_UmAmb ()       C,max20 Unitate de masura ambalare. Ex: "SET = 12 BUC"
 xF_Cantit         N12.3   Cantitate
 xF_CantAmb ()     C,max20 Cantitatea in UM ambalaj. ex. 10 CUT + 5 BUC
 xF_MasaN          N,13.6  Masa neta  (kg)
 xF_MasaB          N,13.6  Masa bruta (kg)

 xF_PuInit         N15.2   PU cu ridicata
 xF_PuCmpVal       N12.2   PU cumparare in valuta
 xF_MonedaCmp      C3      Moneda de cumparare
 xF_CursCmp        N9.6    Curs de schimb xF_MonedaCmp la cumparare
 xF_CursAct        N9.6    Curs de schimb xF_MonedaCmp in ziua facturarii
 xF_PuCmp          N15.2   PU cumparare in lei
 xF_PuInr          N15.2   PU inregistrare
 xF_PuContL        N15.2   PU contabil: Cmp/Inr/VinzCat din lot stoc
 xF_PuLivCat       N15.2   PU livrare catalog in lei
 xF_PuVinzCat      N15.2   PU vanzare catalog in lei
 xF_PuCont         N15.2   PU contabil: Cmp/Inr/VinzCat din lot iesire
 xF_PuLiv          N15.2   PU livrare in lei
 xF_PuLivVal       N12.3   PU livrare in valuta (moneda xF_Moneda)
 xF_PuVinz         N15.2   PU vanzare in lei

 xF_AdComV         N6.2    Adaos comercial la vanzare (%)
 xF_Rabat          N6.2    Cota rabat (%) = xF_VRabat/xF_VVinz*100
 xF_Tva            N3      Cota TVA (%)
 xF_TvaN           N3      Cota TVA nomenclator
                           Tine cont de cotele precedente in corespondenta 
                           cu data facturii
 xF_TipTva         C3      Tip TVA: AR, AS, B..., C1, C2, C3
 xF_Acz            N3      Cota acciza (%) - varianta TVA

 xF_VInit          N15.2   Valoare la pret cu ridicata
 xF_VCmpVal        N12.2   Valoare cumparare in valuta (moneda xF_MonedaCmp)
 xF_VCmp           N15.2   Valoare cumparare in lei
 xF_VInr           N15.2   Valoare de inregistrare
 xF_VContL         N15.2   Valoare contabila: Cmp/Inr/VinzCat din lot stoc
 xF_VLivCat        N15.2   Valoare de livrare cf. catalog
 xF_VVinzCat       N15.2   Valoare de vanzare cf. catalog
 xF_VCont          N15.2   Valoare contabila: Cmp/Inr/VinzCat din lot iesire
 xF_VLiv           N15.2   Valoare livrare in lei
 xF_VLivVal        N12.2   Valoare de livrare in valuta (moneda xF_Moneda)
 xF_VVinz          N15.2   Valoare de vanzare in lei
 xF_VRabat         N15.2   Valoare rabat = xF_VVinz-xF_VLiv
 xF_VBazaTva       N12.0   Baza de impozitare TVA
 xF_VTva           N12.0   Valoare TVA
 xF_VAcz           N15.2   Valoare accize - varianta TVA
 xF_VIcm           N15.2   Valoare ICM
 xF_VAcc           N15.2   Valoare accize - varianta ICM

 xF_VCist          N15.2   Valoare cistig

 xF_CodGr          C,6     Cod grupa de articole din nomenclator
 xF_VamaN          N5.1    Taxe vamale (%) din nomenclator
 xF_IcmN           N3      Cota ICM (%) din nomenclator
 xF_AccN           N3      Cota acciza (%) din nomenclator

 xF_Obs1           Cx      Camp optional, cu lungime optionala,
 xF_Obs2           Cx      Camp optional, cu lungime optionala,
 xF_Obs3           Cx      Camp optional, cu lungime optionala,
 
---------------------------------
VALIDARE:

    Inainte de procesarea sectiunii #INCEPUT variabilele :
        xF_TotFac,xF_TotFacVal,xF_TotVinz,xF_TotLiv,xF_TotLivVal,xF_TotCont
        xF_TotTva, xF_TotAcz, xF_TotIcm, xF_TotAcc,
        primesc valoarea initiala 0.

        Variabilele utilizator xF_1,..,xF_9 nu sunt initializate.

        Variabilele globale X_1,...,X_9 nu sunt initializate, 
        sunt accesibile peste tot in program.
        Odata asignate valorile lor pot fi citite peste tot in program.

    Inainte de procesarea sectiunii #RIND variabilele de forma
        xF_V... primesc valoarea de mai jos:

        xF_VInit    := ROUND(xF_Cantit*xF_PuInit, 2)
        xF_VCmp     := ROUND(xF_Cantit*xF_PuCmp, 2)
        xF_VInr     := ROUND(xF_Cantit*xF_PuInr, 2)
        xF_VLivCat  := ROUND(xF_Cantit*xF_PuLivCat, 2)
        xF_VVinzCat := ROUND(xF_Cantit*xF_PuVinzCat, 2)
        xF_VCont    := ROUND(xF_Cantit*xF_PuCont, 2)
        xF_VLiv     := ROUND(xF_Cantit*xF_PuLiv, 2)
        xF_VVinz    := ROUND(xF_Cantit*xF_PuVinz, 2)
        xF_VRabat   := ROUND(xF_VVinz*xF_Rabat/100, 2)
        xF_VBazaTva := ROUND(xF_VLiv, 0)
        xF_VTva     := ROUND(xF_VBazaTva*xF_Tva/100, 0)
        xF_VAcz     := ROUND(xF_VLiv*xF_Acz/(100+xF_Acz), 2)
        xF_VIcm     := ROUND(xF_VInit*xF_Icm/100, 2)
        xF_VAcc     := ROUND(xF_VInit*xF_Acc/100, 2)
        xF_VCist    := 0

        Daca este necesar, se pot recalcula.

    Dupa procesarea sectiunii #RIND  valoarea curenta a variabilelor:
        xF_Descr, xF_CodGr,
        xF_PuInit, xF_PuLiv, xF_PuLivVal, xF_PuVinz,
        xF_VBazaTva, xF_Tva, xF_TipTva, xF_VTva, xF_Acz, xF_Icm, xF_Acc
        xF_CentLot, 
        xF_Obs1, xF_Obs2, xF_Obs3,
        se rescrie in fisierul "Loturi de iesire".

    Dupa procesarea sectiunii #RIND, campul castig total din
        fisierul de loturi se modifica cu
        valoarea curenta a variabilei xF_VCist.

    Dupa procesarea sectiunii #SFIRSIT valoarea curenta a variabilelor:
        xF_TotFac,xF_TotFacVal,xF_TotVinz,xF_TotLiv,xF_TotLivVal,
        xF_TotCont,xF_TotTva, xF_TotAcz, xF_TotIcm, xF_TotAcc,
        xF_CodLista, xF_OpTva, xF_NrCmd
        xF_ContClient
        xF_DataScad
        xF_CentDoc
        xF_EfTip
        se scrie in fisierul "Facturi".

xF_Incasare (xJur, xFila, xData, xTipDoc, xNrDoc, xDataDoc, xInc)
    functie de generare incasare (cind este aplelat in validare) sau
            de anulare incasare (cind este apelat in anulare) sau
            de citire incasare (cind este apelat din model).
    apelabil numai pentru jurnale incasare/plata in lei

    xJur       - jurnalul de inc/pla in care va fi generata incasarea
    [xFila]    - numar fila
    [xData]    - data fila
    xTipDoc    - tip document incasare
    [xNrDoc]   - numar document incasare, poate lipsi,
                 daca xTipDoc cu parametru + sau se completeaza manual
    [xDataDoc] - data documentului
    xInc       - suma incasata

    Obs. - parametrii netransmisi primesc valoare daca sunt apelate cu @

xF_FctInt (i, { {i1, v1}, {i2, v2}, {i3, v3} ...})
    functie constanta pe intervale:
        daca      i <= i1  -> v1
        daca i1 < i <= i2  -> v2
        daca i2 < i <= i3  -> v3
        ...

        ex.  xF_FctInt (200, {{100,2}, {1000,3}, {10000,4}}) -> 3

xF_SumaInc (nrjur,[datafila],[partener],[nrdoc],[@nrincpla])
    Calculeaza sumele incasate prin operatiile de incasare care corespund
    parametrilor transmisi.
    Vor fi luate in calcul doar incasarile validate.
    nrjur    -obligatoriu, poate reprezenta si o familie de jurnale.
              Ex. MIC,MICL,MICL1,etc.
    datafila -optional, data filei in care a fost inregistrata plata,
    partner  -optional, codul clientului, F-cod
    nrdoc    -optional, numarul facturii
    nrincpla -numar incasari

    Incasarile unei facturi:          
             xF_SumaInc("MIC",,,xF_NrFac+" ")           
    Incasari de la un partner intr-o zi:                    
             xF_SumaPla("MIC",xF_DataFac,xF_TipClient+-"+xF_CodClient,)
              
---------------------------------
MODEL:

Oriunde in formulele de model se poate utiliza obiectul de descriere a
procesului de generare a unui camp. Acest obiect are numele FCall si
structura:

        HFC_CALLNB      1     -  numarul de ordine al apelului acestui
                                 camp
        HFC_PG          2     -  numar curent pagina document
        HFC_ROW         3     -  numar curent linie document
        HFC_COL         4     -  numar curent coloana document
                                 (de la care incepe campul apelat)
        HFC_WIDTH       5     -  latimea campului apelat
        HFC_TXTLEN      6     -  lungime text pe pagina (din format pagina)
        HFC_TXTWIDTH    7     -  latime text pe pagina  (din format pagina)
        HFC_WRAP        8     -  caracterele dupa care se fragmenteaza
                                 (eventual) campul apelat

Se folosesc numai constantele numerice, astfel: FCall [1], FCall [2], ...
Constantele simbolice nu sunt recunoscute in formule.

xF_Incasare (@xJur, @xFila, @xData, @xTipDoc, @xNrDoc, @xDataDoc, @xInc)
    functie de citire incasare.

    [xJur]     - jurnalul de inc/pla in care a fost generata incasarea
    [xFila]    - numar fila
    [xData]    - data fila
    [xTipDoc]  - tip document incasare
    [xNrDoc]   - numar document incasare, poate lipsi,
    [xDataDoc] - data documentului
    [xInc]     - suma incasata

xF_NewPg (n) - salt la pagina noua, daca pe pagina curenta nu mai sunt n
               randuri libere. Returneaza "".
               Daca n lipseste, salt neconditionat la pagina noua.

xF_DenOpTva()
    Apelabil numai din formulele de model.
    Returneaza numele pentru operatia TVA de pe documentul curent.
    Numele este returnat conform denumirilor din rubrica "Oper.TVA-den" din
    dictionar. Pentru un cod nedefinit functia returneaza sirul vid.
    Se foloseste in formulele de model pentru tiparire tipului de TVA pe documentul
    de iesire.
    Exemplu:
       -in formule model se defineste campul:
        DenTva ; Denumire op.Tva ; xF_DenOpTva() ; C30
       -in model se apeleaza prin:
        {DenTva                      }

xF_CoteTva()
   Returneaza un vector incarcat cu cotele de TVA 
   inscrise in randurile facturii curente.
   Lungimea vectorului va fi egala cu numarul de coduri distincte
   inscrise in rindurile facturii curente.   
        
--------------------------------------------------------------------
DATE CLIENT PT. FACTURARE:

CodRegComC         ; Nr.reg.Com.cump. ; xF_CodRcoC    ; C15
CodFiscalC         ; Cod fiscal cump. ; xF_CodFisC    ; C15
CodPC              ; Cod postal cump. ; xF_CodPC      ; C7
LocalitateC        ; Localitate cump. ; xF_LocC       ; C20
Adresa1Cumparator  ;                  ; xF_Adr1C      ; C40
Adresa2Cumparator  ;                  ; xF_Adr2C      ; C40
SediuC             ; Sediu cumparator ; RTRIM(xF_LocC)+","+RTRIM(xF_Adr1C) ; C40
JudetC             ; Judet cumparator ; xF_JudC       ; C15
ContC              ; Cont cumparator  ; xF_ContC      ; C29

--------------------------------------------------------------------
DATE DIN SOCIETATE:

InitialeSoc        ; Nume soc.        ; x_SocData()            ; C30
DenumireSoc        ; Denumire soc.    ; x_SocData("LG_NAME")   ; C50
LocalitateSoc      ; Localitate soc.  ; x_SocData("LOCALITATE"); C20
JudetSoc           ; Judet soc.       ; x_SocData("JUDET")     ; C15
CodFiscalSoc       ; CodFiscal soc.   ; x_SocData("COD_FISCAL"); C15
CodRegComSoc       ; Cod Reg.Com.soc. ; x_SocData("COD_REGCOM"); C15

Bk1NumeFiliala     ; Banca si suc.firma;
        RTRIM(x_SocData("BK1NUME"))+" "+x_SocData("BK1FILIALA"); C35
Bk1Cont            ; Cont firma       ; x_SocData("BK1CONT")   ; C30

Telefon; Telefon                        ; x_SocData("TELEFON") ; C10
TitA   ; Functia administrator          ; x_SocData("TIT1")    ; C15
NumeA  ; Nume si prenume administrator  ; x_SocData("NAME1")   ; C30
TitC   ; Functia contabil               ; x_SocData("TIT3")    ; C15
NumeC  ; Nume si prenume contabil       ; x_SocData("NAME3")   ; C30

--------------------------------------------------------------------
Structura SOCIETATE.DBF

SH_NAME    - Character -    30
COD_FISCAL - Character -    15
COD_REGCOM - Character -    15
CAP_SOCIAL - Numeric   -    10
LG_NAME    - Character -    50
TIT1       - Character -    15
NAME1      - Character -    30
TIT2       - Character -    15
NAME2      - Character -    30
TIT3       - Character -    15
NAME3      - Character -    30
LOCALITATE - Character -    20
COD_POSTAL - Character -     7
COD_JUDET  - Character -     2
JUDET      - Character -    15
SECTOR     - Character -     5
STRADA     - Character -    20
NR         - Character -     5
BLOC       - Character -     5
SCARA      - Character -     5
ETAJ       - Character -     5
AP         - Character -     5
TELEFON    - Character -    10
FAX        - Character -    10
E_MAIL     - Character -    50
BK1NUME    - Character -    20
BK1FILIALA - Character -    20
BK1CONT    - Character -    30
BK2NUME    - Character -    20
BK2FILIALA - Character -    20
BK2CONT    - Character -    30
BK3NUME    - Character -    20
BK3FILIALA - Character -    20
BK3CONT    - Character -    30
BK4NUME    - Character -    20
BK4FILIALA - Character -    20
BK4CONT    - Character -    30
RF_COD_FIS - Character -    15
RF_DENUM   - Character -    50
RF_FUNCTIE - Character -    30
RF_ADRESA  - Character -    80
RF_TELEFON - Character -    10
RF_FAX     - Character -    10
RF_E_MAIL  - Character -    50
PF_NUME    - Character -    50
PF_CNP     - Character -    13
PF_FUNCTIA - Character -    30
PJ_DENUM   - Character -    50
PJ_CIF     - Character -    13
PJ_CALITAT - Character -    30
------------------------------------------------------------------------------
