Patch level : at
Files correlati : at0100a.msk Ricompilazione Demo : [ ] Commento : commentato ricerca per codice ct git-svn-id: svn://10.65.10.50/trunk@11253 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
feec837ab7
commit
ab966865db
@ -686,12 +686,24 @@ BEGIN
|
||||
HELP "Numero cartella clinica"
|
||||
END
|
||||
|
||||
|
||||
STRING F_CODCT 6
|
||||
BEGIN
|
||||
PROMPT 25 8 "Cod. CT "
|
||||
FIELDS CODCT
|
||||
FLAGS "U"
|
||||
//KEY 7
|
||||
//MESSAGE COPY,5@
|
||||
//USE LF_SOGGETTI KEY 7
|
||||
//INPUT CODCT F_CODCT
|
||||
//DISPLAY "Codice CT" CODCT
|
||||
//DISPLAY "Codice@8" CODICE
|
||||
//DISPLAY "Cognome@25" COGNOME
|
||||
//DISPLAY "Nome@25" NOME
|
||||
//DISPLAY "Nato il@10" DATANASC
|
||||
//DISPLAY "Sez." CODSEZ
|
||||
//DISPLAY "Sot." CODSOT
|
||||
//DISPLAY "C." CATDON
|
||||
//OUTPUT F_CODICE CODICE
|
||||
HELP "Codice Centro Trasfusionale"
|
||||
END
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user