201 lines
7.6 KiB
Plaintext
201 lines
7.6 KiB
Plaintext
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
|
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
*< FOXBIN2PRG: Version="1.21" SourceFile="listterti.mnx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
|
*
|
|
*<MenuType>4</MenuType>
|
|
*<MenuLocation>REPLACE</MenuLocation>
|
|
|
|
*<MenuCode>
|
|
DEFINE POPUP Listare SHORTCUT RELATIVE FROM MROW(),MCOL()
|
|
DEFINE BAR 1 OF Listare PROMPT "\<Balanta analitica" ;
|
|
MESSAGE 'Tiparirea fiselor analitice'
|
|
ON BAR 1 OF Listare ACTIVATE POPUP Balantaana
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP Balantaana SHORTCUT RELATIVE
|
|
DEFINE BAR 1 OF Balantaana PROMPT "A\<ltii"
|
|
ON SELECTION BAR 1 OF Balantaana DO BAR_1_OF_Balantaana_FB2P
|
|
|
|
DEFINE BAR 2 OF Balantaana PROMPT "\-"
|
|
ON BAR 2 OF Balantaana ACTIVATE POPUP _1dl0i71ek
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP _1dl0i71ek SHORTCUT RELATIVE
|
|
DEFINE BAR 3 OF Balantaana PROMPT "C\<reditori"
|
|
ON SELECTION BAR 3 OF Balantaana DO BAR_3_OF_Balantaana_FB2P
|
|
|
|
DEFINE BAR 4 OF Balantaana PROMPT "\<Debitori"
|
|
ON SELECTION BAR 4 OF Balantaana DO BAR_4_OF_Balantaana_FB2P
|
|
|
|
DEFINE BAR 5 OF Balantaana PROMPT "\<Achizitori"
|
|
ON SELECTION BAR 5 OF Balantaana DO BAR_5_OF_Balantaana_FB2P
|
|
|
|
DEFINE BAR 6 OF Balantaana PROMPT "A\<ctionari"
|
|
ON SELECTION BAR 6 OF Balantaana DO BAR_6_OF_Balantaana_FB2P
|
|
|
|
DEFINE BAR 2 OF Listare PROMPT "Situatii \<operative"
|
|
ON BAR 2 OF Listare ACTIVATE POPUP Situatiiop
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP Situatiiop SHORTCUT RELATIVE
|
|
DEFINE BAR 1 OF Situatiiop PROMPT "A\<ltii"
|
|
ON SELECTION BAR 1 OF Situatiiop DO BAR_1_OF_Situatiiop_FB2P
|
|
|
|
DEFINE BAR 2 OF Situatiiop PROMPT "\-"
|
|
ON BAR 2 OF Situatiiop ACTIVATE POPUP _1dl0i76vl
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP _1dl0i76vl SHORTCUT RELATIVE
|
|
DEFINE BAR 3 OF Situatiiop PROMPT "C\<reditori"
|
|
ON SELECTION BAR 3 OF Situatiiop DO BAR_3_OF_Situatiiop_FB2P
|
|
|
|
DEFINE BAR 4 OF Situatiiop PROMPT "\<Debitori"
|
|
ON SELECTION BAR 4 OF Situatiiop DO BAR_4_OF_Situatiiop_FB2P
|
|
|
|
DEFINE BAR 5 OF Situatiiop PROMPT "\<Achizitori"
|
|
ON SELECTION BAR 5 OF Situatiiop DO BAR_5_OF_Situatiiop_FB2P
|
|
|
|
DEFINE BAR 6 OF Situatiiop PROMPT "A\<ctionari"
|
|
ON SELECTION BAR 6 OF Situatiiop DO BAR_6_OF_Situatiiop_FB2P
|
|
|
|
DEFINE BAR 3 OF Listare PROMPT "\-"
|
|
ON BAR 3 OF Listare ACTIVATE POPUP _1s60kszls
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP _1s60kszls SHORTCUT RELATIVE
|
|
DEFINE BAR 4 OF Listare PROMPT "Situatii \<inregistrari"
|
|
ON SELECTION BAR 4 OF Listare DO BAR_4_OF_Listare_FB2P
|
|
|
|
DEFINE BAR 5 OF Listare PROMPT "Situatii \<facturi"
|
|
ON SELECTION BAR 5 OF Listare DO BAR_5_OF_Listare_FB2P
|
|
|
|
DEFINE BAR 6 OF Listare PROMPT "\-"
|
|
ON BAR 6 OF Listare ACTIVATE POPUP _2hk0ugcft
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP _2hk0ugcft SHORTCUT RELATIVE
|
|
DEFINE BAR 7 OF Listare PROMPT "Inregistrari parteneri cu \<sold final in luna"
|
|
ON BAR 7 OF Listare ACTIVATE POPUP Inregistra
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP Inregistra SHORTCUT RELATIVE
|
|
DEFINE BAR 1 OF Inregistra PROMPT "In \<lei"
|
|
ON SELECTION BAR 1 OF Inregistra DO BAR_1_OF_Inregistra_FB2P
|
|
|
|
DEFINE BAR 2 OF Inregistra PROMPT "In lei si in \<valuta"
|
|
ON SELECTION BAR 2 OF Inregistra DO BAR_2_OF_Inregistra_FB2P
|
|
|
|
DEFINE BAR 8 OF Listare PROMPT "Situatii pe vechimi"
|
|
ON BAR 8 OF Listare ACTIVATE POPUP Situatiipe
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP Situatiipe SHORTCUT RELATIVE
|
|
DEFINE BAR 1 OF Situatiipe PROMPT "Fata de data scadenta"
|
|
ON SELECTION BAR 1 OF Situatiipe Do sold_fact_pe_vechimi In orap_terti.prg with "A", .F.
|
|
|
|
DEFINE BAR 2 OF Situatiipe PROMPT "Fata de data emitere"
|
|
ON SELECTION BAR 2 OF Situatiipe Do sold_fact_pe_vechimi In orap_terti.prg with "A", .T.
|
|
ACTIVATE POPUP Listare
|
|
|
|
*</MenuCode>
|
|
|
|
*<Procedures>
|
|
PROCEDURE BAR_1_OF_Balantaana_FB2P
|
|
DO PrepareRptBalantaFC WITH "","Jurnal","balanta_parteneri_rpt3",.F. IN osituatii_operative.prg
|
|
ENDPROC && BAR_1_OF_Balantaana_FB2P
|
|
|
|
PROCEDURE BAR_3_OF_Balantaana_FB2P
|
|
*!* SELE creditor
|
|
*!* * set filter to luat-dAT#0
|
|
*!* TITLU = 'CREDITORI'
|
|
*!* REPORT FORMAT creditor.FRX to printer prompt PREVIEW
|
|
*!* *WINDOW WPRINT
|
|
|
|
DO PrepareRptBalantaFC WITH "462","Jurnal Creditori","balanta_parteneri_rpt3",.F. IN osituatii_operative.prg
|
|
ENDPROC && BAR_3_OF_Balantaana_FB2P
|
|
|
|
PROCEDURE BAR_4_OF_Balantaana_FB2P
|
|
*!* SELE DEBitor
|
|
*!* REPORT FORMAT DEBitor.FRX to printer prompt PREVIEW
|
|
|
|
DO PrepareRptBalantaFC WITH "461","Jurnal Debitori","balanta_parteneri_rpt3",.T. IN osituatii_operative.prg
|
|
ENDPROC && BAR_4_OF_Balantaana_FB2P
|
|
|
|
PROCEDURE BAR_5_OF_Balantaana_FB2P
|
|
*!* *SELE ACHIT542
|
|
*!* SELECT nume_2 as nume , totdeb , totcred FROM achit542 INTO CURSOR tachi
|
|
*!* SELECT tachi
|
|
*!* REPORT FORMAT ACHIZ.FRX TO PRINTER PROMPT NOCONSOLE preview
|
|
*!* *WINDOW WPRINT
|
|
*!* USE IN tachi
|
|
|
|
DO PrepareRptBalantaFC WITH "542","Jurnal Achizitori","balanta_parteneri_rpt3",.T. IN osituatii_operative.prg
|
|
ENDPROC && BAR_5_OF_Balantaana_FB2P
|
|
|
|
PROCEDURE BAR_6_OF_Balantaana_FB2P
|
|
*!* SELE actionar
|
|
*!* TITLU = 'ACTIONARI'
|
|
*!* REPORT FORMAT creditor.FRX to printer prompt PREVIEW
|
|
|
|
DO PrepareRptBalantaFC WITH "455","Jurnal Actionari","balanta_parteneri_rpt3",.F. IN osituatii_operative.prg
|
|
ENDPROC && BAR_6_OF_Balantaana_FB2P
|
|
|
|
PROCEDURE BAR_1_OF_Situatiiop_FB2P
|
|
**parametrii:
|
|
**tcCont,tlActiv,tlTitlu,tlCauta_alfa_Cu_Toti,tlPerioada_Blocata,tcRaport_sau_Vizualizare,tc_NumeForma
|
|
|
|
** titlu lasat gol ca sa keme cereTitlu
|
|
DO PrepareRptSitOp IN osituatii_operative.prg
|
|
ENDPROC && BAR_1_OF_Situatiiop_FB2P
|
|
|
|
PROCEDURE BAR_3_OF_Situatiiop_FB2P
|
|
**parametrii:
|
|
**tcCont,tlActiv,tlTitlu,tlCauta_alfa_Cu_Toti,tlPerioada_Blocata,tcRaport_sau_Vizualizare,tc_NumeForma
|
|
|
|
** titlu lasat gol ca sa keme cereTitlu
|
|
DO PrepareRptSitOp IN osituatii_operative.prg WITH '462',.F.,"",.T.,.F.,
|
|
ENDPROC && BAR_3_OF_Situatiiop_FB2P
|
|
|
|
PROCEDURE BAR_4_OF_Situatiiop_FB2P
|
|
**parametrii:
|
|
**tcCont,tlActiv,tlTitlu,tlCauta_alfa_Cu_Toti,tlPerioada_Blocata,tcRaport_sau_Vizualizare,tc_NumeForma
|
|
|
|
** titlu lasat gol ca sa keme cereTitlu
|
|
DO PrepareRptSitOp IN osituatii_operative.prg WITH '461',.T.,"",.T.,.F.,
|
|
ENDPROC && BAR_4_OF_Situatiiop_FB2P
|
|
|
|
PROCEDURE BAR_5_OF_Situatiiop_FB2P
|
|
**parametrii:
|
|
**tcCont,tlActiv,tlTitlu,tlCauta_alfa_Cu_Toti,tlPerioada_Blocata,tcRaport_sau_Vizualizare,tc_NumeForma
|
|
|
|
** titlu lasat gol ca sa keme cereTitlu
|
|
DO PrepareRptSitOp IN osituatii_operative.prg WITH '452',.T.,"",.T.,.F.,
|
|
ENDPROC && BAR_5_OF_Situatiiop_FB2P
|
|
|
|
PROCEDURE BAR_6_OF_Situatiiop_FB2P
|
|
**parametrii:
|
|
**tcCont,tlActiv,tlTitlu,tlCauta_alfa_Cu_Toti,tlPerioada_Blocata,tcRaport_sau_Vizualizare,tc_NumeForma
|
|
|
|
** titlu lasat gol ca sa keme cereTitlu
|
|
DO PrepareRptSitOp IN osituatii_operative.prg WITH '455',.F.,"",.T.,.F.,
|
|
ENDPROC && BAR_6_OF_Situatiiop_FB2P
|
|
|
|
PROCEDURE BAR_4_OF_Listare_FB2P
|
|
DO rap_fact_grup_pe_lucari_parteneri WITH [], .F., 1 IN orap_terti.prg
|
|
ENDPROC && BAR_4_OF_Listare_FB2P
|
|
|
|
PROCEDURE BAR_5_OF_Listare_FB2P
|
|
DO viz_frm_facturi IN orap_terti_comun WITH 1
|
|
ENDPROC && BAR_5_OF_Listare_FB2P
|
|
|
|
PROCEDURE BAR_1_OF_Inregistra_FB2P
|
|
Do parteneri_cu_sold_final In orap_terti.prg with .F.
|
|
ENDPROC && BAR_1_OF_Inregistra_FB2P
|
|
|
|
PROCEDURE BAR_2_OF_Inregistra_FB2P
|
|
Do parteneri_cu_sold_final In orap_terti.prg with .T.
|
|
ENDPROC && BAR_2_OF_Inregistra_FB2P
|
|
|
|
*</Procedures>
|