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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: VENPCCC1

Package: PCC New Encounter Form

Routine: VENPCCC1


Information

VENPCCC1 ; IHS/OIT/GIS - CHECK LIST EDITING AND VIEWING ;

Source Information

Source file <VENPCCC1.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 5 ^DIC  YN^DICN  ^DIE  ^DIK  ^DIR  
IHS VA Utilities 1 ^XBFMK  

Entry Points

Name Comments DBIA/ICR reference
IASK(DICS) ; EP - ASK FOR AN ITEM
AT(LIEN,MODE) ; EP-LIST TEMPLATES ASSOCIATED WITH A CHECKLIST
DI ; EP-DELETE AN ITEM
DIC ; EP-DELETE AN ITEM FROM A CHECKLIST
CLIST
ISEP ; --- ----------------------------- ---- --------- ---------
CHDR ; # NAME MAIL MERGE FLD PRE POST
ACT ; EP-ASSIGN A CHECKLIST TO A TEMPLATE
ACFIN
AIC ; EP-ATTACH AN ITEM TO A CHECKLIST
GCPT ; EP-GLOBAL EDIT OF CPT CODE
DCTX
DCT ; EP-DELETE A CHECKLIST FROM A PCC+ TEMPLATE
GCPTX
AC ; EP-ADD A CHECKLIST
VC ; EP-VIEW CHECLIST PROPERTIES
EI ; EP-EDIT AN ITEM
SI() ; EP - SELECT AN ITEM
AI ;EP- ADD AN ITEM
VI ; EP-VIEW AN ITEM
IHDR ; # ITEM GRP CODE1 CODE2
DICD
ATI(IIEN) ; EP-ASSOCIATED TEMPLATES FOR ITEMS
LIST
AC1
ILIST
CSEP ; --- ------------------------------ -------------- --------- ---------
DICX
SC() ; EP-SELECT A CHECKLIST

External References

Name Field # of Occurrence
^DIC AIC+7, AIC+13, ACT+8, ACT+15, DCT+4, DCT+8, AC1+7, AC1+13, AI+5, IASK+5
YN^DICN DIC+15, ACT+10, GCPT+13, DI+6
^DIE AC1+15, AI+8, EI+7
^DIK DICD+1, DI+8
^DIR DIC+30, AC1+1, GCPT+3, GCPT+8
^XBFMK AIC+15, DICX, ACT+9, ACT+16, DCTX, ACFIN, GCPTX, AI+9, DI+9, EI+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Select an ITEM to assign to a checklist ->"
  • Line Location: AIC+2
Function Call: WRITE
  • Prompt: !,"This item is already in this checklist. Try again..."
  • Line Location: AIC+9
Function Call: WRITE
  • Prompt: !,"OK, this item will now appear on the checklist!"
  • Line Location: AIC+14
Function Call: WRITE
  • Prompt: !,"Select the ITEM to be deleted ->"
  • Line Location: DIC+2
Function Call: WRITE
  • Prompt: !,"This item is not currently assigned to any checklists!"
  • Line Location: DIC+8
Function Call: WRITE
  • Prompt: !,"This item is currently assigned to the "_CNAME_" checklist",!,"Sure you want to delete it"
  • Line Location: DIC+14
Function Call: WRITE
  • Prompt: !,"This item is currently assigned to the following checklists ->"
  • Line Location: DIC+19
Function Call: WRITE
  • Prompt: !?3,CNT,?6,CNAME
  • Line Location: DIC+27
Function Call: WRITE
  • Prompt: !,"OK, this item has been removed from the checklist..."
  • Line Location: DICD+2
Function Call: WRITE
  • Prompt: !,"Select a checklist to assign to a PCC+ template ->"
  • Line Location: ACT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ACT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: ACT+5
Function Call: WRITE
  • Prompt: !,"This checklist is already on the template! Request cancelled..."
  • Line Location: ACT+9
Function Call: WRITE
  • Prompt: !,"OK, this checklist will now appear on the template!"
  • Line Location: ACT+17
Function Call: WRITE
  • Prompt: !!,"The ",CNAME," checklist has been deleted from",!,"the ",TNAME," template..."
  • Line Location: DCT+12
Function Call: WRITE
  • Prompt: !,"This name has already been used. Try again..."
  • Line Location: AC1+4
Function Call: WRITE
  • Prompt: !,"The name '"_NAME_"' has already been used."
  • Line Location: AC1+11
