TOOLBAR "" 0 20 60 2 BUTTON DLG_OK 9 2 BEGIN PROMPT -13 -1 "" END BUTTON DLG_CANCEL 9 2 BEGIN PROMPT -23 -1 "" END BUTTON DLG_DELREC 9 2 BEGIN PROMPT -33 -1 "Elimina" MESSAGE EXIT,K_DEL END ENDPAGE PAGE "Storico giacenze" -1 -1 80 23 NUMBER F_STOANNOES 4 BEGIN PROMPT 2 4 "Codice esercizio " FIELD LF_STOMAG->ANNOES USE ESC INPUT CODTAB F_STOANNOES DISPLAY "Esercizio @15" CODTAB DISPLAY "D. Inizio@15" D0 DISPLAY "D. Fine@15" D1 OUTPUT F_STOANNOES CODTAB CHECKTYPE REQUIRED END STRING F_STOUM 2 BEGIN PROMPT 2 6 "Unità di misura " FLAGS "U" FIELD LF_STOMAG->UM USE LF_UMART KEY 2 INPUT CODART F_STOCODART SELECT INPUT UM F_STOUM DISPLAY "U.M.@20" UM OUTPUT F_STOUM UM CHECKTYPE REQUIRED END NUMBER F_STOQUANT 15 5 BEGIN PROMPT 2 8 "Quantità " FIELD LF_STOMAG->QUANT CHECKTYPE REQUIRED WARNING "Indicare la quantità" END NUMBER F_STOPREZZO 18 3 BEGIN PROMPT 2 10 "Valore " FIELD LF_STOMAG->VALORE CHECKTYPE REQUIRED WARNING "Indicare il prezzo" END STRING F_STOCODART 20 BEGIN PROMPT 2 1 "Codice art. " FLAGS "H" END ENDPAGE ENDMASK