View previous topic :: View next topic
|
Author |
Message |
gpowell382
New User
Joined: 25 Aug 2005 Posts: 31 Location: USA
|
|
|
|
In the body of my PLIB (Panel) I have the following:
>_PRJM1 >_PRJM2
this is working - I need to pass this to a report which is located in a dataset member- Question PRJM1 and PRJM2 need to on the same line in the report - I am getting an error that I am exceding the 80 Char limit.
ISPF105
Output overflow
Line to be written greater than data set LRECL (80), CHKLTR record-14
File tailoring input line:
&PRJM1_____________________________&PRJM2_____________________________ |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
1) the correct term is an ISPF panel, not a REXX or CLIST panel - no such animals
2) HAve you performed a length check on the two variables to see how long they are.
3) The problem is possibly in the skeleton - you need to post that |
|
Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2546 Location: Silicon Valley
|
|
|
|
How long are PRJM1 and PRJM2?
Do you really have underscores in your file tailoring skeleton? Do you expect for the underscores to fit on the same line as PRJM1 and PRJM2? |
|
Back to top |
|
|
gpowell382
New User
Joined: 25 Aug 2005 Posts: 31 Location: USA
|
|
|
|
I allow a 15 position to enter on the Panel
>>>>>>>>>>>>>>>>> clist <<<<<<<<<<<<<<<<<<,
Code: |
CONTROL MSG NOPROMPT NOLIST NOLIST NOSYMLIST FLUSH
/*NTROL MSG PROMPT LIST CONLIST SYMLIST FLUSH
/******************************************************
/**BATCH PROGRAM RELEASE FUNCTION APPLICATION WB **
/******************************************************
ISPEXEC VGET (MOVBSRC UTLDICT MOVESRCO MORE CLS) PROFILE
ISPEXEC VGET (MOVBLOD MOVELODN MOVELODO MOVESRCN) PROFILE
ISPEXEC VGET (MOVEJCL MOVEJCLO MOVESRCB MOVELODB) PROFILE
ISPEXEC VGET (PGMRV SUBS JCLS PRJM1 LDEST ) PROFILE
ISPEXEC VGET (PRJM2 PRJM3 PRJM4 QAYN ) PROFILE
ISPEXEC VGET (RELMBR) PROFILE
SET &MORE EQ &STR(N)
DISPLAY: +
ISPEXEC DISPLAY PANEL(MOVEBAT2)
|
Panel
Code: |
)ATTR
¦ TYPE(OUTPUT) INTENS(LOW) SKIP(ON)
@ TYPE(OUTPUT) INTENS(LOW)
+ TYPE(TEXT) INTENS(LOW) SKIP(ON)
\ TYPE(TEXT) INTENS(HIGH) COLOR(YELLOW)
# TYPE(TEXT) INTENS(LOW) COLOR(PINK)
< TYPE(TEXT) INTENS(HIGH) COLOR(YELLOW)
! TYPE(TEXT) INTENS(LOW) COLOR(YELLOW)
¢ TYPE(TEXT) INTENS(LOW) COLOR(YELLOW) HILITE(REVERSE)
} TYPE(INPUT) INTENS(HIGH) COLOR(TURQ)
{ TYPE(TEXT) INTENS(LOW) COLOR(TURQ) HILITE(BLINK)
¬ TYPE(TEXT) INTENS(HIGH) COLOR(GREEN)
$ TYPE(TEXT) INTENS(LOW) COLOR(GREEN)
)BODY
%-------------------MISIL BATCH RELEASE SCREEN--------------------------
%COMMAND =========> %_ZCMD +USER: &
+ Enter %SUB+TO SUBMIT, %END+ to cancel this function +TIME: &
+ Use PF1 for HELP +DATE: &
+CLID: M
+Workbench final compile must be complete before executing this function
+Release member:---------> _RELMBR + Override IDD edits (y or n)
+Proj/PTR 1:>_PRJM1 + C/P/N?_Z+ Proj/PTR 2:>_PRJM2 + C/P
+Proj/PTR 3:>_PRJM3 + C/P/N?_Z+ Proj/PTR 4:>_PRJM4 + C/P
+Source name:-> _MOVBSRC + PROD name:_MOVESRCN+ Dict name: _UTLDICT +
+Orig src lib-> _MOVESRCO +bkup src lib-> _MOVESRCB
+
+Load module:-> _MOVBLOD + Orig load lib->_MOVELODO
+BKUP name:----> _MOVELODN+ Bkup load lib->_MOVELODB
\Create QA Sheet:-> _Z\ Source Lines Changed->_SRCLNSCG+
+Rel. version:->_PGMRV+\N(New), R(Rev) or S(PTR) \Printer Number:_Z
+Subschema N(New),R(Rev) or -(unchanged) _Z+
+JCL member name:--------> _MOVEJCL + JCL N(New), R(Rev) or -(unchanged)
+Original JCL library:---> _MOVEJCLO +
+Release library is:-----> ¦RELLIB +
+Execution jobclass will be:------------>+ @Z+
+ Return to this screen? (y or n) :------->+ _Z+
|
|
|
Back to top |
|
|
gpowell382
New User
Joined: 25 Aug 2005 Posts: 31 Location: USA
|
|
|
|
How do I do a lenght check ?[/u] |
|
Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2546 Location: Silicon Valley
|
|
|
|
Show us your file tailoring skeleton.
repeating:
Do you really have underscores in your file tailoring skeleton? Do you expect for the underscores to fit on the same line as PRJM1 and PRJM2? |
|
Back to top |
|
|
gpowell382
New User
Joined: 25 Aug 2005 Posts: 31 Location: USA
|
|
|
|
Yes - I have underscores in my file tailoring skeleton, I took out the underscore and it worked. Thanks that I what wanted to do. |
|
Back to top |
|
|
|