root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level : at

Browse Source 
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:
cris 2003-06-19 13:00:51 +00:00
parent feec837ab7
commit ab966865db
1 changed files with 13 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
at/at0100a.uml
View File

@ -686,12 +686,24 @@ BEGIN
HELP "Numero cartella clinica" HELP "Numero cartella clinica"
END END
STRING F_CODCT 6 STRING F_CODCT 6
BEGIN BEGIN
PROMPT 25 8 "Cod. CT " PROMPT 25 8 "Cod. CT "
FIELDS CODCT FIELDS CODCT
FLAGS "U" 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" HELP "Codice Centro Trasfusionale"
END END