.scr file modifications

 17 Replies
 0 Subscribed to this topic
 17 Subscribed to this forum
Sort:
Author
Messages
BrianM
Advanced Member Send Private Message
Posts: 41
Advanced Member
I have a new program that I am creating and am having a heck of a time with the last line on the screen.  My code looks like this on the .scr file: |                  Company:&    ]      ;                              ; | |               Date Range:&      ] -  &      ] | |            Process Level:[     ]    ;                              ; |       (ALL if left blank) I want the "(ALL if left blank)" to show up on the line just below "Process Level".  When I bring the screen up the bottom line of the frame goes through my "(ALL if left blank)" phrase.  Any ideas out there on how I can get this in?  Thanks in advance for your help. ========================================================================================= I HAVE tried using a caret (^) in the first position according to the manual as shown below" but get a "Line     32: Colm Phrase Width Not Uniform: Column 0" error |                  Company:&    ]      ;                              ; | |               Date Range:&      ] -  &      ] | ^            Process Level:[     ]    ;                              ;] |        (ALL if left blank)                                            ]
BTM
John Henley
Send Private Message
Posts: 3351
Above those lines, do you have a line that starts $DRAW GROUP If so, increase the 3rd number by one (that will increase the box height).
Thanks for using the LawsonGuru.com forums!
John
BrianM
Advanced Member Send Private Message
Posts: 41
Advanced Member
No I do not
BTM
BrianM
Advanced Member Send Private Message
Posts: 41
Advanced Member
If I have no $DRAW GROUP should I put one in or is there another way to do it?   I think the problem is that I have 2 output fields on the first line.  I'm not sure if the ^ works with those being there.  I know it works OK if it is just text though.
BTM
John Henley
Send Private Message
Posts: 3351
Have you tried: | Process Level:[ ] ; ;        |(ALL if left blank) in other words, move the pipe ..
Thanks for using the LawsonGuru.com forums!
John
BrianM
Advanced Member Send Private Message
Posts: 41
Advanced Member
I moved the pipe and the program does compile.  However, I still have the screen issue.  I've attached a screenshot so you can see what I mean.  Thanks for helping!
BTM
John Henley
Send Private Message
Posts: 3351
I know this probably sounds silly, but did you try adding a blank line under: |(ALL if left blank) $END-SCR ... so that |(ALL if left blank) $END-SCR ...
Thanks for using the LawsonGuru.com forums!
John
BrianM
Advanced Member Send Private Message
Posts: 41
Advanced Member
Believe me NOTHING is silly.  If you have an inkling about something, I'm willing to try it.  Yes, I do have a blank line under it. This is how that section of code looks now..... |                  Company:&    ]      ;                              ; | |               Date Range:&      ] -  &      ] | ^            Process Level:[     ]    ;                              ;]    |       (ALL if left blank)                                           ]
BTM
Woozy
Veteran Member Send Private Message
Posts: 709
Veteran Member
Hi Brian - just another shot-in-the-dark. Have you tried removing the parentheses around your text- even temporarily - to see if they are causing an issue? Also, what's with the square bracket to the right of your "(ALL if left blank)" text. I'm surprised it even compiles with that there, since there isn't a matching left bracket. It appears to be in column 75, which is odd in itself. Would you be willing to attach your whole .scr? Kelly
Kelly Meade
J. R. Simplot Company
Boise, ID
jaherb
Veteran Member Send Private Message
Posts: 164
Veteran Member
Of course this all becomes a moot point in portal. You will not see these lines then.
BrianM
Advanced Member Send Private Message
Posts: 41
Advanced Member
Sorry, I could not load the file so I just copied and pasted the text.  I hope that will suffice.  The reason the bracket is there is because that is how I saw it in the manual. v$RELEASE   08.0 ******************************************************************************* *                           SCREEN   ZR201 ******************************************************************************* $FORM      ZR201    R $MENU      HRMN0 $SECURITY  NO $DECIMALS  NO $NOLFCOK $KEYFCS    CD $DATAFCS   AC $LDATAFCS $FCPAIRS *        1    1    2    2    3    3    4    4    5    5    6    6    7    7   7 *...5....0....5....0....5....0....5....0....5....0....5....0....5....0....5...9 *------------------------------------------------------------------------------ $SCREEN    ZR201    R [HRRP[ ]             ?*** Multiple Status Code Changes ***         +N]                              ?;                                        ;    Report          [ZR201]     Priority    [ ]     Save Params (Y/N) [ ]    User Name  [          ]    Job Name   [          ] --- This will be the name on your report    Run After  [          ] --- NOW, HOLD, Time (1230 pm), Job Name    Frequency           [ ] --- (D)aily, (W)eekly, (M)onthly, (O)n Demand

