[ Mini Kiebo ]
Server: Windows NT DESKTOP-5B8S0D4 6.2 build 9200 (Windows 8 Professional Edition) i586
Path:
D:
/
Backup
/
Data Shendy
/
Back up Shendy
/
DATA
/
hms
/
INCLUDE
/
[
Home
]
File: apotik.BAK
#INCLUDE "\VFP\FOXPRO.H" #INCLUDE "PESAN.H" #DEFINE DEBUGMODE .F. #DEFINE INIFILE "HMS.INI" #DEFINE CRLF CHR(13) + CHR(10) #DEFINE CR CHR(13) #DEFINE TAB CHR(9) #DEFINE XRS_NAME "" #DEFINE CURRENCY "Rp" #DEFINE AERRORARRAY 7 *-- These constants are used in tsbaseform to *-- indicate the status of the current alias #DEFINE FILE_OK 0 #DEFINE FILE_BOF 1 #DEFINE FILE_EOF 2 #DEFINE FILE_CANCEL 3 *-- Constants to identify which trigger failed *-- using element 5 of the array returned by *-- AERROR(), as well as to reference the appropriate *-- array element in the error message array: aErrorMsg[] #DEFINE INSERTTRIG 1 #DEFINE UPDATETRIG 2 #DEFINE DELETETRIG 3 *-- Constants used to read the system registry #DEFINE HKEY_LOCAL_MACHINE -2147483646 #DEFINE KEY_SHARED_TOOLS_LOCATION "Software\Microsoft\Shared Tools Location" #DEFINE KEY_NTCURRENTVERSION "Software\Microsoft\Windows NT\CurrentVersion" #DEFINE KEY_WIN4CURRENTVERSION "Software\Microsoft\Windows\CurrentVersion" #DEFINE KEY_WIN4_MSINFO "Software\Microsoft\Shared Tools\MSInfo" #DEFINE KEY_QUERY_VALUE 1 #DEFINE ERROR_SUCCESS 0 #DEFINE ADMINBAR_LOC "Haryanto" #DEFINE ALL_LOC "All" #DEFINE USER_APPDEV_LOC "APPLICATIONS DEVELOPER" #DEFINE USER_OPSMGR_LOC "EDP MANAGER" #DEFINE DOLLAR_FORMAT1_LOC ": $" #DEFINE DOLLAR_FORMAT2_LOC "" #DEFINE DOLLAR_FORMAT3_LOC "$" #DEFINE SEEKVALUE_LOC "*Case Study" #DEFINE SYS2011_EXCLUSIVE_LOC "EXCLUSIVE" #DEFINE SYS2011_RECLOCK_LOC "RECORD LOCKED" #DEFINE SYS2011_RECUNLOCK_LOC "RECORD UNLOCKED" #DEFINE I_SHPMIN 111 #DEFINE I_SHPMAX 303 && how far right can the Behind the Scenes splitter go?