compile insert rw_equates
* JBK.RTI.01/25/96  Added equates for Lotus Notes Folders
* JBK/RTI/03/14/95  Added RWD_DT_RICHTEXT$ for Rich Text Fields
* declarations

DECLARE FUNCTION GET_REPOS_ENTITIES, REPOSITORY, GET.RECCOUNT
DECLARE FUNCTION REPOS_RESOLVE_ENTITY, ENTID, REQUEST_INFO
DECLARE FUNCTION OPENNOTE, CLOSENOTE, GETNOTEFIELD, RUNNOTESMACRO

* equates for different data sources

EQU RD_LH$          TO 1
EQU RD_NOTES$       TO 2

* equates for reporter supporting procedures

EQU RW_PREFIX$		TO 'RW' :@STATION: '_'
EQU RW_MAXCURSOR$	TO 8
EQU RW_GETLIST$		TO 'GETLIST'
EQU RW_ATSTATION$	TO '@STATION'		;* This token is replaced by @station

* LotusNotes specific equates

EQU RW_NOTESDELIM$        TO '#'
EQU RW_GETFIELDS_ALL$     TO 0
EQU RW_GETFIELDS_BY_FORM$ TO 1
EQU RW_GETFIELDS_BY_VIEW$ TO 2
EQU RW_GETFIELDS_BY_FOLDER$ TO 3

* equates for GetBlock processor

EQU FRMDATA_ONLY$	TO 1
EQU RAWDATA_ONLY$	TO 2

*COMMON /_RW_COM_/ lastKey@	;* for now it's in @RECUR1
EQU lastKey@ TO @RECUR1

* Column Decriptor structure

EQU RWD_POS$		TO 1
EQU RWD_NAME$		TO 2
EQU RWD_DATATYPE$	TO 3
	EQU RWD_DT_SDWORD$	TO 3
	EQU RWD_DT_SDOUBLE$	TO 7
	EQU RWD_DT_LPSTR$	TO 10
	EQU RWD_DT_BOOLEAN$	TO 11
	EQU RWD_DT_DATE$	TO 12
	EQU RWD_DT_TIME$	TO 14
	EQU RWD_DT_RICHTEXT$ TO 16
EQU RWD_FIELDTYPE$	TO 4
EQU RWD_LEN$		TO 5
EQU RWD_JUST$		TO 6
EQU RWD_CONV$		TO 7
EQU RWD_MV$		TO 8
EQU RWD_INDEXED$	TO 9

* repository types / classes

EQU RTYPE_DBTABLE$ TO 'DBTABLE'
EQU RTYPE_DBSOURCE$ TO 'DATASOURCE'
	EQU RCLASS_NOTESDB$ TO 'NOTESDB'

EQU RTYPE_DBCOMPONENT$ TO 'DBCOMPONENT'
	EQU RCLASS_NOTESVIEW$ TO 'NOTESVIEW'
	EQU RCLASS_NOTESFORM$ TO 'NOTESFORM'
	EQU RCLASS_NOTESFOLD$ TO 'NOTESFOLD'


EQU RTYPE_NOTESDB$    TO "DATASOURCE"
EQU RTYPE_NOTESVIEW$  TO "DBCOMPONENT"
EQU RTYPE_NOTESFORM$  TO "DBCOMPONENT"
EQU RTYPE_NOTESFOLD$  TO "DBCOMPONENT"

* rich text stuff

EQU RW_RTF_STARTTEXT$  TO '{\rtf1\ansi \deff0\deflang1024'
EQU RW_RTF_ENDTEXT$    TO '\par}'
EQU RW_RTF_FONTS$      TO '$Fonts':@fm:'RichText'
EQU RW_RTF_COLORS$     TO '$Colors':@fm:'RichText'

