156 lines
4.7 KiB
Plaintext
156 lines
4.7 KiB
Plaintext
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
|
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
*< FOXBIN2PRG: Version="1.21" SourceFile="trez1.mnx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
|
*
|
|
*<MenuType>4</MenuType>
|
|
*<MenuLocation>REPLACE</MenuLocation>
|
|
|
|
*<MenuCode>
|
|
DEFINE POPUP Trezorerie SHORTCUT RELATIVE FROM MROW(),MCOL()
|
|
DEFINE BAR 1 OF Trezorerie PROMPT "Ridicat avans din casa" ;
|
|
MESSAGE '542:5311'
|
|
ON SELECTION BAR 1 OF Trezorerie DO BAR_1_OF_Trezorerie_FB2P
|
|
|
|
DEFINE BAR 2 OF Trezorerie PROMPT "Restituire avans in casa" ;
|
|
MESSAGE '5311:542'
|
|
ON SELECTION BAR 2 OF Trezorerie DO BAR_2_OF_Trezorerie_FB2P
|
|
|
|
DEFINE BAR 3 OF Trezorerie PROMPT "\-"
|
|
ON BAR 3 OF Trezorerie ACTIVATE POPUP _2070xlhpe
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP _2070xlhpe SHORTCUT RELATIVE
|
|
DEFINE BAR 4 OF Trezorerie PROMPT "Ridicat avans din banca" ;
|
|
MESSAGE '542:5121'
|
|
ON SELECTION BAR 4 OF Trezorerie lans(10567)
|
|
|
|
DEFINE BAR 5 OF Trezorerie PROMPT "Restituire avans in banca" ;
|
|
MESSAGE '5121:542'
|
|
ON SELECTION BAR 5 OF Trezorerie lans(10566)
|
|
|
|
DEFINE BAR 6 OF Trezorerie PROMPT "\-"
|
|
ON BAR 6 OF Trezorerie ACTIVATE POPUP _15s0jven8
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP _15s0jven8 SHORTCUT RELATIVE
|
|
DEFINE BAR "89" OF Trezorerie PROMPT "Plati"
|
|
ON BAR 89 OF Trezorerie ACTIVATE POPUP Plati
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP Plati SHORTCUT RELATIVE
|
|
DEFINE BAR "89020" OF Plati PROMPT "Plata furnizori 401" ;
|
|
MESSAGE ' 401: 542'
|
|
ON SELECTION BAR 89020 OF Plati DO BAR_"89020"_OF_Plati_FB2P
|
|
|
|
DEFINE BAR 2 OF Plati PROMPT "Plati multiple furnizori 401" ;
|
|
MESSAGE '401 : 542'
|
|
ON SELECTION BAR 2 OF Plati lans(10546)
|
|
|
|
DEFINE BAR 3 OF Plati PROMPT "Plata furnizori 404" ;
|
|
MESSAGE ' 404: 542'
|
|
ON SELECTION BAR 3 OF Plati DO BAR_3_OF_Plati_FB2P
|
|
|
|
DEFINE BAR 4 OF Plati PROMPT "\-"
|
|
ON BAR 4 OF Plati ACTIVATE POPUP _1470mvbgt
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP _1470mvbgt SHORTCUT RELATIVE
|
|
DEFINE BAR 5 OF Plati PROMPT "Plata deplasari" ;
|
|
MESSAGE ' 625: 542'
|
|
ON SELECTION BAR 5 OF Plati lans(10343)
|
|
|
|
DEFINE BAR 6 OF Plati PROMPT "Plati impozite"
|
|
ON SELECTION BAR 6 OF Plati DO BAR_6_OF_Plati_FB2P
|
|
|
|
DEFINE BAR 7 OF Plati PROMPT "Alte impozite si taxe" ;
|
|
MESSAGE '446 : 542'
|
|
ON SELECTION BAR 7 OF Plati DO BAR_7_OF_Plati_FB2P
|
|
|
|
DEFINE BAR 8 OF Plati PROMPT "Plata amenzi, penalitati" ;
|
|
MESSAGE '448X - 542'
|
|
ON SELECTION BAR 8 OF Plati DO BAR_8_OF_Plati_FB2P
|
|
|
|
DEFINE BAR 9 OF Plati PROMPT "\-"
|
|
ON BAR 9 OF Plati ACTIVATE POPUP _18c0khqgc
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP _18c0khqgc SHORTCUT RELATIVE
|
|
DEFINE BAR 10 OF Plati PROMPT "Salarii"
|
|
ON BAR 10 OF Plati ACTIVATE POPUP Salarii
|
|
|
|
*----------------------------------
|
|
DEFINE POPUP Salarii SHORTCUT RELATIVE
|
|
DEFINE BAR 1 OF Salarii PROMPT "Plata salarii" ;
|
|
MESSAGE '421 : 542'
|
|
ON SELECTION BAR 1 OF Salarii lans(10514)
|
|
|
|
DEFINE BAR 2 OF Salarii PROMPT "Plata avansuri" ;
|
|
MESSAGE '425 : 542'
|
|
ON SELECTION BAR 2 OF Salarii lans(10515)
|
|
|
|
DEFINE BAR 3 OF Salarii PROMPT "Plata drepturi" ;
|
|
MESSAGE '426 : 542'
|
|
ON SELECTION BAR 3 OF Salarii lans(10516)
|
|
ACTIVATE POPUP Trezorerie
|
|
|
|
*</MenuCode>
|
|
|
|
*<Procedures>
|
|
PROCEDURE BAR_1_OF_Trezorerie_FB2P
|
|
lans(10340)
|
|
ENDPROC && BAR_1_OF_Trezorerie_FB2P
|
|
|
|
PROCEDURE BAR_2_OF_Trezorerie_FB2P
|
|
LANS(10332)
|
|
ENDPROC && BAR_2_OF_Trezorerie_FB2P
|
|
|
|
PROCEDURE BAR_"89020"_OF_Plati_FB2P
|
|
lans(10341)
|
|
ENDPROC && BAR_"89020"_OF_Plati_FB2P
|
|
|
|
PROCEDURE BAR_3_OF_Plati_FB2P
|
|
lans(10342)
|
|
ENDPROC && BAR_3_OF_Plati_FB2P
|
|
|
|
PROCEDURE BAR_6_OF_Plati_FB2P
|
|
lans(10598)
|
|
IF buton=2
|
|
DO deschid_actc
|
|
RETURN
|
|
ENDIF
|
|
DO plati_impozite WITH 10598 IN ocont2003.prg
|
|
ENDPROC && BAR_6_OF_Plati_FB2P
|
|
|
|
PROCEDURE BAR_7_OF_Plati_FB2P
|
|
PRIVATE pcACN
|
|
loCont=ret_cont("Selectati contul",'446') &&,4461,4462,4463,4464,4465,4466,4467,4468,4469')
|
|
IF TYPE('loCont') # 'O'
|
|
RETURN
|
|
ENDIF
|
|
IF buton=2
|
|
RELEASE loCont
|
|
RETURN
|
|
ENDIF
|
|
CN=locont.cont
|
|
PcACN=loCont.Acont
|
|
lans(10540)
|
|
ENDPROC && BAR_7_OF_Plati_FB2P
|
|
|
|
PROCEDURE BAR_8_OF_Plati_FB2P
|
|
PRIVATE pcACN
|
|
loCont=ret_cont("Selectati contul",'448') && ,4481,4482')
|
|
IF TYPE('loCont') # 'O'
|
|
RETURN
|
|
ENDIF
|
|
IF buton=2
|
|
RELEASE loCont
|
|
RETURN
|
|
ENDIF
|
|
CN=locont.cont
|
|
PcACN=loCont.Acont
|
|
lans(10545)
|
|
ENDPROC && BAR_8_OF_Plati_FB2P
|
|
|
|
*</Procedures>
|