04/05/2011 Keven Miller VARREADS is a Store-2-Disk (STD) file with these files :file d=varreads;dev=disc :vstore *d;@.@.@;show FILENAME GROUP ACCOUNT VOLUME RESTRICTIONS SECTORS CODE MEDIA VARREAD .WWW .KEVENM DISC :C 256 NMPRG 1 VARREADC.WWW .KEVENM DISC :C 432 1 VARREADD.WWW .KEVENM DISC :C 96 1 VARREAD will read files as Variable length records. Using COPY mode it can read message files without destroying the records. With no switches, CCTL, Length, and type of data for each record are shown. The types of data are Asc All printable ascii data. ACt Printable ascii with some of bell,backspace,tab,newline,return. AEs Printable ascii with escape and any of the above control-chars. Bin Contains other control-chars. Fox 11: Fox 11: Fox 11:setvar ccopts "-Aa +e +w1" Fox 11:ccxllk varreadc,varread TUE APR 5 2011 10:00 PM Copyright Hewlett-Packard Co. 1984. PAGE 1 HP C/iX HP31506 A.05.19 "VARREADC" 1 0 # 1 "VARREADC.WWW.KEVENM" 1 0 2 0 3 0 4 0 #pragma list off Clean compile HP Link Editor/iX (HP30315A.06.17) Copyright Hewlett-Packard Co 1986 LinkEd> link from=$oldpass;rl=libcshr.lib.sys,libcansi.lib.sys,libmansi.lib.sys ,libcrand.lib.sys,socketrl.net.sys;TO=varread;SHARE;CAP=IA,BA Clean Link VERSION C.60.02 Copyright (C) Hewlett-Packard 1987. All Rights Reserved. VARREAD.WWW.KEVENM SOM #1 @(#) HP30315 A.05.10 95/02/08 NRT0 Startup routine MAX STACK SIZE: 393216 MAX HEAP SIZE: 81920000 CAPABILITIES: BA,IA UNSAT PROC NAME: ENTRY NAME: LIBRARY SEARCH LIST: Fox 11: Fox 11: Fox 11:varread VARREAD E.01.04 (Max recsize 32760) !! Control-Y Enabled Usage: VARREAD [switches] file -r Destructive read msg file -d Display data -t Trim trailing blanks on display -s # Seconds to wait between records - 0 means wait for a keypress -w Wait if writers exist (requires -r) -b Display both info and data JCW 0 = success 1 = file read error 2 = parameter error Fox 11: Fox 11: Fox 11:varread music VARREAD E.01.04 (Max recsize 32760) !! Control-Y Enabled MUSIC.WWW.KEVENM fop 01 aop 010300 rs 256 eof 8 R1 W0 c Rec 0 Bin 256 Rec 1 Bin 256 Rec 2 Bin 256 Rec 3 Bin 256 Rec 4 Bin 256 Rec 5 Bin 256 Rec 6 Bin 256 Rec 7 Bin 256 Fox 11: Fox 11: Fox 11:varread "socks.data" VARREAD E.01.04 (Max recsize 32760) !! Control-Y Enabled SOCKS.DATA.KEVENM fop 05 aop 010300 rs 80 eof 3 R1 W0 c Rec 0 ACt 80 Rec 1 ACt 80 Rec 2 ACt 80 Fox 11: Fox 11: Fox 11:listf a#@.pub.cslxl,2 ACCOUNT= CSLXL GROUP= PUB FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE---- SIZE TYP EOF LIMIT R/B SECTORS #X MX A7O 8001B VACM 4 1031 1 256 1 * Fox 11:varread a7o.pub.cslxl VARREAD E.01.04 (Max recsize 32760) !! Control-Y Enabled A7O.PUB.CSLXL fop 030505 aop 010100 rs 8001 eof 4 R1 W0 c Rec 0 Asc 0[ ] 44 Rec 1 AEs 208[ ] 1677 Rec 2 AEs 208[ ] 22 Rec 3 AEs 208[ ] 248 Fox 11: Fox 11:listf a#@.pub.cslxl,2 ACCOUNT= CSLXL GROUP= PUB FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE---- SIZE TYP EOF LIMIT R/B SECTORS #X MX A7O 8001B VACM 4 1031 1 256 1 * Fox 11: Fox 11:l ranger.data TUE, APR 5, 2011, 11:16 PM ACCOUNT= KEVENM GROUP= DATA FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE---- SIZE TYP EOF LIMIT R/B SECTORS #X MX RANGER 80B FA 6 6 3 16 1 1 Fox 11:varread.pub "-d -t ranger.data" VARREAD E.01.04 (Max recsize 32760) !! Control-Y Enabled RANGER.DATA.KEVENM fop 05 aop 010300 rs 80 eof 6 R1 W0 cdt _____ _ __ ____ _ _ _ ____ _____ ____ |___ / | |/ /| _ \ / \ | \ | | / ___|| ____|| _ \ |_ \ | / | |_) | / _ \ | \| || | _ | _| | |_) | ___) || \ | _ < | _ || |\ || |_| || |___ | _ < |____/ |_|\_\|_| \_\|_| |_||_| \_| \____||_____||_| \_\ Fox 11: Fox 11: