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

Package: PCE Patient Care Encounter

Routine: PXBHLP3


Information

PXBHLP3 ;ISL/JVS,ALB/Zoltan - HELP FOR DIAGNOSIS ;10/30/98

Source Information

Source file <PXBHLP3.m>

Entry Points

Name Comments DBIA/ICR reference
INTRO ;;6
BODY ;;12
A ;;5
E ;;10
D ;;3
PROMPT ;---Prompt for the help prompt
ROUTINE ;---routine executed when selection lists are selected
1 ;;10
2 ;;10
3 ;;10
4 ;;10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"THIS IS NOT AN ENTRY POINT "
  • Line Location: PXBHLP3+9
Function Call: WRITE
  • Prompt: !,"Enter a DIAGNOSIS associated with this patient ENCOUNTER."
  • Line Location: INTRO+1
Function Call: WRITE
  • Prompt: !,"You can enter partial names to receive a short list."
  • Line Location: INTRO+2
Function Call: WRITE
  • Prompt: !,"Above is a list of DIAGNOSES already entered. If there are any"
  • Line Location: INTRO+3
Function Call: WRITE
  • Prompt: !,"additional ones, they should be entered at this time."
  • Line Location: INTRO+4
Function Call: WRITE
  • Prompt: !," * indicates that this entry has been visited during this session."
  • Line Location: INTRO+5
Function Call: WRITE
  • Prompt: !,"a '^^' (double up arrow) will take you out of the interview"
  • Line Location: INTRO+6
Function Call: WRITE
  • Prompt: !,"For more detailed ",IOINHI,"HELP",IOINLOW," and selection lists enter ",IOINHI,"??",IOINLOW,!
  • Line Location: INTRO+7
Function Call: WRITE
  • Prompt: !,"To receive detailed help for ",IOINHI,"ADD",IOINLOW," or ",IOINHI,"DELETE",IOINLOW," enter the following:"
  • Line Location: BODY+1
Function Call: WRITE
  • Prompt: !
  • Line Location: BODY+2
Function Call: WRITE
  • Prompt: !," ",IOINHI,"A",IOINLOW," to get help on how to ADD diagnoses."
  • Line Location: BODY+3
Function Call: WRITE
  • Prompt: !," ",IOINHI,"D",IOINLOW," to get help on how to DELETE diagnoses."
  • Line Location: BODY+4
Function Call: WRITE
  • Prompt: !," ",IOINHI,"E",IOINLOW," to get help on how to EDIT diagnoses."
  • Line Location: BODY+5
Function Call: WRITE
  • Prompt: !
  • Line Location: BODY+6
Function Call: WRITE
  • Prompt: !,"To receive more ",IOINHI,"SELECTION LISTS",IOINLOW," enter the following:"
  • Line Location: BODY+7
Function Call: WRITE
  • Prompt: !
  • Line Location: BODY+8
Function Call: WRITE
  • Prompt: !," ",IOINHI,"1",IOINLOW," to get a list of ALL active diagnoses."
  • Line Location: BODY+9
Function Call: WRITE
  • Prompt: !," ",IOINHI,"2",IOINLOW," to get a list of PATIENT PROBLEMS."
  • Line Location: BODY+10
Function Call: WRITE
  • Prompt: !," ",IOINHI,"3",IOINLOW," to get a list of CLINIC diagnoses."
  • Line Location: BODY+11
Function Call: WRITE
  • Prompt: !," ",IOINHI,"4",IOINLOW," to get a list of ENCOUNTER FORM diagnoses."
  • Line Location: BODY+12
Function Call: WRITE
  • Prompt: !,"To ",IOINHI,"ADD",IOINLOW," a DIAGNOSIS enter one of the following:"
  • Line Location: A+2
Function Call: WRITE
  • Prompt: !," DIAGNOSIS NAME (e.g. ",$S($P(PXACSREC,"^",1)="ICD":"GASTROPARESIS",1:"SALMONELLA MENINGITIS"),")"
  • Line Location: A+3
Function Call: WRITE
  • Prompt: !," PARTIAL NAME of the DIAGNOSIS at least 3 letters in length(e.g. ",$S($P(PXACSREC,"^",1)="ICD":"GAS or GASTRO",1:"SAL or SALMON"),")"
  • Line Location: A+4
Function Call: WRITE
  • Prompt: !," ICD CODE number (e.g. ",$S($P(PXACSREC,"^",1)="ICD":"536.3",1:"A02.21"),")"
  • Line Location: A+5
Function Call: WRITE
  • Prompt: !," Several ICD CODE numbers at once (e.g. ",$S($P(PXACSREC,"^",1)="ICD":"536.3,250.61",1:"A02.21,C92.01"),")"
  • Line Location: A+6
Function Call: WRITE
  • Prompt: !,"To ",IOINHI,"EDIT",IOINLOW," a DIAGNOSIS enter one of the following:"
  • Line Location: E+2
Function Call: WRITE
  • Prompt: !," DIAGNOSIS NAME (e.g. ",$S($P(PXACSREC,"^",1)="ICD":"GASTROPARESIS",1:"SALMONELLA MENINGITIS"),")"
  • Line Location: E+3
Function Call: WRITE
  • Prompt: !," ICD CODE (e.g. ",$S($P(PXACSREC,"^",1)="ICD":"536.3",1:"A02.21"),")"
  • Line Location: E+4
Function Call: WRITE
  • Prompt: !," ITEM NUMBER on the left side of the list of the DIAGNOSES (e.g. 7)"
  • Line Location: E+5
Function Call: WRITE
  • Prompt: !
  • Line Location: E+6
Function Call: WRITE
  • Prompt: !,"To move the PRIMARY designation from one diagnosis to another do the following:"
  • Line Location: E+7
Function Call: WRITE
  • Prompt: !," select the current primary diagnosis"
  • Line Location: E+8
Function Call: WRITE
  • Prompt: !," answer NO to the primary diagnosis prompt"
  • Line Location: E+9
Function Call: WRITE
  • Prompt: !," select the new primary diagnosis"
  • Line Location: E+10
Function Call: WRITE
  • Prompt: !," answer YES to the primary diagnosis prompt"
  • Line Location: E+11
Function Call: WRITE
  • Prompt: !,"To ",IOINHI,"DELETE",IOINLOW," a DIAGNOSIS enter one of the following:"
  • Line Location: D+1
Function Call: WRITE
  • Prompt: !," an '@' followed by the ITEM NUMBER (e.g. @1 or @3)"
  • Line Location: D+2
Function Call: WRITE
  • Prompt: !," Multiple ITEM NUMBERS can be selected (e.g. @1,3,5 or @1-3,6,9)"
  • Line Location: D+3
Function Call: WRITE
  • Prompt: !!,"Enter '^' to leave HELP CENTER"
  • Line Location: PROMPT+3
Function Call: WRITE
  • Prompt: !,"Enter a letter or number for additional help: "
  • Line Location: PROMPT+4
Info |  Source |  Entry Points |  Interaction Calls