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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBJPS6

Package: Integrated Billing

Routine: IBJPS6


Information

IBJPS6 ;ALB/WCJ - IB Site Parameters, Administrative Contractors ; 27-AUG-2015

Source Information

Source file <IBJPS6.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 5 ($$FIND1,FIND)^DIC  UPDATE^DIE  ^DIK  $$EXTERNAL^DILFD  ^DIR  
List Manager 4 EN^VALM  ($$SETSTR,CLEAR,FULL,PAUSE)^VALM1  SET^VALM10  EN^VALM2  
Kernel 2 $$UP^XLFSTR  DISP^XQORM1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Integrated Billing 7 IBJP ADMIN CONTRACTOR COM  IBJP ADMIN CONTRACTOR COM ADD TYPE  IBJP ADMIN CONTRACTOR COM DEL TYPE  IBJP ADMIN CONTRACTOR MED  IBJP ADMIN CONTRACTOR MED ADD TYPE  IBJP ADMIN CONTRACTOR MED DEL TYPE  IBJPS  

Entry Points

Name Comments DBIA/ICR reference
EN(WHICH) ; -- main entry point for IBJP ALT PRIM PAYER ID TYP
; Input: WHICH - 1 - Using template IBJP ADMIN CONTRACTOR MED
; 2 - Using template IBJP ADMIN CONTRACTOR COM
HDR(WHICH) ; -- header code
; Input: WHICH - 1 - Using template IBJP ADMIN CONTRACTOR MED
; 2 - Using template IBJP ADMIN CONTRACTOR COM
INIT(WHICH) ; Initialize variables and list array
; Input: WHICH - 1 - Using template IBJP ADMIN CONTRACTOR MED
; 2 - Using template IBJP ADMIN CONTRACTOR COM
; Output: ^TMP("IBJPS6",$J) - Body lines to display for specified template
BLD(WHICH) ; Build screen array, no variables required for input
; Input: WHICH - 1 - Using template IBJP ADMIN CONTRACTOR MED
; 2 - Using template IBJP ADMIN CONTRACTOR COM
; Output: ^TMP("IBJPS6",$J) - Body lines to display for specified template
BLDLN(CTR,NAME,IEN) ; Builds a line to display and insurance
; Input: CTR - Current Line Counter
; NAME - Insurance Company Name
; IEN - IEN of the insurance to be displayed
; Output: LINE - Formatted for settng into the list display
SETL(LINE,DATA,LABEL,COL,LNG) ; Creates a line of data to be set into the body
; of the worklist
; Input: LINE - Current line being created
; DATA - Information to be added to the end of the current line
; LABEL - Label to describe the information being added
; COL - Column position in line to add information add
; LNG - Maximum length of data information to include on the line
; Returns: Line updated with added information
HELP(WHICH) ; -- help code
; Input: WHICH - 1 - Using template IBJP ADMIN CONTRACTOR MED
; 2 - Using template IBJP ADMIN CONTRACTOR COM
EXIT(WHICH) ; Exit code
; Input: WHICH - 1 - Using template IBJP ADMIN CONTRACTOR MED
; 2 - Using template IBJP ADMIN CONTRACTOR COM
EXPND ; -- expand code
ADD(WHICH) ; Listman Protocol Action to add an entry to the specified Site Parameter node
; Input: WHICH - 1 - Using template IBJP ADMIN CONTRACTOR MED
; 2 - Using template IBJP ADMIN CONTRACTOR COM
DEL(WHICH) ; Listman Protocol Action to delete an entry from the specified Site Parameter node
; Input: WHICH - 1 - Using template IBJP ADMIN CONTRACTOR MED
; 2 - Using template IBJP ADMIN CONTRACTOR COM
ENTSEL(NODE,IENS,WHICHF)
LOCK(NODE)
UNLOCK(NODE) ;EP
; Unlocks the Site Parameter node that is being worked
; Input: NODE - Site Parameter node where the data resides
SELEVENT(FULL,PROMPT,DLINE,MULT,WLIST)

External References

Name Field # of Occurrence
$$FIND1^DIC ADD+19
FIND^DIC ENTSEL+24
UPDATE^DIE ADD+21, ENTSEL+56
^DIK DEL+36
$$EXTERNAL^DILFD BLD+14, DEL+21
^DIR DEL+53, ENTSEL+18, ENTSEL+33, ENTSEL+44, ENTSEL+52
EN^VALM EN+5
$$SETSTR^VALM1 BLDLN+6, BLDLN+7
CLEAR^VALM1 EXIT+4
FULL^VALM1 ADD+8, DEL+10, SELEVENT+18
PAUSE^VALM1 LOCK+13, SELEVENT+27
SET^VALM10 BLD+28
EN^VALM2 SELEVENT+30
$$UP^XLFSTR ENTSEL+21
DISP^XQORM1 HELP+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: $E($G(TARGET("DILIST",1,1)),$L(IBSAVEX)+1,99)
  • Line Location: ENTSEL+31
Function Call: WRITE
  • Prompt: !,I,?3,TARGET("DILIST",1,I)
  • Line Location: ENTSEL+42
