IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search Log in to check your private messages Log in
 

FTINCL RC 20 when skeleton contains < and or > symbols


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
ravikanth

New User


Joined: 12 Jan 2006
Posts: 29

PostPosted: Thu May 14, 2015 4:37 pm
Reply with quote

Hi All,

I am trying to use ISPF File tailoring operations FTINCL to Include a template with substitution variables.

Example 1:
If I have the Skeleton content as
)CM -------------------------------------------------------------------
TRY THIS
<?xml version="1.0" encoding="CP037"?>
<resource name="&RESNME"/>

Output: 1
After FTINCL, I am getting outPut as
TRY THIS

Example 2:
If i have skeleton content as
)CM -------------------------------------------------------------------
TRY THIS
?xml version="1.0" encoding="CP037"?
resource name="&RESNME"

Output 2:
TRY THIS
?xml version="1.0" encoding="CP037"?
resource name="ETROP04"

How can we ignore or escape these < and or > characters or Any thoughts on how we could best achieve this senario.

Thank you,
Ravikanth Chavali
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL

PostPosted: Thu May 14, 2015 5:16 pm
Reply with quote

Use the )DEFAULT statement in the skeleton to override the use of "<" and ">" as control characters by FTINCL.
Back to top
View user's profile Send private message
ravikanth

New User


Joined: 12 Jan 2006
Posts: 29

PostPosted: Thu May 14, 2015 6:08 pm
Reply with quote

I have tried the (DEFAULT statement as described below that I guess I was doing something wrong.

In Skeleton, replaced < with @ and > with #
)DEFAULT )ø?!@|#
@?xml version="1.0" encoding="CP037"?#
@manifest type="MANIFEST_SHIPLIST"#
@resource name="&RESNME"/#

OutPut 1:
Blank file

However I also tried passing < and or > as substitution variables values from the REXX and that worked.

In the Rexx, before executing FTINCL
gtSymb = '>'
ltSymb = '<'

In the Skeleton,
)CM -------------------------------------------------------------------
TRY THIS
&LTSYMB.?xml version="1.0" encoding="CP037"?&GTSYMB
&LTSYMB.resource name="&RESNME"/&GTSYMB

Note: I have used the . to separate substitution variable from the text that immediately follows, but since &GTSYMB was the last char of the line used it as is. Also tried with . that also worked.

OutPut 2:
TRY THIS
<?xml version="1.0" encoding="CP037"?>
<resource name="RKANTH"/>
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL

PostPosted: Thu May 14, 2015 6:26 pm
Reply with quote

You're doing it wrong. The purpose of the )DEFAULT statement is to change the control characters; if you then change the skeleton to use the new control characters, you have undone what you attempted to do.
Back to top
View user's profile Send private message
ravikanth

New User


Joined: 12 Jan 2006
Posts: 29

PostPosted: Thu May 14, 2015 6:29 pm
Reply with quote

After posting my previous reply. I realized the mistake I am doing. Infact 2 mistakes.

1. On the )Default statement mistakenly I changed the & with ø.
2. Once I changed the default behaviour of < and > to @ and #. I have changed the skeleton to use the new defaults. Defeating the purpose of using different symbols for that purpose.

I corrected these mistakes and it worked fine. Thank you so much!
In the Skeleton
TRY THIS
)DEFAULT )&?!@|#
<?xml version="1.0" encoding="CP037"?>
<resource name="&RESNME"/>

OutPut:
TRY THIS
<?xml version="1.0" encoding="CP037"?>
<resource name="RKANTH"/>

Once again thank you so much,
Ravikanth Chavali
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> TSO/ISPF

 

Search our Forum:

Similar Topics
Topic Forum Replies
No new posts ISPF skeleton that has IF/THEN/DO sta... TSO/ISPF 15
No new posts File Tailoring -- Temporary dataset i... CLIST & REXX 3
No new posts Check Binary Values for symbols CA Products 3
No new posts Is it possible to pass variables of s... CLIST & REXX 2
This topic is locked: you cannot edit posts or make replies. ISPF skeleton explanation TSO/ISPF 2

Back to Top