azcomputerguru/claudetools
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix C:\STAGE txt datasheet upload: add CTONWTXT call to CTONW, rewrite CTONWTXT v2.0

Browse Source 
CTONWTXT.BAT was never being called. Now invoked from CTONW.BAT on every boot.
Destination changed from X: (broken Novell serve.sys check) to T:\Stage\%MACHINE%\.
Removed IF NOT clauses for DOS 6.22 compatibility. Deployed to AD2 and synced to D2TESTNAS.

Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com>
This commit is contained in:
OC-5070
2026-03-28 13:42:01 -07:00
parent e426dd8b16
commit 93934b625b
2 changed files with 45 additions and 34 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
projects/dataforth-dos/batch-files/CTONW.BAT
View File

@@ -25,6 +25,9 @@ COPY C:\ATE\VASLOG\*.DAT T:\%MACHINE%\LOGS\VASLOG
ECHO Archiving work-order report files to network...
COPY C:\Reports\*.TXT T:\%MACHINE%\Reports
REM Upload text datasheet files from C:\STAGE to network
CALL C:\BAT\CTONWTXT.BAT
ECHO Archiving log file to network...
COPY C:\ATE\*.LOG T:\%MACHINE%

76
projects/dataforth-dos/batch-files/CTONWTXT.BAT
View File

@@ -1,34 +1,42 @@
@ECHO OFF
REM PWR: 2013-02-06
ECHO .....................................................
ECHO Archiving text datasheet files to %2 on network...
ECHO CtoNWtxt.bat > C:\ATE\CtoNWtxt.log
ECHO 2013-02-06 Version >> C:\ATE\CtoNWtxt.log
ECHO ..................................................... >> C:\ATE\CtoNWtxt.log
ECHO Important! This log file is from the previous >> C:\ATE\CtoNWtxt.log
ECHO operation since C to Network >> C:\ATE\CtoNWtxt.log
ECHO archiving is before text file >> C:\ATE\CtoNWtxt.log
ECHO archiving! >> C:\ATE\CtoNWtxt.log
ECHO ..................................................... >> C:\ATE\CtoNWtxt.log
ECHO Copying from C:\STAGE\*.txt to %2 >> C:\ATE\CtoNWtxt.log
IF EXIST C:\STAGE\*.txt GOTO FILEXFER
REM IF ERRORLEVEL=1 ECHO No files were found to transfer
ECHO No files were found to transfer
ECHO No files were found to transfer >> C:\ATE\CtoNWtxt.log
GOTO END
:FILEXFER
IF NOT EXIST %2\serve.sys GOTO NODIR
copy C:\STAGE\*.txt %2 >> C:\ATE\CtoNWtxt.log
IF ERRORLEVEL=0 ECHO Copy Completed normally
DEL C:\STAGE\*.txt >> C:\ATE\CtoNWtxt.log
ECHO Network archiving of text datasheet files to %2 done!
ECHO .....................................................
GOTO END
:NODIR
ECHO %2\serve.sys not found. >> C:\ATE\CtoNWtxt.log
ECHO %2\serve.sys not found. Check Network connection.
:END
ECHO Network archiving of text datasheet files to %2 done!
ECHO .....................................................
@ECHO OFF
REM Computer to Network - Upload text datasheet files to network
REM Version: 2.0 - Updated destination to T:\Stage\%MACHINE%\
REM Last modified: 2026-03-28
REM Verify MACHINE variable is set
IF "%MACHINE%"=="" GOTO NO_MACHINE
ECHO .....................................................
ECHO Archiving text datasheet files to network...
ECHO CTONWTXT.BAT v2.0 > C:\ATE\CTONWTXT.LOG
ECHO Machine: %MACHINE% >> C:\ATE\CTONWTXT.LOG
REM Create destination directories (harmless if they exist)
MD T:\Stage
MD T:\Stage\%MACHINE%
REM Check for TXT files to transfer
IF EXIST C:\STAGE\*.TXT GOTO FILEXFER
ECHO No text datasheet files found in C:\STAGE
ECHO No text datasheet files found in C:\STAGE >> C:\ATE\CTONWTXT.LOG
ECHO .....................................................
GOTO END
:FILEXFER
ECHO Copying C:\STAGE\*.TXT to T:\Stage\%MACHINE%\
ECHO Copying C:\STAGE\*.TXT to T:\Stage\%MACHINE%\ >> C:\ATE\CTONWTXT.LOG
COPY /Y C:\STAGE\*.TXT T:\Stage\%MACHINE%\ >> C:\ATE\CTONWTXT.LOG
DEL C:\STAGE\*.TXT >> C:\ATE\CTONWTXT.LOG
ECHO Network archiving of text datasheet files done!
ECHO .....................................................
GOTO END
:NO_MACHINE
ECHO .....................................................
ECHO ERROR: MACHINE variable not set
ECHO Run DEPLOY.BAT or ATESYNC first
ECHO .....................................................
PAUSE
GOTO END
:END