Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: OOPSPC21

Package: Asists

Routine: OOPSPC21


Information

OOPSPC21 ;HIRMFO/YH-SUPERVISOR'S REPORT, CA1 FORM ;6/12/98

Source Information

Source file <OOPSPC21.m>

Entry Points

Name Comments DBIA/ICR reference
L35 ;YOUR KNOWLEDGE AGREE WITH STATEMENTS OF EMPLOYEE AND/OR WITNESS
L36 ;IF THE EMPLOYING AGENCY CONTROVERTS CONTINUATION OF PAY, STATE THE REASON

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"PU1,27.4;LB"_OOPSTMP1_"#;"
  • Line Location: OOPSPC21+5
Function Call: WRITE
  • Prompt: "PU17.7,27.4;LB"_$$GET1^DIQ(2260,IEN,"70:.01")_"#;"
  • Line Location: OOPSPC21+7
Function Call: WRITE
  • Prompt: !,"PU1,26.6;LB"_OOPSTMP1_"#;"
  • Line Location: OOPSPC21+9
Function Call: WRITE
  • Prompt: !,"PU1,25.7;LB"_OOPSTMP1_"#;"
  • Line Location: OOPSPC21+12
Function Call: WRITE
  • Prompt: !,$S(OOPSR=1:"PU7.2,25.1;LBX#;",OOPSR=2:"PU9.2,25.1;LBX#",OOPSR=3:"PU11.2,25.1;LBX#;",1:"")
  • Line Location: OOPSPC21+16
Function Call: WRITE
  • Prompt: !,"PU1,24.8;LB"_$P(OOPSDATA,U,5)_"#;"
  • Line Location: OOPSPC21+17
Function Call: WRITE
  • Prompt: !,"PU3,23.6;LB"_$E(OOPSP,1,2)_"#;PU3.6,23.6;LB"_$E(OOPSP,4,5)_"#;"_$S(OOPSP["A":"PU4.1,24.2;LBX#;",OOPSP["P":"PU4.1,23.7;LBX#;",1:"")
  • Line Location: OOPSPC21+22
Function Call: WRITE
  • Prompt: !,"PU6.3,23.6;LB"_$E(OOPSP,1,2)_"#;PU7,23.6;LB"_$E(OOPSP,4,5)_"#;"_$S(OOPSP["A":"PU7.4,24.2;LBX#;",OOPSP["P":"PU7.4,23.7;LBX#;",1:"")
  • Line Location: OOPSPC21+24
Function Call: WRITE
  • Prompt: !,$S(OOPSP="Y":"PU7.6,21;LBX#;",OOPSP="N":"PU9,21;LBX#;",1:"")
  • Line Location: OOPSPC21+38
Function Call: WRITE
  • Prompt: !,"PU1,20;LB"_$P(OOPSDATA,"^",5)_"#;"
  • Line Location: OOPSPC21+39
Function Call: WRITE
  • Prompt: !,$S(OOPSP="Y":"PU15,19.5;LBX#;",OOPSP="N":"PU19.2,19.5;LBX#;",1:"")
  • Line Location: OOPSPC21+41
Function Call: WRITE
  • Prompt: !,"PU1,18.6;LB"_$P(OOPSDATA,"^",7)_"#;"
  • Line Location: OOPSPC21+42
Function Call: WRITE
  • Prompt: !,$S(OOPSP="Y":"PU1,17.3;LBX#;",OOPSP="N":"PU2.7,17.3;LBX#;",1:"")
  • Line Location: OOPSPC21+44
Function Call: WRITE
  • Prompt: !,"PU4.3,17.7;LB"_$P(OOPSDATA,"^")_"#;"
  • Line Location: OOPSPC21+47
Function Call: WRITE
  • Prompt: !,"PU4.3,16.8;LB"_$P(OOPSDATA,"^",2)_"#;"
  • Line Location: OOPSPC21+48
Function Call: WRITE
  • Prompt: !,"PU4.3,15.9;LB"_$P(OOPSDATA,"^",3)_$S(+$P(OOPSDATA,"^",4)>0:", "_$P(^DIC(5,+$P(OOPSDATA,"^",4),0),"^"),1:"")_" "_$P(OOPSDATA,"^",5)_"#;"
  • Line Location: OOPSPC21+49
Function Call: WRITE
  • Prompt: !,"PU1,15;LB"_$P(OOPSDATA,"^")_"#;"
  • Line Location: OOPSPC21+51
Function Call: WRITE
  • Prompt: !,"PU1,14.1;LB"_$P(OOPSDATA,"^",2)_"#;"
  • Line Location: OOPSPC21+52
Function Call: WRITE
  • Prompt: !,"PU1,13.3;LB"_$P(OOPSDATA,"^",3)_$S(+$P(OOPSDATA,"^",4)>0:", "_$P(^DIC(5,+$P(OOPSDATA,"^",4),0),"^"),1:"")_" "_$P(OOPSDATA,"^",5)_"#;"
  • Line Location: OOPSPC21+53
Function Call: WRITE
  • Prompt: !,$S(OOPSP="Y":"PU17.4,14.1;LBX#;",OOPSP="N":"PU18.8,14.1;LBX#;",1:"")
  • Line Location: OOPSPC21+56
Function Call: WRITE
  • Prompt: !,$S(OOPSP="Y":"PU15.8,12.7;LBX#;",OOPSP="N":"PU17.1,12.7;LBX#;",1:"")
  • Line Location: L35+1
Function Call: WRITE
  • Prompt: !,"PU15.2,9.9;LB"_$P(OOPSDATA,"^")_"#;PU18.7,9.9;LB"_OOPSP_"#;"
  • Line Location: L36+10
Function Call: WRITE
  • Prompt: !,"PU1,7.1;LB"_$P($G(^OOPS(2260,IEN,"CA1L")),"^",3)_"#;"
  • Line Location: L36+12
Function Call: WRITE
  • Prompt: !,"PU1,6.2;LB"_OOPSP_"#;"
  • Line Location: L36+14
Function Call: WRITE
  • Prompt: !,"PU1,5.4;LB/ES/ "_OOPSP_"#;"
  • Line Location: L36+15
Function Call: WRITE
  • Prompt: !,"PU12.9,5.4;LB"_$$FMTE^XLFDT($P(OOPSDATA,"^",6),1)_"#;"
  • Line Location: L36+16
Function Call: WRITE
  • Prompt: !,"PU1,4.7;LB"_$P(OOPSDATA,"^",4)_"#;PU12.9,4.7;LB"_$P(OOPSDATA,"^",5)_"#;"
  • Line Location: L36+18
Function Call: WRITE
  • Prompt: !,$S(OOPSP=1:"PU4.7,4.3;LBX#;",OOPSP=2:"PU4.7,3.9;LBX#;",OOPSP=3:"PU4.7,3.5;LBX#;",OOPSP=4:"PU4.7,3.1;LBX#;",1:"")
  • Line Location: L36+20

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^OOPS(2260 - [#2260] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call