Patch level : 12.0 486
Files correlati : li Commento : Eliminato file errato git-svn-id: svn://10.65.10.50/branches/R_10_00@24228 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
583218a54d
commit
bae5ad25f5
@ -1,72 +0,0 @@
|
|||||||
#include "li0100a.h"
|
|
||||||
|
|
||||||
TOOLBAR "topbar" 0 0 0 2
|
|
||||||
#include <stdbar.h>
|
|
||||||
ENDPAGE
|
|
||||||
|
|
||||||
PAGE "Visualizzatore LI per documento" 0 2 0 0
|
|
||||||
|
|
||||||
DATE F_DA_DATA
|
|
||||||
BEGIN
|
|
||||||
PROMPT 1 1 "Da data "
|
|
||||||
CHECKTYPE REQUIRED
|
|
||||||
END
|
|
||||||
|
|
||||||
DATE F_A_DATA
|
|
||||||
BEGIN
|
|
||||||
PROMPT 20 1 "A data "
|
|
||||||
CHECKTYPE REQUIRED
|
|
||||||
FLAGS "A"
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER F_CODICE_CLIFO_DA 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 1 2 "Da cod. cliente: "
|
|
||||||
FLAG "UR"
|
|
||||||
USE LF_CLIFO
|
|
||||||
INPUT TIPOCF "C"
|
|
||||||
INPUT CODCF F_CODICE_CLIFO_DA
|
|
||||||
DISPLAY "Cliente" CODCF
|
|
||||||
DISPLAY "Ragione sociale@60" RAGSOC
|
|
||||||
OUTPUT F_CODICE_CLIFO_DA CODCF
|
|
||||||
GROUP 1
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER F_CODICE_CLIFO_A 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 32 2 "a: "
|
|
||||||
FLAG "UR"
|
|
||||||
USE LF_CLIFO
|
|
||||||
INPUT TIPOCF "C"
|
|
||||||
INPUT CODCF F_CODICE_CLIFO_A
|
|
||||||
COPY DISPLAY F_CODICE_CLIFO_DA
|
|
||||||
OUTPUT F_CODICE_CLIFO_A CODCF
|
|
||||||
NUM_EXPR #F_CODICE_CLIFO_A>=#F_CODICE_CLIFO_DA
|
|
||||||
WARNING "Digitare un codice maggiore o uguale al campo 'da codice cliente'"
|
|
||||||
GROUP 1
|
|
||||||
END
|
|
||||||
|
|
||||||
ENDPAGE
|
|
||||||
|
|
||||||
ENDMASK
|
|
||||||
|
|
||||||
PAGE "Riga tipo numerazione" -1 -1 78 8
|
|
||||||
|
|
||||||
ENDPAGE
|
|
||||||
|
|
||||||
TOOLBAR "Documento" 0 0 0 2
|
|
||||||
|
|
||||||
BUTTON DLG_OK 2 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 1 1 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
BUTTON DLG_CANCEL 2 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 1 1 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
|
|
||||||
ENDPAGE
|
|
||||||
|
|
||||||
ENDMASK
|
|
Loading…
x
Reference in New Issue
Block a user