Function Call: WRITE
  • Prompt: !,"Try again..."
  • Line Location: AC1+11
Function Call: WRITE
  • Prompt: !,"OK, "_NAME_" has been added as a new checklist..."
  • Line Location: AC1+16
Function Call: WRITE
  • Prompt: !,"Sure you want to change every instance of a CPT code from ",FROM," to ",TO
  • Line Location: GCPT+12
Function Call: WRITE
  • Prompt: !,"The code for ",$P(X,U)," has been changed!"
  • Line Location: GCPT+23
Function Call: WRITE
  • Prompt: !!,"Select an item to DELETE ->"
  • Line Location: DI+2
Function Call: WRITE
  • Prompt: !!,"Are you sure you want to DELETE this item"
  • Line Location: DI+5
Function Call: WRITE
  • Prompt: !!,"Select an item to EDIT ->"
  • Line Location: EI+2
Function Call: WRITE
  • Prompt: !!,$E($T(CHDR),8,999),!,$E($T(CSEP),8,999)
  • Line Location: CLIST+0
Function Call: WRITE
  • Prompt: !!,$E($T(IHDR),8,999),!,$E($T(ISEP),8,999)
  • Line Location: ILIST+0
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+2
Function Call: WRITE
  • Prompt: "Enter 1-"_(CNT-1)_" or press <Enter> to see more: "
  • Line Location: LIST+4
Function Call: WRITE
  • Prompt: $C(13),?78,$C(13)
  • Line Location: LIST+7
Function Call: WRITE
  • Prompt: ?Z,Y
  • Line Location: LIST+11
Function Call: READ
  • Timeout: $G(DT,60)
  • Variable: SEL
  • Line Location: LIST+14
Function Call: WRITE
  • Prompt: !,"Enter 1-"_$O(ARR(999),-1)_" or press '^' to quit: "
  • Line Location: LIST+14
Function Call: WRITE
  • Prompt: " ??"
  • Line Location: LIST+16
Function Call: WRITE
  • Prompt: " (",$P($G(^VEN(7.91,ARR(SEL,0),0)),U),")"
  • Line Location: LIST+17
Function Call: WRITE
  • Prompt: !
  • Line Location: LIST+18
Function Call: WRITE
  • Prompt: !,"This item is not associated with any checklists or templates!"
  • Line Location: ATI+1
Function Call: WRITE
  • Prompt: !,"This item is associated with the following checklists and PCC+ templates: "
  • Line Location: ATI+3
Function Call: WRITE
  • Prompt: !,?TAB
  • Line Location: AT+5
Function Call: WRITE
  • Prompt: "PCC+ templates associated with "
  • Condition for execution: MODE
  • Line Location: AT+5
Function Call: WRITE
  • Prompt: NAME
  • Line Location: AT+5
Function Call: WRITE
  • Prompt: !,?TAB,"No PCC+ templates are associated with this checklist!"
  • Line Location: AT+9
Function Call: WRITE
  • Prompt: !,?TAB,%
  • Line Location: AT+10
Routine Call
  • DIE
  • Line Location:
    • AC1+15
    • AI+8
    • EI+7
Routine Call
  • DIC
  • Line Location:
    • AIC+7
    • AIC+13
    • ACT+8
    • ACT+15
    • DCT+4
    • DCT+8
    • AC1+7
    • AC1+13
    • AI+5
    • IASK+5
