Salutare. Ia uitati ce idee mi-a venit. Haide bre sa facem un soft ca la carte care sa inlocuiasca chestiile alea primite de la ministere (si eu mi-am batut capul cu ele pana acum vreo 2 ani).

Ma gandesc sa le proiectam k lumea, astfel incat sa fie extensibile si cu codul sursa la vedere. Nu e vorba de dat lectii aici, ci de integrarea tuturor softurilor care sunt facute pe ici pe colo, fara sa tina cont de userul final. Eu m-am lovit de situatia cand userul trebuia sa introduca condicile de medicatie de doua ori: o data in softul de gestiune (care tinea evidenta cantitativ valorica) si o data intr-o mizerie de soft facut de unii, numit Gensof, care dupa ce ca era nashpa (tinea numai valoric), era si closed-source, de nu puteai sa-i faci nimic. Si pe deasupra ERA SI IN FOX-UL DE DOS!!!!! Nici macar nu puteai sa-l automatizezi....

Va salut !

Subscriu la idee. Nu prea am postat dar am urmarit forumul zilnic. Am experienta in VFP 7.0. Voi astepta sugestiile si propunerile voastre. Numai bine !

La firma la care lucrez ma ocup (in general) de programul de salarii. V-as putea da si eu o mana de ajutor! (Eu personal folosesc programele numai pentru a verifica daca sunt erori in fisierele generate din programul de salarii.)

O posibila problema ar fi (la declaratia de CAS) urmatoarea: Conform Legii 210/2005 daca contributia de virat este sub 1 leu se majoreaza la 1 leu. Conform instructiunilor de completare a declaratiei de CAS, CAS-ul datorat de angajator (22%) si Fondul de accidente(0,5 - 4%) se calculeaza prin rotunjire matematica. Caz concret: pentru 1 leu, in primul caz avem CAS=0,22 Lei adica 1 Leu. In al doilea caz avem ROUND(1*0.22,0) adica 0 Lei.

Pentru a fi in ceata totala, programul de verificare de la CAS (pverax - se poate descarca de la www.cnpas.org) spune ca suma corecta trebuie sa fie (la exemplul de mai sus) 0 Lei. Daca mergeti sa depuneti declaratia cu aceasta suma nu vi-l primeste (chiar daca pverax-ul va felicita ca ati lucrat corect) pentru ca, spun ei, conform Legii 210/2005 trebuie sa sa declare 1 Leu.

Aceeasi problema si la Somaj, numai ca aici programul de introducere/verificare da eroare daca aveti baza de calcul 0 Lei (adica si pentru 1% din 0 Lei trebuie cotizat cu ... 1 Leu). In asemenea cazuri, declaratia este primita daca pentru 0 Lei se cotizeaza ... 0 Lei.

Ca un studiu de caz, in Romania, daca lucrati pentru 1 Leu/luna, platiti 1 Leu CASS, 1 Leu Somaj, 1 Leu CAS si mai veniti de acasa cu 2 Lei !!!

Inca putina rabdare va mai cer; se pregateste terenul pentru softul asta. N-are sens sa ne apucam de el daca il facem degeaba, asa ca inainte de a pune mana pe condei si calimara, vorba' lu' Arghezi, pregatim terenul.

Revin cu amanunte, cand o sa fie.

In acest moment cred ca exista o varianta interesanta: dezvoltarea in paralel cu statul a acestor programe si oferirea lor "open source".
Cred ca e cea mai buna varianta, nu obligam pe nimeni sa le utilizeze si nu ne asumam responsabilitati. DAR daca aplicatiile vor fi intr-adevar bune, se va afla de ele, lumea va incepe sa le foloseasca si probabil statul va face demersurile sa le adopte.
Exista si un precedent interesant. De exemplu, pentru FNUASS se utilizeaza in acest moment 2 programe, unul facut de Bucuresti si altul de Iasi.
Cel de Iasi este foarte bun, pe cand celalalt nu e asa grozav. Deci se pot folosi doua programe daca rezultatul e acelasi, nu esti obligat sa folosesti un anumit program.

