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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBCEFG6

Package: Integrated Billing

Routine: IBCEFG6


Information

IBCEFG6 ;ALB/TMP - OUTPUT FORMATTER MAINT-FORM FLD ACTION PROCESSING ;23-JAN-96

Source Information

Source file <IBCEFG6.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Integrated Billing 3 BLD^IBCEFG5  $$EDCHK^IBCEFG60  (VIEW,VIEWE)^IBCEFG61  
List Manager 3 (FULL,PAUSE)^VALM1  CLEAN^VALM10  EN^VALM2  
VA FileMan 3 ^DIC  (FILE,YN)^DICN  ^DIE  

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 6 IBCE ADD FORM FIELD  IBCE DEFINE FIELD CONTENT  IBCE EDIT FORM FIELD  IBCE VIEW ELEMENT  IBCE VIEW FORM FIELD  IBCEFG60  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
ADD ; Add a new local form fld
; Assumes IBCEXDA defined
ADD1
ADDQ
EDIT ; Edit a local form fld
EDITL(DA,FLD,NOASK,IBCOPY) ; Edit a local form fld #FLD in display whose ien is DA
; NOASK = 1, don't ask, just do it
; IBCOPY = IFN of entry in file 364.7 whose data element and format code
; should be copied into this new entry
VIEWF(IBDA) ;
CONTENT(IBDA,IBCOPY) ; Add/edit form fld definition content
; IBDA = corresponding entry in file 364.6 for definition being
; added/edited. If null, ask for selections from current screen
; IBCOPY = IFN of entry in file 364.7 whose data element and format code
; should be copied into this new entry
CONTQ
CONTED(IBDA,IBCONT,IBCOPY) ; Edit definition for ien IBDA
; IBDA = file 364.6 entry whose definition is being edited
; IBCONT = flag returned as 1 if a new associated form fld created,
; forcing a regeneration of the display
; IBCOPY = IFN of entry in file 364.7 whose data element and format code
; should be copied into this new entry
ED1
VIEWEL(IBBASE) ; View a data element
; IBBASE = ien of the base file for the element to be viewed
; if undef - any element can be selected
VIEWELQ
NOEDIT(FUNC,FLD) ; Write NO CHANGE msg for associated flds
FNL ; Clean up
SEL(IBDA,ONE) ; Select form fld entries from list

External References

Name Field # of Occurrence
^DIC VIEWEL+7
FILE^DICN ADD1+6, CONTED+14
YN^DICN ADD+8, ADD+18, ADD+20, EDITL+5
^DIE EDITL+4, ED1
BLD^IBCEFG5 ADDQEDIT+8, CONTQ
$$EDCHK^IBCEFG60 ED1+1
VIEW^IBCEFG61 EDIT+7, VIEWF+4, CONTENT+12
VIEWE^IBCEFG61 VIEWEL+8
FULL^VALM1 ADD+4, EDIT+2, VIEWF+2, CONTENT+6, VIEWEL+4
PAUSE^VALM1 ADD+14, ADD+15, ADD+16, VIEWF+4, VIEWEL+8, NOEDIT+3
CLEAN^VALM10 FNL+2
EN^VALM2 SEL+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Can Only Over-ride a NATIONAL form field",!
  • Line Location: ADD+14
Function Call: WRITE
  • Prompt: !!,"Can't Over-ride a form field that is an over-ride itself",!
  • Line Location: ADD+15
Function Call: WRITE
  • Prompt: !!,"Form field definition will not allow override",!
  • Line Location: ADD+16
Function Call: WRITE
  • Prompt: !!,"Over-riding Form Field # ",IB," - ",$P($G(^IBA(364.6,+IBDA(IB),0)),U,10)
  • Line Location: ADD+17
Function Call: WRITE
  • Prompt: !,"IS THIS OK"
  • Line Location: ADD+18
Function Call: WRITE
  • Prompt: !,"COPY OVER THE DATA ELEMENT AND OUTPUT FORMAT FROM THE ORIGINAL FLD"
  • Line Location: ADD+20
Function Call: WRITE
  • Prompt: " is a NATIONAL form field",!
  • Line Location: EDIT+6
Function Call: WRITE
  • Prompt: !!,$S($D(^IBA(364.7,"B",DA)):"EDIT",1:"ADD")," FORM FIELD",$S($G(FLD):" #"_FLD,1:""),"'S CONTENT DEFINITION NOW"
  • Line Location: EDITL+5
Function Call: WRITE
  • Prompt: !!,"...Please define CONTENT of field...",!
  • Line Location: EDITL+6
Function Call: WRITE
  • Prompt: " is a NATIONAL form field",!
  • Line Location: CONTENT+11
Function Call: WRITE
  • Prompt: !!
  • Line Location: VIEWEL+5
Function Call: WRITE
  • Prompt: !,"FORM FIELD #: ",FLD
  • Line Location: NOEDIT+1
Function Call: WRITE
  • Prompt: !,*7,"YOU CANNOT ",FUNC," A NATIONALLY ASSOCIATED LOCAL FORM",!," - REDEFINE THE FIELD'S CONTENT BY USING A LOCAL FORM FIELD TO OVERRIDE"
  • Line Location: NOEDIT+2
Routine Call
  • DIC
  • Line Location:
    • VIEWEL+7
