Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: PXBGCPT4

Package: PCE Patient Care Encounter

Routine: PXBGCPT4


Information

PXBGCPT4 ;ISL/JVS,ESW - DOUBLE ?? GATHERING OF FORM PROCEDURES ; 10/31/02 12:06pm

Source Information

Source file <PXBGCPT4.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
PCE Patient Care Encounter 3 CPT^PXBAICS  (LOC,WIN17)^PXBCC  HELP1^PXBUTL1  
Automated Information Collection System 1 GETLST^IBDF18A  
DRG Grouper 1 ($$MOD,$$MODP)^ICPTMOD  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
PCE Patient Care Encounter 1 PXBHLP4  

Entry Points

Name Comments DBIA/ICR reference
LOC ;--LOCATE CURSOR
PRMPT ;---WRITE PROMPT HERE
SUB ;--DISPLAY LIST TO THE SCREEN
VAL ;-----Set the VAL equal to the value
PRMPT2 ;-----Yes and No prompt if only one choice
DOUBLE1(FROM) ;--Entry point
SETUP ;-SETP VARIABLES
START1 ;--RECYCLE POINT
LIST ;-DISPLAY LIST TO THE SCREEN
EXITNEW ;--EXIT
BACK ;
HEAD ;--HEAD
FORWARD ;
NEW ;

External References

Name Field # of Occurrence
^DIR PRMPT+10, PRMPT2+6
GETLST^IBDF18A START1+3
$$MOD^ICPTMOD START1+19
$$MODP^ICPTMOD START1+18
CPT^PXBAICS START1+3
LOC^PXBCC PRMPT+2, LOC+1, PRMPT2+2
WIN17^PXBCC PRMPT+1, PRMPT2+1
HELP1^PXBUTL1 START1+30

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"THIS IS NOT AN ENTRY POINT"
  • Line Location: PXBGCPT4+5
Function Call: WRITE
  • Prompt: IOCUU,IOCUU,!,IOELEOL
  • Line Location: START1+25
Function Call: WRITE
  • Prompt: !
  • Line Location: START1+27
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PRMPT+3
Function Call: WRITE
  • Prompt: !,"Enter '^' to quit"
  • Line Location: PRMPT+4
Function Call: WRITE
  • Prompt: !," END OF LIST"
  • Line Location: PRMPT+5
Function Call: WRITE
  • Prompt: IOEDEOP
  • Line Location: LOC+2
Function Call: WRITE
  • Prompt: !,IOCUU,IOBON,"HELP SCREEN",IOSGR0
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: ?(IOM-$L(TITLE))\2,IOINHI,TITLE,IOINLOW,IOELEOL
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !!," E N D O F L I S T"
  • Line Location: SUB+1
Routine Call
  • DIR
  • Line Location:
    • PRMPT+10
    • PRMPT2+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ICPT - [#81] START1+11
^ICPT("B" START1+11
^TMP("PXBTANA" EXITNEW+1!, BACK+1, BACK+2, FORWARD+1, FORWARD+2, SUB+1, SUB+4, SUB+5
^TMP("PXBTOTAL" START1+14*, START1+15*, START1+21*, LIST+6, LIST+9, LIST+10, LIST+14, LIST+17, VAL+1, VAL+3
, VAL+4, EXITNEW+1!

Label References

Name Line Occurrences
EXITNEW PRMPT+13
LIST PRMPT+11
LOC START1+27, LIST+2
PRMPT2 LIST+21
VAL PRMPT2+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BACK NEW+5*
>> CLINIC START1+3
CNT NEW+3~, START1+7*, START1+13*, START1+14, START1+15, START1+21, START1+22, SUB+3*, SUB+4*
CNUM NEW+3~, LIST+5*, LIST+7*, LIST+8, LIST+16
CODE NEW+3~, START1+9*, START1+10, START1+11, START1+14, START1+18, LIST+9*, LIST+11
CONT NEW+3~, NEW+6*, LIST+4, LIST+8*, LIST+12, LIST+13*, LIST+16*
CYCLE NEW+2~
>> DATA NEW+6
DIR EXITNEW+1!
DIR("?" PRMPT+8*
DIR("A" PRMPT+6*, PRMPT+7*, PRMPT2+3*
DIR("B" PRMPT2+4*
DIR(0 PRMPT+9*, PRMPT2+5*
DIRUT PRMPT+13!
DTIME START1+31
FIELD NEW+2~, SETUP+1*
FILE NEW+2~, SETUP+1*
FROM DOUBLE1~
HEADING NEW+2~, START1+36*, LIST+3, SUB+2, SETUP+2*
INDEX NEW+2~, NEW+5*
>> IOBON HEAD+1
>> IOCUU START1+25, HEAD+1
>> IOEDEOP LOC+2
>> IOELEOL START1+25, HEAD+2
>> IOINHI HEAD+2
>> IOINLOW HEAD+2
IOM START1+29, HEAD+2
>> IOSGR0 HEAD+1
MNUM NEW+3~, LIST+5*, LIST+8, LIST+15*, LIST+16
MODSTR NEW+3~, START1+19*, START1+20, START1+21, LIST+17*, LIST+18, VAL+2*, VAL+4*, EXITNEW+3
NAME NEW+2~, START1+12*, START1+15, LIST+10*, LIST+11, SUB+5*, SUB+6
OK NEW+2~, START1+31*
PRV NEW+3~
>> PXBCNT PRMPT+1, PRMPT2+1
PXBPMT NEW+3~
PXBPMT( START1+8, START1+9, START1+12, START1+17, START1+18
PXBPMT(0 START1+5, START1+6
PXMDIEN NEW+3~, START1+18*, START1+19
QT NEW+3~, LIST+5*, LIST+6, LIST+8*, LIST+14, LIST+16*
>> RESULTS START1+28*, START1+29
SCREEN NEW+2~
START NEW+2~, NEW+6*, BACK+1*, FORWARD+1*
START("IEN" BACK+2*, FORWARD+2*
SUB NEW+2~, NEW+6*, START1+7*, START1+8*, START1+9, START1+12, START1+17, START1+18, LIST+4*, LIST+6*
, LIST+8, LIST+9, LIST+10, LIST+11, LIST+14, LIST+16, LIST+17, PRMPT+4, PRMPT+6, PRMPT+11
, PRMPT+12, SUB+3*, SUB+4*, SUB+5, SUB+6
SUB2 NEW+3~, NEW+6*, LIST+6*, PRMPT+9
SUBM NEW+3~, NEW+6*, START1+16*, START1+17*, START1+18, START1+21, LIST+12*, LIST+14*, LIST+16, LIST+17
, VAL+2*, VAL+3*, VAL+4
TANA EXITNEW+2!
TITLE NEW+2~, START1+1*, HEAD+2
TOTAL NEW+3~, START1+5*, START1+22*, START1+25, START1+32*, LIST+21, PRMPT+5, EXITNEW+2!
U START1+9, START1+11, START1+12, START1+20, START1+21, LIST+4, LIST+8, LIST+12, LIST+13, LIST+16
, LIST+18, VAL+4, EXITNEW+3
>> VAL PRMPT+13*, VAL+1*, EXITNEW+3
>> X PRMPT+11, PRMPT+12*, VAL+1, VAL+3, VAL+4, PRMPT2+7*, PRMPT2+8*
>> Y PRMPT2+7, PRMPT2+8

Marked Items

Name Field # of Occurrence
$T(CPT^PXBAICS START1+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All