cb6165f09b
2475 2521 2493 2494 2559 2558 2556 2495 2487 2491 2470 2461 2568 2492 2587 2457 2458 2459 2460 2574 2582 2525 2526 2524 2523 2522 2531 2530 2529 2528 2527 2534 2533 2536 2537 2538 2510 2515 2585 2539 2570 2555 2584 2503 2500 2499 2543 2547 2569 2472 ???? git-svn-id: svn://10.65.10.50/trunk@702 c028cbd2-c16b-5b4b-a496-9718f37d4682
52 lines
905 B
Plaintext
Executable File
52 lines
905 B
Plaintext
Executable File
#include "batbcrs.h"
|
|
|
|
TOOLBAR "" 0 20 0 2
|
|
|
|
#include <toolbar.h>
|
|
|
|
ENDPAGE
|
|
|
|
PAGE "Cariche sociali" -1 -1 78 7
|
|
|
|
STRING FLD_TABCRS_CODTAB 2
|
|
BEGIN
|
|
PROMPT 3 1 "Codice "
|
|
HELP "Codice della carica sociale"
|
|
FIELD LF_TABCOM->CODTAB
|
|
KEY 1
|
|
USE %CRS
|
|
INPUT CODTAB FLD_TABCRS_CODTAB
|
|
DISPLAY "Codice" CODTAB
|
|
DISPLAY "Carica@25" S0
|
|
OUTPUT FLD_TABCRS_CODTAB CODTAB
|
|
OUTPUT FLD_TABCRS_S0 S0
|
|
CHECKTYPE REQUIRED
|
|
FLAGS "Z"
|
|
END
|
|
|
|
STRING FLD_TABCRS_S0 25
|
|
BEGIN
|
|
PROMPT 3 3 "Carica "
|
|
FIELD LF_TABCOM->S0
|
|
KEY 2
|
|
USE %CRS KEY 2
|
|
INPUT S0 FLD_TABCRS_S0
|
|
DISPLAY "Carica@25" S0
|
|
DISPLAY "Codice" CODTAB
|
|
OUTPUT FLD_TABCRS_CODTAB CODTAB
|
|
OUTPUT FLD_TABCRS_S0 S0
|
|
HELP "Descrizione della carica sociale"
|
|
CHECKTYPE REQUIRED
|
|
END
|
|
|
|
BOOLEAN CHK_TABCRS_S6
|
|
BEGIN
|
|
PROMPT 3 5 "Stampa modulo RAD"
|
|
FIELD LF_TABCOM->S6
|
|
HELP "Indicare se la carica viene stampata su modulo RAD"
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
ENDMASK
|