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

Package: PCE Patient Care Encounter

Routine: PXBPSTP


Information

PXBPSTP ;ISL/JVS - PROMPT FOR STOP CODE ;7/24/96 09:55

Source Information

Source file <PXBPSTP.m>

Entry Points

Name Comments DBIA/ICR reference
STP ;-----First Stop Code Entry point
S ;-----Second Stop Code Entry point
S1 ;-----Third Stop Code Entry point
S2 ;-----Fourth Stop Code Entry point
M ;-----IF Multiple entries can be added
LI ;-----If picked a line number--no for it reason at this time
SFIN ;-----Finish up the Variables of the STOP CODE
STPX ;-----Exit the routine and clean up the variabLES

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: IOUON,"Previous Entry: ",$G(PXBNSTPL(1))
  • Line Location: STP+1
Function Call: WRITE
  • Prompt: " "
  • Line Location: STP+1
Function Call: WRITE
  • Prompt: IOUOFF
  • Line Location: STP+2
Function Call: WRITE
  • Prompt: !,"Enter '+' for next page, '-' for previous page."
  • Line Location: S+2
Function Call: WRITE
  • Prompt: !,"Enter a STOP CODE: "
  • Line Location: S+3
Function Call: WRITE
  • Prompt: IOELEOL
  • Line Location: S+3
Function Call: WRITE
  • Prompt: !,"Enter ",IOINHI,"NEXT",IOINLOW," STOP CODE: "
  • Line Location: S+4
Function Call: WRITE
  • Prompt: IOELEOL
  • Line Location: S+4
Function Call: READ
  • Variable: DATA
  • Timeout: DTIME
  • Line Location: S+5
Function Call: WRITE
  • Prompt: !,"You cannot select main STOP CODE "_$G(STOPC)
  • Line Location: S1+6
Function Call: WRITE
  • Prompt: DATA
  • Line Location: S1+8
Function Call: WRITE
  • Prompt: IOEDEOP
  • Line Location: S2+1
Function Call: WRITE
  • Prompt: IORC
  • Line Location: S2+7
Function Call: WRITE
  • Prompt: IOCUB,IOECH
  • Line Location: LI+2
Function Call: WRITE
  • Prompt: "--"_$P(PXBSAM($O(PXBKY($P(STP,"^",2),0))),"^",2)
  • Line Location: SFIN+14
Info |  Source |  Entry Points |  Interaction Calls