jbratu

https://www.revelation.com/o4wtrs/oecgi3.exe/O4W_RUN_FORM?INQID=WORKS_READ&KEY=9A63280D61AE93030A85D434E&SUMMARY=0#/section/breadcrumb/UPDATETABLE/Display

subroutine t_Refresh_blank_rdk(list_id)
     /*
     **  Build rdk from a syslists record
     **  listId is the key to a syslists record is a list of SYSREPOS ids
     **  each line should be a sysrepos id or table/row
     ** commented rows start with #
     ** comments in lines start with ;
     ** e.g. 

jbratu

If Index(GetCommandLine(), 'DV=1',1) > 0 Then Debug

jbratu

#Tail a file
get-content -Tail 20 -Wait -path '.\log.txt'

#Tail and grep a file
Get-Content log.txt -tail 20 –wait | Select-String 'look for string'

#Grep a file
get-content -path '.\log.txt' | Select-String 'look for string'

#Move files older than 180 days

jbratu

subroutine Scratch_Jab_indexmaint(void)

Declare Function Get_Status, List_Index_Detailed


declare function Set_FSError, CS_RLIST_UTIL
declare subroutine RLIST
$Insert Logical

*Change to the name of the table to ReadNext through

jbratu

Function CS_GET_DLL_VERSION(FilePath)
 *
 *FilePath - Full path to the DLL file. I.e. c:\windows\twain_32.dll
 *
* Enable oi10 event syntax by default because this is an event handler
	#pragma precomp event_precomp
	Declare Function get_property
	$Insert Logical
	$insert rti_AXSH_Equates

jbratu

@RM  ÿ 255
@FM  þ 254
@VM  ý 253
@SVM ü 252
@TM  û 251
@STM ú 250

jbratu

When in Draw Mode:
   
      Left Click
         1) Left-click to drop a default-size control on a the form
         2) Left-click and drag to draw a control on the form
         3) Ctrl-left-click to drop a default size control on a container control
         4) Ctrl-left-click and drag to draw a control on a container control.
         
      Right Click
         1) Right-click and drag to draw a control on the form

jbratu

table = "MYTABLE"
tableParams = ""
tableParams<1> = "4096" ;* new framesize
tableParams<2> = "40"    ; * new threshold
tableParams<3> = "567" ;  * estimated avg size
tableParams<4> = "3000000" ; * new reccount
Call RTI_REMAKETABLE(table, tableParams)

//https://www.revelation.com/o4wtrs/oecgi3.exe/O4W_RUN_FORM?INQID=WORKS_READ&KEY=EA237ADAB4D7C3C3C05E09655&SUMMARY=0#/section/breadcrumb/UPDATETABLE/Display

jbratu

Function AINN(List,Value)

If List EQ '' Then
	Return Value
End Else
	List<-1> = Value
	Return List
End

Return

jbratu

Subroutine CS_VAR_To_SAVED_LIST(ListName,ListKeys)
*
* ListName: Name of the saved list to create. Recall with getlist or activate_Save_select
* ListKeys: @FM list of keys to save into the list
*

Open 'SYSLISTS' To Table Else
	*Check get_status for errors after call
	Return
End