creating .atcf and .atly files

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   Somebody might find this useful.  I have all our users set up with nailed telnet sessions.

This application simply creates 100 *.atcf config files and 100 *.atly layout files.  Rather than build each session configuration from scratch or build from a model I made the model atcf and atly files, and saved them as a Pick file.

This utility simply updates the atcf model with another telnet port, updates the atly model with the atcf name, and calls Accuterm's file transfer utility to write them out to Windows.

001 SUBROUTINE BUILD.PICK.SESSIONS(BL,C.L,C.P.S,C.S,D.TF)

002 * BUILDS ATCF AND ATLY FILES FOR CITRIX METAFRAME SERVER

003 OPEN '','DAVE' TO F.DAVE ELSE STOP 201,'DAVE'

004   FOR X = 101 TO 200

005   WRITEV 'HostPort=10':X ON F.DAVE,'ATCF',8

006   WRITEV 'FileName=c:\progra~1\atwin\nailed\c':X:'.atcf' ON F.DAVE,'ATLY',10

007   FILENAME1 = 'C':X:'.atcf'

008   FILENAME2 = 'L':X:'.atly'

009   DATA 'S'

010   DATA 'K'

011   DATA 'DAVE'

012   DATA 'ATCF'

013   DATA 'C:\TEMP'

014   DATA FILENAME1

015   EXECUTE 'FT'

016   DATA 'S'

017   DATA 'K'

018   DATA 'DAVE'

019   DATA 'ATLY'

020   DATA 'C:\TEMP'

021   DATA FILENAME2

022   EXECUTE 'FT'

023   NEXT X

024 RETURN

creating *.atcf and *.atly files

creating .atcf and .atly files