\  Comments   [                                                  ]\

|                  Company:&    ]      ;                              ; | |               Date Range:&      ] -  &      ] | ^            Process Level:[     ]    ;                              ;]    |       (ALL if left blank)                                        ]

$END-SCR   ZR201    R *                            ELEMENT NAME * LEVEL       NAME           TYPE LENGTH    DEC REQ OC KN SC      PICTURE * ----- --------------------- --  ----        - -- -- --- - ----------------------- $TRANS     ZR201    R   2     TC                    AL    06          SB   2     FC                    A     01          SF   2     UPDATE-SW             A     01          SB   2     SCREEN-MSG            O     40          SB   2     TRANCODE              A     05          RP   2     HEADER                G     00    3    Q-PRIORITY            N     01          SB    3    SAVE-PARAMS           A     01          SB    3    USER-NAME             A     10          SK    3    JOB-NAME              A     10          SK    3    RUN-AFTER             A     10          SB    3    FREQUENCY             A     01          SB    3    COMMENTS              A     50          SB   2     RUN-PARAMS            G     00    3    COMPANY               N     04          SR    01  C    3    PRS-NAME              O     30          SB    CN    3    BEG-DATE              F     08          SB    3    END-DATE              F     08          SB    3    PROCESS-LEVEL         A     05          SB   *H03 P    3    PRS1-NAME             A     30          SB   *HH4 $END-TRANS ZR201    R * *        NAME               DEFAULT VALUE            EDIT LIST * --------------------  --------------------  ------------------------- $EDITS     ZR201    R   FC                                          A,C,D,I   Q-PRIORITY            2                     1,2,3   SAVE-PARAMS           N                     Y,N   JOB-NAME                                    R.00000000:R.ZZZZZZZZ   RUN-AFTER             HOLD   FREQUENCY             O                     D,W,M,O $END-EDITS ZR201    R

BTM
John Henley
Send Private Message
Posts: 3351
Change to this | Process Level:[ ] ; ; |(ALL if left blank) $END-SCR ZR201 R
Thanks for using the LawsonGuru.com forums!
John
John Henley
Send Private Message
Posts: 3351
Change to this | Process Level:[ ] ; ; |(ALL if left blank) $END-SCR ZR201 R
Thanks for using the LawsonGuru.com forums!
John
BrianM
Advanced Member Send Private Message
Posts: 41
Advanced Member
Here's what I got when I tried that:
BTM
jaherb
Veteran Member Send Private Message
Posts: 164
Veteran Member
One thing you could do is to move the Process Level parameter up above the Date Range Parameter. This would permit you to add your comment under the Process Level value. Normally in Lawson, when a field is left blank it is understood that "all" would be selected.
jaherb
Veteran Member Send Private Message
Posts: 164
Veteran Member

Here is the solution I think you are looking for.....   In your .scr begin your comment with a single quote and end it with a right bracket....   so your .scr would look as such;

            Process Level:[     ]    ;                              ;]                                                 'ALL if left blank]

you would then need to account for this field in the $TRANS section as follows...

   3    TO-TR-DATE            F     08          SB    3    COMMENT                A     17          SB $END-TRANS JH500    R

In this case the length of 17 is the space it takes for your actual comment; All if left blank

BrianM
Advanced Member Send Private Message
Posts: 41
Advanced Member
Thank you very much jaherb!  The option of adding a single quote and ending with a right bracket worked perfectly.  Thanks to everyone for helping.  I really appreciate it!
BTM
jaherb
Veteran Member Send Private Message
Posts: 164
Veteran Member
  Super.....