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: LRSPSICD

Package: Lab Service

Routine: LRSPSICD


Information

LRSPSICD ;AVAMC/REG - CY/EM/SP ICD SEARCH ;8/15/95 08:39

Source Information

Source file <LRSPSICD.m>

Entry Points

Name Comments DBIA/ICR reference
ASK
QUE
L
I
TO
PRT
HERE
DXS

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!?20,LRO(68)," SEARCH BY ICD CODE"
  • Line Location: LRSPSICD+7
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,$C(7),"Beginning and Ending dates must both be prior to "_LR("I10DTE")_"(ICD-9)"
  • Line Location: ASK+4
Function Call: WRITE
  • Prompt: !,"or both be on or after "_LR("I10DTE")_"(ICD-10)."
  • Line Location: ASK+5
Info |  Source |  Entry Points |  Interaction Calls