419 lines
15 KiB
C
Executable File
419 lines
15 KiB
C
Executable File
//////////////////////////////////////////////////////////////////////
|
||
/// I N P A - L I B R A R Y F U N K T I O N E N
|
||
//////////////////////////////////////////////////////////////////////
|
||
|
||
//////////////////////////////////
|
||
// Systemfunktionen
|
||
//////////////////////////////////
|
||
|
||
extern setmenu( in: MENU m);
|
||
extern setscreen( in: SCREEN s, in: bool FrequentFlag);
|
||
extern setmenutitle( in: string title);
|
||
extern settitle( in: string title);
|
||
extern setitem( in: int nr, in: string ItemName, in: bool mode);
|
||
extern setitemrepeat(in: int nr, in: bool enablefrequent);
|
||
|
||
extern setstate( in: STATE state);
|
||
extern setstatemachine( in: STATEMACHINE sm);
|
||
extern callstatemachine( in: STATEMACHINE sm);
|
||
extern returnstatemachine();
|
||
|
||
extern settimer( in: int timernum, in: int timeval);
|
||
extern testtimer( in: int timernum, out: bool expiredflag);
|
||
|
||
extern setjobstatus( in: int JobStatus);
|
||
|
||
extern exit();
|
||
extern exitwindows();
|
||
extern scriptselect( in: string ScriptSelectIniFile);
|
||
extern scriptchange( in: string NewScriptFile);
|
||
|
||
extern select( in: bool MultipleSelectFlag);
|
||
extern deselect();
|
||
extern control();
|
||
extern start();
|
||
extern stop();
|
||
|
||
extern getapistring( in: bool ArgNumFlag,
|
||
in: bool FullScreenFlag,out: string ApiString);
|
||
extern togglelist( in: bool MultipleSelectFlag, in: bool ArgNumFlag, out: string ApiToggleString);
|
||
|
||
extern printscreen();
|
||
|
||
extern printfile( out: int ErrorCode,
|
||
in: string FileName,
|
||
in: string PrinterName,
|
||
in: string PrinterPort,
|
||
in: bool ErrorMsgFlag );
|
||
|
||
extern setcolor( in: int FgColor,
|
||
in: int BkColor);
|
||
extern delay( in: int Time);
|
||
|
||
extern getdate( out: string date);
|
||
extern gettime( out: string time);
|
||
|
||
//////////////////////////////////
|
||
// Konvertierfunktionen
|
||
//////////////////////////////////
|
||
|
||
extern realtostring( in: real r, in: string format, out: string s);
|
||
extern stringtoreal( in: string s, out: real r);
|
||
extern inttostring( in: int i, out: string s);
|
||
extern stringtoint( in: string s, out: int i);
|
||
extern hexconvert( in: string HexString,
|
||
out: int high, out: int mid, out: int low, out: int seg);
|
||
extern inttoreal( in: int i, out: real r);
|
||
extern realtoint( in: real r, out: int i);
|
||
|
||
extern bytetoint( in: byte b, out: int i);
|
||
extern inttolong( in: int i, out: long l);
|
||
extern longtoreal( in: long l, out: real r);
|
||
|
||
//////////////////////////////////
|
||
// Stringfunktionen
|
||
//////////////////////////////////
|
||
|
||
extern strcat( out: string DestStr,
|
||
in: string SrcStr1, in: string SrcStr2);
|
||
extern strlen( out: int len,
|
||
in: string str);
|
||
extern midstr( out: string ResultStr,
|
||
in: string SrcStr,
|
||
in: int FirstIndex,
|
||
in: int Count);
|
||
|
||
//////////////////////////////////
|
||
// PEM - Libraryfunktionen
|
||
//////////////////////////////////
|
||
//
|
||
// Anmerkung: PEM-Funktionen nur aktiv bei WinEldi-Betrieb !!!
|
||
|
||
extern PEMInitialisiere (out: bool Result,
|
||
in: string WinEldiVersion,
|
||
in: string Pruefstand,
|
||
in: string RechnerNr);
|
||
|
||
extern PEMProtokollKopf (out: bool Result,
|
||
in: string Jobtabelle,
|
||
in: string JAT_Version,
|
||
in: string Datum,
|
||
in: string Zeit,
|
||
in: string FzgTyp,
|
||
in: string FgNr);
|
||
|
||
extern PEMProtokollZeile (out: bool Result, in: string Zeile);
|
||
|
||
extern PEMSGZ_Kopfzeile(out: bool Result,
|
||
in: string SGVar,
|
||
in: string LogUnit,
|
||
in: string ZeilenSG);
|
||
|
||
extern PEMTrennLinie(out: bool Result);
|
||
|
||
extern PEMEndLinie(out: bool Result);
|
||
|
||
extern PEMLoescheTabZeilenPuffer(out: bool Result);
|
||
|
||
extern PEMUebertrageTabZeilenPuffer(out: bool Result);
|
||
|
||
extern PEMProtokollAusgabe(out: bool Result);
|
||
|
||
extern PEMDruckeEtikett(out: bool Result,
|
||
in: string Datum,
|
||
in: string Zeit);
|
||
|
||
extern PEMPrintFormular( out: bool Result,
|
||
in: string FormularName);
|
||
|
||
extern PEMPrinter_ff(out: bool Result);
|
||
|
||
extern PEMFree_mem(out: bool Result);
|
||
|
||
extern PEMLoad_formular(out: bool Result,
|
||
in: string FileName,
|
||
in: string FormularName);
|
||
|
||
extern PEMDefault_druckfeld(out: bool Result,
|
||
in: string DruckfeldName,
|
||
in: string FormularName);
|
||
|
||
extern PEMDefault_besetzen(out: bool Result, in: string FormularName);
|
||
|
||
extern PEMForget_formular(out: bool Result, in: string FormularName);
|
||
|
||
extern PEMWrite_druckfeld(out: bool Result,
|
||
in: string DruckfeldName,
|
||
in: string FormularName,
|
||
in: string instring);
|
||
|
||
|
||
//////////////////////////////////
|
||
// Eingabefunktionen
|
||
//////////////////////////////////
|
||
|
||
extern getinputstate( out: int InputState);
|
||
extern inputtext( out: string Text, in: string BoxTitle, in: string BoxText);
|
||
extern inputnum( out: real val, in: string BoxTitle, in: string BoxText,
|
||
in: real minval, in: real maxval);
|
||
extern inputint( out: int val, in: string BoxTitle, in: string BoxText,
|
||
in: int minval, in: int maxval);
|
||
extern inputhex( out: string hexstr, in: string BoxTitle, in: string BoxText,
|
||
in: string MinHexStr, in: string MaxHexStr);
|
||
extern inputdigital( out: bool val, in: string BoxTitle, in: string BoxText,
|
||
in: string FalseStr, in: string TrueStr);
|
||
|
||
extern input2text( out: string str1, out: string str2,
|
||
in: string BoxTitle, in: string BoxText,
|
||
in: string BoxStr1, in: string BoxStr2);
|
||
extern input2hexnum( out: string hexstr, out: int num,
|
||
in: string BoxTitle, in: string BoxText,
|
||
in: string BoxStr1, in: string BoxStr2,
|
||
in: string MinHexStr, in: string MaxHexStr,
|
||
in: int minnum, in: int maxnum);
|
||
extern input2int( out: int val1, out: int val2,
|
||
in: string BoxTitle, in: string BoxText,
|
||
in: string BoxStr1, in: string BoxStr2,
|
||
in: int min1, in: int max1,
|
||
in: int min2, in: int max2);
|
||
extern input2hex( out: string hexstr1, out: string hexstr2,
|
||
in: string BoxTitle, in: string BoxText,
|
||
in: string BoxStr1, in: string BoxStr2,
|
||
in: string MinHexStr1, in: string MaxHexStr1,
|
||
in: string MinHexStr2, in: string MaxHexStr2 );
|
||
|
||
//////////////////////////////////
|
||
// Ausgabefunktionen
|
||
//////////////////////////////////
|
||
|
||
extern text( in: int row, in: int col, in: string text);
|
||
extern textout( in: string text, in: int row, in: int col);
|
||
extern ftextout( in: string text, in: int row, in: int col,
|
||
in: int textsize, in: int textattr );
|
||
extern digitalout( in: bool val,
|
||
in: int row, in: int col,
|
||
in: string TrueText, in: string FalseText);
|
||
extern analogout( in: real val,
|
||
in: int row, in: int col,
|
||
in: real min, in: real max,
|
||
in: real minvalid, in: real maxvalid,
|
||
in: string format);
|
||
extern multianalogout( in: real val,
|
||
in: int row, in: int col,
|
||
in: real min, in: real max,
|
||
in: real minvalid, in: real maxvalid,
|
||
in: string format,
|
||
in: int mode);
|
||
|
||
extern hexdump( in: string StartAdr, in: int numbytes,
|
||
in: int row, in: int col);
|
||
|
||
extern ftextclear( in: string text, in: int row, in: int col,
|
||
in: int textsize, in: int textattr );
|
||
extern clearrect( in: int row, in: int col,
|
||
in: int height, in: int width);
|
||
extern blankscreen();
|
||
extern messagebox( in: string Title, in: string Text);
|
||
extern infobox( in: string Title, in: string Text);
|
||
|
||
|
||
//////////////////////////////////
|
||
// Dateizugriffsfunktionen
|
||
//////////////////////////////////
|
||
|
||
extern fileopen( in: string FileName, in: string OpenMode);
|
||
extern fileclose();
|
||
extern filewrite( in: string str);
|
||
extern fileread( out: string str, out: bool EOF);
|
||
|
||
//////////////////////////////////
|
||
// Userboxfunktionen
|
||
//////////////////////////////////
|
||
|
||
extern userboxopen( in: int BoxNum,
|
||
in: int row, in: int col,
|
||
in: int height, in: int width,
|
||
in: string TitleStr, in: string TextStr);
|
||
extern userboxclose( in: int BoxNum);
|
||
extern userboxftextout( in: int BoxNum, in: string text,
|
||
in: int row, in: int col,
|
||
in: int textsize, in: int textattr );
|
||
extern userboxclear( in: int BoxNum);
|
||
extern userboxsetcolor( in: int BoxNum,
|
||
in: int FgColor,
|
||
in: int BkColor);
|
||
|
||
|
||
//////////////////////////////////
|
||
// Schnittstellenfunktionen
|
||
//////////////////////////////////
|
||
|
||
extern winhelp( in: string helpfile);
|
||
extern winhelpkey( in: string helpfile, in: string key);
|
||
extern callwin( in: string cmdline);
|
||
|
||
|
||
//////////////////////////////////
|
||
// Fileviewer - Funktionen
|
||
//////////////////////////////////
|
||
|
||
extern viewopen( in: string FileNameStr, in: string TitleStr);
|
||
extern viewclose();
|
||
|
||
|
||
//////////////////////////////////
|
||
// Simulationsfunktionen
|
||
//////////////////////////////////
|
||
|
||
extern simnum( out: real val, in: string BoxTitle, in: string BoxText,
|
||
in: real minval, in: real maxval);
|
||
extern simdigital( out: bool val, in: string BoxTitle, in: string BoxText,
|
||
in: string FalseStr, in: string TrueStr);
|
||
|
||
|
||
//////////////////////////////////
|
||
// EDIABAS - Funktionen
|
||
//////////////////////////////////
|
||
|
||
/// INPA - Anbindung ///
|
||
|
||
extern INPAapiInit();
|
||
extern INPAapiEnd();
|
||
extern INPAapiJob( in: string ecu, in: string job,
|
||
in: string para, in: string result);
|
||
extern INPAapiResultText( out: string ResultText,
|
||
in: string ApiResult,
|
||
in: int ApiSet,
|
||
in: string ApiFormat);
|
||
extern INPAapiResultDigital( out: bool ResultVal,
|
||
in: string ApiResult,
|
||
in: int ApiSet );
|
||
extern INPAapiResultInt( out: int ResultVal,
|
||
in: string ApiResult,
|
||
in: int ApiSet );
|
||
extern INPAapiResultSets( out: int sets);
|
||
extern INPAapiResultAnalog( out: real ResultVal,
|
||
in: string ApiResult,
|
||
in: int ApiSet );
|
||
extern INPAapiResultBinary( in: string ApiResult, in: int ApiSet);
|
||
extern INPAapiCheckJobStatus( in: string RefStr);
|
||
extern INPAapiFsLesen( in: string ecu, in: string FileName);
|
||
extern INPAapiFsLesen2( in: string ecu, in: string FileName);
|
||
extern INPAapiFsMode( in: int FsMode, in: string FsFileMode,
|
||
in: string PreInfoFile, in: string PostInfoFile,
|
||
in: string ApiFsJobName);
|
||
|
||
|
||
|
||
/// 1:1 - Anbindung ///
|
||
|
||
extern INP1apiInit( out: bool rc);
|
||
extern INP1apiEnd();
|
||
extern INP1apiJob( in: string ecu, in: string job,
|
||
in: string para, in: string result);
|
||
extern INP1apiState( out: int ApiState);
|
||
extern INP1apiResultText( out: bool rc,
|
||
out: string ResultText,
|
||
in: string ApiResult,
|
||
in: int ApiSet,
|
||
in: string ApiFormat);
|
||
extern INP1apiResultInt( out: bool rc,
|
||
out: int ResultVal,
|
||
in: string ApiResult,
|
||
in: int ApiSet );
|
||
extern INP1apiResultSets( out: bool rc,
|
||
out: int sets);
|
||
extern INP1apiResultReal( out: bool rc,
|
||
out: real ResultVal,
|
||
in: string ApiResult,
|
||
in: int ApiSet );
|
||
extern INP1apiResultBinary( out: bool rc,
|
||
in: string ApiResult,
|
||
in: int ApiSet);
|
||
extern INP1apiErrorCode( out: int ErrorCode);
|
||
extern INP1apiErrorText( out: string ErrorText);
|
||
|
||
|
||
/// Zugriffsfunktion auf Bin<69>rdatenpuffer
|
||
|
||
extern GetBinaryDataString( out: string DataString, out: int DataStringLen);
|
||
|
||
|
||
|
||
//////////////////////////////////
|
||
// DTM - Funktionen
|
||
//////////////////////////////////
|
||
//
|
||
// Anmerkung: DTM-Funktionen nur aktiv bei WinEldi-Betrieb !!!
|
||
// Ab Version 5.0.0 nicht mehr unterst<73>tzt!
|
||
|
||
extern DTMFindLogUnit (out: bool rc, in: string LogUnit);
|
||
extern DTMGetSGVar (out: string SGVar, in: string SGArt);
|
||
extern DTMGetSGArt (out: string SGArt, in: string SGVar);
|
||
extern DTMGetVarWert (out: string VarWert, in: string VarName);
|
||
extern DTMSetupGetVarWert (out: string VarWert, in: string VarName);
|
||
extern DTMSetupGetStartPosition ();
|
||
extern DTMSetupGetNextAssoc ( out: bool rc, inout: string VarName, inout: string VarWert);
|
||
extern DTMLogUnitEintragen (in: string LogUnit);
|
||
extern DTMSGEintragen (in: string SGArt, in: string SGVar);
|
||
extern DTMLoescheAuftrag ();
|
||
extern DTMVariableEintragen (in: string VarName, in: string VarWert);
|
||
extern DTMVariableLoeschen (out: bool rc, in: string VarName);
|
||
extern DTMLoescheAlleVariablen ();
|
||
extern DTMSetupVariableEintragen (in: string VarName, in: string VarWert);
|
||
extern DTMSetupVariableLoeschen (out: bool rc, in: string VarName);
|
||
|
||
|
||
|
||
//////////////////////////////////
|
||
// Stringarray - Funktionen
|
||
//////////////////////////////////
|
||
|
||
extern StrArrayCreate(out: bool rc, out: int hStrArray);
|
||
extern StrArrayDestroy( in: int hStrArray);
|
||
extern StrArrayWrite( in: int hStrArray, in: int index, in: string str);
|
||
extern StrArrayRead( in: int hStrArray, in: int index, out: string str);
|
||
extern StrArrayGetElementCount( in: int hStrArray, out: int ElementCount);
|
||
extern StrArrayDelete( in: int hStrArray);
|
||
|
||
|
||
//////////////////////////////////
|
||
// RK512 u. FAB - Funktionen
|
||
//////////////////////////////////
|
||
//
|
||
// Anmerkung: Ab Version 5.0.0 nicht mehr unterst<73>tzt!
|
||
|
||
extern SPSInit( out: int komstatus, in: string device,
|
||
in: string file, in: int count, in: int msgbox);
|
||
extern SPSEnd( out: int komstatus);
|
||
extern SPSLeseVonSPS( out: int komstatus, out: int spsstatus,
|
||
out: int check, out: real vakuum1, out: real vakuum2);
|
||
extern SPSSendeAnSPS( out: int komstatus, in: int fehler, in : int sg);
|
||
extern SPSLeseVakWerte( out: int komstatus, out: int check,
|
||
out: real vakuum1, out: real vakuum2);
|
||
extern ApiJobFsLesenFAB (out: int rc, in: string sgvar, out: int edifehler,
|
||
out: string jobstatus,out: int fehler, out: int saetze);
|
||
extern ApiResultFsLesenFAB(out: int rc, out: int ausgeblendet, in: int satz);
|
||
|
||
//////////////////////////////////
|
||
// WINELDI-Funktion(en)
|
||
//////////////////////////////////
|
||
//
|
||
// Anmerkung: Ab Version 5.0.0 nicht mehr unterst<73>tzt!
|
||
|
||
extern ELDIOpenStartDialog(in: string CommandParameter, out: int ResultCode);
|
||
|
||
//////////////////////////////////
|
||
// Struktur / Memory Funktionen
|
||
//////////////////////////////////
|
||
|
||
extern CreateStructure ( out: long handle, in: int length);
|
||
extern SetStructureMode( in: int ReadWrite );
|
||
|
||
extern StructureByte ( in: long handle, in: int Offset, inout: byte value );
|
||
extern StructureInt ( in: long handle, in: int Offset, inout: int value );
|
||
extern StructureLong ( in: long handle, in: int Offset, inout: long value );
|
||
extern StructureString ( in: long handle, in: int Offset, in: int length, inout: string value );
|
||
|
||
|