96 lines
3.3 KiB
Plaintext
96 lines
3.3 KiB
Plaintext
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
|
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
*< FOXBIN2PRG: Version="1.21" SourceFile="capitaluri5.mnx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
|
*
|
|
*<MenuType>4</MenuType>
|
|
*<MenuLocation>REPLACE</MenuLocation>
|
|
|
|
*<MenuCode>
|
|
DEFINE POPUP Profitsipi SHORTCUT RELATIVE FROM MROW(),MCOL()
|
|
DEFINE BAR 1 OF Profitsipi PROMPT "Inchid.conturilor de venituri"
|
|
ON BAR 1 OF Profitsipi ACTIVATE POPUP Inchidcont
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP Inchidcont SHORTCUT RELATIVE
|
|
DEFINE BAR 1 OF Inchidcont PROMPT "Produse finite" ;
|
|
MESSAGE '7015:121 '
|
|
ON SELECTION BAR 1 OF Inchidcont DO BAR_1_OF_Inchidcont_FB2P
|
|
|
|
DEFINE BAR 2 OF Inchidcont PROMPT "Provizioane" ;
|
|
MESSAGE '787 :121 '
|
|
ON SELECTION BAR 2 OF Inchidcont DO BAR_2_OF_Inchidcont_FB2P
|
|
|
|
DEFINE BAR 2 OF Profitsipi PROMPT "Inchid.conturilor de cheltuieli"
|
|
ON BAR 2 OF Profitsipi ACTIVATE POPUP _09a104pbk
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP _09a104pbk SHORTCUT RELATIVE
|
|
DEFINE BAR 1 OF _09a104pbk PROMPT "Materii prime" ;
|
|
MESSAGE '121 :600 '
|
|
ON SELECTION BAR 1 OF _09a104pbk DO BAR_1_OF__09a104pbk_FB2P
|
|
|
|
DEFINE BAR 2 OF _09a104pbk PROMPT "Impozit pe profit" ;
|
|
MESSAGE '121:691 '
|
|
ON SELECTION BAR 2 OF _09a104pbk DO BAR_2_OF__09a104pbk_FB2P
|
|
|
|
DEFINE BAR 3 OF Profitsipi PROMPT "Pierderi realizate in ex.curente"
|
|
ON BAR 3 OF Profitsipi ACTIVATE POPUP Pierderire
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP Pierderire SHORTCUT RELATIVE
|
|
DEFINE BAR 1 OF Pierderire PROMPT "Ce reduc capitalul social" ;
|
|
MESSAGE '121 :691 '
|
|
ON SELECTION BAR 1 OF Pierderire DO BAR_1_OF_Pierderire_FB2P
|
|
|
|
DEFINE BAR 2 OF Pierderire PROMPT "Ce sunt repartizate in ex. urmator" ;
|
|
MESSAGE '117 :121 '
|
|
ON SELECTION BAR 2 OF Pierderire DO BAR_2_OF_Pierderire_FB2P
|
|
|
|
DEFINE BAR 4 OF Profitsipi PROMPT "Profit net din ex.precedent si repartizat" ;
|
|
MESSAGE '121 :129 '
|
|
ON SELECTION BAR 4 OF Profitsipi DO BAR_4_OF_Profitsipi_FB2P
|
|
ACTIVATE POPUP Profitsipi
|
|
|
|
*</MenuCode>
|
|
|
|
*<Procedures>
|
|
PROCEDURE BAR_1_OF_Inchidcont_FB2P
|
|
*DO ABC1 WITH '701 ',"121 "
|
|
lans(10044)
|
|
ENDPROC && BAR_1_OF_Inchidcont_FB2P
|
|
|
|
PROCEDURE BAR_2_OF_Inchidcont_FB2P
|
|
*DO ABC1 WITH '787 ',"121 "
|
|
lans(10045)
|
|
ENDPROC && BAR_2_OF_Inchidcont_FB2P
|
|
|
|
PROCEDURE BAR_1_OF__09a104pbk_FB2P
|
|
*DO ABC1 WITH '121 ',"600 "
|
|
lans(10046)
|
|
ENDPROC && BAR_1_OF__09a104pbk_FB2P
|
|
|
|
PROCEDURE BAR_2_OF__09a104pbk_FB2P
|
|
*DO ABC1 WITH '121 ',"691 "
|
|
lans(10047)
|
|
ENDPROC && BAR_2_OF__09a104pbk_FB2P
|
|
|
|
PROCEDURE BAR_1_OF_Pierderire_FB2P
|
|
***DO ABC1 WITH '121 ',"691 "
|
|
*DO ABC1 WITH '1012',"121 "
|
|
lans(10048)
|
|
ENDPROC && BAR_1_OF_Pierderire_FB2P
|
|
|
|
PROCEDURE BAR_2_OF_Pierderire_FB2P
|
|
***DO ABC1 WITH '107 ',"121 "
|
|
*DO ABC1 WITH '117 ',"121 "
|
|
lans(10049)
|
|
ENDPROC && BAR_2_OF_Pierderire_FB2P
|
|
|
|
PROCEDURE BAR_4_OF_Profitsipi_FB2P
|
|
*DO ABC1 WITH '121 ',"129 "
|
|
lans(10050)
|
|
ENDPROC && BAR_4_OF_Profitsipi_FB2P
|
|
|
|
*</Procedures>
|