added sysprog entities

2024-03-25 15:17:34 -07:00
parent 600a8e1f61
commit 3a6a2b6b5b
1028 changed files with 171660 additions and 0 deletions
--- a/SYSPROG/STPROCINS/OLIST_EQUATES.txt
+++ b/SYSPROG/STPROCINS/OLIST_EQUATES.txt
@ -0,0 +1,82 @@
+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
+///////////////////////////////////////////////////////////////////////////////
+///////////////////////////////////////////////////////////////////////////////