home *** CD-ROM | disk | FTP | other *** search
-
-
- /*
- ** $Application name : DP Managing $
- ** $Revision : 6.51 $
- ** $Release : 2.21 $
- ** $Date : 92/09/16 $
- **
- **
- **
- ** (C) Copyright 1992 David Scrève
- ** All Rights Reserved
- */
-
- /* this software was compiled with SAS/C 5.10b Compiler. */
- /* to Recompile this C source code, you need the include V37 or higher */
- /* Contact the Commodore Amiga Technical Support for more information */
-
- #include <stdio.h>
- #include <string.h>
- #include "Messages.h"
- #include "structures.h"
- #include "variables_globales.h"
- #include "visual_global.h"
-
-
- main(argc,argv)
- int argc;
- char **argv;
- {
- LONG UserChoose;
-
- SetUpLanguage(FRANCAIS);
- UserChoose=MOD_CONSULTATION;
- if (Openinglibrary(argc))
- {
- if (FindAppliName(argc,argv))
- {
- if (InitEnvVar())
- {
- SetUpLanguage(Langage);
- if (!HardwareRequirement())
- SingleRequest(NULL,"DP Managing Warning",message[113]);
- else
- {
- if (ouvre_ecran()!=NULL)
- SingleRequest(NULL,"DP Managing Warning",message[114]);
- else
- {
- DemoVersion=!MagicCode();
- while (UserChoose!=NULL && UserChoose!=MOD_QUIT)
- switch (UserChoose)
- {
- case MOD_STATISTIQUES :
- UserChoose=ModStatistiques();
- break;
-
- case MOD_MAINTENANCE :
- UserChoose=ModMaintenance();
- break;
-
- case MOD_CONSULTATION :
- UserChoose=ModConsultation();
- break;
-
- case MOD_EMPRUNTS :
- UserChoose=ModEmprunts();
- break;
-
- case MOD_AJOUT :
- UserChoose=ModAjout();
- break;
-
- };
- ferme_ecran();
- EmptyAllList();
- }
- }
- }
- else
- SingleRequest(NULL,"DP Managing Warning",message[115]);
- }
- fermetoutlibrary();
- }
- if (argc!=NULL)
- {
- printf("\n\nFrancais : L'application doit être lancée à partir du WorkBench.\nEnglish : This material must be launched from Workbench.\n\n");
- printf("\n Press Return to continue...");
- getchar();
- printf("\n\nSee you Later...\n\n\n");
- }
- }
-
-