127 lines
1.5 KiB
Plaintext
127 lines
1.5 KiB
Plaintext
|
PA "Stampa consegnato per articolo/cliente" -1 -1 64 16
|
||
|
NU 251 5
|
||
|
BE
|
||
|
PR 1 1 "Ditta "
|
||
|
FL "FRD"
|
||
|
US 9 KE 1
|
||
|
CH REQUIRED
|
||
|
IN CODDITTA 251
|
||
|
DI "Codice" CODDITTA
|
||
|
DI "Ragione sociale @50" RAGSOC
|
||
|
OU 251 CODDITTA
|
||
|
OU 252 RAGSOC
|
||
|
EN
|
||
|
ST 252 50
|
||
|
BE
|
||
|
PR 15 1 ""
|
||
|
FL "D"
|
||
|
EN
|
||
|
DA 253
|
||
|
BE
|
||
|
PR 1 3 "Dalla data "
|
||
|
FI DADATA
|
||
|
CHECKTYPE REQUIRED
|
||
|
GR 1
|
||
|
EN
|
||
|
DA 254
|
||
|
BE
|
||
|
PR 28 3 "Alla data "
|
||
|
FI ADATA
|
||
|
CHECKTYPE REQUIRED
|
||
|
GR 2
|
||
|
FL "A"
|
||
|
EN
|
||
|
NU 257 6
|
||
|
BEGIN
|
||
|
PROMPT 1 4 "Cliente "
|
||
|
FLAGS "R"
|
||
|
FIELD CLIENTE
|
||
|
USE LF_CLIFO
|
||
|
INPUT TIPOCF "C"
|
||
|
INPUT CODCF 257
|
||
|
DISPLAY "Codice@10" CODCF
|
||
|
DISPLAY "Ragione Sociale@50" RAGSOC
|
||
|
OUTPUT 257 CODCF
|
||
|
OUTPUT 258 RAGSOC
|
||
|
CHECKTYPE NORMAL
|
||
|
END
|
||
|
ST 258 50 40
|
||
|
BEGIN
|
||
|
PROMPT 20 4 ""
|
||
|
USE LF_CLIFO KEY 2
|
||
|
INPUT TIPOCF "C"
|
||
|
INPUT RAGSOC 258
|
||
|
DISPLAY "Ragione Sociale@50" RAGSOC
|
||
|
DISPLAY "Codice@10" CODCF
|
||
|
COPY OUTPUT 257
|
||
|
CHECKTYPE NORMAL
|
||
|
END
|
||
|
GR -1 60 4
|
||
|
BE
|
||
|
PR 1 5 "@bDa:"
|
||
|
EN
|
||
|
ST 255 20
|
||
|
BE
|
||
|
PR 2 6 "Articolo "
|
||
|
US 47
|
||
|
FI DACODART
|
||
|
IN CODART 255
|
||
|
DI "Codice@20" CODART
|
||
|
DI "Descrizione@50" DESCR
|
||
|
OU 255 CODART
|
||
|
OU 256 DESCR
|
||
|
GR 1
|
||
|
CH NORMAL
|
||
|
EN
|
||
|
ST 256 50
|
||
|
BE
|
||
|
PR 2 7 ""
|
||
|
US 47 KE 2
|
||
|
IN DESCR 256
|
||
|
DI "Descrizione@50" DESCR
|
||
|
DI "Codice@20" CODART
|
||
|
OU 255 CODART
|
||
|
OU 256 DESCR
|
||
|
GR 1
|
||
|
CH NORMAL
|
||
|
EN
|
||
|
GR -1 60 4
|
||
|
BE
|
||
|
PR 1 9 "@bA:"
|
||
|
EN
|
||
|
ST 259 20
|
||
|
BE
|
||
|
PR 2 10 "Articolo "
|
||
|
FI ACODART
|
||
|
US 47
|
||
|
IN CODART 259
|
||
|
DI "Codice@20" CODART
|
||
|
DI "Descrizione@50" DESCR
|
||
|
OU 259 CODART
|
||
|
OU 260 DESCR
|
||
|
GR 2
|
||
|
CH NORMAL
|
||
|
EN
|
||
|
ST 260 50
|
||
|
BE
|
||
|
PR 2 11 ""
|
||
|
US 47 KE 2
|
||
|
IN DESCR 260
|
||
|
DI "Descrizione@50" DESCR
|
||
|
DI "Codice@20" CODART
|
||
|
CO OU 259
|
||
|
GR 2
|
||
|
CH NORMAL
|
||
|
EN
|
||
|
BU 24 10 2
|
||
|
BE
|
||
|
PR -12 -1 "~Stampa"
|
||
|
ME EXIT,13
|
||
|
EN
|
||
|
BU 9 10 2
|
||
|
BE
|
||
|
PR -22 -1 ""
|
||
|
EN
|
||
|
EN
|
||
|
ENDMASK
|