Routine Call
  • DIE
  • Line Location:
    • EDITL+4
    • ED1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(364.5 - [#364.5] Classic Fileman Calls
^IBA(364.6 - [#364.6] Classic Fileman Calls
^IBA(364.7 - [#364.7] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBA(364.6 - [#364.6] ADD+7, ADD+14, ADD+15, ADD+16, ADD+17, ADD1+2, ADD1+3, ADD1+8*, EDIT+5, EDIT+6
, VIEWF+3, CONTENT+10, CONTENT+11
^IBA(364.7 - [#364.7] ADD+23, EDIT+7, EDITL+5, VIEWF+4, CONTENT+12, CONTED+7, CONTED+11, CONTED+12, CONTED+13, CONTED+15*
, CONTED+18*
^IBE(353 - [#353] ADD+5, ADD+6, VIEWEL+6
^TMP("IBCEDEFDX" FNL+1!
^TMP("IBCEFLDDX" SEL+2

Label References

Name Line Occurrences
ADD1 ADD+7, ADD+10
ADDQ ADD+3, ADD+12, ADD+14, ADD+15, ADD+16, ADD+19, ADD+21, ADD1+10
CONTED CONTENT+8, CONTENT+12
CONTENT EDITL+7
CONTQ CONTENT+8
ED1 ED1+1
EDITL ADDQEDIT+7
NOEDIT EDIT+6, CONTENT+11
SEL ADD+11, EDIT+4, VIEWF+1, CONTENT+9

Naked Globals

Name Field # of Occurrence
^(0 EDIT+5, VIEWF+3, CONTENT+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ADD+2~, ADD+8*, ADD+9, ADD+18*, ADD+19, ADD+20*, ADD+21, ADD+23, EDITL+5*, EDITL+6*
, EDITL+7
DA ADD+2~, EDITL~, EDITL+5, EDITL+7, ED1*
DD ADD+2~, ADD1!, ADD1+7!, ADD1+9!, CONTED+6~, CONTED+9!, CONTED+16!
DIC ADD+2~, ADD1+1*, ADD1+9!, CONTED+6~, CONTED+10*, CONTED+16!, VIEWEL+3~, VIEWEL+7*!
DIC("A" VIEWEL+7*
DIC("DR" ADD1+4*, ADD1+5*, CONTED+10*, CONTED+11*
DIC("S" VIEWEL+7*
DIC(0 ADD1+1*, CONTED+10*, VIEWEL+7*
DIE ADD+2~, EDITL+4*, ED1*
DINUM ADD+2~, ADD1!, ADD1+3*, ADD1+7!, CONTED+6~, CONTED+9!, CONTED+13*, CONTED+16!
DIPA CONTENT+5~
DLAYGO ADD+2~, ADD1+1*, ADD1+7!, ADD1+9!, CONTED+10*, CONTED+16!
DO ADD+2~, ADD1!, ADD1+7!, ADD1+9!, CONTED+6~, CONTED+9!, CONTED+16!
DR ADD+2~, EDITL+4*, ED1*
FLD EDITL~, EDITL+5, NOEDIT~, NOEDIT+1
FUNC NOEDIT~, NOEDIT+2
IB ADD+2~, ADD+12*, ADD+14*, ADD+15*, ADD+16*, ADD+17, ADD+19*, ADD+22*, ADD+23, ADD1+4
EDIT+1~, EDIT+5*, EDIT+6, EDIT+7
IBASSOC ADD+2~, ADD+5*, ADD+7, ADD+14, ADD+15
IBBASE VIEWEL~, VIEWEL+3~, VIEWEL+6*, VIEWEL+7
IBCECDA CONTED+6~, CONTED+7*, CONTED+8, CONTED+17*, CONTED+19, ED1ED1+1
>> IBCEXDA ADD+3, ADD+5, ADD+6, ADD+7, ADD1+1, VIEWEL+6
IBCONT CONTENT+5~, CONTENT+7*, CONTENT+8, CONTENT+12, CONTQ, CONTED~, CONTED+8*
IBCOPY ADD+2~, ADD+23*, ADDQ, EDITL~, EDITL+7, CONTENT~, CONTENT+8, CONTED~, CONTED+11, CONTED+18
IBDA ADD+2~, ADD+11, ADD1+11*, ADDQEDIT+1~, EDIT+4, VIEWF~, VIEWF+1, VIEWF+3*, VIEWF+4
, CONTENT~, CONTENT+8, CONTENT+9, CONTENT+10*, CONTENT+11, CONTENT+12, CONTED~, CONTED+7, CONTED+10, SEL~
, SEL+2*
IBDA( ADD+14, ADD+15, ADD+16, ADD+17, ADD+22, EDIT+5, EDIT+6, EDIT+7, VIEWF+3, VIEWF+4
, CONTENT+10, CONTENT+11, CONTENT+12, SEL+2*
IBDA("" ADD+12
IBEDIT EDIT+1~, EDIT+3*, EDIT+7*, EDIT+8
IBSCREEN ADD+2~, ADD+6*, ADD+14, ADD+15
IBSEL ADD+2~, ADD+5*, ADD+7, ADD+9*, ADD+10
LDINUM ADD+2~, ADD1+3*, ADD1+8, CONTED+6~, CONTED+13*, CONTED+15
NOASK EDITL~, EDITL+5, EDITL+6
ONE SEL~, SEL+1
U ADD+5, ADD+6, ADD+14, ADD+15, ADD+16, ADD+17, ADD1+8, EDIT+5, EDIT+6, VIEWF+3
, CONTENT+10, CONTENT+11, CONTED+11, CONTED+15, SEL+2
>> VALMBCK ADDQ+1*, EDIT+9*, VIEWF+6*, CONTQ+1*, VIEWELQ*
>> VALMY( SEL+2
X ADD+2~, ADD1+1*, CONTED+6~, CONTED+10*
>> XQORNOD(0 SEL+1
Y ADD+2~, ADD1+10, ADD1+11, CONTED+6~, CONTED+17, CONTED+18, VIEWEL+3~, VIEWEL+8
Z ADD1+2*, ADD1+3, CONTED+6~, CONTED+12*, CONTED+13
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 |  Naked Globals |  Local Variables  | All