Function Call: WRITE
  • Prompt: @IOF,"Someone else is editing the "_TEXT
  • Line Location: LOCK+11
Function Call: WRITE
  • Prompt: !,"Please Try again later"
  • Line Location: LOCK+12
Function Call: WRITE
  • Prompt: !,*7,">>>> Only single entry selection is allowed"
  • Line Location: SELEVENT+24
Routine Call
  • DIC
  • Line Location:
    • ADD+19
Routine Call
  • DIC
  • Line Location:
    • ENTSEL+24
Routine Call
  • DIE
  • Line Location:
    • ADD+21
    • ENTSEL+56
Routine Call
  • DIR
  • Line Location:
    • DEL+53
    • ENTSEL+18
    • ENTSEL+33
    • ENTSEL+44
    • ENTSEL+52
Routine Call
  • VALM
  • Line Location:
    • EN+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(355.98 - [#355.98] FIND^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(36 - [#36] DEL+29
^IBA(355.98 - [#355.98] ENTSEL+27, ENTSEL+47
^IBE(350.9 - [#350.9] BLD+10, BLD+12, DEL+20, DEL+29, LOCK+7, UNLOCK+3
^TMP("IBJPS6" INIT+4!, BLD+19*, EXIT+3!
^TMP($J INIT+4!, BLD+29*, EXIT+3!, SELEVENT+37

Label References

Name Line Occurrences
$$BLDLN BLD+27
$$ENTSEL ADD+10
$$LOCK ADD+7, DEL+9
$$SELEVENT DEL+11
$$SETL BLD+18
BLD INIT+5
INIT ADD+24, DEL+55
UNLOCK ADD+12, ADD+22, DEL+16, DEL+54

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT BLD+5~, BLD+8*, BLD+14*, BLD+16, DEL+4~, DEL+26*, DEL+33*, DEL+43, DEL+44
CNT2 DEL+4~, DEL+26*, DEL+30*, DEL+47, DEL+48
COL SETL~, SETL+8
CTR BLDLN~, BLDLN+6
DA DEL+4~, DEL+26*, DEL+28*, DEL+29, DEL+31, DEL+34, ENTSEL+8~, LOCK+6~
DA(1 DEL+26*, DEL+35
DATA SETL~, SETL+8
DELETED DEL+5~, DEL+34*, DEL+45
DIC ENTSEL+8~
DIK DEL+4~, DEL+35*
DILIST ENTSEL+20!
DIR ADD+3~, DEL+4~, ENTSEL+8~, ENTSEL+15!, ENTSEL+32!, ENTSEL+51!, LOCK+6~, SELEVENT+16~, SELEVENT+26!
DIR("A" DEL+38*, DEL+39*, DEL+44*, DEL+45*, DEL+48*, DEL+49*, DEL+50*, DEL+51*, DEL+52*, ENTSEL+17*
, ENTSEL+33*, ENTSEL+52*
DIR("B" ENTSEL+33*, ENTSEL+52*
DIR(0 DEL+37*, ENTSEL+16*, ENTSEL+33*, ENTSEL+43*, ENTSEL+52*
DIROUT ADD+3~, DEL+4~, ENTSEL+8~, LOCK+6~, SELEVENT+16~
DIRUT ADD+3~, DEL+4~, ENTSEL+8~, ENTSEL+19, ENTSEL+34, ENTSEL+53, LOCK+6~, SELEVENT+16~
DLINE SELEVENT~, SELEVENT+19*, SELEVENT+20*, SELEVENT+23, SELEVENT+25*, SELEVENT+32*, SELEVENT+36*
DTOUT ADD+3~, DEL+4~, ENTSEL+8~, LOCK+6~, SELEVENT+16~
DUOUT ADD+3~, DEL+4~, ENTSEL+8~, ENTSEL+45, LOCK+6~, SELEVENT+16~
EIEN SELEVENT+16~, SELEVENT+37*, SELEVENT+38
EIENS SELEVENT+16~, SELEVENT+21*, SELEVENT+38*, SELEVENT+39
ENTRIES BLD+5~, BLD+17
ENTRIES( BLD+16*, BLD+23, BLD+25, BLD+27, BLD+29
ERROR ENTSEL+9~, ENTSEL+20!
FDA ADD+3~, ENTSEL+9~, ENTSEL+20!
FDA("350.9" ADD+20*
FDA("355.98" ENTSEL+55*
FDAIEN ENTSEL+9~, ENTSEL+20!
FDAIEN(1 ENTSEL+57
FULL SELEVENT~, SELEVENT+18
>> I ENTSEL+42*
IBNODE ENTSEL+9~, ENTSEL+11*
IBSAVEX ENTSEL+9~, ENTSEL+22*, ENTSEL+27, ENTSEL+31, ENTSEL+37, ENTSEL+47, ENTSEL+52, ENTSEL+55
IEN BLDLN~, ADD+3~, ADD+15*, ADD+16, ADD+17*, ADD+18, ADD+19, ADD+20
IENS ADD+3~, ADD+10, ENTSEL~, ENTSEL+10!, ENTSEL+61
IENS( ADD+17, ENTSEL+38*, ENTSEL+46*, ENTSEL+57*
INSM ADD+3~
INSMC ADD+3~
IOF LOCK+11
IX ENTSEL+8~, SELEVENT+16~, SELEVENT+32*, SELEVENT+33, SELEVENT+34*, SELEVENT+35, SELEVENT+36, SELEVENT+37
LABEL SETL~, SETL+8
LINE BLD+5~, BLD+18*, BLD+19, BLD+27*, BLD+28, BLDLN+5~, BLDLN+6*, BLDLN+7*, BLDLN+8, SETL~
, SETL+8*, SETL+9
LIST DEL+4~, DEL+41
LIST( DEL+22*, DEL+23*, DEL+28, DEL+29, DEL+31, DEL+34
LNG SETL~, SETL+8
MULT SELEVENT~, SELEVENT+23
NAME BLD+5~, BLD+14*, BLD+15, BLD+16, BLD+21*, BLD+22, BLD+23*, BLD+25, BLD+27, BLD+29
, BLDLN~, BLDLN+7, ADD+4~, DEL+4~, DEL+21*, DEL+22
NAMEIEN BLD+5~, BLD+12*, BLD+13, BLD+14, BLD+16
NAMEU ADD+4~
NODE BLD+5~, BLD+7*, BLD+10, BLD+12, BLD+14, ADD+4~, ADD+5*, ADD+7, ADD+10, ADD+12
, ADD+19, ADD+20, ADD+22, DEL+5~, DEL+6*, DEL+7, DEL+9, DEL+16, DEL+20, DEL+21
, DEL+35, DEL+54, ENTSEL~, LOCK~, LOCK+7, LOCK+9, LOCK+10, UNLOCK~, UNLOCK+3
NODE0 BLD+5~, BLD+12*, ADD+4~, DEL+5~, DEL+20*, DEL+21, DEL+23
OTHER DEL+5~, DEL+7*, DEL+29
PROMPT SELEVENT~
SCREEN ENTSEL+9~, ENTSEL+23*, ENTSEL+24
SELSTR DEL+5~, DEL+11
SKIPPED DEL+5~, DEL+27*, DEL+31*, DEL+49
STOP ENTSEL+8~, ENTSEL+12*, ENTSEL+14, ENTSEL+19*, ENTSEL+30, ENTSEL+34*, ENTSEL+37*, ENTSEL+41, ENTSEL+45*, ENTSEL+47*
, ENTSEL+53*
STOP2 ENTSEL+8~
STR DEL+5~, DEL+11*, DEL+13, DEL+18, DEL+19, DEL+20, DEL+39, DEL+40, DEL+55
TARGET ENTSEL+9~, ENTSEL+20!, ENTSEL+37!, ENTSEL+41, ENTSEL+47!, ENTSEL+52
TARGET("DILIST" ENTSEL+27, ENTSEL+30, ENTSEL+31, ENTSEL+37, ENTSEL+38, ENTSEL+41, ENTSEL+42, ENTSEL+43, ENTSEL+46, ENTSEL+50
TEMPLATE EN+3~, EN+4*, EN+5
TEXT LOCK+6~, LOCK+9*, LOCK+10*, LOCK+11
U BLD+12
>> VALMBCK ADD+6*, DEL+8*, DEL+15*
>> VALMCNT BLD+6*, BLD+26*, BLD+27, BLD+28, BLD+29
>> VALMHDR(1 HDR+4*, HDR+5*
>> VALMSG ADD+11*, ADD+25*, DEL+14*
VALMY SELEVENT+16~, SELEVENT+31
VALMY( SELEVENT+34
WHICH EN~, EN+4, HDR~, HDR+4, HDR+5, INIT~, INIT+5, BLD~, BLD+7, HELP~
, EXIT~, ADD~, ADD+5, ADD+10, ADD+24, DEL~, DEL+6, DEL+55
WHICHF ENTSEL~, ENTSEL+11
WLIST SELEVENT~, SELEVENT+17*, SELEVENT+37
X HELP+3*, ADD+4~, DEL+5~, ENTSEL+8~, ENTSEL+21*, ENTSEL+22, ENTSEL+24, ENTSEL+46, ENTSEL+47, LOCK+6~
, SELEVENT+16~
>> XQORNOD(0 SELEVENT+19, SELEVENT+30
XX BLDLN+5~, ADD+4~, DEL+5~, ENTSEL+8~
Y ADD+4~, DEL+5~, ENTSEL+8~, ENTSEL+30, ENTSEL+37, ENTSEL+54, LOCK+6~, SELEVENT+16~
Z BLD+5~, BLD+8*, BLD+9, BLD+10*, BLD+11, BLD+12, BLD+16, BLD+24*, BLD+25*, BLD+27
, BLD+29, ADD+4~, DEL+5~, DEL+19*, DEL+20, DEL+37*, DEL+38*, DEL+39*, DEL+44*, DEL+45*
, DEL+48*, DEL+49*, DEL+50*, DEL+51*
Z1 ADD+4~, DEL+5~, DEL+20*, DEL+22, DEL+23, DEL+42*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All