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

Package: PCE Patient Care Encounter

Routine: PXBDREQ


Information

PXBDREQ ;ISL/JVS - DISPLAY REQUESTS ;6/17/03 10:29

Source Information

Source file <PXBDREQ.m>

Entry Points

Name Comments DBIA/ICR reference
REQ(NO) ;--Display the REQUESTED Data
N4 ;---Fourth Method--for the CPT prompts
N5 ;---Fifth Method--for the PROVIDER prompts
N6 ;---Sixth Method--for the POV(DIAGNOSIS) prompts
N7 ;---SEVENTH Method--for the STOP CODES prompts
N8 ;---EIGHTH Method--for the ENCOUNTERS prompts
PRINT(NO) ;--Display the requested information
ZP1 ;--PROVIDER AND PRIMARY
ZP2 ;--CPT PROCEDURE AND DESCRIPTION
ZP3 ;--QUANTITY OF PROCEDURES
ZP4 ;--DIAGNOSIS
ZP5 ;--STOP CODE
ZP6 ;PX124
ZP7 ;
ZP8 ;
ZP9 ;
ZP10 ;
ZP11 ;
ZP12 ;
ZP13 ;
ZP14 ;
ZP15 ;
RSET(CATEGORY) ; Reset the data in the REQ, REQI and REQE variables
; CATEGORY IS EQUAL TO FILE MNEMONIC (e.g. CPT, POV, PRV)
CPT ;CPT CODES
PRV ;PROVIDER
POV ;PURPOSE OF VISIT
STP ;STOPCODES

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"PROVIDER: ...Enter the provider associated with the CPT'S....."
  • Line Location: N4+1
Function Call: WRITE
  • Prompt: !,?5,"CPT: "
  • Line Location: N4+3
Function Call: WRITE
  • Prompt: $C(32)
  • Line Location: N4+4
Function Call: WRITE
  • Prompt: !
  • Line Location: N4+5
Function Call: WRITE
  • Prompt: !,"PROVIDER: ...Select a Provider....."
  • Line Location: N5+1
Function Call: WRITE
  • Prompt: !
  • Line Location: N5+3
Function Call: WRITE
  • Prompt: $C(32)
  • Line Location: N5+4
Function Call: WRITE
  • Prompt: !
  • Line Location: N5+5
Function Call: WRITE
  • Prompt: !,"ICD CODE: ...Select a DIAGNOSIS Code....."
  • Line Location: N6+1
Function Call: WRITE
  • Prompt: !
  • Line Location: N6+3
Function Call: WRITE
  • Prompt: $C(32)
  • Line Location: N6+4
Function Call: WRITE
  • Prompt: !
  • Line Location: N6+5
Function Call: WRITE
  • Prompt: !,"STOP CODE: ...Select an AMIS STOP Code....."
  • Line Location: N7+1
Function Call: WRITE
  • Prompt: !
  • Line Location: N7+3
Function Call: WRITE
  • Prompt: $C(32)
  • Line Location: N7+4
Function Call: WRITE
  • Prompt: !
  • Line Location: N7+5
Function Call: WRITE
  • Prompt: !,"ENCOUNTERS: ...Select an ENCOUNTER ....."
  • Line Location: N8+1
Function Call: WRITE
  • Prompt: !
  • Line Location: N8+3
Function Call: WRITE
  • Prompt: $C(32)
  • Line Location: N8+4
Function Call: WRITE
  • Prompt: !
  • Line Location: N8+5
Function Call: WRITE
  • Prompt: $P(REQE,"^",1)_" "_$P(REQE,"^",2),IOELEOL
  • Line Location: ZP1+2
Function Call: WRITE
  • Prompt: $P(REQE,"^",5)_" "_$P(REQE,"^",6),IOELEOL
  • Line Location: ZP4+2
Function Call: WRITE
  • Prompt: "DIAGNOSIS: ",$E($P(REQE,"^",NO+6),1,68),IOELEOL
  • Line Location: ZP15+1
Info |  Source |  Entry Points |  Interaction Calls