Name | Value |
---|---|
NAME | PSJ LM IV AC/EDIT |
TYPE OF LIST | PROTOCOL |
RIGHT MARGIN | 80 |
TOP MARGIN | 6 |
BOTTOM MARGIN | 20 |
OK TO TRANSPORT? | OK |
USE CURSOR CONTROL | YES |
PROTOCOL MENU | PSJ PC IV AC/EDIT ACTION |
ALLOWABLE NUMBER OF ACTIONS | 2 |
AUTOMATIC DEFAULTS | YES |
HIDDEN ACTION MENU | PSJ LM ORDER VIEW HIDDEN ACTIONS |
HEADER CODE | D HDR^PSJLMHED(DFN) |
EXIT CODE | S VALMBCK="Q" D AEEXIT^PSJLIACT K ^PS(53.45,+$G(PSJSYSP),6) |
ENTRY CODE | D ASKOVR^PSGOEE($G(Y(1)),$G(PSJORD),.PSJSTARI) D ACEDIT^PSJLIACT |
ARRAY NAME | ^TMP("PSJI",$J) |