Answer / ajay ahuja

Through FTP (File Transfer Protocol) !!!!!


Also Manually we can do this ==>

1. On menu options use "Transfer" option (Host File
Transfer).

2. Use host system TSO (click radio Button).

3. Specify Host file name and member (if want to store in
PDS member). Remember, file name ur specifying must be
existing one and of same record length as of PC file. say
ABC.XYZ.FILE

4. At Browser "specify the path of file to be copied from
PC to Mainframe. then Apply and OK.

5. Go to ISPF Screen, option =6.

6. again go to option "Transfer", underneath "Send". The
PC file will be copied to Mainframe file (ABC.XYZ.FILE).


Similarly if one want to Transfer from Mainframe to PC,
same process can be followed Except use "Receive" in point
6.

Note: Manually transfer will be used for small files only
coz its time consuming.


I hope this will help u all.

Answer / richard

how do you write a vbscript to do this using aviva
interface or eiconbasic macro..none work right now

Sub Main()

rc% = session.connect(false)
msgbox rc%
rc% = session.hostname
Msgbox rc%


pcfile = "c:\Documents and Settings\e454221
\Desktop\testblk.txt"

FileTransfer.PCFIle = pcfile
FileTransfer.scheme = "SendTXT_TSO"
FileTransfer.hostfile = "e454221.testxfer.clist"
rc% = FileTransfer.send(FALSE)
msgbox rc%
rc% = filetransfer.status
msgbox rc%

01 MOVE 10 TO N 05 PERFOM PARA1 TIMES STOP RUN WAT WILL HAPPEN?? WILL IT RUN INFINITELY OR AN ERROR WIL BE THER BECAUSE NO OF TIMES IS NOT GIVEN??

1 Answers  

---

What is rmode(any) ?

0 Answers  

---

How can you declare the file ?

1 Answers   Wipro,

---

How to find out the closest prime number of an input number? I believe it has something to do with SEARCH and COBOL Linear Array.

0 Answers   Infosys,

---

where did you see the information regarding abend codes in jcl?

1 Answers   Hewitt,

---

---

hi, can you ppl tell me, how to check whether the rewrite we gave for the ksds file is successful or not in the program.? i gave rewrite, the rewrite code is executing and maxcc=0 but updation doenot happen in the file?

1 Answers   CGI,

---

why occurs clause not mentioned in 01 level

6 Answers   HCL, NIIT, TCS, Tesco,

---

input= ,,,, mainframe training ,,, hyderabad .... location.... output1=$ mainframe training in hyderabad location$ output2=**** mainframe training in hyderabad location ****. In this pgn when we give input considering the spaces the output is displayed in this format.Like in the place of ,,,, $ should be displayed likewise.So please helpmeout.

0 Answers  

---

Extract only those records from a PS file which are having word 'TEXT' in the records using COBOL? The word TEXT is not present in a particular position in all the records.

2 Answers   RBS,

---

How to solve SOC7. I have the cobol coded as below 01 A PIC 9(4). 01 AIN REDEFINES A. 05 AIN1 PIC S9(4) 01 B PIC 9(4)V99. 01 BIN REDEFINES B. 05 BIN1 PIC S9(4)V99. PROCEDURE DIVISION. START-PARA. INITIALIZE A AIN B BIN. ACCEPT A B. DISPLAY 'VALUE OF A=' A. DISPLAY 'VALUE OF B=' B. DISPLAY 'VALUE OF BIN1=' BIN1. DISPLAY 'VALUE OF AIN1=' AIN1. COMPUTE AIN1 = BIN1 - AIN1. DISPLAY 'VALUE OF AIN1=' AIN1. When i'm executing this code i'm getting SOC7 for A = 12 & B=34. Can someone explain SDSF OUTPUT DISPLAY TCOM058R JOB05458 DSID 102 LINE 0 COLUMNS 02- 81 COMMAND INPUT ===> SCROLL ===> CSR ********************************* TOP OF DATA ********************************** VALUE OF A=12 VALUE OF B=34 VALUE OF BIN1=34 VALUE OF AIN1=12 CEE3207S The system detected a data exception (System Completion Code=0C7). From compile unit PROG1 at entry point PROG1 at statement 29 at compile +000004CE at address 00007ECE. Please address how to solve this issue Thanks in advance.

1 Answers  

---

Can you call an OS VS COBOL pgm from a VS COBOL II pgm ?

3 Answers   Microsoft,

---

in cobol i have one file it contains records like 10,4,23,98,7,90..... total records 100. iwant 10 to 20 in reverse order in cobol environ ment any one please give the answer......

2 Answers   IBM,

---