Eu am folosit Subversion la greu, in conjunctie cu VFP. Merge brici, dar trebuie tinut cont de faptul ca VFP are tendinta sa modifice extensiile fisierelor, facandu-le cu majuscule, chestie pe care SVN n-o inghite, fiind senzitiv la acest aspect. Daca ai adaugat fisierul cu litere mici, trebuie sa ai grija sa aiba strict acelasi nume cand dai commit. Am scris o rutina care redenumeste fisierele, recursiv, pe care am adaugat-o in projecthook (stim cu totii ce este un projecthook, nu-i asa?), in metoda Destroy, care se executa automat cand proiectul este inchis.

Se copiaza codul de mai jos intr-un PRG, care se pune ORIUNDE in directorul proiectului (rutina se duce pana in directorul radacina si scaneaza recursiv de acolo, facand toate extensiile cu litere mici):

* Notes:
* This program will scan all the directory tree where it is located,
* starting with the root dir. IOW, it doesn't matter where you place it,
* it will scan all upper and all subdirectories.

Local ;
   lcBasePath as String
Local Array laFiles[1]

Private lnTotalFiles, lnI

DECLARE INTEGER MoveFile IN kernel32 As "MoveFileA";
   STRING lpExistingFileName,;
   STRING lpNewFileName

* Get the topmost directory (scan actually starts there)
lcBasePath = Lower(Addbs(Left(FullPath(Curdir()), At("\",FullPath(Curdir()),2))))
lnTotalFiles = ADir(laFiles,lcBasePath + "*.*","D",1)
For lnI = 1 to lnTotalFiles
   * Ignore . and ..
   If laFiles[lnI,1] == "." or laFiles[lnI,1] == ".."
      Loop
   EndIf
   * Check if is a directory.
   If "D"$laFiles[lnI,5] && it's a dir
      Do GetSubDirFiles With Addbs(lcBasePath + laFiles[lnI,1])
   Else
      * It's a file. Let's check if the extension is lowercase. If not, force it.
      If JustExt(laFiles[lnI,1]) <> Lower(JustExt(laFiles[lnI,1]))
         lcOldFileName = lcBasePath + laFiles[lnI,1]
         lcNewFileName = lcBasePath + Lower(laFiles[lnI,1])
         MoveFileA(lcOldFileName, lcNewFileName)
      EndIf
   EndIf
EndFor

*---------------------
Procedure GetSubDirFiles
Lparameters tcDirName
Local Array laFiles[1]
Private lnTotalFiles, lnI

lnTotalFiles = ADir(laFiles,tcDirName + "*.*","D",1)
For lnI = 1 to lnTotalFiles
   * Ignore . and ..
   If laFiles[lnI,1] == "." or laFiles[lnI,1] == ".."
      Loop
   EndIf
   * Check if is a directory.
   If "D"$laFiles[lnI,5] && it's a dir
      Do GetSubDirFiles With Addbs(tcDirName + laFiles[lnI,1])
   Else
   * It's a file. Let's check if the extension is lowercase. If not, force it.
      If JustExt(laFiles[lnI,1]) <> Lower(JustExt(laFiles[lnI,1]))
         lcOldFileName = tcDirName + laFiles[lnI,1]
         lcNewFileName = tcDirName + Lower(laFiles[lnI,1])
         MoveFileA(lcOldFileName, lcNewFileName)
      EndIf
   EndIf
EndFor

Iata ca Grig a reusit sa-i sensibilizeze pe cei de la eWeek cu privire la 'programele institutiilor publice'. Multumim Grig !http://www.agora.ro/index.php?qs_sect_id=1984&qs_f_id=101&qs_art_id=6014

Am auzit ca in 2008 se va demara licitatia pentru un SOFT UNIC.
Ce-ar fi sa facem un consortiu/alianta si sa licitam si noi ?

   Presupunem prin absurd ca ar exista un sistem free care sa rezolve problemele de mai sus. Cine ar fi interesat sa-l implementeze? Nimeni. De ce? Pai n-ar avea nimeni nici un interes. De la unii s-ar lua painea de la gura, de la altii s-ar lua scaunele iar altora li s-ar rani orgoliile.

   Altceva cred ca ar fi interesant. Sa se defineasca o specificatie tehnica in urma careia sa se elimine:

1) scoaterea din salarii a  5 declaratii (pensii, somaj, sanatate, concedii medicale, ITM) ;

2) etc.

3) etc.

   Un astfel de demers, promovat cu insistenta cred ca ar da roade. Este adevarat ca programatorii ar avea mai putin de lucru in aceasta directie insa pentru micile firme s-a elimina un cumplit stres.