Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: RASELCT

Package: Radiology Nuclear Medicine

Routine: RASELCT


Information

RASELCT ;HISC/DAD-Generic file entry selector ; Sep 28, 2022@10:59:06

Source Information

Source file <RASELCT.m>

Entry Points

Name Comments DBIA/ICR reference
EN1(RADIC,RAUTIL,RAARRY,RAINPUT,RAFLD) ;
1
EXIT ;
K
ALL ;
AL
HELP ;
SHOW
HLP
SHO
WRAP ;
PAUSE ;
SETDIC ;
CHFLD(X) ;
SEL(Y) ;
BLDPAT ;
FLD(RAFNUM,RAFLD) ; Validate if field can be sorted on i.e, if
; non-multiple and is either a pointer, free text, set of codes,
; numeric or a date/time field.
; 'RAFNUM' = File # 'RAFLD' = Field #
; returns RAPASS: 0 if valid, else 1
FLDSRT(RAFNUM,RAFLD) ; Converts the internal value to the external value
; for sets of codes & pointers.
; 'RAFNUM' = File # 'RAFLD' = Field #
; 'RAPCE' = piece position on 0 node

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$S(RANUM>1:"Another one (Select/De-Select): ",1:DIC("A")),$S((RANUM=1)&(RADIC("B")]""):RADIC("B")_"// ",1:"")
  • Line Location: 1+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: !?5,"To deselect a ",RAFLD01," type a minus sign (-)",!?5,"in front of it, e.g., -",RAFLD01,"."
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !?5,"To get all ",RAFLD01,"S type ALL."
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !?5,"Use an asterisk (*) to do a wildcard selection, e.g.,"
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !?5,"enter ",RAFLD01,"* to select all entries that begin"
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !?5,"with the text '",RAFLD01,"'. Wildcard selection is"
  • Line Location: HELP+6
Function Call: WRITE
  • Prompt: !?5,"case sensitive."
  • Line Location: HELP+7
Function Call: WRITE
  • Prompt: !!,"You have already selected:"
  • Line Location: SHOW+0
Function Call: WRITE
  • Prompt: !
  • Line Location: HLP+0
Function Call: WRITE
  • Prompt: !?3,RAD0,?15,RA(0)
  • Line Location: SHO+6
Function Call: WRITE
  • Prompt: !?3,RA(0)
  • Line Location: SHO+7
Function Call: WRITE
  • Prompt: !
  • Line Location: WRAP+1
Function Call: WRITE
  • Prompt: !?5,$P(RA," ",1,Y)
  • Line Location: WRAP+1
Info |  Source |  Entry Points |  Interaction Calls