Home

Program Interfaces - Fujitsu manual server

1. EXAMPLE SHOW FILE FT ATTRIBUTES FILE NAME LOCALFILE 0 A INFORMATION ALL ATTRIBUTES 5 FROM A COBOL PROGRAM i DENTIFICATION DIVISION PROGRAM ID TESTNLSHOW VIRONMENT DIVISION ONFIGURATION SECTION PECIAL NAMES TERMINAL IS TERM 2 DATA DIVISION WORKING STORAGE SECTION 77 MAIN RCODE STRING PIC SZZ229 77 SUB RCODE STRING 27779 COPY FTNLSHOW OF FTLIB COPY FTRETC OF FTLIB PROCEDURE DIVISION STEUER SECTION ST 01 SPECIFY PARAMETERS MOVE LOW VALUE TO USER PARAMETERS MOVE LOCALFILE TO FILE NAME SET ALL ATTRIBUTES IN INFORMATION TO TRUE NLSHOW CALLING CALL NLSHOW USING FT NLSHOW LIST FT RETURN INFO RESULT HANDLING IF OKAY IN MAIN RETURN CODE THEN DISPLAY NLSHOW OKAY UPON TERM U24845 J Z135 4 76 131 CALL NLSHOW example COBOL programming interface ELSE MOVE MAIN RETURN CODE TO MAIN RCODE STRING MOVE SUB RETURN CODE TO SUB RCODE STRING DISPLAY NLSHOW REJECTED UPON TERM DISPLAY MAIN
2. EXAMPLE MODIFY REMOTE FILE ATTRIBUTES PARTNER VAROO1 FILE NAME OLDFILE NEW NAME NEWFILE TRANS USID ACCOUNT PASSWORD FROM A COBOL PROGRAM DENTIFICATION DIVISION PROGRAM ID TESTNMOD VIRONMENT DIVISION m ONFIGURATION SECTION PECIAL NAMES TERMINAL IS TERM c DATA DIVISION WORKING STORAGE SECTION 77 MAIN RCODE STRING PIC ZZZZ9 77 SUB RCODE STRING PIC ZZZZ9 COPY FTNMOD OF FTLIB COPY FTRETC OF FTLIB PROCEDURE DIVISION STEUER SECTION ST 01 SPECIFY PARAMETERS MOVE LOW VALUE TO USER PARAMETERS MOVE 01 TO PARTNER NAME MOVE OLDFILE TO FILE NAME MOVE NEWFILE TO NEW NAME MOVE USERID TO USER ID MOVE ACCOUNT TO ACCOUNT MOVE PASSWORD TO PASSWORD NMOD CALLING CALL NMOD USING FT NMOD LIST FT RETURN INFO U24845 J Z135 4 76 137 CALL NMOD example COBOL programming interface RESULT HANDLING IF OKAY IN MAIN RETURN CODE THEN DISPLAY NMOD OKAY UPON TERM ELSE
3. MODFTADS ASSEMBLER programming interface for openFT AC 2 2 6 MODFTADS Modify admission sets The macro MODFTADS can be used modify admission sets The functionality corresponds to that of the command MODIFY FT ADMISSION SET Format of the macro MODFTADS LIST format default format OWN STD 1 adr NONE adr OLD SS 4 1 adr UNCHG 1 AYES UNCHG 4 STD integer0 100 CHG e U CHG e UNC 4 STD integer0 100 p 4 STD 11 integer0 100 integer0 100 73 MAXOSND sr int UNCHG 5 4 STD 1 inte Operand MF L USER PASS L PRIV Operation MODFTADS Name 1 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT AC U24845 J Z135 4 76 A NEW PASS 55 Format of the macro MODFTADS DSECT format A USERID L USERID L PASS A PASS FIELDS FOR ENTERING KEYWORDS USERID OWN STD PASSWORD NONE SELECT ALL NEW PASSWORD NONE OLD PRIVILEGED UNCHG YES OUTBOUND SEND UNCHG STD 0 100 OUTBOUND RECEIVE UNCHG STD 0 100 INBOUND SEND UNCHG STD 0 100 INBOUND RECEIVE UNCHG STD 0 100 INBOUND PROCESSING UNCHG STD 0 100 UNCHG STD 0 100 INBOUND MANAGEMENT RESERVED xxxFTADS DSEC
4. LETT m FT TI FEL ART LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA X 1 X 1 X 1 X 1 X 1 X 1 X 1 X 1 X 1 X 80 PIC PIC PIC PIC PIC PIC PIC PIC PIC PIC COBOL programming interface 05 ACCESS MODE 88 UNCHANGED 88 REPLACE ALL BY 88 ADD PAR 05 READ FILE 88 NO VALUE 88 NO PAR 88 YES 05 INSERT DATA UNIT 88 NO VALUE 88 NO PAR 88 YES 05 REPLACE FILE 88 NO VALUE 88 NO PAR 88 YES 05 EXTEND FILE 88 NO VALUE 88 NO PAR 88 YES 05 ERASE DATA UNIT 88 NO VALUE 88 NO PAR 88 YES 05 READ ATTRIBUTES 88 NO VALUE 88 NO PAR 88 YES 05 CHANGE ATTRIBUTES 88 NO VALUE 88 NO PAR 88 YES 05 DELETE FILE 88 NO VALUE 88 NO PAR 88 YES 05 LEGAL QUALIFICATION 88 UNCHANGED U24845 J Z135 4 76 CALL NMOD COBOL programming interface The version specification at the beginning of the structure FT NCOPY LIST serves to identify the COPY element and must not be overwritten The NMOD macro does not change any values in the structure FT NMOD LIST The fields are to be written with left justified characters and filled with right justified blanks default for the COBOL MOVE statement for character string
5. ASSEMBLER programming interface for openFT AC Format of the macro CREFTPRF DSECT format ISSION ISSION ADMISSION ADMISSION R ADMISSION R ADMISSION D USER ADMISSION D USER ADMISSION X LIB PREFIX X LIB PREFIX REFIX REFIX ON ON D D ESSING ADMISSION ESSING ADMISSION MF DL xxx ACNAME 1 L PASSWORD A PASSWORD A TRANSFER AD LCTRANSFER AD LCUSER ID USER A USER ID USER ACUSER ACC USE LCUSER ACC USE LCUSER PASSWOR ACUSER PASSWOR ACPARTNER NAME LCPARTNER NAME LCFILE PREF ACFILE PREF ACELEMENT P LCELEMENT P LCELEMENT VERS ACELEMENT VERS ACELEMENT TYPE LCELEMENT TYPE LCFILE PASSWOR ACFILE PASSWOR ACUSER ID PROC LCUSER ID PROC LCUSER ACC PROCESSING ADMISSION ACUSER ACC PROCESSING ADMISSION D PROCESSING ADM D PROCESSING ADM ESSING ESSING ESSING ESSING U24845 J Z135 4 76 ACUSER PASSWOR LCUSER PASSWOR LCSUCCESS PROC ACSUCCESS PROC ACFAILURE PROC LCFAILURE PROC Operand Operation CREFTPRF DSECT FHDR MF C amp P DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 Name name T XXXFTPR XXXHPRF XXXNAME XXXNAMEL XXXPASSL XXXPASS XXXTAD XXXTADL XXXUUSL XXXUUS XXXUAC XX
6. L PASSWORD A PASSWORD ACSELECT TRANSFER ADMISSION LCSELECT TRANSFER ADMISSION LCSELECT OWNERID ACSELECT OWNERID ACNEW NAME LCNEW NAME LCTRANSFER ADMISSION ACTRANSFER ADMISSION ACUSER ID USER ADMISSION LCUSER ID USER ADMISSION LCUSER ACC USER ADMISSION ACUSER ACC USER ADMISSION 2 T A USER PASSWORD USER ADMISSION L USER PASSWORD USER ADMISSION L PARTNER NAME A PARTNER NAME ACFILE PREFIX LIB PREFIX LCFILE PREFIX LIB PREFIX LCELEMENT PREFIX ACELEMENT PREFIX ACELEMENT VERSION LCELEMENT VERSION LCELEMENT TYPE ACELEMENT TYPE ACFILE PASSWORD LCFILE PASSWORD LCUSER ID PROCESSING ADMISSION ACUSER ID PROCESSING ADMISSION ACUSER ACC PROCESSING ADMISSION LCUSER ACC PROCESSING ADMISSION LCUSER PASSWORD PROCESSING ADM ACUSER PASSWORD PROCESSING ADM 81 DSECT FHDR MF C amp P DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A XXXFTPRF XXXHPRF XXXNAME XXXNAMEL XXXPASSL XXXPASS XXXTAD XXXTADL XXXOWNL XXXOWN XXXNNAM XXXNNAML XXXNTADL XXXNTAD XXXUUS XXXUUSL XXXUACL XXXUAC XXXUPA XXXUPAL XXXPARTL XXXPART XXXFIL XXXFILL XXXELL XXXEL XXXEV XXXEVL XXXETYL XXXETY XXXFPA XXXFPAL XXXPUSL XXXPU
7. ASSEMBLER programming interface for openFT AC SHWFTRGE Format of the macro SHWFTRGE DSECT format A USERID L USERID LCSELECT PARTNERNAME A SELECT PARTNERNAME RESERVED RESERVED FIELDS FOR ENTERING KEYWORDS DS XL1 USER ID OWN DS XL1 SELECT ALL DS XL1 PARTNER ALL DS XL1 OUTPUT SOUT SLST SOUTC SLSTC DS XL2 RESERVED EQU xxxFTRGE DSECT FHDR MF C amp P DS A DS XL2 DS XL2 DS A DS A DS XL2 XXXFTRGE XXXHRGE XXXUSER XXXUSERL XXXPTNL XXXPT XXXBU XXXBUFL 5 XXXIUSER TT 5 XxxOUTPT XXXRESRV XXXFTRGL The meaning of the parameters in the macro SHWFTRGE corresponds to the meaning of the parameters in the command SHOW FT RANGE In the OUTPT address field SOUT stands for OUTPUT SYSOUT and SLST stands for OUTPUT SYSLST in the command SOUTC and SLSTC stand for their respective output in CSV format LAYOUT CSV For the other two values output is in standard format LAYOUT STD Meaning in command USER IDENTIFICATION SELECT PARAMETER PARTNER NAME in the structure SELECT PARAMETER OUTPUT LAYOUT 93 Address field D format USER SEL PTN OUTPT OUTPT Operand L format USER SELECT PARTNER OUTPUT LAYOUT U24845 J Z135 4 76 YFSEQU ASSEMBLER programming interface for openFT AC 2 2 12 YFSEQU Set constants for the
8. XXxRES D PT RV RL The meaning of the parameters in the macro SHWFTPRF corresponds to the meaning of the parameters in the command SHOW FT PROFILE as shown in the following table In the OUTPT address field SOUT stands for OUTPUT SYSOUT and SLST stands for OUTPUT SYSLST in the command SOUTC and SLSTC stand for their respective output CSV format LAYOUT CSV For the other two values output is in standard format 91 Address field Meaning in command D format NAME NAME SEL SELECT PARAMETER TAD TRANSFER ADMISSION in the structure SELECT PARAMETER OWN OWNER IDENTIFICATION in the structure SELECT PARAMETER INFO INFORMATION OUTPT OUTPUT OUTPT LAYOUT LAYOUT STD Operand L format NAME SELECT TAD OWNER INF OUTPUT LAYOUT U24845 J Z135 4 76 interface for openFT AC ASSEMBLER programming 2 2 11 SHWFTRGE List accessible partner systems SHWFTRGE The macro SHWFTRGE can be used to list accessible partner systems The functionality corresponds to that of the command SHOW FT RANGE Format of the macro SHWFTRGE LIST format default format ALL 1 adr U24845 J Z135 4 76 Operand 11 OWN 1 adr USER SELECI JALL PARTNER 1SYSOUT 1 L SYSLST OUTPUT STD 1 CSV LAYOUT Operation SHWFTRGE Name 1 92
9. ASSEMBLER programming interface for openFT AC 2 2 10 SHWFTPREF Output admission profile The macro SHWFTPRF can be used to view an admission profile The functionality corre sponds to that of the command SHOW FT PROFILE Format of the macro SHWFTPRF LIST format default format Operand 1 ALL 1 adr L SELECT OWN ALL NOTSP gt adr xOWN L OWNER 4 ALL J adr ONLY 1 1 ALL L JSYSOUT OUTPUT SYSLST L STD LAYOUT CSV U24845 J Z135 4 76 Operation SHWFIPRF Name 1 SHWFTPRF ISSION ISSION LL NOTSP LST SOUTC SLSTC DSECT FHDR MF C amp P DS A ACNAME DS XL2 DS XL2 LCSELECT TRANSFER ADM DS A ACSELECT TRANSFER ADM DS A ACSELECT OWNERID DS XL2 LCSELECT OWNERID DS XL2 RESERVED DS A RESERVED FIELDS FOR ENTERING KEYWORDS DS XL AME ALL STD DS 11 INFORMATION ONLY AL DS XL SELECT OWN DS XL TRANSFER ADMISSION A DS XL OWNERID OWN ALL DS XL OUTPUT LAYOUT SOUT S DS XL2 RESERVED EQU xxxFTPRF ASSEMBLER programming interface for openFT AC Format of the macro SHWFTPRF DSECT format XXXHPR XXXNAM XXXNAM xxxTAD xxx TAD 0 XXxOWNL XXXBU XXXBU 1 Xxx XXXI XXXITA xxx TOW XXXOUT
10. MAIN SUB Meaning RETURN RETURN CODE CODE 0 0 The CALL macro was saved in the request file of the local system 0 1 Follow up processing in the local system was not executed because the entries in the PROCESSING ADMISSION are erroneous 0 2 Follow up processing was not executed for the system whose PROCESSING ADMISSION is missing 0 3 The FT request was only started with normal priority 1 1 The CALL macro cannot be accepted executed since the send or receive file is protected via another process from simultaneous updating 1 2 The CALL macro cannot be accepted since the maximum permissible limit for file transfer requests has been exceeded 2 1 The CALL macro cannot be accepted executed since the specifications in one of the TRANSFER ADMISSIONS are erroneous 2 2 The CALL macro cannot be accepted executed since the owner of the send or receive file is not defined in the corresponding system or since the file owner and the user who wishes to create a receive file do not corre spond 2 3 The CALL macro cannot be accepted since the remote system is not in the network description of the local system 2 4 The CALL macro cannot be accepted executed since the password for the send or receive file is missing or wrong 2 5 The CALL macro cannot be accepted executed since the send or receive file does not allow multiple users 2 6 The CALL macro cannot be accepted executed since the send or receive file only permits cer
11. ADMISSION is interpreted as a printable character and converted for transfer to a system which does not use EBCDIC With the value OCTET the entry for USER DEF ADMISSION is interpreted as binary information and not converted U24845 J Z135 4 76 141 CALL NSHOW example COBOL programming interface Example NSHOW EXAMPLE SHOW REMOTE FILE ATTRIBUTES PARTNER VARO01 FILE NAME REMOTEFILE TRANS USID ACCOUNT PASSWORD INFORMATION ALL ATTRIBUTES t X OF FROM A COBOL PROGRAM DENTIFICATION DIVISION PROGRAM ID TESTNSHOW VIRONMENT DIVISION m ONFIGURATION SECTION PECIAL NAMES TERMINAL IS TERM 2 DATA DIVISION WORKING STORAGE SECTION 77 MAIN RCODE STRING PIG zZZZZ9 77 SUB RCODE STRING PIC 22779 COPY FTNSHOW OF FTLIB COPY FTRETC OF FTLIB PROCEDURE DIVISION STEUER SECTION ST 01 SPE
12. remote file attributes display 139 modify 34 133 remote file delete 117 160 Index 161 T transfer file 14 library member 14 transfer admission 9 114 transfer file NCOPY 14 transfer library member NCOPY 14 TRANSFER ADMISSION 114 TRANSFER FILE 14 TRANSFER ID 23 Y YFSEQU 94 97 YNDEQU 5 macro 48 U24845 J Z135 4 76 162 U24845 J Z135 4 76 Contents Introduction 244556 erar RR hasa basa Brief description of the product openFT Target group and objectives of this manual Concept of the openFT for BS2000 OSD manual Structure of the programming manual Changes since the last version of the manual README Te soe ea eG ed eda denies ASSEMBLER programming interface Macros Tol opan FT 167885200010 L uu ot esos aC BOR eee o NCAN Cancel file transfer request NCOPY Trarister file NDEL Delete remote file NLMOD Modify local FT file attributes NLSHOW Display local FT file attributes NMOD Modify remote file attributes NSHOW Display remote file attributes NSTAT Query file transfer status Set YNDEQU constants for the openFT macros Return codes for NCOPY NCAN NSTAT Return code fo
13. 05 05 140 COBOL programming interface CALL NSHOW The version specification at the beginning of the structure FT NCOPY LIST serves to identify the COPY element and must not be overwritten The NSHOW macro does not change any values in the structure FT NSHOW LIST The fields are to be written with left justified characters and filled with right justified blanks default for the COBOL MOVE statement for character strings Fields which should not contain any specifications are to be assigned LOW VALUE If a parameter is not entered the default values are generated as in the SHOW REMOTE FILE ATTRIBUTES command All other values which should be set in quotation marks at the command interface do not have these quotation marks in the programming interface BS2000 passwords however must be input in the usual form including quotation marks Passwords with integer values must be entered in binary form For the assignment of keywords e g NOT SPECIFIED and SYSLST use the values which are set in the corresponding 88 step structure Description of the data fields The parameters for FI NSHOW LIST have the same names and functions as the corre sponding operands for the command SHOW REMOTE FILE ATTRIBUTES Please refer to the command description in the user manual The parameter USER DEF ADM ATTR is used to determine how the entry for USER DEF ADMISSION is to be interpreted With the value GRAPHIC the entry for USER DEF
14. D 64 repeat after correction of user input E 128 wait and repeat Subcode2 This field contains a warning if the macro was completed successfully subcode1 0 and maincode 0 but the macro couldn t be executed for instance if no files could be found during the NSHOW call Exception If the maincode contains the value X FFFF the request could not be executed for reasons specified uniquely throughout the system U24845 J Z135 4 76 Return codes 154 Related publications Please apply to your local office for ordering the manuals openFT V9 0 for BS2000 OSD Enterprise File Transfer in the Open World User Guide Target group This manual addresses users who wish to transfer files or implement file management using openF T Contents The manual describes the features of openFT The description also covers the optional components openFT AC for admission and access protection and openFT FTAM for supporting FTAM functionality The command interface and messages are dealt with in detail openFT V9 0 for BS2000 OSD Enterprise File Transfer in the Open World Installation and Administration System Administrator Guide Target group This manual addresses administrators who want to use openFT openFT FTAM and openFT AC on their BS2000 systems Contents It describes how you install and start openFT and the optional components openFT AC and Operation and control of the openFT system
15. FILE NAME ID OUNT PASSWORD DEL LIST FT FROM A COBOL PROGRAM DENTIFICATION DIVISION PROGRAM ID TESTNDEL VIRONMENT DIVISION ONFIGURATION SECTION NAMES PECIAL 2 TERMINAL IS TERM ISION DATA DIV WORKING STORAGE SECTION RCODE STRING 77 SUB RCODE STRING FTLIB FTLIB DEL OF ETC OF E DIVISION ERS LOW VALUE TO USE 0 ECTION PARA VAROO1 TO PART REMOTEFILE TO D TO USER USER ACCOUNT TO ACC PASSWORD TO USING FT LING NDEL 77 MAIN COPY FTN COPY FTR PROCEDUR STEUER S ST 01 SPECIFY MOVE MOVE MOVE MOVE MOVE MOVE NDEL CAL CALL 120 CALL NDEL example COBOL programming interface RESULT HANDLING IF OKAY IN MAIN RETURN CODE AY UPON TERM CODE TO MAIN RCODE STRING DEL 0 THEN DISPLAY ELSE MOVE MAIN RETUR MOVE SUB RETURN CODE TO SUB RCODE STRING UPON TERM MAIN RCODE STRING SUB RCODE STRING 121 NDEL REJECTED MAIN RETURN CODE SUB RETURN CODE TERM DISPLAY DISPLAY UPO 51 99 STOP RUN U24845 J Z135 4 76 CALL NLMOD COBO
16. NSTAT 44 YNDEQU 48 macros 57 maincode 55 97 153 MODFTADS 73 DSECT format 74 LIST format 73 MODFTPRF 76 DSECT format 77 81 modify admission profile 76 file attribute remote file 34 FTAM attributes of a local file 28 122 U24845 J Z135 4 76 return code 97 148 153 NCAN 51 NCOPY 51 NDEL 55 NLMOD 55 NLSHOW 55 NMOD 55 NSHOW 55 NSTAT 51 return codes for Assembler programmers 51 return information 55 7 s set constants for macros 48 YNDEQU 48 SHOW FILE FT ATTRIBUTES NLSHOW 32 SHOW FILE TRANSFER NSTAT 44 SHOW FTAC ENVIRONMENT SHWFTENV 88 SHOW FT ADMISSION SET 87 SHWFTADS 86 SHOW FT PROFILE 91 SHWFTPRF 90 SHOW FT RANGE 93 SHWFTRGE 92 SHOW REMOTE FILE ATTRIBUTES NSHOW 40 SHWFTADS 86 87 DSECT format 86 LIST format 86 SHWFTENV 88 89 DSECT format 89 LIST format 88 SHWFTPRF 90 91 DSECT format 91 LIST format 90 SHWFTRGE 92 93 subcode 148 symbolic address 8 U24845 J Z135 4 76 Index DSECT format 33 example 131 LIST format 32 macro 32 return code 5 NMOD CALL macro 133 DSECT format 37 example 7 LIST format 34 macro 34 return code 55 NSHOW CALL macro 139 DSECT format 42 example 142 LIST format 40 macro 40 return code 5 NSTAT DSECT format 45 LIST format 44 macro 44 return codes 51 NSTATUS 44 CALL macro 144 0 openFT AC 114 ASSEMBLER interface 57 operand list 7 8 output admission set 86 P programming interface 7 Q quotation marks 113 119 124 141 R
17. VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA VA X 8 X 221 64 X 1 X 67 X 1 X 67 X 64 X 64 X 1 X 128 X 1 X 40 CALL NMOD FT NMOD LIST is defined as follows PIC PIC PIC PIC PIC PIC PIC PIC PIC PIC PIC RAMETERS IFIED NMOD LIST 02 FILLER PARTNER NAME FILE NAME 88 NOT SPEC FILE PASSWORD 88 NONE FILE PASSWD ATTR ISSION ISSION 88 GRAPHIC 88 OCTET USER DEF ADM 88 NO USER DEF ADM 88 GRAPHIC 88 OCTET TRANSFER ADM 10 USER ID 10 ACCOUNT 88 NONE 10 PASSWORD 88 NONE 11 rm USER PASSWD ATTR ILITY UNT 88 GRAPHIC 88 OCTET NEW NAME 88 SAME NAM FILE AVAILAB 88 UNCHANGE 88 IMMEDIAT 88 DEFERRED STORAGE ACCO 88 UNCHANGE FUTURE FILE SIZE D 88 UNCHANGE FT 02 USER PA 05 05 05 05 05 05 05 05 05 05 05 05 01 134 CALL NMOD 135 LOW VALUE R A 2 LOW VALUE N LOW VALUE N N LOW VALUE N LOW VALUE N N N N TT LUE EET ETE ETE FT FTI FEL
18. XXXXFAIL DS XXXTEXTL DS XXXTEXT DS XXXAPRTL DS XXXAPRT DS XXXFTFUN DS XXXIIMAN DS XXXITEXT DS XXXITAD DS XXXVALID DS XXXUSAGE DS XXXIEXDA DS XXXIPSUC DS XXXIXSUC DS XXXIPFAI DS XXXIXFAI DS VRS_CPRF4 XXXDENC DS XXXFTPRL EQU CREFTPRF 64 ASSEMBLER programming interface for openFT AC CREFTPRF The meaning of the parameters in the macro CREFTPRF corresponds to the meaning of the parameters in the command CREATE FT PROFILE as shown in the following table 65 Operand Address Meaning in command Lformat field D format NAME NAME NAME PASS PASS PASSWORD TAD TAD TRANSFER ADMISSION PRIV PRIV PRIVILEGED ILV ILV IGNORE MAX LEVELS IOSND IOSND OUTBOUND SEND in the structure IGNORE MAX LEVELS IORCV OUTBOUND RECEIVE in the structure IGNORE MAX LEVELS INBOUND SEND in the structure IGNORE MAX LEVELS IIRCV INBOUND RECEIVE the structure IGNORE MAX LEVELS IIPRC IIPRC INBOUND PROCESSING in the structure IGNORE MAX LEVELS UAD UAD USER ADMISSION UUSER UUS USER IDENTIFICATION in the USER ADMISSION UACC UAC USER ACCOUNT in the USER ADMISSION UPASS UPA USER PASSWORD in the USER ADMISSION INIT INIT INITIATOR TRANS TRDIR TRANSFER DIRECTION PARTNER PART PARTNER NAME MAXPLV MPLV MAX PARTNER LEVEL FILE FIL FILE NAME LIB LIB LIBRARY EL EL ELEMENT ELVER EV ELEMENT VERSION ELTYP ETY ELEMENT TYPE FPASS FPA FILE PASSWORD PAD P
19. abnormal program termination YFSEQU macro with FTAC equates SHWFTPRF SHWFTPRF NAME V2 INF ALL LIST format V1 DC C NURICH FTAC password V2 DC C MYPROFIL profile name V3 DC C accessformeonly transfer admission END 96 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT AC Return information an error displays 2 2 14 Return information and error displays The field for the return code has the following format Subcode2 Subcode1 Maincode warnings error class Parameter error 1 byte 1 byte 1 byte 1 byte The field with the return code can be addressed by DSECT after a macro call field xxxRETC generated by the macro FHDR or via register 1 see section Example for the use of the programming interface on page 95 Maincode This field contains the exact error It is divided into two bytes The right byte shows the cause of error It can have the following values in decimal notation 0 call was error free 1 the parameter field is partially or entirely in an invalid address space 2 the parameter may not yet be set in this version 3 the address or length field contradict the keyword field 4 the parameter entry contradicts another parameter 10 the buffer is too small this error code is reserved for future expansions 11 the arithmetic parameter value e g RECSIZE value is invalid 12 the parameter value is too long or violates syntax rules e g FILENAME PASSWORD
20. as defined in the TRANSFER ADMISSIONJ is permitted to use for saving in the receiving system is full The send file contains too many consecutive blanks or the primary assignment of the password protected receive file is too small The receive file cannot be created or expanded The macro was not executed because the system was generated without job variables or the user does not have access to the job variable specified or the job variable specified is monitoring another FT request or the password specified is not the right one for the job variable The macro cannot be executed because the job has not yet been terminated with FORCE NO The macro was not executed because the job variable in question is not present U24845 J Z135 4 76 Return codes Return signal 0000 0000 0000 0000 0001 0001 0002 0002 0002 0002 0002 0002 0002 0002 0002 0002 0002 00 01 02 03 01 02 01 02 03 04 05 06 07 08 09 14 0A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 52 ASSEMBLER programming interface for openFT Return codes Return signal Meaning 00 OB 0002 The macro was not executed because the job variable specified does not monitor an FT request 00 0 10002 The macro was not executed because the contents of the job variable
21. specified are not consistent 00 00 0002 The macro was not executed due to an error in the local PROCESSING ADMISSION 00 OE 0002 The macro was not executed because the file encryption function is not installed 00 0002 The macro was not executed because the file expansion for transparent transfer is not permitted 00 81 0002 The macro cannot be accepted because the local FT system is currently unavailable 00 01 0003 The macro cannot be accepted because at least one operand is missing 00 02 0003 The macro cannot be accepted because it contains a syntax error unlike operand missing or keyword unknown Such syntax errors include value assignments outside the permitted value range wrong operand separators wrong characters assigned to the value or partially qualified filenames 00 103 0003 The macro cannot be accepted executed because the FT system only transfers individual file generations 00 04 0003 The macro cannot be accepted because the send file is in the catalog or on a data carrier of the local system The macro cannot be executed because the send or receive file is no longer in the catalog or on a data carrier of the corresponding system 00 105 0003 The macro cannot be accepted executed because the send file is empty 00 06 0093 The macro cannot be accepted because no requests could be found 00 07 0003 The macro cannot be accepted executed because an existing receive file cannot be
22. 1 1 PARTNER adr NOISP FILE adr NONE 55 3 adr NONE TAD adr UUSER adr NONE UACC adr NONE UPASS 11 adr NONE L MSGINS 1 adr GRAPH L AFPASS 1 OCTE GRAPH ATAD OCTE GRAPH 55 1 OCTE U24845 J Z135 4 76 Operation NDEL Name name 24 ASSEMBLER programming interface for openFT NDEL The operands AFPASS ATAD and AUPASS are used to set the coding type of the file password FPASS the transfer admission TAD and the user password UPASS The operands AFPASS ATAD and AUPASS can have the value GRAPHIC or OCTET With GRAPHIC the entry for the corresponding operand is interpreted as a printable character and will be converted during transfer to a system which does not use EBCDIC With OCTET it is interpreted as binary information and will not be converted U24845 J Z135 4 76 25 NDEL ASSEMBLER programming interface for openFT Format of the macro NDEL DSECT format Name Operation Operand NDEL MF DL xxx The prefix xxx default value YNE may be up to 3 characters long It must generate names which are permitted in ASSEMBLER The following ASSEMBLER instructions are generated xxxNDEL DSECT xxxHDEL FHDR MF C amp P xxxPART DS A A PARTNE
23. 10 DELETE FILE O VALUE 0 YES 88 88 88 10 INS 88 NO VALUE 88 NO PAR 88 YES 10 ERASE DATA UNIT 88 NO VALUE 88 NO PAR 88 YES 10 LEGA 88 UNCHANGED 05 COMPRESS 88 NONE E REPETITION 88 BYT 88 NONE ENCRYES E ENCRYES 88 BYT U24845 J Z135 4 76 COBOL programming interface U24845 J Z135 4 76 LOW VALUE E LOW VALUE wD EU HIGH VALUE LOW VALUE H 5 Hef tk 1 LOW VALUE T 5 LOW VALUE 4 LOW VALUE wT I LOW VALUE VALU VALU VALU VALU VALU VALU VALU VALU VALU ITE d Tp VALU VALU VALU VALUE VALUE VALUE VALUE VALUE VALUE VALUE X 1 X 1 X 1 X 8 X 5 X 1 X 8 X 5 X 5 PIC PIC PIC ODE LACE FILE SERCE END FILE PE RACTER TYPE ARY TYPE R TYPE R STD TYPE STD TYPE SPECIFIED Y MAL H IME LIEST DAT TODAY TOMORROW LIEST TIM PARAMETER CEL DESIRED O CANCEL YES CEL DATE TODAY TOMORROW CEL TIME SIZE 5 05 WRITE M 88 REP 88 88 05 DATA TY 88 88 BIN 88 USE 88 88 88 NOT UJ 05 PRIORIT 88 NOR 88 HIG 88 LOW 05 START T 0 EAR 88 88 0 EAR 05 CANCEL 0 CA 88 88 0 CA 88 88 LO CA 05 RECORD 88 NOT CALL NCOPY 112 COBOL pro
24. CONTR CHARS L J GENER RECORD LENGTH VARIABLE DEF L VAR RECORD LENGTH FIXED SESE IX RECORD LENGTH UNDEFINED UNDEF AVAILABILITY IMMEDIATE L IMMED AVAILABILITY DEFERRED L JDEFER ACCESS MODE MODIFIED L JADD ACCESS MODE NEW REPL U24845 J Z135 4 76 QU O QU QU Q rn rmn rm C NO 1 rn C U 10 U 11 rm rT U 20 U 21 U 22 U 23 U 24 U 25 DODO EE FT U 26 U 27 U 28 mm m EQU 29 EQU 31 OVAL PAR ONE OTSP OWN DIR lt 0 lt lt lt lt gt 6 lt lt lt lt lt lt ook lt lt lt lt ox lt lt x lt lt gt UNCHG DSAME DNO DYES DGRAPH DOCTET DBIN DCHAR DVISIB DIA5 DGRSTR DGENER DVAR DFIX DUNDE DIMME DDEFE 85 DAD DREPL U YNDEQU 2 1 9 48 YNDEQU OUTPUT SYSOUT L SYSOUT OUTPUT SYSLST L SYSLST L JONLY L STD L ALL ONLY NAMES STANDARD ALL NFORMATION NFORMATION NFORMATION NITIATOR LOCAL NITIATOR REMOTE NITIATOR LOCAL REMOTE TODAY TOMORROW DAT DAT mm TRANSFER FILE READ FILE ATTRIBUTES DELETE FILE CREATE FILE MODIFY FILE ATTRIBUTES READ DIRECTORY MOVE FILE
25. DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS XXXRFTIL xxxRFILL XXXRLIBL XXXRLIB XXXREL XXXRELL XXXREVL XXXREV XXXRETY XXXRETYL XXXRFPAL XXXRFPA XXXRTUS XXXRTUSL XXXRTACL XXXRTAC XXXRTPA XXXRTPAL XXXRPUSL XXXRPUS XXXRPAC XXXRPACL XXXRPPAL XXXRPPA XXXRSUC XXXRSUCL XXXRFAIL XXXRFAI xxxSTAR xxxSTARL XXXCANL XXXCAN XXXTRID XXXTRIDL XXXTRDIR XXxWRMOD XXXPRIO XXXLIST XXXRSYN rm XXXLJVNL XXXLJVN XXxLJVP XXXLJVPL XXXLTADL NCOPY 18 ASSEMBLER programming interface for openFT NCOPY xxxLTAD DS AL4 A LOCAL TRANSFER ADMISSION xxxRTAD DS AL4 ACREMOTE TRANSFER ADMISSION XXxRTADL DS AL2 LCREMOTE TRANSFER ADMISSION XXXSTACL DS XL2 LCSTORAGE ACCOUNT 5 DS AL4 ACSTORAGE ACCOUNT xxxLQF DS AL4 ACLEGAL QUALIFICATION xxxLQFL DS XL2 LCLEGAL QUALIFICATION XXXAVAIL DS XL FILE AVAIL NONE IMMED DEFER 15 DS XL STORAGE ACCOUNT NONE xxxILQF DS XL LEGAL QUALIFICATION UNCHG xxxACCES DS XL ACCESS MODE NONE PAR xxxREADF DS XL READ FILE O YE XxxREPLF DS XL REPLACE FILE 0 7 YE XxxEXTDF DS XL EXTEND FILE 0 YE XXxREADA DS XL READ ATTRIBUTES 0 YE XxxCHNGA DS XL1 CHANGE ATTRIBUTES NO YE XxxDELF DS XL DELETE FILE YE XXXINSDU DS XL
26. IN REMOTE PARAMETER NCOPY CALLING CALL NCOPY USING FT NCOPY LIST FT RETURN INFO RESULT HANDLING IF OKAY IN MAIN RETURN CODE DISPLAY NCOPY REQUEST ACCEPTED TID TRANSFER ID UPON TERM ELSE MOVE MAIN RETURN CODE TO MAIN RCODE STRING MOVE SUB RETURN CODE TO SUB RCODE STRING DISPLAY NCOPY REQUEST REJECTED UPON TERM DISPLAY MAIN RETURN CODE MAIN RCODE STRING SUB RETURN CODE SUB RCODE STRING UPON TERM ST 99 STOP RUN 116 U24845 J Z135 4 76 COBOL programming interface CALL NDEL 3 1 3 NDEL Delete remote file The macro CALL NDEL can be used to delete a file in a partner system The function ality corresponds to that of the command DELETE REMOTE FILE Macro The function can be called as follows CALL NDEL USING FT NDEL LIST FT RETURN INFO FT NDEL LIST The range FT NDEL LIST describes the parameter list for the NDEL macro FT NDEL LIST must be defined in the WORKING STORAGE SECTION and can be copied to there with the statement COPY FTNDEL OF linkname Before the first NDEL macro the parameter fields should be deleted with the statement MOVE LOW VALUE TO USER PARAMETERS IN FT NDEL LIST Before executing another NDEL macro you must fill the desired fields If a parameter is not specified or the default value is to be used this field must be assigned the value LOW VALUE U24845 J Z135 4 76 117 CALL NDEL COBOL programming interface FT NDEL LIST is defined as
27. Lformat fields D format TRANSID TRANSFER ID SOWNER SOWN OWNER IDENTIFICATION PARTNER PART PARTNER NAME LFILE LFIL FILE NAME LLIB LLIB LIBRARY LEL LEL ELEMENT LELVER LEV VERSION LELTYP LETY TYPE JVNAME JVNM MONJV JVPASS JVPS JV PASSWORD INIT INIT INITIATOR FORCE FORCE FORCE CANCELLATION If you do not enter anything in the fields for the OWNER ID your own user ID will be used as the value this corresponds to the default entry DWN at the command interface If you intentionally fill the OWNER ID field with blanks then all user IDs will be used this corre sponds to the entry ALL at the command interface You may only set FORCE YES if you have explicitly specified a transfer ID in the TRID field This request must already have been cancelled with FORCE NO Only login names that possess the FDT ADM privilege may specify FORCE YES U24845 J Z135 4 76 13 ASSEMBLER programming interface for openFT NCOPY 2 1 2 NCOPY Transfer file The macro NCOPY can be used to transfer a file or library member The computer in which the program is running can be either sender or receiver of the file The functionality corre sponds to the command TRANSFER FILE NCOPY i L LLIBTYP adr U24845 J Z135 4 76 Format of the macro NCOPY LIST format default format r L LELVERsadr rL LTPASS adr1 rL LPPASS adr1 LIST 4LISTFILE LISTFAIL LISTFFAI
28. PECIAL NAMES TERMINAL IS TERM 2 DATA DIVISION WORKING STORAGE SECTION 77 MAIN RCODE STRING PIC SZZ229 77 SUB RCODE STRING 27779 COPY FTNLMOD OF FTLIB COPY FTRETC OF FTLIB PROCEDURE DIVISION STEUER SECTION ST 01 SPECIFY PARAMETERS MOVE LOW VALUE TO USER PARAMETERS MOVE LOCALFILE TO FILE NAME SET BINARY DATA IN DATA TYPE TO TRUE NLMOD CALLING CALL NLMOD USING FT NLMOD LIST FT RETURN INFO RESULT HANDLING IF OKAY IN MAIN RETURN CODE THEN DISPLAY NLMOD OKAY UPON TERM 126 U24845 J Z135 4 76 COBOL programming interface CALL NLMOD example ELSE MOVE MAIN RETURN CODE TO MAIN RCODE STRING MOVE SUB RETURN CODE TO SUB RCODE STRING DISPLAY NLMOD REJECTED UPON TERM DISPLAY MAIN RETURN CODE MAIN RCODE STRING SUB RETURN CODE SUB RCODE STRING UPON TERM 51 99 STOP RUN U24845 J Z135 4 76 127 CALL NLSHOW COBOL programming interface 3 1 5 NLSHOW Display local FT file attributes The macro CALL NLSHOW can be used to view the FTAM attributes of a file in the local system The functionality corresponds to that of the command SHOW FILE FT ATTRIBUTES The user can select between three variants for the output of attributes display the filename display a default selection display all file attributes The information can be output on the screen or to a file In addition to the options offered b
29. SUCCESS PROCESSING in REMOTE parameter FAILURE PROCESSING in REMOTE parameter FILE AVAILABILITY STORAGE ACCOUNT ACCESS MODE READ FILE in the structure ACCESS MODE INSERT DATA UNIT in the structure ACCESS MODE REPLACE FILE in the structure ACCESS MODE EXTEND FILE in the structure ACCESS MODE ERASE DATA UNIT in the structure ACCESS MODE READ ATTRIBUTES in the structure ACCESS MODE CHANGE ATTRIBUTES in the structure ACCESS MODE DELETE FILE in the structure ACCESS MODE LEGAL QUALIFICATION CREATE PASSWORD in REMOTE parameter COMPRESS WRITE MODE DATA TYPE TRANSPARENT PRIORITY START CANCEL DATA ENCRYPTION RECORD SIZE U24845 J Z135 4 76 Address field D format RTAC RTPA RTAD RPUS RPAC RPPA RSUC RFAI AVAIL STAC ACCES READF INSDU REPLF EXTDF ERADU READA CHNGA DELF LQF RCPA COMP WRMOD DATYP DATYP PRIO STAR CAN COMP TRID RSIZE Operand L format RTACC RTPASS RTAD RPUSER RPACC RPPASS RSUCC RFAIL FAVAIL STORACC ACCMOD READF INSDU REPLF EXTDF ERADU READA CHNGA DELF LQUAL RCPASS COMP WRITE DATA TRANSP PRIO START CANCEL DATENCR TRANSID RSIZE NCOPY 22 ASSEMBLER programming interface for openFT NCOPY In the field for TRANS ID or TRANSID the TRANSFER ID is entered after a successful NCOPY macro printable in decimal notation left justified filled with
30. Siemens computers GmbH User Documentation 81730 Munich Germany Fax 49 700 372 00000 e mail manuals fujitsu siemens com http manuals fujitsu siemens com Submitted by Comments on openFT V9 0 for BS2000 OSD Enterprise File Transfer in the Open World Program Interfaces co FUJITSU Information on this document On April 1 2009 Fujitsu became the sole owner of Fujitsu Siemens Compu ters This new subsidiary of Fujitsu has been renamed Fujitsu Technology So lutions This document from the document archive refers to a product version which was released a considerable time ago or which is no longer marketed Please note that all company references and copyrights in this document have been legally transferred to Fujitsu Technology Solutions Contact and support addresses will now be offered by Fujitsu Technology So lutions and have the format ts fujitsu com The Internet pages of Fujitsu Technology Solutions are available at http ts fujitsu com the user documentation at hitp manuals ts fujitsu com Copyright Fujitsu Technology Solutions 2009 Hinweise zum vorliegenden Dokument Zum 1 April 2009 ist Fujitsu Siemens Computers in den alleinigen Besitz von Fujitsu Ubergegangen Diese neue Tochtergesellschaft von Fujitsu tragt seit dem den Namen Fujitsu Technology Solutions Das vorliegende Dokument aus dem Dokumentenarchiv bezieht sich auf eine bereits vor langerer Zeit freigegeben
31. XL xxxPREPF DS XLI DS XL XXXPERAU DS XL XxxPREAA DS XI XxxPCHNA DS XL xxxPDELF DS XL xxxAPAS DS XL xxxRESRV DS XL2 XXXLNLM NLMOD 30 ASSEMBLER programming interface for openFT NLMOD Meaning of the fields The meaning of the parameters in the macro correspond to the meaning of the parameters in the command MODIFY FILE FT ATTRIBUTES Please refer to the corresponding command description in the user manual Operand Address Meaning in command Lformat field D format FILE FILE FILE NAME FPASS FPAS PASSWORD of the file PERMACT PACT PERMITTED ACTIONS PREADF PREAF READ FILE in the structure PERMITTED ACTION PINSU PINSU INSERT DATA UNIT in the structure PERMITTED ACTION PREPLF PREPF REPLACE FILE in the structure PERMITTED ACTION PEXTDF PEXTF EXTEND FILE in the structure PERMITTED ACTION PERAU PERAU ERASE DATA UNIT in the structure PERMITTED ACTION PREADA PREAA READ ATTRIBUTES in the structure PERMITTED ACTION PCHNGA PCHNA CHANGE ATTRIBUTES in the structure PERMITTED ACTION PDELF PDELF DELETE FILE in the structure PERMITTED ACTION TRATT TRATT TRANSFER ATTRIBUTES DATA DATA DATA TYPE in the structure TRANSFER ATTRIBUTES DCHRS CHRS CHARACTER SET in DATA TYPE RECFORM RECF RECORD FORMAT in the structure TRANSFER ATTRIBUTES RECSIZE RECS RECORD SIZE in the structure TRANSFER ATTRIBUTES MSGINS MSG Return value of the call AFPASS APAS Coding of the FPASS GRAPHIC or OC
32. XXXSU XXXSU XXXFA XXXFA 1 BYTE FIELDS FOR ENTERING XL XL XL XL XL XL XL XL XL XL XL XL XL XL XL XL XL1 XL XL XL XL XL XL XL XL XL XL XL XL XL XL XL DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS XXX INAME XXXIPASS L XXXSE XXXITAD XXXIOWN NAM XXXIN XXXINTAD IV V SND RCV SND RCV PRC D XXXPR XXXIL XXXIO XXXIO XXXII XXXII XXXII XXXUA XXXIUUS XXXIUAC PA IT DIR XXXIU XXX IN XXXTR LV IL IB XXXMP XXX IF XXXIL XXXIE XXXIEV XXXIETY PA D XXXIF XXXPA XXX IPUS XXX IPAC PA XXX IP MODFTPRF 82 ASSEMBLER programming interface for openFT AC MODFTPRF XXXISUC DS SUCCESS PROCESSING UNCHG NOTRS NONE EXP XXXIFAI DS XLI FAILURE PROCESSING UNCHG NOTRS NONE EXP XXXWRMOD DS XL1 WRITE MODE UNCHG NOTRS NEW RPL EXT XXXCHIP DS XLI CHIP PROFILE NO YES VRS MPRF2 XXXEXDA DS A ACEXPIRATION DATE XXXEXDAL DS XL2 LCEXPIRATION DATE XXXPSUCL DS XL2 L SUCCESS PROCESSING PREFIX XXXPSUC DS ACSUCCESS PROCESS ING PREFIX XXXXSUC DS ACSUCCESS PROCESSING SUFFIX XXXXSUCL DS XL2 LCSUCCESS PROCESSING SUFFIX X
33. _LLIB adrJL LEL ad LTUSER adr LTACC ad LPUSER adr LPACC ad BS2 5 4 MSP ANY Operand 1 1 FROM TO PARTNER adr LFPASS adr LTAD adr LSUCC adr LFAIL adr LIST NONE JVNAME adr JVPASS adr Operation NCOPY Name name 14 NCOPY 2 15 RLIB2SadrlL REL adr L RELVER adr 2 RLIBTYP adr 1 RTACC adr 1L RTPASS adr 11 RPUSER adrL RPACC adr 1L RPPASS adr 11 ONE 1 r EADF XTDF RADU EADA NONE 1 ASSEMBLER programming interface for openFT Operand RFPASS adr RTAD adr RSUCC adr RFAIL adr e 5 L R Operation Name U24845 J Z135 4 76 ASSEMBLER programming interface for openFT Operand C INO CHNGA J L YES L NO DELF 1 YES UNCHG C LQUAL 1 adr L RCPASS adr NONE 3 REPLACE L WRITE 5 NE 1 BIN DATA 1 5 05 NO TRANSP 1 STD NORM 2810 4 HIGH J LOW START adr CANCEL adr L TRANSID adr NO DATENCR YES NOTSPEC RSIZE lt integer 1 32756 gt Operation Name 1 The value TR
34. are dealt with in detail The command interface contains the description of all administrartor commands U24845 J Z135 4 76 155 Related publications BS2000 OSD BC V5 0 Executive Macros User Guide Target group This manual is addressed to all BS2000 OSD assembly language programmers Contents The manual contains a summary of all Executive macros linking and loading virtual storage memory pool ESA task and program control serialization eventing DLM contingencies STXIT messages accounting JMS TIAM VTSU Detailed description of all macros in alphabetical order and with examples general training section dealing with ITC serialization eventing DLM contingencies STXIT virtual storage memory pool ESA 156 U24845 J Z135 4 76 compatibility 10 constants set YNDEQU 48 create admission profile 58 create admission profile 58 CREATE FT PROFILE 65 CREFTPRF 58 CREFTPRF 58 65 DSECT format 62 D default format 8 default header 8 delete admission profile 67 FT request 11 104 remote file 117 delete remote file NDEL 24 DELETE FT PROFILE 68 DELFTPRF 67 DELETE REMOTE FILE 24 DELFTPRF 67 68 DSECT format 68 LIST format 67 display attributes of a local file 32 128 file attribute remote file 40 local file attribute FTAM 2 remote file attributes 139 DSECT format 7 CREFTPRF 62 DELFTPRF 68 EXPFTENV 70 IMPFTENV 72 157 Index A admission profile 4
35. blanks on the right The field must be 2 10 bytes or 0 if the TRANSFER ID is not to be entered If you run a file transfer with an FTAM partner from an ASSEMBLER program the same function restrictions apply as at the command interface You cannot transfer any library members which are in the remote system specify follow up processing for the remote system or transfer files in compressed form For more information see the description of the command TRANSFER FILE NCOPY in the user manual Format rules for START and CANCEL The length field is at least 15 bytes long Contents y y Im jm 14 Id h Ih m im y y Im jm 14 jd T D JA Y h m m T IO D JA Y T IM O W h m T IM JO W h h m im If the first 8 bytes 1 to 8 are blank DATE TODAY is taken as the default value If the last 5 bytes 11 to 15 are blank START TIME 00 00 and CANCEL TIME 23 59 will be taken as the default values Note In contrast to the command interface the specification for year can only be two digits U24845 J Z135 4 76 23 ASSEMBLER programming interface for openFT NDEL 2 1 3 NDEL Delete remote file The macro NDEL is used to delete a file in an FT partner system Its functionality corre sponds to the command DELETE REMOTE FILE Format of the macro NDEL LIST format default format Operand
36. encryption using the admissions profile At the program interface this means e The assembler macros CREFTPRF and MODFTPRF have been expanded to include the DENC operand Changed file names In openFT V9 0 for BS2000 the standard file names have been changed You must there fore uninstall the older version of openFT before switching to a version of openFT earlier than V9 0 otherwise the YNDCOBOL module of the older version might possibly be used In addition you must also copy the SYSRTC file under the standard name SYSRTC FT on the configuration user ID of the openFT instance Standard SYSFJAM 4 U24845 J Z135 4 76 Introduction README file 1 6 README file Information on any functional changes and additions to the current product version described in this manual can be found in the product specific README file You will find the README file on your BS2000 computer under the file name SYSRME OPENFT 090 E SYSRME OPENFT FTAM 090 D resp SYSRME OPENFT AC 090 EF The user ID under which the README file is cataloged can be obtained from your system administration You can view the README file using the SHOW FILE command or an editor and print it out on a standard printer using the following command PRINT FILE FILE NAME filename LAYOUT CONTROL PARAMETERS CCONTROL CHARACTERS EBCDIC as of SPOOL V3 0A PRINT DOCUMENT FROM FILE filename DOCUMENT FORMAT PAGE FORMAT CONTROL MODE PAGE MODE LINE SPACING BY EBCDIC C
37. export admission sets and profiles IMPPFTENV YIE import admission sets and profiles MODFTADS YMA modify admission sets MODFTPRF modify admission profiles SHWFTADS display admission sets SHWFTENV YSE list admission sets and profiles SHWFTPRF YSP display admission profile SHWFTRGE YSR list accessible partner systems U24845 J Z135 4 76 2 2 The openFT AC programming interface 2 2 1 ASSEMBLER programming interface for openFT AC 2 2 2 CREFTPRF Create admission profile The macro CREFTPRF can be used to create admission profiles The functionality corre sponds to that of the command CREATE FT PROFILE Format of the macro CREFTPRF LIST format default format Operand 11 NAME adr NONE 55 1 adr NOTSP TAD YES adr L VALID L NO PRIVATE USAGE 1 L PUBLIC NOTRS EXPDATE adr L NO L PRIV L YES L JNO L ILV 1YES JNO 105 0 1 YES JNO C IORCV 1 1 JNO 115 0 1 YES Operation CREFTPRF Name 1 The date output must be in the form YYYYMMDD The date must lie between 01 01 1970 and 31 12 2020 U24845 J Z135 4 76 CREFTPRF Operand L NO IRCV LINES JNO IPRC YES L NO 11 11 0 1510 OW UUSER adr O
38. follows 01 FT NDEL LIST C X 4 VALUE V600 02 FILLER 02 USER PARAMETERS 05 PARTNER NAME PIC X 8 05 FILE NAME PIC X 221 88 NOT SPECIFIED VALUE LOW VALUE 05 FILE PASSWORD PIC X 64 88 NONE VALUE LOW VALUE 05 FILE PASSWD ATTR PIC 88 GRAPHIC VALUE LOW VALUE 88 OCTET VALUE 0 05 USER DEF ADMISSION PIC X67 88 NONE VALUE LOW VALUE 05 USER DEF ADM ATTR PIC 88 GRAPHIC VALUE LOW VALUE 88 OCTET VALUE O 05 TRANSFER ADMISSION 10 USER ID PIC X67 10 ACCOUNT PIC X 64 88 NONE VALUE LOW VALUE 10 PASSWORD PIC X 64 88 NONE VALUE LOW VALUE 05 USER PASSWD ATTR PIC 88 GRAPHIC VALUE LOW VALUE 88 OCTET VALUE 0 The version specification at the beginning of the structure FI NCOPY LIST serves to identify the COPY element and must not be overwritten The NDEL macro does not change any values in the structure FT NDEL LIST The fields are to be written with left justified characters and filled with right justified blanks default for the COBOL MOVE statement for character strings Fields which should not contain any specifications are to be assigned LOW VALUE If a parameter is not entered the default values are generated as in the DELETE REMOTE FILE command 118 U24845 J Z135 4 76 COBOL programming interface CALL NDEL All other values which should be set in quotation marks at the command interface do not have these
39. must fill the desired fields If a parameter is not specified or the default value is to be used this field must be assigned the value LOW VALUE 144 U24845 J Z135 4 76 COBOL programming interface CALL NSTATUS FT NSTATUS LIST is defined as follows 01 FT NSTATUS LIST 02 FILLER PIC X 4 VALUE V600 02 USER PARAMETERS 05 TRANSFER ID 10 88 SELECT ALL VALUE LOW VALUE 05 SELECT PARAMETER 10 OWNER IDENTIFICATION PIC X 8 88 OWN VALUE LOW VALUE 88 SELECT ALL VALUE 10 INITIATOR 10 X 1 88 SELECT ALL VALUE LOW VALUE 88 LOCAL VALUE 88 REMOTE VALUE 0 PARTNER NAME PIC 8 88 SELECT ALL VALUE LOW VALUE 0 FILE NAME 221 88 SELECT ALL VALUE LOW VALUE 0 LIBRARY PIC X 221 88 SELECT ALL VALUE LOW VALUE 0 ELEMENT PIC X 64 88 SELECT ALL VALUE LOW VALUE 0 TYP PIC X 8 88 SELECT ALL VALUE LOW VALUE 0 VERSIO PIC 24 88 SELECT ALL VALUE LOW VALUE 0 MONJV PIC 88 NONE VALUE LOW VALUE 10 JV PASSWORD 11 88 VALUE LOW VALUE 0 STATE PIC X 1 88 SELECT ALL VALUE LOW VALUE 88 SUSP VALUE S 88 LOCKED VALUE 88 WAIT VALUE W 88 ACTIVE VALUE A U24845 J Z135 4 76 145 CALL NSTATUS COBOL programming interface 88 FIN VALUE 88 HOLD VALUE H 05 INFORMATION PIC 1 88 STD VALUE LOW VALUE 88 SUMMARY VALUE 0 88 SELECT ALL VA
40. oper FT AC macros No operands are to be entered for the macro call The equates are generated with the default prefix YFS as they are used internally by the other FTAC macros Call of the macro YFSEQU Name Operation Operand YFSEQU YFSTRANF FT FUNCTION TRANSFER FILE TRANSF YFSMODA FT FUNCTION MODIFY ATTRIBUT MODATT YFSREAD FT FUNCTION READ DIRECTORY READDIR YFSFPRO FT FUNCTION FILE PROCESSING FILEPROC YFSRE ITIATOR REMOTE REMOTE YFSLOC ITIATOR LOCAL C LOCAL YFSBOTH ITIATOR LOCAL REMOTE YFSFROM TRANSFER DIRECTION FROM L JFROM YFSTO TRANSFER DIRECTION TO L TO YFSNE RITE MODE NEW FILE L NEW YFSRPL RITE MODE REPLACE RPL YFSEXT RITE MODE EXTEND L EXT YFSONLY INFORMATION ONLY NAMES L JONLY YFSSOUT OUTPUT SYSOUT SYSOUT YFSSLST OUTPUT SYSLST L SYSLST YFSSOUTC OUTPUT SYSOUT LAYOUT CSV YFSSLSTC OUTPUT SYSLST LAYOUT CSV YFSLIBEL LIBRARY ELEMENT YFSEXP EXPANSION YFSNO NO INO YFSYES YES YES YFSNONE NONE J NONE YFSSAME SAME SAME YFSALL ALL ALL YFSOWN OWN JOWN YFSOLD OLD 1010 YFSFIRST FIRST FIRST 94 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT AC Programming examples YFSADD PARTNER ADD YFSREMOV PARTNER REMOVE YFSPRIV USAGE PRIVATE L JPRIVATE YFSPUBL USAGE PUBLIC JPUBLIC YFSNOTSP NOT SP
41. recreated 00 08 10003 The macro cannot be accepted executed because the file owner and the user requesting the creation of a receive file do not correspond 00 09 10003 The macro cannot be accepted executed because the data carrier for the send or receive file is either not mounted unknown or unnamed or multiple data carriers are not supported 00 OA 0003 The macro cannot be accepted because it can only be input by authorized users 00 08 0003 The macro cannot be accepted further executed because there is a file structure error File structure errors include the attributes of the send file are incomplete The data of the send file do not correspond to the structure attributes The send file sentences are too long The send file and the receive file have a different structure for WRITE MODE EXTEND FILE e g sentence fixed variable length U24845 J Z135 4 76 53 Return codes ASSEMBLER programming interface for openFT Return signal Meaning 00 00 0003 During the processing of a macro a DVS error occurred Additional infor mation in the field xxxDMSCo0 4 bytes 00 00 0003 During the processing of a macro NDMS error FJAM error or operating system error occurred which was neither a DVS error nor a transport system error 00 05 0003 The field for the transfer ID is too short NCOPY or too long NCAN 00 OF 0003 Address error in
42. 1 Introduction The openFT product range transfers and manages files automatically securely and cost effectively The reliable and user friendly transfer of files is an important function in a high performance computer network Most corporate topologies today consist of networked PC workstations which are additionally linked to a mainframe or Unix server This allows much of the processing power to be provided directly at the workstation while file transfer moves the data to the mainframe for further processing there as required In such landscapes the locations of the individual systems may be quite far apart Fujitsu Siemens Computers offers an extensive range of file transfer products the openFT product range for the following system platforms BS2000 OSD Solaris SPARC Intel LINUX Reliant UNIX AIX HP UX SCO Open Server OSF1 Tru64 UnixWare Microsoft Windows 98 Me M Windows NT Windows 2000 Windows Windows Server 20037 und OS 390 bzw z OS IBM 1 1 Brief description of the product openFT openFT for BS2000 OSD is the file transfer product for computers using the operating system BS2000 OSD All openFT products from Fujitsu Siemens Computers intercommunicate via openFT protocols originally FTNEA protocols which were standardized by Siemens Since a number of FT products from other software suppliers also support these protocols many interconnection options ar
43. 13 the keyword entered is not permitted for this parameter 14 a mandatory parameter is missing 70 255 these error codes have the same meaning as the FTAC messages with the related FTC number The corresponding equates are defined in the macro YFSEQU with the prefix YFS1 The left byte is only assigned a value other than 0 in the case of a parameter error It specifies the erroneous parameter The corresponding equates are defined in the macro YFSEQU with the prefix YFS2 U24845 J Z135 4 76 97 Return information an error displays ASSEMBLER programming interface for Subcode1 The error codes are divided into error classes These are found in subcode 1 The following error classes exist Class Value Meaning A 0 the call was successfully completed B 1 permanent error no repetition possible there was a syntax error or equivalent parameter error C 32 system error an internal error occurred during macro processing D 64 repeat after correction of user input E 128 wait and repeat The corresponding equates are defined in the macro YFSEQU with the prefix YFSC Subcode2 This field contains a warning if the macro was completed successfully subcode1 0 and maincode 0 but the macro couldn t be executed for instance if no files could be found during the SHWFTPRF call The corresponding equates are defined in the macro YFSEQU with the prefix YFSW Exception If the maincode conta
44. 139 COBOL programming interface U24845 J Z135 4 76 m X 4 VALUE V600 LOW VAL LOW VAL LOW VAL m UE UE UE UE UE UE UE LOW VAL 0 I LOW VAL LOW VAL 0 LOW VAL Ty IT EFI E LOW VAL LOW VAL 0 N LOW VAL A 0 x LOW VAL 10 FT EFI mmm VALU VALU VALUE VALU VALU VALU VALU VALU VALU VALU VALU VALU VALU VALU VALU VALU VALU VALU X 8 X 221 X 221 X 64 X 1 X 67 X 1 X 67 X 64 X 64 X 1 X 1 X 1 CALL NSHOW FT NSHOW LIST is defined as follows PIC PIC PIC PIC PIC PIC PIC PIC PIC FT NSHOW LIST 01 02 FILLER 02 USER PARAMETERS PARTNER NAME 88 NOT SPECIFIED 88 NOT SPECIFIED FILE PASSWORD FILE PASSWD ATTR FILE NAME DIRECTORY 88 NONE 88 GRAPHIC DMISSION DM ATTR DMISSION D E RD E D ATTR 88 OCTET USER DEF A 88 NO USER DEF A 88 GRAPHIC 88 TRANSFER A 10 USER I T TI 10 ACCOUNT 88 NO 10 PASSWO 88 NO USER PASSW 88 GRAPHIC 88 OCTET INFORMATION 88 STD 88 ALL ATTRIBUTES 88 ONLY NAMES OUTPUT PAR 88 SYSOUT 88 SYSLST 88 SYSOUTCSV 88 SYSLSTCSV 05 05 05 05 05 05 05 05 05
45. 15 ACCOUNT 15 PASSWORD FILE AVAILABLE 88 NONE 88 IMMEDIATE 88 DEFERRED CALL NCOPY 10 10 10 0 0 0 0 0 0 0 0 0 0 0 0 10 10 110 CALL NCOPY 111 LOW VALUE LOW VALUE LOW VALUE LOW VALUE LOW VALUE LOW VALUE LOW VALUE DEAN LOW VALUE LM LOW VALUE 1112 LOW VALUE Yn LOW VALUE PIC X 40 VALUE PIC X 1 VALUE VALUE P VALU VALU VALU FTL TII VALU VALU VALU Fri VALU VALU VALU PEL ETL PEL VALU VALU VALU PEL ITT TTE VALU VALU VALU rri rm rm VALU VALU VALU rm rm VALU VALU VALU VALU VALU VALU VALUE X 1 X 1 X 1 X 1 X 1 X 1 X 1 X 1 X 80 PIC PIC PIC PIC PIC PIC PIC PIC PIC X 1 VALUE VALUE B VALUE E VALUE F PIC GE ATTRIBUTES ERT DATA UNIT L QUALIFICATION COBOL programming interface 10 STORAGE ACCOUNT 88 NONE 10 ACCESS MODE 88 NONE 88 PAR 10 READ FILE 88 NO VALUE 88 NO PAR 88 YES 10 REPLACE FILE 88 NO VALUE 88 NO PAR 88 YES 10 EXTEND FILE 88 NO VALUE 88 NO PAR 88 YES 10 READ ATTRIBUTES 88 NO VALUE 88 NO PAR 88 YES O VALUE 0 YES 10 CHA 88 88 88
46. 5 PASSWO STING 10 88 SYSLST LST LE 88 LISTFI 88 SYSLST FAIL LE FAIL 88 LISTFI 88 NONE U24845 J Z135 4 76 COBOL programming interface LOW VALUE LOW VALUE LOW VALUE era i A N LOW VALUE m LOW VALUE LOW VALUE LOW VALUE LOW VALUE LOW VALUE HIGH VALUE HIGH VALUE HIGH VALUE HIGH VALUE LOW VALUE LIN U24845 J Z135 4 76 VALUE VALUE VALU VALU VALU TT VALUE VALUE VALUE VALU VALU PTT VALUE VALUE VALUE VALUE VALUE VALUE VALUE X 56 X 11 X 1 X 221 X 8 X 59 X 67 X 11 X 27 X 131 X 131 X 500 X 500 X 67 X 67 X 64 X 131 X 67 X 64 X 131 X 1 PIC PIC PIC EL UKR CEO C PIC PIC PIC MONJV 88 NONE JV PASSWORD 88 NONE 05 REMOTE PARAMETER REMOTE SYNTAX 88 BS2000 88 MSP 88 ANY SYNTAX FILE NAME 88 NOT SPECIFIED LINK NAME 88 NOT SPECIFIED LIBRARY 88 NOT SPECIFIED ELEME 88 TYP 88 NOT SPECIFIED VERSION 88 NONE 88 STD FILE PASSWORD CREATE PASSWORD SUCCESS PROCESSING FAILURE PROCESSING USER DEF ADMISSION 88 NONE TRANSFER ADMISSION 88 NONE 15 USER ID 15 ACCOUNT 15 PASSWORD T SPECIFIED PROCESSING ADMISSION PIC PIC PIC PIC 88 NOT SPECIFIED 88 NONE 15 USER ID
47. 845 J Z135 4 76 113 CALL NCOPY COBOL programming interface Description of the data fields Most parameters for FT NCOPY LIST have the same names and functions as the corre sponding operands for the TRANSFER FILE NCOPY command Therefore only the deviations will be explained here Please refer to the corresponding command description in the user manual for the other explanations In addition to the options offered at the command interface you can also address filenames and library names in COBOL programs via link names To do this use the field LINK NAME in FT NCOPY LIST Only the link name or the filename library name not both may be specified for a system local or remote The remote filename or library name may only be specified via the link name if the local and remote systems are identical file transfer with the same computer If this rule is not observed openFT will not recognize it and this will lead to undesired results Ifthe file or library is specified using its link name a missing specification for the remote file will be filled using the local filename A link name which is not assigned at execution time leads to the message FILE UNKNOWN field USER DEF ADMISSION in FT NCOPY LIST is only required if the add on product openFT AC is used in the system and an admission profile is being addressed In this case USER DEF ADMISSION can be used to enter the transfer admission required for this a
48. A DS A DS XL2 DS XL2 DS A FIELDS FOR ENTERING KEYWOR DS XL1 DS XL1 DS XL1 DS XL1 DS XL1 DS XL3 EQU xxxFTPRF XXXFTPRF PRF XXxH XXXNAME XXxNAMEL xxxPASSL xxxPASS XxxTAD XXXTADL NL N 55 0 0 1 XXxI XXXI 5 XXXITAD xxx IOWN ESRV XXXR XXXFTPRL The meaning of the parameters in the macro DELFTPRF corresponds to the meaning of the parameters in the command DELETE FT PROFILE as shown in the following table U24845 J Z135 4 76 Address Meaning in command field D format NAME NAME PASS PASSWORD SEL SELECT PARAMETER TAD TRANSFER ADMISSION in the structure SELECT PARAMETER OWN OWNER IDENTIFICATION in the structure SELECT PARAMETER Operand L format NAME PASS SELECT TAD OWNER DELFTPRF 68 ASSEMBLER programming interface for openFT AC EXPFTENV 2 2 4 EXPFTENV Export admission sets and profiles The macro EXPFTENV can be used to output the admission sets and admission profiles of FTAC to a file You can use the SHWFTENV macro to display the contents of this file page 88 The functionality corresponds to that of the command EXPORT FTAC ENVIRONMENT Format of the macro EXPFTENV LIST format default format Name Operation Operand Name EXPFTENV MF L1 FILE adr ALL L USER 1 adrl adr100 C SELECT ALL ALL NAM
49. ACUSER PASSWORT PROC xxxLSUC DS AL4 A SUCCESS PROCESSING xxxLSUCL DS XL2 LCSUCCESS PROCESSING xxxLFAIL DS XL2 LCFAILURE PROCESSING xxxLFAI DS ALA ACFAILURE PROCESSING U24845 J Z135 4 76 17 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT A FILE NAME LCFILE NAME LCLIBRARY NAM ACLIBRARY NAM ACELEMENT NAM LCELEMENT NAM LCELEMENT VERSION ACELEMENT VERSION ACELEMENT TYP LCELEMENT TYP LCFILE PASSWORT ACFILE PASSWORT rm rmi A USER ID TRANS L USER ID TRANS L USER ACC TRANS A USER ACC TRANS ACUSER PASSWORT TRANS L USER PASSWORT TRANS LCUSER ID PROC ACUSER ID PROC ACUSER ACC PROC LCUSER ACC PROC LCUSER PASSWORT PROC ACUSER PASSWORT PROC ACSUCCESS PROCESSING LCSUCCESS PROCESSING LCFAILURE PROCESSING ACFAILURE PROCESSING ACSTART LCSTART LCCANCEL ACCANCEL ACTRANS ID LCTRANS ID TRANSFER DIRECTION OMPRESSION RITE MODE ATA TYPE RIORITY LISTING EMOTE SYNTAX LCJV NAME ACJV NAME ACJV PASSW LCJV PASSW L LOCAL TRANSFER ADMISSION AL4 XL2 XL2 AL4 AL4 XL2 XL2 AL4 AL4 XL2 XL2 AL4 AL4 XL2 XL2 AL4 AL4 XL2 XL2 AL4 AL4 XL2 XL2 AL4 AL4 XL2 XL2 AL4 AL4 XL2 XL2 AL4 AL4 XL2 XL XL XL XL XL XL XL OH AL2 AL4 AL4 AL2 AL2 DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS
50. AD PROCESSING ADMISSION PUSER PUS USER IDENTIFICATION in the PROCESSING ADMISSION PACC PAC USER ACCOUNT in the PROCESSING ADMISSION PPASS PPA USER PASSWORD in the PROCESSING ADMISSION SUCC SUC SUCCESS PROCESSING PFXSUCC PSUC PREFIX in the structure SUCCESS PROCESSING U24845 J Z135 4 76 ASSEMBLER programming interface for openFT AC Meaning in command SUFFIX in the structure SUCCESS PROCESSING FAILURE PROCESSING PREFIX in the structure FAILURE PROCESSING SUFFIX in the structure FAILURE PROCESSING WRITE MODE FT FUNCTION USER INFORMATION CHIPCARD in the structure TRANSFER ADMISSION DATA ENCRYPTION Address field D format XSUC FAI PFAI XFAI WRMOD FTFUN TEXT CHIP DENC Operand L format SUCSUCC FAIL PFXFAIL SUCFAIL WRITE FTFUNC TEXT CHIP DENC If a chipcard profile is created at the command interface TRANSFER ADMISSION CHIP CARD TRANSFER ADMISSION CERTIFICATE then the internally stored transfer ad mission is formed from the specified transfer admission together with the certificate number and certification authority At the programming interface it is not possible to specify these components of the transfer admission in separate fields Instead it is the responsibility of the caller of the programming interface to structure the transfer admission correctly The structure of the transfe
51. ANSP YES is mapped onto the programming interfaces using TRANSP STD U24845 J Z135 4 76 NCOPY 16 ASSEMBLER programming interface for openFT NCOPY Format of the macro NCOPY DSECT format Name Operation Operand 1 NCOPY MF DL xxx The prefix xxx default value YNO may be up to 3 characters long It must generate names which are permitted in ASSEMBLER The following ASSEMBLER instructions are generated XXXNCOPY DSECT 60 FHDR MF C amp P xxxDMSCO DS A DMS FEHLERCODE xxxPART DS A ACPARTNER NAME XxxxPARTL DS XL2 xxxLFILL DS XL2 FILE NAME xxxLFIL DS AL4 ACFILE NAME ORG xxxLFILL xxxLLIBL DS XL2 LCLIBRARY NAME xxxLLIB DS ALA ACLIBRARY NAME xxxLEL DS ALA ACELEMENT NAME xxxLELL DS XL2 LCELEMENT NAME xxxLEVL DS XL2 LCELEMENT VERSION xxxLEV DS ALA ACELEMENT VERSION xxxLETY DS ALA ACELEMENT TYPE xxxLETYL DS XL2 LCELEMENT TYPE xxxLFPAL DS XL2 L FILE PASSWORT xxxLFPA DS ALA ACFILE PASSWORT XxxLTUS DS AL4 ACUSER ID TRANS xxxLTUSL DS XL2 L USER ID TRANS XxxLTACL DS XL2 L USER ACC TRANS DS AL4 A USER ACC TRANS xxxLTPA DS AL4 A USER PASSWORT TRANS xxxLTPAL DS XL2 L USER PASSWORT TRANS xxxLPUSL DS XL2 L USER ID PR0C xxxLPUS DS AL4 ACUSER ID PROC XXXLPAC DS AL4 ACUSER ACC PROC xxxLPACL DS XL2 LCUSER ACC PROC DS XL2 L USER PASSWORT PROC XXXLPPA DS AL4
52. BINARY 88 CHARACT 10 CHARACTER S TT T 88 NO VALUE 88 NO PAR 88 YES 05 DELETE FILE 88 NO VALUE 88 NO PAR 88 YES 10 TR AT 88 NO VALU 88 GRAPHIC 88 GENERAL 88 IA5 88 VISIBLE 10 RECORD FORMAT 88 UNCHANGED 10 RECORD SIZE 88 UNCHANGED 05 CHANG CALL NLMOD The version specification at the beginning of the structure FI NCOPY LIST serves to identify the COPY element and must not be overwritten The NLMOD macro does not change any values in the structure FT NLMOD LIST The fields are to be written with left justified characters and filled with right justified blanks default for the COBOL MOVE statement for character strings Fields which should not contain any specifications are to be assigned LOW VALUE If a parameter is not entered the default values are generated as in the MODIFY FILE FT ATTRIBUTES command All other values which should be set in quotation marks at the command interface do not have these quotation marks in the programming interface BS2000 passwords however must be input in the usual form including quotation marks U24845 J Z135 4 76 Passwords with integer values must be entered in binary form 124 COBOL programming interface CALL NLMOD For the assignment of keywords e g BINARY VISIBLE and YES use the values which are set in the corresponding 88 step structure Description of the data fields The parameters
53. CATION ACMESSAGE LCMESSAGE FILE NAME OTSP FUTURE FILE SIZE UNCHG FUTURE FILE SIZE FILE PASSWORD NONE TRANSFER ADMISSION NONE PAR USER ACCOUNT ON USER PASSWORD NON NEW NAME SAME STORAGE ACCOUNT UNCHG LEGAL QUALIFICATION UNCHG 37 DSECT DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL DS XL DS XL4 DS XL DS XL DS XL DS XL DS XL DS XL DS XL XxxNMOD XxxxHMOD XXXPART XXXPARTL 5 XxxFPASL XXXTADL xxxTAD xxxUUS XXXUACL XXXUAC XXXUPA XXXUPAL XXXNNAML XXxNNAM XXXSTAC XXXSTACL XXXLQFL XXXLQF xxxMSG xxxMSGL XxxIFILE XXXIFFS XXXFFS T xxxIFPAS XXXIUAC XXXIUPA XXXINNAM XXXISTAC xxxILQF U24845 J Z135 4 76 ASSEMBLER programming interface for openFT DEFER U24845 J Z135 4 76 TI r 6 7 lt lt gt gt FT CO ES MED a gt lt lt Y 0 CrO G3 0 GRAPH OCTET GRAPH OCTET GRAPH OCTET E AVAIL UNCHG I ESS MODE UNCHG D FILE ERT DATA UNIT LACE FILE END FILE D ATTRIBUTES GE ATTRIBUTES ETE FILE E FILE PASSWORD E TRANSFER ADMS E
54. CIFY PARAMETERS MOVE LOW VALUE TO USER PARAMETERS MOVE 01 TO PARTNER NAME MOVE REMOTEFILE TO FILE NAME MOVE USERID TO USER ID MOVE ACCOUNT TO ACCOUNT MOVE PASSWORD TO PASSWORD SET ALL ATTRIBUTES IN INFORMATION TO TRUE NSHOW CALLING CALL NSHOW USING FT NSHOW LIST FT RETURN INFO 142 U24845 J Z135 4 76 CALL NSHOW example COBOL programming interface RESULT HANDLING IF OKAY IN MAIN RETURN CODE UPON TERM HOW OKAY ETURN CODE TO MAIN RCODE STRING MOVE SUB RETURN CODE TO SUB RCODE STRING HOW REJECTED UPON TERM IN RETURN CODE MAIN RCODE STRING UB RETURN CODE SUB RCODE STRING 143 TERM THEN DISPLAY NS ELSE MOVE MAIN R DISPLAY NS DISPLAY MA S UPO 51 99 STOP RUN U24845 J Z135 4 76 CALL NSTATUS COBOL programming interface 3 1 8 NSTATUS Query file transfer status The macro CALL NSTATUS can be used to obtain information about file transfer request The functionality corresponds to that of the command SHOW FILE TRANSFER NSTATUS Macro The function can be called as follows CALL NSTATUS USING FT NSTATUS LIST FT RETURN INFO FT NSTATUS LIST The range FT NSTATUS LIST describes the parameter list for the NSTATUS macro FT NSTATUS LIST must be defined in the WORKING STORAGE SECTION and can be copied to there with the statement COPY FTNSTAT of linkname Before the macro is executed you
55. CT 54 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT Return codes 2 1 11 Return code for file management macros The following explanations only apply to the file management macros NDEL NLMOD NLSHOW NMOD and NSHOW The field for these return codes has the following format Subcode2 Subcode1 Maincode warnings error class Parameter error 1 byte 1 byte 1 byte 1 byte The field with the return code can be addressed with DSECT after a macro call field xxxRETC generated with the macro FHDR or via register 1 see section Example for the use of the programming interface on page 95 Maincode This field contains the exact error It is divided into two bytes The right byte shows the cause of the error It can have the following values in decimal notation 0 the call was error free 1 the parameter field is partially or entirely in an invalid address space 2 the address or length field contradicts the keyword field 3 the parameter entry contradicts another parameter 4 the parameter value is too long or does not respect the syntax rules e g FILENAME PASSWORD 10 the buffer is too small this error code is reserved for future expansions 11 the arithmetic parameter value e g RECSIZE value is invalid 12 the keyword entered is not permitted for this parameter 13 a mandatory parameter is missing 14 341 these error codes have the sa
56. DETECTION EXPIRATION DATE PRIVILEGED IGNORE MAX LEVELS OUTBOUND SEND in the structure IGNORE MAX LEVELS OUTBOUND RECEIVE in the structure IGNORE MAX LEVELS INBOUND SEND in the structure IGNORE MAX LEVELS INBOUND RECEIVE in the structure IGNORE MAX LEVELS INBOUND PROCESSING in the structure IGNORE MAX LEVELS INBOUND MANAGEMENT in the structure IGNORE MAX LEVELS USER ADMISSION USER IDENTIFICATION in the structure USER ADMISSION USER ACCOUNT in the structure USER ADMISSION USER PASSWORD in the structure USER ADMISSION INITIATOR TRANSFER DIRECTION PARTNER NAME MAX PARTNER LEVEL FILE NAME PREFIX of LIBRARY LIBRARY ELEMENT U24845 J Z135 4 76 Address field D format NAME PASS SEL TAD OWN NNAME NTAD VALID USAGE EXDA PRIV ILV IOSND IORCV IIRCV IIPRC IIMAN UAD UUS UAC UPA INIT TRDIR PART MPLV FILE FILE FILE EL Operand L format NAME PASS SELECT TAD OWNER NEWNAME NEWTAD VALID USAGE EXPDATE PRIV ILV IOSND IORCV IISND IIRCV IIPRC IIMAN UAD UUSER UACC UPASS INIT TRANS PARTNER MAXPLV FILE PFXFIL LIB EL MODFTPRF 84 MODFTPRF Meaning in command PREFIX of ELEMENT ELEMENT VERSION ELEMENT TYPE FILE PASSWORD PROCESSING ADMISSION USER IDENTIFICATION in the structure PROCESSING ADMISSION USER ACCOUNT in the structure PROCESSING ADMISS
57. E enone ladrl adr100 5 ADMS L NO U24845 J Z135 4 76 69 EXPFTENV ASSEMBLER programming interface for openFT AC Format of the macro EXPFTENV DSECT format DSECT XXxHENV FHDR MF C amp P xxxFILE DS A ACFILE xxxFILEL DS XL2 LCFILE XXXRES DS XL2 RESERVED xxxUSERL DS 100XL2 LCA USER XXXxUSER DS 100A ACA USER DS 100A ACA NAME XXxNAMEL DS 100XL2 LCA NAME BYTE FIELDS FOR ENTERING KEYWORDS xxxSEL DS SELECT ALL xxxIUSER DS USER ALL d XxxINAME 05 XL PROFIL NAME ALL NONE xxxADMS DS ADMISSION SET YES NO XxxFTENL EQU meaning of the parameters the macro EXPFTENV corresponds to the meaning of the parameters inthe command EXPORT FTAC ENVIRONMENT as shown in the following table Operand Address Meaning in command Lformat field D format FILE FILE TO FILE USER USER USER IDENTIFICATION SELECT SEL SELECT PARAMETER NAME NAME PROFILE NAME in the structure SELECT PARAMETER ADMS ADMS ADMISSION SET in the structure SELECT PARAMETER 70 U24845 J Z135 4 76 IMPFTENV ASSEMBLER programming interface for openFT AC 2 2 5 IMPFTENV Import admission sets and profiles The macro IMPFTENV can be used to import the admission sets and profiles from a file The functionality corresponds to that o
58. ECIFIED NOTSP YFSNOTRS NOT RESTRICTED 5 YFSUNCHG UNCHANGED JUNCHG YFSSTD STD C ISTD 2 2 13 Example for the use of the programming interface The following section contains an example of the use of the programming interface The example illustrates the macros CREFTPRF MODFTADS SHWFTADS and SHWFTPRF Example START BALR 10 0 USING 10 PRINT NOGEN set FTAC password NURICH dp prevent FT by setting security level at O MODFTADS NEWPASS V1 MAXLV 0 BAL 4 CHECKRC branch to return code check 7 Display admission set on SYSOUT SHWFTADS BAL 4 CHECKRC branch to return code check 5 Create admission profile with the name MYPROFIL and transfer admission accessformeonly The FT initiative can only be in the local system 0 the security levels of the admission set should be ignored the entry for processing admission is not limited CREFTPRF NAME V2 PASS V1 TAD V3 ILV YES INIT LOCAL PAD NOTRS F U24845 J Z135 4 76 95 Programming examples ASSEMBLER programming interface for openFT AC BAL 4 CHECKRC branch to return code check Display the created admission profile macro with LIST format SHWFTPRF MF E SHWFTPRF EXECUTE format BAL 4 CHECKRC branch to return code check TERM check last byte of return code for 0 CHECKRC CLI 7 1 X 00 BRE 4 if 0 continue program TERM UNIT STEP MODE A else
59. EW PASSWORD YFS2TAD EQU 9 TRANSFER ADMISSION YFS2NTAD EQU LO EW TRANSFER ADMISSION YFS2MOSN EQU 11 LEVEL OUTBOUND SEND YFS2MORC EQU 2 AX LEVEL OUTBOUND RECEIVE YFS2MISN EQU AX LEVEL INBOUND SEND YFS2MIRC EQU 4 AX LEVEL INBOUND RECEIVE YFS2MIPR EQU 5 AX LEVEL INBOUND PROCESSING YFS2MIMA EQU 6 AX LEVEL INBOUND MANAGEMENT YFS2ILV EQU 21 IGNORE LEVEL YFS210SN EQU 22 IGNORE MAX LEVEL OUTBOUND SEND YFS2IORC EQU 23 IGNORE MAX LEVEL OUTBOUND RECEIVE YFS21ISN EQU 24 IGNORE MAX LEVEL INBOUND SEND YFS2TIRC EQU 25 IGNORE MAX LEVEL INBOUND RECEIVE YFS2TIPR EQU 26 IGNORE MAX LEVEL INBOUND PROCESSING YFS2TIMA EQU 27 IGNORE MAX LEVEL INBOUND MANAGEMENT YFS2MPLV EQU 32 AX PARTNER LEVEL YFS2PART EQU 33 PARTNER NAME YFS2UAD 0 34 USER ADMISSION YFS2UUS EQU 35 USERID YFS2UAC EQU 36 ACCOUNT NUMBER YFS2UPA 0 37 USER PASSWORD YFS2PAD EQU 38 PROCESSING ADMISSION YFS2PUS EQU 39 USERID YFS2PAC EQU 40 ACCOUNT NUMBER YFS2PPA EQU 41 PASSWORD YFS2FIL 0 42 FILENAME YFS2PFIL EQU 43 PREFIX OF FILENAME YFS2LIB EQU 44 LIBRARY NAME YFS2PLIB EQU 45 PREFIX OF LIBRARY NAME YFS2EL EQU 46 ELEMENT NAME YFS2PEL EQU 47 PREFIX OF ELEMENT NAME YFS2EV EQU 48 ELEMENT VERSION YFS2ETY EQU 49 ELEMENT TYPE 100 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT AC Return information an error displays YFS2FPA EQU 50 FILE PASSWORD YFS2SUC EQU 51 SUCCESS PROCESSING YFS2PSUC EQU 52 PREFIX OF SUCCESS
60. FILE AEXTDF AEXTF EXTEND FILE AERAU AERAU ERASE DATA UNIT AREADA AREAA READ ATTRIBUTES ACHNGA ACHNA CHANGE ATTRIBUTES ADELF ADELF DELETE FILE U24845 J Z135 4 76 39 ASSEMBLER programming interface for openFT NSHOW 2 1 7 NSHOW Display remote file attributes The macro NSHOW can be used to view the attributes of a file or directory in an FT partner system The functionality corresponds to that of the command SHOW REMOTE FILE ATTRIBUTES Format of the macro NSHOW LIST format default format Operand 1 1 PARTNER adr NOTSP L FILE adr DIR NOISP L DIR 1 adr NONE 55 1 adr NONE TAD adr UUSER adr NONE UACC adr NONE adr STD L JONLY L SYSOUT OUTPUT 1 L SYSLST NONE 501 5 1 55 L GRAPH 1 L JOCTET U24845 J Z135 4 76 Operation NSHOW Name name 40 ASSEMBLER programming interface for openFT NSHOW GRAPH ATAD 1 JOCTET L GRAPH AUPASS L OCTET L STD LAYOUT 1 CSV The operands AFPASS ATAD and AUPASS are used to set the coding type of the file password FPASS the transfer admission TAD and the user password UPASS The operands AFPASS ATAD and AUPASS can have the value GRAPHIC o
61. INSERT DATA UNIT XE xxxERADU DS XL ERASE DATA UNIT O XE DS OH xxxRCPAL DS XL2 LCCREATE PASSWORD XXxRCPA DS AL4 ACCREATE PASSWORD XxxRSIZE DS XL4 RECORD SIZE NOT SPEC 1 32756 XxxLNCO EQU XXXTRDTO EQU 01 TRANSFER DIRECTION 0 XXXTRDFR EQU X 00 TRANSFER DIRECTION FROM EQU X 80 COMPRESSION BYTE XxxCOMNO EQU X 00 COMPRESSION NONE XxxLISY EQU X 80 LISTING SYSLST XxxLISF EQU X 40 LISTING LISTFILE XxxLISYF EQU X 20 LISTING SYSLST CON FAILURE ONLY YES XxxLISFF EQU 10 LISTING LISTFILE CON FAILURE ONLY YES 115 EQU X 00 LISTING NONE XxxMSP EQU X 03 REMOTESYNTAX MSP 52 EQU 01 REMOTESYNTAX 2 EQU X 02 REMOTESYNTAX ANY XXXNEW EQU 01 WRITE MODE NEW FILE XXXEXT EQU 04 WRITE MODE EXTEND U24845 J Z135 4 76 19 NCOPY ASSEMBLER programming interface for openFT XXXRPL EQU 02 RITE MODE REPLACE 5 EQU X 88 DATA TYPE CHARACTER TRANS STD xxxBINS EQU X 84 DATA TYPE BINARY TRANS STD XXXCHR EQU X 08 DATA TYPE CHARACTER XXxBI EQU X 04 DATA TYPE BINARY XXXNOTSP EQU 02 DATA IYPE NOT SPECIFIED xxxUSER EQU 01 DATA TYPE USER XXXNORM EQU X 00 PRIORITY NORMAL XXxHIGH EQU 01 PRIORITY HIGH XxxLO EQU 02 PRIORITY xxxSTDLC EQU X 0 LEL
62. ION USER PASSWORD in the structure PROCESSING ADMISSION SUCCESS PROCESSING PREFIX in the structure SUCCESS PROCESSING SUFFIX in the structure SUCCESS PROCESSING FAILURE PROCESSING PREFIX in the structure FAILURE PROCESSING SUFFIX in the structure FAILURE PROCESSING WRITE MODE FT FUNCTION USER INFORMATION CHIPCARD in the structure TRANSFER ADMISSION DATA ENCRYPTION Address field D format EL EV ETY FPA PAD PUS PAC PPA SUC PSUC XSUC FAI PFAI XFAI WRMOD FTFUN TEXT CHIP DENC ASSEMBLER programming interface for openFT AC Operand L format PFXEL ELVER ELTYP FPASS PAD PUSER PACC PPASS SUCC PFXSUCC SUCSUCC FAIL PFXFAIL SUCFAIL WRITE FTFUNC TEXT CHIP DENC If a chipcard profile is created at the command interface TRANSFER ADMISSION CHIP CARD TRANSFER ADMISSION CERTIFICATE then the internally stored transfer ad mission is formed from the specified transfer admission together with the certificate number and certification authority At the programming interface it is not possible to specify these components of the transfer admission in separate fields Instead it is the responsibility of the caller of the programming interface to structure the transfer admission correctly The structure of the transfer admis sion for specification is as follows Number of the Certification Authority configured in the system Certificate number Transfer admission specified in the partner s
63. ISSION PASSWORD in local TRANSFER ADMISSION TRANSFER ADMISSION local USER IDENTIFICATION in local PROCESSING ADMISSION ACCOUNT in local PROCESSING ADMISSION PASSWORD in local PROCESSING ADMISSION SUCCESS PROCESSING in LOCAL parameter FAILURE PROCESSING in LOCAL parameter LISTING in LOCAL parameter MONJV in LOCAL parameter JV PASSWORD in LOCAL parameter REMOTE parameter FILE NAME in REMOTE parameter LIBRARY in REMOTE parameter ELEMENT in REMOTE parameter VERSION in REMOTE parameter TYPE in REMOTE parameter FILE PASSWORD in REMOTE parameter USER IDENTIFICATION in remote TRANSFER ADMISSION 21 Address field D format TRDIR PART LFIL LLIB LEL LEV LETY LFPA LTUS LTAC LTPA LTAD LPUS LPAC LPPA LSUC LFAI LIST LJVN LJVP RSYN RFIL RLIB REL REV RETY RFPA RTUS Operand L format TRANS PARTNER LFILE LLIB LEL LELVER LLIBTYP LFPASS LTUSER LTACC LTPASS LTAD LPUSER LPACC LPPASS LSUCC LFAIL LIST JVNAME JVPASS RSYNTAX RFILE RLIB REL RELVER RLIBTYP RFPASS RTUSER U24845 J Z135 4 76 ASSEMBLER programming interface for openFT Meaning in command ACCOUNT in remote TRANSFER ADMISSION PASSWORD in remote TRANSFER ADMISSION TRANSFER ADMISSION remote USER IDENTIFICATION in remote PROCESSING ADMISSION ACCOUNT in remote PROCESSING ADMISSION PASSWORD in remote PROCESSING ADMISSION
64. KAY IN MAIN RETURN CODE DISPLAY FILE TRANSFER REQUEST CANCELLED UPON TERM 106 U24845 J Z135 4 76 COBOL programming interface CALL NCANCEL example ELSE MOVE MAIN RETURN CODE TO MAIN RCODE STRING MOVE SUB RETURN CODE TO SUB RCODE STRING DISPLAY TRANSFER CANCELLATION REJECTED UPON TERM DISPLAY MAIN RETURN CODE MAIN RCODE STRING SUB RETURN CODE SUB RCODE STRING UPON TERM 51 99 STOP RUN U24845 J Z135 4 76 107 CALL NCOPY COBOL programming interface 3 1 2 NCOPY Transfer file The macro CALL can be used to transfer a file or library member The local System can be the sender or receiver of the file The local system is considered to be the System in which the call is initiated The partner system is the remote system The function ality corresponds to that of the command TRANSFER FILE NCOPY Macro The function can be called as follows CALL NCOPY USING FT NCOPY LIST FT RETURN INFO FT NCOPY LIST The range FT NCOPY LIST describes the parameter list for the NCOPY macro FT NCOPY LIST must be defined in the WORKING STORAGE SECTION and can be copied to there with the statement COPY FTNCOPY OF linknamel Before the first NCOPY macro the parameter fields should be deleted with the statement MOVE LOW VALUE TO USER PARAMETERS IN FT NCOPY LIST Before executing another NCOPY macro you must fill the desired fields If a parameter is not specified or the default value
65. L programming interface 3 1 4 NLMOD Modify local FT file attribute The macro CALL NLMOD can be used to modify the FTAM attributes of a file in the local system and adapt the attributes to make them available for file transfer or file management request with an FTAM partner The functionality corresponds to that of the command MODIFY FILE FT ATTRIBUTES In addition to the options offered by the openFT for BS2000 command interface the filenames can also be addressed via their linknames Macro The function can be called as follows CALL NLMOD USING FT NLMOD LIST FT RETURN INFO FT NLMOD LIST The range FT NLMOD LIST describes the parameter list for the NLMOD macro FT NLMOD LIST must be defined in the WORKING STORAGE SECTION and can be copied to there with the statement COPY FTNLMOD OF linkname Before the first NLMOD macro the parameter fields should be deleted with the statement MOVE LOW VALUE TO USER PARAMETERS IN FT NLMOD LIST Before executing another NLMOD macro you must fill the desired fields If a parameter is not specified or the default value is to be used this field must be assigned the value LOW VALUE U24845 J Z135 4 76 122 COBOL programming interface CALL NLMOD FT NLMOD LIST is defined as follows 01 FT NLMOD LIST 02 FILLER PIC X 4 VALUE V520 02 USER PARAMETERS 05 FILE NAME 54 88 NOT SPECIFIED VALUE LOW VA
66. LINK RETCODE in hexadecimal notation The CALL macro was not executed because the local and remote systems are not compatible Neither system can connect with the other or at least one of the systems does not support the function called The CALL macro was not executed because the filename was neither explicitly entered nor indicated by means of the TRANSFER ADMISSION used The function NSTAT is not supported by the FT version installed version is smaller than V3 0 FT runtime module not available 151 COBOL programming interface SUB RETURN CODE 5 10 11 12 13 17 18 19 20 MAIN RETURN CODE 3 U24845 J Z135 4 76 Return codes COBOL programming interface MAIN SUB Meaning RETURN RETURN CODE CODE 1 3 The version of the one of the COPY elements used is not supported 1 129 The CALL macro cannot be accepted because there is not yet an output for asynchronous end messages 1 130 The CALL macro cannot be accepted because the FT system has not yet completed a previous FISHUTDOWN command 152 U24845 J Z135 4 76 COBOL programming interface Return codes 3 1 9 2 Return code for the file management CALL macros The following descriptions are only valid for the file management CALL macros NDEL NLMOD NLSHOW NMOD NSHOW Maincode This field contains the exact error It i
67. LUE 05 LINK NAME PIC X 8 88 NOT SPECIFIED VALUE LOW VALUE 05 FILE PASSWORD PIC X 4 88 NONE VALUE LOW VALUE 05 FILE PASSWD ATTR PIC 88 GRAPHIC VALUE LOW VALUE 88 OCTET VALUE 0 05 PERMITTED ACTIONS PIC X 1 88 UNCHANGED VALUE LOW VALUE 88 PARAMETER VALUE P 05 READ FILE PIC 88 NO VALUE VALUE LOW VALUE 88 NO PAR VALUE 88 YES VALUE Y 05 INSERT DATA UNIT PIC 88 NO VALUE VALUE LOW VALUE 88 NO PAR VALUE N 88 YES VALUE Y 05 REPLACE FILE PIC 88 NO VALUE VALUE LOW VALUE 88 NO PAR VALUE N 88 YES VALUE Y 05 EXTEND FILE PIC 88 NO VALUE VALUE LOW VALUE 88 NO PAR VALUE 88 YES VALUE Y 05 ERASE DATA UNIT PIC 88 NO VALUE VALUE LOW VALUE 88 NO PAR VALUE 88 YES VALUE Y 05 READ ATTRIBUTES 88 NO VALUE VALUE LOW VALUE 88 NO PAR VALUE N 88 YES VALUE Y U24845 J Z135 4 76 123 COBOL programming interface LOW VALUE N LOW VALUE N LOW VALUE LOW VALUE pa HEM LOW VALUE go HEN LOW VALUE LOW VALUE LU LU LU LU LU LU LU LU LU LU LU LU LU LU LU ET VA VA VA VA VA VAL X 1 X 1 X 1 X 1 X 1 X 1 X 5 PIC PIC PIC PIC PIC PIC PIC E ATTRIBUTES 05 TRANSFER ATTRIBUTES RIBUTE 88 UNCHANG 88 PARAMET 10 DATA TYPE 88 UNCHANG 88
68. LUE HIGH VALUE 05 OUTPUT DESTINATION PIC X 1 88 SYSOUT VALUE LOW VALUE 88 SYSLST VALUE HIGH VALUE 88 SYSOUTCSV VALUE 0 88 SYSLSTCSV VALUE L If more than one selection criterion is specified in the NSTATUS macro a request can be overdefined for instance if both TRANSFER ID and are specified If the criteria contradict each other in such a case the NSTATUS macro is not executed Description of the data fields The parameters for FT NSTATUS LIST have the same names and functions as the operands for the command SHOW FILE TRANSFER NSTATUS Please refer to the command description in the user manual 146 U24845 J Z135 4 76 COBOL programming interface FT RETURN INFO 3 1 9 Return information and error displays After every CALL macro to openFT for BS2000 return information is provided in the structure FT RETURN INFO FT RETURN INFO The range FT RETURN INFO describes the return information returned by openFT for BS2000 FT RETURN INFO must be defined in the WORKING STORAGE SECTION and can be copied to there with the statement COPY FTRETC OF linkname FT RETURN INFO is defined as follows 01 FI RETURN INFO 05 FILLER PIC X 4 VALUE V300 05 TRANSFER ID PIC X 10 05 FT RETURN CODE 0 MAIN RETURN CODE PIC S9 5 COMP 88 OKAY VALUE 0 0 SUB RETURN CODE PIC S9 5 COMP 0 DMS RETCODE PIC X 8 0 LINK RETCODE REDEFINES DMS RETCODE PIC X 8 The version specification at
69. MOVE MAIN RETURN CODE TO MAIN RCODE STRING MOVE SUB RETURN CODE TO SUB RCODE STRING DISPLAY NMOD REJECTED UPON TERM DISPLAY MAIN RETURN CODE MAIN RCODE STRING SUB RETURN CODE SUB RCODE STRING PON TERM e 51 99 STOP RUN 138 U24845 J Z135 4 76 COBOL programming interface CALL NSHOW 3 1 7 NSHOW Display remote file attributes The macro CALL NSHOW can be used to view the attributes of a file or directory in an FT partner system The functionality corresponds to that of the command SHOW REMOTE FILE ATTRIBUTES The user can select between three variants for the output of attributes display the filename display a default selection display all file attributes The information can be output on the screen or to a file Macro The function can be called as follows CALL NSHOW USING FT NSHOW LIST FT RETURN INFO FT NSHOW LIST The range FT NSHOW LIST describes the parameter list for the NSHOW macro FT NSHOW LIST must be defined in the WORKING STORAGE SECTION and can be copied to there with the statement COPY FTNSHOW OF linkname Before the first NSHOW macro the parameter fields should be deleted with the statement MOVE LOW VALUE TO USER PARAMETERS IN FT NSHOW LIST Before executing another NSHOW macro you must fill the desired fields If a parameter is not specified or the default value is to be used this field must be assigned the value LOW VALUE U24845 J Z135 4 76
70. NO ERROR INVALID ADDRESS OF PARAMETER VALUE PARAMETER AND INDICATOR INCONSISTENT INCONSISTENCY WITH OTHER PARAMETER WRONG SYNTAX IN PARAMETER VALUE BUFFER TOO SMALL PARAMETER VALUE OUT OF RANGE INVALID KEYWORD VALUE MANDATORY PARAMETER MISSING SYSTEM ERROR 49 ASSEMBLER programming interface for openFT DSOUT EQU 40 DSLST EQU 41 DONLY DSTD DALL mmm am C n C2 DLOCAL EQU 50 DREMOT DBOTH DTODAY DTOMOR DTRANF DREATT DDELFI DCREFI DMOATT DREDIR DMOVFI rn rm rm m LC E m C C2 N m C RROR CODES DOK EQU 0 lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt X lt MAIN CODE VALUES BYTE 1 DEFINES THE ERROR lt lt lt gt lt lt lt co gt ERMANENT ERRORS DIINVA EQU DIINC EQU DIPINC EQU DIYERR EQU PUNE EPARABLE ERRORS EQU 10 EQU 11 EQU 12 EQU 13 DIBUFS DIRNGE DIKEYV D1MAND SYSTEM ERROR 1 EQU 255 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT ES THE ERRONEOUS PARAMETER ID ADDRESS OF PARAMETER LIST ER AME TORY EMENTCFILE PASSWORD ER ADMISSION ER UID ER ACCOUNT ER PASSWORD ILENAME ABILITY GE ACCOUNT CTER SET D FORMAT D LENGTH QUALIFICATION E FILESIZE TTED ACTIONS LE ATA UNIT LE LE ATA UNIT
71. OCTET Coding of the TAD GRAPHIC or OCTET Coding of the UPASS corresponding to GRAPHIC or OCTET 43 Address field D format PART FILE DIR FPAS TAD UUS UAC UPA INFO OUTPT OUTPT MSG APAS ATAD AUPA Operand L format PARTNER FILE DIR FPASS TAD UUSER UACC UPASS INFO OUTPUT LAYOUT MSGINS AFPASS ATAD AUPASS U24845 J Z135 4 76 ASSEMBLER programming interface for openFT NSTAT 2 1 8 NSTAT Query file transfer status The macro NSTAT can be used to obtain information on the status of your file transfer request via an ASSEMBLER program The functionality corresponds to the command SHOW FILE TRANSFER NSTATUS Format of the macro NSTAT LIST format default format Operand MF L J TRANS ID adr L SOWNER adr PARTNER adr LFILE adr 1 LLIB adr LEL adr L LELVER adr L LELTYP adr JVNAME adr JVPASS adr BOTH L INIT LOCAL gt REMOTE ALL SUSP LOCK STATE 4WAIT 1 ACT FIN HOLD SID INFO 4ALL 1 SUMMARY SYSOUT OUTPUT 1 SYSLST L STD LAYOUT L CSV U24845 J Z135 4 76 L Operation NSTAT Name name 44 ASSEMBLER programming interface for openFT NSTAT Format of the macro NSTAT DSECT format Name Operation Operand 1 NSTAT MF DL xxx The prefix xxx default value YNS may be up to 3 charact
72. ONTROL U24845 J Z135 4 76 5 U24845 J Z135 4 76 2 ASSEMBLER programming interface An FT request can also be issued from an application program To do this openFT for BS2000 has an ASSEMBLER programming interface For file transfer with FTAM partners please note the restrictions described in the user manual Macro with EXECUTE format Name Operation Operand E adr 1 lt macro gt MF r The symbolic address adr or the register r refers to the operand list The user creates such a list in one of two ways Macro with DSECT format This gives you the layout of the operand list Name Operation Operand 1 1 The may contain up to 3 characters and must generate names which are permis sible in ASSEMBLER To fill the HEADER the user must generate an initialized header pattern using the following call Name Operation Operand name macro HEADER U24845 J Z135 4 76 7 Macros for openFT ASSEMBLER programming interface for openFT This macro call generates a default header for the macro parameter field This default header is to be copied into the corresponding field e g xxxHADS for SHWFTADS of the operand list using an MVC command length 4 The DSECT length fields must contain the exact length of the operand fields value fields in the program Fillers such as blanks
73. ORD OF FROM A COBOL PROGRAM DENTIFICATION DIVISION PROGRAM ID NCO VIRONMENT DIVISION m ONFIGURATION SECTION PECIAL NAMES TERMINAL IS TERM 2 DATA DIVISION WORKING STORAGE SECTION 77 MAIN RCODE STRING PIG ZZ229 77 SUB RCODE STRING ZZZZ9 COPY FTNCOPY OF FTLIB COPY FTRETC OF FTLIB PROCEDURE DIVISION STEUER SECTION ST 01 SPECIFY PARAMETERS 0 LOW VALUE TO USER PARAMETERS IN FT NCOPY LIST VAROO1 TO PARTNER NAME T TO TRANSFER DIRECTION LOCFILE TO FILE NAME IN LOCAL PARAMETER USERID TO USER ID IN TRANSFER ADMISSION N LOCAL PARAMETER OVE ACCOUNT TO ACCOUNT IN TRANSFER ADMISSION M AE EEE CELE CETERI V OV OV OV OV N LOCAL PARAMETER OVE PASSWORD TO PASSWORD IN TRANSFER ADMISSION N LOCAL PARAMETER OVE REMFILE TO FILE NAME IN REMOTE PARAMETER OVE USERID TO USER ID IN TRANSFER ADMISSION IN REMOTE PARAMETER MOVE ACCOUNT TO ACCOUNT IN TRANSFER ADMISSION IN REMOTE PARAMETER U24845 J Z135 4 76 115 CALL NCOPY example COBOL programming interface MOVE PASSWORD TO PASSWORD IN TRANSFER ADMISSION
74. OW VALUE LOW VALUE LOW VALUE LOW VALUE ETI ETT VAL VAL VAL VAL VAL VAL VAL VAL VAL X 8 X 1 X 8 X 221 X 56 X 64 X 8 X 24 X 56 X 11 X 1 0 PIC PIC PIC PIC PIC PIC PIC PIC PIC PIC COBOL programming interface OWNER IDENTIFICATION 88 OWN 88 SELECT ALL INITIATOR 88 SELECT ALL 88 LOCAL 88 REMOTE PARTNER NAME 88 SELECT ALL FILE NAME 88 SELECT ALL LIBRARY 88 SELECT ALL ELEMENT 88 SELECT ALL TYP 88 SELECT ALL VERSIO 88 SELECT ALL MONJV 88 NONE JV PASSWORD 88 NONE 05 FORCE CANCELLATION 88 NO 88 YES 10 10 0 The version specification at the beginning of the structure serves to identify the COPY element and must not be overwritten by the user If more than one selection criterion is specified in the NCANCEL macro a request can be overdefined for instance if both TRANSFER ID and are specified If the criteria contradict each other in such a case the NCANCEL macro is not executed You may only set YES if you have explicitly specified a transfer ID in the TRANSFER ID field This request must already have been cancelled with FORCE CANCELLATION NO and is only possible if the user ID possesses the FT ADM privilege U24845 J Z135 4 76 CALL NCANCEL example COBOL programm
75. PROCESSING YFS2FA EQU 53 FAILURE PROCESSING YFS2PFAI EQU 54 PREFIX OF FAILURE PROCESSING YFS2PRIV EQU 55 PRIVILEGED YFS2INIT EQU 56 TRANSFER INITIATOR YFS2TDIR EQU 57 TRANSFER DIRECTION YFS2WMOD EQU 58 WRITE MODE YFS2INFO EQU 59 INFORMATION YFS20UTP EQU 60 OUTPUT YFS2BUF EQU 61 BUFFER YFS2RES EQU 64 RESERVED YFS2DATE EQU 65 DATE YFS2FTFU EQU 66 FT FUNCTION YFS2ADMS EQU 67 ADMISSION SET YFS2XSUC EQU 68 SUFFIX OF SUCCESS PROCESSING YFS2XFAI EQU 69 SUFFIX OF FAILURE PROCESSING YFS2USAG EQU 70 USAGE YFS2VALI EQU 71 VALID YFS2TEXT EQU 72 TEXT YFS2CHIP EQU 73 CHIP YFS2DENC EQU 74 DENC SUBCODE1 DEFINES THE ERROR CLASS YFSCOK EQU 0 NO ERROR YFSCPERR EQU 1 PERMANENT ERROR YFSCSERR EQU 32 SYSTEM ERROR YFSCRERR EQU 64 REPARABLE ERROR YFSCSHRT EQU 128 SHORTAGE OF RESOURCES SUBCODE2 DEFINES THE WARNINGS YFSWLLEV EQU 0 LOWER ADM LEVEL REMAINS IN EFFECT YFSWWARN EQU 51 TRANSFER ADMISSION EXISTS AS USERID YFSWINFI EQU 52 INFORMATION INCOMPLETE YFSWNPRF EQU 53 NO PROFILE FOUND YFSWNINF EQU 54 NO INFORMATION AVAILABLE YFSWPANR EQU 55 PARTNER RESTRICT DOES NOT LONGER EXIST YFSWTADL EQU 56 TRANSFER ADMISSION LOCKED FHDR MF C amp P EQUATES ONLY U24845 J Z135 4 76 101 102 U24845 J Z135 4 76 3 COBOL programming interface Programs which were created for openFT versions as of V2 0 can also be run with openFT V9 0 for BS2000 3 1 COBOL macros for openFT f
76. R J L 11A5 VISIB RECFORM JUNCHG UNCHG RECSIZE 11 NONE L MSGINS int adr GRAPH 55 1 E JOCTET U24845 J Z135 4 76 29 ASSEMBLER programming interface for openFT Format of the macro NLMOD DSECT format Operand MF DL xxx Operation NLMOD Name name The prefix xxx default value YNM may be up to 3 characters long It must generate names which are permitted in ASSEMBLER The following ASSEMBLER instructions are FHDR MF C amp P ACFILE NAME LCFILE NAME LCFILE PASSWORD ACFILE PASSWORD ACMESSAGE LCMESSAGE FILE PASSWORD NONE RECORD SIZE UNCHG RECORD SIZE TRANSFER ATTRIBUTES UNCHG PAR DATA TYPE UNCHG BIN CHAR CHAR SET GRSTR GENER IA5 VISIB REC FORMAT UNCHG PERMITTED ACTIONS UNCHG PAR READ FILE 0 YE INSERT DATA UNIT 0 YE REPLACE FILE 0 YE EXTEND FILE 0 YES ERASE DATA UNIT 0 YES READ ATTRIBUTES 0 YES CHANGE ATTRIBUTES NO YES DELETE FILE 0 YE TYPE FILE PASSWORD GRAPH OCTET RESERVED EQU NLMO U24845 J Z135 4 76 generated xxxNLMO DSECT XXXHLMO xxxFILE DS A xxxFILEL DS XL2 xxxFPASL DS XL2 xxxFPAS DS A xxxMSG DS A xxxMSGL DS XL2 xxxIFPAS DS XL xxxIREC DS XL XXXRECS DS XL4 XxxTRATT DS XL xxxDATA DS XL XxxCHRS DS XL xxxRECF DS XL DS XL xxxPREAF DS XL xxxPINSU DS
77. R STATUS FIN TRANSFER STATUS HOLD FORMATION STD FORMATION SUMMARY FORMATION ALL UTPUT SYSOUT UTPUT SYSLST UTPUT SYSOUT LAYOU UTPUT SYSLST LAYOU CO 0 4 6 6 422 gt gt gt C gt gt gt 525 4 0 14 0 2 3 4 lt gt lt gt lt gt C X 0229 2223 rm rn m rr m rm XXXSTAC XXXSTFI XXXxSTHO 0 XXXSUM XXXALL Meaning of the fields The macro NSTAT offers the same options as the command SHOW FILE TRANSFER NSTATUS Please refer to the command description in the user manual In the OUTPT address field SOUT stands for OUTPUT SYSOUT in the command and SLST stands for OUTPUT SYSLST SOUTC and SLSTC stand for their respective output in CSV format LAYOUT CSV For the other two values output is in standard format LAYOUT STD The following table shows the relation between the parameters in the macro NSTAT and the command operands U24845 J Z135 4 76 Meaning in command TRANSFER ID OWNER IDENTIFICATION PARTNER NAME FILE NAME LIBRARY ELEMENT VERSION TYPE MONJV JV PASSWORD INITIATOR STATE INFORMATION OUTPUT LAYOUT Address field D format TRID SOWN PART LFIL LLIB LEL LEV LETY JVNM JVPS INIT STAT INFO OUTPT OUTPT Operand L format TRANSID SOWNER PARTNER LFILE LLIB LEL LEL
78. R SYSTEM xxxPARTL DS XL2 L PARTNER SYSTEM xxxFILEL DS XL2 LCFILE NAME XXxFILE DS A ACFILE NAME XXXFPAS DS A ACFILE PASSWORD XxxFPASL DS XL2 LCFILE PASSWORD XXXTADL DS XL2 LCTRANSFER ADMISSION XXXTAD DS A ACTRANSFER ADMISSION XXXUUS DS A A USER IDENTIFICATION xxxUUSL DS XL2 L USER IDENTIFICATION xxxUACL DS XL2 LCUSER ACCOUNT XXXUAC DS A A USER ACCOUNT XXXUPA DS A ACUSER PASSWORD XXXUPAL DS XL2 LCUSER PASSWORD XxxMSGL DS XL2 L MESSAGE XxxMSG DS A A MESSAGE DS XL FILE NAME OTSP XXXIFPAS DS XL FILE PASSWORD NONE XXXITAD DS XL TRANSFER ADMISSION NONE PAR DS XL USER ACCOUNT ONE XXXIUPA DS XL USER PASSWORD NONE xxxAPAS DS XL TYPE FILE PASSWORD GRAPH OCTET XXXATAD DS XL TYPE TRANSFER ADMS GRAPH OCTET XXXAUPA DS XL TYPE USER PASSWORD GRAPH OCTET XxxLNDE EQU xxx NDEL 26 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT NDEL Meaning of the fields The meaning ofthe parameters in the macro corresponds to the meaning of the parameters in the command DELETE REMOTE FILE Please refer to the corresponding command description in the user manual Meaning in command PARTNER NAME FILE NAME PASSWORD to the file TRANSFER ADMISSION USER IDENTIFICATION in the structure TRANSFER ADMISSION ACCOUNT in the structure TRANSFER ADMISSION PASSWORD for identification in the structure TRANSFER ADMIS SION R
79. RETURN CODE MAIN RCODE STRING SUB RETURN CODE SUB RCODE STRING UPON TERM 51 99 STOP RUN 132 U24845 J Z135 4 76 COBOL programming interface CALL NMOD 3 1 6 NMOD Modify remote file attributes The macro CALL NMOD can be used to modify the attributes of a file in an FT partner system The functionality corresponds to that of the command MODIFY REMOTE FILE ATTRIBUTES Macro The function can be called as follows CALL NMOD USING FT NMOD LIST FT RETURN INFO FT NMOD LIST The range FT NMOD LIST describes the parameter list for the NMOD macro FT NMOD LIST must be defined in the WORKING STORAGE SECTION and can be copied to there with the statement COPY FTNMOD OF linkname Before the first NMOD macro the parameter fields should be deleted with the statement MOVE LOW VALUE TO USER PARAMETERS IN FT NMOD LIST Before executing another NMOD macro you must fill the desired fields If a parameter is not specified or the default value is to be used this field must be assigned the value LOW VALUE U24845 J Z135 4 76 133 COBOL programming interface U24845 J Z135 4 76 X 4 VALUE V600 LOW VALUE LOW VALUE LOW VALUE 0 5 LOW VALUE LOW VALUE 0 LOW VALUE LOW VALUE LOW VALUE 0 5 LOW VALUE LOW VALUE ipie D LOW VALUE LOW VALUE rmm rm PEL LU LU LU LU LU LU LU
80. S XXXPAC XXXPACL XXXPPAL XXXPPA U24845 J Z135 4 76 ASSEMBLER programming interface for openFT AC ACSUCCESS PROCESSING LCSUCCESS PROCESSING LCFAILURE PROCESSING ACFAILURE PROCESSING ALL NOTSP UNCHG NOTSP NO YES UNCHG NO YES UNCHG NO YES UNCHG NO YES UNCHG NO YES UNCHG NO YES UNCHG NO YES R ADMISSION UNCHG OWN OWN FIRST NOTSP R PASSWORD OWN NONE NOTSP UNCHG REM LOC BOTH NONE KEYWORDS NAME ALL PASSWOR SELECT OWN ER ADMISSION OWNERID OWN ALL ISSION E OLD TRANSFER AD TRANSF NEW NAM PRIVILEGED UNCHG IGNORE MAX LEVELS OUTBOUND SEND OUTBOUND RECEIVE INBOUND SEND INBOUND RECEIVE INBOUND PROCESSING USE USER ID OW USER USE INITIATOR TRANSFER DIRECTION UNCHG FROM TO NOTRS PARTNER NAME UNCHG NOTRS ADD REMOV UNCHG NOTRS 0 100 S EXP LIBEL NOTRS EXP NOTRS EXP NOTRS PROCESSING ADMISSION UNCHG SAME NOTRS RS RS USER PASSWORD SAME NOTRS NONE U24845 J Z135 4 76 STD UNCHG FILE PASSWORD UNCHG NOTRS NONE UNCHG NOTR LIBRARY NAME UNCHG ELEMENT NAME UNCHG ELEMENT VERSION SAME NO SAME NO 1 FILE NAME USER ID USER ACC XL2 XL2 A DS DS DS DS CL IL I
81. SIMOD EQU 151 USER NOT AUTH FOR THIS MODIFIC YFSIUSER EQU 152 USER NOT AUTH FOR OTHER USERID S YFS1OWNR EQU 153 USER NOT AUTH FOR OTHER OWNERID S YFSIDEL EQU 154 USER NOT AUTH TO DEL LOGGING RECS YFSIDIAG EQU 155 USER NOT AUTH FOR DIAGNOSE YFS1UPRT EQU 170 GIVEN PARTNERNAME UNKNOWN YFSlUPRF EQU 171 GIVEN PROFILENAME UNKNOWN YFS1IUAD EQU 172 INVALID USER ADMISSION YFS1IPAD EQU 173 INVALID PROCESSING ADMISSION 511 05 EQU 174 INVALID MODIF FOR UNIQUE SELECTION 72511510 EQU 175 MODIFICATION INVALID FOR STD YFS1IUID EQU 6 GIVEN USERID UNKNO YFSlUFIL EQU 177 FILENAME UNKNOWN YFSIPANU EQU 178 GIVEN PARTNERNAME NOT UNIQUE YFSIPAVI EQU 179 VIOLATION OF MAX NUMBER OF PARTNER YFS1USNU EQU 0 GIVEN USER IDENTIFICATION NOT UNIQUE YFSIPRNU EQU 181 GIVEN PROFILE NAME NOT UNIQUE YFSILENP EQU 200 SUCCESS AND FAILURE PROC TOO LONG U24845 J Z135 4 76 99 Return information an error displays ASSEMBLER programming interface for YFSIPFLO EQU 206 PARTIALLY QUALIFIED FILENAME TOO LONG SYSTEM ERROR YFSISERR 255 SYSTEM ERROR BYTE2 DEFINES THE ERRONEOUS PARAMETER YFS2PAR EQU 1 INVALID ADDRESS OF PARAMETER LIST YFS2NAME EQU 2 AME YFS2NNAM EQU 3 EWNAME YFS20W EQU 4 OWNER YFS2USER EQU 5 USER YFS2SEL EQU 6 SELECT YFS2PASS EQU 7 PASSWORD YFS2NPA EQU 8
82. T ra qx 1 2 m m co m 5 U24845 J Z135 4 76 35 ASSEMBLER programming interface for openFT The operands AFPASS ATAD and AUPASS are used to set the coding type of the file password FPASS the transfer admission TAD and the user password UPASS The operands AFPASS ATAD and AUPASS can have the value GRAPHIC or OCTET With GRAPHIC the entry for the corresponding operand is interpreted as a printable character and will be converted during transfer to a system which does not use EBCDIC With OCTET it is interpreted as binary information and will not be converted U24845 J Z135 4 76 NMOD 36 ASSEMBLER programming interface for openFT NMOD Format of the macro NMOD DSECT format Operand 1 Operation NMOD Name name The prefix xxx default value YNU may be up to 3 characters long It must generate names which are permitted in ASSEMBLER The following ASSEMBLER instructions are generated FHDR MF C amp P A PARTNER SY STEM LCPARTNER SYSTEM LCFILE NAME ACFILE NAME ACFILE PASSWORD LCFILE PASSWORD LCTRANSFER ADMISSION ACTRANSFER ADMISSION ACUSER IDENTIFICATION LCUSER IDENTIFICATION LCUSER ACCOUNT ACUSER ACCOUNT S S ACUSER PASSWORD LCUSER PASSWORD L NAME A NEW NAME ACSTORAGE ACCOUNT LCSTORAGE ACCOUNT LCLEGAL QUALIFICATION ACLEGAL QUALIFI
83. T xxxHADS FHDR MF C amp P xxxUSER DS A XXXUSERL DS XL2 xxxPASSL DS XL2 xxxPASS DS A XXXNPA DS A xxxNPAL DS XL2 XL XL XL XL XL XL XL XL XL XL XL1 XL3 5 1 xxxIUSER DS xxxIPASS DS 5 DS xxxINPA DS xxxPRIV DS XXXMOSND DS xxxMORCV DS xxxMISND DS xxxMIRCV DS xxxMIPRC DS VRS MADS2 DS xxxRESRV DS xxxFTADL EQU MODFTADS 74 ASSEMBLER programming interface for openFT AC MODFTADS The meaning of the parameters in the macro MODFTADS corresponds to the meaning of the parameters in the command MODIFY FT ADMISSION SET as shown in the following 75 table Operand Address Meaning in command Lformat field D format USER USER USER IDENTIFICATION PASS PASS PASSWORD NEWPASS NEW PASSWORD PRIV PRIV PRIVILEGED MAXLV MAX LEVELS MAXOSND MOSND OUTBOUND SEND in the structure MAX LEVELS MAXORCV MORCV OUTBOUND RECEIVE in the structure MAX LEVELS MAXISND MISND INBOUND SEND in the structure MAX LEVELS MAXIRCV MIRCV INBOUND RECEIVE in the structure MAX LEVELS MAXIPRC MIPRC INBOUND PROCESSING in the structure MAX LEVELS MAXIMAN INBOUND MANAGEMENT in the structure MAX LEVELS U24845 J Z135 4 76 MODFTPRF ASSEMBLER programming interface for openFT AC 2 27 MODFTPRF Modify admission profile The macro MODFTPRF can be used to m
84. T address field SOUT stands for OUTPUT SYSOUT and SLST stands for OUTPUT SYSLST the command SOUTC SLSTC stand for their respective output in CSV format LAYOUT CSV For the other two values output is in standard Meaning in command USER IDENTIFICATION OUTPUT LAYOUT 87 Address field D format USER OUTPT OUTPT format LAYOUT STD Operand L format USER OUTPUT LAYOUT U24845 J Z135 4 76 SHWFTENV ASSEMBLER programming interface for openFT AC 2 2 9 SHWFTENV List admission sets and profiles You use the SHWFTENV macro to display or output previously logged FTAC admission sets or admission profiles The output is sent to SYSOUT or SYSLST To this end you can also use the EXPFTENV macro to output the FTAC admission sets or admission profiles to a file page 69 The functionality corresponds to that of the command SHOW FTAC ENVIRONMENT Format of the macro SHWFTENV LIST format default format Name Operation Operand Name SHWFTENV MF L1 FILE adr ALL L USER 1 adr100 C SELECT JALL ALL NAME 4 1 us adr100 L YES ADMS 11 C INO 10 1 1 T C IN L ALL L SYSOUT 00 1 C JSYSLST C LAYOUT JSTD 1 CSV 88 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT AC SHWFTENV Format of the macro SHWFTENV DSECT for
85. TAC D2RES D2TRAT m m 202 gt lt mn BCODE1 2 KKK lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt lt x lt lt lt lt lt gt 6 gt lt lt lt lt YNDEQU 50 ASSEMBLER programming interface for openFT Return codes EQU 0 NO ERROR EQU 1 PERMANENT ERROR EQU 32 SYSTEM ERROR EQU 64 REPARABLE ERROR EQU 128 SHORTAGE OF RESOURCES DEFINES THE WARNINGS YNDCO YNDCPERR YNDCSERR YNDCRERR YNDCSHRT SUBCODE2 2 1 10 Return codes for NCOPY NCAN and NSTAT The following return signals are arranged according to error class The error class can be determined by the third and fourth bytes of the return codes This field can have the following values Meaning No error Error however the program can successfully repeat the same call later without further intervention Error however the program can repeat the call unchanged on intervention by a terminal user or operator Error which does not belong to the classes 1 2 FFFF System wide conventional error reparable or irreparable 51 Value X 0000 X 0001 0002 X 0003 FFFF U24845 J Z135 4 76 ASSEMBLER programming interface for openFT Meaning No error the macro NCOPY or NCAN was saved in the request file of th
86. TETT U24845 J Z135 4 76 31 NLSHOW ASSEMBLER programming interface for openFT 2 1 5 NLSHOW Display local FT file attributes The macro NLSHOW can be used to view the FTAM attributes of a file in the local system The functionality corresponds to that of the command SHOW FILE FT ATTRIBUTES Format of the macro NLSHOW LIST format default format Name Operation Operand name NLSHOW 1 1 FILE adr STD 0 4 JALL ONLY SYSOUT OUTPUT L SYSLST NONE 501 5 1 adr LAYOUT L CSV U24845 J Z135 4 76 32 ASSEMBLER programming interface for openFT NLSHOW Format of the macro NLSHOW DSECT format Operand MF D xxx Operation NLSHOW Name name The prefix xxx default value YNH may be up to 3 characters long It must generate names which are permitted in ASSEMBLER The following ASSEMBLER instructions are amp P ACFILE NAME LCFILE NAME LCMESSAGE ACMESSAGE OUTPUT SOUT SLST SOUTC SLSTC INFORMATION STD ONLY ALL RESERVED NLSH generated XXXNLSH DSECT XXxHLSH FHDR MF C xxxFILE DS A xxxFILEL DS XL2 xxxMSGL DS XL2 xxxMSG DS A XxxOUTPT DS XL1 xxxINFO DS 11 xxxRESRV DS XL2 xxxLNLS EQU XXX Meaning of the fields The meaning of the parameters in the macro correspond to the meaning of the paramete
87. TRS XXXIPAC DS XL USER ACC SAME NOTRS XXXIPPA DS XL USER PASSWORD SAME NOTRS NONE XXXISUC DS XL SUCCESS PROCESSING NOTRS NONE EXP XXXIFAI DS XL FAILURE PROCESSING NOTRS NONE EXP XXXWRMOD DS XLI WRITE MODE NOTRS NEW RPL EXT XXXCHIP DS CHIP PROFILE NO YES U24845 J Z135 4 76 63 ASSEMBLER programming interface for openFT AC EFIX EFIX FFIX FFIX EFIX EFIX FFIX FFIX EAD LFPRO YES SP IX NOTRS IX NOTRS IX NOTRS IX NOTRS NO NOTRS U24845 J Z135 4 76 A EXPIRATION DATE L EXPIRATION DATE L SUCCESS PROCESSING PR A SUCCESS PROCESSING PR A SUCCESS PROCESSING SU L SUCCESS PROCESSING SU L FAILURE PROCESSING PR A FAILURE PROCESSING PR A FAILURE PROCESSING SU LCFAILURE PROCESSING SU LCTEXT ACTEXT ACA PARTNER NAME LCA PARTNER NAME FT FUNCTION NOTRS LTRANF 4 LMODA LR INBOUND MANAGEMENT NO TEXT NONE TRANSFER ADMISSION NOT VALIDATE YES NO USAGE PRIV PUBL EXPIRATION DATE NOTRS SUCCESS PROCESSING PREF SUCCESS PROCESSING SUFF FAILURE PROCESSING PREF FAILURE PROCESSING SUFF DATA ENCRYPTION YES XL2 XL2 XL2 XL2 XL2 XL2 50A 50XL2 XL2 XL XL XL XL XL XL XL XL XL XL XL1 VRS_CPRF2 XXXEXDA DS XXXEXDAL DS XXXPSUCL DS XXXPSUC DS XXXXSUC DS XXXXSUCL DS XXXPFAIL DS XXXPFAI DS XXXXFAI DS
88. TTRIBUTES TTRIBUTES LE gt T H gt T MED MATION LEVEL RONOUS MESSAGE HRONOUS MESSAGE GE INSERT G RECORD ID R T ATOR D TYPE NCTION FUNCTION VED PARAMETER FER ATTRIBUTES FINES THE ERROR CLASS U24845 J Z135 4 76 ACT R ACT I R ACT E ACT E ACT RE ACT C ACT D I INVAL PARTN FILEN DIREC MANAG TRANS TRANS TRANS TRANS NEW F AVAIL STORA CHARA RECOR RECOR EGAL UR ERMI ER ER R R gt am Wa 1 R R R TPU FOR YNCH 55 LOGGI OWNER DATE UMBE ELEC T FU ESER RANS n T2090 1 2 SNS Q Q O EQU T C K K OO 4 m m rJm m rm m m m rm rmm rm rmn rm rm rm rm rm rmn rmn C T r C DEFIN D2PAR D2PART D2FILE D2DIR D2MPW D2TAD D2TUID D2TACC D2TPW D2NNAM D2AVLB D2STOR D2CSET D2RFMT D2RLEN D2LEGQ D2FFSZ D2PACT D2PRDF D2PINS D2PRPF D2P D2PERA D2PRDA D2PCHA D2PDEF D20UTP D2INFO D2SY D2ASY D2MS D2LOGI D20WNR D2DATE D2NMBR D2SEL D2INIT D2RTYP D2FTFU D2F
89. USER PASSWORD FIL ACC REA INS REP EXT ERASE DATA UNIT REA CHA DEL YP YP YP XL XL XL XL XL XL XL XL XL XL XL XL XL xxx NMOD DS DS DS DS DS DS DS DS DS DS DS DS DS EQU AIL CES EAF SU EPF XTF RAU EAA HNA ELF AS AD PA XXXAV XXXAC XXXAR XXXAI XXXAR XXXAR XXXAC XXxAD XXXAT XXXAU XXxLNMO NMOD 38 ASSEMBLER programming interface for openFT NMOD Meaning of the fields The meaning of the parameters in the macro correspond to the meaning of the parameters inthe command MODIFY REMOTE FILE ATTRIBUTES Please refer to the corresponding command description in the user manual Operand Address Meaning in command Lformat field D format PARTNER PART PARTNER NAME FILE FILE FILE NAME FPASS FPAS PASSWORD TAD TAD TRANSFER ADMISSION UUSER UUS USER IDENTIFICATION UACC UAC ACCOUNT UPASS UPA PASSWORD NEWNAME NNAM NEW NAME FAVAIL AVAIL FILE AVAILABILITY STORACC STAC STORAGE ACCOUNT FFSIZE FFS FUTURE FILE SIZE LQUAL LQF LEGAL QUALIFICATION MSGINS MSG Return value of the call AFPASS APAS Coding of the FPASS GRAPHIC or OCTET ATAD ATAD Coding of the TAD GRAPHIC or OCTET AUPASS AUPA Coding of the UPASS corresponding to GRAPHIC or OCTET ACCMOD ACCES ACCESS MODE AREADF AREAF READ FILE AINSU AINSU INSERT DATA UNIT AREPLF AREPF REPLACE
90. VER STD BEI BS2 LOCAL XXXSAME EQU X 0 RELVER SAME BEI BS2 REMOTE xxxSTDRE EQU Xe RELVER STD BEI BS2 REMOTE XXXNONE EQU X 0 RELVER NONE BEI ANY XXXNSPEC EQU X FF RFIL LPUS RPUS NOT SPECIFIED XXxCNES EQU 01 COMPRESSION NONE ENCRYPTION YES XxxCBES EQU X 81 COMPRESSION BYTE ENCRYPTION YES Ifan operand is not to be assigned the value of the address field and the length field must be set to binary zero If the value NOT SPECIFIED is entered for the parameter FILE NAME of the remote system then the value set in the equate xxxNSPEC is to be written in the value field for the filename length 1 If this value is entered forthe PROCESSING ADMISSION ol the local or remote system then it is to be written in the value field for the corresponding USER ID 20 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT NCOPY Meaning of the fields The macro NCOPY offers you the same options as the command TRANSFER FILE NCOPY Please refer to the command description The following table shows how the parameters in the macro NCOPY correspond to the command operands Meaning in command TRANSFER DIRECTION PARTNER NAME FILE NAME in LOCAL parameter LIBRARY in LOCAL parameter ELEMENT in LOCAL parameter VERSION in LOCAL parameter TYPE in LOCAL parameter FILE PASSWORD in LOCAL parameter USER IDENTIFICATION in local TRANSFER ADMISSION ACCOUNT in local TRANSFER ADM
91. VER LELTYP JVNAME JVPASS INIT STATE INFO OUTPUT LAYOUT NSTAT 46 ASSEMBLER programming interface for openFT NSTAT If you do not enter anything in the fields for the OWNER ID your own user ID will be used as the value this corresponds to the default entry OWN at the command interface If you intentionally fill the OWNER ID field with blanks then all user IDs will be used this corre sponds to the entry ALL at the command interface U24845 J Z135 4 76 47 ASSEMBLER programming interface for openFT Set YNDEQU constants for the openFT macros The macro YNDEQU is used to generate the constants for the openFT macros Call the macro as follows Operand Operation YNDEQU Name No operands are used in the macro call The equates are generated with the default prefix YND the form in which they are used internally by other openFT macros 0 VALUE SPECIFIED PARAMETER 0 PARAMETER NONE OT SPECIFIED NOTSP REQUEST TO LOCAL SYSTEM DIRECTORY DIR UNCHANGED UNCHG FILE NAME UNCHANGED SAME DELETE ATTRIBUTE 0 SET ATTRIBUTE YES TYPE OF STRING VALUE GRAPHIC L GRAPH OF STRING VALUE OCTET C JOCTET FILE BINARY BIN FILE TEXT L CHAR CODE ISO 646 VISIB CODE ISO 646 CONTR CHARS 5 CODE ISO 8859 DEFAULT C JGRSTR CODE 150 8859
92. W UACC FIRST NOTSP adr OWN L UPASS NONE 111 NOTSP adr REMOTE C INIT 415110 L BOTH L NOTRS 1 L FROM TRANS am NOTRS PARTNER adrl adr50 NOTRS integer0 100 NOTRS FILE PFXFIL adr adr NOTRS L LIB PFXLIB adr adr 59 Operation ASSEMBLER programming interface for openFT AC Name U24845 J Z135 4 76 ASSEMBLER programming interface for openFT AC Operand NOTRS PFXEL adr adr STD ELVER 11 adr NOTRS L ELTYP 11 adr NOTRS 55 4 1 adr JSAME PAD L NOTRS SA L PUSER 45 adr m m 55 111 m m NOIRS 50 0 4 NONE adr NOTRS 0 1 adr NOTRS C SUXSUCC 11 adr NOTRS L FAIL 4 NONE adr NOTRS 1 L PFXFAIL adr U24845 J Z135 4 76 Operation Name CREFTPRF 60 CREFTPRF ASSEMBLER programming interface for openFT AC Operand NOTRS L SUXFAIL dd adr L NOTRS L WRITE L JNEW 1 L RPL L EXT NOTRS CETRANSF 1 L FTFUNC C MODATT READDIR FILEPROC NONE TEXT adr L INO L CHIP L YES YES L NOTRS 1 L NO 61 Operation Name U24845 J Z135 4 76
93. XL2 DS XL DS XL DS XL DS XL DS XL DS XL DS XL DS XL DS XL DS XL xxxNSHW xxxHSHW XXXPART XXXPARTL xxxFILE xxxDIR XXxDIRL 5 xxxTAD xxxTADL 5 XXXUAC XXXUACL XXXUPAL XXXUPA XXXMSG xxxMSGL 5 XXXIDIR XXXIFPAS XxxITAD XXXIUPA XxxOUTPT XXX INFO 5 XXXATAD NSHOW 42 ASSEMBLER programming interface for openFT NSHOW XL1 TYPE USER PASSWORD GRAPH OCTET XL3 RESERVED NSHW EQU XXxAUPA DS XXXRESRV DS XXXLNSH Meaning of the fields The meaning of the parameters in the macro correspond to the meaning of the parameters in the command SHOW REMOTE FILE ATTRIBUTES Please refer to the corresponding command description in the user manual In the OUTPT address field SOUT stands for OUTPUT SYSOUT in the command and SLST stands for OUTPUT SYSLST SOUTC and SLSTC stand for their respective outputs in CSV format LAYOUT CSV For the other two values output is in the standard format LAYOUT STD Meaning in command PARTNER NAME FILE NAME DIRECTORY PASSWORD TRANSFER ADMISSION USER IDENTIFICATION in the structure TRANSFER ADMISSION ACCOUNT in the structure TRANSFER ADMISSION PASSWORD in the structure TRANSFER ADMISSION INFORMATION OUTPUT LAYOUT Return value of the call Coding of the FPASS GRAPHIC or
94. XUACL XXXUPAL XXXUPA XXXPART XXXPARTL XXXFILL XXXFIL XXXEL XXXELL XXXEVL XXXEV XXXETY XXXETYL XXXFPAL XXXFPA XXXPUS XXXPUSL XXXPACL XXXPAC XXXPPA XXXPPAL XXXSUCL XXXSUC XXXFAI XXXFAIL CREFTPRF 62 ASSEMBLER programming interface for openFT AC CREFTPRF BYTE FIELDS FOR ENTERING KEYWORDS XXXIPASS DS XLI PASSWORD NONE XXXPRIV DS XL PRIVILEGED NO YES XXXILV DS IGNORE MAX LEVELS NO YES XXXIOSND DS XL OUTBOUND SEND NO YES XXXIORCV DS XLI OUTBOUND RECEIVE NO YES XXXIISND DS XLI INBOUND SEND NO YES XXXIIRCV DS XLI INBOUND RECEIVE NO YES XXXIIPRC DS XL INBOUND PROCESSING NO YES XXXUAD DS USER ADMISSION OWN XXXIUUS DS XLI USER ID OW XXXIUAC DS XL USER ACC OWN FIRST NOTSP XXXIUPA DS XLI USER PASSWORD OWN NONE NOTSP XXXINIT DS INITIATOR REM LOC BOTH XXXTRDIR DS XL TRANSFER DIRECTION FROM TO NOTRS XXXIPART DS XL PARTNER NAME NOTRS XXXMPLV DS XL AX PARTNER LEVEL NOTRS 0 100 XXXIFIL DS XL FILE NAME NOTRS EXP LIBEL XXXILIB DS XL LIBRARY NAME NOTRS EXP XXXIEL DS XLI ELEMENT NAME NOTRS EXP XXXIEV DS ELEMENT VERSION STD XXXIETY DS XL ELEMENT TYPE NOTRS XXXIFPA DS XL FILE PASSWORD NOTRS NONE XXXPAD DS PROCESSING ADMISSION SAME NOTRS XXXIPUS DS XLI USER ID SAME NO
95. XXPFAIL DS XL2 LCFAILURE PROCESS ING PREF IX XXXPFAI DS A ACFAILURE PROCESSING PREFIX XXXXFAI DS A ACFAILURE PROCESS ING SUFFIX XXXXFAIL DS XL2 LCFAILURE PROCESSING SUFFIX XXXTEXTL DS XL2 LCTEXT XXXTEXT DS A A TEXT XXXAPRTL DS 50A ACA PARTNER NAME XXXAPRT DS 50 12 LCA PARTNER NAME XXXFTFUN DS XL2 FT FUNCTION UNCHG NOTRS 2 XXXIIMAN DS XLI INBOUND MANAGEMENT UNCHG NO YES DS XLI TEXT UNCHG NONE XXXVALID DS XLI VALIDATE UNCHG YES NO XXXUSAGE DS USAGE UNCHG PRIV PUBL XXXIEXDA DS XLI EXPIRATION DATE UNCHG NOTRS XXXIPSUC DS SUCCESS PROCESSING PREFIX UNCHG NOTRS XXXIXSUC DS SUCCESS PROCESSING SUFFIX UNCHG NOTRS XXXIPFAI DS XL FAILURE PROCESSING PREFIX UNCHG NOTRS XXXIXFAI DS XL FAILURE PROCESSING SUFFIX UNCHG NOTRS VRS_MPRF4 XXXDENC DS XLI DATA ENCRYPTION UNCHG NOTRS YES NO XXXFTPRL EQU U24845 J Z135 4 76 83 ASSEMBLER programming interface for openFT AC The meaning of the parameters in the macro MODFTPRF corresponds to the meaning of the parameters in the command MODIFY FT PROFILE as shown in the following table Meaning in command NAME PASSWORD SELECT PARAMETER TRANSFER ADMISSION in the structure SELECT PARAMETER OWNER IDENTIFICATION in the structure SELECT PARAMETER NEWNAME NEW TRANSFER ADMISSION VALID INVALID ON
96. are considered to be part of the operand and will be evaluated which will lead to syntax errors If an operand is not evaluated the value of the address field and the length field will be set to binary zero Macro with LIST format Name Operation Operand name lt macro gt MF L Operand The operand values are addressed using the symbolic addresses adr ASSEMBLER s implicit lengths of these fields must correspond exactly to the length of the value field no fillers If for example the operand PARTNER has the VALUE C ABAB it cannot be entered in the form adr DC 2C AB since in this case the implicit length of the fields equals 2 instead of 4 For this format the user need not worry about the HEADER since it is automatically generated internally Macro with default format Name Operation Operand name lt macro gt Operand Ifthe MF parameter is missing for the macro for NCAN NCOPY and NSTAT an operand list like the one for MF L is generated For all others the address is also loaded in register 1 and the macro is executed as in MF E Please note that macros with default format are not reenterable 8 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT Macros for openFT Information on value assignments The following rules hold for the programming interface for values which are to be input into the command interface in quotation marks Operand Value at the Value
97. at the programming interface command interface DC constant NCOPY NSTAT Other macros File JV password C C ABC C ABC X C1C2C3 C X C1C2C3 X C1C2C3 123 C 123 F123 Logon password C ABC C ABC X C1C2C3 C X C1C2C3 X C1C2C3 FT transfer ABCDEFGH admission like C abcdefgh C abcdefgh C C abcdefgh C abcdefgh X 8182838485868788 C X 8182838485868788 X 8182838485868788 Other operands Cis 1 When using the ANY syntax RSYNTAX ANY both input variants are usually possible in NCOPY with the exception of F 123 both the one in column NCAN NCOPY and NSTAT and the one named in the column other macros For partners with MVS or OS 390 passwords do not contain any quotation marks The filename will however if it contains the user ID If FTAC functionality is used the user can define a transfer admission for FT requests which must be entered to work with an admission profile Please note that any transfer admission which is entered alphanumerically at the command interface must be entered in lower case letters at the programming interface If parameters are not explicitly specified openFT will assign the same default values as for the commands Exception 1 For fields which identify FTAC security level the value 0 stands for the security level 0 In other words it blocks that function fields xxxMOSND xxxMORCV xxxMISND xxxMIRCV
98. create 58 delete 67 export 69 import 71 88 modify 76 admission set export 69 import 71 list 88 output 86 ASSEMBLER 12 26 30 33 37 42 ASSEMBLER interface openFT AC 57 attribute display 32 display remote file 40 modify remote file 34 CALL NCANCEL 104 NCOPY 108 NDEL 117 NLMOD 122 NLSHOW 128 NMOD 133 NSHOW 139 NSTATUS 144 CALL macro 103 cancel file transfer 11 CANCEL FILE TRANSFER 11 COBOL macro 3 U24845 J Z135 4 76 file transfer cancel 1 file transfer request cancel 11 104 information 44 file transfer status query 44 144 FT request delete 11 FTAC macros 57 programming interface 57 FT AC function Cobol interface 114 FTAM attribute modification of in local file 28 122 modify local 28 FTAM partner 23 FT NCANCEL LIST 104 FT NCOPY LIST 108 FT NDEL LIST 117 FT NLMOD LIST 122 FT NLSHOW LIST 128 FT NMOD LIST 133 FT NSHOW LIST 139 FT NSTATUS LIST 144 FT RETURN CODE 147 FT RETURN INFO 147 IMPFTENV 71 72 DSECT format 72 LIST format 71 import admission profile 1 admission set 1 IMPORT FTAC ENVIRONMENT 72 IMPFTENV 71 information on file transfer requests 44 inverted commas 136 L layout of the operand lists 7 link name 114 125 130 list U24845 J Z135 4 76 Index MODFTADS 74 MODFTPRF 77 81 NCAN 12 NCOPY 17 NDEL 26 NLMOD 30 NLSHOW 3 NMOD 37 NSHOW 42 NSTAT 45 SHWFTADS 86 SHWFTENV 89 SHWFTPRF 91 E errorclass 149 errorcode 153 err
99. dmission profile the TRANSFER ADMISSION in the command field REMOTE SYNTAX controls the syntax check of the entries for the remote system It corresponds to the entry which you can make in front of the parentheses at the beginning of the REMOTE PARAMETER in the command If this field is also assigned the value LOW VALUE or 3 openFT runs a syntax check of these specifica tions according to the BS2000 or MVS syntax rules The options for the field START TIME correspond to those of the command operand START EARLIEST DATE sets the earliest date and EARLIEST TIME sets the earliest time for the start of the file transfer CANCEL PARAMETER corresponds to the command operand CANCEL You can use CANCEL DESIRED to cancel your request while CANCEL DATE and CANCEL TIME allow you to specify the required time and date of cancellation 114 U24845 J Z135 4 76 COBOL programming interface CALL NCOPY example Example NCOPY EXAMPLE SUBMISSION OF A FILE TRANSFER REQUEST TRANSFER FILE PARTNER VAROO1 TRANS TO of LOC FILE LOCFILE TRANS USERID ACCOUNT PASSWORD REM FILE REMFILE TRANS USERID ACCOUNT PASSW
100. e available openFT also supports the FTAM file transfer protocol File Transfer Access and Management standardized by ISO International Organization for Standardization This therefore makes it possible to interconnect to systems of other manufacturers whose FT products also support this standard U24845 J Z135 4 76 1 Target group and objectives of this manual Introduction With the integrated FTAC function openF T offers extended admission and access protection FTAC stands for File Transfer Access Control openFT allows the use of TCP IP ISO TP0 2 ISO TP4 SNA and NEA as transport protocols 1 2 Target group and objectives of this manual This manual is aimed at users who wish to program FT applications with the help of the openFT and openFT AC programming interfaces To understand this manual it is necessary to have a knowledge of the BS2000 OSD operating system as well as of the ASSEMBLER and COBOL programming languages The programming manual is intended as a supplement to the user manual In view of the provided information and references to command descriptions these two manuals should always be used in conjunction 1 3 Concept of the openFT for BS2000 OSD manual The complete description of openFT for BS2000 and its optional components openFT FTAM for BS2000 and openFT AC for BS2000 is contained in three manuals In addition to this Programmer Reference Guide there is also a User Guide and a System Administrat
101. e local system Follow up processing in the local system was not executed since erroneous specifications were made Follow up processing was not executed since specifications were missing The FT request was only started with normal priority The macro cannot be accepted executed since the send or receive file is protected by another process against simultaneous updating The macro cannot be accepted since the maximum permissible limit for file transfer requests has been exceeded The macro cannot be accepted executed since the specifications in the TRANSFER ADMISSION are erroneous The macro cannot be accepted executed since the owner of the send or receive file is not defined in the corresponding system or since the file owner and the user who wishes to create a receive file do not correspond The macro cannot be accepted since the remote system is not in the network description of the local system The macro cannot be accepted executed since the password for the send or receive file is missing or wrong The macro cannot be accepted executed since the send or receive file does not allow multiple users The macro cannot be accepted executed since the send or receive file only permits certain access operations e g read only The macro cannot be accepted executed since the protection time for the overwriting of the receive file has not expired The macro cannot be further executed since the space which the user
102. e oder nicht mehr im Vertrieb befindliche Produktversion Bitte beachten Sie dass alle Firmenbez ge und Copyrights im vorliegenden Dokument rechtlich auf Fujitsu Technology Solutions bergegangen sind Kontakt und Supportadressen werden nun von Fujitsu Technology Solutions angeboten und haben die Form ts fujitsu com Die Internetseiten von Fujitsu Technology Solutions finden Sie unter http de ts fujitsu com und unter Attp manuals ts fujitsu com finden Sie die Benutzerdokumentation Copyright Fujitsu Technology Solutions 2009
103. e the file expansion for transparent transfer is not permitted The CALL macro was not executed because the request has not yet been cancelled with FORCE CANCELLATION NO The macro cannot be accepted because the local FT system is currently unavailable The macro cannot be accepted because at least one operand is missing The macro cannot be accepted because it contains a syntax error unlike operand missing or keyword unknown Such syntax errors include value assignments outside the permitted value range wrong operand separators wrong characters assigned to the value or partially qualified filenames The macro cannot be accepted executed because the FT system only transfers individual data generations The CALL macro cannot be accepted because the send file is not in the catalog or on a data carrier of the local system The CALL macro cannot be executed because the send or receive file is no longer in the catalog or on a data carrier of the corresponding system U24845 J Z135 4 76 SUB RETURN CODE 8 10 11 12 13 14 15 20 129 Return codes MAIN RETURN CODE 2 150 Return codes Meaning The CALL macro cannot be accepted executed because the send file is empty The CALL macro cannot be accepted because no requests could be found The CALL macro cannot be accepted executed because an existing receive file ca
104. ed XXXNCA DSECT XXXHCA FHDR MF C amp P xxxTRID DS ACTRANSFER ID xxxTRIDL DS XL2 LCTRANSFER ID XXXLNCA1 EQU xxxNCAN L MACRO VERSION 1 XXxSOWNL DS XL2 10 xxxSOW DS AL4 ACOWNER ID DS AL4 A PARTNER SYSTEM xxxPARTL DS XL2 L PARTNER SYSTEM xxxLFILL DS XL2 LCFILE NAME xxxLFIL DS AL4 ACFILE NAME XXXLLIB DS AL4 A LIBRARY NAME xxxLLIBL DS XL2 L LIBRARY NAME xxxLELL DS XL2 DS AL4 ACELEMENT NAME XXXLEV DS AL4 ACELEMENT VERSION xxxLEVL DS XL2 LCELEMENT VERSION xxxLETYL DS XL2 LCELEMENT TYPE xxxLETY DS AL4 ACELEMENT TYPE XXXJVNM DS AL4 AC JV NAME XXXJVNML DS XL2 LCJV NAME XxxJVPSL DS XL2 LCJV PASSWORD XxxJVPS DS AL4 AC JV PASSWORD XxxINIT DS XL1 INITIATOR xxxIBOTH EQU 0 INITIATOR BOTH XxxILOC EQU 192 INITIATOR LOCAL xxxIREM EQU 128 INITIATOR REMOTE amp P LNCA2 EQU amp NCAN L MACRO VERSION 2 amp P FORCE DS 1 FORCE CANCELLATION XXXFNO EQU 00 FORCE NO xxxFYES EQU X 01 FORCE YES XXxLNCA EQU XxxNCAN 12 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT NCAN Meaning of the fields The macro NCAN offers you the same options as the command CANCEL FILE TRANSFER NCANCEL Please refer to the command description The following table shows how the parameters in the macro NCAN correspond to the command operands Operand Address Meaning in command
105. ers long It must generate names which are permitted in ASSEMBLER The following ASSEMBLER instructions are generated XXXNSTAT DSECT 5 FHDR MF C amp P XxxTRID DS A ACTRANSFER ID XXXTRIDL DS XL2 L TRANSFER ID XXxSOWNL DS XL2 LCOWNER ID xxx SOW DS AL4 ACOWNER ID xxxPART DS AL4 ACPARTNER SYSTEM XXXPARTL DS XL2 L PARTNER SYSTEM xxxLFILL DS XL2 LCFILE NAME XxxLFIL DS AL4 FILE NAME XXXLLIB DS AL4 ACLIBRARY NAME xxxLLIBL DS XL2 LCLIBRARY NAME XXXLELL DS XL2 CELEMENT NAME XXXLE DS AL4 ACELEMENT NAME XxxLE DS AL4 ACELEMENT VERSION xxxLEVL DS XL2 LCELEMENT VERSION xxxLETYL DS XL2 LCELEMENT TYPE xxxLETY DS AL4 ACELEMENT TYPE XXXJVNM DS AL4 ACJV NAME XXXJVNML DS XL2 LCJV NAME XxxJVPSL DS XL2 LCJV PASSWORD XxxJVPS DS AL4 AC JV PASSWORD XXxINIT DS XL1 INITIATOR 5 DS XL TRANSFER STATUS XXXINFO DS XL INFORMATION xxxOUTPT DS XL OUTPUT LAYOUT xxxLNST EQU 5 xxxIBOTH EQU 0 ITIATOR BOTH xxxILOC EQU 192 ITIATOR LOCAL XxxIREM EQU 128 ITIATOR REMOTE XXXSTAL EQU X 00 TRANSFER STATUS ALL XXxSTSU EQU 01 TRANSFER STATUS SUSP XXXSTLO EQU X 02 TRANSFER STATUS LOCK XXXSTWA EQU X 03 TRANSFER STATUS WAIT U24845 J Z135 4 76 45 ASSEMBLER programming interface for openFT CSV CSV TRANSFER STATUS ACT TRANSFE
106. eturn value of the call Coding of the FPASS GRAPHIC or OCTET Coding of the TAD GRAPHIC or OCTET Coding of the UPASS corresponding to GRAPHIC or OCTET 27 Address field D format PART FILE FPAS TAD UUS UAC UPA MSG APAS ATAD AUPA Operand L format PARTNER FILE FPASS TAD UUSER UACC UPASS MSGINS AFPASS ATAD AUPASS U24845 J Z135 4 76 ASSEMBLER programming interface for openFT NLMOD 2 1 4 NLMOD Modify local FT file attributes The macro NLMOD can be used to modify the FTAM attributes of a file in the local system and adapt the attributes to make them available for a file transfer or file management request The functionality corresponds to that of the command MODIFY FILE FT ATTRIBUTES Format of the macro NLMOD LIST format default format Operand 1 1 FILE adr NONE 55 1 adr C PERMACT LXJUNCHG INO PREADF 1 YES NO L PINSU 1 AN ES JNO PREPLF 1 YES JNO PEXTDF 1 EAVES JNO PERAU 1 YES JNO PREADA 1 1YES JNO PCHNGA 1 YES U24845 J Z135 4 76 Operation NLMOD Name name 28 ASSEMBLER programming interface for openFT NLMOD Name Operation Operand 11 L NO C PDELF SIYES L TRATTI L UNCHG L JUNCHG L DATA 4L J BIN ICHAR LX GRSTR L DCHRS L TGENE
107. f the command IMPORT FTAC ENVIRONMENT Format of the macro IMPFTENV LIST format default format Operand 11 FILE adr ALL USER 11 1 adr100 L SELECT ALL ALL NAME 4 NONE adr100 L YES ADMS 111 L NO 71 Operation IMPFTENV Name 1 U24845 J Z135 4 76 IMPFTENV ASSEMBLER programming interface for openFT AC Format of the macro IMPFTENV DSECT format DSECT XXxHENV FHDR MF C amp P xxxFILE DS A ACFILE xxxFILEL DS XL2 LCFILE XXXRES DS XL2 RESERVED xxxUSERL DS 100XL2 LCA USER XXXxUSER DS 100A ACA USER DS 100A ACA NAME XXxNAMEL DS 100XL2 LCA NAME BYTE FIELDS FOR ENTERING KEYWORDS xxxSEL DS SELECT ALL xxxIUSER DS USER ALL d XxxINAME 05 XL PROFIL NAME ALL NONE xxxADMS DS XL ADMISSION SET YES NO XxxFTENL EQU meaning of the parameters the macro IMPFTENV corresponds to the meaning of the parameters in the command IMPORT FTAC ENVIRONMENT as shown in the following table Operand Address Meaning in command Lformat field D format FILE FILE TO FILE USER USER USER IDENTIFICATION SELECT SEL SELECT PARAMETER NAME NAME PROFILE NAME in the structure SELECT PARAMETER ADMS ADMS ADMISSION SET in the structure SELECT PARAMETER 72 U24845 J Z135 4 76
108. for FT NLMOD LIST have the same names and functions as the corre sponding operands for the command MODIFY FILE FT ATTRIBUTES Please refer to the command descriptions in the user manual In addition to the options offered at the command interface the COBOL program allows you to address files and libraries by their linkname This is done using the field LINK NAME in the FT NLMOD LIST Only the link name or the filename library name not both may be specified A link name which is not assigned at execution time leads to the message FILE UNKNOWN FILE PASSWORD can be used to enter any necessary file passwords U24845 J Z135 4 76 125 CALL NLMOD example COBOL programming interface Example NLMOD EXAMPLE MODIFY FILE FT ATTRIBUTES FILE NAME LOCALFILE TRANSFER ATTRIBUTES DATA TYPE BINARY FROM A COBOL PROGRAM DENTIFICATION DIVISION PROGRAM ID TESTNLMOD VIRONMENT DIVISION ONFIGURATION SECTION
109. g interface for openFT AC Name Operation Operand UNCHG INIT 1 LOCAL BOTH UNCHG L TRANS FRO 1 TO NOTRS UNCHG PARTNER 4 NOTRS gt adr ADDPART adrl adr50 REMPART adrl adr50 J UNCHG MAXPLV 4 NOTRS integer0 100 UNCHG L FILE 4 NOTRS PFXFIL adr adr UNCHG 118 4 NOTRS PFXLIB adr adr UNCHG EL 4 NOTRS PFXEL adr adr STD ELVER 11 adr UNCHG L ELTYP 4 NOTRS 11 adr UNCHG 55 NOTRS NONE adr UNCHG 4 5 NOTRS SAME PUSER 4 NOTRS 79 adr U24845 J Z135 4 76 ASSEMBLER programming interface for openFT AC Operand SAME PACC 4 NOTRS adr SAME L PPASS NOTRS 11J NONE adr UNCHG L SUCC NOTRS NONE adr UNCHG L PFXSUCC 4 NOTRS adr UNCHG L SUXSUCC 4 NOTRS 11 adr UNCHG L FAIL NOTRS NONE adr UNCHG L PFXFAIL 4 NOTRS adr UNCHG L SUXFAIL 4 NOTRS 11 adr UNCHG NOTRS L WRITE 4 NEW RPL EXT L JUNCHG L NOTRS L FTFUNC 4 LTRANSF J 1 MODATT J READDIR FILEPROCI UNCHG 4 NONE 51 adr L NO L CHIP L YES U24845 J Z135 4 76 Operation Name MODFTPRF 80 ASSEMBLER programming interface for openFT AC MODFTPRF Operand L JUNCHG L DENC NOTRS YES L NO Operation Name Format of the macro MODFTPRF DSECT format ACNAME 1
110. g the NSHOW call The corresponding equates are defined in the macro YNDEQU with the prefix YNDW Exception If the maincode contains the value X FFFF the request could not be executed for reasons specified uniquely throughout the system The equates valid in this case for maincode subcode1 and subcode2 are defined in the macro FHDR which generates the default header 56 U24845 J Z135 4 76 Macros for openFT AC ASSEMBLER programming interface for openFT AC All functions of openFT AC for BS2000 can also be used via the ASSEMBLER interface The following section is divided into three sections e adescription of the macros anexample e adescription of the FTAC return codes There are ten ASSEMBLER macros to execute the functions of the ten FTAC commands To execute the desired function the corresponding macro can be called In addition there is an eleventh macro YFSEQU for the equates for the macro keywords Programs can operate in 24 or 31 bit mode Please note that addresses in 24 bit mode must command CREATE FT PROFILE DELETE FT PROFILE EXPORT FTAC ENVIRONMENT IMPORT FTAC ENVIRONMENT MODIFY FT ADMISSION SET MODIFY FT PROFILE SHOW FT ADMISSION SET SHOW FTAC ENVIRONMENT SHOW FT PROFILE SHOW FT RANGE 57 have an initial 0 Macros for openFT AC for BS2000 Macro Default Function Prefix CREFTPRF YCP create admission profile DELFTPRF YDP delete admission profile EXPFTENV YEE
111. gramming interface CALL NCOPY An NCOPY macro does not modify any values in the structure FT NCOPY LIST The fields are to be written with left justified characters and filled with right justified blanks default for the COBOL MOVE statement for character strings Fields which should not contain any specifications are to be assigned LOW VALUE If a parameter is not entered the default values are generated as in the TRANSFER FILE NCOPY command The version specification at the beginning of the structure FT NCOPY LIST serves to identify the COPY element and must not be overwritten With partners of the type MSP MVS REMOTE SYNTAX 3 the filename is to be set in quotation marks if it contains the user ID prefix All other values which should be set in quotation marks at the command interface do not have these quotation marks in the programming interface BS2000 passwords however must be input in the usual form including quotation marks For historical reasons the value is converted to lower case when USER DEF ADMISSION is specified without quotation marks If the USER DEF ADMISSION is to be kept in its original form it must be enclosed in quotation marks Passwords with integer values must be entered in binary form Specifications for the remote system which are taken by default from the specifications for the local system using SAME in the TRANSFER FILE NCOPY command must be explicitly entered at the COBOL interface U24
112. he name SYSRTC FT on the configuration user ID of the openFT instance standard SYSFJAM U24845 J Z135 4 76 103 CALL NCANCEL COBOL programming interface 3 1 1 NCANCEL Cancel file transfer request The macro CALL NCANCEL can be used to reverse FT requests or cancel the file transfer openFT for BS2000 deletes the FT requests from the FT request file which meet the selection criteria specified and cancels any related file transfers The functionality corre sponds to that of the command CANCEL FILE TRANSFER NCANCEL Macro The function can be called as follows CALL NCANCEL USING FT NCANCEL LIST FT RETURN INFO FT NCANCEL LIST The range FT NCANCEL LIST describes the parameter list for the NCANCEL macro FT NCANCEL LIST must be defined in the WORKING STORAGE SECTION and can be copied to there with the statement COPY FTNCAN OF linkname Before executing the macro you must fill the desired fields If a parameter is not specified or the default value is to be used this field must be assigned the value LOW VALUE FT NCANCEL LIST is defined as follows 01 FT NCANCEL LIST 02 FILLER PIC X 4 VALUE V800 02 USER PARAMETERS 05 TRANSFER ID PIC X 10 88 SELECT ALL VALUE LOW VALUE 05 SELECT PARAMETER 104 U24845 J Z135 4 76 CALL NCANCEL 105 LOW VALUE LOW VALUE h LOW VALUE LOW VALUE LOW VALUE LOW VALUE LOW VALUE L
113. ile attributes NMOD Modify remote file attributes NSHOW Display remote file attributes NSTATUS Query file transfer Return information and error displays Return codes for the CALL macros NCOPY NCANCEL and NSTAT Return code for the file management CALL macros Related publications Contents 3 1 3 1 1 3 1 2 3 1 3 3 1 4 3 1 5 3 1 6 m 1 7 3 1 8 3 1 9 3 1 9 1 91 8 2 openFT V9 0 for BS2000 OSD Program Interfaces Target group The manual addresses programmers who want to use the openFT program interfaces Contents It describes the Assembler and COBOL program interfaces of openFT plus the COBOL interfcace of the optional component openFT AC It also lists the return codes This manual is a supplement to the User Guide and can only be used in conjunction with it Edition January 2004 File ftbs2_pg pdf Copyright Fujitsu Siemens Computers GmbH 2004 All rights reserved Delivery subject to availability right of technical modifications reserved All hardware and software names used are trademarks of their respective manufacturers This manual was produced by cognitas Gesellschaft f r Technik Dokumentation mbH www cognitas de U24845 J Z135 4 76 Comments Suggestions Corrections U24845 J Z135 4 76 Fujitsu
114. ing interface Description of the data fields The parameters for FT NCANCEL LIST have the same name and functions as the corre sponding operands for the command CANCEL FILE TRANSFER NCANCEL Please refer to the corresponding command description in the user manual NCANCEL example EXAMPLE CANCELLATION OF A FILE TRANSFER REQUEST FROM A COBOL PROGRAM IDENTIFICATION DIVISION PROGRAM ID NCA DIVISION CONFIGURATION SECTION SPECIAL NAMES TERMINAL IS TERM DATA DIVISION WORKING STORAGE SECTION 77 MAIN RCODE STRING PIC ZZZ29 77 SUB RCODE STRING PIG ZZZ79 COPY FTNCAN OF FTLIB COPY FTRETC OF FTLIB PROCEDURE DIVISION CONTROL SECTION ST 01 TRANS ID READING DISPLAY PLEASE ENTER TRANSFER ID AT TERM ACCEPT TRANSFER ID IN FT NCANCEL LIST FROM TERM NCANCEL CALLING CALL NCANCEL USING FT NCANCEL LIST FT RETURN INFO RESULT HANDL ING IF O
115. ing macro calls the macro YNDEQU is to be incorporated into the program You must remove any value assignments EQU from the macro that have not been defined in the macro itself The macros are located in the file SYSLIB OPENFT 090 10 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT NCAN 2 1 1 NCAN Cancel file transfer request The macro NCAN can be used to reverse an FT request or cancel the file transfer openFT deletes the FT request which meets the specified selection criteria from the request file and cancels the corresponding file transfer The functionality corresponds to the command described in the user manual under CANCEL FILE TRANSFER NCANCEL Format of the macro NCAN LIST format default format Operand MF L 1 TRANS 1 SOWNER adr J PARTNER adr LFILE adr JVNAME adr JVPASS adr BOTH 1111 4 LOCAL REMOTE NO L FORCE 1 YES 11 Operation NCAN Name name U24845 J Z135 4 76 NCAN ASSEMBLER programming interface for openFT Format of the macro NCAN DSECT format Name Operation Operand NCAN 1 The prefix xxx default value YNA may be up to 3 characters long It must generate names which are permitted in ASSEMBLER The following ASSEMBLER instructions are generat
116. ins the value X FFFF the request could not be executed for reasons specified uniquely throughout the system The equates valid in this case for maincode subcode1 and subcode2 are defined in the macro FHDR which generates the default header U24845 J Z135 4 76 98 Return information an error displays ASSEMBLER programming interface for openFT AC The following information can be defined in the macro YFSEQU ERROR CODES YFSOK EQU 0 NO ERROR MAIN CODE VALUES PERMANENT ERRORS BYTE 1 DEFINES THE ERROR YFSLINVA EQU 1 INVALID ADDRESS OF PARAMETER VALUE YFSIRES EQU 2 PARAMETER RESERVED FOR FUTURE USE 251106 EQU 3 PARAMETER AND INDICATOR INCONSISTENT YFSIPINC EQU 4 INCONSISTENCY WITH OTHER PARAMETER REPARABLE ERRORS YFSIBUFS EQU 10 BUFFER TOO SMALL YFSIRNGE EQU 11 PARAMETER VALUE OUT OF RANGE YFS1YERR EQU 12 WRONG SYNTAX IN PARAMETER VALUE YFSIKEYV EQU 13 INVALID KEYWORD VALUE YFSIMAND EQU 14 MANDATORY PARAMETER MISSING SHORTAGE OF RESOURCES YFSISHRT EQU 70 SHORTAGE OF RESOURCES YFS1INAC EQU 71 FTAC NOT ACTIVE REPARABLE ERRORS YFSIPROF EQU 100 PROFILE ALREADY EXISTS YFSITAD EQU 101 TRANSFER ADMISSION ALREADY EXISTS YFSIFILE EQU 102 FILE NAME ALREADY EXISTS YFSIFINV EQU 103 INVALID FILE CONTENT PERMANENT ERRORS YFSIPASS EQU 150 USER NOT AUTH FOR FTAC COMMANDS YF
117. is to be used this field must be assigned the value LOW VALUE U24845 J Z135 4 76 108 CALL NCOPY 109 X 4 VALUE V900 5 LOW VALUE LOW VALUE m LOW VALUE LOW VALUE LOW VALUE LOW VALUE LOW VALUE HIGH VALUE LOW VALUE sas SER N VALUE VALUE VALUE VALUE VALUE VALUE VALUE VALUE VALUE VALUE VALUE VALUE VALUE X 1 X 8 X 221 X 8 X 56 X 64 X 8 X 24 X 11 X 500 X 500 X 67 X 8 X 40 X 35 X 8 X 40 X 35 X 1 COBOL programming interface FT NCOPY LIST is defined as follows PIC PIC 192 eo C2 C Cy 97 Cx 1 ULECU CI YY 115 01 02 FILLER 02 USER PARAMETERS 05 TRANSFER DIRECTION ECIFIED ECIFIED ECIFIED 5 ECIFIED FILE PASSWORD SUCCESS PROCESSING FAILURE PROCESSING DMISSION DMISSION D RD ECIFIED D RD 5 ACCOUNT 5 ACCOUNT 88 TO PARTNER 88 FROM PARTN 05 PARTNER NAME 05 LOCAL PARAMETE 0 FILE NAME 88 NOT SP 0 LINK NAME 88 NOT SP 0 LIBRARY 88 NOT SP 0 ELEME 88 0 TYP 88 NOT SP VERSIO 88 STD Sz em eco em 05 88 0 TRANSFER A 5 USER I 5 PASSWO 10 PROCESSING ADMISSION 88 NOT SP 5 USER I
118. mat DSECT XxxHENV FHDR MF C amp P xxxFILE DS A A FILE xxxFILEL DS XL2 LCFILE XXXRES DS XL2 RESERVED xxxUSERL DS 100XL2 LCA USER XXXxUSER DS 100A ACA USER DS 100A ACA NAME XXxNAMEL DS 100XL2 LCA NAME BYTE FIELDS FOR ENTERING KEYWORDS DS XL1 xxxIUSER DS XL1 XXxINAME DS XL1 SELECT ALL U P xxxADMS DS XL1 A I 0 R EL SE ROFIL NAME ALL NONE DMISSION SET YES NO FORMATION ONLY ALL TPUT LAYOUT SOUT SLST SOUTC SLSTC ESERVED XXXINFO DS 11 XxxOUTPT DS XL1 XxxRESRV DS XL2 XxxFTENL EQU meaning of the parameters the macro SHWFTENV corresponds to the meaning of the parameters in the command SHOW FTAC ENVIRONMENT as shown in the following table In the OUTPT address field SOUT stands for OUTPUT SYSOUT and SLST stands for OUTPUT SYSLST the command SOUTC SLSTC stand for their respective output in CSV format LAYOUT CSV For the other two values output is in standard format LAYOUT STD Operand Address Meaning in command Lformat field D format FILE FILE FROM FILE USER USER USER IDENTIFICATION SELECT SEL SELECT PARAMETER NAME NAME PROFILE NAME in the structure SELECT PARAMETER ADMS ADMS ADMISSION SET in the structure SELECT PARAMETER INF INFO INFORMATION OUTPUT OUTPT OUTPUT LAYOUT OUTPT LAYOUT U24845 J Z135 4 76 89
119. me meaning as the FT messages with the corre sponding FT number The corresponding equates are defined in the macro YNDEQU with the prefix YND1 The left byte is only assigned a value other than 0 in the case of a parameter error It specifies the erroneous parameter The corresponding equates are defined in the macro YNDEQU with the prefix YND2 U24845 J Z135 4 76 55 Return codes ASSEMBLER programming interface for openFT Examples In the case of a syntax error in the parameter name the maincode is X 0204 If the left byte is set to 0 the right byte will contain the message number as a result of the call If the transfer admission is violated the maincode is X OOOE corresponds to the message 0014 Subcode1 The error codes are divided into error classes These are found in subcode 1 The following error classes exist Class Value Meaning A 0 the call was successfully completed B 1 permanent error no repetition possible there was a syntax error or equivalent parameter error C 32 system error an internal error occurred during macro processing D 64 repeat after correction of user input E 128 wait and repeat The corresponding equates are defined in the macro YNDEQU with the prefix YNDC Subcode2 This field contains a warning if the macro was completed successfully subcode1 0 and maincode 0 but the macro couldn t be executed for instance if no files could be found durin
120. nnot be recreated The CALL macro cannot be accepted executed because the file owner and the user requesting the creation of a receive file do not correspond The CALL macro cannot be accepted executed because the data carrier for the send or receive file is either not mounted unknown or unnamed or multiple data carriers are not supported The CALL macro cannot be accepted because it can only be input by autho rized users The CALL macro cannot be accepted further executed because there is a file structure error File structure errors include the attributes of the send file are incomplete The data of the send file do not correspond to the structure attributes The send file sentences are too long The send file and the receive file have a different structure for WRITE MODE EXTEND FILE e g sentence fixed variable length During the processing of a CALL macro a DVS error occurred The DVS error code is in the DMS RETCODE field in hexadecimal notation During the processing of a CALL macro an NDMS error FJAM error or operating system error occurred which was neither a DVS error nor a transport system error The CALL macro cannot be accepted because the start time is more than 32767 minutes in the future or because the abort time is either in the past before the start time or more than 32767 minutes in the future An error occurred while loading the FT runtime module The return code returned by the LINK macro is in the field
121. odify admission profiles The functionality corre sponds to that of the command MODIFY FT PROFILE 76 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT AC MODFTPRF Format of the macro MODFTPRF LIST format default format Name Operation Operand Name MODFTPRF MF L ALL NAME adr NONE 55 1 adr L SELECT C JOWN ALL TAD 4 NOTSP J adr OWN OWNER 4 ALL 11 adr OLD 1 adr L JUNCHG VALID 4L YES C INO L JUNCHG UNCHG USAGE y JIPRIVATE 1 L PUBLIC UNCHG EXPDATE 4 NOTRS adr L NEWTAD L YES VALID 1 L NO PRIVATE adr USAGE 1 JPUBLIC NOTRS EXPDATE 1 adr The date output must be in the form YYYYMMDD The date must lie between 01 01 1970 and 31 12 2020 77 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT AC Operand UNCHG L PRIV 4 NO YES YES UNCHG IOSND NO Y ES UNCHG IORCV 4 NO 1 5 UNCHG 115 0 4 NO YES UNCHG IIRCV 4 NO YES UNCHG 6 1 4 NO 11 YES UNCHG 1 IMAN 4 NO 11 YES UNCHG L UAD OWN OWN C UUSER adr OWN UACC FIRST NOTSP adr xOWN NONE L UPASS 111 NOTSP adr U24845 J Z135 4 76 Operation Name MODFTPRF 78 MODFTPRF ASSEMBLER programmin
122. or Guide The description is divided between the three manuals as follows e openFT for BS2000 Installation and Administration The System Administrator Guide is intended for FT and FTAC administrators It describes the installation of openFT and its optional components operation control and monitoring of the FT system and the FTAC environment the administration commands for FT and FTAC administrators account records 2 U24845 J Z135 4 76 Structure of the programming manual Introduction openFT for BS2000 Enterprise File Transfer in the Open World The User Guide contains the following information an overview of the basic functions of the openFT product family a detailed description of the conventions for the file transfer to computers with different operating systems information on the implementation of FTAM description of the user commands messages from openFT and openFT AC openFT for BS2000 Programming Interfaces The Programmer Reference Guide describes the openFT and openFT AC program interfaces Additional information is available in the brochure openFT The Classic Solution for File Transfer and More which describes various runtime application scenarios Current information on openFT can also be found on the Internet on the page http www fujitsu siemens com openft 1 4 Structure of the programming manual This manual describes the openFT and openFT AC programming interface
123. or BS2000 The functions of openFT for BS2000 can be used via the following COBOL macros COBOL macro Function Command CALL NCANCEL cancel file transfer request CANCEL FILE TRANSFER CALL NCOPY transfer file TRANSFER FILE CALL NDEL delete remote file DELETE REMOTE FILE CALL NLMOD _ modify local FT file attributes MODIFY FILE FT ATTRIBUTES CALL NLSHOW display local FT file attributes SHOW FILE FT ATTRIBUTES CALL NMOD modify remote file attributes MODIFY REMOTE FILE ATTRIBUTES CALL display remote file attributes SHOW REMOTE FILE ATTRIBUTES CALL NSTAT query file transfer status SHOW FILE TRANSFER For programs containing calls to openFT for BS2000 the module YNDCOBOL must be either explicitly connected or connected via the AUTOLINK function of the linkage editor The module YNDCOBOL is in the library SYSFJAM SYSRTC FT At the execution time of the program the module YNDCOBOL is loaded from the library SYSFJAM SYSRTC FT The COPY elements are in the library SYSLIB OPENFT 090 under the user ID set by the BS2000 system administrator li In openFT V9 0 for BS2000 file and link names have been changed Therefore you must uninstall the older version of openFT before switching to a version of openFT earlier than V9 0 otherwise the YNDCOBOL module of the older version might be used If you are not installing with IMON you must for reasons of compatibility copy the SYSRTC OPENFT 090 file under t
124. or display 55 147 148 example NCANCEL 106 NCOPY 115 NDEL 120 NLMOD 126 NLSHOW 131 NMOD 137 NSHOW 142 EXECUTE format 7 EXPFTENV 69 70 DSECT format 70 LIST format 69 export admission profile 69 admission set 69 EXPORT FTAC ENVIRONMENT 70 EXPFTENV 69 F field length 8 file attribute display remote file 40 display remote 40 display local FTAM 32 modify remote file 34 modify local FTAM 28 158 Index local file attributes FTAM 28 remote file attributes 34 133 MODIFY FILE FT ATTRIBUTES NLMOD 28 MODIFY FT ADMISSION SET 75 MODFTADS 73 MODIFY FT PROFILE 84 MODFTPRF 76 MODIFY REMOTE FILE ATTRIBUTES NMOD 34 N NCAN DSECT format 12 LIST format 11 macro 11 return codes 1 NCANCEL 11 CALL macro 4 example 6 NCOPY 14 CALL macro 108 DSECT format 17 example 115 LIST format 14 macro 14 return codes 51 NDEL CALL macro 117 delete remote file 24 DSECT format 26 example 120 LIST format 24 macro 24 return code 55 NLMOD CALL macro 2 DSECT format 30 example 126 LIST format 28 macro 28 return code 55 NLSHOW CALL macro 128 159 accessible partner systems 92 admission profile 88 admission set 88 LIST format 8 DELFTPRF 67 EXPFTENV 69 IMPFTENV 71 MODFTADS 73 NCAN 11 NCOPY 14 NDEL 24 NLMOD 28 NLSHOW 32 NMOD 34 NSHOW 40 NSTAT 44 SHWFTADS 86 SHWFTENV 8 SHWFTPRF 90 local FT file attributes display 32 128 M macro NCAN 11 NCOPY 14 NDEL 24 NLMOD 28 NLSHOW 32 NMOD 34 NSHOW 40
125. quotation marks in the programming interface BS2000 passwords however must be input in the usual form including quotation marks Passwords with integer values must be entered in binary form For the assignment of keywords e g NOT SPECIFIED and NONE use the values which are set in the corresponding 88 step structure Description of the data fields The parameters for FT NDEL LIST have the same names and functions as the operands for the command DELETE REMOTE FILE The parameter USER DEF ADM ATTR is used to determine how the entry for USER DEF ADMISSION is to be interpreted With the value GRAPHIC the entry for USER DEF ADMISSION is interpreted as a printable character and converted for transfer to a system which does not use EBCDIC With the value OCTET the entry for USER DEF ADMISSION is interpreted as binary information and not converted U24845 J Z135 4 76 119 COBOL programming interface CALL NDEL example Example NDEL U24845 J Z135 4 76 E EXAMPL Z DELETE REMOTE FILE PARTNER VAROO1 FILE NAME REMOTEFILE TRANS USID ACCOUNT PASSWORD PIC ZZZZ9 27779 RETURN INFO R PARAMETERS ER NAME
126. r OCTET With GRAPHIC the entry for the corresponding operand is interpreted as a printable character and will be converted during transfer to a system which does not use EBCDIC With OCTET it is interpreted as binary information and will not be converted U24845 J Z135 4 76 41 ASSEMBLER programming interface for openFT Format of the macro NSHOW DSECT format Operand MF DL xxx Operation NSHOW Name name The prefix xxx default value YNW may be up to 3 characters long It must generate names which are permitted in ASSEMBLER The following ASSEMBLER instructions are generated FHDR MF C amp P A PARTNER SY STEM LCPARTNER SYSTEM LCFILE NAME ACFILE NAME A DIRECTORY L DIRECTORY LCFILE PASSWORD ACFILE PASSWORD ACTRANSFER ADMISSION LCTRANSFER ADMISSION LCUSER IDENTIFICATION A USER IDENTIFICATION ACUSER ACCOUNT S S C co LCUSER ACCOUNT LCUSER PASSWORD ACUSER PASSWORD ACMESSAGE LCMESSAGE FILE NAME NOTSP DIR DIRECTORY NOTSP FILE PASSWORD NONE TRANSFER ADMISSION NONE PAR USER ACCOUNT ONE USER PASSWORD NONE OUTPUT SOUT SLST SOUTC SLSTC NFORMATION STD ONLY ALL TYPE FILE PASSWORD GRAPH OCTET TYPE TRANSFER ADMS GRAPH OCTET U24845 J Z135 4 76 DSECT DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS XL2 DS XL2 DS A DS A DS
127. r admis sion for specification is as follows Number of the Certification Authority configured in the system Certificate number Transfer admission specified in the partner system If this component of the transfer ad mission is empty then this corresponds to the specification TRANSFER ADMIS SION NONE at the command interface U24845 J Z135 4 76 4 bytes 4 bytes 0 7 bytes CREFTPRF 66 ASSEMBLER programming interface for openFT AC DELFTPRF 2 2 3 DELFTPRF Delete admission profile The macro DELFTPRF can be used to delete admission profiles The functionality corre sponds to that of the command DELETE FT PROFILE Format of the macro DELFTPRF LIST format default format Name Operation Operand Name DELFTPRF 11 ALL NAME adr NONE PASS adr L SELECT L OWN ALL L TAD 4 NOTSP adr OWN ONNER 4 ALL J adr U24845 J Z135 4 76 67 ASSEMBLER programming interface for openFT AC Format of the macro DELFTPRF DSECT format L PASSWORD A PASSWORD ELECT TRANSFER ADMISSION ELECT TRANSFER ADMISSION ELECT OWNERID ELECT OWNERID DS E ALL PASSWORD NONE ECT OWN ECT TRANSFER ADMISSION ALL NOTSP ECT OWNERID OWN ALL ERVED ACS LCS LCS ACS AM SEL SEL SEL RES DSECT FHDR MF C amp P DS A DS XL2 DS XL2 DS
128. r file management macros The openFT AC programming interface Macros for open F T AC for 852000 emen mm eee w hm CREFTPRF Create admission profile DELFTPHF Delete admission profile gr RR EXPFTENV Export admission sets and profiles IMPFTENV Import admission sets and profiles MODFTADS Modify admission sets MODFTPREF Modify admission profile SHWFTADS Output admission sets SHWFTENV List admission sets and profiles SHWFTPRE Output admission profile SHWFTRGE List accessible partner systems YFSEQU Set constants for the openFT AC macros Example for the use of the programming interface Return information and error displays L m 2 2 1 2 1 1 2 1 2 2 1 3 2 1 4 2 1 5 2 1 6 2 1 8 2 1 9 2 1 10 2 1 11 2 2 2 2 1 222 2 2 3 2 2 4 225 2 2 6 22d 2 2 8 2 2 9 2 2 10 2 2 11 2 2 12 2 2 13 2 2 14 U24845 J Z135 4 76 U24845 J Z135 4 76 COBOL programming interface COBOL macros for openFT for 8952000 NCANCEL Cancel file transfer request Transfer file KS NDEL Delete remote file NLMOD Modify local FT file attribute NLSHOW Display local FT f
129. rs in the command SHOW FILE FT ATTRIBUTES Please refer to the corresponding command description in the user manual Meaning in command FILE NAME INFORMATION OUTPUT LAYOUT Return value of the call 33 Address field D format FILE INFO OUTPT OUTPT MSG Operand L format FILE INFO OUTPUT LAYOUT MSGINS U24845 J Z135 4 76 NMOD ASSEMBLER programming interface for openFT 2 1 6 NMOD Modify remote file attributes The macro NMOD can be used to modify the attributes of a file in an FT partner system The functionality corresponds to that of the command MODIFY REMOTE FILE ATTRIBUTES Format of the macro NMOD LIST format default format Name Operation Operand name NMOD 1 1 PARTNER adr NOTSP FILE NONE adr UUSER adr NONE UACC adr NONE Sus dal SAM NEWNA CX JUNC FAVAIL JIMME L DEFER UNCHG L STORACC adr UNCHG L FFSIZE int 34 U24845 J Z135 4 76 ASSEMBLER programming interface for openFT NMOD Name Operation Operand UNCHG L LQUAL adr NONE L MSGINS 1 adr L GRAPH 55 1 C JOCTET L JGRAPH ATAD OCTET GRAPH AUPASS 1 OCTET JUNCHG ACCMOD 1 JREPL L NO AREADF 1 5 gt m 79 pr gt m
130. s Fields which should not contain any specifications are to be assigned LOW VALUE If a parameter is not entered the default values are generated as in the MODIFY REMOTE FILE ATTRIBUTES command All other values which should be set in quotation marks at the command interface do not have these quotation marks in the programming interface BS2000 passwords however must be input in the usual form including quotation marks Passwords with integer values must be entered in binary form For the assignment of keywords e g NOT SPECIFIED and YES use the values which are set in the corresponding 88 step structure Description of the data fields The parameters for FT NMOD LIST have the same names and functions as the operands for the command MODIFY REMOTE FILE ATTRIBUTES Please refer to the corresponding command description in the user manual The parameter USER DEF ADM ATTR is used to determine how the entry for USER DEF ADMISSION is to be interpreted With the value GRAPHIC the entry for USER DEF ADMISSION is interpreted as a printable character and converted for transfer to a system which does not use EBCDIC With the value OCTET the entry for USER DEF ADMISSION is interpreted as binary information and not converted 136 U24845 J Z135 4 76 COBOL programming interface CALL NMOD example Example NMOD
131. s It is divided into three chapters The introduction in Chapter 1 provides information on the structure and contents of openFT for 852000 documentation in general and this manual in particular Chapter 2 describes the Assembler programming interface and contains the return codes both for openFT and openFT AC functions Chapter 3 discusses the COBOL programming interface U24845 J Z135 4 76 Changes since the last version of the manual Introduction 1 5 Changes since the last version of the manual This openFT V9 0 for BS2000 programming manual contains the following new features compared to those described in the programming manual for openFT V8 0 for BS2000 CSV outputs CSV outputs for the commands SHOW FILE TRANSFER SHOW FT FILE ATTRIBUTES SHOW FT RANGE and SHOW REMOTE FILE ATTRIBUTES are also possible using the program interface At the program interface this means e The assembler macros NLSHOW NSHOW NSTAT and SHWFTRGE have been ex panded to include the LAYOUT operand e The value range for and OUTPUT DESTINATION has been expanded for the COBOL calls NLSHOW NSHOW and NSTAT Long passwords When transferring with NCOPY you can specify a password up to 32 characters in length At the program interface this means e The value range of the PASSWORD field in USER ADMISSION and PROCESSING ADMISSION has been expanded for the COBOL call NCOPY Encryption You can force or forbid
132. s divided into two bytes The right byte shows the cause of the error It can have the following values in decimal notation 0 the call was error free 1 the parameter field is partially or entirely in an invalid address space 2 the address or length field contradict the keyword field 3 the parameter entry contradicts another parameter 4 the parameter value is too long or violates syntax rules e g FILENAME PASSWORD 10 the buffer is too small this error code is reserved for future expansions 11 the arithmetic parameter value e g RECSIZE value is invalid 12 the keyword entered is not permitted for this parameter 13 a mandatory parameter is missing The left byte is only set to a value other than 0 if there is a parameter error It specifies the parameter in which the error occurred The meaning of these values can be found in the description of the Assembler macro YNDEQU on page 48 If the left byte is set to 0 the right byte contains the message number indicating the result of the macro U24845 J Z135 4 76 153 COBOL programming interface Subcode1 The error codes are divided into error classes These are identified in subcode 1 The following error classes exist Class Value Meaning A 0 the call was successfully completed B 1 permanent error no repetition possible there was a syntax error or equivalent parameter error C 32 system error an internal error occurred during macro processing
133. tain access operations e g read only 2 7 The CALL macro cannot be accepted executed since the protection time for the overwriting of the receive file has not expired U24845 J Z135 4 76 149 COBOL programming interface Meaning The CALL macro cannot be further executed since the space which the user as defined in the TRANSFER ADMISSION is permitted to use for saving in the receiving system is full either because the send file contains too many consecutive blanks or because the primary assignment of the password protected receive file is too small The receive file cannot be created or expanded The CALL macro was not executed because the system was generated without job variables or the user does not have access to the job variable specified or the job variable specified is monitoring another FT request or the password specified is not the right for the job variable The CALL macro was not executed because the job variable in question is not present The CALL macro was not executed because the job variable specified does not monitor an FT request The CALL macro was not executed because the contents of the job variable specified are not consistent The CALL macro was not executed due to an error in the local PROCESSING ADMISSION The macro was not executed because the file encryption function is not installed The macro was not executed becaus
134. ten NLSHOW macro does not change any values in the structure FTI NLSHOW LIST The fields are to be written with left justified characters and filled with right justified blanks default for the COBOL MOVE statement for character strings Fields which should not contain any specifications are to be assigned LOW VALUE If a parameter is not specified the default values are used as specified in the command SHOW FILE FT ATTRIBUTES For the assignment of keywords e g ONLY NAME and SYSLST use the values which are set in the corresponding 88 step structure U24845 J Z135 4 76 129 CALL NLSHOW COBOL programming interface Description of the data fields The parameters for FT NLSHOW LIST have the same names and functions as the corre sponding operands for the command SHOW FILE FT ATTRIBUTES Please refer to the command descriptions in the user manual In addition to the options offered at the command interface the COBOL program allows you to address files and libraries by their linkname This is done using the field LINK NAME in the FT NLMOD LIST Only the link name or the filename library name not both may be specified A link name which is not assigned at execution time leads to the message FILE UNKNOWN 130 U24845 J Z135 4 76 COBOL programming interface CALL NLSHOW example Example NLSHOW
135. the beginning of the structure FI NCOPY LIST serves to identify the COPY element and must not be overwritten Description of the data fields TRANSFER ID The fields contains after a successful NCOPY macro the transfer ID of the generated request left justified filled with right justified blanks or after an unsuccessful NCOPY macro the character string For a NCANCEL NSTATUS macro the fields remains unchanged For a NMOD NSHOW NDEL NLMOD or NLSHOW macro the field has no meaning FT RETURN CODE This field contains the return messages U24845 J Z135 4 76 147 FT RETURN INFO COBOL programming interface Set up of the FT RETURN CODE field The return code field is set up as follows Maincode Subcode2 Subcode1 Parameter error warnings error class 1 byte 1 byte 1 byte 1 byte The field with the return code meets the conventions for return codes as of BS2000 Version 9 148 U24845 J Z135 4 76 COBOL programming interface Return codes 3 1 91 Return codes for the CALL macros NCOPY NCANCEL and NSTAT The field MAIN RETURN CODE contains the error class and can have the following values 0 No error 1 Error however the program can successfully repeat the same call later without further intervention 2 Error however the program can repeat the call unchanged after an intervention by a terminal user or operator 3 Error which does not belong to class 1 or 2
136. valid entry in R1 or in one of the address fields in the NCOPY operand field or the entire operand range is not within word limits or length negative 00 10 0003 Inthe operand range the length is O but the address isn t 00 11 0003 The macro cannot be accepted because the start time lies more than 32767 minutes in the future or because the abort time lies either in the past before the start time or more than 32767 minutes in the future 00 13 0003 The macro was not executed because the local and remote systems are not compatible Neither system can connect with the other or at least one of the systems does not support the function called 00 14 0003 The macro was not executed because the filename was neither explicitly entered nor indicated by means of the TRANSFER ADMISSION used 00 01 FFFF Inthe expansion of the macro s L format a function is required which FT does not support 00 03 FFFF_ expansion of the macro s L format there is a version which is not supported 00 81 FFFF The macro cannot be accepted because there is not yet an output for asynchronous end messages 00 82 FFFF_ The macro cannot be accepted because the FT system has not yet completed a previous STOP FT command If the error code has the value X 000C0003 corresponds to the message FTR0097 DVS error then the additional information is located in the field xxxDMSCO 4 bytes long hexadecimal addressable with DSE
137. xxxMIPRC for the call MODFTADS and xxxMPLV for the calls CREFTPRF and MODFTPRF The value fields must not contain any fillers i e the length fields must indicate the exact length of the value fields U24845 J Z135 4 76 9 Macros for openFT ASSEMBLER programming interface for openFT Enter keywords into the DSECT fields with the help of the above mentioned equates Programs can run in 24 or 31 bit mode Please note that addresses in 24 bit mode must have an initial 0 2 1 Macros for openFT for BS2000 The following openFT functions can be used with macros Macro Default Function Command prefix NCAN YNA cancel file transfer CANCEL FILE TRANSFER NCOPY YNO transfer file TRANSFER FILE NDEL YNE delete remote file DELETE REMOTE FILE NLMOD YNM modify local FT file attributes MODIFY FILE FT ATTRIBUTES NLSHOW show local file attributes SHOW FILE FT ATTRIBUTES NMOD YNU modify remote file attributes MODIFY REMOTE FILE ATTRIBUTES NSHOW YNW show remote file attributes SHOW REMOTE FILE ATTRIBUTES NSTAT YNS show file transfer status SHOW FILE TRANSFER In addition there is also the CMD macro for more information see the manual BS2000 OSD BC V3 0 macros in the execution section An overview of the openFT AC macros can be found on page 57 Programs that were created for FT BS2000 version 2 0 and later can also be run in openFT V9 0 Of course if newer parameters are used dur
138. y the openFT for BS2000 command interface the files can also be addressed via their linkname Macro The function can be called as follows CALL NLSHOW USING FT NLSHOW LIST FT RETURN INFO FT NLSHOW LIST The range FT NLSHOW LIST describes the parameter list for the NLSHOW macro FT NLSHOW LIST must be defined in the WORKING STORAGE SECTION and can be copied to there with the statement COPY FTNLSHOW OF linkname Before the first NLSHOW macro the parameter fields should be deleted with the statement MOVE LOW VALUE TO USER PARAMETERS IN FT NLSHOW LIST Before executing another NLSHOW macro you must fill the desired fields If a parameter is not specified or the default value is to be used this field must be assigned the value LOW VALUE 128 U24845 J Z135 4 76 COBOL programming interface CALL NLSHOW FT NLSHOW LIST is defined as follows 01 FT NLSHOW LIST 02 FILLER X 4 VALUE V500 02 USER PARAMETERS 05 FILE NAME PIC X 54 88 NOT SPECIFIED VALUE LOW VALUE 05 LINK NAME PIC X 8 88 NOT SPECIFIED VALUE LOW VALUE 05 INFORMATIO PIC X 1 88 STD VALUE LOW VALUE 88 ALL ATTRIBUTES VALUE A 88 ONLY NAME VALUE O 05 OUTPUT PAR PIC X 1 88 SYSOUT VALUE LOW VALUE 88 SYSLST VALUE L 88 SYSOUTCSV VALUE 0 88 SYSLSTCSV VALUE C The version specification at the beginning of the structure FT NCOPY LIST serves to identify the COPY element and must not be overwrit
139. ystem If this component of the transfer ad mission is empty then this corresponds to the specification TRANSFER ADMIS SION NONE at the command interface 85 4 bytes 4 bytes 0 7 bytes U24845 J Z135 4 76 SHWFTADS ASSEMBLER programming interface for openFT AC 2 2 8 SHWFTADS Output admission sets The macro SHWFTADS can be used to view admission sets The functionality corresponds to that of the command SHOW FT ADMISSION SET Format of the macro SHWFTADS LIST format default format Name Operation Operand Name SHWFTADS 11 OWN ALL USER STD adr L SYSOUT L OUTPUT 1 L SYSLST 151510 L LAYOUT CSV Format of the macro SHWFTADS DSECT format XXxFTADS DSECT 5 FHDR MF C amp P XXXUSER DS A ACUSERID XXXUSERL DS XL2 LCUSERID XxxBUFL DS XL2 RESERVED XXXBUF DS A RESERVED 1 BYTE FIELDS FOR ENTERING KEYWORDS xxxIUSER DS XL1 USERID OWN STD ALL XXXSEL DS XL1 SELECT ALL XXxOUTPT DS XL1 OUTPUT LAYOUT SOUT SLST SOUTC SLSTC XXXRESRV DS XL1 RESERVED XxxFTADL EQU 5 6 U24845 J Z135 4 76 SHWFTADS ASSEMBLER programming interface for openFT AC The meaning of the parameters in the macro SHWFTADS corresponds to the meaning of the parameters in the command SHOW FT ADMISSION SET as shown in the following table In the OUTP

Program Interfaces - Fujitsu manual server

Contents

Download Pdf Manuals

Related Search

Related Contents