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

Package: Fee Basis

Routine: FBAASDR


Information

FBAASDR ;WOIFO/SAB - FEE 1358 SEGREGATION OF DUTIES REPORT ;11/18/2010

Source Information

Source file <FBAASDR.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA FileMan 5 DD^%DT  NOW^%DTC  ^DIC  $$GET1^DIQ  ^DIR  
Kernel 4 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  ($$FMADD,$$FMTE)^XLFDT  
Fee Basis 2 DAYS^FBAAUTL1  $$SUB^FBAAUTL5  
IFCAP 1 $$EV1358^PRCEMOA  

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

Package Total Caller Graph
Fee Basis 1 FB SEG DUTY RPT  

Entry Points

Name Comments DBIA/ICR reference
QEN ; queued entry
GATHER ; collect and sort data
PRINT ; report data
EXIT ;
HD ; page header
HDEV ; page header for continued event

External References

Name Field # of Occurrence
DD^%DT PRINT+1
NOW^%DTC PRINT+1
^%ZIS FBAASDR+52
HOME^%ZIS FBAASDR+57
^%ZISC PRINT+71
^%ZTLOAD FBAASDR+57
$$S^%ZTLOAD HD+2
^DIC FBAASDR+42
$$GET1^DIQ PRINT+51, PRINT+53, PRINT+54, PRINT+55
^DIR FBAASDR+22, FBAASDR+30, FBAASDR+35, FBAASDR+48, PRINT+70, HD+3
DAYS^FBAAUTL1 FBAASDR+28
$$SUB^FBAAUTL5 GATHER+26
$$EV1358^PRCEMOA GATHER+37
$$FMADD^XLFDT FBAASDR+21
$$FMTE^XLFDT FBAASDR+21, FBAASDR+29, PRINT+9, PRINT+49

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,FBDL("CH")
  • Line Location: PRINT+29
Function Call: WRITE
  • Prompt: !,FBOB
  • Line Location: PRINT+30
Function Call: WRITE
  • Prompt: !,"IFCAP events for this 1358 missing due to following error:"
  • Line Location: PRINT+33
Function Call: WRITE
  • Prompt: !,$P(FBOBX,U,2),!
  • Line Location: PRINT+34
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+46
Function Call: WRITE
  • Prompt: ?11,$$FMTE^XLFDT(FBDT,"2MZ")
  • Line Location: PRINT+49
Function Call: WRITE
  • Prompt: ?26,$S(FBEV="O":"OBLIGATE",FBEV="A":"ADJUST",1:FBEV)
  • Line Location: PRINT+50
Function Call: WRITE
  • Prompt: ?38,"CERTIFIER",?49,$$GET1^DIQ(200,FBX,.01)
  • Line Location: PRINT+51
Function Call: WRITE
  • Prompt: ?38,"REQUESTOR"
  • Line Location: PRINT+53
Function Call: WRITE
  • Prompt: ?49,$$GET1^DIQ(200,$P(FBX,U),.01)
  • Condition for execution: $P(FBX,U)
  • Line Location: PRINT+53
Function Call: WRITE
  • Prompt: !,?38,"APPROVER"
  • Line Location: PRINT+54
Function Call: WRITE
  • Prompt: ?49,$$GET1^DIQ(200,$P(FBX,U,2),.01)
  • Condition for execution: $P(FBX,U,2)
  • Line Location: PRINT+54
Function Call: WRITE
  • Prompt: !,?38,"OBLIGATOR"
  • Line Location: PRINT+55
Function Call: WRITE
  • Prompt: ?49,$$GET1^DIQ(200,$P(FBX,U,3),.01)
  • Condition for execution: $P(FBX,U,3)
  • Line Location: PRINT+55
Function Call: WRITE
  • Prompt: !,?8,"***",FBXV
  • Line Location: PRINT+60
Function Call: WRITE
  • Prompt: !!,"REPORT STOPPED AT USER REQUEST"
  • Line Location: PRINT+62
Function Call: WRITE
  • Prompt: !,FBDL("CH")
  • Line Location: PRINT+65
Function Call: WRITE
  • Prompt: !!," ",FBC("CER")," batch certification",$S(FBC("CER")=1:" was",1:"s were")," found during the report period."
  • Line Location: PRINT+66
Function Call: WRITE
  • Prompt: !," ",FBC("OBL")," 1358 Obligation",$S(FBC("OBL")=1:" is",1:"s are")," referenced."
  • Line Location: PRINT+68
Function Call: WRITE
  • Prompt: !," A violation of segregation of duties was detected on ",$S(FBC("VIO")=0:"none",1:FBC("VIO"))," of the 1358s."
  • Line Location: PRINT+69
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: !,"Fee Basis 1358 Segregation of Duties",?49,FBDTR,?72,"page ",FBPG
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: !,FBHDT(FBI)
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: !!,"1358",?11,"DATE/TIME",?26,"EVENT/BATCH",?38,"ROLE",?49,"NAME"
  • Line Location: HD+8
