42b8a890e8
Files correlati : pr0.exe pr1.exe pr1500a.msk Ricompilazione Demo : [ ] Commento : bug 0000137 Implementare la gestione multilingua git-svn-id: svn://10.65.10.50/trunk@12099 c028cbd2-c16b-5b4b-a496-9718f37d4682
52 lines
1.1 KiB
C++
Executable File
52 lines
1.1 KiB
C++
Executable File
#include <applicat.h>
|
|
#include <mask.h>
|
|
#include <form.h>
|
|
|
|
#include "agenti.h"
|
|
#include "pr1100.h"
|
|
|
|
class TStampa_agenti : public TSkeleton_application
|
|
{
|
|
protected:
|
|
virtual void main_loop();
|
|
|
|
public:
|
|
// @cmember Disabilita la verifica del modulo : essendo una anagrafica, va sempre abilitata
|
|
virtual bool check_autorization() const { return FALSE; }
|
|
};
|
|
|
|
void TStampa_agenti::main_loop()
|
|
{
|
|
open_files(LF_TAB, LF_AGENTI, LF_CLIFO, 0);
|
|
|
|
TMask mask("pr1100");
|
|
while (mask.run() == K_ENTER)
|
|
{
|
|
TForm form("pr1100a");
|
|
TCursor& cur = *form.cursor();
|
|
|
|
TRectype darec(LF_AGENTI),arec(LF_AGENTI);
|
|
if (mask.get(F_ORDINAMENTO)[0]=='C')
|
|
{
|
|
darec.put(AGE_CODAGE,mask.get(F_DAAGE));
|
|
arec.put(AGE_CODAGE,mask.get(F_AAGE));
|
|
cur.setkey(1);
|
|
}
|
|
else
|
|
{
|
|
darec.put(AGE_RAGSOC,mask.get(F_DADES));
|
|
arec.put(AGE_RAGSOC,mask.get(F_ADES));
|
|
cur.setkey(2);
|
|
}
|
|
cur.setregion(darec,arec);
|
|
form.print();
|
|
} // while true
|
|
}
|
|
|
|
int pr1100(int argc, char* argv[])
|
|
{
|
|
TStampa_agenti a;
|
|
a.run(argc,argv,TR("Stampa agenti"));
|
|
return 0;
|
|
}
|