added sysprog entities

SYSPROG/STPROCINS/RTP57_BFS_EQUATES.txt

@@ -0,0 +1,34 @@
+Compile insert RTP57_BFS_EQUATES
+
+
+Equ BFS$ To "RTP57"
+Equ null_term$ To \00\
+
+* ----
+* Layout of SYSPTR Volume definition
+* ----
+* items 1-6 are OI standard for any BFS, beyond that is BFS specific
+/*
+* Standard definitions used by RTP49
+EQU VOL_PTR_TOKEN$    TO 1
+EQU VOL_PTR_FS$       TO 2
+EQU VOL_PTR_LOCATION$ TO 3
+EQU VOL_PTR_CONTROL$  TO 4
+*/
+Equ RTP57_Volume$            to 1  ; * the literal "VOLUME"
+Equ RTP57_BfsType$           to 2  ; * the literal "RTP57"
+Equ RTP57_Ctl_Info$          to 3  ; * <1,1> = SYSPTR ID or physical location
+Equ RTP57_Foreign_Info$      to 4  ; * Connectionstring parameters
+Equ RTP57_VolumeId$          to 5  ; * Name of the volume
+
+* layout of 
+Equ RTP57_foreign_Server$   To 1  ; * BOBCART
+Equ RTP57_foreign_Port$     To 2  ; * 8091
+Equ RTP57_foreign_Sharename$   To 3  ; * OIFOLDER
+Equ RTP57_foreign_encrypt_transport$ To 4  ; * 0 / 1
+Equ RTP57_foreign_require_authentication$ To 5  ; * 0 / 1
+Equ RTP57_foreign_is_connectionstring$ To 6  ; *"0 / 1"
+
+
+ 
+Declare Subroutine RTP57