Page History

...

In

...

this

...

scenario

...

a

...

RAMP

...

application

...

has

...

been

...

created

...

over

...

an

...

order

...

processing

...

system.

...

Imagine

...

that

...

some

...

of

...

the

...

command

...

handler

...

tabs

...

(and

...

their

...

underlying

...

5250

...

destination

...

scripts)

...

need

...

to

...

prevent

...

users

...

from

...

performing

...

actions

...

on

...

cancelled

...

or

...

completed

...

orders.   

...

Step

...

1

...

-

...

Put

...

some

...

sort

...

of

...

"Code"

...

or

...

"Status"

...

column

...

into

...

every

...

instance

...

list

...

entry

...

Here

...

field

...

#ORDSTATUS

...

is

...

mapped

...

into

...

instance

...

list

...

column

...

Acolumn9().

...

Imagine

...

it

...

contains

...

values

...

"CAN"

...

(cancelled),

...

"OPN"

...

(Open),

...

"WIP"

...

(Being

...

worked

...

on)

...

or

...

"COM"

...

(completed)

...

....    

...

     Invoke Method(#avListManager.AddtoList) Visualid1(#OrdNo) Visualid2(#CustlName) Akey1(#OrderNumber) AColumn9(#ORDSTATUS)

...

 Note
Note:
...
 AColumn9() 
...
 may 
...
 or 
...
 may 
...
 not 
...
 be 
...
 shown 
...
 to 
...
 the 
...
 user 
...
 as 
...
 desired.
...
Step 
...
 2 
...
 - 
...
 Put 
...
 checking 
...
 code 
...
 into 
...
 the 
...
 appropriate 
...
 INVOKE 
...
 scripts
...
Here 
...
 the 
...
 INVOKE 
...
 script 
...
 for 
...
 a 
...
 5250 
...
 screen 
...
 that 
...
 allows 
...
 an 
...
 order 
...
 to 
...
 be 
...
 modified 
...
 has 
...
 had 
...
 a 
...
 check 
...
 added 
...
 to 
...
 stop 
...
 people 
...
 from 
...
 trying 
...
 to 
...
 display 
...
 cancelled 
...
 or 
...
 completed 
...
 orders 
...
 .....
...
     /* Get the order status from additional column 9 in the current order instance list entry */
...


     var ORDSTATUS = objListManager.AColumn9
...
[0
...
];
...


     /* If the order is cancelled or closed, prevent the 5250 screen from being displayed, and show a message as to why */
...


     if ((ORDSTATUS == "CAN") || (ORDSTATUS == "COM"))
...

     {
        HIDE_CURRENT_FORM("Sorry, but you are not allowed to display this order because it is cancelled or completed.");
...

        return;
...

     }

     /* If we reach here then it's okay to proceed to the order display screen */
...


     NAVIGATE_TO_JUNCTION("OrderMainMenu");
...


     <etc>
     <etc>
The HIDE_CURRENT_FORM("message") 
...
 function 
...
 causes 
...
 the 
...
 current 
...
 5250 
...
 screen 
...
 being 
...
 displayed 
...
 on 
...
 the 
...
 command 
...
 tab 
...
 to 
...
 be 
...
 hidden 
...
 and 
...
 the 
...
 message 
...
 "Sorry, 
...
 but 
...
 you 
...
 are 
...
 not 
...
 allowed 
...
 to 
...
 display 
...
 this 
...
 order 
...
 because 
...
 it 
...
 is 
...
 cancelled 
...
 or 
...
 completed." 
...
 to 
...
 appear 
...
 in 
...
 the 
...
 center 
...
 of 
...
 the 
...
 tab 
...
 instead.
...
The content of AColumn9 (ie: 
...
 "CAN", 
...
 "OPN", 
...
 "WIP", 
...
 "COM") 
...
 could 
...
 be 
...
 used 
...
 anywhere 
...
 in 
...
 INVOKE 
...
 or 
...
 BUTTON 
...
 scripts 
...
 to 
...
 limit 
...
 or 
...
 control 
...
 user 
...
 activities.
...