View previous topic :: View next topic
|
Author |
Message |
nithusi
New User
Joined: 12 Apr 2006 Posts: 30
|
|
|
|
Hi,
I am trying to throw a screen through a transaction code and then further read from the sreen entry and process within in the prgram and throw back the screen again with teh required data. I am able to invoke the screen only once and when I type something on the screen and click enter, it says no valid transaction supplied. I am testing through BTS. I tried my level best by going through some materials as well but no luck. I am not sure what is to be done for this. Can anyone help me please.
Thanks,
Nithya. |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
Did you include all transactions you need in your BTSIN? Sample:
Code: |
./T TC=OM MBR=TPOMVER LANG=PLI TYPE=MSG PLC=1
./T TC=NK MBR=TPNKVER LANG=PLI TYPE=MSG PLC=1
./T TC=NN MBR=TPNNVER LANG=PLI TYPE=MSG PLC=1
./T TC=NM MBR=TPNMVER LANG=PLI TYPE=MSG PLC=1
./T TC=QC MBR=TPQCVER LANG=PLI TYPE=MSG PLC=1
./T TC=NF MBR=TPNFVER LANG=ASM TYPE=MSG PLC=1
./T TC=NC MBR=TPNCVER LANG=PLI TYPE=MSG PLC=1
./T TC=NI MBR=TPNIVER LANG=PLI TYPE=MSG PLC=1
./T TC=DXNL1 MBR=TPDXNL1 LANG=PLI TYPE=MSG PLC=1
./T TC=DXNL2 MBR=TPDXNL2 LANG=PLI TYPE=MSG PLC=1
./T TC=TKST MBR=FSHASF1I LANG=PLI TYPE=MSG PLC=1
./T TC=FSH1 MBR=FSHASF1I LANG=PLI TYPE=MSG PLC=1
./P MBR=BTSCOM00 PA=0003FE PX=6A
./P MBR=BTSCOM00 PA=00040D PX=79
./* ./P MBR=BTSCOM00 PA=000414 PX=40818283848586878889
./* ./P MBR=BTSCOM00 PA=000424 PX=40919293949596979899
./* ./P MBR=BTSCOM00 PA=000434 PX=40A1A2A3A4A5A6A7A8A9
./P MBR=BTSCOM00 PA=000474 PX=E0
./T TC=BW40 PLC=0 MDL=2
./D LTERM=ABTS1 DDOF=327029 TPBUF=10000 FORMBUF=20000
./O DB=YES MSG=YES APS=NO ATR=NO SCREEN=INOUT
./O TSO=YES TSOMLVL=1 TSOMSG=ALL TSODB=NONE
/FORMAT QXXMODH
|
./T for definitions of the transactions to be used
./D for definition of your screentype
./O for definition what is to be written into BTSOUT. |
|
Back to top |
|
|
nithusi
New User
Joined: 12 Apr 2006 Posts: 30
|
|
|
|
Hi George,
thanks, All this is given. the menu screen is thrown onto the trminal when i enter the TXN code. but when i select from the menu screen this entry is not invoking the transaction program again. What needs to be done to do this? Please advise.
Thanks,
Nithya. |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
Are the items on the menue supposed to call different mpp's? In that case you should make a program-to-program switch (trx-change in SPA and isrt SPA / message) or a CHNG-call to the transaction to be started and a message. Please show the part of the BTSout where you insert spa and message from the menue-transaction which would be your first screen. |
|
Back to top |
|
|
nithusi
New User
Joined: 12 Apr 2006 Posts: 30
|
|
|
|
Hi,
The itmes on the menu is supposed to triger the same program which had thrown the menu screen. Depending upon what is entered on the screen, it is processed in the program. I am not using SPA.
This is my BTSfile contents;
Code: |
./O TSOMLVL=1
./P MBR=BTSCOM00 PA=0000D8 PC=CON5368
./T TC=ET110A MBR=ET110A PSB=ET110A LANG=CBL TYPE=MSG MSGTYPE=TRAN
./T TC=ET120Z MBR=ET120Z PSB=ET120Z LANG=CBL TYPE=MSG MSGTYPE=TRAN
./T TC=LIF15 PLC=0 MDL=2
./T TC=MASTER PLC=0 MDL=2
./T TC=MASTERP PLC=0 MDL=P2
./T TC=LOC01 PLC=0 MDL=2
./D EOM=? DDOF=327021 FORMBUF=10000 TPBUF=20000
./C NC=15
./O TSO=YES SCREEN=INOUT TSOMLVL=1
In the above this is the line specifying the transaction;
./T TC=ET110A MBR=ET110A PSB=ET110A LANG=CBL TYPE=MSG MSGTYPE=TRAN
|
Thanks,
Nithya.
Put code around the code |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
This is your BTSIN; what does the BTSOUT say? Please post. |
|
Back to top |
|
|
nithusi
New User
Joined: 12 Apr 2006 Posts: 30
|
|
|
|
Hi,
BTSOUT is here
Code: |
BTS0006I TRANSACTION STARTED: ET110A .
MBR=ET110A PSB=ET110A EDIT= SPA=0 PLC=1 LANG=CBL TYPE=MSG
**** MSG CALL- FUNC=GU , PCB=IOPCB , STATUS= , MESSAGE NUMBER=000001
----.----1----.----2----.----3----.----4----.----5----.----6----.--
IOAREA= . ET110A
0400CEFFFC444444444444444444444444444444444444444444444444444444444
0B00531101000000000000000000000000000000000000000000000000000000000
BTS0031I MODNAME: ET110AU1
BTS0050W SEGMENT LENGTH GREATER THAN Q BLKSIZE OR LRECL.
**** MSG CALL- FUNC=ISRT, PCB=IOPCB , STATUS= , MESSAGE NUMBER=000001
----.----1----.----2----.----3----.----4----.----5----.----6----.--
IOAREA= IOPC
440044CDDC444444444444444444444444444444444444444444444444444444444
0000009673000000000000000000000000000000000000000000000000000000000
4444444444444444444440000000000000000000000000000000000000000000000
4444444444444444444440000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000
GHN GNP GHNPISRTCHNGPURGDLETREPLCHKPXRSTSYNC
CCD4CDD4CCDDCEDECCDCDEDCCDCEDCDDCCDDEDEEEEDC44444444444444444444444
7850757078579293385774974353957338277923285300000000000000000000000
4444444444444444444444444444444444444444444444444444444444444444444
0000000000000000000000000000000000000000000000000000000000000000000
00ET110AN1ET110A
4444444444444444444444444444444444FFCEFFFCDFCEFFFC00000000000000000
0000000000000000000000000000000000005311015153110100000000000000000
0000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000
000157 LINE(S) SAME AS ABOVE
000000000000000000000000000000000000000000000000 |
|
|
Back to top |
|
|
nithusi
New User
Joined: 12 Apr 2006 Posts: 30
|
|
|
|
And this is the final part when we try to choose something from the menu screen,
Code: |
THE FIELD ATTRIBUTE BITS ARE: RRPNDDRM, WHERE P MEANS PROTECTED; N MEANS NUMER
THE MEANING OF THE DD BITS IS: 00=DISPLAY/NO PEN DETECT; 01=DISPLAY/DETECT; 10
PAGE 0007 B A T C H T E R M I N A L S I M U L A T O R ' B T
BTS0004W NO TRANSACTION INFORMATION SUPPLIED. UNABLE TO SCHEDULE TRANSACTION:
BTS0011I CONTINUING WITH NEXT TRANSACTION. |
|
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
Looks like the message you inserted is wrongly filled. I see spaces where they should not be in the start of your message. That's also why the length message comes. Have a look at this piece of documentation. For other items follow the link in my signature and search a bit. |
|
Back to top |
|
|
Bitneuker
CICS Moderator
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
|
|
|
|
Have a look at this one; oops better follow my previous link ?ause the tables look fuzzy. Did you insert an output message instead of een inputmessage? Besides your message looks odd How come the IO-area contains the text 'IOPCB'???????? Could you post how you fill the message, the message structure and the insert call?
Quote: |
Input Message Format and Contents
|The input message that an application program receives from a terminal |or another program always has these fields: the length field, the ZZ field, |and the text field. The tables that follow show the message input layouts. | The input message field names are in the first row of each table. The number |below each field name is the length in bytes that has been defined for that |field. Table 1 shows the format of an |input message for AIBTDLI, ASMTDLI, CBLTDLI, CEETDLI, CTDLI, and PASTDLI interfaces. |The message is slightly different for the PLITDLI interface as shown in Table 2.
| || Table 1. Input Message Format | | | Field Name | LL | ZZ | TRANCODE | Text |
| | Field Length | 2 | 2 | 8 | Variable |
| | | || Table 2. Input Message Format for the PLTDLI interface | | | Field Name | LLLL | ZZ | TRANCODE | Text |
| | Field Length | 4 | 2 | 8 | Variable |
| | |The contents of the input message fields are:
||LL or LLLL |The length field contains the length of the input message segment in |binary, including LL (or LLLL) and ZZ. IMS TM supplies this number in the length |field when you retrieve the input message. |For the AIBTDLI, ASMTDLI, | CBLTDLI, CEETDLI, CTDLI, and PASTDLI interfaces, define the LL field as 2 |bytes long.
|For the PLITDLI interface, define the LLLL field as 4 bytes |long. The value in the LLLL field is the input message length minus 2 bytes. |For example, if the text is 12 bytes, then the fullword LLLL contains a value |of 24 bytes. This value is the total of LLLL (4 bytes) + ZZ (2 bytes) + TRANCODE |(8 bytes) + text (12 bytes) - 2 bytes.
| |ZZ |The ZZ field is a 2-byte field that is reserved for IMS TM. Your program |does not modify this field. | |TRANCODE |The TRANCODE is the transaction code for the incoming message. | |Text |This field contains the message text sent from the terminal to the application |program. The first segment of a message can also contain the transaction code |associated with the program in the beginning of the text portion of the message. |Input messages do not have to include the transaction code, but you can provide |it for consistency. | ||The text field's contents in the input message and the formatting of |the contents when your program receives the message depends on the editing |routine your program uses.
|
|
|
Back to top |
|
|
|