Function Call: WRITE
  • Prompt: !,FBOB," (continued from previous page)"
  • Line Location: HDEV+1
Routine Call
  • DIC
  • Line Location:
    • FBAASDR+42
Routine Call
  • DIR
  • Line Location:
    • FBAASDR+22
    • FBAASDR+30
    • FBAASDR+35
    • FBAASDR+48
    • PRINT+70
    • HD+3
Routine Call
  • %ZIS
  • Line Location:
    • FBAASDR+52
Routine Call
  • %ZIS
  • Line Location:
    • FBAASDR+57

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^PRC(411 - [#411] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FBAA(161.7 - [#161.7] GATHER+11, GATHER+13, GATHER+15, GATHER+20
^TMP($J GATHER+2!, GATHER+30*, GATHER+34, GATHER+38*, GATHER+42*, GATHER+45, GATHER+46, GATHER+51, GATHER+53, GATHER+55
, GATHER+59*, GATHER+60*, GATHER+61*, GATHER+69*, GATHER+70*, GATHER+71*, GATHER+74*, PRINT+17, PRINT+19, PRINT+38
, PRINT+41, PRINT+44, PRINT+48, PRINT+57, PRINT+59, EXIT+2!

Label References

Name Line Occurrences
EXIT FBAASDR+22, FBAASDR+30, FBAASDR+35, FBAASDR+39, FBAASDR+48, FBAASDR+52, FBAASDR+53
HD PRINT+14, PRINT+27, PRINT+45, PRINT+64
HDEV PRINT+45

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% GATHER+1~, PRINT+1
%ZIS FBAASDR+16~, FBAASDR+52*
DIC FBAASDR+41*, EXIT+5!
DIC(0 FBAASDR+41*
DIR FBAASDR+16~, FBAASDR+22!, FBAASDR+30!, FBAASDR+35!, FBAASDR+48!, PRINT+70!, EXIT+5!, HD+3!
DIR("A" FBAASDR+19*, FBAASDR+26*, FBAASDR+34*, FBAASDR+46*
DIR("B" FBAASDR+21*, FBAASDR+29*, FBAASDR+34*, FBAASDR+47*
DIR(0 FBAASDR+19*, FBAASDR+26*, FBAASDR+34*, FBAASDR+46*, PRINT+70*, HD+3*
DIROUT FBAASDR+16~, EXIT+5!
DIRUT FBAASDR+16~, FBAASDR+22, FBAASDR+30, FBAASDR+35, FBAASDR+48, EXIT+5!
DT FBAASDR+21
DTOUT FBAASDR+16~, EXIT+5!
DUOUT FBAASDR+16~, EXIT+5!
FBALL FBAASDR+16~
FBAPP GATHER+48~
FBAPP( GATHER+60, GATHER+66*
FBARR GATHER+36~
FBARR( GATHER+40, GATHER+41, GATHER+42
FBC EXIT+3!
FBC("CER" GATHER+4*, GATHER+31*, PRINT+66
FBC("OBL" GATHER+5*, GATHER+35*, PRINT+67, PRINT+68
FBC("VIO" GATHER+6*, GATHER+75*, PRINT+69
FBDA GATHER+12*, GATHER+13*, GATHER+15, GATHER+20, EXIT+3!
FBDL PRINT+2!, PRINT+3*, PRINT+4, EXIT+3!
FBDL("CH" PRINT+4*, PRINT+29, PRINT+65
FBDT GATHER+10*, GATHER+11*, GATHER+13, GATHER+30, GATHER+39*, GATHER+40*, GATHER+41, GATHER+42, GATHER+51*, GATHER+53
, GATHER+55, GATHER+59, GATHER+60, GATHER+61, GATHER+69, GATHER+70, GATHER+71, PRINT+38*, PRINT+41, PRINT+44
, PRINT+48, PRINT+49, PRINT+57, PRINT+59, EXIT+3!
FBDT1 FBAASDR+16~, FBAASDR+23*, FBAASDR+26, FBAASDR+28, FBAASDR+29, GATHER+10, PRINT+9, EXIT+3!
FBDT2 FBAASDR+16~, FBAASDR+31*, GATHER+11, GATHER+40, PRINT+9, EXIT+3!
FBDTR PRINT+1*, EXIT+3!, HD+6
FBERR PRINT+18~, PRINT+20*, PRINT+24, PRINT+32
FBEV GATHER+41*, GATHER+42, GATHER+53*, GATHER+55, GATHER+57, GATHER+59, GATHER+60, GATHER+61, GATHER+63, GATHER+69
, GATHER+70, GATHER+71, PRINT+40*, PRINT+41*, PRINT+44, PRINT+48, PRINT+50, PRINT+51, PRINT+52, PRINT+57
, PRINT+59, EXIT+3!
FBEVFP PRINT+18~, PRINT+36*, PRINT+45, PRINT+46, PRINT+47*
FBHDT PRINT+7!, EXIT+3!
FBHDT( HD+7
FBHDT(1 PRINT+8*, PRINT+9*, PRINT+10*, PRINT+11*
FBHDT(2 PRINT+12*
FBI HD+1~, HD+7*
FBOB GATHER+22*, GATHER+26, GATHER+27, GATHER+30, GATHER+34*, GATHER+37, GATHER+38, GATHER+42, GATHER+45*, GATHER+46
, GATHER+51, GATHER+53, GATHER+55, GATHER+59, GATHER+60, GATHER+61, GATHER+69, GATHER+70, GATHER+71, GATHER+74
, PRINT+17*, PRINT+19, PRINT+30, PRINT+38, PRINT+41, PRINT+44, PRINT+48, PRINT+57, PRINT+59, EXIT+3!
, HDEV+1
FBOBL GATHER+48~
FBOBL( GATHER+61, GATHER+67*
FBOBX PRINT+18~, PRINT+19*, PRINT+20, PRINT+21, PRINT+34
FBORV FBAASDR+49*, PRINT+12, PRINT+24, PRINT+44, EXIT+3!
FBPG PRINT+1*, EXIT+4!, HD+3, HD+4, HD+5*, HD+6
FBQUIT PRINT+1*, PRINT+17, PRINT+27, PRINT+38, PRINT+41, PRINT+45, PRINT+62, PRINT+64, PRINT+70, EXIT+4!
, HD+2*, HD+3*
FBREQ GATHER+48~
FBREQ( GATHER+59, GATHER+65*
FBSTALL FBAASDR+36*, FBAASDR+39, GATHER+25, PRINT+11, EXIT+4!
FBSTB GATHER+14~, GATHER+25, GATHER+26*, GATHER+27*
FBSTN FBAASDR+37*, FBAASDR+39, FBAASDR+40*, FBAASDR+43*, GATHER+25, PRINT+11, EXIT+4!
FBV PRINT+42~, PRINT+57*, PRINT+59
FBVIO GATHER+48~, GATHER+49*, GATHER+59*, GATHER+60*, GATHER+61*, GATHER+69*, GATHER+70*, GATHER+71*, GATHER+73, PRINT+18~
, PRINT+21*, PRINT+24
FBX FBAASDR+56*, GATHER+36~, GATHER+37*, GATHER+38, GATHER+54~, GATHER+55*, GATHER+59, GATHER+60, GATHER+61, GATHER+65
, GATHER+66, GATHER+67, GATHER+69, GATHER+70, GATHER+71, PRINT+42~, PRINT+48*, PRINT+51, PRINT+53, PRINT+54
, PRINT+55
FBXV PRINT+58~, PRINT+59*, PRINT+60
FBY0 GATHER+15*, GATHER+20, GATHER+22, GATHER+30, EXIT+4!
IO QEN+1
IO("Q" FBAASDR+53
IOF HD+4
IOSL PRINT+27, PRINT+45, PRINT+64
IOST PRINT+70, HD+3, HD+4
POP FBAASDR+16~, FBAASDR+52
U FBAASDR+43, GATHER+20, GATHER+22, GATHER+30, GATHER+46, GATHER+63, GATHER+65, GATHER+66, GATHER+67, GATHER+69
, GATHER+70, GATHER+71, PRINT+20, PRINT+21, PRINT+34, PRINT+53, PRINT+54, PRINT+55
X FBAASDR+16~, FBAASDR+28*, FBAASDR+29, EXIT+5!
Y FBAASDR+16~, FBAASDR+23, FBAASDR+31, FBAASDR+36, FBAASDR+42, FBAASDR+43, FBAASDR+49, PRINT+1*, EXIT+5!, HD+3
ZTCPU FBAASDR+54~
ZTDESC FBAASDR+54~, FBAASDR+55*
ZTDTH FBAASDR+54~
ZTIO FBAASDR+54~
ZTKIL FBAASDR+54~
ZTPRI FBAASDR+54~
>> ZTQUEUED EXIT+1, HD+2
>> ZTREQ EXIT+1*
ZTRTN FBAASDR+54~, FBAASDR+55*
ZTSAVE FBAASDR+54~
ZTSAVE( FBAASDR+56*
ZTSK FBAASDR+54~
>> ZTSTOP HD+2*
ZTSYNC FBAASDR+54~
ZTUCI FBAASDR+54~
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