83 lines
2.8 KiB
Plaintext
83 lines
2.8 KiB
Plaintext
Compile Insert OList_Equates
|
|
/*
|
|
** 03/09/22 rjc update for oi10 - untouched since original SLIST to OLIST conversion
|
|
*/
|
|
|
|
#pragma format_indent_comments
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
#IFNDEF _OLIST_EQUATES_
|
|
#DEFINE _OLIST_EQUATES_
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
|
|
Equ ActiveListProperty$ To "@LISTACTIVE" ; * // Property used to flag (TRUE or FALSE) if there
|
|
* // a select list 'active'. @List_Active gets blown
|
|
* // away by the system..so we need to track an active
|
|
* .. ourselves
|
|
|
|
|
|
****************************************************************************************************************
|
|
|
|
|
|
* // REPOSITORY EQUATES
|
|
|
|
Equ ReposOListTypeName$ To "OIREPORT"
|
|
Equ ReposOListListClass$ To "OLISTLIST"
|
|
Equ ReposOListQueryClass$ To "OLISTQUERY"
|
|
Equ ReposOListReportClass$ To "OLISTLAYOUT"
|
|
|
|
|
|
****************************************************************************************************************
|
|
|
|
|
|
* // %%OLIST%% COMMON
|
|
|
|
* // SLCancel@ Set to true if if the user clicks the 'Stop' button on the SLIST MdiFrame
|
|
|
|
Common /%%OLIST%%/ OLCancel@
|
|
|
|
|
|
|
|
****************************************************************************************************************
|
|
|
|
|
|
* // Default Settings for %%OLIST%%
|
|
|
|
Equ SListIniDefaultDest$ To "SCREEN"
|
|
Equ SListIniDefaultOrient$ to "PORTRAIT"
|
|
|
|
|
|
|
|
* // SLIST_PRODUCE Equates
|
|
|
|
Equ OIPIExport$ to 1
|
|
Equ HTMLExport$ to 2
|
|
Equ DOSExport$ to 3
|
|
|
|
Equ CSVType$ to 1
|
|
Equ TABType$ to 2
|
|
|
|
|
|
Equ CSVOptsQuote$ to 1
|
|
Equ CSVOptsMVDelim$ to 2
|
|
|
|
|
|
equ oipiFont_Name$ to 1 // Font Name
|
|
equ oipiFont_Size$ to 2 // Point Size 4-128
|
|
equ oipiFont_Just$ to 3 // Justification "L", "R", or "C"
|
|
equ oipiFont_Bold$ TO 4 // 0 = off, 1 = on
|
|
equ oipiFont_Italics$ TO 5 // 0 = off, 1 = on
|
|
equ oipiFont_Underline$ to 6 // 0 = off, 1 = on
|
|
equ oipiFont_Strikethrough$ to 7 // Not Implemented
|
|
equ oipiFont_ForeColor$ to 8 //
|
|
equ oipiFont_TextAngle$ to 9 // In tenth of degrees
|
|
equ oipiFont_TextAlign$ to 10 //0=Top,1=Bottom,2=Baseline
|
|
equ oipiFont_Maxpos$ to 10
|
|
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
#ENDIF
|
|
///////////////////////////////////////////////////////////////////////////////
|
|
///////////////////////////////////////////////////////////////////////////////
|