Calendar program

[Cem DAGLI]

Hi,

If you want to use a calendar, you can download it from;
www.progteg.com/programlar/takvim.zip

It is pure 4GL program. You can use it as English or Turkish.Also you can modify all labels to other language as simple.
No charge, no xcode, no .r code,no ocx!

Trust 4GL, do everything!

 

[dayv2005]

thanks a million man you saved me some great amount of time with this

 

[dayv2005]

THat like exactly what i m looking for but the only problem is im running v91d and had to comment out all the widget ids and then i was getting csspin error or something i think i would need v91d wrx files or something. does anyone have theses?

 

[Cem DAGLI]

I am sending the codes in css spin objects. you can add in 2 css spin objects in V9 and add the codes as below;

CSSSPIN OBJECT 1

OCX.SpinDown :

IF combo-ay:SCREEN-VALUE IN FRAME DIALOG-FRAME <> "01" THEN DO:
combo-ay:SCREEN-VALUE IN FRAME DIALOG-FRAME = "0" + STRING(INT(combo-ay:SCREEN-VALUE IN FRAME DIALOG-FRAME) - 01).
RUN yenile.
END.


Ocx.SpinUp:

IF combo-ay:SCREEN-VALUE IN FRAME DIALOG-FRAME <> "012" THEN DO:
combo-ay:SCREEN-VALUE IN FRAME DIALOG-FRAME = "0" + STRING(INT(combo-ay:SCREEN-VALUE) + 1).
RUN yenile.
END.



CSSSPIN OBJECT 2

Ocx.SpinUp:

IF combo-yil:SCREEN-VALUE IN FRAME DIALOG-FRAME <> "2015" THEN DO:
combo-yil:SCREEN-VALUE IN FRAME DIALOG-FRAME = STRING(INT(combo-yil:SCREEN-VALUE) + 1).
RUN yenile.
END.


Ocx.SpinDown:
IF combo-yil:SCREEN-VALUE IN FRAME DIALOG-FRAME <> "2006" THEN DO:
combo-yil:SCREEN-VALUE IN FRAME DIALOG-FRAME = STRING(INT(combo-yil:SCREEN-VALUE) - 1).
RUN yenile.
END.