Routine Call
  • DIR
  • Line Location:
    • DIC+30
    • AC1+1
    • GCPT+3
    • GCPT+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VEN(7.41 - [#19707.41] Classic Fileman Calls
^VEN(7.9 - [#19707.9] Classic Fileman Calls
^VEN(7.91 - [#19707.91] Classic Fileman Calls
^VEN(7.98 - [#19707.98] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^VEN(7.41 - [#19707.41] ACT+9, DCT+10, AT+8, AT+10
^VEN(7.9 - [#19707.9] DIC+13, DIC+24, DCT+11, AC1+4, AC1+11, SC+3, SC+4, SC+5, AT+4
^VEN(7.91 - [#19707.91] AIC+9, DIC+7, DIC+16, GCPT+16, GCPT+17, GCPT+22*, SI+3, SI+4, SI+5, LIST+17
, ATI+1, ATI+4, ATI+5
^VEN(7.98 - [#19707.98] AC1+9, SC+8

Label References

Name Line Occurrences
$$IASK DI+3, EI+3
$$SC ACT+3, VC+2
$$SI AIC+3, DIC+4, VI+2
AC1 AC1+4, AC1+11
ACFIN AC1+2, AC1+3
AT DIC+5, ACT+4, VC+3, ATI+6
ATI AIC+4, VI+3, DI+4, EI+4
CHDR CLIST
CSEP CLIST
DCTX DCT+4, DCT+8
DICD DIC+17
DICX DIC+31, DIC+32, DIC+33
GCPTX GCPT+4, GCPT+5, GCPT+9, GCPT+10, GCPT+14
IHDR ILIST
ILIST LIST+16
ISEP ILIST
LIST CLIST+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DIC+1~, DIC+3~, DIC+4*, DIC+5, DIC+6, DIC+10*, DIC+11, DIC+12, DIC+15*, DIC+21*
, DIC+22, DIC+23, ACT+2~, ACT+10*, VI+1~, VI+2*, VI+3, VC+1~, VC+2*, VC+3
, AC+1~, AC1+10*, GCPT+1~, GCPT+13*, GCPT+14, DI+1~, DI+6*, SC+1~, SC+5*, SC+6
, SC+7, SI+1~, LIST+5!*, LIST+6, AT+1~, AT+10*
%Y ACT+2~, GCPT+1~, DI+1~
ARR DIC+1~, SC+1~, SI+1~
ARR( DIC+26*, DIC+33, SC+10*, SC+11*, SI+14*, SI+15*, LIST+1, LIST+9, LIST+16, LIST+17
, LIST+19
ARR(999 LIST+14
C1 GCPT+1~, GCPT+19*
C2 GCPT+1~, GCPT+20*
CFLG SI+1~, SI+2*, LIST+17
CKIEN DIC+1~, DIC+12*, DIC+23*, DIC+26, DCT+1~, DCT+9*, DCT+10, ATI+2~, ATI+4*, ATI+5
CNAME DIC+1~, DIC+13*, DIC+14, DIC+24*, DIC+27, DCT+1~, DCT+11*, DCT+12
CNT DIC+1~, DIC+20*, DIC+25*, DIC+26, DIC+27, DIC+30, SC+1~, SC+2*, SC+9*, SC+10
, SC+11, SI+1~, SI+2*, SI+6*, SI+14, SI+15, LIST*, LIST+1*, LIST+3, LIST+4
, LIST+9
CODE1 SI+1~, SI+12*, SI+14
CODE2 SI+1~, SI+13*, SI+14
DA AIC+1~, DIC+1~, DIC+16*, DIC+33*, ACT+2~, DCT+1~, AC+1~, AC1+14*, GCPT+1~, AI+1~
, AI+6*, DI+1~, DI+7*, EI+1~, EI+5*
DA(1 AIC+10*, DICD*, ACT+11*, ACT+12, DCT+5*, DCT+6, DCT+10
DDER AI+9!
DIC AIC+1~, AIC+5*, AIC+10*, ACT+2~, ACT+7*, ACT+12*, DCT+1~, DCT+3*, DCT+6*, AC+1~
, AC1+6*, AC1+12*, AC1+14, AI+1~, AI+2*, AI+3, IASK+1~, IASK+3*
DIC("A" AIC+6*, ACT+6*, DCT+2*, DCT+7*, AC1+6*, AI+4*, IASK+4*
DIC("P" AIC+11*, ACT+13*
DIC("S" IASK+2*
DIC(0 AIC+5*, AIC+11*, ACT+7*, ACT+12*, DCT+3*, DCT+6*, AC1+6*, AC1+12*, AI+3*, IASK+3*
DICS DIC+1~, IASK~, IASK+2
DIE AC+1~, AC1+14*, AI+1~, AI+3*, EI+1~, EI+5*
DIK DIC+1~, DICD*, DI+1~, DI+7*
DIR AC+1~, GCPT+1~
DIR("?" GCPT+2*, GCPT+7*
DIR("A" DIC+29*, AC1*, GCPT+2*, GCPT+7*
DIR(0 DIC+30*, AC1*, GCPT+2*, GCPT+7*
>> DIRUT AC1+3
>> DLAYGO AIC+5*, AIC+11*, ACT+7*, ACT+13*, AC1+12*, AI+2*
DR AC+1~, AC1+14*, AI+1~, AI+7*, EI+1~, EI+6*
DT LIST+14
DTIME LIST+5
>> DTOUT DIC+31, AC1+3, GCPT+4, GCPT+9
>> DUOUT DIC+31, GCPT+4, GCPT+9
>> FROM GCPT+6*, GCPT+12, GCPT+19, GCPT+20
GRP SI+1~, SI+7*, SI+8*, SI+9*, SI+10*, SI+11*, SI+14
I AT+1~, AT+10*
IIEN AIC+1~, AIC+3*, AIC+4, AIC+9, AIC+10, DIC+1~, DIC+6*, DIC+7, DIC+16, DICD
, GCPT+1~, GCPT+15*, GCPT+16*, GCPT+17, GCPT+22, DI+1~, DI+3*, DI+4, DI+7, EI+1~
, EI+3*, EI+4, EI+5, SI+1~, SI+4*, SI+5, SI+15, ATI~, ATI+1, ATI+4
, ATI+5
LIEN AIC+1~, AIC+8*, AIC+9, AIC+12, DIC+1~, DIC+6*, DIC+7*, DIC+11*, DIC+13, DIC+16
, DIC+22*, DIC+24, ACT+2~, ACT+3*, ACT+4, ACT+9, ACT+14, DCT+1~, DCT+10*, DCT+11
, SC+1~, SC+4*, SC+5, SC+11, ATI+2~, ATI+5*, ATI+6, AT~, AT+4, AT+8
MN SC+1~, SC+8*, SC+10
MODE AT~, AT+2*, AT+3, AT+5, AT+7
NAME AC+1~, AC1+5*, AC1+10*, AC1+11, AC1+12, AC1+16, SC+1~, SC+2*, SC+3*, SC+4
, SC+10, SI+1~, SI+2*, SI+3*, SI+4, SI+14, AT+1~, AT+4*, AT+5
OGIEN AC+1~, AC1+8*, AC1+9, SC+1~, SC+6*, SC+8
PCE DIC+1~, DIC+21*, SC+1~, SI+1~, LIST+9*
PMN AC+1~, AC1+9*, AC1+10
POST SC+7*, SC+10, SI+1~
PRE SC+7*, SC+10, SI+1~
SEL SC+1~, SI+1~, LIST*, LIST+1, LIST+3, LIST+6*, LIST+14*, LIST+15, LIST+16, LIST+17
, LIST+19
STG DIC+1~, DIC+6*, DIC+7*, DIC+8, DIC+9, DIC+10, DIC+21, AT+1~, AT+6*, AT+8*
, AT+9, AT+10
TAB AT+1~, AT+3*, AT+5, AT+7*, AT+9, AT+10
TIEN AT+1~, AT+6*, AT+8*, AT+10*
TNAME DCT+1~, DCT+5*, DCT+12
>> TO GCPT+11*, GCPT+12, GCPT+19, GCPT+20
U DIC+7, DIC+9, DIC+10, DIC+13, DIC+21, DIC+24, DCT+5, DCT+10, DCT+11, AC1+9
, GCPT+19, GCPT+20, GCPT+23, SC+6, SC+7, SC+8, SI+8, SI+9, SI+10, SI+11
, SI+12, SI+13, LIST+9, LIST+17, ATI+5, AT+4, AT+8, AT+10
X AIC+1~, AIC+12*, DIC+1~, ACT+2~, ACT+14*, DCT+1~, AC+1~, AC1+2, AC1+4, AC1+5
, AC1+12*, GCPT+1~, GCPT+17*, GCPT+19*, GCPT+20*, GCPT+22, GCPT+23, AI+1~, EI+1~, IASK+1~
, SI+1~, SI+5*, SI+8, SI+9, SI+10, SI+11, SI+12, SI+13, LIST+9*, LIST+10
Y AIC+1~, AIC+7, AIC+8, DIC+1~, DIC+32, DIC+33, ACT+2~, ACT+8, ACT+9, ACT+11
, ACT+15, DCT+1~, DCT+4, DCT+5, DCT+8, DCT+9, AC+1~, AC1+7, AC1+8, AC1+13
, AC1+14, GCPT+5, GCPT+6, GCPT+10, GCPT+11, GCPT+18*, GCPT+19*, GCPT+20*, GCPT+21, AI+1~
, AI+5, AI+6, EI+1~, IASK+1~, IASK+5, IASK+6, SI+1~, LIST+10*, LIST+11
Z SI+1~, LIST+10*, LIST+11

Marked Items

Name Field # of Occurrence
$T(CHDR CLIST
$T(CSEP CLIST
$T(IHDR ILIST
$T(ISEP ILIST
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All