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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: LRSORA1

Package: Lab Service

Routine: LRSORA1


Information

LRSORA1 ;SLC/KCM - CREATE SEARCH LOGIC ; 8/5/87 11:40 ;

Source Information

Source file <LRSORA1.m>

Entry Points

Name Comments DBIA/ICR reference
EN
PLOG
STOP
TSTLIM
PARSE
SWAP ;;LROLD;LRNEW; NOTE: $L(LROLD) MUST BE >= $L(LRNEW)
HLP0
SUMMARY ;
SORTBY ;
PATS ;
LOCS ;
NOABRV ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: !,"-",$C(64+J),"-"," ",$P(LRTST(J,2),U,1)
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: " (",$P(LRTST(J,2),U,2),")"
  • Condition for execution: $P(LRTST(J,2),U,2)]""
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: " ",$P(LRTST(J,2),U,3)
  • Line Location: EN+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!,"Enter a logical expression (i.e., A AND B OR C or A&B!C)."
  • Line Location: HLP0+0
Function Call: WRITE
  • Prompt: !," NOTE: AND will compare only values from the -same- accession."
  • Line Location: HLP0+1
Function Call: WRITE
  • Prompt: !," To print all results that fall within the search criteria,"
  • Line Location: HLP0+2
Function Call: WRITE
  • Prompt: !," accept the default search logic (OR)."
  • Line Location: HLP0+3
Function Call: WRITE
  • Prompt: !!,"The location you have selected does not have an abbreviation."
  • Line Location: NOABRV+1
Function Call: WRITE
  • Prompt: !,"If you use this location, the report will list all records without"
  • Line Location: NOABRV+2
Function Call: WRITE
  • Prompt: " location",!,"abbreviations (as long as they also meet the date and"
  • Line Location: NOABRV+3
Function Call: WRITE
  • Prompt: " patient selections)",!,"This may include data from several "
  • Line Location: NOABRV+4
Function Call: WRITE
  • Prompt: "locations, with no way to be sure which is",!,"which. They will be "
  • Line Location: NOABRV+5
Function Call: WRITE
  • Prompt: "listed with the abbreviation of 'NO ABRV' or 'UNK'."
  • Line Location: NOABRV+6
Function Call: WRITE
  • Prompt: !!,"Do you still want to select this location (Y/N)?//"
  • Line Location: NOABRV+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^SC - [#44] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call